source: trunk/phpgwapi/inc/adodb/datadict/datadict-sybase.inc.php @ 2

Revision 2, 5.6 KB checked in by niltonneto, 17 years ago (diff)

Removida todas as tags usadas pelo CVS ($Id, $Source).
Primeira versão no CVS externo.

  • Property svn:eol-style set to native
  • Property svn:executable set to *
Line 
1<?php
2
3/**
4  V4.51 29 July 2004  (c) 2000-2004 John Lim (jlim@natsoft.com.my). All rights reserved.
5  Released under both BSD license and Lesser GPL library license.
6  Whenever there is any discrepancy between the two licenses,
7  the BSD license will take precedence.
8       
9  Set tabs to 4 for best viewing.
10 
11*/
12
13// security - hide paths
14if (!defined('ADODB_DIR')) die();
15
16class ADODB2_sybase extends ADODB_DataDict {
17        var $databaseType = 'sybase';
18       
19        var $dropIndex = 'DROP INDEX %2$s.%1$s';
20       
21        function MetaType($t,$len=-1,$fieldobj=false)
22        {
23                if (is_object($t)) {
24                        $fieldobj = $t;
25                        $t = $fieldobj->type;
26                        $len = $fieldobj->max_length;
27                }
28               
29                $len = -1; // mysql max_length is not accurate
30                switch (strtoupper($t)) {
31
32                case 'INT':
33                case 'INTEGER': return  'I';
34                case 'BIT':
35                case 'TINYINT': return  'I1';
36                case 'SMALLINT': return 'I2';
37                case 'BIGINT':  return  'I8';
38               
39                case 'REAL':
40                case 'FLOAT': return 'F';
41                default: return parent::MetaType($t,$len,$fieldobj);
42                }
43        }
44       
45        function ActualType($meta)
46        {
47                switch(strtoupper($meta)) {
48                case 'C': return 'VARCHAR';
49                case 'XL':
50                case 'X': return 'TEXT';
51               
52                case 'C2': return 'NVARCHAR';
53                case 'X2': return 'NTEXT';
54               
55                case 'B': return 'IMAGE';
56                       
57                case 'D': return 'DATETIME';
58                case 'T': return 'DATETIME';
59                case 'L': return 'BIT';
60               
61                case 'I': return 'INT';
62                case 'I1': return 'TINYINT';
63                case 'I2': return 'SMALLINT';
64                case 'I4': return 'INT';
65                case 'I8': return 'BIGINT';
66               
67                case 'F': return 'REAL';
68                case 'N': return 'NUMERIC';
69                default:
70                        return $meta;
71                }
72        }
73       
74       
75        function AddColumnSQL($tabname, $flds)
76        {
77                $tabname = $this->TableName ($tabname);
78                $f = array();
79                list($lines,$pkey) = $this->_GenFields($flds);
80                $s = "ALTER TABLE $tabname $this->addCol";
81                foreach($lines as $v) {
82                        $f[] = "\n $v";
83                }
84                $s .= implode(',',$f);
85                $sql[] = $s;
86                return $sql;
87        }
88       
89        function AlterColumnSQL($tabname, $flds)
90        {
91                $tabname = $this->TableName ($tabname);
92                $sql = array();
93                list($lines,$pkey) = $this->_GenFields($flds);
94                foreach($lines as $v) {
95                        $sql[] = "ALTER TABLE $tabname $this->alterCol $v";
96                }
97
98                return $sql;
99        }
100       
101        function DropColumnSQL($tabname, $flds)
102        {
103                $tabname = $this->TableName ($tabname);
104                if (!is_array($flds)) $flds = explode(',',$flds);
105                $f = array();
106                $s = "ALTER TABLE $tabname";
107                foreach($flds as $v) {
108                        $f[] = "\n$this->dropCol $v";
109                }
110                $s .= implode(',',$f);
111                $sql[] = $s;
112                return $sql;
113        }
114       
115        // return string must begin with space
116        function _CreateSuffix($fname,$ftype,$fnotnull,$fdefault,$fautoinc,$fconstraint)
117        {       
118                $suffix = '';
119                if (strlen($fdefault)) $suffix .= " DEFAULT $fdefault";
120                if ($fautoinc) $suffix .= ' DEFAULT AUTOINCREMENT';
121                if ($fnotnull) $suffix .= ' NOT NULL';
122                else if ($suffix == '') $suffix .= ' NULL';
123                if ($fconstraint) $suffix .= ' '.$fconstraint;
124                return $suffix;
125        }
126       
127        /*
128CREATE TABLE
129    [ database_name.[ owner ] . | owner. ] table_name
130    ( { < column_definition >
131        | column_name AS computed_column_expression
132        | < table_constraint > ::= [ CONSTRAINT constraint_name ] }
133
134            | [ { PRIMARY KEY | UNIQUE } [ ,...n ]
135    )
136
137[ ON { filegroup | DEFAULT } ]
138[ TEXTIMAGE_ON { filegroup | DEFAULT } ]
139
140< column_definition > ::= { column_name data_type }
141    [ COLLATE < collation_name > ]
142    [ [ DEFAULT constant_expression ]
143        | [ IDENTITY [ ( seed , increment ) [ NOT FOR REPLICATION ] ] ]
144    ]
145    [ ROWGUIDCOL]
146    [ < column_constraint > ] [ ...n ]
147
148< column_constraint > ::= [ CONSTRAINT constraint_name ]
149    { [ NULL | NOT NULL ]
150        | [ { PRIMARY KEY | UNIQUE }
151            [ CLUSTERED | NONCLUSTERED ]
152            [ WITH FILLFACTOR = fillfactor ]
153            [ON {filegroup | DEFAULT} ] ]
154        ]
155        | [ [ FOREIGN KEY ]
156            REFERENCES ref_table [ ( ref_column ) ]
157            [ ON DELETE { CASCADE | NO ACTION } ]
158            [ ON UPDATE { CASCADE | NO ACTION } ]
159            [ NOT FOR REPLICATION ]
160        ]
161        | CHECK [ NOT FOR REPLICATION ]
162        ( logical_expression )
163    }
164
165< table_constraint > ::= [ CONSTRAINT constraint_name ]
166    { [ { PRIMARY KEY | UNIQUE }
167        [ CLUSTERED | NONCLUSTERED ]
168        { ( column [ ASC | DESC ] [ ,...n ] ) }
169        [ WITH FILLFACTOR = fillfactor ]
170        [ ON { filegroup | DEFAULT } ]
171    ]
172    | FOREIGN KEY
173        [ ( column [ ,...n ] ) ]
174        REFERENCES ref_table [ ( ref_column [ ,...n ] ) ]
175        [ ON DELETE { CASCADE | NO ACTION } ]
176        [ ON UPDATE { CASCADE | NO ACTION } ]
177        [ NOT FOR REPLICATION ]
178    | CHECK [ NOT FOR REPLICATION ]
179        ( search_conditions )
180    }
181
182
183        */
184       
185        /*
186        CREATE [ UNIQUE ] [ CLUSTERED | NONCLUSTERED ] INDEX index_name
187    ON { table | view } ( column [ ASC | DESC ] [ ,...n ] )
188                [ WITH < index_option > [ ,...n] ]
189                [ ON filegroup ]
190                < index_option > :: =
191                    { PAD_INDEX |
192                        FILLFACTOR = fillfactor |
193                        IGNORE_DUP_KEY |
194                        DROP_EXISTING |
195                    STATISTICS_NORECOMPUTE |
196                    SORT_IN_TEMPDB 
197                }
198*/
199        function _IndexSQL($idxname, $tabname, $flds, $idxoptions)
200        {
201                $sql = array();
202               
203                if ( isset($idxoptions['REPLACE']) || isset($idxoptions['DROP']) ) {
204                        $sql[] = sprintf ($this->dropIndex, $idxname, $tabname);
205                        if ( isset($idxoptions['DROP']) )
206                                return $sql;
207                }
208               
209                if ( empty ($flds) ) {
210                        return $sql;
211                }
212               
213                $unique = isset($idxoptions['UNIQUE']) ? ' UNIQUE' : '';
214                $clustered = isset($idxoptions['CLUSTERED']) ? ' CLUSTERED' : '';
215               
216                if ( is_array($flds) )
217                        $flds = implode(', ',$flds);
218                $s = 'CREATE' . $unique . $clustered . ' INDEX ' . $idxname . ' ON ' . $tabname . ' (' . $flds . ')';
219               
220                if ( isset($idxoptions[$this->upperName]) )
221                        $s .= $idxoptions[$this->upperName];
222
223                $sql[] = $s;
224               
225                return $sql;
226        }
227}
228?>
Note: See TracBrowser for help on using the repository browser.