* options.h, g10.c (main), keyserver.c (keyserver_refresh): Maintain and
[gnupg.git] / g10 / photoid.c
1 /* photoid.c - photo ID handling code
2  * Copyright (C) 2001, 2002 Free Software Foundation, Inc.
3  *
4  * This file is part of GnuPG.
5  *
6  * GnuPG is free software; you can redistribute it and/or modify
7  * it 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  * GnuPG is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19  */
20
21 #include <config.h>
22 #include <errno.h>
23 #include <stdio.h>
24 #include <string.h>
25 #ifdef __MINGW32__ 
26 # include <windows.h>
27 # ifndef VER_PLATFORM_WIN32_WINDOWS
28 #  define VER_PLATFORM_WIN32_WINDOWS 1
29 # endif
30 #endif
31 #include "packet.h"
32 #include "status.h"
33 #include "exec.h"
34 #include "keydb.h"
35 #include "util.h"
36 #include "i18n.h"
37 #include "iobuf.h"
38 #include "memory.h"
39 #include "options.h"
40 #include "main.h"
41 #include "photoid.h"
42
43 /* Generate a new photo id packet, or return NULL if canceled */
44 PKT_user_id *generate_photo_id(PKT_public_key *pk)
45 {
46   PKT_user_id *uid;
47   int error=1,i;
48   unsigned int len;
49   char *filename=NULL;
50   byte *photo=NULL;
51   byte header[16];
52   IOBUF file;
53
54   header[0]=0x10; /* little side of photo header length */
55   header[1]=0;    /* big side of photo header length */
56   header[2]=1;    /* 1 == version of photo header */
57   header[3]=1;    /* 1 == JPEG */
58
59   for(i=4;i<16;i++) /* The reserved bytes */
60     header[i]=0;
61
62   uid=m_alloc_clear(sizeof(*uid)+50);
63
64   printf(_("\nPick an image to use for your photo ID.  "
65            "The image must be a JPEG file.\n"
66            "Remember that the image is stored within your public key.  "
67            "If you use a\n"
68            "very large picture, your key will become very large as well!\n"
69            "Keeping the image close to 240x288 is a good size to use.\n"));
70
71   while(photo==NULL)
72     {
73       printf("\n");
74
75       m_free(filename);
76
77       filename=cpr_get("photoid.jpeg.add",
78                        _("Enter JPEG filename for photo ID: "));
79
80       if(strlen(filename)==0)
81         goto scram;
82
83       file=iobuf_open(filename);
84       if(!file)
85         {
86           log_error(_("Unable to open photo \"%s\": %s\n"),
87                     filename,strerror(errno));
88           continue;
89         }
90
91       len=iobuf_get_filelength(file);
92       if(len>6144)
93         {
94           printf("This JPEG is really large (%d bytes) !\n",len);
95           if(!cpr_get_answer_is_yes("photoid.jpeg.size",
96                             _("Are you sure you want to use it (y/N)? ")))
97           {
98             iobuf_close(file);
99             continue;
100           }
101         }
102
103       photo=m_alloc(len);
104       iobuf_read(file,photo,len);
105       iobuf_close(file);
106
107       /* Is it a JPEG? */
108       if(photo[0]!=0xFF || photo[1]!=0xD8 ||
109          photo[6]!='J' || photo[7]!='F' || photo[8]!='I' || photo[9]!='F')
110         {
111           log_error(_("\"%s\" is not a JPEG file\n"),filename);
112           m_free(photo);
113           photo=NULL;
114           continue;
115         }
116
117       /* Build the packet */
118       build_attribute_subpkt(uid,1,photo,len,header,16);
119       parse_attribute_subpkts(uid);
120       make_attribute_uidname(uid);
121
122       /* Showing the photo is not safe when noninteractive since the
123          "user" may not be able to dismiss a viewer window! */
124       if(opt.command_fd==-1)
125         {
126           show_photos(uid->attribs,uid->numattribs,pk,NULL);
127           switch(cpr_get_answer_yes_no_quit("photoid.jpeg.okay",
128                                          _("Is this photo correct (y/N/q)? ")))
129             {
130             case -1:
131               goto scram;
132             case 0:
133               free_attributes(uid);
134               m_free(photo);
135               photo=NULL;
136               continue;
137             }
138         }
139     }
140
141   error=0;
142   uid->ref=1;
143
144  scram:
145   m_free(filename);
146   m_free(photo);
147
148   if(error)
149     {
150       free_attributes(uid);
151       m_free(uid);
152       return NULL;
153     }
154
155   return uid;
156 }
157
158 /* Returns 0 for error, 1 for valid */
159 int parse_image_header(const struct user_attribute *attr,byte *type,u32 *len)
160 {
161   u16 headerlen;
162
163   if(attr->len<3)
164     return 0;
165
166   /* For historical reasons (i.e. "oops!"), the header length is
167      little endian. */
168   headerlen=(attr->data[1]<<8) | attr->data[0];
169
170   if(headerlen>attr->len)
171     return 0;
172
173   if(type && attr->len>=4)
174     {
175       if(attr->data[2]==1) /* header version 1 */
176         *type=attr->data[3];
177       else
178         *type=0;
179     }
180
181   *len=attr->len-headerlen;
182
183   if(*len==0)
184     return 0;
185
186   return 1;
187 }
188
189 /* style==0 for extension, 1 for name, 2 for MIME type.  Remember that
190    the "name" style string could be used in a user ID name field, so
191    make sure it is not too big (see
192    parse-packet.c:parse_attribute). */
193 char *image_type_to_string(byte type,int style)
194 {
195   char *string;
196
197   switch(type)
198     {
199     case 1: /* jpeg */
200       if(style==0)
201         string="jpg";
202       else if(style==1)
203         string="jpeg";
204       else
205         string="image/jpeg";
206       break;
207
208     default:
209       if(style==0)
210         string="bin";
211       else if(style==1)
212         string="unknown";
213       else
214         string="image/x-unknown";
215       break;
216     }
217
218   return string;
219 }
220
221 static const char *get_default_photo_command(void)
222 {
223 #if defined(HAVE_DOSISH_SYSTEM)
224   OSVERSIONINFO osvi;
225
226   memset(&osvi,0,sizeof(osvi));
227   osvi.dwOSVersionInfoSize=sizeof(osvi);
228   GetVersionEx(&osvi);
229
230   if(osvi.dwPlatformId==VER_PLATFORM_WIN32_WINDOWS)
231     return "start /w %i";
232   else
233     return "cmd /c start /w %i";
234 #elif defined(__APPLE__)
235   /* OS X.  This really needs more than just __APPLE__. */
236   return "open %I";
237 #elif defined(__riscos__)
238   return "Filer_Run %I";
239 #else
240   return "xloadimage -fork -quiet -title 'KeyID 0x%k' stdin";
241 #endif
242 }
243
244 void show_photos(const struct user_attribute *attrs,
245                  int count,PKT_public_key *pk,PKT_secret_key *sk)
246 {
247   int i;
248   struct expando_args args;
249   u32 len;
250   u32 kid[2]={0,0};
251
252   memset(&args,0,sizeof(args));
253   args.pk=pk;
254   args.sk=sk;
255
256   if(pk)
257     keyid_from_pk(pk,kid);
258   else if(sk)
259     keyid_from_sk(sk,kid);
260
261   for(i=0;i<count;i++)
262     if(attrs[i].type==ATTRIB_IMAGE &&
263        parse_image_header(&attrs[i],&args.imagetype,&len))
264       {
265         char *command,*name;
266         struct exec_info *spawn;
267         int offset=attrs[i].len-len;
268
269         if(!opt.photo_viewer)
270           opt.photo_viewer=get_default_photo_command();
271
272         /* make command grow */
273         command=pct_expando(opt.photo_viewer,&args);
274         if(!command)
275           goto fail;
276
277         name=m_alloc(16+strlen(EXTSEP_S)+
278                      strlen(image_type_to_string(args.imagetype,0))+1);
279
280         /* Make the filename.  Notice we are not using the image
281            encoding type for more than cosmetics.  Most external image
282            viewers can handle a multitude of types, and even if one
283            cannot understand a partcular type, we have no way to know
284            which.  The spec permits this, by the way. -dms */
285
286 #ifdef USE_ONLY_8DOT3
287         sprintf(name,"%08lX" EXTSEP_S "%s",(ulong)kid[1],
288                 image_type_to_string(args.imagetype,0));
289 #else
290         sprintf(name,"%08lX%08lX" EXTSEP_S "%s",(ulong)kid[0],(ulong)kid[1],
291                 image_type_to_string(args.imagetype,0));
292 #endif
293
294         if(exec_write(&spawn,NULL,command,name,1,1)!=0)
295           {
296             m_free(name);
297             goto fail;
298           }
299
300 #ifdef __riscos__
301         riscos_set_filetype(spawn->tempfile_in,
302                             image_type_to_string(args.imagetype,2));
303 #endif
304
305         m_free(name);
306
307         fwrite(&attrs[i].data[offset],attrs[i].len-offset,1,spawn->tochild);
308
309         if(exec_read(spawn)!=0)
310           {
311             exec_finish(spawn);
312             goto fail;
313           }
314
315         if(exec_finish(spawn)!=0)
316           goto fail;
317       }
318
319   return;
320
321  fail:
322   log_error("unable to display photo ID!\n");
323 }