1 /* GLIB - Library of useful routines for C programming
2 * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
4 * giowin32.c: IO Channels for Win32.
5 * Copyright 1998 Owen Taylor and Tor Lillqvist
6 * Copyright 1999-2000 Tor Lillqvist and Craig Setera
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2 of the License, or (at your option) any later version.
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the
20 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21 * Boston, MA 02111-1307, USA.
25 * Modified by the GLib Team and others 1997-2000. See the AUTHORS
26 * file for a list of people on the GLib Team. See the ChangeLog
27 * files for a list of changes. These files are distributed with
28 * GLib at ftp://ftp.gtk.org/pub/gtk/.
31 /* Define this to get (very) verbose logging of all channels */
32 /* #define G_IO_WIN32_DEBUG */
38 #include <winsock.h> /* Not everybody has winsock2 */
45 typedef struct _GIOWin32Channel GIOWin32Channel;
46 typedef struct _GIOWin32Watch GIOWin32Watch;
48 #define BUFFER_SIZE 4096
51 G_IO_WINDOWS_MESSAGES, /* Windows messages */
52 G_IO_FILE_DESC, /* Unix-like file descriptors from
53 * _open() or _pipe(). Read with read().
54 * Have to create separate thread to read.
56 G_IO_STREAM_SOCKET /* Stream sockets. Similar as fds, but
59 } GIOWin32ChannelType;
61 struct _GIOWin32Channel {
63 gint fd; /* Either a Unix-like file handle as provided
64 * by the Microsoft C runtime, or a SOCKET
65 * as provided by WinSock.
67 GIOWin32ChannelType type;
71 /* This is used by G_IO_WINDOWS_MESSAGES channels */
72 HWND hwnd; /* handle of window, or NULL */
74 /* Following fields used by fd and socket channels for input */
76 /* Data is kept in a circular buffer. To be able to distinguish between
77 * empty and full buffer, we cannot fill it completely, but have to
78 * leave a one character gap.
80 * Data available is between indexes rdp and wrp-1 (modulo BUFFER_SIZE).
83 * Full: (wrp + 1) % BUFFER_SIZE == rdp
86 guchar *buffer; /* (Circular) buffer */
87 gint wrp, rdp; /* Buffer indices for writing and reading */
88 gboolean running; /* Is reader thread running. FALSE if
89 * EOF has been reached.
91 guint thread_id; /* If non-NULL has a reader thread, or has
93 HANDLE data_avail_event;
94 HANDLE space_avail_event;
95 CRITICAL_SECTION mutex;
97 /* Function that actually reads from fd */
98 int (*reader) (int fd, guchar *buf, int len);
101 #define LOCK(mutex) EnterCriticalSection (&mutex)
102 #define UNLOCK(mutex) LeaveCriticalSection (&mutex)
104 struct _GIOWin32Watch {
107 GIOCondition condition;
112 g_io_channel_win32_init (GIOWin32Channel *channel)
114 #ifdef G_IO_WIN32_DEBUG
115 channel->debug = TRUE;
117 if (getenv ("G_IO_WIN32_DEBUG") != NULL)
118 channel->debug = TRUE;
120 channel->debug = FALSE;
122 channel->buffer = NULL;
123 channel->running = FALSE;
124 channel->thread_id = 0;
128 create_events (GIOWin32Channel *channel)
130 SECURITY_ATTRIBUTES sec_attrs;
132 sec_attrs.nLength = sizeof(SECURITY_ATTRIBUTES);
133 sec_attrs.lpSecurityDescriptor = NULL;
134 sec_attrs.bInheritHandle = FALSE;
136 channel->data_avail_event = NULL;
137 channel->space_avail_event = NULL;
139 /* The data available event is manual reset, the space available event
140 * is automatic reset.
142 if (!(channel->data_avail_event = CreateEvent (&sec_attrs, TRUE, FALSE, NULL))
143 || !(channel->space_avail_event = CreateEvent (&sec_attrs, FALSE, FALSE, NULL)))
145 gchar *msg = g_win32_error_message (GetLastError ());
146 g_error ("Error creating event: %s", msg);
148 InitializeCriticalSection (&channel->mutex);
151 static unsigned __stdcall
152 reader_thread (void *parameter)
154 GIOWin32Channel *channel = parameter;
158 g_io_channel_ref ((GIOChannel *) channel);
161 g_print ("thread %#x: starting. pid:%#x, fd:%d, data_avail:%#x, space_avail:%#x\n",
163 (guint) GetCurrentProcessId (),
165 (guint) channel->data_avail_event,
166 (guint) channel->space_avail_event);
168 channel->buffer = g_malloc (BUFFER_SIZE);
169 channel->rdp = channel->wrp = 0;
170 channel->running = TRUE;
172 SetEvent (channel->space_avail_event);
174 while (channel->running)
176 LOCK (channel->mutex);
178 g_print ("thread %#x: rdp=%d, wrp=%d\n",
179 channel->thread_id, channel->rdp, channel->wrp);
180 if ((channel->wrp + 1) % BUFFER_SIZE == channel->rdp)
184 g_print ("thread %#x: resetting space_available\n",
186 ResetEvent (channel->space_avail_event);
188 g_print ("thread %#x: waiting for space\n", channel->thread_id);
189 UNLOCK (channel->mutex);
190 WaitForSingleObject (channel->space_avail_event, INFINITE);
191 LOCK (channel->mutex);
193 g_print ("thread %#x: rdp=%d, wrp=%d\n",
194 channel->thread_id, channel->rdp, channel->wrp);
197 buffer = channel->buffer + channel->wrp;
199 /* Always leave at least one byte unused gap to be able to
200 * distinguish between the full and empty condition...
202 nbytes = MIN ((channel->rdp + BUFFER_SIZE - channel->wrp - 1) % BUFFER_SIZE,
203 BUFFER_SIZE - channel->wrp);
205 UNLOCK (channel->mutex);
207 nbytes = (*channel->reader) (channel->fd, buffer, nbytes);
212 LOCK (channel->mutex);
214 g_print ("thread %#x: got %d bytes, rdp=%d, wrp=%d\n",
215 channel->thread_id, nbytes, channel->rdp, channel->wrp);
216 channel->wrp = (channel->wrp + nbytes) % BUFFER_SIZE;
218 g_print ("thread %#x: rdp=%d, wrp=%d, setting data available\n",
219 channel->thread_id, channel->rdp, channel->wrp);
220 SetEvent (channel->data_avail_event);
221 UNLOCK (channel->mutex);
224 LOCK (channel->mutex);
225 channel->running = FALSE;
227 g_print ("thread %#x: got EOF, rdp=%d, wrp=%d, setting data available\n",
228 channel->thread_id, channel->rdp, channel->wrp);
229 SetEvent (channel->data_avail_event);
230 UNLOCK (channel->mutex);
232 g_io_channel_unref((GIOChannel *) channel);
234 /* All of the Microsoft docs say we should explicitly
243 create_reader_thread (GIOWin32Channel *channel,
246 channel->reader = reader;
248 if (_beginthreadex (NULL, 0, reader_thread, channel, 0,
249 &channel->thread_id) == 0)
250 g_warning ("Error creating reader thread: %s", strerror (errno));
251 WaitForSingleObject (channel->space_avail_event, INFINITE);
255 buffer_read (GIOWin32Channel *channel,
263 LOCK (channel->mutex);
265 g_print ("reading from thread %#x %d bytes, rdp=%d, wrp=%d\n",
266 channel->thread_id, count, channel->rdp, channel->wrp);
268 if (channel->rdp == channel->wrp)
270 UNLOCK (channel->mutex);
272 g_print ("waiting for data from thread %#x\n", channel->thread_id);
273 WaitForSingleObject (channel->data_avail_event, INFINITE);
274 LOCK (channel->mutex);
275 if (channel->rdp == channel->wrp && !channel->running)
277 UNLOCK (channel->mutex);
282 if (channel->rdp < channel->wrp)
283 nbytes = channel->wrp - channel->rdp;
285 nbytes = BUFFER_SIZE - channel->rdp;
286 UNLOCK (channel->mutex);
287 nbytes = MIN (left, nbytes);
289 g_print ("moving %d bytes from thread %#x\n",
290 nbytes, channel->thread_id);
291 memcpy (dest, channel->buffer + channel->rdp, nbytes);
294 LOCK (channel->mutex);
295 channel->rdp = (channel->rdp + nbytes) % BUFFER_SIZE;
297 g_print ("setting space available for thread %#x\n", channel->thread_id);
298 SetEvent (channel->space_avail_event);
300 g_print ("for thread %#x: rdp=%d, wrp=%d\n",
301 channel->thread_id, channel->rdp, channel->wrp);
302 if (channel->running && channel->rdp == channel->wrp)
305 g_print ("resetting data_available of thread %#x\n",
307 ResetEvent (channel->data_avail_event);
309 UNLOCK (channel->mutex);
311 /* We have no way to indicate any errors form the actual
312 * read() or recv() call in the reader thread. Should we have?
314 *error = G_IO_ERROR_NONE;
319 g_io_win32_prepare (gpointer source_data,
320 GTimeVal *current_time,
330 g_io_win32_check (gpointer source_data,
331 GTimeVal *current_time,
334 GIOWin32Watch *data = source_data;
335 GIOWin32Channel *channel = (GIOWin32Channel *) data->channel;
337 /* If the thread has died, we have encountered EOF. If the buffer
338 * also is emtpty set the HUP bit.
340 if (!channel->running && channel->rdp == channel->wrp)
343 g_print ("g_io_win32_check: setting G_IO_HUP thread %#x rdp=%d wrp=%d\n",
344 channel->thread_id, channel->rdp, channel->wrp);
345 data->pollfd.revents |= G_IO_HUP;
349 return (data->pollfd.revents & data->condition);
353 g_io_win32_dispatch (gpointer source_data,
354 GTimeVal *current_time,
358 GIOWin32Watch *data = source_data;
360 return (*data->callback) (data->channel,
361 data->pollfd.revents & data->condition,
366 g_io_win32_destroy (gpointer source_data)
368 GIOWin32Watch *data = source_data;
370 g_main_remove_poll (&data->pollfd);
371 g_io_channel_unref (data->channel);
375 static GSourceFuncs win32_watch_funcs = {
383 g_io_win32_msg_read (GIOChannel *channel,
388 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
389 MSG msg; /* In case of alignment problems */
391 if (count < sizeof (MSG))
392 return G_IO_ERROR_INVAL;
394 if (!PeekMessage (&msg, win32_channel->hwnd, 0, 0, PM_REMOVE))
395 return G_IO_ERROR_AGAIN;
397 memmove (buf, &msg, sizeof (MSG));
398 *bytes_read = sizeof (MSG);
399 return G_IO_ERROR_NONE;
403 g_io_win32_msg_write (GIOChannel *channel,
406 guint *bytes_written)
408 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
411 if (count != sizeof (MSG))
412 return G_IO_ERROR_INVAL;
414 /* In case of alignment problems */
415 memmove (&msg, buf, sizeof (MSG));
416 if (!PostMessage (win32_channel->hwnd, msg.message, msg.wParam, msg.lParam))
417 return G_IO_ERROR_UNKNOWN;
419 *bytes_written = sizeof (MSG);
420 return G_IO_ERROR_NONE;
424 g_io_win32_no_seek (GIOChannel *channel,
428 return G_IO_ERROR_UNKNOWN;
433 g_io_win32_msg_close (GIOChannel *channel)
435 /* Nothing to be done. Or should we set hwnd to some invalid value? */
439 g_io_win32_free (GIOChannel *channel)
441 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
443 if (win32_channel->buffer)
445 CloseHandle (win32_channel->data_avail_event);
446 CloseHandle (win32_channel->space_avail_event);
447 DeleteCriticalSection (&win32_channel->mutex);
450 g_free (win32_channel->buffer);
451 g_free (win32_channel);
455 g_io_win32_msg_add_watch (GIOChannel *channel,
457 GIOCondition condition,
460 GDestroyNotify notify)
462 GIOWin32Watch *watch = g_new (GIOWin32Watch, 1);
464 watch->channel = channel;
465 g_io_channel_ref (channel);
467 watch->callback = func;
468 watch->condition = condition;
470 watch->pollfd.fd = G_WIN32_MSG_HANDLE;
471 watch->pollfd.events = condition;
473 g_main_add_poll (&watch->pollfd, priority);
475 return g_source_add (priority, TRUE, &win32_watch_funcs,
476 watch, user_data, notify);
480 g_io_win32_fd_read (GIOChannel *channel,
485 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
489 if (win32_channel->thread_id)
491 result = buffer_read (win32_channel, buf, count, &error);
499 *bytes_read = result;
500 return G_IO_ERROR_NONE;
504 result = read (win32_channel->fd, buf, count);
510 return G_IO_ERROR_INVAL;
512 return G_IO_ERROR_UNKNOWN;
516 *bytes_read = result;
517 return G_IO_ERROR_NONE;
522 g_io_win32_fd_write(GIOChannel *channel,
525 guint *bytes_written)
527 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
530 result = write (win32_channel->fd, buf, count);
531 if (win32_channel->debug)
532 g_print ("g_io_win32_fd_write: fd:%d count:%d = %d\n",
533 win32_channel->fd, count, result);
541 return G_IO_ERROR_INVAL;
543 return G_IO_ERROR_AGAIN;
545 return G_IO_ERROR_UNKNOWN;
550 *bytes_written = result;
551 return G_IO_ERROR_NONE;
556 g_io_win32_fd_seek (GIOChannel *channel,
560 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
576 g_warning ("g_io_win32_fd_seek: unknown seek type");
577 return G_IO_ERROR_UNKNOWN;
580 result = lseek (win32_channel->fd, offset, whence);
587 return G_IO_ERROR_INVAL;
589 return G_IO_ERROR_UNKNOWN;
593 return G_IO_ERROR_NONE;
597 g_io_win32_fd_close (GIOChannel *channel)
599 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
601 close (win32_channel->fd);
610 return read (fd, buf, len);
614 g_io_win32_fd_add_watch (GIOChannel *channel,
616 GIOCondition condition,
619 GDestroyNotify notify)
621 GIOWin32Watch *watch = g_new (GIOWin32Watch, 1);
622 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
624 watch->channel = channel;
625 g_io_channel_ref (channel);
627 watch->callback = func;
628 watch->condition = condition;
630 create_events (win32_channel);
632 watch->pollfd.fd = (gint) win32_channel->data_avail_event;
633 watch->pollfd.events = condition;
635 if (win32_channel->debug)
636 g_print ("g_io_win32_fd_add_watch: fd:%d handle:%#x\n",
637 win32_channel->fd, watch->pollfd.fd);
639 create_reader_thread (win32_channel, fd_reader);
641 g_main_add_poll (&watch->pollfd, priority);
643 return g_source_add (priority, TRUE, &win32_watch_funcs,
644 watch, user_data, notify);
648 g_io_win32_sock_read (GIOChannel *channel,
653 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
657 if (win32_channel->thread_id)
659 result = buffer_read (win32_channel, buf, count, &error);
667 *bytes_read = result;
668 return G_IO_ERROR_NONE;
672 result = recv (win32_channel->fd, buf, count, 0);
677 return G_IO_ERROR_UNKNOWN;
681 *bytes_read = result;
682 return G_IO_ERROR_NONE;
687 g_io_win32_sock_write(GIOChannel *channel,
690 guint *bytes_written)
692 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
695 result = send (win32_channel->fd, buf, count, 0);
697 if (result == SOCKET_ERROR)
700 switch (WSAGetLastError ())
703 return G_IO_ERROR_INVAL;
706 return G_IO_ERROR_AGAIN;
708 return G_IO_ERROR_UNKNOWN;
713 *bytes_written = result;
714 return G_IO_ERROR_NONE;
719 g_io_win32_sock_close (GIOChannel *channel)
721 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
723 closesocket (win32_channel->fd);
731 return recv (fd, buf, len, 0);
735 g_io_win32_sock_add_watch (GIOChannel *channel,
737 GIOCondition condition,
740 GDestroyNotify notify)
742 GIOWin32Watch *watch = g_new (GIOWin32Watch, 1);
743 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
745 watch->channel = channel;
746 g_io_channel_ref (channel);
748 watch->callback = func;
749 watch->condition = condition;
751 create_events (win32_channel);
753 watch->pollfd.fd = (gint) win32_channel->data_avail_event;
754 watch->pollfd.events = condition;
756 /* Sockets are always readable, aren't they? */
757 create_reader_thread (win32_channel, sock_reader);
759 g_main_add_poll (&watch->pollfd, priority);
761 return g_source_add (priority, TRUE, &win32_watch_funcs, watch,
765 static GIOFuncs win32_channel_msg_funcs = {
767 g_io_win32_msg_write,
769 g_io_win32_msg_close,
770 g_io_win32_msg_add_watch,
774 static GIOFuncs win32_channel_fd_funcs = {
779 g_io_win32_fd_add_watch,
783 static GIOFuncs win32_channel_sock_funcs = {
784 g_io_win32_sock_read,
785 g_io_win32_sock_write,
787 g_io_win32_sock_close,
788 g_io_win32_sock_add_watch,
793 g_io_channel_win32_new_messages (guint hwnd)
795 GIOWin32Channel *win32_channel = g_new (GIOWin32Channel, 1);
796 GIOChannel *channel = (GIOChannel *) win32_channel;
798 g_io_channel_init (channel);
799 g_io_channel_win32_init (win32_channel);
800 channel->funcs = &win32_channel_msg_funcs;
801 win32_channel->type = G_IO_WINDOWS_MESSAGES;
802 win32_channel->hwnd = (HWND) hwnd;
808 g_io_channel_win32_new_fd (gint fd)
810 GIOWin32Channel *win32_channel;
814 if (fstat (fd, &st) == -1)
816 g_warning ("%d isn't a (emulated) file descriptor", fd);
820 win32_channel = g_new (GIOWin32Channel, 1);
821 channel = (GIOChannel *) win32_channel;
823 g_io_channel_init (channel);
824 g_io_channel_win32_init (win32_channel);
825 channel->funcs = &win32_channel_fd_funcs;
826 win32_channel->type = G_IO_FILE_DESC;
827 win32_channel->fd = fd;
833 g_io_channel_win32_get_fd (GIOChannel *channel)
835 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
837 return win32_channel->fd;
841 g_io_channel_win32_new_stream_socket (int socket)
843 GIOWin32Channel *win32_channel = g_new (GIOWin32Channel, 1);
844 GIOChannel *channel = (GIOChannel *) win32_channel;
846 g_io_channel_init (channel);
847 g_io_channel_win32_init (win32_channel);
848 channel->funcs = &win32_channel_sock_funcs;
849 win32_channel->type = G_IO_STREAM_SOCKET;
850 win32_channel->fd = socket;
856 g_io_channel_unix_new (gint fd)
858 return g_io_channel_win32_new_fd (fd);
862 g_io_channel_unix_get_fd (GIOChannel *channel)
864 return g_io_channel_win32_get_fd (channel);
868 g_io_channel_win32_set_debug (GIOChannel *channel,
871 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
873 win32_channel->debug = flag;
877 g_io_channel_win32_wait_for_condition (GIOChannel *channel,
878 GIOCondition condition,
882 GIOWin32Channel *win32_channel = (GIOWin32Channel *) channel;
885 pollfd.fd = (gint) win32_channel->data_avail_event;
886 pollfd.events = condition;
888 if (win32_channel->debug)
889 g_print ("g_io_channel_win32_wait_for_condition: fd:%d event:%#x timeout:%d\n",
890 win32_channel->fd, pollfd.fd, timeout);
892 result = (*g_main_win32_get_poll_func ()) (&pollfd, 1, timeout);
894 if (win32_channel->debug)
895 g_print ("g_io_channel_win32_wait_for_condition: done:%d\n", result);
901 /* This variable and the functions below are present just to be
902 * binary compatible with old clients... But note that in GIMP, the
903 * libgimp/gimp.c:gimp_extension_process() function will have to be modified
904 * anyhow for this new approach.
906 * These will be removed after some weeks.
908 guint g_pipe_readable_msg = 0;
911 g_io_channel_win32_new_pipe (int fd)
913 return g_io_channel_win32_new_fd (fd);
917 g_io_channel_win32_new_pipe_with_wakeups (int fd,
921 return g_io_channel_win32_new_fd (fd);
925 g_io_channel_win32_pipe_request_wakeups (GIOChannel *channel,
929 /* Nothing needed now */
933 g_io_channel_win32_pipe_readable (gint fd,
936 /* Nothing needed now */