pico_cart.py

from utils import *
from media_utils import Surface, PixelFormat
from pico_defs import *
from pico_compress import compress_code, uncompress_code, get_compressed_size, print_size
import hashlib, base64

class CartFormat(Enum):
    """An enum representing the supported cart formats"""
    auto = p8 = png = lua = rom = tiny_rom = clip = url = code = js = pod = bin = label = spritesheet = ...

    @property
    def is_input(m):
        return m != m.bin
    @property
    def is_output(m):
        return m != m.auto
    @property
    def is_ext(m):
        return m not in (m.auto, m.tiny_rom, m.code, m.label, m.spritesheet)
    @property
    def is_src(m):
        return m in (m.p8, m.lua, m.code)
    @property
    def is_export(m):
        return m in (m.js, m.pod, m.bin)
    @property
    def is_exposed(m):
        return m != m.code
    
    @classproperty
    def default_src(m):
        return m.p8
    @classproperty
    def default_dir(m):
        return None # since m.bin is output-only

class Cart:
    """A pico8 cart, including its code (as a p8str), rom (as a Memory), and more"""

    def __init__(m, code="", rom=None, label=None, path="", name=""):
        m.version_id = get_default_pico8_version()
        m.version_tuple = get_version_tuple(m.version_id)
        m.platform = get_default_platform()
        m.rom = rom.copy() if rom else mem_create_rom()
        m.path = path
        m.name = name if name else path_basename(path) if path else ""
        m.code = code
        m.code_map = ()
        m.code_rom = None
        m.label = label
        m.meta = defaultdict(list)

    def copy(m):
        return deepcopy(m)

    @property
    def title(m):
        """Returns the cart's title, as a p8str"""
        title_meta = m.meta.get("title")
        if title_meta is None:
            title = ""
            for line in m.code.split("\n", 2)[:2]: # (splitlines isn't appropriate for p8str)
                match = re.fullmatch(r"-- ?(.*)", line)
                if match:
                    title += match.group(1)
                title += "\n"
            return title.rstrip("\n")
        else:
            return "\n".join(to_p8str(line) for line in title_meta)

    @title.setter
    def title(m, value):
        """Sets the cart's title, from a p8str"""
        m.meta["title"] = from_p8str(value).splitlines()
    
    def set_raw_title(m, title_lines):
        m.meta["title"] = title_lines

    def set_code_without_title(m, code):
        old_title = m.title
        m.code = code
        if old_title != m.title:
            m.title = old_title

    def set_version(m, id):
        m.version_id = id
        m.version_tuple = get_version_tuple(id)

def read_code_from_rom(r, keep_compression=False, **opts):
    code_rom = None
    if keep_compression:
        start_pos = r.pos()
        code_rom = Memory(k_code_size)
        code_rom.set_block(0, r.bytes(k_code_size, allow_eof=True))
        r.setpos(start_pos)

    return uncompress_code(r, **opts), code_rom

def read_cart_from_rom(buffer, path=None, allow_tiny=False, **opts):
    cart = Cart(path=path)
    
    with BinaryReader(BytesIO(buffer), big_end = True) as r:
        if r.len() < k_cart_size and allow_tiny: # tiny rom, code only
            cart.code, cart.code_rom = read_code_from_rom(r, **opts)
        
        else:
            cart.rom.replace(r.bytes(k_rom_size))
            cart.code, cart.code_rom = read_code_from_rom(r, **opts)

            r.setpos(k_cart_size)
            if r.pos() < r.len():
                cart.version_id = r.u8()
                version = r.u8(), r.u8(), r.u8()
                cart.platform = chr(r.u8())
                cart.version_tuple = (*version, r.u8())
                hash = r.bytes(20)

                if hash != bytes(20) and hash != hashlib.sha1(buffer[:k_cart_size]).digest():
                    throw("corrupted cart (wrong hash)")

    return cart

