#include "wayland.hpp"

//                                                                  _
//  _ __   __ _ _ __ ___   ___  ___ _ __   __ _  ___ ___  __      _| |
// | '_ \ / _` | '_ ` _ \ / _ \/ __| '_ \ / _` |/ __/ _ \ \ \ /\ / / |
// | | | | (_| | | | | | |  __/\__ \ |_) | (_| | (_|  __/  \ V  V /| |
// |_| |_|\__,_|_| |_| |_|\___||___/ .__/ \__,_|\___\___|   \_/\_/ |_|
//                                 |_|
namespace wl {

//      _ _           _
//   __| (_)___ _ __ | | __ _ _   _
//  / _` | / __| '_ \| |/ _` | | | |
// | (_| | \__ \ |_) | | (_| | |_| |
//  \__,_|_|___/ .__/|_|\__,_|\__, |
//             |_|            |___/
display::display()
   : d(std::unique_ptr<wl_display, void (*)(wl_display *)>(
        wl_display_connect(NULL), wl_display_disconnect)),
     r(std::make_unique<registry>(d.get())) {}

bool display::ok() const {
   return d.get() != nullptr && wl_display_get_error(d.get()) == 0;
}

void display::roundtrip() { wl_display_roundtrip(this->d.get()); }

int display::dispatch() { return wl_display_dispatch(this->d.get()); }

//                 _     _
//  _ __ ___  __ _(_)___| |_ _ __ _   _
// | '__/ _ \/ _` | / __| __| '__| | | |
// | | |  __/ (_| | \__ \ |_| |  | |_| |
// |_|  \___|\__, |_|___/\__|_|   \__, |
//           |___/                |___/
namespace {
void registry_global(void *data, struct wl_registry *r, uint32_t name,
                     char const *iface, uint32_t v) {
   static_cast<registry *>(data)->global(name, iface, v);
}

void registry_global_remove(void *data, struct wl_registry *r, uint32_t name) {
   static_cast<registry *>(data)->global_remove(name);
}

constexpr wl_registry_listener registry_listener = {registry_global,
                                                    registry_global_remove};
}

registry::registry(wl_display *d) : wayland_proxy(wl_display_get_registry(d)) {
   wl_registry_add_listener(this->proxy, &registry_listener, this);
}

registry::~registry() {
   wl_registry_destroy(this->proxy);
   this->proxy = nullptr;
}

void registry::add_global_handler(char const *iface, binder bind) {
   this->bindings[iface] = bind;
}

void registry::global(uint32_t name, char const *iface, uint32_t v) {
   auto b = this->bindings.find(iface);
   if (b != this->bindings.end())
      b->second(this->proxy, name, v);
   else
      logdebug("wl::registry @ %p global n %u i %s v %u", this->proxy, name,
               iface, v);
}

void registry::global_remove(uint32_t name) {}

//              _               _
//   ___  _   _| |_ _ __  _   _| |_
//  / _ \| | | | __| '_ \| | | | __|
// | (_) | |_| | |_| |_) | |_| | |_
//  \___/ \__,_|\__| .__/ \__,_|\__|
//                 |_|
namespace {
void output_geometry(void *data, struct wl_output *wl_output, int32_t x,
                     int32_t y, int32_t physical_width, int32_t physical_height,
                     int32_t subpixel, const char *make, const char *model,
                     int32_t transform) {
   static_cast<output *>(data)->geometry(x, y, physical_width, physical_height,
                                         subpixel, make, model, transform);
}

void output_mode(void *data, struct wl_output *wl_output, uint32_t flags,
                 int32_t width, int32_t height, int32_t refresh) {
   static_cast<output *>(data)->mode(flags, width, height, refresh);
}

void output_done(void *data, struct wl_output *wl_output) {
   static_cast<output *>(data)->done();
}

void output_scale(void *data, struct wl_output *wl_output, int32_t factor) {
   static_cast<output *>(data)->scale(factor);
}

constexpr wl_output_listener output_listener = {output_geometry, output_mode,
                                                output_done, output_scale};
}

output::output(wl_registry *r, uint32_t name, uint32_t v)
   : wayland_proxy(wl_registry_bind(r, name, &wl_output_interface, v)) {
   wl_output_add_listener(this->proxy, &output_listener, this);
}

void output::geometry(int32_t x, int32_t y, int32_t pw, int32_t ph,
                      int32_t subpel, char const *make, char const *model,
                      int32_t tx) {
   logdebug(
      "wl::output %s @ %p x %i y %i w %i h %i spel %x make %s model %s tx %i",
      __func__, this->proxy, x, y, pw, ph, subpel, make, model, tx);
}

void output::mode(uint32_t flags, int32_t w, int32_t h, int32_t r) {
   logdebug("wl::output %s @ %p f %x w %i h %i r %i", __func__, this->proxy,
            flags, w, h, r);
}

void output::done() {
   logdebug("wl::output %s @ %p done", __func__, this->proxy);
}

void output::scale(int32_t factor) {
   logdebug("wl::output %s @ %p f %i", __func__, this->proxy, factor);
}
}

