]>
git.ipfire.org Git - thirdparty/sarg.git/blob - topsites.c
2 * SARG Squid Analysis Report Generator http://sarg.sourceforge.net
6 * please look at http://sarg.sourceforge.net/donations.php
8 * http://sourceforge.net/projects/sarg/forums/forum/363374
9 * ---------------------------------------------------------------------
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License as published by
13 * the Free Software Foundation; either version 2 of the License, or
14 * (at your option) any later version.
16 * This program is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
21 * You should have received a copy of the GNU General Public License
22 * along with this program; if not, write to the Free Software
23 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.
27 #include "include/conf.h"
28 #include "include/defs.h"
40 char general2
[MAXLEN
];
41 char general3
[MAXLEN
];
49 long long int tnacc
=0;
50 long long int tnbytes
=0;
51 long long int tntime
=0;
52 long long int twork1
=0, twork2
=0, twork3
=0;
57 struct getwordstruct gwarea
;
59 struct generalitemstruct item
;
64 sprintf(general
,"%s/sarg-general",outdirname
);
65 sprintf(sites
,"%s/sarg-sites",outdirname
);
66 sprintf(general2
,"%s/sarg-general2",outdirname
);
67 sprintf(general3
,"%s/sarg-general3",outdirname
);
69 if ((ReportType
& REPORT_TYPE_TOPUSERS
) == 0)
70 sprintf(report
,"%s/index.html",outdirname
);
72 sprintf(report
,"%s/topsites.html",outdirname
);
74 sprintf(csort
,"sort -k 4,4 -o \"%s\" \"%s\"",general2
,general
);
75 cstatus
=system(csort
);
76 if (!WIFEXITED(cstatus
) || WEXITSTATUS(cstatus
)) {
77 debuga(_("sort command return status %d\n"),WEXITSTATUS(cstatus
));
78 debuga(_("sort command: %s\n"),csort
);
82 if((fp_in
=fopen(general2
,"r"))==NULL
) {
83 debuga(_("(topsites) Cannot open log file %s\n"),general2
);
84 debuga(_("sort command: %s\n"),csort
);
88 if((fp_ou
=fopen(general3
,"w"))==NULL
) {
89 debuga(_("(topsites) Cannot open log file %s\n"),general3
);
93 if ((line
=longline_create())==NULL
) {
94 debuga(_("Not enough memory to read file %s\n"),general2
);
98 while((buf
=longline_read(fp_in
,line
))!=NULL
) {
99 ger_read(buf
,&item
,general2
);
100 if(item
.total
) continue;
103 url_len
=strlen(item
.url
);
104 if (!ourl
|| url_len
>=ourl_size
) {
106 ourl
=realloc(ourl
,ourl_size
);
108 debuga(_("Not enough memory to store the url\n"));
112 strcpy(ourl
,item
.url
);
116 if(strcmp(item
.url
,ourl
) != 0) {
118 This complicated printf is due to Microsoft's inability to comply with any standard. Msvcrt is unable
119 to print a long long int unless it is exactly 64-bits long.
121 fprintf(fp_ou
,"%"PRIu64
"\t%"PRIu64
"\t%"PRIu64
"\t%s\n",(uint64_t)tnacc
,(uint64_t)tnbytes
,(uint64_t)tntime
,ourl
);
122 url_len
=strlen(item
.url
);
123 if (url_len
>=ourl_size
) {
125 ourl
=realloc(ourl
,ourl_size
);
127 debuga(_("Not enough memory to store the url\n"));
131 strcpy(ourl
,item
.url
);
138 tnbytes
+=item
.nbytes
;
143 longline_destroy(&line
);
147 This complicated printf is due to Microsoft's inability to comply with any standard. Msvcrt is unable
148 to print a long long int unless it is exactly 64-bits long.
150 fprintf(fp_ou
,"%"PRIu64
"\t%"PRIu64
"\t%"PRIu64
"\t%s\n",(uint64_t)tnacc
,(uint64_t)tnbytes
,(uint64_t)tntime
,ourl
);
156 if((TopsitesSort
& TOPSITE_SORT_CONNECT
) != 0) {
157 sortf
="-k 1,1 -k 2,2";
159 sortf
="-k 2,2 -k 1,1";
161 if((TopsitesSort
& TOPSITE_SORT_REVERSE
) != 0) {
167 sprintf(csort
,"sort %s -n %s -o \"%s\" \"%s\"",sortt
,sortf
,sites
,general3
);
168 cstatus
=system(csort
);
169 if (!WIFEXITED(cstatus
) || WEXITSTATUS(cstatus
)) {
170 debuga(_("sort command return status %d\n"),WEXITSTATUS(cstatus
));
171 debuga(_("sort command: %s\n"),csort
);
174 if((fp_in
=fopen(sites
,"r"))==NULL
) {
175 debuga(_("(topsites) Cannot open log file %s\n"),sites
);
176 debuga(_("sort command: %s\n"),csort
);
183 if((fp_ou
=fopen(report
,"w"))==NULL
) {
184 debuga(_("(topsites) Cannot open log file %s\n"),report
);
188 write_html_header(fp_ou
,(IndexTree
== INDEX_TREE_DATE
) ? 3 : 1,_("Top sites"));
189 fputs("<tr><td class=\"header_c\">",fp_ou
);
190 fprintf(fp_ou
,_("Period: %s"),period
.html
);
191 fputs("</td></tr>\n",fp_ou
);
192 fputs("<tr><th class=\"header_c\">",fp_ou
);
193 fprintf(fp_ou
,_("Top %d sites"),TopSitesNum
);
194 fputs("</th></tr>\n",fp_ou
);
195 close_html_header(fp_ou
);
197 fputs("<div class=\"report\"><table cellpadding=\"1\" cellspacing=\"2\">\n",fp_ou
);
198 fprintf(fp_ou
,"<tr><th class=\"header_l\">%s</th><th class=\"header_l\">%s</th><th class=\"header_l\">%s</th><th class=\"header_l\">%s</th><th class=\"header_l\">%s</th></tr>\n",_("NUM"),_("ACCESSED SITE"),_("CONNECT"),_("BYTES"),_("TIME"));
203 if ((line
=longline_create())==NULL
) {
204 debuga(_("Not enough memory to read file %s\n"),sites
);
208 while(regs
<TopSitesNum
&& (buf
=longline_read(fp_in
,line
))!=NULL
) {
209 getword_start(&gwarea
,buf
);
210 if (getword_atoll(&nacc
,&gwarea
,'\t')<0) {
211 debuga(_("Maybe you have a broken record or garbage in your %s file\n"),sites
);
214 if (nacc
== 0) continue;
215 if (getword_atoll(&nbytes
,&gwarea
,'\t')<0 || getword_atoll(&ntime
,&gwarea
,'\t')<0) {
216 debuga(_("Maybe you have a broken record or garbage in your %s file\n"),sites
);
219 if (getword_ptr(buf
,&url
,&gwarea
,'\t')<0) {
220 debuga(_("The url is invalid in file %s\n"),sites
);
228 strcpy(wwork1
,fixnum(twork1
,1));
229 strcpy(wwork2
,fixnum(twork2
,1));
230 strcpy(wwork3
,fixtime(twork3
));
232 fprintf(fp_ou
,"<tr><td class=\"data\">%d</td><td class=\"data2 link\">",++regs
);
234 if(BlockIt
[0] != '\0') {
235 fprintf(fp_ou
,"<a href=\"%s%s?url=\"",wwwDocumentRoot
,BlockIt
);
236 output_html_url(fp_ou
,url
);
237 fputs("\"><img src=\"../images/sarg-squidguard-block.png\"></a> ",fp_ou
);
240 fputs("<a href=\"http://",fp_ou
);
241 output_html_url(fp_ou
,url
);
243 output_html_string(fp_ou
,url
,100);
244 fprintf(fp_ou
,"</a></td><td class=\"data\">%s</td><td class=\"data\">%s</td><td class=\"data\">%s</td></tr>\n",wwork1
,wwork2
,wwork3
);
247 longline_destroy(&line
);
249 fputs("</table></div>\n",fp_ou
);
250 if (write_html_trailer(fp_ou
)<0)
251 debuga(_("Write error in file %s\n"),report
);
252 if (fclose(fp_ou
)==EOF
)
253 debuga(_("Failed to close file %s - %s\n"),report
,strerror(errno
));