X-Git-Url: https://vcs.fsf.org/?p=squirrelmail.git;a=blobdiff_plain;f=functions%2Fprefs.php;h=5b618d5623d6d57fb933e4b3376b7a03756ddeda;hp=1d5fb68fb67cec349c5010213daf20b11082957e;hb=f8cde39329c8d67936dd75d40209400fe82ddaab;hpb=71257f8b1bbf95b87735f654487efbad21b138a0 diff --git a/functions/prefs.php b/functions/prefs.php index 1d5fb68f..5b618d56 100644 --- a/functions/prefs.php +++ b/functions/prefs.php @@ -1,153 +1,129 @@ 0) { - $Key = substr($pref, 0, $equalsAt); - $Value = substr($pref, $equalsAt + 1); - if (substr($Key, 0, 9) == 'highlight') { - $Key = 'highlight' . $highlight_num; - $highlight_num ++; - } - - if ($Value != '') { - $prefs_cache[$Key] = $Value; - } - } - } - fclose($file); - - session_unregister('prefs_cache'); - session_register('prefs_cache'); - - $prefs_are_cached = true; - session_unregister('prefs_are_cached'); - session_register('prefs_are_cached'); - } - - - /** returns the value for $string **/ - function getPref($data_dir, $username, $string, $default = '') { - global $prefs_cache; - - cachePrefValues($data_dir, $username); - - if (isset($prefs_cache[$string])) - return $prefs_cache[$string]; - else - return $default; - } - - - function savePrefValues($data_dir, $username) { - global $prefs_cache; - - $file = fopen($data_dir . $username . '.pref', 'w'); - foreach ($prefs_cache as $Key => $Value) { - if (isset($Value)) { - fwrite($file, $Key . '=' . $Value . "\n"); - } - } - fclose($file); - } - - - function removePref($data_dir, $username, $string) { - global $prefs_cache; - - cachePrefValues($data_dir, $username); - - if (isset($prefs_cache[$string])) { - unset($prefs_cache[$string]); - } - - savePrefValues($data_dir, $username); - } - - /** sets the pref, $string, to $set_to **/ - function setPref($data_dir, $username, $string, $set_to) { - global $prefs_cache; - - cachePrefValues($data_dir, $username); - if (isset($prefs_cache[$string]) && $prefs_cache[$string] == $set_to) - return; - if ($set_to === '') { - removePref($data_dir, $username, $string); - return; - } - $prefs_cache[$string] = $set_to; - savePrefValues($data_dir, $username); - } - - - /** This checks if there is a pref file, if there isn't, it will - create it. **/ - function checkForPrefs($data_dir, $username) { - $filename = $data_dir . $username . '.pref'; - if (!file_exists($filename)) { - if (!copy($data_dir . 'default_pref', $filename)) { - echo _("Error opening ") . $filename; - exit; - } - } - } - - - /** Writes the Signature **/ - function setSig($data_dir, $username, $string) { - $file = fopen($data_dir . $username . '.sig', 'w'); - fwrite($file, $string); - fclose($file); - } - - - - /** Gets the signature **/ - function getSig($data_dir, $username) { - $filename = $data_dir . $username . '.sig'; - $sig = ''; - if (file_exists($filename)) { - $file = fopen($filename, 'r'); - while (!feof($file)) { - $sig .= fgets($file, 1024); - } - fclose($file); - } - return $sig; - } -?> +/** + * prefs.php + * + * This contains functions for filebased user prefs locations + * + * @copyright © 1999-2007 The SquirrelMail Project Team + * @license http://opensource.org/licenses/gpl-license.php GNU Public License + * @version $Id$ + * @package squirrelmail + * @subpackage prefs + */ + + + +/* Hashing functions */ + +/** + * Given a username and datafilename, this will return the path to the + * hashed location of that datafile. + * + * @param string username the username of the current user + * @param string dir the SquirrelMail datadir + * @param string datafile the name of the file to open + * @param bool hash_seach default true + * @return string the hashed location of datafile + * @since 1.2.0 + */ +function getHashedFile($username, $dir, $datafile, $hash_search = true) { + + /* Remove trailing slash from $dir if found */ + if (substr($dir, -1) == '/') { + $dir = substr($dir, 0, strlen($dir) - 1); + } + + /* Compute the hash for this user and extract the hash directories. */ + $hash_dirs = computeHashDirs($username); + + /* First, get and make sure the full hash directory exists. */ + $real_hash_dir = getHashedDir($username, $dir, $hash_dirs); + + /* Set the value of our real data file, after we've removed unwanted characters. */ + $datafile = str_replace('/', '_', $datafile); + $result = "$real_hash_dir/$datafile"; + + /* Check for this file in the real hash directory. */ + if ($hash_search && !@file_exists($result)) { + /* First check the base directory, the most common location. */ + if (@file_exists("$dir/$datafile")) { + rename("$dir/$datafile", $result); + + /* Then check the full range of possible hash directories. */ + } else { + $check_hash_dir = $dir; + for ($h = 0; $h < 4; ++$h) { + $check_hash_dir .= '/' . $hash_dirs[$h]; + if (@is_readable("$check_hash_dir/$datafile")) { + rename("$check_hash_dir/$datafile", $result); + break; + } + } + } + } + + /* Return the full hashed datafile path. */ + return ($result); +} + +/** + * Helper function for getHashedFile, given a username returns the hashed + * dir for that username. + * + * @param string username the username of the current user + * @param string dir the SquirrelMail datadir + * @param string hash_dirs default '' + * @return the path to the hash dir for username + * @since 1.2.0 + */ +function getHashedDir($username, $dir, $hash_dirs = '') { + global $dir_hash_level; + + /* Remove trailing slash from $dir if found */ + if (substr($dir, -1) == '/') { + $dir = substr($dir, 0, strlen($dir) - 1); + } + + /* If necessary, populate the hash dir variable. */ + if ($hash_dirs == '') { + $hash_dirs = computeHashDirs($username); + } + + /* Make sure the full hash directory exists. */ + $real_hash_dir = $dir; + for ($h = 0; $h < $dir_hash_level; ++$h) { + $real_hash_dir .= '/' . $hash_dirs[$h]; + if (!@is_dir($real_hash_dir)) { +//FIXME: When safe_mode is turned on, the error suppression below makes debugging safe_mode UID/GID restrictions tricky... for now, I will add a check in configtest + if (!@mkdir($real_hash_dir, 0770)) { + error_box ( sprintf(_("Error creating directory %s."), $real_hash_dir) . "\n" . + _("Could not create hashed directory structure!") . "\n" . + _("Please contact your system administrator and report this error.") ); + exit; + } + } + } + + /* And return that directory. */ + return ($real_hash_dir); +} + +/** + * Helper function for getHashDir which does the actual hash calculation. + * + * @param string username the username to calculate the hash dir for + * @return array a list of hash dirs for this username + * @since 1.2.0 + */ +function computeHashDirs($username) { + /* Compute the hash for this user and extract the hash directories. */ + $hash = base_convert(crc32($username), 10, 16); + $hash_dirs = array(); + for ($h = 0; $h < 4; ++ $h) { + $hash_dirs[] = substr($hash, $h, 1); + } + + /* Return our array of hash directories. */ + return ($hash_dirs); +}