Ejemplo n.º 1
0
 function _query($sql, $iarr = false)
 {
     if (!$this->isConnected()) {
         return false;
     }
     if (!$this->autoCommit && $this->_transactionID) {
         $conn = $this->_transactionID;
         $docommit = false;
     } else {
         $conn = $this->_connectionID;
         $docommit = true;
     }
     if (is_array($sql)) {
         $fn = 'fbird_execute';
         $sql = $sql[1];
         if (is_array($iarr)) {
             if (ADODB_PHPVER >= 0x4050) {
                 // actually 4.0.4
                 if (!isset($iarr[0])) {
                     $iarr[0] = '';
                 }
                 // PHP5 compat hack
                 $fnarr = array_merge(array($sql), $iarr);
                 $ret = call_user_func_array($fn, $fnarr);
             } else {
                 switch (sizeof($iarr)) {
                     case 1:
                         $ret = $fn($sql, $iarr[0]);
                         break;
                     case 2:
                         $ret = $fn($sql, $iarr[0], $iarr[1]);
                         break;
                     case 3:
                         $ret = $fn($sql, $iarr[0], $iarr[1], $iarr[2]);
                         break;
                     case 4:
                         $ret = $fn($sql, $iarr[0], $iarr[1], $iarr[2], $iarr[3]);
                         break;
                     case 5:
                         $ret = $fn($sql, $iarr[0], $iarr[1], $iarr[2], $iarr[3], $iarr[4]);
                         break;
                     case 6:
                         $ret = $fn($sql, $iarr[0], $iarr[1], $iarr[2], $iarr[3], $iarr[4], $iarr[5]);
                         break;
                     case 7:
                         $ret = $fn($sql, $iarr[0], $iarr[1], $iarr[2], $iarr[3], $iarr[4], $iarr[5], $iarr[6]);
                         break;
                     default:
                         ADOConnection::outp("Too many parameters to ibase query {$sql}");
                     case 8:
                         $ret = $fn($sql, $iarr[0], $iarr[1], $iarr[2], $iarr[3], $iarr[4], $iarr[5], $iarr[6], $iarr[7]);
                         break;
                 }
             }
         } else {
             $ret = $fn($sql);
         }
     } else {
         $fn = 'fbird_query';
         if (is_array($iarr)) {
             if (ADODB_PHPVER >= 0x4050) {
                 // actually 4.0.4
                 if (sizeof($iarr) == 0) {
                     $iarr[0] = '';
                 }
                 // PHP5 compat hack
                 $fnarr = array_merge(array($conn, $sql), $iarr);
                 $ret = call_user_func_array($fn, $fnarr);
             } else {
                 switch (sizeof($iarr)) {
                     case 1:
                         $ret = $fn($conn, $sql, $iarr[0]);
                         break;
                     case 2:
                         $ret = $fn($conn, $sql, $iarr[0], $iarr[1]);
                         break;
                     case 3:
                         $ret = $fn($conn, $sql, $iarr[0], $iarr[1], $iarr[2]);
                         break;
                     case 4:
                         $ret = $fn($conn, $sql, $iarr[0], $iarr[1], $iarr[2], $iarr[3]);
                         break;
                     case 5:
                         $ret = $fn($conn, $sql, $iarr[0], $iarr[1], $iarr[2], $iarr[3], $iarr[4]);
                         break;
                     case 6:
                         $ret = $fn($conn, $sql, $iarr[0], $iarr[1], $iarr[2], $iarr[3], $iarr[4], $iarr[5]);
                         break;
                     case 7:
                         $ret = $fn($conn, $sql, $iarr[0], $iarr[1], $iarr[2], $iarr[3], $iarr[4], $iarr[5], $iarr[6]);
                         break;
                     default:
                         ADOConnection::outp("Too many parameters to ibase query {$sql}");
                     case 8:
                         $ret = $fn($conn, $sql, $iarr[0], $iarr[1], $iarr[2], $iarr[3], $iarr[4], $iarr[5], $iarr[6], $iarr[7]);
                         break;
                 }
             }
         } else {
             $ret = $fn($conn, $sql);
         }
     }
     if ($docommit && $ret === true) {
         fbird_commit($this->_connectionID);
     }
     $this->_handleerror();
     return $ret;
 }
