IGraphicsWin.cpp

/*
 ==============================================================================
 
 This file is part of the iPlug 2 library. Copyright (C) the iPlug 2 developers.
 
 See LICENSE.txt for  more info.
 
 ==============================================================================
*/
 
 
#include <Shlobj.h>
#include <commctrl.h>
 
#include "heapbuf.h"
 
#include "IPlugParameter.h"
#include "IGraphicsWin.h"
#include "IGraphicsWin_dnd.h"
#include "IPopupMenuControl.h"
#include "IPlugPaths.h"
 
#include <wininet.h>
#include <VersionHelpers.h>
 
#if defined __clang__
#undef CCSIZEOF_STRUCT
#define CCSIZEOF_STRUCT(structname, member) (__builtin_offsetof(structname, member) + sizeof(((structname*)0)->member))
#endif
 
using namespace iplug;
using namespace igraphics;
 
#pragma warning(disable:4244) // Pointer size cast mismatch.
#pragma warning(disable:4312) // Pointer size cast mismatch.
#pragma warning(disable:4311) // Pointer size cast mismatch.
 
static int nWndClassReg = 0;
static const wchar_t* wndClassName = L"IPlugWndClass";
static double sFPS = 0.0;
 
#define PARAM_EDIT_ID 99
#define IPLUG_TIMER_ID 2
 
#define TOOLTIPWND_MAXWIDTH 250
 
#define WM_VBLANK (WM_USER+1)
 
#ifdef IGRAPHICS_GL3
typedef HGLRC(WINAPI* PFNWGLCREATECONTEXTATTRIBSARBPROC) (HDC hDC, HGLRC hShareContext, const int* attribList);
#define WGL_CONTEXT_MAJOR_VERSION_ARB     0x2091
#define WGL_CONTEXT_MINOR_VERSION_ARB     0x2092
#define WGL_CONTEXT_PROFILE_MASK_ARB      0x9126
#define WGL_CONTEXT_CORE_PROFILE_BIT_ARB  0x00000001
#endif
 
#pragma mark - Private Classes and Structs
 
// Fonts
 
class IGraphicsWin::InstalledFont
{
public:
  InstalledFont(void* data, int resSize)
  : mFontHandle(nullptr)
  {
    if (data)
    {
      DWORD numFonts = 0;
      mFontHandle = AddFontMemResourceEx(data, resSize, NULL, &numFonts);
    }
  }
  
  ~InstalledFont()
  {
    if (IsValid())
      RemoveFontMemResourceEx(mFontHandle);
  }
  
  InstalledFont(const InstalledFont&) = delete;
  InstalledFont& operator=(const InstalledFont&) = delete;
    
  bool IsValid() const { return mFontHandle; }
  
private:
  HANDLE mFontHandle;
};
 
struct IGraphicsWin::HFontHolder
{
  HFontHolder(HFONT hfont) : mHFont(nullptr)
  {
    LOGFONTW lFont = { 0 };
    GetObjectW(hfont, sizeof(LOGFONTW), &lFont);
    mHFont = CreateFontIndirectW(&lFont);
  }
  
  HFONT mHFont;
};
 
class IGraphicsWin::Font : public PlatformFont
{
public:
  Font(HFONT font, const char* styleName, bool system)
  : PlatformFont(system), mFont(font), mStyleName(styleName) {}
  ~Font()
  {
    DeleteObject(mFont);
  }
  
  FontDescriptor GetDescriptor() override { return mFont; }
  IFontDataPtr GetFontData() override;
  
private:
  HFONT mFont;
  WDL_String mStyleName;
};
 
IFontDataPtr IGraphicsWin::Font::GetFontData()
{
  HDC hdc = CreateCompatibleDC(NULL);
  IFontDataPtr fontData(new IFontData());
  
  if (hdc != NULL)
  {
    SelectObject(hdc, mFont);
    const size_t size = ::GetFontData(hdc, 0, 0, NULL, 0);
 
    if (size != GDI_ERROR)
    {
      fontData = std::make_unique<IFontData>(size);
 
      if (fontData->GetSize() == size)
      {
        size_t result = ::GetFontData(hdc, 0x66637474, 0, fontData->Get(), size);
        if (result == GDI_ERROR)
          result = ::GetFontData(hdc, 0, 0, fontData->Get(), size);
        if (result == size)
          fontData->SetFaceIdx(GetFaceIdx(fontData->Get(), fontData->GetSize(), mStyleName.Get()));
      }
    }
    
    DeleteDC(hdc);
  }
 
  return fontData;
}
 
StaticStorage<IGraphicsWin::InstalledFont> IGraphicsWin::sPlatformFontCache;
StaticStorage<IGraphicsWin::HFontHolder> IGraphicsWin::sHFontCache;
 
#pragma mark - Mouse and tablet helpers
 
extern float GetScaleForHWND(HWND hWnd);
 
inline IMouseInfo IGraphicsWin::GetMouseInfo(LPARAM lParam, WPARAM wParam)
{
  IMouseInfo info;
  const float scale = GetTotalScale();
  info.x = mCursorX = GET_X_LPARAM(lParam) / scale;
  info.y = mCursorY = GET_Y_LPARAM(lParam) / scale;
  info.ms = IMouseMod((wParam & MK_LBUTTON), (wParam & MK_RBUTTON), (wParam & MK_SHIFT), (wParam & MK_CONTROL),
#ifdef AAX_API
    GetAsyncKeyState(VK_MENU) < 0
#else
    GetKeyState(VK_MENU) < 0
#endif
  );
 
  return info;
}
 
void IGraphicsWin::CheckTabletInput(UINT msg)
{
  if ((msg == WM_LBUTTONDOWN) || (msg == WM_RBUTTONDOWN) || (msg == WM_MBUTTONDOWN) || (msg == WM_MOUSEMOVE)
      || (msg == WM_RBUTTONDBLCLK) || (msg == WM_LBUTTONDBLCLK) || (msg == WM_MBUTTONDBLCLK)
      || (msg == WM_RBUTTONUP) || (msg == WM_LBUTTONUP) || (msg == WM_MBUTTONUP)
      || (msg == WM_MOUSEHOVER) || (msg == WM_MOUSELEAVE))
  {
    const LONG_PTR c_SIGNATURE_MASK = 0xFFFFFF00;
    const LONG_PTR c_MOUSEEVENTF_FROMTOUCH = 0xFF515700;
    
    LONG_PTR extraInfo = GetMessageExtraInfo();
    SetTabletInput(((extraInfo & c_SIGNATURE_MASK) == c_MOUSEEVENTF_FROMTOUCH));
    mCursorLock &= !mTabletInput;
  }
}
 
void IGraphicsWin::DestroyEditWindow()
{
 if (mParamEditWnd)
 {
   SetWindowLongPtrW(mParamEditWnd, GWLP_WNDPROC, (LPARAM) mDefEditProc);
   DestroyWindow(mParamEditWnd);
   mParamEditWnd = nullptr;
   mDefEditProc = nullptr;
   DeleteObject(mEditFont);
   mEditFont = nullptr;
 }
}
 
void IGraphicsWin::OnDisplayTimer(int vBlankCount)
{
  // Check the message vblank with the current one to see if we are way behind. If so, then throw these away.
  DWORD msgCount = vBlankCount;
  DWORD curCount = mVBlankCount;
 
  if (mVSYNCEnabled)
  {
    // skip until the actual vblank is at a certain number.
    if (mVBlankSkipUntil != 0 && mVBlankSkipUntil > mVBlankCount)
    {
      return;
    }
 
    mVBlankSkipUntil = 0;
 
    if (msgCount != curCount)
    {
      // we are late, just skip it until we can get a message soon after the vblank event.
      // DBGMSG("vblank is late by %i frames.  Skipping.", (mVBlankCount - msgCount));
      return;
    }
  }
 
  if (mParamEditWnd && mParamEditMsg != kNone)
  {
    switch (mParamEditMsg)
    {
      case kCommit:
      {
        WCHAR strWide[MAX_WIN32_PARAM_LEN];
        SendMessageW(mParamEditWnd, WM_GETTEXT, MAX_WIN32_PARAM_LEN, (LPARAM) strWide);
        SetControlValueAfterTextEdit(UTF16AsUTF8(strWide).Get());
        DestroyEditWindow();
        break;
      }
      case kCancel:
        DestroyEditWindow();
        ClearInTextEntryControl();
        break;
    }
 
    mParamEditMsg = kNone;
 
    return; // TODO: check this!
  }
 
  // TODO: move this... listen to the right messages in windows for screen resolution changes, etc.
  if (!GetCapture()) // workaround Windows issues with window sizing during mouse move
  {
    float scale = GetScaleForHWND(mPlugWnd);
    if (scale != GetScreenScale())
      SetScreenScale(scale);
  }
 
  // TODO: this is far too aggressive for slow drawing animations and data changing.  We need to
  // gate the rate of updates to a certain percentage of the wall clock time.
  IRECTList rects;
  const float totalScale = GetTotalScale();
  if (IsDirty(rects))
  {
    SetAllControlsClean();
 
    for (int i = 0; i < rects.Size(); i++)
    {
      IRECT dirtyR = rects.Get(i);
      dirtyR.Scale(totalScale);
      dirtyR.PixelAlign();
      RECT r = { (LONG)dirtyR.L, (LONG)dirtyR.T, (LONG)dirtyR.R, (LONG)dirtyR.B };
      InvalidateRect(mPlugWnd, &r, FALSE);
    }
 
    if (mParamEditWnd)
    {
      IRECT notDirtyR = mEditRECT;
      notDirtyR.Scale(totalScale);
      notDirtyR.PixelAlign();
      RECT r2 = { (LONG)notDirtyR.L, (LONG)notDirtyR.T, (LONG)notDirtyR.R, (LONG)notDirtyR.B };
      ValidateRect(mPlugWnd, &r2); // make sure we dont redraw the edit box area
      UpdateWindow(mPlugWnd);
      mParamEditMsg = kUpdate;
    }
    else
    {
      // Force a redraw right now
      UpdateWindow(mPlugWnd);
 
      if (mVSYNCEnabled)
      {
        // Check and see if we are still in this frame.
        curCount = mVBlankCount;
        if (msgCount != curCount)
        {
          // we are late, skip the next vblank to give us a breather.
          mVBlankSkipUntil = curCount+1;
          //DBGMSG("vblank painting was late by %i frames.", (mVBlankSkipUntil - msgCount));
        }
      }
    }
  }
  return;
}
 
