X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata%2Fcsv-file-writer.c;h=4ebff0bd001288e28ddf6d085cbc086632b72e88;hb=d0f2ab98f2b05a4641cb0d1d042fbe2ad89444aa;hp=7d35b1c2e0757a4ef3d7ea843b2b1b041cfc6037;hpb=fcb75da3200f19842a2eb12ca00063a727a226fd;p=pspp diff --git a/src/data/csv-file-writer.c b/src/data/csv-file-writer.c index 7d35b1c2e0..4ebff0bd00 100644 --- a/src/data/csv-file-writer.c +++ b/src/data/csv-file-writer.c @@ -1,5 +1,5 @@ /* PSPP - a program for statistical analysis. - Copyright (C) 2010 Free Software Foundation, Inc. + Copyright (C) 2010, 2011, 2012 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 @@ -45,6 +45,8 @@ #include "libpspp/message.h" #include "libpspp/str.h" +#include "gl/ftoastr.h" +#include "gl/minmax.h" #include "gl/unlocked-io.h" #include "gl/xalloc.h" @@ -120,9 +122,7 @@ csv_writer_open (struct file_handle *fh, const struct dictionary *dict, w->opts = *opts; - w->encoding = (dict_get_encoding (dict) - ? xstrdup (dict_get_encoding (dict)) - : NULL); + w->encoding = xstrdup (dict_get_encoding (dict)); w->n_csv_vars = dict_get_var_cnt (dict); w->csv_vars = xnmalloc (w->n_csv_vars, sizeof *w->csv_vars); @@ -158,7 +158,7 @@ csv_writer_open (struct file_handle *fh, const struct dictionary *dict, &w->file, NULL); if (w->rf == NULL) { - msg (ME, _("Error opening \"%s\" for writing as a system file: %s."), + msg (ME, _("Error opening `%s' for writing as a system file: %s."), fh_get_file_name (fh), strerror (errno)); goto error; } @@ -280,7 +280,8 @@ csv_write_var__ (struct csv_writer *w, const struct csv_var *cv, csv_output_format (w, cv, value); else { - char s[128]; + char s[MAX (DBL_STRLEN_BOUND, 128)]; + char *cp; switch (cv->format.type) { @@ -306,13 +307,10 @@ csv_write_var__ (struct csv_writer *w, const struct csv_var *cv, case FMT_RBHEX: case FMT_WKDAY: case FMT_MONTH: - snprintf (s, sizeof s, "%.*g", DBL_DIG + 1, value->f); - if (w->opts.decimal != '.') - { - char *cp = strchr (s, '.'); - if (cp != NULL) - *cp = w->opts.decimal; - } + dtoastr (s, sizeof s, 0, 0, value->f); + cp = strpbrk (s, ".,"); + if (cp != NULL) + *cp = w->opts.decimal; break; case FMT_DATE: @@ -459,7 +457,7 @@ close_writer (struct csv_writer *w) ok = false; if (!ok) - msg (ME, _("An I/O error occurred writing CSV file \"%s\"."), + msg (ME, _("An I/O error occurred writing CSV file `%s'."), fh_get_file_name (w->fh)); if (ok ? !replace_file_commit (w->rf) : !replace_file_abort (w->rf))