Index: user.module
===================================================================
RCS file: /cvs/drupal/drupal/modules/user.module,v
retrieving revision 1.634
diff -u -r1.634 user.module
--- user.module	7 Jul 2006 18:49:13 -0000	1.634
+++ user.module	9 Jul 2006 05:37:09 -0000
@@ -1,6 +1,8 @@
 <?php
 // $Id: user.module,v 1.634 2006/07/07 18:49:13 dries Exp $
 
+define('USER_ANON_SESSION_EXPIRE', 7*86400);
+
 /**
  * @file
  * Enables the user registration and login system.
@@ -1569,6 +1571,11 @@
   $output .= drupal_get_form('check_host', $form, 'user_admin_access_check');
   unset($form); // prevent endless loop?
 
+  
+  $interval = drupal_map_assoc(array(86400, 172800, 259200, 604800, 1209600, 2419200, 4838400, 9676800), 'format_interval');
+  $form['session'] = array('#type' => 'fieldset', '#title' => t('Sessions'));
+  $form['session']['test'] = array('#type' => 'select', '#options' => $interval, '#default_value' => variable_get('anon_session_expire', USER_ANON_SESSION_EXPIRE), '#description' => t('Expires old anonymous sessions.'));
+
   return $output;
 }
 
@@ -2153,3 +2160,11 @@
   print drupal_to_js($matches);
   exit();
 }
+
+function user_cron() {
+  if (time() - variable_get('cron_last', 0) > 86400) {
+    // Once a day, expire old user sessions
+    db_query('DELETE FROM {sessions} WHERE uid = 0 AND timestamp < %d',
+      time() - variable_get('anon_session_expire', USER_ANON_SESSION_EXPIRE));
+  }
+}