// static
LRESULT CALLBACK IGraphicsWin::WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
  if (msg == WM_CREATE)
  {
    CREATESTRUCTW* lpcs = (CREATESTRUCTW *) lParam;
    SetWindowLongPtrW(hWnd, GWLP_USERDATA, (LPARAM) lpcs->lpCreateParams);
    IGraphicsWin* pGraphics = (IGraphicsWin*) GetWindowLongPtrW(hWnd, GWLP_USERDATA);
 
    if (pGraphics->mVSYNCEnabled) // use VBLANK thread
    {
      assert((pGraphics->FPS() == 60) && "If you want to run at frame rates other than 60FPS");
      pGraphics->StartVBlankThread(hWnd);
    }
    else // use WM_TIMER -- its best to get below 16ms because the windows time quanta is slightly above 15ms.
    {
      int mSec = static_cast<int>(std::floorf(1000.0f / (pGraphics->FPS())));
      if (mSec < 20) mSec = 15;
      SetTimer(hWnd, IPLUG_TIMER_ID, mSec, NULL);
    }
 
    SetFocus(hWnd); // gets scroll wheel working straight away
    DragAcceptFiles(hWnd, true);
    return 0;
  }
 
  IGraphicsWin* pGraphics = (IGraphicsWin*) GetWindowLongPtrW(hWnd, GWLP_USERDATA);
 
  if (!pGraphics || hWnd != pGraphics->mPlugWnd)
  {
    return DefWindowProcW(hWnd, msg, wParam, lParam);
  }
 
  if (pGraphics->mParamEditWnd && pGraphics->mParamEditMsg == kEditing)
  {
    if (msg == WM_RBUTTONDOWN || (msg == WM_LBUTTONDOWN))
    {
      pGraphics->mParamEditMsg = kCancel;
      return 0;
    }
    return DefWindowProcW(hWnd, msg, wParam, lParam);
  }
  
  auto IsTouchEvent = []() {
    const LONG_PTR c_SIGNATURE_MASK = 0xFFFFFF00;
    const LONG_PTR c_MOUSEEVENTF_FROMTOUCH = 0xFF515700;
    LONG_PTR extraInfo = GetMessageExtraInfo();
    return ((extraInfo & c_SIGNATURE_MASK) == c_MOUSEEVENTF_FROMTOUCH);
  };
 
  pGraphics->CheckTabletInput(msg);
 
  switch (msg)
  {
    case WM_VBLANK:
      pGraphics->OnDisplayTimer(wParam);
      return 0;
 
    case WM_TIMER:
      if (wParam == IPLUG_TIMER_ID)
        pGraphics->OnDisplayTimer(0);
 
      return 0;
 
    case WM_ERASEBKGND:
      return 0;
 
    case WM_RBUTTONDOWN:
    case WM_LBUTTONDOWN:
    case WM_MBUTTONDOWN:
    {
      if (IsTouchEvent())
        return 0;
 
      pGraphics->HideTooltip();
      if (pGraphics->mParamEditWnd)
      {
        pGraphics->mParamEditMsg = kCommit;
        return 0;
      }
      SetFocus(hWnd); // Added to get keyboard focus again when user clicks in window
      SetCapture(hWnd);
      IMouseInfo info = pGraphics->GetMouseInfo(lParam, wParam);
      std::vector<IMouseInfo> list{ info };
      pGraphics->OnMouseDown(list);
      return 0;
    }
    case WM_SETCURSOR:
    {
      pGraphics->OnSetCursor();
      return 0;
    }
    case WM_MOUSEMOVE:
    {
      if (IsTouchEvent())
        return 0;
 
      if (!(wParam & (MK_LBUTTON | MK_RBUTTON)))
      {
        IMouseInfo info = pGraphics->GetMouseInfo(lParam, wParam);
        if (pGraphics->OnMouseOver(info.x, info.y, info.ms))
        {
          TRACKMOUSEEVENT eventTrack = { sizeof(TRACKMOUSEEVENT), TME_LEAVE, hWnd, HOVER_DEFAULT };
          if (pGraphics->TooltipsEnabled()) 
          {
            int c = pGraphics->GetMouseOver();
            if (c != pGraphics->mTooltipIdx) 
            {
              if (c >= 0) eventTrack.dwFlags |= TME_HOVER;
              pGraphics->mTooltipIdx = c;
              pGraphics->HideTooltip();
            }
          }
 
          TrackMouseEvent(&eventTrack);
        }
      }
      else if (GetCapture() == hWnd && !pGraphics->IsInPlatformTextEntry())
      {
        float oldX = pGraphics->mCursorX;
        float oldY = pGraphics->mCursorY;
 
        IMouseInfo info = pGraphics->GetMouseInfo(lParam, wParam);
 
        info.dX = info.x - oldX;
        info.dY = info.y - oldY;
 
        if (info.dX || info.dY)
        {
          std::vector<IMouseInfo> list{ info };
          pGraphics->OnMouseDrag(list);
            
          if (pGraphics->MouseCursorIsLocked())
          {
            const float x = pGraphics->mHiddenCursorX;
            const float y = pGraphics->mHiddenCursorY;
            
            pGraphics->MoveMouseCursor(x, y);
            pGraphics->mHiddenCursorX = x;
            pGraphics->mHiddenCursorY = y;
          }
        }
      }
 
      return 0;
    }
    case WM_MOUSEHOVER: 
    {
      pGraphics->ShowTooltip();
      return 0;
    }
    case WM_MOUSELEAVE:
    {
      pGraphics->HideTooltip();
      pGraphics->OnMouseOut();
      return 0;
    }
    case WM_LBUTTONUP:
    case WM_RBUTTONUP:
    {
      ReleaseCapture();
      IMouseInfo info = pGraphics->GetMouseInfo(lParam, wParam);
      std::vector<IMouseInfo> list{ info };
      pGraphics->OnMouseUp(list);
      return 0;
    }
    case WM_LBUTTONDBLCLK:
    case WM_RBUTTONDBLCLK:
    {
      if (IsTouchEvent())
        return 0;
 
      IMouseInfo info = pGraphics->GetMouseInfo(lParam, wParam);
      if (pGraphics->OnMouseDblClick(info.x, info.y, info.ms))
      {
        SetCapture(hWnd);
      }
      return 0;
    }
    case WM_MOUSEWHEEL:
    {
      if (pGraphics->mParamEditWnd)
      {
        pGraphics->mParamEditMsg = kCancel;
        return 0;
      }
      else
      {
        IMouseInfo info = pGraphics->GetMouseInfo(lParam, wParam);
        float d = GET_WHEEL_DELTA_WPARAM(wParam) / WHEEL_DELTA;
        const float scale = pGraphics->GetTotalScale();
        RECT r;
        GetWindowRect(hWnd, &r);
        pGraphics->OnMouseWheel(info.x - (r.left / scale), info.y - (r.top / scale), info.ms, d);
        return 0;
      }
    }
    case WM_TOUCH:
    {
      UINT nTouches = LOWORD(wParam);
 
      if (nTouches > 0)
      {
        WDL_TypedBuf<TOUCHINPUT> touches;
        touches.Resize(nTouches);
        HTOUCHINPUT hTouchInput = (HTOUCHINPUT) lParam;
        std::vector<IMouseInfo> downlist;
        std::vector<IMouseInfo> uplist;
        std::vector<IMouseInfo> movelist;
        const float scale = pGraphics->GetTotalScale();
 
        GetTouchInputInfo(hTouchInput, nTouches, touches.Get(), sizeof(TOUCHINPUT));
 
        for (int i = 0; i < nTouches; i++)
        {
          TOUCHINPUT* pTI = touches.Get() +i;
 
          POINT pt;
          pt.x = TOUCH_COORD_TO_PIXEL(pTI->x);
          pt.y = TOUCH_COORD_TO_PIXEL(pTI->y);
          ScreenToClient(pGraphics->mPlugWnd, &pt);
 
          IMouseInfo info;
          info.x = static_cast<float>(pt.x) / scale;
          info.y = static_cast<float>(pt.y) / scale;
          info.dX = 0.f;
          info.dY = 0.f;
          info.ms.touchRadius = 0;
 
          if (pTI->dwMask & TOUCHINPUTMASKF_CONTACTAREA)
          {
            info.ms.touchRadius = pTI->cxContact;
          }
 
          info.ms.touchID = static_cast<ITouchID>(pTI->dwID);
 
          if (pTI->dwFlags & TOUCHEVENTF_DOWN)
          {
            downlist.push_back(info);
            pGraphics->mDeltaCapture.insert(std::make_pair(info.ms.touchID, info));
          }
          else if (pTI->dwFlags & TOUCHEVENTF_UP)
          {
            pGraphics->mDeltaCapture.erase(info.ms.touchID);
            uplist.push_back(info);
          }
          else if (pTI->dwFlags & TOUCHEVENTF_MOVE)
          {
            IMouseInfo previous = pGraphics->mDeltaCapture.find(info.ms.touchID)->second;
            info.dX = info.x - previous.x;
            info.dY = info.y - previous.y;
            movelist.push_back(info);
            pGraphics->mDeltaCapture[info.ms.touchID] = info;
          }
        }
 
        if (downlist.size())
          pGraphics->OnMouseDown(downlist);
 
        if (uplist.size())
          pGraphics->OnMouseUp(uplist);
 
        if (movelist.size())
          pGraphics->OnMouseDrag(movelist);
 
        CloseTouchInputHandle(hTouchInput);
      }
      return 0;
    }
    case WM_GETDLGCODE:
      return DLGC_WANTALLKEYS;
    case WM_KEYDOWN:
    case WM_KEYUP:
    {
      POINT p;
      GetCursorPos(&p);
      ScreenToClient(hWnd, &p);
 
      BYTE keyboardState[256] = {};
      GetKeyboardState(keyboardState);
      const int keyboardScanCode = (lParam >> 16) & 0x00ff;
      WORD character = 0;
      const int len = ToAscii(wParam, keyboardScanCode, keyboardState, &character, 0);
      // TODO: should get unicode?
      bool handle = false;
 
      // send when len is 0 because wParam might be something like VK_LEFT or VK_HOME, etc.
      if (len == 0 || len == 1)
      {
        char str[2];
        str[0] = static_cast<char>(character);
        str[1] = '\0';
          
        IKeyPress keyPress{ str, static_cast<int>(wParam),
                            static_cast<bool>(GetKeyState(VK_SHIFT) & 0x8000),
                            static_cast<bool>(GetKeyState(VK_CONTROL) & 0x8000),
                            static_cast<bool>(GetKeyState(VK_MENU) & 0x8000) };
 
        const float scale = pGraphics->GetTotalScale();
 
        if (msg == WM_KEYDOWN)
          handle = pGraphics->OnKeyDown(p.x / scale, p.y / scale, keyPress);
        else
          handle = pGraphics->OnKeyUp(p.x / scale, p.y / scale, keyPress);
      }
 
      if (!handle)
      {
        HWND rootHWnd = GetAncestor( hWnd, GA_ROOT);
        SendMessageW(rootHWnd, msg, wParam, lParam);
        return DefWindowProcW(hWnd, msg, wParam, lParam);
      }
      else
        return 0;
    }
    case WM_PAINT:
    {
      const float scale = pGraphics->GetTotalScale();
      auto addDrawRect = [pGraphics, scale](IRECTList& rects, RECT r) {
        IRECT ir(r.left, r.top, r.right, r.bottom);
        ir.Scale(1.f/scale);
        ir.PixelAlign();
        rects.Add(ir);
      };
 
      HRGN region = CreateRectRgn(0, 0, 0, 0);
      int regionType = GetUpdateRgn(hWnd, region, FALSE);
 
      if ((regionType == COMPLEXREGION) || (regionType == SIMPLEREGION))
      {
        IRECTList rects;
        const int bufferSize = sizeof(RECT) * 64;
        unsigned char stackBuffer[sizeof(RGNDATA) + bufferSize];
        RGNDATA* regionData = (RGNDATA*)stackBuffer;
 
        if (regionType == COMPLEXREGION && GetRegionData(region, bufferSize, regionData))
        {
          for (int i = 0; i < regionData->rdh.nCount; i++)
            addDrawRect(rects, *(((RECT*)regionData->Buffer) + i));
        }
        else
        {
          RECT r;
          GetRgnBox(region, &r);
          addDrawRect(rects, r);
        }
 
#if defined IGRAPHICS_GL //|| IGRAPHICS_D2D
        PAINTSTRUCT ps;
        BeginPaint(hWnd, &ps);
#endif
 
#ifdef IGRAPHICS_GL
        pGraphics->ActivateGLContext();
#endif
 
        pGraphics->Draw(rects);
 
        #ifdef IGRAPHICS_GL
        SwapBuffers((HDC) pGraphics->GetPlatformContext());
        pGraphics->DeactivateGLContext();
        #endif
 
#if defined IGRAPHICS_GL || IGRAPHICS_D2D
        EndPaint(hWnd, &ps);
#endif
      }
 
      // For the D2D if we don't call endpaint, then you really need to call ValidateRect otherwise
      // we are just going to get another WM_PAINT to handle.  Bad!  It also exibits the odd property
      // that windows will be popped under the window.
      ValidateRect(hWnd, 0);
 
      DeleteObject(region);
 
      return 0;
    }
 
    case WM_CTLCOLOREDIT:
    {
      if (!pGraphics->mParamEditWnd)
        return 0;
 
      const IText& text = pGraphics->mEditText;
      HDC dc = (HDC) wParam;
      SetBkColor(dc, RGB(text.mTextEntryBGColor.R, text.mTextEntryBGColor.G, text.mTextEntryBGColor.B));
      SetTextColor(dc, RGB(text.mTextEntryFGColor.R, text.mTextEntryFGColor.G, text.mTextEntryFGColor.B));
      SetBkMode(dc, OPAQUE);
      SetDCBrushColor(dc, RGB(text.mTextEntryBGColor.R, text.mTextEntryBGColor.G, text.mTextEntryBGColor.B));
      return (LRESULT)GetStockObject(DC_BRUSH);
    }
    case WM_DROPFILES:
    {
      HDROP hdrop = (HDROP) wParam;
 
      int numDroppedFiles = DragQueryFileW(hdrop, -1, nullptr, 0);
 
      std::vector<std::vector<char>> pathBuffers(numDroppedFiles, std::vector<char>(1025, 0));
      std::vector<const char*> pathPtrs(numDroppedFiles);
 
      for (int i = 0; i < numDroppedFiles; i++) 
      {
        wchar_t pathBufferW[1025] = {'\0'};
        DragQueryFileW(hdrop, i, pathBufferW, 1024);
        strncpy(pathBuffers[i].data(), UTF16AsUTF8(pathBufferW).Get(), 1024);
        pathPtrs[i] = pathBuffers[i].data();
      }
      POINT p;
      DragQueryPoint(hdrop, &p);
 
      const float scale = pGraphics->GetTotalScale();
 
      if (numDroppedFiles==1) 
      {
        pGraphics->OnDrop(&pathPtrs[0][0], p.x / scale, p.y / scale);
      }
      else 
      {
        pGraphics->OnDropMultiple(pathPtrs, p.x / scale, p.y / scale);
      }
      
      return 0;
    }
    case WM_CLOSE:
    {
      pGraphics->CloseWindow();
      return 0;
    }
    case WM_SETFOCUS:
    {
      return 0;
    }
    case WM_KILLFOCUS:
    {
      return 0;
    }
  }
  return DefWindowProcW(hWnd, msg, wParam, lParam);
}
 
