summaryrefslogtreecommitdiffstatshomepage
path: root/src/mess/tools/imgtool/modules/cybikoxt.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/mess/tools/imgtool/modules/cybikoxt.c')
-rw-r--r--src/mess/tools/imgtool/modules/cybikoxt.c539
1 files changed, 0 insertions, 539 deletions
diff --git a/src/mess/tools/imgtool/modules/cybikoxt.c b/src/mess/tools/imgtool/modules/cybikoxt.c
deleted file mode 100644
index a1908dc9c76..00000000000
--- a/src/mess/tools/imgtool/modules/cybikoxt.c
+++ /dev/null
@@ -1,539 +0,0 @@
-// license:BSD-3-Clause
-// copyright-holders:Tim Schuerewegen
-/*
-
- Cybiko Xtreme File System
-
- (c) 2010 Tim Schuerewegen
-
-*/
-
-#include "imgtool.h"
-
-#include <zlib.h>
-
-struct cybiko_file_system
-{
- imgtool_stream *stream;
- UINT32 page_count, page_size, block_count_boot, block_count_file;
- UINT16 write_count;
-};
-
-struct cybiko_iter
-{
- UINT16 block;
-};
-
-struct cfs_file
-{
- char name[64]; // name of the file
- UINT32 date; // date/time of the file (seconds since 1900/01/01)
- UINT32 size; // size of the file
- UINT32 blocks; // number of blocks occupied by the file
-};
-
-enum
-{
- BLOCK_TYPE_INVALID,
- BLOCK_TYPE_BOOT,
- BLOCK_TYPE_FILE
-};
-
-#define MAX_PAGE_SIZE (264 * 2)
-
-#define INVALID_FILE_ID 0xFFFF
-
-#define BLOCK_USED(x) (x[0] & 0x80)
-#define BLOCK_FILE_ID(x) buffer_read_16_be( x + 2)
-#define BLOCK_PART_ID(x) buffer_read_16_be( x + 4)
-#define BLOCK_FILENAME(x) (char*)(x + 7)
-
-#define FILE_HEADER_SIZE 0x48
-
-// 2208988800 is the number of seconds between 1900/01/01 and 1970/01/01
-
-static time_t time_crack( UINT32 cfs_time)
-{
- return (time_t)(cfs_time - 2208988800UL);
-}
-
-static UINT32 time_setup( time_t ansi_time)
-{
- return (UINT32)(ansi_time + 2208988800UL);
-}
-
-static UINT32 buffer_read_32_be( UINT8 *buffer)
-{
- return (buffer[0] << 24) | (buffer[1] << 16) | (buffer[2] << 8) | (buffer[3] << 0);
-}
-
-static UINT16 buffer_read_16_be( UINT8 *buffer)
-{
- return (buffer[0] << 8) | (buffer[1] << 0);
-}
-
-static void buffer_write_32_be( UINT8 *buffer, UINT32 data)
-{
- buffer[0] = (data >> 24) & 0xFF;
- buffer[1] = (data >> 16) & 0xFF;
- buffer[2] = (data >> 8) & 0xFF;
- buffer[3] = (data >> 0) & 0xFF;
-}
-
-static void buffer_write_16_be( UINT8 *buffer, UINT16 data)
-{
- buffer[0] = (data >> 8) & 0xFF;
- buffer[1] = (data >> 0) & 0xFF;
-}
-
-// page = crc (2) + data (x)
-
-static UINT16 page_buffer_calc_checksum( UINT8 *data, UINT32 size)
-{
- int i;
- UINT32 val = 0;
- for (i = 0; i < size; i++)
- {
- val = (val ^ data[i] ^ i) << 1;
- val = val | ((val >> 16) & 0x0001);
- }
- return val;
-}
-
-static int page_buffer_verify( UINT8 *buffer, UINT32 size, int block_type)
-{
- // checksum
- if (block_type == BLOCK_TYPE_FILE)
- {
- UINT32 checksum_page, checksum_calc;
- checksum_calc = page_buffer_calc_checksum( buffer + 2, size - 2);
- checksum_page = buffer_read_16_be( buffer + 0);
- if (checksum_calc != checksum_page) return FALSE;
- }
- // ok
- return TRUE;
-}
-
-static int cfs_block_to_page( cybiko_file_system *cfs, int block_type, UINT32 block, UINT32 *page)
-{
- switch (block_type)
- {
- case BLOCK_TYPE_BOOT : if (page) *page = block; return TRUE;
- case BLOCK_TYPE_FILE : if (page) *page = block + cfs->block_count_boot; return TRUE;
- default : return FALSE;
- }
-}
-
-static int cfs_page_to_block( cybiko_file_system *cfs, UINT32 page, int *block_type, UINT32 *block)
-{
- UINT32 tmp = page;
- // boot block
- if (tmp < cfs->block_count_boot)
- {
- if (block_type) *block_type = BLOCK_TYPE_BOOT;
- if (block) *block = tmp;
- return TRUE;
- }
- tmp -= cfs->block_count_boot;
- // file block
- if (tmp < cfs->block_count_file)
- {
- if (block_type) *block_type = BLOCK_TYPE_FILE;
- if (block) *block = tmp;
- return TRUE;
- }
- tmp -= cfs->block_count_file;
- // error
- return FALSE;
-}
-
-static int cfs_page_read( cybiko_file_system *cfs, UINT8 *buffer, UINT32 page)
-{
- if (page >= cfs->page_count) return FALSE;
- stream_seek( cfs->stream, page * cfs->page_size, SEEK_SET);
- stream_read( cfs->stream, buffer, cfs->page_size);
- return TRUE;
-}
-
-static int cfs_page_write( cybiko_file_system *cfs, UINT8 *buffer, UINT32 page)
-{
- if (page >= cfs->page_count) return FALSE;
- stream_seek( cfs->stream, page * cfs->page_size, SEEK_SET);
- stream_write( cfs->stream, buffer, cfs->page_size);
- return TRUE;
-}
-
-static int cfs_block_read( cybiko_file_system *cfs, UINT8 *buffer, int block_type, UINT32 block)
-{
- UINT8 buffer_page[MAX_PAGE_SIZE];
- UINT32 page;
- if (!cfs_block_to_page( cfs, block_type, block, &page)) return FALSE;
- if (!cfs_page_read( cfs, buffer_page, page)) return FALSE;
- memcpy( buffer, buffer_page + 2, cfs->page_size - 2);
- return TRUE;
-}
-
-static int cfs_block_write( cybiko_file_system *cfs, UINT8 *buffer, int block_type, UINT32 block)
-{
- UINT8 buffer_page[MAX_PAGE_SIZE];
- UINT32 page;
- UINT16 checksum;
- memcpy( buffer_page + 2, buffer, cfs->page_size - 2);
- if (block_type == BLOCK_TYPE_BOOT)
- {
- checksum = 0xFFFF;
- }
- else
- {
- checksum = page_buffer_calc_checksum( buffer_page + 2, cfs->page_size - 2);
- }
- buffer_write_16_be( buffer_page + 0, checksum);
- if (!cfs_block_to_page( cfs, block_type, block, &page)) return FALSE;
- if (!cfs_page_write( cfs, buffer_page, page)) return FALSE;
- return TRUE;
-}
-
-static int cfs_file_delete( cybiko_file_system *cfs, UINT16 file_id)
-{
- UINT8 buffer[MAX_PAGE_SIZE];
- int i;
- for (i=0;i<cfs->block_count_file;i++)
- {
- if (!cfs_block_read( cfs, buffer, BLOCK_TYPE_FILE, i)) return FALSE;
- if (BLOCK_USED(buffer) && (BLOCK_FILE_ID(buffer) == file_id))
- {
- buffer[0] &= ~0x80;
- if (!cfs_block_write( cfs, buffer, BLOCK_TYPE_FILE, i)) return FALSE;
- }
- }
- return TRUE;
-}
-
-static int cfs_file_info( cybiko_file_system *cfs, UINT16 file_id, cfs_file *file)
-{
- UINT8 buffer[MAX_PAGE_SIZE];
- int i;
- file->blocks = file->size = 0;
- for (i=0;i<cfs->block_count_file;i++)
- {
- if (!cfs_block_read( cfs, buffer, BLOCK_TYPE_FILE, i)) return FALSE;
- if (BLOCK_USED(buffer) && (BLOCK_FILE_ID(buffer) == file_id))
- {
- if (BLOCK_PART_ID(buffer) == 0)
- {
- strcpy( file->name, BLOCK_FILENAME(buffer));
- file->date = buffer_read_32_be( buffer + 6 + FILE_HEADER_SIZE - 4);
- }
- file->size += buffer[1];
- file->blocks++;
- }
- }
- return (file->blocks > 0) ? TRUE : FALSE;
-}
-
-static int cfs_file_find( cybiko_file_system *cfs, const char *filename, UINT16 *file_id)
-{
- UINT8 buffer[MAX_PAGE_SIZE];
- int i;
- for (i=0;i<cfs->block_count_file;i++)
- {
- if (!cfs_block_read( cfs, buffer, BLOCK_TYPE_FILE, i)) return FALSE;
- if (BLOCK_USED(buffer) && (BLOCK_PART_ID(buffer) == 0) && (strcmp( filename, BLOCK_FILENAME(buffer)) == 0))
- {
- *file_id = i;
- return TRUE;
- }
- }
- return FALSE;
-}
-
-static int cfs_verify( cybiko_file_system *cfs)
-{
- UINT8 buffer[MAX_PAGE_SIZE];
- int i, block_type;
- for (i=0;i<cfs->page_count;i++)
- {
- if (!cfs_page_read( cfs, buffer, i)) return FALSE;
- if (!cfs_page_to_block( cfs, i, &block_type, NULL)) return FALSE;
- if (!page_buffer_verify( buffer, cfs->page_size, block_type)) return FALSE;
- }
- return TRUE;
-}
-
-static int cfs_init( cybiko_file_system *cfs, imgtool_stream *stream)
-{
- cfs->stream = stream;
- cfs->page_count = 2005;
- cfs->page_size = 258;
- cfs->block_count_boot = 5;
- cfs->block_count_file = cfs->page_count - cfs->block_count_boot;
- cfs->write_count = 0;
- return TRUE;
-}
-
-static int cfs_format( cybiko_file_system *cfs)
-{
- UINT8 buffer[MAX_PAGE_SIZE];
- int i;
- // boot blocks
- memset( buffer, 0xFF, sizeof( buffer));
- for (i=0;i<cfs->block_count_boot;i++)
- {
- if (!cfs_block_write( cfs, buffer, BLOCK_TYPE_BOOT, i)) return FALSE;
- }
- // file blocks
- memset( buffer, 0xFF, sizeof( buffer));
- buffer[0] &= ~0x80;
- for (i=0;i<cfs->block_count_file;i++)
- {
- if (!cfs_block_write( cfs, buffer, BLOCK_TYPE_FILE, i)) return FALSE;
- }
- // padding
- buffer[0] = 0xFF;
- for (i=0;i<0x1B56;i++)
- {
- stream_write( cfs->stream, buffer, 1);
- }
- // ok
- return TRUE;
-}
-
-static UINT16 cfs_calc_free_blocks( cybiko_file_system *cfs)
-{
- UINT8 buffer[MAX_PAGE_SIZE];
- int i;
- UINT16 blocks = 0;
- for (i=0;i<cfs->block_count_file;i++)
- {
- if (!cfs_block_read( cfs, buffer, BLOCK_TYPE_FILE, i)) return 0;
- if (!BLOCK_USED(buffer)) blocks++;
- }
- return blocks;
-}
-
-static UINT32 cfs_calc_free_space( cybiko_file_system *cfs, UINT16 blocks)
-{
- UINT32 free_space;
- free_space = blocks * ((cfs->page_size - 2) - 6);
- if (free_space > 0) free_space -= FILE_HEADER_SIZE;
- return free_space;
-}
-
-static imgtoolerr_t cybiko_image_open( imgtool_image *image, imgtool_stream *stream)
-{
- cybiko_file_system *cfs = (cybiko_file_system*)imgtool_image_extra_bytes( image);
- // init
- if (!cfs_init( cfs, stream)) return IMGTOOLERR_CORRUPTIMAGE;
- // verify
- if (!cfs_verify( cfs)) return IMGTOOLERR_CORRUPTIMAGE;
- // ok
- return IMGTOOLERR_SUCCESS;
-}
-
-static void cybiko_image_close( imgtool_image *image)
-{
- cybiko_file_system *cfs = (cybiko_file_system*)imgtool_image_extra_bytes( image);
- stream_close( cfs->stream);
-}
-
-static imgtoolerr_t cybiko_image_create( imgtool_image *image, imgtool_stream *stream, option_resolution *opts)
-{
- cybiko_file_system *cfs = (cybiko_file_system*)imgtool_image_extra_bytes( image);
- // init
- if (!cfs_init( cfs, stream)) return IMGTOOLERR_CORRUPTIMAGE;
- // format
- if (!cfs_format( cfs)) return IMGTOOLERR_CORRUPTIMAGE;
- // ok
- return IMGTOOLERR_SUCCESS;
-}
-
-static imgtoolerr_t cybiko_image_begin_enum( imgtool_directory *enumeration, const char *path)
-{
- cybiko_iter *iter = (cybiko_iter*)imgtool_directory_extrabytes( enumeration);
- iter->block = 0;
- return IMGTOOLERR_SUCCESS;
-}
-
-static imgtoolerr_t cybiko_image_next_enum( imgtool_directory *enumeration, imgtool_dirent *ent)
-{
- imgtool_image *image = imgtool_directory_image( enumeration);
- cybiko_file_system *cfs = (cybiko_file_system*)imgtool_image_extra_bytes( image);
- cybiko_iter *iter = (cybiko_iter*)imgtool_directory_extrabytes( enumeration);
- UINT8 buffer[MAX_PAGE_SIZE];
- UINT16 file_id = INVALID_FILE_ID;
- cfs_file file;
- // find next file
- while (iter->block < cfs->block_count_file)
- {
- if (!cfs_block_read( cfs, buffer, BLOCK_TYPE_FILE, iter->block++)) return IMGTOOLERR_READERROR;
- if (BLOCK_USED(buffer) && (BLOCK_PART_ID(buffer) == 0))
- {
- file_id = BLOCK_FILE_ID(buffer);
- break;
- }
- }
- // get file information
- if ((file_id != INVALID_FILE_ID) && cfs_file_info( cfs, file_id, &file))
- {
- strcpy( ent->filename, file.name);
- ent->filesize = file.size;
- ent->lastmodified_time = time_crack( file.date);
- ent->filesize = file.size;
- }
- else
- {
- ent->eof = 1;
- }
- // ok
- return IMGTOOLERR_SUCCESS;
-}
-
-static void cybiko_image_close_enum( imgtool_directory *enumeration)
-{
- // nothing
-}
-
-static imgtoolerr_t cybiko_image_free_space( imgtool_partition *partition, UINT64 *size)
-{
- imgtool_image *image = imgtool_partition_image( partition);
- cybiko_file_system *cfs = (cybiko_file_system*)imgtool_image_extra_bytes( image);
- if (size) *size = cfs_calc_free_space( cfs, cfs_calc_free_blocks( cfs));
- return IMGTOOLERR_SUCCESS;
-}
-
-static imgtoolerr_t cybiko_image_read_file( imgtool_partition *partition, const char *filename, const char *fork, imgtool_stream *destf)
-{
- imgtool_image *image = imgtool_partition_image( partition);
- cybiko_file_system *cfs = (cybiko_file_system*)imgtool_image_extra_bytes( image);
- UINT8 buffer[MAX_PAGE_SIZE];
- UINT16 file_id, part_id = 0, old_part_id;
- int i;
- // check filename
- if (strlen( filename) > 58) return IMGTOOLERR_BADFILENAME;
- // find file
- if (!cfs_file_find( cfs, filename, &file_id)) return IMGTOOLERR_FILENOTFOUND;
- // read file
- do
- {
- old_part_id = part_id;
- for (i=0;i<cfs->block_count_file;i++)
- {
- if (!cfs_block_read( cfs, buffer, BLOCK_TYPE_FILE, i)) return IMGTOOLERR_READERROR;
- if (BLOCK_USED(buffer) && (BLOCK_FILE_ID(buffer) == file_id) && (BLOCK_PART_ID(buffer) == part_id))
- {
- stream_write( destf, buffer + 6 + ((part_id == 0) ? FILE_HEADER_SIZE : 0), buffer[1]);
- part_id++;
- }
- }
- } while (old_part_id != part_id);
- // ok
- return IMGTOOLERR_SUCCESS;
-}
-
-static imgtoolerr_t cybiko_image_write_file( imgtool_partition *partition, const char *filename, const char *fork, imgtool_stream *sourcef, option_resolution *opts)
-{
- imgtool_image *image = imgtool_partition_image( partition);
- cybiko_file_system *cfs = (cybiko_file_system*)imgtool_image_extra_bytes( image);
- UINT8 buffer[MAX_PAGE_SIZE];
- UINT16 file_id, part_id = 0, free_blocks;
- UINT64 bytes_left;
- cfs_file file;
- int i;
- // check filename
- if (strlen( filename) > 58) return IMGTOOLERR_BADFILENAME;
- // find file
- if (!cfs_file_find( cfs, filename, &file_id)) file_id = INVALID_FILE_ID;
- // check free space
- free_blocks = cfs_calc_free_blocks( cfs);
- if (file_id != INVALID_FILE_ID)
- {
- if (!cfs_file_info( cfs, file_id, &file)) return IMGTOOLERR_UNEXPECTED;
- free_blocks += file.blocks;
- }
- if (cfs_calc_free_space( cfs, free_blocks) < stream_size( sourcef)) return IMGTOOLERR_NOSPACE;
- // delete file
- if (file_id != INVALID_FILE_ID)
- {
- if (!cfs_file_delete( cfs, file_id)) return IMGTOOLERR_UNEXPECTED;
- }
- // create/write destination file
- bytes_left = stream_size( sourcef);
- i = 0;
- while (i < cfs->block_count_file)
- {
- if (!cfs_block_read( cfs, buffer, BLOCK_TYPE_FILE, i)) return IMGTOOLERR_READERROR;
- if (!BLOCK_USED(buffer))
- {
- if (part_id == 0) file_id = i;
- memset( buffer, 0xFF, cfs->page_size - 0x02);
- buffer[0] = 0x80;
- buffer[1] = (cfs->page_size - 2) - 6 - ((part_id == 0) ? FILE_HEADER_SIZE : 0);
- if (bytes_left < buffer[1]) buffer[1] = bytes_left;
- buffer_write_16_be( buffer + 2, file_id);
- buffer_write_16_be( buffer + 4, part_id);
- if (part_id == 0)
- {
- buffer[6] = 0x20;
- strcpy( BLOCK_FILENAME(buffer), filename);
- buffer_write_32_be( buffer + 6 + FILE_HEADER_SIZE - 4, time_setup( time( NULL)));
- stream_read( sourcef, buffer + 6 + FILE_HEADER_SIZE, buffer[1]);
- }
- else
- {
- stream_read( sourcef, buffer + 6, buffer[1]);
- }
- if (!cfs_block_write( cfs, buffer, BLOCK_TYPE_FILE, i)) return IMGTOOLERR_WRITEERROR;
- bytes_left -= buffer[1];
- if (bytes_left == 0) break;
- part_id++;
- }
- i++;
- }
- // ok
- return IMGTOOLERR_SUCCESS;
-}
-
-static imgtoolerr_t cybiko_image_delete_file( imgtool_partition *partition, const char *filename)
-{
- imgtool_image *image = imgtool_partition_image( partition);
- cybiko_file_system *cfs = (cybiko_file_system*)imgtool_image_extra_bytes( image);
- UINT16 file_id;
- // check filename
- if (strlen( filename) > 58) return IMGTOOLERR_BADFILENAME;
- // find file
- if (!cfs_file_find( cfs, filename, &file_id)) return IMGTOOLERR_FILENOTFOUND;
- // delete file
- if (!cfs_file_delete( cfs, file_id)) return IMGTOOLERR_UNEXPECTED;
- // ok
- return IMGTOOLERR_SUCCESS;
-}
-
-void cybikoxt_get_info( const imgtool_class *imgclass, UINT32 state, union imgtoolinfo *info)
-{
- switch (state)
- {
- // --- the following bits of info are returned as 64-bit signed integers ---
- case IMGTOOLINFO_INT_IMAGE_EXTRA_BYTES : info->i = sizeof( cybiko_file_system); break;
- case IMGTOOLINFO_INT_DIRECTORY_EXTRA_BYTES : info->i = sizeof( cybiko_iter); break;
-// case IMGTOOLINFO_INT_SUPPORTS_CREATION_TIME : info->i = 1; break;
- case IMGTOOLINFO_INT_SUPPORTS_LASTMODIFIED_TIME : info->i = 1; break;
-// case IMGTOOLINFO_INT_BLOCK_SIZE : info->i = 264; break;
- // --- the following bits of info are returned as pointers to data or functions ---
- case IMGTOOLINFO_PTR_OPEN : info->open = cybiko_image_open; break;
- case IMGTOOLINFO_PTR_CREATE : info->create = cybiko_image_create; break;
- case IMGTOOLINFO_PTR_CLOSE : info->close = cybiko_image_close; break;
- case IMGTOOLINFO_PTR_BEGIN_ENUM : info->begin_enum = cybiko_image_begin_enum; break;
- case IMGTOOLINFO_PTR_NEXT_ENUM : info->next_enum = cybiko_image_next_enum; break;
- case IMGTOOLINFO_PTR_CLOSE_ENUM : info->close_enum = cybiko_image_close_enum; break;
- case IMGTOOLINFO_PTR_FREE_SPACE : info->free_space = cybiko_image_free_space; break;
- case IMGTOOLINFO_PTR_READ_FILE : info->read_file = cybiko_image_read_file; break;
- case IMGTOOLINFO_PTR_WRITE_FILE : info->write_file = cybiko_image_write_file; break;
- case IMGTOOLINFO_PTR_DELETE_FILE : info->delete_file = cybiko_image_delete_file; break;
- // --- the following bits of info are returned as NULL-terminated strings ---
- case IMGTOOLINFO_STR_NAME : strcpy( info->s = imgtool_temp_str(), "cybikoxt"); break;
- case IMGTOOLINFO_STR_DESCRIPTION : strcpy( info->s = imgtool_temp_str(), "Cybiko Xtreme File System"); break;
- case IMGTOOLINFO_STR_FILE : strcpy( info->s = imgtool_temp_str(), __FILE__); break;
- case IMGTOOLINFO_STR_FILE_EXTENSIONS : strcpy( info->s = imgtool_temp_str(), "bin,nv"); break;
- case IMGTOOLINFO_STR_EOLN : strcpy( info->s = imgtool_temp_str(), "\r\n"); break;
- }
-}