blob: 72ef268bd8b957741abce39d033afc85460a3c0b (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
include <knet.h>
include <config.h>
.help futime
.nf ___________________________________________________________________________
FUTIME -- Set the file access/modify times of a file. Time arguments are
assumed to be in units of seconds from midnight on Jan 1, 1980, local standard
time. A file may be "touched" to update it's modify time to the current
clock time using the CLKTIME function with a call such as
stat = futime (fname, NULL, clktime(0))
Remote files are handled via the KI interface automatically.
.endhelp ______________________________________________________________________
int procedure futime (fname, atime, mtime)
char fname[ARB]
long atime, mtime
int status
include <fio.com>
begin
iferr (call fmapfn (fname, pathname, SZ_PATHNAME))
return (ERR)
# Update the time, let the HSI routine handle NULL values.
call zfutim (pathname, atime, mtime, status)
return (status)
end
|
