せらくんの設定メモ: シリアルポート通信でATコマンド(その2)

<< Zaurusで位置情報取得してみる(その2：測地系について) | TOP | シリアルポート通信でATコマンド(その3) >>

2006年04月12日

シリアルポート通信でATコマンド(その2)

さて、シリアルプログラムでATコマンドのお時間です。

前回は、モデムを制御するATコマンドってやつは、
シリアルにASCIIでコマンドを書き込むだけらしい、ってなお話でした。
こりゃ、簡単ってな訳でその検証コードを書いてみました。

「続きを読む」にソースを貼り付けとります。

■解説
解説といってもJFのコードをぱくっとるだけですが・・・。
なんでシリアルの細かい話は分からんとです。

それでも動くからプログラムって素敵。

//#define MODEMDEVICE "/dev/ttyS1"
#define MODEMDEVICE "/dev/ttyS3"
ここは、PHSカードに位置がttyS3らしいので変更しただけっす。

write(fd , "AT@LBC1\r\n" , 9);
write(fd , "AT@LBC?\r\n" , 9);
出たー、今回の山場(これだけ)
read()で読むならwrite()で書けるだろうと。
どうせかくならATコマンドを書いてやれと。
試しにやってみたら、動いたし。ラッキー。

ここの肝は改行が\r\n(CR LF)になっているところ。
memn0ck.comさんところにありました。
発見に苦労したものの一度見つかると、"ATコマンド" LFでぐぐると簡単に見つかるし。

ちなみに、CRはキャリッジリターン(先頭に戻る)、LFはラインフィード(次の行へ)。
二つあわせて改行です。まぁ、豆知識。

//if (buf[0]=='z') STOP=TRUE;
if (buf[0]=='E'||buf[0]=='-') STOP=TRUE;
ここは、おまけです。
先頭にEか-がきたら終わればいいやみたいな。
フリーズ必死なので、Ctrl-Cを有効に活用してください。

■使い方(かなり適当)
セルフコンパイルな環境で。serial_at.cでソースに保存したとして。
$gcc -o serial_at serial_at.c
$cardctl resume
$./serial_at

■将来の展望
これでボタンひとつで緯度、経度。の野望がまた一歩近づきました。
次は、「cardctl resume」をプログラムから実行させてみたいと思います。

アディオス！情報処理試験まで、あと4日。勉強しろよ、俺・・・。
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <termios.h>
#include <stdio.h>

/* <asm/termbits.h> で定義されているボーレートの設定．これは
<termios.h>からインクルードされる． */
#define BAUDRATE B38400
/* 適切なシリアルポートを指すように，この定義を変更する．*/

////////////////->修正

//#define MODEMDEVICE "/dev/ttyS1"

#define MODEMDEVICE "/dev/ttyS3"
////////////////<-修正

#define _POSIX_SOURCE 1 /* POSIX 準拠のソース */

#define FALSE 0
#define TRUE 1

volatile int STOP=FALSE;

