annotate Mac/Python/getmtime.c @ 4923:ae573922fdcd legacy-trunk

Mac-specific version of getmtime (for non-GUSI Python, which needs different include files)
author Jack Jansen <jack.jansen@cwi.nl>
date Fri, 10 Jan 1997 15:24:19 +0000
parents
children d6b292a33cfe
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
4923
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
1 /***********************************************************
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
2 Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam,
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
3 The Netherlands.
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
4
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
5 All Rights Reserved
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
6
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
7 Permission to use, copy, modify, and distribute this software and its
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
8 documentation for any purpose and without fee is hereby granted,
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
9 provided that the above copyright notice appear in all copies and that
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
10 both that copyright notice and this permission notice appear in
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
11 supporting documentation, and that the names of Stichting Mathematisch
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
12 Centrum or CWI or Corporation for National Research Initiatives or
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
13 CNRI not be used in advertising or publicity pertaining to
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
14 distribution of the software without specific, written prior
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
15 permission.
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
16
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
17 While CWI is the initial source for this software, a modified version
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
18 is made available by the Corporation for National Research Initiatives
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
19 (CNRI) at the Internet address ftp://ftp.python.org.
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
20
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
21 STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
22 REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
23 MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
24 CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
25 DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
26 PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
27 TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
28 PERFORMANCE OF THIS SOFTWARE.
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
29
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
30 ******************************************************************/
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
31
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
32 /* Subroutine to get the last modification time of a file */
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
33
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
34 /* (A separate file because this may be OS dependent) */
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
35
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
36 #include "config.h"
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
37
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
38 #include <stat.h>
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
39 #include "rename2.h"
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
40
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
41 long
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
42 getmtime(path)
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
43 char *path;
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
44 {
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
45 struct stat st;
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
46 if (stat(path, &st) != 0)
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
47 return -1;
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
48 else
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
49 return st.st_mtime;
ae573922fdcd Mac-specific version of getmtime (for non-GUSI Python, which needs
Jack Jansen <jack.jansen@cwi.nl>
parents:
diff changeset
50 }