src/strip.vala
[app.mailtrimmer] / src / strip.vala
1 /**
2
3  ** check left to do:  
4   - range scans on maildir
5   - see how replacing the links works in the resulting email via thunderbird etc..
6   - some checksum issues (see dupelicates?? suspect 0byte issues?)  -- seems ok now?
7  
8
9
10
11   needs to scan 2 things
12   a) our mailfort email database
13        point it at the top directory, containing YEAR/MONTH/DAY.... directories.
14        scan each file (over a year old...)
15        extract out the attachment, and replace with HTML
16        DATABASE? - mysql or sqlite? - 
17            filesize / name / date / checksum / mimetype -- into mailfort should be OK.
18   b) the imap user emails
19            loop through user's directories
20            check age of email .. over 1 years..
21            ?? how to prevent 'repeat' scanning of emails?
22               ??? hidden '.' files containing last scan date?
23
24            check if file exists in our DB.. - replace the link...
25            otherwise generate a file. + add to DB...
26            
27    c) retreival system
28      -> URL -> get file
29    d) redirect system.
30      -> URL -> redirect to correct server
31
32
33 More notes on our Mailfort DB sync:
34 * some of these attachments are already in the database...
35  - so we need to update the DB..
36  - probably worth putting the code in a stored procedure..
37  
38  -- key scenarios
39    * first scan (and extract)
40    * rescan (as I messed up the first time - fix the DB...)
41    * email scan - attachments might not have related messages.
42  
43  
44  - {id} attachment_init(
45                 {exim_msg_id}
46                 {chksum}
47                 {filename),
48         )
49         // creates or returns id (can look for existing messages?
50         // can do a merge?? - copy 'old' record data into 'new'....  "prefer checksummed"
51         
52         attachment_update(
53                 {id}
54                 {exim_msg_id}
55                 {mailfort_msg_sig}
56                 {file_size}
57                 {created} // message date..
58                 {chksum}
59                 {filename),
60         {mime_type}
61         )
62         attachment_update_store(
63                         {id}
64                         {stored_filename}
65         )
66
67
68 */ 
69
70 // valac --pkg gmime --vapi
71 /*
72
73 // http://www.fromdual.com/mysql-vala-program-example << check mysql if this does not work.
74
75  valac  -g --vapidir=. --thread  strip.vala   --vapidir=../vapi \
76      --pkg glib-2.0 --pkg mysql --pkg gio-2.0 --pkg posix --pkg gmime-2.6 \
77       --Xcc=-lmysqlclient  -v \
78        -o /tmp/strip
79 */ 
80  
81 public class StripApplication : GLib.Application {
82
83         public static string? opt_path = null;
84         public static string? opt_file = null;  
85         public static string? opt_target_path = null;
86         public static string? opt_db_host = "127.0.0.1";
87         public static string? opt_db_name = null;       
88         public static string? opt_db_user = null;               
89         public static string? opt_db_pass = null;               
90
91         public static int    opt_limit = -1;
92
93         public static int    opt_age_newest = 1;
94         public static int    opt_age_oldest = 6;
95
96
97         public static bool      opt_is_extracting = false;
98         public static bool      opt_is_replacing = false;
99         public static bool      opt_scan_maildir  = false; 
100         public static bool      opt_scan_mailfort  = false;     
101         public static bool              opt_dump = false;       
102         public static bool              opt_debug = false; 
103         
104         public static bool opt_debug_sql = false;       
105         public static string? opt_replace_link = null;
106         
107         
108         public const GLib.OptionEntry[] options = {
109                 
110                 { "debug", 0, 0, OptionArg.NONE, ref opt_debug, "show debug messages for components", null },
111                 { "debug-sql", 0, 0, OptionArg.NONE, ref opt_debug_sql, "debug the SQL statements", null },         
112
113                 { "path", 0, 0, OptionArg.STRING, ref opt_path, "Directory where email to be parsed is", null },        
114                 { "file", 0, 0, OptionArg.STRING, ref opt_file, "A specific file to be parsed", null }, 
115
116                 { "target-path", 0, 0, OptionArg.STRING, ref opt_target_path, "Directory where attachments are to be put", null },
117
118                 { "link", 0, 0, OptionArg.STRING, ref opt_replace_link, "url for the replement link: eg. http://www.mysite.com/xxxx/%s", null },         
119                         
120                 { "host", 0, 0, OptionArg.STRING, ref opt_db_host, "Mysql host (default localhost)", null },    
121                 { "name", 0, 0, OptionArg.STRING, ref opt_db_name, "Mysql database name REQUIRED", null },      
122                 { "user", 0, 0, OptionArg.STRING, ref opt_db_user, "Mysql database user REQUIRED", null },      
123                 { "pass", 0, 0, OptionArg.STRING, ref opt_db_pass, "Mysql database password (default empty)", null },            
124
125                 { "extract", 0, 0, OptionArg.NONE, ref opt_is_extracting, "Should attachments be extracted (default NO)", null },
126                 { "replace", 0, 0, OptionArg.NONE, ref opt_is_replacing, "Should attachments be replaced (default NO)", null },
127                 { "dump", 0, 0, OptionArg.NONE, ref opt_dump, "Print the replaced mail contents to stdout", null },         
128
129                 { "limit", 0, 0, OptionArg.INT, ref opt_limit, "stop after X number of messages with attachments have been processed", null },         
130                 { "newest", 0, 0, OptionArg.INT, ref opt_age_newest, "do not replace messages newer that X months (default is 1 months)", null },
131                 { "oldest", 0, 0, OptionArg.INT, ref opt_age_oldest, "do not replace messages older than X (default is 6 months)", null },
132
133                 { "scan-maildir", 0, 0, OptionArg.NONE, ref opt_scan_maildir, "scan an maildir tree", null },
134                 { "scan-mailfort", 0, 0, OptionArg.NONE, ref opt_scan_mailfort, "scan a mailfort tree", null },  
135                 { null }       
136         };         
137     public StripApplication( string[] args ) 
138     {
139                  Object(
140             application_id: "org.roojs.mailstripper",
141             flags: ApplicationFlags.FLAGS_NONE
142          );
143  
144                         
145          var opt_context =  new GLib.OptionContext ("Mail Stripper");
146                         
147          try {
148                                 
149             opt_context.set_help_enabled (true);
150             opt_context.add_main_entries (options, null);
151             opt_context.parse ( ref  args);
152             //opt_detach = !optx_no_detach;
153                             
154  
155                             
156              // options that have to be set.. bee or hive... (or stop all)
157             if ((!opt_scan_mailfort && !opt_scan_maildir) || (opt_scan_mailfort && opt_scan_maildir))  {
158                stdout.printf ("You must specify the type of directory tree to scan - either imap or mailfort\n%s",
159                    opt_context.get_help(true, null));
160                GLib.Process.exit(Posix.EXIT_FAILURE);
161             }
162                         
163                          if ((opt_db_name == null || opt_db_name.length < 1 || opt_db_user == null || opt_db_user.length < 1))  {
164                stdout.printf ("You must specify the database name / user \n%s",
165                    opt_context.get_help(true, null));
166                GLib.Process.exit(Posix.EXIT_FAILURE);
167             }
168                          if ((opt_path == null || opt_path.length < 1)   )  {
169                stdout.printf ("You must specify the scan start path\n%s",
170                    opt_context.get_help(true, null));
171                GLib.Process.exit(Posix.EXIT_FAILURE);
172             }
173                         if (opt_replace_link == null || (opt_replace_link.length < 1))  {
174                stdout.printf ("You must specify the link to use in the replacement \n%s",
175                    opt_context.get_help(true, null));
176                GLib.Process.exit(Posix.EXIT_FAILURE);
177             }
178             if ((opt_is_replacing || opt_is_extracting ) && (opt_target_path == null || opt_target_path.length < 1)) {
179                       stdout.printf ("You must specify a target path to put attachments\n%s",
180                    opt_context.get_help(true, null));
181                GLib.Process.exit(Posix.EXIT_FAILURE);
182             }
183             
184             
185          } catch (GLib.OptionError e) {
186             stdout.printf ("error: %s\n", e.message);
187             stdout.printf ("Run '%s --help' to see a full list of available command line options.\n%s", 
188                       args[0], opt_context.get_help(true, null));
189             GLib.Process.exit(Posix.EXIT_FAILURE);
190          }
191         }
192          
193     public static int main(string[] args) 
194     {
195                 
196                 var application = new StripApplication(  args);
197                 
198                 GLib.Log.set_always_fatal(LogLevelFlags.LEVEL_ERROR | LogLevelFlags.LEVEL_CRITICAL); 
199            
200            if (opt_debug || opt_debug_sql) {
201                         GLib.Log.set_handler(null, 
202                         GLib.LogLevelFlags.LEVEL_DEBUG | GLib.LogLevelFlags.LEVEL_WARNING | GLib.LogLevelFlags.LEVEL_INFO, 
203                         (dom, lvl, msg) => {
204                                         print("%s\n", msg);
205                                 }
206                         );
207                 }
208         
209         GMime.init(0);
210                 if (StripApplication.opt_is_replacing) {
211                         StripApplication.opt_is_extracting = true;
212                 }
213   
214                 GLib.debug("scanning folder: %s", opt_path );
215                 
216                 var strip = new Strip( opt_path );
217  
218                 
219                 strip.mysql  = new Mysql.Database();
220                 if (!strip.mysql.real_connect(
221                                 opt_db_host,
222                                 opt_db_user ,
223                                 opt_db_pass == null ? "" : opt_db_pass, //passwd
224                                 opt_db_name, //DB
225                                 3306, // not changable...?
226                                 null
227                         )
228                 ) {
229                         stdout.printf("ERROR %u: Connection failed: %s\n", 
230                                 strip.mysql.errno(), strip.mysql.error()
231                         );
232
233                         return 1;
234                 }
235         if (opt_file != null) {
236                 strip.base_dir = opt_path;
237                 strip.scan_file( GLib.Path.get_dirname(opt_file),  GLib.Path.get_basename(opt_file));
238                 return 0;
239         }
240
241                 strip.scan_dir(opt_path, "");
242         
243
244         
245         return 0;
246     }
247 }
248
249 public class Strip : GLib.Object {
250         
251  
252         
253         public string base_dir = "";
254         
255         public Mysql.Database mysql;
256         
257         int processed = 0;
258     
259     uint64 used_space_before = 0;
260     uint64 used_space_after = 0;
261     
262     
263     public Strip(string base_dir)
264     {
265         this.base_dir = base_dir;
266     }
267     
268     public void handle_part(GMime.Object parent, GMime.Object mime_obj)
269     {
270                 if (mime_obj is GMime.Part) {
271                    var  p = (GMime.Part)mime_obj;
272                         var ct = p.get_content_type();
273                         var cd = p.get_content_disposition();
274                         
275                         var sid = p.get_header("X-strip-id");
276                     if (sid != null && sid.length > 0) {
277                         this.update_attachment_db(p);
278                             GLib.debug("Skip attachment replace - it's already been done");
279                         return;
280                         }
281                         
282                         if (cd == null || cd.get_disposition().down() != "attachment") {
283                                 return;
284                         }
285                         if (ct.get_media_type() == "text") {
286                                 return;
287                         }
288                         if (ct.to_string() == "application/pgp-encrypted") {
289                                 return;
290                         }
291                         if (ct.to_string() == "application/pgp-keys") {
292                                 return;
293                         }
294                         if (p.get_filename() == null) {
295                                 return;
296                         }
297                          // print("got part %s\n", ct.to_string());
298                          if (parent is GMime.Multipart) {
299                                 
300                                 this.replace_attachment(((GMime.Multipart)parent), p);
301                                 // remove it !?
302
303                           }
304
305
306                         return;
307                 }
308                 if (mime_obj is GMime.Multipart) {
309                         
310
311                         var  mp = (GMime.Multipart)mime_obj;
312                         //var ct = mp.get_content_type();
313
314                         //print("got multi-part %s\n", ct.to_string());
315                         for (var i = 0; i< mp.get_count(); i++) { 
316                           var mo = mp.get_part(i);
317                           this.handle_part(mime_obj,mo);
318                         }
319                    // ((GMime.Multipart)mime_obj).foreach((sub_obj) => {
320                    //     Strip.handle_part(sub_obj);
321                 //
322                    // });
323
324
325                         return;
326                 }
327
328                 if (mime_obj is GMime.MessagePart) {
329                         var msg = ((GMime.MessagePart)mime_obj).get_message();
330                         msg.foreach((subobj) => {
331                          this.handle_part(msg,subobj);
332                     });
333                 
334                         //print("got message-part\n");
335                         return;
336                 }
337                 
338                 if (mime_obj is GMime.Message) {
339                         var mp = ((GMime.Message) mime_obj).get_mime_part();
340
341                         if (!(mp is GMime.Multipart)) {
342                                 //GLib.debug("get mimepart does not return a Multipart?");
343                                 return;
344                         }
345                         
346                         var mpc = ((GMime.Multipart)mp).get_count();
347                         
348                         //GLib.debug("Message has %d parts", mpc); 
349                         for (var i =0 ; i < mpc; i++) {
350                                 //GLib.debug("Getting part %d", i); 
351                                 var submime_obj = ((GMime.Multipart)mp).get_part(i);
352                         this.handle_part(mp,submime_obj);                       
353                     }
354                         print("got message??\n");
355                         return;
356                 }
357                 
358                 print("got something else\n");
359
360
361     }
362     public void update_attachment_db(GMime.Part attachment)
363     {
364         // only called when we have an sid...
365         var sid = attachment.get_header("X-strip-id");
366         if (sid == null || sid.length < 1) {
367                 GLib.debug("Strange - update attachment db called ?");
368                 return;
369         }
370         
371         // initialize it with known data..
372         // that should wipe out dupes.
373         var matches = this.execute("SELECT id   FROM Attachment WHERE id = %d".printf(
374                         int.parse(sid)));  
375
376                  
377                 if (matches == "") {     
378                         // our old mailfort code deleted the crap out of old records...
379                         // if this occurs we will need to create the record again..
380                         this.fix_deleted_attachment_db(int.parse(sid),attachment);
381                         return;
382  
383                 }
384         
385         
386         // initialize it with known data..
387         // that should wipe out dupes.
388         var filesize = this.execute("SELECT filesize FROM Attachment WHERE id = %d".printf(
389                         int.parse(sid)));  
390
391                 if (filesize=="") {      
392                    GLib.error("Ignoring record id (missing in database) :%s", sid);
393                    return;
394                 }
395                 if (int.parse(filesize) < 1) {
396                 GLib.debug("Could not get filesize from id :%s = %s", sid,filesize);
397                 Posix.exit(0);
398                 return;
399         }
400         
401         var chksum = this.query("SELECT  checksum FROM Attachment WHERE id = %d".printf(
402                         int.parse(sid)
403                 ));
404         var mime_filename = this.query("SELECT  mime_filename FROM Attachment WHERE id = %d".printf(
405                         int.parse(sid)));       
406                 
407         this.query("""
408              SELECT 
409                  attachment_init(
410                      '%s', '%s', '%s', %d
411                  ) as id 
412                  
413           """.printf(
414                           this.mysql_escape(this.active_message_exim_id),
415                           this.mysql_escape(chksum),
416                           this.mysql_escape(mime_filename),                       
417                           int.parse(filesize)
418                 ));
419         this.query("""
420                  SELECT attachment_update(
421                       %d, -- in_id INT(11),
422                       '%s', -- in_mime_type varchar(255),
423                       '%s', -- in_created DATETIME,
424                       '%s' -- in_mailfort_sig varchar(64)
425                  )
426               """.printf(
427                         int.parse(sid),
428                         "", // this will be ignored..
429                                 this.created_date,
430                                 this.mysql_escape(this.active_message_x_mailfort_sig)
431               
432               )
433                 );
434                 this.mysql.store_result();
435                 
436
437     
438     }
439     
440     
441     public void fix_deleted_attachment_db(int id, GMime.Part attachment)
442     {
443                 
444         var filename = attachment.get_header("X-strip-content-name");
445         var file_path  = attachment.get_header("X-strip-path");
446         var fn =  StripApplication.opt_target_path + "/" + file_path;
447         var chksum = this.md5_file(fn);
448                 var mime_type = attachment.get_header("X-strip-content-type");
449
450                 var fileinfo = File.new_for_path(fn)
451                                         .query_info(GLib.FileAttribute.STANDARD_SIZE+","+GLib.FileAttribute.TIME_MODIFIED
452                                                 ,GLib.FileQueryInfoFlags.NONE,null);
453         var file_size = (int) fileinfo.get_size();
454
455                  
456       
457                 this.real_query(-1, """
458                        
459                        
460                                 INSERT INTO Attachment  (  
461                                         id, 
462                                         
463                                     msgid ,
464                                     queue_id ,
465                                     mime_filename ,
466                                     mime_type,
467                                      
468                                     stored_filename ,
469                                     mime_charset ,
470                                     mime_cdisp ,
471                                     mime_is_cover ,
472                                     
473                                     mime_is_multi ,
474                                     mime_is_mail,
475                                     mime_size ,
476                                     filesize,
477                                     
478                                     checksum,
479                                     created
480
481                                 ) VALUES (
482                                         %d,  -- id
483                                         
484                                     '%s' , -- msgid
485                                     0,
486                                     '%s'  , -- filename
487                                     '%s',  -- mimetype
488                                     
489                                     '%s', -- stored file anme
490                                     '', -- charset
491                                     'attachment',
492                                     0,
493                                     0,
494                                     0,
495                                     %d, -- size
496                                     %d, -- size
497                                     
498                                     '%s', -- checkum
499                                         '%s' -- created:
500                                 )
501                        
502                        
503                       """.printf(
504                                 id,
505                                       this.mysql_escape(this.active_message_exim_id),
506                                       this.mysql_escape(filename),
507                                   this.mysql_escape(mime_type),
508                                   this.mysql_escape(file_path),
509                                         file_size,
510                                       file_size,
511                                       this.mysql_escape(chksum),
512                                 this.created_date
513                          ));
514               // this is done to fix the queue_id or maillog_id ??
515                  this.query("""
516                  SELECT attachment_update(
517                       %d, -- in_id INT(11),
518                                                 '', -- mime type
519                       '%s', -- in_created DATETIME,
520                       '%s' -- in_mailfort_sig varchar(64)
521                  )
522               """.printf(
523                                 id, 
524                                 this.created_date,
525                                 this.mysql_escape(this.active_message_x_mailfort_sig)
526               
527               )
528                 );
529                 // GLib.error("added attachment?");
530     }
531     
532     
533     public void replace_attachment(GMime.Multipart parent, GMime.Part attachment)
534     {
535         var sid = attachment.get_header("X-strip-id");
536         if (sid != null && sid.length > 0) {
537                 GLib.debug("Skip attachment replace - it's already been done");
538                 return;
539         }
540         
541         var c = attachment.get_content_object();
542         
543         var filename = attachment.get_filename().replace("/", "-").replace("\n", "").replace("\t", " ");
544         var fn = GLib.Environment.get_tmp_dir() +
545                         "/"+ this.active_name + "."+   filename;
546
547             var outfile = new GMime.StreamFile.for_path(fn, "w");
548             outfile.set_owner(true);
549             var file_size = (int) c.write_to_stream(outfile);
550             var chksum = this.md5_file(fn);
551             outfile.flush();
552             outfile = null;
553         
554         if (file_size == 0) {
555
556                 GLib.debug("ERROR - file size of write to stream returned 0?");
557                 Posix.unlink(fn);               
558                 return;
559         }
560         
561         
562         
563  
564         var mime_type= attachment.get_content_type().to_string();
565         // at this point we have to do our database magic...
566         //filesize / name / date / checksum / mimetype -- into mailfort should be OK.
567         
568         var file_id = this.query("""
569                 SELECT 
570                 
571                 attachment_init(
572                                 '%s', -- in_msgid VARCHAR(32),
573                                 '%s', -- in_checksum VARCHAR(64),
574                                 '%s', -- in_mime_filename varchar(255)
575                                 %d -- filesize
576                         ) as id 
577                         
578           """.printf(
579                         this.mysql_escape(this.active_message_exim_id),
580                         chksum,
581                         this.mysql_escape( attachment.get_filename() ), // what is thsi is invalid?
582                          file_size)
583                 );
584                  
585                 
586                 if (file_id.length < 1) {
587                         GLib.debug("ERROR - CALL to attachment_init failed");
588                 Posix.unlink(fn);               
589                 return;
590                 
591                 }
592  
593                 if (int.parse(file_id) < 1) {
594                         GLib.debug("ERROR - CALL to attachment_init failed - returned 0?");
595                 Posix.unlink(fn);               
596                 return;
597                 
598                 }
599  
600         
601                 GLib.debug("fn = %s, m5=%s, id= %s", filename, mime_type, this.active_message_id);
602                 this.query("""
603                 
604                         SELECT attachment_update(
605                                 %d, -- in_id INT(11),
606                                 '%s', -- in_mime_type varchar(255),
607                                 '%s', -- in_created DATETIME,
608                                 '%s' -- in_mailfort_sig varchar(64)
609                                 
610                                 ) as result
611       """.printf(
612                 int.parse(file_id),
613                         this.mysql_escape(mime_type),
614                         this.created_date,
615                         this.mysql_escape(this.active_message_x_mailfort_sig)
616                 ));
617                  this.mysql.store_result();
618                                  
619  
620                 this.used_space_after += file_size;
621                         
622                 var target_fn = "";
623
624             if (StripApplication.opt_is_extracting) {
625                         target_fn = StripApplication.opt_target_path + "/" + this.created_dir +"/"+ file_id  + "-" + filename;
626                 } 
627                     
628             var stored =  "/" + this.created_dir +"/"+ file_id  + "-" + filename;
629                  this.query("""
630                 
631                         SELECT attachment_update_store(
632                                 %d, -- in_id INT(11),
633                                 '%s'  -- in_store_filename varchar(255),
634                          
635                                 
636                                 ) as result
637       """.printf(
638                 int.parse(file_id),
639                          this.mysql_escape( stored)
640                 ));   
641                          
642         var rep = new GMime.Part.with_type("text","html");
643         // we have to set up a redirect server - to redirect hpasite... to their internal service..
644         rep.set_filename(filename);
645         string txt = "<html><body>"+
646             "<a href=\"" + StripApplication.opt_replace_link + "/" +
647                         file_id + "/" + this.created_dir + "/"+chksum+"/"+ GLib.Uri.escape_string( filename) +"\">" + 
648             GLib.Uri.escape_string( filename) + // fixme needs html escaping...
649             "</a>" +
650             "</body></html>";
651
652         rep.get_content_type().set_parameter("charset", "utf-8");
653                 rep.set_header("X-strip-id", file_id);
654                 rep.set_header("X-strip-content-name",  filename);                              
655                 rep.set_header("X-strip-path", this.created_dir + "/" + file_id + "-" + filename);              
656                 rep.set_header("X-strip-content-type", mime_type);              
657         var stream =  new GMime.StreamMem.with_buffer(txt.data);
658         var con = new GMime.DataWrapper.with_stream(stream,GMime.ContentEncoding.DEFAULT);
659
660         rep.set_content_object(con);
661         GLib.debug("Replacing Attachment with HTML");
662         parent.replace(parent.index_of(attachment), rep);
663                 this.has_replaced = true;
664                  
665                 if (StripApplication.opt_is_extracting && target_fn.length > 0) {
666                         var dir = GLib.Path.get_dirname(target_fn);
667                         if (!FileUtils.test (dir, FileTest.IS_DIR)) {
668                                 GLib.DirUtils.create_with_parents(dir, 0755);
669                         }
670                         GLib.debug("Creating file %s", target_fn);
671                         if (!FileUtils.test (target_fn, FileTest.EXISTS)) {
672                                 var from = File.new_for_path (fn);
673                                 var to =  File.new_for_path (target_fn);
674                                 from.copy(to, 0, null);
675
676                         }
677                 } else { 
678                         GLib.debug("Skipping extraction %s", target_fn);
679                 }
680                 Posix.unlink(fn);
681                 
682
683
684     }
685     public string query(string str)
686     {
687             return this.real_query(1, str);
688     }
689     public string execute(string str)
690     {
691             return this.real_query(0, str);
692     }
693     /**
694     * need_return 
695     0 = no
696     1 = yes
697     -1 = don't try.
698     */
699     public string real_query(int need_return, string str)
700     {
701                 GLib.debug("Before Query : %u  : %s\n", this.mysql.errno(), this.mysql.error());
702
703
704         if (StripApplication.opt_debug_sql) {
705                 GLib.debug("SQL: %s\n", str);
706                 }
707                 
708                 
709         
710         var rc=  this.mysql.query(str); 
711         if ( rc != 0 ) {
712
713                     GLib.debug("ERROR %u: Query failed: %s\n", this.mysql.errno(), this.mysql.error());
714                                 Posix.exit(1);
715                 }
716         var rs = mysql.use_result();
717                 if (need_return == -1) {
718                         return "";
719                 }
720  
721         
722         //GLib.debug("got %d rows", (int) rs.num_rows());
723         
724         var got_row = false;
725                 string[] row;
726                 string ret = "";
727                 while( (row = rs.fetch_row()) != null) { 
728                         got_row = true;
729                         ret = row[0];
730                 
731                 }
732                 if (need_return == 0) {
733                 if (StripApplication.opt_debug_sql) {
734                                 GLib.debug("got %s", got_row ? "=Nothing=" : ret);
735                         }
736                         return got_row ? "" : ret;
737                 }
738                 if (!got_row) {
739
740                          GLib.debug("ERROR : no rows returned");
741                         Posix.exit(1);
742                         return "";
743                 }
744         if (StripApplication.opt_debug_sql) {
745                         GLib.debug("got %s", ret);
746                 }
747                 return ret;
748                 
749                  
750         }
751     
752     public string mysql_escape(string str)
753     {
754             unichar[] value_escaped = new unichar[str.length * 2 + 1];
755                 this.mysql.real_escape_string ((string) value_escaped, str, str.length);
756                 return (string) value_escaped;
757     }
758     
759     public string  md5_file(string fn) {
760               Checksum checksum = new Checksum (ChecksumType.MD5);
761
762               FileStream stream = FileStream.open (fn, "rb");
763               uint8 fbuf[100];
764               size_t size;
765
766               while ((size = stream.read (fbuf)) > 0) {
767                       checksum.update (fbuf, size);
768               }
769
770               unowned string digest = checksum.get_string ();
771               return digest;
772     }
773
774         string active_path = "";    
775     string active_name = "";
776     string active_message_id = "";
777     string active_message_x_mailfort_sig = "";
778     string active_message_exim_id = "";
779     bool has_replaced = false;
780     string created_date = ""; // should be YYYY-mm-dd
781     string created_dir = ""; // should be YYY/mm/dd
782     
783     public void scan_file(string path, string name)
784     {
785                 GLib.debug("Scan: %s/%s", path,name); 
786                 
787                 this.has_replaced = false; 
788         this.active_path = path;
789         this.active_name = name;
790         this.active_message_id = "";
791
792                 var mailtime = new DateTime.now_local();
793                 if (StripApplication.opt_scan_mailfort) {
794                     this.created_dir = this.active_path.substring(this.base_dir.length + 1 );
795                         this.created_date = this.created_dir.replace("/", "-");
796                         var bits = this.created_date.split("-");
797                         mailtime = new DateTime.local(int.parse(bits[0]),int.parse(bits[1]),int.parse(bits[2]),0,0,0);
798                         
799                         var oldest = new  DateTime.now_local();
800                         oldest = oldest.add_months(-1 * StripApplication.opt_age_oldest);
801                         var tspan = mailtime.difference(oldest) / GLib.TimeSpan.DAY;
802
803                         if (tspan < 0) {
804                                 GLib.debug("skip file is %d days older than %d months", (int)tspan, StripApplication.opt_age_oldest);
805                                 return;
806                         }
807                         
808                         var newest = new  DateTime.now_local();
809                         newest = newest.add_months(-1 * StripApplication.opt_age_newest);
810                         tspan = mailtime.difference(newest) / GLib.TimeSpan.DAY;
811                         if (tspan > 0) {
812                                 GLib.debug("skip file is %d days newer than %d months", (int)tspan, StripApplication.opt_age_newest);
813                                 return;
814                         }
815                         
816                 }
817         
818         
819                 var fileinfo = File.new_for_path(path +"/" + name)
820                                         .query_info(GLib.FileAttribute.STANDARD_SIZE+","+GLib.FileAttribute.TIME_MODIFIED
821                                                 ,GLib.FileQueryInfoFlags.NONE,null);
822         var file_size = (int) fileinfo.get_size();
823                 var mod_time = fileinfo.get_modification_time();
824                 
825                 
826                 
827                 if (!StripApplication.opt_scan_mailfort) {
828                    
829                 // it's a mail directory...
830                 // use the last modification time? as the default...
831                  mailtime = new DateTime.from_timeval_utc(mod_time);
832                  this.created_dir = mailtime.format("%Y/%m/%d");
833                          this.created_date =  mailtime.format("%Y-%m-%d %H:%M:%S");
834  
835         }
836                 // check on age of file...
837                 
838                 
839                 
840                 
841                 
842         this.used_space_before += file_size;
843         
844         var stream = new GMime.StreamFs.for_path (path +"/" + name,Posix.O_RDONLY, 0);
845         //stream.set_owner(true);
846         var parser = new GMime.Parser.with_stream(stream);
847         var message = parser.construct_message();
848  
849                 if (message == null) {
850                         GLib.debug("Could not parse file? %s/%s", path,name);
851                 this.used_space_after += file_size;                     
852                 return;
853                 }       
854
855
856                 // check : - is message over a year old?                
857                 // get various msg info..
858                 this.active_message_id = message.get_message_id();
859                 this.active_message_x_mailfort_sig = message.get_header("x-mailfort-sig");
860                 var recvd = message.get_header("received");
861                 this.active_message_exim_id = "";
862                 if (recvd != null && recvd.length > 1) {
863                         GLib.debug("RECV: %s", recvd);
864                         var lines = recvd.split("\t");
865                         for (var i = 0; i < lines.length;i++) {
866                                 var bits = lines[i].strip().split(" ");
867                                 if (bits[0] == "id") {
868                                         this.active_message_exim_id = bits[1].replace(";","");
869
870                                 }
871                                 
872                                 if (lines[i].contains(";")) {
873                                         var dbits = lines[i].strip().split(";");                                
874                                         GLib.debug("Reading time from : %s", dbits[1]);
875                                         var timez = GMime.utils_header_decode_date(dbits[1], null);
876                                         if (timez != 0) {
877                                                 mailtime = new DateTime.from_unix_utc(timez);
878                                                 this.created_date = mailtime.format("%Y-%m-%d %H:%M:%S");
879                                                 GLib.debug("Time is %s",this.created_date);
880                                                 // if it's not mailfort we can use that date to determine where to store it...
881                                                 if (!StripApplication.opt_scan_mailfort) {
882                                                         this.created_dir = mailtime.format("%Y/%m/%d");
883                                                 }
884                                         } else {
885                                                 GLib.debug("Could not read time from headers?");
886                                         }
887                                 }
888
889                         }
890                 }
891                 
892                 var oldest = new  DateTime.now_local();
893                 oldest = oldest.add_months(-1 * StripApplication.opt_age_oldest);
894                 var rtspan = mailtime.difference(oldest) / GLib.TimeSpan.DAY;
895                 GLib.debug("Checking oldest %d days difference", (int)rtspan   );
896                 if (rtspan < 0) {
897                         GLib.debug("skip(2) file is %d days older than %d months", (int)rtspan, StripApplication.opt_age_oldest);
898                         return;
899                 }
900                 var newest = new  DateTime.now_local();
901                 newest = newest.add_months(-1 * StripApplication.opt_age_newest);
902                 rtspan = mailtime.difference(newest) / GLib.TimeSpan.DAY;
903                 if (rtspan > 0) {
904                         GLib.debug("skip(2) file is %d days newer than %d months : %s", (int)rtspan, StripApplication.opt_age_newest,
905                                 mailtime.format("%Y-%m-%d %H:%M:%S"));
906                         return;
907                 }
908                 
909                 
910                 
911                 /*
912                 GLib.debug("Message DATA:\n mid: %s\nmailfort: %s \nexim_id: %s",
913                         this.active_message_id,
914                         this.active_message_x_mailfort_sig,
915                         this.active_message_exim_id
916                 );
917                  */
918                         
919                 // DATE?
920                 
921                 var mp = message.get_mime_part();
922
923                 if (!(mp is GMime.Multipart)) {
924                         //GLib.debug("get mimepart does not return a Multipart?");
925                 this.used_space_after += file_size;                                             
926                         return;
927                 }
928                 
929                 var mpc = ((GMime.Multipart)mp).get_count();
930                 
931                 //GLib.debug("Message has %d parts", mpc); 
932                 for (var i =0 ; i < mpc; i++) {
933                         //GLib.debug("Getting part %d", i); 
934                         var mime_obj = ((GMime.Multipart)mp).get_part(i);
935             this.handle_part(mp,mime_obj);                      
936         }
937                 
938         parser= null;
939
940       //  stream.set_owner(false);
941             //stream.close();
942         stream = null;//.close();
943         
944         
945                 if (!this.has_replaced) {
946                         this.used_space_after += file_size;
947                         GLib.debug("skpping write file - no replacement occured");
948                         return;
949                 }
950                 string tmpfile = "";
951                 GMime.Stream outstream = new GMime.StreamNull();
952                 if (StripApplication.opt_is_replacing) {
953                 
954                         tmpfile = GLib.Environment.get_tmp_dir() +"/" + name;
955                 outstream = new GMime.StreamFile.for_path (tmpfile,"w");
956                 ((GMime.StreamFile)outstream).set_owner(true);
957         }
958                 if (StripApplication.opt_dump) {
959                         outstream = new GMime.StreamMem();
960         }
961         
962         file_size = (int) message.write_to_stream(outstream);
963         if (StripApplication.opt_is_replacing) {
964                 ((GMime.StreamFile)outstream).set_owner(false);
965         }
966                 if (StripApplication.opt_dump) {
967                         var ua = ((GMime.StreamMem)outstream).get_byte_array().data;
968                         print("%s\n", (string) ua);
969                 }        
970         message = null;
971         outstream.flush();
972         outstream.close();
973         GLib.debug("finished writing output %d", file_size);
974
975         //
976         outstream = null;
977         
978           
979         this.used_space_after += file_size;
980         
981         
982         if (StripApplication.opt_is_replacing) {
983                 Posix.unlink(path +"/" + name);         
984                 GLib.debug("copy tmp file %s to %s" , tmpfile, path +"/" + name);               
985                 
986                 // link will not work, as we are doing it accross file systems
987                         var from = File.new_for_path (tmpfile);
988                         var nf =  File.new_for_path (path +"/" + name);
989                         from.copy(nf, 0, null);
990                         
991
992                 var newfileinfo = nf.query_info(GLib.FileAttribute.TIME_MODIFIED,GLib.FileQueryInfoFlags.NONE,null);
993                 newfileinfo.set_modification_time(mod_time);
994                 nf.set_attributes_from_info(newfileinfo,FileQueryInfoFlags.NONE);
995                 Posix.unlink(tmpfile);
996                 }
997         this.processed++;
998         
999         if (StripApplication.opt_limit > -1 && this.processed >= StripApplication.opt_limit) {
1000                 GLib.debug("Reached replacement limit");
1001                 Posix.exit(1);
1002         }
1003         
1004         
1005         
1006         
1007     }
1008     
1009     
1010     public void scan_dir(string basepath, string subpath)
1011     {
1012         
1013         
1014         // determine if path is to old to scan..
1015         if (subpath.length > 0 && StripApplication.opt_scan_mailfort) {
1016                         var year =  int.parse(subpath.substring(1,4));  // "/2000"
1017                         var month = subpath.length > 5 ? int.parse(subpath.substring(6,2)) : 999; // "/2000/12"                 
1018                         var day = subpath.length > 8 ? int.parse(subpath.substring(9,2)) : 999; // "/2000/12/01"                        
1019                 
1020                 var oldest = new  DateTime.now_local();
1021                         oldest = oldest.add_months(-1 * StripApplication.opt_age_oldest);
1022                         
1023                         //GLib.debug("Checking directory %s is older than min: %d/%d/%d", subpath, oldest.get_year() , oldest.get_month(), oldest.get_day_of_month() );                                 
1024                         
1025                         if (year < oldest.get_year()) {
1026                                 GLib.debug("Skip directory %s is older than min year: %d", subpath, oldest.get_year());
1027                                 return;
1028                         }
1029                         if (year == oldest.get_year() &&  month < oldest.get_month()) {
1030                                 GLib.debug("Skip directory %s is older than min month: %d/%d", subpath, oldest.get_year() , oldest.get_month() );
1031                                 return;
1032                         }
1033                 if (year == oldest.get_year() &&  month == oldest.get_month() && day < oldest.get_day_of_month()) {
1034                                 GLib.debug("Skip directory %s is older than min day: %d/%d/%d", subpath, oldest.get_year() , oldest.get_month(), oldest.get_day_of_month() );           
1035                                 return;
1036                         }
1037                 
1038                 var newest = new  DateTime.now_local();
1039                         newest = newest.add_months(-1 * StripApplication.opt_age_newest);
1040                         
1041                         //GLib.debug("Checking directory %s is newer than max: %d/%d/%d", subpath, newest.get_year() , newest.get_month(), newest.get_day_of_month() );                                 
1042                         
1043                         if (year > newest.get_year()) {
1044                                 GLib.debug("Skip directory %s is newer than max year: %d", subpath, newest.get_year());
1045                                 return;
1046                         }
1047                         if (year == newest.get_year() &&  month != 999 && month > newest.get_month()) {
1048                                 GLib.debug("Skip directory %s is newer than max month: %d/%d", subpath, newest.get_year() , newest.get_month() );
1049                                 return;
1050                         }
1051                 if (year == newest.get_year() &&  month == newest.get_month() &&  day != 999 && day > newest.get_day_of_month()) {
1052                                 GLib.debug("Skip directory %s is newer than max day: %d/%d/%d", subpath, newest.get_year() , newest.get_month(), newest.get_day_of_month() );           
1053                                 return;
1054                         }
1055                 
1056                 
1057                 
1058         }
1059         
1060         
1061         var f = File.new_for_path(basepath + subpath);
1062                 FileEnumerator file_enum;
1063         var cancellable = new Cancellable ();
1064         try {      
1065             file_enum = f.enumerate_children(
1066                 FileAttribute.STANDARD_DISPLAY_NAME + "," +   FileAttribute.STANDARD_TYPE,
1067                         FileQueryInfoFlags.NOFOLLOW_SYMLINKS,  // FileQueryInfoFlags.NONE,
1068                         cancellable
1069                 );
1070         } catch (Error e) {
1071                 GLib.debug("Got error scanning dir? %s", e.message);
1072             // FIXME - show error..
1073             return;
1074         }
1075         FileInfo next_file;
1076          
1077         while (cancellable.is_cancelled () == false ) {
1078             try {
1079                 next_file = file_enum.next_file (cancellable);
1080             } catch(Error e) {
1081                 GLib.debug("error getting next file? %s", e.message);
1082                 break;
1083             }
1084
1085             if (next_file == null) {
1086                 break;
1087             }
1088                 
1089                 
1090                 if (next_file.get_is_symlink()) {
1091                 next_file = null;
1092                 continue;
1093             }
1094             
1095             var ds = next_file.get_display_name();
1096             if (next_file.get_file_type() != FileType.DIRECTORY) {
1097                 
1098                 
1099                 
1100                 if (ds[0] == ',') {
1101                         continue;
1102                 }
1103                 // other files to ignore?
1104                 if (Regex.match_simple (".tgz$", ds)) {
1105                         continue;
1106                 }
1107                 this.scan_file(basepath + subpath , ds);
1108                                 if(this.has_replaced) {
1109                          this.report_state("After scanning %s/%s".printf(basepath + subpath , ds));
1110                         }
1111                 continue;
1112             }
1113
1114
1115             //stdout.printf("Monitor.monitor: got file %s : type :%u\n",
1116             //        next_file.get_display_name(), next_file.get_file_type());
1117
1118
1119         
1120
1121             // not really needed?? - we are storing attachments in a seperate location now...
1122             if (ds[0] == '.') {
1123                 next_file = null;
1124                 continue;
1125             }
1126             if (ds == "attachments") {
1127                         continue;
1128                 }
1129             
1130             
1131             var sp = subpath+"/"+next_file.get_display_name();
1132             // skip modules.
1133             //print("got a file : " + sp);
1134          
1135             next_file = null;
1136             
1137             
1138             this.scan_dir(basepath,sp);
1139             
1140         }
1141     
1142     
1143     }
1144     void report_state(string msg) 
1145     {
1146         // Saved: 2G  Original 10G : 20%
1147         GLib.debug("Saved : %s (%.1f%%) | Original %s | %s", 
1148                         GLib.format_size(this.used_space_before - this.used_space_after), 
1149                         100f * ((1f * (this.used_space_before - this.used_space_after)) / (this.used_space_before * 1f)), 
1150                         GLib.format_size(this.used_space_before),                       
1151                         msg
1152                 );
1153         
1154         }
1155         
1156         
1157
1158 }