WaveGraph

Visual C++ 2005 Express Edition / Platform SDK
Windowsアプリケーション

// WaveGraph.cpp : アプリケーションのエントリ ポイントを定義します。
//

// マルチバイト文字セット
// winmm.lib

#include "stdafx.h"
#include "WaveGraph.h"

#include <shellapi.h>
#include <stdio.h>
#include <mmsystem.h>

#define MAX_LOADSTRING 100

typedef unsigned char	u_char;

// グローバル変数:
HINSTANCE hInst;								// 現在のインターフェイス
TCHAR szTitle[MAX_LOADSTRING];					// タイトル バーのテキスト
TCHAR szWindowClass[MAX_LOADSTRING];			// メイン ウィンドウ クラス名

static SCROLLINFO	g_siHorz;
static char			*g_pcFile = NULL;
static DWORD		g_dwSampleLength = 0;
static u_char		*g_pucWaveformData = NULL;

// このコード モジュールに含まれる関数の宣言を転送します:
ATOM				MyRegisterClass(HINSTANCE hInstance);
BOOL				InitInstance(HINSTANCE, int);
LRESULT CALLBACK	WndProc(HWND, UINT, WPARAM, LPARAM);
INT_PTR CALLBACK	About(HWND, UINT, WPARAM, LPARAM);

void OnCreate(HWND hWnd);
void OnSize(HWND hWnd);
void OnHScroll(HWND hWnd, WPARAM wParam, LPARAM lParam);
void OnPaint(HWND hWnd);
void OnDropFiles(HWND hWnd, WPARAM wParam);
void SetTitle(HWND hWnd);
int ReadWaveFile(void);

int APIENTRY _tWinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPTSTR    lpCmdLine,
                     int       nCmdShow)
{
	UNREFERENCED_PARAMETER(hPrevInstance);
//	UNREFERENCED_PARAMETER(lpCmdLine);

// TODO: ここにコードを挿入してください。
	MSG msg;
	HACCEL hAccelTable;

if (lpCmdLine[0] != '\0') {
		g_pcFile = _strdup(lpCmdLine);
	}

// グローバル文字列を初期化しています。
	LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
	LoadString(hInstance, IDC_WAVEGRAPH, szWindowClass, MAX_LOADSTRING);
	MyRegisterClass(hInstance);

// アプリケーションの初期化を実行します:
	if (!InitInstance (hInstance, nCmdShow))
	{
		return FALSE;
	}

hAccelTable = LoadAccelerators(hInstance, MAKEINTRESOURCE(IDC_WAVEGRAPH));

// メイン メッセージ ループ:
	while (GetMessage(&msg, NULL, 0, 0))
	{
		if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg))
		{
			TranslateMessage(&msg);
			DispatchMessage(&msg);
		}
	}

return (int) msg.wParam;
}

//
//  関数: MyRegisterClass()
//
//  目的: ウィンドウ クラスを登録します。
//
//  コメント:
//
//    この関数および使い方は、'RegisterClassEx' 関数が追加された
//    Windows 95 より前の Win32 システムと互換させる場合にのみ必要です。
//    アプリケーションが、関連付けられた
//    正しい形式の小さいアイコンを取得できるようにするには、
//    この関数を呼び出してください。
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
	WNDCLASSEX wcex;

wcex.cbSize = sizeof(WNDCLASSEX);

wcex.style			= CS_HREDRAW | CS_VREDRAW;
	wcex.lpfnWndProc	= WndProc;
	wcex.cbClsExtra		= 0;
	wcex.cbWndExtra		= 0;
	wcex.hInstance		= hInstance;
	wcex.hIcon			= LoadIcon(hInstance, MAKEINTRESOURCE(IDI_WAVEGRAPH));
	wcex.hCursor		= LoadCursor(NULL, IDC_ARROW);
	wcex.hbrBackground	= (HBRUSH)(COLOR_WINDOW+1);
	wcex.lpszMenuName	= MAKEINTRESOURCE(IDC_WAVEGRAPH);
	wcex.lpszClassName	= szWindowClass;
	wcex.hIconSm		= LoadIcon(wcex.hInstance, MAKEINTRESOURCE(IDI_SMALL));

return RegisterClassEx(&wcex);
}

//
//   関数: InitInstance(HINSTANCE, int)
//
//   目的: インスタンス ハンドルを保存して、メイン ウィンドウを作成します。
//
//   コメント:
//
//        この関数で、グローバル変数でインスタンス ハンドルを保存し、
//        メイン プログラム ウィンドウを作成および表示します。
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
   HWND hWnd;

hInst = hInstance; // グローバル変数にインスタンス処理を格納します。

hWnd = CreateWindow(szWindowClass, szTitle,
	   WS_OVERLAPPEDWINDOW | WS_HSCROLL,
      CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInstance, NULL);

