/*
  crossover Copyright (C) 2002 Daniel Sundberg

  This program is free software; you can redistribute it and/or modify
  it under the terms of the GNU General Public License version 2
  as published by the Free Software Foundation.

  This program is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  GNU General Public License for more details.

  You should have received a copy of the GNU General Public License
  along with this program; if not, write to the Free Software
  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/

#include <glib/gstrfuncs.h>
#include <sstream>
#include "crossover.h"

Crossover::Crossover(int type, string id_string) : GSpeakersObject()
{
  m_type = type;
  
  if (m_type & CROSSOVER_TYPE_SUBSONIC) {
    m_networks.push_back(Net(NET_TYPE_HIGHPASS, NET_NOT_PRESENT, NET_ORDER_1ST));
  }
  if (m_type & CROSSOVER_TYPE_LOWPASS) {
    m_networks.push_back(Net(NET_TYPE_LOWPASS, NET_ORDER_1ST, NET_NOT_PRESENT));
  }
  if (m_type & CROSSOVER_TYPE_HIGHPASS) {
    m_networks.push_back(Net(NET_TYPE_HIGHPASS, NET_NOT_PRESENT, NET_ORDER_1ST));
  }
  if (m_type & CROSSOVER_TYPE_TWOWAY) {
    m_networks.push_back(Net(NET_TYPE_LOWPASS, NET_ORDER_1ST, NET_NOT_PRESENT));
    m_networks.push_back(Net(NET_TYPE_HIGHPASS, NET_NOT_PRESENT, NET_ORDER_1ST));
  }
  if (m_type & CROSSOVER_TYPE_THREEWAY) {
    m_networks.push_back(Net(NET_TYPE_LOWPASS, NET_ORDER_1ST, NET_NOT_PRESENT));
    m_networks.push_back(Net(NET_TYPE_LOWPASS | NET_TYPE_HIGHPASS, NET_ORDER_1ST, NET_ORDER_1ST));
    m_networks.push_back(Net(NET_TYPE_HIGHPASS, NET_NOT_PRESENT, NET_ORDER_1ST));
  }
  if (m_type & CROSSOVER_TYPE_FOURWAY) {
    m_networks.push_back(Net(NET_TYPE_LOWPASS, NET_ORDER_1ST, NET_NOT_PRESENT));
    m_networks.push_back(Net(NET_TYPE_LOWPASS | NET_TYPE_HIGHPASS, NET_ORDER_1ST, NET_ORDER_1ST));
    m_networks.push_back(Net(NET_TYPE_LOWPASS | NET_TYPE_HIGHPASS, NET_ORDER_1ST, NET_ORDER_1ST));
    m_networks.push_back(Net(NET_TYPE_HIGHPASS, NET_NOT_PRESENT, NET_ORDER_1ST));
  }
  m_id_string = id_string;
}

Crossover::Crossover(xmlNodePtr parent)
{
  if ((parent != NULL) && (g_strcasecmp( (char *)parent->name, "crossover" ) == 0)) {
    try {
      parse_type(parent->children);
    } catch (GSpeakersException e) {
      throw e;
    }
  } else {
    throw GSpeakersException(_("Crossover: crossover node expected"));
  }
}

void Crossover::parse_type(xmlNodePtr node)
{
  if ((node != NULL) && (g_strcasecmp( (char *)node->name, "type" ) == 0)) {
    istringstream((char *)xmlNodeGetContent(node)) >> m_type;
    //m_type = atoi((char *)xmlNodeGetContent(node));
    try {
      parse_networks(node->next);
    } catch (GSpeakersException e) {
      throw e;
    }
  } else {
    throw GSpeakersException(_("Crossover: type node expected"));
  }
}

void Crossover::parse_networks(xmlNodePtr node) 
{
  xmlNodePtr child;
  
  if ((node != NULL) && (g_strcasecmp( (char *)node->name, "networks" ) == 0)) {
    child = node->children;
    while (child != NULL) {
      try {
        m_networks.push_back(Net(child));
      } catch (GSpeakersException e) {
        throw e;
      }
      child = child->next;
    }
    try {
      parse_id_string(node->next);
    } catch (GSpeakersException e) {
      throw e;
    }
  } 
}

void Crossover::parse_id_string(xmlNodePtr node)
{
  if ((node != NULL) && (g_strcasecmp( (char *)node->name, "id_string" ) == 0)) {
    m_id_string = string((char *)xmlNodeGetContent(node));
    //m_type = atoi((char *)xmlNodeGetContent(node));
  } else {
    throw GSpeakersException(_("Crossover: id_string node expected"));
  }
}


xmlNodePtr Crossover::to_xml_node(xmlNodePtr parent)
{

  xmlNodePtr crossover, field;
  
  crossover = xmlNewChild( parent, NULL, (xmlChar *)("crossover"), NULL );

  field = xmlNewChild( crossover, NULL, (xmlChar *)("type"), NULL );
  xmlNodeSetContent( field, (xmlChar *)g_strdup_printf("%d", m_type));
  field = xmlNewChild( crossover, NULL, (xmlChar *)("networks"), NULL );

  for(
    vector<Net>::iterator from = m_networks.begin();
    from != m_networks.end();
    ++from)
  {
    ((Net)(*from)).to_xml_node(field);
  }
  field = xmlNewChild( crossover, NULL, (xmlChar *)("id_string"), NULL );
  xmlNodeSetContent( field, (xmlChar *)m_id_string.c_str());

  return crossover;
}

ostream& operator<< (ostream& o, const Crossover& crossover)
{
  o << _("Crossover type:") << crossover.m_type << endl << "Id: " << crossover.m_id << endl << "---Nets----" << endl;
  for(
    vector<Net>::iterator from = ((vector<Net>)(crossover.m_networks)).begin();
    from != ((vector<Net>)(crossover.m_networks)).end();
    ++from)
  {
    o << *from;
  }
  
  return o;
}

vector<Net> *Crossover::networks()
{
  return &m_networks;
}

string Crossover::get_id_string()
{
  return m_id_string;
}

void Crossover::set_id_string(string id_string)
{
  m_id_string = id_string;
}