import Logger from '@joplin/utils/Logger';
import shim, { FetchOptions } from './shim';
// eslint-disable-next-line @typescript-eslint/no-explicit-any -- xml2js options and parsed result are both heterogeneous (caller decides tag normalisation; output mirrors XML structure)
const parseXmlString: (xml: string, options: any, callback: (error: Error | null, result: any)=> void)=> void = require('xml2js').parseString;
import JoplinError from './JoplinError';
// eslint-disable-next-line @typescript-eslint/no-explicit-any -- url-parse returns a Url object structurally; we use it as a constructor with property access
const URL: any = require('url-parse');
import { _ } from './locale';
import { rtrimSlashes, ltrimSlashes } from './path-utils';
const base64 = require('base-64');

// Note that the d: namespace (the DAV namespace) is specific to Nextcloud. The RFC for example uses "D:" however
// we make all the tags and attributes lowercase so we handle both the Nextcloud style and RFC. Hopefully other
// implementations use the same namespaces. If not, extra processing can be done in `nameProcessor`, for
// example to convert a custom namespace to "d:" so that it can be used by the rest of the code.
// In general, we should only deal with things in "d:", which is the standard DAV namespace.

interface WebDavApiOptions {
	baseUrl(): string;
	username(): string;
	password(): string;
	ignoreTlsErrors?(): boolean;
}

interface LoggedRequest {
	timestamp: number;
	request: string;
	response: string;
}

interface RequestInfo {
	url: string;
	options: FetchOptions & { headers?: Record<string, string>; method?: string; body?: string };
}

interface ExecOptions {
	responseFormat?: 'json' | 'text';
	target?: 'string' | 'file';
	source?: 'file';
	path?: string;
}

// detection state, whether invalid If-None-Match header is accepted by server
enum ExcludeIfNoneMatch {
	Unknown = 1,
	No = 2,
	Yes = 3,
}

// eslint-disable-next-line @typescript-eslint/no-explicit-any -- Heterogeneous WebDAV XML→JSON values returned by xml2js (objects, arrays of objects, strings); each accessor narrows from this base
type JsonValue = any;

class WebDavApi {
	private logger_: Logger;
	private options_: WebDavApiOptions;
	private lastRequests_: LoggedRequest[];
	private excludeIfNoneMatch: ExcludeIfNoneMatch;

	public constructor(options: WebDavApiOptions) {
		this.logger_ = new Logger();
		this.options_ = options;
		this.lastRequests_ = [];
		this.excludeIfNoneMatch = ExcludeIfNoneMatch.Unknown;
		// Prevent unused method warning - this method is kept for debugging
		void this._requestToCurl;
	}

	private logRequest_(request: RequestInfo, responseText: string) {
		if (this.lastRequests_.length > 10) this.lastRequests_.splice(0, 1);

		const serializeRequest = (r: RequestInfo): string => {
			const options: Record<string, unknown> = { ...r.options };
			if (typeof options.body === 'string') options.body = (options.body as string).substr(0, 4096);
			const output: string[] = [];
			output.push(typeof options.method === 'string' ? options.method : 'GET');
			output.push(r.url);
			const headers: Record<string, string> = { ...(options.headers as Record<string, string> | undefined) };
			if (headers['Authorization']) headers['Authorization'] = '********';
			options.headers = headers;
			delete options.method;
			delete options.agent;
			output.push(JSON.stringify(options));
			return output.join(' ');
		};

		this.lastRequests_.push({
			timestamp: Date.now(),
			request: serializeRequest(request),
			response: responseText ? responseText.substr(0, 4096) : '',
		});
	}

	public lastRequests() {
		return this.lastRequests_;
	}

	public clearLastRequests() {
		this.lastRequests_ = [];
	}

	public setLogger(l: Logger) {
		this.logger_ = l;
	}

	public logger() {
		return this.logger_;
	}

