//
// test-browser.cxx -- test the NativeFileChooser widget
//
// Copyright 2004 by Greg Ercolano.
// FLTK2 port by Frederic Hoerni 2007.
//
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Library General Public
// License as published by the Free Software Foundation; either
// version 2 of the License, or (at your option) any later version.
//
// This library 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
// Library General Public License for more details.
//
// You should have received a copy of the GNU Library General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
// USA.
//
// Please keep code 80 column compliant.
//
//      10        20        30        40        50        60        70
//       |         |         |         |         |         |         |
// 4567890123456789012345678901234567890123456789012345678901234567890123456789
//
#include <fltk/run.h>
#include <fltk/Window.h>
#include <fltk/Widget.h>
#include <fltk/Button.h>
#include <fltk/Choice.h>
#include <fltk/Input.h>
#include <fltk/MultiLineInput.h>
#include <fltk/MultiLineOutput.h>
#include <fltk/ValueInput.h>
#include <fltk/MultiBrowser.h>
#include <fltk/NativeFileChooser.h>

#ifdef _WIN32
// WINDOWS //
#include <direct.h>
#define getcwd _getcwd
#define MAXPATHLEN MAX_PATH
#else
// UNIX //
#include <sys/param.h>
#include <unistd.h>
#include <stdlib.h>
#endif

// GLOBALS
fltk::NativeFileChooser *G_choo = NULL;
fltk::Browser             *G_type = NULL;
fltk::MultiBrowser        *G_options = NULL;
fltk::Input               *G_directory = NULL;
fltk::Input               *G_title = NULL;
fltk::Input               *G_preset_file = NULL;
fltk::MultiLineOutput     *G_result = NULL;
fltk::MultiLineInput      *G_filter = NULL;
fltk::ValueInput          *G_filter_value = NULL;

void Butt_CB(fltk::Widget*w, void*) {

    // TYPE OF CHOOSER
    switch ( G_type->value() ) {
	case 0: G_choo->type(fltk::NativeFileChooser::BROWSE_FILE);            break;
	case 1: G_choo->type(fltk::NativeFileChooser::BROWSE_DIRECTORY);       break;
	case 2: G_choo->type(fltk::NativeFileChooser::BROWSE_MULTI_FILE);      break;
	case 3: G_choo->type(fltk::NativeFileChooser::BROWSE_MULTI_DIRECTORY); break;
	case 4: G_choo->type(fltk::NativeFileChooser::BROWSE_SAVE_FILE);       break;
    }

    // OPTIONS
    {
	int flags = 0;
	if ( G_options->selected(0) ) flags |= fltk::NativeFileChooser::SAVEAS_CONFIRM;
	if ( G_options->selected(1) ) flags |= fltk::NativeFileChooser::NEW_FOLDER;
	if ( G_options->selected(2) ) flags |= fltk::NativeFileChooser::PREVIEW;
	G_choo->options(flags);
    }

    // DIRECTORY
    if ( G_directory->value()[0] ) {
	if ( strcmp(G_directory->value(), "NULL") == 0 ) {
	    G_choo->directory(NULL);
	} else {
	    G_choo->directory(G_directory->value());
	}
    } else {
	G_choo->directory(NULL);
    }

    // PRESET FILE
    if ( G_preset_file->value()[0] ) {
	if ( strcmp(G_preset_file->value(), "NULL") == 0 ) {
	    G_choo->preset_file(NULL);
	} else {
	    G_choo->preset_file(G_preset_file->value());
	}
    } else {
	G_choo->preset_file(NULL);
    }

    // TITLE
    if ( G_title->value()[0] ) {
	if ( strcmp(G_title->value(), "NULL") == 0 ) {
	    G_choo->title(NULL);
	} else {
	    G_choo->title(G_title->value());
	}
    } else {
	G_choo->title("");
    }

    // FILTERS
    if ( G_filter->value()[0] ) {
	if ( strcmp(G_filter->value(), "NULL") == 0 ) {
	    G_choo->filter(NULL);
	} else {
	    G_choo->filter(G_filter->value());
	}
    } else {
	G_choo->filter("");		// all files
    }

    G_choo->filter_value((int)G_filter_value->value());

    switch ( G_choo->show() ) {
	case -1:	// ERROR
	    fprintf(stderr, "*** ERROR show():%s\n", G_choo->errmsg());
	    break;

	case 1:		// CANCEL
	    fprintf(stderr, "*** CANCEL\n");
	    break;

	default:
	    break;
    }

    // UPDATE SETTINGS RETURNED BY CHOOSER INTO BROWSER

    // RESULT
    {
	int count = G_choo->count();
	int bytes = 0;
	if ( count > 0 ) {
	    int t;
	    for ( t=0; t<count; t++ ) {
	        bytes += strlen(G_choo->filename(t)) + 2;
		if ( count > 1 )
		    fprintf(stderr, "MULTI FILENAME RESULT %d) '%s'\n",
			t, G_choo->filename(t));
		else
		    fprintf(stderr, "FILENAME RESULT '%s'\n",
			G_choo->filename(t));
	    }
	    char *s = new char[bytes];
	    s[0] = '\0';
	    for ( t=0; t<count; t++ ) {
	        strcat(s, G_choo->filename(t));
		strcat(s, "\n");
	    }
	    G_result->value(s);
	    delete [] s;
	}
    }

    // FILTER VALUE
    G_filter_value->value(G_choo->filter_value());
    fprintf(stderr, "FILTER VALUE USED: %d\n", G_choo->filter_value());

    // PRESET FILE
    {
	const char *s = G_choo->preset_file();
	G_preset_file->value(s ? s : "NULL");
	fprintf(stderr, "    PRESET_FILE(): %s\n", G_choo->preset_file());
    }

    // DIRECTORY
    {
	const char *s = G_choo->directory();
	G_directory->value(s ? s : "NULL");
	fprintf(stderr, "      DIRECTORY(): %s\n", G_choo->directory());
    }

    fprintf(stderr, "\n");
}

