ACLOCAL_AMFLAGS = -I m4

AM_CPPFLAGS = -DSYSCONFDIR='"$(sysconfdir)"' \

	-DLOCALSTATEDIR='"$(localstatedir)"' \

	-I$(top_srcdir)/src

AM_CFLAGS = $(DISTLIBS_CFLAGS)

LIBS = $(DISTLIBS_LDADD) $(DISTLIBS_LDFLAGS)

LDADD = libdistrencommon.la

include_HEADERS = src/client/distren.h

bin_PROGRAMS = distren

if ENABLE_SERVER

bin_PROGRAMS += distrend distrenslave

endif

lib_LTLIBRARIES = libdistren.la

pkglib_LTLIBRARIES = libdistrencommon.la

# libdistrencommon.la:

libdistrencommon_la_SOURCES = src/common/options.c \

	src/common/options.h \

	src/common/execio.h \

	src/common/execio.c \

	src/common/remoteio.h \

	src/common/libremoteio.h \

	src/common/remoteio.c \

	src/common/asprintf.h \

	src/common/asprintf.c

#see http://sources.redhat.com/autobook/autobook/autobook_91.html

# either increase the revision number or the interface number each release!

libdistrencommon_la_LDFLAGS = $(AM_LDFLAGS) -version-info 0:0:0

# libdistren.la:

libdistren_la_SOURCES = $(include_HEADERS) \

	src/client/libdistren.h \

	src/client/libdistren.c \

	src/client/libdistren_job.c \

	src/client/libdistren_unbias.c \

	src/client/libdistren_config.c

libdistren_la_LIBADD = libdistrencommon.la

libdistren_la_LDFLAGS = $(AM_LDFLAGS) -version-info 0:0:0

# distren:

distren_SOURCES = src/client/distren.c

distren_LDADD = libdistren.la

# shared server sources:

SERVER_SOURCES = src/server/slavefuncs.c \

	src/server/slavefuncs.h \

	src/server/distrenjob.c \

	src/server/distrenjob.h

# distrend:

distrend_CFLAGS = $(AM_CFLAGS) $(MYSQL_CFLAGS)

distrend_LDFLAGS = $(AM_LDFLAGS) $(MYSQL_LDFLAGS)

distrend_SOURCES = $(SERVER_SOURCES) \

	src/server/distrend.c \

	src/server/distrend.h \

	src/server/user_mgr.c \

	src/server/user_mgr.h \

	src/server/listen.h \

distrend_LDADD = libdistrencommon.la

# distrenslave:

distrenslave_SOURCES = $(SERVER_SOURCES) \

	src/server/slave.c

distrenslave_LDADD = libdistrencommon.la

# configuration files:

dist_sysconf_DATA = etc/distrenclient.conf \

	etc/distrencommon.conf

nodist_sysconf_DATA = etc/distrendaemon.conf \

	etc/distrenslave.conf

EXTRA_DIST = etc/distrendaemon.conf.in \

	etc/distrenslave.conf.in

# tests

TESTS=test/check_execio test/check_asprintf

check_PROGRAMS=$(TESTS)

#check_execio_LIBS = $(CHECK_LIBS)

#check_asprintf_LIBS = $(CHECK_LIBS)

test_check_execio_LDADD = $(CHECK_LIBS) src/libdistrencommon.la

test_check_asprintf_LDADD = $(CHECK_LIBS) src/libdistrencommon.la

test_check_execio_CFLAGS = $(AM_CFLAGS) $(CHECK_CFLAGS)

test_check_asprintf_CFLAGS = $(AM_CFLAGS) $(CHECK_CFLAGS)

/*

  Copyright 2009 Nathan Phillip Brink, Ethan Zonca, Matthew Orlando

  This file is a part of DistRen.

  DistRen is free software: you can redistribute it and/or modify

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

  the Free Software Foundation, either version 3 of the License, or

  (at your option) any later version.

  DistRen 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 Affero General Public License for more details.

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

  along with DistRen.  If not, see <http://www.gnu.org/licenses/>.

*/

