#include <math.h>

#include <pango/pangocairo.h>

#include <gtk/gtk.h>

static GtkWidget *main_window;

static char *filename = NULL;

static GtkPageSetup *page_setup = NULL;

static GtkPrintSettings *settings = NULL;

static gboolean file_changed = FALSE;

static GtkTextBuffer *buffer;

static GtkWidget *statusbar;

static GList *active_prints = NULL;

static void

update_title (void)

{

  char *basename;

  char *title;

  if (filename == NULL)

    basename = g_strdup ("Untitled");

  else

    basename = g_path_get_basename (filename);

  title = g_strdup_printf ("Simple Editor with printing - %s", basename);

  g_free (basename);

  gtk_window_set_title (GTK_WINDOW (main_window), title);

  g_free (title);

}

static void

update_statusbar (void)

{

  gchar *msg;

  gint row, col;

  GtkTextIter iter;

  const char *print_str;

  gtk_statusbar_pop (GTK_STATUSBAR (statusbar), 0);

  gtk_text_buffer_get_iter_at_mark (buffer,

                                    &iter,

                                    gtk_text_buffer_get_insert (buffer));

  row = gtk_text_iter_get_line (&iter);

  col = gtk_text_iter_get_line_offset (&iter);

  print_str = "";

  if (active_prints)

    {

      GtkPrintOperation *op = active_prints->data;

      print_str = gtk_print_operation_get_status_string (op);

    }

  msg = g_strdup_printf ("%d, %d%s %s",

                         row, col,

			 file_changed?" - Modified":"",

			 print_str);

  gtk_statusbar_push (GTK_STATUSBAR (statusbar), 0, msg);

  g_free (msg);

}

static void

update_ui (void)

{

  update_title ();

  update_statusbar ();

}

static char *

get_text (void)

