code2xmi/code2xmi.php

   1 #! /usr/bin/php4 -qC
   2 <?php
   3 /* vim: set binary expandtab tabstop=4 shiftwidth=4:
   4 -------------------------------------------------------------------------------
   5 Creado: jue jul 31 14:01:57 ART 2003
   6 Autor:  Martin Marrese <mmarre@mecon.gov.ar>
   7 -------------------------------------------------------------------------------
   8 $Id$
   9 -----------------------------------------------------------------------------*/
  10 //////////////////////
  11 // TAG's XML
  12 //////////////////////
  13 $comienzo = <<<EOT
  14 <?xml version="1.0" encoding="UTF-8"?>
  15 <XMI xmlns:UML="org.omg/standards/UML" verified="false" timestamp="" xmi.version="1.2" >
  16   <XMI.content>
  17     <umlobjects>
  18 EOT;
  19 $medio = <<<EOT2
  20     </umlobjects>
  21     <listview>
  22       <listitem open="1" type="800" id="-1" label="Views" >
  23         <listitem open="1" type="801" id="-1" label="Logical View" >
  24 EOT2;
  25 $fin = <<<EOT3
  26         </listitem>
  27         <listitem open="1" type="802" id="-1" label="Use Case View" />
  28       </listitem>
  29     </listview>
  30   </XMI.content>
  31 </XMI>
  32 EOT3;
  33
  34
  35 $umlclass       = '<UML:Class stereotype="##STEREOTYPE##" package="##PACKAGE##" xmi.id="##ID##" abstract="##ABSTRACT##" documentation="##DOCUMENTATION##" name="##NAME##" static="##STATIC##" scope="##SCOPE##" >';
  36 $umlclass_c     = '</UML:Class>';
  37
  38 $umloperation   = '<UML:Operation stereotype="##STEREOTYPE##" package="##PACKAGE##" xmi.id="##ID##" type="##TYPE##" abstract="##ABSTRACT##" documentation="##DOCUMENTATION##" name="##NAME##" static="##STATIC##" scope="##SCOPE##">';
  39 $umloperation_c = '</UML:Operation>';
  40
  41 $umlparameter   = '<UML:Parameter stereotype="##STEREOTYPE##" package="##PACKAGE##" xmi.id="##ID##" value="##VALUE##" type="##TYPE##" abstract="##ABSTRACT##" documentation="##DOCUMENTATION##" name="##NAME##" static="##STATIC##" scope="##SCOPE##" />';
  42
  43 $umlattribute   = '<UML:Attribute stereotype="##STEREOTYPE##" package="##PACKAGE##" xmi.id="##ID##" value="##VALUE##" type="##TYPE##" abstract="##ABSTRACT##" documentation="##DOCUMENTATION##" name="##NAME##" static="##STATIC##" scope="##SCOPE##" />';
  44
  45 $umllistitem   = '<listitem open="0" type="##TYPE##" id="##ID##" label="##LABEL##" >';
  46 $umllistitem_c = '</listitem>';
  47
  48 //////////////////////
  49
  50
  51 $ID      = 0;
  52 $IDPARAM = 0;
  53 $ARRAY   = array();
  54
  55 for ($j = 1; $j < count($argv); $j++) {
  56     $file = $argv[$j];
  57     // Si es un directorio, agrego cada archivo legible .php al argv.
  58     if (is_dir($file)) {
  59         $dh = opendir($file);
  60         while (($f = readdir($dh)) !== false) {
  61             if (is_readable("$file/$f") and substr($f, -4) == '.php') {
  62                 $argv[] = "$file/$f";
  63             }
  64         }
  65         closedir($dh);
  66         continue;
  67     // Si no, si se puede leer el archivo y es .php, lo procesa.
  68     } elseif (is_readable($file) and substr($file, -4) == '.php') {
  69         $cont = file ($file);
  70
  71         $DOCUMENTANDO = false;
  72         $opciones = array ();
  73         $cont_param = 0;
  74         foreach ($cont as $linea) {
  75             $linea = trim ($linea);
  76             $tmp = preg_split ('/[^\w_\/\*\@\$\']+/', $linea);
  77             //Agrego la documentacion
  78             if ($tmp['0'] == '/**') { //Comienza la documentacion
  79                 $DOCUMENTANDO = true;
  80             }
  81             if ($tmp['0'] == '*/') { //Termina la documentacion
  82                 $DOCUMENTANDO = false;
  83             }
  84
  85             if ($DOCUMENTANDO) {
  86                 if ($tmp['0'] = '*') {
  87                     array_shift($tmp);
  88                 }
  89                 switch ($tmp['0']) {
  90                     case '@access':
  91                         switch ($tmp['1']) {
  92                             case 'private'  : $opciones['access'] = 201;
  93                                               break;
  94                             case 'protected': $opciones['access'] = 202;
  95                                               break;
  96                             default         : $opciones['access'] = 200;
  97                         }
  98                         break;
  99                     case '@package' : $opciones['package']  = $tmp['1'];
 100                                       break;
 101                     case '@abstract': $opciones['abstract'] = 1;
 102                                       break;
 103                     case '@static'  : $opciones['static']   = 1;
 104                                       break;
 105                     case '@var'     : $opciones['type']     = $tmp['1'];
 106                                       break;
 107                     case '@return'  : $opciones['type']     = $tmp['1'];
 108                                       break;
 109                     case '@param'   : $opciones['param'][$cont_param]['type'] = $tmp['1'];
 110                                       $opciones['param'][$cont_param]['documentacion'] = implode (' ', array_slice($tmp,3));
 111                                       $cont_param++;
 112                                       break;
 113                     default:
 114                         if (array_key_exists('0',$tmp)) {
 115                             @$opciones['documentacion'].= implode (' ',$tmp)."\n";
 116                         }
 117                 }
 118             }
 119
 120             //CLASE
 121             if (!$DOCUMENTANDO && $tmp['0'] == 'class') {
 122                 $ID++;
 123                 $IDCLASE = $ID;
 124
 125                 $ARRAY[$ID]['id']            = $ID;
 126                 $ARRAY[$ID]['name']          = $tmp['1'];
 127                 $ARRAY[$ID]['stereotype']    = (@$opciones['stereotype'])    ? $opciones['stereotype']    : '';
 128                 $ARRAY[$ID]['package']       = (@$opciones['package'])       ? $opciones['package']       : '';
 129                 $ARRAY[$ID]['abstract']      = (@$opciones['abstract'])      ? $opciones['abstract']      : 0;
 130                 $ARRAY[$ID]['documentation'] = (@$opciones['documentacion']) ? $opciones['documentacion'] : '';
 131                 $ARRAY[$ID]['static']        = (@$opciones['static'])        ? $opciones['static']        : 0;
 132                 $ARRAY[$ID]['scope']         = (@$opciones['access'])        ? $opciones['access']        : 200;
 133                 $ARRAY[$ID]['operations']    = array();
 134                 $ARRAY[$ID]['attributes']    = array();
 135                 $opciones = array();
 136             }
 137             //FUNCION
 138             if (!$DOCUMENTANDO && $tmp['0'] == 'function') {
 139                 $ID++;
 140                 $ARRAY[$IDCLASE]['operations'][$ID]['id']            = $ID;
 141                 $ARRAY[$IDCLASE]['operations'][$ID]['name']          = $tmp['1'];
 142                 $ARRAY[$IDCLASE]['operations'][$ID]['stereotype']    = (@$opciones['stereotype'])    ? $opciones['stereotype']    : '';
 143                 $ARRAY[$IDCLASE]['operations'][$ID]['package']       = (@$opciones['package'])       ? $opciones['package']       : '';
 144                 $ARRAY[$IDCLASE]['operations'][$ID]['abstract']      = (@$opciones['abstract'])      ? $opciones['abstract']      : 0;
 145                 $ARRAY[$IDCLASE]['operations'][$ID]['documentation'] = (@$opciones['documentacion']) ? $opciones['documentacion'] : '';
 146                 $ARRAY[$IDCLASE]['operations'][$ID]['static']        = (@$opciones['static'])        ? $opciones['static']        : 0;
 147                 $ARRAY[$IDCLASE]['operations'][$ID]['scope']         = (@$opciones['access'])        ? $opciones['access']        : 200;
 148                 $ARRAY[$IDCLASE]['operations'][$ID]['type']          = (@$opciones['type'])          ? $opciones['type']          : '';
 149                 $ARRAY[$IDCLASE]['operations'][$ID]['param']         = array();
 150
 151                 //PARAMETROS
 152                 array_shift($tmp); //SACO EL FUNCTION
 153                 array_shift($tmp); //SACO EL NOMBRE DE LA FUNCION
 154                 for ($i = 0; $i <= count($tmp); $i++) {
 155                     if ($tmp[$i]{0} == '$') { //AL FINAL DEJE EL $ PARA DIFERENCIAR LOS PARAMETROS DE LOS VALORES INICIALES QUE TOMAN
 156                         $tmp[$i] = substr($tmp[$i], 1); //SACO EL $
 157                         $OPANT = $i;
 158                         $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['id']            = $i;
 159                         $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['name']          = $tmp[$i];
 160                         $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['stereotype']    = (@$opciones['param'][$i]['stereotype'])    ? $opciones['param'][$i]['stereotype']    : '';
 161                         $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['package']       = (@$opciones['param'][$i]['package'])       ? $opciones['param'][$i]['package']       : '';
 162                         $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['abstract']      = (@$opciones['param'][$i]['abstract'])      ? $opciones['param'][$i]['abstract']      : 0;
 163                         $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['documentation'] = (@$opciones['param'][$i]['documentacion']) ? $opciones['param'][$i]['documentacion'] : '';
 164                         $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['static']        = (@$opciones['param'][$i]['static'])        ? $opciones['param'][$i]['static']        : 0;
 165                         $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['scope']         = (@$opciones['param'][$i]['access'])        ? $opciones['param'][$i]['access']        : '';
 166                         $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['type']          = (@$opciones['param'][$i]['type'])          ? $opciones['param'][$i]['type']          : '';
 167                     }
 168                     elseif ($tmp[$i] != '//'  && $tmp[$i] != 'X2C' && $tmp[$i] != '') {
 169                         $ARRAY[$IDCLASE]['operations'][$ID]['param'][$OPANT]['value']      .= $tmp[$i];
 170                     }
 171                 }
 172                 $opciones = array();
 173                 $cont_param = 0;
 174             }
 175             //ATRIBUTOS
 176             if (!$DOCUMENTANDO && $tmp['0'] == 'var') {
 177                 $ID++;
 178                 $tmp['1'] = substr($tmp['1'], 1); //SACO EL $
 179                 if ($tmp['1']{0} == '_') {
 180                     $tmp['1'] = substr($tmp['1'],1); //SACO EL _
 181                     if (!(@$opciones['access'])) {
 182                         $opciones['access'] = 201;
 183                     }
 184                 }
 185                 //Agrego si tiene valor inicial
 186                 if (array_key_exists('2',$tmp)) {
 187                     $opciones['value'] = $tmp['2'];
 188                 }
 189
 190                 $ARRAY[$IDCLASE]['attributes'][$ID]['id']            = $ID;
 191                 $ARRAY[$IDCLASE]['attributes'][$ID]['name']          = $tmp['1'];
 192                 $ARRAY[$IDCLASE]['attributes'][$ID]['stereotype']    = (@$opciones['stereotype'])    ? $opciones['stereotype']    : '';
 193                 $ARRAY[$IDCLASE]['attributes'][$ID]['package']       = (@$opciones['package'])       ? $opciones['package']       : '';
 194                 $ARRAY[$IDCLASE]['attributes'][$ID]['abstract']      = (@$opciones['abstract'])      ? $opciones['abstract']      : 0;
 195                 $ARRAY[$IDCLASE]['attributes'][$ID]['documentation'] = (@$opciones['documentacion']) ? $opciones['documentacion'] : '';
 196                 $ARRAY[$IDCLASE]['attributes'][$ID]['static']        = (@$opciones['static'])        ? $opciones['static']        : 0;
 197                 $ARRAY[$IDCLASE]['attributes'][$ID]['scope']         = (@$opciones['access'])        ? $opciones['access']        : 200;
 198                 $ARRAY[$IDCLASE]['attributes'][$ID]['type']          = (@$opciones['type'])          ? $opciones['type']          : '';
 199                 $ARRAY[$IDCLASE]['attributes'][$ID]['value']         = (@$opciones['value'])         ? $opciones['value']         : '';
 200                 $opciones = array(operations);
 201             }
 202         }
 203     }
 204 }
 205
 206 $m = fopen ('./umlOut.xmi', 'w');
 207 fwrite($m, $comienzo);
 208 $LISTITEM = '';
 209 //CLASES
 210 foreach ($ARRAY as $ar) {
 211     //PREPARO LA CLASE {{{
 212     $tmp2 = $umlclass;
 213     fwrite($m, preg_replace (array ('/##STEREOTYPE##/','/##PACKAGE##/','/##ID##/','/##ABSTRACT##/','/##DOCUMENTATION##/','/##NAME##/',
 214                                     '/##STATIC##/','/##SCOPE##/'),
 215                              array ($ar['stereotype'],$ar['package'],$ar['id'],$ar['abstract'],$ar['documentation'],$ar['name'],
 216                                     $ar['static'],$ar['scope']),
 217                              $tmp2)."\n");
 218     //PREPARO LOS LISTITEM {{{
 219     $tmp2 = $umllistitem;
 220     $LISTITEM.= preg_replace (array('/##TYPE##/','/##LABEL##/','/##ID##/'),array(813, $ar['name'], $ar['id']),$tmp2)."\n";
 221
 222     //OPERACIONES
 223     foreach ($ar['operations'] as $op) {
 224         $tmp2 = $umloperation;
 225         fwrite($m, preg_replace (array('/##STEREOTYPE##/','/##PACKAGE##/','/##ID##/','/##TYPE##/','/##ABSTRACT##/','/##DOCUMENTATION##/',
 226                                        '/##NAME##/','/##STATIC##/','/##SCOPE##/'),
 227                                  array($op['stereotype'],$op['package'],$op['id'],$op['type'],$op['abstract'],$op['documentation'],
 228                                        $op['name'],$op['static'],$op['scope']) ,
 229                                  $tmp2)."\n");
 230         //PARAMETROS NO TIENE LISTITEM
 231         foreach ($op['param'] as $pa) {
 232             $tmp2 = $umlparameter;
 233             fwrite ($m, preg_replace(array('/##STEREOTYPE##/','/##PACKAGE##/','/##ID##/','/##TYPE##/','/##ABSTRACT##/','/##DOCUMENTATION##/',
 234                                            '/##NAME##/','/##STATIC##/','/##SCOPE##/','/##VALUE##/'),
 235                                      array($pa['stereotype'],$pa['package'],$pa['id'],$pa['type'],$pa['abstract'],$pa['documentation'],
 236                                            $pa['name'],$pa['static'],$pa['scope'],$pa['value']),
 237                                      $tmp2)."\n");
 238         }
 239         fwrite($m,$umloperation_c."\n");
 240         //PREPARO LOS LISTITEM {{{
 241         $tmp2 = $umllistitem;
 242         $LISTITEM.= preg_replace (array('/##TYPE##/','/##LABEL##/','/##ID##/'),array(815, $op['name'], $op['id']),$tmp2)."\n";
 243         $LISTITEM.=$umllistitem_c."\n";
 244     }
 245     //ATRIBUTOS
 246     foreach ($ar['attributes'] as $op) {
 247         $tmp2 = $umlattribute;
 248         fwrite($m, preg_replace(array('/##STEREOTYPE##/','/##PACKAGE##/','/##ID##/','/##TYPE##/','/##ABSTRACT##/','/##DOCUMENTATION##/',
 249                                       '/##NAME##/','/##STATIC##/','/##SCOPE##/','/##VALUE##/'),
 250                                 array($op['stereotype'],$op['package'],$op['id'],$op['type'],$op['abstract'],$op['documentation'],$op['name'],
 251                                       $op['static'],$op['scope'],$op['value']),
 252                                 $tmp2)."\n");
 253         //PREPARO LOS LISTITEM {{{
 254         $tmp2 = $umllistitem;
 255         $LISTITEM.= preg_replace (array('/##TYPE##/','/##LABEL##/','/##ID##/'),array(814, $op['name'], $op['id']),$tmp2)."\n";
 256         $LISTITEM.=$umllistitem_c."\n";
 257     }
 258     fwrite($m,$umlclass_c);
 259     $LISTITEM.=$umllistitem_c."\n";
 260     //}}}
 261 }
 262 fwrite($m,  $medio. $LISTITEM."\n".$fin);
 263 ?>