Конвертация баз MySQL в dBase

Во многих предприятиях, разместивших свои ресурсы в интернете, осталось большое количество программных комплексов и различных скриптов, работающих с данными в формате dBase. Появилась задача обратной совместимости.

Данный класс поможет Вам преобразовывать базы данных MySQL в dBase.

Для работы этого скрипта необходимо, чтобы PHP был скомпилирован с поддержкой dBase. Чтобы узнать это, достаточно вызвать функцию phpinfo(). Если в строке Configure Command сведений о версии PHP есть параметр --enable-dbase, значит Ваша версия поддерживает dBase (можно также посмотреть в разделе Additional Modules наличие строки dBase).

<?php

class ConvdBase
{
  var $conv_dir;  // каталог конвертации - здесь будут DBF-файлы

  var $struct;    // структура текущей таблицы,
  // используется при конвертации данных

  function ConvdBase($dir)
  {
     $this->setoutdir($dir);
  }

  // имя поля и его тип формата MySQL преобразуем к dBase
  // например: code int(10), преобразуем к array('code', 'N', 10, 0)
  // если $mysql == true, то возвращаем только тип int
  // который записывается в $this->struct
  function getfield($f_name, $f_type, $mysql = false)
  {
     $len = 0;
     $perc = 0;

     $pos = strpos($f_type, '(');
     if($pos)
     {
        $type = strtolower(substr($f_type, 0, $pos));
        sscanf(substr($f_type, $pos), '(%d,%d)', &$len, &$perc);
     }
     else
     $type = strtolower($f_type);

     if($mysql)
     return $type;

     switch($type)
     {
        case 'double': case 'float':
        $len  = 19; $perc = 3;
        $type = 'N';
        break;
        case 'enum':
        $len = 5;
        case 'int': case 'tinyint': case 'smallint':
        if(!$len)
        $len = 19;
        $perc = 0;
        // break не нужен
        case 'decimal':
        $type = 'N';
        break;
        case 'tinytext': case 'text': case 'longtext':
        case 'varchar': case 'char':
        if(!$len || $len > 254)
        $len = 254;
        $type = 'C';
        break;
        case 'year': case 'datetime': case 'timestamp':
        $len = $perc = 0;
        $type = 'D';
        break;
     }
     $field = array($f_name, $type, $len, $perc);
     return $field;
  }

  // установка исходящего каталога
  function setoutdir($dir)
  {
     $this->conv_dir = $dir;
     @mkdir($this->conv_dir, 0777);
  }

  // конвертация данных
  function convertdata($row)
  {
     $data = array();
     for($i = 0; $i < sizeof($this->struct); $i++)
     {
        switch($this->struct[$i])
        {
           case 'year': case 'datetime': case 'timestamp':
           $data[] = substr($row[$i], 0, 8);
           break;
           case 'tinytext': case 'text': case 'longtext':
           case 'varchar':  case 'char':
           if(strlen($row[$i]) > 254)
           {
              $data[] = substr($row[$i], 0, 254);
              break;
           }
           // break не нужен
           case 'smallint': case 'double': case 'float': case 'enum':
           case 'int': case 'tinyint': case 'decimal': case 'int':
           $data[] = $row[$i];
           break;
        }
     }
     return $data;
  }

  // конвертируем базу
  function convert($server, $user, $password, $db_name)
  {
     // отключить тайм-аут
     if( !get_cfg_var('safe_mode') )
     set_time_limit(0);

     $link = mysql_connect($server, $user, $password);
     if(!$link)
     exit('Error connect');

     mysql_select_db($db_name);
     $tables_query = mysql_query('SHOW TABLES', $link);

     $tek_table = 0; // порядковый номер таблицы - если обязательно
     // требуется имя файла не более 8 символов
     while($tables = mysql_fetch_array($tables_query, MYSQL_NUM) )
     {
        $table = $tables[0];

        $field_array = array();
        $this->struct = array();

        // создаем структуру таблицы
        $fields_query = mysql_query('SHOW FIELDS FROM ' . $table);
        $tek_field = 0;
        while ($field = mysql_fetch_array($fields_query, MYSQL_ASSOC) )
        {
           $f_name = $field['Field'];

           // имена полей dBase не должны быть более 10 символов
           if(strlen($f_name) > 10)
           $f_name = sprintf('%s%03d', substr($f_name, 0, 7), sizeof($field_array) + 1);

           $field_array[] = $this->getfield($f_name, $field['Type']);
           $this->struct[] = $this->getfield($tek_field, $field['Type'], true);
        }

        if(strlen($table) > 8) // см.выше о именах таблиц более 8 символов
        $table_name = sprintf('%s%03d', substr($table, 0, 5), $tek_table++);
        else
        $table_name = $table;

        $base = dbase_create( $this->conv_dir . '/' . $table_name . '.DBF', $field_array);
        if($base)
        {
           // таблица создана - перекидываем данные
           $rows_query = mysql_query("SELECT * FROM " . $table);
           while($row = mysql_fetch_array($rows_query, MYSQL_NUM))
           {
              $row = $this->convertdata($row);
              if($row)
              if( !dbase_add_record($base, $row) )
              exit('Error add record');
           }
           dbase_close($base);
        }
     }
     mysql_close($link);
  }
}
?>

А теперь рассмотрим пример использования конвертатора.

$dir = './CONVERT_' . date('YmdHi'); // здесь будут DBF
$conv = new ConvdBase($dir);
$conv->convert('localhost', 'user', 'pass', 'base');

Если типы данных year, datetime, timestamp надо передавать в неизменном виде, приведите их к типу dBase "С", изменив функции getfield и convertdata.

Автор: Алимов Рустем