{

  GtkTextIter start, end;

  gtk_text_buffer_get_start_iter (buffer, &start;;

  gtk_text_buffer_get_end_iter (buffer, &end;;

  return gtk_text_buffer_get_text (buffer, &start, &end, FALSE);

}

static void

set_text (const char *text, gsize len)

{

  gtk_text_buffer_set_text (buffer, text, len);

  file_changed = FALSE;

  update_ui ();

}

static void

do_new (GtkAction *action)

{

  g_free (filename);

  filename = NULL;

  set_text ("", 0);

}

static void

load_file (const char *open_filename)

{

  GtkWidget *error_dialog;

  char *contents;

  GError *error;

  gsize len;

  error_dialog = NULL;

  error = NULL;

  if (g_file_get_contents (open_filename, &contents, &len, &error))

    {

      if (g_utf8_validate (contents, len, NULL))

	{

	  filename = g_strdup (open_filename);

	  set_text (contents, len);

	  g_free (contents);

	}

      else

	{

	  error_dialog = gtk_message_dialog_new (GTK_WINDOW (main_window),

						 GTK_DIALOG_DESTROY_WITH_PARENT,

						 GTK_MESSAGE_ERROR,

						 GTK_BUTTONS_CLOSE,

						 "Error loading file %s:\n%s",

						 open_filename,

						 "Not valid utf8");

	}

    }

  else

    {

      error_dialog = gtk_message_dialog_new (GTK_WINDOW (main_window),

					     GTK_DIALOG_DESTROY_WITH_PARENT,

					     GTK_MESSAGE_ERROR,

					     GTK_BUTTONS_CLOSE,

					     "Error loading file %s:\n%s",

					     open_filename,

					     error->message);

      g_error_free (error);

    }

  if (error_dialog)

    {

      g_signal_connect (error_dialog, "response", G_CALLBACK (gtk_widget_destroy), NULL);

      gtk_widget_show (error_dialog);

    }

}

static void

do_open (GtkAction *action)

{

  GtkWidget *dialog;

  gint response;

  char *open_filename;

  dialog = gtk_file_chooser_dialog_new ("Select file",

					GTK_WINDOW (main_window),

					GTK_FILE_CHOOSER_ACTION_OPEN,

					GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,

					GTK_STOCK_OPEN, GTK_RESPONSE_OK,

					NULL);

  gtk_dialog_set_default_response (GTK_DIALOG (dialog), GTK_RESPONSE_OK);

  response = gtk_dialog_run (GTK_DIALOG (dialog));

  if (response == GTK_RESPONSE_OK)

    {

      open_filename = gtk_file_chooser_get_filename (GTK_FILE_CHOOSER (dialog));

      load_file (open_filename);

      g_free (open_filename);

    }

  gtk_widget_destroy (dialog);

}

static void

save_file (const char *save_filename)

{

  char *text = get_text ();

  GtkWidget *error_dialog;

  GError *error;

  error = NULL;

  if (g_file_set_contents (save_filename,

			   text, -1, &error))

    {

      if (save_filename != filename)

	{

	  g_free (filename);

	  filename = g_strdup (save_filename);

	}

      file_changed = FALSE;

      update_ui ();

    }

  else

    {

      error_dialog = gtk_message_dialog_new (GTK_WINDOW (main_window),

					     GTK_DIALOG_DESTROY_WITH_PARENT,

					     GTK_MESSAGE_ERROR,

					     GTK_BUTTONS_CLOSE,

					     "Error saving to file %s:\n%s",

					     filename,

					     error->message);

      g_signal_connect (error_dialog, "response", G_CALLBACK (gtk_widget_destroy), NULL);

      gtk_widget_show (error_dialog);

      g_error_free (error);

    }

}

static void

do_save_as (GtkAction *action)

{

  GtkWidget *dialog;

  gint response;

  char *save_filename;

  dialog = gtk_file_chooser_dialog_new ("Select file",

					GTK_WINDOW (main_window),

					GTK_FILE_CHOOSER_ACTION_SAVE,

					GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,

					GTK_STOCK_SAVE, GTK_RESPONSE_OK,

					NULL);

  gtk_dialog_set_default_response (GTK_DIALOG (dialog), GTK_RESPONSE_OK);

  response = gtk_dialog_run (GTK_DIALOG (dialog));

  if (response == GTK_RESPONSE_OK)

    {

      save_filename = gtk_file_chooser_get_filename (GTK_FILE_CHOOSER (dialog));

      save_file (save_filename);

      g_free (save_filename);

    }

  gtk_widget_destroy (dialog);

}

static void

do_save (GtkAction *action)

{

  if (filename == NULL)

    do_save_as (action);

  else

    save_file (filename);

}

typedef struct {

  char *text;

  PangoLayout *layout;

  GList *page_breaks;

  GtkWidget *font_button;

  char *font;

} PrintData;

static void

begin_print (GtkPrintOperation *operation,

	     GtkPrintContext *context,

	     PrintData *print_data)

{

  PangoFontDescription *desc;

  PangoLayoutLine *layout_line;

  double width, height;

  double page_height;

  GList *page_breaks;

  int num_lines;

  int line;

  width = gtk_print_context_get_width (context);

  height = gtk_print_context_get_height (context);

  print_data->layout = gtk_print_context_create_pango_layout (context);

  desc = pango_font_description_from_string (print_data->font);

  pango_layout_set_font_description (print_data->layout, desc);

  pango_font_description_free (desc);

  pango_layout_set_width (print_data->layout, width * PANGO_SCALE);

  pango_layout_set_text (print_data->layout, print_data->text, -1);

  num_lines = pango_layout_get_line_count (print_data->layout);

  page_breaks = NULL;

  page_height = 0;

  for (line = 0; line < num_lines; line++)

    {

      PangoRectangle ink_rect, logical_rect;

      double line_height;

      layout_line = pango_layout_get_line (print_data->layout, line);

      pango_layout_line_get_extents (layout_line, &ink_rect, &logical_rect);

      line_height = logical_rect.height / 1024.0;

      if (page_height + line_height > height)

	{

	  page_breaks = g_list_prepend (page_breaks, GINT_TO_POINTER (line));

	  page_height = 0;

	}

      page_height += line_height;

    }

  page_breaks = g_list_reverse (page_breaks);

  gtk_print_operation_set_n_pages (operation, g_list_length (page_breaks) + 1);

  print_data->page_breaks = page_breaks;

}

static void

draw_page (GtkPrintOperation *operation,

	   GtkPrintContext *context,

	   int page_nr,

	   PrintData *print_data)

{

  cairo_t *cr;

  GList *pagebreak;

  int start, end, i;

  PangoLayoutIter *iter;

  double start_pos;

  if (page_nr == 0)

    start = 0;

  else

    {

      pagebreak = g_list_nth (print_data->page_breaks, page_nr - 1);

      start = GPOINTER_TO_INT (pagebreak->data);

    }

  pagebreak = g_list_nth (print_data->page_breaks, page_nr);

  if (pagebreak == NULL)

    end = pango_layout_get_line_count (print_data->layout);

  else

    end = GPOINTER_TO_INT (pagebreak->data);

  cr = gtk_print_context_get_cairo_context (context);

  cairo_set_source_rgb (cr, 0, 0, 0);

  i = 0;

  start_pos = 0;

  iter = pango_layout_get_iter (print_data->layout);

  do

    {

      PangoRectangle   logical_rect;

      PangoLayoutLine *line;

      int              baseline;

      if (i >= start)

	{

	  line = pango_layout_iter_get_line (iter);

	  pango_layout_iter_get_line_extents (iter, NULL, &logical_rect);

	  baseline = pango_layout_iter_get_baseline (iter);

	  if (i == start)

	    start_pos = logical_rect.y / 1024.0;

	  cairo_move_to (cr, logical_rect.x / 1024.0, baseline / 1024.0 - start_pos);

	  pango_cairo_show_layout_line  (cr, line);

	}

      i++;

    }

  while (i < end &&

	 pango_layout_iter_next_line (iter));

  pango_layout_iter_free (iter);

}

static void

do_page_setup (GtkAction *action)

{

  GtkPageSetup *new_page_setup;

  new_page_setup = gtk_print_run_page_setup_dialog (GTK_WINDOW (main_window),

						    page_setup, settings);

  if (page_setup)

    g_object_unref (page_setup);

  page_setup = new_page_setup;

}

static void

status_changed_cb (GtkPrintOperation *op,

		   gpointer user_data)

{

  if (gtk_print_operation_is_finished (op))

    {

      active_prints = g_list_remove (active_prints, op);

      g_object_unref (op);

    }

  update_statusbar ();

}

static GtkWidget *

create_custom_widget (GtkPrintOperation *operation,

		      PrintData *data)

{

  GtkWidget *vbox, *hbox, *font, *label;

  gtk_print_operation_set_custom_tab_label (operation, "Other");

  vbox = gtk_vbox_new (FALSE, 0);

  gtk_container_set_border_width (GTK_CONTAINER (vbox), 12);

  hbox = gtk_hbox_new (FALSE, 8);

  gtk_box_pack_start (GTK_BOX (vbox), hbox, FALSE, FALSE, 0);

  gtk_widget_show (hbox);

  label = gtk_label_new ("Font:");

  gtk_box_pack_start (GTK_BOX (hbox), label, FALSE, FALSE, 0);

  gtk_widget_show (label);

  font = gtk_font_button_new_with_font  (data->font);

  gtk_box_pack_start (GTK_BOX (hbox), font, FALSE, FALSE, 0);

  gtk_widget_show (font);

  data->font_button = font;

  return vbox;

}

static void

custom_widget_apply (GtkPrintOperation *operation,

		     GtkWidget *widget,

		     PrintData *data)

{

  const char *selected_font;

  selected_font = gtk_font_button_get_font_name  (GTK_FONT_BUTTON (data->font_button));

  g_free (data->font);

  data->font = g_strdup (selected_font);

}

typedef struct 

{

  GtkPrintOperation *op;

  GtkPrintOperationPreview *preview;

  GtkWidget         *spin;

  GtkWidget         *area;

  gint               page;

  GtkPrintContext   *context;

  PrintData *data;

  gdouble dpi_x, dpi_y;

} PreviewOp;

static gboolean

preview_expose (GtkWidget      *widget,

		GdkEventExpose *event,

		gpointer        data)

{

  PreviewOp *pop = data;

  cairo_t *cr;

  cr = gdk_cairo_create (pop->area->window);

  gtk_print_context_set_cairo_context (pop->context, cr, pop->dpi_x, pop->dpi_y);

  cairo_destroy (cr);

  gdk_window_clear (pop->area->window);

  gtk_print_operation_preview_render_page (pop->preview,

					   pop->page - 1);

  return TRUE;

}

static void

preview_ready (GtkPrintOperationPreview *preview,

	       GtkPrintContext          *context,

	       gpointer                  data)

{

  PreviewOp *pop = data;

  gint n_pages;

  g_object_get (pop->op, "n-pages", &n_pages, NULL);

  gtk_spin_button_set_range (GTK_SPIN_BUTTON (pop->spin), 

			     1.0, n_pages);

  g_signal_connect (pop->area, "expose_event",

		    G_CALLBACK (preview_expose),

		    pop);

  gtk_widget_queue_draw (pop->area);

}

static void

preview_got_page_size (GtkPrintOperationPreview *preview, 

		       GtkPrintContext          *context,

		       GtkPageSetup             *page_setup,

		       gpointer                  data)

{

  PreviewOp *pop = data;

  GtkPaperSize *paper_size;

  double w, h;

  cairo_t *cr;

  gdouble dpi_x, dpi_y;

  paper_size = gtk_page_setup_get_paper_size (page_setup);

  w = gtk_paper_size_get_width (paper_size, GTK_UNIT_INCH);

  h = gtk_paper_size_get_height (paper_size, GTK_UNIT_INCH);

  cr = gdk_cairo_create (pop->area->window);

  dpi_x = pop->area->allocation.width/w;

  dpi_y = pop->area->allocation.height/h;

  if (fabs (dpi_x - pop->dpi_x) > 0.001 ||

      fabs (dpi_y - pop->dpi_y) > 0.001)

    {

      gtk_print_context_set_cairo_context (context, cr, dpi_x, dpi_y);

      pop->dpi_x = dpi_x;

      pop->dpi_y = dpi_y;

    }

  pango_cairo_update_layout (cr, pop->data->layout);

  cairo_destroy (cr);

}

static void

update_page (GtkSpinButton *widget,

	     gpointer       data)

{

  PreviewOp *pop = data;

  pop->page = gtk_spin_button_get_value_as_int (widget);

  gtk_widget_queue_draw (pop->area);

}

static void

preview_destroy (GtkWindow *window, 

		 PreviewOp *pop)

{

  gtk_print_operation_preview_end_preview (pop->preview);

  g_object_unref (pop->op);

  g_free (pop);

}

static gboolean 

preview_cb (GtkPrintOperation        *op,

	    GtkPrintOperationPreview *preview,

	    GtkPrintContext          *context,

	    GtkWindow                *parent,

	    gpointer                  data)

{

  GtkPrintSettings *settings;

  GtkWidget *window, *close, *page, *hbox, *vbox, *da;

  gdouble width, height;

  cairo_t *cr;

  PreviewOp *pop;

  PrintData *print_data = data;

  pop = g_new0 (PreviewOp, 1);

  pop->data = print_data;

  settings = gtk_print_operation_get_print_settings (op);

  width = 200;

  height = 300;

  window = gtk_window_new (GTK_WINDOW_TOPLEVEL);

  gtk_window_set_transient_for (GTK_WINDOW (window), 

				GTK_WINDOW (main_window));

  vbox = gtk_vbox_new (FALSE, 0);

  gtk_container_add (GTK_CONTAINER (window), vbox);

  hbox = gtk_hbox_new (FALSE, 0);

  gtk_box_pack_start (GTK_BOX (vbox), hbox,

		      FALSE, FALSE, 0);

  page = gtk_spin_button_new_with_range (1, 100, 1);

  gtk_box_pack_start (GTK_BOX (hbox), page, FALSE, FALSE, 0);

  close = gtk_button_new_from_stock (GTK_STOCK_CLOSE);

  gtk_box_pack_start (GTK_BOX (hbox), close, FALSE, FALSE, 0);

  da = gtk_drawing_area_new ();

  gtk_widget_set_size_request (GTK_WIDGET (da), width, height);

  gtk_box_pack_start (GTK_BOX (vbox), da, TRUE, TRUE, 0);

  gtk_widget_realize (da);

  cr = gdk_cairo_create (da->window);

  /* TODO: What dpi to use here? This will be used for pagination.. */

  gtk_print_context_set_cairo_context (context, cr, 72, 72);

  cairo_destroy (cr);

  pop->op = g_object_ref (op);

  pop->preview = preview;

  pop->spin = page;

  pop->area = da;

  pop->page = 1;

  pop->context = context;

  g_signal_connect (page, "value-changed", 

		    G_CALLBACK (update_page), pop);

  g_signal_connect_swapped (close, "clicked", 

			    G_CALLBACK (gtk_widget_destroy), window);

  g_signal_connect (preview, "ready",

		    G_CALLBACK (preview_ready), pop);

  g_signal_connect (preview, "got-page-size",

		    G_CALLBACK (preview_got_page_size), pop);

  g_signal_connect (window, "destroy", 

                    G_CALLBACK (preview_destroy), pop);

  gtk_widget_show_all (window);

  return TRUE;

}

static void

print_done (GtkPrintOperation *op,

	    GtkPrintOperationResult res,

	    PrintData *print_data)

{

  GError *error = NULL;

  if (res == GTK_PRINT_OPERATION_RESULT_ERROR)

    {

      GtkWidget *error_dialog;

      gtk_print_operation_get_error (op, &error);

      error_dialog = gtk_message_dialog_new (GTK_WINDOW (main_window),

					     GTK_DIALOG_DESTROY_WITH_PARENT,

					     GTK_MESSAGE_ERROR,

					     GTK_BUTTONS_CLOSE,

					     "Error printing file:\n%s",

					     error ? error->message : "no details");

      g_signal_connect (error_dialog, "response", G_CALLBACK (gtk_widget_destroy), NULL);

      gtk_widget_show (error_dialog);

    }

  else if (res == GTK_PRINT_OPERATION_RESULT_APPLY)

    {

      if (settings != NULL)

	g_object_unref (settings);

      settings = g_object_ref (gtk_print_operation_get_print_settings (op));

    }

  g_free (print_data->text);

  g_free (print_data->font);

  g_free (print_data);

  if (!gtk_print_operation_is_finished (op))

    {

      g_object_ref (op);

      active_prints = g_list_append (active_prints, op);

      update_statusbar ();

      /* This ref is unref:ed when we get the final state change */

      g_signal_connect (op, "status_changed",

			G_CALLBACK (status_changed_cb), NULL);

    }

}

static void

end_print (GtkPrintOperation *op, GtkPrintContext *context, PrintData *print_data)

{

  g_list_free (print_data->page_breaks);

  print_data->page_breaks = NULL;

  g_object_unref (print_data->layout);

  print_data->layout = NULL;

}

static void

do_print_or_preview (GtkAction *action, GtkPrintOperationAction print_action)

{

  GtkPrintOperation *print;

  PrintData *print_data;

  print_data = g_new0 (PrintData, 1);

  print_data->text = get_text ();

  print_data->font = g_strdup ("Sans 12");

  print = gtk_print_operation_new ();

  gtk_print_operation_set_track_print_status (print, TRUE);

  if (settings != NULL)

    gtk_print_operation_set_print_settings (print, settings);

  if (page_setup != NULL)

    gtk_print_operation_set_default_page_setup (print, page_setup);

  g_signal_connect (print, "begin_print", G_CALLBACK (begin_print), print_data);

  g_signal_connect (print, "end-print", G_CALLBACK (end_print), print_data);

  g_signal_connect (print, "draw_page", G_CALLBACK (draw_page), print_data);

  g_signal_connect (print, "create_custom_widget", G_CALLBACK (create_custom_widget), print_data);

  g_signal_connect (print, "custom_widget_apply", G_CALLBACK (custom_widget_apply), print_data);

  g_signal_connect (print, "preview", G_CALLBACK (preview_cb), print_data);

  g_signal_connect (print, "done", G_CALLBACK (print_done), print_data);

  gtk_print_operation_set_export_filename (print, "test.pdf");

#if 0

  gtk_print_operation_set_allow_async (print, TRUE);

#endif

  gtk_print_operation_run (print, print_action, GTK_WINDOW (main_window), NULL);

  g_object_unref (print);

}

static void

do_print (GtkAction *action)

{

  do_print_or_preview (action, GTK_PRINT_OPERATION_ACTION_PRINT_DIALOG);

}

static void

do_preview (GtkAction *action)

{

  do_print_or_preview (action, GTK_PRINT_OPERATION_ACTION_PREVIEW);

}

static void

do_about (GtkAction *action)

{

  const gchar *authors[] = {

    "Alexander Larsson",

    NULL

  };

  gtk_show_about_dialog (GTK_WINDOW (main_window),

			 "name", "print test editor",

			 "version", "0.1",

			 "copyright", "(C) Red Hat, Inc",

			 "comments", "Program to demonstrate GTK+ printing.",

			 "authors", authors,

			 NULL);

}

static void

do_quit (GtkAction *action)

{

  gtk_main_quit ();

}

static GtkActionEntry entries[] = {

  { "FileMenu", NULL, "_File" },               /* name, stock id, label */

  { "HelpMenu", NULL, "_Help" },               /* name, stock id, label */

  { "New", GTK_STOCK_NEW,                      /* name, stock id */

    "_New", "<control>N",                      /* label, accelerator */

    "Create a new file",                       /* tooltip */ 

    G_CALLBACK (do_new) },      

  { "Open", GTK_STOCK_OPEN,                    /* name, stock id */

    "_Open","<control>O",                      /* label, accelerator */     

    "Open a file",                             /* tooltip */

    G_CALLBACK (do_open) }, 

  { "Save", GTK_STOCK_SAVE,                    /* name, stock id */

    "_Save","<control>S",                      /* label, accelerator */     

    "Save current file",                       /* tooltip */

    G_CALLBACK (do_save) },

  { "SaveAs", GTK_STOCK_SAVE,                  /* name, stock id */

    "Save _As...", NULL,                       /* label, accelerator */     

    "Save to a file",                          /* tooltip */

    G_CALLBACK (do_save_as) },

  { "Quit", GTK_STOCK_QUIT,                    /* name, stock id */

    "_Quit", "<control>Q",                     /* label, accelerator */     

    "Quit",                                    /* tooltip */

    G_CALLBACK (do_quit) },

  { "About", NULL,                             /* name, stock id */

    "_About", "<control>A",                    /* label, accelerator */     

    "About",                                   /* tooltip */  

    G_CALLBACK (do_about) },

  { "PageSetup", NULL,                         /* name, stock id */

    "Page _Setup", NULL,                       /* label, accelerator */     

    "Set up the page",                         /* tooltip */

    G_CALLBACK (do_page_setup) },

  { "Preview", NULL,                           /* name, stock id */

    "Print Preview", NULL,                     /* label, accelerator */     

    "Preview the printed document",            /* tooltip */

    G_CALLBACK (do_preview) },

  { "Print", GTK_STOCK_PRINT,                  /* name, stock id */

     NULL, NULL,                               /* label, accelerator */     

    "Print the document",                      /* tooltip */

    G_CALLBACK (do_print) }

};

static guint n_entries = G_N_ELEMENTS (entries);

static const gchar *ui_info = 

"<ui>"

"  <menubar name='MenuBar'>"

"    <menu action='FileMenu'>"

"      <menuitem action='New'/>"

"      <menuitem action='Open'/>"

"      <menuitem action='Save'/>"

"      <menuitem action='SaveAs'/>"

"      <menuitem action='PageSetup'/>"

"      <menuitem action='Preview'/>"

"      <menuitem action='Print'/>"

"      <separator/>"

"      <menuitem action='Quit'/>"

"    </menu>"

"    <menu action='HelpMenu'>"

"      <menuitem action='About'/>"

"    </menu>"

"  </menubar>"

"</ui>";

static void

buffer_changed_callback (GtkTextBuffer *buffer)

{

  file_changed = TRUE;

  update_statusbar ();

}

static void

mark_set_callback (GtkTextBuffer     *buffer,

                   const GtkTextIter *new_location,

                   GtkTextMark       *mark,

                   gpointer           data)

{

  update_statusbar ();

}

static void

update_resize_grip (GtkWidget           *widget,

		    GdkEventWindowState *event,

		    GtkStatusbar        *statusbar)

{

  if (event->changed_mask & (GDK_WINDOW_STATE_MAXIMIZED | 

			     GDK_WINDOW_STATE_FULLSCREEN))

    {

      gboolean maximized;

      maximized = event->new_window_state & (GDK_WINDOW_STATE_MAXIMIZED | 

					     GDK_WINDOW_STATE_FULLSCREEN);

      gtk_statusbar_set_has_resize_grip (statusbar, !maximized);

    }

}

static void

create_window (void)

{

  GtkWidget *bar;

  GtkWidget *table;

  GtkWidget *contents;

  GtkUIManager *ui;

  GtkWidget *sw;

  GtkActionGroup *actions;

  GError *error;

  GtkWindowGroup *group;

  main_window = gtk_window_new (GTK_WINDOW_TOPLEVEL);

  group = gtk_window_group_new ();

  gtk_window_group_add_window (group, GTK_WINDOW (main_window));

  g_object_unref (group);

  gtk_window_set_default_size (GTK_WINDOW (main_window),

			       400, 600);

  g_signal_connect (main_window, "delete-event",

		    G_CALLBACK (gtk_main_quit), NULL);

  actions = gtk_action_group_new ("Actions");

  gtk_action_group_add_actions (actions, entries, n_entries, NULL);

  ui = gtk_ui_manager_new ();

  gtk_ui_manager_insert_action_group (ui, actions, 0);

  gtk_window_add_accel_group (GTK_WINDOW (main_window), 

			      gtk_ui_manager_get_accel_group (ui));

  gtk_container_set_border_width (GTK_CONTAINER (main_window), 0);

  error = NULL;

  if (!gtk_ui_manager_add_ui_from_string (ui, ui_info, -1, &error))

    {

      g_message ("building menus failed: %s", error->message);

      g_error_free (error);

    }

  table = gtk_table_new (1, 3, FALSE);

  gtk_container_add (GTK_CONTAINER (main_window), table);

  bar = gtk_ui_manager_get_widget (ui, "/MenuBar");

  gtk_widget_show (bar);

  gtk_table_attach (GTK_TABLE (table),

		    bar, 

		    /* X direction */          /* Y direction */

		    0, 1,                      0, 1,