import { EventEmitter } from 'events';
import { createLogger } from '../common/logger';
import { HamokConnection } from './HamokConnection';
import * as Collections from '../common/Collections';
import { HamokRecordSnapshot } from '../HamokSnapshot';
import { HamokCodec } from '../common/HamokCodec';

const logger = createLogger('HamokMap');
const UPDATE_IF_RESPONSE_KEY = 'update-if-response-key';

export type HamokRecordObject = Record<string, unknown>;

type InsertRemovePayload<T, K extends keyof T> = {
	key: K;
	value: T[K];
}

type UpdatePayload<T, K extends keyof T> = {
	key: K;
	oldValue: T[K];
	newValue: T[K];
}

export type HamokRecordEventMap<T> = {
	'insert': [InsertRemovePayload<T, keyof T>],
	'update': [UpdatePayload<T, keyof T>],
	'remove': [InsertRemovePayload<T, keyof T>],
	'clear': [],
	'close': [],
}

export declare interface HamokRecord<T extends HamokRecordObject> {
	on<U extends keyof HamokRecordEventMap<T>>(event: U, listener: (...args: HamokRecordEventMap<T>[U]) => void): this;
	off<U extends keyof HamokRecordEventMap<T>>(event: U, listener: (...args: HamokRecordEventMap<T>[U]) => void): this;
	once<U extends keyof HamokRecordEventMap<T>>(event: U, listener: (...args: HamokRecordEventMap<T>[U]) => void): this;
	emit<U extends keyof HamokRecordEventMap<T>>(event: U, ...args: HamokRecordEventMap<T>[U]): boolean;
}

/**
 * Replicated storage replicates all entries on all distributed storages
 */
// eslint-disable-next-line @typescript-eslint/no-unsafe-declaration-merging
export class HamokRecord<T extends HamokRecordObject> extends EventEmitter {
	private _payloadsCodec?: Map<keyof T, HamokCodec<T[keyof T], string>>;
	private _closed = false;
	public equalValues: <K extends keyof T>(a: T[K], b: T[K]) => boolean;
	private _object: Partial<T>;
	private _initializing?: Promise<this>;

