テキストファイルをHTMLのpreタグに対応した書式に変換するプログラム

icon 項目のみ表示/展開表示の切り替え

概要

 S-JISのテキストファイルをHTMLのpreタグに対応した書式に変換しUTF-8で保存します。
 テキストファイルは本プログラムにファイルをドラックドロップして指定します。
 ドラッグドロップ後にOKボタンをクリックすると変換されます。
 複数ファイルの同時変換に対応します。変換後のファイルは元のファイルと同じフォルダーに保存され、ファイル名に_utf8が付加され作成されます。拡張子はtxtとなります。したがって、複数のファイルで拡張子が異なってファイル名が同じ場合、区別がつかなくなります。
元のファイルは変更されません。
 本プログラムはVistaからサポートしている高DPIに対応するため複雑ことを行っています。
 マニフェストでの高DPIの宣言は不要です。

変更履歴

2014.04.24 初版
2014.05.07 exeファイル実行前にドラッグ&ドロップした場合のファイル名にダブルコーテーションが付加される場合に対応
2018.11.10 高DPI設定に対応。

テスト環境

コンパイラ

Visual C++ 2008/2013 Express 32/64bit UNICODE

動作確認

Windows 7
Windows 8.1
Windows 10 Version 1803

動作例

変換元ファイル(src.cpp)S-JIS

#include <windows.h>

本プログラムを起動した状態

高DPIに対応

高DPIに対応しない場合

変換後ファイル(src_utf8.cpp)UTF8

#include &lt;windows.h&gt;

プログラムソースの概要

gpretxt.cpp

_tWinMain

 _tWinMain関数よりダイアログボックスを表示します。
 高DPIに対応するために以下の処理をしています。
SetThreadDpiAwarenessContext
 Windows 10 Version 1703より古い場合、プログラムの初期時にSetThreadDpiAwarenessContext APIが存在するかチェックし存在する場合、Windows10のバージョンをチェックします。
 バージョンが1607の場合は、非クライアント領域の大きさを変更させるためWM_NCCREATEメッセージ発生時にEnableNonClientDpiScalingを呼び出します。
 バージョンが1703以降の場合は、SetThreadDpiAwarenessContext APIでDPI_AWARENESS_PER_MONITOR_AWARE_V2を指定することにより Windowsに非クライアント領域の大きさの変更を自動にさせます。
SetProcessDPIAware
 SetThreadDpiAwarenessContext APIが使えない場合、SetProcessDPIAware API(Windows Vista以降)が使えるか確認します。
 事前にSetProcessDPIAware API(Windows Vista以降)を実行するとプログラム自身がスケーリング処理をすることになり正常なDPI値が返されます。実行しない場合、常に96DPIが返されます。Windows XPではこのAPIは存在しないので96DPIと仮定します。なおAPIが存在するかどうかは動的にライブラリをロードし関数のエントリポイントが存在するかどうかで判断しています。
 DPIはGetDpiForMonitor API(Windows 8.1以降)が使える場合はこの関数でウィンドウが属するモニターのDPIを、使えない場合GetDeviceCaps(hdc,LOGPIXELSX)によりディスクトップのDPIを取得します。
SetThreadDpiAwarenessContextを適用しない場合(Windows 7)

SetThreadDpiAwarenessContextを適用した場合(Windows 7)

DlgProc1

WM_INITDIALOG
 ダイアログの初期化時に呼び出されます。
 以下の処理はWindows 10 Version 1703以降では実行しません。
  1. ダイアログボックスの座標単位とスクリーン座標の変換に必要な定数をGetActualDialogBaseUnitsで取得
  2. scaleChange関数でダイアログボックス内の各コントロールの大きさ等を変更
 DragAcceptFiles APIを読み出すことによりファイルのドラッグ&ドラッグの受付を許可します。
 本プログラム起動時に引数があった場合は、リストボックスにその内容を設定します。
WM_DROPFILES
 ファイルがドラッグ&ドラッグされるとDlgProc1関数にWM_DROPFILESメッセージが発生するので、DragQueryFile関数で最初にファイルの個数を取得し、次にファイル名を取得します。
 取得されたファイル名は、リストボックスに登録します。
