Remote-Hand_DIO

Remote-Hand_DIOとは

Remote-Hand_DIOはVMware Playerと1CDLinuxのPepoLinuxを使いFOMAやDIO-シリアルを接続してネットワーク監視や外部信号の入力監視を行えるものです。

外部入力信号の変化によりメールの通知、パトライト点灯やgmailとwgetを使い遠隔地の入力信号の状態通知や外部接続機器をオン・オフすることが出来ます。

防犯センサ、火災報知器などの入力監視で防犯、防災やWebカメラを接続すれば介護などで見守を必要とする場合もLinuxで行う事が出来ます。

携帯電話FOMAをUSB接続すれば遠隔地からのリモートログイン・ダイヤルインサーバーなどまさにリモートハンド（remote-hand）を手軽に実現させるVMware Applianceです。

※DIOとはDigital Input Digital Outputの略でコンピュータと外の世界をデジタル信号によって接続するものです。

このパッケージはRemote-Hand OpenMicroseverで実現したものを外部信号の入出力端子を持つボードをWindowsXPなど普段使っているPCへシリアル接続して、それに対する動作をGUIでコントロール出来るようにした物です。

2012.7.18リリースしたv.023のマイルストーンはDIOを入力イベントに画像メールを添付できるようになった、PepoLinuxはX-Windowを捨て軽量化の為を図って来ましたが、今回始めて映像をコマンドプロントから扱えるようにした事です。

Yamauchi Isamu, also IZAMUKARERA

2013.3.4

http://www.pepolinux.com

Remote-Hand_DIOイメージ１

Remote-Hand_DIOイメージ２

シリアルDIOボード

１４本の入出力端子を持ち、前半８本を入力、後半６本を出力として利用

防犯グッズ(パトライト)

ソリッドステートコンセント(AC100Vコンセント)

金属製のコンセントボックスの側面に穴を空け丸ピンコネンクタを取り付けＤＩＯの出力を取り込む

ソリッドステートコンセント(AC100Vコンセント内部)

ＤＩＯの出力０-５Ｖをソリッドステートスイッチで１００Ｖ/ＡＣをオン・オフ出来る、金属製のコンセントボックスを使う事によりソリッドステートスイッチの放熱を出来るので比較的大きな５Ａ程度の通電が可能

フロートスイッチ

池や川の水が一定以上のなるとＡ接点出力、パトライトを点灯やメール通知などが出来る

煙感知器

Ａ接点を外部出力出来る煙感知器、動作するとパトライトを点灯やメール通知などが出来る

熱感知器

Ａ接点を外部出力出来るガス・熱感知器、動作するとパトライトを点灯やメール通知などが出来る

動物監視

出先から自宅のペットをＷＥＢカメラで動画を撮影、添付メール出来る

監視カメラ

Ｌｉｎｕｘで使えるＵＶＣカメラ、人感センサーを利用して動画を撮影、添付メール出来る

人感センサ(無線・送信機)

人感センサ(無線・受信機)

市販の無線受信機を少し改造・Ａ接点出力、人感センサーが働いたらパトライトを点灯やメール通知などが出来る

無線受信機内部

フォトカップラと抵抗を取り付け、無電圧A接点として出力

ブートイメージ

立ち上げ完了ログイン

ログイン画面に表示されているIPアドレスへWEBアクセス

一番下のリンク「GUIでRemote-Handの設定をします。」を選択します

WEB認証

初期値はユーザー名：remote　パスワード：hand

①初期画面・イーサネット設定

②ルーティング設定画面

③ppp設定画面

FOMAの動作モード（64kデジタル通信、オンデマンド、PPP常時接続）を選択

64kデジタル通信時にPPPクライアントのユーザー名とパスワードを設定、他はダミーで登録が必要

④WEBユーザー設定画面

初期状態はユーザー名：remote　パスワード：hand

⑤DIO設定画面

入力端子と出力端子に別名をつけて後の設定に反映します。

１４本のＤＩＯ端子の状態をajaxで５秒毎に更新して表示します。

６本の出力端子へ『low』又は『high』をajaxで設定することが出来ます。

⑥PING監視するIPアドレスを設定します。（デジタルアウト）

監視する機器がタイムアウトを起こせばデジタル指定の出力端子をＯＮ又はＯＦＦします。

削除はIPアドレスを指定して削除を選択します。

⑦PING監視するIPアドレスを設定します。（メール）

監視する機器がタイムアウトを起こせば指定されたメールアドレスに時間情報とカウンタを付加してメッセージを送信します。

正常にPING応答を返せば時間情報を付加してメッセージを送信します。

⑧PING監視するIPアドレスを設定します。（電話）

監視する機器がタイムアウトを起こせば指定された電話番号へダイヤルします・・・ワンギリ

正常にPING応答を返せば電話番号へダイヤルします・・・ワンギリ

⑨デジタル入力信号の変化に対するアクションを設定します－１

一つの入力信号に対して二つ、全部で１６のアクションを設定出来ます。

つまり信号の立ち上がり：LOW→HIGH（０→１）と信号の立下り：HIGH→LOW（１→０）の二つでメール、出力信号HIGH又はLOW、電話又はアクションなしのカウンターリセット操作でイベントカウンターのみ表示が出来ます。

ajaxで入力信号のHIGH→LOWとLOW→HIGHをそれぞれのイベントに対するイベント回数とリセット日時、最新イベント発生日時を定周期で更新します。

⑩デジタル入力信号の変化対するアクションを設定します－２

－１と同様にデジタル入力信号に対する二つのアクションを設定できます。

例えば、トラが檻をやぶる（LOW→HIGH）：パトライトを点灯させる、メールを送信する

トラが檻を閉める（HIGH→LOW）：パトライトを消灯させる、電話をワンギリするなど

一つの入力信号に対して合わせ４つのアクションを設定出来る事が出来ます。

⑪アラートメールの設定をします

初期値ではFOMAを使用してダイヤルアップでインターネットへ直接接続してsendmailでメールを送信します。

domain内部よりsmtpプロトコルを直接通せない場合はwgetを選択します。

wgetはgmailアカントを使用してメッセージを送信する方法でpepogmail_send.cgiが動作するserverが別途必要

例えばRemote-Hand_DIOが出先で自宅のserverへwgetでメッセージを送信依頼する事想定しています。

実際にはRemote-Hand_DIOにpepogmail_send.cgiが動作しているのでIPアドレスなどの情報を自serverの情報へ設定する。

下側のSUBメニューではでgmailのアカウント情報とserverのパスワードなどを設定して、定期的に新着メールをチェックして件名がマッチすればＤＩＯに対するコマンドを実行する。

キーワードに『DIO』を設定して、件名に『DIO』を指定してgmailへ送信するとＤＩＯの入力ポート情報を下記の内容ように返信してくる

件名：remote-hand dio report

本文：

入力1=high
隣の家が火事です=high
一階が火事です=high
入力4=high
入力5=high
入力6=high
入力7=high
出力６loop接続=low
ランプを点灯=high
出力2=high
出力3=high
出力4=high
出力5=high
出力6=low

『DIO 1 1』を指定して送信すると出力ポート１番目を１（high）にするコマンドを実行する

例えばDIOからの５ｖ－０ｖ出力をソリッドステートスイッチでAC100vをオンオフさせたら部屋の照明を

点灯又は消灯がメール操作で出来る。

『DIO 9』を指定して送信するとUSB接続されたWEBカメラからの動画数秒取得してメールに添付してくる。

⑫指定されたURLからpodcastsのファイル取得とデジタル出力の定時起動設定画面

上段のメニューはMP3のpodcastsファイルを指定、定期的に収集しMP3プレイヤーへ転送と世代管理を設定します。

下段のサブメニューは定期的にデジタル出力制御を行う事が出来ます、例えばペット部屋の照明を定時で点灯/消灯など付加価値を上げるものと思います。

実際にはcrontabの設定をGUIで出来るようにしたもの、下記は20時～23時の間10分毎にデジタル出力１を制御する。

0-59/10 20-23 * * * /var/www/html/remote-hand/auto_act0

⑬サーバーの設定＆コントロール設定画面

ブート時の初期情報の設定画面、これ以前の画面は一時設定この画面は立ち上げ時のIPアドレスなどの初期情報を設定します。

WEBユーザー、パスワードを最低限入力し実行すると、現在の設定保存してブート時に反映します。

履歴

2011.11.9 Rmote-Hand_DIOファーストリリース

o PepoLinux-0.52.iso以降のイメージ必要

2011.11.13 Rmote-Hand_DIO v0.11リリース

o WEBパスワード不可修正

o startupエラー表示修正

o eth0のdhcp対応

o DIO関係のスクリプト修正

2011.12.9 Rmote-Hand_DIO v0.12リリース

o DIO関係のスクリプト修正

o gmail経由でDIOの操作を出来るようにした

2011.12.13 Rmote-Hand_DIO v0.13リリース

o pepogmail4dioスクリプト修正

2011.12.17 Rmote-Hand_DIO v0.14リリース

o pepogmail4dioスクリプト修正

o DIOの入力８本、出力６本を全てGUIで設定出来るようした

2012.1.3 Rmote-Hand_DIO v0.15リリース

o DISK容量を2Gスプリットへ変更（ホストメモリ512MB動作）

o PepoLinux-0.52.iso以降のイメージ必要

o CGIを2012年版へ変更

2012.1.8 Rmote-Hand_DIO v0.16リリース

o gmailでDIO操作の件名を設定出来るようにした

2012.1.12 Rmote-Hand_DIO v0.17リリース

o デバイス未接続状態から接続状態時に正常動作しないバクを修正

o デジタル入力信号の変化に対するアクション－２のメールアドレスが有効にならないバグ修正

2012.1.22　Rmote-Hand_DIO v0.18リリース

o gmailからのDIOの出力操作が出来ないpepogmail4dioのバグ修正

o DIOのlockfile作成に失敗した場合にコマンドファイルが残るpepodioctlのバグ修正

o pepodioctlでDIOのアクセス競合時リトライタイマーをランダムとしリトライを１０回に変更

o 作業ディレクトリを/var/tmpから/var/www/html/remote-hand/tmp/へ変更

2012.1.31 Rmote-Hand_DIO v0.19リリース

o 入力端子４本のイベント登録から８本へ拡張 シリアルDIOのA～Hの８本を入力、I～Nの６本を出力として一つに設定画面で １本の入力端子に対してhigh→lowとlow→highの２つのアクションを登録出来るようにして もう一つの設定画面で同じイベントに対して更に２つのアクションを設定できるようにした 入力１番端子がlow→highのイベントに対し２つのアクションを起こせる 例えば、メールの送信とパトライトの点灯等（出力端子１番をhigh）が可能となった

2012.2.22 Rmote-Hand_DIO v0.19リリース

o pepodioctlの処理速度向上の為タイマーチューニング

o pepodiodのpollタイマーを２秒から１秒へ変更

o PepoLinux-0.55以上で動作

2012.3.4 Rmote-Hand_DIO v0.20リリース

o pepodiodのDIOリードデータを８個同時にファイル書き込みするように変更

o DIOの入力情報をajaxで１秒毎に自動更新するように変更

o ajaxで１秒毎にアクセスするのでhttpdのlogrotateを4時間毎に行うように変更

2012.3.15 Rmote-Hand_DIO v0.21リリース

o pepodioctl：１５本の入出力情報を一度にリード出来るようにした

o menu5：ajaxでDIO出力値の表示と設定が出来るようにした。『入力値更新』ボタン設置

o httpdのアクセスログを減らす為DIOの入出力情報の表示を５秒毎に更新、logrotateを時間毎に変更

o menu12：Podcastsメニューが動作しないバグ修正

o pepogmial4dio：DIO出力情報を新たに付加するようにした。DIO操作キーワードのマッチングチェック変更（キーワードのマッチパターンとlengthをＡＮＤでチェック）

2012.4.1 Rmote-Hand_DIO v0.22リリース

o menu9,menu10でDIO入力端子のカウンターをajaxで表示出来るように機能UP

o pepodiod：DIO入力端子のカウンターをjsonデータに追加するように機能UP

o pepogmial4dio：gmailでDIO入力端子のカウンターを取得出来るように機能UP

o javascriptを圧縮・外部参照にした

o PepoLinux-0.58以上で動作

2012.7.18 Rmote-Hand_DIO v0.23リリース

o pepogmial4dio：gmailで入力端子9を指定するとUSB接続カメラで録画と返信機能を追加

o PepoLinux-0.60以上で動作

2012.7.27 Rmote-Hand_DIO v0.24リリース

o DIOのアクションで電話関係のスクリプト修正

o PepoLinux-0.60以上対応

2012.10.12 Rmote-Hand_DIO v0.25リリース

o pepogmial4dio：操作許可メールアドレスにオールユーザー処理を追加

o PepoLinux-0.61以上対応

013.1.20 Rmote-Hand_DIO v0.27リリース

o 保存設定データでgmailによるdioの制御が出来ないバグ修正

o 保存設定データのクリア操作をmenu13 Server Controlに追加

o PepoLinux-0.62以上対応

2013.2.12 Rmote-Hand_DIO v0.28リリース

o menu12へデジタル出力の自動処理を追加

o PepoLinux-0.62以上対応

2013.2.21 Rmote-Hand_DIO v0.29リリース

o menu12へデジタル出力の自動処理機能追加＆バグ修正

o PepoLinux-0.62以上対応

2013.2.24 Rmote-Hand_DIO v0.30リリース

o menu12：デジタル出力処理(crond, Permission denied)バグ修正

o PepoLinux-0.62以上対応

2013.3.4 Rmote-Hand_DIO v0.31リリース

o menu12へデジタル出力の自動処理機能UP（設定項目６→１２）

o PepoLinux-0.62以上対応

お好みのURLからpodcastsのMP3音楽ファイルを取得するlinuxスクリプト

#!/bin/sh
# licence GPLv2 ; this scripts designed by IZAMUKARERA 2010.12.12 update 2012.11.15
# get pepopodcastget mp3
# XMLにpodcastのURLを登録
#XML=http://podcast.1242.com/ps/index.xml
#XML=http://podcasts.voanews.com/podcastxml_local.cfm?id=1631
XML=http://www3.nhk.or.jp/rj/podcast/rss/english.xml
#XML=http://www.cnn.com/services/podcasting/newscast/rss.xml
# CTは保存世代数（古い順に消去）
CT=6
# DEVはMP3プレーヤーのデバイス名
DEV=/dev/sdb1
MNT=/mnt/music
MDIR=$MNT/MUSIC/podcasts
DIR=/tmp/music
RAND=`echo -e $RANDOM`
TMP=$DIR/${RAND}.xml
[ ! -e $DIR ] && mkdir -p $DIR
wget $XML -O $TMP
URL=`cat $TMP |awk '/enclosure/{split($0,I,"\"")
  for ( J in I ) {
    if (I[J] ~ /\.mp3$/) {
      printf I[J]" "
    }
  }
}'`
for FIL in $URL
do
  MP3=`echo $FIL |awk '{s=split($0,I,"/"); printf I[s]}'`
  [ -f $DIR/$MP3 ] && continue
  wget $FIL -O $DIR/$MP3
  [ ! -s $DIR/$MP3 ] && rm -f $DIR/$MP3
done
rm -f $TMP
MFIL=`ls -tr $DIR`
MCT=`echo $MFIL | wc -w`
if [ $MCT -gt $CT ];then
  I=`expr $MCT - $CT`
  for J in $MFIL
  do
    rm -f $DIR/$J
    I=`expr $I - 1`
    [ $I -eq 0 ] && break
  done
fi
[ ! -e $MNT ] && mkdir -p $MNT
mount $DEV $MNT -t vfat >/dev/null 2>&1
[ `mount |grep $DEV |wc -l` -eq 1 ] && MDEV=OK || MDEV=NG
if [ $MDEV = "OK" ];then
  [ ! -e $MDIR ] && mkdir -p $MDIR
  MFIL=`ls -tr $DIR`
  for MM in $MFIL
  do
    if [ -s $DIR/$MM ];then
      mv -f $DIR/$MM $MDIR
    fi
  done
  MFIL=`ls -tr $MDIR`
  MCT=`echo $MFIL | wc -w`
  if [ $MCT -gt $CT ];then
    I=`expr $MCT - $CT`
    for J in $MFIL
    do
      rm -f $MDIR/$J
      I=`expr $I - 1`
      [ $I -eq 0 ] && break
    done
  fi
fi
[ $MDEV = "OK" ] && umount $DEV

最初に

pepodioctlとはPepoLinux-0.51以降に収録されているシリアルDIOボードの各ポートをread/writeするちょっとしたプログラムです。

PepoLinuxに収録されているプログラムを必要とするので単独では動作しませんが、シリアル経由でコマンドのやり取りで制御する機器やボードのプログラムに応用出来ると思います。

更新履歴

2011.12.4：１５本ある入出力ポートを前８本を入力、後の６本を出力で使用するように変更

これでチャンネル８を指定すると、入力８本分を一度のコマンドで読み込める。

これによりＤＩＯ監視デーモン：pepodiodの入力ポートのスキャン時間及び処理時間を短縮出来る。

2011.12.11

o ６５６ミリ秒以下のパルス出力をＰＩＣ内部のタイマーを使用してより正確な時間幅とするように変更

o 現在のバージョンでは６５５ミリ秒以上のパルスは１秒程度の誤差がある

2011.12.12

６５６ミリ秒以下のパルス出力をＰＩＣ内部のタイマーの乗数を１００倍に修正

2012.1.19

o デバイスアクセス時のリトライ・タイマーをランダム、リトライ回数を１０回にしてよりＤＩＯの動作を確実にした

2012.1.21

o pid毎にコマンド・ファイルを生成するようにした

o lockfileが失敗した時にコマンド・ファイルを消去するように修正

2012.1.21

o 処理速度向上の為、各タイマー調整

2012.3.11

o ＡＲＧにチャンネルＮＯ９を新たに機能追加、入力１５ビットを一度にリードできるように変更した

2012.10.7

o タイマーチューニングにより処理速度UP

[root@]# pepodioctl 9
3FFF

下記よりダウンロードしてください

