mirror of
https://gitlab.com/libvirt/libvirt.git
synced 2024-09-09 09:14:57 +00:00
* qemud/event.c: Likewise. * src/buf.c: Likewise. * src/hash.c: Likewise. * src/nodeinfo.c: Likewise. * src/openvz_conf.c: Likewise. * src/proxy_internal.c: Likewise. * src/virterror.c: Likewise. * src/xmlrpc.c: Likewise. * src/xs_internal.c: Likewise. * tests/conftest.c: Likewise. * tests/xmlrpctest.c: Likewise. This fixes a mingw build failure reported by Rich Jones. Author: Jim Meyering <meyering@redhat.com>
283 lines
6.8 KiB
C
283 lines
6.8 KiB
C
/*
|
|
* xmlrpctest.c: simple client for XML-RPC tests
|
|
*
|
|
* Copyright (C) 2005 Red Hat, Inc.
|
|
*
|
|
* See COPYING.LIB for the License of this software
|
|
*
|
|
* Karel Zak <kzak@redhat.com>
|
|
*
|
|
* $Id$
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <stdarg.h>
|
|
#include <string.h>
|
|
#include <limits.h>
|
|
#include <libxml/parser.h>
|
|
#include <libxml/tree.h>
|
|
#include <libxml/xpath.h>
|
|
|
|
#include "libvirt/libvirt.h"
|
|
#include "buf.h"
|
|
#include "xmlrpc.h"
|
|
|
|
#include "testutils.h"
|
|
|
|
|
|
#define NLOOPS 100 /* default number of loops per test */
|
|
|
|
static char *progname;
|
|
|
|
|
|
static int
|
|
testMethodPlusINT(const void *data)
|
|
{
|
|
int retval = 0;
|
|
xmlRpcContextPtr cxt = (xmlRpcContextPtr) data;
|
|
|
|
if (xmlRpcCall(cxt, "plus", "i", "ii",
|
|
(const char *) &retval, 10, 10) < 0)
|
|
return -1;
|
|
|
|
return retval==(10+10) ? 0 : -1;
|
|
}
|
|
|
|
static int
|
|
testMethodPlusDOUBLE(const void *data)
|
|
{
|
|
double retval = 0;
|
|
xmlRpcContextPtr cxt = (xmlRpcContextPtr) data;
|
|
|
|
if (xmlRpcCall(cxt, "plus", "f", "ff",
|
|
(const char *) &retval, 10.1234, 10.1234) < 0)
|
|
return -1;
|
|
|
|
return retval==(10.1234+10.1234) ? 0 : -1;
|
|
}
|
|
|
|
static virBufferPtr
|
|
marshalRequest(const char *fmt, ...)
|
|
{
|
|
int argc;
|
|
xmlRpcValuePtr *argv;
|
|
virBufferPtr buf;
|
|
va_list ap;
|
|
|
|
va_start(ap, fmt);
|
|
argv = xmlRpcArgvNew(fmt, ap, &argc);
|
|
va_end(ap);
|
|
|
|
buf = xmlRpcMarshalRequest("test", argc, argv);
|
|
|
|
xmlRpcArgvFree(argc, argv);
|
|
return buf;
|
|
}
|
|
|
|
static int
|
|
checkRequestValue(const char *xmlstr, const char *xpath, int type, void *expected)
|
|
{
|
|
xmlDocPtr xml = NULL;
|
|
xmlXPathContextPtr ctxt = NULL;
|
|
xmlXPathObjectPtr obj = NULL;
|
|
int ret = -1;
|
|
|
|
xml = xmlReadDoc((const xmlChar *) xmlstr, "xmlrpctest.xml", NULL,
|
|
XML_PARSE_NOENT | XML_PARSE_NONET |
|
|
XML_PARSE_NOERROR | XML_PARSE_NOWARNING);
|
|
if (!xml)
|
|
goto error;
|
|
|
|
if (!(ctxt = xmlXPathNewContext(xml)))
|
|
goto error;
|
|
|
|
if (!(obj = xmlXPathEval(BAD_CAST xpath, ctxt)))
|
|
goto error;
|
|
|
|
switch(type) {
|
|
case XML_RPC_INTEGER:
|
|
if ((obj->type != XPATH_NUMBER) ||
|
|
((int) obj->floatval != *((int *)expected)))
|
|
goto error;
|
|
break;
|
|
case XML_RPC_DOUBLE:
|
|
if ((obj->type != XPATH_NUMBER) ||
|
|
((double) obj->floatval != *((double *)expected)))
|
|
goto error;
|
|
break;
|
|
case XML_RPC_STRING:
|
|
if ((obj->type != XPATH_STRING) ||
|
|
(strcmp((const char *)obj->stringval, (const char *)expected)))
|
|
goto error;
|
|
break;
|
|
default:
|
|
goto error;
|
|
}
|
|
ret = 0;
|
|
|
|
error:
|
|
if (obj)
|
|
xmlXPathFreeObject(obj);
|
|
if (ctxt)
|
|
xmlXPathFreeContext(ctxt);
|
|
if (xml)
|
|
xmlFreeDoc(xml);
|
|
return ret;
|
|
}
|
|
|
|
static int
|
|
testMarshalRequestINT(const void *data)
|
|
{
|
|
int num = INT_MAX;
|
|
int ret = 0;
|
|
int check = data ? *((int *)data) : 0;
|
|
virBufferPtr buf = marshalRequest("i", num);
|
|
|
|
if (check)
|
|
ret = checkRequestValue(buf->content,
|
|
"number(/methodCall/params/param[1]/value/int)",
|
|
XML_RPC_INTEGER, (void *) &num);
|
|
|
|
virBufferFree(buf);
|
|
return ret;
|
|
}
|
|
|
|
static int
|
|
testMarshalRequestSTRING(const void *data ATTRIBUTE_UNUSED)
|
|
{
|
|
const char *str = "This library will be really sexy.";
|
|
int ret = 0;
|
|
int check = data ? *((int *)data) : 0;
|
|
virBufferPtr buf = marshalRequest("s", str);
|
|
|
|
if (check)
|
|
ret = checkRequestValue(buf->content,
|
|
"string(/methodCall/params/param[1]/value/string)",
|
|
XML_RPC_STRING, (void *) str);
|
|
virBufferFree(buf);
|
|
return ret;
|
|
}
|
|
|
|
static int
|
|
testMarshalRequestDOUBLE(const void *data)
|
|
{
|
|
double num = 123456789.123;
|
|
int ret = 0;
|
|
int check = data ? *((int *)data) : 0;
|
|
virBufferPtr buf = marshalRequest("f", num);
|
|
|
|
if (check)
|
|
ret = checkRequestValue(buf->content,
|
|
"number(/methodCall/params/param[1]/value/double)",
|
|
XML_RPC_DOUBLE, (void *) &num);
|
|
|
|
virBufferFree(buf);
|
|
return ret;
|
|
}
|
|
|
|
static int
|
|
testBufferStrcat(const void *data ATTRIBUTE_UNUSED)
|
|
{
|
|
virBufferPtr buf = virBufferNew(1000*32); /* don't waste time with realloc */
|
|
int i;
|
|
|
|
for (i=0; i < 1000; i++)
|
|
virBufferStrcat(buf, "My name is ", "libvirt", ".\n", NULL);
|
|
|
|
virBufferFree(buf);
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
testBufferVSprintf(const void *data ATTRIBUTE_UNUSED)
|
|
{
|
|
virBufferPtr buf = virBufferNew(1000*32); /* don't waste time with realloc */
|
|
int i;
|
|
|
|
for (i=0; i < 1000; i++)
|
|
virBufferVSprintf(buf, "My name is %s.\n", "libvirt");
|
|
|
|
virBufferFree(buf);
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
main(int argc, char **argv)
|
|
{
|
|
xmlRpcContextPtr cxt = NULL;
|
|
int check = 1;
|
|
int ret = 0;
|
|
const char *url = "http://localhost:8000";
|
|
|
|
progname = argv[0];
|
|
|
|
if (argc > 2)
|
|
{
|
|
fprintf(stderr, "Usage: %s [url]\n", progname);
|
|
exit(EXIT_FAILURE);
|
|
}
|
|
if (argc == 2)
|
|
url = argv[1];
|
|
|
|
/*
|
|
* client-server tests
|
|
*/
|
|
if (!(cxt = xmlRpcContextNew(url)))
|
|
{
|
|
fprintf(stderr, "%s: failed create new RPC context\n", progname);
|
|
exit(EXIT_FAILURE);
|
|
}
|
|
|
|
if (virtTestRun("XML-RPC methodCall INT+INT",
|
|
NLOOPS, testMethodPlusINT, (const void *) cxt) != 0)
|
|
ret = -1;
|
|
|
|
if (virtTestRun("XML-RPC methodCall DOUBLE+DOUBLE",
|
|
NLOOPS, testMethodPlusDOUBLE, (const void *) cxt) != 0)
|
|
ret = -1;
|
|
|
|
xmlRpcContextFree(cxt);
|
|
|
|
/*
|
|
* regression / performance tests
|
|
*/
|
|
if (virtTestRun("XML-RPC request marshalling: INT (check)",
|
|
1, testMarshalRequestINT, (const void *) &check) != 0)
|
|
ret = -1;
|
|
if (virtTestRun("XML-RPC request marshalling: INT",
|
|
NLOOPS, testMarshalRequestINT, NULL) != 0)
|
|
ret = -1;
|
|
|
|
if (virtTestRun("XML-RPC request marshalling: DOUBLE (check)",
|
|
1, testMarshalRequestDOUBLE, (const void *) &check) != 0)
|
|
ret = -1;
|
|
if (virtTestRun("XML-RPC request marshalling: DOUBLE",
|
|
NLOOPS, testMarshalRequestDOUBLE, NULL) != 0)
|
|
ret = -1;
|
|
|
|
if (virtTestRun("XML-RPC request marshalling: STRING (check)",
|
|
1, testMarshalRequestSTRING, (void *) &check) != 0)
|
|
ret = -1;
|
|
if (virtTestRun("XML-RPC request marshalling: STRING",
|
|
NLOOPS, testMarshalRequestSTRING, NULL) != 0)
|
|
ret = -1;
|
|
|
|
if (virtTestRun("Buffer: strcat", NLOOPS, testBufferStrcat, NULL) != 0)
|
|
ret = -1;
|
|
if (virtTestRun("Buffer: sprintf", NLOOPS, testBufferVSprintf, NULL) != 0)
|
|
ret = -1;
|
|
|
|
|
|
exit(ret==0 ? EXIT_SUCCESS : EXIT_FAILURE);
|
|
}
|
|
|
|
|
|
/*
|
|
* vim: set tabstop=4:
|
|
* vim: set shiftwidth=4:
|
|
* vim: set expandtab:
|
|
*/
|