WM_DPICHANGED
 引数から現DPIを取得しscaleChange関数でダイアログボックス内の各コントロールの大きさ等を変更します。Windows 10 Version 1703以降では何もせずにWindowsに制御を渡します。
WM_NCCREATE
 Wndows10(Version1607)の時だけ非クライアント領域の処理するためEnableNonClientDpiScaling関数を呼び出します
WM_COMMAND
ボタンがクリックされると、DlgProc1関数にWM_COMMANDメッセージが発生するので、OKボタンのメッセージの場合、リストボックスの内容を取得し変換元のファイル名とします。
変換後のファイル名は、PathRemoveExtension APIでファイル名から拡張子を取り除き、代わりに_utf8.txtを付加してファイル名とします。
変換前、変換後のファイル名が取得できたなら、pretxt関数でpreタグに対応した書式に変換します。

pretxt

fgets関数でファイルを呼び出し、MultiByteToWideChar関数でS-JISをUTF16に変換します。
文字列をpreタグに対応した書式に変換します。
_fputtsでUTF16の文字列を出力すると、_tfopen_sを呼び出すときにエンコードをUTF-8で指定しているので、UTF-8に変換されてファイルに書き込まれます。

scaleChange

 現在のフォントを取得しスケールに応じたフォントを新規に作成し設定します。
 スケールからダイアログボックスの大きさを計算し、AdjustWindowRectによりクライアントサイズから必要なウィンドウサイズを計算しSetWindowPosによりダイアログボックスの大きさを変更します。
 各コントロールウィンドウをEnumChildWindowsで列挙します。

EnumWndProc

 EnumChildWindowsから呼び出されるEnumWndProc関数によりスケールに応じた位置、サイズ、文字サイズを設定します。
 スケールからコントロールの大きさを計算し、AdjustWindowRectによりクライアントサイズから必要なウィンドウサイズを計算しSetWindowPosによりダイアログボックスの大きさを変更します。
 コントロールのフォントをWM_SETTEXTメッセージにより変更します。

GetActualDialogBaseUnits

 ダイアログボックス座標の計算に必要な単位を取得します。
 YogaPro3では横が13、縦が31ピクセルが取得されました。

win10ver2

 Windows 10のバージョンを取得する関数です。
 詳細は、Windows 10のバージョン番号をRtlGetVersionのビルド番号から取得するを参照してください。

ソースコード

gpretxt.cpp

// SHIFT-JISファイルをpreタグに対応したUTF-8テキストファイルに変換
// ファイルの指定はドラッグ&ドラッグによる
// VC2008/VC2013 Express  32/64bit Unicode

#include <windows.h>
#include <commctrl.h> 
#include <stdio.h>
#include <tchar.h>
#include <shlobj.h>
#include <shlwapi.h>
#include "resource.h"

#pragma comment(lib,"shlwapi.lib")

#define WM_DPICHANGED                   0x02E0
typedef enum MONITOR_DPI_TYPE {
	MDT_EFFECTIVE_DPI = 0,
	MDT_ANGULAR_DPI = 1,
	MDT_RAW_DPI = 2,
	MDT_DEFAULT = MDT_EFFECTIVE_DPI
} MONITOR_DPI_TYPE;


#ifndef _DPI_AWARENESS_CONTEXTS_
DECLARE_HANDLE(DPI_AWARENESS_CONTEXT);
#endif
typedef HRESULT(_stdcall *GetDpiForMonitorFunc)(HMONITOR, MONITOR_DPI_TYPE, UINT *, UINT *);
typedef HRESULT(_stdcall* EnableNonClientDpiScalingFunc)(HWND);
typedef HRESULT(_stdcall* SetThreadDpiAwarenessContextFunc)(DPI_AWARENESS_CONTEXT);
typedef BOOL(_stdcall *SetProcessDPIAwareFunc)(VOID);

HMODULE hModUser32 = 0;
SetThreadDpiAwarenessContextFunc ThreadAwareFunc = 0;
static EnableNonClientDpiScalingFunc NCCfunc = 0;


#ifndef _DPI_AWARENESS_CONTEXTS_

typedef enum _DPI_AWARENESS {
	DPI_AWARENESS_INVALID = -1,
	DPI_AWARENESS_UNAWARE = 0,
	DPI_AWARENESS_SYSTEM_AWARE = 1,
	DPI_AWARENESS_PER_MONITOR_AWARE = 2
} DPI_AWARENESS;