	private authToken(): string | null {
		if (!this.options_.username() || !this.options_.password()) return null;
		try {
			// Note: Non-ASCII passwords will throw an error about Latin1 characters - https://github.com/laurent22/joplin/issues/246
			// Tried various things like the below, but it didn't work on React Native:
			// return base64.encode(utf8.encode(this.options_.username() + ':' + this.options_.password()));
			return base64.encode(`${this.options_.username()}:${this.options_.password()}`);
		} catch (error) {
			(error as Error).message = `Cannot encode username/password: ${(error as Error).message}`;
			throw error;
		}
	}

	public baseUrl(): string {
		return rtrimSlashes(this.options_.baseUrl());
	}

	public relativeBaseUrl(): string {
		const url = new URL(this.baseUrl());
		return url.pathname + url.query;
	}

	public async xmlToJson(xml: string): Promise<JsonValue> {
		const davNamespaces: string[] = []; // Yes, there can be more than one... xmlns:a="DAV:" xmlns:D="DAV:"

		const nameProcessor = (name: string): string => {
			if (name.indexOf('xmlns') !== 0) {
				// Check if the current name is within the DAV namespace. If it is, normalise it
				// by moving it to the "d:" namespace, which is what all the functions are using.
				const p = name.split(':');
				if (p.length === 2) {
					const ns = p[0];
					if (davNamespaces.indexOf(ns) >= 0) {
						name = `d:${p[1]}`;
					}
				} else if (p.length === 1 && davNamespaces.indexOf('') >= 0) {
					// Also handle the case where the namespace alias is empty.
					// https://github.com/laurent22/joplin/issues/2002
					name = `d:${name}`;
				}
			}

			return name.toLowerCase();
		};

		const attrValueProcessor = (value: string, name: string): string => {
			// The namespace is usually specified like so: xmlns:D="DAV:" ("D" being the alias used in the tag names)
			// In some cases, the namespace can also be empty like so: "xmlns=DAV". In this case, the tags will have
			// no namespace so instead of <d:prop> will have just <prop>. This is handled above in nameProcessor()
			if (value.toLowerCase() === 'dav:') {
				const p = name.split(':');
				davNamespaces.push(p.length === 2 ? p[p.length - 1] : '');
			}
			return value;
		};

		const options = {
			tagNameProcessors: [nameProcessor],
			attrNameProcessors: [nameProcessor],
			attrValueProcessors: [attrValueProcessor],
		};

		return new Promise((resolve) => {
			parseXmlString(xml, options, (error, result) => {
				if (error) {
					resolve(null); // Error handled by caller which will display the XML text (or plain text) if null is returned from this function
					return;
				}
				resolve(result);
			});
		});
	}

	private valueFromJson(json: JsonValue, keys: (string | number)[], type: 'string' | 'object' | 'array'): JsonValue {
		let output = json;

		for (let i = 0; i < keys.length; i++) {
			const key = keys[i];

			// console.info(key, typeof key, typeof output, typeof output === 'object' && (key in output), Array.isArray(output));

			if (typeof key === 'number' && !Array.isArray(output)) return null;
			if (typeof key === 'string' && (typeof output !== 'object' || !(key in output))) return null;
			output = output[key];
		}

		if (type === 'string') {
			// If the XML has not attribute the value is directly a string
			// If the XML node has attributes, the value is under "_".
			// Eg for this XML, the string will be under {"_":"Thu, 01 Feb 2018 17:24:05 GMT"}:
			// <a:getlastmodified b:dt="dateTime.rfc1123">Thu, 01 Feb 2018 17:24:05 GMT</a:getlastmodified>
			// For this XML, the value will be "Thu, 01 Feb 2018 17:24:05 GMT"
			// <a:getlastmodified>Thu, 01 Feb 2018 17:24:05 GMT</a:getlastmodified>

			if (typeof output === 'object' && '_' in output) output = output['_'];
			if (typeof output !== 'string') return null;
			return output;
		}

		if (type === 'object') {
			if (!Array.isArray(output) && typeof output === 'object') return output;
			return null;
		}

		if (type === 'array') {
			return Array.isArray(output) ? output : null;
		}

		return null;
	}

	public stringFromJson(json: JsonValue, keys: (string | number)[]): string | null {
		return this.valueFromJson(json, keys, 'string');
	}

	public objectFromJson(json: JsonValue, keys: (string | number)[]): JsonValue {
		return this.valueFromJson(json, keys, 'object');
	}

