Subversion Repositories eduke32

Rev

Rev 219 | Rev 222 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

#ifndef RENDERTYPEWIN
#error Only for Windows
#endif

#include "duke3d.h"
#include "sounds.h"

#include "build.h"
#include "winlayer.h"
#include "compat.h"

#include "startdlg.h"

#define WIN32_LEAN_AND_MEAN
#include <windows.h>
#include <windowsx.h>
#define _WIN32_IE 0x0300
#include <commctrl.h>
#include <stdio.h>

#include "startwin.game.h"

#define TAB_CONFIG 0
#define TAB_GAME 1
#define TAB_MESSAGES 2

static struct audioenumdrv *wavedevs = NULL;

static struct {
        int fullscreen;
        int xdim, ydim, bpp;
        int forcesetup;
        int usemouse, usejoy;
        char selectedgrp[BMAX_PATH+1];
} settings;

static HWND startupdlg = NULL;
static HWND pages[3] = { NULL, NULL, NULL };
static int done = -1, mode = TAB_CONFIG;

#define POPULATE_VIDEO 1
#define POPULATE_CONFIG 2
#define POPULATE_GAME 4

static void PopulateForm(int pgs)
{
        HWND hwnd;
        char buf[256];
        int i,j;

        if (pgs & POPULATE_VIDEO) {
                int mode;

                hwnd = GetDlgItem(pages[TAB_CONFIG], IDCVMODE);

                mode = checkvideomode(&settings.xdim, &settings.ydim, settings.bpp, settings.fullscreen, 1);
                if (mode < 0) {
                        int cd[] = { 32, 24, 16, 15, 8, 0 };
                        for (i=0; cd[i]; ) { if (cd[i] >= settings.bpp) i++; else break; }
                        for ( ; cd[i]; i++) {
                                mode = checkvideomode(&settings.xdim, &settings.ydim, cd[i], settings.fullscreen, 1);
                                if (mode < 0) continue;
                                settings.bpp = cd[i];
                                break;
                        }
                }

                Button_SetCheck(GetDlgItem(pages[TAB_CONFIG], IDCFULLSCREEN), (settings.fullscreen ? BST_CHECKED : BST_UNCHECKED));
                ComboBox_ResetContent(hwnd);
                for (i=0; i<validmodecnt; i++) {
                        if (validmode[i].fs != settings.fullscreen) continue;

                        // all modes get added to the 3D mode list
                        Bsprintf(buf, "%ld x %ld %dbpp", validmode[i].xdim, validmode[i].ydim, validmode[i].bpp);
                        j = ComboBox_AddString(hwnd, buf);
                        ComboBox_SetItemData(hwnd, j, i);
                        if (i == mode) ComboBox_SetCurSel(hwnd, j);
                }
        }

        if (pgs & POPULATE_CONFIG) {
                struct audioenumdev *d;
                char *n;

                hwnd = GetDlgItem(pages[TAB_CONFIG], IDCSOUNDDRV);
                ComboBox_ResetContent(hwnd);
                if (wavedevs) {
                        d = wavedevs->devs;
                        for (i=0; wavedevs->drvs[i]; i++) {
                                strcpy(buf, wavedevs->drvs[i]);
                                if (d->devs) {
                                        strcat(buf, ":");
                                        n = buf + strlen(buf);
                                        for (j=0; d->devs[j]; j++) {
                                                strcpy(n, d->devs[j]);
                                                ComboBox_AddString(hwnd, buf);
                                        }
                                } else {
                                        ComboBox_AddString(hwnd, buf);
                                }
                                d = d->next;
                        }
                }

                Button_SetCheck(GetDlgItem(pages[TAB_CONFIG], IDCALWAYSSHOW), (settings.forcesetup ? BST_CHECKED : BST_UNCHECKED));

                Button_SetCheck(GetDlgItem(pages[TAB_CONFIG], IDCINPUTMOUSE), (settings.usemouse ? BST_CHECKED : BST_UNCHECKED));
                Button_SetCheck(GetDlgItem(pages[TAB_CONFIG], IDCINPUTJOY), (settings.usejoy ? BST_CHECKED : BST_UNCHECKED));
        }

        if (pgs & POPULATE_GAME) {
                struct grpfile *fg;
                int i, j;
                char buf[128+BMAX_PATH];

                hwnd = GetDlgItem(pages[TAB_GAME], IDGDATA);

                for (fg = foundgrps; fg; fg=fg->next) {
                        for (i = 0; i<numgrpfiles; i++)
                                if (fg->crcval == grpfiles[i].crcval) break;
                        if (i == numgrpfiles) continue; // unrecognised grp file

                        Bsprintf(buf, "%s\t%s", grpfiles[i].name, fg->name);
                        j = ListBox_AddString(hwnd, buf);
                        ListBox_SetItemData(hwnd, j, (LPARAM)fg);
                        if (!Bstrcasecmp(fg->name, settings.selectedgrp)) ListBox_SetCurSel(hwnd, j);
                }
        }
}