//  _ __   __ _ _ __ ___   ___  ___ _ __   __ _  ___ ___
// | '_ \ / _` | '_ ` _ \ / _ \/ __| '_ \ / _` |/ __/ _ \
// | | | | (_| | | | | | |  __/\__ \ |_) | (_| | (_|  __/
// |_| |_|\__,_|_| |_| |_|\___||___/ .__/ \__,_|\___\___|
//                                 |_|
//                   _       _
//   __ _  ___ _ __ (_)_   _(_)
//  / _` |/ _ \ '_ \| \ \ / / |
// | (_| |  __/ | | | |\ V /| |
//  \__, |\___|_| |_|_| \_/ |_|
//  |___/
namespace genivi {

//                  _             _ _
//   ___ ___  _ __ | |_ _ __ ___ | | | ___ _ __
//  / __/ _ \| '_ \| __| '__/ _ \| | |/ _ \ '__|
// | (_| (_) | | | | |_| | | (_) | | |  __/ |
//  \___\___/|_| |_|\__|_|  \___/|_|_|\___|_|
//
namespace {
void controller_screen(void *data, struct ivi_controller *ivi_controller,
                       uint32_t id_screen,
                       struct ivi_controller_screen *screen) {
   static_cast<controller *>(data)->screen(id_screen, screen);
}

void controller_layer(void *data, struct ivi_controller *ivi_controller,
                      uint32_t id_layer) {
   static_cast<controller *>(data)->layer(id_layer);
}

void controller_surface(void *data, struct ivi_controller *ivi_controller,
                        uint32_t id_surface) {
   static_cast<controller *>(data)->surface(id_surface);
}

void controller_error(void *data, struct ivi_controller *ivi_controller,
                      int32_t object_id, int32_t object_type,
                      int32_t error_code, const char *error_text) {
   static_cast<controller *>(data)->error(object_id, object_type, error_code,
                                          error_text);
}

constexpr ivi_controller_listener listener = {
   controller_screen, controller_layer, controller_surface, controller_error};
}

controller::controller(wl_registry *r, uint32_t name, uint32_t version)
   : wayland_proxy(
        wl_registry_bind(r, name, &ivi_controller_interface, version)) {
   ivi_controller_add_listener(this->proxy, &listener, this);
}

controller::~controller() {}

void controller::screen(uint32_t id, struct ivi_controller_screen *screen) {
   logdebug("genivi::controller @ %p screen %u (%x) @ %p", this->proxy, id, id,
            screen);
   this->screens[id] = std::make_unique<struct screen>(id, screen);
}

void controller::layer(uint32_t id) {
   logdebug("genivi::controller @ %p layer %u (%x)", this->proxy, id, id);
   this->layers[id] = std::make_unique<struct layer>(id, this->proxy);
}

void controller::surface(uint32_t id) {
   logdebug("genivi::controller @ %p surface %u (%x)", this->proxy, id, id);
   this->surfaces[id] = std::make_unique<struct surface>(id, this->proxy);
}

void controller::error(int32_t object_id, int32_t object_type,
                       int32_t error_code, const char *error_text) {
   logdebug("genivi::controller @ %p error o %i t %i c %i text %s", this->proxy,
            object_id, object_type, error_code, error_text);
}

//  _
// | | __ _ _   _  ___ _ __
// | |/ _` | | | |/ _ \ '__|
// | | (_| | |_| |  __/ |
// |_|\__,_|\__, |\___|_|
//          |___/
namespace {
void layer_visibility(void *data,
                      struct ivi_controller_layer *ivi_controller_layer,
                      int32_t visibility) {
   static_cast<layer *>(data)->visibility(visibility);
}

void layer_opacity(void *data,
                   struct ivi_controller_layer *ivi_controller_layer,
                   wl_fixed_t opacity) {
   static_cast<layer *>(data)->opacity(opacity);
}

void layer_source_rectangle(void *data,
                            struct ivi_controller_layer *ivi_controller_layer,
                            int32_t x, int32_t y, int32_t width,
                            int32_t height) {
   static_cast<layer *>(data)->source_rectangle(x, y, width, height);
}

void layer_destination_rectangle(
   void *data, struct ivi_controller_layer *ivi_controller_layer, int32_t x,
   int32_t y, int32_t width, int32_t height) {
   static_cast<layer *>(data)->destination_rectangle(x, y, width, height);
}

void layer_configuration(void *data,
                         struct ivi_controller_layer *ivi_controller_layer,
                         int32_t width, int32_t height) {
   static_cast<layer *>(data)->configuration(width, height);
}

void layer_orientation(void *data,
                       struct ivi_controller_layer *ivi_controller_layer,
                       int32_t orientation) {
   static_cast<layer *>(data)->orientation(orientation);
}

void layer_screen(void *data, struct ivi_controller_layer *ivi_controller_layer,
                  struct wl_output *screen) {
   static_cast<layer *>(data)->screen(screen);
}

void layer_destroyed(void *data,
                     struct ivi_controller_layer *ivi_controller_layer) {
   static_cast<layer *>(data)->destroyed();
}

constexpr ivi_controller_layer_listener layer_listener = {
   layer_visibility,       layer_opacity,
   layer_source_rectangle, layer_destination_rectangle,
   layer_configuration,    layer_orientation,
   layer_screen,           layer_destroyed,
};
}

layer::layer(uint32_t i, ivi_controller *c)
   : wayland_proxy(ivi_controller_layer_create(c, i, 0, 0)), id(i) {
   ivi_controller_layer_add_listener(this->proxy, &layer_listener, this);
}

layer::~layer() {
   logdebug("%s layer %i @ %p", __func__, this->id, this->proxy);
   ivi_controller_layer_destroy(this->proxy, 1);
   this->proxy = nullptr;
}

void layer::visibility(int32_t visibility) {
   logdebug("genivi::layer %s @ %p v %i", __func__, this->proxy, visibility);
}

void layer::opacity(wl_fixed_t opacity) {
   logdebug("genivi::layer %s @ %p o %i", __func__, this->proxy, opacity);
}

void layer::source_rectangle(int32_t x, int32_t y, int32_t width,
                             int32_t height) {
   logdebug("genivi::layer %s @ %p x %i y %i w %i h %i", __func__, this->proxy,
            x, y, width, height);
}

void layer::destination_rectangle(int32_t x, int32_t y, int32_t width,
                                  int32_t height) {
   logdebug("genivi::layer %s @ %p x %i y %i w %i h %i", __func__, this->proxy,
            x, y, width, height);
}

void layer::configuration(int32_t width, int32_t height) {
   logdebug("genivi::layer %s @ %p w %i h %i", __func__, this->proxy, width,
            height);
}

void layer::orientation(int32_t orientation) {
   logdebug("genivi::layer %s @ %p o %i", __func__, this->proxy, orientation);
}

void layer::screen(struct wl_output *screen) {
   logdebug("genivi::layer %s @ %p s %p", __func__, this->proxy, screen);
}

void layer::destroyed() {
   logdebug("genivi::layer %s @ %p", __func__, this->proxy);
}

//                  __
//  ___ _   _ _ __ / _| __ _  ___ ___
// / __| | | | '__| |_ / _` |/ __/ _ \
// \__ \ |_| | |  |  _| (_| | (_|  __/
// |___/\__,_|_|  |_|  \__,_|\___\___|
//
namespace {

void surface_visibility(void *data,
                        struct ivi_controller_surface *ivi_controller_surface,
                        int32_t visibility) {
   static_cast<surface *>(data)->visibility(visibility);
}

void surface_opacity(void *data,
                     struct ivi_controller_surface *ivi_controller_surface,
                     wl_fixed_t opacity) {
   static_cast<surface *>(data)->opacity(opacity);
}

void surface_source_rectangle(
   void *data, struct ivi_controller_surface *ivi_controller_surface, int32_t x,
   int32_t y, int32_t width, int32_t height) {
   static_cast<surface *>(data)->source_rectangle(x, y, width, height);
}

void surface_destination_rectangle(
   void *data, struct ivi_controller_surface *ivi_controller_surface, int32_t x,
   int32_t y, int32_t width, int32_t height) {
   static_cast<surface *>(data)->destination_rectangle(x, y, width, height);
}

void surface_configuration(
   void *data, struct ivi_controller_surface *ivi_controller_surface,
   int32_t width, int32_t height) {
   static_cast<surface *>(data)->configuration(width, height);
}

void surface_orientation(void *data,
                         struct ivi_controller_surface *ivi_controller_surface,
                         int32_t orientation) {
   static_cast<surface *>(data)->orientation(orientation);
}

void surface_pixelformat(void *data,
                         struct ivi_controller_surface *ivi_controller_surface,
                         int32_t pixelformat) {
   static_cast<surface *>(data)->pixelformat(pixelformat);
}

void surface_layer(void *data,
                   struct ivi_controller_surface *ivi_controller_surface,
                   struct ivi_controller_layer *layer) {
   static_cast<surface *>(data)->layer(layer);
}

void surface_stats(void *data,
                   struct ivi_controller_surface *ivi_controller_surface,
                   uint32_t redraw_count, uint32_t frame_count,
                   uint32_t update_count, uint32_t pid,
                   const char *process_name) {
   static_cast<surface *>(data)->stats(redraw_count, frame_count, update_count,
                                       pid, process_name);
}

void surface_destroyed(void *data,
                       struct ivi_controller_surface *ivi_controller_surface) {
   static_cast<surface *>(data)->destroyed();
}

void surface_content(void *data,
                     struct ivi_controller_surface *ivi_controller_surface,
                     int32_t content_state) {
   static_cast<surface *>(data)->content(content_state);
}

static constexpr ivi_controller_surface_listener surface_listener = {
   surface_visibility,
   surface_opacity,
   surface_source_rectangle,
   surface_destination_rectangle,
   surface_configuration,
   surface_orientation,
   surface_pixelformat,
   surface_layer,
   surface_stats,
   surface_destroyed,
   surface_content,
};
}

surface::surface(uint32_t i, ivi_controller *c)
   : wayland_proxy(ivi_controller_surface_create(c, i)), id(i) {
   ivi_controller_surface_add_listener(this->proxy, &surface_listener, this);
}

surface::~surface() {
   logdebug("%s surface %i @ %p", __func__, this->id, this->proxy);
   ivi_controller_surface_destroy(this->proxy, 1);
   this->proxy = nullptr;
}

void surface::visibility(int32_t visibility) {
   logdebug("genivi::surface %s @ %p v %i", __func__, this->proxy, visibility);
}

void surface::opacity(wl_fixed_t opacity) {
   logdebug("genivi::surface %s @ %p o %i", __func__, this->proxy, opacity);
}

void surface::source_rectangle(int32_t x, int32_t y, int32_t width,
                               int32_t height) {
   logdebug("genivi::surface %s @ %p x %i y %i w %i h %i", __func__,
            this->proxy, x, y, width, height);
}

void surface::destination_rectangle(int32_t x, int32_t y, int32_t width,
                                    int32_t height) {
   logdebug("genivi::surface %s @ %p x %i y %i w %i h %i", __func__,
            this->proxy, x, y, width, height);
}

void surface::configuration(int32_t width, int32_t height) {
   logdebug("genivi::surface %s @ %p w %i h %i", __func__, this->proxy, width,
            height);
}

void surface::orientation(int32_t orientation) {
   logdebug("genivi::surface %s @ %p o %i", __func__, this->proxy, orientation);
}

void surface::pixelformat(int32_t pixelformat) {
   logdebug("genivi::surface %s @ %p f %i", __func__, this->proxy, pixelformat);
}

void surface::layer(struct ivi_controller_layer *layer) {
   logdebug("genivi::surface %s @ %p l @ %p", __func__, this->proxy, layer);
}

void surface::stats(uint32_t redraw_count, uint32_t frame_count,
                    uint32_t update_count, uint32_t pid,
                    const char *process_name) {
   logdebug("genivi::surface %s @ %p r %u f %u u %u pid %u p %s", __func__,
            this->proxy, redraw_count, frame_count, update_count, pid,
            process_name);
}

void surface::destroyed() {
   logdebug("genivi::surface %s @ %p", __func__, this->proxy);
}

void surface::content(int32_t content_state) {
   logdebug("genivi::surface %s @ %p s %i", __func__, this->proxy,
            content_state);
}

//
// ___  ___ _ __ ___  ___ _ __
/// __|/ __| '__/ _ \/ _ \ '_ \
//\__ \ (__| | |  __/  __/ | | |
//|___/\___|_|  \___|\___|_| |_|
//
screen::screen(uint32_t i, ivi_controller_screen *p)
   : wayland_proxy(p), id(i) {}
}