[apple/icu.git] / icuSources / samples / layout / clayout.c

/*
 *******************************************************************************
 *
 *   © 2016 and later: Unicode, Inc. and others.
 *   License & terms of use: http://www.unicode.org/copyright.html#License
 *
 *******************************************************************************
 *******************************************************************************
 *
 *   Copyright (C) 1999-2007, International Business Machines
 *   Corporation and others.  All Rights Reserved.
 *
 *******************************************************************************
 *   file name:  Layout.cpp
 *
 *   created on: 08/03/2000
 *   created by: Eric R. Mader
 */

#include <windows.h>
#include <stdio.h>

#include "playout.h"
#include "pflow.h"

#include "gdiglue.h"
#include "ucreader.h"

#include "arraymem.h"

#include "resource.h"

struct Context
{
    le_int32 width;
    le_int32 height;
    pf_flow *paragraph;
};

typedef struct Context Context;

LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);

#define APP_NAME "LayoutSample"

TCHAR szAppName[] = TEXT(APP_NAME);

void PrettyTitle(HWND hwnd, char *fileName)
{
    char title[MAX_PATH + 64];

    sprintf(title, "%s - %s", APP_NAME, fileName);

    SetWindowTextA(hwnd, title);
}

void InitParagraph(HWND hwnd, Context *context)
{
    SCROLLINFO si;

    if (context->paragraph != NULL) {
        // FIXME: does it matter what we put in the ScrollInfo
        // if the window's been minimized?
        if (context->width > 0 && context->height > 0) {
            pf_breakLines(context->paragraph, context->width, context->height);
        }

        si.cbSize = sizeof si;
        si.fMask = SIF_RANGE | SIF_PAGE | SIF_DISABLENOSCROLL;
        si.nMin = 0;
        si.nMax = pf_getLineCount(context->paragraph) - 1;
        si.nPage = context->height / pf_getLineHeight(context->paragraph);
        SetScrollInfo(hwnd, SB_VERT, &si, TRUE);
    }
}

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, PSTR szCmdLine, int iCmdShow)
{
    HWND hwnd;
    HACCEL hAccel;
    MSG msg;
    WNDCLASS wndclass;
    LEErrorCode status = LE_NO_ERROR;

    wndclass.style         = CS_HREDRAW | CS_VREDRAW;
    wndclass.lpfnWndProc   = WndProc;
    wndclass.cbClsExtra    = 0;
    wndclass.cbWndExtra    = sizeof(LONG);
    wndclass.hInstance     = hInstance;
    wndclass.hIcon         = LoadIcon(NULL, IDI_APPLICATION);
    wndclass.hCursor       = LoadCursor(NULL, IDC_ARROW);
    wndclass.hbrBackground = (HBRUSH) GetStockObject(WHITE_BRUSH);
    wndclass.lpszMenuName  = szAppName;
    wndclass.lpszClassName = szAppName;

    if (!RegisterClass(&wndclass)) {
        MessageBox(NULL, TEXT("This demo only runs on Windows 2000!"), szAppName, MB_ICONERROR);

        return 0;
    }

    hAccel = LoadAccelerators(hInstance, szAppName);

    hwnd = CreateWindow(szAppName, NULL,
                        WS_OVERLAPPEDWINDOW | WS_VSCROLL,
                        CW_USEDEFAULT, CW_USEDEFAULT,
                        600, 400,
                        NULL, NULL, hInstance, NULL);

    ShowWindow(hwnd, iCmdShow);
    UpdateWindow(hwnd);

    while (GetMessage(&msg, NULL, 0, 0)) {
        if (!TranslateAccelerator(hwnd, hAccel, &msg)) {
            TranslateMessage(&msg);
            DispatchMessage(&msg);
        }
    }

    UnregisterClass(szAppName, hInstance);
    return msg.wParam;
}

