Fix preference setting in new keys
[gnupg.git] / common / init.c
1 /* init.c - Various initializations
2  *      Copyright (C) 2007 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 3 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, see <http://www.gnu.org/licenses/>.
18  */
19
20 #include <config.h>
21
22 #ifdef WITHOUT_GNU_PTH /* Give the Makefile a chance to build without Pth.  */
23 #undef HAVE_PTH
24 #undef USE_GNU_PTH
25 #endif
26
27 #ifdef HAVE_W32_SYSTEM
28 #include <windows.h>
29 #endif
30 #ifdef HAVE_PTH      
31 #include <pth.h>
32 #endif
33 #ifdef HAVE_W32CE_SYSTEM
34 # include <assuan.h> /* For _assuan_w32ce_finish_pipe. */
35 #endif
36
37 #include "util.h"
38
39
40 #ifdef HAVE_W32CE_SYSTEM
41 static void parse_std_file_handles (int *argcp, char ***argvp);
42 static void
43 sleep_on_exit (void)
44 {
45   /* The sshd on CE swallows some of the command output.  Sleeping a
46      while usually helps.  */
47   Sleep (400);
48 }
49 #endif /*HAVE_W32CE_SYSTEM*/
50
51
52 /* This function is to be used early at program startup to make sure
53    that some subsystems are initialized.  This is in particular
54    important for W32 to initialize the sockets so that our socket
55    emulation code used directly as well as in libassuan may be used.
56    It should best be called before any I/O is done so that setup
57    required for logging is ready.  ARGCP and ARGVP are the addresses
58    of the parameters given to main.  This function may modify them.
59
60    CAUTION: This might be called while running suid(root).  */
61 void
62 init_common_subsystems (int *argcp, char ***argvp)
63 {
64   /* Try to auto set the character set.  */
65   set_native_charset (NULL); 
66
67 #ifdef HAVE_W32_SYSTEM
68   /* For W32 we need to initialize the socket layer.  This is because
69      we use recv and send in libassuan as well as at some other
70      places.  If we are building with PTH we let pth_init do it.  We
71      can't do much on error so we ignore them.  An error would anyway
72      later pop up if one of the socket functions is used. */
73 # ifdef HAVE_PTH
74   pth_init ();
75 # else
76   {
77     WSADATA wsadat;
78     
79     WSAStartup (0x202, &wsadat);
80   }
81 # endif /*!HAVE_PTH*/
82 #endif
83   
84 #ifdef HAVE_W32CE_SYSTEM
85   /* Register the sleep exit function before the estream init so that
86      the sleep will be called after the estream registered atexit
87      function which flushes the left open estream streams and in
88      particular es_stdout.  */
89   atexit (sleep_on_exit);
90 #endif
91
92   /* Initialize the Estream library. */
93   es_init ();
94
95   /* Special hack for Windows CE: We extract some options from arg
96      to setup the standard handles.  */
97 #ifdef HAVE_W32CE_SYSTEM
98   parse_std_file_handles (argcp, argvp);
99 #else
100   (void)argcp;
101   (void)argvp;
102 #endif
103 }
104
105
106
107 /* WindowsCE uses a very strange way of handling the standard streams.
108    There is a function SetStdioPath to associate a standard stream
109    with a file or a device but what we really want is to use pipes as
110    standard streams.  Despite that we implement pipes using a device,
111    we would have some limitations on the number of open pipes due to
112    the 3 character limit of device file name.  Thus we don't take this
113    path.  Another option would be to install a file system driver with
114    support for pipes; this would allow us to get rid of the device
115    name length limitation.  However, with GnuPG we can get away be
116    redefining the standard streams and passing the handles to be used
117    on the command line.  This has also the advantage that it makes
118    creating a process much easier and does not require the
119    SetStdioPath set and restore game.  The caller needs to pass the
120    rendezvous ids using up to three options:
121
122      -&S0=<rvid> -&S1=<rvid> -&S2=<rvid>
123
124    They are all optional but they must be the first arguments on the
125    command line.  Parsing stops as soon as an invalid option is found.
126    These rendezvous ids are then used to finish the pipe creation.*/
127 #ifdef HAVE_W32CE_SYSTEM
128 static void
129 parse_std_file_handles (int *argcp, char ***argvp)
130 {
131   int argc = *argcp;
132   char **argv = *argvp;
133   const char *s;
134   assuan_fd_t fd;
135   int i;
136   int fixup = 0;
137
138   if (!argc)
139     return;
140
141   for (argc--, argv++; argc; argc--, argv++)
142     {
143       s = *argv;
144       if (*s == '-' && s[1] == '&' && s[2] == 'S'
145           && (s[3] == '0' || s[3] == '1' || s[3] == '2')
146           && s[4] == '=' 
147           && (strchr ("-01234567890", s[5]) || !strcmp (s+5, "null")))
148         {
149           if (s[5] == 'n')
150             fd = ASSUAN_INVALID_FD;
151           else
152             fd = _assuan_w32ce_finish_pipe (atoi (s+5), s[3] != '0');
153           _es_set_std_fd (s[3] - '0', (int)fd);
154           fixup++;
155         }
156       else
157         break;
158     }
159
160   if (fixup)
161     {
162       argc = *argcp;
163       argc -= fixup;
164       *argcp = argc;
165
166       argv = *argvp;
167       for (i=1; i < argc; i++)
168         argv[i] = argv[i + fixup];
169       for (; i < argc + fixup; i++)
170         argv[i] = NULL;
171     }
172
173
174 }
175 #endif /*HAVE_W32CE_SYSTEM*/