-#include "babel/babel_handler.h"
-
-#include <stdio.h>
-#include <string.h>
-#include <stdlib.h>
-#include <glib.h>
-#include <glib/gprintf.h>
-#include <libgda/libgda.h>
-#include <libgda/sql-parser/gda-sql-parser.h>
-#include <libsoup/soup.h>
-
-typedef struct _metadata {
- const gchar *element_name;
- gchar *ifid;
- gchar *title;
- gchar *author;
- gchar *firstpublished;
- gboolean error;
- gchar *error_message;
- gchar *error_code;
-} metadata;
-
-void start_element(
- GMarkupParseContext *context,
- const gchar *element_name,
- const gchar **attribute_names,
- const gchar **attribute_values,
- gpointer data,
- GError **error)
-{
- metadata *md = (metadata*) data;
- md->element_name = element_name;
-
- if( !strcmp(element_name, "errorCode") ) {
- md->error = 1;
- md->error_message = "";
- md->error_code = "";
- }
-
- if( !strcmp(element_name, "ifindex") ) {
- md->ifid = "";
- md->title = "";
- md->author = "";
- md->firstpublished = "";
- }
-}
-
-void text(
- GMarkupParseContext *context,
- const gchar *text,
- gsize text_len,
- gpointer data,
- GError **error)
-{
- metadata *md = (metadata*) data;
-
- if( !strcmp(md->element_name, "errorCode") ) {
- md->error_code = g_strndup(text, text_len);
- }
- else if( !strcmp(md->element_name, "errorMessage") ) {
- md->error_message = g_strndup(text, text_len);
- }
- else if( !strcmp(md->element_name, "ifid") ) {
- if( strlen(md->ifid) < text_len )
- md->ifid = g_strndup(text, text_len);
- }
- else if( !strcmp(md->element_name, "title") ) {
- if( strlen(md->title) < text_len )
- md->title = g_strndup(text, text_len);
- }
- else if( !strcmp(md->element_name, "author") ) {
- if( strlen(md->author) < text_len )
- md->author = g_strndup(text, text_len);
- }
- else if( !strcmp(md->element_name, "firstpublished") ) {
- if( strlen(md->firstpublished) < text_len )
- md->firstpublished = g_strndup(text, text_len);
- }
-}
-
-void end_element(
- GMarkupParseContext *context,
- const gchar *element_name,
- gpointer data,
- GError **error)
-{
- if( !strcmp(element_name, "ifindex") ) {
- metadata *md = (metadata*) data;
- printf("IFID: %s\nTitle: %s\nAuthor: %s\nFirst published: %s\n", md->ifid, md->title, md->author, md->firstpublished);
- }
-}
-
-/*
- * run a non SELECT command and stops if an error occurs
- */
-void
-run_sql_non_select(GdaConnection *cnc, const gchar *sql)
-{
- GdaStatement *stmt;
- GError *error = NULL;
- gint nrows;
- const gchar *remain;
- GdaSqlParser *parser;
-
- parser = g_object_get_data(G_OBJECT(cnc), "parser");
- stmt = gda_sql_parser_parse_string(parser, sql, &remain, &error);
- if(remain)
- g_print ("REMAINS: %s\n", remain);
-
- nrows = gda_connection_statement_execute_non_select(cnc, stmt, NULL, NULL, &error);
- if(nrows == -1)
- g_error("NON SELECT error: %s\n", error && error->message ? error->message : "no detail");
- g_object_unref(stmt);
-}
-
-int main(int argc, char **argv) {
- GError *err = NULL;
- metadata data;
- data.error = 0;
-
- if(argc < 2) {
- fprintf(stderr, "Usage: %s <story file>\n", argv[0]);
- return 1;
- }
-
- g_type_init();
-
- babel_init(argv[1]);
- int len = babel_treaty(GET_STORY_FILE_METADATA_EXTENT_SEL, NULL, 0);
- gchar *ifiction;
- if(len) {
- printf("Metadata found in file.\n");
- gchar *buffer = malloc(len * sizeof(gchar));
- babel_treaty(GET_STORY_FILE_METADATA_SEL, buffer, len);
- ifiction = g_strndup(buffer, len);
- g_free(buffer);
- } else {
- printf("No metadata found in file, performing IFDB lookup.\n");
- gchar *ifid = malloc(TREATY_MINIMUM_EXTENT * sizeof(gchar));
- if( !babel_treaty(GET_STORY_FILE_IFID_SEL, ifid, TREATY_MINIMUM_EXTENT) ) {
- fprintf(stderr, "Unable to create an IFID (A serious problem occurred while loading the file).\n");
- babel_release();
- return 1;
- }
- printf("Looking up IFID: %s.\n", ifid);
- babel_release();
-
- SoupSession *session = soup_session_async_new();
- char *uri_string = g_strconcat("http://ifdb.tads.org/viewgame?ifiction&ifid=", ifid, NULL);
- SoupMessage *message = soup_message_new("GET", uri_string);
- g_free(uri_string);
- soup_message_headers_append(message->request_headers, "Connection", "close");
- if(soup_session_send_message(session, message) != 200)
- g_printerr("ERROR: did not get HTTP status 200\n");
- ifiction = g_strndup(message->response_body->data, message->response_body->length);
- g_object_unref(message);
- g_object_unref(session);
- }
-
- ifiction = g_strchomp(ifiction);
-
- GMarkupParser xml_parser = {start_element, end_element, text, NULL, NULL};
- GMarkupParseContext *context = g_markup_parse_context_new(&xml_parser, 0, &data, NULL);
-
- if( g_markup_parse_context_parse(context, ifiction, strlen(ifiction), &err) == FALSE ) {
- fprintf(stderr, "Metadata parse failed: %s\n", err->message);
- }
-
- g_markup_parse_context_free(context);
- g_free(ifiction);
-
- babel_release();
-
- // Check for errors
- if(data.error) {
- fprintf(stderr, "ERROR %s: %s\n", data.error_code, data.error_message);
- return 1;
- }
-
- // Open DB connection
- GdaConnection *cnc;
- GdaSqlParser *sql_parser;
-
- gda_init();
- cnc = gda_connection_open_from_string("SQLite", "DB_DIR=.;DB_NAME=library", NULL, GDA_CONNECTION_OPTIONS_NONE, &err);
- if(!cnc) {
- fprintf(stderr, "Could not open connection to SQLite database in library.db file: %s\n", err && err->message ? err->message : "No details");
- return 1;
- }
-
- sql_parser = gda_connection_create_parser(cnc);
- if(!sql_parser) // cnc does not provide its own parser, use default one
- sql_parser = gda_sql_parser_new();
-
- g_object_set_data_full(G_OBJECT(cnc), "parser", sql_parser, g_object_unref);
-
- // Create stories table
- //run_sql_non_select(cnc, "DROP TABLE IF EXISTS stories");
- run_sql_non_select(cnc, "CREATE TABLE IF NOT EXISTS stories (ifid text not null primary key, title text, author text, firstpublished text)");
-
- // Populate the table
- GValue *v1, *v2, *v3, *v4;
- v1 = gda_value_new_from_string(data.ifid, G_TYPE_STRING);
- v2 = gda_value_new_from_string(data.title, G_TYPE_STRING);
- v3 = gda_value_new_from_string(data.author, G_TYPE_STRING);
- v4 = gda_value_new_from_string(data.firstpublished, G_TYPE_STRING);
-
- if( !gda_insert_row_into_table(cnc, "stories", &err, "ifid", v1, "title", v2, "author", v3, "firstpublished", v4, NULL) ) {
- g_warning("Could not INSERT data into the 'stories' table: %s\n", err && err->message ? err->message : "No details");
- }
-
- gda_value_free(v1);
- gda_value_free(v2);
- gda_value_free(v3);
- gda_value_free(v4);
-
- // Dump the table contents
- GdaDataModel *data_model;
- GdaStatement *stmt = gda_sql_parser_parse_string(sql_parser, "SELECT * FROM stories", NULL, NULL);
- data_model = gda_connection_statement_execute_select(cnc, stmt, NULL, &err);
- if(!data_model)
- g_error("Could not get the contents of the 'stories' table: %s\n", err && err->message ? err->message : "No details");
- printf("Dumping library table:\n");
- gda_data_model_dump(data_model, stdout);
-
- g_object_unref(stmt);
- g_object_unref(data_model);
-
- gda_connection_close(cnc);
- return 0;
-}