diff options
Diffstat (limited to 'src/devices/imagedev/diablo.c')
-rw-r--r-- | src/devices/imagedev/diablo.c | 274 |
1 files changed, 274 insertions, 0 deletions
diff --git a/src/devices/imagedev/diablo.c b/src/devices/imagedev/diablo.c new file mode 100644 index 00000000000..d7d499ec523 --- /dev/null +++ b/src/devices/imagedev/diablo.c @@ -0,0 +1,274 @@ +// license:BSD-3-Clause +// copyright-holders:Juergen Buchmueller +/********************************************************** + * DIABLO drive image to hard disk interface + **********************************************************/ + +#include "emu.h" +#include "emuopts.h" +#include "harddisk.h" +#include "diablo.h" + + +static OPTION_GUIDE_START(dsk_option_guide) + OPTION_INT('C', "cylinders", "Cylinders") + OPTION_INT('H', "heads", "Heads") + OPTION_INT('S', "sectors", "Sectors") + OPTION_INT('L', "sectorlength", "Sector Words") + OPTION_INT('K', "hunksize", "Hunk Bytes") +OPTION_GUIDE_END + +static const char *dsk_option_spec = + "C1-[203]-1024;H1/[2]/4/8;S1-[12]-64;L267;K6408"; + + +// device type definition +const device_type DIABLO = &device_creator<diablo_image_device>; + +//------------------------------------------------- +// diablo_image_device - constructor +//------------------------------------------------- + +diablo_image_device::diablo_image_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) + : device_t(mconfig, DIABLO, "Diablo", tag, owner, clock, "diablo_image", __FILE__), + device_image_interface(mconfig, *this), + m_chd(NULL), + m_hard_disk_handle(NULL), + m_device_image_load(device_image_load_delegate()), + m_device_image_unload(device_image_func_delegate()), + m_interface(NULL) +{ +} + +//------------------------------------------------- +// diablo_image_device - destructor +//------------------------------------------------- + +diablo_image_device::~diablo_image_device() +{ +} + +//------------------------------------------------- +// device_config_complete - perform any +// operations now that the configuration is +// complete +//------------------------------------------------- + +void diablo_image_device::device_config_complete() +{ + m_formatlist.append(*global_alloc(image_device_format("chd", "CHD Hard drive", "chd,dsk", dsk_option_spec))); + + // set brief and instance name + update_names(); +} + +const option_guide *diablo_image_device::create_option_guide() const +{ + return dsk_option_guide; +} + +//------------------------------------------------- +// device_start - device-specific startup +//------------------------------------------------- + +void diablo_image_device::device_start() +{ + m_chd = NULL; + + // try to locate the CHD from a DISK_REGION + chd_file *handle = get_disk_handle(machine(), tag()); + if (handle != NULL) + { + m_hard_disk_handle = hard_disk_open(handle); + } + else + { + m_hard_disk_handle = NULL; + } +} + +void diablo_image_device::device_stop() +{ + if (m_hard_disk_handle) + hard_disk_close(m_hard_disk_handle); +} + +bool diablo_image_device::call_load() +{ + int our_result; + + our_result = internal_load_dsk(); + /* Check if there is an image_load callback defined */ + if (!m_device_image_load.isnull()) + { + /* Let the override do some additional work/checks */ + our_result = m_device_image_load(*this); + } + return our_result; + +} + +bool diablo_image_device::call_create(int create_format, option_resolution *create_args) +{ + int err; + UINT32 sectorsize, hunksize; + UINT32 cylinders, heads, sectors, totalsectors; + std::string metadata; + + cylinders = option_resolution_lookup_int(create_args, 'C'); + heads = option_resolution_lookup_int(create_args, 'H'); + sectors = option_resolution_lookup_int(create_args, 'S'); + sectorsize = option_resolution_lookup_int(create_args, 'L') * sizeof(UINT16); + hunksize = option_resolution_lookup_int(create_args, 'K'); + + totalsectors = cylinders * heads * sectors; + + /* create the CHD file */ + chd_codec_type compression[4] = { CHD_CODEC_NONE }; + err = m_origchd.create(*image_core_file(), (UINT64)totalsectors * (UINT64)sectorsize, hunksize, sectorsize, compression); + if (err != CHDERR_NONE) + goto error; + + /* if we created the image and hence, have metadata to set, set the metadata */ + strprintf(metadata,HARD_DISK_METADATA_FORMAT, cylinders, heads, sectors, sectorsize); + err = m_origchd.write_metadata(HARD_DISK_METADATA_TAG, 0, metadata); + m_origchd.close(); + + if (err != CHDERR_NONE) + goto error; + + return internal_load_dsk(); + +error: + return IMAGE_INIT_FAIL; +} + +void diablo_image_device::call_unload() +{ + /* Check if there is an image_unload callback defined */ + if ( !m_device_image_unload.isnull() ) + { + m_device_image_unload(*this); + } + + if (m_hard_disk_handle != NULL) + { + hard_disk_close(m_hard_disk_handle); + m_hard_disk_handle = NULL; + } + + m_origchd.close(); + m_diffchd.close(); + m_chd = NULL; +} + +/*------------------------------------------------- + open_disk_diff - open a DISK diff file +-------------------------------------------------*/ + +static chd_error open_disk_diff(emu_options &options, const char *name, chd_file &source, chd_file &diff_chd) +{ + std::string fname = std::string(name).append(".dif"); + + /* try to open the diff */ + //printf("Opening differencing image file: %s\n", fname.c_str()); + emu_file diff_file(options.diff_directory(), OPEN_FLAG_READ | OPEN_FLAG_WRITE); + file_error filerr = diff_file.open(fname.c_str()); + if (filerr == FILERR_NONE) + { + std::string fullpath(diff_file.fullpath()); + diff_file.close(); + + //printf("Opening differencing image file: %s\n", fullpath.c_str()); + return diff_chd.open(fullpath.c_str(), true, &source); + } + + /* didn't work; try creating it instead */ + //printf("Creating differencing image: %s\n", fname.c_str()); + diff_file.set_openflags(OPEN_FLAG_READ | OPEN_FLAG_WRITE | OPEN_FLAG_CREATE | OPEN_FLAG_CREATE_PATHS); + filerr = diff_file.open(fname.c_str()); + if (filerr == FILERR_NONE) + { + std::string fullpath(diff_file.fullpath()); + diff_file.close(); + + /* create the CHD */ + //printf("Creating differencing image file: %s\n", fullpath.c_str()); + chd_codec_type compression[4] = { CHD_CODEC_NONE }; + chd_error err = diff_chd.create(fullpath.c_str(), source.logical_bytes(), source.hunk_bytes(), compression, source); + if (err != CHDERR_NONE) + return err; + + return diff_chd.clone_all_metadata(source); + } + + return CHDERR_FILE_NOT_FOUND; +} + +int diablo_image_device::internal_load_dsk() +{ + chd_error err = CHDERR_NONE; + + m_chd = NULL; + + if (m_hard_disk_handle) + hard_disk_close(m_hard_disk_handle); + + /* open the CHD file */ + if (software_entry() != NULL) + { + m_chd = get_disk_handle(device().machine(), device().subtag("harddriv").c_str()); + } + else + { + err = m_origchd.open(*image_core_file(), true); + if (err == CHDERR_NONE) + { + m_chd = &m_origchd; + } + else if (err == CHDERR_FILE_NOT_WRITEABLE) + { + err = m_origchd.open(*image_core_file(), false); + if (err == CHDERR_NONE) + { + err = open_disk_diff(device().machine().options(), basename_noext(), m_origchd, m_diffchd); + if (err == CHDERR_NONE) + { + m_chd = &m_diffchd; + } + } + } + } + + if (m_chd != NULL) + { + /* open the hard disk file */ + m_hard_disk_handle = hard_disk_open(m_chd); + if (m_hard_disk_handle != NULL) + return IMAGE_INIT_PASS; + } + + /* if we had an error, close out the CHD */ + m_origchd.close(); + m_diffchd.close(); + m_chd = NULL; + seterror(IMAGE_ERROR_UNSPECIFIED, chd_file::error_string(err)); + + return IMAGE_INIT_FAIL; +} + +/************************************* + * + * Get the CHD file (from the src/chd.c core) + * after an image has been opened with the hd core + * + *************************************/ + +chd_file *diablo_image_device::get_chd_file() +{ + chd_file *result = NULL; + hard_disk_file *hd_file = get_hard_disk_file(); + if (hd_file) + result = hard_disk_get_chd(hd_file); + return result; +} |