mirror of https://framagit.org/bortzmeyer/echoping
You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
86 lines
2.0 KiB
C
86 lines
2.0 KiB
C
#include <stdio.h>
|
|
|
|
/* http://xmlrpc-c.sourceforge.net/ */
|
|
#include <xmlrpc.h>
|
|
#include <xmlrpc_client.h>
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#define CLIENT_NAME "XML-RPC Adams Names plugin for echoping"
|
|
#define CLIENT_VERSION "0.0"
|
|
|
|
#define ENDPOINT "http://www.adamsnames.tc/api/xmlrpc"
|
|
|
|
void
|
|
die_if_fault_occurred (xmlrpc_env * env)
|
|
{
|
|
if (env->fault_occurred)
|
|
{
|
|
fprintf (stderr, "XML-RPC Fault: %s (%d)\n",
|
|
env->fault_string, env->fault_code);
|
|
exit (1);
|
|
}
|
|
}
|
|
|
|
int
|
|
main (int argc, char **argv)
|
|
{
|
|
int value;
|
|
xmlrpc_value *result;
|
|
xmlrpc_bool free, read_contacts;
|
|
xmlrpc_int32 reason;
|
|
xmlrpc_value *domain_h;
|
|
xmlrpc_int32 found;
|
|
xmlrpc_value *error;
|
|
xmlrpc_env env;
|
|
char *domain;
|
|
char *date, *holder;
|
|
|
|
if (argc != 2)
|
|
{
|
|
fprintf (stderr, "Usage: %s domain\n", argv[0]);
|
|
exit (1);
|
|
}
|
|
|
|
domain = argv[1];
|
|
|
|
/* Start up our XML-RPC client library. */
|
|
xmlrpc_client_init (XMLRPC_CLIENT_NO_FLAGS, CLIENT_NAME, CLIENT_VERSION);
|
|
|
|
/* Initialize our error-handling environment. */
|
|
xmlrpc_env_init (&env);
|
|
|
|
/* Call the server */
|
|
result = xmlrpc_client_call (&env, ENDPOINT, "domquery", "(s)", domain);
|
|
die_if_fault_occurred (&env);
|
|
|
|
xmlrpc_parse_value (&env, result, "{s:i,*}", "found", &found);
|
|
die_if_fault_occurred (&env);
|
|
if (found)
|
|
{
|
|
printf ("%s is there\n", domain);
|
|
xmlrpc_parse_value (&env, result, "{s:S,s:i,s:A,*}", "domain",
|
|
&domain_h, "found", &found, "error", &error);
|
|
die_if_fault_occurred (&env);
|
|
/* printf ("Type of domain: %d\n", xmlrpc_value_type(domain_h)); */
|
|
xmlrpc_parse_value (&env, domain_h, "{s:s,s:s,*}", "registered", &date,
|
|
"org", &holder);
|
|
die_if_fault_occurred (&env);
|
|
printf ("Registered on %s by %s\n", date, holder);
|
|
}
|
|
else
|
|
{
|
|
printf ("Unknown domain %s\n", domain);
|
|
}
|
|
/* Dispose of our result value. */
|
|
xmlrpc_DECREF (result);
|
|
/* Clean up our error-handling environment. */
|
|
xmlrpc_env_clean (&env);
|
|
|
|
/* Shutdown our XML-RPC client library. */
|
|
xmlrpc_client_cleanup ();
|
|
|
|
}
|