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"
29 #include "tuiCommand.h"
34 /* Called instead of fputs for all TUI_FILE output. */
36 void (*fputs_unfiltered_hook
) (const char *linebuffer
,
37 struct ui_file
* stream
);
39 /* A ``struct ui_file'' that is compatible with all the legacy
53 enum streamtype ts_streamtype
;
59 static ui_file_flush_ftype tui_file_flush
;
60 extern ui_file_fputs_ftype tui_file_fputs
;
61 static ui_file_isatty_ftype tui_file_isatty
;
62 static ui_file_rewind_ftype tui_file_rewind
;
63 static ui_file_put_ftype tui_file_put
;
64 static ui_file_delete_ftype tui_file_delete
;
65 static struct ui_file
*tui_file_new
PARAMS ((void));
66 static int tui_file_magic
;
68 static struct ui_file
*
71 struct tui_stream
*tui
= xmalloc (sizeof (struct tui_stream
));
72 struct ui_file
*file
= ui_file_new ();
73 set_ui_file_data (file
, tui
, tui_file_delete
);
74 set_ui_file_flush (file
, tui_file_flush
);
75 set_ui_file_fputs (file
, tui_file_fputs
);
76 set_ui_file_isatty (file
, tui_file_isatty
);
77 set_ui_file_rewind (file
, tui_file_rewind
);
78 set_ui_file_put (file
, tui_file_put
);
79 tui
->ts_magic
= &tui_file_magic
;
84 tui_file_delete (file
)
87 struct tui_stream
*tmpstream
= ui_file_data (file
);
88 if (tmpstream
->ts_magic
!= &tui_file_magic
)
89 internal_error ("tui_file_delete: bad magic number");
90 if ((tmpstream
->ts_streamtype
== astring
) &&
91 (tmpstream
->ts_strbuf
!= NULL
))
93 free (tmpstream
->ts_strbuf
);
102 struct ui_file
*file
= tui_file_new ();
103 struct tui_stream
*tmpstream
= ui_file_data (file
);
104 tmpstream
->ts_streamtype
= afile
;
105 tmpstream
->ts_filestream
= stream
;
106 tmpstream
->ts_strbuf
= NULL
;
107 tmpstream
->ts_buflen
= 0;
115 struct ui_file
*file
= tui_file_new ();
116 struct tui_stream
*tmpstream
= ui_file_data (file
);
117 tmpstream
->ts_streamtype
= astring
;
118 tmpstream
->ts_filestream
= NULL
;
121 tmpstream
->ts_strbuf
= xmalloc ((n
+ 1) * sizeof (char));
122 tmpstream
->ts_strbuf
[0] = '\0';
125 /* Do not allocate the buffer now. The first time something is printed
126 one will be allocated by tui_file_adjust_strbuf() */
127 tmpstream
->ts_strbuf
= NULL
;
128 tmpstream
->ts_buflen
= n
;
133 tui_file_isatty (file
)
134 struct ui_file
*file
;
136 struct tui_stream
*stream
= ui_file_data (file
);
137 if (stream
->ts_magic
!= &tui_file_magic
)
138 internal_error ("tui_file_isatty: bad magic number");
139 if (stream
->ts_streamtype
== afile
)
140 return (isatty (fileno (stream
->ts_filestream
)));
146 tui_file_rewind (file
)
147 struct ui_file
*file
;
149 struct tui_stream
*stream
= ui_file_data (file
);
150 if (stream
->ts_magic
!= &tui_file_magic
)
151 internal_error ("tui_file_rewind: bad magic number");
152 stream
->ts_strbuf
[0] = '\0';
156 tui_file_put (struct ui_file
*file
,
157 ui_file_put_method_ftype
*write
,
160 struct tui_stream
*stream
= ui_file_data (file
);
161 if (stream
->ts_magic
!= &tui_file_magic
)
162 internal_error ("tui_file_put: bad magic number");
163 if (stream
->ts_streamtype
== astring
)
164 write (dest
, stream
->ts_strbuf
, strlen (stream
->ts_strbuf
));
167 /* All TUI I/O sent to the *_filtered and *_unfiltered functions
168 eventually ends up here. The fputs_unfiltered_hook is primarily
169 used by GUIs to collect all output and send it to the GUI, instead
170 of the controlling terminal. Only output to gdb_stdout and
171 gdb_stderr are sent to the hook. Everything else is sent on to
172 fputs to allow file I/O to be handled appropriately. */
174 /* FIXME: Should be broken up and moved to a TUI specific file. */
177 tui_file_fputs (linebuffer
, file
)
178 const char *linebuffer
;
179 struct ui_file
*file
;
181 struct tui_stream
*stream
= ui_file_data (file
);
183 extern int tui_owns_terminal
;
185 /* NOTE: cagney/1999-10-13: The use of fputs_unfiltered_hook is
186 seriously discouraged. Those wanting to hook output should
187 instead implement their own ui_file object and install that. See
188 also tui_file_flush(). */
189 if (fputs_unfiltered_hook
190 && (file
== gdb_stdout
191 || file
== gdb_stderr
))
192 fputs_unfiltered_hook (linebuffer
, file
);
196 if (tui_version
&& tui_owns_terminal
)
198 /* If we get here somehow while updating the TUI (from
199 * within a tuiDo(), then we need to temporarily
200 * set up the terminal for GDB output. This probably just
201 * happens on error output.
204 if (stream
->ts_streamtype
== astring
)
206 tui_file_adjust_strbuf (strlen (linebuffer
), file
);
207 strcat (stream
->ts_strbuf
, linebuffer
);
211 tuiTermUnsetup (0, (tui_version
) ? cmdWin
->detail
.commandInfo
.curch
: 0);
212 fputs (linebuffer
, stream
->ts_filestream
);
214 if (linebuffer
[strlen (linebuffer
) - 1] == '\n')
215 tuiClearCommandCharCount ();
217 tuiIncrCommandCharCountBy (strlen (linebuffer
));
222 /* The normal case - just do a fputs() */
223 if (stream
->ts_streamtype
== astring
)
225 tui_file_adjust_strbuf (strlen (linebuffer
), file
);
226 strcat (stream
->ts_strbuf
, linebuffer
);
229 fputs (linebuffer
, stream
->ts_filestream
);
234 if (stream
->ts_streamtype
== astring
)
236 tui_file_adjust_strbuf (strlen (linebuffer
), file
);
237 strcat (stream
->ts_strbuf
, linebuffer
);
240 fputs (linebuffer
, stream
->ts_filestream
);
246 tui_file_get_strbuf (struct ui_file
*file
)
248 struct tui_stream
*stream
= ui_file_data (file
);
249 if (stream
->ts_magic
!= &tui_file_magic
)
250 internal_error ("tui_file_get_strbuf: bad magic number");
251 return (stream
->ts_strbuf
);
254 /* adjust the length of the buffer by the amount necessary
255 to accomodate appending a string of length N to the buffer contents */
257 tui_file_adjust_strbuf (int n
, struct ui_file
*file
)
259 struct tui_stream
*stream
= ui_file_data (file
);
261 if (stream
->ts_magic
!= &tui_file_magic
)
262 internal_error ("tui_file_adjust_strbuf: bad magic number");
264 if (stream
->ts_streamtype
!= astring
)
267 if (stream
->ts_strbuf
)
269 /* There is already a buffer allocated */
270 non_null_chars
= strlen (stream
->ts_strbuf
);
272 if (n
> (stream
->ts_buflen
- non_null_chars
- 1))
274 stream
->ts_buflen
= n
+ non_null_chars
+ 1;
275 stream
->ts_strbuf
= xrealloc (stream
->ts_strbuf
, stream
->ts_buflen
);
279 /* No buffer yet, so allocate one of the desired size */
280 stream
->ts_strbuf
= xmalloc ((n
+ 1) * sizeof (char));
284 tui_file_flush (file
)
285 struct ui_file
*file
;
287 struct tui_stream
*stream
= ui_file_data (file
);
288 if (stream
->ts_magic
!= &tui_file_magic
)
289 internal_error ("tui_file_flush: bad magic number");
291 /* NOTE: cagney/1999-10-12: If we've been linked with code that uses
292 fputs_unfiltered_hook then we assume that it doesn't need to know
293 about flushes. Code that does need to know about flushes can
294 implement a proper ui_file object. */
295 if (fputs_unfiltered_hook
)
298 switch (stream
->ts_streamtype
)
303 fflush (stream
->ts_filestream
);