def write_cart_to_rom(cart, with_trailer=False, keep_compression=False, **opts):
    io = BytesIO(bytes(k_cart_size + (k_trailer_size if with_trailer else 0)))

    with BinaryWriter(io, big_end = True) as w:
        w.bytes(cart.rom)

        if keep_compression and cart.code_rom != None:
            w.bytes(cart.code_rom)
        else:
            compress_code(w, cart.code, **opts)

        if with_trailer:
            w.setpos(k_cart_size)
            w.u8(cart.version_id)
            w.u8(cart.version_tuple[0])
            w.u8(cart.version_tuple[1])
            w.u8(cart.version_tuple[2])
            w.u8(ord(cart.platform))
            w.u8(cart.version_tuple[3])
            w.bytes(hashlib.sha1(io.getvalue()[:k_cart_size]).digest())

        return io.getvalue()

def write_cart_to_tiny_rom(cart, force_compress=False, keep_compression=False, **opts):
    io = BytesIO()

    with BinaryWriter(io, big_end = True) as w:
        if keep_compression and cart.code_rom != None:
            with BinaryReader(BytesIO(cart.code_rom), big_end = True) as code_r:
                compressed_size = get_compressed_size(code_r)
            
            w.bytes(cart.code_rom.get_block(0, compressed_size))
        else:
            compress_code(w, cart.code, force_compress=True, **opts)

            if len(io.getvalue()) > len(cart.code):
                io = BytesIO(encode_p8str(cart.code))

        return io.getvalue()

k_cart_image_size = Point(160, 205)
k_label_size = Point(128, 128)
k_label_offset = Point(16, 24)
k_title_offset = Point(18, 167)
k_title_spacing = Point(0, 2)
k_title_size = Point(31 * 4, 16)

k_palette_rgb_6bpp_map = {(c.r & ~3, c.g & ~3, c.b & ~3): i for i, c in enumerate(k_palette)}
k_png_header = b"\x89PNG\r\n\x1a\n"

def load_image_of_size(f, valid_size, format=PixelFormat.rgba8):
    r = BinaryReader(f)
    if r.bytes(8) != k_png_header:
        throw("Not a valid png")
    r.subpos(8)

    image = Surface.load(f, format)
    if image.size != valid_size:
        throw("Png has wrong size")

    return image

def surface_pixels_to_screenshot(pixels, offset=Point.zero):
    screenshot = MultidimArray(k_label_size, 0)

    for y in range(k_label_size.y):
        for x in range(k_label_size.x):
            r, g, b, a = pixels[Point(x, y) + offset]
            screenshot[x, y] = k_palette_rgb_6bpp_map.get((r & ~3, g & ~3, b & ~3), 0)

    return screenshot

def read_cart_from_image(data, **opts):
    image = load_image_of_size(BytesIO(data), k_cart_image_size)
    width, height = image.size

    data = bytearray()
    pixels = image.pixels

    for y in range(height):
        for x in range(width):
            r, g, b, a = pixels[x, y]
            byte = ((b & 3) << 0) | ((g & 3) << 2) | ((r & 3) << 4) | ((a & 3) << 6)
            data.append(byte)

    cart = read_cart_from_rom(data, **opts)
    cart.label = surface_pixels_to_screenshot(pixels, k_label_offset)
    return cart

def get_res_path():
    return path_dirname(path_resolve(__file__))

