/**

  * $Id$

  *

  * Creates and manages the GD-Rom attachment menu.

  *

  * Copyright (c) 2005 Nathan Keynes.

  *

  * This program is free software; you can redistribute it and/or modify

  * it under the terms of the GNU General Public License as published by

  * the Free Software Foundation; either version 2 of the License, or

  * (at your option) any later version.

  *

  * This program is distributed in the hope that it will be useful,

  * but WITHOUT ANY WARRANTY; without even the implied warranty of

  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

  * GNU General Public License for more details.

  */

 #include <assert.h>

 #include <libgen.h>

 #include <glib/gi18n.h>

 #include "dream.h"

 #include "dreamcast.h"

 #include "config.h"

 #include "gdrom/gdrom.h"

 #include "gtkui/gtkui.h"

 #define MAX_RECENT_ITEMS 5

 static GList *gdrom_menu_list = NULL;

 static gboolean gdrom_menu_adjusting = FALSE;

 static GList *gdrom_device_list = NULL;

 static GList *gdrom_recent_list = NULL;

 void gdrom_menu_rebuild_all();

 gint gdrom_menu_find_item( const gchar *name )

 {

     gint posn = 0;

     GList *ptr;

     for( ptr = gdrom_device_list; ptr != NULL; ptr = g_list_next(ptr) ) {

 	gchar *device = (gchar *)ptr->data;

 	posn++;

 	if( strcmp(device, name) == 0 ) {

 	    return posn;

 	}

     }

     posn++;

     for( ptr = gdrom_recent_list; ptr != NULL; ptr = g_list_next(ptr) ) {

 	gchar *file = (gchar *)ptr->data;

 	posn++;

 	if( strcmp(file, name) == 0 ) {

 	    return posn;

 	}

     }

     return -1;

 }

 gint gdrom_menu_add_recent_item( const gchar *name )

 {

     gdrom_recent_list = g_list_prepend( gdrom_recent_list, g_strdup(name) );

     if( g_list_length(gdrom_recent_list) > MAX_RECENT_ITEMS ) {

 	GList *ptr = g_list_nth( gdrom_recent_list, MAX_RECENT_ITEMS );

 	g_free( ptr->data );

 	gdrom_recent_list = g_list_remove( gdrom_recent_list, ptr->data );

     }

     GList *ptr;

     int size = 0;

     for( ptr = gdrom_recent_list; ptr != NULL; ptr = g_list_next(ptr) ) {

 	size += strlen( (gchar *)ptr->data ) + 1;

     }

     char buf[size];

     strcpy( buf, (gchar *)gdrom_recent_list->data );

     ptr = g_list_next(gdrom_recent_list);

     while( ptr != NULL ) {

 	strcat( buf, ":" );

 	strcat( buf, (gchar *)ptr->data );

 	ptr = g_list_next(ptr);

     }

     lxdream_set_global_config_value( CONFIG_RECENT, buf );

     lxdream_save_config();

     return g_list_length( gdrom_device_list ) + 2; // menu posn of new item

 }

 void gdrom_menu_update_all()

 {

     const gchar *disc_name = gdrom_get_current_disc_name();

     gint posn = 0;

     GList *ptr;

     gdrom_menu_adjusting = TRUE;

     if( disc_name != NULL ) {

         posn = gdrom_menu_find_item( disc_name );

         if( posn == -1 ) {

             posn = gdrom_menu_add_recent_item( disc_name );

             gdrom_menu_rebuild_all();

         }

     }

     for( ptr = gdrom_menu_list; ptr != NULL; ptr = g_list_next(ptr) ) {

         GtkWidget *menu = GTK_WIDGET(ptr->data);

         GList *children = gtk_container_get_children( GTK_CONTAINER(menu) );

         GList *item = g_list_nth( children, posn );

         assert( item != NULL );

         gtk_check_menu_item_set_active( GTK_CHECK_MENU_ITEM(item->data), TRUE );

         g_list_free(children);

     }    

     gdrom_menu_adjusting = FALSE;

 }

 void gdrom_menu_empty_callback( GtkWidget *widget, gpointer user_data )

 {

     if( !gdrom_menu_adjusting ) {

         gdrom_unmount_disc();

         lxdream_set_global_config_value( CONFIG_GDROM, NULL );

         lxdream_save_config();

     }

 }

 void gdrom_menu_disc_changed( gdrom_disc_t disc, const gchar *name, void *user_data )

 {

     if( !gdrom_menu_adjusting ) {

         gdrom_menu_update_all();

     }

 }

 gboolean gdrom_menu_open_file( const char *filename )

 {

     gboolean result = FALSE;

     if( filename != NULL ) {

         result = gdrom_mount_image(filename);

     }

     if( result ) {

         lxdream_set_global_config_value( CONFIG_GDROM, filename );

         lxdream_save_config();

     }

     return result;

 }

 void gdrom_menu_open_image_callback( GtkWidget *widget, gpointer user_data )

 {

     if( !gdrom_menu_adjusting ) {

         const gchar *dir = lxdream_get_config_value(CONFIG_DEFAULT_PATH);

         open_file_dialog( _("Open..."), gdrom_menu_open_file, NULL, NULL, dir );

     }

 }

 void gdrom_menu_open_specified_callback( GtkWidget *widget, gpointer user_data )

 {

     if( !gdrom_menu_adjusting ) {

 	gdrom_menu_open_file( (gchar *)user_data );

     }

 }

 void gdrom_menu_build( GtkWidget *menu ) 

 {

     GSList *group = NULL;

     GtkWidget *empty = gtk_radio_menu_item_new_with_label( group, _("Empty") );

     group = gtk_radio_menu_item_get_group( GTK_RADIO_MENU_ITEM(empty) );

     g_signal_connect_after( empty, "activate", G_CALLBACK(gdrom_menu_empty_callback), NULL );

     gtk_menu_shell_append( GTK_MENU_SHELL(menu), empty );

     GList *ptr;

     for( ptr = gdrom_device_list; ptr != NULL; ptr = g_list_next(ptr) ) {

 	gchar *name = (gchar *)ptr->data;

 	GtkWidget *item = gtk_radio_menu_item_new_with_label( group, name);

 	gtk_widget_set_name( item, name );

 	group = gtk_radio_menu_item_get_group( GTK_RADIO_MENU_ITEM(item) );

 	g_signal_connect_after( item, "activate", G_CALLBACK(gdrom_menu_open_specified_callback),

 			  name );

 	gtk_menu_shell_append( GTK_MENU_SHELL(menu), item );

     }

     if( gdrom_recent_list != NULL ) {

 	gtk_menu_shell_append( GTK_MENU_SHELL(menu), gtk_separator_menu_item_new() );

 	for( ptr = gdrom_recent_list; ptr != NULL; ptr = g_list_next(ptr) ) {

 	    gchar *path = (gchar *)ptr->data;

 	    gchar *name = basename(path);

 	    GtkWidget *item = gtk_radio_menu_item_new_with_label( group, name );

 	    gtk_widget_set_name( item, path );

 	    group = gtk_radio_menu_item_get_group( GTK_RADIO_MENU_ITEM(item) );

 	    g_signal_connect_after( item, "activate", G_CALLBACK(gdrom_menu_open_specified_callback),

 				    path );

 	    gtk_menu_shell_append( GTK_MENU_SHELL(menu), item );

 	}

     }

     gtk_menu_shell_append( GTK_MENU_SHELL(menu), gtk_separator_menu_item_new() );

     GtkWidget *open = gtk_image_menu_item_new_with_label( _("Open image file...") );

     g_signal_connect_after( open, "activate", G_CALLBACK(gdrom_menu_open_image_callback), NULL );

     gtk_menu_shell_append( GTK_MENU_SHELL(menu), open );

     gtk_widget_show_all(menu);

 }

 GtkWidget *gdrom_menu_new()

 {

     GtkWidget *menu = gtk_menu_new();

     gtk_menu_set_title( GTK_MENU(menu), _("GD-Rom Settings") );

     gdrom_menu_build(menu);

     gdrom_menu_list = g_list_append(gdrom_menu_list, menu);

     gtk_widget_show_all(menu);

     gdrom_menu_update_all();

     return menu;

 }

 void gdrom_menu_rebuild_all()

 {

     GList *ptr;

     for( ptr = gdrom_menu_list; ptr != NULL; ptr = g_list_next(ptr) ) {

 	GtkWidget *menu = GTK_WIDGET(ptr->data);

 	GList *children = gtk_container_get_children( GTK_CONTAINER(menu) );

 	GList *listptr;

 	for( listptr = children; listptr != NULL; listptr = g_list_next(listptr) ) {

 	    gtk_widget_destroy( GTK_WIDGET(listptr->data) );

 	}

 	g_list_free(children);

 	gdrom_menu_build(menu);

     }

     gdrom_menu_update_all();

 }

 void gdrom_menu_init()

 {

     const gchar *recent = lxdream_get_config_value( CONFIG_RECENT );

     register_gdrom_disc_change_hook( gdrom_menu_disc_changed, NULL );

     gdrom_device_list = gdrom_get_native_devices();

     if( recent != NULL ) {

 	gchar **list = g_strsplit(recent, ":", 5);

 	int i;

 	for( i=0; list[i] != NULL; i++ ) {

 	    gdrom_recent_list = g_list_append( gdrom_recent_list, g_strdup(list[i]) );

 	}

 	g_strfreev(list);

     }

 }