1 files changed, 86 insertions, 0 deletions
diff --git a/mdk-stage1/dietlibc/libugly/tzfile.c b/mdk-stage1/dietlibc/libugly/tzfile.c
new file mode 100644
index 000000000..5702d4bea
--- /dev/null
+++ b/mdk-stage1/dietlibc/libugly/tzfile.c
@@ -0,0 +1,86 @@
+#include "dietfeatures.h"
+#include <unistd.h>
+#include <fcntl.h>
+#include <sys/mman.h>
+#include <netinet/in.h>
+
+#include <stdio.h>
+
+#ifdef WANT_TZFILE_PARSER
+static char *tzfile=0;
+static int tzlen=-1;
+
+void __maplocaltime() {
+  int fd;
+  unsigned int len;
+  if (tzlen>=0) return;
+  tzlen=0;
+  if ((fd=open("/etc/localtime",O_RDONLY))<0) return;
+  len=lseek(fd,0,SEEK_END);
+  if ((tzfile=mmap(0,len,PROT_READ,MAP_SHARED,fd,0))==MAP_FAILED) return;
+  close(fd);
+  if (ntohl(*(int*)tzfile) != 0x545a6966) return;
+  tzlen=len;
+}
+
+char *tzset(void)	__attribute__((weak,alias("__maplocaltime")));
+
+static unsigned long __myntohl(const unsigned char* c) {
+  return (((unsigned long)c[0])<<24) +
+         (((unsigned long)c[1])<<16) +
+         (((unsigned long)c[2])<<8) +
+         ((unsigned long)c[3]);
+}
+
+time_t __tzfile_map(time_t t, int *isdst) {
+  /* "TZif" plus 16 reserved bytes. */
+  char *tmp;
+  int i;
+  int tzh_ttisgmtcnt, tzh_ttisstdcnt, tzh_leapcnt, tzh_timecnt, tzh_typecnt, tzh_charcnt;
+  *isdst=0;
+  if (!tzfile) return t;
+  tzh_ttisgmtcnt=ntohl(*(int*)(tzfile+20));
+  tzh_ttisstdcnt=ntohl(*(int*)(tzfile+24));
+  tzh_leapcnt=ntohl(*(int*)(tzfile+28));
+  tzh_timecnt=ntohl(*(int*)(tzfile+32));
+  tzh_typecnt=ntohl(*(int*)(tzfile+36));
+  tzh_charcnt=ntohl(*(int*)(tzfile+40));
+
+#if 0
+  tmp=tzfile+20+6*4;
+  printf("ttisgmtcnt %d ttisstdcnt %d leapcnt %d timecnt %d typecnt %d charcnt %d\n",tzh_ttisgmtcnt,tzh_ttisstdcnt, tzh_leapcnt, tzh_timecnt, tzh_typecnt, tzh_charcnt);
+  printf("transition times: ");
+  for (i=0; i<tzh_timecnt; ++i) {
+    printf("%s%lu",i?", ":"",ntohl(*(int*)tmp)); tmp+=4;
+  }
+  printf("\n");
+  printf("indices: ");
+  for (i=0; i<tzh_timecnt; ++i) {
+    printf("%s%d",i?", ":"",*tmp); ++tmp;
+  }
+  printf("\n");
+  printf("transition times: ");
+  for (i=0; i<tzh_typecnt; ++i) {
+    printf("%s(%lu,%d,%d)",i?", ":"",ntohl(*(int*)tmp),tmp[4],tmp[5]); tmp+=6;
+  }
+  printf("\n");
+#endif
+
+  tmp=tzfile+20+6*4;
+  for (i=0; i<tzh_timecnt; ++i)
+    if ((time_t)__myntohl(tmp+i*4) >= t) {
+/*      printf("match at %d\n",i); */
+      tmp+=tzh_timecnt*4;
+      i=tmp[i-1];
+/*      printf("using index %d\n",i); */
+      tmp+=tzh_timecnt;
+      tmp+=i*6;
+/*      printf("(%lu,%d,%d)\n",ntohl(*(int*)tmp),tmp[4],tmp[5]); */
+      *isdst=tmp[4];
+      return t+__myntohl(tmp);
+    }
+  return t;
+}
+#else
+void tzset(void)	__attribute__((weak,alias("return0")));
+#endif