1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
|
<?php
/**
* prefs.php
*
* Copyright (c) 1999-2002 The SquirrelMail Project Team
* Licensed under the GNU GPL. For full terms see the file COPYING.
*
* This contains functions for manipulating user preferences
*
* $Id: prefs.php,v 1.54 2002/04/26 18:35:00 simond Exp $
*/
global $prefs_are_cached, $prefs_cache;
if ( !session_is_registered('prefs_are_cached') ||
!isset( $prefs_cache) ||
!is_array( $prefs_cache) ||
substr( phpversion(), 0, 3 ) == '4.1' ||
substr( phpversion(), 0, 3 ) == '4.2' ) {
$prefs_are_cached = false;
$prefs_cache = array();
}
if (isset($prefs_dsn) && !empty($prefs_dsn)) {
require_once('../functions/db_prefs.php');
} else {
require_once('../functions/file_prefs.php');
}
/* Hashing functions */
function getHashedFile($username, $dir, $datafile, $hash_search = true) {
global $dir_hash_level;
/* 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. */
$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);
}
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)) {
if (!@mkdir($real_hash_dir, 0770)) {
echo sprintf(_("Error creating directory %s."), $real_hash_dir) . '<br>' .
_("Could not create hashed directory structure!") . "<br>\n" .
_("Please contact your system administrator and report this error.") . "<br>\n";
exit;
}
}
}
/* And return that directory. */
return ($real_hash_dir);
}
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);
}
?>
|
