1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
|
/*
* strconst.c
*/
/********/
/* USES */
/********/
/* libs ext. <>, our "" */
#include "csf.h"
/* global header (opt.) and strconst's prototypes "" */
/* headers of this app. modules called */
/***************/
/* EXTERNALS */
/***************/
/**********************/
/* LOCAL DECLARATIONS */
/**********************/
/*********************/
/* LOCAL DEFINITIONS */
/*********************/
static char errorBuf[64];
/******************/
/* IMPLEMENTATION */
/******************/
/* string with cell representation in plain english or acronym
* The string is in lower case except for INT1,INT2,UINT2 and UINT4
*, they return an acronym. If cr is not
* a valid constant, for example 999, then the string is
* "999 is no CR constant".
* The "no constant" message is stored in a static buffer
* used by both RstrCellRepr and RstrValueScale.
* returns
* string with cell representation
*/
const char *RstrCellRepr(CSF_CR cr) /* cell representation constant */
{
switch(cr) {
case CR_INT1 : return "INT1";
case CR_INT2 : return "INT2";
case CR_INT4 : return "large integer";
case CR_UINT1 : return "small integer";
case CR_UINT2 : return "UINT2";
case CR_UINT4 : return "UINT4";
case CR_REAL4 : return "small real";
case CR_REAL8 : return "large real";
default : (void)sprintf(errorBuf,"%u is no CR constant", (unsigned)cr);
return errorBuf;
}
}
/* string with value scale
* The string is in lower case. If cr is not
* a valid constant, for example 999, then the string is
* "999 is no VS constant".
* The "no constant" message is stored in a static buffer
* used by both RstrCellRepr and RstrValueScale.
* returns
* string with value scale in lower case
*/
const char *RstrValueScale(CSF_VS vs) /* value scale constant */
{
switch(vs) {
case VS_NOTDETERMINED : return "notdetermined";
case VS_CLASSIFIED : return "classified";
case VS_CONTINUOUS : return "continuous";
case VS_BOOLEAN : return "boolean";
case VS_NOMINAL : return "nominal";
case VS_ORDINAL : return "ordinal";
case VS_SCALAR : return "scalar";
case VS_DIRECTION : return "directional";
case VS_LDD : return "ldd";
default : (void)sprintf(errorBuf,"%u is no VS constant", (unsigned)vs);
return errorBuf;
}
}
/* string with projection
* The string is in lower case.
* string with name of projection
*/
const char *MstrProjection(CSF_PT p) /* projection constant, 0 is
* top to bottom. non-0 is bottom
* to top
*/
{
return (p) ?
"y increases from bottom to top"
:"y increases from top to bottom";
}
|
