This is the mail archive of the gdb-patches@sourceware.org mailing list for the GDB project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [PATCH] An implementation of pipe to make I/O communication between gdb and shell.


On Sat, Aug 6, 2011 at 2:41 AM, Abhijit Halder
<abhijit.k.halder@gmail.com> wrote:
> On Fri, Aug 5, 2011 at 8:42 PM, Eli Zaretskii <eliz@gnu.org> wrote:
>>> Date: Fri, 5 Aug 2011 20:35:40 +0530
>>> From: Abhijit Halder <abhijit.k.halder@gmail.com>
>>> Cc: Pedro Alves <pedro@codesourcery.com>, gdb-patches@sourceware.org, ? ? ? ? Sergio Durigan Junior <sergiodj@redhat.com>, Jan Kratochvil <jan.kratochvil@redhat.com>
>>>
>>> Further, pexecute does not provide similar functionality. It just
>>> executes a program and returns the status of the program, not
>>> provide the text output from the program it executes.
>>
>> ??? Did you read the documentation (on libiberty/pexecute.txh)?
>> pexecute certainly does more than that!
> Thanks for the reference. Yes I have found the one I was looking for.
>>
>
I have changed the earlier implementation of using popen, instead now
I am using libiberty. I have also incorporated other suggestions
during code review. Please review this new patch.

Thanks,
Abhijit Halder
diff -rup src/gdb/Makefile.in dst/gdb/Makefile.in
--- src/gdb/Makefile.in	2011-07-27 23:55:26.000000000 +0530
+++ dst/gdb/Makefile.in	2011-07-29 16:12:32.578048797 +0530
@@ -713,7 +713,7 @@ SFILES = ada-exp.y ada-lang.c ada-typepr
 	objc-exp.y objc-lang.c \
 	objfiles.c osabi.c observer.c osdata.c \
 	opencl-lang.c \
-	p-exp.y p-lang.c p-typeprint.c p-valprint.c parse.c printcmd.c \
+	p-exp.y p-lang.c p-typeprint.c p-valprint.c parse.c pipe.c printcmd.c \
 	proc-service.list progspace.c \
 	prologue-value.c psymtab.c \
 	regcache.c reggroups.c remote.c remote-fileio.c reverse.c \
@@ -870,7 +870,7 @@ COMMON_OBS = $(DEPFILES) $(CONFIG_OBS) $
 	mi-common.o \
 	event-loop.o event-top.o inf-loop.o completer.o \
 	gdbarch.o arch-utils.o gdbtypes.o osabi.o copying.o \
-	memattr.o mem-break.o target.o parse.o language.o buildsym.o \
+	memattr.o mem-break.o target.o parse.o pipe.o language.o buildsym.o \
 	findcmd.o \
 	std-regs.o \
 	signals.o \
