<?php // Полная загрузка сервисных книжек, создан 2024-01-05 12:44:55
global $wpdb2;
global $failure;
global $file_hist;
///// echo '<H2><b>Старт загрузки</b></H2><br>';
$failure=FALSE;
//подключаемся к базе
$wpdb2 = include_once 'connection.php'; ; // подключаемся к MySQL
// если не удалось подключиться, и нужно оборвать PHP с сообщением об этой ошибке
if (!empty($wpdb2->error))
{
///// echo '<H2><b>Ошибка подключения к БД, завершение.</b></H2><br>';
$failure=TRUE;
wp_die( $wpdb2->error );
}
$m_size_file=0;
$m_mtime_file=0;
$m_comment='';
/////проверка существования файлов выгрузки из 1С
////файл выгрузки сервисных книжек
$file_hist = ABSPATH.'/_1c_alfa_exchange/AA_hist.csv';
if (!file_exists($file_hist))
{
///// echo '<H2><b>Файл обмена с сервисными книжками не существует.</b></H2><br>';
$m_comment='Файл обмена с сервисными книжками не существует';
$failure=TRUE;
}
/////инициируем таблицу лога
/////если не существует файла то возврат и ничего не делаем
if ($failure){
///включает защиту от SQL инъекций и данные можно передавать как есть, например: $_GET['foo']
///// echo '<H2><b>Попытка вставить запись в лог таблицу</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>$m_mtime_file,'last_size_upload'=>$m_size_file,'comment'=>$m_comment));
wp_die();
///// echo '<H2><b>Возврат в начало.</b></H2><br>';
return $failure;
}
/////проверка лога загрузки, что бы не загружать тоже самое
$masiv_data_file=stat($file_hist); ////передаем в массив свойство файла
$m_size_file=$masiv_data_file[7]; ////получаем размер файла
$m_mtime_file=$masiv_data_file[9]; ////получаем дату модификации файла
////создаем запрос на получение последней удачной загрузки
////выбираем по штампу времени создания (редактирования) файла загрузки AA_hist.csv, $m_mtime_file
///// echo '<H2><b>Размер файла: '.$m_size_file.'</b></H2><br>';
///// echo '<H2><b>Штамп времени файла: '.$m_mtime_file.'</b></H2><br>';
///// echo '<H2><b>Формирование запроса на выборку из лога</b></H2><br>';
////препарируем запрос
$text_zaprosa=$wpdb2->prepare("SELECT * FROM `vin_logs` WHERE `last_mtime_upload` = %s", $m_mtime_file);
$results=$wpdb2->get_results($text_zaprosa);
if ($results)
{ foreach ( $results as $r)
{
////если штамп времени и размер файла совпадают, возврат
if (($r->last_mtime_upload==$m_mtime_file) && ($r->last_size_upload==$m_size_file))
{////echo '<H2><b>Возврат в начало, т.к. найдена запись в логе.</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>$m_mtime_file,'last_size_upload'=>$m_size_file,'comment'=>'Загрузка отменена, новых данных нет, т.к. найдена запись в логе.'));
wp_die();
return $failure;
}
}
}
////если данные новые, пишем в лог запись о начале загрузки
/////echo '<H2><b>Попытка вставить запись о начале загрузки в лог таблицу</b></H2><br>';
$insert_fail_zapros=$wpdb2->insert('vin_logs', array('time_stamp'=>time(),'last_mtime_upload'=>0, 'last_size_upload'=>$m_size_file, 'comment'=>'Начало загрузки'));
////очищаем таблицу
$clear_tbl_zap=$wpdb2->prepare("TRUNCATE TABLE %s", 'vin_history');
$clear_tbl_zap_repl=str_replace("'","`",$clear_tbl_zap);
$results=$wpdb2->query($clear_tbl_zap_repl);
///// echo '<H2><b>Очистка таблицы сервисных книжек</b></H2><br>';
if (empty($results))
{
///// echo '<H2><b>Ошибка очистки таблицы книжек, завершение.</b></H2><br>';
//// если очистка не удалась, возврат
$failure=TRUE;
wp_die();
return $failure;
}
////загружаем данные
$table='vin_history'; // Имя таблицы для импорта
//$file_hist Имя CSV файла, откуда берется информация // (путь от корня web-сервера)
$delim=';'; // Разделитель полей в CSV файле
$enclosed='"'; // Кавычки для содержимого полей
$escaped='\
Простите, я чего-то не понял.
А нельзя для этой цели воспользоваться стандартной функцией МонопольныйРежим()?
МонопольныйРежим()
Синтаксис:
МонопольныйРежим()
Назначение:
Возвращает значение режима работы программы: 1 — программа запущена в монопольном режиме; 0 — программа запущена в сетевом режиме.
(1) Имелось ввиду смотреть монопольный ли режим не из текущей базы, запущенной монопольно. Например, у меня есть скрипт обмена данными, и из него запускается база, я могу с помощью этого скрипта определить запущена ли внешняя база монопольно.
А что вернет этот код ксли база совсем не открыта?
(3) вернет «не монопольно»
Полезная обработка для тех, кто понимает, как использовать…
Однозначно +
(4) думаю что это неправильно с точки зрения здравого смысла 😉
(6) Думаю, что абсолютно правильно.
Т.к. данный запрос просто показывает возможность работы базы в разделенном режиме.
с доработкой он сможет показывать возможность работы и в монопольном режиме
(8) vip прав, писалось для этих целей, как правило для всяких sql скриптов и vbs. Не представляю пока задачу, когда мне нужно знать можно ли запустить базу монопольно, а вот могу ли я к базе обратиться прямым запросом из вне — частая потребность. То о чем Вы говорите проще делать опираясь на данные, хранимые в файле ..SYSLOGlinks.tmp — так делает к примеру mlg_speed_viever
В общем истина в
Полезная обработка для тех, кто понимает, как использовать…
Не представляю пока задачу, когда мне нужно знать можно ли запустить базу монопольно
Например, проверить возможность запуска пакетого режима конфигуратора (выгрузка).
Для этого база должна быть никем не открыта.
То о чем Вы говорите проще делать опираясь на данные, хранимые в файле ..SYSLOGlinks.tmp
да, наверно так и есть 🙂
(10) можно настроить чтобы конфигуратор делал выгрузку даже если в базе кто-то есть. Хотя в принципе если там только монопольно можно, то обмен не пройдет и об появится запись в журнале регистрации, поэтому какой смысл анализировать есть ли кто-то в базе если задание обмена и так не застопорится?