//VTK_MODULE_INITに必要
#include <vtkAutoInit.h>

#include <vtkSmartPointer.h>
#include <vtkRenderer.h>
#include <vtkRenderWindow.h>
#include <vtkRenderWindowInteractor.h>

//円筒とその表示に必要
#include <vtkCylinderSource.h>
#include <vtkConeSource.h>
#include <vtkPolyDataMapper.h>
#include <vtkProperty.h>

#pragma comment(lib,"opengl32.lib")
#pragma comment(lib,"psapi.lib")
#pragma comment(lib,"dbghelp.lib")
#pragma comment(lib,"ws2_32.lib")


//必須
VTK_MODULE_INIT(vtkRenderingOpenGL2);
VTK_MODULE_INIT(vtkInteractionStyle);


int main(int /*argc*/, char** /*argv*/)
{

  //////////////////////////////////////
  auto interactor = vtkSmartPointer<vtkRenderWindowInteractor>::New();

  //////////////////////////////////////
  auto renderWindow = vtkSmartPointer<vtkRenderWindow>::New();
  renderWindow->SetInteractor(interactor);
  renderWindow->Render();

  //////////////////////////////////////
  //////////////////////////////////////
  

  auto renderer_1st = vtkSmartPointer<vtkRenderer>::New();
  auto renderer_2nd = vtkSmartPointer<vtkRenderer>::New();

  // レイヤー番号の指定
  // 番号が若いほど背面に描画される
  renderer_1st->SetLayer(0);
  renderer_2nd->SetLayer(1);

  renderWindow->SetNumberOfLayers(2);// レイヤー数を指定しておいたほうが行儀がいいらしい
  renderWindow->AddRenderer(renderer_1st);
  renderWindow->AddRenderer(renderer_2nd);

  renderer_1st->ResetCamera();
  // カメラの共有
  renderer_2nd->SetActiveCamera(renderer_1st->GetActiveCamera());
  

  //////////////////////////////////////
  //////////////////////////////////////

  //////////////////////////////////////

  // レイヤー１にCylinderを表示
  {
    vtkSmartPointer<vtkCylinderSource> cylinderSource = vtkSmartPointer<vtkCylinderSource>::New();
    cylinderSource->SetCenter(0.0, 0.0, 0.0);
    cylinderSource->SetRadius(5.0);
    cylinderSource->SetHeight(7.0);
    cylinderSource->SetResolution(100);

    vtkSmartPointer<vtkPolyDataMapper> mapper = vtkSmartPointer<vtkPolyDataMapper>::New();
    mapper->SetInputConnection(cylinderSource->GetOutputPort());
    vtkSmartPointer<vtkActor> actor = vtkSmartPointer<vtkActor>::New();
    actor->SetMapper(mapper);
    actor->GetProperty()->SetColor(1.0, 0.0, 0.0);

    // レイヤー１にアクタを追加
    renderer_1st->AddActor(actor);
  }
  

  

  //////////////////////////////////////

  // レイヤー２にConeを表示
  {
    vtkSmartPointer<vtkConeSource> coneSource = vtkSmartPointer<vtkConeSource>::New();
    coneSource->SetCenter(0.0, 0.0, 0.0);
    coneSource->SetRadius(5.0);
    coneSource->SetHeight(7.0);
    coneSource->SetResolution(100);

    vtkSmartPointer<vtkPolyDataMapper> mapper = vtkSmartPointer<vtkPolyDataMapper>::New();
    mapper->SetInputConnection(coneSource->GetOutputPort());
    vtkSmartPointer<vtkActor> actor = vtkSmartPointer<vtkActor>::New();
    actor->SetMapper(mapper);
    actor->GetProperty()->SetColor(0.0, 1.0, 0.0);

    // レイヤー２にアクタを追加
    renderer_2nd->AddActor(actor);
  }

  interactor->Start();

  return 0;
}

// Skiaがminmaxを使用するので、Windowsと一緒に使う場合はNOMINMAXを定義
#define NOMINMAX

#include <Windows.h>
#include <tchar.h>

// skia
#include "include/core/SkCanvas.h"
#include "include/core/SkBitmap.h"

// DIB Sectionに設定するピクセルの構造体
struct rgbu_t {
  unsigned char b;
  unsigned char g;
  unsigned char r;
  unsigned char u;// unused
  rgbu_t(unsigned char R, unsigned char G, unsigned char B) :b(B), g(G), r(R) {}
  static const rgbu_t White;
  static const rgbu_t Black;
};

// DIBSectionを作成する関数
void createDIBsection32(
  HBITMAP* hBitmap,
  HDC* hMemDC,
  BITMAPINFO* bmpInfo,
  rgbu_t** m_lpPixel,
  LONG width,
  LONG height)
{
  //DIBの情報を設定する
  bmpInfo->bmiHeader.biSize = sizeof(BITMAPINFOHEADER);
  bmpInfo->bmiHeader.biWidth = width;
  bmpInfo->bmiHeader.biHeight = -height; //-を指定しないと上下逆になる
  bmpInfo->bmiHeader.biPlanes = 1;
  bmpInfo->bmiHeader.biBitCount = 32;
  bmpInfo->bmiHeader.biCompression = BI_RGB;

  HDC hdc = CreateDC(_T("DISPLAY"), 0, 0, 0);

  *hBitmap = CreateDIBSection(hdc, bmpInfo, DIB_RGB_COLORS, (void**)m_lpPixel, NULL, 0);
  *hMemDC = CreateCompatibleDC(hdc);

  DeleteDC(hdc);

  SelectObject(*hMemDC, *hBitmap);

}

