lib/odbc.php

   1 <?php
   2
   3 /**
   4  * odbc.php - This is the ODBC Socket Server class PHP client class
   5  * with sample usage at bottom.
   6  *
   7  * Released into the public domain for version 0.90 of ODBC Socket Server
   8  * {@link http://odbc.linuxbox.com/}
   9  * @author Team FXML
  10  * @copyright Copyright (c) 1999 Team FXML
  11  * @license http://odbc.linuxbox.com/ public domain
  12  * @package moodlecore
  13  */
  14
  15  /**
  16  * ODBC Socket Server class
  17  */
  18 class ODBCSocketServer {
  19
  20    /**
  21     * Name of the host to connect to
  22     * @var string $sHostName
  23     */
  24     var $sHostName;
  25    /**
  26     * Port to connect to
  27     * @var int $nPort
  28     */
  29     var $nPort;
  30    /**
  31     * Connection string to use
  32     * @var string $sConnectionString
  33     */
  34     var $sConnectionString;
  35
  36     //
  37     /**
  38      * Function to parse the SQL
  39      *
  40      * @param string $sSQL The SQL statement to parse
  41      * @return string
  42      */
  43     function ExecSQL($sSQL) {
  44
  45         $fToOpen = fsockopen($this->sHostName, $this->nPort, &$errno, &$errstr, 30);
  46         if (!$fToOpen)
  47         {
  48             //contruct error string to return
  49             $sReturn = "<?xml version=\"1.0\"?>\r\n<result state=\"failure\">\r\n<error>$errstr</error>\r\n</result>\r\n";
  50         }
  51         else
  52         {
  53             //construct XML to send
  54             //search and replace HTML chars in SQL first
  55             $sSQL = HTMLSpecialChars($sSQL);
  56             $sSend = "<?xml version=\"1.0\"?>\r\n<request>\r\n<connectionstring>$this->sConnectionString</connectionstring>\r\n<sql>$sSQL</sql>\r\n</request>\r\n";
  57             //write request
  58             fputs($fToOpen, $sSend);
  59             //now read response
  60             while (!feof($fToOpen))
  61             {
  62                 $sReturn = $sReturn . fgets($fToOpen, 128);
  63             }
  64             fclose($fToOpen);
  65         }
  66         return $sReturn;
  67     }
  68 }//class
  69 ?>