/* bzflag
 * Copyright (c) 1993-2017 Tim Riker
 *
 * This package is free software;  you can redistribute it and/or
 * modify it under the terms of the license found in the file
 * named COPYING that should have accompanied this file.
 *
 * THIS PACKAGE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 */

/* interface header */
#include "CollisionManager.h"

/* system implementation headers */
#include <vector>
#include <math.h>
#include <stdlib.h>

/* common implementation headers */
#include "StateDatabase.h"
#include "BZDBCache.h"
#include "Intersect.h"
#include "Ray.h"
#include "ObstacleMgr.h"
#include "Obstacle.h"
#include "MeshObstacle.h"
#include "BoxBuilding.h"
#include "PyramidBuilding.h"
#include "BaseBuilding.h"
#include "Teleporter.h"
#include "TimeKeeper.h"


/* static variables */

CollisionManager COLLISIONMGR; // the big dog

static const float testFudge = 0.1f;

static int maxDepth = 0;
static int minElements = 0;

static int leafNodes = 0;
static int totalNodes = 0;
static int totalElements = 0;

static ObsList		FullList;  // the complete list of obstacles
static SplitObsList	SplitList; // the complete split list of obstacles
static ObsList		FullPad;   // for returning a full list of obstacles
static SplitObsList	SplitPad;  // for returning a split list of obstacles

static ColDetNodeList	RayList;   // for returning a list a ray hit nodes

static ObsList		EmptyList = { 0, NULL };
static ColDetNodeList	EmptyNodeList = { 0, NULL };


/* static functions */

inline static void addToFullList (Obstacle* obs)
{
  obs->collisionState = false;
  FullList.list[FullList.count] = obs;
  FullList.count++;
  return;
}

inline static void addToFullPadList (Obstacle* obs)
{
  FullPad.list[FullPad.count] = obs;
  FullPad.count++;
  return;
}

inline static void addToRayList (const ColDetNode* node)
{
  RayList.list[RayList.count] = node;
  RayList.count++;
  return;
}

static void squeezeChildren (ColDetNode** children)
{
  for (int dst = 0; dst < 8; dst++) {
    if (children[dst] == NULL) {
      // replace with the next non-NULL
      for (int src = (dst + 1); src < 8; src++) {
	if (children[src] != NULL) {
	  children[dst] = children[src];
	  children[src] = NULL;
	  break;
	}
      }
    }
  }
  return;
}


static inline int compareHeights (const Obstacle* obsA, const Obstacle* obsB)
{
  const Extents& eA = obsA->getExtents();
  const Extents& eB = obsB->getExtents();

  if (eA.maxs[2] > eB.maxs[2]) {
    return -1;
  } else {
    return +1;
  }
}

static inline int compareFaceHeights (const Obstacle* obsA, const Obstacle* obsB)
{
  const Extents& eA = obsA->getExtents();
  const Extents& eB = obsB->getExtents();

  if (fabsf(eA.maxs[2] - eB.maxs[2]) < 1.0e-3) {
    if (eA.mins[2] > eB.mins[2]) {
      return -1;
    } else {
      return +1;
    }
  }
  else if (eA.maxs[2] > eB.maxs[2]) {
    return -1;
  }
  else {
    return +1;
  }
}

static int compareObstacles (const void* a, const void* b)
{
  // - normal object come first (from lowest to highest)
  // - then come the mesh face (highest to lowest)
  // - and finally, the mesh objects (checkpoints really)
  const Obstacle* obsA = *((const Obstacle* const *)a);
  const Obstacle* obsB = *((const Obstacle* const *)b);

  bool isMeshA = (obsA->getType() == MeshObstacle::getClassName());
  bool isMeshB = (obsB->getType() == MeshObstacle::getClassName());

  if (isMeshA) {
    if (!isMeshB) {
      return +1;
    } else {
      return compareHeights(obsA, obsB);
    }
  }

  if (isMeshB) {
    if (!isMeshA) {
      return -1;
    } else {
      return compareHeights(obsA, obsB);
    }
  }

  bool isFaceA = (obsA->getType() == MeshFace::getClassName());
  bool isFaceB = (obsB->getType() == MeshFace::getClassName());

  if (isFaceA) {
    if (!isFaceB) {
      return +1;
    } else {
      return compareFaceHeights(obsA, obsB);
    }
  }

  if (isFaceB) {
    if (!isFaceA) {
      return -1;
    } else {
      return compareFaceHeights(obsA, obsB);
    }
  }

  return compareHeights(obsB, obsA); // reversed
}


