32 lines
715 B
Perl
32 lines
715 B
Perl
#!/usr/bin/perl
|
|
#
|
|
# $FreeBSD$
|
|
#
|
|
|
|
if( -d "/var/db/msqldb" ) {
|
|
chdir( "/var/db/pkg" );
|
|
opendir( DIR, "." );
|
|
@oldmsql = grep( /^msql-2.0b[1234]$/, readdir( DIR ) );
|
|
closedir( DIR );
|
|
if( @oldmsql ) {
|
|
if( ! $ENV{OVERWRITE_DB} ) {
|
|
print <<END;
|
|
|
|
mSQL v2.0 beta 5 and above make changes to the AVL index format of your
|
|
databases. In order to preserve your existing data, you must:
|
|
- use msqldump to dump all your databases
|
|
- install beta 5 or above
|
|
- use msqladmin to drop and then create each of your databases
|
|
- use msql to reload your data
|
|
|
|
If you understand the consequences of this upgrade, please re-build this
|
|
port with the environment variable OVERWRITE_DB defined.
|
|
|
|
END
|
|
exit 1;
|
|
}
|
|
}
|
|
}
|
|
|
|
#
|
|
# EOF
|