Logo Search packages:      
Sourcecode: ksh version File versions

fds.c

/***********************************************************************
*                                                                      *
*               This software is part of the ast package               *
*           Copyright (c) 1992-2007 AT&T Knowledge Ventures            *
*                      and is licensed under the                       *
*                  Common Public License, Version 1.0                  *
*                      by AT&T Knowledge Ventures                      *
*                                                                      *
*                A copy of the License is available at                 *
*            http://www.opensource.org/licenses/cpl1.0.txt             *
*         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
*                                                                      *
*              Information and Software Systems Research               *
*                            AT&T Research                             *
*                           Florham Park NJ                            *
*                                                                      *
*                 Glenn Fowler <gsf@research.att.com>                  *
*                  David Korn <dgk@research.att.com>                   *
*                                                                      *
***********************************************************************/
#pragma prototyped

static const char usage[] =
"[-?\n@(#)$Id: fds (AT&T Research) 2007-05-09 $\n]"
USAGE_LICENSE
"[+NAME?fds - list open file descriptor status]"
"[+DESCRIPTION?\bfds\b lists the status for each open file descriptor. "
    "When invoked as a shell builtin it accesses the file descriptors of the "
    "calling shell, otherwise it lists the file descriptors passed across "
    "\bexec\b(2).]"
"[l:long?List file descriptor details.]"
"[+SEE ALSO?\blogname\b(1), \bwho\b(1), \bgetgroups\b(2), \bgetsockname\b(2), \bgetsockopts\b(2), ]"
;

#include <cmd.h>
#include <ls.h>

#include "FEATURE/sockets"

#if defined(S_IFSOCK) && _sys_socket && _hdr_arpa_inet && _hdr_netinet_in && _lib_getsockname && _lib_getsockopt && _lib_inet_ntoa
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#else
#undef      S_IFSOCK
#endif

#ifndef minor
#define minor(x)  (int)((x)&0xff)
#endif
#ifndef major
#define major(x)  (int)(((unsigned int)(x)>>8)&0xff)
#endif

#undef      getconf
#define getconf(x)      strtol(astconf(x,NiL,NiL),NiL,0)

#ifdef S_IFSOCK

typedef struct NV_s
{
      const char* name;
      int         value;
} NV_t;

static const NV_t family[] =
{
#ifdef AF_LOCAL
      "pipe",     AF_LOCAL,
#endif
#ifdef AF_UNIX
      "pipe",           AF_UNIX,
#endif
#ifdef AF_FILE
      "FILE",           AF_FILE,
#endif
#ifdef AF_INET
      "INET",           AF_INET,
#endif
#ifdef AF_AX25
      "AX25",           AF_AX25,
#endif
#ifdef AF_IPX
      "IPX",            AF_IPX,
#endif
#ifdef AF_APPLETALK
      "APPLETALK",      AF_APPLETALK,
#endif
#ifdef AF_NETROM
      "NETROM",   AF_NETROM,
#endif
#ifdef AF_BRIDGE
      "BRIDGE",   AF_BRIDGE,
#endif
#ifdef AF_ATMPVC
      "ATMPVC",   AF_ATMPVC,
#endif
#ifdef AF_X25
      "X25",            AF_X25,
#endif
#ifdef AF_INET6
      "INET6",    AF_INET6,
#endif
#ifdef AF_ROSE
      "ROSE",           AF_ROSE,
#endif
#ifdef AF_DECnet
      "DECnet",   AF_DECnet,
#endif
#ifdef AF_NETBEUI
      "NETBEUI",  AF_NETBEUI,
#endif
#ifdef AF_SECURITY
      "SECURITY", AF_SECURITY,
#endif
#ifdef AF_KEY
      "KEY",            AF_KEY,
#endif
#ifdef AF_NETLINK
      "NETLINK",  AF_NETLINK,
#endif
#ifdef AF_ROUTE
      "ROUTE",    AF_ROUTE,
#endif
#ifdef AF_PACKET
      "PACKET",   AF_PACKET,
#endif
#ifdef AF_ASH
      "ASH",            AF_ASH,
#endif
#ifdef AF_ECONET
      "ECONET",   AF_ECONET,
#endif
#ifdef AF_ATMSVC
      "ATMSVC",   AF_ATMSVC,
#endif
#ifdef AF_SNA
      "SNA",            AF_SNA,
#endif
#ifdef AF_IRDA
      "IRDA",           AF_IRDA,
#endif
#ifdef AF_PPPOX
      "PPPOX",    AF_PPPOX,
#endif
#ifdef AF_WANPIPE
      "WANPIPE",  AF_WANPIPE,
#endif
#ifdef AF_BLUETOOTH
      "BLUETOOTH",      AF_BLUETOOTH,
#endif
      0
};

#endif

