2014年11月18日火曜日

開発環境

Head First C ―頭とからだで覚えるCの基本(David Griffiths (著)、Dawn Griffiths (著) 中田 秀基(監訳)(翻訳)、木下 哲也 (翻訳)、オライリージャパン)の11章(ソケットとネットワーキング: 127.0.0.1という場所はない)、自分で考えてみよう(p.487)を解いてみる。

その他参考書籍

自分で考えてみよう(p.487)

コード(BBEdit, Emacs)

sample487.c

#include <string.h>

#include "sample478.h"

int main(int argc, char *argv[])
{
  char buf[255];
  struct sockaddr_storage client_addr;
  unsigned int address_size = sizeof(client_addr);
  int connect_d;
  pid_t pid;

  listener_d = open_listener_socket();
  bind_to_port(listener_d, 30000);
  if (listen(listener_d, 10) == -1)
    error("接続待ちを設定できません");
  puts("接続を待っています");
  while (1) {
    connect_d = accept(listener_d, (struct sockaddr *)&client_addr,
                       &address_size);
    if (connect_d == -1)
      error("クライアントからの接続を受け入れることができませんでした");
    pid = fork();
    if (!pid) {
      close(listener_d);
      say(connect_d, "Knock!Knock!\r\n");
      if (read_in(connect_d, buf, sizeof(buf)) == -1)
        error("クライアントからの読み込みに失敗しました");
      if (strncmp(buf, "Who's there?", 12) == 0) {
        say(connect_d, "Oscar\r\n");
        if (read_in(connect_d, buf, sizeof(buf)) == -1)
          error("クライアントからの読み込みに失敗しました");
        if (strncmp(buf, "Oscar who?", 10) == 0)
          say(connect_d, "oscar silly question, you get a silly answer\r\n");
      }
      close(connect_d);
      exit(0);
    }
    close(connect_d);
  }
  return 0;
}

Makefile

P=sample487
CC=cc
CFLAGS=-g -Wall  # -O3
SRC=
OBJ=~/root/object_files/*.o $(P).o
LDLIBS=

$(P): $(OBJ) $(P).o
 $(CC) $(CFLAGS) $(LDLIBS) $(OBJ) -o $@

$(P).o: $(P).c
 $(CC) $(CFLAGS) -c $(P).c -o $@

入出力結果(Terminal)

サーバー

$ make
cc -g -Wall   -c sample487.c -o sample487.o
cc -g -Wall    ~/root/object_files/*.o sample487.o sample478.o -o sample487
$ ./sample487
接続を待っています
^C
$

クライアント1

$ telnet localhost 30000
Trying ::1...
telnet: connect to address ::1: Connection refused
Trying 127.0.0.1...
Connected to localhost.
Escape character is '^]'.
Knock!Knock!
Who's there?
Oscar
Oscar who?
oscar silly question, you get a silly answer
Connection closed by foreign host.
$ 

クライアント2

$ telnet 127.0.0.1 30000
Trying ::1...
telnet: connect to address ::1: Connection refused
Trying 127.0.0.1...
Connected to localhost.
Escape character is '^]'.
Knock!Knock!
Who's there?
Oscar
Oscar who?
oscar silly question, you get a silly answer
Connection closed by foreign host.
$ 

0 コメント:

コメントを投稿