/[winpt]/trunk/Src/wptCardEdit.cpp
ViewVC logotype

Annotation of /trunk/Src/wptCardEdit.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 260 - (hide annotations)
Wed Aug 16 10:01:30 2006 UTC (18 years, 6 months ago) by twoaday
File size: 15417 byte(s)


1 werner 36 /* wptCardEdit.cpp - OpenPGP editing interface
2 twoaday 200 * Copyright (C) 2005, 2006 Timo Schulz
3 werner 36 *
4     * This file is part of WinPT.
5     *
6     * WinPT 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     * WinPT 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 WinPT; if not, write to the Free Software Foundation,
18     * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19     */
20    
21     #ifdef HAVE_CONFIG_H
22     #include <config.h>
23     #endif
24    
25     #include <windows.h>
26     #include <time.h>
27    
28 twoaday 260 #include "wptGPG.h"
29 werner 36 #include "wptCard.h"
30     #include "wptCardEdit.h"
31     #include "wptErrors.h"
32 twoaday 260 #include "wptTypes.h"
33     #include "wptW32API.h"
34 werner 36
35     /* Create a new Smartcard context. */
36     static gpgme_error_t
37     gpg_card_new (gpg_card_t *ret_card)
38     {
39     gpg_card_t c;
40    
41     if (!ret_card)
42     return gpg_error (GPG_ERR_INV_ARG);
43     *ret_card = NULL;
44     c = (gpg_card_t)calloc (1, sizeof *c);
45     if (!c)
46     return gpg_error (GPG_ERR_ENOMEM);
47     *ret_card = c;
48     return 0;
49     }
50    
51    
52     /* Release an existing Smartcard context. @card. */
53     void
54     gpg_card_release (gpg_card_t card)
55     {
56     int i;
57    
58     if (!card)
59     return;
60 twoaday 260 safe_free (card->aid);
61     safe_free (card->version);
62     safe_free (card->lang);
63     safe_free (card->login);
64     for (i=0; i < N_CARD_FPR; i++) {
65     safe_free (card->fpr[i]);
66     safe_free (card->ca_fpr[i]);
67     safe_free (card->fpr_created_str[i]);
68 werner 36 }
69 twoaday 260 safe_free (card->surname);
70     safe_free (card->givenname);
71     safe_free (card->serial);
72     safe_free (card->vendor);
73     safe_free (card->url);
74     safe_free (card->card_type);
75     safe_free (card);
76 werner 36
77     }
78    
79    
80     /* Parse the timestamp @long_ts and return a string
81 twoaday 260 representation of it (format: depens on locale setting). */
82 werner 36 static char*
83     get_str_timestamp (long long_ts)
84     {
85 twoaday 260 char timebuf[64];
86     const char *dat;
87 werner 36
88 twoaday 260 if (long_ts < 1)
89     return strdup ("");
90     dat = get_locale_date (long_ts, timebuf, sizeof (timebuf)-1);
91     if (!dat)
92     return strdup ("");
93    
94     return strdup (dat);
95 werner 36 }
96    
97    
98 twoaday 260 /* Parse the card version AABB => 0100 */
99     static void
100     parse_version (gpg_card_t card, const char *ver)
101     {
102     char buf[6];
103    
104     if (strlen (ver) != 4)
105     return;
106     buf[0] = *ver++;
107     buf[1] = *ver++;
108     buf[2] = 0;
109     buf[3] = *ver++;
110     buf[4] = *ver++;
111     buf[5] = 0;
112     card->ver[0] = atoi (buf);
113     card->ver[1] = atoi (buf+3);
114     }
115    
116    
117 werner 36 /* Colon handler for parsing the GPG card colon output. */
118     static gpgme_error_t
119     statuscard_colon_handler (gpg_card_t card, char * line)
120     {
121     enum rectype_t {
122     CARD_None = 0,
123     CARD_AID,
124     CARD_Version,
125     CARD_Vendor,
126     CARD_Serial,
127     CARD_Name,
128     CARD_Lang,
129     CARD_Sex,
130     CARD_Url,
131     CARD_Login,
132     CARD_MaxPinLen,
133     CARD_SigCount,
134     CARD_CAFpr,
135     CARD_Fpr,
136     CARD_FprTime
137     };
138 twoaday 69 enum rectype_t rectype = (rectype_t)0;
139 werner 36 char *p, *pend;
140     int field = 0;
141    
142     if (!line)
143     return gpg_error (GPG_ERR_EOF);
144    
145     for (p = line; p; p = pend) {
146     field++;
147     pend = strchr (p, ':');
148     if (pend)
149     *pend++ = 0;
150    
151     if (field == 1) {
152     if (!strcmp (p, "AID"))
153     rectype = CARD_AID;
154     else if( !strcmp( p, "version" ) )
155     rectype = CARD_Version;
156     else if( !strcmp( p, "vendor" ) )
157     rectype = CARD_Vendor;
158     else if( !strcmp( p, "serial" ) )
159     rectype = CARD_Serial;
160     else if( !strcmp( p, "name" ) )
161     rectype = CARD_Name;
162     else if( !strcmp( p, "lang" ) )
163     rectype = CARD_Lang;
164     else if( !strcmp( p, "sex" ) )
165     rectype = CARD_Sex;
166     else if( !strcmp( p, "url" ) )
167     rectype = CARD_Url;
168     else if( !strcmp( p, "login" ) )
169     rectype = CARD_Login;
170     else if( !strcmp( p, "maxpinlen" ) )
171     rectype = CARD_MaxPinLen;
172     else if( !strcmp( p, "sigcount" ) )
173     rectype = CARD_SigCount;
174     else if (!strcmp (p, "cafpr"))
175     rectype = CARD_CAFpr;
176     else if (!strcmp (p, "fpr"))
177     rectype = CARD_Fpr;
178     else if (!strcmp (p, "fprtime"))
179     rectype = CARD_FprTime;
180     else
181     rectype = CARD_None;
182     }
183     switch (rectype) {
184     case CARD_AID:
185     if (field == 2) {
186     card->aid = strdup (p);
187     if (!card->aid)
188     return gpg_error (GPG_ERR_ENOMEM);
189     }
190     else if (field == 3) {
191     card->card_type = strdup (p);
192     if (!card->card_type)
193     return gpg_error (GPG_ERR_ENOMEM);
194     }
195     break;
196    
197     case CARD_Version:
198     if (field == 2) {
199     card->version = strdup (p);
200     if (!card->version)
201     return gpg_error (GPG_ERR_ENOMEM);
202 twoaday 260 parse_version (card, p);
203 werner 36 }
204     break;
205    
206     case CARD_Vendor:
207     if (field == 3) {
208     card->vendor = strdup (p);
209     if (!card->vendor)
210     return gpg_error (GPG_ERR_ENOMEM);
211     }
212     break;
213    
214     case CARD_Serial:
215     if (field == 2) {
216     card->serial = strdup (p);
217     if (!card->serial)
218     return gpg_error (GPG_ERR_ENOMEM);
219     }
220     break;
221     case CARD_Name:
222     if (field == 2) {
223     card->givenname = strdup (p);
224     if (!card->givenname)
225     return gpg_error (GPG_ERR_ENOMEM);
226     }
227     else if (field == 3) {
228     card->surname = strdup (p);
229     if (!card->surname)
230     return gpg_error (GPG_ERR_ENOMEM);
231     }
232     break;
233     case CARD_Lang:
234     if( field == 2 ) {
235     card->lang = strdup (p);
236     if (!card->lang)
237     return gpg_error (GPG_ERR_ENOMEM);
238     }
239     break;
240     case CARD_Sex:
241     if( field == 2 )
242     card->sex = *p;
243     break;
244    
245     case CARD_Url:
246     if( field == 2 ) {
247     if (card->url)
248     free (card->url);
249     card->url = (char*)calloc (1, strlen (p) + 1);
250     if( !card->url ) {
251     return gpg_error (GPG_ERR_ENOMEM);
252     }
253     gpg_decode_c_string (p, &card->url, strlen (p) + 1);
254     if (!card->url)
255     return gpg_error (GPG_ERR_ENOMEM);
256     }
257     break;
258    
259     case CARD_Login:
260     if (field == 2) {
261     card->login = strdup (p);
262     if (!card->login)
263     return gpg_error (GPG_ERR_ENOMEM);
264     }
265     break;
266    
267     case CARD_MaxPinLen:
268     break;
269    
270     case CARD_SigCount:
271     if (field == 2)
272     card->sig_count = atol (p);
273     break;
274    
275     case CARD_CAFpr:
276     if (!p)
277     break;
278     if (field > 4 || field == 1)
279     break;
280     card->ca_fpr[field-2] = strdup (p);
281     if (!card->ca_fpr[field-2])
282     return gpg_error (GPG_ERR_ENOMEM);
283     break;
284    
285     case CARD_Fpr:
286 twoaday 260 if (field > 4 || field == 1) /* max N_CARD_FPR=3 fprs */
287 werner 36 break;
288     card->fpr[field-2] = strdup (p);
289     if (!card->fpr[field-2])
290     return gpg_error (GPG_ERR_ENOMEM);
291     break;
292    
293     case CARD_FprTime:
294     if (field > 4 || field == 1)
295     break;
296     card->fpr_created[field-2] = strtoul (p, NULL, 10);
297 twoaday 260 if (card->fpr_created[field-2] > 0)
298     card->fpr_created_str[field-2] = get_str_timestamp (strtoul (p, NULL, 10));
299     else
300     card->fpr_created_str[field-2] = NULL;
301 werner 36 break;
302 twoaday 260
303 twoaday 69 default:
304     break;
305 twoaday 260
306 werner 36 }
307     }
308     return 0;
309     }
310    
311    
312     /* Dummy handler to get the colon data and then quit. */
313     static gpgme_error_t
314     list_handler (void *opaque, gpgme_status_code_t code, const char *key, int fd)
315     {
316     static int wait_card=0;
317     GpgCardEdit *ce = (GpgCardEdit *)opaque;
318     const char *s="";
319     DWORD n;
320    
321    
322     if (code == GPGME_STATUS_CARDCTRL) {
323     if (!strcmp (key, "5"))
324     ce->setResult (GPG_CARDRES_NOCARD);
325     else if (!strcmp (key, "1"))
326     wait_card = 1;
327     }
328     if (wait_card && !strcmp (key, "cardctrl.insert_card.okay")) {
329     n = MessageBox (NULL, _("Please insert the card and click OK or Cancel to abort."),
330     _("GPG Card Status"), MB_ICONQUESTION|MB_OKCANCEL);
331     if (n == IDCANCEL) {
332     ce->setResult (GPG_CARDRES_CANCEL);
333     WriteFile ((HANDLE)fd, "c\n", 2, &n, NULL);
334     wait_card = 0;
335     }
336     }
337     if (!strcmp (key, "cardedit.prompt")) {
338     s = "quit\n";
339     if (!WriteFile ((HANDLE)fd, s, strlen (s), &n, NULL))
340     log_debug ("list_handler: WriteFile() failed ec=%d\r\n",
341     (int)GetLastError ());
342     wait_card = 0;
343     }
344     return 0;
345     }
346    
347    
348     /* Construct an empty object. */
349     GpgCardEdit::GpgCardEdit (void)
350     {
351     pin = NULL;
352     pin_new = NULL;
353     admin_pin = NULL;
354    
355     keygen.comment = NULL;
356     keygen.email = NULL;
357     keygen.name = NULL;
358     keygen.expdate = NULL;
359     keygen.key_fpr = NULL;
360    
361     type = 0;
362     cnt = 0;
363     cancel = 0;
364     result = 0;
365    
366     gpgme_new (&ctx); /* XXX: check return code */
367     }
368    
369     /* Release the object. */
370     GpgCardEdit::~GpgCardEdit (void)
371     {
372     if (keygen.name)
373     free (keygen.name);
374     if (keygen.comment)
375     free (keygen.comment);
376     if (keygen.email)
377     free (keygen.email);
378     if (keygen.expdate)
379     free (keygen.expdate);
380     if (keygen.key_fpr)
381     free (keygen.key_fpr);
382     gpgme_release (ctx);
383     }
384    
385    
386     /* Set the user PIN for the object to @pin. */
387     void
388 twoaday 69 GpgCardEdit::setPIN (const char *_pin)
389 werner 36 {
390 twoaday 69 this->pin = _pin;
391 werner 36 }
392    
393     /* Set the admin PIN for the object to @admin_pin. */
394     void
395 twoaday 69 GpgCardEdit::setAdminPIN (const char *_admin_pin)
396 werner 36 {
397 twoaday 69 this->admin_pin = _admin_pin;
398 werner 36 }
399    
400    
401     /* Set the new user PIN for the object to @new_pin. */
402     void
403 twoaday 69 GpgCardEdit::setNewPIN (const char *_new_pin)
404 werner 36 {
405 twoaday 69 this->pin_new = _new_pin;
406 werner 36 }
407    
408    
409     /* Set the passphrase needed when generating a key to @pass. */
410     void
411 twoaday 69 GpgCardEdit::setKeygenPassphrase (const char *_pass)
412 werner 36 {
413 twoaday 69 this->keygen.pass = _pass;
414 werner 36 }
415    
416    
417     /* Set the callback to @cb and the hook value to @cb_value. */
418     void
419 twoaday 260 GpgCardEdit::setCallback (const char* (*_cb)(int code, void *opaque),
420 twoaday 77 void *_cb_value)
421 werner 36 {
422 twoaday 77 this->cb_value = _cb_value;
423     this->card_cb = _cb;
424 werner 36 }
425    
426    
427     /* Read the information from the inserted card and return
428     it in form of a card context @r_card.
429     Return value: 0 on success. */
430     gpgme_error_t
431     GpgCardEdit::getCardStatus (gpg_card_t *r_card)
432     {
433     gpgme_data_t out = NULL;
434     gpgme_error_t err;
435     gpg_card_t card=NULL;
436     char buf[200];
437    
438     if (!r_card)
439     return gpg_error (GPG_ERR_INV_ARG);
440    
441     err = gpg_card_new (&card);
442     if (err)
443     return err;
444    
445     err = gpgme_data_new (&out);
446     if (err) {
447     gpg_card_release (card);
448     return err;
449     }
450    
451     err = gpgme_op_card_edit (ctx, NULL, list_handler, this, out);
452     gpgme_data_rewind (out);
453     if (err) {
454     gpgme_data_release (out);
455     gpg_card_release (card);
456     return err;
457     }
458     if (getResult () & GPG_CARDRES_NOCARD ||
459     getResult () & GPG_CARDRES_CANCEL) {
460     gpg_card_release (card);
461     gpgme_data_release (out);
462     return gpg_error (GPG_ERR_CARD_NOT_PRESENT);
463     }
464    
465     *r_card = card;
466     while (gpg_data_readline (out, buf, sizeof (buf)-2) > 0) {
467     err = statuscard_colon_handler (card, buf);
468     if (err)
469     break;
470     }
471     gpgme_data_release (out);
472    
473     return err;
474     }
475    
476    
477     /* Generate a key on a smart card with the following params:
478     @flags: user specific params.
479     @name: name of the key holder.
480     @email: email of the key holder.
481     @comment: optional comment.
482     @valid: how long is the key valid in days.
483     Return value: 0 on success. */
484     gpgme_error_t
485     GpgCardEdit::genKey (int flags, const char *name,
486     const char *email, const char *comment, long valid,
487     char **r_key_fpr)
488     {
489     gpgme_error_t err;
490    
491     if (!name || !email)
492     return gpg_error (GPG_ERR_INV_ARG);
493     if (!this->keygen.pass)
494     return gpg_error (GPG_ERR_INV_OBJ);
495    
496     type = GPG_EDITCARD_GENKEY;
497     this->keygen.flags = flags;
498    
499     if (this->keygen.name)
500     free (this->keygen.name);
501     this->keygen.name = strdup (name);
502     if (this->keygen.email)
503     free (this->keygen.email);
504     this->keygen.email = strdup (email);
505     if (this->keygen.comment)
506     free (this->keygen.comment);
507     this->keygen.comment = comment? strdup (comment) : strdup ("");
508     if (this->keygen.expdate)
509     free (this->keygen.expdate);
510     this->keygen.expdate = (char*)calloc (1, 16);
511     if (this->keygen.expdate)
512 twoaday 77 sprintf (this->keygen.expdate, "%lu", valid);
513 werner 36
514     if (!this->keygen.name || !this->keygen.email)
515     return gpg_error (GPG_ERR_ENOMEM);
516    
517     err = gpg_card_edit (ctx, this);
518     if (!err)
519     err = getResult () & GPG_CARDRES_CANCEL? gpg_error (GPG_ERR_CANCELED) : 0;
520     if (!err && r_key_fpr)
521     *r_key_fpr = strdup (keygen.key_fpr? keygen.key_fpr : "");
522     return err;
523     }
524    
525    
526     /* Change the pin from @pin to @pin_new.
527     Return value: 0 on success. */
528     gpgme_error_t
529 twoaday 69 GpgCardEdit::changePIN (int _type)
530 werner 36 {
531     gpgme_error_t err;
532    
533     if (!this->pin_new)
534     return gpg_error (GPG_ERR_INV_ARG);
535    
536 twoaday 69 if (!_type) {
537 werner 36 if (this->pin && this->pin_new)
538     this->type = GPG_EDITCARD_CHUPIN;
539     else if (this->pin && this->admin_pin)
540     this->type = GPG_EDITCARD_CHAPIN;
541     else
542     this->type = GPG_EDITCARD_UNBPIN;
543     }
544     else
545 twoaday 69 this->type = _type;
546 werner 36 /* check if the user provided the needed PIN. */
547     if ((this->type == GPG_EDITCARD_CHUPIN && !this->pin) ||
548     (this->type == GPG_EDITCARD_CHAPIN && !this->admin_pin))
549     return gpg_error (GPG_ERR_INV_ARG);
550    
551     err = gpg_card_edit (ctx, this);
552     return err;
553     }
554    
555    
556     gpgme_error_t
557     GpgCardEdit::updateName (const char *given, const char *sur)
558     {
559     gpgme_error_t err;
560    
561     if (!this->admin_pin)
562     return gpg_error (GPG_ERR_INV_OBJ);
563    
564     this->type = GPG_EDITCARD_NAME;
565     this->edit.surname = sur;
566     this->edit.givenname = given;
567    
568     err = gpg_card_edit (ctx, this);
569     return err;
570     }
571    
572     gpgme_error_t
573 twoaday 69 GpgCardEdit::updateURL (const char *_url)
574 werner 36 {
575     gpgme_error_t err;
576    
577     if (!this->admin_pin)
578     return gpg_error (GPG_ERR_INV_OBJ);
579    
580     type = GPG_EDITCARD_KEYURL;
581 twoaday 69 this->edit.keyurl = _url;
582 werner 36
583     err = gpg_card_edit (ctx, this);
584     return err;
585     }
586    
587    
588     gpgme_error_t
589     GpgCardEdit::updateLogin (const char *login)
590     {
591     gpgme_error_t err;
592    
593     if (!this->admin_pin)
594     return gpg_error (GPG_ERR_INV_OBJ);
595    
596     this->type = GPG_EDITCARD_LOGIN;
597     this->edit.login = login;
598    
599     err = gpg_card_edit (ctx, this);
600     return err;
601     }
602    
603     gpgme_error_t
604     GpgCardEdit::updateSex (char sex)
605     {
606     gpgme_error_t err;
607    
608     if (!this->admin_pin)
609     return gpg_error (GPG_ERR_INV_OBJ);
610    
611     type = GPG_EDITCARD_SEX;
612     this->edit.sex = sex;
613    
614     err = gpg_card_edit (ctx, this);
615     return err;
616     }
617    
618     gpgme_error_t
619     GpgCardEdit::updateLanguage (const char *lang)
620     {
621     gpgme_error_t err;
622    
623     if (!this->admin_pin)
624     return gpg_error (GPG_ERR_INV_OBJ);
625    
626     type = GPG_EDITCARD_LANG;
627     this->edit.lang = lang;
628    
629     err = gpg_card_edit (ctx, this);
630     return err;
631     }
632    
633    
634     /* Fetch the key specified by the url stored on the card.
635     Return value: 0 on success. */
636     gpgme_error_t
637     GpgCardEdit::fetchKey (void)
638     {
639 twoaday 260 gpgme_error_t err = 0;
640    
641 werner 36 if (!this->pin)
642     return gpg_error (GPG_ERR_INV_OBJ);
643    
644 twoaday 260 return err;
645 werner 36 }
646    
647    
648     /* Dispatcher for the various commands. @cmd is the card command ID
649     and @arg1 and @arg2 the actual values for the command.
650     Return value: 0 on success. */
651     gpgme_error_t
652     GpgCardEdit:: doCmd (int cmd, const char *arg1, const char *arg2)
653     {
654     switch (cmd) {
655     case GPG_EDITCARD_NAME:
656     return updateName (arg1, arg2); /* given, surname */
657    
658     case GPG_EDITCARD_LANG:
659     return updateLanguage (arg1); /* lang */
660    
661     case GPG_EDITCARD_SEX:
662     return updateSex (*arg1); /* sex */
663    
664     case GPG_EDITCARD_KEYURL:
665     return updateURL (arg1); /* url */
666    
667     case GPG_EDITCARD_LOGIN:
668     return updateLogin (arg1); /* login */
669    
670     default:
671     return gpg_error (GPG_ERR_INV_VALUE);
672     }
673    
674     return 0;
675     }
676    
677    
678     /* Set the result for the executed operation.
679     The values will be ORed. */
680     void
681     GpgCardEdit::setResult (int res)
682     {
683     result |= res;
684     }
685    
686    
687     /* Return the result of the executed operation. */
688     int
689     GpgCardEdit::getResult (void)
690     {
691     return result;
692     }
693    
694    
695     /* Reset the object state. */
696     void
697     GpgCardEdit::reset (void)
698     {
699     cnt = 0;
700     }
701    
702    
703     /* Return card command type */
704     int
705     GpgCardEdit::getType (void)
706     {
707     return type;
708     }

Properties

Name Value
svn:eol-style native

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26