X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata%2Fsettings.c;h=ec026d4cbe7d883a9a1647492bc151f6e998de4f;hb=0655c32db3a849462fbcebd73d8c659d814e794d;hp=b98a1351ac0eee0855222b9c341c1f04ec0da54f;hpb=215d1d014dbbf25c74c40ffd1155bc83cc752aaa;p=pspp-builds.git diff --git a/src/data/settings.c b/src/data/settings.c index b98a1351..ec026d4c 100644 --- a/src/data/settings.c +++ b/src/data/settings.c @@ -15,26 +15,27 @@ along with this program. If not, see . */ #include -#include "settings.h" + +#include "data/settings.h" + #include #include #include -#include "format.h" -#include "value.h" -#include "xalloc.h" -#include -#include -#include -#include -#include "error.h" -#include "minmax.h" +#include "data/case.h" +#include "data/format.h" +#include "data/value.h" +#include "libpspp/i18n.h" +#include "libpspp/integer-format.h" +#include "libpspp/message.h" + +#include "gl/error.h" +#include "gl/minmax.h" +#include "gl/xalloc.h" #include "gettext.h" #define _(msgid) gettext (msgid) -static int global_algorithm = ENHANCED; - struct settings { /* Integer format used for IB and PIB input. */ @@ -49,8 +50,8 @@ struct settings /* Format of reals in output (SET WRB). */ enum float_format output_float_format; - int *viewlength; - int *viewwidth; + int viewlength; + int viewwidth; bool safer_mode; bool include; int epoch; @@ -63,14 +64,12 @@ struct settings bool printback; bool mprint; int mxloops; - bool nulline; - char endcmd; size_t workspace; struct fmt_spec default_format; bool testing_mode; int cmd_algorithm; - int *algorithm; + int global_algorithm; int syntax; struct fmt_settings *styles; @@ -83,8 +82,8 @@ static struct settings the_settings = { FLOAT_NATIVE_DOUBLE, /* input_float_format */ INTEGER_NATIVE, /* output_integer_format */ FLOAT_NATIVE_DOUBLE, /* output_float_format */ - NULL, /* viewlength */ - NULL, /* viewwidth */ + 24, /* viewlength */ + 79, /* viewwidth */ false, /* safer_mode */ true, /* include */ -1, /* epoch */ @@ -104,13 +103,11 @@ static struct settings the_settings = { true, /* printback */ true, /* mprint */ 1, /* mxloops */ - true, /* nulline */ - '.', /* endcmd */ 64L * 1024 * 1024, /* workspace */ {FMT_F, 8, 2}, /* default_format */ false, /* testing_mode */ ENHANCED, /* cmd_algorithm */ - &global_algorithm, /* algorithm */ + ENHANCED, /* global_algorithm */ ENHANCED, /* syntax */ NULL, /* styles */ @@ -121,22 +118,58 @@ static struct settings the_settings = { SETTINGS_DEVICE_LISTING | SETTINGS_DEVICE_TERMINAL} }; -static void init_viewport ( int *, int *); - +/* Initializes the settings module. */ void -settings_init (int *width, int *length) +settings_init (void) { - init_viewport (width, length); settings_set_epoch (-1); the_settings.styles = fmt_settings_create (); settings_set_decimal_char (get_system_decimal ()); } +/* Cleans up the settings module. */ void settings_done (void) { - fmt_settings_destroy (the_settings.styles); + settings_destroy (&the_settings); +} + +static void +settings_copy (struct settings *dst, const struct settings *src) +{ + *dst = *src; + dst->styles = fmt_settings_clone (src->styles); +} + +/* Returns a copy of the current settings. */ +struct settings * +settings_get (void) +{ + struct settings *s = xmalloc (sizeof *s); + settings_copy (s, &the_settings); + return s; +} + +/* Replaces the current settings by those in S. The caller retains ownership + of S. */ +void +settings_set (const struct settings *s) +{ + settings_destroy (&the_settings); + settings_copy (&the_settings, s); +} + +/* Destroys S. */ +void +settings_destroy (struct settings *s) +{ + if (s != NULL) + { + fmt_settings_destroy (s->styles); + if (s != &the_settings) + free (s); + } } /* Returns the floating-point format used for RB and RBHEX @@ -203,35 +236,28 @@ settings_set_output_float_format ( enum float_format float_format) int settings_get_viewlength (void) { - return *the_settings.viewlength; + return the_settings.viewlength; } /* Sets the view length. */ void settings_set_viewlength ( int viewlength_) { - *the_settings.viewlength = viewlength_; + the_settings.viewlength = viewlength_; } /* Screen width. */ int settings_get_viewwidth(void) { - return *the_settings.viewwidth; + return the_settings.viewwidth; } /* Sets the screen width. */ void settings_set_viewwidth ( int viewwidth_) { - *the_settings.viewwidth = viewwidth_; -} - -static void -init_viewport ( int *width, int *length) -{ - the_settings.viewwidth = width; - the_settings.viewlength = length; + the_settings.viewwidth = viewwidth_; } /* Whether PSPP can erase and overwrite files. */ @@ -399,34 +425,6 @@ settings_set_mxloops ( int mxloops) the_settings.mxloops = mxloops; } -/* Whether a blank line is a command terminator. */ -bool -settings_get_nulline (void) -{ - return the_settings.nulline; -} - -/* Set whether a blank line is a command terminator. */ -void -settings_set_nulline ( bool nulline) -{ - the_settings.nulline = nulline; -} - -/* The character used to terminate commands. */ -char -settings_get_endcmd (void) -{ - return the_settings.endcmd; -} - -/* Set the character used to terminate commands. */ -void -settings_set_endcmd ( char endcmd) -{ - the_settings.endcmd = endcmd; -} - /* Approximate maximum amount of memory to use for cases, in bytes. */ size_t @@ -488,14 +486,14 @@ settings_set_testing_mode ( bool testing_mode) enum behavior_mode settings_get_algorithm (void) { - return *the_settings.algorithm; + return the_settings.cmd_algorithm; } /* Set the algorithm option globally. */ void settings_set_algorithm (enum behavior_mode mode) { - global_algorithm = mode; + the_settings.global_algorithm = the_settings.cmd_algorithm = mode; } /* Set the algorithm option for this command only */ @@ -503,14 +501,13 @@ void settings_set_cmd_algorithm ( enum behavior_mode mode) { the_settings.cmd_algorithm = mode; - the_settings.algorithm = &the_settings.cmd_algorithm; } /* Unset the algorithm option for this command */ void unset_cmd_algorithm (void) { - the_settings.algorithm = &global_algorithm; + the_settings.cmd_algorithm = the_settings.global_algorithm; } /* Get the current syntax setting */ @@ -659,20 +656,20 @@ settings_dollar_template (const struct fmt_spec *fmt) fns = fmt_settings_get_style (the_settings.styles, fmt->type); - ds_put_char (&str, '$'); + ds_put_byte (&str, '$'); for (c = MAX (fmt->w - fmt->d - 1, 0); c > 0; ) { - ds_put_char (&str, '#'); + ds_put_byte (&str, '#'); if (--c % 4 == 0 && c > 0) { - ds_put_char (&str, fns->grouping); + ds_put_byte (&str, fns->grouping); --c; } } if (fmt->d > 0) { - ds_put_char (&str, fns->decimal); - ds_put_char_multiple (&str, '#', fmt->d); + ds_put_byte (&str, fns->decimal); + ds_put_byte_multiple (&str, '#', fmt->d); } return ds_cstr (&str);