//////////////////////////////////////////////////////////////////////////////
//
// CollisionManager
//

CollisionManager::CollisionManager ()
{
  root = NULL;
  FullPad.list = NULL;
  FullList.list = NULL;
  RayList.list = NULL;
  clear();
}


CollisionManager::~CollisionManager ()
{
  clear();
}


void CollisionManager::clear ()
{
  delete root;
  root = NULL;

  worldSize = 0.0f;

  leafNodes = 0;
  totalNodes = 0;
  totalElements = 0;

  delete[] FullPad.list;
  delete[] FullList.list;
  delete[] RayList.list;
  FullPad.list = NULL;
  FullPad.count = 0;
  FullList.list = NULL;
  FullList.count = 0;
  RayList.list = NULL;
  RayList.count = 0;

  for (int i = 0; i < 5; i++) {
    SplitPad.array[i].list = NULL;
    SplitPad.array[i].count = 0;
    SplitList.array[i].list = NULL;
    SplitList.array[i].count = 0;
  }

  return;
}


bool CollisionManager::needReload () const
{
  int newDepth = BZDB.evalInt (StateDatabase::BZDB_COLDETDEPTH);
  int newElements = BZDB.evalInt (StateDatabase::BZDB_COLDETELEMENTS);
  float newWorldSize = BZDB.eval (StateDatabase::BZDB_WORLDSIZE);
  if ((newDepth != maxDepth) || (newElements != minElements) ||
      (newWorldSize != worldSize)) {
    return true;
  } else {
    return false;
  }
}


const ObsList* CollisionManager::axisBoxTest (const Extents& exts)
{
  if (root == NULL) {
    return &EmptyList;
  }

  FullPad.count = 0;

  // get the list
  root->axisBoxTest (exts);

  // clear the collisionState on the obstacles
  for (int i = 0; i < FullPad.count; i++) {
    FullPad.list[i]->collisionState = false;
  }

  return &FullPad;
}


const ObsList* CollisionManager::cylinderTest (const float *pos,
					       float radius, float height) const
{
  if (root == NULL) {
    return &EmptyList;
  }

  float tmpMins[3], tmpMaxs[3];
  tmpMins[0] = pos[0] - radius;
  tmpMins[1] = pos[1] - radius;
  tmpMins[2] = pos[2];
  tmpMaxs[0] = pos[0] + radius;
  tmpMaxs[1] = pos[1] + radius;
  tmpMaxs[2] = pos[2] + height;

  FullPad.count = 0;

  // get the list
  Extents exts;
  exts.set(tmpMins, tmpMaxs);
  root->axisBoxTest (exts);

  // clear the collisionState on the obstacles
  for (int i = 0; i < FullPad.count; i++) {
    FullPad.list[i]->collisionState = false;
  }

  return &FullPad;
}


const ObsList* CollisionManager::boxTest (const float* pos, float UNUSED(angle),
					  float dx, float dy, float dz) const
{
  float radius = sqrtf (dx*dx + dy*dy);
  return cylinderTest (pos, radius, dz);
}


const ObsList* CollisionManager::movingBoxTest (const float* oldPos, float UNUSED(oldAngle),
						const float* pos, float UNUSED(angle),
						float dx, float dy, float dz) const
{
  float newpos[3];

  // adjust the Z parameters for the motion
  memcpy (newpos, pos, sizeof(float[3]));
  if (oldPos[2] < pos[2]) {
    newpos[2] = oldPos[2];
    dz = dz + (pos[2] - oldPos[2]);
  } else {
    dz = dz + (oldPos[2] - pos[2]);
  }

  float radius = sqrtf (dx*dx + dy*dy);
  return cylinderTest (newpos, radius, dz);
}


const ObsList* CollisionManager::rayTest (const Ray* ray, float timeLeft) const
{
  if (root == NULL) {
    return &EmptyList;
  }

  FullPad.count = 0;
  RayList.count = 0;

  // get the list
  root->rayTest (ray, timeLeft + 0.1f);

  // clear the collisionState on the obstacles
  for (int i = 0; i < FullPad.count; i++) {
    FullPad.list[i]->collisionState = false;
  }

  return &FullPad;
}


static int compareRayNodes (const void *a, const void *b)
{
  const ColDetNode* nodeA = *((ColDetNode* const *)a);
  const ColDetNode* nodeB = *((ColDetNode* const *)b);
  return (nodeA->getInTime() > nodeB->getInTime());
}


