* import.c (import_print_stats): Print new non_imported counter
[gnupg.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
102
103 /* Initialize a server for the socket LISTEN_FD which has already be
104    put into listen mode */
105 int
106 assuan_init_socket_server (ASSUAN_CONTEXT *r_ctx, int listen_fd)
107 {
108   ASSUAN_CONTEXT ctx;
109   int rc;
110
111   *r_ctx = NULL;
112   ctx = xtrycalloc (1, sizeof *ctx);
113   if (!ctx)
114     return ASSUAN_Out_Of_Core;
115   ctx->is_server = 1;
116   ctx->input_fd = -1;
117   ctx->output_fd = -1;
118
119   ctx->inbound.fd = -1;
120   ctx->outbound.fd = -1;
121
122   ctx->listen_fd = listen_fd;
123   ctx->connected_fd = -1;
124   ctx->deinit_handler = deinit_socket_server;
125   ctx->accept_handler = accept_connection;
126   ctx->finish_handler = finish_connection;
127
128   rc = _assuan_register_std_commands (ctx);
129   if (rc)
130     xfree (ctx);
131   else
132     *r_ctx = ctx;
133   return rc;
134 }
135
136 /* Initialize a server using the already accepted socket FD. */
137 int
138 assuan_init_connected_socket_server (ASSUAN_CONTEXT *r_ctx, int fd)
139 {
140   ASSUAN_CONTEXT ctx;
141   int rc;
142
143   *r_ctx = NULL;
144   ctx = xtrycalloc (1, sizeof *ctx);
145   if (!ctx)
146     return ASSUAN_Out_Of_Core;
147   ctx->is_server = 1;
148   ctx->pipe_mode = 1; /* we wan't a second accept to indicate EOF */
149   ctx->input_fd = -1;
150   ctx->output_fd = -1;
151
152   ctx->inbound.fd = -1;
153   ctx->outbound.fd = -1;
154
155   ctx->listen_fd = -1;
156   ctx->connected_fd = fd;
157   ctx->deinit_handler = deinit_socket_server;
158   ctx->accept_handler = accept_connection_bottom;
159   ctx->finish_handler = finish_connection;
160
161   rc = _assuan_register_std_commands (ctx);
162   if (rc)
163     xfree (ctx);
164   else
165     *r_ctx = ctx;
166   return rc;
167 }
168
169