if (!hWnd)
   {
      return FALSE;
   }

ShowWindow(hWnd, nCmdShow);
   UpdateWindow(hWnd);

return TRUE;
}

//
//  関数: WndProc(HWND, UINT, WPARAM, LPARAM)
//
//  目的:  メイン ウィンドウのメッセージを処理します。
//
//  WM_COMMAND	- アプリケーション メニューの処理
//  WM_PAINT	- メイン ウィンドウの描画
//  WM_DESTROY	- 中止メッセージを表示して戻る
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	int wmId, wmEvent;

switch (message)
	{
	case WM_COMMAND:
		wmId    = LOWORD(wParam);
		wmEvent = HIWORD(wParam);
		// 選択されたメニューの解析:
		switch (wmId)
		{
		case IDM_ABOUT:
			DialogBox(hInst, MAKEINTRESOURCE(IDD_ABOUTBOX), hWnd, About);
			break;
		case IDM_EXIT:
			DestroyWindow(hWnd);
			break;
		default:
			return DefWindowProc(hWnd, message, wParam, lParam);
		}
		break;
	case WM_CREATE:
		OnCreate(hWnd);
		break;
	case WM_SIZE:
		OnSize(hWnd);
		break;
	case WM_HSCROLL:
		OnHScroll(hWnd, wParam, lParam);
		break;
	case WM_PAINT:
		OnPaint(hWnd);
		break;
	case WM_DROPFILES:
		OnDropFiles(hWnd, wParam);
		break;
	case WM_DESTROY:
		if (g_pcFile != NULL) {
			free(g_pcFile);
		}
		PostQuitMessage(0);
		break;
	default:
		return DefWindowProc(hWnd, message, wParam, lParam);
	}
	return 0;
}

// バージョン情報ボックスのメッセージ ハンドラです。
INT_PTR CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
	UNREFERENCED_PARAMETER(lParam);
	switch (message)
	{
	case WM_INITDIALOG:
		return (INT_PTR)TRUE;

case WM_COMMAND:
		if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL)
		{
			EndDialog(hDlg, LOWORD(wParam));
			return (INT_PTR)TRUE;
		}
		break;
	}
	return (INT_PTR)FALSE;
}

void OnCreate(HWND hWnd)
{
	RECT	rect;

DragAcceptFiles(hWnd, TRUE);
	SetTitle(hWnd);

if (g_pcFile != NULL) {
		ReadWaveFile();
	}

GetClientRect(hWnd, &rect);
	g_siHorz.cbSize	= sizeof(SCROLLINFO);
	g_siHorz.fMask	= SIF_RANGE | SIF_PAGE | SIF_POS | SIF_DISABLENOSCROLL;
	g_siHorz.nMin	= 0;
	g_siHorz.nMax	= g_dwSampleLength - 1;
	g_siHorz.nPage	= rect.right;
	g_siHorz.nPos	= 0;
	SetScrollInfo(hWnd, SB_HORZ, &g_siHorz, FALSE);
}

void OnSize(HWND hWnd)
{
	RECT	rect;
	int		iPosMax;

GetClientRect(hWnd, &rect);
	g_siHorz.nPage = rect.right;
	iPosMax = g_siHorz.nMax - g_siHorz.nPage + 1;
	if (iPosMax < 0) {
		iPosMax = 0;
	}
	if (iPosMax < g_siHorz.nPos) {
		g_siHorz.nPos = iPosMax;
	}
	SetScrollInfo(hWnd, SB_HORZ, &g_siHorz, TRUE);
}

void OnHScroll(HWND hWnd, WPARAM wParam, LPARAM lParam)
{
	SCROLLINFO	si;
	int		iPos;
	int		iPosMax;

iPos = g_siHorz.nPos;
	switch (LOWORD(wParam)) {
	case SB_LINEUP:
		iPos -= 10;
		break;
	case SB_LINEDOWN:
		iPos += 10;
		break;
	case SB_PAGEUP:
		iPos -= g_siHorz.nPage;
		break;
	case SB_PAGEDOWN:
		iPos += g_siHorz.nPage;
		break;
	case SB_THUMBTRACK:
		si.cbSize	= sizeof(SCROLLINFO);
		si.fMask	= SIF_TRACKPOS;
		if (GetScrollInfo(hWnd, SB_HORZ, &si) != 0) {
			iPos = si.nTrackPos;
		}
		break;
	}

if (iPos < 0) {
		iPos = 0;
	} else {
		iPosMax = g_siHorz.nMax - g_siHorz.nPage + 1;
		if (iPosMax < iPos) {
			iPos = iPosMax;
		}
	}

if (iPos == g_siHorz.nPos) {
		return;
	}
	ScrollWindowEx(hWnd, g_siHorz.nPos - iPos, 0,
		NULL, NULL, NULL, NULL, SW_INVALIDATE | SW_ERASE);
	g_siHorz.nPos = iPos;
	SetScrollInfo(hWnd, SB_HORZ, &g_siHorz, TRUE);
	UpdateWindow(hWnd);
}