	public arrayFromJson(json: JsonValue, keys: (string | number)[]): JsonValue[] | null {
		return this.valueFromJson(json, keys, 'array');
	}

	public resourcePropByName(resource: JsonValue, outputType: 'string' | 'array', propName: string): JsonValue {
		const propStats = resource['d:propstat'];
		let output = null;
		if (!Array.isArray(propStats)) throw new Error('Missing d:propstat property');
		for (let i = 0; i < propStats.length; i++) {
			const props = propStats[i]['d:prop'];
			if (!Array.isArray(props) || !props.length) continue;
			const prop = props[0];
			if (Array.isArray(prop[propName])) {
				output = prop[propName];
				break;
			}
		}

		if (outputType === 'string') {
			if (!output) throw new JoplinError(`String property not found: ${propName}: ${JSON.stringify(resource)}`, 'stringNotFound');

			// If the XML has not attribute the value is directly a string
			// If the XML node has attributes, the value is under "_".
			// Eg for this XML, the string will be under {"_":"Thu, 01 Feb 2018 17:24:05 GMT"}:
			// <a:getlastmodified b:dt="dateTime.rfc1123">Thu, 01 Feb 2018 17:24:05 GMT</a:getlastmodified>
			// For this XML, the value will be "Thu, 01 Feb 2018 17:24:05 GMT"
			// <a:getlastmodified>Thu, 01 Feb 2018 17:24:05 GMT</a:getlastmodified>

			output = output[0];

			if (typeof output === 'object' && '_' in output) output = output['_'];
			if (typeof output !== 'string') return null;
			return output;
		}

		if (outputType === 'array') {
			return output;
		}

		throw new Error(`Invalid output type: ${outputType}`);
	}

	public async execPropFind(path: string, depth: number, fields: string[] | null = null, options: ExecOptions | null = null): Promise<JsonValue> {
		if (fields === null) fields = ['d:getlastmodified'];

		let fieldsXml = '';
		for (let i = 0; i < fields.length; i++) {
			fieldsXml += `<${fields[i]}/>`;
		}

		// To find all available properties:
		//
		// const body=`<?xml version="1.0" encoding="utf-8" ?>
		// 	<propfind xmlns="DAV:">
		// 	<propname/>
		// </propfind>`;

		const body =
			`<?xml version="1.0" encoding="UTF-8"?>
			<d:propfind xmlns:d="DAV:">
				<d:prop xmlns:oc="http://owncloud.org/ns">
					${fieldsXml}
				</d:prop>
			</d:propfind>`;

		return this.exec('PROPFIND', path, body, { Depth: depth }, options);
	}

	// Used for debugging - can be uncommented in exec() to log curl commands
	private _requestToCurl(url: string, options: { method?: string; headers?: Record<string, string>; body?: string }): string {
		const output: string[] = [];
		output.push('curl');
		output.push('-v');
		if (options.method) output.push(`-X ${options.method}`);
		if (options.headers) {
			for (const n in options.headers) {
				if (!options.headers.hasOwnProperty(n)) continue;
				output.push(`${'-H ' + '"'}${n}: ${options.headers[n]}"`);
			}
		}
		if (options.body) output.push(`${'--data ' + '\''}${options.body}'`);
		output.push(url);

		return output.join(' ');
	}

