CAMLprim value ml_gtk_set_platform_menubar(value x, value y)
{
#ifdef MACOS
GtkMenuShell *menubar = GTK_MENU_SHELL(GtkWidget_val(x));
GtkMenuItem *about = GTK_MENU_ITEM(GtkWidget_val(y));
GtkOSXApplication *app = g_object_new(GTK_TYPE_OSX_APPLICATION, NULL);
GtkOSXApplicationMenuGroup *group;
gtk_widget_hide((GtkWidget *) menubar);
gtk_osxapplication_set_menu_bar(app, menubar);
group = gtk_osxapplication_add_app_menu_group(app);
gtk_osxapplication_add_app_menu_item(app, group, about);
gtk_osxapplication_ready(app);
#endif
return Val_unit;
}
void subsurface_ui_setup(GtkSettings *settings, GtkWidget *menubar,
GtkWidget *vbox, GtkUIManager *ui_manager)
{
GtkWidget *menu_item, *sep;
if (!divelist_font)
divelist_font = strdup(DIVELIST_MAC_DEFAULT_FONT);
g_object_set(G_OBJECT(settings), "gtk-font-name", UI_FONT, NULL);
osx_app = g_object_new(GTK_TYPE_OSX_APPLICATION, NULL);
gtk_widget_hide (menubar);
gtk_osxapplication_set_menu_bar(osx_app, GTK_MENU_SHELL(menubar));
sep = gtk_ui_manager_get_widget(ui_manager, "/MainMenu/FileMenu/Separator3");
if (sep)
gtk_widget_destroy(sep);
menu_item = gtk_ui_manager_get_widget(ui_manager, "/MainMenu/FileMenu/Quit");
gtk_widget_hide (menu_item);
menu_item = gtk_ui_manager_get_widget(ui_manager, "/MainMenu/Help/About");
gtk_osxapplication_insert_app_menu_item(osx_app, menu_item, 0);
sep = gtk_separator_menu_item_new();
g_object_ref(sep);
gtk_osxapplication_insert_app_menu_item (osx_app, sep, 1);
menu_item = gtk_ui_manager_get_widget(ui_manager, "/MainMenu/FileMenu/Preferences");
gtk_osxapplication_insert_app_menu_item(osx_app, menu_item, 2);
sep = gtk_separator_menu_item_new();
g_object_ref(sep);
gtk_osxapplication_insert_app_menu_item (osx_app, sep, 3);
gtk_osxapplication_set_use_quartz_accelerators(osx_app, TRUE);
g_signal_connect(osx_app,"NSApplicationDidBecomeActive",G_CALLBACK(show_main_window),NULL);
g_signal_connect(osx_app,"NSApplicationWillTerminate",G_CALLBACK(quit),NULL);
gtk_osxapplication_ready(osx_app);
}
int main(int argc, char *argv[])
{
gchar *filename;
gboolean default_used;
GtkWidget *notebook;
GtkActionGroup *action_group;
GtkUIManager *ui_manager;
GtkWidget *vbox;
GtkWidget *menubar;
GtkAccelGroup *accel_group;
GError *error = NULL;
gchar *icon_file;
GOptionContext *context;
default_game = g_build_filename(get_pioneers_dir(), "default.game",
NULL);
/* Gtk+ handles the locale, we must bind the translations */
setlocale(LC_ALL, "");
bindtextdomain(PACKAGE, LOCALEDIR);
textdomain(PACKAGE);
bind_textdomain_codeset(PACKAGE, "UTF-8");
GtkOSXApplication *theApp = g_object_new(GTK_TYPE_OSX_APPLICATION, NULL);
context =
/* Long description in the command line: --help */
g_option_context_new(_("- Editor for games of Pioneers"));
g_option_context_add_main_entries(context, commandline_entries,
GETTEXT_PACKAGE);
g_option_context_add_group(context, gtk_get_option_group(TRUE));
g_option_context_parse(context, &argc, &argv, &error);
if (error != NULL) {
g_print("%s\n", error->message);
g_error_free(error);
return 1;
}
if (show_version) {
g_print(_("Pioneers version:"));
g_print(" ");
g_print(FULL_VERSION);
g_print("\n");
return 0;
}
if (filenames != NULL)
filename = g_strdup(filenames[0]);
else
filename = NULL;
toplevel = gtk_window_new(GTK_WINDOW_TOPLEVEL);
g_signal_connect(G_OBJECT(toplevel), "delete_event",
G_CALLBACK(exit_cb), NULL);
action_group = gtk_action_group_new("MenuActions");
gtk_action_group_set_translation_domain(action_group, PACKAGE);
gtk_action_group_add_actions(action_group, entries,
G_N_ELEMENTS(entries), toplevel);
ui_manager = gtk_ui_manager_new();
gtk_ui_manager_insert_action_group(ui_manager, action_group, 0);
accel_group = gtk_ui_manager_get_accel_group(ui_manager);
gtk_window_add_accel_group(GTK_WINDOW(toplevel), accel_group);
error = NULL;
if (!gtk_ui_manager_add_ui_from_string(ui_manager, ui_description,
-1, &error)) {
g_message(_("Building menus failed: %s"), error->message);
g_error_free(error);
return 1;
}
config_init("pioneers-editor");
icon_file =
g_build_filename(g_get_user_runtime_dir(), "pixmaps", MAINICON_FILE, NULL);
if (g_file_test(icon_file, G_FILE_TEST_EXISTS)) {
gtk_window_set_default_icon_from_file(icon_file, NULL);
} else {
/* Missing pixmap, main icon file */
g_warning("Pixmap not found: %s", icon_file);
}
g_free(icon_file);
themes_init();
colors_init();
notebook = gtk_notebook_new();
gtk_notebook_set_tab_pos(GTK_NOTEBOOK(notebook), GTK_POS_TOP);
gtk_notebook_append_page(GTK_NOTEBOOK(notebook), build_map(),
/* Tab page name */
gtk_label_new(_("Map")));
gtk_notebook_append_page(GTK_NOTEBOOK(notebook),
build_settings(GTK_WINDOW(toplevel)),
/* Tab page name */
gtk_label_new(_("Settings")));
terrain_menu = build_terrain_menu();
roll_menu = build_roll_menu();
port_menu = build_port_menu();
vbox = gtk_vbox_new(FALSE, 0);
gtk_container_add(GTK_CONTAINER(toplevel), vbox);
menubar = gtk_ui_manager_get_widget(ui_manager, "/MainMenu");
gtk_box_pack_start(GTK_BOX(vbox), menubar, FALSE, FALSE, 0);
gtk_box_pack_start(GTK_BOX(vbox), notebook, TRUE, TRUE, 0);
if (filename == NULL) {
filename =
config_get_string("editor/last-game", &default_used);
if (default_used
|| !g_file_test(filename, G_FILE_TEST_EXISTS)) {
g_free(filename);
filename = NULL;
}
}
load_game(filename, FALSE);
g_free(filename);
if (params == NULL)
return 1;
gtk_widget_show_all(toplevel);
gtk_accel_map_load(g_getenv("ACCEL_MAP"));
gtk_widget_hide (menubar);
gtk_osxapplication_set_menu_bar(theApp, GTK_MENU_SHELL(menubar));
gtk_osxapplication_ready(theApp);
gtk_main();
config_finish();
guimap_delete(gmap);
g_free(default_game);
g_option_context_free(context);
return 0;
}
void main_mac_osx ( int argc, char **argv )
{
#ifdef GTKOSXAPPLICATION
GtkWidget *vbox;
GtkWidget *menubar;
GdkPixbuf *pixbuf;
cmdline_options opt;
gboolean first_use = FALSE;
gint status = CMDLINE_SYNTAX_OK;
GtkOSXApplication *theApp;
devel_debug ("main_mac_osx");
#if IS_DEVELOPMENT_VERSION == 1
gsb_grisbi_print_environment_var ( );
#endif
gtk_init ( &argc, &argv );
/* initialisation libgoffice */
libgoffice_init ( );
/* Initialize plugins manager */
go_plugins_init (NULL, NULL, NULL, NULL, TRUE, GO_TYPE_PLUGIN_LOADER_MODULE);
/* init the app */
theApp = g_object_new ( GTK_TYPE_OSX_APPLICATION, NULL );
/* initialisation des différents répertoires */
gsb_dirs_init ( );
bindtextdomain ( PACKAGE, gsb_dirs_get_locale_dir ( ) );
bind_textdomain_codeset ( PACKAGE, "UTF-8" );
textdomain ( PACKAGE );
/* Setup locale/gettext */
setlocale (LC_ALL, "");
gsb_locale_init ( );
/* on commence par détourner le signal SIGSEGV */
gsb_grisbi_trappe_signal_sigsegv ( );
/* parse command line parameter, exit with correct error code when needed */
if ( !parse_options (argc, argv, &opt, &status ) )
exit ( status );
/* initialise les données de l'application */
first_use = gsb_grisbi_init_app ( );
vbox = gsb_main_create_main_window ( );
{
gboolean falseval = FALSE;
gboolean trueval = TRUE;
g_signal_connect ( theApp,
"NSApplicationDidBecomeActive",
G_CALLBACK ( grisbi_osx_app_active_cb ),
&trueval );
g_signal_connect ( theApp,
"NSApplicationWillResignActive",
G_CALLBACK ( grisbi_osx_app_active_cb ),
&falseval);
g_signal_connect ( theApp,
"NSApplicationBlockTermination",
G_CALLBACK ( gsb_main_grisbi_close ),
NULL);
g_signal_connect ( theApp,
"NSApplicationWillTerminate",
G_CALLBACK ( main_window_destroy_event ),
NULL );
}
menubar = gsb_grisbi_create_main_menu ( vbox );
grisbi_osx_init_menus ( main_window, menubar );
main_window_set_size_and_position ( );
gtk_widget_show ( run.window );
#if IS_DEVELOPMENT_VERSION == 1
dialog_message ( "development-version", VERSION );
#endif
gsb_grisbi_load_file_if_necessary ( &opt );
if ( first_use && !nom_fichier_comptes )
gsb_assistant_first_run ();
else
display_tip ( FALSE );
if ( quartz_application_get_bundle_id ( ) == NULL )
{
pixbuf = gdk_pixbuf_new_from_file ( g_build_filename
(gsb_dirs_get_pixmaps_dir ( ), "grisbi-logo.png", NULL), NULL );
if ( pixbuf )
gtk_osxapplication_set_dock_icon_pixbuf ( theApp, pixbuf );
}
gtk_osxapplication_set_use_quartz_accelerators ( theApp, TRUE );
gtk_osxapplication_ready ( theApp );
gtk_main ();
/* sauvegarde les raccourcis claviers */
gtk_accel_map_save ( gsb_dirs_get_accelerator_filename () );
g_object_unref ( theApp );
gsb_locale_shutdown ( );
gsb_dirs_shutdown ( );
/* liberation libgoffice */
libgoffice_shutdown ( );
#if GSB_GMEMPROFILE
g_mem_profile();
#endif
exit ( 0 );
#endif /* GTKOSXAPPLICATION */
}
