FIDO как искривлятор мозгов

[porokh]

На дальней стене в рабочей комнате висит экран мониторинга -- 42" плазменная панель, подключённая к серверу (Windows 2003). Недавно я додавил таки своё предложение насчёт календаря с женщинами (чтоб чаще мы взор туда обращали), промеж графиков и матриц состояний (вот что я соорудил на скору руку на этот месяц, например):


Да, а следом пришла мысль: вот присылают кому-то ссылку с "прикольным роликом", и что дальше -- пересылать остальным, или звать к своему экрану всех? Как-то не лучшее решение, учитывая 42" на стене. Поставил задачу: "обеспечить показ произвольного видеофайла на экране мониторинга, используя только запись в расшареный по сети общий каталог сервера"; вспомнил FIDO. T-Mail, GoldED и т.п. и написал такое:

@ECHO OFF
REM For on-demand playing of video files on monitoring screen
REM Usage: put desired file(s) into \\MONITOR\Common\vid\ and create
REM a plain text file "play.me" with a list of files to be played
REM (one file per line)
REM 2010/01/27 porokh

SET WDIR=c:\common\vid
SET LIST=%WDIR%\play.me
SET LOCK=%TEMP%\play_me.lck

IF EXIST %LOCK% GOTO EXIT
IF NOT EXIST %LIST% GOTO EXIT

REM Playing a list (make LOCK first to avoid starting another mplayer!)
echo play_me running >%LOCK%

cd %WDIR%
c:\mplayer\mplayer -fs -playlist %LIST%

del %LIST%
del %LOCK%

:EXIT

Скрипт вставлен в Windows scheduler, каждую минуту запускается, если нет лок-файла и есть файл-плейлист -- запускает GNU mplayer в полный экран с этим плейлистом. Работает, все довольны, XXI век на дворе.

Comments

[klug_photo]

нененене, перед катом обещал тмыл и голдед :)

[sonny363.livejournal.com]

И аттачи не роутит...

[porokh.livejournal.com]

Нет, ну надо же? Я специально им сисьге к посту приаттачил, а им ещё и роутить надо!

[porokh.livejournal.com]

Сам напросился, держи!

@echo off
@rem $Id: fido,v 1.2 2001/03/01 porokh Exp $
@rem v 1.1 2000/08/21 porokh
@rem v 1.0 1999/11/02 porokh


if "%1"=="sess" goto _SESS
if "%1"=="edit" goto _EDIT
if "%1"=="toss" goto _TOSS
if "%1"=="scan" goto _SCAN
if "%1"=="crml" goto _CRML
if "%1"=="ndlc" goto _NDLC
if "%1"=="mbsm" goto _MBSM


rem --- Syntax -------------------------------------------------------------
echo FIDO - Service calls for FIDO Point system (c) 1999,2000 Porokh
echo Usage:
echo fido sess perform mailer session with uplink
echo fido edit edit/view mail messages
echo fido toss toss inbound mail
echo fido scan scan for outbound mail
echo fido crml generate GoldED echolist from CrashMail.prefs
echo fido ndlc generate nodelist indexes
echo fido mbsm messagebase maintenance (purge and pack)
goto _END


rem --- Perform session with uplink ----------------------------------------
:_SESS
rem - Since version 0.9.3 binkd can make poll by itself, so the following
rem - lines (classical touch and "poor man's" version via ECHO)
rem - is no longer needed
rem touch \fido\spool\out\01cf0147.flo
rem echo.>>\fido\spool\out\01cf0147.flo
\fido\bin\binkd -P 2:463/327 -p \fido\etc\binkd.cfg

goto _END


rem --- Toss incoming (if any), View/edit mail, then scan (if need) --------
:_EDIT

if not exist \fido\flag\toss.now goto _GOLDED
ren \fido\flag\toss.now edit.now
goto _TOSS

:_GOLDED
\fido\bin\ged -C\fido\etc\golded.cfg
if errorlevel 008 goto _ERROR
if errorlevel 001 goto _SCAN
goto _END

:_ERROR
echo Something goes wrong! Please read log files.

goto _END


rem --- Toss incoming echomail ---------------------------------------------
:_TOSS

\fido\bin\crashmail SETTINGS \fido\etc\crashmail.prefs TOSS
if not exist \fido\flag\edit.now GOTO _END

