// $Id$
//
// Copyright (C)  2004-2006 Rational Discovery LLC
//
//   @@ All Rights Reserved  @@
//
#include <iostream>
#include <RDGeneral/Invariant.h>
#include <RDGeneral/utils.h>
#include <Geometry/point.h>

#include <Features/Feature.h>

#include <boost/spirit/core.hpp>
#include <boost/spirit/actor/assign_actor.hpp>
using namespace boost::spirit;

using namespace RDKit;
using namespace RDGeom;
using namespace RDFeatures;

typedef enum {
  fooType,
  barType,
  bazType,
  grnType,
} TypeMarker;

void test1(){
  std::cerr << "-------------------------------------" << std::endl;
  std::cerr << "Basics for ExplicitFeatures." << std::endl;

  ExplicitFeature<TypeMarker> f1;
  f1.setFamily(bazType);
  TEST_ASSERT(f1.getFamily()==bazType);
  f1.setType(grnType);
  TEST_ASSERT(f1.getType()==grnType);
  TEST_ASSERT(feq(f1.getLoc().x,0.0));
  TEST_ASSERT(feq(f1.getLoc().y,0.0));
  TEST_ASSERT(feq(f1.getLoc().z,0.0));
  TEST_ASSERT(f1.getDirs().size()==0);

  f1 = ExplicitFeature<TypeMarker>(barType,fooType);
  TEST_ASSERT(f1.getFamily()==barType);
  TEST_ASSERT(f1.getType()==fooType);
  TEST_ASSERT(feq(f1.getLoc().x,0.0));
  TEST_ASSERT(feq(f1.getLoc().y,0.0));
  TEST_ASSERT(feq(f1.getLoc().z,0.0));
  TEST_ASSERT(f1.getDirs().size()==0);

  f1 = ExplicitFeature<TypeMarker>(barType,fooType,Point3D(1.0,2.0,3.0));
  TEST_ASSERT(f1.getFamily()==barType);
  TEST_ASSERT(f1.getType()==fooType);
  TEST_ASSERT(feq(f1.getLoc().x,1.0));
  TEST_ASSERT(feq(f1.getLoc().y,2.0));
  TEST_ASSERT(feq(f1.getLoc().z,3.0));
  TEST_ASSERT(f1.getDirs().size()==0);

  f1.setLoc(Point3D(-1.0,-2.0,-3.0));
  TEST_ASSERT(feq(f1.getLoc().x,-1.0));
  TEST_ASSERT(feq(f1.getLoc().y,-2.0));
  TEST_ASSERT(feq(f1.getLoc().z,-3.0));
  TEST_ASSERT(f1.getDirs().size()==0);

  
  std::cerr << "  done" << std::endl;
}

void test2(){
  std::cerr << "-------------------------------------" << std::endl;
  std::cerr << "Basics for ImplicitFeatures." << std::endl;

  ImplicitFeature<TypeMarker> f1;
  f1.setFamily(fooType);
  TEST_ASSERT(f1.getType()==fooType);
  f1.setType(grnType);
  TEST_ASSERT(f1.getType()==grnType);
  TEST_ASSERT(feq(f1.getLoc().x,0.0));
  TEST_ASSERT(feq(f1.getLoc().y,0.0));
  TEST_ASSERT(feq(f1.getLoc().z,0.0));
  TEST_ASSERT(f1.getDirs().size()==0);

  f1 = ImplicitFeature<TypeMarker>(barType,fooType);
  TEST_ASSERT(f1.getFamily()==barType);
  TEST_ASSERT(f1.getType()==barType);
  TEST_ASSERT(feq(f1.getLoc().x,0.0));
  TEST_ASSERT(feq(f1.getLoc().y,0.0));
  TEST_ASSERT(feq(f1.getLoc().z,0.0));
  TEST_ASSERT(f1.getDirs().size()==0);

  Point3D p1(0,0,0),p2(1,0,0),p3(0,1,0);
  f1.addPoint(&p1);
  f1.addPoint(&p2);
  TEST_ASSERT(feq(f1.getLoc().x,0.50));
  TEST_ASSERT(feq(f1.getLoc().y,0.0));
  TEST_ASSERT(feq(f1.getLoc().z,0.0));
  
  f1.addPoint(&p3);
  TEST_ASSERT(feq(f1.getLoc().x,0.3333));
  TEST_ASSERT(feq(f1.getLoc().y,0.3333));
  TEST_ASSERT(feq(f1.getLoc().z,0.0));

  f1.reset();
  TEST_ASSERT(feq(f1.getLoc().x,0.0));
  TEST_ASSERT(feq(f1.getLoc().y,0.0));
  TEST_ASSERT(feq(f1.getLoc().z,0.0));

  
  std::cerr << "  done" << std::endl;
}


void test3(){
  std::cerr << "-------------------------------------" << std::endl;
  std::cerr << "ExplicitFeatures 2D, string type." << std::endl;

  typedef ExplicitFeature<std::string,std::string,Point2D> LocalFeature;
  LocalFeature f1;
  f1.setType("foo");
  TEST_ASSERT(f1.getType()=="foo");
  f1.setFamily("foob");
  TEST_ASSERT(f1.getFamily()=="foob");
  TEST_ASSERT(feq(f1.getLoc().x,0.0));
  TEST_ASSERT(feq(f1.getLoc().y,0.0));
  TEST_ASSERT(f1.getDirs().size()==0);

  f1 = LocalFeature("foo","bar");
  TEST_ASSERT(f1.getFamily()=="bar");
  TEST_ASSERT(f1.getType()=="bar");
  TEST_ASSERT(feq(f1.getLoc().x,0.0));
  TEST_ASSERT(feq(f1.getLoc().y,0.0));
  TEST_ASSERT(f1.getDirs().size()==0);

  f1 = LocalFeature("grm","grn",Point2D(1.0,2.0));
  TEST_ASSERT(f1.getFamily()=="grm");
  TEST_ASSERT(f1.getType()=="grn");
  TEST_ASSERT(feq(f1.getLoc().x,1.0));
  TEST_ASSERT(feq(f1.getLoc().y,2.0));
  TEST_ASSERT(f1.getDirs().size()==0);

  f1.setLoc(Point2D(-1.0,-2.0));
  TEST_ASSERT(feq(f1.getLoc().x,-1.0));
  TEST_ASSERT(feq(f1.getLoc().y,-2.0));
  TEST_ASSERT(f1.getDirs().size()==0);
  
  std::cerr << "  done" << std::endl;
}

void testParser(){
  std::cerr << "-------------------------------------" << std::endl;
  std::cerr << "parser testing." << std::endl;

  std::string text;
  int n;
  bool ok;

  text="p1";
  ok=parse(text.c_str(),
		( ch_p('p') >> int_p[assign_a(n)] ),space_p).full;
  TEST_ASSERT(ok);
  TEST_ASSERT(n==1);

  text="p12";
  ok=parse(text.c_str(),
		( ch_p('p') >> int_p[assign_a(n)] ),space_p).full;
  TEST_ASSERT(ok);
  TEST_ASSERT(n==12);
  
  text="p2 + p3";
  ok=parse(text.c_str(),
		( ch_p('p') >> int_p[assign_a(n)] ),space_p).full;
  TEST_ASSERT(!ok);

  
  

  std::cerr << "  done" << std::endl;
}
int main(){
#if 0
  test1();
  test2();
  test3();
#endif
  testParser();
}