mirror of git://gcc.gnu.org/git/gcc.git
				
				
				
			
		
			
				
	
	
		
			231 lines
		
	
	
		
			6.6 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			231 lines
		
	
	
		
			6.6 KiB
		
	
	
	
		
			C
		
	
	
	
/* 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 <jcl.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 (¤t_time);
 | 
						|
#ifdef HAVE_LOCALTIME_R
 | 
						|
  localtime_r (¤t_time, &tim);
 | 
						|
#else
 | 
						|
  /* Fall back on non-thread safe localtime. */
 | 
						|
  lt_tim = localtime (¤t_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);
 | 
						|
  if (tzid == NULL) {
 | 
						|
    JCL_ThrowException (env, "java/lang/OutOfMemoryError",
 | 
						|
                        "malloc() failed");
 | 
						|
    return 0;
 | 
						|
  }
 | 
						|
 | 
						|
  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;
 | 
						|
}
 |