del \fido\flag\edit.now
goto _GOLDED


rem --- Scan for outgoing mail ---------------------------------------------
:_SCAN

del \fido\mbase\*.cmhw >NUL
\fido\bin\crashmail SETTINGS \fido\etc\crashmail.prefs SCAN
if exist \fido\flag\out_mail.ged del \fido\flag\out_mail.ged
if exist \fido\flag\out_echo.lst del \fido\flag\out_echo.lst

goto _END


rem --- Generate GoldED echolist from CrashMail.prefs ----------------------
:_CRML

\fido\bin\crashexport PREFSFILE \fido\etc\crashmail.prefs OUTFILE \fido\etc\crmlecho.lst FORMAT GOLDED
goto _END


rem --- Generate nodelist indexes ------------------------------------------
:_NDLC

\fido\bin\crashlist \fido\list
\fido\bin\gn -C \fido\etc\golded.cfg
goto _END


rem --- Messagebase maintenance (purge and pack) ---------------------------
:_MBSM

\fido\bin\crashmaint MAINT PACK SETTINGS \fido\etc\crashmail.prefs
goto _END


REM --- End ----------------------------------------------------------------
:_END

REM *** EOF FIDO.BAT *******************************************************

Только вместо T-Mail у меня BinkD, ничего?

[igor goryachev (from livejournal.com)]

+1. Андрей, низачот! Тема T-Mail'а не раскрыта. ;-)

[oldmann.livejournal.com]

а какое разрешение у этой плазменной панели?

[porokh.livejournal.com]

Таки 1360*768, АПВС? Тrавить будете? :-)

[oldmann.livejournal.com]

конечно буду. я того человека, который у нас купил панель с говноразрешением, на которую все консоли мониторинга не лезут, травлю уже третий год :)

[porokh.livejournal.com]

Мне думается, что тут может от видеокарты ещё зависит? Хотя, если панель 720p, но наверно таки да. Впрочем, нам хватает, и так порой мелковато выглядит.

[oldmann.livejournal.com]

видеокарта, дорогой друг, покупалась само пиздачая под эти дела - matrox G450 QuadDisplay.

[sonny363.livejournal.com]

Я всё понимаю, кроме одного.
Пишет это, ЕМНИП, дипломированный SUNтехник, а наблюдаем голую виндузятину, тьфу.

[vbios-forever.livejournal.com]

покажите решение проще, быстрее и красивее )
посмеемся вместе.

[porokh.livejournal.com]

Мне кажется, что дядя Саша, как тоже ушибленный FIDO, просто плачет от ностальгии... Плачет и травит, травит и плачет :-))

[oldmann.livejournal.com]

пусть тогда качнет себе Sun Virtualbox и там полуось поставит из ностальгических побуждений, я проверял - что Warp, что Merlin работают нормально)

[oldmann.livejournal.com]

я дипломированный AIXоид и Sunтехник, с 12-летним опытом, на десктопе у меня Windows. объяснить, почему?

[porokh.livejournal.com]

А объясни, любопытно сравнить чужое горе со своим (у меня -- Lotus Notes, BMC Remedy и, главное, ИТ-политика Заказчика).

[oldmann.livejournal.com]

и-мен-но.
обилие корпоративного софта, в том числе всяких разных консолей и конфигураторов на жабе, которые стабильно не работают нигде, кроме как под Windows.

[porokh.livejournal.com]

Сколько тебе потребуется времени, чтоб переписать это решение на sh? За 5 минуту с перекуром управишься? Оно ж для любой POSIX системы пойдёт, лишь бы command line player был.

А так -- ну вот что было под рукой (а была выданная Заказчиком рабочая станция HP), то и заюзали.

[porokh.livejournal.com]

Вот такое "программирование" я люблю, хлебом не корми -- дай заимплементить полезную мелочишку :-) Интересно, сколько ошибок в моём скрипте? Про лок я вспомнил когда уже писать начал, просто в голове "прокрутил" как оно с т.з. машины Тьринга выглядеть будет.

[hgll.livejournal.com]

Боюсь спросить, что же стало в конечном счете с системой мониторинга

[porokh.livejournal.com]

То же, что и было -- даже расширилось количество приложений. Творческое использование. то-сё...