Mercurial > hg > octave-nkf > gnulib-hg

annotate lib/gettime.c @ 6912:314715e0260d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from coreutils.
author Paul Eggert <eggert@cs.ucla.edu>
date Mon, 03 Jul 2006 08:32:46 +0000
parents 6b31c8787689
children 8a1a9361108c
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
3768
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
1 /* gettime -- get the system clock
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
2 Copyright (C) 2002, 2004, 2005 Free Software Foundation, Inc.
3768
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
3
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
4 This program is free software; you can redistribute it and/or modify
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
5 it under the terms of the GNU General Public License as published by
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
6 the Free Software Foundation; either version 2, or (at your option)
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
7 any later version.
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
8
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
9 This program is distributed in the hope that it will be useful,
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
12 GNU General Public License for more details.
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
13
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
14 You should have received a copy of the GNU General Public License
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
15 along with this program; if not, write to the Free Software Foundation,
5848
a48fb0e98c8c *** empty log message ***
Paul Eggert <eggert@cs.ucla.edu>
parents: 5662
diff changeset
16 Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
3768
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
17
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
18 /* Written by Paul Eggert. */
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
19
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
20 #ifdef HAVE_CONFIG_H
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
21 # include <config.h>
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
22 #endif
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
23
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
24 #include "timespec.h"
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
25
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
26 /* Get the system time into *TS. */
3768
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
27
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
28 void
3768
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
29 gettime (struct timespec *ts)
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
30 {
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
31 #if HAVE_NANOTIME
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
32 nanotime (ts);
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
33 #else
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
34
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
35 # if defined CLOCK_REALTIME && HAVE_CLOCK_GETTIME
3768
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
36 if (clock_gettime (CLOCK_REALTIME, ts) == 0)
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
37 return;
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
38 # endif
3768
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
39
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
40 # if HAVE_GETTIMEOFDAY
3768
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
41 {
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
42 struct timeval tv;
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
43 gettimeofday (&tv, NULL);
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
44 ts->tv_sec = tv.tv_sec;
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
45 ts->tv_nsec = tv.tv_usec * 1000;
3768
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
46 }
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
47 # else
6527
6b31c8787689 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
48
6b31c8787689 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
49 # ifndef OK_TO_USE_1S_CLOCK
6b31c8787689 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
50 # error "Only 1-second nominal clock resolution found. Is that intended?" \
6b31c8787689 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
51 "If so, compile with the -DOK_TO_USE_1S_CLOCK option."
6b31c8787689 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
52 # endif
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
53 ts->tv_sec = time (NULL);
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
54 ts->tv_nsec = 0;
6527
6b31c8787689 Sync from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
55
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
56 # endif
5059
eb3efcec6ae2 Don't assume that gettimeofday and settimeofday exist or work.
Paul Eggert <eggert@cs.ucla.edu>
parents: 3774
diff changeset
57
5662
42df9db003cc * modules/gethrxtime: New file.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5059
diff changeset
58 #endif
3768
3f9408503b6e new file, from Paul Eggert
Jim Meyering <jim@meyering.net>
parents:
diff changeset
59 }