#include "qtools.h"

struct memory bspStatic;
struct memory *bspMem = &bspStatic;

extern int c_bad;
extern struct tnode *tnodes, *tnode_p;
extern bool *nolightface;
extern float *minlights;
extern float rangescale;
extern float scalecos;
extern float scaledist;
extern int bspfileface;						// next surface to dispatch
extern vec3_t *faceoffset;
extern vec3_t bsp_origin;

extern void LightWorld(__memBase);
extern void MakeTnodes(__memBase, register struct dmodel_t * bm);

/*
 * ========
 * main
 * 
 * light modelfile
 * ========
 */
int main(int argc, char **argv)
{
  int i;
  char source[NAMELEN_PATH];
  FILE *bspFile;

  memset(bspMem, 0, sizeof(struct memory));
  if (!setjmp(eabort)) {
    printf("----- LightFaces --------\n");

    for (i = 1; i < argc; i++) {
      if (!strcmp(argv[i], "-extra")) {
        bspMem->litOptions |= LIGHT_EXTRA;
        mprintf("extra sampling enabled\n");
      }
      else if (!strcmp(argv[i], "-rad")) {
        bspMem->litOptions |= LIGHT_RADIOSITY;
        mprintf("radiosity calculation enabled\n");
      }
      else if (!strcmp(argv[i], "-waterlit")) {
        bspMem->litOptions |= LIGHT_WATERLIT;
        mprintf("extra watershadowing enabled\n");
      }
      else if (!strcmp(argv[i], "-dist")) {
        scaledist = atof(argv[i + 1]);
        i++;
      }
      else if (!strcmp(argv[i], "-range")) {
        rangescale = atof(argv[i + 1]);
        i++;
      }
      else if (argv[i][0] == '-')
        Error("Unknown option \"%s\"", argv[i]);
      else
        break;
    }

    if (i != argc - 1)
      Error("usage: light [-extra] bspfile");

    strcpy(source, argv[i]);
    ReplaceExt(source, "bsp");
    if((bspFile = fopen(source, READWRITE_BINARY_OLD))) {
      bspMem = LoadBSP(bspFile, ALL_LUMPS & ~(LUMP_LIGHTING | LUMP_VISIBILITY));
      AllocClusters(bspMem, LUMP_LIGHTING);
    
      if(!(minlights = (float *)kmalloc(sizeof(float) * bspMem->numfaces)))
        Error("Light: failed to allocate minlights!\n");
      if(!(nolightface = (bool *)kmalloc(sizeof(bool) * bspMem->numfaces)))
        Error("Light: failed to allocate nolightface!\n");
      if(!(faceoffset = (vec3_t *)kmalloc(sizeof(vec3_t) * bspMem->numfaces)))
        Error("Light: failed to allocate faceoffset!\n");
     /*
      if(bspMem->litOptions & LIGHT_RADIOSITY) {
        if(!(facepatches = (struct patch **)kmalloc(sizeof(struct patch *) * bspMem->numfaces)))
          Error("Light: failed to allocate facepatches!\n");
        if(!(faceentity = (struct entity **)kmalloc(sizeof(struct entity *) * bspMem->numfaces)))
          Error("Light: failed to allocate faceentity!\n");
        if(!(facelights = (struct facelight *)kmalloc(sizeof(struct entity *) * bspMem->numfaces)))
          Error("Light: failed to allocate facelights!\n");
        if(!(patches = (struct patch *)kmalloc(sizeof(struct patch) * 4096)))
          Error("Light: failed to allocate patches!\n");
        if(!(radiosity = (vec3_t *)kmalloc(sizeof(vec3_t) * bspMem->numfaces)))
          Error("Light: failed to allocate radiosity!\n");
        if(!(illumination = (vec3_t *)kmalloc(sizeof(vec3_t) * bspMem->numfaces)))
          Error("Light: failed to allocate illumination!\n");
        if(!(backplanes = (struct dplane_t *)kmalloc(sizeof(struct dplane_t) * bspMem->numplanes)))
          Error("Light: failed to allocate backplanes!\n");
        if(!(directlights = (struct directlight **)kmalloc(sizeof(struct directlight *) * bspMem->numleafs)))
          Error("Light: failed to allocate directlights!\n");
        if(!(leafparents = (int *)kmalloc(sizeof(int) * bspMem->numleafs)))
          Error("Light: failed to allocate leafparents!\n");
        if(!(nodeparents = (int *)kmalloc(sizeof(int) * bspMem->numnodes)))
          Error("Light: failed to allocate nodeparents!\n");
        if(!(texreflectivity = (vec3_t *)kmalloc(sizeof(vec3_t) * bspMem->numtexinfo)))
          Error("Lights: failed to allocate texture reflectivity!\n");
      }
      */
    
      bspMem->mapOptions |= MAP_LOADLIGHTS;
      LoadMapFile(bspMem, bspMem->dentdata);
      MakeTnodes(bspMem, &bspMem->dmodels[0]);

      //if(bspMem->litOptions & LIGHT_RADIOSITY)
      //  RadWorld(bspMem);
      //else
        LightWorld(bspMem);

      WriteEntitiesToString(bspMem);
      WriteBSP(bspFile, bspMem);
      PrintClusters(bspMem, 0, true);
      
      FreeClusters(bspMem, 0);
      kfree();
      fclose(bspFile);
    }
  }

  return 0;
}