// Copyright (c) 2014 The Chromium Embedded Framework Authors.
// Portions copyright (c) 2012 The Chromium Authors. All rights reserved.
// Use of this source code is governed by a BSD-style license that can be
// found in the LICENSE file.

#include "libcef/browser/osr/render_widget_host_view_osr.h"

#include "third_party/blink/public/platform/web_cursor_info.h"

#if defined(USE_X11)
#include <X11/Xlib.h>
#include <X11/cursorfont.h>
#undef Status  // Avoid conflicts with url_request_status.h

#include "libcef/browser/native/window_x11.h"

#include "ui/base/x/x11_util.h"
#include "ui/gfx/x/x11_types.h"
#endif  // defined(USE_X11)

#if defined(USE_X11)
namespace {

// Based on ui/base/cursor/cursor_loader_x11.cc.

using blink::WebCursorInfo;

int ToCursorID(WebCursorInfo::Type type) {
  switch (type) {
    case WebCursorInfo::kTypePointer:
      return XC_left_ptr;
    case WebCursorInfo::kTypeCross:
      return XC_crosshair;
    case WebCursorInfo::kTypeHand:
      return XC_hand2;
    case WebCursorInfo::kTypeIBeam:
      return XC_xterm;
    case WebCursorInfo::kTypeWait:
      return XC_watch;
    case WebCursorInfo::kTypeHelp:
      return XC_question_arrow;
    case WebCursorInfo::kTypeEastResize:
      return XC_right_side;
    case WebCursorInfo::kTypeNorthResize:
      return XC_top_side;
    case WebCursorInfo::kTypeNorthEastResize:
      return XC_top_right_corner;
    case WebCursorInfo::kTypeNorthWestResize:
      return XC_top_left_corner;
    case WebCursorInfo::kTypeSouthResize:
      return XC_bottom_side;
    case WebCursorInfo::kTypeSouthEastResize:
      return XC_bottom_right_corner;
    case WebCursorInfo::kTypeSouthWestResize:
      return XC_bottom_left_corner;
    case WebCursorInfo::kTypeWestResize:
      return XC_left_side;
    case WebCursorInfo::kTypeNorthSouthResize:
      return XC_sb_v_double_arrow;
    case WebCursorInfo::kTypeEastWestResize:
      return XC_sb_h_double_arrow;
    case WebCursorInfo::kTypeNorthEastSouthWestResize:
      return XC_left_ptr;
    case WebCursorInfo::kTypeNorthWestSouthEastResize:
      return XC_left_ptr;
    case WebCursorInfo::kTypeColumnResize:
      return XC_sb_h_double_arrow;
    case WebCursorInfo::kTypeRowResize:
      return XC_sb_v_double_arrow;
    case WebCursorInfo::kTypeMiddlePanning:
      return XC_fleur;
    case WebCursorInfo::kTypeEastPanning:
      return XC_sb_right_arrow;
    case WebCursorInfo::kTypeNorthPanning:
      return XC_sb_up_arrow;
    case WebCursorInfo::kTypeNorthEastPanning:
      return XC_top_right_corner;
    case WebCursorInfo::kTypeNorthWestPanning:
      return XC_top_left_corner;
    case WebCursorInfo::kTypeSouthPanning:
      return XC_sb_down_arrow;
    case WebCursorInfo::kTypeSouthEastPanning:
      return XC_bottom_right_corner;
    case WebCursorInfo::kTypeSouthWestPanning:
      return XC_bottom_left_corner;
    case WebCursorInfo::kTypeWestPanning:
      return XC_sb_left_arrow;
    case WebCursorInfo::kTypeMove:
      return XC_fleur;
    case WebCursorInfo::kTypeVerticalText:
      return XC_left_ptr;
    case WebCursorInfo::kTypeCell:
      return XC_left_ptr;
    case WebCursorInfo::kTypeContextMenu:
      return XC_left_ptr;
    case WebCursorInfo::kTypeAlias:
      return XC_left_ptr;
    case WebCursorInfo::kTypeProgress:
      return XC_left_ptr;
    case WebCursorInfo::kTypeNoDrop:
      return XC_left_ptr;
    case WebCursorInfo::kTypeCopy:
      return XC_left_ptr;
    case WebCursorInfo::kTypeNotAllowed:
      return XC_left_ptr;
    case WebCursorInfo::kTypeZoomIn:
      return XC_left_ptr;
    case WebCursorInfo::kTypeZoomOut:
      return XC_left_ptr;
    case WebCursorInfo::kTypeGrab:
      return XC_left_ptr;
    case WebCursorInfo::kTypeGrabbing:
      return XC_left_ptr;
    case WebCursorInfo::kTypeCustom:
    case WebCursorInfo::kTypeNone:
      break;
  }
  NOTREACHED();
  return 0;
}

// The following XCursorCache code was deleted from ui/base/x/x11_util.cc in
// https://crbug.com/665574#c2

// A process wide singleton that manages the usage of X cursors.
class XCursorCache {
 public:
  XCursorCache() {}
  ~XCursorCache() { Clear(); }

  ::Cursor GetCursor(int cursor_shape) {
    // Lookup cursor by attempting to insert a null value, which avoids
    // a second pass through the map after a cache miss.
    std::pair<std::map<int, ::Cursor>::iterator, bool> it =
        cache_.insert(std::make_pair(cursor_shape, 0));
    if (it.second) {
      XDisplay* display = gfx::GetXDisplay();
      it.first->second = XCreateFontCursor(display, cursor_shape);
    }
    return it.first->second;
  }

  void Clear() {
    XDisplay* display = gfx::GetXDisplay();
    for (std::map<int, ::Cursor>::iterator it = cache_.begin();
         it != cache_.end(); ++it) {
      XFreeCursor(display, it->second);
    }
    cache_.clear();
  }

 private:
  // Maps X11 font cursor shapes to Cursor IDs.
  std::map<int, ::Cursor> cache_;

  DISALLOW_COPY_AND_ASSIGN(XCursorCache);
};

XCursorCache* cursor_cache = nullptr;

// Returns an X11 Cursor, sharable across the process.
// |cursor_shape| is an X font cursor shape, see XCreateFontCursor().
::Cursor GetXCursor(int cursor_shape) {
  if (!cursor_cache)
    cursor_cache = new XCursorCache;
  return cursor_cache->GetCursor(cursor_shape);
}

}  // namespace
#endif  // defined(USE_X11)

ui::PlatformCursor CefRenderWidgetHostViewOSR::GetPlatformCursor(
    blink::WebCursorInfo::Type type) {
#if defined(USE_X11)
  if (type == WebCursorInfo::kTypeNone) {
    if (!invisible_cursor_) {
      invisible_cursor_.reset(new ui::XScopedCursor(ui::CreateInvisibleCursor(),
                                                    gfx::GetXDisplay()));
    }
    return invisible_cursor_->get();
  } else {
    return GetXCursor(ToCursorID(type));
  }
#endif  // defined(USE_X11)
  return 0;
}