2004-09-30 Marcus Brinkmann <marcus@g10code.de>
[gpgme.git] / gpgme / data-compat.c
1 /* data-compat.c - Compatibility interfaces for data objects.
2    Copyright (C) 2002, 2003, 2004 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 General Public License as published by
8    the Free Software Foundation; either version 2 of the License, or
9    (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    General Public License for more details.
15  
16    You should have received a copy of the GNU General Public License
17    along with GPGME; if not, write to the Free Software Foundation,
18    Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
19
20 #if HAVE_CONFIG_H
21 #include <config.h>
22 #endif
23
24 #include <errno.h>
25 #include <sys/time.h>
26 #include <sys/stat.h>
27 #include <stdlib.h>
28
29 #include "data.h"
30 #include "util.h"
31
32 \f
33 /* Create a new data buffer filled with LENGTH bytes starting from
34    OFFSET within the file FNAME or stream STREAM (exactly one must be
35    non-zero).  */
36 gpgme_error_t
37 gpgme_data_new_from_filepart (gpgme_data_t *dh, const char *fname,
38                               FILE *stream, off_t offset, size_t length)
39 {
40   gpgme_error_t err;
41   char *buf = NULL;
42   int res;
43
44   if (stream && fname)
45     return gpg_error (GPG_ERR_INV_VALUE);
46
47   if (fname)
48     stream = fopen (fname, "rb");
49   if (!stream)
50     return gpg_error_from_errno (errno);
51
52 #ifdef HAVE_FSEEKO
53   res = fseeko (stream, offset, SEEK_SET);
54 #else
55   /* FIXME: Check for overflow, or at least bail at compilation.  */
56   res = fseek (stream, offset, SEEK_SET);
57 #endif
58
59   if (res)
60     {
61       int saved_errno = errno;
62       if (fname)
63         fclose (stream);
64       return gpg_error_from_errno (saved_errno);
65     }
66
67   buf = malloc (length);
68   if (!buf)
69     {
70       int saved_errno = errno;
71       if (fname)
72         fclose (stream);
73       return gpg_error_from_errno (saved_errno);
74     }
75
76   while (fread (buf, length, 1, stream) < 1
77          && ferror (stream) && errno == EINTR);
78   if (ferror (stream))
79     {
80       int saved_errno = errno;
81       if (buf)
82         free (buf);
83       if (fname)
84         fclose (stream);
85       return gpg_error_from_errno (saved_errno);
86     }
87
88   if (fname)
89     fclose (stream);
90
91   err = gpgme_data_new (dh);
92   if (err)
93     {
94       if (buf)
95         free (buf);
96       return err;
97     }
98
99   (*dh)->data.mem.buffer = buf;
100   (*dh)->data.mem.size = length;
101   (*dh)->data.mem.length = length;
102   return 0;
103 }
104
105 \f
106 /* Create a new data buffer filled with the content of file FNAME.
107    COPY must be non-zero (delayed reads are not supported yet).  */
108 gpgme_error_t
109 gpgme_data_new_from_file (gpgme_data_t *dh, const char *fname, int copy)
110 {
111   struct stat statbuf;
112
113   if (!fname || !copy)
114     return gpg_error (GPG_ERR_INV_VALUE);
115
116   if (stat (fname, &statbuf) < 0)
117     return gpg_error_from_errno (errno);
118
119   return gpgme_data_new_from_filepart (dh, fname, NULL, 0, statbuf.st_size);
120 }
121
122 \f
123 static int
124 gpgme_error_to_errno (gpgme_error_t err)
125 {
126   int no = gpg_err_code_to_errno (err);
127
128   if (no)
129     {
130       errno = no;
131       return -1;
132     }
133
134   switch (gpg_err_code (err))
135     {
136     case GPG_ERR_EOF:
137       return 0;
138     case GPG_ERR_INV_VALUE:
139       errno = EINVAL;
140       return -1;
141     case GPG_ERR_NOT_SUPPORTED:
142       errno = EOPNOTSUPP;
143       return -1;
144     default:
145       /* FIXME: Yeah, well.  */
146       errno = EINVAL;
147       return -1;
148     }
149 }
150
151
152 static ssize_t
153 old_user_read (gpgme_data_t dh, void *buffer, size_t size)
154 {
155   size_t amt;
156   gpgme_error_t err = (*dh->data.old_user.cb) (dh->data.old_user.handle,
157                                                buffer, size, &amt);
158   if (err)
159     return gpgme_error_to_errno (err);
160   return amt;
161 }
162
163
164 static off_t
165 old_user_seek (gpgme_data_t dh, off_t offset, int whence)
166 {
167   gpgme_error_t err;
168   if (whence != SEEK_SET || offset)
169     return EINVAL;
170   err = (*dh->data.old_user.cb) (dh->data.old_user.handle, NULL, 0, NULL);
171   if (err)
172     return gpgme_error_to_errno (err);
173   return 0;
174 }
175
176
177 static struct _gpgme_data_cbs old_user_cbs =
178   {
179     old_user_read,
180     NULL,
181     old_user_seek,
182     NULL
183   };
184
185
186 /* Create a new data buffer which retrieves the data from the callback
187    function READ_CB.  */
188 gpgme_error_t
189 gpgme_data_new_with_read_cb (gpgme_data_t *dh,
190                              int (*read_cb) (void *, char *, size_t, size_t *),
191                              void *read_cb_value)
192 {
193   gpgme_error_t err = _gpgme_data_new (dh, &old_user_cbs);
194   if (err)
195     return err;
196
197   (*dh)->data.old_user.cb = read_cb;
198   (*dh)->data.old_user.handle = read_cb_value;
199   return 0;
200 }
201
202 \f
203 gpgme_error_t
204 gpgme_data_rewind (gpgme_data_t dh)
205 {
206   return (gpgme_data_seek (dh, 0, SEEK_SET) == -1)
207     ? gpg_error_from_errno (errno) : 0;
208 }