def draw_text_on_image(image, text, offset, size, spacing=Point.zero):
    with file_open(path_join(get_res_path(), "font.png")) as font_f:
        font_surf = Surface.load(font_f)
        x, y = 0, 0
        for ch in text:
            chi = ord(ch)
            chrect = Rect(chi % 16 * 8, chi // 16 * 6, 8 if chi >= 0x80 else 4, 6)
            new_x = x + chrect.w + spacing.x
            if ch == '\n':
                new_x -= x
                x = 0
                y += chrect.h + spacing.y
                if y >= size.y:
                    break
                else:
                    continue
            if new_x <= size.x:
                image.draw(font_surf, offset + Point(x, y), chrect)
            x = new_x

def create_screenshot_surface(screenshot, transparent=False):
    screenshot_surf = Surface.create(*k_label_size)
    screenshot_pixels = screenshot_surf.pixels
    for y in range(k_label_size.y):
        for x in range(k_label_size.x):
            i = screenshot[x, y]
            color = k_palette[i]
            if transparent and i == 0:
                color = color.set_a(0)
            screenshot_pixels[x, y] = color
    return screenshot_surf

def write_cart_to_image(cart, template_image=None, template_only=False, **opts):
    output = write_cart_to_rom(cart, with_trailer=True, **opts)

    if not template_image:
        template_image = path_join(get_res_path(), "template.png")

    with file_open(template_image) as template_f:
        image = load_image_of_size(template_f, k_cart_image_size)
        width, height = image.size

        if not template_only:
            if cart.label:
                label_surf = create_screenshot_surface(cart.label, transparent=True)
                image.draw(label_surf, k_label_offset)
            if cart.title:
                draw_text_on_image(image, cart.title, k_title_offset, k_title_size, k_title_spacing)
        
        pixels = image.pixels

        for y in range(height):
            for x in range(width):
                i = x + y * width
                byte = output[i]
                r, g, b, a = pixels[x,y]
                b = (b & ~3) | (byte & 3)
                g = (g & ~3) | ((byte >> 2) & 3)
                r = (r & ~3) | ((byte >> 4) & 3)
                a = (a & ~3) | ((byte >> 6) & 3)
                pixels[x, y] = (r, g, b, a)

        return image.save()

def read_cart_label(data, path=None, **_):
    image = load_image_of_size(BytesIO(data), k_label_size)
    label = surface_pixels_to_screenshot(image.pixels)

    return Cart(path=path, label=label)

def read_cart_spritesheet(data, path=None, **_):
    image = load_image_of_size(BytesIO(data), k_label_size)
    spritesheet = surface_pixels_to_screenshot(image.pixels)

    cart = Cart(path=path)
    for y in range(128):
        for x in range(128):
            cart.rom.set4(mem_sprite_addr(x, y), spritesheet[x, y] & 0xf)
    return cart

def write_cart_label(cart, **_):
    label = cart.label or MultidimArray(k_label_size, 0)
    return create_screenshot_surface(label, transparent=True).save()

def write_cart_spritesheet(cart, **_):
    spritesheet = MultidimArray(k_label_size, 0)    
    for y in range(128):
        for x in range(128):
            spritesheet[x, y] = cart.rom.get4(mem_sprite_addr(x, y))

    return create_screenshot_surface(spritesheet).save()

k_p8_prefix = "pico-8 cartridge"
k_meta_prefix = "meta:"

def read_cart_from_source(data, path=None, raw=False, preprocessor=None, **_):
    cart = Cart(path=path)
    
    def nybbles(line):
        for b in line:
            yield int(b, 16)
    
    def nybble_groups(line, n):
        for i in range(0, len(line), n):
            yield nybbles(line[i:i+n].ljust(n, "0"))
    
    def bytes(line):
        for i in range(0, len(line), 2):
            yield int(line[i:i+2].ljust(2, "0"), 16)
    
    def ext_nybbles(line):
        for b in line:
            if 'v' >= b.lower() >= 'g':
                yield ord(b.lower()) - ord('g') + 16
            else:
                yield int(b, 16)
      
    if not raw and not data.startswith(k_p8_prefix) and not data.startswith("__lua__"): # fallback to raw
        raw = True
    
    header = "lua" if raw else None
    code = []
    code_line = 0
    y = 0
    for line_i, line in enumerate(data.splitlines()): # splitlines eats a trailing empty line, like pico8 does
        try:
            clean = line.strip()
            
            if line.startswith("__") and clean.endswith("__") and not raw: # may end with whitespace
                header = clean[2:-2]
                y = 0
                
            elif header == "lua":
                if y == 0:
                    code_line = line_i
                else:
                    code.append("\n")
                code.append(to_p8str(line))
                y += 1
                
            elif header == "gfx" and clean and y < 0x80:
                x = 0
                for b in nybbles(clean):
                    if x < 0x80:
                        cart.rom.set4(mem_sprite_addr(x, y), b)
                        x += 1
                y += 1
                    
            elif header == "map" and clean and y < 0x40: # usually 0x20
                x = 0
                for b in bytes(clean):
                    if x < 0x80:
                        cart.rom.set8(mem_map_addr(x, y), b)
                        x += 1
                y += 1
                    
            elif header == "gff" and clean and y < 2:
                x = 0
                for b in bytes(clean):
                    if x < 0x80:
                        cart.rom.set8(mem_flag_addr(x, y), b)
                        x += 1
                y += 1
                
            elif header == "sfx" and clean and y < 0x40:
                x = 0
                for b in bytes(clean[:8]):
                    cart.rom.set8(mem_sfx_info_addr(y, x), b)
                    x += 1
                x = 0
                for bph, bpl, bw, bv, be in nybble_groups(clean[8:], 5):
                    if x < 0x20:
                        value = bpl | ((bph & 0x3) << 4) | ((bw & 0x7) << 6) | ((bv & 0x7) << 9) | ((be & 0x7) << 12) | ((bw & 0x8) << 12) 
                        cart.rom.set16(mem_sfx_addr(y, x), value)
                        x += 1
                y += 1
                
            elif header == "music" and clean and y < 0x40:
                x = 0
                flags = next(bytes(clean[:2]))
                for b in bytes(clean[3:]):
                    if x < 4:
                        value = b | (((flags >> x) & 1) << 7) 
                        cart.rom.set8(mem_music_addr(y, x), value)
                        x += 1
                y += 1

            elif header == "label" and clean and y < 0x80:
                if cart.label is None:
                    cart.label = MultidimArray(k_label_size, 0)
                x = 0
                for b in ext_nybbles(clean):
                    if x < 0x80:
                        cart.label[x, y] = b
                        x += 1
                y += 1

            elif header and header.startswith(k_meta_prefix):
                cart.meta[header[len(k_meta_prefix):]].append(line.rstrip('\n'))
                
            elif header == None and clean.startswith("version "):
                cart.set_version(int(clean.split()[1]))

        except Exception as e:
            throw(f"Invalid {header} line in p8 file (line #{line_i + 1})")
            
    cart.code, cart.code_map = preprocess_code(path, "".join(code), code_line, preprocessor=preprocessor)
    return cart

def write_cart_to_source(cart, unicode_caps=False, sections=None, **_):
    lines = [k_p8_prefix + " // http://www.pico-8.com"]
    lines.append(f"version {cart.version_id}")
    defrom = mem_create_rom()

    def include(section):
        return sections is None or section in sections

    def nybbles(data):
        return "".join('%01x' % b for b in data)
    
    def nybble_groups(data):
        return "".join([nybbles(group) for group in data])
    
    def bytes(data):
        return "".join('%02x' % b for b in data)

    def ext_nybbles(data):
        return "".join(('%01x' % b if b < 16 else chr(b - 16 + ord('g'))) for b in data)

    def get_needed_lines(max_lines, addr_func, size):
        lines = max_lines
        for y in reversed(range(max_lines)):
            if cart.rom.cmpeqwith8(addr_func(y), size, defrom):
                lines -= 1
            else:
                break
        return lines

    if include("lua"):
        lines.append("__lua__")
        lines.append(from_p8str(cart.code, unicaps=unicode_caps))

    if include("gfx"):
        gfx_lines = get_needed_lines(0x80, lambda y: mem_sprite_addr(0, y)[0], 0x40)
        if gfx_lines:
            lines.append("__gfx__")
            for y in range(gfx_lines):
                lines.append(nybbles(cart.rom.get4(mem_sprite_addr(x, y)) for x in range(128)))

    if include("map"):
        map_lines = get_needed_lines(0x20, lambda y: mem_map_addr(0, y), 0x80)
        if map_lines:
            lines.append("__map__")
            for y in range(map_lines):
                lines.append(bytes(cart.rom.get8(mem_map_addr(x, y)) for x in range(128)))

    if include("gff"):
        gff_lines = get_needed_lines(2, lambda y: mem_flag_addr(0, y), 0x80)
        if gff_lines:
            lines.append("__gff__")
            for y in range(gff_lines):
                lines.append(bytes(cart.rom.get8(mem_flag_addr(x, y)) for x in range(128)))

    if include("sfx"):
        sfx_lines = get_needed_lines(0x40, lambda y: mem_sfx_addr(y, 0), 0x44)
        if sfx_lines:
            lines.append("__sfx__")
            for y in range(sfx_lines):
                info = bytes(cart.rom.get8(mem_sfx_info_addr(y, x)) for x in range(4))
                notes = (cart.rom.get16(mem_sfx_addr(y, x)) for x in range(32))
                note_groups = nybble_groups(((n >> 4) & 0x3, n & 0xf, ((n >> 6) & 0x7) | (n >> 12) & 0x8, (n >> 9) & 0x7, (n >> 12) & 0x7) for n in notes)
                lines.append(info + note_groups)

    if include("music"):
        music_lines = get_needed_lines(0x40, lambda y: mem_music_addr(y, 0), 0x4)
        if music_lines:
            lines.append("__music__")
            for y in range(music_lines):
                chans = [cart.rom.get8(mem_music_addr(y, x)) for x in range(4)]
                flags = bytes((sum(((ch >> 7) & 1) << i for i, ch in enumerate(chans)),))
                ids = bytes(ch & 0x7f for ch in chans)
                lines.append(flags + " " + ids)
    
    if include("label") and cart.label and any(cart.label.array):
        lines.append("__label__")
        for y in range(128):
            lines.append(ext_nybbles(cart.label[x, y] for x in range(128)))
    
    for meta, metalines in cart.meta.items():
        if include(k_meta_prefix + meta):
            lines.append(f"__{k_meta_prefix + meta}__")
            lines += metalines

    return "\n".join(lines) + "\n"

def write_cart_to_raw_source(cart, with_header=False, unicode_caps=False, **_):
    source = from_p8str(cart.code, unicaps=unicode_caps)
    if with_header:
        source = "__lua__\n" + source
    return source

def iter_rect(width, height):
    for y in range(height):
        for x in range(width):
            yield x, y

k_base64_chars = string.ascii_uppercase + string.ascii_lowercase + string.digits + "_-"
k_base64_alt_chars = k_base64_chars[62:].encode()
k_base64_char_map = {ch: i for i, ch in enumerate(k_base64_chars)}

def print_url_size(size, **kwargs):
    print_size("url", size - k_url_prefix_size, k_url_size, **kwargs)

def read_cart_from_url(url, size_handler=None, **opts):
    if size_handler:
        print_url_size(len(url), prefix="input", handler=size_handler)

    if "?" not in url:
        throw("Invalid url - no '?'")

    code, gfx = None, None
    
    url_params = url.split("?", 1)[1]
    for url_param in url_params.split("&"):
        if "=" not in url_param:
            throw(f"Invalid url param: {url_param}")
        
        key, value = url_param.split("=", 1)
        if key == "c":
            code = value
        elif key == "g":
            gfx = value
        else:
            throw(f"Unknown url param: {key}")

    cart = Cart()

    if code:
        codebuf = base64.b64decode(code, k_base64_alt_chars, validate=True).ljust(k_code_size, b'\0')
        with BinaryReader(BytesIO(codebuf), big_end = True) as r:
            cart.code, cart.code_rom = read_code_from_rom(r, **opts)

    if gfx:
        i = 0
        rect = iter_rect(128, 128)
        while i < len(gfx):
            val = k_base64_char_map[gfx[i]]
            i += 1

            color = val & 0xf
            count = (val >> 4) + 1
            if count == 4:
                count += k_base64_char_map[gfx[i]]
                i += 1

            for _ in range(count):
                x, y = next(rect)
                cart.rom.set4(mem_sprite_addr(x, y), color)

    return cart

k_url_prefix = "https://www.pico-8-edu.com"

def write_cart_to_url(cart, url_prefix=k_url_prefix, force_compress=False, size_handler=None, **opts):
    raw_code = write_cart_to_tiny_rom(cart, **opts)        
    code = base64.b64encode(raw_code, k_base64_alt_chars)

    rect = iter_rect(128, 128)
    gfx = []
    x, y = next(rect)
    done = False
    while not done:
        color = cart.rom.get4(mem_sprite_addr(x, y))
        total_count = 1
        for x, y in rect:
            next_color = cart.rom.get4(mem_sprite_addr(x, y))
            if next_color == color:
                total_count += 1
            else:
                break
        else:
            done = True
            if color == 0:
                total_count = 0

        while total_count > 0:
            count = min(total_count, 63 + 4)
            total_count -= count

            val = (min(count - 1, 3) << 4) | color
            gfx.append(k_base64_chars[val])

            if count >= 4:
                gfx.append(k_base64_chars[count - 4])

    url = url_prefix
    url += "/?c=" + code.decode()
    if gfx:
        url += "&g=" + "".join(gfx)
    
    if size_handler:
        print_url_size(len(url), handler=size_handler)
        
    check(len(url) - k_url_prefix_size <= k_url_size, "url has too many characters!")
    return url

k_clip_prefix = "[cart]"
k_clip_suffix = "[/cart]"

def read_raw_from_clip(clip):
    if clip.startswith(k_clip_prefix) and clip.endswith(k_clip_suffix):
        return bytes.fromhex(clip[len(k_clip_prefix):-len(k_clip_suffix)])        
    else:
        throw("Invalid clipboard tag")

def read_cart_from_clip(clip, **opts):
    data = read_raw_from_clip(clip)
    return read_cart_from_image(data, **opts)

def write_raw_to_clip(data):
    return k_clip_prefix + data.hex() + k_clip_suffix

def write_cart_to_clip(cart, **opts):
    return write_raw_to_clip(write_cart_to_image(cart, **opts))

def read_cart_autodetect(path, **opts):
    try:
        text = file_read_text(path)

        # cart?
        if text.startswith(k_p8_prefix) or text.startswith("__lua__"):
            return read_cart_from_source(text, path=path, **opts)
            
        rtext = text.rstrip()

        # clip?
        if rtext.startswith(k_clip_prefix):
            return read_cart_from_clip(rtext, path=path, **opts)

        # url?
        if rtext.startswith(k_url_prefix):
            return read_cart_from_url(rtext, path=path, **opts)

        # plain text?
        return read_cart_from_source(text, raw=True, path=path, **opts)
        
    except UnicodeDecodeError: # required to happen for pngs
        return read_cart(path, CartFormat.png, **opts)

def read_cart(path, format=None, **opts):
    """Read a cart from the given path, assuming it is in the given format"""
    if format in (None, CartFormat.auto):
        return read_cart_autodetect(path, **opts)
    elif format in (CartFormat.p8, CartFormat.code):
        return read_cart_from_source(file_read_text(path), path=path, **opts)
    elif format == CartFormat.png:
        return read_cart_from_image(file_read(path), path=path, **opts)
    elif format in (CartFormat.rom, CartFormat.tiny_rom):
        return read_cart_from_rom(file_read(path), path=path, allow_tiny=True, **opts)
    elif format == CartFormat.clip:
        return read_cart_from_clip(file_read_text(path).rstrip(), path=path, **opts)
    elif format == CartFormat.url:
        return read_cart_from_url(file_read_text(path).rstrip(), path=path, **opts)
    elif format == CartFormat.lua:
        return read_cart_from_source(file_read_text(path), raw=True, path=path, **opts)
    elif format == CartFormat.label:
        return read_cart_label(file_read(path), path=path, **opts)
    elif format == CartFormat.spritesheet:
        return read_cart_spritesheet(file_read(path), path=path, **opts)
    elif format.is_export:
        return read_from_cart_export(path, format, **opts)
    else:
        throw(f"invalid format for reading: {format}")

def write_cart(path, cart, format, **opts):
    """Writes a cart to the given path in the given format"""
    if format == CartFormat.p8:
        file_write_text(path, write_cart_to_source(cart, **opts))
    elif format == CartFormat.png:
        file_write(path, write_cart_to_image(cart, **opts))
    elif format == CartFormat.rom:
        file_write(path, write_cart_to_rom(cart, **opts))
    elif format == CartFormat.tiny_rom:
        file_write(path, write_cart_to_tiny_rom(cart, **opts))
    elif format == CartFormat.clip:
        file_write_text(path, write_cart_to_clip(cart, **opts))
    elif format == CartFormat.url:
        file_write_text(path, write_cart_to_url(cart, **opts))
    elif format == CartFormat.lua:
        file_write_text(path, write_cart_to_raw_source(cart, **opts))
    elif format == CartFormat.code:
        file_write_text(path, write_cart_to_raw_source(cart, with_header=True, **opts))
    elif format == CartFormat.label:
        file_write(path, write_cart_label(cart, **opts))
    elif format == CartFormat.spritesheet:
        file_write(path, write_cart_spritesheet(cart, **opts))
    elif format.is_export:
        write_to_cart_export(path, cart, format, **opts)
    else:
        throw(f"invalid format for writing: {format}")

def get_bbs_cart_url(id, lang=Language.pico8):
    if not id.startswith("#"):
        throw("invalid bbs id - # prefix expected")

    if lang == Language.pico8:
        category = 7
    elif lang == Language.picotron:
        category = 8
    else:
        throw("invalid bbs cart language")

    from urllib.parse import urlencode
    params = {"lid": id[1:], "cat": category}

    return "https://www.lexaloffle.com/bbs/get_cart.php?" + urlencode(params)

def merge_cart(dest, src, sections):
    for section in sections:
        if section == "lua":
            dest.code, dest.code_map, dest.code_rom = src.code, src.code_map, src.code_rom
        elif section == "gfx":
            dest.rom.copyfrom8(k_mem_sprites_addr, k_mem_map_addr - k_mem_sprites_addr, src.rom)
        elif section == "map":
            dest.rom.copyfrom8(k_mem_map_addr, k_mem_flag_addr - k_mem_map_addr, src.rom)
        elif section == "gff":
            dest.rom.copyfrom8(k_mem_flag_addr, k_mem_music_addr - k_mem_flag_addr, src.rom)
        elif section == "music":
            dest.rom.copyfrom8(k_mem_music_addr, k_mem_sfx_addr - k_mem_music_addr, src.rom)
        elif section == "sfx":
            dest.rom.copyfrom8(k_mem_sfx_addr, k_rom_size - k_mem_sfx_addr, src.rom)
        elif section == "label":
            dest.label = src.label
        elif section.startswith(k_meta_prefix):
            meta_name = section[len(k_meta_prefix):]
            dest.meta[meta_name] = src.name[meta_name]
        else:
            throw(f"unknown cart section: '{section}'")

def write_cart_version(cart):
    print("version: %d, v%d.%d.%d:%d, %c" % (cart.version_id, *cart.version_tuple, cart.platform))

from pico_export import read_from_cart_export, write_to_cart_export
from pico_preprocess import preprocess_code