main()
{
int fd,c, res;
struct termios oldtio,newtio;
char buf[255];
/*
読み書きのためにモデムデバイスをオープンする．ノイズによって CTRL-C
がたまたま発生しても接続が切れないように，tty 制御はしない．
*/

fd = open(MODEMDEVICE, O_RDWR | O_NOCTTY );
if (fd <0) {perror(MODEMDEVICE); exit(-1); }

tcgetattr(fd,&oldtio); /* 現在のシリアルポートの設定を待避させる*/
bzero(&newtio, sizeof(newtio)); /* 新しいポートの設定の構造体をクリアする */

/*
BAUDRATE: ボーレートの設定．cfsetispeed と cfsetospeed も使用できる．
CRTSCTS : 出力のハードウェアフロー制御 (必要な結線が全てされているケー
ブルを使う場合のみ．Serial-HOWTO の7章を参照のこと)
CS8 : 8n1 (8 ビット，ノンパリティ，ストップビット 1)
CLOCAL : ローカル接続，モデム制御なし
CREAD : 受信文字(receiving characters)を有効にする．
*/
newtio.c_cflag = BAUDRATE | CRTSCTS | CS8 | CLOCAL | CREAD;

/*
IGNPAR : パリティエラーのデータは無視する
ICRNL : CR を NL に対応させる(これを行わないと，他のコンピュータで
CR を入力しても，入力が終りにならない)
それ以外の設定では，デバイスは raw モードである(他の入力処理は行わない)
*/
newtio.c_iflag = IGNPAR | ICRNL;

/*
Raw モードでの出力
*/
newtio.c_oflag = 0;

/*
ICANON : カノニカル入力を有効にする
全てのエコーを無効にし，プログラムに対してシグナルは送らせない
*/
newtio.c_lflag = ICANON;

/*
全ての制御文字を初期化する
デフォルト値は /usr/include/termios.h を見れば分かるが，コメントに書
いてあるので，ここでは見る必要はない．
*/
newtio.c_cc[VINTR] = 0; /* Ctrl-c */
newtio.c_cc[VQUIT] = 0; /* Ctrl-\ */
newtio.c_cc[VERASE] = 0; /* del */
newtio.c_cc[VKILL] = 0; /* @ */
newtio.c_cc[VEOF] = 4; /* Ctrl-d */
newtio.c_cc[VTIME] = 0; /* キャラクタ間タイマを使わない */
newtio.c_cc[VMIN] = 1; /* 1文字来るまで，読み込みをブロックする */
newtio.c_cc[VSWTC] = 0; /* '\0' */
newtio.c_cc[VSTART] = 0; /* Ctrl-q */
newtio.c_cc[VSTOP] = 0; /* Ctrl-s */
newtio.c_cc[VSUSP] = 0; /* Ctrl-z */
newtio.c_cc[VEOL] = 0; /* '\0' */
newtio.c_cc[VREPRINT] = 0; /* Ctrl-r */
newtio.c_cc[VDISCARD] = 0; /* Ctrl-u */
newtio.c_cc[VWERASE] = 0; /* Ctrl-w */
newtio.c_cc[VLNEXT] = 0; /* Ctrl-v */
newtio.c_cc[VEOL2] = 0; /* '\0' */

/*
モデムラインをクリアし，ポートの設定を有効にする
*/
tcflush(fd, TCIFLUSH);
tcsetattr(fd,TCSANOW,&newtio);

////////////////->追加

/*ATコマンドを入力*/
write(fd , "AT@LBC1\r\n" , 9);
write(fd , "AT@LBC?\r\n" , 9);
////////////////<-追加

/*
端末の設定終了．入力を処理するできるようになった．
例では，行の先頭に 'z' を入力することでプログラムを終了させる
*/
while (STOP==FALSE) { /* 終了条件が満たされるまでループ */
/*
255文字以上入力された場合でも，行終端文字が入力されるまでは，プロ
グラムの実行は read でブロックされる．読み込んだ文字数が，実際に入
力されている文字数より少ない場合には，次回の read で残りの文字が読
み込まれる．変数 res には実際に読み込まれた文字数がセットされる．
*/

res = read(fd,buf,255);

buf[res]=0; /* printf で使うため，文字列の終端をセットする */
printf(":%s:%d\n", buf, res);
////////////////->修正

/*先頭がEとか-だったら無事に終了という危険な仕様
まぁ、Ctrl-Cで終わればいいじゃないか*/
// if (buf[0]=='z') STOP=TRUE;

if (buf[0]=='E'||buf[0]=='-') STOP=TRUE;
////////////////<-修正

}
/* ポートの設定をプログラム開始時のものに戻す */
tcsetattr(fd,TCSANOW,&oldtio);
}

【ZAURUSなプログラミングの最新記事】

posted by せらくん at 00:46| 神奈川

| Comment(15) | TrackBack(0) | ZAURUSなプログラミング |

この記事へのコメント

Posted by Richie Alford at 2007年08月27日 17:20

sanballat stellaria forewarning chasse entoperipheral amplify mog tauriform
<a href= http://81.ibdnkxoc.com/39-228.html >Wiccan Practice</a>
http://148.ibdnkxoc.com/48-195.html
<a href= http://67.ibdnkxoc.com/47-754.html >Case For Creative Microphoto</a>
http://230.ibdnkxoc.com/30-720.html
<a href= http://222.ibdnkxoc.com/51-772.html >How To Open A Uk P.o. Box Number</a>
http://181.ibdnkxoc.com/35-73.html
<a href= http://30.ibdnkxoc.com/44-751.html >Letters From Wedding Coordinator</a>
http://21.ibdnkxoc.com/27-317.html
<a href= http://182.ibdnkxoc.com/16-894.html >Kelly Find.com</a>
http://249.ibdnkxoc.com/53-553.html

せらくんの設定メモ

Posted by Genevieve Reese at 2007年10月03日 17:43

sanballat stellaria forewarning chasse entoperipheral amplify mog tauriform
<a href= http://seaexdkj.info/264.html >Dirty Pair Images</a>
http://juovgpep.info/184.html

せらくんの設定メモ

Posted by Carl Duke at 2007年10月07日 23:52

sanballat stellaria forewarning chasse entoperipheral amplify mog tauriform
<a href= http://lxzparvn.info/53.html >53</a>
http://mzgrodbb.info/39.html

せらくんの設定メモ

Posted by Michael Mcgowan at 2007年10月11日 21:03

sanballat stellaria forewarning chasse entoperipheral amplify mog tauriform
<a href= http://szlzrsli.info/147.html >147</a>
http://heaxykdf.info/123.html

せらくんの設定メモ

Posted by Mari Burch at 2007年10月12日 23:00

sanballat stellaria forewarning chasse entoperipheral amplify mog tauriform
<a href= http://ueeibael.info/64.html >64</a>
http://gbibpjai.info/175.html

せらくんの設定メモ

Posted by Jeffrey Estes at 2007年10月14日 04:58

sanballat stellaria forewarning chasse entoperipheral amplify mog tauriform
<a href= http://tevlzlok.info/63.html >Sermons On Endurance</a>
http://cgbfszcz.info/98.html

せらくんの設定メモ

