helm/gtkmathview-bonobo/test/main.c

   1 #include <config.h>
   2 #include <gnome.h>
   3 #include <bonobo.h>
   4 #include <glib.h>
   5
   6 #include "control-factory.h"
   7 #include "GtkMathView.h"
   8
   9 static GtkWidget *control;
  10
  11 typedef enum{LOAD_STREAM,LOAD_FILE,NONE}FileSelectionOp;
  12
  13 struct FileSelectionInfo {
  14   BonoboWidget* control;
  15   GtkWidget* widget;
  16
  17   FileSelectionOp Operations;
  18 };
  19
  20
  21 static struct FileSelectionInfo file_selection_info = { NULL, NULL,NONE};
  22
  23 static void
  24 file_selection_destroy_cb (GtkWidget *widget,gpointer data)
  25 {
  26         file_selection_info.widget = NULL;
  27 }
  28
  29
  30 static void
  31 load_through_persist_file (const gchar *filename,
  32                                            Bonobo_PersistFile pfile)
  33 {
  34         CORBA_Environment ev;
  35         CORBA_exception_init (&ev);
  36         Bonobo_PersistFile_load (pfile, filename, &ev);
  37         if (ev._major != CORBA_NO_EXCEPTION)
  38                    g_warning ("Cannot load.");
  39         CORBA_exception_free (&ev);
  40 }
  41
  42 static void
  43 load_through_persist_stream(const gchar *filename,
  44                             Bonobo_PersistStream pstream)
  45 {
  46     BonoboObject *stream = NULL;
  47     CORBA_Environment ev;
  48     CORBA_exception_init (&ev);
  49
  50 #if 0
  51     stream = bonobo_stream_open ("fs", filename,
  52                                  Bonobo_Storage_READ, 0);
  53 #endif
  54
  55     /*if (stream == NULL)
  56     {
  57         g_warning ("Couldn't load `%s'\n", filename);
  58     } else*/ {
  59         Bonobo_Stream corba_stream;
  60         corba_stream = bonobo_object_corba_objref (stream);
  61         Bonobo_Stream_truncate (corba_stream, 0, &ev);
  62         Bonobo_PersistStream_load (pstream, corba_stream, "application/mathml+xml", &ev);
  63     }
  64     Bonobo_Unknown_unref (pstream, &ev);
  65     CORBA_Object_release (pstream, &ev);
  66     CORBA_exception_free (&ev);
  67 }
  68
  69 static void
  70 file_selection_ok_cb (GtkWidget *widget,
  71                       gpointer data)
  72 {
  73   CORBA_Object interface;
  74   const gchar *interface_name;
  75   CORBA_Environment ev;
  76
  77   if (file_selection_info.Operations == LOAD_FILE)
  78             interface_name = "IDL:Bonobo/PersistFile:1.0";
  79   else if(file_selection_info.Operations == LOAD_STREAM)
  80       interface_name = "IDL:Bonobo/PersistStream:1.0";
  81   else printf("failed to get operation type\n");
  82
  83   CORBA_exception_init (&ev);
  84   interface = Bonobo_Unknown_queryInterface (bonobo_widget_get_objref (file_selection_info.control),
  85                                              interface_name, &ev);
  86   CORBA_exception_free (&ev);
  87
  88   if (interface == CORBA_OBJECT_NIL)
  89     {
  90       g_warning ("The Control does not seem to support `%s'.", interface_name);
  91     }
  92   else
  93     {
  94        const gchar *fname;
  95        fname = gtk_file_selection_get_filename (GTK_FILE_SELECTION (file_selection_info.widget));
  96        switch (file_selection_info.Operations) {
  97        case LOAD_STREAM:
  98          load_through_persist_stream (fname, interface);
  99          break;
 100        case LOAD_FILE:
 101          load_through_persist_file (fname, interface);
 102          break;
 103        }
 104     }
 105
 106   gtk_widget_destroy (file_selection_info.widget);
 107 }
 108
 109 static void
 110 open_dialog (BonoboWindow *app,
 111              FileSelectionOp operation)
 112 {
 113   GtkWidget    *widget;
 114   BonoboWidget *control;
 115
 116   control = BONOBO_WIDGET (bonobo_window_get_contents (app));
 117
 118   if (file_selection_info.widget != NULL) {
 119     gdk_window_show (GTK_WIDGET (file_selection_info.widget)->window);
 120     return;
 121   }
 122
 123   if(operation == LOAD_STREAM)
 124       widget = gtk_file_selection_new(_("Open Stream...."));
 125   if(operation == LOAD_FILE)
 126       widget = gtk_file_selection_new (_("Open file..."));
 127
 128   gtk_window_set_transient_for (GTK_WINDOW (widget),
 129                                 GTK_WINDOW (app));
 130
 131   file_selection_info.widget = widget;
 132   file_selection_info.control = control;
 133   file_selection_info.Operations = operation;
 134
 135   g_signal_connect_object (GTK_FILE_SELECTION (widget)->cancel_button,
 136                            "clicked", G_CALLBACK (gtk_widget_destroy), widget, G_CONNECT_AFTER);
 137
 138   g_signal_connect (GTK_FILE_SELECTION (widget)->ok_button, "clicked", G_CALLBACK (file_selection_ok_cb), NULL);
 139
 140   g_signal_connect (file_selection_info.widget, "destroy", G_CALLBACK (file_selection_destroy_cb), NULL);
 141
 142   gtk_widget_show (file_selection_info.widget);
 143 }
 144
 145 /* "Open through persist file" dialog.  */
 146 static void
 147 open_through_persist_file_cb (GtkWidget *widget,
 148                               gpointer data)
 149 {
 150   open_dialog (BONOBO_WINDOW (data), LOAD_FILE);
 151 }
 152
 153 static void
 154 open_through_persist_stream_cb(GtkWidget *widget,
 155                                gpointer data)
 156 {
 157   open_dialog(BONOBO_WINDOW(data), LOAD_STREAM);
 158 }
 159
 160 static void
 161 test_view(GtkWidget* widget, gpointer data)
 162 {
 163   CORBA_Object interface;
 164   CORBA_Environment ev;
 165
 166   CORBA_exception_init (&ev);
 167   interface = Bonobo_Unknown_queryInterface (bonobo_widget_get_objref (BONOBO_WIDGET (bonobo_window_get_contents (BONOBO_WINDOW(data)))),
 168                                              "IDL:GNOME/GtkMathView/View:1.0", &ev);
 169   CORBA_exception_free (&ev);
 170
 171   if (interface == CORBA_OBJECT_NIL)
 172     {
 173       g_warning ("The Control does not seem to support `View'.");
 174     }
 175
 176   CORBA_exception_init (&ev);
 177   GNOME_GtkMathView_View_freeze(interface, &ev);
 178   CORBA_exception_free (&ev);
 179
 180   CORBA_exception_init (&ev);
 181   GNOME_GtkMathView_View_thaw(interface, &ev);
 182   CORBA_exception_free (&ev);
 183
 184   CORBA_exception_init (&ev);
 185   Bonobo_Unknown_unref (interface, &ev);
 186   CORBA_Object_release (interface, &ev);
 187   CORBA_exception_free (&ev);
 188 }
 189
 190 static void
 191 exit_cb (GtkWidget *widget,
 192          gpointer data)
 193 {
 194   gtk_widget_destroy (GTK_WIDGET (data));
 195   bonobo_main_quit ();
 196 }
 197
 198 static void
 199 get_size(GtkWidget *widget,
 200                 gpointer data)
 201 {
 202     gint width,height;
 203     BonoboWidget* control;
 204     BonoboControlFrame* control_frame;
 205
 206         Bonobo_PropertyBag prop_bag;
 207
 208     control = BONOBO_WIDGET (bonobo_window_get_contents (BONOBO_WINDOW (data)));
 209     control_frame = bonobo_widget_get_control_frame(BONOBO_WIDGET(control));
 210     prop_bag = bonobo_control_frame_get_control_property_bag(control_frame, NULL);
 211
 212         width = bonobo_pbclient_get_long(prop_bag,"width",NULL);
 213     height = bonobo_pbclient_get_long(prop_bag,"height",NULL);
 214
 215     printf("Width: %d Height: %d\n",width,height);
 216
 217     bonobo_object_release_unref (prop_bag,NULL);
 218
 219 };
 220
 221 static void
 222 get_top(GtkWidget *widget,
 223         gpointer data)
 224 {
 225     gint top_x,top_y;
 226     BonoboWidget* control;
 227     BonoboControlFrame* control_frame;
 228     Bonobo_PropertyBag prop_bag;
 229
 230     control = BONOBO_WIDGET(bonobo_window_get_contents(BONOBO_WINDOW(data)));
 231     control_frame = bonobo_widget_get_control_frame(BONOBO_WIDGET(control));
 232     prop_bag = bonobo_control_frame_get_control_property_bag(control_frame,NULL);
 233
 234     top_x = bonobo_pbclient_get_long(prop_bag,"top-x",NULL);
 235     top_y = bonobo_pbclient_get_long(prop_bag,"top-y",NULL);
 236
 237     printf("Top X: %d ,Top Y: %d\n",top_x,top_y);
 238
 239     bonobo_object_release_unref(prop_bag,NULL);
 240 }
 241
 242 static void
 243 get_font_size(GtkWidget *widget,
 244               gpointer data)
 245 {
 246     gint font_size;
 247     BonoboWidget* control;
 248     BonoboControlFrame* control_frame;
 249     Bonobo_PropertyBag prop_bag;
 250
 251     control = BONOBO_WIDGET(bonobo_window_get_contents(BONOBO_WINDOW(data)));
 252     control_frame = bonobo_widget_get_control_frame(BONOBO_WIDGET(control));
 253     prop_bag = bonobo_control_frame_get_control_property_bag(control_frame,NULL);
 254
 255     font_size = bonobo_pbclient_get_long(prop_bag,"font-size",NULL);
 256
 257     printf("FontSize : %d\n",font_size);
 258
 259     bonobo_object_release_unref(prop_bag,NULL);
 260 }
 261
 262 static void
 263 get_verbosity(GtkWidget *widget,
 264               gpointer data)
 265 {
 266     gint verbosity;
 267     BonoboWidget* control;
 268     BonoboControlFrame* control_frame;
 269     Bonobo_PropertyBag prop_bag;
 270
 271     control = BONOBO_WIDGET(bonobo_window_get_contents(BONOBO_WINDOW(data)));
 272     control_frame = bonobo_widget_get_control_frame(BONOBO_WIDGET(control));
 273     prop_bag = bonobo_control_frame_get_control_property_bag(control_frame,NULL);
 274
 275     verbosity = bonobo_pbclient_get_long(prop_bag,"verbosity",NULL);
 276
 277     printf("Verbosity: %d\n",verbosity);
 278
 279     bonobo_object_release_unref(prop_bag,NULL);
 280 }
 281
 282 static BonoboUIVerb verbs [] = {
 283   BONOBO_UI_UNSAFE_VERB ("OpenFile", open_through_persist_file_cb),
 284   BONOBO_UI_UNSAFE_VERB ("OpenStream", open_through_persist_stream_cb),
 285   BONOBO_UI_UNSAFE_VERB ("TestView", test_view),
 286   BONOBO_UI_UNSAFE_VERB ("Size", get_size),
 287   BONOBO_UI_UNSAFE_VERB ("Top", get_top),
 288   BONOBO_UI_UNSAFE_VERB ("Font Size", get_font_size),
 289   BONOBO_UI_UNSAFE_VERB ("Verbosity", get_verbosity),
 290   BONOBO_UI_UNSAFE_VERB ("FileExit", exit_cb),
 291   BONOBO_UI_VERB_END
 292 };
 293
 294 /* A dirty, non-translatable hack */
 295 static char ui [] =
 296 "<Root>"
 297 "       <commands>"
 298 "               <cmd name=\"FileExit\" _label=\"Exit\" _tip=\"Exit the program\""
 299 "                pixtype=\"stock\" pixname=\"Exit\" accel=\"*Control*q\"/>"
 300 "               <cmd name=\"FormatHTML\" _label=\"HTML mode\" type=\"toggle\" _tip=\"HTML Format switch\"/>"
 301 "       </commands>"
 302 "       <menu>"
 303 "               <submenu name=\"File\" _label=\"_File\">"
 304 "                       <menuitem name=\"OpenFile\" verb=\"\" _label=\"Open (PersistFile)\" _tip=\"Open using the PersistFile interface\""
 305 "                       pixtype=\"stock\" pixname=\"Open\"/>"
 306 "                       <menuitem name=\"OpenStream\" verb=\"\" _label=\"_Open Stream (PersistStream)\" _tip=\"Open using the PersistStream interface\""
 307 "                       pixtype=\"stock\" pixname=\"Open Stream\"/>"
 308 "                       <separator/>"
 309 "                       <menuitem name=\"TestView\" verb=\"\" _label=\"Test View\" _tip=\"Test the View interface\"/>"
 310 "                       <separator/>"
 311 "                       <menuitem name=\"FileExit\" verb=\"\" _label=\"E_xit\"/>"
 312 "               </submenu>"
 313 "               <placeholder name=\"Component\"/>"
 314 "               <submenu name=\"PropertyBags\" _label=\"Property_Bag\">"
 315 "                       <menuitem name=\"Size\" verb=\"\" _label=\"Size(PropertyBag)\" _tip=\"Get size\""
 316 "                       pixtype=\"stock\" pixname=\"Get Size\"/>"
 317
 318 "                       <menuitem name=\"Top\" verb=\"\" _label=\"Top(PropertyBag)\" _tip=\"Get Top\""
 319 "                       pixtype=\"stock\" pixname=\"Get Top\"/>"
 320
 321 "                       <menuitem name=\"Font Size\" verb=\"\" _label=\"Font Size(PropertyBag)\" _tip=\"Get FontSize\""
 322 "                       pixtype=\"stock\" pixname=\"Get FontSize\"/>"
 323
 324 "                       <menuitem name=\"Verbosity\" verb=\"\" _label=\"Verbosity(PropertyBag)\" _tip=\"Get Verbosity\""
 325 "                       pixtype=\"stock\" pixname=\"Get Verbosity\"/>"
 326 "               </submenu>"
 327 "       </menu>"
 328 "       <dockitem name=\"Toolbar\" behavior=\"exclusive\">"
 329 "       </dockitem>"
 330 "</Root>";
 331
 332 static int
 333 app_delete_cb (GtkWidget *widget, GdkEvent *event, gpointer dummy)
 334 {
 335   gtk_widget_destroy (GTK_WIDGET (widget));
 336   bonobo_main_quit ();
 337
 338   return FALSE;
 339 }
 340
 341 static guint
 342 container_create (void)
 343 {
 344   GtkWidget *win;
 345   GtkWindow *window;
 346   BonoboUIComponent *component;
 347   BonoboUIContainer *container;
 348   CORBA_Environment ev;
 349
 350
 351   win = bonobo_window_new ("test-editor",
 352                            "GtkMathView Control Test");
 353   window = GTK_WINDOW (win);
 354
 355   container = bonobo_window_get_ui_container (BONOBO_WINDOW (win));
 356
 357   g_signal_connect (window, "delete_event", G_CALLBACK (app_delete_cb), NULL);
 358
 359   gtk_window_set_default_size (window, 600, 440);
 360   gtk_window_set_resizable (window, TRUE);
 361
 362   component = bonobo_ui_component_new ("test");
 363   bonobo_running_context_auto_exit_unref (BONOBO_OBJECT (component));
 364
 365   bonobo_ui_component_set_container (component, BONOBO_OBJREF (container), NULL);
 366   bonobo_ui_component_add_verb_list_with_data (component, verbs, win);
 367   bonobo_ui_component_set_translate (component, "/", ui, NULL);
 368
 369   control = bonobo_widget_new_control (CONTROL_ID, BONOBO_OBJREF (container));
 370
 371   if (control == NULL)
 372     g_error ("Cannot get `%s'.", CONTROL_ID);
 373
 374   bonobo_window_set_contents (BONOBO_WINDOW (win), control);
 375
 376   gtk_widget_show_all (GTK_WIDGET (window));
 377
 378   CORBA_exception_init (&ev);
 379
 380   return FALSE;
 381 }
 382
 383 static gint
 384 load_file (const gchar *fname)
 385 {
 386   CORBA_Object interface;
 387   CORBA_Environment ev;
 388
 389   printf ("loading: %s\n", fname);
 390   CORBA_exception_init (&ev);
 391   interface = Bonobo_Unknown_queryInterface (bonobo_widget_get_objref (BONOBO_WIDGET (control)),
 392                                              "IDL:Bonobo/PersistFile:1.0", &ev);
 393   CORBA_exception_free (&ev);
 394   load_through_persist_file (fname, interface);
 395
 396   return FALSE;
 397 }
 398
 399 static gint
 400 load_file_stream(const gchar *fname)
 401 {
 402     CORBA_Object interface;
 403     CORBA_Environment ev;
 404
 405     printf("loading with stream %s\n",fname);
 406     CORBA_exception_init(&ev);
 407     interface = Bonobo_Unknown_queryInterface(bonobo_widget_get_objref(BONOBO_WIDGET(control)),
 408                                               "IDL:Bonobo/PersistStream:1.0",&ev);
 409
 410     CORBA_exception_free(&ev);
 411     load_through_persist_stream(fname,interface);
 412
 413     return FALSE;
 414 }
 415
 416 /*
 417 static void
 418 install_property_bag_listener (BonoboWidget *control, BonoboWindow *bonobo_win)
 419 {
 420     Bonobo_Listener corba_listener;
 421     BonoboListener *listener;
 422     BonoboControlFrame *control_frame;
 423     CORBA_Environment ev;
 424     Bonobo_PropertyBag prop_bag;
 425
 426     CORBA_exception_init(&ev);
 427
 428     control_frame = bonobo_widget_get_control_frame(BONOBO_WIDGET(control));
 429     if(!control_frame)
 430         g_error("can't find control frame\n");
 431
 432     prop_bag = bonobo_control_frame_get_control_property_bag(control_frame, NULL);
 433     if(prop_bag == CORBA_OBJECT_NIL)
 434         g_error("can't connect to property bag\n");
 435
 436     //connect a listener to the property bag
 437     bonobo_event_source_client_add_listener(prop_bag, (BonoboListenerCallbackFn) width_changed,
 438                                             "Bonobo/Property:change:width",NULL,bonobo_win);
 439
 440     bonobo_event_source_client_add_listener(prop_bag, (BonoboListenerCallbackFn)height_changed,
 441                                             "Bonobo/Property:change:height",NULL,bonobo_win);
 442     bonobo_event_source_client_add_listener(prop_bag, (BonoboListenerCallbackFn)top_x_changed,
 443                                             "Bonobo/Property:change:top-x",NULL,bonobo_win);
 444     bonobo_event_source_client_add_listener(prop_bag, (BonoboListenerCallbackFn)top_y_changed,
 445                                             "Bonobo/Property:change:top-y",NULL,bonobo_win);
 446     bonobo_event_source_client_add_listener(prop_bag, (BonoboListenerCallbackFn)font_size_changed,
 447                                             "Bonobo/Property:change:font-size",NULL,bonobo_win);
 448     bonobo_event_source_client_add_listener(prop_bag, (BonoboListenerCallbackFn)anti_aliasing_changed,
 449                                             "Bonobo/Property:change:verbosity",NULL,bonobo_win);
 450     bonobo_event_source_client_add_listener(prop_bag, (BonoboListenerCallbackFn)font_manager_changed,
 451                                             "Bonobo/Property:change:font_manager",NULL,bonobo_win);
 452     CORBA_exception_free(&ev);
 453 }*/
 454
 455
 456 int
 457 main (int argc, char **argv)
 458 {
 459   gnome_program_init("test-editor", VERSION, LIBGNOMEUI_MODULE, argc, argv,
 460                      GNOME_PROGRAM_STANDARD_PROPERTIES,
 461                      GNOME_PARAM_HUMAN_READABLE_NAME, _("GtkMathView Test Container"),
 462                      NULL);
 463
 464   bonobo_activate ();
 465
 466   /* We can't make any CORBA calls unless we're in the main loop.  So we
 467      delay creating the container here. */
 468   gtk_idle_add ((GtkFunction) container_create, NULL);
 469   if (argc > 1 && *argv [argc - 1] != '-')
 470     gtk_idle_add ((GtkFunction) load_file, argv [argc - 1]);
 471
 472   bonobo_activate ();
 473   bonobo_main ();
 474
 475   return bonobo_ui_debug_shutdown ();
 476 }