[Midnightbsd-cvs] mports: Chroot.pm: Add log dir.

[ctriv at midnightbsd.org]

Log Message:
-----------
Add log dir.
Add mark_$foo methods.

Modified Files:
--------------
    mports/Tools/lib/Magus:
        Chroot.pm (r1.3 -> r1.4)

-------------- next part --------------
Index: Chroot.pm
===================================================================
RCS file: /home/cvs/mports/Tools/lib/Magus/Chroot.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -LTools/lib/Magus/Chroot.pm -LTools/lib/Magus/Chroot.pm -u -r1.3 -r1.4
--- Tools/lib/Magus/Chroot.pm
+++ Tools/lib/Magus/Chroot.pm
@@ -76,6 +76,7 @@
     packages  => '/magus/packages',
     distfiles => '/magus/distfiles',
     workdir   => '/magus/work',    
+    logs      => '/magus/logs',
     loopbacks => [qw(/usr/mports /usr/src)],
     %args,
   }, $class;
@@ -117,7 +118,7 @@
   $self->_mtree('BSD.var.dist', '/var');
   $self->_mtree('BSD.usr.dist', '/usr');
   
-  for (qw(workdir x11base packages distfiles)) {  
+  for (qw(workdir x11base packages distfiles logs)) {  
     $self->_mkdir($self->{$_});
   }
   
@@ -135,7 +136,7 @@
 sub _clean {
   my ($self) = @_;
   
-  for (qw(workdir x11base localbase packages)) {
+  for (qw(workdir x11base localbase packages logs)) {
     rmtree("$self->{root}/$self->{$_}");
     $self->_mkdir($self->{$_});
   }
@@ -234,6 +235,38 @@
   rmtree($self->root) || die "Couldn't rmtree $self->{root}\n";
 }
 
+=head2 $chroot->mark_dirty
+
+Mark that the chroot needs cleanup before reuse.
+
+=cut
+
+sub mark_dirty {
+  my ($self) = @_;
+  
+  unlink("$self->{root}/.clean");
+  unlink("$self->{root}/.dead");
+  $self->_touchfile("/.dirty");
+}
+
+=head2 $chroot->mark_dead
+
+Make a chroot dead.  It cannot be reused.
+
+=cut
+
+sub mark_dead {
+  my ($self) = @_;
+  
+  unlink("$self->{root}/.clean");
+  unlink("$self->{root}/.dirty");
+  $self->_touchfile("/.dead");
+}
+
+
+
+  
+
 1;
 __END__