/* delete.c */



#include <unistd.h>
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <gtk/gtk.h>


/* Delete */
typedef struct _Delete
{
	GtkWidget * window;
	GtkWidget * label;
	GtkWidget * progress;
	int filec;
	char ** filev;
	int cur;
	int err_cnt;
} Delete;
/* callbacks */
static void _delete_on_closex(GtkWidget * widget, GdkEvent * event,
		gpointer data);
static gboolean _delete_idle(gpointer data);
static int _delete(int filec, char * filev[])
{
	static Delete delete;
	GtkWidget * vbox;
	GtkWidget * hbox;
	GtkWidget * widget;
	char buf[256];

	delete.filec = filec;
	delete.filev = filev;
	delete.cur = 0;
	delete.err_cnt = 0;
	delete.window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
	gtk_window_set_title(GTK_WINDOW(delete.window), "Delete file(s)");
	g_signal_connect(G_OBJECT(delete.window), "delete_event", G_CALLBACK(
			_delete_on_closex), NULL);
	vbox = gtk_vbox_new(FALSE, 4);
	snprintf(buf, sizeof(buf), "Deleting file: %s", filev[0]);
	delete.label = gtk_label_new(buf);
	gtk_box_pack_start(GTK_BOX(vbox), delete.label, TRUE, TRUE, 4);
	delete.progress = gtk_progress_bar_new();
	snprintf(buf, sizeof(buf), "File 1 of %u", filec);
	gtk_progress_bar_set_text(GTK_PROGRESS_BAR(delete.progress), buf);
	gtk_box_pack_start(GTK_BOX(vbox), delete.progress, TRUE, TRUE, 4);
	hbox = gtk_hbox_new(FALSE, 4);
	widget = gtk_button_new_from_stock(GTK_STOCK_CANCEL);
	gtk_box_pack_end(GTK_BOX(hbox), widget, FALSE, FALSE, 4);
	gtk_box_pack_start(GTK_BOX(vbox), hbox, TRUE, TRUE, 4);
	gtk_container_set_border_width(GTK_CONTAINER(delete.window), 4);
	gtk_container_add(GTK_CONTAINER(delete.window), vbox);
	g_idle_add(_delete_idle, &delete);
	gtk_widget_show_all(delete.window);
	return 0;
}

static void _delete_on_closex(GtkWidget * widget, GdkEvent * event,
		gpointer data)
{
	gtk_main_quit();
}

static void _idle_on_error_close(GtkDialog * dialog, gint arg, gpointer data);
static gboolean _delete_idle(gpointer data)
{
	Delete * delete = (Delete*)data;
	GtkWidget * dialog;
	char buf[256];

	if(unlink(delete->filev[delete->cur++]) != 0)
	{
		delete->err_cnt++;
		dialog = gtk_message_dialog_new(GTK_WINDOW(delete->window),
				GTK_DIALOG_MODAL, GTK_MESSAGE_ERROR,
				GTK_BUTTONS_OK, "%s: %s",
				delete->filev[delete->cur-1], strerror(errno));
		g_signal_connect(dialog, "response", G_CALLBACK(
					_idle_on_error_close), delete);
		gtk_widget_show(dialog);
	}
	if(delete->cur == delete->filec)
	{
		if(delete->err_cnt == 0)
			gtk_main_quit();
		return FALSE;
	}
	snprintf(buf, sizeof(buf), "Deleting file: %s",
			delete->filev[delete->cur]);
	gtk_label_set_text(GTK_LABEL(delete->label), buf);
	snprintf(buf, sizeof(buf), "File %u of %u", delete->cur+1,
			delete->filec);
	gtk_progress_bar_set_text(GTK_PROGRESS_BAR(delete->progress), buf);
	return TRUE;
}

static void _idle_on_error_close(GtkDialog * dialog, gint arg, gpointer data)
{
	Delete * delete = data;

	gtk_widget_destroy(GTK_WIDGET(dialog));
	delete->err_cnt--;
	if(delete->cur != delete->filec)
		return;
	if(delete->err_cnt == 0)
		gtk_main_quit();
}


/* usage */
static int _usage(void)
{
	fprintf(stderr, "%s", "Usage: delete file...\n");
	return 1;
}


/* main */
int main(int argc, char * argv[])
{
	int o;

	while((o = getopt(argc, argv, "")) != -1)
		switch(o)
		{
			default:
				return _usage();
		}
	if(optind == argc)
		return _usage();
	gtk_init(&argc, &argv);
	_delete(argc - optind, &argv[optind]);
	gtk_main();
	return 0;
}