#define DPI_AWARENESS_CONTEXT_UNAWARE              ((DPI_AWARENESS_CONTEXT)-1)
#define DPI_AWARENESS_CONTEXT_SYSTEM_AWARE         ((DPI_AWARENESS_CONTEXT)-2)
#define DPI_AWARENESS_CONTEXT_PER_MONITOR_AWARE    ((DPI_AWARENESS_CONTEXT)-3)
#define DPI_AWARENESS_CONTEXT_PER_MONITOR_AWARE_V2 ((DPI_AWARENESS_CONTEXT)-4)
#define DPI_AWARENESS_CONTEXT_UNAWARE_GDISCALED    ((DPI_AWARENESS_CONTEXT)-5)

#endif

#define BUF_MAX 1024


int pretxt(TCHAR* dtc_file,TCHAR* src_file);

LRESULT CALLBACK DlgProc1(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam);

TCHAR* file=0;
int win10ver2(void);
int WIN10VER;

int WINAPI _tWinMain(HINSTANCE hInstance, HINSTANCE hPreInst,TCHAR* lpszCmdLine, int nCmdShow){
	TCHAR f[MAX_PATH];
	if(lpszCmdLine[0]){
		if(lpszCmdLine[0]==_T('¥"')){
			_tcscpy_s(f,sizeof(f)/sizeof(TCHAR),lpszCmdLine+1);
			f[ _tcslen(f) -1]=_T('¥0');
			file=f;
		}else
			file=lpszCmdLine;
	}
	WIN10VER = win10ver2();
	hModUser32 = LoadLibrary(L"User32.dll");
	if (hModUser32){
		NCCfunc = (EnableNonClientDpiScalingFunc)GetProcAddress(hModUser32, "EnableNonClientDpiScaling");
		if (WIN10VER == 1607)	//	AnniversaryUpdate
			NCCfunc = (EnableNonClientDpiScalingFunc)GetProcAddress(hModUser32, "EnableNonClientDpiScaling");
		else
			NCCfunc = 0;
		if (ThreadAwareFunc){
			if (WIN10VER<1703)
				(*ThreadAwareFunc)(DPI_AWARENESS_CONTEXT_PER_MONITOR_AWARE);
			if (1703 <= WIN10VER && WIN10VER<1809)
				(*ThreadAwareFunc)(DPI_AWARENESS_CONTEXT_PER_MONITOR_AWARE_V2);
			if (1809 <= WIN10VER)
				(*ThreadAwareFunc)(DPI_AWARENESS_CONTEXT_UNAWARE_GDISCALED);
		}
		else{	//	Windows Vista以降
			SetProcessDPIAwareFunc ProcessAwareFunc = (SetProcessDPIAwareFunc)GetProcAddress(hModUser32, "SetProcessDPIAware");
			if (ProcessAwareFunc)
				(*ProcessAwareFunc)();
		}


	}
	DialogBox(hInstance, TEXT("DLG1"), 0, (DLGPROC)DlgProc1);
	if (hModUser32)
		FreeLibrary(hModUser32);
	return 0;
}
BOOL GetActualDialogBaseUnits(HWND hDialog, SIZE *baseUnit){
	RECT rect;
	BOOL result;

	rect.left = 4;
	rect.top = 8;
	if (result = MapDialogRect(hDialog, &rect)) {
		baseUnit->cx = rect.left;
		baseUnit->cy = rect.top;
	}
	return result;
}

