| 1 |
sysadm |
1.1 |
/*
|
| 2 |
|
|
* Copyright (C) 1999 Rob Crittenden (rcrit@greyoak.com)
|
| 3 |
|
|
* Copyright (C) 1999,2000 Ross Combs (rocombs@cs.nmsu.edu)
|
| 4 |
|
|
* Copyright (C) 1999,2000 D.Moreaux (vapula@linuxbe.org)
|
| 5 |
|
|
*
|
| 6 |
|
|
* This program is free software; you can redistribute it and/or
|
| 7 |
|
|
* modify it under the terms of the GNU General Public License
|
| 8 |
|
|
* as published by the Free Software Foundation; either version 2
|
| 9 |
|
|
* of the License, or (at your option) any later version.
|
| 10 |
|
|
*
|
| 11 |
|
|
* This program is distributed in the hope that it will be useful,
|
| 12 |
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
| 13 |
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
| 14 |
|
|
* GNU General Public License for more details.
|
| 15 |
|
|
*
|
| 16 |
|
|
* You should have received a copy of the GNU General Public License
|
| 17 |
|
|
* along with this program; if not, write to the Free Software
|
| 18 |
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
| 19 |
|
|
*/
|
| 20 |
|
|
#include "common/setup_before.h"
|
| 21 |
|
|
#include <math.h>
|
| 22 |
|
|
#ifdef HAVE_STRING_H
|
| 23 |
|
|
# include <string.h>
|
| 24 |
|
|
#else
|
| 25 |
|
|
# ifdef HAVE_STRINGS_H
|
| 26 |
|
|
# include <strings.h>
|
| 27 |
|
|
# endif
|
| 28 |
|
|
#endif
|
| 29 |
|
|
#include "account.h"
|
| 30 |
|
|
#include "account_wrap.h"
|
| 31 |
|
|
#include "common/eventlog.h"
|
| 32 |
|
|
#include "game.h"
|
| 33 |
|
|
#include "common/tag.h"
|
| 34 |
|
|
#include "ladder.h"
|
| 35 |
|
|
#include "ladder_calc.h"
|
| 36 |
|
|
#include "common/xalloc.h"
|
| 37 |
|
|
#include "common/setup_after.h"
|
| 38 |
|
|
|
| 39 |
|
|
|
| 40 |
|
|
static double probability(unsigned int a, unsigned int b) ;
|
| 41 |
|
|
static int coefficient(t_account * account, t_clienttag clienttag, t_ladder_id id);
|
| 42 |
|
|
|
| 43 |
|
|
static double two_player(unsigned int *rating);
|
| 44 |
|
|
|
| 45 |
|
|
static double three_player(unsigned int *rating);
|
| 46 |
|
|
|
| 47 |
|
|
static double four_player(unsigned int *rating);
|
| 48 |
|
|
|
| 49 |
|
|
static double five_player(unsigned int *rating);
|
| 50 |
|
|
static double five_f1(int a, int b, int c, int d, int e) ;
|
| 51 |
|
|
static double five_f2(int a, int b, int c) ;
|
| 52 |
|
|
|
| 53 |
|
|
static double six_player(unsigned int *rating);
|
| 54 |
|
|
static double six_f1(int a, int b, int c, int d, int e, int f) ;
|
| 55 |
|
|
static double six_f2(int a, int b, int c, int d, int e, int f) ;
|
| 56 |
|
|
static double six_f3(int a, int b, int c, int d) ;
|
| 57 |
|
|
|
| 58 |
|
|
static double seven_player(unsigned int *rating);
|
| 59 |
|
|
static double seven_f1(int a, int b, int c, int d, int e, int f, int g) ;
|
| 60 |
|
|
static double seven_f2(int a, int b, int c, int d, int e, int f, int g) ;
|
| 61 |
|
|
|
| 62 |
|
|
static double eight_player(unsigned int *rating);
|
| 63 |
|
|
static double eight_f1(int a, int b, int c, int d, int e, int f, int g) ;
|
| 64 |
|
|
static double eight_f2(int a, int b, int c, int d, int e, int f, int g) ;
|
| 65 |
|
|
static double eight_f3(int a, int b, int c, int d, int e) ;
|
| 66 |
|
|
|
| 67 |
|
|
/*
|
| 68 |
|
|
* Compute probability of winning using the Elo system
|
| 69 |
|
|
*
|
| 70 |
|
|
* The formula is:
|
| 71 |
|
|
*
|
| 72 |
|
|
* D = rating(player a) - rating(player b)
|
| 73 |
|
|
*
|
| 74 |
|
|
* 1
|
| 75 |
|
|
* Pwin(D) = ------------------
|
| 76 |
|
|
* -(D / 400)
|
| 77 |
|
|
* 1 + 10
|
| 78 |
|
|
*/
|
| 79 |
|
|
static double probability(unsigned int a, unsigned int b)
|
| 80 |
|
|
{
|
| 81 |
|
|
double i, j;
|
| 82 |
|
|
|
| 83 |
|
|
i = (((double)a) - ((double)b)) / 400.0;
|
| 84 |
|
|
|
| 85 |
|
|
j = pow(10.0,-i);
|
| 86 |
|
|
|
| 87 |
|
|
return (1.0 / (1.0+j));
|
| 88 |
|
|
}
|
| 89 |
|
|
|
| 90 |
|
|
|
| 91 |
|
|
/*
|
| 92 |
|
|
* This is the coefficient k which is meant to enhance the
|
| 93 |
|
|
* effect of the Elo system where more experienced players
|
| 94 |
|
|
* will gain fewer points when playing against newbies, and
|
| 95 |
|
|
* newbies will gain massive points if they win against an
|
| 96 |
|
|
* experienced player. It also helps stabilize a player's
|
| 97 |
|
|
* rating after they have played 30 games or so.
|
| 98 |
|
|
*
|
| 99 |
|
|
* K=50 for new players
|
| 100 |
|
|
* K=30 for players who have played 30 or more ladder games
|
| 101 |
|
|
* K=20 for players who have attained a rating of 2400 or higher
|
| 102 |
|
|
*/
|
| 103 |
|
|
static int coefficient(t_account * account, t_clienttag clienttag, t_ladder_id id)
|
| 104 |
|
|
{
|
| 105 |
|
|
int const total_ladder_games=account_get_ladder_wins(account,clienttag,id) +
|
| 106 |
|
|
account_get_ladder_losses(account,clienttag,id) +
|
| 107 |
|
|
account_get_ladder_disconnects(account,clienttag,id);
|
| 108 |
|
|
|
| 109 |
|
|
if (total_ladder_games < 30)
|
| 110 |
|
|
return 50;
|
| 111 |
|
|
|
| 112 |
|
|
if (account_get_ladder_rating(account,clienttag,id) < 2400)
|
| 113 |
|
|
return 30;
|
| 114 |
|
|
|
| 115 |
|
|
return 20;
|
| 116 |
|
|
}
|
| 117 |
|
|
|
| 118 |
|
|
|
| 119 |
|
|
/*
|
| 120 |
|
|
* The Elo system only handles 2 players, these functions extend
|
| 121 |
|
|
* the calculation to different numbers of players as if they were
|
| 122 |
|
|
* in a tournament. It turns out the math for this is really ugly,
|
| 123 |
|
|
* so we have hardcoded the equations for every number of players.
|
| 124 |
|
|
*/
|
| 125 |
|
|
static double two_player(unsigned int *rating)
|
| 126 |
|
|
{
|
| 127 |
|
|
unsigned int a,b;
|
| 128 |
|
|
double ab;
|
| 129 |
|
|
|
| 130 |
|
|
a = rating[0];
|
| 131 |
|
|
b = rating[1];
|
| 132 |
|
|
|
| 133 |
|
|
ab = probability(a,b);
|
| 134 |
|
|
|
| 135 |
|
|
return ab;
|
| 136 |
|
|
}
|
| 137 |
|
|
|
| 138 |
|
|
static double three_player(unsigned int *rating)
|
| 139 |
|
|
{
|
| 140 |
|
|
unsigned int a,b,c;
|
| 141 |
|
|
double ab,ac,bc,cb;
|
| 142 |
|
|
|
| 143 |
|
|
a = rating[0];
|
| 144 |
|
|
b = rating[1];
|
| 145 |
|
|
c = rating[2];
|
| 146 |
|
|
|
| 147 |
|
|
ab = probability(a,b);
|
| 148 |
|
|
ac = probability(a,c);
|
| 149 |
|
|
bc = probability(b,c);
|
| 150 |
|
|
cb = 1.0 - bc;
|
| 151 |
|
|
|
| 152 |
|
|
return (2*(ab*ac)+(bc*ab)+(cb*ac))/3;
|
| 153 |
|
|
}
|
| 154 |
|
|
|
| 155 |
|
|
static double four_player(unsigned int *rating)
|
| 156 |
|
|
{
|
| 157 |
|
|
unsigned int a,b,c,d;
|
| 158 |
|
|
double ab,ac,ad,bc,bd,cb,cd,db,dc;
|
| 159 |
|
|
|
| 160 |
|
|
a = rating[0];
|
| 161 |
|
|
b = rating[1];
|
| 162 |
|
|
c = rating[2];
|
| 163 |
|
|
d = rating[3];
|
| 164 |
|
|
|
| 165 |
|
|
|
| 166 |
|
|
ab = probability(a,b);
|
| 167 |
|
|
ac = probability(a,c);
|
| 168 |
|
|
ad = probability(a,d);
|
| 169 |
|
|
bc = probability(b,c);
|
| 170 |
|
|
bd = probability(b,d);
|
| 171 |
|
|
cd = probability(c,d);
|
| 172 |
|
|
cb = 1.0 - bc;
|
| 173 |
|
|
db = 1.0 - bd;
|
| 174 |
|
|
dc = 1.0 - cd;
|
| 175 |
|
|
|
| 176 |
|
|
return (ab*ac*(cd+bd)+ac*ad*(db+cb)+ab*ad*(dc+bc))/3;
|
| 177 |
|
|
}
|
| 178 |
|
|
|
| 179 |
|
|
|
| 180 |
|
|
/* [Denis MOREAUX <vapula@linuxbe.org>, 10 Apr 2000]
|
| 181 |
|
|
*
|
| 182 |
|
|
* C D E A D E The winner may be in the
|
| 183 |
|
|
* A B C E B C A E 2 players or the 3 players
|
| 184 |
|
|
* A C B A group. In either case, a
|
| 185 |
|
|
* A A second player must be choosen
|
| 186 |
|
|
* to be either the one playing
|
| 187 |
|
|
* against A in the 2-players subtree or being the winner
|
| 188 |
|
|
* of the 2-player subtree if A is in the 3-players subtree.
|
| 189 |
|
|
*/
|
| 190 |
|
|
|
| 191 |
|
|
static double five_player(unsigned int *rating)
|
| 192 |
|
|
{
|
| 193 |
|
|
unsigned int a,b,c,d,e;
|
| 194 |
|
|
|
| 195 |
|
|
a = rating[0];
|
| 196 |
|
|
b = rating[1];
|
| 197 |
|
|
c = rating[2];
|
| 198 |
|
|
d = rating[3];
|
| 199 |
|
|
e = rating[4];
|
| 200 |
|
|
|
| 201 |
|
|
return (five_f1(a,b,c,d,e)+five_f1(a,c,d,e,b)+
|
| 202 |
|
|
five_f1(a,d,e,b,c)+five_f1(a,e,b,c,d))/30;
|
| 203 |
|
|
}
|
| 204 |
|
|
|
| 205 |
|
|
/* [Denis MOREAUX <vapula@linuxbe.org>, 10 Apr 2000
|
| 206 |
|
|
*
|
| 207 |
|
|
* Two cases to treat : AB-CDE and BC-ADE.
|
| 208 |
|
|
* in both cases, A win against B.
|
| 209 |
|
|
* In the first case, A win over the winner of a 3-players game
|
| 210 |
|
|
* (3 possible winners).
|
| 211 |
|
|
* In the second case, B win over one of the three other and A is in
|
| 212 |
|
|
* the 3-players game.
|
| 213 |
|
|
*/
|
| 214 |
|
|
|
| 215 |
|
|
static double five_f1(int a, int b, int c, int d, int e)
|
| 216 |
|
|
{
|
| 217 |
|
|
double ab,ac,ad,ae,bc,bd,be;
|
| 218 |
|
|
|
| 219 |
|
|
ab = probability(a,b);
|
| 220 |
|
|
ac = probability(a,c);
|
| 221 |
|
|
ad = probability(a,d);
|
| 222 |
|
|
ae = probability(a,e);
|
| 223 |
|
|
bc = probability(b,c);
|
| 224 |
|
|
bd = probability(b,d);
|
| 225 |
|
|
be = probability(b,e);
|
| 226 |
|
|
|
| 227 |
|
|
return ab*(ac*five_f2(c,d,e)+ad*five_f2(d,e,c)+ae*five_f2(e,c,d)+
|
| 228 |
|
|
bc*five_f2(a,d,e)+bd*five_f2(a,c,e)+be*five_f2(a,c,d));
|
| 229 |
|
|
}
|
| 230 |
|
|
|
| 231 |
|
|
static double five_f2(int a, int b, int c)
|
| 232 |
|
|
{
|
| 233 |
|
|
double ab,ac,bc,cb;
|
| 234 |
|
|
|
| 235 |
|
|
ab = probability(a,b);
|
| 236 |
|
|
ac = probability(a,c);
|
| 237 |
|
|
bc = probability(b,c);
|
| 238 |
|
|
cb = 1.0 - bc;
|
| 239 |
|
|
|
| 240 |
|
|
return (2*(ab*ac)+bc*ab+cb*ac);
|
| 241 |
|
|
}
|
| 242 |
|
|
|
| 243 |
|
|
|
| 244 |
|
|
static double six_player(unsigned int *rating)
|
| 245 |
|
|
{
|
| 246 |
|
|
unsigned int a,b,c,d,e,f;
|
| 247 |
|
|
|
| 248 |
|
|
a = rating[0];
|
| 249 |
|
|
b = rating[1];
|
| 250 |
|
|
c = rating[2];
|
| 251 |
|
|
d = rating[3];
|
| 252 |
|
|
e = rating[4];
|
| 253 |
|
|
f = rating[5];
|
| 254 |
|
|
|
| 255 |
|
|
/* A B C D
|
| 256 |
|
|
* A C E F
|
| 257 |
|
|
* A E
|
| 258 |
|
|
* A
|
| 259 |
|
|
*/
|
| 260 |
|
|
|
| 261 |
|
|
return (six_f1(a,b,c,d,e,f)+ /* A is in group of 4 */
|
| 262 |
|
|
six_f1(a,b,c,e,d,f)+
|
| 263 |
|
|
six_f1(a,b,e,d,c,f)+
|
| 264 |
|
|
six_f1(a,e,c,d,b,f)+
|
| 265 |
|
|
six_f1(a,b,c,f,d,e)+
|
| 266 |
|
|
six_f1(a,b,f,d,c,e)+
|
| 267 |
|
|
six_f1(a,f,c,d,b,e)+
|
| 268 |
|
|
six_f1(a,e,f,b,c,d)+
|
| 269 |
|
|
six_f1(a,e,f,c,b,d)+
|
| 270 |
|
|
six_f1(a,e,f,d,b,c)+
|
| 271 |
|
|
six_f2(a,b,c,d,e,f)+ /* A is in group of 2 */
|
| 272 |
|
|
six_f2(a,c,b,d,e,f)+
|
| 273 |
|
|
six_f2(a,d,b,c,e,f)+
|
| 274 |
|
|
six_f2(a,e,b,c,d,f)+
|
| 275 |
|
|
six_f2(a,f,b,c,d,e))/45;
|
| 276 |
|
|
}
|
| 277 |
|
|
|
| 278 |
|
|
|
| 279 |
|
|
/* ABCD = group of 4, EF = group of 2, A must win */
|
| 280 |
|
|
/* D.Moreaux, 10 Apr 2000: changed double to int for the parameters */
|
| 281 |
|
|
|
| 282 |
|
|
static double six_f1(int a, int b, int c, int d, int e, int f)
|
| 283 |
|
|
{
|
| 284 |
|
|
double ab,ac,ad,bc,bd,cb,cd,db,dc,ef,fe,ae,af;
|
| 285 |
|
|
|
| 286 |
|
|
ab = probability(a,b);
|
| 287 |
|
|
ac = probability(a,c);
|
| 288 |
|
|
ad = probability(a,d);
|
| 289 |
|
|
ae = probability(a,e);
|
| 290 |
|
|
af = probability(a,f);
|
| 291 |
|
|
bc = probability(b,c);
|
| 292 |
|
|
bd = probability(b,d);
|
| 293 |
|
|
cd = probability(c,d);
|
| 294 |
|
|
ef = probability(e,f);
|
| 295 |
|
|
cb = 1.0 - bc;
|
| 296 |
|
|
db = 1.0 - bd;
|
| 297 |
|
|
dc = 1.0 - cd;
|
| 298 |
|
|
fe = 1.0 - ef;
|
| 299 |
|
|
return (ab*ac*(cd+bd)+ac*ad*(db+cb)+ab*ad*(dc+bc))*(ef*ae+fe*af);
|
| 300 |
|
|
}
|
| 301 |
|
|
|
| 302 |
|
|
|
| 303 |
|
|
/* AB is group of 2, CDEF is group of 4, A must win */
|
| 304 |
|
|
|
| 305 |
|
|
static double six_f2(int a, int b, int c, int d, int e, int f)
|
| 306 |
|
|
{
|
| 307 |
|
|
double ab,ac,ad,ae,af;
|
| 308 |
|
|
|
| 309 |
|
|
ab = probability(a,b);
|
| 310 |
|
|
ac = probability(a,c);
|
| 311 |
|
|
ad = probability(a,d);
|
| 312 |
|
|
ae = probability(a,e);
|
| 313 |
|
|
af = probability(a,f);
|
| 314 |
|
|
|
| 315 |
|
|
return (six_f3(c,d,e,f)*ab*ac+
|
| 316 |
|
|
six_f3(d,c,e,f)*ab*ad+
|
| 317 |
|
|
six_f3(e,c,d,f)*ab*ae+
|
| 318 |
|
|
six_f3(f,c,d,e)*ab*af);
|
| 319 |
|
|
}
|
| 320 |
|
|
|
| 321 |
|
|
|
| 322 |
|
|
/* ABCD is group of 4, A win */
|
| 323 |
|
|
|
| 324 |
|
|
static double six_f3(int a, int b, int c, int d)
|
| 325 |
|
|
{
|
| 326 |
|
|
double ab,ac,ad,bc,bd,cb,cd,db,dc;
|
| 327 |
|
|
|
| 328 |
|
|
ab = probability(a,b);
|
| 329 |
|
|
ac = probability(a,c);
|
| 330 |
|
|
ad = probability(a,d);
|
| 331 |
|
|
bc = probability(b,c);
|
| 332 |
|
|
bd = probability(b,d);
|
| 333 |
|
|
cd = probability(c,d);
|
| 334 |
|
|
cb = 1.0 - bc;
|
| 335 |
|
|
db = 1.0 - bd;
|
| 336 |
|
|
dc = 1.0 - cd;
|
| 337 |
|
|
|
| 338 |
|
|
return (ab*ac*(cd+bd)+ac*ad*(db+cb)+ab*ad*(dc+bc));
|
| 339 |
|
|
}
|
| 340 |
|
|
|
| 341 |
|
|
|
| 342 |
|
|
static double seven_player(unsigned int *rating)
|
| 343 |
|
|
{
|
| 344 |
|
|
unsigned int a,b,c,d,e,f,g;
|
| 345 |
|
|
|
| 346 |
|
|
a = rating[0];
|
| 347 |
|
|
b = rating[1];
|
| 348 |
|
|
c = rating[2];
|
| 349 |
|
|
d = rating[3];
|
| 350 |
|
|
e = rating[4];
|
| 351 |
|
|
f = rating[5];
|
| 352 |
|
|
g = rating[6];
|
| 353 |
|
|
|
| 354 |
|
|
return (seven_f1(a,b,c,d,e,f,g)+seven_f1(a,c,b,d,e,f,g)+
|
| 355 |
|
|
seven_f1(a,d,c,b,e,f,g)+seven_f1(a,e,c,d,b,f,g)+
|
| 356 |
|
|
seven_f1(a,f,c,d,e,b,g)+seven_f1(a,g,c,d,e,f,b))/45;
|
| 357 |
|
|
}
|
| 358 |
|
|
|
| 359 |
|
|
static double seven_f1(int a, int b, int c, int d, int e, int f, int g)
|
| 360 |
|
|
{
|
| 361 |
|
|
|
| 362 |
|
|
return seven_f2(a,b,c,d,e,f,g)+seven_f2(a,b,d,c,e,f,g)+
|
| 363 |
|
|
seven_f2(a,b,e,d,c,f,g)+seven_f2(a,b,f,d,e,c,g)+
|
| 364 |
|
|
seven_f2(a,b,g,d,e,f,c);
|
| 365 |
|
|
}
|
| 366 |
|
|
|
| 367 |
|
|
static double seven_f2(int a, int b, int c, int d, int e, int f, int g)
|
| 368 |
|
|
{
|
| 369 |
|
|
double ab,ac,ad,ae,af,ag,bc,bd,be,bf,bg,cd,ce,cf,cg;
|
| 370 |
|
|
double de,df,dg,ed,ef,eg,fd,fe,fg,gd,ge,gf;
|
| 371 |
|
|
ab = probability(a,b);
|
| 372 |
|
|
ac = probability(a,c);
|
| 373 |
|
|
ad = probability(a,d);
|
| 374 |
|
|
ae = probability(a,e);
|
| 375 |
|
|
af = probability(a,f);
|
| 376 |
|
|
ag = probability(a,g);
|
| 377 |
|
|
bc = probability(b,c);
|
| 378 |
|
|
bd = probability(b,d);
|
| 379 |
|
|
be = probability(b,e);
|
| 380 |
|
|
bf = probability(b,f);
|
| 381 |
|
|
bg = probability(b,g);
|
| 382 |
|
|
cd = probability(c,d);
|
| 383 |
|
|
ce = probability(c,e);
|
| 384 |
|
|
cf = probability(c,f);
|
| 385 |
|
|
cg = probability(c,g);
|
| 386 |
|
|
de = probability(d,e);
|
| 387 |
|
|
df = probability(d,f);
|
| 388 |
|
|
dg = probability(d,g);
|
| 389 |
|
|
ef = probability(e,f);
|
| 390 |
|
|
eg = probability(e,g);
|
| 391 |
|
|
fg = probability(f,g);
|
| 392 |
|
|
ed = 1.0 - de;
|
| 393 |
|
|
fd = 1.0 - df;
|
| 394 |
|
|
gd = 1.0 - dg;
|
| 395 |
|
|
fe = 1.0 - ef;
|
| 396 |
|
|
ge = 1.0 - eg;
|
| 397 |
|
|
gf = 1.0 - fg;
|
| 398 |
|
|
|
| 399 |
|
|
return
|
| 400 |
|
|
ab*(
|
| 401 |
|
|
(ac+bc)*
|
| 402 |
|
|
(ad*(de*df*(fg+eg)+df*dg*(ge+fe)+de*dg*(gf+ef))+ /* 4:d win */
|
| 403 |
|
|
ae*(ed*ef*(fg+dg)+ef*eg*(gd+fd)+ed*eg*(gf+df))+ /* 4:e win */
|
| 404 |
|
|
af*(fe*fd*(dg+eg)+fd*fg*(ge+de)+fe*fg*(gd+ed))+ /* 4:f win */
|
| 405 |
|
|
ag*(ge*gf*(fd+ed)+gf*gd*(de+fe)+ge*gd*(df+ef)))+ /* 4:g win */
|
| 406 |
|
|
bc*
|
| 407 |
|
|
((bd+cd)*(ae*af*(fg+eg)+af*ag*(ge+fe)+ae*ag*(gf+ef))+ /* 3:d */
|
| 408 |
|
|
(be+ce)*(ad*af*(fg+dg)+af*ag*(ad+ad)+ad*ag*(gf+df))+ /* 3:e */
|
| 409 |
|
|
(bf+cf)*(ae*ad*(dg+eg)+ad*ag*(ge+de)+ae*ag*(gd+ed))+ /* 3:f */
|
| 410 |
|
|
(bg+cg)*(ae*af*(fd+ed)+af*ad*(de+fe)+ae*ad*(df+ef)))); /* 3:g */
|
| 411 |
|
|
|
| 412 |
|
|
}
|
| 413 |
|
|
|
| 414 |
|
|
static double eight_player(unsigned int *rating)
|
| 415 |
|
|
{
|
| 416 |
|
|
unsigned int a,b,c,d,e,f,g,h;
|
| 417 |
|
|
double ab,ac,ad,ae,af,ag,ah;
|
| 418 |
|
|
|
| 419 |
|
|
a = rating[0];
|
| 420 |
|
|
b = rating[1];
|
| 421 |
|
|
c = rating[2];
|
| 422 |
|
|
d = rating[3];
|
| 423 |
|
|
e = rating[4];
|
| 424 |
|
|
f = rating[5];
|
| 425 |
|
|
g = rating[6];
|
| 426 |
|
|
h = rating[7];
|
| 427 |
|
|
|
| 428 |
|
|
ab = probability(a,b);
|
| 429 |
|
|
ac = probability(a,c);
|
| 430 |
|
|
ad = probability(a,d);
|
| 431 |
|
|
ae = probability(a,e);
|
| 432 |
|
|
af = probability(a,f);
|
| 433 |
|
|
ag = probability(a,g);
|
| 434 |
|
|
ah = probability(a,h);
|
| 435 |
|
|
|
| 436 |
|
|
/* First against A may be one from seven */
|
| 437 |
|
|
|
| 438 |
|
|
return (eight_f1(a,c,d,e,f,g,h)*ab+
|
| 439 |
|
|
eight_f1(a,b,d,e,f,g,h)*ac+
|
| 440 |
|
|
eight_f1(a,b,c,e,f,g,h)*ad+
|
| 441 |
|
|
eight_f1(a,b,c,d,f,g,h)*ae+
|
| 442 |
|
|
eight_f1(a,b,c,d,e,g,h)*af+
|
| 443 |
|
|
eight_f1(a,b,c,d,e,f,h)*ag+
|
| 444 |
|
|
eight_f1(a,b,c,d,e,f,g)*ah)/315;
|
| 445 |
|
|
|
| 446 |
|
|
}
|
| 447 |
|
|
|
| 448 |
|
|
|
| 449 |
|
|
static double eight_f1(int a, int b, int c, int d, int e, int f, int g)
|
| 450 |
|
|
{
|
| 451 |
|
|
/* The winner of the second group, who'll then play against A, may be one
|
| 452 |
|
|
from six possible players */
|
| 453 |
|
|
|
| 454 |
|
|
return eight_f2(a,b,c,d,e,f,g)+
|
| 455 |
|
|
eight_f2(a,c,b,d,e,f,g)+
|
| 456 |
|
|
eight_f2(a,d,b,c,e,f,g)+
|
| 457 |
|
|
eight_f2(a,e,b,c,d,f,g)+
|
| 458 |
|
|
eight_f2(a,f,b,c,d,e,g)+
|
| 459 |
|
|
eight_f2(a,g,b,c,d,e,f);
|
| 460 |
|
|
}
|
| 461 |
|
|
|
| 462 |
|
|
static double eight_f2(int a, int b, int c, int d, int e, int f, int g)
|
| 463 |
|
|
{
|
| 464 |
|
|
double ab,bc,bd,be,bf,bg;
|
| 465 |
|
|
|
| 466 |
|
|
ab = probability(a,b);
|
| 467 |
|
|
bc = probability(b,c);
|
| 468 |
|
|
bd = probability(b,d);
|
| 469 |
|
|
be = probability(b,e);
|
| 470 |
|
|
bf = probability(b,f);
|
| 471 |
|
|
bg = probability(b,g);
|
| 472 |
|
|
|
| 473 |
|
|
/* There are 5 player who may play against the 3rd. The third (b) will win
|
| 474 |
|
|
over them and lose against a */
|
| 475 |
|
|
|
| 476 |
|
|
return ab*(eight_f3(a,d,e,f,g)*bc+
|
| 477 |
|
|
eight_f3(a,c,e,f,g)*bd+
|
| 478 |
|
|
eight_f3(a,c,d,f,g)*be+
|
| 479 |
|
|
eight_f3(a,c,d,e,g)*bf+
|
| 480 |
|
|
eight_f3(a,c,d,e,f)*bg);
|
| 481 |
|
|
|
| 482 |
|
|
}
|
| 483 |
|
|
|
| 484 |
|
|
/* D.Moreaux, 10 Apr 2000: changed double to int for the parameters */
|
| 485 |
|
|
|
| 486 |
|
|
static double eight_f3(int a, int b, int c, int d, int e)
|
| 487 |
|
|
{
|
| 488 |
|
|
double ab,ac,ad,ae,bc,bd,be,cb,cd,ce,db,dc,de,eb,ec,ed;
|
| 489 |
|
|
|
| 490 |
|
|
ab = probability(a,b);
|
| 491 |
|
|
ac = probability(a,c);
|
| 492 |
|
|
ad = probability(a,d);
|
| 493 |
|
|
ae = probability(a,e);
|
| 494 |
|
|
bc = probability(b,c);
|
| 495 |
|
|
bd = probability(b,d);
|
| 496 |
|
|
be = probability(b,e);
|
| 497 |
|
|
cd = probability(c,d);
|
| 498 |
|
|
ce = probability(c,e);
|
| 499 |
|
|
de = probability(d,e);
|
| 500 |
|
|
cb = 1.0 - bc;
|
| 501 |
|
|
db = 1.0 - bd;
|
| 502 |
|
|
dc = 1.0 - cd;
|
| 503 |
|
|
eb = 1.0 - be;
|
| 504 |
|
|
ec = 1.0 - ce;
|
| 505 |
|
|
ed = 1.0 - de;
|
| 506 |
|
|
|
| 507 |
|
|
/* expansion then factorisation (this function is called 210 times)
|
| 508 |
|
|
* gain 4 func_call
|
| 509 |
|
|
* 24 *
|
| 510 |
|
|
* 30 probability
|
| 511 |
|
|
*/
|
| 512 |
|
|
return (bc*de+be*dc)*((ab-ad)*bd+ad)+
|
| 513 |
|
|
(bd*ce+be*cd)*((ab-ac)*bc+ac)+
|
| 514 |
|
|
(cb*de+db*ce)*((ac-ad)*cd+ad)+
|
| 515 |
|
|
(cd*eb+cb*ed)*((ac-ae)*ce+ae)+
|
| 516 |
|
|
(dc*eb+db*ec)*((ad-ae)*de+ae)+
|
| 517 |
|
|
(bd*ec+bc*ed)*((ae-ab)*eb+ab);
|
| 518 |
|
|
}
|
| 519 |
|
|
|
| 520 |
|
|
/* Determine changes in ratings due to game results. */
|
| 521 |
|
|
extern int ladder_calc_info(t_clienttag clienttag, t_ladder_id id, unsigned int count, t_account * * players, t_game_result * results, t_ladder_info * info)
|
| 522 |
|
|
{
|
| 523 |
|
|
unsigned int curr;
|
| 524 |
|
|
unsigned int *rating;
|
| 525 |
|
|
unsigned int *sorted;
|
| 526 |
|
|
|
| 527 |
|
|
if (!players)
|
| 528 |
|
|
{
|
| 529 |
|
|
eventlog(eventlog_level_error,__FUNCTION__,"got NULL players");
|
| 530 |
|
|
return -1;
|
| 531 |
|
|
}
|
| 532 |
|
|
if (!results)
|
| 533 |
|
|
{
|
| 534 |
|
|
eventlog(eventlog_level_error,__FUNCTION__,"got NULL results");
|
| 535 |
|
|
return -1;
|
| 536 |
|
|
}
|
| 537 |
|
|
if (!clienttag)
|
| 538 |
|
|
{
|
| 539 |
|
|
eventlog(eventlog_level_error,__FUNCTION__,"got bad clienttag");
|
| 540 |
|
|
return -1;
|
| 541 |
|
|
}
|
| 542 |
|
|
if (!info)
|
| 543 |
|
|
{
|
| 544 |
|
|
eventlog(eventlog_level_error,__FUNCTION__,"got NULL info");
|
| 545 |
|
|
return -1;
|
| 546 |
|
|
}
|
| 547 |
|
|
|
| 548 |
|
|
rating = xmalloc(sizeof(unsigned int)*count);
|
| 549 |
|
|
sorted = xmalloc(sizeof(unsigned int)*count);
|
| 550 |
|
|
|
| 551 |
|
|
for (curr=0; curr<count; curr++)
|
| 552 |
|
|
rating[curr] = account_get_ladder_rating(players[curr],clienttag,id);
|
| 553 |
|
|
|
| 554 |
|
|
for (curr=0; curr<count; curr++)
|
| 555 |
|
|
{
|
| 556 |
|
|
double k;
|
| 557 |
|
|
double prob;
|
| 558 |
|
|
double delta;
|
| 559 |
|
|
t_game_result myresult;
|
| 560 |
|
|
unsigned int opponent_count;
|
| 561 |
|
|
unsigned int team_members;
|
| 562 |
|
|
|
| 563 |
|
|
k = coefficient(players[curr],clienttag,id);
|
| 564 |
|
|
opponent_count = 0;
|
| 565 |
|
|
myresult = results[curr];
|
| 566 |
|
|
|
| 567 |
|
|
{
|
| 568 |
|
|
unsigned int i,j;
|
| 569 |
|
|
|
| 570 |
|
|
/* Put the current user into slot 0, his opponents into other slots
|
| 571 |
|
|
order is not important for the other players */
|
| 572 |
|
|
for (i=0,j=1; i<count; i++)
|
| 573 |
|
|
if (i==curr)
|
| 574 |
|
|
sorted[0] = rating[i];
|
| 575 |
|
|
else
|
| 576 |
|
|
{
|
| 577 |
|
|
if (results[i]!=myresult)
|
| 578 |
|
|
{
|
| 579 |
|
|
sorted[j++] = rating[i];
|
| 580 |
|
|
opponent_count++;
|
| 581 |
|
|
}
|
| 582 |
|
|
}
|
| 583 |
|
|
}
|
| 584 |
|
|
|
| 585 |
|
|
team_members = count - opponent_count;
|
| 586 |
|
|
|
| 587 |
|
|
switch (opponent_count)
|
| 588 |
|
|
{
|
| 589 |
|
|
case 1:
|
| 590 |
|
|
prob = two_player(sorted);
|
| 591 |
|
|
break;
|
| 592 |
|
|
case 2:
|
| 593 |
|
|
prob = three_player(sorted);
|
| 594 |
|
|
break;
|
| 595 |
|
|
case 3:
|
| 596 |
|
|
prob = four_player(sorted);
|
| 597 |
|
|
break;
|
| 598 |
|
|
case 4:
|
| 599 |
|
|
prob = five_player(sorted);
|
| 600 |
|
|
break;
|
| 601 |
|
|
case 5:
|
| 602 |
|
|
prob = six_player(sorted);
|
| 603 |
|
|
break;
|
| 604 |
|
|
case 6:
|
| 605 |
|
|
prob = seven_player(sorted);
|
| 606 |
|
|
break;
|
| 607 |
|
|
case 7:
|
| 608 |
|
|
prob = eight_player(sorted);
|
| 609 |
|
|
break;
|
| 610 |
|
|
default:
|
| 611 |
|
|
eventlog(eventlog_level_error,__FUNCTION__,"sorry, unsupported number of ladder opponents (%u)",opponent_count);
|
| 612 |
|
|
xfree((void *)rating);
|
| 613 |
|
|
xfree((void *)sorted);
|
| 614 |
|
|
return -1;
|
| 615 |
|
|
}
|
| 616 |
|
|
|
| 617 |
|
|
if (results[curr]==game_result_win)
|
| 618 |
|
|
delta = fabs(k * (1.0 - prob) / team_members); /* better the chance of winning -> fewer points added */
|
| 619 |
|
|
else
|
| 620 |
|
|
delta = -fabs(k * prob); /* better the chance of winning -> more points subtracted */
|
| 621 |
|
|
|
| 622 |
|
|
eventlog(eventlog_level_debug,__FUNCTION__,"computed probability=%g, k=%g, deltar=%+g",prob,k,delta);
|
| 623 |
|
|
|
| 624 |
|
|
info[curr].prob = prob;
|
| 625 |
|
|
info[curr].k = (unsigned int)k;
|
| 626 |
|
|
info[curr].adj = (int)delta;
|
| 627 |
|
|
info[curr].oldrating = rating[curr];
|
| 628 |
|
|
info[curr].oldrank = account_get_ladder_rank(players[curr],clienttag,id);
|
| 629 |
|
|
}
|
| 630 |
|
|
|
| 631 |
|
|
xfree((void *)rating);
|
| 632 |
|
|
xfree((void *)sorted);
|
| 633 |
|
|
|
| 634 |
|
|
return 0;
|
| 635 |
|
|
}
|
Parent Directory
| 
Revision Log