[Fuse-for-macosx-commits] SF.net SVN: fuse-for-macosx:[681] vendor/fuse-emulator/current/fuse
Brought to you by:
fredm
Menu
▾
▴
[Fuse-for-macosx-commits] SF.net SVN: fuse-for-macosx:[681] vendor/fuse-emulator/current/fuse
|
From: <fr...@us...> - 2012-01-14 12:08:24
|
Revision: 681
http://fuse-for-macosx.svn.sourceforge.net/fuse-for-macosx/?rev=681&view=rev
Author: fredm
Date: 2012-01-14 12:08:15 +0000 (Sat, 14 Jan 2012)
Log Message:
-----------
Reverse half imported code.
Added Paths:
-----------
vendor/fuse-emulator/current/fuse/ay.c
vendor/fuse-emulator/current/fuse/ay.h
vendor/fuse-emulator/current/fuse/dck.c
vendor/fuse-emulator/current/fuse/dck.h
vendor/fuse-emulator/current/fuse/disk/
vendor/fuse-emulator/current/fuse/fuller.c
vendor/fuse-emulator/current/fuse/fuller.h
vendor/fuse-emulator/current/fuse/ide/
vendor/fuse-emulator/current/fuse/if1.c
vendor/fuse-emulator/current/fuse/if1.h
vendor/fuse-emulator/current/fuse/if2.c
vendor/fuse-emulator/current/fuse/if2.h
vendor/fuse-emulator/current/fuse/joystick.c
vendor/fuse-emulator/current/fuse/joystick.h
vendor/fuse-emulator/current/fuse/kempmouse.c
vendor/fuse-emulator/current/fuse/kempmouse.h
vendor/fuse-emulator/current/fuse/melodik.c
vendor/fuse-emulator/current/fuse/melodik.h
vendor/fuse-emulator/current/fuse/printer.c
vendor/fuse-emulator/current/fuse/printer.h
vendor/fuse-emulator/current/fuse/scld.c
vendor/fuse-emulator/current/fuse/scld.h
vendor/fuse-emulator/current/fuse/ula.c
vendor/fuse-emulator/current/fuse/ula.h
Removed Paths:
-------------
vendor/fuse-emulator/current/fuse/peripherals/
Copied: vendor/fuse-emulator/current/fuse/ay.c (from rev 679, vendor/fuse-emulator/current/fuse/ay.c)
===================================================================
--- vendor/fuse-emulator/current/fuse/ay.c (rev 0)
+++ vendor/fuse-emulator/current/fuse/ay.c 2012-01-14 12:08:15 UTC (rev 681)
@@ -0,0 +1,169 @@
+/* ay.c: AY-8-3912 routines
+ Copyright (c) 1999-2009 Philip Kendall
+
+ $Id: ay.c 4030 2009-06-07 14:38:38Z fredm $
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License along
+ with this program; if not, write to the Free Software Foundation, Inc.,
+ 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+ Author contact information:
+
+ E-mail: phi...@sh...
+
+*/
+
+#include <config.h>
+
+#include <string.h>
+
+#include "compat.h"
+#include "machine.h"
+#include "module.h"
+#include "printer.h"
+#include "psg.h"
+#include "sound.h"
+
+/* Unused bits in the AY registers are silently zeroed out; these masks
+ accomplish this */
+static const libspectrum_byte mask[ AY_REGISTERS ] = {
+
+ 0xff, 0x0f, 0xff, 0x0f, 0xff, 0x0f, 0x1f, 0xff,
+ 0x1f, 0x1f, 0x1f, 0xff, 0xff, 0x0f, 0xff, 0xff,
+
+};
+
+static void ay_reset( int hard_reset );
+static void ay_from_snapshot( libspectrum_snap *snap );
+static void ay_to_snapshot( libspectrum_snap *snap );
+
+static module_info_t ay_module_info = {
+
+ ay_reset,
+ NULL,
+ NULL,
+ ay_from_snapshot,
+ ay_to_snapshot,
+
+};
+
+int
+ay_init( void )
+{
+ module_register( &ay_module_info );
+
+ return 0;
+}
+
+static void
+ay_reset( int hard_reset GCC_UNUSED )
+{
+ ayinfo *ay = &machine_current->ay;
+
+ ay->current_register = 0;
+ memset( ay->registers, 0, sizeof( ay->registers ) );
+}
+
+/* What happens when the AY register port (traditionally 0xfffd on the 128K
+ machines) is read from */
+libspectrum_byte
+ay_registerport_read( libspectrum_word port GCC_UNUSED, int *attached )
+{
+ int current;
+ const libspectrum_byte port_input = 0xbf; /* always allow serial output */
+
+ *attached = 1;
+
+ current = machine_current->ay.current_register;
+
+ /* The AY I/O ports return input directly from the port when in
+ input mode; but in output mode, they return an AND between the
+ register value and the port input. So, allow for this when
+ reading R14... */
+
+ if( current == 14 ) {
+ if(machine_current->ay.registers[7] & 0x40)
+ return (port_input & machine_current->ay.registers[14]);
+ else
+ return port_input;
+ }
+
+ /* R15 is simpler to do, as the 8912 lacks the second I/O port, and
+ the input-mode input is always 0xff */
+ if( current == 15 && !( machine_current->ay.registers[7] & 0x80 ) )
+ return 0xff;
+
+ /* Otherwise return register value, appropriately masked */
+ return machine_current->ay.registers[ current ] & mask[ current ];
+}
+
+/* And when it's written to */
+void
+ay_registerport_write( libspectrum_word port GCC_UNUSED, libspectrum_byte b )
+{
+ machine_current->ay.current_register = (b & 15);
+}
+
+/* What happens when the AY data port (traditionally 0xbffd on the 128K
+ machines) is written to; no corresponding read function as this
+ always returns 0xff */
+void
+ay_dataport_write( libspectrum_word port GCC_UNUSED, libspectrum_byte b )
+{
+ int current;
+
+ current = machine_current->ay.current_register;
+
+ machine_current->ay.registers[ current ] = b & mask[ current ];
+ sound_ay_write( current, b, tstates );
+ if( psg_recording ) psg_write_register( current, b );
+
+ if( current == 14 ) printer_serial_write( b );
+}
+
+void
+ay_state_from_snapshot( libspectrum_snap *snap )
+{
+ size_t i;
+
+ ay_registerport_write( 0xfffd,
+ libspectrum_snap_out_ay_registerport( snap ) );
+
+ for( i = 0; i < AY_REGISTERS; i++ ) {
+ machine_current->ay.registers[i] =
+ libspectrum_snap_ay_registers( snap, i );
+ sound_ay_write( i, machine_current->ay.registers[i], 0 );
+ }
+}
+
+static void
+ay_from_snapshot( libspectrum_snap *snap )
+{
+ if( machine_current->capabilities & LIBSPECTRUM_MACHINE_CAPABILITY_AY ) {
+ ay_state_from_snapshot( snap );
+ }
+}
+
+static void
+ay_to_snapshot( libspectrum_snap *snap )
+{
+ size_t i;
+
+ libspectrum_snap_set_out_ay_registerport(
+ snap, machine_current->ay.current_register
+ );
+
+ for( i = 0; i < AY_REGISTERS; i++ )
+ libspectrum_snap_set_ay_registers( snap, i,
+ machine_current->ay.registers[i] );
+}
Copied: vendor/fuse-emulator/current/fuse/ay.h (from rev 679, vendor/fuse-emulator/current/fuse/ay.h)
===================================================================
--- vendor/fuse-emulator/current/fuse/ay.h (rev 0)
+++ vendor/fuse-emulator/current/fuse/ay.h 2012-01-14 12:08:15 UTC (rev 681)
@@ -0,0 +1,47 @@
+/* ay.h: AY-8-3912 routines
+ Copyright (c) 1999-2009 Philip Kendall
+
+ $Id: ay.h 4030 2009-06-07 14:38:38Z fredm $
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License along
+ with this program; if not, write to the Free Software Foundation, Inc.,
+ 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+ Author contact information:
+
+ E-mail: phi...@sh...
+
+*/
+
+#ifndef FUSE_AY_H
+#define FUSE_AY_H
+
+#include <libspectrum.h>
+
+#define AY_REGISTERS 16
+
+typedef struct ayinfo {
+ int current_register;
+ libspectrum_byte registers[ AY_REGISTERS ];
+} ayinfo;
+
+int ay_init( void );
+
+libspectrum_byte ay_registerport_read( libspectrum_word port, int *attached );
+void ay_registerport_write( libspectrum_word port, libspectrum_byte b );
+
+void ay_dataport_write( libspectrum_word port, libspectrum_byte b );
+
+void ay_state_from_snapshot( libspectrum_snap *snap );
+
+#endif /* #ifndef FUSE_AY_H */
Copied: vendor/fuse-emulator/current/fuse/dck.c (from rev 679, vendor/fuse-emulator/current/fuse/dck.c)
===================================================================
--- vendor/fuse-emulator/current/fuse/dck.c (rev 0)
+++ vendor/fuse-emulator/current/fuse/dck.c 2012-01-14 12:08:15 UTC (rev 681)
@@ -0,0 +1,184 @@
+/* dck.c: dock snapshot (Warajevo .DCK) handling routines
+ Copyright (c) 2003-2004 Darren Salt, Fredrick Meunier, Philip Kendall
+
+ $Id: dck.c 3703 2008-06-30 20:36:11Z pak21 $
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License along
+ with this program; if not, write to the Free Software Foundation, Inc.,
+ 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+ Author contact information:
+
+ Philip: phi...@sh...
+
+ Darren: li...@yo...
+ Fred: fr...@sp...
+
+*/
+
+#include <config.h>
+
+#include <errno.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include <libspectrum.h>
+
+#include "dck.h"
+#include "machine.h"
+#include "memory.h"
+#include "settings.h"
+#include "scld.h"
+#include "ui/ui.h"
+#include "utils.h"
+#include "debugger/debugger.h"
+
+/* Dock cart inserted? */
+int dck_active = 0;
+
+int
+dck_insert( const char *filename )
+{
+ int error;
+
+ if ( !( libspectrum_machine_capabilities( machine_current->machine ) &
+ LIBSPECTRUM_MACHINE_CAPABILITY_TIMEX_DOCK ) ) {
+ ui_error( UI_ERROR_ERROR, "This machine does not support the dock" );
+ return 1;
+ }
+
+ error = settings_set_string( &settings_current.dck_file, filename );
+ if( error ) return error;
+
+ machine_reset( 0 );
+
+ return 0;
+}
+
+void
+dck_eject( void )
+{
+ if ( !( libspectrum_machine_capabilities( machine_current->machine ) &
+ LIBSPECTRUM_MACHINE_CAPABILITY_TIMEX_DOCK ) ) {
+ ui_error( UI_ERROR_ERROR, "This machine does not support the dock" );
+ return;
+ }
+
+ if( settings_current.dck_file ) free( settings_current.dck_file );
+ settings_current.dck_file = NULL;
+
+ dck_active = 0;
+
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_CARTRIDGE_DOCK_EJECT, 0 );
+
+ machine_reset( 0 );
+}
+
+int
+dck_reset( void )
+{
+ utils_file file;
+ size_t num_block = 0;
+ libspectrum_dck *dck;
+ int error;
+
+ dck_active = 0;
+
+ if( !settings_current.dck_file ) {
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_CARTRIDGE_DOCK_EJECT, 0 );
+ return 0;
+ }
+
+ dck = libspectrum_dck_alloc();
+
+ error = utils_read_file( settings_current.dck_file, &file );
+ if( error ) { libspectrum_dck_free( dck, 0 ); return error; }
+
+ error = libspectrum_dck_read2( dck, file.buffer, file.length,
+ settings_current.dck_file );
+ if( error ) {
+ utils_close_file( &file ); libspectrum_dck_free( dck, 0 ); return error;
+ }
+
+ if( utils_close_file( &file ) ) {
+ libspectrum_dck_free( dck, 0 );
+ return 1;
+ }
+
+ while( dck->dck[num_block] != NULL ) {
+ memory_page **mem;
+ int i;
+
+ switch( dck->dck[num_block]->bank ) {
+ case LIBSPECTRUM_DCK_BANK_HOME:
+ mem = memory_map_home;
+ break;
+ case LIBSPECTRUM_DCK_BANK_DOCK:
+ mem = memory_map_dock;
+ break;
+ case LIBSPECTRUM_DCK_BANK_EXROM:
+ mem = memory_map_exrom;
+ break;
+ default:
+ ui_error( UI_ERROR_INFO, "Sorry, bank ID %i is unsupported",
+ dck->dck[num_block]->bank );
+ libspectrum_dck_free( dck, 0 );
+ return 1;
+ }
+
+ for( i = 0; i < 8; i++ ) {
+
+ switch( dck->dck[num_block]->access[i] ) {
+
+ case LIBSPECTRUM_DCK_PAGE_NULL:
+ break;
+
+ case LIBSPECTRUM_DCK_PAGE_ROM:
+ mem[i]->page = memory_pool_allocate( MEMORY_PAGE_SIZE );
+ if( !mem[i]->page ) return 1;
+ memcpy( mem[i]->page, dck->dck[num_block]->pages[i],
+ MEMORY_PAGE_SIZE );
+ mem[i]->writable = 0;
+ mem[i]->source = MEMORY_SOURCE_CARTRIDGE;
+ break;
+
+ case LIBSPECTRUM_DCK_PAGE_RAM_EMPTY:
+ case LIBSPECTRUM_DCK_PAGE_RAM:
+ /* Because the scr and snapshot code depends on the standard
+ memory map being in the RAM[] array, we just copy RAM
+ blocks from the HOME bank into the appropriate page; in
+ other cases, we allocate ourselves a new page to store the
+ contents in */
+ if( !(dck->dck[num_block]->bank == LIBSPECTRUM_DCK_BANK_HOME && i>1) ) {
+ mem[i]->page = memory_pool_allocate( MEMORY_PAGE_SIZE );
+ if( !mem[i]->page ) return 1;
+ mem[i]->writable = 1;
+ }
+
+ mem[i]->source = MEMORY_SOURCE_CARTRIDGE;
+ memcpy( mem[i]->page, dck->dck[num_block]->pages[i],
+ MEMORY_PAGE_SIZE );
+ break;
+
+ }
+ }
+ num_block++;
+ }
+
+ dck_active = 1;
+
+ /* Make the menu item to eject the cartridge active */
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_CARTRIDGE_DOCK_EJECT, 1 );
+
+ return libspectrum_dck_free( dck, 0 );
+}
Copied: vendor/fuse-emulator/current/fuse/dck.h (from rev 679, vendor/fuse-emulator/current/fuse/dck.h)
===================================================================
--- vendor/fuse-emulator/current/fuse/dck.h (rev 0)
+++ vendor/fuse-emulator/current/fuse/dck.h 2012-01-14 12:08:15 UTC (rev 681)
@@ -0,0 +1,39 @@
+/* dck.h: dock snapshot (Warajevo .DCK) handling routines
+ Copyright (c) 2003 Darren Salt, Fredrick Meunier
+
+ $Id: dck.h 2889 2007-05-26 17:45:08Z zubzero $
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License along
+ with this program; if not, write to the Free Software Foundation, Inc.,
+ 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+ Author contact information:
+
+ Philip: phi...@sh...
+
+ Darren: li...@yo...
+ Fred: fr...@sp...
+
+*/
+
+#ifndef FUSE_DCK_H
+#define FUSE_DCK_H
+
+/* Dock cart inserted? */
+extern int dck_active;
+
+int dck_insert( const char *filename );
+void dck_eject( void );
+int dck_reset( void );
+
+#endif
Copied: vendor/fuse-emulator/current/fuse/fuller.c (from rev 679, vendor/fuse-emulator/current/fuse/fuller.c)
===================================================================
--- vendor/fuse-emulator/current/fuse/fuller.c (rev 0)
+++ vendor/fuse-emulator/current/fuse/fuller.c 2012-01-14 12:08:15 UTC (rev 681)
@@ -0,0 +1,90 @@
+/* fuller.c: Routines for handling the Fuller Box
+ Copyright (c) 2007-2009 Stuart Brady, Fredrick Meunier
+
+ $Id: fuller.c 4032 2009-06-10 11:09:44Z fredm $
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License along
+ with this program; if not, write to the Free Software Foundation, Inc.,
+ 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+ Author contact information:
+
+ Philip: phi...@sh...
+
+ Stuart: sd...@nt...
+
+*/
+
+#include <config.h>
+
+#include <libspectrum.h>
+
+#include "ay.h"
+#include "compat.h"
+#include "fuller.h"
+#include "joystick.h"
+#include "module.h"
+#include "periph.h"
+#include "settings.h"
+
+static void fuller_enabled_snapshot( libspectrum_snap *snap );
+static void fuller_from_snapshot( libspectrum_snap *snap );
+static void fuller_to_snapshot( libspectrum_snap *snap );
+
+static module_info_t fuller_module_info = {
+
+ NULL,
+ NULL,
+ fuller_enabled_snapshot,
+ fuller_from_snapshot,
+ fuller_to_snapshot,
+
+};
+
+const periph_t fuller_peripherals[] = {
+ { 0x00ff, 0x003f, ay_registerport_read, ay_registerport_write },
+ { 0x00ff, 0x005f, NULL, ay_dataport_write },
+ { 0x00ff, 0x007f, joystick_fuller_read, NULL },
+};
+
+const size_t fuller_peripherals_count =
+ sizeof( fuller_peripherals ) / sizeof( periph_t );
+
+static void
+fuller_enabled_snapshot( libspectrum_snap *snap )
+{
+ if( libspectrum_snap_fuller_box_active( snap ) )
+ settings_current.fuller = 1;
+}
+
+static void
+fuller_from_snapshot( libspectrum_snap *snap )
+{
+ if( periph_fuller_active ) {
+ ay_state_from_snapshot( snap );
+ }
+}
+
+static void
+fuller_to_snapshot( libspectrum_snap *snap )
+{
+ libspectrum_snap_set_fuller_box_active( snap, periph_fuller_active );
+}
+
+int
+fuller_init( void )
+{
+ module_register( &fuller_module_info );
+
+ return 0;
+}
Copied: vendor/fuse-emulator/current/fuse/fuller.h (from rev 679, vendor/fuse-emulator/current/fuse/fuller.h)
===================================================================
--- vendor/fuse-emulator/current/fuse/fuller.h (rev 0)
+++ vendor/fuse-emulator/current/fuse/fuller.h 2012-01-14 12:08:15 UTC (rev 681)
@@ -0,0 +1,40 @@
+/* fuller.h: Routines for handling the Fuller Box
+ Copyright (c) 2007-2009 Stuart Brady, Fredrick Meunier
+
+ $Id: fuller.h 4030 2009-06-07 14:38:38Z fredm $
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License along
+ with this program; if not, write to the Free Software Foundation, Inc.,
+ 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+ Author contact information:
+
+ Philip: phi...@sh...
+
+ Stuart: sd...@nt...
+
+*/
+
+#ifndef FUSE_FULLER_H
+#define FUSE_FULLER_H
+
+#include <libspectrum.h>
+
+#include "periph.h"
+
+extern const periph_t fuller_peripherals[];
+extern const size_t fuller_peripherals_count;
+
+int fuller_init( void );
+
+#endif /* #ifndef FUSE_FULLER_H */
Copied: vendor/fuse-emulator/current/fuse/if1.c (from rev 679, vendor/fuse-emulator/current/fuse/if1.c)
===================================================================
--- vendor/fuse-emulator/current/fuse/if1.c (rev 0)
+++ vendor/fuse-emulator/current/fuse/if1.c 2012-01-14 12:08:15 UTC (rev 681)
@@ -0,0 +1,1304 @@
+/* if1.c: Interface I handling routines
+ Copyright (c) 2004-2008 Gergely Szasz, Philip Kendall
+
+ $Id: if1.c 4180 2010-10-09 12:59:37Z fredm $
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License along
+ with this program; if not, write to the Free Software Foundation, Inc.,
+ 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+ Author contact information:
+
+ Gergely: sz...@hu...
+
+*/
+
+#include <config.h>
+
+#include <string.h>
+#include <errno.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+
+#include <unistd.h>
+
+#include "compat.h"
+#include "debugger/debugger.h"
+#include "if1.h"
+#include "machine.h"
+#include "memory.h"
+#include "module.h"
+#include "periph.h"
+#include "settings.h"
+#include "utils.h"
+#include "ui/ui.h"
+
+#undef IF1_DEBUG_MDR
+#undef IF1_DEBUG_NET
+#undef IF1_DEBUG_NET_1
+
+#define BUFF_EMPTY 0x100
+
+enum {
+ SYNC_NO = 0,
+ SYNC_OK = 0xff
+};
+
+/*
+ Microdrive cartridge
+ GAP PREAMBLE 15 byte GAP PREAMBLE 15 byte 512 1
+ [-----][00 00 ... ff ff][BLOCK HEAD][-----][00 00 ... ff ff][REC HEAD][ DATA ][CHK]
+ Preamble = 10 * 0x00 + 2 * 0xff (12 byte)
+*/
+
+typedef struct microdrive_t {
+ utils_file file;
+ char *filename; /* old filename */
+ int inserted;
+ int modified;
+ int motor_on;
+ int head_pos;
+ int transfered;
+ int max_bytes;
+ libspectrum_byte pream[512]; /* preamble/sync area written */
+ libspectrum_byte last;
+ libspectrum_byte gap;
+ libspectrum_byte sync;
+
+ libspectrum_microdrive *cartridge; /* write protect, len, blocks */
+
+} microdrive_t;
+
+typedef struct if1_ula_t {
+ int fd_r; /* file descriptor for reading bytes or bits RS232 */
+ int fd_t; /* file descriptor for writing bytes or bits RS232 */
+ int fd_net; /* file descriptor for rw bytes or bits SinclairNET */
+ int rs232_buffer; /* read buffer */
+ int s_net_mode;
+ int status; /* if1_ula/SinclairNET */
+ int comms_data; /* the previous data comms state */
+ int comms_clk; /* the previous data comms state */
+ int cts; /* CTS of peripheral */
+ int dtr; /* DTR of peripheral */
+ int tx; /* TxD the name is very kind, because this is the read end of
+ the TxD wire of DATA machine (really RxD the view of
+ spectrum */
+ int rx; /* RxD the name is very kind, because this is the write end of
+ the RxD wire of DATA machine (really TxD the view of
+ spectrum */
+ int data_in; /* interpreted incoming data */
+ int count_in;
+ int data_out; /* interpreted outgoing data */
+ int count_out;
+ int esc_in; /* if we compose an escape seq */
+
+ int net; /* Network in/out (really 1 wire bus :-) */
+ int net_data; /* Interpreted network data */
+ int net_state; /* Interpreted network data */
+ int wait; /* Wait state */
+ int busy; /* Indicate busy; if1 software never poll it ... */
+} if1_ula_t;
+
+/*
+ 7 6 5 4 3 2 1 0
+ STATUS RO $EF(239) --- --- --- BSY DTR GAP SYN WPR
+
+ CONTRO WO $EF(239) --- --- WAT CTS ERA R/w CLK DTA
+
+ MDR DT RW $E7(231) D7 D6 D5 D4 D3 D2 D1 D0
+
+ COMM I RO $F7(247) TX --- --- --- --- --- --- NET
+
+ COMM O WO $F7(247) --- --- --- --- --- --- --- NET/RX
+
+RS232:
+ DTR -> Data Terminal Ready (DTE -> DCE)
+ CTS -> Clear To Send (DCE -> DTE)
+ TX -> Transmitted Data (DTE -> DCE)
+ RX -> Received Data (DCE -> DTE)
+
+ The IF1 serial behaves not as a DTE (Data Terminal Equipment, e.g.
+ a computer) but as a DCE (Data Communications Equipment, e.g. a modem)
+
+ If we were to consider the ZX Spectrum a DTE, we would rename the lines:
+ DTR := DSR (Data Set Ready)
+ CTS := RTS (Request To Send)
+ TX := RX
+ RX := TX
+
+ On the communication channels:
+ Bytes interpreted as is, except:
+ 0x00 0x00 --> DTR ~~\__
+ 0x00 0x01 --> DTR __/~~
+ 0x00 0x02 --> CTS ~~\__
+ 0x00 0x03 --> CTS __/~~
+ 0x00 ? --> lost
+ 0x00 * --> 0x00
+ Additionally:
+ if fuse read 0x00 0x00 => DTR = 0 ~~\__
+ if fuse read 0x00 0x01 => DTR = 1 __/~~
+ if CTS = ~~\__ fuse send 0x00 0x02
+ if CTS = __/~~ fuse send 0x00 0x03
+ if fuse lost send 0x00 + 0x3f (?)
+ every other 0x00 + 0x## are discarded
+*/
+
+/* Two 8Kb memory chunks accessible by the Z80 when /ROMCS is low */
+static memory_page if1_memory_map_romcs[2];
+
+/* IF1 paged out ROM activated? */
+int if1_active = 0;
+int if1_available = 0;
+static int if1_mdr_status = 0;
+
+int rnd_factor = ( ( RAND_MAX >> 2 ) << 2 ) / 19 + 1;
+
+static microdrive_t microdrive[8]; /* We have 8 microdrive */
+static if1_ula_t if1_ula;
+
+static void microdrives_reset( void );
+static void microdrives_restart( void );
+static void increment_head( int m );
+
+#define MDR_IN(m) microdrive[m - 1].inserted
+#define MDR_WP(m) libspectrum_microdrive_write_protect( microdrive[m - 1].cartridge )
+
+enum if1_menu_item {
+
+ UMENU_ALL = 0,
+ UMENU_MDRV1,
+ UMENU_MDRV2,
+ UMENU_MDRV3,
+ UMENU_MDRV4,
+ UMENU_MDRV5,
+ UMENU_MDRV6,
+ UMENU_MDRV7,
+ UMENU_MDRV8,
+ UMENU_RS232,
+};
+
+enum if1_port {
+ PORT_MDR,
+ PORT_CTR,
+ PORT_NET,
+ PORT_UNKNOWN,
+};
+
+static void if1_reset( int hard_reset );
+static void if1_enabled_snapshot( libspectrum_snap *snap );
+static void if1_from_snapshot( libspectrum_snap *snap );
+static void if1_to_snapshot( libspectrum_snap *snap );
+
+static module_info_t if1_module_info = {
+
+ if1_reset,
+ if1_memory_map,
+ if1_enabled_snapshot,
+ if1_from_snapshot,
+ if1_to_snapshot,
+
+};
+
+const periph_t if1_peripherals[] = {
+ { 0x0018, 0x0010, if1_port_in, if1_port_out },
+ { 0x0018, 0x0008, if1_port_in, if1_port_out },
+ { 0x0018, 0x0000, if1_port_in, if1_port_out },
+};
+
+const size_t if1_peripherals_count =
+ sizeof( if1_peripherals ) / sizeof( periph_t );
+
+/* Debugger events */
+static const char *event_type_string = "if1";
+static int page_event, unpage_event;
+
+static void
+update_menu( enum if1_menu_item what )
+{
+ if( what == UMENU_ALL || what == UMENU_MDRV1 ) {
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M1_EJECT, MDR_IN( 1 ) );
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M1_WP_SET,
+ !MDR_IN( 1 ) ? 0 : !MDR_WP( 1 ) );
+ }
+
+ if( what == UMENU_ALL || what == UMENU_MDRV2 ) {
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M2_EJECT, MDR_IN( 2 ) );
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M2_WP_SET,
+ !MDR_IN( 2 ) ? 0 : !MDR_WP( 2 ) );
+ }
+
+ if( what == UMENU_ALL || what == UMENU_MDRV3 ) {
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M3_EJECT, MDR_IN( 3 ) );
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M3_WP_SET,
+ !MDR_IN( 3 ) ? 0 : !MDR_WP( 3 ) );
+ }
+
+ if( what == UMENU_ALL || what == UMENU_MDRV4 ) {
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M4_EJECT, MDR_IN( 4 ) );
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M4_WP_SET,
+ !MDR_IN( 4 ) ? 0 : !MDR_WP( 4 ) );
+ }
+
+ if( what == UMENU_ALL || what == UMENU_MDRV5 ) {
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M5_EJECT, MDR_IN( 5 ) );
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M5_WP_SET,
+ !MDR_IN( 5 ) ? 0 : !MDR_WP( 5 ) );
+ }
+
+ if( what == UMENU_ALL || what == UMENU_MDRV6 ) {
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M6_EJECT, MDR_IN( 6 ) );
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M6_WP_SET,
+ !MDR_IN( 6 ) ? 0 : !MDR_WP( 6 ) );
+ }
+
+ if( what == UMENU_ALL || what == UMENU_MDRV7 ) {
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M7_EJECT, MDR_IN( 7 ) );
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M7_WP_SET,
+ !MDR_IN( 7 ) ? 0 : !MDR_WP( 7 ) );
+ }
+
+ if( what == UMENU_ALL || what == UMENU_MDRV8 ) {
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M8_EJECT, MDR_IN( 8 ) );
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_M8_WP_SET,
+ !MDR_IN( 8 ) ? 0 : !MDR_WP( 8 ) );
+ }
+
+ if( what == UMENU_ALL || what == UMENU_RS232 ) {
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_RS232_UNPLUG_R,
+ ( if1_ula.fd_r > -1 ) ? 1 : 0 );
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_RS232_UNPLUG_T,
+ ( if1_ula.fd_t > -1 ) ? 1 : 0 );
+#ifdef BUILD_WITH_SNET
+ ui_menu_activate( UI_MENU_ITEM_MEDIA_IF1_SNET_UNPLUG,
+ ( if1_ula.fd_net > -1 ) ? 1 : 0 );
+#endif
+ }
+}
+
+int
+if1_init( void )
+{
+ int m, i;
+
+ if1_ula.fd_r = -1;
+ if1_ula.fd_t = -1;
+ if1_ula.dtr = 0; /* No data terminal yet */
+ if1_ula.cts = 2; /* force to emit first cts status */
+ if1_ula.comms_clk = 0;
+ if1_ula.comms_data = 0; /* really? */
+ if1_ula.fd_net = -1;
+ if1_ula.s_net_mode = 1;
+ if1_ula.net = 0;
+ if1_ula.esc_in = 0; /* empty */
+
+ for( m = 0; m < 8; m++ ) {
+ microdrive[m].cartridge = libspectrum_microdrive_alloc();
+ microdrive[m].inserted = 0;
+ microdrive[m].modified = 0;
+ }
+
+ if( settings_current.rs232_rx ) {
+ if1_plug( settings_current.rs232_rx, 1 );
+ free( settings_current.rs232_rx );
+ settings_current.rs232_rx = NULL;
+ }
+
+ if( settings_current.rs232_tx ) {
+ if1_plug( settings_current.rs232_tx, 2 );
+ free( settings_current.rs232_tx );
+ settings_current.rs232_tx = NULL;
+ }
+
+ if( settings_current.snet ) {
+ if1_plug( settings_current.snet, 3 );
+ free( settings_current.snet );
+ settings_current.snet = NULL;
+ }
+
+ module_register( &if1_module_info );
+ for( i = 0; i < 2; i++ ) if1_memory_map_romcs[i].bank = MEMORY_BANK_ROMCS;
+
+ if( periph_register_paging_events( event_type_string, &page_event,
+ &unpage_event ) )
+ return 1;
+
+ return 0;
+}
+
+libspectrum_error
+if1_end( void )
+{
+ int m;
+
+ for( m = 0; m < 8; m++ ) {
+ libspectrum_error error =
+ libspectrum_microdrive_free( microdrive[m].cartridge );
+ if( error ) return error;
+ }
+
+ return LIBSPECTRUM_ERROR_NONE;
+}
+
+void
+if1_update_menu( void )
+{
+ update_menu( UMENU_ALL );
+}
+
+static void
+if1_reset( int hard_reset GCC_UNUSED )
+{
+ if1_active = 0;
+ if1_available = 0;
+
+ if( !periph_interface1_active ) return;
+
+ machine_load_rom_bank( if1_memory_map_romcs, 0, 0,
+ settings_current.rom_interface_i,
+ settings_default.rom_interface_i,
+ MEMORY_PAGE_SIZE );
+
+ if1_memory_map_romcs[0].source = MEMORY_SOURCE_PERIPHERAL;
+
+ machine_current->ram.romcs = 0;
+
+ if1_ula.cts = 2; /* force to emit first out if raw */
+ if1_ula.comms_clk = 0;
+ if1_ula.comms_data = 0;
+ if1_ula.net = 0;
+ if1_ula.esc_in = 0;
+
+ microdrives_reset();
+
+ update_menu( UMENU_ALL );
+ ui_statusbar_update( UI_STATUSBAR_ITEM_MICRODRIVE,
+ UI_STATUSBAR_STATE_INACTIVE );
+
+ if1_mdr_status = 0;
+
+ if1_available = 1;
+}
+
+void
+if1_page( void )
+{
+ if1_active = 1;
+ machine_current->ram.romcs = 1;
+ machine_current->memory_map();
+
+ debugger_event( page_event );
+}
+
+void
+if1_unpage( void )
+{
+ if1_active = 0;
+ machine_current->ram.romcs = 0;
+ machine_current->memory_map();
+
+ debugger_event( unpage_event );
+}
+
+void
+if1_memory_map( void )
+{
+ if( !if1_active ) return;
+
+ memory_map_read[0] = memory_map_write[0] = if1_memory_map_romcs[0];
+}
+
+static void
+if1_enabled_snapshot( libspectrum_snap *snap )
+{
+ if( libspectrum_snap_interface1_active( snap ) )
+ settings_current.interface1 = 1;
+}
+
+static void
+if1_from_snapshot( libspectrum_snap *snap )
+{
+ if( !libspectrum_snap_interface1_active( snap ) ) return;
+
+ if( libspectrum_snap_interface1_custom_rom( snap ) &&
+ libspectrum_snap_interface1_rom( snap, 0 ) &&
+ machine_load_rom_bank_from_buffer(
+ if1_memory_map_romcs, 0, 0,
+ libspectrum_snap_interface1_rom( snap, 0 ),
+ libspectrum_snap_interface1_rom_length( snap, 0 ),
+ 1 ) )
+ return;
+
+ if( libspectrum_snap_interface1_paged( snap ) ) {
+ if1_page();
+ } else {
+ if1_unpage();
+ }
+}
+
+static void
+if1_to_snapshot( libspectrum_snap *snap )
+{
+ libspectrum_byte *buffer;
+
+ if( !periph_interface1_active ) return;
+
+ libspectrum_snap_set_interface1_active( snap, 1 );
+ libspectrum_snap_set_interface1_paged ( snap, if1_active );
+ libspectrum_snap_set_interface1_drive_count( snap, 8 );
+
+ if( if1_memory_map_romcs[0].source == MEMORY_SOURCE_CUSTOMROM ) {
+ size_t rom_length = MEMORY_PAGE_SIZE;
+
+ if( if1_memory_map_romcs[1].source == MEMORY_SOURCE_CUSTOMROM ) {
+ rom_length <<= 1;
+ }
+
+ libspectrum_snap_set_interface1_custom_rom( snap, 1 );
+ libspectrum_snap_set_interface1_rom_length( snap, 0, rom_length );
+
+ buffer = malloc( rom_length );
+ if( !buffer ) {
+ ui_error( UI_ERROR_ERROR, "Out of memory at %s:%d", __FILE__, __LINE__ );
+ return;
+ }
+
+ memcpy( buffer, if1_memory_map_romcs[0].page, MEMORY_PAGE_SIZE );
+
+ if( rom_length == MEMORY_PAGE_SIZE*2 ) {
+ memcpy( buffer + MEMORY_PAGE_SIZE, if1_memory_map_romcs[1].page,
+ MEMORY_PAGE_SIZE );
+ }
+
+ libspectrum_snap_set_interface1_rom( snap, 0, buffer );
+ }
+}
+
+static void
+microdrives_reset( void )
+{
+ int m;
+
+ for( m = 0; m < 8; m++ ) {
+ microdrive[m].head_pos = 0;
+ microdrive[m].motor_on = 0; /* motor off */
+ microdrive[m].gap = 15;
+ microdrive[m].sync = 15;
+ microdrive[m].transfered = 0;
+ }
+ ui_statusbar_update( UI_STATUSBAR_ITEM_MICRODRIVE,
+ UI_STATUSBAR_STATE_INACTIVE );
+ if1_mdr_status = 0;
+/*
+ if1_ula.comms_data = 0;
+ if1_ula.count_in = 0;
+ if1_ula.count_out = 0;
+ if1_ula.cts = 0;
+ if1_ula.dtr = 0;
+ if1_ula.wait = 0;
+ if1_ula.busy = 0;
+ if1_ula.net = 0;
+ if1_ula.net_state = 0;
+*/
+}
+
+static enum if1_port
+decode_port( libspectrum_word port )
+{
+ switch( port & 0x0018 ) {
+ case 0x0000: return PORT_MDR;
+ case 0x0008: return PORT_CTR;
+ case 0x0010: return PORT_NET;
+ default: return PORT_UNKNOWN;
+ }
+}
+
+static libspectrum_byte
+port_mdr_in( void )
+{
+ libspectrum_byte ret = 0xff;
+ int m;
+
+ for( m = 0; m < 8; m++ ) {
+
+ microdrive_t *mdr = µdrive[ m ];
+
+ if( mdr->motor_on && mdr->inserted ) {
+
+ if( mdr->transfered < mdr->max_bytes ) {
+ mdr->last = libspectrum_microdrive_data( mdr->cartridge,
+ mdr->head_pos );
+ increment_head( m );
+ }
+
+ mdr->transfered++;
+ ret &= mdr->last; /* I assume negative logic, but how know? */
+ }
+
+ }
+
+ return ret;
+}
+
+static libspectrum_byte
+port_ctr_in( void )
+{
+ libspectrum_byte ret = 0xff;
+ int m, block;
+
+ for( m = 0; m < 8; m++ ) {
+
+ microdrive_t *mdr = µdrive[ m ];
+
+ if( mdr->motor_on && mdr->inserted ) {
+ block = mdr->head_pos / 543 + ( mdr->max_bytes == 15 ? 0 : 256 );
+ if( mdr->pream[block] == SYNC_OK ) { /* if formatted */
+ if( mdr->gap ) {
+ /* ret &= 0xff; GAP and SYNC high ? */
+ mdr->gap--;
+ } else {
+ ret &= 0xf9; /* GAP and SYNC low */
+ if( mdr->sync ) {
+ mdr->sync--;
+ } else {
+ mdr->gap = 15;
+ mdr->sync = 15;
+ }
+ }
+ }
+ /* if write protected */
+ if( libspectrum_microdrive_write_protect( mdr->cartridge) )
+ ret &= 0xfe; /* active bit */
+ }
+ }
+ /* Here we have to poll, the if1_ula DTR 'line' */
+ if( if1_ula.rs232_buffer > 0xff ) { /* buffer empty */
+ unsigned char byte;
+ int yes = 1;
+
+ while( yes && read( if1_ula.fd_r, &byte, 1 ) == 1 ) {
+ if( if1_ula.esc_in == 1 ) {
+ if1_ula.esc_in = 0;
+ if( byte == '*' ) {
+ if1_ula.rs232_buffer = 0x00;
+ yes = 0;
+ } else if( byte == 0x00 ) {
+ if( settings_current.rs232_handshake )
+ if1_ula.dtr = 0;
+ } else if( byte == 0x01 ) {
+ if( settings_current.rs232_handshake )
+ if1_ula.dtr = 1;
+ }
+ } else if( byte == 0x00 ) {
+ if1_ula.esc_in = 1;
+ } else {
+ if1_ula.rs232_buffer = byte;
+ yes = 0;
+ break;
+ }
+ }
+ }
+
+ if( if1_ula.dtr == 0 )
+ ret &= 0xf7; /* %11110111 */
+
+ /* Here we have to poll, the 'SinclairNet' busy flag but never used by
+ software in Interface 1 */
+ if( if1_ula.busy == 0 )
+ ret &= 0xef; /* %11101111 */
+ /* fprintf( stderr, "Read CTR ( %%%d%d%d%d%d%d%d%d ).\n",
+ !!(ret & 128), !!(ret & 64), !!(ret & 32), !!(ret & 16),
+ !!(ret & 8), !!(ret & 4), !!(ret & 2), !!(ret & 1)); */
+ microdrives_restart();
+
+ return ret;
+}
+
+/*
+ return 1 if read a byte
+ 0 if nothing interesting...
+*/
+
+static int
+read_rs232()
+{
+ if( if1_ula.rs232_buffer <= 0xff ) { /* we read from the buffer */
+ if1_ula.data_in = if1_ula.rs232_buffer;
+ if1_ula.rs232_buffer = 0x0100;
+ return 1;
+ }
+ while( read( if1_ula.fd_r, &if1_ula.data_in, 1 ) == 1 ) {
+ if( if1_ula.esc_in == 1 ) {
+ if1_ula.esc_in = 0;
+ if( if1_ula.data_in == '*' ) {
+ if1_ula.data_in = 0x00;
+ return 1;
+ } else if( if1_ula.data_in == 0x00 ) {
+ if( settings_current.rs232_handshake )
+ if1_ula.dtr = 0;
+ } else if( if1_ula.data_in == 0x01 ) {
+ if( settings_current.rs232_handshake )
+ if1_ula.dtr = 1;
+ }
+ } else if( if1_ula.data_in == 0x00 ) {
+ if1_ula.esc_in = 1;
+ } else {
+ return 1;
+ }
+ }
+ return 0;
+}
+
+static libspectrum_byte
+port_net_in( void )
+{
+ libspectrum_byte ret = 0xff;
+
+ if( if1_ula.fd_r == -1 )
+ goto no_rs232_in;
+
+ /* Here is the RS232 input routine */
+ if( if1_ula.cts ) { /* If CTS == 1 */
+ if( if1_ula.count_in == 0 ) {
+ if( if1_ula.fd_r >= 0 && read_rs232() == 1 ) {
+ if1_ula.count_in++; /* Ok, if read a byte, we begin */
+ }
+ if1_ula.tx = 0; /* now send __ to if1
+ later we raise :-) */
+ } else if( if1_ula.count_in >= 1 && if1_ula.count_in < 5 ) {
+ if1_ula.tx = 1; /* send ~~ (start bit :-) */
+ if1_ula.count_in++;
+ } else if( if1_ula.count_in >= 5 && if1_ula.count_in < 13 ) {
+ if1_ula.tx = ( if1_ula.data_in & 0x01 ) ? 0 : 1;
+ /* send .. (data bits :-) */
+ if1_ula.data_in >>= 1; /* prepare next bit :-) */
+ if1_ula.count_in++;
+ } else
+ if1_ula.count_in = 0;
+ } else { /* if( if1_ula.cts ) */
+ if1_ula.count_in = 0; /* reset serial in */
+ if1_ula.tx = 0; /* send __ stop bits or s.e. :-) */
+ }
+
+no_rs232_in:
+ if( if1_ula.fd_net == -1 )
+ goto no_snet_in;
+
+ if( if1_ula.s_net_mode == 0 ) { /* if we do raw */
+ /* Here is the input routine */
+ read( if1_ula.fd_net, &if1_ula.net, 1 ); /* Ok, if no byte, we send last*/
+ } else {/* if( if1_ula.s_net_mode == 1 ) if we do interpreted */
+/* Here is the input routine. There are several stage in input
+ and output. So first for output. if1 first do SEND-SC
+ (http://www.wearmouth.demon.co.uk/if1_2.htm#L101E) to send
+ a Sync-Out signal and SEND-SC do first a NET-STATE
+ (http://www.wearmouth.demon.co.uk/if1_2.htm#L0FBC) to see
+ the line activity:
+ 11xxxxxx times (192-255) have to get a zero (bit for network)
+ plus 1 times more from SEND-SC. Next SEND-SC send a 0 which is
+ a 1 on the net wire (negated output, straight input!!!)
+
+ OK. In input first if1 call WT-SC-E to check Network activity
+ (http://www.wearmouth.demon.co.uk/if1_2.htm#L0FD3). Now check
+ 128 times the net wire (we do two round, because to differentiate
+ net out routines...)
+*/
+
+ if( if1_ula.net_state < 0x0100 ) { /* if1 may in NET-STATE */
+ if1_ula.net_state++;
+ if1_ula.net = 0;
+#ifdef IF1_DEBUG_NET
+ fprintf( stderr, "NET-STAT(%03d)? We send 0!\n", if1_ula.net_state );
+#endif
+ } else if( if1_ula.net_state == 0x0100 ) { /* probably waiting for input */
+ if( read( if1_ula.fd_net, &if1_ula.net_data, 1 ) == 1 ) {
+ if1_ula.net_state++;
+ if1_ula.net = 1; /* Start with __/~~ */
+ } /* Ok, if have a byte, we send it! */
+ } else if( if1_ula.net_state == 0x0101 ) {
+ if1_ula.net_state++;
+ if1_ula.net = 1; /* one more ~~ */
+ } else if( if1_ula.net_state > 0x0101 &&
+ if1_ula.net_state < 0x010a ) { /* we send the data bits... */
+ if1_ula.net_state++;
+ if1_ula.net = if1_ula.net_data & 1;
+ if1_ula.net_data >>= 1;
+ } else if( if1_ula.net_state == 0x010a ) {
+ if1_ula.net = 0;
+ if1_ula.net_state = 0; /* OK, we starting a new byte... */
+#ifdef IF1_DEBUG_NET
+ fprintf( stderr, "NET-STAT(%03d)? Get a byte!\n", if1_ula.net_state );
+#endif
+ }
+ }
+no_snet_in:
+ if( !if1_ula.tx )
+ ret &= 0x7f;
+ if( !if1_ula.net )
+ ret &= 0xfe;
+ microdrives_restart();
+
+ return ret;
+}
+
+libspectrum_byte
+if1_port_in( libspectrum_word port GCC_UNUSED, int *attached )
+{
+ libspectrum_byte ret = 0xff;
+
+ if( !if1_active ) return ret;
+
+ *attached = 1;
+
+ switch( decode_port( port ) )
+ {
+ case PORT_MDR: ret &= port_mdr_in(); break;
+ case PORT_CTR: ret &= port_ctr_in(); break;
+ case PORT_NET: ret &= port_net_in(); break;
+ case PORT_UNKNOWN: break;
+ }
+
+ return ret;
+}
+
+static void
+port_mdr_out( libspectrum_byte val )
+{
+ int m, block;
+
+ /* allow access to the port only if motor 1 is ON and there's a file open */
+ for( m = 0; m < 8; m++ ) {
+
+ microdrive_t *mdr = µdrive[ m ];
+
+ if( mdr->motor_on && mdr->inserted ) {
+#ifdef IF1_DEBUG_MDR
+ fprintf(stderr, "#%05d %03d(%03d): 0x%02x\n",
+ mdr->head_pos, mdr->transfered, mdr->max_bytes, val );
+#endif
+ block = mdr->head_pos / 543 + ( mdr->max_bytes == 15 ? 0 : 256 );
+ if( mdr->transfered == 0 && val == 0x00 ) { /* start pream */
+ mdr->pream[block] = 1;
+ } else if( mdr->transfered > 0 && mdr->transfered < 10 && val == 0x00 ) {
+ mdr->pream[block]++;
+ } else if( mdr->transfered > 9 && mdr->transfered < 12 && val == 0xff ) {
+ mdr->pream[block]++;
+ } else if( mdr->transfered == 12 && mdr->pream[block] == 12 ) {
+ mdr->pream[block] = SYNC_OK;
+ }
+ if( mdr->transfered > 11 &&
+ mdr->transfered < mdr->max_bytes + 12 ) {
+
+ libspectrum_microdrive_set_data( mdr->cartridge, mdr->head_pos,
+ val );
+ increment_head( m );
+ mdr->modified = 1;
+ }
+ mdr->transfered++;
+ }
+ }
+}
+
+static void
+port_ctr_out( libspectrum_byte val )
+{
+ int m;
+
+ if( !( val & 0x02 ) && ( if1_ula.comms_clk ) ) { /* ~~\__ */
+
+ for( m = 7; m > 0; m-- ) {
+ /* Rotate one drive */
+ microdrive[m].motor_on = microdrive[m - 1].motor_on;
+ }
+ microdrive[0].motor_on = (val & 0x01) ? 0 : 1;
+
+ if( microdrive[0].motor_on || microdrive[1].motor_on ||
+ microdrive[2].motor_on || microdrive[3].motor_on ||
+ microdrive[4].motor_on || microdrive[5].motor_on ||
+ microdrive[6].motor_on || microdrive[7].motor_on ) {
+ if( !if1_mdr_status ) {
+ ui_statusbar_update( UI_STATUSBAR_ITEM_MICRODRIVE,
+ UI_STATUSBAR_STATE_ACTIVE );
+ if1_mdr_status = 1;
+ }
+ } else if ( if1_mdr_status ) {
+ ui_statusbar_update( UI_STATUSBAR_ITEM_MICRODRIVE,
+ UI_STATUSBAR_STATE_INACTIVE );
+ if1_mdr_status = 0;
+ }
+ }
+ if( val & 0x01 ) { /* comms_data == 1 */
+ /* Interface 1 service manual p.:1.4 par.: 1.5.1
+ The same pin on IC1 (if1 ULA), pin 33, is used for the network
+ transmit data and for the RS232 transmit data. In order to select
+ the required function IC1 uses its COMMS_OUT (pin 30) signal,
+ borrowed from the microdrive control when the microdrive is not
+ being used (I do not know what it is exactly meaning. It is a
+ hardware not being used, or a software should not use..?) This signal
+ is routed from pin 30 to the emitter of transistor Q3 (RX DATA) and
+ via resistor R4, to the base of transistor Q1 (NET). When COMMS_OUT
+ is high Q3 is enabled this selecting RS232, and when it is low
+ Q1 is enabled selecting the network.
+
+ OK, the schematics offer a different interpretation, because if
+ COMMS_OUT pin level high (>+3V) then Q3 is off (the basis cannot
+ be more higher potential then emitter (NPN transistor), so whatever
+ is on the IC1 RX DATA (pin 33) the basis of Q4 is always on +12V,
+ so the collector of Q4 (PNP transistor) always on -12V.
+ If COMMS_OUT pin level goes low (~0V), then Q3 basis (connected
+ to IC1 RX DATA pin) can be higher level (>+3V) than emitter, so
+ the basis potential of Q4 depend on IC1 RX DATA.
+
+ OK, Summa summarum I assume that, the COMMS OUT pin is a
+ negated output of the if1 ULA CTR register's COMMS DATA bit.
+ */
+ /* C_DATA = 1 */
+ if( if1_ula.comms_data == 0 ) {
+ if1_ula.count_out = 0;
+ if1_ula.data_out = 0;
+ if1_ula.count_in = 0;
+ if1_ula.data_in = 0;
+ }
+ }
+ if1_ula.wait = ( val & 0x20 ) ? 1 : 0;
+ if1_ula.comms_data = ( val & 0x01 ) ? 1 : 0;
+ if1_ula.comms_clk = ( val & 0x02 ) ? 1 : 0;
+ val = ( val & 0x10 ) ? 1 : 0;
+ if( settings_current.rs232_handshake &&
+ if1_ula.fd_t != -1 && if1_ula.cts != val ) {
+ char data = val ? 0x03 : 0x02;
+ do ; while( write( if1_ula.fd_t, "", 1 ) != 1 );
+ do ; while( write( if1_ula.fd_t, &data, 1 ) != 1 );
+ }
+ if1_ula.cts = val;
+
+#ifdef IF1_DEBUG_NET
+ fprintf( stderr, "Set CTS to %d, set WAIT to %d and COMMS_DATA to %d\n",
+ if1_ula.cts, if1_ula.wait, if1_ula.comms_data );
+#endif
+
+ microdrives_restart();
+}
+
+static void
+port_net_out( libspectrum_byte val )
+{
+ if( if1_ula.fd_t == -1 )
+ return; /* nothing to write */
+
+ if( if1_ula.comms_data == 1 ) { /* OK, RS232 */
+ val &= 0x01;
+ if( if1_ula.count_out == 0 && !val ) { /* waiting for ~~\__ */
+ if1_ula.count_out++;
+ } else if( if1_ula.count_out == 1 ) {
+ if( if1_ula.cts != 0 || !val )
+ if1_ula.count_out = -1;
+ else
+ if1_ula.count_out++; /* else get the start bit __/~~ */
+ } else if( if1_ula.count_out >= 2 && if1_ula.count_out <= 9 ) {
+ if1_ula.data_out >>= 1;
+ if1_ula.data_out |= val & 0x01 ? 0 : 128;
+ if1_ula.count_out++; /* waiting for next data bit */
+ } else if( if1_ula.count_out >= 10 && if1_ula.count_out <= 11 ) {
+ if( val )
+ if1_ula.count_out = -1;
+ else
+ if1_ula.count_out++;
+ } else if( if1_ula.count_out == 12 ) {
+ if( !val )
+ if1_ula.count_out = -1;
+ else
+ if1_ula.count_out++;
+ } else if( if1_ula.count_out == 13 ) {
+ if( val )
+ if1_ula.count_out = -1;
+ }
+
+ if( if1_ula.count_out == -1 ) {
+ if1_ula.count_out = 13;
+ if1_ula.data_out = '?';
+ do ; while( write( if1_ula.fd_t, "", 1 ) != 1 );
+ }
+ if( if1_ula.count_out == 13 ) {
+ /* Here is the output routine */
+ if( if1_ula.data_out == 0x00 ) {
+ if1_ula.data_out = '*';
+ do ; while( write( if1_ula.fd_t, "", 1 ) != 1 );
+ }
+ do ; while( write( if1_ula.fd_t, &if1_ula.data_out, 1 ) != 1 );
+ if1_ula.count_out = 0;
+ }
+ if1_ula.rx = val & 0x01; /* set rx */
+ } else { /* if( if1_ula.comms_data == 1 ) SinclairNET :-)*/
+ if( if1_ula.s_net_mode == 0 ) { /* if we out bit by bit, do it */
+ /* Here is the output routine */
+
+/* OK, examining the schematics of if1 and the disassembly of if1 ROM, I
+ see that the Q1 and Q2 transistors negate the RX DATA signal, and the
+ floating state of the net wire is the ~0V level, the forced is the ~3V.
+ The if1 software send complemented data and read straight data.
+*/
+ if1_ula.net = ( val & 0x01 ) ? 0 : 1; /* set rx */
+ lseek( if1_ula.fd_net, 0, SEEK_SET ); /* we save only the state of the wire*/
+ do ; while( write( if1_ula.fd_net, &if1_ula.net, 1 ) == -1 );
+#ifdef HAVE_FSYNC
+ fsync( if1_ula.fd_net );
+#endif /* #ifdef HAVE_FSYNC */
+#ifdef IF1_DEBUG_NET
+ fprintf( stderr, "Send SinclairNET: %d\n", if1_ula.net );
+#endif
+ } else { /* if( if1_ula.s_net_mode == 0 ) if we out byte by byte, do it */
+ if( if1_ula.net_state >= 0x0200 && if1_ula.net_state < 0x0208 ) {
+ if1_ula.net_state++;
+ if1_ula.net_data <<= 1;
+ if1_ula.net_data |= ( val & 0x01 ) ? 0 : 1;
+ } else if( if1_ula.net_state == 0x0208 ) {
+ if1_ula.net_data &= 0xff;
+ if1_ula.net_state++; /* OK, now we get data bytes... */
+
+/* lseek( if1_ula.fd_net, 0, SEEK_SET ); start a packet */
+ /* first we send the station number */
+ do ; while( write( if1_ula.fd_net, &if1_ula.net_data, 1 ) == -1 );
+#ifdef HAVE_FSYNC
+ fsync( if1_ula.fd_net );
+#endif /* #ifdef HAVE_FSYNC */
+#ifdef IF1_DEBUG_NET
+ fprintf( stderr, "SC-OUT send network number: %d\n",
+ if1_ula.net_data ^ 0xff );
+#endif
+ } else if( if1_ula.net_state > 192 && if1_ula.net_state < 0x0200 &&
+ ( ( val & 0x01 ) == 0 ) ) {
+ /* NET-STATE ask as many times.... and now send a 0 */
+/* if1_ula.net = 1; */
+ if1_ula.net_state = 0x0200; /* Send the station number */
+ }
+ if1_ula.net = ( val & 0x01 ) ? 0 : 1; /* set net wire? */
+ }
+ }
+ microdrives_restart();
+}
+
+void
+if1_port_out( libspectrum_word port GCC_UNUSED, libspectrum_byte val )
+{
+ if( !if1_active ) return;
+
+#ifdef IF1_DEBUG_NET_1
+ fprintf( stderr, "In if1_port_out( %%%d%d%d%d%d%d%d%d => 0x%04x ).\n",
+ !!(val & 128), !!(val & 64), !!(val & 32), !!(val & 16),
+ !!(val & 8), !!(val & 4), !!(val & 2), !!(val & 1), port);
+#endif
+
+ switch( decode_port( port ) ) {
+ case PORT_MDR: port_mdr_out( val ); break;
+ case PORT_CTR: port_ctr_out( val ); break;
+ case PORT_NET: port_net_out( val ); break;
+ case PORT_UNKNOWN: break;
+ }
+}
+
+static void
+increment_head( int m )
+{
+ microdrive[m].head_pos++;
+ if( microdrive[m].head_pos >=
+ libspectrum_microdrive_cartridge_len( microdrive[m].cartridge ) *
+ LIBSPECTRUM_MICRODRIVE_BLOCK_LEN )
+ microdrive[m].head_pos = 0;
+}
+
+static void
+microdrives_restart( void )
+{
+ int m;
+
+ for( m = 0; m < 8; m++ ) {
+ while( ( microdrive[m].head_pos % LIBSPECTRUM_MICRODRIVE_BLOCK_LEN ) != 0 &&
+ ( microdrive[m].head_pos % LIBSPECTRUM_MICRODRIVE_BLOCK_LEN ) != LIBSPECTRUM_MICRODRIVE_HEAD_LEN )
+ increment_head( m ); /* put head in the start of a block */
+
+ microdrive[m].transfered = 0; /* reset current number of bytes written */
+
+ if( ( microdrive[m].head_pos % LIBSPECTRUM_MICRODRIVE_BLOCK_LEN ) == 0 ) {
+ microdrive[m].max_bytes = LIBSPECTRUM_MICRODRIVE_HEAD_LEN; /* up to 15 bytes for header blocks */
+ } else {
+ microdrive[m].max_bytes = LIBSPECTRUM_MICRODRIVE_HEAD_LEN + LIBSPECTRUM_MICRODRIVE_DATA_LEN + 1; /* up to 528 bytes for data blocks */
+ }
+ }
+}
+
+void
+if1_mdr_writeprotect( int drive, int wrprot )
+{
+ libspectrum_microdrive_set_write_protect( microdrive[drive].cartridge,
+ wrprot ? 1 : 0 );
+ microdrive[drive].modified = 1;
+
+ update_menu( UMENU_MDRV1 + drive );
+}
+
+static void
+if1_mdr_new( microdrive_t *mdr )
+{
+ libspectrum_byte len;
+ long int i;
+
+ mdr->filename = NULL;
+ if( settings_current.mdr_random_len ) { /* Random length */
+ len = 171 + ( ( rand() >> 2 ) + ( rand() >> 2 ) +
+ ( rand() >> 2 ) + ( rand() >> 2 ) )
+ / rnd_factor;
+ } else
+ len = settings_current.mdr_len = settings_current.mdr_len < 10 ? 10 :
+ settings_current.mdr_len > LIBSPECTRUM_MICRODRIVE_BLOCK_MAX ? LIBSPECTRUM_MICRODRIVE_BLOCK_MAX : settings_current.mdr_len;
+
+ /* Erase the entire cartridge */
+ libspectrum_microdrive_set_cartridge_len( mdr->cartridge, len );
+
+ for( i = 0; i < len * LIBSPECTRUM_MICRODRIVE_BLOCK_LEN; i++ )
+ libspectrum_microdrive_set_data( mdr->cartridge, i, 0xff );
+
+ for( i = libspectrum_microdrive_cartridge_len( mdr->cartridge );
+ i > 0; i-- )
+ mdr->pream[255 + i] = mdr->pream[i-1] = SYNC_NO;
+
+ /* but don't write-protect */
+ libspectrum_microdrive_set_write_protect( mdr->cartridge, 0 );
+
+ mdr->inserted = 1;
+ mdr->modified = 1;
+
+}
+
+int
+if1_mdr_insert( int which, const char *filename )
+{
+ microdrive_t *mdr;
+ int m, i;
+
+ if( which == -1 ) { /* find an empty one */
+ for( m = 0; m < 8; m++ ) {
+ if( !microdrive[m].inserted ) {
+ which = m;
+ break;
+ }
+ }
+ }
+
+ if( which == -1 ) {
+ ui_error( UI_ERROR_ERROR,
+ "Cannot insert cartridge '%s', all Microdrives in use",
+ filename );
+ return 1;
+ }
+
+ if( which >= 8 ) {
+ ui_error( UI_ERROR_ERROR, "if1_mdr_insert: unknown drive %d", which );
+ return 1;
+ }
+
+ mdr = µdrive[ which ];
+
+ /* Eject any cartridge already in the drive */
+ if( mdr->inserted ) {
+ /* Abort the insert if we want to keep the current cartridge */
+ if( if1_mdr_eject( which, 0 ) ) return 0;
+ }
+
+ if( filename == NULL ) { /* insert new unformatted cartridge */
+ if1_mdr_new( mdr );
+ update_menu( UMENU_MDRV1 + which );
+ return 0;
+ }
+
+ if( utils_read_file( filename, &mdr->file ) ) {
+ ui_error( UI_ERROR_ERROR, "Failed to open cartridge image" );
+ return 1;
+ }
+
+ if( libspectrum_microdrive_mdr_read( mdr->cartridge, mdr->file.buffer,
+ mdr->file.length ) ) {
+ utils_close_file( &mdr->file );
+ ui_error( UI_ERROR_ERROR, "Failed to open cartridge image" );
+ return 1;
+ }
+
+ if( utils_close_file( &mdr->file ) ) return 1;
+
+ mdr->inserted = 1;
+ mdr->modified = 0;
+ mdr->filename = strdup( filename );
+ /* we assume formatted cartridges */
+ for( i = libspectrum_microdrive_cartridge_len( mdr->cartridge );
+ i > 0; i-- )
+ mdr->pream[255 + i] = mdr->pream[i-1] = SYNC_OK;
+
+ update_menu( UMENU_MDRV1 + which );
+
+ return 0;
+}
+
+int
+if1_mdr_eject( int which, int saveas )
+{
+ microdrive_t *mdr;
+
+ if( which >= 8 )
+ return 1;
+
+ mdr = µdrive[ which ];
+
+ if( !mdr->inserted )
+ return 0;
+
+ if( saveas ) { /* 1 -> save as.., 2 -> save */
+
+ if( mdr->filename == NULL ) saveas = 1;
+ if( ui_mdr_write( which, 2 - saveas ) ) return 1;
+ mdr->modified = 0;
+ return 0;
+
+ } else {
+
+ if( mdr->modified ) {
+
+ ui_confirm_save_t confirm = ui_confirm_save(
+ "Cartridge in Microdrive %i has been modified.\n"
+ "Do you want to save it?",
+ which + 1
+ );
+
+ switch( confirm ) {
+
+ case UI_CONFIRM_SAVE_SAVE:
+ if( if1_mdr_eject( which, 2 ) ) return 1; /* first save */
+ break;
+
+ case UI_CONFIRM_SAVE_DONTSAVE: break;
+ case UI_CONFIRM_SAVE_CANCEL: return 1;
+
+ }
+ }
+ }
+
+ mdr->inserted = 0;
+ if( mdr->filename != NULL ) {
+ free( mdr->filename );
+ mdr->filename = NULL;
+ }
+
+ update_menu( UMENU_MDRV1 + which );
+ return 0;
+}
+
+int
+if1_mdr_write( int which, const char *filename )
+{
+ microdrive_t *mdr = µdrive[which];
+
+ libspectrum_microdrive_mdr_write( mdr->cartridge, &mdr->file.buffer,
+ &mdr->file.length );
+
+ if( filename == NULL ) filename = mdr->filename; /* Write over the original file */
+
+ if( utils_write_file( filename, mdr->file.buffer, mdr->file.length ) )
+ return 1;
+
+ if( mdr->filename && strcmp( filename, mdr->filename ) ) {
+ free( mdr->filename );
+ mdr->filename = strdup( filename );
+ }
+ return 0;
+}
+
+#ifndef O_NONBLOCK
+#define O_NONBLOCK FNDELAY
+#endif
+
+void
+if1_plug( const char *filename, int what )
+{
+#ifdef WIN32
+ ui_error( UI_ERROR_ERROR, "Not yet implemented on Win32" );
+ return;
+#else
+ int fd = -1;
+
+ switch( what ) {
+ case 1:
+ if( if1_ula.fd_r >= 0 )
+ close( if1_ula.fd_r );
+ fd = if1_ula.fd_r = open( filename, O_RDWR | O_NONBLOCK );
+ if( fcntl( fd, F_SETFL, O_RDONLY | O_NONBLOCK ) )
+ ui_error( UI_ERROR_ERROR, "Cannot set O_RDONLY on '%s': %s",
+ filename, strerror( errno ) );
+ if1_ula.rs232_buffer = 0x100; /* buffer is empty */
+ break;
+ case 2:
+ if( if1_ula.fd_t >= 0 )
+ close( if1_ula.fd_t );
+ fd = if1_ula.fd_t = open( filename, O_RDWR | O_NONBLOCK );
+ if( fcntl( fd, F_SETFL, O_WRONLY | O_NONBLOCK ) )
+ ui_error( UI_ERROR_ERROR, "Cannot set O_WRONLY on '%s': %s",
+ filename, strerror( errno ) );
+ break;
+ case 3:
+ if( if1_ula.fd_net >= 0 )
+ close( if1_ula.fd_net );
+ fd = if1_ula.fd_net = open( filename, O_RDWR | O_NONBLOCK );
+ break;
+ }
+
+ /* rs232_handshake == 0 -> we assume DTR(DSR) always 1 if tx and rx plugged */
+ if( !settings_current.rs232_handshake &&
+ if1_ula.fd_t != -1 && if1_ula.fd_r != -1 )
+ if1_ula.dtr = 1;
+
+ if( fd < 0 ) {
+ ui_error( UI_ERROR_ERROR, "Error opening '%s': %s",
+ filename, strerror( errno ) );
+ return;
+ }
+
+ if1_ula.s_net_mode = settings_current.raw_s_net ? 0 : 1;
+ update_menu( UMENU_RS232 );
+#endif
+}
+
+void
+if1_unplug( int what )
+{
+ switch( what ) {
+ case 1:
+ if( if1_ula.fd_r >= 0 )
+ close( if1_ula.fd_r );
+ if1_ula.fd_r = -1;
+ break;
+ case 2:
+ if( if1_ula.fd_t >= 0 )
+ close( if1_ula.fd_t );
+ if1_ula.fd_t = -1;
+ if1_ula.dtr = 0;
+ break;
+ case 3:
+ if( if1_ula.fd_net >= 0 )
+ close( if1_ula.fd_net );
+ if1_ula.fd_net = -1;
+ break;
+ }
+ /* rs232_handshake == 0 -> we assume DTR(DSR) always 1 if tx and rx plugged */
+ if( !settings_current.rs232_handshake &&
+ ( if1_ula.fd_t == -1 || if1_ula.fd_r == -1 ) )
+ if1_ula.dtr = 0;
+ update_menu( UMENU_RS232 );
+}
Copied: vendor/fuse-emulator/current/fuse/if1.h (from rev 679, vendor/fuse-emulator/current/fuse/if1.h)
===================================================================
--- vendor/fuse-emulator/current/fuse/if1.h (rev 0)
+++ vendor/fuse-emulator/current/fuse/if1.h 2012-01-14 12:08:15 UTC (rev 681)
@@ -0,0 +1,59 @@
+/* if1.h: Interface I handling routines
+ Copyright (c) 2004-2005 Gergely Szasz, Philip Kendall
+
+ $Id: if1.h 3327 2007-11-22 23:06:47Z zubzero $
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License along
+ with this program; if not, write to the Free Software Foundation, Inc.,
+ 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+ Author contact information:
+
+ Gergely: sz...@hu...
+
+*/
+
+#ifndef FUSE_IF1_H
+#define FUSE_IF1_H
+
+#include <libspectrum.h>
+
+#include "periph.h"
+
+/* IF1 */
+extern int if1_active;
+extern int if1_available;
+
+extern const periph_t if1_peripherals[];
+extern const size_t if1_peripherals_count;
+
+int if1_init( void );
+libspectrum_error if1_end( void );
+
+void if1_page( void );
+void if1_unpage( void );
+void if1_memory_map( void );
+
+void if1_port_out( libspectrum_word port, libspectrum_byte val );
+libspectrum_byte if1_port_in( libspectrum_word port, int *attached );
+
+int if1_mdr_insert( int drive, const char *filename );
+int if1_mdr_write( int drive, const char *filename );
+int if1_mdr_eject( int drive, int write );
+void if1_mdr_writeprotect( int drive, int wrprot );
+void if1_plug( const char *filename, int what );
+void if1_unplug( int what );
+
+void if1_update_menu( void );
+
+#endif /* #ifndef FUSE_IF1_H */
Copied: vendor/fuse-emulator/current/fuse/if2.c (from rev 679, vendor/fuse-emulator/current/fuse/if2.c)
===================================================================
--- vendor/fuse-emulator/current/fuse/if2.c (rev 0)
+++ vendor/fuse-emulator/current/fuse/if2.c 2012-01-14 12:08:15 UTC (rev 681)
@@ -0,0 +1,204 @@
+/* if2.c: Interface II cartridge handling routines
+ Copyright (c) 2003 Darren Salt, Fredrick Meunier, Philip Kendall
+ Copyright (c) 2004 Fredrick Meunier
+
+ $Id: if2.c 4099 2009-10-22 10:59:02Z fredm $
+
+ This program is free software; you can redistr...
[truncated message content] |
