/* This file is part of Patchage.
 * Copyright 2010-2020 David Robillard <d@drobilla.net>
 *
 * Patchage is free software: you can redistribute it and/or modify it under
 * the terms of the GNU General Public License as published by the Free
 * Software Foundation, either version 3 of the License, or (at your option)
 * any later version.
 *
 * Patchage 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 details.
 *
 * You should have received a copy of the GNU General Public License
 * along with Patchage.  If not, see <http://www.gnu.org/licenses/>.
 */

#include "CanvasModule.hpp"

#include "Canvas.hpp"
#include "CanvasPort.hpp"
#include "Configuration.hpp"
#include "Patchage.hpp"
#include "PortID.hpp"
#include "SignalDirection.hpp"
#include "warnings.hpp"

PATCHAGE_DISABLE_GANV_WARNINGS
#include "ganv/Port.hpp"
PATCHAGE_RESTORE_WARNINGS

#include <glibmm/helperlist.h>
#include <gtkmm/menu.h>
#include <gtkmm/menu_elems.h>
#include <gtkmm/menuitem.h>
#include <gtkmm/menushell.h>
#include <sigc++/functors/mem_fun.h>
#include <sigc++/signal.h>

#include <cassert>
#include <cstdlib>
#include <memory>
#include <utility>

namespace patchage {

CanvasModule::CanvasModule(Patchage*          app,
                           const std::string& name,
                           SignalDirection    type,
                           ClientID           id,
                           double             x,
                           double             y)
  : Module(*app->canvas(), name, x, y)
  , _app(app)
  , _menu(nullptr)
  , _name(name)
  , _type(type)
  , _id(std::move(id))
{
  signal_event().connect(sigc::mem_fun(this, &CanvasModule::on_event));

  signal_moved().connect(sigc::mem_fun(this, &CanvasModule::store_location));

  // Set as source by default, turned off if input ports added
  set_is_source(true);
}

CanvasModule::~CanvasModule()
{
  _app->canvas()->remove_module(this);
  delete _menu;
  _menu = nullptr;
}

void
CanvasModule::update_menu()
{
  if (!_menu) {
    return;
  }

  if (_type == SignalDirection::duplex) {
    bool has_in  = false;
    bool has_out = false;
    for (const auto* p : *this) {
      if (p->is_input()) {
        has_in = true;
      } else {
        has_out = true;
      }

      if (has_in && has_out) {
        _menu->items()[0].show(); // Show "Split" menu item
        return;
      }
    }
    _menu->items()[0].hide(); // Hide "Split" menu item
  }
}

bool
CanvasModule::show_menu(GdkEventButton* ev)
{
  _menu                      = new Gtk::Menu();
  Gtk::Menu::MenuList& items = _menu->items();

  if (_type == SignalDirection::duplex) {
    items.push_back(Gtk::Menu_Helpers::MenuElem(
      "_Split", sigc::mem_fun(this, &CanvasModule::split)));
    update_menu();
  } else {
    items.push_back(Gtk::Menu_Helpers::MenuElem(
      "_Join", sigc::mem_fun(this, &CanvasModule::join)));
  }

  items.push_back(Gtk::Menu_Helpers::MenuElem(
    "_Disconnect All", sigc::mem_fun(this, &CanvasModule::disconnect_all)));

  _menu->popup(ev->button, ev->time);
  return true;
}

bool
CanvasModule::on_event(GdkEvent* ev)
{
  if (ev->type == GDK_BUTTON_PRESS && ev->button.button == 3) {
    return show_menu(&ev->button);
  }
  return false;
}

void
CanvasModule::load_location()
{
  Coord loc;

  if (_app->conf().get_module_location(_name, _type, loc)) {
    move_to(loc.x, loc.y);
  } else {
    const double x = 20 + rand() % 640;
    const double y = 20 + rand() % 480;

    // Move, then store generated location so it is stable
    move_to(x, y);
    store_location(x, y);
  }
}

void
CanvasModule::store_location(double x, double y)
{
  _app->conf().set_module_location(_name, _type, {x, y});
}

void
CanvasModule::split()
{
  assert(_type == SignalDirection::duplex);
  _app->conf().set_module_split(_name, true);
  _app->refresh();
}

void
CanvasModule::join()
{
  assert(_type != SignalDirection::duplex);
  _app->conf().set_module_split(_name, false);
  _app->refresh();
}

void
CanvasModule::disconnect_all()
{
  for (Ganv::Port* p : *this) {
    p->disconnect();
  }
}

CanvasPort*
CanvasModule::get_port(const PortID& id)
{
  for (Ganv::Port* p : *this) {
    auto* pport = dynamic_cast<CanvasPort*>(p);
    if (pport && pport->id() == id) {
      return pport;
    }
  }

  return nullptr;
}

} // namespace patchage