<?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='\
А где ссылка для скачивания? ❓
Sory, вот она.
1. Цифры маленькие
2. Нажал «Перемешать» — процесс подвис
3. Ненужное меню «Действия» и кнопка справки без справки
Странно, в процедуре «Перемешать» ничего страшного на первый взгляд нет, но после выхода из неё 1С-ка зависает с 50% загрузкой процессора
4. Нет проверки расстановки фишек на сходимость пятнашки, если кто знает алгоритм — в комменты, плиз
Учёл пожелания (5), (3), вот.
(5)
Все делается гораздо проще, берется уже «собранная» пятнашка и случайными ходами перемешивается, такое перемешивание, естественно, всегда даст «сходимую» пятнашку;-)
(7) Когда мне было лет 8 я так и делал 😀
(8) Лучшие умы человечества собрались на научную конференцию. Обсуждается вопрос: «сколько будет дважды два».
Инженер колдует с рулеткой и логарифмической линейкой, после чего уверенно объявляет результат: «3,99».
Физик обратился в службу технической поддержки, поставил численный эксперимент на компьютере и доложил: «между 3,98 и 4,02».
Математик посмотрел в потолок, подумал и сказал, что точного ответа он не знает, но зато может доказать, что этот ответ существует.
Логик попросил более точно определить, что такое «дважды два».
Философ полчаса рассуждал о том, что «дважды два» можно понимать совершенно по-разному.
Хакер предложил взломать защиту секретной сети Пентагона и заставить все компьютеры решать эту проблему.
Наконец, бухгалтер сказал: «Закройте все двери и окна, а теперь ответьте — а сколько вы хотите получить?»
(7)
Пятнашка может и не сходиться. Всё обусловлено чётностью перестановок.
(6) все-таки наверно был косячок с перемешиванием
теперь все нормуль
Осталось только решить вопрос (10): либо информировать о том, что данный расклад не сходится (например, когда собраны три первых ряда, там всего несколько вариантов), либо изменить перемешивание, чтобы двигались фишки исходного собранного расклада, либо разработать алгоритм используя четкость перестановок
Следующий этап — подсчет затраченных движений на сборку, сохранять статистику в каком-нибудь типовом регистре сведений (при наличии), таблица с рейтингами пользователей — для соревнования в обеденный перерыв
Еще хотелось бы опцию — передвигать сразу 2-3 фишки от нажатой в сторону пустой ячейки (также как будто пальцами двигаешь несколько фишек)
😀
(11)
Вот ещё добавил такое.
Как вам, не скучно?