// static
LRESULT CALLBACK IGraphicsWin::ParamEditProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
{
  IGraphicsWin* pGraphics = (IGraphicsWin*) GetWindowLongPtrW(GetParent(hWnd), GWLP_USERDATA);
 
  if (pGraphics && pGraphics->mParamEditWnd && pGraphics->mParamEditWnd == hWnd)
  {
    pGraphics->HideTooltip();
 
    switch (msg)
    {
      case WM_CHAR:
      {
        // limit to numbers for text entry on appropriate parameters
        if (pGraphics->mEditParam)
        {
          char c = wParam;
 
          if (c == 0x08) break; // backspace
 
          switch (pGraphics->mEditParam->Type())
          {
            case IParam::kTypeEnum:
            case IParam::kTypeInt:
            case IParam::kTypeBool:
              if (c >= '0' && c <= '9') break;
              else if (c == '-') break;
              else if (c == '+') break;
              else return 0;
            case IParam::kTypeDouble:
              if (c >= '0' && c <= '9') break;
              else if (c == '-') break;
              else if (c == '+') break;
              else if (c == '.') break;
              else return 0;
            default:
              break;
          }
        }
        break;
      }
      case WM_KEYDOWN:
      {
        if (wParam == VK_RETURN)
        {
          pGraphics->mParamEditMsg = kCommit;
          return 0;
        }
        else if (wParam == VK_ESCAPE)
        {
          pGraphics->mParamEditMsg = kCancel;
          return 0;
        }
        break;
      }
      case WM_SETFOCUS:
      {
        pGraphics->mParamEditMsg = kEditing;
        break;
      }
      case WM_KILLFOCUS:
      {
        pGraphics->mParamEditMsg = kCommit;
        break;
      }
      // handle WM_GETDLGCODE so that we can say that we want the return key message
      //  (normally single line edit boxes don't get sent return key messages)
      case WM_GETDLGCODE:
      {
        LPARAM lres;
        // find out if the original control wants it
        lres = CallWindowProcW(pGraphics->mDefEditProc, hWnd, WM_GETDLGCODE, wParam, lParam);
        // add in that we want it if it is a return keydown
        if (lParam && ((MSG*)lParam)->message == WM_KEYDOWN && wParam == VK_RETURN)
        {
          lres |= DLGC_WANTMESSAGE;
        }
        return lres;
      }
      case WM_COMMAND:
      {
        switch HIWORD(wParam)
        {
          case CBN_SELCHANGE:
          {
            if (pGraphics->mParamEditWnd)
            {
              pGraphics->mParamEditMsg = kCommit;
              return 0;
            }
          }
 
        }
        break;  // Else let the default proc handle it.
      }
    }
    return CallWindowProcW(pGraphics->mDefEditProc, hWnd, msg, wParam, lParam);
  }
  return DefWindowProcW(hWnd, msg, wParam, lParam);
}
 
IGraphicsWin::IGraphicsWin(IGEditorDelegate& dlg, int w, int h, int fps, float scale)
  : IGRAPHICS_DRAW_CLASS(dlg, w, h, fps, scale)
{
  StaticStorage<InstalledFont>::Accessor fontStorage(sPlatformFontCache);
  StaticStorage<HFontHolder>::Accessor hfontStorage(sHFontCache);
  fontStorage.Retain();
  hfontStorage.Retain();
 
#ifndef IGRAPHICS_DISABLE_VSYNC
  mVSYNCEnabled = IsWindows8OrGreater();
#endif
}
 
IGraphicsWin::~IGraphicsWin()
{
  StaticStorage<InstalledFont>::Accessor fontStorage(sPlatformFontCache);
  StaticStorage<HFontHolder>::Accessor hfontStorage(sHFontCache);
  fontStorage.Release();
  hfontStorage.Release();
  DestroyEditWindow();
  CloseWindow();
}
 
static void GetWindowSize(HWND pWnd, int* pW, int* pH)
{
  if (pWnd)
  {
    RECT r;
    GetWindowRect(pWnd, &r);
    *pW = r.right - r.left;
    *pH = r.bottom - r.top;
  }
  else
  {
    *pW = *pH = 0;
  }
}
 
