Subversion Repositories openrisc

#ifndef CYGONCE_IO_WALLCLOCK_INL

#define CYGONCE_IO_WALLCLOCK_INL

//==========================================================================

//

//      wallclock.inl

//

//      Wallclock internal helper functions

//

//==========================================================================

//####ECOSGPLCOPYRIGHTBEGIN####

// -------------------------------------------

// This file is part of eCos, the Embedded Configurable Operating System.

// Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.

//

// eCos is free software; you can redistribute it and/or modify it under

// the terms of the GNU General Public License as published by the Free

// Software Foundation; either version 2 or (at your option) any later version.

//

// eCos is distributed in the hope that it will be useful, but WITHOUT ANY

// WARRANTY; without even the implied warranty of MERCHANTABILITY or

// FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

// for more details.

//

// You should have received a copy of the GNU General Public License along

// with eCos; if not, write to the Free Software Foundation, Inc.,

// 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.

//

// As a special exception, if other files instantiate templates or use macros

// or inline functions from this file, or you compile this file and link it

// with other works to produce a work based on this file, this file does not

// by itself cause the resulting work to be covered by the GNU General Public

// License. However the source code for this file must still be made available

// in accordance with section (3) of the GNU General Public License.

//

// This exception does not invalidate any other reasons why a work based on

// this file might be covered by the GNU General Public License.

//

// Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.

// at http://sources.redhat.com/ecos/ecos-license/

// -------------------------------------------

//####ECOSGPLCOPYRIGHTEND####

//==========================================================================

//#####DESCRIPTIONBEGIN####

//

// Author(s):     jskov

// Contributors:  jskov

// Date:          2000-05-26

// Purpose:       Wall Clock internal helper functions

//

//####DESCRIPTIONEND####

//

//==========================================================================

#include 

#include           // assertions

// -------------------------------------------------------------------------

// Some helper functions

#define is_leap(_y_) (((0==(_y_)%4 && 0!=(_y_)%100) || 0==(_y_)%400) ? 1 : 0)

#define year_days(_y_) (is_leap(_y_) ? 366 : 365)

static cyg_int32 days_per_month[2][12] = {

    {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31},

    {31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31}

};

#ifndef time_t

#define time_t cyg_uint32

#endif

static time_t

_simple_mktime(cyg_uint32 year, cyg_uint32 mon,

               cyg_uint32 day, cyg_uint32 hour,

               cyg_uint32 min, cyg_uint32 sec)

{

    time_t secs;

    cyg_uint32 y, m, days;

    CYG_ASSERT(year <= 3124, "Year is unreasonably large");

    CYG_ASSERT(mon <= 12, "Month is invalid");

    CYG_ASSERT(day <= 31, "Day is invalid");

    CYG_ASSERT(hour <= 23, "Hour is invalid");

    CYG_ASSERT(min <= 59, "Minutes is invalid");

    CYG_ASSERT(sec <= 61, "Seconds is invalid");

    // Number of days due to years

    days = 0;

    for (y = 1970; y < year; y++)

        days += year_days(y);

    // Due to months

    for (m = 0; m < mon-1; m++)

        days += days_per_month[is_leap(year)][m];

    // Add days

    days += day - 1;

    // Add hours, minutes, and seconds

    secs = ((days * 24 + hour) * 60 + min) * 60 + sec;

    return secs;

}

#ifdef CYGSEM_WALLCLOCK_SET_GET_MODE

static void

_simple_mkdate(time_t time,

               cyg_uint32* year, cyg_uint32* mon,

               cyg_uint32* day, cyg_uint32* hour,

               cyg_uint32* min, cyg_uint32* sec)

{

    cyg_int32 days, hms, y, m, *dpm;

    days = (cyg_int32) (time / (24*60*60));

    hms  = (cyg_int32) (time % (24*60*60));

    // Nothing fancy about the time - no leap year magic involved

    *sec = hms % 60;

    *min = (hms % (60*60)) / 60;

    *hour = hms / (60*60);

    // Find year

    for (y = 1970; days >= year_days(y); y++)

        days -= year_days(y);

    *year = y;

    dpm = &days_per_month[is_leap(y)][0];

    // Find month

    for (m = 0; days >= dpm[m]; m++)

        days -= dpm[m];

    m++;

    *mon = m;

    *day = days+1;

}

#endif

//-----------------------------------------------------------------------------

// BCD helper macros

#define TO_BCD(x) (((x/10)<<4) | (x%10))

#define TO_DEC(x) (((x>>4)*10) + (x&0xf))

#endif // ifndef CYGONCE_DEVS_WALLCLOCK_INL

// EOF wallclock.inl