	public constructor(
		public readonly connection: HamokConnection<string, string>, 
		setup?: {
			equalValues?: <K extends keyof T>(a: T[K], b: T[K]) => boolean,
			payloadsCodec?: Map<keyof T, HamokCodec<T[keyof T], string>>,
			initalObject?: Partial<T>,
		}
		
	) {
		super();
		this.setMaxListeners(Infinity);
		
		this.equalValues = setup?.equalValues ?? ((a, b) => JSON.stringify(a) === JSON.stringify(b));
		this._object = {} as T;
		this._payloadsCodec = setup?.payloadsCodec;

		this.connection
			.on('ClearEntriesRequest', (request) => {
				this._object = {} as T;
					
				if (request.sourceEndpointId === this.connection.grid.localPeerId) {
					this.connection.respond(
						'ClearEntriesResponse', 
						request.createResponse(), 
						request.sourceEndpointId
					);
				}
					
				this.emit('clear');
			})
			.on('DeleteEntriesRequest', (request) => {
				const removedEntries = new Map<string, string>();

				for (const key of request.keys) {
					const value = this._object[key];

					if (value === undefined) continue;

					delete this._object[key];
					this.emit('remove', {
						key,
						value,
					});
					const encodedValue = this._encodeValue(key, value);

					removedEntries.set(key, encodedValue);
				}

				if (request.sourceEndpointId === this.connection.grid.localPeerId) {

					this.connection.respond(
						'DeleteEntriesResponse', 
						request.createResponse(
							new Set(removedEntries.keys())
						), 
						request.sourceEndpointId
					);
				}
			})
			.on('InsertEntriesRequest', (request) => {
				const existingEntries = new Map<string, string>();

				for (const [ key, encodedValue ] of request.entries) {
					const value = this._object[key];

					if (value !== undefined) {
						existingEntries.set(key, this._encodeValue(key, value));
						continue;
					}

					const decodedValue = this._decodeValue(key, encodedValue);

					this._object[key as keyof T] = decodedValue;
					
					this.emit('insert', {
						key,
						value: decodedValue,
					});
				}

				if (request.sourceEndpointId === this.connection.grid.localPeerId) {

					this.connection.respond(
						'InsertEntriesResponse',
						request.createResponse(existingEntries),
						request.sourceEndpointId
					);
				}
			})
			.on('UpdateEntriesRequest', (request) => {
				if (!request.prevValue) return; // the other listener will handle this
				const updatedEntries: [keyof T, T[keyof T], T[keyof T]][] = [];
				const insertedEntries: [keyof T, T[keyof T]][] = [];
				const prevValue = JSON.parse(request.prevValue);

				logger.warn('UpdateEntriesRequest prevValue %o, prevValue: %o', [ ...request.entries ].map(([ k, v ]) => `key: ${k}, value: ${v}`).join(', '), prevValue);

				// check
				let ok = true;

				for (const [ key, value ] of Object.entries(prevValue)) {
					logger.warn('UpdateEntriesRequest prevValue %o, checking equality between: %s === %s', key, value, this._object[key as keyof T]);
					// eslint-disable-next-line @typescript-eslint/no-explicit-any
					if (this.equalValues(this._object[key] as any, value as any)) continue;
					ok = false;
					break;
				}
				logger.warn('Apply update %o', [ ...request.entries ].map(([ k, v ]) => `key: ${k}, value: ${v}`).join(', '));
				if (!ok) {
					// respond false
					if (request.sourceEndpointId === this.connection.grid.localPeerId) {
						// some special response because this is used in updateIf
	
						this.connection.respond(
							'UpdateEntriesResponse',
							request.createResponse(Collections.mapOf([ UPDATE_IF_RESPONSE_KEY, 'false' ])),
							request.sourceEndpointId
						);
					}
					
					return;
				}
				for (const [ key, encodedValue ] of request.entries) {
					const newValue = this._decodeValue(key, encodedValue);
					const existingValue = this._object[key];
					
					this._object[key as keyof T] = newValue;
					if (existingValue) updatedEntries.push([ key, existingValue, newValue ]);
					else insertedEntries.push([ key, newValue ]);
					
				}
				if (request.sourceEndpointId === this.connection.grid.localPeerId) {
					// some special response because this is used in updateIf

					this.connection.respond(
						'UpdateEntriesResponse',
						request.createResponse(Collections.mapOf([ UPDATE_IF_RESPONSE_KEY, 'true' ])),
						request.sourceEndpointId
					);
				}
				insertedEntries.forEach(([ key, value ]) => this.emit('insert', { key, value }));
				updatedEntries.forEach(([ key, oldValue, newValue ]) => this.emit('update', { key, oldValue, newValue }));
			})
			.on('UpdateEntriesRequest', (request) => {
				if (request.prevValue) return;

				const updatedEntries: [keyof T, T[keyof T], T[keyof T]][] = [];
				const insertedEntries: [keyof T, T[keyof T]][] = [];

				for (const [ key, encodedValue ] of request.entries) {
					const existingValue = this._object[key];
					const decodedNewValue = this._decodeValue(key, encodedValue);
					
					if (existingValue === undefined) {
						insertedEntries.push([ key, this._decodeValue(key, encodedValue) ]);
					} else {
						updatedEntries.push([ key, existingValue, decodedNewValue ]);
					}

					this._object[key as keyof T] = decodedNewValue;
				}
				if (request.sourceEndpointId === this.connection.grid.localPeerId) {
					this.connection.respond(
						'UpdateEntriesResponse',
						request.createResponse(new Map<string, string>(
							updatedEntries.map(([ key, oldValue ]) => [ key as string, this._encodeValue(key, oldValue) ]))
						),
						request.sourceEndpointId
					);
				}
				insertedEntries.forEach(([ key, value ]) => this.emit('insert', { key, value }));
				updatedEntries.forEach(([ key, oldValue, newValue ]) => this.emit('update', { key, oldValue, newValue }));
			})
			.on('StorageHelloNotification', (notification) => {
				// every storage needs to respond with its snapshot and the highest applied index they have
				try {
					const snapshot = this.export();
					const serializedSnapshot = JSON.stringify(snapshot);
	
					this.connection.notifyStorageState(
						serializedSnapshot,
						this.connection.highestSeenCommitIndex,
						notification.sourceEndpointId, 
					);
				} catch (err) {
					logger.error('Failed to send snapshot', err);
				}
			})
			.on('remote-snapshot', (serializedSnapshot, done) => {
				try {
					const snapshot = JSON.parse(serializedSnapshot) as HamokRecordSnapshot;

					this._import(
						snapshot, 
						// emit events if we are not initializing
						Boolean(this._initializing) === false,
					);
				} catch (err) {
					logger.error(`Failed to import to record ${this.id}. Error: ${err}`);
				} finally {
					done();
				}
			})
			.once('close', () => this.close())
		;

		this._initializing = new Promise((resolve) => setTimeout(resolve, 20))
			.then(() => this.connection.join())
			.then(async () => {
				if (setup?.initalObject === undefined) return this;
				const initalObject = setup.initalObject;

				logger.debug('%s Initializing record %d', this.connection.localPeerId, this.id);
				const entries = new Map<string, string>();

				for (const [ key, value ] of Object.entries(initalObject)) {
					const encodedValue = this._encodeValue(key as keyof T, value as T[keyof T]);

					entries.set(key, encodedValue);
				}
				await this.connection.requestInsertEntries(entries).then(() => void 0);

				logger.debug('%s Initialization for record %d is complete', this.connection.localPeerId, this.id);

				return this;
			})
			.catch((err) => {
				logger.error('Failed to initialize record %s %o', this.id, err);

				return this;
			})
			.finally(() => {
				this._initializing = undefined;
			});
	}