static bool IsChildWindow(HWND pWnd)
{
  if (pWnd)
  {
    int style = GetWindowLongW(pWnd, GWL_STYLE);
    int exStyle = GetWindowLongW(pWnd, GWL_EXSTYLE);
    return ((style & WS_CHILD) && !(exStyle & WS_EX_MDICHILD));
  }
  return false;
}
 
void IGraphicsWin::ForceEndUserEdit()
{
  mParamEditMsg = kCancel;
}
 
static UINT SETPOS_FLAGS = SWP_NOZORDER | SWP_NOMOVE | SWP_NOACTIVATE;
 
void IGraphicsWin::PlatformResize(bool parentHasResized)
{
  if (WindowIsOpen())
  {
    HWND pParent = 0, pGrandparent = 0;
    int dlgW = 0, dlgH = 0, parentW = 0, parentH = 0, grandparentW = 0, grandparentH = 0;
    GetWindowSize(mPlugWnd, &dlgW, &dlgH);
    int dw = (WindowWidth() * GetScreenScale()) - dlgW, dh = (WindowHeight()* GetScreenScale()) - dlgH;
      
    if (IsChildWindow(mPlugWnd))
    {
      pParent = GetParent(mPlugWnd);
      GetWindowSize(pParent, &parentW, &parentH);
 
      if (IsChildWindow(pParent))
      {
        pGrandparent = GetParent(pParent);
        GetWindowSize(pGrandparent, &grandparentW, &grandparentH);
      }
    }
 
    if (!dw && !dh)
      return;
 
    SetWindowPos(mPlugWnd, 0, 0, 0, dlgW + dw, dlgH + dh, SETPOS_FLAGS);
 
    if (pParent && !parentHasResized)
    {
      SetWindowPos(pParent, 0, 0, 0, parentW + dw, parentH + dh, SETPOS_FLAGS);
    }
 
    if (pGrandparent && !parentHasResized)
    {
      SetWindowPos(pGrandparent, 0, 0, 0, grandparentW + dw, grandparentH + dh, SETPOS_FLAGS);
    }
  }
}
 
#ifdef IGRAPHICS_GL
void IGraphicsWin::DrawResize()
{
  ActivateGLContext();
  IGRAPHICS_DRAW_CLASS::DrawResize();
  DeactivateGLContext();
}
#endif
 
void IGraphicsWin::HideMouseCursor(bool hide, bool lock)
{
  if (mCursorHidden == hide)
    return;
  
  if (hide)
  {
    mHiddenCursorX = mCursorX;
    mHiddenCursorY = mCursorY;
      
    ShowCursor(false);
    mCursorHidden = true;
    mCursorLock = lock && !mTabletInput;
  }
  else
  {
    if (mCursorLock)
      MoveMouseCursor(mHiddenCursorX, mHiddenCursorY);
 
    ShowCursor(true);
    mCursorHidden = false;
    mCursorLock = false;
  }
}
 
void IGraphicsWin::MoveMouseCursor(float x, float y)
{
  if (mTabletInput)
    return;
 
  const float scale = GetTotalScale();
 
  POINT p;
  p.x = std::round(x * scale);
  p.y = std::round(y * scale);
  
  ::ClientToScreen(mPlugWnd, &p);
  
  if (SetCursorPos(p.x, p.y))
  {
    GetCursorPos(&p);
    ScreenToClient(mPlugWnd, &p);
    
    mHiddenCursorX = mCursorX = p.x / scale;
    mHiddenCursorY = mCursorY = p.y / scale;
  }
}
 
ECursor IGraphicsWin::SetMouseCursor(ECursor cursorType)
{
  HCURSOR cursor;
 
  switch (cursorType)
  {
    case ECursor::ARROW:            cursor = LoadCursor(NULL, IDC_ARROW);           break;
    case ECursor::IBEAM:            cursor = LoadCursor(NULL, IDC_IBEAM);           break;
    case ECursor::WAIT:             cursor = LoadCursor(NULL, IDC_WAIT);            break;
    case ECursor::CROSS:            cursor = LoadCursor(NULL, IDC_CROSS);           break;
    case ECursor::UPARROW:          cursor = LoadCursor(NULL, IDC_UPARROW);         break;
    case ECursor::SIZENWSE:         cursor = LoadCursor(NULL, IDC_SIZENWSE);        break;
    case ECursor::SIZENESW:         cursor = LoadCursor(NULL, IDC_SIZENESW);        break;
    case ECursor::SIZEWE:           cursor = LoadCursor(NULL, IDC_SIZEWE);          break;
    case ECursor::SIZENS:           cursor = LoadCursor(NULL, IDC_SIZENS);          break;
    case ECursor::SIZEALL:          cursor = LoadCursor(NULL, IDC_SIZEALL);         break;
    case ECursor::INO:              cursor = LoadCursor(NULL, IDC_NO);              break;
    case ECursor::HAND:             cursor = LoadCursor(NULL, IDC_HAND);            break;
    case ECursor::APPSTARTING:      cursor = LoadCursor(NULL, IDC_APPSTARTING);     break;
    case ECursor::HELP:             cursor = LoadCursor(NULL, IDC_HELP);            break;
    default:
      cursor = LoadCursor(NULL, IDC_ARROW);
  }
 
  SetCursor(cursor);
  return IGraphics::SetMouseCursor(cursorType);
}
 
bool IGraphicsWin::MouseCursorIsLocked()
{
  return mCursorLock;
}
 
void IGraphicsWin::GetMouseLocation(float& x, float&y) const
{
  POINT p;
  GetCursorPos(&p);
  ScreenToClient(mPlugWnd, &p);
 
  const float scale = GetTotalScale();
 
  x = p.x / scale;
  y = p.y / scale;
}
 
#ifdef IGRAPHICS_GL
void IGraphicsWin::CreateGLContext()
{
  PIXELFORMATDESCRIPTOR pfd =
  {
    sizeof(PIXELFORMATDESCRIPTOR),
    1,
    PFD_DRAW_TO_WINDOW | PFD_SUPPORT_OPENGL | PFD_DOUBLEBUFFER, //Flags
    PFD_TYPE_RGBA, // The kind of framebuffer. RGBA or palette.
    32, // Colordepth of the framebuffer.
    0, 0, 0, 0, 0, 0,
    0,
    0,
    0,
    0, 0, 0, 0,
    24, // Number of bits for the depthbuffer
    8, // Number of bits for the stencilbuffer
    0, // Number of Aux buffers in the framebuffer.
    PFD_MAIN_PLANE,
    0,
    0, 0, 0
  };
 
  HDC dc = GetDC(mPlugWnd);
  int fmt = ChoosePixelFormat(dc, &pfd);
  SetPixelFormat(dc, fmt, &pfd);
  mHGLRC = wglCreateContext(dc);
  wglMakeCurrent(dc, mHGLRC);
 
#ifdef IGRAPHICS_GL3
  // On windows we can't create a 3.3 context directly, since we need the wglCreateContextAttribsARB extension.
  // We load the extension, then re-create the context.
  auto wglCreateContextAttribsARB = (PFNWGLCREATECONTEXTATTRIBSARBPROC) wglGetProcAddress("wglCreateContextAttribsARB");
 
  if (wglCreateContextAttribsARB)
  {
    wglDeleteContext(mHGLRC);
 
    const int attribList[] = {
      WGL_CONTEXT_MAJOR_VERSION_ARB, 3,
      WGL_CONTEXT_MINOR_VERSION_ARB, 3,
      WGL_CONTEXT_PROFILE_MASK_ARB, WGL_CONTEXT_CORE_PROFILE_BIT_ARB,
      0
    };
 
    mHGLRC = wglCreateContextAttribsARB(dc, 0, attribList);
    wglMakeCurrent(dc, mHGLRC);
  }
 
#endif
 
  //TODO: return false if GL init fails?
  if (!gladLoadGL())
    DBGMSG("Error initializing glad");
 
  glGetError();
 
  ReleaseDC(mPlugWnd, dc);
}
 
void IGraphicsWin::DestroyGLContext()
{
  wglMakeCurrent(NULL, NULL);
  wglDeleteContext(mHGLRC);
}
 
void IGraphicsWin::ActivateGLContext()
{
  mStartHDC = wglGetCurrentDC();
  mStartHGLRC = wglGetCurrentContext();
  HDC dc = GetDC(mPlugWnd);
  wglMakeCurrent(dc, mHGLRC);
}
 
void IGraphicsWin::DeactivateGLContext()
{
  ReleaseDC(mPlugWnd, (HDC) GetPlatformContext());
  wglMakeCurrent(mStartHDC, mStartHGLRC); // return current ctxt to start
}
#endif
 
EMsgBoxResult IGraphicsWin::ShowMessageBox(const char* str, const char* title, EMsgBoxType type, IMsgBoxCompletionHandlerFunc completionHandler)
{
  ReleaseMouseCapture();
  
  EMsgBoxResult result = static_cast<EMsgBoxResult>(MessageBoxW(GetMainWnd(), UTF8AsUTF16(str).Get(), UTF8AsUTF16(title).Get(), static_cast<int>(type)));
  
  if (completionHandler)
    completionHandler(result);
  
  return result;
}
 
