next up previous contents
: 開発中のサーバ, クランアント : 実装, デバッグ, 検証 : 最小の TCP/IP クライアントの例   目次

クライアント asir, sm1

sm1 については, ox.sm1 , oxasir.sm1 がクライアントパッケージ. ox, ox_asir, ox_sm1 の存在するパス, および sm1 より呼び出すための asir の関数定義である oxasir.asir のあるパスを これらのパッケージに書き込んでおく必要がある.

ox_asir は, asir なる名前でよばれると asir として動作し, ox_asir なる名前でよばれると, open XM サーバとして動作する. /usr/local/lib/asir または ASIR_LIBDIRox_asir 実体をおき, ox_launch をおなじディレクトリへ ox_asir へのシンボリックリンク として作成する. コマンドサーチパスにあるディレクトリへ asirox_asir へのシンボリックリンクとして作成する.

This is Asir, Version 990413.
Copyright (C) FUJITSU LABORATORIES LIMITED.
3 March 1994. All rights reserved.
0
[324] ox_launch(0,"/usr/local/lib/asir/ox_asir");
1      <=== これがサーバの番号.
[326] ox_execute_string(1,"fctr(x^10-1);");
0
[327] ox_pop_local(1);
[[1,1],[x-1,1],[x+1,1],[x^4+x^3+x^2+x+1,1],[x^4-x^3+x^2-x+1,1]]
[328] ox_execute_string(1,"dp_ptod((x+y)^5,[x,y]);");
0
[329] ox_pop_cmo(1);
(1)*<<5,0>>+(5)*<<4,1>>+(10)*<<3,2>>+(10)*<<2,3>>+(5)*<<1,4>>+(1)*<<0,5>>
[330] ox_rpc(1,"fctr",x^10-y^10);
0
[331] ox_pop_local(1);
[[1,1],[x^4-y*x^3+y^2*x^2-y^3*x+y^4,1],[x^4+y*x^3+y^2*x^2+y^3*x+y^4,1],[x+y,1],[x-y,1]]
[332] ox_rpc(1,"fctr",x^1000-y^1000);   ox_cmo_rpc もあり.
0
[333] ox_flush(1);
1
[334] ox_pop_local(1);
0

ox_sync(1);   --- sync ball を送る.



Nobuki Takayama 平成28年8月27日