dem.h File Reference

#include <crt/dos.h>
#include "dos32krnl/dos.h"

Include dependency graph for dem.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Macros
#define	BOP_LOAD_DOS   0x2B
#define	BOP_START_DOS   0x2C
#define	BOP_DOS   0x50
#define	BOP_CMD   0x54
#define	BiosDisplayMessage(Format, ...)    PrintMessageAnsi(Dem_BiosCharPrint, (Format), ##__VA_ARGS__)
#define	DosDisplayMessage(Format, ...)    PrintMessageAnsi(DosCharPrint, (Format), ##__VA_ARGS__)
#define	FA_NORMAL   _A_NORMAL
	File attributes for demFileFindFirst().
#define	FA_READONLY   _A_RDONLY
#define	FA_HIDDEN   _A_HIDDEN
#define	FA_SYSTEM   _A_SYSTEM
#define	FA_VOLID   _A_VOLID
#define	FA_LABEL   FA_VOLID
#define	FA_DIRECTORY   _A_SUBDIR
#define	FA_ARCHIVE   _A_ARCH
#define	FA_DEVICE   0x0040
#define	FA_VALID   (FA_ARCHIVE | FA_DIRECTORY | FA_SYSTEM | FA_HIDDEN | FA_READONLY | FA_NORMAL)
#define	NT_TO_DOS_FA(Attrs)    ( ((Attrs) == FILE_ATTRIBUTE_NORMAL) ? FA_NORMAL : (LOBYTE(Attrs) & FA_VALID) )
	Convert Win32/NT file attributes to DOS format.

Functions
VOID	Dem_BiosCharPrint (CHAR Character)
VOID	DosCharPrint (CHAR Character)
BOOLEAN	DosShutdown (BOOLEAN Immediate)
DWORD	DosStartProcess32 (IN LPCSTR ExecutablePath, IN LPCSTR CommandLine, IN LPCSTR Environment OPTIONAL, IN DWORD ReturnAddress OPTIONAL, IN BOOLEAN StartComSpec)
DWORD WINAPI	demClientErrorEx (IN HANDLE FileHandle, IN CHAR Unknown, IN BOOL Flag)
DWORD WINAPI	demFileDelete (IN LPCSTR FileName)
DWORD WINAPI	demFileFindFirst (_Out_ PVOID pFindFileData, _In_ PCSTR FileName, _In_ WORD AttribMask)
DWORD WINAPI	demFileFindNext (_Inout_ PVOID pFindFileData)
UCHAR WINAPI	demGetPhysicalDriveType (IN UCHAR DriveNumber)
BOOL WINAPI	demIsShortPathName (IN LPCSTR Path, IN BOOL Unknown)
DWORD WINAPI	demSetCurrentDirectoryGetDrive (IN LPCSTR CurrentDirectory, OUT PUCHAR DriveNumber)

Macro Definition Documentation

BiosDisplayMessage

