aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--tests/fdpassing-socket.c357
1 files changed, 357 insertions, 0 deletions
diff --git a/tests/fdpassing-socket.c b/tests/fdpassing-socket.c
new file mode 100644
index 0000000..251c609
--- /dev/null
+++ b/tests/fdpassing-socket.c
@@ -0,0 +1,357 @@
+/* fdpassing - Check the file descriptor passing.
+ Copyright (C) 2006, 2009 Free Software Foundation, Inc.
+
+ This file is part of Assuan.
+
+ Assuan is free software; you can redistribute it and/or modify it
+ under the terms of the GNU Lesser General Public License as
+ published by the Free Software Foundation; either version 3 of
+ the License, or (at your option) any later version.
+
+ Assuan is distributed in the hope that it will be useful, but
+ WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ Lesser General Public License for more details.
+
+ You should have received a copy of the GNU Lesser General Public
+ License along with this program; if not, see <http://www.gnu.org/licenses/>.
+ */
+#ifdef HAVE_CONFIG_H
+#include <config.h>
+#endif
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <assert.h>
+#include <sys/stat.h>
+#if HAVE_W32_SYSTEM
+# define WIN32_LEAN_AND_MEAN
+# include <windows.h>
+# include <wincrypt.h>
+# include <io.h>
+#endif
+#include <unistd.h>
+#include <errno.h>
+
+#include "../src/assuan.h"
+#include "common.h"
+
+
+/*
+
+ S E R V E R
+
+*/
+
+static gpg_error_t
+cmd_echo (assuan_context_t ctx, char *line)
+{
+ assuan_fd_t fd;
+ int c;
+ estream_t fp;
+ int nbytes;
+
+ log_info ("got ECHO command (%s)\n", line);
+
+ fd = assuan_get_input_fd (ctx);
+ if (fd == ASSUAN_INVALID_FD)
+ return gpg_error (GPG_ERR_ASS_NO_INPUT);
+ fp = gpgrt_fdopen ((int)fd, "r");
+ if (!fp)
+ {
+ log_error ("fdopen failed on input fd: %s\n", strerror (errno));
+ return gpg_error (GPG_ERR_ASS_GENERAL);
+ }
+ nbytes = 0;
+ while ( (c = gpgrt_fgetc (fp)) != -1)
+ {
+ putc (c, stderr);
+ nbytes++;
+ }
+ fflush (stderr);
+ log_info ("done printing %d bytes to stderr\n", nbytes);
+
+ gpgrt_fclose (fp);
+ return 0;
+}
+
+static gpg_error_t
+register_commands (assuan_context_t ctx)
+{
+ static struct
+ {
+ const char *name;
+ gpg_error_t (*handler) (assuan_context_t, char *line);
+ } table[] =
+ {
+ { "ECHO", cmd_echo },
+ { "INPUT", NULL },
+ { "OUTPUT", NULL },
+ { NULL, NULL }
+ };
+ int i;
+ gpg_error_t rc;
+
+ for (i=0; table[i].name; i++)
+ {
+ rc = assuan_register_command (ctx, table[i].name, table[i].handler, NULL);
+ if (rc)
+ return rc;
+ }
+ return 0;
+}
+
+
+#define SUN_LEN(ptr) ((size_t) (( \
+ + strlen ((ptr)->sun_path))
+
+static assuan_sock_nonce_t socket_nonce;
+
+static void
+server (const char *socketname)
+{
+ int rc;
+ assuan_context_t ctx;
+ assuan_fd_t fd;
+ struct sockaddr_un unaddr_struct;
+ struct sockaddr *addr;
+ socklen_t len;
+
+ log_info ("server started\n");
+
+ fd = assuan_sock_new (AF_UNIX, SOCK_STREAM, 0);
+ if (fd == ASSUAN_INVALID_FD)
+ log_fatal ("assuan_sock_new failed\n");
+
+ addr = (struct sockaddr *)&unaddr_struct;
+ rc = assuan_sock_set_sockaddr_un (socketname, addr, NULL);
+ if (rc)
+ {
+ assuan_sock_close (fd);
+ log_fatal ("assuan_sock_set_sockaddr_un failed: %s\n", gpg_strerror (rc));
+ }
+
+ len = offsetof (struct sockaddr_un, sun_path)
+ + strlen (unaddr_struct.sun_path);
+ rc = assuan_sock_bind (fd, addr, len);
+ if (rc)
+ {
+ assuan_sock_close (fd);
+ log_fatal ("assuan_sock_bind failed: %s\n", gpg_strerror (rc));
+ }
+
+ rc = assuan_sock_get_nonce (addr, len, &socket_nonce);
+ if (rc)
+ {
+ assuan_sock_close (fd);
+ log_fatal ("assuan_sock_get_nonce failed: %s\n", gpg_strerror (rc));
+ }
+
+ rc = listen (HANDLE2SOCKET (fd), 5);
+ if (rc < 0)
+ {
+ assuan_sock_close (fd);
+ log_fatal ("listen failed: %s\n",
+ gpg_strerror (gpg_error_from_syserror ()));
+ }
+
+ rc = assuan_new (&ctx);
+ if (rc)
+ log_fatal ("assuan_new failed: %s\n", gpg_strerror (rc));
+
+ rc = assuan_init_socket_server (ctx, fd, 0);
+ if (rc)
+ log_fatal ("assuan_init_socket_server failed: %s\n", gpg_strerror (rc));
+
+ assuan_set_sock_nonce (ctx, &socket_nonce);
+
+ rc = register_commands (ctx);
+ if (rc)
+ log_fatal ("register_commands failed: %s\n", gpg_strerror(rc));
+
+ assuan_set_log_stream (ctx, stderr);
+
+ for (;;)
+ {
+ rc = assuan_accept (ctx);
+ if (rc)
+ {
+ if (rc != -1)
+ log_error ("assuan_accept failed: %s\n", gpg_strerror (rc));
+ break;
+ }
+
+ log_info ("client connected. Client's pid is %ld\n",
+ (long)assuan_get_pid (ctx));
+
+ rc = assuan_process (ctx);
+ if (rc)
+ log_error ("assuan_process failed: %s\n", gpg_strerror (rc));
+ }
+
+ assuan_release (ctx);
+}
+
+
+
+
+/*
+
+ C L I E N T
+
+*/
+
+
+/* Client main. If true is returned, a disconnect has not been done. */
+static int
+client (assuan_context_t ctx, const char *fname)
+{
+ int rc;
+ estream_t fp;
+ int i;
+
+ log_info ("client started. Servers's pid is %ld\n",
+ (long)assuan_get_pid (ctx));
+
+ for (i=0; i < 6; i++)
+ {
+ fp = gpgrt_fopen (fname, "r");
+ if (!fp)
+ {
+ log_error ("failed to open `%s': %s\n", fname,
+ strerror (errno));
+ return -1;
+ }
+
+ rc = assuan_sendfd (ctx, (assuan_fd_t)gpgrt_fileno (fp));
+ if (rc)
+ {
+ gpgrt_fclose (fp);
+ log_error ("assuan_sendfd failed: %s\n", gpg_strerror (rc));
+ return -1;
+ }
+ gpgrt_fclose (fp);
+
+ rc = assuan_transact (ctx, "INPUT FD", NULL, NULL, NULL, NULL,
+ NULL, NULL);
+ if (rc)
+ {
+ log_error ("sending INPUT FD failed: %s\n", gpg_strerror (rc));
+ return -1;
+ }
+
+ rc = assuan_transact (ctx, "ECHO", NULL, NULL, NULL, NULL, NULL, NULL);
+ if (rc)
+ {
+ log_error ("sending ECHO failed: %s\n", gpg_strerror (rc));
+ return -1;
+ }
+ }
+
+ /* Give us some time to check with lsof that all descriptors are closed. */
+/* sleep (10); */
+
+ assuan_release (ctx);
+ return 0;
+}
+
+
+
+
+/*
+
+ M A I N
+
+*/
+int
+main (int argc, char **argv)
+{
+ int last_argc = -1;
+ assuan_context_t ctx;
+ gpg_error_t err;
+ int is_server = 0;
+ char *fname = prepend_srcdir ("motd");
+ const char *socketname = NULL;
+
+ if (argc)
+ {
+ log_set_prefix (*argv);
+ argc--; argv++;
+ }
+ while (argc && last_argc != argc )
+ {
+ last_argc = argc;
+ if (!strcmp (*argv, "--help"))
+ {
+ puts (
+"usage: ./fdpassing [options]\n"
+"\n"
+"Options:\n"
+" --verbose Show what is going on\n"
+" --socketname Specify the socket path.\n"
+);
+ exit (0);
+ }
+ if (!strcmp (*argv, "--verbose"))
+ {
+ verbose = 1;
+ argc--; argv++;
+ }
+ else if (!strcmp (*argv, "--debug"))
+ {
+ verbose = debug = 1;
+ argc--; argv++;
+ }
+ else if (!strcmp (*argv, "--server"))
+ {
+ is_server = 1;
+ argc--; argv++;
+ }
+ else if (!strcmp (*argv, "--socketname"))
+ {
+ argc--; argv++;
+ if (argc)
+ {
+ socketname = *argv++;
+ argc--;
+ }
+ }
+ }
+
+
+ assuan_sock_init ();
+ assuan_set_assuan_log_prefix (log_prefix);
+
+ if (is_server)
+ {
+ server (socketname);
+ log_info ("server finished\n");
+ }
+ else
+ {
+ err = assuan_new (&ctx);
+ if (err)
+ log_fatal ("assuan_new failed: %s\n", gpg_strerror (err));
+
+ err = assuan_socket_connect (ctx, socketname, 0, 0);
+ if (err)
+ {
+ log_error ("assuan_socket_connect failed: %s\n", gpg_strerror (err));
+ assuan_release (ctx);
+ errorcount++;
+ }
+ else
+ {
+ if (client (ctx, fname))
+ {
+ log_info ("waiting for server to terminate...\n");
+ assuan_release (ctx);
+ }
+ log_info ("client finished\n");
+ }
+ }
+
+ xfree (fname);
+ return errorcount ? 1 : 0;
+}