X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fterminal%2Fmain.c;h=8acbdc2dde79d7bd1a8a97be24da76523bf0f928;hb=4d70434db549461d1391db27a165f36be5a39378;hp=b95ae2e3a2662675ec299c27d8f8f98dd6cbc6a5;hpb=732b6a86124e89e24d685ed785d2df55728eb01b;p=pspp-builds.git diff --git a/src/ui/terminal/main.c b/src/ui/terminal/main.c index b95ae2e3..8acbdc2d 100644 --- a/src/ui/terminal/main.c +++ b/src/ui/terminal/main.c @@ -1,38 +1,39 @@ -/* PSPP - computes sample statistics. - Copyright (C) 1997-9, 2000, 2006 Free Software Foundation, Inc. +/* PSPP - a program for statistical analysis. + Copyright (C) 1997-9, 2000, 2006, 2007, 2009 Free Software Foundation, Inc. - 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 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 3 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. + 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. You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA - 02110-1301, USA. */ + along with this program. If not, see . */ #include +#include #include #include +#include +#if HAVE_FPU_CONTROL_H +#include +#endif +#if HAVE_FENV_H +#include +#endif +#if HAVE_IEEEFP_H +#include +#endif -#include -#include "command-line.h" -#include "msg-ui.h" -#include "progname.h" -#include "read-line.h" - -#include #include #include #include #include -#include #include #include #include @@ -45,31 +46,23 @@ #include #include #include +#include +#include +#include +#include +#include -#if HAVE_FPU_CONTROL_H -#include -#endif - -#if HAVE_LOCALE_H -#include -#endif - -#if HAVE_FENV_H -#include -#endif - -#if HAVE_IEEEFP_H -#include -#endif +#include "fatal-signal.h" +#include "progname.h" +#include "relocatable.h" #include "gettext.h" #define _(msgid) gettext (msgid) -#include static void i18n_init (void); static void fpu_init (void); -static void terminate (bool success) NO_RETURN; +static void clean_up (void); /* If a segfault happens, issue a message to that effect and halt */ void bug_handler(int sig); @@ -81,24 +74,23 @@ static struct dataset * the_dataset = NULL; static struct lexer *the_lexer; static struct source_stream *the_source_stream ; - /* Program entry point. */ int main (int argc, char **argv) { - struct casefile_factory *factory; + int *view_width_p, *view_length_p; + + set_program_name (argv[0]); + signal (SIGABRT, bug_handler); signal (SIGSEGV, bug_handler); signal (SIGFPE, bug_handler); - signal (SIGINT, interrupt_handler); - - set_program_name (argv[0]); + at_fatal_signal (clean_up); i18n_init (); fpu_init (); gsl_set_error_handler_off (); - fmt_init (); outp_init (); fn_init (); fh_init (); @@ -108,17 +100,23 @@ main (int argc, char **argv) ); prompt_init (); readln_initialize (); - settings_init (); + terminal_init (&view_width_p, &view_length_p); + settings_init (view_width_p, view_length_p); random_init (); - factory = fastfile_factory_create (); - - the_dataset = create_dataset (factory, NULL, NULL); + the_dataset = create_dataset (); if (parse_command_line (argc, argv, the_source_stream)) { msg_ui_init (the_source_stream); - outp_read_devices (); + if (!settings_get_testing_mode ()) + outp_read_devices (); + else + outp_configure_driver_line ( + ss_cstr ("raw-ascii:ascii:listing:width=9999 length=9999 " + "output-file=\"pspp.list\" emphasis=none " + "headers=off paginate=off squeeze=on " + "top-margin=0 bottom-margin=0")); the_lexer = lex_create (the_source_stream); for (;;) @@ -132,31 +130,34 @@ main (int argc, char **argv) { msg (SE, _("Stopping syntax file processing here to avoid " "a cascade of dependent command failures.")); - getl_abort_noninteractive (the_source_stream); + getl_abort_noninteractive (the_source_stream); } else check_msg_count (the_source_stream); } } - terminate (!any_errors ()); + clean_up (); + return any_errors (); } static void -i18n_init (void) +i18n_init (void) { #if ENABLE_NLS #if HAVE_LC_MESSAGES setlocale (LC_MESSAGES, ""); #endif - setlocale (LC_MONETARY, ""); - bindtextdomain (PACKAGE, locale_dir); +#if HAVE_LC_PAPER + setlocale (LC_PAPER, ""); +#endif + bindtextdomain (PACKAGE, relocate (locale_dir)); textdomain (PACKAGE); #endif /* ENABLE_NLS */ } static void -fpu_init (void) +fpu_init (void) { #if HAVE_FEHOLDEXCEPT fenv_t foo; @@ -169,13 +170,13 @@ fpu_init (void) } /* If a segfault happens, issue a message to that effect and halt */ -void +void bug_handler(int sig) { #if DEBUGGING connect_debugger (); #endif - switch (sig) + switch (sig) { case SIGABRT: request_bug_report_and_abort("Assertion Failure/Abort"); @@ -188,20 +189,12 @@ bug_handler(int sig) } } -void -interrupt_handler(int sig UNUSED) -{ - terminate (false); -} - - -/* Terminate PSPP. SUCCESS should be true to exit successfully, - false to exit as a failure. */ +/* Clean up PSPP in preparation for termination. */ static void -terminate (bool success) +clean_up (void) { static bool terminating = false; - if (!terminating) + if (!terminating) { terminating = true; @@ -214,10 +207,7 @@ terminate (bool success) destroy_source_stream (the_source_stream); prompt_done (); readln_uninitialize (); - outp_done (); msg_ui_done (); - fmt_done (); } - exit (success ? EXIT_SUCCESS : EXIT_FAILURE); }