a729b974a632b58e2867d1ea1827f46c4313e726
[kopensolaris-gnu/glibc.git] / time / localtime.c
1 /* Copyright (C) 1991, 1992, 1993 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public License as
6 published by the Free Software Foundation; either version 2 of the
7 License, or (at your option) any later version.
8
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12 Library General Public License for more details.
13
14 You should have received a copy of the GNU Library General Public
15 License along with the GNU C Library; see the file COPYING.LIB.  If
16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17 Cambridge, MA 02139, USA.  */
18
19 #include <ansidecl.h>
20 #include <stddef.h>
21 #include <ctype.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <time.h>
26
27
28 #ifndef HAVE_GNU_LD
29 #define __tzname        tzname
30 #define __daylight      daylight
31 #define __timezone      timezone
32 #endif
33
34 /* Return the `struct tm' representation of *TIMER in the local timezone.  */
35 struct tm *
36 DEFUN(localtime, (timer), CONST time_t *timer)
37 {
38   extern int __use_tzfile;
39   extern int EXFUN(__tz_compute, (time_t timer, struct tm *tp));
40   extern int EXFUN(__tzfile_compute, (time_t timer,
41                                       long int *leap_correct, int *leap_hit));
42   register struct tm *tp;
43   long int leap_correction;
44   int leap_extra_secs;
45
46   if (timer == NULL)
47     {
48       errno = EINVAL;
49       return NULL;
50     }
51
52   {
53     /* Make sure the database is initialized.  */
54     extern int __tzset_run;
55     if (! __tzset_run)
56       __tzset ();
57   }
58
59   if (__use_tzfile)
60     {
61       if (! __tzfile_compute (*timer, &leap_correction, &leap_extra_secs))
62         return NULL;
63     }
64   else
65     {
66       tp = gmtime (timer);
67       if (tp == NULL)
68         return NULL;
69
70       if (! __tz_compute (*timer, tp))
71         return NULL;
72
73       leap_correction = 0L;
74       leap_extra_secs = 0;
75     }
76
77   tp = __offtime (timer, __timezone - leap_correction);
78   tp->tm_sec += leap_extra_secs;
79   tp->tm_isdst = __daylight;
80   tp->tm_gmtoff = __timezone;
81   tp->tm_zone = __tzname[__daylight];
82   return tp;
83 }