libpst: readpst.c comparison

comparison readpst.c @ 1:43e8802f08c5 debian libpst_0_5_1

imported from debian 0.5.1

author	carl
date	Thu, 23 Dec 2004 11:17:37 -0800
parents	6b1b602514db
children

comparison

equal deleted inserted replaced

-:6b1b602514db
+:43e8802f08c5
 * readpst.c
 * Part of the LibPST project
 * Written by David Smith
 *            dave.s@earthcorp.com
 */
+// Includes {{{1
 #include <stdio.h>
 #include <stdlib.h>
 #include <time.h>
 #include <string.h>
 #include <ctype.h>
 #include "define.h"
 #include "libpst.h"
 #include "common.h"
 #include "timeconv.h"
 #include "lzfu.h"
+// }}}1
+// Defines {{{1
 #define OUTPUT_TEMPLATE "%s"
 #define OUTPUT_KMAIL_DIR_TEMPLATE ".%s.directory"
 #define KMAIL_INDEX ".%s.index"
-#define VERSION "0.5"
+#define VERSION "0.5.1"
 // max size of the c_time char*. It will store the date of the email
 #define C_TIME_SIZE 500
 #define PERM_DIRS 0777
 // macro used for creating directories
 #ifndef WIN32
 #define D_MKDIR(x) mkdir(x, PERM_DIRS)
 #else
 #define D_MKDIR(x) mkdir(x)
 #endif
+// }}}1
+// struct file_ll {{{1
 struct file_ll {
 char *name;
 char *dname;
 FILE * output;
 int32_t stored_count;
 int32_t email_count;
 int32_t skip_count;
 int32_t type;
 struct file_ll *next;
 };
+// }}}1
+// Function Declarations {{{1
 void  write_email_body(FILE *f, char *body);
 char *removeCR (char *c);
 int32_t   usage();
 int32_t   version();
 char *mk_kmail_dir(char*);
 char *check_filename(char *fname);
 char *rfc2426_escape(char *str);
 int32_t chr_count(char *str, char x);
 char *rfc2425_datetime_format(FILETIME *ft);
 char *rfc2445_datetime_format(FILETIME *ft);
+char *skip_header_prologue(char *headers);
+// }}}1
+// Global Variables {{{1
 char *prog_name;
 char *output_dir = ".";
+char *kmail_chdir = NULL;
+// }}}1
+// More Defines {{{1
 // Normal mode just creates mbox format files in the current directory. Each file is named
 // the same as the folder's name that it represents
 #define MODE_NORMAL 0
 // KMail mode creates a directory structure suitable for being used directly
 // by the KMail application
 // output settings for RTF bodies
 // filename for the attachment
 #define RTF_ATTACH_NAME "rtf-body.rtf"
 // mime type for the attachment
 #define RTF_ATTACH_TYPE "application/rtf"