Ejemplo n.º 2
0
function export_data($export)
{
    global $s_fields, $warning;
    ini_set('ibase.dateformat', $export['general']['date']);
    ini_set('ibase.timeformat', $export['general']['time']);
    ini_set('ibase.timestampformat', $export['general']['date'] . ' ' . $export['general']['time']);
    if ($export['format'] == 'sql' && $export['sql']['info']) {
        echo sql_export_info($export, replace_escape_sequences($export['sql']['lineend']));
    }
    foreach (export_queries($export) as $query) {
        if (DEBUG) {
            add_debug($query, __FILE__, __LINE__);
        }
        $trans = fbird_trans(TRANS_READ, $dbhandle);
        $res = @fbird_query($trans, $query);
        if ($res === FALSE) {
            $ib_error = fbird_errmsg();
            $warning = '';
            return FALSE;
        }
        $columns = $col_types = $num_fields = array();
        $num = fbird_num_fields($res);
        for ($idx = 0; $idx < $num; $idx++) {
            $info = fbird_field_info($res, $idx);
            $columns[] = $info['name'];
            $col_types[] = $info['type'];
            $num_fields[] = is_number_type(substr($info['type'], 0, strcspn($info['type'], '(')));
        }
        $tablename = $info['relation'];
        $export['query'] = array('source' => $query, 'columns' => $columns, 'col_types' => $col_types, 'num_fields' => $num_fields, 'result' => $res);
        switch ($export['format']) {
            case 'csv':
                export_csv_data($export);
                break;
            case 'sql':
                export_sql_data($export, $tablename);
                break;
            case 'ext':
                printf('Export data to %s is still not implemented!', $export['format']);
                break;
            default:
                echo 'Unsupported export format!';
        }
        fbird_free_result($res);
        fbird_commit($trans);
    }
}
Ejemplo n.º 3
0
function get_indices($order, $dir)
{
    global $dbhandle;
    $order_field = $order == 'name' ? 'I.RDB$INDEX_NAME' : 'I.RDB$RELATION_NAME';
    $sql = 'SELECT I.RDB$INDEX_NAME AS INAME, ' . 'I.RDB$RELATION_NAME AS RNAME, ' . 'I.RDB$UNIQUE_FLAG AS UFLAG, ' . 'I.RDB$INDEX_INACTIVE AS IFLAG, ' . 'I.RDB$INDEX_TYPE AS ITYPE, ' . 'S.RDB$FIELD_NAME AS FNAME, ' . 'S.RDB$FIELD_POSITION AS POS ' . 'FROM RDB$INDICES I ' . 'JOIN RDB$INDEX_SEGMENTS S ' . 'ON S.RDB$INDEX_NAME=I.RDB$INDEX_NAME ' . 'WHERE (I.RDB$SYSTEM_FLAG IS NULL  OR  I.RDB$SYSTEM_FLAG=0)' . 'AND I.RDB$FOREIGN_KEY IS NULL ' . "AND I.RDB\$INDEX_NAME NOT STARTING WITH 'RDB\$' " . 'ORDER BY ' . $order_field . ' ' . $dir;
    $trans = fbird_trans(TRANS_READ, $dbhandle);
    $res = fbird_query($trans, $sql) or ib_error();
    $indices = array();
    while ($obj = fbird_fetch_object($res)) {
        if (!isset($indices[$obj->INAME])) {
            $iname = trim($obj->INAME);
            $indices[$iname]['table'] = trim($obj->RNAME);
            $indices[$iname]['dir'] = isset($obj->ITYPE) && $obj->ITYPE == 1 ? 'DESC' : 'ASC';
            $indices[$iname]['uniq'] = isset($obj->UFLAG) ? TRUE : FALSE;
            $indices[$iname]['active'] = isset($obj->IFLAG) && $obj->IFLAG == 1 ? FALSE : TRUE;
            $indices[$iname]['pos'] = $obj->POS;
        }
        $indices[$iname]['seg'][$obj->POS] = trim($obj->FNAME);
    }
    fbird_commit($trans);
    return $indices;
}
Ejemplo n.º 4
0
            if ($s_sql_panels[$idx][2] == 'open') {
                // if the query have result rows
                if (is_resource($res) && @fbird_num_fields($res) > 0) {
                    $fieldinfo[$lnr] = get_field_info($res);
                    // save the rows for the output in the sql_output panel
                    while ($row = fbird_fetch_object($res)) {
                        $results[$lnr][] = get_object_vars($row);
                        $cnt++;
                        if ($cnt >= SHOW_OUTPUT_ROWS && !isset($_POST['sql_display_all'])) {
                            $s_sql['more'] = TRUE;
                            break;
                        }
                    }
                }
            }
            fbird_commit($trans);
        }
        if (!empty($results)) {
            $js_stack .= js_markable_table();
        }
    }
    // cleanup the watchtable output buffer
    $s_watch_buffer = '';
}
//
// process the export buttons from the sql_enter panel
//
if ($_SERVER['REQUEST_METHOD'] == 'POST' && !empty($_POST)) {
    foreach (array_keys($_POST) as $name) {
        if (preg_match('/sql_export_([0-9]+)/', $name, $matches) && isset($s_sql['queries'][$matches[1]])) {
            // set export parameters
Ejemplo n.º 5
0
function get_column_fk_defs($cname, $iname)
{
    global $dbhandle;
    $defs = array('fk_name' => $cname);
    $trans = fbird_trans(TRANS_READ, $dbhandle);
    $sql = 'SELECT RDB$UPDATE_RULE,' . ' RDB$DELETE_RULE' . ' FROM RDB$REF_CONSTRAINTS' . " WHERE RDB\$CONSTRAINT_NAME='" . $cname . "'";
    $res = @fbird_query($trans, $sql) or ib_error(__FILE__, __LINE__, $sql);
    if ($res && ($row = fbird_fetch_row($res))) {
        fbird_free_result($res);
    }
    $defs['on_update'] = trim($row[0]);
    $defs['on_delete'] = trim($row[1]);
    $sql = 'SELECT I2.RDB$RELATION_NAME,' . ' SE.RDB$FIELD_NAME' . ' FROM RDB$INDICES I1' . ' INNER JOIN RDB$INDICES I2 ON I1.RDB$FOREIGN_KEY=I2.RDB$INDEX_NAME' . ' INNER JOIN RDB$INDEX_SEGMENTS SE ON I2.RDB$INDEX_NAME=SE.RDB$INDEX_NAME' . " WHERE I1.RDB\$INDEX_NAME='" . $iname . "'";
    $res = @fbird_query($trans, $sql) or ib_error(__FILE__, __LINE__, $sql);
    if ($res && ($row = fbird_fetch_row($res))) {
        fbird_free_result($res);
    }
    $defs['fk_table'] = trim($row[0]);
    $defs['fk_column'] = trim($row[1]);
    fbird_commit($trans);
    return $defs;
}