1 # include <time.h> 2 3 static char SccsId[] = "@(#)arpadate.c 1.3 08/02/80"; 4 5 /* 6 ** ARPADATE -- Create date in ARPANET format 7 ** 8 ** Parameters: 9 ** none 10 ** 11 ** Returns: 12 ** pointer to an ARPANET date field 13 ** 14 ** Side Effects: 15 ** none 16 ** 17 ** WARNING: 18 ** date is stored in a local buffer -- subsequent 19 ** calls will overwrite. 20 */ 21 22 arpadate() 23 { 24 register char *ud; /* the unix date */ 25 long t; 26 extern struct tm *localtime(); 27 register char *p; 28 static char b[40]; 29 30 time(&t); 31 ud = ctime(&t); 32 33 ud[3] = ud[7] = ud[10] = ud[19] = ud[24] = '\0'; 34 p = &ud[8]; /* 16 */ 35 if (*p == ' ') 36 p++; 37 strcpy(b, p); 38 strcat(b, " "); 39 strcat(b, &ud[4]); /* Sep */ 40 strcat(b, " "); 41 strcat(b, &ud[20]); /* 1979 */ 42 strcat(b, " "); 43 strcat(b, &ud[11]); /* 01:03:52 */ 44 if (localtime(&t)->tm_isdst) 45 strcat(b, "-PDT"); 46 else 47 strcat(b, "-PST"); 48 return (b); 49 } 50