tests/testsocket.c

   1 /* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 2 -*- */
   2 /* testsocket.c
   3  * Copyright (C) 2001 Red Hat, Inc
   4  * Author: Owen Taylor
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Library General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Library General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Library General Public
  17  * License along with this library; if not, write to the
  18  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  19  * Boston, MA 02111-1307, USA.
  20  */
  21
  22 #undef GTK_DISABLE_DEPRECATED
  23
  24 #include "config.h"
  25 #include <gtk/gtk.h>
  26
  27 #include <string.h>
  28 #include <stdlib.h>
  29 #include <stdio.h>
  30
  31 int n_children = 0;
  32
  33 GSList *sockets = NULL;
  34
  35 GtkWidget *window;
  36 GtkWidget *box;
  37
  38 typedef struct
  39 {
  40   GtkWidget *box;
  41   GtkWidget *frame;
  42   GtkWidget *socket;
  43 } Socket;
  44
  45 extern guint32 create_child_plug (guint32  xid,
  46                                   gboolean local);
  47
  48 static void
  49 quit_cb (gpointer        callback_data,
  50          guint           callback_action,
  51          GtkWidget      *widget)
  52 {
  53   GtkWidget *message_dialog = gtk_message_dialog_new (GTK_WINDOW (window), 0,
  54                                                       GTK_MESSAGE_QUESTION,
  55                                                       GTK_BUTTONS_YES_NO,
  56                                                       "Really Quit?");
  57   gtk_dialog_set_default_response (GTK_DIALOG (message_dialog), GTK_RESPONSE_NO);
  58
  59   if (gtk_dialog_run (GTK_DIALOG (message_dialog)) == GTK_RESPONSE_YES)
  60     gtk_widget_destroy (window);
  61
  62   gtk_widget_destroy (message_dialog);
  63 }
  64
  65 static GtkItemFactoryEntry menu_items[] =
  66 {
  67   { "/_File",            NULL,         NULL,                  0, "<Branch>" },
  68   { "/File/_Quit",       "<control>Q", quit_cb,               0 },
  69 };
  70
  71 static void
  72 socket_destroyed (GtkWidget *widget,
  73                   Socket    *socket)
  74 {
  75   sockets = g_slist_remove (sockets, socket);
  76   g_free (socket);
  77 }
  78
  79 static void
  80 plug_added (GtkWidget *widget,
  81             Socket    *socket)
  82 {
  83   g_print ("Plug added to socket\n");
  84
  85   gtk_widget_show (socket->socket);
  86   gtk_widget_hide (socket->frame);
  87 }
  88
  89 static gboolean
  90 plug_removed (GtkWidget *widget,
  91               Socket    *socket)
  92 {
  93   g_print ("Plug removed from socket\n");
  94
  95   gtk_widget_hide (socket->socket);
  96   gtk_widget_show (socket->frame);
  97
  98   return TRUE;
  99 }
 100
 101 static Socket *
 102 create_socket (void)
 103 {
 104   GtkWidget *label;
 105
 106   Socket *socket = g_new (Socket, 1);
 107
 108   socket->box = gtk_vbox_new (FALSE, 0);
 109
 110   socket->socket = gtk_socket_new ();
 111
 112   gtk_box_pack_start (GTK_BOX (socket->box), socket->socket, TRUE, TRUE, 0);
 113
 114   socket->frame = gtk_frame_new (NULL);
 115   gtk_frame_set_shadow_type (GTK_FRAME (socket->frame), GTK_SHADOW_IN);
 116   gtk_box_pack_start (GTK_BOX (socket->box), socket->frame, TRUE, TRUE, 0);
 117   gtk_widget_show (socket->frame);
 118
 119   label = gtk_label_new (NULL);
 120   gtk_label_set_markup (GTK_LABEL (label), "<span color=\"red\">Empty</span>");
 121   gtk_container_add (GTK_CONTAINER (socket->frame), label);
 122   gtk_widget_show (label);
 123
 124   sockets = g_slist_prepend (sockets, socket);
 125
 126
 127   g_signal_connect (socket->socket, "destroy",
 128                     G_CALLBACK (socket_destroyed), socket);
 129   g_signal_connect (socket->socket, "plug_added",
 130                     G_CALLBACK (plug_added), socket);
 131   g_signal_connect (socket->socket, "plug_removed",
 132                     G_CALLBACK (plug_removed), socket);
 133
 134   return socket;
 135 }
 136
 137 void
 138 steal (GtkWidget *window, GtkEntry *entry)
 139 {
 140   guint32 xid;
 141   const gchar *text;
 142   Socket *socket;
 143
 144   text = gtk_entry_get_text (entry);
 145
 146   xid = strtol (text, NULL, 0);
 147   if (xid == 0)
 148     {
 149       g_warning ("Invalid window id '%s'\n", text);
 150       return;
 151     }
 152
 153   socket = create_socket ();
 154   gtk_box_pack_start (GTK_BOX (box), socket->box, TRUE, TRUE, 0);
 155   gtk_widget_show (socket->box);
 156
 157   gtk_socket_steal (GTK_SOCKET (socket->socket), xid);
 158 }
 159
 160 void
 161 remove_child (GtkWidget *window)
 162 {
 163   if (sockets)
 164     {
 165       Socket *socket = sockets->data;
 166       gtk_widget_destroy (socket->box);
 167     }
 168 }
 169
 170 static gboolean
 171 child_read_watch (GIOChannel *channel, GIOCondition cond, gpointer data)
 172 {
 173   GIOStatus status;
 174   GError *error = NULL;
 175   char *line;
 176   gsize term;
 177   int xid;
 178
 179   status = g_io_channel_read_line (channel, &line, NULL, &term, &error);
 180   switch (status)
 181     {
 182     case G_IO_STATUS_NORMAL:
 183       line[term] = '\0';
 184       xid = strtol (line, NULL, 0);
 185       if (xid == 0)
 186         {
 187           fprintf (stderr, "Invalid window id '%s'\n", line);
 188         }
 189       else
 190         {
 191           Socket *socket = create_socket ();
 192           gtk_box_pack_start (GTK_BOX (box), socket->box, TRUE, TRUE, 0);
 193           gtk_widget_show (socket->box);
 194
 195           gtk_socket_add_id (GTK_SOCKET (socket->socket), xid);
 196         }
 197       g_free (line);
 198       return TRUE;
 199     case G_IO_STATUS_AGAIN:
 200       return TRUE;
 201     case G_IO_STATUS_EOF:
 202       n_children--;
 203       return FALSE;
 204     case G_IO_STATUS_ERROR:
 205       fprintf (stderr, "Error reading fd from child: %s\n", error->message);
 206       exit (1);
 207       return FALSE;
 208     default:
 209       g_assert_not_reached ();
 210       return FALSE;
 211     }
 212
 213 }
 214
 215 void
 216 add_child (GtkWidget *window,
 217            gboolean   active)
 218 {
 219   Socket *socket;
 220   char *argv[3] = { "./testsocket_child", NULL, NULL };
 221   char buffer[20];
 222   int out_fd;
 223   GIOChannel *channel;
 224   GError *error = NULL;
 225
 226   if (active)
 227     {
 228       socket = create_socket ();
 229       gtk_box_pack_start (GTK_BOX (box), socket->box, TRUE, TRUE, 0);
 230       gtk_widget_show (socket->box);
 231       sprintf(buffer, "%#lx", (gulong) gtk_socket_get_id (GTK_SOCKET (socket->socket)));
 232       argv[1] = buffer;
 233     }
 234
 235   if (!g_spawn_async_with_pipes (NULL, argv, NULL, 0, NULL, NULL, NULL, NULL, &out_fd, NULL, &error))
 236     {
 237       fprintf (stderr, "Can't exec testsocket_child: %s\n", error->message);
 238       exit (1);
 239     }
 240
 241   n_children++;
 242   channel = g_io_channel_unix_new (out_fd);
 243   g_io_channel_set_close_on_unref (channel, TRUE);
 244   g_io_channel_set_flags (channel, G_IO_FLAG_NONBLOCK, &error);
 245   if (error)
 246     {
 247       fprintf (stderr, "Error making channel non-blocking: %s\n", error->message);
 248       exit (1);
 249     }
 250
 251   g_io_add_watch (channel, G_IO_IN | G_IO_HUP, child_read_watch, NULL);
 252   g_io_channel_unref (channel);
 253 }
 254
 255 void
 256 add_active_child (GtkWidget *window)
 257 {
 258   add_child (window, TRUE);
 259 }
 260
 261 void
 262 add_passive_child (GtkWidget *window)
 263 {
 264   add_child (window, FALSE);
 265 }
 266
 267 void
 268 add_local_active_child (GtkWidget *window)
 269 {
 270   Socket *socket;
 271
 272   socket = create_socket ();
 273   gtk_box_pack_start (GTK_BOX (box), socket->box, TRUE, TRUE, 0);
 274   gtk_widget_show (socket->box);
 275
 276   create_child_plug (gtk_socket_get_id (GTK_SOCKET (socket->socket)), TRUE);
 277 }
 278
 279 void
 280 add_local_passive_child (GtkWidget *window)
 281 {
 282   Socket *socket;
 283   GdkNativeWindow xid;
 284
 285   socket = create_socket ();
 286   gtk_box_pack_start (GTK_BOX (box), socket->box, TRUE, TRUE, 0);
 287   gtk_widget_show (socket->box);
 288
 289   xid = create_child_plug (0, TRUE);
 290   gtk_socket_add_id (GTK_SOCKET (socket->socket), xid);
 291 }
 292
 293 static const char *
 294 grab_string (int status)
 295 {
 296   switch (status) {
 297   case GDK_GRAB_SUCCESS:          return "GrabSuccess";
 298   case GDK_GRAB_ALREADY_GRABBED:  return "AlreadyGrabbed";
 299   case GDK_GRAB_INVALID_TIME:     return "GrabInvalidTime";
 300   case GDK_GRAB_NOT_VIEWABLE:     return "GrabNotViewable";
 301   case GDK_GRAB_FROZEN:           return "GrabFrozen";
 302   default:
 303     {
 304       static char foo [255];
 305       sprintf (foo, "unknown status: %d", status);
 306       return foo;
 307     }
 308   }
 309 }
 310
 311 static void
 312 grab_window_toggled (GtkToggleButton *button,
 313                      GtkWidget       *widget)
 314 {
 315
 316   if (gtk_toggle_button_get_active (button))
 317     {
 318       int status;
 319
 320       status = gdk_keyboard_grab (widget->window, FALSE, GDK_CURRENT_TIME);
 321
 322       if (status != GDK_GRAB_SUCCESS)
 323         g_warning ("Could not grab keyboard!  (%s)", grab_string (status));
 324
 325     }
 326   else
 327     {
 328       gdk_keyboard_ungrab (GDK_CURRENT_TIME);
 329     }
 330 }
 331
 332 int
 333 main (int argc, char *argv[])
 334 {
 335   GtkWidget *button;
 336   GtkWidget *hbox;
 337   GtkWidget *vbox;
 338   GtkWidget *entry;
 339   GtkWidget *checkbutton;
 340   GtkAccelGroup *accel_group;
 341   GtkItemFactory *item_factory;
 342
 343   gtk_init (&argc, &argv);
 344
 345   window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
 346   g_signal_connect (window, "destroy",
 347                     G_CALLBACK (gtk_main_quit), NULL);
 348
 349   gtk_window_set_title (GTK_WINDOW (window), "Socket Test");
 350   gtk_container_set_border_width (GTK_CONTAINER (window), 0);
 351
 352   vbox = gtk_vbox_new (FALSE, 0);
 353   gtk_container_add (GTK_CONTAINER (window), vbox);
 354
 355   accel_group = gtk_accel_group_new ();
 356   gtk_window_add_accel_group (GTK_WINDOW (window), accel_group);
 357   item_factory = gtk_item_factory_new (GTK_TYPE_MENU_BAR, "<main>", accel_group);
 358
 359
 360   gtk_item_factory_create_items (item_factory,
 361                                  G_N_ELEMENTS (menu_items), menu_items,
 362                                  NULL);
 363
 364   gtk_box_pack_start (GTK_BOX (vbox),
 365                       gtk_item_factory_get_widget (item_factory, "<main>"),
 366                       FALSE, FALSE, 0);
 367
 368   button = gtk_button_new_with_label ("Add Active Child");
 369   gtk_box_pack_start (GTK_BOX(vbox), button, FALSE, FALSE, 0);
 370
 371   g_signal_connect_swapped (button, "clicked",
 372                             G_CALLBACK (add_active_child), vbox);
 373
 374   button = gtk_button_new_with_label ("Add Passive Child");
 375   gtk_box_pack_start (GTK_BOX(vbox), button, FALSE, FALSE, 0);
 376
 377   g_signal_connect_swapped (button, "clicked",
 378                             G_CALLBACK (add_passive_child), vbox);
 379
 380   button = gtk_button_new_with_label ("Add Local Active Child");
 381   gtk_box_pack_start (GTK_BOX(vbox), button, FALSE, FALSE, 0);
 382
 383   g_signal_connect_swapped (button, "clicked",
 384                             G_CALLBACK (add_local_active_child), vbox);
 385
 386   button = gtk_button_new_with_label ("Add Local Passive Child");
 387   gtk_box_pack_start (GTK_BOX(vbox), button, FALSE, FALSE, 0);
 388
 389   g_signal_connect_swapped (button, "clicked",
 390                             G_CALLBACK (add_local_passive_child), vbox);
 391
 392   button = gtk_button_new_with_label ("Remove Last Child");
 393   gtk_box_pack_start (GTK_BOX(vbox), button, FALSE, FALSE, 0);
 394
 395   g_signal_connect_swapped (button, "clicked",
 396                             G_CALLBACK (remove_child), vbox);
 397
 398   checkbutton = gtk_check_button_new_with_label ("Grab keyboard");
 399   gtk_box_pack_start (GTK_BOX (vbox), checkbutton, FALSE, FALSE, 0);
 400
 401   g_signal_connect (checkbutton, "toggled",
 402                     G_CALLBACK (grab_window_toggled),
 403                     window);
 404
 405   hbox = gtk_hbox_new (FALSE, 0);
 406   gtk_box_pack_start (GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
 407
 408   entry = gtk_entry_new ();
 409   gtk_box_pack_start (GTK_BOX(hbox), entry, FALSE, FALSE, 0);
 410
 411   button = gtk_button_new_with_label ("Steal");
 412   gtk_box_pack_start (GTK_BOX(hbox), button, FALSE, FALSE, 0);
 413
 414   g_signal_connect (button, "clicked",
 415                     G_CALLBACK (steal),
 416                     entry);
 417
 418   hbox = gtk_hbox_new (FALSE, 0);
 419   gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);
 420
 421   box = hbox;
 422
 423   gtk_widget_show_all (window);
 424
 425   gtk_main ();
 426
 427   if (n_children)
 428     {
 429       g_print ("Waiting for children to exit\n");
 430
 431       while (n_children)
 432         g_main_context_iteration (NULL, TRUE);
 433     }
 434
 435   return 0;
 436 }