First take on changes to allow building with MSC for W32CE.
[gpgme.git] / src / data-compat.c
1 /* data-compat.c - Compatibility interfaces for data objects.
2    Copyright (C) 2002, 2003, 2004, 2007 g10 Code GmbH
3  
4    This file is part of GPGME.
5  
6    GPGME 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    GPGME 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., 59 Temple Place - Suite 330, Boston, MA
19    02111-1307, USA.  */
20
21 #if HAVE_CONFIG_H
22 #include <config.h>
23 #endif
24
25 #include <errno.h>
26 #ifdef HAVE_SYS_TIME_H
27 # include <sys/time.h>
28 #endif
29 #include <sys/stat.h>
30 #include <stdlib.h>
31
32 #include "data.h"
33 #include "util.h"
34 #include "debug.h"
35
36 \f
37 /* Create a new data buffer filled with LENGTH bytes starting from
38    OFFSET within the file FNAME or stream STREAM (exactly one must be
39    non-zero).  */
40 gpgme_error_t
41 gpgme_data_new_from_filepart (gpgme_data_t *r_dh, const char *fname,
42                               FILE *stream, off_t offset, size_t length)
43 {
44   gpgme_error_t err;
45   char *buf = NULL;
46   int res;
47
48   TRACE_BEG4 (DEBUG_DATA, "gpgme_data_new_from_filepart", r_dh,
49               "file_name=%s, stream=%p, offset=%lli, length=%u",
50               fname, stream, offset, length);
51
52   if (stream && fname)
53     return TRACE_ERR (gpg_error (GPG_ERR_INV_VALUE));
54
55   if (fname)
56     stream = fopen (fname, "rb");
57   if (!stream)
58     return TRACE_ERR (gpg_error_from_errno (errno));
59
60 #ifdef HAVE_FSEEKO
61   res = fseeko (stream, offset, SEEK_SET);
62 #else
63   /* FIXME: Check for overflow, or at least bail at compilation.  */
64   res = fseek (stream, offset, SEEK_SET);
65 #endif
66
67   if (res)
68     {
69       int saved_errno = errno;
70       if (fname)
71         fclose (stream);
72       return TRACE_ERR (gpg_error_from_errno (saved_errno));
73     }
74
75   buf = malloc (length);
76   if (!buf)
77     {
78       int saved_errno = errno;
79       if (fname)
80         fclose (stream);
81       return TRACE_ERR (gpg_error_from_errno (saved_errno));
82     }
83
84   while (fread (buf, length, 1, stream) < 1
85          && ferror (stream) && errno == EINTR);
86   if (ferror (stream))
87     {
88       int saved_errno = errno;
89       if (buf)
90         free (buf);
91       if (fname)
92         fclose (stream);
93       return TRACE_ERR (gpg_error_from_errno (saved_errno));
94     }
95
96   if (fname)
97     fclose (stream);
98
99   err = gpgme_data_new (r_dh);
100   if (err)
101     {
102       if (buf)
103         free (buf);
104       return err;
105     }
106
107   (*r_dh)->data.mem.buffer = buf;
108   (*r_dh)->data.mem.size = length;
109   (*r_dh)->data.mem.length = length;
110
111   return TRACE_SUC1 ("r_dh=%p", *r_dh);
112 }
113
114 \f
115 /* Create a new data buffer filled with the content of file FNAME.
116    COPY must be non-zero (delayed reads are not supported yet).  */
117 gpgme_error_t
118 gpgme_data_new_from_file (gpgme_data_t *r_dh, const char *fname, int copy)
119 {
120   gpgme_error_t err;
121   struct stat statbuf;
122   TRACE_BEG3 (DEBUG_DATA, "gpgme_data_new_from_filepart", r_dh,
123               "file_name=%s, copy=%i (%s)", fname, copy, copy ? "yes" : "no");
124
125   if (!fname || !copy)
126     return TRACE_ERR (gpg_error (GPG_ERR_INV_VALUE));
127
128   if (stat (fname, &statbuf) < 0)
129     return TRACE_ERR (gpg_error_from_errno (errno));
130
131   err = gpgme_data_new_from_filepart (r_dh, fname, NULL, 0, statbuf.st_size);
132   return TRACE_ERR (err);
133 }
134
135 \f
136 static int
137 gpgme_error_to_errno (gpgme_error_t err)
138 {
139   int res = gpg_err_code_to_errno (err);
140
141   if (!err)
142     {
143       switch (gpg_err_code (err))
144         {
145         case GPG_ERR_EOF:
146           res = 0;
147           break;
148         case GPG_ERR_INV_VALUE:
149           res = EINVAL;
150           break;
151         case GPG_ERR_NOT_SUPPORTED:
152           res = ENOSYS;
153           break;
154         default:
155           /* FIXME: Yeah, well.  */
156           res = EINVAL;
157           break;
158         }
159     }
160   TRACE3 (DEBUG_DATA, "gpgme:gpgme_error_to_errno", 0,
161           "mapping %s <%s> to: %s", gpgme_strerror (err),
162           gpgme_strsource (err), strerror (res));
163   gpg_err_set_errno (res);
164   return res ? -1 : 0;
165 }
166
167
168 static ssize_t
169 old_user_read (gpgme_data_t dh, void *buffer, size_t size)
170 {
171   gpgme_error_t err;
172   size_t amt;
173   TRACE_BEG2 (DEBUG_DATA, "gpgme:old_user_read", dh,
174               "buffer=%p, size=%u", buffer, size);
175
176   err = (*dh->data.old_user.cb) (dh->data.old_user.handle,
177                                  buffer, size, &amt);
178   if (err)
179     return TRACE_SYSRES (gpgme_error_to_errno (err));
180   return TRACE_SYSRES (amt);
181 }
182
183
184 static off_t
185 old_user_seek (gpgme_data_t dh, off_t offset, int whence)
186 {
187   gpgme_error_t err;
188   TRACE_BEG2 (DEBUG_DATA, "gpgme:old_user_seek", dh,
189               "offset=%llu, whence=%i", offset, whence);
190
191   if (whence != SEEK_SET || offset)
192     {
193       gpg_err_set_errno (EINVAL);
194       return TRACE_SYSRES (-1);
195     }
196   err = (*dh->data.old_user.cb) (dh->data.old_user.handle, NULL, 0, NULL);
197   if (err)
198     return TRACE_SYSRES (gpgme_error_to_errno (err));
199   return TRACE_SYSRES (0);
200 }
201
202
203 static struct _gpgme_data_cbs old_user_cbs =
204   {
205     old_user_read,
206     NULL,
207     old_user_seek,
208     NULL
209   };
210
211
212 /* Create a new data buffer which retrieves the data from the callback
213    function READ_CB.  */
214 gpgme_error_t
215 gpgme_data_new_with_read_cb (gpgme_data_t *r_dh,
216                              int (*read_cb) (void *, char *, size_t, size_t *),
217                              void *read_cb_value)
218 {
219   gpgme_error_t err;
220   TRACE_BEG2 (DEBUG_DATA, "gpgme_data_new_with_read_cb", r_dh,
221               "read_cb=%p/%p", read_cb, read_cb_value);
222
223   err = _gpgme_data_new (r_dh, &old_user_cbs);
224
225   if (err)
226     return TRACE_ERR (err);
227
228   (*r_dh)->data.old_user.cb = read_cb;
229   (*r_dh)->data.old_user.handle = read_cb_value;
230   return TRACE_ERR (0);
231 }
232
233 \f
234 gpgme_error_t
235 gpgme_data_rewind (gpgme_data_t dh)
236 {
237   gpgme_error_t err;
238   TRACE_BEG (DEBUG_DATA, "gpgme_data_rewind", dh);
239
240   err = (gpgme_data_seek (dh, 0, SEEK_SET) == -1)
241     ? gpg_error_from_errno (errno) : 0;
242
243   return TRACE_ERR (err);
244 }