const ColDetNodeList* CollisionManager::rayTestNodes (const Ray* ray,
						      float timeLeft) const
{
  if (root == NULL) {
    return &EmptyNodeList;
  }

  RayList.count = 0;

  // get the list
  root->rayTestNodes (ray, timeLeft + 0.1f);

  // sort the list of node
  qsort (RayList.list, RayList.count, sizeof(ColDetNode*), compareRayNodes);

  return &RayList;
}


void CollisionManager::load ()
{
  int i;

  TimeKeeper startTime = TimeKeeper::getCurrent();

  // get the lists
  const ObstacleList& meshes = OBSTACLEMGR.getMeshes();
  const ObstacleList& boxes = OBSTACLEMGR.getBoxes();
  const ObstacleList& pyrs = OBSTACLEMGR.getPyrs();
  const ObstacleList& bases = OBSTACLEMGR.getBases();
  const ObstacleList& teles = OBSTACLEMGR.getTeles();
  const int boxCount = (int)boxes.size();
  const int pyrCount = (int)pyrs.size();
  const int baseCount = (int)bases.size();
  const int teleCount = (int)teles.size();
  const int meshCount = (int)meshes.size();

  // clean out the cell lists
  clear();

  // setup the octree parameters
  worldSize = BZDBCache::worldSize;
  maxDepth = BZDB.evalInt (StateDatabase::BZDB_COLDETDEPTH);
  minElements = BZDB.evalInt (StateDatabase::BZDB_COLDETELEMENTS);

  // determine the total number of obstacles
  int fullCount = 0;
  for (i = 0; i < boxCount; i++) {
    if (!boxes[i]->isPassable()) fullCount++;
  }
  for (i = 0; i < pyrCount; i++) {
    if (!pyrs[i]->isPassable()) fullCount++;
  }
  for (i = 0; i < baseCount; i++) {
    if (!bases[i]->isPassable()) fullCount++;
  }
  for (i = 0; i < teleCount; i++) {
    if (!teles[i]->isPassable()) fullCount++;
  }
  for (i = 0; i < meshCount; i++) {
    MeshObstacle* mesh = (MeshObstacle*) meshes[i];
    if (!mesh->isPassable()) {
      for (int f = 0; f < mesh->getFaceCount(); f++) {
	const MeshFace* face = mesh->getFace(f);
	if (!face->isPassable()) fullCount++;
      }
      fullCount++; // one for the mesh itself
    }
  }

  // get the memory for the full list and the scratch pad
  FullPad.list = new Obstacle*[fullCount];
  FullList.list = new Obstacle*[fullCount];
  FullList.count = 0;

  //
  // add everything to the full list
  //
  // they should have been sorted from top to bottom by the
  // ObstacleMgr, but we'll want the non-mesh obstacles sorted
  // from bottom to top, so insert them in reverse order to
  // speed of the sorting.
  //

  for (i = (boxCount - 1); i >= 0; i--) {
    if (!boxes[i]->isPassable()) addToFullList(boxes[i]);
  }
  for (i = (pyrCount - 1); i >= 0; i--) {
    if (!pyrs[i]->isPassable()) addToFullList(pyrs[i]);
  }
  for (i = (baseCount - 1); i >= 0; i--) {
    if (!bases[i]->isPassable()) addToFullList(bases[i]);
  }
  for (i = (teleCount - 1); i >= 0; i--) {
    if (!teles[i]->isPassable()) addToFullList(teles[i]);
  }
  // add the mesh types last (faces then meshes)
  for (i = (meshCount - 1); i >= 0; i--) {
    MeshObstacle* mesh = (MeshObstacle*) meshes[i];
    if (!mesh->isPassable()) {
      const int meshFaceCount = mesh->getFaceCount();
      for (int f = 0; f < meshFaceCount; f++) {
	MeshFace* face = mesh->getFace(f);
	if (!face->isPassable()) addToFullList((Obstacle*) face);
      }
    }
  }
  for (i = (meshCount - 1); i >= 0; i--) {
    if (!meshes[i]->isPassable()) addToFullList(meshes[i]);
  }

  // do the type/height sort
  qsort(FullList.list, FullList.count, sizeof(Obstacle*), compareObstacles);

  // generate the octree
  setExtents (&FullList);
  root = new ColDetNode (0, gridExtents, &FullList);

  // tally the stats
  leafNodes = 0;
  totalNodes = 0;
  totalElements = 0;
  root->tallyStats();

  // setup the ray list
  RayList.list = new const ColDetNode*[leafNodes];
  RayList.count = 0;

  // print some statistics
  logDebugMessage(2,"ColDet Octree obstacles = %i\n", FullList.count);
  for (i = 0; i < 3; i++) {
    logDebugMessage(2,"  grid extent[%i] = %f, %f\n", i, gridExtents.mins[i],
					       gridExtents.maxs[i]);
  }
  for (i = 0; i < 3; i++) {
    logDebugMessage(2,"  world extent[%i] = %f, %f\n", i, worldExtents.mins[i],
						worldExtents.maxs[i]);
  }
  logDebugMessage(2,"ColDet Octree leaf nodes  = %i\n", leafNodes);
  logDebugMessage(2,"ColDet Octree total nodes = %i\n", totalNodes);
  logDebugMessage(2,"ColDet Octree total elements = %i\n", totalElements);

  // print the timing info
  float elapsed = (float)(TimeKeeper::getCurrent() - startTime);
  logDebugMessage(2,"Collision Octree processed in %.3f seconds.\n", elapsed);


  // setup the split list
  // FIXME: currently unused, untested, and incorrect
  Obstacle** listPtr = FullList.list;
  SplitList.named.boxes.list = listPtr;
  SplitList.named.boxes.count = (int)boxes.size();
  listPtr = listPtr + boxes.size();
  SplitList.named.bases.list = listPtr;
  SplitList.named.bases.count = (int)bases.size();
  listPtr = listPtr + bases.size();
  SplitList.named.pyrs.list = listPtr;
  SplitList.named.pyrs.count = (int)pyrs.size();
  listPtr = listPtr + pyrs.size();
  SplitList.named.teles.list = listPtr;
  SplitList.named.teles.count = (int)teles.size();


  return;
}


