jadtfmt 0.0.4-mswin32

data/ext/jadtfmt.c

@@ -0,0 +1,215 @@
+/* */
+#ifdef _WIN32
+__declspec(dllexport) void Init_jadtfmt();
+#endif
+
+#include <string.h>
+
+#ifndef _WIN32
+#include <alloca.h>
+#else
+#include <malloc.h>
+#endif
+
+#include "ruby.h"
+#include "jadtfmt.h"
+#include "jadtfmt_icu.h"
+
+#define VERSION "0.0.4"
+
+#define DEFAULT_INT(n) (NIL_P(n) ? 0 : NUM2INT(n))
+
+static VALUE JapaneseDateFormat;
+static VALUE pph_G, pph_N, pph_n, pph_E, pph_G_pattern, pph_N_pattern, pph_n_pattern, pph_E_pattern;
+
+/* */
+static VALUE jadtfmt_initialize(int argc, VALUE *argv, VALUE self) {
+  struct jadtfmt *p;
+  VALUE pattern, kcode;
+  char *s_pattern = NULL;
+  int i_pattern_len = 0;
+  const char *s_kcode;
+  char *s_codepage;
+
+  rb_scan_args(argc, argv, "02", &pattern, &kcode);
+
+  if (!NIL_P(pattern)) {
+    Check_Type(pattern, T_STRING);
+    s_pattern = StringValuePtr(pattern);
+    i_pattern_len = RSTRING(pattern)->len;
+  }
+
+  if (!NIL_P(kcode)) {
+    Check_Type(kcode, T_STRING);
+    s_kcode = (RSTRING(kcode)->len > 0) ? StringValuePtr(kcode) : "UTF8";
+  } else {
+    s_kcode = rb_get_kcode();
+  }
+
+  switch (s_kcode[0]) {
+    case 'S': case 's': s_codepage = "Shift_JIS"; break;
+    case 'E': case 'e': s_codepage = "EUC-JP"; break;
+    case 'U': case 'u': s_codepage = "UTF-8"; break;
+    default: s_codepage = "UTF-8"; break;
+  }
+
+  Data_Get_Struct(self, struct jadtfmt, p);
+  p->fmt = jadtfmt_icu_new(s_pattern, s_codepage);
+  p->pattern_len = i_pattern_len;
+  p->codepage = s_codepage;
+
+  return Qnil;
+}
+
+/* */
+static VALUE jadtfmt_format(VALUE self, VALUE src) {
+  struct jadtfmt *p;
+  VALUE year, month, day, hour, min, sec;
+  char *buf;
+
+  if (!rb_obj_is_instance_of(src, rb_cTime)) {
+    rb_raise(rb_eTypeError, "wrong argument type %s (expected Time)", rb_class2name(CLASS_OF(src)));
+  }
+
+  year = rb_funcall(src, rb_intern("year"), 0);
+  month = rb_funcall(src, rb_intern("month"), 0);
+  day = rb_funcall(src, rb_intern("day"), 0);
+  hour = rb_funcall(src, rb_intern("hour"), 0);
+  min = rb_funcall(src, rb_intern("min"), 0);
+  sec = rb_funcall(src, rb_intern("sec"), 0);
+
+  Data_Get_Struct(self, struct jadtfmt, p);
+
+  if (p->pattern_len > 0) {
+    int len = p->pattern_len * 3 + 16;
+    buf = alloca(len);
+    memset(buf, 0, len);
+  } else {
+    rb_raise(rb_eRuntimeError, "pattern is not set");
+  }
+
+  jadtfmt_icu_format(p->fmt, NUM2INT(year), NUM2INT(month), NUM2INT(day), NUM2INT(hour), NUM2INT(min), NUM2INT(sec), p->codepage, buf);
+
+  return rb_str_new2(buf);
+}
+
+/* */
+static VALUE jadtfmt_format_attrs(int argc, VALUE *argv, VALUE self) {
+  struct jadtfmt *p;
+  VALUE year, month, day, hour, min, sec;
+  char *buf;
+
+  rb_scan_args(argc, argv, "15", &year, &month, &day, &hour, &min, &sec);
+
+  Data_Get_Struct(self, struct jadtfmt, p);
+
+  if (p->pattern_len > 0) {
+    int len = p->pattern_len * 3 + 16;
+    buf = alloca(len);
+    memset(buf, 0, len);
+  } else {
+    rb_raise(rb_eRuntimeError, "pattern is not set");
+  }
+
+  jadtfmt_icu_format(p->fmt, NUM2INT(year), DEFAULT_INT(month), DEFAULT_INT(day), DEFAULT_INT(hour), DEFAULT_INT(min), DEFAULT_INT(sec), p->codepage, buf);
+
+  return rb_str_new2(buf);
+}
+
+/* */
+static VALUE jadtfmt_apply_pattern(VALUE self, VALUE pattern) {
+  struct jadtfmt *p;
+
+  Check_Type(pattern, T_STRING);
+  Data_Get_Struct(self, struct jadtfmt, p);
+  jadtfmt_icu_apply_pattern(p->fmt, StringValuePtr(pattern), p->codepage);
+  p->pattern_len = RSTRING(pattern)->len;
+
+  return Qnil;
+}
+
+/* */
+static VALUE jadtfmt_Time_jadtfmt(VALUE self, VALUE pattern) {
+  VALUE jadtfmt = rb_funcall(JapaneseDateFormat, rb_intern("new"), 1, pattern);
+  return rb_funcall(jadtfmt, rb_intern("format"), 1, self);
+}
+
+/* */
+static VALUE jadtfmt_Time_jastrftime(VALUE self, VALUE format) {
+  VALUE jadtfmt, replace;
+
+  Check_Type(format, T_STRING);
+  jadtfmt = rb_funcall(JapaneseDateFormat, rb_intern("new"), 0);
+
+  if (rb_funcall(format, rb_intern("include?"), 1, pph_G)) {
+    rb_funcall(jadtfmt, rb_intern("apply_pattern"), 1, pph_G_pattern);
+    replace = rb_funcall(jadtfmt, rb_intern("format"), 1, self);
+    format = rb_funcall(format, rb_intern("gsub"), 2, pph_G, replace);
+  }
+
+  if (rb_funcall(format, rb_intern("include?"), 1, pph_N)) {
+    rb_funcall(jadtfmt, rb_intern("apply_pattern"), 1, pph_N_pattern);
+    replace = rb_funcall(jadtfmt, rb_intern("format"), 1, self);
+    format = rb_funcall(format, rb_intern("gsub"), 2, pph_N, replace);
+  }
+
+  if (rb_funcall(format, rb_intern("include?"), 1, pph_n)) {
+    rb_funcall(jadtfmt, rb_intern("apply_pattern"), 1, pph_n_pattern);
+    replace = rb_funcall(jadtfmt, rb_intern("format"), 1, self);
+    format = rb_funcall(format, rb_intern("gsub"), 2, pph_n, replace);
+  }
+
+  if (rb_funcall(format, rb_intern("include?"), 1, pph_E)) {
+    rb_funcall(jadtfmt, rb_intern("apply_pattern"), 1, pph_E_pattern);
+    replace = rb_funcall(jadtfmt, rb_intern("format"), 1, self);
+    format = rb_funcall(format, rb_intern("gsub"), 2, pph_E, replace);
+  }
+
+  return rb_funcall(self, rb_intern("strftime"), 1, format);
+}
+
+static void jadtfmt_free(struct jadtfmt *p) {
+  jadtfmt_icu_delete(p->fmt);
+  xfree(p);
+}
+
+static VALUE jadtfmt_alloc(VALUE klass) {
+  struct jadtfmt *p = ALLOC(struct jadtfmt);
+
+  p->fmt = NULL;
+  p->pattern_len = 0;
+  p->codepage = NULL;
+
+  return Data_Wrap_Struct(klass, 0, jadtfmt_free, p);
+}
+
+void Init_jadtfmt() {
+  JapaneseDateFormat = rb_define_class("JapaneseDateFormat", rb_cObject);
+  rb_define_const(JapaneseDateFormat, "VERSION", rb_str_new2(VERSION));
+  rb_define_alloc_func(JapaneseDateFormat, jadtfmt_alloc);
+  rb_define_private_method(JapaneseDateFormat, "initialize", jadtfmt_initialize, -1);
+  rb_define_method(JapaneseDateFormat, "format", jadtfmt_format, 1);
+  rb_define_method(JapaneseDateFormat, "format_attrs", jadtfmt_format_attrs, -1);
+  rb_define_method(JapaneseDateFormat, "apply_pattern", jadtfmt_apply_pattern, 1);
+
+  rb_define_method(rb_cTime, "jadtfmt", jadtfmt_Time_jadtfmt, 1);
+  rb_define_method(rb_cTime, "jastrftime", jadtfmt_Time_jastrftime, 1);
+
+  pph_G = rb_str_new2("%G");
+  pph_N = rb_str_new2("%N");
+  pph_n = rb_str_new2("%n");
+  pph_E = rb_str_new2("%E");
+  pph_G_pattern = rb_str_new2("G");
+  pph_N_pattern = rb_str_new2("yy");
+  pph_n_pattern = rb_str_new2("y");
+  pph_E_pattern = rb_str_new2("E");
+
+  rb_define_class_variable(JapaneseDateFormat, "@@pph_G", pph_G);
+  rb_define_class_variable(JapaneseDateFormat, "@@pph_N", pph_N);
+  rb_define_class_variable(JapaneseDateFormat, "@@pph_n", pph_n);
+  rb_define_class_variable(JapaneseDateFormat, "@@pph_E", pph_E);
+  rb_define_class_variable(JapaneseDateFormat, "@@pph_G_pattern", pph_G_pattern);
+  rb_define_class_variable(JapaneseDateFormat, "@@pph_N_pattern", pph_N_pattern);
+  rb_define_class_variable(JapaneseDateFormat, "@@pph_n_pattern", pph_n_pattern);
+  rb_define_class_variable(JapaneseDateFormat, "@@pph_W_pattern", pph_E_pattern);
+}

metadata

@@ -0,0 +1,55 @@
+--- !ruby/object:Gem::Specification 
+name: jadtfmt
+version: !ruby/object:Gem::Version 
+  version: 0.0.4
+platform: mswin32
+authors: 
+- winebarrel
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-04-18 00:00:00 +09:00
+default_executable: 
+dependencies: []
+
+description: 
+email: sgwr_dts@yahoo.co.jp
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- ext/jadtfmt.c
+files: 
+- lib/i386-mswin32/jadtfmt.so
+- ext/jadtfmt.c
+has_rdoc: true
+homepage: http://jadtfmt.rubyforge.org
+post_install_message: 
+rdoc_options: 
+- --title
+- JapaneseDateFormat - formatting a Time to the japanese time string using ICU.
+require_paths: 
+- lib/i386-mswin32
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: jadtfmt
+rubygems_version: 1.0.1
+signing_key: 
+specification_version: 2
+summary: formatting a Time to the japanese time string using ICU.
+test_files: []
+