2 * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3 * Copyright (C) 1999-2003 Hiroyuki Yamamoto
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.
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.
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.
31 #include <sys/types.h>
33 #include <sys/signal.h>
40 static gint session_close (Session *session);
42 static gchar *session_recv_msg (Session *session);
44 static guchar *session_read_data (Session *session,
47 static gint session_send_data_to_sock (Session *session,
50 static guchar *session_recv_data_from_sock (Session *session,
53 static guchar *session_recv_data_from_sock_unescape (Session *session,
57 gboolean session_parent_input_cb (GIOChannel *source,
58 GIOCondition condition,
61 gboolean session_child_input (Session *session);
65 *\brief init session members to zero
67 *\param session to be initialized
69 void session_init(Session *session)
74 session->server = NULL;
76 session->state = SESSION_READY;
77 session->last_access_time = time(NULL);
80 session->read_ch = NULL;
81 session->write_ch = NULL;
85 *\brief Set up parent and child process
86 * Childloop: Read commands from parent,
87 * send to server, get answer, pass to parent
89 *\param session Contains session information
90 * server to connect to
94 * -1 : pipe / fork errors (parent)
95 * 1 : connection error (child)
97 gint session_connect(Session *session, const gchar *server, gushort port)
100 gint pipe_fds1[2], pipe_fds2[2];
104 session->server = g_strdup(server);
105 session->port = port;
107 if (pipe(pipe_fds1) < 0) {
111 if (pipe(pipe_fds2) < 0) {
118 if ((pid = fork()) < 0) {
124 session->child_pid = pid;
125 session->read_ch = g_io_channel_unix_new(pipe_fds2[0]);
126 session->write_ch = g_io_channel_unix_new(pipe_fds1[1]);
129 session->read_tag = g_io_add_watch(session->read_ch, G_IO_IN,
130 session_parent_input_cb,
137 session->read_ch = g_io_channel_unix_new(pipe_fds1[0]);
138 session->write_ch = g_io_channel_unix_new(pipe_fds2[1]);
142 g_print("child: connecting to %s:%d ...\n", server, port);
144 if ((sock = sock_connect(server, port)) == NULL) {
145 session_send_msg(session, SESSION_MSG_ERROR,
146 "can't connect to server.");
147 session_close(session);
152 if (session->ssl_type == SSL_TUNNEL && !ssl_init_socket(sock)) {
153 session_send_msg(session, SESSION_MSG_ERROR,
154 "can't initialize SSL.");
155 session_close(session);
160 g_print("child: connected\n");
162 session->sock = sock;
163 session->state = SESSION_RECV;
165 if ((str = sock_getline(sock)) == NULL) {
166 session_send_msg(session, SESSION_MSG_ERROR,
167 "can't get server response.");
168 session_close(session);
172 session_send_msg(session, SESSION_MSG_NORMAL, str);
175 while (session_child_input(session) == TRUE)
178 session_close(session);
180 g_print("child: disconnected\n");
186 *\brief child and parent: send DISCONNECT message to other process
188 *\param session Contains session information
192 gint session_disconnect(Session *session)
194 g_print("%s: session_disconnect()\n", session->child_pid == 0 ? "child" : "parent");
195 session_send_msg(session, SESSION_MSG_CONTROL, "DISCONNECT");
202 *\param session Contains session information
204 void session_destroy(Session *session)
206 g_return_if_fail(session != NULL);
207 g_return_if_fail(session->destroy != NULL);
209 g_print("session_destroy()\n");
210 session_close(session);
211 g_print("$$$ session_destroy() session->destroy called\n");
212 session->destroy(session);
213 g_print("$$$ session_destroy() freeing session server\n");
214 g_free(session->server);
215 g_print("$$$ session_destroy() freeing session\n");
217 g_print("$$$ session_destroy() done\n");
220 void session_set_recv_message_notify(Session *session,
221 RecvMsgNotify notify_func, gpointer data)
223 session->recv_msg_notify = notify_func;
224 session->recv_msg_notify_data = data;
227 void session_set_recv_data_progressive_notify
229 RecvDataProgressiveNotify notify_func,
232 session->recv_data_progressive_notify = notify_func,
233 session->recv_data_progressive_notify_data = data;
236 void session_set_recv_data_notify(Session *session, RecvDataNotify notify_func,
239 session->recv_data_notify = notify_func;
240 session->recv_data_notify_data = data;
243 void session_set_send_data_progressive_notify
245 SendDataProgressiveNotify notify_func,
248 session->send_data_progressive_notify = notify_func;
249 session->send_data_progressive_notify_data = data;
252 void session_set_send_data_notify(Session *session, SendDataNotify notify_func,
255 session->send_data_notify = notify_func;
256 session->send_data_notify_data = data;
260 *\brief child and parent cleanup (child closes first)
262 *\param session Contains session information
266 static gint session_close(Session *session)
268 g_return_val_if_fail(session != NULL, -1);
270 g_print("%s: session_close()\n", session->child_pid == 0 ? "child" : "parent");
272 if (session->read_tag > 0) {
273 g_source_remove(session->read_tag);
274 session->read_tag = 0;
277 g_print("$$$ %s: closing read channel\n", session->child_pid == 0 ? "child" : "parent");
278 if (session->read_ch) {
279 g_io_channel_close(session->read_ch);
280 g_io_channel_unref(session->read_ch);
281 session->read_ch = NULL;
284 g_print("$$$ %s: closing write channel\n", session->child_pid == 0 ? "child" : "parent");
285 if (session->write_ch) {
286 g_io_channel_close(session->write_ch);
287 g_io_channel_unref(session->write_ch);
288 session->write_ch = NULL;
291 g_print("$$$ %s: closing socket\n", session->child_pid == 0 ? "child" : "parent");
293 sock_close(session->sock);
294 session->sock = NULL;
295 session->state = SESSION_DISCONNECTED;
298 if (session->child_pid) {
299 g_print("$$$ %s: closing child\n", session->child_pid == 0 ? "child" : "parent");
300 kill(session->child_pid, SIGTERM);
301 waitpid(session->child_pid, NULL, 0);
302 session->child_pid = 0;
305 g_print("$$$ %s: exiting session_close\n", session->child_pid == 0 ? "child" : "parent");
310 *\brief child and parent: send control message to other process
312 *\param session Contains session information
313 * type Kind of data (commands or message data)
319 gint session_send_msg(Session *session, SessionMsgType type, const gchar *msg)
327 case SESSION_MSG_NORMAL:
328 prefix = "MESSAGE"; break;
329 case SESSION_MSG_SEND_DATA:
330 prefix = "SENDDATA"; break;
331 case SESSION_MSG_RECV_DATA:
332 prefix = "RECVDATA"; break;
333 case SESSION_MSG_CONTROL:
334 prefix = "CONTROL"; break;
335 case SESSION_MSG_ERROR:
336 prefix = "ERROR"; break;
341 str = g_strdup_printf("%s %s\n", prefix, msg);
342 /* g_print("%s: sending message: %s", session->child_pid == 0 ? "child" : "parent", str); */
346 if (g_io_channel_write(session->write_ch, str, size,
348 != G_IO_ERROR_NONE || bytes_written == 0) {
349 g_warning("%s: sending message failed.\n",
350 session->child_pid == 0 ? "child" : "parent");
353 size -= bytes_written;
360 *\brief child and parent receive function
362 *\param session Contains session information
364 *\return Message read by current session
366 static gchar *session_recv_msg(Session *session)
374 if (g_io_channel_read(session->read_ch, buf, sizeof(buf) - 1,
376 != G_IO_ERROR_NONE || bytes_read == 0) {
377 g_warning("%s: receiving message failed.\n",
378 session->child_pid == 0 ? "child" : "parent");
385 buf[bytes_read] = '\0';
390 str = g_realloc(str, size);
393 if (str[size - 2] == '\n') {
394 str[size - 2] = '\0';
396 g_print("%s: received message: %s\n", session->child_pid == 0 ? "child" : "parent", str);
406 gint session_start_tls(Session *session)
410 session_send_msg(session, SESSION_MSG_CONTROL, "STARTTLS");
411 ctl_msg = session_recv_msg(session);
412 if (!ctl_msg || strcmp(ctl_msg, "CONTROL STARTTLSOK") != 0) {
423 *\brief parent (child?): send data to other process
425 *\param session Contains session information
432 gint session_send_data(Session *session, const guchar *data, guint size)
438 session_send_msg(session, SESSION_MSG_SEND_DATA, itos(size));
439 if ((msg = session_recv_msg(session)) == NULL)
444 if ((err = g_io_channel_write(session->write_ch, (guchar *)data,
445 size, &bytes_written))
446 != G_IO_ERROR_NONE || bytes_written == 0) {
447 g_warning("%s: sending data failed: %d\n",
448 session->child_pid == 0 ? "child" : "parent",
452 size -= bytes_written;
453 g_print("%s: sent %d bytes of data\n", session->child_pid == 0 ? "child" : "parent", bytes_written);
459 gint session_recv_data(Session *session, guint size, gboolean unescape_dot)
464 g_snprintf(buf, sizeof(buf), "%d UNESCAPE", size);
465 session_send_msg(session, SESSION_MSG_RECV_DATA, buf);
467 session_send_msg(session, SESSION_MSG_RECV_DATA, itos(size));
472 *\brief child (parent?): read data from other process
474 *\param session Contains session information
477 *\return data read from session
479 static guchar *session_read_data(Session *session, guint size)
486 cur = data = g_malloc(size);
489 if ((err = g_io_channel_read(session->read_ch, cur, size,
491 != G_IO_ERROR_NONE || bytes_read == 0) {
492 g_warning("%s: reading data failed: %d\n",
493 session->child_pid == 0 ? "child" : "parent",
500 g_print("%s: received %d bytes of data\n", session->child_pid == 0 ? "child" : "parent", bytes_read);
506 #define MAX_CHUNK_SIZE 4096
509 *\brief child: Send session data to server
511 *\param session Contains session information
512 * data Data to send to server
518 static gint session_send_data_to_sock(Session *session, const guchar *data,
521 const guchar *cur = data;
523 gint total_write_len = 0;
527 struct timeval tv_prev, tv_cur;
529 gettimeofday(&tv_prev, NULL);
532 bytes_written = sock_write(session->sock, cur,
533 MIN(left, MAX_CHUNK_SIZE));
534 if (bytes_written <= 0)
536 left -= bytes_written;
537 cur += bytes_written;
538 total_write_len += bytes_written;
542 gettimeofday(&tv_cur, NULL);
543 if (tv_cur.tv_sec - tv_prev.tv_sec > 0 ||
544 tv_cur.tv_usec - tv_prev.tv_usec > UI_REFRESH_INTERVAL) {
545 g_snprintf(buf, sizeof(buf), "DATASENDINPROG %d %d",
546 total_write_len, size);
547 session_send_msg(session, SESSION_MSG_CONTROL, buf);
548 if ((msg = session_recv_msg(session)) == NULL)
551 gettimeofday(&tv_prev, NULL);
559 *\brief child: Read answer/data from server
561 *\param session Contains session information
562 * size Max bytes to receive
564 *\return Server answer
566 static guchar *session_recv_data_from_sock(Session *session, guint size)
571 gint total_read_len = 0;
575 struct timeval tv_prev, tv_cur;
577 gettimeofday(&tv_prev, NULL);
579 cur = data = g_malloc(size);
582 bytes_read = sock_read(session->sock, cur, left);
583 if (bytes_read <= 0) {
587 g_print("child: received %d bytes of data from sock\n", bytes_read);
590 total_read_len += bytes_read;
594 gettimeofday(&tv_cur, NULL);
595 if (tv_cur.tv_sec - tv_prev.tv_sec > 0 ||
596 tv_cur.tv_usec - tv_prev.tv_usec > UI_REFRESH_INTERVAL) {
597 g_snprintf(buf, sizeof(buf), "DATARECVINPROG %d %d",
598 total_read_len, size);
599 session_send_msg(session, SESSION_MSG_CONTROL, buf);
600 if ((msg = session_recv_msg(session)) == NULL) {
605 gettimeofday(&tv_prev, NULL);
612 static guchar *session_recv_data_from_sock_unescape(Session *session,
621 struct timeval tv_prev, tv_cur;
623 gettimeofday(&tv_prev, NULL);
625 data = g_string_sized_new(size + 1);
629 bytes_read = sock_gets(session->sock, buf, sizeof(buf));
630 if (bytes_read <= 0) {
631 g_string_free(data, TRUE);
635 if (buf[0] == '.' && buf[1] == '\r' && buf[2] == '\n')
637 if (buf[0] == '.' && buf[1] == '.')
638 g_string_append(data, buf + 1);
640 g_string_append(data, buf);
642 gettimeofday(&tv_cur, NULL);
643 if (tv_cur.tv_sec - tv_prev.tv_sec > 0 ||
644 tv_cur.tv_usec - tv_prev.tv_usec > UI_REFRESH_INTERVAL) {
645 g_snprintf(buf, sizeof(buf), "DATARECVINPROG %d %d",
646 data->len, MAX(data->len, size));
647 session_send_msg(session, SESSION_MSG_CONTROL, buf);
648 if ((msg = session_recv_msg(session)) == NULL) {
649 g_string_free(data, TRUE);
653 gettimeofday(&tv_prev, NULL);
657 ret_data = data->str;
658 *actual_size = data->len;
659 g_string_free(data, FALSE);
665 *\brief Return if message is an internal command or server data
667 *\param str Message to analyze
669 *\return Type of message
671 static SessionMsgType session_get_msg_type(const gchar *str)
673 if (!strncmp(str, "MESSAGE ", 8))
674 return SESSION_MSG_NORMAL;
675 else if (!strncmp(str, "SENDDATA ", 9))
676 return SESSION_MSG_SEND_DATA;
677 else if (!strncmp(str, "RECVDATA ", 9))
678 return SESSION_MSG_RECV_DATA;
679 else if (!strncmp(str, "CONTROL ", 8))
680 return SESSION_MSG_CONTROL;
681 else if (!strncmp(str, "ERROR ", 6))
682 return SESSION_MSG_ERROR;
684 return SESSION_MSG_UNKNOWN;
688 *\brief parent: Received data from child
690 *\param source Channel watching child pipe
691 * condition Unused (IN, HUP, OUT)
692 * data Contains session information
694 *\return FALSE to remove watching channel
696 gboolean session_parent_input_cb(GIOChannel *source, GIOCondition condition,
699 Session *session = SESSION(data);
708 if ((msg = session_recv_msg(session)) == NULL) {
709 session->state = SESSION_ERROR;
713 switch (session_get_msg_type(msg)) {
714 case SESSION_MSG_NORMAL:
715 msg_data = msg + strlen("MESSAGE ");
716 ret = session->recv_msg(session, msg_data);
717 g_print("$$$ > session_parent_input_cb(data: %lx)\n",
718 session->recv_msg_notify_data);
719 session->recv_msg_notify(session, msg_data,
720 session->recv_msg_notify_data);
721 g_print("$$$ < session_parent_input_cb(data: %lx)\n",
722 session->recv_msg_notify_data);
724 session_send_msg(session, SESSION_MSG_CONTROL,
727 session->state = SESSION_ERROR;
732 case SESSION_MSG_SEND_DATA:
733 msg_data = msg + strlen("SENDDATA ");
734 size = atoi(msg_data);
735 session_send_msg(session, SESSION_MSG_CONTROL, "ACCEPTDATA");
736 recv_data = session_read_data(session, size);
738 session->state = SESSION_ERROR;
742 ret = session->recv_data_finished(session, recv_data, size);
744 session->recv_data_notify(session, size,
745 session->recv_data_notify_data);
747 session_send_msg(session, SESSION_MSG_CONTROL,
750 session->state = SESSION_ERROR;
755 case SESSION_MSG_RECV_DATA:
757 case SESSION_MSG_CONTROL:
758 msg_data = msg + strlen("CONTROL ");
759 if (!strncmp(msg_data, "DATARECVINPROG ", 15)) {
760 ret = sscanf(msg_data,
761 "DATARECVINPROG %d %d", &len, &total);
763 g_warning("wrong control message: %s\n", msg);
764 session->state = SESSION_ERROR;
768 session_send_msg(session, SESSION_MSG_CONTROL,
770 session->recv_data_progressive_notify
771 (session, len, total,
772 session->recv_data_progressive_notify_data);
773 } else if (!strncmp(msg_data, "DATASENDINPROG ", 15)) {
774 ret = sscanf(msg_data,
775 "DATASENDINPROG %d %d", &len, &total);
777 g_warning("wrong control message: %s\n", msg);
778 session->state = SESSION_ERROR;
782 session_send_msg(session, SESSION_MSG_CONTROL,
784 session->send_data_progressive_notify
785 (session, len, total,
786 session->send_data_progressive_notify_data);
787 } else if (!strncmp(msg_data, "DATASENT ", 9)) {
788 len = atoi(msg_data + 9);
789 ret = session->send_data_finished(session, len);
790 session->send_data_notify
791 (session, len, session->send_data_notify_data);
792 } else if (!strcmp(msg_data, "DISCONNECTED")) {
793 session->state = SESSION_DISCONNECTED;
797 g_warning("wrong control message: %s\n", msg);
798 session->state = SESSION_ERROR;
803 case SESSION_MSG_ERROR:
805 g_warning("error from child: %s\n", msg + strlen("ERROR "));
806 session->state = SESSION_ERROR;
816 *\brief child: Receive control message from parent,
817 * transfer data from/to server
819 *\param session Contains session information
821 *\return TRUE if more data is available
823 gboolean session_child_input(Session *session)
834 if ((msg = session_recv_msg(session)) == NULL) {
835 session_send_msg(session, SESSION_MSG_ERROR,
836 "receiving message failed.");
837 session_close(session);
838 session->state = SESSION_ERROR;
842 switch (session_get_msg_type(msg)) {
843 case SESSION_MSG_NORMAL:
844 msg_data = msg + strlen("MESSAGE ");
845 session->state = SESSION_SEND;
846 sock_puts(session->sock, msg_data);
847 session->state = SESSION_RECV;
848 str = sock_getline(session->sock);
850 session_send_msg(session, SESSION_MSG_ERROR,
851 "receiving message failed.");
852 session_close(session);
853 session->state = SESSION_ERROR;
858 session_send_msg(session, SESSION_MSG_NORMAL, str);
861 case SESSION_MSG_SEND_DATA:
862 msg_data = msg + strlen("SENDDATA ");
863 size = atoi(msg_data);
864 session_send_msg(session, SESSION_MSG_CONTROL, "ACCEPTDATA");
865 send_data = session_read_data(session, size);
867 session_send_msg(session, SESSION_MSG_ERROR,
868 "sending data failed.");
869 session_close(session);
870 session->state = SESSION_ERROR;
874 session->state = SESSION_SEND;
875 if (session_send_data_to_sock(session, send_data, size) < 0) {
876 session_send_msg(session, SESSION_MSG_ERROR,
877 "sending data failed.");
878 session_close(session);
879 session->state = SESSION_ERROR;
885 g_snprintf(buf, sizeof(buf), "DATASENT %d", size);
886 session_send_msg(session, SESSION_MSG_CONTROL, buf);
888 case SESSION_MSG_RECV_DATA:
889 msg_data = msg + strlen("RECVDATA ");
890 size = atoi(msg_data);
891 session->state = SESSION_RECV;
892 if (strstr(msg_data, "UNESCAPE") != NULL) {
893 recv_data = session_recv_data_from_sock_unescape
894 (session, size, &actual_size);
897 recv_data = session_recv_data_from_sock(session, size);
899 session_send_msg(session, SESSION_MSG_ERROR,
900 "receiving data failed.");
901 session_close(session);
902 session->state = SESSION_ERROR;
906 if (session_send_data(session, recv_data, size) < 0) {
907 session_close(session);
908 session->state = SESSION_ERROR;
915 case SESSION_MSG_CONTROL:
916 msg_data = msg + strlen("CONTROL ");
917 if (!strcmp(msg_data, "CONTINUE")) {
918 session->state = SESSION_RECV;
919 str = sock_getline(session->sock);
921 session_send_msg(session, SESSION_MSG_ERROR,
922 "receiving message failed.");
923 session_close(session);
924 session->state = SESSION_ERROR;
929 session_send_msg(session, SESSION_MSG_NORMAL, str);
933 } else if (!strcmp(msg_data, "STARTTLS")) {
934 if (!ssl_init_socket_with_method(session->sock,
936 session_send_msg(session, SESSION_MSG_ERROR,
937 "can't start TLS session.");
938 session_close(session);
939 session->state = SESSION_ERROR;
943 session_send_msg(session, SESSION_MSG_CONTROL,
947 } else if (!strcmp(msg_data, "DISCONNECT")) {
948 sock_close(session->sock);
949 session->sock = NULL;
950 session->state = SESSION_DISCONNECTED;
951 session_send_msg(session, SESSION_MSG_CONTROL,
956 session_send_msg(session, SESSION_MSG_ERROR,
957 "wrong control message.");
958 session_close(session);
959 session->state = SESSION_ERROR;
964 case SESSION_MSG_ERROR:
966 session_send_msg(session, SESSION_MSG_ERROR,
967 "error received from parent.");
968 session_close(session);
969 session->state = SESSION_ERROR;