sync with 0.7.5cvs9
[claws.git] / 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 "defs.h"
25
26 #include <glib.h>
27 #include <stdio.h>
28 #include <string.h>
29 #include <unistd.h>
30 #include <sys/time.h>
31
32 #include "intl.h"
33 #include "recv.h"
34 #include "socket.h"
35 #include "utils.h"
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, "wb")) == 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, "wb")) == 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 count = 0;
105         gint bytes = 0;
106         struct timeval tv_prev, tv_cur;
107
108         gettimeofday(&tv_prev, NULL);
109
110         for (;;) {
111                 if (sock_gets(sock, buf, sizeof(buf)) < 0) {
112                         g_warning(_("error occurred while retrieving data.\n"));
113                         return -1;
114                 }
115
116                 len = strlen(buf);
117                 if (len > 1 && buf[0] == '.' && buf[1] == '\r') {
118                         if (recv_ui_func)
119                                 recv_ui_func(sock, count, bytes,
120                                              recv_ui_func_data);
121                         break;
122                 }
123                 count++;
124                 bytes += len;
125
126                 if (recv_ui_func) {
127                         gettimeofday(&tv_cur, NULL);
128                         /* if elapsed time from previous update is greater
129                            than 50msec, update UI */
130                         if (tv_cur.tv_sec - tv_prev.tv_sec > 0 ||
131                             tv_cur.tv_usec - tv_prev.tv_usec > UI_REFRESH_INTERVAL) {
132                                 gboolean ret;
133                                 ret = recv_ui_func(sock, count, bytes,
134                                                    recv_ui_func_data);
135                                 if (ret == FALSE) return -1;
136                                 gettimeofday(&tv_prev, NULL);
137                         }
138                 }
139
140                 if (len > 1 && buf[len - 1] == '\n' && buf[len - 2] == '\r') {
141                         buf[len - 2] = '\n';
142                         buf[len - 1] = '\0';
143                         len--;
144                 }
145
146                 if (buf[0] == '.' && buf[1] == '.')
147                         memmove(buf, buf + 1, len--);
148
149                 if (!strncmp(buf, ">From ", 6))
150                         memmove(buf, buf + 1, len--);
151
152                 if (fp && fputs(buf, fp) == EOF) {
153                         perror("fputs");
154                         g_warning(_("Can't write to file.\n"));
155                         fp = NULL;
156                 }
157         }
158
159         if (!fp) return -1;
160
161         return 0;
162 }
163
164 gint recv_bytes_write(SockInfo *sock, glong size, FILE *fp)
165 {
166         gchar *buf;
167         glong count = 0;
168         gchar *prev, *cur;
169
170         buf = g_malloc(size);
171
172         do {
173                 gint read_count;
174
175                 read_count = sock_read(sock, buf + count, size - count);
176                 if (read_count < 0) {
177                         g_free(buf);
178                         return -1;
179                 }
180                 count += read_count;
181         } while (count < size);
182
183         /* +------------------+----------------+--------------------------+ *
184          * ^buf               ^prev            ^cur             buf+size-1^ */
185
186         prev = buf;
187         while ((cur = memchr(prev, '\r', size - (prev - buf))) != NULL) {
188                 if (cur == buf + size - 1) break;
189
190                 if (fwrite(prev, sizeof(gchar), cur - prev, fp) == EOF ||
191                     fwrite("\n", sizeof(gchar), 1, fp) == EOF) {
192                         perror("fwrite");
193                         g_warning(_("Can't write to file.\n"));
194                         g_free(buf);
195                         return -1;
196                 }
197
198                 if (*(cur + 1) == '\n')
199                         prev = cur + 2;
200                 else
201                         prev = cur + 1;
202
203                 if (prev - buf >= size) break;
204         }
205
206         if (prev - buf < size && fwrite(buf, sizeof(gchar),
207                                         size - (prev - buf), fp) == EOF) {
208                 perror("fwrite");
209                 g_warning(_("Can't write to file.\n"));
210                 g_free(buf);
211                 return -1;
212         }
213
214         g_free(buf);
215         return 0;
216 }
217
218 void recv_set_ui_func(RecvUIFunc func, gpointer data)
219 {
220         recv_ui_func = func;
221         recv_ui_func_data = data;
222 }