Posted by Bradley Zamora at 2007年10月16日 04:40

Posted by Michelle Mueller at 2007年10月18日 03:03

Posted by Enrique Russell at 2007年10月19日 20:15

Posted by Rich Peck at 2007年10月20日 23:07

Posted by Twila Barr at 2007年10月22日 01:08

sanballat stellaria forewarning chasse entoperipheral amplify mog tauriform
<a href= http://rckcyvav.com/0-782.html >Head Lice Eucalyptus Treatment</a>
http://rahupisf.com/7-251.html
<a href= http://yjsbsemt.com/1-158.html >Beginners Guitar Music</a>
http://jtbtgash.com/8-12.html
<a href= http://rckcyvav.com/5-220.html >Flash Memory Pcmcia Drivers</a>
http://yjsbsemt.com/2-336.html
<a href= http://jtbtgash.com/6-162.html >Tightpoker.com Poker Table</a>
http://mmxposcd.com/4-973.html
<a href= http://odxlwagm.com/6-952.html >Mother Daughter Relationship</a>
http://yjsbsemt.com/2-885.html
<a href= http://jtbtgash.com/5-34.html >Free Perfect Strangers Sitcom Clips</a>
http://jtbtgash.com/2-72.html
<a href= http://jtbtgash.com/6-790.html >Ac97 Audio Drivers</a>
http://cwtcnbjm.com/3-639.html
<a href= http://ooiatncv.com/5-939.html >Blood Potassium Levels</a>
http://jtbtgash.com/1-55.html
<a href= http://jtbtgash.com/5-436.html >Delta Force Barracks</a>
http://yjsbsemt.com/1-275.html
<a href= http://ooiatncv.com/1-759.html >The Norm</a>
http://cwtcnbjm.com/3-480.html
<a href= http://odxlwagm.com/7-620.html >Recessed Lighting Installation</a>
http://jfehzytp.com/6-702.html
<a href= http://mmxposcd.com/0-168.html >Mitsubishi Evo 8 Body Kit</a>
http://ymwyotvi.com/4-913.html
<a href= http://jfehzytp.com/1-294.html >Free Fake College Degrees</a>
http://ooiatncv.com/6-281.html
<a href= http://odxlwagm.com/3-220.html >Calculator Comparison Mortgage Rate</a>
http://yjsbsemt.com/8-31.html
<a href= http://rckcyvav.com/2-947.html >Photoshop Free Tutorials</a>
http://rckcyvav.com/3-802.html
<a href= http://cwtcnbjm.com/1-959.html >Cheap Divorce Lawyers</a>
http://jfehzytp.com/2-63.html
<a href= http://jfehzytp.com/6-727.html >English Bulldog Stud Service</a>
http://ooiatncv.com/2-199.html
<a href= http://odxlwagm.com/3-162.html >Free Leadership Essays</a>
http://jtbtgash.com/2-653.html
<a href= http://rahupisf.com/0-896.html >On Line Accounting Degree</a>
http://yjsbsemt.com/6-172.html
<a href= http://jtbtgash.com/7-480.html >Woman Russian Not</a>
http://cwtcnbjm.com/3-912.html
<a href= http://jfehzytp.com/1-389.html >Accutane Injury Attorney Ohio</a>
http://odxlwagm.com/6-184.html
<a href= http://mmxposcd.com/7-860.html >Installment Loan Amortization Schedule</a>
http://cwtcnbjm.com/0-841.html
<a href= http://rahupisf.com/1-995.html >Drive Time Map</a>
http://yjsbsemt.com/4-368.html
<a href= http://yjsbsemt.com/3-148.html >Tiger Woods Yatch</a>
http://odxlwagm.com/7-502.html
<a href= http://yjsbsemt.com/5-548.html >Baby First Birthday</a>
http://ooiatncv.com/5-5.html
<a href= http://odxlwagm.com/4-370.html >How To Make Sugar Flowers</a>
http://ymwyotvi.com/0-248.html
<a href= http://cwtcnbjm.com/6-228.html >Honda Recon 250</a>
http://cwtcnbjm.com/5-956.html
<a href= http://rahupisf.com/6-594.html >Buy Top Soil Online</a>
http://cwtcnbjm.com/7-97.html
<a href= http://ymwyotvi.com/0-554.html >Wall Magazine Racks</a>
http://odxlwagm.com/0-56.html
<a href= http://cwtcnbjm.com/6-72.html >Party Like A Rockstar Music Video</a>
http://ooiatncv.com/6-29.html

せらくんの設定メモ

Posted by Lionel Park at 2007年10月24日 20:43

Posted by Carson Larson at 2007年10月27日 02:43

Posted by Jaime Navarro at 2007年10月27日 19:10

Posted by Shelley Daniel at 2007年10月29日 01:17

コメントを書く

この記事へのトラックバックURL
http://blog.seesaa.jp/tb/16446553

この記事へのトラックバック

<< 2009年06月 >>
日	月	火	水	木	金	土
	1	2	3	4	5	6
7	8	9	10	11	12	13
14	15	16	17	18	19	20
21	22	23	24	25	26	27
28	29	30