static int
librdf_query_rasqal_results_is_boolean(librdf_query_results* query_results)
{
librdf_query *query=query_results->query;
librdf_query_rasqal_context *context=(librdf_query_rasqal_context*)query->context;
if(!context->results)
return 1;
return rasqal_query_results_is_boolean(context->results);
}
/**
* rasqal_query_results_get_boolean:
* @query_results: #rasqal_query_results query_results
*
* Get boolean query result.
*
* The return value is only meaningful if this is a boolean
* query result - see rasqal_query_results_is_boolean()
*
* Return value: boolean query result - >0 is true, 0 is false, <0 on error
*/
int
rasqal_query_results_get_boolean(rasqal_query_results* query_results)
{
RASQAL_ASSERT_OBJECT_POINTER_RETURN_VALUE(query_results, rasqal_query_results, -1);
if(query_results->failed)
return -1;
if(!rasqal_query_results_is_boolean(query_results))
return -1;
if(query_results->ask_result >= 0)
return query_results->ask_result;
rasqal_query_results_ensure_have_row_internal(query_results);
query_results->ask_result = (query_results->result_count > 0) ? 1 : 0;
query_results->finished = 1;
return query_results->ask_result;
}
/*
* rasqal_query_results_write_json1:
* @iostr: #raptor_iostream to write the query to
* @results: #rasqal_query_results query results format
* @base_uri: #raptor_uri base URI of the output format
*
* Write a JSON version of the query results format to an
* iostream in a format - INTERNAL.
*
* If the writing succeeds, the query results will be exhausted.
*
* Return value: non-0 on failure
**/
static int
rasqal_query_results_write_json1(rasqal_query_results_formatter* formatter,
raptor_iostream *iostr,
rasqal_query_results* results,
raptor_uri *base_uri)
{
rasqal_world* world = rasqal_query_results_get_world(results);
rasqal_query* query = rasqal_query_results_get_query(results);
int i;
int row_comma;
int column_comma = 0;
rasqal_query_results_type type;
type = rasqal_query_results_get_type(results);
if(type != RASQAL_QUERY_RESULTS_BINDINGS &&
type != RASQAL_QUERY_RESULTS_BOOLEAN) {
rasqal_log_error_simple(query->world, RAPTOR_LOG_LEVEL_ERROR,
&query->locator,
"Cannot write JSON for %s query result format",
rasqal_query_results_type_label(type));
return 1;
}
raptor_iostream_counted_string_write("{\n", 2, iostr);
/* Header */
raptor_iostream_counted_string_write(" \"head\": {\n", 12, iostr);
if(rasqal_query_results_is_bindings(results)) {
raptor_iostream_counted_string_write(" \"vars\": [ ", 14, iostr);
for(i = 0; 1; i++) {
const unsigned char *name;
name = rasqal_query_results_get_binding_name(results, i);
if(!name)
break;
/* 'x', */
if(i > 0)
raptor_iostream_counted_string_write(", ", 2, iostr);
raptor_iostream_write_byte('\"', iostr);
raptor_iostream_string_write(name, iostr);
raptor_iostream_write_byte('\"', iostr);
}
raptor_iostream_counted_string_write(" ]\n", 3, iostr);
}
/* FIXME - could add link inside 'head': */
/* End Header */
raptor_iostream_counted_string_write(" },\n", 5, iostr);
/* Boolean Results */
if(rasqal_query_results_is_boolean(results)) {
raptor_iostream_counted_string_write(" ", 2, iostr);
rasqal_iostream_write_json_boolean(iostr, "boolean",
rasqal_query_results_get_boolean(results));
goto results3done;
}
/* Variable Binding Results */
raptor_iostream_counted_string_write(" \"results\": {\n", 15, iostr);
if(query) {
raptor_iostream_counted_string_write(" ", 4, iostr);
rasqal_iostream_write_json_boolean(iostr, "ordered",
(rasqal_query_get_order_condition(query, 0) != NULL));
raptor_iostream_counted_string_write(",\n", 2, iostr);
raptor_iostream_counted_string_write(" ", 4, iostr);
rasqal_iostream_write_json_boolean(iostr, "distinct",
rasqal_query_get_distinct(query));
raptor_iostream_counted_string_write(",\n", 2, iostr);
}
raptor_iostream_counted_string_write(" \"bindings\" : [\n", 19, iostr);
row_comma = 0;
while(!rasqal_query_results_finished(results)) {
if(row_comma)
raptor_iostream_counted_string_write(",\n", 2, iostr);
/* Result row */
raptor_iostream_counted_string_write(" {\n", 8, iostr);
column_comma = 0;
for(i = 0; i<rasqal_query_results_get_bindings_count(results); i++) {
const unsigned char *name = rasqal_query_results_get_binding_name(results, i);
rasqal_literal *l = rasqal_query_results_get_binding_value(results, i);
if(column_comma)
raptor_iostream_counted_string_write(",\n", 2, iostr);
/* <binding> */
raptor_iostream_counted_string_write(" \"", 9, iostr);
raptor_iostream_string_write(name, iostr);
raptor_iostream_counted_string_write("\" : { ", 6, iostr);
if(!l) {
raptor_iostream_string_write("\"type\": \"unbound\", \"value\": null", iostr);
} else {
const unsigned char* str;
size_t len;
switch(l->type) {
case RASQAL_LITERAL_URI:
raptor_iostream_string_write("\"type\": \"uri\", \"value\": \"", iostr);
str = RASQAL_GOOD_CAST(const unsigned char*, raptor_uri_as_counted_string(l->value.uri, &len));
raptor_string_ntriples_write(str, len, '"', iostr);
raptor_iostream_write_byte('"', iostr);
break;
case RASQAL_LITERAL_BLANK:
raptor_iostream_string_write("\"type\": \"bnode\", \"value\": \"", iostr);
raptor_string_ntriples_write(l->string, l->string_len, '"', iostr);
raptor_iostream_write_byte('"', iostr);
break;
case RASQAL_LITERAL_STRING:
raptor_iostream_string_write("\"type\": \"literal\", \"value\": \"", iostr);
raptor_string_ntriples_write(l->string, l->string_len, '"', iostr);
raptor_iostream_write_byte('"', iostr);
if(l->language) {
raptor_iostream_string_write(",\n \"xml:lang\" : \"", iostr);
raptor_iostream_string_write(RASQAL_GOOD_CAST(const unsigned char*, l->language), iostr);
raptor_iostream_write_byte('"', iostr);
}
if(l->datatype) {
raptor_iostream_string_write(",\n \"datatype\" : \"", iostr);
str = RASQAL_GOOD_CAST(const unsigned char*, raptor_uri_as_counted_string(l->datatype, &len));
raptor_string_ntriples_write(str, len, '"', iostr);
raptor_iostream_write_byte('"', iostr);
}
break;
case RASQAL_LITERAL_PATTERN:
case RASQAL_LITERAL_QNAME:
case RASQAL_LITERAL_INTEGER:
case RASQAL_LITERAL_XSD_STRING:
case RASQAL_LITERAL_BOOLEAN:
case RASQAL_LITERAL_DOUBLE:
case RASQAL_LITERAL_FLOAT:
case RASQAL_LITERAL_VARIABLE:
case RASQAL_LITERAL_DECIMAL:
case RASQAL_LITERAL_DATE:
case RASQAL_LITERAL_DATETIME:
case RASQAL_LITERAL_UDT:
case RASQAL_LITERAL_INTEGER_SUBTYPE:
case RASQAL_LITERAL_UNKNOWN:
default:
rasqal_log_error_simple(world, RAPTOR_LOG_LEVEL_ERROR, NULL,
"Cannot turn literal type %u into XML",
l->type);
}
}
/* End Binding */
raptor_iostream_counted_string_write(" }", 2, iostr);
column_comma = 1;
}
int
main(int argc, char *argv[])
{
int query_from_string = 0;
unsigned char *query_string = NULL;
unsigned char *uri_string = NULL;
int free_uri_string = 0;
unsigned char *base_uri_string = NULL;
rasqal_query *rq = NULL;
rasqal_query_results *results;
const char *ql_name = "sparql";
char *ql_uri = NULL;
int rc = 0;
raptor_uri *uri = NULL;
raptor_uri *base_uri = NULL;
char *filename = NULL;
char *p;
int usage = 0;
int help = 0;
int quiet = 0;
int count = 0;
int dryrun = 0;
raptor_sequence* data_graphs = NULL;
const char *result_format = NULL;
query_output_format output_format = QUERY_OUTPUT_UNKNOWN;
rasqal_feature query_feature = (rasqal_feature)-1;
int query_feature_value= -1;
unsigned char* query_feature_string_value = NULL;
rasqal_world *world;
raptor_world* raptor_world_ptr = NULL;
#ifdef RASQAL_INTERNAL
int store_results = -1;
#endif
char* data_graph_parser_name = NULL;
raptor_iostream* iostr = NULL;
const unsigned char* service_uri_string = 0;
raptor_uri* service_uri = NULL;
program = argv[0];
if((p = strrchr(program, '/')))
program = p + 1;
else if((p = strrchr(program, '\\')))
program = p + 1;
argv[0] = program;
world = rasqal_new_world();
if(!world || rasqal_world_open(world)) {
fprintf(stderr, "%s: rasqal_world init failed\n", program);
return(1);
}
raptor_world_ptr = rasqal_world_get_raptor(world);
rasqal_world_set_log_handler(world, world, roqet_log_handler);
#ifdef STORE_RESULTS_FLAG
/* This is for debugging only */
if(1) {
char* sr = getenv("RASQAL_DEBUG_STORE_RESULTS");
if(sr)
store_results = atoi(sr);
}
#endif
while (!usage && !help)
{
int c;
#ifdef HAVE_GETOPT_LONG
int option_index = 0;
c = getopt_long (argc, argv, GETOPT_STRING, long_options, &option_index);
#else
c = getopt (argc, argv, GETOPT_STRING);
#endif
if (c == -1)
break;
switch (c) {
case 0:
case '?': /* getopt() - unknown option */
usage = 1;
break;
case 'c':
count = 1;
break;
case 'd':
output_format = QUERY_OUTPUT_UNKNOWN;
if(optarg) {
int i;
for(i = 1; i <= QUERY_OUTPUT_LAST; i++)
if(!strcmp(optarg, query_output_format_labels[i][0])) {
output_format = (query_output_format)i;
break;
}
}
if(output_format == QUERY_OUTPUT_UNKNOWN) {
int i;
fprintf(stderr,
"%s: invalid argument `%s' for `" HELP_ARG(d, dump-query) "'\n",
program, optarg);
for(i = 1; i <= QUERY_OUTPUT_LAST; i++)
fprintf(stderr,
" %-12s for %s\n", query_output_format_labels[i][0],
query_output_format_labels[i][1]);
usage = 1;
}
break;
case 'e':
if(optarg) {
query_string = (unsigned char*)optarg;
query_from_string = 1;
}
break;
case 'f':
if(optarg) {
if(!strcmp(optarg, "help")) {
int i;
fprintf(stderr, "%s: Valid query features are:\n", program);
for(i = 0; i < (int)rasqal_get_feature_count(); i++) {
const char *feature_name;
const char *feature_label;
if(!rasqal_features_enumerate(world, (rasqal_feature)i,
&feature_name, NULL,
&feature_label)) {
const char *feature_type;
feature_type = (rasqal_feature_value_type((rasqal_feature)i) == 0) ? "" : " (string)";
fprintf(stderr, " %-20s %s%s\n", feature_name, feature_label,
feature_type);
}
}
fputs("Features are set with `" HELP_ARG(f, feature) " FEATURE=VALUE or `-f FEATURE'\nand take a decimal integer VALUE except where noted, defaulting to 1 if omitted.\n", stderr);
rasqal_free_world(world);
exit(0);
} else {
int i;
size_t arg_len = strlen(optarg);
for(i = 0; i < (int)rasqal_get_feature_count(); i++) {
const char *feature_name;
size_t len;
if(rasqal_features_enumerate(world, (rasqal_feature)i,
&feature_name, NULL, NULL))
continue;
len = strlen(feature_name);
if(!strncmp(optarg, feature_name, len)) {
query_feature = (rasqal_feature)i;
if(rasqal_feature_value_type(query_feature) == 0) {
if(len < arg_len && optarg[len] == '=')
query_feature_value=atoi(&optarg[len + 1]);
else if(len == arg_len)
query_feature_value = 1;
} else {
if(len < arg_len && optarg[len] == '=')
query_feature_string_value = (unsigned char*)&optarg[len + 1];
else if(len == arg_len)
query_feature_string_value = (unsigned char*)"";
}
break;
}
}
if(query_feature_value < 0 && !query_feature_string_value) {
fprintf(stderr, "%s: invalid argument `%s' for `" HELP_ARG(f, feature) "'\nTry '%s " HELP_ARG(f, feature) " help' for a list of valid features\n",
program, optarg, program);
usage = 1;
}
}
}
break;
case 'F':
if(optarg) {
if(!raptor_world_is_parser_name(raptor_world_ptr, optarg)) {
fprintf(stderr,
"%s: invalid parser name `%s' for `" HELP_ARG(F, format) "'\n\n",
program, optarg);
usage = 1;
} else {
data_graph_parser_name = optarg;
}
}
break;
case 'h':
help = 1;
break;
case 'n':
dryrun = 1;
break;
case 'p':
if(optarg)
service_uri_string = (const unsigned char*)optarg;
break;
case 'r':
if(optarg)
result_format = optarg;
break;
case 'i':
if(rasqal_language_name_check(world, optarg))
ql_name = optarg;
else {
int i;
fprintf(stderr,
"%s: invalid argument `%s' for `" HELP_ARG(i, input) "'\n",
program, optarg);
fprintf(stderr, "Valid arguments are:\n");
for(i = 0; 1; i++) {
const raptor_syntax_description* desc;
desc = rasqal_world_get_query_language_description(world, i);
if(desc == NULL)
break;
fprintf(stderr, " %-18s for %s\n", desc->names[0], desc->label);
}
usage = 1;
}
break;
case 'q':
quiet = 1;
break;
case 's':
case 'D':
case 'G':
if(optarg) {
rasqal_data_graph *dg = NULL;
rasqal_data_graph_flags type;
type = (c == 's' || c == 'G') ? RASQAL_DATA_GRAPH_NAMED :
RASQAL_DATA_GRAPH_BACKGROUND;
if(!strcmp((const char*)optarg, "-")) {
/* stdin: use an iostream not a URI data graph */
unsigned char* source_uri_string;
raptor_uri* iostr_base_uri = NULL;
raptor_uri* graph_name = NULL;
/* FIXME - get base URI from somewhere else */
source_uri_string = (unsigned char*)"file:///dev/stdin";
iostr_base_uri = raptor_new_uri(raptor_world_ptr, source_uri_string);
if(iostr_base_uri) {
iostr = raptor_new_iostream_from_file_handle(raptor_world_ptr,
stdin);
if(iostr)
dg = rasqal_new_data_graph_from_iostream(world,
iostr, iostr_base_uri,
graph_name,
type,
NULL,
data_graph_parser_name,
NULL);
}
if(base_uri)
raptor_free_uri(base_uri);
} else if(!access((const char*)optarg, R_OK)) {
/* file: use URI */
unsigned char* source_uri_string;
raptor_uri* source_uri;
raptor_uri* graph_name = NULL;
source_uri_string = raptor_uri_filename_to_uri_string((const char*)optarg);
source_uri = raptor_new_uri(raptor_world_ptr, source_uri_string);
raptor_free_memory(source_uri_string);
if(type == RASQAL_DATA_GRAPH_NAMED)
graph_name = source_uri;
if(source_uri)
dg = rasqal_new_data_graph_from_uri(world,
source_uri,
graph_name,
type,
NULL, data_graph_parser_name,
NULL);
if(source_uri)
raptor_free_uri(source_uri);
} else {
raptor_uri* source_uri;
raptor_uri* graph_name = NULL;
/* URI: use URI */
source_uri = raptor_new_uri(raptor_world_ptr,
(const unsigned char*)optarg);
if(type == RASQAL_DATA_GRAPH_NAMED)
graph_name = source_uri;
if(source_uri)
dg = rasqal_new_data_graph_from_uri(world,
source_uri,
graph_name,
type,
NULL, data_graph_parser_name,
NULL);
if(source_uri)
raptor_free_uri(source_uri);
}
if(!dg) {
fprintf(stderr, "%s: Failed to create data graph for `%s'\n",
program, optarg);
return(1);
}
if(!data_graphs) {
data_graphs = raptor_new_sequence((raptor_data_free_handler)rasqal_free_data_graph,
NULL);
if(!data_graphs) {
fprintf(stderr, "%s: Failed to create data graphs sequence\n",
program);
return(1);
}
}
raptor_sequence_push(data_graphs, dg);
}
break;
case 'W':
if(optarg)
warning_level = atoi(optarg);
else
warning_level = 0;
rasqal_world_set_warning_level(world, warning_level);
break;
case 'E':
ignore_errors = 1;
break;
case 'v':
fputs(rasqal_version_string, stdout);
fputc('\n', stdout);
rasqal_free_world(world);
exit(0);
#ifdef STORE_RESULTS_FLAG
case STORE_RESULTS_FLAG:
store_results = (!strcmp(optarg, "yes") || !strcmp(optarg, "YES"));
break;
#endif
}
}
if(!help && !usage) {
if(service_uri_string) {
if(optind != argc && optind != argc-1)
usage = 2; /* Title and usage */
} else if(query_string) {
if(optind != argc && optind != argc-1)
usage = 2; /* Title and usage */
} else {
if(optind != argc-1 && optind != argc-2)
usage = 2; /* Title and usage */
}
}
if(usage) {
if(usage > 1) {
fprintf(stderr, title_format_string, rasqal_version_string);
fputs("Rasqal home page: ", stderr);
fputs(rasqal_home_url_string, stderr);
fputc('\n', stderr);
fputs(rasqal_copyright_string, stderr);
fputs("\nLicense: ", stderr);
fputs(rasqal_license_string, stderr);
fputs("\n\n", stderr);
}
fprintf(stderr, "Try `%s " HELP_ARG(h, help) "' for more information.\n",
program);
rasqal_free_world(world);
exit(1);
}
if(help) {
int i;
printf(title_format_string, rasqal_version_string);
puts("Run an RDF query giving variable bindings or RDF triples.");
printf("Usage: %s [OPTIONS] <query URI> [base URI]\n", program);
printf(" %s [OPTIONS] -e <query string> [base URI]\n", program);
printf(" %s [OPTIONS] -p <SPARQL protocol service URI> -e <query string> [base URI]\n\n", program);
fputs(rasqal_copyright_string, stdout);
fputs("\nLicense: ", stdout);
puts(rasqal_license_string);
fputs("Rasqal home page: ", stdout);
puts(rasqal_home_url_string);
puts("\nNormal operation is to execute the query retrieved from URI <query URI>");
puts("and print the results in a simple text format.");
puts("\nMain options:");
puts(HELP_TEXT("e", "exec QUERY ", "Execute QUERY string instead of <query URI>"));
puts(HELP_TEXT("p", "protocol URI ", "Execute QUERY against a SPARQL protocol service URI"));
puts(HELP_TEXT("i", "input LANGUAGE ", "Set query language name to one of:"));
for(i = 0; 1; i++) {
const raptor_syntax_description* desc;
desc = rasqal_world_get_query_language_description(world, i);
if(!desc)
break;
printf(" %-15s %s", desc->names[0], desc->label);
if(!i)
puts(" (default)");
else
putchar('\n');
}
puts(HELP_TEXT("r", "results FORMAT ", "Set query results output format to one of:"));
puts(" For variable bindings and boolean results:");
puts(" simple A simple text format (default)");
for(i = 0; 1; i++) {
const raptor_syntax_description* desc;
desc = rasqal_world_get_query_results_format_description(world, i);
if(!desc)
break;
if(desc->flags & RASQAL_QUERY_RESULTS_FORMAT_FLAG_WRITER)
printf(" %-10s %s\n", desc->names[0], desc->label);
}
puts(" For RDF graph results:");
for(i = 0; 1; i++) {
const raptor_syntax_description *desc;
desc = raptor_world_get_parser_description(raptor_world_ptr, i);
if(!desc)
break;
printf(" %-15s %s", desc->names[0], desc->label);
if(!i)
puts(" (default)");
else
putchar('\n');
}
puts("\nAdditional options:");
puts(HELP_TEXT("c", "count ", "Count triples - no output"));
puts(HELP_TEXT("d FORMAT", "dump-query FORMAT", HELP_PAD "Print the parsed query out in FORMAT:"));
puts(HELP_TEXT("D URI", "data URI ", "RDF data source URI"));
for(i = 1; i <= QUERY_OUTPUT_LAST; i++)
printf(" %-15s %s\n", query_output_format_labels[i][0],
query_output_format_labels[i][1]);
puts(HELP_TEXT("E", "ignore-errors ", "Ignore error messages"));
puts(HELP_TEXT("f FEATURE(=VALUE)", "feature FEATURE(=VALUE)", HELP_PAD "Set query features" HELP_PAD "Use `-f help' for a list of valid features"));
puts(HELP_TEXT("F NAME", "format NAME ", "Set data source format name (default: guess)"));
puts(HELP_TEXT("G URI", "named URI ", "RDF named graph data source URI"));
puts(HELP_TEXT("h", "help ", "Print this help, then exit"));
puts(HELP_TEXT("n", "dryrun ", "Prepare but do not run the query"));
puts(HELP_TEXT("q", "quiet ", "No extra information messages"));
puts(HELP_TEXT("s URI", "source URI ", "Same as `-G URI'"));
puts(HELP_TEXT("v", "version ", "Print the Rasqal version"));
puts(HELP_TEXT("w", "walk-query ", "Print query. Same as '-d structure'"));
puts(HELP_TEXT("W LEVEL", "warnings LEVEL", HELP_PAD "Set warning message LEVEL from 0: none to 100: all"));
#ifdef STORE_RESULTS_FLAG
puts(HELP_TEXT_LONG("store-results BOOL", "DEBUG: Set store results yes/no BOOL"));
#endif
puts("\nReport bugs to http://bugs.librdf.org/");
rasqal_free_world(world);
exit(0);
}
if(service_uri_string) {
service_uri = raptor_new_uri(raptor_world_ptr, service_uri_string);
if(optind == argc-1) {
base_uri_string = (unsigned char*)argv[optind];
}
} else if(query_string) {
if(optind == argc-1)
base_uri_string = (unsigned char*)argv[optind];
} else {
if(optind == argc-1)
uri_string = (unsigned char*)argv[optind];
else {
uri_string = (unsigned char*)argv[optind++];
base_uri_string = (unsigned char*)argv[optind];
}
/* If uri_string is "path-to-file", turn it into a file: URI */
if(!strcmp((const char*)uri_string, "-")) {
if(!base_uri_string) {
fprintf(stderr, "%s: A Base URI is required when reading from standard input.\n",
program);
return(1);
}
uri_string = NULL;
} else if(!access((const char*)uri_string, R_OK)) {
filename = (char*)uri_string;
uri_string = raptor_uri_filename_to_uri_string(filename);
free_uri_string = 1;
}
if(uri_string) {
uri = raptor_new_uri(raptor_world_ptr, uri_string);
if(!uri) {
fprintf(stderr, "%s: Failed to create URI for %s\n",
program, uri_string);
return(1);
}
} else
uri = NULL; /* stdin */
}
if(!base_uri_string) {
if(uri)
base_uri = raptor_uri_copy(uri);
} else
base_uri = raptor_new_uri(raptor_world_ptr, base_uri_string);
if(base_uri_string && !base_uri) {
fprintf(stderr, "%s: Failed to create URI for %s\n",
program, base_uri_string);
return(1);
}
if(service_uri_string) {
/* NOP - nothing to do here */
} else if(query_string) {
/* NOP - already got it */
} else if(!uri_string) {
size_t read_len;
query_string = (unsigned char*)calloc(FILE_READ_BUF_SIZE, 1);
read_len = fread(query_string, FILE_READ_BUF_SIZE, 1, stdin);
if(read_len < FILE_READ_BUF_SIZE) {
if(ferror(stdin))
fprintf(stderr, "%s: query string stdin read failed - %s\n",
program, strerror(errno));
else
fprintf(stderr, "%s: query string stdin read failed - no error\n",
program);
rc = 1;
goto tidy_setup;
}
query_from_string = 0;
} else if(filename) {
raptor_stringbuffer *sb = raptor_new_stringbuffer();
size_t len;
FILE *fh;
unsigned char* buffer;
fh = fopen(filename, "r");
if(!fh) {
fprintf(stderr, "%s: file '%s' open failed - %s",
program, filename, strerror(errno));
rc = 1;
goto tidy_setup;
}
buffer = (unsigned char*)malloc(FILE_READ_BUF_SIZE);
while(!feof(fh)) {
size_t read_len;
read_len = fread((char*)buffer, 1, FILE_READ_BUF_SIZE, fh);
if(read_len > 0)
raptor_stringbuffer_append_counted_string(sb, buffer, read_len, 1);
if(read_len < FILE_READ_BUF_SIZE) {
if(ferror(fh)) {
fprintf(stderr, "%s: file '%s' read failed - %s\n",
program, filename, strerror(errno));
free(buffer);
fclose(fh);
rc = 1;
goto tidy_setup;
}
break;
}
}
free(buffer);
fclose(fh);
len = raptor_stringbuffer_length(sb);
query_string = (unsigned char*)malloc(len + 1);
raptor_stringbuffer_copy_to_string(sb, query_string, len);
raptor_free_stringbuffer(sb);
query_from_string = 0;
} else {
raptor_www *www;
www = raptor_new_www(raptor_world_ptr);
if(www) {
raptor_www_fetch_to_string(www, uri, (void**)&query_string, NULL, malloc);
raptor_free_www(www);
}
if(!query_string || error_count) {
fprintf(stderr, "%s: Retrieving query at URI '%s' failed\n",
program, uri_string);
rc = 1;
goto tidy_setup;
}
query_from_string = 0;
}
if(!quiet) {
if(service_uri) {
fprintf(stderr, "%s: Calling SPARQL service at URI %s", program,
service_uri_string);
if(query_string)
fprintf(stderr, " with query '%s'", query_string);
if(base_uri_string)
fprintf(stderr, " with base URI %s\n", base_uri_string);
fputc('\n', stderr);
} else if(query_from_string) {
if(base_uri_string)
fprintf(stderr, "%s: Running query '%s' with base URI %s\n", program,
query_string, base_uri_string);
else
fprintf(stderr, "%s: Running query '%s'\n", program,
query_string);
} else if(filename) {
if(base_uri_string)
fprintf(stderr, "%s: Querying from file %s with base URI %s\n", program,
filename, base_uri_string);
else
fprintf(stderr, "%s: Querying from file %s\n", program, filename);
} else if(uri_string) {
if(base_uri_string)
fprintf(stderr, "%s: Querying URI %s with base URI %s\n", program,
uri_string, base_uri_string);
else
fprintf(stderr, "%s: Querying URI %s\n", program, uri_string);
}
}
if(service_uri) {
/* Execute query remotely */
if(!dryrun)
results = roqet_call_sparql_service(world, service_uri, query_string,
data_graphs,
/* service_format */ NULL);
} else {
/* Execute query in this query engine (from URI or from -e QUERY) */
rq = roqet_init_query(world,
ql_name, ql_uri, query_string,
base_uri,
query_feature, query_feature_value,
query_feature_string_value,
store_results,
data_graphs);
if(!rq) {
rc = 1;
goto tidy_query;
}
if(output_format != QUERY_OUTPUT_UNKNOWN && !quiet)
roqet_print_query(rq, raptor_world_ptr, output_format, base_uri);
if(!dryrun) {
results = rasqal_query_execute(rq);
}
}
/* No results from dryrun */
if(dryrun)
goto tidy_query;
if(!results) {
fprintf(stderr, "%s: Query execution failed\n", program);
rc = 1;
goto tidy_query;
}
if(rasqal_query_results_is_bindings(results)) {
if(result_format)
rc = print_formatted_query_results(world, results,
raptor_world_ptr, stdout,
result_format, base_uri, quiet);
else
print_bindings_result_simple(results, stdout, quiet, count);
} else if(rasqal_query_results_is_boolean(results)) {
if(result_format)
rc = print_formatted_query_results(world, results,
raptor_world_ptr, stdout,
result_format, base_uri, quiet);
else
print_boolean_result_simple(results, stdout, quiet);
} else if(rasqal_query_results_is_graph(results)) {
if(!result_format)
result_format = DEFAULT_GRAPH_FORMAT;
rc = print_graph_result(rq, results, raptor_world_ptr,
stdout, result_format, base_uri, quiet);
} else {
fprintf(stderr, "%s: Query returned unknown result format\n", program);
rc = 1;
}
rasqal_free_query_results(results);
tidy_query:
if(!query_from_string)
free(query_string);
if(rq)
rasqal_free_query(rq);
tidy_setup:
if(data_graphs)
raptor_free_sequence(data_graphs);
if(base_uri)
raptor_free_uri(base_uri);
if(uri)
raptor_free_uri(uri);
if(free_uri_string)
raptor_free_memory(uri_string);
if(iostr)
raptor_free_iostream(iostr);
if(service_uri)
raptor_free_uri(service_uri);
rasqal_free_world(world);
if(error_count && !ignore_errors)
return 1;
if(warning_count && warning_level != 0)
return 2;
return (rc);
}
/*
* rasqal_query_results_write_sparql_xml:
* @iostr: #raptor_iostream to write the query results to
* @results: #rasqal_query_results query results input
* @base_uri: #raptor_uri base URI of the output format
*
* Write the fourth version of the SPARQL XML query results format to an
* iostream in a format - INTERNAL.
*
* If the writing succeeds, the query results will be exhausted.
*
* Return value: non-0 on failure
**/
static int
rasqal_query_results_write_sparql_xml(rasqal_query_results_formatter* formatter,
raptor_iostream *iostr,
rasqal_query_results* results,
raptor_uri *base_uri)
{
int rc=1;
rasqal_world* world = rasqal_query_results_get_world(results);
raptor_xml_writer* xml_writer=NULL;
raptor_namespace *res_ns=NULL;
raptor_namespace_stack *nstack=NULL;
raptor_xml_element *sparql_element=NULL;
raptor_xml_element *results_element=NULL;
raptor_xml_element *result_element=NULL;
raptor_xml_element *element1=NULL;
raptor_xml_element *binding_element=NULL;
raptor_xml_element *variable_element=NULL;
raptor_qname **attrs=NULL;
int i;
if(!rasqal_query_results_is_bindings(results) &&
!rasqal_query_results_is_boolean(results)) {
rasqal_log_error_simple(world, RAPTOR_LOG_LEVEL_ERROR,
NULL,
"Can only write XML format v3 for variable binding and boolean results");
return 1;
}
nstack = raptor_new_namespaces(world->raptor_world_ptr, 1);
if(!nstack)
return 1;
xml_writer = raptor_new_xml_writer(world->raptor_world_ptr,
nstack,
iostr);
if(!xml_writer)
goto tidy;
res_ns=raptor_new_namespace(nstack,
NULL,
(const unsigned char*)"http://www.w3.org/2005/sparql-results#",
0);
if(!res_ns)
goto tidy;
sparql_element=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"sparql",
NULL, base_uri);
if(!sparql_element)
goto tidy;
raptor_xml_writer_start_element(xml_writer, sparql_element);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
/* <head> */
element1=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"head",
NULL, base_uri);
if(!element1)
goto tidy;
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)" ", 2);
raptor_xml_writer_start_element(xml_writer, element1);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
if(rasqal_query_results_is_bindings(results)) {
for(i=0; 1; i++) {
const unsigned char *name;
name=rasqal_query_results_get_binding_name(results, i);
if(!name)
break;
/* <variable name="x"/> */
variable_element=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"variable",
NULL, base_uri);
if(!variable_element)
goto tidy;
attrs=(raptor_qname **)raptor_alloc_memory(sizeof(raptor_qname*));
if(!attrs)
goto tidy;
attrs[0] = raptor_new_qname_from_namespace_local_name(world->raptor_world_ptr,
res_ns,
(const unsigned char*)"name",
(const unsigned char*)name); /* attribute value */
if(!attrs[0]) {
raptor_free_memory((void*)attrs);
goto tidy;
}
raptor_xml_element_set_attributes(variable_element, attrs, 1);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)" ", 4);
raptor_xml_writer_empty_element(xml_writer, variable_element);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
raptor_free_xml_element(variable_element);
variable_element=NULL;
}
}
/* FIXME - could add <link> inside <head> */
/* </head> */
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)" ", 2);
raptor_xml_writer_end_element(xml_writer, element1);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
raptor_free_xml_element(element1);
element1=NULL;
/* Boolean Results */
if(rasqal_query_results_is_boolean(results)) {
result_element=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"boolean",
NULL, base_uri);
if(!result_element)
goto tidy;
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)" ", 2);
raptor_xml_writer_start_element(xml_writer, result_element);
if(rasqal_query_results_get_boolean(results))
raptor_xml_writer_raw(xml_writer, RASQAL_XSD_BOOLEAN_TRUE);
else
raptor_xml_writer_raw(xml_writer, RASQAL_XSD_BOOLEAN_FALSE);
raptor_xml_writer_end_element(xml_writer, result_element);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
goto results3done;
}
/* Variable Binding Results */
/* <results> */
results_element=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"results",
NULL, base_uri);
if(!results_element)
goto tidy;
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)" ", 2);
raptor_xml_writer_start_element(xml_writer, results_element);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
/* declare result element for later multiple use */
result_element=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"result",
NULL, base_uri);
if(!result_element)
goto tidy;
while(!rasqal_query_results_finished(results)) {
/* <result> */
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)" ", 4);
raptor_xml_writer_start_element(xml_writer, result_element);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
for(i=0; i<rasqal_query_results_get_bindings_count(results); i++) {
const unsigned char *name=rasqal_query_results_get_binding_name(results, i);
rasqal_literal *l=rasqal_query_results_get_binding_value(results, i);
/* <binding> */
binding_element=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"binding",
NULL, base_uri);
if(!binding_element)
goto tidy;
attrs=(raptor_qname **)raptor_alloc_memory(sizeof(raptor_qname*));
if(!attrs)
goto tidy;
attrs[0] = raptor_new_qname_from_namespace_local_name(world->raptor_world_ptr,
res_ns,
(const unsigned char*)"name",
name);
if(!attrs[0]) {
raptor_free_memory((void*)attrs);
goto tidy;
}
raptor_xml_element_set_attributes(binding_element, attrs, 1);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)" ", 6);
raptor_xml_writer_start_element(xml_writer, binding_element);
if(!l) {
element1=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"unbound",
NULL, base_uri);
if(!element1)
goto tidy;
raptor_xml_writer_empty_element(xml_writer, element1);
} else switch(l->type) {
case RASQAL_LITERAL_URI:
element1=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"uri",
NULL, base_uri);
if(!element1)
goto tidy;
raptor_xml_writer_start_element(xml_writer, element1);
raptor_xml_writer_cdata(xml_writer, (const unsigned char*)raptor_uri_as_string(l->value.uri));
raptor_xml_writer_end_element(xml_writer, element1);
break;
case RASQAL_LITERAL_BLANK:
element1=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"bnode",
NULL, base_uri);
if(!element1)
goto tidy;
raptor_xml_writer_start_element(xml_writer, element1);
raptor_xml_writer_cdata(xml_writer, (const unsigned char*)l->string);
raptor_xml_writer_end_element(xml_writer, element1);
break;
case RASQAL_LITERAL_STRING:
case RASQAL_LITERAL_UDT:
element1=raptor_new_xml_element_from_namespace_local_name(res_ns,
(const unsigned char*)"literal",
NULL, base_uri);
if(!element1)
goto tidy;
if(l->language || l->datatype) {
attrs=(raptor_qname **)raptor_alloc_memory(sizeof(raptor_qname*));
if(!attrs)
goto tidy;
if(l->language)
attrs[0]=raptor_new_qname(nstack,
(const unsigned char*)"xml:lang",
(const unsigned char*)l->language);
else
attrs[0] = raptor_new_qname_from_namespace_local_name(world->raptor_world_ptr,
res_ns,
(const unsigned char*)"datatype",
(const unsigned char*)raptor_uri_as_string(l->datatype));
if(!attrs[0]) {
raptor_free_memory((void*)attrs);
goto tidy;
}
raptor_xml_element_set_attributes(element1, attrs, 1);
}
raptor_xml_writer_start_element(xml_writer, element1);
raptor_xml_writer_cdata_counted(xml_writer,
(const unsigned char*)l->string,
l->string_len);
raptor_xml_writer_end_element(xml_writer, element1);
break;
case RASQAL_LITERAL_PATTERN:
case RASQAL_LITERAL_QNAME:
case RASQAL_LITERAL_INTEGER:
case RASQAL_LITERAL_XSD_STRING:
case RASQAL_LITERAL_BOOLEAN:
case RASQAL_LITERAL_DOUBLE:
case RASQAL_LITERAL_FLOAT:
case RASQAL_LITERAL_VARIABLE:
case RASQAL_LITERAL_DECIMAL:
case RASQAL_LITERAL_DATETIME:
case RASQAL_LITERAL_INTEGER_SUBTYPE:
case RASQAL_LITERAL_UNKNOWN:
default:
rasqal_log_error_simple(world, RAPTOR_LOG_LEVEL_ERROR,
NULL,
"Cannot turn literal type %d into XML",
l->type);
goto tidy;
}
if(element1) {
raptor_free_xml_element(element1);
element1=NULL;
}
/* </binding> */
raptor_xml_writer_end_element(xml_writer, binding_element);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
raptor_free_xml_element(binding_element);
binding_element=NULL;
}
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)" ", 4);
raptor_xml_writer_end_element(xml_writer, result_element);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
rasqal_query_results_next(results);
}
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)" ", 2);
raptor_xml_writer_end_element(xml_writer, results_element);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
results3done:
rc=0;
raptor_xml_writer_end_element(xml_writer, sparql_element);
raptor_xml_writer_raw_counted(xml_writer, (const unsigned char*)"\n", 1);
tidy:
if(element1)
raptor_free_xml_element(element1);
if(variable_element)
raptor_free_xml_element(variable_element);
if(binding_element)
raptor_free_xml_element(binding_element);
if(result_element)
raptor_free_xml_element(result_element);
if(results_element)
raptor_free_xml_element(results_element);
if(sparql_element)
raptor_free_xml_element(sparql_element);
if(res_ns)
raptor_free_namespace(res_ns);
if(xml_writer)
raptor_free_xml_writer(xml_writer);
if(nstack)
raptor_free_namespaces(nstack);
return rc;
}