ruby-dev

From: Toshihiko SHIMOKAWA / 下川俊彦 <toshi@csce.kyushu-u.ac.jp>
Subject: [ruby-dev:7300] resolver を呼ばない UDPsocket#recvfrom
Date: Mon, 12 Jul 1999 11:53:12 +0900

> あまり一般的な要望では無いのは承知していますが、採用されると嬉しいなぁ。

案の定、全く反応が無い要望ですが、今回はちとましな patch を作ってみまし
た。

UDPsocket#recvfrom_noresolv ってメソッドを追加してみました。recvfrom に
引数付けるより影響少そうかな、と思いまして。

ruby-1.3.5 への patch です。こんなんだと採用の見込みあるかしらん?
--
としちゃん

Attachments (1)

dif (3.69 KB, text/plain)

--- socket.c-dist	Thu Jun 24 13:24:06 1999
+++ socket.c	Thu Jul 15 21:08:14 1999
@@ -329,7 +329,7 @@
     return INT2FIX(n);
 }
 
-static VALUE ipaddr _((struct sockaddr *));
+static VALUE ipaddr _((struct sockaddr *, int));
 #ifdef HAVE_SYS_UN_H
 static VALUE unixaddr _((struct sockaddr_un *));
 #endif
@@ -338,6 +338,7 @@
     RECV_RECV,			/* BasicSocket#recv(no from) */
     RECV_TCP,			/* TCPSocket#recvfrom */
     RECV_UDP,			/* UDPSocket#recvfrom */
+    RECV_UDP_NORESOLV,		/* UDPSocket#recvfrom_noresolv */
     RECV_UNIX,			/* UNIXSocket#recvfrom */
     RECV_SOCKET,		/* Socket#recvfrom */
 };
@@ -397,10 +398,17 @@
 	    rb_raise(rb_eTypeError, "sockaddr size differs - should not happen");
 	}
 #endif
-	return rb_assoc_new(str, ipaddr((struct sockaddr *)buf));
+	return rb_assoc_new(str, ipaddr((struct sockaddr *)buf, 1));
       case RECV_UDP:
         {
-	    VALUE addr = ipaddr((struct sockaddr *)buf);
+	    VALUE addr = ipaddr((struct sockaddr *)buf, 1);
+
+	    return rb_assoc_new(str, rb_assoc_new(RARRAY(addr)->ptr[2],
+						  RARRAY(addr)->ptr[1]));
+	}
+      case RECV_UDP_NORESOLV:
+        {
+	    VALUE addr = ipaddr((struct sockaddr *)buf, 0);
 
 	    return rb_assoc_new(str, rb_assoc_new(RARRAY(addr)->ptr[2],
 						  RARRAY(addr)->ptr[1]));
@@ -530,8 +538,9 @@
 }
 
 static VALUE
-ipaddr(sockaddr)
+ipaddr(sockaddr, flag)
     struct sockaddr *sockaddr;
+    int flag;
 {
     VALUE family, port, addr1, addr2;
     VALUE ary;
@@ -552,17 +561,23 @@
 	family = 0;
 	break;
     }
-    error = getnameinfo(sockaddr, SA_LEN(sockaddr), hbuf, sizeof(hbuf),
-			NULL, 0, 0);
-    if (error) {
+    if (flag) {
+      error = getnameinfo(sockaddr, SA_LEN(sockaddr), hbuf, sizeof(hbuf),
+			  NULL, 0, 0);
+      if (error) {
 	rb_raise(rb_eSocket, "%s", gai_strerror(error));
+      }
+      addr1 = rb_str_new2(hbuf);
     }
-    addr1 = rb_str_new2(hbuf);
+
     error = getnameinfo(sockaddr, SA_LEN(sockaddr), hbuf, sizeof(hbuf),
 			pbuf, sizeof(pbuf), NI_NUMERICHOST | NI_NUMERICSERV);
     if (error) {
 	rb_raise(rb_eSocket, "%s", gai_strerror(error));
     }
+    if (!flag) {
+      addr1 = rb_str_new2(hbuf);
+    }
     addr2 = rb_str_new2(hbuf);
     port = INT2FIX(atoi(pbuf));
     ary = rb_ary_new3(4, family, port, addr1, addr2);
@@ -999,7 +1014,7 @@
 
     if (getsockname(fileno(fptr->f), (struct sockaddr*)&addr, &len) < 0)
 	rb_sys_fail("getsockname(2)");
-    return ipaddr((struct sockaddr *)&addr);
+    return ipaddr((struct sockaddr *)&addr, 1);
 }
 
 static VALUE
