contrib/carmel/c-client/bzk2cml.c

   1 #include <stdio.h>
   2 #include <ctype.h>
   3 #include <pwd.h>
   4 #include <sys/dir.h>
   5 #include "mail.h"
   6 #include "osdep.h"
   7 #include "carmel2.h"
   8 #include "carmel.h"
   9
  10 char *last_path(), *cpystr();
  11 void carmel2_bezerk_mail();
  12 extern DRIVER carmeldriver;
  13
  14 extern char carmel_20k_buf[20000];
  15
  16
  17 main(argc, argv)
  18      int argc;
  19      char **argv;
  20 {
  21     char carmel_folder[500], *bezerk_folder;
  22     MAILSTREAM *stream;
  23
  24     if(argc <= 1) {
  25         fprintf(stderr, "Usage: bzk2cml <folder>\n");
  26         exit(-1);
  27     }
  28
  29     for(argv++; *argv != NULL; argv++) {
  30         bezerk_folder = last_path(*argv);  /* Only last component of path */
  31         sprintf(carmel_folder, "#carmel#%s", bezerk_folder);
  32
  33         if(carmel_create(NULL, carmel_folder) == 0) {
  34             continue;
  35         }
  36
  37
  38         stream          = (MAILSTREAM *)fs_get(sizeof(MAILSTREAM));
  39         stream->dtb     = &carmeldriver;
  40         stream->mailbox = cpystr(carmel_folder);
  41         stream->local   = NULL;
  42
  43         if(carmel_open(stream) == NULL) {
  44             continue;
  45         }
  46
  47         if(carmel2_lock(stream, stream->mailbox, WRITE_LOCK) < 0) {
  48             fprintf(stderr, "Carmel folder %s locked\n", carmel_folder);
  49             carmel_close(stream);
  50             continue;
  51         }
  52
  53         carmel2_spool_mail(stream, *argv, stream->mailbox, 0);
  54         carmel2_unlock(stream, stream->mailbox, WRITE_LOCK);
  55         fprintf(stderr, "Folder \"%s\" copied to \"%s\"\n", *argv,
  56                 carmel_folder);
  57         carmel_close(stream);
  58     }
  59 }
  60
  61
  62
  63
  64
  65
  66
  67
  68 char *last_path(path)
  69      char *path;
  70 {
  71     char *p;
  72
  73     p = path + strlen(path) - 1;
  74
  75     while(p > path && *p != '/')
  76       p--;
  77
  78     if(*p == '/')
  79       p++;
  80     return(p);
  81 }
  82
  83 void
  84 mm_log(mess, code)
  85      char *mess;
  86      int code;
  87 {
  88     fprintf(stderr, "%s\n", mess);
  89 }
  90
  91 void
  92 mm_fatal()
  93 {
  94     abort();
  95 }
  96
  97 void mm_mailbox() {}
  98 void mm_critical() {}
  99 void mm_nocritical() {}
 100 void mm_searched() {}
 101 void mm_exists() {}
 102 void mm_expunged() {}
 103