home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2005 October / PCWOCT05.iso / Software / FromTheMag / XAMPP 1.4.14 / xampp-win32-1.4.14-installer.exe / xampp / php / pear / DB / DataObject / Cast.php next >
Encoding:
PHP Script  |  2004-10-01  |  9.2 KB  |  341 lines
  1. <?php
  2. /* vim: set expandtab tabstop=4 shiftwidth=4: */
  3. // +----------------------------------------------------------------------+
  4. // | PHP Version 4                                                        |
  5. // +----------------------------------------------------------------------+
  6. // | Copyright (c) 1997-2002 The PHP Group                                |
  7. // +----------------------------------------------------------------------+
  8. // | This source file is subject to version 2.02 of the PHP license,      |
  9. // | that is bundled with this package in the file LICENSE, and is        |
  10. // | available at through the world-wide-web at                           |
  11. // | http://www.php.net/license/2_02.txt.                                 |
  12. // | If you did not receive a copy of the PHP license and are unable to   |
  13. // | obtain it through the world-wide-web, please send a note to          |
  14. // | license@php.net so we can mail you a copy immediately.               |
  15. // +----------------------------------------------------------------------+
  16. // | Authors:  Alan Knowles <alan@akbkhome.com>                           |
  17. // +----------------------------------------------------------------------+
  18. //
  19. // $Id: Cast.php,v 1.6 2004/06/05 02:32:34 alan_k Exp $
  20. //
  21. //  Prototype Castable Object.. for DataObject queries
  22. //
  23.  
  24. /**
  25. *  
  26. * @abstract Storage for Data that may be cast into a variety of formats.
  27. * 
  28. * Common usages:
  29. *   // blobs
  30. *   $data = DB_DataObject_Cast::blob($somefile);
  31. *   $data = DB_DataObject_Cast::string($somefile);
  32. *   $dataObject->someblobfield = $data
  33. *
  34. *   // dates?
  35. *   $d1 = new DB_DataObject_Cast::date('12/12/2000');
  36. *   $d2 = new DB_DataObject_Cast::date(2000,12,30);
  37. *   $d3 = new DB_DataObject_Cast::date($d1->year, $d1->month+30, $d1->day+30);
  38. *   
  39. *   // time, datetime.. ?????????
  40. *
  41. *   // raw sql????
  42. *    $data = DB_DataObject_Cast::sql('cast("123123",datetime)');
  43. *    $data = DB_DataObject_Cast::sql('NULL');
  44. *
  45. *   // int's/string etc. are proably pretty pointless..!!!!
  46. *
  47. *   
  48. *   inside DB_DataObject, 
  49. *   if (is_a($v,'db_dataobject_class')) {
  50. *           $value .= $v->toString(DB_DATAOBJECT_INT,'mysql');
  51. *   }
  52. *
  53. *
  54. *
  55. *
  56. * @version    $Id: Cast.php,v 1.6 2004/06/05 02:32:34 alan_k Exp $
  57. */ 
  58. class DB_DataObject_Cast {
  59.         
  60.     /**
  61.     * Type of data Stored in the object..
  62.     *
  63.     * @var string       (date|blob|.....?)
  64.     * @access public        
  65.     */
  66.     var $type;
  67.         
  68.     /**
  69.     * Data For date representation
  70.     *
  71.     * @var int  day/month/year
  72.     * @access public
  73.     */
  74.     var $day;
  75.     var $month;
  76.     var $year;
  77.  
  78.     
  79.     /**
  80.     * Generic Data..
  81.     *
  82.     * @var string
  83.     * @access public
  84.     */
  85.  
  86.     var $value;
  87.  
  88.  
  89.  
  90.     /**
  91.     * Blob consructor
  92.     *
  93.     * create a Cast object from some raw data.. (binary)
  94.     * 
  95.     * 
  96.     * @param   string (with binary data!)
  97.     *
  98.     * @return   object DB_DataObject_Cast
  99.     * @access   public 
  100.     */
  101.   
  102.     function blob($value) {
  103.         $r = new DB_DataObject_Cast;
  104.         $r->type = 'blob';
  105.         $r->value = $value;
  106.         return $r;
  107.     }
  108.  
  109.  
  110.     /**
  111.     * String consructor (actually use if for ints and everything else!!!
  112.     *
  113.     * create a Cast object from some string (not binary)
  114.     * 
  115.     * 
  116.     * @param   string (with binary data!)
  117.     *
  118.     * @return   object DB_DataObject_Cast
  119.     * @access   public 
  120.     */
  121.   
  122.     function string($value) {
  123.         $r = new DB_DataObject_Cast;
  124.         $r->type = 'string';
  125.         $r->value = $value;
  126.         return $r;
  127.     }
  128.     
  129.     /**
  130.     * SQL constructor (for raw SQL insert)
  131.     *
  132.     * create a Cast object from some sql
  133.     * 
  134.     * @param   string (with binary data!)
  135.     *
  136.     * @return   object DB_DataObject_Cast
  137.     * @access   public 
  138.     */
  139.   
  140.     function sql($value) {
  141.         $r = new DB_DataObject_Cast;
  142.         $r->type = 'sql';
  143.         $r->value = $value;
  144.         return $r;
  145.     }
  146.  
  147.  
  148.     /**
  149.     * Date Constructor
  150.     *
  151.     * create a Cast object from some string (not binary)
  152.     * 
  153.     * 
  154.     * @param   vargs... accepts
  155.     *       dd/mm
  156.     *       dd/mm/yyyy
  157.     *       yyyy-mm
  158.     *       yyyy-mm-dd
  159.     *       array(yyyy,dd)
  160.     *       array(yyyy,dd,mm)
  161.     *
  162.     *
  163.     *
  164.     * @return   object DB_DataObject_Cast
  165.     * @access   public 
  166.     */
  167.   
  168.     function date() {  
  169.         $args = func_get_args();
  170.         switch(count($args)) {
  171.             case 0: // no args = today!
  172.                $bits =  explode('-',date('Y-m-d'));
  173.                 break;
  174.             case 1: // one arg = a string 
  175.             
  176.                 if (strpos($args[0],'/') !== false) {
  177.                     $bits = array_reverse(explode('/',$args[0]));
  178.                 } else {
  179.                     $bits = explode('-',$args[0]);
  180.                 }
  181.             default: // 2 or more..
  182.                 $bits = $args;
  183.         }
  184.         if (count($bits) == 1) { // if YYYY set day = 1st..
  185.             $bits[] = 1;
  186.         }
  187.         
  188.         if (count($bits) == 2) { // if YYYY-DD set day = 1st..
  189.             $bits[] = 1;
  190.         }
  191.         
  192.         // if year < 1970 we cant use system tools to check it...
  193.         // so we make a few best gueses....
  194.         // basically do date calculations for the year 2000!!!
  195.         // fix me if anyone has more time...
  196.         if (($bits[0] < 1975) || ($bits[0] > 2030)) {
  197.             $oldyear = $bits[0];
  198.             $bits = explode('-',date('Y-m-d',mktime(1,1,1,$bits[1],$bits[2],2000)));
  199.             $bits[0] = ($bits[0] - 2000) + $oldyear;
  200.         } else {
  201.             // now mktime
  202.             $bits = explode('-',date('Y-m-d',mktime(1,1,1,$bits[1],$bits[2],$bits[0])));
  203.         }
  204.         $r = new DB_DataObject_Cast;
  205.         $r->type = 'date';
  206.         list($r->year,$r->month,$r->day) = $bits;
  207.         return $r;
  208.     }
  209.     
  210.     /**
  211.     * get the string to use in the SQL statement for this...
  212.     *
  213.     * 
  214.     * @param   int      $to Type (DB_DATAOBJECT_*
  215.     * @param   string  $db    (eg. mysql|mssql.....)
  216.     * 
  217.     *
  218.     * @return   string 
  219.     * @access   public
  220.     */
  221.   
  222.     function toString($to=false,$db='mysql') {
  223.         // if $this->type is not set, we are in serious trouble!!!!
  224.         // values for to:
  225.         $method = 'toStringFrom'.$this->type;
  226.         return $this->$method($to,$db);
  227.     }
  228.     
  229.     /**
  230.     * get the string to use in the SQL statement from a blob of binary data 
  231.     *   ** Suppots only blob->postgres::bytea
  232.     *
  233.     * @param   int      $to Type (DB_DATAOBJECT_*
  234.     * @param   string  $db    (eg. mysql|mssql.....)
  235.     * 
  236.     *
  237.     * @return   string 
  238.     * @access   public
  239.     */
  240.     function toStringFromBlob($to,$db) {
  241.         // first weed out invalid casts..
  242.         // in blobs can only be cast to blobs.!
  243.         
  244.         // perhaps we should support TEXT fields???
  245.         
  246.         if (!($to & DB_DATAOBJECT_BLOB)) {
  247.             return PEAR::raiseError('Invalid Cast from a DB_DataObject_Cast::blob to something other than a blob!');
  248.         }
  249.         
  250.         switch ($db) {
  251.             case 'pgsql':
  252.                 return "'".pg_escape_bytea($this->value)."'::bytea";
  253.             
  254.             default:
  255.                 return PEAR::raiseError("DB_DataObject_Cast cant handle blobs for Database:$db Yet");
  256.         }
  257.     
  258.     }
  259.     
  260.     /**
  261.     * get the string to use in the SQL statement for a blob from a string!
  262.     *   ** Suppots only string->postgres::bytea
  263.     * 
  264.     *
  265.     * @param   int      $to Type (DB_DATAOBJECT_*
  266.     * @param   string  $db    (eg. mysql|mssql.....)
  267.     * 
  268.     *
  269.     * @return   string 
  270.     * @access   public
  271.     */
  272.     function toStringFromString($to,$db) {
  273.         // first weed out invalid casts..
  274.         // in blobs can only be cast to blobs.!
  275.         
  276.         // perhaps we should support TEXT fields???
  277.         // 
  278.         
  279.         if (!($to & DB_DATAOBJECT_BLOB)) {
  280.             return PEAR::raiseError('Invalid Cast from a DB_DataObject_Cast::string to something other than a blob!'.
  281.                 ' (why not just use native features)');
  282.         }
  283.         
  284.         switch ($db) {
  285.             case 'pgsql':
  286.                 return "'".pg_escape_string($this->value)."'::bytea";
  287.             
  288.             default:
  289.                 return PEAR::raiseError("DB_DataObject_Cast cant handle blobs for Database:$db Yet");
  290.         }
  291.     
  292.     }
  293.     
  294.     
  295.     /**
  296.     * get the string to use in the SQL statement for a date
  297.     *   
  298.     * 
  299.     *
  300.     * @param   int      $to Type (DB_DATAOBJECT_*
  301.     * @param   string  $db    (eg. mysql|mssql.....)
  302.     * 
  303.     *
  304.     * @return   string 
  305.     * @access   public
  306.     */
  307.     function toStringFromDate($to,$db) {
  308.         // first weed out invalid casts..
  309.         // in blobs can only be cast to blobs.!
  310.          // perhaps we should support TEXT fields???
  311.         // 
  312.         
  313.         if (($to !== false) && !($to & DB_DATAOBJECT_DATE)) {
  314.             return PEAR::raiseError('Invalid Cast from a DB_DataObject_Cast::string to something other than a date!'.
  315.                 ' (why not just use native features)');
  316.         }
  317.         return "'{$this->year}-{$this->month}-{$this->day}'";
  318.     }
  319.     
  320.    
  321.     
  322.     /**
  323.     * get the string to use in the SQL statement for a raw sql statement.
  324.     *
  325.     * @param   int      $to Type (DB_DATAOBJECT_*
  326.     * @param   string  $db    (eg. mysql|mssql.....)
  327.     * 
  328.     *
  329.     * @return   string 
  330.     * @access   public
  331.     */
  332.     function toStringFromSql($to,$db) {
  333.         return $this->value; 
  334.     }
  335.     
  336.     
  337.     
  338.     
  339. }
  340.  
  341.