DataObjects/Core_watch.php
[Pman.Core] / UpdateDatabase.php
index 09f8f57..c359c68 100644 (file)
@@ -18,31 +18,33 @@ class Pman_Core_UpdateDatabase extends Pman
     static $cli_desc = "Update SQL - Beta (it will run updateData of all modules)";
  
     static $cli_opts = array(
-        'source' => array(
-            'desc' => 'Source directory for json files.',
-            'short' => 'f',
+      
+        'prefix' => array(
+            'desc' => 'prefix for the password (eg. fred > xxx4fred - prefix is xxx4)',
+            'short' => 'p',
             'default' => '',
             'min' => 1,
             'max' => 1,
         ),
-        'prefix' => array(
-            'desc' => 'prefix for the passwrod',
+        'data-only' => array(
+            'desc' => 'only run the updateData - do not run import the tables and procedures.',
             'short' => 'p',
             'default' => '',
             'min' => 1,
             'max' => 1,
+            
         ),
-        'name' => array(
-            'desc' => 'name of the company',
+        'add-company' => array(
+            'desc' => 'add a company name of the company',
             'short' => 'n',
             'default' => '',
             'min' => 1,
             'max' => 1,
         ),
-        'comptype' => array(
-            'desc' => 'the type of company',
+        'add-company-with-type' => array(
+            'desc' => 'the type of company (default OWNER)',
             'short' => 't',
-            'default' => '',
+            'default' => 'OWNER',
             'min' => 1,
             'max' => 1,
         ),
@@ -53,14 +55,20 @@ class Pman_Core_UpdateDatabase extends Pman
             'min' => 1,
             'max' => 1,
         ),
-        
-        'json-company' => array(
-            'desc' => 'Company JSON file',
+        'only-module-sql' => array(
+            'desc' => 'Only run sql import on this modules - eg. Core',
             'default' => '',
             'min' => 1,
             'max' => 1,
-            
         ),
+        'procedures-only' => array(
+            'desc' => 'Only import procedures (not supported by most modules yet) - ignores sql directory',
+            'default' => '',
+            'min' => 1,
+            'max' => 1,
+        ),
+        
+        
         'json-person' => array(
             'desc' => 'Person JSON file',
             'default' => '',
@@ -118,45 +126,36 @@ class Pman_Core_UpdateDatabase extends Pman
         return true;
     }
      
-    function get($args, $opt)
+    function get($args, $opts)
     {
-        $this->fixSequencesPgsql();exit;
-        $this->opts = $opt;
         
-        // ask all the modules to verify the opts
+        PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($this, 'onPearError'));
+   
         
-        $this->checkOpts($opt);
+        //$this->fixSequencesPgsql();exit;
+        $this->opts = $opts;
         
+        // ask all the modules to verify the opts
         
+        $this->checkOpts($opts);
         
-        if($args == 'Person'){
-            if(empty($opt['source']) || empty($opt['prefix'])){
-                die("Missing Source directory for person json files or prefix for the passwrod! Try -f [JSON file path] -p [prefix] \n");
-            }
-            if (!file_exists($opt['source'])) {
-                die("can not found person json file : {$opt['source']} \n");
-            }
-            
-            $persons = json_decode(file_get_contents($opt['source']),true);
-            
-            DB_DataObject::factory('person')->importFromArray($this, $persons, $opt['prefix']);
-            die("DONE! \n");
+        
+     
+        if (empty($opts['data-only'])) {
+            $this->importSQL();
+        }
+        if (!empty($opts['only-module-sql'])) {
+            return;
         }
         
+        $this->runUpdateModulesData();
         
         
-        if($args == 'Company'){
-            if(empty($opt['name']) || empty($opt['comptype'])){
-                die("Missing company name or type! Try --name=[the name of company] -- comptype=[the type of company] \n");
-            }
-            
-            DB_DataObject::factory('companies')->initCompanies($this, $opt['name'], $opt['comptype']);
-            
-            die("DONE! \n");
+        if (!empty($opts['add-company'])) {
+            // make sure we have a good cache...?
+           
+            DB_DataObject::factory('companies')->initCompanies($this, $opts);
         }
-        
-        $this->importSQL();
-        $this->runUpdateModulesData();
          
     }
     function output() {
@@ -202,9 +201,12 @@ class Pman_Core_UpdateDatabase extends Pman
             (!empty($dburl['pass']) ? ' -p' . escapeshellarg($dburl['pass'])  :  '') .
             ' ' . basename($dburl['path']);
         //echo $mysql_cmd . "\n" ;
+        
+        $files = glob($dir.'/*.sql');
+        uksort($files, 'strcasecmp');
+        
        
-       
-        foreach(glob($dir.'/*.sql') as $fn) {
+        foreach($files as $fn) {
                 
                  
                 if (preg_match('/migrate/i', basename($fn))) { // skip migration scripts at present..
@@ -247,6 +249,10 @@ class Pman_Core_UpdateDatabase extends Pman
         
         foreach($ar as $m) {
             
+            if (!empty($this->opts['only-module-sql']) && $m != $this->opts['only-module-sql']) {
+                continue;
+            }
+            
             $fd = $this->rootDir. "/Pman/$m/DataObjects";
             
             $this->importmysqldir($dburl, $fd);
@@ -277,8 +283,13 @@ class Pman_Core_UpdateDatabase extends Pman
         
         $ar = $this->modulesList();
        
+        print_R($ar);
         foreach($ar as $m) {
-            
+             echo "Importing SQL from module $m\n";
+            if (!empty($this->opts['only-module-sql']) && $m != $this->opts['only-module-sql']) {
+                continue;
+            }
+            echo "Importing SQL from module $m\n";
             // if init has been called
             // look in pgsql.ini
             if (!empty($this->opts['init'])) {
@@ -333,7 +344,15 @@ class Pman_Core_UpdateDatabase extends Pman
         
         echo $psql_cmd . "\n" ;
         echo "scan : $dir\n";
-        foreach(glob($dir.'/*.sql') as $bfn) {
+        
+        $files = glob($dir.'/*.sql');
+        uksort($files, 'strcasecmp');
+        //$lsort = create_function('$a,$b','return strlen($a) > strlen($b) ? 1 : -1;');
+        //usort($files, $lsort);
+        
+        
+        
+        foreach($files as $bfn) {
 
 
             if (preg_match('/migrate/i', basename($bfn))) { // skip migration scripts at present..
@@ -510,9 +529,11 @@ class Pman_Core_UpdateDatabase extends Pman
             if (!preg_match('/^json-/', $o) || empty($v)) {
                 continue;
             }
-            $type = str_replace('_', '-', substr($o,6));
-            $data= json_decode(file_get_contents($file),true);
-            DB_DataObject::factory($type)->importFromArray($data);
+            $type = str_replace('_', '-', substr($o,5));
+            
+            $data= json_decode(file_get_contents($v),true);
+            $pg = HTML_FlexyFramework::get()->page;
+            DB_DataObject::factory($type)->importFromArray($pg ,$data,$opts);
             
         }
         
@@ -558,7 +579,9 @@ class Pman_Core_UpdateDatabase extends Pman
     
     function updateDataEnums()
     {
+        
         $enum = DB_DataObject::Factory('core_enum');
+        //DB_DAtaObject::debugLevel(1);
         $enum->initEnums(
             array(
                 array(
@@ -675,7 +698,7 @@ class Pman_Core_UpdateDatabase extends Pman
     function updateData()
     {
         // fill i18n data..
-        
+        HTML_FlexyFramework::get()->generateDataobjectsCache(true);
         $this->updateDataEnums();
         $this->updateDataGroups();
         $this->updateDataCompanies();
@@ -689,44 +712,62 @@ class Pman_Core_UpdateDatabase extends Pman
     }
     function fixSequencesPgsql()
     {
-        DB_DataObject::debugLevel(1);
+     
+     
+        //DB_DataObject::debugLevel(1);
         $cs = DB_DataObject::factory('core_enum');
         $cs->query("
-         SELECT 'ALTER SEQUENCE '|| quote_ident(min(schema_name)) ||'.'|| quote_ident(min(seq_name))
-       ||' OWNED BY '|| quote_ident(min(schema_name)) || '.' || quote_ident(min(table_name)) ||'.'|| quote_ident(min(column_name)) ||';' as cmd
-FROM (
-         
-          SELECT 
-        n.nspname AS schema_name,
-        c.relname AS table_name,
-        a.attname AS column_name, 
-        regexp_replace(regexp_replace(d.adsrc, E'nextval\\\\(+[''\"]*', ''),E'[''\"]*::.*\$','') AS seq_name 
-    FROM pg_class c 
-    JOIN pg_attribute a ON (c.oid=a.attrelid) 
-    JOIN pg_attrdef d ON (a.attrelid=d.adrelid AND a.attnum=d.adnum) 
-    JOIN pg_namespace n ON (c.relnamespace=n.oid)
-    WHERE has_schema_privilege(n.oid,'USAGE')
-      AND n.nspname NOT LIKE 'pg!_%' escape '!'
-      AND has_table_privilege(c.oid,'SELECT')
-      AND (NOT a.attisdropped)
-      AND d.adsrc ~ '^nextval'
-) seq
-GROUP BY seq_name HAVING count(*)=1
-");
+         SELECT
+                    'ALTER SEQUENCE '||
+                    CASE WHEN strpos(seq_name, '.') > 0 THEN
+                        min(seq_name)
+                    ELSE 
+                        quote_ident(min(schema_name)) ||'.'|| quote_ident(min(seq_name))
+                    END 
+                    
+                    ||' OWNED BY '|| quote_ident(min(schema_name)) || '.' ||
+                    quote_ident(min(table_name)) ||'.'|| quote_ident(min(column_name)) ||';' as cmd
+             FROM (
+                      
+                       SELECT 
+                     n.nspname AS schema_name,
+                     c.relname AS table_name,
+                     a.attname AS column_name, 
+                     regexp_replace(regexp_replace(d.adsrc, E'nextval\\\\(+[''\\\"]*', ''),E'[''\\\"]*::.*\$','') AS seq_name 
+                 FROM pg_class c 
+                 JOIN pg_attribute a ON (c.oid=a.attrelid) 
+                 JOIN pg_attrdef d ON (a.attrelid=d.adrelid AND a.attnum=d.adnum) 
+                 JOIN pg_namespace n ON (c.relnamespace=n.oid)
+                 WHERE has_schema_privilege(n.oid,'USAGE')
+                   AND n.nspname NOT LIKE 'pg!_%' escape '!'
+                   AND has_table_privilege(c.oid,'SELECT')
+                   AND (NOT a.attisdropped)
+                   AND d.adsrc ~ '^nextval'
+              
+             ) seq
+             WHERE
+                 CASE WHEN strpos(seq_name, '.') > 0 THEN
+                     substring(seq_name, 1,strpos(seq_name,'.')-1)
+                ELSE
+                    schema_name
+                END = schema_name
+             
+             GROUP BY seq_name HAVING count(*)=1
+             ");
         $cmds = array();
         while ($cs->fetch()) {
             $cmds[] = $cs->cmd;
         }
         foreach($cmds as $cmd) {
             $cs = DB_DataObject::factory('core_enum');
+            echo "$cmd\n";
             $cs->query($cmd);
         }
         $cs = DB_DataObject::factory('core_enum');
          $cs->query("
                SELECT  'SELECT SETVAL(' ||
                          quote_literal(quote_ident(nspname) || '.' || quote_ident(S.relname)) ||
-                        ', MAX(' || quote_ident(C.attname)|| ') )  FROM ' || nspname || '.' || quote_ident(T.relname)|| ';' as cmd 
+                        ', MAX(' || quote_ident(C.attname)|| ')::integer )  FROM ' || nspname || '.' || quote_ident(T.relname)|| ';' as cmd 
                 FROM pg_class AS S,
                     pg_depend AS D,
                     pg_class AS T,
@@ -738,7 +779,7 @@ GROUP BY seq_name HAVING count(*)=1
                     AND D.refobjid = C.attrelid
                     AND D.refobjsubid = C.attnum
                     AND NS.oid = T.relnamespace
-                ORDER BY S.relname;     
+                ORDER BY S.relname   
         ");
          $cmds = array();
         while ($cs->fetch()) {
@@ -746,6 +787,7 @@ GROUP BY seq_name HAVING count(*)=1
         }
         foreach($cmds as $cmd) {
             $cs = DB_DataObject::factory('core_enum');
+            echo "$cmd\n";
             $cs->query($cmd);
         }