const { test } = require('node:test');
const assert = require('node:assert');
const fs = require('node:fs');
const path = require('node:path');

const html = fs.readFileSync(path.join(__dirname, '..', 'index.html'), 'utf8');

function extractBlock(startMarker, endMarker) {
	const start = html.indexOf(startMarker);
	const end = html.indexOf(endMarker, start);
	if (start < 0 || end < 0) throw new Error('block not found');
	return html.slice(start, end);
}

function extractFunc(src, name) {
	const re = new RegExp('function\\s+' + name + '\\s*\\([^)]*\\)\\s*\\{');
	const m = re.exec(src);
	if (!m) throw new Error('function ' + name + ' not found');
	let i = m.index + m[0].length - 1;
	let depth = 0;
	for (; i < src.length; i++) {
		if (src[i] === '{') depth++;
		else if (src[i] === '}') {
			depth--;
			if (depth === 0) break;
		}
	}
	return src.slice(m.index, i + 1);
}

// Rewrite top-level const -> var so the maps leak out of sloppy-mode eval.
eval(extractBlock('const CMD_NAMES = {', 'function cmdQualifierShort').replace(/^const /gm, 'var '));
eval(extractFunc(html, 'cmdQualifierShort'));
eval(extractBlock('const EVENT_NAMES = {', 'const REJECTION_CAUSES = [').replace(/^const /gm, 'var '));
eval(extractBlock('const REJECTION_CAUSES = [', 'const EVENT_FORMS = {').replace(/^const /gm, 'var '));
eval(extractBlock('const EVENT_FORMS = {', 'const PLI_QUALIFIERS = [').replace(/^const /gm, 'var '));
eval(extractFunc(html, 'encPlmn'));
eval(extractFunc(html, 'bytesToHex'));

test('CMD_NAMES decodes timer management and the BIP commands', () => {
	assert.strictEqual(CMD_NAMES['01'], 'REFRESH');
	assert.strictEqual(CMD_NAMES['10'], 'SET UP CALL');
	assert.strictEqual(CMD_NAMES['27'], 'TIMER MANAGEMENT');
	assert.strictEqual(CMD_NAMES['28'], 'SET UP IDLE MODE TEXT');
	assert.strictEqual(CMD_NAMES['40'], 'OPEN CHANNEL');
	assert.strictEqual(CMD_NAMES['41'], 'CLOSE CHANNEL');
	assert.strictEqual(CMD_NAMES['42'], 'RECEIVE DATA');
	assert.strictEqual(CMD_NAMES['43'], 'SEND DATA');
	assert.strictEqual(CMD_NAMES['44'], 'GET CHANNEL STATUS');
});

test('cmdQualifierShort decodes TIMER MANAGEMENT actions', () => {
	assert.strictEqual(cmdQualifierShort('27', 0x00), 'Start');
	assert.strictEqual(cmdQualifierShort('27', 0x01), 'Deactivate');
	assert.strictEqual(cmdQualifierShort('27', 0x02), 'Get');
});

test('cmdQualifierShort decodes OPEN CHANNEL qualifier flags', () => {
	assert.strictEqual(cmdQualifierShort('40', 0x00), 'OnDemand');
	assert.strictEqual(cmdQualifierShort('40', 0x01), 'Immediate');
	assert.strictEqual(cmdQualifierShort('40', 0x03), 'Immediate+AutoReconn');
	assert.strictEqual(cmdQualifierShort('40', 0x05), 'Background');
	assert.strictEqual(cmdQualifierShort('40', 0x0C), 'Background+DNS');
});

test('cmdQualifierShort returns empty for unknown types', () => {
	assert.strictEqual(cmdQualifierShort('99', 0x01), '');
});

test('EVENT_NAMES follows the pinned CAT spec and names the 3GPP events', () => {
	assert.strictEqual(EVENT_NAMES[0x0B], 'Access technology change (single access technology)');
	assert.strictEqual(EVENT_NAMES[0x14], 'Access technology change (multiple access technologies)');
	assert.strictEqual(EVENT_NAMES[0x19], 'Profile container');
	assert.strictEqual(EVENT_NAMES[0x1C], 'Poll interval negotiation');
	for (const [v, name] of [[0x11, '(I-)WLAN access status'], [0x12, 'Network rejection'],
		[0x15, 'CSG cell selection'], [0x17, 'IMS registration'], [0x18, 'Incoming IMS data'],
		[0x1D, 'Data connection status change'], [0x1E, 'CAG cell selection'],
		[0x1F, 'Slices status change'], [0x20, 'Reserved (future usage)']]) {
		assert.strictEqual(EVENT_NAMES[v], name, '0x' + v.toString(16));
	}
	// the "Reserved for 3GPP" spec cross-reference is never user-facing
	for (const [v, name] of Object.entries(EVENT_NAMES)) {
		assert.ok(!name.includes('Reserved for 3GPP'), v + ': ' + name);
	}
});

