- /* hostnames -------------------------------------- */\r
- fprintf(f,"<tr><td align=\"right\"><a name=\"%s\"></a>%d</td><td><a href=\"%s%s.log\">%s</a>\n", ip->name, i, log_url, ip->name, ip->name); \r
- fprintf(f,"<span id=\"sharing_%d\" style=\"display:none\">",i);\r
- popup_button=0;\r
- for_selected(sharedip,ips,eq(ip->name,sharedip->sharing))\r
- {\r
- fprintf(f,"<br /><a href=\"%s%s.log\">%s</a>\n", log_url, sharedip->name, sharedip->name);\r
- popup_button=1;\r
- }\r
- fputs("</span>\n",f);\r
- if(popup_button)\r
- {\r
- fprintf(f,"<span id=\"toggle_%d\">[<a href=\"#\" onClick=\"$(\'#toggle_%d\').remove();$(\'#sharing_%d\').show();$(\'#download_%d\').show();$(\'#upload_%d\').show();return(false);\" style=\"cursor: pointer; text-decoration:none;\">+</a>]</span>",\r
- i, i, i, i, i);\r
- }\r
- fputs("</td>\n",f);\r
- /* ----------------------------------------------- */\r
-\r
- if(found_lmsid)\r
- {\r
- fputs("<td align=\"right\">",f);\r
- if(ip->lmsid > 0)\r
- {\r
- /*base URL will be configurable soon ... */\r
- fprintf(f,"<a href=\"https://hermes.spoje.net/?m=customerinfo&id=%d\">%04d</a>\n", ip->lmsid, ip->lmsid);\r
- }\r
- else if(ip->lmsid == 0)\r
- {\r
- fputs("-------",f);\r
- }\r
- fputs("</td>\n",f);\r
- }\r
- fprintf(f,"<td align=\"right\">%Lu M</td>\n", ip->credit);\r
- fprintf(f,"<td align=\"right\"><span style=\"color:#%s\">%Lu M</span></td>",\r
- ip->keyword->html_color,\r
- ip->credit+(ip->min*ip->keyword->data_limit+(ip->keyword->fixed_limit<<20)));\r
- fprintf(f,"<td align=\"right\">%s%Lu M%s",f1, ip->traffic, f2);\r
-\r
- /* download --------------------------------------- */\r
- fprintf(f,"</td><td align=\"right\">%Lu M", ip->direct);\r
- fprintf(f,"<span id=\"download_%d\" style=\"display:none\">",i);\r
- for_selected(sharedip,ips,eq(ip->name,sharedip->sharing))\r
- {\r
- fprintf(f,"<br />%Lu M", sharedip->direct);\r
- }\r
- fputs("</span></td>\n",f);\r
- /* ----------------------------------------------- */\r
-\r
- if(qos_proxy)\r
- {\r
- fprintf(f,"<td align=\"right\">%Lu M</td>\n", ip->proxy);\r
- }\r
- /* upload ---------------------------------------- */\r
- fprintf(f,"<td align=\"right\">%Lu M", ip->upload);\r
- fprintf(f,"<span id=\"upload_%d\" style=\"display:none\">",i);\r
- for_selected(sharedip,ips,eq(ip->name,sharedip->sharing))\r
- {\r
- fprintf(f,"<br />%Lu M", sharedip->upload);\r
- }\r
- fputs("</span></td>\n",f);\r
- /* ----------------------------------------------- */\r
-\r
- fprintf(f,"<td align=\"right\">%d k</td><td align=\"right\">%d k</td><td align=\"right\">%s%d k%s</td><td>%s%d%s</td></tr>\n",\r
- ip->min,ip->desired,f1,ip->max,f2,f1,ip->prio,f2);\r
- total_traffic+=ip->traffic;\r
- total_direct+=ip->direct;\r
- total_proxy+=ip->proxy;\r
- total_upload+=ip->upload;\r
- if(ip->traffic>0)\r
- {\r
- active_classes++;\r
- tmp_sum+=ip->traffic;\r
- create(sum,Sum);\r
- sum->l=tmp_sum;\r
- sum->i=active_classes;\r
- insert(sum,sums,order_by,i);\r
- }\r
- \r
- i++;\r
- \r
- if(!just_preview)\r
- {\r
- sprintf(str,"%s/%s.log",log_dir,ip->name);\r
- iplog=fopen(str,"a");\r
- if(iplog)\r
- {\r
- fprintf(iplog,"%ld\t%s\t%Lu\t%Lu\t%Lu\t%Lu\t%d\t%d\t%d\t%d\t%s",\r
- time(NULL),ip->name,ip->traffic,ip->direct,ip->proxy,ip->upload,ip->min,ip->max,ip->desired,ip->lmsid,d); /* d = date*/\r
- fclose(iplog);\r
- }\r
- }\r
- }\r
- fprintf(f,"<tr><th colspan=\"%d\" align=\"left\">SUMMARY:</td>",colspan-7);\r
- fprintf(f,"<th align=\"right\">%Lu M</th><th align=\"right\">%Lu M</th>\n", total_traffic, total_direct);\r
- if(qos_proxy)\r
- {\r
- fprintf(f,"<th align=\"right\">%Lu M</th>\n", total_proxy);\r
- }\r
- fprintf(f,"<th align=\"right\">%Lu M</th>", total_upload);\r
- fprintf(f,"<th colspan=\"4\"><span style=\"color:red\">FUP-LIMIT %dx</span> <span style=\"color:brown\">LOW-PRIO %dx</span></th></tr>\n</table>\n",limit_count,prio_count);\r
-\r
- if(active_classes>10)\r
- {\r
- int top20_count=0,top20_perc1=0;\r
- long long top20_perc2=0;\r
- unsigned long long top20_sum=0l;\r
- \r
- fputs("<a name=\"erp\"></a><p><table border><tr><th colspan=\"5\">Enterprise Resource Planning (ERP)</th></tr>\n",f);\r
- fputs("<tr><td>Analytic category</td>\n",f);\r
- fputs("<td colspan=\"2\" align=\"center\">Active Classes</td><td colspan=\"2\" align=\"center\">Data transfers</td></tr>\n",f);\r
-\r
- if_exists(sum,sums,sum->l>=total_traffic/4)\r
- {\r
- fprintf(f,"<tr><td>Top 25%% of traffic</td>\n");\r
- fprintf(f,"<td align=\"right\">%d</td><td align=\"right\">%d %%</td><td align=\"right\">%Lu M</td><td align=\"right\">%Ld %%</td></tr>\n",sum->i,(100*sum->i+50)/active_classes,sum->l,(100*sum->l+50)/total_traffic);\r
- }\r
- \r
- if_exists(sum,sums,sum->i==10)\r
- {\r
- fprintf(f,"<tr><td>Top 10 downloaders</td>\n");\r
- fprintf(f,"<th align=\"right\">10</th><td align=\"right\">%d %%</td><td align=\"right\">%Lu M</td><td align=\"right\">%Ld %%</td></tr>\n",(100*sum->i+50)/active_classes,sum->l,(100*sum->l+50)/total_traffic);\r
- }\r
-\r
- if_exists(sum,sums,sum->l>=total_traffic/2)\r
- {\r
- fprintf(f,"<tr><td>Top 50%% of traffic</td>\n");\r
- fprintf(f,"<td align=\"right\">%d</td><td align=\"right\">%d %%</td><td align=\"right\">%Lu M</td><th align=\"right\">%Ld %%</th></tr>\n",sum->i,(100*sum->i+50)/active_classes,sum->l,(100*sum->l+50)/total_traffic);\r
- }\r
-\r
- if_exists(sum,sums,sum->l>=4*total_traffic/5)\r
- {\r
- fprintf(f,"<tr><td>Top 80%% of traffic</td>\n");\r
- fprintf(f,"<td align=\"right\">%d</td><td align=\"right\">%d %%</td><td align=\"right\">%Lu M</td><th align=\"right\">%Ld %%</th></tr>\n",sum->i,(100*sum->i+50)/active_classes,sum->l,(100*sum->l+50)/total_traffic);\r
- }\r
-\r
- if_exists(sum,sums,sum->i>=(active_classes+1)/5)\r
- {\r
- fprintf(f,"<tr><td>Top 20%% downloaders</td>\n");\r
- top20_count=sum->i;\r
- top20_perc1=(100*sum->i+50)/active_classes;\r
- top20_sum=sum->l;\r
- top20_perc2=(100*sum->l+50)/total_traffic;\r
- fprintf(f,"<td align=\"right\">%d</td><th align=\"right\">%d %%</th><td align=\"right\">%Lu M</td><td align=\"right\">%Ld %%</td></tr>\n",top20_count,top20_perc1,top20_sum,top20_perc2);\r
- }\r
-\r
- if_exists(sum,sums,sum->i>=(active_classes+1)/4)\r
- {\r
- fprintf(f,"<tr><td>Top 25%% downloaders</td>\n");\r
- fprintf(f,"<td align=\"right\">%d</td><td align=\"right\">%d %%</td><td align=\"right\">%Lu M</td><td align=\"right\">%Ld %%</td></tr>\n",sum->i,(100*sum->i+50)/active_classes,sum->l,(100*sum->l+50)/total_traffic);\r
- }\r
-\r
- if_exists(sum,sums,sum->i>=(active_classes+1)/2)\r
- {\r
- fprintf(f,"<tr><td>Top 50%% downloaders</td>\n");\r
- fprintf(f,"<td align=\"right\">%d</td><th align=\"right\">%d %%</th><td align=\"right\">%Lu M</td><td align=\"right\">%Ld %%</td></tr>\n",sum->i,(100*sum->i+50)/active_classes,sum->l,(100*sum->l+50)/total_traffic);\r
- }\r
-\r
- if_exists(sum,sums,sum->i>=4*(active_classes+1)/5)\r
- {\r
- fprintf(f,"<tr><td>Top 80%% downloaders</td>\n");\r
- fprintf(f,"<td align=\"right\">%d</td><td align=\"right\">%d %%</td><td align=\"right\">%Lu M</td><td align=\"right\">%Ld %%</td></tr>\n",sum->i,(100*sum->i+50)/active_classes,sum->l,(100*sum->l+50)/total_traffic);\r
- }\r
-\r
- fprintf(f,"<tr><td><a href=\"%sERP.log\">All users, all traffic</a></td>\n", log_url);\r
- fprintf(f,"<th align=\"right\">%d</th><th align=\"right\">100 %%</th><th align=\"right\">%Lu M</th><th align=\"right\">100 %%</th></tr>\n",active_classes,total_traffic);\r
- fputs("</table>\n", f);\r
-\r
- /* write basic ERP data to log directory */\r
- if(!just_preview)\r
- {\r
- sprintf(str,"%s/ERP.log",log_dir);\r
- iplog=fopen(str,"a");\r
- if(iplog)\r
- {\r
- fprintf(iplog,"%ld\t%d\t%d %%\t%Lu M\t%Ld %%\tACTIVE %d\tTRAFFIC %Lu M\tCLASSES %d\tFUP-LIMIT %d\tLOW-PRIO %d\t%s",\r
- time(NULL), top20_count, top20_perc1, top20_sum, top20_perc2, \r
- active_classes, total_traffic, total, limit_count, prio_count, d); /* d = date*/\r
- fclose(iplog);\r
- }\r
- }\r
- }\r
-\r
- fprintf(f, stats_html_signature, version);\r
- fclose(f);\r
- }\r