a7f84492b5359e23851c085840cf572ce2d5b085
[gpgme.git] / assuan / assuan-io.c
1 /* assuan-io.c - Wraps the read and write functions.
2  *      Copyright (C) 2002, 2004, 2006 Free Software Foundation, Inc.
3  *
4  * This file is part of Assuan.
5  *
6  * Assuan is free software; you can redistribute it and/or modify it
7  * under the terms of the GNU Lesser General Public License as
8  * published by the Free Software Foundation; either version 2.1 of
9  * the License, or (at your option) any later version.
10  *
11  * Assuan is distributed in the hope that it will be useful, but
12  * WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this program; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
19  * USA. 
20  */
21
22 #ifdef HAVE_CONFIG_H
23 #include <config.h>
24 #endif
25
26 #include <sys/time.h>
27 #include <sys/types.h>
28 #ifdef HAVE_SYS_SOCKET_H
29 # include <sys/socket.h>
30 #endif
31 #include <unistd.h>
32 #include <errno.h>
33 #ifdef HAVE_W32_SYSTEM
34 # include <windows.h>
35 #else
36 # include <sys/wait.h>
37 #endif
38
39 #include "assuan-defs.h"
40
41
42 #ifndef HAVE_W32_SYSTEM
43 pid_t 
44 _assuan_waitpid (pid_t pid, int *status, int options)
45 {
46   return waitpid (pid, status, options);
47 }
48 #endif
49
50
51 ssize_t
52 _assuan_simple_read (assuan_context_t ctx, void *buffer, size_t size)
53 {
54 #if defined(HAVE_W32_SYSTEM) && !defined(_ASSUAN_IN_GPGME_BUILD_ASSUAN)
55   /* Due to the peculiarities of the W32 API we can't use read for a
56      network socket and thus we try to use recv first and fallback to
57      read if recv detects that it is not a network socket.  */
58   int n;
59
60   n = recv (ctx->inbound.fd, buffer, size, 0);
61   if (n == -1 && WSAGetLastError () == WSAENOTSOCK)
62     {
63       DWORD nread = 0;
64
65       n = ReadFile ((HANDLE)ctx->inbound.fd, buffer, size, &nread, NULL);
66       if (!n)
67         {
68           switch (GetLastError())
69             {
70             case ERROR_BROKEN_PIPE: errno = EPIPE; break;
71             default: errno = EIO; 
72             }
73           n = -1;
74         }
75       else
76         n = (int)nread;
77     }
78   return n;
79 #else /*!HAVE_W32_SYSTEM*/
80   return read (ctx->inbound.fd, buffer, size);
81 #endif /*!HAVE_W32_SYSTEM*/
82 }
83
84 ssize_t
85 _assuan_simple_write (assuan_context_t ctx, const void *buffer, size_t size)
86 {
87 #if defined(HAVE_W32_SYSTEM) && !defined(_ASSUAN_IN_GPGME_BUILD_ASSUAN)
88   /* Due to the peculiarities of the W32 API we can't use write for a
89      network socket and thus we try to use send first and fallback to
90      write if send detects that it is not a network socket.  */
91   int n;
92
93   n = send (ctx->outbound.fd, buffer, size, 0);
94   if (n == -1 && WSAGetLastError () == WSAENOTSOCK)
95     {
96       DWORD nwrite;
97
98       n = WriteFile ((HANDLE)ctx->outbound.fd, buffer, size, &nwrite, NULL);
99       if (!n)
100         {
101           switch (GetLastError ())
102             {
103             case ERROR_BROKEN_PIPE: 
104             case ERROR_NO_DATA: errno = EPIPE; break;
105             default:            errno = EIO;   break;
106             }
107           n = -1;
108         }
109       else
110         n = (int)nwrite;
111     }
112   return n;
113 #else /*!HAVE_W32_SYSTEM*/
114   return write (ctx->outbound.fd, buffer, size);
115 #endif /*!HAVE_W32_SYSTEM*/
116 }
117
118
119 #ifdef HAVE_W32_SYSTEM
120 int
121 _assuan_simple_sendmsg (assuan_context_t ctx, void *msg)
122 #else
123 ssize_t
124 _assuan_simple_sendmsg (assuan_context_t ctx, struct msghdr *msg)
125 #endif
126 {
127 #ifdef HAVE_W32_SYSTEM
128   return _assuan_error (ASSUAN_Not_Implemented);
129 #else
130   int ret;
131   while ( (ret = sendmsg (ctx->outbound.fd, msg, 0)) == -1 && errno == EINTR)
132     ;
133   return ret;
134 #endif
135 }
136
137
138 #ifdef HAVE_W32_SYSTEM
139 int
140 _assuan_simple_recvmsg (assuan_context_t ctx, void *msg)
141 #else
142 ssize_t
143 _assuan_simple_recvmsg (assuan_context_t ctx, struct msghdr *msg)
144 #endif
145 {
146 #ifdef HAVE_W32_SYSTEM
147   return _assuan_error (ASSUAN_Not_Implemented);
148 #else
149   int ret;
150   while ( (ret = recvmsg (ctx->inbound.fd, msg, 0)) == -1 && errno == EINTR)
151     ;
152   return ret;
153 #endif
154 }