// DIBSectionを削除する関数
void deleteDIBsection32(HDC hMemDC, HBITMAP hBitmap) {
  DeleteDC(hMemDC);
  DeleteObject(hBitmap);
}

// DIBSectionの情報
HBITMAP dib_hBitmap;
HDC dib_hMemDC;
BITMAPINFO dib_bmpInfo;
rgbu_t* dib_lpPixel;

LRESULT CALLBACK WndProc(HWND hwnd, UINT msg, WPARAM wp, LPARAM lp) {

  HDC hdc;
  RECT rect;
  static int width;
  static int height;

  static SkBitmap skbitmap;

  switch (msg) {
  case WM_CREATE:

    GetClientRect(hwnd, &rect);
    //DIB Sectionを作成（32Bit)
    createDIBsection32(
      &dib_hBitmap,
      &dib_hMemDC,
      &dib_bmpInfo,
      &dib_lpPixel,
      rect.right,
      rect.bottom
    );
    width = rect.right;
    height = rect.bottom;

    // dib_lpPixel 経由でDIBSectionを赤で塗りつぶす
    for (int y = 0; y < height; y++) {
      for (int x = 0; x < width; x++) {
        dib_lpPixel[y * width + x] = rgbu_t(0, 0, 255);
      }
    }
 

    {
      skbitmap.setInfo(SkImageInfo::MakeN32Premul(width, height));
      // SkiaのBitmapにDIBSectionの情報を設定
      skbitmap.setPixels(dib_lpPixel);
      SkCanvas canvas(skbitmap);

      // 図形の描画
      SkPaint paint;
      paint.setStyle(SkPaint::kStroke_Style);
      paint.setStrokeWidth(5);
      paint.setColor(SK_ColorRED);
      canvas.drawCircle(200, 200, 100, paint);
    }

    break;
  case WM_PAINT:
  {

    // 画像を表示
    PAINTSTRUCT ps;
    HDC hDC = BeginPaint(hwnd, &ps);

    BitBlt(hDC, 0, 0, width, height, dib_hMemDC, 0, 0, SRCCOPY);


    EndPaint(hwnd, &ps);

    break;
  }
  case WM_DESTROY:
    deleteDIBsection32(dib_hMemDC, dib_hBitmap);
    PostQuitMessage(0);
    return 0;
  case WM_LBUTTONDOWN:
    hdc = GetDC(hwnd);
    ReleaseDC(hwnd, hdc);
    return 0;
  }
  return DefWindowProc(hwnd, msg, wp, lp);
}

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,
  PSTR lpCmdLine, int nCmdShow) {
  HWND hwnd;
  WNDCLASS winc;
  MSG msg;

  winc.style = CS_HREDRAW | CS_VREDRAW;
  winc.lpfnWndProc = WndProc;
  winc.cbClsExtra = winc.cbWndExtra = 0;
  winc.hInstance = hInstance;
  winc.hIcon = LoadIcon(NULL, IDI_APPLICATION);
  winc.hCursor = LoadCursor(NULL, IDC_ARROW);
  winc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
  winc.lpszMenuName = NULL;
  winc.lpszClassName = TEXT("SZL_WINDOW");

  if (!RegisterClass(&winc)) return 0;

  hwnd = CreateWindow(
    TEXT("SZL_WINDOW"), TEXT("szl window"),
    WS_OVERLAPPEDWINDOW | WS_VISIBLE,
    CW_USEDEFAULT, CW_USEDEFAULT,
    600, 400,
    NULL, NULL,
    hInstance, NULL
  );

  if (hwnd == NULL) return 0;

  while (GetMessage(&msg, NULL, 0, 0)) DispatchMessage(&msg);
  return msg.wParam;
}

#include "include/core/SkCanvas.h"
#include "include/core/SkBitmap.h"
#include "include/core/SkImage.h"

// Png保存に必要
#include "include/encode/SkPngEncoder.h"
#include "include/core/SkStream.h"

// テキスト描画
#include "include/core/SkTypeface.h"
#include "include/core/SkFont.h"
#include "include/core/SkFontMgr.h"
#include "include/ports/SkFontMgr_directory.h" // フォントマネージャ作成
#include "include/core/SkFontMetrics.h"

/////////////////////////////////////

