#include "device_controller.h"
#include "localization.h"
#include "platform.h"
#include "rd_log.h"
#include "render.h"

#define NV12_BUFFER_SIZE 1280 * 720 * 3 / 2

#define STREAM_FRASH (SDL_USEREVENT + 1)

#ifdef REMOTE_DESK_DEBUG
#else
#define MOUSE_CONTROL 1
#endif

int Render::SendKeyCommand(int key_code, bool is_down) {
  RemoteAction remote_action;
  remote_action.type = ControlType::keyboard;
  if (is_down) {
    remote_action.k.flag = KeyFlag::key_down;
  } else {
    remote_action.k.flag = KeyFlag::key_up;
  }
  remote_action.k.key_value = key_code;

  SendDataFrame(peer_, (const char *)&remote_action, sizeof(remote_action));

  return 0;
}

int Render::ProcessMouseEvent(SDL_Event &event) {
  std::string remote_id = "";
  int video_width, video_height = 0;
  int render_width, render_height = 0;
  for (auto &it : client_properties_) {
    auto props = it.second;
    if (event.button.x >= props->stream_render_rect_.x &&
        event.button.x <=
            props->stream_render_rect_.x + props->stream_render_rect_.w &&
        event.button.y >= props->stream_render_rect_.y &&
        event.button.y <=
            props->stream_render_rect_.y + props->stream_render_rect_.h) {
      remote_id = it.first;
      video_width = props->video_width_;
      video_height = props->video_height_;
      render_width = props->stream_render_rect_.w;
      render_height = props->stream_render_rect_.h;

      float ratio_x = (float)video_width / (float)render_width;
      float ratio_y = (float)video_height / (float)render_height;

      RemoteAction remote_action;
      remote_action.m.x = (size_t)(event.button.x * ratio_x);
      remote_action.m.y = (size_t)(event.button.y * ratio_y);

      if (SDL_MOUSEBUTTONDOWN == event.type) {
        remote_action.type = ControlType::mouse;
        if (SDL_BUTTON_LEFT == event.button.button) {
          remote_action.m.flag = MouseFlag::left_down;
        } else if (SDL_BUTTON_RIGHT == event.button.button) {
          remote_action.m.flag = MouseFlag::right_down;
        }
        remote_action.m.flag = MouseFlag::move;
        SendDataFrame(peer_, (const char *)&remote_action,
                      sizeof(remote_action));
      } else if (SDL_MOUSEBUTTONUP == event.type) {
        remote_action.type = ControlType::mouse;
        if (SDL_BUTTON_LEFT == event.button.button) {
          remote_action.m.flag = MouseFlag::left_up;
        } else if (SDL_BUTTON_RIGHT == event.button.button) {
          remote_action.m.flag = MouseFlag::right_up;
        }
        remote_action.m.flag = MouseFlag::move;
        SendDataFrame(peer_, (const char *)&remote_action,
                      sizeof(remote_action));
      } else if (SDL_MOUSEMOTION == event.type) {
        remote_action.type = ControlType::mouse;
        remote_action.m.flag = MouseFlag::move;
        SendDataFrame(peer_, (const char *)&remote_action,
                      sizeof(remote_action));
      }
    }
  }

  return 0;
}

void Render::SdlCaptureAudioIn(void *userdata, Uint8 *stream, int len) {
  Render *render = (Render *)userdata;
  if (!render) {
    return;
  }

  if (1) {
    for (auto it : render->client_properties_) {
      auto props = it.second;
      if (props->connection_status_ == ConnectionStatus::Connected) {
        SendAudioFrame(props->peer_, (const char *)stream, len);
      }
    }

  } else {
    memcpy(render->audio_buffer_, stream, len);
    render->audio_len_ = len;
    SDL_Delay(10);
    render->audio_buffer_fresh_ = true;
  }
}

void Render::SdlCaptureAudioOut([[maybe_unused]] void *userdata,
                                [[maybe_unused]] Uint8 *stream,
                                [[maybe_unused]] int len) {
  // Render *render = (Render *)userdata;
  // for (auto it : render->client_properties_) {
  //   auto props = it.second;
  //   if (props->connection_status_ == SignalStatus::SignalConnected) {
  //     SendAudioFrame(props->peer_, (const char *)stream, len);
  //   }
  // }

  // if (!render->audio_buffer_fresh_) {
  //   return;
  // }

  // SDL_memset(stream, 0, len);

  // if (render->audio_len_ == 0) {
  //   return;
  // } else {
  // }

  // len = (len > render->audio_len_ ? render->audio_len_ : len);
  // SDL_MixAudioFormat(stream, render->audio_buffer_, AUDIO_S16LSB, len,
  //                    SDL_MIX_MAXVOLUME);
  // render->audio_buffer_fresh_ = false;
}

