const bool testJSONRPC()

in modules/json/json-test.cpp [272:333]

• 60 lines of code
• 1 McCabe index (conditional complexity)

const bool testJSONRPC() {
    const gc_scoped_pool pool;
    {
        const string lm("{\"id\":1,\"method\":\"test\",\"params\":[]}");
        const list<value> e = content(readElements(mklist(lm)));
        const list<value> v = elementsToValues(e);
        assert(assoc<value>("id", v) == mklist<value>("id", 1));
        assert(assoc<value>("method", v) == mklist<value>("method", string("test")));
        assert(assoc<value>("params", v) == mklist<value>("params", nilListValue));
    }
    {
        const list<value> e = content(readElements(mklist(testItem)));
        ostringstream os;
        write(content(writeElements(e)), os);
        assert(str(os) == testItem);
        const list<value> v = elementsToValues(e);
        const list<value> r = valuesToElements(v);
        assert(r == e);
    }
    {
        const list<value> r = mklist<value>(mklist<value>("id", 1), mklist<value>("result", mklist<value>(string("Service.get"), string("Service.getTotal"))));
        const list<value> e = valuesToElements(r);
        ostringstream os;
        write(content(writeElements(e)), os);
        assert(str(os) == testResult);
    }
    {
        const list<value> r = content(readElements(mklist(testFeed)));
        const list<value> v = elementsToValues(r);
        const list<value> e = valuesToElements(v);
        ostringstream os;
        write(content(writeElements(e)), os);
#ifndef __clang__
        assert(str(os) == testFeed2);
#endif
    }
    {
        const list<value> arg = mklist<value>(nilListValue + "ns1:echoString" + (nilListValue + "@xmlns:ns1" + string("http://ws.apache.org/axis2/services/echo")) + (nilListValue + "text" + string("Hello World!")));
        const failable<list<string> > r = jsonRequest(1, "echo", mklist<value>(arg));
        ostringstream os;
        write(content(r), os);
        assert(str(os) == testEchoreq);

        istringstream is(str(os));
        const list<string> il = streamList(is);
        const list<value> ir = elementsToValues(content(readElements(il)));
        assert(car<value>(cadr<value>(caddr<value>(ir))) == arg);
    }
    {
        const list<value> res = mklist<value>(nilListValue + "ns1:echoString" + (nilListValue + "@xmlns:ns1" + string("http://ws.apache.org/axis2/c/samples")) + (nilListValue + "text" + string("Hello World!")));
        const failable<list<string> > r = jsonResult(1, res);
        ostringstream os;
        write(content(r), os);
        assert(str(os) == testEchores);

        istringstream is(str(os));
        const list<string> il = streamList(is);
        const list<value> ir = elementsToValues(content(readElements(il)));
        assert(cdr<value>(cadr<value>(ir)) == res);
    }
    return true;
}