static INT_PTR CALLBACK ConfigPageProc(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
        switch (uMsg) {
                case WM_COMMAND:
                        switch (LOWORD(wParam)) {
                                case IDCFULLSCREEN:
                                        settings.fullscreen = !settings.fullscreen;
                                        PopulateForm(POPULATE_VIDEO);
                                        return TRUE;
                                case IDCVMODE:
                                        if (HIWORD(wParam) == CBN_SELCHANGE) {
                                                int i;
                                                i = ComboBox_GetCurSel((HWND)lParam);
                                                if (i != CB_ERR) i = ComboBox_GetItemData((HWND)lParam, i);
                                                if (i != CB_ERR) {
                                                        settings.xdim = validmode[i].xdim;
                                                        settings.ydim = validmode[i].ydim;
                                                        settings.bpp  = validmode[i].bpp;
                                                }
                                        }
                                        return TRUE;
                                case IDCALWAYSSHOW:
                                        settings.forcesetup = IsDlgButtonChecked(hwndDlg, IDCALWAYSSHOW) == BST_CHECKED;
                                        return TRUE;
                                case IDCINPUTMOUSE:
                                        settings.usemouse = IsDlgButtonChecked(hwndDlg, IDCINPUTMOUSE) == BST_CHECKED;
                                        return TRUE;
                                case IDCINPUTJOY:
                                        settings.usejoy = IsDlgButtonChecked(hwndDlg, IDCINPUTJOY) == BST_CHECKED;
                                        return TRUE;
                                default: break;
                        }
                        break;
                default: break;
        }
        return FALSE;
}

static INT_PTR CALLBACK GamePageProc(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
        switch (uMsg) {
                case WM_COMMAND:
                        switch (LOWORD(wParam)) {
                                case IDGDATA: {
                                        int i;
                                        i = ListBox_GetCurSel((HWND)lParam);
                                        if (i != CB_ERR) i = ListBox_GetItemData((HWND)lParam, i);
                                        if (i != CB_ERR) strcpy(settings.selectedgrp, ((struct grpfile*)i)->name);
                                        return TRUE;
                                }
                                default: break;
                        }
                        break;
                default: break;
        }
        return FALSE;
}



static void SetPage(int n)
{
        HWND tab;
        int cur;
        tab = GetDlgItem(startupdlg, WIN_STARTWIN_TABCTL);
        cur = (int)SendMessage(tab, TCM_GETCURSEL,0,0);
        ShowWindow(pages[cur],SW_HIDE);
        SendMessage(tab, TCM_SETCURSEL, n, 0);
        ShowWindow(pages[n],SW_SHOW);
        mode = n;

        SetFocus(GetDlgItem(startupdlg, WIN_STARTWIN_TABCTL));
}

static void EnableConfig(int n)
{
        //EnableWindow(GetDlgItem(startupdlg, WIN_STARTWIN_CANCEL), n);
        EnableWindow(GetDlgItem(startupdlg, WIN_STARTWIN_START), n);
        EnableWindow(GetDlgItem(pages[TAB_CONFIG], IDCFULLSCREEN), n);
        EnableWindow(GetDlgItem(pages[TAB_CONFIG], IDCVMODE), n);
        EnableWindow(GetDlgItem(pages[TAB_CONFIG], IDCINPUTMOUSE), n);
        EnableWindow(GetDlgItem(pages[TAB_CONFIG], IDCINPUTJOY), n);

        EnableWindow(GetDlgItem(pages[TAB_GAME], IDGDATA), n);
}