void Render::OnReceiveVideoBufferCb(const XVideoFrame *video_frame,
                                    const char *user_id, size_t user_id_size,
                                    void *user_data) {
  Render *render = (Render *)user_data;
  if (!render) {
    return;
  }

  std::string remote_id(user_id, user_id_size);
  if (render->client_properties_.find(remote_id) ==
      render->client_properties_.end()) {
    return;
  }
  SubStreamWindowProperties *props =
      render->client_properties_.find(remote_id)->second.get();

  if (props->connection_established_) {
    if (!props->dst_buffer_) {
      props->dst_buffer_capacity_ = video_frame->size;
      props->dst_buffer_ = new unsigned char[video_frame->size];
    }

    if (props->dst_buffer_capacity_ < video_frame->size) {
      delete props->dst_buffer_;
      props->dst_buffer_capacity_ = video_frame->size;
      props->dst_buffer_ = new unsigned char[video_frame->size];
    }

    memcpy(props->dst_buffer_, video_frame->data, video_frame->size);
    props->video_width_ = video_frame->width;
    props->video_height_ = video_frame->height;
    props->video_size_ = video_frame->size;

    SDL_Event event;
    event.type = STREAM_FRASH;
    event.user.type = STREAM_FRASH;
    event.user.data1 = props;
    SDL_PushEvent(&event);
    props->streaming_ = true;
  }
}

void Render::OnReceiveAudioBufferCb(const char *data, size_t size,
                                    const char *user_id, size_t user_id_size,
                                    void *user_data) {
  Render *render = (Render *)user_data;
  if (!render) {
    return;
  }

  render->audio_buffer_fresh_ = true;
  SDL_QueueAudio(render->output_dev_, data, (uint32_t)size);
}

void Render::OnReceiveDataBufferCb(const char *data, size_t size,
                                   const char *user_id, size_t user_id_size,
                                   void *user_data) {
  Render *render = (Render *)user_data;
  if (!render) {
    return;
  }

  std::string remote_id(user_id, user_id_size);
  if (render->client_properties_.find(remote_id) ==
      render->client_properties_.end()) {
    return;
  }
  auto props = render->client_properties_.find(remote_id)->second;

  RemoteAction remote_action;
  memcpy(&remote_action, data, size);

  if (ControlType::mouse == remote_action.type && render->mouse_controller_) {
    render->mouse_controller_->SendMouseCommand(remote_action);
  } else if (ControlType::audio_capture == remote_action.type) {
    if (remote_action.a) {
      render->StartSpeakerCapturer();
      render->audio_capture_ = true;
    } else {
      render->StopSpeakerCapturer();
      render->audio_capture_ = false;
    }
  } else if (ControlType::keyboard == remote_action.type &&
             render->keyboard_capturer_) {
    render->keyboard_capturer_->SendKeyboardCommand(
        (int)remote_action.k.key_value,
        remote_action.k.flag == KeyFlag::key_down);
  } else if (ControlType::host_infomation == remote_action.type) {
    props->remote_host_name_ =
        std::string(remote_action.i.host_name, remote_action.i.host_name_size);
    LOG_INFO("Remote hostname: [{}]", props->remote_host_name_);
  }
}

void Render::OnSignalStatusCb(SignalStatus status, const char *user_id,
                              size_t user_id_size, void *user_data) {
  Render *render = (Render *)user_data;
  if (!render) {
    return;
  }

  std::string client_id(user_id, user_id_size);
  if (client_id == render->client_id_) {
    render->signal_status_ = status;
    if (SignalStatus::SignalConnecting == status) {
      render->signal_connected_ = false;
    } else if (SignalStatus::SignalConnected == status) {
      render->signal_connected_ = true;
      LOG_INFO("[{}] connected to signal server", client_id);
    } else if (SignalStatus::SignalFailed == status) {
      render->signal_connected_ = false;
    } else if (SignalStatus::SignalClosed == status) {
      render->signal_connected_ = false;
    } else if (SignalStatus::SignalReconnecting == status) {
      render->signal_connected_ = false;
    } else if (SignalStatus::SignalServerClosed == status) {
      render->signal_connected_ = false;
    }
  } else {
    if (client_id.rfind("C-", 0) != 0) {
      return;
    }

    std::string remote_id(client_id.begin() + 2, client_id.end());
    if (render->client_properties_.find(remote_id) ==
        render->client_properties_.end()) {
      return;
    }
    auto props = render->client_properties_.find(remote_id)->second;
    props->signal_status_ = status;
    if (SignalStatus::SignalConnecting == status) {
      props->signal_connected_ = false;
    } else if (SignalStatus::SignalConnected == status) {
      props->signal_connected_ = true;
      LOG_INFO("[{}] connected to signal server", remote_id);
    } else if (SignalStatus::SignalFailed == status) {
      props->signal_connected_ = false;
    } else if (SignalStatus::SignalClosed == status) {
      props->signal_connected_ = false;
    } else if (SignalStatus::SignalReconnecting == status) {
      props->signal_connected_ = false;
    } else if (SignalStatus::SignalServerClosed == status) {
      props->signal_connected_ = false;
    }
  }
}