test('the poll interval negotiation event builds a Duration TLV', () => {
	const build = EVENT_FORMS[0x1C].build;
	assert.strictEqual(build({ unit: '1', interval: '45' }), '0402012D');
	assert.strictEqual(build({ unit: '0', interval: '2' }), '04020002');
	assert.strictEqual(build({ unit: '2', interval: '5' }), '04020205');
	assert.strictEqual(build({ unit: '1', interval: '' }), '0402011E');   // default 30 s
});

test('channel status event builds the B8 channel status TLV', () => {
	const build = EVENT_FORMS[0x0A].build;
	assert.strictEqual(EVENT_FORMS[0x0A].note, undefined);
	assert.strictEqual(build({ channel: '2', state: '128', info: '5' }), 'B8028205');
	assert.strictEqual(build({ channel: '1', state: '0', info: '0' }), 'B8020100');
	assert.strictEqual(build({ channel: '0', state: '64', info: '0' }), 'B8024000');
});

test('the data connection status change event builds the 7.5.25 object set', () => {
	const build = EVENT_FORMS[0x1D].build;
	assert.strictEqual(EVENT_FORMS[0x1D].note, undefined);
	// the four mandatory objects; every conditional object omitted
	assert.strictEqual(build({ status: '0', type: '0', ti: '00', loc_status: '0' }),
		'9D0100AA01001C01009B0100');
	// full form: cause, location information, access technology, APN, type
	assert.strictEqual(
		build({ status: '1', type: '2', cause: '26', ti: '85', mcc: '250', mnc: '01',
			lac: '00FF', cell: '0001', tech: '8', loc_status: '1', apn: 'internet', pdp_type: '3' }),
		'9D0101AA0102AE011A1C0185130752F01000FF0001BF01089B0101C708696E7465726E65740B0103');
	// an empty TI falls back to 00; the location defaults fill missing fields
	assert.strictEqual(build({ status: '2', type: '1', ti: '', mcc: '250', loc_status: '2' }),
		'9D0102AA01011C0100130752F010000000019B0102');
});

test('the access technology options follow the pinned 8.61 coding', () => {
	const opts = EVENT_FORMS[0x0B].fields[0].opts;
	assert.deepStrictEqual(opts.map(o => o.v), [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12]);
	assert.strictEqual(opts[1].l, 'TIA/EIA-553-A');
	assert.strictEqual(opts[2].l, 'TIA/EIA-136-270');
	assert.strictEqual(opts[10].l, 'NG-RAN');
	assert.strictEqual(opts[12].l, 'Satellite E-UTRAN');
});

test('eventDateTimeTlv builds the 8.39 date-time object', () => {
	const d = o => ({
		getFullYear: () => o.year, getMonth: () => o.month - 1, getDate: () => o.day,
		getHours: () => o.hour, getMinutes: () => o.min, getSeconds: () => o.sec,
		getTimezoneOffset: () => o.tzMin,
	});
	// UTC+3, 2026-09-30 21:55:00 -> swapped BCD + 12 quarters
	assert.strictEqual(
		eventDateTimeTlv(d({ year: 2026, month: 9, day: 30, hour: 21, min: 55, sec: 0, tzMin: -180 })),
		'260762900312550021');
	// UTC-2:30 -> 10 quarters with the sign bit (bit 3 of the first semi-octet)
	assert.strictEqual(
		eventDateTimeTlv(d({ year: 2026, month: 1, day: 5, hour: 8, min: 7, sec: 9, tzMin: 150 })),
		'260762105080709009');
});

test('the data connection event can carry the current date-time', () => {
	const build = EVENT_FORMS[0x1D].build;
	assert.match(build({ status: '0', type: '0', ti: '00', loc_status: '0', datetime: 'now' }),
		/^9D0100AA01001C01002607[0-9A-F]{14}9B0100$/);
	// left out by default
	assert.strictEqual(build({ status: '0', type: '0', ti: '00', loc_status: '0' }),
		'9D0100AA01001C01009B0100');
});