int main() {
    char *start_filter =
      "Source Code\t*.{cxx,h,H,cpp}\n"\
      "Cxx Only\t*.cxx\n"\
      "Text\t*.{txt}\n"\
      "Makefiles\tMakefile*\n"\
      "All image files \t*.{BMP,CUT,DDS,GIF,ICO,IFF,LBM,JNG,JPG,JPEG,JPE,JIF,KOA,"
                          "MNG,PBM,PCD,PCX,PGM,PNG,PPM,PSD,RAS,TGA,TIF,TIFF,WBMP,"
                          "XBM,XPM}\n"\
      "Windows, OS/2 Bitmap (*.BMP)\n"\
      "Dr. Halo (*.CUT)\n"\
      "DirectDraw Surface (*.DDS)\t*.DDS\n"\
      "Graphic Interchange Format (*.GIF)\t*.GIF\n"\
      "Windows Icon (*.ICO)\t*.ICO\n"\
      "Amiga IFF (*.IFF;*.LBM)\t*.{IFF,LBM}\n"\
      "JBIG (*.JBIG)\t*.JBIG\n"\
      "JPEG Network Graphics (*.JNG)\t*.JNG\n"\
      "Independent JPEG Group (*.JPG;*.JPEG;*.JPE;*.JIF)\t*.{JPG,JIF,JPEG,JPE}\n"\
      "Commodore 64 Koala (*.KOA)\t*.KOA\n"\
      "Multiple Network Graphics (*.MNG)\t*.MNG\n"\
      "Portable Bitmap (*.PBM)\t*.PBM\n"\
      "Kodak PhotoCD (*.PCD)\t*.PCD\n"\
      "PC Paintbrush Bitmap (*.PCX)\t*.PCX\n"\
      "Portable Graymap (*.PGM)\t*.PGM\n"\
      "Portable Network Graphics (*.PNG)\t*.PNG\n"\
      "Portable Pixelmap (*.PPM)\t*.PPM\n"\
      "Photoshop Document (*.PSD)\t*.PSD\n"\
      "Sun Raster Graphic (*.RAS)\t*.RAS\n"\
      "Targa (*.TGA)\t*.TGA\n"\
      "Tagged Image File Format (*.TIF;*.TIFF)\t*.{TIF,TIFF}\n"\
      "Wireless Bitmap (*.WBMP)\t*.WBMP\n"\
      "X11 Bitmap (*.XBM)\t*.XBM\n"\
      "X11 Pixmap (*.XPM)\t*.XPM";

    char start_dir[MAXPATHLEN + 1];
    getcwd(start_dir, MAXPATHLEN);

    char start_file[MAXPATHLEN + 1];
    strcpy(start_file, "testfile");

    fltk::Window *win = new fltk::Window(600, 500);

    win->begin();
    {
	int y = 10;

	G_type = new fltk::Browser(10,y,180,120,"Type");
	G_type->add("Single File");
	G_type->add("Single Directory");
	G_type->add("Multi File");
	G_type->add("Multi Directory");
	G_type->add("Save File");
	G_type->textsize(12);
	G_type->value(0);
	G_type->tooltip("Type of browser to use");

	G_options = new fltk::MultiBrowser(win->w()-180-10,y,180,120,"Options");
	G_options->add("Show SaveAs Confirm");
	G_options->add("Show New Folder");
	G_options->add("Show Previews");
	G_options->tooltip("Platform specific options.\nSeveral can be selected.");
	G_options->textsize(12);
	
	y += G_type->h() + 10 + 20;

	G_title = new fltk::Input(80, y, win->w()-80-10, 25, "Title");
	G_title->value("Title Of Window");
	G_title->tooltip("Sets title of browser window\nSet this to 'NULL' for a NULL setting");
	y += G_title->h() + 5;

	G_directory = new fltk::Input(80, y, win->w()-80-10, 25, "Directory");
	G_directory->value(start_dir);
	G_directory->tooltip("Starting directory shown in browser\nSet this to 'NULL' for a NULL setting");
	y += G_directory->h() + 5;

	G_preset_file = new fltk::Input(80, y, win->w()-80-10, 25, "Preset File");
	G_preset_file->value(start_file);
	G_preset_file->tooltip("Default filename used for 'Save File' chooser\nSet this to 'NULL' for a NULL setting");
	y += G_preset_file->h() + 5;

	G_filter = new fltk::MultiLineInput(80, y, win->w()-80-10, 75, "Filter");
	G_filter->value(start_filter);
	G_filter->tooltip("Filter(s) to be available to user\n"
			      "Multiple filters should be specified on separate lines\n"
			      "Set this to 'NULL' for a NULL setting");
	y += G_filter->h() + 5;

	G_filter_value = new fltk::ValueInput(80, y, win->w()-80-10, 25, "Filter Value");
	G_filter_value->value(0);
	G_filter_value->tooltip("Index number of the filter to be applied when browser opens.");
	y += G_filter_value->h() + 5;

	G_result = new fltk::MultiLineOutput(80, y, win->w()-80-10, 100, "Result");
	G_result->color(51);

	fltk::Button *but = new fltk::Button(win->w()-80-10, win->h()-25-10, 80, 25, "Browser");
	but->callback(Butt_CB);
	y += but->h() + 10;

	G_choo = new fltk::NativeFileChooser();
	G_choo->type(fltk::NativeFileChooser::BROWSE_FILE);
    }
    win->end();
    win->resizable(win);
    win->show();
    return(fltk::run());
}