void legacy_floppy_image_device::device_start() { floppy_drive *floppy = get_safe_token( this ); floppy->config = (const floppy_interface*)static_config(); floppy_drive_init(this); floppy->drive_id = floppy_get_drive(this); floppy->active = FALSE; /* resolve callbacks */ floppy->out_idx_func.resolve(floppy->config->out_idx_func, *this); floppy->in_mon_func.resolve(floppy->config->in_mon_func, *this); floppy->out_tk00_func.resolve(floppy->config->out_tk00_func, *this); floppy->out_wpt_func.resolve(floppy->config->out_wpt_func, *this); floppy->out_rdy_func.resolve(floppy->config->out_rdy_func, *this); // floppy->out_dskchg_func.resolve(floppy->config->out_dskchg_func, *this); /* by default we are not write-protected */ floppy->wpt = ASSERT_LINE; floppy->out_wpt_func(floppy->wpt); /* not at track 0 */ floppy->tk00 = ASSERT_LINE; floppy->out_tk00_func(floppy->tk00); /* motor off */ floppy->mon = ASSERT_LINE; /* disk changed */ floppy->dskchg = CLEAR_LINE; // floppy->out_dskchg_func(floppy->dskchg); }
void legacy_floppy_image_device::device_start() { floppy_drive_init(); m_drive_id = floppy_get_drive(this); m_active = FALSE; /* resolve callbacks */ m_out_idx_func.resolve_safe(); //m_in_mon_func.resolve(m_config->in_mon_func, *this); //m_out_tk00_func.resolve(m_config->out_tk00_func, *this); //m_out_wpt_func.resolve(m_config->out_wpt_func, *this); //m_out_rdy_func.resolve(m_config->out_rdy_func, *this); // m_out_dskchg_func.resolve(m_config->out_dskchg_func, *this); /* by default we are not write-protected */ m_wpt = ASSERT_LINE; //m_out_wpt_func(m_wpt); /* not at track 0 */ m_tk00 = ASSERT_LINE; //m_out_tk00_func(m_tk00); /* motor off */ m_mon = ASSERT_LINE; /* disk changed */ m_dskchg = CLEAR_LINE; // m_out_dskchg_func(m_dskchg); }
int thomson_state::thmfc_floppy_find_sector( chrn_id* dst ) { legacy_floppy_image_device* img = thmfc_floppy_image(); chrn_id id; int r = 0; /* scan track, try 4 revolutions */ while ( r < 4 ) { if ( img->floppy_drive_get_next_id( thmfc1->side, &id ) ) { if ( id.C == thmfc1->track && id.R == thmfc1->sector && (128 << id.N) == thmfc1->sector_size /* check side ? id.H == thmfc1->side */ ) { if ( dst ) memcpy( dst, &id, sizeof( chrn_id ) ); thmfc1->stat0 = THMFC1_STAT0_BYTE_READY_POL; LOG (( "thmfc_floppy_find_sector: sector found C=%i H=%i R=%i N=%i\n", id.C, id.H, id.R, id.N )); return 1; } } if ( img->floppy_drive_get_flag_state( FLOPPY_DRIVE_INDEX ) ) r++; } thmfc1->stat0 = THMFC1_STAT0_CRC_ERROR | THMFC1_STAT0_FINISHED; LOG (( "thmfc_floppy_find_sector: sector not found drive=%i track=%i sector=%i\n", floppy_get_drive(img), thmfc1->track, thmfc1->sector )); return 0; }
/*************************************************************************** FLOPPY DRIVE ***************************************************************************/ static void vtech1_load_proc(device_image_interface &image) { vtech1_state *vtech1 = image.device().machine().driver_data<vtech1_state>(); int id = floppy_get_drive(&image.device()); if (!image.is_readonly()) vtech1->m_fdc_wrprot[id] = 0x00; else vtech1->m_fdc_wrprot[id] = 0x80; }
static void svi318_load_proc(device_image_interface &image) { svi318_state *state = image.device().machine().driver_data<svi318_state>(); int size; int id = floppy_get_drive(&image.device()); size = image.length(); switch (size) { case 172032: /* SVI-328 SSDD */ state->m_fdc.heads[id] = 1; break; case 346112: /* SVI-328 DSDD */ state->m_fdc.heads[id] = 2; break; case 348160: /* SVI-728 DSDD CP/M */ state->m_fdc.heads[id] = 2; break; } }
static void atari_load_proc(device_image_interface &image) { atari_fdc_t *fdc = get_safe_token(image.device().owner()); int id = floppy_get_drive(image); int size, i; const char *ext; fdc->drv[id].image = auto_alloc_array(image.device().machine(),UINT8,MAXSIZE); if (!fdc->drv[id].image) return; /* tell whether the image is writable */ fdc->drv[id].mode = !image.is_readonly(); /* set up image if it has been created */ if (image.has_been_created()) { int sector; char buff[256]; memset(buff, 0, sizeof(buff)); /* default to 720 sectors */ for( sector = 0; sector < 720; sector++ ) image.fwrite(buff, 256); image.fseek(0, SEEK_SET); } size = image.fread(fdc->drv[id].image, MAXSIZE); if( size <= 0 ) { fdc->drv[id].image = NULL; return; } /* re allocate the buffer; we don't want to be too lazy ;) */ //fdc->drv[id].image = (UINT8*)image.image_realloc(fdc->drv[id].image, size); ext = image.filetype(); // hack alert, this means we can only load ATR via the softlist at the moment, image.filetype reutrns NULL :/ if (image.software_entry() != NULL) ext="ATR"; /* no extension: assume XFD format (no header) */ if (!ext) { fdc->drv[id].type = FORMAT_XFD; fdc->drv[id].header_skip = 0; } else /* XFD extension */ if( toupper(ext[0])=='X' && toupper(ext[1])=='F' && toupper(ext[2])=='D' ) { fdc->drv[id].type = FORMAT_XFD; fdc->drv[id].header_skip = 0; } else /* ATR extension */ if( toupper(ext[0])=='A' && toupper(ext[1])=='T' && toupper(ext[2])=='R' ) { fdc->drv[id].type = FORMAT_ATR; fdc->drv[id].header_skip = 16; } else /* DSK extension */ if( toupper(ext[0])=='D' && toupper(ext[1])=='S' && toupper(ext[2])=='K' ) { fdc->drv[id].type = FORMAT_DSK; fdc->drv[id].header_skip = sizeof(dsk_format); } else { fdc->drv[id].type = FORMAT_XFD; fdc->drv[id].header_skip = 0; } if( fdc->drv[id].type == FORMAT_ATR && (fdc->drv[id].image[0] != 0x96 || fdc->drv[id].image[1] != 0x02) ) { fdc->drv[id].type = FORMAT_XFD; fdc->drv[id].header_skip = 0; } switch (fdc->drv[id].type) { /* XFD or unknown format: find a matching size from the table */ case FORMAT_XFD: for( i = 0; xfd_formats[i].size; i++ ) { if( size == xfd_formats[i].size ) { fdc->drv[id].density = xfd_formats[i].dsk.density; fdc->drv[id].tracks = xfd_formats[i].dsk.tracks; fdc->drv[id].spt = xfd_formats[i].dsk.spt; fdc->drv[id].heads = (xfd_formats[i].dsk.doublesided) ? 2 : 1; fdc->drv[id].bseclen = 128; fdc->drv[id].seclen = 256 * xfd_formats[i].dsk.seclen_hi + xfd_formats[i].dsk.seclen_lo; fdc->drv[id].sectors = fdc->drv[id].tracks * fdc->drv[id].heads * fdc->drv[id].spt; break; } } break; /* ATR format: find a size including the 16 bytes header */ case FORMAT_ATR: { int s; fdc->drv[id].bseclen = 128; /* get sectors from ATR header */ s = (size - 16) / 128; /* 3 + odd number of sectors ? */ if ( fdc->drv[id].image[4] == 128 || (s % 18) == 0 || (s % 26) == 0 || ((s - 3) % 1) != 0 ) { fdc->drv[id].sectors = s; fdc->drv[id].seclen = 128; /* sector size 128 or count not evenly dividable by 26 ? */ if( fdc->drv[id].seclen == 128 || (s % 26) != 0 ) { /* yup! single density */ fdc->drv[id].density = 0; fdc->drv[id].spt = 18; fdc->drv[id].heads = 1; fdc->drv[id].tracks = s / 18; if( s % 18 != 0 ) fdc->drv[id].tracks += 1; if( fdc->drv[id].tracks % 2 == 0 && fdc->drv[id].tracks > 80 ) { fdc->drv[id].heads = 2; fdc->drv[id].tracks /= 2; } } else { /* yes: medium density */ fdc->drv[id].density = 0; fdc->drv[id].spt = 26; fdc->drv[id].heads = 1; fdc->drv[id].tracks = s / 26; if( s % 26 != 0 ) fdc->drv[id].tracks += 1; if( fdc->drv[id].tracks % 2 == 0 && fdc->drv[id].tracks > 80 ) { fdc->drv[id].heads = 2; fdc->drv[id].tracks /= 2; } } } else { /* it's double density */ s = (s - 3) / 2 + 3; fdc->drv[id].sectors = s; fdc->drv[id].density = 2; fdc->drv[id].seclen = 256; fdc->drv[id].spt = 18; fdc->drv[id].heads = 1; fdc->drv[id].tracks = s / 18; if( s % 18 != 0 ) fdc->drv[id].tracks += 1; if( fdc->drv[id].tracks % 2 == 0 && fdc->drv[id].tracks > 80 ) { fdc->drv[id].heads = 2; fdc->drv[id].tracks /= 2; } } } break; /* DSK format: it's all in the header */ case FORMAT_DSK: { dsk_format *dsk = (dsk_format *) fdc->drv[id].image; fdc->drv[id].tracks = dsk->tracks; fdc->drv[id].spt = dsk->spt; fdc->drv[id].heads = (dsk->doublesided) ? 2 : 1; fdc->drv[id].seclen = 256 * dsk->seclen_hi + dsk->seclen_lo; fdc->drv[id].bseclen = fdc->drv[id].seclen; fdc->drv[id].sectors = fdc->drv[id].tracks * fdc->drv[id].heads * fdc->drv[id].spt; } break; } logerror("atari opened floppy '%s', %d sectors (%d %s%s) %d bytes/sector\n", image.filename(), fdc->drv[id].sectors, fdc->drv[id].tracks, (fdc->drv[id].heads == 1) ? "SS" : "DS", (fdc->drv[id].density == 0) ? "SD" : (fdc->drv[id].density == 1) ? "MD" : "DD", fdc->drv[id].seclen); return; }
void atari_fdc_device::atari_load_proc(device_image_interface &image, bool is_created) { int id = floppy_get_drive(image); int size, i; m_drv[id].image = std::make_unique<uint8_t[]>(MAXSIZE); if (!m_drv[id].image) return; /* tell whether the image is writable */ m_drv[id].mode = !image.is_readonly(); /* set up image if it has been created */ if (is_created) { int sector; char buff[256]; memset(buff, 0, sizeof(buff)); /* default to 720 sectors */ for( sector = 0; sector < 720; sector++ ) image.fwrite(buff, 256); image.fseek(0, SEEK_SET); } size = image.fread(m_drv[id].image.get(), MAXSIZE); if( size <= 0 ) { m_drv[id].image = nullptr; return; } /* re allocate the buffer; we don't want to be too lazy ;) */ //m_drv[id].image = (uint8_t*)image.image_realloc(m_drv[id].image, size); // hack alert, this means we can only load ATR via the softlist at the moment, image.filetype returns "" :/ bool is_softlist_entry = image.software_entry() != nullptr; /* no extension: assume XFD format (no header) */ if (image.is_filetype("") && !is_softlist_entry) { m_drv[id].type = FORMAT_XFD; m_drv[id].header_skip = 0; } else /* XFD extension */ if( image.is_filetype("xfd") ) { m_drv[id].type = FORMAT_XFD; m_drv[id].header_skip = 0; } else /* ATR extension */ if( image.is_filetype("atr") || is_softlist_entry) { m_drv[id].type = FORMAT_ATR; m_drv[id].header_skip = 16; } else /* DSK extension */ if( image.is_filetype("dsk") ) { m_drv[id].type = FORMAT_DSK; m_drv[id].header_skip = sizeof(atari_dsk_format); } else { m_drv[id].type = FORMAT_XFD; m_drv[id].header_skip = 0; } if( m_drv[id].type == FORMAT_ATR && (m_drv[id].image[0] != 0x96 || m_drv[id].image[1] != 0x02) ) { m_drv[id].type = FORMAT_XFD; m_drv[id].header_skip = 0; } switch (m_drv[id].type) { /* XFD or unknown format: find a matching size from the table */ case FORMAT_XFD: for( i = 0; xfd_formats[i].size; i++ ) { if( size == xfd_formats[i].size ) { m_drv[id].density = xfd_formats[i].dsk.density; m_drv[id].tracks = xfd_formats[i].dsk.tracks; m_drv[id].spt = xfd_formats[i].dsk.spt; m_drv[id].heads = (xfd_formats[i].dsk.doublesided) ? 2 : 1; m_drv[id].bseclen = 128; m_drv[id].seclen = 256 * xfd_formats[i].dsk.seclen_hi + xfd_formats[i].dsk.seclen_lo; m_drv[id].sectors = m_drv[id].tracks * m_drv[id].heads * m_drv[id].spt; break; } } break; /* ATR format: find a size including the 16 bytes header */ case FORMAT_ATR: { int s; m_drv[id].bseclen = 128; /* get sectors from ATR header */ s = (size - 16) / 128; /* 3 + odd number of sectors ? */ if ( m_drv[id].image[4] == 128 || (s % 18) == 0 || (s % 26) == 0 || ((s - 3) % 1) != 0 ) { m_drv[id].sectors = s; m_drv[id].seclen = 128; /* sector size 128 or count not evenly dividable by 26 ? */ if( m_drv[id].seclen == 128 || (s % 26) != 0 ) { /* yup! single density */ m_drv[id].density = 0; m_drv[id].spt = 18; m_drv[id].heads = 1; m_drv[id].tracks = s / 18; if( s % 18 != 0 ) m_drv[id].tracks += 1; if( m_drv[id].tracks % 2 == 0 && m_drv[id].tracks > 80 ) { m_drv[id].heads = 2; m_drv[id].tracks /= 2; } } else { /* yes: medium density */ m_drv[id].density = 0; m_drv[id].spt = 26; m_drv[id].heads = 1; m_drv[id].tracks = s / 26; if( s % 26 != 0 ) m_drv[id].tracks += 1; if( m_drv[id].tracks % 2 == 0 && m_drv[id].tracks > 80 ) { m_drv[id].heads = 2; m_drv[id].tracks /= 2; } } } else { /* it's double density */ s = (s - 3) / 2 + 3; m_drv[id].sectors = s; m_drv[id].density = 2; m_drv[id].seclen = 256; m_drv[id].spt = 18; m_drv[id].heads = 1; m_drv[id].tracks = s / 18; if( s % 18 != 0 ) m_drv[id].tracks += 1; if( m_drv[id].tracks % 2 == 0 && m_drv[id].tracks > 80 ) { m_drv[id].heads = 2; m_drv[id].tracks /= 2; } } } break; /* DSK format: it's all in the header */ case FORMAT_DSK: { atari_dsk_format *dsk = (atari_dsk_format *) m_drv[id].image.get(); m_drv[id].tracks = dsk->tracks; m_drv[id].spt = dsk->spt; m_drv[id].heads = (dsk->doublesided) ? 2 : 1; m_drv[id].seclen = 256 * dsk->seclen_hi + dsk->seclen_lo; m_drv[id].bseclen = m_drv[id].seclen; m_drv[id].sectors = m_drv[id].tracks * m_drv[id].heads * m_drv[id].spt; } break; } logerror("atari opened floppy '%s', %d sectors (%d %s%s) %d bytes/sector\n", image.filename(), m_drv[id].sectors, m_drv[id].tracks, (m_drv[id].heads == 1) ? "SS" : "DS", (m_drv[id].density == 0) ? "SD" : (m_drv[id].density == 1) ? "MD" : "DD", m_drv[id].seclen); return; }
static void fd800_unload_proc(device_image_interface &image) { int unit = floppy_get_drive(&image.device()); fd800.drv[unit].log_cylinder[0] = fd800.drv[unit].log_cylinder[1] = -1; }