Diff for /loncom/build/system_dependencies/sqltest.pl between versions 1.2 and 1.3

version 1.2, 2001/09/30 21:00:43 version 1.3, 2002/05/10 01:32:38
Line 66  my $dbh; Line 66  my $dbh;
  { RaiseError =>0,PrintError=>0})   { RaiseError =>0,PrintError=>0})
     ) {       ) { 
  print "Cannot connect to database!\n";   print "Cannot connect to database!\n";
    my $checkDBImodule=`perl pmvers DBI 2>/dev/null`;
    my $checkMYSQLmodule=`perl pmvers Mysql 2>/dev/null`;
    my $checkprocess=`/etc/rc.d/init.d/mysqld status`;
    if (!$checkDBImodule) {
       print "**** ERROR **** SYSTEM IS MISSING THE DBI PERL ".
    "MODULE (DBI.pm)\n";
    }
    elsif (!$checkMYSQLmodule) {
       print "**** ERROR **** SYSTEM IS MISSING THE MYSQL PERL ".
    "MODULE (Mysql.pm)\n";
    }
    elsif (!-e '/etc/rc.d/init.d/mysqld') {
       print "**** ERROR **** IT APPEARS THAT THE MYSQL SERVER HAS NOT ".
    "BEEN INSTALLED\n";
    }
    elsif ($checkprocess=~/is stopped/) {
       print "**** ERROR **** IT APPEARS THAT THE MYSQL SERVER IS NOT ".
    "RUNNING\n";
       print(<<END);
   To fix temporarily, run the command:
      /etc/rc.d/init.d/mysqld start
   
   You may also want to check and see that mysqld is started on boot time.
   
      /sbin/chkconfig --list mysqld
   
   This is bad output:
   mysqld         0:off  1:off  2:off  3:off  4:off  5:off  6:off
   
   This is good output:
   mysqld         0:off  1:off  2:off  3:on   4:on   5:on   6:off
   
   To configure mysqld to launch correctly upon system startup, type the command:
      /sbin/chkconfig --level 345 mysqld on
   END
    }
    else {
       print "**** ERROR **** IT APPEARS THAT WWW\@LOCALHOST AND/OR ".
    "PASSWORD ARE NOT CORRECTLY ENABLED\n";
       print(<<END);
   To diagnose, try logging in from the command line with
          mysql -u www -p mysql
   and use the lonSqlAccess password
   listed in loncapa.conf (PerlSetVar lonSqlAccess ....).
   If this does not work, you may need to REMOVE the www\@localhost MySQL user.
   mysql -u root -p mysql
   mysql> delete from user where user='www'
   And then, you will need to repeat the MySQL configuration steps described at:
          http://install.lon-capa.org/.
   
   **** NOTE **** ANOTHER possibility is that you are not running
   a compatible set of DBI, Mysql perl modules and MySQL server software.
   END
    }
  exit 1;   exit 1;
     }      }
 }  }

Removed from v.1.2  
changed lines
  Added in v.1.3


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>