Scheduled Maintenance Window

 
    log local0. "Clock output: [clock format [clock seconds] -format {%A %k %M}], \$k: $k"  
    set k [split [clock format [clock seconds] -format {%A %k %M}] " "] 
    log local0. "\$k split output llength: [llength $k]" 
 

 
    log local0. "Clock output: [clock format [clock seconds] -format {%A %H %M}], \$H: $H"  
    set H [split [clock format [clock seconds] -format {%A %H %M}] " "] 
    log local0. "\$H split output llength: [llength $H]" 
 

 
     Get time in seconds, formatted as day of week (%A) hour (%k) minute (%M) 
     Use scan to save output as $cur_day $cur_hour $cur_minute 
    scan [clock format [clock seconds] -format {%A %k %M}] {%s %d %d} cur_day cur_hour cur_minute 
    set cur_time ${cur_hour}${cur_minute} 
 

 
 when HTTP_REQUEST { 
  
     Change the following to set schedule 
    set maintenance_start_time "0200"; 
    set maintenance_end_time "0600"; 
    set maintenance_day "Saturday"; 
  
     Get time in seconds, formatted as day of week (%A) hour (%k) minute (%M) 
     Use scan to save output as $cur_day $cur_hour $cur_minute 
    scan [clock format [clock seconds] -format {%A %k %M}] {%s %d %d} cur_day cur_hour cur_minute 
    set cur_time ${cur_hour}${cur_minute} 
  
    log local0. "\$cur_day: $cur_day, \$cur_hour: $cur_hour, \$cur_minute: $cur_minute, \$cur_time: $cur_time" 
  
    if { ($cur_day eq $maintenance_day) && 
       ($cur_time >= $maintenance_start_time) && 
       ($cur_time <= $maintenance_end_time) } { 
       HTTP::respond "Maintenance message" 
       log local0. "Maintenance message" 
    } 
 } 
 

Site will be available again at 6:15am.

Hi Jonathan,

when RULE_INIT {

    Start of maintenance window in YYYY-mm-dd HH:MM format
   set static::start_date "2011-05-29 18:45"

    End of maintenance window in YYYY-mm-dd HH:MM format
   set static::end_date "2011-05-29 18:50"

    Convert start/end times to seconds from the epoch for easier date comparisons
   set static::start [clock scan $static::start_date]
   set static::end [clock scan $static::end_date]
}
when CLIENT_ACCEPTED {

    Save the current time in seconds since the epoch
   set now [clock seconds]

    Use the maintenance pool if we're in the maintenance window
   if {$now > $static::start and $now < $static::end}{
      pool MAINT-POOL
   }
}

If you're on v9, you'd want to change the static variables to global variables by removing "static" from the variable references. This assumes you don't need CMP compatibility. If you do, then you could move the variable declarations from RULE_INIT to CLIENT_ACCEPTED or add them to the session table using the session command.