struct DLG_CHILD_SCALE{
	HWND hDlg;
	SIZE unit;
	UINT oldScale;
	UINT newScale;
	HFONT hFont;
};
//	各ウィンドウ(コントロールの移動及び大きさの変更
BOOL CALLBACK EnumWndProc(HWND hWnd, LPARAM lParam){
	POINT pt;
	DLG_CHILD_SCALE* d = (DLG_CHILD_SCALE*)lParam;
	pt.x = 0;
	pt.y = 0;
	ClientToScreen(hWnd, &pt);
	ScreenToClient(d->hDlg, &pt);
	RECT rc;
	GetClientRect(hWnd, &rc);
	int cx, cy, w, h;
	cx = MulDiv(pt.x, 4, d->unit.cx);
	cy = MulDiv(pt.y, 8, d->unit.cy);

	cx = MulDiv(cx, d->newScale, d->oldScale);
	cy = MulDiv(cy, d->newScale, d->oldScale);

	cx = MulDiv(cx, d->unit.cx, 4);
	cy = MulDiv(cy, d->unit.cy, 8);

	w = MulDiv(rc.right, d->newScale, d->oldScale);
	h = MulDiv(rc.bottom, d->newScale, d->oldScale);

	rc.left = cx;
	rc.top = cy;
	rc.right = cx + w;
	rc.bottom = cy + h;
	LONG style = GetWindowLong(hWnd, GWL_STYLE);
	LONG exStyle = GetWindowLong(hWnd, GWL_EXSTYLE);
	AdjustWindowRectEx(&rc, style, FALSE, exStyle);
	SetWindowPos(hWnd, NULL, rc.left, rc.top, rc.right - rc.left, rc.bottom - rc.top, SWP_NOZORDER);
	SendMessage(hWnd, WM_SETFONT, (WPARAM)d->hFont, MAKELPARAM(TRUE, 0));
	UpdateWindow(hWnd);
	return TRUE;
}
//	DPIスケールの変更
HFONT scaleChange(HWND hDlg, int nowScale, int oldScale, SIZE& baseUnit, HFONT hFont){
	LOGFONT lf;
	HDC hdc = GetDC(GetDlgItem(hDlg, IDC_LISTBOX1));
	HFONT hfont9 = (HFONT)SendMessage(GetDlgItem(hDlg, IDOK), WM_GETFONT, 0, 0);
	GetObject(hfont9, sizeof(LOGFONT), &lf);
	int height;
	height = lf.lfHeight * 100 / oldScale;
	lf.lfHeight = (height)*nowScale;
	lf.lfHeight /= 100;
	HFONT hFont2 = CreateFontIndirect(&lf);
	LOGFONT lfont;
	HFONT hFontOld = (HFONT)SelectObject(hdc, hFont2);

	TEXTMETRIC metrics;
	GetTextMetrics(hdc, &metrics);
	SelectObject(hdc, hFontOld);

	HFONT htemp = (HFONT)SendMessage(hDlg, WM_GETFONT, 0, 0);
	GetObject(htemp, sizeof(LOGFONT), &lfont);
	ReleaseDC(hDlg, hdc);

	RECT rc;
	GetClientRect(hDlg, &rc);
	int w = rc.right - rc.left;
	int h = rc.bottom - rc.top;
	w = MulDiv(w, nowScale, oldScale);
	h = MulDiv(h, nowScale, oldScale);

	rc.left = 0;
	rc.top = 0;
	rc.right = w;
	rc.bottom = h;

	LONG style = GetWindowLong(hDlg, GWL_STYLE);
	AdjustWindowRectEx(&rc, style, FALSE, 0);

	DLG_CHILD_SCALE d;
	d.hDlg = hDlg;
	d.hFont = hFont2;
	d.newScale = nowScale;
	d.oldScale = oldScale;
	d.unit = baseUnit;

	InvalidateRect(hDlg, NULL, FALSE);
	UpdateWindow(hDlg);
	if (hFont)
		DeleteObject(hFont);
	return hFont = hFont2;
}

//	ダイアログボックスのプロシージャー

