// Copyright 2015 The Chromium Authors
// Use of this source code is governed by a BSD-style license that can be
// found in the LICENSE file.

#include "content/common/input/synthetic_touch_driver.h"

#include "base/notimplemented.h"
#include "content/common/input/synthetic_gesture_target.h"

namespace content {

SyntheticTouchDriver::SyntheticTouchDriver() {}

SyntheticTouchDriver::SyntheticTouchDriver(
    blink::SyntheticWebTouchEvent touch_event)
    : touch_event_(touch_event) {}

SyntheticTouchDriver::~SyntheticTouchDriver() {}

void SyntheticTouchDriver::DispatchEvent(SyntheticGestureTarget* target,
                                         const base::TimeTicks& timestamp) {
  touch_event_.SetTimeStamp(timestamp);
  if (touch_event_.GetType() != blink::WebInputEvent::Type::kUndefined) {
    base::WeakPtr<SyntheticPointerDriver> weak_this = AsWeakPtr();
    target->DispatchInputEventToPlatform(touch_event_);
    // Dispatching a touch event can cause the containing WebContents to be
    // synchronously deleted.
    if (!weak_this) {
      return;
    }
  }
  touch_event_.ResetPoints();
  ResetPointerIdIndexMap();
}

void SyntheticTouchDriver::Press(float x,
                                 float y,
                                 int index,
                                 SyntheticPointerActionParams::Button button,
                                 int key_modifiers,
                                 float width,
                                 float height,
                                 float rotation_angle,
                                 float force,
                                 float tangential_pressure,
                                 int tilt_x,
                                 int tilt_y,
                                 const base::TimeTicks& timestamp) {
  DCHECK_GE(index, 0);
  DCHECK(pointer_id_map_.find(index) == pointer_id_map_.end());
  int touch_index =
      touch_event_.PressPoint(x, y, width / 2.f, height / 2.f, rotation_angle,
                              force, tangential_pressure, tilt_x, tilt_y);
  touch_event_.touches[touch_index].id = index;
  pointer_id_map_[index] = touch_index;
  if (from_devtools_debugger_)
    key_modifiers |= blink::WebInputEvent::kFromDebugger;
  touch_event_.SetModifiers(key_modifiers);
}

void SyntheticTouchDriver::Move(float x,
                                float y,
                                int index,
                                int key_modifiers,
                                float width,
                                float height,
                                float rotation_angle,
                                float force,
                                float tangential_pressure,
                                int tilt_x,
                                int tilt_y,
                                SyntheticPointerActionParams::Button button) {
  DCHECK_GE(index, 0);
  DCHECK(pointer_id_map_.find(index) != pointer_id_map_.end());
  touch_event_.MovePoint(pointer_id_map_[index], x, y, width / 2.f,
                         height / 2.f, rotation_angle, force,
                         tangential_pressure, tilt_x, tilt_y);
  if (from_devtools_debugger_)
    key_modifiers |= blink::WebInputEvent::kFromDebugger;
  touch_event_.SetModifiers(key_modifiers);
}

void SyntheticTouchDriver::Release(int index,
                                   SyntheticPointerActionParams::Button button,
                                   int key_modifiers) {
  DCHECK_GE(index, 0);
  DCHECK(pointer_id_map_.find(index) != pointer_id_map_.end());
  touch_event_.ReleasePoint(pointer_id_map_[index]);
  if (from_devtools_debugger_)
    key_modifiers |= blink::WebInputEvent::kFromDebugger;
  touch_event_.SetModifiers(key_modifiers);
  pointer_id_map_.erase(index);
}

void SyntheticTouchDriver::Cancel(int index,
                                  SyntheticPointerActionParams::Button button,
                                  int key_modifiers) {
  DCHECK_GE(index, 0);
  DCHECK(pointer_id_map_.find(index) != pointer_id_map_.end());
  touch_event_.CancelPoint(pointer_id_map_[index]);
  if (from_devtools_debugger_)
    key_modifiers |= blink::WebInputEvent::kFromDebugger;
  touch_event_.SetModifiers(key_modifiers);
  touch_event_.dispatch_type =
      blink::WebInputEvent::DispatchType::kEventNonBlocking;
  pointer_id_map_.erase(index);
}

void SyntheticTouchDriver::Leave(int index) {
  NOTIMPLEMENTED();
}

bool SyntheticTouchDriver::UserInputCheck(
    const SyntheticPointerActionParams& params) const {
  if (params.pointer_action_type() ==
      SyntheticPointerActionParams::PointerActionType::NOT_INITIALIZED) {
    return false;
  }

  if (params.pointer_action_type() ==
          SyntheticPointerActionParams::PointerActionType::PRESS &&
      pointer_id_map_.find(params.pointer_id()) != pointer_id_map_.end()) {
    return false;
  }

  if (params.pointer_action_type() ==
          SyntheticPointerActionParams::PointerActionType::MOVE &&
      pointer_id_map_.find(params.pointer_id()) == pointer_id_map_.end()) {
    return false;
  }

  if (params.pointer_action_type() ==
          SyntheticPointerActionParams::PointerActionType::RELEASE &&
      pointer_id_map_.find(params.pointer_id()) == pointer_id_map_.end()) {
    return false;
  }

  return true;
}

base::WeakPtr<SyntheticPointerDriver> SyntheticTouchDriver::AsWeakPtr() {
  return weak_ptr_factory_.GetWeakPtr();
}

void SyntheticTouchDriver::ResetPointerIdIndexMap() {
  unsigned free_index = 0;
  for (unsigned int i = 0; i < blink::WebTouchEvent::kTouchesLengthCap; ++i) {
    if (free_index >= touch_event_.touches_length)
      break;
    if (touch_event_.touches[i].state !=
        blink::WebTouchPoint::State::kStateUndefined) {
      touch_event_.touches[free_index] = touch_event_.touches[i];
      if (free_index != i)
        touch_event_.touches[i] = blink::WebTouchPoint();
      int pointer_id = GetIndexFromMap(i);
      pointer_id_map_[pointer_id] = free_index;
      free_index++;
    }
  }
}

int SyntheticTouchDriver::GetIndexFromMap(int value) const {
  PointerIdIndexMap::const_iterator it;
  for (it = pointer_id_map_.begin(); it != pointer_id_map_.end(); ++it) {
    if (it->second == value) {
      return it->first;
    }
  }
  NOTREACHED() << "Failed to find the value.";
}

}  // namespace content