static INT_PTR CALLBACK startup_dlgproc(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
        static HBITMAP hbmp = NULL;
        HDC hdc;
       
        switch (uMsg) {
                case WM_INITDIALOG: {
                        HWND hwnd;
                        RECT r, rdlg, chrome, rtab, rcancel, rstart;
                        int xoffset = 0, yoffset = 0;

                        // Fetch the positions (in screen coordinates) of all the windows we need to tweak
                        ZeroMemory(&chrome, sizeof(chrome));
                        AdjustWindowRect(&chrome, GetWindowLong(hwndDlg, GWL_STYLE), FALSE);
                        GetWindowRect(hwndDlg, &rdlg);
                        GetWindowRect(GetDlgItem(hwndDlg, WIN_STARTWIN_TABCTL), &rtab);
                        GetWindowRect(GetDlgItem(hwndDlg, WIN_STARTWIN_CANCEL), &rcancel);
                        GetWindowRect(GetDlgItem(hwndDlg, WIN_STARTWIN_START), &rstart);

                        // Knock off the non-client area of the main dialogue to give just the client area
                        rdlg.left -= chrome.left; rdlg.top -= chrome.top;
                        rdlg.right -= chrome.right; rdlg.bottom -= chrome.bottom;

                        // Translate them to client-relative coordinates wrt the main dialogue window
                        rtab.right -= rtab.left - 1; rtab.bottom -= rtab.top - 1;
                        rtab.left  -= rdlg.left; rtab.top -= rdlg.top;

                        rcancel.right -= rcancel.left - 1; rcancel.bottom -= rcancel.top - 1;
                        rcancel.left -= rdlg.left; rcancel.top -= rdlg.top;

                        rstart.right -= rstart.left - 1; rstart.bottom -= rstart.top - 1;
                        rstart.left -= rdlg.left; rstart.top -= rdlg.top;

                        // And then convert the main dialogue coordinates to just width/length
                        rdlg.right -= rdlg.left - 1; rdlg.bottom -= rdlg.top - 1;
                        rdlg.left = 0; rdlg.top = 0;

                        // Load the bitmap into the bitmap control and fetch its dimensions
                        hbmp = LoadBitmap((HINSTANCE)win_gethinstance(), MAKEINTRESOURCE(RSRC_BMP));
                        hwnd = GetDlgItem(hwndDlg,WIN_STARTWIN_BITMAP);
                        SendMessage(hwnd, STM_SETIMAGE, IMAGE_BITMAP, (LPARAM)hbmp);
                        GetClientRect(hwnd, &r);
                        xoffset = r.right;
                        yoffset = r.bottom - rdlg.bottom;

                        // Shift and resize the controls that require it
                        rtab.left += xoffset; rtab.bottom += yoffset;
                        rcancel.left += xoffset; rcancel.top += yoffset;
                        rstart.left += xoffset; rstart.top += yoffset;
                        rdlg.right += xoffset;
                        rdlg.bottom += yoffset;

                        // Move the controls to their new positions
                        MoveWindow(GetDlgItem(hwndDlg, WIN_STARTWIN_TABCTL), rtab.left, rtab.top, rtab.right, rtab.bottom, FALSE);
                        MoveWindow(GetDlgItem(hwndDlg, WIN_STARTWIN_CANCEL), rcancel.left, rcancel.top, rcancel.right, rcancel.bottom, FALSE);
                        MoveWindow(GetDlgItem(hwndDlg, WIN_STARTWIN_START), rstart.left, rstart.top, rstart.right, rstart.bottom, FALSE);

                        // Move the main dialogue to the centre of the screen
                        hdc = GetDC(NULL);
                        rdlg.left = (GetDeviceCaps(hdc, HORZRES) - rdlg.right) / 2;
                        rdlg.top = (GetDeviceCaps(hdc, VERTRES) - rdlg.bottom) / 2;
                        ReleaseDC(NULL, hdc);
                        MoveWindow(hwndDlg, rdlg.left + chrome.left, rdlg.top + chrome.left,
                                rdlg.right + (-chrome.left+chrome.right), rdlg.bottom + (-chrome.top+chrome.bottom), TRUE);

                        // Add tabs to the tab control
                        {
                                TCITEM tab;
                               
                                hwnd = GetDlgItem(hwndDlg, WIN_STARTWIN_TABCTL);

                                ZeroMemory(&tab, sizeof(tab));
                                tab.mask = TCIF_TEXT;
                                tab.pszText = TEXT("Configuration");
                                SendMessage(hwnd, TCM_INSERTITEM, (WPARAM)TAB_CONFIG, (LPARAM)&tab);
                                tab.mask = TCIF_TEXT;
                                tab.pszText = TEXT("Game");
                                SendMessage(hwnd, TCM_INSERTITEM, (WPARAM)TAB_GAME, (LPARAM)&tab);
                                tab.mask = TCIF_TEXT;
                                tab.pszText = TEXT("Messages");
                                SendMessage(hwnd, TCM_INSERTITEM, (WPARAM)TAB_MESSAGES, (LPARAM)&tab);

                                // Work out the position and size of the area inside the tab control for the pages
                                ZeroMemory(&r, sizeof(r));
                                GetClientRect(hwnd, &r);
                                SendMessage(hwnd, TCM_ADJUSTRECT, FALSE, (LPARAM)&r);
                                r.right -= r.left-1;
                                r.bottom -= r.top-1;
                                r.top += rtab.top;
                                r.left += rtab.left;

                                // Create the pages and position them in the tab control, but hide them
                                pages[TAB_CONFIG] = CreateDialog((HINSTANCE)win_gethinstance(),
                                        MAKEINTRESOURCE(WIN_STARTWINPAGE_CONFIG), hwndDlg, ConfigPageProc);
                                pages[TAB_GAME] = CreateDialog((HINSTANCE)win_gethinstance(),
                                        MAKEINTRESOURCE(WIN_STARTWINPAGE_GAME), hwndDlg, GamePageProc);
                                pages[TAB_MESSAGES] = GetDlgItem(hwndDlg, WIN_STARTWIN_MESSAGES);
                                SetWindowPos(pages[TAB_CONFIG], hwnd,r.left,r.top,r.right,r.bottom,SWP_HIDEWINDOW);
                                SetWindowPos(pages[TAB_GAME], hwnd,r.left,r.top,r.right,r.bottom,SWP_HIDEWINDOW);
                                SetWindowPos(pages[TAB_MESSAGES], hwnd,r.left,r.top,r.right,r.bottom,SWP_HIDEWINDOW);

                                // Tell the editfield acting as the console to exclude the width of the scrollbar
                                GetClientRect(pages[TAB_MESSAGES],&r);
                                r.right -= GetSystemMetrics(SM_CXVSCROLL)+4;
                                r.left = r.top = 0;
                                SendMessage(pages[TAB_MESSAGES], EM_SETRECTNP,0,(LPARAM)&r);

                                // Set a tab stop in the game data listbox
                                {
                                DWORD tabs[1] = { 150 };
                                ListBox_SetTabStops(GetDlgItem(pages[TAB_GAME], IDGDATA), 1, tabs);
                                }

                                SetFocus(GetDlgItem(hwndDlg, WIN_STARTWIN_START));
                                SetWindowText(hwndDlg, apptitle);
                        }
                        return FALSE;
                }

                case WM_NOTIFY: {
                        LPNMHDR nmhdr = (LPNMHDR)lParam;
                        int cur;
                        if (nmhdr->idFrom != WIN_STARTWIN_TABCTL) break;
                        cur = (int)SendMessage(nmhdr->hwndFrom, TCM_GETCURSEL,0,0);
                        switch (nmhdr->code) {
                                case TCN_SELCHANGING: {
                                        if (cur < 0 || !pages[cur]) break;
                                        ShowWindow(pages[cur],SW_HIDE);
                                        return TRUE;
                                }
                                case TCN_SELCHANGE: {
                                        if (cur < 0 || !pages[cur]) break;
                                        ShowWindow(pages[cur],SW_SHOW);
                                        return TRUE;
                                }
                        }
                        break;
                }

                case WM_CLOSE:
                        if (mode == TAB_CONFIG) done = 0;
                        else quitevent++;
                        return TRUE;

                case WM_DESTROY:
                        if (hbmp) {
                                DeleteObject(hbmp);
                                hbmp = NULL;
                        }

                        if (pages[TAB_GAME]) {
                                DestroyWindow(pages[TAB_GAME]);
                                pages[TAB_GAME] = NULL;
                        }

                        if (pages[TAB_CONFIG]) {
                                DestroyWindow(pages[TAB_CONFIG]);
                                pages[TAB_CONFIG] = NULL;
                        }

                        startupdlg = NULL;
                        return TRUE;

                case WM_COMMAND:
                        switch (LOWORD(wParam)) {
                                case WIN_STARTWIN_CANCEL:
                                        if (mode == TAB_CONFIG) done = 0;
                                        else quitevent++;
                                        return TRUE;
                                case WIN_STARTWIN_START: done = 1; return TRUE;
                        }
                        return FALSE;

                case WM_CTLCOLORSTATIC:
                        if ((HWND)lParam == pages[TAB_MESSAGES])
                                return (BOOL)GetSysColorBrush(COLOR_WINDOW);
                        break;

                default: break;
        }

        return FALSE;
}


