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.13 by pcg, Sat Mar 27 01:35:58 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, win_y, width, height, 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 XClearArea (disp, root, win_x, win_y, width, height, False); 383 XSetClipMask (disp, WinGC, None);
321 refresh (0, 32768); 384 refresh (0, 32768, 1, redraw_all);
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 }
322} 416}
323 417
324/* Just redraw everything without clearing (i.e. after an EXPOSE event) */ 418/* Just redraw everything without clearing (i.e. after an EXPOSE event) */
325void 419void
326refresh (int miny, int maxy) 420refresh (int miny, int maxy, int clear, int refresh_all)
327{ 421{
328 int lin; 422 int lin = 0;
329 int offset = (listlen + 1) * font_height; 423 int space = height;
424 int offset;
330 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;
331 429
332 miny -= win_y + font_height; 430 if (opt_reverse)
333 maxy -= win_y - font_height; 431 offset = effect_y_offset;
432 else
433 offset = height + effect_y_offset;
334 434
435 miny -= win_y;
436 maxy -= win_y;
335 437
336 for (lin = listlen; lin--;) 438 if (clear && !opt_noflicker)
337 { 439 XClearArea (disp, root, win_x, win_y, width + MARGIN_OF_ERROR, height, False);
338 struct linematrix *line = lines + (opt_reverse ? listlen - lin - 1 : lin);
339 440
340 offset -= font_height; 441 for (line = linelist; line; line = line->next, lin++)
442 {
443 struct displaymatrix *display_line;
341 444
342 if (offset < miny || offset > maxy) 445 if (opt_noflicker && lin >= listlen)
343 continue; 446 {
344 447 int i = listlen;
345 if (opt_shade) 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)
587 {
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 */
358 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);
593 }
359} 594}
360 595
361#if HAS_REGEX 596#if HAS_REGEX
362void 597void
363transform_line (char *s) 598transform_line (char *s)
375 if (transformre) 610 if (transformre)
376 { 611 {
377 int i; 612 int i;
378 regmatch_t matched[16]; 613 regmatch_t matched[16];
379 614
380 i = regexec (&transformre, string, 16, matched, 0); 615 i = regexec (transformre, s, 16, matched, 0);
381 if (i == 0) 616 if (i == 0)
382 { /* 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';
383 } 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);
384 } 644 }
385} 645}
386#endif 646#endif
387 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 */
388char * 652char *
389concat_line (const char *p1, const char *p2) 653concat_line (char *p1, const char *p2)
390{ 654{
391 int l1 = p1 ? strlen (p1) : 0; 655 int l1 = p1 ? strlen (p1) : 0;
392 int l2 = strlen (p2); 656 int l2 = strlen (p2);
393 char *r = xmalloc (l1 + l2 + 1); 657 char *r;
394 658
395 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
396 memcpy (r + l1, p2, l2); 666 memcpy (r + l1, p2, l2);
397 r[l1 + l2] = 0; 667 r[l1 + l2] = 0;
398 668
399 return r; 669 return r;
400} 670}
401 671
402/* 672/*
403 * 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.
404 */ 674 */
405int 675int
406lineinput (struct logfile_entry *logfile) 676lineinput (struct logfile_entry *logfile)
407{ 677{
408 char buff[1024], *p = buff; 678 char buff[1024], *p;
409 int ch; 679 int ch;
680 /* HACK-2: add on the length of any partial line which we will be appending to */
410 int ofs = logfile->buf ? strlen (logfile->buf) : 0; 681 int ofs = logfile->buf ? strlen (logfile->buf) : 0;
411 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 */
412 do 687 do
413 { 688 {
689 p = buff;
690 do
691 {
414 ch = fgetc (logfile->fp); 692 ch = fgetc (logfile->fp);
415 693
416 if (ch == '\r') 694 if (ch == '\n' || ch == EOF)
417 continue;
418 else if (ch == EOF || ch == '\n')
419 break; 695 break;
696 else if (ch == '\r')
697 continue; /* skip */
420 else if (ch == '\t') 698 else if (ch == '\t')
421 { 699 {
422 do 700 do
423 { 701 {
424 *p++ = ' '; 702 *p++ = ' ';
703 ofs++;
704 }
705 while (ofs & 7);
706 }
707 else
708 {
709 *p++ = ch;
425 ofs++; 710 ofs++;
426 } 711 }
427 while (ofs & 7);
428 }
429 else
430 { 712 }
431 *p++ = ch;
432 ofs++;
433 }
434 }
435 while (p < buff + (sizeof buff) - 8 - 1); 713 while (p < buff + (sizeof buff) - 8 - 1);
436 714
437 if (p == buff) 715 if (p == buff && ch == EOF)
438 return 0; 716 return 0;
439 717
440 *p = 0; 718 *p = 0;
441 719
442 p = concat_line (logfile->buf, buff); 720 p = logfile->buf = concat_line (logfile->buf, buff);
443 free (logfile->buf); logfile->buf = p; 721 }
722 while (ch != '\n' && ch != EOF);
444 723
445 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 */
446 logfile->partial = ch == EOF; 728 logfile->partial = ch != '\n';
447 729
448 if (logfile->partial && opt_whole) 730 if (logfile->partial && opt_whole)
449 return 0; 731 return 0;
450 732
451#if HAS_REGEX 733#if HAS_REGEX
452 transform_line (logfile->buf); 734 transform_line (logfile->buf);
480 else 762 else
481 file->inode = stats.st_ino; 763 file->inode = stats.st_ino;
482 764
483 if (opt_noinitial) 765 if (opt_noinitial)
484 fseek (file->fp, 0, SEEK_END); 766 fseek (file->fp, 0, SEEK_END);
485 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?
486 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);
487 771
488 file->last_size = stats.st_size; 772 file->last_size = stats.st_size;
489 return file->fp; 773 return file->fp;
490} 774}
491 775
523 { /* file missing? */ 807 { /* file missing? */
524 sleep (1); 808 sleep (1);
525 if (e->fp) 809 if (e->fp)
526 fclose (e->fp); 810 fclose (e->fp);
527 if (openlog (e) == NULL) 811 if (openlog (e) == NULL)
528 break; 812 continue;
813 if (fstat (fileno (e->fp), &stats) < 0)
814 continue;
529 } 815 }
530 816
531 if (stats.st_ino != e->inode) 817 if (stats.st_ino != e->inode)
532 { /* file renamed? */ 818 { /* file renamed? */
533 if (e->fp) 819 if (e->fp)
534 fclose (e->fp); 820 fclose (e->fp);
535 if (openlog (e) == NULL) 821 if (openlog (e) == NULL)
536 break; 822 continue;
823 if (fstat (fileno (e->fp), &stats) < 0)
824 continue;
537 } 825 }
538 826
539 if (stats.st_size < e->last_size) 827 if (stats.st_size < e->last_size)
540 { /* file truncated? */ 828 { /* file truncated? */
541 fseek (e->fp, 0, SEEK_SET); 829 fseek (e->fp, 0, SEEK_SET);
542 e->last_size = stats.st_size; 830 e->last_size = stats.st_size;
543 } 831 }
544 } 832 }
545} 833}
546 834
835/*
836 * insert a single node in the list of screen lines and return a
837 * pointer to the new node.
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.
889 */
547static void 890static void
548insert_line (int idx) 891possibly_split_long_line (struct logfile_entry *log)
549{ 892{
550 int cur_line; 893 char *str = log->last->line;
551 struct logfile_entry *current;
552
553 free (lines[0].line);
554
555 for (cur_line = 0; cur_line < idx; cur_line++)
556 lines[cur_line] = lines[cur_line + 1];
557
558 for (current = loglist; current; current = current->next)
559 if (current->partial && current->index && current->index <= idx)
560 current->index--;
561}
562
563static void
564delete_line (int idx)
565{
566 int cur_line;
567 struct logfile_entry *current;
568
569 for (cur_line = idx; cur_line > 0; cur_line--)
570 lines[cur_line] = lines[cur_line - 1];
571
572 lines[0].line = strdup ("~");
573
574 for (current = loglist; current; current = current->next)
575 if (current->partial && current->index && current->index <= idx)
576 current->index++;
577}
578
579static void
580split_line (int idx, const char *str, unsigned long color)
581{
582 int l = strlen (str); 894 int l = strlen (str);
583 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 }
584 916
585 do 917 do
586 { 918 {
587 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;
588 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;
589 931
590 while (*p) 932 while (*p)
591 { 933 {
934 int cw, len;
935
936 /* find the length in bytes of the next multibyte character */
592 int len = mblen (p, l); 937 len = mblen (p, l);
593 if (len <= 0) 938 if (len <= 0)
594 len = 1; /* ignore (don't skip) ilegal character sequences */ 939 len = 1; /* ignore (don't skip) illegal character sequences */
595 940
941 /* find the width in pixels of the next character */
596 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
597 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;
598 break; 980 break;
981 }
599 982
600 w += cw; 983 w += cw;
601 p += len; 984 p += len;
602 l -= len; 985 l -= len;
603 } 986 }
604 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)
605 { 996 {
606 char *s = xmalloc (p - beg + 1); 997 prefix_len = break_p - beg;
607 memcpy (s, beg, p - beg); 998 p = break_p;
608 s[p - beg] = 0; 999 w = width_at_break_p;
609 insert_line (idx); 1000
610 lines[idx].line = s; 1001 /* if breaking at a space, skip all adjacent spaces */
611 lines[idx].len = p - beg; 1002 while (*p == ' ')
612 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 }
613 } 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;
614 } 1048 }
615 while (l); 1049 while (l);
616} 1050}
617 1051
618static void 1052static void
619append_line (int idx, const char *str) 1053insert_new_line (char *str, struct logfile_entry *log)
620{ 1054{
621 unsigned long color = lines[idx].color; 1055 struct line_node *new;
622 char *old = lines[idx].line; 1056 new = new_line_node (log);
1057 new->line = str;
1058 new->len = strlen (str);
1059
1060 possibly_split_long_line (log);
1061}
1062
1063/*
1064 * append something to an existing physical line. this is done
1065 * by deleting the file on-screen, concatenating the new data to it
1066 * and splitting it again.
1067 */
1068static void
1069append_to_existing_line (char *str, struct logfile_entry *log)
1070{
1071 char *old, *new;
1072
1073 assert(log);
1074 assert(log->last);
1075
1076 old = log->last->line;
1077 assert(old);
1078
623 char *new = concat_line (old, str); 1079 new = concat_line (old, str);
624
625 free (old);
626 free (str); 1080 free (str);
627 1081 log->last->line = new;
628 delete_line (idx); 1082 log->last->len = strlen (new);
629 split_line (idx, new, color); 1083 possibly_split_long_line (log);
630} 1084}
631 1085
632static void 1086static void
633main_loop (void) 1087main_loop (void)
634{ 1088{
635 lines = xmalloc (sizeof (struct linematrix) * listlen); 1089 int lin;
636 int lin, miny, maxy;
637 time_t lastreload; 1090 time_t lastreload;
638 Region region = XCreateRegion (); 1091 Region region = XCreateRegion ();
639 XEvent xev; 1092 XEvent xev;
640 struct logfile_entry *lastprinted = NULL; 1093 struct logfile_entry *lastprinted = NULL;
641 struct logfile_entry *current; 1094 struct logfile_entry *current;
1095 int need_update = 1;
642 1096
643 maxy = 0; 1097 display = xmalloc (sizeof (struct displaymatrix) * listlen);
644 miny = win_y + height; 1098
645 lastreload = time (NULL); 1099 lastreload = time (NULL);
646 1100
647 /* Initialize linematrix */ 1101 /* Initialize line_node */
648 for (lin = 0; lin < listlen; lin++) 1102 for (lin = 0; lin < listlen; lin++)
649 { 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
650 lines[lin].line = strdup ("~"); 1120 display[lin].line = xstrdup ("");
651 lines[lin].len = 1; 1121 display[lin].len = 0;
652 lines[lin].color = GetColor (def_color); 1122 display[lin].offset = 0;
1123 display[lin].buffer_size = 0;
653 } 1124 }
654
655 /* show the display full of empty lines ("~") in case the first
656 * time around the loop doesn't produce any output, as it won't if
657 * either (a) -noinitial is set or (b) all the files are currently
658 * empty */
659 redraw ();
660 1125
661 for (;;) 1126 for (;;)
662 { 1127 {
663 int need_update = 0;
664
665 /* read logs */ 1128 /* read logs */
666 for (current = loglist; current; current = current->next) 1129 for (current = loglist; current; current = current->next)
667 { 1130 {
668 if (!current->fp) 1131 if (!current->fp)
669 continue; /* skip missing files */ 1132 continue; /* skip missing files */
676 /* if we're trying to update old partial lines in 1139 /* if we're trying to update old partial lines in
677 * place, and the last time this file was updated the 1140 * place, and the last time this file was updated the
678 * output was partial, and that partial line is not 1141 * output was partial, and that partial line is not
679 * too close to the top of the screen, then update 1142 * too close to the top of the screen, then update
680 * that partial line */ 1143 * that partial line */
681 if (opt_update && current->lastpartial && current->index > 0) 1144 if (opt_update && current->lastpartial && current->last)
682 { 1145 {
683 append_line (current->index, current->buf); 1146 append_to_existing_line (current->buf, current);
684 free (current->buf), current->buf = 0; 1147 current->buf = 0;
685 continue; 1148 continue;
686 } 1149 }
687 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
688 /* print filename if any, and if last line was from 1159 /* print filename if any, and if last line was from
689 * different file */ 1160 * different file */
690 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)
691 { 1175 {
692 char buf[1024]; /* HACK */
693 snprintf (buf, sizeof (buf), "[%s]", current->desc);
694 split_line (listlen - 1, buf, current->color);
695 }
696
697 /* if this is the same file we showed last, and the 1176 /* if this is the same file we showed last then
698 * last time we showed it, it wasn't finished, then
699 * append to the last line shown */ 1177 append to the last line shown */
700 if (lastprinted == current && current->lastpartial) 1178 if (lastprinted == current)
1179 append_to_existing_line (current->buf, current);
1180 else
701 { 1181 {
702 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 */
703 free (current->buf), current->buf = 0; 1185 insert_new_line (current->buf, current);
1186 current->last->wrapped_left = 1;
704 continue; 1187 }
705 } 1188 }
706 else 1189 else
707 { 1190 /* otherwise just make a plain and simple new line */
708 split_line (listlen - 1, current->buf, current->color);
709 free (current->buf), current->buf = 0; 1191 insert_new_line (current->buf, current);
710 }
711 1192
712 current->index = listlen - 1; 1193 current->buf = 0;
713 lastprinted = current; 1194 lastprinted = current;
714 } 1195 }
715 } 1196 }
716 1197
717 if (need_update) 1198 if (need_update)
1199 {
718 redraw (); 1200 redraw (0);
1201 need_update = 0;
1202 }
719 else 1203 else
720 { 1204 {
721 XFlush (disp); 1205 XFlush (disp);
722 1206
723 if (!XPending (disp)) 1207 if (!XPending (disp))
749 1233
750 r.x = xev.xexpose.x; 1234 r.x = xev.xexpose.x;
751 r.y = xev.xexpose.y; 1235 r.y = xev.xexpose.y;
752 r.width = xev.xexpose.width; 1236 r.width = xev.xexpose.width;
753 r.height = xev.xexpose.height; 1237 r.height = xev.xexpose.height;
1238
754 XUnionRectWithRegion (&r, region, region); 1239 XUnionRectWithRegion (&r, region, region);
755 if (miny > r.y)
756 miny = r.y;
757 if (maxy < r.y + r.height)
758 maxy = r.y + r.height;
759 } 1240 }
760 break; 1241 break;
761 default: 1242 default:
762#ifdef DEBUGMODE 1243#ifdef DEBUGMODE
763 fprintf (stderr, "PANIC! Unknown event %d\n", xev.type); 1244 fprintf (stderr, "PANIC! Unknown event %d\n", xev.type);
776 lastreload = time (NULL); 1257 lastreload = time (NULL);
777 } 1258 }
778 1259
779 if (!XEmptyRegion (region)) 1260 if (!XEmptyRegion (region))
780 { 1261 {
1262 XRectangle r;
1263
781 XSetRegion (disp, WinGC, region); 1264 XSetRegion (disp, WinGC, region);
1265 XClipBox (region, &r);
782 1266
783 refresh (miny, maxy); 1267 refresh (r.y, r.y + r.height, 0, 1);
1268
784 XDestroyRegion (region); 1269 XDestroyRegion (region);
785 region = XCreateRegion (); 1270 region = XCreateRegion ();
786 maxy = 0;
787 miny = win_y + height;
788 } 1271 }
789 } 1272 }
790} 1273}
791 1274
792 1275
799#if HAS_REGEX 1282#if HAS_REGEX
800 char *transform = NULL; 1283 char *transform = NULL;
801#endif 1284#endif
802 1285
803 setlocale (LC_CTYPE, ""); /* try to initialize the locale. */ 1286 setlocale (LC_CTYPE, ""); /* try to initialize the locale. */
804
805 /* window needs to be initialized before colorlookups can be done */
806 /* just a dummy to get the color lookups right */
807 geom_mask = NoValue;
808 InitWindow ();
809 1287
810 for (i = 1; i < argc; i++) 1288 for (i = 1; i < argc; i++)
811 { 1289 {
812 const char *arg = argv[i]; 1290 const char *arg = argv[i];
813 1291
826 XParseGeometry (argv[++i], &win_x, &win_y, &width, &height); 1304 XParseGeometry (argv[++i], &win_x, &win_y, &width, &height);
827 else if (!strcmp (arg, "-display")) 1305 else if (!strcmp (arg, "-display"))
828 dispname = argv[++i]; 1306 dispname = argv[++i];
829 else if (!strcmp (arg, "-cont")) 1307 else if (!strcmp (arg, "-cont"))
830 continuation = argv[++i]; 1308 continuation = argv[++i];
1309 else if (!strcmp (arg, "-cont-color"))
1310 cont_color = argv[++i];
831 else if (!strcmp (arg, "-font") || !strcmp (arg, "-fn")) 1311 else if (!strcmp (arg, "-font") || !strcmp (arg, "-fn"))
832 fontname = argv[++i]; 1312 fontname = argv[++i];
833#if HAS_REGEX 1313#if HAS_REGEX
834 else if (!strcmp (arg, "-t")) 1314 else if (!strcmp (arg, "-t"))
1315 {
835 transform = argv[++i]; 1316 transform = argv[++i];
1317 transform_to = argv[++i];
1318 printf ("transform: '%s' to '%s'\n", transform, transform_to);
1319 }
836#endif 1320#endif
837 else if (!strcmp (arg, "-fork") || !strcmp (arg, "-f")) 1321 else if (!strcmp (arg, "-fork") || !strcmp (arg, "-f"))
838 opt_daemonize = 1; 1322 opt_daemonize = 1;
839 else if (!strcmp (arg, "-reload")) 1323 else if (!strcmp (arg, "-reload"))
840 { 1324 {
841 reload = atoi (argv[++i]); 1325 reload = atoi (argv[++i]);
842 command = argv[++i]; 1326 command = argv[++i];
843 } 1327 }
844 else if (!strcmp (arg, "-shade")) 1328 else if (!strcmp (arg, "-shade"))
845 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;
846 else if (!strcmp (arg, "-frame")) 1336 else if (!strcmp (arg, "-frame"))
847 opt_frame = 1; 1337 opt_frame = 1;
848 else if (!strcmp (arg, "-no-filename")) 1338 else if (!strcmp (arg, "-no-filename"))
849 opt_nofilename = 1; 1339 opt_nofilename = 1;
850 else if (!strcmp (arg, "-reverse")) 1340 else if (!strcmp (arg, "-reverse"))
853 opt_whole = 1; 1343 opt_whole = 1;
854 else if (!strcmp (arg, "-partial")) 1344 else if (!strcmp (arg, "-partial"))
855 opt_partial = 1; 1345 opt_partial = 1;
856 else if (!strcmp (arg, "-update")) 1346 else if (!strcmp (arg, "-update"))
857 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;
858 else if (!strcmp (arg, "-color")) 1352 else if (!strcmp (arg, "-color"))
859 def_color = argv[++i]; 1353 def_color = argv[++i];
860 else if (!strcmp (arg, "-noinitial")) 1354 else if (!strcmp (arg, "-noinitial"))
861 opt_noinitial = 1; 1355 opt_noinitial = 1;
862 else if (!strcmp (arg, "-id")) 1356 else if (!strcmp (arg, "-id"))
863 root = atoi (argv[++i]); 1357 {
1358 unsigned long id;
1359
1360 if (sscanf (argv[++i], "%li", &id) == 1 && id)
1361 root = id;
1362 }
864 else if (!strcmp (arg, "-interval") || !strcmp (arg, "-i")) 1363 else if (!strcmp (arg, "-interval") || !strcmp (arg, "-i"))
865 { 1364 {
866 double iv = atof (argv[++i]); 1365 double iv = atof (argv[++i]);
867 1366
868 interval.tv_sec = (int) iv; 1367 interval.tv_sec = (int) iv;
905 { 1404 {
906 if ((e->fp = fdopen (0, "r")) == NULL) 1405 if ((e->fp = fdopen (0, "r")) == NULL)
907 perror ("fdopen"), exit (1); 1406 perror ("fdopen"), exit (1);
908 if (fcntl (0, F_SETFL, O_NONBLOCK) < 0) 1407 if (fcntl (0, F_SETFL, O_NONBLOCK) < 0)
909 perror ("fcntl"), exit (1); 1408 perror ("fcntl"), exit (1);
1409
910 e->fname = NULL; 1410 e->fname = NULL;
911 e->inode = 0; 1411 e->inode = 0;
1412 if (desc == arg)
912 e->desc = xstrdup ("stdin"); 1413 e->desc = xstrdup ("stdin");
1414 else
1415 e->desc = xstrdup (desc);
913 } 1416 }
914 else 1417 else
915 { 1418 {
916 int l;
917
918 e->fname = xstrdup (fname); 1419 e->fname = xstrdup (fname);
1420
919 if (openlog (e) == NULL) 1421 if (openlog (e) == NULL)
920 perror (fname), exit (1); 1422 perror (fname), exit (1);
921 1423
922 l = strlen (desc); 1424 e->desc = xstrdup (desc);
923 if (l > width - 2) /* must account for [ ] */
924 l = width - 2;
925 e->desc = xmalloc (l + 1);
926 memcpy (e->desc, desc, l);
927 *(e->desc + l) = '\0';
928 } 1425 }
929 1426
930 e->color = GetColor (fcolor); 1427 e->colorname = fcolor;
931 e->partial = 0; 1428 e->partial = 0;
1429 e->fontname = fontname;
1430 e->last = NULL;
932 e->next = NULL; 1431 e->next = NULL;
933 1432
934 if (!loglist) 1433 if (!loglist)
935 loglist = e; 1434 loglist = e;
936 if (loglist_tail) 1435 if (loglist_tail)
937 loglist_tail->next = e; 1436 loglist_tail->next = e;
1437
938 loglist_tail = e; 1438 loglist_tail = e;
939 } 1439 }
940 } 1440 }
941 1441
942 if (!loglist) 1442 if (!loglist)
944 fprintf (stderr, "You did not specify any files to tail\n" 1444 fprintf (stderr, "You did not specify any files to tail\n"
945 "use %s --help for help\n", argv[0]); 1445 "use %s --help for help\n", argv[0]);
946 exit (1); 1446 exit (1);
947 } 1447 }
948 1448
1449 if (opt_update && opt_whole)
1450 {
1451 fprintf (stderr, "Specify at most one of -update and -whole\n");
1452 exit (1);
1453 }
949 if (opt_partial && opt_whole) 1454 else if (opt_partial && opt_whole)
950 { 1455 {
951 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");
952 exit (1); 1468 exit (1);
953 } 1469 }
954 1470
955 if (opt_partial) 1471 if (opt_partial)
956 /* 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 */
957 opt_whole = 0; 1473 opt_whole = 0;
958 else if (file_count > 1) 1474 else if (file_count > 1)
959 /* 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 */
960 opt_whole = 1; 1476 opt_whole = 1;
961 1477
962#if HAS_REGEX 1478#if HAS_REGEX
963 if (transform) 1479 if (transform)
964 { 1480 {
965 int i; 1481 int i;
966 1482
1483 printf ("compiling regexp '%s'\n", transform);
967 transformre = xmalloc (sizeof (transformre)); 1484 transformre = xmalloc (sizeof (regex_t));
968 i = regcomp (&transformre, transform, REG_EXTENDED); 1485 i = regcomp (transformre, transform, REG_EXTENDED);
969 if (i != 0) 1486 if (i != 0)
970 { 1487 {
971 char buf[512]; 1488 char buf[512];
972 1489
973 regerror (i, &transformre, buf, sizeof (buf)); 1490 regerror (i, transformre, buf, sizeof (buf));
974 fprintf (stderr, "Cannot compile regular expression: %s\n", buf); 1491 fprintf (stderr, "Cannot compile regular expression: %s\n", buf);
975 } 1492 }
1493 else
1494 printf ("compiled '%s' OK to %x\n", transform, (int)transformre);
976 } 1495 }
977#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 }
978 1523
979 InitWindow (); 1524 InitWindow ();
980 1525
981 install_signal (SIGINT, blank_window); 1526 install_signal (SIGINT, blank_window);
982 install_signal (SIGQUIT, blank_window); 1527 install_signal (SIGQUIT, blank_window);
1001 action.sa_handler = handler; 1546 action.sa_handler = handler;
1002 sigemptyset (&action.sa_mask); 1547 sigemptyset (&action.sa_mask);
1003 action.sa_flags = SA_RESTART; 1548 action.sa_flags = SA_RESTART;
1004 1549
1005 if (sigaction (sig, &action, NULL) < 0) 1550 if (sigaction (sig, &action, NULL) < 0)
1006 fprintf (stderr, "sigaction(%d): %s\n", sig, strerror (errno)), exit (1); 1551 fprintf (stderr, "sigaction (%d): %s\n", sig, strerror (errno)), exit (1);
1007} 1552}
1008 1553
1009void * 1554void *
1010xstrdup (const char *string) 1555xstrdup (const char *string)
1011{ 1556{
1012 void *p; 1557 void *p;
1013 1558
1014 while ((p = strdup (string)) == NULL) 1559 while ((p = strdup (string)) == NULL)
1015 { 1560 {
1016 fprintf (stderr, "Memory exausted."); 1561 fprintf (stderr, "Memory exhausted in xstrdup ().\n");
1017 sleep (10); 1562 sleep (10);
1018 } 1563 }
1019 1564
1020 return p; 1565 return p;
1021} 1566}
1025{ 1570{
1026 void *p; 1571 void *p;
1027 1572
1028 while ((p = malloc (size)) == NULL) 1573 while ((p = malloc (size)) == NULL)
1029 { 1574 {
1030 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");
1031 sleep (10); 1590 sleep (10);
1032 } 1591 }
1033 1592
1034 return p; 1593 return p;
1035} 1594}
1036 1595
1037void 1596void
1038display_help (char *myname) 1597display_help (char *myname)
1039{ 1598{
1040 printf ("Usage: %s [options] file1[,color[,desc]] " 1599 printf ("Usage: %s [options] file1[,color[,desc]]"
1041 "[file2[,color[,desc]] ...]\n", myname); 1600 "[options] [file2[,color[,desc]] ...]\n", myname);
1042 printf (" -g | -geometry geometry -g WIDTHxHEIGHT+X+Y\n" 1601 printf (" -g | -geometry geometry -g WIDTHxHEIGHT+X+Y\n"
1043 " -color color use color $color as default\n" 1602 " -color color use color $color as default\n"
1044 " -reload sec command reload after $sec and run command\n" 1603 " -reload sec command reload after $sec and run command\n"
1045 " -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"
1046 " -font FONTSPEC (-fn) font to use\n" 1605 " -font FONTSPEC (-fn) font to use\n"
1048 " -reverse print new lines at the top\n" 1607 " -reverse print new lines at the top\n"
1049 " -whole wait for \\n before showing a line\n" 1608 " -whole wait for \\n before showing a line\n"
1050 " -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"
1051 " -update allow updates to old partial lines\n" 1610 " -update allow updates to old partial lines\n"
1052 " -cont string to prefix continued partial lines with\n" 1611 " -cont string to prefix continued partial lines with\n"
1053 " defaults to \"[+]\"\n" 1612 " defaults to \"|| \"\n"
1613 " -wordwrap wrap long lines at spaces to avoid breaking words\n"
1054 " -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"
1055 " -noinitial don't display the last file lines on\n" 1617 " -noinitial don't display the last file lines on\n"
1056 " startup\n" 1618 " startup\n"
1057 " -i | -interval seconds interval between checks (fractional\n" 1619 " -i | -interval seconds interval between checks (fractional\n"
1058 " values o.k.). Default 3 seconds\n" 1620 " values o.k.). Default 2.4 seconds\n"
1059 " -V display version information and exit\n" 1621 " -V display version information and exit\n"
1060 "\n"); 1622 "\n");
1061 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 "
1062 "/var/log/secure,red,'ALERT'\n", myname); 1624 "/var/log/secure,red,'ALERT'\n", myname);
1063 exit (0); 1625 exit (0);
1064} 1626}
1065 1627
1066void 1628void
1071} 1633}
1072 1634
1073int 1635int
1074daemonize (void) 1636daemonize (void)
1075{ 1637{
1638 pid_t pid;
1639
1076 switch (fork ()) 1640 switch (pid = fork ())
1077 { 1641 {
1078 case -1: 1642 case -1:
1079 return -1; 1643 return -1;
1080 case 0: 1644 case 0:
1081 break; 1645 break;
1082 default: 1646 default:
1647 /*printf ("%d\n", pid);*/
1083 _exit (0); 1648 exit (0);
1084 } 1649 }
1085 1650
1086 if (setsid () == -1) 1651 if (setsid () == -1)
1087 return -1; 1652 return -1;
1088 1653

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines