一个SQL管理员的web接口

来源：互联网发布：乐视清除cache数据中编辑：程序博客网时间：2024/05/18 01:28

<?
    /*************************************************************************************
     *        SQLAdmin  v2.0  -  An  SQL  Administration  User  Interface  for  the  web *
     *            Copyright  (C)  1997-98    Alessandro  Vernet  <avernet@scdi.org>      *
     *************************************************************************************
     *      This  library  is  free  software;  you  can  redistribute  it  and/or       *
     *      modify  it  under  the  terms  of  the  GNU  Library  General  Public        *
     *      License  as  published  by  the  Free  Software  Foundation;  either         *
     *      version  2  of  the  License,  or  (at  your  option)  any  later  version.  *
     *                                                                                   *
     *      This  library  is  distributed  in  the  hope  that  it  will  be  useful,   *
     *      but  WITHOUT  ANY  WARRANTY;  without  even  the  implied  warranty  of      *
     *      MERCHANTABILITY  or  FITNESS  FOR  A  PARTICULAR  PURPOSE.    See  the  GNU  *
     *      Library  General  Public  License  for  more  details.                       *
     *                                                                                   *
     *      You  should  have  received  a  copy  of  the  GNU  Library  General  Public *
     *      License  along  with  this  library;  if  not,  write  to  the               *
     *      Free  Software  Foundation,  Inc.,  59  Temple  Place  -  Suite  330,        *
     *      Boston,  MA    02111-1307,  USA.                                             *
     *************************************************************************************/

    /*  TODO:
      *  -  Add  sort  order.
      *  -  Add  simple  view.
      *  -  Add  some  documentation.
      */

    /*  LIMITATIONS:
      *  -  Works  only  with  mSQL.
      */

    /*  HISTORY:
      *  -  97-11-05  (avernet)  Corrected  a  bug  with  quote.
      *  -  98-01-01  (avernet)  Added  a  sortColumn  parameter  to
      *      administrationTable  function.
      *  -  98-03-14  (avernet)  Added  function  addTable  to  enable  users  to
      *      add  (but  not  modify)  en  entry  to  the  database.
      *  -  98-05-19  (avernet)  Submitted  to  PX.
      *  -  98-10-11  (avernet)  Now  SQLAdmin  works  with  PHP3.  The  PHP2  version
      *      will  not  be  mainteained  anymore.
      *  -  98-10-11  (avernet)  SQLAdmin  is  now  distributed  under  the  LGPL
      *      instead  of  MPL.
      */

    function  escapeforhtml  ($string)
    {
        $result  =  $string;
        //$result  =  ereg_replace  ("/"",  """,  $result);
        $result  =  ereg_replace  ("<",  "<",  $result);
        $result  =  ereg_replace  (">",  ">",  $result);
        return  $result;
    }

    function  displayTuple  ($fieldsNumber,  $fieldNames,
                                                  $fieldLengths,  $values,  $mode)
    {
        $result  =  "";
        $result  .=  "<FORM  METHOD=/"post/"><TABLE  BORDER><TR>"  .
            "<TD  BGCOLOR=/"#CCCCFF/">";
        $result  .=  "<TABLE  CELLSPACING=/"0/"  CELLPADDING=/"0/">";
        $fieldIndex  =  0;
        while  ($fieldIndex  <  $fieldsNumber)
        {
            $result  .=  "<TR><TD>"  .  $fieldNames  [$fieldIndex]  .  "</TD><TD>";
            if  ($fieldLengths  [$fieldIndex]  <=  128)
            {
                $result  .=  "<INPUT  TYPE=/"text/"  NAME=/""  .
                    $fieldNames  [$fieldIndex]  .  "/"  VALUE=/""  .
                    $values  [$fieldIndex]  .  "/"  SIZE=/"64/">";
            }
            else
            {
                $result  .=  "<TEXTAREA  NAME=/""  .
                    $fieldNames  [$fieldIndex]  .  "/""  .
                    "  COLS=/"64/"  ROWS=/"10/"  WRAP=/"virtual/">"  .
                    escapeforhtml  ($values  [$fieldIndex])  .  "</TEXTAREA>";
            }
            $result  .=    "<INPUT  TYPE=/"hidden/"  NAME=/"old-"  .
                $fieldNames  [$fieldIndex]  .
                "/"  VALUE=/""  .  escapeforhtml  ($values  [$fieldIndex])  .  "/">"  .
                "</TD></TR>";
            $fieldIndex++;
        }
        $result  .=  "<TR><TD  ALIGN=/"center/"  COLSPAN=/"2/">";
        if  ($mode  ==  "modify")
        {
            $result  .=  "<INPUT  TYPE=/"submit/"  NAME=/"remove/"  VALUE=/"Remove/">";
            $result  .=  "<INPUT  TYPE=/"submit/"  NAME=/"update/"  VALUE=/"Update/">";
        }
        else
            {  $result  .=  "<INPUT  TYPE=/"submit/"  NAME=/"add/"  VALUE=/"Add/">";  }
        $result  .=  "</TABLE></TD></TR></TABLE></FORM>";
        return  $result;
    }

    function  fieldFromType  ($text,  $type)
    {
        if  ($type  ==  "int"  ||  $type  ==  "uint"  ||  $type  == "real")
            {  $result  =  $text;  }
        else
            {  $result  =  "'"  .  AddSlashes  ($text)  .  "'";  }
        return  $result;
    }

    function  executeMSQL  ($database,  $command)
    {
        /*echo  "<TT>"  .  $command  .  "</TT><HR>";*/
        mSQL  ($database,  $command);
    }

    function  handleRemove  ($database,  $table,  $fieldsNumber,
                                                  $fieldNames,  $fieldLengths,  $fieldTypes)
    {
        global  $remove;
        if  ($remove  !=  "")
        {
            $command  =  "DELETE  FROM  "  .  $table  .  "  WHERE  ";
            $fieldIndex  =  0;
            while  ($fieldIndex  <  $fieldsNumber)
            {
                $fieldName  =  "old-"  .  $fieldNames  [$fieldIndex];
                global  $$fieldName;
                $command  .=  $fieldNames  [$fieldIndex]  .  "="  .
                    fieldFromType  ($$fieldName,  $fieldTypes  [$fieldIndex]);
                if  ($fieldIndex  !=  $fieldsNumber  -  1)
                    {  $command  .=  "  AND  ";  }
                $fieldIndex++;   共3页: 上一页 1 [2] [3] 下一页 <script type="text/javascript"></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>