1*2400Sdlw /* 2*2400Sdlw char id_fdate[] = "@(#)fdate_.c 1.1"; 3*2400Sdlw * 4*2400Sdlw * Return date and time in an ASCII string. 5*2400Sdlw * 6*2400Sdlw * calling sequence: 7*2400Sdlw * character*24 string 8*2400Sdlw * call fdate(string) 9*2400Sdlw * where: 10*2400Sdlw * the 24 character string will be filled with the date & time in 11*2400Sdlw * ascii form as described under ctime(3). 12*2400Sdlw * No 'newline' or NULL will be included. 13*2400Sdlw */ 14*2400Sdlw 15*2400Sdlw fdate_(s, strlen) 16*2400Sdlw char *s; long strlen; 17*2400Sdlw { 18*2400Sdlw char *ctime(), *c; 19*2400Sdlw long time(), t; 20*2400Sdlw 21*2400Sdlw t = time(0); 22*2400Sdlw c = ctime(&t); 23*2400Sdlw c[24] = '\0'; 24*2400Sdlw b_char(c, s, strlen); 25*2400Sdlw } 26