1 |
/*--------------------------------*-C-*---------------------------------* |
2 |
* Copyright 1997 1998 Oezguer Kesim <kesim@math.fu-berlin.de> |
3 |
* Copyright 1992, 1993 Robert Nation <nation@rocket.sanders.lockheed.com> |
4 |
* |
5 |
* This program is free software; you can redistribute it and/or modify |
6 |
* it under the terms of the GNU General Public License as published by |
7 |
* the Free Software Foundation; either version 2 of the License, or |
8 |
* (at your option) any later version. |
9 |
* |
10 |
* This program is distributed in the hope that it will be useful, |
11 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
12 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
13 |
* GNU General Public License for more details. |
14 |
* |
15 |
* You should have received a copy of the GNU General Public License |
16 |
* along with this program; if not, write to the Free Software |
17 |
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
18 |
*----------------------------------------------------------------------*/ |
19 |
#ifdef HAVE_CONFIG_H |
20 |
# include <config.h> |
21 |
#else |
22 |
/* # define STDC_HEADERS */ |
23 |
# define HAVE_UNISTD_H |
24 |
# define TIME_WITH_SYS_TIME |
25 |
# define HAVE_SYS_TIME_H |
26 |
# ifdef _AIX |
27 |
# define HAVE_SYS_SELECT_H |
28 |
# endif |
29 |
#endif |
30 |
|
31 |
#include "../src/version.h" |
32 |
#include "feature.h" |
33 |
|
34 |
#include <ctype.h> |
35 |
/* #ifdef STDC_HEADERS */ |
36 |
# include <stdarg.h> |
37 |
# include <stdio.h> |
38 |
# include <stdlib.h> |
39 |
# include <string.h> |
40 |
/* #endif */ |
41 |
|
42 |
#ifdef HAVE_UNISTD_H |
43 |
# include <unistd.h> |
44 |
#endif |
45 |
|
46 |
#ifdef TIME_WITH_SYS_TIME |
47 |
# include <sys/time.h> |
48 |
# include <time.h> |
49 |
#else |
50 |
# ifdef HAVE_SYS_TIME_H |
51 |
# include <sys/time.h> |
52 |
# else |
53 |
# include <time.h> |
54 |
# endif |
55 |
#endif |
56 |
|
57 |
#if defined (__svr4__) |
58 |
# include <sys/resource.h> /* for struct rlimit */ |
59 |
#endif |
60 |
|
61 |
#ifdef HAVE_SYS_SELECT_H |
62 |
# include <sys/select.h> |
63 |
#endif |
64 |
#include <sys/stat.h> |
65 |
|
66 |
#ifdef MAIL |
67 |
#include <dirent.h> |
68 |
#endif |
69 |
|
70 |
#include <X11/Intrinsic.h> /* Xlib, Xutil, Xresource, Xfuncproto */ |
71 |
|
72 |
#define APL_CLASS "Clock" |
73 |
#define APL_NAME "rclock" |
74 |
#define MSG_CLASS "Appointment" |
75 |
#define MSG_NAME "Appointment" |
76 |
#define CONFIG_FILE ".rclock" |
77 |
|
78 |
#ifndef EXIT_SUCCESS /* missed from <stdlib.h> ? */ |
79 |
# define EXIT_SUCCESS 0 |
80 |
# define EXIT_FAILURE 1 |
81 |
#endif |
82 |
|
83 |
/*----------------------------------------------------------------------*/ |
84 |
|
85 |
static Display* Xdisplay; /* X display */ |
86 |
static int Xfd; /* file descriptor of server connection */ |
87 |
static GC Xgc, Xrvgc; /* normal, reverse video GC */ |
88 |
|
89 |
#define Xscreen DefaultScreen (Xdisplay) |
90 |
#define Xcmap DefaultColormap (Xdisplay, Xscreen) |
91 |
#define Xroot DefaultRootWindow (Xdisplay) |
92 |
|
93 |
/* windows and their sizes */ |
94 |
typedef struct { |
95 |
Window win; |
96 |
int width, height; |
97 |
} mywindow_t; |
98 |
|
99 |
static mywindow_t Clock = {None, 80, 80}; /* parent window */ |
100 |
|
101 |
#define fgColor 0 |
102 |
#define bgColor 1 |
103 |
static const char * rs_color [2] = { FG_COLOR_NAME, BG_COLOR_NAME }; |
104 |
static Pixel PixColors [2]; |
105 |
static const char * rs_geometry = NULL; |
106 |
|
107 |
#ifdef ICONWIN |
108 |
static const char * rs_iconGeometry = NULL; |
109 |
static mywindow_t Icon = {None, 65, 65}; /* icon window */ |
110 |
static int iconic_state = NormalState; /* iconic startup? */ |
111 |
#endif |
112 |
|
113 |
#ifdef REMINDERS |
114 |
static mywindow_t Msg = {0, 0, 0}; /* message window */ |
115 |
static struct { |
116 |
Window |
117 |
# ifndef NO_REMINDER_EXEC |
118 |
Start, |
119 |
# endif |
120 |
Dismiss, |
121 |
Defer; |
122 |
int width, height; |
123 |
} msgButton; |
124 |
|
125 |
static XFontStruct * Xfont; |
126 |
#define FontHeight() (Xfont->ascent + Xfont->descent) |
127 |
static int Msg_Mapped = 0; /* message window mapped? */ |
128 |
static int reminderTime = -1; |
129 |
static char message [256] = ""; |
130 |
#ifndef NO_REMINDER_EXEC |
131 |
static char execPrgm [256] = ""; |
132 |
#endif |
133 |
static const char * reminders_file = NULL; /* name of ~/.rclock file */ |
134 |
#ifdef DATE_ON_CLOCK_FACE |
135 |
static int show_date = 1; /* show date on face of clock */ |
136 |
#endif |
137 |
#endif |
138 |
|
139 |
#ifdef ADJUST_TIME |
140 |
static int adjustTime = 0; |
141 |
#else |
142 |
# define adjustTime 0 |
143 |
#endif |
144 |
|
145 |
#ifdef CENTURY |
146 |
# if (CENTURY < 1900) |
147 |
Error, Cenury incorrectly set. |
148 |
# endif |
149 |
#else |
150 |
# define CENTURY 1900 |
151 |
#endif |
152 |
|
153 |
static int clockUpdate = CLOCKUPDATE; |
154 |
|
155 |
#ifdef MAIL |
156 |
static int mailUpdate = MAILUPDATE; |
157 |
static char * mail_file = NULL; |
158 |
#ifndef MAIL_SPAWN |
159 |
static char * mail_spawn = NULL; |
160 |
#endif |
161 |
static int is_maildir = 0; |
162 |
#endif |
163 |
|
164 |
static XSizeHints szHint = { |
165 |
PMinSize | PResizeInc | PBaseSize | PWinGravity, |
166 |
0, 0, 80, 80, /* x, y, width and height */ |
167 |
1, 1, /* Min width and height */ |
168 |
0, 0, /* Max width and height */ |
169 |
1, 1, /* Width and height increments */ |
170 |
{1, 1}, /* x, y increments */ |
171 |
{1, 1}, /* Aspect ratio - not used */ |
172 |
0, 0, /* base size */ |
173 |
NorthWestGravity /* gravity */ |
174 |
}; |
175 |
|
176 |
/* subroutine declarations */ |
177 |
static void geometry2sizehint (mywindow_t * /* win */, |
178 |
const char * /* geom */); |
179 |
static void Create_Windows (int /* argc */, |
180 |
char * /* argv */ []); |
181 |
static void getXevent (void); |
182 |
static void print_error (const char * /* fmt */, ...); |
183 |
|
184 |
static void Draw_Window (mywindow_t * /* this_win */, |
185 |
int /* full_redraw */); |
186 |
static void Reminder (void); |
187 |
static void Next_Reminder (int /* update_only */); |
188 |
|
189 |
/* Arguments for Next_Reminder() */ |
190 |
#define REPLACE 0 |
191 |
#define UPDATE 1 |
192 |
|
193 |
/*----------------------------------------------------------------------*/ |
194 |
|
195 |
static void |
196 |
usage (void) |
197 |
{ |
198 |
int i; |
199 |
struct { |
200 |
const char * const opt; |
201 |
const char * const desc; |
202 |
} optList[] = { |
203 |
#define optList_size() (sizeof(optList)/sizeof(optList[0])) |
204 |
{ "-display displayname", "X server to contact" }, |
205 |
{ "-geometry geom", "size (in pixels) and position" }, |
206 |
{ "-bg color", "background color" }, |
207 |
{ "-fg color", "foreground color" }, |
208 |
#ifdef REMINDERS |
209 |
{ "-fn fontname", "normal font for messages" }, |
210 |
#ifdef DATE_ON_CLOCK_FACE |
211 |
{ "-nodate", "do not display date on the clock face" }, |
212 |
#endif |
213 |
#endif |
214 |
#ifdef ICONWIN |
215 |
{ "-iconic", "start iconic" }, |
216 |
#endif |
217 |
#ifdef ADJUST_TIME |
218 |
{ "-adjust +/-ddhhmm", "adjust clock time" }, |
219 |
#endif |
220 |
{ "-update seconds", "clock update interval" }, |
221 |
#ifdef MAIL |
222 |
{ "-mail seconds", "check $MAIL interval" }, |
223 |
{ "-mailfile file", "file to use for mail checking" }, |
224 |
#ifndef MAIL_SPAWN |
225 |
{ "-mailspawn cmd", "execute `cmd` when clock is clicked" }, |
226 |
#endif |
227 |
#endif |
228 |
{ "#geom", "icon window geometry" } |
229 |
}; |
230 |
|
231 |
fprintf (stderr, "\nUsage v" VERSION ":\n " APL_NAME " [options]\n\n" |
232 |
"where options include:\n"); |
233 |
|
234 |
for (i = 0; i < optList_size(); i++) |
235 |
fprintf (stderr, " %-29s%s\n", optList[i].opt, optList[i].desc); |
236 |
} |
237 |
|
238 |
|
239 |
/**************** |
240 |
* Check out if we are using a maildir drop (qmail) |
241 |
* Note: this changes mail_dir to hold the "new" diretory |
242 |
*/ |
243 |
#ifdef MAIL |
244 |
static void |
245 |
CheckMaildir() |
246 |
{ |
247 |
struct stat st; |
248 |
char *buf, *p; |
249 |
|
250 |
if( !*mail_file || stat(mail_file, &st) || !S_ISDIR(st.st_mode) ) |
251 |
return; /* no */ |
252 |
|
253 |
if( !(buf = malloc(strlen(mail_file)+5)) ) { |
254 |
print_error ("malloc error"); |
255 |
exit( EXIT_FAILURE ); |
256 |
} |
257 |
strcpy(buf,mail_file); |
258 |
p = buf+strlen(buf); |
259 |
if( p[-1] != '/' ) |
260 |
*p++ = '/'; |
261 |
|
262 |
strcpy(p, "tmp" ); |
263 |
if( stat(buf, &st) || !S_ISDIR(st.st_mode ) ) |
264 |
goto leave; |
265 |
strcpy(p, "cur" ); |
266 |
if( stat(buf, &st) || !S_ISDIR(st.st_mode ) ) |
267 |
goto leave; |
268 |
strcpy(p, "new" ); |
269 |
if( stat(buf, &st) || !S_ISDIR(st.st_mode ) ) |
270 |
goto leave; |
271 |
|
272 |
mail_file = buf; |
273 |
is_maildir = 1; |
274 |
return; |
275 |
leave: |
276 |
free(buf); |
277 |
} |
278 |
#endif |
279 |
|
280 |
/*----------------------------------------------------------------------* |
281 |
* rclock - Rob's clock |
282 |
* simple X windows clock with appointment reminder |
283 |
*----------------------------------------------------------------------*/ |
284 |
int |
285 |
main (int argc, char * argv []) |
286 |
{ |
287 |
int i; |
288 |
char * opt, * val; |
289 |
const char * display_name = NULL; |
290 |
XGCValues gcv; |
291 |
|
292 |
#ifdef REMINDERS |
293 |
const char * rs_font = FONT_NAME; |
294 |
|
295 |
/* find the ~/.rclock file */ |
296 |
if ((val = getenv ("HOME")) != NULL) |
297 |
{ |
298 |
char * p = malloc (strlen (CONFIG_FILE) + strlen (val) + 2); |
299 |
if (p == NULL) |
300 |
goto Malloc_Error; |
301 |
|
302 |
strcpy (p, val); |
303 |
strcat (p, "/" CONFIG_FILE); |
304 |
|
305 |
reminders_file = p; |
306 |
} |
307 |
#endif |
308 |
#ifdef MAIL |
309 |
val = getenv ("MAIL"); /* get the mail spool file name */ |
310 |
#ifdef MAIL_SPOOL |
311 |
if (val == NULL) /* csh doesn't set $MAIL */ |
312 |
{ |
313 |
const char * spool = MAIL_SPOOL; |
314 |
char * user = getenv ("USER"); /* assume this works */ |
315 |
val = malloc (strlen (spool) + strlen (user) + 1); |
316 |
if (val == NULL) |
317 |
goto Malloc_Error; |
318 |
strcpy (val, spool); |
319 |
strcat (val, user); |
320 |
} |
321 |
#endif |
322 |
mail_file = val; |
323 |
if( mail_file ) |
324 |
CheckMaildir(); |
325 |
#endif |
326 |
|
327 |
if ((display_name = getenv ("DISPLAY")) == NULL) |
328 |
display_name = ":0"; |
329 |
|
330 |
/* parse the command line */ |
331 |
for (i = 1; i < argc; i += 2) |
332 |
{ |
333 |
opt = argv [i]; |
334 |
val = argv [i+1]; |
335 |
|
336 |
switch (*opt++) { |
337 |
case '-': |
338 |
break; |
339 |
|
340 |
case '#': |
341 |
#ifdef ICONWIN |
342 |
rs_iconGeometry = opt; /* drop */ |
343 |
#endif |
344 |
default: |
345 |
continue; |
346 |
break; |
347 |
} |
348 |
|
349 |
if (*opt == 'd' && val) display_name = val; /* "d", "display" */ |
350 |
else if (*opt == 'g' && val) rs_geometry = val; /* "g", "geometry" */ |
351 |
#ifdef ICONWIN |
352 |
else if (*opt == 'i') /* "ic", "iconic" */ |
353 |
{ |
354 |
iconic_state = IconicState; |
355 |
i--; /* no argument */ |
356 |
} |
357 |
#endif |
358 |
else if (!strcmp (opt, "fg") && val) rs_color [fgColor] = val; |
359 |
else if (!strcmp (opt, "bg") && val) rs_color [bgColor] = val; |
360 |
#ifdef REMINDERS |
361 |
else if (!strcmp (opt, "fn") && val) rs_font = val; |
362 |
#ifdef DATE_ON_CLOCK_FACE |
363 |
else if (!strcmp (opt, "nodate")) |
364 |
{ |
365 |
show_date = 0; |
366 |
i--; /* no argument */ |
367 |
} |
368 |
#endif |
369 |
#endif |
370 |
else if (!strcmp (opt, "update") && val) |
371 |
{ |
372 |
int x = atoi (val); |
373 |
if (x < 1 || x > 60) |
374 |
print_error ("update: %d sec", clockUpdate); |
375 |
else |
376 |
clockUpdate = x; |
377 |
} |
378 |
#ifdef MAIL |
379 |
else if (!strcmp (opt, "mail") && val) |
380 |
{ |
381 |
int x = atoi (val); |
382 |
if (x < 1) |
383 |
print_error ("mail update: %d sec", mailUpdate); |
384 |
else |
385 |
mailUpdate = x; |
386 |
} |
387 |
else if (!strcmp (opt, "mailfile") && val) |
388 |
{ |
389 |
/* If the mail environment is not set, then mail_file was created |
390 |
* with a malloc. We need to free it. |
391 |
*/ |
392 |
if( getenv ("MAIL") == NULL) |
393 |
free( mail_file); |
394 |
/* assume user knows what he's doing, don't check that file is valid...*/ |
395 |
mail_file = val; |
396 |
} |
397 |
#ifndef MAIL_SPAWN |
398 |
else if (!strcmp (opt, "mailspawn") && val) |
399 |
{ |
400 |
mail_spawn = val; |
401 |
} |
402 |
#endif |
403 |
#endif /* MAIL */ |
404 |
#ifdef ADJUST_TIME |
405 |
else if (!strcmp (opt, "adjust") && val) |
406 |
{ |
407 |
/* convert ddhhmm to seconds, minimal error checking */ |
408 |
int x = atoi (val); |
409 |
adjustTime = ((((abs (x) / 10000) % 100) * 24 /* days */ |
410 |
+ ((abs (x) / 100) % 100)) * 60 /* hours */ |
411 |
+ (abs (x) % 100)) * 60; /* minutes */ |
412 |
if (x < 0) |
413 |
adjustTime = -adjustTime; |
414 |
} |
415 |
#endif /* ADJUST_TIME */ |
416 |
else |
417 |
{ |
418 |
usage (); |
419 |
goto Abort; |
420 |
} |
421 |
} |
422 |
|
423 |
/* open display */ |
424 |
Xdisplay = XOpenDisplay (display_name); |
425 |
if (!Xdisplay) |
426 |
{ |
427 |
print_error ("can't open display %s", display_name); |
428 |
goto Abort; |
429 |
} |
430 |
|
431 |
/* get display info */ |
432 |
Xfd = XConnectionNumber (Xdisplay); |
433 |
{ |
434 |
const char * const color_msg = "can't load color \"%s\""; |
435 |
XColor xcol; |
436 |
|
437 |
/* allocate foreground/background colors */ |
438 |
if (!XParseColor (Xdisplay, Xcmap, rs_color [fgColor], &xcol) || |
439 |
!XAllocColor (Xdisplay, Xcmap, &xcol)) |
440 |
{ |
441 |
print_error (color_msg, rs_color [fgColor]); |
442 |
goto Abort; |
443 |
} |
444 |
PixColors [fgColor] = xcol.pixel; |
445 |
|
446 |
if (!XParseColor (Xdisplay, Xcmap, rs_color [bgColor], &xcol) || |
447 |
!XAllocColor (Xdisplay, Xcmap, &xcol)) |
448 |
{ |
449 |
print_error (color_msg, rs_color [bgColor]); |
450 |
goto Abort; |
451 |
} |
452 |
PixColors [bgColor] = xcol.pixel; |
453 |
} |
454 |
|
455 |
#ifdef REMINDERS |
456 |
/* load the font for messages */ |
457 |
if ((Xfont = XLoadQueryFont (Xdisplay, rs_font)) == NULL) |
458 |
{ |
459 |
print_error ("can't load font \"%s\"", rs_font); |
460 |
goto Abort; |
461 |
} |
462 |
gcv.font = Xfont->fid; |
463 |
#endif |
464 |
|
465 |
Create_Windows (argc, argv); |
466 |
/* Create the graphics contexts */ |
467 |
gcv.foreground = PixColors [fgColor]; |
468 |
gcv.background = PixColors [bgColor]; |
469 |
|
470 |
Xgc = XCreateGC (Xdisplay, Clock.win, |
471 |
#ifdef REMINDERS |
472 |
GCFont | |
473 |
#endif |
474 |
GCForeground | GCBackground, &gcv); |
475 |
|
476 |
gcv.foreground = PixColors [bgColor]; |
477 |
gcv.background = PixColors [fgColor]; |
478 |
Xrvgc = XCreateGC (Xdisplay, Clock.win, |
479 |
#ifdef REMINDERS |
480 |
GCFont | |
481 |
#endif |
482 |
GCForeground | GCBackground, &gcv); |
483 |
|
484 |
getXevent (); |
485 |
return EXIT_SUCCESS; |
486 |
|
487 |
Malloc_Error: |
488 |
print_error ("malloc error"); |
489 |
Abort: |
490 |
print_error ("aborting"); |
491 |
return EXIT_FAILURE; |
492 |
} |
493 |
|
494 |
/* |
495 |
* translate geometry string to appropriate sizehint |
496 |
*/ |
497 |
static void |
498 |
geometry2sizehint (mywindow_t * win, const char * geom) |
499 |
{ |
500 |
int x, y, flags; |
501 |
unsigned int width, height; |
502 |
|
503 |
/* copy in values */ |
504 |
szHint.width = win->width; |
505 |
szHint.height = win->height; |
506 |
|
507 |
if (geom == NULL) |
508 |
return; |
509 |
|
510 |
flags = XParseGeometry (geom, &x, &y, &width, &height); |
511 |
|
512 |
if (flags & WidthValue) |
513 |
{ |
514 |
szHint.width = width + szHint.base_width; |
515 |
szHint.flags |= USSize; |
516 |
} |
517 |
if (flags & HeightValue) |
518 |
{ |
519 |
szHint.height = height + szHint.base_height; |
520 |
szHint.flags |= USSize; |
521 |
} |
522 |
|
523 |
if (flags & XValue) |
524 |
{ |
525 |
if (flags & XNegative) |
526 |
{ |
527 |
x += (DisplayWidth (Xdisplay, Xscreen) - szHint.width); |
528 |
szHint.win_gravity = NorthEastGravity; |
529 |
} |
530 |
szHint.x = x; |
531 |
szHint.flags |= USPosition; |
532 |
} |
533 |
if (flags & YValue) |
534 |
{ |
535 |
if (flags & YNegative) |
536 |
{ |
537 |
y += (DisplayHeight (Xdisplay, Xscreen) - szHint.height); |
538 |
szHint.win_gravity = (szHint.win_gravity == NorthEastGravity ? |
539 |
SouthEastGravity : SouthWestGravity); |
540 |
} |
541 |
szHint.y = y; |
542 |
szHint.flags |= USPosition; |
543 |
} |
544 |
|
545 |
/* copy out values */ |
546 |
win->width = szHint.width; |
547 |
win->height = szHint.height; |
548 |
} |
549 |
|
550 |
/* |
551 |
* Open and map the windows |
552 |
*/ |
553 |
static void |
554 |
Create_Windows (int argc, char * argv []) |
555 |
{ |
556 |
XClassHint classHint; |
557 |
XWMHints wmHint; |
558 |
|
559 |
geometry2sizehint (&Clock, rs_geometry); |
560 |
Clock.win = XCreateSimpleWindow (Xdisplay, Xroot, |
561 |
szHint.x, szHint.y, |
562 |
Clock.width, Clock.height, |
563 |
0, |
564 |
PixColors [fgColor], |
565 |
PixColors [bgColor]); |
566 |
|
567 |
#ifdef ICONWIN |
568 |
geometry2sizehint (&Icon, rs_iconGeometry); |
569 |
Icon.win = XCreateSimpleWindow (Xdisplay, Xroot, |
570 |
szHint.x, szHint.y, |
571 |
Icon.width, Icon.height, |
572 |
0, |
573 |
PixColors [fgColor], |
574 |
PixColors [bgColor]); |
575 |
wmHint.initial_state = iconic_state; |
576 |
wmHint.icon_window = Icon.win; |
577 |
wmHint.flags = InputHint | StateHint | IconWindowHint; |
578 |
#else |
579 |
wmHint.flags = InputHint; |
580 |
#endif |
581 |
wmHint.input = True; |
582 |
|
583 |
/* ignore warning about discarded `const' */ |
584 |
classHint.res_name = APL_NAME; |
585 |
classHint.res_class = APL_CLASS; |
586 |
XSetWMProperties (Xdisplay, Clock.win, NULL, NULL, argv, argc, |
587 |
&szHint, &wmHint, &classHint); |
588 |
|
589 |
XSelectInput (Xdisplay, Clock.win, |
590 |
(ExposureMask|StructureNotifyMask|ButtonPressMask)); |
591 |
|
592 |
#ifdef ICONWIN |
593 |
XSelectInput (Xdisplay, Icon.win, |
594 |
(ExposureMask|ButtonPressMask)); |
595 |
#endif |
596 |
XMapWindow (Xdisplay, Clock.win); |
597 |
|
598 |
/* create, but don't map a window for appointment reminders */ |
599 |
#ifdef REMINDERS |
600 |
Msg.win = XCreateSimpleWindow (Xdisplay, Xroot, |
601 |
szHint.x, szHint.y, |
602 |
szHint.width, szHint.height, |
603 |
0, |
604 |
PixColors [fgColor], |
605 |
PixColors [bgColor]); |
606 |
|
607 |
szHint.flags |= USPosition; |
608 |
/* ignore warning about discarded `const' */ |
609 |
classHint.res_name = MSG_NAME; |
610 |
classHint.res_class = MSG_CLASS; |
611 |
wmHint.input = True; |
612 |
wmHint.flags = InputHint; |
613 |
|
614 |
XSetWMProperties (Xdisplay, Msg.win, NULL, NULL, argv, argc, |
615 |
&szHint, &wmHint, &classHint); |
616 |
{ |
617 |
char * str = MSG_NAME; |
618 |
XStoreName (Xdisplay, Msg.win, str); |
619 |
XSetIconName (Xdisplay, Msg.win, str); |
620 |
} |
621 |
|
622 |
XSelectInput (Xdisplay, Msg.win, |
623 |
(ExposureMask|ButtonPressMask|KeyPressMask)); |
624 |
|
625 |
/* font already loaded */ |
626 |
|
627 |
msgButton.width = 4 + 5 * XTextWidth (Xfont, "M", 1); |
628 |
msgButton.height = 4 + FontHeight (); |
629 |
|
630 |
msgButton.Dismiss = XCreateSimpleWindow (Xdisplay, Msg.win, |
631 |
0, 0, |
632 |
msgButton.width, msgButton.height, |
633 |
0, |
634 |
PixColors [bgColor], |
635 |
PixColors [fgColor]); |
636 |
|
637 |
XMapWindow (Xdisplay, msgButton.Dismiss); |
638 |
|
639 |
msgButton.Defer = XCreateSimpleWindow (Xdisplay, Msg.win, |
640 |
0, 0, |
641 |
msgButton.width, msgButton.height, |
642 |
0, |
643 |
PixColors [bgColor], |
644 |
PixColors [fgColor]); |
645 |
XMapWindow (Xdisplay, msgButton.Defer); |
646 |
|
647 |
#ifndef NO_REMINDER_EXEC |
648 |
msgButton.Start = XCreateSimpleWindow (Xdisplay, Msg.win, |
649 |
0, 0, |
650 |
msgButton.width, msgButton.height, |
651 |
0, |
652 |
PixColors [bgColor], |
653 |
PixColors [fgColor]); |
654 |
XMapWindow (Xdisplay, msgButton.Start); |
655 |
#endif /* NO_REMINDER_EXEC */ |
656 |
#endif |
657 |
} |
658 |
|
659 |
static time_t |
660 |
mk_time (struct tm * tmval) |
661 |
{ |
662 |
return (tmval->tm_min |
663 |
+ 60 * (tmval->tm_hour |
664 |
+ 24 * (tmval->tm_mday |
665 |
+ 31 * ((tmval->tm_mon+1) |
666 |
+ 12 * tmval->tm_year)))); |
667 |
} |
668 |
|
669 |
|
670 |
#ifdef MAIL |
671 |
static int |
672 |
MailAvailable() |
673 |
{ |
674 |
struct stat st; |
675 |
|
676 |
if( is_maildir ) { |
677 |
DIR *dirp; |
678 |
struct dirent *d; |
679 |
|
680 |
if( (dirp=opendir( mail_file )) ) { |
681 |
while( (d=readdir(dirp)) ) { |
682 |
if( *d->d_name == '.' ) |
683 |
continue; |
684 |
if( isdigit(*d->d_name) ) { |
685 |
closedir(dirp); |
686 |
return 1; |
687 |
} |
688 |
} |
689 |
closedir(dirp); |
690 |
} |
691 |
return 0; |
692 |
} |
693 |
else |
694 |
return !stat(mail_file, &st) && |
695 |
(st.st_size > 0) && (st.st_mtime >= st.st_atime); |
696 |
} |
697 |
#endif |
698 |
|
699 |
/*----------------------------------------------------------------------* |
700 |
* Redraw the whole window after an exposure or size change. |
701 |
* After a timeout, only redraw the hands. |
702 |
* Provide reminder if needed. |
703 |
*----------------------------------------------------------------------*/ |
704 |
static void |
705 |
Draw_Window (mywindow_t * W, int full_redraw) |
706 |
{ |
707 |
/* pre-computed values for sin() x1000, to avoid using floats */ |
708 |
static const short Sin [60] = { |
709 |
0, |
710 |
105, 208, 309, 407, 500, 588, 669, |
711 |
743, 809, 866, 914, 951, 978, 995, |
712 |
1000, |
713 |
995, 978, 951, 914, 866, 809, 743, |
714 |
669, 588, 500, 407, 309, 208, 105, |
715 |
0, |
716 |
-105, -208, -309, -407, -500, -588, -669, |
717 |
-743, -809, -866, -914, -951, -978, -995, |
718 |
-1000, |
719 |
-995, -978, -951, -914, -866, -809, -743, |
720 |
-669, -588, -500, -407, -309, -208, -105 |
721 |
}; |
722 |
|
723 |
static int savedDay = -1; |
724 |
|
725 |
time_t currentTime; |
726 |
struct tm * tmval; |
727 |
int ctr_x, ctr_y; |
728 |
|
729 |
typedef struct { |
730 |
int h_x, h_y; /* hour */ |
731 |
int m_x, m_y; /* minute */ |
732 |
int s_x, s_y; /* second */ |
733 |
} hands_t; /* hand positions (x,y) */ |
734 |
|
735 |
hands_t HandsNow, * pHandsOld; |
736 |
|
737 |
GC X_gc, X_rvgc; |
738 |
|
739 |
static hands_t HandsOld = { -1 }; |
740 |
#ifdef ICONWIN |
741 |
static hands_t HandsOld_icon = { -1 }; |
742 |
#endif |
743 |
#ifdef REMINDERS |
744 |
static int lastUpdateTime = -10; |
745 |
#endif |
746 |
|
747 |
#ifdef MAIL |
748 |
static time_t mailTime = 0; |
749 |
static int MailUp = 0, MailUp_rvideo = 0; |
750 |
#ifdef ICONWIN |
751 |
static int MailUp_icon = 0; |
752 |
#endif |
753 |
#endif /* MAIL */ |
754 |
|
755 |
currentTime = time (NULL) + adjustTime; /* get the current time */ |
756 |
tmval = localtime (¤tTime); |
757 |
|
758 |
#ifdef MAIL |
759 |
#ifdef REMINDERS |
760 |
if (W->win != Msg.win) |
761 |
#endif |
762 |
{ |
763 |
int * pMailUp = ( |
764 |
#ifdef ICONWIN |
765 |
W->win == Icon.win ? &MailUp_icon : |
766 |
#endif |
767 |
&MailUp); |
768 |
|
769 |
if ((currentTime - mailTime) >= mailUpdate) |
770 |
{ |
771 |
struct stat st; |
772 |
|
773 |
if ( |
774 |
#ifdef ICONWIN |
775 |
MailUp != MailUp_icon ? MailUp : |
776 |
#endif |
777 |
((mail_file != NULL) && MailAvailable() ) ) |
778 |
{ |
779 |
if (!*pMailUp) |
780 |
{ |
781 |
*pMailUp = 1; |
782 |
full_redraw = 1; |
783 |
XSetWindowBackground (Xdisplay, W->win, |
784 |
PixColors [fgColor]); |
785 |
#ifdef MAIL_BELL |
786 |
XBell (Xdisplay, 0); |
787 |
#endif |
788 |
} |
789 |
} |
790 |
else |
791 |
{ |
792 |
if (*pMailUp) |
793 |
{ |
794 |
*pMailUp = 0; |
795 |
full_redraw = 1; |
796 |
XSetWindowBackground (Xdisplay, W->win, |
797 |
PixColors [bgColor]); |
798 |
} |
799 |
} |
800 |
#ifdef ICONWIN |
801 |
if (MailUp == MailUp_icon) |
802 |
#endif |
803 |
mailTime = currentTime; |
804 |
|
805 |
MailUp_rvideo = *pMailUp; |
806 |
} |
807 |
} |
808 |
#endif /* MAIL */ |
809 |
|
810 |
/* once every day, update the window and icon name */ |
811 |
if (tmval->tm_yday != savedDay) |
812 |
{ |
813 |
char str [20]; |
814 |
|
815 |
savedDay = tmval->tm_yday; |
816 |
strftime (str, sizeof(str), "%a %h %d", tmval); |
817 |
XStoreName (Xdisplay, Clock.win, str); |
818 |
XSetIconName (Xdisplay, Clock.win, str); |
819 |
} |
820 |
|
821 |
if (full_redraw) |
822 |
XClearWindow (Xdisplay, W->win); |
823 |
|
824 |
#ifdef REMINDERS |
825 |
/* for a message window, just re-draw the message */ |
826 |
if (W->win == Msg.win) |
827 |
{ |
828 |
char * beg, * next; |
829 |
int lines; |
830 |
|
831 |
for (beg = message, lines = 0; beg; beg = next, lines++) |
832 |
{ |
833 |
char * end; |
834 |
|
835 |
if ((end = strstr (beg, "\\n")) == NULL) |
836 |
{ |
837 |
end = beg + strlen (beg); |
838 |
next = NULL; |
839 |
} |
840 |
else |
841 |
{ |
842 |
next = end + 2; |
843 |
} |
844 |
|
845 |
XDrawString (Xdisplay, Msg.win, |
846 |
Xgc, |
847 |
(Msg.width - |
848 |
XTextWidth (Xfont, beg, (end-beg))) / 2, |
849 |
10 + Xfont->ascent + FontHeight () * lines, |
850 |
beg, (end-beg)); |
851 |
} |
852 |
|
853 |
XDrawString (Xdisplay, msgButton.Dismiss, |
854 |
Xrvgc, |
855 |
(msgButton.width - XTextWidth (Xfont, "Done", 4)) / 2, |
856 |
Xfont->ascent + 2, |
857 |
"Done", 4); |
858 |
|
859 |
XDrawString (Xdisplay, msgButton.Defer, |
860 |
Xrvgc, |
861 |
(msgButton.width - XTextWidth (Xfont, "Defer", 5)) / 2, |
862 |
Xfont->ascent + 2, |
863 |
"Defer", 5); |
864 |
|
865 |
# ifndef NO_REMINDER_EXEC |
866 |
XDrawString (Xdisplay, msgButton.Start, |
867 |
Xrvgc, |
868 |
(msgButton.width - XTextWidth (Xfont, "Start", 5)) / 2, |
869 |
Xfont->ascent + 2, |
870 |
"Start", 5); |
871 |
|
872 |
if (strlen (execPrgm) > 1) |
873 |
XMapWindow (Xdisplay, msgButton.Start); |
874 |
else |
875 |
XUnmapWindow (Xdisplay, msgButton.Start); |
876 |
# endif /* NO_REMINDER_EXEC */ |
877 |
return; |
878 |
} |
879 |
|
880 |
/* |
881 |
* Convert multi-field time info to a single integer with a resolution |
882 |
* in minutes. |
883 |
*/ |
884 |
currentTime = mk_time (tmval); |
885 |
|
886 |
/* is there a reminder pending? */ |
887 |
if (reminderTime >= 0 && currentTime >= reminderTime) |
888 |
Reminder (); |
889 |
|
890 |
/* every 10 minutes, or at start of day, check for revised entries */ |
891 |
if (!Msg_Mapped && |
892 |
(currentTime > lastUpdateTime + REMINDERS_TIME || |
893 |
(currentTime != lastUpdateTime && |
894 |
tmval->tm_hour == 0 && tmval->tm_min == 0))) |
895 |
{ |
896 |
Next_Reminder (UPDATE); |
897 |
lastUpdateTime = currentTime; |
898 |
} |
899 |
#endif |
900 |
|
901 |
/* |
902 |
* draw clock |
903 |
*/ |
904 |
|
905 |
ctr_x = (W->width / 2); |
906 |
ctr_y = (W->height / 2); |
907 |
|
908 |
#define XPOS(i,val) (ctr_x + (W->width * Sin[i%60] * (val) + 100000) / 200000) |
909 |
#define YPOS(i,val) (ctr_y - (W->height * Sin[(i+15)%60] * (val) + 100000) / 200000) |
910 |
/* |
911 |
* how to draw the clock face |
912 |
*/ |
913 |
|
914 |
/* calculate the positions of the hands */ |
915 |
{ |
916 |
int angle = (tmval->tm_hour % 12) * 5 + (tmval->tm_min / 12); |
917 |
HandsNow.h_x = XPOS (angle, 60); |
918 |
HandsNow.h_y = YPOS (angle, 60); |
919 |
} |
920 |
{ |
921 |
int angle = tmval->tm_min; |
922 |
HandsNow.m_x = XPOS (angle, 80); |
923 |
HandsNow.m_y = YPOS (angle, 80); |
924 |
} |
925 |
if (clockUpdate == 1) |
926 |
{ |
927 |
int angle = tmval->tm_sec; |
928 |
HandsNow.s_x = XPOS (angle, 85); |
929 |
HandsNow.s_y = YPOS (angle, 85); |
930 |
} |
931 |
|
932 |
pHandsOld = ( |
933 |
#ifdef ICONWIN |
934 |
W->win == Icon.win ? &HandsOld_icon : |
935 |
#endif |
936 |
&HandsOld); |
937 |
|
938 |
#ifdef MAIL |
939 |
if (MailUp_rvideo) |
940 |
{ |
941 |
X_gc = Xrvgc; |
942 |
X_rvgc = Xgc; |
943 |
} |
944 |
else |
945 |
#endif |
946 |
{ |
947 |
X_gc = Xgc; |
948 |
X_rvgc = Xrvgc; |
949 |
} |
950 |
|
951 |
/* |
952 |
* Draw the date in the lower half of the clock window. |
953 |
* The code is enclosed in REMINDERS because it uses the same |
954 |
* font as the reminders code. |
955 |
* I believe this should be drawn always so it does not get |
956 |
* "swept away" by the minute hand. |
957 |
*/ |
958 |
#ifdef REMINDERS && DATE_ON_CLOCK_FACE |
959 |
if( show_date) |
960 |
{ |
961 |
char date[10]; |
962 |
currentTime = time (NULL) + adjustTime; /* get the current time */ |
963 |
tmval = localtime (¤tTime); |
964 |
strftime (date, sizeof(date), "%d", tmval); |
965 |
XDrawString (Xdisplay, W->win, X_gc, |
966 |
ctr_x - XTextWidth(Xfont, date, strlen(date))/2, |
967 |
ctr_y + FontHeight() + (ctr_y - FontHeight())/2, |
968 |
date, strlen(date)); |
969 |
} |
970 |
#endif |
971 |
|
972 |
if (full_redraw) |
973 |
{ |
974 |
int angle; |
975 |
/* |
976 |
* draw clock face |
977 |
*/ |
978 |
#ifdef SUBTICKS |
979 |
for (angle = 0; angle < 60; angle++) |
980 |
XDrawPoint (Xdisplay, W->win, X_gc, |
981 |
XPOS (angle, 95), |
982 |
YPOS (angle, 95)); |
983 |
#endif |
984 |
for (angle = 0; angle < 60; angle += 5) |
985 |
XDrawLine (Xdisplay, W->win, X_gc, |
986 |
XPOS (angle, 90), |
987 |
YPOS (angle, 90), |
988 |
XPOS (angle, 100), |
989 |
YPOS (angle, 100)); |
990 |
} |
991 |
else if (memcmp (pHandsOld, &HandsNow, sizeof(hands_t))) |
992 |
{ |
993 |
int i, j; |
994 |
/* |
995 |
* erase old hands |
996 |
*/ |
997 |
for (i = -1; i < 2; i++) for (j = -1; j < 2; j++) |
998 |
{ |
999 |
/* hour/minute hands */ |
1000 |
XDrawLine (Xdisplay, W->win, X_rvgc, |
1001 |
ctr_x + i, |
1002 |
ctr_y + j, |
1003 |
pHandsOld->h_x, pHandsOld->h_y); |
1004 |
XDrawLine (Xdisplay, W->win, X_rvgc, |
1005 |
ctr_x + i, |
1006 |
ctr_y + j, |
1007 |
pHandsOld->m_x, pHandsOld->m_y); |
1008 |
} |
1009 |
|
1010 |
if (clockUpdate == 1) /* seconds hand */ |
1011 |
XDrawLine (Xdisplay, |
1012 |
W->win, X_rvgc, |
1013 |
ctr_x, |
1014 |
ctr_y, |
1015 |
pHandsOld->s_x, pHandsOld->s_y); |
1016 |
} |
1017 |
|
1018 |
if (full_redraw || memcmp (pHandsOld, &HandsNow, sizeof(hands_t))) |
1019 |
{ |
1020 |
int i, j; |
1021 |
/* |
1022 |
* draw new hands |
1023 |
*/ |
1024 |
for (i = -1; i < 2; i++) for (j = -1; j < 2; j++) |
1025 |
{ |
1026 |
/* hour/minute hands */ |
1027 |
XDrawLine (Xdisplay, W->win, X_gc, |
1028 |
ctr_x + i, |
1029 |
ctr_y + j, |
1030 |
HandsNow.h_x, HandsNow.h_y); |
1031 |
|
1032 |
XDrawLine (Xdisplay, W->win, X_gc, |
1033 |
ctr_x + i, |
1034 |
ctr_y + j, |
1035 |
HandsNow.m_x, HandsNow.m_y); |
1036 |
} |
1037 |
if (clockUpdate == 1) /* seconds hand */ |
1038 |
XDrawLine (Xdisplay, W->win, X_gc, |
1039 |
ctr_x, |
1040 |
ctr_y, |
1041 |
HandsNow.s_x, HandsNow.s_y); |
1042 |
|
1043 |
*pHandsOld = HandsNow; |
1044 |
} |
1045 |
} |
1046 |
|
1047 |
#ifdef REMINDERS |
1048 |
/* |
1049 |
* Read a single integer from *pstr, returns default value if it finds "*" |
1050 |
* DELIM = trailing delimiter to skip |
1051 |
*/ |
1052 |
static int |
1053 |
GetOneNum (char ** pstr, int def) |
1054 |
{ |
1055 |
int num, hit = 0; |
1056 |
|
1057 |
for (num = 0; isdigit (**pstr); (*pstr)++) |
1058 |
{ |
1059 |
num = num * 10 + (**pstr - '0'); |
1060 |
hit = 1; |
1061 |
} |
1062 |
if (!hit) |
1063 |
{ |
1064 |
num = def; |
1065 |
while (**pstr == '*') (*pstr)++; |
1066 |
} |
1067 |
return num; |
1068 |
} |
1069 |
|
1070 |
/* |
1071 |
* find if TODAY is found in PSTR |
1072 |
*/ |
1073 |
static int |
1074 |
isToday (char ** pstr, int wday) |
1075 |
{ |
1076 |
const char * dayNames = DAY_NAMES; |
1077 |
int rval, today; |
1078 |
|
1079 |
today = dayNames [wday]; |
1080 |
/* no day specified is same as wildcard */ |
1081 |
if (!strchr (dayNames, tolower (**pstr))) |
1082 |
return 1; |
1083 |
|
1084 |
for (rval = 0; strchr (dayNames, tolower (**pstr)); (*pstr)++) |
1085 |
{ |
1086 |
if (today == tolower (**pstr) || **pstr == '*') |
1087 |
rval = 1; /* found it */ |
1088 |
} |
1089 |
return rval; |
1090 |
} |
1091 |
|
1092 |
static char * |
1093 |
trim_string (char * str) |
1094 |
{ |
1095 |
if (str && *str) |
1096 |
{ |
1097 |
int n; |
1098 |
while (*str && isspace (*str)) str++; |
1099 |
|
1100 |
n = strlen (str) - 1; |
1101 |
while (n > 0 && isspace (str [n])) n--; |
1102 |
str [n+1] = '\0'; |
1103 |
} |
1104 |
return str; |
1105 |
} |
1106 |
|
1107 |
# ifndef NO_REMINDER_EXEC |
1108 |
static char * |
1109 |
extract_program (char * text) |
1110 |
{ |
1111 |
char * prgm = text; |
1112 |
while ((prgm = strchr (prgm, ';')) != NULL) |
1113 |
{ |
1114 |
if (*(prgm-1) == '\\') /* backslash escaped */ |
1115 |
{ |
1116 |
/* remove backslash - avoid memmove() */ |
1117 |
int i, n = strlen (prgm); |
1118 |
for (i = 0; i <= n; i++) |
1119 |
prgm [i - 1] = prgm [i]; |
1120 |
} |
1121 |
else |
1122 |
{ |
1123 |
*prgm++ = '\0'; |
1124 |
/* remove leading/trailing space */ |
1125 |
prgm = trim_string (prgm); |
1126 |
break; |
1127 |
} |
1128 |
} |
1129 |
return prgm; |
1130 |
} |
1131 |
# endif /* NO_REMINDER_EXEC */ |
1132 |
|
1133 |
/* |
1134 |
* Read the ~/.rclock file and find the next reminder |
1135 |
* |
1136 |
* update_only = 1 |
1137 |
* look for a reminder whose time is greater than the current time, |
1138 |
* but less than the currently set reminder time |
1139 |
* |
1140 |
* update_only = 0 |
1141 |
* look for a reminder whose time is greater than the reminder that |
1142 |
* just went off |
1143 |
*/ |
1144 |
static void |
1145 |
Next_Reminder (int update_only) |
1146 |
{ |
1147 |
struct tm * tmval; |
1148 |
char buffer [256]; |
1149 |
#ifndef INT_MAX |
1150 |
# define INT_MAX 1e8 |
1151 |
#endif |
1152 |
time_t currentTime; |
1153 |
int savedTime = INT_MAX; |
1154 |
FILE * fd; |
1155 |
|
1156 |
if (reminders_file == NULL || (fd = fopen (reminders_file, "r")) == NULL) |
1157 |
{ |
1158 |
reminderTime = -1; /* no config file, no reminders */ |
1159 |
return; |
1160 |
} |
1161 |
|
1162 |
currentTime = time (NULL) + adjustTime; /* get the current time */ |
1163 |
tmval = localtime (¤tTime); |
1164 |
currentTime = mk_time (tmval); |
1165 |
|
1166 |
/* initial startup*/ |
1167 |
if (reminderTime < 0) |
1168 |
{ |
1169 |
/* ignore reminders that have already occurred */ |
1170 |
reminderTime = currentTime; |
1171 |
# ifndef NO_REMINDER_EXEC |
1172 |
/* scan for programs run on start-up */ |
1173 |
while (fgets (buffer, sizeof(buffer), fd)) |
1174 |
{ |
1175 |
char * prgm, * text; |
1176 |
|
1177 |
text = trim_string (buffer); |
1178 |
if (*text != ';') continue; |
1179 |
|
1180 |
prgm = extract_program (text); |
1181 |
if (prgm != NULL && strlen (prgm) > 1) |
1182 |
system (prgm); |
1183 |
} |
1184 |
rewind (fd); |
1185 |
# endif /* NO_REMINDER_EXEC */ |
1186 |
} |
1187 |
|
1188 |
/* now scan for next reminder */ |
1189 |
while (fgets (buffer, sizeof(buffer), fd)) |
1190 |
{ |
1191 |
int testTime, hh, mm, mo, dd, yy; |
1192 |
char * text; |
1193 |
|
1194 |
text = trim_string (buffer); |
1195 |
if (*text == '#') continue; /* comment */ |
1196 |
if (*text == ';') continue; /* program run on startup */ |
1197 |
/* |
1198 |
* parse the line, format is hh:mm mo/dd/yr message; program |
1199 |
* any of hh, mm, mo, dd, yr could be a wildcard `*' |
1200 |
*/ |
1201 |
hh = GetOneNum (&text, tmval->tm_hour); if (*text == ':') text++; |
1202 |
mm = GetOneNum (&text, 0); |
1203 |
|
1204 |
while (isspace (*text)) text++; |
1205 |
if (!isToday (&text, tmval->tm_wday)) continue; |
1206 |
while (isspace (*text)) text++; |
1207 |
|
1208 |
mo = GetOneNum (&text, tmval->tm_mon+1); if (*text == '/') text++; |
1209 |
dd = GetOneNum (&text, tmval->tm_mday); if (*text == '/') text++; |
1210 |
yy = GetOneNum (&text, tmval->tm_year); |
1211 |
|
1212 |
/* handle 20th/21st centuries */ |
1213 |
if (yy > CENTURY) |
1214 |
yy -= 1900; |
1215 |
else if (yy < CENTURY) |
1216 |
yy += (CENTURY - 1900); |
1217 |
|
1218 |
while (isspace (*text)) text++; |
1219 |
if (!*text) continue; |
1220 |
|
1221 |
testTime = (mm + 60 * (hh + 24 * (dd + 31 * (mo + 12 * yy)))); |
1222 |
|
1223 |
if (testTime > (update_only ? currentTime : reminderTime)) |
1224 |
{ |
1225 |
#ifndef NO_REMINDER_EXEC |
1226 |
char * prgm = extract_program (text); |
1227 |
#endif /* NO_REMINDER_EXEC */ |
1228 |
/* trim leading/trailing space */ |
1229 |
text = trim_string (text); |
1230 |
|
1231 |
/* |
1232 |
* have a reminder whose time is greater than the last |
1233 |
* reminder, now make sure it is the smallest available |
1234 |
*/ |
1235 |
if (testTime < savedTime) |
1236 |
{ |
1237 |
savedTime = testTime; |
1238 |
strncpy (message, text, sizeof(message)); |
1239 |
#ifndef NO_REMINDER_EXEC |
1240 |
strncpy (execPrgm, (prgm ? prgm : ""), sizeof(execPrgm)); |
1241 |
#endif |
1242 |
} |
1243 |
else if (testTime == savedTime) |
1244 |
{ |
1245 |
if (strlen (text)) |
1246 |
{ |
1247 |
int n = (sizeof(message) - strlen (message) - 3); |
1248 |
if (n > 0) |
1249 |
{ |
1250 |
/* for co-occurring events */ |
1251 |
strcat (message, "\\n"); |
1252 |
strncat (message, text, n); |
1253 |
} |
1254 |
} |
1255 |
#ifndef NO_REMINDER_EXEC |
1256 |
if (prgm != NULL) |
1257 |
{ |
1258 |
int n = (sizeof(execPrgm) - strlen (execPrgm) - 2); |
1259 |
if ((n > 0) && (n >= strlen (prgm))) |
1260 |
{ |
1261 |
/* for co-occurring programs */ |
1262 |
strcat (execPrgm, ";"); |
1263 |
strncat (execPrgm, prgm, n); |
1264 |
} |
1265 |
} |
1266 |
#endif /* NO_REMINDER_EXEC */ |
1267 |
} |
1268 |
} |
1269 |
} |
1270 |
|
1271 |
reminderTime = (savedTime < INT_MAX) ? savedTime : -1; |
1272 |
fclose (fd); |
1273 |
} |
1274 |
|
1275 |
/* |
1276 |
* Provide reminder by mapping the message window |
1277 |
*/ |
1278 |
static void |
1279 |
Reminder (void) |
1280 |
{ |
1281 |
char * beg, * next; |
1282 |
int lines; |
1283 |
|
1284 |
if (Msg_Mapped) |
1285 |
return; |
1286 |
|
1287 |
#ifndef NO_REMINDER_EXEC |
1288 |
if (strlen (message) == 0) |
1289 |
{ |
1290 |
if (strlen (execPrgm) > 1) |
1291 |
{ |
1292 |
system (execPrgm); |
1293 |
Next_Reminder (REPLACE); |
1294 |
} |
1295 |
return; /* some sort of error */ |
1296 |
} |
1297 |
#endif |
1298 |
|
1299 |
/* compute the window size */ |
1300 |
#ifdef NO_REMINDER_EXEC |
1301 |
Msg.width = 10 * XTextWidth (Xfont, "M", 1); |
1302 |
#else |
1303 |
Msg.width = 18 * XTextWidth (Xfont, "M", 1); |
1304 |
#endif |
1305 |
|
1306 |
for (beg = message, lines = 1; beg; beg = next, lines++) |
1307 |
{ |
1308 |
int width; |
1309 |
char * end; |
1310 |
|
1311 |
if ((end = strstr (beg, "\\n")) == NULL) |
1312 |
{ |
1313 |
end = beg + strlen (beg); |
1314 |
next = NULL; |
1315 |
} |
1316 |
else |
1317 |
{ |
1318 |
next = end + 2; |
1319 |
} |
1320 |
|
1321 |
width = XTextWidth (Xfont, beg, (end-beg)); |
1322 |
if (Msg.width < width) |
1323 |
Msg.width = width; |
1324 |
} |
1325 |
|
1326 |
Msg.width += 30; |
1327 |
Msg.height = (lines+1) * FontHeight () + 30; |
1328 |
|
1329 |
/* resize and centre the window */ |
1330 |
XMoveResizeWindow (Xdisplay, Msg.win, |
1331 |
(DisplayWidth (Xdisplay, Xscreen) - Msg.width ) / 2, |
1332 |
(DisplayHeight (Xdisplay, Xscreen) - Msg.height) / 2, |
1333 |
Msg.width, Msg.height); |
1334 |
|
1335 |
#define BUTTON_MARGIN 8 |
1336 |
|
1337 |
XMoveWindow (Xdisplay, msgButton.Dismiss, |
1338 |
BUTTON_MARGIN, |
1339 |
(Msg.height - msgButton.height - BUTTON_MARGIN)); |
1340 |
XMoveWindow (Xdisplay, msgButton.Defer, |
1341 |
(Msg.width - msgButton.width - BUTTON_MARGIN), |
1342 |
(Msg.height - msgButton.height - BUTTON_MARGIN)); |
1343 |
#ifndef NO_REMINDER_EXEC |
1344 |
XMoveWindow (Xdisplay, msgButton.Start, |
1345 |
(Msg.width - msgButton.width) / 2, |
1346 |
(Msg.height - msgButton.height - BUTTON_MARGIN)); |
1347 |
#endif |
1348 |
|
1349 |
XMapRaised (Xdisplay, Msg.win); |
1350 |
XBell (Xdisplay, 0); |
1351 |
Msg_Mapped = 1; |
1352 |
} |
1353 |
#endif /* REMINDERS */ |
1354 |
|
1355 |
#ifndef _POSIX_VERSION |
1356 |
# if defined (__svr4__) |
1357 |
static int |
1358 |
getdtablesize (void) |
1359 |
{ |
1360 |
struct rlimit rlim; |
1361 |
getrlimit (RLIMIT_NOFILE, &rlim); |
1362 |
return rlim.rlim_cur; |
1363 |
} |
1364 |
# endif |
1365 |
#endif |
1366 |
|
1367 |
/* |
1368 |
* Loops forever, looking for stuff to do. Sleeps 1 minute if nothing to do |
1369 |
*/ |
1370 |
static void |
1371 |
getXevent (void) |
1372 |
{ |
1373 |
XEvent ev; |
1374 |
int num_fds; /* number of file descriptors being used */ |
1375 |
struct timeval tm; |
1376 |
struct tm * tmval; |
1377 |
Atom wmDeleteWindow; |
1378 |
fd_set in_fdset; |
1379 |
|
1380 |
/* Enable delete window protocol */ |
1381 |
wmDeleteWindow = XInternAtom (Xdisplay, "WM_DELETE_WINDOW", False); |
1382 |
XSetWMProtocols (Xdisplay, Clock.win, &wmDeleteWindow, 1); |
1383 |
#ifdef ICONWIN |
1384 |
XSetWMProtocols (Xdisplay, Icon.win, &wmDeleteWindow, 1); |
1385 |
#endif |
1386 |
#ifdef REMINDERS |
1387 |
XSetWMProtocols (Xdisplay, Msg.win, &wmDeleteWindow, 1); |
1388 |
#endif |
1389 |
|
1390 |
#ifdef _POSIX_VERSION |
1391 |
num_fds = sysconf (_SC_OPEN_MAX); |
1392 |
#else |
1393 |
num_fds = getdtablesize (); |
1394 |
#endif |
1395 |
#ifdef FD_SETSIZE |
1396 |
if (num_fds > FD_SETSIZE) |
1397 |
num_fds = FD_SETSIZE; |
1398 |
#endif |
1399 |
|
1400 |
while (1) { |
1401 |
/* take care of all pending X events */ |
1402 |
while (XPending (Xdisplay)) { |
1403 |
XNextEvent (Xdisplay, &ev); |
1404 |
switch (ev.type) { |
1405 |
case ClientMessage: |
1406 |
/* check for delete window requests */ |
1407 |
if ((ev.xclient.format == 32) && |
1408 |
(ev.xclient.data.l[0] == wmDeleteWindow)) |
1409 |
{ |
1410 |
#ifdef REMINDERS |
1411 |
if (ev.xany.window == Msg.win) |
1412 |
{ |
1413 |
XUnmapWindow (Xdisplay, Msg.win); |
1414 |
Msg_Mapped = 0; |
1415 |
Next_Reminder (REPLACE); |
1416 |
} |
1417 |
else |
1418 |
#endif |
1419 |
return; /* delete window is how this terminates */ |
1420 |
} |
1421 |
break; |
1422 |
|
1423 |
case Expose: |
1424 |
case GraphicsExpose: |
1425 |
/* need to re-draw a window */ |
1426 |
if (ev.xany.window == Clock.win) |
1427 |
Draw_Window (&Clock, 1); |
1428 |
#ifdef ICONWIN |
1429 |
else if (ev.xany.window == Icon.win) |
1430 |
Draw_Window (&Icon, 1); |
1431 |
#endif |
1432 |
#ifdef REMINDERS |
1433 |
else |
1434 |
Draw_Window (&Msg, 1); |
1435 |
#endif |
1436 |
break; |
1437 |
|
1438 |
case ConfigureNotify: |
1439 |
/* window has been re-sized */ |
1440 |
if (ev.xany.window == Clock.win) |
1441 |
{ |
1442 |
Clock.width = ev.xconfigure.width; |
1443 |
Clock.height = ev.xconfigure.height; |
1444 |
} |
1445 |
break; |
1446 |
|
1447 |
#ifdef REMINDERS |
1448 |
case KeyPress: |
1449 |
/* any key press to dismiss message window */ |
1450 |
if (ev.xany.window == Msg.win) |
1451 |
{ |
1452 |
Next_Reminder (REPLACE); |
1453 |
Msg_Mapped = 0; |
1454 |
XUnmapWindow (Xdisplay, Msg.win); |
1455 |
} |
1456 |
break; |
1457 |
#endif |
1458 |
|
1459 |
case ButtonPress: |
1460 |
#ifdef REMINDERS |
1461 |
/* button press to dismiss message window */ |
1462 |
if (ev.xany.window == Msg.win) |
1463 |
{ |
1464 |
if (ev.xbutton.subwindow == msgButton.Dismiss) |
1465 |
{ |
1466 |
Next_Reminder (REPLACE); |
1467 |
Msg_Mapped = 0; |
1468 |
XUnmapWindow (Xdisplay, Msg.win); |
1469 |
} |
1470 |
else if (ev.xbutton.subwindow == msgButton.Defer) |
1471 |
{ |
1472 |
time_t t = time (NULL) + adjustTime; |
1473 |
tmval = localtime (&t); |
1474 |
reminderTime = mk_time (tmval) + DEFER_TIME; |
1475 |
Msg_Mapped = 0; |
1476 |
XUnmapWindow (Xdisplay, Msg.win); |
1477 |
} |
1478 |
#ifndef NO_REMINDER_EXEC |
1479 |
else if (ev.xbutton.subwindow == msgButton.Start) |
1480 |
{ |
1481 |
system (execPrgm); |
1482 |
Next_Reminder (REPLACE); |
1483 |
Msg_Mapped = 0; |
1484 |
XUnmapWindow (Xdisplay, Msg.win); |
1485 |
} |
1486 |
#endif /* NO_REMINDER_EXEC */ |
1487 |
} |
1488 |
#endif |
1489 |
#ifdef MAIL |
1490 |
if (ev.xany.window == Clock.win) |
1491 |
{ |
1492 |
#ifdef MAIL_SPAWN |
1493 |
/* left button action - spawn a mail reader */ |
1494 |
if (ev.xbutton.button == Button1) |
1495 |
system (MAIL_SPAWN); |
1496 |
#else |
1497 |
if ( (ev.xbutton.button == Button1) && (mail_spawn != NULL) ) |
1498 |
system(mail_spawn); |
1499 |
#endif |
1500 |
/* redraw the window */ |
1501 |
Draw_Window (&Clock, 1); |
1502 |
} |
1503 |
#endif |
1504 |
break; |
1505 |
} |
1506 |
} |
1507 |
|
1508 |
/* Now wait for time out or new X event */ |
1509 |
FD_ZERO (&in_fdset); |
1510 |
FD_SET (Xfd, &in_fdset); |
1511 |
tm.tv_sec = clockUpdate; |
1512 |
tm.tv_usec = 0; |
1513 |
select (num_fds, &in_fdset, NULL, NULL, &tm); |
1514 |
|
1515 |
Draw_Window (&Clock, 0); |
1516 |
#ifdef ICONWIN |
1517 |
Draw_Window (&Icon, 0); |
1518 |
#endif |
1519 |
} |
1520 |
} |
1521 |
|
1522 |
/* |
1523 |
* Print an error message. |
1524 |
*/ |
1525 |
static void |
1526 |
print_error (const char * fmt, ...) |
1527 |
{ |
1528 |
va_list arg_ptr; |
1529 |
|
1530 |
va_start (arg_ptr, fmt); |
1531 |
fprintf (stderr, APL_NAME ": "); |
1532 |
vfprintf (stderr, fmt, arg_ptr); |
1533 |
fprintf (stderr,"\n"); |
1534 |
va_end (arg_ptr); |
1535 |
} |
1536 |
/*----------------------- end-of-file (C source) -----------------------*/ |