/* Copyright (C) 2001-2004 Bart Massey and Jamey Sharp. * * 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 * AUTHORS 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 names of the authors or their * institutions 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 authors. */ /* Utility functions implementable using only public APIs. */ #include #include #include #include #include #ifdef DNETCONN #include #include #endif #include #include #include #include #include #include #include "xcb.h" #include "xcbext.h" #include "xcbint.h" static const int error_connection = 1; int xcb_popcount(uint32_t mask) { unsigned long y; y = (mask >> 1) & 033333333333; y = mask - y - ((y >> 1) & 033333333333); return ((y + (y >> 3)) & 030707070707) % 077; } int xcb_parse_display(const char *name, char **host, int *displayp, int *screenp) { int len, display, screen; char *colon, *dot, *end; if(!name || !*name) name = getenv("DISPLAY"); if(!name) return 0; colon = strrchr(name, ':'); if(!colon) return 0; len = colon - name; ++colon; display = strtoul(colon, &dot, 10); if(dot == colon) return 0; if(*dot == '\0') screen = 0; else { if(*dot != '.') return 0; ++dot; screen = strtoul(dot, &end, 10); if(end == dot || *end != '\0') return 0; } /* At this point, the display string is fully parsed and valid, but * the caller's memory is untouched. */ *host = malloc(len + 1); if(!*host) return 0; memcpy(*host, name, len); (*host)[len] = '\0'; *displayp = display; if(screenp) *screenp = screen; return 1; } static int _xcb_open_tcp(const char *host, const unsigned short port); static int _xcb_open_unix(const char *file); #ifdef DNETCONN static int _xcb_open_decnet(const char *host, const unsigned short port); #endif static int _xcb_open(const char *host, const int display) { int fd; if(*host) { #ifdef DNETCONN if (strchr(host, ':')) { /* DECnet displays have two colons, so the parser will have left one at the end */ char *dnethost = strdup(host); dnethost[strlen(dnethost)-1] = '\0'; fd = _xcb_open_decnet(dnethost, display); free(dnethost); } else #endif { /* display specifies TCP */ unsigned short port = X_TCP_PORT + display; fd = _xcb_open_tcp(host, port); } } else { /* display specifies Unix socket */ static const char base[] = "/tmp/.X11-unix/X"; char file[sizeof(base) + 20]; snprintf(file, sizeof(file), "%s%d", base, display); fd = _xcb_open_unix(file); } return fd; } #ifdef DNETCONN static int _xcb_open_decnet(const char *host, const unsigned short port) { int fd; struct sockaddr_dn addr; struct accessdata_dn accessdata; struct nodeent *nodeaddr = getnodebyname(host); if(!nodeaddr) return -1; addr.sdn_family = AF_DECnet; addr.sdn_add.a_len = nodeaddr->n_length; memcpy(addr.sdn_add.a_addr, nodeaddr->n_addr, addr.sdn_add.a_len); sprintf((char *)addr.sdn_objname, "X$X%d", port); addr.sdn_objnamel = strlen((char *)addr.sdn_objname); addr.sdn_objnum = 0; fd = socket(PF_DECnet, SOCK_STREAM, 0); if(fd == -1) return -1; memset(&accessdata, 0, sizeof(accessdata)); sprintf((char*)accessdata.acc_acc, "%d", getuid()); accessdata.acc_accl = strlen((char *)accessdata.acc_acc); setsockopt(fd, DNPROTO_NSP, SO_CONACCESS, &accessdata, sizeof(accessdata)); if(connect(fd, (struct sockaddr *) &addr, sizeof(addr)) == -1) return -1; return fd; } #endif static int _xcb_open_tcp(const char *host, const unsigned short port) { int fd; struct sockaddr_in addr; struct hostent *hostaddr = gethostbyname(host); if(!hostaddr) return -1; addr.sin_family = AF_INET; addr.sin_port = htons(port); memcpy(&addr.sin_addr, hostaddr->h_addr_list[0], sizeof(addr.sin_addr)); fd = socket(PF_INET, SOCK_STREAM, 0); if(fd == -1) return -1; if(connect(fd, (struct sockaddr *) &addr, sizeof(addr)) == -1) return -1; return fd; } static int _xcb_open_unix(const char *file) { int fd; struct sockaddr_un addr = { AF_UNIX }; strcpy(addr.sun_path, file); fd = socket(AF_UNIX, SOCK_STREAM, 0); if(fd == -1) return -1; if(connect(fd, (struct sockaddr *) &addr, sizeof(addr)) == -1) return -1; return fd; } xcb_connection_t *xcb_connect(const char *displayname, int *screenp) { int fd, display = 0; char *host; xcb_connection_t *c; xcb_auth_info_t auth; if(!xcb_parse_display(displayname, &host, &display, screenp)) return (xcb_connection_t *) &error_connection; fd = _xcb_open(host, display); free(host); if(fd == -1) return (xcb_connection_t *) &error_connection; _xcb_get_auth_info(fd, &auth); c = xcb_connect_to_fd(fd, &auth); free(auth.name); free(auth.data); return c; } xcb_connection_t *xcb_connect_to_display_with_auth_info(const char *displayname, xcb_auth_info_t *auth, int *screenp) { int fd, display = 0; char *host; if(!xcb_parse_display(displayname, &host, &display, screenp)) return (xcb_connection_t *) &error_connection; fd = _xcb_open(host, display); free(host); if(fd == -1) return (xcb_connection_t *) &error_connection; return xcb_connect_to_fd(fd, auth); }