#include <windows.h>

#include <unicode/ucnv.h>
#include <unicode/brkiter.h>

// 要リンク
#pragma comment(lib, "icuuc.lib")

// 以下のdllを要求される
// icudt69.dll
// icuuc69.dll

LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
WCHAR szClassName[] = L"MY_ICU_TEST";  //ウィンドウクラス

LPCWSTR fontname = L"MS P ゴシック";

HFONT hFont1;

void WinPaint(HWND hWnd) {

  // 元の文字列の定義
  std::u16string u16s = u"aあغ山👨‍👧經经";

  /////////////////////////////
  // ICUの設定

  icu::UnicodeString usr(u16s.c_str());

  UErrorCode err;
  icu::BreakIterator* bi = icu::BreakIterator::createCharacterInstance(
    icu::Locale::getDefault(),err);
  bi->setText(usr);

  ////////////////////////////
  //フォトの設定
  HDC hdc;
  PAINTSTRUCT ps;
  hdc = BeginPaint(hWnd, &ps);
  SetTextColor(hdc, RGB(0, 0, 0));  //文字の色を設定
  SetBkColor(hdc, RGB(230, 230, 230));  //文字の背景色を設定
  HFONT backup = (HFONT)SelectObject(hdc, hFont1);  //フォントを適応
  TEXTMETRIC tm;
  GetTextMetrics(hdc, &tm);
  int TH = 10;

  ////////////////////////////
  //文字を一文字（書記素）ずつ表示

  int32_t current = bi->first();
  while (current != icu::BreakIterator::DONE) {

    // 文字の長さを知る必要があるので、
    // 「現在の文字の位置」と「前の文字の位置」が必要
    int32_t prev = current;
    current = bi->next();

    if (current == UBRK_DONE) {
      break;
    }

    int32_t count = current - prev;//文字の長さ

    //win32api のWCHARはutf16なのでただキャストするだけで変換できる
    TextOutW(hdc, 10, TH, (WCHAR*)(&u16s.data()[prev]), count);//文字を書く

    // こっちでもいい substr(現在位置,切り取る長さ)
    // std::u16string sub = u16s.substr(prev, count);
    // TextOutW(hdc, 10, TH, (WCHAR*)sub.data(), count);//文字を書く

    //改行
    TH += tm.tmHeight+5;
  }

  SelectObject(hdc, backup);

  EndPaint(hWnd, &ps);
}

////////////////////////////////////
////////////////////////////////////
// 表示用
////////////////////////////////////
////////////////////////////////////


int WINAPI WinMain(HINSTANCE hCurInst, HINSTANCE hPrevInst, LPSTR lpsCmdLine, int nCmdShow) {
  MSG msg;
  BOOL bRet;
  WNDCLASSEX wc;
  HWND hWnd;
  ATOM atom;

  wc.cbSize = sizeof(WNDCLASSEX);
  wc.style = CS_HREDRAW | CS_VREDRAW;
  wc.lpfnWndProc = WndProc;
  wc.cbClsExtra = 0;
  wc.cbWndExtra = 0;
  wc.hInstance = hCurInst;
  wc.hIcon = (HICON)LoadImage(NULL, MAKEINTRESOURCE(IDI_APPLICATION), IMAGE_ICON, 0, 0, LR_DEFAULTSIZE | LR_SHARED);
  wc.hCursor = (HCURSOR)LoadImage(NULL, MAKEINTRESOURCE(IDC_ARROW), IMAGE_CURSOR, 0, 0, LR_DEFAULTSIZE | LR_SHARED);
  wc.hbrBackground = (HBRUSH)GetStockObject(WHITE_BRUSH);
  wc.lpszMenuName = NULL;
  wc.lpszClassName = (LPCWSTR)szClassName;
  wc.hIconSm = (HICON)LoadImage(NULL, MAKEINTRESOURCE(IDI_APPLICATION), IMAGE_ICON, 0, 0, LR_DEFAULTSIZE | LR_SHARED);

  if ((atom = RegisterClassEx(&wc)) == 0)return FALSE;

  hWnd = CreateWindow(
    MAKEINTATOM(atom), 
    L"icu test", 
    WS_OVERLAPPEDWINDOW, 
    CW_USEDEFAULT, CW_USEDEFAULT, 
    200, 500, // ウィンドウのサイズ
    NULL, NULL, hCurInst, NULL);

  if (!hWnd)return FALSE;

  ShowWindow(hWnd, nCmdShow);
  UpdateWindow(hWnd);
  while ((bRet = GetMessage(&msg, NULL, 0, 0)) != 0) {
    if (bRet == -1) {
      break;
    }
    else {
      TranslateMessage(&msg);
      DispatchMessage(&msg);
    }
  }
  return (int)msg.wParam;
}

LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wp, LPARAM lp) {
  switch (msg) {
  case WM_CREATE:
    //Step1  フォント作成
    hFont1 = CreateFont(
      50, 0, //高さ, 幅
      0, 0, FW_BOLD,
      FALSE, FALSE, FALSE,
      SHIFTJIS_CHARSET, OUT_DEFAULT_PRECIS,
      CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY,
      VARIABLE_PITCH | FF_ROMAN, fontname);
    break;
  case WM_PAINT:
    WinPaint(hWnd);
    break;
  case WM_DESTROY:
    DeleteObject(hFont1);   //Step4. HFONTオブジェクトを破棄
    PostQuitMessage(0);
    break;
  default:
    return (DefWindowProc(hWnd, msg, wp, lp));
  }
  return 0;
}

