/* circles.c - Draw circles whose color depends on the time of day. Jim Blandy - March 1992. */ #include #include #include #if defined(vms) #include #include #else #include #if defined(USG) || defined(FTIME_MISSING) /* ** If you need to do a tzset() call to set the ** timezone, and don't have ftime(). */ struct timeb { time_t time; /* Seconds since the epoch */ unsigned short millitm; /* Field not used */ short timezone; short dstflag; /* Field not used */ }; #else #include #endif /* defined(USG) || defined(FTIME_MISSING) */ #if defined(BSD4_2) || defined(BSD4_1C) #include #else #include #endif /* defined(BSD4_2) */ #endif /* defined(vms) */ extern char *strcpy (char *dest, const char *src); extern char *getenv (const char *var); char *progname; char *disp_name = NULL; #define USECSPERSEC (1000 * 1000) /* The amount of time in which the circles should go through their entire cycle, in microseconds - defaults to one hour. */ long long period = ((long long) 60 * 60 * USECSPERSEC); /* A time at which the cycle should be at its starting position. By default, aligned with the hour. */ char *ascii_phase = "12:00"; /* The above, converted to microseconds since the epoch. */ long long phase; Display *disp; int screen; Window root; GC circle_gc, border_gc; Colormap default_cmap; unsigned long circle_pixel; unsigned long border_pixel; #define array_length(array) (sizeof (array) / sizeof ((array)[0])) void give_usage (void); void draw_circles (void); void tick (struct timeval *t); void set_color (int); int strcmp_abbrev (char *abbrev, char *model); int main (argc, argv) int argc; char **argv; { progname = argv[0]; for (argc--, argv++; argc>0; argc--, argv++) if (argv[0][0] == '-') if (strcmp_abbrev (argv[0], "-display") == 0) { if (argc <= 1) give_usage (); disp_name = argv[1]; argc--, argv++; } else if (strcmp_abbrev (argv[0], "-phase") == 0) { if (argc <= 1) give_usage (); ascii_phase = argv[1]; argc--, argv++; } else if (strcmp_abbrev (argv[0], "-period") == 0) { /* The argument to the -period parameter can contain a decimal point. Check it and parse the whole thing. */ char *secs; char *usecs = NULL; char *scan; if (argc <= 1) give_usage (); secs = (char *) alloca (strlen (argv[1]) + 10); secs = strcpy (secs, argv[1]); for (scan = secs; *scan != '\0'; scan++) switch (*scan) { case '0': case '1': case '2': case '3': case '4': case '5': case '6': case '7': case '8': case '9': break; case '.': *scan = '\0'; usecs = scan + 1; break; default: give_usage (); } /* If there is no decimal point, start usecs after the '\0'. */ if (!usecs) usecs = ++scan; /* Add zeros until usecs has six digits. */ while (scan < usecs + 6) *scan++ = '0'; /* Accept no more than six digits. */ usecs[6] = '\0'; period = (long long) atoi (secs) * USECSPERSEC + atoi (usecs); argc--, argv++; } else { give_usage (); break; } else give_usage (); /* Try to grok the ascii_phase specification. */ { phase = get_date (ascii_phase, NULL); if (phase == -1) { fprintf (stderr, "%s: can't parse `%s' as a time\n", progname, ascii_phase); exit (1); } /* Find the smallest equivalent value for phase. */ phase = (phase * USECSPERSEC) % period; } disp_name || (disp_name = getenv ("DISPLAY")); disp = XOpenDisplay (disp_name); if (! disp) { fprintf (stderr, "%s: Can't open display %s\n", progname, disp_name); exit (1); } screen = DefaultScreen (disp); root = RootWindow (disp, screen); /* Try to allocate a color cell for the changing color. */ default_cmap = DefaultColormap (disp, screen); if (! XAllocColorCells (disp, default_cmap, False, NULL, 0, &circle_pixel, 1)) { fprintf (stderr, "%s: In order to run, the display %s must have " "a read/write color cell available.\n", progname, disp_name); exit (2); } { XGCValues v; v.foreground = circle_pixel; v.line_width = 10; circle_gc = XCreateGC (disp, root, GCLineWidth | GCForeground, &v); v.foreground = BlackPixel (disp, screen); v.line_width = 14; border_gc = XCreateGC (disp, root, GCLineWidth | GCForeground, &v); } { fd_set inputfds; struct timeval next_tick; tick (&next_tick); draw_circles (); XSelectInput (disp, root, ExposureMask); for (;;) { int has_event; XFlush (disp); FD_ZERO (&inputfds); FD_SET (ConnectionNumber (disp), &inputfds); if ((has_event = select (32, &inputfds, NULL, NULL, &next_tick)) == -1) { perror (progname); exit (2); } if (has_event) { XEvent event; XNextEvent (disp, &event); switch (event.type) { case Expose: /* Remove any other queued expose events; one draw_circles call will take care of them all. */ while (XCheckMaskEvent (disp, ExposureMask, &event)) ; draw_circles (); break; case MappingNotify: break; default: fprintf (stderr, "%s: Unexpected event type: %d\n", progname, event.type); exit (2); } } tick (&next_tick); } } XCloseDisplay (disp); exit (0); } #define CENTER_RADIUS(cx, cy, r) (cx) - (r), (cy)-(r), 2*(r), 2*(r) void draw_circles () { int width = DisplayWidth (disp, screen); int height = DisplayHeight (disp, screen); int center_x = width / 2; int center_y = height / 2; int radius = ((width < height) ? width : height) / 6; int spacing = radius / .86602540378443864690; /* cos (30) */ int center_x_1 = center_x + spacing * .96592582628906828678; /* cos (15) */ int center_y_1 = center_y - spacing * .25881904510252076221; /* sin (15) */ int center_x_2 = center_x + spacing * -.70710678118654752351; /* cos (135) */ int center_y_2 = center_y - spacing * .70710678118654752528; /* sin (135) */ int center_x_3 = center_x + spacing * -.25881904510252076462; /* cos (255) */ int center_y_3 = center_y - spacing * -.96592582628906828615; /* sin (255) */ XDrawArc (disp, root, border_gc, CENTER_RADIUS (center_x_1, center_y_1, radius), 0 * 64, 360 * 64); XDrawArc (disp, root, border_gc, CENTER_RADIUS (center_x_2, center_y_2, radius), 0 * 64, 360 * 64); XDrawArc (disp, root, border_gc, CENTER_RADIUS (center_x_3, center_y_3, radius), 0 * 64, 360 * 64); XDrawArc (disp, root, circle_gc, CENTER_RADIUS (center_x_1, center_y_1, radius), 0 * 64, 360 * 64); XDrawArc (disp, root, circle_gc, CENTER_RADIUS (center_x_2, center_y_2, radius), 0 * 64, 360 * 64); XDrawArc (disp, root, circle_gc, CENTER_RADIUS (center_x_3, center_y_3, radius), 0 * 64, 360 * 64); } void give_usage () { char *usage = "\ Usage: %s [-display displayname] [-period ] [-phase