void* IGraphicsWin::OpenWindow(void* pParent)
{
  mParentWnd = (HWND) pParent;
  int screenScale = GetScaleForHWND(mParentWnd);
  int x = 0, y = 0, w = WindowWidth() * screenScale, h = WindowHeight() * screenScale;
 
  if (mPlugWnd)
  {
    RECT pR, cR;
    GetWindowRect((HWND) pParent, &pR);
    GetWindowRect(mPlugWnd, &cR);
    CloseWindow();
    x = cR.left - pR.left;
    y = cR.top - pR.top;
    w = cR.right - cR.left;
    h = cR.bottom - cR.top;
  }
 
  if (nWndClassReg++ == 0)
  {
    WNDCLASSW wndClass = { CS_DBLCLKS | CS_OWNDC, WndProc, 0, 0, mHInstance, 0, 0, 0, 0, wndClassName };
    RegisterClassW(&wndClass);
  }
 
  mPlugWnd = CreateWindowW(wndClassName, L"IPlug", WS_CHILD | WS_VISIBLE | WS_CLIPCHILDREN | WS_CLIPSIBLINGS, x, y, w, h, mParentWnd, 0, mHInstance, this);
 
  HDC dc = GetDC(mPlugWnd);
  SetPlatformContext(dc);
  ReleaseDC(mPlugWnd, dc);
 
#ifdef IGRAPHICS_GL
  CreateGLContext();
#endif
 
  OnViewInitialized((void*) dc);
 
  SetScreenScale(screenScale); // resizes draw context
 
  GetDelegate()->LayoutUI(this);
 
  if (MultiTouchEnabled() && GetSystemMetrics(SM_DIGITIZER) & NID_MULTI_INPUT)
  {
    RegisterTouchWindow(mPlugWnd, 0);
  }
 
  if (!mPlugWnd && --nWndClassReg == 0)
  {
    UnregisterClassW(wndClassName, mHInstance);
  }
  else
  {
    SetAllControlsDirty();
  }
 
  if (mPlugWnd && TooltipsEnabled())
  {
    static const INITCOMMONCONTROLSEX iccex = { sizeof(INITCOMMONCONTROLSEX), ICC_TAB_CLASSES };
 
    if (InitCommonControlsEx(&iccex))
    {
      mTooltipWnd = CreateWindowExW(0, TOOLTIPS_CLASSW, NULL, WS_POPUP | WS_CLIPCHILDREN | WS_CLIPSIBLINGS | TTS_NOPREFIX | TTS_ALWAYSTIP,
                                   CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, mPlugWnd, NULL, mHInstance, NULL);
      if (mTooltipWnd)
      {
        SetWindowPos(mTooltipWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE);
        TOOLINFOW ti = { TTTOOLINFOW_V2_SIZE, TTF_IDISHWND | TTF_SUBCLASS, mPlugWnd, (UINT_PTR) mPlugWnd, {0, 0, 0, 0}, NULL, NULL, 0, NULL };
        SendMessageW(mTooltipWnd, TTM_ADDTOOLW, 0, (LPARAM) &ti);
        SendMessageW(mTooltipWnd, TTM_SETMAXTIPWIDTH, 0, TOOLTIPWND_MAXWIDTH);
      }
    }
 
    if (!mTooltipWnd)
      EnableTooltips(false);
 
#ifdef IGRAPHICS_GL
    wglMakeCurrent(NULL, NULL);
#endif
  }
 
  GetDelegate()->OnUIOpen();
  
  return mPlugWnd;
}
 
static void GetWndClassName(HWND hWnd, WDL_String* pStr)
{
  wchar_t cStrW[MAX_CLASSNAME_LEN] = {'\0'};
  GetClassNameW(hWnd, cStrW, MAX_CLASSNAME_LEN);
  pStr->Set(UTF16AsUTF8(cStrW).Get());
}
 
BOOL CALLBACK IGraphicsWin::FindMainWindow(HWND hWnd, LPARAM lParam)
{
  IGraphicsWin* pGraphics = (IGraphicsWin*) lParam;
  if (pGraphics)
  {
    DWORD wPID;
    GetWindowThreadProcessId(hWnd, &wPID);
    WDL_String str;
    GetWndClassName(hWnd, &str);
    if (wPID == pGraphics->mPID && !strcmp(str.Get(), pGraphics->mMainWndClassName.Get()))
    {
      pGraphics->mMainWnd = hWnd;
      return FALSE;   // Stop enumerating.
    }
  }
  return TRUE;
}
 
HWND IGraphicsWin::GetMainWnd()
{
  if (!mMainWnd)
  {
    if (mParentWnd)
    {
      HWND parentWnd = mParentWnd;
      while (parentWnd)
      {
        mMainWnd = parentWnd;
        parentWnd = GetParent(mMainWnd);
      }
      
      GetWndClassName(mMainWnd, &mMainWndClassName);
    }
    else if (CStringHasContents(mMainWndClassName.Get()))
    {
      mPID = GetCurrentProcessId();
      EnumWindows(FindMainWindow, (LPARAM) this);
    }
  }
  return mMainWnd;
}
 
IRECT IGraphicsWin::GetWindowRECT()
{
  if (mPlugWnd)
  {
    RECT r;
    GetWindowRect(mPlugWnd, &r);
    r.right -= TOOLWIN_BORDER_W;
    r.bottom -= TOOLWIN_BORDER_H;
    return IRECT(r.left, r.top, r.right, r.bottom);
  }
  return IRECT();
}
 
void IGraphicsWin::CloseWindow()
{
  if (mPlugWnd)
  {
    if (mVSYNCEnabled)
      StopVBlankThread();
    else
      KillTimer(mPlugWnd, IPLUG_TIMER_ID);
 
#ifdef IGRAPHICS_GL
    ActivateGLContext();
#endif
 
    OnViewDestroyed();
 
#ifdef IGRAPHICS_GL
    DeactivateGLContext();
    DestroyGLContext();
#endif
 
    SetPlatformContext(nullptr);
 
    if (mTooltipWnd)
    {
      DestroyWindow(mTooltipWnd);
      mTooltipWnd = 0;
      mShowingTooltip = false;
      mTooltipIdx = -1;
    }
 
    DestroyWindow(mPlugWnd);
    mPlugWnd = 0;
 
    if (--nWndClassReg == 0)
    {
      UnregisterClassW(wndClassName, mHInstance);
    }
  }
}
 
bool IGraphicsWin::PlatformSupportsMultiTouch() const
{
  return GetSystemMetrics(SM_DIGITIZER) & NID_MULTI_INPUT;
}
 
IPopupMenu* IGraphicsWin::GetItemMenu(long idx, long& idxInMenu, long& offsetIdx, IPopupMenu& baseMenu)
{
  long oldIDx = offsetIdx;
  offsetIdx += baseMenu.NItems();
 
  if (idx < offsetIdx)
  {
    idxInMenu = idx - oldIDx;
    return &baseMenu;
  }
 
  IPopupMenu* pMenu = nullptr;
 
  for (int i = 0; i< baseMenu.NItems(); i++)
  {
    IPopupMenu::Item* pMenuItem = baseMenu.GetItem(i);
    if (pMenuItem->GetSubmenu())
    {
      pMenu = GetItemMenu(idx, idxInMenu, offsetIdx, *pMenuItem->GetSubmenu());
 
      if (pMenu)
        break;
    }
  }
 
  return pMenu;
}
 
HMENU IGraphicsWin::CreateMenu(IPopupMenu& menu, long* pOffsetIdx)
{
  HMENU hMenu = ::CreatePopupMenu();
 
  WDL_String escapedText;
 
  int flags = 0;
  long offset = *pOffsetIdx;
  long nItems = menu.NItems();
  *pOffsetIdx += nItems;
  long inc = 0;
 
  for (int i = 0; i < nItems; i++)
  {
    IPopupMenu::Item* pMenuItem = menu.GetItem(i);
 
    if (pMenuItem->GetIsSeparator())
    {
      AppendMenuW(hMenu, MF_SEPARATOR, 0, 0);
    }
    else
    {
      const char* str = pMenuItem->GetText();
      int maxlen = strlen(str) + menu.GetPrefix() ? 50 : 0;
      WDL_String entryText(str);
 
      if (menu.GetPrefix())
      {
        switch (menu.GetPrefix())
        {
          case 1:
          {
            entryText.SetFormatted(maxlen, "%1d: %s", i+1, str); break;
          }
          case 2:
          {
            entryText.SetFormatted(maxlen, "%02d: %s", i+1, str); break;
          }
          case 3:
          {
            entryText.SetFormatted(maxlen, "%03d: %s", i+1, str); break;
          }
        }
      }
 
      // Escape ampersands if present
 
      if (strchr(entryText.Get(), '&'))
      {
        for (int c = 0; c < entryText.GetLength(); c++)
          if (entryText.Get()[c] == '&')
            entryText.Insert("&", c++);
      }
 
      flags = MF_STRING;
      if (nItems < 160 && menu.NItemsPerColumn() > 0 && inc && !(inc % menu.NItemsPerColumn()))
        flags |= MF_MENUBARBREAK;
 
      if (pMenuItem->GetEnabled())
        flags |= MF_ENABLED;
      else
        flags |= MF_GRAYED;
      if (pMenuItem->GetIsTitle())
        flags |= MF_DISABLED;
      if (pMenuItem->GetChecked())
        flags |= MF_CHECKED;
      else
        flags |= MF_UNCHECKED;
 
      if (pMenuItem->GetSubmenu())
      {
        HMENU submenu = CreateMenu(*pMenuItem->GetSubmenu(), pOffsetIdx);
        if (submenu)
        {
          AppendMenuW(hMenu, flags|MF_POPUP, (UINT_PTR)submenu, UTF8AsUTF16(entryText).Get());
        }
      }
      else
      {
        AppendMenuW(hMenu, flags, offset + inc, UTF8AsUTF16(entryText).Get());
      }
    }
    inc++;
  }
 
  return hMenu;
}
 
IPopupMenu* IGraphicsWin::CreatePlatformPopupMenu(IPopupMenu& menu, const IRECT bounds, bool& isAsync)
{
  long offsetIdx = 0;
  HMENU hMenu = CreateMenu(menu, &offsetIdx);
 
  if (hMenu)
  {
    IPopupMenu* result = nullptr;
 
    POINT cPos;
    const float scale = GetTotalScale();
 
    cPos.x = bounds.L * scale;
    cPos.y = bounds.B * scale;
 
    ::ClientToScreen(mPlugWnd, &cPos);
 
    if (TrackPopupMenu(hMenu, TPM_LEFTALIGN, cPos.x, cPos.y, 0, mPlugWnd, 0))
    {
      MSG msg;
      if (PeekMessage(&msg, mPlugWnd, WM_COMMAND, WM_COMMAND, PM_REMOVE))
      {
        if (HIWORD(msg.wParam) == 0)
        {
          long res = LOWORD(msg.wParam);
          if (res != -1)
          {
            long idx = 0;
            offsetIdx = 0;
            IPopupMenu* pReturnMenu = GetItemMenu(res, idx, offsetIdx, menu);
            if (pReturnMenu)
            {
              result = pReturnMenu;
              result->SetChosenItemIdx(idx);
                
              //synchronous
              if (pReturnMenu && pReturnMenu->GetFunction())
                pReturnMenu->ExecFunction();
            }
          }
        }
      }
    }
    DestroyMenu(hMenu);
 
    RECT r = { 0, 0, static_cast<LONG>(WindowWidth() * GetScreenScale()), static_cast<LONG>(WindowHeight() * GetScreenScale()) };
    InvalidateRect(mPlugWnd, &r, FALSE);
 
    return result;
  }
 
  return nullptr;
}
 
