X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata%2Fvector.c;h=7c8ec4178dc9200473f308b385d35367441adac0;hb=f20d313de2b85419c3e2e22a78cdcdce499af43d;hp=fd65d284d43ea6d75d1db2885f1b9ad87d37bce9;hpb=a9acce47d67e0ab35ce1690e4f1b1ac0121c2d78;p=pspp diff --git a/src/data/vector.c b/src/data/vector.c index fd65d284d4..7c8ec4178d 100644 --- a/src/data/vector.c +++ b/src/data/vector.c @@ -1,5 +1,5 @@ /* PSPP - a program for statistical analysis. - Copyright (C) 2006 Free Software Foundation, Inc. + Copyright (C) 2006, 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 @@ -15,19 +15,23 @@ along with this program. If not, see . */ #include -#include "vector.h" -#include "dictionary.h" +#include "data/vector.h" -#include -#include +#include -#include "xalloc.h" +#include "data/dictionary.h" +#include "data/identifier.h" +#include "libpspp/assertion.h" +#include "libpspp/i18n.h" +#include "libpspp/str.h" + +#include "gl/xalloc.h" /* Vector of variables. */ struct vector { - char name[VAR_NAME_LEN + 1]; /* Name. */ + char *name; /* Name. */ struct variable **vars; /* Set of variables. */ size_t var_cnt; /* Number of variables. */ }; @@ -44,19 +48,18 @@ check_widths (const struct vector *vector) assert (width == var_get_width (vector->vars[i])); } -/* Creates and returns a new vector with the given NAME +/* Creates and returns a new vector with the given UTF-8 encoded NAME that contains the VAR_CNT variables in VARS. All variables in VARS must have the same type and width. */ struct vector * -vector_create (const char *name, - struct variable **vars, size_t var_cnt) +vector_create (const char *name, struct variable **vars, size_t var_cnt) { struct vector *vector = xmalloc (sizeof *vector); assert (var_cnt > 0); - assert (var_is_plausible_name (name, false)); - str_copy_trunc (vector->name, sizeof vector->name, name); + assert (id_is_plausible (name, false)); + vector->name = xstrdup (name); vector->vars = xmemdup (vars, var_cnt * sizeof *vector->vars); vector->var_cnt = var_cnt; check_widths (vector); @@ -77,8 +80,7 @@ vector_clone (const struct vector *old, struct vector *new = xmalloc (sizeof *new); size_t i; - strcpy (new->name, old->name); - + new->name = xstrdup (old->name); new->vars = xnmalloc (old->var_cnt, sizeof *new->vars); new->var_cnt = old->var_cnt; for (i = 0; i < new->var_cnt; i++) @@ -96,11 +98,12 @@ vector_clone (const struct vector *old, void vector_destroy (struct vector *vector) { + free (vector->name); free (vector->vars); free (vector); } -/* Returns VECTOR's name. */ +/* Returns VECTOR's name, as a UTF-8 encoded string. */ const char * vector_get_name (const struct vector *vector) { @@ -138,6 +141,6 @@ compare_vector_ptrs_by_name (const void *a_, const void *b_) struct vector *a = *pa; struct vector *b = *pb; - return strcasecmp (a->name, b->name); + return utf8_strcasecmp (a->name, b->name); }