/* This file contains the code which both processes (renders) jobs as a slave, and the code which distributes frames to slaves after receiving them from the client portion of the codebase. */

#include "distrenjob.h"

#include "listen.h"

#include "slavefuncs.h"

#include "common/asprintf.h"

#include "common/execio.h"

#include "common/options.h"

#include "common/protocol.h"

#include <confuse.h>

#include <malloc.h>

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <sys/stat.h>

#include <sys/types.h>

#include <time.h>

#include <unistd.h>

#include <libxml/encoding.h>

#include <libxml/parser.h>

#include <libxml/tree.h>

#include <libxml/xmlmemory.h>

#include <libxml/xmlreader.h>

#include <libxml/xmlwriter.h>

/* ******************* Structs ************************ */

struct general_info

{

  struct distrenjob head;

  struct distrend_config *config;

  struct

  {

    /** general_info.xml */

    char *geninfo;

  } files;

  int jobs_in_queue;

  unsigned int free_clients;

  unsigned int rendering_clients;

  unsigned int total_finished_jobs;

  unsigned int total_frames_rendered;

  unsigned int highest_jobnum;

  int hibernate;

  time_t timestamp;

  unsigned long total_render_power;

  unsigned long total_priority_pieces;

};

/*

  internally defined funcs's prototypes @TODO: Make all functions nice and proper 

*/

void distrenjob_remove(struct general_info *, struct distrenjob *bj);

struct distrenjob *distrenjob_get(struct distrenjob *head, jobnum_t jobnum);

int distrenjob_enqueue(struct general_info *, struct distrenjob *job);

int mortition(struct general_info *, struct distrenjob *job);

int update_xml_joblist(struct general_info *);

int createQueueFromXML(struct general_info*);

int reCreateQueueFromXML(struct general_info*, xmlDocPtr doc, xmlNodePtr current);

void update_general_info(struct general_info*);

int import_general_info(struct general_info*);

int updateJobStatsXML(struct distrenjob *job);

int job_getserialfilename(char **filename, struct general_info *, unsigned int jobnum, int createdir);

int distren_mkdir_recurse(char *fname);

/* ********************** Functions ************************* */

/** Dumps all data in RAM to an xml file (such as current jobs, etc) which is parsed by start_data. Remember to invoke this before shutting down! @TODO: Fill this stub*/

int xml_dump()

{

  return 0;

}

/**

   Performs command stored in a client's request. @TODO: Fill stub

*/

int distrend_do()

{

  return 0;

}

/** 

    Fill variables at startup from XML dumps or defaults

 */

int start_data(struct general_info *general_info)

{

  struct stat buffer;

  /**

     defaults

   */

  memset(&general_info->head, '\0', sizeof(struct distrenjob));

  general_info->head.priority = 0;

  general_info->jobs_in_queue = 0;

  general_info->free_clients = 0;

  general_info->rendering_clients = 0;

  general_info->total_finished_jobs = 0;

  general_info->total_frames_rendered = 0;

  general_info->highest_jobnum = 0;

  general_info->hibernate = 0;

  general_info->timestamp = 0;

  general_info->total_render_power = 0;

  general_info->total_priority_pieces = 0;

  fprintf(stderr, "Initialized default global and queue states\n");

  if(stat(general_info->files.geninfo, &buffer) == 0)

    {

      fprintf(stderr, "Previous state file found; loading ``%s'':\n", general_info->files.geninfo);

      fprintf(stderr, "Parsing XML files and restoring previous state...\n");

      if(import_general_info(general_info))

	fprintf(stderr, "FAILURE\n");

      fprintf(stderr, "Restoring queue...\n");

      if(createQueueFromXML(general_info))

	fprintf(stderr, "FAILURE\n");

      fprintf(stderr, "done\n");

    }

  return 0;

}

/** Finish-Setter: Sets a frame to the "completed" status.*/

void finish_frame(struct general_info *geninfo, struct distrenjob *distrenjob, int frame)

{

  // @QUERY: update `distren`.`Job` set `Finish_Confirmed`=1 where `Job_Key`='1';

  distrenjob->frameset[frame].status = FRAMESETSTATUS_DONE;

  distrenjob->total_render_time = distrenjob->total_render_time + (clock() - distrenjob->frameset[frame].start_time);

  distrenjob->completed_frames ++;

  distrenjob->assigned_frames --;

  geninfo->total_frames_rendered ++; /*< Increase total frames var for stats */

  update_general_info(geninfo);

  updateJobStatsXML(distrenjob);

}

/**

   checks to see if a job is actually done.

   - scans the folder of the job to make sure all output files are present

*/

int mortition(struct general_info *geninfo, struct distrenjob *job)

{

  short int isJobDone;

  int counter;

  char *path_and_number;

  struct stat buffer;

  isJobDone = 1;

  for(counter = 0; counter < job->total_frames; counter++)

    {

      _distren_asprintf(&path_and_number, "%s/stor/job%d/out/%d.%s",

			geninfo->config->datadir,

			job->jobnum,

			job->frameset[counter].num,

			job->output_format);

      if(stat(path_and_number, &buffer) == -1)

        {

	  /**

	     missing frame found

	   */

          job->frameset[counter].status = FRAMESETSTATUS_UNASSIGNED;

          job->completed_frames--;

          geninfo->total_frames_rendered--;

          isJobDone = 0;

        }

      free(path_and_number);

    }

  if(isJobDone)

    {

      /**

	 all frames were accounted for

      */

      distrenjob_remove(geninfo, job);

      distrenjob_free(&job);

      update_xml_joblist(geninfo);

    }

  else

    /**

       if the job isn't done, have frame_finder() start from the first frame, allowing it to see the frames that are now unassigned 

    */

    job->prev_frame_index = -1;

  update_general_info(geninfo);

  return 0;

}

/**

   scans the frames of a job to initialize a job after server

   @return 0 if the job is completely done and there are no missing frames,

           1 if missing frames are found.

*/

int restoreJobState(struct distrenjob *job)

{

  short int isJobDone;

  int counter;

  char *path_and_number;

  struct stat buffer;

  isJobDone = 1;

  for(counter = 0; counter < job->total_frames; counter++)

    {

      _distren_asprintf(&path_and_number, "stor/job%d/out/%d.%s", job->jobnum, job->frameset[counter].num, job->output_format); /*< @TODO this path is used in multiple places, construct/build/determine it in a central function */

      if(stat(path_and_number, &buffer) == 0)

        {

          job->frameset[counter].status = FRAMESETSTATUS_ASSIGNED;

          job->completed_frames++;

        }

      else

        isJobDone = 0;

      free(path_and_number);

    }

  return !isJobDone;

}

/**

   creates a structure from starting data, then calls another

   function to actually add that struct to the queue.

   Passed strings must be free()d by the caller.

*/

int prepare_distrenjob(struct general_info *geninfo, int type, char *name, char *submitter, int priority, int start_frame, int end_frame, int width, int height)

{

  int counter;

  int counter2;

  int tmp;

  char *serialfile;

  struct distrenjob *distrenjob;

  tmp = distrenjob_new(&distrenjob);

  if(tmp)

    return 1;

  geninfo->highest_jobnum ++;

  distrenjob->jobnum = geninfo->highest_jobnum;

  distrenjob->type = 1;

  distrenjob->name = strdup(name);

  distrenjob->submitter = strdup(submitter);

  distrenjob->priority = priority;

  distrenjob->width = width;

  distrenjob->height = height;

  /** sets the total number of frames in animation for status purposes */

  distrenjob->total_frames = (end_frame - start_frame + 1);

  distrenjob->frameset = malloc(sizeof(struct frameset) * distrenjob->total_frames);

  if(!distrenjob->frameset)

    {

      distrenjob_free(&distrenjob);

      fprintf(stderr, "OOM\n");

      return 1;

    }

  /** initialize frameset */

  counter2 = start_frame;

  for(counter = 0; counter < distrenjob->total_frames; counter++)

    {

      distrenjob->frameset[counter].num = counter2;

      distrenjob->frameset[counter].status = FRAMESETSTATUS_UNASSIGNED;

      counter2 ++;

    }

  job_getserialfilename(&serialfile, geninfo, distrenjob->jobnum, 1);

  /**

     add job to queue

  */

  fprintf(stderr, "prepare_distrenjob(): attempting distrenjob_serialize(%d, \"%s\")\n",

	  distrenjob->jobnum, serialfile);

  distrenjob_serialize(distrenjob, serialfile);

  free(serialfile);

  fprintf(stderr, "prepare_distrenjob(): attempting distrenjob_enqueue()\n");

  distrenjob_enqueue(geninfo, distrenjob);

  fprintf(stderr, "prepare_distrenjob(): attempting update_xml_joblist()\n");

  update_xml_joblist(geninfo);

  fprintf(stderr, "prepare_distrenjob(): attempting update_general_info()\n");

  update_general_info(geninfo);

  fprintf(stderr, "prepare_distrenjob(): attempting updateJobStatsXML()\n");

  updateJobStatsXML(distrenjob);

  return 0;

}

/**

   Adds the job to the queue based on its priority.

   Updates geninfo->jobs_in_queue.

*/

int distrenjob_enqueue(struct general_info *geninfo, struct distrenjob *job)

{

  struct distrenjob *prev_job;

  struct distrenjob *current_job;

  struct distrenjob *head;

  head = &geninfo->head;

  prev_job = head;

  /**

     iterate through linked jobs

  */

  for(current_job = head->next; current_job; current_job = current_job->next)

  {

    fprintf(stderr, "enqueue loop iteration\n");

    if(job->priority < current_job->priority)

      {

	/**

	   if job's priority is less than current_job's priority, insert job

	   keep in mind 1 is the highest priority given to jobs, head has a

	   priority of zero so it will always be before other jobs

	*/

	prev_job->next = job;

	job->next = current_job;

	fprintf(stderr, "added job before jobname: ``%s''\n", current_job->name);

	geninfo->jobs_in_queue ++;

	return 0;

      }

    prev_job = current_job;

  }

  /**

     if it has reached the end of the list, add job there

  */

  prev_job->next = job;

  fprintf(stderr, "added job at end of queue\n");

  geninfo->jobs_in_queue ++;

  return 0;

}

/** Changes the priority of an existing (and maybe running) job. @arg head I may end up changing the head if job == head */

int change_job_priority(struct general_info *geninfo, struct distrenjob *job, int new_priority){

  // @QUERY: update `distren`.`Job` set `Priority`='12', `Finish_Confirmed`=1 where `Job_Key`='1';

  struct distrenjob *current_job;

  struct distrenjob *prev_job;

  char *serialname;

  distrenjob_remove(geninfo, job);

  job->priority = new_priority;

  prev_job = &geninfo->head;

  if(job->frameset[0].status == FRAMESETSTATUS_UNASSIGNED)

    /**

       if job was not yet started

    */

    {

      distrenjob_enqueue(geninfo, job);

      return 0;

    }

  /**

     iterate through linked list of jobs 

  */

    for(current_job = &geninfo->head;

	current_job != NULL

	  && job->priority > current_job->priority;

	current_job = current_job->next)

      prev_job = current_job;

    prev_job->next = job;

    job->next = current_job;

  update_xml_joblist(geninfo);

  /** reserialize after changes */

  job_getserialfilename(&serialname, geninfo, job->jobnum, 0);

  distrenjob_serialize(job, serialname);

  free(serialname);

  return 0;