int startwin_open(void)
{
        INITCOMMONCONTROLSEX icc;
        if (startupdlg) return 1;
        icc.dwSize = sizeof(icc);
        icc.dwICC = ICC_TAB_CLASSES;
        InitCommonControlsEx(&icc);
        startupdlg = CreateDialog((HINSTANCE)win_gethinstance(), MAKEINTRESOURCE(WIN_STARTWIN), NULL, startup_dlgproc);
        if (startupdlg) {
                SetPage(TAB_MESSAGES);
                EnableConfig(0);
                return 0;
        }
        return -1;
}

int startwin_close(void)
{
        if (!startupdlg) return 1;
        DestroyWindow(startupdlg);
        startupdlg = NULL;
        return 0;
}

int startwin_puts(const char *buf)
{
        const char *p = NULL, *q = NULL;
        char workbuf[1024];
        static int newline = 0;
        int curlen, linesbefore, linesafter;
        HWND edctl;
        int vis;

        if (!startupdlg) return 1;
       
        edctl = pages[TAB_MESSAGES];
        if (!edctl) return -1;

        vis = ((int)SendMessage(GetDlgItem(startupdlg, WIN_STARTWIN_TABCTL), TCM_GETCURSEL,0,0) == TAB_MESSAGES);

        if (vis) SendMessage(edctl, WM_SETREDRAW, FALSE,0);
        curlen = SendMessage(edctl, WM_GETTEXTLENGTH, 0,0);
        SendMessage(edctl, EM_SETSEL, (WPARAM)curlen, (LPARAM)curlen);
        linesbefore = SendMessage(edctl, EM_GETLINECOUNT, 0,0);
        p = buf;
        while (*p) {
                if (newline) {
                        SendMessage(edctl, EM_REPLACESEL, 0, (LPARAM)"\r\n");
                        newline = 0;
                }
                q = p;
                while (*q && *q != '\n') q++;
                memcpy(workbuf, p, q-p);
                if (*q == '\n') {
                        if (!q[1]) {
                                newline = 1;
                                workbuf[q-p] = 0;
                        } else {
                                workbuf[q-p] = '\r';
                                workbuf[q-p+1] = '\n';
                                workbuf[q-p+2] = 0;
                        }
                        p = q+1;
                } else {
                        workbuf[q-p] = 0;
                        p = q;
                }
                SendMessage(edctl, EM_REPLACESEL, 0, (LPARAM)workbuf);
        }
        linesafter = SendMessage(edctl, EM_GETLINECOUNT, 0,0);
        SendMessage(edctl, EM_LINESCROLL, 0, linesafter-linesbefore);
        if (vis) SendMessage(edctl, WM_SETREDRAW, TRUE,0);
        return 0;
}

