// This file is part of the CircuitPython project: https://circuitpython.org
//
// SPDX-FileCopyrightText: Copyright (c) 2022 Scott Shawcroft for Adafruit Industries
//
// SPDX-License-Identifier: MIT

#include "shared-module/usb/utf16le.h"

typedef struct {
    const uint16_t *buf;
    size_t len;
} utf16_str;

static uint32_t utf16str_peek_unit(utf16_str *utf) {
    if (!utf->len) {
        return 0;
    }
    return *utf->buf;
}

static uint32_t utf16str_next_unit(utf16_str *utf) {
    uint32_t result = utf16str_peek_unit(utf);
    if (utf->len) {
        utf->len--;
        utf->buf++;
    }
    return result;
}
static uint32_t utf16str_next_codepoint(utf16_str *utf) {
    uint32_t unichr = utf16str_next_unit(utf);
    if (unichr >= 0xd800 && unichr < 0xdc00) {
        uint32_t low_surrogate = utf16str_peek_unit(utf);
        if (low_surrogate >= 0xdc00 && low_surrogate < 0xe000) {
            (void)utf16str_next_unit(utf);
            unichr = (unichr - 0xd800) * 0x400 + low_surrogate - 0xdc00 + 0x10000;
        }
    }
    return unichr;
}

static void _convert_utf16le_to_utf8(vstr_t *vstr, utf16_str *utf) {
    while (utf->len) {
        vstr_add_char(vstr, utf16str_next_codepoint(utf));
    }
}

mp_obj_t utf16le_to_string(const uint16_t *buf, size_t utf16_len) {
    // will grow if necessary, but will never grow for an all-ASCII descriptor
    vstr_t vstr;
    vstr_init(&vstr, utf16_len);
    utf16_str utf = {buf, utf16_len};
    _convert_utf16le_to_utf8(&vstr, &utf);
    return mp_obj_new_str_from_vstr(&vstr);
}