]>
git.ipfire.org Git - thirdparty/sarg.git/blob - useragent.c
2 * AUTHOR: Pedro Lineu Orso pedro.orso@gmail.com
4 * SARG Squid Analysis Report Generator http://sarg.sourceforge.net
7 * please look at http://sarg.sourceforge.net/donations.php
8 * ---------------------------------------------------------------------
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.
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.
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.
26 #include "include/conf.h"
27 #include "include/defs.h"
32 FILE * fp_in
= NULL
, * fp_ou
= NULL
, * fp_ht
= NULL
;
33 char ip
[ MAXLEN
], data
[ MAXLEN
], agent
[ MAXLEN
], user
[ MAXLEN
];
34 char ipbefore
[ MAXLEN
], namebefore
[ MAXLEN
];
36 char user_old
[ MAXLEN
]= "$#%0a3bc6" ;
37 char agent_old
[ MAXLEN
]= "$#%0a3bc6" ;
39 char idate
[ MAXLEN
], fdate
[ MAXLEN
];
40 int agentot
= 0 , agentot2
= 0 , agentdif
= 0 , cont
= 0 , nagent
;
41 unsigned long totregsl
= 0 ;
44 struct getwordstruct gwarea
;
55 sprintf ( tmp3
, "%s/squagent.unsort" , TempDir
);
56 sprintf ( tmp2
, "%s/squagent.log" , TempDir
);
58 if (( fp_in
= fopen ( UserAgentLog
, "r" ))== NULL
) {
59 fprintf ( stderr
, "SARG: (useragent) %s: %s \n " , text
[ 45 ], UserAgentLog
);
63 if (( fp_ou
= fopen ( tmp3
, "w" ))== NULL
) {
64 fprintf ( stderr
, "SARG: (email) %s: %s \n " , text
[ 45 ], tmp3
);
69 debuga ( "%s: %s" , text
[ 66 ], UserAgentLog
);
72 while ( fgets ( buf
, sizeof ( buf
), fp_in
)!= NULL
) {
74 getword_start (& gwarea
, buf
);
75 if ( getword ( ip
, sizeof ( ip
),& gwarea
, ' ' )< 0 || getword_skip ( MAXLEN
,& gwarea
, '[' )< 0 ||
76 getword ( data
, sizeof ( data
),& gwarea
, ' ' )< 0 ) {
77 printf ( "SARG: Maybe you have a broken record or garbage in your %s file. \n " , UserAgentLog
);
82 if ( getword_skip ( MAXLEN
,& gwarea
, '"' )< 0 || getword ( agent
, sizeof ( agent
),& gwarea
, '"' )< 0 ) {
83 printf ( "SARG: Maybe you have a broken record or garbage in your %s file. \n " , UserAgentLog
);
88 if ( strstr ( warea
, "SCRIPT" ) != 0 || strstr ( warea
, "ONLOAD" ) != 0 )
91 if ( strlen ( gwarea
. current
)) {
92 if ( getword_skip ( MAXLEN
,& gwarea
, ' ' )< 0 || getword ( user
, sizeof ( user
),& gwarea
, ' \n ' )< 0 ) {
93 printf ( "SARG: Maybe you have a broken record or garbage in your %s file. \n " , UserAgentLog
);
100 if ( strlen ( user
) == 0 )
103 fprintf ( fp_ou
, "%s \t %s \t %s \n " , ip
, agent
, user
);
110 debuga ( " %s: %ld" , text
[ 10 ], totregsl
);
117 debuga ( "%s: %s" , text
[ 54 ], tmp2
);
120 sprintf ( csort
, "sort -n -t \"\t\" -k 3,3 -k 2,2 -k 1,1 -o \" %s \" \" %s \" " , tmp2
, tmp3
);
121 cstatus
= system ( csort
);
122 if (! WIFEXITED ( cstatus
) || WEXITSTATUS ( cstatus
)) {
123 fprintf ( stderr
, "SARG: sort command return status %d \n " , WEXITSTATUS ( cstatus
));
124 fprintf ( stderr
, "SARG: sort command: %s \n " , csort
);
127 if (( fp_in
= fopen ( tmp2
, "r" ))== NULL
) {
128 fprintf ( stderr
, "SARG: (useragent) %s: %s \n " , text
[ 45 ], tmp2
);
129 fprintf ( stderr
, "SARG: sort command: %s \n " , csort
);
135 sprintf ( hfile
, "%s/%s/useragent.html" , outdir
, period
);
136 if (( fp_ht
= fopen ( hfile
, "w" ))== NULL
) {
137 fprintf ( stderr
, "SARG: (useragent) %s: %s \n " , text
[ 45 ], hfile
);
142 debuga ( "%s" , text
[ 72 ]);
144 fprintf ( fp_ht
, "<!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
);
146 fputs ( "</head> \n " , fp_ht
);
147 //if(FontFace[0] != '\0') fprintf(fp_ht,"<font face=\"%s\">\n",FontFace);
148 fprintf ( fp_ht
, "<body bgcolor= \" %s \" text= \" %s \" background= \" %s \" > \n " , BgColor
, TxColor
, BgImage
);
149 write_logo_image ( fp_ht
);
151 if ( strcmp ( IndexTree
, "date" ) == 0 )
152 show_sarg ( fp_ht
, "../../.." );
154 show_sarg ( fp_ht
, ".." );
155 fputs ( "<div align= \" center \" ><table cellpadding= \" 0 \" cellspacing= \" 0 \" > \n " , fp_ht
);
156 fprintf ( fp_ht
, "<tr><th align= \" center \" colspan= \" 2 \" ><b><font color= \" %s \" size= \" +1 \" >%s</font></b></th></tr> \n " , TiColor
, text
[ 105 ]);
158 fputs ( "<tr><td></td></tr><tr><td></td></tr>" , fp_ht
);
159 fputs ( "</table></div> \n " , fp_ht
);
161 fputs ( "<div align= \" center \" ><table cellpadding= \" 0 \" cellspacing= \" 0 \" > \n " , fp_ht
);
163 fprintf ( fp_ht
, "<tr><td align= \" right \" bgcolor= \" %s \" >%s:<td align= \" left \" bgcolor= \" %s \" >%s - %s</td></td></tr> \n " , HeaderBgColor
, text
[ 89 ], TxBgColor
, idate
, fdate
);
165 fputs ( "</table></div> \n " , fp_ht
);
166 fputs ( "<div align= \" center \" ><table cellpadding= \" 0 \" cellspacing= \" 0 \" > \n " , fp_ht
);
167 fputs ( "<tr><td></td><td></td></tr>" , fp_ht
);
169 fprintf ( fp_ou
, "<tr><th align= \" left \" bgcolor= \" %s \" ><font color= \" %s \" >%s</font></th><th bgcolor= \" %s \" align= \" left \" ><font color= \" %s \" >%s</font></th></tr> \n " , HeaderBgColor
, HeaderColor
, text
[ 98 ], HeaderBgColor
, HeaderColor
, text
[ 106 ]);
171 while ( fgets ( buf
, sizeof ( buf
), fp_in
)!= NULL
) {
172 getword_start (& gwarea
, buf
);
173 if ( getword ( ip
, sizeof ( ip
),& gwarea
, ' \t ' )< 0 ) {
174 printf ( "SARG: Maybe you have a broken record or garbage in your %s file. \n " , tmp2
);
179 if ( strcmp ( ip
, ipbefore
) != 0 ) {
181 ip2name ( ip
, sizeof ( ip
));
182 strcpy ( namebefore
, ip
);
183 } else strcpy ( ip
, namebefore
);
186 if ( getword ( agent
, sizeof ( agent
),& gwarea
, ' \t ' )< 0 ||
187 getword ( user
, sizeof ( user
),& gwarea
, ' \t ' )< 0 ) {
188 printf ( "SARG: Maybe you have a broken record or garbage in your %s file. \n " , tmp2
);
192 if ( strcmp ( user
, user_old
) != 0 ) {
193 fprintf ( fp_ht
, "<tr><td align= \" left \" bgcolor= \" %s \" >%s</td><td align= \" left \" bgcolor= \" %s \" >%s</td></tr> \n " , TxBgColor
, user
, TxBgColor
, agent
);
194 strcpy ( user_old
, user
);
195 strcpy ( agent_old
, agent
);
197 if ( strcmp ( agent
, agent_old
) != 0 ) {
198 fprintf ( fp_ht
, "<tr><td></td><td align= \" left \" bgcolor= \" %s \" >%s</td></tr> \n " , TxBgColor
, agent
);
199 strcpy ( agent_old
, agent
);
204 fputs ( "</table> \n " , fp_ht
);
208 sprintf ( csort
, "sort -t \"\t\" -k 2,2 -o \" %s \" \" %s \" " , tmp3
, tmp2
);
209 cstatus
= system ( csort
);
210 if (! WIFEXITED ( cstatus
) || WEXITSTATUS ( cstatus
)) {
211 fprintf ( stderr
, "SARG: sort command return status %d \n " , WEXITSTATUS ( cstatus
));
212 fprintf ( stderr
, "SARG: sort command: %s \n " , csort
);
215 if (( fp_in
= fopen ( tmp3
, "r" ))== NULL
) {
216 fprintf ( stderr
, "SARG: (useragent) %s: %s \n " , text
[ 45 ], tmp3
);
217 fprintf ( stderr
, "SARG: sort command: %s \n " , csort
);
223 if (( fp_ou
= fopen ( tmp2
, "w" ))== NULL
) {
224 fprintf ( stderr
, "SARG: (useragent) %s: %s \n " , text
[ 45 ], tmp2
);
231 while ( fgets ( buf
, sizeof ( buf
), fp_in
)!= NULL
) {
232 getword_start (& gwarea
, buf
);
233 if ( getword ( ip
, sizeof ( ip
),& gwarea
, ' \t ' )< 0 ||
234 getword ( agent
, sizeof ( agent
),& gwarea
, ' \t ' )< 0 ) {
235 printf ( "SARG: Maybe you have a broken record or garbage in your %s file. \n " , tmp
);
241 strcpy ( agent_old
, agent
);
244 if ( strcmp ( agent
, agent_old
) != 0 ) {
246 fprintf ( fp_ou
, "%06d %s \n " , agentot
, agent_old
);
247 strcpy ( agent_old
, agent
);
254 fprintf ( fp_ou
, "%06d %s \n " , agentot
, agent
);
262 sprintf ( csort
, "sort -n -r -k 1,1 -o \" %s \" \" %s \" " , tmp3
, tmp2
);
263 cstatus
= system ( csort
);
264 if (! WIFEXITED ( cstatus
) || WEXITSTATUS ( cstatus
)) {
265 fprintf ( stderr
, "SARG: sort command return status %d \n " , WEXITSTATUS ( cstatus
));
266 fprintf ( stderr
, "SARG: sort command: %s \n " , csort
);
269 if (( fp_in
= fopen ( tmp3
, "r" ))== NULL
) {
270 fprintf ( stderr
, "SARG: (useragent) %s: %s \n " , text
[ 45 ], tmp3
);
271 fprintf ( stderr
, "SARG: sort command: %s \n " , csort
);
277 if (( fp_ht
= fopen ( hfile
, "a" ))== NULL
) {
278 fprintf ( stderr
, "SARG: (useragent) %s: %s \n " , text
[ 45 ], hfile
);
282 fputs ( "<br><br> \n " , fp_ht
);
284 fputs ( "<div align= \" center \" ><table cellpadding= \" 0 \" cellspacing= \" 0 \" > \n " , fp_ht
);
285 fprintf ( fp_ht
, "<tr><th align= \" left \" bgcolor= \" %s \" ><font color= \" %s \" >%s</font></th><th bgcolor= \" %s \" align= \" left \" ><font color= \" %s \" >%s</font></th><th align= \" center \" bgcolor= \" %s \" ><font color= \" %s \" >%%</font></th></tr> \n " , HeaderBgColor
, HeaderColor
, text
[ 106 ], HeaderBgColor
, HeaderColor
, text
[ 107 ], HeaderBgColor
, HeaderColor
);
288 while ( fgets ( buf
, sizeof ( buf
), fp_in
)!= NULL
) {
290 getword_start (& gwarea
, buf
);
291 if ( getword ( tagent
, sizeof ( tagent
),& gwarea
, ' ' )< 0 ) {
292 printf ( "SARG: Maybe you have a broken record or garbage in your %s file. \n " , tmp
);
298 perc
= perc
/ agentot2
;
301 fprintf ( fp_ht
, "<tr><td align= \" left \" bgcolor= \" %s \" >%s</td><td align= \" right \" bgcolor= \" %s \" >%d</td><td align= \" right \" bgcolor= \" %s \" >%3.2f</td></tr> \n " , TxBgColor
, gwarea
. current
, TxBgColor
, nagent
, TxBgColor
, perc
);
304 fputs ( "</table></html> \n " , fp_ht
);
305 if ( strcmp ( ShowSargInfo
, "yes" ) == 0 ) {
306 zdate ( ftime
, sizeof ( ftime
), DateFormat
);
307 fprintf ( fp_ht
, "<br><br><div align= \" center \" ><font size= \" -2 \" >%s <a href= \" %s \" >%s-%s</a> %s %s</font></div> \n " , text
[ 108 ], URL
, PGM
, VERSION
, text
[ 109 ], ftime
);
310 fputs ( "</table> \n </body> \n </html> \n " , fp_ht
);