Index: trunk/Nebulous/t/09_server_stat_object.t
===================================================================
--- trunk/Nebulous/t/09_server_stat_object.t	(revision 2924)
+++ trunk/Nebulous/t/09_server_stat_object.t	(revision 3016)
@@ -3,10 +3,10 @@
 # Copryight (C) 2004-2005  Joshua Hoblitt
 #
-# $Id: 09_server_stat_object.t,v 1.3 2005-01-03 23:55:29 jhoblitt Exp $
+# $Id: 09_server_stat_object.t,v 1.4 2005-01-15 04:02:12 jhoblitt Exp $
 
 use strict;
 use warnings FATAL => qw( all );
 
-use Test::More tests => 12;
+use Test::More tests => 13;
 
 use lib qw( ./t ./lib );
@@ -31,5 +31,5 @@
     my $info = $idata->stat_object( "foo" );
 
-    is( scalar @$info, 7, "number of columns" );
+    is( scalar @$info, 8, "number of columns" );
 }
 
@@ -41,5 +41,5 @@
     my $info = $idata->stat_object( "foo" );
 
-    is( scalar @$info, 7,                       "number of columns" );
+    is( scalar @$info, 8,                       "number of columns" );
     is( @$info[0], 1,                           "so_id" );
     is( @$info[1], "foo",                       "ext_id" );
@@ -49,4 +49,5 @@
     is( @$info[5], undef,                       "write lock" );
     like( @$info[6], qr/....-..-.. ..:..:../,   "epoch" );
+    like( @$info[6], qr/....-..-.. ..:..:../,   "mtime" );
 }
 
Index: trunk/Nebulous/t/23_client_stat.t
===================================================================
--- trunk/Nebulous/t/23_client_stat.t	(revision 2924)
+++ trunk/Nebulous/t/23_client_stat.t	(revision 3016)
@@ -3,5 +3,5 @@
 # Copryight (C) 2004-2005  Joshua Hoblitt
 #
-# $Id: 23_client_stat.t,v 1.1 2005-01-04 22:02:43 jhoblitt Exp $
+# $Id: 23_client_stat.t,v 1.2 2005-01-15 04:02:12 jhoblitt Exp $
 
 use strict;
@@ -10,5 +10,5 @@
 use Apache::Test qw( -withtestmore );
 
-plan tests => 12;
+plan tests => 13;
 
 use lib qw( ./t ./lib );
@@ -30,5 +30,5 @@
     my $info = $idata->stat( "foo" );
 
-    is( scalar @$info, 7, "number of columns" );
+    is( scalar @$info, 8, "number of columns" );
 }
 
@@ -43,5 +43,5 @@
     my $info = $idata->stat( "foo" );
 
-    is( scalar @$info, 7,                       "number of columns" );
+    is( scalar @$info, 8,                       "number of columns" );
     is( @$info[0], 1,                           "so_id" );
     is( @$info[1], "foo",                       "ext_id" );
@@ -51,4 +51,5 @@
     is( @$info[5], undef,                       "write lock" );
     like( @$info[6], qr/....-..-.. ..:..:../,   "epoch" );
+    like( @$info[6], qr/....-..-.. ..:..:../,   "mtime" );
 }
 
Index: trunk/Nebulous/t/Test/Nebulous.pm
===================================================================
--- trunk/Nebulous/t/Test/Nebulous.pm	(revision 2924)
+++ trunk/Nebulous/t/Test/Nebulous.pm	(revision 3016)
@@ -1,5 +1,5 @@
 # Copyright (C) 2004  Joshua Hoblitt
 #
-# $Id: Nebulous.pm,v 1.1.1.1 2004-12-22 02:16:23 jhoblitt Exp $
+# $Id: Nebulous.pm,v 1.2 2005-01-15 04:02:12 jhoblitt Exp $
 
 package Test::IData;
@@ -68,5 +68,6 @@
     read_lock TINYINT DEFAULT 0 NOT NULL,
     write_lock ENUM( 'write' ),
-    epoch TIMESTAMP NOT NULL,
+    epoch TIMESTAMP DEFAULT CURRENT_TIMESTAMP,
+    mtime TIMESTAMP,
     PRIMARY KEY(so_id),
     KEY(ext_id(64)),
@@ -78,9 +79,9 @@
     ins_id BIGINT NOT NULL AUTO_INCREMENT,
     so_id BIGINT NOT NULL,
-    uri VARCHAR(255) BINARY NOT NULL UNIQUE,
-    sha1sum CHAR(40),
+    uri VARCHAR(255) BINARY NOT NULL,
+    sha1sum CHAR(40) ASCII,
     assigned_location BOOL,
-    epoch TIMESTAMP NOT NULL,
-    atime TIMESTAMP NOT NULL,
+    epoch TIMESTAMP DEFAULT CURRENT_TIMESTAMP,
+    mtime TIMESTAMP,
     PRIMARY KEY(ins_id),
     KEY(so_id),