ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/root-tail/root-tail.c
(Generate patch)

Comparing root-tail/root-tail.c (file contents):
Revision 1.20 by pcg, Sat Mar 27 20:42:40 2004 UTC vs.
Revision 1.63 by chris_moore, Thu Apr 15 00:38:13 2004 UTC

1/* 1/*
2 * Copyright 2001 by Marco d'Itri <md@linux.it> 2 * Copyright 2001 by Marco d'Itri <md@linux.it>
3 * Copyright 2000,2001,2002,2003,2004
4 * Marc Lehmann <pcg@goof.com>,
5 * Chris Moore <chris.moore@mail.com>,
6 * and many others, see README
3 * 7 *
4 * Original version by Mike Baker, then maintained by pcg@goof.com. 8 * Original version by Mike Baker.
5 * 9 *
6 * This program is free software; you can redistribute it and/or modify 10 * 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 11 * 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 12 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version. 13 * (at your option) any later version.
17 * along with this program; if not, write to the Free Software 21 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA. 22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
19 */ 23 */
20 24
21#include "config.h" 25#include "config.h"
26#include <assert.h>
22#include <stdlib.h> 27#include <stdlib.h>
23#include <stdio.h> 28#include <stdio.h>
24#include <unistd.h> 29#include <unistd.h>
25#include <string.h> 30#include <string.h>
26#include <signal.h> 31#include <signal.h>
31#include <sys/stat.h> 36#include <sys/stat.h>
32#include <sys/types.h> 37#include <sys/types.h>
33#include <locale.h> 38#include <locale.h>
34#include <ctype.h> 39#include <ctype.h>
35#include <stdarg.h> 40#include <stdarg.h>
41#include <X11/Xlib.h>
42#include <X11/Xatom.h>
43#include <X11/Xutil.h>
44
36#if HAS_REGEX 45#if HAS_REGEX
37#include <regex.h> 46#include <regex.h>
38#endif 47#endif
39#include <X11/Xlib.h> 48
40#include <X11/Xatom.h> 49#define SHADE_X 2
41#include <X11/Xutil.h> 50#define SHADE_Y 2
51
52/* some italic fonts still go over the margin - this margin of error cleans up the mess */
53#define MARGIN_OF_ERROR 2
42 54
43/* data structures */ 55/* data structures */
44struct logfile_entry 56struct logfile_entry
45{ 57{
46 struct logfile_entry *next; 58 struct logfile_entry *next;
47 59
48 char *fname; /* name of file */ 60 char *fname; /* name of file */
49 char *desc; /* alternative description */ 61 char *desc; /* alternative description */
50 char *buf; /* text read but not yet displayed */ 62 char *buf; /* text read but not yet displayed */
63 const char *fontname;
64 XFontSet fontset;
65 int font_height;
66 int font_ascent;
51 FILE *fp; /* FILE struct associated with file */ 67 FILE *fp; /* FILE struct associated with file */
52 ino_t inode; /* inode of the file opened */ 68 ino_t inode; /* inode of the file opened */
53 off_t last_size; /* file size at the last check */ 69 off_t last_size; /* file size at the last check */
54 unsigned long color; /* color to be used for printing */ 70 unsigned long color; /* color to be used for printing */
71 const char *colorname; /* color name/string */
55 int partial; /* true if the last line isn't complete */ 72 int partial; /* true if the last line isn't complete */
56 int lastpartial; /* true if the previous output wasn't complete */ 73 int lastpartial; /* true if the previous output wasn't complete */
57 int index; /* index into linematrix of a partial line */ 74 struct line_node *last; /* last line we output */
75 int modified; /* true if line is modified & needs displaying */
58}; 76};
59 77
78struct line_node
79{
80 struct line_node *next;
81 struct line_node *prev;
82 struct logfile_entry *logfile;
83
84 char *line; /* the text of the line (so far) */
85 int len; /* the length of the line (in bytes) so far */
86 int wrapped_left; /* true if wrapped from the previous line */
87 int wrapped_right; /* true if wrapped to the next line */
88 struct breakinfo *breaks; /* array of indicies to spaces if wrapped_right */
89 int num_words; /* the number of words in the line */
90 int free_pixels; /* the number of free pixels to spread out */
91};
92
93struct breakinfo
94{
95 int index; /* index into string of start of substring */
96 int width; /* width in pixels of start of substring */
97 int len; /* length of substring */
98};
99
60struct linematrix 100struct displaymatrix
61{ 101{
62 char *line; 102 char *line;
63 int len; 103 int len;
104 int offset;
105 int buffer_size;
64 unsigned long color; 106 unsigned long color;
65}; 107};
66 108
67/* global variables */ 109/* global variables */
68struct linematrix *lines; 110struct line_node *linelist = NULL, *linelist_tail = NULL;
111struct displaymatrix *display;
112int continuation_width = -1;
113int continuation_color;
114int continuation_length;
115
116/* HACK - ideally listlen will start at however many '~'s will fit on
117 * the screen */
69int width = STD_WIDTH, height = STD_HEIGHT, listlen; 118int width = STD_WIDTH, height = STD_HEIGHT, listlen = 50;
70int win_x = LOC_X, win_y = LOC_Y; 119int win_x = LOC_X, win_y = LOC_Y;
71int font_descent, font_height; 120int effect_x_space, effect_y_space; /* how much space does shading / outlining take up */
121int effect_x_offset, effect_y_offset; /* and how does it offset the usable space */
72int do_reopen; 122int do_reopen;
73struct timeval interval = { 3, 0 }; 123struct timeval interval = { 2, 400000 };
74XFontSet fontset;
75 124
76/* command line options */ 125/* command line options */
77int opt_noinitial, opt_shade, opt_frame, opt_reverse, opt_nofilename, 126int opt_noinitial, opt_shade, opt_frame, opt_reverse, opt_nofilename,
78 opt_whole, opt_update, geom_mask, reload = 0; 127 opt_outline, opt_noflicker, opt_whole, opt_update, opt_wordwrap,
128 opt_justify, geom_mask, opt_minspace, reload;
79const char *command = NULL, 129const char *command = NULL,
80 *fontname = USE_FONT, *dispname = NULL, *def_color = DEF_COLOR, 130 *fontname = USE_FONT, *dispname = NULL, *def_color = DEF_COLOR,
81 *continuation = "[+]"; 131 *continuation = "|| ", *cont_color = DEF_CONT_COLOR;
82 132
83struct logfile_entry *loglist = NULL, *loglist_tail = NULL; 133struct logfile_entry *loglist = NULL, *loglist_tail = NULL;
84 134
85Display *disp; 135Display *disp;
86Window root; 136Window root;
92 regex_t from; 142 regex_t from;
93 const char *to; 143 const char *to;
94 struct re_list *next; 144 struct re_list *next;
95}; 145};
96struct re_list *re_head, *re_tail; 146struct re_list *re_head, *re_tail;
147char *transform_to = NULL;
148regex_t *transformre;
97#endif 149#endif
98 150
99 151
100/* prototypes */ 152/* prototypes */
101void list_files (int); 153void list_files (int);
102void force_reopen (int); 154void force_reopen (int);
103void force_refresh (int); 155void force_refresh (int);
104void blank_window (int); 156void blank_window (int);
157#ifdef USE_TOON_GET_ROOT_WINDOW
158Window ToonGetRootWindow(Display *, int, Window *);
159#endif /* USE_TOON_GET_ROOT_WINDOW */
105 160
106void InitWindow (void); 161void InitWindow (void);
107unsigned long GetColor (const char *); 162unsigned long GetColor (const char *);
108void redraw (void); 163void redraw (int);
109void refresh (int, int); 164void refresh (int, int, int, int);
110 165
111void transform_line (char *s); 166void transform_line (char *s);
112int lineinput (struct logfile_entry *); 167int lineinput (struct logfile_entry *);
113void reopen (void); 168void reopen (void);
114void check_open_files (void); 169void check_open_files (void);
118void display_version (void); 173void display_version (void);
119void display_help (char *); 174void display_help (char *);
120void install_signal (int, void (*)(int)); 175void install_signal (int, void (*)(int));
121void *xstrdup (const char *); 176void *xstrdup (const char *);
122void *xmalloc (size_t); 177void *xmalloc (size_t);
178void *xrealloc (void *, size_t);
123int daemonize (void); 179int daemonize (void);
124 180
125/* signal handlers */ 181/* signal handlers */
126void 182void
127list_files (int dummy) 183list_files (int dummy)
140} 196}
141 197
142void 198void
143force_refresh (int dummy) 199force_refresh (int dummy)
144{ 200{
145 redraw (); 201 redraw (1);
146} 202}
147 203
148void 204void
149blank_window (int dummy) 205blank_window (int dummy)
150{ 206{
151 XClearArea (disp, root, win_x - 2, win_y - 2, width + 5, height + 5, False); 207 XClearArea (disp, root, win_x, win_y, width + MARGIN_OF_ERROR, height, False);
152 XFlush (disp); 208 XFlush (disp);
153 exit (0); 209 exit (0);
154} 210}
155 211
156/* X related functions */ 212/* X related functions */
169 fprintf (stderr, "can't allocate %s\n", ColorName); 225 fprintf (stderr, "can't allocate %s\n", ColorName);
170 226
171 return Color.pixel; 227 return Color.pixel;
172} 228}
173 229
230#ifndef USE_TOON_GET_ROOT_WINDOW
174static Window 231static void
175root_window (Display * display, int screen_number) 232find_root_window (Display *display, int screen_number)
176{ 233{
234 if (!root)
235 {
177 Atom SWM_VROOT = XInternAtom (display, "__SWM_VROOT", False); 236 Atom SWM_VROOT = XInternAtom (display, "__SWM_VROOT", False);
237 Atom NAUTILUS_DESKTOP_WINDOW_ID = XInternAtom (display, "NAUTILUS_DESKTOP_WINDOW_ID", False);
178 Window real_root_window = RootWindow (display, screen_number); 238 root = RootWindow (display, screen_number);
179 239
180 if (root) /* root window set via option */
181 return root;
182
183 if (SWM_VROOT != None)
184 {
185 Window unused, *windows; 240 Window unused, *windows = 0;
186 unsigned int count; 241 unsigned int count;
187 242
243 Atom type;
244 int format;
245 unsigned long nitems, bytes_after_return;
246 unsigned char *virtual_root_window;
247
248 if (XGetWindowProperty (display, root, NAUTILUS_DESKTOP_WINDOW_ID,
249 0, 1, False, XA_WINDOW, &type, &format,
250 &nitems, &bytes_after_return,
251 &virtual_root_window) == Success
252 && type == XA_WINDOW)
253 {
188 if (XQueryTree (display, real_root_window, &unused, &unused, &windows, 254 if (XQueryTree (display, *(Window *)virtual_root_window, &unused, &unused, &windows, &count))
189 &count)) 255 root = windows[count - 1];
256
257 XFree (virtual_root_window);
258 }
259 else if (XQueryTree (display, root, &unused, &unused, &windows, &count))
190 { 260 {
191 int i; 261 int i;
192 262
193 for (i = 0; i < count; i++) 263 for (i = 0; i < count; i++)
194 { 264 {
195 Atom type;
196 int format;
197 unsigned long nitems, bytes_after_return;
198 unsigned char *virtual_root_window;
199
200 if (XGetWindowProperty (display, windows[i], SWM_VROOT, 265 if (XGetWindowProperty (display, windows[i], SWM_VROOT,
201 0, 1, False, XA_WINDOW, &type, &format, 266 0, 1, False, XA_WINDOW, &type, &format,
202 &nitems, &bytes_after_return, 267 &nitems, &bytes_after_return,
203 &virtual_root_window) == Success) 268 &virtual_root_window) == Success
269 && type == XA_WINDOW)
204 { 270 {
205 if (type != None)
206 {
207 if (type == XA_WINDOW)
208 {
209 XFree (windows);
210 return (Window) virtual_root_window; 271 root = *(Window *)virtual_root_window;
211 } 272 XFree (virtual_root_window);
212 else
213 fprintf (stderr,
214 "__SWM_VROOT property type mismatch");
215 } 273 break;
216 } 274 }
217 else 275 }
218 fprintf (stderr,
219 "failed to get __SWM_VROOT property on window 0x%lx",
220 windows[i]);
221 }
222 276
223 if (count)
224 XFree (windows); 277 XFree (windows);
225 } 278 }
226 else 279 else
227 fprintf (stderr, "Can't query tree on root window 0x%lx", 280 fprintf (stderr, "Can't query tree on root window 0x%lx", root);
228 real_root_window);
229 } 281 }
230 else
231 /* This shouldn't happen. The Xlib documentation is wrong BTW. */
232 fprintf (stderr, "Can't intern atom __SWM_VROOT");
233
234 return real_root_window;
235} 282}
283#endif /* USE_TOON_GET_ROOT_WINDOW */
236 284
237void 285void
238InitWindow (void) 286InitWindow (void)
239{ 287{
240 XGCValues gcv; 288 XGCValues gcv;
241 unsigned long gcm; 289 unsigned long gcm;
242 int screen, ScreenWidth, ScreenHeight; 290 int screen, ScreenWidth, ScreenHeight;
291 struct logfile_entry *e;
243 292
244 if (!(disp = XOpenDisplay (dispname))) 293 if (!(disp = XOpenDisplay (dispname)))
245 { 294 {
246 fprintf (stderr, "Can't open display %s.\n", dispname); 295 fprintf (stderr, "Can't open display %s.\n", dispname);
247 exit (1); 296 exit (1);
249 298
250 screen = DefaultScreen (disp); 299 screen = DefaultScreen (disp);
251 ScreenHeight = DisplayHeight (disp, screen); 300 ScreenHeight = DisplayHeight (disp, screen);
252 ScreenWidth = DisplayWidth (disp, screen); 301 ScreenWidth = DisplayWidth (disp, screen);
253 302
254 root = root_window (disp, screen); 303 find_root_window (disp, screen);
255 304
256 gcm = GCBackground; 305 gcm = GCBackground;
257 gcv.graphics_exposures = True; 306 gcv.graphics_exposures = True;
258 WinGC = XCreateGC (disp, root, gcm, &gcv); 307 WinGC = XCreateGC (disp, root, gcm, &gcv);
259 XMapWindow (disp, root); 308 XMapWindow (disp, root);
309
260 XSetForeground (disp, WinGC, GetColor (DEF_COLOR)); 310 XSetForeground (disp, WinGC, GetColor (DEF_COLOR));
261 311
312 for (e = loglist; e; e = e->next)
262 { 313 {
263 char **missing_charset_list; 314 char **missing_charset_list;
264 int missing_charset_count; 315 int missing_charset_count;
265 char *def_string; 316 char *def_string;
266 317
267 fontset = XCreateFontSet (disp, fontname, 318 e->fontset = XCreateFontSet (disp, e->fontname,
268 &missing_charset_list, &missing_charset_count, 319 &missing_charset_list, &missing_charset_count,
269 &def_string); 320 &def_string);
270 321
271 if (missing_charset_count) 322 if (missing_charset_count)
323 {
324 fprintf (stderr,
325 "Missing charsets in String to FontSet conversion (%s)\n",
326 missing_charset_list[0]);
327 XFreeStringList (missing_charset_list);
328 }
329
330 if (!e->fontset)
331 {
332 fprintf (stderr, "unable to create fontset for font '%s', exiting.\n", e->fontname);
333 exit (1);
334 }
335
272 { 336 {
273 fprintf (stderr, 337 XFontSetExtents *xfe = XExtentsOfFontSet (e->fontset);
274 "Missing charsets in String to FontSet conversion (%s)\n", 338
275 missing_charset_list[0]); 339 e->font_height = xfe->max_logical_extent.height;
276 XFreeStringList (missing_charset_list); 340 e->font_ascent = -xfe->max_logical_extent.y;
277 } 341 }
278 }
279 342
280 if (!fontset) 343 if (e->font_height > height - effect_y_space)
344 {
345 fprintf(stderr, "\n the display isn't tall enough to display a single line in font '%s'\n",
346 e->fontname);
347 fprintf(stderr, "\n the geometry in use is %d pixels tall\n", height);
348 fprintf(stderr, "\n font '%s' is %d pixels tall\n", e->fontname, e->font_height);
349 if (effect_y_space)
350 fprintf(stderr, "\n the shade or outline options need an extra %d pixel%s of vertical space\n",
351 effect_y_space, effect_y_space == 1 ? "" : "s");
352 fprintf(stderr, "\n");
353 exit(1);
354 }
281 { 355 }
282 fprintf (stderr, "unable to create fontset, exiting.\n");
283 exit (1);
284 }
285
286 {
287 XFontSetExtents *xfe = XExtentsOfFontSet (fontset);
288
289 font_height = xfe->max_logical_extent.height;
290 font_descent = xfe->max_logical_extent.y;
291 }
292 356
293 if (geom_mask & XNegative) 357 if (geom_mask & XNegative)
294 win_x = win_x + ScreenWidth - width; 358 win_x = win_x + ScreenWidth - width;
295 if (geom_mask & YNegative) 359 if (geom_mask & YNegative)
296 win_y = win_y + ScreenHeight - height; 360 win_y = win_y + ScreenHeight - height;
297 361
298 listlen = height / font_height;
299
300 if (!listlen)
301 { 362 {
302 fprintf (stderr, "height too small for a single line, setting to %d\n", 363 struct logfile_entry *e;
303 font_height); 364
304 listlen = 1; 365 for (e = loglist; e; e = e->next)
366 e->color = GetColor (e->colorname);
305 } 367 }
306
307 height = listlen * font_height;
308 368
309 XSelectInput (disp, root, ExposureMask | FocusChangeMask); 369 XSelectInput (disp, root, ExposureMask | FocusChangeMask);
310} 370}
311 371
312/* 372/*
313 * redraw does a complete redraw, rather than an update (i.e. the area 373 * if redraw () is passwd a non-zero argument, it does a complete
314 * gets cleared first) 374 * redraw, rather than an update. if the argument is zero (and
375 * -noflicker is in effect) then only the lines which have changed
376 * since the last draw are redrawn.
377 *
315 * the rest is handled by regular refresh()'es 378 * the rest is handled by regular refresh ()'es
316 */ 379 */
317void 380void
318redraw (void) 381redraw (int redraw_all)
319{ 382{
320 XSetClipMask (disp, WinGC, None); 383 XSetClipMask (disp, WinGC, None);
321 XClearArea (disp, root, win_x - 2, win_y - 2, width + 5, height + 5, False); 384 refresh (0, 32768, 1, redraw_all);
322 refresh (0, 32768); 385}
386
387void draw_text (Display *disp, Window root, GC WinGC, int x, int y, struct line_node *line, int foreground)
388{
389 if (line->wrapped_right && opt_justify && line->breaks)
390 {
391 int i;
392 for (i = 0; i < line->num_words; i++)
393 XmbDrawString (disp, root, line->logfile->fontset, WinGC,
394 x + line->breaks[i].width + ((i * line->free_pixels) / (line->num_words - 1))
395 + continuation_width * line->wrapped_left, y,
396 line->line + line->breaks[i].index,
397 line->breaks[i].len);
398
399 if (line->wrapped_left)
400 {
401 if (foreground) XSetForeground (disp, WinGC, continuation_color);
402 XmbDrawString (disp, root, line->logfile->fontset, WinGC, x, y, continuation, continuation_length);
403 }
404 }
405 else
406 {
407 XmbDrawString (disp, root, line->logfile->fontset, WinGC, x + continuation_width * line->wrapped_left,
408 y, line->line, line->len);
409
410 if (line->wrapped_left)
411 {
412 if (foreground) XSetForeground (disp, WinGC, continuation_color);
413 XmbDrawString (disp, root, line->logfile->fontset, WinGC, x, y, continuation, continuation_length);
414 }
415 }
323} 416}
324 417
325/* Just redraw everything without clearing (i.e. after an EXPOSE event) */ 418/* Just redraw everything without clearing (i.e. after an EXPOSE event) */
326void 419void
327refresh (int miny, int maxy) 420refresh (int miny, int maxy, int clear, int refresh_all)
328{ 421{
329 int lin; 422 int lin = 0;
330 int offset = (listlen + 1) * font_height; 423 int space = height;
424 int offset;
331 unsigned long black_color = GetColor ("black"); 425 unsigned long black_color = GetColor ("black");
426 struct line_node *line;
427 int step_per_line;
428 int foreground = 0;
332 429
333 miny -= win_y + font_height; 430 if (opt_reverse)
334 maxy -= win_y - font_height; 431 offset = effect_y_offset;
432 else
433 offset = height + effect_y_offset;
335 434
336 for (lin = listlen; lin--;) 435 miny -= win_y;
337 { 436 maxy -= win_y;
338 struct linematrix *line = lines + (opt_reverse ? listlen - lin - 1 : lin);
339 437
340 offset -= font_height; 438 if (clear && !opt_noflicker)
439 XClearArea (disp, root, win_x, win_y, width + MARGIN_OF_ERROR, height, False);
341 440
342 if (offset < miny || offset > maxy) 441 for (line = linelist; line; line = line->next, lin++)
343 continue; 442 {
443 struct displaymatrix *display_line;
344 444
345 if (opt_shade) 445 if (opt_noflicker && lin >= listlen)
446 {
447 int i = listlen;
448 listlen *= 1.5;
449 display = xrealloc(display, listlen * sizeof(struct displaymatrix));
450 for (; i < listlen; i++)
451 {
452 display[i].line = xstrdup ("");
453 display[i].len = 0;
454 display[i].offset = 0;
455 display[i].buffer_size = 0;
456 }
346 { 457 }
458
459 display_line = display + lin;
460
461 step_per_line = line->logfile->font_height + effect_y_space;
462 if (step_per_line > space)
463 break;
464
465 if (!opt_reverse)
466 offset -= step_per_line;
467
468 offset += line->logfile->font_ascent;
469
470 miny -= line->logfile->font_height;
471 maxy += line->logfile->font_height;
472
473 if (offset >= miny && offset <= maxy)
474 {
475 /* if this line is a different than it was, then it
476 * needs displaying */
477 if (!opt_noflicker
478 || refresh_all
479 || display_line->len != line->len
480 || display_line->color != line->logfile->color
481 || display_line->offset != offset
482 || memcmp (display_line->line, line->line, line->len))
483 {
484 /* don't bother updating the record of what has been
485 * displayed if -noflicker isn't in effect, since we redraw
486 * the whole display every time anyway */
487 if (opt_noflicker)
488 {
489 /* update the record of what has been displayed;
490 * first make sure the buffer is big enough */
491 if (display_line->buffer_size < line->len)
492 {
493 display_line->buffer_size = line->len;
494 display_line->line = xrealloc (display_line->line, display_line->buffer_size);
495 }
496
497 display_line->len = line->len;
498 display_line->color = line->logfile->color;
499 display_line->offset = offset;
500 memcpy (display_line->line, line->line, line->len);
501
502 if (clear)
503 {
504#ifdef DEBUG
505 static int toggle;
506 toggle = 1 - toggle;
507 XSetForeground (disp, WinGC, toggle ? GetColor ("cyan") : GetColor ("yellow"));
508 XFillRectangle (disp, root, WinGC, win_x, win_y + offset - line->logfile->font_ascent,
509 width, step_per_line);
510#else /* DEBUG */
511 XClearArea (disp, root, win_x, win_y + offset - line->logfile->font_ascent,
512 width + MARGIN_OF_ERROR, step_per_line, False);
513#endif /* DEBUG */
514 }
515 }
516
517 if (opt_outline)
518 {
519 int x, y;
347 XSetForeground (disp, WinGC, black_color); 520 XSetForeground (disp, WinGC, black_color);
348 XmbDrawString (disp, root, fontset, WinGC, win_x + 2,
349 win_y + offset + 2, line->line, line->len);
350 }
351 521
522 for (x = -1; x <= 1; x += 2)
523 for (y = -1; y <= 1; y += 2)
524 draw_text (disp, root, WinGC,
525 win_x + effect_x_offset + x,
526 win_y + y + offset, line, foreground = 0);
527 }
528 else if (opt_shade)
529 {
530 XSetForeground (disp, WinGC, black_color);
531 draw_text (disp, root, WinGC,
532 win_x + effect_x_offset + SHADE_X,
533 win_y + offset + SHADE_Y, line, foreground = 0);
534 }
535
352 XSetForeground (disp, WinGC, line->color); 536 XSetForeground (disp, WinGC, line->logfile->color);
353 XmbDrawString (disp, root, fontset, WinGC, win_x, win_y + offset, 537 draw_text (disp, root, WinGC,
354 line->line, line->len); 538 win_x + effect_x_offset,
539 win_y + offset, line, foreground = 1);
540 }
541 }
542
543 if (opt_reverse)
544 offset += step_per_line;
545 offset -= line->logfile->font_ascent;
546
547 miny += line->logfile->font_height;
548 maxy -= line->logfile->font_height;
549
550 space -= step_per_line;
551 }
552
553 if (space > 0 && clear)
554 {
555#ifdef DEBUG
556 XSetForeground (disp, WinGC, GetColor ("orange"));
557 XFillRectangle (disp, root, WinGC, win_x, win_y + offset - (opt_reverse ? 0 : space),
558 width, space);
559#else /* DEBUG */
560 XClearArea (disp, root, win_x, win_y + offset - (opt_reverse ? 0 : space),
561 width + MARGIN_OF_ERROR, space, False);
562#endif
563 }
564
565 /* at least one of the lines must fit in the allocated area. we've
566 * already checked at initialisation time that all the fonts are small
567 * enough to fit at least one line in the display area, but assert it
568 * again here to be sure */
569 assert(line != linelist);
570
571 /* any lines that didn't just get looked at are never going to be, so break the chain */
572 if (line) line->prev->next = 0;
573
574 /* and throw them all away */
575 while (line)
576 {
577 struct line_node *this = line;
578 line = line->next;
579 if (this->logfile && this->logfile->last == this)
580 this->logfile->last = NULL;
581 free (this->line);
582 free (this->breaks);
583 free (this);
355 } 584 }
356 585
357 if (opt_frame) 586 if (opt_frame)
358 { 587 {
359 XSetForeground (disp, WinGC, GetColor (def_color)); 588 XSetForeground (disp, WinGC, GetColor (def_color));
589 /* note that XDrawRectangle() draws a rectangle one pixel bigger
590 * in both dimensions than you ask for, hence the subtractions.
591 * XFillRectangle() doesn't suffer from this problem */
360 XDrawRectangle (disp, root, WinGC, win_x - 2, win_y - 2, width + 4, height + 4); 592 XDrawRectangle (disp, root, WinGC, win_x - 0, win_y - 0, width - 1, height - 1);
361 } 593 }
362} 594}
363 595
364#if HAS_REGEX 596#if HAS_REGEX
365void 597void
378 if (transformre) 610 if (transformre)
379 { 611 {
380 int i; 612 int i;
381 regmatch_t matched[16]; 613 regmatch_t matched[16];
382 614
383 i = regexec (&transformre, string, 16, matched, 0); 615 i = regexec (transformre, s, 16, matched, 0);
384 if (i == 0) 616 if (i == 0)
385 { /* matched */ 617 { /* matched */
618 int match_start = matched[0].rm_so;
619 int match_end = matched[0].rm_eo;
620 int old_len = match_end - match_start;
621 int new_len = strlen (transform_to);
622 int old_whole_len = strlen (s);
623
624 printf ("regexp was matched by '%s' - replace with '%s'\n", s, transform_to);
625 printf ("match is from %d to %d\n", match_start, match_end);
626 if (new_len > old_len)
627 s = xrealloc (s, old_whole_len + new_len - old_len);
628
629 if (new_len != old_len)
630 {
631 memcpy (s + match_end + new_len - old_len,
632 s + match_end,
633 old_whole_len - match_end);
634 s[old_whole_len + new_len - old_len] = '\0';
386 } 635 }
636
637 memcpy (s + match_start,
638 transform_to,
639 new_len);
640 printf ("transformed to '%s'\n", s);
641 }
642 else
643 printf ("regexp was not matched by '%s'\n", s);
387 } 644 }
388} 645}
389#endif 646#endif
390 647
648/*
649 * appends p2 to the end of p1, if p1 is not null
650 * otherwise allocates a new string and copies p2 to it
651 */
391char * 652char *
392concat_line (const char *p1, const char *p2) 653concat_line (char *p1, const char *p2)
393{ 654{
394 int l1 = p1 ? strlen (p1) : 0; 655 int l1 = p1 ? strlen (p1) : 0;
395 int l2 = strlen (p2); 656 int l2 = strlen (p2);
396 char *r = xmalloc (l1 + l2 + 1); 657 char *r;
397 658
398 memcpy (r, p1, l1); 659 assert (p2);
660
661 if (p1)
662 r = xrealloc(p1, l1 + l2 + 1);
663 else
664 r = xmalloc (l2 + 1);
665
399 memcpy (r + l1, p2, l2); 666 memcpy (r + l1, p2, l2);
400 r[l1 + l2] = 0; 667 r[l1 + l2] = 0;
401 668
402 return r; 669 return r;
403} 670}
404 671
405/* 672/*
406 * This routine should read a single line, no matter how long. 673 * This routine can read a line of any length if it is called enough times.
407 */ 674 */
408int 675int
409lineinput (struct logfile_entry *logfile) 676lineinput (struct logfile_entry *logfile)
410{ 677{
411 char buff[1024], *p = buff; 678 char buff[1024], *p;
412 int ch; 679 int ch;
680 /* HACK-2: add on the length of any partial line which we will be appending to */
413 int ofs = logfile->buf ? strlen (logfile->buf) : 0; 681 int ofs = logfile->buf ? strlen (logfile->buf) : 0;
414 682
683 /* this loop ensures that the whole line is read, even if it's
684 * longer than the buffer. we need to do this because when --whole
685 * is in effect we don't know whether to display the line or not
686 * until we've seen how (ie. whether) it ends */
415 do 687 do
416 { 688 {
689 p = buff;
690 do
691 {
417 ch = fgetc (logfile->fp); 692 ch = fgetc (logfile->fp);
418 693
419 if (ch == '\n' || ch == EOF) 694 if (ch == '\n' || ch == EOF)
420 break; 695 break;
421 else if (ch == '\r') 696 else if (ch == '\r')
422 continue; /* skip */ 697 continue; /* skip */
423 else if (ch == '\t') 698 else if (ch == '\t')
424 { 699 {
425 do 700 do
426 { 701 {
427 *p++ = ' '; 702 *p++ = ' ';
703 ofs++;
704 }
705 while (ofs & 7);
706 }
707 else
708 {
709 *p++ = ch;
428 ofs++; 710 ofs++;
429 } 711 }
430 while (ofs & 7);
431 }
432 else
433 { 712 }
434 *p++ = ch;
435 ofs++;
436 }
437 }
438 while (p < buff + (sizeof buff) - 8 - 1); 713 while (p < buff + (sizeof buff) - 8 - 1);
439 714
440 if (p == buff && ch == EOF) 715 if (p == buff && ch == EOF)
441 return 0; 716 return 0;
442 717
443 *p = 0; 718 *p = 0;
444 719
445 p = concat_line (logfile->buf, buff); 720 p = logfile->buf = concat_line (logfile->buf, buff);
446 free (logfile->buf); logfile->buf = p; 721 }
722 while (ch != '\n' && ch != EOF);
447 723
448 logfile->lastpartial = logfile->partial; 724 logfile->lastpartial = logfile->partial;
725 /* there are 3 ways we could have exited the loop: reading '\n',
726 * reaching EOF, or filling the buffer; the 2nd and 3rd of these
727 * both result in a partial line */
449 logfile->partial = ch == EOF; 728 logfile->partial = ch != '\n';
450 729
451 if (logfile->partial && opt_whole) 730 if (logfile->partial && opt_whole)
452 return 0; 731 return 0;
453 732
454#if HAS_REGEX 733#if HAS_REGEX
455 transform_line (logfile->buf); 734 transform_line (logfile->buf);
483 else 762 else
484 file->inode = stats.st_ino; 763 file->inode = stats.st_ino;
485 764
486 if (opt_noinitial) 765 if (opt_noinitial)
487 fseek (file->fp, 0, SEEK_END); 766 fseek (file->fp, 0, SEEK_END);
488 else if (stats.st_size > (listlen + 1) * width) 767 else /* if (stats.st_size > (listlen + 1) * width)
768 * HACK - 'width' is in pixels - how are we to know how much text will fit?
489 fseek (file->fp, -((listlen + 2) * width), SEEK_END); 769 * fseek (file->fp, -((listlen + 2) * width/10), SEEK_END); */
770 fseek (file->fp, -5000, SEEK_END);
490 771
491 file->last_size = stats.st_size; 772 file->last_size = stats.st_size;
492 return file->fp; 773 return file->fp;
493} 774}
494 775
526 { /* file missing? */ 807 { /* file missing? */
527 sleep (1); 808 sleep (1);
528 if (e->fp) 809 if (e->fp)
529 fclose (e->fp); 810 fclose (e->fp);
530 if (openlog (e) == NULL) 811 if (openlog (e) == NULL)
531 break; 812 continue;
813 if (fstat (fileno (e->fp), &stats) < 0)
814 continue;
532 } 815 }
533 816
534 if (stats.st_ino != e->inode) 817 if (stats.st_ino != e->inode)
535 { /* file renamed? */ 818 { /* file renamed? */
536 if (e->fp) 819 if (e->fp)
537 fclose (e->fp); 820 fclose (e->fp);
538 if (openlog (e) == NULL) 821 if (openlog (e) == NULL)
539 break; 822 continue;
823 if (fstat (fileno (e->fp), &stats) < 0)
824 continue;
540 } 825 }
541 826
542 if (stats.st_size < e->last_size) 827 if (stats.st_size < e->last_size)
543 { /* file truncated? */ 828 { /* file truncated? */
544 fseek (e->fp, 0, SEEK_SET); 829 fseek (e->fp, 0, SEEK_SET);
546 } 831 }
547 } 832 }
548} 833}
549 834
550/* 835/*
551 * insert a single physical line (that must be short enough to fit) 836 * insert a single node in the list of screen lines and return a
552 * at position "idx" by pushing up lines above it. the caller 837 * pointer to the new node.
553 * MUST then fill in lines[idx] with valid data. 838 * the caller MUST then fill in ret->line and ret->len with valid
839 * data.
840 */
841static struct line_node *
842new_line_node (struct logfile_entry *log)
843{
844 struct line_node *new = xmalloc (sizeof (struct line_node));
845
846 new->logfile = log;
847 new->wrapped_left = 0;
848 new->wrapped_right = 0;
849 new->breaks = 0;
850
851 assert(log);
852
853 if (!log || !log->last)
854 {
855 new->next = linelist;
856 new->next->prev = new;
857
858 new->prev = NULL;
859 linelist = new;
860 }
861 else
862 {
863 /* 2 pointers from the new node */
864 new->next = log->last;
865 new->prev = log->last->prev;
866
867 /* 2 pointers back to the new node */
868 if (new->next) new->next->prev = new;
869 if (new->prev) new->prev->next = new;
870
871 /* if this is a new first entry in the list then update
872 * 'linelist' */
873 if (log->last == linelist)
874 linelist = new;
875 }
876
877 /* update the logfile record */
878 if (log)
879 log->last = new;
880
881 return new;
882}
883
884/*
885 * this is called after either adding a new line or appending to an
886 * old one. in both cases it's possible that the line no longer fits,
887 * and needs wrapping. this function checks the last line associated
888 * with the supplied logfile.
554 */ 889 */
555static void 890static void
556insert_line (int idx) 891possibly_split_long_line (struct logfile_entry *log)
557{ 892{
558 int cur_line; 893 char *str = log->last->line;
559 struct logfile_entry *current;
560
561 free (lines[0].line);
562
563 for (cur_line = 0; cur_line < idx; cur_line++)
564 lines[cur_line] = lines[cur_line + 1];
565
566 for (current = loglist; current; current = current->next)
567 if (current->index <= idx)
568 current->index--;
569}
570
571/*
572 * remove a single physical line at position "idx" by moving the lines above it
573 * down and inserting a "~" line at the top.
574 */
575static void
576delete_line (int idx)
577{
578 int cur_line;
579 struct logfile_entry *current;
580
581 for (cur_line = idx; cur_line > 0; cur_line--)
582 lines[cur_line] = lines[cur_line - 1];
583
584 lines[0].line = strdup ("~");
585
586 for (current = loglist; current; current = current->next)
587 if (current->index >= 0 && current->index <= idx)
588 current->index++;
589}
590
591/*
592 * takes a logical log file line and split it into multiple physical
593 * screen lines by splitting it whenever a part becomes too long.
594 * lal lines will be inserted at position "idx".
595 */
596static void
597split_line (int idx, const char *str, unsigned long color)
598{
599 int l = strlen (str); 894 int l = strlen (str);
600 const char *p = str; 895 char *p = str;
896 struct line_node *line;
897 int spaces;
898 static struct breakinfo *breaks;
899 static int break_buffer_size;
900
901 /* only calculate the continuation's width once */
902 if (continuation_width == -1)
903 {
904 continuation_length = strlen (continuation);
905 continuation_width = XmbTextEscapement (log->fontset, continuation, continuation_length);
906 continuation_color = GetColor (cont_color);
907
908 /* make an array to store information about the location of
909 * spaces in the line */
910 if (opt_justify)
911 {
912 break_buffer_size = 32;
913 breaks = xmalloc (break_buffer_size * sizeof (struct breakinfo));
914 }
915 }
601 916
602 do 917 do
603 { 918 {
604 const char *beg = p; 919 const char *beg = p;
920 int start_w = log->last->wrapped_left ? continuation_width : 0;
921 int w = start_w;
605 int w = 0; 922 int wrapped = 0;
923 char *break_p = NULL;
924 int width_at_break_p = 0;
925 int prefix_len;
926
927 spaces = 0;
928
929 if (opt_justify)
930 breaks[spaces].index = breaks[spaces].width = 0;
606 931
607 while (*p) 932 while (*p)
608 { 933 {
934 int cw, len;
935
936 /* find the length in bytes of the next multibyte character */
609 int len = mblen (p, l); 937 len = mblen (p, l);
610 if (len <= 0) 938 if (len <= 0)
611 len = 1; /* ignore (don't skip) ilegal character sequences */ 939 len = 1; /* ignore (don't skip) illegal character sequences */
612 940
941 /* find the width in pixels of the next character */
613 int cw = XmbTextEscapement (fontset, p, len); 942 cw = XmbTextEscapement (log->fontset, p, len);
943 if (opt_wordwrap && len == 1 && p[0] == ' ' && p != break_p + 1)
944 {
945 break_p = p;
946 width_at_break_p = w;
947 spaces++;
948
949 if (opt_justify)
950 {
951 /* increase the size of the 'breaks' array when
952 * necessary */
953 if (spaces >= break_buffer_size)
954 {
955 break_buffer_size *= 1.5;
956 breaks = xrealloc (breaks, break_buffer_size * sizeof (struct breakinfo));
957 }
958
959 /* store information about (a) the location of each
960 * space */
961 breaks[spaces].index = p + 1 - beg;
962 /* (b) the width (in pixels) of the string up to
963 * this space */
964 breaks[spaces].width = cw + w - start_w;
965 /* (c) the length of each 'word' */
966 breaks[spaces-1].len = breaks[spaces].index - breaks[spaces-1].index;
967 }
968 }
969
614 if (cw + w >= width) 970 if (cw + w > width - effect_x_space)
971 {
972 if (p == beg)
973 {
974 fprintf (stderr, "we can't even fit a single character onto the line\n");
975 if (len == 1) fprintf (stderr, "(the character we couldn't fit was '%c')\n", *p);
976 exit (1);
977 }
978
979 wrapped = 1;
615 break; 980 break;
981 }
616 982
617 w += cw; 983 w += cw;
618 p += len; 984 p += len;
619 l -= len; 985 l -= len;
620 } 986 }
621 987
988 /* if we're wrapping at spaces, and the line is long enough to
989 * wrap, and we've seen a space already, and the space wasn't
990 * the first character on the line, then wrap at the space */
991 if (!wrapped)
992 break;
993
994 /* choose where to break the line */
995 if (opt_wordwrap && break_p && break_p != beg)
622 { 996 {
623 char *s = xmalloc (p - beg + 1); 997 prefix_len = break_p - beg;
624 memcpy (s, beg, p - beg); 998 p = break_p;
625 s[p - beg] = 0; 999 w = width_at_break_p;
626 insert_line (idx); 1000
627 lines[idx].line = s; 1001 /* if breaking at a space, skip all adjacent spaces */
628 lines[idx].len = p - beg; 1002 while (*p == ' ')
629 lines[idx].color = color; 1003 {
1004 int len = mblen (p, l);
1005 if (len != 1) break;
1006 p++;
1007 }
1008
1009 if (opt_justify)
1010 {
1011 spaces--;
1012 breaks[spaces].len--;
1013 }
630 } 1014 }
1015 else
1016 prefix_len = p - beg;
1017
1018 /* make a copy of the tail end of the string */
1019 p = xstrdup (p);
1020
1021 /* and reduce the size of the head of the string */
1022 log->last->line = xrealloc (log->last->line, prefix_len + 1);
1023 log->last->len = prefix_len;
1024 log->last->line[prefix_len] = '\0';
1025
1026 /* note that the head was wrapped on it's right */
1027 log->last->wrapped_right = 1;
1028
1029 /* 'spaces' includes any space we broke on; we can only justify
1030 * if there's at least one other space */
1031 if (opt_justify && spaces &&
1032 width - effect_x_space - width_at_break_p < spaces * log->font_height)
1033 {
1034 int i;
1035 log->last->free_pixels = width - effect_x_space - w;
1036 log->last->num_words = spaces + 1;
1037 log->last->breaks = malloc (log->last->num_words * sizeof (struct breakinfo));
1038 for (i = 0; i < log->last->num_words; i++)
1039 log->last->breaks[i] = breaks[i];
1040 }
1041
1042 line = new_line_node (log);
1043 line->line = p;
1044 l = line->len = strlen (p);
1045
1046 /* note that the tail end of the string is wrapped at its left */
1047 line->wrapped_left = 1;
631 } 1048 }
632 while (l); 1049 while (l);
1050}
1051
1052static void
1053insert_new_line (char *str, struct logfile_entry *log)
1054{
1055 struct line_node *new;
1056 new = new_line_node (log);
1057 new->line = str;
1058 new->len = strlen (str);
1059
1060 possibly_split_long_line (log);
633} 1061}
634 1062
635/* 1063/*
636 * append something to an existing physical line. this is done 1064 * append something to an existing physical line. this is done
637 * by deleting the file on-screen, concatenating the new data to it 1065 * by deleting the file on-screen, concatenating the new data to it
638 * and splitting it again. 1066 * and splitting it again.
639 */ 1067 */
640static void 1068static void
641append_line (int idx, const char *str) 1069append_to_existing_line (char *str, struct logfile_entry *log)
642{ 1070{
643 unsigned long color = lines[idx].color; 1071 char *old, *new;
644 char *old = lines[idx].line; 1072
1073 assert(log);
1074 assert(log->last);
1075
1076 old = log->last->line;
1077 assert(old);
1078
645 char *new = concat_line (old, str); 1079 new = concat_line (old, str);
646
647 free (old); 1080 free (str);
648 1081 log->last->line = new;
649 delete_line (idx); 1082 log->last->len = strlen (new);
650 split_line (idx, new, color); 1083 possibly_split_long_line (log);
651} 1084}
652 1085
653static void 1086static void
654main_loop (void) 1087main_loop (void)
655{ 1088{
656 lines = xmalloc (sizeof (struct linematrix) * listlen);
657 int lin; 1089 int lin;
658 time_t lastreload; 1090 time_t lastreload;
659 Region region = XCreateRegion (); 1091 Region region = XCreateRegion ();
660 XEvent xev; 1092 XEvent xev;
661 struct logfile_entry *lastprinted = NULL; 1093 struct logfile_entry *lastprinted = NULL;
662 struct logfile_entry *current; 1094 struct logfile_entry *current;
663 int need_update = 1; 1095 int need_update = 1;
664 1096
1097 display = xmalloc (sizeof (struct displaymatrix) * listlen);
1098
665 lastreload = time (NULL); 1099 lastreload = time (NULL);
666 1100
667 /* Initialize linematrix */ 1101 /* Initialize line_node */
668 for (lin = 0; lin < listlen; lin++) 1102 for (lin = 0; lin < listlen; lin++)
669 { 1103 {
1104 struct line_node *e = xmalloc (sizeof (struct line_node));
1105 e->line = xstrdup ("~");
1106 e->len = 1;
1107 e->logfile = loglist; /* this is only needed to get a color for the '~' */
1108 e->wrapped_left = 0;
1109 e->wrapped_right = 0;
1110 e->breaks = 0;
1111 e->next = NULL;
1112 e->prev = linelist_tail;
1113
1114 if (!linelist)
1115 linelist = e;
1116 if (linelist_tail)
1117 linelist_tail->next = e;
1118 linelist_tail = e;
1119
670 lines[lin].line = strdup ("~"); 1120 display[lin].line = xstrdup ("");
671 lines[lin].len = 1; 1121 display[lin].len = 0;
672 lines[lin].color = GetColor (def_color); 1122 display[lin].offset = 0;
1123 display[lin].buffer_size = 0;
673 } 1124 }
674 1125
675 for (;;) 1126 for (;;)
676 { 1127 {
677 /* read logs */ 1128 /* read logs */
688 /* if we're trying to update old partial lines in 1139 /* if we're trying to update old partial lines in
689 * place, and the last time this file was updated the 1140 * place, and the last time this file was updated the
690 * output was partial, and that partial line is not 1141 * output was partial, and that partial line is not
691 * too close to the top of the screen, then update 1142 * too close to the top of the screen, then update
692 * that partial line */ 1143 * that partial line */
693 if (opt_update && current->lastpartial && current->index >= 0) 1144 if (opt_update && current->lastpartial && current->last)
694 { 1145 {
695 int idx = current->index;
696 append_line (idx, current->buf); 1146 append_to_existing_line (current->buf, current);
697 current->index = idx; 1147 current->buf = 0;
698 free (current->buf), current->buf = 0;
699 continue; 1148 continue;
700 } 1149 }
701 1150
1151 /* if all we just read was a newline ending a line that we've already displayed, skip it */
1152 if (current->buf[0] == '\0' && current->lastpartial)
1153 {
1154 free(current->buf);
1155 current->buf = 0;
1156 continue;
1157 }
1158
702 /* print filename if any, and if last line was from 1159 /* print filename if any, and if last line was from
703 * different file */ 1160 * different file */
704 if (!opt_nofilename && lastprinted != current && current->desc[0]) 1161 if (lastprinted != current)
1162 {
1163 current->last = 0;
1164 if (!opt_nofilename && current->desc[0])
1165 {
1166 insert_new_line (xstrdup ("["), current);
1167 append_to_existing_line (xstrdup (current->desc), current);
1168 append_to_existing_line (xstrdup ("]"), current);
1169 }
1170 }
1171
1172 /* if we're dealing with partial lines, and the last
1173 * time we showed the line it wasn't finished ... */
1174 if (!opt_whole && current->lastpartial)
705 { 1175 {
706 char buf[1024]; /* HACK */
707 snprintf (buf, sizeof (buf), "[%s]", current->desc);
708 split_line (listlen - 1, buf, current->color);
709 }
710
711 /* if this is the same file we showed last, and the 1176 /* if this is the same file we showed last then
712 * last time we showed it, it wasn't finished, then
713 * append to the last line shown */ 1177 append to the last line shown */
714 if (lastprinted == current && current->lastpartial) 1178 if (lastprinted == current)
1179 append_to_existing_line (current->buf, current);
1180 else
715 { 1181 {
716 append_line (listlen - 1, current->buf); 1182 /* but if a different file has been shown in the
1183 * mean time, make a new line, starting with the
1184 * continuation string */
717 free (current->buf), current->buf = 0; 1185 insert_new_line (current->buf, current);
1186 current->last->wrapped_left = 1;
718 continue; 1187 }
719 } 1188 }
720 else 1189 else
721 { 1190 /* otherwise just make a plain and simple new line */
722 split_line (listlen - 1, current->buf, current->color);
723 free (current->buf), current->buf = 0; 1191 insert_new_line (current->buf, current);
724 }
725 1192
726 current->index = listlen - 1; 1193 current->buf = 0;
727 lastprinted = current; 1194 lastprinted = current;
728 } 1195 }
729 } 1196 }
730 1197
731 if (need_update) 1198 if (need_update)
732 { 1199 {
733 redraw (); 1200 redraw (0);
734 need_update = 0; 1201 need_update = 0;
735 } 1202 }
736 else 1203 else
737 { 1204 {
738 XFlush (disp); 1205 XFlush (disp);
795 XRectangle r; 1262 XRectangle r;
796 1263
797 XSetRegion (disp, WinGC, region); 1264 XSetRegion (disp, WinGC, region);
798 XClipBox (region, &r); 1265 XClipBox (region, &r);
799 1266
800 refresh (r.y, r.y + r.height); 1267 refresh (r.y, r.y + r.height, 0, 1);
801 1268
802 XDestroyRegion (region); 1269 XDestroyRegion (region);
803 region = XCreateRegion (); 1270 region = XCreateRegion ();
804 } 1271 }
805 } 1272 }
815#if HAS_REGEX 1282#if HAS_REGEX
816 char *transform = NULL; 1283 char *transform = NULL;
817#endif 1284#endif
818 1285
819 setlocale (LC_CTYPE, ""); /* try to initialize the locale. */ 1286 setlocale (LC_CTYPE, ""); /* try to initialize the locale. */
820
821 /* window needs to be initialized before colorlookups can be done */
822 /* just a dummy to get the color lookups right */
823 geom_mask = NoValue;
824 InitWindow ();
825 1287
826 for (i = 1; i < argc; i++) 1288 for (i = 1; i < argc; i++)
827 { 1289 {
828 const char *arg = argv[i]; 1290 const char *arg = argv[i];
829 1291
842 XParseGeometry (argv[++i], &win_x, &win_y, &width, &height); 1304 XParseGeometry (argv[++i], &win_x, &win_y, &width, &height);
843 else if (!strcmp (arg, "-display")) 1305 else if (!strcmp (arg, "-display"))
844 dispname = argv[++i]; 1306 dispname = argv[++i];
845 else if (!strcmp (arg, "-cont")) 1307 else if (!strcmp (arg, "-cont"))
846 continuation = argv[++i]; 1308 continuation = argv[++i];
1309 else if (!strcmp (arg, "-cont-color"))
1310 cont_color = argv[++i];
847 else if (!strcmp (arg, "-font") || !strcmp (arg, "-fn")) 1311 else if (!strcmp (arg, "-font") || !strcmp (arg, "-fn"))
848 fontname = argv[++i]; 1312 fontname = argv[++i];
849#if HAS_REGEX 1313#if HAS_REGEX
850 else if (!strcmp (arg, "-t")) 1314 else if (!strcmp (arg, "-t"))
1315 {
851 transform = argv[++i]; 1316 transform = argv[++i];
1317 transform_to = argv[++i];
1318 printf ("transform: '%s' to '%s'\n", transform, transform_to);
1319 }
852#endif 1320#endif
853 else if (!strcmp (arg, "-fork") || !strcmp (arg, "-f")) 1321 else if (!strcmp (arg, "-fork") || !strcmp (arg, "-f"))
854 opt_daemonize = 1; 1322 opt_daemonize = 1;
855 else if (!strcmp (arg, "-reload")) 1323 else if (!strcmp (arg, "-reload"))
856 { 1324 {
857 reload = atoi (argv[++i]); 1325 reload = atoi (argv[++i]);
858 command = argv[++i]; 1326 command = argv[++i];
859 } 1327 }
860 else if (!strcmp (arg, "-shade")) 1328 else if (!strcmp (arg, "-shade"))
861 opt_shade = 1; 1329 opt_shade = 1;
1330 else if (!strcmp (arg, "-outline"))
1331 opt_outline = 1;
1332 else if (!strcmp (arg, "-minspace"))
1333 opt_minspace = 1;
1334 else if (!strcmp (arg, "-noflicker"))
1335 opt_noflicker = 1;
862 else if (!strcmp (arg, "-frame")) 1336 else if (!strcmp (arg, "-frame"))
863 opt_frame = 1; 1337 opt_frame = 1;
864 else if (!strcmp (arg, "-no-filename")) 1338 else if (!strcmp (arg, "-no-filename"))
865 opt_nofilename = 1; 1339 opt_nofilename = 1;
866 else if (!strcmp (arg, "-reverse")) 1340 else if (!strcmp (arg, "-reverse"))
869 opt_whole = 1; 1343 opt_whole = 1;
870 else if (!strcmp (arg, "-partial")) 1344 else if (!strcmp (arg, "-partial"))
871 opt_partial = 1; 1345 opt_partial = 1;
872 else if (!strcmp (arg, "-update")) 1346 else if (!strcmp (arg, "-update"))
873 opt_update = opt_partial = 1; 1347 opt_update = opt_partial = 1;
1348 else if (!strcmp (arg, "-wordwrap"))
1349 opt_wordwrap = 1;
1350 else if (!strcmp (arg, "-justify"))
1351 opt_justify = 1;
874 else if (!strcmp (arg, "-color")) 1352 else if (!strcmp (arg, "-color"))
875 def_color = argv[++i]; 1353 def_color = argv[++i];
876 else if (!strcmp (arg, "-noinitial")) 1354 else if (!strcmp (arg, "-noinitial"))
877 opt_noinitial = 1; 1355 opt_noinitial = 1;
878 else if (!strcmp (arg, "-id")) 1356 else if (!strcmp (arg, "-id"))
879 root = atoi (argv[++i]); 1357 {
1358 unsigned long id;
1359
1360 if (sscanf (argv[++i], "%li", &id) == 1 && id)
1361 root = id;
1362 }
880 else if (!strcmp (arg, "-interval") || !strcmp (arg, "-i")) 1363 else if (!strcmp (arg, "-interval") || !strcmp (arg, "-i"))
881 { 1364 {
882 double iv = atof (argv[++i]); 1365 double iv = atof (argv[++i]);
883 1366
884 interval.tv_sec = (int) iv; 1367 interval.tv_sec = (int) iv;
914 } 1397 }
915 1398
916 e = xmalloc (sizeof (struct logfile_entry)); 1399 e = xmalloc (sizeof (struct logfile_entry));
917 e->partial = 0; 1400 e->partial = 0;
918 e->buf = 0; 1401 e->buf = 0;
919 e->index = -1;
920 1402
921 if (arg[0] == '-' && arg[1] == '\0') 1403 if (arg[0] == '-' && arg[1] == '\0')
922 { 1404 {
923 if ((e->fp = fdopen (0, "r")) == NULL) 1405 if ((e->fp = fdopen (0, "r")) == NULL)
924 perror ("fdopen"), exit (1); 1406 perror ("fdopen"), exit (1);
925 if (fcntl (0, F_SETFL, O_NONBLOCK) < 0) 1407 if (fcntl (0, F_SETFL, O_NONBLOCK) < 0)
926 perror ("fcntl"), exit (1); 1408 perror ("fcntl"), exit (1);
1409
927 e->fname = NULL; 1410 e->fname = NULL;
928 e->inode = 0; 1411 e->inode = 0;
1412 if (desc == arg)
929 e->desc = xstrdup ("stdin"); 1413 e->desc = xstrdup ("stdin");
1414 else
1415 e->desc = xstrdup (desc);
930 } 1416 }
931 else 1417 else
932 { 1418 {
933 int l;
934
935 e->fname = xstrdup (fname); 1419 e->fname = xstrdup (fname);
1420
936 if (openlog (e) == NULL) 1421 if (openlog (e) == NULL)
937 perror (fname), exit (1); 1422 perror (fname), exit (1);
938 1423
939 l = strlen (desc); 1424 e->desc = xstrdup (desc);
940 if (l > width - 2) /* must account for [ ] */
941 l = width - 2;
942 e->desc = xmalloc (l + 1);
943 memcpy (e->desc, desc, l);
944 *(e->desc + l) = '\0';
945 } 1425 }
946 1426
947 e->color = GetColor (fcolor); 1427 e->colorname = fcolor;
948 e->partial = 0; 1428 e->partial = 0;
1429 e->fontname = fontname;
1430 e->last = NULL;
949 e->next = NULL; 1431 e->next = NULL;
950 1432
951 if (!loglist) 1433 if (!loglist)
952 loglist = e; 1434 loglist = e;
953 if (loglist_tail) 1435 if (loglist_tail)
954 loglist_tail->next = e; 1436 loglist_tail->next = e;
1437
955 loglist_tail = e; 1438 loglist_tail = e;
956 } 1439 }
957 } 1440 }
958 1441
959 if (!loglist) 1442 if (!loglist)
961 fprintf (stderr, "You did not specify any files to tail\n" 1444 fprintf (stderr, "You did not specify any files to tail\n"
962 "use %s --help for help\n", argv[0]); 1445 "use %s --help for help\n", argv[0]);
963 exit (1); 1446 exit (1);
964 } 1447 }
965 1448
1449 if (opt_update && opt_whole)
1450 {
1451 fprintf (stderr, "Specify at most one of -update and -whole\n");
1452 exit (1);
1453 }
966 if (opt_partial && opt_whole) 1454 else if (opt_partial && opt_whole)
967 { 1455 {
968 fprintf (stderr, "Specify at most one of -partial and -whole\n"); 1456 fprintf (stderr, "Specify at most one of -partial and -whole\n");
1457 exit (1);
1458 }
1459
1460 /* it doesn't make sense to justify if word wrap isn't on */
1461 if (opt_justify)
1462 opt_wordwrap = 1;
1463
1464 /* HACK-7: do we want to allow both -shade and -outline? */
1465 if (opt_shade && opt_outline)
1466 {
1467 fprintf (stderr, "Specify at most one of -shade and -outline\n");
969 exit (1); 1468 exit (1);
970 } 1469 }
971 1470
972 if (opt_partial) 1471 if (opt_partial)
973 /* if we specifically requested to see partial lines then don't insist on whole lines */ 1472 /* if we specifically requested to see partial lines then don't insist on whole lines */
974 opt_whole = 0; 1473 opt_whole = 0;
975 else if (file_count > 1) 1474 else if (file_count > 1)
976 /* otherwise, if we've viewing multiple files, default to showing whole lines */ 1475 /* otherwise, if we're viewing multiple files, default to showing whole lines */
977 opt_whole = 1; 1476 opt_whole = 1;
978 1477
979#if HAS_REGEX 1478#if HAS_REGEX
980 if (transform) 1479 if (transform)
981 { 1480 {
982 int i; 1481 int i;
983 1482
1483 printf ("compiling regexp '%s'\n", transform);
984 transformre = xmalloc (sizeof (transformre)); 1484 transformre = xmalloc (sizeof (regex_t));
985 i = regcomp (&transformre, transform, REG_EXTENDED); 1485 i = regcomp (transformre, transform, REG_EXTENDED);
986 if (i != 0) 1486 if (i != 0)
987 { 1487 {
988 char buf[512]; 1488 char buf[512];
989 1489
990 regerror (i, &transformre, buf, sizeof (buf)); 1490 regerror (i, transformre, buf, sizeof (buf));
991 fprintf (stderr, "Cannot compile regular expression: %s\n", buf); 1491 fprintf (stderr, "Cannot compile regular expression: %s\n", buf);
992 } 1492 }
1493 else
1494 printf ("compiled '%s' OK to %x\n", transform, (int)transformre);
993 } 1495 }
994#endif 1496#endif
1497
1498 if (opt_outline && !opt_minspace)
1499 {
1500 /* adding outline increases the total width and height by 2
1501 pixels each, and offsets the text one pixel right and one
1502 pixel down */
1503 effect_x_space = effect_y_space = 2;
1504 effect_x_offset = effect_y_offset = 1;
1505 }
1506 else if (opt_shade && !opt_minspace)
1507 {
1508 /* adding a shadow increases the space used */
1509 effect_x_space = abs (SHADE_X);
1510 effect_y_space = abs (SHADE_Y);
1511
1512 /* if the shadow is to the right and below then we don't need
1513 * to move the text to make space for it, but shadows to the left
1514 * and above need accomodating */
1515 effect_x_offset = SHADE_X > 0 ? 0 : -SHADE_X;
1516 effect_y_offset = SHADE_Y > 0 ? 0 : -SHADE_Y;
1517 }
1518 else
1519 {
1520 effect_x_space = effect_y_space = 0;
1521 effect_x_offset = effect_y_offset = 0;
1522 }
995 1523
996 InitWindow (); 1524 InitWindow ();
997 1525
998 install_signal (SIGINT, blank_window); 1526 install_signal (SIGINT, blank_window);
999 install_signal (SIGQUIT, blank_window); 1527 install_signal (SIGQUIT, blank_window);
1018 action.sa_handler = handler; 1546 action.sa_handler = handler;
1019 sigemptyset (&action.sa_mask); 1547 sigemptyset (&action.sa_mask);
1020 action.sa_flags = SA_RESTART; 1548 action.sa_flags = SA_RESTART;
1021 1549
1022 if (sigaction (sig, &action, NULL) < 0) 1550 if (sigaction (sig, &action, NULL) < 0)
1023 fprintf (stderr, "sigaction(%d): %s\n", sig, strerror (errno)), exit (1); 1551 fprintf (stderr, "sigaction (%d): %s\n", sig, strerror (errno)), exit (1);
1024} 1552}
1025 1553
1026void * 1554void *
1027xstrdup (const char *string) 1555xstrdup (const char *string)
1028{ 1556{
1029 void *p; 1557 void *p;
1030 1558
1031 while ((p = strdup (string)) == NULL) 1559 while ((p = strdup (string)) == NULL)
1032 { 1560 {
1033 fprintf (stderr, "Memory exausted."); 1561 fprintf (stderr, "Memory exhausted in xstrdup ().\n");
1034 sleep (10); 1562 sleep (10);
1035 } 1563 }
1036 1564
1037 return p; 1565 return p;
1038} 1566}
1042{ 1570{
1043 void *p; 1571 void *p;
1044 1572
1045 while ((p = malloc (size)) == NULL) 1573 while ((p = malloc (size)) == NULL)
1046 { 1574 {
1047 fprintf (stderr, "Memory exausted."); 1575 fprintf (stderr, "Memory exhausted in xmalloc ().\n");
1576 sleep (10);
1577 }
1578
1579 return p;
1580}
1581
1582void *
1583xrealloc (void *ptr, size_t size)
1584{
1585 void *p;
1586
1587 while ((p = realloc (ptr, size)) == NULL)
1588 {
1589 fprintf (stderr, "Memory exhausted in xrealloc ().\n");
1048 sleep (10); 1590 sleep (10);
1049 } 1591 }
1050 1592
1051 return p; 1593 return p;
1052} 1594}
1053 1595
1054void 1596void
1055display_help (char *myname) 1597display_help (char *myname)
1056{ 1598{
1057 printf ("Usage: %s [options] file1[,color[,desc]] " 1599 printf ("Usage: %s [options] file1[,color[,desc]]"
1058 "[file2[,color[,desc]] ...]\n", myname); 1600 "[options] [file2[,color[,desc]] ...]\n", myname);
1059 printf (" -g | -geometry geometry -g WIDTHxHEIGHT+X+Y\n" 1601 printf (" -g | -geometry geometry -g WIDTHxHEIGHT+X+Y\n"
1060 " -color color use color $color as default\n" 1602 " -color color use color $color as default\n"
1061 " -reload sec command reload after $sec and run command\n" 1603 " -reload sec command reload after $sec and run command\n"
1062 " -id id window id to use instead of the root window\n" 1604 " -id id window id to use instead of the root window\n"
1063 " -font FONTSPEC (-fn) font to use\n" 1605 " -font FONTSPEC (-fn) font to use\n"
1065 " -reverse print new lines at the top\n" 1607 " -reverse print new lines at the top\n"
1066 " -whole wait for \\n before showing a line\n" 1608 " -whole wait for \\n before showing a line\n"
1067 " -partial show lines even if they don't end with a \\n\n" 1609 " -partial show lines even if they don't end with a \\n\n"
1068 " -update allow updates to old partial lines\n" 1610 " -update allow updates to old partial lines\n"
1069 " -cont string to prefix continued partial lines with\n" 1611 " -cont string to prefix continued partial lines with\n"
1070 " defaults to \"[+]\"\n" 1612 " defaults to \"|| \"\n"
1613 " -wordwrap wrap long lines at spaces to avoid breaking words\n"
1071 " -shade add shading to font\n" 1614 " -shade add shading to font\n"
1615 " -outline add black outline to font\n"
1616 " -minspace force minimum line spacing\n"
1072 " -noinitial don't display the last file lines on\n" 1617 " -noinitial don't display the last file lines on\n"
1073 " startup\n" 1618 " startup\n"
1074 " -i | -interval seconds interval between checks (fractional\n" 1619 " -i | -interval seconds interval between checks (fractional\n"
1075 " values o.k.). Default 3 seconds\n" 1620 " values o.k.). Default 2.4 seconds\n"
1076 " -V display version information and exit\n" 1621 " -V display version information and exit\n"
1077 "\n"); 1622 "\n");
1078 printf ("Example:\n%s -g 80x25+100+50 -font fixed /var/log/messages,green " 1623 printf ("Example:\n%s -g 800x250+100+50 -font fixed /var/log/messages,green "
1079 "/var/log/secure,red,'ALERT'\n", myname); 1624 "/var/log/secure,red,'ALERT'\n", myname);
1080 exit (0); 1625 exit (0);
1081} 1626}
1082 1627
1083void 1628void
1088} 1633}
1089 1634
1090int 1635int
1091daemonize (void) 1636daemonize (void)
1092{ 1637{
1638 pid_t pid;
1639
1093 switch (fork ()) 1640 switch (pid = fork ())
1094 { 1641 {
1095 case -1: 1642 case -1:
1096 return -1; 1643 return -1;
1097 case 0: 1644 case 0:
1098 break; 1645 break;
1099 default: 1646 default:
1647 /*printf ("%d\n", pid);*/
1100 _exit (0); 1648 exit (0);
1101 } 1649 }
1102 1650
1103 if (setsid () == -1) 1651 if (setsid () == -1)
1104 return -1; 1652 return -1;
1105 1653

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines