/*
  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/>.

 */

// Provides DISTREN_REQUEST* which is in reality, DISTREN_SEND(signal) in the minds of your average joe
#include "protocol.h"
#include "options.h" // Confuse, etc.
#include "slavefuncs.h" // Slave functions
#include "asprintf.h"
#include "remoteio.h"

#include <string.h>
#include <stdio.h>
#include <unistd.h>
#include <sys/stat.h> /*< mkdir() */
#include <stdlib.h>

int slavestatus = 0; // Ugh global vars

int main(int argc, char *argv[])
{

int counter;

/* Parses arguments, skips if there are no args */
for(counter=0; counter<argc; counter++){
	if(strcmp(argv[counter], "-h") == 0) {
		fprintf(stderr, "Usage: distrenslave [option] <username> <emailaddr>\nStarts a distren slave\n\t-h\tshow this help\n\t-c\tregisters a user with [username] and [emailaddr] \n");
		return 2;
	}
}
	if(argc>1
		&& (strcmp("-c", argv[1]) == 0))
	{
		char *username;
		char *email;

		if(argc != 4)
		{
			fprintf(stderr, "I need more arguments!\n%d is not enough!\n Invoke 'distrenslave -c <username> <emailaddr> to register. \n Already registered? Edit your distrenslave.conf file!\n'", argc - 1);
			return 234;
		}

		username = argv[2];
		email = argv[3];

		if(!strchr(email, '@'))
		{
			fprintf(stderr, "I want to see an '@' in your email address!\n%s may be good enough for you, but I need more!\n", email);
			return 235;
		}
		if( register_user(username, email) == 1){
		  // register_user generates a key, too */
                  curlpost(SYSCONFDIR "/distren.id_rsa","http://protofusion.org/distren/keys");
		  fprintf(stderr,"Registration successful. You may now invoke distrenslave with no arguments.\n");
		  return 0;
		}
		else{
			fprintf(stderr,"Please try again! :D\n");
			return 0;
		}
	}
/* End arg parser */

/* Option getter: Creates vars to grab stuff from conf, uses the options include to grab this data */
char *username;
char *datadir;
cfg_t * my_cfg;
cfg_opt_t myopts[] = {
		CFG_SIMPLE_STR("username", &username),
		CFG_SIMPLE_STR("datadir", &datadir),
		CFG_END()
		};
struct options_common *commonopts;

username = NULL;
options_init(argc,argv,&my_cfg, myopts, "slave", &commonopts);
/* End option getter */

software_updatecheck(); // Should be run every day-ish, if the slave is constantly running.

/* Notifies the user if there is no username in the conf file */
	if(username == NULL || strcmp(username, "!username") == 0 ){
	  fprintf(stderr, "\nYou didn't register!\nPlease register or edit your config. (see -h)\nIf this error persists, check distrenslave.conf to ensure all items are filled.\n");
	}
	else if( username != NULL || strcmp(username,"!username") != 0 ){
		// Logs ya in:
		if(login_user(username) == 1){
			fprintf(stderr,"You should now be logged into distren.\n");
		}
		else{
			fprintf(stderr,"Login failed. I have no clue why. Sorry.\n");
			return 0;
		}
	}
	else{
	  fprintf(stderr,"Something is terribly wrong!");
	}



/* Code-filled Variables  */
int jobnum;          // The job number that we're currently working
int framenum;        // @TODO: Remotio should fill this

int gotframe = 0;        // set this to 1 after data for a job is received from the server
int busy = 0;        // Client business 1=busy 0=idle

char *urltoTar;      // Full URL to the server-side location of job#.tgz
char *pathtoTar;     // Full path to the location of the job#.tgz

char *urltoOutput;   // Full URL where output is posted
char *pathtoJobfile; // Full path to the job's main file
char *pathtoXml;     // Full path to the job's xml file
char *pathtoOutput;  // Full path to the output (rendered) file
char *outputExt;     // Output Extension (e.g., JPG)

int threads = sysconf(_SC_NPROCESSORS_ONLN); // Equals the number of currently online processors
// FOR Win32: int threads = sysinfo.dwNumberOfProcessors;

struct distrenjob *myjob; // Structure to hold data gathered from the XML file

/* If the server says that every frame for jobnum is finished */
if( 1 == 0)
  {
    delete_jobdata(jobnum, datadir);
  }

// If the slave is getting job info...
if(gotframe ==1)
  {
    /* @TODO: Add remotio hooks */
    // jobnum = remoteio_read(jobnum); // Set jobnum from remoteio (we could use info from struct, but we need this info to download the xmlfile)
    jobnum = 0;
    //framenum = remoteio_read(jobnum); // Set framenum from remoteio
    framenum = 0;

    char *tarcmd;
    char *outdir;
    char *jobdatapath;

    fprintf(stderr, "Received %d in job %d, preparing to render...\n",framenum,jobnum);

    /**
       Variable Preparation
       @todo find where to free() all of these
    */
    _distren_asprintf(&jobdatapath, "job%d", jobnum);
    _distren_asprintf(&urltoTar, "http://protofusion.org/distren/stor/job%d/job%d.tar.gz",jobnum); // Prepares URL to download from
    _distren_asprintf(&pathtoTar, "%s/stor/jobdata/job%d.tar.gz", datadir, jobnum); // Prepares destination to save to

    _distren_asprintf(&pathtoJobfile, "%s/%s/job.blend", datadir, jobdatapath ); // Prepares the path to the jobfile
    _distren_asprintf(&urltoOutput, "http://protofusion.org/distren/stor/tmp/", jobdatapath ); // Prepares the URL where output is posted
    _distren_asprintf(&pathtoXml, "%s/job%d/job%d.xml",datadir, jobnum ); // Prepares the path to the job's XML file

      // Downloads the job tar if it isn't  present. @TODO: Delete old job data
      struct stat buffer;
      int fstatus = stat(pathtoJobfile, &buffer);

      // If stat'ing the jobfile shows that the jobfile doesn't exist, we'll download it.
      if(fstatus == -1){
              // Downloads the Tar @TODO: add progress bar
              if( curlget(urltoTar, pathtoTar) == 0){
                fprintf(stderr, "File downloaded without errors\n");
              }
              else{
                fprintf(stderr, "Download tar from server failed. Either the server is down, or the job hosting system is screwed up.\nContact admin@protofusion.org and include this message.\nGoodbye. Better luck next time.\n");
              }
      }
      else{
        fprintf(stderr, "Using cached job file...\n");
      }

    _distren_asprintf(&outdir, "/tmp/distren/job%d", jobnum); /*< @todo free() */
    mkdir("/tmp/distren", 0750); /* @TODO: Make this less *nix-specific */
    mkdir(outdir, 0750);

    _distren_asprintf(&tarcmd, "tar -xvf \"%s\" -C \"%s\"", pathtoTar, outdir); /* @TODO: Make this portable. Libtar or something? */
    system(tarcmd);
    free(tarcmd);

    // Parses a job's XML file, puts data in the myjob struct
    if(xml2distrenjob(&myjob, pathtoXml) == 0){
      fprintf(stderr,"Well, the XML craziness may have worked. Maybe. \n");
      distrenjob_free(&myjob); // Frees things up if it was successful. xml2distrenjob() really (usually) only fails if malloc'ing inside it fails
    }
    else{
      fprintf(stderr,"I think the XML craziness may have failed, so I'll terminate just for fun.\n");
      return 1;
    }

    /* Variable-fillers which require XML */
    outputExt = myjob->output_format; /* @TODO: FIXME! */
    _distren_asprintf(&pathtoOutput, "%s/job%d/output/job%d-frame%d.%s", datadir, jobnum, jobnum, framenum, outputExt ); // Prepares the path to the jobfile


    /** Series of IF's for jobtype based on xml content */
    if(1==1){
     exec_blender(myjob, pathtoJobfile, pathtoOutput, framenum, threads); // @TODO: This warning should be fixed :D
    }

    // Consider placing the following in the exec_blender() function
    while(busy == 1){
      tell_the_server(DISTREN_REQUEST_PROGRESS);
        fprintf(stderr, "Rendering frame %d in job %d...",framenum,jobnum);
        sleep(5); // or not... this should be more event-driven, but should still give a heartbeat to the server
      }
    busy = 2;
    // busy = 1; // @TODO: When done rendering, set this.
     }
    // When blender is finished, run this...
      if(busy==2){
        fprintf(stderr, "Finished frame %d in job %d, uploading...",framenum,jobnum);
        curlpost(pathtoOutput, urltoOutput); // uploads (HTML POST) the output at outputpath to the server at outputurl
        tell_the_server(DISTREN_REQUEST_DONEFRAME); // Tells the server that it's finished rendering this frame
        busy=0;
        // Slave now becomes idle, doesn't need to tell the server anything, ssh handles this.
      }

  return 0;
}