projects
/
pspp-builds.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Added a signal handler to delete temp casefiles on SIGINT and SIGQUIT.
[pspp-builds.git]
/
src
/
tab.c
diff --git
a/src/tab.c
b/src/tab.c
index 3166740f2002645b4f3db15deb088a675ba077ad..dd901493db8765896b379cdf1d3b2e3a8a7e7fa4 100644
(file)
--- a/
src/tab.c
+++ b/
src/tab.c
@@
-20,10
+20,10
@@
#include <config.h>
#include "tab.h"
#include <ctype.h>
#include <config.h>
#include "tab.h"
#include <ctype.h>
-#include <assert.h>
#include <stdarg.h>
#include <limits.h>
#include <stdlib.h>
#include <stdarg.h>
#include <limits.h>
#include <stdlib.h>
+#include "error.h"
#include "alloc.h"
#include "command.h"
#include "format.h"
#include "alloc.h"
#include "command.h"
#include "format.h"
@@
-38,19
+38,6
@@
\f
struct som_table_class tab_table_class;
\f
struct som_table_class tab_table_class;
-#if DEBUGGING
-#define DEFFIRST(NAME, LABEL) LABEL,
-#define DEFTAB(NAME, LABEL) LABEL,
-/*
-static const char *tab_names[] =
- {
-#include "tab.def"
- };
-*/
-#undef DEFFIRST
-#undef DEFTAB
-#endif
-
/* Creates a table with NC columns and NR rows. If REALLOCABLE is
nonzero then the table's size can be increased later; otherwise,
its size can only be reduced. */
/* Creates a table with NC columns and NR rows. If REALLOCABLE is
nonzero then the table's size can be increased later; otherwise,
its size can only be reduced. */
@@
-223,6
+210,12
@@
void
tab_headers (struct tab_table *table, int l, int r, int t, int b)
{
assert (table != NULL);
tab_headers (struct tab_table *table, int l, int r, int t, int b)
{
assert (table != NULL);
+ assert (l < table->nc);
+ assert (r < table->nc);
+ assert (t < table->nr);
+ assert (b < table->nr);
+
+
table->l = l;
table->r = r;
table->t = t;
table->l = l;
table->r = r;
table->t = t;
@@
-252,11
+245,6
@@
tab_vline (struct tab_table *t, int style, int x, int y1, int y2)
int y;
assert (t != NULL);
int y;
assert (t != NULL);
- assert (x > 0);
- assert (x < t->nc);
- assert (y1 >= 0);
- assert (y2 >= y1);
- assert (y2 <= t->nr);
#if GLOBAL_DEBUGGING
if (x + t->col_ofs < 0 || x + t->col_ofs > t->nc
#if GLOBAL_DEBUGGING
if (x + t->col_ofs < 0 || x + t->col_ofs > t->nc
@@
-277,6
+265,12
@@
tab_vline (struct tab_table *t, int style, int x, int y1, int y2)
y1 += t->row_ofs;
y2 += t->row_ofs;
y1 += t->row_ofs;
y2 += t->row_ofs;
+ assert (x > 0);
+ assert (x < t->nc);
+ assert (y1 >= 0);
+ assert (y2 >= y1);
+ assert (y2 <= t->nr);
+
if (style != -1)
{
if ((style & TAL_SPACING) == 0)
if (style != -1)
{
if ((style & TAL_SPACING) == 0)
@@
-295,16
+289,16
@@
tab_hline (struct tab_table * t, int style, int x1, int x2, int y)
assert (t != NULL);
assert (t != NULL);
+ x1 += t->col_ofs;
+ x2 += t->col_ofs;
+ y += t->row_ofs;
+
assert (y >= 0);
assert (y < t->nr);
assert (x2 >= x1 );
assert (x1 >= 0 );
assert (x2 < t->nc);
assert (y >= 0);
assert (y < t->nr);
assert (x2 >= x1 );
assert (x1 >= 0 );
assert (x2 < t->nc);
- x1 += t->col_ofs;
- x2 += t->col_ofs;
- y += t->row_ofs;
-
if (style != -1)
{
if ((style & TAL_SPACING) == 0)
if (style != -1)
{
if ((style & TAL_SPACING) == 0)
@@
-326,13
+320,6
@@
tab_box (struct tab_table *t, int f_h, int f_v, int i_h, int i_v,
{
assert (t != NULL);
{
assert (t != NULL);
- assert (x2 >= x1);
- assert (y2 >= y1);
- assert (x1 >= 0);
- assert (y1 >= 0);
- assert (x2 < t->nc);
- assert (y2 < t->nr);
-
#if GLOBAL_DEBUGGING
if (x1 + t->col_ofs < 0 || x1 + t->col_ofs >= t->nc
|| x2 + t->col_ofs < 0 || x2 + t->col_ofs >= t->nc
#if GLOBAL_DEBUGGING
if (x1 + t->col_ofs < 0 || x1 + t->col_ofs >= t->nc
|| x2 + t->col_ofs < 0 || x2 + t->col_ofs >= t->nc
@@
-355,6
+342,13
@@
tab_box (struct tab_table *t, int f_h, int f_v, int i_h, int i_v,
y1 += t->row_ofs;
y2 += t->row_ofs;
y1 += t->row_ofs;
y2 += t->row_ofs;
+ assert (x2 >= x1);
+ assert (y2 >= y1);
+ assert (x1 >= 0);
+ assert (y1 >= 0);
+ assert (x2 < t->nc);
+ assert (y2 < t->nr);
+
if (f_h != -1)
{
int x;
if (f_h != -1)
{
int x;
@@
-432,7
+426,8
@@
text_format (struct tab_table *table, int opt, const char *text, va_list args,
else
len = strlen (text);
else
len = strlen (text);
- ls_create_buffer (table->container, s, text, len);
+ ls_create_buffer (s, text, len);
+ pool_register (table->container, free, s->string);
if (opt & TAT_PRINTF)
local_free (text);
if (opt & TAT_PRINTF)
local_free (text);
@@
-570,7
+565,6
@@
tab_value (struct tab_table *table, int c, int r, unsigned char opt,
const union value *v, const struct fmt_spec *f)
{
char *contents;
const union value *v, const struct fmt_spec *f)
{
char *contents;
- union value temp_val;
assert (table != NULL && v != NULL && f != NULL);
#if GLOBAL_DEBUGGING
assert (table != NULL && v != NULL && f != NULL);
#if GLOBAL_DEBUGGING
@@
-591,11
+585,6
@@
tab_value (struct tab_table *table, int c, int r, unsigned char opt,
ls_init (&table->cc[c + r * table->cf], contents, f->w);
table->ct[c + r * table->cf] = opt;
ls_init (&table->cc[c + r * table->cf], contents, f->w);
table->ct[c + r * table->cf] = opt;
- if (formats[f->type].cat & FCAT_STRING)
- {
- temp_val.c = (char *) v->s;
- v = &temp_val;
- }
data_out (contents, f, v);
}
data_out (contents, f, v);
}
@@
-609,9
+598,15
@@
tab_float (struct tab_table *table, int c, int r, unsigned char opt,
char buf[40], *cp;
struct fmt_spec f;
char buf[40], *cp;
struct fmt_spec f;
+ union value double_value;
assert (table != NULL && w <= 40);
assert (table != NULL && w <= 40);
+ assert (c >= 0);
+ assert (c < table->nc);
+ assert (r >= 0);
+ assert (r < table->nr);
+
f.type = FMT_F;
f.w = w;
f.d = d;
f.type = FMT_F;
f.w = w;
f.d = d;
@@
-630,7
+625,9
@@
tab_float (struct tab_table *table, int c, int r, unsigned char opt,
}
#endif
}
#endif
- data_out (buf, &f, (union value *) &val);
+ double_value.f = val;
+ data_out (buf, &f, &double_value);
+
cp = buf;
while (isspace ((unsigned char) *cp) && cp < &buf[w])
cp++;
cp = buf;
while (isspace ((unsigned char) *cp) && cp < &buf[w])
cp++;
@@
-687,12
+684,12
@@
tab_joint_text (struct tab_table *table, int x1, int y1, int x2, int y2,
assert (table != NULL && text != NULL);
assert (table != NULL && text != NULL);
- assert (x1 >= 0);
- assert (y1 >= 0);
+ assert (x1
+ table->col_ofs
>= 0);
+ assert (y1
+ table->row_ofs
>= 0);
assert (y2 >= y1);
assert (x2 >= x1);
assert (y2 >= y1);
assert (x2 >= x1);
- assert (y2 < table->nr);
- assert (x2 < table->nc);
+ assert (y2
+ table->row_ofs
< table->nr);
+ assert (x2
+ table->col_ofs
< table->nc);
#if GLOBAL_DEBUGGING
if (x1 + table->col_ofs < 0 || x1 + table->col_ofs >= table->nc
#if GLOBAL_DEBUGGING
if (x1 + table->col_ofs < 0 || x1 + table->col_ofs >= table->nc
@@
-1159,7
+1156,7
@@
tabi_title (int x, int y)
cp = stpcpy (cp, ". ");
if (!ls_empty_p (&t->title))
{
cp = stpcpy (cp, ". ");
if (!ls_empty_p (&t->title))
{
- memcpy (cp, ls_
value
(&t->title), ls_length (&t->title));
+ memcpy (cp, ls_
c_str
(&t->title), ls_length (&t->title));
cp += ls_length (&t->title);
}
*cp = 0;
cp += ls_length (&t->title);
}
*cp = 0;
@@
-1258,7
+1255,7
@@
struct som_table_class tab_table_class =
FIXME: Doesn't use r1? Huh? */
static int
FIXME: Doesn't use r1? Huh? */
static int
-render_strip (int x, int y, int r, int c1, int c2, int r1
unused
, int r2)
+render_strip (int x, int y, int r, int c1, int c2, int r1
UNUSED
, int r2)
{
int x_origin = x;
{
int x_origin = x;
@@
-1334,7
+1331,7
@@
render_strip (int x, int y, int r, int c1, int c2, int r1 unused, int r2)
}
} else {
struct tab_joined_cell *j =
}
} else {
struct tab_joined_cell *j =
- (struct tab_joined_cell *) ls_
value
(&t->cc[index]);
+ (struct tab_joined_cell *) ls_
c_str
(&t->cc[index]);
if (j->hit != tab_hit)
{
if (j->hit != tab_hit)
{