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;
 | |
| }
 |