From: Martín Marrese <marrese@gmail.com>
Date: Fri, 8 Aug 2003 18:37:47 +0000 (+0000)
Subject: Agrego el archivo code2xmi.php al repositorio
X-Git-Tag: svn_import~37
X-Git-Url: https://git.llucax.com/mecon/scripts.git/commitdiff_plain/1b100032fe170e738dc008278e580d7c2402bcbd

Agrego el archivo code2xmi.php al repositorio
---

diff --git a/code2xmi/code2xmi.php b/code2xmi/code2xmi.php
new file mode 100755
index 0000000..8e6fcc2
--- /dev/null
+++ b/code2xmi/code2xmi.php
@@ -0,0 +1,263 @@
+#! /usr/bin/php4 -qC
+<?php 
+/* vim: set binary expandtab tabstop=4 shiftwidth=4:
+-------------------------------------------------------------------------------
+Creado: jue jul 31 14:01:57 ART 2003
+Autor:  Martin Marrese <mmarre@mecon.gov.ar>
+-------------------------------------------------------------------------------
+$Id$
+-----------------------------------------------------------------------------*/
+//////////////////////
+// TAG's XML
+//////////////////////
+$comienzo = <<<EOT
+<?xml version="1.0" encoding="UTF-8"?>
+<XMI xmlns:UML="org.omg/standards/UML" verified="false" timestamp="" xmi.version="1.2" >
+  <XMI.content>
+    <umlobjects>
+EOT;
+$medio = <<<EOT2
+    </umlobjects>
+    <listview>
+      <listitem open="1" type="800" id="-1" label="Views" >
+        <listitem open="1" type="801" id="-1" label="Logical View" >
+EOT2;
+$fin = <<<EOT3
+        </listitem>
+        <listitem open="1" type="802" id="-1" label="Use Case View" />
+      </listitem>
+    </listview>                                                                     
+  </XMI.content>
+</XMI>
+EOT3;
+
+
+$umlclass       = '<UML:Class stereotype="##STEREOTYPE##" package="##PACKAGE##" xmi.id="##ID##" abstract="##ABSTRACT##" documentation="##DOCUMENTATION##" name="##NAME##" static="##STATIC##" scope="##SCOPE##" >';
+$umlclass_c     = '</UML:Class>';
+
+$umloperation   = '<UML:Operation stereotype="##STEREOTYPE##" package="##PACKAGE##" xmi.id="##ID##" type="##TYPE##" abstract="##ABSTRACT##" documentation="##DOCUMENTATION##" name="##NAME##" static="##STATIC##" scope="##SCOPE##">';
+$umloperation_c = '</UML:Operation>';
+
+$umlparameter   = '<UML:Parameter stereotype="##STEREOTYPE##" package="##PACKAGE##" xmi.id="##ID##" value="##VALUE##" type="##TYPE##" abstract="##ABSTRACT##" documentation="##DOCUMENTATION##" name="##NAME##" static="##STATIC##" scope="##SCOPE##" />';
+
+$umlattribute   = '<UML:Attribute stereotype="##STEREOTYPE##" package="##PACKAGE##" xmi.id="##ID##" value="##VALUE##" type="##TYPE##" abstract="##ABSTRACT##" documentation="##DOCUMENTATION##" name="##NAME##" static="##STATIC##" scope="##SCOPE##" />';
+
+$umllistitem   = '<listitem open="0" type="##TYPE##" id="##ID##" label="##LABEL##" >';
+$umllistitem_c = '</listitem>';
+
+//////////////////////
+
+
+$ID      = 0;
+$IDPARAM = 0;
+$ARRAY   = array();
+
+for ($j = 1; $j < count($argv); $j++) {
+    $file = $argv[$j];
+    // Si es un directorio, agrego cada archivo legible .php al argv.
+    if (is_dir($file)) {
+        $dh = opendir($file);
+        while (($f = readdir($dh)) !== false) {
+            if (is_readable("$file/$f") and substr($f, -4) == '.php') {
+                $argv[] = "$file/$f";
+            }
+        }
+        closedir($dh);
+        continue;
+    // Si no, si se puede leer el archivo y es .php, lo procesa.
+    } elseif (is_readable($file) and substr($file, -4) == '.php') {
+        $cont = file ($file);
+        
+        $DOCUMENTANDO = false;
+        $opciones = array ();
+        $cont_param = 0;
+        foreach ($cont as $linea) {
+            $linea = trim ($linea);
+            $tmp = preg_split ('/[^\w_\/\*\@\$\']+/', $linea);
+            //Agrego la documentacion
+            if ($tmp['0'] == '/**') { //Comienza la documentacion
+                $DOCUMENTANDO = true;
+            }
+            if ($tmp['0'] == '*/') { //Termina la documentacion
+                $DOCUMENTANDO = false;
+            }
+
+            if ($DOCUMENTANDO) {
+                if ($tmp['0'] = '*') {
+                    array_shift($tmp);
+                }
+                switch ($tmp['0']) {
+                    case '@access':
+                        switch ($tmp['1']) {
+                            case 'private'  : $opciones['access'] = 201;
+                                              break;
+                            case 'protected': $opciones['access'] = 202;
+                                              break;
+                            default         : $opciones['access'] = 200;
+                        }
+                        break;
+                    case '@package' : $opciones['package']  = $tmp['1'];
+                                      break;
+                    case '@abstract': $opciones['abstract'] = 1;
+                                      break;
+                    case '@static'  : $opciones['static']   = 1;
+                                      break;
+                    case '@var'     : $opciones['type']     = $tmp['1'];
+                                      break;
+                    case '@return'  : $opciones['type']     = $tmp['1'];
+                                      break;
+                    case '@param'   : $opciones['param'][$cont_param]['type'] = $tmp['1'];
+                                      $opciones['param'][$cont_param]['documentacion'] = implode (' ', array_slice($tmp,3));
+                                      $cont_param++;
+                                      break;
+                    default:
+                        if (array_key_exists('0',$tmp)) {
+                            @$opciones['documentacion'].= implode (' ',$tmp)."\n";
+                        }
+                }
+            }
+
+            //CLASE
+            if (!$DOCUMENTANDO && $tmp['0'] == 'class') {
+                $ID++;
+                $IDCLASE = $ID;
+
+                $ARRAY[$ID]['id']            = $ID;
+                $ARRAY[$ID]['name']          = $tmp['1'];
+                $ARRAY[$ID]['stereotype']    = (@$opciones['stereotype'])    ? $opciones['stereotype']    : '';
+                $ARRAY[$ID]['package']       = (@$opciones['package'])       ? $opciones['package']       : '';
+                $ARRAY[$ID]['abstract']      = (@$opciones['abstract'])      ? $opciones['abstract']      : 0;
+                $ARRAY[$ID]['documentation'] = (@$opciones['documentacion']) ? $opciones['documentacion'] : '';
+                $ARRAY[$ID]['static']        = (@$opciones['static'])        ? $opciones['static']        : 0;
+                $ARRAY[$ID]['scope']         = (@$opciones['access'])        ? $opciones['access']        : 200;
+                $ARRAY[$ID]['operations']    = array();
+                $ARRAY[$ID]['attributes']    = array();
+                $opciones = array();
+            }
+            //FUNCION
+            if (!$DOCUMENTANDO && $tmp['0'] == 'function') {
+                $ID++;
+                $ARRAY[$IDCLASE]['operations'][$ID]['id']            = $ID;
+                $ARRAY[$IDCLASE]['operations'][$ID]['name']          = $tmp['1'];
+                $ARRAY[$IDCLASE]['operations'][$ID]['stereotype']    = (@$opciones['stereotype'])    ? $opciones['stereotype']    : '';  
+                $ARRAY[$IDCLASE]['operations'][$ID]['package']       = (@$opciones['package'])       ? $opciones['package']       : '';  
+                $ARRAY[$IDCLASE]['operations'][$ID]['abstract']      = (@$opciones['abstract'])      ? $opciones['abstract']      : 0;   
+                $ARRAY[$IDCLASE]['operations'][$ID]['documentation'] = (@$opciones['documentacion']) ? $opciones['documentacion'] : '';  
+                $ARRAY[$IDCLASE]['operations'][$ID]['static']        = (@$opciones['static'])        ? $opciones['static']        : 0;   
+                $ARRAY[$IDCLASE]['operations'][$ID]['scope']         = (@$opciones['access'])        ? $opciones['access']        : 200;
+                $ARRAY[$IDCLASE]['operations'][$ID]['type']          = (@$opciones['type'])          ? $opciones['type']          : '';
+                $ARRAY[$IDCLASE]['operations'][$ID]['param']         = array();
+
+                //PARAMETROS
+                array_shift($tmp); //SACO EL FUNCTION
+                array_shift($tmp); //SACO EL NOMBRE DE LA FUNCION
+                for ($i = 0; $i <= count($tmp); $i++) {
+                    if ($tmp[$i]{0} == '$') { //AL FINAL DEJE EL $ PARA DIFERENCIAR LOS PARAMETROS DE LOS VALORES INICIALES QUE TOMAN
+                        $tmp[$i] = substr($tmp[$i], 1); //SACO EL $
+                        $OPANT = $i;
+                        $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['id']            = $i;
+                        $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['name']          = $tmp[$i];
+                        $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['stereotype']    = (@$opciones['param'][$i]['stereotype'])    ? $opciones['param'][$i]['stereotype']    : '';
+                        $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['package']       = (@$opciones['param'][$i]['package'])       ? $opciones['param'][$i]['package']       : '';
+                        $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['abstract']      = (@$opciones['param'][$i]['abstract'])      ? $opciones['param'][$i]['abstract']      : 0;
+                        $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['documentation'] = (@$opciones['param'][$i]['documentacion']) ? $opciones['param'][$i]['documentacion'] : '';
+                        $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['static']        = (@$opciones['param'][$i]['static'])        ? $opciones['param'][$i]['static']        : 0;
+                        $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['scope']         = (@$opciones['param'][$i]['access'])        ? $opciones['param'][$i]['access']        : '';
+                        $ARRAY[$IDCLASE]['operations'][$ID]['param'][$i]['type']          = (@$opciones['param'][$i]['type'])          ? $opciones['param'][$i]['type']          : '';
+                    }
+                    elseif ($tmp[$i] != '//'  && $tmp[$i] != 'X2C' && $tmp[$i] != '') {
+                        $ARRAY[$IDCLASE]['operations'][$ID]['param'][$OPANT]['value']      .= $tmp[$i];
+                    }
+                }
+                $opciones = array();
+                $cont_param = 0;
+            }
+            //ATRIBUTOS
+            if (!$DOCUMENTANDO && $tmp['0'] == 'var') {
+                $ID++;
+                $tmp['1'] = substr($tmp['1'], 1); //SACO EL $
+                if ($tmp['1']{0} == '_') {
+                    $tmp['1'] = substr($tmp['1'],1); //SACO EL _
+                    if (!(@$opciones['access'])) {
+                        $opciones['access'] = 201;
+                    }
+                }
+                //Agrego si tiene valor inicial
+                if (array_key_exists('2',$tmp)) {
+                    $opciones['value'] = $tmp['2'];
+                }
+                
+                $ARRAY[$IDCLASE]['attributes'][$ID]['id']            = $ID;
+                $ARRAY[$IDCLASE]['attributes'][$ID]['name']          = $tmp['1'];
+                $ARRAY[$IDCLASE]['attributes'][$ID]['stereotype']    = (@$opciones['stereotype'])    ? $opciones['stereotype']    : '';  
+                $ARRAY[$IDCLASE]['attributes'][$ID]['package']       = (@$opciones['package'])       ? $opciones['package']       : '';  
+                $ARRAY[$IDCLASE]['attributes'][$ID]['abstract']      = (@$opciones['abstract'])      ? $opciones['abstract']      : 0;   
+                $ARRAY[$IDCLASE]['attributes'][$ID]['documentation'] = (@$opciones['documentacion']) ? $opciones['documentacion'] : '';  
+                $ARRAY[$IDCLASE]['attributes'][$ID]['static']        = (@$opciones['static'])        ? $opciones['static']        : 0;   
+                $ARRAY[$IDCLASE]['attributes'][$ID]['scope']         = (@$opciones['access'])        ? $opciones['access']        : 200;  
+                $ARRAY[$IDCLASE]['attributes'][$ID]['type']          = (@$opciones['type'])          ? $opciones['type']          : '';
+                $ARRAY[$IDCLASE]['attributes'][$ID]['value']         = (@$opciones['value'])         ? $opciones['value']         : '';
+                $opciones = array(operations);
+            }
+        }
+    } 
+}
+
+$m = fopen ('./umlOut.xmi', 'w');
+fwrite($m, $comienzo);
+$LISTITEM = '';
+//CLASES
+foreach ($ARRAY as $ar) {
+    //PREPARO LA CLASE {{{
+    $tmp2 = $umlclass;
+    fwrite($m, preg_replace (array ('/##STEREOTYPE##/','/##PACKAGE##/','/##ID##/','/##ABSTRACT##/','/##DOCUMENTATION##/','/##NAME##/',
+                                    '/##STATIC##/','/##SCOPE##/'), 
+                             array ($ar['stereotype'],$ar['package'],$ar['id'],$ar['abstract'],$ar['documentation'],$ar['name'],
+                                    $ar['static'],$ar['scope']), 
+                             $tmp2)."\n");
+    //PREPARO LOS LISTITEM {{{
+    $tmp2 = $umllistitem;
+    $LISTITEM.= preg_replace (array('/##TYPE##/','/##LABEL##/','/##ID##/'),array(813, $ar['name'], $ar['id']),$tmp2)."\n";  
+
+    //OPERACIONES
+    foreach ($ar['operations'] as $op) {
+        $tmp2 = $umloperation;
+        fwrite($m, preg_replace (array('/##STEREOTYPE##/','/##PACKAGE##/','/##ID##/','/##TYPE##/','/##ABSTRACT##/','/##DOCUMENTATION##/',
+                                       '/##NAME##/','/##STATIC##/','/##SCOPE##/'), 
+                                 array($op['stereotype'],$op['package'],$op['id'],$op['type'],$op['abstract'],$op['documentation'],
+                                       $op['name'],$op['static'],$op['scope']) , 
+                                 $tmp2)."\n");
+        //PARAMETROS NO TIENE LISTITEM
+        foreach ($op['param'] as $pa) {
+            $tmp2 = $umlparameter;
+            fwrite ($m, preg_replace(array('/##STEREOTYPE##/','/##PACKAGE##/','/##ID##/','/##TYPE##/','/##ABSTRACT##/','/##DOCUMENTATION##/',
+                                           '/##NAME##/','/##STATIC##/','/##SCOPE##/','/##VALUE##/'),
+                                     array($pa['stereotype'],$pa['package'],$pa['id'],$pa['type'],$pa['abstract'],$pa['documentation'],
+                                           $pa['name'],$pa['static'],$pa['scope'],$pa['value']),
+                                     $tmp2)."\n");
+        } 
+        fwrite($m,$umloperation_c."\n");
+        //PREPARO LOS LISTITEM {{{
+        $tmp2 = $umllistitem;
+        $LISTITEM.= preg_replace (array('/##TYPE##/','/##LABEL##/','/##ID##/'),array(815, $op['name'], $op['id']),$tmp2)."\n";  
+        $LISTITEM.=$umllistitem_c."\n";
+    }
+    //ATRIBUTOS
+    foreach ($ar['attributes'] as $op) {
+        $tmp2 = $umlattribute;
+        fwrite($m, preg_replace(array('/##STEREOTYPE##/','/##PACKAGE##/','/##ID##/','/##TYPE##/','/##ABSTRACT##/','/##DOCUMENTATION##/',
+                                      '/##NAME##/','/##STATIC##/','/##SCOPE##/','/##VALUE##/'),
+                                array($op['stereotype'],$op['package'],$op['id'],$op['type'],$op['abstract'],$op['documentation'],$op['name'],
+                                      $op['static'],$op['scope'],$op['value']),
+                                $tmp2)."\n");
+        //PREPARO LOS LISTITEM {{{
+        $tmp2 = $umllistitem;
+        $LISTITEM.= preg_replace (array('/##TYPE##/','/##LABEL##/','/##ID##/'),array(814, $op['name'], $op['id']),$tmp2)."\n";  
+        $LISTITEM.=$umllistitem_c."\n";
+    }
+    fwrite($m,$umlclass_c);
+    $LISTITEM.=$umllistitem_c."\n";
+    //}}}
+}
+fwrite($m,  $medio. $LISTITEM."\n".$fin);
+?>