https://www.opennet.ru/openforum/vsluhforumID9/10105.html Здравствуйте!<br><br>есть код из скрипта, который один раз в 5 секунд вставляет строку в базу<br>база находится на другом конце openvpn туннеля<br><br>my $dbh = DBI-&gt;connect("dbi:Pg:dbname=db_exp;host=192.168.170.1;port=5432",<br>"exp", "111",<br>{AutoCommit =&gt; 0, RaiseError =&gt; 0, PrintError =&gt; 0, pg_enable_utf8 =&gt; 1, ShowErrorStatement =&gt; 1, InactiveDestroy =&gt; 1});<br>my $query = qq/INSERT INTO proba_connector (id, name, is_del) VALUES (?,?,?)/;<br>my $sth = $dbh-&gt;prepare($query);<br>while (1) {<br> my $rv = $sth-&gt;execute(22, 'test', 1);<br> print "sleep 5\n";<br> sleep 5;<br>}<br><br>при падении туннеля, скрипт как бы "замирает" на шаге "sleep 5"<br>и не переходит к вставке следующей строки, где можно было бы отловить падение канала<br>т.к. драйвер бы выдал ошибку, что мол нет коннекта<br>вопрос<br>можно ли как-то в скрипте отловить падение туннеля?<br><br>после восстановления туннеля, скрипт "оживает" и продолжает свою работу.<br>У DBI есть метод ping, который как раз и предназначен решать эту проблему<br>и он прекрасно работает если ба https://www.opennet.ru/openforum/vsluhforumID9/10105.html#9 Tue, 07 Jun 2016 06:37:47 GMT В общем, поизучав сложившуюся ситуацию пришел в выводу, что использовать таймауты на каждый запрос - это плохо.<br>В интернете по запросу "postgresql обрыв связи" много интересных споров на эту тему.<br>Общий вывод из этих споров таков - нет однозначного ответа.<br>Наткнулся на интересное решение - форкнуть процесс от скрипта, который устанавливает свой коннект к базе. Этот форкнутый процесс занимается проверкой связи и если связь разорвалась, то шлет сигнал основному скрипту.<br>Такой вариант мне подходит :-)<br> https://www.opennet.ru/openforum/vsluhforumID9/10105.html#8 Mon, 06 Jun 2016 09:52:16 GMT &gt; наверное не "while (1) " а "while ($connect_db)" <br>&gt; потом, если все таки "while (1)" (что вообще говоря порочно в данном <br>&gt; случае) <br>&gt; то первой строкой цикла должна быть проверка на $connect_db и выход из <br>&gt; цикла если не успешна..<br>&gt; Ну и наконец... вы отошли от атомарных операций в своем скрипте.<br>&gt; Почему вы не хотите устанавливать соединение каждый раз при необходимости записи?<br>&gt; создали соединение - записали-вышли.<br>&gt; Через 5 секунд повторили итерацию.<br><br>если Вы говорите про полный скрипт из пятого сообщения то:<br>1)там в цикле while ($while_is_enabled), а $while_is_enabled - это как раз и есть условие выхода из цикла, просто я не писал условия установки его в 0 (там много всего).<br>2)первой строкой цикла и есть $dbh = check_connect_db($dbh);<br>идет проверка доступности соединения, и если оно не доступно, то $connect_db, до тех пор<br>пока не подлючится<br>3)на самом деле установка соединения перед каждой итерацией не решит проблему глобально<br>ведь проблема в том, что $dbh-&gt;ping, не возвращает false при https://www.opennet.ru/openforum/vsluhforumID9/10105.html#7 Mon, 06 Jun 2016 09:15:27 GMT наверное не "while (1) " а "while ($connect_db)"<br>потом, если все таки "while (1)" (что вообще говоря порочно в данном случае)<br>то первой строкой цикла должна быть проверка на $connect_db и выход из цикла если не успешна..<br><br>Ну и наконец... вы отошли от атомарных операций в своем скрипте.<br>Почему вы не хотите устанавливать соединение каждый раз при необходимости записи?<br>создали соединение - записали-вышли.<br>Через 5 секунд повторили итерацию.<br> https://www.opennet.ru/openforum/vsluhforumID9/10105.html#6 Mon, 06 Jun 2016 07:04:24 GMT &gt; 1) как вы собираетесь обрабатывать падение канала - какие действия будете предпринимать? <br>&gt; У вас же "бесконечная транзакция" которая по падению сеанса будет отменена <br>&gt; на сервере.<br>&gt; Если у вас между вставками 5 секунд, то может и нет смысла <br>&gt; в "бесконечной транзакции"?<br><br>Да согласен, "бесконечная транзакция" забыл при написании в посте сменить AutoCommit =&gt; 1<br>Полный скрипт выложил в 5 ответе.<br>Обрабатывать падение - нужны попытки реконнекта к базе, так долго, пока канал не поднимется.<br>А если смотреть дальше то, скрипт выполняет много последовательных действий с базой.<br>Приведенный скрипт лишь выполняет одно действие (вставляет строку, пусть и бесконечно, но в реальном скрипте есть условие выхода из цикла вставки).<br>И нужно сделать так - не переходить к другому действию, если канал упал, а скрипт просто "замирает" при падении канала.<br>Я понимаю, что при падении канала, когда скрипт замер, он не перейдет к другому действию, но нужно этот момент отловить, чтобы послать письмо админу, что мол у тебя к https://www.opennet.ru/openforum/vsluhforumID9/10105.html#5 Mon, 06 Jun 2016 06:40:34 GMT &gt; Замостите полную версию скрипта. С проверкой ping.<br><br>#!/usr/bin/perl<br><br>package Testov_test;<br><br>use strict;<br>use warnings;<br>use utf8;<br>use open qw(:std :utf8);<br>use FindBin;<br>use lib $FindBin::Bin;<br>use DBI;<br><br>my $con_errstr = undef;<br>my $while_is_enabled = 1;<br><br><br>sub connect_db {<br># connect db<br>my $dbh = DBI-&gt;connect("dbi:Pg:dbname=db_exp;host=192.168.170.1;port=5432",<br>"exp", "111",<br>{AutoCommit =&gt; 0, RaiseError =&gt; 0, PrintError =&gt; 0, pg_enable_utf8 =&gt; 1, ShowErrorStatement =&gt; 1, InactiveDestroy =&gt; 1});<br><br>unless ($dbh) {<br>$con_errstr = "cannot connect on database ($DBI::errstr)";<br>return undef;<br>} else {<br>return $dbh;<br>}<br>}<br><br>sub check_connect_db {<br>my $dbh = shift;<br><br>print "=============check conn db============\n";<br>my $conn_db = 0;<br>#print "ping=".$dbh-&gt;ping."\n";<br>unless ($dbh-&gt;ping) {<br>$dbh = undef;<br>$conn_db = 1;<br>}<br>while ($conn_db) {<br>print "lost connect to db, attempt restore the connection (interval 10sec)\n";<br>$dbh = connect_db;<br>if ($dbh) {<br>print https://www.opennet.ru/openforum/vsluhforumID9/10105.html#4 Mon, 06 Jun 2016 06:32:12 GMT 1) как вы собираетесь обрабатывать падение канала - какие действия будете предпринимать? У вас же "бесконечная транзакция" которая по падению сеанса будет отменена на сервере.<br>Если у вас между вставками 5 секунд, то может и нет смысла в "бесконечной транзакции"?<br><br>2) еще есть метод ping у openvpn. Мне кажется, это будет предпочтительный для вас вариант, не отменяющий, конечно, п.1.<br><br><br> https://www.opennet.ru/openforum/vsluhforumID9/10105.html#3 Mon, 06 Jun 2016 06:10:33 GMT &gt;[оверквотинг удален]<br>&gt; Я полагал, что когда я отрублю канал, скрипт при последующей итерации попытается <br>&gt; вставить <br>&gt; строку в базу, но он даже не пытается - вот это и <br>&gt; напрягает. Почему так происходит?<br>&gt; В реальном скрипте есть куча проверок на коннект перед выполнением запросов <br>&gt; и даже есть реконнект при не доступности базы (метод ping у DBI). <br>&gt; Но я не мгу проверить доступность базы если канал упал. Скрипт просто <br>&gt; "замирает" <br>&gt; и не переходит к следующей итерации цикла while, чтобы я мог проверить <br>&gt; коннект.<br><br>Замостите полную версию скрипта. С проверкой ping.<br><br>&gt; не ужели мне надо оборачивать все действия с базой в сигнал ALRM <br>&gt; судя по этому топику - придется http://www.opennet.ru/openforum/vsluhforumID9/6774.html <br>&gt; блин, а если я не угадаю с таймаутом (вдруг запрос будет выполняться <br>&gt; дольше обычного, да и запросы разные, один - 1сек, другой 25 <br>&gt; сек) https://www.opennet.ru/openforum/vsluhforumID9/10105.html#2 Sun, 05 Jun 2016 18:59:32 GMT &gt; Может, стоит просто делать проверку доступности удаленного хоста с базой перед тем <br>&gt; как начинать писать в неё? В DBI ещё timeout есть, погуглите. <br><br>Это все понятно, код который я привел - тестовый.<br>Т.е. я поднимаю канал, запускаю скрипт, жду когда скрипт вставить пару строк,<br>затем рву канал и скрипт, бац и замер, и висит до поднятия канала (я ждал 10 мин),<br>как только канал поднялся снова, скрипт продолжает вставлять строки.<br>Я полагал, что когда я отрублю канал, скрипт при последующей итерации попытается вставить<br>строку в базу, но он даже не пытается - вот это и напрягает. Почему так происходит?<br>В реальном скрипте есть куча проверок на коннект перед выполнением запросов<br>и даже есть реконнект при не доступности базы (метод ping у DBI).<br>Но я не мгу проверить доступность базы если канал упал. Скрипт просто "замирает"<br>и не переходит к следующей итерации цикла while, чтобы я мог проверить коннект.<br><br>не ужели мне надо оборачивать все действия с базой в сигнал ALRM<br>судя по этому топику - придется htt https://www.opennet.ru/openforum/vsluhforumID9/10105.html#1 Sun, 05 Jun 2016 16:30:46 GMT Может, стоит просто делать проверку доступности удаленного хоста с базой перед тем как начинать писать в неё? В DBI ещё timeout есть, погуглите.<br>