+// }}}1
+// int main(int argc, char** argv) {{{1
 int main(int argc, char** argv) {
+// declarations {{{2
 pst_item *item = NULL;
 pst_file pstfile;
 pst_desc_ll *d_ptr;
 char * fname = NULL;
 time_t em_time;
 char *temp = NULL; //temporary char pointer
 int attach_num = 0;
 int skip_child = 0;
 struct file_ll  *f, *head;
 prog_name = argv[0];
+// }}}2
 while ((c = getopt(argc, argv, "d:hko:qrSVwc:"))!= -1) {
 switch (c) {
 case 'c':
 if (optarg!=NULL && optarg[0]=='v')
 exit(1);
 break;
 }
 }
+#ifdef DEBUG_ALL
+// initialize log file
 if (d_log == NULL)
 d_log = "readpst.log";
 DEBUG_INIT(d_log);
 DEBUG_REGISTER_CLOSE();
+#endif // defined DEBUG_ALL
 DEBUG_ENT("main");
 if (argc > optind) {
 fname = argv[optind];
 } else {
 	// there should only be one message_store, and we have already done it
 	DIE(("main: A second message_store has been found. Sorry, this must be an error.\n"));
 }
-if (item->folder != NULL) { //if this is a folder, we want to recurse into it
+if (item->folder != NULL) {
+	// Process Folder item {{{2
+	// if this is a folder, we want to recurse into it
 	if (output_mode != OUTPUT_QUIET) printf("Processing Folder \"%s\"\n", item->file_as);
 	//	f->email_count++;
 	DEBUG_MAIN(("main: I think I may try to go into folder \"%s\"\n", item->file_as));
 	f = (struct file_ll*) malloc(sizeof(struct file_ll));
 	memset(f, 0, sizeof(struct file_ll));
 	  f = head;
 	}
 	_pst_freeItem(item);
 	item = NULL; // just for the odd situations!
 	goto check_parent;
+	// }}}2
 } else if (item->contact != NULL) {
+	// Process Contact item {{{2
 	// deal with a contact
 	// write them to the file, one per line in this format
 	// Desc Name <email@address>\n
 	if (mode == MODE_SEPERATE) {
 	  mk_seperate_file(f);
 	    fprintf(f->output, "END:VCARD\n\n");
 	  } else {
 	    fprintf(f->output, "%s <%s>\n", item->contact->fullname, item->contact->address1);
 	  }
 }
+	// }}}2
 } else if (item->email != NULL &&
 		 (item->type == PST_TYPE_NOTE || item->type == PST_TYPE_REPORT)) {
+	// Process Email item {{{2
 	if (mode == MODE_SEPERATE) {
 	  mk_seperate_file(f);
 	}
 	f->email_count++;
 	    temp += 2; // get past the \n\n
 	    *temp = '\0';
 	  }
 	  if (mode != MODE_SEPERATE) {
+	    char *soh = NULL;  // real start of headers.
 	    // don't put rubbish in if we are doing seperate
-	    fprintf(f->output, "From \"%s\" %s\n%s\n",
+	    fprintf(f->output, "From \"%s\" %s\n", item->email->outlook_sender_name, c_time);
-		    item->email->outlook_sender_name, c_time, item->email->header);
+	    soh = skip_header_prologue(item->email->header);
-	    fprintf(f->output, "\n");
+	    fprintf(f->output, "%s\n\n", soh);
 	  } else {
 	    fprintf(f->output, "%s\n", item->email->header);
 	  }
 	} else {
 	  //make up our own header!
 	  DEBUG_MAIN(("main: Writing buffer between emails\n"));
 	  if (boundary)
 	    fprintf(f->output, "\n--%s--\n", boundary);
 	  fprintf(f->output, "\n\n");
 	}
+	// }}}2
 } else if (item->type == PST_TYPE_JOURNAL) {
+	// Process Journal item {{{2
 	// deal with journal items
 	if (mode == MODE_SEPERATE) {
 	  mk_seperate_file(f);
 	}
 	f->email_count++;
 	if (item->email->body != NULL)
 	  fprintf(f->output, "DESCRIPTION:%s\n", rfc2426_escape(item->email->body));
 	if (item->journal->start != NULL)
 	  fprintf(f->output, "DTSTART;VALUE=DATE-TIME:%s\n", rfc2445_datetime_format(item->journal->start));
 	fprintf(f->output, "END:VJOURNAL\n\n");
+	// }}}2
 } else if (item->type == PST_TYPE_APPOINTMENT) {
+	// Process Calendar Appointment item {{{2
 	// deal with Calendar appointments
 	if (mode == MODE_SEPERATE) {
 	  mk_seperate_file(f);
 	}
 	f->email_count++;
 	  case PST_APP_LABEL_PHONE_CALL:
 	    fprintf(f->output, "CATEGORIES:PHONE-CALL\n"); break;
 	  }
 	}
 	fprintf(f->output, "END:VEVENT\n\n");
+	// }}}2
 } else {
 	f->skip_count++;
 	DEBUG_MAIN(("main: Unknown item type. %i. Ascii1=\"%s\"\n",
 		   item->type, item->ascii_type));
 }
 } else {
 f->skip_count++;
 DEBUG_MAIN(("main: A NULL item was seen\n"));
 }
 DEBUG_MAIN(("main: Going to next d_ptr\n"));
 if (boundary) {
 free(boundary);
 boundary = NULL;
 }
 check_parent:
 //    _pst_freeItem(item);
 while (!skip_child && d_ptr->next == NULL && d_ptr->parent != NULL) {
 DEBUG_MAIN(("main: Going to Parent\n"));
 head = f->next;
 if (item != NULL) {
 DEBUG_MAIN(("main: Freeing memory used by item\n"));
 _pst_freeItem(item);
 item = NULL;
 }
 if (!skip_child)
 d_ptr = d_ptr->next;
 else
 skip_child = 0;
 if (d_ptr == NULL) {
 DEBUG_MAIN(("main: d_ptr is now NULL\n"));
 }
 }
 if (output_mode != OUTPUT_QUIET) printf("Finished.\n");
 DEBUG_MAIN(("main: Finished.\n"));
