# PaCkAgE DaTaStReAm libxtrans 1 610 # end of header 070701000a5312000081a40000000000000000000000014f868429000001280000010000010007ffffffffffffffff0000001200000000libxtrans/pkginfoPKG=libxtrans NAME=libxtrans 1.2.7 SPARC 64bit Solaris 10 VERSION=1.2.7 PSTAMP=12th April 2012 VENDOR=X.org EMAIL=http://cgit.freedesktop.org/xorg/lib/libxtrans/ DESC=X.org X11 network transport layer library ARCH=sparc CATEGORY=utility CLASSES=none BASEDIR=/ ISTATES=S s 1 2 3 RSTATES=S s 1 2 3 070701000a5311000081a40000000000000000000000014f868429000005b40000010000010007ffffffffffffffff0000001100000000libxtrans/pkgmap: 1 610 1 d none /usr ? ? ? 1 d none /usr/local ? ? ? 1 d none /usr/local/include 0755 root root 1 d none /usr/local/include/X11 0755 root root 1 d none /usr/local/include/X11/Xtrans 0755 root root 1 f none /usr/local/include/X11/Xtrans/Xtrans.c 0644 root root 29380 37005 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtrans.h 0644 root root 9456 10857 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtransint.h 0644 root root 10384 10138 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtranslcl.c 0644 root root 56523 54781 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtranssock.c 0644 root root 60143 36456 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtranstli.c 0644 root root 32020 61792 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtransutil.c 0644 root root 15382 4917 1334215704 1 f none /usr/local/include/X11/Xtrans/transport.c 0644 root root 2925 43710 1334215704 1 d none /usr/local/share 0755 root root 1 d none /usr/local/share/aclocal 0755 root root 1 f none /usr/local/share/aclocal/xtrans.m4 0644 root root 5126 19027 1334215704 1 d none /usr/local/share/doc 0755 root root 1 d none /usr/local/share/doc/xtrans 0755 root root 1 f none /usr/local/share/doc/xtrans/xtrans.xml 0644 root root 40724 38433 1334215704 1 d none /usr/local/share/pkgconfig 0755 root root 1 f none /usr/local/share/pkgconfig/xtrans.pc 0644 root root 237 20884 1334215704 1 i checkinstall 785 2565 1334215720 1 i pkginfo 296 23575 1334215721 07070100000000000000000000000000000000000000010000000000000000000000000000000000000000000000000000000b00000000TRAILER!!!070701000a5312000081a40000000000000000000000014f868429000001280000010000010007ffffffffffffffff0000000800000000pkginfoPKG=libxtrans NAME=libxtrans 1.2.7 SPARC 64bit Solaris 10 VERSION=1.2.7 PSTAMP=12th April 2012 VENDOR=X.org EMAIL=http://cgit.freedesktop.org/xorg/lib/libxtrans/ DESC=X.org X11 network transport layer library ARCH=sparc CATEGORY=utility CLASSES=none BASEDIR=/ ISTATES=S s 1 2 3 RSTATES=S s 1 2 3 070701000a5311000081a40000000000000000000000014f868429000005b40000010000010007ffffffffffffffff0000000700000000pkgmap: 1 610 1 d none /usr ? ? ? 1 d none /usr/local ? ? ? 1 d none /usr/local/include 0755 root root 1 d none /usr/local/include/X11 0755 root root 1 d none /usr/local/include/X11/Xtrans 0755 root root 1 f none /usr/local/include/X11/Xtrans/Xtrans.c 0644 root root 29380 37005 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtrans.h 0644 root root 9456 10857 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtransint.h 0644 root root 10384 10138 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtranslcl.c 0644 root root 56523 54781 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtranssock.c 0644 root root 60143 36456 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtranstli.c 0644 root root 32020 61792 1334215704 1 f none /usr/local/include/X11/Xtrans/Xtransutil.c 0644 root root 15382 4917 1334215704 1 f none /usr/local/include/X11/Xtrans/transport.c 0644 root root 2925 43710 1334215704 1 d none /usr/local/share 0755 root root 1 d none /usr/local/share/aclocal 0755 root root 1 f none /usr/local/share/aclocal/xtrans.m4 0644 root root 5126 19027 1334215704 1 d none /usr/local/share/doc 0755 root root 1 d none /usr/local/share/doc/xtrans 0755 root root 1 f none /usr/local/share/doc/xtrans/xtrans.xml 0644 root root 40724 38433 1334215704 1 d none /usr/local/share/pkgconfig 0755 root root 1 f none /usr/local/share/pkgconfig/xtrans.pc 0644 root root 237 20884 1334215704 1 i checkinstall 785 2565 1334215720 1 i pkginfo 296 23575 1334215721 070701000a532a000041ed0000000000000000000000024f868429000000000000010000010007ffffffffffffffff0000000800000000install070701000a532b000081ed0000000000000000000000014f868428000003110000010000010007ffffffffffffffff0000001500000000install/checkinstall#!/bin/sh # expected_bits="64" expected_release="5.10" expected_platform="sparc" # release=`uname -r` platform=`uname -p` bits=`isainfo -b` # if [ ${platform} != ${expected_platform} ]; then echo "\n\n\n\tThis package must be installed on a ${expected_platform} architecture\n" echo "\tAborting installation.\n\n\n" exit 1 fi if [ ${release} != ${expected_release} ]; then echo "\n\n\n\tThis package must be installed on a ${expected_release} machine\n" echo "\tAborting installation.\n\n\n" exit 1 fi if [ ${bits} != ${expected_bits} ]; then echo "\n\n\n\tThis package must be installed on a ${expected_bits} bit machine\n" echo "\tYour machine is running a ${bits} bit O.S. currently\n" echo "\tAborting installation.\n\n\n" exit 1 fi exit 0 070701000a5313000041ed0000000000000000000000034f868429000000000000010000010007ffffffffffffffff0000000500000000root070701000a5314000041ed0000000000000000000000034f868429000000000000010000010007ffffffffffffffff0000000900000000root/usr070701000a5315000041ed0000000000000000000000044f868429000000000000010000010007ffffffffffffffff0000000f00000000root/usr/local070701000a5316000041ed0000000000000000000000034f868429000000000000010000010007ffffffffffffffff0000001700000000root/usr/local/include070701000a5317000041ed0000000000000000000000034f868429000000000000010000010007ffffffffffffffff0000001b00000000root/usr/local/include/X11070701000a5318000041ed0000000000000000000000024f868429000000000000010000010007ffffffffffffffff0000002200000000root/usr/local/include/X11/Xtrans070701000a531b000081a40000000000000000000000014f868418000028900000010000010007ffffffffffffffff0000002e00000000root/usr/local/include/X11/Xtrans/Xtransint.h/* Copyright 1993, 1994, 1998 The Open Group Permission to use, copy, modify, distribute, and sell this software and its documentation for any purpose is hereby granted without fee, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation. The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. Except as contained in this notice, the name of The Open Group shall not be used in advertising or otherwise to promote the sale, use or other dealings in this Software without prior written authorization from The Open Group. * Copyright 1993, 1994 NCR Corporation - Dayton, Ohio, USA * * All Rights Reserved * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, provided * that the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name NCR not be used in advertising * or publicity pertaining to distribution of the software without specific, * written prior permission. NCR makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. * * NCR DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN * NO EVENT SHALL NCR BE LIABLE FOR ANY SPECIAL, INDIRECT OR * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS * OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ #ifndef _XTRANSINT_H_ #define _XTRANSINT_H_ /* * XTRANSDEBUG will enable the PRMSG() macros used in the X Transport * Interface code. Each use of the PRMSG macro has a level associated with * it. XTRANSDEBUG is defined to be a level. If the invocation level is =< * the value of XTRANSDEBUG, then the message will be printed out to stderr. * Recommended levels are: * * XTRANSDEBUG=1 Error messages * XTRANSDEBUG=2 API Function Tracing * XTRANSDEBUG=3 All Function Tracing * XTRANSDEBUG=4 printing of intermediate values * XTRANSDEBUG=5 really detailed stuff #define XTRANSDEBUG 2 * * Defining XTRANSDEBUGTIMESTAMP will cause printing timestamps with each * message. */ #if !defined(XTRANSDEBUG) && defined(XTRANS_TRANSPORT_C) # define XTRANSDEBUG 1 #endif #ifdef WIN32 # define _WILLWINSOCK_ #endif #include "Xtrans.h" #ifndef _X_UNUSED /* Defined in Xfuncproto.h in xproto >= 7.0.22 */ # define _X_UNUSED /* */ #endif #ifdef XTRANSDEBUG # include #endif /* XTRANSDEBUG */ #include #ifndef WIN32 # include # include # include /* * Moved the setting of NEED_UTSNAME to this header file from Xtrans.c, * to avoid a race condition. JKJ (6/5/97) */ # if defined(_POSIX_SOURCE) || defined(USG) || defined(SVR4) || defined(__SVR4) || defined(__SCO__) # ifndef NEED_UTSNAME # define NEED_UTSNAME # endif # include # endif # define ESET(val) errno = val # define EGET() errno #else /* WIN32 */ # include /* for USHRT_MAX */ # define ESET(val) WSASetLastError(val) # define EGET() WSAGetLastError() #endif /* WIN32 */ #include #ifdef X11_t #define X_TCP_PORT 6000 #endif struct _XtransConnInfo { struct _Xtransport *transptr; int index; char *priv; int flags; int fd; char *port; int family; char *addr; int addrlen; char *peeraddr; int peeraddrlen; }; #define XTRANS_OPEN_COTS_CLIENT 1 #define XTRANS_OPEN_COTS_SERVER 2 #define XTRANS_OPEN_CLTS_CLIENT 3 #define XTRANS_OPEN_CLTS_SERVER 4 typedef struct _Xtransport { const char *TransName; int flags; #ifdef TRANS_CLIENT XtransConnInfo (*OpenCOTSClient)( struct _Xtransport *, /* transport */ char *, /* protocol */ char *, /* host */ char * /* port */ ); #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER const char ** nolisten; XtransConnInfo (*OpenCOTSServer)( struct _Xtransport *, /* transport */ char *, /* protocol */ char *, /* host */ char * /* port */ ); #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT XtransConnInfo (*OpenCLTSClient)( struct _Xtransport *, /* transport */ char *, /* protocol */ char *, /* host */ char * /* port */ ); #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER XtransConnInfo (*OpenCLTSServer)( struct _Xtransport *, /* transport */ char *, /* protocol */ char *, /* host */ char * /* port */ ); #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN XtransConnInfo (*ReopenCOTSServer)( struct _Xtransport *, /* transport */ int, /* fd */ char * /* port */ ); XtransConnInfo (*ReopenCLTSServer)( struct _Xtransport *, /* transport */ int, /* fd */ char * /* port */ ); #endif /* TRANS_REOPEN */ int (*SetOption)( XtransConnInfo, /* connection */ int, /* option */ int /* arg */ ); #ifdef TRANS_SERVER /* Flags */ # define ADDR_IN_USE_ALLOWED 1 int (*CreateListener)( XtransConnInfo, /* connection */ char *, /* port */ unsigned int /* flags */ ); int (*ResetListener)( XtransConnInfo /* connection */ ); XtransConnInfo (*Accept)( XtransConnInfo, /* connection */ int * /* status */ ); #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT int (*Connect)( XtransConnInfo, /* connection */ char *, /* host */ char * /* port */ ); #endif /* TRANS_CLIENT */ int (*BytesReadable)( XtransConnInfo, /* connection */ BytesReadable_t * /* pend */ ); int (*Read)( XtransConnInfo, /* connection */ char *, /* buf */ int /* size */ ); int (*Write)( XtransConnInfo, /* connection */ char *, /* buf */ int /* size */ ); int (*Readv)( XtransConnInfo, /* connection */ struct iovec *, /* buf */ int /* size */ ); int (*Writev)( XtransConnInfo, /* connection */ struct iovec *, /* buf */ int /* size */ ); int (*Disconnect)( XtransConnInfo /* connection */ ); int (*Close)( XtransConnInfo /* connection */ ); int (*CloseForCloning)( XtransConnInfo /* connection */ ); } Xtransport; typedef struct _Xtransport_table { Xtransport *transport; int transport_id; } Xtransport_table; /* * Flags for the flags member of Xtransport. */ #define TRANS_ALIAS (1<<0) /* record is an alias, don't create server */ #define TRANS_LOCAL (1<<1) /* local transport */ #define TRANS_DISABLED (1<<2) /* Don't open this one */ #define TRANS_NOLISTEN (1<<3) /* Don't listen on this one */ #define TRANS_NOUNLINK (1<<4) /* Don't unlink transport endpoints */ #define TRANS_ABSTRACT (1<<5) /* Use abstract sockets if available */ #define TRANS_NOXAUTH (1<<6) /* Don't verify authentication (because it's secure some other way at the OS layer) */ /* Flags to preserve when setting others */ #define TRANS_KEEPFLAGS (TRANS_NOUNLINK|TRANS_ABSTRACT) #ifdef XTRANS_TRANSPORT_C /* only provide static function prototypes when building the transport.c file that has them in */ #ifdef __clang__ /* Not all clients make use of all provided statics */ #pragma clang diagnostic push #pragma clang diagnostic ignored "-Wunused-function" #endif /* * readv() and writev() don't exist or don't work correctly on some * systems, so they may be emulated. */ #if defined(SYSV) && defined(__i386__) && !defined(__SCO__) && !defined(sun) || defined(WIN32) #define READV(ciptr, iov, iovcnt) TRANS(ReadV)(ciptr, iov, iovcnt) static int TRANS(ReadV)( XtransConnInfo, /* ciptr */ struct iovec *, /* iov */ int /* iovcnt */ ); #else #define READV(ciptr, iov, iovcnt) readv(ciptr->fd, iov, iovcnt) #endif /* CRAY || (SYSV && __i386__) || WIN32 || __sxg__ || */ #if defined(SYSV) && defined(__i386__) && !defined(__SCO__) && !defined(sun) || defined(WIN32) #define WRITEV(ciptr, iov, iovcnt) TRANS(WriteV)(ciptr, iov, iovcnt) static int TRANS(WriteV)( XtransConnInfo, /* ciptr */ struct iovec *, /* iov */ int /* iovcnt */ ); #else #define WRITEV(ciptr, iov, iovcnt) writev(ciptr->fd, iov, iovcnt) #endif /* CRAY || WIN32 || __sxg__ */ static int is_numeric ( const char * /* str */ ); #ifdef TRANS_SERVER static int trans_mkdir ( const char *, /* path */ int /* mode */ ); #endif #ifdef __clang__ #pragma clang diagnostic pop #endif /* * Some XTRANSDEBUG stuff */ #ifdef XTRANSDEBUG #include /* * The X server provides ErrorF() & VErrorF(), for other software that uses * xtrans, we provide our own simple versions. */ # if defined(XSERV_t) && defined(TRANS_SERVER) # include "os.h" # else static inline void _X_ATTRIBUTE_PRINTF(1, 0) VErrorF(const char *f, va_list args) { vfprintf(stderr, f, args); fflush(stderr); } static inline void _X_ATTRIBUTE_PRINTF(1, 2) ErrorF(const char *f, ...) { va_list args; va_start(args, f); VErrorF(f, args); va_end(args); } # endif /* xserver */ #endif /* XTRANSDEBUG */ static inline void _X_ATTRIBUTE_PRINTF(2, 3) prmsg(int lvl, const char *f, ...) { #ifdef XTRANSDEBUG va_list args; va_start(args, f); if (lvl <= XTRANSDEBUG) { int saveerrno = errno; ErrorF("%s", __xtransname); VErrorF(f, args); # ifdef XTRANSDEBUGTIMESTAMP { struct timeval tp; gettimeofday(&tp, 0); ErrorF("timestamp (ms): %d\n", tp.tv_sec * 1000 + tp.tv_usec / 1000); } # endif errno = saveerrno; } va_end(args); #endif /* XTRANSDEBUG */ } #endif /* XTRANS_TRANSPORT_C */ #endif /* _XTRANSINT_H_ */ 070701000a531d000081a40000000000000000000000014f8684180000eaef0000010000010007ffffffffffffffff0000002f00000000root/usr/local/include/X11/Xtrans/Xtranssock.c/* * Copyright (c) 2002, Oracle and/or its affiliates. All rights reserved. * * Permission is hereby granted, free of charge, to any person obtaining a * copy of this software and associated documentation files (the "Software"), * to deal in the Software without restriction, including without limitation * the rights to use, copy, modify, merge, publish, distribute, sublicense, * and/or sell copies of the Software, and to permit persons to whom the * Software is furnished to do so, subject to the following conditions: * * The above copyright notice and this permission notice (including the next * paragraph) shall be included in all copies or substantial portions of the * Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER * DEALINGS IN THE SOFTWARE. */ /* Copyright 1993, 1994, 1998 The Open Group Permission to use, copy, modify, distribute, and sell this software and its documentation for any purpose is hereby granted without fee, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation. The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. Except as contained in this notice, the name of the copyright holders shall not be used in advertising or otherwise to promote the sale, use or other dealings in this Software without prior written authorization from the copyright holders. * Copyright 1993, 1994 NCR Corporation - Dayton, Ohio, USA * * All Rights Reserved * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, provided * that the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name NCR not be used in advertising * or publicity pertaining to distribution of the software without specific, * written prior permission. NCR makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. * * NCR DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN * NO EVENT SHALL NCR BE LIABLE FOR ANY SPECIAL, INDIRECT OR * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS * OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ #include #ifdef XTHREADS #include #endif #ifndef WIN32 #if defined(TCPCONN) || defined(UNIXCONN) #include #include #include #endif #if defined(TCPCONN) || defined(UNIXCONN) #define X_INCLUDE_NETDB_H #define XOS_USE_NO_LOCKING #include #endif #ifdef UNIXCONN #ifndef X_NO_SYS_UN #include #endif #include #endif #ifndef NO_TCP_H #if defined(linux) || defined(__GLIBC__) #include #endif /* osf */ #if defined(__NetBSD__) || defined(__OpenBSD__) || defined(__FreeBSD__) || defined(__DragonFly__) #include #include #endif /* __NetBSD__ || __OpenBSD__ || __FreeBSD__ || __DragonFly__ */ #include #endif /* !NO_TCP_H */ #include #if defined(SVR4) || defined(__SVR4) #include #endif #if (defined(__i386__) && defined(SYSV)) && !defined(SCO325) && !defined(sun) #include #endif #if defined(__i386__) && defined(SYSV) #include #endif #include #else /* !WIN32 */ #include #include #include #undef close #define close closesocket #define ECONNREFUSED WSAECONNREFUSED #define EADDRINUSE WSAEADDRINUSE #define EPROTOTYPE WSAEPROTOTYPE #undef EWOULDBLOCK #define EWOULDBLOCK WSAEWOULDBLOCK #define EINPROGRESS WSAEINPROGRESS #undef EINTR #define EINTR WSAEINTR #define X_INCLUDE_NETDB_H #define XOS_USE_MTSAFE_NETDBAPI #include #endif /* WIN32 */ #if defined(SO_DONTLINGER) && defined(SO_LINGER) #undef SO_DONTLINGER #endif /* others don't need this */ #define SocketInitOnce() /**/ #ifdef linux #define HAVE_ABSTRACT_SOCKETS #endif #define MIN_BACKLOG 128 #ifdef SOMAXCONN #if SOMAXCONN > MIN_BACKLOG #define BACKLOG SOMAXCONN #endif #endif #ifndef BACKLOG #define BACKLOG MIN_BACKLOG #endif /* * This is the Socket implementation of the X Transport service layer * * This file contains the implementation for both the UNIX and INET domains, * and can be built for either one, or both. * */ typedef struct _Sockettrans2dev { const char *transname; int family; int devcotsname; int devcltsname; int protocol; } Sockettrans2dev; static Sockettrans2dev Sockettrans2devtab[] = { #ifdef TCPCONN {"inet",AF_INET,SOCK_STREAM,SOCK_DGRAM,0}, #if !defined(IPv6) || !defined(AF_INET6) {"tcp",AF_INET,SOCK_STREAM,SOCK_DGRAM,0}, #else /* IPv6 */ {"tcp",AF_INET6,SOCK_STREAM,SOCK_DGRAM,0}, {"tcp",AF_INET,SOCK_STREAM,SOCK_DGRAM,0}, /* fallback */ {"inet6",AF_INET6,SOCK_STREAM,SOCK_DGRAM,0}, #endif #endif /* TCPCONN */ #ifdef UNIXCONN {"unix",AF_UNIX,SOCK_STREAM,SOCK_DGRAM,0}, #if !defined(LOCALCONN) {"local",AF_UNIX,SOCK_STREAM,SOCK_DGRAM,0}, #endif /* !LOCALCONN */ #endif /* UNIXCONN */ }; #define NUMSOCKETFAMILIES (sizeof(Sockettrans2devtab)/sizeof(Sockettrans2dev)) #ifdef TCPCONN static int TRANS(SocketINETClose) (XtransConnInfo ciptr); #endif #ifdef UNIXCONN #if defined(X11_t) #define UNIX_PATH "/tmp/.X11-unix/X" #define UNIX_DIR "/tmp/.X11-unix" #endif /* X11_t */ #if defined(XIM_t) #define UNIX_PATH "/tmp/.XIM-unix/XIM" #define UNIX_DIR "/tmp/.XIM-unix" #endif /* XIM_t */ #if defined(FS_t) || defined(FONT_t) #define UNIX_PATH "/tmp/.font-unix/fs" #define UNIX_DIR "/tmp/.font-unix" #endif /* FS_t || FONT_t */ #if defined(ICE_t) #define UNIX_PATH "/tmp/.ICE-unix/" #define UNIX_DIR "/tmp/.ICE-unix" #endif /* ICE_t */ #if defined(TEST_t) #define UNIX_PATH "/tmp/.Test-unix/test" #define UNIX_DIR "/tmp/.Test-unix" #endif #if defined(LBXPROXY_t) #define UNIX_PATH "/tmp/.X11-unix/X" #define UNIX_DIR "/tmp/.X11-unix" #endif #endif /* UNIXCONN */ #define PORTBUFSIZE 32 #ifndef MAXHOSTNAMELEN #define MAXHOSTNAMELEN 255 #endif #if defined HAVE_SOCKLEN_T || (defined(IPv6) && defined(AF_INET6)) # define SOCKLEN_T socklen_t #elif defined(SVR4) || defined(__SVR4) || defined(__SCO__) # define SOCKLEN_T size_t #else # define SOCKLEN_T int #endif /* * These are some utility function used by the real interface function below. */ static int TRANS(SocketSelectFamily) (int first, const char *family) { int i; prmsg (3,"SocketSelectFamily(%s)\n", family); for (i = first + 1; i < NUMSOCKETFAMILIES;i++) { if (!strcmp (family, Sockettrans2devtab[i].transname)) return i; } return (first == -1 ? -2 : -1); } /* * This function gets the local address of the socket and stores it in the * XtransConnInfo structure for the connection. */ static int TRANS(SocketINETGetAddr) (XtransConnInfo ciptr) { #if defined(IPv6) && defined(AF_INET6) struct sockaddr_storage socknamev6; #else struct sockaddr_in socknamev4; #endif void *socknamePtr; SOCKLEN_T namelen; prmsg (3,"SocketINETGetAddr(%p)\n", ciptr); #if defined(IPv6) && defined(AF_INET6) namelen = sizeof(socknamev6); socknamePtr = &socknamev6; #else namelen = sizeof(socknamev4); socknamePtr = &socknamev4; #endif bzero(socknamePtr, namelen); if (getsockname (ciptr->fd,(struct sockaddr *) socknamePtr, (void *)&namelen) < 0) { #ifdef WIN32 errno = WSAGetLastError(); #endif prmsg (1,"SocketINETGetAddr: getsockname() failed: %d\n", EGET()); return -1; } /* * Everything looks good: fill in the XtransConnInfo structure. */ if ((ciptr->addr = malloc (namelen)) == NULL) { prmsg (1, "SocketINETGetAddr: Can't allocate space for the addr\n"); return -1; } #if defined(IPv6) && defined(AF_INET6) ciptr->family = ((struct sockaddr *)socknamePtr)->sa_family; #else ciptr->family = socknamev4.sin_family; #endif ciptr->addrlen = namelen; memcpy (ciptr->addr, socknamePtr, ciptr->addrlen); return 0; } /* * This function gets the remote address of the socket and stores it in the * XtransConnInfo structure for the connection. */ static int TRANS(SocketINETGetPeerAddr) (XtransConnInfo ciptr) { #if defined(IPv6) && defined(AF_INET6) struct sockaddr_storage socknamev6; #endif struct sockaddr_in socknamev4; void *socknamePtr; SOCKLEN_T namelen; #if defined(IPv6) && defined(AF_INET6) if (ciptr->family == AF_INET6) { namelen = sizeof(socknamev6); socknamePtr = &socknamev6; } else #endif { namelen = sizeof(socknamev4); socknamePtr = &socknamev4; } bzero(socknamePtr, namelen); prmsg (3,"SocketINETGetPeerAddr(%p)\n", ciptr); if (getpeername (ciptr->fd, (struct sockaddr *) socknamePtr, (void *)&namelen) < 0) { #ifdef WIN32 errno = WSAGetLastError(); #endif prmsg (1,"SocketINETGetPeerAddr: getpeername() failed: %d\n", EGET()); return -1; } /* * Everything looks good: fill in the XtransConnInfo structure. */ if ((ciptr->peeraddr = malloc (namelen)) == NULL) { prmsg (1, "SocketINETGetPeerAddr: Can't allocate space for the addr\n"); return -1; } ciptr->peeraddrlen = namelen; memcpy (ciptr->peeraddr, socknamePtr, ciptr->peeraddrlen); return 0; } static XtransConnInfo TRANS(SocketOpen) (int i, int type) { XtransConnInfo ciptr; prmsg (3,"SocketOpen(%d,%d)\n", i, type); if ((ciptr = calloc (1, sizeof(struct _XtransConnInfo))) == NULL) { prmsg (1, "SocketOpen: malloc failed\n"); return NULL; } if ((ciptr->fd = socket(Sockettrans2devtab[i].family, type, Sockettrans2devtab[i].protocol)) < 0 #ifndef WIN32 #if (defined(X11_t) && !defined(USE_POLL)) || defined(FS_t) || defined(FONT_t) || ciptr->fd >= sysconf(_SC_OPEN_MAX) #endif #endif ) { #ifdef WIN32 errno = WSAGetLastError(); #endif prmsg (2, "SocketOpen: socket() failed for %s\n", Sockettrans2devtab[i].transname); free (ciptr); return NULL; } #ifdef TCP_NODELAY if (Sockettrans2devtab[i].family == AF_INET #if defined(IPv6) && defined(AF_INET6) || Sockettrans2devtab[i].family == AF_INET6 #endif ) { /* * turn off TCP coalescence for INET sockets */ int tmp = 1; setsockopt (ciptr->fd, IPPROTO_TCP, TCP_NODELAY, (char *) &tmp, sizeof (int)); } #endif return ciptr; } #ifdef TRANS_REOPEN static XtransConnInfo TRANS(SocketReopen) (int i _X_UNUSED, int type, int fd, char *port) { XtransConnInfo ciptr; int portlen; struct sockaddr *addr; size_t addrlen; prmsg (3,"SocketReopen(%d,%d,%s)\n", type, fd, port); if (port == NULL) { prmsg (1, "SocketReopen: port was null!\n"); return NULL; } portlen = strlen(port) + 1; // include space for trailing null #ifdef SOCK_MAXADDRLEN if (portlen < 0 || portlen > (SOCK_MAXADDRLEN + 2)) { prmsg (1, "SocketReopen: invalid portlen %d\n", portlen); return NULL; } if (portlen < 14) portlen = 14; #else if (portlen < 0 || portlen > 14) { prmsg (1, "SocketReopen: invalid portlen %d\n", portlen); return NULL; } #endif /*SOCK_MAXADDRLEN*/ if ((ciptr = calloc (1, sizeof(struct _XtransConnInfo))) == NULL) { prmsg (1, "SocketReopen: malloc(ciptr) failed\n"); return NULL; } ciptr->fd = fd; addrlen = portlen + offsetof(struct sockaddr, sa_data); if ((addr = calloc (1, addrlen)) == NULL) { prmsg (1, "SocketReopen: malloc(addr) failed\n"); free (ciptr); return NULL; } ciptr->addr = (char *) addr; ciptr->addrlen = addrlen; if ((ciptr->peeraddr = calloc (1, addrlen)) == NULL) { prmsg (1, "SocketReopen: malloc(portaddr) failed\n"); free (addr); free (ciptr); return NULL; } ciptr->peeraddrlen = addrlen; /* Initialize ciptr structure as if it were a normally-opened unix socket */ ciptr->flags = TRANS_LOCAL | TRANS_NOUNLINK; #ifdef BSD44SOCKETS addr->sa_len = addrlen; #endif addr->sa_family = AF_UNIX; #ifdef HAS_STRLCPY strlcpy(addr->sa_data, port, portlen); #else strncpy(addr->sa_data, port, portlen); #endif ciptr->family = AF_UNIX; memcpy(ciptr->peeraddr, ciptr->addr, addrlen); ciptr->port = rindex(addr->sa_data, ':'); if (ciptr->port == NULL) { if (is_numeric(addr->sa_data)) { ciptr->port = addr->sa_data; } } else if (ciptr->port[0] == ':') { ciptr->port++; } /* port should now point to portnum or NULL */ return ciptr; } #endif /* TRANS_REOPEN */ /* * These functions are the interface supplied in the Xtransport structure */ #ifdef TRANS_CLIENT static XtransConnInfo TRANS(SocketOpenCOTSClientBase) (const char *transname, const char *protocol, const char *host, const char *port, int previndex) { XtransConnInfo ciptr; int i = previndex; prmsg (2, "SocketOpenCOTSClient(%s,%s,%s)\n", protocol, host, port); SocketInitOnce(); while ((i = TRANS(SocketSelectFamily) (i, transname)) >= 0) { if ((ciptr = TRANS(SocketOpen) ( i, Sockettrans2devtab[i].devcotsname)) != NULL) { /* Save the index for later use */ ciptr->index = i; break; } } if (i < 0) { if (i == -1) prmsg (1,"SocketOpenCOTSClient: Unable to open socket for %s\n", transname); else prmsg (1,"SocketOpenCOTSClient: Unable to determine socket type for %s\n", transname); return NULL; } return ciptr; } static XtransConnInfo TRANS(SocketOpenCOTSClient) (Xtransport *thistrans, char *protocol, char *host, char *port) { return TRANS(SocketOpenCOTSClientBase)( thistrans->TransName, protocol, host, port, -1); } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER static XtransConnInfo TRANS(SocketOpenCOTSServer) (Xtransport *thistrans, char *protocol, char *host, char *port) { XtransConnInfo ciptr; int i = -1; prmsg (2,"SocketOpenCOTSServer(%s,%s,%s)\n", protocol, host, port); SocketInitOnce(); while ((i = TRANS(SocketSelectFamily) (i, thistrans->TransName)) >= 0) { if ((ciptr = TRANS(SocketOpen) ( i, Sockettrans2devtab[i].devcotsname)) != NULL) break; } if (i < 0) { if (i == -1) prmsg (1,"SocketOpenCOTSServer: Unable to open socket for %s\n", thistrans->TransName); else prmsg (1,"SocketOpenCOTSServer: Unable to determine socket type for %s\n", thistrans->TransName); return NULL; } /* * Using this prevents the bind() check for an existing server listening * on the same port, but it is required for other reasons. */ #ifdef SO_REUSEADDR /* * SO_REUSEADDR only applied to AF_INET && AF_INET6 */ if (Sockettrans2devtab[i].family == AF_INET #if defined(IPv6) && defined(AF_INET6) || Sockettrans2devtab[i].family == AF_INET6 #endif ) { int one = 1; setsockopt (ciptr->fd, SOL_SOCKET, SO_REUSEADDR, (char *) &one, sizeof (int)); } #endif #ifdef IPV6_V6ONLY if (Sockettrans2devtab[i].family == AF_INET6) { int one = 1; setsockopt(ciptr->fd, IPPROTO_IPV6, IPV6_V6ONLY, &one, sizeof(int)); } #endif /* Save the index for later use */ ciptr->index = i; return ciptr; } #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT static XtransConnInfo TRANS(SocketOpenCLTSClient) (Xtransport *thistrans, char *protocol, char *host, char *port) { XtransConnInfo ciptr; int i = -1; prmsg (2,"SocketOpenCLTSClient(%s,%s,%s)\n", protocol, host, port); SocketInitOnce(); while ((i = TRANS(SocketSelectFamily) (i, thistrans->TransName)) >= 0) { if ((ciptr = TRANS(SocketOpen) ( i, Sockettrans2devtab[i].devcotsname)) != NULL) break; } if (i < 0) { if (i == -1) prmsg (1,"SocketOpenCLTSClient: Unable to open socket for %s\n", thistrans->TransName); else prmsg (1,"SocketOpenCLTSClient: Unable to determine socket type for %s\n", thistrans->TransName); return NULL; } /* Save the index for later use */ ciptr->index = i; return ciptr; } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER static XtransConnInfo TRANS(SocketOpenCLTSServer) (Xtransport *thistrans, char *protocol, char *host, char *port) { XtransConnInfo ciptr; int i = -1; prmsg (2,"SocketOpenCLTSServer(%s,%s,%s)\n", protocol, host, port); SocketInitOnce(); while ((i = TRANS(SocketSelectFamily) (i, thistrans->TransName)) >= 0) { if ((ciptr = TRANS(SocketOpen) ( i, Sockettrans2devtab[i].devcotsname)) != NULL) break; } if (i < 0) { if (i == -1) prmsg (1,"SocketOpenCLTSServer: Unable to open socket for %s\n", thistrans->TransName); else prmsg (1,"SocketOpenCLTSServer: Unable to determine socket type for %s\n", thistrans->TransName); return NULL; } #ifdef IPV6_V6ONLY if (Sockettrans2devtab[i].family == AF_INET6) { int one = 1; setsockopt(ciptr->fd, IPPROTO_IPV6, IPV6_V6ONLY, &one, sizeof(int)); } #endif /* Save the index for later use */ ciptr->index = i; return ciptr; } #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN static XtransConnInfo TRANS(SocketReopenCOTSServer) (Xtransport *thistrans, int fd, char *port) { XtransConnInfo ciptr; int i = -1; prmsg (2, "SocketReopenCOTSServer(%d, %s)\n", fd, port); SocketInitOnce(); while ((i = TRANS(SocketSelectFamily) (i, thistrans->TransName)) >= 0) { if ((ciptr = TRANS(SocketReopen) ( i, Sockettrans2devtab[i].devcotsname, fd, port)) != NULL) break; } if (i < 0) { if (i == -1) prmsg (1,"SocketReopenCOTSServer: Unable to open socket for %s\n", thistrans->TransName); else prmsg (1,"SocketReopenCOTSServer: Unable to determine socket type for %s\n", thistrans->TransName); return NULL; } /* Save the index for later use */ ciptr->index = i; return ciptr; } static XtransConnInfo TRANS(SocketReopenCLTSServer) (Xtransport *thistrans, int fd, char *port) { XtransConnInfo ciptr; int i = -1; prmsg (2, "SocketReopenCLTSServer(%d, %s)\n", fd, port); SocketInitOnce(); while ((i = TRANS(SocketSelectFamily) (i, thistrans->TransName)) >= 0) { if ((ciptr = TRANS(SocketReopen) ( i, Sockettrans2devtab[i].devcotsname, fd, port)) != NULL) break; } if (i < 0) { if (i == -1) prmsg (1,"SocketReopenCLTSServer: Unable to open socket for %s\n", thistrans->TransName); else prmsg (1,"SocketReopenCLTSServer: Unable to determine socket type for %s\n", thistrans->TransName); return NULL; } /* Save the index for later use */ ciptr->index = i; return ciptr; } #endif /* TRANS_REOPEN */ static int TRANS(SocketSetOption) (XtransConnInfo ciptr, int option, int arg) { prmsg (2,"SocketSetOption(%d,%d,%d)\n", ciptr->fd, option, arg); return -1; } #ifdef UNIXCONN static int set_sun_path(const char *port, const char *upath, char *path, int abstract) { struct sockaddr_un s; int maxlen = sizeof(s.sun_path) - 1; const char *at = ""; if (!port || !*port || !path) return -1; #ifdef HAVE_ABSTRACT_SOCKETS if (port[0] == '@') upath = ""; else if (abstract) at = "@"; #endif if (*port == '/') /* a full pathname */ upath = ""; if (strlen(port) + strlen(upath) > maxlen) return -1; snprintf(path, sizeof(s.sun_path), "%s%s%s", at, upath, port); return 0; } #endif #ifdef TRANS_SERVER static int TRANS(SocketCreateListener) (XtransConnInfo ciptr, struct sockaddr *sockname, int socknamelen, unsigned int flags) { SOCKLEN_T namelen = socknamelen; int fd = ciptr->fd; int retry; prmsg (3, "SocketCreateListener(%p,%d)\n", ciptr, fd); if (Sockettrans2devtab[ciptr->index].family == AF_INET #if defined(IPv6) && defined(AF_INET6) || Sockettrans2devtab[ciptr->index].family == AF_INET6 #endif ) retry = 20; else retry = 0; while (bind (fd, (struct sockaddr *) sockname, namelen) < 0) { if (errno == EADDRINUSE) { if (flags & ADDR_IN_USE_ALLOWED) break; else return TRANS_ADDR_IN_USE; } if (retry-- == 0) { prmsg (1, "SocketCreateListener: failed to bind listener\n"); close (fd); return TRANS_CREATE_LISTENER_FAILED; } #ifdef SO_REUSEADDR sleep (1); #else sleep (10); #endif /* SO_REUSEDADDR */ } if (Sockettrans2devtab[ciptr->index].family == AF_INET #if defined(IPv6) && defined(AF_INET6) || Sockettrans2devtab[ciptr->index].family == AF_INET6 #endif ) { #ifdef SO_DONTLINGER setsockopt (fd, SOL_SOCKET, SO_DONTLINGER, (char *) NULL, 0); #else #ifdef SO_LINGER { static int linger[2] = { 0, 0 }; setsockopt (fd, SOL_SOCKET, SO_LINGER, (char *) linger, sizeof (linger)); } #endif #endif } if (listen (fd, BACKLOG) < 0) { prmsg (1, "SocketCreateListener: listen() failed\n"); close (fd); return TRANS_CREATE_LISTENER_FAILED; } /* Set a flag to indicate that this connection is a listener */ ciptr->flags = 1 | (ciptr->flags & TRANS_KEEPFLAGS); return 0; } #ifdef TCPCONN static int TRANS(SocketINETCreateListener) (XtransConnInfo ciptr, char *port, unsigned int flags) { #if defined(IPv6) && defined(AF_INET6) struct sockaddr_storage sockname; #else struct sockaddr_in sockname; #endif unsigned short sport; SOCKLEN_T namelen = sizeof(sockname); int status; long tmpport; #ifdef XTHREADS_NEEDS_BYNAMEPARAMS _Xgetservbynameparams sparams; #endif struct servent *servp; #ifdef X11_t char portbuf[PORTBUFSIZE]; #endif prmsg (2, "SocketINETCreateListener(%s)\n", port); #ifdef X11_t /* * X has a well known port, that is transport dependent. It is easier * to handle it here, than try and come up with a transport independent * representation that can be passed in and resolved the usual way. * * The port that is passed here is really a string containing the idisplay * from ConnectDisplay(). */ if (is_numeric (port)) { /* fixup the server port address */ tmpport = X_TCP_PORT + strtol (port, (char**)NULL, 10); snprintf (portbuf, sizeof(portbuf), "%lu", tmpport); port = portbuf; } #endif if (port && *port) { /* Check to see if the port string is just a number (handles X11) */ if (!is_numeric (port)) { if ((servp = _XGetservbyname (port,"tcp",sparams)) == NULL) { prmsg (1, "SocketINETCreateListener: Unable to get service for %s\n", port); return TRANS_CREATE_LISTENER_FAILED; } /* we trust getservbyname to return a valid number */ sport = servp->s_port; } else { tmpport = strtol (port, (char**)NULL, 10); /* * check that somehow the port address isn't negative or in * the range of reserved port addresses. This can happen and * be very bad if the server is suid-root and the user does * something (dumb) like `X :60049`. */ if (tmpport < 1024 || tmpport > USHRT_MAX) return TRANS_CREATE_LISTENER_FAILED; sport = (unsigned short) tmpport; } } else sport = 0; bzero(&sockname, sizeof(sockname)); #if defined(IPv6) && defined(AF_INET6) if (Sockettrans2devtab[ciptr->index].family == AF_INET) { namelen = sizeof (struct sockaddr_in); #ifdef BSD44SOCKETS ((struct sockaddr_in *)&sockname)->sin_len = namelen; #endif ((struct sockaddr_in *)&sockname)->sin_family = AF_INET; ((struct sockaddr_in *)&sockname)->sin_port = htons(sport); ((struct sockaddr_in *)&sockname)->sin_addr.s_addr = htonl(INADDR_ANY); } else { namelen = sizeof (struct sockaddr_in6); #ifdef SIN6_LEN ((struct sockaddr_in6 *)&sockname)->sin6_len = sizeof(sockname); #endif ((struct sockaddr_in6 *)&sockname)->sin6_family = AF_INET6; ((struct sockaddr_in6 *)&sockname)->sin6_port = htons(sport); ((struct sockaddr_in6 *)&sockname)->sin6_addr = in6addr_any; } #else #ifdef BSD44SOCKETS sockname.sin_len = sizeof (sockname); #endif sockname.sin_family = AF_INET; sockname.sin_port = htons (sport); sockname.sin_addr.s_addr = htonl (INADDR_ANY); #endif if ((status = TRANS(SocketCreateListener) (ciptr, (struct sockaddr *) &sockname, namelen, flags)) < 0) { prmsg (1, "SocketINETCreateListener: ...SocketCreateListener() failed\n"); return status; } if (TRANS(SocketINETGetAddr) (ciptr) < 0) { prmsg (1, "SocketINETCreateListener: ...SocketINETGetAddr() failed\n"); return TRANS_CREATE_LISTENER_FAILED; } return 0; } #endif /* TCPCONN */ #ifdef UNIXCONN static int TRANS(SocketUNIXCreateListener) (XtransConnInfo ciptr, char *port, unsigned int flags) { struct sockaddr_un sockname; int namelen; int oldUmask; int status; unsigned int mode; char tmpport[108]; int abstract = 0; #ifdef HAVE_ABSTRACT_SOCKETS abstract = ciptr->transptr->flags & TRANS_ABSTRACT; #endif prmsg (2, "SocketUNIXCreateListener(%s)\n", port ? port : "NULL"); /* Make sure the directory is created */ oldUmask = umask (0); #ifdef UNIX_DIR #ifdef HAS_STICKY_DIR_BIT mode = 01777; #else mode = 0777; #endif if (!abstract && trans_mkdir(UNIX_DIR, mode) == -1) { prmsg (1, "SocketUNIXCreateListener: mkdir(%s) failed, errno = %d\n", UNIX_DIR, errno); (void) umask (oldUmask); return TRANS_CREATE_LISTENER_FAILED; } #endif memset(&sockname, 0, sizeof(sockname)); sockname.sun_family = AF_UNIX; if (!(port && *port)) { snprintf (tmpport, sizeof(tmpport), "%s%ld", UNIX_PATH, (long)getpid()); port = tmpport; } if (set_sun_path(port, UNIX_PATH, sockname.sun_path, abstract) != 0) { prmsg (1, "SocketUNIXCreateListener: path too long\n"); return TRANS_CREATE_LISTENER_FAILED; } #if (defined(BSD44SOCKETS) || defined(__UNIXWARE__)) sockname.sun_len = strlen(sockname.sun_path); #endif #if defined(BSD44SOCKETS) || defined(SUN_LEN) namelen = SUN_LEN(&sockname); #else namelen = strlen(sockname.sun_path) + offsetof(struct sockaddr_un, sun_path); #endif if (abstract) { sockname.sun_path[0] = '\0'; namelen = offsetof(struct sockaddr_un, sun_path) + 1 + strlen(&sockname.sun_path[1]); } else unlink (sockname.sun_path); if ((status = TRANS(SocketCreateListener) (ciptr, (struct sockaddr *) &sockname, namelen, flags)) < 0) { prmsg (1, "SocketUNIXCreateListener: ...SocketCreateListener() failed\n"); (void) umask (oldUmask); return status; } /* * Now that the listener is esablished, create the addr info for * this connection. getpeername() doesn't work for UNIX Domain Sockets * on some systems (hpux at least), so we will just do it manually, instead * of calling something like TRANS(SocketUNIXGetAddr). */ namelen = sizeof (sockname); /* this will always make it the same size */ if ((ciptr->addr = malloc (namelen)) == NULL) { prmsg (1, "SocketUNIXCreateListener: Can't allocate space for the addr\n"); (void) umask (oldUmask); return TRANS_CREATE_LISTENER_FAILED; } if (abstract) sockname.sun_path[0] = '@'; ciptr->family = sockname.sun_family; ciptr->addrlen = namelen; memcpy (ciptr->addr, &sockname, ciptr->addrlen); (void) umask (oldUmask); return 0; } static int TRANS(SocketUNIXResetListener) (XtransConnInfo ciptr) { /* * See if the unix domain socket has disappeared. If it has, recreate it. */ struct sockaddr_un *unsock = (struct sockaddr_un *) ciptr->addr; struct stat statb; int status = TRANS_RESET_NOOP; unsigned int mode; int abstract = 0; #ifdef HAVE_ABSTRACT_SOCKETS abstract = ciptr->transptr->flags & TRANS_ABSTRACT; #endif prmsg (3, "SocketUNIXResetListener(%p,%d)\n", ciptr, ciptr->fd); if (!abstract && ( stat (unsock->sun_path, &statb) == -1 || ((statb.st_mode & S_IFMT) != #if defined(NCR) || defined(SCO325) || !defined(S_IFSOCK) S_IFIFO #else S_IFSOCK #endif ))) { int oldUmask = umask (0); #ifdef UNIX_DIR #ifdef HAS_STICKY_DIR_BIT mode = 01777; #else mode = 0777; #endif if (trans_mkdir(UNIX_DIR, mode) == -1) { prmsg (1, "SocketUNIXResetListener: mkdir(%s) failed, errno = %d\n", UNIX_DIR, errno); (void) umask (oldUmask); return TRANS_RESET_FAILURE; } #endif close (ciptr->fd); unlink (unsock->sun_path); if ((ciptr->fd = socket (AF_UNIX, SOCK_STREAM, 0)) < 0) { TRANS(FreeConnInfo) (ciptr); (void) umask (oldUmask); return TRANS_RESET_FAILURE; } if (bind (ciptr->fd, (struct sockaddr *) unsock, ciptr->addrlen) < 0) { close (ciptr->fd); TRANS(FreeConnInfo) (ciptr); return TRANS_RESET_FAILURE; } if (listen (ciptr->fd, BACKLOG) < 0) { close (ciptr->fd); TRANS(FreeConnInfo) (ciptr); (void) umask (oldUmask); return TRANS_RESET_FAILURE; } umask (oldUmask); status = TRANS_RESET_NEW_FD; } return status; } #endif /* UNIXCONN */ #ifdef TCPCONN static XtransConnInfo TRANS(SocketINETAccept) (XtransConnInfo ciptr, int *status) { XtransConnInfo newciptr; struct sockaddr_in sockname; SOCKLEN_T namelen = sizeof(sockname); prmsg (2, "SocketINETAccept(%p,%d)\n", ciptr, ciptr->fd); if ((newciptr = calloc (1, sizeof(struct _XtransConnInfo))) == NULL) { prmsg (1, "SocketINETAccept: malloc failed\n"); *status = TRANS_ACCEPT_BAD_MALLOC; return NULL; } if ((newciptr->fd = accept (ciptr->fd, (struct sockaddr *) &sockname, (void *)&namelen)) < 0) { #ifdef WIN32 errno = WSAGetLastError(); #endif prmsg (1, "SocketINETAccept: accept() failed\n"); free (newciptr); *status = TRANS_ACCEPT_FAILED; return NULL; } #ifdef TCP_NODELAY { /* * turn off TCP coalescence for INET sockets */ int tmp = 1; setsockopt (newciptr->fd, IPPROTO_TCP, TCP_NODELAY, (char *) &tmp, sizeof (int)); } #endif /* * Get this address again because the transport may give a more * specific address now that a connection is established. */ if (TRANS(SocketINETGetAddr) (newciptr) < 0) { prmsg (1, "SocketINETAccept: ...SocketINETGetAddr() failed:\n"); close (newciptr->fd); free (newciptr); *status = TRANS_ACCEPT_MISC_ERROR; return NULL; } if (TRANS(SocketINETGetPeerAddr) (newciptr) < 0) { prmsg (1, "SocketINETAccept: ...SocketINETGetPeerAddr() failed:\n"); close (newciptr->fd); if (newciptr->addr) free (newciptr->addr); free (newciptr); *status = TRANS_ACCEPT_MISC_ERROR; return NULL; } *status = 0; return newciptr; } #endif /* TCPCONN */ #ifdef UNIXCONN static XtransConnInfo TRANS(SocketUNIXAccept) (XtransConnInfo ciptr, int *status) { XtransConnInfo newciptr; struct sockaddr_un sockname; SOCKLEN_T namelen = sizeof sockname; prmsg (2, "SocketUNIXAccept(%p,%d)\n", ciptr, ciptr->fd); if ((newciptr = calloc (1, sizeof(struct _XtransConnInfo))) == NULL) { prmsg (1, "SocketUNIXAccept: malloc() failed\n"); *status = TRANS_ACCEPT_BAD_MALLOC; return NULL; } if ((newciptr->fd = accept (ciptr->fd, (struct sockaddr *) &sockname, (void *)&namelen)) < 0) { prmsg (1, "SocketUNIXAccept: accept() failed\n"); free (newciptr); *status = TRANS_ACCEPT_FAILED; return NULL; } ciptr->addrlen = namelen; /* * Get the socket name and the peer name from the listener socket, * since this is unix domain. */ if ((newciptr->addr = malloc (ciptr->addrlen)) == NULL) { prmsg (1, "SocketUNIXAccept: Can't allocate space for the addr\n"); close (newciptr->fd); free (newciptr); *status = TRANS_ACCEPT_BAD_MALLOC; return NULL; } /* * if the socket is abstract, we already modified the address to have a * @ instead of the initial NUL, so no need to do that again here. */ newciptr->addrlen = ciptr->addrlen; memcpy (newciptr->addr, ciptr->addr, newciptr->addrlen); if ((newciptr->peeraddr = malloc (ciptr->addrlen)) == NULL) { prmsg (1, "SocketUNIXAccept: Can't allocate space for the addr\n"); close (newciptr->fd); if (newciptr->addr) free (newciptr->addr); free (newciptr); *status = TRANS_ACCEPT_BAD_MALLOC; return NULL; } newciptr->peeraddrlen = ciptr->addrlen; memcpy (newciptr->peeraddr, ciptr->addr, newciptr->addrlen); newciptr->family = AF_UNIX; *status = 0; return newciptr; } #endif /* UNIXCONN */ #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT #ifdef TCPCONN #if defined(IPv6) && defined(AF_INET6) struct addrlist { struct addrinfo * addr; struct addrinfo * firstaddr; char port[PORTBUFSIZE]; char host[MAXHOSTNAMELEN]; }; static struct addrlist *addrlist = NULL; #endif static int TRANS(SocketINETConnect) (XtransConnInfo ciptr, char *host, char *port) { struct sockaddr * socketaddr = NULL; int socketaddrlen = 0; int res; #if defined(IPv6) && defined(AF_INET6) struct addrinfo hints; char ntopbuf[INET6_ADDRSTRLEN]; int resetonce = 0; #else struct sockaddr_in sockname; struct hostent *hostp; struct servent *servp; unsigned long tmpaddr; #endif #ifdef XTHREADS_NEEDS_BYNAMEPARAMS _Xgethostbynameparams hparams; _Xgetservbynameparams sparams; #endif #ifdef X11_t char portbuf[PORTBUFSIZE]; #endif char hostnamebuf[256]; /* tmp space */ prmsg (2,"SocketINETConnect(%d,%s,%s)\n", ciptr->fd, host, port); if (!host) { hostnamebuf[0] = '\0'; (void) TRANS(GetHostname) (hostnamebuf, sizeof hostnamebuf); host = hostnamebuf; } #ifdef X11_t /* * X has a well known port, that is transport dependent. It is easier * to handle it here, than try and come up with a transport independent * representation that can be passed in and resolved the usual way. * * The port that is passed here is really a string containing the idisplay * from ConnectDisplay(). */ if (is_numeric (port)) { long tmpport = X_TCP_PORT + strtol (port, (char**)NULL, 10); snprintf (portbuf, sizeof(portbuf), "%lu", tmpport); port = portbuf; } #endif #if defined(IPv6) && defined(AF_INET6) { if (addrlist != NULL) { if (strcmp(host,addrlist->host) || strcmp(port,addrlist->port)) { if (addrlist->firstaddr) freeaddrinfo(addrlist->firstaddr); addrlist->firstaddr = NULL; } } else { addrlist = malloc(sizeof(struct addrlist)); addrlist->firstaddr = NULL; } if (addrlist->firstaddr == NULL) { strncpy(addrlist->port, port, sizeof(addrlist->port)); addrlist->port[sizeof(addrlist->port) - 1] = '\0'; strncpy(addrlist->host, host, sizeof(addrlist->host)); addrlist->host[sizeof(addrlist->host) - 1] = '\0'; bzero(&hints,sizeof(hints)); hints.ai_socktype = Sockettrans2devtab[ciptr->index].devcotsname; res = getaddrinfo(host,port,&hints,&addrlist->firstaddr); if (res != 0) { prmsg (1, "SocketINETConnect() can't get address " "for %s:%s: %s\n", host, port, gai_strerror(res)); ESET(EINVAL); return TRANS_CONNECT_FAILED; } for (res = 0, addrlist->addr = addrlist->firstaddr; addrlist->addr ; res++) { addrlist->addr = addrlist->addr->ai_next; } prmsg(4,"Got New Address list with %d addresses\n", res); res = 0; addrlist->addr = NULL; } while (socketaddr == NULL) { if (addrlist->addr == NULL) { if (resetonce) { /* Already checked entire list - no usable addresses */ prmsg (1, "SocketINETConnect() no usable address " "for %s:%s\n", host, port); return TRANS_CONNECT_FAILED; } else { /* Go back to beginning of list */ resetonce = 1; addrlist->addr = addrlist->firstaddr; } } socketaddr = addrlist->addr->ai_addr; socketaddrlen = addrlist->addr->ai_addrlen; if (addrlist->addr->ai_family == AF_INET) { struct sockaddr_in *sin = (struct sockaddr_in *) socketaddr; prmsg (4,"SocketINETConnect() sockname.sin_addr = %s\n", inet_ntop(addrlist->addr->ai_family,&sin->sin_addr, ntopbuf,sizeof(ntopbuf))); prmsg (4,"SocketINETConnect() sockname.sin_port = %d\n", ntohs(sin->sin_port)); if (Sockettrans2devtab[ciptr->index].family == AF_INET6) { if (strcmp(Sockettrans2devtab[ciptr->index].transname, "tcp") == 0) { XtransConnInfo newciptr; /* * Our socket is an IPv6 socket, but the address is * IPv4. Close it and get an IPv4 socket. This is * needed for IPv4 connections to work on platforms * that don't allow IPv4 over IPv6 sockets. */ TRANS(SocketINETClose)(ciptr); newciptr = TRANS(SocketOpenCOTSClientBase)( "tcp", "tcp", host, port, ciptr->index); if (newciptr) ciptr->fd = newciptr->fd; if (!newciptr || Sockettrans2devtab[newciptr->index].family != AF_INET) { socketaddr = NULL; prmsg (4,"SocketINETConnect() Cannot get IPv4 " " socketfor IPv4 address\n"); } if (newciptr) free(newciptr); } else { socketaddr = NULL; prmsg (4,"SocketINETConnect Skipping IPv4 address\n"); } } } else if (addrlist->addr->ai_family == AF_INET6) { struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *) socketaddr; prmsg (4,"SocketINETConnect() sockname.sin6_addr = %s\n", inet_ntop(addrlist->addr->ai_family, &sin6->sin6_addr,ntopbuf,sizeof(ntopbuf))); prmsg (4,"SocketINETConnect() sockname.sin6_port = %d\n", ntohs(sin6->sin6_port)); if (Sockettrans2devtab[ciptr->index].family == AF_INET) { if (strcmp(Sockettrans2devtab[ciptr->index].transname, "tcp") == 0) { XtransConnInfo newciptr; /* * Close the IPv4 socket and try to open an IPv6 socket. */ TRANS(SocketINETClose)(ciptr); newciptr = TRANS(SocketOpenCOTSClientBase)( "tcp", "tcp", host, port, -1); if (newciptr) ciptr->fd = newciptr->fd; if (!newciptr || Sockettrans2devtab[newciptr->index].family != AF_INET6) { socketaddr = NULL; prmsg (4,"SocketINETConnect() Cannot get IPv6 " "socket for IPv6 address\n"); } if (newciptr) free(newciptr); } else { socketaddr = NULL; prmsg (4,"SocketINETConnect() Skipping IPv6 address\n"); } } } else { socketaddr = NULL; /* Unsupported address type */ } if (socketaddr == NULL) { addrlist->addr = addrlist->addr->ai_next; } } } #else { /* * Build the socket name. */ #ifdef BSD44SOCKETS sockname.sin_len = sizeof (struct sockaddr_in); #endif sockname.sin_family = AF_INET; /* * fill in sin_addr */ #ifndef INADDR_NONE #define INADDR_NONE ((in_addr_t) 0xffffffff) #endif /* check for ww.xx.yy.zz host string */ if (isascii (host[0]) && isdigit (host[0])) { tmpaddr = inet_addr (host); /* returns network byte order */ } else { tmpaddr = INADDR_NONE; } prmsg (4,"SocketINETConnect() inet_addr(%s) = %x\n", host, tmpaddr); if (tmpaddr == INADDR_NONE) { if ((hostp = _XGethostbyname(host,hparams)) == NULL) { prmsg (1,"SocketINETConnect: Can't get address for %s\n", host); ESET(EINVAL); return TRANS_CONNECT_FAILED; } if (hostp->h_addrtype != AF_INET) { /* is IP host? */ prmsg (1,"SocketINETConnect: not INET host%s\n", host); ESET(EPROTOTYPE); return TRANS_CONNECT_FAILED; } memcpy ((char *) &sockname.sin_addr, (char *) hostp->h_addr, sizeof (sockname.sin_addr)); } else { sockname.sin_addr.s_addr = tmpaddr; } /* * fill in sin_port */ /* Check for number in the port string */ if (!is_numeric (port)) { if ((servp = _XGetservbyname (port,"tcp",sparams)) == NULL) { prmsg (1,"SocketINETConnect: can't get service for %s\n", port); return TRANS_CONNECT_FAILED; } sockname.sin_port = htons (servp->s_port); } else { long tmpport = strtol (port, (char**)NULL, 10); if (tmpport < 1024 || tmpport > USHRT_MAX) return TRANS_CONNECT_FAILED; sockname.sin_port = htons (((unsigned short) tmpport)); } prmsg (4,"SocketINETConnect: sockname.sin_port = %d\n", ntohs(sockname.sin_port)); socketaddr = (struct sockaddr *) &sockname; socketaddrlen = sizeof(sockname); } #endif /* * Turn on socket keepalive so the client process will eventually * be notified with a SIGPIPE signal if the display server fails * to respond to a periodic transmission of messages * on the connected socket. * This is useful to avoid hung application processes when the * processes are not spawned from the xdm session and * the display server terminates abnormally. * (Someone turned off the power switch.) */ { int tmp = 1; setsockopt (ciptr->fd, SOL_SOCKET, SO_KEEPALIVE, (char *) &tmp, sizeof (int)); } /* * Do the connect() */ if (connect (ciptr->fd, socketaddr, socketaddrlen ) < 0) { #ifdef WIN32 int olderrno = WSAGetLastError(); #else int olderrno = errno; #endif /* * If the error was ECONNREFUSED, the server may be overloaded * and we should try again. * * If the error was EWOULDBLOCK or EINPROGRESS then the socket * was non-blocking and we should poll using select * * If the error was EINTR, the connect was interrupted and we * should try again. * * If multiple addresses are found for a host then we should * try to connect again with a different address for a larger * number of errors that made us quit before, since those * could be caused by trying to use an IPv6 address to contact * a machine with an IPv4-only server or other reasons that * only affect one of a set of addresses. */ if (olderrno == ECONNREFUSED || olderrno == EINTR #if defined(IPv6) && defined(AF_INET6) || (((addrlist->addr->ai_next != NULL) || (addrlist->addr != addrlist->firstaddr)) && (olderrno == ENETUNREACH || olderrno == EAFNOSUPPORT || olderrno == EADDRNOTAVAIL || olderrno == ETIMEDOUT #if defined(EHOSTDOWN) || olderrno == EHOSTDOWN #endif )) #endif ) res = TRANS_TRY_CONNECT_AGAIN; else if (olderrno == EWOULDBLOCK || olderrno == EINPROGRESS) res = TRANS_IN_PROGRESS; else { prmsg (2,"SocketINETConnect: Can't connect: errno = %d\n", olderrno); res = TRANS_CONNECT_FAILED; } } else { res = 0; /* * Sync up the address fields of ciptr. */ if (TRANS(SocketINETGetAddr) (ciptr) < 0) { prmsg (1, "SocketINETConnect: ...SocketINETGetAddr() failed:\n"); res = TRANS_CONNECT_FAILED; } else if (TRANS(SocketINETGetPeerAddr) (ciptr) < 0) { prmsg (1, "SocketINETConnect: ...SocketINETGetPeerAddr() failed:\n"); res = TRANS_CONNECT_FAILED; } } #if defined(IPv6) && defined(AF_INET6) if (res != 0) { addrlist->addr = addrlist->addr->ai_next; } #endif return res; } #endif /* TCPCONN */ #ifdef UNIXCONN /* * Make sure 'host' is really local. */ static int UnixHostReallyLocal (char *host) { char hostnamebuf[256]; TRANS(GetHostname) (hostnamebuf, sizeof (hostnamebuf)); if (strcmp (hostnamebuf, host) == 0) { return (1); } else { #if defined(IPv6) && defined(AF_INET6) struct addrinfo *localhostaddr; struct addrinfo *otherhostaddr; struct addrinfo *i, *j; int equiv = 0; if (getaddrinfo(hostnamebuf, NULL, NULL, &localhostaddr) != 0) return 0; if (getaddrinfo(host, NULL, NULL, &otherhostaddr) != 0) { freeaddrinfo(localhostaddr); return 0; } for (i = localhostaddr; i != NULL && equiv == 0; i = i->ai_next) { for (j = otherhostaddr; j != NULL && equiv == 0; j = j->ai_next) { if (i->ai_family == j->ai_family) { if (i->ai_family == AF_INET) { struct sockaddr_in *sinA = (struct sockaddr_in *) i->ai_addr; struct sockaddr_in *sinB = (struct sockaddr_in *) j->ai_addr; struct in_addr *A = &sinA->sin_addr; struct in_addr *B = &sinB->sin_addr; if (memcmp(A,B,sizeof(struct in_addr)) == 0) { equiv = 1; } } else if (i->ai_family == AF_INET6) { struct sockaddr_in6 *sinA = (struct sockaddr_in6 *) i->ai_addr; struct sockaddr_in6 *sinB = (struct sockaddr_in6 *) j->ai_addr; struct in6_addr *A = &sinA->sin6_addr; struct in6_addr *B = &sinB->sin6_addr; if (memcmp(A,B,sizeof(struct in6_addr)) == 0) { equiv = 1; } } } } } freeaddrinfo(localhostaddr); freeaddrinfo(otherhostaddr); return equiv; #else /* * A host may have more than one network address. If any of the * network addresses of 'host' (specified to the connect call) * match any of the network addresses of 'hostname' (determined * by TRANS(GetHostname)), then the two hostnames are equivalent, * and we know that 'host' is really a local host. */ char specified_local_addr_list[10][4]; int scount, equiv, i, j; #ifdef XTHREADS_NEEDS_BYNAMEPARAMS _Xgethostbynameparams hparams; #endif struct hostent *hostp; if ((hostp = _XGethostbyname (host,hparams)) == NULL) return (0); scount = 0; while (hostp->h_addr_list[scount] && scount <= 8) { /* * The 2nd call to gethostname() overrides the data * from the 1st call, so we must save the address list. */ specified_local_addr_list[scount][0] = hostp->h_addr_list[scount][0]; specified_local_addr_list[scount][1] = hostp->h_addr_list[scount][1]; specified_local_addr_list[scount][2] = hostp->h_addr_list[scount][2]; specified_local_addr_list[scount][3] = hostp->h_addr_list[scount][3]; scount++; } if ((hostp = _XGethostbyname (hostnamebuf,hparams)) == NULL) return (0); equiv = 0; i = 0; while (i < scount && !equiv) { j = 0; while (hostp->h_addr_list[j]) { if ((specified_local_addr_list[i][0] == hostp->h_addr_list[j][0]) && (specified_local_addr_list[i][1] == hostp->h_addr_list[j][1]) && (specified_local_addr_list[i][2] == hostp->h_addr_list[j][2]) && (specified_local_addr_list[i][3] == hostp->h_addr_list[j][3])) { /* They're equal, so we're done */ equiv = 1; break; } j++; } i++; } return (equiv); #endif } } static int TRANS(SocketUNIXConnect) (XtransConnInfo ciptr, char *host, char *port) { struct sockaddr_un sockname; SOCKLEN_T namelen; int abstract = 0; #ifdef HAVE_ABSTRACT_SOCKETS abstract = ciptr->transptr->flags & TRANS_ABSTRACT; #endif prmsg (2,"SocketUNIXConnect(%d,%s,%s)\n", ciptr->fd, host, port); /* * Make sure 'host' is really local. If not, we return failure. * The reason we make this check is because a process may advertise * a "local" network ID for which it can accept connections, but if * a process on a remote machine tries to connect to this network ID, * we know for sure it will fail. */ if (host && *host && host[0]!='/' && strcmp (host, "unix") != 0 && !UnixHostReallyLocal (host)) { prmsg (1, "SocketUNIXConnect: Cannot connect to non-local host %s\n", host); return TRANS_CONNECT_FAILED; } /* * Check the port. */ if (!port || !*port) { prmsg (1,"SocketUNIXConnect: Missing port specification\n"); return TRANS_CONNECT_FAILED; } /* * Build the socket name. */ sockname.sun_family = AF_UNIX; if (set_sun_path(port, UNIX_PATH, sockname.sun_path, abstract) != 0) { prmsg (1, "SocketUNIXConnect: path too long\n"); return TRANS_CONNECT_FAILED; } #if (defined(BSD44SOCKETS) || defined(__UNIXWARE__)) sockname.sun_len = strlen (sockname.sun_path); #endif #if defined(BSD44SOCKETS) || defined(SUN_LEN) namelen = SUN_LEN (&sockname); #else namelen = strlen (sockname.sun_path) + offsetof(struct sockaddr_un, sun_path); #endif /* * Adjust the socket path if using abstract sockets. * Done here because otherwise all the strlen() calls above would fail. */ if (abstract) { sockname.sun_path[0] = '\0'; } /* * Do the connect() */ if (connect (ciptr->fd, (struct sockaddr *) &sockname, namelen) < 0) { int olderrno = errno; int connected = 0; if (!connected) { errno = olderrno; /* * If the error was ENOENT, the server may be starting up; we used * to suggest to try again in this case with * TRANS_TRY_CONNECT_AGAIN, but this introduced problems for * processes still referencing stale sockets in their environment. * Hence, we now return a hard error, TRANS_CONNECT_FAILED, and it * is suggested that higher level stacks handle retries on their * level when they face a slow starting server. * * If the error was EWOULDBLOCK or EINPROGRESS then the socket * was non-blocking and we should poll using select * * If the error was EINTR, the connect was interrupted and we * should try again. */ if (olderrno == EWOULDBLOCK || olderrno == EINPROGRESS) return TRANS_IN_PROGRESS; else if (olderrno == EINTR) return TRANS_TRY_CONNECT_AGAIN; else if (olderrno == ENOENT || olderrno == ECONNREFUSED) { /* If opening as abstract socket failed, try again normally */ if (abstract) { ciptr->transptr->flags &= ~(TRANS_ABSTRACT); return TRANS_TRY_CONNECT_AGAIN; } else { return TRANS_CONNECT_FAILED; } } else { prmsg (2,"SocketUNIXConnect: Can't connect: errno = %d\n", EGET()); return TRANS_CONNECT_FAILED; } } } /* * Get the socket name and the peer name from the connect socket, * since this is unix domain. */ if ((ciptr->addr = malloc(namelen)) == NULL || (ciptr->peeraddr = malloc(namelen)) == NULL) { prmsg (1, "SocketUNIXCreateListener: Can't allocate space for the addr\n"); return TRANS_CONNECT_FAILED; } if (abstract) sockname.sun_path[0] = '@'; ciptr->family = AF_UNIX; ciptr->addrlen = namelen; ciptr->peeraddrlen = namelen; memcpy (ciptr->addr, &sockname, ciptr->addrlen); memcpy (ciptr->peeraddr, &sockname, ciptr->peeraddrlen); return 0; } #endif /* UNIXCONN */ #endif /* TRANS_CLIENT */ static int TRANS(SocketBytesReadable) (XtransConnInfo ciptr, BytesReadable_t *pend) { prmsg (2,"SocketBytesReadable(%p,%d,%p)\n", ciptr, ciptr->fd, pend); #ifdef WIN32 { int ret = ioctlsocket ((SOCKET) ciptr->fd, FIONREAD, (u_long *) pend); if (ret == SOCKET_ERROR) errno = WSAGetLastError(); return ret; } #else #if defined(__i386__) && defined(SYSV) && !defined(SCO325) return ioctl (ciptr->fd, I_NREAD, (char *) pend); #else return ioctl (ciptr->fd, FIONREAD, (char *) pend); #endif /* __i386__ && SYSV || _SEQUENT_ && _SOCKET_VERSION == 1 */ #endif /* WIN32 */ } static int TRANS(SocketRead) (XtransConnInfo ciptr, char *buf, int size) { prmsg (2,"SocketRead(%d,%p,%d)\n", ciptr->fd, buf, size); #if defined(WIN32) { int ret = recv ((SOCKET)ciptr->fd, buf, size, 0); #ifdef WIN32 if (ret == SOCKET_ERROR) errno = WSAGetLastError(); #endif return ret; } #else return read (ciptr->fd, buf, size); #endif /* WIN32 */ } static int TRANS(SocketWrite) (XtransConnInfo ciptr, char *buf, int size) { prmsg (2,"SocketWrite(%d,%p,%d)\n", ciptr->fd, buf, size); #if defined(WIN32) { int ret = send ((SOCKET)ciptr->fd, buf, size, 0); #ifdef WIN32 if (ret == SOCKET_ERROR) errno = WSAGetLastError(); #endif return ret; } #else return write (ciptr->fd, buf, size); #endif /* WIN32 */ } static int TRANS(SocketReadv) (XtransConnInfo ciptr, struct iovec *buf, int size) { prmsg (2,"SocketReadv(%d,%p,%d)\n", ciptr->fd, buf, size); return READV (ciptr, buf, size); } static int TRANS(SocketWritev) (XtransConnInfo ciptr, struct iovec *buf, int size) { prmsg (2,"SocketWritev(%d,%p,%d)\n", ciptr->fd, buf, size); return WRITEV (ciptr, buf, size); } static int TRANS(SocketDisconnect) (XtransConnInfo ciptr) { prmsg (2,"SocketDisconnect(%p,%d)\n", ciptr, ciptr->fd); #ifdef WIN32 { int ret = shutdown (ciptr->fd, 2); if (ret == SOCKET_ERROR) errno = WSAGetLastError(); return ret; } #else return shutdown (ciptr->fd, 2); /* disallow further sends and receives */ #endif } #ifdef TCPCONN static int TRANS(SocketINETClose) (XtransConnInfo ciptr) { prmsg (2,"SocketINETClose(%p,%d)\n", ciptr, ciptr->fd); #ifdef WIN32 { int ret = close (ciptr->fd); if (ret == SOCKET_ERROR) errno = WSAGetLastError(); return ret; } #else return close (ciptr->fd); #endif } #endif /* TCPCONN */ #ifdef UNIXCONN static int TRANS(SocketUNIXClose) (XtransConnInfo ciptr) { /* * If this is the server side, then once the socket is closed, * it must be unlinked to completely close it */ struct sockaddr_un *sockname = (struct sockaddr_un *) ciptr->addr; int ret; prmsg (2,"SocketUNIXClose(%p,%d)\n", ciptr, ciptr->fd); ret = close(ciptr->fd); if (ciptr->flags && sockname && sockname->sun_family == AF_UNIX && sockname->sun_path[0]) { if (!(ciptr->flags & TRANS_NOUNLINK || ciptr->transptr->flags & TRANS_ABSTRACT)) unlink (sockname->sun_path); } return ret; } static int TRANS(SocketUNIXCloseForCloning) (XtransConnInfo ciptr) { /* * Don't unlink path. */ int ret; prmsg (2,"SocketUNIXCloseForCloning(%p,%d)\n", ciptr, ciptr->fd); ret = close(ciptr->fd); return ret; } #endif /* UNIXCONN */ #ifdef TCPCONN # ifdef TRANS_SERVER static const char* tcp_nolisten[] = { "inet", #if defined(IPv6) && defined(AF_INET6) "inet6", #endif NULL }; # endif Xtransport TRANS(SocketTCPFuncs) = { /* Socket Interface */ "tcp", TRANS_ALIAS, #ifdef TRANS_CLIENT TRANS(SocketOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER tcp_nolisten, TRANS(SocketOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(SocketOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(SocketOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(SocketReopenCOTSServer), TRANS(SocketReopenCLTSServer), #endif TRANS(SocketSetOption), #ifdef TRANS_SERVER TRANS(SocketINETCreateListener), NULL, /* ResetListener */ TRANS(SocketINETAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(SocketINETConnect), #endif /* TRANS_CLIENT */ TRANS(SocketBytesReadable), TRANS(SocketRead), TRANS(SocketWrite), TRANS(SocketReadv), TRANS(SocketWritev), TRANS(SocketDisconnect), TRANS(SocketINETClose), TRANS(SocketINETClose), }; Xtransport TRANS(SocketINETFuncs) = { /* Socket Interface */ "inet", 0, #ifdef TRANS_CLIENT TRANS(SocketOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER NULL, TRANS(SocketOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(SocketOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(SocketOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(SocketReopenCOTSServer), TRANS(SocketReopenCLTSServer), #endif TRANS(SocketSetOption), #ifdef TRANS_SERVER TRANS(SocketINETCreateListener), NULL, /* ResetListener */ TRANS(SocketINETAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(SocketINETConnect), #endif /* TRANS_CLIENT */ TRANS(SocketBytesReadable), TRANS(SocketRead), TRANS(SocketWrite), TRANS(SocketReadv), TRANS(SocketWritev), TRANS(SocketDisconnect), TRANS(SocketINETClose), TRANS(SocketINETClose), }; #if defined(IPv6) && defined(AF_INET6) Xtransport TRANS(SocketINET6Funcs) = { /* Socket Interface */ "inet6", 0, #ifdef TRANS_CLIENT TRANS(SocketOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER NULL, TRANS(SocketOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(SocketOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(SocketOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(SocketReopenCOTSServer), TRANS(SocketReopenCLTSServer), #endif TRANS(SocketSetOption), #ifdef TRANS_SERVER TRANS(SocketINETCreateListener), NULL, /* ResetListener */ TRANS(SocketINETAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(SocketINETConnect), #endif /* TRANS_CLIENT */ TRANS(SocketBytesReadable), TRANS(SocketRead), TRANS(SocketWrite), TRANS(SocketReadv), TRANS(SocketWritev), TRANS(SocketDisconnect), TRANS(SocketINETClose), TRANS(SocketINETClose), }; #endif /* IPv6 */ #endif /* TCPCONN */ #ifdef UNIXCONN #if !defined(LOCALCONN) Xtransport TRANS(SocketLocalFuncs) = { /* Socket Interface */ "local", #ifdef HAVE_ABSTRACT_SOCKETS TRANS_ABSTRACT, #else 0, #endif #ifdef TRANS_CLIENT TRANS(SocketOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER NULL, TRANS(SocketOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(SocketOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(SocketOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(SocketReopenCOTSServer), TRANS(SocketReopenCLTSServer), #endif TRANS(SocketSetOption), #ifdef TRANS_SERVER TRANS(SocketUNIXCreateListener), TRANS(SocketUNIXResetListener), TRANS(SocketUNIXAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(SocketUNIXConnect), #endif /* TRANS_CLIENT */ TRANS(SocketBytesReadable), TRANS(SocketRead), TRANS(SocketWrite), TRANS(SocketReadv), TRANS(SocketWritev), TRANS(SocketDisconnect), TRANS(SocketUNIXClose), TRANS(SocketUNIXCloseForCloning), }; #endif /* !LOCALCONN */ # ifdef TRANS_SERVER # if !defined(LOCALCONN) static char* unix_nolisten[] = { "local" , NULL }; # endif # endif Xtransport TRANS(SocketUNIXFuncs) = { /* Socket Interface */ "unix", #if !defined(LOCALCONN) && !defined(HAVE_ABSTRACT_SOCKETS) TRANS_ALIAS, #else 0, #endif #ifdef TRANS_CLIENT TRANS(SocketOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER #if !defined(LOCALCONN) unix_nolisten, #else NULL, #endif TRANS(SocketOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(SocketOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(SocketOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(SocketReopenCOTSServer), TRANS(SocketReopenCLTSServer), #endif TRANS(SocketSetOption), #ifdef TRANS_SERVER TRANS(SocketUNIXCreateListener), TRANS(SocketUNIXResetListener), TRANS(SocketUNIXAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(SocketUNIXConnect), #endif /* TRANS_CLIENT */ TRANS(SocketBytesReadable), TRANS(SocketRead), TRANS(SocketWrite), TRANS(SocketReadv), TRANS(SocketWritev), TRANS(SocketDisconnect), TRANS(SocketUNIXClose), TRANS(SocketUNIXCloseForCloning), }; #endif /* UNIXCONN */ 070701000a5320000081a40000000000000000000000014f86841800000b6d0000010000010007ffffffffffffffff0000002e00000000root/usr/local/include/X11/Xtrans/transport.c/* Copyright 1993, 1994, 1998 The Open Group Permission to use, copy, modify, distribute, and sell this software and its documentation for any purpose is hereby granted without fee, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation. The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. Except as contained in this notice, the name of The Open Group shall not be used in advertising or otherwise to promote the sale, use or other dealings in this Software without prior written authorization from The Open Group. * Copyright 1993, 1994 NCR Corporation - Dayton, Ohio, USA * * All Rights Reserved * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, provided * that the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name NCR not be used in advertising * or publicity pertaining to distribution of the software without specific, * written prior permission. NCR makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. * * NCR DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN * NO EVENT SHALL NCR BE LIABLE FOR ANY SPECIAL, INDIRECT OR * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS * OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ #include #define XTRANS_TRANSPORT_C /* used to flag Xtransint.h that it's being used here, not just #included in another file */ #include "Xtransint.h" #ifdef __clang__ #pragma clang diagnostic push #pragma clang diagnostic ignored "-Wformat-nonliteral" #pragma clang diagnostic ignored "-Wdeprecated-declarations" #endif #ifdef LOCALCONN #include "Xtranslcl.c" #endif #if defined(TCPCONN) || defined(UNIXCONN) #include "Xtranssock.c" #endif #ifdef STREAMSCONN #include "Xtranstli.c" #endif #include "Xtrans.c" #include "Xtransutil.c" #ifdef __clang__ #pragma clang diagnostic pop #endif 070701000a531a000081a40000000000000000000000014f868418000024f00000010000010007ffffffffffffffff0000002b00000000root/usr/local/include/X11/Xtrans/Xtrans.h/* Copyright 1993, 1994, 1998 The Open Group Permission to use, copy, modify, distribute, and sell this software and its documentation for any purpose is hereby granted without fee, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation. The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. Except as contained in this notice, the name of The Open Group shall not be used in advertising or otherwise to promote the sale, use or other dealings in this Software without prior written authorization from The Open Group. * Copyright 1993, 1994 NCR Corporation - Dayton, Ohio, USA * * All Rights Reserved * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, provided * that the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name NCR not be used in advertising * or publicity pertaining to distribution of the software without specific, * written prior permission. NCR makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. * * NCR DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN * NO EVENT SHALL NCR BE LIABLE FOR ANY SPECIAL, INDIRECT OR * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS * OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ #ifndef _XTRANS_H_ #define _XTRANS_H_ #include #include #ifndef WIN32 #include #endif #ifdef __clang__ /* Not all clients make use of all provided statics */ #pragma clang diagnostic push #pragma clang diagnostic ignored "-Wunused-function" #endif /* * Set the functions names according to where this code is being compiled. */ #ifdef X11_t #define TRANS(func) _X11Trans##func #ifdef XTRANSDEBUG static const char *__xtransname = "_X11Trans"; #endif #endif /* X11_t */ #ifdef XSERV_t #define TRANS(func) _XSERVTrans##func #ifdef XTRANSDEBUG static const char *__xtransname = "_XSERVTrans"; #endif #define X11_t #endif /* XSERV_t */ #ifdef XIM_t #define TRANS(func) _XimXTrans##func #ifdef XTRANSDEBUG static const char *__xtransname = "_XimTrans"; #endif #endif /* XIM_t */ #ifdef FS_t #define TRANS(func) _FSTrans##func #ifdef XTRANSDEBUG static const char *__xtransname = "_FSTrans"; #endif #endif /* FS_t */ #ifdef FONT_t #define TRANS(func) _FontTrans##func #ifdef XTRANSDEBUG static const char *__xtransname = "_FontTrans"; #endif #endif /* FONT_t */ #ifdef ICE_t #define TRANS(func) _IceTrans##func #ifdef XTRANSDEBUG static const char *__xtransname = "_IceTrans"; #endif #endif /* ICE_t */ #ifdef TEST_t #define TRANS(func) _TESTTrans##func #ifdef XTRANSDEBUG static const char *__xtransname = "_TESTTrans"; #endif #endif /* TEST_t */ #ifdef LBXPROXY_t #define TRANS(func) _LBXPROXYTrans##func #define X11_t /* The server defines this - so should the LBX proxy */ #ifdef XTRANSDEBUG static const char *__xtransname = "_LBXPROXYTrans"; #endif #endif /* LBXPROXY_t */ #if !defined(TRANS) #define TRANS(func) _XTrans##func #ifdef XTRANSDEBUG static const char *__xtransname = "_XTrans"; #endif #endif /* !TRANS */ #ifdef __clang__ #pragma clang diagnostic pop #endif /* * Create a single address structure that can be used wherever * an address structure is needed. struct sockaddr is not big enough * to hold a sockadd_un, so we create this definition to have a single * structure that is big enough for all the structures we might need. * * This structure needs to be independent of the socket/TLI interface used. */ #if defined(IPv6) && defined(AF_INET6) typedef struct sockaddr_storage Xtransaddr; #else #define XTRANS_MAX_ADDR_LEN 128 /* large enough to hold sun_path */ typedef struct { unsigned char addr[XTRANS_MAX_ADDR_LEN]; } Xtransaddr; #endif #ifdef LONG64 typedef int BytesReadable_t; #else typedef long BytesReadable_t; #endif #if defined(WIN32) || defined(USG) /* * TRANS(Readv) and TRANS(Writev) use struct iovec, normally found * in Berkeley systems in . See the readv(2) and writev(2) * manual pages for details. */ struct iovec { caddr_t iov_base; int iov_len; }; #else #include #endif typedef struct _XtransConnInfo *XtransConnInfo; /* * Transport Option definitions */ #define TRANS_NONBLOCKING 1 #define TRANS_CLOSEONEXEC 2 /* * Return values of Connect (0 is success) */ #define TRANS_CONNECT_FAILED -1 #define TRANS_TRY_CONNECT_AGAIN -2 #define TRANS_IN_PROGRESS -3 /* * Return values of CreateListener (0 is success) */ #define TRANS_CREATE_LISTENER_FAILED -1 #define TRANS_ADDR_IN_USE -2 /* * Return values of Accept (0 is success) */ #define TRANS_ACCEPT_BAD_MALLOC -1 #define TRANS_ACCEPT_FAILED -2 #define TRANS_ACCEPT_MISC_ERROR -3 /* * ResetListener return values */ #define TRANS_RESET_NOOP 1 #define TRANS_RESET_NEW_FD 2 #define TRANS_RESET_FAILURE 3 /* * Function prototypes for the exposed interface */ void TRANS(FreeConnInfo) ( XtransConnInfo /* ciptr */ ); #ifdef TRANS_CLIENT XtransConnInfo TRANS(OpenCOTSClient)( char * /* address */ ); #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER XtransConnInfo TRANS(OpenCOTSServer)( char * /* address */ ); #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT XtransConnInfo TRANS(OpenCLTSClient)( char * /* address */ ); #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER XtransConnInfo TRANS(OpenCLTSServer)( char * /* address */ ); #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN XtransConnInfo TRANS(ReopenCOTSServer)( int, /* trans_id */ int, /* fd */ char * /* port */ ); XtransConnInfo TRANS(ReopenCLTSServer)( int, /* trans_id */ int, /* fd */ char * /* port */ ); int TRANS(GetReopenInfo)( XtransConnInfo, /* ciptr */ int *, /* trans_id */ int *, /* fd */ char ** /* port */ ); #endif /* TRANS_REOPEN */ int TRANS(SetOption)( XtransConnInfo, /* ciptr */ int, /* option */ int /* arg */ ); #ifdef TRANS_SERVER int TRANS(CreateListener)( XtransConnInfo, /* ciptr */ char *, /* port */ unsigned int /* flags */ ); int TRANS(NoListen) ( const char* /* protocol*/ ); int TRANS(ResetListener)( XtransConnInfo /* ciptr */ ); XtransConnInfo TRANS(Accept)( XtransConnInfo, /* ciptr */ int * /* status */ ); #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT int TRANS(Connect)( XtransConnInfo, /* ciptr */ char * /* address */ ); #endif /* TRANS_CLIENT */ int TRANS(BytesReadable)( XtransConnInfo, /* ciptr */ BytesReadable_t * /* pend */ ); int TRANS(Read)( XtransConnInfo, /* ciptr */ char *, /* buf */ int /* size */ ); int TRANS(Write)( XtransConnInfo, /* ciptr */ char *, /* buf */ int /* size */ ); int TRANS(Readv)( XtransConnInfo, /* ciptr */ struct iovec *, /* buf */ int /* size */ ); int TRANS(Writev)( XtransConnInfo, /* ciptr */ struct iovec *, /* buf */ int /* size */ ); int TRANS(Disconnect)( XtransConnInfo /* ciptr */ ); int TRANS(Close)( XtransConnInfo /* ciptr */ ); int TRANS(CloseForCloning)( XtransConnInfo /* ciptr */ ); int TRANS(IsLocal)( XtransConnInfo /* ciptr */ ); int TRANS(GetMyAddr)( XtransConnInfo, /* ciptr */ int *, /* familyp */ int *, /* addrlenp */ Xtransaddr ** /* addrp */ ); int TRANS(GetPeerAddr)( XtransConnInfo, /* ciptr */ int *, /* familyp */ int *, /* addrlenp */ Xtransaddr ** /* addrp */ ); int TRANS(GetConnectionNumber)( XtransConnInfo /* ciptr */ ); #ifdef TRANS_SERVER int TRANS(MakeAllCOTSServerListeners)( char *, /* port */ int *, /* partial */ int *, /* count_ret */ XtransConnInfo ** /* ciptrs_ret */ ); int TRANS(MakeAllCLTSServerListeners)( char *, /* port */ int *, /* partial */ int *, /* count_ret */ XtransConnInfo ** /* ciptrs_ret */ ); #endif /* TRANS_SERVER */ /* * Function Prototypes for Utility Functions. */ #ifdef X11_t int TRANS(ConvertAddress)( int *, /* familyp */ int *, /* addrlenp */ Xtransaddr ** /* addrp */ ); #endif /* X11_t */ #ifdef ICE_t char * TRANS(GetMyNetworkId)( XtransConnInfo /* ciptr */ ); char * TRANS(GetPeerNetworkId)( XtransConnInfo /* ciptr */ ); #endif /* ICE_t */ int TRANS(GetHostname) ( char * /* buf */, int /* maxlen */ ); #if defined(WIN32) && defined(TCPCONN) int TRANS(WSAStartup)(); #endif #endif /* _XTRANS_H_ */ 070701000a531c000081a40000000000000000000000014f8684180000dccb0000010000010007ffffffffffffffff0000002e00000000root/usr/local/include/X11/Xtrans/Xtranslcl.c/* Copyright 1993, 1994, 1998 The Open Group Permission to use, copy, modify, distribute, and sell this software and its documentation for any purpose is hereby granted without fee, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation. The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. Except as contained in this notice, the name of The Open Group shall not be used in advertising or otherwise to promote the sale, use or other dealings in this Software without prior written authorization from The Open Group. * Copyright 1993, 1994 NCR Corporation - Dayton, Ohio, USA * * All Rights Reserved * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, provided * that the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name NCR not be used in advertising * or publicity pertaining to distribution of the software without specific, * written prior permission. NCR makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. * * NCR DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN * NO EVENT SHALL NCR BE LIABLE FOR ANY SPECIAL, INDIRECT OR * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS * OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ /* * * The connection code/ideas in lib/X and server/os for SVR4/Intel * environments was contributed by the following companies/groups: * * MetroLink Inc * NCR * Pittsburgh Powercomputing Corporation (PPc)/Quarterdeck Office Systems * SGCS * Unix System Laboratories (USL) / Novell * XFree86 * * The goal is to have common connection code among all SVR4/Intel vendors. * * ALL THE ABOVE COMPANIES DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS * SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, * IN NO EVENT SHALL THESE COMPANIES * BE LIABLE FOR ANY SPECIAL, INDIRECT * OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS * OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE * OR PERFORMANCE OF THIS SOFTWARE. */ #include #include #include #include #include #if defined(SVR4) || defined(__SVR4) #include #endif #ifdef sun # include #else # include #endif #include #include /* * The local transports should be treated the same as a UNIX domain socket * wrt authentication, etc. Because of this, we will use struct sockaddr_un * for the address format. This will simplify the code in other places like * The X Server. */ #include #ifndef X_NO_SYS_UN #include #endif /* Types of local connections supported: * - PTS * - named pipes * - SCO */ #if !defined(sun) # define LOCAL_TRANS_PTS #endif #if defined(SVR4) || defined(__SVR4) # define LOCAL_TRANS_NAMED #endif #if defined(__SCO__) || defined(__UNIXWARE__) # define LOCAL_TRANS_SCO #endif static int TRANS(LocalClose)(XtransConnInfo ciptr); /* * These functions actually implement the local connection mechanisms. */ /* Type Not Supported */ static int TRANS(OpenFail)(XtransConnInfo ciptr _X_UNUSED, char *port _X_UNUSED) { return -1; } #ifdef TRANS_REOPEN static int TRANS(ReopenFail)(XtransConnInfo ciptr _X_UNUSED, int fd _X_UNUSED, char *port _X_UNUSED) { return 0; } #endif /* TRANS_REOPEN */ static int TRANS(FillAddrInfo)(XtransConnInfo ciptr, char *sun_path, char *peer_sun_path) { struct sockaddr_un *sunaddr; struct sockaddr_un *p_sunaddr; ciptr->family = AF_UNIX; ciptr->addrlen = sizeof (struct sockaddr_un); if ((sunaddr = malloc (ciptr->addrlen)) == NULL) { prmsg(1,"FillAddrInfo: failed to allocate memory for addr\n"); return 0; } sunaddr->sun_family = AF_UNIX; if (strlen(sun_path) > sizeof(sunaddr->sun_path) - 1) { prmsg(1, "FillAddrInfo: path too long\n"); free((char *) sunaddr); return 0; } strcpy (sunaddr->sun_path, sun_path); #if defined(BSD44SOCKETS) sunaddr->sun_len = strlen (sunaddr->sun_path); #endif ciptr->addr = (char *) sunaddr; ciptr->peeraddrlen = sizeof (struct sockaddr_un); if ((p_sunaddr = malloc (ciptr->peeraddrlen)) == NULL) { prmsg(1, "FillAddrInfo: failed to allocate memory for peer addr\n"); free (sunaddr); ciptr->addr = NULL; return 0; } p_sunaddr->sun_family = AF_UNIX; if (strlen(peer_sun_path) > sizeof(p_sunaddr->sun_path) - 1) { prmsg(1, "FillAddrInfo: peer path too long\n"); free((char *) p_sunaddr); return 0; } strcpy (p_sunaddr->sun_path, peer_sun_path); #if defined(BSD44SOCKETS) p_sunaddr->sun_len = strlen (p_sunaddr->sun_path); #endif ciptr->peeraddr = (char *) p_sunaddr; return 1; } #ifdef LOCAL_TRANS_PTS /* PTS */ #if defined(SYSV) && !defined(__SCO__) #define SIGNAL_T int #else #define SIGNAL_T void #endif /* SYSV */ typedef SIGNAL_T (*PFV)(); extern PFV signal(); extern char *ptsname( int ); static void _dummy(int sig _X_UNUSED) { } #endif /* LOCAL_TRANS_PTS */ #ifndef sun #define X_STREAMS_DIR "/dev/X" #define DEV_SPX "/dev/spx" #else #ifndef X11_t #define X_STREAMS_DIR "/dev/X" #else #define X_STREAMS_DIR "/tmp/.X11-pipe" #endif #endif #define DEV_PTMX "/dev/ptmx" #if defined(X11_t) #define PTSNODENAME "/dev/X/server." #ifdef sun #define NAMEDNODENAME "/tmp/.X11-pipe/X" #else #define NAMEDNODENAME "/dev/X/Nserver." #define SCORNODENAME "/dev/X%1sR" #define SCOSNODENAME "/dev/X%1sS" #endif /* !sun */ #endif #if defined(XIM_t) #ifdef sun #define NAMEDNODENAME "/tmp/.XIM-pipe/XIM" #else #define PTSNODENAME "/dev/X/XIM." #define NAMEDNODENAME "/dev/X/NXIM." #define SCORNODENAME "/dev/XIM.%sR" #define SCOSNODENAME "/dev/XIM.%sS" #endif #endif #if defined(FS_t) || defined (FONT_t) #ifdef sun #define NAMEDNODENAME "/tmp/.font-pipe/fs" #else /* * USL has already defined something here. We need to check with them * and see if their choice is usable here. */ #define PTSNODENAME "/dev/X/fontserver." #define NAMEDNODENAME "/dev/X/Nfontserver." #define SCORNODENAME "/dev/fontserver.%sR" #define SCOSNODENAME "/dev/fontserver.%sS" #endif #endif #if defined(ICE_t) #ifdef sun #define NAMEDNODENAME "/tmp/.ICE-pipe/" #else #define PTSNODENAME "/dev/X/ICE." #define NAMEDNODENAME "/dev/X/NICE." #define SCORNODENAME "/dev/ICE.%sR" #define SCOSNODENAME "/dev/ICE.%sS" #endif #endif #if defined(TEST_t) #ifdef sun #define NAMEDNODENAME "/tmp/.Test-unix/test" #endif #define PTSNODENAME "/dev/X/transtest." #define NAMEDNODENAME "/dev/X/Ntranstest." #define SCORNODENAME "/dev/transtest.%sR" #define SCOSNODENAME "/dev/transtest.%sS" #endif #ifdef LOCAL_TRANS_PTS #ifdef TRANS_CLIENT static int TRANS(PTSOpenClient)(XtransConnInfo ciptr, char *port) { #ifdef PTSNODENAME int fd,server,exitval,alarm_time,ret; char server_path[64]; char *slave, namelen; char buf[20]; /* MAX_PATH_LEN?? */ PFV savef; pid_t saved_pid; #endif prmsg(2,"PTSOpenClient(%s)\n", port); #if !defined(PTSNODENAME) prmsg(1,"PTSOpenClient: Protocol is not supported by a pts connection\n"); return -1; #else if (port && *port ) { if( *port == '/' ) { /* A full pathname */ snprintf(server_path, sizeof(server_path), "%s", port); } else { snprintf(server_path, sizeof(server_path), "%s%s", PTSNODENAME, port); } } else { snprintf(server_path, sizeof(server_path), "%s%d", PTSNODENAME, getpid()); } /* * Open the node the on which the server is listening. */ if ((server = open (server_path, O_RDWR)) < 0) { prmsg(1,"PTSOpenClient: failed to open %s\n", server_path); return -1; } /* * Open the streams based pipe that will be this connection. */ if ((fd = open(DEV_PTMX, O_RDWR)) < 0) { prmsg(1,"PTSOpenClient: failed to open %s\n", DEV_PTMX); close(server); return(-1); } (void) grantpt(fd); (void) unlockpt(fd); slave = ptsname(fd); /* get name */ if( slave == NULL ) { prmsg(1,"PTSOpenClient: failed to get ptsname()\n"); close(fd); close(server); return -1; } /* * This is neccesary for the case where a program is setuid to non-root. * grantpt() calls /usr/lib/pt_chmod which is set-uid root. This program will * set the owner of the pt device incorrectly if the uid is not restored * before it is called. The problem is that once it gets restored, it * cannot be changed back to its original condition, hence the fork(). */ if(!(saved_pid=fork())) { uid_t saved_euid; saved_euid = geteuid(); /** sets the euid to the actual/real uid **/ if (setuid( getuid() ) == -1) { exit(1); } if( chown( slave, saved_euid, -1 ) < 0 ) { exit( 1 ); } exit( 0 ); } waitpid(saved_pid, &exitval, 0); if (WIFEXITED(exitval) && WEXITSTATUS(exitval) != 0) { close(fd); close(server); prmsg(1, "PTSOpenClient: cannot set the owner of %s\n", slave); return(-1); } if (chmod(slave, 0666) < 0) { close(fd); close(server); prmsg(1,"PTSOpenClient: Cannot chmod %s\n", slave); return(-1); } /* * write slave name to server */ namelen = strlen(slave); buf[0] = namelen; (void) sprintf(&buf[1], slave); (void) write(server, buf, namelen+1); (void) close(server); /* * wait for server to respond */ savef = signal(SIGALRM, _dummy); alarm_time = alarm (30); /* CONNECT_TIMEOUT */ ret = read(fd, buf, 1); (void) alarm(alarm_time); (void) signal(SIGALRM, savef); if (ret != 1) { prmsg(1, "PTSOpenClient: failed to get acknoledgement from server\n"); (void) close(fd); fd = -1; } /* * Everything looks good: fill in the XtransConnInfo structure. */ if (TRANS(FillAddrInfo) (ciptr, slave, server_path) == 0) { prmsg(1,"PTSOpenClient: failed to fill in addr info\n"); close(fd); return -1; } return(fd); #endif /* !PTSNODENAME */ } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER static int TRANS(PTSOpenServer)(XtransConnInfo ciptr, char *port) { #ifdef PTSNODENAME int fd, server; char server_path[64], *slave; int mode; #endif prmsg(2,"PTSOpenServer(%s)\n", port); #if !defined(PTSNODENAME) prmsg(1,"PTSOpenServer: Protocol is not supported by a pts connection\n"); return -1; #else if (port && *port ) { if( *port == '/' ) { /* A full pathname */ (void) sprintf(server_path, "%s", port); } else { (void) sprintf(server_path, "%s%s", PTSNODENAME, port); } } else { (void) sprintf(server_path, "%s%d", PTSNODENAME, getpid()); } #ifdef HAS_STICKY_DIR_BIT mode = 01777; #else mode = 0777; #endif if (trans_mkdir(X_STREAMS_DIR, mode) == -1) { prmsg (1, "PTSOpenServer: mkdir(%s) failed, errno = %d\n", X_STREAMS_DIR, errno); return(-1); } #if 0 if( (fd=open(server_path, O_RDWR)) >= 0 ) { /* * This doesn't prevent the server from starting up, and doesn't * prevent clients from trying to connect to the in-use PTS (which * is often in use by something other than another server). */ prmsg(1, "PTSOpenServer: A server is already running on port %s\n", port); prmsg(1, "PTSOpenServer: Remove %s if this is incorrect.\n", server_path); close(fd); return(-1); } #else /* Just remove the old path (which is what happens with UNIXCONN) */ #endif unlink(server_path); if( (fd=open(DEV_PTMX, O_RDWR)) < 0) { prmsg(1, "PTSOpenServer: Unable to open %s\n", DEV_PTMX); return(-1); } grantpt(fd); unlockpt(fd); if( (slave=ptsname(fd)) == NULL) { prmsg(1, "PTSOpenServer: Unable to get slave device name\n"); close(fd); return(-1); } if( link(slave,server_path) < 0 ) { prmsg(1, "PTSOpenServer: Unable to link %s to %s\n", slave, server_path); close(fd); return(-1); } if( chmod(server_path, 0666) < 0 ) { prmsg(1, "PTSOpenServer: Unable to chmod %s to 0666\n", server_path); close(fd); return(-1); } if( (server=open(server_path, O_RDWR)) < 0 ) { prmsg(1, "PTSOpenServer: Unable to open server device %s\n", server_path); close(fd); return(-1); } close(server); /* * Everything looks good: fill in the XtransConnInfo structure. */ if (TRANS(FillAddrInfo) (ciptr, server_path, server_path) == 0) { prmsg(1,"PTSOpenServer: failed to fill in addr info\n"); close(fd); return -1; } return fd; #endif /* !PTSNODENAME */ } static int TRANS(PTSAccept)(XtransConnInfo ciptr, XtransConnInfo newciptr, int *status) { int newfd; int in; unsigned char length; char buf[256]; struct sockaddr_un *sunaddr; prmsg(2,"PTSAccept(%x->%d)\n",ciptr,ciptr->fd); if( (in=read(ciptr->fd,&length,1)) <= 0 ){ if( !in ) { prmsg(2, "PTSAccept: Incoming connection closed\n"); } else { prmsg(1, "PTSAccept: Error reading incoming connection. errno=%d \n", errno); } *status = TRANS_ACCEPT_MISC_ERROR; return -1; } if( (in=read(ciptr->fd,buf,length)) <= 0 ){ if( !in ) { prmsg(2, "PTSAccept: Incoming connection closed\n"); } else { prmsg(1, "PTSAccept: Error reading device name for new connection. errno=%d \n", errno); } *status = TRANS_ACCEPT_MISC_ERROR; return -1; } buf[length] = '\0'; if( (newfd=open(buf,O_RDWR)) < 0 ) { prmsg(1, "PTSAccept: Failed to open %s\n",buf); *status = TRANS_ACCEPT_MISC_ERROR; return -1; } write(newfd,"1",1); /* * Everything looks good: fill in the XtransConnInfo structure. */ newciptr->addrlen=ciptr->addrlen; if( (newciptr->addr = malloc(newciptr->addrlen)) == NULL ) { prmsg(1,"PTSAccept: failed to allocate memory for peer addr\n"); close(newfd); *status = TRANS_ACCEPT_BAD_MALLOC; return -1; } memcpy(newciptr->addr,ciptr->addr,newciptr->addrlen); newciptr->peeraddrlen=sizeof(struct sockaddr_un); if( (sunaddr = malloc(newciptr->peeraddrlen)) == NULL ) { prmsg(1,"PTSAccept: failed to allocate memory for peer addr\n"); free(newciptr->addr); close(newfd); *status = TRANS_ACCEPT_BAD_MALLOC; return -1; } sunaddr->sun_family=AF_UNIX; strcpy(sunaddr->sun_path,buf); #if defined(BSD44SOCKETS) sunaddr->sun_len=strlen(sunaddr->sun_path); #endif newciptr->peeraddr=(char *)sunaddr; *status = 0; return newfd; } #endif /* TRANS_SERVER */ #endif /* LOCAL_TRANS_PTS */ #ifdef LOCAL_TRANS_NAMED /* NAMED */ #ifdef TRANS_CLIENT static int TRANS(NAMEDOpenClient)(XtransConnInfo ciptr, char *port) { #ifdef NAMEDNODENAME int fd; char server_path[64]; struct stat filestat; # ifndef sun extern int isastream(int); # endif #endif prmsg(2,"NAMEDOpenClient(%s)\n", port); #if !defined(NAMEDNODENAME) prmsg(1,"NAMEDOpenClient: Protocol is not supported by a NAMED connection\n"); return -1; #else if ( port && *port ) { if( *port == '/' ) { /* A full pathname */ (void) snprintf(server_path, sizeof(server_path), "%s", port); } else { (void) snprintf(server_path, sizeof(server_path), "%s%s", NAMEDNODENAME, port); } } else { (void) snprintf(server_path, sizeof(server_path), "%s%ld", NAMEDNODENAME, (long)getpid()); } if ((fd = open(server_path, O_RDWR)) < 0) { prmsg(1,"NAMEDOpenClient: Cannot open %s for NAMED connection\n", server_path); return -1; } if (fstat(fd, &filestat) < 0 ) { prmsg(1,"NAMEDOpenClient: Cannot stat %s for NAMED connection\n", server_path); (void) close(fd); return -1; } if ((filestat.st_mode & S_IFMT) != S_IFIFO) { prmsg(1,"NAMEDOpenClient: Device %s is not a FIFO\n", server_path); /* Is this really a failure? */ (void) close(fd); return -1; } if (isastream(fd) <= 0) { prmsg(1,"NAMEDOpenClient: %s is not a streams device\n", server_path); (void) close(fd); return -1; } /* * Everything looks good: fill in the XtransConnInfo structure. */ if (TRANS(FillAddrInfo) (ciptr, server_path, server_path) == 0) { prmsg(1,"NAMEDOpenClient: failed to fill in addr info\n"); close(fd); return -1; } return(fd); #endif /* !NAMEDNODENAME */ } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER #ifdef NAMEDNODENAME static int TRANS(NAMEDOpenPipe)(const char *server_path) { int fd, pipefd[2]; struct stat sbuf; int mode; prmsg(2,"NAMEDOpenPipe(%s)\n", server_path); #ifdef HAS_STICKY_DIR_BIT mode = 01777; #else mode = 0777; #endif if (trans_mkdir(X_STREAMS_DIR, mode) == -1) { prmsg (1, "NAMEDOpenPipe: mkdir(%s) failed, errno = %d\n", X_STREAMS_DIR, errno); return(-1); } if(stat(server_path, &sbuf) != 0) { if (errno == ENOENT) { if ((fd = creat(server_path, (mode_t)0666)) == -1) { prmsg(1, "NAMEDOpenPipe: Can't open %s\n", server_path); return(-1); } close(fd); if (chmod(server_path, (mode_t)0666) < 0) { prmsg(1, "NAMEDOpenPipe: Can't open %s\n", server_path); return(-1); } } else { prmsg(1, "NAMEDOpenPipe: stat on %s failed\n", server_path); return(-1); } } if( pipe(pipefd) != 0) { prmsg(1, "NAMEDOpenPipe: pipe() failed, errno=%d\n",errno); return(-1); } if( ioctl(pipefd[0], I_PUSH, "connld") != 0) { prmsg(1, "NAMEDOpenPipe: ioctl(I_PUSH,\"connld\") failed, errno=%d\n",errno); close(pipefd[0]); close(pipefd[1]); return(-1); } if( fattach(pipefd[0], server_path) != 0) { prmsg(1, "NAMEDOpenPipe: fattach(%s) failed, errno=%d\n", server_path,errno); close(pipefd[0]); close(pipefd[1]); return(-1); } return(pipefd[1]); } #endif static int TRANS(NAMEDOpenServer)(XtransConnInfo ciptr, char *port) { #ifdef NAMEDNODENAME int fd; char server_path[64]; #endif prmsg(2,"NAMEDOpenServer(%s)\n", port); #if !defined(NAMEDNODENAME) prmsg(1,"NAMEDOpenServer: Protocol is not supported by a NAMED connection\n"); return -1; #else if ( port && *port ) { if( *port == '/' ) { /* A full pathname */ (void) snprintf(server_path, sizeof(server_path), "%s", port); } else { (void) snprintf(server_path, sizeof(server_path), "%s%s", NAMEDNODENAME, port); } } else { (void) snprintf(server_path, sizeof(server_path), "%s%ld", NAMEDNODENAME, (long)getpid()); } fd = TRANS(NAMEDOpenPipe)(server_path); if (fd < 0) { return -1; } /* * Everything looks good: fill in the XtransConnInfo structure. */ if (TRANS(FillAddrInfo) (ciptr, server_path, server_path) == 0) { prmsg(1,"NAMEDOpenServer: failed to fill in addr info\n"); TRANS(LocalClose)(ciptr); return -1; } return fd; #endif /* !NAMEDNODENAME */ } static int TRANS(NAMEDResetListener) (XtransConnInfo ciptr) { struct sockaddr_un *sockname=(struct sockaddr_un *) ciptr->addr; struct stat statb; prmsg(2,"NAMEDResetListener(%p, %d)\n", ciptr, ciptr->fd); if (ciptr->fd != -1) { /* * see if the pipe has disappeared */ if (stat (sockname->sun_path, &statb) == -1 || (statb.st_mode & S_IFMT) != S_IFIFO) { prmsg(3, "Pipe %s trashed, recreating\n", sockname->sun_path); TRANS(LocalClose)(ciptr); ciptr->fd = TRANS(NAMEDOpenPipe)(sockname->sun_path); if (ciptr->fd >= 0) return TRANS_RESET_NEW_FD; else return TRANS_CREATE_LISTENER_FAILED; } } return TRANS_RESET_NOOP; } static int TRANS(NAMEDAccept)(XtransConnInfo ciptr, XtransConnInfo newciptr, int *status) { struct strrecvfd str; prmsg(2,"NAMEDAccept(%p->%d)\n", ciptr, ciptr->fd); if( ioctl(ciptr->fd, I_RECVFD, &str ) < 0 ) { prmsg(1, "NAMEDAccept: ioctl(I_RECVFD) failed, errno=%d\n", errno); *status = TRANS_ACCEPT_MISC_ERROR; return(-1); } /* * Everything looks good: fill in the XtransConnInfo structure. */ newciptr->family=ciptr->family; newciptr->addrlen=ciptr->addrlen; if( (newciptr->addr = malloc(newciptr->addrlen)) == NULL ) { prmsg(1, "NAMEDAccept: failed to allocate memory for pipe addr\n"); close(str.fd); *status = TRANS_ACCEPT_BAD_MALLOC; return -1; } memcpy(newciptr->addr,ciptr->addr,newciptr->addrlen); newciptr->peeraddrlen=newciptr->addrlen; if( (newciptr->peeraddr = malloc(newciptr->peeraddrlen)) == NULL ) { prmsg(1, "NAMEDAccept: failed to allocate memory for peer addr\n"); free(newciptr->addr); close(str.fd); *status = TRANS_ACCEPT_BAD_MALLOC; return -1; } memcpy(newciptr->peeraddr,newciptr->addr,newciptr->peeraddrlen); *status = 0; return str.fd; } #endif /* TRANS_SERVER */ #endif /* LOCAL_TRANS_NAMED */ #if defined(LOCAL_TRANS_SCO) /* * connect_spipe is used by the SCO connection type. */ static int connect_spipe(int fd1, int fd2) { long temp; struct strfdinsert sbuf; sbuf.databuf.maxlen = -1; sbuf.databuf.len = -1; sbuf.databuf.buf = NULL; sbuf.ctlbuf.maxlen = sizeof(long); sbuf.ctlbuf.len = sizeof(long); sbuf.ctlbuf.buf = (caddr_t)&temp; sbuf.offset = 0; sbuf.fildes = fd2; sbuf.flags = 0; if( ioctl(fd1, I_FDINSERT, &sbuf) < 0 ) return(-1); return(0); } /* * named_spipe is used by the SCO connection type. */ static int named_spipe(int fd, char *path) { int oldUmask, ret; struct stat sbuf; oldUmask = umask(0); (void) fstat(fd, &sbuf); ret = mknod(path, 0020666, sbuf.st_rdev); umask(oldUmask); if (ret < 0) { ret = -1; } else { ret = fd; } return(ret); } #endif /* defined(LOCAL_TRANS_SCO) */ #ifdef LOCAL_TRANS_SCO /* SCO */ /* * 2002-11-09 (jkj@sco.com) * * This code has been modified to match what is in the actual SCO X server. * This greatly helps inter-operability between X11R6 and X11R5 (the native * SCO server). Mainly, it relies on streams nodes existing in /dev, not * creating them or unlinking them, which breaks the native X server. * * However, this is only for the X protocol. For all other protocols, we * do in fact create the nodes, as only X11R6 will use them, and this makes * it possible to have both types of clients running, otherwise we get all * kinds of nasty errors on startup for anything that doesnt use the X * protocol (like SM, when KDE starts up). */ #ifdef TRANS_CLIENT static int TRANS(SCOOpenClient)(XtransConnInfo ciptr, char *port) { #ifdef SCORNODENAME int fd, server, fl, ret; char server_path[64]; struct strbuf ctlbuf; unsigned long alarm_time; void (*savef)(); long temp; extern int getmsg(), putmsg(); #endif prmsg(2,"SCOOpenClient(%s)\n", port); if (!port || !port[0]) port = "0"; #if !defined(SCORNODENAME) prmsg(2,"SCOOpenClient: Protocol is not supported by a SCO connection\n"); return -1; #else (void) sprintf(server_path, SCORNODENAME, port); if ((server = open(server_path, O_RDWR)) < 0) { prmsg(1,"SCOOpenClient: failed to open %s\n", server_path); return -1; } if ((fd = open(DEV_SPX, O_RDWR)) < 0) { prmsg(1,"SCOOpenClient: failed to open %s\n", DEV_SPX); close(server); return -1; } (void) write(server, &server, 1); ctlbuf.len = 0; ctlbuf.maxlen = sizeof(long); ctlbuf.buf = (caddr_t)&temp; fl = 0; savef = signal(SIGALRM, _dummy); alarm_time = alarm(10); ret = getmsg(server, &ctlbuf, 0, &fl); (void) alarm(alarm_time); (void) signal(SIGALRM, savef); if (ret < 0) { prmsg(1,"SCOOpenClient: error from getmsg\n"); close(fd); close(server); return -1; } /* The msg we got via getmsg is the result of an * I_FDINSERT, so if we do a putmsg with whatever * we recieved, we're doing another I_FDINSERT ... */ (void) putmsg(fd, &ctlbuf, 0, 0); (void) fcntl(fd,F_SETFL,fcntl(fd,F_GETFL,0)|O_NDELAY); (void) close(server); /* * Everything looks good: fill in the XtransConnInfo structure. */ #if defined(X11_t) && defined(__SCO__) ciptr->flags |= TRANS_NOUNLINK; #endif if (TRANS(FillAddrInfo) (ciptr, server_path, server_path) == 0) { prmsg(1,"SCOOpenClient: failed to fill addr info\n"); close(fd); return -1; } return(fd); #endif /* !SCORNODENAME */ } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER static int TRANS(SCOOpenServer)(XtransConnInfo ciptr, char *port) { #ifdef SCORNODENAME char serverR_path[64]; char serverS_path[64]; struct flock mylock; int fdr = -1; int fds = -1; #endif prmsg(2,"SCOOpenServer(%s)\n", port); if (!port || !port[0]) port = "0"; #if !defined(SCORNODENAME) prmsg(1,"SCOOpenServer: Protocol is not supported by a SCO connection\n"); return -1; #else (void) sprintf(serverR_path, SCORNODENAME, port); (void) sprintf(serverS_path, SCOSNODENAME, port); #if !defined(X11_t) || !defined(__SCO__) unlink(serverR_path); unlink(serverS_path); if ((fds = open(DEV_SPX, O_RDWR)) < 0 || (fdr = open(DEV_SPX, O_RDWR)) < 0 ) { prmsg(1,"SCOOpenServer: failed to open %s\n", DEV_SPX); if (fds >= 0) close(fds); if (fdr >= 0) close(fdr); return -1; } if (named_spipe (fds, serverS_path) == -1) { prmsg(1,"SCOOpenServer: failed to create %s\n", serverS_path); close (fdr); close (fds); return -1; } if (named_spipe (fdr, serverR_path) == -1) { prmsg(1,"SCOOpenServer: failed to create %s\n", serverR_path); close (fdr); close (fds); return -1; } #else /* X11_t */ fds = open (serverS_path, O_RDWR | O_NDELAY); if (fds < 0) { prmsg(1,"SCOOpenServer: failed to open %s\n", serverS_path); return -1; } /* * Lock the connection device for the duration of the server. * This resolves multiple server starts especially on SMP machines. */ mylock.l_type = F_WRLCK; mylock.l_whence = 0; mylock.l_start = 0; mylock.l_len = 0; if (fcntl (fds, F_SETLK, &mylock) < 0) { prmsg(1,"SCOOpenServer: failed to lock %s\n", serverS_path); close (fds); return -1; } fdr = open (serverR_path, O_RDWR | O_NDELAY); if (fdr < 0) { prmsg(1,"SCOOpenServer: failed to open %s\n", serverR_path); close (fds); return -1; } #endif /* X11_t */ if (connect_spipe(fds, fdr)) { prmsg(1,"SCOOpenServer: ioctl(I_FDINSERT) failed on %s\n", serverS_path); close (fdr); close (fds); return -1; } /* * Everything looks good: fill in the XtransConnInfo structure. */ #if defined(X11_t) && defined(__SCO__) ciptr->flags |= TRANS_NOUNLINK; #endif if (TRANS(FillAddrInfo) (ciptr, serverS_path, serverR_path) == 0) { prmsg(1,"SCOOpenServer: failed to fill in addr info\n"); close(fds); close(fdr); return -1; } return(fds); #endif /* !SCORNODENAME */ } static int TRANS(SCOAccept)(XtransConnInfo ciptr, XtransConnInfo newciptr, int *status) { char c; int fd; prmsg(2,"SCOAccept(%d)\n", ciptr->fd); if (read(ciptr->fd, &c, 1) < 0) { prmsg(1,"SCOAccept: can't read from client\n"); *status = TRANS_ACCEPT_MISC_ERROR; return(-1); } if( (fd = open(DEV_SPX, O_RDWR)) < 0 ) { prmsg(1,"SCOAccept: can't open \"%s\"\n",DEV_SPX); *status = TRANS_ACCEPT_MISC_ERROR; return(-1); } if (connect_spipe (ciptr->fd, fd) < 0) { prmsg(1,"SCOAccept: ioctl(I_FDINSERT) failed\n"); close (fd); *status = TRANS_ACCEPT_MISC_ERROR; return -1; } /* * Everything looks good: fill in the XtransConnInfo structure. */ newciptr->addrlen=ciptr->addrlen; if( (newciptr->addr = malloc(newciptr->addrlen)) == NULL ) { prmsg(1, "SCOAccept: failed to allocate memory for peer addr\n"); close(fd); *status = TRANS_ACCEPT_BAD_MALLOC; return -1; } memcpy(newciptr->addr,ciptr->addr,newciptr->addrlen); #if defined(__SCO__) newciptr->flags |= TRANS_NOUNLINK; #endif newciptr->peeraddrlen=newciptr->addrlen; if( (newciptr->peeraddr = malloc(newciptr->peeraddrlen)) == NULL ) { prmsg(1, "SCOAccept: failed to allocate memory for peer addr\n"); free(newciptr->addr); close(fd); *status = TRANS_ACCEPT_BAD_MALLOC; return -1; } memcpy(newciptr->peeraddr,newciptr->addr,newciptr->peeraddrlen); *status = 0; return(fd); } #endif /* TRANS_SERVER */ #endif /* LOCAL_TRANS_SCO */ #ifdef TRANS_REOPEN #ifdef LOCAL_TRANS_PTS static int TRANS(PTSReopenServer)(XtransConnInfo ciptr, int fd, char *port) { #ifdef PTSNODENAME char server_path[64]; #endif prmsg(2,"PTSReopenServer(%d,%s)\n", fd, port); #if !defined(PTSNODENAME) prmsg(1,"PTSReopenServer: Protocol is not supported by a pts connection\n"); return 0; #else if (port && *port ) { if( *port == '/' ) { /* A full pathname */ snprintf(server_path, sizeof(server_path), "%s", port); } else { snprintf(server_path, sizeof(server_path), "%s%s", PTSNODENAME, port); } } else { snprintf(server_path, sizeof(server_path), "%s%ld", PTSNODENAME, (long)getpid()); } if (TRANS(FillAddrInfo) (ciptr, server_path, server_path) == 0) { prmsg(1,"PTSReopenServer: failed to fill in addr info\n"); return 0; } return 1; #endif /* !PTSNODENAME */ } #endif /* LOCAL_TRANS_PTS */ #ifdef LOCAL_TRANS_NAMED static int TRANS(NAMEDReopenServer)(XtransConnInfo ciptr, int fd _X_UNUSED, char *port) { #ifdef NAMEDNODENAME char server_path[64]; #endif prmsg(2,"NAMEDReopenServer(%s)\n", port); #if !defined(NAMEDNODENAME) prmsg(1,"NAMEDReopenServer: Protocol is not supported by a NAMED connection\n"); return 0; #else if ( port && *port ) { if( *port == '/' ) { /* A full pathname */ snprintf(server_path, sizeof(server_path),"%s", port); } else { snprintf(server_path, sizeof(server_path), "%s%s", NAMEDNODENAME, port); } } else { snprintf(server_path, sizeof(server_path), "%s%ld", NAMEDNODENAME, (long)getpid()); } if (TRANS(FillAddrInfo) (ciptr, server_path, server_path) == 0) { prmsg(1,"NAMEDReopenServer: failed to fill in addr info\n"); return 0; } return 1; #endif /* !NAMEDNODENAME */ } #endif /* LOCAL_TRANS_NAMED */ #ifdef LOCAL_TRANS_SCO static int TRANS(SCOReopenServer)(XtransConnInfo ciptr, int fd, char *port) { #ifdef SCORNODENAME char serverR_path[64], serverS_path[64]; #endif prmsg(2,"SCOReopenServer(%s)\n", port); if (!port || !port[0]) port = "0"; #if !defined(SCORNODENAME) prmsg(2,"SCOReopenServer: Protocol is not supported by a SCO connection\n"); return 0; #else (void) sprintf(serverR_path, SCORNODENAME, port); (void) sprintf(serverS_path, SCOSNODENAME, port); #if defined(X11_t) && defined(__SCO__) ciptr->flags |= TRANS_NOUNLINK; #endif if (TRANS(FillAddrInfo) (ciptr, serverS_path, serverR_path) == 0) { prmsg(1, "SCOReopenServer: failed to fill in addr info\n"); return 0; } return 1; #endif /* SCORNODENAME */ } #endif /* LOCAL_TRANS_SCO */ #endif /* TRANS_REOPEN */ /* * This table contains all of the entry points for the different local * connection mechanisms. */ typedef struct _LOCALtrans2dev { const char *transname; #ifdef TRANS_CLIENT int (*devcotsopenclient)( XtransConnInfo, char * /*port*/ ); #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER int (*devcotsopenserver)( XtransConnInfo, char * /*port*/ ); #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT int (*devcltsopenclient)( XtransConnInfo, char * /*port*/ ); #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER int (*devcltsopenserver)( XtransConnInfo, char * /*port*/ ); #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN int (*devcotsreopenserver)( XtransConnInfo, int, /* fd */ char * /* port */ ); int (*devcltsreopenserver)( XtransConnInfo, int, /* fd */ char * /* port */ ); #endif /* TRANS_REOPEN */ #ifdef TRANS_SERVER int (*devreset)( XtransConnInfo /* ciptr */ ); int (*devaccept)( XtransConnInfo, XtransConnInfo, int * ); #endif /* TRANS_SERVER */ } LOCALtrans2dev; static LOCALtrans2dev LOCALtrans2devtab[] = { #ifdef LOCAL_TRANS_PTS {"", #ifdef TRANS_CLIENT TRANS(PTSOpenClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(PTSOpenServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(OpenFail), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(OpenFail), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(PTSReopenServer), TRANS(ReopenFail), #endif #ifdef TRANS_SERVER NULL, /* ResetListener */ TRANS(PTSAccept) #endif /* TRANS_SERVER */ }, {"local", #ifdef TRANS_CLIENT TRANS(PTSOpenClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(PTSOpenServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(OpenFail), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(OpenFail), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(PTSReopenServer), TRANS(ReopenFail), #endif #ifdef TRANS_SERVER NULL, /* ResetListener */ TRANS(PTSAccept) #endif /* TRANS_SERVER */ }, {"pts", #ifdef TRANS_CLIENT TRANS(PTSOpenClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(PTSOpenServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(OpenFail), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(OpenFail), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(PTSReopenServer), TRANS(ReopenFail), #endif #ifdef TRANS_SERVER NULL, /* ResetListener */ TRANS(PTSAccept) #endif /* TRANS_SERVER */ }, #else /* !LOCAL_TRANS_PTS */ {"", #ifdef TRANS_CLIENT TRANS(NAMEDOpenClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(NAMEDOpenServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(OpenFail), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(OpenFail), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(NAMEDReopenServer), TRANS(ReopenFail), #endif #ifdef TRANS_SERVER TRANS(NAMEDResetListener), TRANS(NAMEDAccept) #endif /* TRANS_SERVER */ }, {"local", #ifdef TRANS_CLIENT TRANS(NAMEDOpenClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(NAMEDOpenServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(OpenFail), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(OpenFail), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(NAMEDReopenServer), TRANS(ReopenFail), #endif #ifdef TRANS_SERVER TRANS(NAMEDResetListener), TRANS(NAMEDAccept) #endif /* TRANS_SERVER */ }, #endif /* !LOCAL_TRANS_PTS */ #ifdef LOCAL_TRANS_NAMED {"named", #ifdef TRANS_CLIENT TRANS(NAMEDOpenClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(NAMEDOpenServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(OpenFail), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(OpenFail), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(NAMEDReopenServer), TRANS(ReopenFail), #endif #ifdef TRANS_SERVER TRANS(NAMEDResetListener), TRANS(NAMEDAccept) #endif /* TRANS_SERVER */ }, #ifdef sun /* Alias "pipe" to named, since that's what Solaris called it */ {"pipe", #ifdef TRANS_CLIENT TRANS(NAMEDOpenClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(NAMEDOpenServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(OpenFail), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(OpenFail), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(NAMEDReopenServer), TRANS(ReopenFail), #endif #ifdef TRANS_SERVER TRANS(NAMEDResetListener), TRANS(NAMEDAccept) #endif /* TRANS_SERVER */ }, #endif /* sun */ #endif /* LOCAL_TRANS_NAMED */ #ifdef LOCAL_TRANS_SCO {"sco", #ifdef TRANS_CLIENT TRANS(SCOOpenClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(SCOOpenServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(OpenFail), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(OpenFail), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(SCOReopenServer), TRANS(ReopenFail), #endif #ifdef TRANS_SERVER NULL, /* ResetListener */ TRANS(SCOAccept) #endif /* TRANS_SERVER */ }, #endif /* LOCAL_TRANS_SCO */ }; #define NUMTRANSPORTS (sizeof(LOCALtrans2devtab)/sizeof(LOCALtrans2dev)) static const char *XLOCAL=NULL; static char *workingXLOCAL=NULL; static char *freeXLOCAL=NULL; #if defined(__SCO__) #define DEF_XLOCAL "SCO:UNIX:PTS" #elif defined(__UNIXWARE__) #define DEF_XLOCAL "UNIX:PTS:NAMED:SCO" #elif defined(sun) #define DEF_XLOCAL "UNIX:NAMED" #else #define DEF_XLOCAL "UNIX:PTS:NAMED:SCO" #endif static void TRANS(LocalInitTransports)(const char *protocol) { prmsg(3,"LocalInitTransports(%s)\n", protocol); if( strcmp(protocol,"local") && strcmp(protocol,"LOCAL") ) { workingXLOCAL = freeXLOCAL = strdup (protocol); } else { XLOCAL=(char *)getenv("XLOCAL"); if(XLOCAL==NULL) XLOCAL=DEF_XLOCAL; workingXLOCAL = freeXLOCAL = strdup (XLOCAL); } } static void TRANS(LocalEndTransports)(void) { prmsg(3,"LocalEndTransports()\n"); free(freeXLOCAL); } #define TYPEBUFSIZE 32 #ifdef TRANS_CLIENT static LOCALtrans2dev * TRANS(LocalGetNextTransport)(void) { int i,j; char *typetocheck; char typebuf[TYPEBUFSIZE]; prmsg(3,"LocalGetNextTransport()\n"); while(1) { if( workingXLOCAL == NULL || *workingXLOCAL == '\0' ) return NULL; typetocheck=workingXLOCAL; workingXLOCAL=strchr(workingXLOCAL,':'); if(workingXLOCAL && *workingXLOCAL) *workingXLOCAL++='\0'; for(i=0;i #endif /* * Make sure 'host' is really local. */ static int HostReallyLocal (char *host) { /* * The 'host' passed to this function may have been generated * by either uname() or gethostname(). We try both if possible. */ #ifdef NEED_UTSNAME struct utsname name; #endif char buf[256]; #ifdef NEED_UTSNAME if (uname (&name) >= 0 && strcmp (host, name.nodename) == 0) return (1); #endif buf[0] = '\0'; (void) gethostname (buf, 256); buf[255] = '\0'; if (strcmp (host, buf) == 0) return (1); return (0); } static XtransConnInfo TRANS(LocalOpenClient)(int type, char *protocol, char *host, char *port) { LOCALtrans2dev *transptr; XtransConnInfo ciptr; int index; prmsg(3,"LocalOpenClient()\n"); /* * Make sure 'host' is really local. If not, we return failure. * The reason we make this check is because a process may advertise * a "local" address for which it can accept connections, but if a * process on a remote machine tries to connect to this address, * we know for sure it will fail. */ if (strcmp (host, "unix") != 0 && !HostReallyLocal (host)) { prmsg (1, "LocalOpenClient: Cannot connect to non-local host %s\n", host); return NULL; } #if defined(X11_t) /* * X has a well known port, that is transport dependant. It is easier * to handle it here, than try and come up with a transport independent * representation that can be passed in and resolved the usual way. * * The port that is passed here is really a string containing the idisplay * from ConnectDisplay(). Since that is what we want for the local transports, * we don't have to do anything special. */ #endif /* X11_t */ if( (ciptr = calloc(1,sizeof(struct _XtransConnInfo))) == NULL ) { prmsg(1,"LocalOpenClient: calloc(1,%lu) failed\n", sizeof(struct _XtransConnInfo)); return NULL; } ciptr->fd = -1; TRANS(LocalInitTransports)(protocol); index = 0; for(transptr=TRANS(LocalGetNextTransport)(); transptr!=NULL;transptr=TRANS(LocalGetNextTransport)(), index++) { switch( type ) { case XTRANS_OPEN_COTS_CLIENT: ciptr->fd=transptr->devcotsopenclient(ciptr,port); break; case XTRANS_OPEN_CLTS_CLIENT: ciptr->fd=transptr->devcltsopenclient(ciptr,port); break; case XTRANS_OPEN_COTS_SERVER: case XTRANS_OPEN_CLTS_SERVER: prmsg(1, "LocalOpenClient: Should not be opening a server with this function\n"); break; default: prmsg(1, "LocalOpenClient: Unknown Open type %d\n", type); } if( ciptr->fd >= 0 ) break; } TRANS(LocalEndTransports)(); if( ciptr->fd < 0 ) { free(ciptr); return NULL; } ciptr->priv=(char *)transptr; ciptr->index = index; return ciptr; } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER static XtransConnInfo TRANS(LocalOpenServer)(int type, char *protocol, char *host _X_UNUSED, char *port) { int i; XtransConnInfo ciptr; prmsg(2,"LocalOpenServer(%d,%s,%s)\n", type, protocol, port); #if defined(X11_t) /* * For X11, the port will be in the format xserverN where N is the * display number. All of the local connections just need to know * the display number because they don't do any name resolution on * the port. This just truncates port to the display portion. */ #endif /* X11_t */ if( (ciptr = calloc(1,sizeof(struct _XtransConnInfo))) == NULL ) { prmsg(1,"LocalOpenServer: calloc(1,%lu) failed\n", sizeof(struct _XtransConnInfo)); return NULL; } for(i=1;ifd=LOCALtrans2devtab[i].devcotsopenserver(ciptr,port); break; case XTRANS_OPEN_CLTS_SERVER: ciptr->fd=LOCALtrans2devtab[i].devcltsopenserver(ciptr,port); break; default: prmsg(1,"LocalOpenServer: Unknown Open type %d\n", type ); } if( ciptr->fd >= 0 ) { ciptr->priv=(char *)&LOCALtrans2devtab[i]; ciptr->index=i; ciptr->flags = 1 | (ciptr->flags & TRANS_KEEPFLAGS); return ciptr; } } free(ciptr); return NULL; } #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN static XtransConnInfo TRANS(LocalReopenServer)(int type, int index, int fd, char *port) { XtransConnInfo ciptr; int stat = 0; prmsg(2,"LocalReopenServer(%d,%d,%d)\n", type, index, fd); if( (ciptr = calloc(1,sizeof(struct _XtransConnInfo))) == NULL ) { prmsg(1,"LocalReopenServer: calloc(1,%lu) failed\n", sizeof(struct _XtransConnInfo)); return NULL; } ciptr->fd = fd; switch( type ) { case XTRANS_OPEN_COTS_SERVER: stat = LOCALtrans2devtab[index].devcotsreopenserver(ciptr,fd,port); break; case XTRANS_OPEN_CLTS_SERVER: stat = LOCALtrans2devtab[index].devcltsreopenserver(ciptr,fd,port); break; default: prmsg(1,"LocalReopenServer: Unknown Open type %d\n", type ); } if( stat > 0 ) { ciptr->priv=(char *)&LOCALtrans2devtab[index]; ciptr->index=index; ciptr->flags = 1 | (ciptr->flags & TRANS_KEEPFLAGS); return ciptr; } free(ciptr); return NULL; } #endif /* TRANS_REOPEN */ /* * This is the Local implementation of the X Transport service layer */ #ifdef TRANS_CLIENT static XtransConnInfo TRANS(LocalOpenCOTSClient)(Xtransport *thistrans _X_UNUSED, char *protocol, char *host, char *port) { prmsg(2,"LocalOpenCOTSClient(%s,%s,%s)\n",protocol,host,port); return TRANS(LocalOpenClient)(XTRANS_OPEN_COTS_CLIENT, protocol, host, port); } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER static XtransConnInfo TRANS(LocalOpenCOTSServer)(Xtransport *thistrans, char *protocol, char *host, char *port) { char *typetocheck = NULL; int found = 0; char typebuf[TYPEBUFSIZE]; prmsg(2,"LocalOpenCOTSServer(%s,%s,%s)\n",protocol,host,port); /* Check if this local type is in the XLOCAL list */ TRANS(LocalInitTransports)("local"); typetocheck = workingXLOCAL; while (typetocheck && !found) { int j; workingXLOCAL = strchr(workingXLOCAL, ':'); if (workingXLOCAL && *workingXLOCAL) *workingXLOCAL++ = '\0'; strncpy(typebuf, typetocheck, TYPEBUFSIZE); for (j = 0; j < TYPEBUFSIZE; j++) if (isupper(typebuf[j])) typebuf[j] = tolower(typebuf[j]); if (!strcmp(thistrans->TransName, typebuf)) found = 1; typetocheck = workingXLOCAL; } TRANS(LocalEndTransports)(); if (!found) { prmsg(3,"LocalOpenCOTSServer: disabling %s\n",thistrans->TransName); thistrans->flags |= TRANS_DISABLED; return NULL; } return TRANS(LocalOpenServer)(XTRANS_OPEN_COTS_SERVER, protocol, host, port); } #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT static XtransConnInfo TRANS(LocalOpenCLTSClient)(Xtransport *thistrans _X_UNUSED, char *protocol, char *host, char *port) { prmsg(2,"LocalOpenCLTSClient(%s,%s,%s)\n",protocol,host,port); return TRANS(LocalOpenClient)(XTRANS_OPEN_CLTS_CLIENT, protocol, host, port); } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER static XtransConnInfo TRANS(LocalOpenCLTSServer)(Xtransport *thistrans _X_UNUSED, char *protocol, char *host, char *port) { prmsg(2,"LocalOpenCLTSServer(%s,%s,%s)\n",protocol,host,port); return TRANS(LocalOpenServer)(XTRANS_OPEN_CLTS_SERVER, protocol, host, port); } #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN static XtransConnInfo TRANS(LocalReopenCOTSServer)(Xtransport *thistrans, int fd, char *port) { int index; prmsg(2,"LocalReopenCOTSServer(%d,%s)\n", fd, port); for(index=1;indexTransName, LOCALtrans2devtab[index].transname) == 0 ) break; } if (index >= NUMTRANSPORTS) { return (NULL); } return TRANS(LocalReopenServer)(XTRANS_OPEN_COTS_SERVER, index, fd, port); } static XtransConnInfo TRANS(LocalReopenCLTSServer)(Xtransport *thistrans, int fd, char *port) { int index; prmsg(2,"LocalReopenCLTSServer(%d,%s)\n", fd, port); for(index=1;indexTransName, LOCALtrans2devtab[index].transname) == 0 ) break; } if (index >= NUMTRANSPORTS) { return (NULL); } return TRANS(LocalReopenServer)(XTRANS_OPEN_CLTS_SERVER, index, fd, port); } #endif /* TRANS_REOPEN */ static int TRANS(LocalSetOption)(XtransConnInfo ciptr, int option, int arg) { prmsg(2,"LocalSetOption(%d,%d,%d)\n",ciptr->fd,option,arg); return -1; } #ifdef TRANS_SERVER static int TRANS(LocalCreateListener)(XtransConnInfo ciptr, char *port, unsigned int flags _X_UNUSED) { prmsg(2,"LocalCreateListener(%p->%d,%s)\n",ciptr,ciptr->fd,port); return 0; } static int TRANS(LocalResetListener)(XtransConnInfo ciptr) { LOCALtrans2dev *transptr; prmsg(2,"LocalResetListener(%p)\n",ciptr); transptr=(LOCALtrans2dev *)ciptr->priv; if (transptr->devreset != NULL) { return transptr->devreset(ciptr); } return TRANS_RESET_NOOP; } static XtransConnInfo TRANS(LocalAccept)(XtransConnInfo ciptr, int *status) { XtransConnInfo newciptr; LOCALtrans2dev *transptr; prmsg(2,"LocalAccept(%p->%d)\n", ciptr, ciptr->fd); transptr=(LOCALtrans2dev *)ciptr->priv; if( (newciptr = calloc(1,sizeof(struct _XtransConnInfo)))==NULL ) { prmsg(1,"LocalAccept: calloc(1,%lu) failed\n", sizeof(struct _XtransConnInfo)); *status = TRANS_ACCEPT_BAD_MALLOC; return NULL; } newciptr->fd=transptr->devaccept(ciptr,newciptr,status); if( newciptr->fd < 0 ) { free(newciptr); return NULL; } newciptr->priv=(char *)transptr; newciptr->index = ciptr->index; *status = 0; return newciptr; } #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT static int TRANS(LocalConnect)(XtransConnInfo ciptr, char *host _X_UNUSED, char *port) { prmsg(2,"LocalConnect(%p->%d,%s)\n", ciptr, ciptr->fd, port); return 0; } #endif /* TRANS_CLIENT */ static int TRANS(LocalBytesReadable)(XtransConnInfo ciptr, BytesReadable_t *pend ) { prmsg(2,"LocalBytesReadable(%p->%d,%p)\n", ciptr, ciptr->fd, pend); #if defined(SCO325) return ioctl(ciptr->fd, I_NREAD, (char *)pend); #else return ioctl(ciptr->fd, FIONREAD, (char *)pend); #endif } static int TRANS(LocalRead)(XtransConnInfo ciptr, char *buf, int size) { prmsg(2,"LocalRead(%d,%p,%d)\n", ciptr->fd, buf, size ); return read(ciptr->fd,buf,size); } static int TRANS(LocalWrite)(XtransConnInfo ciptr, char *buf, int size) { prmsg(2,"LocalWrite(%d,%p,%d)\n", ciptr->fd, buf, size ); return write(ciptr->fd,buf,size); } static int TRANS(LocalReadv)(XtransConnInfo ciptr, struct iovec *buf, int size) { prmsg(2,"LocalReadv(%d,%p,%d)\n", ciptr->fd, buf, size ); return READV(ciptr,buf,size); } static int TRANS(LocalWritev)(XtransConnInfo ciptr, struct iovec *buf, int size) { prmsg(2,"LocalWritev(%d,%p,%d)\n", ciptr->fd, buf, size ); return WRITEV(ciptr,buf,size); } static int TRANS(LocalDisconnect)(XtransConnInfo ciptr) { prmsg(2,"LocalDisconnect(%p->%d)\n", ciptr, ciptr->fd); return 0; } static int TRANS(LocalClose)(XtransConnInfo ciptr) { struct sockaddr_un *sockname=(struct sockaddr_un *) ciptr->addr; int ret; prmsg(2,"LocalClose(%p->%d)\n", ciptr, ciptr->fd ); ret=close(ciptr->fd); if(ciptr->flags && sockname && sockname->sun_family == AF_UNIX && sockname->sun_path[0] ) { if (!(ciptr->flags & TRANS_NOUNLINK)) unlink(sockname->sun_path); } return ret; } static int TRANS(LocalCloseForCloning)(XtransConnInfo ciptr) { int ret; prmsg(2,"LocalCloseForCloning(%p->%d)\n", ciptr, ciptr->fd ); /* Don't unlink path */ ret=close(ciptr->fd); return ret; } /* * MakeAllCOTSServerListeners() will go through the entire Xtransports[] * array defined in Xtrans.c and try to OpenCOTSServer() for each entry. * We will add duplicate entries to that table so that the OpenCOTSServer() * function will get called once for each type of local transport. * * The TransName is in lowercase, so it will never match during a normal * call to SelectTransport() in Xtrans.c. */ #ifdef TRANS_SERVER static const char * local_aliases[] = { # ifdef LOCAL_TRANS_PTS "pts", # endif "named", # ifdef sun "pipe", /* compatibility with Solaris Xlib */ # endif # ifdef LOCAL_TRANS_SCO "sco", # endif NULL }; #endif Xtransport TRANS(LocalFuncs) = { /* Local Interface */ "local", TRANS_ALIAS | TRANS_LOCAL, #ifdef TRANS_CLIENT TRANS(LocalOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER local_aliases, TRANS(LocalOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(LocalOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(LocalOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(LocalReopenCOTSServer), TRANS(LocalReopenCLTSServer), #endif TRANS(LocalSetOption), #ifdef TRANS_SERVER TRANS(LocalCreateListener), TRANS(LocalResetListener), TRANS(LocalAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(LocalConnect), #endif /* TRANS_CLIENT */ TRANS(LocalBytesReadable), TRANS(LocalRead), TRANS(LocalWrite), TRANS(LocalReadv), TRANS(LocalWritev), TRANS(LocalDisconnect), TRANS(LocalClose), TRANS(LocalCloseForCloning), }; #ifdef LOCAL_TRANS_PTS Xtransport TRANS(PTSFuncs) = { /* Local Interface */ "pts", TRANS_LOCAL, #ifdef TRANS_CLIENT TRANS(LocalOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER NULL, TRANS(LocalOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(LocalOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(LocalOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(LocalReopenCOTSServer), TRANS(LocalReopenCLTSServer), #endif TRANS(LocalSetOption), #ifdef TRANS_SERVER TRANS(LocalCreateListener), TRANS(LocalResetListener), TRANS(LocalAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(LocalConnect), #endif /* TRANS_CLIENT */ TRANS(LocalBytesReadable), TRANS(LocalRead), TRANS(LocalWrite), TRANS(LocalReadv), TRANS(LocalWritev), TRANS(LocalDisconnect), TRANS(LocalClose), TRANS(LocalCloseForCloning), }; #endif /* LOCAL_TRANS_PTS */ #ifdef LOCAL_TRANS_NAMED Xtransport TRANS(NAMEDFuncs) = { /* Local Interface */ "named", TRANS_LOCAL, #ifdef TRANS_CLIENT TRANS(LocalOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER NULL, TRANS(LocalOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(LocalOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(LocalOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(LocalReopenCOTSServer), TRANS(LocalReopenCLTSServer), #endif TRANS(LocalSetOption), #ifdef TRANS_SERVER TRANS(LocalCreateListener), TRANS(LocalResetListener), TRANS(LocalAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(LocalConnect), #endif /* TRANS_CLIENT */ TRANS(LocalBytesReadable), TRANS(LocalRead), TRANS(LocalWrite), TRANS(LocalReadv), TRANS(LocalWritev), TRANS(LocalDisconnect), TRANS(LocalClose), TRANS(LocalCloseForCloning), }; #ifdef sun Xtransport TRANS(PIPEFuncs) = { /* Local Interface */ "pipe", TRANS_ALIAS | TRANS_LOCAL, #ifdef TRANS_CLIENT TRANS(LocalOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER NULL, TRANS(LocalOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(LocalOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(LocalOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(LocalReopenCOTSServer), TRANS(LocalReopenCLTSServer), #endif TRANS(LocalSetOption), #ifdef TRANS_SERVER TRANS(LocalCreateListener), TRANS(LocalResetListener), TRANS(LocalAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(LocalConnect), #endif /* TRANS_CLIENT */ TRANS(LocalBytesReadable), TRANS(LocalRead), TRANS(LocalWrite), TRANS(LocalReadv), TRANS(LocalWritev), TRANS(LocalDisconnect), TRANS(LocalClose), TRANS(LocalCloseForCloning), }; #endif /* sun */ #endif /* LOCAL_TRANS_NAMED */ #ifdef LOCAL_TRANS_SCO Xtransport TRANS(SCOFuncs) = { /* Local Interface */ "sco", TRANS_LOCAL, #ifdef TRANS_CLIENT TRANS(LocalOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER NULL, TRANS(LocalOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(LocalOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(LocalOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(LocalReopenCOTSServer), TRANS(LocalReopenCLTSServer), #endif TRANS(LocalSetOption), #ifdef TRANS_SERVER TRANS(LocalCreateListener), TRANS(LocalResetListener), TRANS(LocalAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(LocalConnect), #endif /* TRANS_CLIENT */ TRANS(LocalBytesReadable), TRANS(LocalRead), TRANS(LocalWrite), TRANS(LocalReadv), TRANS(LocalWritev), TRANS(LocalDisconnect), TRANS(LocalClose), TRANS(LocalCloseForCloning), }; #endif /* LOCAL_TRANS_SCO */ 070701000a5319000081a40000000000000000000000014f868418000072c40000010000010007ffffffffffffffff0000002b00000000root/usr/local/include/X11/Xtrans/Xtrans.c/* Copyright 1993, 1994, 1998 The Open Group Permission to use, copy, modify, distribute, and sell this software and its documentation for any purpose is hereby granted without fee, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation. The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. Except as contained in this notice, the name of The Open Group shall not be used in advertising or otherwise to promote the sale, use or other dealings in this Software without prior written authorization from The Open Group. * Copyright 1993, 1994 NCR Corporation - Dayton, Ohio, USA * * All Rights Reserved * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, provided * that the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name NCR not be used in advertising * or publicity pertaining to distribution of the software without specific, * written prior permission. NCR makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. * * NCR DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN * NO EVENT SHALL NCR BE LIABLE FOR ANY SPECIAL, INDIRECT OR * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS * OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ #include /* * The transport table contains a definition for every transport (protocol) * family. All operations that can be made on the transport go through this * table. * * Each transport is assigned a unique transport id. * * New transports can be added by adding an entry in this table. * For compatiblity, the transport ids should never be renumbered. * Always add to the end of the list. */ #define TRANS_TLI_INET_INDEX 1 #define TRANS_TLI_TCP_INDEX 2 #define TRANS_TLI_TLI_INDEX 3 #define TRANS_SOCKET_UNIX_INDEX 4 #define TRANS_SOCKET_LOCAL_INDEX 5 #define TRANS_SOCKET_INET_INDEX 6 #define TRANS_SOCKET_TCP_INDEX 7 #define TRANS_DNET_INDEX 8 #define TRANS_LOCAL_LOCAL_INDEX 9 #define TRANS_LOCAL_PTS_INDEX 10 #define TRANS_LOCAL_NAMED_INDEX 11 /* 12 used to be ISC, but that's gone. */ #define TRANS_LOCAL_SCO_INDEX 13 #define TRANS_SOCKET_INET6_INDEX 14 #define TRANS_LOCAL_PIPE_INDEX 15 static Xtransport_table Xtransports[] = { #if defined(STREAMSCONN) { &TRANS(TLITCPFuncs), TRANS_TLI_TCP_INDEX }, { &TRANS(TLIINETFuncs), TRANS_TLI_INET_INDEX }, { &TRANS(TLITLIFuncs), TRANS_TLI_TLI_INDEX }, #endif /* STREAMSCONN */ #if defined(TCPCONN) { &TRANS(SocketTCPFuncs), TRANS_SOCKET_TCP_INDEX }, #if defined(IPv6) && defined(AF_INET6) { &TRANS(SocketINET6Funcs), TRANS_SOCKET_INET6_INDEX }, #endif /* IPv6 */ { &TRANS(SocketINETFuncs), TRANS_SOCKET_INET_INDEX }, #endif /* TCPCONN */ #if defined(UNIXCONN) #if !defined(LOCALCONN) { &TRANS(SocketLocalFuncs), TRANS_SOCKET_LOCAL_INDEX }, #endif /* !LOCALCONN */ { &TRANS(SocketUNIXFuncs), TRANS_SOCKET_UNIX_INDEX }, #endif /* UNIXCONN */ #if defined(LOCALCONN) { &TRANS(LocalFuncs), TRANS_LOCAL_LOCAL_INDEX }, #ifndef sun { &TRANS(PTSFuncs), TRANS_LOCAL_PTS_INDEX }, #endif /* sun */ #if defined(SVR4) || defined(__SVR4) { &TRANS(NAMEDFuncs), TRANS_LOCAL_NAMED_INDEX }, #endif #ifdef sun { &TRANS(PIPEFuncs), TRANS_LOCAL_PIPE_INDEX }, #endif /* sun */ #if defined(__SCO__) || defined(__UNIXWARE__) { &TRANS(SCOFuncs), TRANS_LOCAL_SCO_INDEX }, #endif /* __SCO__ || __UNIXWARE__ */ #endif /* LOCALCONN */ }; #define NUMTRANS (sizeof(Xtransports)/sizeof(Xtransport_table)) #ifdef WIN32 #define ioctl ioctlsocket #endif /* * These are a few utility function used by the public interface functions. */ void TRANS(FreeConnInfo) (XtransConnInfo ciptr) { prmsg (3,"FreeConnInfo(%p)\n", ciptr); if (ciptr->addr) free (ciptr->addr); if (ciptr->peeraddr) free (ciptr->peeraddr); if (ciptr->port) free (ciptr->port); free (ciptr); } #define PROTOBUFSIZE 20 static Xtransport * TRANS(SelectTransport) (const char *protocol) { char protobuf[PROTOBUFSIZE]; int i; prmsg (3,"SelectTransport(%s)\n", protocol); /* * Force Protocol to be lowercase as a way of doing * a case insensitive match. */ strncpy (protobuf, protocol, PROTOBUFSIZE - 1); protobuf[PROTOBUFSIZE-1] = '\0'; for (i = 0; i < PROTOBUFSIZE && protobuf[i] != '\0'; i++) if (isupper (protobuf[i])) protobuf[i] = tolower (protobuf[i]); /* Look at all of the configured protocols */ for (i = 0; i < NUMTRANS; i++) { if (!strcmp (protobuf, Xtransports[i].transport->TransName)) return Xtransports[i].transport; } return NULL; } #ifndef TEST_t static #endif /* TEST_t */ int TRANS(ParseAddress) (char *address, char **protocol, char **host, char **port) { /* * For the font library, the address is a string formatted * as "protocol/host:port[/catalogue]". Note that the catologue * is optional. At this time, the catologue info is ignored, but * we have to parse it anyways. * * Other than fontlib, the address is a string formatted * as "protocol/host:port". * * If the protocol part is missing, then assume TCP. * If the protocol part and host part are missing, then assume local. * If a "::" is found then assume DNET. */ char *mybuf, *tmpptr; const char *_protocol; char *_host, *_port; char hostnamebuf[256]; int _host_len; prmsg (3,"ParseAddress(%s)\n", address); /* Copy the string so it can be changed */ tmpptr = mybuf = strdup (address); /* Parse the string to get each component */ /* Get the protocol part */ _protocol = mybuf; if ( ((mybuf = strchr (mybuf,'/')) == NULL) && ((mybuf = strrchr (tmpptr,':')) == NULL) ) { /* address is in a bad format */ *protocol = NULL; *host = NULL; *port = NULL; free (tmpptr); return 0; } if (*mybuf == ':') { /* * If there is a hostname, then assume tcp, otherwise * it must be local. */ if (mybuf == tmpptr) { /* There is neither a protocol or host specified */ _protocol = "local"; } else { /* There is a hostname specified */ _protocol = "tcp"; mybuf = tmpptr; /* reset to the begining of the host ptr */ } } else { /* *mybuf == '/' */ *mybuf ++= '\0'; /* put a null at the end of the protocol */ if (strlen(_protocol) == 0) { /* * If there is a hostname, then assume tcp, otherwise * it must be local. */ if (*mybuf != ':') _protocol = "tcp"; else _protocol = "local"; } } /* Get the host part */ _host = mybuf; if ((mybuf = strrchr (mybuf,':')) == NULL) { *protocol = NULL; *host = NULL; *port = NULL; free (tmpptr); return 0; } *mybuf ++= '\0'; _host_len = strlen(_host); if (_host_len == 0) { TRANS(GetHostname) (hostnamebuf, sizeof (hostnamebuf)); _host = hostnamebuf; } #if defined(IPv6) && defined(AF_INET6) /* hostname in IPv6 [numeric_addr]:0 form? */ else if ( (_host_len > 3) && ((strcmp(_protocol, "tcp") == 0) || (strcmp(_protocol, "inet6") == 0)) && (*_host == '[') && (*(_host + _host_len - 1) == ']') ) { struct sockaddr_in6 sin6; *(_host + _host_len - 1) = '\0'; /* Verify address is valid IPv6 numeric form */ if (inet_pton(AF_INET6, _host + 1, &sin6) == 1) { /* It is. Use it as such. */ _host++; _protocol = "inet6"; } else { /* It's not, restore it just in case some other code can use it. */ *(_host + _host_len - 1) = ']'; } } #endif /* Get the port */ _port = mybuf; #if defined(FONT_t) || defined(FS_t) /* * Is there an optional catalogue list? */ if ((mybuf = strchr (mybuf,'/')) != NULL) *mybuf ++= '\0'; /* * The rest, if any, is the (currently unused) catalogue list. * * _catalogue = mybuf; */ #endif #ifdef HAVE_LAUNCHD /* launchd sockets will look like 'local//tmp/launch-XgkNns/:0' */ if(address != NULL && strlen(address)>8 && (!strncmp(address,"local//",7))) { _protocol="local"; _host=""; _port=address+6; } #endif /* * Now that we have all of the components, allocate new * string space for them. */ if ((*protocol = strdup (_protocol)) == NULL) { /* Malloc failed */ *port = NULL; *host = NULL; *protocol = NULL; free (tmpptr); return 0; } if ((*host = strdup (_host)) == NULL) { /* Malloc failed */ *port = NULL; *host = NULL; free (*protocol); *protocol = NULL; free (tmpptr); return 0; } if ((*port = strdup (_port)) == NULL) { /* Malloc failed */ *port = NULL; free (*host); *host = NULL; free (*protocol); *protocol = NULL; free (tmpptr); return 0; } free (tmpptr); return 1; } /* * TRANS(Open) does all of the real work opening a connection. The only * funny part about this is the type parameter which is used to decide which * type of open to perform. */ static XtransConnInfo TRANS(Open) (int type, char *address) { char *protocol = NULL, *host = NULL, *port = NULL; XtransConnInfo ciptr = NULL; Xtransport *thistrans; prmsg (2,"Open(%d,%s)\n", type, address); #if defined(WIN32) && defined(TCPCONN) if (TRANS(WSAStartup)()) { prmsg (1,"Open: WSAStartup failed\n"); return NULL; } #endif /* Parse the Address */ if (TRANS(ParseAddress) (address, &protocol, &host, &port) == 0) { prmsg (1,"Open: Unable to Parse address %s\n", address); return NULL; } /* Determine the transport type */ if ((thistrans = TRANS(SelectTransport) (protocol)) == NULL) { prmsg (1,"Open: Unable to find transport for %s\n", protocol); free (protocol); free (host); free (port); return NULL; } /* Open the transport */ switch (type) { case XTRANS_OPEN_COTS_CLIENT: #ifdef TRANS_CLIENT ciptr = thistrans->OpenCOTSClient(thistrans, protocol, host, port); #endif /* TRANS_CLIENT */ break; case XTRANS_OPEN_COTS_SERVER: #ifdef TRANS_SERVER ciptr = thistrans->OpenCOTSServer(thistrans, protocol, host, port); #endif /* TRANS_SERVER */ break; case XTRANS_OPEN_CLTS_CLIENT: #ifdef TRANS_CLIENT ciptr = thistrans->OpenCLTSClient(thistrans, protocol, host, port); #endif /* TRANS_CLIENT */ break; case XTRANS_OPEN_CLTS_SERVER: #ifdef TRANS_SERVER ciptr = thistrans->OpenCLTSServer(thistrans, protocol, host, port); #endif /* TRANS_SERVER */ break; default: prmsg (1,"Open: Unknown Open type %d\n", type); } if (ciptr == NULL) { if (!(thistrans->flags & TRANS_DISABLED)) { prmsg (1,"Open: transport open failed for %s/%s:%s\n", protocol, host, port); } free (protocol); free (host); free (port); return NULL; } ciptr->transptr = thistrans; ciptr->port = port; /* We need this for TRANS(Reopen) */ free (protocol); free (host); return ciptr; } #ifdef TRANS_REOPEN /* * We might want to create an XtransConnInfo object based on a previously * opened connection. For example, the font server may clone itself and * pass file descriptors to the parent. */ static XtransConnInfo TRANS(Reopen) (int type, int trans_id, int fd, char *port) { XtransConnInfo ciptr = NULL; Xtransport *thistrans = NULL; char *save_port; int i; prmsg (2,"Reopen(%d,%d,%s)\n", trans_id, fd, port); /* Determine the transport type */ for (i = 0; i < NUMTRANS; i++) if (Xtransports[i].transport_id == trans_id) { thistrans = Xtransports[i].transport; break; } if (thistrans == NULL) { prmsg (1,"Reopen: Unable to find transport id %d\n", trans_id); return NULL; } if ((save_port = strdup (port)) == NULL) { prmsg (1,"Reopen: Unable to malloc port string\n"); return NULL; } /* Get a new XtransConnInfo object */ switch (type) { case XTRANS_OPEN_COTS_SERVER: ciptr = thistrans->ReopenCOTSServer(thistrans, fd, port); break; case XTRANS_OPEN_CLTS_SERVER: ciptr = thistrans->ReopenCLTSServer(thistrans, fd, port); break; default: prmsg (1,"Reopen: Bad Open type %d\n", type); } if (ciptr == NULL) { prmsg (1,"Reopen: transport open failed\n"); free (save_port); return NULL; } ciptr->transptr = thistrans; ciptr->port = save_port; return ciptr; } #endif /* TRANS_REOPEN */ /* * These are the public interfaces to this Transport interface. * These are the only functions that should have knowledge of the transport * table. */ #ifdef TRANS_CLIENT XtransConnInfo TRANS(OpenCOTSClient) (char *address) { prmsg (2,"OpenCOTSClient(%s)\n", address); return TRANS(Open) (XTRANS_OPEN_COTS_CLIENT, address); } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER XtransConnInfo TRANS(OpenCOTSServer) (char *address) { prmsg (2,"OpenCOTSServer(%s)\n", address); return TRANS(Open) (XTRANS_OPEN_COTS_SERVER, address); } #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT XtransConnInfo TRANS(OpenCLTSClient) (char *address) { prmsg (2,"OpenCLTSClient(%s)\n", address); return TRANS(Open) (XTRANS_OPEN_CLTS_CLIENT, address); } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER XtransConnInfo TRANS(OpenCLTSServer) (char *address) { prmsg (2,"OpenCLTSServer(%s)\n", address); return TRANS(Open) (XTRANS_OPEN_CLTS_SERVER, address); } #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN XtransConnInfo TRANS(ReopenCOTSServer) (int trans_id, int fd, char *port) { prmsg (2,"ReopenCOTSServer(%d, %d, %s)\n", trans_id, fd, port); return TRANS(Reopen) (XTRANS_OPEN_COTS_SERVER, trans_id, fd, port); } XtransConnInfo TRANS(ReopenCLTSServer) (int trans_id, int fd, char *port) { prmsg (2,"ReopenCLTSServer(%d, %d, %s)\n", trans_id, fd, port); return TRANS(Reopen) (XTRANS_OPEN_CLTS_SERVER, trans_id, fd, port); } int TRANS(GetReopenInfo) (XtransConnInfo ciptr, int *trans_id, int *fd, char **port) { int i; for (i = 0; i < NUMTRANS; i++) if (Xtransports[i].transport == ciptr->transptr) { *trans_id = Xtransports[i].transport_id; *fd = ciptr->fd; if ((*port = strdup (ciptr->port)) == NULL) return 0; else return 1; } return 0; } #endif /* TRANS_REOPEN */ int TRANS(SetOption) (XtransConnInfo ciptr, int option, int arg) { int fd = ciptr->fd; int ret = 0; prmsg (2,"SetOption(%d,%d,%d)\n", fd, option, arg); /* * For now, all transport type use the same stuff for setting options. * As long as this is true, we can put the common code here. Once a more * complicated transport such as shared memory or an OSI implementation * that uses the session and application libraries is implemented, this * code may have to move to a transport dependent function. * * ret = ciptr->transptr->SetOption (ciptr, option, arg); */ switch (option) { case TRANS_NONBLOCKING: switch (arg) { case 0: /* Set to blocking mode */ break; case 1: /* Set to non-blocking mode */ #if defined(O_NONBLOCK) && !defined(SCO325) ret = fcntl (fd, F_GETFL, 0); if (ret != -1) ret = fcntl (fd, F_SETFL, ret | O_NONBLOCK); #else #ifdef FIOSNBIO { int arg; arg = 1; ret = ioctl (fd, FIOSNBIO, &arg); } #else #if defined(WIN32) { #ifdef WIN32 u_long arg; #else int arg; #endif arg = 1; /* IBM TCP/IP understands this option too well: it causes TRANS(Read) to fail * eventually with EWOULDBLOCK */ ret = ioctl (fd, FIONBIO, &arg); } #else ret = fcntl (fd, F_GETFL, 0); #ifdef FNDELAY ret = fcntl (fd, F_SETFL, ret | FNDELAY); #else ret = fcntl (fd, F_SETFL, ret | O_NDELAY); #endif #endif /* AIXV3 || uniosu */ #endif /* FIOSNBIO */ #endif /* O_NONBLOCK */ break; default: /* Unknown option */ break; } break; case TRANS_CLOSEONEXEC: #ifdef F_SETFD #ifdef FD_CLOEXEC ret = fcntl (fd, F_SETFD, FD_CLOEXEC); #else ret = fcntl (fd, F_SETFD, 1); #endif /* FD_CLOEXEC */ #endif /* F_SETFD */ break; } return ret; } #ifdef TRANS_SERVER int TRANS(CreateListener) (XtransConnInfo ciptr, char *port, unsigned int flags) { return ciptr->transptr->CreateListener (ciptr, port, flags); } int TRANS(NoListen) (const char * protocol) { Xtransport *trans; int i = 0, ret = 0; if ((trans = TRANS(SelectTransport)(protocol)) == NULL) { prmsg (1,"TransNoListen: unable to find transport: %s\n", protocol); return -1; } if (trans->flags & TRANS_ALIAS) { if (trans->nolisten) while (trans->nolisten[i]) { ret |= TRANS(NoListen)(trans->nolisten[i]); i++; } } trans->flags |= TRANS_NOLISTEN; return ret; } int TRANS(ResetListener) (XtransConnInfo ciptr) { if (ciptr->transptr->ResetListener) return ciptr->transptr->ResetListener (ciptr); else return TRANS_RESET_NOOP; } XtransConnInfo TRANS(Accept) (XtransConnInfo ciptr, int *status) { XtransConnInfo newciptr; prmsg (2,"Accept(%d)\n", ciptr->fd); newciptr = ciptr->transptr->Accept (ciptr, status); if (newciptr) newciptr->transptr = ciptr->transptr; return newciptr; } #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT int TRANS(Connect) (XtransConnInfo ciptr, char *address) { char *protocol; char *host; char *port; int ret; prmsg (2,"Connect(%d,%s)\n", ciptr->fd, address); if (TRANS(ParseAddress) (address, &protocol, &host, &port) == 0) { prmsg (1,"Connect: Unable to Parse address %s\n", address); return -1; } #ifdef HAVE_LAUNCHD if (!host) host=strdup(""); #endif if (!port || !*port) { prmsg (1,"Connect: Missing port specification in %s\n", address); if (protocol) free (protocol); if (host) free (host); return -1; } ret = ciptr->transptr->Connect (ciptr, host, port); if (protocol) free (protocol); if (host) free (host); if (port) free (port); return ret; } #endif /* TRANS_CLIENT */ int TRANS(BytesReadable) (XtransConnInfo ciptr, BytesReadable_t *pend) { return ciptr->transptr->BytesReadable (ciptr, pend); } int TRANS(Read) (XtransConnInfo ciptr, char *buf, int size) { return ciptr->transptr->Read (ciptr, buf, size); } int TRANS(Write) (XtransConnInfo ciptr, char *buf, int size) { return ciptr->transptr->Write (ciptr, buf, size); } int TRANS(Readv) (XtransConnInfo ciptr, struct iovec *buf, int size) { return ciptr->transptr->Readv (ciptr, buf, size); } int TRANS(Writev) (XtransConnInfo ciptr, struct iovec *buf, int size) { return ciptr->transptr->Writev (ciptr, buf, size); } int TRANS(Disconnect) (XtransConnInfo ciptr) { return ciptr->transptr->Disconnect (ciptr); } int TRANS(Close) (XtransConnInfo ciptr) { int ret; prmsg (2,"Close(%d)\n", ciptr->fd); ret = ciptr->transptr->Close (ciptr); TRANS(FreeConnInfo) (ciptr); return ret; } int TRANS(CloseForCloning) (XtransConnInfo ciptr) { int ret; prmsg (2,"CloseForCloning(%d)\n", ciptr->fd); ret = ciptr->transptr->CloseForCloning (ciptr); TRANS(FreeConnInfo) (ciptr); return ret; } int TRANS(IsLocal) (XtransConnInfo ciptr) { return (ciptr->family == AF_UNIX); } int TRANS(GetMyAddr) (XtransConnInfo ciptr, int *familyp, int *addrlenp, Xtransaddr **addrp) { prmsg (2,"GetMyAddr(%d)\n", ciptr->fd); *familyp = ciptr->family; *addrlenp = ciptr->addrlen; if ((*addrp = malloc (ciptr->addrlen)) == NULL) { prmsg (1,"GetMyAddr: malloc failed\n"); return -1; } memcpy(*addrp, ciptr->addr, ciptr->addrlen); return 0; } int TRANS(GetPeerAddr) (XtransConnInfo ciptr, int *familyp, int *addrlenp, Xtransaddr **addrp) { prmsg (2,"GetPeerAddr(%d)\n", ciptr->fd); *familyp = ciptr->family; *addrlenp = ciptr->peeraddrlen; if ((*addrp = malloc (ciptr->peeraddrlen)) == NULL) { prmsg (1,"GetPeerAddr: malloc failed\n"); return -1; } memcpy(*addrp, ciptr->peeraddr, ciptr->peeraddrlen); return 0; } int TRANS(GetConnectionNumber) (XtransConnInfo ciptr) { return ciptr->fd; } /* * These functions are really utility functions, but they require knowledge * of the internal data structures, so they have to be part of the Transport * Independant API. */ #ifdef TRANS_SERVER static int complete_network_count (void) { int count = 0; int found_local = 0; int i; /* * For a complete network, we only need one LOCALCONN transport to work */ for (i = 0; i < NUMTRANS; i++) { if (Xtransports[i].transport->flags & TRANS_ALIAS || Xtransports[i].transport->flags & TRANS_NOLISTEN) continue; if (Xtransports[i].transport->flags & TRANS_LOCAL) found_local = 1; else count++; } return (count + found_local); } #ifdef XQUARTZ_EXPORTS_LAUNCHD_FD extern int xquartz_launchd_fd; #endif int TRANS(MakeAllCOTSServerListeners) (char *port, int *partial, int *count_ret, XtransConnInfo **ciptrs_ret) { char buffer[256]; /* ??? What size ?? */ XtransConnInfo ciptr, temp_ciptrs[NUMTRANS]; int status, i, j; #if defined(IPv6) && defined(AF_INET6) int ipv6_succ = 0; #endif prmsg (2,"MakeAllCOTSServerListeners(%s,%p)\n", port ? port : "NULL", ciptrs_ret); *count_ret = 0; #ifdef XQUARTZ_EXPORTS_LAUNCHD_FD fprintf(stderr, "Launchd socket fd: %d\n", xquartz_launchd_fd); if(xquartz_launchd_fd != -1) { if((ciptr = TRANS(ReopenCOTSServer(TRANS_SOCKET_LOCAL_INDEX, xquartz_launchd_fd, getenv("DISPLAY"))))==NULL) fprintf(stderr,"Got NULL while trying to Reopen launchd port\n"); else temp_ciptrs[(*count_ret)++] = ciptr; } #endif for (i = 0; i < NUMTRANS; i++) { Xtransport *trans = Xtransports[i].transport; unsigned int flags = 0; if (trans->flags&TRANS_ALIAS || trans->flags&TRANS_NOLISTEN) continue; snprintf(buffer, sizeof(buffer), "%s/:%s", trans->TransName, port ? port : ""); prmsg (5,"MakeAllCOTSServerListeners: opening %s\n", buffer); if ((ciptr = TRANS(OpenCOTSServer(buffer))) == NULL) { if (trans->flags & TRANS_DISABLED) continue; prmsg (1, "MakeAllCOTSServerListeners: failed to open listener for %s\n", trans->TransName); continue; } #if defined(IPv6) && defined(AF_INET6) if ((Xtransports[i].transport_id == TRANS_SOCKET_INET_INDEX && ipv6_succ)) flags |= ADDR_IN_USE_ALLOWED; #endif if ((status = TRANS(CreateListener (ciptr, port, flags))) < 0) { if (status == TRANS_ADDR_IN_USE) { /* * We failed to bind to the specified address because the * address is in use. It must be that a server is already * running at this address, and this function should fail. */ prmsg (1, "MakeAllCOTSServerListeners: server already running\n"); for (j = 0; j < *count_ret; j++) TRANS(Close) (temp_ciptrs[j]); *count_ret = 0; *ciptrs_ret = NULL; *partial = 0; return -1; } else { prmsg (1, "MakeAllCOTSServerListeners: failed to create listener for %s\n", trans->TransName); continue; } } #if defined(IPv6) && defined(AF_INET6) if (Xtransports[i].transport_id == TRANS_SOCKET_INET6_INDEX) ipv6_succ = 1; #endif prmsg (5, "MakeAllCOTSServerListeners: opened listener for %s, %d\n", trans->TransName, ciptr->fd); temp_ciptrs[*count_ret] = ciptr; (*count_ret)++; } *partial = (*count_ret < complete_network_count()); prmsg (5, "MakeAllCOTSServerListeners: partial=%d, actual=%d, complete=%d \n", *partial, *count_ret, complete_network_count()); if (*count_ret > 0) { if ((*ciptrs_ret = malloc ( *count_ret * sizeof (XtransConnInfo))) == NULL) { return -1; } for (i = 0; i < *count_ret; i++) { (*ciptrs_ret)[i] = temp_ciptrs[i]; } } else *ciptrs_ret = NULL; return 0; } int TRANS(MakeAllCLTSServerListeners) (char *port, int *partial, int *count_ret, XtransConnInfo **ciptrs_ret) { char buffer[256]; /* ??? What size ?? */ XtransConnInfo ciptr, temp_ciptrs[NUMTRANS]; int status, i, j; prmsg (2,"MakeAllCLTSServerListeners(%s,%p)\n", port ? port : "NULL", ciptrs_ret); *count_ret = 0; for (i = 0; i < NUMTRANS; i++) { Xtransport *trans = Xtransports[i].transport; if (trans->flags&TRANS_ALIAS || trans->flags&TRANS_NOLISTEN) continue; snprintf(buffer, sizeof(buffer), "%s/:%s", trans->TransName, port ? port : ""); prmsg (5,"MakeAllCLTSServerListeners: opening %s\n", buffer); if ((ciptr = TRANS(OpenCLTSServer (buffer))) == NULL) { prmsg (1, "MakeAllCLTSServerListeners: failed to open listener for %s\n", trans->TransName); continue; } if ((status = TRANS(CreateListener (ciptr, port, 0))) < 0) { if (status == TRANS_ADDR_IN_USE) { /* * We failed to bind to the specified address because the * address is in use. It must be that a server is already * running at this address, and this function should fail. */ prmsg (1, "MakeAllCLTSServerListeners: server already running\n"); for (j = 0; j < *count_ret; j++) TRANS(Close) (temp_ciptrs[j]); *count_ret = 0; *ciptrs_ret = NULL; *partial = 0; return -1; } else { prmsg (1, "MakeAllCLTSServerListeners: failed to create listener for %s\n", trans->TransName); continue; } } prmsg (5, "MakeAllCLTSServerListeners: opened listener for %s, %d\n", trans->TransName, ciptr->fd); temp_ciptrs[*count_ret] = ciptr; (*count_ret)++; } *partial = (*count_ret < complete_network_count()); prmsg (5, "MakeAllCLTSServerListeners: partial=%d, actual=%d, complete=%d \n", *partial, *count_ret, complete_network_count()); if (*count_ret > 0) { if ((*ciptrs_ret = malloc ( *count_ret * sizeof (XtransConnInfo))) == NULL) { return -1; } for (i = 0; i < *count_ret; i++) { (*ciptrs_ret)[i] = temp_ciptrs[i]; } } else *ciptrs_ret = NULL; return 0; } #endif /* TRANS_SERVER */ /* * These routines are not part of the X Transport Interface, but they * may be used by it. */ #if defined(SYSV) && defined(__i386__) && !defined(__SCO__) && !defined(sun) || defined(WIN32) /* * emulate readv */ static int TRANS(ReadV) (XtransConnInfo ciptr, struct iovec *iov, int iovcnt) { int i, len, total; char *base; ESET(0); for (i = 0, total = 0; i < iovcnt; i++, iov++) { len = iov->iov_len; base = iov->iov_base; while (len > 0) { register int nbytes; nbytes = TRANS(Read) (ciptr, base, len); if (nbytes < 0 && total == 0) return -1; if (nbytes <= 0) return total; ESET(0); len -= nbytes; total += nbytes; base += nbytes; } } return total; } #endif /* SYSV && __i386__ || WIN32 || __sxg__ */ #if defined(SYSV) && defined(__i386__) && !defined(__SCO__) && !defined(sun) || defined(WIN32) /* * emulate writev */ static int TRANS(WriteV) (XtransConnInfo ciptr, struct iovec *iov, int iovcnt) { int i, len, total; char *base; ESET(0); for (i = 0, total = 0; i < iovcnt; i++, iov++) { len = iov->iov_len; base = iov->iov_base; while (len > 0) { register int nbytes; nbytes = TRANS(Write) (ciptr, base, len); if (nbytes < 0 && total == 0) return -1; if (nbytes <= 0) return total; ESET(0); len -= nbytes; total += nbytes; base += nbytes; } } return total; } #endif /* SYSV && __i386__ || WIN32 || __sxg__ */ #if defined(_POSIX_SOURCE) || defined(USG) || defined(SVR4) || defined(__SVR4) || defined(__SCO__) #ifndef NEED_UTSNAME #define NEED_UTSNAME #endif #include #endif /* * TRANS(GetHostname) - similar to gethostname but allows special processing. */ int TRANS(GetHostname) (char *buf, int maxlen) { int len; #ifdef NEED_UTSNAME struct utsname name; uname (&name); len = strlen (name.nodename); if (len >= maxlen) len = maxlen - 1; strncpy (buf, name.nodename, len); buf[len] = '\0'; #else buf[0] = '\0'; (void) gethostname (buf, maxlen); buf [maxlen - 1] = '\0'; len = strlen(buf); #endif /* NEED_UTSNAME */ return len; } 070701000a531f000081a40000000000000000000000014f86841800003c160000010000010007ffffffffffffffff0000002f00000000root/usr/local/include/X11/Xtrans/Xtransutil.c/* Copyright 1993, 1994, 1998 The Open Group Permission to use, copy, modify, distribute, and sell this software and its documentation for any purpose is hereby granted without fee, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation. The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. Except as contained in this notice, the name of The Open Group shall not be used in advertising or otherwise to promote the sale, use or other dealings in this Software without prior written authorization from The Open Group. * Copyright 1993, 1994 NCR Corporation - Dayton, Ohio, USA * * All Rights Reserved * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, provided * that the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name NCR not be used in advertising * or publicity pertaining to distribution of the software without specific, * written prior permission. NCR makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. * * NCRS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN * NO EVENT SHALL NCR BE LIABLE FOR ANY SPECIAL, INDIRECT OR * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS * OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ /* * These are some utility functions created for convenience or to provide * an interface that is similar to an existing interface. These are built * only using the Transport Independant API, and have no knowledge of * the internal implementation. */ #ifdef XTHREADS #include #endif #ifdef WIN32 #include #include #endif #ifdef X11_t /* * These values come from X.h and Xauth.h, and MUST match them. Some * of these values are also defined by the ChangeHost protocol message. */ #define FamilyInternet 0 /* IPv4 */ #define FamilyDECnet 1 #define FamilyChaos 2 #define FamilyInternet6 6 #define FamilyAmoeba 33 #define FamilyLocalHost 252 #define FamilyKrb5Principal 253 #define FamilyNetname 254 #define FamilyLocal 256 #define FamilyWild 65535 /* * TRANS(ConvertAddress) converts a sockaddr based address to an * X authorization based address. Some of this is defined as part of * the ChangeHost protocol. The rest is just done in a consistent manner. */ int TRANS(ConvertAddress)(int *familyp, int *addrlenp, Xtransaddr **addrp) { prmsg(2,"ConvertAddress(%d,%d,%p)\n",*familyp,*addrlenp,*addrp); switch( *familyp ) { #if defined(TCPCONN) || defined(STREAMSCONN) case AF_INET: { /* * Check for the BSD hack localhost address 127.0.0.1. * In this case, we are really FamilyLocal. */ struct sockaddr_in saddr; int len = sizeof(saddr.sin_addr.s_addr); char *cp = (char *) &saddr.sin_addr.s_addr; memcpy (&saddr, *addrp, sizeof (struct sockaddr_in)); if ((len == 4) && (cp[0] == 127) && (cp[1] == 0) && (cp[2] == 0) && (cp[3] == 1)) { *familyp=FamilyLocal; } else { *familyp=FamilyInternet; *addrlenp=len; memcpy(*addrp,&saddr.sin_addr,len); } break; } #if defined(IPv6) && defined(AF_INET6) case AF_INET6: { struct sockaddr_in6 saddr6; memcpy (&saddr6, *addrp, sizeof (struct sockaddr_in6)); if (IN6_IS_ADDR_LOOPBACK(&saddr6.sin6_addr)) { *familyp=FamilyLocal; } else if (IN6_IS_ADDR_V4MAPPED(&(saddr6.sin6_addr))) { char *cp = (char *) &saddr6.sin6_addr.s6_addr[12]; if ((cp[0] == 127) && (cp[1] == 0) && (cp[2] == 0) && (cp[3] == 1)) { *familyp=FamilyLocal; } else { *familyp=FamilyInternet; *addrlenp = sizeof (struct in_addr); memcpy(*addrp,cp,*addrlenp); } } else { *familyp=FamilyInternet6; *addrlenp=sizeof(saddr6.sin6_addr); memcpy(*addrp,&saddr6.sin6_addr,sizeof(saddr6.sin6_addr)); } break; } #endif /* IPv6 */ #endif /* defined(TCPCONN) || defined(STREAMSCONN) */ #if defined(UNIXCONN) || defined(LOCALCONN) case AF_UNIX: { *familyp=FamilyLocal; break; } #endif /* defined(UNIXCONN) || defined(LOCALCONN) */ #if (defined(__SCO__) || defined(__UNIXWARE__)) && defined(LOCALCONN) case 0: { *familyp=FamilyLocal; break; } #endif default: prmsg(1,"ConvertAddress: Unknown family type %d\n", *familyp); return -1; } if (*familyp == FamilyLocal) { /* * In the case of a local connection, we need to get the * host name for authentication. */ char hostnamebuf[256]; int len = TRANS(GetHostname) (hostnamebuf, sizeof hostnamebuf); if (len > 0) { if (*addrp && *addrlenp < (len + 1)) { free (*addrp); *addrp = NULL; } if (!*addrp) *addrp = malloc (len + 1); if (*addrp) { strcpy ((char *) *addrp, hostnamebuf); *addrlenp = len; } else { *addrlenp = 0; } } else { if (*addrp) free (*addrp); *addrp = NULL; *addrlenp = 0; } } return 0; } #endif /* X11_t */ #ifdef ICE_t /* Needed for _XGethostbyaddr usage in TRANS(GetPeerNetworkId) */ # if defined(TCPCONN) || defined(UNIXCONN) # define X_INCLUDE_NETDB_H # define XOS_USE_NO_LOCKING # include # endif #include char * TRANS(GetMyNetworkId) (XtransConnInfo ciptr) { int family = ciptr->family; char *addr = ciptr->addr; char hostnamebuf[256]; char *networkId = NULL; const char *transName = ciptr->transptr->TransName; if (gethostname (hostnamebuf, sizeof (hostnamebuf)) < 0) { return (NULL); } switch (family) { #if defined(UNIXCONN) || defined(STREAMSCONN) || defined(LOCALCONN) case AF_UNIX: { struct sockaddr_un *saddr = (struct sockaddr_un *) addr; networkId = malloc (3 + strlen (transName) + strlen (hostnamebuf) + strlen (saddr->sun_path)); sprintf (networkId, "%s/%s:%s", transName, hostnamebuf, saddr->sun_path); break; } #endif /* defined(UNIXCONN) || defined(STREAMSCONN) || defined(LOCALCONN) */ #if defined(TCPCONN) || defined(STREAMSCONN) case AF_INET: #if defined(IPv6) && defined(AF_INET6) case AF_INET6: #endif { struct sockaddr_in *saddr = (struct sockaddr_in *) addr; #if defined(IPv6) && defined(AF_INET6) struct sockaddr_in6 *saddr6 = (struct sockaddr_in6 *) addr; #endif int portnum; char portnumbuf[10]; #if defined(IPv6) && defined(AF_INET6) if (family == AF_INET6) portnum = ntohs (saddr6->sin6_port); else #endif portnum = ntohs (saddr->sin_port); snprintf (portnumbuf, sizeof(portnumbuf), "%d", portnum); networkId = malloc (3 + strlen (transName) + strlen (hostnamebuf) + strlen (portnumbuf)); sprintf (networkId, "%s/%s:%s", transName, hostnamebuf, portnumbuf); break; } #endif /* defined(TCPCONN) || defined(STREAMSCONN) */ default: break; } return (networkId); } #include static jmp_buf env; #ifdef SIGALRM static volatile int nameserver_timedout = 0; static #ifdef RETSIGTYPE /* set by autoconf AC_TYPE_SIGNAL */ RETSIGTYPE #else /* Imake */ #ifdef SIGNALRETURNSINT int #else void #endif #endif nameserver_lost(int sig _X_UNUSED) { nameserver_timedout = 1; longjmp (env, -1); /* NOTREACHED */ #ifdef SIGNALRETURNSINT return -1; /* for picky compilers */ #endif } #endif /* SIGALARM */ char * TRANS(GetPeerNetworkId) (XtransConnInfo ciptr) { int family = ciptr->family; char *peer_addr = ciptr->peeraddr; char *hostname; char addrbuf[256]; const char *addr = NULL; switch (family) { case AF_UNSPEC: #if defined(UNIXCONN) || defined(STREAMSCONN) || defined(LOCALCONN) case AF_UNIX: { if (gethostname (addrbuf, sizeof (addrbuf)) == 0) addr = addrbuf; break; } #endif /* defined(UNIXCONN) || defined(STREAMSCONN) || defined(LOCALCONN) */ #if defined(TCPCONN) || defined(STREAMSCONN) case AF_INET: #if defined(IPv6) && defined(AF_INET6) case AF_INET6: #endif { struct sockaddr_in *saddr = (struct sockaddr_in *) peer_addr; #if defined(IPv6) && defined(AF_INET6) struct sockaddr_in6 *saddr6 = (struct sockaddr_in6 *) peer_addr; #endif char *address; int addresslen; #ifdef XTHREADS_NEEDS_BYNAMEPARAMS _Xgethostbynameparams hparams; #endif struct hostent * volatile hostp = NULL; #if defined(IPv6) && defined(AF_INET6) if (family == AF_INET6) { address = (char *) &saddr6->sin6_addr; addresslen = sizeof (saddr6->sin6_addr); } else #endif { address = (char *) &saddr->sin_addr; addresslen = sizeof (saddr->sin_addr); } #ifdef SIGALRM /* * gethostbyaddr can take a LONG time if the host does not exist. * Assume that if it does not respond in NAMESERVER_TIMEOUT seconds * that something is wrong and do not make the user wait. * gethostbyaddr will continue after a signal, so we have to * jump out of it. */ nameserver_timedout = 0; signal (SIGALRM, nameserver_lost); alarm (4); if (setjmp(env) == 0) { #endif hostp = _XGethostbyaddr (address, addresslen, family, hparams); #ifdef SIGALRM } alarm (0); #endif if (hostp != NULL) addr = hostp->h_name; else #if defined(IPv6) && defined(AF_INET6) addr = inet_ntop (family, address, addrbuf, sizeof (addrbuf)); #else addr = inet_ntoa (saddr->sin_addr); #endif break; } #endif /* defined(TCPCONN) || defined(STREAMSCONN) */ default: return (NULL); } hostname = malloc (strlen (ciptr->transptr->TransName) + strlen (addr) + 2); strcpy (hostname, ciptr->transptr->TransName); strcat (hostname, "/"); if (addr) strcat (hostname, addr); return (hostname); } #endif /* ICE_t */ #if defined(WIN32) && defined(TCPCONN) int TRANS(WSAStartup) (void) { static WSADATA wsadata; prmsg (2,"WSAStartup()\n"); if (!wsadata.wVersion && WSAStartup(MAKEWORD(2,2), &wsadata)) return 1; return 0; } #endif #include static int is_numeric (const char *str) { int i; for (i = 0; i < (int) strlen (str); i++) if (!isdigit (str[i])) return (0); return (1); } #ifdef TRANS_SERVER #include #include #include #if !defined(S_IFLNK) && !defined(S_ISLNK) #undef lstat #define lstat(a,b) stat(a,b) #endif #define FAIL_IF_NOMODE 1 #define FAIL_IF_NOT_ROOT 2 #define WARN_NO_ACCESS 4 /* * We make the assumption that when the 'sticky' (t) bit is requested * it's not save if the directory has non-root ownership or the sticky * bit cannot be set and fail. */ static int trans_mkdir(const char *path, int mode) { struct stat buf; if (lstat(path, &buf) != 0) { if (errno != ENOENT) { prmsg(1, "mkdir: ERROR: (l)stat failed for %s (%d)\n", path, errno); return -1; } /* Dir doesn't exist. Try to create it */ #if !defined(WIN32) && !defined(__CYGWIN__) /* * 'sticky' bit requested: assume application makes * certain security implications. If effective user ID * is != 0: fail as we may not be able to meet them. */ if (geteuid() != 0) { if (mode & 01000) { prmsg(1, "mkdir: ERROR: euid != 0," "directory %s will not be created.\n", path); #ifdef FAIL_HARD return -1; #endif } else { prmsg(1, "mkdir: Cannot create %s with root ownership\n", path); } } #endif #ifndef WIN32 if (mkdir(path, mode) == 0) { if (chmod(path, mode)) { prmsg(1, "mkdir: ERROR: Mode of %s should be set to %04o\n", path, mode); #ifdef FAIL_HARD return -1; #endif } #else if (mkdir(path) == 0) { #endif } else { prmsg(1, "mkdir: ERROR: Cannot create %s\n", path); return -1; } return 0; } else { if (S_ISDIR(buf.st_mode)) { int updateOwner = 0; int updateMode = 0; int updatedOwner = 0; int updatedMode = 0; int status = 0; /* Check if the directory's ownership is OK. */ if (buf.st_uid != 0) updateOwner = 1; /* * Check if the directory's mode is OK. An exact match isn't * required, just a mode that isn't more permissive than the * one requested. */ if ((~mode) & 0077 & buf.st_mode) updateMode = 1; /* * If the directory is not writeable not everybody may * be able to create sockets. Therefore warn if mode * cannot be fixed. */ if ((~buf.st_mode) & 0022 & mode) { updateMode = 1; status |= WARN_NO_ACCESS; } /* * If 'sticky' bit is requested fail if owner isn't root * as we assume the caller makes certain security implications */ if (mode & 01000) { status |= FAIL_IF_NOT_ROOT; if (!(buf.st_mode & 01000)) { status |= FAIL_IF_NOMODE; updateMode = 1; } } #ifdef HAS_FCHOWN /* * If fchown(2) and fchmod(2) are available, try to correct the * directory's owner and mode. Otherwise it isn't safe to attempt * to do this. */ if (updateMode || updateOwner) { int fd = -1; struct stat fbuf; if ((fd = open(path, O_RDONLY)) != -1) { if (fstat(fd, &fbuf) == -1) { prmsg(1, "mkdir: ERROR: fstat failed for %s (%d)\n", path, errno); close(fd); return -1; } /* * Verify that we've opened the same directory as was * checked above. */ if (!S_ISDIR(fbuf.st_mode) || buf.st_dev != fbuf.st_dev || buf.st_ino != fbuf.st_ino) { prmsg(1, "mkdir: ERROR: inode for %s changed\n", path); close(fd); return -1; } if (updateOwner && fchown(fd, 0, 0) == 0) updatedOwner = 1; if (updateMode && fchmod(fd, mode) == 0) updatedMode = 1; close(fd); } } #endif if (updateOwner && !updatedOwner) { #ifdef FAIL_HARD if (status & FAIL_IF_NOT_ROOT) { prmsg(1, "mkdir: ERROR: Owner of %s must be set to root\n", path); return -1; } #endif #if !defined(__APPLE_CC__) && !defined(__CYGWIN__) prmsg(1, "mkdir: Owner of %s should be set to root\n", path); #endif } if (updateMode && !updatedMode) { #ifdef FAIL_HARD if (status & FAIL_IF_NOMODE) { prmsg(1, "mkdir: ERROR: Mode of %s must be set to %04o\n", path, mode); return -1; } #endif prmsg(1, "mkdir: Mode of %s should be set to %04o\n", path, mode); if (status & WARN_NO_ACCESS) { prmsg(1, "mkdir: this may cause subsequent errors\n"); } } return 0; } return -1; } /* In all other cases, fail */ return -1; } #endif /* TRANS_SERVER */ 070701000a531e000081a40000000000000000000000014f86841800007d140000010000010007ffffffffffffffff0000002e00000000root/usr/local/include/X11/Xtrans/Xtranstli.c/* Copyright 1993, 1994, 1998 The Open Group Permission to use, copy, modify, distribute, and sell this software and its documentation for any purpose is hereby granted without fee, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation. The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. Except as contained in this notice, the name of The Open Group shall not be used in advertising or otherwise to promote the sale, use or other dealings in this Software without prior written authorization from The Open Group. * Copyright 1993, 1994 NCR Corporation - Dayton, Ohio, USA * * All Rights Reserved * * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose and without fee is hereby granted, provided * that the above copyright notice appear in all copies and that both that * copyright notice and this permission notice appear in supporting * documentation, and that the name NCR not be used in advertising * or publicity pertaining to distribution of the software without specific, * written prior permission. NCR makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. * * NCR DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN * NO EVENT SHALL NCR BE LIABLE FOR ANY SPECIAL, INDIRECT OR * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS * OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ #include #include #include #include #include #include /* * This is the TLI implementation of the X Transport service layer */ typedef struct _TLItrans2dev { char *transname; char *protofamily; char *devcotsname; char *devcltsname; int family; } TLItrans2dev; static TLItrans2dev TLItrans2devtab[] = { {"inet","inet","/dev/tcp","/dev/udp",AF_INET}, {"tcp","inet","/dev/tcp","/dev/udp",AF_INET}, {"tli","loopback","/dev/ticots","/dev/ticlts",AF_UNIX}, }; #define NUMTLIFAMILIES (sizeof(TLItrans2devtab)/sizeof(TLItrans2dev)) /* * The local TLI connection, is a form of a local connection, so use a * sockaddr_un for the address so that it will be treated just like the other * local transports such as UNIX domain sockets, pts, and named. */ #if defined(X11_t) #define TLINODENAME "TLI:xserver" #endif #if defined(XIM_t) #define TLINODENAME "TLI:xim" #endif #if defined(FS_t) || defined(FONT_t) #define TLINODENAME "TLI:fontserver" #endif #if defined(ICE_t) #define TLINODENAME "TLI:ICE" #endif #if defined(TEST_t) #define TLINODENAME "TLI:test" #endif #ifndef PORTBUFSIZE #ifdef TRANS_SERVER #define PORTBUFSIZE 64 #else #ifdef TRANS_CLIENT #define PORTBUFSIZE 64 #endif #endif #endif /* * These are some utility function used by the real interface function below. */ static int TRANS(TLISelectFamily)(char *family) { int i; prmsg(3,"TLISelectFamily(%s)\n", family); for(i=0;ifd,&netbuf,LOCALNAME) < 0 ) { prmsg(1,"TLIGetAddr: t_getname(LOCALNAME) failed: %d\n", errno); return -1; } prmsg(4,"TLIGetAddr: got family %d len %d\n", ((struct sockaddr *) &sockname)->sa_family ,netbuf.len); /* * Everything looks good: fill in the XtransConnInfo structure. */ if( ciptr->addr ) free(ciptr->addr); if( (ciptr->addr = malloc(netbuf.len)) == NULL ) { prmsg(1, "TLIGetAddr: Can't allocate space for the addr\n"); return -1; } ciptr->family=((struct sockaddr *) &sockname)->sa_family; ciptr->addrlen=netbuf.len; memcpy(ciptr->addr,&sockname,ciptr->addrlen); return 0; } /* * This function gets the remote address of the socket and stores it in the * XtransConnInfo structure for the connection. */ static int TRANS(TLIGetPeerAddr)(XtransConnInfo ciptr) { Xtransaddr sockname; struct netbuf netbuf; prmsg(3,"TLIGetPeerAddr(%x)\n", ciptr); netbuf.buf=(char *)&sockname; netbuf.len=sizeof(sockname); netbuf.maxlen=sizeof(sockname); if( t_getname(ciptr->fd,&netbuf,REMOTENAME) < 0 ) { prmsg(1,"TLIGetPeerAddr: t_getname(REMOTENAME) failed: %d\n", errno); return -1; } prmsg(4,"TLIGetPeerAddr: got family %d len %d\n", ((struct sockaddr *) &sockname)->sa_family ,netbuf.len); /* * Everything looks good: fill in the XtransConnInfo structure. */ if( ciptr->peeraddr ) free(ciptr->peeraddr); if( (ciptr->peeraddr = malloc(netbuf.len)) == NULL ) { prmsg(1, "TLIGetPeerAddr: Can't allocate space for the addr\n"); return -1; } ciptr->peeraddrlen=netbuf.len; memcpy(ciptr->peeraddr,&sockname,ciptr->peeraddrlen); return 0; } /* * This function will establish a local name for the transport. This function * do extra work for the local tli connection. It must create a sockaddr_un * format address so that it will look like an AF_UNIX connection to the * higher layer. * * This function will only be called by the OPENC?TSClient() functions since * the local address is set up in the CreateListner() for the server ends. */ static int TRANS(TLITLIBindLocal)(int fd, int family, char *port) { struct sockaddr_un *sunaddr=NULL; struct t_bind *req=NULL; prmsg(2, "TLITLIBindLocal(%d,%d,%s)\n", fd, family, port); if( family == AF_UNIX ) { if( (req=(struct t_bind *)t_alloc(fd,T_BIND,0)) == NULL ) { prmsg(1, "TLITLIBindLocal() failed to allocate a t_bind\n"); return -1; } if( (sunaddr=(struct sockaddr_un *) malloc(sizeof(struct sockaddr_un))) == NULL ) { prmsg(1, "TLITLIBindLocal: failed to allocate a sockaddr_un\n"); t_free((char *)req,T_BIND); return -1; } sunaddr->sun_family=AF_UNIX; #ifdef nuke if( *port == '/' ) { /* A full pathname */ (void) strcpy(sunaddr->sun_path, port); } else { (void) sprintf(sunaddr->sun_path,"%s%s", TLINODENAME, port ); } #endif /*NUKE*/ (void) sprintf(sunaddr->sun_path,"%s%d", TLINODENAME, getpid()^time(NULL) ); prmsg(4, "TLITLIBindLocal: binding to %s\n", sunaddr->sun_path); req->addr.buf=(char *)sunaddr; req->addr.len=sizeof(*sunaddr); req->addr.maxlen=sizeof(*sunaddr); } if( t_bind(fd, req, NULL) < 0 ) { prmsg(1, "TLIBindLocal: Unable to bind TLI device to %s\n", port); if (sunaddr) free((char *) sunaddr); if (req) t_free((char *)req,T_BIND); return -1; } return 0; } static XtransConnInfo TRANS(TLIOpen)(char *device) { XtransConnInfo ciptr; prmsg(3,"TLIOpen(%s)\n", device); if( (ciptr = calloc(1,sizeof(struct _XtransConnInfo))) == NULL ) { prmsg(1, "TLIOpen: calloc failed\n"); return NULL; } if( (ciptr->fd=t_open( device, O_RDWR, NULL )) < 0 ) { prmsg(1, "TLIOpen: t_open failed for %s\n", device); free(ciptr); return NULL; } return ciptr; } #ifdef TRANS_REOPEN static XtransConnInfo TRANS(TLIReopen)(char *device, int fd, char *port) { XtransConnInfo ciptr; prmsg(3,"TLIReopen(%s,%d, %s)\n", device, fd, port ); if (t_sync (fd) < 0) { prmsg(1, "TLIReopen: t_sync failed\n"); return NULL; } if( (ciptr = calloc(1,sizeof(struct _XtransConnInfo))) == NULL ) { prmsg(1, "TLIReopen: calloc failed\n"); return NULL; } ciptr->fd = fd; return ciptr; } #endif /* TRANS_REOPEN */ static int TRANS(TLIAddrToNetbuf)(int tlifamily, char *host, char *port, struct netbuf *netbufp) { struct netconfig *netconfigp; struct nd_hostserv nd_hostserv; struct nd_addrlist *nd_addrlistp = NULL; void *handlep; long lport; prmsg(3,"TLIAddrToNetbuf(%d,%s,%s)\n", tlifamily, host, port ); if( (handlep=setnetconfig()) == NULL ) return -1; lport = strtol (port, (char**)NULL, 10); if (lport < 1024 || lport > USHRT_MAX) return -1; nd_hostserv.h_host = host; if( port && *port ) { nd_hostserv.h_serv = port; } else { nd_hostserv.h_serv = NULL; } while( (netconfigp=getnetconfig(handlep)) != NULL ) { if( strcmp(netconfigp->nc_protofmly, TLItrans2devtab[tlifamily].protofamily) != 0 ) continue; prmsg(5,"TLIAddrToNetbuf: Trying to resolve %s.%s for %s\n", host, port, TLItrans2devtab[tlifamily].protofamily ); if( netdir_getbyname(netconfigp,&nd_hostserv, &nd_addrlistp) == 0 ) { /* we have at least one address to use */ prmsg(5, "TLIAddrToNetbuf: found address for %s.%s\n", host, port); prmsg(5, "TLIAddrToNetbuf: %s\n",taddr2uaddr(netconfigp,nd_addrlistp->n_addrs)); memcpy(netbufp->buf,nd_addrlistp->n_addrs->buf, nd_addrlistp->n_addrs->len); netbufp->len=nd_addrlistp->n_addrs->len; endnetconfig(handlep); return 0; } } endnetconfig(handlep); return -1; } /* * These functions are the interface supplied in the Xtransport structure */ #ifdef TRANS_CLIENT static XtransConnInfo TRANS(TLIOpenCOTSClient)(Xtransport *thistrans, char *protocol, char *host, char *port) { XtransConnInfo ciptr; int i; prmsg(2,"TLIOpenCOTSClient(%s,%s,%s)\n", protocol, host, port ); if( (i=TRANS(TLISelectFamily)(thistrans->TransName)) < 0 ) { prmsg(1,"TLIOpenCOTSClient: Unable to determine device for %s\n", thistrans->TransName); return NULL; } if( (ciptr=TRANS(TLIOpen)(TLItrans2devtab[i].devcotsname)) == NULL ) { prmsg(1,"TLIOpenCOTSClient: Unable to open device for %s\n", thistrans->TransName); return NULL; } if( TRANS(TLITLIBindLocal)(ciptr->fd,TLItrans2devtab[i].family,port) < 0 ) { prmsg(1, "TLIOpenCOTSClient: ...TLITLIBindLocal() failed: %d\n", errno); t_close(ciptr->fd); free(ciptr); return NULL; } if( TRANS(TLIGetAddr)(ciptr) < 0 ) { prmsg(1, "TLIOpenCOTSClient: ...TLIGetAddr() failed: %d\n", errno); t_close(ciptr->fd); free(ciptr); return NULL; } /* Save the TLIFamily for later use in TLIAddrToNetbuf() lookups */ ciptr->index = i; return ciptr; } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER static XtransConnInfo TRANS(TLIOpenCOTSServer)(Xtransport *thistrans, char *protocol, char *host, char *port) { XtransConnInfo ciptr; int i; prmsg(2,"TLIOpenCOTSServer(%s,%s,%s)\n", protocol, host, port ); if( (i=TRANS(TLISelectFamily)(thistrans->TransName)) < 0 ) { prmsg(1, "TLIOpenCOTSServer: Unable to determine device for %s\n", thistrans->TransName); return NULL; } if( (ciptr=TRANS(TLIOpen)(TLItrans2devtab[i].devcotsname)) == NULL ) { prmsg(1, "TLIOpenCOTSServer: Unable to open device for %s\n", thistrans->TransName); return NULL; } /* Set the family type */ ciptr->family = TLItrans2devtab[i].family; /* Save the TLIFamily for later use in TLIAddrToNetbuf() lookups */ ciptr->index = i; return ciptr; } #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT static XtransConnInfo TRANS(TLIOpenCLTSClient)(Xtransport *thistrans, char *protocol, char *host, char *port) { XtransConnInfo ciptr; int i; prmsg(2,"TLIOpenCLTSClient(%s,%s,%s)\n", protocol, host, port ); if( (i=TRANS(TLISelectFamily)(thistrans->TransName)) < 0 ) { prmsg(1, "TLIOpenCLTSClient: Unable to determine device for %s\n", thistrans->TransName); return NULL; } if( (ciptr=TRANS(TLIOpen)(TLItrans2devtab[i].devcltsname)) == NULL ) { prmsg(1, "TLIOpenCLTSClient: Unable to open device for %s\n", thistrans->TransName); return NULL; } if( TRANS(TLITLIBindLocal)(ciptr->fd,TLItrans2devtab[i].family,port) < 0 ) { prmsg(1, "TLIOpenCLTSClient: ...TLITLIBindLocal() failed: %d\n", errno); t_close(ciptr->fd); free(ciptr); return NULL; } if( TRANS(TLIGetAddr)(ciptr) < 0 ) { prmsg(1, "TLIOpenCLTSClient: ...TLIGetPeerAddr() failed: %d\n", errno); t_close(ciptr->fd); free(ciptr); return NULL; } return ciptr; } #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER static XtransConnInfo TRANS(TLIOpenCLTSServer)(Xtransport *thistrans, char *protocol, char *host, char *port) { XtransConnInfo ciptr; int i; prmsg(2,"TLIOpenCLTSServer(%s,%s,%s)\n", protocol, host, port ); if( (i=TRANS(TLISelectFamily)(thistrans->TransName)) < 0 ) { prmsg(1, "TLIOpenCLTSServer: Unable to determine device for %s\n", thistrans->TransName); return NULL; } if( (ciptr=TRANS(TLIOpen)(TLItrans2devtab[i].devcltsname)) == NULL ) { prmsg(1, "TLIOpenCLTSServer: Unable to open device for %s\n", thistrans->TransName); return NULL; } return ciptr; } #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN static XtransConnInfo TRANS(TLIReopenCOTSServer)(Xtransport *thistrans, int fd, char *port) { XtransConnInfo ciptr; int i; prmsg(2,"TLIReopenCOTSServer(%d, %s)\n", fd, port); if( (i=TRANS(TLISelectFamily)(thistrans->TransName)) < 0 ) { prmsg(1, "TLIReopenCOTSServer: Unable to determine device for %s\n", thistrans->TransName); return NULL; } if( (ciptr=TRANS(TLIReopen)( TLItrans2devtab[i].devcotsname, fd, port)) == NULL ) { prmsg(1, "TLIReopenCOTSServer: Unable to open device for %s\n", thistrans->TransName); return NULL; } /* Save the TLIFamily for later use in TLIAddrToNetbuf() lookups */ ciptr->index = i; return ciptr; } static XtransConnInfo TRANS(TLIReopenCLTSServer)(Xtransport *thistrans, int fd, char *port) { XtransConnInfo ciptr; int i; prmsg(2,"TLIReopenCLTSServer(%d, %s)\n", fd, port); if( (i=TRANS(TLISelectFamily)(thistrans->TransName)) < 0 ) { prmsg(1, "TLIReopenCLTSServer: Unable to determine device for %s\n", thistrans->TransName); return NULL; } if( (ciptr=TRANS(TLIReopen)( TLItrans2devtab[i].devcltsname, fd, port)) == NULL ) { prmsg(1, "TLIReopenCLTSServer: Unable to open device for %s\n", thistrans->TransName); return NULL; } ciptr->index = i; return ciptr; } #endif /* TRANS_REOPEN */ static int TRANS(TLISetOption)(XtransConnInfo ciptr, int option, int arg) { prmsg(2,"TLISetOption(%d,%d,%d)\n", ciptr->fd, option, arg ); return -1; } #ifdef TRANS_SERVER static int TRANS(TLICreateListener)(XtransConnInfo ciptr, struct t_bind *req) { struct t_bind *ret; prmsg(2,"TLICreateListener(%x->%d,%x)\n", ciptr, ciptr->fd, req ); if( (ret=(struct t_bind *)t_alloc(ciptr->fd,T_BIND,T_ALL)) == NULL ) { prmsg(1, "TLICreateListener: failed to allocate a t_bind\n"); t_free((char *)req,T_BIND); return TRANS_CREATE_LISTENER_FAILED; } if( t_bind(ciptr->fd, req, ret) < 0 ) { prmsg(1, "TLICreateListener: t_bind failed\n"); t_free((char *)req,T_BIND); t_free((char *)ret,T_BIND); return TRANS_CREATE_LISTENER_FAILED; } if( memcmp(req->addr.buf,ret->addr.buf,req->addr.len) != 0 ) { prmsg(1, "TLICreateListener: unable to bind to %x\n", req); t_free((char *)req,T_BIND); t_free((char *)ret,T_BIND); return TRANS_ADDR_IN_USE; } /* * Everything looks good: fill in the XtransConnInfo structure. */ if( (ciptr->addr = malloc(ret->addr.len)) == NULL ) { prmsg(1, "TLICreateListener: Unable to allocate space for the address\n"); t_free((char *)req,T_BIND); t_free((char *)ret, T_BIND); return TRANS_CREATE_LISTENER_FAILED; } ciptr->addrlen=ret->addr.len; memcpy(ciptr->addr,ret->addr.buf,ret->addr.len); t_free((char *)req,T_BIND); t_free((char *)ret, T_BIND); return 0; } static int TRANS(TLIINETCreateListener)(XtransConnInfo ciptr, char *port, unsigned int flags) { char portbuf[PORTBUFSIZE]; struct t_bind *req; struct sockaddr_in *sinaddr; long tmpport; prmsg(2,"TLIINETCreateListener(%x->%d,%s)\n", ciptr, ciptr->fd, port ? port : "NULL" ); #ifdef X11_t /* * X has a well known port, that is transport dependent. It is easier * to handle it here, than try and come up with a transport independent * representation that can be passed in and resolved the usual way. * * The port that is passed here is really a string containing the idisplay * from ConnectDisplay(). */ if (is_numeric (port)) { tmpport = X_TCP_PORT + strtol (port, (char**)NULL, 10); sprintf(portbuf,"%u", tmpport); port = portbuf; } #endif if( (req=(struct t_bind *)t_alloc(ciptr->fd,T_BIND,T_ALL)) == NULL ) { prmsg(1, "TLIINETCreateListener: failed to allocate a t_bind\n"); return TRANS_CREATE_LISTENER_FAILED; } if( port && *port ) { if(TRANS(TLIAddrToNetbuf)(ciptr->index,HOST_SELF,port,&(req->addr)) < 0) { prmsg(1, "TLIINETCreateListener: can't resolve name:HOST_SELF.%s\n", port); t_free((char *)req,T_BIND); return TRANS_CREATE_LISTENER_FAILED; } } else { sinaddr=(struct sockaddr_in *) req->addr.buf; sinaddr->sin_family=AF_INET; sinaddr->sin_port=htons(0); sinaddr->sin_addr.s_addr=0; } /* Set the qlen */ req->qlen=1; return TRANS(TLICreateListener)(ciptr, req); } static int TRANS(TLITLICreateListener)(XtransConnInfo ciptr, char *port, unsigned int flags) { struct t_bind *req; struct sockaddr_un *sunaddr; int ret_value; prmsg(2,"TLITLICreateListener(%x->%d,%s)\n", ciptr, ciptr->fd, port ? port : "NULL"); if( (req=(struct t_bind *)t_alloc(ciptr->fd,T_BIND,0)) == NULL ) { prmsg(1, "TLITLICreateListener: failed to allocate a t_bind\n"); return TRANS_CREATE_LISTENER_FAILED; } if( (sunaddr=(struct sockaddr_un *) malloc(sizeof(struct sockaddr_un))) == NULL ) { prmsg(1, "TLITLICreateListener: failed to allocate a sockaddr_un\n"); t_free((char *)req,T_BIND); return TRANS_CREATE_LISTENER_FAILED; } sunaddr->sun_family=AF_UNIX; if( port && *port ) { if( *port == '/' ) { /* A full pathname */ (void) strcpy(sunaddr->sun_path, port); } else { (void) sprintf(sunaddr->sun_path,"%s%s", TLINODENAME, port ); } } else { (void) sprintf(sunaddr->sun_path,"%s%d", TLINODENAME, getpid()); } req->addr.buf=(char *)sunaddr; req->addr.len=sizeof(*sunaddr); req->addr.maxlen=sizeof(*sunaddr); /* Set the qlen */ req->qlen=1; ret_value = TRANS(TLICreateListener)(ciptr, req); free((char *) sunaddr); return ret_value; } static XtransConnInfo TRANS(TLIAccept)(XtransConnInfo ciptr, int *status) { struct t_call *call; XtransConnInfo newciptr; int i; prmsg(2,"TLIAccept(%x->%d)\n", ciptr, ciptr->fd); if( (call=(struct t_call *)t_alloc(ciptr->fd,T_CALL,T_ALL)) == NULL ) { prmsg(1, "TLIAccept() failed to allocate a t_call\n"); *status = TRANS_ACCEPT_BAD_MALLOC; return NULL; } if( t_listen(ciptr->fd,call) < 0 ) { extern char *t_errlist[]; extern int t_errno; prmsg(1, "TLIAccept() t_listen() failed\n"); prmsg(1, "TLIAccept: %s\n", t_errlist[t_errno]); t_free((char *)call,T_CALL); *status = TRANS_ACCEPT_MISC_ERROR; return NULL; } /* * Now we need to set up the new endpoint for the incoming connection. */ i=ciptr->index; /* Makes the next line more readable */ if( (newciptr=TRANS(TLIOpen)(TLItrans2devtab[i].devcotsname)) == NULL ) { prmsg(1, "TLIAccept() failed to open a new endpoint\n"); t_free((char *)call,T_CALL); *status = TRANS_ACCEPT_MISC_ERROR; return NULL; } if( TRANS(TLITLIBindLocal)(newciptr->fd,TLItrans2devtab[i].family,"") < 0 ) { prmsg(1, "TLIAccept: TRANS(TLITLIBindLocal)() failed: %d\n", errno); t_free((char *)call,T_CALL); t_close(newciptr->fd); free(newciptr); *status = TRANS_ACCEPT_MISC_ERROR; return NULL; } if( t_accept(ciptr->fd,newciptr->fd,call) < 0 ) { extern char *t_errlist[]; extern int t_errno; prmsg(1, "TLIAccept() t_accept() failed\n"); prmsg(1, "TLIAccept: %s\n", t_errlist[t_errno]); if( t_errno == TLOOK ) { int evtype = t_look(ciptr->fd); prmsg(1, "TLIAccept() t_look() returned %d\n", evtype); switch( evtype ) { case T_DISCONNECT: if( t_rcvdis(ciptr->fd, NULL) < 0 ) { prmsg(1, "TLIAccept() t_rcvdis() failed\n"); prmsg(1, "TLIAccept: %s\n", t_errlist[t_errno]); } break; default: break; } } t_free((char *)call,T_CALL); t_close(newciptr->fd); free(newciptr); *status = TRANS_ACCEPT_FAILED; return NULL; } t_free((char *)call,T_CALL); if( TRANS(TLIGetAddr)(newciptr) < 0 ) { prmsg(1, "TLIAccept: TRANS(TLIGetPeerAddr)() failed: %d\n", errno); t_close(newciptr->fd); free(newciptr); *status = TRANS_ACCEPT_MISC_ERROR; return NULL; } if( TRANS(TLIGetPeerAddr)(newciptr) < 0 ) { prmsg(1, "TLIAccept: TRANS(TLIGetPeerAddr)() failed: %d\n", errno); t_close(newciptr->fd); free(newciptr->addr); free(newciptr); *status = TRANS_ACCEPT_MISC_ERROR; return NULL; } if( ioctl(newciptr->fd, I_POP,"timod") < 0 ) { prmsg(1, "TLIAccept() ioctl(I_POP, \"timod\") failed %d\n", errno); t_close(newciptr->fd); free(newciptr->addr); free(newciptr); *status = TRANS_ACCEPT_MISC_ERROR; return NULL; } if( ioctl(newciptr->fd, I_PUSH,"tirdwr") < 0 ) { prmsg(1, "TLIAccept() ioctl(I_PUSH,\"tirdwr\") failed %d\n", errno); t_close(newciptr->fd); free(newciptr->addr); free(newciptr); *status = TRANS_ACCEPT_MISC_ERROR; return NULL; } *status = 0; return newciptr; } #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT static int TRANS(TLIConnect)(XtransConnInfo ciptr, struct t_call *sndcall ) { prmsg(2, "TLIConnect(%x->%d,%x)\n", ciptr, ciptr->fd, sndcall); if( t_connect(ciptr->fd,sndcall,NULL) < 0 ) { extern char *t_errlist[]; extern int t_errno; prmsg(1, "TLIConnect() t_connect() failed\n"); prmsg(1, "TLIConnect: %s\n", t_errlist[t_errno]); t_free((char *)sndcall,T_CALL); if (t_errno == TLOOK && t_look(ciptr->fd) == T_DISCONNECT) { t_rcvdis(ciptr->fd,NULL); return TRANS_TRY_CONNECT_AGAIN; } else return TRANS_CONNECT_FAILED; } t_free((char *)sndcall,T_CALL); /* * Sync up the address fields of ciptr. */ if( TRANS(TLIGetAddr)(ciptr) < 0 ) { prmsg(1, "TLIConnect: ...TLIGetAddr() failed: %d\n", errno); return TRANS_CONNECT_FAILED; } if( TRANS(TLIGetPeerAddr)(ciptr) < 0 ) { prmsg(1, "TLIConnect: ...TLIGetPeerAddr() failed: %d\n", errno); return TRANS_CONNECT_FAILED; } if( ioctl(ciptr->fd, I_POP,"timod") < 0 ) { prmsg(1, "TLIConnect() ioctl(I_POP,\"timod\") failed %d\n", errno); return TRANS_CONNECT_FAILED; } if( ioctl(ciptr->fd, I_PUSH,"tirdwr") < 0 ) { prmsg(1, "TLIConnect() ioctl(I_PUSH,\"tirdwr\") failed %d\n", errno); return TRANS_CONNECT_FAILED; } return 0; } static int TRANS(TLIINETConnect)(XtransConnInfo ciptr, char *host, char *port) { char portbuf[PORTBUFSIZE]; struct t_call *sndcall; long tmpport; prmsg(2, "TLIINETConnect(%s,%s)\n", host, port); #ifdef X11_t /* * X has a well known port, that is transport dependant. It is easier * to handle it here, than try and come up with a transport independent * representation that can be passed in and resolved the usual way. * * The port that is passed here is really a string containing the idisplay * from ConnectDisplay(). */ if (is_numeric (port)) { tmpport = X_TCP_PORT + strtol (port, (char**)NULL, 10); sprintf(portbuf,"%u", tmpport ); port = portbuf; } #endif if( (sndcall=(struct t_call *)t_alloc(ciptr->fd,T_CALL,T_ALL)) == NULL ) { prmsg(1, "TLIINETConnect() failed to allocate a t_call\n"); return TRANS_CONNECT_FAILED; } if( TRANS(TLIAddrToNetbuf)(ciptr->index, host, port, &(sndcall->addr) ) < 0 ) { prmsg(1, "TLIINETConnect() unable to resolve name:%s.%s\n", host, port); t_free((char *)sndcall,T_CALL); return TRANS_CONNECT_FAILED; } return TRANS(TLIConnect)(ciptr, sndcall ); } static int TRANS(TLITLIConnect)(XtransConnInfo ciptr, char *host, char *port) { struct t_call *sndcall; struct sockaddr_un *sunaddr; int ret_value; prmsg(2, "TLITLIConnect(%s,%s)\n", host, port); if( (sndcall=(struct t_call *)t_alloc(ciptr->fd,T_CALL,T_OPT|T_UDATA)) == NULL ) { prmsg(1, "TLITLIConnect() failed to allocate a t_call\n"); return TRANS_CONNECT_FAILED; } if( (sunaddr=(struct sockaddr_un *) malloc(sizeof(struct sockaddr_un))) == NULL ) { prmsg(1, "TLITLIConnect: failed to allocate a sockaddr_un\n"); t_free((char *)sndcall,T_CALL); return TRANS_CONNECT_FAILED; } sunaddr->sun_family=AF_UNIX; if( *port == '/' || strncmp (port, TLINODENAME, strlen (TLINODENAME)) == 0) { /* Use the port as is */ (void) strcpy(sunaddr->sun_path, port); } else { (void) sprintf(sunaddr->sun_path,"%s%s", TLINODENAME, port ); } sndcall->addr.buf=(char *)sunaddr; sndcall->addr.len=sizeof(*sunaddr); sndcall->addr.maxlen=sizeof(*sunaddr); ret_value = TRANS(TLIConnect)(ciptr, sndcall ); free((char *) sunaddr); return ret_value; } #endif /* TRANS_CLIENT */ static int TRANS(TLIBytesReadable)(XtransConnInfo ciptr, BytesReadable_t *pend) { int ret; struct pollfd filedes; prmsg(2, "TLIByteReadable(%x->%d,%x)\n", ciptr, ciptr->fd, pend ); /* * This function should detect hangup conditions. Use poll to check * if no data is present. On SVR4, the M_HANGUP message sits on the * streams head, and ioctl(N_READ) keeps returning 0 because there is * no data available. The hangup goes undetected, and the client hangs. */ ret=ioctl(ciptr->fd, I_NREAD, (char *)pend); if( ret != 0 ) return ret; /* Data present or error */ /* Zero data, or POLLHUP message */ filedes.fd=ciptr->fd; filedes.events=POLLIN; ret=poll(&filedes, 1, 0); if( ret == 0 ) { *pend=0; return 0; /* Really, no data */ } if( ret < 0 ) return -1; /* just pass back the error */ if( filedes.revents & (POLLHUP|POLLERR) ) /* check for hangup */ return -1; /* Should only get here if data arrived after the first ioctl() */ return ioctl(ciptr->fd, I_NREAD, (char *)pend); } static int TRANS(TLIRead)(XtransConnInfo ciptr, char *buf, int size) { prmsg(2, "TLIRead(%d,%x,%d)\n", ciptr->fd, buf, size ); return read(ciptr->fd,buf,size); } static int TRANS(TLIWrite)(XtransConnInfo ciptr, char *buf, int size) { prmsg(2, "TLIWrite(%d,%x,%d)\n", ciptr->fd, buf, size ); return write(ciptr->fd,buf,size); } static int TRANS(TLIReadv)(XtransConnInfo ciptr, struct iovec *buf, int size) { prmsg(2, "TLIReadv(%d,%x,%d)\n", ciptr->fd, buf, size ); return READV(ciptr,buf,size); } static int TRANS(TLIWritev)(XtransConnInfo ciptr, struct iovec *buf, int size) { prmsg(2, "TLIWritev(%d,%x,%d)\n", ciptr->fd, buf, size ); return WRITEV(ciptr,buf,size); } static int TRANS(TLIDisconnect)(XtransConnInfo ciptr) { prmsg(2, "TLIDisconnect(%x->%d)\n", ciptr, ciptr->fd); /* * Restore the TLI modules so that the connection can be properly shutdown. * This avoids the situation where a connection goes into the TIME_WAIT * state, and the address remains unavailable for a while. */ ioctl(ciptr->fd, I_POP,"tirdwr"); ioctl(ciptr->fd, I_PUSH,"timod"); t_snddis(ciptr->fd,NULL); return 0; } static int TRANS(TLIClose)(XtransConnInfo ciptr) { prmsg(2, "TLIClose(%x->%d)\n", ciptr, ciptr->fd); t_unbind(ciptr->fd); return (t_close(ciptr->fd)); } static int TRANS(TLICloseForCloning)(XtransConnInfo ciptr) { /* * Don't unbind. */ prmsg(2, "TLICloseForCloning(%x->%d)\n", ciptr, ciptr->fd); return (t_close(ciptr->fd)); } Xtransport TRANS(TLITCPFuncs) = { /* TLI Interface */ "tcp", 0, #ifdef TRANS_CLIENT TRANS(TLIOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER NULL, TRANS(TLIOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(TLIOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(TLIOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(TLIReopenCOTSServer), TRANS(TLIReopenCLTSServer), #endif TRANS(TLISetOption), #ifdef TRANS_SERVER TRANS(TLIINETCreateListener), NULL, /* ResetListener */ TRANS(TLIAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(TLIINETConnect), #endif /* TRANS_CLIENT */ TRANS(TLIBytesReadable), TRANS(TLIRead), TRANS(TLIWrite), TRANS(TLIReadv), TRANS(TLIWritev), TRANS(TLIDisconnect), TRANS(TLIClose), TRANS(TLICloseForCloning), }; #ifdef TRANS_SERVER static char * inet_aliases[] = { "tcp", NULL }; #endif Xtransport TRANS(TLIINETFuncs) = { /* TLI Interface */ "inet", TRANS_ALIAS, #ifdef TRANS_CLIENT TRANS(TLIOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER inet_aliases, TRANS(TLIOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(TLIOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(TLIOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(TLIReopenCOTSServer), TRANS(TLIReopenCLTSServer), #endif TRANS(TLISetOption), #ifdef TRANS_SERVER TRANS(TLIINETCreateListener), NULL, /* ResetListener */ TRANS(TLIAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(TLIINETConnect), #endif /* TRANS_CLIENT */ TRANS(TLIBytesReadable), TRANS(TLIRead), TRANS(TLIWrite), TRANS(TLIReadv), TRANS(TLIWritev), TRANS(TLIDisconnect), TRANS(TLIClose), TRANS(TLICloseForCloning), }; Xtransport TRANS(TLITLIFuncs) = { /* TLI Interface */ "tli", 0, #ifdef TRANS_CLIENT TRANS(TLIOpenCOTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER NULL, TRANS(TLIOpenCOTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(TLIOpenCLTSClient), #endif /* TRANS_CLIENT */ #ifdef TRANS_SERVER TRANS(TLIOpenCLTSServer), #endif /* TRANS_SERVER */ #ifdef TRANS_REOPEN TRANS(TLIReopenCOTSServer), TRANS(TLIReopenCLTSServer), #endif TRANS(TLISetOption), #ifdef TRANS_SERVER TRANS(TLITLICreateListener), NULL, /* ResetListener */ TRANS(TLIAccept), #endif /* TRANS_SERVER */ #ifdef TRANS_CLIENT TRANS(TLITLIConnect), #endif /* TRANS_CLIENT */ TRANS(TLIBytesReadable), TRANS(TLIRead), TRANS(TLIWrite), TRANS(TLIReadv), TRANS(TLIWritev), TRANS(TLIDisconnect), TRANS(TLIClose), TRANS(TLICloseForCloning), }; 070701000a5321000041ed0000000000000000000000054f868429000000000000010000010007ffffffffffffffff0000001500000000root/usr/local/share070701000a5327000041ed0000000000000000000000024f868429000000000000010000010007ffffffffffffffff0000001f00000000root/usr/local/share/pkgconfig070701000a5328000081a40000000000000000000000014f868418000000ed0000010000010007ffffffffffffffff0000002900000000root/usr/local/share/pkgconfig/xtrans.pcprefix=/usr/local exec_prefix=${prefix} libdir=${exec_prefix}/lib includedir=${prefix}/include Name: XTrans Description: Abstract network code for X Version: 1.2.7 Cflags: -I${includedir} -D_BSD_SOURCE -DHAS_FCHOWN -DHAS_STICKY_DIR_BIT 070701000a5324000041ed0000000000000000000000034f868429000000000000010000010007ffffffffffffffff0000001900000000root/usr/local/share/doc070701000a5325000041ed0000000000000000000000024f868429000000000000010000010007ffffffffffffffff0000002000000000root/usr/local/share/doc/xtrans070701000a5326000081a40000000000000000000000014f86841800009f140000010000010007ffffffffffffffff0000002b00000000root/usr/local/share/doc/xtrans/xtrans.xml %defs; ]> X Transport Interface X Consortium Standard StuartAnderson NCR Corporation RalphMor X Consortium AlanCoopersmith Oracle Corp. X Version 11, Release &fullrelvers; Version 0.7 19931994 NCR Corporation - Dayton, Ohio, USA All Rights Reserved Permission to use, copy, modify, and distribute this software and its documentation for any purpose and without fee is hereby granted, provided that the above copyright notice appear in all copies and that both that copyright notice and this permission notice appear in supporting documentation, and that the name NCR not be used in advertising or publicity pertaining to distribution of the software without specific, written prior permission. NCR makes no representations about the suitability of this software for any purpose. It is provided "as is" without express or implied warranty. NCR DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL NCR BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. Copyright © 1993, 1994, 2002 The Open Group Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the “Software”), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions: The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED “AS IS”, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. Except as contained in this notice, the name of The Open Group shall not be used in advertising or otherwise to promote the sale, use or other dealings in this Software without prior written authorization from The Open Group. X Window System is a trademark of The Open Group, Inc. The X Transport Interface Designed by Stuart Anderson (NCR) with help from Ralph Mor (X Consortium) This documentation does not completely match the implementation in R6 (as a result of some late changes made in the code). Specifically, support was added for font server cloning, and conditional compliation was introduced for client vs. server code. Purposes and Goals The X Transport Interface is intended to combine all system and transport specific code into a single place in the source tree. This API should be used by all libraries, clients and servers of the X Window System. Use of this API should allow the addition of new types of transports and support for new platforms without making any changes to the source except in the X Transport Interface code. This interface should solve the problem of multiple #ifdef TRANSPORT and #ifdef PLATFORM statements scattered throughout the source tree. This interface should provide enough functionality to support all types of protocols, including connection oriented protocols such as X11 and FS, and connection-less oriented protocols such as XDMCP. Overview of the Interface The interface provides an API for use by applications. The functions in this API perform work that is common to all transports and systems, such as parsing an address into a host and port number. The functions in this API call transport specific functions that are contained in a table whose contents are defined at compile time. This table contains an entry for each type of transport. Each entry is a record containing mostly pointers to function that implements the interface for the given transport. This API does not provide an abstraction for select() or poll(). These functions are themselves transport independent, so an additional interface is not needed for these functions. It is also unclear how such an interface would affect performance. Definition of Address Specification Format Addresses are specified in the following syntax, protocol/host:port where protocol specifies a protocol family or an alias for a protocol family. A definition of common protocol families is given in a later section. The host part specifies the name of a host or other transport dependent entity that could be interpreted as a Network Service Access Point (NSAP). The port part specifies the name of a Transport Service Access Point (TSAP). The format of the TSAP is defined by the underlying transport implementation, but it is represented using a string format when it is part of an address. Internal Data Structures There are two major data structures associated with the transport independent portion of this interface. Additional data structures may be used internally by each transport. Xtransport Each transport supported has an entry in the transport table. The transport table is an array of Xtransport records. Each record contains all the entry points for a single transport. This record is defined as: typedef struct _Xtransport { char *TransName; int flags; XtransConnInfo (*OpenCOTSClient)( struct _Xtransport *, /* transport */ char *, /* protocol */ char *, /* host */ char * /* port */ ); XtransConnInfo (*OpenCOTSServer)( struct _Xtransport *, /* transport */ char *, /* protocol */ char *, /* host */ char * /* port */ ); XtransConnInfo (*OpenCLTSClient)( struct _Xtransport *, /* transport */ char *, /* protocol */ char *, /* host */ char * /* port */ ); XtransConnInfo (*OpenCLTSServer)( struct _Xtransport *, /* transport */ char *, /* protocol */ char *, /* host */ char * /* port */ ); int (*SetOption)( XtransConnInfo, /* connection */ int, /* option */ int /* arg */ ); int (*CreateListener)( XtransConnInfo, /* connection */ char *, /* port */ int /* flags */ ); int (*ResetListener)( XtransConnInfo /* connection */ ); XtransConnInfo (*Accept)( XtransConnInfo /* connection */ ); int (*Connect)( XtransConnInfo, /* connection */ char *, /* host */ char * /* port */ ); int (*BytesReadable)( XtransConnInfo, /* connection */ BytesReadable_t * /* pend */ ); int (*Read)( XtransConnInfo, /* connection */ char *, /* buf */ int /* size */ ); int (*Write)( XtransConnInfo, /* connection */ char *, /* buf */ int /* size */ ); int (*Readv)( XtransConnInfo, /* connection */ struct iovec *, /* buf */ int /* size */ ); int (*Writev)( XtransConnInfo, /* connection */ struct iovec *, /* buf */ int /* size */ ); int (*Disconnect)( XtransConnInfo /* connection */ ); int (*Close)( XtransConnInfo /* connection */ ); } Xtransport; The flags field can contain an OR of the following masks: TRANS_ALIAS indicates that this record is providing an alias, and should not be used to create a listener. TRANS_LOCAL indicates that this is a LOCALCONN transport. TRANS_ABSTRACT indicates that a local connection transport uses the abstract socket namespace. Some additional flags may be set in the flags field by the library while it is running: TRANS_DISABLED indicates that this transport has been disabled. TRANS_NOLISTEN indicates that servers should not open new listeners using this transport. TRANS_NOUNLINK set by a transport backend to indicate that the endpoints for its connection should not be unlinked. XtransConnInfo Each connection will have an opaque XtransConnInfo transport connection object allocated for it. This record contains information specific to the connection. The record is defined as: typedef struct _XtransConnInfo *XtransConnInfo; struct _XtransConnInfo { struct _Xtransport *transptr; char *priv; int flags; int fd; int family; char *addr; int addrlen; char *peeraddr; int peeraddrlen; }; Exposed Transport Independent API This API is included in each library and server that uses it. The API may be used by the library, but it is not added to the public API for that library. This interface is simply an implementation facilitator. This API contains a low level set of core primitives, and a few utility functions that are built on top of the primitives. The utility functions exist to provide a more familiar interface that can be used to port existing code. A macro is defined in Xtrans.h for TRANS(func) that creates a unique function name depending on where the code is compiled. For example, when built for Xlib, TRANS(OpenCOTSClient) becomes _X11TransOpenCOTSClient. All failures are considered fatal, and the connection should be closed and re-established if desired. In most cases, however, the value of errno will be available for debugging purposes. Core Interface API XtransConnInfo TRANS(OpenCOTSClient)(char *address) This function creates a Connection-Oriented Transport that is suitable for use by a client. The parameter address contains the full address of the server to which this endpoint will be connected. This functions returns an opaque transport connection object on success, or NULL on failure. XtransConnInfo TRANS(OpenCOTSServer)(char *address) This function creates a Connection-Oriented Transport that is suitable for use by a server. The parameter address contains the full address to which this server will be bound. This functions returns an opaque transport connection object on success, or NULL on failure. XtransConnInfo TRANS(OpenCLTSClient)(char *address) This function creates a Connection-Less Transport that is suitable for use by a client. The parameter address contains the full address of the server to which this endpoint will be connected. This functions returns an opaque transport connection object on success, or NULL on failure. XtransConnInfo TRANS(OpenCLTSServer)(char *address) This function creates a Connection-Less Transport that is suitable for use by a server. The parameter address contains the full address to which this server will be bound. This functions returns an opaque transport connection object on success, or NULL on failure. int TRANS(SetOption)(XtransConnInfo connection, int option, int arg) This function sets transport options, similar to the way setsockopt() and ioctl() work. The parameter connection is an endpoint that was obtained from _XTransOpen*() functions. The parameter option contains the option that will be set. The actual values for option are defined in a later section. The parameter arg can be used to pass in an additional value that may be required by some options. This function return 0 on success and -1 on failure. Based on current usage, the complimentary function TRANS(GetOption) is not necessary. int TRANS(CreateListener)(XtransConnInfo connection, char *port, int flags) This function sets up the server endpoint for listening. The parameter connection is an endpoint that was obtained from TRANS(OpenCOTSServer)() or TRANS(OpenCLTSServer)(). The parameter port specifies the port to which this endpoint should be bound for listening. If port is NULL, then the transport may attempt to allocate any available TSAP for this connection. If the transport cannot support this, then this function will return a failure. The flags parameter can be set to ADDR_IN_USE_ALLOWED to allow the call to the underlying binding function to fail with a EADDRINUSE error without causing the TRANS(CreateListener) function itself to fail. This function return 0 on success and -1 on failure. int TRANS(ResetListener)(XtransConnInfo connection) When a server is restarted, certain listen ports may need to be reset. For example, unix domain needs to check that the file used for communication has not been deleted. If it has, it must be recreated. The parameter connection is an opened and bound endpoint that was obtained from TRANS(OpenCOTSServer)() and passed to TRANS(CreateListener)(). This function will return one of the following values: TRANS_RESET_NOOP, TRANS_RESET_NEW_FD, or TRANS_RESET_FAILURE. XtransConnInfo TRANS(Accept)(XtransConnInfo connection) Once a connection indication is received, this function can be called to accept the connection. The parameter connection is an opened and bound endpoint that was obtained from TRANS(OpenCOTSServer)() and passed to TRANS(CreateListener)(). This function will return a new opaque transport connection object upon success, NULL otherwise. int TRANS(Connect)(XtransConnInfo connection, char *address) This function creates a connection to a server. The parameter connection is an endpoint that was obtained from TRANS(OpenCOTSClient)(). The parameter address specifies the TSAP to which this endpoint should connect. If the protocol is included in the address, it will be ignored. This function return 0 on success and -1 on failure. int TRANS(BytesReadable)(XtransConnInfo connection, BytesReadable_t *pend); This function provides the same functionality as the BytesReadable macro. int TRANS(Read)(XtransConnInfo connection, char *buf, int size) This function will return the number of bytes requested on a COTS connection, and will return the minimum of the number bytes requested or the size of the incoming packet on a CLTS connection. int TRANS(Write)(XtransConnInfo connection, char *buf, int size) This function will write the requested number of bytes on a COTS connection, and will send a packet of the requested size on a CLTS connection. int TRANS(Readv)(XtransConnInfo connection, struct iovec *buf, int size) Similar to TRANS(Read)(). int TRANS(Writev)(XtransConnInfo connection, struct iovec *buf, int size) Similar to TRANS(Write)(). int TRANS(Disconnect)(XtransConnInfo connection) This function is used when an orderly disconnect is desired. This function breaks the connection on the transport. It is similar to the socket function shutdown(). int TRANS(Close)(XtransConnInfo connection) This function closes the transport, unbinds it, and frees all resources that was associated with the transport. If a TRANS(Disconnect) call was not made on the connection, a disorderly disconnect may occur. int TRANS(IsLocal)(XtransConnInfo connection) Returns TRUE if it is a local transport. int TRANS(GetMyAddr)(XtransConnInfo connection, int *familyp, int *addrlenp, Xtransaddr **addrp) This function is similar to getsockname(). This function will allocate space for the address, so it must be freed by the caller. Not all transports will have a valid address until a connection is established. This function should not be used until the connection is established with Connect() or Accept(). int TRANS(GetPeerAddr)(XtransConnInfo connection, int *familyp, int *addrlenp, Xtransaddr **addrp) This function is similar to getpeername(). This function will allocate space for the address, so it must be freed by the caller. Not all transports will have a valid address until a connection is established. This function should not be used until the connection is established with Connect() or Accept(). int TRANS(GetConnectionNumber)(XtransConnInfo connection) Returns the file descriptor associated with this transport. int TRANS(MakeAllCOTSServerListeners)(char *port, int *partial_ret, int *count_ret, XtransConnInfo **connections_ret) This function should be used by most servers. It will try to establish a COTS server endpoint for each transport listed in the transport table. partial_ret will be set to True if only a partial network could be created. count_ret is the number of transports returned, and connections_ret is the list of transports. int TRANS(MakeAllCLTSServerListeners)( char *port, int *partial_ret, int *count_ret, XtransConnInfo **connections_ret) This function should be used by most servers. It will try to establish a CLTS server endpoint for each transport listed in the transport table. partial_ret will be set to True if only a partial network could be created. count_ret is the number of transports returned, and connections_ret is the list of transports. Utility API This section describes a few useful functions that have been implemented on top of the Core Interface API. These functions are being provided as a convenience. int TRANS(ConvertAddress)(int *familyp, int *addrlenp, Xtransaddr *addrp) This function converts a sockaddr based address to an X authorization based address (ie AF_INET, AF_UNIX to the X protocol definition (ie FamilyInternet, FamilyLocal)). Transport Option Definition The following options are defined for the TRANS(SetOption)() function. If an OS or transport does not support any of these options, then it will silently ignore the option. TRANS_NONBLOCKING This option controls the blocking mode of the connection. If the argument is set to 1, then the connection will be set to blocking. If the argument is set to 0, then the connection will be set to non- blocking. TRANS_CLOSEONEXEC This option determines what will happen to the connection when an exec is encountered. If the argument is set to 1, then the connection will be closed when an exec occurs. If the argument is set to 0, then the connection will not be closed when an exec occurs. Hidden Transport Dependent API The hidden transport dependent functions are placed in the Xtransport record. These function are similar to the Exposed Transport Independent API, but some of the parameters and return values are slightly different. Stuff like the #ifdef SUNSYSV should be handled inside these functions. XtransConnInfo *OpenCOTSClient ( struct _Xtransport *thistrans, char *protocol, char *host, char *port) This function creates a Connection-Oriented Transport. The parameter thistrans points to an Xtransport entry in the transport table. The parameters protocol, host, and port, point to strings containing the corresponding parts of the address that was passed into TRANS(OpenCOTSClient)(). This function must allocate and initialize the contents of the XtransConnInfo structure that is returned by this function. This function will open the transport, and bind it into the transport namespace if applicable. The local address portion of the XtransConnInfo structure will also be filled in by this function. XtransConnInfo *OpenCOTSServer ( struct _Xtransport *thistrans, char *protocol, char *host, char *port) This function creates a Connection-Oriented Transport. The parameter thistrans points to an Xtransport entry in the transport table. The parameters protocol, host, and port point to strings containing the corresponding parts of the address that was passed into TRANS(OpenCOTSClient)(). This function must allocate and initialize the contents of the XtransConnInfo structure that is returned by this function. This function will open the transport. XtransConnInfo *OpenCLTSClient ( struct _Xtransport *thistrans, char *protocol, char *host, char *port) This function creates a Connection-Less Transport. The parameter thistrans points to an Xtransport entry in the transport table. The parameters protocol, host, and port point to strings containing the corresponding parts of the address that was passed into TRANS(OpenCOTSClient)(). This function must allocate and initialize the contents of the XtransConnInfo structure that is returned by this function. This function will open the transport, and bind it into the transport namespace if applicable. The local address portion of the XtransConnInfo structure will also be filled in by this function. XtransConnInfo *OpenCLTSServer ( struct _Xtransport *thistrans, char *protocol, char *host, char *port) This function creates a Connection-Less Transport. The parameter thistrans points to an Xtransport entry in the transport table. The parameters protocol, host, and port point to strings containing the corresponding parts of the address that was passed into TRANS(OpenCOTSClient)(). This function must allocate and initialize the contents of the XtransConnInfo structure that is returned by this function. This function will open the transport. int SetOption (struct _Xtransport *thistrans, int option, int arg) This function provides a transport dependent way of implementing the options defined by the X Transport Interface. In the current prototype, this function is not being used, because all of the options defined so far are transport independent. This function will have to be used if a radically different transport type is added, or a transport dependent option is defined. int CreateListener (struct _Xtransport *thistrans, char *port, int flags ) This function takes a transport endpoint opened for a server, and sets it up to listen for incoming connection requests. The parameter port contains the port portion of the address that was passed to the Open function. The parameter flags should be set to ADDR_IN_USE_ALLOWED if the underlying transport endpoint may be already bound and this should not be considered as an error. Otherwise flags should be set to 0. This is used by IPv6 code, where the same socket can be bound to both an IPv6 address and then to a IPv4 address. This function will bind the transport into the transport name space if applicable, and fill in the local address portion of the XtransConnInfo structure. The transport endpoint will then be set to listen for incoming connection requests. int ResetListener (struct _Xtransport *thistrans) This function resets the transport for listening. XtransConnInfo Accept(struct _Xtransport *thistrans) This function creates a new transport endpoint as a result of an incoming connection request. The parameter thistrans is the endpoint that was opened for listening by the server. The new endpoint is opened and bound into the transport’s namespace. A XtransConnInfo structure describing the new endpoint is returned from this function int Connect(struct _Xtransport *thistrans, char *host, char *port ) This function establishes a connection to a server. The parameters host and port describe the server to which the connection should be established. The connection will be established so that Read() and Write() call can be made. int BytesReadable(struct _Xtransport *thistrans, BytesReadable_t *pend ) This function replaces the BytesReadable() macro. This allows each transport to have it’s own mechanism for determining how much data is ready to be read. int Read(struct _Xtransport *thistrans, char *buf, int size ) This function reads size bytes into buf from the connection. int Write(struct _Xtransport *thistrans, char *buf, int size ) This function writes size bytes from buf to the connection. int Readv(struct _Xtransport *thistrans, struct iovec *buf, int size ) This function performs a readv() on the connection. int Writev(struct _Xtransport *thistrans, struct iovec *buf, int size ) This function performs a writev() on the connection. int Disconnect(struct _Xtransport *thistrans) This function initiates an orderly shutdown of a connection. If a transport does not distinguish between orderly and disorderly disconnects, then a call to this function will have no affect. int Close(struct _Xtransport *thistrans) This function will break the connection, and close the endpoint. Configuration The implementation of each transport can be platform specific. It is expected that existing connection types such as TCPCONN, UNIXCONN, LOCALCONN, and STREAMSCONN will be replaced with flags for each possible transport type. In X11R6, the below flags to enable transport types were set in ConnectionFlags in the vendor.cf or site.def config files. In X11R7 modular releases, these flags are set when running configure scripts which include the XTRANS_CONNECTION_FLAGS macro from xtrans.m4. #define configure flag Description TCPCONN Enables the INET (IPv4) Domain Socket based transport IPv6 Extends TCPCONN to enable IPv6 Socket based transport UNIXCONN Enables the UNIX Domain Socket based transport STREAMSCONN Not available in X11R7 Enables the TLI based transports LOCALCONN Enables the SYSV Local connection transports DNETCONN Not available in X11R7 Enables the DECnet transports Transport Specific Definitions Protocol Family Address Component protocol host port Internet inet inet6 tcp udp name of an internet addressable host string containing the name of a service or a valid port number. Example: "xserver0", "7100" DECnet decnet name of a DECnet addressable host string containing the complete name of the object. Example: "X$X0" NETware ipx name of a NETware addressable host Not sure of the specifics yet. OSI osi name of an OSI adressable host. Not sure of the specifics yet. Local local pts named sco isc (ignored) String containing the port name, ie "xserver0", "fontserver0". Implementation Notes This section refers to the prototype implementation that is being developed concurrently with this document. This prototype has been able to flush out many details and problems as the specification was being developed. In X11R6, all of the source code for this interface was located in xc/lib/xtrans. In X11R7, all of the source code for this interface is delivered via the lib/libxtrans modular package from X.Org, and is installed under ${prefix}/X11/Xtrans so that other modules may find it when they build. All functions names in the source are of the format TRANS(func)(). The TRANS() macro is defined as #if (__STDC__ && !defined(UNIXCPP)) || defined(ANSICPP) #define TRANS(func) _PROTOCOLTrans##func #else #define TRANS(func) _PROTOCOLTrans/**/func #endif PROTOCOL will be uniquely defined in each directory where this code is compiled. PROTOCOL will be defined to be the name of the protocol that is implemented by the library or server, such as X11, FS, and ICE. All libraries and servers that use the X Transport Interface should have a new file called TRANSPORTtrans.c. This file will include the transports based on the configuration flags provided by the configure script. Below is an example xfstrans.c for the font server. #include "config.h" #define FONT_t 1 #define TRANS_REOPEN 1 #define TRANS_SERVER 1 #include <X11/Xtrans/transport.c> The source files for this interface are listed below. Xtrans.h Function prototypes and defines for the Transport Independent API. Xtransint.h Used by the interface implementation only. Contains the internal data structures. Xtranssock.c Socket implementation of the Transport Dependent API. Xtranstli.c TLI implementation of the Transport Dependent API. Xtransdnet.c DECnet implementation of the Transport Dependent API. Xtranslocal.c Implementation of the Transport Dependent API for SYSV Local connections. Xtrans.c Exposed Transport Independent API Functions. Xtransutil.c Collection of Utility functions that use the X Transport Interface. The file Xtransint.h contains much of the transport related code that was previously in Xlibint.h and Xlibnet.h. This will make the definitions available for all transport users. This should also obsolete the equivalent code in other libraries. 070701000a5322000041ed0000000000000000000000024f868429000000000000010000010007ffffffffffffffff0000001d00000000root/usr/local/share/aclocal070701000a5323000081a40000000000000000000000014f868418000014060000010000010007ffffffffffffffff0000002700000000root/usr/local/share/aclocal/xtrans.m4dnl dnl Copyright (c) 2005, Oracle and/or its affiliates. All rights reserved. dnl dnl Permission is hereby granted, free of charge, to any person obtaining a dnl copy of this software and associated documentation files (the "Software"), dnl to deal in the Software without restriction, including without limitation dnl the rights to use, copy, modify, merge, publish, distribute, sublicense, dnl and/or sell copies of the Software, and to permit persons to whom the dnl Software is furnished to do so, subject to the following conditions: dnl dnl The above copyright notice and this permission notice (including the next dnl paragraph) shall be included in all copies or substantial portions of the dnl Software. dnl dnl THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR dnl IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, dnl FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL dnl THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER dnl LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING dnl FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER dnl DEALINGS IN THE SOFTWARE. dnl # XTRANS_TCP_FLAGS() # ------------------ # Find needed libraries for TCP sockets, and check for IPv6 support AC_DEFUN([XTRANS_TCP_FLAGS],[ # SVR4 hides these in libraries other than libc AC_SEARCH_LIBS(socket, [socket]) AC_SEARCH_LIBS(gethostbyname, [nsl]) if test "$ac_cv_search_socket$ac_cv_search_gethostbyname" = "nono"; then AC_HAVE_LIBRARY([ws2_32]) fi # Needs to come after above checks for libsocket & libnsl for SVR4 systems AC_ARG_ENABLE(ipv6, AC_HELP_STRING([--enable-ipv6],[Enable IPv6 support]), [IPV6CONN=$enableval], [AC_CHECK_FUNC(getaddrinfo,[IPV6CONN=yes],[IPV6CONN=no])]) AC_MSG_CHECKING([if IPv6 support should be built]) if test "$IPV6CONN" = "yes"; then AC_DEFINE(IPv6,1,[Support IPv6 for TCP connections]) fi AC_MSG_RESULT($IPV6CONN) # 4.3BSD-Reno added a new member to struct sockaddr_in AC_CHECK_MEMBER([struct sockaddr_in.sin_len], AC_DEFINE([BSD44SOCKETS],1, [Define to 1 if `struct sockaddr_in' has a `sin_len' member]), [], [ #include #include #include ]) # POSIX.1g changed the type of pointer passed to getsockname/getpeername/etc. AC_CHECK_TYPES([socklen_t], [], [], [ AC_INCLUDES_DEFAULT #include ]) ]) # XTRANS_TCP_FLAGS # XTRANS_CONNECTION_FLAGS() # ------------------------- # Standard checks for which Xtrans transports to use by the Xorg packages # that use Xtrans functions AC_DEFUN([XTRANS_CONNECTION_FLAGS],[ AC_REQUIRE([AC_CANONICAL_HOST]) AC_REQUIRE([AC_TYPE_SIGNAL]) [case $host_os in mingw*) unixdef="no" ;; *) unixdef="yes" ;; esac] AC_ARG_ENABLE(unix-transport, AC_HELP_STRING([--enable-unix-transport],[Enable UNIX domain socket transport]), [UNIXCONN=$enableval], [UNIXCONN=$unixdef]) AC_MSG_CHECKING([if Xtrans should support UNIX socket connections]) if test "$UNIXCONN" = "yes"; then AC_DEFINE(UNIXCONN,1,[Support UNIX socket connections]) fi AC_MSG_RESULT($UNIXCONN) AC_ARG_ENABLE(tcp-transport, AC_HELP_STRING([--enable-tcp-transport],[Enable TCP socket transport]), [TCPCONN=$enableval], [TCPCONN=yes]) AC_MSG_CHECKING([if Xtrans should support TCP socket connections]) AC_MSG_RESULT($TCPCONN) if test "$TCPCONN" = "yes"; then AC_DEFINE(TCPCONN,1,[Support TCP socket connections]) XTRANS_TCP_FLAGS fi [case $host_os in solaris*|sco*|sysv4*) localdef="yes" ;; *) localdef="no" ;; esac] AC_ARG_ENABLE(local-transport, AC_HELP_STRING([--enable-local-transport],[Enable os-specific local transport]), [LOCALCONN=$enableval], [LOCALCONN=$localdef]) AC_MSG_CHECKING([if Xtrans should support os-specific local connections]) AC_MSG_RESULT($LOCALCONN) if test "$LOCALCONN" = "yes"; then AC_DEFINE(LOCALCONN,1,[Support os-specific local connections]) fi ]) # XTRANS_CONNECTION_FLAGS # XTRANS_SECURE_RPC_FLAGS() # ------------------------- # Check for Secure RPC functions - must come after XTRANS_TCP_FLAGS # so that any necessary networking libraries are already found AC_DEFUN([XTRANS_SECURE_RPC_FLAGS], [AC_REQUIRE([XTRANS_TCP_FLAGS]) AC_ARG_ENABLE(secure-rpc, AC_HELP_STRING([--enable-secure-rpc],[Enable Secure RPC]), [SECURE_RPC=$enableval], [SECURE_RPC="try"]) if test "x$SECURE_RPC" = "xyes" -o "x$SECURE_RPC" = "xtry" ; then FOUND_SECURE_RPC="no" AC_CHECK_FUNCS([authdes_seccreate authdes_create], [FOUND_SECURE_RPC="yes"]) if test "x$FOUND_SECURE_RPC" = "xno" ; then if test "x$SECURE_RPC" = "xyes" ; then AC_MSG_ERROR([Secure RPC requested, but required functions not found]) fi SECURE_RPC="no" else dnl FreeBSD keeps getsecretkey in librpcsvc AC_SEARCH_LIBS(getsecretkey, [rpcsvc]) SECURE_RPC="yes" fi fi AC_MSG_CHECKING([if Secure RPC authentication ("SUN-DES-1") should be supported]) if test "x$SECURE_RPC" = "xyes" ; then AC_DEFINE(SECURE_RPC, 1, [Support Secure RPC ("SUN-DES-1") authentication for X11 clients]) fi AC_MSG_RESULT($SECURE_RPC) ]) # XTRANS_SECURE_RPC_FLAGS 07070100000000000000000000000000000000000000010000000000000000000000000000000000000000000000000000000b00000000TRAILER!!!