X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fgui%2Fpsppire.c;fp=src%2Fui%2Fgui%2Fpsppire.c;h=2918238c419b2c23173edfad68b2a5d28aa75847;hb=a1efcf97ca2f75f4be6a0389ff2372c03ed2d4e1;hp=974d18b7e0d70f9cff244fbff3d5ee600ab126ba;hpb=056009fe999768b37cba5e12e9fef9901c856d6a;p=pspp-builds.git diff --git a/src/ui/gui/psppire.c b/src/ui/gui/psppire.c index 974d18b7..2918238c 100644 --- a/src/ui/gui/psppire.c +++ b/src/ui/gui/psppire.c @@ -20,12 +20,16 @@ #include #include #include +#include +#include +#include #include "relocatable.h" #include "data-editor.h" #include "psppire.h" +#include #include #include #include @@ -38,6 +42,7 @@ #include #include #include +#include #include #include @@ -46,9 +51,15 @@ #include "psppire-data-store.h" #include "helper.h" #include "message-dialog.h" +#include #include "output-viewer.h" +#include +#include + +#include + PsppireDataStore *the_data_store = 0; PsppireVarStore *the_var_store = 0; @@ -61,17 +72,14 @@ struct dataset * the_dataset = NULL; static void replace_casereader (struct casereader *s) { - PsppireCaseFile *pcf = psppire_case_file_new (s); - - psppire_data_store_set_case_file (the_data_store, pcf); + psppire_data_store_set_reader (the_data_store, s); } #define _(msgid) gettext (msgid) #define N_(msgid) msgid - void -initialize (void) +initialize (struct command_line_processor *clp, int argc, char **argv) { PsppireDict *dictionary = 0; @@ -109,6 +117,8 @@ initialize (void) the_data_store = psppire_data_store_new (dictionary); replace_casereader (NULL); + + create_icon_factory (); { @@ -134,7 +144,17 @@ initialize (void) journal_enable (); textdomain (PACKAGE); + /* Ignore alarm clock signals */ + signal (SIGALRM, SIG_IGN); + + command_line_processor_replace_aux (clp, &post_init_argp, the_source_stream); + command_line_processor_replace_aux (clp, &non_option_argp, the_source_stream); + + command_line_processor_parse (clp, argc, argv); + new_data_window (NULL, NULL); + + execute_syntax (create_syntax_string_source ("")); } @@ -209,11 +229,11 @@ create_icon_factory (void) gtk_stock_add (items, 2); - gtk_icon_factory_add (factory, "pspp-stock-reset", + gtk_icon_factory_add (factory, "pspp-stock-reset", gtk_icon_factory_lookup_default (GTK_STOCK_REFRESH) ); - gtk_icon_factory_add (factory, "pspp-stock-select", + gtk_icon_factory_add (factory, "pspp-stock-select", gtk_icon_factory_lookup_default (GTK_STOCK_INDEX) ); } @@ -221,3 +241,64 @@ create_icon_factory (void) gtk_icon_factory_add_default (factory); } + + +static error_t +parse_non_options (int key, char *arg, struct argp_state *state) +{ + struct source_stream *ss = state->input; + + if ( NULL == ss ) + return 0; + + switch (key) + { + case ARGP_KEY_ARG: + { + struct string syntax; + FILE *fp = fopen (arg, "r"); + if (NULL == fp) + { + const int errnum = errno; + fprintf (state->err_stream, _("Cannot open %s: %s.\n"), + arg, strerror (errnum)); + return 0; + } + if ( sfm_detect (fp)) + { + ds_init_cstr (&syntax, "GET FILE="); + goto close; + } + rewind (fp); + if (pfm_detect (fp)) + { + ds_init_cstr (&syntax, "IMPORT FILE="); + goto close; + } + + fclose (fp); + msg (ME, _("%s is neither a system nor portable file"), arg); + break; + + close: + fclose (fp); + + syntax_gen_string (&syntax, ss_cstr (arg)); + ds_put_cstr (&syntax, "."); + + getl_append_source (ss, + create_syntax_string_source (ds_cstr (&syntax)), + GETL_BATCH, + ERRMODE_CONTINUE); + + ds_destroy (&syntax); + break; + } + default: + return ARGP_ERR_UNKNOWN; + } + return 0; +} + + +const struct argp non_option_argp = {NULL, parse_non_options, 0, 0, 0, 0, 0};