3
* $Id: carp.cc,v 1.27 2008/01/14 12:13:49 hno Exp $
5
* DEBUG: section 39 Peer user hash based selection
6
* AUTHOR: Henrik Nordstrom
9
* SQUID Web Proxy Cache http://www.squid-cache.org/
10
* ----------------------------------------------------------
12
* Squid is the result of efforts by numerous individuals from
13
* the Internet community; see the CONTRIBUTORS file for full
14
* details. Many organizations have provided support for Squid's
15
* development; see the SPONSORS file for full details. Squid is
16
* Copyrighted (C) 2001 by the Regents of the University of
17
* California; see the COPYRIGHT file for full details. Squid
18
* incorporates software developed and/or copyrighted by other
19
* sources; see the CREDITS file for full details.
21
* This program is free software; you can redistribute it and/or modify
22
* it under the terms of the GNU General Public License as published by
23
* the Free Software Foundation; either version 2 of the License, or
24
* (at your option) any later version.
26
* This program is distributed in the hope that it will be useful,
27
* but WITHOUT ANY WARRANTY; without even the implied warranty of
28
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
29
* GNU General Public License for more details.
31
* You should have received a copy of the GNU General Public License
32
* along with this program; if not, write to the Free Software
33
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
38
#include "CacheManager.h"
40
#include "HttpRequest.h"
41
#include "AuthUserRequest.h"
43
#define ROTATE_LEFT(x, n) (((x) << (n)) | ((x) >> (32-(n))))
45
static int n_userhash_peers = 0;
46
static peer **userhash_peers = NULL;
47
static OBJH peerUserHashCachemgr;
50
peerSortWeight(const void *a, const void *b)
52
const peer *const *p1 = (const peer *const *)a;
53
const peer *const *p2 = (const peer *const *)b;
54
return (*p1)->weight - (*p2)->weight;
58
peerUserHashInit(void)
63
double P_last, X_last, Xn;
69
for (k = 0; k < n_userhash_peers; k++) {
70
cbdataReferenceDone(userhash_peers[k]);
73
safe_free(userhash_peers);
75
/* find out which peers we have */
77
for (p = Config.peers; p; p = p->next) {
78
if (!p->options.userhash)
81
assert(p->type == PEER_PARENT);
91
if (n_userhash_peers == 0)
94
userhash_peers = (peer **)xcalloc(n_userhash_peers, sizeof(*userhash_peers));
96
/* Build a list of the found peers and calculate hashes and load factors */
97
for (P = userhash_peers, p = Config.peers; p; p = p->next) {
98
if (!p->options.userhash)
104
/* calculate this peers hash */
105
p->userhash.hash = 0;
107
for (t = p->name; *t != 0; t++)
108
p->userhash.hash += ROTATE_LEFT(p->userhash.hash, 19) + (unsigned int) *t;
110
p->userhash.hash += p->userhash.hash * 0x62531965;
112
p->userhash.hash = ROTATE_LEFT(p->userhash.hash, 21);
114
/* and load factor */
115
p->userhash.load_factor = ((double) p->weight) / (double) W;
117
if (floor(p->userhash.load_factor * 1000.0) == 0.0)
118
p->userhash.load_factor = 0.0;
120
/* add it to our list of peers */
121
*P++ = cbdataReference(p);
124
/* Sort our list on weight */
125
qsort(userhash_peers, n_userhash_peers, sizeof(*userhash_peers), peerSortWeight);
127
/* Calculate the load factor multipliers X_k
129
* X_1 = pow ((K*p_1), (1/K))
130
* X_k = ([K-k+1] * [P_k - P_{k-1}])/(X_1 * X_2 * ... * X_{k-1})
131
* X_k += pow ((X_{k-1}, {K-k+1})
132
* X_k = pow (X_k, {1/(K-k+1)})
133
* simplified to have X_1 part of the loop
135
K = n_userhash_peers;
137
P_last = 0.0; /* Empty P_0 */
139
Xn = 1.0; /* Empty starting point of X_1 * X_2 * ... * X_{x-1} */
141
X_last = 0.0; /* Empty X_0, nullifies the first pow statement */
143
for (k = 1; k <= K; k++) {
144
double Kk1 = (double) (K - k + 1);
145
p = userhash_peers[k - 1];
146
p->userhash.load_multiplier = (Kk1 * (p->userhash.load_factor - P_last)) / Xn;
147
p->userhash.load_multiplier += pow(X_last, Kk1);
148
p->userhash.load_multiplier = pow(p->userhash.load_multiplier, 1.0 / Kk1);
149
Xn *= p->userhash.load_multiplier;
150
X_last = p->userhash.load_multiplier;
151
P_last = p->userhash.load_factor;
156
peerUserHashRegisterWithCacheManager(CacheManager & manager)
158
manager.registerAction("userhash", "peer userhash information", peerUserHashCachemgr, 0, 1);
162
peerUserHashSelectParent(HttpRequest * request)
168
unsigned int user_hash = 0;
169
unsigned int combined_hash;
171
double high_score = 0;
172
const char *key = NULL;
174
if (n_userhash_peers == 0)
177
if (request->auth_user_request)
178
key = request->auth_user_request->username();
183
/* calculate hash key */
184
debugs(39, 2, "peerUserHashSelectParent: Calculating hash for " << key);
186
for (c = key; *c != 0; c++)
187
user_hash += ROTATE_LEFT(user_hash, 19) + *c;
190
for (k = 0; k < n_userhash_peers; k++) {
191
tp = userhash_peers[k];
192
combined_hash = (user_hash ^ tp->userhash.hash);
193
combined_hash += combined_hash * 0x62531965;
194
combined_hash = ROTATE_LEFT(combined_hash, 21);
195
score = combined_hash * tp->userhash.load_multiplier;
196
debugs(39, 3, "peerUserHashSelectParent: " << tp->name << " combined_hash " << combined_hash <<
197
" score " << std::setprecision(0) << score);
199
if ((score > high_score) && peerHTTPOkay(tp, request)) {
206
debugs(39, 2, "peerUserHashSelectParent: selected " << p->name);
212
peerUserHashCachemgr(StoreEntry * sentry)
216
storeAppendPrintf(sentry, "%24s %10s %10s %10s %10s\n",
223
for (p = Config.peers; p; p = p->next)
224
sumfetches += p->stats.fetches;
226
for (p = Config.peers; p; p = p->next) {
227
storeAppendPrintf(sentry, "%24s %10x %10f %10f %10f\n",
228
p->name, p->userhash.hash,
229
p->userhash.load_multiplier,
230
p->userhash.load_factor,
231
sumfetches ? (double) p->stats.fetches / sumfetches : -1.0);