src/recv.c

   1 /*
   2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
   3  * Copyright (C) 1999-2001 Hiroyuki Yamamoto
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18  */
  19
  20 #ifdef HAVE_CONFIG_H
  21 #  include "config.h"
  22 #endif
  23
  24 #include <glib.h>
  25 #include <stdio.h>
  26 #include <string.h>
  27 #include <unistd.h>
  28 #include <sys/time.h>
  29
  30 #include "intl.h"
  31 #include "recv.h"
  32 #include "socket.h"
  33 #include "utils.h"
  34
  35 #define BUFFSIZE        8192
  36
  37 static RecvUIFunc       recv_ui_func;
  38 static gpointer         recv_ui_func_data;
  39
  40 gint recv_write_to_file(SockInfo *sock, const gchar *filename)
  41 {
  42         FILE *fp;
  43
  44         g_return_val_if_fail(filename != NULL, -1);
  45
  46         if ((fp = fopen(filename, "w")) == NULL) {
  47                 FILE_OP_ERROR(filename, "fopen");
  48                 recv_write(sock, NULL);
  49                 return -1;
  50         }
  51
  52         if (change_file_mode_rw(fp, filename) < 0)
  53                 FILE_OP_ERROR(filename, "chmod");
  54
  55         if (recv_write(sock, fp) < 0) {
  56                 fclose(fp);
  57                 unlink(filename);
  58                 return -1;
  59         }
  60
  61         if (fclose(fp) == EOF) {
  62                 FILE_OP_ERROR(filename, "fclose");
  63                 unlink(filename);
  64                 return -1;
  65         }
  66
  67         return 0;
  68 }
  69
  70 gint recv_bytes_write_to_file(SockInfo *sock, glong size, const gchar *filename)
  71 {
  72         FILE *fp;
  73
  74         g_return_val_if_fail(filename != NULL, -1);
  75
  76         if ((fp = fopen(filename, "w")) == NULL) {
  77                 FILE_OP_ERROR(filename, "fopen");
  78                 recv_write(sock, NULL);
  79                 return -1;
  80         }
  81
  82         if (change_file_mode_rw(fp, filename) < 0)
  83                 FILE_OP_ERROR(filename, "chmod");
  84
  85         if (recv_bytes_write(sock, size, fp) < 0) {
  86                 fclose(fp);
  87                 unlink(filename);
  88                 return -1;
  89         }
  90
  91         if (fclose(fp) == EOF) {
  92                 FILE_OP_ERROR(filename, "fclose");
  93                 unlink(filename);
  94                 return -1;
  95         }
  96
  97         return 0;
  98 }
  99
 100 gint recv_write(SockInfo *sock, FILE *fp)
 101 {
 102         gchar buf[BUFFSIZE];
 103         gint len;
 104         gint bytes = 0;
 105         struct timeval tv_prev, tv_cur;
 106
 107         gettimeofday(&tv_prev, NULL);
 108
 109         for (;;) {
 110                 if (sock_gets(sock, buf, sizeof(buf)) < 0) {
 111                         g_warning(_("error occurred while retrieving data.\n"));
 112                         return -1;
 113                 }
 114
 115                 len = strlen(buf);
 116                 if (len > 1 && buf[0] == '.' && buf[1] == '\r') {
 117                         if (recv_ui_func)
 118                                 recv_ui_func(sock, bytes, recv_ui_func_data);
 119                         break;
 120                 }
 121                 bytes += len;
 122
 123                 if (recv_ui_func) {
 124                         gettimeofday(&tv_cur, NULL);
 125                         /* if elapsed time from previous update is greater
 126                            than 10msec, update UI */
 127                         if (tv_cur.tv_sec - tv_prev.tv_sec > 0 ||
 128                             tv_cur.tv_usec - tv_prev.tv_usec > 10000) {
 129                                 recv_ui_func(sock, bytes, recv_ui_func_data);
 130                                 gettimeofday(&tv_prev, NULL);
 131                         }
 132                 }
 133
 134                 if (len > 1 && buf[len - 1] == '\n' && buf[len - 2] == '\r') {
 135                         buf[len - 2] = '\n';
 136                         buf[len - 1] = '\0';
 137                         len--;
 138                 }
 139
 140                 if (buf[0] == '.' && buf[1] == '.')
 141                         memmove(buf, buf + 1, len--);
 142
 143                 if (!strncmp(buf, ">From ", 6))
 144                         memmove(buf, buf + 1, len--);
 145
 146                 if (fp && fputs(buf, fp) == EOF) {
 147                         perror("fputs");
 148                         g_warning(_("Can't write to file.\n"));
 149                         fp = NULL;
 150                 }
 151         }
 152
 153         if (!fp) return -1;
 154
 155         return 0;
 156 }
 157
 158 gint recv_bytes_write(SockInfo *sock, glong size, FILE *fp)
 159 {
 160         gchar *buf;
 161         glong count = 0;
 162         gchar *prev, *cur;
 163
 164         Xalloca(buf, size, return -1);
 165
 166         do {
 167                 gint read_count;
 168
 169                 read_count = sock_read(sock, buf + count, size - count);
 170                 if (read_count < 0)
 171                         return -1;
 172                 count += read_count;
 173         } while (count < size);
 174
 175         /* +------------------+----------------+--------------------------+ *
 176          * ^buf               ^prev            ^cur             buf+size-1^ */
 177
 178         prev = buf;
 179         while ((cur = memchr(prev, '\r', size - (prev - buf))) != NULL) {
 180                 if (cur == buf + size - 1) break;
 181
 182                 if (fwrite(prev, sizeof(gchar), cur - prev, fp) == EOF ||
 183                     fwrite("\n", sizeof(gchar), 1, fp) == EOF) {
 184                         perror("fwrite");
 185                         g_warning(_("Can't write to file.\n"));
 186                         return -1;
 187                 }
 188
 189                 if (*(cur + 1) == '\n')
 190                         prev = cur + 2;
 191                 else
 192                         prev = cur + 1;
 193
 194                 if (prev - buf >= size) break;
 195         }
 196
 197         if (prev - buf < size && fwrite(buf, sizeof(gchar),
 198                                         size - (prev - buf), fp) == EOF) {
 199                 perror("fwrite");
 200                 g_warning(_("Can't write to file.\n"));
 201                 return -1;
 202         }
 203
 204         return 0;
 205 }
 206
 207 void recv_set_ui_func(RecvUIFunc func, gpointer data)
 208 {
 209         recv_ui_func = func;
 210         recv_ui_func_data = data;
 211 }