TCAD.graph = {};


TCAD.graph.findAllLoops = function(graph, hashCode, equals) {

  var loops = [];
  var visited = new TCAD.struct.HashTable(hashCode, equals);
  function step(vertex, comesFrom, path) {
    var i;
    visited.put(vertex, true);
    for (i = path.length - 1; i >= 0; --i) {
      if (equals(vertex, path[i])) {
        loops.push(path.slice(i));
        return;
      }
    }

    var next = graph.connections(vertex);

    path.push(vertex);
    var needClone = false;

    VERTEX:
      for (i = 0; i < next.length; i++) {
        var v = next[i];
        if (equals(v, comesFrom)) {
          continue;
        }

//      //avoid duplicates
//      for (var li = loops.length - 1; li >= 0; --li) {
//        var loop = loops[li];
//        for (var j = 1; j < loop.length; j++) {
//          if (loop[j - 1] == nextId && loop[j] == vertexId) {
//            continue VERTEX;
//          }
//        }
//      }

        var p = needClone ? path.slice(0) : path;
        needClone = true;
        step(v, vertex, p);
      }
    path.pop();
  }

  for (var i = 0; i < graph.size(); i++) {
    var vertex = graph.at(i);
    if (visited.get(vertex) !== true) {
      step(vertex, -1, []);
    }
  }

  //filter duplicates

  function sameLoop(a, b) {
    var first = a[0];
    for (var bShift = 0; bShift < a.length; bShift++) {
      if (equals(b[bShift], first)) {
        break;
      }
    }
    if (bShift == a.length) {
      return false;
    }
    for (var i = 0; i < a.length; i++) {
      var bUp = (bShift + i) % a.length;
      var bDown = bShift - i;
      if (bDown < 0) {
        bDown = a.length + bDown;
      }
//      console.log("up: " + bUp + "; down: " + bDown);
      var curr = a[i];
      if ( !equals(curr, b[bUp]) && !equals(curr, b[bDown]) ) {
        return false;
      }
    }
    return true;
  }

  var duplicates = 0;
  for (var i = 0; i < loops.length; i++) {
    var a = loops[i];
    if (a == null) continue;
    for (var j = i + 1; j < loops.length; j++) {
      var b = loops[j];
      if (b == null || a.length !== b.length) {
        continue;
      }
      if (sameLoop(a, b)) {
        loops[j] = null;
        ++ duplicates;
      }
    }
  }
  if (duplicates != 0) {
    var filtered = [];
    for (var i = 0; i < loops.length; i++) {
      if (loops[i] != null) filtered.push(loops[i]);
    }
    loops = filtered;
  }

  return loops;
};

/** @constructor */
TCAD.graph.Graph = function(data) {

  this.connections = function(e) {
    return data[e];
  };

  this.at = function(index) {
    return index;
  };

  this.size = function() {
    return data.length;
  };
};

TCAD.graph.test = function() {
  var data = [
    [],
    [2],
    [1, 3, 9],
    [2, 4],
    [3, 9, 5, 8],
    [4, 6],
    [5, 8, 7],
    [6],
    [4, 6],
    [2, 4]
  ];

  var graph = new TCAD.graph.Graph(data);
  console.log(TCAD.graph.findAllLoops(graph));
};

TCAD.graph.test0 = function() {
  var data = [
    [3, 1],
    [0, 2, 8],
    [1, 3, 7, 5],
    [0, 2, 4],
    [3, 5],
    [4, 2, 6],
    [5, 7],
    [2, 6, 8],
    [1, 7]
  ];

  var graph = new TCAD.graph.Graph(data);
  console.log(TCAD.graph.findAllLoops(graph));
};