void CollisionManager::setExtents (ObsList *list)
{
  int i;
  worldExtents.reset();

  // find the real world extents
  for (i = 0; i < list->count; i++) {
    const Obstacle* obs = list->list[i];
    const Extents& obsExts = obs->getExtents();
    worldExtents.expandToBox(obsExts);
  }

  // find the longest axis
  float width = -MAXFLOAT;
  for (i = 0; i < 3; i++) {
    const float axisWidth = worldExtents.getWidth(i);
    if (axisWidth > width) {
      width = axisWidth;
    }
  }

  gridExtents = worldExtents;

  // make it a cube, with Z on its minimum
  for (i = 0; i < 2; i++) {
    const float axisWidth = worldExtents.getWidth(i);
    if (axisWidth < width) {
      const float adjust = 0.5f * (width - axisWidth);
      gridExtents.mins[i] = gridExtents.mins[i] - adjust;
      gridExtents.maxs[i] = gridExtents.maxs[i] + adjust;
    }
  }
  gridExtents.maxs[2] = gridExtents.mins[2] + width;

  return;
}


void CollisionManager::draw (DrawLinesFunc drawLinesFunc)
{
  if (root != NULL) {
    root->draw (drawLinesFunc);
  }
  return;
}


//////////////////////////////////////////////////////////////////////////////
//
// ColDetNode
//

