X-Git-Url: https://fleuret.org/cgi-bin/gitweb/gitweb.cgi?a=blobdiff_plain;f=mymail.c;h=99a76d895b7fc38d03e21a99f732590980564107;hb=d763d790abe7d93b4572c38b261a4f480a8aa961;hp=25121a4f61432ca71c049ed1bf5221f95a4e0719;hpb=5166266bf624c0a4d94d7751bb819c26cc1cc22d;p=mymail.git

diff --git a/mymail.c b/mymail.c
index 25121a4..99a76d8 100644
--- a/mymail.c
+++ b/mymail.c
@@ -47,6 +47,18 @@ char *search_pattern;
 
 int action_index;
 
+char *segment_next_field(char *current) {
+  while(*current && *current != ' ') current++;
+  *current = '\0'; current++;
+  while(*current && *current == ' ') current++;
+  return current;
+}
+
+void remove_eof(char *c) {
+  while(*c && *c != '\n' && *c != '\r') c++;
+  *c = '\0';
+}
+
 /********************************************************************/
 
 /* malloc with error checking.  */
@@ -71,13 +83,78 @@ void usage(FILE *out) {
   fprintf(out, "\n");
 }
 
+/*********************************************************************/
+
+void search_in_db(const char *search_name, const char *search_regexp_string,
+                  FILE *db_file) {
+  char raw_line[BUFFER_SIZE];
+  char current_mail_filename[BUFFER_SIZE];
+  unsigned long int current_position_in_mail;
+  char *name, *value;
+  regex_t regexp;
+  int already_written;
+
+  if(regcomp(&regexp,
+             search_regexp_string,
+             REG_ICASE)) {
+    fprintf(stderr,
+            "mymail: Syntax error in regexp \"%s\" for field \"%s\".\n",
+            search_regexp_string,
+            search_name);
+    exit(EXIT_FAILURE);
+  }
+
+  current_position_in_mail = 0;
+  already_written = 0;
+
+  while(fgets(raw_line, BUFFER_SIZE, db_file)) {
+    name = raw_line;
+    value = segment_next_field(raw_line);
+
+    if(strcmp("mail", name) == 0) {
+      char *position_in_file_string = value;
+      char *mail_filename = segment_next_field(value);
+      current_position_in_mail = atol(position_in_file_string);
+      strcpy(current_mail_filename, mail_filename);
+      remove_eof(current_mail_filename);
+      already_written = 0;
+    }
+
+    else if(!already_written) {
+     if(strcmp(search_name, name) == 0 && regexec(&regexp, value, 0, 0, 0) == 0) {
+        FILE *mail_file;
+        mail_file = fopen(current_mail_filename, "r");
+        if(!mail_file) {
+          fprintf(stderr, "mymail: Can not open `%s'.\n", current_mail_filename);
+          exit(EXIT_FAILURE);
+        }
+        fseek(mail_file, current_position_in_mail, SEEK_SET);
+        if(fgets(raw_line, BUFFER_SIZE, mail_file)) {
+          printf("%s", raw_line);
+          while(fgets(raw_line, BUFFER_SIZE, mail_file) &&
+                strncmp(raw_line, "From ", 5)) {
+            printf("%s", raw_line);
+          }
+        }
+        fclose(mail_file);
+        already_written = 1;
+      }
+    }
+  }
+
+  regfree(&regexp);
+}
+
+
+/*********************************************************************/
+
 void read_file(const char *input_filename,
                int nb_fields_to_parse, struct parsable_field *fields_to_parse,
                FILE *db_file) {
   char raw_line[BUFFER_SIZE];
   FILE *file;
   int in_header, new_header;
-  unsigned int position_in_file;
+  unsigned long int position_in_file;
 
   file = fopen(input_filename, "r");
 
@@ -95,7 +172,7 @@ void read_file(const char *input_filename,
     if(strncmp(raw_line, "From ", 5) == 0) {
       if(in_header) {
         fprintf(stderr,
-                "Got a 'From ' in the header in %s:%u.\n",
+                "Got a 'From ' in the header in %s:%lu.\n",
                 input_filename, position_in_file);
         fprintf(stderr, "%s", raw_line);
         exit(EXIT_FAILURE);
@@ -116,7 +193,7 @@ void read_file(const char *input_filename,
       int f;
       regmatch_t matches;
       if(new_header) {
-        fprintf(db_file, "mail %s:%d\n", input_filename, position_in_file);
+        fprintf(db_file, "mail %lu %s\n", position_in_file, input_filename);
         new_header = 0;
       }
       for(f = 0; f < nb_fields_to_parse; f++) {
@@ -136,8 +213,8 @@ void read_file(const char *input_filename,
 
 int ignore_entry(const char *name) {
   return
-    strcmp(name, ".") == 0 ||
-    strcmp(name, "..") == 0 ||
+    /* strcmp(name, ".") == 0 || */
+    /* strcmp(name, "..") == 0 || */
     (name[0] == '.' && name[1] != '/');
 }
 
@@ -155,12 +232,11 @@ void process_entry(const char *dir_name,
             dir_name,
             strerror(errno));
     exit(EXIT_FAILURE);
-  } else {
   }
 
-  if(S_ISLNK(sb.st_mode)) {
-    return;
-  }
+  /* if(S_ISLNK(sb.st_mode)) { */
+    /* return; */
+  /* } */
 
   dir = opendir(dir_name);
 
@@ -174,10 +250,9 @@ void process_entry(const char *dir_name,
     }
     closedir(dir);
   } else {
-    if(S_ISREG(sb.st_mode)) {
-      /* printf("Processing regular file '%s'.\n", dir_name); */
+    /* if(S_ISREG(sb.st_mode)) { */
       read_file(dir_name, nb_fields_to_parse, fields_to_parse, db_file);
-    }
+    /* } */
   }
 }
 
@@ -306,25 +381,40 @@ int main(int argc, char **argv) {
 
   else {
     if(search_pattern) {
+      FILE *db_file;
       char *search_name;
-      char *search_regexp;
+      char *search_regexp_string;
       search_name = search_pattern;
-      search_regexp = search_pattern;
-      while(*search_regexp && *search_regexp != ' ') search_regexp++;
-      *search_regexp = '\0'; search_regexp++;
-      while(*search_regexp && *search_regexp == ' ') search_regexp++;
-      if(!*search_regexp) {
+      search_regexp_string = segment_next_field(search_pattern);
+      if(!*search_regexp_string) {
         fprintf(stderr,
                 "Syntax error in the search pattern.\n");
         exit(EXIT_FAILURE);
       }
-      printf("Starting search in %s for field \"%s\" matching \"%s\".\n",
-             db_filename,
-             search_name,
-             search_regexp);
+
+      /* printf("Starting search in %s for field \"%s\" matching \"%s\".\n", */
+             /* db_filename, */
+             /* search_name, */
+             /* search_regexp_string); */
+
+      db_file = fopen(db_filename, "r");
+
+      if(!db_file) {
+        fprintf(stderr,
+                "mymail: Can not open \"%s\" for reading: %s\n",
+                db_filename,
+                strerror(errno));
+        exit(EXIT_FAILURE);
+      }
+
+      search_in_db(search_name, search_regexp_string, db_file);
+
+      fclose(db_file);
       free(search_pattern);
     }
   }
 
+  free(db_filename);
+
   exit(EXIT_SUCCESS);
 }