Artifact 7d72bb80c80ff4211891816ad7558752b792bfe809264f76306e202466609ff7:
- File gnupg.c — part of check-in [c14cf350df] at 2014-05-15 21:36:21 on branch manualheaven — Move src and doc files to top directory (user: base@atomicules.co.uk size: 14664) [more...]
- File
src/gnupg.c
— part of check-in
[ad4b365670]
at
2010-10-29 20:55:11
on branch origin/tweaks
— Correct key search logic when more than one key for a given email address
exists, where some are expired and one isn't
Fix issue with compiling expired key regular expressions on more modern libc's
Avoid some compiler warningsgit-svn-id: https://pwman.svn.sourceforge.net/svnroot/pwman/trunk@108 db5f1c25-4851-472e-ac1e-5437d07aece1 (user: gagravarr@users.sourceforge.net size: 14664)
0000: 2f 2a 0a 20 2a 20 20 50 57 4d 61 6e 20 2d 20 70 /*. * PWMan - p
0010: 61 73 73 77 6f 72 64 20 6d 61 6e 61 67 65 6d 65 assword manageme
0020: 6e 74 20 61 70 70 6c 69 63 61 74 69 6f 6e 0a 20 nt application.
0030: 2a 0a 20 2a 20 20 43 6f 70 79 72 69 67 68 74 20 *. * Copyright
0040: 28 43 29 20 32 30 30 32 20 20 49 76 61 6e 20 4b (C) 2002 Ivan K
0050: 65 6c 6c 79 20 3c 69 76 61 6e 40 69 76 61 6e 6b elly <ivan@ivank
0060: 65 6c 6c 79 2e 6e 65 74 3e 0a 20 2a 0a 20 2a 20 elly.net>. *. *
0070: 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 This program is
0080: 20 66 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 free software;
0090: 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 you can redistri
00a0: 62 75 74 65 20 69 74 20 61 6e 64 2f 6f 72 20 6d bute it and/or m
00b0: 6f 64 69 66 79 0a 20 2a 20 20 69 74 20 75 6e 64 odify. * it und
00c0: 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 er the terms of
00d0: 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 the GNU General
00e0: 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 Public License a
00f0: 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 20 s published by.
0100: 2a 20 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 * the Free Soft
0110: 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 3b ware Foundation;
0120: 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 either version
0130: 32 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2 of the License
0140: 2c 20 6f 72 0a 20 2a 20 20 28 61 74 20 79 6f 75 , or. * (at you
0150: 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 r option) any la
0160: 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 20 2a 0a ter version.. *.
0170: 20 2a 20 20 54 68 69 73 20 70 72 6f 67 72 61 6d * This program
0180: 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 is distributed
0190: 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 in the hope that
01a0: 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 it will be usef
01b0: 75 6c 2c 0a 20 2a 20 20 62 75 74 20 57 49 54 48 ul,. * but WITH
01c0: 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 OUT ANY WARRANTY
01d0: 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 ; without even t
01e0: 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 he implied warra
01f0: 6e 74 79 20 6f 66 0a 20 2a 20 20 4d 45 52 43 48 nty of. * MERCH
0200: 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 ANTABILITY or FI
0210: 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 TNESS FOR A PART
0220: 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 ICULAR PURPOSE.
0230: 20 53 65 65 20 74 68 65 0a 20 2a 20 20 47 4e 55 See the. * GNU
0240: 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 General Public
0250: 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 License for more
0260: 20 64 65 74 61 69 6c 73 2e 0a 20 2a 0a 20 2a 20 details.. *. *
0270: 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 You should have
0280: 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 received a copy
0290: 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 of the GNU Gene
02a0: 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e ral Public Licen
02b0: 73 65 0a 20 2a 20 20 61 6c 6f 6e 67 20 77 69 74 se. * along wit
02c0: 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 3b 20 h this program;
02d0: 69 66 20 6e 6f 74 2c 20 77 72 69 74 65 20 74 6f if not, write to
02e0: 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 the Free Softwa
02f0: 72 65 0a 20 2a 20 20 46 6f 75 6e 64 61 74 69 6f re. * Foundatio
0300: 6e 2c 20 49 6e 63 2e 2c 20 35 39 20 54 65 6d 70 n, Inc., 59 Temp
0310: 6c 65 20 50 6c 61 63 65 2c 20 53 75 69 74 65 20 le Place, Suite
0320: 33 33 30 2c 20 42 6f 73 74 6f 6e 2c 20 4d 41 20 330, Boston, MA
0330: 20 30 32 31 31 31 2d 31 33 30 37 20 20 55 53 41 02111-1307 USA
0340: 0a 20 2a 2f 0a 0a 0a 2f 2a 0a 20 2a 20 64 65 66 . */.../*. * def
0350: 69 6e 65 20 66 6f 72 20 73 74 72 69 6e 67 73 20 ine for strings
0360: 74 6f 20 63 68 65 63 6b 20 66 6f 72 20 77 69 74 to check for wit
0370: 68 20 72 65 67 65 78 0a 20 2a 20 73 68 6f 75 6c h regex. * shoul
0380: 64 20 61 6c 6c 6f 77 20 66 6f 72 20 69 6e 74 65 d allow for inte
0390: 72 6e 61 74 69 6f 6e 61 6c 69 7a 61 74 69 6f 6e rnationalization
03a0: 0a 20 2a 2f 0a 0a 23 64 65 66 69 6e 65 20 47 50 . */..#define GP
03b0: 47 5f 45 52 52 5f 43 41 4e 54 57 52 49 54 45 09 G_ERR_CANTWRITE.
03c0: 22 66 69 6c 65 20 63 72 65 61 74 65 20 65 72 72 "file create err
03d0: 6f 72 22 0a 23 64 65 66 69 6e 65 20 47 50 47 5f or".#define GPG_
03e0: 45 52 52 5f 43 41 4e 54 4f 50 45 4e 20 09 22 63 ERR_CANTOPEN ."c
03f0: 61 6e 27 74 20 6f 70 65 6e 22 0a 23 64 65 66 69 an't open".#defi
0400: 6e 65 20 47 50 47 5f 45 52 52 5f 42 41 44 50 41 ne GPG_ERR_BADPA
0410: 53 53 50 48 52 41 53 45 09 22 62 61 64 20 70 61 SSPHRASE."bad pa
0420: 73 73 70 68 72 61 73 65 22 0a 23 64 65 66 69 6e ssphrase".#defin
0430: 65 20 47 50 47 5f 45 52 52 5f 4e 4f 53 45 43 52 e GPG_ERR_NOSECR
0440: 45 54 4b 45 59 09 22 73 65 63 72 65 74 20 6b 65 ETKEY."secret ke
0450: 79 20 6e 6f 74 20 61 76 61 69 6c 61 62 6c 65 22 y not available"
0460: 0a 0a 2f 2a 20 65 6e 64 20 64 65 66 69 6e 65 73 ../* end defines
0470: 20 2a 2f 0a 0a 23 69 6e 63 6c 75 64 65 20 3c 73 */..#include <s
0480: 79 73 2f 73 74 61 74 2e 68 3e 0a 23 69 6e 63 6c ys/stat.h>.#incl
0490: 75 64 65 20 3c 70 77 6d 61 6e 2e 68 3e 0a 23 69 ude <pwman.h>.#i
04a0: 6e 63 6c 75 64 65 20 3c 75 69 2e 68 3e 0a 23 69 nclude <ui.h>.#i
04b0: 6e 63 6c 75 64 65 20 3c 6c 69 62 78 6d 6c 2f 74 nclude <libxml/t
04c0: 72 65 65 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 ree.h>.#include
04d0: 3c 6c 69 62 78 6d 6c 2f 70 61 72 73 65 72 2e 68 <libxml/parser.h
04e0: 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 75 6e 69 73 >.#include <unis
04f0: 74 64 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c td.h>.#include <
0500: 74 69 6d 65 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 time.h>.#include
0510: 20 3c 73 79 73 2f 74 79 70 65 73 2e 68 3e 0a 23 <sys/types.h>.#
0520: 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 77 61 69 include <sys/wai
0530: 74 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 72 t.h>.#include <r
0540: 65 67 65 78 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 egex.h>.#include
0550: 20 3c 73 74 64 6c 69 62 2e 68 3e 0a 23 69 6e 63 <stdlib.h>.#inc
0560: 6c 75 64 65 20 3c 66 63 6e 74 6c 2e 68 3e 0a 23 lude <fcntl.h>.#
0570: 69 6e 63 6c 75 64 65 20 3c 65 72 72 6e 6f 2e 68 include <errno.h
0580: 3e 0a 0a 23 64 65 66 69 6e 65 20 53 54 44 4f 55 >..#define STDOU
0590: 54 20 30 0a 23 64 65 66 69 6e 65 20 53 54 44 49 T 0.#define STDI
05a0: 4e 20 31 0a 23 64 65 66 69 6e 65 20 53 54 44 45 N 1.#define STDE
05b0: 52 52 20 32 0a 0a 69 6e 74 20 70 61 73 73 70 68 RR 2..int passph
05c0: 72 61 73 65 5f 67 6f 6f 64 20 3d 20 30 3b 0a 65 rase_good = 0;.e
05d0: 78 74 65 72 6e 20 69 6e 74 20 65 72 72 6e 6f 3b xtern int errno;
05e0: 0a 65 78 74 65 72 6e 20 69 6e 74 20 77 72 69 74 .extern int writ
05f0: 65 5f 6f 70 74 69 6f 6e 73 3b 0a 0a 69 6e 74 20 e_options;..int
0600: 67 6e 75 70 67 5f 68 69 74 5f 73 69 67 70 69 70 gnupg_hit_sigpip
0610: 65 20 3d 20 30 3b 0a 73 74 61 74 69 63 20 76 6f e = 0;.static vo
0620: 69 64 20 67 6e 75 70 67 5f 73 69 67 70 69 70 65 id gnupg_sigpipe
0630: 5f 68 61 6e 64 6c 65 72 28 29 0a 7b 0a 09 67 6e _handler().{..gn
0640: 75 70 67 5f 68 69 74 5f 73 69 67 70 69 70 65 20 upg_hit_sigpipe
0650: 3d 20 31 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 63 = 1;.}..static c
0660: 68 61 72 20 2a 0a 67 6e 75 70 67 5f 61 64 64 5f har *.gnupg_add_
0670: 74 6f 5f 62 75 66 28 63 68 61 72 20 2a 62 75 66 to_buf(char *buf
0680: 2c 20 63 68 61 72 20 2a 6e 65 77 29 0a 7b 0a 09 , char *new).{..
0690: 73 69 7a 65 5f 74 20 73 69 7a 65 3b 0a 0a 09 69 size_t size;...i
06a0: 66 28 6e 65 77 20 3d 3d 20 4e 55 4c 4c 29 7b 0a f(new == NULL){.
06b0: 09 09 72 65 74 75 72 6e 20 62 75 66 3b 0a 09 7d ..return buf;..}
06c0: 0a 09 69 66 28 62 75 66 20 3d 3d 20 4e 55 4c 4c ..if(buf == NULL
06d0: 29 7b 0a 09 09 62 75 66 20 3d 20 6d 61 6c 6c 6f ){...buf = mallo
06e0: 63 28 73 74 72 6c 65 6e 28 6e 65 77 29 2b 31 29 c(strlen(new)+1)
06f0: 3b 0a 09 09 73 74 72 6e 63 70 79 28 62 75 66 2c ;...strncpy(buf,
0700: 20 6e 65 77 2c 20 73 74 72 6c 65 6e 28 6e 65 77 new, strlen(new
0710: 29 2b 31 29 3b 0a 09 09 72 65 74 75 72 6e 20 62 )+1);...return b
0720: 75 66 3b 0a 09 7d 0a 09 0a 09 73 69 7a 65 20 3d uf;..}....size =
0730: 20 73 74 72 6c 65 6e 28 62 75 66 29 20 2b 20 73 strlen(buf) + s
0740: 74 72 6c 65 6e 28 6e 65 77 29 20 2b 20 31 3b 0a trlen(new) + 1;.
0750: 09 62 75 66 20 3d 20 28 63 68 61 72 2a 29 72 65 .buf = (char*)re
0760: 61 6c 6c 6f 63 28 62 75 66 2c 20 73 69 7a 65 29 alloc(buf, size)
0770: 3b 0a 09 73 74 72 6e 63 61 74 28 62 75 66 2c 20 ;..strncat(buf,
0780: 6e 65 77 2c 20 73 69 7a 65 29 3b 0a 09 0a 09 72 new, size);....r
0790: 65 74 75 72 6e 20 62 75 66 3b 0a 7d 0a 0a 73 74 eturn buf;.}..st
07a0: 61 74 69 63 20 69 6e 74 0a 67 6e 75 70 67 5f 73 atic int.gnupg_s
07b0: 74 72 5f 69 6e 5f 62 75 66 28 63 68 61 72 20 2a tr_in_buf(char *
07c0: 62 75 66 2c 20 63 68 61 72 20 2a 63 68 65 63 6b buf, char *check
07d0: 29 0a 7b 0a 09 72 65 67 65 78 5f 74 20 72 65 67 ).{..regex_t reg
07e0: 3b 0a 0a 09 64 65 62 75 67 28 22 73 74 72 5f 69 ;...debug("str_i
07f0: 6e 5f 62 75 66 3a 20 73 74 61 72 74 20 63 68 65 n_buf: start che
0800: 63 6b 69 6e 67 22 29 3b 0a 09 0a 09 69 66 28 20 cking");....if(
0810: 28 62 75 66 20 3d 3d 20 4e 55 4c 4c 29 20 7c 7c (buf == NULL) ||
0820: 20 28 63 68 65 63 6b 20 3d 3d 20 4e 55 4c 4c 29 (check == NULL)
0830: 20 29 7b 0a 09 09 72 65 74 75 72 6e 20 30 3b 0a ){...return 0;.
0840: 09 7d 0a 09 72 65 67 63 6f 6d 70 28 26 72 65 67 .}..regcomp(®
0850: 2c 20 63 68 65 63 6b 20 2c 30 29 3b 0a 09 69 66 , check ,0);..if
0860: 28 72 65 67 65 78 65 63 28 26 72 65 67 2c 20 62 (regexec(®, b
0870: 75 66 2c 20 30 2c 20 4e 55 4c 4c 20 2c 20 30 29 uf, 0, NULL , 0)
0880: 20 3d 3d 20 30 29 7b 0a 09 09 72 65 67 66 72 65 == 0){...regfre
0890: 65 28 26 72 65 67 29 3b 0a 09 09 72 65 74 75 72 e(®);...retur
08a0: 6e 20 31 3b 0a 09 7d 20 65 6c 73 65 20 7b 0a 09 n 1;..} else {..
08b0: 09 72 65 67 66 72 65 65 28 26 72 65 67 29 3b 0a .regfree(®);.
08c0: 09 09 72 65 74 75 72 6e 20 30 3b 0a 09 7d 0a 7d ..return 0;..}.}
08d0: 0a 0a 73 74 61 74 69 63 20 63 68 61 72 20 2a 0a ..static char *.
08e0: 67 6e 75 70 67 5f 65 78 70 61 6e 64 5f 66 69 6c gnupg_expand_fil
08f0: 65 6e 61 6d 65 28 63 68 61 72 20 2a 66 69 6c 65 ename(char *file
0900: 6e 61 6d 65 29 0a 7b 0a 09 63 68 61 72 20 2a 62 name).{..char *b
0910: 75 66 20 3d 20 6d 61 6c 6c 6f 63 28 53 54 52 49 uf = malloc(STRI
0920: 4e 47 5f 4c 4f 4e 47 29 3b 0a 09 0a 09 69 66 28 NG_LONG);....if(
0930: 28 66 69 6c 65 6e 61 6d 65 5b 30 5d 20 3d 3d 20 (filename[0] ==
0940: 27 7e 27 29 20 26 26 20 67 65 74 65 6e 76 28 22 '~') && getenv("
0950: 48 4f 4d 45 22 29 29 7b 0a 09 09 73 6e 70 72 69 HOME")){...snpri
0960: 6e 74 66 28 62 75 66 2c 20 53 54 52 49 4e 47 5f ntf(buf, STRING_
0970: 4c 4f 4e 47 2c 20 22 25 73 25 73 5c 30 22 2c 20 LONG, "%s%s\0",
0980: 67 65 74 65 6e 76 28 22 48 4f 4d 45 22 29 2c 20 getenv("HOME"),
0990: 66 69 6c 65 6e 61 6d 65 2b 31 29 3b 0a 09 09 73 filename+1);...s
09a0: 74 72 6e 63 70 79 28 66 69 6c 65 6e 61 6d 65 2c trncpy(filename,
09b0: 20 62 75 66 2c 20 53 54 52 49 4e 47 5f 4c 4f 4e buf, STRING_LON
09c0: 47 29 3b 0a 09 7d 0a 09 66 72 65 65 28 62 75 66 G);..}..free(buf
09d0: 29 3b 0a 0a 09 72 65 74 75 72 6e 20 66 69 6c 65 );...return file
09e0: 6e 61 6d 65 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 name;.}..static
09f0: 69 6e 74 20 0a 67 6e 75 70 67 5f 65 78 65 63 28 int .gnupg_exec(
0a00: 63 68 61 72 20 2a 70 61 74 68 2c 20 63 68 61 72 char *path, char
0a10: 20 2a 61 72 67 73 5b 5d 2c 20 46 49 4c 45 20 2a *args[], FILE *
0a20: 73 74 72 65 61 6d 5b 33 5d 29 0a 7b 0a 09 69 6e stream[3]).{..in
0a30: 74 20 73 74 64 69 6e 5f 66 64 5b 32 5d 3b 0a 09 t stdin_fd[2];..
0a40: 69 6e 74 20 73 74 64 6f 75 74 5f 66 64 5b 32 5d int stdout_fd[2]
0a50: 3b 0a 09 69 6e 74 20 73 74 64 65 72 72 5f 66 64 ;..int stderr_fd
0a60: 5b 32 5d 3b 0a 09 69 6e 74 20 70 69 64 2c 20 72 [2];..int pid, r
0a70: 65 74 3b 0a 0a 09 70 69 70 65 28 73 74 64 69 6e et;...pipe(stdin
0a80: 5f 66 64 29 3b 0a 09 70 69 70 65 28 73 74 64 6f _fd);..pipe(stdo
0a90: 75 74 5f 66 64 29 3b 0a 09 70 69 70 65 28 73 74 ut_fd);..pipe(st
0aa0: 64 65 72 72 5f 66 64 29 3b 0a 0a 09 70 69 64 20 derr_fd);...pid
0ab0: 3d 20 66 6f 72 6b 28 29 3b 0a 0a 09 69 66 28 20 = fork();...if(
0ac0: 28 70 61 74 68 20 3d 3d 20 4e 55 4c 4c 29 20 7c (path == NULL) |
0ad0: 7c 20 28 61 72 67 73 20 3d 3d 20 4e 55 4c 4c 29 | (args == NULL)
0ae0: 20 29 7b 0a 09 09 72 65 74 75 72 6e 20 2d 31 3b ){...return -1;
0af0: 0a 09 7d 0a 0a 09 2f 2f 20 44 6f 20 74 68 65 20 ..}...// Do the
0b00: 72 69 67 68 74 20 74 68 69 6e 67 20 77 69 74 68 right thing with
0b10: 20 74 68 65 20 66 6f 72 6b 0a 09 69 66 28 70 69 the fork..if(pi
0b20: 64 20 3d 3d 20 30 29 7b 0a 09 09 63 6c 6f 73 65 d == 0){...close
0b30: 28 73 74 64 6f 75 74 5f 66 64 5b 30 5d 29 3b 0a (stdout_fd[0]);.
0b40: 09 09 63 6c 6f 73 65 28 73 74 64 69 6e 5f 66 64 ..close(stdin_fd
0b50: 5b 31 5d 29 3b 0a 09 09 63 6c 6f 73 65 28 73 74 [1]);...close(st
0b60: 64 65 72 72 5f 66 64 5b 30 5d 29 3b 0a 0a 09 09 derr_fd[0]);....
0b70: 64 75 70 32 28 73 74 64 6f 75 74 5f 66 64 5b 31 dup2(stdout_fd[1
0b80: 5d 2c 20 66 69 6c 65 6e 6f 28 73 74 64 6f 75 74 ], fileno(stdout
0b90: 29 29 3b 0a 09 09 64 75 70 32 28 73 74 64 69 6e ));...dup2(stdin
0ba0: 5f 66 64 5b 30 5d 2c 20 66 69 6c 65 6e 6f 28 73 _fd[0], fileno(s
0bb0: 74 64 69 6e 29 29 3b 0a 09 09 64 75 70 32 28 73 tdin));...dup2(s
0bc0: 74 64 65 72 72 5f 66 64 5b 31 5d 2c 20 66 69 6c tderr_fd[1], fil
0bd0: 65 6e 6f 28 73 74 64 65 72 72 29 29 3b 0a 0a 09 eno(stderr));...
0be0: 09 72 65 74 20 3d 20 65 78 65 63 76 28 70 61 74 .ret = execv(pat
0bf0: 68 2c 20 61 72 67 73 29 3b 0a 09 09 69 66 28 72 h, args);...if(r
0c00: 65 74 29 20 7b 0a 09 09 09 70 77 5f 61 62 6f 72 et) {....pw_abor
0c10: 74 28 22 46 61 69 6c 65 64 20 74 6f 20 72 75 6e t("Failed to run
0c20: 20 25 73 2c 20 61 62 6f 72 74 65 64 20 77 69 74 %s, aborted wit
0c30: 68 20 65 72 72 6f 72 20 63 6f 64 65 20 25 64 22 h error code %d"
0c40: 2c 20 70 61 74 68 2c 20 65 72 72 6e 6f 29 3b 0a , path, errno);.
0c50: 09 09 7d 0a 09 7d 20 65 6c 73 65 20 7b 0a 09 09 ..}..} else {...
0c60: 63 6c 6f 73 65 28 73 74 64 6f 75 74 5f 66 64 5b close(stdout_fd[
0c70: 31 5d 29 3b 0a 09 09 63 6c 6f 73 65 28 73 74 64 1]);...close(std
0c80: 69 6e 5f 66 64 5b 30 5d 29 3b 0a 09 09 63 6c 6f in_fd[0]);...clo
0c90: 73 65 28 73 74 64 65 72 72 5f 66 64 5b 31 5d 29 se(stderr_fd[1])
0ca0: 3b 0a 0a 09 09 69 66 28 73 74 72 65 61 6d 20 21 ;....if(stream !
0cb0: 3d 20 4e 55 4c 4c 29 7b 0a 09 09 09 73 74 72 65 = NULL){....stre
0cc0: 61 6d 5b 53 54 44 4f 55 54 5d 20 3d 20 66 64 6f am[STDOUT] = fdo
0cd0: 70 65 6e 28 73 74 64 6f 75 74 5f 66 64 5b 30 5d pen(stdout_fd[0]
0ce0: 2c 20 22 72 22 29 3b 0a 09 09 09 73 74 72 65 61 , "r");....strea
0cf0: 6d 5b 53 54 44 49 4e 5d 20 3d 20 66 64 6f 70 65 m[STDIN] = fdope
0d00: 6e 28 73 74 64 69 6e 5f 66 64 5b 31 5d 2c 20 22 n(stdin_fd[1], "
0d10: 77 22 29 3b 0a 09 09 09 73 74 72 65 61 6d 5b 53 w");....stream[S
0d20: 54 44 45 52 52 5d 20 3d 20 66 64 6f 70 65 6e 28 TDERR] = fdopen(
0d30: 73 74 64 65 72 72 5f 66 64 5b 30 5d 2c 20 22 72 stderr_fd[0], "r
0d40: 22 29 3b 0a 09 09 7d 0a 09 09 0a 09 09 2f 2f 20 ");...}......//
0d50: 4d 61 72 6b 20 75 73 20 61 73 20 6e 6f 74 20 68 Mark us as not h
0d60: 61 76 69 6e 67 20 68 61 64 20 61 20 73 69 67 70 aving had a sigp
0d70: 69 70 65 20 79 65 74 0a 09 09 67 6e 75 70 67 5f ipe yet...gnupg_
0d80: 68 69 74 5f 73 69 67 70 69 70 65 20 3d 20 30 3b hit_sigpipe = 0;
0d90: 0a 09 09 73 69 67 6e 61 6c 28 53 49 47 50 49 50 ...signal(SIGPIP
0da0: 45 2c 20 67 6e 75 70 67 5f 73 69 67 70 69 70 65 E, gnupg_sigpipe
0db0: 5f 68 61 6e 64 6c 65 72 29 3b 0a 0a 09 09 72 65 _handler);....re
0dc0: 74 75 72 6e 20 70 69 64 3b 0a 09 7d 0a 7d 0a 0a turn pid;..}.}..
0dd0: 73 74 61 74 69 63 20 76 6f 69 64 0a 67 6e 75 70 static void.gnup
0de0: 67 5f 65 78 65 63 5f 65 6e 64 28 69 6e 74 20 70 g_exec_end(int p
0df0: 69 64 2c 20 46 49 4c 45 20 2a 73 74 72 65 61 6d id, FILE *stream
0e00: 5b 33 5d 29 0a 7b 0a 09 63 68 61 72 20 62 75 66 [3]).{..char buf
0e10: 5b 53 54 52 49 4e 47 5f 4c 4f 4e 47 5d 3b 0a 0a [STRING_LONG];..
0e20: 09 2f 2f 20 49 66 20 77 65 20 68 69 74 20 61 20 .// If we hit a
0e30: 70 72 6f 62 6c 65 6d 2c 20 72 65 70 6f 72 74 20 problem, report
0e40: 74 68 61 74 0a 09 69 66 28 67 6e 75 70 67 5f 68 that..if(gnupg_h
0e50: 69 74 5f 73 69 67 70 69 70 65 29 20 7b 0a 09 09 it_sigpipe) {...
0e60: 66 70 75 74 73 28 22 47 50 47 20 68 69 74 20 61 fputs("GPG hit a
0e70: 6e 20 65 72 72 6f 72 20 61 6e 64 20 64 69 65 64 n error and died
0e80: 2e 2e 2e 5c 6e 22 2c 20 73 74 64 65 72 72 29 3b ...\n", stderr);
0e90: 0a 09 09 77 68 69 6c 65 28 20 66 67 65 74 73 28 ...while( fgets(
0ea0: 62 75 66 2c 20 53 54 52 49 4e 47 5f 4c 4f 4e 47 buf, STRING_LONG
0eb0: 20 2d 20 31 2c 20 73 74 72 65 61 6d 5b 53 54 44 - 1, stream[STD
0ec0: 4f 55 54 5d 29 20 21 3d 20 4e 55 4c 4c 20 29 7b OUT]) != NULL ){
0ed0: 0a 09 09 09 66 70 75 74 73 28 62 75 66 2c 20 73 ....fputs(buf, s
0ee0: 74 64 65 72 72 29 3b 0a 09 09 7d 0a 09 09 77 68 tderr);...}...wh
0ef0: 69 6c 65 28 20 66 67 65 74 73 28 62 75 66 2c 20 ile( fgets(buf,
0f00: 53 54 52 49 4e 47 5f 4c 4f 4e 47 20 2d 20 31 2c STRING_LONG - 1,
0f10: 20 73 74 72 65 61 6d 5b 53 54 44 45 52 52 5d 29 stream[STDERR])
0f20: 20 21 3d 20 4e 55 4c 4c 20 29 7b 0a 09 09 09 66 != NULL ){....f
0f30: 70 75 74 73 28 62 75 66 2c 20 73 74 64 65 72 72 puts(buf, stderr
0f40: 29 3b 0a 09 09 7d 0a 09 09 2f 2f 20 54 4f 44 4f );...}...// TODO
0f50: 20 2d 20 66 69 67 75 72 65 20 6f 75 74 20 77 68 - figure out wh
0f60: 79 20 77 65 20 64 6f 6e 27 74 20 67 65 74 20 74 y we don't get t
0f70: 68 65 20 72 65 61 6c 20 65 72 72 6f 72 20 6d 65 he real error me
0f80: 73 73 61 67 65 20 66 72 6f 6d 0a 09 09 2f 2f 20 ssage from...//
0f90: 20 47 50 47 20 64 69 73 70 6c 61 79 65 64 20 68 GPG displayed h
0fa0: 65 72 65 20 6c 69 6b 65 20 6f 6e 65 20 6d 69 67 ere like one mig
0fb0: 68 74 20 65 78 70 65 63 74 0a 09 7d 0a 09 73 69 ht expect..}..si
0fc0: 67 6e 61 6c 28 53 49 47 50 49 50 45 2c 20 4e 55 gnal(SIGPIPE, NU
0fd0: 4c 4c 29 3b 0a 0a 09 2f 2f 20 43 6c 6f 73 65 20 LL);...// Close
0fe0: 75 70 0a 09 64 65 62 75 67 28 22 67 6e 75 70 67 up..debug("gnupg
0ff0: 5f 65 78 65 63 5f 65 6e 64 20 3a 20 63 6c 6f 73 _exec_end : clos
1000: 65 20 73 74 72 65 61 6d 73 22 29 3b 0a 09 69 66 e streams");..if
1010: 28 73 74 72 65 61 6d 5b 30 5d 29 7b 20 66 63 6c (stream[0]){ fcl
1020: 6f 73 65 28 73 74 72 65 61 6d 5b 30 5d 29 3b 20 ose(stream[0]);
1030: 7d 0a 09 69 66 28 73 74 72 65 61 6d 5b 31 5d 29 }..if(stream[1])
1040: 7b 20 66 63 6c 6f 73 65 28 73 74 72 65 61 6d 5b { fclose(stream[
1050: 31 5d 29 3b 20 7d 0a 09 69 66 28 73 74 72 65 61 1]); }..if(strea
1060: 6d 5b 32 5d 29 7b 20 66 63 6c 6f 73 65 28 73 74 m[2]){ fclose(st
1070: 72 65 61 6d 5b 32 5d 29 3b 20 7d 0a 0a 09 64 65 ream[2]); }...de
1080: 62 75 67 28 22 77 61 69 74 69 6e 67 20 66 6f 72 bug("waiting for
1090: 20 70 69 64 20 25 64 22 2c 20 70 69 64 29 3b 0a pid %d", pid);.
10a0: 09 77 61 69 74 70 69 64 28 70 69 64 2c 20 4e 55 .waitpid(pid, NU
10b0: 4c 4c 2c 20 30 29 3b 0a 0a 09 2f 2f 20 42 61 69 LL, 0);...// Bai
10c0: 6c 20 6f 75 74 20 69 66 20 67 70 67 20 62 72 6f l out if gpg bro
10d0: 6b 65 0a 09 69 66 28 67 6e 75 70 67 5f 68 69 74 ke..if(gnupg_hit
10e0: 5f 73 69 67 70 69 70 65 29 20 7b 0a 09 09 65 78 _sigpipe) {...ex
10f0: 69 74 28 2d 31 29 3b 0a 09 7d 0a 7d 0a 0a 73 74 it(-1);..}.}..st
1100: 61 74 69 63 20 63 68 61 72 2a 0a 67 6e 75 70 67 atic char*.gnupg
1110: 5f 66 69 6e 64 5f 72 65 63 70 28 63 68 61 72 20 _find_recp(char
1120: 2a 73 74 72 29 0a 7b 0a 09 63 68 61 72 20 2a 75 *str).{..char *u
1130: 73 65 72 3b 0a 09 63 68 61 72 20 2a 73 74 61 72 ser;..char *star
1140: 74 3b 0a 09 63 68 61 72 20 2a 65 6e 64 3b 0a 09 t;..char *end;..
1150: 69 6e 74 20 73 69 7a 65 3b 0a 09 64 65 62 75 67 int size;..debug
1160: 28 73 74 72 29 3b 0a 0a 09 2f 2f 20 49 73 20 69 (str);...// Is i
1170: 74 20 22 3c 69 64 3e 22 20 3f 0a 09 73 74 61 72 t "<id>" ?..star
1180: 74 20 3d 20 73 74 72 73 74 72 28 73 74 72 2c 22 t = strstr(str,"
1190: 5c 22 22 29 3b 0a 09 69 66 28 73 74 61 72 74 20 \"");..if(start
11a0: 21 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 73 74 61 != NULL) {...sta
11b0: 72 74 20 2b 3d 20 31 3b 0a 09 09 65 6e 64 20 3d rt += 1;...end =
11c0: 20 73 74 72 73 74 72 28 73 74 61 72 74 2c 22 5c strstr(start,"\
11d0: 22 22 29 3b 0a 09 7d 20 65 6c 73 65 20 7b 0a 09 "");..} else {..
11e0: 09 2f 2f 20 49 73 20 69 74 20 49 44 20 3c 69 64 .// Is it ID <id
11f0: 3e 5c 6e 3f 0a 09 09 73 74 61 72 74 20 3d 20 73 >\n?...start = s
1200: 74 72 73 74 72 28 73 74 72 2c 22 49 44 22 29 3b trstr(str,"ID");
1210: 0a 09 09 69 66 28 73 74 61 72 74 20 21 3d 20 4e ...if(start != N
1220: 55 4c 4c 29 20 7b 0a 09 09 09 73 74 61 72 74 20 ULL) {....start
1230: 2b 3d 20 33 3b 0a 09 09 09 65 6e 64 20 3d 20 73 += 3;....end = s
1240: 74 72 73 74 72 28 73 74 61 72 74 2c 22 5c 6e 22 trstr(start,"\n"
1250: 29 3b 0a 09 09 7d 20 65 6c 73 65 20 7b 0a 09 09 );...} else {...
1260: 09 2f 2f 20 4e 6f 20 69 64 65 61 0a 09 09 09 75 .// No idea....u
1270: 73 65 72 20 3d 20 22 28 6e 6f 74 20 73 75 72 65 ser = "(not sure
1280: 29 22 3b 0a 09 09 09 72 65 74 75 72 6e 20 75 73 )";....return us
1290: 65 72 3b 0a 09 09 7d 0a 09 7d 0a 0a 09 73 69 7a er;...}..}...siz
12a0: 65 20 3d 20 65 6e 64 20 2d 20 73 74 61 72 74 3b e = end - start;
12b0: 0a 09 75 73 65 72 20 3d 20 6d 61 6c 6c 6f 63 28 ..user = malloc(
12c0: 73 69 7a 65 2b 31 29 3b 0a 09 73 74 72 6e 63 70 size+1);..strncp
12d0: 79 28 75 73 65 72 2c 20 73 74 61 72 74 2c 20 73 y(user, start, s
12e0: 69 7a 65 29 3b 0a 09 64 65 62 75 67 28 22 52 65 ize);..debug("Re
12f0: 63 69 70 69 65 6e 74 20 69 73 20 25 73 22 2c 20 cipient is %s",
1300: 75 73 65 72 29 3b 0a 09 72 65 74 75 72 6e 20 75 user);..return u
1310: 73 65 72 3b 0a 7d 0a 0a 2f 2f 20 52 65 74 75 72 ser;.}..// Retur
1320: 6e 73 20 30 20 69 66 20 66 6f 75 6e 64 2c 20 2d ns 0 if found, -
1330: 31 20 69 66 20 6e 6f 74 20 66 6f 75 6e 64 2c 20 1 if not found,
1340: 61 6e 64 20 2d 32 20 69 66 20 66 6f 75 6e 64 20 and -2 if found
1350: 62 75 74 20 65 78 70 69 72 65 64 0a 69 6e 74 0a but expired.int.
1360: 67 6e 75 70 67 5f 63 68 65 63 6b 5f 69 64 28 63 gnupg_check_id(c
1370: 68 61 72 20 2a 69 64 29 0a 7b 09 0a 09 72 65 67 har *id).{...reg
1380: 65 78 5f 74 20 72 65 67 3b 0a 09 72 65 67 65 78 ex_t reg;..regex
1390: 5f 74 20 65 78 70 69 72 65 64 5f 72 65 67 3b 0a _t expired_reg;.
13a0: 09 69 6e 74 20 70 69 64 3b 0a 09 63 68 61 72 20 .int pid;..char
13b0: 74 65 78 74 5b 53 54 52 49 4e 47 5f 4c 4f 4e 47 text[STRING_LONG
13c0: 5d 2c 20 69 64 73 74 72 5b 53 54 52 49 4e 47 5f ], idstr[STRING_
13d0: 4c 4f 4e 47 5d 2c 20 6b 65 79 69 64 5b 53 54 52 LONG], keyid[STR
13e0: 49 4e 47 5f 4c 4f 4e 47 5d 3b 0a 20 20 20 63 68 ING_LONG];. ch
13f0: 61 72 20 65 78 70 5b 53 54 52 49 4e 47 5f 4c 4f ar exp[STRING_LO
1400: 4e 47 5d 2c 20 2a 61 72 67 73 5b 34 5d 3b 0a 09 NG], *args[4];..
1410: 46 49 4c 45 20 2a 73 74 72 65 61 6d 73 5b 33 5d FILE *streams[3]
1420: 3b 0a 09 69 6e 74 20 69 64 5f 69 73 5f 6b 65 79 ;..int id_is_key
1430: 5f 69 64 20 3d 20 30 3b 0a 09 69 6e 74 20 6b 65 _id = 0;..int ke
1440: 79 5f 66 6f 75 6e 64 20 3d 20 30 3b 0a 09 69 6e y_found = 0;..in
1450: 74 20 6b 65 79 5f 69 73 5f 65 78 70 69 72 65 64 t key_is_expired
1460: 20 3d 20 2d 31 3b 0a 09 0a 09 64 65 62 75 67 28 = -1;....debug(
1470: 22 63 68 65 63 6b 5f 67 6e 75 70 67 5f 69 64 3a "check_gnupg_id:
1480: 20 63 68 65 63 6b 20 67 6e 75 70 67 20 69 64 5c check gnupg id\
1490: 6e 22 29 3b 0a 0a 09 2f 2f 20 43 68 65 63 6b 20 n");...// Check
14a0: 77 65 27 72 65 20 67 69 76 65 6e 20 6e 69 63 65 we're given nice
14b0: 20 69 6e 70 75 74 0a 09 69 66 28 20 73 74 72 63 input..if( strc
14c0: 68 72 28 69 64 2c 20 27 25 27 29 20 29 7b 20 0a hr(id, '%') ){ .
14d0: 09 09 2f 2a 20 68 6d 6d 2c 20 63 6f 75 6c 64 20 ../* hmm, could
14e0: 62 65 20 66 6f 72 6d 61 74 20 73 74 72 69 6e 67 be format string
14f0: 20 62 75 67 20 73 6f 20 74 65 6c 6c 20 67 65 74 bug so tell get
1500: 20 6c 6f 73 74 20 2a 2f 0a 09 09 72 65 74 75 72 lost */...retur
1510: 6e 20 2d 31 3b 0a 09 7d 0a 0a 09 2f 2f 20 42 75 n -1;..}...// Bu
1520: 69 6c 64 20 6f 75 72 20 65 78 70 69 72 65 64 20 ild our expired
1530: 6b 65 79 20 6d 61 74 63 68 69 6e 67 20 72 65 67 key matching reg
1540: 65 78 70 0a 09 73 6e 70 72 69 6e 74 66 28 65 78 exp..snprintf(ex
1550: 70 2c 20 53 54 52 49 4e 47 5f 4c 4f 4e 47 2c 20 p, STRING_LONG,
1560: 22 5e 28 70 75 62 7c 73 75 62 29 3a 65 3a 22 29 "^(pub|sub):e:")
1570: 3b 0a 09 72 65 67 63 6f 6d 70 28 26 65 78 70 69 ;..regcomp(&expi
1580: 72 65 64 5f 72 65 67 2c 20 65 78 70 2c 20 52 45 red_reg, exp, RE
1590: 47 5f 45 58 54 45 4e 44 45 44 29 3b 0a 0a 09 2f G_EXTENDED);.../
15a0: 2f 20 49 73 20 74 68 65 20 73 75 70 70 6c 69 65 / Is the supplie
15b0: 64 20 49 44 20 72 65 61 6c 6c 79 20 61 20 6b 65 d ID really a ke
15c0: 79 20 49 44 3f 0a 09 2f 2f 20 28 49 66 20 69 74 y ID?..// (If it
15d0: 20 69 73 2c 20 69 74 27 73 20 38 20 63 68 61 72 is, it's 8 char
15e0: 73 20 6c 6f 6e 67 2c 20 61 6e 64 20 30 2d 39 41 s long, and 0-9A
15f0: 2d 46 29 0a 09 73 6e 70 72 69 6e 74 66 28 6b 65 -F)..snprintf(ke
1600: 79 69 64 2c 20 53 54 52 49 4e 47 5f 4c 4f 4e 47 yid, STRING_LONG
1610: 2c 20 22 5e 5b 30 2d 39 41 2d 5a 5d 7b 38 7d 24 , "^[0-9A-Z]{8}$
1620: 22 29 3b 0a 09 72 65 67 63 6f 6d 70 28 26 72 65 ");..regcomp(&re
1630: 67 2c 20 6b 65 79 69 64 2c 52 45 47 5f 45 58 54 g, keyid,REG_EXT
1640: 45 4e 44 45 44 29 3b 0a 09 69 66 28 72 65 67 65 ENDED);..if(rege
1650: 78 65 63 28 26 72 65 67 2c 20 69 64 2c 20 30 2c xec(®, id, 0,
1660: 20 4e 55 4c 4c 20 2c 20 30 29 20 3d 3d 20 30 29 NULL , 0) == 0)
1670: 20 7b 0a 09 09 2f 2f 20 54 68 65 20 73 75 70 70 {...// The supp
1680: 6c 69 65 64 20 49 44 20 69 73 20 61 20 6b 65 79 lied ID is a key
1690: 20 49 44 0a 09 09 69 64 5f 69 73 5f 6b 65 79 5f ID...id_is_key_
16a0: 69 64 20 3d 20 31 3b 0a 09 09 64 65 62 75 67 28 id = 1;...debug(
16b0: 22 63 68 65 63 6b 5f 67 6e 75 70 67 5f 69 64 3a "check_gnupg_id:
16c0: 20 73 75 70 70 6c 69 65 64 20 49 44 20 77 61 73 supplied ID was
16d0: 20 61 20 67 6e 75 70 67 20 6b 65 79 20 69 64 5c a gnupg key id\
16e0: 6e 22 29 3b 0a 09 7d 20 65 6c 73 65 20 7b 0a 09 n");..} else {..
16f0: 09 64 65 62 75 67 28 22 63 68 65 63 6b 5f 67 6e .debug("check_gn
1700: 75 70 67 5f 69 64 3a 20 73 75 70 70 6c 69 65 64 upg_id: supplied
1710: 20 49 44 20 74 61 6b 65 6e 20 74 6f 20 62 65 20 ID taken to be
1720: 61 6e 20 65 6d 61 69 6c 20 61 64 64 72 65 73 73 an email address
1730: 5c 6e 22 29 3b 0a 09 7d 0a 0a 09 69 66 28 69 64 \n");..}...if(id
1740: 5f 69 73 5f 6b 65 79 5f 69 64 20 3d 3d 20 31 29 _is_key_id == 1)
1750: 20 7b 0a 09 09 2f 2f 20 4d 61 74 63 68 20 6f 6e {...// Match on
1760: 20 22 70 75 62 3a 2e 3a 53 49 5a 45 3a 74 79 70 "pub:.:SIZE:typ
1770: 65 3a 46 55 4c 4c 49 44 3a 44 41 54 45 22 0a 09 e:FULLID:DATE"..
1780: 09 2f 2f 20 57 68 65 72 65 20 46 55 4c 4c 49 44 .// Where FULLID
1790: 20 69 73 20 38 20 63 68 61 72 73 20 74 68 65 6e is 8 chars then
17a0: 20 74 68 65 20 38 20 63 68 61 72 73 20 77 65 20 the 8 chars we
17b0: 65 78 70 65 63 74 65 64 0a 09 09 73 6e 70 72 69 expected...snpri
17c0: 6e 74 66 28 69 64 73 74 72 2c 20 53 54 52 49 4e ntf(idstr, STRIN
17d0: 47 5f 4c 4f 4e 47 2c 20 22 5e 70 75 62 3a 2e 3a G_LONG, "^pub:.:
17e0: 5b 30 2d 39 5d 2b 3a 5b 30 2d 39 5d 2b 3a 5b 30 [0-9]+:[0-9]+:[0
17f0: 2d 39 61 2d 7a 41 2d 5a 5d 7b 38 7d 25 73 3a 22 -9a-zA-Z]{8}%s:"
1800: 2c 20 69 64 29 3b 0a 09 7d 20 65 6c 73 65 20 7b , id);..} else {
1810: 0a 09 09 2f 2f 20 4d 61 74 63 68 20 6f 6e 20 22 ...// Match on "
1820: 28 70 75 62 7c 75 69 64 29 20 2e 2e 2e 2e 20 4e (pub|uid) .... N
1830: 41 4d 45 20 3c 45 4d 41 49 4c 20 41 44 44 52 45 AME <EMAIL ADDRE
1840: 53 53 3e 22 0a 09 09 73 6e 70 72 69 6e 74 66 28 SS>"...snprintf(
1850: 69 64 73 74 72 2c 20 53 54 52 49 4e 47 5f 4c 4f idstr, STRING_LO
1860: 4e 47 2c 20 22 5b 5e 3c 5d 2a 3c 25 73 3e 22 2c NG, "[^<]*<%s>",
1870: 20 69 64 29 3b 0a 09 7d 0a 0a 09 2f 2f 20 46 69 id);..}...// Fi
1880: 72 65 20 6f 66 66 20 47 50 47 20 74 6f 20 66 69 re off GPG to fi
1890: 6e 64 20 61 6c 6c 20 6f 75 72 20 6b 65 79 73 0a nd all our keys.
18a0: 09 61 72 67 73 5b 30 5d 20 3d 20 22 67 70 67 22 .args[0] = "gpg"
18b0: 3b 0a 09 61 72 67 73 5b 31 5d 20 3d 20 22 2d 2d ;..args[1] = "--
18c0: 77 69 74 68 2d 63 6f 6c 6f 6e 73 22 3b 0a 09 61 with-colons";..a
18d0: 72 67 73 5b 32 5d 20 3d 20 22 2d 2d 6c 69 73 74 rgs[2] = "--list
18e0: 2d 6b 65 79 73 22 3b 0a 09 61 72 67 73 5b 33 5d -keys";..args[3]
18f0: 20 3d 20 4e 55 4c 4c 3b 0a 0a 09 70 69 64 20 3d = NULL;...pid =
1900: 20 67 6e 75 70 67 5f 65 78 65 63 28 6f 70 74 69 gnupg_exec(opti
1910: 6f 6e 73 2d 3e 67 70 67 5f 70 61 74 68 2c 20 61 ons->gpg_path, a
1920: 72 67 73 2c 20 73 74 72 65 61 6d 73 29 3b 0a 0a rgs, streams);..
1930: 09 77 68 69 6c 65 28 20 66 67 65 74 73 28 74 65 .while( fgets(te
1940: 78 74 2c 20 53 54 52 49 4e 47 5f 4c 4f 4e 47 2c xt, STRING_LONG,
1950: 20 73 74 72 65 61 6d 73 5b 53 54 44 4f 55 54 5d streams[STDOUT]
1960: 29 20 29 7b 0a 09 09 72 65 67 63 6f 6d 70 28 26 ) ){...regcomp(&
1970: 72 65 67 2c 20 69 64 73 74 72 2c 20 52 45 47 5f reg, idstr, REG_
1980: 45 58 54 45 4e 44 45 44 29 3b 0a 09 09 69 66 28 EXTENDED);...if(
1990: 72 65 67 65 78 65 63 28 26 72 65 67 2c 20 74 65 regexec(®, te
19a0: 78 74 2c 20 30 2c 20 4e 55 4c 4c 20 2c 20 30 29 xt, 0, NULL , 0)
19b0: 20 3d 3d 20 30 29 7b 0a 09 09 09 2f 2f 20 46 6f == 0){....// Fo
19c0: 75 6e 64 20 74 68 65 20 6b 65 79 21 0a 20 20 20 und the key!.
19d0: 20 20 20 20 20 20 6b 65 79 5f 66 6f 75 6e 64 20 key_found
19e0: 3d 20 31 3b 0a 0a 09 09 09 2f 2f 20 43 68 65 63 = 1;.....// Chec
19f0: 6b 20 69 74 20 69 73 6e 27 74 20 61 6c 73 6f 20 k it isn't also
1a00: 65 78 70 69 72 65 64 0a 09 09 09 69 66 28 72 65 expired....if(re
1a10: 67 65 78 65 63 28 26 65 78 70 69 72 65 64 5f 72 gexec(&expired_r
1a20: 65 67 2c 20 74 65 78 74 2c 20 30 2c 20 4e 55 4c eg, text, 0, NUL
1a30: 4c 20 2c 20 30 29 20 3d 3d 20 30 29 20 7b 0a 20 L , 0) == 0) {.
1a40: 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 4f 6e // On
1a50: 6c 79 20 6d 61 72 6b 20 61 73 20 65 78 70 69 72 ly mark as expir
1a60: 65 64 20 69 66 20 77 65 20 68 61 76 65 6e 27 74 ed if we haven't
1a70: 20 66 6f 75 6e 64 20 61 6e 6f 74 68 65 72 0a 20 found another.
1a80: 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 20 76 // v
1a90: 65 72 73 69 6f 6e 20 74 68 61 74 20 69 73 6e 27 ersion that isn'
1aa0: 74 20 65 78 70 69 72 65 64 0a 20 20 20 20 20 20 t expired.
1ab0: 20 20 20 20 20 20 69 66 28 6b 65 79 5f 69 73 5f if(key_is_
1ac0: 65 78 70 69 72 65 64 20 3d 3d 20 2d 31 29 20 7b expired == -1) {
1ad0: 0a 20 20 20 09 09 09 09 6b 65 79 5f 69 73 5f 65 . ....key_is_e
1ae0: 78 70 69 72 65 64 20 3d 20 31 3b 0a 20 20 20 20 xpired = 1;.
1af0: 20 20 20 20 20 20 20 20 7d 0a 09 09 09 7d 20 65 }....} e
1b00: 6c 73 65 20 7b 0a 09 09 09 09 6b 65 79 5f 69 73 lse {.....key_is
1b10: 5f 65 78 70 69 72 65 64 20 3d 20 30 3b 0a 20 20 _expired = 0;.
1b20: 20 20 20 20 20 20 20 7d 0a 09 09 7d 0a 09 7d 0a }...}..}.
1b30: 09 0a 20 20 20 2f 2f 20 54 69 64 79 20 75 70 0a .. // Tidy up.
1b40: 09 67 6e 75 70 67 5f 65 78 65 63 5f 65 6e 64 28 .gnupg_exec_end(
1b50: 70 69 64 2c 20 73 74 72 65 61 6d 73 29 3b 0a 0a pid, streams);..
1b60: 20 20 20 2f 2f 20 49 66 20 77 65 20 66 6f 75 6e // If we foun
1b70: 64 20 69 74 2c 20 72 65 74 75 72 6e 20 66 6f 75 d it, return fou
1b80: 6e 64 20 2f 20 66 6f 75 6e 64 2b 65 78 70 69 72 nd / found+expir
1b90: 65 64 0a 20 20 20 69 66 28 6b 65 79 5f 66 6f 75 ed. if(key_fou
1ba0: 6e 64 29 20 7b 0a 09 09 69 66 28 6b 65 79 5f 69 nd) {...if(key_i
1bb0: 73 5f 65 78 70 69 72 65 64 29 20 7b 0a 09 09 09 s_expired) {....
1bc0: 72 65 74 75 72 6e 20 2d 32 3b 20 0a 09 09 7d 0a return -2; ...}.
1bd0: 09 09 72 65 74 75 72 6e 20 30 3b 20 0a 20 20 20 ..return 0; .
1be0: 7d 0a 0a 20 20 20 2f 2f 20 44 69 64 6e 27 74 20 }.. // Didn't
1bf0: 66 69 6e 64 20 69 74 0a 09 72 65 74 75 72 6e 20 find it..return
1c00: 2d 31 3b 0a 7d 0a 0a 2f 2a 2a 0a 20 2a 20 47 65 -1;.}../**. * Ge
1c10: 74 20 61 20 73 69 6e 67 6c 65 20 47 6e 75 50 47 t a single GnuPG
1c20: 20 52 65 63 69 70 69 65 6e 74 20 49 44 0a 20 2a Recipient ID. *
1c30: 2f 0a 76 6f 69 64 0a 67 6e 75 70 67 5f 67 65 74 /.void.gnupg_get
1c40: 5f 69 64 28 63 68 61 72 20 2a 69 64 29 0a 7b 0a _id(char *id).{.
1c50: 09 77 68 69 6c 65 28 31 29 7b 0a 09 09 69 64 20 .while(1){...id
1c60: 3d 20 75 69 5f 73 74 61 74 75 73 6c 69 6e 65 5f = ui_statusline_
1c70: 61 73 6b 5f 73 74 72 28 22 47 6e 75 50 47 20 52 ask_str("GnuPG R
1c80: 65 63 69 70 69 65 6e 74 20 49 44 3a 22 2c 20 69 ecipient ID:", i
1c90: 64 2c 20 53 54 52 49 4e 47 5f 4c 4f 4e 47 29 3b d, STRING_LONG);
1ca0: 0a 09 09 69 66 28 69 64 5b 30 5d 20 3d 3d 20 30 ...if(id[0] == 0
1cb0: 29 7b 0a 09 09 09 72 65 74 75 72 6e 3b 0a 09 09 ){....return;...
1cc0: 7d 0a 09 09 69 66 28 67 6e 75 70 67 5f 63 68 65 }...if(gnupg_che
1cd0: 63 6b 5f 69 64 28 69 64 29 20 3d 3d 20 30 29 7b ck_id(id) == 0){
1ce0: 0a 09 09 09 72 65 74 75 72 6e 3b 0a 09 09 7d 0a ....return;...}.
1cf0: 09 09 64 65 62 75 67 28 22 67 65 74 5f 67 6e 75 ..debug("get_gnu
1d00: 70 67 5f 69 64 3a 20 69 66 20 68 65 72 65 20 69 pg_id: if here i
1d10: 73 20 72 65 61 63 68 65 64 20 69 64 20 69 73 20 s reached id is
1d20: 62 61 64 22 29 3b 0a 09 09 75 69 5f 73 74 61 74 bad");...ui_stat
1d30: 75 73 6c 69 6e 65 5f 6d 73 67 28 22 42 61 64 20 usline_msg("Bad
1d40: 52 65 63 69 70 69 65 6e 74 2c 20 54 72 79 20 61 Recipient, Try a
1d50: 67 61 69 6e 22 29 3b 20 67 65 74 63 68 28 29 3b gain"); getch();
1d60: 0a 09 7d 0a 7d 0a 0a 2f 2a 2a 0a 20 2a 20 47 65 ..}.}../**. * Ge
1d70: 74 20 6d 75 6c 74 69 70 6c 65 20 47 6e 75 50 47 t multiple GnuPG
1d80: 20 52 65 63 69 70 69 65 6e 74 20 49 44 73 0a 20 Recipient IDs.
1d90: 2a 2f 0a 76 6f 69 64 0a 67 6e 75 70 67 5f 67 65 */.void.gnupg_ge
1da0: 74 5f 69 64 73 28 63 68 61 72 20 2a 2a 69 64 73 t_ids(char **ids
1db0: 2c 20 69 6e 74 20 6d 61 78 5f 69 64 5f 6e 75 6d , int max_id_num
1dc0: 29 0a 7b 0a 09 49 6e 70 75 74 46 69 65 6c 64 20 ).{..InputField
1dd0: 66 69 65 6c 64 73 5b 6d 61 78 5f 69 64 5f 6e 75 fields[max_id_nu
1de0: 6d 5d 3b 0a 09 63 68 61 72 20 6e 61 6d 65 73 5b m];..char names[
1df0: 6d 61 78 5f 69 64 5f 6e 75 6d 5d 5b 53 54 52 49 max_id_num][STRI
1e00: 4e 47 5f 4c 4f 4e 47 5d 3b 0a 09 69 6e 74 20 69 NG_LONG];..int i
1e10: 3b 0a 0a 09 66 6f 72 28 69 3d 30 3b 20 69 3c 6d ;...for(i=0; i<m
1e20: 61 78 5f 69 64 5f 6e 75 6d 3b 20 69 2b 2b 29 20 ax_id_num; i++)
1e30: 7b 0a 09 09 66 69 65 6c 64 73 5b 69 5d 2e 6e 61 {...fields[i].na
1e40: 6d 65 20 3d 20 6e 61 6d 65 73 5b 69 5d 3b 20 2f me = names[i]; /
1e50: 2f 20 4e 65 65 64 73 20 61 20 6c 6f 63 61 6c 20 / Needs a local
1e60: 73 74 72 69 6e 67 20 74 6f 20 77 72 69 74 65 20 string to write
1e70: 69 6e 74 6f 0a 09 09 73 6e 70 72 69 6e 74 66 28 into...snprintf(
1e80: 66 69 65 6c 64 73 5b 69 5d 2e 6e 61 6d 65 2c 20 fields[i].name,
1e90: 53 54 52 49 4e 47 5f 4c 4f 4e 47 2c 20 22 52 65 STRING_LONG, "Re
1ea0: 63 69 70 69 65 6e 74 20 25 64 3a 20 22 2c 20 28 cipient %d: ", (
1eb0: 69 2b 31 29 29 3b 0a 09 09 66 69 65 6c 64 73 5b i+1));...fields[
1ec0: 69 5d 2e 76 61 6c 75 65 20 3d 20 69 64 73 5b 69 i].value = ids[i
1ed0: 5d 3b 20 2f 2f 20 53 74 72 69 6e 67 20 74 6f 20 ]; // String to
1ee0: 77 72 69 74 65 20 69 6e 74 6f 20 63 6f 6d 65 73 write into comes
1ef0: 20 66 72 6f 6d 20 63 61 6c 6c 65 72 0a 09 09 66 from caller...f
1f00: 69 65 6c 64 73 5b 69 5d 2e 6d 61 78 5f 6c 65 6e ields[i].max_len
1f10: 67 74 68 20 3d 20 53 54 52 49 4e 47 5f 4c 4f 4e gth = STRING_LON
1f20: 47 3b 0a 09 09 66 69 65 6c 64 73 5b 69 5d 2e 74 G;...fields[i].t
1f30: 79 70 65 20 3d 20 53 54 52 49 4e 47 3b 0a 09 7d ype = STRING;..}
1f40: 0a 0a 09 2f 2f 20 50 72 6f 6d 70 74 20 74 6f 20 ...// Prompt to
1f50: 65 64 69 74 20 74 68 65 20 72 65 63 69 70 69 65 edit the recipie
1f60: 6e 74 73 0a 09 2f 2f 20 54 68 69 73 20 77 69 6c nts..// This wil
1f70: 6c 20 76 65 72 69 66 79 20 74 68 65 20 49 44 73 l verify the IDs
1f80: 20 66 6f 72 20 75 73 0a 09 61 63 74 69 6f 6e 5f for us..action_
1f90: 69 6e 70 75 74 5f 67 70 67 69 64 5f 64 69 61 6c input_gpgid_dial
1fa0: 6f 67 28 66 69 65 6c 64 73 2c 20 6d 61 78 5f 69 og(fields, max_i
1fb0: 64 5f 6e 75 6d 2c 20 22 45 64 69 74 20 52 65 63 d_num, "Edit Rec
1fc0: 69 70 69 65 6e 74 73 22 29 3b 0a 7d 0a 0a 63 68 ipients");.}..ch
1fd0: 61 72 20 2a 0a 67 6e 75 70 67 5f 67 65 74 5f 66 ar *.gnupg_get_f
1fe0: 69 6c 65 6e 61 6d 65 28 63 68 61 72 20 2a 66 69 ilename(char *fi
1ff0: 6c 65 6e 61 6d 65 2c 20 63 68 61 72 20 72 77 29 lename, char rw)
2000: 0a 7b 0a 09 69 66 28 72 77 20 3d 3d 20 27 72 27 .{..if(rw == 'r'
2010: 29 7b 0a 09 09 66 69 6c 65 6e 61 6d 65 20 3d 20 ){...filename =
2020: 75 69 5f 73 74 61 74 75 73 6c 69 6e 65 5f 61 73 ui_statusline_as
2030: 6b 5f 73 74 72 28 22 46 69 6c 65 20 74 6f 20 72 k_str("File to r
2040: 65 61 64 20 66 72 6f 6d 3a 22 2c 20 66 69 6c 65 ead from:", file
2050: 6e 61 6d 65 2c 20 53 54 52 49 4e 47 5f 4c 4f 4e name, STRING_LON
2060: 47 29 3b 0a 09 7d 20 65 6c 73 65 20 69 66 28 72 G);..} else if(r
2070: 77 20 3d 3d 20 27 77 27 29 7b 0a 09 09 66 69 6c w == 'w'){...fil
2080: 65 6e 61 6d 65 20 3d 20 75 69 5f 73 74 61 74 75 ename = ui_statu
2090: 73 6c 69 6e 65 5f 61 73 6b 5f 73 74 72 28 22 46 sline_ask_str("F
20a0: 69 6c 65 20 74 6f 20 77 72 69 74 65 20 74 6f 3a ile to write to:
20b0: 22 2c 20 66 69 6c 65 6e 61 6d 65 2c 20 53 54 52 ", filename, STR
20c0: 49 4e 47 5f 4c 4f 4e 47 29 3b 0a 09 7d 20 65 6c ING_LONG);..} el
20d0: 73 65 20 7b 0a 09 09 70 77 5f 61 62 6f 72 74 28 se {...pw_abort(
20e0: 22 46 69 6c 65 20 72 65 71 75 65 73 74 20 6d 75 "File request mu
20f0: 73 74 20 62 65 20 66 6f 72 20 72 65 61 64 20 6f st be for read o
2100: 72 20 77 72 69 74 65 2c 20 67 6f 74 20 27 25 73 r write, got '%s
2110: 27 22 2c 20 72 77 29 3b 0a 09 7d 0a 7d 0a 0a 73 '", rw);..}.}..s
2120: 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 tatic const char
2130: 20 2a 0a 67 6e 75 70 67 5f 67 65 74 5f 70 61 73 *.gnupg_get_pas
2140: 73 70 68 72 61 73 65 28 29 0a 7b 0a 09 73 74 61 sphrase().{..sta
2150: 74 69 63 20 63 68 61 72 20 2a 70 61 73 73 70 68 tic char *passph
2160: 72 61 73 65 20 3d 20 4e 55 4c 4c 3b 0a 0a 2f 2a rase = NULL;../*
2170: 09 70 61 73 73 70 68 72 61 73 65 20 3d 3d 20 6d .passphrase == m
2180: 61 6c 6c 6f 63 28 56 5f 4c 4f 4e 47 5f 53 54 52 alloc(V_LONG_STR
2190: 29 3b 2a 2f 0a 09 69 66 28 28 74 69 6d 65 5f 62 );*/..if((time_b
21a0: 61 73 65 20 3e 3d 20 28 74 69 6d 65 28 4e 55 4c ase >= (time(NUL
21b0: 4c 29 20 2d 20 28 6f 70 74 69 6f 6e 73 2d 3e 70 L) - (options->p
21c0: 61 73 73 70 68 72 61 73 65 5f 74 69 6d 65 6f 75 assphrase_timeou
21d0: 74 2a 36 30 29 29 29 20 26 26 20 28 70 61 73 73 t*60))) && (pass
21e0: 70 68 72 61 73 65 5f 67 6f 6f 64 20 3d 3d 20 31 phrase_good == 1
21f0: 29 29 7b 0a 09 09 72 65 74 75 72 6e 20 70 61 73 )){...return pas
2200: 73 70 68 72 61 73 65 3b 0a 09 7d 0a 09 0a 09 70 sphrase;..}....p
2210: 61 73 73 70 68 72 61 73 65 5f 67 6f 6f 64 20 3d assphrase_good =
2220: 20 30 3b 0a 0a 09 70 61 73 73 70 68 72 61 73 65 0;...passphrase
2230: 20 3d 20 75 69 5f 73 74 61 74 75 73 6c 69 6e 65 = ui_statusline
2240: 5f 61 73 6b 5f 70 61 73 73 77 64 28 22 45 6e 74 _ask_passwd("Ent
2250: 65 72 20 47 6e 75 50 47 20 70 61 73 73 70 68 72 er GnuPG passphr
2260: 61 73 65 20 28 5e 47 20 74 6f 20 43 61 6e 63 65 ase (^G to Cance
2270: 6c 29 3a 22 2c 20 70 61 73 73 70 68 72 61 73 65 l):", passphrase
2280: 2c 20 0a 09 09 09 53 54 52 49 4e 47 5f 4c 4f 4e , ....STRING_LON
2290: 47 2c 20 30 78 30 37 29 3b 20 2f 2a 20 30 78 30 G, 0x07); /* 0x0
22a0: 37 20 3d 3d 20 5e 47 20 2a 2f 0a 09 70 61 73 73 7 == ^G */..pass
22b0: 70 68 72 61 73 65 5f 67 6f 6f 64 20 3d 20 31 3b phrase_good = 1;
22c0: 0a 0a 09 72 65 74 75 72 6e 20 70 61 73 73 70 68 ...return passph
22d0: 72 61 73 65 3b 0a 7d 0a 0a 76 6f 69 64 0a 67 6e rase;.}..void.gn
22e0: 75 70 67 5f 66 6f 72 67 65 74 5f 70 61 73 73 70 upg_forget_passp
22f0: 68 72 61 73 65 28 29 0a 7b 0a 09 70 61 73 73 70 hrase().{..passp
2300: 68 72 61 73 65 5f 67 6f 6f 64 20 3d 20 30 3b 0a hrase_good = 0;.
2310: 0a 09 64 65 62 75 67 28 22 66 6f 72 67 65 74 5f ..debug("forget_
2320: 70 61 73 73 70 68 72 61 73 65 3a 20 70 61 73 73 passphrase: pass
2330: 70 68 72 61 73 65 20 66 6f 72 67 6f 74 74 65 6e phrase forgotten
2340: 22 29 3b 0a 09 75 69 5f 73 74 61 74 75 73 6c 69 ");..ui_statusli
2350: 6e 65 5f 6d 73 67 28 22 50 61 73 73 70 68 72 61 ne_msg("Passphra
2360: 73 65 20 66 6f 72 67 6f 74 74 65 6e 22 29 3b 0a se forgotten");.
2370: 7d 0a 0a 73 74 61 74 69 63 20 69 6e 74 20 0a 67 }..static int .g
2380: 6e 75 70 67 5f 63 68 65 63 6b 5f 65 78 65 63 75 nupg_check_execu
2390: 74 61 62 6c 65 28 29 0a 7b 0a 09 46 49 4c 45 20 table().{..FILE
23a0: 2a 73 74 72 65 61 6d 73 5b 33 5d 3b 0a 09 63 68 *streams[3];..ch
23b0: 61 72 20 2a 61 72 67 73 5b 33 5d 3b 0a 09 69 6e ar *args[3];..in
23c0: 74 20 70 69 64 2c 20 63 6f 75 6e 74 2c 20 76 65 t pid, count, ve
23d0: 72 73 69 6f 6e 5b 33 5d 3b 0a 09 0a 09 64 65 62 rsion[3];....deb
23e0: 75 67 28 22 63 68 65 63 6b 5f 67 6e 75 70 67 3a ug("check_gnupg:
23f0: 20 73 74 61 72 74 22 29 3b 0a 09 69 66 28 6f 70 start");..if(op
2400: 74 69 6f 6e 73 2d 3e 67 70 67 5f 70 61 74 68 20 tions->gpg_path
2410: 3d 3d 20 4e 55 4c 4c 29 7b 0a 09 09 72 65 74 75 == NULL){...retu
2420: 72 6e 20 2d 31 3b 0a 09 7d 0a 0a 09 61 72 67 73 rn -1;..}...args
2430: 5b 30 5d 20 3d 20 22 67 70 67 22 3b 0a 09 61 72 [0] = "gpg";..ar
2440: 67 73 5b 31 5d 20 3d 20 22 2d 2d 76 65 72 73 69 gs[1] = "--versi
2450: 6f 6e 22 3b 0a 09 61 72 67 73 5b 32 5d 20 3d 20 on";..args[2] =
2460: 4e 55 4c 4c 3b 0a 09 0a 09 70 69 64 20 3d 20 67 NULL;....pid = g
2470: 6e 75 70 67 5f 65 78 65 63 28 6f 70 74 69 6f 6e nupg_exec(option
2480: 73 2d 3e 67 70 67 5f 70 61 74 68 2c 20 61 72 67 s->gpg_path, arg
2490: 73 2c 20 73 74 72 65 61 6d 73 29 3b 0a 0a 09 2f s, streams);.../
24a0: 2a 20 74 68 69 73 20 6d 69 67 68 74 20 64 6f 20 * this might do
24b0: 76 65 72 73 69 6f 6e 20 63 68 65 63 6b 69 6e 67 version checking
24c0: 20 73 6f 6d 65 64 61 79 20 69 66 20 6e 65 65 64 someday if need
24d0: 65 64 20 2a 2f 0a 09 63 6f 75 6e 74 20 3d 20 66 ed */..count = f
24e0: 73 63 61 6e 66 28 73 74 72 65 61 6d 73 5b 53 54 scanf(streams[ST
24f0: 44 4f 55 54 5d 2c 20 22 67 70 67 20 28 47 6e 75 DOUT], "gpg (Gnu
2500: 50 47 29 20 25 64 2e 25 64 2e 25 64 22 2c 20 0a PG) %d.%d.%d", .
2510: 09 09 09 26 76 65 72 73 69 6f 6e 5b 30 5d 2c 20 ...&version[0],
2520: 26 76 65 72 73 69 6f 6e 5b 31 5d 2c 20 26 76 65 &version[1], &ve
2530: 72 73 69 6f 6e 5b 32 5d 29 3b 0a 09 67 6e 75 70 rsion[2]);..gnup
2540: 67 5f 65 78 65 63 5f 65 6e 64 28 70 69 64 2c 20 g_exec_end(pid,
2550: 73 74 72 65 61 6d 73 29 3b 0a 0a 09 64 65 62 75 streams);...debu
2560: 67 28 22 65 78 65 63 20 65 6e 64 65 64 22 29 3b g("exec ended");
2570: 0a 09 69 66 28 63 6f 75 6e 74 20 21 3d 20 33 29 ..if(count != 3)
2580: 7b 0a 09 09 75 69 5f 73 74 61 74 75 73 6c 69 6e {...ui_statuslin
2590: 65 5f 6d 73 67 28 22 57 41 52 4e 49 4e 47 21 20 e_msg("WARNING!
25a0: 47 6e 75 50 47 20 45 78 65 63 75 74 61 62 6c 65 GnuPG Executable
25b0: 20 6e 6f 74 20 66 6f 75 6e 64 22 29 3b 20 67 65 not found"); ge
25c0: 74 63 68 28 29 3b 0a 09 09 72 65 74 75 72 6e 20 tch();...return
25d0: 2d 31 3b 0a 09 7d 20 65 6c 73 65 20 7b 0a 09 09 -1;..} else {...
25e0: 64 65 62 75 67 28 22 63 68 65 63 6b 5f 67 6e 75 debug("check_gnu
25f0: 70 67 3a 20 56 65 72 73 69 6f 6e 20 25 64 2e 25 pg: Version %d.%
2600: 64 2e 25 64 22 2c 20 76 65 72 73 69 6f 6e 5b 30 d.%d", version[0
2610: 5d 2c 20 76 65 72 73 69 6f 6e 5b 31 5d 2c 20 76 ], version[1], v
2620: 65 72 73 69 6f 6e 5b 32 5d 29 3b 09 0a 09 09 72 ersion[2]);....r
2630: 65 74 75 72 6e 20 30 3b 0a 09 7d 0a 7d 0a 0a 69 eturn 0;..}.}..i
2640: 6e 74 0a 67 6e 75 70 67 5f 77 72 69 74 65 5f 6d nt.gnupg_write_m
2650: 61 6e 79 28 78 6d 6c 44 6f 63 50 74 72 20 64 6f any(xmlDocPtr do
2660: 63 2c 20 63 68 61 72 2a 2a 20 69 64 73 2c 20 69 c, char** ids, i
2670: 6e 74 20 6e 75 6d 5f 69 64 73 2c 20 63 68 61 72 nt num_ids, char
2680: 2a 20 66 69 6c 65 6e 61 6d 65 29 0a 7b 0a 09 46 * filename).{..F
2690: 49 4c 45 20 2a 73 74 72 65 61 6d 73 5b 33 5d 3b ILE *streams[3];
26a0: 0a 09 63 68 61 72 20 62 75 66 5b 53 54 52 49 4e ..char buf[STRIN
26b0: 47 5f 4c 4f 4e 47 5d 3b 0a 09 63 68 61 72 20 2a G_LONG];..char *
26c0: 61 72 67 73 5b 31 30 5d 3b 0a 09 63 68 61 72 20 args[10];..char
26d0: 2a 65 72 72 3b 0a 09 69 6e 74 20 70 69 64 2c 20 *err;..int pid,
26e0: 69 2c 20 70 6f 73 2c 20 6e 75 6d 5f 76 61 6c 69 i, pos, num_vali
26f0: 64 5f 69 64 73 3b 0a 0a 09 64 65 62 75 67 28 22 d_ids;...debug("
2700: 67 6e 75 70 67 5f 77 72 69 74 65 3a 20 64 6f 20 gnupg_write: do
2710: 73 6f 6d 65 20 63 68 65 63 6b 73 22 29 3b 09 0a some checks");..
2720: 09 69 66 28 28 67 6e 75 70 67 5f 63 68 65 63 6b .if((gnupg_check
2730: 5f 65 78 65 63 75 74 61 62 6c 65 28 29 20 21 3d _executable() !=
2740: 20 30 29 20 7c 7c 20 21 66 69 6c 65 6e 61 6d 65 0) || !filename
2750: 20 7c 7c 20 28 66 69 6c 65 6e 61 6d 65 5b 30 5d || (filename[0]
2760: 20 3d 3d 20 30 29 29 7b 0a 09 09 64 65 62 75 67 == 0)){...debug
2770: 28 22 67 6e 75 70 67 5f 77 72 69 74 65 3a 20 6e ("gnupg_write: n
2780: 6f 20 67 6e 75 70 67 20 6f 72 20 66 69 6c 65 6e o gnupg or filen
2790: 61 6d 65 20 6e 6f 74 20 73 65 74 22 29 3b 0a 09 ame not set");..
27a0: 09 72 65 74 75 72 6e 20 2d 31 3b 0a 09 7d 0a 0a .return -1;..}..
27b0: 09 2f 2f 20 45 6e 73 75 72 65 20 61 6c 6c 20 49 .// Ensure all I
27c0: 44 73 20 61 72 65 20 76 61 6c 69 64 2c 20 61 6e Ds are valid, an
27d0: 64 20 77 65 20 68 61 76 65 20 65 6e 6f 75 67 68 d we have enough
27e0: 0a 09 6e 75 6d 5f 76 61 6c 69 64 5f 69 64 73 20 ..num_valid_ids
27f0: 3d 20 30 3b 0a 09 66 6f 72 28 69 3d 30 3b 20 69 = 0;..for(i=0; i
2800: 3c 6e 75 6d 5f 69 64 73 3b 20 69 2b 2b 29 20 7b <num_ids; i++) {
2810: 0a 09 09 69 66 28 69 64 73 5b 69 5d 5b 30 5d 20 ...if(ids[i][0]
2820: 21 3d 20 30 29 20 7b 0a 09 09 09 69 66 28 67 6e != 0) {....if(gn
2830: 75 70 67 5f 63 68 65 63 6b 5f 69 64 28 69 64 73 upg_check_id(ids
2840: 5b 69 5d 29 20 21 3d 20 30 29 20 7b 0a 09 09 09 [i]) != 0) {....
2850: 09 67 6e 75 70 67 5f 67 65 74 5f 69 64 28 69 64 .gnupg_get_id(id
2860: 73 5b 69 5d 29 3b 0a 09 09 09 09 0a 09 09 09 09 s[i]);..........
2870: 69 66 28 69 64 73 5b 69 5d 5b 30 5d 20 3d 3d 20 if(ids[i][0] ==
2880: 30 29 20 7b 0a 09 09 09 09 09 72 65 74 75 72 6e 0) {......return
2890: 20 2d 31 3b 0a 09 09 09 09 7d 0a 09 09 09 7d 0a -1;.....}....}.
28a0: 0a 09 09 09 6e 75 6d 5f 76 61 6c 69 64 5f 69 64 ....num_valid_id
28b0: 73 2b 2b 3b 0a 09 09 7d 0a 09 7d 0a 09 64 65 62 s++;...}..}..deb
28c0: 75 67 28 22 67 6e 75 70 67 5f 77 72 69 74 65 3a ug("gnupg_write:
28d0: 20 77 72 69 74 69 6e 67 20 74 6f 20 25 64 20 72 writing to %d r
28e0: 65 63 69 70 69 65 6e 74 73 22 2c 20 6e 75 6d 5f ecipients", num_
28f0: 76 61 6c 69 64 5f 69 64 73 29 3b 0a 09 69 66 28 valid_ids);..if(
2900: 6e 75 6d 5f 76 61 6c 69 64 5f 69 64 73 20 3d 3d num_valid_ids ==
2910: 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 20 2d 0) {...return -
2920: 31 3b 0a 09 7d 0a 0a 09 64 65 62 75 67 28 22 67 1;..}...debug("g
2930: 6e 75 70 67 5f 77 72 69 74 65 3a 20 73 74 61 72 nupg_write: star
2940: 74 20 77 72 69 74 69 6e 67 22 29 3b 0a 0a 09 65 t writing");...e
2950: 72 72 20 3d 20 4e 55 4c 4c 3b 0a 09 61 72 67 73 rr = NULL;..args
2960: 5b 30 5d 20 3d 20 22 67 70 67 22 3b 0a 09 61 72 [0] = "gpg";..ar
2970: 67 73 5b 31 5d 20 3d 20 22 2d 65 22 3b 0a 09 61 gs[1] = "-e";..a
2980: 72 67 73 5b 32 5d 20 3d 20 22 2d 61 22 3b 0a 09 rgs[2] = "-a";..
2990: 61 72 67 73 5b 33 5d 20 3d 20 22 2d 2d 61 6c 77 args[3] = "--alw
29a0: 61 79 73 2d 74 72 75 73 74 22 3b 20 2f 2a 20 67 ays-trust"; /* g
29b0: 65 74 73 20 72 69 64 20 6f 66 20 65 72 72 6f 72 ets rid of error
29c0: 20 77 68 65 6e 20 6d 6f 76 69 6e 67 20 0a 09 09 when moving ...
29d0: 09 09 20 20 20 20 20 20 20 6b 65 79 73 20 66 72 .. keys fr
29e0: 6f 6d 20 6f 74 68 65 72 20 6d 61 63 68 69 6e 65 om other machine
29f0: 73 20 2a 2f 0a 09 61 72 67 73 5b 34 5d 20 3d 20 s */..args[4] =
2a00: 22 2d 2d 79 65 73 22 3b 0a 09 61 72 67 73 5b 35 "--yes";..args[5
2a10: 5d 20 3d 20 22 2d 6f 22 3b 0a 09 61 72 67 73 5b ] = "-o";..args[
2a20: 36 5d 20 3d 20 67 6e 75 70 67 5f 65 78 70 61 6e 6] = gnupg_expan
2a30: 64 5f 66 69 6c 65 6e 61 6d 65 28 20 66 69 6c 65 d_filename( file
2a40: 6e 61 6d 65 20 29 3b 0a 0a 09 2f 2f 20 41 64 64 name );...// Add
2a50: 20 69 6e 20 61 6c 6c 20 74 68 65 20 72 65 63 69 in all the reci
2a60: 70 69 65 6e 74 73 0a 09 70 6f 73 20 3d 20 37 3b pients..pos = 7;
2a70: 0a 09 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 75 6d ..for(i=0; i<num
2a80: 5f 69 64 73 3b 20 69 2b 2b 29 20 7b 0a 09 09 69 _ids; i++) {...i
2a90: 66 28 69 64 73 5b 69 5d 5b 30 5d 20 21 3d 20 30 f(ids[i][0] != 0
2aa0: 29 20 7b 0a 09 09 09 61 72 67 73 5b 70 6f 73 5d ) {....args[pos]
2ab0: 20 3d 20 22 2d 72 22 3b 0a 09 09 09 70 6f 73 2b = "-r";....pos+
2ac0: 2b 3b 0a 09 09 09 61 72 67 73 5b 70 6f 73 5d 20 +;....args[pos]
2ad0: 3d 20 69 64 73 5b 69 5d 3b 0a 09 09 09 70 6f 73 = ids[i];....pos
2ae0: 2b 2b 3b 0a 09 09 7d 0a 09 7d 0a 09 61 72 67 73 ++;...}..}..args
2af0: 5b 70 6f 73 5d 20 3d 20 4e 55 4c 4c 3b 0a 0a 09 [pos] = NULL;...
2b00: 77 68 69 6c 65 28 31 29 7b 0a 09 09 2f 2a 20 63 while(1){.../* c
2b10: 6c 65 61 72 20 65 72 72 20 62 75 66 66 65 72 20 lear err buffer
2b20: 2a 2f 0a 09 09 69 66 28 65 72 72 20 21 3d 20 4e */...if(err != N
2b30: 55 4c 4c 29 7b 20 66 72 65 65 28 65 72 72 29 3b ULL){ free(err);
2b40: 20 65 72 72 20 3d 20 4e 55 4c 4c 3b 20 7d 0a 0a err = NULL; }..
2b50: 09 09 70 69 64 20 3d 20 67 6e 75 70 67 5f 65 78 ..pid = gnupg_ex
2b60: 65 63 28 6f 70 74 69 6f 6e 73 2d 3e 67 70 67 5f ec(options->gpg_
2b70: 70 61 74 68 2c 20 61 72 67 73 2c 20 73 74 72 65 path, args, stre
2b80: 61 6d 73 29 3b 0a 0a 23 69 66 20 58 4d 4c 5f 56 ams);..#if XML_V
2b90: 45 52 53 49 4f 4e 20 3e 3d 20 32 30 34 32 33 0a ERSION >= 20423.
2ba0: 09 09 78 6d 6c 44 6f 63 46 6f 72 6d 61 74 44 75 ..xmlDocFormatDu
2bb0: 6d 70 28 73 74 72 65 61 6d 73 5b 53 54 44 49 4e mp(streams[STDIN
2bc0: 5d 2c 20 64 6f 63 2c 20 54 52 55 45 29 3b 0a 23 ], doc, TRUE);.#
2bd0: 65 6c 73 65 0a 09 09 78 6d 6c 44 6f 63 44 75 6d else...xmlDocDum
2be0: 70 28 73 74 72 65 61 6d 73 5b 53 54 44 49 4e 5d p(streams[STDIN]
2bf0: 2c 20 64 6f 63 29 3b 0a 23 65 6e 64 69 66 0a 09 , doc);.#endif..
2c00: 09 63 6c 6f 73 65 28 20 66 69 6c 65 6e 6f 28 73 .close( fileno(s
2c10: 74 72 65 61 6d 73 5b 53 54 44 49 4e 5d 29 20 29 treams[STDIN]) )
2c20: 3b 0a 09 09 0a 09 09 77 68 69 6c 65 28 20 66 67 ;......while( fg
2c30: 65 74 73 28 62 75 66 2c 20 53 54 52 49 4e 47 5f ets(buf, STRING_
2c40: 4c 4f 4e 47 20 2d 20 31 2c 20 73 74 72 65 61 6d LONG - 1, stream
2c50: 73 5b 53 54 44 45 52 52 5d 29 20 21 3d 20 4e 55 s[STDERR]) != NU
2c60: 4c 4c 20 29 7b 0a 09 09 09 65 72 72 20 3d 20 67 LL ){....err = g
2c70: 6e 75 70 67 5f 61 64 64 5f 74 6f 5f 62 75 66 28 nupg_add_to_buf(
2c80: 65 72 72 2c 20 62 75 66 29 3b 0a 09 09 7d 0a 09 err, buf);...}..
2c90: 09 67 6e 75 70 67 5f 65 78 65 63 5f 65 6e 64 28 .gnupg_exec_end(
2ca0: 70 69 64 2c 20 73 74 72 65 61 6d 73 29 3b 0a 09 pid, streams);..
2cb0: 09 0a 09 09 64 65 62 75 67 28 22 67 6e 75 70 67 ....debug("gnupg
2cc0: 5f 77 72 69 74 65 3a 20 73 74 61 72 74 20 65 72 _write: start er
2cd0: 72 6f 72 20 63 68 65 63 6b 69 6e 67 22 29 3b 0a ror checking");.
2ce0: 09 09 2f 2a 0a 09 09 20 2a 20 63 68 65 63 6b 20 ../*... * check
2cf0: 66 6f 72 20 65 72 72 6f 72 73 28 6e 6f 20 6b 65 for errors(no ke
2d00: 79 2c 20 62 61 64 20 70 61 73 73 2c 20 6e 6f 20 y, bad pass, no
2d10: 66 69 6c 65 20 65 74 63 20 65 74 63 29 0a 09 09 file etc etc)...
2d20: 20 2a 2f 0a 09 09 69 66 28 20 67 6e 75 70 67 5f */...if( gnupg_
2d30: 73 74 72 5f 69 6e 5f 62 75 66 28 65 72 72 2c 20 str_in_buf(err,
2d40: 47 50 47 5f 45 52 52 5f 43 41 4e 54 57 52 49 54 GPG_ERR_CANTWRIT
2d50: 45 29 20 29 7b 0a 09 09 09 64 65 62 75 67 28 22 E) ){....debug("
2d60: 67 6e 75 70 67 5f 77 72 69 74 65 3a 20 63 61 6e gnupg_write: can
2d70: 6e 6f 74 20 77 72 69 74 65 20 74 6f 20 25 73 22 not write to %s"
2d80: 2c 20 66 69 6c 65 6e 61 6d 65 29 3b 0a 0a 09 09 , filename);....
2d90: 09 73 6e 70 72 69 6e 74 66 28 62 75 66 2c 20 53 .snprintf(buf, S
2da0: 54 52 49 4e 47 5f 4c 4f 4e 47 2c 20 22 43 61 6e TRING_LONG, "Can
2db0: 6e 6f 74 20 77 72 69 74 65 20 74 6f 20 25 73 22 not write to %s"
2dc0: 2c 20 66 69 6c 65 6e 61 6d 65 29 3b 0a 09 09 09 , filename);....
2dd0: 75 69 5f 73 74 61 74 75 73 6c 69 6e 65 5f 6d 73 ui_statusline_ms
2de0: 67 28 62 75 66 29 3b 20 67 65 74 63 68 28 29 3b g(buf); getch();
2df0: 0a 0a 09 09 09 66 69 6c 65 6e 61 6d 65 20 3d 20 .....filename =
2e00: 67 6e 75 70 67 5f 67 65 74 5f 66 69 6c 65 6e 61 gnupg_get_filena
2e10: 6d 65 28 66 69 6c 65 6e 61 6d 65 2c 20 27 77 27 me(filename, 'w'
2e20: 29 3b 0a 09 09 09 69 66 28 66 69 6c 65 6e 61 6d );....if(filenam
2e30: 65 5b 30 5d 20 3d 3d 20 30 29 7b 0a 09 09 09 09 e[0] == 0){.....
2e40: 72 65 74 75 72 6e 20 2d 31 3b 0a 09 09 09 7d 0a return -1;....}.
2e50: 09 09 09 63 6f 6e 74 69 6e 75 65 3b 0a 09 09 7d ...continue;...}
2e60: 0a 09 09 62 72 65 61 6b 3b 0a 09 7d 0a 0a 09 75 ...break;..}...u
2e70: 69 5f 73 74 61 74 75 73 6c 69 6e 65 5f 6d 73 67 i_statusline_msg
2e80: 28 22 4c 69 73 74 20 53 61 76 65 64 22 29 3b 0a ("List Saved");.
2e90: 09 64 65 62 75 67 28 22 67 6e 75 70 67 5f 77 72 .debug("gnupg_wr
2ea0: 69 74 65 3a 20 66 69 6c 65 20 77 72 69 74 65 20 ite: file write
2eb0: 73 75 63 65 73 73 66 75 6c 22 29 3b 0a 09 0a 09 sucessful");....
2ec0: 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 0a 69 6e 74 return 0;.}..int
2ed0: 0a 67 6e 75 70 67 5f 77 72 69 74 65 28 78 6d 6c .gnupg_write(xml
2ee0: 44 6f 63 50 74 72 20 64 6f 63 2c 20 63 68 61 72 DocPtr doc, char
2ef0: 2a 20 69 64 2c 20 63 68 61 72 2a 20 66 69 6c 65 * id, char* file
2f00: 6e 61 6d 65 29 0a 7b 0a 09 72 65 74 75 72 6e 20 name).{..return
2f10: 67 6e 75 70 67 5f 77 72 69 74 65 5f 6d 61 6e 79 gnupg_write_many
2f20: 28 64 6f 63 2c 20 26 69 64 2c 20 31 2c 20 66 69 (doc, &id, 1, fi
2f30: 6c 65 6e 61 6d 65 29 3b 0a 7d 0a 0a 69 6e 74 0a lename);.}..int.
2f40: 67 6e 75 70 67 5f 72 65 61 64 28 63 68 61 72 20 gnupg_read(char
2f50: 2a 66 69 6c 65 6e 61 6d 65 2c 20 78 6d 6c 44 6f *filename, xmlDo
2f60: 63 50 74 72 20 2a 64 6f 63 29 0a 7b 0a 09 63 68 cPtr *doc).{..ch
2f70: 61 72 20 2a 61 72 67 73 5b 39 5d 2c 20 2a 70 61 ar *args[9], *pa
2f80: 73 73 70 68 72 61 73 65 2c 20 2a 64 61 74 61 2c ssphrase, *data,
2f90: 20 2a 65 72 72 2c 20 62 75 66 5b 53 54 52 49 4e *err, buf[STRIN
2fa0: 47 5f 4c 4f 4e 47 5d 2c 20 2a 75 73 65 72 3b 0a G_LONG], *user;.
2fb0: 09 46 49 4c 45 20 2a 73 74 72 65 61 6d 73 5b 33 .FILE *streams[3
2fc0: 5d 3b 0a 09 69 6e 74 20 70 69 64 3b 0a 09 69 6e ];..int pid;..in
2fd0: 74 20 72 65 74 20 3d 20 30 3b 0a 09 0a 09 69 66 t ret = 0;....if
2fe0: 28 67 6e 75 70 67 5f 63 68 65 63 6b 5f 65 78 65 (gnupg_check_exe
2ff0: 63 75 74 61 62 6c 65 28 29 20 21 3d 20 30 29 7b cutable() != 0){
3000: 0a 09 09 2a 64 6f 63 20 3d 20 78 6d 6c 4e 65 77 ...*doc = xmlNew
3010: 44 6f 63 28 28 78 6d 6c 43 68 61 72 2a 29 22 31 Doc((xmlChar*)"1
3020: 2e 30 22 29 3b 0a 09 09 72 65 74 75 72 6e 20 2d .0");...return -
3030: 31 3b 0a 09 7d 0a 2f 2a 0a 09 69 66 28 63 68 65 1;..}./*..if(che
3040: 63 6b 5f 67 6e 75 70 67 5f 70 61 73 73 70 68 72 ck_gnupg_passphr
3050: 61 73 65 28 66 69 6c 65 6e 61 6d 65 29 20 3d 3d ase(filename) ==
3060: 20 2d 31 29 7b 0a 09 09 72 65 74 75 72 6e 20 2d -1){...return -
3070: 31 3b 0a 09 7d 2a 2f 0a 0a 09 64 61 74 61 20 3d 1;..}*/...data =
3080: 20 4e 55 4c 4c 3b 0a 09 65 72 72 20 3d 20 4e 55 NULL;..err = NU
3090: 4c 4c 3b 0a 09 75 73 65 72 20 3d 20 4e 55 4c 4c LL;..user = NULL
30a0: 3b 0a 09 61 72 67 73 5b 30 5d 20 3d 20 22 67 70 ;..args[0] = "gp
30b0: 67 22 3b 0a 09 61 72 67 73 5b 31 5d 20 3d 20 22 g";..args[1] = "
30c0: 2d 2d 70 61 73 73 70 68 72 61 73 65 2d 66 64 22 --passphrase-fd"
30d0: 3b 0a 09 61 72 67 73 5b 32 5d 20 3d 20 22 30 22 ;..args[2] = "0"
30e0: 3b 0a 09 61 72 67 73 5b 33 5d 20 3d 20 22 2d 2d ;..args[3] = "--
30f0: 6e 6f 2d 76 65 72 62 6f 73 65 22 3b 0a 09 61 72 no-verbose";..ar
3100: 67 73 5b 34 5d 20 3d 20 22 2d 2d 62 61 74 63 68 gs[4] = "--batch
3110: 22 3b 0a 09 61 72 67 73 5b 35 5d 20 3d 20 22 2d ";..args[5] = "-
3120: 2d 6f 75 74 70 75 74 22 3b 0a 09 61 72 67 73 5b -output";..args[
3130: 36 5d 20 3d 20 22 2d 22 3b 0a 09 61 72 67 73 5b 6] = "-";..args[
3140: 37 5d 20 3d 20 67 6e 75 70 67 5f 65 78 70 61 6e 7] = gnupg_expan
3150: 64 5f 66 69 6c 65 6e 61 6d 65 28 20 66 69 6c 65 d_filename( file
3160: 6e 61 6d 65 20 29 3b 0a 09 61 72 67 73 5b 38 5d name );..args[8]
3170: 20 3d 20 4e 55 4c 4c 3b 0a 09 0a 09 77 68 69 6c = NULL;....whil
3180: 65 28 31 29 7b 0a 09 09 2f 2a 20 63 6c 65 61 72 e(1){.../* clear
3190: 20 62 75 66 66 65 72 73 20 2a 2f 0a 09 09 69 66 buffers */...if
31a0: 28 65 72 72 20 21 3d 20 4e 55 4c 4c 29 7b 20 66 (err != NULL){ f
31b0: 72 65 65 28 65 72 72 29 3b 20 65 72 72 20 3d 20 ree(err); err =
31c0: 4e 55 4c 4c 3b 20 7d 0a 09 09 69 66 28 64 61 74 NULL; }...if(dat
31d0: 61 20 21 3d 20 4e 55 4c 4c 29 7b 20 66 72 65 65 a != NULL){ free
31e0: 28 64 61 74 61 29 3b 20 64 61 74 61 20 3d 20 4e (data); data = N
31f0: 55 4c 4c 3b 20 7d 0a 09 09 0a 09 09 70 61 73 73 ULL; }......pass
3200: 70 68 72 61 73 65 20 3d 20 28 63 68 61 72 2a 29 phrase = (char*)
3210: 67 6e 75 70 67 5f 67 65 74 5f 70 61 73 73 70 68 gnupg_get_passph
3220: 72 61 73 65 28 29 3b 0a 0a 09 09 69 66 28 70 61 rase();....if(pa
3230: 73 73 70 68 72 61 73 65 20 3d 3d 20 4e 55 4c 4c ssphrase == NULL
3240: 29 7b 0a 09 09 09 2f 2f 20 54 68 65 79 20 68 69 ){....// They hi
3250: 74 20 63 61 6e 63 65 6c 20 6f 6e 20 74 68 65 20 t cancel on the
3260: 70 61 73 73 77 6f 72 64 20 70 72 6f 6d 70 74 0a password prompt.
3270: 09 09 09 77 72 69 74 65 5f 6f 70 74 69 6f 6e 73 ...write_options
3280: 20 3d 20 30 3b 0a 09 09 09 66 69 6c 65 6e 61 6d = 0;....filenam
3290: 65 5b 30 5d 20 3d 20 30 3b 0a 09 09 09 72 65 74 e[0] = 0;....ret
32a0: 20 3d 20 32 35 35 3b 0a 09 09 09 62 72 65 61 6b = 255;....break
32b0: 3b 0a 09 09 7d 0a 0a 09 09 70 69 64 20 3d 20 67 ;...}....pid = g
32c0: 6e 75 70 67 5f 65 78 65 63 28 6f 70 74 69 6f 6e nupg_exec(option
32d0: 73 2d 3e 67 70 67 5f 70 61 74 68 2c 20 61 72 67 s->gpg_path, arg
32e0: 73 2c 20 73 74 72 65 61 6d 73 29 3b 0a 0a 09 09 s, streams);....
32f0: 66 70 75 74 73 28 20 70 61 73 73 70 68 72 61 73 fputs( passphras
3300: 65 2c 20 73 74 72 65 61 6d 73 5b 53 54 44 49 4e e, streams[STDIN
3310: 5d 29 3b 0a 09 09 66 70 75 74 63 28 20 27 5c 6e ]);...fputc( '\n
3320: 27 20 2c 20 73 74 72 65 61 6d 73 5b 53 54 44 49 ' , streams[STDI
3330: 4e 5d 29 3b 0a 09 09 66 63 6c 6f 73 65 28 73 74 N]);...fclose(st
3340: 72 65 61 6d 73 5b 53 54 44 49 4e 5d 29 3b 0a 09 reams[STDIN]);..
3350: 09 73 74 72 65 61 6d 73 5b 53 54 44 49 4e 5d 20 .streams[STDIN]
3360: 3d 20 4e 55 4c 4c 3b 0a 0a 09 09 64 65 62 75 67 = NULL;....debug
3370: 28 22 67 6e 75 70 67 5f 72 65 61 64 3a 20 73 74 ("gnupg_read: st
3380: 61 72 74 20 72 65 61 64 69 6e 67 20 64 61 74 61 art reading data
3390: 22 29 3b 0a 09 09 77 68 69 6c 65 28 20 66 67 65 ");...while( fge
33a0: 74 73 28 62 75 66 2c 20 53 54 52 49 4e 47 5f 4c ts(buf, STRING_L
33b0: 4f 4e 47 20 2d 20 31 2c 20 73 74 72 65 61 6d 73 ONG - 1, streams
33c0: 5b 53 54 44 4f 55 54 5d 29 20 21 3d 20 4e 55 4c [STDOUT]) != NUL
33d0: 4c 20 29 7b 0a 09 09 09 64 61 74 61 20 3d 20 67 L ){....data = g
33e0: 6e 75 70 67 5f 61 64 64 5f 74 6f 5f 62 75 66 28 nupg_add_to_buf(
33f0: 64 61 74 61 2c 20 62 75 66 29 3b 0a 09 09 7d 0a data, buf);...}.
3400: 09 09 77 68 69 6c 65 28 20 66 67 65 74 73 28 62 ..while( fgets(b
3410: 75 66 2c 20 53 54 52 49 4e 47 5f 4c 4f 4e 47 20 uf, STRING_LONG
3420: 2d 20 31 2c 20 73 74 72 65 61 6d 73 5b 53 54 44 - 1, streams[STD
3430: 45 52 52 5d 29 20 21 3d 20 4e 55 4c 4c 20 29 7b ERR]) != NULL ){
3440: 0a 09 09 09 65 72 72 20 3d 20 67 6e 75 70 67 5f ....err = gnupg_
3450: 61 64 64 5f 74 6f 5f 62 75 66 28 65 72 72 2c 20 add_to_buf(err,
3460: 62 75 66 29 3b 0a 09 09 7d 0a 09 0a 09 09 67 6e buf);...}.....gn
3470: 75 70 67 5f 65 78 65 63 5f 65 6e 64 28 70 69 64 upg_exec_end(pid
3480: 2c 20 73 74 72 65 61 6d 73 29 3b 0a 0a 09 09 64 , streams);....d
3490: 65 62 75 67 28 22 67 6e 75 70 67 5f 72 65 61 64 ebug("gnupg_read
34a0: 3a 20 73 74 61 72 74 20 65 72 72 6f 72 20 63 68 : start error ch
34b0: 65 63 6b 69 6e 67 22 29 3b 0a 09 09 64 65 62 75 ecking");...debu
34c0: 67 28 65 72 72 29 3b 0a 09 09 2f 2a 0a 09 09 20 g(err);.../*...
34d0: 2a 20 63 68 65 63 6b 20 66 6f 72 20 65 72 72 6f * check for erro
34e0: 72 73 28 6e 6f 20 6b 65 79 2c 20 62 61 64 20 70 rs(no key, bad p
34f0: 61 73 73 2c 20 6e 6f 20 66 69 6c 65 20 65 74 63 ass, no file etc
3500: 20 65 74 63 29 0a 09 09 20 2a 2f 0a 09 09 69 66 etc)... */...if
3510: 28 20 67 6e 75 70 67 5f 73 74 72 5f 69 6e 5f 62 ( gnupg_str_in_b
3520: 75 66 28 65 72 72 2c 20 47 50 47 5f 45 52 52 5f uf(err, GPG_ERR_
3530: 42 41 44 50 41 53 53 50 48 52 41 53 45 29 20 29 BADPASSPHRASE) )
3540: 7b 0a 09 09 09 64 65 62 75 67 28 22 67 6e 75 70 {....debug("gnup
3550: 67 5f 72 65 61 64 3a 20 62 61 64 20 70 61 73 73 g_read: bad pass
3560: 70 68 72 61 73 65 22 29 3b 0a 09 09 09 75 69 5f phrase");....ui_
3570: 73 74 61 74 75 73 6c 69 6e 65 5f 6d 73 67 28 22 statusline_msg("
3580: 42 61 64 20 50 61 73 73 70 68 72 61 73 65 2c 20 Bad Passphrase,
3590: 70 6c 65 61 73 65 20 72 65 2d 65 6e 74 65 72 22 please re-enter"
35a0: 29 3b 0a 09 09 09 67 65 74 63 68 28 29 3b 0a 0a );....getch();..
35b0: 09 09 09 70 61 73 73 70 68 72 61 73 65 5f 67 6f ...passphrase_go
35c0: 6f 64 20 3d 20 30 3b 0a 09 09 09 63 6f 6e 74 69 od = 0;....conti
35d0: 6e 75 65 3b 0a 09 09 7d 0a 09 09 69 66 28 20 67 nue;...}...if( g
35e0: 6e 75 70 67 5f 73 74 72 5f 69 6e 5f 62 75 66 28 nupg_str_in_buf(
35f0: 65 72 72 2c 20 47 50 47 5f 45 52 52 5f 43 41 4e err, GPG_ERR_CAN
3600: 54 4f 50 45 4e 29 20 29 7b 0a 09 09 09 64 65 62 TOPEN) ){....deb
3610: 75 67 28 22 67 6e 75 70 67 5f 72 65 61 64 3a 20 ug("gnupg_read:
3620: 63 61 6e 6e 6f 74 20 6f 70 65 6e 20 25 73 22 2c cannot open %s",
3630: 20 66 69 6c 65 6e 61 6d 65 29 3b 0a 09 09 09 73 filename);....s
3640: 6e 70 72 69 6e 74 66 28 62 75 66 2c 20 53 54 52 nprintf(buf, STR
3650: 49 4e 47 5f 4c 4f 4e 47 2c 20 22 43 61 6e 6e 6f ING_LONG, "Canno
3660: 74 20 6f 70 65 6e 20 66 69 6c 65 20 5c 22 25 73 t open file \"%s
3670: 5c 22 22 2c 20 66 69 6c 65 6e 61 6d 65 29 3b 0a \"", filename);.
3680: 09 09 09 75 69 5f 73 74 61 74 75 73 6c 69 6e 65 ...ui_statusline
3690: 5f 6d 73 67 28 62 75 66 29 3b 20 67 65 74 63 68 _msg(buf); getch
36a0: 28 29 3b 0a 0a 09 09 09 72 65 74 20 3d 20 2d 31 ();.....ret = -1
36b0: 3b 0a 09 09 09 62 72 65 61 6b 3b 0a 09 09 7d 0a ;....break;...}.
36c0: 09 09 69 66 28 20 67 6e 75 70 67 5f 73 74 72 5f ..if( gnupg_str_
36d0: 69 6e 5f 62 75 66 28 65 72 72 2c 20 47 50 47 5f in_buf(err, GPG_
36e0: 45 52 52 5f 4e 4f 53 45 43 52 45 54 4b 45 59 29 ERR_NOSECRETKEY)
36f0: 20 29 7b 0a 09 09 09 64 65 62 75 67 28 22 67 6e ){....debug("gn
3700: 75 70 67 5f 72 65 61 64 3a 20 73 65 63 72 65 74 upg_read: secret
3710: 20 6b 65 79 20 6e 6f 74 20 61 76 61 69 6c 61 62 key not availab
3720: 6c 65 21 22 29 3b 0a 09 09 09 75 73 65 72 20 3d le!");....user =
3730: 20 67 6e 75 70 67 5f 66 69 6e 64 5f 72 65 63 70 gnupg_find_recp
3740: 28 65 72 72 29 3b 0a 09 09 09 73 6e 70 72 69 6e (err);....snprin
3750: 74 66 28 62 75 66 2c 20 53 54 52 49 4e 47 5f 4c tf(buf, STRING_L
3760: 4f 4e 47 2c 20 22 59 6f 75 20 64 6f 20 6e 6f 74 ONG, "You do not
3770: 20 68 61 76 65 20 74 68 65 20 73 65 63 72 65 74 have the secret
3780: 20 6b 65 79 20 66 6f 72 20 25 73 22 2c 20 75 73 key for %s", us
3790: 65 72 29 3b 0a 09 09 09 75 69 5f 73 74 61 74 75 er);....ui_statu
37a0: 73 6c 69 6e 65 5f 6d 73 67 28 62 75 66 29 3b 20 sline_msg(buf);
37b0: 67 65 74 63 68 28 29 3b 0a 0a 09 09 09 72 65 74 getch();.....ret
37c0: 20 3d 20 32 35 34 3b 0a 09 09 09 62 72 65 61 6b = 254;....break
37d0: 3b 0a 09 09 7d 0a 09 09 62 72 65 61 6b 3b 0a 09 ;...}...break;..
37e0: 7d 0a 0a 0a 09 64 65 62 75 67 28 22 67 6e 75 70 }....debug("gnup
37f0: 67 5f 72 65 61 64 3a 20 66 69 6e 69 73 68 65 64 g_read: finished
3800: 20 72 65 61 64 22 29 3b 0a 09 69 66 28 64 61 74 read");..if(dat
3810: 61 20 21 3d 20 4e 55 4c 4c 29 7b 0a 09 09 64 65 a != NULL){...de
3820: 62 75 67 28 22 67 6e 75 70 67 5f 72 65 61 64 3a bug("gnupg_read:
3830: 20 64 61 74 61 20 21 3d 20 4e 55 4c 4c 22 29 3b data != NULL");
3840: 0a 09 09 2a 64 6f 63 20 3d 20 78 6d 6c 50 61 72 ...*doc = xmlPar
3850: 73 65 4d 65 6d 6f 72 79 28 64 61 74 61 2c 20 73 seMemory(data, s
3860: 74 72 6c 65 6e 28 64 61 74 61 29 29 3b 0a 09 09 trlen(data));...
3870: 66 72 65 65 28 64 61 74 61 29 3b 0a 09 7d 20 65 free(data);..} e
3880: 6c 73 65 20 7b 0a 09 09 64 65 62 75 67 28 22 67 lse {...debug("g
3890: 6e 75 70 67 5f 72 65 61 64 3a 20 64 61 74 61 20 nupg_read: data
38a0: 69 73 20 6e 75 6c 6c 22 29 3b 0a 09 09 2a 64 6f is null");...*do
38b0: 63 20 3d 20 78 6d 6c 4e 65 77 44 6f 63 28 28 78 c = xmlNewDoc((x
38c0: 6d 6c 43 68 61 72 2a 29 22 31 2e 30 22 29 3b 0a mlChar*)"1.0");.
38d0: 09 7d 0a 09 69 66 28 65 72 72 20 21 3d 20 4e 55 .}..if(err != NU
38e0: 4c 4c 29 7b 20 66 72 65 65 28 65 72 72 29 3b 20 LL){ free(err);
38f0: 7d 0a 09 69 66 28 75 73 65 72 20 21 3d 20 4e 55 }..if(user != NU
3900: 4c 4c 29 7b 20 66 72 65 65 28 75 73 65 72 29 3b LL){ free(user);
3910: 20 7d 0a 0a 09 64 65 62 75 67 28 22 67 6e 75 70 }...debug("gnup
3920: 67 5f 72 65 61 64 3a 20 66 69 6e 69 73 68 65 64 g_read: finished
3930: 20 61 6c 6c 22 29 3b 0a 0a 09 72 65 74 75 72 6e all");...return
3940: 20 72 65 74 3b 0a 7d 0a ret;.}.