]> git.ipfire.org Git - thirdparty/sarg.git/blame - email.c
mkdir is really a mess on MinGW
[thirdparty/sarg.git] / email.c
CommitLineData
25697a35 1/*
94ff9470 2 * SARG Squid Analysis Report Generator http://sarg.sourceforge.net
67302a9e 3 * 1998, 2013
25697a35
GS
4 *
5 * SARG donations:
6 * please look at http://sarg.sourceforge.net/donations.php
1164c474
FM
7 * Support:
8 * http://sourceforge.net/projects/sarg/forums/forum/363374
25697a35
GS
9 * ---------------------------------------------------------------------
10 *
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.
15 *
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.
20 *
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.
24 *
25 */
26
27#include "include/conf.h"
5f3cfd1d 28#include "include/defs.h"
25697a35 29
9dc20988
FM
30#ifdef ENABLE_DOUBLE_CHECK_DATA
31extern struct globalstatstruct globstat;
32#endif
33
2824ec9b 34int geramail(const char *dirname, int debug, const char *outdir, const char *email, const char *TempDir)
25697a35 35{
9bd92830
FM
36 FILE *fp_in, *fp_top1, *fp_top2, *fp_top3;
37 long long int ttnbytes=0, ttnacc=0, tnacc=0;
38 long long int tnbytes=0, ttnelap=0, tnelap=0;
39 long long int nacc, nbytes, elap;
40 long long int avgacc, avgelap;
41 double perc=0.00;
42 double perc2=0.00;
43 int posicao=0;
44 char olduser[MAX_USER_LEN], csort[MAXLEN];
45 char wger[MAXLEN], top1[MAXLEN], top2[MAXLEN], top3[MAXLEN], user[MAX_USER_LEN];
46 char strip1[MAXLEN], strip2[MAXLEN], strip3[MAXLEN], strip4[MAXLEN], strip5[MAXLEN], strip6[MAXLEN], strip7[MAXLEN];
47 char *buf;
48 char warea[MAXLEN];
9e023838 49 char Subject[120];
9bd92830
FM
50 int totuser=0;
51 time_t t;
52 struct tm *local;
53 int cstatus;
54 struct getwordstruct gwarea;
55 struct generalitemstruct item;
56 longline line;
57 const struct userinfostruct *uinfo;
58
59 snprintf(wger,sizeof(wger),"%s/sarg-general",dirname);
60 if((fp_in=fopen(wger,"r"))==NULL) {
d6f0349d 61 debuga(_("(email) Cannot open file %s: %s\n"),wger,strerror(errno));
9bd92830
FM
62 exit(EXIT_FAILURE);
63 }
64
9bd92830
FM
65 snprintf(top2,sizeof(top2),"%s/top.tmp",dirname);
66 if((fp_top2=fopen(top2,"w"))==NULL) {
d6f0349d 67 debuga(_("(email) Cannot open file %s: %s\n"),top2,strerror(errno));
9bd92830
FM
68 exit(EXIT_FAILURE);
69 }
70
71 olduser[0]='\0';
72 totuser=0;
73
74 if ((line=longline_create())==NULL) {
75 debuga(_("Not enough memory to read file %s\n"),wger);
76 exit(EXIT_FAILURE);
77 }
78
79 while((buf=longline_read(fp_in,line))!=NULL) {
80 ger_read(buf,&item,wger);
81 if(item.total) continue;
007905af 82 if(strcmp(olduser,item.user) != 0) {
9bd92830
FM
83 totuser++;
84
85 if (olduser[0] != '\0') {
25697a35 86#if defined(__FreeBSD__)
9bd92830 87 fprintf(fp_top2,"%s\t%qu\t%qu\t%qu\n",olduser,tnbytes,tnacc,tnelap);
25697a35 88#else
9bd92830 89 fprintf(fp_top2,"%s\t%"PRIu64"\t%"PRIu64"\t%"PRIu64"\n",olduser,(uint64_t)tnbytes,(uint64_t)tnacc,(uint64_t)tnelap);
25697a35 90#endif
9bd92830
FM
91 ttnbytes+=tnbytes;
92 ttnacc+=tnacc;
93 ttnelap+=tnelap;
94 }
95 strcpy(olduser,item.user);
96 tnbytes=0;
97 tnacc=0;
98 tnelap=0;
99 }
100
101 tnbytes+=item.nbytes;
102 tnacc+=item.nacc;
103 tnelap+=item.nelap;
104 }
105 fclose(fp_in);
106 longline_destroy(&line);
107
108 if (olduser[0] != '\0') {
25697a35 109#if defined(__FreeBSD__)
9bd92830 110 fprintf(fp_top2,"%s\t%qu\t%qu\t%qu\n",olduser,tnbytes,tnacc,tnelap);
25697a35 111#else
9bd92830 112 fprintf(fp_top2,"%s\t%"PRIu64"\t%"PRIu64"\t%"PRIu64"\n",olduser,(uint64_t)tnbytes,(uint64_t)tnacc,(uint64_t)tnelap);
25697a35 113#endif
9bd92830
FM
114 ttnbytes+=tnbytes;
115 ttnacc+=tnacc;
116 ttnelap+=tnelap;
117 }
118
507460ae
FM
119 if (fclose(fp_top2)==EOF) {
120 debuga(_("Write error in %s: %s\n"),top2,strerror(errno));
121 exit(EXIT_FAILURE);
122 }
9bd92830 123
9dc20988
FM
124#ifdef ENABLE_DOUBLE_CHECK_DATA
125 if (ttnacc!=globstat.nacc || ttnbytes!=globstat.nbytes || ttnelap!=globstat.elap) {
126 debuga(_("Total statistics mismatch when reading %s to produce the email report\n"),wger);
127 exit(EXIT_FAILURE);
128 }
129#endif
130
78eeb33f
FM
131 if (snprintf(csort,sizeof(csort),"sort -n -T \"%s\" -t \"\t\" -r -k 2,2 -o \"%s\" \"%s\"", TempDir, top1, top2)>=sizeof(csort)) {
132 debuga(_("Sort command too long when sorting file \"%s\" to \"%s\"\n"),top2,top1);
133 exit(EXIT_FAILURE);
134 }
9bd92830
FM
135 cstatus=system(csort);
136 if (!WIFEXITED(cstatus) || WEXITSTATUS(cstatus)) {
137 debuga(_("sort command return status %d\n"),WEXITSTATUS(cstatus));
138 debuga(_("sort command: %s\n"),csort);
139 exit(EXIT_FAILURE);
140 }
141
11767c6a
FM
142 if (!KeepTempLog && unlink(top2)) {
143 debuga(_("Cannot delete \"%s\": %s\n"),top2,strerror(errno));
08f9b029
FM
144 exit(EXIT_FAILURE);
145 }
9bd92830
FM
146
147 if((fp_top1=fopen(top1,"r"))==NULL) {
d6f0349d 148 debuga(_("(email) Cannot open file %s: %s\n"),top1,strerror(errno));
9bd92830
FM
149 exit(EXIT_FAILURE);
150 }
151
152 snprintf(top3,sizeof(top3),"%s/report",dirname);
153 if((fp_top3=fopen(top3,"w"))==NULL) {
d6f0349d 154 debuga(_("(email) Cannot open file %s: %s\n"),top3,strerror(errno));
9bd92830
FM
155 exit(EXIT_FAILURE);
156 }
157
a87d4d11 158 safe_strcpy(strip1,_("Squid User Access Report"),sizeof(strip1));
9bd92830
FM
159 strip_latin(strip1);
160 fprintf(fp_top3,"%s\n",strip1);
161
a87d4d11 162 safe_strcpy(strip1,_("Decreasing Access (bytes)"),sizeof(strip1));
9bd92830
FM
163 strip_latin(strip1);
164 fprintf(fp_top3,"%s\n",strip1);
165
a87d4d11 166 safe_strcpy(strip1,_("Period"),sizeof(strip1));
9bd92830
FM
167 strip_latin(strip1);
168 fprintf(fp_top3,"%s %s\n\n",strip1,period.text);
169
a87d4d11 170 safe_strcpy(strip1,_("NUM"),sizeof(strip1));
9bd92830 171 strip_latin(strip1);
a87d4d11 172 safe_strcpy(strip2,_("USERID"),sizeof(strip2));
9bd92830 173 strip_latin(strip2);
a87d4d11 174 safe_strcpy(strip3,_("CONNECT"),sizeof(strip3));
9bd92830 175 strip_latin(strip3);
a87d4d11 176 safe_strcpy(strip4,_("BYTES"),sizeof(strip4));
9bd92830 177 strip_latin(strip4);
a87d4d11 178 safe_strcpy(strip5,_("ELAPSED TIME"),sizeof(strip5));
9bd92830 179 strip_latin(strip5);
a87d4d11 180 safe_strcpy(strip6,_("MILLISEC"),sizeof(strip6));
9bd92830 181 strip_latin(strip6);
eb7ab620 182 safe_strcpy(strip7,pgettext("duration","TIME"),sizeof(strip7));
9bd92830
FM
183 strip_latin(strip7);
184
185 fprintf(fp_top3,"%-7s %-20s %-8s %-15s %%%-6s %-10s %-10s %%%-7s\n------- -------------------- -------- --------------- ------- ---------- ---------- -------\n",strip1,strip2,strip3,strip4,strip4,strip5,strip6,strip7);
186
007905af 187 while(fgets(warea,sizeof(warea),fp_top1)) {
9bd92830
FM
188 fixendofline(warea);
189 getword_start(&gwarea,warea);
190 if (getword(user,sizeof(user),&gwarea,'\t')<0) {
191 debuga(_("There is an invalid user ID in file %s\n"),top1);
192 exit(EXIT_FAILURE);
193 }
194 if (getword_atoll(&nbytes,&gwarea,'\t')<0) {
195 debuga(_("There is an invalid number of bytes in file %s\n"),top1);
196 exit(EXIT_FAILURE);
197 }
198 if (getword_atoll(&nacc,&gwarea,'\t')<0) {
199 debuga(_("There is an invalid number of access in file %s\n"),top1);
200 exit(EXIT_FAILURE);
201 }
202 if (getword_atoll(&elap,&gwarea,'\0')<0) {
203 debuga(_("There is an invalid elapsed time in file %s\n"),top1);
204 exit(EXIT_FAILURE);
205 }
206
207 uinfo=userinfo_find_from_id(user);
208 if (!uinfo) {
209 debuga(_("Unknown user ID %s in file %s\n"),user,top1);
210 exit(EXIT_FAILURE);
211 }
212
213 perc=(ttnbytes) ? nbytes * 100. / ttnbytes : 0;
214 perc2=(ttnelap) ? elap * 100. / ttnelap : 0;
215
216 posicao++;
25697a35
GS
217
218#if defined(__FreeBSD__)
9bd92830 219 fprintf(fp_top3,"%7d %20s %8lld %15s %3.2lf%% %10s %10qu %3.2lf%%\n",posicao,uinfo->label,nacc,fixnum(nbytes,1),perc,buildtime(elap),elap,perc2);
25697a35 220#else
9bd92830 221 fprintf(fp_top3,"%7d %20s %8"PRIu64" %15s %3.2lf%% %10s %10"PRIu64" %3.2lf%%\n",posicao,uinfo->label,(uint64_t)nacc,fixnum(nbytes,1),perc,buildtime(elap),(uint64_t)elap,perc2);
25697a35 222#endif
9bd92830 223 }
02808722 224
9bd92830
FM
225 // output total
226 fputs("------- -------------------- -------- --------------- ------- ---------- ---------- -------\n",fp_top3);
25697a35 227#if defined(__FreeBSD__)
9bd92830 228 fprintf(fp_top3,"%-7s %20s %8qu %15s %8s %9s %10qu\n",_("TOTAL")," ",ttnacc,fixnum(ttnbytes,1)," ",buildtime(ttnelap),ttnelap);
25697a35 229#else
9bd92830 230 fprintf(fp_top3,"%-7s %20s %8"PRIu64" %15s %8s %9s %10"PRIu64"\n",_("TOTAL")," ",(uint64_t)ttnacc,fixnum(ttnbytes,1)," ",buildtime(ttnelap),(uint64_t)ttnelap);
25697a35 231#endif
25697a35 232
9bd92830
FM
233 // compute and write average
234 if (totuser>0) {
235 tnbytes=(totuser) ? ttnbytes / totuser : 0;
236 avgacc=ttnacc/totuser;
237 avgelap=ttnelap/totuser;
238 } else {
239 tnbytes=0;
240 avgacc=0;
241 avgelap=0;
242 }
243
a87d4d11 244 safe_strcpy(strip1,_("AVERAGE"),sizeof(strip1));
9bd92830 245 strip_latin(strip1);
25697a35 246#if defined(__FreeBSD__)
9bd92830 247 fprintf(fp_top3,"%-7s %20s %8qu %15s %8s %9s %10qu\n",strip1," ",avgacc,fixnum(tnbytes,1)," ",buildtime(avgelap),avgelap);
25697a35 248#else
9bd92830 249 fprintf(fp_top3,"%-7s %20s %8"PRIu64" %15s %8s %9s %10"PRIu64"\n",strip1," ",(uint64_t)avgacc,fixnum(tnbytes,1)," ",buildtime(avgelap),(uint64_t)avgelap);
25697a35 250#endif
25697a35 251
9bd92830 252 fclose(fp_top1);
11767c6a
FM
253 if (!KeepTempLog && unlink(top1)) {
254 debuga(_("Cannot delete \"%s\": %s\n"),top1,strerror(errno));
08f9b029
FM
255 exit(EXIT_FAILURE);
256 }
25697a35 257
9bd92830
FM
258 t = time(NULL);
259 local = localtime(&t);
260 fprintf(fp_top3, "\n%s\n", asctime(local));
25697a35 261
507460ae
FM
262 if (fclose(fp_top3)==EOF) {
263 debuga(_("Write error in %s: %s\n"),top3,strerror(errno));
264 exit(EXIT_FAILURE);
265 }
25697a35 266
9bd92830
FM
267 if(strcmp(email,"stdout") == 0) {
268 if((fp_top3=fopen(top3,"r"))==NULL) {
d6f0349d 269 debuga(_("(email) Cannot open file %s: %s\n"),top3,strerror(errno));
9bd92830
FM
270 exit(EXIT_FAILURE);
271 }
25697a35 272
9bd92830
FM
273 while(fgets(warea,sizeof(warea),fp_top3)!=NULL)
274 fputs(warea,stdout);
ef4acae5
FM
275 if (fclose(fp_top3)==EOF) {
276 debuga(_("Read error in temporary mail file %s: %s\n"),top3,strerror(errno));
277 exit(EXIT_FAILURE);
278 }
9bd92830 279 } else {
9e023838 280 /* TRANSLATORS: The string is formatted using strftime. You can use
cf80155e 281 any string formatting marker allowed by strftime. */
9e023838 282 strftime(Subject,sizeof(Subject),_("SARG report, %c"),local);
bde5073d 283 snprintf(warea,sizeof(warea),"%s -s \"%s\" \"%s\" <\"%s\"",MailUtility,Subject,email,top3);
9e023838
FM
284 if (debug)
285 debuga(_("Sending mail with command: %s\n"),warea);
9bd92830
FM
286 cstatus=system(warea);
287 if (!WIFEXITED(cstatus) || WEXITSTATUS(cstatus)) {
288 debuga(_("command return status %d\n"),WEXITSTATUS(cstatus));
289 debuga(_("command: %s\n"),warea);
290 exit(EXIT_FAILURE);
291 }
292 }
fb7c5f27 293
9bd92830 294 //unlinkdir(TempDir,0);
25697a35 295
9bd92830 296 return (0);
25697a35 297}