void IGraphicsWin::CreatePlatformTextEntry(int paramIdx, const IText& text, const IRECT& bounds, int length, const char* str)
{
  if (mParamEditWnd)
    return;
 
  DWORD editStyle;
 
  switch (text.mAlign)
  {
    case EAlign::Near:    editStyle = ES_LEFT;   break;
    case EAlign::Far:     editStyle = ES_RIGHT;  break;
    case EAlign::Center:
    default:              editStyle = ES_CENTER; break;
  }
 
  const float scale = GetTotalScale();
  IRECT scaledBounds = bounds.GetScaled(scale);
 
  mParamEditWnd = CreateWindowW(L"EDIT", UTF8AsUTF16(str).Get(), ES_AUTOHSCROLL /*only works for left aligned text*/ | WS_CHILD | WS_CLIPCHILDREN | WS_CLIPSIBLINGS | WS_VISIBLE | ES_MULTILINE | editStyle,
    scaledBounds.L, scaledBounds.T, scaledBounds.W()+1, scaledBounds.H()+1,
    mPlugWnd, (HMENU) PARAM_EDIT_ID, mHInstance, 0);
 
  StaticStorage<HFontHolder>::Accessor hfontStorage(sHFontCache);
 
  LOGFONTW lFont = { 0 };
  HFontHolder* hfontHolder = hfontStorage.Find(text.mFont);
  GetObjectW(hfontHolder->mHFont, sizeof(LOGFONTW), &lFont);
  lFont.lfHeight = text.mSize * scale;
  mEditFont = CreateFontIndirectW(&lFont);
 
  assert(hfontHolder && "font not found - did you forget to load it?");
 
  mEditParam = paramIdx > kNoParameter ? GetDelegate()->GetParam(paramIdx) : nullptr;
  mEditText = text;
  mEditRECT = bounds;
 
  SendMessageW(mParamEditWnd, EM_LIMITTEXT, (WPARAM) length, 0);
  SendMessageW(mParamEditWnd, WM_SETFONT, (WPARAM) mEditFont, 0);
  SendMessageW(mParamEditWnd, EM_SETSEL, 0, -1);
 
  if (text.mVAlign == EVAlign::Middle)
  {
    double size = text.mSize * scale;
    double offset = (scaledBounds.H() - size) / 2.0;
    RECT formatRect{0, (LONG) offset, (LONG) scaledBounds.W() + 1, (LONG) scaledBounds.H() + 1};
    SendMessageW(mParamEditWnd, EM_SETRECT, 0, (LPARAM) &formatRect);
  }
 
  SetFocus(mParamEditWnd);
 
  mDefEditProc = (WNDPROC) SetWindowLongPtrW(mParamEditWnd, GWLP_WNDPROC, (LONG_PTR) ParamEditProc);
  SetWindowLongPtrW(mParamEditWnd, GWLP_USERDATA, 0xdeadf00b);
}
 
bool IGraphicsWin::RevealPathInExplorerOrFinder(WDL_String& path, bool select)
{
  bool success = false;
  
  if (path.GetLength())
  {
    WCHAR winDir[IPLUG_WIN_MAX_WIDE_PATH];
    UINT len = GetSystemDirectoryW(winDir, IPLUG_WIN_MAX_WIDE_PATH);
 
    if (len && !(len > MAX_PATH - 2))
    {
      winDir[len]   = L'\\';
      winDir[++len] = L'\0';
      
      WDL_String explorerParams;
      
      if (select)
        explorerParams.Append("/select,");
      
      explorerParams.Append("\"");
      explorerParams.Append(path.Get());
      explorerParams.Append("\\\"");
      
      HINSTANCE result;
      
      if ((result=::ShellExecuteW(NULL, L"open", L"explorer.exe", UTF8AsUTF16(explorerParams).Get(), winDir, SW_SHOWNORMAL)) <= (HINSTANCE) 32)
        success = true;
    }
  }
  
  return success;
}
 
void IGraphicsWin::PromptForFile(WDL_String& fileName, WDL_String& path, EFileAction action, const char* ext, IFileDialogCompletionHandlerFunc completionHandler)
{
  if (!WindowIsOpen())
  {
    fileName.Set("");
    return;
  }
    
  wchar_t fileNameWide[_MAX_PATH];
    
  UTF8ToUTF16(fileNameWide, fileName.Get(), _MAX_PATH);
 
  //if (!path.GetLength())
  //  DesktopPath(path);
 
  UTF8AsUTF16 directoryWide(path);
 
  OPENFILENAMEW ofn;
  memset(&ofn, 0, sizeof(OPENFILENAMEW));
    
  ofn.lStructSize = sizeof(OPENFILENAMEW);
  ofn.hwndOwner = (HWND) GetWindow();
  ofn.lpstrFile = fileNameWide;
  ofn.nMaxFile = _MAX_PATH - 1;
  ofn.lpstrInitialDir = directoryWide.Get();
  ofn.Flags = OFN_PATHMUSTEXIST;
    
  if (CStringHasContents(ext))
  {
    wchar_t extStr[256];
    wchar_t defExtStr[16];
    int i, p, n = strlen(ext);
    bool separator = true;
        
    for (i = 0, p = 0; i < n; ++i)
    {
      if (separator)
      {
        if (p)
          extStr[p++] = ';';
                
        separator = false;
        extStr[p++] = '*';
        extStr[p++] = '.';
      }
 
      if (ext[i] == ' ')
        separator = true;
      else
        extStr[p++] = ext[i];
    }
    extStr[p++] = '\0';
        
    wcscpy(&extStr[p], extStr);
    extStr[p + p] = '\0';
    ofn.lpstrFilter = extStr;
        
    for (i = 0, p = 0; i < n && ext[i] != ' '; ++i)
      defExtStr[p++] = ext[i];
    
    defExtStr[p++] = '\0';
    ofn.lpstrDefExt = defExtStr;
  }
    
  bool rc = false;
    
  switch (action)
  {
    case EFileAction::Save:
      ofn.Flags |= OFN_OVERWRITEPROMPT;
      rc = GetSaveFileNameW(&ofn);
      break;
    case EFileAction::Open:
      default:
      ofn.Flags |= OFN_FILEMUSTEXIST;
      rc = GetOpenFileNameW(&ofn);
      break;
  }
    
  if (rc)
  {
    char drive[_MAX_DRIVE];
    char directoryOutCStr[_MAX_PATH];
    
    UTF16AsUTF8 tempUTF8(ofn.lpstrFile);
    
    if (_splitpath_s(tempUTF8.Get(), drive, sizeof(drive), directoryOutCStr, sizeof(directoryOutCStr), NULL, 0, NULL, 0) == 0)
    {
      path.Set(drive);
      path.Append(directoryOutCStr);
    }
      
    fileName.Set(tempUTF8.Get());
  }
  else
  {
    fileName.Set("");
  }
 
  // Async is not required on windows, but call the completion handler anyway
  if (completionHandler)
  {
    completionHandler(fileName, path);
  }
 
  ReleaseMouseCapture();
}
 
void IGraphicsWin::PromptForDirectory(WDL_String& dir, IFileDialogCompletionHandlerFunc completionHandler)
{
  BROWSEINFOW bi;
  memset(&bi, 0, sizeof(bi));
  
  bi.ulFlags   = BIF_USENEWUI;
  bi.hwndOwner = mPlugWnd;
  bi.lpszTitle = L"Choose a Directory";
  
  // must call this if using BIF_USENEWUI
  ::OleInitialize(NULL);
  LPITEMIDLIST pIDL = ::SHBrowseForFolderW(&bi);
  
  if (pIDL != NULL)
  {
    wchar_t buffer[_MAX_PATH] = {'\0'};
    
    if (::SHGetPathFromIDListW(pIDL, buffer) != 0)
    {
      dir.Set(UTF16AsUTF8(buffer).Get());
      dir.Append("\\");
    }
    
    // free the item id list
    CoTaskMemFree(pIDL);
  }
  else
  {
    dir.Set("");
  }
  
  if (completionHandler)
  {
    WDL_String fileName; // not used
    completionHandler(fileName, dir);
  }
 
  ReleaseMouseCapture();
  
  ::OleUninitialize();
}
 
static UINT_PTR CALLBACK CCHookProc(HWND hdlg, UINT uiMsg, WPARAM wParam, LPARAM lParam)
{
  if (uiMsg == WM_INITDIALOG && lParam)
  {
    CHOOSECOLORW* cc = (CHOOSECOLORW*) lParam;
    if (cc && cc->lCustData)
    {
      const wchar_t* strWide = (const wchar_t*) cc->lCustData;
      SetWindowTextW(hdlg, strWide);
      UINT uiSetRGB;
      uiSetRGB = RegisterWindowMessageW(SETRGBSTRINGW);
      SendMessageW(hdlg, uiSetRGB, 0, (LPARAM) cc->rgbResult);
    }
  }
  return 0;
}
 
