Return to wakeup.c CVS log

Up to [Apple XNU] / GNUtools / emacs / etc

Annotation of GNUtools/emacs/etc/wakeup.c, revision 1.1

1.1     ! root        1: /* Program to produce output at regular intervals.  */
        !             2: 
        !             3: #include <stdio.h>
        !             4: #include <time.h>
        !             5: 
        !             6: struct tm *localtime ();
        !             7: 
        !             8: main (argc, argv)
        !             9:      int argc;
        !            10:      char **argv;
        !            11: {
        !            12:   int period = 60;
        !            13:   long when;
        !            14:   struct tm *tp;
        !            15: 
        !            16:   if (argc > 1)
        !            17:     period = atoi (argv[1]);
        !            18: 
        !            19:   while (1)
        !            20:     {
        !            21:       /* Make sure wakeup stops when Emacs goes away.  */
        !            22:       if (getppid () == 1)
        !            23:        exit (0);
        !            24:       printf ("Wake up!\n");
        !            25:       fflush (stdout);
        !            26:       /* If using a period of 60, produce the output when the minute
        !            27:         changes. */
        !            28:       if (period == 60)
        !            29:        {
        !            30:          time (&when);
        !            31:          tp = localtime (&when);
        !            32:          sleep (60 - tp->tm_sec);
        !            33:        }
        !            34:       else
        !            35:        sleep (period);
        !            36:     }
        !            37: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.