[View] [Edit] [Attachments] [History] [Home] [Changes] [Search] [Help]

Squeak でネットワーク(サーバソケット)

単純なサーバ

さて、サーバ側はどうなっているでしょうか?
このプログラムを do it して、ブラウザで http://localhost:8000/ を開けてみてください。
| sock crLf |
sock := Socket newTCP.
crLf := {Character cr. Character lf}.
sock listenOn: 8000.                                "8000番ポートで待ち受ける"
sock waitForConnectionFor: Socket standardDeadline. "誰かがアクセスしてくるのを待つ"
sock sendData: 'HTTP/1.0 200 OK', crLf, crLf.       "ヘッダ出力(お約束)"
sock sendData: '<b>', sock receiveData, '</b>'.     "ブラウザのヘッダを鸚鵡返し"
sock close.

クライアントと違って、サーバはポートを指定してクライアントを待ち受けます。
それが listenOn: というメソッドです。後は大体クライアントと同じです。
このサーバには欠点があります。それは、一度に一人しかアクセス出来ない事です。

Links to this Page

propella home