void test() {

  icu::UnicodeString us(u"いろはにほへと");

  const char* code_page = "Shift_JIS"; // コードページ。他にどんな物があるか。

  char dst_data[100];
  int32_t len = us.extract(0, us.length(), dst_data, code_page);

  printf("%s (%d) \n",dst_data,len);

}

  auto name_enum = ucnv_openAllNames(&err);

  int32_t len;
  const char* name;

  while (name = uenum_next(name_enum, &len, &err)) {
    printf("%s\n", name);
  }
  uenum_close(name_enum);

  int32_t convcount = ucnv_countAvailable();
  for (int32_t i = 0; i < convcount; i++) {
    printf("[%03d] %s\n",i, ucnv_getAvailableName(i));
  }

int main()
{
  UErrorCode err;

  const char* ALIAS = "Shift_JIS";   // 日本語のコードページ


  // ALIAS で表されるコードページの別名一覧を表示
  uint16_t acount = ucnv_countAliases(ALIAS, &err);
  for (auto i = 0; i < acount; i++) {
    const char* code_page_arias = ucnv_getAlias(ALIAS, i, &err);

    printf("-- %s\n", code_page_arias);

  }
  
  getchar();
}

#include <fstream>
#include <iostream>

#include <unicode/ucnv.h>
#include <unicode/unistr.h>
#pragma comment(lib, "icuuc.lib")

// 以下のdllを要求される
// icudt69.dll
// icuuc69.dll

void Converter(const icu::UnicodeString& us,const char* dstCode) {


  //内部形式の文字コードを目的の文字コードへ変換
  char dst_data[100];
  int32_t len = us.extract(0, us.length(), dst_data, dstCode);

  printf("length: %d\n", len);

  std::string textname = "C:\\dev\\icu-test\\converted-";
  textname += dstCode;
  textname += ".txt";
  ///////////////////////////////
  // 文字コード変換した内容をファイル出力
  std::fstream w(
    textname,
    std::ios::out | std::ios::binary | std::ios::trunc);

  w << dst_data;

}

int main()
{
  UErrorCode err;

  const char* ALIAS = "Shift_JIS";   // 日本語のコードページ

  //std::u16string src_data = u"いろはにほへと";       // 日本語

  // NEC拡張文字
  // ①②㌍
  // IBM拡張文字
  // 髙ⅱⅲ㈱
  std::u16string jps = u"①②㌍髙ⅱⅲ㈱";

  // ICUの内部表現へ変更
  icu::UnicodeString ustr(jps.c_str());

  Converter(ustr, "Shift_JIS");// コードページを指定して変換
  Converter(ustr, "CP932");


  
  getchar();
}

int main()
{
  UErrorCode err;

  const char* ALIAS = "EUC-CN";      // 中国語のコードページ
  std::u16string src_data = u"什么";  // 中国語

  icu::UnicodeString ustr(src_data.c_str());

  Converter(ustr, ALIAS);
  
  getchar();
}

int main()
{
  UErrorCode err;

  const char* ALIAS = "ibm737";     // ギリシャ語のコードページ
  std::u16string src_data = u"πανσέληνος"; // ギリシャ語

  icu::UnicodeString ustr(src_data.c_str());

  Converter(ustr, ALIAS);

  getchar();
}

#include <fstream>


#include <unicode/ucnv.h>

// icu::UnicodeString に必要
#include <unicode/unistr.h>

// 要リンク
#pragma comment(lib, "icuuc.lib")

// 以下のdllを要求される
// icudt69.dll
// icuuc69.dll

void Converter() {

  std::fstream r("C:\\dev\\icu-test\\shiftjis.txt");
  std::string src_data;
  r >> src_data;
  //エラーを受け取る変数
  UErrorCode err = U_ZERO_ERROR;

  //入力・出力の各文字コード
  char srcCode[] = "shift-jis";
  char dstCode[] = "euc-jp";

  //UnicodeStringに渡す文字列の文字コードを指定する
  UConverter* srccnv = ucnv_open(srcCode, &err);

  //入力された文字の文字コードを内部形式に変換
  icu::UnicodeString srcstr(src_data.c_str(), src_data.length(), srccnv, err);

  //内部形式の文字コードを目的の文字コードへ変換
  char* dst_data = new char[100];
  srcstr.extract(0, srcstr.length(), dst_data, dstCode);
  using namespace std;
  std::fstream w("C:\\dev\\icu-test\\euc-jp.txt", ios::out | ios::binary | ios::trunc);
  w << dst_data;
}

int main()
{
  Converter();
}

; 画像をPNG保存する自作関数。
; Image 画像番号
; Drawable レイヤー番号
; outpath 保存先（ファイル名を含まない）
; filename ファイル名（.pngを含まない）
(define (my-save-to-png Image Drawable outpath filename)
  ; 保存処理
  (file-png-save-defaults
    RUN-NONINTERACTIVE
    Image
    Drawable
    (string-append outpath filename ".png")
    (string-append filename ".png") 
  )
)

; 全てのレイヤーを統合してpngにエクスポート
; Image 画像番号 (gimp-image-list) で取得可能
; outpath 出力先のパス。C:\\test\\
(define (my-save-png-as-single-image Image outpath )
  (begin
  
    ; 現在の画像をコピーする
    (define dummydup   '())
    (set! dummydup   (car (gimp-image-duplicate Image ) ) )
    
    ; コピーした画像の全レイヤーをマージして一つの画像にする
    (gimp-image-merge-visible-layers dummydup CLIP-TO-IMAGE )
    
    ; 保存に必要な、dummydupのdrawableを取得する
    (define activedrawable   '())
    (set! activedrawable (car (gimp-image-get-active-drawable dummydup ) ) )
    
    (my-save-to-png
      dummydup
      activedrawable
      outpath
      (car (gimp-image-get-name Image) ); 画像の名前を取得してファイル名に指定
    )
    
    (gimp-image-delete dummydup)
    
  )
)