LRESULT CALLBACK DlgProc1(HWND hDlg, UINT msg, WPARAM wParam, LPARAM lParam){
	TCHAR buf[MAX_PATH];
	HDROP hDrop;
	UINT fmax;
	int	i;
	static HFONT hFont = 0;
	static int nowDPIx = 96;
	static int nowDPIy = 96;
	static UINT nowScale = 100;
	static UINT initScale = 100;
	static int height;
	static HMODULE hMod;
	static GetDpiForMonitorFunc func = 0;
	static SIZE baseUnit;
	switch (msg) {
		case WM_INITDIALOG:{
			DragAcceptFiles(hDlg, TRUE);
			if (file)
				SendMessage(GetDlgItem(hDlg, IDC_LISTBOX1), LB_ADDSTRING, 0, (LPARAM)file);
			HMONITOR hMonitor = MonitorFromWindow(hDlg, MONITOR_DEFAULTTONULL);
			hMod = LoadLibrary(L"Shcore.dll");

			func = (GetDpiForMonitorFunc)GetProcAddress(hMod, "GetDpiForMonitor");
			if (func == 0)
				FreeLibrary(hMod);
			if (WIN10VER < 1703){
				UINT hDPI, vDPI;
				if (func)
					(*func)(hMonitor, MDT_EFFECTIVE_DPI, &hDPI, &vDPI);
				else{
					HDC hdc = GetDC(NULL);	//	ディスクトップ
					hDPI = GetDeviceCaps(hdc, LOGPIXELSX);
					vDPI = GetDeviceCaps(hdc, LOGPIXELSY);
				}
				nowDPIx = hDPI;
				nowDPIy = vDPI;
				nowScale = MulDiv(nowDPIx, 100, 96);
				GetActualDialogBaseUnits(hDlg, &baseUnit);
				UINT oldScale = nowScale;
				hFont = scaleChange(hDlg, nowScale, oldScale, baseUnit, hFont);
			}
			return TRUE;
		}
		case WM_DPICHANGED:{
			if (WIN10VER < 1703){
			   UINT oldScale = nowScale;
			   nowDPIx = LOWORD(wParam);
			   nowDPIy = HIWORD(wParam);
			   nowScale = MulDiv(nowDPIx, 100, 96);
			   hFont = scaleChange(hDlg, nowScale, oldScale, baseUnit, hFont);
			}
			break;
		}
		case WM_NCCREATE:{
			if (NCCfunc)
				(*NCCfunc)(hDlg);
			return FALSE;
		}
		case WM_DROPFILES:
			hDrop = (HDROP)wParam;
			fmax = DragQueryFile((HDROP)wParam, 0xFFFFFFFF, NULL, 0);
			for(i = 0; i < (int)fmax; i++) {
				DragQueryFile(hDrop, i, buf, sizeof(buf)/sizeof(TCHAR));
				SendMessage(GetDlgItem(hDlg,IDC_LISTBOX1) , LB_ADDSTRING , 0 , (LPARAM)buf);
			}
			DragFinish(hDrop);
			break;
		case WM_COMMAND:
			switch (LOWORD(wParam)) {
				case IDOK:
					fmax=(UINT)SendMessage(GetDlgItem(hDlg,IDC_LISTBOX1) ,LB_GETCOUNT,0,0);
					for(i = 0; i < (int)fmax; i++){
						SendMessage(GetDlgItem(hDlg,IDC_LISTBOX1) ,LB_GETTEXT,i,(LPARAM)buf);
						TCHAR dtc_file[MAX_PATH];
						_tcscpy_s(dtc_file,sizeof(dtc_file)/sizeof(TCHAR),buf);
						TCHAR ext[MAX_PATH];
						TCHAR* p=PathFindExtension(dtc_file);	//	拡張子を取得
						if (p==NULL){
							_tcscpy_s(ext, sizeof(ext) / sizeof(TCHAR), _TEXT("non"));
						}else{
							_tcscpy_s(ext, sizeof(ext) / sizeof(TCHAR), p);
						}
						PathRemoveExtension(dtc_file);	//拡張子を取り除く
						_tcscat_s(dtc_file, sizeof(dtc_file) / sizeof(TCHAR), _TEXT(" "));
						_tcscat_s(dtc_file, sizeof(dtc_file) / sizeof(TCHAR), ext);
						_tcscat_s(dtc_file, sizeof(dtc_file) / sizeof(TCHAR), _TEXT("_utf8.txt"));
						pretxt(dtc_file,buf);
					}
					EndDialog(hDlg, TRUE);
					return TRUE;
				case IDCANCEL:
					EndDialog(hDlg,FALSE);
					return FALSE;
				default:
					return FALSE;
			}
			default:
				return FALSE;
	}
	return TRUE;
}

//	src_fileで示されるS-JISファイルを開きHTMLのpreタグに合わせた書式に変換しUTF-8で保存する

