X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata%2Fsettings.c;h=b14fb618f3a235addab2a140270dae0a7149f0aa;hb=29956ba4326b9d6a2bc4d22a9f323902c7a08d43;hp=5f769a5222083cb21a4a9e5731d23740e2680145;hpb=6d8462bae6c13a723c63da24ed7db2549efd4cc1;p=pspp-builds.git
diff --git a/src/data/settings.c b/src/data/settings.c
index 5f769a52..b14fb618 100644
--- a/src/data/settings.c
+++ b/src/data/settings.c
@@ -1,20 +1,18 @@
-/* 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 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 "settings.h"
@@ -26,13 +24,23 @@
#include "xalloc.h"
#include
+#include "error.h"
+
+#ifdef HAVE_LIBNCURSES
+#include
+#include
+#endif
+
+#include "gettext.h"
+#define _(msgid) gettext (msgid)
+
static int viewlength = 24;
static int viewwidth = 79;
static bool long_view = false;
static bool safer_mode = false;
-static bool echo = false;
+static bool do_echo = false;
static bool include = true;
static int epoch = -1;
@@ -95,7 +103,7 @@ get_viewlength (void)
/* Sets the view length. */
void
-set_viewlength (int viewlength_)
+set_viewlength (int viewlength_)
{
viewlength = viewlength_;
}
@@ -118,12 +126,12 @@ get_viewwidth(void)
/* Sets the screen width. */
void
-set_viewwidth (int viewwidth_)
+set_viewwidth (int viewwidth_)
{
viewwidth = viewwidth_;
}
-#if HAVE_LIBTERMCAP
+#if HAVE_LIBNCURSES
static void
get_termcap_viewport (void)
{
@@ -132,7 +140,8 @@ get_termcap_viewport (void)
return;
else if (tgetent (term_buffer, getenv ("TERM")) <= 0)
{
- msg (IE, _("Could not access definition for terminal `%s'."), termtype);
+ error (0,0, _("could not access definition for terminal `%s'"),
+ getenv ("TERM"));
return;
}
@@ -142,19 +151,19 @@ get_termcap_viewport (void)
if (tgetnum ("co") > 1)
viewwidth = tgetnum ("co") - 1;
}
-#endif /* HAVE_LIBTERMCAP */
+#endif /* HAVE_LIBNCURSES */
-static void
+static void
init_viewport (void)
{
if (long_view)
return;
-
+
viewwidth = viewlength = -1;
-#if HAVE_LIBTERMCAP
+#if HAVE_LIBNCURSES
get_termcap_viewport ();
-#endif /* HAVE_LIBTERMCAP */
+#endif /* HAVE_LIBNCURSES */
if (viewwidth < 0 && getenv ("COLUMNS") != NULL)
viewwidth = atoi (getenv ("COLUMNS"));
@@ -185,14 +194,14 @@ set_safer_mode (void)
bool
get_echo (void)
{
- return echo;
+ return do_echo;
}
/* Set echo. */
void
-set_echo (bool echo_)
+set_echo (bool echo_)
{
- echo = echo_;
+ do_echo = echo_;
}
/* If echo is on, whether commands from include files are echoed. */
@@ -204,16 +213,16 @@ get_include (void)
/* Set include file echo. */
void
-set_include (bool include_)
+set_include (bool include_)
{
include = include_;
}
/* What year to use as the start of the epoch. */
int
-get_epoch (void)
+get_epoch (void)
{
- if (epoch < 0)
+ if (epoch < 0)
{
time_t t = time (0);
struct tm *tm = localtime (&t);
@@ -225,7 +234,7 @@ get_epoch (void)
/* Sets the year that starts the epoch. */
void
-set_epoch (int epoch_)
+set_epoch (int epoch_)
{
epoch = epoch_;
}
@@ -239,14 +248,14 @@ get_errorbreak (void)
/* Sets whether an error stops execution. */
void
-set_errorbreak (bool errorbreak_)
+set_errorbreak (bool errorbreak_)
{
errorbreak = errorbreak_;
}
/* Route error messages to terminal? */
bool
-get_error_routing_to_terminal (void)
+get_error_routing_to_terminal (void)
{
return route_errors_to_terminal;
}
@@ -254,14 +263,14 @@ get_error_routing_to_terminal (void)
/* Sets whether error messages should be routed to the
terminal. */
void
-set_error_routing_to_terminal (bool route_to_terminal)
+set_error_routing_to_terminal (bool route_to_terminal)
{
route_errors_to_terminal = route_to_terminal;
}
/* Route error messages to listing file? */
bool
-get_error_routing_to_listing (void)
+get_error_routing_to_listing (void)
{
return route_errors_to_listing;
}
@@ -269,13 +278,13 @@ get_error_routing_to_listing (void)
/* Sets whether error messages should be routed to the
listing file. */
void
-set_error_routing_to_listing (bool route_to_listing)
+set_error_routing_to_listing (bool route_to_listing)
{
route_errors_to_listing = route_to_listing;
}
/* Compress system files by default? */
-bool
+bool
get_scompression (void)
{
return scompress;
@@ -283,7 +292,7 @@ get_scompression (void)
/* Set system file default compression. */
void
-set_scompression (bool scompress_)
+set_scompression (bool scompress_)
{
scompress = scompress_;
}
@@ -297,7 +306,7 @@ get_undefined (void)
/* Set whether to warn on undefined values. */
void
-set_undefined (bool undefined_)
+set_undefined (bool undefined_)
{
undefined = undefined_;
}
@@ -312,7 +321,7 @@ get_blanks (void)
/* Set the value that blank numeric fields are set to when read
in. */
void
-set_blanks (double blanks_)
+set_blanks (double blanks_)
{
blanks = blanks_;
}
@@ -320,13 +329,13 @@ set_blanks (double blanks_)
/* Maximum number of warnings + errors. */
int
get_mxwarns (void)
-{
+{
return mxwarns;
}
/* Sets maximum number of warnings + errors. */
void
-set_mxwarns (int mxwarns_)
+set_mxwarns (int mxwarns_)
{
mxwarns = mxwarns_;
}
@@ -340,7 +349,7 @@ get_mxerrs (void)
/* Sets maximum number of errors. */
void
-set_mxerrs (int mxerrs_)
+set_mxerrs (int mxerrs_)
{
mxerrs = mxerrs_;
}
@@ -354,7 +363,7 @@ get_printback (void)
/* Sets whether commands are written to the display. */
void
-set_printback (bool printback_)
+set_printback (bool printback_)
{
printback = printback_;
}
@@ -370,7 +379,7 @@ get_mprint (void)
/* Sets whether the commands generated by macro invocations are
displayed. */
void
-set_mprint (bool mprint_)
+set_mprint (bool mprint_)
{
mprint = mprint_;
}
@@ -384,7 +393,7 @@ get_mxloops (void)
/* Set implied limit of unbounded loop. */
void
-set_mxloops (int mxloops_)
+set_mxloops (int mxloops_)
{
mxloops = mxloops_;
}
@@ -412,7 +421,7 @@ get_endcmd (void)
/* Set the character used to terminate commands. */
void
-set_endcmd (char endcmd_)
+set_endcmd (char endcmd_)
{
endcmd = endcmd_;
}
@@ -428,7 +437,7 @@ get_workspace (void)
/* Approximate maximum number of cases to allocate in-core, given
that each case contains VALUE_CNT values. */
size_t
-get_workspace_cases (size_t value_cnt)
+get_workspace_cases (size_t value_cnt)
{
size_t case_size = sizeof (union value) * value_cnt + 4 * sizeof (void *);
size_t case_cnt = MAX (get_workspace () / case_size, 4);
@@ -439,7 +448,7 @@ get_workspace_cases (size_t value_cnt)
bytes. */
void
-set_workspace (size_t workspace_)
+set_workspace (size_t workspace_)
{
workspace = workspace_;
}
@@ -448,14 +457,14 @@ set_workspace (size_t workspace_)
DATA LIST {FREE,LIST}. */
const struct fmt_spec *
get_format (void)
-{
+{
return &default_format;
}
/* Set default format for variables created by transformations
and by DATA LIST {FREE,LIST}. */
void
-set_format (const struct fmt_spec *default_format_)
+set_format (const struct fmt_spec *default_format_)
{
default_format = *default_format_;
}
@@ -463,14 +472,14 @@ set_format (const struct fmt_spec *default_format_)
/* Are we in testing mode? (e.g. --testing-mode command line
option) */
bool
-get_testing_mode (void)
+get_testing_mode (void)
{
return testing_mode;
}
/* Set testing mode. */
void
-set_testing_mode (bool testing_mode_)
+set_testing_mode (bool testing_mode_)
{
testing_mode = testing_mode_;
}
@@ -483,17 +492,17 @@ get_algorithm (void)
}
/* Set the algorithm option globally. */
-void
+void
set_algorithm (enum behavior_mode mode)
{
global_algorithm = mode;
}
/* Set the algorithm option for this command only */
-void
+void
set_cmd_algorithm (enum behavior_mode mode)
{
- cmd_algorithm = mode;
+ cmd_algorithm = mode;
algorithm = &cmd_algorithm;
}
@@ -512,7 +521,7 @@ get_syntax (void)
}
/* Set the syntax option */
-void
+void
set_syntax (enum behavior_mode mode)
{
syntax = mode;