ColDetNode::ColDetNode(unsigned char _depth,
		       const Extents& exts,
		       ObsList *_list)
{
  int i;

  depth = _depth;

  for (i = 0; i < 8; i++) {
    children[i] = NULL;
  }
  childCount = 0;

  // alloacte enough room for the incoming list
  const int listBytes = _list->count * sizeof (Obstacle*);
  fullList.list = (Obstacle**) malloc (listBytes);

  // copy the extents, and make the testing extents with margin
  extents = exts;
  Extents testExts;
  testExts = exts;
  testExts.addMargin(testFudge);

  // setup some test parameters
  float pos[3];
  pos[0] = 0.5f * (testExts.maxs[0] + testExts.mins[0]);
  pos[1] = 0.5f * (testExts.maxs[1] + testExts.mins[1]);
  pos[2] = testExts.mins[2];
  float size[3];
  size[0] = 0.5f * (testExts.maxs[0] - testExts.mins[0]);
  size[1] = 0.5f * (testExts.maxs[1] - testExts.mins[1]);
  size[2] = (testExts.maxs[2] - testExts.mins[2]);
  float point[3];
  point[0] = pos[0];
  point[1] = pos[1];
  point[2] = 0.5f * (testExts.maxs[2] + testExts.mins[2]);

  // find all of the intersecting nodes
  //
  // the mesh obstacles will be the last in the list, so we
  // record whether or not any of their faces have intersected
  // with cell along the way (in the collisionState variable,
  // which must be cleared before leaving).
  //
  fullList.count = 0;
  const char* faceType = MeshFace::getClassName();
  const char* meshType = MeshObstacle::getClassName();
  for (i = 0; i < _list->count; i++) {
    Obstacle* obs = _list->list[i];
    const char* obsType = obs->getType();
    if (testExts.touches(obs->getExtents())) {
      if (obsType != meshType) {
	if (obs->inBox (pos, 0.0f, size[0], size[1], size[2])) {
	  // add this obstacle to the list
	  fullList.list[fullList.count] = obs;
	  fullList.count++;
	  if (obsType == faceType) {
	    // record this face's hit in its mesh obstacle
	    MeshFace* face = (MeshFace*) obs;
	    MeshObstacle* mesh = face->getMesh();
	    if (mesh != NULL) {
	      mesh->collisionState = true;
	    }
	  }
	}
      } else {
	MeshObstacle* mesh = (MeshObstacle*) obs;
	if (mesh->collisionState) {
	  fullList.list[fullList.count] = (Obstacle*) mesh;
	  fullList.count++;
	  mesh->collisionState = false;
	}
	else if (mesh->containsPointNoOctree (point)) {
	  fullList.list[fullList.count] = (Obstacle*) mesh;
	  fullList.count++;
	}
      }
    }
  }

  // count will remain as the total numbers of
  // scene nodes that intersect with this cell
  count = fullList.count;

  // resize the list to save space
  fullList.list = (Obstacle**) realloc (fullList.list,
					fullList.count * sizeof (Obstacle*));

  // return if this is a leaf node
  if (((int)depth >= maxDepth) || (fullList.count <= minElements)) {
    resizeCell();
    //logDebugMessage(4, ("COLDET LEAF NODE: depth = %d, items = %i\n", depth, count);
    return;
  }

  // sow the seeds
  depth++;
  makeChildren();

  // non NULLs first
  squeezeChildren (children);

  // resize this branch cell
  resizeCell();

  // clear the list
  fullList.count = 0;
  free (fullList.list);
  fullList.list = NULL;

  //logDebugMessage(4, ("COLDET BRANCH NODE: depth = %d, children = %i\n", depth, childCount);

  return;
}


ColDetNode::~ColDetNode()
{
  for (int i = 0; i < 8; i++) {
    delete children[i];
  }
  free (fullList.list);
  return;
}


void ColDetNode::makeChildren ()
{
  int side[3];    // the axis sides  (0 or 1)
  float center[3];
  Extents exts;

  // setup the center point
  for (int i = 0; i < 3; i++) {
    center[i] = 0.5f * (extents.maxs[i] + extents.mins[i]);
  }

  childCount = 0;
  const float* extentSet[3] = { extents.mins, center, extents.maxs };

  for (side[0] = 0; side[0] < 2; side[0]++) {
    for (side[1] = 0; side[1] < 2; side[1]++) {
      for (side[2] = 0; side[2] < 2; side[2]++) {

	// calculate the child's extents
	for (int a = 0; a < 3; a++) {
	  exts.mins[a] = extentSet[side[a]+0][a];
	  exts.maxs[a] = extentSet[side[a]+1][a];
	}

	int kid = side[0] + (2 * side[1]) + (4 * side[2]);

	children[kid] = new ColDetNode (depth, exts, &fullList);

	if (children[kid]->getCount() == 0) {
	  delete children[kid];
	  children[kid] = NULL;
	}
	else {
	  childCount++;
	}
      }
    }
  }

  return;
}


void ColDetNode::resizeCell ()
{
  int i;
  Extents absExts;

  if (childCount > 0) {
    // use lower children's extents
    for (i = 0; i < childCount; i++) {
      absExts.expandToBox(children[i]->getExtents());
    }
  } else {
    // check all of the obstacles
    for (i = 0; i < fullList.count; i++) {
      const Obstacle* obs = fullList.list[i];
      absExts.expandToBox(obs->getExtents());
    }
  }

  for (i = 0; i < 3; i++) {
    if (absExts.mins[i] > extents.mins[i]) {
      extents.mins[i] = absExts.mins[i];
    }
    if (absExts.maxs[i] < extents.maxs[i]) {
      extents.maxs[i] = absExts.maxs[i];
    }
  }

  return;
}