diff -rup src/gdb/pipe.c dst/gdb/pipe.c
--- src/gdb/pipe.c	2011-07-29 15:15:26.078048517 +0530
+++ dst/gdb/pipe.c	2011-08-06 15:05:02.816346435 +0530
@@ -0,0 +1,207 @@
+/* Everything about pipe, for GDB.
+
+   Copyright (C) 2011 Free Software Foundation, Inc.
+
+   This file is part of GDB.
+
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3 of the License, or
+   (at your option) any later version.
+
+   This program 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 General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
+
+#include "defs.h"
+#include <ctype.h>
+#include "gdb_string.h"
+#include "ui-file.h"
+#include "ui-out.h"
+#include "cli/cli-utils.h"
+#include "gdbcmd.h"
+#include "libiberty.h"
+
+/* Structure to encapsulate all entities associated with pipe.  */
+
+struct pipe_obj
+{
+  /* The delimiter to separate out gdb-command and shell-command. This can be
+     any arbitrary string without containing any whitespace.  */
+  char *dlim;
+
+  /* The gdb-command.  */
+  char *gdb_cmd;
+
+  /* The shell-command.  */
+  char *shell_cmd;
+
+  /* The gdb-side stream pointer to the pipe.  */
+  FILE *handle;
+
+  /* The pex object use to create pipeline between gdb and shell.  */
+  struct pex_obj *pex;
+};
+
+/* Construct a pipe object by parsing argument to the pipe command.  */
+
+static struct pipe_obj *
+construct_pipe (char *p)
+{
+  char *separator;
+  struct pipe_obj *pipe = NULL;
+  struct cleanup *cleanup;
+
+  if (p == NULL)
+    error (_("No argument is specified"));
+
+  pipe = XCNEW (struct pipe_obj);
+  cleanup = make_cleanup (xfree, pipe);
+
+  pipe->dlim = p;
+
+  p = skip_to_space (p);
+  if (*p != '\0') *p++ = '\0';
+
+  p = skip_spaces (p);
+  pipe->gdb_cmd = p;
+
+  if (*pipe->gdb_cmd == '\0')
+    error (_("No gdb-command is specified"));
+
+  for (pipe->shell_cmd = "";
+       (separator = skip_to_space (p)) != NULL;
+       p = skip_spaces (separator))
+    {
+      int mismatch = memcmp (p, pipe->dlim, (separator-p));
+
+      if (!mismatch)
+	{
+	  *p = '\0';
+	  pipe->shell_cmd = skip_spaces (separator);
+	  break;
+	}
+    }
+
+  if (*pipe->shell_cmd == '\0')
+    error (_("No shell-command is specified"));
+
+  discard_cleanups (cleanup);
+
+  return pipe;
+}
+
+/* Run execute_command for P and FROM_TTY. Write output to the pipe, do not
+   display it to the screen.  */
+
+static void
+execute_command_to_pipe (struct pipe_obj *pipe, int from_tty)
+{
+  char **argv;
+  struct cleanup *cleanup;
+  struct ui_file *fp;
+
+  argv = gdb_buildargv (pipe->shell_cmd);
+  cleanup = make_cleanup_freeargv (argv);
+
+  pipe->pex = pex_init (PEX_USE_PIPES, argv[0], NULL);
+
+  if (pipe->pex == NULL)
+    do_cleanups (cleanup);
+
+  pipe->handle = pex_input_pipe (pipe->pex, 0);
+
+  if (pipe->handle == NULL)
+    error (_("Failed to create pipe"));
+
+    {
+      int status;
+      const char *err
+       = pex_run (pipe->pex,
+		  PEX_SEARCH | PEX_LAST | PEX_STDERR_TO_STDOUT,
+		  argv[0], argv,
+		  NULL, NULL,
+		  &status);
+      if (err)
+	error (_("Failed to execute %s"), argv[0]);
+
+      do_cleanups (cleanup);
+    }
+
+  cleanup = set_batch_flag_and_make_cleanup_restore_page_info ();
+  fp = stdio_fileopen (pipe->handle);
+  make_cleanup_ui_file_delete (fp);
+  make_cleanup_restore_ui_file (&gdb_stdout);
+  make_cleanup_restore_ui_file (&gdb_stderr);
+  make_cleanup_restore_ui_file (&gdb_stdlog);
+  make_cleanup_restore_ui_file (&gdb_stdtarg);
+  make_cleanup_restore_ui_file (&gdb_stdtargerr);
+
+  if (ui_out_redirect (uiout, fp) < 0)
+    warning (_("Current output protocol does not support redirection"));
+  else 
+    make_cleanup_ui_out_redirect_pop (uiout);
+
+  gdb_stdout = fp;
+  gdb_stderr = fp;
+  gdb_stdlog = fp;
+  gdb_stdtarg = fp;
+  gdb_stdtargerr = fp;
+  execute_command (pipe->gdb_cmd, from_tty);
+  do_cleanups (cleanup);
+}
+
+/* Destruct pipe object.  */
+
+static void
+destruct_pipe (void *arg)
+{
+  struct pipe_obj *pipe = (struct pipe_obj *)arg;
+
+  if (pipe->handle)
+    fclose (pipe->handle);
+
+  if (pipe->pex)
+    {
+      int status;
+
+      pex_get_status (pipe->pex, 1, &status);
+      pex_free (pipe->pex);
+    }
+
+  xfree (pipe);
+}
+
+/* Execute the pipe command.  */
+
+static void
+pipe_command (char *arg, int from_tty)
+{
+  struct pipe_obj *pipe = construct_pipe (arg);
+
+  if (pipe != NULL)
+    {
+      struct cleanup *cleanup = make_cleanup (destruct_pipe, pipe);
+
+      execute_command_to_pipe (pipe, from_tty);
+      do_cleanups (cleanup);
+    }
+}
+
+/* Module initialization.  */
+
+void
+_initialize_pipe (void)
+{
+  add_cmd ("pipe", no_class, pipe_command, _("\
+Create pipe to pass gdb-command output to the shell for processing.\n\
+Arguments are a delimiter, followed by a gdb-command, then the same delimiter \
+again and finally a shell-command."),
+	   &cmdlist);
+}

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]