/* -*- C++ -*-

 *

 * This file is a part of LEMON, a generic C++ optimization library

 *

 * Copyright (C) 2003-2007

 * Egervary Jeno Kombinatorikus Optimalizalasi Kutatocsoport

 * (Egervary Research Group on Combinatorial Optimization, EGRES).

 *

 * Permission to use, modify and distribute this software is granted

 * provided that this copyright notice appears in all copies. For

 * precise terms see the accompanying LICENSE file.

 *

 * This software is provided "AS IS" with no warranty of any kind,

 * express or implied, and with no claim as to its suitability for any

 * purpose.

 *

 */

#ifndef LEMON_DIMACS_H

#define LEMON_DIMACS_H

#include <iostream>

#include <string>

#include <vector>

#include <lemon/maps.h>

#include <lemon/bits/invalid.h>

/// \ingroup dimacs_group

/// \file

/// \brief DIMACS file format reader.

namespace lemon {

  ///@defgroup dimacs_group DIMACS format

  ///\brief Read and write files in DIMACS format

  ///

  ///Tools to read a graph from or write it to a file in DIMACS format

  ///data

  ///\ingroup io_group

  /// \addtogroup dimacs_group

  /// @{

  /// DIMACS min cost flow reader function.

  ///

  /// This function reads a min cost flow instance from DIMACS format,

  /// i.e. from DIMACS files having a line starting with

  /// \code

  ///   p min

  /// \endcode

  /// At the beginning \c g is cleared by \c g.clear(). The supply 

  /// amount of the nodes are written to \c supply (signed). The 

  /// lower bounds, capacities and costs of the edges are written to 

  /// \c lower, \c capacity and \c cost.

  ///

  /// \author Marton Makai and Peter Kovacs

  template <typename Graph, typename SupplyMap, 

    typename CapacityMap, typename CostMap>

  void readDimacs( std::istream& is,

		   Graph &g,

		   SupplyMap& supply, 

		   CapacityMap& lower, 

		   CapacityMap& capacity, 

		   CostMap& cost )

  {

    g.clear();

    std::vector<typename Graph::Node> nodes;

    typename Graph::Edge e;

    std::string problem, str;

    char c;

    int n, m; 

    int i, j;

    typename SupplyMap::Value sup;

    typename CapacityMap::Value low;

    typename CapacityMap::Value cap;

    typename CostMap::Value co;

    while (is >> c) {

      switch (c) {

      case 'c': // comment line

	getline(is, str);

	break;

      case 'p': // problem definition line

	is >> problem >> n >> m;

	getline(is, str);

	if (problem != "min") return;

	nodes.resize(n + 1);

	for (int k = 1; k <= n; ++k) {

	  nodes[k] = g.addNode();

	  supply[nodes[k]] = 0;

	}

	break;

      case 'n': // node definition line

	is >> i >> sup;

	getline(is, str);

	supply.set(nodes[i], sup);

	break;

      case 'a': // edge (arc) definition line

	is >> i >> j >> low >> cap >> co;

	getline(is, str);

	e = g.addEdge(nodes[i], nodes[j]);

	lower.set(e, low);

	if (cap >= 0)

	  capacity.set(e, cap);

	else

	  capacity.set(e, -1);

	cost.set(e, co);

	break;

      }

    }

  }

  /// DIMACS max flow reader function.

  ///

  /// This function reads a max flow instance from DIMACS format,

  /// i.e. from DIMACS files having a line starting with

  /// \code

  ///   p max

  /// \endcode

  /// At the beginning \c g is cleared by \c g.clear(). The edge 

  /// capacities are written to \c capacity and \c s and \c t are

  /// set to the source and the target nodes.

  ///

  /// \author Marton Makai

  template<typename Graph, typename CapacityMap>

