Changeset 3901 for trunk/tools/database


Ignore:
Timestamp:
Jul 29, 2000, 11:20:11 PM (25 years ago)
Author:
bird
Message:

More coding done...

Location:
trunk/tools/database/www
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/tools/database/www/Odin32DB.phtml

    r3883 r3901  
    3030    if ($dllrefcode != "")
    3131        $iRefcode = (int)$dllrefcode;
     32    $fFunctions = (isset($fFunctions)   && $fFunctions  != '0');
     33    $fFiles     = (isset($fFiles)       && $fFiles      != '0');
     34    $fAPIGroups = (isset($fAPIGroups)   && $fAPIGroups  != '0');
     35    $fAuthors   = (isset($fAuthors)     && $fAuthors    != '0');
     36    $fSortByState=(isset($fSortByState) && $fSortByState!= '0');
    3237}
    3338else if (isset($filerefcode))
    … …  
    3742    if ($filerefcode != "")
    3843        $iRefcode = (int)$filerefcode;
     44    $fFunctions = (isset($fFunctions)   && $fFunctions  != '0');
     45    $fAPIGroups = (isset($fAPIGroups)   && $fAPIGroups  != '0');
     46    $fAuthors   = (isset($fAuthors)     && $fAuthors    != '0');
     47    $fSortByState=(isset($fSortByState) && $fSortByState!= '0');
    3948}
    4049else if (isset($functionrefcode))
    … …  
    96105require "06-ColumnTwoHeader2.php3";
    97106
     107
     108/*
     109 * Init the contents array.
     110 */
     111$aContent = array();
     112
     113
    98114TekstBeg();
    99115if (!$fNoData)
    … …  
    103119        case "dll":
    104120            {
    105             echo $sCategoryName;
     121            Odin32DBDllInfoAll($aContent, $db, $iRefcode, $fFunctions, $fFiles, $fAPIGroups, $fAuthors, $fSortByState);
    106122            break;
    107123            }
    108124
    109 
    110125        case "file":
    111126            {
    112             echo $sCategoryName;
     127            Odin32DBFileInfoAll($aContent, $db, $iRefcode, $fFunctions, $fAPIGroups, $fAuthors, $fSortByState);
    113128            break;
    114129            }
    … …  
    116131        case "function":
    117132            {
    118             $sql =  sprintf("
    119                              SELECT
    120                                     f.name          AS name,
    121                                     f.intname       AS intname,
    122                                     f.ordinal       AS ordinal,
    123                                     f.return        AS return,
    124                                     f.type          AS type,
    125                                     f.description   AS description,
    126                                     f.remark        AS remark,
    127                                     f.returndesc    AS returndesc,
    128                                     f.sketch        AS sketch,
    129                                     f.equiv         AS equiv,
    130                                     f.time          AS time,
    131                                     g.name          AS apigroupname,
    132                                     g.refcode       AS apigrouprefcode,
    133                                     a.name          AS aliasname,
    134                                     a.refcode       AS aliasrefcode,
    135                                     ad.name         AS aliasdllname,
    136                                     ad.refcode      AS aliasdllrefcode,
    137                                     d.name          AS dllname,
    138                                     d.refcode       AS dllrefcode,
    139                                     i.name          AS filename,
    140                                     i.refcode       AS filerefcode,
    141                                     s.name          AS state
    142                                 FROM
    143                                     function f
    144                                     LEFT OUTER JOIN function a ON f.aliasfn  = a.refcode
    145                                     LEFT OUTER JOIN dll ad     ON a.dll      = ad.refcode
    146                                     LEFT OUTER JOIN apigroup g ON f.apigroup = g.refcode
    147                                     LEFT       JOIN dll d      ON f.dll      = d.refcode
    148                                     LEFT       JOIN state s    ON f.state    = s.refcode
    149                                     LEFT OUTER JOIN file i     ON f.file     = i.refcode
    150                                 WHERE
    151                                     f.refcode = %d",
    152                             $iRefcode);
    153                 $result = mysql_query($sql, $db);
    154                 if (@mysql_num_rows($result) > 0 &&
    155                     ($array = mysql_fetch_array($result))
    156                     )
    157                 {
    158                     Naslov("General", "General");
    159                     echo "\n<table width=100% border=3 cellpadding=0>\n";
    160                     Odin32DBInfoRow1("Name", $array, "name","","","","");
    161                     if (isset($array["intname"]))
    162                         Odin32DBInfoRow1("Internal Name", $array, "intname","","","","");
    163                     else
    164                         Odin32DBInfoRow1("Internal Name", $array, "name","","","","");
    165                     Odin32DBInfoRow1("Dll", $array, "dllname", "dllrefcode", "dllrefcode","","");
    166                     Odin32DBInfoRow1("Ordinal", $array, "ordinal","","","not available","");
    167                     if (isset($array["aliasrefcode"]))
    168                         Odin32DBInfoRow2("Forwards", $array, "aliasdllname", "aliasdllrefcode", "dllrefcode","",".",
    169                                                              "aliasname", "aliasrefcode", "functionrefcode");
    170                     if (isset($array["apigroup"]))
    171                         Odin32DBInfoRow1("API Group", $array, "apigroupname", "apigrouprefcode", "apigrouprefcode","","");
    172                     Odin32DBInfoRow1("File", $array, "filename", "filerefcode", "filerefcode","not available","");
    173 
    174                     echo "\n</table>\n";
    175 
    176 
    177                     Naslov("Declaration", "declaration");
    178                     echo "<pre>\n";
    179                     if (isset($array["return"]))
    180                         echo $array["return"]." ";
    181                     echo $array["name"]."(";
    182                     $sql = sprintf("
    183                                     SELECT
    184                                             name                AS name,
    185                                             type                AS type,
    186                                             description         AS description
    187                                         FROM
    188                                             parameter
    189                                         WHERE
    190                                             function = %d
    191                                         ORDER BY sequencenbr",
    192                                    $iRefcode);
    193                     $result2 = mysql_query($sql, $db);
    194                     if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
    195                     {
    196                         while ($param = mysql_fetch_array($result2))
    197                         {
    198                             if (--$cParams == 0)
    199                                 printf("\n        %-20s %s", $param["type"], $param["name"]);
    200                             else
    201                                 printf("\n        %-20s %s,", $param["type"], $param["name"]);
    202                         }
    203                     }
    204                     else
    205                         echo "void";
    206 
    207                     echo ");\n";
    208                     echo "</pre>\n";
    209 
    210                     Naslov("Documentation", "docs");
    211                     Odin32DBDocRow1("Description", $array, "description");
    212                     PodNaslov("Parameters");
    213                     if ($result2 &&
    214                         mysql_num_rows($result2) > 0 &&
    215                         mysql_data_seek($result2, 0)
    216                         )
    217                     {
    218                         while ($param = mysql_fetch_array($result2))
    219                         {
    220                             /*echo "  <tr><td width=100%>".$param["name"]."</td></tr>\n";*/
    221                             echo "  <br><b>".$param["name"].":</b>\n";
    222                             if (isset($param["description"]))
    223                             {
    224                                 echo "\n  <table width=100% border=0 cellpadding=0>\n";
    225                                 echo "  <tr><td width=10%>&nbsp;</td>\n";
    226                                 $sDescription = str_replace("<BR>", "", str_replace("<BR><BR>\n","<br>",$param["description"]));
    227                                 echo "  <td width=90%><font size=-1>".$sDescription."</font></td></tr>\n";
    228                                 echo "\n</table>\n";
    229                             }
    230                             /*else
    231                                  echo "  </tr>";*/
    232                         }
    233                     }
    234                     else
    235                         echo "void";
    236 
    237 
    238                     Odin32DBDocRow1("Returns", $array, "returndesc");
    239                     Odin32DBDocRow1("Sketch/Algorithm", $array, "sketch");
    240                     Odin32DBDocRow1("Remark", $array, "remark");
    241 
    242                 }
    243                 else
    244                 {
    245                     echo "<p> No data!</p>";
    246                     Odin32DBDumpSql($sql);
    247                 }
    248                 if (@mysql_num_rows($result) > 0 &&
    249                     ($aName = @mysql_fetch_row($result))
    250                     )
     133            Odin32DBFunctionInfoAll($aContent, $db, $iRefcode);
    251134            break;
    252135            }
    … …  
    275158require "07-ColumnTwoFooter.php3";
    276159require "08-News.php3";
    277 // require "09-ContentsTitle.php3";
     160require "09-ContentsTitle.php3";
    278161
    279 TocBeg();
    280 
    281 TocEnd();
     162DBWriteContents($aContent);
    282163
    283164require "10-EndOfContent.php3";

  • trunk/tools/database/www/Odin32DBHelpers.php3

    r3883 r3901  
    7676    echo "
    7777        <table width=100% border=0 cellspacing=0 cellpadding=0>
     78        ";
     79    if ($sDllName != '')
     80        echo "
    7881        <tr>
    7982            <td width=90%>
    … …  
    8386            </td>
    8487            <td width=10%></td>
    85         </tr>
     88        </tr>";
     89    echo "
    8690        <tr>
    8791            <td width=90%>
    … …  
    259263 * @author      knut st. osmundsen (knut.stange.osmundsen@mynd.no)
    260264 */
    261 function Odin32DBDumpSql($sql)
     265function Odin32DBSqlError($sql)
    262266{
     267    echo "<p><font size=1 face=\"courier\">
     268        SQL-Error:<br>
     269        ".mysql_error()."
     270        <br>
     271        </font>
     272        </p>
     273        ";
     274
    263275    echo "<p><font size=1 face=\"courier\">
    264276        SQL:<br>
    … …  
    379391}
    380392
     393
     394/**
     395 * Using (Odin32DB)Naslov.
     396 * Inserts a documentation row from database..
     397 * @param       $sName      Name of the information.
     398 * @param       $sLabel     Section label.
     399 * @param       $array      DB result array.
     400 * @param       $sValueName Name in the DB result array.
     401 * @author      knut st. osmundsen (knut.stange.osmundsen@mynd.no)
     402 * @remark      Displays <i>not available</i> if empty field.
     403 */
     404function Odin32DBDocRow(&$aContent, $sName, $sLabel, $array, $sValueName)
     405{
     406    Odin32DBNaslov($aContent, $sName, $sLabel);
     407    if (isset($array[$sValueName]))
     408    {
     409        echo $array[$sValueName];
     410    }
     411    else
     412        echo "<i>not available</i>";
     413}
     414
     415
     416
     417
     418/* INFO OUTPUT */
     419/* INFO OUTPUT */
     420/* INFO OUTPUT */
     421
     422
     423/**
     424 * Writes standard function info.
     425 *
     426 * @returns     void
     427 * @param       $aContent       Contents array. (input/output)
     428 * @param       $db             Database handle.
     429 * @param       $iRefcode       Function reference code.
     430 * @sketch
     431 * @author      knut st. osmundsen (knut.stange.osmundsen@mynd.no)
     432 * @remark
     433 */
     434function Odin32DBFunctionInfoAll(&$aContent, $db, $iRefcode)
     435{
     436    $sql = sprintf("SELECT\n".
     437                   "    f.name          AS name,\n".
     438                   "    f.intname       AS intname,\n".
     439                   "    f.ordinal       AS ordinal,\n".
     440                   "    f.return        AS return,\n".
     441                   "    f.description   AS description,\n".
     442                   "    f.remark        AS remark,\n".
     443                   "    f.returndesc    AS returndesc,\n".
     444                   "    f.sketch        AS sketch,\n".
     445                   "    f.equiv         AS equiv,\n".
     446                   "    f.time          AS time,\n".
     447                   "    g.name          AS apigroupname,\n".
     448                   "    g.refcode       AS apigrouprefcode,\n".
     449                   "    a.name          AS aliasname,\n".
     450                   "    a.refcode       AS aliasrefcode,\n".
     451                   "    ad.name         AS aliasdllname,\n".
     452                   "    ad.refcode      AS aliasdllrefcode,\n".
     453                   "    d.name          AS dllname,\n".
     454                   "    d.refcode       AS dllrefcode,\n".
     455                   "    i.name          AS filename,\n".
     456                   "    i.refcode       AS filerefcode,\n".
     457                   "    s.name          AS state,\n".
     458                   "    c.description   AS type\n".
     459                   "FROM\n".
     460                   "    function f\n".
     461                   "    LEFT OUTER JOIN function a ON f.aliasfn  = a.refcode\n".
     462                   "    LEFT OUTER JOIN dll ad     ON a.dll      = ad.refcode\n".
     463                   "    LEFT OUTER JOIN apigroup g ON f.apigroup = g.refcode\n".
     464                   "    LEFT       JOIN dll d      ON f.dll      = d.refcode\n".
     465                   "    LEFT       JOIN state s    ON f.state    = s.refcode\n".
     466                   "    LEFT OUTER JOIN file i     ON f.file     = i.refcode\n".
     467                   "    LEFT       JOIN code c     ON f.type     = c.code\n".
     468                   "WHERE\n".
     469                   "    c.codegroup = 'FTYP' AND\n".
     470                   "    f.refcode = %d",
     471                    $iRefcode);
     472    $result = mysql_query($sql, $db);
     473    if (@mysql_num_rows($result) > 0 &&
     474        ($array = mysql_fetch_array($result))
     475        )
     476    {
     477        /*
     478         * General
     479         */
     480        Odin32DBNaslov($aContent, "General", "general");
     481        echo "\n<table width=100% border=3 cellpadding=0>\n";
     482        Odin32DBInfoRow1("Name", $array, "name","","","","");
     483        if (isset($array["intname"]))
     484            Odin32DBInfoRow1("Internal Name", $array, "intname","","","","");
     485        else
     486            Odin32DBInfoRow1("Internal Name", $array, "name","","","","");
     487        Odin32DBInfoRow1("Type", $array, "type", "", "","invalid","");
     488        Odin32DBInfoRow1("State", $array, "state", "", "","invalid","");
     489        Odin32DBInfoRow1("Dll", $array, "dllname", "dllrefcode", "dllrefcode","","");
     490        Odin32DBInfoRow1("Ordinal", $array, "ordinal","","","not available","");
     491        if (isset($array["aliasrefcode"]))
     492            Odin32DBInfoRow2("Forwards", $array, "aliasdllname", "aliasdllrefcode", "dllrefcode","",".",
     493                                                 "aliasname", "aliasrefcode", "functionrefcode");
     494        if (isset($array["apigroup"]))
     495            Odin32DBInfoRow1("API Group", $array, "apigroupname", "apigrouprefcode", "apigrouprefcode","","");
     496        Odin32DBInfoRow1("File", $array, "filename", "filerefcode", "filerefcode","not available","");
     497        echo "\n</table>\n";
     498
     499
     500        Odin32DBNaslov($aContent, "Declaration", "declaration");
     501        echo "<pre>\n";
     502        if (isset($array["return"]))
     503            echo $array["return"]." ";
     504        echo $array["name"]."(";
     505        $sql = sprintf("SELECT\n".
     506                       "    name                AS name,\n".
     507                       "    type                AS type,\n".
     508                       "    description         AS description\n".
     509                       "FROM\n".
     510                       "    parameter\n".
     511                       "WHERE\n".
     512                       "    function = %d\n".
     513                       "ORDER BY sequencenbr",
     514                        $iRefcode);
     515        $result2 = mysql_query($sql, $db);
     516        if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     517        {
     518            while ($param = mysql_fetch_array($result2))
     519            {
     520                if (--$cParams == 0)
     521                    printf("\n        %-20s %s", $param["type"], $param["name"]);
     522                else
     523                    printf("\n        %-20s %s,", $param["type"], $param["name"]);
     524            }
     525        }
     526        else
     527            echo "void";
     528
     529        echo ");\n";
     530        echo "</pre>\n";
     531
     532        /*
     533         * Description
     534         */
     535        Odin32DBDocRow($aContent, "Description", "desc", $array, "description");
     536
     537
     538        /*
     539         * Parameters
     540         */
     541        Odin32DBNaslov($aContent, "Parameters", "params");
     542        if ($result2 &&
     543            mysql_num_rows($result2) > 0 &&
     544            mysql_data_seek($result2, 0)
     545            )
     546        {
     547            while ($param = mysql_fetch_array($result2))
     548            {
     549                echo "\n<dt><b>".$param["name"].":</b></dt>\n";
     550                if (isset($param["description"]))
     551                {
     552                    if (1)
     553                    {
     554                        echo "\n  <table width=100% border=0 cellpadding=0>\n";
     555                        echo "  <tr><td width=10%>&nbsp;</td>\n";
     556                        $sDescription = str_replace("<BR>", "", str_replace("<BR><BR>\n","<br>",$param["description"]));
     557                        echo "  <td width=90%><font size=-1>".$sDescription."</font></td></tr>\n";
     558                        echo "\n</table>\n";
     559                    }
     560                    else
     561                    {
     562                        $sDescription = str_replace("<BR>", "", str_replace("<BR><BR>\n","<br>",$param["description"]));
     563                        echo "<dd><font size=-1>".$sDescription."</font></dd>\n\n";
     564                    }
     565                }
     566                echo "<p>\n";
     567            }
     568        }
     569        else
     570            echo "void";
     571
     572
     573        /*
     574         * Returns
     575         */
     576        Odin32DBDocRow($aContent, "Returns", "return", $array, "returndesc");
     577
     578        /*
     579         * Sketch/Algorithm
     580         */
     581        Odin32DBDocRow($aContent, "Sketch/Algorithm", "sketch",  $array, "sketch");
     582
     583        /*
     584         * Remark
     585         */
     586        Odin32DBDocRow($aContent, "Remark", "remark", $array, "remark");
     587
     588        /*
     589         * Authors
     590         */
     591        Odin32DBNaslov($aContent, "Authors", "Authors");
     592        $sql = sprintf("SELECT\n".
     593                       "    a.name                AS name,\n".
     594                       "    a.refcode             AS refcode\n".
     595                       "FROM\n".
     596                       "    fnauthor fa\n".
     597                       "    JOIN function f\n".
     598                       "    JOIN author a\n".
     599                       "WHERE\n".
     600                       "    f.refcode  = %d AND\n".
     601                       "    fa.function = f.refcode AND\n".
     602                       "    fa.author   = a.refcode\n".
     603                       "ORDER BY a.name",
     604                        $iRefcode);
     605        $result2 = mysql_query($sql, $db);
     606        if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     607        {
     608            while ($author = mysql_fetch_array($result2))
     609                echo "<a href=\"Odin32DB.phtml?authorrefcode=".$author["refcode"]."\">".$author["name"]."</a><br>\n";
     610        }
     611        else
     612            echo "Hmm. Seems noone wrote this function...<br>\n";
     613    }
     614    else
     615    {
     616        echo "<p> No data! Invalid refcode? </p>";
     617        Odin32DBSqlError($sql);
     618    }
     619}
     620
     621
     622
     623/**
     624 * Writes standard dll info.
     625 *
     626 * @returns     void
     627 * @param       $aContent       Contents array. (input/output)
     628 * @param       $db             Database handle.
     629 * @param       $iRefcode       Dll reference code.
     630 * @param       $fFunctions     Flags which tells wether to list all functions or not.
     631 * @param       $fFiles         Flags which tells wether to list all files or not.
     632 * @param       $fAPIGroups     Flags which tells wether to list all apigroups or not.
     633 * @param       $fAuthors       Flags which tells wether to list all authors or not.
     634 * @param       $fSortByState   Flags which tells wether to sort functions by
     635 *                              state and function name or just by function name.
     636 * @sketch
     637 * @author      knut st. osmundsen (knut.stange.osmundsen@mynd.no)
     638 * @remark
     639 */
     640function Odin32DBDllInfoAll(&$aContent, $db, $iRefcode, $fFunctions, $fFiles, $fAPIGroups, $fAuthors, $fSortByState)
     641{
     642
     643
     644    $sql = sprintf("SELECT\n".
     645                   "    d.name          AS name,\n".
     646                   "    d.description   AS description,\n".
     647                   "    c.description   AS type\n".
     648                   "FROM\n".
     649                   "    dll d,\n".
     650                   "    code c\n".
     651                   "WHERE\n".
     652                   "    c.codegroup = 'DTYP' AND\n".
     653                   "    d.type = c.code AND\n".
     654                   "    d.refcode = %d",
     655                    $iRefcode);
     656    $result = mysql_query($sql, $db);
     657    if (@mysql_num_rows($result) > 0 &&
     658        ($array = mysql_fetch_array($result))
     659        )
     660    {
     661        Odin32DBNaslov($aContent, "General", "general");
     662        echo "\n<table width=100% border=3 cellpadding=0>\n";
     663        Odin32DBInfoRow1("Name", $array, "name","","","","");
     664        Odin32DBInfoRow1("Description", $array, "description","","","","");
     665        Odin32DBInfoRow1("Type", $array, "type","","","","");
     666        $sql = sprintf("SELECT\n".
     667                       "    COUNT(*) as functions\n".
     668                       "FROM\n".
     669                       "    function\n".
     670                       "WHERE\n".
     671                       "    dll = %d",
     672                       $iRefcode);
     673        $result = mysql_query($sql, $db);
     674        if (@mysql_num_rows($result) > 0 &&
     675            ($array = mysql_fetch_array($result))
     676            )
     677            {
     678            Odin32DBInfoRow1("# Functions", $array, "functions","","","","");
     679            $cFunctions = $array["functions"];
     680            }
     681        else
     682            $cFunctions = 0;
     683
     684        $sql = sprintf("SELECT\n".
     685                       "    COUNT(*) as files\n".
     686                       "FROM\n".
     687                       "    file\n".
     688                       "WHERE\n".
     689                       "    dll = %d",
     690                       $iRefcode);
     691        $result = mysql_query($sql, $db);
     692        if (@mysql_num_rows($result) > 0 &&
     693            ($array = mysql_fetch_array($result))
     694            )
     695        {
     696            Odin32DBInfoRow1("# Source files", $array, "files","","","","");
     697            $cFiles = $array["files"];
     698        }
     699        else
     700            $cFiles = 0;
     701
     702        $sql = sprintf("SELECT\n".
     703                       "    COUNT(*) as apigroups\n".
     704                       "FROM\n".
     705                       "    function c\n".
     706                       "WHERE\n".
     707                       "    f.dll = %d",
     708                        $iRefcode);
     709        $result = mysql_query($sql, $db);
     710        if (@mysql_num_rows($result) > 0 &&
     711            ($array = mysql_fetch_array($result))
     712            )
     713        {
     714            Odin32DBInfoRow1("# API Groups", $array, "apigroups","","","","");
     715            $cAPIGroups = $array["apigroups"];
     716        }
     717        else
     718            $cAPIGroups = 0;
     719
     720        echo "\n</table>\n";
     721
     722
     723        /*
     724         * Completion
     725         */
     726        Odin32DBNaslov($aContent, "Completion", "completion");
     727        Odin32DBCompletionBar($iRefcode, "", $db);
     728
     729        /*
     730         * States
     731         */
     732        Odin32DBNaslov($aContent, "Status", "status");
     733        $sql = sprintf("SELECT\n".
     734                       "    s.name              AS state,\n".
     735                       "    s.color             AS color,\n".
     736                       "    COUNT(f.state)      AS functions\n".
     737                       "FROM\n".
     738                       "    state s\n".
     739                       "    LEFT OUTER JOIN function f ON s.refcode = f.state AND f.dll = %d\n".
     740                       "GROUP BY s.refcode\n".
     741                       "ORDER BY s.refcode",
     742                        $iRefcode);
     743        $result2 = mysql_query($sql, $db);
     744        if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     745        {
     746            echo "\n<table width=100% border=0 cellpadding=0>\n";
     747            while ($aState = mysql_fetch_array($result2))
     748            {
     749                echo "<tr>\n".
     750                     "    <td width=75%><font size=-1 color=\"#".$aState["color"]."\"><b>".$aState["state"]."</b></font></td>\n".
     751                     "    <td align=right><font size=-1 color=\"#".$aState["color"]."\"><b>".$aState["functions"]."</b></font></td>\n".
     752                     "    <td align=right><font size=-1 color=\"#".$aState["color"]."\"><b>".@(int)((int)$aState["functions"] * 100 / $cFunctions)."%</b></font></td>\n".
     753                     "</tr>\n";
     754            }
     755
     756            echo "\n</table>\n";
     757        }
     758        else
     759            Odin32DBSqlError($sql);
     760
     761
     762        /*
     763         * Functions
     764         */
     765        Odin32DBNaslov($aContent, "Functions", "functions");
     766        if ($fFunctions)
     767        {
     768            echo "Click <a href=\"Odin32DB.phtml?dllrefcode=".$iRefcode."&fFunctions=1";
     769            if ($fFiles)        echo "&fFiles=".$fFiles;
     770            if ($fAPIGroups)    echo "&fAPIGroups=".$fAPIGroups;
     771            if ($fAuthors)      echo "&fAuthors=".$fAuthors;
     772            if ($fSortByState)
     773                echo "&fSortByState=".!$fSortByState."\">here</a> to view files sorted alphabetical.<br>\n";
     774            else
     775                echo "&fSortByState=".!$fSortByState."\">here</a> to view files sorted by state.<br>\n";
     776
     777            $sql = sprintf("SELECT\n".
     778                           "    f.name              AS name,\n".
     779                           "    f.refcode           AS refcode,\n".
     780                           "    s.name              AS state,\n".
     781                           "    s.color             AS color\n".
     782                           "FROM\n".
     783                           "    function f\n".
     784                           "    LEFT JOIN state s ON f.state = s.refcode\n".
     785                           "WHERE\n".
     786                           "    f.dll = %d\n",
     787                            $iRefcode);
     788            if ($fSortByState)
     789                $sql = $sql."ORDER BY s.refcode, f.name";
     790            else
     791                $sql = $sql."ORDER BY f.name";
     792            $result2 = mysql_query($sql, $db);
     793            if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     794            {
     795                echo "\n<table width=100% border=0 cellpadding=0>\n".
     796                     "<tr>\n".
     797                     "  <td width=75%><font size=-1><b>Function Name</b></font></td>\n".
     798                     "  <td><font size=-1><b>State</b></font></td>\n".
     799                     "</tr>\n";
     800                while ($aFunction = mysql_fetch_array($result2))
     801                {
     802                    echo "<tr>\n".
     803                         "  <td><font size=-1><a href=\"Odin32DB.phtml?functionrefcode=".$aFunction["refcode"]."\">".$aFunction["name"]."</a></font></td>\n".
     804                         "  <td><font size=-1 color=\"#".$aFunction["color"]."\">".$aFunction["state"]."</font></td>\n".
     805                         "</tr>\n";
     806                }
     807                echo "\n</table>\n";
     808            }
     809            else
     810                Odin32DBSqlError($sql);
     811        }
     812        else
     813        {
     814            echo "Click <a href=\"Odin32DB.phtml?dllrefcode=".$iRefcode."&fFunctions=1";
     815            if ($fFiles)        echo "&fFiles=".$fFiles;
     816            if ($fAPIGroups)    echo "&fAPIGroups=".$fAPIGroups;
     817            if ($fAuthors)      echo "&fAuthors=".$fAuthors;
     818            if ($fSortByState)  echo "&fSortByState=".$fSortByState;
     819            echo "\">here</a> to see all functions.\n";
     820        }
     821
     822
     823        /*
     824         * Files
     825         */
     826        Odin32DBNaslov($aContent, "Files", "files");
     827        if ($fFiles)
     828        {
     829            $sql = sprintf("SELECT\n".
     830                           "    f.name              AS name,\n".
     831                           "    f.refcode           AS refcode,\n".
     832                           "    COUNT(f.refcode)    AS functions\n".
     833                           "FROM\n".
     834                           "    file f\n".
     835                           "    LEFT OUTER JOIN function fn ON fn.file = f.refcode\n".
     836                           "WHERE\n".
     837                           "    f.dll = %d\n".
     838                           "GROUP BY f.refcode\n".
     839                           "ORDER BY f.name\n",
     840                            $iRefcode);
     841            $result2 = mysql_query($sql, $db);
     842            if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     843            {
     844                echo "\n<table width=100% border=0 cellpadding=0>\n".
     845                     "<tr>\n".
     846                     "  <td><font size=-1><b>Filename</b></font></td>\n".
     847                     "  <td align=right><font size=-1><b>Functions</b></font></td>\n".
     848                     "</tr>\n";
     849                while ($aFunction = mysql_fetch_array($result2))
     850                {
     851                    echo "<tr>\n".
     852                         "  <td width=75%><font size=-1><a href=\"Odin32DB.phtml?filerefcode=".$aFunction["refcode"]."\">".$aFunction["name"]."</a></font></td>\n".
     853                         "  <td align=right><font size=-1>".$aFunction["functions"]."</font></td>\n".
     854                         "</tr>\n";
     855                }
     856                echo "\n</table>\n";
     857            }
     858            else
     859                Odin32DBSqlError($sql);
     860        }
     861        else
     862        {
     863            echo "Click <a href=\"Odin32DB.phtml?dllrefcode=".$iRefcode."&fFiles=1";
     864            if ($fFunctions)    echo "&fFunctions=".$fFunctions;
     865            if ($fAPIGroups)    echo "&fAPIGroups=".$fAPIGroups;
     866            if ($fAuthors)      echo "&fAuthors=".$fAuthors;
     867            if ($fSortByState)  echo "&fSortByState=".$fSortByState;
     868            echo "\">here</a> to see all functions.\n";
     869        }
     870
     871
     872        /*
     873         * API Groups
     874         */
     875        if ($cAPIGroups > 0)
     876        {
     877            Odin32DBNaslov($aContent, "API Groups", "apigroups");
     878            if ($fAPIGroups)
     879            {
     880                $sql = sprintf("SELECT\n".
     881                               "    g.name              AS name,\n".
     882                               "    g.refcode           AS refcode,\n".
     883                               "    COUNT(f.refcode)    AS functions\n".
     884                               "FROM\n".
     885                               "    apigroup g\n".
     886                               "    LEFT OUTER JOIN function fn ON fn.apigroup = g.refcode\n".
     887                               "WHERE\n".
     888                               "    g.dll = %d\n".
     889                               "GROUP BY g.refcode\n".
     890                               "ORDER BY g.name\n",
     891                                $iRefcode);
     892                $result2 = mysql_query($sql, $db);
     893                if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     894                {
     895                    echo "\n<table width=100% border=0 cellpadding=0>\n".
     896                         "<tr>\n".
     897                         "  <td width=75%><font size=-1><b>Group Name</b></font></td>\n".
     898                         "  <td align=right><font size=-1><b>Functions</b></font></td>\n".
     899                         "</tr>\n";
     900                    while ($aFunction = mysql_fetch_array($result2))
     901                    {
     902                        echo "<tr>\n".
     903                             "  <td><font size=-1><a href=\"Odin32DB.phtml?filerefcode=".$aFunction["refcode"]."\">".$aFunction["name"]."</a></font></td>\n".
     904                             "  <td align=right><font size=-1>".$aFunction["functions"]."</font></td>\n".
     905                             "</tr>\n";
     906                    }
     907                    echo "\n</table>\n";
     908                }
     909                else
     910                    Odin32DBSqlError($sql);
     911            }
     912            else
     913            {
     914                echo "Click <a href=\"Odin32DB.phtml?dllrefcode=".$iRefcode."&fAPIGroups=1";
     915                if ($fFunctions)    echo "&fFunctions=".$fFunctions;
     916                if ($fFiles)        echo "&fFiles=".$fFiles;
     917                if ($fAuthors)      echo "&fAuthors=".$fAuthors;
     918                if ($fSortByState)  echo "&fSortByState=".$fSortByState;
     919                echo "\">here</a> to see all the API Groups.\n";
     920            }
     921        }
     922
     923
     924        /*
     925         * Authors
     926         */
     927        Odin32DBNaslov($aContent, "Authors", "authors");
     928        if ($fAuthors)
     929        {
     930            $sql = sprintf("SELECT\n".
     931                           "    a.name              AS name,\n".
     932                           "    a.refcode           AS refcode,\n".
     933                           "    COUNT(f.refcode)    AS functions\n".
     934                           "FROM\n".
     935                           "    fnauthor fa\n".
     936                           "    JOIN function f\n".
     937                           "    JOIN author a\n".
     938                           "WHERE\n".
     939                           "    f.dll       = %d AND\n".
     940                           "    fa.function = f.refcode AND\n".
     941                           "    fa.author   = a.refcode\n".
     942                           "GROUP BY a.refcode\n".
     943                           "ORDER BY a.name\n",
     944                            $iRefcode
     945                            );
     946            $result2 = mysql_query($sql, $db);
     947            if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     948            {
     949                echo "\n<table width=100% border=0 cellpadding=0>\n".
     950                     "<tr>\n".
     951                     "  <td width=75%><font size=-1><b>Author</b></font></td>\n".
     952                     "  <td align=right><font size=-1><b>Functions</b></font></td>\n".
     953                     "</tr>\n";
     954                while ($aFunction = mysql_fetch_array($result2))
     955                {
     956                    echo "<tr>\n".
     957                         "  <td><font size=-1><a href=\"Odin32DB.phtml?authorrefcode=".$aFunction["refcode"]."&dll=".$iRefcode."\">".$aFunction["name"]."</a></font></td>\n".
     958                         "  <td align=right><font size=-1>".$aFunction["functions"]."</font></td>\n".
     959                         "</tr>\n";
     960                }
     961                echo "\n</table>\n";
     962            }
     963            else
     964                Odin32DBSqlError($sql);
     965        }
     966        else
     967        {
     968            echo "Click <a href=\"Odin32DB.phtml?dllrefcode=".$iRefcode."&fAuthors=1";
     969            if ($fFunctions)    echo "&fFunctions=".$fFunctions;
     970            if ($fFiles)        echo "&fFiles=".$fFiles;
     971            if ($fAPIGroups)    echo "&fAPIGroups=".$fAPIGroups;
     972            if ($fSortByState)  echo "&fSortByState=".$fSortByState;
     973            echo "\">here</a> to see all authors.\n";
     974        }
     975    }
     976    else
     977    {
     978        echo "<p> No data! Invalid refcode? </p>";
     979        Odin32DBSqlError($sql);
     980    }
     981}
     982
     983
     984
     985/**
     986 * Writes standard file info.
     987 *
     988 * @returns     void
     989 * @param       $aContent       Contents array. (input/output)
     990 * @param       $db             Database handle.
     991 * @param       $iRefcode       File reference code.
     992 * @param       $fFunctions     Flags which tells wether to list all functions or not.
     993 * @param       $fAPIGroups     Flags which tells wether to list all apigroups or not.
     994 * @param       $fAuthors       Flags which tells wether to list all authors or not.
     995 * @param       $fSortByState   Flags which tells wether to sort functions by
     996 *                              state and function name or just by function name.
     997 * @sketch
     998 * @author      knut st. osmundsen (knut.stange.osmundsen@mynd.no)
     999 * @remark
     1000 */
     1001function Odin32DBFileInfoAll(&$aContent, $db, $iRefcode, $fFunctions, $fAPIGroups, $fAuthors, $fSortByState)
     1002{
     1003
     1004    $sql = sprintf("SELECT\n".
     1005                   "    f.name          AS name,\n".
     1006                   "    f.refcode       AS refcode,\n".
     1007                   "    f.lastdatetime  AS lastdatetime,\n".
     1008                   "    a.name          AS lastauthorname,\n".
     1009                   "    f.lastauthor    AS lastauthorrefcode,\n".
     1010                   "    f.revision      AS revision,\n".
     1011                   "    f.description   AS description,\n".
     1012                   "    f.dll           AS dllrefcode,\n".
     1013                   "    d.name          AS dllname\n".
     1014                   "FROM\n".
     1015                   "    file f,\n".
     1016                   "    dll d,\n".
     1017                   "    author a\n".
     1018                   "WHERE\n".
     1019                   "    f.refcode   = %d AND\n".
     1020                   "    f.dll       = d.refcode AND\n".
     1021                   "    f.lastauthor= a.refcode",
     1022                    $iRefcode);
     1023    $result = mysql_query($sql, $db);
     1024    if (@mysql_num_rows($result) > 0 &&
     1025        ($array = mysql_fetch_array($result))
     1026        )
     1027    {
     1028        Odin32DBNaslov($aContent, "General", "general");
     1029        echo "\n<table width=100% border=3 cellpadding=0>\n";
     1030        Odin32DBInfoRow1("Name", $array, "name","","","","");
     1031        Odin32DBInfoRow1("Revision", $array, "revision","","","","");
     1032        Odin32DBInfoRow1("Changed", $array, "lastdatetime","","","","");
     1033        Odin32DBInfoRow1("Last Author", $array, "lastauthorname","lastauthorrefcode","authorrefcode","","");
     1034        Odin32DBInfoRow1("Dll", $array, "dllname","dllrefcode","dllrefcode","","");
     1035        Odin32DBInfoRow1("Description", $array, "description","","","","");
     1036        $sql = sprintf("SELECT\n".
     1037                       "    COUNT(*) as functions\n".
     1038                       "FROM\n".
     1039                       "    function\n".
     1040                       "WHERE\n".
     1041                       "    file = %d",
     1042                       $iRefcode);
     1043        $result = mysql_query($sql, $db);
     1044        if (@mysql_num_rows($result) > 0 &&
     1045            ($array = mysql_fetch_array($result))
     1046            )
     1047            {
     1048            Odin32DBInfoRow1("# Functions", $array, "functions","","","","");
     1049            $cFunctions = $array["functions"];
     1050            }
     1051        else
     1052            $cFunctions = 0;
     1053
     1054        $sql = sprintf("SELECT\n".
     1055                       "    COUNT(*) as apigroups\n".
     1056                       "FROM\n".
     1057                       "    function c\n".
     1058                       "WHERE\n".
     1059                       "    f.file = %d\n",
     1060                        $iRefcode);
     1061        $result = mysql_query($sql, $db);
     1062        if (@mysql_num_rows($result) > 0 &&
     1063            ($array = mysql_fetch_array($result))
     1064            )
     1065        {
     1066            Odin32DBInfoRow1("# API Groups", $array, "apigroups","","","","");
     1067            $cAPIGroups = $array["apigroups"];
     1068        }
     1069        else
     1070            $cAPIGroups = 0;
     1071
     1072        echo "\n</table>\n";
     1073
     1074
     1075        /*
     1076         * States
     1077         */
     1078        Odin32DBNaslov($aContent, "Status", "status");
     1079        $sql = sprintf("SELECT\n".
     1080                       "    s.name              AS state,\n".
     1081                       "    s.color             AS color,\n".
     1082                       "    COUNT(f.state)      AS functions\n".
     1083                       "FROM\n".
     1084                       "    state s\n".
     1085                       "    LEFT OUTER JOIN function f ON s.refcode = f.state AND f.file = %d\n".
     1086                       "GROUP BY s.refcode\n".
     1087                       "ORDER BY s.refcode",
     1088                        $iRefcode);
     1089        $result2 = mysql_query($sql, $db);
     1090        if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     1091        {
     1092            echo "\n<table width=100% border=0 cellpadding=0>\n";
     1093            while ($aState = mysql_fetch_array($result2))
     1094            {
     1095                echo "<tr>\n".
     1096                     "    <td width=75%><font size=-1 color=\"#".$aState["color"]."\"><b>".$aState["state"]."</b></font></td>\n".
     1097                     "    <td align=right><font size=-1 color=\"#".$aState["color"]."\"><b>".$aState["functions"]."</b></font></td>\n".
     1098                     "    <td align=right><font size=-1 color=\"#".$aState["color"]."\"><b>".@(int)((int)$aState["functions"] * 100 / $cFunctions)."%</b></font></td>\n".
     1099                     "</tr>\n";
     1100            }
     1101
     1102            echo "\n</table>\n";
     1103        }
     1104        else
     1105            Odin32DBSqlError($sql);
     1106
     1107
     1108        /*
     1109         * Functions
     1110         */
     1111        Odin32DBNaslov($aContent, "Functions", "functions");
     1112        if ($fFunctions)
     1113        {
     1114            echo "Click <a href=\"Odin32DB.phtml?dllrefcode=".$iRefcode."&fFunctions=1";
     1115            if ($fFiles)        echo "&fFiles=".$fFiles;
     1116            if ($fAPIGroups)    echo "&fAPIGroups=".$fAPIGroups;
     1117            if ($fAuthors)      echo "&fAuthors=".$fAuthors;
     1118            if ($fSortByState)
     1119                echo "&fSortByState=".!$fSortByState."\">here</a> to view files sorted alphabetical.<br>\n";
     1120            else
     1121                echo "&fSortByState=".!$fSortByState."\">here</a> to view files sorted by state.<br>\n";
     1122
     1123            $sql = sprintf("SELECT\n".
     1124                           "    f.name              AS name,\n".
     1125                           "    f.refcode           AS refcode,\n".
     1126                           "    s.name              AS state,\n".
     1127                           "    s.color             AS color\n".
     1128                           "FROM\n".
     1129                           "    function f\n".
     1130                           "    LEFT JOIN state s ON f.state = s.refcode\n".
     1131                           "WHERE\n".
     1132                           "    f.file = %d\n",
     1133                            $iRefcode);
     1134            if ($fSortByState)
     1135                $sql = $sql."ORDER BY s.refcode, f.name";
     1136            else
     1137                $sql = $sql."ORDER BY f.name";
     1138            $result2 = mysql_query($sql, $db);
     1139            if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     1140            {
     1141                echo "\n<table width=100% border=0 cellpadding=0>\n".
     1142                     "<tr>\n".
     1143                     "  <td width=75%><font size=-1><b>Function Name</b></font></td>\n".
     1144                     "  <td><font size=-1><b>State</b></font></td>\n".
     1145                     "</tr>\n";
     1146                while ($aFunction = mysql_fetch_array($result2))
     1147                {
     1148                    echo "<tr>\n".
     1149                         "  <td><font size=-1><a href=\"Odin32DB.phtml?functionrefcode=".$aFunction["refcode"]."\">".$aFunction["name"]."</a></font></td>\n".
     1150                         "  <td><font size=-1 color=\"#".$aFunction["color"]."\">".$aFunction["state"]."</font></td>\n".
     1151                         "</tr>\n";
     1152                }
     1153                echo "\n</table>\n";
     1154            }
     1155            else
     1156                Odin32DBSqlError($sql);
     1157        }
     1158        else
     1159        {
     1160            echo "Click <a href=\"Odin32DB.phtml?dllrefcode=".$iRefcode."&fFunctions=1";
     1161            if ($fFiles)        echo "&fFiles=".$fFiles;
     1162            if ($fAPIGroups)    echo "&fAPIGroups=".$fAPIGroups;
     1163            if ($fAuthors)      echo "&fAuthors=".$fAuthors;
     1164            if ($fSortByState)  echo "&fSortByState=".$fSortByState;
     1165            echo "\">here</a> to see all functions.\n";
     1166        }
     1167
     1168
     1169        /*
     1170         * API Groups
     1171         */
     1172        if ($cAPIGroups > 0)
     1173        {
     1174            Odin32DBNaslov($aContent, "API Groups", "apigroups");
     1175            if ($fAPIGroups)
     1176            {
     1177                $sql = sprintf("SELECT\n".
     1178                               "    g.name              AS name,\n".
     1179                               "    g.refcode           AS refcode,\n".
     1180                               "    COUNT(f.refcode)    AS functions\n".
     1181                               "FROM\n".
     1182                               "    apigroup g\n".
     1183                               "    LEFT OUTER JOIN function fn ON fn.apigroup = g.refcode AND fn.file = %d\n".
     1184                               "GROUP BY g.refcode\n".
     1185                               "ORDER BY g.name\n",
     1186                                $iRefcode);
     1187                $result2 = mysql_query($sql, $db);
     1188                if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     1189                {
     1190                    echo "\n<table width=100% border=0 cellpadding=0>\n".
     1191                         "<tr>\n".
     1192                         "  <td width=75%><font size=-1><b>Group Name</b></font></td>\n".
     1193                         "  <td align=right><font size=-1><b>Functions</b></font></td>\n".
     1194                         "</tr>\n";
     1195                    while ($aFunction = mysql_fetch_array($result2))
     1196                    {
     1197                        echo "<tr>\n".
     1198                             "  <td><font size=-1><a href=\"Odin32DB.phtml?filerefcode=".$aFunction["refcode"]."\">".$aFunction["name"]."</a></font></td>\n".
     1199                             "  <td align=right><font size=-1>".$aFunction["functions"]."</font></td>\n".
     1200                             "</tr>\n";
     1201                    }
     1202                    echo "\n</table>\n";
     1203                }
     1204                else
     1205                    Odin32DBSqlError($sql);
     1206            }
     1207            else
     1208            {
     1209                echo "Click <a href=\"Odin32DB.phtml?dllrefcode=".$iRefcode."&fAPIGroups=1";
     1210                if ($fFunctions)    echo "&fFunctions=".$fFunctions;
     1211                if ($fFiles)        echo "&fFiles=".$fFiles;
     1212                if ($fAuthors)      echo "&fAuthors=".$fAuthors;
     1213                if ($fSortByState)  echo "&fSortByState=".$fSortByState;
     1214                echo "\">here</a> to see all the API Groups.\n";
     1215            }
     1216        }
     1217
     1218
     1219        /*
     1220         * Authors
     1221         */
     1222        Odin32DBNaslov($aContent, "Authors", "authors");
     1223        if ($fAuthors)
     1224        {
     1225            $sql = sprintf("SELECT\n".
     1226                           "    a.name              AS name,\n".
     1227                           "    a.refcode           AS refcode,\n".
     1228                           "    COUNT(f.refcode)    AS functions\n".
     1229                           "FROM\n".
     1230                           "    fnauthor fa\n".
     1231                           "    JOIN function f\n".
     1232                           "    JOIN author a\n".
     1233                           "WHERE\n".
     1234                           "    f.file      = %d AND\n".
     1235                           "    fa.function = f.refcode AND\n".
     1236                           "    fa.author   = a.refcode\n".
     1237                           "GROUP BY a.refcode\n".
     1238                           "ORDER BY a.name\n",
     1239                            $iRefcode
     1240                            );
     1241            $result2 = mysql_query($sql, $db);
     1242            if ($result2 && ($cParams = mysql_num_rows($result2)) > 0)
     1243            {
     1244                echo "\n<table width=100% border=0 cellpadding=0>\n".
     1245                     "<tr>\n".
     1246                     "  <td width=75%><font size=-1><b>Author</b></font></td>\n".
     1247                     "  <td align=right><font size=-1><b>Functions</b></font></td>\n".
     1248                     "</tr>\n";
     1249                while ($aFunction = mysql_fetch_array($result2))
     1250                {
     1251                    echo "<tr>\n".
     1252                         "  <td><font size=-1><a href=\"Odin32DB.phtml?authorrefcode=".$aFunction["refcode"]."&dll=".$iRefcode."\">".$aFunction["name"]."</a></font></td>\n".
     1253                         "  <td align=right><font size=-1>".$aFunction["functions"]."</font></td>\n".
     1254                         "</tr>\n";
     1255                }
     1256                echo "\n</table>\n";
     1257            }
     1258            else
     1259                Odin32DBSqlError($sql);
     1260        }
     1261        else
     1262        {
     1263            echo "Click <a href=\"Odin32DB.phtml?dllrefcode=".$iRefcode."&fAuthors=1";
     1264            if ($fFunctions)    echo "&fFunctions=".$fFunctions;
     1265            if ($fFiles)        echo "&fFiles=".$fFiles;
     1266            if ($fAPIGroups)    echo "&fAPIGroups=".$fAPIGroups;
     1267            if ($fSortByState)  echo "&fSortByState=".$fSortByState;
     1268            echo "\">here</a> to see all authors.\n";
     1269        }
     1270    }
     1271    else
     1272    {
     1273        echo "<p> No data! Invalid refcode? </p>";
     1274        Odin32DBSqlError($sql);
     1275    }
     1276}
     1277
     1278
     1279
     1280
     1281
     1282
     1283
     1284/* TEXT FORMATTING OVERLOADS */
     1285/* TEXT FORMATTING OVERLOADS */
     1286/* TEXT FORMATTING OVERLOADS */
     1287
     1288/**
     1289 * Makes the contents for this page.
     1290 * @sketch      Writes the headers present in the contents array.
     1291 */
     1292function DBWriteContents(&$aContent)
     1293{
     1294    TocBeg();
     1295    for ($i = 0; $i < sizeof($aContent); $i += 2)
     1296        AnchNaslov($aContent[$i], $aContent[$i + 1], "");
     1297    TocEnd();
     1298}
     1299
     1300/**
     1301 * Forwarder which also maintains the contents array.
     1302 */
     1303function Odin32DBNaslov(&$aContent, $sFull, $sShort)
     1304{
     1305    $aContent[] = $sFull;
     1306    $aContent[] = $sShort;
     1307    return Naslov($sFull, $sShort);
     1308}
     1309
     1310
     1311
    3811312?>
    3821313
Note: See TracChangeset for help on using the changeset viewer.