mysql base IOsnap-20010317

3 files changed, 53 insertions, 0 deletions

diff --git a/regress/mysql/HOW_TO_SETUP.txt b/regress/mysql/HOW_TO_SETUP.txt
new file mode 100644
index 00000000..acb1606f
--- /dev/null
+++ b/regress/mysql/HOW_TO_SETUP.txt
@@ -0,0 +1,30 @@
+DO NOT FORGET, RUN
+
+	# mysqladmin -p reload
+
+-------------------------------------------------------------
+
+
+# mysqladmin -u root password "new password"
+
+# mysqladmin -p create fml 
+Enter password: 
+Database "fml" created.
+
+# mysqladmin -p status
+Enter password: 
+
+# cat adduser.sql | mysql -p mysql
+Enter password: 
+
+# cat adduser.sql
+INSERT INTO user
+VALUES ('beth.fml.org','fukachan',Password('uja'),'Y','Y','Y','Y','Y','N','N','N','N','N','N','N','N','N');
+
+# cat ~/w/cvs/fml/databases/examples/mysql-toymodel/toymodel.sql |\
+	sudo mysql -h localhost -p fml
+
+
+###
+### "--password" NOT WORKS ????
+###
diff --git a/regress/mysql/adduser.sql b/regress/mysql/adduser.sql
new file mode 100644
index 00000000..31b27102
--- /dev/null
+++ b/regress/mysql/adduser.sql
@@ -0,0 +1,2 @@
+INSERT INTO user
+VALUES ('%','fukachan',Password('uja'),'Y','Y','Y','Y','Y','N','N','N','N','N','N','N','N','N');
diff --git a/regress/mysql/getline.pl b/regress/mysql/getline.pl
new file mode 100755
index 00000000..a61d6635
--- /dev/null
+++ b/regress/mysql/getline.pl
@@ -0,0 +1,21 @@
+#!/usr/pkg/bin/perl
+#
+# $Id$
+#
+
+use strict;
+use IO::Adapter::MySQL;
+
+my $obj = new IO::Adapter::MySQL { ml_name => 'elena' };
+
+$obj->open({
+    sql_user          => 'fukachan',
+    sql_user_password => '',
+});
+
+while ($_ = $obj->getline) {
+    print $_, "\n";
+}
+
+$obj->close;
+