int
b_fds(int argc, char** argv, void* context)
{
      register char*          s;
      register int            i;
      register char*          m;
      register char*          x;
      int               flags;
      int               details;
      int               open_max;
      struct stat       st;
#ifdef S_IFSOCK
      struct sockaddr_in      addr;
      char*             a;
      unsigned char*          b;
      unsigned char*          e;
      socklen_t         addrlen;
      socklen_t         len;
      int               type;
      int               port;
      int               prot;
      char              nam[256];
      char              num[64];
      char              fam[64];
#endif

      cmdinit(argc, argv, context, ERROR_CATALOG, 0);
      details = 0;
      for (;;)
      {
            switch (optget(argv, usage))
            {
            case 'l':
                  details = opt_info.num;
                  continue;
            case '?':
                  error(ERROR_USAGE|4, "%s", opt_info.arg);
                  continue;
            case ':':
                  error(2, "%s", opt_info.arg);
                  continue;
            }
            break;
      }
      argv += opt_info.index;
      if (error_info.errors || *argv)
            error(ERROR_USAGE|4, "%s", optusage(NiL));
      if ((open_max = getconf("OPEN_MAX")) <= 0)
            open_max = OPEN_MAX;
      for (i = 0; i <= open_max; i++)
      {
            if (fstat(i, &st))
            {
                  /* not open */
                  continue;
            }
            if (!details)
            {
                  sfprintf(sfstdout, "%d\n", i);
                  continue;
            }
            if ((flags = fcntl(i, F_GETFL, (char*)0)) == -1)
                  m = "--";
            else
                  switch (flags & (O_RDONLY|O_WRONLY|O_RDWR))
                  {
                  case O_RDONLY:
                        m = "r-";
                        break;
                  case O_WRONLY:
                        m = "-w";
                        break;
                  case O_RDWR:
                        m = "rw";
                        break;
                  default:
                        m = "??";
                        break;
                  }
            x = (fcntl(i, F_GETFD, (char*)0) > 0) ? "x" : "-";
            if (isatty(i) && (s = ttyname(i)))
            {
                  sfprintf(sfstdout, "%02d %s%s %s %s\n", i, m, x, fmtmode(st.st_mode, 0), s);
                  continue;
            }
#ifdef S_IFSOCK
            addrlen = sizeof(addr);
            memset(&addr, 0, addrlen);
            if (!getsockname(i, (struct sockaddr*)&addr, (void*)&addrlen))
            {
                  type = 0;
                  prot = 0;
#ifdef SO_TYPE
                  len = sizeof(type);
                  if (getsockopt(i, SOL_SOCKET, SO_TYPE, (void*)&type, (void*)&len))
                        type = -1;
#endif
#ifdef SO_PROTOTYPE
                  len = sizeof(prot);
                  if (getsockopt(i, SOL_SOCKET, SO_PROTOTYPE, (void*)&prot, (void*)&len))
                        prot = -1;
#endif
                  if (!st.st_mode)
                        st.st_mode = S_IFSOCK|S_IRUSR|S_IWUSR;
                  s = 0;
                  switch (type)
                  {
                  case SOCK_DGRAM:
                        switch (addr.sin_family)
                        {
                        case AF_INET:
#ifdef AF_INET6
                        case AF_INET6:
#endif
                              s = "udp";
                              break;
                        }
                        break;
                  case SOCK_STREAM:
                        switch (addr.sin_family)
                        {
                        case AF_INET:
#ifdef AF_INET6
                        case AF_INET6:
#endif
#ifdef IPPROTO_SCTP
                              if (prot == IPPROTO_SCTP)
                                    s = "sctp";
                              else
#endif
                                    s = "tcp";
                              break;
                        }
                        break;
#ifdef SOCK_RAW
                  case SOCK_RAW:
                        s = "raw";
                        break;
#endif
#ifdef SOCK_RDM
                  case SOCK_RDM:
                        s = "rdm";
                        break;
#endif
#ifdef SOCK_SEQPACKET
                  case SOCK_SEQPACKET:
                        s = "seqpacket";
                        break;
#endif
                  }
                  if (!s)
                  {
                        for (type = 0; family[type].name && family[type].value != addr.sin_family; type++);
                        if (!(s = (char*)family[type].name))
                              sfsprintf(s = num, sizeof(num), "family.%d", addr.sin_family);
                  }
                  port = 0;
#ifdef INET6_ADDRSTRLEN
                  if (a = (char*)inet_ntop(addr.sin_family, &addr.sin_addr, nam, sizeof(nam)))
                        port = ntohs(addr.sin_port);
                  else
#endif
                  if (addr.sin_family == AF_INET)
                  {
                        a = inet_ntoa(addr.sin_addr);
                        port = ntohs(addr.sin_port);
                  }
                  else
                  {
                        a = fam;
                        e = (b = (unsigned char*)&addr) + addrlen;
                        while (b < e && a < &fam[sizeof(fam)-1])
                              a += sfsprintf(a, &fam[sizeof(fam)] - a - 1, ".%d", *b++);
                        a = fam + 1;
                  }
                  if (port)
                        sfprintf(sfstdout, "%02d %s%s %s /dev/%s/%s/%d\n", i, m, x, fmtmode(st.st_mode, 0), s, a, port);
                  else
                        sfprintf(sfstdout, "%02d %s%s %s /dev/%s/%s\n", i, m, x, fmtmode(st.st_mode, 0), s, a);
                  continue;
            }
#endif
            sfprintf(sfstdout, "%02d %s%s %s /dev/inode/%u/%u\n", i, m, x, fmtmode(st.st_mode, 0), st.st_dev, st.st_ino);
      }
      return 0;
}

Generated by  Doxygen 1.6.0   Back to index