mirror of
https://github.com/tjboldt/ProDOS-Utilities.git
synced 2024-12-27 20:29:18 +00:00
130 lines
5.2 KiB
Go
130 lines
5.2 KiB
Go
// Copyright Terence J. Boldt (c)2021-2024
|
|
// Use of this source code is governed by an MIT
|
|
// license that can be found in the LICENSE file.
|
|
|
|
// This file provides access to format a ProDOS drive image
|
|
|
|
package prodos
|
|
|
|
import (
|
|
"fmt"
|
|
"strings"
|
|
"time"
|
|
)
|
|
|
|
// CreateVolume formats a new ProDOS volume including boot block,
|
|
// volume bitmap and empty directory
|
|
func CreateVolume(readerWriter ReaderWriterAt, volumeName string, numberOfBlocks uint16) {
|
|
if numberOfBlocks > 65535 || numberOfBlocks < 64 {
|
|
return
|
|
}
|
|
volumeName = strings.ToUpper(volumeName)
|
|
volumeNameLen := len(volumeName)
|
|
if volumeNameLen == 0 || volumeNameLen > 15 {
|
|
fmt.Println("bad name length")
|
|
return
|
|
}
|
|
|
|
blankBlock := make([]byte, 512)
|
|
for i := uint16(0); i < numberOfBlocks; i++ {
|
|
WriteBlock(readerWriter, i, blankBlock)
|
|
}
|
|
|
|
volumeHeader := [43]byte{}
|
|
|
|
// volume name
|
|
volumeHeader[0x04] = 0xF0 + byte(volumeNameLen)
|
|
|
|
for i := 0; i < volumeNameLen; i++ {
|
|
volumeHeader[i+0x05] = volumeName[i]
|
|
}
|
|
|
|
//creation date
|
|
creationDate := DateTimeToProDOS(time.Now())
|
|
|
|
for i := 0; i < len(creationDate); i++ {
|
|
volumeHeader[0x1C+i] = creationDate[i]
|
|
}
|
|
|
|
// access
|
|
volumeHeader[0x22] = 0xE3
|
|
|
|
// entry length
|
|
volumeHeader[0x23] = 0x27
|
|
|
|
// entries per block
|
|
volumeHeader[0x24] = 0x0D
|
|
|
|
// volume bitmap pointer
|
|
volumeHeader[0x27] = 0x06
|
|
|
|
// number of blocks
|
|
volumeHeader[0x29] = byte(numberOfBlocks & 0xFF)
|
|
volumeHeader[0x2A] = byte(numberOfBlocks >> 8)
|
|
|
|
readerWriter.WriteAt(volumeHeader[:], 1024)
|
|
|
|
// boot block 0
|
|
WriteBlock(readerWriter, 0, getBootBlock())
|
|
|
|
// pointers to volume directory blocks
|
|
for i := 2; i < 6; i++ {
|
|
pointers := make([]byte, 4)
|
|
if i == 2 {
|
|
pointers[0] = 0x00 // 0x00 indicates start block
|
|
} else {
|
|
pointers[0] = byte(i - 1)
|
|
}
|
|
pointers[1] = 0x00
|
|
if i == 5 {
|
|
pointers[2] = 0x00 // 0x00 indicated end block
|
|
} else {
|
|
pointers[2] = byte(i + 1)
|
|
}
|
|
pointers[3] = 0x00
|
|
readerWriter.WriteAt(pointers, int64(i*512))
|
|
}
|
|
|
|
// volume bit map starting at block 6
|
|
volumeBitmap := createVolumeBitmap(numberOfBlocks)
|
|
writeVolumeBitmap(readerWriter, volumeBitmap)
|
|
}
|
|
|
|
func getBootBlock() []byte {
|
|
bootBlock := []byte{
|
|
0x01, 0x38, 0xb0, 0x03, 0x4c, 0x1c, 0x09, 0x78, 0x86, 0x43, 0xc9, 0x03, 0x08, 0x8a, 0x29, 0x70,
|
|
0x4a, 0x4a, 0x4a, 0x4a, 0x09, 0xc0, 0x85, 0x49, 0xa0, 0xff, 0x84, 0x48, 0x28, 0xc8, 0xb1, 0x48,
|
|
0xd0, 0x3a, 0xb0, 0x0e, 0xa9, 0x03, 0x8d, 0x00, 0x08, 0xe6, 0x3d, 0xa5, 0x49, 0x48, 0xa9, 0x5b,
|
|
0x48, 0x60, 0x85, 0x40, 0x85, 0x48, 0xa0, 0x5e, 0xb1, 0x48, 0x99, 0x94, 0x09, 0xc8, 0xc0, 0xeb,
|
|
0xd0, 0xf6, 0xa2, 0x06, 0xbc, 0x32, 0x09, 0xbd, 0x39, 0x09, 0x99, 0xf2, 0x09, 0xbd, 0x40, 0x09,
|
|
0x9d, 0x7f, 0x0a, 0xca, 0x10, 0xee, 0xa9, 0x09, 0x85, 0x49, 0xa9, 0x86, 0xa0, 0x00, 0xc9, 0xf9,
|
|
0xb0, 0x2f, 0x85, 0x48, 0x84, 0x60, 0x84, 0x4a, 0x84, 0x4c, 0x84, 0x4e, 0x84, 0x47, 0xc8, 0x84,
|
|
0x42, 0xc8, 0x84, 0x46, 0xa9, 0x0c, 0x85, 0x61, 0x85, 0x4b, 0x20, 0x27, 0x09, 0xb0, 0x66, 0xe6,
|
|
0x61, 0xe6, 0x61, 0xe6, 0x46, 0xa5, 0x46, 0xc9, 0x06, 0x90, 0xef, 0xad, 0x00, 0x0c, 0x0d, 0x01,
|
|
0x0c, 0xd0, 0x52, 0xa9, 0x04, 0xd0, 0x02, 0xa5, 0x4a, 0x18, 0x6d, 0x23, 0x0c, 0xa8, 0x90, 0x0d,
|
|
0xe6, 0x4b, 0xa5, 0x4b, 0x4a, 0xb0, 0x06, 0xc9, 0x0a, 0xf0, 0x71, 0xa0, 0x04, 0x84, 0x4a, 0xad,
|
|
0x20, 0x09, 0x29, 0x0f, 0xa8, 0xb1, 0x4a, 0xd9, 0x20, 0x09, 0xd0, 0xdb, 0x88, 0x10, 0xf6, 0xa0,
|
|
0x16, 0xb1, 0x4a, 0x4a, 0x6d, 0x1f, 0x09, 0x8d, 0x1f, 0x09, 0xa0, 0x11, 0xb1, 0x4a, 0x85, 0x46,
|
|
0xc8, 0xb1, 0x4a, 0x85, 0x47, 0xa9, 0x00, 0x85, 0x4a, 0xa0, 0x1e, 0x84, 0x4b, 0x84, 0x61, 0xc8,
|
|
0x84, 0x4d, 0x20, 0x27, 0x09, 0xb0, 0x35, 0xe6, 0x61, 0xe6, 0x61, 0xa4, 0x4e, 0xe6, 0x4e, 0xb1,
|
|
0x4a, 0x85, 0x46, 0xb1, 0x4c, 0x85, 0x47, 0x11, 0x4a, 0xd0, 0x18, 0xa2, 0x01, 0xa9, 0x00, 0xa8,
|
|
0x91, 0x60, 0xc8, 0xd0, 0xfb, 0xe6, 0x61, 0xea, 0xea, 0xca, 0x10, 0xf4, 0xce, 0x1f, 0x09, 0xf0,
|
|
0x07, 0xd0, 0xd8, 0xce, 0x1f, 0x09, 0xd0, 0xca, 0x58, 0x4c, 0x00, 0x20, 0x4c, 0x47, 0x09, 0x02,
|
|
0x26, 0x50, 0x52, 0x4f, 0x44, 0x4f, 0x53, 0xa5, 0x60, 0x85, 0x44, 0xa5, 0x61, 0x85, 0x45, 0x6c,
|
|
0x48, 0x00, 0x08, 0x1e, 0x24, 0x3f, 0x45, 0x47, 0x76, 0xf4, 0xd7, 0xd1, 0xb6, 0x4b, 0xb4, 0xac,
|
|
0xa6, 0x2b, 0x18, 0x60, 0x4c, 0xbc, 0x09, 0x20, 0x58, 0xfc, 0xa0, 0x14, 0xb9, 0x58, 0x09, 0x99,
|
|
0xb1, 0x05, 0x88, 0x10, 0xf7, 0x4c, 0x55, 0x09, 0xd5, 0xce, 0xc1, 0xc2, 0xcc, 0xc5, 0xa0, 0xd4,
|
|
0xcf, 0xa0, 0xcc, 0xcf, 0xc1, 0xc4, 0xa0, 0xd0, 0xd2, 0xcf, 0xc4, 0xcf, 0xd3, 0xa5, 0x53, 0x29,
|
|
0x03, 0x2a, 0x05, 0x2b, 0xaa, 0xbd, 0x80, 0xc0, 0xa9, 0x2c, 0xa2, 0x11, 0xca, 0xd0, 0xfd, 0xe9,
|
|
0x01, 0xd0, 0xf7, 0xa6, 0x2b, 0x60, 0xa5, 0x46, 0x29, 0x07, 0xc9, 0x04, 0x29, 0x03, 0x08, 0x0a,
|
|
0x28, 0x2a, 0x85, 0x3d, 0xa5, 0x47, 0x4a, 0xa5, 0x46, 0x6a, 0x4a, 0x4a, 0x85, 0x41, 0x0a, 0x85,
|
|
0x51, 0xa5, 0x45, 0x85, 0x27, 0xa6, 0x2b, 0xbd, 0x89, 0xc0, 0x20, 0xbc, 0x09, 0xe6, 0x27, 0xe6,
|
|
0x3d, 0xe6, 0x3d, 0xb0, 0x03, 0x20, 0xbc, 0x09, 0xbc, 0x88, 0xc0, 0x60, 0xa5, 0x40, 0x0a, 0x85,
|
|
0x53, 0xa9, 0x00, 0x85, 0x54, 0xa5, 0x53, 0x85, 0x50, 0x38, 0xe5, 0x51, 0xf0, 0x14, 0xb0, 0x04,
|
|
0xe6, 0x53, 0x90, 0x02, 0xc6, 0x53, 0x38, 0x20, 0x6d, 0x09, 0xa5, 0x50, 0x18, 0x20, 0x6f, 0x09,
|
|
0xd0, 0xe3, 0xa0, 0x7f, 0x84, 0x52, 0x08, 0x28, 0x38, 0xc6, 0x52, 0xf0, 0xce, 0x18, 0x08, 0x88,
|
|
0xf0, 0xf5, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
|
|
}
|
|
return bootBlock
|
|
}
|