test('encBcdDigits and eventAddressTlv build the EFADN number coding', () => {
	assert.strictEqual(encBcdDigits('12345'), '2143F5');
	assert.strictEqual(encBcdDigits('79001234567'), '9700214365F7');
	// international number -> TON/NPI 0x91, length = 1 + 6 bytes
	assert.strictEqual(eventAddressTlv('79001234567', '1'), '8607919700214365F7');
	assert.strictEqual(eventAddressTlv('', '1'), '');
});

test('the call events build their 31.111 object sets', () => {
	// MT call: source network, TI + Address + Subaddress + IMS URI + Media Type
	assert.strictEqual(EVENT_FORMS[0x00].src, '83');
	assert.strictEqual(EVENT_FORMS[0x00].build({ ti: '85', number: '79001234567', ton: '1',
		sub: '12', ims_uri: 'sip:a@b', media: '1' }),
		'1C01858607919700214365F7880112B1077369703A614062FE0101');
	// call connected: source is the form's field, TI + optional Media Type
	assert.strictEqual(EVENT_FORMS[0x01].srcField, 'src');
	assert.strictEqual(EVENT_FORMS[0x01].build({ ti: '00', media: '0' }), '1C0100FE0100');
	assert.strictEqual(EVENT_FORMS[0x01].build({ ti: '00', media: '' }), '1C0100');
	// call disconnected: radio link timeout = zero-length cause, custom = bytes
	assert.strictEqual(EVENT_FORMS[0x02].build({ ti: '00', cause_mode: 'rlt', media: '' }), '1C01009A00');
	assert.strictEqual(EVENT_FORMS[0x02].build({ ti: '00', cause_mode: 'custom', cause: '10', media: '' }), '1C01009A0110');
});

test('the browser, WLAN and CSG events build their object sets', () => {
	assert.strictEqual(EVENT_FORMS[0x08].build({ cause: '1' }), 'B40101');
	assert.strictEqual(EVENT_FORMS[0x11].build({ status: '2' }), 'CB0102');
	// CSG: source network, access tech + status/mechanism + ID + name + PLMN
	assert.strictEqual(EVENT_FORMS[0x15].src, '83');
	assert.strictEqual(EVENT_FORMS[0x15].build({ status: '1', mech: 'manual', tech: '8',
		csg: '00000001', hnb: 'MyCSG', mcc: '250', mnc: '01' }),
		'BF0108D5020141D60400000001D7054D79435347890352F010');
});

test('every event type has a parameter form now', () => {
	assert.ok(!html.includes("note: 'not_yet'"), 'no event may stay unimplemented');
});

test('the data/display/search/frames events build their object sets', () => {
	// Data available: Channel status (B8) + Channel data length (B7)
	assert.strictEqual(EVENT_FORMS[0x09].build({ channel: '2', state: '128', info: '0', len: 'FF' }),
		'B8028200B701FF');
	// Display parameters: rows/cols + sizing/fonts/effects bytes
	assert.strictEqual(EVENT_FORMS[0x0C].build({ rows: '4', cols: '16', sizing: '1', fonts: '0', effects: '00' }),
		'C003841000');
	assert.strictEqual(EVENT_FORMS[0x0E].build({ mode: '1' }), 'E50101');
	assert.strictEqual(EVENT_FORMS[0x0F].build({ status: '12' }), 'E40112');
	assert.strictEqual(EVENT_FORMS[0x0F].build({ status: '' }), 'E40100');
	assert.strictEqual(EVENT_FORMS[0x10].build({ frame: '01', list: '0410' }), 'E703010410');
});

test('the IMS, CAG and slices events build their object sets', () => {
	// IMS registration: source network, IMPU list (80-tagged URIs) + status code
	assert.strictEqual(EVENT_FORMS[0x17].src, '83');
	assert.strictEqual(EVENT_FORMS[0x17].build({ impu: 'sip:a@b', code: '200' }),
		'F70980077369703A614062F803323030');
	assert.strictEqual(EVENT_FORMS[0x18].src, '83');
	assert.strictEqual(EVENT_FORMS[0x18].build({ iari: 'a' }), 'F70161');
	// CAG cell selection: tech + status/mechanism + information list
	assert.strictEqual(EVENT_FORMS[0x1E].src, '83');
	assert.strictEqual(EVENT_FORMS[0x1E].build({ status: '1', mech: 'manual', tech: '8', list: '00000001' }),
		'BF0108D5020141D60400000001');
	// Slices status change: tech + status + served S-NSSAIs (count + 4 bytes each)
	assert.strictEqual(EVENT_FORMS[0x1F].src, '83');
	assert.strictEqual(EVENT_FORMS[0x1F].build({ status: '1', tech: '8', served: '01020304' }),
		'BF0108D50101D6050101020304');
});