lwext4/blockdev/windows/file_windows.c

/*
 * Copyright (c) 2013 Grzegorz Kostka (kostka.grzegorz@gmail.com)
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include <ext4_config.h>
#include <ext4_blockdev.h>
#include <ext4_errno.h>
#include <stdio.h>
#include <stdbool.h>
#include <string.h>

#ifdef WIN32
#include <windows.h>
#include <winioctl.h>

/**@brief   Default filename.*/
static const char *fname = "ExtFs.img";

/**@brief   IO block size.*/
#define EXT4_IORAW_BSIZE 512

/**@brief   Image file descriptor.*/
static HANDLE dev_file;

/**********************BLOCKDEV INTERFACE**************************************/
static int file_open(struct ext4_blockdev *bdev);
static int file_bread(struct ext4_blockdev *bdev, void *buf, uint64_t blk_id,
            uint32_t blk_cnt);
static int file_bwrite(struct ext4_blockdev *bdev, const void *buf,
             uint64_t blk_id, uint32_t blk_cnt);
static int file_close(struct ext4_blockdev *bdev);

/******************************************************************************/
EXT4_BLOCKDEV_STATIC_INSTANCE(_filedev, EXT4_IORAW_BSIZE, 0, file_open,
                  file_bread, file_bwrite, file_close, 0, 0);

/******************************************************************************/
static int file_open(struct ext4_blockdev *bdev)
{
    char path[64];
    DISK_GEOMETRY pdg;
    uint64_t disk_size;
    BOOL bResult = FALSE;
    DWORD junk;

    sprintf(path, "\\\\.\\%s", fname);
    printf("%s\n",path);
    dev_file =
        CreateFile(path, GENERIC_READ | GENERIC_WRITE,
               FILE_SHARE_WRITE | FILE_SHARE_READ, NULL, OPEN_EXISTING,
               FILE_FLAG_NO_BUFFERING | FILE_FLAG_WRITE_THROUGH, NULL);

    if (dev_file == INVALID_HANDLE_VALUE) {
        printf("open failed\n");
        return EIO;
    }

    bResult =
        DeviceIoControl(dev_file, IOCTL_DISK_GET_DRIVE_GEOMETRY, NULL, 0,
                &pdg, sizeof(pdg), &junk, (LPOVERLAPPED)NULL);

    if (bResult == FALSE) {
        CloseHandle(dev_file);
        return EIO;
    }

    disk_size = pdg.Cylinders.QuadPart * (ULONG)pdg.TracksPerCylinder *
            (ULONG)pdg.SectorsPerTrack * (ULONG)pdg.BytesPerSector;

    _filedev.bdif->ph_bsize = pdg.BytesPerSector;
    _filedev.bdif->ph_bcnt = disk_size / pdg.BytesPerSector;

    _filedev.part_offset = 0;
    _filedev.part_size = disk_size;

    return EOK;
}

/******************************************************************************/

static int file_bread(struct ext4_blockdev *bdev, void *buf, uint64_t blk_id,
            uint32_t blk_cnt)
{
    long hipart = blk_id >> (32 - 9);
    long lopart = blk_id << 9;
    long err;

    SetLastError(0);
    lopart = SetFilePointer(dev_file, lopart, &hipart, FILE_BEGIN);

    if (lopart == -1 && NO_ERROR != (err = GetLastError())) {
        return EIO;
    }

    DWORD n;

    if (!ReadFile(dev_file, buf, blk_cnt * 512, &n, NULL)) {
        err = GetLastError();
        return EIO;
    }
    return EOK;
}

/******************************************************************************/
static int file_bwrite(struct ext4_blockdev *bdev, const void *buf,
             uint64_t blk_id, uint32_t blk_cnt)
{
    long hipart = blk_id >> (32 - 9);
    long lopart = blk_id << 9;
    long err;

    SetLastError(0);
    lopart = SetFilePointer(dev_file, lopart, &hipart, FILE_BEGIN);

    if (lopart == -1 && NO_ERROR != (err = GetLastError())) {
        return EIO;
    }

    DWORD n;

    if (!WriteFile(dev_file, buf, blk_cnt * 512, &n, NULL)) {
        err = GetLastError();
        return EIO;
    }
    return EOK;
}

/******************************************************************************/
static int file_close(struct ext4_blockdev *bdev)
{
    CloseHandle(dev_file);
    return EOK;
}

/******************************************************************************/
struct ext4_blockdev *file_windows_dev_get(void)
{
    return &_filedev;
}
/******************************************************************************/
void file_windows_name_set(const char *n)
{
    fname = n;
}

/******************************************************************************/
#endif