37d4262550964f074e574930cd4570c7aee8dad6
[gpgme.git] / assuan / assuan-connect.c
1 /* assuan-connect.c - Establish a connection (client) 
2  *      Copyright (C) 2001 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 <stdlib.h>
23 #include <stdio.h>
24 #include <string.h>
25 #include <signal.h>
26 #include <unistd.h>
27 #include <sys/types.h>
28 #include <sys/wait.h>
29
30 #include "assuan-defs.h"
31
32 /* Connect to a server over a pipe, creating the assuan context and
33    returning it in CTX.  The server filename is NAME, the argument
34    vector in ARGV.  */
35 AssuanError
36 assuan_pipe_connect (ASSUAN_CONTEXT *ctx, const char *name, char *const argv[])
37 {
38   static int fixed_signals = 0;
39   AssuanError err;
40   int rp[2];
41   int wp[2];
42   int fd[2];
43
44   if (!name || !argv || !argv[0])
45     return ASSUAN_General_Error;
46
47   if (!fixed_signals)
48     { 
49       struct sigaction act;
50         
51       sigaction (SIGPIPE, NULL, &act);
52       if (act.sa_handler == SIG_DFL)
53         {
54           act.sa_handler = SIG_IGN;
55           sigemptyset (&act.sa_mask);
56           act.sa_flags = 0;
57           sigaction (SIGPIPE, &act, NULL);
58         }
59       fixed_signals = 1;
60       /* FIXME: This is not MT safe */
61     }
62
63   if (pipe (rp) < 0)
64     return ASSUAN_General_Error;
65
66   if (pipe (wp) < 0)
67     {
68       close (rp[0]);
69       close (rp[1]);
70       return ASSUAN_General_Error;
71     }
72
73   fd[0] = rp[0];  /* Our inbound is read end of read pipe.  */
74   fd[1] = wp[1];  /* Our outbound is write end of write pipe.  */
75
76   err = assuan_init_pipe_server (ctx, fd);  /* FIXME: Common code should be factored out.  */
77   if (err)
78     {
79       close (rp[0]);
80       close (rp[1]);
81       close (wp[0]);
82       close (wp[1]);
83       return err;
84     }
85
86   (*ctx)->pid = fork ();
87   if ((*ctx)->pid < 0)
88     {
89       close (rp[0]);
90       close (rp[1]);
91       close (wp[0]);
92       close (wp[1]);
93       assuan_deinit_pipe_server (*ctx);  /* FIXME: Common code should be factored out.  */
94       return ASSUAN_General_Error;
95     }
96
97   if ((*ctx)->pid == 0)
98     {
99       close (rp[0]);
100       close (wp[1]);
101       if (rp[1] != STDOUT_FILENO)
102         {
103           dup2 (rp[1], STDOUT_FILENO);  /* Child's outbound is write end of read pipe.  */
104           close (rp[1]);
105         }
106       if (wp[0] != STDIN_FILENO)
107         {
108           dup2 (wp[0], STDIN_FILENO);  /* Child's inbound is read end of write pipe.  */
109           close (wp[0]);
110         }
111       execv (name, argv);
112       _exit (1);
113     }
114
115   close (rp[1]);
116   close (wp[0]);
117   _assuan_read_line (*ctx); /* FIXME: Handshake.  */
118   return 0;
119 }
120
121 void
122 assuan_pipe_disconnect (ASSUAN_CONTEXT ctx)
123 {
124   _assuan_write_line (ctx, "BYE");
125   close (ctx->inbound.fd);
126   close (ctx->outbound.fd);
127   waitpid (ctx->pid, NULL, 0);  /* FIXME Check return value.  */
128   assuan_deinit_pipe_server (ctx);
129 }
130
131 pid_t
132 assuan_get_pid (ASSUAN_CONTEXT ctx)
133 {
134   return ctx ? ctx->pid : -1;
135 }