diff options
author | Marcus Brinkmann <[email protected]> | 2009-10-20 15:39:15 +0000 |
---|---|---|
committer | Marcus Brinkmann <[email protected]> | 2009-10-20 15:39:15 +0000 |
commit | e782b1ab06a2d3325bc487c28ab678c95d9675b3 (patch) | |
tree | 87aacb82e59e4d7d8b60d2c55d66b12eed01af2e /assuan/assuan-socket.c | |
parent | Add new debug helper (diff) | |
download | gpgme-e782b1ab06a2d3325bc487c28ab678c95d9675b3.tar.gz gpgme-e782b1ab06a2d3325bc487c28ab678c95d9675b3.zip |
2009-10-20 Marcus Brinkmann <[email protected]>
* configure.ac: Replace internal libassuan by external libassuan.
* m4/libassuan.m4: New file.
* Makefile.am (assuan): Remove variable.
(SUBDIRS): Remove ${assuan}.
* assuan/: Removed.
src/
2009-10-20 Marcus Brinkmann <[email protected]>
* Makefile.am (assuan_cppflags, assuan_libobjs): Removed.
(gpgsm_components): Move engine-assuan.c to ...
(assuan_components): ... this new variable.
(main_sources): Add this new variable.
(AM_CPPFLAGS): Remove $(assuan_cppflags).
(AM_CFLAGS): Add @LIBASSUAN_CFLAGS@.
(libgpgme_la_DEPENDENCIES, libgpgme_pth_la_DEPENDENCIES)
(libgpgme_glib_la_DEPENDENCIES, libgpgme_qt_la_DEPENDENCIES)
(libgpgme_pthread_la_DEPENDENCIES): Remove $(assuan_libobjs).
(libgpgme_la_LIBADD, libgpgme_pth_la_LIBADD)
(libgpgme_glib_la_LIBADD, libgpgme_qt_la_LIBADD))
(libgpgme_pthread_la_LIBADD): Replace $(assuan_libobjs) by
@LIBASSUAN_LIBS@.
* priv-io.h [!HAVE_W32_SYSTEM]: Declare _gpgme_io_recvmsg,
_gpgme_io_sendmsg, _gpgme_io_waitpid.
* engine-backend.h: Define with [ENABLE_ASSUAN] instead
of [ENABLE_GPGSM].
* posix-io.c (_gpgme_io_waitpid): Make non-static.
* util.h (ENABLE_ASSUAN): Declar _gpgme_assuan_system_hooks,
_gpgme_assuan_malloc_hooks, _gpgme_assuan_log_cb.
* engine-gpgsm.c: Don't map assuan error codes. Use
assuan_release instead of assuan_disconnect.
(map_assuan_error): Remove function.
(gpgsm_new): Use new assuan context interface.
* engine-assuan.c: Use assuan_release instead of
assuan_disconnect.
(llass_new): Use new assuan context interface.
Diffstat (limited to 'assuan/assuan-socket.c')
-rw-r--r-- | assuan/assuan-socket.c | 470 |
1 files changed, 0 insertions, 470 deletions
diff --git a/assuan/assuan-socket.c b/assuan/assuan-socket.c deleted file mode 100644 index 74e8eb29..00000000 --- a/assuan/assuan-socket.c +++ /dev/null @@ -1,470 +0,0 @@ -/* assuan-socket.c - * Copyright (C) 2004, 2005 Free Software Foundation, Inc. - * - * This file is part of Assuan. - * - * Assuan is free software; you can redistribute it and/or modify it - * under the terms of the GNU Lesser General Public License as - * published by the Free Software Foundation; either version 2.1 of - * the License, or (at your option) any later version. - * - * Assuan is distributed in the hope that it will be useful, but - * WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - * Lesser General Public License for more details. - * - * You should have received a copy of the GNU Lesser General Public - * License along with this program; if not, see <http://www.gnu.org/licenses/>. - */ - -#include <config.h> -#include <stdio.h> -#include <stdlib.h> -#ifdef HAVE_W32_SYSTEM -#define WIN32_LEAN_AND_MEAN -#include <windows.h> -#include <wincrypt.h> -#include <io.h> -#else -#include <sys/types.h> -#include <sys/socket.h> -#endif -#include <errno.h> -#include <sys/stat.h> -#include <fcntl.h> -#include <assert.h> - -#include "assuan-defs.h" - -/* Hacks for Slowaris. */ -#ifndef PF_LOCAL -# ifdef PF_UNIX -# define PF_LOCAL PF_UNIX -# else -# define PF_LOCAL AF_UNIX -# endif -#endif -#ifndef AF_LOCAL -# define AF_LOCAL AF_UNIX -#endif - -#ifdef HAVE_W32_SYSTEM -#ifndef S_IRGRP -# define S_IRGRP 0 -# define S_IWGRP 0 -#endif -#endif - - -#ifdef HAVE_W32_SYSTEM -int -_assuan_sock_wsa2errno (int err) -{ - switch (err) - { - case WSAENOTSOCK: - return EINVAL; - case WSAEWOULDBLOCK: - return EAGAIN; - case ERROR_BROKEN_PIPE: - return EPIPE; - case WSANOTINITIALISED: - return ENOSYS; - default: - return EIO; - } -} - - -/* W32: Fill BUFFER with LENGTH bytes of random. Returns -1 on - failure, 0 on success. Sets errno on failure. */ -static int -get_nonce (char *buffer, size_t nbytes) -{ - HCRYPTPROV prov; - int ret = -1; - - if (!CryptAcquireContext (&prov, NULL, NULL, PROV_RSA_FULL, - (CRYPT_VERIFYCONTEXT|CRYPT_SILENT)) ) - errno = ENODEV; - else - { - if (!CryptGenRandom (prov, nbytes, buffer)) - errno = ENODEV; - else - ret = 0; - CryptReleaseContext (prov, 0); - } - return ret; -} - - -/* W32: The buffer for NONCE needs to be at least 16 bytes. Returns 0 on - success and sets errno on failure. */ -static int -read_port_and_nonce (const char *fname, unsigned short *port, char *nonce) -{ - FILE *fp; - char buffer[50], *p; - size_t nread; - int aval; - - fp = fopen (fname, "rb"); - if (!fp) - return -1; - nread = fread (buffer, 1, sizeof buffer - 1, fp); - fclose (fp); - if (!nread) - { - errno = ENOFILE; - return -1; - } - buffer[nread] = 0; - aval = atoi (buffer); - if (aval < 1 || aval > 65535) - { - errno = EINVAL; - return -1; - } - *port = (unsigned int)aval; - for (p=buffer; nread && *p != '\n'; p++, nread--) - ; - if (*p != '\n' || nread != 17) - { - errno = EINVAL; - return -1; - } - p++; nread--; - memcpy (nonce, p, 16); - return 0; -} -#endif /*HAVE_W32_SYSTEM*/ - - - -int -_assuan_close (assuan_fd_t fd) -{ -#ifdef _ASSUAN_CUSTOM_IO - return _assuan_custom_close (fd); -#else -#ifdef (HAVE_W32_SYSTEM) - int rc = closesocket (HANDLE2SOCKET(fd)); - if (rc) - errno = _assuan_sock_wsa2errno (WSAGetLastError ()); - if (rc && WSAGetLastError () == WSAENOTSOCK) - { - rc = CloseHandle (fd); - if (rc) - /* FIXME. */ - errno = EIO; - } - return rc; -#else - return close (fd); -#endif -#endif -} - - -/* Return a new socket. Note that under W32 we consider a socket the - same as an System Handle; all functions using such a handle know - about this dual use and act accordingly. */ -assuan_fd_t -_assuan_sock_new (int domain, int type, int proto) -{ -#ifdef HAVE_W32_SYSTEM - assuan_fd_t res; - if (domain == AF_UNIX || domain == AF_LOCAL) - domain = AF_INET; - -#ifdef _ASSUAN_CUSTOM_IO - return _assuan_custom_socket (domain, type, proto); -#else - res = SOCKET2HANDLE(socket (domain, type, proto)); - if (res == ASSUAN_INVALID_FD) - errno = _assuan_sock_wsa2errno (WSAGetLastError ()); - return res; -#endif - -#else - -#ifdef _ASSUAN_CUSTOM_IO - return _gpgme_io_socket (domain, type, proto); -#else - return socket (domain, type, proto); -#endif - -#endif -} - - -int -_assuan_sock_connect (assuan_fd_t sockfd, struct sockaddr *addr, int addrlen) -{ -#ifdef HAVE_W32_SYSTEM - if (addr->sa_family == AF_LOCAL || addr->sa_family == AF_UNIX) - { - struct sockaddr_in myaddr; - struct sockaddr_un *unaddr; - unsigned short port; - char nonce[16]; - int ret; - - unaddr = (struct sockaddr_un *)addr; - if (read_port_and_nonce (unaddr->sun_path, &port, nonce)) - return -1; - - myaddr.sin_family = AF_INET; - myaddr.sin_port = htons (port); - myaddr.sin_addr.s_addr = htonl (INADDR_LOOPBACK); - - /* Set return values. */ - unaddr->sun_family = myaddr.sin_family; - unaddr->sun_port = myaddr.sin_port; - unaddr->sun_addr.s_addr = myaddr.sin_addr.s_addr; - -#ifdef _ASSUAN_CUSTOM_IO - ret = _assuan_custom_connect (sockfd, - (struct sockaddr *)&myaddr, sizeof myaddr); -#else - ret = connect (HANDLE2SOCKET(sockfd), - (struct sockaddr *)&myaddr, sizeof myaddr); -#endif - - if (!ret) - { - /* Send the nonce. */ - - ret = _assuan_io_write (sockfd, nonce, 16); - if (ret >= 0 && ret != 16) - { - errno = EIO; - ret = -1; - } - } - else - errno = _assuan_sock_wsa2errno (WSAGetLastError ()); - return ret; - } - else - { - int res; - res = connect (HANDLE2SOCKET (sockfd), addr, addrlen); - if (res < 0) - errno = _assuan_sock_wsa2errno (WSAGetLastError ()); - return res; - } -#else - -#ifdef _ASSUAN_CUSTOM_IO - return _assuan_custom_connect (sockfd, addr, addrlen); -#else - return connect (sockfd, addr, addrlen); -#endif - -#endif -} - - -int -_assuan_sock_bind (assuan_fd_t sockfd, struct sockaddr *addr, int addrlen) -{ -#ifdef HAVE_W32_SYSTEM - if (addr->sa_family == AF_LOCAL || addr->sa_family == AF_UNIX) - { - struct sockaddr_in myaddr; - struct sockaddr_un *unaddr; - int filefd; - FILE *fp; - int len = sizeof myaddr; - int rc; - char nonce[16]; - - if (get_nonce (nonce, 16)) - return -1; - - unaddr = (struct sockaddr_un *)addr; - - myaddr.sin_port = 0; - myaddr.sin_family = AF_INET; - myaddr.sin_addr.s_addr = htonl (INADDR_LOOPBACK); - - filefd = open (unaddr->sun_path, - (O_WRONLY|O_CREAT|O_EXCL|O_BINARY), - (S_IRUSR|S_IWUSR|S_IRGRP|S_IWGRP)); - if (filefd == -1) - { - if (errno == EEXIST) - errno = WSAEADDRINUSE; - return -1; - } - fp = fdopen (filefd, "wb"); - if (!fp) - { - int save_e = errno; - close (filefd); - errno = save_e; - return -1; - } - - rc = bind (HANDLE2SOCKET (sockfd), (struct sockaddr *)&myaddr, len); - if (!rc) - rc = getsockname (HANDLE2SOCKET (sockfd), - (struct sockaddr *)&myaddr, &len); - if (rc) - { - int save_e = errno; - fclose (fp); - remove (unaddr->sun_path); - errno = save_e; - return rc; - } - fprintf (fp, "%d\n", ntohs (myaddr.sin_port)); - fwrite (nonce, 16, 1, fp); - fclose (fp); - - return 0; - } - else - { - int res = bind (HANDLE2SOCKET(sockfd), addr, addrlen); - if (res < 0) - errno = _assuan_sock_wsa2errno (WSAGetLastError ()); - return res; - } -#else - return bind (sockfd, addr, addrlen); -#endif -} - - -int -_assuan_sock_get_nonce (struct sockaddr *addr, int addrlen, - assuan_sock_nonce_t *nonce) -{ -#ifdef HAVE_W32_SYSTEM - if (addr->sa_family == AF_LOCAL || addr->sa_family == AF_UNIX) - { - struct sockaddr_un *unaddr; - unsigned short port; - - if (sizeof nonce->nonce != 16) - { - errno = EINVAL; - return -1; - } - nonce->length = 16; - unaddr = (struct sockaddr_un *)addr; - if (read_port_and_nonce (unaddr->sun_path, &port, nonce->nonce)) - return -1; - } - else - { - nonce->length = 42; /* Arbitrary valuie to detect unitialized nonce. */ - nonce->nonce[0] = 42; - } -#else - (void)addr; - (void)addrlen; - nonce->length = 0; -#endif - return 0; -} - - -int -_assuan_sock_check_nonce (assuan_fd_t fd, assuan_sock_nonce_t *nonce) -{ -#ifdef HAVE_W32_SYSTEM - char buffer[16], *p; - size_t nleft; - int n; - - if (sizeof nonce->nonce != 16) - { - errno = EINVAL; - return -1; - } - - if (nonce->length == 42 && nonce->nonce[0] == 42) - return 0; /* Not a Unix domain socket. */ - - if (nonce->length != 16) - { - errno = EINVAL; - return -1; - } - - p = buffer; - nleft = 16; - while (nleft) - { - n = _assuan_io_read (SOCKET2HANDLE(fd), p, nleft); - if (n < 0 && errno == EINTR) - ; - else if (n < 0 && errno == EAGAIN) - Sleep (100); - else if (n < 0) - return -1; - else if (!n) - { - errno = EIO; - return -1; - } - else - { - p += n; - nleft -= n; - } - } - if (memcmp (buffer, nonce->nonce, 16)) - { - errno = EACCES; - return -1; - } -#else - (void)fd; - (void)nonce; -#endif - return 0; -} - - -/* Public API. */ -int -assuan_sock_close (assuan_fd_t fd) -{ - return _assuan_close (fd); -} - -assuan_fd_t -assuan_sock_new (int domain, int type, int proto) -{ - return _assuan_sock_new (domain, type, proto); -} - -int -assuan_sock_connect (assuan_fd_t sockfd, struct sockaddr *addr, int addrlen) -{ - return _assuan_sock_connect (sockfd, addr, addrlen); -} - -int -assuan_sock_bind (assuan_fd_t sockfd, struct sockaddr *addr, int addrlen) -{ - return _assuan_sock_bind (sockfd, addr, addrlen); -} - -int -assuan_sock_get_nonce (struct sockaddr *addr, int addrlen, - assuan_sock_nonce_t *nonce) -{ - return _assuan_sock_get_nonce (addr, addrlen, nonce); -} - -int -assuan_sock_check_nonce (assuan_fd_t fd, assuan_sock_nonce_t *nonce) -{ - return _assuan_sock_check_nonce (fd, nonce); -} |