+	// Cleanup {{{2
 pst_close(&pstfile);
 //  fclose(pstfile.fp);
 while (f != NULL) {
 if (f->output != NULL)
 fclose(f->output);
 free (f);
 f = head;
 }
 DEBUG_RET();
+	// }}}2
 return 0;
 }
+// }}}1
+// void write_email_body(FILE *f, char *body) {{{1
 void write_email_body(FILE *f, char *body) {
 char *n = body;
 //  DEBUG_MAIN(("write_email_body(): \"%s\"\n", body));
 DEBUG_ENT("write_email_body");
 while (n != NULL) {
 }
 }
 fwrite(body, strlen(body), 1, f);
 DEBUG_RET();
 }
+// }}}1
-char * removeCR (char *c) {
+// char *removeCR (char *c) {{{1
+char *removeCR (char *c) {
 // converts /r/n to /n
 char *a, *b;
 DEBUG_ENT("removeCR");
 a = b = c;
 while (*a != '\0') {
 }
 *b = '\0';
 DEBUG_RET();
 return c;
 }
+// }}}1
+// int usage() {{{1
 int usage() {
 DEBUG_ENT("usage");
 version();
 printf("Usage: %s [OPTIONS] {PST FILENAME}\n", prog_name);
 printf("OPTIONS:\n");
 printf("\t-V\t- Version. Display program version\n");
 printf("\t-w\t- Overwrite any output mbox files\n");
 DEBUG_RET();
 return 0;
 }
+// }}}1
+// int version() {{{1
 int version() {
 DEBUG_ENT("version");
 printf("ReadPST v%s implementing LibPST v%s\n", VERSION, PST_VERSION);
 #if BYTE_ORDER == BIG_ENDIAN
 printf("Big Endian implementation being used.\n");
 printf("GCC %d.%d : %s %s\n", __GNUC__, __GNUC_MINOR__, __DATE__, __TIME__);
 #endif
 DEBUG_RET();
 return 0;
 }
+// }}}1
-char *kmail_chdir = NULL;
+// char *mk_kmail_dir(char *fname) {{{1
+char *mk_kmail_dir(char *fname) {
-char* mk_kmail_dir(char *fname) {
 //change to that directory
 //make a directory based on OUTPUT_KMAIL_DIR_TEMPLATE
 //allocate space for OUTPUT_TEMPLATE and form a char* with fname
 //return that value
 char *dir, *out_name, *index;
 out_name = malloc(strlen(fname)+strlen(OUTPUT_TEMPLATE)+1);
 sprintf(out_name, OUTPUT_TEMPLATE, fname);
 DEBUG_RET();
 return out_name;
 }
+// }}}1
+// int close_kmail_dir() {{{1
 int close_kmail_dir() {
 // change ..
 int x;
 DEBUG_ENT("close_kmail_dir");
 if (kmail_chdir != NULL) { //only free kmail_chdir if not NULL. do not change directory
 }
 }
 DEBUG_RET();
 return 0;
 }
+// }}}1
-char* mk_recurse_dir(char *dir) {
+// char *mk_recurse_dir(char *dir) {{{1
-// this will create a directory by that name, then make an mbox file inside that dir.
+// this will create a directory by that name, then make an mbox file inside
-// any subsequent dirs will be created by name, and they will contain mbox files
+// that dir.  any subsequent dirs will be created by name, and they will
+// contain mbox files
+char *mk_recurse_dir(char *dir) {
 int x;
 char *out_name;
 DEBUG_ENT("mk_recurse_dir");
 dir = check_filename(dir);
 if (D_MKDIR (dir)) {
 out_name = malloc(strlen("mbox")+1);
 strcpy(out_name, "mbox");
 DEBUG_RET();
 return out_name;
 }
+// }}}1
+// int close_recurse_dir() {{{1
 int close_recurse_dir() {
 int x;
 DEBUG_ENT("close_recurse_dir");
 if (chdir("..")) {
 x = errno;
 DIE(("close_recurse_dir: Cannot go up dir (..): %s\n", strerror(x)));
 }
 DEBUG_RET();
 return 0;
 }
+// }}}1
-char* mk_seperate_dir(char *dir, int overwrite) {
+// char *mk_seperate_dir(char *dir, int overwrite) {{{1
+char *mk_seperate_dir(char *dir, int overwrite) {
 #if !defined(WIN32) && !defined(__CYGWIN__)
 DIR * sdir = NULL;
 struct dirent *dirent = NULL;
 struct stat *filestat = xmalloc(sizeof(struct stat));
 #endif
 // we don't return a filename here cause it isn't necessary.
 DEBUG_RET();
 return NULL;
 }
+// }}}1
+// int close_seperate_dir() {{{1
 int close_seperate_dir() {
 int x;
 DEBUG_ENT("close_seperate_dir");
 if (chdir("..")) {
 x = errno;
 DIE(("close_seperate_dir: Cannot go up dir (..): %s\n", strerror(x)));
 }
 DEBUG_RET();
 return 0;
 }
+// }}}1
+// int mk_seperate_file(struct file_ll *f) {{{1
 int mk_seperate_file(struct file_ll *f) {
 DEBUG_ENT("mk_seperate_file");
 DEBUG_MAIN(("mk_seperate_file: opening next file to save email\n"));
 if (f->email_count > 999999999) { // bigger than nine 9's
 DIE(("mk_seperate_file: The number of emails in this folder has become too high to handle"));
 DIE(("mk_seperate_file: Cannot open file to save email \"%s\"\n", f->name));
 }
 DEBUG_RET();
 return 0;
 }
+// }}}1
+// char *my_stristr(char *haystack, char *needle) {{{1
+char *my_stristr(char *haystack, char *needle) {
 // my_stristr varies from strstr in that its searches are case-insensitive
-char * my_stristr(char *haystack, char *needle) {
 char *x=haystack, *y=needle, *z = NULL;
 DEBUG_ENT("my_stristr");
 if (haystack == NULL || needle == NULL)
 return NULL;
 while (*y != '\0' && *x != '\0') {
 x++; // advance the search in the haystack
 }
 DEBUG_RET();
 return z;
 }
+// }}}1
+// char *check_filename(char *fname) {{{1
 char *check_filename(char *fname) {
 char *t = fname;
 DEBUG_ENT("check_filename");
 if (t == NULL) {
 DEBUG_RET();
 *t = '_'; //replace them with an underscore
 }
 DEBUG_RET();
 return fname;
 }
+// }}}1
+// char *rfc2426_escape(char *str) {{{1
 char *rfc2426_escape(char *str) {
 static char* buf = NULL;
 char *ret, *a, *b;
 int x = 0, y, z;
 DEBUG_ENT("rfc2426_escape");
 ret = buf;
 }
 }
 DEBUG_RET();
 return ret;
 }
+// }}}1
+// int chr_count(char *str, char x) {{{1
 int chr_count(char *str, char x) {
 int r = 0;
 while (*str != '\0') {
 if (*str == x)
 r++;
 str++;
 }
 return r;
 }
+// }}}1
+// char *rfc2425_datetime_format(FILETIME *ft) {{{1
 char *rfc2425_datetime_format(FILETIME *ft) {
 static char * buffer = NULL;
 struct tm *stm = NULL;
 DEBUG_ENT("rfc2425_datetime_format");
 if (buffer == NULL)
 DEBUG_INFO(("Problem occured formatting date\n"));
 }
 DEBUG_RET();
 return buffer;
 }
+// }}}1
+// char *rfc2445_datetime_format(FILETIME *ft) {{{1
 char *rfc2445_datetime_format(FILETIME *ft) {
 static char* buffer = NULL;
 struct tm *stm = NULL;
 DEBUG_ENT("rfc2445_datetime_format");
 if (buffer == NULL)
 DEBUG_INFO(("Problem occured formatting date\n"));
 }
 DEBUG_RET();
 return buffer;
 }
+// }}}1
+// char *skip_header_prologue(char *headers) {{{1
+// The sole purpose of this function is to bypass the pseudo-header prologue
+// that Microsoft Outlook inserts at the beginning of the internet email
+// headers for emails stored in their "Personal Folders" files.
+char *skip_header_prologue(char *headers) {
+	const char *bad = "Microsoft Mail Internet Headers";
+	if ( strncmp(headers, bad, strlen(bad)) == 0 ) {
+		// Found the offensive header prologue
+		char *pc;
+		pc = strchr(headers, '\n');
+		return pc + 1;
+	}
+	return headers;
+}
+// }}}1
+// vim:sw=4 ts=4:
+// vim600: set foldlevel=0 foldmethod=marker:

Mercurial > libpst

comparison readpst.c @ 1:43e8802f08c5 debian libpst_0_5_1