int pretxt(TCHAR* dtc_file,TCHAR* src_file){
	TCHAR utf16[BUF_MAX*2];
	TCHAR dtc[BUF_MAX*2];
	FILE* src_fp;
	FILE* dtc_fp;

	int f=0;

	if(_tfopen_s(&src_fp,src_file,_TEXT("r"))){
		return -1;

	}
	if(_tfopen_s(&dtc_fp,dtc_file,_TEXT("w, ccs=UTF-8"))){
		fclose(src_fp);
		return -1;
	}
	_ftprintf(dtc_fp, _TEXT("<pre><code>"));
	char sjis_buf[BUF_MAX*2];
	while( fgets(sjis_buf,BUF_MAX*2,src_fp) != NULL ){
		MultiByteToWideChar(932,0,sjis_buf,sizeof(sjis_buf),utf16,sizeof(utf16)/sizeof(TCHAR));
		TCHAR* src_p=utf16;
		TCHAR* dtc_p=dtc;
		while(*src_p){
			switch(*src_p){
			case _T('<'):
				*dtc_p++=_T('&');
				*dtc_p++=_T('l');
				*dtc_p++=_T('t');
				*dtc_p++=_T(';');
				break;
			case _T('>'):
				*dtc_p++=_T('&');
				*dtc_p++=_T('g');
				*dtc_p++=_T('t');
				*dtc_p++=_T(';');
				break;
			case _T('&'):
				*dtc_p++=_T('&');
				*dtc_p++=_T('a');
				*dtc_p++=_T('m');
				*dtc_p++=_T('p');
				*dtc_p++=_T(';');
				break;
			case _T('¥"'):
				*dtc_p++=_T('&');
				*dtc_p++=_T('q');
				*dtc_p++=_T('u');
				*dtc_p++=_T('o');
				*dtc_p++=_T('t');
				*dtc_p++=_T(';');
				break;
			case _T('¥¥'):
				*dtc_p++ = _T('&');
				*dtc_p++ = _T('y');
				*dtc_p++ = _T('e');
				*dtc_p++ = _T('n');
				*dtc_p++ = _T(';');
				break;
			default:
				*dtc_p++=*src_p;
			}
			++src_p;
		}
		*dtc_p=_T('¥0');
		_fputts(dtc,dtc_fp);
	}
	_ftprintf(dtc_fp, _TEXT("</code></pre>"));

	fclose(src_fp);
	fclose(dtc_fp);
	return 0;
}

//	DLL内の関数へのポインタ型を定義
typedef void (WINAPI *RtlGetVersion_FUNC)(OSVERSIONINFOEXW*);

int win10ver2(void){
	int ver = 0;
	HMODULE hMod;
	OSVERSIONINFOEXW osw;
	hMod = LoadLibrary(TEXT("ntdll.dll"));
	RtlGetVersion_FUNC func;
	if (hMod){
		func = (RtlGetVersion_FUNC)GetProcAddress(hMod, "RtlGetVersion");
		if (func == 0){
			FreeLibrary(hMod);
			return FALSE;
		}
		ZeroMemory(&osw, sizeof(osw));
		osw.dwOSVersionInfoSize = sizeof(osw);
		func(&osw);
		FreeLibrary(hMod);
		if (osw.dwMajorVersion == 10){
			switch (osw.dwBuildNumber){
			case 10240: ver = 1507; break;
			case 10586: ver = 1511; break;
			case 14393: ver = 1607; break;
			case 15063: ver = 1703; break;
			case 16299: ver = 1709; break;
			case 17134: ver = 1803; break;
			case 17763: ver = 1809; break;
			default: ver = 1809; break;
			}
			return ver;
		}
	}
	return -1;
}

resource.h

#define IDC_LISTBOX1 2001

resource.rc

#include <windows.h>
#include "resource.h"

DLG1 DIALOG DISCARDABLE  0, 0, 174, 100
STYLE DS_MODALFRAME | WS_POPUP
CAPTION "ファイル名"
FONT 9, "MS Pゴシック"
BEGIN
CONTROL "ListBox", IDC_LISTBOX1, "LISTBOX", WS_CHILD | WS_VISIBLE | WS_VSCROLL | LBS_DISABLENOSCROLL, 7, 26, 160, 43
LTEXT			"ここへファイルをドラッグドロップしてください",-1,7,7,168,10
DEFPUSHBUTTON	"OK",IDOK,62,83,50,14
END

実行ファイルとソースファイルのダウンロード(51.3kByte)