* configure.ac: Make the check for funopen fail with just a
[gpgme.git] / assuan / assuan-socket-server.c
1 /* assuan-socket-server.c - Assuan socket based server
2  *      Copyright (C) 2002 Free Software Foundation, Inc.
3  *
4  * This file is part of Assuan.
5  *
6  * Assuan is free software; you can redistribute it and/or modify it
7  * under the terms of the GNU Lesser General Public License as
8  * published by the Free Software Foundation; either version 2.1 of
9  * the License, or (at your option) any later version.
10  *
11  * Assuan is distributed in the hope that it will be useful, but
12  * WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License 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 <errno.h>
25 #include <sys/socket.h>
26 #include <sys/un.h>
27 #include <unistd.h>
28
29 #include "assuan-defs.h"
30
31 static int
32 accept_connection_bottom (ASSUAN_CONTEXT ctx)
33 {
34   int fd = ctx->connected_fd;
35
36   ctx->client_pid = (pid_t)-1;
37 #ifdef HAVE_SO_PEERCRED
38   {
39     struct ucred cr; 
40     int cl = sizeof cr;
41
42     if ( !getsockopt (fd, SOL_SOCKET, SO_PEERCRED, &cr, &cl) ) 
43       ctx->client_pid = cr.pid;
44   }
45 #endif
46
47   ctx->inbound.fd = fd;
48   ctx->inbound.eof = 0;
49   ctx->inbound.linelen = 0;
50   ctx->inbound.attic.linelen = 0;
51   ctx->inbound.attic.pending = 0;
52
53   ctx->outbound.fd = fd;
54   ctx->outbound.data.linelen = 0;
55   ctx->outbound.data.error = 0;
56   
57   ctx->confidential = 0;
58
59   return 0;
60 }
61
62
63 static int
64 accept_connection (ASSUAN_CONTEXT ctx)
65 {
66   int fd;
67   struct sockaddr_un clnt_addr;
68   size_t len = sizeof clnt_addr;
69
70   ctx->client_pid = (pid_t)-1;
71   fd = accept (ctx->listen_fd, (struct sockaddr*)&clnt_addr, &len );
72   if (fd == -1)
73     {
74       ctx->os_errno = errno;
75       return ASSUAN_Accept_Failed;
76     }
77
78   ctx->connected_fd = fd;
79   return accept_connection_bottom (ctx);
80 }
81
82 static int
83 finish_connection (ASSUAN_CONTEXT ctx)
84 {
85   if (ctx->inbound.fd != -1)
86     {
87       close (ctx->inbound.fd);
88     }
89   ctx->inbound.fd = -1;
90   ctx->outbound.fd = -1;
91   return 0;
92 }
93
94
95 static void
96 deinit_socket_server (ASSUAN_CONTEXT ctx)
97 {
98   finish_connection (ctx);
99 }
100
101 static struct assuan_io io = { _assuan_simple_read,
102                                _assuan_simple_write };
103
104 /* Initialize a server for the socket LISTEN_FD which has already be
105    put into listen mode */
106 int
107 assuan_init_socket_server (ASSUAN_CONTEXT *r_ctx, int listen_fd)
108 {
109   ASSUAN_CONTEXT ctx;
110   int rc;
111
112   *r_ctx = NULL;
113   ctx = xtrycalloc (1, sizeof *ctx);
114   if (!ctx)
115     return ASSUAN_Out_Of_Core;
116   ctx->is_server = 1;
117   ctx->input_fd = -1;
118   ctx->output_fd = -1;
119
120   ctx->inbound.fd = -1;
121   ctx->outbound.fd = -1;
122
123   ctx->listen_fd = listen_fd;
124   ctx->connected_fd = -1;
125   ctx->deinit_handler = deinit_socket_server;
126   ctx->accept_handler = accept_connection;
127   ctx->finish_handler = finish_connection;
128
129   ctx->io = &io;
130
131   rc = _assuan_register_std_commands (ctx);
132   if (rc)
133     xfree (ctx);
134   else
135     *r_ctx = ctx;
136   return rc;
137 }
138
139 /* Initialize a server using the already accepted socket FD. */
140 int
141 assuan_init_connected_socket_server (ASSUAN_CONTEXT *r_ctx, int fd)
142 {
143   ASSUAN_CONTEXT ctx;
144   int rc;
145
146   *r_ctx = NULL;
147   ctx = xtrycalloc (1, sizeof *ctx);
148   if (!ctx)
149     return ASSUAN_Out_Of_Core;
150   ctx->is_server = 1;
151   ctx->pipe_mode = 1; /* we want a second accept to indicate EOF */
152   ctx->input_fd = -1;
153   ctx->output_fd = -1;
154
155   ctx->inbound.fd = -1;
156   ctx->outbound.fd = -1;
157
158   ctx->io = &io;
159
160   ctx->listen_fd = -1;
161   ctx->connected_fd = fd;
162   ctx->deinit_handler = deinit_socket_server;
163   ctx->accept_handler = accept_connection_bottom;
164   ctx->finish_handler = finish_connection;
165
166   rc = _assuan_register_std_commands (ctx);
167   if (rc)
168     xfree (ctx);
169   else
170     *r_ctx = ctx;
171   return rc;
172 }
173
174