ddidderr
8b99e9607c
Replace the partial mechanics transcriptions with a separate, readable C11 reconstruction of the complete Win16 image while preserving the original raw Ghidra export as immutable evidence. Cover all ordinary and overlapping entry points, Borland runtime behavior, Win16 imports, segmented data, callbacks, resources, indirect control flow, physics, rendering, persistence, and startup/shutdown lifecycles. Add deterministic extraction and audit tooling plus address-linked ledgers for functions, imports, DGROUP ranges and objects, relocations, resources, and callbacks. The final gate records zero raw, partial, restored, unknown, blocked, or unclassified required units. Keep the semantic-fidelity boundary explicit: the portable C is not claimed to reproduce a byte-identical Borland NE build. Add strict focused harnesses for every reconstructed C unit, exact resource round-trip checks, and a 16-bit Borland Real48 reference probe. No Rust source or Cargo metadata is changed in this phase. Test Plan: - `bash original/tools/test_reconstructed_c.sh` -- passed - `bash original/tools/probe_real48_reference.sh` -- passed bit-for-bit - `python3 original/tools/audit_reconstruction.py --require-complete` -- passed - `git diff --cached --check` -- passed - `git diff HEAD -- '*.rs' Cargo.toml Cargo.lock` -- empty
112 lines
3.0 KiB
C
112 lines
3.0 KiB
C
#include "../tdkpin_render.h"
|
|
|
|
#include <assert.h>
|
|
|
|
static uint8_t g_dgroup[0x1000];
|
|
static unsigned g_restore_calls;
|
|
static unsigned g_present_calls;
|
|
static unsigned g_create_calls;
|
|
static unsigned g_select_calls;
|
|
static unsigned g_blit_calls;
|
|
static unsigned g_delete_calls;
|
|
static INT16 g_expected_source_x;
|
|
static INT16 g_expected_source_y;
|
|
|
|
void tdkpin_restore_background_region_b(
|
|
INT16 height, INT16 width, INT16 y, INT16 x, HDC16 dc)
|
|
{
|
|
assert(height == 74 && width == 100 && y == 47 && x == 238 && dc == 0x1111);
|
|
g_restore_calls++;
|
|
}
|
|
|
|
void tdkpin_present_background_region(
|
|
INT16 height, INT16 width, INT16 y, INT16 x, HDC16 dc)
|
|
{
|
|
assert(height == 74 && width == 100 && y == 47 && x == 238 && dc == 0x1111);
|
|
g_present_calls++;
|
|
}
|
|
|
|
HDC16 CreateCompatibleDC16(HDC16 dc)
|
|
{
|
|
assert(dc == 0x1111);
|
|
return (HDC16)(0x2001 + g_create_calls++);
|
|
}
|
|
|
|
HGDIOBJ16 SelectObject16(HDC16 dc, HGDIOBJ16 object)
|
|
{
|
|
g_select_calls++;
|
|
if (g_select_calls == 1) {
|
|
assert(dc == 0x2001 && object == 0x3001);
|
|
return 0x4001;
|
|
}
|
|
if (g_select_calls == 2) {
|
|
assert(dc == 0x2002 && object == 0x3002);
|
|
return 0x4002;
|
|
}
|
|
if (g_select_calls == 3) {
|
|
assert(dc == 0x2001 && object == 0x4001);
|
|
} else {
|
|
assert(g_select_calls == 4 && dc == 0x2002 && object == 0x4002);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
BOOL16 BitBlt16(
|
|
HDC16 destination,
|
|
INT16 x,
|
|
INT16 y,
|
|
INT16 width,
|
|
INT16 height,
|
|
HDC16 source,
|
|
INT16 source_x,
|
|
INT16 source_y,
|
|
uint32_t raster_operation)
|
|
{
|
|
g_blit_calls++;
|
|
assert(destination == (g_blit_calls == 1 ? 0x2001 : 0x1111));
|
|
assert(x == 238 && y == 47 && width == 100 && height == 74);
|
|
assert(source == 0x2002);
|
|
assert(source_x == g_expected_source_x && source_y == g_expected_source_y);
|
|
assert(raster_operation == 0x00cc0020);
|
|
return 1;
|
|
}
|
|
|
|
BOOL16 DeleteDC16(HDC16 dc)
|
|
{
|
|
g_delete_calls++;
|
|
assert(dc == (g_delete_calls == 1 ? 0x2002 : 0x2001));
|
|
return 1;
|
|
}
|
|
|
|
static void reset_active(INT16 source_x, INT16 source_y)
|
|
{
|
|
g_create_calls = 0;
|
|
g_select_calls = 0;
|
|
g_blit_calls = 0;
|
|
g_delete_calls = 0;
|
|
g_expected_source_x = source_x;
|
|
g_expected_source_y = source_y;
|
|
}
|
|
|
|
int main(void)
|
|
{
|
|
win16_reset_segment_bindings();
|
|
win16_bind_segment(0x5000, g_dgroup, sizeof(g_dgroup), true);
|
|
win16_set_dgroup_selector(0x5000);
|
|
win16_write_u16(win16_make_far_pointer(0x5000, 0x085b), 0, 0x3001);
|
|
win16_write_u16(win16_make_far_pointer(0x5000, 0x0863), 0, 0x3002);
|
|
|
|
tdkpin_draw_claw_frame(0, 0, 0x1111);
|
|
assert(g_restore_calls == 1 && g_present_calls == 1);
|
|
reset_active(0, 148);
|
|
tdkpin_draw_claw_frame(0, 1, 0x1111);
|
|
assert(g_blit_calls == 2 && g_select_calls == 4 && g_delete_calls == 2);
|
|
reset_active(0, 74);
|
|
tdkpin_draw_claw_frame(1, 10, 0x1111);
|
|
assert(g_blit_calls == 2 && g_select_calls == 4 && g_delete_calls == 2);
|
|
reset_active(800, 222);
|
|
tdkpin_draw_claw_frame(0, 18, 0x1111);
|
|
assert(g_blit_calls == 2);
|
|
return 0;
|
|
}
|