thomascube
2006-05-01 6204390af16bcf50f82da61a1aefc2ad0c0adf94
commit | author | age
c9462d 1 <?php
S 2 // +----------------------------------------------------------------------+
3 // | PHP versions 4 and 5                                                 |
4 // +----------------------------------------------------------------------+
5 // | Copyright (c) 1998-2004 Manuel Lemos, Tomas V.V.Cox,                 |
6 // | Stig. S. Bakken, Lukas Smith, Frank M. Kromann                       |
7 // | All rights reserved.                                                 |
8 // +----------------------------------------------------------------------+
9 // | MDB2 is a merge of PEAR DB and Metabases that provides a unified DB  |
10 // | API as well as database abstraction for PHP applications.            |
11 // | This LICENSE is in the BSD license style.                            |
12 // |                                                                      |
13 // | Redistribution and use in source and binary forms, with or without   |
14 // | modification, are permitted provided that the following conditions   |
15 // | are met:                                                             |
16 // |                                                                      |
17 // | Redistributions of source code must retain the above copyright       |
18 // | notice, this list of conditions and the following disclaimer.        |
19 // |                                                                      |
20 // | Redistributions in binary form must reproduce the above copyright    |
21 // | notice, this list of conditions and the following disclaimer in the  |
22 // | documentation and/or other materials provided with the distribution. |
23 // |                                                                      |
24 // | Neither the name of Manuel Lemos, Tomas V.V.Cox, Stig. S. Bakken,    |
25 // | Lukas Smith nor the names of his contributors may be used to endorse |
26 // | or promote products derived from this software without specific prior|
27 // | written permission.                                                  |
28 // |                                                                      |
29 // | THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS  |
30 // | "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT    |
31 // | LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS    |
32 // | FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE      |
33 // | REGENTS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,          |
34 // | INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, |
35 // | BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS|
36 // |  OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED  |
37 // | AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT          |
38 // | LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY|
39 // | WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE          |
40 // | POSSIBILITY OF SUCH DAMAGE.                                          |
41 // +----------------------------------------------------------------------+
42 // | Author: Lukas Smith <smith@pooteeweet.org>                           |
43 // +----------------------------------------------------------------------+
44 //
45 // $Id$
46 //
47
48 require_once 'MDB2/Driver/Reverse/Common.php';
49
50 /**
51  * MDB2 FrontBase driver for the schema reverse engineering module
52  *
53  * @package MDB2
54  * @category Database
55  * @author  Lukas Smith <smith@dybnet.de>
56  */
57 class MDB2_Driver_Reverse_fbsql extends MDB2_Driver_Reverse_Common
58 {
59     // }}}
60     // {{{ tableInfo()
61
62     /**
63      * Returns information about a table or a result set
64      *
65      * @param object|string  $result  MDB2_result object from a query or a
66      *                                 string containing the name of a table.
67      *                                 While this also accepts a query result
68      *                                 resource identifier, this behavior is
69      *                                 deprecated.
70      * @param int            $mode    a valid tableInfo mode
71      *
72      * @return array  an associative array with the information requested.
73      *                 A MDB2_Error object on failure.
74      *
75      * @see MDB2_Driver_Common::tableInfo()
76      */
77     function tableInfo($result, $mode = null)
78     {
79         $db =& $this->getDBInstance();
80         if (PEAR::isError($db)) {
81             return $db;
82         }
83
84         if (is_string($result)) {
85             /*
86              * Probably received a table name.
87              * Create a result resource identifier.
88              */
89
90             $connected = $db->connect();
91             if (PEAR::isError($connected)) {
92                 return $connected;
93             }
94             $id = @fbsql_list_fields($db->database_name, $result, $db->connection);
95             $got_string = true;
96         } elseif (MDB2::isResultCommon($result)) {
97             /*
98              * Probably received a result object.
99              * Extract the result resource identifier.
100              */
101             $id = $result->getResource();
102             $got_string = false;
103         } else {
104             /*
105              * Probably received a result resource identifier.
106              * Copy it.
107              * Deprecated.  Here for compatibility only.
108              */
109             $id = $result;
110             $got_string = false;
111         }
112
113         if (!is_resource($id)) {
114             return $db->raiseError(MDB2_ERROR_NEED_MORE_DATA);
115         }
116
117         if ($db->options['portability'] & MDB2_PORTABILITY_FIX_CASE) {
118             if ($db->options['field_case'] == CASE_LOWER) {
119                 $case_func = 'strtolower';
120             } else {
121                 $case_func = 'strtoupper';
122             }
123         } else {
124             $case_func = 'strval';
125         }
126
127         $count = @fbsql_num_fields($id);
128         $res   = array();
129
130         if ($mode) {
131             $res['num_fields'] = $count;
132         }
133
134         for ($i = 0; $i < $count; $i++) {
135             $res[$i] = array(
136                 'table' => $case_func(@fbsql_field_table($id, $i)),
137                 'name'  => $case_func(@fbsql_field_name($id, $i)),
138                 'type'  => @fbsql_field_type($id, $i),
139                 'len'   => @fbsql_field_len($id, $i),
140                 'flags' => @fbsql_field_flags($id, $i),
141             );
142             if ($mode & MDB2_TABLEINFO_ORDER) {
143                 $res['order'][$res[$i]['name']] = $i;
144             }
145             if ($mode & MDB2_TABLEINFO_ORDERTABLE) {
146                 $res['ordertable'][$res[$i]['table']][$res[$i]['name']] = $i;
147             }
148         }
149
150         // free the result only if we were called on a table
151         if ($got_string) {
152             @fbsql_free_result($id);
153         }
154         return $res;
155     }
156 }
157 ?>