@@ -1014,7 +1029,7 @@
 
     if (getpeername(fileno(fptr->f), (struct sockaddr*)&addr, &len) < 0)
 	rb_sys_fail("getpeername(2)");
-    return ipaddr((struct sockaddr *)&addr);
+    return ipaddr((struct sockaddr *)&addr, 1);
 }
 
 static VALUE
@@ -1150,6 +1165,15 @@
     return s_recv(sock, argc, argv, RECV_UDP);
 }
 
+static VALUE
+udp_recvfrom_noresolv(argc, argv, sock)
+    int argc;
+    VALUE *argv;
+    VALUE sock;
+{
+    return s_recv(sock, argc, argv, RECV_UDP_NORESOLV);
+}
+
 #ifdef HAVE_SYS_UN_H
 static VALUE
 unix_s_sock_open(sock, path)
@@ -1528,7 +1552,7 @@
     }
     base = rb_ary_new();
     for (res = res0; res; res = res->ai_next) {
-	ary = ipaddr(res->ai_addr);
+	ary = ipaddr(res->ai_addr, 1);
 	rb_ary_push(ary, INT2FIX(res->ai_family));
 	rb_ary_push(ary, INT2FIX(res->ai_socktype));
 	rb_ary_push(ary, INT2FIX(res->ai_protocol));
@@ -1868,6 +1892,7 @@
     rb_define_method(rb_cUDPSocket, "bind", udp_bind, 2);
     rb_define_method(rb_cUDPSocket, "send", udp_send, -1);
     rb_define_method(rb_cUDPSocket, "recvfrom", udp_recvfrom, -1);
+    rb_define_method(rb_cUDPSocket, "recvfrom_noresolv", udp_recvfrom_noresolv, -1);
 
 #ifdef HAVE_SYS_UN_H
     rb_cUNIXSocket = rb_define_class("UNIXSocket", rb_cBasicSocket);

Thread

Prev Next

In This Thread

Prev Next

[#7273] [BUG] regex.c — gotoken@... (GOTO Kentaro)

[#7275] RE: ruby-gtk 0.19 patch for mswin32 — 助田 雅紀 <masaki.suketa@...>

[#7279] Re: ruby-gtk 0.19 patch for mswin32 — 助田 雅紀 <masaki.suketa@...>

[#7284] font-lock in ruby-mode.el — Shugo Maeda <shugo@...>

[#7286] Re: Subscribe confirmation request (ruby developers list) — S-Harada<jdn@...>

[#7291] dualstack-httpd.rb — gotoken@... (GOTO Kentaro)

[#7293] [BUG] Integer#/ — Shugo Maeda <shugo@...>

[#7299] Re: Subscribe confirmation request (ruby developers list) — Satoshi Nojo <nojo@...>

[#7300] resolver を呼ばない UDPsocket#recvfrom — Toshihiko SHIMOKAWA / 下川俊彦 <toshi@...>

[#7301] Re: mod_ruby/0.1.2 with Apache/1.3.6 on Solaris/2.5.1 — matz@... (Yukihiro Matsumoto)

[#7313] Ruby 1.3.5 — Yukihiro Matsumoto <matz@...>

[#7319] Sequence — gotoken@... (GOTO Kentaro)

[#7327] [PATCH] ext/extmk.rb.in, instruby.rb, lib/mkmf.rb — Katsuyuki Komatsu <komatsu@...>

[#7328] [PATCH] unused variable cleanup — Katsuyuki Komatsu <komatsu@...>

[#7334] Re: [ruby-list:15459] Re: chomp で nil が返るのは？ — Koji Arai <JCA02266@...>

[#7339] $libs in ext/extmk.rb.in, lib/mkmf.rb — WATANABE Hirofumi <watanabe@...>

[#7347] AC_OBJEXT — Katsuyuki Komatsu <komatsu@...>

[#7353] const assign — Minero Aoki <aamine@...>

[#7365] [PATCH]suppress warning, ext/tcltklib/tcltklib.c — Ryo HAYASAKA <hayasaka@...21.u-aizu.ac.jp>

[#7387] [PATCH]extconf.rb, tcltklib.c, and rubytest.rb for NetBSD — Ryo HAYASAKA <hayasaka@...21.u-aizu.ac.jp>

[#7414] /(?!.)/ — Wakou Aoyama <wakou@...>

[#7417] [BUG] Dir.glob — Koji Arai <JCA02266@...>

[#7418] jcode.rb — WATANABE Hirofumi <watanabe@...>

[#7419] File#expand_path ignore drive letter on mswin32 — Katsuyuki Komatsu <komatsu@...>

[#7424] system "command > nul" — Katsuyuki Komatsu <komatsu@...>

[#7425] make test on mswin32 — Katsuyuki Komatsu <komatsu@...>

[#7428] [PATCH] tools.rb — WATANABE Hirofumi <watanabe@...>

[#7430] [PATCH] mswin32 support — Katsuyuki Komatsu <komatsu@...>

[#7438] Re: [ruby-list:15672] Re: debugger exception handle (Re: Modified debug.rb) — keiju@... (石塚圭樹)

[#7444] dualstack-*.rb on mswin32 — Katsuyuki Komatsu <komatsu@...>

[#7453] [PATCH] reduce recursive calls to rb_eval() — EGUCHI Osamu <eguchi@...>

[#7458] compile on AIX — matz@... (Yukihiro Matsumoto)

[#7466] [PATCH] for djgpp — WATANABE Hirofumi <watanabe@...>

[#7471] Range#each — WATANABE Hirofumi <watanabe@...>

[#7476] regexp — KIMURA Koichi <kimura@...>

[#7478] constant in class_eval{} — Inaba Hiroto <inaba@...>

[#7480] ENV[] on mswin32 — Katsuyuki Komatsu <komatsu@...>

[#7489] Re: ENV[] on mswin32 — 助田 雅紀 <masaki.suketa@...>

[#7492] Re: ENV[] on mswin32 — 助田 雅紀 <masaki.suketa@...>

[#7495] Re: constant in class_eval{} — Inaba Hiroto <inaba@...>

[#7496] Re: [ruby-list:15743] ruby debugger (like gdb attach) — "NAKAMURA, Hiroshi" <nakahiro@...>

[#7500] mswin32 update — Katsuyuki Komatsu <komatsu@...>

[#7501] [PATCH] mswin32 tcltklib for Tcl/Tk 8.0jp — Katsuyuki Komatsu <komatsu@...>

[#7503] [PATCH] find_library() — Katsuyuki Komatsu <komatsu@...>

[#7508] [BUG?] install failed — Yasuhiro Fukuma <yasuf@...>

[#7510] [patch] for OS/2 — kenn@...

[#7514] RTLD_NOW or RTLD_LAZY (Re: [ruby-list:15779]) — ttate@...

[#7515] Re: ERb について — matz@... (Yukihiro Matsumoto)

[ruby-dev:7321] Re: resolver を呼ばない UDPsocket#recvfrom

Attachments (1)

Thread

In This Thread

[#7275] RE: ruby-gtk 0.19 patch for mswin32 — 助田　雅紀 <masaki.suketa@...>

[#7279] Re: ruby-gtk 0.19 patch for mswin32 — 助田　雅紀 <masaki.suketa@...>

[#7489] Re: ENV[] on mswin32 — 助田　雅紀 <masaki.suketa@...>

[#7492] Re: ENV[] on mswin32 — 助田　雅紀 <masaki.suketa@...>