#include <stdlib.h>
#include <stdio.h>
#include <string.h>

#include "../shared/debug.h"

#include "drivers/lcd.h"

#include "clients.h"
#include "client_data.h"
#include "widget.h"
#include "screenlist.h"
#include "screen.h"


screen * screen_create()
{
   screen *s;

   s = malloc(sizeof(screen));
   if(!s)
   {
      fprintf(stderr, "screen_create: Error allocating new screen\n");
      return NULL;
   }

   s->id=NULL;
   s->name=NULL;
   s->priority=128;
   // TODO: Make the screen duration configurable!
   s->duration = 128;
   s->heartbeat = 1;
   s->wid = lcd.wid;
   s->hgt = lcd.hgt;
   s->parent = NULL;
   s->widgets=NULL;

   s->widgets = LL_new();
   if(!s->widgets)
   {
      fprintf(stderr, "screen_create:  Error allocating widget list\n");
      return NULL;
   }

   return s;
}

int screen_destroy(screen *s)
{
   widget *w;

   if(!s) return -1;
   
   LL_Rewind(s->widgets);
   do {
      // Free a widget...
      w = LL_Get(s->widgets);
      widget_destroy(w);
   } while (LL_Next(s->widgets) == 0);
   LL_Destroy(s->widgets);


   if(s->id)
      free(s->id);
   if(s->name)
      free(s->name);
   
   free(s);
   
   return 0;
}


screen *screen_find(client *c, char *id)
{
   screen *s;

   if(!c) return NULL;
   if(!id) return NULL;

   debug("client_find_screen(%s)\n", id);
   
   LL_Rewind(c->data->screenlist);
   do {
      s = LL_Get(c->data->screenlist);
      if( (s)  &&  (0 == strcmp(s->id, id)))
      {
	 debug("client_find_screen:  Found %s\n", id);
	 return s;
      }
   } while(LL_Next(c->data->screenlist) == 0);

   return NULL;
}


int screen_add(client *c, char *id)
{
   screen *s;

   if(!c) return -1;
   if(!id) return -1;

   // Make sure this screen doesn't already exist...
   s = screen_find(c, id);
   if(s)
   {
      return 1;
   }
   
   s = screen_create();
   if(!s)
   {
      fprintf(stderr, "screen_add:  Error creating screen\n");
      return -1;
   }

   s->parent = c;

   s->id = strdup(id);
   if(!s->id)
   {
      fprintf(stderr, "screen_add:  Error allocating name\n");
      return -1;
   }

   // TODO:  Check for errors here?
   LL_Push(c->data->screenlist, (void *)s);
   

   // Now, add it to the screenlist...
   if(screenlist_add(s) < 0)
   {
      fprintf(stderr, "screen_add:  Error queueing new screen\n");
      return -1;
   }
   
   return 0;
}

int screen_remove(client *c, char *id)
{
   screen *s;

   if(!c) return -1;
   if(!id) return -1;
   
   // Make sure this screen *does* exist...
   s = screen_find(c, id);
   if(!s)
   {
      fprintf(stderr, "screen_remove:  Error finding screen %s\n", id);
      return 1;
   }

   // TODO:  Check for errors here?
   LL_Remove(c->data->screenlist, (void *)s);

   // ... and here?
   screen_destroy(s);

   // Now, remove it from the screenlist...
   if(screenlist_remove_all(s) < 0)
   {
      // Not a serious error..
      fprintf(stderr, "screen_remove:  Error dequeueing screen\n");
      return 0;
   }
   
   return 0;
}