extern/egroupware
1
0
Fork 1
mirror of https://github.com/EGroupware/egroupware.git synced 2024-12-27 00:58:55 +01:00
Code Issues Packages Projects Releases Wiki Activity

added some "unit tests" for schemaproc

Browse Source
This commit is contained in:
Ralf Becker 2004-08-09 21:29:03 +00:00
parent 691831c09f
commit 908eef2095
1 changed files with 121 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

121
phpgwapi/tests/schema_proc.php Executable file
View File

@ -0,0 +1,121 @@
#!/usr/bin/php -q
<?php
/**************************************************************************\
* eGroupWare - Setup - db-schema-processor - unit tests *
* http://www.egroupware.org *
* -------------------------------------------- *
* Written by Ralf Becker <RalfBecker@outdoor-training.de> *
* -------------------------------------------- *
* This program is free software; you can redistribute it and/or modify it *
* under the terms of the GNU General Public License as published by the *
* Free Software Foundation; either version 2 of the License, or (at your *
* option) any later version. *
\**************************************************************************/
/* $Id$ */
// For security reasons we exit by default if called via the webserver
/*if (isset($_SERVER['HTTP_HOST']))
{
die ('Access denied !!!');
}*/
// the used domain has to be given as first parameter if called on the commandline or as domain= on the url
if (!isset($_GET['domain']))
{
$_GET['domain'] = isset($_SERVER['argv'][1]) ? $_SERVER['argv'][1] : 'default';
}
$path_to_egroupware = realpath(dirname(__FILE__).'/../..'); // need to be adapted if this script is moved somewhere else
$phpgw_info = array(
'flags' => array(
'disable_Template_class' => True,
'login' => True,
'currentapp' => 'login',
'noheader' => True,
)
);
include ($path_to_egroupware.'/header.inc.php');
$GLOBALS['phpgw_info']['server']['asyncservice'] = 'off';
// now we should have a valid db-connection
$adodb = &$GLOBALS['phpgw']->ADOdb;
$db = &$GLOBALS['phpgw']->db;
if (isset($_SERVER['HTTP_HOST'])) echo "<pre>\n";
echo "Serverinfo: Domain $_GET[domain]: $db->Type($db->Database)\n";
print_r($adodb->ServerInfo());
// creating a schema_proc instance
$schema_proc = CreateObject('phpgwapi.schema_proc',$db->Type);
$schema_proc->debug = isset($_SERVER['argv'][2]) ? $_SERVER['argv'][2] : (isset($_GET['debug']) ? $_GET['debug'] : 0);
// define a test-table to create
$test_tables = array(
'schema_proc_test' => array(
'fd' => array(
'test_auto' => array('type' => 'auto'),
'test_int4' => array('type' => 'int','precision' => '4'),
'test_varchar' => array('type' => 'varchar','precision' => '128'),
'test_char' => array('type' => 'char','precision' => '10'),
'test_timestamp' => array('type' => 'timestamp','default'=>'current_timestamp'),
'test_text' => array('type' => 'text'),
'test_blob' => array('type' => 'blob'),
),
'pk' => array('test_auto'),
'fk' => array(),
'ix' => array('test_varchar',array('test_text','options'=>array('mysql'=>'FULLTEXT','maxdb'=>false,'pgsql'=>false))),
'uc' => array()
),
);
echo "Creating table(s):\n";
$meta_tables = $adodb->MetaTables();
foreach($test_tables as $name => $definition)
{
// droping the tables, if they exist from a previous run
if (in_array($name,$meta_tables) || in_array(strtoupper($name),$meta_tables))
{
$schema_proc->DropTable($name);
}
$schema_proc->CreateTable($name,$definition);
}
echo "\nReading back the tables via MetaTables:\n";
$meta_tables = $adodb->MetaTables();
foreach($test_tables as $name => $definition)
{
if (!in_array($name,$meta_tables) && !in_array(strtoupper($name),$meta_tables))
{
echo "\n\n!!! Table '$name' has NOT been created !!!\n\n";
}
else
{
echo "Table '$name' found\n";
print_r($adodb->MetaColumns($name));
}
}
echo "Droping column test_blob:\n";
$new_table_def = $test_tables['schema_proc_test'];
unset($new_table_def['fd']['test_blob']);
$schema_proc->DropColumn('schema_proc_test',$new_table_def,'test_blob');
echo "Altering column test_char to varchar(32):\n";
$schema_proc->AlterColumn('schema_proc_test','test_char',array('type' => 'varchar','precision' => 32));
echo "Adding column test_bool bool:\n";
$schema_proc->AddColumn('schema_proc_test','test_bool',array('type' => 'bool'));
echo "Renaming column test_timestamp to test_time:\n";
$schema_proc->RenameColumn('schema_proc_test','test_timestamp','test_time');
echo "Renaming table schema_proc_test to schema_proc_renamed:\n";
$schema_proc->RenameTable('schema_proc_test','schema_proc_renamed');
print_r($adodb->MetaColumns('schema_proc_renamed'));
$schema_proc->RenameTable('schema_proc_renamed','schema_proc_test'); // so we can drop it under its original name
echo "\nDroping the test-tables again:\n";
if (!$schema_proc->DropAllTables($test_tables)) echo "!!!Failed !!!\n";
echo "\nbye ...\n";