#!/usr/bin/perl
#
# $Id: check_old_version,v 1.3 1998/02/13 10:54:49 tg Exp $
#

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