// -*- C++ -*-

#include <lemon/bits/graph_extender.h>

#include <lemon/concept/ugraph.h>

#include <lemon/list_graph.h>

#include <lemon/smart_graph.h>

#include <lemon/full_graph.h>

#include <lemon/grid_graph.h>

#include <lemon/graph_utils.h>

#include "test_tools.h"

using namespace lemon;

using namespace lemon::concept;

void check_concepts() {

  typedef UGraphExtender<ListGraphBase> ListUGraphBase;

  typedef IterableUGraphExtender<

    AlterableUGraphExtender<ListUGraphBase> > IterableListUGraph;

  typedef MappableUGraphExtender<IterableListUGraph>

    MappableListUGraph;

  typedef ErasableUGraphExtender<

    ClearableUGraphExtender<

    ExtendableUGraphExtender<MappableListUGraph> > > Graph;

  checkConcept<BaseIterableUGraphConcept, Graph>();

  checkConcept<IterableUGraphConcept, Graph>();

  checkConcept<MappableUGraphConcept, Graph>();

  checkConcept<UGraph, Graph>();

  checkConcept<ErasableUGraph, Graph>();

  checkConcept<UGraph, ListUGraph>();

  checkConcept<ErasableUGraph, ListUGraph>();

  checkConcept<UGraph, SmartUGraph>();

  checkConcept<ExtendableUGraph, SmartUGraph>();

  checkConcept<UGraph, FullUGraph>();

  checkConcept<UGraph, UGraph>();

  checkConcept<UGraph, GridGraph>();

}

template <typename Graph>

void check_item_counts(Graph &g, int n, int e) {

  int nn = 0;

  for (typename Graph::NodeIt it(g); it != INVALID; ++it) {

    ++nn;

  }

  check(nn == n, "Wrong node number.");

  check(countNodes(g) == n, "Wrong node number.");

  int ee = 0;

  for (typename Graph::EdgeIt it(g); it != INVALID; ++it) {

    ++ee;

  }

  check(ee == 2*e, "Wrong edge number.");

  check(countEdges(g) == 2*e, "Wrong edge number.");

  int uee = 0;

  for (typename Graph::UEdgeIt it(g); it != INVALID; ++it) {

    ++uee;

  }

  check(uee == e, "Wrong uedge number.");

  check(countUEdges(g) == e, "Wrong uedge number.");

}

template <typename Graph>

void print_items(Graph &g) {

  typedef typename Graph::NodeIt NodeIt;

  typedef typename Graph::UEdgeIt UEdgeIt;

  typedef typename Graph::EdgeIt EdgeIt;

  std::cout << "Nodes" << std::endl;

  int i=0;

  for(NodeIt it(g); it!=INVALID; ++it, ++i) {

    std::cout << "  " << i << ": " << g.id(it) << std::endl;

  }

  std::cout << "UEdge" << std::endl;

  i=0;

  for(UEdgeIt it(g); it!=INVALID; ++it, ++i) {

    std::cout << "  " << i << ": " << g.id(it) 

	 << " (" << g.id(g.source(it)) << ", " << g.id(g.target(it)) 

	 << ")" << std::endl;

  }

  std::cout << "Edge" << std::endl;

  i=0;

  for(EdgeIt it(g); it!=INVALID; ++it, ++i) {

    std::cout << "  " << i << ": " << g.id(it)

	 << " (" << g.id(g.source(it)) << ", " << g.id(g.target(it)) 

	 << ")" << std::endl;

  }

}

template <typename Graph>

void check_graph() {

  typedef typename Graph::Node Node;

  typedef typename Graph::UEdge UEdge;

  typedef typename Graph::Edge Edge;

  typedef typename Graph::NodeIt NodeIt;

  typedef typename Graph::UEdgeIt UEdgeIt;

  typedef typename Graph::EdgeIt EdgeIt;

  Graph g;

  check_item_counts(g,0,0);

  Node

    n1 = g.addNode(),

    n2 = g.addNode(),

    n3 = g.addNode();

  UEdge

    e1 = g.addEdge(n1, n2),

    e2 = g.addEdge(n2, n3);

  // print_items(g);

  check_item_counts(g,3,2);

}

void checkGridGraph(const GridGraph& g, int w, int h) {

  check(g.width() == w, "Wrong width");

  check(g.height() == h, "Wrong height");

  for (int i = 0; i < w; ++i) {

    for (int j = 0; j < h; ++j) {

      check(g.col(g(i, j)) == i, "Wrong col");

      check(g.row(g(i, j)) == j, "Wrong row");

    }

  }

  for (int i = 0; i < w; ++i) {

    for (int j = 0; j < h - 1; ++j) {

      check(g.source(g.down(g(i, j))) == g(i, j), "Wrong down");

      check(g.target(g.down(g(i, j))) == g(i, j + 1), "Wrong down");

    }

    check(g.down(g(i, h - 1)) == INVALID, "Wrong down");

  }

  for (int i = 0; i < w; ++i) {

    for (int j = 1; j < h; ++j) {

      check(g.source(g.up(g(i, j))) == g(i, j), "Wrong up");

      check(g.target(g.up(g(i, j))) == g(i, j - 1), "Wrong up");

    }

    check(g.up(g(i, 0)) == INVALID, "Wrong up");

  }

  for (int j = 0; j < h; ++j) {

    for (int i = 0; i < w - 1; ++i) {

      check(g.source(g.right(g(i, j))) == g(i, j), "Wrong right");

      check(g.target(g.right(g(i, j))) == g(i + 1, j), "Wrong right");      

    }

    check(g.right(g(w - 1, j)) == INVALID, "Wrong right");    

  }

  for (int j = 0; j < h; ++j) {

    for (int i = 1; i < w; ++i) {

      check(g.source(g.left(g(i, j))) == g(i, j), "Wrong left");

      check(g.target(g.left(g(i, j))) == g(i - 1, j), "Wrong left");      

    }

    check(g.left(g(0, j)) == INVALID, "Wrong left");    

  }

}

int main() {

  check_concepts();

  check_graph<ListUGraph>();

  check_graph<SmartUGraph>();

  {

    FullUGraph g(5);

    check_item_counts(g, 5, 10);

  }

  {

    GridGraph g(5, 6);

    check_item_counts(g, 30, 49);

    checkGridGraph(g, 5, 6);

  }

  std::cout << __FILE__ ": All tests passed.\n";

  return 0;

}