	private handleNginxHack_(jsonResponse: JsonValue, newErrorHandler: (message: string, code: number)=> JoplinError) {
		// Trying to fix 404 error issue with Nginx WebDAV server.
		// https://github.com/laurent22/joplin/issues/624
		// https://github.com/laurent22/joplin/issues/808
		// Not tested but someone confirmed it worked - https://github.com/laurent22/joplin/issues/808#issuecomment-443552858
		// and fix is narrowly scoped so shouldn't affect anything outside this particular edge case.
		//
		// The issue is that instead of an HTTP 404 status code, Nginx returns 200 but with this response:
		//
		// <?xml version="1.0" encoding="utf-8" ?>
		// <D:multistatus xmlns:D="DAV:">
		// 	<D:response>
		// 		<D:href>/notes/ecd4027a5271483984b00317433e2c66.md</D:href>
		// 		<D:propstat>
		// 			<D:prop/>
		// 			<D:status>HTTP/1.1 404 Not Found</D:status>
		// 		</D:propstat>
		// 	</D:response>
		// </D:multistatus>
		//
		// So we need to parse this and find that it is in fact a 404 error.
		//
		// HOWEVER, some implementations also return 404 for missing props, for example SeaFile:
		// (indicates that the props "getlastmodified" is not present, but this call is only
		// used when checking the conf, so we don't really need it)
		// https://github.com/laurent22/joplin/issues/1137
		//
		// <?xml version='1.0' encoding='UTF-8'?>
		// <ns0:multistatus xmlns:ns0="DAV:">
		// 	<ns0:response>
		// 		<ns0:href>/seafdav/joplin/</ns0:href>
		// 		<ns0:propstat>
		// 			<ns0:prop>
		// 				<ns0:getlastmodified/>
		// 			</ns0:prop>
		// 			<ns0:status>HTTP/1.1 404 Not Found</ns0:status>
		// 		</ns0:propstat>
		// 		<ns0:propstat>
		// 			<ns0:prop>
		// 				<ns0:resourcetype>
		// 					<ns0:collection/>
		// 				</ns0:resourcetype>
		// 			</ns0:prop>
		// 			<ns0:status>HTTP/1.1 200 OK</ns0:status>
		// 		</ns0:propstat>
		// 	</ns0:response>
		// </ns0:multistatus>
		//
		// As a simple fix for now it's enough to check if ALL the statuses are 404 - in that case
		// it really means that the file doesn't exist. Otherwise we can proceed as usual.
		const responseArray = this.arrayFromJson(jsonResponse, ['d:multistatus', 'd:response']);
		if (responseArray && responseArray.length === 1) {
			const propStats = this.arrayFromJson(jsonResponse, ['d:multistatus', 'd:response', 0, 'd:propstat']);
			if (!propStats || !propStats.length) return;
			let count404 = 0;
			for (let i = 0; i < propStats.length; i++) {
				const status = this.arrayFromJson(jsonResponse, ['d:multistatus', 'd:response', 0, 'd:propstat', i, 'd:status']);
				if (status && status.length && (status[0] as string).indexOf('404') >= 0) count404++;
			}

			if (count404 === propStats.length) throw newErrorHandler('Not found', 404);
		}
	}

	private async fetchWithIfNoneMatchTest(url: string, fetchOptions: FetchOptions): Promise<Response> {
		let response: Response = null;

		if (['GET', 'HEAD'].indexOf(fetchOptions.method) < 0 && this.excludeIfNoneMatch === ExcludeIfNoneMatch.Unknown) {
			// some webserver, for example Apache Tomcat and Koofr do not accept invalid If-None-Match header,
			// which is being sent to resolve issue with Seafile and network library on iOS
			// to fix this issue, a request is sent with invalid If-None-Match header at first
			//
			// if it succeeds, excludeIfNoneMatch  flag is set to No, to indicate,
			// that  subsequent request will be sent with If-None-Match header
			//
			// if first request with invalid If-None-Match header fails, it's retried without the header
			// if successful, excludeIfNoneMatch is set to Yes, to indicate,
			// that subsequent request will be sent without If-None-Match header
			response = await shim.fetch(url, fetchOptions);
			// These are known error codes used for servers which reject when the If-None-Match header is sent. As these
			// particular error codes are terminal, there should not be a risk of an intermittent failure selecting the
			// wrong mode for the lifetime of the app.
			//
			// 405 is excluded for MKCOL because per RFC 4918 that is the normal response when the collection already
			// exists, and has nothing to do with If-None-Match. Treating it as a rejection made the retry succeed for
			// the wrong reason and permanently disabled the header, which broke sync on servers that need it.
			const terminalRejectionCodes = fetchOptions.method === 'MKCOL' ? [400] : [400, 405];
			if (response.ok) {
				this.excludeIfNoneMatch = ExcludeIfNoneMatch.No;
			} else if (terminalRejectionCodes.includes(response.status)) {
				const fetchOptionsAlt = { ... fetchOptions };
				fetchOptionsAlt.headers = { ... fetchOptions.headers };
				delete fetchOptionsAlt.headers['If-None-Match'];
				const responseAlt = await shim.fetch(url, fetchOptionsAlt);
				if (responseAlt.ok) {
					this.excludeIfNoneMatch = ExcludeIfNoneMatch.Yes;
					return responseAlt;
				} else if (terminalRejectionCodes.includes(responseAlt.status)) {
					this.excludeIfNoneMatch = ExcludeIfNoneMatch.No;
				}
			}
		} else {
			response = await shim.fetch(url, fetchOptions);
		}
		return response;
	}


