siteuser.c

   1 /*
   2  * AUTHOR: Pedro Lineu Orso                         pedro.orso@gmail.com
   3  *                                                            1998, 2009
   4  * SARG Squid Analysis Report Generator      http://sarg.sourceforge.net
   5  *
   6  * SARG donations:
   7  *      please look at http://sarg.sourceforge.net/donations.php
   8  * ---------------------------------------------------------------------
   9  *
  10  *  This program is free software; you can redistribute it and/or modify
  11  *  it under the terms of the GNU General Public License as published by
  12  *  the Free Software Foundation; either version 2 of the License, or
  13  *  (at your option) any later version.
  14  *
  15  *  This program is distributed in the hope that it will be useful,
  16  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  *  GNU General Public License for more details.
  19  *
  20  *  You should have received a copy of the GNU General Public License
  21  *  along with this program; if not, write to the Free Software
  22  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
  23  *
  24  */
  25
  26 #include "include/conf.h"
  27 #include "include/defs.h"
  28
  29 void siteuser(void)
  30 {
  31
  32    FILE *fp_in, *fp_ou;
  33
  34    char user[MAXLEN];
  35    char url[MAXLEN];
  36    char wuser[MAXLEN];
  37    char ourl[MAXLEN];
  38    char nacc[20];
  39    char nbytes[20];
  40    char obytes[20];
  41    char csort[255];
  42    char general[MAXLEN];
  43    char general2[MAXLEN];
  44    char per[MAXLEN];
  45    char sites[MAXLEN];
  46    char report[MAXLEN];
  47    char period[100];
  48    int regs=0;
  49    int ucount=0;
  50    char *users;
  51    long long int llbytes=0;
  52    int cstatus;
  53
  54    if(strcmp(Privacy,"yes") == 0)
  55       return;
  56
  57    nsitesusers = 0;
  58    sprintf(general,"%s/sarg-general",dirname);
  59    sprintf(sites,"%s/sarg-sites",dirname);
  60    sprintf(general2,"%s/sarg-general2",dirname);
  61    sprintf(per,"%s/sarg-period",dirname);
  62    sprintf(report,"%s/siteuser.html",dirname);
  63
  64    if ((fp_in = fopen(per, "r")) == 0) {
  65       fprintf(stderr, "SARG: (siteuser) %s: %s\n",text[45],per);
  66       exit(1);
  67    }
  68
  69    if (!fgets(period,sizeof(period),fp_in)) {
  70       fprintf(stderr,"SARG: (siteuser) read error in %s\n",per);
  71       exit(1);
  72    }
  73    fclose(fp_in);
  74
  75    sprintf(csort,"sort -k 4,4 -k 1,1 -o \"%s\" \"%s\"",general2,general);
  76    cstatus=system(csort);
  77    if (!WIFEXITED(cstatus) || WEXITSTATUS(cstatus)) {
  78       fprintf(stderr, "SARG: sort command return status %d\n",WEXITSTATUS(cstatus));
  79       fprintf(stderr, "SARG: sort command: %s\n",csort);
  80       exit(1);
  81    }
  82
  83    if((fp_in=fopen(general2,"r"))==NULL) {
  84      fprintf(stderr, "SARG: (topsite) %s: %s\n",text[8],general2);
  85      fprintf(stderr, "SARG: sort command: %s\n",csort);
  86      exit(1);
  87    }
  88
  89    if((fp_ou=fopen(report,"w"))==NULL) {
  90      fprintf(stderr, "SARG: (topsite) %s: %s\n",text[8],report);
  91      exit(1);
  92    }
  93
  94    fprintf(fp_ou, "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\" \"http://www.w3.org/TR/html4/loose.dtd\">\n<html>\n<head>\n  <meta http-equiv=\"Content-Type\" content=\"text/html; charset=%s\">\n",CharSet);
  95    css(fp_ou);
  96    fputs("</head>\n",fp_ou);
  97    //if(strlen(FontFace) > 0) fprintf(fp_ou,"<font face=\"%s\">\n",FontFace);
  98    fprintf(fp_ou,"<body bgcolor=\"%s\" text=\"%s\" background=\"%s\">\n",BgColor,TxColor,BgImage);
  99    write_logo_image(fp_ou);
 100
 101    if(strcmp(IndexTree,"date") == 0)
 102       show_sarg(fp_ou, "../../..");
 103    else
 104       show_sarg(fp_ou, "..");
 105
 106    fputs("<div align=\"center\"><table cellpadding=\"0\" cellspacing=\"0\">\n",fp_ou);
 107    fprintf(fp_ou,"<tr><th class=\"title\">%s</th></tr>\n",Title);
 108
 109    fprintf(fp_ou,"<tr><td class=\"header3\">%s: %s</td></tr>\n",text[89],period);
 110    fprintf(fp_ou,"<tr><th class=\"header3\">%s</th></tr>\n",text[85]);
 111    fputs("</table></div>\n",fp_ou);
 112
 113    fputs("<div align=\"center\"><table cellpadding=\"0\" cellspacing=\"2\">\n",fp_ou);
 114    fputs("<tr><td></td></tr>\n",fp_ou);
 115    if(strncmp(strlow(BytesInSitesUsersReport),"yes",3) == 0)
 116       fprintf(fp_ou,"<tr><th class=\"header\">%s</th><th class=\"header\">%s</th><th class=\"header\">%s</th><th class=\"header\">%s</th></tr>\n",text[100],text[91],text[93],text[103]);
 117    else
 118       fprintf(fp_ou,"<tr><th class=\"header\">%s</th><th class=\"header\">%s</th><th class=\"header\">%s</th></tr>\n",text[100],text[91],text[103]);
 119
 120    user[0]='\0';
 121    ourl[0]='\0';
 122    obytes[0]='\0';
 123
 124    if((users=(char *) malloc(204800))==NULL){
 125       fprintf(stderr, "SARG: ERROR: %s",text[87]);
 126       exit(1);
 127    }
 128    strcpy(users," ");
 129
 130    while(fgets(buf,sizeof(buf),fp_in)!=NULL) {
 131       if (getword(user,sizeof(user),buf,'\t')<0) {
 132          printf("SARG: Maybe you have an invalid user in the %s file of the siteuser.\n",general2);
 133          exit(1);
 134       }
 135       if(strcmp(user,"TOTAL") == 0)
 136          continue;
 137       if(userip)
 138          fixip(user);
 139
 140 //      get_usertab_name(user,name,sizeof(name));
 141       user_find(name, user);
 142
 143       if(dotinuser && strchr(name,'_')) {
 144          subs(name,sizeof(name),"_",".");
 145       }
 146
 147       /*
 148       In fact, even the first call is unecessary as the resolved user variable is never used.
 149       if(strcmp(Ip2Name,"yes") == 0)
 150          ip2name(user,sizeof(user));
 151       */
 152
 153       /*
 154       Is this redundant ip2name a mistake or is it really necessary ? It definitely slow down sarg
 155       if the first ip2name succeed because it will try to resolve a name which is not an IP but if
 156       the first ip2name failed, the second attempt may find the expected address which was resolved
 157       in the mean time by the DNS server.
 158       if(strcmp(Ip2Name,"yes") == 0)
 159          ip2name(user,sizeof(user));
 160       */
 161
 162       if (getword(nacc,sizeof(nacc),buf,'\t')<0){
 163          printf("SARG: Maybe you have an invalid number of access in your %s file of the siteuser.\n",general2);
 164          exit(1);
 165       }
 166       if (atoi(nacc) > 0) nsitesusers = 1;
 167       if (getword(nbytes,sizeof(nbytes),buf,'\t')<0){
 168          printf("SARG: Maybe you have an invalid number of bytes in your %s file of the siteuser.\n",general2);
 169          exit(1);
 170       }
 171       if (getword(url,sizeof(url),buf,'\t')<0) {
 172          printf("SARG: Maybe you have an invalid url in your %s file of the siteuser.\n",general2);
 173          exit(1);
 174       }
 175
 176       if(!regs) {
 177          strcpy(ourl,url);
 178          strcpy(obytes,nbytes);
 179          regs++;
 180       }
 181
 182       sprintf(wuser," %s ",name);
 183       if(strstr(users,wuser) == 0 && strcmp(url,ourl) == 0) {
 184          strcat(users,name);
 185          strcat(users," ");
 186          ucount++;
 187          if(ucount>4) {
 188             strcat(users,"<br>");
 189             ucount=0;
 190          }
 191       }
 192
 193       if(SiteUsersReportLimit) {
 194          if(regs >= SiteUsersReportLimit)
 195             continue;
 196       }
 197
 198       if(BlockIt[0]!='\0')
 199          sprintf(BlockImage,"<a href=\"%s%s?url=%s\"><img src=\"../images/sarg-squidguard-block.png\" border=\"0\"></a>&nbsp;",wwwDocumentRoot,BlockIt,ourl);
 200       else BlockImage[0]='\0';
 201
 202       if(strcmp(url,ourl) != 0 && nsitesusers) {
 203          if(strncmp(strlow(BytesInSitesUsersReport),"yes",3) == 0) {
 204             llbytes=my_atoll(obytes);
 205             sprintf(wwork2,"%s",fixnum(llbytes,1));
 206             fprintf(fp_ou,"<tr><td class=\"data\">%d</td><td class=\"data2\">%s<a href=\"http://%s\">%s</a></td><td class=\"data\">%s</td><td class=\"data2\">%s</td></tr>\n",regs,BlockImage,ourl,ourl,wwork2,users);
 207          } else
 208             fprintf(fp_ou,"<tr><td class=\"data\">%d</td><td class=\"data2\">%s<a href=\"http://%s\">%s</a></td><td class=\"data2\">%s</td></tr>\n",regs,BlockImage,ourl,ourl,users);
 209          regs++;
 210          ucount=0;
 211          strcpy(users,name);
 212          strcat(users," ");
 213          strcpy(ourl,url);
 214          strcpy(obytes,nbytes);
 215       }
 216    }
 217
 218    if(nsitesusers) {
 219       fprintf(fp_ou,"<tr><td class=\"data\">%d</td><td class=\"data2\"><a href=\"http://%s\">%s</a></td><td class=\"data2\">%s</td></tr>\n",regs,ourl,ourl,users);
 220    }
 221
 222    unlink(general2);
 223
 224    fputs("</table>\n</div>\n",fp_ou);
 225
 226    show_info(fp_ou);
 227
 228    fputs("</body>\n</html>\n",fp_ou);
 229
 230    fclose(fp_in);
 231    fclose(fp_ou);
 232
 233    if(users)
 234       free(users);
 235
 236    return;
 237
 238 }