3336 |
#endif /* HAVE_SOCKETS */ |
#endif /* HAVE_SOCKETS */ |
3337 |
|
|
3338 |
|
|
3339 |
#ifdef HAVE_SOCKETS |
#if defined(HAVE_SOCKETS) && defined(HAVE_NET_IF_H) && defined(HAVE_SYS_IOCTL_H) |
3340 |
|
|
3341 |
#ifdef SIOCGIFCONF |
#ifdef SIOCGIFCONF |
3342 |
DEFUN ("network-interface-list", Fnetwork_interface_list, Snetwork_interface_list, 0, 0, 0, |
DEFUN ("network-interface-list", Fnetwork_interface_list, Snetwork_interface_list, 0, 0, 0, |
3397 |
|
|
3398 |
return res; |
return res; |
3399 |
} |
} |
3400 |
#endif |
#endif /* SIOCGIFCONF */ |
3401 |
|
|
3402 |
#if defined(SIOCGIFADDR) || defined(SIOCGIFHWADDR) || defined(SIOCGIFFLAGS) |
#if defined(SIOCGIFADDR) || defined(SIOCGIFHWADDR) || defined(SIOCGIFFLAGS) |
3403 |
|
|
3483 |
return Qnil; |
return Qnil; |
3484 |
|
|
3485 |
elt = Qnil; |
elt = Qnil; |
3486 |
#ifdef SIOCGIFFLAGS |
#if defined(SIOCGIFFLAGS) && defined(ifr_flags) |
3487 |
if (ioctl (s, SIOCGIFFLAGS, &rq) == 0) |
if (ioctl (s, SIOCGIFFLAGS, &rq) == 0) |
3488 |
{ |
{ |
3489 |
int flags = rq.ifr_flags; |
int flags = rq.ifr_flags; |
3511 |
res = Fcons (elt, res); |
res = Fcons (elt, res); |
3512 |
|
|
3513 |
elt = Qnil; |
elt = Qnil; |
3514 |
#ifdef SIOCGIFHWADDR |
#if defined(SIOCGIFHWADDR) && defined(ifr_hwaddr) |
3515 |
if (ioctl (s, SIOCGIFHWADDR, &rq) == 0) |
if (ioctl (s, SIOCGIFHWADDR, &rq) == 0) |
3516 |
{ |
{ |
3517 |
Lisp_Object hwaddr = Fmake_vector (6, Qnil); |
Lisp_Object hwaddr = Fmake_vector (make_number (6), Qnil); |
3518 |
register struct Lisp_Vector *p = XVECTOR (hwaddr); |
register struct Lisp_Vector *p = XVECTOR (hwaddr); |
3519 |
int n; |
int n; |
3520 |
|
|
3527 |
res = Fcons (elt, res); |
res = Fcons (elt, res); |
3528 |
|
|
3529 |
elt = Qnil; |
elt = Qnil; |
3530 |
#ifdef SIOCGIFNETMASK |
#if defined(SIOCGIFNETMASK) && defined(ifr_netmask) |
3531 |
if (ioctl (s, SIOCGIFNETMASK, &rq) == 0) |
if (ioctl (s, SIOCGIFNETMASK, &rq) == 0) |
3532 |
{ |
{ |
3533 |
any++; |
any++; |
3537 |
res = Fcons (elt, res); |
res = Fcons (elt, res); |
3538 |
|
|
3539 |
elt = Qnil; |
elt = Qnil; |
3540 |
#ifdef SIOCGIFBRDADDR |
#if defined(SIOCGIFBRDADDR) && defined(ifr_broadaddr) |
3541 |
if (ioctl (s, SIOCGIFBRDADDR, &rq) == 0) |
if (ioctl (s, SIOCGIFBRDADDR, &rq) == 0) |
3542 |
{ |
{ |
3543 |
any++; |
any++; |
3547 |
res = Fcons (elt, res); |
res = Fcons (elt, res); |
3548 |
|
|
3549 |
elt = Qnil; |
elt = Qnil; |
3550 |
#ifdef SIOCGIFADDR |
#if defined(SIOCGIFADDR) && defined(ifr_addr) |
3551 |
if (ioctl (s, SIOCGIFADDR, &rq) == 0) |
if (ioctl (s, SIOCGIFADDR, &rq) == 0) |
3552 |
{ |
{ |
3553 |
any++; |
any++; |
6656 |
defsubr (&Sset_network_process_option); |
defsubr (&Sset_network_process_option); |
6657 |
defsubr (&Smake_network_process); |
defsubr (&Smake_network_process); |
6658 |
defsubr (&Sformat_network_address); |
defsubr (&Sformat_network_address); |
6659 |
|
#endif /* HAVE_SOCKETS */ |
6660 |
|
#if defined(HAVE_SOCKETS) && defined(HAVE_NET_IF_H) && defined(HAVE_SYS_IOCTL_H) |
6661 |
#ifdef SIOCGIFCONF |
#ifdef SIOCGIFCONF |
6662 |
defsubr (&Snetwork_interface_list); |
defsubr (&Snetwork_interface_list); |
6663 |
#endif |
#endif |
6664 |
#if defined(SIOCGIFADDR) || defined(SIOCGIFHWADDR) || defined(SIOCGIFFLAGS) |
#if defined(SIOCGIFADDR) || defined(SIOCGIFHWADDR) || defined(SIOCGIFFLAGS) |
6665 |
defsubr (&Snetwork_interface_info); |
defsubr (&Snetwork_interface_info); |
6666 |
#endif |
#endif |
6667 |
#endif /* HAVE_SOCKETS */ |
#endif /* HAVE_SOCKETS ... */ |
6668 |
#ifdef DATAGRAM_SOCKETS |
#ifdef DATAGRAM_SOCKETS |
6669 |
defsubr (&Sprocess_datagram_address); |
defsubr (&Sprocess_datagram_address); |
6670 |
defsubr (&Sset_process_datagram_address); |
defsubr (&Sset_process_datagram_address); |