//
// Created by MightyPork on 2017/08/20.
//
// Handle OSC commands (Operating System Command)
// ESC ] Ps ; Pt ST
//
// Those are used to pass various text variables to the terminal:
//
// Ps = 0 or 2 ... set screen title to Pt
// Ps = 81-85  ... set button label to Pt
//

#include "apars_osc.h"
#include "apars_logging.h"
#include "screen.h"
#include "ansi_parser.h"
#include "cgi_sockets.h"

/**
 * Handle ESPTerm-specific command
 *
 * @param n0 - top-level, 20-39
 * @param n1 - sub-command
 * @param buffer - buffer past the second command and its semicolon
 */
void ICACHE_FLASH_ATTR
handle_espterm_osc(int n0, int n1, char *buffer)
{
	if (n0 == 27) {
		// Miscellaneous
		if (n1 == 1) {
			screen_set_backdrop(buffer);
		}
		else if (n1 == 2) {
			screen_set_button_count(atoi(buffer));
		}
		else goto bad;
	}
	else if (n0 == 28) {
		// Button label
		screen_set_button_text(n1, buffer);
	}
	else if (n0 == 29) {
		// Button message
		screen_set_button_message(n1, buffer);
	}
	else if (n0 == 30) {
		// Button color
		screen_set_button_color(n1, buffer);
	}
	else goto bad;
	return;

bad:
	ansi_warn("No ESPTerm option at %d.%d", n0, n1);
}

/**
 * Helper function to parse incoming OSC (Operating System Control)
 * @param buffer - the OSC body (after OSC and before ST)
 */
void ICACHE_FLASH_ATTR
apars_handle_osc(char *buffer)
{
	const char *origbuf = buffer;
	int n = 0;
	char c;
	while ((c = *buffer++) != 0) {
		if (c >= '0' && c <= '9') {
			n = (n * 10 + (c - '0'));
		} else {
			break;
		}
	}

	if (c == ';') {
		// Do something with the data string and number
		// (based on xterm manpage)
		if (n == 0 || n == 2) {
			// Window title (or "icon name" in Xterm)
			screen_set_title(buffer);
		}
		else if (n == 4) {
			// XXX setting RGB color, ignore
		}
		else if (n == 9) {
			// iTerm2-style "growl" notifications
			buffer--;
			buffer[0] = 'G';
			notify_growl(buffer);
		}
		else if (n >= 20 && n < 40) {
			// New-style ESPTerm OSC
			int n0 = n;

			// Find sub-command
			n = 0;
			while ((c = *buffer++) != 0) {
				if (c >= '0' && c <= '9') {
					n = (n * 10 + (c - '0'));
				} else {
					break;
				}
			}
			if (c == ';') {
				handle_espterm_osc(n0, n, buffer);
			} else {
				ansi_warn("BAD OSC: %s", origbuf);
			}
		}
		else if (n == 70) {
			// ESPTerm: backdrop
			ansi_warn("OSC 70 is deprecated, use 27;1");
			screen_set_backdrop(buffer);
		}
		else if (n >= 81 && n <= 85) {
			// ESPTerm: action button label
			ansi_warn("OSC 8x is deprecated, use 28;x");
			screen_set_button_text(n - 80, buffer);
		}
		else if (n >= 91 && n <= 95) {
			// ESPTerm: action button message
			ansi_warn("OSC 9x is deprecated, use 29;x");
			screen_set_button_message(n - 90, buffer);
		}
		else {
			ansi_noimpl("OSC %d ; %s ST", n, buffer);
		}
	}
	else {
		ansi_warn("BAD OSC: %s", origbuf);
		apars_show_context();
	}
}