#define BiosDisplayMessage	(		Format,
			...
	)		PrintMessageAnsi(Dem_BiosCharPrint, (Format), ##__VA_ARGS__)

Definition at line 34 of file dem.h.

BOP_CMD

#define BOP_CMD   0x54

Definition at line 27 of file dem.h.

BOP_DOS

#define BOP_DOS   0x50

Definition at line 26 of file dem.h.

BOP_LOAD_DOS

#define BOP_LOAD_DOS   0x2B

Definition at line 24 of file dem.h.

BOP_START_DOS

#define BOP_START_DOS   0x2C

Definition at line 25 of file dem.h.

DosDisplayMessage

#define DosDisplayMessage	(		Format,
			...
	)		PrintMessageAnsi(DosCharPrint, (Format), ##__VA_ARGS__)

Definition at line 38 of file dem.h.

FA_ARCHIVE

#define FA_ARCHIVE   _A_ARCH

Definition at line 76 of file dem.h.

FA_DEVICE

#define FA_DEVICE   0x0040

Definition at line 77 of file dem.h.

FA_DIRECTORY

#define FA_DIRECTORY   _A_SUBDIR

Definition at line 75 of file dem.h.

FA_HIDDEN

#define FA_HIDDEN   _A_HIDDEN

Definition at line 71 of file dem.h.

FA_LABEL

#define FA_LABEL   FA_VOLID

Definition at line 74 of file dem.h.

FA_NORMAL

#define FA_NORMAL   _A_NORMAL

File attributes for demFileFindFirst().

Definition at line 69 of file dem.h.

FA_READONLY

#define FA_READONLY   _A_RDONLY

Definition at line 70 of file dem.h.

FA_SYSTEM

#define FA_SYSTEM   _A_SYSTEM

Definition at line 72 of file dem.h.

FA_VALID

#define FA_VALID   (FA_ARCHIVE | FA_DIRECTORY | FA_SYSTEM | FA_HIDDEN | FA_READONLY | FA_NORMAL)

Definition at line 79 of file dem.h.

FA_VOLID

#define FA_VOLID   _A_VOLID

Definition at line 73 of file dem.h.

NT_TO_DOS_FA

#define NT_TO_DOS_FA

(

Attrs

)

( ((Attrs) == FILE_ATTRIBUTE_NORMAL) ? FA_NORMAL : (LOBYTE(Attrs) & FA_VALID) )

Convert Win32/NT file attributes to DOS format.

Definition at line 82 of file dem.h.

Function Documentation

Dem_BiosCharPrint()

VOID Dem_BiosCharPrint

(

CHAR

Character

)

Definition at line 57 of file dem.c.

{
    /* Save AX and BX */
    USHORT AX = getAX();
    USHORT BX = getBX();
 
    /*
     * Set the parameters:
     * AL contains the character to print,
     * BL contains the character attribute,
     * BH contains the video page to use.
     */
    setAL(Character);
    setBL(DEFAULT_ATTRIBUTE);
    setBH(Bda->VideoPage);
 
    /* Call the BIOS INT 10h, AH=0Eh "Teletype Output" */
    setAH(0x0E);
    Int32Call(&DosContext, BIOS_VIDEO_INTERRUPT);
 
    /* Restore AX and BX */
    setBX(BX);
    setAX(AX);
}

demClientErrorEx()

DWORD WINAPI demClientErrorEx	(	IN HANDLE	FileHandle,
		IN CHAR	Unknown,
		IN BOOL	Flag
	)

Definition at line 1392 of file dem.c.

{
    UNIMPLEMENTED;
    return GetLastError();
}

demFileDelete()

DWORD WINAPI demFileDelete

(

IN LPCSTR

FileName

)

Definition at line 1402 of file dem.c.

{
    if (DeleteFileA(FileName)) SetLastError(ERROR_SUCCESS);
 
    return GetLastError();
}

Referenced by DosInt21h().

demFileFindFirst()

DWORD WINAPI demFileFindFirst	(	_Out_ PVOID	pFindFileData,
		_In_ PCSTR	FileName,
		_In_ WORD	AttribMask
	)

Definition at line 1515 of file dem.c.

{
    PDOS_FIND_FILE_BLOCK FindFileBlock = (PDOS_FIND_FILE_BLOCK)pFindFileData;
    HANDLE SearchHandle;
    WIN32_FIND_DATAA FindData;
    PCSTR ShortName = NULL;
 
    /* Reset the private block fields */
    RtlZeroMemory(FindFileBlock, RTL_SIZEOF_THROUGH_FIELD(DOS_FIND_FILE_BLOCK, SearchHandle));
 
    // TODO: Handle FA_VOLID for volume label.
    if (AttribMask & FA_VOLID)
    {
        DPRINT1("demFileFindFirst: Volume label attribute is UNIMPLEMENTED!\n");
        AttribMask &= ~FA_VOLID; // Remove it for the time being...
    }
 
    /* Filter out the ignored attributes */
    AttribMask &= ~(FA_DEVICE | FA_ARCHIVE | FA_READONLY);
 
    /* Start a search */
    SearchHandle = FindFirstFileA(FileName, &FindData);
    if (SearchHandle == INVALID_HANDLE_VALUE)
        return GetLastError();
 
    /* Check the attributes and retry as long as we haven't found a matching file */
    while (!dempIsFileMatch(&FindData, AttribMask, &ShortName))
    {
        /* Continue searching. If we fail at some point,
         * stop the search and return an error. */
        if (!FindNextFileA(SearchHandle, &FindData))
        {
            FindClose(SearchHandle);
            return GetLastError();
        }
    }
 
    /* Fill the block */
    FindFileBlock->DriveLetter  = DosData->Sda.CurrentDrive + 'A';
    strncpy(FindFileBlock->Pattern, FileName, _countof(FindFileBlock->Pattern));
    FindFileBlock->AttribMask   = AttribMask;
    FindFileBlock->SearchHandle = SearchHandle;
    FindFileBlock->Attributes   = LOBYTE(FindData.dwFileAttributes);
    FileTimeToDosDateTime(&FindData.ftLastWriteTime,
                          &FindFileBlock->FileDate,
                          &FindFileBlock->FileTime);
    FindFileBlock->FileSize = FindData.nFileSizeHigh ? MAXDWORD
                                                     : FindData.nFileSizeLow;
 
    /* Copy the NULL-terminated short file name */
    RtlStringCchCopyA(FindFileBlock->FileName,
                      _countof(FindFileBlock->FileName),
                      ShortName);
 
    return ERROR_SUCCESS;
}

Referenced by DosInt21h().

demFileFindNext()

DWORD WINAPI demFileFindNext

(

_Inout_ PVOID

pFindFileData

)

Definition at line 1592 of file dem.c.

{
    PDOS_FIND_FILE_BLOCK FindFileBlock = (PDOS_FIND_FILE_BLOCK)pFindFileData;
    HANDLE SearchHandle = FindFileBlock->SearchHandle;
    WIN32_FIND_DATAA FindData;
    PCSTR ShortName = NULL;
 
    do
    {
        /* Continue searching. If we fail at some point,
         * stop the search and return an error. */
        if (!FindNextFileA(SearchHandle, &FindData))
        {
            FindClose(SearchHandle);
 
            /* Reset the private block fields */
            RtlZeroMemory(FindFileBlock, RTL_SIZEOF_THROUGH_FIELD(DOS_FIND_FILE_BLOCK, SearchHandle));
            return GetLastError();
        }
    }
    /* Check the attributes and retry as long as we haven't found a matching file */
    while (!dempIsFileMatch(&FindData, FindFileBlock->AttribMask, &ShortName));
 
    /* Update the block */
    FindFileBlock->Attributes = LOBYTE(FindData.dwFileAttributes);
    FileTimeToDosDateTime(&FindData.ftLastWriteTime,
                          &FindFileBlock->FileDate,
                          &FindFileBlock->FileTime);
    FindFileBlock->FileSize = FindData.nFileSizeHigh ? MAXDWORD
                                                     : FindData.nFileSizeLow;
 
    /* Copy the NULL-terminated short file name */
    RtlStringCchCopyA(FindFileBlock->FileName,
                      _countof(FindFileBlock->FileName),
                      ShortName);
 
    return ERROR_SUCCESS;
}

Referenced by DosInt21h().

demGetPhysicalDriveType()

UCHAR WINAPI demGetPhysicalDriveType

(

IN UCHAR

DriveNumber

)

Definition at line 1634 of file dem.c.

{
    UNIMPLEMENTED;
    return DOSDEVICE_DRIVE_UNKNOWN;
}

demIsShortPathName()

BOOL WINAPI demIsShortPathName	(	IN LPCSTR	Path,
		IN BOOL	Unknown
	)

Definition at line 1642 of file dem.c.

{
    UNIMPLEMENTED;
    return FALSE;
}

demSetCurrentDirectoryGetDrive()

DWORD WINAPI demSetCurrentDirectoryGetDrive	(	IN LPCSTR	CurrentDirectory,
		OUT PUCHAR	DriveNumber
	)

Definition at line 1651 of file dem.c.

{
    UNIMPLEMENTED;
    return ERROR_SUCCESS;
}

DosCharPrint()

VOID DosCharPrint

(

CHAR

Character

)

Definition at line 82 of file dem.c.

{
    DosPrintCharacter(DOS_OUTPUT_HANDLE, Character);
}

DosShutdown()

BOOLEAN DosShutdown

(

BOOLEAN

Immediate

)

Definition at line 1331 of file dem.c.

{
    /*
     * Immediate = TRUE:  Immediate shutdown;
     *             FALSE: Delayed shutdown (notification).
     */
 
#ifndef STANDALONE
    if (Immediate)
    {
        ExitVDM(FALSE, 0);
        return TRUE;
    }
    else
    {
// HACK!
extern HANDLE VdmTaskEvent; // see emulator.c
 
        /*
         * Signal the root COMMAND.COM that it should terminate
         * when it checks for a new command.
         */
        RootCmd.Terminated = TRUE;
 
        /* If the list is already empty, or just contains only one element, bail out */
        // FIXME: Question: if the list has only one element, is it ALWAYS RootCmd ??
        // FIXME: The following is hackish.
        if ((IsListEmpty(&ComSpecInfoList) ||
            (ComSpecInfoList.Flink == &RootCmd.Entry   &&
             ComSpecInfoList.Blink == &RootCmd.Entry)) &&
            ReentrancyCount == 0 &&
            WaitForSingleObject(VdmTaskEvent, 0) == WAIT_TIMEOUT)
        {
            /* Nothing runs, so exit immediately */
            ExitVDM(FALSE, 0);
            return TRUE;
        }
 
        return FALSE;
    }
#else
    UNREFERENCED_PARAMETER(Immediate);
    return TRUE;
#endif
}

Referenced by VdmShutdown().

DosStartProcess32()

DWORD DosStartProcess32	(	IN LPCSTR	ExecutablePath,
		IN LPCSTR	CommandLine,
		IN LPCSTR Environment	OPTIONAL,
		IN DWORD ReturnAddress	OPTIONAL,
		IN BOOLEAN	StartComSpec
	)

Definition at line 916 of file dem.c.

{
    DWORD Result = ERROR_SUCCESS;
    HANDLE CommandThread;
    DOS_START_PROC32 DosStartProc32;
#ifndef STANDALONE
    BOOL Success;
    VDM_COMMAND_INFO CommandInfo;
#endif
 
    DosStartProc32.ExecutablePath = (LPSTR)ExecutablePath;
    DosStartProc32.CommandLine    = (LPSTR)CommandLine;
    DosStartProc32.Environment    = (LPSTR)Environment;
 
#ifndef STANDALONE
    DosStartProc32.ComSpecInfo =
        RtlAllocateHeap(RtlGetProcessHeap(),
                        HEAP_ZERO_MEMORY,
                        sizeof(*DosStartProc32.ComSpecInfo));
    ASSERT(DosStartProc32.ComSpecInfo);
 
    DosStartProc32.hEvent = CreateEventW(NULL, FALSE, FALSE, NULL);
    ASSERT(DosStartProc32.hEvent);
#endif
 
    /* Pause the VM and detach from the console */
    EmulatorPause();
    DosProcessConsoleDetach();
 
    /* Start the 32-bit process via another thread */
    CommandThread = CreateThread(NULL, 0, &CommandThreadProc, &DosStartProc32, 0, NULL);
    if (CommandThread == NULL)
    {
        DisplayMessage(L"FATAL: Failed to create the command processing thread: %d", GetLastError());
        Result = GetLastError();
        goto Quit;
    }
 
#ifndef STANDALONE
    /* Close the thread handle */
    CloseHandle(CommandThread);
 
    /* Wait for the process to be ready to start */
    WaitForSingleObject(DosStartProc32.hEvent, INFINITE);
 
    /* Wait for any potential new DOS app started by the 32-bit process */
    RtlZeroMemory(&CommandInfo, sizeof(CommandInfo));
 
Retry:
    CommandInfo.VDMState = VDM_FLAG_NESTED_TASK | VDM_FLAG_DONT_WAIT;
    DPRINT1("Calling GetNextVDMCommand 32bit for possible new VDM task...\n");
    Success = GetNextVDMCommand(&CommandInfo);
    DPRINT1("GetNextVDMCommand 32bit awaited, success = %s, last error = %d\n", Success ? "true" : "false", GetLastError());
 
    /*
     * Check whether we were awaited because the 32-bit process was stopped,
     * or because it started a new DOS application.
     */
    if (CommandInfo.CmdLen != 0 || CommandInfo.AppLen != 0 || CommandInfo.PifLen != 0)
    {
        DPRINT1("GetNextVDMCommand 32bit, this is for a new VDM task - CmdLen = %d, AppLen = %d, PifLen = %d\n",
                CommandInfo.CmdLen, CommandInfo.AppLen, CommandInfo.PifLen);
 
        /* Repeat the request */
        Repeat = TRUE;
 
        /*
         * Set 'Reentry' to TRUE or FALSE depending on whether we are going
         * to reenter with a new COMMAND.COM. See the comment for:
         *     BOP_CMD 0x10 'Get start information'
         * (dem.c!DosCmdInterpreterBop) for more details.
         */
        Reentry = StartComSpec;
 
        /* If needed, start a new command interpreter to handle the possible incoming DOS commands */
        if (StartComSpec)
        {
            //
            // DosStartProcess32 was only called by DosCreateProcess, called from INT 21h,
            // so the caller stack is already prepared for running a new DOS program
            // (Flags, CS and IP, and the extra interrupt number, are already pushed).
            //
            Result = DosStartComSpec(FALSE, Environment, ReturnAddress,
                                     &DosStartProc32.ComSpecInfo->ComSpecPsp);
            if (Result != ERROR_SUCCESS)
            {
                DosDisplayMessage("Failed to start a new Command Interpreter (Error: %u).\n", Result);
                goto Quit;
            }
        }
        else
        {
            /* Retrieve the PSP of the COMSPEC (current PSP set by DosLoadExecutable) */
            DosStartProc32.ComSpecInfo->ComSpecPsp = Sda->CurrentPsp;
            Result = ERROR_SUCCESS;
        }
 
        /* Insert the new entry in the list; it will be freed when needed by COMMAND.COM */
        InsertComSpecInfo(DosStartProc32.ComSpecInfo);
    }
    else
    {
        DPRINT1("GetNextVDMCommand 32bit, 32-bit app stopped\n");
 
        /* Check whether this was our 32-bit app which was killed */
        if (!DosStartProc32.ComSpecInfo->Terminated)
        {
            DPRINT1("Not our 32-bit app, retrying...\n");
            goto Retry;
        }
 
        Result = DosStartProc32.ComSpecInfo->dwExitCode;
 
        /* Delete the entry */
        RtlFreeHeap(RtlGetProcessHeap(), 0, DosStartProc32.ComSpecInfo);
    }
#else
    /* Wait for the thread to finish */
    WaitForSingleObject(CommandThread, INFINITE);
    GetExitCodeThread(CommandThread, &Result);
 
    /* Close the thread handle */
    CloseHandle(CommandThread);
 
    DPRINT1("32-bit app stopped\n");
#endif
 
Quit:
#ifndef STANDALONE
    CloseHandle(DosStartProc32.hEvent);
#endif
 
    /* Attach to the console and resume the VM */
    DosProcessConsoleAttach();
    EmulatorResume();
 
    return Result;
}

Referenced by CmdStartComSpec32(), CmdStartExternalCommand(), and DosCreateProcess().