rainlance/amiga-tz
1
0
Fork 0
mirror of https://frontier.innolan.net/rainlance/amiga-tz.git synced 2025-12-09 10:54:09 +00:00
Code Releases Activity

more swiftification work

Browse Source 
SCCS-file: localtime.c
SCCS-SID: 1.12
This commit is contained in:
Arthur David Olson
1986-03-01 17:20:50 -05:00
committed by Paul Eggert
parent 09e0242994
commit 877922ece0
1 changed files with 12 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
localtime.c
View File

@ -26,7 +26,7 @@ register char * tzname;
register struct tzinfo * tzp;
register struct dsinfo * dsp;
register int fid;
register int i, hitype, ok;
register int i, j, ok;
char buf[256];
if (tzname == 0)
@ -46,21 +46,20 @@ register char * tzname;
if (close(fid) != 0 || !ok)
goto oops;
/*
** Check the information.
** Check for errors that could cause core dumps.
** Note: all tz_dsinfo elements are checked even if they aren't used.
** Note that a zero-length time zone abbreviation is *not* considered
** to be an error.
*/
hitype = 0;
for (i = 0; i < tzp->tz_timecnt; ++i) {
if (i > 0 && tzp->tz_times[i] <= tzp->tz_times[i - 1])
for (i = 0; i < tzp->tz_timecnt; ++i)
if (tzp->tz_types[i] > TZ_MAX_TYPES)
goto oops;
if (tzp->tz_types[i] > hitype)
hitype = tzp->tz_types[i];
}
if (hitype > TZ_MAX_TYPES)
goto oops;
for (i = 0; i <= hitype; ++i) {
for (i = 0; i < TZ_MAX_TYPES; ++i) {
dsp = tzp->tz_dsinfo + i;
if (dsp->ds_abbr[TZ_ABBR_LEN] != '\0')
goto oops;
j = 0;
while (dsp->ds_abbr[j] != '\0')
if (++j > TZ_ABBR_LEN)
goto oops;
}
return 0;
oops: