Function xs_serial_constructor

modules/io/serial/zephyr/serial.c:209–278

};

void xs_serial_constructor(xsMachine *the)
{
	modSerial serial = NULL;
	uint32_t baud;
	const struct modZephyrSerial *port = NULL;
	uint8_t format;

	xsmcVars(1);

	xsmcGet(xsVar(0), xsArg(0), xsID_port);
	port = modZephyrGetSerial(xsmcToString(xsVar(0)));
	if (!port)
		xsUnknownError("invalid port");
	if (!device_is_ready(port->device))
		xsUnknownError("uart not ready");

	xsmcGet(xsVar(0), xsArg(0), xsID_baud);
	baud = xsmcToInteger(xsVar(0));
	if ((baud <= 0) || (baud > 20000000))
		xsRangeError("invalid baud");

	builtinInitializeTarget(the);

	format = builtinInitializeFormat(the, kIOFormatBuffer);
	if ((kIOFormatBuffer != format) && (kIOFormatNumber != format))
		xsUnknownError("unsupported format");

	struct uart_config uart_cfg = {
		.baudrate = baud,
		.parity = UART_CFG_PARITY_NONE,
		.stop_bits = UART_CFG_STOP_BITS_1,
		.data_bits = UART_CFG_DATA_BITS_8,
		.flow_ctrl = UART_CFG_FLOW_CTRL_NONE,
	};

	if (uart_configure(port->device, &uart_cfg) < 0)
		xsUnknownError("UART configure failed");

	serial = c_calloc(1, sizeof(modSerialRecord));
	if (!serial)
		xsUnknownError("no memory");

	xsmcSetHostData(xsThis, serial);
	xsSetHostHooks(xsThis, &xsSerialHooks);

	serial->the = the;
	serial->obj = xsThis;
	serial->device = port->device;
	serial->format = format;
	serial->useCount = 1;

	ring_buf_init(&serial->rxRingBuffer, MODDEF_SERIAL_RX_BUFSIZE, serial->rxBuffer);
	ring_buf_init(&serial->txRingBuffer, MODDEF_SERIAL_TX_BUFSIZE, serial->txBuffer);

	uart_irq_callback_user_data_set(serial->device, serial_uart_isr, serial);

	uart_irq_rx_enable(serial->device);