1 #include "weaponstats.qh"
4 #include "../g_world.qh"
6 #include "../../common/urllib.qh"
7 #include "../../common/weapons/weapons.qh"
9 void WeaponStats_Init()
11 weaponstats_buffer = ((autocvar_sv_weaponstats_file != "") ? buf_create() : -1);
14 void WeaponStats_ready(entity fh, entity pass, float status)
16 float i, j, n, ibot, jbot, idx;
21 case URL_READY_CANWRITE:
23 prefix = strcat(autocvar_hostname, "\t", GetGametype(), "_", GetMapname(), "\t");
24 url_fputs(fh, "#begin statsfile\n");
25 url_fputs(fh, strcat("#date ", strftime(true, "%a %b %e %H:%M:%S %Z %Y"), "\n"));
27 url_fputs(fh, strcat("#version ", WATERMARK, "\n"));
29 url_fputs(fh, strcat("#config ", ftos(crc16(false, cvar_purechanges)), "\n"));
30 url_fputs(fh, strcat("#cvar_purechanges ", ftos(cvar_purechanges_count), "\n"));
31 n = tokenizebyseparator(cvar_purechanges, "\n");
32 for(i = 0; i < n; ++i)
33 url_fputs(fh, strcat("#cvar_purechange ", argv(i), "\n"));
34 for(i = WEP_FIRST; i <= WEP_LAST; ++i) for(ibot = 0; ibot <= 1; ++ibot)
35 for(j = WEP_FIRST; j <= WEP_LAST; ++j) for(jbot = 0; jbot <= 1; ++jbot)
37 idx = WEAPONSTATS_GETINDEX(i, ibot, j, jbot);
38 v = stov(bufstr_get(weaponstats_buffer, idx));
41 //vector is: kills hits damage
42 url_fputs(fh, sprintf("%s%d %d\t%d %d\t", prefix, i, ibot, j, jbot));
43 url_fputs(fh, sprintf("%d %d %g\n", v.x, v.y, v.z));
46 url_fputs(fh, "#end\n\n");
49 case URL_READY_CANREAD:
50 // url_fclose is processing, we got a response for writing the data
51 // this must come from HTTP
52 print("Got response from weapon stats server:\n");
53 while((s = url_fgets(fh)))
55 print("End of response.\n");
58 case URL_READY_CLOSED:
59 // url_fclose has finished
60 print("Weapon stats written\n");
61 buf_del(weaponstats_buffer);
62 weaponstats_buffer = -1;
66 print("Weapon stats writing failed: ", ftos(status), "\n");
67 buf_del(weaponstats_buffer);
68 weaponstats_buffer = -1;
73 void WeaponStats_Shutdown()
75 if(weaponstats_buffer < 0)
77 if(autocvar_sv_weaponstats_file != "")
79 url_multi_fopen(autocvar_sv_weaponstats_file, FILE_APPEND, WeaponStats_ready, world);
83 buf_del(weaponstats_buffer);
84 weaponstats_buffer = -1;
88 void WeaponStats_LogItem(float awep, float abot, float vwep, float vbot, vector item)
91 if(weaponstats_buffer < 0)
93 if(awep < WEP_FIRST || vwep < WEP_FIRST)
95 if(awep > WEP_LAST || vwep > WEP_LAST)
97 idx = WEAPONSTATS_GETINDEX(awep,abot,vwep,vbot);
98 bufstr_set(weaponstats_buffer, idx, vtos(stov(bufstr_get(weaponstats_buffer, idx)) + item));
101 void WeaponStats_LogDamage(float awep, float abot, float vwep, float vbot, float damage)
104 error("negative damage?");
105 WeaponStats_LogItem(awep, abot, vwep, vbot, '0 0 1' * damage + '0 1 0');
108 void WeaponStats_LogKill(float awep, float abot, float vwep, float vbot)
110 WeaponStats_LogItem(awep, abot, vwep, vbot, '1 0 0');