LRESULT CALLBACK WndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    HDC hdc;
    Context *context;
    static le_int32 windowCount = 0;
    static fm_fontMap *fontMap = NULL;
    static rs_surface *surface = NULL;
    static gs_guiSupport *guiSupport = NULL;
    static le_font *font = NULL;

    switch (message) {
    case WM_CREATE:
    {
        LEErrorCode fontStatus = LE_NO_ERROR;

        hdc = GetDC(hwnd);
        guiSupport = gs_gdiGuiSupportOpen();
        surface = rs_gdiRenderingSurfaceOpen(hdc);

        fontMap = fm_gdiFontMapOpen(surface, "FontMap.GDI", 24, guiSupport, &fontStatus);
        font    = le_scriptCompositeFontOpen(fontMap);

        if (LE_FAILURE(fontStatus)) {
            ReleaseDC(hwnd, hdc);
            return -1;
        }

        context = NEW_ARRAY(Context, 1);

        context->width  = 600;
        context->height = 400;

        context->paragraph = pf_factory("Sample.txt", font, guiSupport);
        SetWindowLongPtr(hwnd, 0, (LONG_PTR) context);

        windowCount += 1;
        ReleaseDC(hwnd, hdc);

        PrettyTitle(hwnd, "Sample.txt");
        return 0;
    }

    case WM_SIZE:
    {
        context = (Context *) GetWindowLongPtr(hwnd, 0);
        context->width  = LOWORD(lParam);
        context->height = HIWORD(lParam);

        InitParagraph(hwnd, context);
        return 0;
    }

    case WM_VSCROLL:
    {
        SCROLLINFO si;
        le_int32 vertPos;

        si.cbSize = sizeof si;
        si.fMask = SIF_ALL;
        GetScrollInfo(hwnd, SB_VERT, &si);

        vertPos = si.nPos;

        switch (LOWORD(wParam))
        {
        case SB_TOP:
            si.nPos = si.nMin;
            break;

        case SB_BOTTOM:
            si.nPos = si.nMax;
            break;

        case SB_LINEUP:
            si.nPos -= 1;
            break;

        case SB_LINEDOWN:
            si.nPos += 1;
            break;

        case SB_PAGEUP:
            si.nPos -= si.nPage;
            break;

        case SB_PAGEDOWN:
            si.nPos += si.nPage;
            break;

        case SB_THUMBTRACK:
            si.nPos = si.nTrackPos;
            break;

        default:
            break;
        }

        si.fMask = SIF_POS;
        SetScrollInfo(hwnd, SB_VERT, &si, TRUE);
        GetScrollInfo(hwnd, SB_VERT, &si);

        context = (Context *) GetWindowLongPtr(hwnd, 0);

        if (context->paragraph != NULL && si.nPos != vertPos) {
            ScrollWindow(hwnd, 0, pf_getLineHeight(context->paragraph) * (vertPos - si.nPos), NULL, NULL);
            UpdateWindow(hwnd);
        }

        return 0;
    }

    case WM_PAINT:
    {
        PAINTSTRUCT ps;
        SCROLLINFO si;
        le_int32 firstLine, lastLine;

        hdc = BeginPaint(hwnd, &ps);
        SetBkMode(hdc, TRANSPARENT);

        si.cbSize = sizeof si;
        si.fMask = SIF_ALL;
        GetScrollInfo(hwnd, SB_VERT, &si);

        firstLine = si.nPos;

        context = (Context *) GetWindowLongPtr(hwnd, 0);

        if (context->paragraph != NULL) {
            rs_gdiRenderingSurfaceSetHDC(surface, hdc);

            // NOTE: si.nPos + si.nPage may include a partial line at the bottom
            // of the window. We need this because scrolling assumes that the
            // partial line has been painted.
            lastLine  = min (si.nPos + (le_int32) si.nPage, pf_getLineCount(context->paragraph) - 1);

            pf_draw(context->paragraph, surface, firstLine, lastLine);
        }

        EndPaint(hwnd, &ps);
        return 0;
    }

    case WM_COMMAND:
        switch (LOWORD(wParam)) {
        case IDM_FILE_OPEN:
        {
            OPENFILENAMEA ofn;
            char szFileName[MAX_PATH], szTitleName[MAX_PATH];
            static char szFilter[] = "Text Files (.txt)\0*.txt\0"
                                     "All Files (*.*)\0*.*\0\0";

            ofn.lStructSize       = sizeof (OPENFILENAMEA);
            ofn.hwndOwner         = hwnd;
            ofn.hInstance         = NULL;
            ofn.lpstrFilter       = szFilter;
            ofn.lpstrCustomFilter = NULL;
            ofn.nMaxCustFilter    = 0;
            ofn.nFilterIndex      = 0;
            ofn.lpstrFile         = szFileName;
            ofn.nMaxFile          = MAX_PATH;
            ofn.lpstrFileTitle    = szTitleName;
            ofn.nMaxFileTitle     = MAX_PATH;
            ofn.lpstrInitialDir   = NULL;
            ofn.lpstrTitle        = NULL;
            ofn.Flags             = OFN_HIDEREADONLY | OFN_PATHMUSTEXIST;
            ofn.nFileOffset       = 0;
            ofn.nFileExtension    = 0;
            ofn.lpstrDefExt       = "txt";
            ofn.lCustData         = 0L;
            ofn.lpfnHook          = NULL;
            ofn.lpTemplateName    = NULL;

            szFileName[0] = '\0';

            if (GetOpenFileNameA(&ofn)) {
                pf_flow *newParagraph;

                hdc = GetDC(hwnd);
                rs_gdiRenderingSurfaceSetHDC(surface, hdc);

                newParagraph = pf_factory(szFileName, font, guiSupport);

                if (newParagraph != NULL) {
                    context = (Context *) GetWindowLongPtr(hwnd, 0);

                    if (context->paragraph != NULL) {
                        pf_close(context->paragraph);
                    }

                    context->paragraph = newParagraph;
                    InitParagraph(hwnd, context);
                    PrettyTitle(hwnd, szTitleName);
                    InvalidateRect(hwnd, NULL, TRUE);

                }
            }

            //ReleaseDC(hwnd, hdc);

            return 0;
        }

        case IDM_FILE_EXIT:
        case IDM_FILE_CLOSE:
            SendMessage(hwnd, WM_CLOSE, 0, 0);
            return 0;

        case IDM_HELP_ABOUTLAYOUTSAMPLE:
            MessageBox(hwnd, TEXT("Windows Layout Sample 0.1\n")
                             TEXT("Copyright (C) 1998-2005 By International Business Machines Corporation and others.\n")
                             TEXT("Author: Eric Mader"),
                       szAppName, MB_ICONINFORMATION | MB_OK);
            return 0;

        }
        break;


    case WM_DESTROY:
    {
        context = (Context *) GetWindowLongPtr(hwnd, 0);

        if (context != NULL && context->paragraph != NULL) {
            pf_close(context->paragraph);
        }

        DELETE_ARRAY(context);

        if (--windowCount <= 0) {
            le_fontClose(font);
            rs_gdiRenderingSurfaceClose(surface);
            gs_gdiGuiSupportClose(guiSupport);

            PostQuitMessage(0);
        }

        return 0;
    }

    default:
        return DefWindowProc(hwnd, message, wParam, lParam);
    }

    return 0;
}
Commit	Line	Data
46f4442e	1	/*
f3c0d7a5 A	2	*******************************************************************************
	3	*
	4	* © 2016 and later: Unicode, Inc. and others.
	5	* License & terms of use: http://www.unicode.org/copyright.html#License
	6	*
	7	*******************************************************************************
46f4442e A	8	*******************************************************************************
	9	*
	10	* Copyright (C) 1999-2007, International Business Machines
	11	* Corporation and others. All Rights Reserved.
	12	*
	13	*******************************************************************************
	14	* file name: Layout.cpp
	15	*
	16	* created on: 08/03/2000
	17	* created by: Eric R. Mader
	18	*/
	19
	20	#include <windows.h>
	21	#include <stdio.h>
	22
	23	#include "playout.h"
	24	#include "pflow.h"
	25
	26	#include "gdiglue.h"
	27	#include "ucreader.h"
	28
	29	#include "arraymem.h"
	30
	31	#include "resource.h"
	32
	33	struct Context
	34	{
	35	le_int32 width;
	36	le_int32 height;
	37	pf_flow *paragraph;
	38	};
	39
	40	typedef struct Context Context;
	41
	42	LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
	43
	44	#define APP_NAME "LayoutSample"
	45
	46	TCHAR szAppName[] = TEXT(APP_NAME);
	47
	48	void PrettyTitle(HWND hwnd, char *fileName)
	49	{
	50	char title[MAX_PATH + 64];
	51
	52	sprintf(title, "%s - %s", APP_NAME, fileName);
	53
	54	SetWindowTextA(hwnd, title);
	55	}
	56
	57	void InitParagraph(HWND hwnd, Context *context)
	58	{
	59	SCROLLINFO si;
	60
	61	if (context->paragraph != NULL) {
	62	// FIXME: does it matter what we put in the ScrollInfo
	63	// if the window's been minimized?
	64	if (context->width > 0 && context->height > 0) {
	65	pf_breakLines(context->paragraph, context->width, context->height);
	66	}
	67
	68	si.cbSize = sizeof si;
	69	si.fMask = SIF_RANGE \| SIF_PAGE \| SIF_DISABLENOSCROLL;
	70	si.nMin = 0;
	71	si.nMax = pf_getLineCount(context->paragraph) - 1;
72	si.nPage = context->height / pf_getLineHeight(context->paragraph);
73	SetScrollInfo(hwnd, SB_VERT, &si, TRUE);
74	}
75	}
76
77	int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, PSTR szCmdLine, int iCmdShow)
78	{
79	HWND hwnd;
80	HACCEL hAccel;
81	MSG msg;
82	WNDCLASS wndclass;
83	LEErrorCode status = LE_NO_ERROR;
84
85	wndclass.style = CS_HREDRAW \| CS_VREDRAW;
86	wndclass.lpfnWndProc = WndProc;
87	wndclass.cbClsExtra = 0;
88	wndclass.cbWndExtra = sizeof(LONG);
89	wndclass.hInstance = hInstance;
90	wndclass.hIcon = LoadIcon(NULL, IDI_APPLICATION);
91	wndclass.hCursor = LoadCursor(NULL, IDC_ARROW);
92	wndclass.hbrBackground = (HBRUSH) GetStockObject(WHITE_BRUSH);
93	wndclass.lpszMenuName = szAppName;
94	wndclass.lpszClassName = szAppName;
95
96	if (!RegisterClass(&wndclass)) {
97	MessageBox(NULL, TEXT("This demo only runs on Windows 2000!"), szAppName, MB_ICONERROR);
98
99	return 0;
100	}
101
102	hAccel = LoadAccelerators(hInstance, szAppName);
103
104	hwnd = CreateWindow(szAppName, NULL,
105	WS_OVERLAPPEDWINDOW \| WS_VSCROLL,
106	CW_USEDEFAULT, CW_USEDEFAULT,
107	600, 400,
108	NULL, NULL, hInstance, NULL);
109
110	ShowWindow(hwnd, iCmdShow);
111	UpdateWindow(hwnd);
112
113	while (GetMessage(&msg, NULL, 0, 0)) {
114	if (!TranslateAccelerator(hwnd, hAccel, &msg)) {
115	TranslateMessage(&msg);
116	DispatchMessage(&msg);
117	}
118	}
119
120	UnregisterClass(szAppName, hInstance);
121	return msg.wParam;
122	}
123
124	LRESULT CALLBACK WndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
125	{
126	HDC hdc;
127	Context *context;
128	static le_int32 windowCount = 0;
129	static fm_fontMap *fontMap = NULL;
130	static rs_surface *surface = NULL;
131	static gs_guiSupport *guiSupport = NULL;
132	static le_font *font = NULL;
133
134	switch (message) {
135	case WM_CREATE:
136	{
137	LEErrorCode fontStatus = LE_NO_ERROR;
138
139	hdc = GetDC(hwnd);
140	guiSupport = gs_gdiGuiSupportOpen();
141	surface = rs_gdiRenderingSurfaceOpen(hdc);
142
143	fontMap = fm_gdiFontMapOpen(surface, "FontMap.GDI", 24, guiSupport, &fontStatus);
144	font = le_scriptCompositeFontOpen(fontMap);
145
146	if (LE_FAILURE(fontStatus)) {
147	ReleaseDC(hwnd, hdc);
148	return -1;
149	}
150
151	context = NEW_ARRAY(Context, 1);
152
153	context->width = 600;
154	context->height = 400;
155
156	context->paragraph = pf_factory("Sample.txt", font, guiSupport);
157	SetWindowLongPtr(hwnd, 0, (LONG_PTR) context);
158
159	windowCount += 1;
160	ReleaseDC(hwnd, hdc);
161
162	PrettyTitle(hwnd, "Sample.txt");
163	return 0;
164	}
165
166	case WM_SIZE:
167	{
168	context = (Context *) GetWindowLongPtr(hwnd, 0);
169	context->width = LOWORD(lParam);
170	context->height = HIWORD(lParam);
171
172	InitParagraph(hwnd, context);
173	return 0;
174	}
175
176	case WM_VSCROLL:
177	{
178	SCROLLINFO si;
179	le_int32 vertPos;
180
181	si.cbSize = sizeof si;
182	si.fMask = SIF_ALL;
183	GetScrollInfo(hwnd, SB_VERT, &si);
184
185	vertPos = si.nPos;
186
187	switch (LOWORD(wParam))
188	{
189	case SB_TOP:
190	si.nPos = si.nMin;
191	break;
192
193	case SB_BOTTOM:
194	si.nPos = si.nMax;
195	break;
196
197	case SB_LINEUP:
198	si.nPos -= 1;
199	break;
200
201	case SB_LINEDOWN:
202	si.nPos += 1;
203	break;
204
205	case SB_PAGEUP:
206	si.nPos -= si.nPage;
207	break;
208
209	case SB_PAGEDOWN:
210	si.nPos += si.nPage;
211	break;
212
213	case SB_THUMBTRACK:
214	si.nPos = si.nTrackPos;
215	break;
216
217	default:
218	break;
219	}
220
221	si.fMask = SIF_POS;
222	SetScrollInfo(hwnd, SB_VERT, &si, TRUE);
223	GetScrollInfo(hwnd, SB_VERT, &si);
224
225	context = (Context *) GetWindowLongPtr(hwnd, 0);
226
227	if (context->paragraph != NULL && si.nPos != vertPos) {
228	ScrollWindow(hwnd, 0, pf_getLineHeight(context->paragraph) * (vertPos - si.nPos), NULL, NULL);
229	UpdateWindow(hwnd);
230	}
231
232	return 0;
233	}
234
235	case WM_PAINT:
236	{
237	PAINTSTRUCT ps;
238	SCROLLINFO si;
239	le_int32 firstLine, lastLine;
240
241	hdc = BeginPaint(hwnd, &ps);
242	SetBkMode(hdc, TRANSPARENT);
243
244	si.cbSize = sizeof si;
245	si.fMask = SIF_ALL;
246	GetScrollInfo(hwnd, SB_VERT, &si);
247
248	firstLine = si.nPos;
249
250	context = (Context *) GetWindowLongPtr(hwnd, 0);
251
252	if (context->paragraph != NULL) {
253	rs_gdiRenderingSurfaceSetHDC(surface, hdc);
254
255	// NOTE: si.nPos + si.nPage may include a partial line at the bottom
256	// of the window. We need this because scrolling assumes that the
257	// partial line has been painted.
258	lastLine = min (si.nPos + (le_int32) si.nPage, pf_getLineCount(context->paragraph) - 1);
259
260	pf_draw(context->paragraph, surface, firstLine, lastLine);
261	}
262
263	EndPaint(hwnd, &ps);
264	return 0;
265	}
266
267	case WM_COMMAND:
268	switch (LOWORD(wParam)) {
269	case IDM_FILE_OPEN:
270	{
271	OPENFILENAMEA ofn;
272	char szFileName[MAX_PATH], szTitleName[MAX_PATH];
273	static char szFilter[] = "Text Files (.txt)\0*.txt\0"
274	"All Files (.)\0.\0\0";
275
276	ofn.lStructSize = sizeof (OPENFILENAMEA);
277	ofn.hwndOwner = hwnd;
278	ofn.hInstance = NULL;
279	ofn.lpstrFilter = szFilter;
280	ofn.lpstrCustomFilter = NULL;
281	ofn.nMaxCustFilter = 0;
282	ofn.nFilterIndex = 0;
283	ofn.lpstrFile = szFileName;
284	ofn.nMaxFile = MAX_PATH;
285	ofn.lpstrFileTitle = szTitleName;
286	ofn.nMaxFileTitle = MAX_PATH;
287	ofn.lpstrInitialDir = NULL;
288	ofn.lpstrTitle = NULL;
289	ofn.Flags = OFN_HIDEREADONLY \| OFN_PATHMUSTEXIST;
290	ofn.nFileOffset = 0;
291	ofn.nFileExtension = 0;
292	ofn.lpstrDefExt = "txt";
293	ofn.lCustData = 0L;
294	ofn.lpfnHook = NULL;
295	ofn.lpTemplateName = NULL;
296
297	szFileName[0] = '\0';
298
299	if (GetOpenFileNameA(&ofn)) {
300	pf_flow *newParagraph;
301
302	hdc = GetDC(hwnd);
303	rs_gdiRenderingSurfaceSetHDC(surface, hdc);
304
305	newParagraph = pf_factory(szFileName, font, guiSupport);
306
307	if (newParagraph != NULL) {
308	context = (Context *) GetWindowLongPtr(hwnd, 0);
309
310	if (context->paragraph != NULL) {
311	pf_close(context->paragraph);
312	}
313
314	context->paragraph = newParagraph;
315	InitParagraph(hwnd, context);
316	PrettyTitle(hwnd, szTitleName);
317	InvalidateRect(hwnd, NULL, TRUE);
318
319	}
320	}
321
322	//ReleaseDC(hwnd, hdc);
323
324	return 0;
325	}
326
327	case IDM_FILE_EXIT:
328	case IDM_FILE_CLOSE:
329	SendMessage(hwnd, WM_CLOSE, 0, 0);
330	return 0;
331
332	case IDM_HELP_ABOUTLAYOUTSAMPLE:
333	MessageBox(hwnd, TEXT("Windows Layout Sample 0.1\n")
334	TEXT("Copyright (C) 1998-2005 By International Business Machines Corporation and others.\n")
335	TEXT("Author: Eric Mader"),
336	szAppName, MB_ICONINFORMATION \| MB_OK);
337	return 0;
338
339	}
340	break;
341
342
343	case WM_DESTROY:
344	{
345	context = (Context *) GetWindowLongPtr(hwnd, 0);
346
347	if (context != NULL && context->paragraph != NULL) {
348	pf_close(context->paragraph);
349	}
350
351	DELETE_ARRAY(context);
352
353	if (--windowCount <= 0) {
354	le_fontClose(font);
355	rs_gdiRenderingSurfaceClose(surface);
356	gs_gdiGuiSupportClose(guiSupport);
357
358	PostQuitMessage(0);
359	}
360
361	return 0;
362	}
363
364	default:
365	return DefWindowProc(hwnd, message, wParam, lParam);
366	}
367
368	return 0;
369	}