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
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
|
/*
* Worldvisions Weaver Software:
* Copyright (C) 1997-2002 Net Integration Technologies, Inc.
*
* WvString test program. Correct results:
*
* A WvString is 8 bytes long.
* Foo Foo
* 0 1 0 0 1
* 1 0 1 1 0
* 1 0 0 1
* 0 1
* 0 1
* Foo
* 1 1 0
* 0 1 0 0
* hello
* xyzzi 5 hello b
* uest string
* vest string
* vest string .. west string
*/
#include "wvstring.h"
WvString t1, t2, t3, t4, t5, t6;
char globuf[1024];
/* this function is mainly for looking at the assembly output */
void format_test()
{
WvString s(t1, t2, t3, t4, t5, t6);
}
WvString test1(WvString s)
{
s.edit()[0]++;
return s;
}
void fptestfunc(WvStringParm fp1, WvStringParm fpf1,
WvStringParm fp2, WvStringParm fpf2)
{
WvString a(fp1), b(fpf1), c(fp2), d(fpf2);
printf("before: %s/%s/%s/%s\n", a.cstr(), b.cstr(), c.cstr(), d.cstr());
strcpy(globuf, "ZOT!");
printf("after: %s/%s/%s/%s\n", a.cstr(), b.cstr(), c.cstr(), d.cstr());
}
int main()
{
printf("A WvString is %d bytes long.\n", sizeof(WvString));
WvString a, b("Foo"), c("Foo"), d("Blue"), e;
char *ca = "Fork", *cb = "Foo", *cc = "Foo", *cd = NULL;
{
WvString *x = new WvString(a);
WvString *y = new WvString(b);
printf("%s %s\n", (const char *)b, (const char *)*y);
delete y;
delete x;
}
// 0 1 0 0 1
printf("%d %d %d %d %d\n", a == b, b == c, c == d, d == e, e == a);
// 1 0 1 1 0
printf("%d %d %d %d %d\n", a != b, b != c, c != d, d != e, e != a);
// 1 0 0 1
printf("%d %d %d %d\n", !a, !b, !c, !e);
e = c;
// 0 1
printf("%d %d\n", e == a, e == b);
e = e;
// 1 0
printf("%d %d\n", e == a, e == b);
e = cb;
// 1 1 0
printf("%s\n", (const char *)e);
printf("%d %d %d\n", e == cb, e == cc, e == cd);
// 0 1 0 0
printf("%d %d %d %d\n", a == ca, b == cb, d == cb, d == cd);
// formatting test
WvString ft0("%s", "hello");
printf("%s\n", (const char *)ft0);
WvString ft("%s %-40s %s %10s", "xyzzi", 5, "hello", "b");
printf("%s\n", (const char *)ft);
// parameter passing test
WvString s(test1("test string"));
printf("%s\n", (const char *)s);
s = test1(s);
printf("%s\n", (const char *)s);
WvString t;
t = test1(s);
printf("%s .. %s\n", (const char *)s, (const char *)t);
// NULL value tests. NULL strings are different from zero-length strings.
// null: ok1
// null: 1 1 0 1 0
// null: 0 1 1 1 0
WvString n1, n2((const char *)NULL), n3(n1), n4("foo"), n5("blah"), n6("");
n4 = n1;
n1 = n4;
n5 = n1;
printf("null: ok1\n");
printf("null: %d %d %d %d %d\n", !n1, !n2, n1.len(), n1==n2, n3.num());
n3.append("junk");
printf("null: %d %d %d %d %d\n", n1==n6, !n1, !n6, n1==NULL, n6==NULL);
WvString ns("%s %s %s %s %s %s\n", n1, n2, n3, n4, n5, n6);
printf("null: %s\n", ns.cstr());
// fast parameter passing test
strcpy(globuf, "TestOne");
WvString fp1(globuf);
WvFastString fpf1(globuf);
strcpy(globuf, "Bonk2");
WvString fp2(globuf);
WvFastString fpf2(globuf);
printf("%s/%s/%s/%s\n", fp1.cstr(), fpf1.cstr(), fp2.cstr(), fpf2.cstr());
fptestfunc(fp1, fpf1, fp2, fpf2);
fptestfunc(fp1, fpf1, fp2, fpf2);
return 0;
}
|
