home *** CD-ROM | disk | FTP | other *** search
/ H4CK3R 4 / hacker04 / 04_HACK04.ISO / src / PHP / oraclebrowser.php3.txt < prev    next >
Encoding:
Text File  |  2002-05-06  |  21.1 KB  |  628 lines
  1. Oracle Browser 
  2.  
  3. A single script which will help you browse oracle objects in a schema (using all_ views). It helps to click your way through a database! After logging in, you can switch to other schemas. 
  4.  
  5.  
  6. <? if(!isset($PHP_AUTH_USER)) { 
  7.       Header( "WWW-authenticate: basic realm=\"$SID\""); 
  8.       Header( "HTTP/1.0 401 Unauthorized"); 
  9.       $title= "Login Instructions"; 
  10.           echo  "<blockquote> \n". 
  11.                      "You are not authorised to enter the site\n". 
  12.            "</blockquote> \n"; 
  13.       exit; 
  14.   } else { 
  15.     putenv( "ORACLE_SID=MAPSA"); 
  16.     putenv( "ORACLE_HOME=/u01/app/oracle/product/8.0.5"); 
  17.     if (!($conn=ora_logon( "$PHP_AUTH_USER@$SID",$PHP_AUTH_PW))) { 
  18.           Header( "WWW-authenticate: basic realm=\"$SID\""); 
  19.           Header( "HTTP/1.0 401 Unauthorized"); 
  20.           $title= "Login Instructions"; 
  21.           echo  "<blockquote> \n". 
  22.                      "You are not authorised to enter the site\n". 
  23.            "</blockquote> \n"; 
  24.                     exit; 
  25.             } 
  26.   } 
  27.  
  28. /* 
  29. || 
  30. || oraphp.php3 - v1.0 
  31. || Author : V.Satheesh Babu 
  32. || Date   : Aug 03, 1999 
  33. || License: GPL 
  34. || 
  35. || Allows user to navigate an Oracle database. This is a quick script 
  36. || put together in a very short time. So, code might not be formatted 
  37. || to anyone's liking. Comments and code are always welcome 
  38. ||  
  39. */ 
  40. include( "themes.php3"); 
  41. if(!isset($schema))  
  42.     $schema=strtoupper($PHP_AUTH_USER); 
  43. $title= "Oracle Schema Browser [$schema@$SID]"; 
  44. $header1=$title; 
  45. $ObjectDesc = array( 
  46.                                 "TABLE" =>  "Tables" 
  47.                                 , "VIEW" =>  "Views" 
  48.                                 , "INDEX" =>  "Indexes" 
  49.                                 , "TRIGGER" =>  "Triggers" 
  50.                                 , "SYNONYM" =>  "Synonyms" 
  51.                                 , "FUNCTION" =>  "Functions" 
  52.                                 , "PROCEDURE" =>  "Procedures" 
  53.                                 , "SEQUENCE" =>  "Sequences" 
  54.                                 , "PACKAGE" =>  "Packages" 
  55.                                 , "PACKAGE BODY" =>  "Package Bodies" 
  56.               ); 
  57. if(!isset($printqry)) 
  58.     $printqry= "off"; 
  59. $sidebar= "<P CLASS=\"FOOTER\" ALIGN=CENTER><small>[ "; 
  60. if (isset($objecttype)){ 
  61.     $sidebar .=  "<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&printqry=$printqry\">Top</A> "; 
  62. }else{ 
  63.     $sidebar .=  "Top "; 
  64. } 
  65. $sidebar .=  "| <A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&printqry=$printqry&changeschema=CHANGESCHEMA\">Schema</A> "; 
  66. while(list($key,$val)=each($ObjectDesc))  { 
  67.     if ( $key == $objecttype ) 
  68.     $sidebar .=  "| $val \n"; 
  69.     else 
  70.     $sidebar .=  "| <A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&printqry=$printqry&objecttype=$key\">$val</A> \n"; 
  71. } 
  72. if (isset($objecttype)) 
  73.     $others= "&objecttype=$objecttype"; 
  74. if (isset($objectnm)) 
  75.     $others.= "&objectnm=$objectnm"; 
  76. if (isset($oper)) 
  77.     $others.= "&oper=$oper"; 
  78. $sidebar .=  "]</small> </P>"; 
  79. reset($ObjectDesc); 
  80. ?> 
  81. <HTML> 
  82.   <HEAD> 
  83.      <? applyTheme(); ?> 
  84.   <TITLE> 
  85.      <? echo  "$title\n"; ?> 
  86.   </TITLE> 
  87.   </HEAD> 
  88.   <BODY> 
  89.       <? echo  "$sidebar\n"; ?> 
  90.     <H1> 
  91.        <? echo  "$header1\n"; ?> 
  92.     </H1> 
  93. <? 
  94. function printoraerr($in_cur){ 
  95.         global $conn; 
  96.          // function to check whether an oracle error occured 
  97.          // if it did, print the error 
  98.          // call this after every oracle call when a cursor is active 
  99.          // If it encountered an error, we exit immediately 
  100.         if(ora_errorcode($in_cur)) { 
  101.                 echo  "Oracle code - ".ora_error($in_cur). "<br>\n"; 
  102.                 ora_logoff($conn); 
  103.                 exit; 
  104.         } 
  105.         return; 
  106. } 
  107.  
  108. function exequery($w_qry) { 
  109.     global $conn,$printqry,$others,$SID,$PHP_SELF,$schema; 
  110.     $cursor=ora_open($conn); printoraerr($cursor); 
  111.     ora_parse($cursor,$w_qry,0); printoraerr($cursor); 
  112.     ora_exec($cursor); printoraerr($cursor); 
  113.     $numrows=0; 
  114.     $w_numcols=ora_numcols($cursor); 
  115.      // print headers 
  116.     echo  " 
  117.      <TABLE WIDTH=\"100%\" BORDER=\"0\" CELLSPACING=\"1\" CELLPADDING=\"2\"> 
  118.      <TR>\n"; 
  119.     for ($i=0;$i<$w_numcols;$i++) { 
  120.         $align=(ora_columntype($cursor,$i)== "NUMBER")? "RIGHT": "LEFT"; 
  121.         echo  "\t<TH VALIGN=TOP ALIGN=$align>".ora_columnname($cursor,$i). "</TH>\n"; 
  122.     } 
  123.     echo  "</TR>\n"; 
  124.  
  125.     while(ora_fetch($cursor)){ 
  126.             echo  "<TR>\n"; 
  127.             for ($i=0;$i<$w_numcols;$i++) { 
  128.                 $align=(ora_columntype($cursor,$i)== "NUMBER")? "RIGHT": "LEFT"; 
  129.                 if(ora_columntype($cursor,$i)== "LONG") 
  130.                 echo  "<TD VALIGN=TOP ALIGN=$align><PRE>".ora_getcolumn($cursor,$i). "</PRE></TD>\n"; 
  131.                 else 
  132.                 echo  "<TD VALIGN=TOP ALIGN=$align>".ora_getcolumn($cursor,$i). "</TD>\n"; 
  133.                 printoraerr($cursor); 
  134.             } 
  135.             $numrows++; 
  136.             echo  "</TR>\n"; 
  137.     } 
  138.     if ($numrows==0) 
  139.         echo  "<TR><TD COLSPAN=\"$w_numcols\"><B>Query returned no records</B></TD></TR>\n"; 
  140.     else { 
  141.         echo  "<TR>\n"; 
  142.         echo  "<TH COLSPAN=\"".($w_numcols-1). "\" ALIGN=RIGHT>Count</TH>\n"; 
  143.         echo  "<TH ALIGN=RIGHT>$numrows</TH>\n"; 
  144.         echo  "</TR>\n"; 
  145.     } 
  146.     echo  "</TABLE>\n"; 
  147.     ora_close($cursor); 
  148.     if ($printqry== "on") { 
  149.         echo  "<H4>Query</H4><P><pre>".htmlspecialchars($w_qry). "</pre></P> 
  150.         <P ALIGN=CENTER><A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&printqry=off$others\"><small><u><i>Hide Query</i></u></small></A></P>\n"; 
  151.     } else { 
  152.         echo  "<P ALIGN=CENTER><A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&printqry=on$others\"><small><u><i>Show Query</i></u></small></A></P>\n"; 
  153.     } 
  154.     return; 
  155. } 
  156.  
  157. function change_schema(){ 
  158.     global $conn,$printqry,$others,$SID,$PHP_SELF,$schema; 
  159.     $qry= "SELECT username FROM all_users ORDER BY username"; 
  160.     $cursor=ora_open($conn); printoraerr($cursor); 
  161.     ora_parse($cursor,$qry,0); printoraerr($cursor); 
  162.     ora_exec($cursor); printoraerr($cursor); 
  163.     echo  "<form name=\"choseschema\" action=\"$PHP_SELF\"> 
  164.          <input type=\"hidden\" name=\"printqry\" value=\"$printqry\"> 
  165.          <input type=\"hidden\" name=\"SID\" value=\"$SID\">"; 
  166.     if(isset($objecttype)) 
  167.         echo  "<input type=\"hidden\" name=\"objecttype\" value=\"$objecttype\">\n"; 
  168.     if(isset($oper)) 
  169.          echo  "<input type=\"hidden\" name=\"oper\" value=\"$oper\">\n"; 
  170.     if(isset($objectnm)) 
  171.          echo  "<input type=\"hidden\" name=\"objectnm\" value=\"$objectnm\">\n"; 
  172.     echo  "<select name=\"schema\">\n"; 
  173.     while(ora_fetch($cursor)){ 
  174.         $option=ora_getcolumn($cursor,0); 
  175.         if( "$option" ==  "$schema") 
  176.         echo  "<option value=\"$option\" SELECTED>$option</option>\n"; 
  177.         else 
  178.         echo  "<option value=\"$option\">$option</option>\n"; 
  179.     } 
  180.     echo  "</select>\n<input type=\"submit\"  value=\"Change Schema\">\n</form>\n"; 
  181.     ora_close($cursor); 
  182.     echo  "<P>Choose the schema you want and press the button. You will be  
  183.     taken to the front page and then onwards you can see <B>only</B> the  
  184.     objects owned by the new schema.</P>\n"; 
  185.     return; 
  186. } 
  187.  
  188. function user_sources() { 
  189.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm, $SID, $printqry,$schema; 
  190.     $qry= " 
  191. SELECT 
  192.     '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=$objecttype&oper=srcdesc&printqry=$printqry&objectnm='||I.name||'\">'||I.name||'</A>'  \"Name\", 
  193.     COUNT(I.line) \"Lines\" 
  194. FROM 
  195.     all_source I 
  196. WHERE I.type='$objecttype' 
  197.   AND I.owner='$schema' 
  198. GROUP BY 
  199.     I.name 
  200. ORDER BY 
  201.     I.name"; 
  202.     $desc = $ObjectDesc[$objecttype]; 
  203.     exequery($qry); 
  204. } 
  205.  
  206. function user_src_desc() { 
  207.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm, $SID,$schema; 
  208.     $qry= " 
  209. SELECT 
  210.     '<PRE>'||NVL(I.text,' ')||'</PRE>' \"Code\" 
  211. FROM 
  212.     all_source I 
  213. WHERE I.type='$objecttype' 
  214.   AND I.name='$objectnm' 
  215.   AND I.owner='$schema' 
  216. ORDER BY 
  217.     I.line"; 
  218.     echo  "<H3>$objectnm</H3>\n"; 
  219.     exequery($qry); 
  220. } 
  221.  
  222. function user_views() { 
  223.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm, $SID,$printqry,$schema; 
  224.     $qry= " 
  225. SELECT "; 
  226.   if ( isset($objectnm) ) 
  227.     $qry .=  " I.view_name  \"Name\",\n I.text \"Code\" "; 
  228.     else 
  229.     $qry .=  " '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=$objecttype&printqry=$printqry&oper=srcdesc&objectnm='||I.view_name||'\">'||I.view_name||'</A>'  \"Name\",\n I.text_length \"Code Size\" "; 
  230.     $qry .=  " 
  231. FROM 
  232.     all_views I "; 
  233.   if ( isset($objectnm) ) 
  234.         $qry .=  " WHERE I.view_name = '$objectnm' AND I.owner='$schema'"; 
  235.     else 
  236.         $qry .=  " WHERE  I.owner='$schema'"; 
  237.   $qry .=  "ORDER BY I.view_name"; 
  238.     $desc = $ObjectDesc[$objecttype]; 
  239.     exequery($qry); 
  240. } 
  241.  
  242. function user_synonyms() { 
  243.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm, $SID, $printqry,$schema; 
  244.     $qry= " 
  245. SELECT 
  246.     I.synonym_name  \"Synonym\", 
  247.     O.status \"Status\", 
  248.         '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&printqry=$printqry&objectnm='||I.TABLE_NAME||'\">'|| 
  249.         I.table_name||'</A>' \"Table\", 
  250.     NVL(I.db_link,' ') \"DB Link\" 
  251. FROM 
  252.     all_objects O, all_synonyms I 
  253. WHERE 
  254.     O.object_name = I.synonym_name 
  255. AND 
  256.     O.object_type = 'SYNONYM' 
  257. AND  
  258.     O.OWNER='$schema' 
  259. AND  
  260.     I.OWNER='$schema' 
  261. ORDER BY 
  262.     I.synonym_name"; 
  263.     $desc = $ObjectDesc[$objecttype]; 
  264.     exequery($qry); 
  265. } 
  266.  
  267. function user_sequences() { 
  268.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm, $SID, $printqry,$schema; 
  269.     $qry= " 
  270. SELECT 
  271.     I.sequence_name  \"Sequence\", 
  272.         I.last_number \"Current\", 
  273.     O.status \"Status\", 
  274.     NVL(I.min_value,0) \"Min\", 
  275.     NVL(I.max_value,0) \"Max\", 
  276.     I.increment_by \"Incr.\", 
  277.     DECODE(I.cycle_flag,'Y','Yes','No') \"Cycle\", 
  278.     DECODE(I.order_flag,'Y','Yes','No') \"Order\", 
  279.         I.cache_size \"Cache\" 
  280. FROM 
  281.     all_objects O, all_sequences I 
  282. WHERE 
  283.     O.object_name = I.sequence_name 
  284. AND 
  285.     O.object_type = 'SEQUENCE' 
  286. AND 
  287.     O.owner='$schema' 
  288. AND 
  289.     I.sequence_owner='$schema' 
  290. ORDER BY 
  291.     I.sequence_name"; 
  292.     $desc = $ObjectDesc[$objecttype]; 
  293.     exequery($qry); 
  294. } 
  295.  
  296. function user_triggers() { 
  297.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm, $SID, $printqry,$schema; 
  298.     $qry= " 
  299. SELECT 
  300.     '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=$objecttype&printqry=$printqry&oper=srcdesc&objectnm='||I.trigger_name||'\">'||I.trigger_name||'</A>'  \"Name\", 
  301.     I.trigger_type    \"Type\", 
  302.     O.status \"Status\", 
  303.     I.status \"Enabled\", 
  304.         '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&printqry=$printqry&objectnm='||I.TABLE_NAME||'\">'|| 
  305.         I.table_name||'</A>' \"Table\", 
  306.     I.triggering_event \"Trig Event\", 
  307.     '<PRE>'||NVL(I.description,' ')||'</PRE>' \"Description\" 
  308. FROM 
  309.     all_objects O, all_triggers I 
  310. WHERE 
  311.     O.object_name = I.trigger_name 
  312. AND 
  313.     O.object_type = 'TRIGGER' 
  314. AND 
  315.     O.owner = '$schema' 
  316. AND 
  317.     I.owner = '$schema' 
  318. ORDER BY 
  319.     I.trigger_name"; 
  320.     $desc = $ObjectDesc[$objecttype]; 
  321.     exequery($qry); 
  322. } 
  323.  
  324. function user_trig_desc() { 
  325.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm, $SID, $printqry,$schema; 
  326.     $qry= " 
  327. SELECT 
  328.     I.trigger_body    \"Code\" 
  329. FROM 
  330.      user_triggers I 
  331. WHERE 
  332.     I.trigger_name = '$objectnm'"; 
  333.     echo  "<H3>$objectnm</H3>\n"; 
  334.     exequery($qry); 
  335. } 
  336.  
  337. function user_indexes() { 
  338.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm,$SID,$printqry,$schema; 
  339.     if ( $objecttype ==  "INDEX" && isset($objectnm))  
  340.     $qry = "SELECT * FROM user_indexes WHERE index_name='$objectnm' "; 
  341.     else 
  342.     $qry= " 
  343. SELECT  
  344.     '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=INDEX&printqry=$printqry&objectnm='||index_name||'\">'||index_name||'</A>' 
  345.  \"Name\",  
  346.     '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&printqry=$printqry&objectnm='||table_name||'\">'|| 
  347.     table_name||'</A>'   \"Table\", 
  348.     column_name          \"Column\", 
  349.     column_length        \"Column length\" 
  350. FROM 
  351.     all_ind_columns 
  352. WHERE  
  353.     index_owner = '$schema' 
  354. ORDER BY  
  355.     column_position"; 
  356.     if ( $objecttype ==  "INDEX" && isset($objectnm))  { 
  357.     echo  "<H4>$objectnm</H4>\n"; 
  358.     } 
  359.     exequery($qry); 
  360. } 
  361.  
  362. function user_tables() { 
  363.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm,$SID,$printqry,$schema; 
  364.     $qry= " 
  365. SELECT 
  366.          table_name  \"Name\", 
  367. '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&oper=tabdesc&printqry=$printqry&objectnm='||TABLE_NAME||'\">X</A>' \"Desc\", 
  368. '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&oper=tabidx&printqry=$printqry&objectnm='||TABLE_NAME||'\">X</A>' \"Indexes\", 
  369. '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&oper=tabcons&printqry=$printqry&objectnm='||TABLE_NAME||'\">X</A>' \"Constraints\", 
  370. '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&oper=tabtrig&printqry=$printqry&objectnm='||TABLE_NAME||'\">X</A>' \"Triggers\", 
  371. '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&oper=tabgrant&printqry=$printqry&objectnm='||TABLE_NAME||'\">X</A>' \"Grants\", 
  372. '<A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&oper=tabstat&printqry=$printqry&objectnm='||TABLE_NAME||'\">X</A>' \"Stats\" 
  373. FROM all_tables "; 
  374.   if ( $objectnm ) 
  375.         $qry .=  " WHERE table_name = '$objectnm' AND owner='$schema'"; 
  376.     else 
  377.         $qry .=  " WHERE owner='$schema'"; 
  378.     $qry .=  "         ORDER BY 1"; 
  379.     exequery($qry); 
  380. } 
  381.  
  382. function user_tab_desc() { 
  383.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm,$SID,$printqry,$schema; 
  384.   $qry =  " 
  385. SELECT 
  386.     I.column_name \"Column\", 
  387.     I.data_type||'('|| 
  388.     decode(I.data_type, 
  389.             'NUMBER',I.data_precision||','||I.data_scale 
  390.             ,I.data_length)||')' \"Data Type\", 
  391.     I.nullable \"Null?\", 
  392.     I.data_default \"Default\", 
  393.     nvl(C.comments,' ') \"Comments\" 
  394.  
  395. FROM 
  396.             all_col_comments C, all_tab_columns I 
  397. WHERE 
  398.             I.table_name='$objectnm' 
  399. AND 
  400.     C.owner = '$schema' 
  401. AND 
  402.     I.owner = '$schema' 
  403. AND  
  404.         C.table_name=I.table_name 
  405. AND    
  406.       C.column_name=I.column_name"; 
  407.  
  408.     echo  "<H3><A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&printqry=$printqry&objectnm=$objectnm\">$objectnm</A></H3>\n"; 
  409.     echo  "<H4>Description</H4>\n"; 
  410.     exequery($qry); 
  411. } 
  412.  
  413. function user_tab_idx() { 
  414.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm,$SID,$printqry,$schema; 
  415.     $qry= " 
  416. SELECT 
  417.         C.index_name    \"Index\", 
  418.         I.uniqueness    \"Unique\", 
  419.         C.column_name   \"Column\", 
  420.         C.column_position \"Position\" 
  421. FROM 
  422.         all_ind_columns C, all_indexes I 
  423. WHERE 
  424.         I.table_name='$objectnm' 
  425. AND 
  426.         I.table_owner='$schema' 
  427. AND 
  428.         I.index_owner='$schema' 
  429. AND 
  430.         C.index_name = I.index_name 
  431. ORDER BY 
  432.         C.index_name, 
  433.         C.column_position"; 
  434.     echo  "<H3><A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&printqry=$printqry&objectnm=$objectnm\">$objectnm</A></H3>\n"; 
  435.     echo  "<H4>Indexes</H4>\n"; 
  436.     exequery($qry); 
  437. } 
  438.  
  439. function user_tab_cons() { 
  440.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm,$SID,$printqry,$schema; 
  441.     $qry= " 
  442. SELECT 
  443.         C.constraint_name   \"Constraint\", 
  444.         decode(I.constraint_type,'C','Not Null', 
  445.                     'P', 'Primary Key', 
  446.                     'R', 'Referential', 
  447.                     'Unknown') 
  448.                     \"Type\", 
  449.         C.column_name   \"Column\", 
  450.         C.position \"Position\", 
  451.         I.status \"Status\" 
  452. FROM 
  453.         all_cons_columns C, all_constraints I 
  454. WHERE 
  455.         I.table_name='$objectnm' 
  456. AND 
  457. C.owner = '$schema' 
  458. AND 
  459. I.owner = '$schema' 
  460. AND 
  461.         C.constraint_name = I.constraint_name 
  462. ORDER BY 
  463.         C.constraint_name"; 
  464.  
  465.     echo  "<H3><A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&printqry=$printqry&objectnm=$objectnm\">$objectnm</A></H3>\n"; 
  466.     echo  "<H4>Constraints</H4>\n"; 
  467.     exequery($qry); 
  468. } 
  469.  
  470. function user_tab_stat() { 
  471.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm,$SID,$printqry,$schema; 
  472.     $qry= " 
  473. SELECT * 
  474. FROM 
  475.         all_tables I 
  476. WHERE 
  477.         I.table_name='$objectnm' 
  478. AND I.owner='$schema' 
  479. ORDER BY 1"; 
  480.  
  481.     echo  "<H3><A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&printqry=$printqry&objectnm=$objectnm\">$objectnm</A></H3>\n"; 
  482.     echo  "<H4>Stats</H4>\n"; 
  483.     exequery($qry); 
  484. } 
  485.  
  486. function user_tab_grant() { 
  487.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm,$SID,$printqry,$schema; 
  488.     $qry= " 
  489. SELECT 
  490.         I.grantee   \"Granted To\", 
  491.         decode(I.select_priv,'Y','Yes', 'No') \"Select\", 
  492.         decode(I.insert_priv,'Y','Yes', 'No') \"Insert\", 
  493.         decode(I.delete_priv,'Y','Yes', 'No') \"Update\", 
  494.         decode(I.update_priv,'Y','Yes', 'No') \"Delete\", 
  495.         decode(I.references_priv,'Y','Yes', 'No') \"Refer.\", 
  496.         decode(I.alter_priv,'Y','Yes', 'No') \"Alter\", 
  497.         decode(I.index_priv,'Y','Yes', 'No') \"Index\", 
  498.         I.grantor   \"Granted By\" 
  499. FROM 
  500.         all_tab_grants I 
  501. WHERE 
  502.         I.table_name='$objectnm' 
  503. AND 
  504.     I.owner='$schema' 
  505. ORDER BY 1"; 
  506.  
  507.     echo  "<H3><A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&printqry=$printqry&objectnm=$objectnm\">$objectnm</A></H3>\n"; 
  508.     echo  "<H4>Grants</H4>\n"; 
  509.     exequery($qry); 
  510. } 
  511.  
  512. function user_tab_trig() { 
  513.     global $ObjectDesc,$objecttype,$PHP_SELF,$objectnm,$SID,$printqry,$schema; 
  514.     $qry= " 
  515. SELECT 
  516.     I.trigger_name  \"Trigger\", 
  517.     I.trigger_type    \"Type\", 
  518.     O.status \"Status\", 
  519.     I.status \"Enabled\", 
  520.     I.triggering_event \"Trig Event\" 
  521. FROM 
  522.     all_objects O, all_triggers I 
  523. WHERE 
  524.     I.table_name='$objectnm' 
  525. AND 
  526.     O.object_name = I.trigger_name 
  527. AND 
  528.     O.owner = '$schema' 
  529.     AND 
  530.         I.owner = '$schema' 
  531. AND 
  532.     O.object_type = 'TRIGGER' 
  533. ORDER BY 
  534.     I.trigger_name"; 
  535.  
  536.     echo  "<H3><A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&objecttype=TABLE&printqry=$printqry&objectnm=$objectnm\">$objectnm</A></H3>\n"; 
  537.     echo  "<H4>Triggers</H4>\n"; 
  538.     exequery($qry); 
  539. } 
  540.  
  541. /* 
  542. || 
  543. || Main 
  544. || 
  545. */ 
  546. if ( $changeschema ==  "CHANGESCHEMA" ) { 
  547.     change_schema() ; 
  548. } elseif (isset($objecttype)){ 
  549.     echo  "<H2><A HREF=\"$PHP_SELF?schema=$schema&SID=$SID&printqry=$printqry&objecttype=$objecttype\">$ObjectDesc[$objecttype]</A></H2>\n"; 
  550. } else { 
  551.     echo  "<H2>Instance Parameters</H2>\n"; 
  552.     $qry= "SELECT name \"Parameter\", nvl(value,' ') \"Value\" from v\$parameter"; 
  553.     exequery($qry); 
  554.      /* 
  555.     echo "<H2>Memory(SGA) Parameters</H2>\n"; 
  556.     $qry="SELECT * from s_v\$sgastat"; 
  557.     exequery($qry); 
  558.     */ 
  559.     echo  "<H2>Credits</H2> 
  560.                 <H3>Author</H3> 
  561.                 <P><A HREF=\"http://www.csoft.net/~vsbabu/\">V.Satheesh Babu</A> - <I>Released under <A HREf=\"http://www.gnu.org/copyleft/gpl.html\">GNU Public License</A></I></P> 
  562.                 <H3>Version History</H3> 
  563.                 <OL> 
  564.                 <LI><B>Aug 01, 1999</B> -  Basic Browsing </LI> 
  565.                 <LI><B>Aug 03, 1999</B> -  Sequence, Packages and Views </LI> 
  566.                 <LI><B>Nov 01, 1999</B> -  Change schema </LI> 
  567.                 </OL> 
  568.                 <H3>Requirements</H3> 
  569.                 <OL> 
  570.                     <LI><A HREF=\"http://www.oracle.com\">Oracle</A> - with a logon with SELECT privileges on all_* tables</LI> 
  571.                     <LI><A HREF=\"http://www.php.net\">PHP</A> - with Oracle (ora_*) functions' support</LI> 
  572.                     <LI><A HREF=\"http://www.apache.org\">Apache</A> - wth PHP support :-)</LI> 
  573.                 </OL>\n"; 
  574. } 
  575.  
  576. if (!isset($orderby)) { 
  577.         $orderby=1; 
  578. } 
  579.  
  580. if ( $objecttype ==  "INDEX" ) user_indexes(); 
  581. if ( $objecttype ==  "TRIGGER" ) { 
  582.          if($oper== "srcdesc") 
  583.              user_trig_desc(); 
  584.          else 
  585.              user_triggers(); 
  586. } 
  587. if ( $objecttype ==  "SYNONYM" ) user_synonyms(); 
  588. if ( $objecttype ==  "SEQUENCE" ) user_sequences(); 
  589. if ( ($objecttype ==  "PROCEDURE") || 
  590.      ($objecttype ==  "FUNCTION" ) || 
  591.      ($objecttype ==  "PACKAGE" )  || 
  592.      ($objecttype ==  "PACKAGE BODY" )) { 
  593.          if($oper== "srcdesc") 
  594.              user_src_desc(); 
  595.          else 
  596.              user_sources(); 
  597. } 
  598. if ( $objecttype ==  "TABLE" ){ 
  599.     if ( !$objectnm ) 
  600.         user_tables(); 
  601.     else 
  602.         if($oper== "tabdesc") user_tab_desc(); 
  603.         else if($oper== "tabidx") user_tab_idx(); 
  604.         else if($oper== "tabcons") user_tab_cons(); 
  605.         else if($oper== "tabtrig") user_tab_trig(); 
  606.         else if($oper== "tabgrant") user_tab_grant(); 
  607.         else if($oper== "tabstat") user_tab_stat(); 
  608.         else user_tables(); 
  609. } 
  610.  
  611. if ( $objecttype ==  "VIEW" ) { 
  612.              user_views(); 
  613. } 
  614.  
  615. ora_logoff($conn); 
  616. ?> 
  617. </TD> 
  618. </TR> 
  619. </TABLE> 
  620. <HR> 
  621. <?  echo $sidebar; ?> 
  622. <center> 
  623. <? selthm(); ?> 
  624. </center> 
  625. </BODY> 
  626. </HTML> 
  627.  
  628.