информационная безопасность
без паники и всерьез
 подробно о проектеRambler's Top100
Атака на InternetЗа кого нас держат?
BugTraq.Ru
Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 Бэкдор в xz/liblzma, предназначенный... 
 Три миллиона электронных замков... 
 Doom на газонокосилках 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / programming
Имя Пароль
ФОРУМ
если вы видите этот текст, отключите в настройках форума использование JavaScript
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
  • Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
  • Новичкам также крайне полезно ознакомиться с данным документом.
[Perl] Отчасти решил проблему при помощи fork. Теперь вопрос в обмене между процессами. 12.07.05 12:25  Число просмотров: 1984
Автор: J'JF <Dmytro Volhushyn> Статус: Elderman
<"чистая" ссылка>
то есть в child-процессе я читаю из девайса, а в родительском отслеживаю время выполнения и прибиваю по таймауту, в случае подвисания. Ничего сложного в этом нет.
Но встал вопрос об обмене информацией между родительским процессом и его потомком. То есть Потомок считывает инфу и должен передать ее родителю. вопрос - как это сделать корректно?
Пробовал при помощи pipe. Все работает супер, однако только тогда, когда инфа есть. Если же child подвисает, то родитель замирает на ожидании инфы от потомка. То есть конструкция типа такой:

    pipe(RX, TX);
    if (!($pid = fork())) {
        close RX;
        {......}  #тут получаем $some_info как результат чтения из порта
        print TX $some_info;
        close TX;
        exit 0;
    } else {
        close TX;
        chomp($line = <RX>);
        close RX;
        waitpid($pid,0);
    }

---


И вот если чайлд зависает на получении данных из порта, то родитель так и будет висеть на
chomp($line = <RX>);
и тогда получается, что все телодвижения бессмысленны, т.к. возникает deadlock.
Насколько я понимаю, нужно организовать какой-нить "асинхронный" обменный канал. Пока я выкрутился записью в файл, однако такой вариант лично мне не очень нравится.
Какие будут идеи по сабжу?
<programming>
[Perl] Чтение из девайса. 11.07.05 14:27  
Автор: J'JF <Dmytro Volhushyn> Статус: Elderman
Отредактировано 11.07.05 14:28  Количество правок: 1
<"чистая" ссылка>
Имеем весьма распространенную ситуацию - нужно послать на com-порт команду и получить ответ. В том случае, если ответ не пришел за определенный промежуток времени - повторить цикл. Вопрос в том, как это реализовать?
Сейчас я пользуюсь примерно следующей схемой:


open (COM, '+</dev/cuaa0');
system ("stty -f /dev/cuaa0 2400");
print COM $command;
read COM, $answer, $an_length;
close COM;


так вот, бывает так, что девайс от порта отключили или же сам девайс "ушел в себя" и не отвечает. В этом случае скрипт затыкается на
read COM, $answer, $an_length;
и никаких признаков жизни не подает - приходится его передергивать. Вопрос автоматизации процесса передергивания в принципе не сложен и решен, однако хотелось бы поступить красивее и реализовать защиту от вышеописанной ситуации прямо в скрипте. Однако, как подойти к решению этой проблемы - не знаю.
[Perl] Отчасти решил проблему при помощи fork. Теперь вопрос в обмене между процессами. 12.07.05 12:25  
Автор: J'JF <Dmytro Volhushyn> Статус: Elderman
<"чистая" ссылка>
то есть в child-процессе я читаю из девайса, а в родительском отслеживаю время выполнения и прибиваю по таймауту, в случае подвисания. Ничего сложного в этом нет.
Но встал вопрос об обмене информацией между родительским процессом и его потомком. То есть Потомок считывает инфу и должен передать ее родителю. вопрос - как это сделать корректно?
Пробовал при помощи pipe. Все работает супер, однако только тогда, когда инфа есть. Если же child подвисает, то родитель замирает на ожидании инфы от потомка. То есть конструкция типа такой:

    pipe(RX, TX);
    if (!($pid = fork())) {
        close RX;
        {......}  #тут получаем $some_info как результат чтения из порта
        print TX $some_info;
        close TX;
        exit 0;
    } else {
        close TX;
        chomp($line = <RX>);
        close RX;
        waitpid($pid,0);
    }

---


И вот если чайлд зависает на получении данных из порта, то родитель так и будет висеть на
chomp($line = <RX>);
и тогда получается, что все телодвижения бессмысленны, т.к. возникает deadlock.
Насколько я понимаю, нужно организовать какой-нить "асинхронный" обменный канал. Пока я выкрутился записью в файл, однако такой вариант лично мне не очень нравится.
Какие будут идеи по сабжу?
1




Rambler's Top100
Рейтинг@Mail.ru


  Copyright © 2001-2024 Dmitry Leonov   Page build time: 0 s   Design: Vadim Derkach