Return to ut2tm.c CVS log

Up to [CSRG BSD Unix] / 43BSDReno / contrib / isode-beta / psap

Annotation of 43BSDReno/contrib/isode-beta/psap/ut2tm.c, revision 1.1

1.1     ! root        1: /* ut2tm.c - time string to tm */
        !             2: 
        !             3: #ifndef        lint
        !             4: static char *rcsid = "$Header: /f/osi/psap/RCS/ut2tm.c,v 7.0 89/11/23 22:13:56 mrose Rel $";
        !             5: #endif
        !             6: 
        !             7: /* 
        !             8:  * $Header: /f/osi/psap/RCS/ut2tm.c,v 7.0 89/11/23 22:13:56 mrose Rel $
        !             9:  *
        !            10:  *
        !            11:  * $Log:       ut2tm.c,v $
        !            12:  * Revision 7.0  89/11/23  22:13:56  mrose
        !            13:  * Release 6.0
        !            14:  * 
        !            15:  */
        !            16: 
        !            17: /*
        !            18:  *                               NOTICE
        !            19:  *
        !            20:  *    Acquisition, use, and distribution of this module and related
        !            21:  *    materials are subject to the restrictions of a license agreement.
        !            22:  *    Consult the Preface in the User's Manual for the full terms of
        !            23:  *    this agreement.
        !            24:  *
        !            25:  */
        !            26: 
        !            27: 
        !            28: /* LINTLIBRARY */
        !            29: 
        !            30: #include <stdio.h>
        !            31: #include "psap.h"
        !            32: #ifdef OSX
        !            33: #include <sys/time.h>
        !            34: #endif
        !            35: 
        !            36: 
        !            37: #define        UNYEAR(y)       ((y) < 1900 || (y) > 1999 ? (y) : (y) - 1900)
        !            38: 
        !            39: extern int dmsize[];
        !            40: 
        !            41: /*  */
        !            42: 
        !            43: struct tm *ut2tm (ut)
        !            44: register UTC   ut;
        !            45: {
        !            46:     static struct tm   tms;
        !            47:     register struct tm *tm = &tms;
        !            48: 
        !            49:     bzero ((char *) tm, sizeof *tm);
        !            50: 
        !            51:     tm -> tm_sec = ut -> ut_sec;
        !            52:     tm -> tm_min = ut -> ut_min;
        !            53:     tm -> tm_hour = ut -> ut_hour;
        !            54:     tm -> tm_mday = ut -> ut_mday;
        !            55:     tm -> tm_mon = ut -> ut_mon - 1;
        !            56:     tm -> tm_year = UNYEAR (ut -> ut_year);
        !            57:     tm -> tm_wday = makewkday (ut);
        !            58:     tm -> tm_yday = tm -> tm_isdst = 0;
        !            59: 
        !            60:     tm -> tm_hour -= ut -> ut_zone / 60, tm -> tm_min -= ut -> ut_zone % 60;
        !            61:     if (tm -> tm_min < 0)
        !            62:        tm -> tm_hour--, tm -> tm_min += 60;
        !            63:     else
        !            64:        if (tm -> tm_min > 59)
        !            65:            tm -> tm_hour++, tm -> tm_min -= 60;
        !            66: 
        !            67: /* this ignores odditites in February... */
        !            68:     if (tm -> tm_hour < 0) {
        !            69:        tm -> tm_mday++, tm -> tm_hour += 24;
        !            70:        if (tm -> tm_mday > dmsize[tm -> tm_mon]) {
        !            71:            tm -> tm_mon++, tm -> tm_mday = 1;
        !            72:            if (tm -> tm_mon > 11)
        !            73:                tm -> tm_year++, tm -> tm_mon = 0;
        !            74:        }
        !            75:        
        !            76:     }
        !            77:     else
        !            78:        if (tm -> tm_hour > 23) {
        !            79:            tm -> tm_mday--, tm -> tm_hour -= 24;
        !            80:            if (tm -> tm_mday < 1) {
        !            81:                tm -> tm_mday = dmsize[--tm -> tm_mon];
        !            82:                if (tm -> tm_mon < 0)
        !            83:                    tm -> tm_year--, tm -> tm_mon = 11;
        !            84:            }
        !            85:        }
        !            86: 
        !            87:     return tm;
        !            88: }
        !            89: 
        !            90: /*  */
        !            91: 
        !            92: #define        dysize(y)       \
        !            93:        (((y) % 4) ? 365 : (((y) % 100) ? 366 : (((y) % 400) ? 365 : 366)))
        !            94: 
        !            95: #define        YEAR(y)         ((y) >= 100 ? (y) : (y) + 1900)
        !            96: 
        !            97: 
        !            98: static  int makewkday (ut)
        !            99: UTC     ut;
        !           100: {
        !           101:     int     d,
        !           102:            mon,
        !           103:            year;
        !           104: 
        !           105:     mon = ut -> ut_mon;
        !           106:     year = YEAR (ut -> ut_year);
        !           107:     d = 4 + year + (year + 3) / 4;
        !           108: 
        !           109:     if (year > 1800) {
        !           110:        d -= (year - 1701) / 100;
        !           111:        d += (year - 1601) / 400;
        !           112:     }
        !           113:     if (year > 1752)
        !           114:        d += 3;
        !           115:     if (dysize (year) == 366 && mon > 3)
        !           116:        d++;
        !           117:     while (--mon)
        !           118:        d += dmsize[mon - 1];
        !           119:     d += ut -> ut_mday - 1;
        !           120: 
        !           121:     return (d % 7);
        !           122: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.