Import gdb-7.0
[dragonfly.git] / contrib / gdb-6 / gdb / mi / mi-console.c
1 /* MI Console code.
2
3    Copyright (C) 2000, 2001, 2002, 2007 Free Software Foundation, Inc.
4
5    Contributed by Cygnus Solutions (a Red Hat company).
6
7    This file is part of GDB.
8
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18
19    You should have received a copy of the GNU General Public License
20    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
21
22 #include "defs.h"
23 #include "mi-console.h"
24 #include "gdb_string.h"
25
26 /* MI-console: send output to std-out but correcty encapsulated */
27
28 static ui_file_fputs_ftype mi_console_file_fputs;
29 static ui_file_flush_ftype mi_console_file_flush;
30 static ui_file_delete_ftype mi_console_file_delete;
31
32 struct mi_console_file
33   {
34     int *magic;
35     struct ui_file *raw;
36     struct ui_file *buffer;
37     const char *prefix;
38     char quote;
39   };
40
41 int mi_console_file_magic;
42
43 struct ui_file *
44 mi_console_file_new (struct ui_file *raw,
45                      const char *prefix, char quote)
46 {
47   struct ui_file *ui_file = ui_file_new ();
48   struct mi_console_file *mi_console = XMALLOC (struct mi_console_file);
49   mi_console->magic = &mi_console_file_magic;
50   mi_console->raw = raw;
51   mi_console->buffer = mem_fileopen ();
52   mi_console->prefix = prefix;
53   mi_console->quote = quote;
54   set_ui_file_fputs (ui_file, mi_console_file_fputs);
55   set_ui_file_flush (ui_file, mi_console_file_flush);
56   set_ui_file_data (ui_file, mi_console, mi_console_file_delete);
57   return ui_file;
58 }
59
60 static void
61 mi_console_file_delete (struct ui_file *file)
62 {
63   struct mi_console_file *mi_console = ui_file_data (file);
64   if (mi_console->magic != &mi_console_file_magic)
65     internal_error (__FILE__, __LINE__,
66                     _("mi_console_file_delete: bad magic number"));
67   xfree (mi_console);
68 }
69
70 static void
71 mi_console_file_fputs (const char *buf,
72                        struct ui_file *file)
73 {
74   struct mi_console_file *mi_console = ui_file_data (file);
75   if (mi_console->magic != &mi_console_file_magic)
76     internal_error (__FILE__, __LINE__,
77                     "mi_console_file_fputs: bad magic number");
78   /* Append the text to our internal buffer */
79   fputs_unfiltered (buf, mi_console->buffer);
80   /* Flush when an embedded \n */
81   if (strchr (buf, '\n') != NULL)
82     gdb_flush (file);
83 }
84
85 /* Transform a byte sequence into a console output packet. */
86 static void
87 mi_console_raw_packet (void *data,
88                        const char *buf,
89                        long length_buf)
90 {
91   struct mi_console_file *mi_console = data;
92   if (mi_console->magic != &mi_console_file_magic)
93     internal_error (__FILE__, __LINE__,
94                     _("mi_console_file_transform: bad magic number"));
95
96   if (length_buf > 0)
97     {
98       fputs_unfiltered (mi_console->prefix, mi_console->raw);
99       if (mi_console->quote)
100         {
101           fputs_unfiltered ("\"", mi_console->raw);
102           fputstrn_unfiltered (buf, length_buf, mi_console->quote, mi_console->raw);
103           fputs_unfiltered ("\"\n", mi_console->raw);
104         }
105       else
106         {
107           fputstrn_unfiltered (buf, length_buf, 0, mi_console->raw);
108           fputs_unfiltered ("\n", mi_console->raw);
109         }
110       gdb_flush (mi_console->raw);
111     }
112 }
113
114 static void
115 mi_console_file_flush (struct ui_file *file)
116 {
117   struct mi_console_file *mi_console = ui_file_data (file);
118   if (mi_console->magic != &mi_console_file_magic)
119     internal_error (__FILE__, __LINE__,
120                     _("mi_console_file_flush: bad magic number"));
121   ui_file_put (mi_console->buffer, mi_console_raw_packet, mi_console);
122   ui_file_rewind (mi_console->buffer);
123 }