  void readDimacs(std::istream& is, Graph &g, CapacityMap& capacity, 

		  typename Graph::Node &s, typename Graph::Node &t) {

    g.clear();

    std::vector<typename Graph::Node> nodes;

    typename Graph::Edge e;

    std::string problem;

    char c, d;

    int n, m; 

    int i, j;

    typename CapacityMap::Value _cap;

    std::string str;

    while (is >> c) {

      switch (c) {

      case 'c': // comment line

	getline(is, str);

	break;

      case 'p': // problem definition line

	is >> problem >> n >> m;

	getline(is, str);

	nodes.resize(n + 1);

	for (int k = 1; k <= n; ++k)

	  nodes[k] = g.addNode();

	break;

      case 'n': // node definition line

	if (problem == "sp") { // shortest path problem

	  is >> i;

	  getline(is, str);

	  s = nodes[i];

	}

	if (problem == "max") { // max flow problem

	  is >> i >> d;

	  getline(is, str);

	  if (d == 's') s = nodes[i];

	  if (d == 't') t = nodes[i];

	}

	break;

      case 'a': // edge (arc) definition line

	if (problem == "max" || problem == "sp") {

	  is >> i >> j >> _cap;

	  getline(is, str);

	  e = g.addEdge(nodes[i], nodes[j]);

	  capacity.set(e, _cap);

	} else {

	  is >> i >> j;

	  getline(is, str);

	  g.addEdge(nodes[i], nodes[j]);

	}

	break;

      }

    }

  }

  /// DIMACS shortest path reader function.

  ///

  /// This function reads a shortest path instance from DIMACS format,

  /// i.e. from DIMACS files having a line starting with

  /// \code

  ///   p sp

  /// \endcode

  /// At the beginning \c g is cleared by \c g.clear(). The edge

  /// capacities are written to \c capacity and \c s is set to the

  /// source node.

  ///

  /// \author Marton Makai

  template<typename Graph, typename CapacityMap>

  void readDimacs(std::istream& is, Graph &g, CapacityMap& capacity, 

		  typename Graph::Node &s) {

    readDimacs(is, g, capacity, s, s);

  }

  /// DIMACS capacitated graph reader function.

  ///

  /// This function reads an edge capacitated graph instance from

  /// DIMACS format. At the beginning \c g is cleared by \c g.clear()

  /// and the edge capacities are written to \c capacity.

  ///

  /// \author Marton Makai

  template<typename Graph, typename CapacityMap>

  void readDimacs(std::istream& is, Graph &g, CapacityMap& capacity) {

    typename Graph::Node u;

    readDimacs(is, g, capacity, u, u);

  }

  /// DIMACS plain graph reader function.

  ///

  /// This function reads a graph without any designated nodes and

  /// maps from DIMACS format, i.e. from DIMACS files having a line

  /// starting with

  /// \code

  ///   p mat

  /// \endcode

  /// At the beginning \c g is cleared by \c g.clear().

  ///

  /// \author Marton Makai

  template<typename Graph>

  void readDimacs(std::istream& is, Graph &g) {

    typename Graph::Node u;

    NullMap<typename Graph::Edge, int> n;

    readDimacs(is, g, n, u, u);

  }

  /// DIMACS plain graph writer function.

  ///

  /// This function writes a graph without any designated nodes and

  /// maps into DIMACS format, i.e. into DIMACS file having a line 

  /// starting with

  /// \code

  ///   p mat

  /// \endcode

  ///

  /// \author Marton Makai

  template<typename Graph>

  void writeDimacs(std::ostream& os, const Graph &g) {

    typedef typename Graph::NodeIt NodeIt;

    typedef typename Graph::EdgeIt EdgeIt;  

    os << "c matching problem" << std::endl;

    os << "p mat " << g.nodeNum() << " " << g.edgeNum() << std::endl;

    typename Graph::template NodeMap<int> nodes(g);

    int i = 1;

    for(NodeIt v(g); v != INVALID; ++v) {

      nodes.set(v, i);

      ++i;

    }    

    for(EdgeIt e(g); e != INVALID; ++e) {

      os << "a " << nodes[g.source(e)] << " " << nodes[g.target(e)] << std::endl; 

    }

  }

  /// @}

} //namespace lemon

#endif //LEMON_DIMACS_H