void ColDetNode::axisBoxTest (const Extents& exts) const
{
  int i;

  if (!extents.touches(exts)) {
    return;
  }

  if (childCount == 0) {
    for (i = 0; i < fullList.count; i++) {
      Obstacle* obs = fullList.list[i];
      if (obs->collisionState == false) {
	obs->collisionState = true;
	addToFullPadList (obs);
      }
    }
  }
  else {
    for (i = 0; i < childCount; i++) {
      children[i]->axisBoxTest (exts);
    }
  }

  return;
}


void ColDetNode::boxTest (const float* pos, float angle,
			  float dx, float dy, float dz) const
{
  int i;

/* FIXME
  if ((_maxs[0] < mins[0]) || (_mins[0] > maxs[0]) ||
      (_maxs[1] < mins[1]) || (_mins[1] > maxs[1]) ||
      (_maxs[2] < mins[2]) || (_mins[2] > maxs[2])) {
    return;
  }
*/

  if (childCount == 0) {
    for (i = 0; i < fullList.count; i++) {
      Obstacle* obs = fullList.list[i];
      if (obs->collisionState == false) {
	obs->collisionState = true;
	addToFullPadList (obs);
      }
    }
  }
  else {
    for (i = 0; i < childCount; i++) {
      children[i]->boxTest (pos, angle, dx, dy, dz);
    }
  }

  return;
}


void ColDetNode::rayTest (const Ray* ray, float timeLeft) const
{
  if (!testRayHitsAxisBox(ray, extents, &inTime) ||
      (inTime > timeLeft)) {
    return;
  }

  if (childCount == 0) {
    for (int i = 0; i < fullList.count; i++) {
      Obstacle* obs = fullList.list[i];
      if (obs->collisionState == false) {
	obs->collisionState = true;
	addToFullPadList (obs);
      }
    }
  }
  else {
    for (int i = 0; i < childCount; i++) {
      children[i]->rayTest (ray, timeLeft);
    }
  }

  return;
}


void ColDetNode::rayTestNodes (const Ray* ray, float timeLeft) const
{
  if (!testRayHitsAxisBox(ray, extents, &inTime, &outTime) ||
      (inTime > timeLeft)) {
    return;
  }

  if (childCount == 0) {
    addToRayList(this);
  }
  else {
    for (int i = 0; i < childCount; i++) {
      children[i]->rayTestNodes(ray, timeLeft);
    }
  }

  return;
}


/*
void ColDetNode::boxTestSplit (const float* pos, float angle,
			       float dx, float dy, float dz) const
{
  pos = pos;
  angle = dx =dy =dz;
  return;
}
*/


void ColDetNode::tallyStats()
{
  totalNodes++;
  totalElements += fullList.count;

  if (childCount > 0) {
    for (int i = 0; i < childCount; i++) {
      children[i]->tallyStats();
    }
  } else {
    leafNodes++;
  }

  return;
}


void ColDetNode::draw(DrawLinesFunc drawLinesFunc)
{
  int x, y, z, c;
  float points[5][3];
  const float* exts[2] = { extents.mins, extents.maxs };

  // pick a color
  int hasMeshObs = 0;
  int hasNormalObs = 0;
  for (x = 0; x < fullList.count; x++) {
    if (fullList.list[x]->getType() == MeshObstacle::getClassName()) {
      hasMeshObs = 1;
    } else {
      hasNormalObs = 1;
    }
  }
  int color = hasNormalObs + (2 * hasMeshObs);

  // draw Z-normal squares
  for (z = 0; z < 2; z++) {
    for (c = 0; c < 4; c++) {
      x = ((c + 0) % 4) / 2;
      y = ((c + 1) % 4) / 2;
      points[c][0] = exts[x][0];
      points[c][1] = exts[y][1];
      points[c][2] = exts[z][2];
    }
    memcpy (points[4], points[0], sizeof (points[4]));
    drawLinesFunc (5, points, color);
  }

  // draw the corner edges
  for (c = 0; c < 4; c++) {
    x = ((c + 0) % 4) / 2;
    y = ((c + 1) % 4) / 2;
    for (z = 0; z < 2; z++) {
      points[z][0] = exts[x][0];
      points[z][1] = exts[y][1];
      points[z][2] = exts[z][2];
    }
    drawLinesFunc (2, points, color);
  }

  // draw the kids
  for (c = 0; c < childCount; c++) {
    children[c]->draw (drawLinesFunc);
  }

  return;
}


// Local Variables: ***
// mode: C++ ***
// tab-width: 8 ***
// c-basic-offset: 2 ***
// indent-tabs-mode: t ***
// End: ***
// ex: shiftwidth=2 tabstop=8
