Return to gendate.c CVS log

Up to [Research Unix] / researchv10no / cmd / nupas / libc

Annotation of researchv10no/cmd/nupas/libc/gendate.c, revision 1.1.1.1

1.1       root        1: #include <sys/types.h>
                      2: #include <sys/timeb.h>
                      3: #include <time.h>
                      4: 
                      5: extern long time();
                      6: extern char *timezone();
                      7: extern struct tm *localtime();
                      8: extern char *asctime();
                      9: 
                     10: /*
                     11:  *  return an ascii daytime string
                     12:  */
                     13: extern char *
                     14: thedate()
                     15: {
                     16:        static char date[32];
                     17:        char *tp, *dp;
                     18:        struct timeb timbuf;
                     19:        struct tm *bp;
                     20:        long thetime;
                     21: 
                     22:        thetime = time((long *)0);
                     23:        bp = localtime(&thetime);
                     24:        dp = asctime(bp);
                     25:        ftime(&timbuf);
                     26:        tp = timezone(timbuf.timezone, bp->tm_isdst ? 1 : 0);
                     27:        sprintf(date, "%.19s %.3s %.4s", dp, tp, dp+20);
                     28:        return date;
                     29: }

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