Subversion Repositories openrisc

/* VMTimeZone.c - Native method for java.util.VMTimeZone

   Copyright (C) 1999, 2004 Free Software Foundation, Inc.

This file is part of GNU Classpath.

GNU Classpath 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.

GNU Classpath 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 GNU Classpath; see the file COPYING.  If not, write to the

Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA

02110-1301 USA.

Linking this library statically or dynamically with other modules is

making a combined work based on this library.  Thus, the terms and

conditions of the GNU General Public License cover the whole

combination.

As a special exception, the copyright holders of this library give you

permission to link this library with independent modules to produce an

executable, regardless of the license terms of these independent

modules, and to copy and distribute the resulting executable under

terms of your choice, provided that you also meet, for each linked

independent module, the terms and conditions of the license of that

module.  An independent module is a module which is not derived from

or based on this library.  If you modify this library, you may extend

this exception to your version of the library, but you are not

obligated to do so.  If you do not wish to do so, delete this

exception statement from your version. */

#include "config.h"

#if TIME_WITH_SYS_TIME

# include <sys/time.h>

# include <time.h>

#else

# if HAVE_SYS_TIME_H

#  include <sys/time.h>

# else

#  include <time.h>

# endif

#endif

#include <stdio.h>

#include <string.h>

#include <stdlib.h>

#include <jni.h>

#include "java_util_VMTimeZone.h"

static size_t jint_to_charbuf (char *bufend, jint num);

/**

 * This method returns a time zone id string which is in the form

 * (standard zone name) or (standard zone name)(GMT offset) or

 * (standard zone name)(GMT offset)(daylight time zone name).  The

 * GMT offset can be in seconds, or where it is evenly divisible by

 * 3600, then it can be in hours.  The offset must be the time to

 * add to the local time to get GMT.  If a offset is given and the

 * time zone observes daylight saving then the (daylight time zone

 * name) must also be given (otherwise it is assumed the time zone

 * does not observe any daylight savings).

 * <p>

 * The result of this method is given to getDefaultTimeZone(String)

 * which tries to map the time zone id to a known TimeZone.  See

 * that method on how the returned String is mapped to a real

 * TimeZone object.

 */

JNIEXPORT jstring JNICALL

Java_java_util_VMTimeZone_getSystemTimeZoneId (JNIEnv * env,

                                               jclass clazz

                                               __attribute__ ((__unused__)))

{

  struct tm tim;

#ifndef HAVE_LOCALTIME_R

  struct tm *lt_tim;

#endif

#ifdef HAVE_TM_ZONE

  int month;

#endif

  time_t current_time;

  long tzoffset;

  const char *tz1, *tz2;

  char tzoff[11];

  size_t tz1_len, tz2_len, tzoff_len;

  char *tzid;

  jstring retval;

  time (&current_time);

#ifdef HAVE_LOCALTIME_R

  localtime_r (&current_time, &tim);

#else

  /* Fall back on non-thread safe localtime. */

  lt_tim = localtime (&current_time);

  memcpy (&tim, lt_tim, sizeof (struct tm));

#endif

  mktime (&tim);

#ifdef HAVE_STRUCT_TM_TM_ZONE

  /* We will cycle through the months to make sure we hit dst. */

  month = tim.tm_mon;

  tz1 = tz2 = NULL;

  while (tz1 == NULL || tz2 == NULL)

    {

      if (tim.tm_isdst > 0)

        tz2 = tim.tm_zone;

      else if (tz1 == NULL)

        {

          tz1 = tim.tm_zone;

          month = tim.tm_mon;

        }

      if (tz1 == NULL || tz2 == NULL)

        {

          tim.tm_mon++;

          tim.tm_mon %= 12;

        }

      if (tim.tm_mon == month && tz2 == NULL)

        tz2 = "";

      else

        mktime (&tim);

    }

  /* We want to make sure the tm struct we use later on is not dst. */

  tim.tm_mon = month;

  mktime (&tim);

#elif defined (HAVE_TZNAME)

  /* If dst is never used, tzname[1] is the empty string. */

  tzset ();

  tz1 = tzname[0];

  tz2 = tzname[1];

#else

  /* Some targets have no concept of timezones. Assume GMT without dst. */

  tz1 = "GMT";

  tz2 = "";

#endif

#ifdef STRUCT_TM_HAS_GMTOFF

  /* tm_gmtoff is the number of seconds that you must add to GMT to get

     local time, we need the number of seconds to add to the local time

     to get GMT. */

  tzoffset = -1L * tim.tm_gmtoff;

#elif HAVE_UNDERSCORE_TIMEZONE

  /* On some systems _timezone is actually defined as time_t. */

  tzoffset = (long) _timezone;

#elif HAVE_TIMEZONE

  /* timezone is secs WEST of UTC. */

  tzoffset = timezone;

#else

  /* FIXME: there must be another global if neither tm_gmtoff nor timezone

     is available, esp. if tzname is valid.

     Richard Earnshaw <rearnsha@arm.com> has suggested using difftime to

     calculate between gmtime and localtime (and accounting for possible

     daylight savings time) as an alternative. */

  tzoffset = 0L;

#endif

  if ((tzoffset % 3600) == 0)

    tzoffset = tzoffset / 3600;

  tz1_len = strlen (tz1);

  tz2_len = strlen (tz2);

  tzoff_len = jint_to_charbuf (tzoff + 11, tzoffset);

  tzid = (char *) malloc (tz1_len + tz2_len + tzoff_len + 1);   /* FIXME alloc */

  memcpy (tzid, tz1, tz1_len);

  memcpy (tzid + tz1_len, tzoff + 11 - tzoff_len, tzoff_len);

  memcpy (tzid + tz1_len + tzoff_len, tz2, tz2_len);

  tzid[tz1_len + tzoff_len + tz2_len] = '\0';

  retval = (*env)->NewStringUTF (env, tzid);

  free (tzid);

  return retval;

}

/* Put printed (decimal) representation of NUM in a buffer.

   BUFEND marks the end of the buffer, which must be at least 11 chars long.

   Returns the COUNT of chars written.  The result is in

   (BUFEND - COUNT) (inclusive) upto (BUFEND) (exclusive).

   Note that libgcj has a slightly different version called _Jv_FormatInt

   that works on jchar buffers.

*/

static size_t

jint_to_charbuf (char *bufend, jint num)

{

  register char *ptr = bufend;

  jboolean isNeg;

  if (num < 0)

    {

      isNeg = JNI_TRUE;

      num = -(num);

      if (num < 0)

        {

          /* Must be MIN_VALUE, so handle this special case.

             FIXME use 'unsigned jint' for num. */

          *--ptr = '8';

          num = 214748364;

        }

    }

  else

    isNeg = JNI_FALSE;

  do

    {

      *--ptr = (char) ((int) '0' + (num % 10));

      num /= 10;

    }

  while (num > 0);

  if (isNeg)

    *--ptr = '-';

  return bufend - ptr;

}