d612b4df655588dab1a76db4c4f15f3d59ee5010
[gnucomo.git] / src / web / parameter.php
1 <?php 
2
3 /**************************************************************************
4 **  (c) Copyright 2003, Andromeda Technology & Automation
5 ** This is free software; you can redistribute it and/or modify it under the
6 ** terms of the GNU General Public License, see the file COPYING.
7 ***************************************************************************
8 ** MODULE INFORMATION *
9 ***********************
10 **      FILE NAME      : parameter.php
11 **      SYSTEM NAME    : Gnucomo - Gnu Computer Monitoring
12 **      VERSION NUMBER : $Revision: 1.5 $
13 **
14 **  DESCRIPTION      : 
15 **
16 **  EXPORTED OBJECTS : 
17 **  LOCAL    OBJECTS : 
18 **  MODULES  USED    :
19 ***************************************************************************
20 **  ADMINISTRATIVE INFORMATION *
21 ********************************
22 **      ORIGINAL AUTHOR : Arjen Baart - arjen@andromeda.nl
23 **      CREATION DATE   : Dec 04, 2002
24 **      LAST UPDATE     : Feb 08, 2003
25 **      MODIFICATIONS   : 
26 **************************************************************************/
27
28 /*****************************
29    $Log: parameter.php,v $
30    Revision 1.5  2003-07-15 11:06:45  arjen
31    Removed parameters are displayed in a shaded style.
32
33    Revision 1.4  2003/02/21 08:50:12  arjen
34    Database optimizations.
35
36    Revision 1.3  2003/02/13 09:01:29  arjen
37    All web interface pages use the page class.
38
39    Revision 1.2  2003/02/05 09:47:39  arjen
40    Display the difference of all package class parameters for two objects
41
42 ******************************/
43
44 // RCSID = "$Id: parameter.php,v 1.5 2003-07-15 11:06:45 arjen Exp $";
45
46
47 ini_set('include_path', '.:./classes:../phpclasses');
48
49 require_once('page.class.php');
50
51
52 /*  Local functions */
53
54 function object_selection($db, $skip_oid)
55 {
56    /*  Create and print an HTML option list of objects */
57
58    $res = pg_exec("SELECT objectid, objectname FROM object WHERE objectid != " . $skip_oid);
59    for ($row = 0; $row < pg_numrows($res); $row++)
60    {
61       $obj = pg_fetch_object($res, $row);
62       echo "<option value='" . $obj->objectid . "'>";
63       echo $obj->objectname;
64       echo "</option>";
65    }
66 }
67
68 class param_page extends page
69 {
70
71    function Body()
72    {
73
74    if (!empty($_GET['oid']))
75    {
76       $res = pg_exec($this->database, "SELECT objectname FROM object WHERE objectid=CAST('" . $_GET['oid']."' AS BIGINT)");
77       $obj = pg_fetch_object($res, 0);
78       echo "<h1>Parameters for " . $obj->objectname . "</h1>";
79
80       $res = pg_exec($this->database, "SELECT paramid, class, name, description FROM parameter "
81                      ."WHERE objectid= CAST('" . $_GET['oid'] . "' AS BIGINT) order by class, name");
82       
83      ?>
84      <form action='parameter_compare.php' method='post'>
85        <input type='hidden' name='oid' value='<?php echo $_GET['oid'] ?>'>
86        Compare to object:
87        <select name='compare_to'>
88          <?php object_selection($this->database, $_GET['oid']); ?>
89        </select>
90        <input type='hidden' name='class' value='package'>
91        <input type='submit' value=' Show Difference'>
92      </form>
93      <?php
94       echo "<hr>";
95       echo "<table>";
96       $row = 0;
97       while ($row < pg_numrows($res))
98       {
99          $par = pg_fetch_object($res, $row);
100          $qry ="select change_nature from history where paramid= CAST('";
101          $qry .= $par->paramid . "' AS BIGINT) order by modified desc";
102          $rhist = pg_exec($this->database, $qry);
103          $hist = pg_fetch_object($rhist, 0);
104          if ($hist->change_nature != "REMOVED")
105          {
106             ?>
107             <tr><td align='center'>
108                <?php echo $par->class?>
109             </td><td>
110                <?php echo $par->name?>
111             </td><td>
112                <?php echo $par->description?>
113             </td><td>
114                <?php
115                   $r = pg_exec($this->database, "SELECT name, value FROM property
116                                               WHERE paramid=CAST('" . $par->paramid . "' AS BIGINT)");
117                   for ($p = 0; $p < pg_numrows($r); $p++)
118                   {
119                      $prop = pg_fetch_object($r, $p);
120                      echo $prop->name . "=" . $prop->value . " ";
121                   }
122                ?>
123             </td></tr>
124             <?php
125          }
126          $row++;
127       }
128       echo "</table>";
129    }
130    }
131 }
132
133 $page = new param_page("Gnucomo Parameters");
134
135 $page->Showpage();
136
137 ?>