X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fdictionary%2Fmissing-values.c;h=22fe4436f0500e9f93b54b97ae48962c2a2663db;hb=d737633d2bf0b60c2a46c6ade75773e5ccb16f2b;hp=950abc1528115c0b123fa40568c85f60a770b2ac;hpb=392ab4052e2743f80664a4130b2b4ee5d82af7fe;p=pspp diff --git a/src/language/dictionary/missing-values.c b/src/language/dictionary/missing-values.c index 950abc1528..22fe4436f0 100644 --- a/src/language/dictionary/missing-values.c +++ b/src/language/dictionary/missing-values.c @@ -1,5 +1,5 @@ /* PSPP - a program for statistical analysis. - Copyright (C) 1997-9, 2000, 2006 Free Software Foundation, Inc. + Copyright (C) 1997-9, 2000, 2006, 2009, 2010 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 @@ -26,8 +26,8 @@ #include #include #include +#include #include -#include #include #include #include @@ -38,7 +38,7 @@ int cmd_missing_values (struct lexer *lexer, struct dataset *ds) { - struct variable **v; + struct variable **v = NULL; size_t nv; int retval = CMD_FAILURE; @@ -98,32 +98,31 @@ cmd_missing_values (struct lexer *lexer, struct dataset *ds) } else { - struct string value; - - mv_init (&mv, MAX_SHORT_STRING); + mv_init (&mv, MV_MAX_STRING); while (!lex_match (lexer, ')')) { + uint8_t value[MV_MAX_STRING]; + size_t length; + if (!lex_force_string (lexer)) { deferred_errors = true; break; } - ds_init_string (&value, lex_tokstr (lexer)); - - if (ds_length (&value) > MAX_SHORT_STRING) + length = ds_length (lex_tokstr (lexer)); + if (length > MV_MAX_STRING) { - ds_truncate (&value, MAX_SHORT_STRING); - msg (SE, _("Truncating missing value to short string " - "length (%d characters)."), - MAX_SHORT_STRING); + msg (SE, _("Truncating missing value to maximum " + "acceptable length (%d bytes)."), + MV_MAX_STRING); + length = MV_MAX_STRING; } - else - ds_rpad (&value, MAX_SHORT_STRING, ' '); + memset (value, ' ', MV_MAX_STRING); + memcpy (value, ds_data (lex_tokstr (lexer)), length); - if (!mv_add_str (&mv, ds_data (&value))) + if (!mv_add_str (&mv, value)) deferred_errors = true; - ds_destroy (&value); lex_get (lexer); lex_match (lexer, ','); @@ -142,6 +141,8 @@ cmd_missing_values (struct lexer *lexer, struct dataset *ds) deferred_errors = true; } } + + mv_destroy (&mv); } lex_match (lexer, '/');