src/socket.c

   1 /*
   2  *      socket.c - this file is part of Geany, a fast and lightweight IDE
   3  *
   4  *      Copyright 2006-2012 Enrico Tröger <enrico(dot)troeger(at)uvena(dot)de>
   5  *      Copyright 2006-2012 Nick Treleaven <nick(dot)treleaven(at)btinternet(dot)com>
   6  *      Copyright 2006 Hiroyuki Yamamoto (author of Sylpheed)
   7  *
   8  *      This program is free software; you can redistribute it and/or modify
   9  *      it under the terms of the GNU General Public License as published by
  10  *      the Free Software Foundation; either version 2 of the License, or
  11  *      (at your option) any later version.
  12  *
  13  *      This program 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
  16  *      GNU General Public License for more details.
  17  *
  18  *      You should have received a copy of the GNU General Public License along
  19  *      with this program; if not, write to the Free Software Foundation, Inc.,
  20  *      51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  21  */
  22
  23 /*
  24  * Socket setup and messages handling.
  25  * The socket allows detection and messages to be sent to the first running instance of Geany.
  26  * Only the first instance loads session files at startup, and opens files from the command-line.
  27  */
  28
  29 /*
  30  * Little dev doc:
  31  * Each command which is sent between two instances (see send_open_command and
  32  * socket_lock_input_cb) should have the following scheme:
  33  * command name\n
  34  * data\n
  35  * data\n
  36  * ...
  37  * .\n
  38  * The first thing should be the command name followed by the data belonging to the command and
  39  * to mark the end of data send a single '.'. Each message should be ended with \n.
  40  * The command window is only available on Windows and takes no additional data, instead it
  41  * writes back a Windows handle (HWND) for the main window to set it to the foreground (focus).
  42  *
  43  * At the moment the commands window, doclist, open, openro, line and column are available.
  44  *
  45  * About the socket files on Unix-like systems:
  46  * Geany creates a socket in /tmp (or any other directory returned by g_get_tmp_dir()) and
  47  * a symlink in the current configuration to the created socket file. The symlink is named
  48  * geany_socket_<hostname>_<displayname> (displayname is the name of the active X display).
  49  * If the socket file cannot be created in the temporary directory, Geany creates the socket file
  50  * directly in the configuration directory as a fallback.
  51  *
  52  */
  53
  54
  55 #include "geany.h"
  56
  57 #ifdef HAVE_SOCKET
  58
  59 #ifndef G_OS_WIN32
  60 # include <sys/time.h>
  61 # include <sys/types.h>
  62 # include <sys/socket.h>
  63 # include <sys/un.h>
  64 # include <netinet/in.h>
  65 # include <glib/gstdio.h>
  66 #else
  67 # include <gdk/gdkwin32.h>
  68 # include <windows.h>
  69 # include <winsock2.h>
  70 # include <ws2tcpip.h>
  71 #endif
  72 #include <string.h>
  73 #include <stdlib.h>
  74 #include <unistd.h>
  75 #include <fcntl.h>
  76
  77 #ifdef GDK_WINDOWING_X11
  78 #include <gdk/gdkx.h>
  79 #endif
  80
  81 #include "main.h"
  82 #include "socket.h"
  83 #include "document.h"
  84 #include "support.h"
  85 #include "ui_utils.h"
  86 #include "utils.h"
  87 #include "dialogs.h"
  88 #include "encodings.h"
  89 #include "project.h"
  90
  91
  92 #ifdef G_OS_WIN32
  93 #define REMOTE_CMD_PORT         49876
  94 #define SOCKET_IS_VALID(s)      ((s) != INVALID_SOCKET)
  95 #else
  96 #define SOCKET_IS_VALID(s)      ((s) >= 0)
  97 #define INVALID_SOCKET          (-1)
  98 #endif
  99 #define BUFFER_LENGTH 4096
 100
 101 struct socket_info_struct socket_info;
 102
 103
 104 #ifdef G_OS_WIN32
 105 static gint socket_fd_connect_inet      (gushort port);
 106 static gint socket_fd_open_inet         (gushort port);
 107 static void socket_init_win32           (void);
 108 #else
 109 static gint socket_fd_connect_unix      (const gchar *path);
 110 static gint socket_fd_open_unix         (const gchar *path);
 111 #endif
 112
 113 static gint socket_fd_write                     (gint sock, const gchar *buf, gint len);
 114 static gint socket_fd_write_all         (gint sock, const gchar *buf, gint len);
 115 static gint socket_fd_gets                      (gint sock, gchar *buf, gint len);
 116 static gint socket_fd_check_io          (gint fd, GIOCondition cond);
 117 static gint socket_fd_read                      (gint sock, gchar *buf, gint len);
 118 static gint socket_fd_recv                      (gint fd, gchar *buf, gint len, gint flags);
 119 static gint socket_fd_close                     (gint sock);
 120
 121
 122
 123 static void send_open_command(gint sock, gint argc, gchar **argv)
 124 {
 125         gint i;
 126         gchar *filename;
 127
 128         g_return_if_fail(argc > 1);
 129         geany_debug("using running instance of Geany");
 130
 131         if (cl_options.goto_line >= 0)
 132         {
 133                 gchar *line = g_strdup_printf("%d\n", cl_options.goto_line);
 134                 socket_fd_write_all(sock, "line\n", 5);
 135                 socket_fd_write_all(sock, line, strlen(line));
 136                 socket_fd_write_all(sock, ".\n", 2);
 137                 g_free(line);
 138         }
 139
 140         if (cl_options.goto_column >= 0)
 141         {
 142                 gchar *col = g_strdup_printf("%d\n", cl_options.goto_column);
 143                 socket_fd_write_all(sock, "column\n", 7);
 144                 socket_fd_write_all(sock, col, strlen(col));
 145                 socket_fd_write_all(sock, ".\n", 2);
 146                 g_free(col);
 147         }
 148
 149         if (cl_options.readonly) /* append "ro" to denote readonly status for new docs */
 150                 socket_fd_write_all(sock, "openro\n", 7);
 151         else
 152                 socket_fd_write_all(sock, "open\n", 5);
 153
 154         for (i = 1; i < argc && argv[i] != NULL; i++)
 155         {
 156                 filename = main_get_argv_filename(argv[i]);
 157
 158                 /* if the filename is valid or if a new file should be opened is check on the other side */
 159                 if (filename != NULL)
 160                 {
 161                         socket_fd_write_all(sock, filename, strlen(filename));
 162                         socket_fd_write_all(sock, "\n", 1);
 163                 }
 164                 else
 165                 {
 166                         g_printerr(_("Could not find file '%s'."), filename);
 167                         g_printerr("\n");       /* keep translation from open_cl_files() in main.c. */
 168                 }
 169                 g_free(filename);
 170         }
 171         socket_fd_write_all(sock, ".\n", 2);
 172 }
 173
 174
 175 #ifndef G_OS_WIN32
 176 static void remove_socket_link_full(void)
 177 {
 178         gchar real_path[512];
 179         gsize len;
 180
 181         real_path[0] = '\0';
 182
 183         /* read the contents of the symbolic link socket_info.file_name and delete it
 184          * readlink should return something like "/tmp/geany_socket.499602d2" */
 185         len = readlink(socket_info.file_name, real_path, sizeof(real_path) - 1);
 186         if ((gint) len > 0)
 187         {
 188                 real_path[len] = '\0';
 189                 g_unlink(real_path);
 190         }
 191         g_unlink(socket_info.file_name);
 192 }
 193 #endif
 194
 195
 196 static void socket_get_document_list(gint sock)
 197 {
 198         gchar doc_list[BUFFER_LENGTH];
 199         gint doc_list_len;
 200
 201         if (sock < 0)
 202                 return;
 203
 204         socket_fd_write_all(sock, "doclist\n", 8);
 205
 206         doc_list_len = socket_fd_read(sock, doc_list, sizeof(doc_list));
 207         if (doc_list_len >= BUFFER_LENGTH)
 208                 doc_list_len = BUFFER_LENGTH -1;
 209         doc_list[doc_list_len] = '\0';
 210         /* if we received ETX (end-of-text), there were no open files, so print only otherwise */
 211         if (! utils_str_equal(doc_list, "\3"))
 212                 printf("%s", doc_list);
 213 }
 214
 215
 216 #ifndef G_OS_WIN32
 217 static void check_socket_permissions(void)
 218 {
 219         struct stat socket_stat;
 220
 221         if (g_lstat(socket_info.file_name, &socket_stat) == 0)
 222         {       /* If the user id of the process is not the same as the owner of the socket
 223                  * file, then ignore this socket and start a new session. */
 224                 if (socket_stat.st_uid != getuid())
 225                 {
 226                         const gchar *msg = _(
 227         /* TODO maybe this message needs a rewording */
 228         "Geany tried to access the Unix Domain socket of another instance running as another user.\n"
 229         "This is a fatal error and Geany will now quit.");
 230                         g_warning("%s", msg);
 231                         dialogs_show_msgbox(GTK_MESSAGE_ERROR, "%s", msg);
 232                         exit(1);
 233                 }
 234         }
 235 }
 236 #endif
 237
 238
 239 /* (Unix domain) socket support to replace the old FIFO code
 240  * (taken from Sylpheed, thanks)
 241  * Returns the created socket, -1 if an error occurred or -2 if another socket exists and files
 242  * were sent to it. */
 243 gint socket_init(gint argc, gchar **argv)
 244 {
 245         gint sock;
 246 #ifdef G_OS_WIN32
 247         HANDLE hmutex;
 248         HWND hwnd;
 249         socket_init_win32();
 250         hmutex = CreateMutexA(NULL, FALSE, "Geany");
 251         if (! hmutex)
 252         {
 253                 geany_debug("cannot create Mutex\n");
 254                 return -1;
 255         }
 256         if (GetLastError() != ERROR_ALREADY_EXISTS)
 257         {
 258                 /* To support multiple instances with different configuration directories (as we do on
 259                  * non-Windows systems) we would need to use different port number s but it might be
 260                  * difficult to get a port number which is unique for a configuration directory (path)
 261                  * and which is unused. This port number has to be guessed by the first and new instance
 262                  * and the only data is the configuration directory path.
 263                  * For now we use one port number, that is we support only one instance at all. */
 264                 sock = socket_fd_open_inet(REMOTE_CMD_PORT);
 265                 if (sock < 0)
 266                         return 0;
 267                 return sock;
 268         }
 269
 270         sock = socket_fd_connect_inet(REMOTE_CMD_PORT);
 271         if (sock < 0)
 272                 return -1;
 273 #else
 274         gchar *display_name = gdk_get_display();
 275         const gchar *hostname = g_get_host_name();
 276         gchar *p;
 277
 278         if (display_name == NULL)
 279                 display_name = g_strdup("NODISPLAY");
 280
 281         /* these lines are taken from dcopc.c in kdelibs */
 282         if ((p = strrchr(display_name, '.')) > strrchr(display_name, ':') && p != NULL)
 283                 *p = '\0';
 284         /* remove characters that may not be acceptable in a filename */
 285         for (p = display_name; *p; p++)
 286         {
 287                 if (*p == ':' || *p == '/')
 288                         *p = '_';
 289         }
 290
 291         if (socket_info.file_name == NULL)
 292                 socket_info.file_name = g_strdup_printf("%s%cgeany_socket_%s_%s",
 293                         app->configdir, G_DIR_SEPARATOR, hostname, display_name);
 294
 295         g_free(display_name);
 296
 297         /* check whether the real user id is the same as this of the socket file */
 298         check_socket_permissions();
 299
 300         sock = socket_fd_connect_unix(socket_info.file_name);
 301         if (sock < 0)
 302         {
 303                 remove_socket_link_full(); /* deletes the socket file and the symlink */
 304                 return socket_fd_open_unix(socket_info.file_name);
 305         }
 306 #endif
 307
 308         /* remote command mode, here we have another running instance and want to use it */
 309
 310 #ifdef G_OS_WIN32
 311         /* first we send a request to retrieve the window handle and focus the window */
 312         socket_fd_write_all(sock, "window\n", 7);
 313         if (socket_fd_read(sock, (gchar *)&hwnd, sizeof(hwnd)) == sizeof(hwnd))
 314                 SetForegroundWindow(hwnd);
 315 #endif
 316         /* now we send the command line args */
 317         if (argc > 1)
 318         {
 319                 send_open_command(sock, argc, argv);
 320         }
 321
 322         if (cl_options.list_documents)
 323         {
 324                 socket_get_document_list(sock);
 325         }
 326
 327         socket_fd_close(sock);
 328         return -2;
 329 }
 330
 331
 332 gint socket_finalize(void)
 333 {
 334         if (socket_info.lock_socket < 0)
 335                 return -1;
 336
 337         if (socket_info.lock_socket_tag > 0)
 338                 g_source_remove(socket_info.lock_socket_tag);
 339         if (socket_info.read_ioc)
 340         {
 341                 g_io_channel_shutdown(socket_info.read_ioc, FALSE, NULL);
 342                 g_io_channel_unref(socket_info.read_ioc);
 343                 socket_info.read_ioc = NULL;
 344         }
 345
 346 #ifdef G_OS_WIN32
 347         WSACleanup();
 348 #else
 349         if (socket_info.file_name != NULL)
 350         {
 351                 remove_socket_link_full(); /* deletes the socket file and the symlink */
 352                 g_free(socket_info.file_name);
 353         }
 354 #endif
 355
 356         return 0;
 357 }
 358
 359
 360 #ifdef G_OS_UNIX
 361 static gint socket_fd_connect_unix(const gchar *path)
 362 {
 363         gint sock;
 364         struct sockaddr_un addr;
 365
 366         sock = socket(PF_UNIX, SOCK_STREAM, 0);
 367         if (sock < 0)
 368         {
 369                 perror("fd_connect_unix(): socket");
 370                 return -1;
 371         }
 372
 373         memset(&addr, 0, sizeof(addr));
 374         addr.sun_family = AF_UNIX;
 375         strncpy(addr.sun_path, path, sizeof(addr.sun_path) - 1);
 376
 377         if (connect(sock, (struct sockaddr *)&addr, sizeof(addr)) < 0)
 378         {
 379                 socket_fd_close(sock);
 380                 return -1;
 381         }
 382
 383         return sock;
 384 }
 385
 386
 387 static gint socket_fd_open_unix(const gchar *path)
 388 {
 389         gint sock;
 390         struct sockaddr_un addr;
 391         gint val;
 392         gchar *real_path;
 393
 394         sock = socket(PF_UNIX, SOCK_STREAM, 0);
 395
 396         if (sock < 0)
 397         {
 398                 perror("sock_open_unix(): socket");
 399                 return -1;
 400         }
 401
 402         val = 1;
 403         if (setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, &val, sizeof(val)) < 0)
 404         {
 405                 perror("setsockopt");
 406                 socket_fd_close(sock);
 407                 return -1;
 408         }
 409
 410         /* fix for #1888561:
 411          * in case the configuration directory is located on a network file system or any other
 412          * file system which doesn't support sockets, we just link the socket there and create the
 413          * real socket in the system's tmp directory assuming it supports sockets */
 414         real_path = g_strdup_printf("%s%cgeany_socket.%08x",
 415                 g_get_tmp_dir(), G_DIR_SEPARATOR, g_random_int());
 416
 417         if (utils_is_file_writable(real_path) != 0)
 418         {       /* if real_path is not writable for us, fall back to ~/.config/geany/geany_socket_*_* */
 419                 /* instead of creating a symlink and print a warning */
 420                 g_warning("Socket %s could not be written, using %s as fallback.", real_path, path);
 421                 SETPTR(real_path, g_strdup(path));
 422         }
 423         /* create a symlink in e.g. ~/.config/geany/geany_socket_hostname__0 to /tmp/geany_socket.499602d2 */
 424         else if (symlink(real_path, path) != 0)
 425         {
 426                 perror("symlink");
 427                 socket_fd_close(sock);
 428                 return -1;
 429         }
 430
 431         memset(&addr, 0, sizeof(addr));
 432         addr.sun_family = AF_UNIX;
 433         strncpy(addr.sun_path, real_path, sizeof(addr.sun_path) - 1);
 434
 435         if (bind(sock, (struct sockaddr *)&addr, sizeof(addr)) < 0)
 436         {
 437                 perror("bind");
 438                 socket_fd_close(sock);
 439                 return -1;
 440         }
 441
 442         if (listen(sock, 1) < 0)
 443         {
 444                 perror("listen");
 445                 socket_fd_close(sock);
 446                 return -1;
 447         }
 448
 449         g_chmod(real_path, 0600);
 450
 451         g_free(real_path);
 452
 453         return sock;
 454 }
 455 #endif
 456
 457 static gint socket_fd_close(gint fd)
 458 {
 459 #ifdef G_OS_WIN32
 460         return closesocket(fd);
 461 #else
 462         return close(fd);
 463 #endif
 464 }
 465
 466
 467 #ifdef G_OS_WIN32
 468 static gint socket_fd_open_inet(gushort port)
 469 {
 470         SOCKET sock;
 471         struct sockaddr_in addr;
 472         gchar val;
 473
 474         sock = socket(AF_INET, SOCK_STREAM, 0);
 475         if (G_UNLIKELY(! SOCKET_IS_VALID(sock)))
 476         {
 477                 geany_debug("fd_open_inet(): socket() failed: %d\n", WSAGetLastError());
 478                 return -1;
 479         }
 480
 481         val = 1;
 482         if (setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, &val, sizeof(val)) < 0)
 483         {
 484                 perror("setsockopt");
 485                 socket_fd_close(sock);
 486                 return -1;
 487         }
 488
 489         memset(&addr, 0, sizeof(addr));
 490         addr.sin_family = AF_INET;
 491         addr.sin_port = htons(port);
 492         addr.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
 493
 494         if (bind(sock, (struct sockaddr *)&addr, sizeof(addr)) < 0)
 495         {
 496                 perror("bind");
 497                 socket_fd_close(sock);
 498                 return -1;
 499         }
 500
 501         if (listen(sock, 1) < 0)
 502         {
 503                 perror("listen");
 504                 socket_fd_close(sock);
 505                 return -1;
 506         }
 507
 508         return sock;
 509 }
 510
 511
 512 static gint socket_fd_connect_inet(gushort port)
 513 {
 514         SOCKET sock;
 515         struct sockaddr_in addr;
 516
 517         sock = socket(AF_INET, SOCK_STREAM, 0);
 518         if (G_UNLIKELY(! SOCKET_IS_VALID(sock)))
 519         {
 520                 geany_debug("fd_connect_inet(): socket() failed: %d\n", WSAGetLastError());
 521                 return -1;
 522         }
 523
 524         memset(&addr, 0, sizeof(addr));
 525         addr.sin_family = AF_INET;
 526         addr.sin_port = htons(port);
 527         addr.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
 528
 529         if (connect(sock, (struct sockaddr *)&addr, sizeof(addr)) < 0)
 530         {
 531                 socket_fd_close(sock);
 532                 return -1;
 533         }
 534
 535         return sock;
 536 }
 537
 538
 539 static void socket_init_win32(void)
 540 {
 541         WSADATA wsadata;
 542
 543         if (WSAStartup(MAKEWORD(2, 2), &wsadata) != NO_ERROR)
 544                 geany_debug("WSAStartup() failed\n");
 545
 546         return;
 547 }
 548 #endif
 549
 550
 551 static void handle_input_filename(const gchar *buf)
 552 {
 553         gchar *utf8_filename, *locale_filename;
 554
 555         /* we never know how the input is encoded, so do the best auto detection we can */
 556         if (! g_utf8_validate(buf, -1, NULL))
 557                 utf8_filename = encodings_convert_to_utf8(buf, -1, NULL);
 558         else
 559                 utf8_filename = g_strdup(buf);
 560
 561         locale_filename = utils_get_locale_from_utf8(utf8_filename);
 562         if (locale_filename)
 563         {
 564                 if (g_str_has_suffix(locale_filename, ".geany"))
 565                 {
 566                         if (project_ask_close())
 567                                 main_load_project_from_command_line(locale_filename, TRUE);
 568                 }
 569                 else
 570                         main_handle_filename(locale_filename);
 571         }
 572         g_free(utf8_filename);
 573         g_free(locale_filename);
 574 }
 575
 576
 577 static gchar *build_document_list(void)
 578 {
 579         GString *doc_list = g_string_new(NULL);
 580         guint i;
 581         const gchar *filename;
 582
 583         foreach_document(i)
 584         {
 585                 filename = DOC_FILENAME(documents[i]);
 586                 g_string_append(doc_list, filename);
 587                 g_string_append_c(doc_list, '\n');
 588         }
 589         return g_string_free(doc_list, FALSE);
 590 }
 591
 592
 593 gboolean socket_lock_input_cb(GIOChannel *source, GIOCondition condition, gpointer data)
 594 {
 595         gint fd, sock;
 596         gchar buf[BUFFER_LENGTH];
 597         struct sockaddr_in caddr;
 598         socklen_t caddr_len = sizeof(caddr);
 599         GtkWidget *window = data;
 600         gboolean popup = FALSE;
 601
 602         fd = g_io_channel_unix_get_fd(source);
 603         sock = accept(fd, (struct sockaddr *)&caddr, &caddr_len);
 604
 605         /* first get the command */
 606         while (socket_fd_gets(sock, buf, sizeof(buf)) != -1)
 607         {
 608                 if (strncmp(buf, "open", 4) == 0)
 609                 {
 610                         cl_options.readonly = strncmp(buf+4, "ro", 2) == 0; /* open in readonly? */
 611                         while (socket_fd_gets(sock, buf, sizeof(buf)) != -1 && *buf != '.')
 612                         {
 613                                 gsize buf_len = strlen(buf);
 614
 615                                 /* remove trailing newline */
 616                                 if (buf_len > 0 && buf[buf_len - 1] == '\n')
 617                                         buf[buf_len - 1] = '\0';
 618
 619                                 handle_input_filename(buf);
 620                         }
 621                         popup = TRUE;
 622                 }
 623                 else if (strncmp(buf, "doclist", 7) == 0)
 624                 {
 625                         gchar *doc_list = build_document_list();
 626                         if (!EMPTY(doc_list))
 627                                 socket_fd_write_all(sock, doc_list, strlen(doc_list));
 628                         else
 629                                 /* send ETX (end-of-text) in case we have no open files, we must send anything
 630                                  * otherwise the client would hang on reading */
 631                                 socket_fd_write_all(sock, "\3", 1);
 632                         g_free(doc_list);
 633                 }
 634                 else if (strncmp(buf, "line", 4) == 0)
 635                 {
 636                         while (socket_fd_gets(sock, buf, sizeof(buf)) != -1 && *buf != '.')
 637                         {
 638                                 g_strstrip(buf); /* remove \n char */
 639                                 /* on any error we get 0 which should be safe enough as fallback */
 640                                 cl_options.goto_line = atoi(buf);
 641                         }
 642                 }
 643                 else if (strncmp(buf, "column", 6) == 0)
 644                 {
 645                         while (socket_fd_gets(sock, buf, sizeof(buf)) != -1 && *buf != '.')
 646                         {
 647                                 g_strstrip(buf); /* remove \n char */
 648                                 /* on any error we get 0 which should be safe enough as fallback */
 649                                 cl_options.goto_column = atoi(buf);
 650                         }
 651                 }
 652 #ifdef G_OS_WIN32
 653                 else if (strncmp(buf, "window", 6) == 0)
 654                 {
 655 #       if GTK_CHECK_VERSION(3, 0, 0)
 656                         HWND hwnd = (HWND) gdk_win32_window_get_handle(gtk_widget_get_window(window));
 657 #       else
 658                         HWND hwnd = (HWND) gdk_win32_drawable_get_handle(
 659                                 GDK_DRAWABLE(gtk_widget_get_window(window)));
 660 #       endif
 661                         socket_fd_write(sock, (gchar *)&hwnd, sizeof(hwnd));
 662                 }
 663 #endif
 664         }
 665
 666         if (popup)
 667         {
 668 #ifdef GDK_WINDOWING_X11
 669                 GdkWindow *x11_window = gtk_widget_get_window(window);
 670
 671                 /* Set the proper interaction time on the window. This seems necessary to make
 672                  * gtk_window_present() really bring the main window into the foreground on some
 673                  * window managers like Gnome's metacity.
 674                  * Code taken from Gedit. */
 675 #       if GTK_CHECK_VERSION(3, 0, 0)
 676                 if (GDK_IS_X11_WINDOW(x11_window))
 677 #       endif
 678                 {
 679                         gdk_x11_window_set_user_time(x11_window, gdk_x11_get_server_time(x11_window));
 680                 }
 681 #endif
 682                 gtk_window_present(GTK_WINDOW(window));
 683 #ifdef G_OS_WIN32
 684                 gdk_window_show(gtk_widget_get_window(window));
 685 #endif
 686         }
 687
 688         socket_fd_close(sock);
 689
 690         return TRUE;
 691 }
 692
 693
 694 static gint socket_fd_gets(gint fd, gchar *buf, gint len)
 695 {
 696         gchar *newline, *bp = buf;
 697         gint n;
 698
 699         if (--len < 1)
 700                 return -1;
 701         do
 702         {
 703                 if ((n = socket_fd_recv(fd, bp, len, MSG_PEEK)) <= 0)
 704                         return -1;
 705                 if ((newline = memchr(bp, '\n', n)) != NULL)
 706                         n = newline - bp + 1;
 707                 if ((n = socket_fd_read(fd, bp, n)) < 0)
 708                         return -1;
 709                 bp += n;
 710                 len -= n;
 711         } while (! newline && len);
 712
 713         *bp = '\0';
 714         return bp - buf;
 715 }
 716
 717
 718 static gint socket_fd_recv(gint fd, gchar *buf, gint len, gint flags)
 719 {
 720         if (socket_fd_check_io(fd, G_IO_IN) < 0)
 721                 return -1;
 722
 723         return recv(fd, buf, len, flags);
 724 }
 725
 726
 727 static gint socket_fd_read(gint fd, gchar *buf, gint len)
 728 {
 729         if (socket_fd_check_io(fd, G_IO_IN) < 0)
 730                 return -1;
 731
 732 #ifdef G_OS_WIN32
 733         return recv(fd, buf, len, 0);
 734 #else
 735         return read(fd, buf, len);
 736 #endif
 737 }
 738
 739
 740 static gint socket_fd_check_io(gint fd, GIOCondition cond)
 741 {
 742         struct timeval timeout;
 743         fd_set fds;
 744 #ifdef G_OS_UNIX
 745         gint flags;
 746 #endif
 747
 748         timeout.tv_sec  = 60;
 749         timeout.tv_usec = 0;
 750
 751 #ifdef G_OS_UNIX
 752         /* checking for non-blocking mode */
 753         flags = fcntl(fd, F_GETFL, 0);
 754         if (flags < 0)
 755         {
 756                 perror("fcntl");
 757                 return 0;
 758         }
 759         if ((flags & O_NONBLOCK) != 0)
 760                 return 0;
 761 #endif
 762
 763         FD_ZERO(&fds);
 764 #ifdef G_OS_WIN32
 765         FD_SET((SOCKET)fd, &fds);
 766 #else
 767         FD_SET(fd, &fds);
 768 #endif
 769
 770         if (cond == G_IO_IN)
 771         {
 772                 select(fd + 1, &fds, NULL, NULL, &timeout);
 773         }
 774         else
 775         {
 776                 select(fd + 1, NULL, &fds, NULL, &timeout);
 777         }
 778
 779         if (FD_ISSET(fd, &fds))
 780         {
 781                 return 0;
 782         }
 783         else
 784         {
 785                 geany_debug("Socket IO timeout");
 786                 return -1;
 787         }
 788 }
 789
 790
 791 static gint socket_fd_write_all(gint fd, const gchar *buf, gint len)
 792 {
 793         gint n, wrlen = 0;
 794
 795         while (len)
 796         {
 797                 n = socket_fd_write(fd, buf, len);
 798                 if (n <= 0)
 799                         return -1;
 800                 len -= n;
 801                 wrlen += n;
 802                 buf += n;
 803         }
 804
 805         return wrlen;
 806 }
 807
 808
 809 gint socket_fd_write(gint fd, const gchar *buf, gint len)
 810 {
 811         if (socket_fd_check_io(fd, G_IO_OUT) < 0)
 812                 return -1;
 813
 814 #ifdef G_OS_WIN32
 815         return send(fd, buf, len, 0);
 816 #else
 817         return write(fd, buf, len);
 818 #endif
 819 }
 820
 821
 822 #endif