int startwin_settitle(const char *str)
{
        if (!startupdlg) return 1;
        SetWindowText(startupdlg, str);
        return 0;
}

int startwin_idle(void *v)
{
        if (!startupdlg || !IsWindow(startupdlg)) return 0;
        if (IsDialogMessage(startupdlg, (MSG*)v)) return 1;
        return 0;
}

extern char *duke3dgrp;

int startwin_run(void)
{
        MSG msg;
        if (!startupdlg) return 1;

        done = -1;

        ScanGroups();
#ifdef JFAUD
        EnumAudioDevs(&wavedevs, NULL, NULL);
#endif
        SetPage(TAB_CONFIG);
        EnableConfig(1);

        settings.fullscreen = ScreenMode;
        settings.xdim = ScreenWidth;
        settings.ydim = ScreenHeight;
        settings.bpp = ScreenBPP;
        settings.forcesetup = ForceSetup;
        settings.usemouse = UseMouse;
        settings.usejoy = UseJoystick;
        strncpy(settings.selectedgrp, duke3dgrp, BMAX_PATH);
        PopulateForm(-1);

        while (done < 0) {
                switch (GetMessage(&msg, NULL, 0,0)) {
                        case 0: done = 1; break;
                        case -1: return -1;
                        default:
                                 if (IsWindow(startupdlg) && IsDialogMessage(startupdlg, &msg)) break;
                                 TranslateMessage(&msg);
                                 DispatchMessage(&msg);
                                 break;
                }
        }

        SetPage(TAB_MESSAGES);
        EnableConfig(0);
        if (done) {
                ScreenMode = settings.fullscreen;
                ScreenWidth = settings.xdim;
                ScreenHeight = settings.ydim;
                ScreenBPP = settings.bpp;
                ForceSetup = settings.forcesetup;
                UseMouse = settings.usemouse;
                UseJoystick = settings.usejoy;
                duke3dgrp = settings.selectedgrp;
        }

        if (wavedevs) {
                struct audioenumdev *d, *e;
                free(wavedevs->drvs);
                for (e=wavedevs->devs; e; e=d) {
                        d = e->next;
                        if (e->devs) free(e->devs);
                        free(e);
                }
                free(wavedevs);
        }

        return done;
}