/ Hex Artifact Content
Login

Artifact bb3ce39211cc6687a187133efeb2066b48993643:


0000: 23 20 32 30 30 33 20 4f 63 74 6f 62 65 72 20 33  # 2003 October 3
0010: 31 0a 23 0a 23 20 54 68 65 20 61 75 74 68 6f 72  1.#.# The author
0020: 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70 79 72   disclaims copyr
0030: 69 67 68 74 20 74 6f 20 74 68 69 73 20 73 6f 75  ight to this sou
0040: 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20 70 6c  rce code.  In pl
0050: 61 63 65 20 6f 66 0a 23 20 61 20 6c 65 67 61 6c  ace of.# a legal
0060: 20 6e 6f 74 69 63 65 2c 20 68 65 72 65 20 69 73   notice, here is
0070: 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a 23 0a 23   a blessing:.#.#
0080: 20 20 20 20 4d 61 79 20 79 6f 75 20 64 6f 20 67      May you do g
0090: 6f 6f 64 20 61 6e 64 20 6e 6f 74 20 65 76 69 6c  ood and not evil
00a0: 2e 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20 66  ..#    May you f
00b0: 69 6e 64 20 66 6f 72 67 69 76 65 6e 65 73 73 20  ind forgiveness 
00c0: 66 6f 72 20 79 6f 75 72 73 65 6c 66 20 61 6e 64  for yourself and
00d0: 20 66 6f 72 67 69 76 65 20 6f 74 68 65 72 73 2e   forgive others.
00e0: 0a 23 20 20 20 20 4d 61 79 20 79 6f 75 20 73 68  .#    May you sh
00f0: 61 72 65 20 66 72 65 65 6c 79 2c 20 6e 65 76 65  are freely, neve
0100: 72 20 74 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68  r taking more th
0110: 61 6e 20 79 6f 75 20 67 69 76 65 2e 0a 23 0a 23  an you give..#.#
0120: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 0a 23 20 54 68 69 73 20 66  *******.# This f
0170: 69 6c 65 20 69 6d 70 6c 65 6d 65 6e 74 73 20 72  ile implements r
0180: 65 67 72 65 73 73 69 6f 6e 20 74 65 73 74 73 20  egression tests 
0190: 66 6f 72 20 53 51 4c 69 74 65 20 6c 69 62 72 61  for SQLite libra
01a0: 72 79 2e 20 20 54 68 65 0a 23 20 66 6f 63 75 73  ry.  The.# focus
01b0: 20 6f 66 20 74 68 69 73 20 66 69 6c 65 20 69 73   of this file is
01c0: 20 74 65 73 74 69 6e 67 20 64 61 74 65 20 61 6e   testing date an
01d0: 64 20 74 69 6d 65 20 66 75 6e 63 74 69 6f 6e 73  d time functions
01e0: 2e 0a 23 0a 23 20 24 49 64 3a 20 64 61 74 65 2e  ..#.# $Id: date.
01f0: 74 65 73 74 2c 76 20 31 2e 35 20 32 30 30 34 2f  test,v 1.5 2004/
0200: 30 31 2f 30 37 20 30 33 3a 32 39 3a 31 36 20 64  01/07 03:29:16 d
0210: 72 68 20 45 78 70 20 24 0a 0a 73 65 74 20 74 65  rh Exp $..set te
0220: 73 74 64 69 72 20 5b 66 69 6c 65 20 64 69 72 6e  stdir [file dirn
0230: 61 6d 65 20 24 61 72 67 76 30 5d 0a 73 6f 75 72  ame $argv0].sour
0240: 63 65 20 24 74 65 73 74 64 69 72 2f 74 65 73 74  ce $testdir/test
0250: 65 72 2e 74 63 6c 0a 0a 70 72 6f 63 20 64 61 74  er.tcl..proc dat
0260: 65 74 65 73 74 20 7b 74 6e 75 6d 20 65 78 70 72  etest {tnum expr
0270: 20 72 65 73 75 6c 74 7d 20 7b 0a 20 20 64 6f 5f   result} {.  do_
0280: 74 65 73 74 20 64 61 74 65 2d 24 74 6e 75 6d 20  test date-$tnum 
0290: 5b 73 75 62 73 74 20 7b 0a 20 20 20 20 65 78 65  [subst {.    exe
02a0: 63 73 71 6c 20 22 53 45 4c 45 43 54 20 63 6f 61  csql "SELECT coa
02b0: 6c 65 73 63 65 28 24 65 78 70 72 2c 27 4e 55 4c  lesce($expr,'NUL
02c0: 4c 27 29 22 0a 20 20 7d 5d 20 5b 6c 69 73 74 20  L')".  }] [list 
02d0: 24 72 65 73 75 6c 74 5d 0a 7d 0a 0a 64 61 74 65  $result].}..date
02e0: 74 65 73 74 20 31 2e 31 20 6a 75 6c 69 61 6e 64  test 1.1 juliand
02f0: 61 79 28 27 32 30 30 30 2d 30 31 2d 30 31 27 29  ay('2000-01-01')
0300: 20 32 34 35 31 35 34 34 2e 35 0a 64 61 74 65 74   2451544.5.datet
0310: 65 73 74 20 31 2e 32 20 6a 75 6c 69 61 6e 64 61  est 1.2 julianda
0320: 79 28 27 31 39 37 30 2d 30 31 2d 30 31 27 29 20  y('1970-01-01') 
0330: 32 34 34 30 35 38 37 2e 35 0a 64 61 74 65 74 65  2440587.5.datete
0340: 73 74 20 31 2e 33 20 6a 75 6c 69 61 6e 64 61 79  st 1.3 julianday
0350: 28 27 31 39 31 30 2d 30 34 2d 32 30 27 29 20 32  ('1910-04-20') 2
0360: 34 31 38 37 38 31 2e 35 0a 64 61 74 65 74 65 73  418781.5.datetes
0370: 74 20 31 2e 34 20 6a 75 6c 69 61 6e 64 61 79 28  t 1.4 julianday(
0380: 27 31 39 38 36 2d 30 32 2d 30 39 27 29 20 32 34  '1986-02-09') 24
0390: 34 36 34 37 30 2e 35 0a 64 61 74 65 74 65 73 74  46470.5.datetest
03a0: 20 31 2e 35 20 6a 75 6c 69 61 6e 64 61 79 28 27   1.5 julianday('
03b0: 31 32 3a 30 30 3a 30 30 27 29 20 32 34 35 31 35  12:00:00') 24515
03c0: 34 35 0a 64 61 74 65 74 65 73 74 20 31 2e 36 20  45.datetest 1.6 
03d0: 7b 6a 75 6c 69 61 6e 64 61 79 28 27 32 30 30 30  {julianday('2000
03e0: 2d 30 31 2d 30 31 20 31 32 3a 30 30 3a 30 30 27  -01-01 12:00:00'
03f0: 29 7d 20 32 34 35 31 35 34 35 0a 64 61 74 65 74  )} 2451545.datet
0400: 65 73 74 20 31 2e 37 20 7b 6a 75 6c 69 61 6e 64  est 1.7 {juliand
0410: 61 79 28 27 32 30 30 30 2d 30 31 2d 30 31 20 31  ay('2000-01-01 1
0420: 32 3a 30 30 27 29 7d 20 32 34 35 31 35 34 35 0a  2:00')} 2451545.
0430: 64 61 74 65 74 65 73 74 20 31 2e 38 20 6a 75 6c  datetest 1.8 jul
0440: 69 61 6e 64 61 79 28 27 62 6f 67 75 73 27 29 20  ianday('bogus') 
0450: 4e 55 4c 4c 0a 64 61 74 65 74 65 73 74 20 31 2e  NULL.datetest 1.
0460: 39 20 6a 75 6c 69 61 6e 64 61 79 28 27 31 39 39  9 julianday('199
0470: 39 2d 31 32 2d 33 31 27 29 20 32 34 35 31 35 34  9-12-31') 245154
0480: 33 2e 35 0a 64 61 74 65 74 65 73 74 20 31 2e 31  3.5.datetest 1.1
0490: 30 20 6a 75 6c 69 61 6e 64 61 79 28 27 31 39 39  0 julianday('199
04a0: 39 2d 31 32 2d 33 32 27 29 20 4e 55 4c 4c 0a 64  9-12-32') NULL.d
04b0: 61 74 65 74 65 73 74 20 31 2e 31 31 20 6a 75 6c  atetest 1.11 jul
04c0: 69 61 6e 64 61 79 28 27 31 39 39 39 2d 31 33 2d  ianday('1999-13-
04d0: 30 31 27 29 20 4e 55 4c 4c 0a 64 61 74 65 74 65  01') NULL.datete
04e0: 73 74 20 31 2e 31 32 20 6a 75 6c 69 61 6e 64 61  st 1.12 julianda
04f0: 79 28 27 32 30 30 33 2d 30 32 2d 33 31 27 29 20  y('2003-02-31') 
0500: 32 34 35 32 37 30 31 2e 35 0a 64 61 74 65 74 65  2452701.5.datete
0510: 73 74 20 31 2e 31 33 20 6a 75 6c 69 61 6e 64 61  st 1.13 julianda
0520: 79 28 27 32 30 30 33 2d 30 33 2d 30 33 27 29 20  y('2003-03-03') 
0530: 32 34 35 32 37 30 31 2e 35 0a 64 61 74 65 74 65  2452701.5.datete
0540: 73 74 20 31 2e 31 34 20 6a 75 6c 69 61 6e 64 61  st 1.14 julianda
0550: 79 28 27 2b 32 30 30 30 2d 30 31 2d 30 31 27 29  y('+2000-01-01')
0560: 20 4e 55 4c 4c 0a 64 61 74 65 74 65 73 74 20 31   NULL.datetest 1
0570: 2e 31 35 20 6a 75 6c 69 61 6e 64 61 79 28 27 32  .15 julianday('2
0580: 30 30 2d 30 31 2d 30 31 27 29 20 4e 55 4c 4c 0a  00-01-01') NULL.
0590: 64 61 74 65 74 65 73 74 20 31 2e 31 36 20 6a 75  datetest 1.16 ju
05a0: 6c 69 61 6e 64 61 79 28 27 32 30 30 30 2d 31 2d  lianday('2000-1-
05b0: 30 31 27 29 20 4e 55 4c 4c 0a 64 61 74 65 74 65  01') NULL.datete
05c0: 73 74 20 31 2e 31 37 20 6a 75 6c 69 61 6e 64 61  st 1.17 julianda
05d0: 79 28 27 32 30 30 30 2d 30 31 2d 31 27 29 20 4e  y('2000-01-1') N
05e0: 55 4c 4c 0a 64 61 74 65 74 65 73 74 20 31 2e 31  ULL.datetest 1.1
05f0: 38 20 7b 6a 75 6c 69 61 6e 64 61 79 28 27 32 30  8 {julianday('20
0600: 30 30 2d 30 31 2d 30 31 20 20 20 20 20 31 32 3a  00-01-01     12:
0610: 30 30 3a 30 30 27 29 7d 20 32 34 35 31 35 34 35  00:00')} 2451545
0620: 0a 64 61 74 65 74 65 73 74 20 31 2e 31 39 20 7b  .datetest 1.19 {
0630: 6a 75 6c 69 61 6e 64 61 79 28 27 32 30 30 30 2d  julianday('2000-
0640: 30 31 2d 30 31 20 31 32 3a 30 30 3a 30 30 2e 31  01-01 12:00:00.1
0650: 27 29 7d 20 20 20 32 34 35 31 35 34 35 2e 30 30  ')}   2451545.00
0660: 30 30 30 31 31 36 0a 64 61 74 65 74 65 73 74 20  000116.datetest 
0670: 31 2e 32 30 20 7b 6a 75 6c 69 61 6e 64 61 79 28  1.20 {julianday(
0680: 27 32 30 30 30 2d 30 31 2d 30 31 20 31 32 3a 30  '2000-01-01 12:0
0690: 30 3a 30 30 2e 30 31 27 29 7d 20 20 32 34 35 31  0:00.01')}  2451
06a0: 35 34 35 2e 30 30 30 30 30 30 31 32 0a 64 61 74  545.00000012.dat
06b0: 65 74 65 73 74 20 31 2e 32 31 20 7b 6a 75 6c 69  etest 1.21 {juli
06c0: 61 6e 64 61 79 28 27 32 30 30 30 2d 30 31 2d 30  anday('2000-01-0
06d0: 31 20 31 32 3a 30 30 3a 30 30 2e 30 30 31 27 29  1 12:00:00.001')
06e0: 7d 20 32 34 35 31 35 34 35 2e 30 30 30 30 30 30  } 2451545.000000
06f0: 30 31 0a 64 61 74 65 74 65 73 74 20 31 2e 32 32  01.datetest 1.22
0700: 20 7b 6a 75 6c 69 61 6e 64 61 79 28 27 32 30 30   {julianday('200
0710: 30 2d 30 31 2d 30 31 20 31 32 3a 30 30 3a 30 30  0-01-01 12:00:00
0720: 2e 27 29 7d 20 4e 55 4c 4c 0a 64 61 74 65 74 65  .')} NULL.datete
0730: 73 74 20 31 2e 32 33 20 6a 75 6c 69 61 6e 64 61  st 1.23 julianda
0740: 79 28 31 32 33 34 35 2e 36 29 20 31 32 33 34 35  y(12345.6) 12345
0750: 2e 36 0a 64 61 74 65 74 65 73 74 20 31 2e 32 34  .6.datetest 1.24
0760: 20 7b 6a 75 6c 69 61 6e 64 61 79 28 27 32 30 30   {julianday('200
0770: 31 2d 30 31 2d 30 31 20 31 32 3a 30 30 3a 30 30  1-01-01 12:00:00
0780: 20 62 6f 67 75 73 27 29 7d 20 4e 55 4c 4c 0a 64   bogus')} NULL.d
0790: 61 74 65 74 65 73 74 20 31 2e 32 35 20 7b 6a 75  atetest 1.25 {ju
07a0: 6c 69 61 6e 64 61 79 28 27 32 30 30 31 2d 30 31  lianday('2001-01
07b0: 2d 30 31 20 62 6f 67 75 73 27 29 7d 20 4e 55 4c  -01 bogus')} NUL
07c0: 4c 0a 0a 64 61 74 65 74 65 73 74 20 32 2e 31 20  L..datetest 2.1 
07d0: 64 61 74 65 74 69 6d 65 28 30 2c 27 75 6e 69 78  datetime(0,'unix
07e0: 65 70 6f 63 68 27 29 20 7b 31 39 37 30 2d 30 31  epoch') {1970-01
07f0: 2d 30 31 20 30 30 3a 30 30 3a 30 30 7d 0a 64 61  -01 00:00:00}.da
0800: 74 65 74 65 73 74 20 32 2e 32 20 64 61 74 65 74  tetest 2.2 datet
0810: 69 6d 65 28 39 34 36 36 38 34 38 30 30 2c 27 75  ime(946684800,'u
0820: 6e 69 78 65 70 6f 63 68 27 29 20 7b 32 30 30 30  nixepoch') {2000
0830: 2d 30 31 2d 30 31 20 30 30 3a 30 30 3a 30 30 7d  -01-01 00:00:00}
0840: 0a 64 61 74 65 74 65 73 74 20 32 2e 33 20 7b 64  .datetest 2.3 {d
0850: 61 74 65 28 27 32 30 30 33 2d 31 30 2d 32 32 27  ate('2003-10-22'
0860: 2c 27 77 65 65 6b 64 61 79 20 30 27 29 7d 20 32  ,'weekday 0')} 2
0870: 30 30 33 2d 31 30 2d 32 36 0a 64 61 74 65 74 65  003-10-26.datete
0880: 73 74 20 32 2e 34 20 7b 64 61 74 65 28 27 32 30  st 2.4 {date('20
0890: 30 33 2d 31 30 2d 32 32 27 2c 27 77 65 65 6b 64  03-10-22','weekd
08a0: 61 79 20 31 27 29 7d 20 32 30 30 33 2d 31 30 2d  ay 1')} 2003-10-
08b0: 32 37 0a 64 61 74 65 74 65 73 74 20 32 2e 35 20  27.datetest 2.5 
08c0: 7b 64 61 74 65 28 27 32 30 30 33 2d 31 30 2d 32  {date('2003-10-2
08d0: 32 27 2c 27 77 65 65 6b 64 61 79 20 32 27 29 7d  2','weekday 2')}
08e0: 20 32 30 30 33 2d 31 30 2d 32 38 0a 64 61 74 65   2003-10-28.date
08f0: 74 65 73 74 20 32 2e 36 20 7b 64 61 74 65 28 27  test 2.6 {date('
0900: 32 30 30 33 2d 31 30 2d 32 32 27 2c 27 77 65 65  2003-10-22','wee
0910: 6b 64 61 79 20 33 27 29 7d 20 32 30 30 33 2d 31  kday 3')} 2003-1
0920: 30 2d 32 32 0a 64 61 74 65 74 65 73 74 20 32 2e  0-22.datetest 2.
0930: 37 20 7b 64 61 74 65 28 27 32 30 30 33 2d 31 30  7 {date('2003-10
0940: 2d 32 32 27 2c 27 77 65 65 6b 64 61 79 20 34 27  -22','weekday 4'
0950: 29 7d 20 32 30 30 33 2d 31 30 2d 32 33 0a 64 61  )} 2003-10-23.da
0960: 74 65 74 65 73 74 20 32 2e 38 20 7b 64 61 74 65  tetest 2.8 {date
0970: 28 27 32 30 30 33 2d 31 30 2d 32 32 27 2c 27 77  ('2003-10-22','w
0980: 65 65 6b 64 61 79 20 35 27 29 7d 20 32 30 30 33  eekday 5')} 2003
0990: 2d 31 30 2d 32 34 0a 64 61 74 65 74 65 73 74 20  -10-24.datetest 
09a0: 32 2e 39 20 7b 64 61 74 65 28 27 32 30 30 33 2d  2.9 {date('2003-
09b0: 31 30 2d 32 32 27 2c 27 77 65 65 6b 64 61 79 20  10-22','weekday 
09c0: 36 27 29 7d 20 32 30 30 33 2d 31 30 2d 32 35 0a  6')} 2003-10-25.
09d0: 64 61 74 65 74 65 73 74 20 32 2e 31 30 20 7b 64  datetest 2.10 {d
09e0: 61 74 65 28 27 32 30 30 33 2d 31 30 2d 32 32 27  ate('2003-10-22'
09f0: 2c 27 77 65 65 6b 64 61 79 20 37 27 29 7d 20 4e  ,'weekday 7')} N
0a00: 55 4c 4c 0a 64 61 74 65 74 65 73 74 20 32 2e 31  ULL.datetest 2.1
0a10: 31 20 7b 64 61 74 65 28 27 32 30 30 33 2d 31 30  1 {date('2003-10
0a20: 2d 32 32 27 2c 27 77 65 65 6b 64 61 79 20 35 2e  -22','weekday 5.
0a30: 35 27 29 7d 20 4e 55 4c 4c 0a 64 61 74 65 74 65  5')} NULL.datete
0a40: 73 74 20 32 2e 31 32 20 7b 64 61 74 65 74 69 6d  st 2.12 {datetim
0a50: 65 28 27 32 30 30 33 2d 31 30 2d 32 32 20 31 32  e('2003-10-22 12
0a60: 3a 33 34 27 2c 27 77 65 65 6b 64 61 79 20 30 27  :34','weekday 0'
0a70: 29 7d 20 7b 32 30 30 33 2d 31 30 2d 32 36 20 31  )} {2003-10-26 1
0a80: 32 3a 33 34 3a 30 30 7d 0a 64 61 74 65 74 65 73  2:34:00}.datetes
0a90: 74 20 32 2e 31 33 20 7b 64 61 74 65 74 69 6d 65  t 2.13 {datetime
0aa0: 28 27 32 30 30 33 2d 31 30 2d 32 32 20 31 32 3a  ('2003-10-22 12:
0ab0: 33 34 27 2c 27 73 74 61 72 74 20 6f 66 20 6d 6f  34','start of mo
0ac0: 6e 74 68 27 29 7d 20 5c 0a 20 20 20 7b 32 30 30  nth')} \.   {200
0ad0: 33 2d 31 30 2d 30 31 20 30 30 3a 30 30 3a 30 30  3-10-01 00:00:00
0ae0: 7d 0a 64 61 74 65 74 65 73 74 20 32 2e 31 34 20  }.datetest 2.14 
0af0: 7b 64 61 74 65 74 69 6d 65 28 27 32 30 30 33 2d  {datetime('2003-
0b00: 31 30 2d 32 32 20 31 32 3a 33 34 27 2c 27 73 74  10-22 12:34','st
0b10: 61 72 74 20 6f 66 20 79 65 61 72 27 29 7d 20 5c  art of year')} \
0b20: 0a 20 20 20 7b 32 30 30 33 2d 30 31 2d 30 31 20  .   {2003-01-01 
0b30: 30 30 3a 30 30 3a 30 30 7d 0a 64 61 74 65 74 65  00:00:00}.datete
0b40: 73 74 20 32 2e 31 35 20 7b 64 61 74 65 74 69 6d  st 2.15 {datetim
0b50: 65 28 27 32 30 30 33 2d 31 30 2d 32 32 20 31 32  e('2003-10-22 12
0b60: 3a 33 34 27 2c 27 73 74 61 72 74 20 6f 66 20 64  :34','start of d
0b70: 61 79 27 29 7d 20 5c 0a 20 20 20 7b 32 30 30 33  ay')} \.   {2003
0b80: 2d 31 30 2d 32 32 20 30 30 3a 30 30 3a 30 30 7d  -10-22 00:00:00}
0b90: 0a 64 61 74 65 74 65 73 74 20 32 2e 31 36 20 74  .datetest 2.16 t
0ba0: 69 6d 65 28 27 31 32 3a 33 34 3a 35 36 2e 34 33  ime('12:34:56.43
0bb0: 27 29 20 31 32 3a 33 34 3a 35 36 0a 64 61 74 65  ') 12:34:56.date
0bc0: 74 65 73 74 20 32 2e 31 37 20 7b 64 61 74 65 74  test 2.17 {datet
0bd0: 69 6d 65 28 27 32 30 30 33 2d 31 30 2d 32 32 20  ime('2003-10-22 
0be0: 31 32 3a 33 34 27 2c 27 31 20 64 61 79 27 29 7d  12:34','1 day')}
0bf0: 20 7b 32 30 30 33 2d 31 30 2d 32 33 20 31 32 3a   {2003-10-23 12:
0c00: 33 34 3a 30 30 7d 0a 64 61 74 65 74 65 73 74 20  34:00}.datetest 
0c10: 32 2e 31 38 20 7b 64 61 74 65 74 69 6d 65 28 27  2.18 {datetime('
0c20: 32 30 30 33 2d 31 30 2d 32 32 20 31 32 3a 33 34  2003-10-22 12:34
0c30: 27 2c 27 2b 31 20 64 61 79 27 29 7d 20 7b 32 30  ','+1 day')} {20
0c40: 30 33 2d 31 30 2d 32 33 20 31 32 3a 33 34 3a 30  03-10-23 12:34:0
0c50: 30 7d 0a 64 61 74 65 74 65 73 74 20 32 2e 31 39  0}.datetest 2.19
0c60: 20 7b 64 61 74 65 74 69 6d 65 28 27 32 30 30 33   {datetime('2003
0c70: 2d 31 30 2d 32 32 20 31 32 3a 33 34 27 2c 27 2b  -10-22 12:34','+
0c80: 31 2e 32 35 20 64 61 79 27 29 7d 20 7b 32 30 30  1.25 day')} {200
0c90: 33 2d 31 30 2d 32 33 20 31 38 3a 33 34 3a 30 30  3-10-23 18:34:00
0ca0: 7d 0a 64 61 74 65 74 65 73 74 20 32 2e 32 30 20  }.datetest 2.20 
0cb0: 7b 64 61 74 65 74 69 6d 65 28 27 32 30 30 33 2d  {datetime('2003-
0cc0: 31 30 2d 32 32 20 31 32 3a 33 34 27 2c 27 2d 31  10-22 12:34','-1
0cd0: 2e 30 20 64 61 79 27 29 7d 20 7b 32 30 30 33 2d  .0 day')} {2003-
0ce0: 31 30 2d 32 31 20 31 32 3a 33 34 3a 30 30 7d 0a  10-21 12:34:00}.
0cf0: 64 61 74 65 74 65 73 74 20 32 2e 32 31 20 7b 64  datetest 2.21 {d
0d00: 61 74 65 74 69 6d 65 28 27 32 30 30 33 2d 31 30  atetime('2003-10
0d10: 2d 32 32 20 31 32 3a 33 34 27 2c 27 31 20 6d 6f  -22 12:34','1 mo
0d20: 6e 74 68 27 29 7d 20 7b 32 30 30 33 2d 31 31 2d  nth')} {2003-11-
0d30: 32 32 20 31 32 3a 33 34 3a 30 30 7d 0a 64 61 74  22 12:34:00}.dat
0d40: 65 74 65 73 74 20 32 2e 32 32 20 7b 64 61 74 65  etest 2.22 {date
0d50: 74 69 6d 65 28 27 32 30 30 33 2d 31 30 2d 32 32  time('2003-10-22
0d60: 20 31 32 3a 33 34 27 2c 27 31 31 20 6d 6f 6e 74   12:34','11 mont
0d70: 68 27 29 7d 20 7b 32 30 30 34 2d 30 39 2d 32 32  h')} {2004-09-22
0d80: 20 31 32 3a 33 34 3a 30 30 7d 0a 64 61 74 65 74   12:34:00}.datet
0d90: 65 73 74 20 32 2e 32 33 20 7b 64 61 74 65 74 69  est 2.23 {dateti
0da0: 6d 65 28 27 32 30 30 33 2d 31 30 2d 32 32 20 31  me('2003-10-22 1
0db0: 32 3a 33 34 27 2c 27 2d 31 33 20 6d 6f 6e 74 68  2:34','-13 month
0dc0: 27 29 7d 20 7b 32 30 30 32 2d 30 39 2d 32 32 20  ')} {2002-09-22 
0dd0: 31 32 3a 33 34 3a 30 30 7d 0a 64 61 74 65 74 65  12:34:00}.datete
0de0: 73 74 20 32 2e 32 34 20 7b 64 61 74 65 74 69 6d  st 2.24 {datetim
0df0: 65 28 27 32 30 30 33 2d 31 30 2d 32 32 20 31 32  e('2003-10-22 12
0e00: 3a 33 34 27 2c 27 31 2e 35 20 6d 6f 6e 74 68 73  :34','1.5 months
0e10: 27 29 7d 20 7b 32 30 30 33 2d 31 32 2d 30 37 20  ')} {2003-12-07 
0e20: 31 32 3a 33 34 3a 30 30 7d 0a 64 61 74 65 74 65  12:34:00}.datete
0e30: 73 74 20 32 2e 32 35 20 7b 64 61 74 65 74 69 6d  st 2.25 {datetim
0e40: 65 28 27 32 30 30 33 2d 31 30 2d 32 32 20 31 32  e('2003-10-22 12
0e50: 3a 33 34 27 2c 27 2d 35 20 79 65 61 72 73 27 29  :34','-5 years')
0e60: 7d 20 7b 31 39 39 38 2d 31 30 2d 32 32 20 31 32  } {1998-10-22 12
0e70: 3a 33 34 3a 30 30 7d 0a 64 61 74 65 74 65 73 74  :34:00}.datetest
0e80: 20 32 2e 32 36 20 7b 64 61 74 65 74 69 6d 65 28   2.26 {datetime(
0e90: 27 32 30 30 33 2d 31 30 2d 32 32 20 31 32 3a 33  '2003-10-22 12:3
0ea0: 34 27 2c 27 2b 31 30 2e 35 20 6d 69 6e 75 74 65  4','+10.5 minute
0eb0: 73 27 29 7d 20 5c 0a 20 20 7b 32 30 30 33 2d 31  s')} \.  {2003-1
0ec0: 30 2d 32 32 20 31 32 3a 34 34 3a 33 30 7d 0a 64  0-22 12:44:30}.d
0ed0: 61 74 65 74 65 73 74 20 32 2e 32 37 20 7b 64 61  atetest 2.27 {da
0ee0: 74 65 74 69 6d 65 28 27 32 30 30 33 2d 31 30 2d  tetime('2003-10-
0ef0: 32 32 20 31 32 3a 33 34 27 2c 27 2d 31 2e 32 35  22 12:34','-1.25
0f00: 20 68 6f 75 72 73 27 29 7d 20 5c 0a 20 20 7b 32   hours')} \.  {2
0f10: 30 30 33 2d 31 30 2d 32 32 20 31 31 3a 31 39 3a  003-10-22 11:19:
0f20: 30 30 7d 0a 64 61 74 65 74 65 73 74 20 32 2e 32  00}.datetest 2.2
0f30: 38 20 7b 64 61 74 65 74 69 6d 65 28 27 32 30 30  8 {datetime('200
0f40: 33 2d 31 30 2d 32 32 20 31 32 3a 33 34 27 2c 27  3-10-22 12:34','
0f50: 31 31 2e 32 35 20 73 65 63 6f 6e 64 73 27 29 7d  11.25 seconds')}
0f60: 20 5c 0a 20 20 7b 32 30 30 33 2d 31 30 2d 32 32   \.  {2003-10-22
0f70: 20 31 32 3a 33 34 3a 31 31 7d 0a 64 61 74 65 74   12:34:11}.datet
0f80: 65 73 74 20 32 2e 32 39 20 7b 64 61 74 65 74 69  est 2.29 {dateti
0f90: 6d 65 28 27 32 30 30 33 2d 31 30 2d 32 32 20 31  me('2003-10-22 1
0fa0: 32 3a 32 34 27 2c 27 2b 35 20 62 6f 67 75 73 27  2:24','+5 bogus'
0fb0: 29 7d 20 4e 55 4c 4c 0a 0a 0a 64 61 74 65 74 65  )} NULL...datete
0fc0: 73 74 20 33 2e 31 20 7b 73 74 72 66 74 69 6d 65  st 3.1 {strftime
0fd0: 28 27 25 64 27 2c 27 32 30 30 33 2d 31 30 2d 33  ('%d','2003-10-3
0fe0: 31 20 31 32 3a 33 34 3a 35 36 2e 34 33 32 27 29  1 12:34:56.432')
0ff0: 7d 20 33 31 0a 64 61 74 65 74 65 73 74 20 33 2e  } 31.datetest 3.
1000: 32 20 7b 73 74 72 66 74 69 6d 65 28 27 25 66 27  2 {strftime('%f'
1010: 2c 27 32 30 30 33 2d 31 30 2d 33 31 20 31 32 3a  ,'2003-10-31 12:
1020: 33 34 3a 35 36 2e 34 33 32 27 29 7d 20 35 36 2e  34:56.432')} 56.
1030: 34 33 32 0a 64 61 74 65 74 65 73 74 20 33 2e 33  432.datetest 3.3
1040: 20 7b 73 74 72 66 74 69 6d 65 28 27 25 48 27 2c   {strftime('%H',
1050: 27 32 30 30 33 2d 31 30 2d 33 31 20 31 32 3a 33  '2003-10-31 12:3
1060: 34 3a 35 36 2e 34 33 32 27 29 7d 20 31 32 0a 64  4:56.432')} 12.d
1070: 61 74 65 74 65 73 74 20 33 2e 34 20 7b 73 74 72  atetest 3.4 {str
1080: 66 74 69 6d 65 28 27 25 6a 27 2c 27 32 30 30 33  ftime('%j','2003
1090: 2d 31 30 2d 33 31 20 31 32 3a 33 34 3a 35 36 2e  -10-31 12:34:56.
10a0: 34 33 32 27 29 7d 20 33 30 34 0a 64 61 74 65 74  432')} 304.datet
10b0: 65 73 74 20 33 2e 35 20 7b 73 74 72 66 74 69 6d  est 3.5 {strftim
10c0: 65 28 27 25 4a 27 2c 27 32 30 30 33 2d 31 30 2d  e('%J','2003-10-
10d0: 33 31 20 31 32 3a 33 34 3a 35 36 2e 34 33 32 27  31 12:34:56.432'
10e0: 29 7d 20 32 34 35 32 39 34 34 2e 30 32 34 32 36  )} 2452944.02426
10f0: 34 32 35 39 0a 64 61 74 65 74 65 73 74 20 33 2e  4259.datetest 3.
1100: 36 20 7b 73 74 72 66 74 69 6d 65 28 27 25 6d 27  6 {strftime('%m'
1110: 2c 27 32 30 30 33 2d 31 30 2d 33 31 20 31 32 3a  ,'2003-10-31 12:
1120: 33 34 3a 35 36 2e 34 33 32 27 29 7d 20 31 30 0a  34:56.432')} 10.
1130: 64 61 74 65 74 65 73 74 20 33 2e 37 20 7b 73 74  datetest 3.7 {st
1140: 72 66 74 69 6d 65 28 27 25 4d 27 2c 27 32 30 30  rftime('%M','200
1150: 33 2d 31 30 2d 33 31 20 31 32 3a 33 34 3a 35 36  3-10-31 12:34:56
1160: 2e 34 33 32 27 29 7d 20 33 34 0a 64 61 74 65 74  .432')} 34.datet
1170: 65 73 74 20 33 2e 38 20 7b 73 74 72 66 74 69 6d  est 3.8 {strftim
1180: 65 28 27 25 73 27 2c 27 32 30 30 33 2d 31 30 2d  e('%s','2003-10-
1190: 33 31 20 31 32 3a 33 34 3a 35 36 2e 34 33 32 27  31 12:34:56.432'
11a0: 29 7d 20 31 30 36 37 36 30 33 36 39 36 0a 64 61  )} 1067603696.da
11b0: 74 65 74 65 73 74 20 33 2e 39 20 7b 73 74 72 66  tetest 3.9 {strf
11c0: 74 69 6d 65 28 27 25 53 27 2c 27 32 30 30 33 2d  time('%S','2003-
11d0: 31 30 2d 33 31 20 31 32 3a 33 34 3a 35 36 2e 34  10-31 12:34:56.4
11e0: 33 32 27 29 7d 20 35 36 0a 64 61 74 65 74 65 73  32')} 56.datetes
11f0: 74 20 33 2e 31 30 20 7b 73 74 72 66 74 69 6d 65  t 3.10 {strftime
1200: 28 27 25 77 27 2c 27 32 30 30 33 2d 31 30 2d 33  ('%w','2003-10-3
1210: 31 20 31 32 3a 33 34 3a 35 36 2e 34 33 32 27 29  1 12:34:56.432')
1220: 7d 20 35 0a 64 61 74 65 74 65 73 74 20 33 2e 31  } 5.datetest 3.1
1230: 31 20 7b 73 74 72 66 74 69 6d 65 28 27 25 57 27  1 {strftime('%W'
1240: 2c 27 32 30 30 33 2d 31 30 2d 33 31 20 31 32 3a  ,'2003-10-31 12:
1250: 33 34 3a 35 36 2e 34 33 32 27 29 7d 20 34 34 0a  34:56.432')} 44.
1260: 64 61 74 65 74 65 73 74 20 33 2e 31 32 20 7b 73  datetest 3.12 {s
1270: 74 72 66 74 69 6d 65 28 27 25 59 27 2c 27 32 30  trftime('%Y','20
1280: 30 33 2d 31 30 2d 33 31 20 31 32 3a 33 34 3a 35  03-10-31 12:34:5
1290: 36 2e 34 33 32 27 29 7d 20 32 30 30 33 0a 64 61  6.432')} 2003.da
12a0: 74 65 74 65 73 74 20 33 2e 31 33 20 7b 73 74 72  tetest 3.13 {str
12b0: 66 74 69 6d 65 28 27 25 25 27 2c 27 32 30 30 33  ftime('%%','2003
12c0: 2d 31 30 2d 33 31 20 31 32 3a 33 34 3a 35 36 2e  -10-31 12:34:56.
12d0: 34 33 32 27 29 7d 20 25 0a 64 61 74 65 74 65 73  432')} %.datetes
12e0: 74 20 33 2e 31 34 20 7b 73 74 72 66 74 69 6d 65  t 3.14 {strftime
12f0: 28 27 25 5f 27 2c 27 32 30 30 33 2d 31 30 2d 33  ('%_','2003-10-3
1300: 31 20 31 32 3a 33 34 3a 35 36 2e 34 33 32 27 29  1 12:34:56.432')
1310: 7d 20 4e 55 4c 4c 0a 64 61 74 65 74 65 73 74 20  } NULL.datetest 
1320: 33 2e 31 35 20 7b 73 74 72 66 74 69 6d 65 28 27  3.15 {strftime('
1330: 25 59 2d 25 6d 2d 25 64 27 2c 27 32 30 30 33 2d  %Y-%m-%d','2003-
1340: 31 30 2d 33 31 27 29 7d 20 32 30 30 33 2d 31 30  10-31')} 2003-10
1350: 2d 33 31 0a 70 72 6f 63 20 72 65 70 65 61 74 20  -31.proc repeat 
1360: 7b 6e 20 74 78 74 7d 20 7b 0a 20 20 73 65 74 20  {n txt} {.  set 
1370: 78 20 7b 7d 20 0a 20 20 77 68 69 6c 65 20 7b 24  x {} .  while {$
1380: 6e 3e 30 7d 20 7b 0a 20 20 20 20 61 70 70 65 6e  n>0} {.    appen
1390: 64 20 78 20 24 74 78 74 0a 20 20 20 20 69 6e 63  d x $txt.    inc
13a0: 72 20 6e 20 2d 31 0a 20 20 7d 0a 20 20 72 65 74  r n -1.  }.  ret
13b0: 75 72 6e 20 24 78 0a 7d 0a 64 61 74 65 74 65 73  urn $x.}.datetes
13c0: 74 20 33 2e 31 36 20 22 73 74 72 66 74 69 6d 65  t 3.16 "strftime
13d0: 28 27 5b 72 65 70 65 61 74 20 32 30 30 20 25 59  ('[repeat 200 %Y
13e0: 5d 27 2c 27 32 30 30 33 2d 31 30 2d 33 31 27 29  ]','2003-10-31')
13f0: 22 20 5b 72 65 70 65 61 74 20 32 30 30 20 32 30  " [repeat 200 20
1400: 30 33 5d 0a 64 61 74 65 74 65 73 74 20 33 2e 31  03].datetest 3.1
1410: 37 20 22 73 74 72 66 74 69 6d 65 28 27 5b 72 65  7 "strftime('[re
1420: 70 65 61 74 20 32 30 30 20 61 62 63 25 6d 31 32  peat 200 abc%m12
1430: 33 5d 27 2c 27 32 30 30 33 2d 31 30 2d 33 31 27  3]','2003-10-31'
1440: 29 22 20 5c 0a 20 20 20 20 5b 72 65 70 65 61 74  )" \.    [repeat
1450: 20 32 30 30 20 61 62 63 31 30 31 32 33 5d 0a 0a   200 abc10123]..
1460: 73 65 74 20 6e 6f 77 20 5b 63 6c 6f 63 6b 20 66  set now [clock f
1470: 6f 72 6d 61 74 20 5b 63 6c 6f 63 6b 20 73 65 63  ormat [clock sec
1480: 6f 6e 64 73 5d 20 2d 66 6f 72 6d 61 74 20 22 25  onds] -format "%
1490: 59 2d 25 6d 2d 25 64 22 20 2d 67 6d 74 20 31 5d  Y-%m-%d" -gmt 1]
14a0: 0a 64 61 74 65 74 65 73 74 20 34 2e 31 20 7b 64  .datetest 4.1 {d
14b0: 61 74 65 28 27 6e 6f 77 27 29 7d 20 24 6e 6f 77  ate('now')} $now
14c0: 0a 0a 64 61 74 65 74 65 73 74 20 35 2e 31 20 7b  ..datetest 5.1 {
14d0: 64 61 74 65 74 69 6d 65 28 27 31 39 39 34 2d 30  datetime('1994-0
14e0: 34 2d 31 36 20 31 34 3a 30 30 3a 30 30 20 2d 30  4-16 14:00:00 -0
14f0: 35 3a 30 30 27 29 7d 20 7b 31 39 39 34 2d 30 34  5:00')} {1994-04
1500: 2d 31 36 20 30 39 3a 30 30 3a 30 30 7d 0a 64 61  -16 09:00:00}.da
1510: 74 65 74 65 73 74 20 35 2e 32 20 7b 64 61 74 65  tetest 5.2 {date
1520: 74 69 6d 65 28 27 31 39 39 34 2d 30 34 2d 31 36  time('1994-04-16
1530: 20 31 34 3a 30 30 3a 30 30 20 2b 30 35 3a 31 35   14:00:00 +05:15
1540: 27 29 7d 20 7b 31 39 39 34 2d 30 34 2d 31 36 20  ')} {1994-04-16 
1550: 31 39 3a 31 35 3a 30 30 7d 0a 64 61 74 65 74 65  19:15:00}.datete
1560: 73 74 20 35 2e 33 20 7b 64 61 74 65 74 69 6d 65  st 5.3 {datetime
1570: 28 27 31 39 39 34 2d 30 34 2d 31 36 20 30 35 3a  ('1994-04-16 05:
1580: 30 30 3a 30 30 20 2d 30 38 3a 33 30 27 29 7d 20  00:00 -08:30')} 
1590: 7b 31 39 39 34 2d 30 34 2d 31 35 20 32 30 3a 33  {1994-04-15 20:3
15a0: 30 3a 30 30 7d 0a 64 61 74 65 74 65 73 74 20 35  0:00}.datetest 5
15b0: 2e 34 20 7b 64 61 74 65 74 69 6d 65 28 27 31 39  .4 {datetime('19
15c0: 39 34 2d 30 34 2d 31 36 20 31 34 3a 30 30 3a 30  94-04-16 14:00:0
15d0: 30 20 2b 31 31 3a 35 35 27 29 7d 20 7b 31 39 39  0 +11:55')} {199
15e0: 34 2d 30 34 2d 31 37 20 30 31 3a 35 35 3a 30 30  4-04-17 01:55:00
15f0: 7d 0a 0a 23 20 6c 6f 63 61 6c 74 69 6d 65 2d 3e  }..# localtime->
1600: 75 74 63 20 61 6e 64 20 75 74 63 2d 3e 6c 6f 63  utc and utc->loc
1610: 61 6c 74 69 6d 65 20 63 6f 6e 76 65 72 73 69 6f  altime conversio
1620: 6e 73 2e 20 20 54 68 65 73 65 20 74 65 73 74 73  ns.  These tests
1630: 20 6f 6e 6c 79 20 77 6f 72 6b 0a 23 20 69 66 20   only work.# if 
1640: 74 68 65 20 6c 6f 63 61 6c 74 69 6d 65 20 69 73  the localtime is
1650: 20 69 6e 20 74 68 65 20 55 53 20 45 61 73 74 65   in the US Easte
1660: 72 6e 20 54 69 6d 65 20 28 74 68 65 20 74 69 6d  rn Time (the tim
1670: 65 20 69 6e 20 43 68 61 72 6c 6f 74 74 65 2c 20  e in Charlotte, 
1680: 4e 43 0a 23 20 61 6e 64 20 69 6e 20 4e 65 77 20  NC.# and in New 
1690: 59 6f 72 6b 2e 29 0a 23 0a 69 66 20 7b 5b 63 6c  York.).#.if {[cl
16a0: 6f 63 6b 20 73 63 61 6e 20 5b 63 6c 6f 63 6b 20  ock scan [clock 
16b0: 66 6f 72 6d 61 74 20 30 20 2d 66 6f 72 6d 61 74  format 0 -format
16c0: 20 7b 25 62 20 25 64 2c 20 25 59 20 25 48 3a 25   {%b %d, %Y %H:%
16d0: 4d 3a 25 53 7d 5d 20 2d 67 6d 74 20 31 5d 3d 3d  M:%S}] -gmt 1]==
16e0: 2d 31 38 30 30 30 7d 20 7b 0a 20 20 64 61 74 65  -18000} {.  date
16f0: 74 65 73 74 20 36 2e 31 20 7b 64 61 74 65 74 69  test 6.1 {dateti
1700: 6d 65 28 27 32 30 30 30 2d 31 30 2d 32 39 20 30  me('2000-10-29 0
1710: 35 3a 35 39 3a 30 30 27 2c 27 6c 6f 63 61 6c 74  5:59:00','localt
1720: 69 6d 65 27 29 7d 5c 0a 20 20 20 20 20 20 7b 32  ime')}\.      {2
1730: 30 30 30 2d 31 30 2d 32 39 20 30 31 3a 35 39 3a  000-10-29 01:59:
1740: 30 30 7d 0a 20 20 64 61 74 65 74 65 73 74 20 36  00}.  datetest 6
1750: 2e 32 20 7b 64 61 74 65 74 69 6d 65 28 27 32 30  .2 {datetime('20
1760: 30 30 2d 31 30 2d 32 39 20 30 36 3a 30 30 3a 30  00-10-29 06:00:0
1770: 30 27 2c 27 6c 6f 63 61 6c 74 69 6d 65 27 29 7d  0','localtime')}
1780: 5c 0a 20 20 20 20 20 20 7b 32 30 30 30 2d 31 30  \.      {2000-10
1790: 2d 32 39 20 30 31 3a 30 30 3a 30 30 7d 0a 20 20  -29 01:00:00}.  
17a0: 64 61 74 65 74 65 73 74 20 36 2e 33 20 7b 64 61  datetest 6.3 {da
17b0: 74 65 74 69 6d 65 28 27 32 30 30 30 2d 30 34 2d  tetime('2000-04-
17c0: 30 32 20 30 36 3a 35 39 3a 30 30 27 2c 27 6c 6f  02 06:59:00','lo
17d0: 63 61 6c 74 69 6d 65 27 29 7d 5c 0a 20 20 20 20  caltime')}\.    
17e0: 20 20 7b 32 30 30 30 2d 30 34 2d 30 32 20 30 31    {2000-04-02 01
17f0: 3a 35 39 3a 30 30 7d 0a 20 20 64 61 74 65 74 65  :59:00}.  datete
1800: 73 74 20 36 2e 34 20 7b 64 61 74 65 74 69 6d 65  st 6.4 {datetime
1810: 28 27 32 30 30 30 2d 30 34 2d 30 32 20 30 37 3a  ('2000-04-02 07:
1820: 30 30 3a 30 30 27 2c 27 6c 6f 63 61 6c 74 69 6d  00:00','localtim
1830: 65 27 29 7d 5c 0a 20 20 20 20 20 20 7b 32 30 30  e')}\.      {200
1840: 30 2d 30 34 2d 30 32 20 30 33 3a 30 30 3a 30 30  0-04-02 03:00:00
1850: 7d 0a 20 20 64 61 74 65 74 65 73 74 20 36 2e 35  }.  datetest 6.5
1860: 20 7b 64 61 74 65 74 69 6d 65 28 27 32 30 30 30   {datetime('2000
1870: 2d 31 30 2d 32 39 20 30 31 3a 35 39 3a 30 30 27  -10-29 01:59:00'
1880: 2c 27 75 74 63 27 29 7d 20 7b 32 30 30 30 2d 31  ,'utc')} {2000-1
1890: 30 2d 32 39 20 30 35 3a 35 39 3a 30 30 7d 0a 20  0-29 05:59:00}. 
18a0: 20 64 61 74 65 74 65 73 74 20 36 2e 36 20 7b 64   datetest 6.6 {d
18b0: 61 74 65 74 69 6d 65 28 27 32 30 30 30 2d 31 30  atetime('2000-10
18c0: 2d 32 39 20 30 32 3a 30 30 3a 30 30 27 2c 27 75  -29 02:00:00','u
18d0: 74 63 27 29 7d 20 7b 32 30 30 30 2d 31 30 2d 32  tc')} {2000-10-2
18e0: 39 20 30 37 3a 30 30 3a 30 30 7d 0a 20 20 64 61  9 07:00:00}.  da
18f0: 74 65 74 65 73 74 20 36 2e 37 20 7b 64 61 74 65  tetest 6.7 {date
1900: 74 69 6d 65 28 27 32 30 30 30 2d 30 34 2d 30 32  time('2000-04-02
1910: 20 30 31 3a 35 39 3a 30 30 27 2c 27 75 74 63 27   01:59:00','utc'
1920: 29 7d 20 7b 32 30 30 30 2d 30 34 2d 30 32 20 30  )} {2000-04-02 0
1930: 36 3a 35 39 3a 30 30 7d 0a 20 20 64 61 74 65 74  6:59:00}.  datet
1940: 65 73 74 20 36 2e 38 20 7b 64 61 74 65 74 69 6d  est 6.8 {datetim
1950: 65 28 27 32 30 30 30 2d 30 34 2d 30 32 20 30 32  e('2000-04-02 02
1960: 3a 30 30 3a 30 30 27 2c 27 75 74 63 27 29 7d 20  :00:00','utc')} 
1970: 7b 32 30 30 30 2d 30 34 2d 30 32 20 30 36 3a 30  {2000-04-02 06:0
1980: 30 3a 30 30 7d 0a 0a 20 20 64 61 74 65 74 65 73  0:00}..  datetes
1990: 74 20 36 2e 31 30 20 7b 64 61 74 65 74 69 6d 65  t 6.10 {datetime
19a0: 28 27 32 30 30 30 2d 30 31 2d 30 31 20 31 32 3a  ('2000-01-01 12:
19b0: 30 30 3a 30 30 27 2c 27 6c 6f 63 61 6c 74 69 6d  00:00','localtim
19c0: 65 27 29 7d 20 5c 0a 20 20 20 20 20 20 7b 32 30  e')} \.      {20
19d0: 30 30 2d 30 31 2d 30 31 20 30 37 3a 30 30 3a 30  00-01-01 07:00:0
19e0: 30 7d 0a 20 20 64 61 74 65 74 65 73 74 20 36 2e  0}.  datetest 6.
19f0: 31 31 20 7b 64 61 74 65 74 69 6d 65 28 27 31 39  11 {datetime('19
1a00: 36 39 2d 30 31 2d 30 31 20 31 32 3a 30 30 3a 30  69-01-01 12:00:0
1a10: 30 27 2c 27 6c 6f 63 61 6c 74 69 6d 65 27 29 7d  0','localtime')}
1a20: 20 5c 0a 20 20 20 20 20 20 7b 31 39 36 39 2d 30   \.      {1969-0
1a30: 31 2d 30 31 20 30 37 3a 30 30 3a 30 30 7d 0a 20  1-01 07:00:00}. 
1a40: 20 64 61 74 65 74 65 73 74 20 36 2e 31 32 20 7b   datetest 6.12 {
1a50: 64 61 74 65 74 69 6d 65 28 27 32 30 33 39 2d 30  datetime('2039-0
1a60: 31 2d 30 31 20 31 32 3a 30 30 3a 30 30 27 2c 27  1-01 12:00:00','
1a70: 6c 6f 63 61 6c 74 69 6d 65 27 29 7d 20 5c 0a 20  localtime')} \. 
1a80: 20 20 20 20 20 7b 32 30 33 39 2d 30 31 2d 30 31       {2039-01-01
1a90: 20 30 37 3a 30 30 3a 30 30 7d 0a 20 20 64 61 74   07:00:00}.  dat
1aa0: 65 74 65 73 74 20 36 2e 31 33 20 7b 64 61 74 65  etest 6.13 {date
1ab0: 74 69 6d 65 28 27 32 30 30 30 2d 30 37 2d 30 31  time('2000-07-01
1ac0: 20 31 32 3a 30 30 3a 30 30 27 2c 27 6c 6f 63 61   12:00:00','loca
1ad0: 6c 74 69 6d 65 27 29 7d 20 5c 0a 20 20 20 20 20  ltime')} \.     
1ae0: 20 7b 32 30 30 30 2d 30 37 2d 30 31 20 30 38 3a   {2000-07-01 08:
1af0: 30 30 3a 30 30 7d 0a 20 20 64 61 74 65 74 65 73  00:00}.  datetes
1b00: 74 20 36 2e 31 34 20 7b 64 61 74 65 74 69 6d 65  t 6.14 {datetime
1b10: 28 27 31 39 36 39 2d 30 37 2d 30 31 20 31 32 3a  ('1969-07-01 12:
1b20: 30 30 3a 30 30 27 2c 27 6c 6f 63 61 6c 74 69 6d  00:00','localtim
1b30: 65 27 29 7d 20 5c 0a 20 20 20 20 20 20 7b 31 39  e')} \.      {19
1b40: 36 39 2d 30 37 2d 30 31 20 30 37 3a 30 30 3a 30  69-07-01 07:00:0
1b50: 30 7d 0a 20 20 64 61 74 65 74 65 73 74 20 36 2e  0}.  datetest 6.
1b60: 31 35 20 7b 64 61 74 65 74 69 6d 65 28 27 32 30  15 {datetime('20
1b70: 33 39 2d 30 37 2d 30 31 20 31 32 3a 30 30 3a 30  39-07-01 12:00:0
1b80: 30 27 2c 27 6c 6f 63 61 6c 74 69 6d 65 27 29 7d  0','localtime')}
1b90: 20 5c 0a 20 20 20 20 20 20 7b 32 30 33 39 2d 30   \.      {2039-0
1ba0: 37 2d 30 31 20 30 37 3a 30 30 3a 30 30 7d 0a 20  7-01 07:00:00}. 
1bb0: 20 73 65 74 20 73 71 6c 69 74 65 5f 63 75 72 72   set sqlite_curr
1bc0: 65 6e 74 5f 74 69 6d 65 20 5c 0a 20 20 20 20 20  ent_time \.     
1bd0: 5b 64 62 20 65 76 61 6c 20 7b 53 45 4c 45 43 54  [db eval {SELECT
1be0: 20 73 74 72 66 74 69 6d 65 28 27 25 73 27 2c 27   strftime('%s','
1bf0: 32 30 30 30 2d 30 37 2d 30 31 20 31 32 3a 33 34  2000-07-01 12:34
1c00: 3a 35 36 27 29 7d 5d 0a 20 20 64 61 74 65 74 65  :56')}].  datete
1c10: 73 74 20 36 2e 31 36 20 7b 64 61 74 65 74 69 6d  st 6.16 {datetim
1c20: 65 28 27 6e 6f 77 27 2c 27 6c 6f 63 61 6c 74 69  e('now','localti
1c30: 6d 65 27 29 7d 20 7b 32 30 30 30 2d 30 37 2d 30  me')} {2000-07-0
1c40: 31 20 30 38 3a 33 34 3a 35 36 7d 0a 20 20 73 65  1 08:34:56}.  se
1c50: 74 20 73 71 6c 69 74 65 5f 63 75 72 72 65 6e 74  t sqlite_current
1c60: 5f 74 69 6d 65 20 30 0a 7d 0a 0a 23 20 44 61 74  _time 0.}..# Dat
1c70: 65 2d 74 69 6d 65 20 66 75 6e 63 74 69 6f 6e 73  e-time functions
1c80: 20 74 68 61 74 20 63 6f 6e 74 61 69 6e 20 4e 55   that contain NU
1c90: 4c 4c 20 61 72 67 75 6d 65 6e 74 73 20 72 65 74  LL arguments ret
1ca0: 75 72 6e 20 61 20 4e 55 4c 4c 0a 23 20 72 65 73  urn a NULL.# res
1cb0: 75 6c 74 2e 0a 23 0a 64 61 74 65 74 65 73 74 20  ult..#.datetest 
1cc0: 37 2e 31 20 7b 64 61 74 65 74 69 6d 65 28 6e 75  7.1 {datetime(nu
1cd0: 6c 6c 29 7d 20 4e 55 4c 4c 0a 64 61 74 65 74 65  ll)} NULL.datete
1ce0: 73 74 20 37 2e 32 20 7b 64 61 74 65 74 69 6d 65  st 7.2 {datetime
1cf0: 28 27 6e 6f 77 27 2c 6e 75 6c 6c 29 7d 20 4e 55  ('now',null)} NU
1d00: 4c 4c 0a 64 61 74 65 74 65 73 74 20 37 2e 33 20  LL.datetest 7.3 
1d10: 7b 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c  {datetime('now',
1d20: 27 6c 6f 63 61 6c 74 69 6d 65 27 2c 6e 75 6c 6c  'localtime',null
1d30: 29 7d 20 4e 55 4c 4c 0a 64 61 74 65 74 65 73 74  )} NULL.datetest
1d40: 20 37 2e 34 20 7b 74 69 6d 65 28 6e 75 6c 6c 29   7.4 {time(null)
1d50: 7d 20 4e 55 4c 4c 0a 64 61 74 65 74 65 73 74 20  } NULL.datetest 
1d60: 37 2e 35 20 7b 74 69 6d 65 28 27 6e 6f 77 27 2c  7.5 {time('now',
1d70: 6e 75 6c 6c 29 7d 20 4e 55 4c 4c 0a 64 61 74 65  null)} NULL.date
1d80: 74 65 73 74 20 37 2e 36 20 7b 74 69 6d 65 28 27  test 7.6 {time('
1d90: 6e 6f 77 27 2c 27 6c 6f 63 61 6c 74 69 6d 65 27  now','localtime'
1da0: 2c 6e 75 6c 6c 29 7d 20 4e 55 4c 4c 0a 64 61 74  ,null)} NULL.dat
1db0: 65 74 65 73 74 20 37 2e 37 20 7b 64 61 74 65 28  etest 7.7 {date(
1dc0: 6e 75 6c 6c 29 7d 20 4e 55 4c 4c 0a 64 61 74 65  null)} NULL.date
1dd0: 74 65 73 74 20 37 2e 38 20 7b 64 61 74 65 28 27  test 7.8 {date('
1de0: 6e 6f 77 27 2c 6e 75 6c 6c 29 7d 20 4e 55 4c 4c  now',null)} NULL
1df0: 0a 64 61 74 65 74 65 73 74 20 37 2e 39 20 7b 64  .datetest 7.9 {d
1e00: 61 74 65 28 27 6e 6f 77 27 2c 27 6c 6f 63 61 6c  ate('now','local
1e10: 74 69 6d 65 27 2c 6e 75 6c 6c 29 7d 20 4e 55 4c  time',null)} NUL
1e20: 4c 0a 64 61 74 65 74 65 73 74 20 37 2e 31 30 20  L.datetest 7.10 
1e30: 7b 6a 75 6c 69 61 6e 64 61 79 28 6e 75 6c 6c 29  {julianday(null)
1e40: 7d 20 4e 55 4c 4c 0a 64 61 74 65 74 65 73 74 20  } NULL.datetest 
1e50: 37 2e 31 31 20 7b 6a 75 6c 69 61 6e 64 61 79 28  7.11 {julianday(
1e60: 27 6e 6f 77 27 2c 6e 75 6c 6c 29 7d 20 4e 55 4c  'now',null)} NUL
1e70: 4c 0a 64 61 74 65 74 65 73 74 20 37 2e 31 32 20  L.datetest 7.12 
1e80: 7b 6a 75 6c 69 61 6e 64 61 79 28 27 6e 6f 77 27  {julianday('now'
1e90: 2c 27 6c 6f 63 61 6c 74 69 6d 65 27 2c 6e 75 6c  ,'localtime',nul
1ea0: 6c 29 7d 20 4e 55 4c 4c 0a 64 61 74 65 74 65 73  l)} NULL.datetes
1eb0: 74 20 37 2e 31 33 20 7b 73 74 72 66 74 69 6d 65  t 7.13 {strftime
1ec0: 28 6e 75 6c 6c 2c 27 6e 6f 77 27 29 7d 20 4e 55  (null,'now')} NU
1ed0: 4c 4c 0a 64 61 74 65 74 65 73 74 20 37 2e 31 34  LL.datetest 7.14
1ee0: 20 7b 73 74 72 66 74 69 6d 65 28 27 25 73 27 2c   {strftime('%s',
1ef0: 6e 75 6c 6c 29 7d 20 4e 55 4c 4c 0a 64 61 74 65  null)} NULL.date
1f00: 74 65 73 74 20 37 2e 31 35 20 7b 73 74 72 66 74  test 7.15 {strft
1f10: 69 6d 65 28 27 25 73 27 2c 27 6e 6f 77 27 2c 6e  ime('%s','now',n
1f20: 75 6c 6c 29 7d 20 4e 55 4c 4c 0a 64 61 74 65 74  ull)} NULL.datet
1f30: 65 73 74 20 37 2e 31 36 20 7b 73 74 72 66 74 69  est 7.16 {strfti
1f40: 6d 65 28 27 25 73 27 2c 27 6e 6f 77 27 2c 27 6c  me('%s','now','l
1f50: 6f 63 61 6c 74 69 6d 65 27 2c 6e 75 6c 6c 29 7d  ocaltime',null)}
1f60: 20 4e 55 4c 4c 0a 0a 23 20 54 65 73 74 20 6d 6f   NULL..# Test mo
1f70: 64 69 66 69 65 72 73 20 77 68 65 6e 20 74 68 65  difiers when the
1f80: 20 64 61 74 65 20 62 65 67 69 6e 73 20 61 73 20   date begins as 
1f90: 61 20 6a 75 6c 69 61 6e 20 64 61 79 20 6e 75 6d  a julian day num
1fa0: 62 65 72 20 2d 20 74 6f 0a 23 20 6d 61 6b 65 20  ber - to.# make 
1fb0: 73 75 72 65 20 74 68 65 20 48 48 3a 4d 4d 3a 53  sure the HH:MM:S
1fc0: 53 20 69 73 20 70 72 65 73 65 72 76 65 64 2e 20  S is preserved. 
1fd0: 20 54 69 63 6b 65 74 20 23 35 35 31 2e 0a 23 0a   Ticket #551..#.
1fe0: 73 65 74 20 73 71 6c 69 74 65 5f 63 75 72 72 65  set sqlite_curre
1ff0: 6e 74 5f 74 69 6d 65 20 5b 64 62 20 65 76 61 6c  nt_time [db eval
2000: 20 7b 53 45 4c 45 43 54 20 73 74 72 66 74 69 6d   {SELECT strftim
2010: 65 28 27 25 73 27 2c 27 32 30 30 33 2d 31 30 2d  e('%s','2003-10-
2020: 32 32 20 31 32 3a 33 34 3a 30 30 27 29 7d 5d 0a  22 12:34:00')}].
2030: 64 61 74 65 74 65 73 74 20 38 2e 31 20 7b 64 61  datetest 8.1 {da
2040: 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c 27 77 65  tetime('now','we
2050: 65 6b 64 61 79 20 30 27 29 7d 20 7b 32 30 30 33  ekday 0')} {2003
2060: 2d 31 30 2d 32 36 20 31 32 3a 33 34 3a 30 30 7d  -10-26 12:34:00}
2070: 0a 64 61 74 65 74 65 73 74 20 38 2e 32 20 7b 64  .datetest 8.2 {d
2080: 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c 27 77  atetime('now','w
2090: 65 65 6b 64 61 79 20 31 27 29 7d 20 7b 32 30 30  eekday 1')} {200
20a0: 33 2d 31 30 2d 32 37 20 31 32 3a 33 34 3a 30 30  3-10-27 12:34:00
20b0: 7d 0a 64 61 74 65 74 65 73 74 20 38 2e 33 20 7b  }.datetest 8.3 {
20c0: 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c 27  datetime('now','
20d0: 77 65 65 6b 64 61 79 20 32 27 29 7d 20 7b 32 30  weekday 2')} {20
20e0: 30 33 2d 31 30 2d 32 38 20 31 32 3a 33 34 3a 30  03-10-28 12:34:0
20f0: 30 7d 0a 64 61 74 65 74 65 73 74 20 38 2e 34 20  0}.datetest 8.4 
2100: 7b 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c  {datetime('now',
2110: 27 77 65 65 6b 64 61 79 20 33 27 29 7d 20 7b 32  'weekday 3')} {2
2120: 30 30 33 2d 31 30 2d 32 32 20 31 32 3a 33 34 3a  003-10-22 12:34:
2130: 30 30 7d 0a 64 61 74 65 74 65 73 74 20 38 2e 35  00}.datetest 8.5
2140: 20 7b 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27   {datetime('now'
2150: 2c 27 73 74 61 72 74 20 6f 66 20 6d 6f 6e 74 68  ,'start of month
2160: 27 29 7d 20 7b 32 30 30 33 2d 31 30 2d 30 31 20  ')} {2003-10-01 
2170: 30 30 3a 30 30 3a 30 30 7d 0a 64 61 74 65 74 65  00:00:00}.datete
2180: 73 74 20 38 2e 36 20 7b 64 61 74 65 74 69 6d 65  st 8.6 {datetime
2190: 28 27 6e 6f 77 27 2c 27 73 74 61 72 74 20 6f 66  ('now','start of
21a0: 20 79 65 61 72 27 29 7d 20 7b 32 30 30 33 2d 30   year')} {2003-0
21b0: 31 2d 30 31 20 30 30 3a 30 30 3a 30 30 7d 0a 64  1-01 00:00:00}.d
21c0: 61 74 65 74 65 73 74 20 38 2e 37 20 7b 64 61 74  atetest 8.7 {dat
21d0: 65 74 69 6d 65 28 27 6e 6f 77 27 2c 27 73 74 61  etime('now','sta
21e0: 72 74 20 6f 66 20 64 61 79 27 29 7d 20 7b 32 30  rt of day')} {20
21f0: 30 33 2d 31 30 2d 32 32 20 30 30 3a 30 30 3a 30  03-10-22 00:00:0
2200: 30 7d 0a 64 61 74 65 74 65 73 74 20 38 2e 38 20  0}.datetest 8.8 
2210: 7b 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c  {datetime('now',
2220: 27 31 20 64 61 79 27 29 7d 20 7b 32 30 30 33 2d  '1 day')} {2003-
2230: 31 30 2d 32 33 20 31 32 3a 33 34 3a 30 30 7d 0a  10-23 12:34:00}.
2240: 64 61 74 65 74 65 73 74 20 38 2e 39 20 7b 64 61  datetest 8.9 {da
2250: 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c 27 2b 31  tetime('now','+1
2260: 20 64 61 79 27 29 7d 20 7b 32 30 30 33 2d 31 30   day')} {2003-10
2270: 2d 32 33 20 31 32 3a 33 34 3a 30 30 7d 0a 64 61  -23 12:34:00}.da
2280: 74 65 74 65 73 74 20 38 2e 31 30 20 7b 64 61 74  tetest 8.10 {dat
2290: 65 74 69 6d 65 28 27 6e 6f 77 27 2c 27 2b 31 2e  etime('now','+1.
22a0: 32 35 20 64 61 79 27 29 7d 20 7b 32 30 30 33 2d  25 day')} {2003-
22b0: 31 30 2d 32 33 20 31 38 3a 33 34 3a 30 30 7d 0a  10-23 18:34:00}.
22c0: 64 61 74 65 74 65 73 74 20 38 2e 31 31 20 7b 64  datetest 8.11 {d
22d0: 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c 27 2d  atetime('now','-
22e0: 31 2e 30 20 64 61 79 27 29 7d 20 7b 32 30 30 33  1.0 day')} {2003
22f0: 2d 31 30 2d 32 31 20 31 32 3a 33 34 3a 30 30 7d  -10-21 12:34:00}
2300: 0a 64 61 74 65 74 65 73 74 20 38 2e 31 32 20 7b  .datetest 8.12 {
2310: 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c 27  datetime('now','
2320: 31 20 6d 6f 6e 74 68 27 29 7d 20 7b 32 30 30 33  1 month')} {2003
2330: 2d 31 31 2d 32 32 20 31 32 3a 33 34 3a 30 30 7d  -11-22 12:34:00}
2340: 0a 64 61 74 65 74 65 73 74 20 38 2e 31 33 20 7b  .datetest 8.13 {
2350: 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c 27  datetime('now','
2360: 31 31 20 6d 6f 6e 74 68 27 29 7d 20 7b 32 30 30  11 month')} {200
2370: 34 2d 30 39 2d 32 32 20 31 32 3a 33 34 3a 30 30  4-09-22 12:34:00
2380: 7d 0a 64 61 74 65 74 65 73 74 20 38 2e 31 34 20  }.datetest 8.14 
2390: 7b 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c  {datetime('now',
23a0: 27 2d 31 33 20 6d 6f 6e 74 68 27 29 7d 20 7b 32  '-13 month')} {2
23b0: 30 30 32 2d 30 39 2d 32 32 20 31 32 3a 33 34 3a  002-09-22 12:34:
23c0: 30 30 7d 0a 64 61 74 65 74 65 73 74 20 38 2e 31  00}.datetest 8.1
23d0: 35 20 7b 64 61 74 65 74 69 6d 65 28 27 6e 6f 77  5 {datetime('now
23e0: 27 2c 27 31 2e 35 20 6d 6f 6e 74 68 73 27 29 7d  ','1.5 months')}
23f0: 20 7b 32 30 30 33 2d 31 32 2d 30 37 20 31 32 3a   {2003-12-07 12:
2400: 33 34 3a 30 30 7d 0a 64 61 74 65 74 65 73 74 20  34:00}.datetest 
2410: 38 2e 31 36 20 7b 64 61 74 65 74 69 6d 65 28 27  8.16 {datetime('
2420: 6e 6f 77 27 2c 27 2d 35 20 79 65 61 72 73 27 29  now','-5 years')
2430: 7d 20 7b 31 39 39 38 2d 31 30 2d 32 32 20 31 32  } {1998-10-22 12
2440: 3a 33 34 3a 30 30 7d 0a 64 61 74 65 74 65 73 74  :34:00}.datetest
2450: 20 38 2e 31 37 20 7b 64 61 74 65 74 69 6d 65 28   8.17 {datetime(
2460: 27 6e 6f 77 27 2c 27 2b 31 30 2e 35 20 6d 69 6e  'now','+10.5 min
2470: 75 74 65 73 27 29 7d 20 7b 32 30 30 33 2d 31 30  utes')} {2003-10
2480: 2d 32 32 20 31 32 3a 34 34 3a 33 30 7d 0a 64 61  -22 12:44:30}.da
2490: 74 65 74 65 73 74 20 38 2e 31 38 20 7b 64 61 74  tetest 8.18 {dat
24a0: 65 74 69 6d 65 28 27 6e 6f 77 27 2c 27 2d 31 2e  etime('now','-1.
24b0: 32 35 20 68 6f 75 72 73 27 29 7d 20 7b 32 30 30  25 hours')} {200
24c0: 33 2d 31 30 2d 32 32 20 31 31 3a 31 39 3a 30 30  3-10-22 11:19:00
24d0: 7d 0a 64 61 74 65 74 65 73 74 20 38 2e 31 39 20  }.datetest 8.19 
24e0: 7b 64 61 74 65 74 69 6d 65 28 27 6e 6f 77 27 2c  {datetime('now',
24f0: 27 31 31 2e 32 35 20 73 65 63 6f 6e 64 73 27 29  '11.25 seconds')
2500: 7d 20 7b 32 30 30 33 2d 31 30 2d 32 32 20 31 32  } {2003-10-22 12
2510: 3a 33 34 3a 31 31 7d 0a 73 65 74 20 73 71 6c 69  :34:11}.set sqli
2520: 74 65 5f 63 75 72 72 65 6e 74 5f 74 69 6d 65 20  te_current_time 
2530: 30 0a 0a 0a 66 69 6e 69 73 68 5f 74 65 73 74 0a  0...finish_test.