	public get id(): string {
		return this.connection.config.storageId;
	}

	public get ready(): Promise<this> {
		return this._initializing ?? this.connection.grid.waitUntilCommitHead().then(() => this);
	}

	public get closed() {
		return this._closed;
	}

	public get instance(): T {
		return {
			...this._object
		} as T;
	}

	public close(): void {
		if (this._closed) return;
		this._closed = true;

		this.connection.close();
		
		this.emit('close');
		this.removeAllListeners();
	}

	public async clear(): Promise<void> {
		if (this._closed) throw new Error(`Cannot clear a closed storage (${this.id})`);
		
		await this._initializing;

		return this.connection.requestClearEntries();
	}
	
	public get<K extends keyof T>(key: K): T[K] | undefined {
		const result = this._object[key];

		if (result === undefined) return;

		return Object.freeze(result) as T[K];
	}

	public async set<K extends keyof T>(key: K, value: T[K]): Promise<T[K] | undefined> {
		if (this._closed) throw new Error(`Cannot set an entry on a closed storage (${this.id})`);

		await this._initializing;

		const entries = new Map<string, string>([
			[ key as string, this._encodeValue(key, value) ]
		]);

		const respondedValue = (await this.connection.requestUpdateEntries(entries)).get(key as string);

		if (!respondedValue) return;

		return this._decodeValue(key as string, respondedValue) as T[K];
	}

	// public async addToList<K extends keyof T, V extends T[K] extends ArrayLike<unknown> ? T[K][number] : never>(key: K, item: V): Promise<void> {
	// 	key;
	// 	item;
	// 	await this.ready;
	// }

	// public async removeFromList<K extends keyof T, V extends T[K] extends ArrayLike<unknown> ? T[K][number] : never>(key: K, item: V): Promise<void> {
	// 	key;
	// 	item;
	// 	await this.ready;
	// }

	// public async changeNumBy<K extends keyof T, V extends T[K] & number>(key: K, byValue: V): Promise<void> {
	// 	key;
	// 	byValue;
	// 	await this.ready;
	// }

	public async insert<K extends keyof T>(key: K, value: T[K]): Promise<T[K] | undefined> {
		if (this._closed) throw new Error(`Cannot set an entry on a closed storage (${this.id})`);

		await this._initializing;

		const entries = new Map<string, string>([
			[ key as string, this._encodeValue(key, value) ]
		]);

		const respondedValue = (await this.connection.requestInsertEntries(entries)).get(key as string);

		if (!respondedValue) return;

		return this._decodeValue(key as string, respondedValue) as T[K];
	}

