/*
 * import_imap.c
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/time.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/socket.h>
#include <netdb.h>
#include <arpa/inet.h>
#include <netinet/in.h>
#include <fcntl.h>
#include <dirent.h>
#include <unistd.h>
#include <time.h>
#include <locale.h>
#include <getopt.h>
#include <syslog.h>
#include <piler.h>


int import_from_imap_server(struct session_data *sdata, struct data *data, struct counters *counters, struct config *cfg){
   int i, rc=ERR, ret=OK, skipmatch;
   char port_string[8], puf[SMALLBUFSIZE];
   struct addrinfo hints, *res;
   struct node *q;

   data->net->use_ssl = 0;
   data->import->seq = 1;

   inithash(data->imapfolders);

   snprintf(port_string, sizeof(port_string)-1, "%d", data->import->port);

   memset(&hints, 0, sizeof(hints));
   hints.ai_family = AF_UNSPEC;
   hints.ai_socktype = SOCK_STREAM;

   if((rc = getaddrinfo(data->import->server, port_string, &hints, &res)) != 0){
      printf("getaddrinfo for '%s': %s\n", data->import->server, gai_strerror(rc));
      return ERR;
   }

   if(data->import->port == 993) data->net->use_ssl = 1;


   if((data->net->socket = socket(res->ai_family, res->ai_socktype, res->ai_protocol)) == -1){
      printf("cannot create socket\n");
      ret = ERR;
      goto ENDE_IMAP;
   }

   if(connect(data->net->socket, res->ai_addr, res->ai_addrlen) == -1){
      printf("connect()\n");
      ret = ERR;
      goto ENDE_IMAP;
   }

   if(connect_to_imap_server(data) == ERR){
      close(data->net->socket);
      ret = ERR;
      goto ENDE_IMAP;
   }


   if(list_folders(data) == ERR) goto ENDE_IMAP;


   for(i=0;i<MAXHASH;i++){
      q = data->imapfolders[i];
      while(q != NULL){

         if(q->str && strlen(q->str) > 1){

            skipmatch = 0;

            if(data->import->skiplist && strlen(data->import->skiplist) > 0){
               snprintf(puf, sizeof(puf)-1, "%s,", (char *)q->str);
               if(strstr(data->import->skiplist, puf)) skipmatch = 1;
            }

            if(skipmatch == 1){
               if(data->quiet == 0) printf("SKIPPING FOLDER: %s\n", (char *)q->str);
            }
            else {
               if(data->quiet == 0) printf("processing folder: %s... ", (char *)q->str);

               if(process_imap_folder(q->str, sdata, data, counters, cfg) == ERR) ret = ERR;
            }

         }

         q = q->r;

      }
   }

   send_imap_close(data);

   close_connection(data->net);

ENDE_IMAP:
   freeaddrinfo(res);

   clearhash(data->imapfolders);

   data->import->status = 2;

   return ret;
}