mirror of
https://github.com/curioustorvald/tsvm.git
synced 2026-03-15 23:46:06 +09:00
TEV format wip
This commit is contained in:
minjaesong
@@ -394,6 +394,10 @@ finally {
|
||||
|
||||
audio.stop(0)
|
||||
audio.purgeQueue(0)
|
||||
|
||||
if (interactive) {
|
||||
con.clear()
|
||||
}
|
||||
}
|
||||
|
||||
return errorlevel
|
||||
417
assets/disk0/tvdos/bin/playtev.js
Normal file
417
assets/disk0/tvdos/bin/playtev.js
Normal file
@@ -0,0 +1,417 @@
|
||||
// Created by Claude on 2025-08-17.
|
||||
// TSVM Enhanced Video (TEV) Format Decoder
|
||||
// Usage: playtev moviefile.tev [options]
|
||||
|
||||
const WIDTH = 560
|
||||
const HEIGHT = 448
|
||||
const BLOCK_SIZE = 8
|
||||
const TEV_MAGIC = [0x1F, 0x54, 0x53, 0x56, 0x4D, 0x54, 0x45, 0x56] // "\x1FTSVM TEV"
|
||||
|
||||
// Block encoding modes
|
||||
const TEV_MODE_SKIP = 0x00
|
||||
const TEV_MODE_INTRA = 0x01
|
||||
const TEV_MODE_INTER = 0x02
|
||||
const TEV_MODE_MOTION = 0x03
|
||||
|
||||
// Packet types
|
||||
const TEV_PACKET_IFRAME = 0x10
|
||||
const TEV_PACKET_PFRAME = 0x11
|
||||
const TEV_PACKET_AUDIO_MP2 = 0x20
|
||||
const TEV_PACKET_SYNC = 0xFF
|
||||
|
||||
const interactive = exec_args[2] && exec_args[2].toLowerCase() == "-i"
|
||||
const fullFilePath = _G.shell.resolvePathInput(exec_args[1])
|
||||
const FILE_LENGTH = files.open(fullFilePath.full).size
|
||||
|
||||
// Quantization tables (8 quality levels)
|
||||
const QUANT_TABLES = [
|
||||
// Quality 0 (lowest)
|
||||
[80, 60, 50, 80, 120, 200, 255, 255,
|
||||
55, 60, 70, 95, 130, 255, 255, 255,
|
||||
70, 65, 80, 120, 200, 255, 255, 255,
|
||||
70, 85, 110, 145, 255, 255, 255, 255,
|
||||
90, 110, 185, 255, 255, 255, 255, 255,
|
||||
120, 175, 255, 255, 255, 255, 255, 255,
|
||||
245, 255, 255, 255, 255, 255, 255, 255,
|
||||
255, 255, 255, 255, 255, 255, 255, 255],
|
||||
// Quality 1-6 (simplified)
|
||||
[40, 30, 25, 40, 60, 100, 128, 150,
|
||||
28, 30, 35, 48, 65, 128, 150, 180,
|
||||
35, 33, 40, 60, 100, 128, 150, 180,
|
||||
35, 43, 55, 73, 128, 150, 180, 200,
|
||||
45, 55, 93, 128, 150, 180, 200, 220,
|
||||
60, 88, 128, 150, 180, 200, 220, 240,
|
||||
123, 128, 150, 180, 200, 220, 240, 250,
|
||||
128, 150, 180, 200, 220, 240, 250, 255],
|
||||
[20, 15, 13, 20, 30, 50, 64, 75,
|
||||
14, 15, 18, 24, 33, 64, 75, 90,
|
||||
18, 17, 20, 30, 50, 64, 75, 90,
|
||||
18, 22, 28, 37, 64, 75, 90, 100,
|
||||
23, 28, 47, 64, 75, 90, 100, 110,
|
||||
30, 44, 64, 75, 90, 100, 110, 120,
|
||||
62, 64, 75, 90, 100, 110, 120, 125,
|
||||
64, 75, 90, 100, 110, 120, 125, 128],
|
||||
[16, 12, 10, 16, 24, 40, 51, 60,
|
||||
11, 12, 14, 19, 26, 51, 60, 72,
|
||||
14, 13, 16, 24, 40, 51, 60, 72,
|
||||
14, 17, 22, 29, 51, 60, 72, 80,
|
||||
18, 22, 37, 51, 60, 72, 80, 88,
|
||||
24, 35, 51, 60, 72, 80, 88, 96,
|
||||
49, 51, 60, 72, 80, 88, 96, 100,
|
||||
51, 60, 72, 80, 88, 96, 100, 102],
|
||||
[12, 9, 8, 12, 18, 30, 38, 45,
|
||||
8, 9, 11, 14, 20, 38, 45, 54,
|
||||
11, 10, 12, 18, 30, 38, 45, 54,
|
||||
11, 13, 17, 22, 38, 45, 54, 60,
|
||||
14, 17, 28, 38, 45, 54, 60, 66,
|
||||
18, 26, 38, 45, 54, 60, 66, 72,
|
||||
37, 38, 45, 54, 60, 66, 72, 75,
|
||||
38, 45, 54, 60, 66, 72, 75, 77],
|
||||
[10, 7, 6, 10, 15, 25, 32, 38,
|
||||
7, 7, 9, 12, 16, 32, 38, 45,
|
||||
9, 8, 10, 15, 25, 32, 38, 45,
|
||||
9, 11, 14, 18, 32, 38, 45, 50,
|
||||
12, 14, 23, 32, 38, 45, 50, 55,
|
||||
15, 22, 32, 38, 45, 50, 55, 60,
|
||||
31, 32, 38, 45, 50, 55, 60, 63,
|
||||
32, 38, 45, 50, 55, 60, 63, 65],
|
||||
[8, 6, 5, 8, 12, 20, 26, 30,
|
||||
6, 6, 7, 10, 13, 26, 30, 36,
|
||||
7, 7, 8, 12, 20, 26, 30, 36,
|
||||
7, 9, 11, 15, 26, 30, 36, 40,
|
||||
10, 11, 19, 26, 30, 36, 40, 44,
|
||||
12, 17, 26, 30, 36, 40, 44, 48,
|
||||
25, 26, 30, 36, 40, 44, 48, 50,
|
||||
26, 30, 36, 40, 44, 48, 50, 52],
|
||||
// Quality 7 (highest)
|
||||
[2, 1, 1, 2, 3, 5, 6, 7,
|
||||
1, 1, 1, 2, 3, 6, 7, 9,
|
||||
1, 1, 2, 3, 5, 6, 7, 9,
|
||||
1, 2, 3, 4, 6, 7, 9, 10,
|
||||
2, 3, 5, 6, 7, 9, 10, 11,
|
||||
3, 4, 6, 7, 9, 10, 11, 12,
|
||||
6, 6, 7, 9, 10, 11, 12, 13,
|
||||
6, 7, 9, 10, 11, 12, 13, 13]
|
||||
]
|
||||
let videoRateBin = []
|
||||
let errorlevel = 0
|
||||
let notifHideTimer = 0
|
||||
const NOTIF_SHOWUPTIME = 3000000000
|
||||
let [cy, cx] = con.getyx()
|
||||
|
||||
if (interactive) {
|
||||
con.move(1,1)
|
||||
println("Push and hold Backspace to exit")
|
||||
}
|
||||
|
||||
let seqreadserial = require("seqread")
|
||||
let seqreadtape = require("seqreadtape")
|
||||
let seqread = undefined
|
||||
let fullFilePathStr = fullFilePath.full
|
||||
|
||||
// Select seqread driver to use
|
||||
if (fullFilePathStr.startsWith('$:/TAPE') || fullFilePathStr.startsWith('$:\\TAPE')) {
|
||||
seqread = seqreadtape
|
||||
seqread.seek(0)
|
||||
} else {
|
||||
seqread = seqreadserial
|
||||
}
|
||||
|
||||
seqread.prepare(fullFilePathStr)
|
||||
|
||||
con.clear()
|
||||
con.curs_set(0)
|
||||
graphics.setGraphicsMode(4) // 4096-color mode
|
||||
graphics.clearPixels(0)
|
||||
graphics.clearPixels2(0)
|
||||
|
||||
// Check magic number
|
||||
let magic = seqread.readBytes(8)
|
||||
let magicMatching = true
|
||||
let actualMagic = []
|
||||
|
||||
TEV_MAGIC.forEach((b, i) => {
|
||||
let testb = sys.peek(magic + i) & 255
|
||||
actualMagic.push(testb)
|
||||
if (testb != b) {
|
||||
magicMatching = false
|
||||
}
|
||||
})
|
||||
sys.free(magic)
|
||||
|
||||
if (!magicMatching) {
|
||||
println("Not a TEV file (MAGIC mismatch) -- got " + actualMagic.join())
|
||||
return 1
|
||||
}
|
||||
|
||||
// Read header
|
||||
let version = seqread.readOneByte()
|
||||
let flags = seqread.readOneByte()
|
||||
let width = seqread.readShort()
|
||||
let height = seqread.readShort()
|
||||
let fps = seqread.readShort()
|
||||
let totalFrames = seqread.readInt()
|
||||
let quality = seqread.readOneByte()
|
||||
seqread.skip(5) // Reserved bytes
|
||||
|
||||
function updateDataRateBin(rate) {
|
||||
videoRateBin.push(rate)
|
||||
|
||||
if (videoRateBin.length > fps) {
|
||||
videoRateBin.shift()
|
||||
}
|
||||
}
|
||||
|
||||
function getVideoRate(rate) {
|
||||
let baseRate = videoRateBin.reduce((a, c) => a + c, 0)
|
||||
let mult = fps / videoRateBin.length
|
||||
return baseRate * mult
|
||||
}
|
||||
|
||||
let hasAudio = (flags & 0x01) != 0
|
||||
let frameTime = 1.0 / fps
|
||||
|
||||
//println(`TEV Video: ${width}x${height}, ${fps} FPS, ${totalFrames} frames, Q${quality}`)
|
||||
//if (hasAudio) println("Audio: MP2 32kHz")
|
||||
//println(`Blocks: ${(width + 7) >> 3}x${(height + 7) >> 3} (${((width + 7) >> 3) * ((height + 7) >> 3)} total)`)
|
||||
|
||||
// Ultra-fast approach: always render to display, use dedicated previous frame buffer
|
||||
const FRAME_PIXELS = width * height
|
||||
|
||||
// Always render directly to display memory for immediate visibility
|
||||
const CURRENT_RG_ADDR = -1048577 // Main graphics RG plane (displayed)
|
||||
const CURRENT_BA_ADDR = -1310721 // Main graphics BA plane (displayed)
|
||||
|
||||
// Dedicated previous frame buffer for reference (peripheral slot 2)
|
||||
const PREV_RG_ADDR = sys.malloc(560*448) // Slot 2 RG plane
|
||||
const PREV_BA_ADDR = sys.malloc(560*448) // Slot 2 BA plane
|
||||
|
||||
// Working memory for blocks (minimal allocation)
|
||||
let rgbWorkspace = sys.malloc(BLOCK_SIZE * BLOCK_SIZE * 3) // 192 bytes
|
||||
let dctWorkspace = sys.malloc(BLOCK_SIZE * BLOCK_SIZE * 3 * 4) // 768 bytes (floats)
|
||||
|
||||
// Initialize both frame buffers to black with alpha=15 (opaque)
|
||||
for (let i = 0; i < FRAME_PIXELS; i++) {
|
||||
sys.poke(CURRENT_RG_ADDR - i, 0)
|
||||
sys.poke(CURRENT_BA_ADDR - i, 15) // Alpha = 15 (opaque)
|
||||
sys.poke(PREV_RG_ADDR + i, 0)
|
||||
sys.poke(PREV_BA_ADDR + i, 15) // Alpha = 15 (opaque)
|
||||
}
|
||||
|
||||
let frameCount = 0
|
||||
let stopPlay = false
|
||||
|
||||
// Dequantize DCT coefficient
|
||||
function dequantizeCoeff(coeff, quant, isDC) {
|
||||
if (isDC) {
|
||||
// DC coefficient represents the average pixel value
|
||||
// It should be in range roughly -128 to +127 after dequantization
|
||||
return coeff // No multiplication needed for DC
|
||||
} else {
|
||||
return coeff * quant
|
||||
}
|
||||
}
|
||||
|
||||
// Hardware-accelerated decoding uses graphics.tevIdct8x8() instead of pure JS
|
||||
|
||||
// Hardware-accelerated TEV block decoder
|
||||
function decodeBlock(blockData, blockX, blockY, prevRG, prevBA, currRG, currBA, quantTable) {
|
||||
let mode = blockData.mode
|
||||
let startX = blockX * BLOCK_SIZE
|
||||
let startY = blockY * BLOCK_SIZE
|
||||
|
||||
if (mode == TEV_MODE_SKIP) {
|
||||
// Copy from previous frame
|
||||
for (let dy = 0; dy < BLOCK_SIZE; dy++) {
|
||||
for (let dx = 0; dx < BLOCK_SIZE; dx++) {
|
||||
let x = startX + dx
|
||||
let y = startY + dy
|
||||
if (x < width && y < height) {
|
||||
let offset = y * width + x
|
||||
let prevRGVal = sys.peek(prevRG + offset)
|
||||
let prevBAVal = sys.peek(prevBA + offset)
|
||||
sys.poke(currRG - offset, prevRGVal) // Graphics memory uses negative addressing
|
||||
sys.poke(currBA - offset, prevBAVal)
|
||||
}
|
||||
}
|
||||
}
|
||||
} else if (mode == TEV_MODE_MOTION) {
|
||||
// Motion compensation: copy from previous frame with motion vector offset
|
||||
for (let dy = 0; dy < BLOCK_SIZE; dy++) {
|
||||
for (let dx = 0; dx < BLOCK_SIZE; dx++) {
|
||||
let x = startX + dx
|
||||
let y = startY + dy
|
||||
let refX = x + blockData.mvX
|
||||
let refY = y + blockData.mvY
|
||||
|
||||
if (x < width && y < height && refX >= 0 && refX < width && refY >= 0 && refY < height) {
|
||||
let dstOffset = y * width + x
|
||||
let refOffset = refY * width + refX
|
||||
let refRGVal = sys.peek(prevRG + refOffset)
|
||||
let refBAVal = sys.peek(prevBA + refOffset)
|
||||
sys.poke(currRG - dstOffset, refRGVal) // Graphics memory uses negative addressing
|
||||
sys.poke(currBA - dstOffset, refBAVal)
|
||||
} else if (x < width && y < height) {
|
||||
// Out of bounds reference - use black
|
||||
let dstOffset = y * width + x
|
||||
sys.poke(currRG - dstOffset, 0) // Graphics memory uses negative addressing
|
||||
sys.poke(currBA - dstOffset, 15)
|
||||
}
|
||||
}
|
||||
}
|
||||
} else {
|
||||
// INTRA or INTER modes: simplified DC-only decoding for debugging
|
||||
|
||||
// Extract DC coefficients and convert to colors
|
||||
let rCoeff = blockData.dctCoeffs[0 * 64 + 0] // R DC
|
||||
let gCoeff = blockData.dctCoeffs[1 * 64 + 0] // G DC
|
||||
let bCoeff = blockData.dctCoeffs[2 * 64 + 0] // B DC
|
||||
|
||||
// Dequantize DC coefficients
|
||||
let rDC = dequantizeCoeff(rCoeff, quantTable[0], true)
|
||||
let gDC = dequantizeCoeff(gCoeff, quantTable[0], true)
|
||||
let bDC = dequantizeCoeff(bCoeff, quantTable[0], true)
|
||||
|
||||
// Convert to RGB values (DC represents average)
|
||||
let r = Math.max(0, Math.min(255, rDC + 128))
|
||||
let g = Math.max(0, Math.min(255, gDC + 128))
|
||||
let b = Math.max(0, Math.min(255, bDC + 128))
|
||||
|
||||
// Convert to 4-bit values
|
||||
let r4 = Math.max(0, Math.min(15, Math.round(r * 15 / 255)))
|
||||
let g4 = Math.max(0, Math.min(15, Math.round(g * 15 / 255)))
|
||||
let b4 = Math.max(0, Math.min(15, Math.round(b * 15 / 255)))
|
||||
|
||||
let rgValue = (r4 << 4) | g4 // R in MSB, G in LSB
|
||||
let baValue = (b4 << 4) | 15 // B in MSB, A=15 (opaque) in LSB
|
||||
|
||||
// Software decoding (for fallback only)
|
||||
|
||||
// Fill 8x8 block with solid color
|
||||
for (let dy = 0; dy < BLOCK_SIZE; dy++) {
|
||||
for (let dx = 0; dx < BLOCK_SIZE; dx++) {
|
||||
let x = startX + dx
|
||||
let y = startY + dy
|
||||
if (x < width && y < height) {
|
||||
let offset = y * width + x
|
||||
// Normal memory plane assignments
|
||||
sys.poke(currRG - offset, rgValue) // Graphics memory uses negative addressing
|
||||
sys.poke(currBA - offset, baValue)
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
// Secondary buffers removed - using frame buffers directly
|
||||
|
||||
// Main decoding loop - simplified for performance
|
||||
try {
|
||||
while (!stopPlay && seqread.getReadCount() < FILE_LENGTH && frameCount < totalFrames) {
|
||||
// Handle interactive controls
|
||||
if (interactive) {
|
||||
sys.poke(-40, 1)
|
||||
if (sys.peek(-41) == 67) { // Backspace
|
||||
stopPlay = true
|
||||
break
|
||||
}
|
||||
}
|
||||
|
||||
// Read packet (2 bytes: type + subtype)
|
||||
let packetType = seqread.readShort()
|
||||
|
||||
if (packetType == 0xFFFF) { // Sync packet
|
||||
// Sync packet - frame complete
|
||||
frameCount++
|
||||
|
||||
// Copy current display frame to previous frame buffer for next frame reference
|
||||
// This is the only copying we need, and it happens once per frame after display
|
||||
sys.memcpy(CURRENT_RG_ADDR, PREV_RG_ADDR, FRAME_PIXELS)
|
||||
sys.memcpy(CURRENT_BA_ADDR, PREV_BA_ADDR, FRAME_PIXELS)
|
||||
|
||||
} else if ((packetType & 0xFF) == TEV_PACKET_IFRAME || (packetType & 0xFF) == TEV_PACKET_PFRAME) {
|
||||
// Video frame packet
|
||||
let payloadLen = seqread.readInt()
|
||||
let compressedPtr = seqread.readBytes(payloadLen)
|
||||
updateDataRateBin(payloadLen)
|
||||
|
||||
// Basic sanity check on compressed data
|
||||
if (payloadLen <= 0 || payloadLen > 1000000) {
|
||||
serial.println(`Frame ${frameCount}: Invalid payload length: ${payloadLen}`)
|
||||
sys.free(compressedPtr)
|
||||
continue
|
||||
}
|
||||
|
||||
// Decompress using zstd (if available) or gzip fallback
|
||||
// Calculate proper buffer size for TEV blocks (conservative estimate)
|
||||
let blocksX = (width + 7) >> 3
|
||||
let blocksY = (height + 7) >> 3
|
||||
let tevBlockSize = 1 + 4 + 2 + (64 * 3 * 2) // mode + mv + cbp + dct_coeffs
|
||||
let decompressedSize = blocksX * blocksY * tevBlockSize * 2 // Double for safety
|
||||
let blockDataPtr = sys.malloc(decompressedSize)
|
||||
|
||||
let actualSize
|
||||
let decompMethod = "gzip"
|
||||
try {
|
||||
// Use gzip decompression (only compression format supported in TSVM JS)
|
||||
actualSize = gzip.decompFromTo(compressedPtr, payloadLen, blockDataPtr)
|
||||
} catch (e) {
|
||||
// Decompression failed - skip this frame
|
||||
serial.println(`Frame ${frameCount}: Gzip decompression failed, skipping (compressed size: ${payloadLen}, error: ${e})`)
|
||||
sys.free(blockDataPtr)
|
||||
sys.free(compressedPtr)
|
||||
continue
|
||||
}
|
||||
|
||||
// Hardware decode complete
|
||||
|
||||
// Hardware-accelerated TEV decoding (blazing fast!)
|
||||
try {
|
||||
graphics.tevDecode(blockDataPtr, CURRENT_RG_ADDR, CURRENT_BA_ADDR,
|
||||
width, height, quality, PREV_RG_ADDR, PREV_BA_ADDR)
|
||||
} catch (e) {
|
||||
serial.println(`Frame ${frameCount}: Hardware decode failed: ${e}`)
|
||||
}
|
||||
|
||||
sys.free(blockDataPtr)
|
||||
sys.free(compressedPtr)
|
||||
|
||||
} else if ((packetType & 0xFF) == TEV_PACKET_AUDIO_MP2) {
|
||||
// Audio packet - skip for now
|
||||
let audioLen = seqread.readInt()
|
||||
seqread.skip(audioLen)
|
||||
|
||||
} else {
|
||||
println(`Unknown packet type: 0x${packetType.toString(16)}`)
|
||||
break
|
||||
}
|
||||
|
||||
// Simple progress display
|
||||
if (interactive) {
|
||||
con.move(32, 1)
|
||||
graphics.setTextFore(161)
|
||||
print(`Frame: ${frameCount}/${totalFrames} (${Math.round(frameCount * 100 / totalFrames)}%)`)
|
||||
//serial.println(`Frame: ${frameCount}/${totalFrames} (${Math.round(frameCount * 100 / totalFrames)}%)`)
|
||||
}
|
||||
}
|
||||
|
||||
} catch (e) {
|
||||
printerrln(`TEV decode error: ${e}`)
|
||||
errorlevel = 1
|
||||
} finally {
|
||||
// Cleanup working memory (graphics memory is automatically managed)
|
||||
sys.free(rgbWorkspace)
|
||||
sys.free(dctWorkspace)
|
||||
sys.free(PREV_RG_ADDR)
|
||||
sys.free(PREV_BA_ADDR)
|
||||
|
||||
|
||||
audio.stop(0)
|
||||
audio.purgeQueue(0)
|
||||
|
||||
if (interactive) {
|
||||
//con.clear()
|
||||
}
|
||||
}
|
||||
|
||||
return errorlevel
|
||||
Reference in New Issue
Block a user