	public async insertInstance(instance: Partial<T>): Promise<Partial<T> | undefined> {
		if (this._closed) throw new Error(`Cannot set an entry on a closed storage (${this.id})`);

		await this._initializing;

		const entries = new Map<string, string>();

		for (const [ key, value ] of Object.entries(instance)) {
			entries.set(key, this._encodeValue(key as keyof T, value as T[keyof T]));
		}

		const respondedValue = (await this.connection.requestInsertEntries(entries));

		if (!respondedValue || respondedValue.size < 1) return;

		const respondedInstance: Partial<T> = {};

		for (const [ key, value ] of Object.entries(respondedValue)) {
			respondedInstance[key as keyof T] = this._decodeValue(key, value);
		}

		return respondedInstance;
	}

	public async updateIf<K extends keyof T>(key: K, value: T[K], oldValue: T[K]): Promise<boolean> {
		if (this._closed) throw new Error(`Cannot update an entry on a closed storage (${this.id})`);

		await this._initializing;

		logger.trace('%s UpdateIf: %s, %s, %s', this.connection.grid.localPeerId, key, value, oldValue);
		const newValue: Partial<T> = {};
		const prevValue: Partial<T> = {};

		newValue[key] = value;
		prevValue[key] = oldValue;
		
		return this.updateInstanceIf(newValue, prevValue);
	}

	public async updateInstanceIf(newValue: Partial<T>, oldValue: Partial<T>): Promise<boolean> {
		if (this._closed) throw new Error(`Cannot update an entry on a closed storage (${this.id})`);

		await this._initializing;

		const entries = new Map<string, string>();

		for (const [ key, value ] of Object.entries(newValue)) {
			entries.set(key, this._encodeValue(key as keyof T, value as T[keyof T]));
		}

		logger.trace('%s UpdateIf: %s, %s, %s', this.connection.grid.localPeerId, [ ...entries ].map(([ k, v ]) => `key: ${k}, value: ${v}`).join(','), oldValue);
		
		return (await this.connection.requestUpdateEntries(
			entries,
			undefined,
			JSON.stringify(oldValue)
		)).get(UPDATE_IF_RESPONSE_KEY) === 'true';
	}
    
	public async delete<K extends keyof T>(key: K): Promise<boolean> {
		return (await this.connection.requestDeleteEntries(
			Collections.setOf(key as string)
		)).has(key as string);
	}
    
	/**
	 * Exports the storage data
	 */
	public export(): HamokRecordSnapshot {
		if (this._closed) {
			throw new Error(`Cannot export data on a closed storage (${this.id})`);
		}
		const entries = new Map<string, string>();

		for (const [ key, value ] of Object.entries(this._object)) {
			const encodedValue = this._encodeValue(key as keyof T, value as T[keyof T]);

			entries.set(key, encodedValue);
		}
		const [ keys, values ] = this.connection.codec.encodeEntries(entries);
		const result: HamokRecordSnapshot = {
			recordId: this.id,
			keys,
			values
		};

		return result;
	}

	public import(data: HamokRecordSnapshot, eventing?: boolean) {
		if (data.recordId !== this.id) {
			throw new Error(`Cannot import data from a different storage: ${data.recordId} !== ${this.id}`);
		} else if (this.connection.connected) {
			throw new Error('Cannot import data while connected');
		} else if (this._closed) {
			throw new Error(`Cannot import data on a closed storage (${this.id})`);
		}

		this._import(data, eventing);
	}

	private _import(snapshot: HamokRecordSnapshot, eventing?: boolean) {
		const entries = this.connection.codec.decodeEntries(snapshot.keys, snapshot.values);

		try {
			for (const [ key, encodedValue ] of entries) {
				const newValue = this._decodeValue(key, encodedValue);
				const oldValue = this._object[key as keyof T];
	
				this._object[key as keyof T] = newValue;
				if (oldValue !== undefined) eventing && this.emit('update', { 
					key: key as keyof T, 
					oldValue: oldValue as T[keyof T], 
					newValue: newValue as T[keyof T], 
				});
				else eventing && this.emit('insert', {
					key,
					value: newValue,
				});
			}
		} catch (err) {
			logger.error(`Failed to import to record ${this.id}. Error: ${err}`);
		}
		
	}

	private _encodeValue<K extends keyof T>(key: K, value: T[K]): string {
		return this._payloadsCodec?.get(key)?.encode(value) ?? JSON.stringify(value);
	}

	private _decodeValue(key: string, value: string): T[keyof T] {
		return this._payloadsCodec?.get(key as keyof T) ?? JSON.parse(value);
	}
}