vfdguisave.c

Go to the documentation of this file.

/*
    vfdguisave.c

    Virtual Floppy Drive for Windows
    Driver control library
    Save image GUI utility function

    Copyright (c) 2003-2005 Ken Kato
*/

#ifdef __cplusplus
#pragma message(__FILE__": Compiled as C++ for testing purpose.")
#endif  // __cplusplus

#define WIN32_LEAN_AND_MEAN
#include <windows.h>
#ifdef _MSC_VER
#pragma warning(push,3)
#endif
#include <commdlg.h>
#ifdef _MSC_VER
#pragma warning(pop)
#endif

#include "vfdtypes.h"
#include "vfdapi.h"
#include "vfdlib.h"
#ifndef __REACTOS__
#include "vfdmsg.h"
#else
#include "vfdmsg_lib.h"
#endif
#include "vfdguirc.h"

//
//  local functions
//
#ifndef __REACTOS__
static INT CALLBACK SaveDialogProc(
#else
static INT_PTR CALLBACK SaveDialogProc(
#endif
    HWND            hDlg,
    UINT            uMsg,
    WPARAM          wParam,
    LPARAM          lParam);

static void OnInit(HWND hDlg, PCSAVE_PARAM pParam);
static void OnTarget(HWND hDlg, HWND hEdit);
static void OnBrowse(HWND hDlg);
static void OnOverwrite(HWND hDlg, HWND hCheck);
static void OnTruncate(HWND hDlg, HWND hCheck);
static DWORD OnOK(HWND hDlg);

//
//  Show Save Image dialog box
//
DWORD WINAPI VfdGuiSave(
    HWND            hParent,
    ULONG           nDevice)
{
    SAVE_PARAM      param;
    CHAR            path[MAX_PATH];
    DWORD           ret;

    //  open the source device

    param.hDevice = VfdOpenDevice(nDevice);

    if (param.hDevice == INVALID_HANDLE_VALUE) {
        return GetLastError();
    }

    //  get current image information

    param.ImageName = path;

    ret = VfdGetImageInfo(
        param.hDevice,
        param.ImageName,
        &param.DiskType,
        &param.MediaType,
        &param.MediaFlags,
        &param.FileType,
        &param.ImageSize);

    if (ret == ERROR_SUCCESS) {

        //  show dialog box

        ret = GuiSaveParam(hParent, &param);
    }

    //  close the source device

    CloseHandle(param.hDevice);

    return ret;
}

DWORD GuiSaveParam(
    HWND            hParent,
    PCSAVE_PARAM    pParam)
{
    switch (DialogBoxParam(
        g_hDllModule,
        MAKEINTRESOURCE(IDD_SAVEDIALOG),
        hParent,
        SaveDialogProc,
        (LPARAM)pParam))
    {
    case IDOK:
        return ERROR_SUCCESS;

    case IDCANCEL:
        return ERROR_CANCELLED;

    default:
        return GetLastError();
    }
}

//
// The dialog procedure
//
#ifndef __REACTOS__
INT CALLBACK SaveDialogProc(
#else
INT_PTR CALLBACK SaveDialogProc(
#endif
    HWND            hDlg,
    UINT            uMsg,
    WPARAM          wParam,
    LPARAM          lParam)
{
    switch (uMsg) {
    case WM_INITDIALOG:
        OnInit(hDlg, (PCSAVE_PARAM)lParam);
        return TRUE;

    case WM_COMMAND:
        switch (wParam) {
        case MAKELONG(IDC_TARGETFILE, EN_CHANGE):
            OnTarget(hDlg, (HWND)lParam);
            return TRUE;

        case IDC_BROWSE:
            OnBrowse(hDlg);
            return TRUE;

        case IDC_OVERWRITE:
            OnOverwrite(hDlg, (HWND)lParam);
            return TRUE;

        case IDC_TRUNCATE:
            OnTruncate(hDlg, (HWND)lParam);
            return TRUE;

        case IDOK:
            if (OnOK(hDlg) == ERROR_SUCCESS) {
                EndDialog(hDlg, IDOK);
            }
            return TRUE;

        case IDCANCEL:
            EndDialog(hDlg, IDCANCEL);
            return TRUE;
        }
        break;

    case WM_CONTEXTMENU:
        ShowContextMenu(hDlg, (HWND)wParam, lParam);
        break;

    case WM_HELP:
        {
            LPHELPINFO info = (LPHELPINFO)lParam;

            if (info->iContextType == HELPINFO_WINDOW) {
                ShowHelpWindow(hDlg, info->iCtrlId);
            }
        }
        return TRUE;
    }

    return FALSE;
}

//
//  Initialize the dialog
//
void OnInit(
    HWND            hDlg,
    PCSAVE_PARAM    pParam)
{
    //  Store parameters

    SetWindowLongPtr(hDlg, GWLP_USERDATA, (ULONG_PTR)pParam);

    //  clear the target existence flag

    SetWindowLong(hDlg, DWL_USER, 0);

    // Set dialog window title

    SetControlText(hDlg, 0, MSG_SAVE_TITLE);

    // Set control captions

    SetControlText(hDlg, IDC_IMAGEFILE_LABEL,   MSG_IMAGEFILE_LABEL);
    SetControlText(hDlg, IDC_DISKTYPE_LABEL,    MSG_DISKTYPE_LABEL);
    SetControlText(hDlg, IDC_MEDIATYPE_LABEL,   MSG_MEDIATYPE_LABEL);
    SetControlText(hDlg, IDC_TARGETFILE_LABEL,  MSG_TARGETFILE_LABEL);
    SetControlText(hDlg, IDC_IMAGEDESC_LABEL,   MSG_DESCRIPTION_LABEL);
    SetControlText(hDlg, IDC_BROWSE,            MSG_BROWSE_BUTTON);
    SetControlText(hDlg, IDC_OVERWRITE,         MSG_OVERWRITE_CHECK);
    SetControlText(hDlg, IDC_TRUNCATE,          MSG_TRUNCATE_CHECK);
    SetControlText(hDlg, IDOK,                  MSG_SAVE_BUTTON);
    SetControlText(hDlg, IDCANCEL,              MSG_CANCEL_BUTTON);

    //  set disk type

    if (pParam->DiskType == VFD_DISKTYPE_FILE) {
        SetDlgItemText(hDlg, IDC_DISKTYPE, "FILE");
    }
    else {
        SetDlgItemText(hDlg, IDC_DISKTYPE, "RAM");
    }

    //  display media type

    SetDlgItemText(hDlg, IDC_MEDIATYPE,
        VfdMediaTypeName(pParam->MediaType));

    //  set current image and initial target

    if (pParam->ImageName[0]) {
        SetDlgItemText(hDlg, IDC_IMAGEFILE, pParam->ImageName);
        SetDlgItemText(hDlg, IDC_TARGETFILE, pParam->ImageName);
    }
    else if (pParam->DiskType != VFD_DISKTYPE_FILE) {
        SetDlgItemText(hDlg, IDC_IMAGEFILE, "<RAM>");
        OnTarget(hDlg, GetDlgItem(hDlg, IDC_TARGETFILE));
    }
}

//
//  Path is changed -- check specified target file
//
void OnTarget(
    HWND            hDlg,
    HWND            hEdit)
{
    PCSAVE_PARAM    param;
    CHAR            buf[MAX_PATH];
    ULONG           file_size;
    VFD_FILETYPE    file_type;
    DWORD           file_attr;
    DWORD           ret;

    //  clear the target existence flag

    SetWindowLong(hDlg, DWL_USER, 0);

    //  clear the description and hint text

    SetDlgItemText(hDlg, IDC_IMAGEFILE_DESC, NULL);
    SetDlgItemText(hDlg, IDC_IMAGEFILE_HINT, NULL);

    //  get the target file name

    if (GetWindowText(hEdit, buf, sizeof(buf)) == 0) {

        //  target file is blank

        EnableWindow(GetDlgItem(hDlg, IDC_OVERWRITE), FALSE);
        EnableWindow(GetDlgItem(hDlg, IDC_TRUNCATE), FALSE);
        EnableWindow(GetDlgItem(hDlg, IDOK), FALSE);

        return;
    }
    else {
        CHAR full[MAX_PATH];
        PSTR file;

        //  convert into a full path

        if (GetFullPathName(buf, sizeof(full), full, &file)) {
            strcpy(buf, full);
        }
    }

    //
    //  get the current image info
    //
    param = (PCSAVE_PARAM)GetWindowLongPtr(hDlg, GWLP_USERDATA);

    if (_stricmp(param->ImageName, buf) == 0) {

        //  target is the current file

        char desc[MAX_PATH];

        VfdMakeFileDesc(desc, sizeof(desc),
            param->FileType, param->ImageSize,
            GetFileAttributes(param->ImageName));

        SetDlgItemText(hDlg, IDC_IMAGEFILE_DESC, desc);
        SetControlText(hDlg, IDC_IMAGEFILE_HINT, MSG_CURRENT_FILE);

        if (param->DiskType == VFD_DISKTYPE_FILE) {

            //  cannot overwrite the current FILE disk image

            EnableWindow(GetDlgItem(hDlg, IDC_OVERWRITE), FALSE);
            EnableWindow(GetDlgItem(hDlg, IDC_TRUNCATE), FALSE);
            EnableWindow(GetDlgItem(hDlg, IDOK), FALSE);
            return;
        }
    }

    //
    //  check target image file
    //
    ret = VfdCheckImageFile(
        buf, &file_attr, &file_type, &file_size);

    if (ret == ERROR_FILE_NOT_FOUND) {
        //  file does not exist
        SetControlText(hDlg, IDC_IMAGEFILE_DESC, MSG_DESC_NEW_FILE);
        EnableWindow(GetDlgItem(hDlg, IDC_OVERWRITE), FALSE);
        EnableWindow(GetDlgItem(hDlg, IDC_TRUNCATE), FALSE);
        EnableWindow(GetDlgItem(hDlg, IDOK), TRUE);
        return;
    }
    else if (ret != ERROR_SUCCESS) {
        SetDlgItemText(hDlg, IDC_IMAGEFILE_DESC, SystemMessage(ret));
        EnableWindow(GetDlgItem(hDlg, IDC_OVERWRITE), FALSE);
        EnableWindow(GetDlgItem(hDlg, IDC_TRUNCATE), FALSE);
        EnableWindow(GetDlgItem(hDlg, IDOK), FALSE);
        return;
    }

    //  set target file description

    VfdMakeFileDesc(buf, sizeof(buf),
        file_type, file_size, file_attr);

    SetDlgItemText(hDlg, IDC_IMAGEFILE_DESC, buf);

    //  check target file type

    if (file_type == VFD_FILETYPE_ZIP) {
        SetControlText(hDlg, IDC_IMAGEFILE_HINT, MSG_TARGET_IS_ZIP);
        EnableWindow(GetDlgItem(hDlg, IDC_OVERWRITE), FALSE);
        EnableWindow(GetDlgItem(hDlg, IDC_TRUNCATE), FALSE);
        EnableWindow(GetDlgItem(hDlg, IDOK), FALSE);
        return;
    }

    //  the target is an existing raw file

    EnableWindow(GetDlgItem(hDlg, IDC_OVERWRITE), TRUE);

    //  set truncate box

    if (file_size > VfdGetMediaSize(param->MediaType)) {
        EnableWindow(GetDlgItem(hDlg, IDC_TRUNCATE), TRUE);
        SetControlText(hDlg, IDC_IMAGEFILE_HINT, MSG_SIZE_MISMATCH);
    }
    else {
        EnableWindow(GetDlgItem(hDlg, IDC_TRUNCATE), FALSE);
    }

    //  check overwrite setting

    if (IsDlgButtonChecked(hDlg, IDC_OVERWRITE) != BST_CHECKED) {
        EnableWindow(GetDlgItem(hDlg, IDOK), FALSE);
    }
    else {
        EnableWindow(GetDlgItem(hDlg, IDOK), TRUE);
    }

    //  target file exists and overwritable

    SetWindowLong(hDlg, DWL_USER, 1);
}


//
//  Show save file dialog box
//
void OnBrowse(
    HWND            hDlg)
{
    OPENFILENAME    ofn;
    PSTR            title;
    CHAR            file[MAX_PATH];
    CHAR            dir[MAX_PATH];
    DWORD           len;

    title = ModuleMessage(MSG_SAVE_TITLE);

    ZeroMemory(&ofn, sizeof(ofn));
    ZeroMemory(file, sizeof(file));
    ZeroMemory(dir, sizeof(dir));

    len = GetDlgItemText(hDlg, IDC_TARGETFILE, file, sizeof(file));

    if (len && file[len - 1] == '\\') {
        strcpy(dir, file);
        ZeroMemory(file, sizeof(file));
    }

    // Different structure sizes must be used for NT and 2K/XP
    ofn.lStructSize = IS_WINDOWS_NT() ?
        OPENFILENAME_SIZE_VERSION_400 : sizeof(ofn);

    ofn.hwndOwner   = hDlg;
    ofn.lpstrFile   = file;
    ofn.nMaxFile    = sizeof(file);
    ofn.lpstrInitialDir = dir;
    ofn.lpstrTitle  = title ? title : "Save Image";
    ofn.lpstrFilter = "*.*\0*.*\0";
    ofn.Flags       = OFN_EXPLORER | OFN_ENABLESIZING | OFN_HIDEREADONLY | OFN_PATHMUSTEXIST;

    if (GetSaveFileName(&ofn)) {
        SetDlgItemText(hDlg, IDC_TARGETFILE, file);
        SetFocus(GetDlgItem(hDlg, IDC_TARGETFILE));
    }

    if (title) {
        LocalFree(title);
    }
}

void OnOverwrite(
    HWND            hDlg,
    HWND            hCheck)
{
    if (GetWindowLong(hDlg, DWL_USER)) {
        //  the target file exists and overwritable
        if (SendMessage(hCheck, BM_GETCHECK, 0, 0) != BST_CHECKED) {
            EnableWindow(GetDlgItem(hDlg, IDOK), FALSE);
        }
        else {
            EnableWindow(GetDlgItem(hDlg, IDOK), TRUE);
        }
    }
}

void OnTruncate(
    HWND            hDlg,
    HWND            hCheck)
{
    UNREFERENCED_PARAMETER(hDlg);
    UNREFERENCED_PARAMETER(hCheck);
}

//
//  Save image
//
DWORD OnOK(
    HWND            hDlg)
{
    PCSAVE_PARAM    param;
    CHAR            path[MAX_PATH];
    BOOL            overwrite;
    BOOL            truncate;
    DWORD           ret;

    param = (PCSAVE_PARAM)GetWindowLongPtr(hDlg, GWLP_USERDATA);

    if (!param) {
        return ERROR_INVALID_FUNCTION;
    }

    //  get the target image name

    if (GetDlgItemText(hDlg, IDC_TARGETFILE, path, sizeof(path)) == 0) {
        return ERROR_INVALID_FUNCTION;
    }

    if (GetWindowLong(hDlg, DWL_USER)) {
        //  the target file exists and overwritable
        overwrite = (IsDlgButtonChecked(hDlg, IDC_OVERWRITE) == BST_CHECKED);
        truncate = (IsDlgButtonChecked(hDlg, IDC_TRUNCATE) == BST_CHECKED);
    }
    else {
        overwrite = FALSE;
        truncate = TRUE;
    }

retry:
    ret = VfdDismountVolume(param->hDevice, FALSE);

    if (ret == ERROR_ACCESS_DENIED) {
        PSTR msg = ModuleMessage(MSG_UNMOUNT_CONFIRM);

        int reply = MessageBox(
            hDlg, msg ? msg : "retry", VFD_MSGBOX_TITLE,
            MB_ICONEXCLAMATION | MB_CANCELTRYCONTINUE);

        if (msg) {
            LocalFree(msg);
        }

        if (reply == IDRETRY) {
            goto retry;
        }
        else if (reply == IDCANCEL) {
            return ERROR_CANCELLED;
        }
        else {
            VfdDismountVolume(param->hDevice, TRUE);
        }
    }
    else if (ret != ERROR_SUCCESS) {

        MessageBox(hDlg, SystemMessage(ret),
            VFD_MSGBOX_TITLE, MB_ICONSTOP);

        return ret;
    }

    ret = VfdSaveImage(param->hDevice, path, overwrite, truncate);

    if (ret != ERROR_SUCCESS) {

        //  show error message

        MessageBox(hDlg, SystemMessage(ret),
            VFD_MSGBOX_TITLE, MB_ICONSTOP);
    }

    return ret;
}