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
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
|
/***
*asctime.c - convert date/time structure to ASCII string
*
* Copyright (c) 1985-1993, Microsoft Corporation. All rights reserved.
*
*Purpose:
* Contains asctime() - convert a date/time structure to ASCII string.
*
*Revision History:
* 03-??-84 RLB Module created
* 05-??-84 DCW Removed use of sprintf, to avoid loading stdio
* functions
* 04-13-87 JCR Added "const" to declarations
* 05-21-87 SKS Declare the static buffer and helper routines as NEAR
* Replace store_year() with in-line code
*
* 11-24-87 WAJ allocated a static buffer for each thread.
* 12-11-87 JCR Added "_LOAD_DS" to declaration
* 05-24-88 PHG Merged DLL and normal versions; Removed initializers to
* save memory
* 06-06-89 JCR 386 mthread support
* 03-20-90 GJF Replaced _LOAD_DS with _CALLTYPE1, added #include
* <cruntime.h>, removed #include <register.h>, fixed
* the copyright and removed some leftover 16-bit support.
* Also, cleaned up the formatting a bit.
* 08-16-90 SBM Compiles cleanly with -W3
* 10-04-90 GJF New-style function declarators.
* 07-17-91 GJF Multi-thread support for Win32 [_WIN32_].
* 02-17-93 GJF Changed for new _getptd().
*
*******************************************************************************/
#include <cruntime.h>
#include <time.h>
#include <internal.h>
#include <os2dll.h>
#ifdef MTHREAD
#include <malloc.h>
#include <stddef.h>
#endif
#define _ASCBUFSIZE 26
static char buf[_ASCBUFSIZE];
/*
** This prototype must be local to this file since the procedure is static
*/
static char * _CRTAPI3 store_dt(char *, int);
static char * _CRTAPI3 store_dt (
REG1 char *p,
REG2 int val
)
{
*p++ = (char)('0' + val / 10);
*p++ = (char)('0' + val % 10);
return(p);
}
/***
*char *asctime(time) - convert a structure time to ascii string
*
*Purpose:
* Converts a time stored in a struct tm to a charcater string.
* The string is always exactly 26 characters of the form
* Tue May 01 02:34:55 1984\n\0
*
*Entry:
* struct tm *time - ptr to time structure
*
*Exit:
* returns pointer to static string with time string.
*
*Exceptions:
*
*******************************************************************************/
char * _CRTAPI1 asctime (
REG1 const struct tm *tb
)
{
#ifdef MTHREAD
#ifdef _CRUISER_
struct _tiddata * tdata; /* pointer to tid's data */
#else /* ndef _CRUISER_ */
#ifdef _WIN32_
_ptiddata ptd = _getptd();
#else /* ndef _WIN32_ */
#error ERROR - ONLY CRUISER OR WIN32 TARGET SUPPORTED!
#endif /* _WIN32_ */
#endif /* _CRUISER_ */
REG2 char *p; /* will point to asctime buffer */
char *retval; /* holds retval pointer */
#else
REG2 char *p = buf;
#endif
int day, mon;
int i;
#ifdef MTHREAD
#ifdef _CRUISER_
/* Use per thread buffer area (malloc space, if necessary) */
tdata = _gettidtab(); /* get tid's data address */
if (tdata->_asctimebuf == NULL) {
if ( (tdata->_asctimebuf = malloc(_ASCBUFSIZE)) == NULL)
p = buf; /* error: use static buffer */
else
p = tdata->_asctimebuf;
}
else
p = tdata->_asctimebuf;
#else /* ndef _CRUISER_ */
#ifdef _WIN32_
/* Use per thread buffer area (malloc space, if necessary) */
if ( (ptd->_asctimebuf != NULL) || ((ptd->_asctimebuf =
malloc(_ASCBUFSIZE)) != NULL) )
p = ptd->_asctimebuf;
else
p = buf; /* error: use static buffer */
#else /* ndef _WIN32_ */
#error ERROR - ONLY CRUISER OR WIN32 TARGET SUPPORTED!
#endif /* _WIN32_ */
#endif /* _CRUISER_ */
retval = p; /* save return value for later */
#endif
/* copy day and month names into the buffer */
day = tb->tm_wday * 3; /* index to correct day string */
mon = tb->tm_mon * 3; /* index to correct month string */
for (i=0; i < 3; i++,p++) {
*p = *(__dnames + day + i);
*(p+4) = *(__mnames + mon + i);
}
*p = ' '; /* blank between day and month */
p += 4;
*p++ = ' ';
p = store_dt(p, tb->tm_mday); /* day of the month (1-31) */
*p++ = ' ';
p = store_dt(p, tb->tm_hour); /* hours (0-23) */
*p++ = ':';
p = store_dt(p, tb->tm_min); /* minutes (0-59) */
*p++ = ':';
p = store_dt(p, tb->tm_sec); /* seconds (0-59) */
*p++ = ' ';
p = store_dt(p, 19 + (tb->tm_year/100)); /* year (after 1900) */
p = store_dt(p, tb->tm_year%100);
*p++ = '\n';
*p = '\0';
#ifdef _POSIX_
/* Date should be padded with spaces instead of zeroes. */
if ('0' == buf[8])
buf[8] = ' ';
#endif
#ifdef MTHREAD
return (retval);
#else
return ((char *) buf);
#endif
}
|