/*

  * Copyright (C) 2016  J. Ali Harlow <ali@juiblex.co.uk>

  *

  * This program is free software; you can redistribute it and/or modify

  * it under the terms of the GNU General Public License as published by

  * the Free Software Foundation; either version 2 of the License, or

  * (at your option) any later version.

  *

  * This program is distributed in the hope that it will be useful,

  * but WITHOUT ANY WARRANTY; without even the implied warranty of

  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

  * GNU General Public License for more details.

  *

  * You should have received a copy of the GNU General Public License along

  * with this program; if not, write to the Free Software Foundation, Inc.,

  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.

  */

 #include <stdlib.h>

 #include <razor.h>

 #include <glib.h>

 #include <gio/gio.h>

 #include "config.h"

 #include "plover/plover.h"

 static GList *open_razor_files;

 static void *file_get_contents(const char *uri,size_t *length,int private,

   struct razor_error **error)

 {

     GFile *file;

     gchar *path;

     void *addr;

     char *contents;

     gsize len;

     GError *err=NULL;

     g_message("file_get_contents(%s)",uri);

     file=g_file_new_for_uri(uri);

     path=g_file_get_path(file);

     if (path)

     {

 	g_object_unref(file);

 	addr=razor_file_default_get_contents(path,length,private,error);

 	if (addr)

 	    open_razor_files=g_list_prepend(open_razor_files,addr);

 	g_free(path);

     }

     else if (!g_file_load_contents(file,NULL,&contents,&len,NULL,&err))

     {

 	plover_propagate_g_error(error,err);

 	g_object_unref(file);

 	addr=NULL;

     }

     else

     {

 	g_object_unref(file);

 	addr=contents;

 	if (length)

 	    *length=len;

     }

     return addr;

 }

 static int file_free_contents(void *addr,size_t length)

 {

     int retval;

     GList *lnk;

     g_message("file_free_contents(%p)",addr);

     lnk=g_list_find(open_razor_files,addr);

     if (lnk)

     {

 	open_razor_files=g_list_delete_link(open_razor_files,lnk);

 	retval=razor_file_default_free_contents(addr,length);

     }

     else

     {

 	g_free(addr);

 	retval=0;

     }

     return retval;

 }

 void plover__file_io_init(void)

 {

     static gsize init=0;

     struct razor_file_vtable file_vtable;

     g_message("plover__file_io_init()");

     if (g_once_init_enter(&init))

     {

 	file_vtable.get_contents=file_get_contents;

 	file_vtable.free_contents=file_free_contents;

 	razor_file_set_vtable(&file_vtable);

 	g_once_init_leave(&init,1);

     }

 }