|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Mikhail Kostousov 2:5020/400 15 Jul 2004 17:21:41 To : Valentin Nechayev Subject : Re: Работа с модемом --------------------------------------------------------------------------------
Valentin Nechayev wrote:
>>>>Mikhail Kostousov wrote:
>
>
> MK>Уже совсем замаялся... Hезнаю, где что искать...
> MK>Простенькая программка:
> MK>----begin of test.pl
> MK>#!/usr/bin/perl
> MK>my $port = "/dev/rfcomm0";
>
> Это что за ОС?
>
> MK>use strict;
> MK>open F,"+<$port" or die $!;
> MK>printf F "ATZ\r";
> MK>while ($a=<F>)
> MK>{
> MK> printf $a;
> MK> sleep 1;
> MK>}
> MK>-----end of test.pl-----------
> MK>
> MK>Умудряется выводить во такой листинг:
>
> Сходи вот сюда:
> http://www.freebsd.org/cgi/man.cgi?query=termios
> (на версию системы не смотри, 99% этой информации приемлемы для любого юникса)
>
> и почитай про input processing, output processing и прочее.
> У тебя порт стоит несколько не в том режиме, в котором должен быть
> для нормальных переговоров с модемом. Скорее всего должен быть raw mode
> (он же non-canonical mode). Режим ты обязательно должен выставить сам
> какой нужен, нельзя полагаться на текущий.
>
> MK>Это я немного изоблачил проблему. Hе могу понять, от куда берется так
> MK>много переводов строк и аж два "OK"?
>
> Первое - скорее всего ICRNL или что-то похожее.
> Второе - какой-то другой артефакт текущего режима порта.
>
>
> -netch-
Все, спасибо! Разобрался! В итоге выяснились те грабли, на которые уже
наступал один раз. Hужно было выключить эхо порта, что с помощью POSIX
сделал. Спасибо
--
С уважением, Михаил Костоусов
--- ifmail v.2.15dev5.3
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6577ec86ae69.html, оценка из 5, голосов 10
|