nx_pe_dll_d3d11ctx.nx source
↩ module page · 205 lines · 10837 B
1// nx_pe_dll_d3d11ctx.nx -- ACCEPTANCE SLICE: a real multi-interface D3D11 render through the COM API. Data-driven
2// generation of TWO vtables -- ID3D11Device (43 slots) + ID3D11DeviceContext (108 slots) -- from slot tables. A foreign
3// process: create device -> dev->GetImmediateContext(&ctx) [dev slot 40] -> dev->CreateRenderTargetView(buf,..,&rtv)
4// [dev slot 9] -> ctx->ClearRenderTargetView(rtv, FLOAT[4]) [ctx slot 50] -> the render target buffer is filled with the
5// UNORM8 color (round(f*255), the D3D spec already WARP-validated). Object mem: [0]dev_vtbl [1]dev_rc [2]ctx_vtbl [3]ctx_rc
6// [4]rtv_buffer; context=&mem[2], RTV=&mem[4]. Method bodies = sovereign nx_cc NishiLang (float via sys_mmap-free nx_f32_hw);
7// vtables+factory+thunks = sovereign emitter glue. Graded vs Microsoft <d3d11.h> slots. ⚠baked @ fixed base 0x180000000.
8// Input /tmp/nishi_export_lib.s Output knowledge/nishi_d3d11ctx.dll license_tier: ORIGINAL expect_exit: 0
9import "nx_syscalls.nx"
10import "nxasm_x86.nx"
11import "nx_pe_writer.nx"
12
13const N_DEV: i64 = 43
14const N_CTX: i64 = 108
15
16func d11_puts(s: *u8) -> i64 { var n: i64=0; while s[n]!=(0 as u8){n=n+1} sys_write(1,s,n); return 0 }
17func d11_putn(v: i64) -> i64 { let b: *u8=sys_mmap(32) as *u8; var x: i64=v; var ng: i64=0; if x<0{ng=1;x=0-x} var i: i64=31; if x==0{b[i]=48 as u8;i=i-1} while x>0{b[i]=(48+x%10) as u8;x=x/10;i=i-1} if ng==1{b[i]=45 as u8;i=i-1} sys_write(1,(b as i64+i+1) as *u8,31-i); return 0 }
18func d11_wstr(buf: *u8, off: i64, s: *u8) -> i64 { var i: i64=0; while s[i]!=(0 as u8){ buf[off+i]=s[i]; i=i+1 } buf[off+i]=0 as u8; return i+1 }
19
20func d11_assemble(src: *u8, n: i64, out: *u8, out_cap: i64, names: *i64, offs: *i64, cnt: i64) -> i64 {
21 let lab_off: *i64 = sys_mmap(ASM_MAX_LABELS * 8) as *i64
22 let lab_len: *i64 = sys_mmap(ASM_MAX_LABELS * 8) as *i64
23 let lab_addr: *i64 = sys_mmap(ASM_MAX_LABELS * 8) as *i64
24 let lab_sec: *i64 = sys_mmap(ASM_MAX_LABELS * 8) as *i64
25 let op0: *i64 = sys_mmap(72) as *i64 // 9 slots for SIB (matches nxasm_x86)
26 let op1: *i64 = sys_mmap(72) as *i64
27 let op2: *i64 = sys_mmap(72) as *i64 // API DRIFT FIX: axc_pass gained op2
28 let scratch: *u8 = sys_mmap(64)
29 let posbox: *i64 = sys_mmap(16) as *i64
30 let n_lab_box: *i64 = sys_mmap(16) as *i64
31 n_lab_box[0] = 0
32 let lh: *i64 = sys_mmap(ASM_LH_SIZE * 8) as *i64
33 let text_size: i64 = axc_pass(src, n, out, 0, 0, lab_off, lab_len, lab_addr, lab_sec, n_lab_box, lh, op0, op1, op2, scratch, posbox)
34 if text_size < 0 { return text_size }
35 let n_lab: i64 = n_lab_box[0]
36 var k: i64 = 0
37 while k < n_lab {
38 if lab_sec[k] == 1 { lab_addr[k] = lab_addr[k] + text_size }
39 var m: i64 = 0
40 while m < cnt { if axc_tok_is(src, lab_off[k], lab_len[k], names[m] as *u8) == 1 { offs[m] = lab_addr[k] } m = m + 1 }
41 k = k + 1
42 }
43 axc_lh_build(src, lab_off, lab_len, n_lab, lh)
44 let total: i64 = axc_pass(src, n, out, text_size, 1, lab_off, lab_len, lab_addr, lab_sec, n_lab_box, lh, op0, op1, op2, scratch, posbox)
45 if total < 0 { return total }
46 if total > out_cap { return 0 - 200 }
47 return total
48}
49
50func d11_thunk(buf: *u8, tco: i64, moff: i64) -> i64 {
51 let t: i64 = 0x200 + tco
52 _w8(buf,t+0,0x57); _w8(buf,t+1,0x56)
53 _w8(buf,t+2,0x48); _w8(buf,t+3,0x89); _w8(buf,t+4,0xCF)
54 _w8(buf,t+5,0x48); _w8(buf,t+6,0x89); _w8(buf,t+7,0xD6)
55 _w8(buf,t+8,0x4C); _w8(buf,t+9,0x89); _w8(buf,t+10,0xC2)
56 _w8(buf,t+11,0x4C); _w8(buf,t+12,0x89); _w8(buf,t+13,0xC9)
57 _w8(buf,t+14,0x48); _w8(buf,t+15,0x83); _w8(buf,t+16,0xEC); _w8(buf,t+17,0x08)
58 _w8(buf,t+18,0xE8); _w32(buf, t+19, moff - (tco + 23))
59 _w8(buf,t+23,0x48); _w8(buf,t+24,0x83); _w8(buf,t+25,0xC4); _w8(buf,t+26,0x08)
60 _w8(buf,t+27,0x5E); _w8(buf,t+28,0x5F); _w8(buf,t+29,0xC3)
61 return 0
62}
63
64// method index by slot. methods: 0=qi 1=addref 2=release 3=getfl 4=notimpl 5=getctx 6=create_rtv 7=clearrtv
65func d11_dev_slot(s: i64) -> i64 {
66 if s == 0 { return 0 }
67 if s == 1 { return 1 }
68 if s == 2 { return 2 }
69 if s == 9 { return 6 } // CreateRenderTargetView
70 if s == 37 { return 3 } // GetFeatureLevel
71 if s == 40 { return 5 } // GetImmediateContext
72 return 4
73}
74func d11_ctx_slot(s: i64) -> i64 {
75 if s == 0 { return 0 }
76 if s == 1 { return 1 }
77 if s == 2 { return 2 }
78 if s == 50 { return 7 } // ClearRenderTargetView
79 return 4
80}
81
82func d11_emit(buf: *u8, code: *u8, code_len: i64, offs: *i64) -> i64 {
83 if (buf as i64) == 0 { return 0 - NX_PE_BAD_INPUT }
84 let FF: i64 = code_len + 240 // factory (after 8*30 thunks)
85 let DV: i64 = ((FF + 41 + 7) / 8) * 8 // device vtable (43 slots)
86 let CV: i64 = DV + N_DEV * 8 // context vtable (108 slots)
87 let text_used: i64 = CV + N_CTX * 8
88 let text_pages: i64 = (text_used + 4095) / 4096
89 let text_raw: i64 = text_pages * 4096
90 let edata_rva: i64 = 0x1000 + text_raw
91 let edata_file: i64 = 0x200 + text_raw
92 let size_of_image: i64 = edata_rva + 0x1000
93 let file_size: i64 = edata_file + 0x200
94
95 _w16(buf, 0, 0x5A4D); _w32(buf, 0x3C, 0x80); _w32(buf, 0x80, 0x00004550)
96 _w16(buf, 0x84 + 0, PE_MACHINE_AMD64); _w16(buf, 0x84 + 2, 2); _w16(buf, 0x84 + 16, 0xF0); _w16(buf, 0x84 + 18, 0x2022)
97 let O: i64 = 0x98
98 _w16(buf, O + 0, PE_OH_MAGIC_PEPLUS); _w8(buf, O + 2, 1)
99 _w32(buf, O + 4, text_raw); _w32(buf, O + 8, 0x200)
100 _w32(buf, O + 16, 0); _w32(buf, O + 20, 0x1000)
101 _w64(buf, O + 24, 0x80000000, 0x1)
102 _w32(buf, O + 32, 0x1000); _w32(buf, O + 36, 0x200)
103 _w16(buf, O + 40, 6); _w16(buf, O + 48, 6)
104 _w32(buf, O + 56, size_of_image); _w32(buf, O + 60, 0x200)
105 _w16(buf, O + 68, PE_SUBSYSTEM_CONSOLE)
106 _w64(buf, O + 72, 0x100000, 0); _w64(buf, O + 80, 0x1000, 0); _w64(buf, O + 88, 0x100000, 0); _w64(buf, O + 96, 0x1000, 0)
107 _w32(buf, O + 108, 16)
108 _w32(buf, O + 112 + 0, edata_rva); _w32(buf, O + 112 + 4, 0x56)
109
110 _emit_section_header(buf, FOFF_SECT_TBL, 46, 116, 101, 120, 116, 0, 0, 0, text_used, 0x1000, text_raw, 0x200, PE_SECT_CODE_X_R)
111 _emit_section_header(buf, FOFF_SECT_TBL + 40, 46, 101, 100, 97, 116, 97, 0, 0, 0x56, edata_rva, 0x200, edata_file, PE_SECT_DATA_R)
112
113 var i: i64 = 0
114 while i < code_len { buf[0x200 + i] = code[i]; i = i + 1 }
115
116 // 8 uniform thunks
117 var j: i64 = 0
118 while j < 8 { d11_thunk(buf, code_len + j*30, offs[j]); j = j + 1 }
119
120 // factory @ FF (41B): mov rax,rcx; lea rdx,[rip+dDV]; mov[rcx],rdx; mov qword[rcx+8],1; lea rdx,[rip+dCV]; mov[rcx+16],rdx; mov qword[rcx+24],1; ret
121 let f: i64 = 0x200 + FF
122 _w8(buf,f+0,0x48); _w8(buf,f+1,0x89); _w8(buf,f+2,0xC8)
123 _w8(buf,f+3,0x48); _w8(buf,f+4,0x8D); _w8(buf,f+5,0x15); _w32(buf, f+6, DV - FF - 10)
124 _w8(buf,f+10,0x48); _w8(buf,f+11,0x89); _w8(buf,f+12,0x11)
125 _w8(buf,f+13,0x48); _w8(buf,f+14,0xC7); _w8(buf,f+15,0x41); _w8(buf,f+16,0x08); _w32(buf, f+17, 1)
126 _w8(buf,f+21,0x48); _w8(buf,f+22,0x8D); _w8(buf,f+23,0x15); _w32(buf, f+24, CV - FF - 28)
127 _w8(buf,f+28,0x48); _w8(buf,f+29,0x89); _w8(buf,f+30,0x51); _w8(buf,f+31,0x10)
128 _w8(buf,f+32,0x48); _w8(buf,f+33,0xC7); _w8(buf,f+34,0x41); _w8(buf,f+35,0x18); _w32(buf, f+36, 1)
129 _w8(buf,f+40,0xC3)
130
131 // device vtable @ DV (43 baked-absolute slots)
132 var s: i64 = 0
133 while s < N_DEV {
134 _w64(buf, 0x200 + DV + s*8, 0x80000000 + 0x1000 + code_len + d11_dev_slot(s)*30, 1)
135 s = s + 1
136 }
137 // context vtable @ CV (108 baked-absolute slots)
138 var c: i64 = 0
139 while c < N_CTX {
140 _w64(buf, 0x200 + CV + c*8, 0x80000000 + 0x1000 + code_len + d11_ctx_slot(c)*30, 1)
141 c = c + 1
142 }
143
144 // .edata: 1 export "nishi_d3d_create_device" -> factory @ RVA 0x1000+FF
145 let E: i64 = edata_file
146 _w32(buf, E + 12, edata_rva + 0x4A)
147 _w32(buf, E + 16, 1); _w32(buf, E + 20, 1); _w32(buf, E + 24, 1)
148 _w32(buf, E + 28, edata_rva + 0x28); _w32(buf, E + 32, edata_rva + 0x2C); _w32(buf, E + 36, edata_rva + 0x30)
149 _w32(buf, E + 0x28, 0x1000 + FF)
150 _w32(buf, E + 0x2C, edata_rva + 0x32)
151 _w16(buf, E + 0x30, 0)
152 d11_wstr(buf, E + 0x32, "nishi_d3d_create_device\x00" as *u8)
153 d11_wstr(buf, E + 0x4A, "nishicc.dll\x00" as *u8)
154 return file_size
155}
156
157func main() -> i64 {
158 d11_puts("=== nx_pe_dll_d3d11ctx -- ID3D11Device + ID3D11DeviceContext (ClearRenderTargetView acceptance slice) ===\n" as *u8)
159 let lenbox: *i64 = sys_mmap(16) as *i64
160 let src: *u8 = sys_read_file("/tmp/nishi_export_lib.s" as *u8, lenbox)
161 if (src as i64) == 0 { d11_puts("FAIL no /tmp/nishi_export_lib.s\n" as *u8); sys_exit(1); return 1 }
162 let n: i64 = lenbox[0]
163 if n <= 0 { d11_puts("FAIL empty .s\n" as *u8); sys_exit(2); return 2 }
164
165 let names: *i64 = sys_mmap(8*8) as *i64
166 names[0] = "nx_dev_qi" as *u8 as i64
167 names[1] = "nx_dev_addref" as *u8 as i64
168 names[2] = "nx_dev_release" as *u8 as i64
169 names[3] = "nx_dev_getfl" as *u8 as i64
170 names[4] = "nx_dev_notimpl" as *u8 as i64
171 names[5] = "nx_dev_getctx" as *u8 as i64
172 names[6] = "nx_dev_create_rtv" as *u8 as i64
173 names[7] = "nx_ctx_clearrtv" as *u8 as i64
174 let offs: *i64 = sys_mmap(8*8) as *i64
175 var z: i64 = 0
176 while z < 8 { offs[z] = 0 - 1; z = z + 1 }
177
178 let code: *u8 = sys_mmap(2097152)
179 let code_len: i64 = d11_assemble(src, n, code, 2097152, names, offs, 8)
180 if code_len < 0 { d11_puts("FAIL assemble rc="); d11_putn(code_len); d11_puts("\n" as *u8); sys_exit(3); return 3 }
181 var miss: i64 = 0
182 var q: i64 = 0
183 while q < 8 { if offs[q] < 0 { d11_puts(" MISSING method "); d11_putn(q); d11_puts("\n" as *u8); miss = miss + 1 } q = q + 1 }
184 if miss > 0 { d11_puts("FAIL method(s) not found\n" as *u8); sys_exit(4); return 4 }
185 d11_puts(" code_len="); d11_putn(code_len); d11_puts(" factory@"); d11_putn(code_len+240); d11_puts("\n" as *u8)
186
187 let buf: *u8 = sys_mmap(0x40000)
188 let fsz: i64 = d11_emit(buf, code, code_len, offs)
189 if fsz < 0 { d11_puts("FAIL emit rc="); d11_putn(fsz); d11_puts("\n" as *u8); sys_exit(5); return 5 }
190
191 let fd: i64 = sys_openat_wr("knowledge/nishi_d3d11ctx.dll\x00" as *u8, 0x1a4)
192 if fd < 0 { d11_puts("FAIL open output\n" as *u8); sys_exit(6); return 6 }
193 let wrote: i64 = sys_write(fd, buf, fsz)
194 sys_close(fd)
195 d11_puts(" wrote "); d11_putn(wrote); d11_puts(" bytes -> knowledge/nishi_d3d11ctx.dll (device 43 + context 108 vtables)\n" as *u8)
196
197 var fails: i64 = 0
198 if (buf[0] as i64) != 0x4D { fails=fails+1 }
199 if (buf[0x84+18] as i64) != 0x22 { fails=fails+1 }
200 if wrote != fsz { fails=fails+1 }
201 if fails == 0 { d11_puts("NX-PE-D3D11CTX GREEN -- device+context DLL; harness must ClearRenderTargetView via real <d3d11.h>\n" as *u8); sys_exit(0); return 0 }
202 d11_puts("NX-PE-D3D11CTX RED fails="); d11_putn(fails); d11_puts("\n" as *u8)
203 sys_exit(1)
204 return 1
205}