	// curl -u admin:123456 'http://nextcloud.local/remote.php/dav/files/admin/' -X PROPFIND --data '<?xml version="1.0" encoding="UTF-8"?>
	//  <d:propfind xmlns:d="DAV:">
	//    <d:prop xmlns:oc="http://owncloud.org/ns">
	//      <d:getlastmodified/>
	//    </d:prop>
	//  </d:propfind>'

	public async exec(method: string, path = '', body: string | null = null, headers: Record<string, string | number> | null = null, options: ExecOptions | null = null): Promise<JsonValue> {
		headers = { ...headers };
		options = { ...options };

		if (!options.responseFormat) options.responseFormat = 'json';
		if (!options.target) options.target = 'string';

		const authToken = this.authToken();

		if (authToken) headers['Authorization'] = `Basic ${authToken}`;

		// That should not be needed, but it is required for React Native 0.63+
		// https://github.com/facebook/react-native/issues/30176
		if (!headers['Content-Type']) {
			if (method === 'PROPFIND') headers['Content-Type'] = 'text/xml';
			if (method === 'PUT') headers['Content-Type'] = 'application/octet-stream';
		}

		// React-native has caching enabled by at least on Android (see https://github.com/laurent22/joplin/issues/4706 and the related PR).
		// The below header disables caching for all versions, including desktop.
		// This can potentially also help with misconfigured caching on WebDAV server.
		if (!headers['Cache-Control']) {
			headers['Cache-Control'] = 'no-store';
		}

		// On iOS, the network lib appends a If-None-Match header to PROPFIND calls, which is kind of correct because
		// the call is idempotent and thus could be cached. According to RFC-7232 though only GET and HEAD should have
		// this header for caching purposes. It makes no mention of PROPFIND.
		// So possibly because of this, Seafile (and maybe other WebDAV implementations) responds with a "412 Precondition Failed"
		// error when this header is present for PROPFIND call on existing resources. This is also kind of correct because there is a resource
		// with this eTag and since this is neither a GET nor HEAD call, it is supposed to respond with 412 if the resource is present.
		// The "solution", an ugly one, is to send a purposely invalid string as eTag, which will bypass the If-None-Match check  - Seafile
		// finds out that no resource has this ID and simply sends the requested data.
		// Also add a random value to make sure the eTag is unique for each call.
		if (['GET', 'HEAD'].indexOf(method) < 0 && this.excludeIfNoneMatch !== ExcludeIfNoneMatch.Yes) {
			headers['If-None-Match'] = `JoplinIgnore-${Math.floor(Math.random() * 100000)}`;
		}
		if (!headers['User-Agent']) headers['User-Agent'] = 'Joplin/1.0';

		// eslint-disable-next-line @typescript-eslint/no-explicit-any -- Mixed flow into shim.fetch/uploadBlob/fetchBlob (FetchOptions) and platform-specific fields (credentials/agent/path/ignoreTlsErrors); narrowing forces per-branch typing
		const fetchOptions: any = {};
		fetchOptions.headers = headers;
		fetchOptions.method = method;
		if (options.path) fetchOptions.path = options.path;
		if (body) fetchOptions.body = body;
		fetchOptions.ignoreTlsErrors = this.options_.ignoreTlsErrors ? this.options_.ignoreTlsErrors() : false;
		if (shim.mobilePlatform() === 'android') {
			// Using credentials = 'omit' prevents authentication cookies from
			// being stored. React Native has issues related to cookie authentication:
			// https://github.com/facebook/react-native/issues/23185
			//
			// Auth tokens are passed through the "Authorization" header, so
			// these cookies should not be necessary.
			fetchOptions.credentials = 'omit';
		}
		const url = `${this.baseUrl()}/${ltrimSlashes(path)}`;

		// eslint-disable-next-line @typescript-eslint/no-explicit-any -- shim.fetch/uploadBlob/fetchBlob return slightly different response shapes (node-fetch vs blob); narrowing forces per-branch typing
		let response: any = null;

		// console.info('WebDAV Call', `${method} ${url}`, headers, options);
		// console.info(this.requestToCurl_(url, fetchOptions));

		if (options.source === 'file' && (method === 'POST' || method === 'PUT')) {
			if (fetchOptions.path) {
				const fileStat = await shim.fsDriver().stat(fetchOptions.path);
				if (fileStat) fetchOptions.headers['Content-Length'] = `${fileStat.size}`;
			}
			response = await shim.uploadBlob(url, fetchOptions);
		} else if (options.target === 'string') {
			if (typeof body === 'string') fetchOptions.headers['Content-Length'] = `${shim.stringByteLength(body)}`;
			response = await this.fetchWithIfNoneMatchTest(url, fetchOptions);
		} else {
			// file
			response = await shim.fetchBlob(url, fetchOptions);
		}

		const responseText = await response.text();

		this.logRequest_({ url: url, options: fetchOptions }, responseText);

		// console.info('WebDAV Response', responseText);

		// Creates an error object with as much data as possible as it will appear in the log, which will make debugging easier
		const newError = (message: string, code = 0): JoplinError => {
			// Gives a shorter response for error messages. Useful for cases where a full HTML page is accidentally loaded instead of
			// JSON. That way the error message will still show there's a problem but without filling up the log or screen.
			const shortResponseText = (`${responseText}`).substr(0, 1024);
			return new JoplinError(`${method} ${path}: ${message} (${code}): ${shortResponseText}`, code);
		};

		let responseJson_: JsonValue = null;
		const loadResponseJson = async (): Promise<JsonValue> => {
			if (!responseText) return null;
			if (responseJson_) return responseJson_;
			// eslint-disable-next-line require-atomic-updates
			responseJson_ = await this.xmlToJson(responseText);
			if (!responseJson_) throw newError('Cannot parse XML response', response.status);
			return responseJson_;
		};

		if (!response.ok) {
			// When using fetchBlob we only get a string (not xml or json) back
			if (options.target === 'file') throw newError('fetchBlob error', response.status);

			let json = null;
			try {
				json = await loadResponseJson();
			} catch (error) {
				// Just send back the plain text in newErro()
			}

			if (json && json['d:error']) {
				const code = json['d:error']['s:exception'] ? json['d:error']['s:exception'].join(' ') : response.status;
				const message = json['d:error']['s:message'] ? json['d:error']['s:message'].join('\n') : 'Unknown error 1';
				throw newError(`${message} (Exception ${code})`, response.status);
			}

			let message = 'Unknown error 2';
			if (response.status === 401 || response.status === 403) {
				// No auth token means an empty username or password
				if (!authToken) {
					message = _('Access denied: Please re-enter your password and/or username');
				} else {
					message = _('Access denied: Please check your username and password');
				}
			}

			throw newError(message, response.status);
		}

		if (options.responseFormat === 'text') return responseText;

		// The following methods may have a response depending on the server but it's not
		// standard (some return a plain string, other XML, etc.) and we don't check the
		// response anyway since we rely on the HTTP status code so return null.
		if (['MKCOL', 'DELETE', 'PUT', 'MOVE'].indexOf(method) >= 0) return null;

		const output = await loadResponseJson();
		if (output) this.handleNginxHack_(output, newError);

		// Check that we didn't get for example an HTML page (as an error) instead of the JSON response
		// null responses are possible, for example for DELETE calls
		if (output !== null && typeof output === 'object' && !('d:multistatus' in output)) throw newError('Not a valid WebDAV response');

		return output;
	}
}

export default WebDavApi;