/*

  * Copyright (C) 2009, 2011, 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 <stdio.h>

 #include <string.h>

 #include <limits.h>

 #include <lua.h>

 #include "config.h"

 #include "plover/plover.h"

 #include "plover/uri-handler.h"

 #include "test-uri-handler-gresource.h"

 LUALIB_API int luaopen_posix(lua_State *L);

 void test_resource(void)

 {

     gchar *prefix,*root,*root_uri,*s;

     int ch,changed;

     struct comps *comps;

     struct comps_group *group;

     struct comps_requirement *pkg;

     struct plover_vector *packages=NULL;

     GError *error=NULL;

     GFile *file;

     test_uri_handler_register_resource();

     root=g_strdup("razor-test-dir-XXXXXX");

     g_assert(mkdtemp(root));

     file=g_file_new_for_path(root);

     root_uri=g_file_get_uri(file);

     g_object_unref(file);

     g_setenv("RAZOR_ROOT",root_uri,TRUE);

     g_free(root_uri);

     comps=plover_comps_new_from_uri(

       "resource:///uk/co/juiblex/project/plover/repodata/comps.xml");

     if (!comps)

     {

 	perror("resource:///uk/co/juiblex/project/plover/repodata/comps.xml");

 	exit(1);

     }

     prefix=plover_default_prefix_for_vendor(comps->vendor);

     group=plover_comps_lookup_group(comps,"base");

     if (!group)

     {

 	fprintf(stderr,"No base group found in comps.xml\n");

 	exit(1);

     }

     packages=plover_vector_new();

     do

     {

 	changed=0;

 	for(pkg=group->packages;pkg;pkg=pkg->next)

 	{

 	    if (plover_vector_contains(packages,pkg->name))

 		continue;

 	    if (pkg->type==COMPS_REQUIREMENT_DEFAULT ||

 	      pkg->type==COMPS_REQUIREMENT_MANDATORY ||

 	      pkg->type==COMPS_REQUIREMENT_CONDITIONAL && (!pkg->requires ||

 	      plover_vector_contains(packages,pkg->requires)))

 	    {

 		changed++;

 		plover_vector_append(packages,pkg->name);

 	    }

 	}

     } while(changed);

     plover_comps_free(comps);

     if (!packages->len)

     {

 	fprintf(stderr,"No packages to install\n");

 	exit(1);

     }

     if (!plover_install_uri("resource:///uk/co/juiblex/project/plover",prefix,

       packages->strings,&error))

     {

 	fprintf(stderr,"%s\n",error->message);

 	g_error_free(error);

 	exit(1);

     }

     plover_vector_free(packages);

     g_free(prefix);

     g_unsetenv("RAZOR_ROOT");

     test_uri_handler_unregister_resource();

     s=g_build_filename(root,"usr/bin/zsh",NULL);

     g_free(root);

     if (!g_file_test(s,G_FILE_TEST_EXISTS))

 	g_error("%s: Missing file",s);

     g_free(s);

 }

 int main(int argc,char **argv)

 {

     int retval;

     razor_set_lua_loader("posix",(void (*)())luaopen_posix);

     g_test_init(&argc,&argv,NULL);

     g_test_bug_base("mailto:ali@juiblex.co.uk");

     g_test_add_func("/uri-handler/resource",test_resource);

     retval=g_test_run();

     return retval;

 }