http://sourceforge.jp/projects/pepolinux/wiki/chobit_prog%20pepodioctl

2012.10.17 by.Yamauchi Isamu

#!/bin/sh
# licence GPLv2 ; this scripts designed by IZAMUKARERA 2011.10.8 update 2012.10.7
# pepodioctl for contorl digital-IN/digital-OUT to ANDDIO
# Input channel A to H ,Output channel I to N
# pepodioctl $1:chno [$2:0 or 1] [$3: time->1 to 65535ms]
#
PATH=$PATH:/usr/local/bin:/usr/local/sbin
if [ $# = 0 ]; then
  echo "usage $0 usage $0 read->chno:0-9 | write->chno:0-5 [DO:0|1] [time->1 to 65535ms]"
  exit -1
fi
DI_ADR="A"
#DIO_DEV="/dev/ttyUSB0"
DI_TTY=ttyS1
#DI_TTY=ttyUSB0
WAIT=10
READTM=10
TRY=30
pid=`echo -en $$`
DIO_DEV="/dev/${DI_TTY}"
ALIAS_DI=/var/www/html/remote-hand/tmp/.alias_di
CMD="/var/www/html/remote-hand/tmp/dioctl.${pid}"
[ -e "$ALIAS_DI" ] && . "$ALIAS_DI"
[ ! -z "$DI_TTY" ] && DIO_DEV="/dev/"${DI_TTY}
if [ ! -e $DIO_DEV ];then
  echo -en "-1"
  exit -1
fi
LOCKFILE="/var/lock/LCK..${DI_TTY}.dio"
LOCK="/var/lock/LCK..${DI_TTY}"
RETRY=$TRY
while [ -e $LOCK ]
do
  msleep `echo -en  $RANDOM |cut -c 1-2`
  RETRY=$(($RETRY - 1))
  if [ $RETRY = 0 ];then
    echo -en "-1" >/dev/stderr
    exit -1
  fi
done

CMD_DIO="/usr/local/bin/epicon -d 5 -D 5 -ql ${DIO_DEV} -c ${CMD}"
n=$1
if [ "$n" -gt 9 ] || [ "$n" -lt 0 ] || [ -n "$2" -a "$1" -gt 5 ] ;then
  echo "usage $0 read->chno:0-9 | write->chno:0-5 [DO:0|1] [time->1 to 65535ms]"
  exit -1
fi

error(){
  [ -e ${CMD} ] && rm -f ${CMD}
  [ -e ${LOCKFILE} ] && rm -f ${LOCKFILE}
  [ -e ${LOCK} ] && rm -f ${LOCK}
  exit 0
}
trap error SIGHUP SIGTERM SIGQUIT SIGKILL SIGINT SIGCHLD

if [ ! -z $2 ];then
# DIO Output channel address set
  k=0
  for i in I J K L M N
  do
    j[$k]=$i
    k=$[$k+1]
  done
  CH=${j[$n]}
  if [ "$2" = "1" ];then
    DO="H"
    DO_INVERT="L"
  else 
    DO="L"
    DO_INVERT="H"
  fi
  [ ! -z $3 ] && OUTTM=$3 || unset OUTTM
else
# DIO Input channel address set
  unset DO
  k=0
  for i in A B C D E F G H P Q
  do
    j[$k]=$i
    k=$[$k+1]
  done
  CH=${j[$n]}
fi

dio_setup(){
 cat>$CMD<<END
#!/bin/sh
dio_out() {
# dio_out CH DATA
  echo -en "${DI_ADR}\${2}\${1}\${3}\\r"
  if [ \$? != "0" ]; then
    echo -en "-1" >/dev/stderr
    return -1
  fi
}

dio_out_in(){
# dio out after read
  msleep ${READTM}
  read -s -n 3 -t 1 R || R="-1"
  [ \`echo -en \$R | awk '{ printf(length(\$0))}'\` != 3 ] && R="-1"
  if [ \$R != "-1" ];then
    echo -en \$R |awk '{D=substr(\$0,2,1);sub("L","0",D);sub("H","1",D);printf D}'>/dev/stderr
  else
    echo -en "-1" >/dev/stderr
    return -1
  fi
}

dio_in() {
# dio_input CH
  local ch
  ch=\$1
  [ \$1 = "Q" ] && ch=""
  echo -en "${DI_ADR}R\${ch}\\r"
  msleep ${READTM}
  if [ \$1 = "Q" ];then
    read -s -n 5 -t 1 R || R="-1"
    [ \`echo -en \$R | awk '{ printf(length(\$0))}'\` != 5 ] && R="-1"
  else
    read -s -n 3 -t 1 R || R="-1"
    [ \`echo -en \$R | awk '{ printf(length(\$0))}'\` != 3 ] && R="-1"
  fi
  if [ \$R != "-1" ];then
    [ \${1} = "P" ] && echo -en \$R |awk '{D=substr(\$0,2,2);printf D}'>/dev/stderr
    [ \${1} = "Q" ] && echo -en \$R |awk '{D=substr(\$0,2,4);printf D}'>/dev/stderr
    [ \${1} != "P" ] && [ \${1} != "Q" ] && echo -en \$R |awk '{D=substr(\$0,3,1);sub("L","0",D);sub("H","1",D);printf D}'>/dev/stderr
  else
    echo -en "-1" >/dev/stderr
    return -1
  fi
}
END
}

dio_exec(){
# lockfile & DIO command exec
  RETRY=$TRY
  while [ $RETRY != 0 ]
  do
    lockfile -0 -r 1 ${LOCKFILE} >/dev/null 2>&1
    [ $? = 0 ] && break
    msleep `echo -en  $RANDOM |cut -c 1-2`
    RETRY=$(($RETRY - 1))
  done
  if [ $RETRY = 0 ];then
    echo -en "-1" >/dev/stderr
    rm -f $CMD
    return
  else
    echo -en $$ >${LOCKFILE}
    chmod +x $CMD
    $CMD_DIO
    rm -f $CMD
    rm -f ${LOCKFILE}
  fi
}

if [ ! -z $DO ];then
# DIO Ouput mode
  if [ ! -z $OUTTM ];then
    if [ ${OUTTM} -lt 656 ];then
      OUTTM=$(($OUTTM * 100))
      dio_setup
    cat>>$CMD<<END
dio_out ${CH} ${DO} ${OUTTM}
dio_out_in ${CH}
END
      dio_exec
    else
      dio_setup
    cat>>$CMD<<END
dio_out ${CH} ${DO}
END
      dio_exec
      msleep $OUTTM
      dio_setup
      cat>>$CMD<<END
dio_out ${CH} ${DO_INVERT}
msleep $WAIT
dio_out_in ${CH}
END
      dio_exec
    fi
  else
    dio_setup
    cat>>$CMD<<END
dio_out ${CH} ${DO}
msleep $WAIT
dio_out_in ${CH}
END
    dio_exec
  fi
else
# DIO Input mode
  dio_setup
  cat>>$CMD<<END
dio_in ${CH}
END
  dio_exec
  exit 0
fi

pepogmail_send

pepogmail_sendとはdomain内よりsendmailなどのMTAを使用してメールが送信できない場合、サブミッションポート（587）が空いていれば自分のgmailアカントからメールを送信できるちょびっとなrubyスクリプト(CGI)です。

変更履歴

2011.11.28

o ファーストリリース

o 2012.7.21

o 添付ファイルを送信出来るよう機能UP

#!/usr/bin/ruby -Ku
# pepogmail_image_send.cgi ; mail send test & file 
# licence GPLv2 ; this scripts designed by IZAMUKARERA 2011.11.28 update 2012.7.21
def error_cgi
        print "Content-Type:text/html;charset=UTF-8\n\n"
        print "*** CGI Error List ***<br />"
        print "#{CGI.escapeHTML($!.inspect)}<br />"
        $@.each {|x| print CGI.escapeHTML(x), "<br />"}
end

class Gmail
  def initialize()
    @mail = TMail::Mail.new
    @mail.mime_version = '1.0'
  end
  def set_account(user)
    @account = user
  end
  def set_mailfrom(from_address)
    @mail.from = from_address
    @mail.reply_to = from_address
  end
  def set_password(password)
    @password = password
  end
  def set_to(to_addresses)
    @mail.to = to_addresses
  end
  def set_subject(subject)
    work = Kconv.tojis(subject).split(//,1).pack('m').chomp
    @mail.subject = "=?ISO-2022-JP?B?"+work.gsub('\n', '')+"?="
  end
  def set_text(text)
    main_text = TMail::Mail.new
    main_text.set_content_type 'text', 'plain', {'charset'=>'iso-2022-jp'}
    main_text.body = Kconv.tojis(text)
    @mail.parts.push main_text
  end
  def send()
    @mail.date = Time.now
    @mail.write_back
    smtpserver = Net::SMTP.new('smtp.gmail.com', 587)
    smtpserver.enable_tls(OpenSSL::SSL::VERIFY_NONE)
    smtpserver.start('gmail.com', @account, @password, :login) do |smtp|
    smtp.sendmail(@mail.encoded, @mail.from, @mail.reply_to, @mail.to)
    end
  end
  def set_attach(file_dir, file_name)
    attach = TMail::Mail.new
    file_dir_name = file_dir + file_name
    attach.body = Base64.encode64 File.read(file_dir_name)
    attach.set_content_type 'application','mp4','name'=>file_name
    attach.set_content_disposition 'attachment','filename'=>file_name
    attach.transfer_encoding = 'base64'
    @mail.parts.push attach
  end
end

begin
  require 'net/smtp' 
  require 'rubygems'
  require 'tmail'
  require 'tlsmail'
  require 'kconv'
  require 'openssl'
  require 'base64'
  require 'cgi'
 
  cgi = CGI.new()
  cgi_mail_from = cgi['mail_from']
  cgi_password = cgi['password']
  cgi_mail_to = cgi['mail_to']
  cgi_subject = cgi['subject']
  cgi_message = cgi['msg']
  cgi_server = cgi['server']
  cgi_file_name = cgi['image_file']
  cgi_file_dir = '/var/www/html/remote-hand/tmp/'
  user = 'gmail_account@gmail.com'
  user_password = 'gmail_password'
  s_password = 'this_server_password'
  print "Content-Type:text/html;charset=UTF-8\n\n"
  print '<BODY BGCOLOR="#E0FFFF">'
  print "<HEAD>"
  print "<TITLE>Mail Send Process</TITLE>"
  print "</HEAD>"
  print "<BODY>"
  if cgi_password == s_password then
    gmail = Gmail.new()
    gmail.set_account(user)
    gmail.set_password(user_password)
    gmail.set_mailfrom(cgi_mail_from)
    gmail.set_to(cgi_mail_to)
    gmail.set_subject(cgi_subject)
    gmail.set_text(cgi_message)
    if cgi_file_name != ""
      gmail.set_attach(cgi_file_dir, cgi_file_name)
    end
    gmail.send
    print "Send gmail -Successful completion<BR>"
  elsif cgi_password != s_password then
    print "Wrong password -Abend<BR>"
  end
  print "</BODY>"
  print "</HTML>"
rescue
    error_cgi
end  

CGI確認用のちょびっとなmail formです。

<HTML>
<HEAD>
<META http-equiv="Content-Type" content="text/HTML; charset=UTF-8">
<META NAME="Auther" content="yamauchi.isamu">
<META NAME="Copyright" content="pepolinux.local">
<META NAME="Build" content="2012.7.9">
<META NAME="reply-to" content="pepo1@pepolinux.local">
<script type="text/javascript">
function mail_ck(str) {
/* mailアドレスチェック */
  var ck_pattern = /[!#-9A-~]+@+[0-9A-Za-z.-]+.+[^.]$/;
  if( ! str.match(ck_pattern)) {
    alert(str + "←" + "メールアドレスに誤りがあります。");
    return -1;
  }
  return 1;
}
function num_alpha_ck(str) {
/* 半角英数字チェック */
  if( str.match( /[^A-Za-z0-9\s.\-_]/ ) ) {
    alert(str + "←" + "半角英数字でのみ入力してください。");
    return -1;
  }
  return 1;
}

function msg_ck(str) {
/* メッセージ長さチェック */
  var ck_size = str.length
  if( ck_size > 255 ) {
    alert("メッセージサイズオーバーです");
    return -1;
  }
  return 1;
}

function sendmail_ck() {
  var check = 0;
  var error_ct = 0;
  var ck_str = "";
  ck_str = document.menu.mail_to.value;
  if ( ck_str != "" ) {
    check++;
    if ( mail_ck(ck_str) == -1 ) {
      error_ct++;
    }
  }
  ck_str = document.menu.mail_from.value;
  if ( ck_str != "" ) {
    check++;
    if ( mail_ck(ck_str) == -1 ) {
      error_ct++;
    }
  }
  ck_str =  document.menu.msg.value;
  if ( ck_str != "" ) {
    check++;
    if ( msg_ck(ck_str) == -1 ) {
      error_ct++;
    }
  }
  ck_str =  document.menu.subject.value;
  if ( ck_str != "") {
    check++;
  }
  ck_str =  document.menu.password.value;
  if ( ck_str != "") check++;
  ck_str =  document.menu.server.value;
  if ( ck_str != "") {
    check++;
    if (num_alpha_ck(ck_str) == -1 ) {
      error_ct++;
    }
  }
  ck_str =  document.menu.image_file;
  if ( ck_str != "") check++;
  if( error_ct == 0 && check == 6 || check == 7) {
    document.menu.submit(ck_str);
  }
  if ( check < 6) {
    alert("入力されていない項目があります")
  }
  return false;
}

function keypress() {
/*  Enter キー無効 */
    if(window.event.keyCode == 13){ 
        return false; 
    }   
    return true;   
}   
window.document.onkeydown= keypress;

</script>
<TITLE>メール送信</TITLE>
</HEAD>
<BODY BGCOLOR="#E0FFFF">
<!--Remote-Hand-->
<DT><FONT SIZE="+1"><B>メールを送信します</B></FONT></DT>
<FORM name="menu" ACTION="/cgi-bin/pepogmail_send.cgi" METHOD="POST">
<FONT SIZE="-1">Ｍａｉｌ　ｔｏ：<INPUT TYPE="text" style="width:200px;text-align:left;" VALUE="" NAME="mail_to">
<BR>
<FONT SIZE="-1">Ｍａｉｌ　Ｆｒｏｍ：<INPUT TYPE="text" style="width:200px;text-align:left;" VALUE="pepo1@pepolinux.local" NAME="mail_from">
<FONT>
<BR>
<FONT SIZE="-1">Ｓｕｂｊｅｃｔ：<INPUT TYPE="text" style="width:240px;text-align:left;" VALUE="メールの送信テスト" NAME="subject">
<BR>
<textarea NAME="msg" rows="4" cols="40" >ここにメッセージを書いて送信してください</textarea><BR>
<HR>
<FONT SIZE="-1">パスワード：<INPUT SIZE="10" TYPE="password" NAME="password">
<BR>
<FONT SIZE="-1">メールサーバ：<INPUT TYPE="text" style="width:200px;text-align:left;" VALUE="" NAME="server">
<BR>
<FONT SIZE="-1">イメージファイル：<INPUT TYPE="text" style="width:100px;text-align:left;" VALUE="" NAME="image_file">
<BR>

<INPUT style="text-align:center" TYPE="button" VALUE="実行" onClick="return sendmail_ck()" ;>
<INPUT style="text-align:center" TYPE="reset" VALUE="クリア">
</FORM>
</BODY>
</HTML>

最初に

pepogmail4picとはPepoLinux-0.60以降に収録されているUSB接続のWEBカメラで動画を取得してメールプログラムを起動する、ちょっとしたプログラムです。

pepogmail4dioから起動されるプログラムで例えばSubjectに『dio_get 9』を設定して監視用gmailのアドレスへ送信すると数秒の動画を記録、添付メールで返信する事が出来ます。

PepoLinuxに収録されているプログラムを必要とするので単独では動作しませんが、現地のイベント＆アクションでペットや制御機器の動画で遠隔地の状態監視や防犯などのプログラムに応用出来ると思います。

更新履歴

2012.7.11：ファーストリリース

ｏ pepogmail4dioからUSB接続のWEBカメラで静止画を取得してメールプログラムを起動できるようにした。

2012.10.7：タイマー値などチューニング

ｏ 動画を取得してメールプログラムを起動できるようにした。

#!/bin/sh
# licence GPLv2 ; this scripts designed by IZAMUKARERA 2012.7.11 update 2012.10.7
# pepogmail4pic ; get video or jpeg & send mail
# pepogmail4pic mail_to subject message
# wget_mail.sh $1:mail_to, $2:subject, $3:message ,$4:image.mp4

#IMAGE=remote_hand.jpeg
IMAGE=remote_hand.mp4
OPTION="-t 8"
WORKDIR=/var/www/html/remote-hand/tmp
WORKIMAGE=${WORKDIR}/${IMAGE}
WGETMAIL=/pepolinux/wget_mail.sh
MAIL_TO=$1
if [ $# = 0 ];then
  echo "usage :$0 mail_to | subject | message"
  exit
fi
[ ! -z $2 ] && SUBJECT="$2"
[ -z $2 ] && SUBJECT="remote_hand+picture"
[ ! -z $3 ] && MESSAGE="$3"
[ -z $3 ] && MESSAGE="remote_hand+picture"
prog=peposendmail4pic
pidfile=/var/run/$prog.pid
error(){
  [ -e $WORKIMAGE ] && rm -f $WORKIMAGE
  [ -e $pidfile ] && rm -f $pidfile
  exit 0
}
trap error SIGINT SIGTERM SIGHUP SIGKILL

while [ -e ${pidfile} ]
do
  msleep 100
done

VIDEO=/dev/video
if [ -e "$VIDEO" ];then
  echo -en $$ >$pidfile
  [ -e $WORKIMAGE ] && rm -f $WORKIMAGE
  ffmpeg $OPTION -f video4linux2 -s 640x480 -i /dev/video0 -y $WORKIMAGE >/dev/null 2>&1
  msleep 1000
  if [ ! -e $WORKIMAGE ];then
    [ -e ${pidfile} ] && rm -f ${pidfile}
    exit -1
  fi
else
  echo "Video device is not connected -> $VIDEO"
  [ -e ${pidfile} ] && rm -f ${pidfile}
  exit -1
fi
if [ -e $WORKIMAGE ];then
  $WGETMAIL $MAIL_TO $SUBJECT $MESSAGE $IMAGE
  rm -f $WORKIMAGE
  rm -f ${pidfile}
fi

最初に

pepogmail4dioとはPepoLinux-0.52以降に収録されているwgetでgmailの新着メールを定期的にチェックして、シリアルDIOボードの各ポートへの書き込みや０～７チャンネルの入力ポート情報をメールしてくれる、ちょっとしたプログラムです。

PepoLinuxに収録されているプログラムを必要とするので単独では動作しませんが、シリアル経由でコマンドのやり取りで制御する機器やボードのプログラムに応用出来ると思います。

usage：メールの件名に入力ポートの状態通知メール：『dio』

出力ポートチャンネル０へ『１』writeライト：『dio 0 1』など

更新履歴

2011.12.7：ファーストリリース

2011.12.11

o ネットワーク遅延時間による揺れを自動補正するようにに変更

o ＤＩＯのライトコマンドの結果を入力全ポート情報で返信するよう変更

現在のバージョンではｗｇｅｔを使い新着メール到着時間と現在時間とネットワーク遅延時間による揺れを変数で補正して検出しているこの為コマンドが１０％以上の確立で不実行となる

これを出力ポート６本を入力ポート端子へジャンパ接続すればライトコマンドの結果を返信メールで良否が判定出来る

2011.12.11現在、携帯（ＤＯＣＯＭＯ）からコマンドのメール送信で、ＬＯＯＰ変数：１０秒、ＪＩＴＴＥＲ変数：７秒とした時に１０回に１回位失敗する

2011.12.16

o 件名がマッチしなくてもＤＩＯ入力情報を返信していたバグを修正

2012.1.19

o gmail新着チェック方法を強化してよりDIOコマンドが確実になった

o ＤＩＯ出力コマンドとメールを多重化出来るようにした、これにより下記のようなコマンドの多重化と入力ポート情報のメール返信が同時実行できるようになった

dio 1 1 60000 <= 出力ポート1番を60秒オン

2012.1.24

o メール応答分の入力端子エイリアス名が正しく参照出来ないバグ修正

2012.3.7

ＤＩＯ操作キーワードのマッチングチェック変更（キーワードのマッチパターンとlengthをＡＮＤでチェック）

2012.3.11

o pepodiodのバージョンＵＰに伴い１５ビット入出力全ての情報を返信するようにした

2012.3.29

o DIO入力端子のカウンターを取得出来るように機能UP

2012.10.8

o pepogmail4picと連携『dio_get 9』で動画の取得が出来るように機能UP

例:menud11のKey Wordで設定した『dio_get』で入力ポート１番目の情報を取得する

送信件名：dio_get 1

以下返信メール内容

件名：remote-hand dio report

本文：

うさぎ小屋の扉=high

dio0high

Reset 2012/03/30 05:19:57

Update 2012/03/30 05:22:50

Count 2

http://sourceforge.jp/projects/pepolinux/wiki/chobit_prog+pepogmail4dio

2012.10.8 by.Yamauchi Isamu also IZAMUKARERA

#!/bin/sh
# pepogmail4dio ; get mail & dio actions
# licence GPLv2 ; this scripts designed by IZAMUKARERA 2011.11.28 update 2012.10.7
PATH=$PATH:/usr/local/bin:/usr/local/sbin
RETRYTIME=10
RETRY=2
ALLOW_FROM=”all@pepolinux.local”
WORKDIR=/var/www/html/remote-hand/tmp
CONF="$WORKDIR/.pepogmail4dio.conf"
USERAGENT="Chrome/15.0.874.121"k
SUBJECT="remote-hand+dio+report"
WORK=$WORKDIR/.wget_tmp
tWORK=$WORKDIR/.wget_tmp.tmp
tAWK=$WORKDIR/.wget_awk.tmp
DIRD=$WORKDIR/.di_read_data
DOWD=$WORKDIR/.do_write_data
ALIAS_DI=$WORKDIR/.alias_di
ALIAS_DO=$WORKDIR/.alias_do
DIOCTL="/usr/local/bin/pepodioctl"
DIOEXEC="/usr/local/bin/pepodiodexec"
DIOCMD_DIO="$WORKDIR/.pepogmail4dioexec"
DIOCMD_MAIL="$WORKDIR/.pepogmail4mailexec"
GMAILIMAGE=/usr/local/bin/pepogmail4pic
MATCHDIO="dio"
GETSIZE="1k"
prog=pepogmail4dio
pidfile=/var/run/$prog.pid
echo -en $$ >$pidfile
error(){
  [ -e $DIOCMD_DIO ] && rm -f $DIOCMD_DIO
  [ -e $DIOCMD_MAIL ] && rm -f $DIOCMD_MAIL
  [ -e ${WORK} ] && rm -f ${WORK}
  [ -e ${tWORK} ] && rm -f ${tWORK}
  [ -e ${tAWK} ] && rm -f ${tAWK}
  exit 0
}
trap error SIGTERM SIGHUP SIGKILL
exec_dio() {
# dio write & exec command
# exec_dio message_id diocmd ch 0|1 [time]
  local pid CH
  [ ! -z $3 ] && CH=$(($3 - 1))
  pid=`echo $1 | cut -c 1-10`
  CMDDIO=${DIOCMD_DIO}.${pid}
  CMDMAIL=${DIOCMD_MAIL}.${pid}
  if [ $# -gt 3 ];then
# dio write
    cat >${CMDDIO}<<END
#!/bin/sh
PATH=$PATH:/usr/local/bin:/usr/local/sbin
${DIOCTL} $CH $4 $5
rm -f $CMDDIO
END
    chmod +x ${CMDDIO}
    ${DIOEXEC} ${CMDDIO}
  fi
# dio read & send mail
  msleep 2000
  [ -e $DIRD ] && . $DIRD
  [ -e $DOWD ] && . $DOWD
  [ -e $ALIAS_DI ] && . $ALIAS_DI
  [ -e $ALIAS_DO ] && . $ALIAS_DO
  [ -e $tWORK ] && rm -f $tWORK && touch $tWORK || touch $tWORK
  for n in 0 1 2 3 4 5 6 7;do
    DI[$n]="none"
    [ "${di[$n]}" = "1" ] && DI[$n]="high"
    [ "${di[$n]}" = "0" ] && DI[$n]="low"
    [ -z "${alias_di[$n]}" ] && alias_di[$n]="入力"`expr $n + 1`
    echo -en "${alias_di[$n]}=${DI[$n]}\r\n" >>$tWORK
  done
  for n in 0 1 2 3 4 5;do
    DO[$n]="none"
    [ "${do[$n]}" = "1" ] && DO[$n]="high"
    [ "${do[$n]}" = "0" ] && DO[$n]="low"
    [ -z "${alias_do[$n]}" ] && alias_do[$n]="出力"`expr $n + 1`
    echo -en "${alias_do[$n]}=${DO[$n]}\r\n" >>$tWORK
  done
  if [ $# = 3 ];then
# read di only ?
    n=$CH
    if  [ "$n" = 8 ];then
      cat >${CMDMAIL}<<END
#!/bin/sh
PATH=$PATH:/usr/local/bin:/usr/local/sbin
${GMAILIMAGE} ${MAILFROM}
rm -rf ${CMDMAIL}
END
      chmod +x ${CMDMAIL}
      ${DIOEXEC} ${CMDMAIL}
      return
    elif [ $n -gt 8 -o $n -lt 0 ];then
      return
    else
      [ -z "${alias_di[$n]}" ] && alias_di[$n]="入力"`expr $n + 1`
      echo -en "${alias_di[$n]}=${DI[$n]}\r\n" >$tWORK
      CT=`ls -a $WORKDIR/|egrep ".dio[$n][low|high]+.count+$"`
      if [ `echo $CT | wc -w` != 0 ];then
        for DIO in $CT ; do
          DIOCONT=$WORKDIR/$DIO
          echo $DIO| awk '{gsub("\\.","");sub("count","");printf("%s\r\n",$0)}' >>$tWORK
          cat $DIOCONT | awk '
            /^Reset/{printf("%s\r\n",$0)}
            /^Update/{printf("%s\r\n",$0)}
            /^#/{sub("#","Count ");printf("%s\r\n\r\n",$0)}
          ' >>$tWORK
        done
      fi
    fi
  fi
  echo -n "{gsub(/ /,\"+\",\$0);printf \$0}" >$tAWK
  MESSAGE=`cat $tWORK | awk -f $tAWK`
  WGETMAIL=/pepolinux/wget_mail.sh
cat >${CMDMAIL}<<END
#!/bin/sh
PATH=$PATH:/usr/local/bin:/usr/local/sbin
${WGETMAIL} ${MAILFROM} ${SUBJECT} ${MESSAGE}
rm -rf ${CMDMAIL}
END
  chmod +x ${CMDMAIL}
  ${DIOEXEC} ${CMDMAIL}
}
while true
do
  while true
  do
    if [ ! -e $CONF ];then
       LOOPTIME=10000
       break
    fi
    if [ -e $CONF ];then
      msleep 100
      . $CONF
      USER=$GMAILUSER
      PASSWORD=$GMAILPASSWORD
      MAILFROM=$PERMITMAIL
      JITTER=$JITTER
      LOOPTIME=`expr $LOOPTIME "*" 1000`
      MATCHMAIL="<email>${MAILFROM}"
# all from address permit
      MATCHDIO=$KEYWORD
    fi
    wget -Q $GETSIZE -T $RETRYTIME -t $RETRY -q --secure-protocol=TLSv1 --no-check-certificate --user-agent=${USERAGENT} https://mail.google.com/mail/feed/atom/unread --http-user=${USER} --http-password=${PASSWORD} --output-document=${WORK}
    [ -z ${WORK} ] && break
    cat ${WORK} | head -n 20 >${tWORK}
    NOW=`date -ud "${JITTER} second ago" +%Y-%m-%dT%H:%M:%S | cut -c 1-17`
    tNOW=`date -u +%Y-%m-%dT%H:%M:%S | cut -c 1-17`
    MATCHNOW="<issued>${NOW}"
    tMATCHNOW="<issued>${tNOW}"
    echo -n "BEGIN{I=\"NO\"};/${MATCHNOW}/{I=\"YES\";exit};END{printf I}" >${tAWK}
    NEW_YESNO=`cat ${tWORK}|awk -f ${tAWK}`
    echo -n "BEGIN{I=\"NO\"};/${tMATCHNOW}/{I=\"YES\";exit};END{printf I}" >${tAWK}
    tNEW_YESNO=`cat ${tWORK}|awk -f ${tAWK}`
    echo -n "BEGIN{I=\"NO\"};/$MATCHMAIL/{I=\"YES\";exit};END{printf I}" >${tAWK}
    FROM_YESNO=`cat ${tWORK}|awk -f ${tAWK}`
# all from address permit
   if [ ${PERMITMAIL} = ${ALLOW_FROM} ];then
      FROM_YESNO="YES"
   fi
    if [ ${NEW_YESNO} = "YES" -o ${tNEW_YESNO} = "YES" -a ${FROM_YESNO} = "YES" ];then
      newMESSAGEID=`cat ${tWORK} | grep "message_id="|awk -F "=" '{gsub("&amp;view","",$5);print $5}'`
      [ "$oldMESSAGEID" = "$newMESSAGEID" ] && break || oldMESSAGEID=$newMESSAGEID
      echo -n "/email/{gsub(\"<email>\",\"\",\$0);gsub(\"</email>\",\"\",\$0);exit};END{printf \$0}" >${tAWK}
      MAILFROM=`cat ${tWORK}| grep "<email>" | awk -f ${tAWK}`
      echo -n "/${MATCHDIO}/{gsub(\"</title>\",\"\",\$0);gsub(\"<title>\",\"\",\$0);exit};END{printf \$0}" >${tAWK}
      CMD=`cat ${tWORK}| grep "<title>" | grep ${MATCHDIO} | awk -f ${tAWK}`
      CMDCNT=`echo -en $CMD | grep ${MATCHDIO} | wc -c`
      [ ${CMDCNT} = 0 ] && break
      CMD_ARG1_LEN=`echo ${CMD}|awk -F " " '{printf length($1)}'`
      MATCHDIO_LEN=`echo ${MATCHDIO}|awk -F " " '{printf length($1)}'`
      [ "${CMD_ARG1_LEN}" != "${MATCHDIO_LEN}" ] && break
      exec_dio $newMESSAGEID ${CMD}
    fi
    msleep ${LOOPTIME}
    [ -e ${WORK} ] && rm -f ${WORK}
    [ -e ${tWORK} ] && rm -f ${tWORK}
    [ -e ${tAWK} ] && rm -f ${tAWK}
  done
  msleep ${LOOPTIME}
done

最初に

pepowlanとはPepoLinux-0.57以降に収録されている無線LANアダプタをWEPで簡易的に動作させるちょっとしたプログラムです。

PepoLinuxに収録されているプログラムを必要とするので単独では動作しませんが、無線LANアダプタを試験的に利用するプログラムに応用出来ると思います。

更新履歴

2012.3.20：ファーストリリース

#!/bin/sh
# licence GPLv2 ; this scripts was designed by IZAMUKARERA 2012.3.19 update 2012.3.20
# pepowlan for daemon contorl Wireless Lan.
# configure file /etc/wlan/wlan.conf
PATH=$PATH:/usr/local/bin:/usr/local/sbin
CONF=/etc/wlan/wlan.conf
WORK=/var/tmp/pepowlan
prog=pepowlan
pidfile=/var/run/$prog.pid
echo -en $$ >$pidfile
WAIT=3000
error () {
  [ -e $WORK ] && rm -f $WORK
  [ ! -z $WLAN_YES ] && ifconfig wlan0 down 2>&1
  exit 0
}
trap error SIGKILL SIGTERM SIGHUP SIGINT

while true ;do
  iwconfig >$WORK 2>&1
  WLAN=`cat $WORK |grep wlan|wc -l`
  [ $WLAN != "0" ] && WLAN_YES="yes" || WLAN_YES="no"
  while [ $WLAN_YES = "yes" ];do
    iwconfig >$WORK 2>&1
    WLAN=`cat $WORK |grep wlan|grep off|wc -l`
    WLAN_BITRATE=`cat $WORK |grep "Bit Rate"|wc -l`
    if [ $WLAN != "0" ] || [ $WLAN_BITRATE = "0" ];then
      WLAN="down"
    else
      WLAN="up"
      if [ ! -z $GATEWAY ];then
        DEFAULT=`ip route |grep default|wc -l`
        [ $DEFAULT != "0" ] && ip route del default
        msleep $WAIT
        ip route add default via $GATEWAY >/dev/null 2>&1 || break
      fi
    fi
    if [ $WLAN = "down" ];then
      if [ ! -e $CONF ];then
        break
      else
        . $CONF
        msleep $WAIT
        [ ! -z $ESSID ] && iwconfig wlan0 essid $ESSID >/dev/null 2>&1 || break
        [ ! -z  $ENCKEY ] && iwconfig wlan0 enc $ENCKEY >/dev/null 2>&1 || break
        msleep $WAIT
        if [ ! -z $IP ] && [ $IP = "dhcp" ];then
          killall dhclient >/dev/null 2>&1
          msleep $WAIT
          dhclient wlan0 >/dev/null 2>&1
        fi
        if [ ! -z $IP ] && [ $IP != "dhcp" ];then
          [ ! -z $IP ] && ifconfig wlan0 $IP up >/dev/null 2>&1 || break
          msleep $WAIT
          if [ ! -z $NAMESERVER ];then
            cat>/etc/resolv.conf<<END
; generated by /usr/local/bin/pepowlan script
search localdomain
nameserver $NAMESERVER
END
          fi
        fi
      fi
    fi
    [ -e $WORK ] && rm -f $WORK
    msleep 10000
  done
  [ -e $WORK ] && rm -f $WORK
  msleep 10000
done

設定ファイル

[root@ ]# cat /etc/wlan/wlan.conf 
# Wireless Lan configure file was designed by IZAMUKARERA pepolinux 2012.3.20
# set essid
ESSID="pepochan"
# wepkey set
ENCKEY="0123456"
# ip address set or dhcp
#IP="192.168.1.2/24"
IP="dhcp"
# set gateway
GATEWAY="192.168.1.1"
# set nameserver
NAMESERVER="192.168.1.1"

最初に

pepodiodとはPepoLinux-0.51以降に収録されているシリアルDIOボード各ポートのON/OFF状態をポーリング監視して予め設定されたプログラムを起動するちょっとしたプログラムです。

PepoLinuxに収録されているプログラムを必要とするので単独では動作しませんが、シリアル経由でコマンドのやり取りで制御する機器やボードのプログラムに応用出来ると思います。

更新履歴

2011.12.6

０－７チャンネル８本分の入力ポートを一度に読み込むようにしたので処理速度がアップした。

2012.1.11

デバイス未接続状態から接続状態時に正常動作しないバクを修正

2012.1.19

ワークディレクトリを変更

2012.2.21

o ポーリングタイマーを２秒→１秒、他clean up

2012.3.3

DIOリードデータを８個同時にファイル書き込みするように変更

2012.3.6

o DIOリードデータ取得に失敗した時にイベントスクリプトを起動するバグを修正

2012.3.12

o pepodioctlのバージョンＵＰで入力情報１５ビットを処理できるように変更

o 出力情報をファイルに一度に書き出すように変更

o ＷＥＢＵＩのＡｊａｘ用ＪＳＯＮデータを作るようにした

2012.3.27

o ＤＩＯ８本の入力端子のhigh2lowとlow2highのカウンターをＪＳＯＮデータとして追加した

下記よりダウンロードしてください

http://sourceforge.jp/projects/pepolinux/wiki/chobit_prog%20pepodiod

2012.3.29 by.Yamauchi Isamu also IZAMUKARERA.

#!/bin/sh
# licence GPLv2 ; this scripts designed by IZAMUKARERA 2011.10.7 update 2012.3.27
# pepodiod for daemon contorl digital-Input to ANDDIO
DIOCTL="/usr/local/bin/pepodioctl 9"
USR_BIN=/usr/bin/dio
EXEC_CMD=/usr/local/bin/pepodiodexec
PATH=$PATH:/usr/local/bin:/usr/local/sbin
DIR=/var/www/html/remote-hand/tmp
DIORD=$DIR/.di_read_data
DIOWD=$DIR/.do_write_data
tDIORD=$DIR/.di_read_data.tmp
tDIOWD=$DIR/.do_write_data.tmp
JSONRD=$DIR/.di_read_data.json
tJSONRD=$DIR/.di_read_data.json.tmp
prog=pepodiod
pidfile=/var/run/$prog.pid
echo -en $$ >$pidfile
POLLTIME=1000 
error(){
  [ -e $tDIORD ] && rm -f $tDIORD
  [ -e $DIORD ] && rm -f $DIORD
  [ -e $DIOWD ] && rm -f $DIOWD
  [ -e $tDIOWD ] && rm -f $tDIOWD
  [ -e "$JSONRD" ] && rm -f $JSONRD
  [ -e "$tJSONRD" ] && rm -f $tJSONRD
  [ -e $pidfile ] && rm -f $pidfile
  exit 0
}
exec_cmd() {
# dio read & High or Low exec command
# exec_dio ch low or high
  echo ${USR_BIN}${1}${2} >/dev/tty1
  if [ -e ${USR_BIN}${1}${2} ];then
    $EXEC_CMD ${USR_BIN}${1}${2} >/dev/null 2>&1
  fi
}
trap error SIGTERM SIGHUP SIGKILL

# dio read data initialize
RD="-1"
RD=`$DIOCTL 2>&1`
if [ $RD != "-1" ];then
  for i in 1 2 4 8 16 32 64 128 256 512 1024 2048 4096 8192; do
    case "$i" in
      1) tRD="$(($((0x$RD & 1)) / 1))" ;j=0 ;;
      2) tRD="$(($((0x$RD & 2)) / 2))" ;j=1 ;;
      4) tRD="$(($((0x$RD & 4)) / 4))" ;j=2 ;;
      8) tRD="$(($((0x$RD & 8)) / 8))" ;j=3 ;;
      16) tRD="$(($((0x$RD & 16)) / 16))" ;j=4 ;;
      32) tRD="$(($((0x$RD & 32)) / 32))" ;j=5 ;;
      64) tRD="$(($((0x$RD & 64)) / 64))" ;j=6 ;;
      128) tRD="$(($((0x$RD & 128)) / 128))" ;j=7 ;;
      256) tRD="$(($((0x$RD & 256)) / 256))" ;j=8 ;;
      512) tRD="$(($((0x$RD & 512)) / 512))" ;j=9 ;;
      1024) tRD="$(($((0x$RD & 1024)) / 1024))" ;j=10 ;;
      2048) tRD="$(($((0x$RD & 2048)) / 2048))" ;j=11 ;;
      4096) tRD="$(($((0x$RD & 4096)) / 4096))" ;j=12 ;;
      8192) tRD="$(($((0x$RD & 8192)) / 8192))" ;j=13 ;;
    esac
    old[$j]=$tRD
  done
else
  for i in 0 1 2 3 4 5 6 7 8 9 10 11 12 13;do
    old[$i]="-1"
  done
fi
cat>$tDIORD<<END
di[0]=${old[0]}
di[1]=${old[1]}
di[2]=${old[2]}
di[3]=${old[3]}
di[4]=${old[4]}
di[5]=${old[5]}
di[6]=${old[6]}
di[7]=${old[7]}
END
mv $tDIORD $DIORD
cat>$tDIOWD<<END
do[0]=${old[8]}
do[1]=${old[9]}
do[2]=${old[10]}
do[3]=${old[11]}
do[4]=${old[12]}
do[5]=${old[13]}
END

mv $tDIOWD $DIOWD
chown apache.apache $DIORD
chown apache.apache $DIOWD
# loop for dio polling read 
while true
do
  RD="-1"
  RD=`$DIOCTL 2>&1`
  if [ "$RD" != "-1" ];then
     for i in 1 2 4 8 16 32 64 128 256 512 1024 2048 4096 8192 16384; do
    case "$i" in
      1) tRD="$(($((0x$RD & 1)) / 1))" ;j=0 ;;
      2) tRD="$(($((0x$RD & 2)) / 2))" ;j=1 ;;
      4) tRD="$(($((0x$RD & 4)) / 4))" ;j=2 ;;
      8) tRD="$(($((0x$RD & 8)) / 8))" ;j=3 ;;
      16) tRD="$(($((0x$RD & 16)) / 16))" ;j=4 ;;
      32) tRD="$(($((0x$RD & 32)) / 32))" ;j=5 ;;
      64) tRD="$(($((0x$RD & 64)) / 64))" ;j=6 ;;
      128) tRD="$(($((0x$RD & 128)) / 128))" ;j=7 ;;
      256) tRD="$(($((0x$RD & 256)) / 256))" ;j=8 ;;
      512) tRD="$(($((0x$RD & 512)) / 512))" ;j=9 ;;
      1024) tRD="$(($((0x$RD & 1024)) / 1024))" ;j=10 ;;
      2048) tRD="$(($((0x$RD & 2048)) / 2048))" ;j=11 ;;
      4096) tRD="$(($((0x$RD & 4096)) / 4096))" ;j=12 ;;
      8192) tRD="$(($((0x$RD & 8192)) / 8192))" ;j=13 ;;
    esac
    new[$j]=$tRD
    done
  else
    for i in 0 1 2 3 4 5 6 7 8 9 10 11 12 13;do
      new[$i]="-1"
    done
  fi
  for i in 0 1 2 3 4 5 6 7;do
    [ ${new[$i]} = "-1" ] && break
    if [ "${old[$i]}" != "${new[$i]}" ];then
      if [ "${old[$i]}" = "1" ];then
        old[$i]=${new[$i]}
        exec_cmd $i low
        j=`expr $i + 8`
        exec_cmd $j low
      elif [ "${old[$i]}" = "0" ];then
        old[$i]=${new[$i]}
        exec_cmd $i high
        j=`expr $i + 8`
        exec_cmd $j high
      else
        old[$i]=${new[$i]}
      fi
    fi
  done
cat>$tDIORD<<END
di[0]=${new[0]}
di[1]=${new[1]}
di[2]=${new[2]}
di[3]=${new[3]}
di[4]=${new[4]}
di[5]=${new[5]}
di[6]=${new[6]}
di[7]=${new[7]}
END
cat>$tDIOWD<<END
do[0]=${new[8]}
do[1]=${new[9]}
do[2]=${new[10]}
do[3]=${new[11]}
do[4]=${new[12]}
do[5]=${new[13]}
END
  mv $tDIORD $DIORD
  mv $tDIOWD $DIOWD
  chown apache.apache $DIORD
  chown apache.apache $DIOWD
  [ -e $DIORD ] && . $DIORD
  [ -e $DIOWD ] && . $DIOWD
  for n in 0 1 2 3 4 5 6 7;do
    case "$n" in
    0)
      [ "${di[$n]}" = "1" ] && di0="high"
      [ "${di[$n]}" = "0" ] && di0="low"
      [ "${di[$n]}" = "-1" ] && di0="none"
    ;;
    1)
      [ "${di[$n]}" = "1" ] && di1="high"
      [ "${di[$n]}" = "0" ] && di1="low"
      [ "${di[$n]}" = "-1" ] && di1="none"
    ;;
    2)
      [ "${di[$n]}" = "1" ] && di2="high"
      [ "${di[$n]}" = "0" ] && di2="low"
      [ "${di[$n]}" = "-1" ] && di2="none"
    ;;
    3)
      [ "${di[$n]}" = "1" ] && di3="high"
      [ "${di[$n]}" = "0" ] && di3="low"
      [ "${di[$n]}" = "-1" ] && di3="none"
    ;;
    4)
      [ "${di[$n]}" = "1" ] && di4="high"
      [ "${di[$n]}" = "0" ] && di4="low"
      [ "${di[$n]}" = "-1" ] && di4="none"
    ;;
    5)
      [ "${di[$n]}" = "1" ] && di5="high"
      [ "${di[$n]}" = "0" ] && di5="low"
      [ "${di[$n]}" = "-1" ] && di5="none"
    ;;
    6)
      [ "${di[$n]}" = "1" ] && di6="high"
      [ "${di[$n]}" = "0" ] && di6="low"
      [ "${di[$n]}" = "-1" ] && di6="none"
    ;;
    7)
      [ "${di[$n]}" = "1" ] && di7="high"
      [ "${di[$n]}" = "0" ] && di7="low"
      [ "${di[$n]}" = "-1" ] && di7="none"
    ;;
    esac
  done
  for n in 0 1 2 3 4 5;do
    case "$n" in
    0)
      [ "${do[$n]}" = "1" ] && do0="high"
      [ "${do[$n]}" = "0" ] && do0="low"
      [ "${do[$n]}" = "-1" ] && do0="none"
    ;;
    1)
      [ "${do[$n]}" = "1" ] && do1="high"
      [ "${do[$n]}" = "0" ] && do1="low"
      [ "${do[$n]}" = "-1" ] && do1="none"
    ;;
    2)
      [ "${do[$n]}" = "1" ] && do2="high"
      [ "${do[$n]}" = "0" ] && do2="low"
      [ "${do[$n]}" = "-1" ] && do2="none"
    ;;
    3)
      [ "${do[$n]}" = "1" ] && do3="high"
      [ "${do[$n]}" = "0" ] && do3="low"
      [ "${do[$n]}" = "-1" ] && do3="none"
    ;;
    4)
      [ "${do[$n]}" = "1" ] && do4="high"
      [ "${do[$n]}" = "0" ] && do4="low"
      [ "${di[$n]}" = "-1" ] && do4="none"
    ;;
    5)
      [ "${do[$n]}" = "1" ] && do5="high"
      [ "${do[$n]}" = "0" ] && do5="low"
      [ "${do[$n]}" = "-1" ] && do5="none"
    ;;
    esac
  done
  NOWDATE=`date +"%Y/%m/%d %T"`
  cat>$tJSONRD<<END
{
"di0":"$di0",
"di1":"$di1",
"di2":"$di2",
"di3":"$di3",
"di4":"$di4",
"di5":"$di5",
"di6":"$di6",
"di7":"$di7",
"do0":"$do0",
"do1":"$do1",
"do2":"$do2",
"do3":"$do3",
"do4":"$do4",
"do5":"$do5",
END
CT=`ls -a $DIR/|egrep '.dio[0-7][low|high]+.count+$'`
if [ -n `echo $CT | wc -w` ];then
  for DIO in $CT ; do
    DIOCONT=$DIR/$DIO
tDIO=`echo -en $DIO |awk '{gsub("\\\.","");sub("count","");print $0}'`
echo -en \"$tDIO\":{ >>$tJSONRD
cat $DIOCONT |awk '
  /^Reset/{printf("%creset%c:%c%s %s%c,",34,34,34,$2,$3,34)}
  /^Update/{printf("%cupdate%c:%c%s %s%c,",34,34,34,$2,$3,34)}
  /^#/{sub("#","");printf("%ccount%c:%c%s%c},\n",34,34,34,$1,34)}
' >>$tJSONRD
  done
fi
echo -e \"date\":\"$NOWDATE\" >>$tJSONRD
echo "}" >>$tJSONRD
  mv $tJSONRD $JSONRD
  chown apache.apache $JSONRD
  msleep ${POLLTIME}
done

最初に

epiconとはLinux通信ソフトです、特にシリアル・コンソールでコンフィグ設定・参照などを行うネットワーク機器の使用を想定して開発しています。

SwitchやRouterなどシリアルポートでConfig設定するネットワーク機器はメーカーや機種を問わず使えると思います。

Cisco製ルータなどの設定を自動化する際、事前に作成したテキスト・データをコピーしてシリアル・コンソール画面へ貼り付けコンフィグの流し込みを行います。

この時、文字と改行の送出デレィを挿入しコンフィグ・データの取りこぼしを防ぐことが必要です。ルータのシリアル・コンソールとして重要な文字と改行の送出デレイをepiconはサポートしているのでコンフィグを安心してコピー＆ペーストが出来ます。

この他、簡易telnet、zmodemなどのファイル転送ソフト、shell、マクロ、外部ソフトの起動などCUIだが多機能でコンパクトな作りとなっています。

epiconを使ったリモート保守イメージ

使用方法

* オプションなし（com1：/dev/ttys0ポート、9600bps、8bitノンパリティ）

[root@~]# epicon

** Welcome to epicon Version-5.0 Copyright Isamu Yamauchi compiled:Oct 16 2011 **
      exec shell         ~!
      send binary files  ~f
      call rz,sz,sx,rx   ~rz,~sz,~sx,~rx
      call kermit        ~sk,~rk
      external command   ~C
      change speed       ~c
      exit               ~.
      Connected /dev/ttyS0

[root@~]# epicon -l /dev/ttyACM0 -c /usr/local/bin/pepop2pchat
[root@~]# cat /usr/local/bin/pepop2pchat
#!/bin/sh
#This scripts sample for ppp chat
#licence GPLv2 ; this scripts designed by IZAMUKARERA 2007.3.18 ; update 2008.4.4
#usage /usr/local/bin/epicon -l /dev/ttyACM0 -c /usr/local/bin/pepop2pchat
CLR="\x1b[2J"
RED="\x1b[41m"
BULE="\x1b[44m"
NORC="\x1b[39m"
NORB="\x1b[49m"
CR="\n"
LF="\r"
HOME="\x1b[r"
POS="\x1b[20C\x1b[10B"
MSG1="
#######################################$LF
#                                     #$LF
#     FOMA Cellular Phone Detected!   #$LF
#     Now Daial-in Server Ready       #$LF
#                                     #$LF
#######################################$LF
"
MSG2="
#######################################$LF
#                                     #$LF
#    Just now Remote Host Calling!    #$LF
#    Going to PPP Negotiation         #$LF
#                                     #$LF
#######################################$LF
"

I=""
G=""
sleep 1
while [ "X$G" != "XOK" ]
do
        echo -en "AT&F\r\n" || exit 0
#       sleep 5
        read -s -n 3 -t 2 I || exit 0
        J=`echo $I|awk '/OK/{print "OK"}'`
        if [ "X$J" == "XOK" ]; then
                {
                echo -en "$CLR$HOME$BULE" >/dev/tty1
                echo -en "$MSG1$CR$LF$NORC$NORB" >/dev/tty1
                G=$J
                }
        fi
done
G=""
while [ "X$G" != "XRING" ]
do
        sleep 5
        read -s -n 5 -t 604800 I || exit 0
        J=`echo $I|awk '/RING/{print "RING"}'`
        if [ "X$J" == "XRING" ]; then
                {
                echo -en "$CRLF$RED" >/dev/tty1
                echo -en "$MSG2$CR$LF$NORC$NORB" >/dev/tty1
                G=$J
                }
        fi
done
echo -en "ATA\r\n" || exit 0
sleep 2
exec /usr/sbin/pppd $1

* ルータの設定　オプションあり（/dev/ttyUSB0,19200bps,キャラクタデレイ：30ms,ＣＲデレイ：50ms）

[root@~]# epicon -d 30 -D 50 -s 19200 -l /dev/ttyUSB0

** Welcome to epicon Version-5.0 Copyright Isamu Yamauchi compiled:Oct 16 2011 **
      exec shell         ~!
      send binary files  ~f
      call rz,sz,sx,rx   ~rz,~sz,~sx,~rx
      call kermit        ~sk,~rk
      external command   ~C
      change speed       ~c
      exit               ~.
      Connected /dev/ttyUSB0

* ルータの設定　オプションあり（telnet,キャラクタデレイ：20ms,ＣＲデレイ：50ms）

[root@~]# epicon -d 20 -D 50 -n 192.168.0.1:23

** Welcome to epicon Version-5.0 Copyright Isamu Yamauchi compiled:Oct 16 2011 **
      exec shell         ~!
      send binary files  ~f
      call rz,sz,sx,rx   ~rz,~sz,~sx,~rx
      call kermit        ~sk,~rk
      external command   ~C
      change speed       ~c
      exit               ~.

Telnet Server 1.10  All rights reserved.


login   :

man抜粋

epicon(1)                       epicon Manuals                       epicon(1)

NAME
       epicon  is  Easy Personal Interface Console terminal software.  First I
       am sorry. Because my English linguistic power is very shabby, this sen-
       tence  is being translated by the machine.  Because of that, read it in
       the interpretation which it is tolerant of though it thinks that it  is
       a little funny translation.

SYNOPSIS
       usage:
       epicon [-options [argument] [-options [argument]]
              [-b ] <--escape cannot be used
              [-c external_command]
              [-d send_charcacter_delay(ms)]
              [-D send_CR_delay(ms)]
              [-e escape_char]
              [-f send_file]
              [-F send_file_effective_delay]
              [-m ] <--input echo mode
              [-M ] <--line mode
              [-l com_port]
              [-L output_log_file]
              [-n ip_address[:port]]
              [-p [server_port]]
              [-q ] <--quiet mode
              [-s speed]
              [-v ] <--show version
              [-z ] <--auto rz prohibition

        defaults:
            speed:  9600b/s (Higest of 460800)
            com_port :  /dev/ttyS0
            escape: ~ (escape char is three octal digits)

        running epicon escapes:
            escape,. or escape,CTRL-D program end
            escape,!                  into to shell
            escape,escape             send escape char
            escape,f                  send files
            escape,F                  send files delay effect
            escape,c                  chege speed
            escape,C                  external command
            escape,sz                 send file zmodem
            escape,rz                 recive file zmodem
            escape,sk                 send file gkermit
            escape,rk                 recive file gkermit
            escape,sx                 send file xmodem
            escape,rx                 recive file xmodem

DESCRIPTION
       The epicon is a Linux program for console Terminal.it need libc.so.5 or
       other libc,lrz,lsz,gkermit,pepolinux,compiling gcc-2.95.3 later.   Sym-
       bolic link are being done as flowing.
       lrwxrwxrwx   1 root   root      3 Sep 22 22:39 rb -> lrz*
       lrwxrwxrwx   1 root   root      3 Sep 22 22:39 rx -> lrz*
       lrwxrwxrwx   1 root   root      3 Jul 16 17:34 rz -> lrz*
       lrwxrwxrwx   1 root   root      3 Sep 22 13:46 sz -> lsz*

ＰｅｐｏＬｉｎｕｘ（ぴぽりなっくす）はXWindowを捨てネットワークとサーバーに徹した軽量コンパクトな約２５０ＭＢの１ＣＤＬｉｎｕｘです。 初期設定でdns,web,mail,snmp,mrtg,webalizer等々が立ち上がっていますので、直ぐにサーバーの実験が出来ます。

ＮＴＴｄｏｃｏｍｏのＦＯＭＡ携帯でUSB接続ケーブルさえあればインターネットを経由しない高セキュリティの６４ｋデジタル通信によるリモートハンドが実現できます。

これは通信モードが選択できるＦＯＭＡ携帯電話で機種を選ばない仕様で当サイトが開発している、Linux USB Driver acm-FOMAを利用したものです。

サーバー構築やネットワークの検証などで、ちょっと話の分かるサーバーが欲しい時もFDやUSBメモリに設定をちょこと書いて立ち上げるだけで、色々なサーバーを建てれます。

ネットワークの勉強やＳＥの方にも大変便利ＣＤＲＯＭやＵＳＢメモリから起動出来るPCがあればどこでも自前のサーバーが建てれますし、WindowsXPのＨＤＤやＵＳＢメモリにインストールも出来ます。

CentOS5をベースに開発環境も構築しています、Vmplayerを利用したDriver開発用のVmware appliance（Remote-Hand-v0.2）やシリアルDIOとgmail経由でやり取り出来る applianceRemote-Hand_DIO も用意しています。

Linux USB Driver acm-FOMAとKernel makeを合わせてインストールすれば、Kernel makeやDriverのDebugなどの実験もできます。

http://www.pepolinux.com

PepoLinux boot

PepoLinux login

PepoLinux login small mode

メモリが256M以下の場合自動的にスモールモードを選択、必要最低限のサービスとdhclientを起動して表示するIPアドレスへsshでログインする事が出来ます。

PepoLinux 設定ファイル

MS_Windowsのテキストエディタで簡単にPepoLnuxの設定ファイルを変更してUSBメモリや、C:\Windows\pepolinux\startup.sへ保存します。

#!/bin/sh
#
# PepoLinux Main Configuration Scripts. This startup.s scripts change by your idea.
# note! (This file is a copy of startup.s.org. When correcting it, it is a thing of the edit as for startup.s.org of the original.) 
# Copyright pepolinux.com pepolinux@users.sourceforge.jp
# Written by IZAMUKARERA 2001.4.12 last-update 2010.6.13
# この startup.s スクリプトを自分の環境に合うように編集して下さい。
# #を消すだけで dhcp、dns、http、mail等のサーバー機能がすぐ使える様にしています。
# デフォルトでdns、http、mailサーバが立ち上がります。
# 使用するIPが、かぶらないようにAPIPA(Automatic Private IP Addressing 169.254.0.0 - 169.254.255.255)が
# デフォルトで設定しています。先ずはIPアドレスを実環境に設定しましょう。それだけ設定して
# C:\peplinux\startup.s　へ置いてCDROMやUSBメモリから起動すればPepoLinuxのネットワーク・ワールドが開けます。

# バージョン情報です。
export Ver=Ver0.47


# 1番目の eth カードのIPアドレスの設定です、前述のCLIENTの数を足して254以上にならないようにする。
# IPADDRだけは最低限設定して下さい。dhcpdを起動させる時はGATEWAYを必ず設定しコメントを外す事。
export IPADD=168.254.100.100/16


# デフォルトゲートウェイの設定です。
export GATEWAY=168.254.100.100


# 2番目の eth カードのIPアドレスを記述する。
export IPADD1=169.254.200.100/16


# ホスト名を変更する場合 # を削除して hostname XXXX とします、初期値のホスト名は epicon です。
#hostname epicon

#これはコメントアウトしないで下さい。
export HOSTNAME=`hostname` 


# DHCP、DNSのクライアント数を指定、これから自動で設定ファイルを作成します。
export CLIENT=10
# DHCP、DNSで使うホスト名を設定します。初期値はホスト名の先頭4文字とクライアント数20で epic1?epic10 です。
export HOST=`hostname | cut -c 1-4`


# ドメインの設定です。
export DOMAIN=pepolinux.local


# ホストネームとドメインを合わせたFQDN（Fully Qualified Domain Name）です、触らないで下さい。
export HOSTNAME_TDL=$HOSTNAME.$DOMAIN


# ネームサーバの設定です。DNS_1の初期値は、自分自身のIPADDをネームサーバーに設定します。
# DNS_2 はプロバイダのDNSです、"202.234.232.6" はOCN西日本のDNSへフォワードする設定です。
export DNS_1=`echo $IPADD|awk 'BEGIN{FS="/"};{print $1}'`
export DNS_2=$GATEWAY


# 外部宛てのメールを内部サーバーへリレーするホストをFQDN　"mail.pepolinux.local"　などで設定します。
export RELAYHOST=


# 自動認識出来ないドライバのモジュールを設定します。　
#modprobe e1000		#Intel(R) PRO/1000
#modprobe bcm5700 	#Broadcom Gigabit ethernet driver
#modprobe dm9601	#Corega FEther USB-TXC


# ここからはIPアドレスの詳細情報を自動作成するので触らない下さい。
export IF_PORT=10baseT
export NETMASK=`ipcalc -m $IPADD|awk 'BEGIN{FS="="};{print $2}'`
export BROADCAST=`ipcalc -b $IPADD|awk 'BEGIN{FS="="};{print $2}'`
export NETWORK=`ipcalc -n $IPADD|awk 'BEGIN{FS="="};{print $2}'`
export MASK=`echo $IPADD|awk 'BEGIN{FS="/"};{print $2}'`
export IPADDR=`echo $IPADD|awk 'BEGIN{FS="/"};{print $1}'`
export NETMASK1=`ipcalc -m $IPADD1|awk 'BEGIN{FS="="};{print $2}'`
export BROADCAST1=`ipcalc -b $IPADD1|awk 'BEGIN{FS="="};{print $2}'`
export NETWORK1=`ipcalc -n $IPADD1|awk 'BEGIN{FS="="};{print $2}'`
export IPADDR1=`echo $IPADD1|awk 'BEGIN{FS="/"};{print $1}'`
# ここまではIPアドレスの詳細情報を自動作成するので触らない下さい。


# MRTG(Multi Router Traffic Grapher)で監視するSNMPエージェントのIPアドレスを設定します。(初期設定ではepiconです。）
MRTG_IP=$IPADDR


# Registration No 設定をします。
# pepolinuxの#を消すと定期的な登録を促すメッセージが解除されます。
cd /etc
cat>SERIAL<<Z
pepolinux
Z


# #を外すとWELCOMEメッセージがシンプルになります。
#rm /etc/WELCOME


# PPPのIPアドレスの設定
export PPPSERVER=169.254.198.1
export PPPCLIENT=169.254.198.2


# VTun(Virtual Tunnel over TCP/IP network)用のアドレスを設定します。
export TUNSERVER=169.254.197.1
export TUNCLIENT=169.254.197.2
# VTunの相手LANのネットワーク設定をします。
export TUNHOST=169.254.200.100
export TUNNETWORK=169.254.200.0
export TUNMASK=255.255.255.0
domainname $DOMAIN


# PCMCIA 設定をします。
cat>/etc/pcmcia.conf<<Z
PCMCIA=yes
# Should be either i82365 or tcic
PCIC=i82365
# Put socket driver timing parameters here
#PCIC_OPTS=poll_interval=100 pci_csc=1 irq_list=3,9,10
# Put pcmcia_core options here
CORE_OPTS=
# Put cardmgr options here
CARDMGR_OPTS=
# To set the PCMCIA scheme at startup...
SCHEME=
Z
#service hotplug start
# PCMCIAの無いPCはコメントアウトして下さい。
if grep -vq pcmcia /proc/devices ;then `service pcmcia start >/dev/null 2>&1`;fi
sleep 3

# ネットワークの初期化をします。
# １番目スロットのethカードの設定をします。
ifconfig lo 127.0.0.1 up
ifconfig eth0 $IPADDR broadcast $BROADCAST netmask $NETMASK up
route add -net $NETWORK netmask $NETMASK eth0
route add -net default gw $GATEWAY netmask 0.0.0.0 metric 1
# デフォルトゲートウェイが２つある場合(下記の設定は１番目が２番目に比べ10倍早い時
#ip route add default nexthop via $GATEWAY weight 100 nexthop via $GATEWAY1 weight 10


# 必要であれば、ethカードのMACアドレスを変更します。
#ip link set eth0 down ; ip link set eth0 address 00:01:02:03:04:05 ; ip link set eth0 up


# ダイヤルUPクライアントで起動する場合下記行の設定は#でコメントアウトして下さい。
#route add -net default gw $GATEWAY netmask 0.0.0.0 metric 1
route add -net 127.0.0.0 netmask 255.0.0.0 lo
#route add default dev ppp0


# ２番目スロットのethカードの設定をします。
if grep -q eth1 /proc/net/dev; then
	ifconfig eth1 $IPADDR1 broadcast $BROADCAST1 netmask $NETMASK1 up
fi
#route add -net $NETWORK1 netmask $NETMASK1 eth1


# route コマンドにてネットワークアドレスを参照する時に使用する。
cat>networks<<Z
loopback        127.0.0.0
$DOMAIN         $NETWORK
Z


# ホストファイルの設定です、知っている ip アドレスとホスト名を列記します。
cat>hosts<<Z
127.0.0.1       localhost
#$IPADDR         $HOSTNAME
#$DNS_1          dns
Z


# ppp サーバーの為の設定です、IPアドレス部分は使用するネットワークアドレスを書いて下さい。
# 左辺($PPPSERVER)がサーバー側、右辺($PPPCLIENT)がクライアント側のIPとなります。
cat>ppp/ppplogin<<Z
#!/bin/sh
mesg n
stty -echo
exec /usr/sbin/pppd passive -detach $PPPSERVER:$PPPCLIENT
Z
chmod 755 /etc/ppp/ppplogin
chmod +s /etc/ppp/ppplogin

# 64K接続用のpppdサーバーのオプションを設定します
cat>ppp/options.ttyACM0<<Z
lock
modem
kdebug 1
crtscts
$PPPSERVER:$PPPCLIENT
defaultroute
ms-dns $DNS_1
ms-wins $DNS_1
idle 120
Z

# パケット接続用のpppdサーバーのオプションを設定します
cat>ppp/options<<Z
debug 7
kdebug 6
updetach
115200
usepeerdns
defaultroute
lock
Z


# 携帯電話を使った、ダイヤルイン・サーバーのスクリプトを設定します。
# 起動方法は→　/etc/ppp/ppp-in
cat>ppp/ppp-in<<Z
#!/bin/sh
/usr/local/bin/epicon -l /dev/ttyACM0 -s 115200 -c /usr/local/bin/pepop2pchat
Z
chmod +x ppp/ppp-in


# ppp クライアント側の設定です、TELEPHONE=ダイヤルＵＰ先の電話番号を書いて下さい。
# 相手サーバー側がpepolinuxを想定していますがクライアントはwin95,98の方が便利の
# 為あまり使う事は無いでしょう、又/etc/inittabのc50、c51の#でコメントアウトが必要
# です、 ppp-on でダイヤルＵＰを開始し ppp-off でダイヤルアウトします。
cat>ppp/ppp-on<<Z
#!/bin/sh
export TELEPHONE=09012345678
export PPPACCOUNT=ppp
export PPPPASSWORD=fradfrad
LOCAL_IP=0.0.0.0
REMOTE_IP=0.0.0.0
PPPNETMASK=255.255.255.0
DIALER_SCRIPT=/etc/ppp/pppscript
exec /usr/sbin/pppd debug lock modem crtscts /dev/ttyUSB0 19200 \\
idle 120 \\
asyncmap 20A0000 escape FF kdebug 0 \$LOCAL_IP:\$REMOTE_IP \\
noipdefault netmask \$PPPNETMASK defaultroute connect \$DIALER_SCRIPT
Z
chmod 777 /etc/ppp/ppp-on
chmod +s /etc/ppp/ppp-on


# pppのダイレクト接続の設定、COMポートに事前にクロスケーブルで相手
# シリアルポートを接続しておきます。
# サーバー側の設定です。
#pppd -detach crtscts lock  $PPPSERVER:$PPPCLIENT /dev/ttyS0 115200 &
# クラインと側の設定です。
#pppd -detach crtscts lock  noipdefault /dev/ttyS0 115200 &


# slipのダイレクト接続の設定、COMポートに事前にクロスケーブルで相手
# シリアルポートを接続しておきます。
#slattach -p cslip -s 19200 /dev/ttyS0 &
# サーバー側の設定です。
#ifconfig sl0 $PPPSERVER pointopoint $PPPCLIENT up
# クラインと側の設定です。
#ifconfig sl0 $PPPCLIENT pointopoint $PPPSERVER up


# pppoe-serverの設定をします。(設定は、pppoeクライアントも同じです。)
cat>/etc/ppp/pap-secrets<<Z
# Secrets for authentication using PAP for FOMA packet
*       pepolinux     ""      *
Z
cat>/etc/ppp/chap-secrets<<Z
# Secrets for authentication using CHAP for FOMA 64k
"ppp"	*	"fradfrad"	*
Z
# pppoe-serverの起動をします。（pppoeクライアントは、adsl-startで起動します。）
#pppoe-server -L $PPPSERVER -R $PPPCLIENT


# pptp-serverの設定をします。
cat>/etc/pptpd.conf<<Z
option /etc/ppp/options.pptpd
localip  $PPPSERVER
remoteip `echo  $PPPCLIENT.$CLIENT|awk 'BEGIN{FS="."};\
                        {print $1"."$2"."$3"."$4"-"$4+$5}'`
Z

# pptp-serverのoptions設定をします。
cat>/etc/ppp/options.pptpd<<Z
lock
# debug
name $HOSTNAME
domain $DOMAIN
nodefaultroute
proxyarp
auth
refuse-pap
refuse-chap
refuse-mschap
require-mschap-v2
require-mppe-128
ms-dns  $DNS_1
ms-wins $DNS_1
Z

# pptp-serverを起動します。
#/usr/sbin/pptpd


# ipsecの設定をします。（OpenSwanV2.Xを使いKernel2.6.Xのみ対応)
# 起動と停止は→ service ipsec start ; service ipsec stop
cat>/etc/ipsec.conf<<Z
#/etc/ipsec.conf - Openswan IPsec configuration file
#RCSID $Id: ipsec.conf.in,v 1.13 2004/03/24 04:14:39 ken Exp $
#This file:  /usr/local/share/doc/openswan/ipsec.conf-sample
#
#Manual:     ipsec.conf.5
version	2.0	# conforms to second version of ipsec.conf specification
#basic configuration
config setup
# Debug-logging controls:  "none" for (almost) none, "all" for lots.
# klipsdebug=none
# plutodebug="control parsing"
#Add connections here
conn net-to-net
 authby=secret					# Key exchange method
 left=$PPPSERVER				# Public Internet IP address of the
								# LEFT VPN device is myself(自サイト)
 #leftsubnet=192.168.0.0/24		# Subnet protected by the LEFT VPN device
 #leftnexthop=%defaultroute		# correct in many situations
 #
 right=$PPPCLIENT				# Public Internet IP address of the
								# RIGHT VPN device is Other party(相手サイト)
 #rightsubnet=10.0.0.0/24		# Subnet protected by the RIGHT VPN device
 #rightnexthop=192.168.0.200	# correct in many situations
 auto=start						# authorizes and starts this connection on booting
#Disable Opportunistic Encryption
include /etc/ipsec.d/examples/no_oe.conf
Z

# ipsecの事前共有鍵を設定します。
cat>/etc/ipsec.secrets<<Z
#vpn-ip-address vpn2-ip-address : PSK "key in quotations"
$PPPSERVER $PPPCLIENT : PSK "pepopa@pepolinux.com"
Z


# iptablesを使ったFirewallを設定します。
cat>/etc/sysconfig/iptables<<Z
# Firewall configuration written by system-config-securitylevel
# Manual customization of this file is not recommended.
*filter
:INPUT DROP [0:0]
:FORWARD DROP [0:0]
:OUTPUT DROP [0:0]
:Pepo-Firewall - [0:0]
-A INPUT -j Pepo-Firewall
-A FORWARD -j Pepo-Firewall
-A OUTPUT -j Pepo-Firewall
-A Pepo-Firewall -p icmp --icmp-type any -j ACCEPT
-A Pepo-Firewall -p 50 -j ACCEPT
-A Pepo-Firewall -p 51 -j ACCEPT
-A Pepo-Firewall -p udp --dport 5353 -d 224.0.0.251 -j ACCEPT
-A Pepo-Firewall -p udp -m udp --dport 631 -j ACCEPT
-A Pepo-Firewall -m state --state ESTABLISHED,RELATED -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 20 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --sport 20 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 21 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --sport 21 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 22 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 23 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 25 -j ACCEPT
-A Pepo-Firewall -p udp --dport 53 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 110 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 143 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 80 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 443 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 587 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 3128 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 8022 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 8443 -j ACCEPT
-A Pepo-Firewall -p udp --dport 67 -j ACCEPT
-A Pepo-Firewall -p udp --dport 123 -j ACCEPT
-A Pepo-Firewall -p udp --dport 161 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 137 -j ACCEPT
-A Pepo-Firewall -p udp --dport 138 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 139 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 445 -j ACCEPT
-A Pepo-Firewall -p udp --dport 389 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 389 -j ACCEPT
-A Pepo-Firewall -m state --state NEW -m tcp -p tcp --dport 1723 -j ACCEPT
-A Pepo-Firewall -p gre -j ACCEPT
-A Pepo-Firewall -i ppp+ -m state --state NEW -m tcp -p tcp -j ACCEPT
-A Pepo-Firewall -i lo -m state --state NEW -m tcp -p tcp -j ACCEPT
-A Pepo-Firewall -j REJECT --reject-with icmp-host-prohibited
COMMIT
Z

# Firewallを有効にします。
service iptables start

# 以下はiptablesを使ったip マスカレードの設定です。
# PepoLinuxがPPPでダイヤルUPしクライアントがPepoLinuxへデフォルトゲートを
# 向ければマスカレードルータの出来上がり。
iptables -t nat -A POSTROUTING -o ppp0 -j MASQUERADE
# 以下はネットワークカードを２枚挿しでrouterとして動作させた場合のマスカレード
#iptables -t nat -A POSTROUTING -o eth0 -j SNAT --to $IPADDR
#iptables -t nat -A POSTROUTING -o eth1 -j SNAT --to $IPADDR1


# もし$NETWORK1から$NETWORKを経由インターネットへ接続する必要がある時は以下の
# 設定で接続出来ます。（勿論DNS、デフォルトゲート等は手動で設定する必要がありますが）
#iptables -t nat -A POSTROUTING -o eth0 -j SNAT --to $IPADDR
# 色々なiptablesの設定をテストした後の設定をセーブする時は以下コマンド実行
#iptables-save >settei
# 設定をsetteiに戻す時は以下コマンド実行
#iptables-restore <settei


# 以下はPPPサーバーとして動作させた場合のマスカレードの設定。クライアントからダイヤル
# ＵＰすればイントラネット内のアクセスが出来る。
#iptables -t nat -A POSTROUTING -o eth0 -j SNAT --to $IPADDR


# ブリッジの起動を行います。イーサネットカードを２枚挿入され認識している時の設定です。
#pepobrct eth1 start


# ブリッジの起動が終わっている場合、brouterの設定を行います。
# ebtables(Ethernet bridge tables)はMACレイヤで高度なフィルタリングが機能
# するものです、ここではブルータ機能のみ設定をしています。
cat>/etc/brouter.sh<<Z
#!/bin/sh
#This script making brouter,a precondtion is enabled pepobrctl.
MAC_OF_ETH0=`ifconfig eth0 2>/dev/null|awk '/HWaddr/ {print $5}'`
MAC_OF_ETH1=`ifconfig eth1 2>/dev/null|awk '/HWaddr/ {print $5}'`
ifconfig br0 0.0.0.0
ifconfig eth0 $IPADDR netmask $NETMASK
ifconfig eth1 $IPADDR1 netmask $NETMASK1
ebtables -t broute -A BROUTING -p ipv4 -i eth0 --ip-dst $IPADDR -j DROP
ebtables -t broute -A BROUTING -p ipv4 -i eth1 --ip-dst $IPADDR1 -j DROP
ebtables -t broute -A BROUTING -p arp -i eth0 -d \$MAC_OF_ETH0 -j DROP
ebtables -t broute -A BROUTING -p arp -i eth1 -d \$MAC_OF_ETH1 -j DROP
Z
chmod 755 /etc/brouter.sh
# brouterの起動をします。（ブリッジの起動をさせた後に起動させて下さい）
#/etc/brouter.sh;echo brouter start!


# VTun(Virtual Tunnel over TCP/IP network⇒トンネルデバイス)を設定します。
# VTunはC/S間で仮想IPネットワークを構築しデータの暗号化と圧縮をするものです。

# 相手Vtunホストのルーティングの設定、ネットワーク単位やデフォルトゲートの設定はしない事。
#route del default gw $GATEWAY ; route add -host $TUNHOST gw $GATEWAY

# サーバー側のIPアドレスの設定
sed -e "s/TUNSERVER/$TUNSERVER/" -e "s/TUNCLIENT/$TUNCLIENT/" /etc/vtund.conf.server >/etc/vtund.conf.new

# クライアント側のIPアドレスの設定
#sed -e "s/TUNSERVER/$TUNSERVER/" -e "s/TUNCLIENT/$TUNCLIENT/" /etc/vtund.conf.client >/etc/vtund.conf.new

# 相手VtunのLANネットワークを設定します。(ここは触らない)
sed "s/IPADDR/$IPADDR/" /etc/vtund.conf.new >/etc/vtund.conf.tmp
sed -e "s/TUNNETWORK/$TUNNETWORK/" -e "s/TUNMASK/$TUNMASK/" /etc/vtund.conf.tmp >/etc/vtund.conf.new

# サーバー側の起動です。(IPトンネル、ブリッジもサーバー側の起動は変わらない)
#modprobe tun ; vtund -f /etc/vtund.conf.new -s

# IPのトンネリングを行う。
# サーバー側のIPアドレスが$TUNHOSTに設定されているものとする。
# クライアント側の起動です。
#modprobe tun ; vtund cobra -f /etc/vtund.conf.new $TUNHOST

# イーサーネットトンネリング(リモートブリッジ)の設定。
# クライアント側の起動です。
#modprobe tun ; vtund lion -f /etc/vtund.conf.new $TUNHOST


# VLANの設定です。設定例ではeth0に3番のVLANを設定しIPアドレスをTUNSERVER又
# はTUNCLIENTのアドレスを設定します。
# サーバー側の起動です。(VLANにクライアント＆サーバーの概念はありません)
#vconfig add eth0 3 ; ifconfig eth0.3 $TUNSERVER network $TUNNETWORK

# クライン側の起動です。(VLANにクライアント＆サーバーの概念はありません)
#vconfig add eth0 3 ; ifconfig eth0.3 $TUNCLIENT network $TUNNETWORK


# サブインターフェースの設定、１つのethに１つ以上のIPアドレスを設定しましす。
#ifconfig eth0:0 192.168.1.1
#ifconfig eth0:1 192.168.2.1


# etc/inittab の設定です、ここへ登録すると殺(kill)されても不死鳥の如く蘇ります
# 以下の設定は run レベル 5 で常に dos で言うcom1、com2のダイヤルイン監視してい
# ます、もしダイヤルアウトする必要がある場合 # でコメントアウトして下さい。
# 一度ダイヤルイン監視で立ち上げた場合#でコメントアウト後モデムをダイヤルアウト
# 用に設定変更をして下さい。(epicon でモデムへ at&f コマンドを書く)
# もし respawming to fast :disable for 5 minutes が煩ければ#でコメントアウトして下
# さい又モデムが無ければやはり同様のメッセージが出力されます。
# pcmciaのモデムカードがttyS2で認識される時はc51の#を外してc50を#でコメントアウト
# 後に再起動して下さい。
# Winmodemでダイヤルインさせる場合はc53を#でコメントアウトします。(2003.8.10動作せず）
# USBモデム(SUNTAC・U-Cable・TypeD2-V)を認識している場合c55を#でコメントアウトします。
# com1にクロスケーブルでコンソールを接続する場合はc54を#でコメントアウトします。
# Docomo FOMA携帯電話を接続してダイヤルインする場合はc58を有効にします。
cat>>inittab<<Z
#c50:5:respawn:/sbin/agetty  -I 'at&fe0q1&d2&c1s0=1\015' 38400 ttyS1
#c51:5:respawn:/sbin/agetty  -I 'at&fe0q1&d2&c1s0=1\015' 38400 ttyS2
#c52:5:respawn:/sbin/agetty  -I 'at&fe0q1&d2&c1s0=1\015' 38400 /dev/ttyACM0 
#c53:5:respawn:/sbin/agetty  -I 'at&fe0q1&d2&c1s0=1\015' 38400 /dev/ttyS15
#c54:5:respawn:/sbin/agetty  38400 ttyS0
#c55:5:respawn:/sbin/agetty  -I 'at&fe0q1&d2&c1s0=1\015' 38400 /dev/ttyUSB0
#c56:5:respawn:/usr/local/bin/peporemote
#c57:5:respawn:/usr/local/bin/epicon -l /dev/ttyACM0 -c /usr/local/bin/pepop2pchat
#c58:5:respawn:/usr/bin/svscanboot
Z


# レゾルバを設定します dhcp クライアント時の設定はサーバーよりドメインとネーム
# サーバー情報を取得します、この為#でコメントアウトする必要があります。
# DNSサーバーで起動する時は二つとも#を削除します。
cat>resolv.conf<<Z
domain $DOMAIN		# DNSサーバーで起動する時は#を削除します。
nameserver $DNS_1	# DNSサーバーで起動する時は#を削除します。
Z


# 以下 DNS サーバーの設定をします、まずはこれで動かして色々設定を試し下さい。
cat>/var/named/chroot/etc/named.conf<<Z
options {
        directory "/var/named";
        forward only;
        forwarders {
        $DNS_2;
        };
	listen-on port 53 { any; };
};
controls {
	inet 127.0.0.1 port 953 allow { localhost; } keys { rndckey; };
};
zone "$DOMAIN" IN {
        type master;
        file "named.hosts";
        allow-update {
            $IPADD;
        };
};
zone "`echo $IPADDR|awk 'BEGIN{FS="."};{print $3"."$2"."$1".in-addr.arpa"}'`" IN {
        type master;
        file "named.rev";
        allow-update {
            $IPADD;
        };
};

zone "localdomain" IN {
        type master;
        file "localdomain.zone";
        allow-update { none; };
};

zone "localhost" IN {
        type master;
        file "localhost.zone";
        allow-update { none; };
};

zone "0.0.127.in-addr.arpa" IN {
        type master;
        file "127.0.0.rev";
        allow-update { none; };
};

#zone "." IN {
#        type hint;
#        file "named.ca";
#};

include "/etc/rndc.key";
Z

cat>/var/named/chroot/var/named/named.hosts<<Z
\$TTL	600
@		IN		SOA	$DOMAIN. $HOSTNAME.$DOMAIN. (
		20070101	;Serial
		10800		;Refresh after 3 hours
		3600		;Retry  after 1 hours
		604800		;Expire after 1 week
		86400)		;Minimum TTL of 1 day
		IN		NS	$HOSTNAME.$DOMAIN.
		IN		MX	10	mail.$DOMAIN.
ftp		IN	A	$IPADDR
dns		IN	A	$IPADDR
www		IN	A	$IPADDR
mail	IN	A	$IPADDR

_ldap._tcp.$DOMAIN. 				SRV 0 100 389 $HOSTNAME.$DOMAIN.
_kerberos._tcp.$DOMAIN. 			SRV 0 100 88 $HOSTNAME.$DOMAIN.
_ldap._tcp.dc._msdcs.$DOMAIN. 		SRV 0 100 389 $HOSTNAME.$DOMAIN.
_kerberos._tcp.dc._msdcs.$DOMAIN. 	SRV 0 100 88 $HOSTNAME.$DOMAIN.

`echo	$IPADDR.$HOSTNAME|\
	awk 'BEGIN{FS="."};\
	{printf ("%s\tIN\tA\t%d.%d.%d.%d\n",$5,$1,$2,$3,$4)}'`
`echo	$IPADDR.$CLIENT.$HOST|\
	awk 'BEGIN{FS="."};\
	{for (i=1; i<=$5 ;i++) \
	printf ("%s\tIN\tA\t%d.%d.%d.%d\n",$6i,$1,$2,$3,$4+i)}'`
gw		IN	A	$GATEWAY
		HINFO	"PepoLinux" "IZAMUKARERA"
		TXT		"Router"
Z

cat>/var/named/chroot/var/named/named.rev<<Z
\$TTL           86400
@               IN      SOA     $DOMAIN. $HOSTNAME.$DOMAIN. (
                20070101        ;Serial
                10800           ;Refresh after 3 hours
                3600            ;Retry  after 1 hours
                604800          ;Expire after 1 week
                86400)          ;Minimum TTL of 1 day
                IN      NS      $HOSTNAME.$DOMAIN.
`echo   $IPADDR,$HOSTNAME,$DOMAIN|\
        awk 'BEGIN{FS=","};\
        {split($1,IP,".");\
        IP4=IP[4];\
        printf ("%d\tIN\tPTR\t%s.%s.\n",IP4,$2,$3)}'`

`echo   $IPADDR,$DOMAIN|\
        awk 'BEGIN{FS=","};\
        {split($1,IP,".");\
        IP4=IP[4];\
        printf ("%d\tIN\tPTR\tmail.%s.\n",IP4,$2)}'`
`echo   $IPADDR,$CLIENT,$HOST,$DOMAIN|\
        awk 'BEGIN{FS=","};\
        {split($1,IP,".");\
        IP4=IP[4];
        for (i=1; i<=$2 ;i++) \
        printf ("%d\tIN\tPTR\t%s.%s.\n",IP4+i,$3i,$4)}'`
Z

cat>/var/named/chroot/var/named/localdomain.zone<<Z
\$TTL           86400
@               IN      SOA     localhost. root.localhost. (
                20070101        ;Serial
                10800           ;Refresh after 3 hours
                3600            ;Retry  after 1 hours
                604800          ;Expire after 1 week
                86400)          ;Minimum TTL of 1 day
                IN      NS      localhost.
localhost       IN      A       127.0.0.1
Z

cat>/var/named/chroot/var/named/localhost.zone<<Z
\$TTL           86400
@               IN      SOA     localhost. root.localhost. (
                20070101        ;Serial
                10800           ;Refresh after 3 hours
                3600            ;Retry  after 1 hours
                604800          ;Expire after 1 week
                86400)          ;Minimum TTL of 1 day
                IN      NS      localhost.
                IN      A       127.0.0.1
Z

cat>/var/named/chroot/var/named/127.0.0.rev<<Z
\$TTL            86400
@               IN      SOA     localhost. root.localhost. (
                20070101        ; Serial
                28800           ; Refresh
                14400           ; Retry
                3600000         ; Expire
                86400 )         ; Minimum
                IN      NS      localhost.
1               IN      PTR     localhost.
Z

touch /var/named/chroot/var/named/named.root;chmod 644 /var/named/chroot/var/named/named.root
chown named.named /var/named/chroot/var/named/*
# named コントロール用のkeyを生成します。
#rndc-confgen -a


# dhcp サーバーの設定を設定します。
# dhcp
#/bin/sh
cat>/etc/dhcpd.conf<<Z
                        ddns-update-style none;
                        server-identifier $HOSTNAME.$DOMAIN;
                        option domain-name "$DOMAIN";
                        option domain-name-servers $DNS_1,$DNS_2;
                        shared-network $HOSTNAME{
                        option subnet-mask $NETMASK;
                        default-lease-time 3600;
                        max-lease-time 7200;
                        subnet $NETWORK netmask $NETMASK {
                        range `echo  $IPADDR.$CLIENT|awk 'BEGIN{FS="."};
                        {print $1"."$2"."$3"."$4+1" "$1"."$2"."$3"."$4+$5";"}'`
                        option routers $GATEWAY;
                        }
}
Z


#システムの安定を待ちます。
sync
sleep 5


# デバイス検出の為にメッセージ・バスデーモンを起動します。
service messagebus start


# dns サーバーを起動させます。
service named start #echo Starting named


# dhcp サーバーを起動させます。
#service dhcpd start


# dhcp クライアントを起動させます、他の pc にdhcpサーバーが必要です。
#dhclient eth0;echo Starting dhcpcd


# routed ルーティングデーモンを起動させます。(RIP-1によるルーティングを行う)
#routed ;echo Starting routed


# ＭＯＵＳＥのコピー＆ペーストユーティリテを起動させます。
service gpm start
# ＵＳＢ ＭＯＵＳＥのコピー＆ペーストユーティリテを起動させます。
#gpm -m /dev/input/mice -t ps2;echo starting usb_mouse_gpm


# snmp デーモンの起動させます。
sed -e "s/_HOSTNAME/$HOSTNAME_TDL/" -e "s/_DOMAIN/$DOMAIN/" /etc/snmp/snmpd.conf.org >/etc/snmp/snmpd.conf
service snmpd start # echo Starting snmpd


# 「ntp3.jst.mfeed.ad.jp」と時刻を同期させます。
/usr/sbin/ntpdate ntp3.jst.mfeed.ad.jp


# ntp サーバーの起動させます。
#service ntpd start


# portmap サーバーを起動します。（RPCサービスやnfsを使う時に必要です）
#service portmap start


# nfs サーバーを起動します。（公開するディレクトリは予めメモリディスク以外をマウントしてから /etc/exportfs を編集します）
#service nfs start


# ssh サーバーの起動させます。
service sshd start


# proxy サーバーの起動させます。
sed -e "s/IPADDR/$NETWORK\/$MASK/" /etc/squid/squid.conf.org >/etc/squid/squid.conf
#mkdir -p /var/log/squid ; chown squid.squid /var/log/squid ; service squid start


# mail デーモンを起動させます。
sed -e "s/_HOSTNAME/$HOSTNAME_TDL/" -e "s/_DOMAIN/$DOMAIN/" -e "s/_RELAYHOST/$RELAYHOST/"  /etc/postfix/main.cf.org >/etc/postfix/main.cf
sed "s/localhost.localdomain/$DOMAIN/" /etc/mail/sendmail.mc >/etc/mail/sendmail.mc.bak;cp /etc/mail/sendmail.mc.bak /etc/mail/sendmail.mc
if [ -n $RELAYHOST ];then
  echo "define(\`SMART_HOST', \`$RELAYHOST')dnl" >>/etc/mail/sendmail.mc
fi
#service sendmail start
service postfix start


# pop,imap （dovecot)デーモンを起動します。
#service dovecot start


# www サーバーの設定です。ホームページデータの転送と、 www (Apache)サーバーを
# 動作させます、 ssi、cgi 、perlスクリプトもOK。
# /tftpboot/home/~xxxx/public_html/ に各ユーザーがホームページを作成出来ます。
sed -e "s/IPADDR/$NETWORK\/$MASK/" -e "s/_HOSTNAME/$HOSTNAME_TDL/" /etc/httpd/conf/httpd.conf.org >/etc/httpd/conf/httpd.conf
sed -e "s/_HOSTNAME/$HOSTNAME_TDL/" -e "s/_DOMAIN/$DOMAIN/" -e "s/Ver0.47/Ver$Ver/" /var/www/html/index.html.org >/var/www/html/index.html
PE=/dos/peplinux
T=/var/www
if [ -d "$PE" ]; then
	cd $PE
	cp -ap *.html *.htm *.shtml *.dat *.php $T/html >/dev/null 2>&1
	cp -ap *.png *.gif *.jpg $T/html/img >/dev/null 2>&1
	if [ -f counter.pl ];then
		lfcut.s counter.pl $T/cgi-bin/counter.pl
	fi
	cd /
fi
chmod 777 $T $T/* $T/cgi-bin/* $T/html/*  $T/html/img/* >/dev/null 2>&1
# www サーバーの起動です
service httpd start


# mrtgとanalogの設定です。ルーターとWWWサーバーの統計データーを定期的に集計しWEBで公開します。
MEM_T=`free |awk -F" " '/Mem/{print $2}'`
COMMUNITY=public
#MRTG_IP=$IPADDR
/usr/bin/cfgmaker --global 'WorkDir: /var/www/mrtg' --global 'Language: eucjp' \
--global 'options[_]: growright,bits' --output=/etc/mrtg/mrtg.cfg.old $COMMUNITY@$MRTG_IP

cat>>/etc/mrtg/mrtg.cfg.old<<Z
#
# httpdプロセス数の数 # httpdプロセス数
#
Target[httpd]: .1.3.6.1.4.1.2021.2.1.5.1&.1.3.6.1.4.1.2021.2.1.4.1:$COMMUNITY@$MRTG_IP
ThreshMaxI[httpd]: 20
SetEnv[httpd]: EMAIL="root@$DOMAIN"
               URL="http://$MRTG_IP/mrtg/httpd.html"
MaxBytes[httpd]: 100
Title[httpd]: Number of httpd
PageTop[httpd]: <H1> Number of httpd on WebServer</H1>
YLegend[httpd]: Number of httpd
ShortLegend[httpd]: httpd
LegendI[httpd]: 起動中のhttpd
LegendO[httpd]: 起動中のhttpd

#
# CPUのロードアベレージ# 1分間平均の％および15分平均の％
#
Target[la]: .1.3.6.1.4.1.2021.10.1.5.1&.1.3.6.1.4.1.2021.10.1.5.3:$COMMUNITY@$MRTG_IP
ThreshMaxI[la]: 50
SetEnv[la]: EMAIL="root@$DOMAIN"
            URL="http://$MRTG_IP/mrtg/la.html"
MaxBytes[la]: 100
Title[la]: Load Average
PageTop[la]: <H1> Load Average on WebServer</H1>
YLegend[la]: Load Average
ShortLegend[la]: %
LegendI[la]: 1分平均
LegendO[la]: 15分平均
#
# メモリ使用状況 # MaxByteには非試験機のトータルメモリを指定
#
Target[mem]: .1.3.6.1.4.1.2021.4.4.0&.1.3.6.1.4.1.2021.4.6.0:$COMMUNITY@$MRTG_IP
ThreshMaxI[mem]: 80
SetEnv[mem]: EMAIL="root@$DOMAIN"
            URL="http://$MRTG_IP/mrtg/mem.html"
MaxBytes[mem]: $MEM_T
Title[mem]: Memory Usage "real" and "swap"
PageTop[mem]: <H1>Memory Usage "real" and "swap" on WebServer</H1>
YLegend[mem]: Memory Usage
ShortLegend[mem]: kbyte
LegendI[mem]: Swap使用量
LegendO[mem]: 実メモリ使用量
Z

# mrtgの設定ファイルをeucへ変換します。
nkf -e /etc/mrtg/mrtg.cfg.old >/etc/mrtg/mrtg.cfg

# mrtgの各統計用のHTMLファイルを一つのindex.htmlにまとめます。
/usr/bin/indexmaker /etc/mrtg/mrtg.cfg > /var/www/mrtg/pepolinux.html

#WEBサーバの解析ソフトwebalizerの設定をしてcronに登録します。
sed -e "s/_HOSTNAME/$HOSTNAME_TDL/"  /etc/webalizer.conf.org >/etc/webalizer.conf

# 定期的に収集出来るようにと2時間毎に時刻同期をcronに設定します。
cat>/etc/mrtg.sh<<Z
LANG=C
/usr/bin/mrtg /etc/mrtg/mrtg.cfg
Z
chmod 755 /etc/mrtg.sh

cat>/etc/cronpepo<<Z
0-59/5 * * * *  /etc/mrtg.sh
0-59/5 * * * *  /usr/bin/webalizer -c /etc/webalizer.conf
00 0-23/2 * * * /usr/sbin/ntpdate gpsntp.miz.nao.ac.jp
Z

crontab /etc/cronpepo


# Disable kernel messages. If you wish to verbose mode please comment out.
echo "0" > /proc/sys/kernel/printk


# インターネット・スーパーデーモン xinetd 様の起動です、これを起動さないとFTP、TELNET等が不可。
service xinetd start


# デバイス検出デーモンを起動します。
service haldaemon start


# WindowsXPが起動出来なくなった時、DISKをマウントして共有フォルダで公開します。
#pepomsrescue

#Kernel Debugger（i386系CPUのKernelデバッガ。Pauseキーで起動します。）を無効にします。有効→　echo "1" >/proc/sys/kernel/kdb
#echo "0" >/proc/sys/kernel/kdb


# 透過プロキシの設定をします。・・この前にsquidの起動がされ、eth1へDHCPサーバーからIPが取得されている事。
# eth1のdhcpサーバーから取得したIPアドレスをゲットします。
#DHCPCLIENT_IP=`ifconfig eth1|awk '/inet addr:/{gsub(/addr:/,"");print $2}'`
# dhcpサーバーから取得したIPアドレスでeth1を外向きNATを設定します。
#iptables -t nat -A POSTROUTING -o eth1 -j SNAT --to $DHCPCLIENT_IP
# 内部の自IPアドレス以外の80番portをsquidのportへリダイレクトの設定をします。
#iptables -t nat -A PREROUTING -i eth0 -s ! $IPADDR -p tcp --dport 80 -j DNAT --to-destination 127.0.0.1:3128
# eth0の80番portをsquidのportへリダイレクトの設定をします。
#iptables -t nat -A PREROUTING -i eth0 -p tcp --dport 80 -j REDIRECT --to-port 3128


# Passwordの再設定をします。
#echo 'pepolinux' |passwd root --stdin


# SSHのログインオプションの設定をします。
# FDよりsshdの公開鍵を読み込み、公開鍵のみで認証するようにします。
#mount /dev/fd0 /mnt/fd
#cat /mnt/fd/peplinux/*.pub >/root/.ssh/authorized_keys
#umount /mnt/fd
#cat /etc/ssh/sshd_config |sed "s/PasswordAuthentication yes/PasswordAuthentication no/" > /etc/ssh/sshd_config
#service sshd restart


# OpenVPNのServe用の設定をします。
# server xx.xx.xx.xx ← serverの内部ネットワークを定義
cat >/etc/openvpn/server.conf<<Z
# Server port 443,protocol tcp
port 443
	proto tcp
	dev tun
	ca /etc/openvpn/easy-rsa/keys/ca.crt
	cert /etc/openvpn/easy-rsa/keys/server.crt
	key /etc/openvpn/easy-rsa/keys/server.key
	dh /etc/openvpn/easy-rsa/keys/dh1024.pem
# OpeVPNで使用するDHCPのアドレスプールを指定します。サーバがx.x.x.1、VPNゲートゲートウェイがx.x.x.2になります。
	server 192.168.10.0 255.255.255.0
# OpenVPN側のサーバー側のIPアドレスを固定する場合に指定します。（クライアントのデフォルトゲートウェイになります。）
	#ifconfig 192.168.10.199 255.255.255.0
	ifconfig-pool-persist ipp.txt
# クライアントへ通知するサーバー側のネットワークアドレスを指定します。（サーバー側では適切なルーティングが必要です。）
	push "route 192.168.0.0 255.255.255.0"
#	push "route 192.168.1.0 255.255.255.0"
#	push "route 192.168.2.0 255.255.255.0"
# DHCPクライアントとして接続してきたとき、DNSサーバのアドレスを通知します。
#	push "dhcp-option DNS 192.168.0.123"
 
# DHCPクライアントとして接続してきたとき、WINSサーバのアドレスを通知します。
#	push "dhcp-option WINS 192.168.0.124"
	keepalive 10 120
	comp-lzo
	user nobody
	group nobody
	persist-key
	persist-tun
	status openvpn-status.log
	verb 3
	mute 20
	client-to-client
	up /etc/openvpn/openvpn_up.sh
Z

# OpenVPNサーバー側で事前に必要なUPスクリプトを設定します。
cat >/etc/openvpn/openvpn_up.sh<<Z
#!/bin/sh
# eth0へもう一つIPアドレスを設定し、OpenVPNクライアントからのソースアドレスをこれに書き換えます。
ifconfig eth0:1 192.168.0.254
# OpenVPNの為のNATを設定します。（OpenVPNクライアントがサーバIPのフリをしてサーバネットワークにアクセスします。）
iptables -t nat -A POSTROUTING -s 192.168.10.0/24 -d 192.168.0.0/24 -j SNAT --to-source 192.168.0.254
# 接続してくるクライアントのLAN側のルーティングを設定します。（クライアントのネットワーク数必要）
ip route add 192.168.1.0/24 via 192.168.10.2
Z

chmod +x /etc/openvpn/openvpn_up.sh


# OpenVPNのClient、WindowsXP用の設定ファイルを作成します。
# remote xx.xx.xx.xx ← serverのグローバルアドレスを指定
# serveで作成された各ファイルをコピー client1.crt client1.key ca.crt　と共に　client_xp.ovpnを
# WindowsXPのClientの　C:\Program Files\OpenVPN\config\　へコピーします。
cat>/etc/openvpn/client_xp.ovpn<<Z
	client
	port 443
	proto tcp
	dev tun
	ca ca.crt
	cert client1.crt
	key client1.key
	dh dh1024.pem
# remoteでOpenVPNサーバのグローバルアドレスを指定します。
	remote 192.168.0.1
	keepalive 10 120
	comp-lzo
	persist-key
	persist-tun
	status openvpn-status.log
	verb 3
	mute 20
# OpenVPNサーバのIPアドレスがデフォルトゲートウェイになります。
	redirect-gateway def1
Z

# OpenVPN起動します。
#servie openvpn start


# WebShellを起動します。
#/var/www/html/WebShell-0.9.5/webshell.py &

# PepoLinux world の始まり始まり楽しんでね。
# Have a fun PepoLinux.

このプロジェクトの目的

このプロジェクトはOpenMicroServerとFOMAの携帯電話を接続してRemote-Handや他アプリケーションを開発するものです。

2011年販売中止になったOpenMicroserverを何とか有効利用しようとして作成したものです。

ネットワーク監視や外部信号の入力監視と連携してメール通知やパトライト点灯など外部信号出力や

携帯電話のFOMAをUSB接続すれば遠隔地からのリモートログインの為のダイヤルインサーバーなど

不要になったOpenMicroserverに『 もっと早くもっとクールにリモートで解決！』で活躍出来ようにするパッケージです。

Remote-hand for OpenMicroServer イメージ－１

Remote-hand for OpenMicroServer イメージ－２

OpenMicroServer ブートイメージ－１

シリアルコンソール（Teratermで115200bps、8bit、NONEパリティ）でケーブルをコンソールポートへ接続します

OpenMicroServer ブートイメージ－２

①OpenMicroServer ブートイメージ－３

初期状態では、ユーザー名：root　パスワード：root　でログインしてeth0のIPアドレスを環境に合わせまるか

eth0へLANケーブルを接続しWEBブラウザで　http://192.168.252.254へアクセスします

②WEBログイン

初期状態では、ユーザー名：root　パスワード：root　でログイン

ここではブート時の初期設定をします、以降の画面で設定した内容はPPPユーザーとWEBユーザーの設定以外はブート時に反映されません

③Remote-Hnadログイン

初期状態では、ユーザー名：remote　パスワード：hand　でログイン

④ログイン後のイメージ＆イーサネット設定画面

⑤ルーティング設定画面

⑥pppユーザー設定画面

FOMAの動作モード（64kデジタル通信、オンデマンド、PPP常時接続）を選択

64kデジタル通信時にPPPクライアントのユーザー名とパスワードを設定、他はダミーで登録が必要

⑦WEBユーザー設定画面

初期状態はユーザー名：remote　パスワード：hand

⑧DIO設定画面

入力端子と出力端子に別名をつけて後の設定に反映します。

⑨PING監視するIPアドレスを設定します。（デジタルアウト）

監視する機器がタイムアウトを起こせばデジタル指定の出力端子をＯＮ又はＯＦＦします。

削除はIPアドレスを指定して削除を選択します。

⑩PING監視するIPアドレスを設定します。（メール）

監視する機器がタイムアウトを起こせば指定されたメールアドレスに時間情報とカウンタを付加してメッセージを送信します。

正常にPING応答を返せば時間情報を付加してメッセージを送信します。

⑪PING監視するIPアドレスを設定します。（電話）

監視する機器がタイムアウトを起こせば指定された電話番号へダイヤルします・・・ワンギリ

正常にPING応答を返せば電話番号へダイヤルします・・・ワンギリ

⑫デジタル入力信号の変化に対するアクションを設定します

一つに入力信号に対して二つのアクションを設定出来ます。

つまり信号の立ち上がり：LOW→HIGH（０→１）と信号の立下り：HIGH→LOW（１→０）の二つ

メール、出力信号HIGH又はLOW、電話

⑬アラートメールの設定をします

初期値ではFOMAを使用してダイヤルアップでインターネットへ直接接続してsendmailでメールを送信します。

domain内部よりsmtpプロトコルを直接通せない場合はwgetを選択します。

wgetはgmailアカントを使用してメッセージを送信する方法でpepogmail_send.cgiが動作するserverが別途

必要です。

例えばRemote-Hand_DIOが出先で自宅のserverへwgetでメッセージを送信依頼する事想定しています。

実際にはRemote-Hand_DIOにpepogmail_send.cgiが動作しているのでIPアドレスなどの情報を自serverの情報へ設定

/var/www/cgi-bin/pepogmail_send.cgiをviエディタでgmailのアカウント情報とserverのパスワードを設定、 ここではその内容を設定します。

⑭指定されたURLからpodcastsのファイル取得の設定画面

MP3のpodcastsファイルを指定、定期的に収集しMP3プレイヤーへ転送と世代管理をします。

⑮サーバーの設定＆コントロール設定画面

ブート時の初期情報の設定画面、これ以前の画面は一時設定ですがここでは立ち上げ時のIPアドレスなどの初期情報を設定します。

pepousb-installとは

1CDLinuxであるPepoLinuxをUSBメモリやHDDへインストールして起動できるようにしたものです。

USBメモリだけでなくFAT32のファイルシステムならdevice指定を変更すればHDDへもインストールできます。

簡単なスクリプトなので他へも転用できると思います。

2011.11.22 by Yamauchi Isamu

#!/bin/sh
# pepousb-install ; install for PepoLinux form CD to USB devices
# licence GPLv2 ; this scripts designed by IZAMUKARERA 2007.1.7 update 2011.11.3
NU=/dev/null
MNT=/var/tmp/pepotmp.$$
echo -n "input usb device eg:/dev/sdb1-->"
read G
if [ -z "$G" ] ;then
        USBDEV="/dev/sdb1"
else
        USBDEV="$G"
fi
if [ ! -e "$USBDEV" ];then
        echo $USBDEV not found!
        exit -1
fi
CDMNT=`cat /etc/mtab|awk '/iso9660/{print $2}'`
if [ -z "$CDMNT" ] ;then
        echo "Please mount PepoLinux-CD and try once!"
        exit
fi
mkdir -p $MNT
mount -t vfat $USBDEV $MNT 1>$NU 2>$NU
USBMNT=`cat /etc/mtab|awk '/vfat/{print $2}'`
if [ -z "$USBMNT" ] ;then
        echo "Please $USBDEV format vfat or device not found or manually mount o
r etc.--> try once!"
        exit
fi
umount $USBMNT
echo -n "next step usb device all files destroy (y/n)-->"
read G
[ "Xy" != "X$G" ] && exit
# make usb-PepoLinux
mount -t vfat $USBDEV $MNT 1>$NU 2>$NU
cp -a $CDMNT/* $MNT/ 1>$NU 2>$NU
tUSBDEV=`echo -en $USBDEV | sed s/[0-9]$//`
cat /boot/grub/device.map | grep -v hda | echo "(hd0) $tUSBDEV" >$MNT/boot/grub/
device.map
grub-install --no-floppy --root-directory=$MNT $tUSBDEV
sync
umount $MNT
rm -rf $MNT
echo done!

OpenMicroServerとは

AMD Alchemy(TM) AU1550(TM) 400MHzプロセッサを搭載した102（W）× 230（D）× 33（H）mmの大きさのLinuxが稼動するマイクロサーバです。

最初に

init.s_pepodiodlとはPepoLinux-0.49に収録されているシリアルDIOボードの各ポートを監視して適当なプログラムを起動するdaemonのpepodiodの起動用のスクリプトです。 /etc/init.d/pepodiodへ登録して、serviceコマンドから起動/停止させるものです

root@~# service pepodiod start

Starting pepodiod services: [ OK ]

root@~# service pepodiod stop

Stopping : [ OK ]

2011.10.25 by.Yamauchi Isamu

#!/bin/bash
#
# chkconfig: 2345 99 03
# description: pepodiod serial-dio daemon \
# contorl digital-Input to ANDDIO, by.IZAMUKARERA \
# 2011.10.18
# processname: pepodiod
# pidfile: /var/run/pepodiod.pid
# config: /etc/sysconfig/pepodiod

# source function library
. /etc/init.d/functions
PATH="/usr/local/bin:$PATH"
prog=pepodiod
progexec=diod_exec
killprog=killps
DI_TTY=ttyS1
ALIAS_DI=/var/tmp/.alias_di
[ -e "$ALIAS_DI" ] && . "$ALIAS_DI"
[ ! -z "$DI_TTY" ] && DIO_DEV="/dev/"${DI_TTY}

if
 test -e /etc/sysconfig/$prog ; then
    . /etc/sysconfig/$prog
fi

RETVAL=0

        if [ -e /var/lock/subsys/$prog ];then
                echo
                echo -en Already running
                failure
                echo
                exit 5
        fi
        if [ ! -e $DIO_DEV ];then
          failure
          exit 5
        fi
        $progexec $prog
        RETVAL=0
        success
        [ $RETVAL -eq 0 ] && touch /var/lock/subsys/$prog || RETVAL=1
        echo
        return $RETVAL
}

stop() {
        echo -n $"Stopping $PROG: "
        killproc $prog
        echo
        [ -e /var/lock/subsys/$prog ] && rm /var/lock/subsys/$prog
        RETVAL=0
        return $RETVAL
}

case "$1" in
  start)
        start
        ;;
  stop)
        stop
        ;;
  restart|reload)
        stop
        start
        ;;
  condrestart)
        if [ -f /var/lock/subsys/$prog ]; then
            stop
            start
        fi
        ;;
  status)
        status $PROG
        RETVAL=$?
        ;;
  *)
        echo $"Usage: $0 {start|stop|restart|condrestart|status}"
        exit 1
esac

exit $RETVAL

これはVmplayerとPepoLinux（1CDLinuxイメージ)使ってKernel makeとUSB Driver開発及びDebugについて書いたものです。

1. WindowsXPへVMplayerをinstall

2. VmplayerにPepoLinuxをinstall

3. PepoLinuxのKernel-sourceをダウンロード

• 以下は当サイトで用意したKenel-sourceのイメージを使う場合は既に設定済み

• Kernelのdebugを有効

• USBのdebugを有効

• usb moniterを有効

ようこそPepoLinuxのプロジェクトWikiへ

サーバ・ネットワークの実験が超簡単に出来るように1CDLinuxとツール＆ドキュメントを開発しています。 『もっと早くもっと素敵にリモートで解決！』がテーマのPepoLinuxです。
コマンドを入力したらCDドライブの読み込みが終わるまで反応がないようなイライラを出来るだけ減らし、メモリ容量に合わせ起動モードを自動的に選択、256M以上であれば全てオンメモリで動作します。
複雑なLinuxの設定ファイルも日本語解説付きで１つにまとめ、MS Windowsのテキストエディタで簡単に設定できます。

PepoLinux Login

acm-FOMAとは

USB接続が出来るFOMA携帯電話用のLinux Kernel-2.6以降のdriverです。

/drivers/usb/class/cdc-acm.cをdocomoのFOMA用のdriverとして改造、2007.3.31に初リリースしました。

当初、FOMAの機種毎にコード追加してリリースをしていましたが、余りに早い機種発売ラッシュ、それに対応すべく2007.11.17に機種別コードを不要にしました。

従来からMODEMモードのみでしたが、2011.5.28 v0.26.10からはOBEXとATcommandモードの３モードをサポート出来る様になりました。

インスール

1. Install

[root@~]# tar xvfz acm-FOMA.v0.26.10.tar.gz
# cd /usr/src/linux-2.6.38
# patch -p1 <acm-FOMA.v0.26.10.patch
# make menuconfig

CONFIG_USB_ACM_FOMA:                                                                    x
  x                                                                                     x
  x This driver USB Abstract Control Model driver for docomo FOMA Cellular phone.       x
  x (Test Version)                                                                      x
  x                                                                                     x
  x                                                                                     x
  x Symbol: USB_ACM_FOMA [=m]                                                           x
  x Prompt: USB Modem (docomo FOMA) support                                             x
  x   Defined at drivers/usb/class/Kconfig:22                                           x
  x   Depends on: USB                                                                   x
  x   Location:                                                                         x
  x     -> Device Drivers                                                               x
  x       -> USB support                                                                x
  x         -> Support for Host-side USB (USB [=y])                                     x

make modules
make modules_install

OR. An easier installation might be the following method. 

[root@p-4 src]# cd acm-FOMA.v0.26.10
[root@p-4 acm-FOMA.v0.26.10]# make
make -C /lib/modules/2.6.35.13-91.fc14.i686.debug/build M=/usr/src/acm-FOMA.v0.26.10 modules
make[1]: ディレクトリ `/usr/src/kernels/2.6.35.13-91.fc14.i686.debug' に入ります
  CC [M]  /usr/src/acm-FOMA.v0.26.10/acm-FOMA.o
  Building modules, stage 2.
  MODPOST 1 modules
  CC      /usr/src/acm-FOMA.v0.26.10/acm-FOMA.mod.o
  LD [M]  /usr/src/acm-FOMA.v0.26.10/acm-FOMA.ko
make[1]: ディレクトリ `/usr/src/kernels/2.6.35.13-91.fc14.i686.debug' から出ます
[root@p-4 acm-FOMA.v0.26.10]# make install
install -m 744 -c acm-FOMA.ko /lib/modules/2.6.35.13-91.fc14.i686.debug/kernel/drivers/usb/class
depmod -a
install acm-FOMA.ko completed!
[root@p-4 acm-FOMA.v0.26.10]#

デバイスの検出

2. Discovery of device

 When the cable of FOMA Cellular phone is inserted in USB, you confirm the following logs.
[root@~]# tail -n 10 /var/log/messages
[root@~]# tail /var/log/messages
May 28 15:10:28 (none) kernel: usb 1-1: New USB device found, idVendor=04dd, idProduct=9284
May 28 15:10:28 (none) kernel: usb 1-1: New USB device strings: Mfr=1, Product=2, SerialNumber=3
May 28 15:10:28 (none) kernel: usb 1-1: Product: FOMA SH06A
May 28 15:10:28 (none) kernel: usb 1-1: Manufacturer: SHARP
May 28 15:10:28 (none) kernel: usb 1-1: SerialNumber: 1234567890123456
May 28 15:10:28 (none) kernel: acm_FOMA 1-1:1.0: ttyACM0: USB ACM device
May 28 15:10:29 (none) kernel: acm_FOMA 1-1:1.3: ttyACM1: USB ACM device
May 28 15:10:29 (none) kernel: acm_FOMA 1-1:1.5: Control and data interfaces are not separated!
May 28 15:10:29 (none) kernel: acm_FOMA 1-1:1.5: This needs exactly 3 endpoints
May 28 15:10:29 (none) kernel: acm_FOMA 1-1:1.5: ttyACM2: USB ACM device

使いかた

3. usage

[root@~]# epicon -l /dev/ttyACM0

** Welcome to epicon Version-4.8 Copyright Isamu Yamauchi compiled:Feb 11 2011 **
      exec shell         ~!
      send binary files  ~f
      call rz,sz,sx,rx   ~rz,~sz,~sx,~rx
      call kermit        ~sk,~rk
      external command   ~C
      change speed       ~c
      exit               ~.
      Connected /dev/ttyACM0
at
OK
at&f
OK

Disconnected

[root@~]# epicon -l /dev/ttyACM1

** Welcome to epicon Version-4.8 Copyright Isamu Yamauchi compiled:Feb 11 2011 **
      exec shell         ~!
      send binary files  ~f
      call rz,sz,sx,rx   ~rz,~sz,~sx,~rx
      call kermit        ~sk,~rk
      external command   ~C
      change speed       ~c
      exit               ~.
      Connected /dev/ttyACM1
ERROR
Disconnected
[root@~]#
[root@~]# epicon -l /dev/ttyACM2

** Welcome to epicon Version-4.8 Copyright Isamu Yamauchi compiled:Feb 11 2011 **
      exec shell         ~!
      send binary files  ~f
      call rz,sz,sx,rx   ~rz,~sz,~sx,~rx
      call kermit        ~sk,~rk
      external command   ~C
      change speed       ~c
      exit               ~.
      Connected /dev/ttyACM2
at
OK
atd09012345678;
OK
ath
OK

Disconnected

chobit_progとは

このプロジェクトは、日頃Linuxやパソコンを使って実験をした時のメモ書きやその際に出来た

ちょとしたプログラム、スクリプト、Tipsなど

名付けて、チョビットプログラム…みたいな物の寄せ集めです。

OpenOffice Calcで画像の貼り付けを連続的に行うマクロ

最近、MSofficeがインストールされていない制御用のWindowsXP搭載のPCに遭遇

USB起動で画面プリントが連続的に取れるＡＰをと探していたらOpenOffice portable へ巡り合った

そしてこれのマクロを色々なサイトの情報を頼りに書いてみた

ExcelインストールされていないPCで画面キャプチャを取る時に結構使えそうなのでここに掲載する

使い方

・Sheet1を作成する

・Sheet1へ適当なボタン用に画像を作成

・この画像に以下のコードのマクロを登録する

・その画像ボタンを押すたび

・Sheet1の左端にnewsheet2、newsheet3・・・newsheetNが追加

・追加されたnewsheetNへクリップボードからの画像が貼られ

・サイズが７５％に縮小され…0.75を書き換えれば任意

・最後にSheet1へ戻る

REM  *****  20110524 kujiranodanna wrote  *****
sub Main
  dim oDocument As Object
  dim oSheet As Object
  dim sName As String
  dim document   as object
  dim dispatcher as object
  dim args1(1) as new com.sun.star.beans.PropertyValue
  document = ThisComponent.CurrentController.Frame
  dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
  oDocument = ThisComponent
  sName = "newsheet" & oDocument.Sheets.getCount()+1
  args1(0).Name = "Name"
  args1(0).Value = sName
  args1(1).Name = "Index"
  args1(1).Value = 1
  dispatcher.executeDispatch(document, ".uno:Insert", "", 0, args1())
  oSheet = ThisComponent.Sheets.getByName(sName)
  oCell = oSheet.getCellRangeByName("A1")
  ThisComponent.CurrentController.ActiveSheet
  dispatcher.executeDispatch(document, ".uno:Paste", "", 0, Array())
    
rem ***** resize *****
  dim Sheet as Object
  dim pSheet as Object
  dim picture as Object
  dim pictureResize as new com.sun.star.awt.Size
  Sheet = ThisComponent.CurrentController.ActiveSheet
  pSheet = Sheet.getDrawPage
  picture = pSheet.getByIndex( pSheet.getCount - 1 )
  with pictureResize
    .Width =  picture.Size.Width * 0.75
    .Height =  picture.Size.Height * 0.75
  end with
  picture.setSize(pictureResize)
    
rem ***** return to sheet1 *****
  ThisComponent.CurrentController.ActiveSheet = ThisComponent.Sheets.getByName("Sheet1")
  args1(0).Name = "ToPoint"
  args1(0).Value = "$A$1"
  dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())

end sub

最初に

Remote-Hand2VPNとは、VMware Playerと1CDLinuxをベースにGUIでOpenVPNの設定を手軽に行いVPN越しにRemote-Handを実現させる、VMware Applianceです。
OpenVPNの情報サイトは数多あるが、ドキュメントを読み進めないと簡単に構築できないのではないでしょうか。ややネットワークの知識がいるがWebUIでサーバ/クライアントの鍵の生成・廃止・ダウンロードなどが５分程度で設定出来るようにしました。
それとOpenVPNは会社から自宅PCなどへ簡単に接続が出来てしまう優れものである反面、セキュリティ上企業にとって大変危険です、これらをよく理解して正しい目的で使いましょう。
サーバPC（WindowsXP）とクライアントPCを用意、VMware Playerが事前にインストールされていて、満足に操作が出来ることを前提として、下記にリモートハンドの使用説明をします。

サーバの用意（WindowsXP）

1. URLから別途、PepoLinux-0.34.iso　より大きいバージョンのISOファイルをダウンロードします。 http://sourceforge.jp/projects/pepolinux/releases/?package_id=3225
2. 展開した　remote-hand　フォルダへダウンロードした PepoLinux-XX.iso コピーします。 (Remote-Hand.vmx　をテキストエディタで開き、下記項目をISOイメージ名に合わせ編集します。：2009.4.6現在不要) ide1:0.fileName = "PepoLinux-0.34.iso"
3. VMware Playerで remote-hand →開く→展開したフォルダの Remote-Hand.vmx を選択→開く、起動します。この時、『コピーしました』が選択されている状態で→OK
4. 何も操作しない状態で約２分程で立ち上がります。

1. 立ち上がったら画面の表示に従い→　login　https：//xxx.xxx.xxx.xxx:8443 へアクセスします。
2. Welcome PepoLinuxのHP一番下の『GUIでRemote-Handの設定をします。』を選択します。
3. Web認証画面でユーザー名：remote　パスワード：hand　でログオンします。

1. 『OenVPN管理者パスワード設定』画面で、ユーザー名：root　パスワード：kujiraでログインします。（必要であればこの画面でパスワードの変更が出来ます。）

1. 『Remote-Hand Control Pannel』で『Server Make』タブを選択
2. 『OpenVPNサーバの設定をします。』画面で各項目入力し『処理実行』ボタンでサーバの設定をします。 クライアント１～５の設定は、クライアント同士の接続する必要がある時に必要、空欄でも可 『処理実行』ボタン押下後、約３分程必要です。

1. 『Client Make』タブを選択し『OpenVPNクライアント』の設定を作成します。
2. 『OpenVPNクライアントの設定をします。』画面で各項目入力し『処理実行』ボタンでクライアントの設定します。 ここでは個別情報（ホスト名、メールアドレス）を変えてクライアント数の設定 ここで作成するクライアント名は後程のダウロードに必要です、必ず記録しておく 国名～組織名がサーバの情報と一致しないとここではエラーにならないが、接続出来ない。

1. 『Client Download』タブを選択します。
2. サーバで設定した、クライアント名を入力して『処理実行』ボタンでクライアントの設定をダウンロードします。
3. サーバの操作はこれ迄です、『Server Control』タブ選択します。
4. 『Server Control』の画面で『VPN Server起動』を選択して『処理実行』ボタンでOpenVPNを起動します。 メッセージに [ OK ] が表示されたら正常です。

クライアントの用意（WindowsXP）

1. Serverの『Client Download』でダウンロードしたファイル、例として『pepo1.zip』ファイルを『OpenVPNクライアント』へアップロードします。
2. サーバと同様にログイン後、『ClientUpload』タブを選択
3. 『クライアントの設定情報をアップロードします。』画面で『参照』ボタンで『pepo1.zip』を選択して、『処理実行』ボタンでアップロードします。

1. サーバの15,16項と同様にOpenVPNを起動します。
2. 『EthernetSetupで』タブでインターフェース『tun0』とサーバで設定した『VPNネットワーク』アドレスが表示されたらVPNサーバへ正常に接続されています。 クライアントPCのWindowsのDOSプロント画面から route add コマンドでサーバLAN側のroute情報を追加 例　route add 192.168.123.0 mask 255.255.255.0 192.168.234.128 サーバのLAN側へPINGを飛ばし確認します。
3. Serverの『Client Download』でダウンロードしたファイル、例『pepo1.zip』はWindows版のOpenVPNのクライアント設定内容も含みます。圧縮とパスワードで暗号化されているのでWindowsXPで所定のフォルダへ移動させて解凍する パスワードは『ユーザ名：パスワード』ユーザ名とパスワードを：コロンで連結したもので、初期値で『root:kujira』です。
4. 正常に稼動するのを確認してログオフして下さい。この時VPNの設定情報のみバックアップします。再起動してもVPNの設定情報は保持するがIP、routeなどは初期値へ

接続されない場合の確認

• サーバ～クライアント間にIP通信ルートとポートフォワーディングが出来ていること 『Server Control』でping、tcptracerouteテストを行う tcptracerouteテストは、デバック用にクライアントが接続出来ない時に使うものでiptablesの停止とOpenVPNの再起動が必要

• アンチウィルスの種類によりファイヤーウォールを無効にする必要がある

• クライアント・サーバが無線LANの場合、簡易設定で接続出来ない場合がある？

• 『Server Log』でシステムログの確認

• iptablesを停止してみる

参考

• サーバに対してクライアント時計が2時間程遅れると接続不可で下記エラーログを表示

• サーバから接続クライアント単独だけでなくクライント・ネットワーク全体と通信したい場合の操作
  • クライアント側のネットワークアダプタ３を『ホストオンリー』から『ブリッジ』接続へ変更
  • クライアント側のVPN接続方法を『VPN Client起動』から『VPN Server起動』へ変更して操作する
  • サーバ側の操作は変わりません

その他

• 材料）
  • VMware Player　http://www.vmware.com/jp/products/player/
  • PHPマニュアル　http://jp.php.net/manual/ja/index.php
  • タブでルック&フィールを上げる為　http://jquery.com/
  • PepLinux（1CDLINUX）Me　http://sourceforge.jp/projects/pepolinux/
• 情報源）
  • http://freescitech.net/2/ovpn2_howto_ja.html
  • http://www.stackasterisk.jp/tech/systemConstruction/openVpn01_01.jsp
  • http://openvpn.net/
  • http://allabout.co.jp/internet/javascript/closeup/CU20071220A/
• Change tracking）
  • 2009.4.7 v0.1;ファーストリリース
  • 2009.4.15 v0.2;
  1. 再起動後も変更したパスワードを保持できるように
  2. tcptracerouteテストでiptablesの自動停止/起動を手動へ
  3. HPの有効でないメニューを削除
  4. 入力されたIPなどを簡易チェック追加
  • 2009.4.26 v0.3;
  1. パスワード変更時パスワード１と２のミスマッチのチェック追加
  2. clientのアップスクリプト(nat無効)修正
  3. IPチェックミスの修正(0.0.0.0,255.255.255.255をpreg_match()で検出)
  4. サーバからクライアントのネットワーク全体と通信するオプションを追加
  5. tabの色変更、他クリーンアップ

2010.1.16 Copyright by IZAMUKARERA

http://sourceforge.jp/projects/pepolinux/

• FrontPage
• OpenMicroServer
• PepoLinux
• Remote-Hand2VPN
• Remote-Hand_DIO
• Remote-Hand_OpenMicroserver
• TitleIndex
• acm-FOMA
• chobit_prog
• chobit_prog init.d_pepodiod
• chobit_prog openoffice_calc_paste_picture
• chobit_prog pepodioctl
• chobit_prog pepodiod
• chobit_prog pepogmail4dio
• chobit_prog pepogmail4pic
• chobit_prog pepogmail_send
• chobit_prog pepopodcastget
• chobit_prog pepousb-install
• chobit_prog pepowlan
• epicon
• kernel make