1 /* UI_FILE - a generic STDIO like output stream.
2 Copyright (C) 1999, 2000 Free Software Foundation, Inc.
4 This file is part of GDB.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
23 #include "tui/tui-file.h"
27 /* Called instead of fputs for all TUI_FILE output. */
29 void (*fputs_unfiltered_hook
) (const char *linebuffer
,
30 struct ui_file
* stream
);
32 /* A ``struct ui_file'' that is compatible with all the legacy
46 enum streamtype ts_streamtype
;
52 static ui_file_flush_ftype tui_file_flush
;
53 extern ui_file_fputs_ftype tui_file_fputs
;
54 static ui_file_isatty_ftype tui_file_isatty
;
55 static ui_file_rewind_ftype tui_file_rewind
;
56 static ui_file_put_ftype tui_file_put
;
57 static ui_file_delete_ftype tui_file_delete
;
58 static struct ui_file
*tui_file_new
PARAMS ((void));
59 static int tui_file_magic
;
61 static struct ui_file
*
64 struct tui_stream
*tui
= xmalloc (sizeof (struct tui_stream
));
65 struct ui_file
*file
= ui_file_new ();
66 set_ui_file_data (file
, tui
, tui_file_delete
);
67 set_ui_file_flush (file
, tui_file_flush
);
68 set_ui_file_fputs (file
, tui_file_fputs
);
69 set_ui_file_isatty (file
, tui_file_isatty
);
70 set_ui_file_rewind (file
, tui_file_rewind
);
71 set_ui_file_put (file
, tui_file_put
);
72 tui
->ts_magic
= &tui_file_magic
;
77 tui_file_delete (file
)
80 struct tui_stream
*tmpstream
= ui_file_data (file
);
81 if (tmpstream
->ts_magic
!= &tui_file_magic
)
82 internal_error ("tui_file_delete: bad magic number");
83 if ((tmpstream
->ts_streamtype
== astring
) &&
84 (tmpstream
->ts_strbuf
!= NULL
))
86 free (tmpstream
->ts_strbuf
);
95 struct ui_file
*file
= tui_file_new ();
96 struct tui_stream
*tmpstream
= ui_file_data (file
);
97 tmpstream
->ts_streamtype
= afile
;
98 tmpstream
->ts_filestream
= stream
;
99 tmpstream
->ts_strbuf
= NULL
;
100 tmpstream
->ts_buflen
= 0;
108 struct ui_file
*file
= tui_file_new ();
109 struct tui_stream
*tmpstream
= ui_file_data (file
);
110 tmpstream
->ts_streamtype
= astring
;
111 tmpstream
->ts_filestream
= NULL
;
114 tmpstream
->ts_strbuf
= xmalloc ((n
+ 1) * sizeof (char));
115 tmpstream
->ts_strbuf
[0] = '\0';
118 /* Do not allocate the buffer now. The first time something is printed
119 one will be allocated by tui_file_adjust_strbuf() */
120 tmpstream
->ts_strbuf
= NULL
;
121 tmpstream
->ts_buflen
= n
;
126 tui_file_isatty (file
)
127 struct ui_file
*file
;
129 struct tui_stream
*stream
= ui_file_data (file
);
130 if (stream
->ts_magic
!= &tui_file_magic
)
131 internal_error ("tui_file_isatty: bad magic number");
132 if (stream
->ts_streamtype
== afile
)
133 return (isatty (fileno (stream
->ts_filestream
)));
139 tui_file_rewind (file
)
140 struct ui_file
*file
;
142 struct tui_stream
*stream
= ui_file_data (file
);
143 if (stream
->ts_magic
!= &tui_file_magic
)
144 internal_error ("tui_file_rewind: bad magic number");
145 stream
->ts_strbuf
[0] = '\0';
149 tui_file_put (struct ui_file
*file
,
150 ui_file_put_method_ftype
*write
,
153 struct tui_stream
*stream
= ui_file_data (file
);
154 if (stream
->ts_magic
!= &tui_file_magic
)
155 internal_error ("tui_file_put: bad magic number");
156 if (stream
->ts_streamtype
== astring
)
157 write (dest
, stream
->ts_strbuf
, strlen (stream
->ts_strbuf
));
160 /* All TUI I/O sent to the *_filtered and *_unfiltered functions
161 eventually ends up here. The fputs_unfiltered_hook is primarily
162 used by GUIs to collect all output and send it to the GUI, instead
163 of the controlling terminal. Only output to gdb_stdout and
164 gdb_stderr are sent to the hook. Everything else is sent on to
165 fputs to allow file I/O to be handled appropriately. */
167 /* FIXME: Should be broken up and moved to a TUI specific file. */
170 tui_file_fputs (linebuffer
, file
)
171 const char *linebuffer
;
172 struct ui_file
*file
;
174 struct tui_stream
*stream
= ui_file_data (file
);
176 extern int tui_owns_terminal
;
178 /* NOTE: cagney/1999-10-13: The use of fputs_unfiltered_hook is
179 seriously discouraged. Those wanting to hook output should
180 instead implement their own ui_file object and install that. See
181 also tui_file_flush(). */
182 if (fputs_unfiltered_hook
183 && (file
== gdb_stdout
184 || file
== gdb_stderr
))
185 fputs_unfiltered_hook (linebuffer
, file
);
189 if (tui_version
&& tui_owns_terminal
)
191 /* If we get here somehow while updating the TUI (from
192 * within a tuiDo(), then we need to temporarily
193 * set up the terminal for GDB output. This probably just
194 * happens on error output.
197 if (stream
->ts_streamtype
== astring
)
199 tui_file_adjust_strbuf (strlen (linebuffer
), stream
);
200 strcat (stream
->ts_strbuf
, linebuffer
);
204 tuiTermUnsetup (0, (tui_version
) ? cmdWin
->detail
.commandInfo
.curch
: 0);
205 fputs (linebuffer
, stream
->ts_filestream
);
207 if (linebuffer
[strlen (linebuffer
) - 1] == '\n')
208 tuiClearCommandCharCount ();
210 tuiIncrCommandCharCountBy (strlen (linebuffer
));
215 /* The normal case - just do a fputs() */
216 if (stream
->ts_streamtype
== astring
)
218 tui_file_adjust_strbuf (strlen (linebuffer
), stream
);
219 strcat (stream
->ts_strbuf
, linebuffer
);
222 fputs (linebuffer
, stream
->ts_filestream
);
227 if (stream
->ts_streamtype
== astring
)
229 tui_file_adjust_strbuf (strlen (linebuffer
), file
);
230 strcat (stream
->ts_strbuf
, linebuffer
);
233 fputs (linebuffer
, stream
->ts_filestream
);
239 tui_file_get_strbuf (struct ui_file
*file
)
241 struct tui_stream
*stream
= ui_file_data (file
);
242 if (stream
->ts_magic
!= &tui_file_magic
)
243 internal_error ("tui_file_get_strbuf: bad magic number");
244 return (stream
->ts_strbuf
);
247 /* adjust the length of the buffer by the amount necessary
248 to accomodate appending a string of length N to the buffer contents */
250 tui_file_adjust_strbuf (int n
, struct ui_file
*file
)
252 struct tui_stream
*stream
= ui_file_data (file
);
254 if (stream
->ts_magic
!= &tui_file_magic
)
255 internal_error ("tui_file_adjust_strbuf: bad magic number");
257 if (stream
->ts_streamtype
!= astring
)
260 if (stream
->ts_strbuf
)
262 /* There is already a buffer allocated */
263 non_null_chars
= strlen (stream
->ts_strbuf
);
265 if (n
> (stream
->ts_buflen
- non_null_chars
- 1))
267 stream
->ts_buflen
= n
+ non_null_chars
+ 1;
268 stream
->ts_strbuf
= xrealloc (stream
->ts_strbuf
, stream
->ts_buflen
);
272 /* No buffer yet, so allocate one of the desired size */
273 stream
->ts_strbuf
= xmalloc ((n
+ 1) * sizeof (char));
277 tui_file_flush (file
)
278 struct ui_file
*file
;
280 struct tui_stream
*stream
= ui_file_data (file
);
281 if (stream
->ts_magic
!= &tui_file_magic
)
282 internal_error ("tui_file_flush: bad magic number");
284 /* NOTE: cagney/1999-10-12: If we've been linked with code that uses
285 fputs_unfiltered_hook then we assume that it doesn't need to know
286 about flushes. Code that does need to know about flushes can
287 implement a proper ui_file object. */
288 if (fputs_unfiltered_hook
)
291 switch (stream
->ts_streamtype
)
296 fflush (stream
->ts_filestream
);