trunk/src/emu/imagedev/floppy.c
| r31566 | r31567 | |
| 273 | 273 | mon = 1; |
| 274 | 274 | |
| 275 | 275 | cyl = 0; |
| 276 | subcyl = 0; |
| 276 | 277 | ss = 0; |
| 277 | 278 | stp = 1; |
| 278 | 279 | wpt = 0; |
| r31566 | r31567 | |
| 535 | 536 | if (dskchg==0) dskchg = 1; |
| 536 | 537 | } |
| 537 | 538 | } |
| 539 | subcyl = 0; |
| 538 | 540 | } |
| 539 | 541 | } |
| 540 | 542 | |
| 543 | void floppy_image_device::seek_phase_w(int phases) |
| 544 | { |
| 545 | int cur_pos = (cyl << 2) | subcyl; |
| 546 | int req_pos; |
| 547 | switch(phases) { |
| 548 | case 0x1: req_pos = 0; break; |
| 549 | case 0x3: req_pos = 1; break; |
| 550 | case 0x2: req_pos = 2; break; |
| 551 | case 0x6: req_pos = 3; break; |
| 552 | case 0x4: req_pos = 4; break; |
| 553 | case 0xc: req_pos = 5; break; |
| 554 | case 0x8: req_pos = 6; break; |
| 555 | case 0x9: req_pos = 7; break; |
| 556 | default: return; |
| 557 | } |
| 558 | |
| 559 | // Opposite phase, don't move |
| 560 | if(((cur_pos ^ req_pos) & 7) == 4) |
| 561 | return; |
| 562 | |
| 563 | int next_pos = (cur_pos & ~7) | req_pos; |
| 564 | if(next_pos < cur_pos-4) |
| 565 | next_pos += 8; |
| 566 | else if(next_pos > cur_pos+4) |
| 567 | next_pos -= 8; |
| 568 | if(next_pos < 0) |
| 569 | next_pos = 0; |
| 570 | else if(next_pos > (tracks-1)*4) |
| 571 | next_pos = (tracks-1)*4; |
| 572 | cyl = next_pos >> 2; |
| 573 | subcyl = next_pos & 3; |
| 574 | |
| 575 | if(TRACE_STEP && (next_pos != cur_pos)) |
| 576 | logerror("%s: track %d.%d\n", tag(), cyl, subcyl); |
| 577 | |
| 578 | /* Update disk detection if applicable */ |
| 579 | if (exists()) |
| 580 | if (dskchg==0) |
| 581 | dskchg = 1; |
| 582 | } |
| 583 | |
| 541 | 584 | int floppy_image_device::find_index(UINT32 position, const UINT32 *buf, int buf_size) |
| 542 | 585 | { |
| 543 | 586 | int spos = (buf_size >> 1)-1; |
trunk/src/lib/formats/mfi_dsk.c
| r31566 | r31567 | |
| 8 | 8 | Mess floppy image structure: |
| 9 | 9 | |
| 10 | 10 | - header with signature, number of cylinders, number of heads. Min |
| 11 | | track and min head are considered to always be 0. |
| 11 | track and min head are considered to always be 0. The two top bits |
| 12 | of the cylinder count is the resolution: 0=tracks, 1=half tracks, |
| 13 | 2=quarter tracks. |
| 12 | 14 | |
| 13 | | - vector of track descriptions, looping on cylinders and sub-lopping |
| 14 | | on heads, each description composed of: |
| 15 | - vector of track descriptions, looping on cylinders with the given |
| 16 | resolution and sub-lopping on heads, each description composed of: |
| 15 | 17 | - offset of the track data in bytes from the start of the file |
| 16 | 18 | - size of the compressed track data in bytes (0 for unformatted) |
| 17 | 19 | - size of the uncompressed track data in bytes (0 for unformatted) |
| r31566 | r31567 | |
| 97 | 99 | |
| 98 | 100 | io_generic_read(io, &h, 0, sizeof(header)); |
| 99 | 101 | if(memcmp( h.sign, sign, 16 ) == 0 && |
| 100 | | h.cyl_count <= 160 && |
| 102 | (h.cyl_count & CYLINDER_MASK) <= 84 && |
| 103 | (h.cyl_count >> RESOLUTION_SHIFT) < 3 && |
| 101 | 104 | h.head_count <= 2 && |
| 102 | 105 | (!form_factor || !h.form_factor || h.form_factor == form_factor)) |
| 103 | 106 | return 100; |
| r31566 | r31567 | |
| 107 | 110 | bool mfi_format::load(io_generic *io, UINT32 form_factor, floppy_image *image) |
| 108 | 111 | { |
| 109 | 112 | header h; |
| 110 | | entry entries[84*2]; |
| 113 | entry entries[84*2*4]; |
| 111 | 114 | io_generic_read(io, &h, 0, sizeof(header)); |
| 112 | | io_generic_read(io, &entries, sizeof(header), h.cyl_count*h.head_count*sizeof(entry)); |
| 115 | int resolution = h.cyl_count >> RESOLUTION_SHIFT; |
| 116 | h.cyl_count &= CYLINDER_MASK; |
| 117 | io_generic_read(io, &entries, sizeof(header), (h.cyl_count << resolution)*h.head_count*sizeof(entry)); |
| 113 | 118 | |
| 114 | 119 | image->set_variant(h.variant); |
| 115 | 120 | |
| 116 | 121 | dynamic_buffer compressed; |
| 117 | 122 | |
| 118 | 123 | entry *ent = entries; |
| 119 | | for(unsigned int cyl=0; cyl != h.cyl_count; cyl++) |
| 124 | for(unsigned int cyl=0; cyl <= (h.cyl_count - 1) << 2; cyl += 4 >> resolution) |
| 120 | 125 | for(unsigned int head=0; head != h.head_count; head++) { |
| 121 | | image->set_write_splice_position(cyl, head, ent->write_splice); |
| 126 | image->set_write_splice_position(cyl >> 2, head, ent->write_splice, cyl & 3); |
| 122 | 127 | |
| 123 | 128 | if(ent->uncompressed_size == 0) { |
| 124 | 129 | // Unformatted track |
| 125 | | image->set_track_size(cyl, head, 0); |
| 130 | image->set_track_size(cyl >> 2, head, 0, cyl & 3); |
| 126 | 131 | ent++; |
| 127 | 132 | continue; |
| 128 | 133 | } |
| r31566 | r31567 | |
| 132 | 137 | io_generic_read(io, compressed, ent->offset, ent->compressed_size); |
| 133 | 138 | |
| 134 | 139 | unsigned int cell_count = ent->uncompressed_size/4; |
| 135 | | image->set_track_size(cyl, head, cell_count); |
| 136 | | UINT32 *trackbuf = image->get_buffer(cyl, head); |
| 140 | image->set_track_size(cyl >> 2, head, cell_count, cyl & 3); |
| 141 | UINT32 *trackbuf = image->get_buffer(cyl >> 2, head, cyl & 3); |
| 137 | 142 | |
| 138 | 143 | uLongf size = ent->uncompressed_size; |
| 139 | 144 | if(uncompress((Bytef *)trackbuf, &size, compressed, ent->compressed_size) != Z_OK) |
| r31566 | r31567 | |
| 158 | 163 | { |
| 159 | 164 | int tracks, heads; |
| 160 | 165 | image->get_actual_geometry(tracks, heads); |
| 166 | int resolution = image->get_resolution(); |
| 161 | 167 | int max_track_size = 0; |
| 162 | | for(int track=0; track<tracks; track++) |
| 168 | for(int track=0; track <= (tracks-1) << 2; track += 4 >> resolution) |
| 163 | 169 | for(int head=0; head<heads; head++) { |
| 164 | | int tsize = image->get_track_size(track, head); |
| 170 | int tsize = image->get_track_size(track >> 2, head, track & 3); |
| 165 | 171 | if(tsize > max_track_size) |
| 166 | 172 | max_track_size = tsize; |
| 167 | 173 | } |
| 168 | 174 | |
| 169 | 175 | header h; |
| 170 | | entry entries[84*2]; |
| 176 | entry entries[84*2*4]; |
| 171 | 177 | memcpy(h.sign, sign, 16); |
| 172 | | h.cyl_count = tracks; |
| 178 | h.cyl_count = tracks | (resolution << RESOLUTION_SHIFT); |
| 173 | 179 | h.head_count = heads; |
| 174 | 180 | h.form_factor = image->get_form_factor(); |
| 175 | 181 | h.variant = image->get_variant(); |
| r31566 | r31567 | |
| 178 | 184 | |
| 179 | 185 | memset(entries, 0, sizeof(entries)); |
| 180 | 186 | |
| 181 | | int pos = sizeof(header) + tracks*heads*sizeof(entry); |
| 187 | int pos = sizeof(header) + (tracks << resolution)*heads*sizeof(entry); |
| 182 | 188 | int epos = 0; |
| 183 | 189 | UINT32 *precomp = global_alloc_array(UINT32, max_track_size); |
| 184 | 190 | UINT8 *postcomp = global_alloc_array(UINT8, max_track_size*4 + 1000); |
| 185 | 191 | |
| 186 | | for(int track=0; track<tracks; track++) |
| 192 | for(int track=0; track <= (tracks-1) << 2; track += 4 >> resolution) |
| 187 | 193 | for(int head=0; head<heads; head++) { |
| 188 | | int tsize = image->get_track_size(track, head); |
| 194 | int tsize = image->get_track_size(track >> 2, head, track & 3); |
| 189 | 195 | if(!tsize) { |
| 190 | 196 | epos++; |
| 191 | 197 | continue; |
| 192 | 198 | } |
| 193 | 199 | |
| 194 | | memcpy(precomp, image->get_buffer(track, head), tsize*4); |
| 200 | memcpy(precomp, image->get_buffer(track >> 2, head, track & 3), tsize*4); |
| 195 | 201 | for(int j=0; j<tsize-1; j++) |
| 196 | 202 | precomp[j] = (precomp[j] & floppy_image::MG_MASK) | |
| 197 | 203 | ((precomp[j+1] & floppy_image::TIME_MASK) - |
| r31566 | r31567 | |
| 206 | 212 | entries[epos].offset = pos; |
| 207 | 213 | entries[epos].uncompressed_size = tsize*4; |
| 208 | 214 | entries[epos].compressed_size = csize; |
| 209 | | entries[epos].write_splice = image->get_write_splice_position(track, head); |
| 215 | entries[epos].write_splice = image->get_write_splice_position(track >> 2, head, track & 3); |
| 210 | 216 | epos++; |
| 211 | 217 | |
| 212 | 218 | io_generic_write(io, postcomp, pos, csize); |
| 213 | 219 | pos += csize; |
| 214 | 220 | } |
| 215 | 221 | |
| 216 | | io_generic_write(io, entries, sizeof(header), tracks*heads*sizeof(entry)); |
| 222 | io_generic_write(io, entries, sizeof(header), (tracks << resolution)*heads*sizeof(entry)); |
| 217 | 223 | return true; |
| 218 | 224 | } |
| 219 | 225 | |
trunk/src/lib/formats/flopimg.c
| r31566 | r31567 | |
| 947 | 947 | form_factor = _form_factor; |
| 948 | 948 | variant = 0; |
| 949 | 949 | |
| 950 | | memset(cell_data, 0, sizeof(cell_data)); |
| 951 | | memset(track_size, 0, sizeof(track_size)); |
| 952 | | memset(track_alloc_size, 0, sizeof(track_alloc_size)); |
| 953 | | memset(write_splice, 0, sizeof(write_splice)); |
| 950 | track_array.resize(tracks*4+1); |
| 951 | for(int i=0; i<tracks*4+1; i++) |
| 952 | track_array[i].resize(heads); |
| 954 | 953 | } |
| 955 | 954 | |
| 956 | 955 | floppy_image::~floppy_image() |
| 957 | 956 | { |
| 958 | | for (int i=0;i<MAX_FLOPPY_TRACKS;i++) { |
| 959 | | for (int j=0;j<MAX_FLOPPY_HEADS;j++) { |
| 960 | | global_free_array(cell_data[i][j]); |
| 961 | | } |
| 962 | | } |
| 963 | 957 | } |
| 964 | 958 | |
| 965 | 959 | void floppy_image::get_maximal_geometry(int &_tracks, int &_heads) |
| r31566 | r31567 | |
| 970 | 964 | |
| 971 | 965 | void floppy_image::get_actual_geometry(int &_tracks, int &_heads) |
| 972 | 966 | { |
| 973 | | int maxt = tracks-1, maxh = heads-1; |
| 967 | int maxt = tracks*4, maxh = heads-1; |
| 974 | 968 | |
| 975 | 969 | while(maxt >= 0) { |
| 976 | 970 | for(int i=0; i<=maxh; i++) |
| r31566 | r31567 | |
| 987 | 981 | maxh--; |
| 988 | 982 | } |
| 989 | 983 | head_done: |
| 990 | | _tracks = maxt+1; |
| 984 | _tracks = (maxt+4)/4; |
| 991 | 985 | _heads = maxh+1; |
| 992 | 986 | } |
| 993 | 987 | |
| 988 | int floppy_image::get_resolution() const |
| 989 | { |
| 990 | int mask = 0; |
| 991 | for(int i=0; i<tracks*4+1; i++) |
| 992 | for(int j=0; j<heads; j++) |
| 993 | if(track_array[i][j].track_size) |
| 994 | mask |= 1 << (i & 3); |
| 995 | if(mask & 0xa) |
| 996 | return 2; |
| 997 | if(mask & 0x4) |
| 998 | return 1; |
| 999 | return 0; |
| 1000 | } |
| 1001 | |
| 994 | 1002 | void floppy_image::ensure_alloc(int track, int head) |
| 995 | 1003 | { |
| 996 | | if(track_size[track][head] > track_alloc_size[track][head]) { |
| 997 | | UINT32 new_size = track_size[track][head]*11/10; |
| 998 | | UINT32 *new_array = global_alloc_array(UINT32, new_size); |
| 999 | | if(track_alloc_size[track][head]) { |
| 1000 | | memcpy(new_array, cell_data[track][head], track_alloc_size[track][head]*4); |
| 1001 | | global_free_array(cell_data[track][head]); |
| 1002 | | } |
| 1003 | | cell_data[track][head] = new_array; |
| 1004 | | track_alloc_size[track][head] = new_size; |
| 1005 | | } |
| 1004 | track_info &tr = track_array[track][head]; |
| 1005 | if(tr.track_size > tr.cell_data.count()) |
| 1006 | tr.cell_data.resize_keep_and_clear_new(tr.track_size); |
| 1006 | 1007 | } |
| 1007 | 1008 | |
| 1008 | 1009 | const char *floppy_image::get_variant_name(UINT32 form_factor, UINT32 variant) |
trunk/src/lib/formats/flopimg.h
| r31566 | r31567 | |
| 12 | 12 | #include "osdcore.h" |
| 13 | 13 | #include "ioprocs.h" |
| 14 | 14 | #include "opresolv.h" |
| 15 | #include "coretmpl.h" |
| 15 | 16 | |
| 16 | 17 | #ifndef LOG_FORMATS |
| 17 | 18 | #define LOG_FORMATS if (0) printf |
| r31566 | r31567 | |
| 637 | 638 | //! form factor can be physically inserted in a reader that handles |
| 638 | 639 | //! it. The second half indicates the variants which are usually |
| 639 | 640 | //! detectable by the reader, such as density and number of sides. |
| 641 | //! |
| 642 | //! Resolution is quarter-track. The optional subtrack parameter is |
| 643 | //! 0-3: |
| 644 | //! - 0 = Track itself |
| 645 | //! - 1 = 1st quarter track |
| 646 | //! - 2 = Half track |
| 647 | //! - 3 = 2nd quarter track |
| 640 | 648 | |
| 641 | | |
| 642 | 649 | class floppy_image |
| 643 | 650 | { |
| 644 | 651 | public: |
| r31566 | r31567 | |
| 682 | 689 | M2FM = 0x4D32464D, //!< "M2FM", modified modified frequency modulation |
| 683 | 690 | }; |
| 684 | 691 | |
| 685 | | // construction/destruction |
| 692 | // construction/destruction |
| 686 | 693 | |
| 687 | 694 | |
| 688 | 695 | //! floppy_image constructor |
| r31566 | r31567 | |
| 703 | 710 | |
| 704 | 711 | /*! |
| 705 | 712 | @param track |
| 713 | @param subtrack |
| 706 | 714 | @param head |
| 707 | 715 | @param size size of this track |
| 708 | 716 | */ |
| 709 | | void set_track_size(int track, int head, UINT32 size) { track_size[track][head] = size; ensure_alloc(track, head); } |
| 717 | void set_track_size(int track, int head, UINT32 size, int subtrack = 0) { track_array[track*4+subtrack][head].track_size = size; ensure_alloc(track*4+subtrack, head); } |
| 710 | 718 | |
| 711 | 719 | /*! |
| 712 | | @param track track number |
| 720 | @param track |
| 721 | @param subtrack |
| 713 | 722 | @param head head number |
| 714 | 723 | @return a pointer to the data buffer for this track and head |
| 715 | 724 | */ |
| 716 | | UINT32 *get_buffer(int track, int head) { return cell_data[track][head]; } |
| 725 | UINT32 *get_buffer(int track, int head, int subtrack = 0) { return track_array[track*4+subtrack][head].cell_data; } |
| 726 | |
| 717 | 727 | //! @return the track size |
| 718 | 728 | //! @param track |
| 729 | //! @param subtrack |
| 719 | 730 | //! @param head |
| 720 | | UINT32 get_track_size(int track, int head) { return track_size[track][head]; } |
| 731 | UINT32 get_track_size(int track, int head, int subtrack = 0) { return track_array[track*4+subtrack][head].track_size; } |
| 721 | 732 | |
| 722 | 733 | //! Sets the write splice position. |
| 723 | 734 | //! The "track splice" information indicates where to start writing |
| r31566 | r31567 | |
| 727 | 738 | //! representation is the angular position relative to the index. |
| 728 | 739 | |
| 729 | 740 | /*! @param track |
| 741 | @param subtrack |
| 730 | 742 | @param head |
| 731 | 743 | @param pos the position |
| 732 | 744 | */ |
| 733 | | void set_write_splice_position(int track, int head, UINT32 pos) { write_splice[track][head] = pos; } |
| 745 | void set_write_splice_position(int track, int head, UINT32 pos, int subtrack = 0) { track_array[track*4+subtrack][head].write_splice = pos; } |
| 734 | 746 | //! @return the current write splice position. |
| 735 | | UINT32 get_write_splice_position(int track, int head) const { return write_splice[track][head]; } |
| 747 | UINT32 get_write_splice_position(int track, int head, int subtrack = 0) const { return track_array[track*4+subtrack][head].write_splice; } |
| 736 | 748 | //! @return the maximal geometry supported by this format. |
| 737 | 749 | void get_maximal_geometry(int &tracks, int &heads); |
| 738 | 750 | |
| 739 | 751 | //! @return the current geometry of the loaded image. |
| 740 | 752 | void get_actual_geometry(int &tracks, int &heads); |
| 741 | 753 | |
| 754 | //! @return the track resolution (0=full track, 1 = half-track, 2 = quarter track) |
| 755 | int get_resolution() const; |
| 756 | |
| 742 | 757 | //! Returns the variant name for the particular disk form factor/variant |
| 743 | 758 | //! @param form_factor |
| 744 | 759 | //! @param variant |
| r31566 | r31567 | |
| 746 | 761 | static const char *get_variant_name(UINT32 form_factor, UINT32 variant); |
| 747 | 762 | |
| 748 | 763 | private: |
| 749 | | |
| 750 | | enum { |
| 751 | | MAX_FLOPPY_HEADS = 2, |
| 752 | | MAX_FLOPPY_TRACKS = 84 |
| 753 | | }; |
| 754 | | |
| 755 | 764 | int tracks, heads; |
| 756 | 765 | |
| 757 | 766 | UINT32 form_factor, variant; |
| 758 | 767 | |
| 759 | | UINT32 *cell_data[MAX_FLOPPY_TRACKS][MAX_FLOPPY_HEADS]; |
| 760 | | UINT32 track_size[MAX_FLOPPY_TRACKS][MAX_FLOPPY_HEADS]; |
| 761 | | UINT32 track_alloc_size[MAX_FLOPPY_TRACKS][MAX_FLOPPY_HEADS]; |
| 762 | | UINT32 write_splice[MAX_FLOPPY_TRACKS][MAX_FLOPPY_HEADS]; |
| 768 | struct track_info { |
| 769 | dynamic_array<UINT32> cell_data; |
| 770 | UINT32 track_size; |
| 771 | UINT32 write_splice; |
| 763 | 772 | |
| 773 | track_info() { track_size = write_splice = 0; } |
| 774 | }; |
| 775 | |
| 776 | // track number multiplied by 4 then head |
| 777 | // last array size may be bigger than actual track size |
| 778 | dynamic_array<dynamic_array<track_info> > track_array; |
| 779 | |
| 764 | 780 | void ensure_alloc(int track, int head); |
| 765 | 781 | }; |
| 766 | 782 | |