void OnPaint(HWND hWnd)
{
	PAINTSTRUCT	ps;
	HDC		hdc;
	RECT	rect;
	HPEN	hpenBlack;
	HPEN	hpenOld;
	HPEN	hpen;
	LONG	lBottom;
	int		iIndex;

// 描画開始
	hdc = BeginPaint(hWnd, &ps);

GetClientRect(hWnd, &rect);
	lBottom = rect.bottom - 1;

hpenBlack = (HPEN)GetStockObject(BLACK_PEN);
	hpenOld = (HPEN)SelectObject(hdc, hpenBlack);
	MoveToEx(hdc, ps.rcPaint.left, lBottom - 256, NULL);
	LineTo(hdc, ps.rcPaint.right, lBottom - 256);

hpen = CreatePen(PS_SOLID, 1, RGB(0, 0, 255));
	SelectObject(hdc, hpen);
	for (int i = ps.rcPaint.left; i < ps.rcPaint.right; i++) {
		iIndex = g_siHorz.nPos + i;
		if ((int)g_dwSampleLength <= iIndex) {
			break;
		}
		MoveToEx(hdc, i, lBottom - g_pucWaveformData[iIndex], NULL);
		LineTo(hdc, i, lBottom - 128);
	}

SelectObject(hdc, hpenOld);
	DeleteObject(hpen);

// 描画終了
	EndPaint(hWnd, &ps);
}

void OnDropFiles(HWND hWnd, WPARAM wParam)
{
	HDROP	hDrop;
	UINT	uiLen;

hDrop = (HDROP)wParam;
	uiLen = DragQueryFile(hDrop, 0, NULL, 0) + 1;

if (g_pcFile != NULL) {
		free(g_pcFile);
	}
	g_pcFile = (char *)malloc(uiLen);
	if (g_pcFile != NULL) {
		DragQueryFile(hDrop, 0, g_pcFile, uiLen);
	}

SetTitle(hWnd);
	ReadWaveFile();

g_siHorz.nMax	= g_dwSampleLength - 1;
	g_siHorz.nPos	= 0;
	SetScrollInfo(hWnd, SB_HORZ, &g_siHorz, TRUE);

InvalidateRect(hWnd, NULL, TRUE);

// 必須
	DragFinish(hDrop);
}

void SetTitle(HWND hWnd)
{
	char	acFname[_MAX_FNAME];
	char	acExt[_MAX_EXT];
	char	acTitle[512];

if (g_pcFile != NULL) {
		_splitpath_s(g_pcFile, NULL, 0, NULL, 0, acFname, _MAX_FNAME, acExt, _MAX_EXT);
		strcat_s(acFname, _MAX_FNAME, acExt);
	} else {
		strcpy_s(acFname, _MAX_FNAME, "無題");
	}
	sprintf_s(acTitle, sizeof(acTitle), "%s - %s", acFname, szTitle);
	SetWindowText(hWnd, acTitle);
}

int ReadWaveFile(void)
{
	HMMIO		hmmio;
	MMCKINFO	ckParent;
	MMCKINFO	ckSub;
	MMRESULT	result;
	LONG		lRead;

g_dwSampleLength = 0;
	if (g_pucWaveformData != NULL) {
		free(g_pucWaveformData);
	}

// Open
	hmmio = mmioOpen((LPSTR)g_pcFile, NULL, MMIO_READ);
	if (hmmio == NULL) {
		return -1;
	}

// RIFFチャンク
	ckParent.fccType = mmioFOURCC('W', 'A', 'V', 'E');
	result = mmioDescend(hmmio, &ckParent, NULL, MMIO_FINDRIFF);
	if (result != MMSYSERR_NOERROR) {
		return -1;
	}

// dataチャンク
	ckSub.ckid = mmioFOURCC('d', 'a', 't', 'a');
	result = mmioDescend(hmmio, &ckSub, &ckParent, MMIO_FINDCHUNK);
	if (result != MMSYSERR_NOERROR) {
		return -1;
	}

g_dwSampleLength = ckSub.cksize;
	g_pucWaveformData = (u_char *)malloc(ckSub.cksize);
	if (g_pucWaveformData == NULL) {
		return -1;
	}

lRead = mmioRead(hmmio, (HPSTR)g_pucWaveformData, ckSub.cksize);
	if (lRead != (LONG)ckSub.cksize) {
		return -1;
	}

mmioAscend(hmmio, &ckSub, 0);

// RIFFチャンク
	mmioAscend(hmmio, &ckParent, 0);

// Close
	mmioClose(hmmio, 0);

return 0;
}