// フォント一覧表示
void disp_fonts(sk_sp<SkFontMgr> fmng) {
  int ffcount = fmng->countFamilies();

  for (int ffi = 0; ffi < ffcount; ffi++) {
    sk_sp<SkFontStyleSet> typeface = fmng->createStyleSet(ffi);

    for (int ftf = 0; ftf < typeface->count(); ftf++) {

      sk_sp<SkTypeface> face = typeface->createTypeface(ftf);

      SkString familyName;
      face->getFamilyName(&familyName);
      printf("%3d %3d : %-30s %s %s \n",
        ffi, ftf,
        familyName.c_str(),
        face->isBold() ? "Bold" : "  ",     // Boldに対応している場合に表示
        face->isItalic() ? "Italic" : "    "// Italicに対応している場合に表示
      );

    }
  }
}

// テキスト描画のテスト
void TextTest() {

  // フォントマネージャ作成
  sk_sp<SkFontMgr> fontMgr = SkFontMgr_New_Custom_Directory("C:\\Windows\\Fonts\\"); // フォントが格納されているディレクトリ指定

  disp_fonts(fontMgr);

}

#include "include/core/SkCanvas.h"
#include "include/core/SkBitmap.h"
#include "include/core/SkImage.h"

// Png保存に必要
#include "include/encode/SkPngEncoder.h"
#include "include/core/SkStream.h"

// テキスト描画
#include "include/core/SkTypeface.h"
#include "include/core/SkFont.h"
#include "include/core/SkFontMgr.h"
#include "include/ports/SkFontMgr_directory.h" // フォントマネージャ作成
#include "include/core/SkFontMetrics.h"

/////////////////////////////////////


void save(const SkBitmap& bitmap, const char* filename);
 

// 文字列のバウンディングボックスを描画
void RenderBounding(SkScalar x, SkScalar y, SkString text,SkFont* font,SkCanvas* canvas, SkPaint* paint) {

    // バウンディングボックスを取得
    SkRect bounds;
    font->measureText(
        text.c_str(),
        strlen(text.c_str()),
        SkTextEncoding::kUTF8, 
        &bounds,
        paint
    );

    // バウンディングボックスをオフセットして描画位置を調整
    bounds.offset(x, y);

    // バウンディングボックスの描画
    paint->setStyle(SkPaint::kStroke_Style);
    canvas->drawRect(bounds, *paint);
    paint->setStyle(SkPaint::kFill_Style);
}

// テキスト描画のテスト
void TextTest() {
 
    // フォントマネージャ作成
    sk_sp<SkFontMgr> fontMgr = SkFontMgr_New_Custom_Directory("C:\\Windows\\Fonts\\"); // フォントが格納されているディレクトリ指定

    // フォント一覧作成
    sk_sp<SkTypeface> typeface[4] = {
        fontMgr->matchFamilyStyle("Amiri", SkFontStyle::Normal()     ),
        fontMgr->matchFamilyStyle("Amiri", SkFontStyle::Italic()     ),
        fontMgr->matchFamilyStyle("Amiri", SkFontStyle::Bold()       ),
        fontMgr->matchFamilyStyle("Amiri", SkFontStyle::BoldItalic() )
    };

    // 画像作成
    SkBitmap bmp;
    bmp.allocN32Pixels(600, 200);
    bmp.eraseColor(SK_ColorGRAY);

    // テキストの描画
    SkPaint paint;
    paint.setColor(SK_ColorBLACK); // テキストの色
    paint.setAntiAlias(false); // アンチエイリアスを有効にする

    SkCanvas* canvas = new SkCanvas(bmp);

    // フォントの設定
    SkFont font;
    font.setEdging(SkFont::Edging::kAntiAlias); // エッジングの設定
    font.setSize(50.f * 72 / 96); // テキストのサイズ。setSizeがポイントを受け取るのでピクセルから変換

    SkScalar x = 30.f; // テキストの位置（横）を設定
    SkScalar y = 0; // テキストの位置（縦）を設定

    SkFontMetrics metrics;
    for (auto face = std::begin(typeface); face != std::end(typeface); ++face) {

        font.setTypeface(*face); // フォントの設定

        font.getMetrics(&metrics);

        y -= metrics.fAscent;// テキストの位置（高さ）を設定

        SkString text;
        (*face)->getFamilyName(&text); // フォントファミリー名を取得

        RenderBounding(x, y, text, &font, canvas, &paint); // バウンディングボックスの描画
        canvas->drawString(text, x, y, font, paint);       // テキストの描画

    }
    //////////////////////////////////////////////////
    // ファイルに保存
    save(bmp, "test.png");
}

// 作成した画像を出力
void save(const SkBitmap& bitmap, const char* filename) {

    // optionsの設定
    SkPngEncoder::Options options;
    options.fZLibLevel = 9; // 圧縮レベル
    options.fFilterFlags = SkPngEncoder::FilterFlag::kAll; // フィルタの種類


    SkImageInfo info = bitmap.info();
    unsigned char* pixels = (unsigned char*)bitmap.getPixels(); // 画像データの先頭アドレス
    size_t rowBytes = bitmap.rowBytes(); // 1行のバイト数

    // bitmapをファイル保存
    SkPixmap pixmap(info, pixels, rowBytes);
    SkFILEWStream stream(filename);
    SkPngEncoder::Encode(&stream, pixmap, options);
}