static int GetValueTest(WJElement doc)
{
char *v;
if (1 != WJENumber(doc, "one", WJE_GET, -1)) return(__LINE__);
if (2 != WJENumber(doc, "two", WJE_GET, -1)) return(__LINE__);
if (3 != WJENumber(doc, "three", WJE_GET, -1)) return(__LINE__);
if (-1!= WJENumber(doc, "four", WJE_GET, -1)) return(__LINE__);
if (0 != WJENumber(doc, "digits[0]", WJE_GET, -1)) return(__LINE__);
if (1 != WJENumber(doc, "digits[1]", WJE_GET, -1)) return(__LINE__);
if (9 != WJENumber(doc, "digits[-1]", WJE_GET, -1)) return(__LINE__);
if (9 != WJENumber(doc, "digits[$]", WJE_GET, -1)) return(__LINE__);
if (-1!= WJENumber(doc, "digits[10]", WJE_GET, -1)) return(__LINE__);
if (!WJEBool(doc, "a.b.balloon", WJE_GET, 0)) return(__LINE__);
if ( WJEBool(doc, "a.b.aardvark", WJE_GET, 1)) return(__LINE__);
if (!WJEBool(doc, "a.b.bull", WJE_GET, 1)) return(__LINE__);
if ( WJEBool(doc, "a.b.another", WJE_GET, 0)) return(__LINE__);
if (!(v = WJEString(doc, "a.names[-1]", WJE_GET, NULL)) ||
stricmp(v, "a")) return(__LINE__);
if (!(v = WJEString(doc, "a.b.names[-1]", WJE_GET, NULL)) ||
stricmp(v, "b")) return(__LINE__);
if ( (v = WJEString(doc, "a.b.nonames[-1]", WJE_GET, NULL)))
return(__LINE__);
return(0);
}
static int PutValueTest(WJElement doc)
{
char *v;
/*
WJE_PUT will update the value if the element exists. If it does not
exist then it will NOT create it.
Do a WJE_PUT on values that do and do not already exist, and verify the
result. Then use WJEGet() to verify that new elements where not
created.
*/
/* Replace existing number values */
if (-1!= WJENumber(doc, "one", WJE_PUT, -1)) return(__LINE__);
if (-1!= WJENumber(doc, "one", WJE_GET, 1)) return(__LINE__);
if (-1!= WJENumber(doc, "two", WJE_PUT, -1)) return(__LINE__);
if (-1!= WJENumber(doc, "two", WJE_GET, 2)) return(__LINE__);
if (-1!= WJENumber(doc, "three", WJE_PUT, -1)) return(__LINE__);
if (-1!= WJENumber(doc, "three", WJE_GET, 3)) return(__LINE__);
/* Insert a new number value */
if (-1== WJENumber(doc, "four", WJE_PUT, -1)) return(__LINE__);
if (WJEGet(doc, "four", NULL)) return(__LINE__);
/* Replace existing boolean values */
if ( WJEBool(doc, "a.b.balloon", WJE_PUT, 0)) return(__LINE__);
if (!WJEBool(doc, "a.b.aardvark", WJE_PUT, 1)) return(__LINE__);
/* Insert a new boolean value */
if ( WJEBool(doc, "a.b.bull", WJE_PUT, 1)) return(__LINE__);
if (WJEGet(doc, "a.b.bull", NULL)) return(__LINE__);
/* Replace an existing string value */
if (!(v = WJEString(doc, "a.names[-1]", WJE_PUT, "aardvark")) ||
stricmp(v, "aardvark"))
return(__LINE__);
if (!(v = WJEString(doc, "a.names[-1]", WJE_GET, NULL)) ||
stricmp(v, "aardvark"))
return(__LINE__);
/* Insert a new string value */
if ((v = WJEString(doc, "a.x.q", WJE_PUT, "queen")))
return(__LINE__);
if (WJEGet(doc, "a.x.q", NULL)) return(__LINE__);
return(0);
}
static int NewValueTest(WJElement doc)
{
char *v;
/*
WJE_NEW will not leave the original value if it already exists, or
create the element if it doesn't.
Do a WJE_NEW on values that do and do not already exist, and verify the
result. Then do a WJE_GET to verify that the creation of elements
actually worked.
*/
/* Replace existing number values */
if ( 1!= WJENumber(doc, "one", WJE_NEW, -1)) return(__LINE__);
if ( 2!= WJENumber(doc, "two", WJE_NEW, -1)) return(__LINE__);
if ( 3!= WJENumber(doc, "three", WJE_NEW, -1)) return(__LINE__);
/* Insert a new number value */
if (-1!= WJENumber(doc, "four", WJE_NEW, -1)) return(__LINE__);
if (-1!= WJENumber(doc, "four", WJE_GET, 4)) return(__LINE__);
/* Replace existing boolean values */
if (!WJEBool(doc, "a.b.balloon", WJE_NEW, 0)) return(__LINE__);
if ( WJEBool(doc, "a.b.aardvark", WJE_NEW, 1)) return(__LINE__);
/* Insert a new boolean value */
if (!WJEBool(doc, "a.b.bull", WJE_NEW, 1)) return(__LINE__);
if (!WJEBool(doc, "a.b.bull", WJE_GET, 0)) return(__LINE__);
/* Replace an existing string value */
if (!(v = WJEString(doc, "a.names[-1]", WJE_NEW, "aardvark")) ||
stricmp(v, "a"))
return(__LINE__);
if (!(v = WJEString(doc, "a.names[-1]", WJE_GET, NULL)) ||
stricmp(v, "a"))
return(__LINE__);
/* Insert a new string value */
if (!(v = WJEString(doc, "a.x.q", WJE_NEW, "queen")) ||
stricmp(v, "queen"))
return(__LINE__);
if (!(v = WJEString(doc, "a.x.q", WJE_GET, NULL)) ||
stricmp(v, "queen"))
return(__LINE__);
return(0);
}
static WJElement _WJECopy(_WJElement *parent, WJElement original, WJECopyCB copycb, void *data, const char *file, const int line)
{
_WJElement *l = NULL;
_WJElement *o;
WJElement c;
char *tmp;
if (!(o = (_WJElement *) original)) {
return(NULL);
}
if (copycb && !copycb((WJElement) parent, (WJElement) original, data, file, line)) {
/* The consumer has rejected this item */
return(NULL);
}
if ((l = _WJENew(parent, original->name, original->name ? strlen(original->name) : 0, file, line))) {
switch ((l->pub.type = original->type)) {
default:
case WJR_TYPE_UNKNOWN:
case WJR_TYPE_NULL:
break;
case WJR_TYPE_OBJECT:
case WJR_TYPE_ARRAY:
for (c = original->child; c; c = c->next) {
_WJECopy(l, c, copycb, data, file, line);
}
break;
case WJR_TYPE_STRING:
if ((tmp = WJEString(original, NULL, WJE_GET, ""))) {
l->value.string = MemStrdup(tmp);
l->pub.length = original->length;
} else {
l->value.string = MemStrdup("");
l->pub.length = 0;
}
break;
case WJR_TYPE_NUMBER:
l->value.number.negative = o->value.number.negative;
l->value.number.i = o->value.number.i;
l->value.number.d = o->value.number.d;
l->value.number.hasDecimalPoint = o->value.number.hasDecimalPoint;
break;
case WJR_TYPE_TRUE:
case WJR_TYPE_BOOL:
case WJR_TYPE_FALSE:
l->value.boolean = WJEBool(original, NULL, WJE_GET, FALSE);
break;
}
}
return((WJElement) l);
}
int main(int argc, char **argv) {
WJElement doc = NULL;
WJElement person = NULL;
WJElement cameo = NULL;
doc = WJEObject(NULL, NULL, WJE_NEW);
WJEString(doc, "name", WJE_SET, "Serenity");
WJEString(doc, "class", WJE_SET, "firefly");
WJEArray(doc, "crew", WJE_SET);
WJEObject(doc, "crew[$]", WJE_NEW);
WJEString(doc, "crew[-1].name", WJE_SET, "Malcolm Reynolds");
WJEString(doc, "crew[-1].job", WJE_SET, "captain");
WJEInt64(doc, "crew[-1].born", WJE_SET, 2468);
WJEObject(doc, "crew[$]", WJE_NEW);
WJEString(doc, "crew[-1].name", WJE_SET, "Kaywinnet Lee Fry");
WJEString(doc, "crew[-1].job", WJE_SET, "mechanic");
WJEInt64(doc, "crew[-1].born", WJE_SET, 2494);
WJEObject(doc, "crew[$]", WJE_NEW);
WJEString(doc, "crew[-1].name", WJE_SET, "Jayne Cobb");
WJEString(doc, "crew[-1].job", WJE_SET, "public relations");
WJEInt64(doc, "crew[-1].born", WJE_SET, 2485);
WJEArray(doc, "cameo", WJE_SET);
WJEString(doc, "cameo[$]", WJE_NEW, "Battlestar Galactica");
WJEString(doc, "cameo[$]", WJE_NEW, "Star Wars Evasive Action");
WJEString(doc, "cameo[$]", WJE_NEW, "Dr. Horrible's Sing-Along Blog");
WJEString(doc, "cameo[$]", WJE_NEW, "Ready Player One");
WJEBool(doc, "shiny", WJE_SET, TRUE);
WJEInt64(doc, "crew[].born == 2468", WJE_SET, 2486); /* note: awesome! */
WJECloseDocument(WJEGet(doc, "shiny", NULL));
while((person = _WJEObject(doc, "crew[]", WJE_GET, &person))) {
printf("%s (%s) is %"PRId64"\n",
WJEString(person, "name", WJE_GET, ""),
WJEString(person, "job", WJE_GET, ""),
(2517 - WJEInt64(person, "born", WJE_GET, 0)));
}
while((cameo = WJEGet(doc, "cameo[]", cameo))) {
printf("Cameo: %s\n", WJEString(cameo, NULL, WJE_GET, ""));
}
WJEDump(doc);
WJECloseDocument(doc);
return 0;
}
static int SetValueTest(WJElement doc)
{
char *v;
/*
WJE_SET will update the value if it already exists, or create the
element if it doesn't exist.
Do a WJE_SET on values that do and do not already exist, and verify the
result. Then do a WJE_GET to verify that the element does exist.
*/
/* Replace existing number values */
if (-1!= WJENumber(doc, "one", WJE_SET, -1)) return(__LINE__);
if (-1!= WJENumber(doc, "one", WJE_GET, 1)) return(__LINE__);
if (-1!= WJENumber(doc, "two", WJE_SET, -1)) return(__LINE__);
if (-1!= WJENumber(doc, "two", WJE_GET, 2)) return(__LINE__);
if (-1!= WJENumber(doc, "three", WJE_SET, -1)) return(__LINE__);
if (-1!= WJENumber(doc, "three", WJE_GET, 3)) return(__LINE__);
/* Insert a new number value */
if (-1!= WJENumber(doc, "four", WJE_SET, -1)) return(__LINE__);
if (-1!= WJENumber(doc, "four", WJE_GET, 4)) return(__LINE__);
/* Replace existing boolean values */
if ( WJEBool(doc, "a.b.balloon", WJE_SET, 0)) return(__LINE__);
if ( WJEBool(doc, "a.b.balloon", WJE_GET, 1)) return(__LINE__);
if (!WJEBool(doc, "a.b.aardvark", WJE_SET, 1)) return(__LINE__);
if (!WJEBool(doc, "a.b.aardvark", WJE_GET, 0)) return(__LINE__);
/* Insert a new boolean value */
if (!WJEBool(doc, "a.b.bull", WJE_SET, 1)) return(__LINE__);
if (!WJEBool(doc, "a.b.bull", WJE_GET, 0)) return(__LINE__);
/* Replace an existing string value */
if (!(v = WJEString(doc, "a.names[-1]", WJE_SET, "aardvark")))
return(__LINE__);
if (!(v = WJEString(doc, "a.names[-1]", WJE_GET, NULL)) ||
stricmp(v, "aardvark"))
return(__LINE__);
/* Insert a new string value */
if (!(v = WJEString(doc, "a.x.q", WJE_SET, "queen")))
return(__LINE__);
if (!(v = WJEString(doc, "a.x.q", WJE_GET, NULL)) ||
stricmp(v, "queen"))
return(__LINE__);
return(0);
}
int main(int argc, char **argv) {
WJElement doc = NULL;
WJElement person = NULL;
doc = WJEObject(NULL, NULL, WJE_NEW);
WJEString(doc, "name", WJE_SET, "Serenity");
WJEString(doc, "class", WJE_SET, "firefly");
WJEArray(doc, "crew", WJE_SET);
WJEObject(doc, "crew[$]", WJE_NEW);
WJEString(doc, "crew[-1].name", WJE_SET, "Malcolm Reynolds");
WJEString(doc, "crew[-1].job", WJE_SET, "captain");
WJEInt64(doc, "crew[-1].born", WJE_SET, 2468);
WJEObject(doc, "crew[$]", WJE_NEW);
WJEString(doc, "crew[-1].name", WJE_SET, "Kaywinnet Lee Fry");
WJEString(doc, "crew[-1].job", WJE_SET, "mechanic");
WJEInt64(doc, "crew[-1].born", WJE_SET, 2494);
WJEObject(doc, "crew[$]", WJE_NEW);
WJEString(doc, "crew[-1].name", WJE_SET, "Jayne Cobb");
WJEString(doc, "crew[-1].job", WJE_SET, "public relations");
WJEInt64(doc, "crew[-1].born", WJE_SET, 2485);
WJEBool(doc, "shiny", WJE_SET, TRUE);
WJEInt64(doc, "crew[].born == 2468", WJE_SET, 2486); /* note: awesome! */
WJECloseDocument(WJEGet(doc, "shiny", NULL));
while((person = _WJEObject(doc, "crew[]", WJE_GET, &person))) {
printf("%s (%s) is %d\n",
WJEString(person, "name", WJE_GET, ""),
WJEString(person, "job", WJE_GET, ""),
2517 - WJEInt64(person, "born", WJE_GET, 0));
}
WJEDump(doc);
WJECloseDocument(doc);
return 0;
}
static void _WJEHash(WJElement document, int depth, WJEHashCB update, void *context)
{
WJElement child;
char *s;
int32 n;
uint32 b;
if (!document) {
return;
}
switch (document->type) {
default:
case WJR_TYPE_UNKNOWN:
break;
case WJR_TYPE_NULL:
update(context, "", 1);
break;
case WJR_TYPE_OBJECT:
update(context, &depth, sizeof(depth));
for (child = document->child; child; child = child->next) {
if (child->name) {
update(context, child->name, strlen(child->name) + 1);
}
_WJEHash(child, depth + 1, update, context);
}
update(context, &depth, sizeof(depth));
break;
case WJR_TYPE_ARRAY:
update(context, &depth, sizeof(depth));
for (child = document->child; child; child = child->next) {
update(context, "", 1);
_WJEHash(child, depth + 1, update, context);
}
update(context, &depth, sizeof(depth));
break;
case WJR_TYPE_STRING:
if ((s = WJEString(document, NULL, WJE_GET, ""))) {
update(context, s, strlen(s) + 1);
}
break;
case WJR_TYPE_NUMBER:
#ifdef WJE_DISTINGUISH_INTEGER_TYPE
case WJR_TYPE_INTEGER:
#endif
n = WJENumber(document, NULL, WJE_GET, 0);
update(context, &n, sizeof(n));
break;
case WJR_TYPE_TRUE:
case WJR_TYPE_BOOL:
case WJR_TYPE_FALSE:
b = WJEBool(document, NULL, WJE_GET, FALSE);
update(context, &b, sizeof(b));
break;
}
}