bool IGraphicsWin::PromptForColor(IColor& color, const char* prompt, IColorPickerHandlerFunc func)
{
  ReleaseMouseCapture();
 
  if (!mPlugWnd)
    return false;
 
  UTF8AsUTF16 promptWide(prompt);
 
  const COLORREF w = RGB(255, 255, 255);
  static COLORREF customColorStorage[16] = { w, w, w, w, w, w, w, w, w, w, w, w, w, w, w, w };
  
  CHOOSECOLORW cc;
  memset(&cc, 0, sizeof(CHOOSECOLORW));
  cc.lStructSize = sizeof(CHOOSECOLORW);
  cc.hwndOwner = mPlugWnd;
  cc.rgbResult = RGB(color.R, color.G, color.B);
  cc.lpCustColors = customColorStorage;
  cc.lCustData = (LPARAM) promptWide.Get();
  cc.lpfnHook = CCHookProc;
  cc.Flags = CC_RGBINIT | CC_ANYCOLOR | CC_FULLOPEN | CC_SOLIDCOLOR | CC_ENABLEHOOK;
 
  if (ChooseColorW(&cc))
  {
    color.R = GetRValue(cc.rgbResult);
    color.G = GetGValue(cc.rgbResult);
    color.B = GetBValue(cc.rgbResult);
    
    if (func)
      func(color);
    
    return true;
  }
  return false;
}
 
bool IGraphicsWin::OpenURL(const char* url, const char* msgWindowTitle, const char* confirmMsg, const char* errMsgOnFailure)
{
  if (confirmMsg && MessageBoxW(mPlugWnd, UTF8AsUTF16(confirmMsg).Get(), UTF8AsUTF16(msgWindowTitle).Get(), MB_YESNO) != IDYES)
  {
    return false;
  }
  DWORD inetStatus = 0;
  if (InternetGetConnectedState(&inetStatus, 0))
  {
    if (ShellExecuteW(mPlugWnd, L"open", UTF8AsUTF16(url).Get(), 0, 0, SW_SHOWNORMAL) > HINSTANCE(32))
    {
      return true;
    }
  }
  if (errMsgOnFailure)
  {
    MessageBoxW(mPlugWnd, UTF8AsUTF16(errMsgOnFailure).Get(), UTF8AsUTF16(msgWindowTitle).Get(), MB_OK);
  }
  return false;
}
 
void IGraphicsWin::SetTooltip(const char* tooltip)
{
  UTF8AsUTF16 tipWide(tooltip);
  TOOLINFOW ti = { TTTOOLINFOW_V2_SIZE, 0, mPlugWnd, (UINT_PTR) mPlugWnd, {0, 0, 0, 0}, NULL, NULL, 0, NULL };
  ti.lpszText = const_cast<wchar_t*>(tipWide.Get());
  SendMessageW(mTooltipWnd, TTM_UPDATETIPTEXTW, 0, (LPARAM) &ti);
}
 
void IGraphicsWin::ShowTooltip()
{
  if (mTooltipIdx > -1)
  {
    if (auto* pTooltipControl = GetControl(mTooltipIdx))
    {
      const char* tooltipStr = pTooltipControl->GetTooltip();
      if (tooltipStr)
      {
        SetTooltip(tooltipStr);
        mShowingTooltip = true;
      }
    }
  }
}
 
void IGraphicsWin::HideTooltip()
{
  if (mShowingTooltip)
  {
    SetTooltip(NULL);
    mShowingTooltip = false;
  }
}
 
bool IGraphicsWin::GetTextFromClipboard(WDL_String& str)
{
  bool result = false;
 
  if (IsClipboardFormatAvailable(CF_UNICODETEXT))
  {
    if (OpenClipboard(0))
    {
      HGLOBAL hglb = GetClipboardData(CF_UNICODETEXT);
      
      if (hglb)
      {
        WCHAR *origStr = (WCHAR*) GlobalLock(hglb);
 
        if (origStr)
        {
          UTF16ToUTF8(str, origStr);
          GlobalUnlock(hglb);
          result = true;
        }
      }
    }
    
    CloseClipboard();
  }
  
  if (!result)
    str.Set("");
  
  return result;
}
 
bool IGraphicsWin::SetTextInClipboard(const char* str)
{
  if (!OpenClipboard(mMainWnd))
    return false;
 
  EmptyClipboard();
 
  bool result = true;
 
  if (strlen(str))
  {
    // figure out how many characters we need for the wide version of this string
    const int lenWide = UTF8ToUTF16Len(str);
 
    // allocate global memory object for the text
    HGLOBAL hglbCopy = GlobalAlloc(GMEM_MOVEABLE, lenWide*sizeof(WCHAR));
    if (!hglbCopy)
    {
      CloseClipboard();
      return false;
    }
 
    // lock the handle
    LPWSTR lpstrCopy = (LPWSTR) GlobalLock(hglbCopy);
 
    if (lpstrCopy)
    {
      // copy the string into the buffer
      UTF8ToUTF16(lpstrCopy, str, lenWide);
      GlobalUnlock(hglbCopy);
 
      // place the handle on the clipboard
      result = SetClipboardData(CF_UNICODETEXT, hglbCopy);
 
      // free the handle if unsuccessful
      if (!result)
        GlobalFree(hglbCopy);
    }
  }
 
  CloseClipboard();
 
  return result;
}
 
bool IGraphicsWin::SetFilePathInClipboard(const char* path)
{
  if (!OpenClipboard(mMainWnd))
    return false;
 
  EmptyClipboard();
 
  UTF8AsUTF16 pathWide(path);
 
  // N.B. GHND ensures that the memory is zeroed
 
  HGLOBAL hGlobal = GlobalAlloc(GHND, sizeof(DROPFILES) + (sizeof(wchar_t) * (pathWide.GetLength() + 1)));
 
  if (!hGlobal)
    return false;
 
  DROPFILES* pDropFiles = (DROPFILES*) GlobalLock(hGlobal);
  bool result = false;
 
  if (pDropFiles)
  {
    // Populate the dropfile structure and copy the file path
 
    pDropFiles->pFiles = sizeof(DROPFILES);
    pDropFiles->pt = { 0, 0 };
    pDropFiles->fNC = true;
    pDropFiles->fWide = true;
 
    std::copy_n(pathWide.Get(), pathWide.GetLength(), reinterpret_cast<wchar_t*>(&pDropFiles[1]));
 
    GlobalUnlock(hGlobal);
 
    result = SetClipboardData(CF_HDROP, hGlobal);
  }
 
  // free the handle if unsuccessful
  if (!result)
    GlobalFree(hGlobal);
 
  CloseClipboard();
  return result;
}
 
bool IGraphicsWin::InitiateExternalFileDragDrop(const char* path, const IRECT& /*iconBounds*/)
{
  using namespace DragAndDropHelpers;
  OleInitialize(nullptr);
  
  FORMATETC format = { CF_HDROP, nullptr, DVASPECT_CONTENT, -1, TYMED_HGLOBAL };
  
  DataObject* dataObj = new DataObject(&format, path);
  DropSource* dropSource = new DropSource();
  
  DWORD dropEffect;
  HRESULT ret = DoDragDrop(dataObj, dropSource, DROPEFFECT_COPY, &dropEffect);
  bool success = SUCCEEDED(ret);
  
  dataObj->Release();
  dropSource->Release();
  
  OleUninitialize();
  
  ReleaseMouseCapture();
 
  return success;
}
 
static HFONT GetHFont(const char* fontName, int weight, bool italic, bool underline, DWORD quality = DEFAULT_QUALITY, bool enumerate = false)
{
  HDC hdc = GetDC(NULL);
  HFONT font = nullptr;
  LOGFONTW lFont;
 
  lFont.lfHeight = 0;
  lFont.lfWidth = 0;
  lFont.lfEscapement = 0;
  lFont.lfOrientation = 0;
  lFont.lfWeight = weight;
  lFont.lfItalic = italic;
  lFont.lfUnderline = underline;
  lFont.lfStrikeOut = false;
  lFont.lfCharSet = DEFAULT_CHARSET;
  lFont.lfOutPrecision = OUT_TT_PRECIS;
  lFont.lfClipPrecision = CLIP_DEFAULT_PRECIS;
  lFont.lfQuality = quality;
  lFont.lfPitchAndFamily = DEFAULT_PITCH;
 
  wcsncpy(lFont.lfFaceName, UTF8AsUTF16(fontName).Get(), LF_FACESIZE);
 
  auto enumProc = [](const LOGFONTW* pLFont, const TEXTMETRICW* pTextMetric, DWORD FontType, LPARAM lParam)
  {
    return -1;
  };
  
  if ((!enumerate || EnumFontFamiliesExW(hdc, &lFont, enumProc, NULL, 0) == -1))
    font = CreateFontIndirectW(&lFont);
 
  if (font)
  {
    wchar_t selectedFontName[64] = {'\0'};
 
    SelectFont(hdc, font);
    GetTextFaceW(hdc, 64, selectedFontName);
    if (strcmp(UTF16AsUTF8(selectedFontName).Get(), fontName))
    {
      DeleteObject(font);
      return nullptr;
    }
  }
 
  ReleaseDC(NULL, hdc);
 
  return font;
}
 