void Render::OnConnectionStatusCb(ConnectionStatus status, const char *user_id,
                                  const size_t user_id_size, void *user_data) {
  Render *render = (Render *)user_data;
  if (!render) {
    return;
  }

  bool is_server = false;
  std::shared_ptr<SubStreamWindowProperties> props;

  std::string remote_id(user_id, user_id_size);
  if (render->client_properties_.find(remote_id) !=
      render->client_properties_.end()) {
    props = render->client_properties_.find(remote_id)->second;
  } else {
    if (render->server_properties_.find(remote_id) ==
        render->server_properties_.end()) {
      render->server_properties_[remote_id] =
          std::make_shared<SubStreamWindowProperties>();
    }
    props = render->server_properties_.find(remote_id)->second;
    is_server = true;
  }

  props->connection_status_ = status;
  render->show_connection_status_window_ = true;
  if (ConnectionStatus::Connecting == status) {
  } else if (ConnectionStatus::Gathering == status) {
  } else if (ConnectionStatus::Connected == status) {
    if (!render->need_to_create_stream_window_) {
      render->need_to_create_stream_window_ = true;
    }

    props->connection_established_ = true;
    if (!props->hostname_sent_) {
      // TODO: self and remote hostname
      std::string host_name = GetHostName();
      RemoteAction remote_action;
      remote_action.type = ControlType::host_infomation;
      memcpy(&remote_action.i.host_name, host_name.data(), host_name.size());
      remote_action.i.host_name_size = host_name.size();
      int ret = SendDataFrame(render->peer_, (const char *)&remote_action,
                              sizeof(remote_action));
      if (0 == ret) {
        props->hostname_sent_ = true;
      }
    }

    if (!is_server) {
      props->stream_render_rect_.x = 0;
      props->stream_render_rect_.y = (int)render->title_bar_height_;
      props->stream_render_rect_.w = (int)render->stream_window_width_;
      props->stream_render_rect_.h =
          (int)(render->stream_window_height_ - render->title_bar_height_);
    }

    if (!render->is_client_mode_) {
      render->start_screen_capturer_ = true;
      render->start_mouse_controller_ = true;
    }
  } else if (ConnectionStatus::Disconnected == status) {
    render->password_validating_time_ = 0;
  } else if (ConnectionStatus::Failed == status) {
    render->password_validating_time_ = 0;
  } else if (ConnectionStatus::Closed == status) {
    render->password_validating_time_ = 0;
    render->start_screen_capturer_ = false;
    render->start_mouse_controller_ = false;
    render->start_keyboard_capturer_ = false;
    render->control_mouse_ = false;
    props->connection_established_ = false;
    props->mouse_control_button_pressed_ = false;
    props->hostname_sent_ = false;
    if (render->audio_capture_) {
      render->StopSpeakerCapturer();
      render->audio_capture_ = false;
    }
    if (!render->rejoin_) {
      memset(render->remote_password_, 0, sizeof(render->remote_password_));
    }
    if (props->dst_buffer_) {
      memset(props->dst_buffer_, 0, props->dst_buffer_capacity_);
      SDL_UpdateTexture(props->stream_texture_, NULL, props->dst_buffer_,
                        props->texture_width_);
    }
  } else if (ConnectionStatus::IncorrectPassword == status) {
    render->password_validating_ = false;
    render->password_validating_time_++;
    if (render->connect_button_pressed_) {
      render->connect_button_pressed_ = false;
      props->connection_established_ = false;
      render->connect_button_label_ =
          render->connect_button_pressed_
              ? localization::disconnect[render->localization_language_index_]
              : localization::connect[render->localization_language_index_];
    }
  } else if (ConnectionStatus::NoSuchTransmissionId == status) {
    if (render->connect_button_pressed_) {
      props->connection_established_ = false;
      render->connect_button_label_ =
          render->connect_button_pressed_
              ? localization::disconnect[render->localization_language_index_]
              : localization::connect[render->localization_language_index_];
    }
  }
}

void Render::NetStatusReport(const char *client_id, size_t client_id_size,
                             TraversalMode mode,
                             const XNetTrafficStats *net_traffic_stats,
                             const char *user_id, const size_t user_id_size,
                             void *user_data) {
  Render *render = (Render *)user_data;
  if (!render) {
    return;
  }

  if (0 == strcmp(render->client_id_, "")) {
    memset(&render->client_id_, 0, sizeof(render->client_id_));
    memcpy(render->client_id_, client_id, client_id_size);
    LOG_INFO("Use client id [{}] and save id into cache file", client_id);
    render->SaveSettingsIntoCacheFile();
  }

  std::string remote_id(user_id, user_id_size);
  if (render->client_properties_.find(remote_id) ==
      render->client_properties_.end()) {
    return;
  }
  auto props = render->client_properties_.find(remote_id)->second;
  if (props->traversal_mode_ != mode) {
    props->traversal_mode_ = mode;
    LOG_INFO("Net mode: [{}]", int(props->traversal_mode_));
  }

  if (!net_traffic_stats) {
    return;
  }

  // only display client side net status if connected to itself
  if (!(render->peer_reserved_ && !strstr(client_id, "C-"))) {
    props->net_traffic_stats_ = *net_traffic_stats;
  }
}