From: Tanaka Akira <akr@...17n.org>
Date: 2001-12-12T12:08:50+09:00
Subject: [ruby-list:32884] Re: newdate

In article <20011212093832C.tadf@funaba.org>,
  tadf@kt.rim.or.jp writes:

> time.rb $B$N2>Dj$C$F!"1<IC$NA^F~$K$h$k:9$,(B60$BL$K~$H$$$&$b$N$G$9$+(B? 

$B$O$$!#$=$&$G$9!#(B

> $B6(Dj(B
> $B@$3&;~$HCOJ};~$G1<IC$N>pJs$,0[$J$k$H$$$&$N$O$"$k$H;W$$$^$9$,!"$=$&$$$&(B
> $B1?MQ$O4V0c$$$J$s$8$c$J$$$+$H;W$&$s$G!"5$$K$7$J$/$F$b$$$$$h$&$J5$$,$9$k(B
> $B$s$G$9$,!"$I$&$J$s$G$7$g$&!#(B

* $B<j85$N(B OS (FreeBSD) $B$G@5$7$$1?MQ$r$9$k$K$O(B root $B8"8B$,I,MW$G!"<B83$9(B
  $B$k$N$,LLE]!#(B

* $B$I$&$;<Y0-$5$,828=$9$k$N$O$9$/$J$/$H$b?t==G/8e!#(B
  $B$^$?!"<Y0-$5$rA}Bg$5$;!"(B30$BJ,L$K~$J$I$H$9$l$P828=$rCY$i$9$3$H$bMF0W!#(B

* API $B$K$O<Y0-$5$O8=$l$F$$$J$$$N$G!"$"$H$+$i2~?4$7$F$bCf?H$@$1F~$l49$((B
  $B$l$P:Q$`!#(B

* $B;d$O(B PoMS $B$G@8$-$F$$$k$i$7$$!#(B(PoLS $B$G$O$J$$!#(B)

* $B$3$N7o$K$D$$$F0U8+$r=R$Y$F$/$l$k?M$,$$$J$+$C$?!#(B

$B$H$$$&$h$&$JM}M3$K$h$j<Y0-$J<BAu$r$H$j$^$7$?!#(B

$B$,!":G8e$NM}M3$K$D$$$F$O$a$G$?$/2r>C$5$l$?$N$G$b$&>/$79M$($F$_$^$7$g$&(B...
$B;W$$$D$-$^$7$?!#(B

tzcode $B$G$O(B struct tm $B$K(B tm_gmtoff $B%U%#!<%k%I$,$"$k$N$G!"$3$l$r;2>H$9(B
$B$l$P<Y0-$G$J$/;~:9$r<hF@$G$-$^$9!#$^$?!";d$NCN$C$F$$$k8B$j$K$*$$$F!"(B
tzcode $B0J30$G$O(B

class Time
  def utcoff
    t = dup.localtime
    l = t.to_a[0,6].reverse
    u = t.utc.to_a[0,6].reverse
    l.pop-u.pop + 60 * (l.pop-u.pop + 60 * (l.pop-u.pop + 24 * (l<=>u)))
  end
end

$B$H$$$&$h$&$J%3!<%I$G@5$7$/;~:9$r<hF@$G$-$^$9!#;~:9$,(B 24$B;~4VL$K~$G$"$l$P!#(B

# $B$=!<$$$d2~Nq$,(B($BIi$N(B) time_t $B$GFO$/HO0O$G5/$-$?$H$3$m$,$"$C$?$O$:$@$J!#(B
# $B$"$H$GD4$Y$F$_$h$&!#(B

$B$H$$$&$o$1$G!"(BC $B$G%a%=%C%I$r<BAu$7$F!"(Btm_gmtoff $B$,$"$l$P$=$l$r!"$=$&$G(B
$B$J$1$l$P>e5-$N$h$&$K$7$F7k2L$r5a$a$l$P<Y0-$5$rH/4x$;$:$K>o$K@5$7$$7k2L(B
$B$,F@$i$l$k$O$:$G$9!#(B

$B$&$%$`!#<BAu$9$k$K$O!"$^$:(B(configure.in $B$r$$$8$k$?$a$K(B) m4 $B$r;W$$=P$5$J(B
$B$$$H$$$1$J$$$J$!!#(B

> Date $B$H(B DateTime $B$N0c$$$H$7$F!"(BDate $B$G$O!";~9o$d;~:9$O$J$$$H$$$&$3$H$K(B
> $B$J$C$F$$$^$9$,!"<B:]$O!"6(Dj@$3&;~$K$*$1$k@58a$H$7$FI=8=$5$l$F$$$^$9!#(B
> $BM}M3$O%f%j%&%9F|$r$D$+$C$F$$$k$+$i!"$=$N$[$&$,<+A3$@$+$i$G$9!#(BDate $BC1(B
> $BBN$G$O$J$s$NLdBj$b$J$$$s$G$9$,!"(BDateTime $B$,$G$F$/$k$H!"$A$g$C$HLdBj$G(B
> $B$9!#(B
> 
> Date.new(2001,12,12) $B$O!"<B:]$O!"(B2001-12-12T12:00:00Z $B$H@58a$K$J$j$^$9(B
> $B$,!"(BDateTime.new(2001,12,12) $B$H$7$?$H$-!"$3$l$rF1MM$K(B 
> 2001-12-12T12:00:00Z $B$H@58a$K$9$k$N$ODq93$,$"$j$^$9!#$+$H$$$C$F!"(BDate 
> $B$G$O@58a!"(BDateTime $B$O?<LkNm;~!"$H$9$k$N$bH=$jFq$$$7!"(B
> 
> Date.new(2001,12,12) > DateTime.new(2001,12,12)
> 
> $B$H$J$k$N$G$h$/$J$$$G$9$h$M!#$3$NE@$O8_49@-$N$?$a$K@09g@-$r5>@7$K$7$h$&(B
> $B$H;W$C$F$$$?$N$G$9$,!"$d$O$j5$$K$J$j$^$9!#8=;~E@$G$O!">/$7$P$+$j8_49@-(B
> $B$r5>@7$K$7$F!"(BDate $B$N$[$&$r?<LkNm;~$H$7$FI=8=$9$k9M$($K79$$$F$$$^$9!#(B
> 
> $B6qBNE*$K!"2?=h$,JQ$k$+$H$$$&$H!"$^$:!"(BDate $B$N%$%s%9%?%s%9JQ?t(B @rjd $B$N(B
> $BCM$,!"@58a$N$b$N$+$i?<LkNm;~$N$b$N$K$J$j$^$9!#$=$l$+$i!"(Bexist*? $B$NJV$j(B
> $BCM$b!"(BDateTime $B$N$[$&$K9g$;$k$3$H$K$J$k$G$7$g$&!#(B
> 
> @rjd $B$NCM$,JQ$k$N$O!"$"$^$j=EMW$G$J$$$7!"(Bexist*? $B$NJV$jCM$rJQ99$9$k$3(B
> $B$H$b!"$=$l$[$I?<9o$JLdBj$G$O$J$$$N$G!"$=$N$h$&$KJQ99$7$F$7$^$*$&$+$H;W$C(B
> $B$F$$$^$9$,!"$I$&$G$7$g$&$+!#(B

$B$($'$H!"$^$:<ALd$G$9$,!"(Brjd $B$C$F$J$s$NN,$G$7$g$&(B?
jd $B$O(B julian date $B$J$s$@$m$&$H;W$$$^$9$,!"(Br $B$O(B?

$B$^$:!";d$OFbItI=8=$r%f%j%&%9F|(B - $B%0%j%K%8J?6QE7J8;~$K$*$1$k5*85(B-4712$BG/(B
1$B7n(B1$BF|(B0$B;~(B0$BJ,(B0$BIC$+$i$NF|?t(B - $B$+$iJQ$($k$Y$-$G$O$J$$!"$H;W$$$^$9!#(B

# $B$$$^$R$H$DFI$_$-$l$F$$$J$$$s$G$9$,!"$b$7FbItI=8=$,>e5-$NDj5A$K$*$1$k(B
# $B%f%j%&%9F|$@$C$?$H$9$l$P!"$NOC$G$9!#$b$7$=$&$G$J$$$J$i$=$&$9$kJ}$,$$(B
# $B$$$H;W$$$^$9!#(B

$B$7$g$;$sFbItI=8=$J$N$G$?$7$+$K%f!<%6$K$H$C$F$O$"$^$j=EMW$G$O$"$j$^$;$s!#(B
$B$,!"$h$/;H$o$l$kDj5A$NCM$r07$C$?J}$,<BAu!&J]<i$,$J$K$+$H$d$j$d$9$$$s$8$c(B
$B$J$$$G$7$g$&$+!#$3$N>l9g<BAu<T$O$U$J$P$5$s$J$N$G!"$=$s$J$N$OBg$-$J$*@$(B
$BOC$+$bCN$l$^$;$s$,!#(B

$B$5$F!"OC$OJQ$o$C$F%f!<%6$+$i8+$?>l9g$NLdBj$G$9$,!"$3$l$O(B DateTime $B$,(B
Date $B$r7Q>5$7$F$$$k!"$D$^$j(B DateTime is Date $B$H$$$&9=B$$,$$$1$J$$$s$8$c(B
$B$J$$$+$H;W$$$^$9!#(BDate $B$H$$$&$N$O0lF|$r;X$7<($9$b$N$G$"$j!"$^$?(B
DateTime $B$O$b$C$H:Y$+$/0lE@$N;~9o$r;X$7<($9$b$N$H$9$l$P!"(Bis-a $B4X78$G$O(B
$B$J$$$H;W$$$^$9!#$J$^$8(B Date $B$,FbItE*$K;~J,IC$rJ];}$7$F$$$k$+$iJQ$J$3$H(B
$B$r9M$($F$7$^$&$s$8$c$J$$$G$7$g$&$+!#(B

$B$^$!!"<BAu$H$7$F$O(B Date $B$,FbIt$G(B DateTime $B$r;H$&$H$$$&$N$,3Z$@$H;W$$$^(B
$B$9$,!"$3$l$O$"$/$^$G$b<BAu$NOC$G!";~:9L5$7!"@58a!"$H$$$&>r7o$GMxMQ$7!"(B
$B30It$+$i$O;~:9$d;~J,IC$O4QB,$G$-$J$$$h$&$K$9$k$N$,$$$$$H;W$$$^$9!#(B

$B$b$7!"(BDate $B$H(B DateTime $B$,7Q>54X78$K$J$/JLJ*$@$H$9$l$P!"(B

  Date.new(2001,12,12) $B$,(B 2001-12-12T12:00:00Z $B$H$J$k(B
  => $B$=$l$,<+A3$J$N$G$=$&$9$k!#JL$K$=$&$7$J$/$F$b$h$/!"$$$:$l$K$7$F$b(B
     $B;~J,IC$O30$+$i$O8+$($J$$!#(B

  DateTime.new(2001,12,12) $B$,(B 2001-12-12T12:00:00Z $B$K$J$k!#(B
  => Date $B$NN.57$K9g$o$;$kM}M3$O$J$$$N$G$=$&$O$7$J$$!#(B

  Date $B$G$O@58a!"(BDateTime $B$O?<LkNm;~!"$H$9$k$N$bH=$jFq$$(B
  => $BJLJ*$J$N$G5$$K$7$J$$!#$^$?(B Date $B$N@58a$O30$+$i8+$($J$$$N$G:.Mp$O(B
     $B5/$-$J$$!#(B

  Date.new(2001,12,12) > DateTime.new(2001,12,12)
  => $BHf3S$7$F$O$J$i$J$$!#$"$k$$$O(B Date $B$r(B DateTime $B$KJQ492DG=$H$9$k>l(B
     $B9g$K$O!"(BDate $B$NG/7nF|$H(B0$B;~(B0$BJ,(B0$BIC$+$i(B DateTime $B$r9=@.$9$k!#(B

$B$H$$$&$U$&$K$G$-$^$9!#7k6I$N$H$3$m!"%f!<%6$+$i8+$($k7k2L$OF1$8$@$H;W$&(B
$B$s$G$9$,!";d$J$i$3$s$J$U$&$K9M$($k!"$H$$$&$3$H$G!#(B

$B$"$H!"5$$,$D$$$?$s$G$9$,!"5*85A0$NG/$N07$$$OE7J83XE*$J5,Ls$K$h$C$F$k$s(B
$B$G$9$M!#$H$9$k$H!"(BXML Schema $B$N(B dateTime $B$H$7$F$O$^$:$$$J$!!#(B
-- 
[$BEDCf(B $BE/(B][$B$?$J$+(B $B$"$-$i(B][Tanaka Akira]
$B!V$U$($m(B! $B$o$+$a$A$c$s:n@o$G$9$(C"=$B!W(B(Little Worker, $B7KM7@84](B)