8 ID name = intern_const(constant);
162 unsigned char i = (
unsigned char)
NUM2CHR(vint);
254 int i =
RTEST(vbool) ? 1 : 0;
278 if (len !=
sizeof(
int))
280 (
int)
sizeof(
int), (
long)len);
304 memset(&l, 0,
sizeof(l));
308 l.l_onoff =
RTEST(vonoff) ? 1 : 0;
331 if (
level != SOL_SOCKET || optname != SO_LINGER)
335 (
int)
sizeof(
struct linger), (
long)
RSTRING_LEN(data));
336 memcpy((
char*)&l,
RSTRING_PTR(data),
sizeof(
struct linger));
338 case 0: vonoff =
Qfalse;
break;
339 case 1: vonoff =
Qtrue;
break;
340 default: vonoff =
INT2NUM(l.l_onoff);
break;
364 #if defined(IPPROTO_IP) && defined(IP_MULTICAST_LOOP) 365 # if defined(__NetBSD__) || defined(__OpenBSD__) 373 # error IPPROTO_IP or IP_MULTICAST_LOOP is not implemented 393 #if defined(IPPROTO_IP) && defined(IP_MULTICAST_LOOP) 394 if (family == AF_INET &&
level == IPPROTO_IP && optname == IP_MULTICAST_LOOP) {
395 # if defined(__NetBSD__) || defined(__OpenBSD__) 406 #if defined(__NetBSD__) || defined(__OpenBSD__) 407 # define inspect_ipv4_multicast_loop(a,b,c,d) inspect_byte(a,b,c,d) 409 # define inspect_ipv4_multicast_loop(a,b,c,d) inspect_int(a,b,c,d) 427 #if defined(IPPROTO_IP) && defined(IP_MULTICAST_TTL) 428 # if defined(__NetBSD__) || defined(__OpenBSD__) 436 # error IPPROTO_IP or IP_MULTICAST_TTL is not implemented 456 #if defined(IPPROTO_IP) && defined(IP_MULTICAST_TTL) 457 if (family == AF_INET &&
level == IPPROTO_IP && optname == IP_MULTICAST_TTL) {
458 # if defined(__NetBSD__) || defined(__OpenBSD__) 469 #if defined(__NetBSD__) || defined(__OpenBSD__) 470 # define inspect_ipv4_multicast_ttl(a,b,c,d) inspect_byte(a,b,c,d) 472 # define inspect_ipv4_multicast_ttl(a,b,c,d) inspect_int(a,b,c,d) 489 #if defined(__NetBSD__) || defined(__OpenBSD__) 519 #if defined(IPV6_MULTICAST_LOOP) 525 memcpy((
char*)&i,
RSTRING_PTR(data),
sizeof(
unsigned int));
535 #if defined(SOL_SOCKET) && defined(SO_LINGER) 545 default:
rb_str_catf(ret,
" on(%d)", s.l_onoff);
break;
556 #if defined(SOL_SOCKET) && defined(SO_TYPE) 564 id = rsock_intern_socktype(i);
583 rb_str_catf(ret,
" %ld.%06ldsec", (
long)s.tv_sec, (
long)s.tv_usec);
631 #ifndef HAVE_INET_NTOP 633 inet_ntop(
int af,
const void *addr,
char *numaddr,
size_t numaddr_len)
635 #ifdef HAVE_INET_NTOA 637 memcpy(&in.s_addr, addr,
sizeof(in.s_addr));
638 snprintf(numaddr, numaddr_len,
"%s", inet_ntoa(in));
640 unsigned long x = ntohl(*(
unsigned long*)addr);
641 snprintf(numaddr, numaddr_len,
"%d.%d.%d.%d",
642 (
int) (x>>24) & 0xff, (
int) (x>>16) & 0xff,
643 (
int) (x>> 8) & 0xff, (
int) (x>> 0) & 0xff);
647 #elif defined __MINGW64__ 648 # define inet_ntop(f,a,n,l) rb_w32_inet_ntop(f,a,n,l) 653 rb_if_indextoname(
const char *succ_prefix,
const char *fail_prefix,
unsigned int ifindex,
char *
buf,
size_t len)
655 #if defined(HAVE_IF_INDEXTONAME) 657 if (if_indextoname(ifindex, ifbuf) ==
NULL)
658 return snprintf(
buf, len,
"%s%u", fail_prefix, ifindex);
660 return snprintf(
buf, len,
"%s%s", succ_prefix, ifbuf);
663 # define IFNAMSIZ (sizeof(unsigned int)*3+1) 665 return snprintf(
buf, len,
"%s%u", fail_prefix, ifindex);
669 #if defined(IPPROTO_IP) && defined(HAVE_TYPE_STRUCT_IP_MREQ) 675 char addrbuf[INET_ADDRSTRLEN];
693 #if defined(IPPROTO_IP) && defined(HAVE_TYPE_STRUCT_IP_MREQN) 697 if (
RSTRING_LEN(data) ==
sizeof(
struct ip_mreqn)) {
699 char addrbuf[INET_ADDRSTRLEN], ifbuf[32+
IFNAMSIZ];
719 #if defined(IPPROTO_IP) && defined(HAVE_TYPE_STRUCT_IP_MREQ) 721 inspect_ipv4_add_drop_membership(
int level,
int optname,
VALUE data,
VALUE ret)
724 return inspect_ipv4_mreq(
level, optname, data, ret);
725 # if defined(HAVE_TYPE_STRUCT_IP_MREQN) 726 else if (
RSTRING_LEN(data) ==
sizeof(
struct ip_mreqn))
727 return inspect_ipv4_mreqn(
level, optname, data, ret);
734 #if defined(IPPROTO_IP) && defined(IP_MULTICAST_IF) && defined(HAVE_TYPE_STRUCT_IP_MREQN) 736 inspect_ipv4_multicast_if(
int level,
int optname,
VALUE data,
VALUE ret)
740 char addrbuf[INET_ADDRSTRLEN];
748 else if (
RSTRING_LEN(data) ==
sizeof(
struct ip_mreqn)) {
749 return inspect_ipv4_mreqn(
level, optname, data, ret);
757 #if defined(IPV6_MULTICAST_IF) 759 inspect_ipv6_multicast_if(
int level,
int optname,
VALUE data,
VALUE ret)
763 unsigned int ifindex;
764 memcpy((
char*)&ifindex,
RSTRING_PTR(data),
sizeof(
unsigned int));
775 #if defined(IPPROTO_IPV6) && defined(HAVE_TYPE_STRUCT_IPV6_MREQ) 779 if (
RSTRING_LEN(data) ==
sizeof(
struct ipv6_mreq)) {
781 char addrbuf[INET6_ADDRSTRLEN], ifbuf[32+
IFNAMSIZ];
797 #if defined(SOL_SOCKET) && defined(SO_PEERCRED) 798 #if defined(__OpenBSD__) 799 #define RUBY_SOCK_PEERCRED struct sockpeercred 801 #define RUBY_SOCK_PEERCRED struct ucred 806 if (
RSTRING_LEN(data) ==
sizeof(RUBY_SOCK_PEERCRED)) {
807 RUBY_SOCK_PEERCRED cred;
808 memcpy(&cred,
RSTRING_PTR(data),
sizeof(RUBY_SOCK_PEERCRED));
810 (
unsigned)cred.pid, (
unsigned)cred.uid, (
unsigned)cred.gid);
820 #if defined(LOCAL_PEERCRED) 826 memcpy(&cred,
RSTRING_PTR(data),
sizeof(
struct xucred));
827 if (cred.cr_version != XUCRED_VERSION)
831 if (cred.cr_ngroups) {
833 const char *sep =
" groups=";
834 for (i = 0; i < cred.cr_ngroups; i++) {
867 ID family_id, level_id, optname_id;
874 family_id = rsock_intern_family_noprefix(family);
880 if (
level == SOL_SOCKET) {
883 optname_id = rsock_intern_so_optname(optname);
890 else if (family == AF_UNIX) {
893 optname_id = rsock_intern_local_optname(optname);
901 level_id = rsock_intern_iplevel(
level);
920 if (
level == SOL_SOCKET)
927 # if defined(SO_DEBUG) 930 # if defined(SO_ERROR) 933 # if defined(SO_TYPE) 934 case SO_TYPE: inspected = inspect_socktype(
level, optname, data, ret);
break;
936 # if defined(SO_ACCEPTCONN) 937 case SO_ACCEPTCONN: inspected =
inspect_int(
level, optname, data, ret);
break;
939 # if defined(SO_BROADCAST) 940 case SO_BROADCAST: inspected =
inspect_int(
level, optname, data, ret);
break;
942 # if defined(SO_REUSEADDR) 943 case SO_REUSEADDR: inspected =
inspect_int(
level, optname, data, ret);
break;
945 # if defined(SO_KEEPALIVE) 946 case SO_KEEPALIVE: inspected =
inspect_int(
level, optname, data, ret);
break;
948 # if defined(SO_OOBINLINE) 949 case SO_OOBINLINE: inspected =
inspect_int(
level, optname, data, ret);
break;
951 # if defined(SO_SNDBUF) 954 # if defined(SO_RCVBUF) 957 # if defined(SO_DONTROUTE) 958 case SO_DONTROUTE: inspected =
inspect_int(
level, optname, data, ret);
break;
960 # if defined(SO_RCVLOWAT) 961 case SO_RCVLOWAT: inspected =
inspect_int(
level, optname, data, ret);
break;
963 # if defined(SO_SNDLOWAT) 964 case SO_SNDLOWAT: inspected =
inspect_int(
level, optname, data, ret);
break;
966 # if defined(SO_LINGER) 967 case SO_LINGER: inspected = inspect_linger(
level, optname, data, ret);
break;
969 # if defined(SO_RCVTIMEO) 972 # if defined(SO_SNDTIMEO) 975 # if defined(SO_PEERCRED) 976 case SO_PEERCRED: inspected = inspect_peercred(
level, optname, data, ret);
break;
988 # if defined(IPPROTO_IP) 991 # if defined(IP_MULTICAST_IF) && defined(HAVE_TYPE_STRUCT_IP_MREQN) 992 case IP_MULTICAST_IF: inspected = inspect_ipv4_multicast_if(
level, optname, data, ret);
break;
994 # if defined(IP_ADD_MEMBERSHIP) 995 case IP_ADD_MEMBERSHIP: inspected = inspect_ipv4_add_drop_membership(
level, optname, data, ret);
break;
997 # if defined(IP_DROP_MEMBERSHIP) 998 case IP_DROP_MEMBERSHIP: inspected = inspect_ipv4_add_drop_membership(
level, optname, data, ret);
break;
1000 # if defined(IP_MULTICAST_LOOP) 1003 # if defined(IP_MULTICAST_TTL) 1010 # if defined(IPPROTO_IPV6) 1013 # if defined(IPV6_MULTICAST_HOPS) 1014 case IPV6_MULTICAST_HOPS: inspected =
inspect_int(
level, optname, data, ret);
break;
1016 # if defined(IPV6_MULTICAST_IF) 1017 case IPV6_MULTICAST_IF: inspected = inspect_ipv6_multicast_if(
level, optname, data, ret);
break;
1019 # if defined(IPV6_MULTICAST_LOOP) 1020 case IPV6_MULTICAST_LOOP: inspected = inspect_uint(
level, optname, data, ret);
break;
1022 # if defined(IPV6_JOIN_GROUP) 1023 case IPV6_JOIN_GROUP: inspected = inspect_ipv6_mreq(
level, optname, data, ret);
break;
1025 # if defined(IPV6_LEAVE_GROUP) 1026 case IPV6_LEAVE_GROUP: inspected = inspect_ipv6_mreq(
level, optname, data, ret);
break;
1028 # if defined(IPV6_UNICAST_HOPS) 1029 case IPV6_UNICAST_HOPS: inspected =
inspect_int(
level, optname, data, ret);
break;
1031 # if defined(IPV6_V6ONLY) 1032 case IPV6_V6ONLY: inspected =
inspect_int(
level, optname, data, ret);
break;
1038 # if defined(IPPROTO_TCP) 1041 # if defined(TCP_NODELAY) 1042 case TCP_NODELAY: inspected =
inspect_int(
level, optname, data, ret);
break;
1050 #ifdef HAVE_SYS_UN_H 1055 # if defined(LOCAL_PEERCRED) 1056 case LOCAL_PEERCRED: inspected = inspect_local_peercred(
level, optname, data, ret);
break;
static VALUE sockopt_unpack(VALUE self, VALUE template)
static VALUE sockopt_family_m(VALUE self)
static VALUE sockopt_bool(VALUE self)
void rb_define_singleton_method(VALUE obj, const char *name, VALUE(*func)(ANYARGS), int argc)
Defines a singleton method for obj.
static int rb_if_indextoname(const char *succ_prefix, const char *fail_prefix, unsigned int ifindex, char *buf, size_t len)
static VALUE sockopt_inspect(VALUE self)
static VALUE optname_to_sym(int level, int optname)
static int inspect_timeval_as_interval(int level, int optname, VALUE data, VALUE ret)
static VALUE sockopt_linger(VALUE self)
VALUE rb_funcall(VALUE, ID, int,...)
Calls a method.
VALUE rb_define_class_under(VALUE outer, const char *name, VALUE super)
Defines a class under the namespace of outer.
void rb_raise(VALUE exc, const char *fmt,...)
VALUE rb_check_to_integer(VALUE, const char *)
const char * rb_obj_classname(VALUE)
#define NEWOBJ_OF(obj, type, klass, flags)
static VALUE sockopt_level_m(VALUE self)
static VALUE sockopt_ipv4_multicast_ttl(VALUE self)
static VALUE sockopt_data(VALUE self)
int rsock_family_arg(VALUE domain)
VALUE rsock_sockopt_new(int family, int level, int optname, VALUE data)
static VALUE sockopt_initialize(VALUE self, VALUE vfamily, VALUE vlevel, VALUE voptname, VALUE data)
RUBY_EXTERN VALUE rb_cObject
static int inspect_errno(int level, int optname, VALUE data, VALUE ret)
static VALUE sockopt_s_bool(VALUE klass, VALUE vfamily, VALUE vlevel, VALUE voptname, VALUE vbool)
VALUE rb_str_cat2(VALUE, const char *)
int rsock_level_arg(int family, VALUE level)
#define inspect_ipv4_multicast_loop(a, b, c, d)
static VALUE constant_to_sym(int constant, ID(*intern_const)(int))
static int sockopt_optname(VALUE self)
static VALUE sockopt_s_byte(VALUE klass, VALUE vfamily, VALUE vlevel, VALUE voptname, VALUE vint)
VALUE rb_sprintf(const char *format,...)
VALUE rb_ivar_set(VALUE, ID, VALUE)
unsigned char buf[MIME_BUF_SIZE]
VALUE rb_assoc_new(VALUE car, VALUE cdr)
static const char * inet_ntop(int af, const void *addr, char *numaddr, size_t numaddr_len)
static VALUE sockopt_ipv4_multicast_loop(VALUE self)
static VALUE sockopt_optname_m(VALUE self)
static int inspect_int(int level, int optname, VALUE data, VALUE ret)
static VALUE sockopt_int(VALUE self)
static VALUE sockopt_s_int(VALUE klass, VALUE vfamily, VALUE vlevel, VALUE voptname, VALUE vint)
VALUE rb_str_catf(VALUE str, const char *format,...)
static VALUE sockopt_s_ipv4_multicast_loop(VALUE klass, VALUE value)
RUBY_EXTERN char * strerror(int)
static VALUE sockopt_s_linger(VALUE klass, VALUE vonoff, VALUE vsecs)
int rsock_optname_arg(int family, int level, VALUE optname)
const char * rb_id2name(ID id)
static int sockopt_level(VALUE self)
void rsock_init_sockopt(void)
#define inspect_ipv4_multicast_ttl(a, b, c, d)
static VALUE sockopt_byte(VALUE self)
static VALUE sockopt_s_ipv4_multicast_ttl(VALUE klass, VALUE value)
void rb_define_method(VALUE klass, const char *name, VALUE(*func)(ANYARGS), int argc)
VALUE rb_str_append(VALUE, VALUE)
VALUE rb_attr_get(VALUE, ID)
VALUE rb_str_new(const char *, long)