PlatformFontPtr IGraphicsWin::LoadPlatformFont(const char* fontID, const char* fileNameOrResID)
{
  StaticStorage<InstalledFont>::Accessor fontStorage(sPlatformFontCache);
 
  void* pFontMem = nullptr;
  int resSize = 0;
  WDL_String fullPath;
 
  const EResourceLocation fontLocation = LocateResource(fileNameOrResID, "ttf", fullPath, GetBundleID(), GetWinModuleHandle(), nullptr);
 
  if (fontLocation == kNotFound)
    return nullptr;
 
  switch (fontLocation)
  {
    case kAbsolutePath:
    {
      HANDLE file = CreateFileW(UTF8AsUTF16(fullPath).Get(), GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
      PlatformFontPtr ret = nullptr;
      if (file)
      {
        HANDLE mapping = CreateFileMappingW(file, NULL, PAGE_READONLY, 0, 0, NULL);
        if (mapping)
        {
          resSize = (int) GetFileSize(file, nullptr);
          pFontMem = MapViewOfFile(mapping, FILE_MAP_READ, 0, 0, 0);
          ret = LoadPlatformFont(fontID, pFontMem, resSize);
          UnmapViewOfFile(pFontMem);
          CloseHandle(mapping);
        }
        CloseHandle(file);
      }
      return ret;
    }
    break;
    case kWinBinary:
    {
      pFontMem = const_cast<void *>(LoadWinResource(fullPath.Get(), "ttf", resSize, GetWinModuleHandle()));
      return LoadPlatformFont(fontID, pFontMem, resSize);
    }
    break;
  }
 
  return nullptr;
}
 
PlatformFontPtr IGraphicsWin::LoadPlatformFont(const char* fontID, const char* fontName, ETextStyle style)
{
  int weight = style == ETextStyle::Bold ? FW_BOLD : FW_REGULAR;
  bool italic = style == ETextStyle::Italic;
  bool underline = false;
  DWORD quality = DEFAULT_QUALITY;
 
  HFONT font = GetHFont(fontName, weight, italic, underline, quality, true);
 
  return PlatformFontPtr(font ? new Font(font, TextStyleString(style), true) : nullptr);
}
 
PlatformFontPtr IGraphicsWin::LoadPlatformFont(const char* fontID, void* pData, int dataSize)
{
  StaticStorage<InstalledFont>::Accessor fontStorage(sPlatformFontCache);
 
  std::unique_ptr<InstalledFont> pFont;
  void* pFontMem = pData;
  int resSize = dataSize;
 
  pFont = std::make_unique<InstalledFont>(pFontMem, resSize);
 
  if (pFontMem && pFont && pFont->IsValid())
  {
    IFontInfo fontInfo(pFontMem, resSize, 0);
    WDL_String family = fontInfo.GetFamily();
    int weight = fontInfo.IsBold() ? FW_BOLD : FW_REGULAR;
    bool italic = fontInfo.IsItalic();
    bool underline = fontInfo.IsUnderline();
 
    HFONT font = GetHFont(family.Get(), weight, italic, underline);
 
    if (font)
    {
      fontStorage.Add(pFont.release(), fontID);
      return PlatformFontPtr(new Font(font, "", false));
    }
  }
 
  return nullptr;
}
 
void IGraphicsWin::CachePlatformFont(const char* fontID, const PlatformFontPtr& font)
{
  StaticStorage<HFontHolder>::Accessor hfontStorage(sHFontCache);
 
  HFONT hfont = font->GetDescriptor();
 
  if (!hfontStorage.Find(fontID))
    hfontStorage.Add(new HFontHolder(hfont), fontID);
}
 
DWORD WINAPI VBlankRun(LPVOID lpParam)
{
  IGraphicsWin* pGraphics = (IGraphicsWin*) lpParam;
  return pGraphics->OnVBlankRun();
}
 
void IGraphicsWin::StartVBlankThread(HWND hWnd)
{
  mVBlankWindow = hWnd;
  mVBlankShutdown = false;
  DWORD threadId = 0;
  mVBlankThread = ::CreateThread(NULL, 0, VBlankRun, this, 0, &threadId);
}
 
void IGraphicsWin::StopVBlankThread()
{
  if (mVBlankThread != INVALID_HANDLE_VALUE)
  {
    mVBlankShutdown = true;
    ::WaitForSingleObject(mVBlankThread, 10000);
    mVBlankThread = INVALID_HANDLE_VALUE;
    mVBlankWindow = 0;
  }
}
 
// Nasty kernel level definitions for wait for vblank.  Including the
// proper include file requires "d3dkmthk.h" from the driver development
// kit.  Instead we define the minimum needed to call the three methods we need.
// and use LoadLibrary/GetProcAddress to accomplish the same thing.
// See https://docs.microsoft.com/en-us/windows-hardware/drivers/ddi/d3dkmthk/
//
// Heres another link (rant) with a lot of good information about vsync on firefox
// https://www.vsynctester.com/firefoxisbroken.html
// https://bugs.chromium.org/p/chromium/issues/detail?id=467617
 
// structs to use
typedef UINT32 D3DKMT_HANDLE;
typedef UINT D3DDDI_VIDEO_PRESENT_SOURCE_ID;
 
typedef struct _D3DKMT_OPENADAPTERFROMHDC
{
  HDC                            hDc;
  D3DKMT_HANDLE                  hAdapter;
  LUID                           AdapterLuid;
  D3DDDI_VIDEO_PRESENT_SOURCE_ID VidPnSourceId;
} D3DKMT_OPENADAPTERFROMHDC;
 
typedef struct _D3DKMT_CLOSEADAPTER
{
  D3DKMT_HANDLE hAdapter;
} D3DKMT_CLOSEADAPTER;
 
typedef struct _D3DKMT_WAITFORVERTICALBLANKEVENT
{
  D3DKMT_HANDLE                  hAdapter;
  D3DKMT_HANDLE                  hDevice;
  D3DDDI_VIDEO_PRESENT_SOURCE_ID VidPnSourceId;
} D3DKMT_WAITFORVERTICALBLANKEVENT;
 
// entry points
typedef NTSTATUS(WINAPI* D3DKMTOpenAdapterFromHdc)(D3DKMT_OPENADAPTERFROMHDC* Arg1);
typedef NTSTATUS(WINAPI* D3DKMTCloseAdapter)(const D3DKMT_CLOSEADAPTER* Arg1);
typedef NTSTATUS(WINAPI* D3DKMTWaitForVerticalBlankEvent)(const D3DKMT_WAITFORVERTICALBLANKEVENT* Arg1);
 
DWORD IGraphicsWin::OnVBlankRun()
{
  SetThreadPriority(GetCurrentThread(), THREAD_PRIORITY_TIME_CRITICAL);
 
  // TODO: get expected vsync value.  For now we will use a fallback
  // of 60Hz
  float rateFallback = 60.0f;
  int rateMS = (int)(1000.0f / rateFallback);
 
  // We need to try to load the module and entry points to wait on v blank.
  // if anything fails, we try to gracefully fallback to sleeping for some
  // number of milliseconds.
  //
  // TODO: handle low power modes
 
  D3DKMTOpenAdapterFromHdc pOpen = nullptr;
  D3DKMTCloseAdapter pClose = nullptr;
  D3DKMTWaitForVerticalBlankEvent pWait = nullptr;
  HINSTANCE hInst = LoadLibraryW(L"gdi32.dll");
 
  if (hInst != nullptr)
  {
    pOpen  = (D3DKMTOpenAdapterFromHdc) GetProcAddress((HMODULE) hInst, "D3DKMTOpenAdapterFromHdc");
    pClose = (D3DKMTCloseAdapter) GetProcAddress((HMODULE) hInst, "D3DKMTCloseAdapter");
    pWait  = (D3DKMTWaitForVerticalBlankEvent) GetProcAddress((HMODULE) hInst, "D3DKMTWaitForVerticalBlankEvent");
  }
 
  // if we don't get bindings to the methods we will fallback
  // to a crummy sleep loop for now.  This is really just a last
  // resort and not expected on modern hardware and Windows OS
  // installs.
  if (!pOpen || !pClose || !pWait)
  {
    while (mVBlankShutdown == false)
    {
      Sleep(rateMS);
      VBlankNotify();
    }
  }
  else
  {
    // we have a good set of functions to call.  We need to keep
    // track of the adapter and reask for it if the device is lost.
    bool adapterIsOpen = false;
    DWORD adapterLastFailTime = 0;
    _D3DKMT_WAITFORVERTICALBLANKEVENT we = { 0 };
 
    while (mVBlankShutdown == false)
    {
      if (!adapterIsOpen)
      {
        // reacquire the adapter (at most once a second).
        if (adapterLastFailTime < ::GetTickCount() - 1000)
        {
          // try to get adapter
          D3DKMT_OPENADAPTERFROMHDC openAdapterData = { 0 };
          HDC hDC = GetDC(mVBlankWindow);
          openAdapterData.hDc = hDC;
          NTSTATUS status = (*pOpen)(&openAdapterData);
          if (status == S_OK)
          {
            // success, setup wait request parameters.
            adapterLastFailTime = 0;
            adapterIsOpen = true;
            we.hAdapter = openAdapterData.hAdapter;
            we.hDevice = 0;
            we.VidPnSourceId = openAdapterData.VidPnSourceId;
          }
          else
          {
            // failed
            adapterLastFailTime = ::GetTickCount();
          }
          DeleteDC(hDC);
        }
      }
 
      if (adapterIsOpen)
      {
        // Finally we can wait on VBlank
        NTSTATUS status = (*pWait)(&we);
        if (status != S_OK)
        {
          // failed, close now and try again on the next pass.
          _D3DKMT_CLOSEADAPTER ca;
          ca.hAdapter = we.hAdapter;
          (*pClose)(&ca);
          adapterIsOpen = false;
        }
      }
 
      // Temporary fallback for lost adapter or failed call.
      if (!adapterIsOpen)
      {
        ::Sleep(rateMS);
      }
 
      // notify logic
      VBlankNotify();
    }
 
    // cleanup adapter before leaving
    if (adapterIsOpen)
    {
      _D3DKMT_CLOSEADAPTER ca;
      ca.hAdapter = we.hAdapter;
      (*pClose)(&ca);
      adapterIsOpen = false;
    }
  }
 
  // release module resource
  if (hInst != nullptr)
  {
    FreeLibrary((HMODULE)hInst);
    hInst = nullptr;
  }
 
  return 0;
}
 
void IGraphicsWin::VBlankNotify()
{
  mVBlankCount++;
  ::PostMessageW(mVBlankWindow, WM_VBLANK, mVBlankCount, 0);
}
 
#ifndef NO_IGRAPHICS
#if defined IGRAPHICS_SKIA
  #include "IGraphicsSkia.cpp"
  #ifdef IGRAPHICS_GL
    #include "glad.c"
  #endif
#elif defined IGRAPHICS_NANOVG
  #include "IGraphicsNanoVG.cpp"
#ifdef IGRAPHICS_FREETYPE
#define FONS_USE_FREETYPE
  #pragma comment(lib, "freetype.lib")
#endif
  #include "nanovg.c"
  #include "glad.c"
#else
  #error
#endif
#endif