From 2658c3aafbe0f287597f87c517ebaab8a0b4d3b3 Mon Sep 17 00:00:00 2001 From: SayoriOS Team | pimnik98 Date: Sun, 31 Dec 2023 16:32:59 +0300 Subject: [PATCH] =?UTF-8?q?=E2=9C=85=20=20[=D0=A1=D0=B1=D0=BE=D1=80=D0=BA?= =?UTF-8?q?=D0=B0=201386]=20=D0=92=D1=8B=D0=BF=D1=83=D1=81=D0=BA=20=D1=80?= =?UTF-8?q?=D0=B5=D0=BB=D0=B8=D0=B7=D0=B0=20SayoriOS=20Soul=20v0.3.4=20Lat?= =?UTF-8?q?est?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Makefile | 122 +- README.MD | 23 +- README.MD:Zone.Identifier | 3 + config.mk | 258 +- iso/boot/grub/background.tga | Bin 0 -> 54582 bytes iso/boot/grub/grub.cfg | 52 +- iso/boot/grub/theme.txt | 25 + iso/boot/ramdisk | Bin 0 -> 1914880 bytes iso/boot/sayori_sefs.img | Bin 4428931 -> 0 bytes kernel/asm/gdt.s | 0 kernel/asm/init.s | 3 +- kernel/asm/interrupt.s | 0 kernel/asm/link.ld | 0 kernel/asm/paging.s | 33 + kernel/asm/regs.s | 0 kernel/asm/switch_task.s | 63 +- kernel/asm/sys_calls.s | 0 kernel/asm/usr.s | 0 kernel/include/common.h | 33 +- kernel/include/debug/hexview.h | 2 +- kernel/include/debug/memmeter.h | 3 + kernel/include/debug/ubsan.h | 2 +- .../{gui => desktop}/parallel_desktop.h | 0 kernel/include/{gui => desktop}/render.h | 6 +- kernel/include/{gui => desktop}/widget.h | 4 +- .../include/{gui => desktop}/widget_button.h | 0 .../include/{gui => desktop}/widget_image.h | 12 +- .../include/{gui => desktop}/widget_label.h | 11 +- kernel/include/desktop/widget_progress.h | 13 + kernel/include/{gui => desktop}/window.h | 18 +- kernel/include/drv/atapi.h | 3 +- kernel/include/drv/audio/ac97.h | 34 +- kernel/include/drv/beeper.h | 2 +- kernel/include/drv/cmos.h | 4 - kernel/include/drv/disk/ahci.h | 304 + kernel/include/drv/{ => disk}/ata.h | 80 +- kernel/include/drv/disk/ata_dma.h | 15 + kernel/include/drv/disk/dpm.h | 36 + kernel/include/drv/disk/floppy.h | 9 +- kernel/include/drv/disk/ndpm.h | 29 + kernel/include/drv/input/keyboard.h | 3 +- kernel/include/drv/pci.h | 97 +- kernel/include/drv/psf.h | 1 + kernel/include/drv/ramdisk.h | 56 - kernel/include/drv/rtl8139.h | 14 +- kernel/include/drv/vfs.h | 76 - kernel/include/drv/vfs_new.h | 0 kernel/include/elf/elf.h | 15 +- kernel/include/fmt/tga.h | 3 +- kernel/include/fmt/wav.h | 11 +- kernel/include/fs/fat32.h | 110 + kernel/include/fs/fsm.h | 89 + kernel/include/fs/iso9660.h | 67 + kernel/include/fs/lucario/fs.h | 19 - kernel/include/fs/lucario/structures.h | 37 - kernel/include/fs/milla.h | 5 +- kernel/include/fs/natfs.h | 13 + kernel/include/fs/nvfs.h | 21 + kernel/include/fs/sefs.h | 23 - kernel/include/fs/smfs.h | 17 +- kernel/include/fs/tarfs.h | 74 + kernel/include/gui/circle.h | 2 +- kernel/include/gui/line.h | 2 +- kernel/include/gui/sayori_font_file.h | 53 - kernel/include/io/duke_image.h | 44 - kernel/include/io/ports.h | 89 +- kernel/include/io/rgb_image.h | 12 + kernel/include/io/screen.h | 47 +- .../include/io/{port_io.h => serial_port.h} | 0 kernel/include/io/status_loggers.h | 8 - kernel/include/io/status_sounds.h | 0 kernel/include/io/tty.h | 12 +- kernel/include/io/vgafnt.h | 8 - kernel/include/kernel.h | 34 +- kernel/include/lib/dan.h | 24 - kernel/include/lib/libstring/string.h | 30 + kernel/include/lib/list.h | 0 kernel/include/lib/math.h | 4 +- kernel/include/lib/php/explode.h | 6 + kernel/include/lib/php/pathinfo.h | 9 + kernel/include/lib/php/str_contains.h | 17 + kernel/include/lib/php/str_replace.h | 5 + kernel/include/lib/pixel.h | 19 + kernel/include/lib/split.h | 4 +- kernel/include/lib/sprintf.h | 1 - kernel/include/lib/stdarg.h | 0 kernel/include/lib/stdio.h | 6 +- kernel/include/lib/stdlib.h | 5 +- kernel/include/lib/string.h | 17 +- kernel/include/lib/utf_conversion.h | 7 + kernel/include/mem/pmm.h | 66 + kernel/include/mem/vmm.h | 51 + kernel/include/multiboot.h | 0 kernel/include/net/arp.h | 3 +- kernel/include/net/cards.h | 3 +- kernel/include/net/dhcp.h | 28 + kernel/include/net/ethernet.h | 131 +- kernel/include/net/icmp.h | 5 + kernel/include/net/ipv4.h | 13 + kernel/include/net/udp.h | 14 + kernel/include/portability.h | 112 + kernel/include/rust_header.h | 7 - kernel/include/rust_headers.h | 6 + kernel/include/sys/acpi.h | 2 +- kernel/include/sys/cpu_isr.h | 0 kernel/include/sys/cpuid.h | 7 +- kernel/include/sys/cpuinfo.h | 0 kernel/include/sys/descriptor_tables.h | 0 kernel/include/sys/isr.h | 0 kernel/include/sys/memory.h | 156 - kernel/include/sys/mtrr.h | 9 + kernel/include/sys/scheduler.h | 11 +- kernel/include/sys/status.h | 16 + kernel/include/sys/sync.h | 0 kernel/include/sys/syscalls.h | 38 +- kernel/include/sys/timer.h | 13 +- kernel/include/sys/v8086.h | 2 - kernel/include/sys/variable.h | 11 + kernel/include/user/env.h | 44 +- kernel/include/version.h | 12 + kernel/src/compress/zlib/README_IMPORTANT.txt | 11 - kernel/src/compress/zlib/adler32.c | 164 - kernel/src/compress/zlib/compress.c | 75 - kernel/src/compress/zlib/crc32.c | 1049 - kernel/src/compress/zlib/deflate.c | 2135 - kernel/src/compress/zlib/inffast.c | 320 - kernel/src/compress/zlib/inflate.c | 1527 - kernel/src/compress/zlib/inftrees.c | 299 - kernel/src/compress/zlib/trees.c | 1117 - kernel/src/compress/zlib/uncompr.c | 85 - kernel/src/compress/zlib/zutil.c | 301 - kernel/src/debug/hexview.c | 19 +- kernel/src/debug/memmeter.c | 24 + kernel/src/desktop/eki.c | 59 + .../src/{gui => desktop}/parallel_desktop.c | 150 +- kernel/src/{gui => desktop}/render.c | 113 +- kernel/src/{gui => desktop}/widget.c | 8 +- kernel/src/{gui => desktop}/widget_button.c | 6 +- kernel/src/desktop/widget_image.c | 73 + kernel/src/{gui => desktop}/widget_label.c | 18 +- kernel/src/desktop/widget_progress.c | 42 + kernel/src/{gui => desktop}/window.c | 143 +- kernel/src/drv/ata_dma.c | 127 - kernel/src/drv/audio/ac97.c | 248 +- kernel/src/drv/beeper.c | 225 +- kernel/src/drv/cmos.c | 14 +- kernel/src/drv/disk/ahci.c | 642 + kernel/src/drv/disk/ata.c | 339 +- kernel/src/drv/disk/ata_dma.c | 472 + kernel/src/drv/disk/atapi.c | 83 +- kernel/src/drv/disk/dpm.c | 260 + kernel/src/drv/disk/floppy.c | 120 +- kernel/src/drv/disk/initrd.c | 71 + kernel/src/drv/disk/mbr.c | 7 +- kernel/src/drv/disk/ndpm.c | 48 + kernel/src/drv/fpu.c | 7 +- kernel/src/drv/input/keyboard.c | 102 +- kernel/src/drv/input/mouse.c | 82 +- kernel/src/drv/pci.c | 172 +- kernel/src/drv/psf.c | 14 +- kernel/src/drv/rtl8139.c | 127 +- kernel/src/drv/vfs_new.c | 414 - kernel/src/drv/video/vbe.c | 2 +- kernel/src/extra/cli.c | 491 + kernel/src/extra/texplorer.c | 90 +- kernel/src/extra/tshell.c | 4 +- kernel/src/fmt/tga.c | 19 +- kernel/src/fmt/tga_extract.c | 345 +- kernel/src/fs/NatSuki.c | 83 +- kernel/src/fs/fat12.c | 2 +- kernel/src/fs/fat32.c | 301 + kernel/src/fs/fsm.c | 246 + kernel/src/fs/iso9660.c | 123 + kernel/src/fs/lucario/fs.c | 146 - kernel/src/fs/milla.c | 12 - kernel/src/fs/natfs.c | 171 + kernel/src/fs/nullfs.c | 44 + kernel/src/fs/nvfs.c | 140 + kernel/src/fs/sefs.c | 400 - kernel/src/fs/smfs.c | 515 +- kernel/src/fs/tarfs.c | 279 + kernel/src/gui/basics.c | 12 +- kernel/src/gui/circle.c | 3 +- kernel/src/gui/eki.c | 23 - kernel/src/gui/line.c | 7 +- kernel/src/gui/widget_image.c | 58 - kernel/src/io/duke_image.c | 281 - kernel/src/io/ports.c | 97 +- kernel/src/io/rgb_image.c | 83 + kernel/src/io/screen.c | 144 +- kernel/src/io/{port_io.c => serial_port.c} | 170 +- kernel/src/io/shell.c | 1066 - kernel/src/io/status_loggers.c | 1 - kernel/src/io/status_sounds.c | 2 +- kernel/src/io/tty.c | 399 +- kernel/src/kernel.c | 512 +- kernel/src/lib/base64.c | 6 +- kernel/src/lib/dan.c | 52 - kernel/src/lib/duk_config.h | 3778 + kernel/src/lib/duktape.c | 101351 +++++++++++++++ kernel/src/lib/duktape.h | 1456 + kernel/src/lib/elk/elk.c | 1616 + kernel/src/lib/elk/elk.h | 182 + kernel/src/lib/elk/elk_config.h | 10 + kernel/src/lib/elk/elk_engine.c | 161 + kernel/src/lib/elk/elk_libs.c | 177 + kernel/src/lib/elk/ext/jse_array.c | 707 + kernel/src/lib/elk/ext/jse_array.h | 62 + kernel/src/lib/elk/ext/jse_canvas.c | 234 + kernel/src/lib/elk/ext/jse_canvas.h | 30 + kernel/src/lib/elk/ext/jse_event.c | 177 + kernel/src/lib/elk/ext/jse_event.h | 11 + kernel/src/lib/elk/ext/jse_function.h | 24 + kernel/src/lib/elk/jse_func.c | 253 + kernel/src/lib/freeada/ada.c | 310 + kernel/src/lib/freeada/ada.h | 41 + kernel/src/lib/libstring/include/string.h | 30 + kernel/src/lib/libstring/src/string.c | 241 + kernel/src/lib/libvector/include/vector.h | 33 + kernel/src/lib/libvector/src/vector.c | 173 + kernel/src/lib/list.c | 2 +- kernel/src/lib/math/modf.c | 8 + kernel/src/lib/php/explode.c | 55 + kernel/src/lib/php/pathinfo.c | 71 + kernel/src/lib/php/str_replace.c | 16 +- kernel/src/lib/pixel.c | 224 +- kernel/src/lib/rand.c | 2 +- kernel/src/lib/split.c | 32 +- kernel/src/lib/sprintf.c | 62 +- kernel/src/lib/stdio.c | 137 +- kernel/src/lib/string.c | 470 +- kernel/src/lib/tui.c | 27 +- kernel/src/lib/utf_conversion.c | 44 + kernel/src/mem/pmm.c | 548 + kernel/src/mem/vmm.c | 421 + kernel/src/net/arp.c | 71 +- kernel/src/net/cards.c | 14 +- kernel/src/net/dhcp.c | 176 + kernel/src/net/ethernet.c | 114 +- kernel/src/net/icmp.c | 7 + kernel/src/net/ipv4.c | 108 + kernel/src/net/net_info_cli.c | 38 + kernel/src/net/udp.c | 44 + kernel/src/ports/gameboy/portability.h | 7 - kernel/src/ports/gameboy/rom.c | 10 +- kernel/src/ports/gameboy/sdl.c | 13 +- kernel/src/sys/acpi.c | 55 +- kernel/src/sys/bootscreen.c | 29 +- kernel/src/sys/cpu_isr.c | 146 +- kernel/src/sys/cpuid.c | 23 +- kernel/src/sys/cpuinfo.c | 217 +- kernel/src/sys/elf.c | 150 +- kernel/src/sys/gdt.c | 15 +- kernel/src/sys/idt.c | 10 +- kernel/src/sys/isr.c | 16 +- kernel/src/sys/logo.c | 30 +- kernel/src/sys/memory.c | 858 - kernel/src/sys/mtrr.c | 94 + kernel/src/sys/scheduler.c | 100 +- kernel/src/sys/sync.c | 10 +- kernel/src/sys/syscalls.c | 182 +- kernel/src/sys/system.c | 21 +- kernel/src/sys/testing.c | 3 +- kernel/src/sys/timer.c | 34 +- kernel/src/sys/trigger.c | 110 +- kernel/src/sys/tss.c | 10 +- kernel/src/sys/unwind.c | 18 +- kernel/src/sys/variable.c | 78 + kernel/src/toys/calendar.c | 2 +- kernel/src/toys/danview.c | 68 - kernel/src/toys/dino.c | 5 +- kernel/src/toys/diskctl.c | 3 +- kernel/src/toys/gfxbench.c | 52 + kernel/src/toys/mala.c | 4 +- kernel/src/toys/minesweeper/Flag.c | 42 - kernel/src/toys/minesweeper/Flag.piskel | 1 - kernel/src/toys/minesweeper/Mine.c | 42 - kernel/src/toys/minesweeper/Mine.piskel | 1 - kernel/src/toys/minesweeper/Nums.c | 316 - kernel/src/toys/minesweeper/Nums.piskel | 1 - kernel/src/toys/miniplay.c | 128 + kernel/src/toys/pavi.c | 31 + kernel/src/user/env.c | 57 +- kernel/src/zlibtest.c | 98 - other/41_sayori | 11 - other/compiler.sh | 16 - other/llvm.sh | 165 - ramdisk/Sayori/Fonts/UniCyrX-ibm-8x16.psf | Bin 0 -> 5376 bytes ramdisk/Sayori/JSE/canvas.js | 11 + ramdisk/Sayori/JSE/console.js | 17 + ramdisk/Sayori/JSE/system.js | 5 + ramdisk/Sayori/Temp/test.txt | 2 + ramdisk/Sayori/bg.tga | Bin 0 -> 808191 bytes ramdisk/Sayori/demo.boost.txt | 1 + ramdisk/Sayori/motd | 2 + ramdisk/Sayori/p.txt | 1 + ramdisk/ada/test.ada | 5 + ramdisk/eao | Bin 0 -> 17520 bytes ramdisk/jse/array.js | 24 + ramdisk/jse/canvas.js | 13 + ramdisk/jse/console.js | 25 + ramdisk/jse/draw.js | 6 + ramdisk/jse/event.js | 48 + ramdisk/jse/for.js | 4 + ramdisk/jse/if.js | 25 + ramdisk/jse/libs.js | 23 + ramdisk/jse/note.txt | 34 + ramdisk/jse/sum.js | 8 + ramdisk/jse/test_path.js | 8 + ramdisk/pkm.gb | Bin 0 -> 1048576 bytes ...0\260\320\271\320\273\320\265 pkm.gb .txt" | 14 + rust/Cargo.lock | 33 - rust/Cargo.toml | 9 +- rust/src/lib.rs | 40 +- rust/src/other/mod.rs | 1 + rust/src/other/tinyada/mod.rs | 154 + rust/src/std/fs.rs | 57 + rust/src/std/io/mod.rs | 113 + rust/src/std/io/rgb_image.rs | 53 + rust/src/std/lib/mod.rs | 1 + rust/src/std/lib/pixel.rs | 78 + rust/src/std/mm/allocator.rs | 27 + rust/src/std/mm/mod.rs | 1 + rust/src/std/mod.rs | 5 + rust/src/std/tty.rs | 47 + rust/targets/i686-unknown-none.json | 6 +- tools/compiler.sh | 40 + tools/genmap.sh | 2 +- tools/grub.sh | 8 + 329 files changed, 122892 insertions(+), 15908 deletions(-) create mode 100644 README.MD:Zone.Identifier create mode 100644 iso/boot/grub/background.tga mode change 100755 => 100644 iso/boot/grub/grub.cfg create mode 100644 iso/boot/grub/theme.txt create mode 100644 iso/boot/ramdisk delete mode 100644 iso/boot/sayori_sefs.img mode change 100755 => 100644 kernel/asm/gdt.s mode change 100755 => 100644 kernel/asm/init.s mode change 100755 => 100644 kernel/asm/interrupt.s mode change 100755 => 100644 kernel/asm/link.ld create mode 100644 kernel/asm/paging.s mode change 100755 => 100644 kernel/asm/regs.s mode change 100755 => 100644 kernel/asm/switch_task.s mode change 100755 => 100644 kernel/asm/sys_calls.s mode change 100755 => 100644 kernel/asm/usr.s mode change 100755 => 100644 kernel/include/common.h create mode 100644 kernel/include/debug/memmeter.h rename kernel/include/{gui => desktop}/parallel_desktop.h (100%) rename kernel/include/{gui => desktop}/render.h (77%) rename kernel/include/{gui => desktop}/widget.h (83%) rename kernel/include/{gui => desktop}/widget_button.h (100%) rename kernel/include/{gui => desktop}/widget_image.h (59%) rename kernel/include/{gui => desktop}/widget_label.h (53%) create mode 100644 kernel/include/desktop/widget_progress.h rename kernel/include/{gui => desktop}/window.h (68%) mode change 100755 => 100644 kernel/include/drv/beeper.h mode change 100755 => 100644 kernel/include/drv/cmos.h create mode 100644 kernel/include/drv/disk/ahci.h rename kernel/include/drv/{ => disk}/ata.h (53%) create mode 100644 kernel/include/drv/disk/ata_dma.h create mode 100644 kernel/include/drv/disk/dpm.h create mode 100644 kernel/include/drv/disk/ndpm.h mode change 100755 => 100644 kernel/include/drv/input/keyboard.h delete mode 100755 kernel/include/drv/ramdisk.h delete mode 100755 kernel/include/drv/vfs.h mode change 100755 => 100644 kernel/include/drv/vfs_new.h mode change 100755 => 100644 kernel/include/elf/elf.h create mode 100644 kernel/include/fs/fat32.h create mode 100644 kernel/include/fs/fsm.h create mode 100644 kernel/include/fs/iso9660.h delete mode 100644 kernel/include/fs/lucario/fs.h delete mode 100644 kernel/include/fs/lucario/structures.h create mode 100644 kernel/include/fs/natfs.h create mode 100644 kernel/include/fs/nvfs.h delete mode 100755 kernel/include/fs/sefs.h create mode 100644 kernel/include/fs/tarfs.h delete mode 100644 kernel/include/gui/sayori_font_file.h delete mode 100755 kernel/include/io/duke_image.h mode change 100755 => 100644 kernel/include/io/ports.h create mode 100644 kernel/include/io/rgb_image.h rename kernel/include/io/{port_io.h => serial_port.h} (100%) mode change 100755 => 100644 kernel/include/io/status_sounds.h mode change 100755 => 100644 kernel/include/io/tty.h delete mode 100755 kernel/include/io/vgafnt.h mode change 100755 => 100644 kernel/include/kernel.h delete mode 100644 kernel/include/lib/dan.h create mode 100644 kernel/include/lib/libstring/string.h mode change 100755 => 100644 kernel/include/lib/list.h create mode 100644 kernel/include/lib/php/explode.h create mode 100644 kernel/include/lib/php/pathinfo.h create mode 100644 kernel/include/lib/php/str_contains.h create mode 100644 kernel/include/lib/php/str_replace.h create mode 100644 kernel/include/lib/pixel.h mode change 100755 => 100644 kernel/include/lib/stdarg.h mode change 100755 => 100644 kernel/include/lib/stdio.h mode change 100755 => 100644 kernel/include/lib/stdlib.h create mode 100644 kernel/include/lib/utf_conversion.h create mode 100644 kernel/include/mem/pmm.h create mode 100644 kernel/include/mem/vmm.h mode change 100755 => 100644 kernel/include/multiboot.h create mode 100644 kernel/include/net/dhcp.h create mode 100644 kernel/include/net/icmp.h create mode 100644 kernel/include/net/ipv4.h create mode 100644 kernel/include/net/udp.h create mode 100644 kernel/include/portability.h delete mode 100644 kernel/include/rust_header.h create mode 100644 kernel/include/rust_headers.h mode change 100755 => 100644 kernel/include/sys/cpu_isr.h mode change 100755 => 100644 kernel/include/sys/cpuinfo.h mode change 100755 => 100644 kernel/include/sys/descriptor_tables.h mode change 100755 => 100644 kernel/include/sys/isr.h delete mode 100755 kernel/include/sys/memory.h create mode 100644 kernel/include/sys/mtrr.h mode change 100755 => 100644 kernel/include/sys/scheduler.h create mode 100644 kernel/include/sys/status.h mode change 100755 => 100644 kernel/include/sys/sync.h mode change 100755 => 100644 kernel/include/sys/syscalls.h mode change 100755 => 100644 kernel/include/sys/timer.h create mode 100644 kernel/include/sys/variable.h create mode 100644 kernel/include/version.h delete mode 100644 kernel/src/compress/zlib/README_IMPORTANT.txt delete mode 100644 kernel/src/compress/zlib/adler32.c delete mode 100644 kernel/src/compress/zlib/compress.c delete mode 100644 kernel/src/compress/zlib/crc32.c delete mode 100644 kernel/src/compress/zlib/deflate.c delete mode 100644 kernel/src/compress/zlib/inffast.c delete mode 100644 kernel/src/compress/zlib/inflate.c delete mode 100644 kernel/src/compress/zlib/inftrees.c delete mode 100644 kernel/src/compress/zlib/trees.c delete mode 100644 kernel/src/compress/zlib/uncompr.c delete mode 100644 kernel/src/compress/zlib/zutil.c create mode 100644 kernel/src/debug/memmeter.c create mode 100644 kernel/src/desktop/eki.c rename kernel/src/{gui => desktop}/parallel_desktop.c (51%) rename kernel/src/{gui => desktop}/render.c (66%) rename kernel/src/{gui => desktop}/widget.c (90%) rename kernel/src/{gui => desktop}/widget_button.c (95%) create mode 100644 kernel/src/desktop/widget_image.c rename kernel/src/{gui => desktop}/widget_label.c (71%) create mode 100644 kernel/src/desktop/widget_progress.c rename kernel/src/{gui => desktop}/window.c (57%) delete mode 100644 kernel/src/drv/ata_dma.c mode change 100755 => 100644 kernel/src/drv/beeper.c mode change 100755 => 100644 kernel/src/drv/cmos.c create mode 100644 kernel/src/drv/disk/ahci.c create mode 100644 kernel/src/drv/disk/ata_dma.c create mode 100644 kernel/src/drv/disk/dpm.c create mode 100644 kernel/src/drv/disk/initrd.c create mode 100644 kernel/src/drv/disk/ndpm.c mode change 100755 => 100644 kernel/src/drv/input/keyboard.c delete mode 100755 kernel/src/drv/vfs_new.c create mode 100644 kernel/src/extra/cli.c create mode 100644 kernel/src/fs/fat32.c create mode 100644 kernel/src/fs/fsm.c create mode 100644 kernel/src/fs/iso9660.c delete mode 100644 kernel/src/fs/lucario/fs.c delete mode 100644 kernel/src/fs/milla.c create mode 100644 kernel/src/fs/natfs.c create mode 100644 kernel/src/fs/nullfs.c create mode 100644 kernel/src/fs/nvfs.c delete mode 100755 kernel/src/fs/sefs.c create mode 100644 kernel/src/fs/tarfs.c delete mode 100644 kernel/src/gui/eki.c delete mode 100644 kernel/src/gui/widget_image.c delete mode 100755 kernel/src/io/duke_image.c mode change 100755 => 100644 kernel/src/io/ports.c create mode 100644 kernel/src/io/rgb_image.c rename kernel/src/io/{port_io.c => serial_port.c} (65%) delete mode 100755 kernel/src/io/shell.c mode change 100755 => 100644 kernel/src/io/tty.c mode change 100755 => 100644 kernel/src/kernel.c mode change 100755 => 100644 kernel/src/lib/base64.c delete mode 100644 kernel/src/lib/dan.c create mode 100644 kernel/src/lib/duk_config.h create mode 100644 kernel/src/lib/duktape.c create mode 100644 kernel/src/lib/duktape.h create mode 100644 kernel/src/lib/elk/elk.c create mode 100644 kernel/src/lib/elk/elk.h create mode 100644 kernel/src/lib/elk/elk_config.h create mode 100644 kernel/src/lib/elk/elk_engine.c create mode 100644 kernel/src/lib/elk/elk_libs.c create mode 100644 kernel/src/lib/elk/ext/jse_array.c create mode 100644 kernel/src/lib/elk/ext/jse_array.h create mode 100644 kernel/src/lib/elk/ext/jse_canvas.c create mode 100644 kernel/src/lib/elk/ext/jse_canvas.h create mode 100644 kernel/src/lib/elk/ext/jse_event.c create mode 100644 kernel/src/lib/elk/ext/jse_event.h create mode 100644 kernel/src/lib/elk/ext/jse_function.h create mode 100644 kernel/src/lib/elk/jse_func.c create mode 100644 kernel/src/lib/freeada/ada.c create mode 100644 kernel/src/lib/freeada/ada.h create mode 100644 kernel/src/lib/libstring/include/string.h create mode 100644 kernel/src/lib/libstring/src/string.c create mode 100644 kernel/src/lib/libvector/include/vector.h create mode 100644 kernel/src/lib/libvector/src/vector.c mode change 100755 => 100644 kernel/src/lib/list.c create mode 100644 kernel/src/lib/math/modf.c create mode 100644 kernel/src/lib/php/explode.c create mode 100644 kernel/src/lib/php/pathinfo.c mode change 100755 => 100644 kernel/src/lib/split.c mode change 100755 => 100644 kernel/src/lib/stdio.c mode change 100755 => 100644 kernel/src/lib/string.c create mode 100644 kernel/src/lib/utf_conversion.c create mode 100644 kernel/src/mem/pmm.c create mode 100644 kernel/src/mem/vmm.c create mode 100644 kernel/src/net/dhcp.c create mode 100644 kernel/src/net/icmp.c create mode 100644 kernel/src/net/ipv4.c create mode 100644 kernel/src/net/net_info_cli.c create mode 100644 kernel/src/net/udp.c delete mode 100644 kernel/src/ports/gameboy/portability.h mode change 100755 => 100644 kernel/src/sys/bootscreen.c mode change 100755 => 100644 kernel/src/sys/cpu_isr.c mode change 100755 => 100644 kernel/src/sys/cpuinfo.c mode change 100755 => 100644 kernel/src/sys/elf.c mode change 100755 => 100644 kernel/src/sys/gdt.c mode change 100755 => 100644 kernel/src/sys/idt.c mode change 100755 => 100644 kernel/src/sys/isr.c delete mode 100755 kernel/src/sys/memory.c create mode 100644 kernel/src/sys/mtrr.c mode change 100755 => 100644 kernel/src/sys/scheduler.c mode change 100755 => 100644 kernel/src/sys/sync.c mode change 100755 => 100644 kernel/src/sys/syscalls.c mode change 100755 => 100644 kernel/src/sys/system.c mode change 100755 => 100644 kernel/src/sys/timer.c mode change 100755 => 100644 kernel/src/sys/tss.c create mode 100644 kernel/src/sys/variable.c delete mode 100644 kernel/src/toys/danview.c create mode 100644 kernel/src/toys/gfxbench.c delete mode 100644 kernel/src/toys/minesweeper/Flag.c delete mode 100644 kernel/src/toys/minesweeper/Flag.piskel delete mode 100644 kernel/src/toys/minesweeper/Mine.c delete mode 100644 kernel/src/toys/minesweeper/Mine.piskel delete mode 100644 kernel/src/toys/minesweeper/Nums.c delete mode 100644 kernel/src/toys/minesweeper/Nums.piskel create mode 100644 kernel/src/toys/miniplay.c create mode 100644 kernel/src/toys/pavi.c delete mode 100644 kernel/src/zlibtest.c delete mode 100755 other/41_sayori delete mode 100644 other/compiler.sh delete mode 100755 other/llvm.sh create mode 100644 ramdisk/Sayori/Fonts/UniCyrX-ibm-8x16.psf create mode 100644 ramdisk/Sayori/JSE/canvas.js create mode 100644 ramdisk/Sayori/JSE/console.js create mode 100644 ramdisk/Sayori/JSE/system.js create mode 100644 ramdisk/Sayori/Temp/test.txt create mode 100644 ramdisk/Sayori/bg.tga create mode 100644 ramdisk/Sayori/demo.boost.txt create mode 100644 ramdisk/Sayori/motd create mode 100644 ramdisk/Sayori/p.txt create mode 100644 ramdisk/ada/test.ada create mode 100644 ramdisk/eao create mode 100644 ramdisk/jse/array.js create mode 100644 ramdisk/jse/canvas.js create mode 100644 ramdisk/jse/console.js create mode 100644 ramdisk/jse/draw.js create mode 100644 ramdisk/jse/event.js create mode 100644 ramdisk/jse/for.js create mode 100644 ramdisk/jse/if.js create mode 100644 ramdisk/jse/libs.js create mode 100644 ramdisk/jse/note.txt create mode 100644 ramdisk/jse/sum.js create mode 100644 ramdisk/jse/test_path.js create mode 100644 ramdisk/pkm.gb create mode 100644 "ramdisk/\320\276 \321\204\320\260\320\271\320\273\320\265 pkm.gb .txt" create mode 100644 rust/src/other/mod.rs create mode 100644 rust/src/other/tinyada/mod.rs create mode 100644 rust/src/std/fs.rs create mode 100644 rust/src/std/io/mod.rs create mode 100644 rust/src/std/io/rgb_image.rs create mode 100644 rust/src/std/lib/mod.rs create mode 100644 rust/src/std/lib/pixel.rs create mode 100644 rust/src/std/mm/allocator.rs create mode 100644 rust/src/std/mm/mod.rs create mode 100644 rust/src/std/mod.rs create mode 100644 rust/src/std/tty.rs create mode 100644 tools/compiler.sh create mode 100644 tools/grub.sh diff --git a/Makefile b/Makefile index df0de645d..86d692dff 100755 --- a/Makefile +++ b/Makefile @@ -18,15 +18,15 @@ $(OBJ_DIRECTORY)/%.o : %.s | $(OBJ_DIRECTORY) $(OBJ_DIRECTORY)/%.o : %.c | $(OBJ_DIRECTORY) @echo -e '\x1b[32mC \x1b[0m' $@ - @$(CC) $(CFLAGS) -O0 -c -o $@ $< + @$(CC) $(CFLAGS) -c -o $@ $< $(OBJ_DIRECTORY)/%.o : %.cpp | $(OBJ_DIRECTORY) @echo -e '\x1b[32mCPP \x1b[0m' $@ @$(CXX) $(CPP_FLAGS) -c -o $@ $< build_rust: - @echo -e '\x1b[32mRUST \x1b[0mBuild rust kernel' - cd $(RUST_DIR) && rustup override set nightly && rustup component add rust-src --toolchain nightly-x86_64-unknown-linux-gnu && cargo build + @echo -e '\x1b[32mRUST \x1b[0mBuilding Rust subsystem' + cd rust && rustup override set nightly && rustup component add rust-src --toolchain nightly-x86_64-unknown-linux-gnu && cargo +nightly build # Сборка ядра build: $(SOURCES) @@ -50,16 +50,34 @@ run_remote_mon: run_ahci_sata: $(QEMU) $(QEMU_FLAGS) -serial mon:stdio \ - -drive id=disk,file=disk.img,if=none \ -device ahci,id=ahci \ - -device ide-hd,drive=disk,bus=ahci.0 + -drive id=thatdisk,file=disk.img,if=none \ + -device ide-hd,drive=thatdisk,bus=ahci.0 \ + -drive id=thatcdrom,file=/dev/cdrom,if=none \ + -device ide-cd,drive=thatcdrom,bus=ahci.1 \ + # -trace "ahci*" \ + +run_disks: + $(QEMU) $(QEMU_FLAGS) -serial mon:stdio -hda disk1.img -hdb disk2.img -hdd disk3.img + +bra: + @$(MAKE) + @$(MAKE) RAM + @$(MAKE) geniso + @$(MAKE) run_ahci_sata + +disks: + @$(MAKE) + @$(MAKE) RAM + @$(MAKE) geniso + @$(MAKE) run_disks # Запуск Milla milla: - qemu-system-i386 -cdrom kernel.iso -serial file:Qemu.log -serial tcp:127.0.0.1:64552,server,nowait -accel kvm -m 128M -name "SayoriOS Soul" -d guest_errors -rtc base=localtime -soundhw pcspk + qemu-system-i386 -cdrom kernel.iso -serial file:Qemu.log -serial telnet:sayorios.piminoff.ru:10000 -accel kvm -m 128M -name "SayoriOS Soul" -d guest_errors -rtc base=localtime -soundhw pcspk floppy: - qemu-system-i386 -cdrom kernel.iso -serial file:Qemu.log -m 128M -name "SayoriOS v0.3.x (Dev)" -d guest_errors -rtc base=localtime -fda floppy.img -boot order=dc + qemu-system-i386 -cdrom kernel.iso -serial mon:stdio -m 64M -name "SayoriOS v0.3.4 Soul - Scythe" -d guest_errors -rtc base=localtime -fda floppy.img -boot order=dc -accel kvm # Запуск с логами в консоль runlive: @@ -68,48 +86,52 @@ runlive: # Запуск в режиме UEFI с логами в файл uefi: qemu-system-x86_64 -bios /usr/share/qemu/OVMF.fd -cdrom SayoriOS_UEFI.iso -serial file:Qemu.log -accel kvm \ - -m 128M -name "SayoriOS Soul" -d guest_errors -rtc base=localtime + -m 128M -name "SayoriOS v0.3.4 Soul - Scythe" -d guest_errors -rtc base=localtime # Запуск в режиме UEFI с логами в консоль uefilive: qemu-system-x86_64 -bios /usr/share/qemu/OVMF.fd -cdrom SayoriOS_UEFI.iso -serial mon:stdio -accel kvm \ - -m 128M -name "SayoriOS Soul" -d guest_errors -rtc base=localtime + -m 128M -name "SayoriOS v0.3.4 Soul - Scythe" -d guest_errors -rtc base=localtime # Генерация ISO-файла geniso: $(KERNEL) - grub2-mkrescue -o "kernel.iso" iso/ -V kernel + $(shell bash tools/grub.sh) -o "kernel.iso" iso/ -V kernel # Генерация ISO-файла с поддержкой UEFI genuefi: - grub2-mkrescue -d /usr/lib/grub/x86_64-efi -o SayoriOS_UEFI.iso iso/ --locale-directory=/usr/share/locale/ -V "SayoriOS Soul" + $(shell bash tools/grub.sh) -d /usr/lib/grub/x86_64-efi -o SayoriOS_UEFI.iso iso/ --locale-directory=/usr/share/locale/ -V "SayoriOS v0.3.4 Soul - Scythe" # Удаление оригинального файла и *.о файлов clean: -rm -f $(KERNEL) -rm -f $(KERNEL_NEED) -rm -f $(DEPS) + -rm -f iso/boot/ramdisk -rm -f $(RUST_OBJ_DEBUG) -rm -f $(RUST_OBJ_RELEASE) # Линковка файлов $(KERNEL): $(KERNEL_NEED) $(RUST_SOURCES) rust/Cargo.toml - @$(MAKE) build_rust + # $(MAKE) build_rust @echo -e '\x1b[32mLINK \x1b[0m' $(KERNEL) @rm -f $(KERNEL) - @$(LD) $(LDFLAGS) -o $(KERNEL) $(KERNEL_NEED) $(RUST_OBJ_DEBUG) - @llvm-strip -s $(KERNEL) + @$(LD) $(LDFLAGS) -o $(KERNEL) $(KERNEL_NEED) # $(RUST_OBJ_DEBUG) + #@llvm-strip -s $(KERNEL) # I know I strip all symbols so making unwind useless. (Fix it later) @bash tools/genmap.sh @bash tools/insertmap.sh + @ls -lh $(KERNEL) @-rm kernel.map # Быстрая линковка, генерация ISO, запуск bir: @$(MAKE) + @$(MAKE) RAM @$(MAKE) geniso @$(MAKE) run # Быстрая линковка, генерация ISO, запуск birl: @$(MAKE) + @$(MAKE) RAM @$(MAKE) geniso @$(MAKE) runlive @@ -131,25 +153,91 @@ bf: cppcheck: cppcheck --enable=warning,performance,portability . - debug: geniso $(QEMU) $(QEMU_FLAGS) -s -S & gdb -ex "target remote localhost:1234" -ex "break kernel" -ex "continue" ensure_tools: @echo "C:" $(CC) - @echo "C++:" $(CXX) + @echo "LD:" $(LD) release: ADDCFLAGS="-DRELEASE" $(MAKE) + @$(MAKE) RAM +# ВНИМАНИЕ: Данное правило установит SayoriOS на ваш компьютер! deploy: $(KERNEL) sudo cp iso/boot/kernel.elf /boot/sayorios_kernel.elf - sudo cp iso/boot/sayori_sefs.img /boot/ + sudo cp iso/boot/ramdisk /boot/sayori_ramdisk sudo cp other/41_sayori /etc/grub.d/ sudo update-grub +RAM: + @-rm ./iso/boot/ramdisk + @tar -cvf ./iso/boot/ramdisk ./ramdisk/ + +VBOX_create_vm: + @echo "TODO" + @VBoxManage createvm --name=SayoriOS --register + @VBoxManage storagectl SayoriOS --name=ide --add=ide --bootable=on + @VBoxManage storageattach SayoriOS --type=dvddrive --medium kernel.iso --storagectl=ide --port=0 --device=0 + +VBOX: + @$(MAKE) + @$(MAKE) RAM + @$(MAKE) geniso + @VBoxManage startvm "SayoriOS" + +WSL_RUN: + "/mnt/c/Program Files/qemu/qemu-system-i386.exe" -cdrom "C:\\SayoriDev\\SayoriOS_DEV_WSL.iso" -serial mon:stdio -m 128M -name "SayoriOS v0.3.4 Soul - Scythe - WSL MODE" -d guest_errors -rtc base=localtime $(QEMU_FLAGS_WSL) + + +WSL: + @$(MAKE) + @$(MAKE) RAM + @$(MAKE) geniso + @-mkdir /mnt/c/SayoriDev/ + mv kernel.iso /mnt/c/SayoriDev/SayoriOS_DEV_WSL.iso + "/mnt/c/Program Files/qemu/qemu-system-i386.exe" -cdrom "C:\\SayoriDev\\SayoriOS_DEV_WSL.iso" -serial mon:stdio -m 128M -name "SayoriOS v0.3.4 Soul - Scythe - WSL MODE" -d guest_errors -rtc base=localtime $(QEMU_FLAGS_WSL) + +WSL_NAT: + @$(MAKE) + @$(MAKE) RAM + @$(MAKE) geniso + @-mkdir /mnt/c/SayoriDev/ + mv kernel.iso /mnt/c/SayoriDev/SayoriOS_DEV_WSL.iso + "/mnt/c/Program Files/qemu/qemu-system-i386.exe" -cdrom "C:\\SayoriDev\\SayoriOS_DEV_WSL.iso" -serial mon:stdio -serial telnet:sayorios.piminoff.ru:10000 -m 128M -name "SayoriOS v0.3.4 Soul - Scythe - WSL MODE" -d guest_errors -rtc base=localtime $(QEMU_FLAGS_WSL) + +WSL_DISKS: + @$(MAKE) + @$(MAKE) RAM + @$(MAKE) geniso + @-mkdir /mnt/c/SayoriDev/ + mv kernel.iso /mnt/c/SayoriDev/SayoriOS_DEV_WSL.iso + @-mv disk1.img /mnt/c/SayoriDev/disk1.img + @-mv disk2.img /mnt/c/SayoriDev/disk2.img + @-mv disk3.img /mnt/c/SayoriDev/disk3.img + "/mnt/c/Program Files/qemu/qemu-system-i386.exe" -cdrom "C:\\SayoriDev\\SayoriOS_DEV_WSL.iso" -serial mon:stdio -m 128M -name "SayoriOS v0.3.4 Soul - Scythe - WSL MODE" -d guest_errors -rtc base=localtime $(QEMU_FLAGS_WSL) -hda "C:\\SayoriDev\\disk1.img" -hdb "C:\\SayoriDev\\disk2.img" -hdd "C:\\SayoriDev\\disk3.img" + +create_fat_disk: + fallocate -l 64M disk1.img + sudo mkfs.fat -F 32 disk1.img + +net_tap_dev: geniso + sudo $(QEMU) -cdrom kernel.iso -m $(MEMORY_SIZE) \ + -name "SayoriOS v0.3.4 Soul - Scythe - [NETWORK ON TAP]" \ + -rtc base=localtime \ + -d guest_errors,cpu_reset,int \ + -smp 1 \ + -netdev tap,id=net0 \ + -device rtl8139,netdev=net0,id=mydev0 \ + -boot d \ + -cpu core2duo-v1 \ + -serial mon:stdio \ + $(KVM_QEMU_FLAGS) + + clangd: $(MAKE) clean bear -- $(MAKE) -j2 diff --git a/README.MD b/README.MD index 206ab7784..69aba51bd 100644 --- a/README.MD +++ b/README.MD @@ -10,19 +10,22 @@ Коммиты идут пачками (по одному коммиту на каждый релиз)

Скриншоты

- v0.3.2 S1 - v0.3.2 S2 - v0.3.2 S3 - v0.3.2 S4 + v0.3.4 S1 + v0.3.4 S2 + v0.3.4 S3 + v0.3.4 S4 + v0.3.4 S5 + v0.3.4 S6 + v0.3.4 S7

Примерный план действий:

Прогресс:
- ❤ [Ядро] Выполнено 4 из 7 (57%) [=====-----]
- 💫 [Драйвера] Выполнено 3 из 6 (50%) [=====-----]
- 📂 [Файлы] Выполнено 4 из 8 (50%) [=====-----]
- 🌐 [Сеть] Выполнено 0 из 1 (0%) [----------]
- 🔌 [Прочие] Выполнено 2 из 5 (40%) [====------]
+ ❤ [Ядро] Выполнено 10 из 20 (50%) [=====-----]
+ 💫 [Драйвера] Выполнено 9 из 10 (90%) [=========-]
+ 📂 [Файлы] Выполнено 8 из 10 (80%) [========--]
+ 🌐 [Сеть] Выполнено 1 из 3 (33%) [===-------]
+ 🔌 [Прочие] Выполнено 6 из 9 (66%) [======----]
* Нажав сюда, вы увидите изображение, где отображены примерные планы на ядро.
Обновление данного изображения, будет только при следующем релизе. или нажмите сюда, для просмотра на сайте

@@ -88,11 +91,13 @@ make clean-objs - Удаляет все скомпилированные файлы
make link - Линк файлов ядра
make bir - Сборка ISO и запуск ядра
+ make WSL - Сборка ISO и запуск ядра через WSL

Список людей, которые поддерживают ядро:

* Nikita Piminoff (Создатель SayoriOS)
* Drew Pavlenko

+ * Даниил Лебедев

* Коммьюнити SayoriOS в VK

Отказ от ответственности:

diff --git a/README.MD:Zone.Identifier b/README.MD:Zone.Identifier new file mode 100644 index 000000000..43a1a01e3 --- /dev/null +++ b/README.MD:Zone.Identifier @@ -0,0 +1,3 @@ +[ZoneTransfer] +ZoneId=3 +HostUrl=https://github.com/ diff --git a/config.mk b/config.mk index 1d3bbc31b..33e8be0a6 100755 --- a/config.mk +++ b/config.mk @@ -2,13 +2,19 @@ # SayoriOS Soul # (c) SayoriOS Team 2022-2023 -# CC=$(shell bash other/compiler.sh cpp) -CC=$(shell bash other/compiler.sh) -CXX=$(shell bash other/compiler.sh cpp) - +KERNEL = iso/boot/kernel.elf +DEBUG =# -ggdb3 #-Werror MEMORY_SIZE=128M USE_SSE=true +COMPILER_DETECTOR_FLAGS = "" + +ifeq ($(X64),true) + COMPILER_DETECTOR_FLAGS := "--64" +endif + +CC=$(shell bash tools/compiler.sh $(COMPILER_DETECTOR_FLAGS)) + GAMEBOY = $(wildcard kernel/src/ports/gameboy/*.c) GAMEBOY_OBJS = $(GAMEBOY:.c=.o) @@ -16,7 +22,12 @@ OBJ_DIRECTORY = objects DIRECTORIES = objects/kernel/src \ objects/kernel/asm \ objects/kernel/src/lib \ + objects/kernel/src/lib/libstring/src \ + objects/kernel/src/lib/libvector/src \ objects/kernel/src/lib/php \ + objects/kernel/src/lib/elk \ + objects/kernel/src/lib/elk/ext \ + objects/kernel/src/lib/freeada \ objects/kernel/src/extra \ objects/kernel/src/sys \ objects/kernel/src/io \ @@ -32,134 +43,169 @@ DIRECTORIES = objects/kernel/src \ objects/kernel/src/lib/math \ objects/kernel/src/toys \ objects/kernel/src/gui \ + objects/kernel/src/desktop \ objects/kernel/src/user \ objects/kernel/src/ports/gameboy \ - objects/kernel/src/compress/zlib \ + objects/kernel/src/mem \ + objects/kernel/src/arch/x86 \ + # objects/kernel/src/compress/zlib \ # Исходные объектные модули ASM_SRC=kernel/asm/init.s \ kernel/asm/interrupt.s \ - kernel/asm/switch_task.s \ kernel/asm/sys_calls.s \ kernel/asm/usr.s \ kernel/asm/sse.s \ kernel/asm/gdt.s \ + kernel/asm/paging.s \ kernel/asm/regs.s \ kernel/src/lib/setjmp.s \ - kernel/src/sys/v8086.s \ + kernel/asm/switch_task.s \ +# kernel/src/sys/v8086.s \ ASM=$(ASM_SRC:%.s=$(OBJ_DIRECTORY)/%.o) -SOURCES=kernel/src/sys/bootscreen.c \ - kernel/src/sys/cpu_isr.c \ - $(GAMEBOY) \ - kernel/src/sys/acpi.c \ +SOURCES=\ kernel/src/sys/cpuinfo.c \ + kernel/src/sys/cpu_isr.c \ kernel/src/sys/gdt.c \ kernel/src/sys/tss.c \ kernel/src/sys/idt.c \ kernel/src/sys/isr.c \ - kernel/src/sys/memory.c \ - kernel/src/sys/scheduler.c \ - kernel/src/sys/sync.c \ - kernel/src/sys/syscalls.c \ - kernel/src/sys/system.c \ + kernel/src/io/ports.c \ + kernel/src/io/serial_port.c \ + kernel/src/lib/string.c \ + kernel/src/drv/fpu.c \ kernel/src/sys/timer.c \ - kernel/src/sys/elf.c \ - kernel/src/lib/list.c \ - kernel/src/lib/dan.c \ + kernel/src/sys/logo.c \ + kernel/src/lib/math/math.c \ + kernel/src/mem/pmm.c \ + kernel/src/mem/vmm.c \ + $(wildcard kernel/src/lib/libvector/src/*.c) \ + $(wildcard kernel/src/lib/libstring/src/*.c) \ kernel/src/lib/stdio.c \ - kernel/src/lib/string.c \ kernel/src/lib/split.c \ - kernel/src/io/tty.c \ - kernel/src/io/status_sounds.c \ - kernel/src/io/status_loggers.c \ kernel/src/io/screen.c \ - kernel/src/drv/cmos.c \ - kernel/src/drv/vfs_new.c \ + kernel/src/io/tty.c \ + kernel/src/fs/tarfs.c \ + kernel/src/fs/fsm.c \ + kernel/src/fs/nvfs.c \ + kernel/src/fs/natfs.c \ + kernel/src/fs/iso9660.c \ + kernel/src/lib/php/str_replace.c \ + kernel/src/sys/scheduler.c \ + kernel/src/lib/php/explode.c \ + kernel/src/lib/php/pathinfo.c \ + kernel/src/lib/elk/elk.c \ + kernel/src/lib/elk/elk_engine.c \ + kernel/src/lib/elk/elk_libs.c \ + kernel/src/lib/elk/jse_func.c \ + $(wildcard kernel/src/lib/elk/ext/*.c) \ + kernel/src/lib/freeada/ada.c \ + kernel/src/drv/psf.c \ + kernel/src/sys/unwind.c \ + kernel/src/fs/NatSuki.c \ + kernel/src/drv/disk/initrd.c \ + kernel/src/drv/disk/dpm.c \ + kernel/src/lib/list.c \ + kernel/src/sys/sync.c \ + kernel/src/gui/basics.c \ + kernel/src/lib/pixel.c \ + kernel/src/sys/bootscreen.c \ + kernel/src/debug/hexview.c \ kernel/src/drv/video/vbe.c \ kernel/src/drv/input/keyboard.c \ kernel/src/drv/input/mouse.c \ + kernel/src/sys/syscalls.c \ + kernel/src/sys/testing.c \ + kernel/src/sys/trigger.c \ + kernel/src/lib/rand.c \ + kernel/src/drv/cmos.c \ kernel/src/drv/beeper.c \ - kernel/src/drv/fpu.c \ - kernel/src/drv/rtl8139.c \ - kernel/src/drv/pci.c \ - kernel/src/io/ports.c \ - kernel/src/fs/sefs.c \ - kernel/src/fs/milla.c \ - kernel/src/fs/NatSuki.c \ kernel/src/user/env.c \ - kernel/src/sys/logo.c \ - kernel/src/io/port_io.c \ + kernel/src/drv/pci.c \ kernel/src/gui/pointutils.c \ - kernel/src/gui/eki.c \ kernel/src/gui/line.c \ kernel/src/gui/circle.c \ - kernel/src/drv/audio/ac97.c \ - kernel/src/toys/piano.c \ - kernel/src/toys/minesweeper.c \ - kernel/src/toys/diskctl.c \ - kernel/src/toys/danview.c \ - kernel/src/toys/mala.c \ - kernel/src/toys/dino.c \ - kernel/src/toys/calendar.c \ - kernel/src/sys/testing.c \ - kernel/src/sys/trigger.c \ - kernel/src/lib/pixel.c \ - kernel/src/lib/tui.c \ - kernel/src/lib/rand.c \ - kernel/src/lib/sprintf.c \ - kernel/src/lib/php/str_replace.c \ - kernel/src/extra/texplorer.c \ - kernel/src/io/shell.c \ - kernel/src/sys/unwind.c \ - kernel/src/sys/fxsave_region.c \ - kernel/src/net/endianess.c \ - kernel/src/net/cards.c \ - kernel/src/net/ethernet.c \ - kernel/src/net/arp.c \ - kernel/src/drv/disk/mbr.c \ - kernel/src/drv/disk/floppy.c \ - kernel/src/drv/disk/ata.c \ - kernel/src/drv/disk/atapi.c \ - kernel/src/fs/fat12.c \ - kernel/src/fs/smfs.c \ - kernel/src/debug/hexview.c \ - kernel/src/debug/ubsan.c \ - kernel/src/fmt/tga.c \ - kernel/src/fmt/tga_extract.c \ - kernel/src/sys/pixfmt.c \ kernel/src/lib/math/exp.c \ kernel/src/lib/math/log.c \ kernel/src/lib/math/pow.c \ kernel/src/lib/math/acos.c \ kernel/src/lib/math/asin.c \ kernel/src/lib/math/atan.c \ + kernel/src/lib/math/modf.c \ kernel/src/lib/math/integral.c \ kernel/src/lib/math/sin.c \ kernel/src/lib/math/cos.c \ kernel/src/lib/math/tan.c \ kernel/src/lib/math/sqrt.c \ + kernel/src/io/rgb_image.c \ + $(wildcard kernel/src/lib/libstring/*.c) \ kernel/src/lib/math/cbrt.c \ - kernel/src/lib/math/math.c \ - kernel/src/gui/basics.c \ - kernel/src/gui/render.c \ - kernel/src/drv/psf.c \ - kernel/src/gui/window.c \ - kernel/src/gui/widget.c \ - kernel/src/gui/widget_button.c \ - kernel/src/gui/widget_label.c \ - kernel/src/gui/widget_image.c \ - kernel/src/gui/parallel_desktop.c \ - kernel/src/lib/base64.c \ - kernel/src/io/duke_image.c \ kernel/src/sys/cpuid.c \ + kernel/src/drv/disk/ata.c \ + kernel/src/drv/disk/atapi.c \ kernel/src/sys/cputemp.c \ - $(wildcard kernel/src/compress/zlib/*.c) \ - kernel/src/zlibtest.c \ + kernel/src/net/endianess.c \ + kernel/src/net/cards.c \ + kernel/src/net/ethernet.c \ + kernel/src/net/arp.c \ + kernel/src/net/ipv4.c \ + kernel/src/net/udp.c \ + kernel/src/net/dhcp.c \ + kernel/src/net/icmp.c \ + kernel/src/sys/system.c \ + kernel/src/io/status_sounds.c \ + kernel/src/io/status_loggers.c \ + kernel/src/extra/cli.c \ + kernel/src/sys/variable.c \ + kernel/src/fs/fat32.c \ + kernel/src/sys/fxsave_region.c \ + kernel/src/toys/gfxbench.c \ + kernel/src/toys/miniplay.c \ + kernel/src/drv/rtl8139.c \ + kernel/src/fmt/tga.c \ + kernel/src/lib/sprintf.c \ + kernel/src/debug/ubsan.c \ + kernel/src/fmt/tga_extract.c \ + kernel/src/drv/disk/floppy.c \ + kernel/src/drv/disk/ata_dma.c \ + kernel/src/drv/audio/ac97.c \ + kernel/src/sys/elf.c \ + kernel/src/sys/acpi.c \ + kernel/src/sys/pixfmt.c \ + kernel/src/desktop/render.c \ + kernel/src/desktop/window.c \ + kernel/src/desktop/widget.c \ + kernel/src/desktop/widget_button.c \ + kernel/src/desktop/widget_progress.c \ + kernel/src/desktop/widget_image.c \ + kernel/src/desktop/widget_label.c \ + kernel/src/desktop/eki.c \ + kernel/src/desktop/parallel_desktop.c \ + kernel/src/sys/mtrr.c \ + kernel/src/net/net_info_cli.c \ + kernel/src/toys/mala.c \ + kernel/src/debug/memmeter.c \ + kernel/src/drv/disk/ahci.c \ + kernel/src/drv/disk/ndpm.c \ + kernel/src/toys/minesweeper.c \ + kernel/src/toys/calendar.c \ + kernel/src/toys/diskctl.c \ + kernel/src/lib/utf_conversion.c \ + kernel/src/lib/base64.c \ kernel/src/kernel.c \ - # kernel/src/fs/lucario/fs.c \ - # kernel/src/drv/ata_dma.c \ + $(GAMEBOY) \ +# kernel/src/toys/pavi.c \ + kernel/src/lib/duktape.c \ + kernel/src/toys/piano.c \ + $(wildcard kernel/src/compress/zlib/*.c) \ + kernel/src/toys/dino.c \ + kernel/src/lib/tui.c \ + kernel/src/extra/texplorer.c \ + kernel/src/drv/disk/mbr.c \ + kernel/src/fs/fat12.c \ + kernel/src/fs/smfs.c \ RUST_DIR = rust/ RUST_TARGET = i686-unknown-none @@ -195,19 +241,11 @@ OBJS = $(SOURCES:%.c=$(OBJ_DIRECTORY)/%.o) DEPS = $(OBJS:%.o=%.d) -KERNEL = iso/boot/kernel.elf - KERNEL_NEED = $(ASM) $(OBJS) $(CPP_CODE) -DEBUG = #-ggdb3 #-Werror - -COMMON_FLAGS = -nostdlib -fno-stack-protector -fno-builtin -m32 -Ikernel/include/ -ffreestanding \ +COMMON_FLAGS = -O0 -nostdlib -fno-stack-protector -fno-builtin -Ikernel/include/ -ffreestanding \ -Wall -Wno-div-by-zero -Wno-address-of-packed-member -Wno-implicit-function-declaration \ - -mno-red-zone -march=i386 -MMD -MP -Wno-everything - -ifeq ($(USE_SSE),true) - COMMON_FLAGS := $(COMMON_FLAGS) -msse2 -DUSE_SSE -endif + -mno-red-zone -MMD -MP # Флаги компилятора языка C CFLAGS=$(DEBUG) $(ADDCFLAGS) $(COMMON_FLAGS) @@ -215,11 +253,23 @@ CPP_FLAGS=$(DEBUG) $(COMMON_FLAGS) -fno-use-cxa-atexit -fno-exceptions -fno-rtti LD ?= ld.lld # Флаги компоновщика -LDFLAGS=-T kernel/asm/link.ld -m elf_i386 +LDFLAGS=-T kernel/asm/link.ld # Флаги ассемблера ASFLAGS=--32 +ifeq ($(USE_SSE),true) + COMMON_FLAGS := $(COMMON_FLAGS) -msse2 -DUSE_SSE +endif + +ifeq ($(X64),true) + COMMON_FLAGS := $(COMMON_FLAGS) -DSAYORI64 + LDFLAGS := $(LDFLAGS) -m elf_x86_64 +else + LDFLAGS := $(LDFLAGS) -m elf_i386 +endif + + QEMU ?= qemu-system-i386 # Memory minimal: 33 MB @@ -238,15 +288,27 @@ endif # NOTE: -d int works only when using tcg accelerator (no KVM) QEMU_FLAGS = -cdrom kernel.iso -m $(MEMORY_SIZE) \ - -name "SayoriOS Soul v0.3.3 (Dev)" \ + -name "SayoriOS v0.3.4 Soul - Scythe" \ -rtc base=localtime \ -d guest_errors,cpu_reset,int \ -audiodev pa,id=pa0 \ -smp 1 \ - -netdev user,id=net0 \ + -netdev user,id=net0,net=192.168.111.0,dhcpstart=192.168.111.128 \ -device rtl8139,netdev=net0,id=mydev0 \ -M pcspk-audiodev=pa0 \ -device AC97 \ -boot d \ -cpu core2duo-v1 \ + -object filter-dump,id=dump0,netdev=net0,file=netdump.pcap \ $(KVM_QEMU_FLAGS) + +# NOTE: -d int works only when using tcg accelerator (no KVM) +QEMU_FLAGS_WSL = -m $(MEMORY_SIZE) \ + -name "SayoriOS v0.3.4 Soul - Scythe" \ + -rtc base=localtime \ + -smp 1 \ + -netdev user,id=net0,net=192.168.111.0,dhcpstart=192.168.111.128 \ + -device rtl8139,netdev=net0,id=mydev0 \ + -device AC97 \ + -boot d \ + -cpu core2duo-v1 diff --git a/iso/boot/grub/background.tga b/iso/boot/grub/background.tga new file mode 100644 index 0000000000000000000000000000000000000000..6cdec2cc0d026e4102f875103e78479d11066056 GIT binary patch literal 54582 zcmeI5Ypf+zmB*{jxwr4_R=&&!KKWtd2Qx7lKA4yo6BA>ChByvkUHN|(n z^PS?l>#i%VzWVCol1nZr&N}O?;*diQDfZZ74|jDMk7W-({BUthvC^`~9(%0#s=C^1 zuf2*58#WZ%wrwk}xZ;Z9Ti^PYy8HUqzaG2#gILQ z1Sn2dXYY8&JBoA8Ij2C&mtTIlIF8?sUw!q};@M}P6-*!b$VZB^w`br|c>T16K91*~ z5nVp`;DZwA6b*>RR{a-yKnJ>AN-(r z?X}kmbujwpKmS?$^rt^9jyU3oVpE?%W~7v+8aO}iyz`1zUU{WBLxcbBcfT{9QXzlK zTi!B-CmwmSM%{h)-HUI3``ZNw>On~cx?nDkYU+4KlFjsYEdS(R``XtE6x<|9u)Xd* zfnR11Jn+E8KY#q=A6tqX<3IJ(Q^i+#ApheZ|5&VBx6WbE)LGr=8#Vf-O`A$p-+-ka zfBbQ|{ZU69RbU=e```yZSYV(NPB@{s_S$QUpZw$}3QjxRr$7DaDVZ1F{qA=ccinYY zjNp6jxub5Xl;=2r~xra@BA0P_(gH( zp@$aosKqzG`OU>?r=3y`m#0I$wC^-G^zG^f$lxjYC1E$5C|eHRzJvbkj|f zaS0_@+tK*`_rJgRBwQ<(AmuBSJQ_^&%X4fFHJi6<~P4NHF5^o+JwLQ)vpRTN*tMy z@_d~nQ3>pE&4^~4iToQ!(urI!{LBhG5P1j;%0+;asrc@{qccCHZ`=0;*$c@!c<3DlKc zv!|badLkTm!qu)cFq(x!DMiH?ATPiC@`7jZ9rZhcA;^E9`OIgW5i{8SXvWNb{_~#~ z>yT?imb~MRJCwwnLE&7x3isPdpLpVliMQjC9v{9{rIUT(3tyOABW?{?6@xi|!TjzN zClp1DD4!UN#B?%3=Lk)~~0$uYWb58PGQa0}WfAlTSX`#ZU%s`xpo`BR_zl*i0Td3d<$r;^Jv5`+_D zy}orIiBF9viNq-1a?33faIn3So|M9(ANarrCKmYq_rE{6A3jmtpWS@(&68_qoNJeWc zH0_yKmLRhgfjai3k?D`R3@+lg&@WO@w=iR(M)%0b=bAOL&xnfP%U}MoI8*$!Oi;q4 zr<`(1K_y6^+(myBp6`0syISCnnJyzKsEWy;2J3>S!>D$yDynrRxDxAIaSAH}QL5yS zI*Mw51sH$^RCpUDsRNK{!mYR7YU}4bPZ)T3h}U9;>kiC~8#hk81)sOKFtt$}jDQCp z!$|s_d>LT$`y9B*g)XWh(D}BNsVatBi=dj6+;-b-Wzk)FeTG~PZ>m>E9~v1<5|OWw z8rra_1N46Y)G9&Rs_;hyGr@wj6)+-apmRVnd-9O@nZetP$wfu&-SO38E*A)NvWqu7+dPyJ}HfY=f-$8OWR4y?-n z%a&lq;M9)`lb%_AxRe{RNWvL2Lt6w9@J0zG+X_l814Lmn*vR(-M=Z=UvYhWH@Bzn4 z0D=o+KyV~LAS4MVp(;35n8@+-_@9;mGO9dZBM94ctOMqf2uzNmtpA9bN2oxDR6Z(1 zGlnz>_uqg2!~!sut%dNgrCA9zEEE-&{pX~UPMTaJ4n>UtDbofi%;eFmTOBAD0*alR(87HUO7IvmqHfYcmO()&StTpL>&m@;_EOiOQ8jH!;T3IMvM0A$kcdae$bvV_6s3`|)ILJ{-ys{`hIfRQqy z%Afu0XT=GSV2%g~uNyM_!=Ny@g@;zHJjDV*B1`9FS6IvU1BG3^3_0$1NNnA@bpi?# zis(7u$%@DBrD<^a$00TmB8e}AH)2j{)72u-F5m^hakClzG0?Lqbbz??ZVI`?o zEPR|aX3()+pMbGYB}L-{zD6$sBY)>R-#O)Fu~3!rzL&XLGaz65;uj}Zy}! ztbKOTtqvF!Rbu!Ngo<6L8x%sSZkge2#g*zn(W(dQr=>?27<{SfK@Oi1M4)p>uzc(1 zfBW0tPI-!-$KRmiW^fKZ_}~c;P2n?7zdB&#brNt)N=9(v90F8EQhKCV6FDw3L&pbL z1jU!|8%UV+iwe=(GJa!_Semhtfn&@`6a?IFP~aqo1+}`p1s^te_)-ZJQxV@=@(iGA z!KF6T7|VS!vva7GUQJck1%o;ORSI}bnu?sFj)G6MPYz8}ttgI1Bz2NIFlg>qf|Mg* znRO7&3R2x$@sQ1Y9g(dN6KjLSu8FU~V6y<>HO&BNNeAA{;5GwPu2`^~GEc`ka8&PU zZDzzm9N>_zJYir}z=TVZhO4{+j_0^sg9Ypz<;)5@`x>@4XOTOsICDCK!C1bAS!Tgt zv^p@{UnF`>p4nV+!3Wd1Pl|~)y&A#L3|cFtgpGlK;v`^BMqu`TrYunc!RodL#+$s9 zL7n1j)W{aR6tGOi1eWiE`T7BY1b&v$3_^L04S^HyHao&vC+pp6SD3X`}}MLmK> zz$`)0{Eitq>v&9QSs%bzN!MEI$*7*~5fLyEwpN4GKfYklAby8an3Wkgu3J$gvj>&e zDCznES58)#*ji^KW>k+4Te33RghwNQwgMXs7MOUIa#A`@>PCPEaMYO&rz%h`0PzkB zgwvCOynqJ9mKhIqN;3Dj}1B&%1_Xm3kj0`96wKCIH^=$_y5Az)>262+N zv}~G{Q$`d<2~R_7z{%OJDM^_ywa1lncK9*wF&tv$S~t97FrJR9bENXFU^o$)GUQLhG3Nn1xijD3dsAg7&RXeBu*R zw2UE z+J+6GZF@EpT^iyyR<2yBf%=#!>nUXiW^M)-pYkXykQ**?A4^fbj=jwr^D|LdBIsG| zwgQ2OJST0yF8&>6z^m*%W$lEvjnKGmp$3Tiq&Wk`q${Vy7hJxT+k}uP$=B9n9S^UW z1&!4d!^ARu8G7tM2-che0K5Ax`hX|gD;!1`SV2_fN-yxlk5n;|EN5KI;jxceS)F1Q z;Qm>-#S7Jc-UX9(SQki)010bAp6p-RBdBXg+=dGadD$XzPEP5^4uFce5m^h4qBl)! zRSH-MYAuvd=;n9<>e{1OkT-M1*E2@Y1QSbqMZM>688R9M#yIlGBPRvKd>^$&WbQbj z(u*|!sMQKsWQ6W8AiaAWOpV*f)V;8(gI$HIeH7TG{%(K>q2Iic5P01Te`OIA_?e#( zK+N6|14wv%0Re3m3}k@dJ7_|JujVHT2WS9)p(lD|hDNqzKLwArL6~rmeQglv#0Ftq zK?^(?G3Dhuyqh&qjlUW=i5jG%BBw-w4a4pqRKqxymY3K}7xPUfs?v%FW5}W2Kn+0& zPV~d$l)sF~k~G|)x#r5Gn>@`N$LlM>h#q-IB41}@<+{?yXOR+e-bJ7~cQz)#wH>b{ z#+(&UF@nsYxRC+Go|w|{#G1ZYmDdEGdFGkPdx_L+&I$8jbvyzV(d3r{nH)kh?gN0T zQg={Oi!usZwsi=1GZaeW-G0Rb6;am(4FZ%3yTpY_cWEWk4G2yZ7+Kmy9~2s_5|*c%2QVrA_STguE5_^n)g3`C>{3X{0bpm)?} z08&{5Gl=gp%3sy(W30?hYk2R#Tc%WqRF^1ePn+*Gs_n)UyKF$QCJR?f5ClB1Or+C9Bt~=^|bXd3jNj<)bjU}Fh2w6oWeNy*8h0YZs)|L0=8hg77 z5!9RBW)lf#q|?SH?yf%JJwV1Gs2ZQTr}~uMpUasOK}+ z?i+5Y52gW^0hbs(gEI`yFgU|7K^-QjDj^0s9O!VM!+{P5IvnV*o(TtB23%r>7@T2n zhQS$z^}4iN7?@#ThJhIdW*C@3OgPZtK!*bz4suSf;@mk54RXrHt zqGZeqk`W57T+2TxUOGm1%%L?jjw#`re!fqK$*f%ESWJza@j(`SOef=9psF+x)tS5e z1&Vkq&H~5Oa0nBKaUK!Jg8A6lYVSVZwtDSG>Bd=UG!6;&m*}Rg;3Hz%$J6Oa(Joyr zG=#LD05)w1s7Z5r^|&8IA#~%7=Z0K+Qdz8_6*@oR+WCVxtb6OShJTB6B{;$Bd^#kh{B*E%FdQa!Ou0&mGWBgPa=@Xh9Bgs*1G>(fC zPcCq{8;w)8X&eOTC`@8E+ONIe9br92kOwYuL>ylf$DT9}r{-u%WrT{4>{z>S@|!eS z3?9WHbu=sh`Z{&G5~-<$bbjC%?%@9^pw&l0<<5IGD^ zQY}tDjZhqp%+Yr~i;@p7>b_+dl|0TtY#hUg%;*V=agHyC*HzgLn@DE)8u!yU7_BO0 zlzRbL7#le_=@3p_%c*F}2Y8lbS;a}%AOhC(3s3MV@K_yGyh)?UR-tcX;51F*76v9$ za4aP`MqaeUk$0TI2v2heEt;Y=pHjg$tO2>4#vzw_ZpWx&C3@DKV^SHJ`y$tjLB@R5HkAq$d%DrZb`Rw;oW9^m{Gd;ie&4ow@%5daD9tsb@El~lUQ(R)`I9W9V5mRMB31j zbe*+xWQS4U@#d)2Z|3@^jy~>$Lq9v%Tf6#S$_HY&FfRpDX!%mR4ifiPVlpQKp z(wr^tn;Rje&56HxIicj4Hb3fzwQ*6c?%$=B=Q@6J!k8)*7k80OiT@>cR+14mWvN%>BC^z(-K8AV?XA)}a=dih!p8>si)y7oRlRzxK_ z09~0=^BQak+cJwGV+cI6bOX4_MH^$jGyJP)?P55QNr^^}-79*zGe>r3LCZ;X(ijZe&*^4?Gdu)={i>4`<; zLngkVLt|xuZ|>-~%Xm^)zv$=NdVVzDi)6pfx~ELr=5xvD%der-&tbVx^G=GsB*eHA-Kf7yVtJuma2X zSyJDSLrUJ$QjCRVh*md`Wh>u5t)Lfk5&VBM7B*bKD}be z4msqI$*5SIc^)lhvsgJGOROx%2OfB!?qhDu{-oqyV&9NPH4;8OIp6rztA7_gj9l=hrkK%P**t&pN28|o>>`2g(Z_h^c|?l2 zxI-V8^0VX--_=(NX&8MsjkEeIDJ$s8cG)NL=y;Y#``BFfc0yCQ*GpO(NdeJjo@mMt z@T1sg8T$lZqi%*USZAY!d|;npEsDmhriwD`WJLHBV^|SmuS-|EtU<<^EGygW2GN)) zz$=~;1u09rPtTj29|HH0VI*T*A!VhHwHo%LsHs_jlZWQ$#SCShzeUVOp(f|sV&-r@ ziAQ6uRE@Aw+91Ea3@lz|9!EnqKShr;q?Fdt?#N4KQN|>!h9R4Mjj9+uXw1vI`I^~d+Ok!I z>m}DyJ*@AHFg=QWw;k)MB-q+dCA#Y)d(*mCpRCtG7HW+QBb|6n%satr{7%WVc3sBz zJ?++S$^d0OL5;9|HmrJR8cFq6s@z0G`buA$#CRXia%5K<`@VMkjBz5{QeCXH`=Y{0 z-%{0@S&T>`%~2cpk}nNfw!ma1gH!Xt5H!AqT}6}oB=M3yVz+V+9L>5PvCO-lv~m_1 zI4@c%zAXW|Aybfdsxrs>D{EuAXPMuz8$x#Gv%2gy!0h2IDC&Jlt@rTs?$rXTFT?_j z$#XDoQ&tHwqrKyceHj|-WWEykFS2VyyOcci1O9%BpJ-rayN8_0yAzTpW1UcWX_5U; zP-R9I<}zevS#Hc5gJ^_i-02wsPqS9WRWhd|DD2UfyMkS011DOPZNzFEEoJ?qR=$NR z9W%a!s;ri6+O(;&mr2e}mNjne@{4WeSiie38SidZs7i+~=;;|$s(0125*243V56LC2vtbQZDJ)-z z;F2#xc4BPvC3zR7h0XM_<1BJ}D_Jq9K($LPc4^z438CJz-j`$x`Y zVYh}nV!XqC5dZHh;a$(CS9S$dx9c;z`Uq-9PD{Oe-uO4Ke9qShljUhCTbFtSsaZkV z$bg=wV&qY~znBf`EmY;VaS81)Cx>>a!+$6NK4I4HT zYau_qSw?L~Yhm3uSA@}#D6HOIfBp5{d3Q~CON#oO*$cb2>>h;O$}o@Ib=jCqMPn~V zY?y(&S0s7s$#!A?hX$go0AUxHn8sfxcqIiaY1H8Bxz*hqeDJ}Opz0F9VS$LnZ_{(w za%-dKuv8AM)JM`QO;q1(xfaUQAHAVv^!!mfT9#*eEXT_{ ze`})ixF9!X(KRgGLC6|uRoJw<{PN4SG0FxPbjfyR)pD`aTx7$QMmf#&oz_C;apM}M zftvWEi?s}*#9*(Q<{o2^meJt~bnT~@($jWb0uQB2d?hx%TpgA)ZHJI-*}~?<8Q=-8 zK6y!GdJB%FNV9KvMU|J3jN3GlO%WSj+$Kr5pYXa^8;gf@%9Kpp)#^P}E7seri^Nqg zEDP**Z!mARp_;OT89LE&4hO2AIX>>O=KF$~v0bw+nE9S|E2p@s5F9hjqgJEgjXTPY zDc-3j>6IonZnjc0m;+D9V_!%`DV z!+L?ro)mYFQ+(ewr<_39>Qj` zy{!Wq$Jbxrd@N%$**FQWDYdZj_@ILh(zxivgj>GS=t+*k`L;_VG0i0@gV;~!_uh`M zN18@XSk`M=@zqpD>l^xN_Iv5u!8goD^EK>(pU327Qd+z9Q>>M@$1INrX{ZHuq zy4$x|V!$p`d4VhVBl(ocWygiU{NZKwUM#-Aq(3Z_lP?%O^+4kgUJHfM6NwL<{S5n$Zv!ST$^%~yuF8Swc94m3ssM9!C{U~Z1uovF-tVZRS$m? zANIhY3)204D7B5TW($nkHvGv6^&5XKv@`spigJDSNVQM%iMhXn_xEM(_&R>QC-q0& zD0Yx^v5Ajn@{s;)lErYUeHzs!ud}hZ8>(8E9S&E#EU;uw3o8ozCe1?Pvy62ouL^g~ zKf*+R#veS0m$*_Z>dL>sO<_ARNRG#mXTr)*$TjrGstN4HHU2-WHSe-{Xf^E3fg&{Q zfnBf<+S1UT*Kf?=;l9FTa`{PYSMK0kEr?Q&;MoczTVaUdOWr zk(nyMN}i55q=c8sUcHCZqY>&us+4MrL!S&=$SK_M4+pA>mPPwWXKVxW#fiZFnFJzwkxI{S!{_(AB8{D3H%ieU}(w@ z-a&ARXYtUB?$0G?<_v z4fbIiHlEnQ23uNv){!Lo>t`mAad5J8bw_^1-c?)6Dn=*@{ zh`%M%MoMR!bdj-&VXw)HWYuYK8M5}YZ9k^%85Z=3}qS5B{3w{D$J z-M&I(9rjpwCI9~Bo7H3akKk0_BTfUPF;&nFSE}D|NF~SpsNeL)vOE1GmE9-xEKLiA zbf-RZ=3o%*0~#T@sjk0G+^U72FeQTrIgv_tzux}qx*kvGkwx+;87(YY!Or?iXnyB}_uPN4 UefQe?KmYxJ_wMx{d+w3_FSZxgYybcN literal 0 HcmV?d00001 diff --git a/iso/boot/grub/grub.cfg b/iso/boot/grub/grub.cfg old mode 100755 new mode 100644 index f7c1bc6fb..2f7862f1f --- a/iso/boot/grub/grub.cfg +++ b/iso/boot/grub/grub.cfg @@ -1,47 +1,61 @@ # Импорт модулей -insmod gfxterm + +set timeout=5 + insmod vbe insmod vga +insmod video_bochs +insmod video_cirrus +insmod gfxterm +insmod gfxmenu +insmod tga + +terminal_input console +terminal_output gfxterm -timeout=5 +set theme=/boot/grub/theme.txt +export theme -menuentry "SayoriOS Soul v0.3.3" { - multiboot /boot/kernel.elf NatSuki-Login=Test NatSuki-Password="Password" - module /boot/sayori_sefs.img initrd_sefs; +menuentry "SayoriOS Soul v0.3.4 Alpha" { + multiboot /boot/kernel.elf + module /boot/ramdisk initrd_tarfs; boot } -menuentry --hotkey=f "SayoriOS Soul v0.3.3 [No Floppy Support]" { - multiboot /boot/kernel.elf disable=floppy - module /boot/sayori_sefs.img initrd_sefs; +menuentry --hotkey=w "SayoriOS Soul v0.3.4 Alpha [VMWare]" { + multiboot /boot/kernel.elf disable=rdsp + module /boot/ramdisk initrd_tarfs; boot } +menuentry --hotkey=f "SayoriOS Soul v0.3.4 Alpha [No Floppy Support]" { + multiboot /boot/kernel.elf disable=floppy + module /boot/ramdisk initrd_tarfs; + boot +} -menuentry "SayoriOS Soul v0.3.3 [Minimal Bootscreen]" { +menuentry "SayoriOS Soul v0.3.x Alpha [Minimal Bootscreen]" { multiboot /boot/kernel.elf bootscreen=minimal disable=network - module /boot/sayori_sefs.img initrd_sefs; + module /boot/ramdisk initrd_tarfs; boot } -menuentry --hotkey=f "SayoriOS Soul v0.3.3 [FAST+]" { +menuentry --hotkey=f "SayoriOS Soul v0.3.4 Alpha [FAST+]" { multiboot /boot/kernel.elf disable=coms disable=ac97 disable=pc-speaker disable=floppy disable=network bootscreen=minimal bootscreen=no-logs - module /boot/sayori_sefs.img initrd_sefs; + module /boot/ramdisk initrd_tarfs; boot } -menuentry --hotkey=n "SayoriOS Soul v0.3.3 [NatSuki]" { +menuentry --hotkey=n "SayoriOS Soul v0.3.4 Alpha [NatSuki]" { multiboot /boot/kernel.elf - module /boot/sayori_sefs.img initrd_sefs; + module /boot/ramdisk initrd_tarfs; boot } -menuentry --hotkey=p 'List PCI' { - lspci -} menuentry --hotkey=r 'Reboot' { reboot } -menuentry --hotkey=h 'Halt' { + +menuentry --hotkey=h 'Power off' { halt -} \ No newline at end of file +} diff --git a/iso/boot/grub/theme.txt b/iso/boot/grub/theme.txt new file mode 100644 index 000000000..2098285c2 --- /dev/null +++ b/iso/boot/grub/theme.txt @@ -0,0 +1,25 @@ +desktop-color: "#24282c" +desktop-image: "background.tga" + ++ boot_menu { + left = 15% + width = 70% + top = 30% + height = 45% + item_height = 30 + item_padding = 5 + icon_width = 32 + icon_height = 32 + item_icon_space = 20 + item_spacing = 5 + item_color = "#cccccc" + selected_item_color = "#00ff00" +} + ++ hbox { + left = 50%-250 + top = 80% + width = 500 + + label { width = 250 height = 20 align = "center" color = "#ffffff" text = "E = Edit Boot Options" } + + label { width = 250 height = 20 align = "center" color = "#ffffff" text = "C = GRUB Commandline" } +} diff --git a/iso/boot/ramdisk b/iso/boot/ramdisk new file mode 100644 index 0000000000000000000000000000000000000000..1ffdf91733d3416ac7405b0435a63b92406efb57 GIT binary patch literal 1914880 zcmeEv3tSUd_Wy*0@DKt49|5h-1RoI*0ePt~#Ro>KmH5O~ZA3w&KCp@fssai=T2Mi) z+HTvmTetL`+NwqS0wdHAW=TrX*4^z++QQmw+l}4T+H5!ZfA379(8qRvzhB$m|MyuE zGIJm2o_p`P_nv$1IcJ90aT{~i)rT*_z;MV%j%PIVsnnTw3 z53m2kgm|oZvj5*&|Kk%N2K24}pJ_aLqAkyyJzXM^+)VPJq?9K{Cn9zA6fq0znDV7G zR4^4J=7$RDG_Ewh57?u2=h9DFSVmZm5V^LIQuk8x?vy##bGK;Ox{ zK^jt>>0iApsQS*(>V^F|-GiAos_{n(tg7w%_EDgZ0(}(dqd*@8`Y6yxfj$cKQJ{|k zeH7@UKpzGADDYEJpjtNENDktCpFRroQJ{|keH7@UKpzGAD9}fNJ___vppOE56zHQs z9|it1D3D#Sb}d~{M6WH($-VtQqsx80?4v**1^Ot^M}a;H^iiOX0(}(dqd*@8`Y6yx zfj$cSM^K=@r%Rv)V{oS?EBtr*ObPa#Rw-TC zY$U}5m_5k)Jz(O$1ykUGA^24I`QoRYvyhTdl17q-rcyqhFoKkJ>ePv}1`wm^`0=p` zvGH_5T*COc)Hne#fw=V{WxXF6b=B?fjo?n=if_exM1_3P9yFdNHwjW=anDBzsVWR9 zDI_CQ%n$SNq3$Gcxyz#;9j&*ys!3#itQS64b0Nq$9CgiQwufprY z@~GJLg++O>`Rg~wZrE73A#Y<*DHXe7(70m2%HaoL4XSa+~2`HWADXw@l$^O_4}XV;^ULY3-5o5iyNPi z6p#1B#U~-y_x`7!atwY5*Zp|;B}Sc2C)b=(4c^`+1RynRTCG7aMonG{sE$$N^>C%@ z^NPsZ-@Xm8DW|k>V?p62KyBEVw+S2mrtbq=xq0J8o;o zQW3OdG}l64)2NrOpG<}!UUoyR`?*Juy572i}jsG4f4E+yH#lH0a1q$@$ z|0{FW-=DMTr``a5g#X7S;$^SG`+u<&j3@60#)|;Q_r3q~7nuz`*|0eJ`c-fPm|s-7 zHctb_82Ft;bzI4G;X}B~j~4fqUyFB)W*6jw;U=P(HM>`WH9lpO^vs$oh{@NJ${;e|%Cx^7v%(p73~tA^&^Nuscv>Al81$^18Lg z@|tyjY~b3wB5zfYUbX}h;S4R9NUz$wUJ!pYIio$vBx_?{(Pp%#Cr`=&2OwG7VuTxM z@4s1^fC7E5;<5G#ucu(H+Ge# zhv-cP)BD=z?3=HB?m4vH+&RN#jZuVj%P z>iNP^A!|OpATMVfWL{m5^MdetX^q-)1k>SF%!2)xPz|)@6&jP{Ez6sjjBk;-K~Ee_ zww|ArEBwbG@6G>nH|7-o#LOR*{1N^imynPm^8fe*$bu>4{qM;MNqzkPmzacv{T~zf zawXx}WT}BITTX&O6V6{9+)Kn$Ps0QOpIu4R0KtL5fh4F=k59l#7A^@%$q0(qxRUtz zgoN?qdx0iG;)+p=*Z71~gvD#z;_1_;2_FIcm*{$59iTw(^`Cb?^fNy>1Nf2kpAbJj zUO4{|u`dCNKSBSO+_(OJi3uvmf4?T;7!l0``3;c<%Nv$c)(RSeAhuzeFayg8fPf*; z*6lQ8yK3tmYmIfEpd>3?o2xH@fEG9DX0)_-bfp+AUR{7wW&CJSk|T<#b$VC`R}><9 zUE$_Uc^Y!6Bl4PMw6|BpIMJt&|t7F#bOJZpCR=QM-l*Xv(t@KI~ z@pf29DH5|ut3BNyh=fLwUWlX-`{&IND55XvohXn)Un(YU6B@R@a05~0Zi5;Vq91rX z8RBn^Dx|5?NIQwKg`9<9##rwo!)!T2wt?4?{tD9fKnAl`BH?8s$O9BoKEyM~^$nKS zFdIDQ1mp*b;~UpweAncW#;sYAt1r$eD4Jflaq@bi;>}vWGEb9~5|fbX>9~h_$ihDv z$=kFkFIS)zihBUaAPUGZY)L8Kr8~WK>{xofZt~Pj0YRSlKTHVOwn2BiDUa@n0M%}} zIpm(I1q7LM7G%!zARscPP@YinCJp~f%j6~zg}tZ{{_Oo86}|Ej``Kl$$e|FQFb zd_2zlg8ui``9C4K&;Ij^j6Y<<9?QG}f*#QVK#(9pQ?Mxa9JRbQmdJiY*n1s};tf#@ z#2H{GO_+kU%32|4f1y2o8=}r0u#FvpHW=)L0276-M>mX91*ri)2$I%nqVk1!*@LqX zu95?;k_7z%39mqSf+tLl5vy|0Fi$)e@uH2JNtB2_CSqmI_Y1O&YV3zlVA}3Q(n*FKUg0r(F>mFOh{8#ejk@qFG=vU zaV1@_N$A;+)WGEBRpowvRpUKX<^J1MkrHB6LYZDw{UURr9tE$WW>nNi^MQ3dN)uHB4t zsMp4G@1|aiEq=|LNydIgq3gFybcazgok_0 zcTkg*g5i2CcO~=~x^xl^bCm$U3ZS=Ob3A8uZ|eldF`PXKbk8(WHIjQK#RD%nJ@-uW zw7jTb<(f@`ql4)0g({)OBJwS*nS_mq$hEi=u~v|3S82pvXyRjXh$w6kHEexCQc-W#_a@_92ALq5c))G1;QTb?ycVN^d0jd zDxL)bB1fK@C?F+@BPKlt;#(}d2?Uj*VCjVyK&9mjkxvEmLLq1##VFB9zk>RRBuQKc zpz(@<{C5+f<#ACAg)f8Pbx=uUQ&deFTn!He;@m)N%wlKXpsjl$+ED-7jghw~lXj5)FF`67ws-2g;HLk|XsiB9TrJihw*d-;1A)j;2?L zH3&*u;wC}p4gD&S)EiJ3NfYU!(hYfqt2Co>MvWH4-cfLZDp;RCN*tx90Vo{R;V?j0 zS!`_VB+qX&O(P_NJ>`+;iJo`=L?W0XYc$Chm8LfVeRE@CB~87 zSm1F1JhwE>1b$Ty4-VKDdTf2sbb_e6Ct%pr$c=n%`E8Jx z?@ADIUk8+M<|0aaqP%~T%y~cy4m}tIn03g&?M5ci_!F}Z0e#!LpQKyPh%K-@iGGpA z3jZAXql!aVCM27%2C@KO6_0X)VF=ZdY2N^p!cg`aS1fugKCISTE16(ixW0fWq9=|* zzZ$GZEU%1;75%b>Ih`69NLHAji~{z5pGlz}oIuHTU*wtT-_KPr$23B3$q5y7xYaoL zDiNZP!z$s5Z;U49j@Qv*Sf<43BeIv=!Weo}aY50_)#60^0ro`}p$CCrB=Mpkt5ooP z!cjV%?agq{{8-cJUei=qxm$4c%pFj!Cw6iW$Ea^dA{nJuFd$^O38NQg2hz_Vjc_}n z_#;0LuZf|HRu^oFq1WdX$K>XLWO?4!6C#u43_QK~J~{(CQUiXVn1BlF13QH{EYos| z@?z+DdHH!I8)E3`9$7Gko-Z)47<$g;bu02V{?LZim;RGdptt-7+4g5p0RD*l7YEl* z!Tvu!1z-Fxc%1)|;`{tRf6{UOA!J1VFOIq(7eV5xCVPY^Itd2e{h~8a&kdib>)?=w zuefu7brUWiNK(Cd7=eQR52r)epgk%;SdPI6fI<+Egpwj6QPdK)DFDRW)GZPb0SSZ~ zd)yGf%Jx}z1O}qzn(=T7_dF$pIu4;pH@ChMkSK`vYKjOM4K;5mtlyx|DJm=w6wuyvMD#RR zM*5t!8&>CFwI*UI^)7xZS3O?+qxtGY^}oO%i2Q<-|1W@qlfq^^GPnv)rQ`~L!T-ng zIRD+La%=r>ShFrRf5m?n&%Y}7uhxGe$&8B=_W#6$B&dRk{s*d{KK;+XBI!?-=k{Rw z@7|5WX#s<`yipz{#El~u;r@Yv4{^A)=H0y8G0jy+I~^I_<$Oj7?>0Fy%x*rzWMC+x z{FvI8{>H=}Ls%)JZ%YhMTdp=D}9;1VG^qN zpIwYP$?ra2wW=+c>L=YqRpO-|!IZyp*q#R|#UI+%cmMH^A3XB<>-j6!D?V%c;~yUR z_3LNGv%0KVnRjN*q32~z6Y7qOmxlXFCD^g*x?M_*)S&WVDSKqQaltT_R!}_U==}^Ekf7 z3@W30a_!XZnRw4g#@NZbroT7kt!e9~2hDh7X3WgXchIv^XP3;mn&Hl(GH#!`WBRYO zOD7-C7`Mb{*4!y87Gx~kw(!V|o4RG{pBFwkJ8jXH%s1{z zzT3UDbdi10gz5Fu>89Gj~bn%*Z<&cTZn(*Sv%CN6u6)`pu&H><1U$d)MttW-j~93i5T` zCEj~p59CJbm3mhHK-Q2~eNnIGTr_3XzM(=&f_*Vbi0x@_IEx~94D3ob1RSeco-J#TM*?(z*e zPfcO7E0zpcx@GBzW%NB8@y%NL+C6!*=iVvNS(p8D{*(oy7slOleIdK(l|}CC&+<0q z-n+Qqu0LvvSJh=NSSVk*LSHoVtyzQTM9iDJK$b0jyOw6@-Al*lAJ191G+Hd91Wd+MlE^{yY!Px*9`=xfhK=vX=m~! zbMg5nq|WB{`g5mzxjRGTe$1W%AaG8*fXw6(_bf?xiy0bx}HK)AnnnC-qK0vJ+ z=Bh$aLW2EWVF=1dFu=vozN|ljq*)i4S#3%5HDEvjS1G@oB1e-vQBZ)onHYNAT!CDw)7H)8;F+RWvT={f=GDkw3D3?$B%R`v3Ld^SmlQX-mzL6jrLi;*S zc5i4jqEjz*)VHEjFLlVNEN4zfwsS>?o-uSppQZKDuhUDrnn^P+V%k4G4b?W;Qs;Cv zgOp9SxC|%SoK3Tx&D^7sCMz&HG%>1iK$S%hXo0PPR^q+__rPfTxcAEVYSqA~sHkAt zhG9U!c*>8YNAuMvRcD`c39YlIUE*y1w3-C-I-CU^_EjB@YCD=ekM?Kf_GKO1Uun+d zubSwncDXg9kc0KPTT7PL5)Olgb!+~R+aI8k0*bVLmwBHm*qPS>NTe8mfuy!@m%~6j zS@5|wIhyEl)9KFL1jf0)!@i;et)4)U&*^a1b`(16I`YjEGz#b5juyFoAYSYg z5lnx%&93j*YG2-Ae9>R)9MRbT90vp(kKV-bhzG~7fa5U_j-x+-1C^p3anAb$93>s3 z?iFZ9DZzm@JpdeAI`ZX|c|t(1s)wWM>CUY}vC5mpsyxMZqS&r)72~#sa$!;O0Pe5p za$jai37Pxf1Q>l}WGT%!@9Ia(*cY++p5jhKIhS?RHyZy+JM%m0FSrJo$Q;Vis9o=9 zqFfg=!(6SJ!LE6lK_pwFbOmdIT?$QrYmmm5aZgoAnK{$sQcOV1Aw6N81Y7HM+IW`6 zK(hYa+yFAeUt%TV2K{mdxDuLX)GxEY(~i0QMI&j#JMHzf)2N`qlDJFh27AADJ9P>3 zo{T02{35vVelR2v$M064G-k!wOw>!3vc}JGsh(DrE*pO4?7MbUR}^3!URS^OaPsgpxbQ zbQ-@J#9V1{zSxm1>F@i1n#faMlZ1i}zNSUaS7T`f1OzCg0nU3n^v*R{WUD*0U5=Wp z$Z&Nq?X)?ncNWG;hWpZg!N_Ay)8NR?jTp2|9r?~86xoa-_jh2G6aypoVIW4@3$_hl zWdJJ&SOvhg6R;f~u-yb~7{Rs&U=IT9A%Il_tfoVYnao#nKK(Fby-)`MbqG)o1L`oK zjsWVY2xU@8JG&g!TF8sOXtLE&BeWTPY>`*$<0Soq=|7peIu%j?pifqBr)~lG(!2@# zne*lM>NPRKcEy}{4>7HR3W`3fkw&S)!Er*sajfsjso;PzzNX1$@})l#VG}y#(t&jJ z8I7+m{q?|5Nk*D8pvfhp{YnmKvF!|YQ3&qPVmk_T1<`(`JF-}b%D41D7B&{_J+}Ai zFEF7^*+V5=(e;{;nCLW3U`%ua?Hf~eMiXe;))HDcWB~oK$+oTAkydDSZQ*N7BKuEv zrgHUIl+m5p&Y-5>&??1`+G-zZ|Q7VU1 z(XK6P(D+5+5}^7b3eEOcT^AE2U$l z_ryx|v2JPqSm}&dWq)5cISGvE6xNDUkFj3fkU+s%C*X-b}sd zO-(8R@E`!UWB@2`q;phfTDSE2QTwP)RRl^5K-NVes~@t`Jz1so8j8v7DBE7_@}U)m zV&>!b5|#Q6E>EGFf zQ&tnAFRN9@l+_ipik*eG(O;S(TO?tY@W`|JgFpHOTtKJjv2Y9 z73e;1MbG(nSs&hFQhsArXvCp0G5mQEpb+`_63QoFD}4-5i3e90aFvCHv*E%p2h$FrTA@%+&@N{TxaQc-{8Aj*x*b_1-67h51n2t7~F=hP8`bPd${uN-G$k|gldq*1tb^avw|FZ5I#SDtSWfG8_ zlZD<~;6s>W!m1wbUBIsXno+ISWp|V-oMuF>^|9}MJ3>DCY-$$_Lci1DWB09oB%x~NC!NAQW zjm%3DB%4QJqY;QhYRd0W1bSAf+YX@v0t7^$10Bu{D7jc8SKimbrG}Yx2yGQYGZ5M> zgfb91Ktj>>XFHwvXrp$+P6tE&T&?XGTCkw0%iOnSE)8haoEZq1)&M zQB!a^6iYal0j!KS@Gs$vg7Ji~Vt=NCJC+Qot%tP6T?qiA!75i$M@5D^1ZdbGVP^Q! zU*H^NZs)d8f|Q3jDV#RxV6vLBXgQ~kf|%uLLsv7J$x695l9==<*m|#UT$1C8utQ)I zW{27*TCrNnu8%A>F&c=}CNu++{9=;PFAAsLW-dOp$#K#(UDMBTsyl%84W>UO0+W{P zG-2%mo|4_WQAdD8MiHiZQvrpg!QQ84SE#$#mFfZXH_k)t>Fhd z*>cf8HBis4QE#c&$W>R_m6gRb4h zWgv6s;K7mF!I3Xp=|Fa;n%%2TK3GpCEqj|lK<-0rQ;85VvFp_eALp5NS8i(1m>`uu ziAxd3h$x3z<&%y2G>jRU4rKxYg-{HlhcI%dEClXKseF~|v?gA8YL%-&6Rk|nlNY;Q z(=e_9no+{A0ybSTgknCN%I%)0Y_K4VX{Ayz=PVndHbrezDVQZw#B`AUamoq24VJ6G z4cW#kjDSR^-o=r2+eGC$u2a&Fps-@fPd1-1pD;gbUaj#nm(bE=M^vOag_8}8#1D)0 zOLK`P%)Eh?i~$76O}@@`q(+&#Loi>F*AL0QNH#xXZfLo#Hg=>U@w$0KW0XnKU;zhs z-cn|N!GcMubq!!8nh_Eo+N>D1DQQfl4$5tByet^)o35+*h?mhqxxEp!-*u73b>k1e`b>Gkr>qdN>0#U zlRYk@lR0u+8S<25_mk{-zB+PnLSVlH@#?5f=d0<@ozGe7H3~_n6!^`_QKaMz8){d? zI~uguvib#u4^X+O(7`kl6*D##mWl~!?7Rhwm$)T9Qe{|p{~?iXW#o{wd)&%_5o6NQ zZ@**qol^HuIyNpbWx~Xax%2K`dXL^M3G1&(NSU@^DG5amNlBfA06Z8^35uBc?x2wa zhbE@DLn4Qb)Qm>k#!UtaWjI=@j*Cy2GIhqhg^TZT4@R>mWxDxlECENgxCCypwVtV6 zot=<$$i%XFrd`imFn>`8f8CSmI165K*3rOMi>ql1|IP#ag>AfPE8kk`@{bGUTflNX zHD2YXrmTr51=eF^`+se0#rOn?dO;W_tY`L;O)zyq+={HR_7!Lk! zQpjO_fJD!IqXHB|$(5?}-f)nzmV}K4`T_nN_s1dIc;i<7d@0|&g>N!RR!d~qo7i%K z3}-gurSvYgRGr3UMWhwmP)$S^yH(AWBc8lfi2Kr?v)k0{10W*+NXuU1cwWL)U>AI(NP^4>VYrja>vR2)JM~7-U!jY%;r*dVaDz;O3Z=_1osVt0CsXLXWk*Xn%zkMNr zp7(E^^*Ff&SXBL#8zZ@e5z7mdm)nKAl~i=FMt88TV$a^HI^F&qy1IQk9;!O1+rRIj zv%1ZjbyY7Of1#mVXZuLkIqgoSCX&k-yu3gtHs~p|EBT7eeRVkDr&PVWJbs&32wGmxmD}mE0FI3Q4ABsC1f4&cz+q%ZU?cL)vAODZ9{;Q_SWTRA!))Cg83P)p!e zU29fg#&~!V>Un7Jk-@(m{Mz7>!Oer)2LE~R*Mr@IZyORnq-4mWLk#9L^Dyu4RAI@< zd=p!)l5A5_vNh`4=x+vKTX0zFFK7+C#g`t=d}DT4^^SM5736#v9mWn5gwhAd@iH6d zJ3yIk!gO*|ZnLsmH`v(#^lD52n8`InLH!xIt~@-`>VII$p2W^iRhr ztoHoZjyLliZxkvkBoPMHP%s)#0<=D%jOu1~BNc&@?CWy5byLj7nE%R!4fZH5njLTF zI~ohozos57X)1J_%m3P8EOeaDcQm8hO{&Kn<{kiTg$@n?zbkaK=R3>*Fr#+T2%#B2 z5Qy@nKM;BK4QdT7bLd-|QLicZxd+!T-)y{=!ZC zm+CJ#-cRG-clCcClTgEC)G0!pJ1uG5e)gS~ZW--g7DBX@DtVb7xjQa}SPcC8Q0cu7 zsBWpthlv=L>d%ZGrjarehAHD}6`>eKTgzbE+|)Vy8kxJ*d-8*JXZo1e;0;U&BeKa0PEm-BwSmY>1Tga#l3 z=cRb}pBSo9Lea^TC}eOlnyGM0$|;UdhB)q33V%Ke5;{Mbe+lQR5H^^1v$g!o{2iWreJ_APOhtQ0Fuo*Z%u*2+sZL~WY*~j=d4g4GFI90I;NJr(U zi~9o+`bi<7$}a z8c*Wk23`V-z04uQ+1x2)qT>=Y`B~P*zu;~E^JV-C+@nmhHj0f)r~m1AzP_YM6FA28 zPrBQ{Kd-Vuu7cEg8FTbmQVoQW8pDH|is30e2B32Mnu2zT-ugtC65p5}ak} z32C$>iD1>xB1+bEfi&7c8y{uZ5FjyiG1|81(>7B&th4qRZ6;<)n=-vk;e*aT4>+-l z+9-66rTFLR&q~Om>Nar^DU9!IxdemDm8*>-QeY}!+c={dWo|Ygi4GV8+oa8aF4>%H zTbkxWc_0BWV*mY041P|6$g`)nnYc@8=ajaV<@^gh==CCUx*e|NjRyWjCxRiU2P73h z8VN;B;II;8l5sM9fL+Uwm5uqX3R46Qqy#OF#?OERh5uY)aM46ygk|izur6KHK2XmN zqov|fQ3W`cbZEJqQK`Pp*7k-ArC2&8D2L^PrGu%iCDWY2G!Meq_%dXUGsSbEv+e>F zY|tBCH#wI=pZ(Xy*J)oY*m_fG{T45FXd{4#EXPu@x)P`!w9YRY>ovg!dvv3HOrt%f z(LT13*qSs0gp9cc6hT{{tHm+-oput1V1A~@vXhr^_b*l{&>)18maAkXoPDw5jIhpB zO45AbvtMYpo6whc+KJl2X>Lyknrq(0ojBVg`MYGYej!0_m!GWvZT*52Awp=V7?Q}{ zF1ai`SP?SR?Fx{FC*79XFDMuwBus(?JmAWwt?i$iIO_*)m+yESSH=NFY|6yRQ>IQs zO4RTXBS!&^4~itFB0(A!o|ps>A8FWx+ek?64In90nV2-etz#|@Hw`+NLF)z`CYKZB z@-Df2gNr}A6pYY#X*kjJh{qK+&`we0gvdpX@bn8OKt-rrY5+rq_T^~{oGt1t2K$p1 z`)@4vXDnRxNXSe$r`nHOO33+@1fQ~S8%81%Wu4DhU}u*yp-*u~G$fLx2}UOD4!EY- zpCynOFKW&8i`MxYOIm{_9PM?!Xi2lbXlZo5g!@Yt zoQ08AkE3pAIy%J|EYZjP))x2QIkJfI3reP~I4J9TC{;7~36+#W8ZpXh9a#L=JTk7_6hq#Bi zZ+Dlw-Ogt%E}zz7P5rrdMiG_3dm}+`&ma-HljFQU^V%ro+oM!+rhb&tFlw9q1dzXC z*;x*#M)v0o{2SR6{#dj}eNS%(pA3I3I-sDrdAyW?lm7OkG9?I8Old6^qKx`6>b@ zE%{r75ic`OrhQ10^d?Ed{h2QA!L#H?!v5#GqraLI(Mf(J?CtVojkm!d1$Qfk#^}+Q zY@ywInCG-V z(a?lG1(m;`n%U-|(iXb`G=AA)qWon+K7n$DB)~UV+Rrb9H0?RdHKMrm(n)OaRiqf- z!63b8L0Lj+Qk#x zlhXvA=$j5EW^xL=%rP9ceyrMb@u-t-PB}rq-f4$!vWMB;(Fk5!A~JAr2)TqgyaBwL zQMQ|>n|IN2(Ne(<(=r_*EKp&ejCHjL2=mUzG^K>bX|w(hj*A zI}-G8d^KOg?~UqFw7c+TQRedkxgYvxyf~UUPU=En&}%@)oFy^RD1$xWlJQTY2Q`z_ z3tpJNk}73F53pau_`vSRX%u7EkC>QXY8vP9hU4CvsDP-u)5wgL%@ekh1-VL?3P+VdbvGv9E9$DbVl}0(u-oi{^MXt>zwy zvN;~jb`xlR7W?*V&bx`+j>D!88$zrmqD~)*^k}QIy1md@)1F_3FdHmZL|g^ij7miS z%o}7n366CsZO&*bxV#U>U(*Ixx8ZH9uYE)t>t`R`CY<0=8FzOq>N^V!38_*unEl*- z&8W~p2q!dTt{J!4su$qrk}YyDYg`L0yN7d1&3t3jgKO_c~}iddo@fK_ooz_2;&=7WeD9Ta%(1z^o+QeiOQM?9=iOod?>vvjd<}=SHRq^$TNcHSn(q_6j4HWX?J_DHaZm z)7EIsB}{UgCZw!IsztLJF3*oiG|rDHt8bkjlY{`X^1NIE>j7HmL;EpHNUR_9JWR=X zF-^*BIIoP0g}%pNKiqEo%~%+t$iz4|JQlT#j`f)M`m6rzJkp+~We&F|mNf_#epMhM zNwf^<#Z0LOoep&!Zr3uub{o{{V&#)=X0N+hm^Dq9Q;vQ0nn(lx8~!N>y~o*LOeV)~ z_+LAo;*U9w^G`BG=aq@1Dav2F6;DCM#N2mYdAMETvmKfsuIKo0I^rq1brlCTPKW0VGdswS2N&T=i|c2M3>o5-H%!^6M7^Q>8N1*DZn9aDclizg_{K30)ZJ z4LK4Vtl3@TI-e?anc&L9%!^Y>DC6_#A>k9IA98nrs;4bLLmCnzt~j8!5zCpl7ZF7S zjKj|b5sUB^uWNs=?4B9K-|lI+$JJ(mFJgJ7wVA-w-&u%Q51w~*mGuFET%?!C&&?OM zTA^C+$;H0WYw;7EOW{|U)d+`*?g|s}u_RmkIFfTAefL00&t$}tU756Naho_2q3zs} zbPvOwk{g=0Ee{$CekEFh`)#?no3`5HE^o8PUp8Iq>?-rq8mV)_Wt)A% zWne(a)Tz|BOO#|BZORSpu;dv}QJvRFwQ-lD*XKuEg*Ca%zOW73y^m&qO9od(Ib0R} zu`&W_|L8?}l@yJ$n%GbyR6E)62JT=y>w}APVOy5mhkGX;wrF^uBE>i}jg{e!U6c*P zy%TPX2ji{Wg7Ktn-Nb` zHrbFIa7;1qC%N_nQiwREbW0kMhJtW6qelxK=9dzPv+#A%C-`>)pvPyJq`yV#-34c3 zto){gTTPds>CW&=t_yJkncsCPeJJ4Mo=*oKzq5^1qH@BMK~S8HiE|8bm;qHy@&U~D z)ffQhSk8Wz#ZC}7W4TnBeVN5%A7wQ$U+1fWnTXXYe7;Y@jZ6>~v0$010lKmS5M665 z+w6NG{_ew3V?ShAStk?=;qB?W^%2qbv0RxwmNQ-%-$kfUW`4_dflRRj7Ga8Y$pe@> z$}n}A_VGmC5+@sG*PruH4vRiRhhRR!jfo3NN{8Q)366NGk02XCnCUK2 zg^-Xxb8dmkSKgl)Ox7iYICx~ll&St^uutOb@^fTNT_$!2NLo^F0+&Hi)mDrT_fn!l zZk&+92EhCCn?%Q6@X4>;5jalfz}pkv#s&-pX?a)|lg=gD1k=P{(WJi+FGD!MoO9He zQ?RTeqA$v{Wfx^xHsd>qBb!t{BhSGSLc z;i@jyU5u18Qx`WUDcQv>PC_%lO-am+ShCw@0ydy(kr$deJ<>g?(`w?LNP=;uo*p6i zVmRY1=}iB-B)$SCA8!$i4a(`_9byJE-lF_)J)8kdI4mrF0R2~LJFvAYq{e*{mB%}o zV{U~Hg7yH&-**3YXMpIeVsiR>0+>poUPJOpQuC)?b_eYn=T1^3vi*sC=T0(Si8I(^ ztjxsok`RBQn}er1qEY81LH;TQiAza5^}Hn5Uo3Ma4m!J9%eWRviiw+?1Q&!kN$@RP z(x#x`4HpD%aii28(%wV{vIVLFjA}<)I#wuL*)R-$b{i5VV*86eoa!5uI7W2?d^rQk zQUz0Sx02d}|DnywjAK;Fin|%aDrCl8Do_5N6-w$beEpFB)ga}b6%1mu3dl8PmF^xti!p;M@g z19yzkZhH5H58QVVR}Qi{zx%gw7@w}@PUmUpLi%w}jDvdw)HtdP=WF8fCmCe#frm1) zECmi-hs*ef9S`R_4i^Fmyu}tQBPPaw1eKhj|Gr`k_Engc(U~pwz3t#P?eGQhY)^!z zKn8^pnug3T@D^r&JGKnS!VnX}B~mINo&ILbM1Jo?zJ@&O5QuZF@U-2oa%HvKgNB*a z4!3Vq`L&50U|y?tysGhWoa9eAUd0KUoPuqP~YbIv(7QtCdlqR}7&W|Q|e{*+Ca2yE> zcN`51FLe>q0zgW#yO;(GIfUqKU1kQ)y9^63@Q3*$vJ$YBaQ-O&2=_wj#B9gW1JT)z zBafzjWS(Ga#;zaGREqsQ!6nrsVUJIC`D!LMmqGI*fs~A|Hd+i-Xg!GtbW19lR4Nh= zQ7OxC35pUUvM9s`Qi5zvbcE(qb81N?rV@Yj0saV@;~Zrb+Tl2iNp*xj>^RCFVRQLM zSgDpflL{|p))yYjqpVuT(F*=(oUh|Z8UO-&MIA?6vbaE(G*#g^>bjEZkAvtD_RsuL zLO(Jro^$ErMPA<1BXQ_vZ({ug(s#^1Q~d?u7Wr0VIG(h*VH#;PrxbFpPHblVw`bvw zhqNlRxRdCHsQaQY8}SE@{VPka$z`xtTX2-b!Bd=O{*V~mi!fuzEOVTyr}1>vK4I25 z6Wh`;{_l(P&0xQS9C2o~IZhGfKqSsKkp77_KsDNV2g0+Qnl=&}48;Kaw%gLOkZ>l> zU&xGAP^HLpj&3{F+CEX3$BHf@*sQnV5wKcpvbSn+oH996fbd<_CFgM51HovpdP(=4 zBie|6Ko`+TX!>7+(+K7!@>EhB6Rr}7GS}xg_>F2Swh0aVAsCI+KB|rVyx4onCMUJ% zHj~yF*H-9^Z_7{qtOUZECtPmA!RLzxS|zwZH9{rD*EF)_#jr05>lLdPqA*|Gh@U4D ztC$>B$aAg|dk_o^5XQR@6x0*q!!9-nJTWo`Hyike$pV0q5l6X5O!DAJ{&09Ce+0jy zsvvJbidd(vRBOm80n92agn3v9=~xIF2)tonU5~I+_($0c{#V?Hbnd})tl~%5T}V0R zO)(&06cR#vCPEIF9w-=L2u2-n7 zgPXA29gk?STpnvkonDIt^Qac<=JAHOevZS}Db2WaBps>ck2rpXHNrp95Et$^0_n_g z7|z7VGo&NyXf1y<2%_QR2tNk+hfiqyNG<%sCi4RqlCR@R`?u7z+;PP?w~bN`&N5P}t0DlZP|E-3F~ z{qsiWJy-Dg(!9kbi5ML-ZPs^~1tg_?GW{W0_&TtXsG3?sr!v%~&{M`it9D z7uP&@ZS)i-S$C|Q8TstU)Qg`i4qZ4WGJ3Om&z=LS&#Sjj7%*eL(c;)f}ZPYqr@{Xuq4 zSZ4HN@r&45Uk`ko&FZoZxtG=4w>$C!cJ`B>oCr7-{^`ztuKDopyMLRQ`G9heEGRx{ z*MOscSm`q__v(cm>;Hb=djWw5s;L{xchHA z_RL%J-o+dDBs|q|(xLfsY4_WmAHVXHeN^*Pfeo<%XQv!LdA;5*tj2%-qlN*~76def zKH;;xe%_PXWvV~J*YxoXciqT1l1n}+)!2-MVUvBQ;JGVG3J(k6!+hFSh7C4}sh^@6 zJf^JvLK5@B6k6Hk>>?^!E@gnT(PH2F+il)(yHB7g0yTJeLXoMef8D z=0ql37!fe=FT>#u;|cwz_ecvyNMv>5Lh}-~4g+zX;X)#a=BXl?xv*RrdPt(9pcTQh zkT-Ia%MVFvJ+X@U!g)k4=2hIK3_U2JaJnFn<1)xu1mz;RF)A)1lR0fwKHbk zF>Cgnb8tu|jC>2lzKjzsH$0R56*oSU9K|xwbV&+(6j8Yx55U5M2mF18#NcLrKNU|0 zMrXr=#Fu>o!bY^7vrkq1<(p8c?4L3pAD55B$L&Kw$PL`#a~u7Y2{cs8Q(;i$tJp#nfDgB@qS3*3#c)InU+ zG=+qOg5|-?3q(TZ4o_2k1dRwB08vDIz5v6M27^FIgwO*KFEE~^@gP+9bl3FOebbCz z-VFx-&`dCR0SL}Ra7x5e40|#I%5bcIOY?a#p$KWM1a&PYb(!!~vnPluOpa-9(*M{B zFQsX3X#Qbho>`@YZ&MtOjTks=mPAd!;1wfxFPHmuD)89r7Illi9!*uJAqSG@=T_E# zM>d|{gvs%!gz{(0VOYf0hDph+JCAv3d@!7U6JEinjLf8C$;u1M$zgPe3{N;=$d!vS zp}t+7vm$3@PHuVLs{GXj_s;P~*Q{NK|BrOv#+wP7iZAt(jGZlPyVmdX_%hiKwJ zJDD|BNeo3GB&q$GZ6Z{sXGr|-9b-!6;ST4DzDqOze-nEwI9Ze zebtra6*b%86uxs$U6rTHp4!CzAFdz-7Q?&ummk`%+g}HA?Afc^Q-@CNsHoe%?*MMq zJN6u^(bZJ|3+k>ss;k^rQ&qlm-+=>rs&%`os`ni6Mh;Z%sH-|y{!rCX&j@Va^H5d! z!}|{H*o}4^DX-YE<4|42j-$Hjs*0VSno&)qP-5?)UAu_my4Vsjww3!Z_5#g?!Ktfy zc+bNk-95owhe+WA`>S?b(TQXi`%Z>N3{{f8@7{Azw__jrwG(5vyIkluR(53thHO9D zQnPO_#zS}D%7H5f_Xytey9o6TR#hF`O@*s1$w zr|zFSb*`N{H?pqdhy3lxI&EowKjMW@-RW0GULyBXG2>n(_ty8)UMF|+hwlmb&8IKE zLE;g=6;e%&?c^Tt@zdet-q;?kGhaNb8~n`kLAvUvBR&>#bW>_~y*TB-^E&Z5rS|cf z{U7UuOXcpp_0Jz9UT(0hxEpb(GVX=qua@6Gu*tDsA6eh};;bPh@%cylcGW% z$oykg^hZJD0S4B{PiHm6o0C~1*r&-WU!V+AN8kwg>fKDmd8KAHOsa|moFxw*d*;<= zUVQq>l`DVNjcgjuDhe+uviQpo;sS8Y;}*=u`3~~w>CYR*g(%HuNIq||6 zYaN#xXsI!Ip3ypo8rkHy+(H#X#Lk-K>=R zK^3O)kq0NFk|KV9tDpXLfZ_uJW~dO4+_H2oBq zWg3~nkEOIGOcx(YhSN?cMPsL{_*N83Y6yE3_C+1U1lIyfxIvv>41G&oJJj;xnVY;P zX4C|v-34ejP@xO;LiufK86+@X8;#({m*WdAb zuWb#5)7qGkb6_BgnFITiX;8#ux}R=P^kiD+q|QNUg|>&J+o^N#eqDN=Kj>PHM^xQ* zpC%KxVfM%-^41|b2`^wWg|fPD$Sl>&wo$$SBQBhz`)Fd7 z8Y)6bNnrUGcmQ|?9g@6w)OD}F@urzAm8wR0S>bdP!i!1b#djlkFqTpoQkE_CAAxFE@A z?f`^kWoJ`^gr@rxCc9HqLxj0P58$%rk{0rb zWvr-l&Z$1&CC>SrbCQLWE~m~eiz4c(s3>)|J|MePq=uGSl)K;OYu*cDbv~c-c|3lP z-(Me=_q=CbGxM5x&*e3*nR(4?pj~2I%Szg~%=$p{LvJP%^bfH3iq#;Eo6#&xaRtTR z()a`r+8hvC<{7-Yph6SNqR3XqV)c;U>{U)0s#ctnP70r2aBQPSS?pCZr{eBs#2opn zNE??=Sq@lDRY_7 z-0N!++ZyV5eZJH2fS^8kuMP6S>XX7m=RH`NpXg*RhvR`HMVeZk#HB$dwEMFcux$&m zP<&0u>H>^6A{1B(yb{PsC@_`>=#}1Jy|k$?t?g^4bS{gA%IN+&t-Gr*AM~P^(%AOr zi#?#NtBJ{~(F6~gn+hl3{JXPrfnaLjWFf&cG(Od!8uSo`Mq$mV{n`nc!UN4oH#v@u z2MR{A@?^zHg+)o;oAE!waSi*2NjJ4xEq7!;3$~?I`sd!G$-)!OsxZ<^6TIGgQ$J)~ zqDHwM8mWfp(BCxQtPcyH;8VMkd|~0}>*{~Pg0mCssKa1P%5kQFjx%6(-)lRch_kgm zWP~<3AzQLqNb-gui>k6#>7S&2C$=+B9g-elzI3dJBmoGgek685v7GQTa`J=MtN(tC zYFaanxWW1po#D7H>}tK;drK>HLG*d6-fWfbkow)U@%lY>Q85_}kqry4(*FdkHxTwa zwD=IuAx@GwJ21(cZ*Nz(3oB0#)cg~f!esS-4qWjm0w?_y`<+RjV#5<8_;}wZgiJa9 zyNPrbQl4~o*O+FF7J^V?nv>cwG*XS8PZSU2`$euS_NmMeBL?y9Fa$LCXJ9Yv>kM!PFb#&o8jEAGJ zoirQ!G#^ajVWW*F1RdTiv@B%vdK8ND+NLy3^ z$2I|{!!X~kt|7@ndB|?2JV^WUaKIszauCkDJu_g_Sayaumd``6-O7MJ^_6-paQsH{ zZ?+g4?(ua**G5`IqA6Lj)%6F6_#yh;*OZ_V@Ae` zT7Ufg`i1j)Yk;=OE+Gfv2BZE5a53T7LhNSQqG~}Zl*@~h%R&7T(;UIl7~6O890L<^ z*ZD-K73`+ z{bbSvVgx6`pyPh5)jD?12QlY3vD}jzdTsk0w44fpmfE1&(n^+t4%M<|=ctE;c@3(! zS|Q&7F(2&y9D)?o`nH`AT4+b8=J0mfyR-+Z+d`Hx>0Z-u9JHbianEs_cjXi;AuO;# zrw7xV0Td+gu*#{r--)GM5;aV63U9Uc_l#PA%|l2qq1gx%8l(dPAYdHV+$({C>ci(% z>F-1xP3e~ij()2qFF>YHnGW>=$RGCBYocbzt-SOFLm0|e-f2>!Vf1GPlnOvBiJ=^& z!4l}aNQa=-EGK31ub)!LjNXuYTLJ7J@)3kw;6(KPDohd~F1PcfbL8(3cs6;w)ykM| z@b2i->&5uuDjdqfId?K^F{nFf*V*G@(a@f70h%SwDB+NTjLvj=#8p^U=0uTf6KFve z^jnHu#Yw1ewKB(XYZ!n@BVfFU-s7S-ScH;*}Lya@IcAWoUW6Yivu>@UAf}LUSbK!QqZ?+26IL zH31YG!Xvl7_^2p)*5urgCc@a?&csB+@(a?SjC0` zn4arBFP%amM~IzhAW3u|b*Ks!qX^aE1XP6d0=E#5;v57Maf`AgfJ7w_Wg9?L`K42! zbVRXc*MB~RWr9%{BqBTd_Cm!voY2Bif(I5mUs-|{@yaO&ztDMLF_WL%Pcn}Xz7$1S zG(1r73)NrKaywSp6@pp9rV)Kj!-33G`XC(JWH!y$>pFuW#5m=6XRy9WJw&u{ zj0*`|hlrgto-js-9sk^~Ax4MW6tZc^MG6}LMSL;G(Y*K>nGoeL&RExVcf z-TOh+XdmSKGr}xZG}J_zB2Q&wZ|V{m1D9zt86IbZS;T-!f|wMg1oVfU@94!!#`zo@ z6uEBRh85q}c9dkiR3cIX4B>pEcsh9HgDUCrOlEZuV(ng!bu)2 zzJUvXbUhm2BMqu2mQY*EYVZ^B*BYFLCBl0R&M8ZTPaB*Mq3yJN7;-0;aVX|qhd(AY zYgDPz;g5f|cMy=W_<9z9)@|`U!n`v$Y_w@iJEYqo+zy>c9^uAmF1!~cCy>hcnN&`K z?-N$(RHn~xkO08fw-&yEk6{bNY)H*`5X;{*wq}&Q^lC{a^&UBf3w)8Hq1X0UpY4D{ zWm`&LIkZ9b1+zTgpt{K{U?0?3tW7fZAps4!E7^%w9d+E9o<#&1$5T)ORCSOI8kxn0 z>a@xV!b#~Z5ooXP7n5hL;AeU5LJ01917YN$;bi>X8=`11MQ zP<`F8$Le=2b^Lj$H!V;kMx;a>TzI&4`*1<{R3W*cKj40+u$KVP z>zE{klH#G@UqY0;Tq@;#>{u>nlq3sBbGZS+8~Y&lsK@H%59rAffSKw-vP@)}SdjcR z91*)FJlrgOWgs2h#dHs=X=J;CV`Ep4P14KK^UA5JzDu08Agjz$P;tPMcl-ce84#St<#4?tRpm`=~JY zQ6i?T8Y0S7*hWNL+Mc`aaF&ESA;|jhEq@68Vj+m)0sbh1FMeE%s+yj43*}1YwYS%+ zFV=MpmQ!$GKzND*ki^}anAM3wH6aR&?V^50Q5&P`tJPv+qR*5Zf70*hDWYEwgg5~E z)fxK{k)9nPsDa}{NUIKt21Rk~BqO27t7Fj6$Y@Z($W6<%gClFnHgq|Rd&nq zD_QUT3e zV3SAw(yT^tkOZo+R!ZO z&QYLS@jZs-;-%`#LTmO=41vQ~Xkps2Se>Xs_XbITEj<&$iRtY}dR-UJc6FS^a;xEN z(|<_+LslWJkX1@6WxJ)jW%aUs(tWaXa^KWOK1?c^*2qUnrLc!frLYf?N<_E_DQgT- zNF*?o5~;N@bcjUq`^FILxQgZ<8bh!l923^a$t6<7w*wj#ct?CYuu(xfvfX}nx8E(1 zJhx0L*}P09d1;wkvTd0{vSXQ2@`q)dq+%H_d1qOG7}ngrs5F zm_`mMXB`<9DUmKbGHjqkdc83$Tq2ESNhUNZ21ulJjX|R&(sf7f0DMVfFd%m|a)A=* zYe(*c`C%gm$lHyBVXFRX8JnY6PKFP|qIfu#!_}9A7DNnwY|`3EGk)hI0e9javCEMt za%uyP<7^uC_Qfg5{N=>#Fj@HCsRom>)abD(bZtM{IGt&N%E4XBX`=+^At7`J>69z* z>6v-bn`wJ+G3GTQ1&LIGWfs0ZLD70+5oh)Zi9E2-`k^>?h`{1L{Ne`@SR_Ow*XLop zrpU@+h~@%F-~)?L3s*v(^{M&T=oh-_bRCVB&L19QLmj$dG@CtR#_OZWFi(@{%&wUy z_X}Mov|5skUA+=B!Je)YRhoO8A&+4&1T%CEC~uI6ESpi&Da0!MSHhAN$3{)!NSU(w zI#a&1Vs*>c&5#2ZGwILTW(je}E~qx&dWx~SR5C{^CI}0k<_1BIudcYXym-ZT%dg|vzM@%mX?aV}HzzJjyS_QmgfHkiL33BHQo}V?NJP`Xv;9>WO!Jox5#9v8-Vd9{*WL6ZV-LL>LF z_ETdJ8cTKJ=nk){Bfv0bLMBU(JHnDXI(TJ5g4&1!vWYBRf+il-uS`_mm860oa12|R zslr+~Eh|XXk$@z?ib0v~f56&{(#zRcML2%EPqlKTAbA~Y`*e)K)_vmUz=0v)zwo(L zs<&5a)+np zUu~_aeeb}*y7xcWbmb3!eDkfh|D*jvN9UK{Uibg#a) z?e$X2_Ocy2ca=kI;Mei~^6tUCR?ORK_GY3;*5lG0;j}{f?N za9}>Tprp05ipfAI%XkIKTZR*9YVb^u$ppKlL}@VZq(BV&9H#d`5jY{gsfCKYpk3q; zPO++NIv7(o>V5qOqd$!OXw2W^KECUdvHvjG;_c(=?{ELHTboG+d^I+R2phgZ4WC8|NYQE4Ey77XX2Z8_>QI=OFcf-nRa5@ z@00&v{Nog7+M6aH8gGcCz?*qQ7p(q4c#l3vb^qg4`gm39Qv2BNCQ>NvmorPOJ-jw+oIQUKo>TG^R zv^m3`Q2pr%=TlFhoj|RmaPsLk{VHVALxc ze49mTMavFY6aCqtdLDatY96PvVcU;g-L}^@v~7h>`PtpCf!u*JdvGz@FFBO4caKra zCu>P!3T|xjjlq5-6i@(RA+VcbovKjMd zyg=mqQ)HSSgL=^vIROOB@yTQ=%S@UektM@YQk+q^eM`p6BmvO}E!v7n)Qg3dH!@z{ zw&k_VTSsKpfpZO3U+q0414*aeIFL#y&IG2++c0GkrcA<=$uMR19=&pIo7~!W96uPG zVDE8!?BndfIrRFuaUNkS9j(!!w%NI4raHKwJppIJ>DaGkFp&%9g9FlR9*C3TeXuly zc^^R&dp$iZetZuuz6~S7`FEDnz()*g+c~*y7wIC;@7@(QynAOD9lvgF2kP(ws91+K z+kkV~VM*Ef>eze{;k|UoAF8C}DBs~wH>d+|k)T(?RAZc*K#SRZIB>qYtKbx?o**o< zGtVvqs;2B@ZviAlh=Tuuz8ObWd&XkL=je@9bZ5-bJ69zhee9`3IQLToS-%D4o)NfF zBW#rr{WS5%7@DCB%CF!6qUFzbZH4ZLSCL}bNn{5D+>VpZ&M}`IS=D>qdN%s2GdX@z z8nEs-*|yC&|E>i6heGVrQfbJq26C1u{hP>BqJCFT5O${(30*-aoo|mJG4_wfI9`5A zxQ8<0II>DG_;Un1dKR)R@0V>M_&4&q@#L-i(uh!YGC|Dmq{ou7aTI*NKYPdg+y;}G z7gU7lc7{VNyx&pbCFik^D$3c%Pj&7Z!!oW!o`Oy?9S{(%6o#-||87J2K{ykwZo)8Sj#D zl8kOL2CjrL6b32}OboagoWrMu-3g~e9zn=sB8W`R@WI8L0*09e$ZF&TXK33_<&!FXPfMa8NtTM|+`m47Ba={reECFkdp_eXyiX&wv>pQ% z;k{3zU*B;G+POi*u+NP?$Ckmb9db^Ow>NK?q-YPs!TNSer(L~mVpHUO zEA<1o%*aeC`dl(zA!9EYLm$%z1th%-)gZ!ooC6*OXJq_i@R$XI7V{S8P;p?zYTmIE z$IfAv_$UFKK@*T{m1dfAT@G?0JVwAIbyt`jgF+H*k6}O@PuD1siku#%8V3r`LAx|V`-PhuBO`(;r)qV ztV%jY+_X$wvyDF9bC-X&kM{T&pDvtru((N_K0x()uJfZ@#(S&E$*TGfW@6C)D3{dA z<*WAQ>gB3GGw6HF+@Fi~!r12~62&8-Pi)V z0g@)+{bx|%ED!bVxgiNOLqAO*#~aU}kKc1VX#v(R*$j6y)|H}3b!0#FchD9@di?Yo zPz+N4X0p23d5LM|yQCFYM?WTfYytElsb9F~IBPbug=y=!JJ32vHvAwpzIqA=?SN?M z`}5oWOq(#9w4^OCL33Y0f@Wer{e85KdW3@Gq~A*u-W{Wr?$6w`B5yAX`0v8>oKaFvSo7JLwM4pEub$RYI} z6ds~oGiX2nWTKU0*2rXmIJFgY?;06DAOI*HS`!p9oNzt120{x12863#UNbN_L?Q{| z!q>>8g9b>#Wr=GBO2T+Wn20#?ECgZ?AY9PA&8U$<4*v~X&*56%s@O;KcHGjWw@I2&uU))l* zsr^C*37l@)WZCf=mKwKiz2aYbEW+-3M%fn2wp|b{-TaCeVEe9@$~JGwU>mNz>)eHZ z{W3GGM6JXZBVYc3PX0Ld0ko+F94`zcb#uRRhICh+ju_`w87&0Ae%%8_#s--`Hk#IQqcY zX7mAIOT&Kl`;ahUJ|YNH`2Oi3sF)Nk3515|sN?IwMgw{|h?H_G8*(t1xSXYVlYol8T+*9@tAs zC@8N1Qytd~EfCOmL#I)XU2bQ4O`0FCwByVan+vOhDGb0g2C2o|SCOJ28R)}eo`Jv3p zHcWck4GCxW+99Ojgph_-J0aM4F2Bd=u{;-J;H1G!@%l< zrz!P3JEpI`4vp3=nUA1uq|o=%tah~{Hd5_}g{8iEM_J|zTi?ip=(y#D%~NVZ_!zd*a6!_l0fj2N#DZQ3jrY z`g@SA__T0Aw~h$ax8efh_v^Y$&e*B#T6{$Uz5qFcFe|p-oINIIn)*n4(;#VZxGeZR zdGPNP!Bdq%JGkJ5eDJb>pe=y`KH>Z+2#RS7j*Yzgphl*?BG9c*>NRpU$r1UOQV$-TP@m3UemYR{E3CC%QqzM%6BfO5_^+Ft3ela=fn;8YK z$IJ-bbk|9yjw(bL$Fej3E=Vu^Wj(enuvsxFP)KIT0ATYT8nyr8&&&kBPjBLrp${QY zc#uJncq&3xL7_1vL*n`k;uHpnKf;g!fZTjErhnqI{XYL9@g@H% zaStYi?Vkm&_u%8P1)-S=qP2*%0s8w*f=VmSRicu1z#PWfY@J zZGWjubkImA+O}?caT9HlMgDmywk|#)<2)JH$dF{gP?Ir%j0efcBcp(f*U9)Z8BJt- z4TIE|?Sx`7xls670dC9Lev(-I#SeyqNG9NdfxOd0lq`T!i2Zy>IQ$`O0`o&$Z9qFB`7S*Sp%fGDw_t9b~S1WF<2f+)QhpzaPB zd&4v2H+qp@_`-pZ82hd#B~mY=QPi0m&(@6k?y#8+)jUCGl0vC3GG$!S6|9_MKPGj>or|?n}uQc(2CVrra*O>Sy6FYX(eN3DU)XLb7qw+nWbDmi{CM;q-vJ(;4J>otde^( zl$ja)lNlvP(v|1a`Ofr`f()f4gWsD`vTe4~I-5T`yX2j8<$-j*F}=i>p&T}wzjt;? zce;|F#osxr#G0Wzo56pZQ8I0|GJ7^(FuUaBEalZ%{LqY&FJ~)zX7d9xONM1C@5pFsv;v*@p!7DFjcWLRZ*R)IF_n7m&&)N@|ROnMov{un5vjQm49$*%Brc# zSEnleGL>&P@mEYKKbVw0Q_AoZr8Xtyt`y~@6h&GJ|3FI0vnk3QDYBy`#gVCnhgM3L zJ|_F(vBG%;(jNMe=l)bxAE<9IQl_wp#Ms{pX;UlZ1 ze_kz1%qi65NQ@K`gj;tMFvPuGWkj@6%fJnq0L{W6}CFxp>T4U!JMhRA$;^sx>+MKiSk*PWZf+ zT*v;rWqHbYt%}^=`n;DvCxA(-3V;0L%a?t=OJDeWmoNWw*Esk)zx96MyX^Y#jkOQn z9V*qOu6)IL`NpQpu0N4mxG-MduJv_=4t9lh80X|!axciGg0v&oGAI9-PkSRud*hy{ z8!7tlAJSh*@r}NcqHi|&F3R-n$vj?Asv*%^jbsg-9CcM93)Si`zzhH&>PjKO1q6wz zG?O)|UBc_Hw)H_Rc22*$l0{x%xFV4wn)b?rak)CJ^}#r^F2?vEB55o(UQ=|6r*~ZC zDTe2J39ofaIIX)7j|~sGD|my5I|?ak&q{f1gOt-Y6ydSsA$KKjINi?Di!^k1D-2gN zIm)UebTIPHdC?OL-$@uqCV~hY8fhStJ}ES!e>9ols*N{*&gv=)d0nLhPqP2r>$dTF z!0FSwB^(|F9vK}`2Pmdn!bibMZxJL#Qs*U{p{`JA*dkFH(h3!ZNQpu$O@!25DWt2( zBvi5#lX4V?EGk2_+AA;v`lC_$(QrV+0S!-R#1wdVaY%u@l<-1K@)}||Em~!vJMqbs zuJ+2^T1r<7%y5K}qmr4;%q(K2m6>K{T9|1h(|1uGx&R*x^pslzY+?rGQQcC72*QPF z>_a5@^wTVlQM+~eEBBySf7$jf$_PU*CbIWEC;}vA=-%wdx>-T?zUS&@1$`eiP!v_v z1(;;#L$!trV!6l+-^KI#d=^q98EhEtREr{ZEd)8n2`H=Ic)TsJEC zn9eJKKwoK4i*?_+3fe2m-9$6mMbQD^FTz1;?cOAX~kd`w9pAG@oF zHxw7~KHb%XyE@~5LT`^_(F(cP&JxaWzLe9qlyWf*FLBXla=557S)AUU%+VLt8M)Y9 zQ#eD_98SM)4i~c{jf>thj*BYOa{64{&|z>V#5ShKHYUW?r5koH0@fIOqrP)5A9b#R zH=NP%dWVkJ*6Vq_H6ED?qTU%(g>rfkoWfcoe^+rmH!9E0={6q+##Z{y^q9`cQRgSe zoQuuL>YI_@&jaZZ774!09VxoKNRYh&vY-)jV=^CA zg(hgx;Jenxez}>`e)%XToS%Y6%Ngu4E~;({uPwiuHxy}kU(^~QYE5WVuEzKCwW#mZ zyutGZueUsmxE0a00leYROK7IkQ0bL-jNK8ZFG4}=BMKaKwUF0tPv-UQ64Y=|l(n7H z)#G`zh|^o!l|HTcZmn6+n^nG_dt!>yWQIp$WKj>K%0_2%GQ;L*nPCbq^XbpN8g=1K z!{Jx;?!Ow&ziGJoS1RW3+Bkzd8Er>Hn01a~ZtQz9lmXgF)R{$w&UC#MEhH!gJus%D zP#JS3N2#yOLKR$#xv*Igb4IF+skxxg7uglQpN~gfL0;Pn`KV@;3x*p;^_l^@A_Z(S zA7!6{$~NMAQ{rfhA#gju%|^WOT-l5!BISLC014V$RC9WiH7=?-A`dR!$vCd9zpoiM6CF1j*d zbbVY@Wda&N6oxTf9oIXL{7xMNwzdM>*2^5>SHJkCS=VG=?`Iz14l0_J3VgjVm7Zyd=r$?Voh^~o?uD>IC z_weZL!}LXJs^9Mlc`8KxnNZXN3iEU~O013QHpU_4$JP~bqiVNvy4^)wRLwJ>A7(W9 zjzwe7rNzt_l<+pzl(8p6=$?z-`6+_~rU4Nn@4wO@K1+WCg zG)nm~2W1!yRD4vK!0Yy4%(FZSdVC>4e=a@xY(iXPx)ydC+`cz-EBV+q6!v>4k~4UN z66q_WP$XJIwS$YTuyZjbr!nl}y}2DU_=@6`by> z4R7>gRG+S%-Zm6)1+Wbo-7*f&2jHE{>1xo2>udb)T=cIwRM6>Bjs#>csv$1sJ&{w` zr~BT>-E|Iw>-R&!Tnxka9gq6HP&u{}J)or(y}-r!q8p~(wJ$~AkgB()plI&8qEg<~ z9)U*%il{=TkBDmzR>n1lD#zl|0=+#*=^J}>`CS(t8hd)4zIg?@sqVXFO6`RdWpuMv zsjVqNFWIfoeHW#Sa=T%d0mX6MnJlHYK3N%U*C@5y3o%4jD0F8uN?k)6>|g_bR%sK9 zd?xQ3pl~yML#*OozNc$dPL77r@Tid4fcMg5BA>B5GW|=lA25U4(dz09hJHesF)IBY=MwZ z(XNMD+hIL2T(345YAC{wL8pane_M3hFkBNi44ZC~=By9KzS@Z+wWiw$&RYcX8D`5ZF$F!Xpn zjrfEZd*?{_9c(ak&Vk0ahv$2J^=lqLeh8eQ8MEFikC&hb_MMvG z9yv;Y+utR(sYj@zj%^zvS-)kez}bd+gdsMls%~fUW{%D|!pMbz-O=x~Mfb$oyn}&o z1X*6x51AxWhoMw(+ganh)*hv;4O@{)8x?a-llNx*pC3S$Ao}v~{3}bL7XKI6v7tCQ ztT|8jj6b_4kdoJ1@1{sgtMqDsKfz~yqzO)v<^zU*gh(JO;Y{m8ctx874?1>MubYda zL&U=<8hpDx1_9@j*5yEadYJH~4a!bBZ3vUUp)>y2sQC!`g)Q(IMBm{3N;6Q*Nx@}l zKINqg^3%~&xvZd{21>$4l>r#)^4R@LUph9i7N`cX8a+0#hQ<4)H{RNQQPL2~`7mL7 z2MG%A+5+>$)Q)u$R!7i7-isO)tb+!1+TfFfxRi-YngnWh!{O8Qm5t1=q1FF{t?Q(% z>y)jl*`^*!z%J(X4ZKd&S){?Fhrf%Fh5dCml6xn~!3_u>K(I18rMc<|wD4avS1F38& zghn$R6)-8qA8e{-vNPx*DsOyPLCt&|FGE8HzWJQYZ(F+F3q3h{WecFq^IM#w=Q)3P zsM$GlUK0vnQsf34+Y0N$#l_4`u%(&QL<$~rraerh8`SfaZGO+!wx#OuA<{b~US2=ISvIey3&3w|OP@!o zCv1UFBQPZRVawY4R7i&C|=;o30=qHcdRC3=j#02E+zeN}}~qR|TO z5E|1ZK|2L&Q0HucQ^f`{7R3tM;e3653t<`rOzbpql}4tP;o2zHX6O0KO)MqADArWH z;to2r8Ke zZ0Njy{%tjex)49-t`=3N4R*QeOWQC~F(jBxLzn303GqH|5YZTHd971c;fe{+)aDJ> z3p*P{>V*#PJTR}x>6sTFj;k`R+71^Y%U$2tHlPucwxDlFw!X{8LIn3*v5{8uF-sAR zL56@pJu*Z>I?sm|oRdOp&=(S@Hko*TQ!jDiK$&EdyzgTZxeytWec1q z6rd`zAmuDzt!`pqF#y_8fw0yV z2$fWzaxC&LAf#;Unlym=3q`uD)`_XJub_O1S)j~r?+x@W;ZbbdwKTqmWR4Q&tFLZ+ zF%uZ@!Ou``^XZH8sg9>29?zqTi~X>m^ZuHA=-BiV=-8!`=MM{~0$(pgE~M)aR~Hnn zj`20cNRHhfFC9u{kD*I_6@b;FQILj(RP*c5#Q0;e$A%}UuaSPurY@-s+p+g7@P2SK z*Nt+mHYZH_n$ApkiSTQDFEW*H~sIF>@+2GnhG# znM;_tf|*YE6<1=}%VBY28IJt!0?<8CUzmFfc~1;Y7>UOq|Mw7=!iC#ftk@#L5wzF?qZSa{EV}Iug13dWMYai0P&>G7Xq%2oqPHGp ztSZ0ht<4It9+RX))MBZkJkgz5kv2`C10_xP=ze7gn#$RRrSW{HoUW-fD#Ak~ALy0A zIF$5*=g>7MMj(a)aq_QVK;c-2IA>?f32q}%uB#drt~m*B#+k&DaO9h4SCz3yl~ylAg<-f0R#;N}KW$J#jz0^#lLolRqB)QP-2- z)7TUC)5Aag@u$yz!p+BD;H)UJtJ^Ne{?xsX3G@fKy7ZBRv$F=$igt#Or?asd_`^r^h|3)&?`i?~P4IODdSE$=)$FC^W?z<#;qdUJ#p`+N94!01EpC;5(?GE)=EIZw*2vxYp z;#PUAZoGH;{gV;G%6#Ex^jKWG-FYUns}dnB<}xdS*W#UP47a!iPnk8h)-4!S0uXv7 zUoWK0G~Zml=;pdbWWKh@E1A2JE)|ozBX!Sj<9)pmJL~RBnq|o0ZBy76R4e(90;en%#on^K}J8yTa{m zUAU*V%&qg3!3>A#mcu0XFMMj@)$23LlV9$RWM;Hi^7$g4%V8a4|JA>B(67PPLG=4I z9I^i;m?37q6sR}kZ`%FdUP;tqf7J#?UzECPI%_>In2qsS#!jopXerL_bz4PuZEFqH zqua=gah@XgIA*9kX19tN9;?x6H5QqRP{0<^EFy^i-(nRT32NEu7R<(RM!bRTHp44% zEJm@%T$H=cx>Hee$;&O9lUI7i-*VJ>iaR3Q)ujhY3wIV~6{D&($t%k?XQeTlIjgX& zBivn6y2as@Jh;Ty6{vTqJVtxx0S{!p$N4Rt7LTewtk$E#S0YpPPK(_$&fZyM_o(ch zX1f(#z-+hJ=_!JX9^4y0<5+GCwYD7m za_zbH{M#I^uw+|aa&oebUcI(lOQvm4W@e_1UcI);Ieq^BQ%FmWtwZk4$)P04V(ZZL zx^(VL0*T1UVuKVkB~<2>?8!P;9gbgEby%H>*+dtEe5A6ftYNjP+WtNWSsm8r1K-~G zeX!pS4J`f?`o;f%g=I0rf053u9Q-;aApK(grvJal^KZorW8WXna`A8C@=7+CdmC>M z8t?AT;^Jc0refD_de>E>Emynh4j4^t6QkHJ>t-ced8;bX6e> z)iYfcX|Ag2UP*K|M*QUZ{=ax~(Vq=(TULD*{o!3|E37Z1KYHJ0|5xFw>#OO{hBx67 zaiSxZ_QRTG)6{F|kKVUJA?5z5-O5E4Ve7-%KTKZ=_3<{ZhIOJ_k({E)*oI8|t^?{x*qS_DHHz?ay(pn#6P&^ z;K_AWmv@%C>OAvZ8J$&LiE;(F5`P5j>k~It?-?~}l+Lwa{LTFG5nVO zkO+56U5#$lD9uJ`I~kC|Fn`~*M`ZiK{EuG!&B>)>T(6Cr#9EE z!^>*7x?#F`I}EAEV$HRfZwr!ZHVJaT-4GZ8)1Q}(P`SojF!o>sUA5L+A(x*1&|a9u zC^hzf%z{+N1&kiDdnG4U(rn;Nhv3>Hb)9irU9}dta$U7X*BP@h+HD29V(kcYn{zD( zIwbDu@_r#y3~4CnETn(>}Pl8r7kx;o2u)zm%+}D$~TcwmX}tZmcKGBZKYSz@fb=I z^Q|uB5Lf7hWLrnI?LsKb3&{?nJ^q$6zA@AmZwu|Hw!_*yXIp8# zAPH^kFwemdcmV-BtcR?JyprLMi+TU5i;G~HC#0o?NIwfCyD+OSZ6x`Nl*yk3W?v}= zXJ7b>pw%|BO=TYkuDQrQk@85NLjbcq5_#;fB9DbxjmTkXp`*yoa%fZ;&4rj!=Y&4n2nJCsc6^o|ov>+bB`6G@WM-w7dk%^{3gw^U9uQIu6Z@%&* zW;8`**+t}UDk5)SBgC+(V6t?)valzSw1=XriYSzsLgE>RhmaTv4dzP(GpdSI<1mLZ znoUJ!3NYS0Zd|_zh~+xCGJAZQs{}ZWX0N3136B|HjPIm0eHNq2WKkJ?UCM}?lBe95 z%%?JDJA8cV@?t+^78qx^Ty+;^T>+6D!`)>am^+PAxj!oY$CE`CVoBT-ICGUJpzo;fZ3g8Ziiz zr~+ zt5}TdmE8N32s9V@Xzpr9OuPR*j^g%ve6E`lR?&Yd{d;BKJw=YCt8PB9>Hv3utL1M# z?RSzz1X_73yx>V@Ky83m^6gUx0?0a&2@uYJESP1s`dnA4WSXt>+YqOF>o;YbrV8xX#*Y zPkeIW2RFZ5b@SpXm?o1k^)`oBa&DC|)x6wiOckPuA_KjkqE!}4ktw+l{B0T*2UI4( zTqeG0frq&*mLe3l#lqlITt&$)yI|h#vXr{)ETkq>;;F82RTjGJh%m)v@dqeE00gG+ zW>-;`%U%c^UP;W;uF#Vrt9s<-`%jnJN*ln1Ho#h4UkK*3wEm|3>3X7_WUmHADkKO| zQw>pGVqeL}E7`^(!`|Q{>P)~3AiQ|{Tqo(z**8tARUKfAAhCubJ9xm)6cU_<&s&Tl zxd_@j$oBe^Ta4QqzQ4N{-z_%ND`|iFk|c*1t*^iw(G(*2N!M;q>Ie9ZH)pe_pMAN> zQYJn{#mh}a#l2z3PLEge!s@O76{@ZQ6YBV^ijQ117|>Nj{anjvHH_H+162d{E5abj zEdO4p1MUb9R@hQQlZk404xmY-xt6=}?nuKr!_KTy_e6NenGajpan-#J9xulg*5n2^ zZ|exPxvLvGOoy1+2g<^TQvKgP$?*T}rAg+S2%@yc3r zFdEVz*Y|j3mvZ`tAvd2#YOfx!(Xm|v-V22_1U}SVl=g@-6oN-c5Wv*inc&kcq zx^-oT-Cg*kw=F2 z|BV%S0v;*!rWK^I<T-)VRlu6Qrmq06@JNnQl4cE}P4@)K^wk=H^zmG?X)}bI0@Xws;_;6{8#* zfQ-}=uDzZ;EvS8oq-F2;7VDhM%$E16fQy#rTbkXuIXNv2<6D}G3JWVMDq0#kCK5jP z_~N{|6a9o=+7*DslfB2lKA3bW!Du&`1&ojmQ?Wy3%+~dXVOilJ5?LzIpBtE`;?sr+|j@3|IvTvS5J}MVPV=ZZSQhSP5t)G+qc&sjW7?^XRtt1 zQ;%huM>k`oW=dEmJUn4jLSDCmgV7DF(6Fi6_5BvlK$-Hr7cqr>a~FVb*_50;}dVf>XXS;A0HZ@ob76?&F+O8ljD=KiV8~$ORKZu z#h_T?sslwz18bUHTvk_C>>kh9>~XI8)LU8eO13`hQk`^zyJJ7}X<~?p+xy?T?WSU) z2-#&ShY@_Jwef#}#w$r*EAEkDv^6w(z(Kic@@jKybCZ*ElF{Kj<=JKCowTa$skT`2 z+<6|+H!G)<`O@?kb&_k&&DJDm<&?X2)aB{&ECAM(XXlmWWtaWZ?UkHei@8fZ1_Z=F z99Km-QmuE_=2@Su&MB=X0#;s@ZCPHLgDom+UM)QG(0Ka%C^ZZbs!<)IT<^I@QTkT5 zDSH$zPR5O(Q=@vJu<{5GHX1gsWJbO#ys@J-1>@YLZ zO5~Lu&}t*b1kB5keKR1pKcb%ne*c?TY{riCyb^o9zm~d!Y5&6E(WRj5;jKK8q^Hu87MHN8ZkyER#-#&L;IkJauLNLjcsgtJ)pyvF5u|(TLnT&1{hb z6LuC4orDYy)`EXe5Vb?l4bjMT^Mlw7x8Kte!0849(BT2V=1+2;OH<)Bodp% zX2dX7iq(UxEG)vZk&eP*mPS(t3kEr_?#s{?S-q0$>w7DsoOWDk zYbg>XNmlGZSC{`b6f5*P)5Kk~ui=myu#`!`y-YW(_}9Y)o%f4UOqE}9 zZJ`+nnrnW3S{fR5ZDeGA{>qiLdD*pYp8pLf&r<}i)s25-4#t{J4?s}+ph!mL0r)+1`FHP7r`s}U?ZDP)$w&a z=5Noj)nnp?LF~4BzL89q;K}KIJ1)v^E`83mH(NBllG)E;(j(7fKTJGn6?nHhN0XzW zkS{;yI#9;US}X}YhZzlsF8#2w+jw)|bM7)S;8*^f2g54(=i5yb@hhx72WV+G^jS&H zL!A|#%+$_OPx9P6(;T*8>9T5F2a@N4aL(~V1dZqfFAlcb11@up%evcjAd>~^2c>|O znHA{lSkNS7#yJ9!WvL*QXiQR2L!(4Q)$1>?0HQxa&&f^B@h1U(zV$ik31GX$Jyp-X z%nDb6_xElZBcQtq_U5yoP$(Wgf(N+I|#?=VkVRt5&b^zvRGXLUv z7I^aZl;zEJIgGBxO7_y~3j%3LU#o8N50u*`nF#VtlCvivJAHr76~2}F(keBvwD;u9m9Ek2AHeSh6Q z;MSvrU|R|K;~@_d+z597na_{bsf;?-)ETKpR^ zVnigK5kr`PGYRU5F#jKdi+_>+utmS}DjZ7q02ncXuApz50bR&l_ceDdIz^qK?Y*ui zoLzfbg!|7!t`Jv9-ANaAHTArErs~LSVgDIiH~EPsLWgT6KhX@*#X@&~LEBaVmz|z# zqTS4anlGB@27#w-LZ^xDvqZqz(2qGEn!1jBsELn#UvpRN2bwE%jZY<%u&p?!*N}ZT z?2nz(52m=6Asj6^-!-h+aVZQEl84~c>l_}W8a_ZZB0v}sC{*%cm3;W_5XJ5gr4L%3 zaiuD|@lnvG&<%IJiL35RY5AJ8HpiyilQKCaIi=^ZGg}g&Z&*D9w-OCjLmX5eq7LeL z9MBK+3blmkt#3Kxd^wdemaV_H4{^ST`0zllNtqAOln-}@P~c(4ZFj) z#J6D4WZw+mgNyF=P5j-RGkg&bDSYZ-THmlcCgGXuyT@mGSTj7_H~c;yecGq3-V3Kl zJD8lQkP~n-&A{_gxeWK+2=6;o>r+Wh7*vH9kfkT>GjC8lC$u|oPn>W8x(RU|4&9OS z-A~uAi&_z{Y|6yF1St3UsPv^MwJHtQQ_?V4eFr3Oxt@C(BGh3}YR2^}Xc(am@CIuX zJxdzynB8^wBq;Ge1@oEM`Ab-=0m46h#}4=W6;a0^Ds!Ib2}b-o5T7~E^*jtD1A!!v z0)NqyMVRh5Psp5~qzdsZXab}iZYb^}6$*l#DZxp;Nx?mLocBf~L3OHg!c>HA>QSG^ zWt$}0Ke&EqY@4f~?em`Yv$Iu$Bmi{(vs11gsq6my6HWM-*tG6{4w|Iwb|tFi-L8c9 z_0a?M(L>ekfVUt5>X_Jr8ZG1m@`pje za0`@NiMomRcRlIEZOBQd+Fo^PMmM+Xbm7Ai^ubbS$AUK6llQc%tAQ1%&A(Fu#I;Mw zCqnc6#wtAyWh9LxRafOumXRXyGFjbD#C&^er4TZ&PIC-GslN zeRy|4*7Js6hZ!FKcxm=43@#no{bcBhouYlX4SD`UWEkahXl7p4s@-DT;kL|*^uPMU zR4lPQ{C;G_1PW7Xu3l*KhdK33=&GZByJlm~+GY@RmY;lI?&l1rbZF+r?zP<%CRN%q z?X#*Q!s^fNv5les0&iw(Qf7Wr*NjUuzMJvmj4%8B0%nryUYPeW8@ZC0&B)9dGiUX| zznqZ?`@ETp7-Z?p$NGE<`)ps%7?S>CKi8KtMy7u`V;r7;_t)GPd*Cl(CH8YCr<>BJ z``s&M{Wk8W{ssI4mcrlr(h*~CpSg498#60s?w$FcGY|Ij`-k8D?5vHmie|mWaMt(p z@1OP&Km5dR`maXZpZq=#q%TZ2r>{!S>-(k`(s!i4mA*f{A^lAHH|fJ?-8n02*7#ZX z&q|#&r{8xxIBW5&m;11PpMEoaP(NQWFKRyoZ2^r$s*)-rq`XQdkB})N6opb83Bq2mRG{6F^I1-z*$ z`x`#FG)ddEN!p$^y^!Rz1wv7Y2yK8gDag?3Agx>k6=>z66c8#Z4N#JTD2$?VQRp~| zctOzDnL4kdgN_4%7HnxlTP{)&B^3%-5mKZOVo2WKIwyhRIRF3qJN-}gP=oYU@{ zeOddm_S*No)?#B+nm7>~CuUU=HYtWp5wR)JY)TB97R#o~Sx%(k#F{J-o26j0W7z&8 zw!c`@U&0zitWnGw@gZf6Q5vI+HOg6ti@sgN-X6;iiDFNS*wbS6w1j+u)G zu9vYJWb8&MyD^G=MZ~@$W?zx8uSnTfqcp3;?CMzdPhxf({v_;QW$a(&>?b141Q9zy z%ubN76Qt~fD0YI3ogil?DA);Z-5K(wYs#I}gp775!TWm}@yRx#TuVOynao0x5rux`@7ORLcG! zW`B^dKSCYyNqpD zuwRSVuf^=w6838;dtAgG7qj1p*l%D;*l(ol2@(4}{>1F}684mcJtbyON!a=Lld^WP z#wB81V)jju=1s9?t4Om|ta(e!z9nJbiqgC#)4VOxye-zeEn!0)rP z`6&kBGen=U@=!`S3Cmss!@sGeXW!Az&g8+?KL3O!o5Noi#K}ouAA_Q2RZbz&+23V|6}>uY^w~fHQMLb#uqz13J8evyRUh_ti`Y;zU51b!KKAH?Cv5 zR#MrK*U`3Tj~yP3omm)@oBH$W!m|KY>ex6KS`xM!jF5*(0x^-$wTP|>$ZB=8c0dC? z>8uc&We}jO6?HUnKaRs(j50x!)*Pq|MP55KYuX`K8_EE9wX`{1@3wDm&}<_&DE|1i zT;gJcI6JDI~3*KWBWAA@( z(zg5masO|}Be-(E^1bi=nfEXGmD|6EA29yzN&nvWw|)Nfe;MLmeHgPt-vZdRkkVOF3ZTN;QDqB(^ z-WIh@S`k&jyGjs3g3uC4R8*8iB~>vB_&p(kzw`;&6VfWlGRefKiA<6#J1R<^EsK&z zDY6w&l37u+d9m}NrP1#* zG12p)-=|Qqa8*7YBUR2*N|~gXZ81@bZL;}_sF?Z6ZOSOceC2#5RbHWZLYb}nEbgd5%T~Oie1%adDx#l=<6V_-jd?|0rC7$O)Z5fi@!MkO$3>~;Yqn{k;^u4SGpaa1 zsj_2+DTk>(Q-7w;jvuBT_U~Nd=c}TW^P^31QE?{35fy7vnGo+h%{}B#%knmhxWedkpWI z`kr=7`g>_(GRE|IFEuMY>!xdJmf)J6)hCP5B}-Bhl1FNl`t7Mo{SMt7DQPK2MyHje zjY)nyRmp8nQEFAGcch9l(kN_NLJC}U+tZc09fry@V}^y%r6Oz!V&Jx?DN|MY$}~%c zm|>!#v@u$hRxp#aI&GHLs8#8P>-y?abW<~?vh(_^%ovoB(yy9{(WUFA8d3~XGy0N$ z#_)djzSH1}Z^Ljy-;Al`pOKhWA$(Rx&Y$JY8PqJGyr=Im0`;xQuuDzTAHeT)E7=%skyYx;(+P|I2;hs?X!N zEVyL8V|+O?uHVbq@8rOh%hTs&0a~92*LSkwa$bgOD!VNuTlZedHa1(g$*?Iyr_&j9 zzggaxJ67JY;*Q)qpSrVh$nAIb8*<0cNkhjns=J=LtMaaXLqtQ?4|&mS%$=P#)-sk! z%@gIV&wH`JSa3(dq+z#@9Baemn~7m%?4Oe+YA2@rIYnm3&C2D5W)Edz(&lqx)1vxi z^&8tSYryRT#}3FEn8m~-&(*%4HZMD~e`ZeRfC0vp#`OdHgL3Aky`MZUC(~GYd*;CY z16Jk?xP3sxH5`_A9k`xJN*IwiLNg+1gnEQ(1Un*mM4!d_#SFH7=DIN)2kQ?lnZAvnbj(;htKboG9XsQ}8PCi} znW+oEyk?&jv-9`9Fx&r7Yrav1WjG`wDE!sOp|s<#vunFD+Tals8>C#}@uAQ$MxYg}YwI-+{s(WEF?c8jHSc~?S;Ceokd#bgNTi-$= zTwa(ANhK<4!%lOT1EN8qtebY4J^mjcSUdhq|9GWQ9G_}mfBc2Xh5Kqfo4Cs@IiAf9 zPYo1|{L%fPnXoRgDxpwX;rSy}w|!=Y;QO3HN0YfpPygEuB1_oAyO~7NggiBS{PNbF zW;N`P!GU~uYj%Py+3u}DnUI8MGyIXjtVjZ~5HhHgH6U{`*(S(VVC*-el+82@_v_mD zu#_i04}9+9&h(c>8KJJvTT|_+@zw-mWCnA5P$zrDtO$;g%`l5)Gwn!{*F|RC(^b`4 z>-iaqy`H~*NLB!j-p>mCT zgu=R4G8B!jjhAT7)0Po>FYalE2k8mr==a^nxXBOtyN@*$8YJ9Q0@FqdNfG!%t=nA? zWN*O)w(cJTQwBVS$#W?gPm{5pjQ>eS%VPr)prYvleXHld7&>P_qO61neD8|cP^M%Z z2gR6StDoPX4T=wd^bIQazH(Af?v`h9P?(wQ-WPr7!`bBM`I`mq+@;y@!sI;yW$f$T zIp_GNv$?HG_q|GdxQ!2ywDuss^Gnf;eF(v8J!_L8r#-f57wJ+;6GEF4guOoOw~`jQ z7)-f+-2D_h5(#A`pSH}9=6z~^&e5h)S%D$GX|k-^plB+V84O~X+71l|wOzxYIl}C2 zOqovQT?oTE0LpkHWfUl>>w&f&XoXzf3PyJ*9SbDxG2dxNt)k~T(rkSRs)I-)Lj2>h zcmQb`LUAGv=#pp9-#lC~fB!$Smv zVlg#;`J3~dzx;WZbNkj$-Ywqx=bg@p&|hKD?Xpeg0rgC3JpZ1D&9a1Z{m0L;*EwUwW>9pu^ffU|;RI z(p|`%KZwqO-b$^WGMz887?Wisri7qHHW&hJ5@ii$8NS4_q_z$RuX4nJ1WZvw=;vq_ z1Zr?hs({B7XdqdaJ|?Zk#F0aSISq(S*4{oaJ*UZ*fZ)(?l9)h>NwmrwvL`xt8;>l5 zOwrOfOz-?EYc(m>7E3A^Q7b}4$&Iuw%| zz<+h-i!zyLXtcNxik6A$a))*DIS9@&eru^jK01$1=H?d5lF<#cb%=ffv24opZqD@9 zRCa(g_(ADtCq7t>r53$Vr1wFG(}eL(81s>vf<@bq=)C_RV&w2zfi($qhfOM)+Vd<0QW<)=3KK@%Y6`bbgbr) zXKm!pHEVuorXd#tuIJ|jOasoygHfid7VM%3VQA=$A5%9hFJ&iXpcw{Lo`FALyK1!3 zX#sb=l#Xi#Lxmol0e;tXh0Y@0!8#LrK(#o zTcXk=t3$F`;SSZ_^-XKtOkTS+1|)7~D@1tBM4zia=6>#X{^x!d)Ec6=MP*t|FdH9# zD#Kyabc|_SeHkWKq{$CZI}PzUpBrLx{$Wr!0H}?^;imR8|9*BE!8H zq-lPcVo3M5AA{h)ySVF*VDrs1kYi^MF~IRkV=x`wo?}q6mBh(rkhe1I4afbBT_@A#3@DIApQ3)sCKE zN!Np|9CHj+k;`D>^l2fFbphu_ab6>4Kkb+cVLHsB0t6aEclg(=_!5vfok!O_$5S)1 zi2$-boW2NAa0xR_3Gq_v77Q=E9@RL*&s^M0Dn&6Beg%wh;ldpb^2IB1=k+WH5>1l2 z`)8pBg5wXR&jQVS)67ld?ImUjH)9qmyteC(W-fI+KbN&Kuo!l8fJ;BFwz;ZWVUS$x-5`RI*2P=c5#7gGB78#R#fwX0^cEfq6{7W{!py?$xIAwLMFRu z*lA38m+-lljPJ>~Mn>G+0VU{rA{a&^YwR(J_vcwqTGCDxdH|d~_=Vwne*@TWPj0Azi9xk_)1}EO9 z+Z5m3O=|2h^9NG<=2`DX+WQcRFb3{fvK^$jjZ|7rr*ySDIITk#3;Ho{v8E$vWPq@5 zZ$M80ZBy+uROnH<6cZVv$XEcQ7hz(=={2F{4$Rh?IoE7Rk=r+0dk3;1bTa%(j9++h zEqsxW@EO?0eLY*N;7-kkq{{F3sW6f3dz4Ho89$IAnFk}2j3H!aD}x*ux9l{?KqvL1 z9?eSBp5B+{sj2n6N~>0Wjz=qCM`2Um8C8=F7fZ0}RG7t9d37Pd8zs;fUa_aqe^2vv zAyH!=?!)$cV+yzBIOYNQ(31YxaRlQsTHQZ93W=+y9(Ck*a!i3p&#SD z?AQl7MohTtfYUrQp);;MA3>jWWi7RwQICSG@zE$03;Cwg0_bJrE33m?(&?V{7<8p| zY&ZOl90^8H%>2+}sPA7X4koSE9eE9%6xlxp-V%Hg1@G7n9m1vj7xeU62)o5(%z=TH zoZSYHV7;kN5BJB%NIRm6sIxo27&GS^vvrq{wf0&BZ}f`1#mt+G%R7S6R3A^XBv6{4 zv=%3(6)q`Cz;f*hCT!3ZMrypOfwAm-syou;HE~)8xfJdr8=ZwWK_bI#DCDyj--rT(Y`6>ZNko#&Y==<%$o=RjbQ2FO{6@eWj`? z_#T9hC@ntTP(3SErK_f@QdDn9Qxqv%Ql3wlCQaEQc)34NLfbNq#6Vf`OxAFVF{zVI z#kSXb%XtHLU6k6h)=)xYmMjMCaF;={Bq1>i+PE(bY}DA?+@`rA1z#)oxbabot81Ej z+?>trf8cOoyrRi$k~{WGF(f5qLDi=hBZIX)Gq;R$)FYUC>|E~idd+?Ac z(PSRX)LMm1 z7FY!Jw^Di3a|aoPR$W%cFcOJWs!*uaS%$)b!U8Z$xC{ohNnx(He6RanM{YJlMxruS zDwjwYhTQ5c3ZL3*@VHzIqw8a_*`2;nAaoJ${?OB(W?alTD+#R(jtq4;uQ@+HvGAVa zImL5I4f$Crtz7oqckln{Pcgdq{!?$XD%|8lx?LFh(tPFVq#L#2=nBU&FheI zfx!?6WM>~4az3LgZE{JTX`nH?zs)9efjKAGGef{76@YDFE+S~i)^&76$izOn_`oG^hUHi9p z&(E5w^+6&7Jo>Ie_n=l~Y**=418on#8>S691So~;It$z-uAW8`we zyzuNW7AbbD(P}SWj){@U7zXzuxpVt*$8^7pbnT|5>LjV9xPB^4jWPtH{cpBb`b%+7 zw(M}Bd)&hI&UyV9oowQO0jbe@$c`zdrNR4okM~#)Hb^|j&`n~F#r2~*jv7}ewd#!I zO3iZYPE}!_$}0BkijUsc*~!`KG)ati7pe4hzZc)3F~CwR1dcOY^&DF6ff{5?P-_j` zuF#Mn9ed&o4c(q&-B2N4wa&GCeIw0%F(Pd@#zCwri(x5PVu;tKo(&y5KJAR;qQUiD^pX1Xh%?iyp^>Hge6*}t62FG4@!E-l2QgS6CQzxPvN zOZDnP4fBNi%?kI41u`ACX*#B=h#1q~4`~HQ(G1A0JFy^zy*sC*wyVT#J?**2e;-yc z#xzaqD9-h=NSx{}(rQ}o<~-qV?NB(o$5wEyyy@XhFPZL172L);blXe63=1?l46MB^0_2q(ow$dF>y;~xYEO@w`jWQiVZNSF)64pYW=f- z=5%de|4jTQYSsL&QX9>?M{7mV(K>OeHby6kPSr|vlIYYnM{!zWA}&>bX1JQ3R@pfC z@w?^^SvYiT*@D;@%TU|U{9OKyuhJAt8ct)6@f)dJPZ4Gh5I4(THtE!K-Mf6FNz`{? z)rQBaJg+YIY^wEa#&L}#yu(SmA>Nu|&B3D`v^NvC(-4!Bm5{hZnUJW(EzyKV?mgN> zrBRmay0^Bgs1?B)I&r~9V^G4+U(|}k-DjTQidu(Y=+=6?$05F)J9w0$)9lPKT%|LQ z_l_b6Rw<%dPbWp`zmI0PaHF|E*h;a$iml-#lh4RYm(rBH$;R*IWh9IG7^O{_+G}V~ zu~PJ@`FN3gc&>E^?II$=gN+3tCR81Ag@`+) z(8WzGmFYm_?jZ$qO!4iarXcPmBYRVZ=Blk9)(KEAK?S@9%6IQ+K7*}y&Fk%HmY}>f zA3j9Vw^iM?j&n55H; z{FlVU4)@}x5;2)aD%iLJB}4f)e}vJYjp-1nnP?Da?l5fIykf;P9?do%Wce>EI}n_I zk(;7C(a6nga|C614VFq;x&dvtX+{{I*>(fbTulotCQy5D6e{h*uW6CCe7LasL8aaF zx^Rn^P!GM%5k)vh?1lI3jl3dd7HvZllyIfTjbliAb1=!E#5$bMn*ocAaPD4h35xv) zBN6fm(ERYB(#$s8w#T}MoU-ssC?JFMJ0pmZ*XQg= zOhkK&EkNHR zKqE{qXv$AeWV{V0(Z7T^AIC zyvC2A9w>H<&;d!tg!>dZ^SKNr^|wd~bOdTj z+$U^mVHxUf<8bB!!gnOJb#$Vw&X`AwR_(T0?5?3nf=~+gVasg~u>(XIE>pg1J=;9* zdA28uylzune>B(Vju^w~tJFseeNHK+Jqh3hN)yyP&NTUf{7M;t_3S z1P?UssaEfit_Kg(@8Pb84r6MPehh8Jz15DkLnai@!-NKSm_>)JropwDS(Tt7?t#PL zoO<^t4DV4<1F=ulJ^e&&W_~3l2e2$60NGB%RYzf?jA^XpHivj2?wgx64CDP{q4!ny zUAdFNJmamwnPH9hwLQfx?T<@w?qu<7u4}ME1$(XM4Zn2HWWQ`rDaY*bzWVHb=|bo~SX!8aG)%Fb z+#8{$F-`kBv|uLTKcDO9hsa+^Y#_RJ-jxhC9I!JXW+rr}NL^p9g#AS!%G#ZzPV zY+i=>3+>){Yf3w|yRZk+$^CdRr#PoDr}TjiaCRMAx~waBaB0`|gL~TCZA%-#83ff7 zT^A3ce*8ZjEcIVFIQgjm$AiWG^9KtNz-Tt9W0&CA)Q%%lw`tk34cd4~FZ^Yh&bLS@FKw?;4oB!g$ zXM%T{i@ zX+mDRx(_0^UEYJ8I9V>l&HQLaE77p%P^?Z+SBJ)XP+;xCbibpm8z{k1cWKUK9xab9 z>^$l|xnx<}o*w*kPblqZr05^WEQze){`31E4EzTJ|6jp?M1nmYonC7*IUjJ|v+zNe3wu0vpEjTj&JAw3 z@|rEzI&4|7^B$W?uh#41;{)@nUjOb=a6Dna0KpxIaS(MMEE zx0WCbf1?D>hn-J2r`ks7wE}$bcwlY75Jsx3? z{MHfxA-9xZ`6y=v;Xhp;uZjl#cZ~`tpW^XvZxHZ*YY7DSnQAp!#R5Jk z4k%FqV89X(@Xzoi5b1;x0REN|0RMam^!jXDB9DKc)>{Dzsk!|6X~I9A0y0pK3YA*V zFfzRKcsvO}LxR44{vfk+ymOJ`9%r%1ROCDT#pR6Py}@yg4Z%xFB_9-q`UX71Xz>z! z65z3UYpW==7u)ijQwW}RnB)DrOM&yjwBGP_l6s`CR7K+R0+zz+Q%cn+1E|QBZR@Yq zN&~9`r_nCZ4h-S)^Z6HYpKv4p9#Bz?ugDk9{V405LjJ?KA62!sVx7lBsg>asN?!sp zA{R0K37$?OZss35%yMCe{9p4gk<60Mp#~C5@R*Hrwj@=7tj%U??USq5peq<`i8o`ri=9IAMdE+WdaD{^>fsUZskUe`>8y`^Bul=_%-8 zyxtrAANo(5ZDHxtl>Zz3-xdG#OEyz_2KgnSljQqPWxJVjW(0h%{*#cCfnGG@Cj1vw z=s%|j)GwEd=};!ze|o6t8en={F7$rNj6}WKn71&}|C`JWK1I^`E8+g%HmuZ9>a^L^ z`e8P!H84N$y5Hds1_BD->w&7O2>c-GebE1)_vPU)Q}4s~Kc)7`j^Zb6cV!6hO24kl zap_>7*&K#fs`P4&&dS-$mj1SEf=9(FK>E_atg2VgYpQjr)N=!SFat^Ub31(*r_p$k z1F!c+@7;U+YDe$dYy5H+FDbS}`aksk!Ao1vdkFpC4R{*AiWg3}W&FBy<$yp}6{RNh z9s>Ol{lxo~fd*fg{%HKt+wQVi^a=WeoA^g1SppV)20wlQ^HFHua=Fj!t!VX@pa-QI z5b&>8J1e{|qn|5YIG)PyQv~Bx-NE?ar7QPR|6f_`xF^@94cC9w>lZFLHp~xb`T8gP z_ky4NEBG$t%j}$7ImHx#Z$|#RE~F{L@Iw2snJS7gLhB>+A5g|$LJJCKT6-+fVx{1nB~_6X6e=Oak1$6({+|Xw*Gp(Pf_tv zE1G`0-Eui_+UFDKht9ZchSD+{`m``S>fbL5NcC!!G8P?3nmz*WH4*-%_w1qkpC#TOp>9uWg&g7Fmic3W?!J*=c9fzHKpH({+2=J;zgy4Jf3ylDd$d4 zJ#D$1acP`?+_)u$&f;bL^HX#xJQB&GE#C((eRukcb2JL_^ADlt9gs(H6x*riT<2Zm zn|hw&xTGsx%*WvDpRY#@5{Z8SA4Bl;7c`E#Tm+qzKG0&x(3<~XfQbJ0I{3Voq4NRtQ~6bj6s;}S zxdbz{G1fa#D)l*SV197RmDhqZs@6K~p*MqXI??~&8Klz%b)jp{YeDoscrM%RVfwW> zoz#A9n3d4@fkWCLdU?=rr9HGewEHIf1sx8quiu0RT}v?nWuWb%_tdMy@RmRo;!g@B zQR|K6TR5semZyK}pUr5;UMhn`LUE)0)96*O@Bz@D(0^x8?{{UcFn^=|2d(SI{Ehk_ z#KO;?!|+1?bL;&1(iMLG>@2M)HAmq2@hje+@hkW~=)>_QS635VP~1B)i}%8fN`Na7 z=>3U;y(L@AC4Yd zD{^n}(CP)t7kwVcqjHLKjMr=Tq2RvrsJ;tn!5P*&^M^afI>*|Eqke(^s1$YHj08PSudUbTXELt9o?lX$;KZj;+WjFCpYL~OUgk6-1)UD#YTCtXDL=`A8OR~wPbdMMyi*IfL4V;EV7tpX<<#!; zAD20)ggRZIIhgk4^*pyMNF|KmUxgJ!ik9$C_zP489lIPsw6&lPty6EzTT>^|BdXxTLhsM_AJn>W&jlEKfS-R->!JBa0Q0xV{Ike}v~4zvCA|JhPzET6 z77Mj19vTWh-=A??hgcBJk9D8*q_|au3AC z$HmBHl$IBw-GTTr^rB@h{*Dk)pi-sLX>?SHMA0;cuCcGN(->;*Z!=K467JXFM$hSh zlsX2)gSw*!xY1g<*u1C5ExoUJ2|-tU@b3R4Q9QwBz?!3ch$g&LYo1Ub? z>eQ#0vV-zZzCIsc02o$l=_B_qnEuG5xq^$;dcE#<|Dczy{@lNyw5$N#6ZtKFX43yy z{><`cMEva_a&bC~oZvk!8~-@{Q~E`|b2aC*JEqXT06qPYNDSw+bKqxeKc}TWmSGI0 zJlhCcig}R5`AF;TTCY@jK5!y%F5|K#_+0Gu9u=j(u)_Z4#W!CLRUikK;=k8D=g?id zdaXMYAEflD{-pBg_{5A9Z3->iQ3D1~tBGpR*q)T0l&;0z1GPQ!Gq%sEX~*p>q3w|i z=wFfE$I3bG4y_DTyIiNT&URvsa((fxE7mL1Q7bDQcU!si3{|uo^>=0Z73<<%&g-FT zXFE@2MQDKH`G4+#vTZ|0i=L7R3TX^vFbV{VwNK-)z(pQBpdZ|S)%sJ`lgTa;`PnKSD zdKY56z$21~#4B8NS5N)j=`8#9)ZbfP$LJ6W?Fl)nD?D3WO!cT0BcG{z=I2wPCn-2O zU-&Lt9gU#UF^YmQmZO2_aCSE@xBR1o9o!s%9 zQ{o(HqcYxn2YH2WkN%=Qq{6LN(Uth1+%FGFLeGTiPM$h>Dhm65jJz7}-&DJuCp{tl z9pt4Kw==z^9;eIZ;$uN?5R`vw{l;?D9ICiTz8$)T)!ZP4yo@9P`P=fUF!cW5RuL)^i^zL?@)jC}Zfn`d2q4$_M zr2QrDc;2_x>$*@z2v=u+%xL#q51!QpWS8SH0a2dI5K;H2f-Do1LW+&2koT%j?@JG; z@UC{q9YV^H90WxVpLKqD^`(m$-&l6zVs48sRDD)^(iAd<%qMLjeRn*i`C~>%d37yb zWk`8N^^07Hr>L6odKX?k)$KuCu1a5@AdwJN zs@K+vx6L}`BcIofrIX$V#Do|pgUm9{49Qjfgx%dC4TU|)v@rX6E(Fj1a(1~8X~>2v zo*~A%2X{b2L`B6{4Lnn1Izb-zy zQ@o%lF*RuTIz5BDHgEDZeMlElBC)N`txjK_@8JS5^@ zCZv$l8+yjS`j_X<1T8^qX80I>#O&^V_~A*D?!P~h#DDc$?G!nR!o4zuLtg)1{Yd#9 zvR4*;4ZU*T%RT(5HX27)tz60YR;>!GTp3_2qd*v=EU>R!xpI|{307AJs;h(H-)i#T zvJ(FA4dS1vQqxn#I1~!Snl%;7sx|9AYFM=rq(u+pobUf&1BF|;_w5bOKev)GkA`iu znW4lGfVV$CdN^-i133Gt>MHTdDkjLstEO~Tt{i2>@95D+BkUVK_+bD3mCXLpMzwMD zer6?p@i0ND0;)iQj10U6YK07>iC?NLI${X_YqbisTuP6e@fhgw01IZRWwezkC@82J zHL41B%cugBPb?N&M_BMmShHqBT5f)*a%t6YW!{*fCr9e58`}D ztF>4x^h@EGvNAG#3Ztn2zXsnLbs2t{3WLGNl$8{XE-EQw$|~$t_KGql7_2g*8r9~B z8_c6en=RQE=wqlbpni#<35=K|Fc9$sT}@WXBZVcBV9aCp@1JD`O`DMky91k>G|Z7&6^`37=~~1H>|{=Ay{sH zMLcQ0CeW+2TJ7z(I~=1%_3fLMmXt)HD6c4PILBJ;haZyvyYEh!B9yVWnUs{47J(<~ zG#aN&iG&YRYb0U*7erK30|Qu^qMZT+NmMpU2u_hlA2}4IUJMVP5qJt?zRMe+@Kxsh zqd$M`?YBRFZU5*hV9Mnx9haW2*GnV<))B&9R#sJ|R4yOJ$HG|5WS>7jVy`mKpKr!L zLDS=QpFjUC9=BVtS6Aoff670C-Q~J);rQ_rCk`GI>}6%DcuN0qtf_^^juOwDxom`BTehUGj`ABx|6IfT`4=xd z{`ma)g8!gFuwR@%f8j#GuG49?^dG6kUw;1P8~Xp|8^QnN!SwW#C)3j-_WASec6-Hq zJc9p!mmk9Yemue8{`~|IK)*r%WRktA>dYAzo-=2JUcu*UZYJO6W?>&97<9P;*pqU( z1X?G1#D(A;4v**H!TtNsoN+kFPOy{~J%WFP;BNX~xKLGPHVZvZRh7q6RTUq9@Su=> z*^NgCzjEdN{TD6-gI|3m#D_kXhRd)?UsV6A_($ll$;3%Ho{9>wSSlrT3Vbja6uH5` z56HYzLPB*g zO|M{&^ic@R`};x)Yz@;J2^aZ|xJP~kcYP=lBhiavR2?42D5_r}oDcg1!WZSIcdri8p_R@Hfrd&ffY`JXCu6A;S`K)YYvJ zUPqlJWMTfmlrdMCvv~i+oIt1*EB?7+8{U6H`S8trM)GqrCE?3b9gS6z+$;A<0-_+| z7p;+$$-OF%-eto|5h+$X3v3>}N9B>%NKS}oRmKG5K0tWVT~n(m7OgfLkI;Vz`N8^F zE957fzemqL8nORTYu8eKL)t%SPY9X#O;d#RnFRA!3>|Wia@`L}}ol8IwS@ z85uc)?|X8jlbe>AsSNkvkub!Axootv;P$(4&eQ+N!gs#c+;t$PS-DQ_sVHjLKj!Rh z*DpoF(l55&3Jj*Av4=NaKic(4g;S+M8PPvH_uP}$KKAVHaGq*E5!VOj#gdr3PyWY` zJu5;ZosN#(9hKKU?|Ir!H0lc>20ZF@>(*`Ey3X6Wu6O*u^*yq5IAOUC|{>Dz;yjEZWx!2Bj*Ht zTzt637+}tYRh7Zz;?ck#6vhu6#bA$u}=RVAxY)6mg0{L z(Y3{;R@vmb>~jC-kp1?LmQrg!@Ib+-xC64WapSy0xFIg08{#BDMf1lN;cB?`=S-GTp9RO?4U9 zx=AFFx}Vc(YRb53a8C2zAC+-sn?+*&`@~$%5O(J|T90vG)`?%_T)7XX~t`C#e`1_}-Z7cFYBf+&}9ml~=>I^Yvt_ zuh+cWB8pmx@X3t(^jzX!J(177Rp(xn2<|A7U_RRnmRS-55)o8ND3dgR)u?Xy@Fx#_ z_;t>=6OVs#=)%{s@9sIivF7DfSAQNyKfa&GJ^9qn<6heM^SF`?8>=_Ivf<~Fm!2;H z$8N42Ou_!#%7M9y!L8!YUD(Lb>;W?Z=;}z|3hHHwc!fJNm77#AN@cWauB{F((d2Tr zPNZe_b!vvsL+(5FL~Fj_YtuAOv#Z4o)5V*6TcEb36J_eq7@5>YK?vBmun@3uybv%l zc_Cmz1$jOfMKRooR$}zr+M+qpDw6U-7FIvZOF2XiL@`nBdM$UcF4r#PFoE*(K)t4; z6Go716I0w_kk~}U$djfUfIc2K8k84 z`Bas}Ax!fAggQ7t|gId663aC)Zi0shv-Wf7a3i zp=?qMNSNzapIecY1jf+Kex18+J`qLTe1VAETLuX< zVue^bA_TtXsTI6rtwby6%&${XT1YC*azhRXx1+^dvuUt*^OnKhOw(5}F&uzoTS;a}bw zlpaW1;Qnb5Ns%fg{)KnypgpFx*t53l_LejVE@Kx!0RECrLG(`tN{^6prXVC3T{pB? zz*M@3csPeb+K@WG5LCL;pnzCJ>-o&AEQ((Oj<_h}%udJ_iWV9dP|q^xF(AD#+FFJd zgKtPKbbq;^Lz~vg3mfXtyz@BtcO{w~kBj;+ozX;mC`>fa+|iaOGJ?xfStohCdc_N? zN?v?vqm%#WvKZ=Mx9u6g{jPuO-*-I! zhd-Pgkb1|CSDxc0?a2OeC0A6mX4mt3es|Y~S08$7$F^_#D(-)A{0B#iCcYXQlnz;w zG-LU)x->;I18AwMQTC z`|{uqK6ob({pS8Tiyj3?$Gz&UAXqnFCYBrSm^wVF~jcEVlr~>_^ZyK zrgFde=p?82)Moj_ArtS5IX`N>_Q=B2ZQm)6FDZE^N}A+c!&KVdNV>e)zxHIY$R8!0 z^!o2Q7WQC4G4 zvA!O*IDT!?vqd|+7bka)itQ;*dwbsZb3y~pURPK5+v`2PU$GDhvHId8dg1WG+QF6h z5-)UoG}tPxY_twQdx3BR>MkJn0AdSH=72X7(q40FyM{JH2ob~@K%kd4CTxYQSCf(k z)LjIC(C*Yct5gsXM#|WfVqH`ph^X9djFQI1X)klx%}X-9S2MwSXwS4tGHWZ{yN35b z`c`*S@!s7Peq(bXVDBb(@B5-1nl*faJzo{4yRtwVe z&vkDfEAu7S-!5O*Y;Zb~|$11SI%+_{LG ziIVsmiD9+Ma-Grn7%AM*d5{O<9|*B#3NGg<T{TTp=C*CMQztc5*+tRiys6{ync?CPoO>QmqKyZWxj>)q!^5J6&!6O*PBe-gHH*v zuQ176-@*-v*iulr2wvN(ngfgKDhB$ST6%XyoryH%PPW&YQ6IkT_+5~B6 z+YRxE5Yp_-GWX=$Ef7Bme%*SCGi4kwm@)@OOsq04UZsW>vLp!V&&uxGufK87kfFJj zeCxPVrGaYtod#MCc)MbM3;{+Tmuy7x!a%S8tcfcSf^puiCiM${jXW3sn{&4X7;(A zPjkj94YNs9A;R|_u4cKW`bBcxGFQWF5HV7##C^g!j;#PeNMgg7-eEvJ(&;HYc@ZPp_@BUr&+~+ zwA4ZHJh}Lw?(cB?DYu*DFuxvoTqGHZDO2uOS(>|{1#ktXlh)X}t0^y5uU+-?I0&O& zRf9?H8dypeuc&_Jxm6n$mspo*mMwMHJ?(CN8ltrzI3-?|Ta}t?hds{FV_mLsRAxfb zR`JrzI746=WMkUgSrA;)hzW7Lf~0)@(&$H5QMq@b-fAOMit_4C4!AK#;+~(5RS9Hh z^rC6>Ye>r7cQJ?#X5FdzJwOB+4kQ=E8^IQfl)5>l4%mYWM8Nz$cPq`jAbiyN7f9Wp zSrR1oW7>qa0AVdUVc{PcODFajaOm z`uUe%f8fESqUO_*F`T1}^#OUp4r=qSN4rv~hXkFY_i_o4h(T#;@2F(P! zS)qB@4p}F&?A#bykHt5j&xMriSg2UaD#&tZIG(V4Q$3KVr5ruGgsCs(`G^p6HVp!qwdj;!R$Zi zNMp@QuQ)fYd9j3kUw8@fk)6(G)>m&TNvXyR&p)|&yUU+@Y`cqlV>G``F-fhW?TuXf z99|}~@sj@=2s4-E8|OkAF*mJ#oPX%i&-|;~jj7h8&;0MU8#N?px375$aWhMd_rt5u zdw8d*$a|!a(=N%`X#yYowQ<~N@mlFN*)GMgnA6Jc_<%Z;;Qe{K|4<8;)e152%`Fgb zGTDEuwb0+*S`0S&)TO~~5T}C=`(F(rWkf*wKG7veKqOh`>q*x64MFE7MJ)s!{B#h; z^m;^W6+xitfx6m=oO5o=5)u&AdQaaHuB%0p+DeH()@qb@lAQ4wtxc7NWL}U3w_}<6 z=n~G&2k)fd6PC$TU?;cAxiq)??xoxvyqVzE^lf$DyOita)?8_!j~`kz-!>y!B&=;s zcjPi>`Wqz>g;U%0cx%_9R_+1>zj8A`-AlR0cvDDe!ct_cX;+rxj6KtF##h-WQxF;8 z2l*k~=$6?%u=xJ6nUP#`Iv0F(o+Am`K|S@~%%?t?^xdZ*|Yh!@5Ot zZ>uPdbaZ*8sLVBI{zW;-P|6t%h82Aqc{_n$p3cM?7eT4hgHkdef z6}}T;?%Tjvf&1KQO91~i$;c$`$>61`K#{M)Ti~j$7T}3Dh3CJzOMu7ieV+Rv&}_SH zgiWiz&DP(h<0X6shMd3^$RXfiw)+U4xWbgNx)gmXnEb#e>;vBzIHc*C0?#MhCmFnF zse^`rX(>1vHUX6$3QxbdyZl{A!>`mum0=(G=E&<|CtZ`1M z1m}#|RthGfA$fqGvlGlmMc_PfA@?L9Q?1vgfH(0j;vUe0e}?c!2U_prR&qZn=!gn310o&kT@&At%Y9PY@AAzSl3j8N( zJ_pJ`MwtJ^Vp~?aWcm&M*JexLJO7rY5&l;J-keu;_nkH>K_vYQ{F6_W+DjLLf6s~&Gbz}Abbg)x zir@K^ZG_`Nk{}U=zb$aW@mg?r;6wyIl0Mi|fd8BPm#YGx;-Y`Wzi$p0Q^5Zg!T+r# zV3=D=0IohB|6tyXC;1Ck?iKKlIBv+l5I9H;HYx$Z_b$QwQsV!yjQ|fe_;BU&T))8o zparLKFxF zP;uAwa@Mo%?FjC1_pq)jL6jth5fBBA%WCu>$IY@B5HXJ9%=>++rzaEF-E-d0`_J$9 z`OuS8cURX_RnJpTJ@r&|Jx?bQ{z<+-A1vr^!v9N?@aA7AU&J61zQsQ<$o~mhcai@Q zf&Q>E1OMN;X0u5o?&gOIGt!6IQ=JZ1ViNW&H-ETMe=BX^N|PM@Cw*#p)4^clX1gst zCu=Omzsr5j?%?&L0o$#dYwu-ei|}N9#yb=2B0O22wKQc9jCB>e+k+e3GzQc7`JP`J zcqCXDpfUJOw7*_&wAb+EiVxhdG z#M!Zl2=-8+B4x<{`Vs8kB@!jRFEBhY1^PvbYlMs7k8W6fEX7a1e81UlvqQR! z6X9E7n~bhCQG{2iZ1$YgMeFZ(Pf5>Bca1%IbaPkEm4sU`J;(2m-$nk(O>nJ3!yoJq z--Czmybkp7=g7Z1aiByJi2?CnBnH?X5$&AfN=NyyW2E{M1~9TD{%7>3kzJ=xh))BJ zGhIZz+TP;+uFd(70doHcXieGau)L3j`whSg{?Q?ML4!*JMD3v%aNMzDRafr1IouZ; zj19(oz-UlpvS*@|Eo{xJsll+{Tq(LijHI|#tl2Xr!0j1Jjs8uza8*D z&FtsJ@pn$xe^E&Oi2jSh@J#zzUlWFB+Rts@)U2Fz_dN9AkpGX%*K%&bdsEy{c&M*a zXcQs&A1a@eho_sK4%vTdO-6_x=KrXdJWmz(Z-5PGFY$l41`Gox|06J1zbN>d<~fib zv4a048h@J(L4iF$dld!xg($!Pga;xOI=a62)bZeLyYfLhuqqYMFwlJN|fSG+>zbV!pm5z@@SZ$zyOb*|s1L|A) zTl&vz&mpCwR)AN)2Nvxx#MgBg{B!VuMf0GJqxQJ;oYd^pY)gVkkNri;fhD&fUall` zW%p-z7(C5j#$lRL>ppvYbz?1?*W`83@69(S`*Kp9$w|p}vku<}kOJQHEoryVeBpZp zWkdQ1wVz+~i_Z@R_J7TGV4?OCZa)51xBJGk`}>PFxH3#?sy%ktNpF~L!iQOZ6xANP zTk{B>YCpT^SATobw;wh+9UWBr=$r5V$6so0xONW|ZOF}`O!ROr@QnPv22xn4K^KXLP!G{CJD+w+B{HFie|A>1wwAbg{8^}Qp!3UzD zy($7m(y$0#@Ls@V54?8_@qdv+LjdW{CIh;@*`Q-q(SHO6Ub`io!BhP)vB{zF z4>~GlKg0n;F$lxw_?wV2r2U&Tu8e}sq<{E_LAM@2;qz}c-wf!{GR*%9^!N3Q{-XBk z*WYIJ$LO1bIbf0C|HNd%=$k_;5D9)7CCL9%1bm(gR`r7R%i!TF4%YD`S8GIg%q&Q* zhWw}W_ha-_qU*6a1koRoBLlh#`F~hJ^cQ9?B;(PAG5_(eU>-;g4;;>BR|1Ja=Fb!vPh^0sk+x5FIpwVY5UUeaU};$tcu+pbImYUU*;IkkL;^Say^51&qI8 z$w}T9q=NscA^x*4g8UQzS>%6882yCtw+|}CxCe^Je@)1L;a>m5cW#pZn$?(MiT)!Y zIcfFb@5Wz$0?c4haf8tiG5*5;)P}R+@pmW&5we?MfbsWe^PDVKd}4U~)zkR<;cs3G zjlW^|(D*wPgZ1UXm)-O4cGkk6Fh(Sd8OoJe-2!ljB&42Y+ z)EKb!)((!p!s>0kCPkd!7hSD-+J!fpcbWPz%kN81s@ng zF%aR!IV2og;D@!X0?ct8c01{xPyhzN-68m)7!du%8K@LS$3%a^0NMi_SjuE4-1u@6 zzF0GG7|QhuT7QFX6o>vZG3@`SAGK5a$A$bKL4F6?gRSoMq+d9lB){E{1kHil=>Ed` zgP^~{d!M_2jUOTYzwHZr;@6Y>_a6*C776d_#_T-;-lPR}qN%1>%@d;JN%tIIyY+GrQ~ z4~x)W83rME;O6%e24J7Gn#QJi;6Rs31*;rzu|VBL7(Isjl(P^_xHcjnMvG16Ta7G~G`6YQg@Sgj}=r+OI2JgqH;IfoSM(L*bL`>8{+n zN&XDNx4^~2?rnnhiM1cB{s{cDBd{0qdjBT>wZZcL$NGoM57qxPYS7vrTEC(G^M6_Y z@4)|$^_LqpSp9$wcEU~d#}c|Pa2qmU0BwgO%1&O$9;_h$J9MZA$V1w?9|fk<`scPn zcahUY6cpBfUf)P>0EmL*KWh+P@SimZ{~iBX3_jr+`A;POvwsf{|5@Gomp zp9Q@iqoj&vz>)s5$Oj&+zz^2o!3wgd8q8tckKAniIoC;-t^O~L@ZgWe)AtEou%;ju&Esr~{6@%CKsfYGQP5HNuJd7Atm zk@T{Fwa2-}VD{x2LDCEB>sXz6r3!s5-!!5Nq-T>1t@W>_X_Yy=zU|eFuZ+d{SA`7Nzi{7^#KiCpN$G{ zHeG2NI41Ppp%@7AcMtf9TLm%K`>(Hcbz}b3ovY=1;)kqW*)?`yOb}C8GX=p&Qf> zj3NDp)_-!~ztw`$B@(8;UCFs}2@5EK|3#X;)96onCawRI{zF4Q>6!4~NBUcOPC86c zL-5ewZspv%1oju;*$9NiReKyJfLalnz5mL&oMKYPBw1r!Q&zc`yIs(q$#WEP4*XYe zIYzOB1o(flqhz;xle;$f^N(H#`~N$Ja!Rfpa@XeE&9q0X-x3udvoZ#{;QI?h2(4d* z;gLn~_(#XX@Ti~v*0o#iTF?dBEBV(WYgz`67br)mlQH-Z{#mYxG=>eXzkom4`t8`9 z^t;^;oC$UYoALgO*3XGPrvj$}P5xuY#L*vb5J7+Pzed`Fn%uaR#M)1g|K$IDGqs-xk0!L!_QI{{!ySmTfY?OFT8&g*Z(8nfx!@XU?BLv1N}w+?;`!f{@+D-0RxU3iUDbLA^&&i zfr9@#f&PO07y2J)|B(BB_p)ZJUkcJA@L`}Wu(kPSy3?8IF4|Uz_a}`1Z#6aT4cvTv zBi^5c_+OAd=)P{6=Z4`SKxmw0{s))3mrR}#qCa`>`ydeagQo@h3z8kQkB9tEOt6Ra zPsTe4o)-KUgZ1FOjQRf+yr*OJLEwLyKa>CYG{OJrBAS1a_x54ry_?M+)2A$GUIy7k z{-a$kzy8+KziHkI*-QST{eBT%^dBw4|L^@r%kc(~`H!YfoJOMy;mb!9+! zhWuX(@R+)X{9hBi3ZCbZ%*i?1rn89-;Nf3Tcmv61@Z^&`8j0#8Z4hMAddi~Ux*k8`ZLv@xKGrdX$@SY z|DXl|O0e;3Fb5_-H#}4o0S}+dzyK?FgX32u2Gsh4@R9pBD38CFpG>dA>K*!iDjZ3| z|8i*cP42%Ehz{K6p1rQR=7E|`?oD=!133huAAHsKj_;+wO9NeUv_S;CgL+^Dyc~N72( z`1_+G{nv^Zkp3Hq0s8dp^))q{fWZT-{QI!0!RLDk7`#K}N30)0{^9!{k?_EPa3Tx} z-~v^se}G}|Ng$9k6kfn!5MIE5)ChZR^hf5Zx|A2Y~z6a2#bQGiGP0r$A!e_4P>|M4^ahyUCM;QyL-FEDtFU+=*G zeh&2?HvbgMx3l?6B>YhR7rtNe_xqPb41^v`^S5vf(1S((kB61HIDdrxM*JVzKM(=W z_&)+37zp|U?STUuko;o$!-rV^71s|%c;E*NhLjH)4C)Wxzkew-d$7BlP#^K8OO(F; zCa8~?YdNQ=@O_vh3-w*nUz?up#rI)0W9_FG2lKy<`AcGwlNtbr0G~b3gtFIA!V7&DfV6*u`LCxOKI_Nyl#bT~?T38>ot2Mw0@ydvftNqED1XTM6T@I|{17mp z^#@mK0_HAs;Qb%u=fGztcBN2M72XCnMi32w=@0+X zR(R@8^1ntH&>K3E-x(PK{jK(?s6F*^fqtJ2Tn7DVoeTR;Om-{YA!36Ft$<xTXP{f`ac=;IrcTn@ma`>}9e* z6214T?L7-Z5(fj`Nbq35T+kTnC)nMD1H+A^@{aajV)VZZKf*cq{*FoQ$|87re**Z=`lI~U2tG=H|9`AM z$?r%ENd87*;2Od9Z-9eo{Q>efU&MfV0BI{jF#!Bf3?OyELvWBx@Jc1*CNQ84oR`r0 z1TT)?>)j8ncQ42IfB2gJc7T3g;fwdK(XKSC+(ULHF#Zp^g09|L;{R+=IU_@CKi5?3 z-^i!^8v|_Z(0@7bXkdi+{-}9D;Ol{)+fDO#(tnzN<9^nT^^3^&Kal@!VgAB&5AZIO z5bPggZ}4CY9TecP>Pk=Oeh56RUt#@0@MR|CFm(SIE#M0C_kl~81352a^@k*gfC1#h zR9B`je-|TLH`;QP#K3TZH|40d3RM!LQtBn%_BgjOZ7JM;7GcI!pnE0W`NP zxMM-x-EPufu<|L)fPJF=6NYCPko+faY$67t{7+1BISHQjj|JVB9X=z>AH(!_P0h*5 zcGnB*PsawDUb~!gEg>)qyFa(M8}VhGGzpe~bDv{=xgzA^Nk(0ifac?w=tE6mQK=4eftn{rA#m30G|2+5aN60dbUo zgD?c)&4mU2#RuVUq2EV+A3U1xf4P5#-n(J@SS{_J5!(;i+v4xM|9zXy-|sdWXk0fK zL*G9-4e#_nr`-pU-#=o!1MN-Rf5qsJ)gNL1m1``$xe?yK((Wbydss#6|7?KX{|e&| z;A#IA8^34;G&KCu{wvGS@&~$xmM`=`chk0Y&b#eqSBgNtfb;bSn@$h3`cqtv#yKB7 z=dPt4H1z!%zx?`vZxjI~?Vx!K@?V5^ucP-rxyd4Y;KA2U52#;z)0OhzoIn3^+kJOU zvc@y`lywLGQ2Kh=reA+{NrX2V6D_V$*geSJACaFj;J$K2&2_}5Q;GjiR5SIb^2+5CdAe~;1+VnBD17@$o; z7?f`whdzkPmK^=$oI*gZbVl|BV)9S@3cU$6LYCHVEebO7=xDt zrGZg_Wxhj0;6uA_(Srx!Tl}9iKVKv0KT_;5((6bQ`qX~48Q(rS`dRk1TerxM9B3Db z0ntvVfq+5HgU|LCZh1CH7|=NATPI-9{Ie!}0w)rlmY*_QgYbld-k;|t3{qTMYwj zAi`7ajXtF>!?m?&ed!>)-oNbT?O%QuezL1*3*L0F{WD_uSDLVYmaRV1)9?@$Z|@fR>yU&b&fcjZ9*gZ{Vg6W+jJ9{MIxPlOjS7=#xvsIAFx z-IMMvg?7&1l|H?H$$tA^I+N~z6!mY;GV#mW#!up9)3GEYWPp_>Qfc7Q4KM_~& z9WGix6ITDJ?)08ZJ%H6geEH1D-rkY^_SlBa`0`m3dwVCq+px1_x*Pk4UAd{QsUA-r zbTg2b{T}NV_77w3YSdx>uHAmNe_-{S*xGby2~l5|e^CuY49N3jBnI~3n17-4ME3nN z=)bEsABK3w8zez{B>iy^1N#0+BnEOn-pr)C?n;98Eqs4Q4ZV3_a}(a6ZD!UJ1Rse3 z?LUsh09qN_0j)Q=FudCB@MXs^!23t+U=(J6QQSyby1d9%6I~Qd9HHi3=(y#$Y4gp# zIlHFzi+$_+@75>Cuz3Loyc4~A+jKf3yQ7!gQ-E*l$kS~#QAJTTwRG>n3d}8=PkmGE zQwBY2zRHrvEAu4|_EpcImJOY*Vz|argN2 zD2rb3td8yX^3$)}Qg>xII)p4(?bS6=XhevhQ0=39YC(*;9M3xTb3auT$Y&^{0N|H@ zEx*CN)%%I#joLx)+k+Sgc?uX@85M|wTgT_-$up&5{jn=gdN}VC_jM>CIj?J7!Ncc9 zwA?$}W^TThIjJ+AoNe3InA4}84z5aIjmWNJ7)!6=OHol>h(B-y2AU>eW z_~KZ0e}V09^37j17X)&%RX6(EPU&ot8;!mDHs|i%{nn>^>O&cl6y{UnQ}6v-zI^{J zp7TgLxc+^BR+q$G;2PxI z#|&o7`;?8dV`oi>PRDD z4=lTdkH;S=7}L%C7@Xx-Y-QDK4)nhlw^c0L_w)0|(#kjY{rr4xK~HK?PijxD2Xo{GRvz%{OoYZIz~Q9r&md zMy~nAG+lxDC+GEXmSYZ|{?inv@!|Db8b78yUUYnv)g2f}OW_~cdexLmrL#JY2}s5i zq$%KA(I$ge#beo$A?9ec$+{H@~>0R)2Y0^Obf0HWcu_IZ`T-PJoH&6uDX&BU4M%TD8QcQAkE; zw30~@t(2Flq}aqIF)LJHd6`shNLT4{WFvBC%WZn2LYk>msj9Q5s&Q$SsK0YcV{f^NQRV(W-Ijyiups z=g!cmveR{noDuR|r)OG+f}7Ey@Z{q>3+Doy=iodS=lM7D&dYILfpY`St8l&-=lgK}0n+Am$mt*D%Tc}@<;(MC z;(AtxyaWHJhdggK?&shh|EP~VZyxUF;~xL0mmKwyqh9R4V=c;FhrHJ#?+wC#2hMpL zQRV|U{}AT~abB1w_u#(+|J{f`0v0!w^;bk!&&_I6?@4+){!QSW?6C>@7XVr zE6^3l?GT)T^qhgmkDf+;|4H++C*e}aebT)Dq~tNKIeKioZp%^hefbGrk+&y{9Jq}s zNNzr*E;9eN>4^8qdzil{@=)YG;y5`v<&RC@Hsx*`fcWuo-*9%$Wp_J*)5PBZ=N|~j z@fjxZmq$;a+1TwIea9mxr6&Pe_hw^X2)-y-g&$Ie;BN-+!S5#0{_o)P@Hv=8_~nJ* zrNIfox%f!|pC6ntr2G-VHwMf1C3yq8(lmhs9X`7^u)hPI#d6_p&?zBTEED?1p5u*c znWxAjxIU>$Hco&e7x*7BUpy^YP98zhH1I-VzI0l$`mDBRl_USHF|&GHJvRD(-+VI| zdv0^|J&%<)f5@H49zSAZ?Y%u$eWmAn-0&HqG^Hu{-ZEtpxd=;a_QFqBT7XFuA@%CSL#U~%_iXUqtKk46dV8^O>tY5EPFZ|PKoyozM z;&2#v_D|PztX*eXeXqk{;8(lvEycfs7k>00t9iBCeQ(yb<}F$GG-t72)5cP)nU*3Y zlKrh7Mu+4}?R%MN)l;Na^2Vw$t1|AMxZ!j1sU*I3Y&%uKvS5K;;{?KDGyESnd?YGlgi-M^QhcMxXy}^Ok6IVp z9^H-Afaq@2`u5kS_`ez`8#%L`` zx>%cD6>m_Foqj|xD3vFU06GRkOz^yXwqbZMs7R032G1&WnwWr8HLEMu`c0=L z@nokd=7*h{n7U4tW8ApW;3TZK(yNTn5ss6XOquL3nGmPN2Sz3Wf5ZUqOcu9*K;k9w znVD+%{u>e}mBq!Owc{ewg{X&g<>ezou*A%Cu+9;-8h-4_cT)rPe;d|&e9R_)o3u`5Mejr5Szv6a-mg12PH#Gr;P)10f_Y`YAGBk<>f4n zxQaEg(6V9JcuK?ylTgdA$KU#Rp;$?{3440v8+PF!wj%u_vR0d^(BNT^5 z8#_`Wl~LQP*OA0pD?!|7i;yZDB5veDI>7$m3=_K+%GYW`aiLqZe8%kYWu6jK^0or% z_Q|(3T~Y7O6uZ4?cs{!Q_<@Sqox=jNzz<0SoS}19fk~^2=bR=3=Q3NkJWCQc4Qwzy zHkO;AlXF)z@lvNwBe|;4a95QUt3J_eh>bIvhnZq^Q8Dpmom6QHo|V{0DonqsP}!1$ zXJz`~mViXAkA*U&$c%D8E+~`u;JYeC60X%sJK{C^D0T3xHZ#f|JgYmGV@7OAq1HBo9plE0Ek_@xxMEc} z4r%C!MMoKoi)B)OvUcq{x-gm6BCl9BK&(R?T_CQ!d_$~MBf}7gHo%1hR}e(8p%y_u z)oQ^2g;>#xtx_QYi3%KGlwy23DTXm+(?%6BH~M~roREOW%+Yb_RrL!O7D~Y1bbz&x zdyS-U(!K_sq2V|3R4%bTX2$V?)oLqmut)>Hh>T(4X>Fg^31DqW@uzOuEL<< zDh*a{sYTCKS*%>OJ(^o)w{Xi0ChkovdHqx+i&q&&stq=cOs_SlbQYD~lxR?zbk+bq zx2lbXD6x#N2G7ZKING-!U=X|R6LY0(dKTC4}U?9uqQ z{H)Vpa&*d6XkbB8$aL^*^gu9U%^Ii(8?%}-vzn<#Hd5QoSRpB=B#CSlZWYF@dbWF>KFsD3M{nk&bb+!Yyz3fb?PQ8HtN$wYOggP!9E#R)evN`zy^ z_*E!FjN8nP88e`T(RaOYSV}Cy#hOsRpri^BAmUsycnx;gHUF;4v6ZT%8-=1YN&L-x zNR!xsOh;$j={X{2yf@FJF(|mh@jC9QcnkNV_;~KevS{w?~GOfcpH2O+eY2!MK`sh+? z5!YB|YAjoeM78Xy5pi3EV_oQs6XF~g=a6VCN+I#Hmg1To5R#x2KsQnxD|XA)t?SB4 z%h<#9C}7HQ7_Lr%>FICUdh?mLY4}Sdp2No0FSKaRM8IDJyEAYc^84N|mY# zb*xgUmXb`#L^{-B(ITg7Dv1tuy=a}F&83YSO}vjsjIQ3vh2&YfpvyP?1Gr(G`9V(K z%nt%N9Y=8T<>M}2xXb^*Hv@Mwgu59Z_@?1*+6RGP2Uc^Yf6(o_2d+Kk&Y(?_+lR{z zU&h6r{XI|itnWF}mvOP{NbkS*zS8ZRcd=&`Rv8K|_S}YRRsMlO-;MWAKAF3{@Hd6; z7DgA%D=I76UF5^#0{UD_K+>HcGVOHQNG z1XvE&woV1RoO`jS++n{e!(vA)kDCk5RH~(!YMI9BOOAnwKwX5|?d~Uv&KF%O`g74I zMgLuNtw`-Nz*nypCFGpuj}~FM;+-Nadz`$OVx2jCwA!e}I?$26B5z-@*Eyf^B&yNV z71QCP`!WTIGZ1W|U=Ibqqu>MrYKd=)e7C426vg$$`-@K$dv(PpbBlfRSxc0i54f=; zj+;~6)GX=_EcFH)9Zn;oIoim3rWl^lZvkUeeLZVC4NGJJ`hTBj;)&kB`X-;~z2=+v zM(^KzliujPegqDLfn4QTkSq0^b38k!?`@2-i+H{0v<^qoIVZHRQ;(uJyp;}%vebT52j z;YSOT79}rAThy2GdCK@j6BflTvYrN2)bPh2aPz4P)3m;Y7ki4}Hh9Fs5XH0diIND^ z`~r&eUYkUVRqz>KPPaBCzer4ah?06K_!FgP^g+5GhSF^n(~X>oB((_Cd^^R76s0Eo zEk#pX6giUlx9O=wa?^X4GsD22p*w1scku4w1G+)s@6(w8`zX^N%^Dq5Z2h-cxV(r! z&1)Cou~AB1_l0_=LB>)X=ydCSzz?Gvg8!O;N(vBMr9d?s!QB+pQgD)jIdc%yAs{ZA zvB>uoanZs>o<-*u{biA2amC{Gi;wihUf@eE_U!U5Th#3PxPviY2ojx(;#&8oZi1WGkUK%^}T;{ntQK< z{Ve#N(F7*|&F?Joq616&zIvZ|3l0h$7)itqC!clPZyiN(@IOqEHD%s1iWQym&EHLP5E8&>_}B9R_B zFE3VwhaKM3mK;p!AhA~RX zl_VWE_l-V5Vgg{`KVK!uI=+NbpY?GUUrbYD2)N#XamOfieu!a*#v)=^5`M$d3~W?U z^zQL;lP1RsHKf)vSCon)hy+#dRwZeYg34jam>?E@gY@V~@4k~ineTdApCy@FU5YkE2_hvZg6hWulT(A^ z6GK5MHe=2L=_{*pkN&ZuTpRufx7>E;1%SX zQI4!^(Sa4Xp2V(|{5^E0Y+Dy1^;;BNLm+~zXUUQR@V(D(3W4X~dP@krSp;9R2#^m` z@KXx@K*0qH?28fnh=O-0h$}%b69GxuQRjLd?D^fNZ}yab+_SFdr8hgu`OD?LG1OE^^?IQxj-qP2crcEsSGtQuONtVyoSzUd?3m!?161ZAJ zdnqoDQShG>WK;o@^}vKEI;RRT%PH7FfvpOhxRd3^Mv_p>pBbpzx6vf$Mcn6)G^)@v>l3i7X0LlSiZKvRE0+q{eFD+j>bt(7G zQflOarM@pn2b#CEY$@sa@1W~^@qTxA_0l(&b}v=?5LMuqDC&W~WM$pWAEC2Eq9Co# z?i?+u2>dG)PuZM;es`QDR`RdXnMjc{AMatSDR_GRNHdf?x;#t4w-iiWFtS*SJra_j zN+t<%GP6nx8P(aa?tqR$yf}BLHQ3cOQ{!vC!rTR>jyJ~3__jr}pH)2qDb@BJ2 zBk&X1$Edpa<(Kd|KYY*ck*Y_l_E()wIaC$2_AgGuWThmn_% zMu!E?6oWc=UaC}Ru>3GeBgboxFibf)`A5~hnHRjZ znSC=abd&If%-tkvF$7ewB$->@le$1u*-WR(9 z5{C>Euby|hV<*g?@WTn`tNW^D%MzB|N}-=LZ}g>G)q(1-@snkYzGPTtT^5a>9Py); zWh@(uUr^2WR+~Sq_NLbp*IZfUD7MO0JJ7RUs`j4Fq_`y9TIW%)m_2w^e6WM!{)K{L z?7=DV!Iu=Lz8Ar81b3-8o8&APCwZ3}#$8kCWPLKT?7T@P@6(wTeVl5X5(_^PTeKl~ ze)`oo2UZ#1opD8BGbRPkQ5aJD4ZCvf$wexFN)(YIwT)VTj zwN@H6_EJjiUA3d}lR3s-%B?M^osOS8Z|tQqd{ulYeu|8-m)6&AsojJh_$8{=98(+O zm&w$~n-QpiU5H*ckYW}wPAcx{= zDR_W_7bv(%!Nh62z*pzNSLcYYWbumkOd9!L6gv4?lT2}z(~UEjiLZv~iLVkIDx7Cr zQS!#&;Hy7NY-&gF+{~+qxn?C8>s+oD{IxqJcUWvN*qSjtDlQn*OgCbsQafFn5De-f zISxzN@sD?!G~+uJcoSlh<<-?q2h-ueZle?@xTXvalmymDXG~;FH&#v~)|pPXmB!k- z=|(W&L$hWT&zZB(xB>t;CeNa$WkzDV&~4l#uqFVIxBySnCsn4;o->y*+Far|;ZnFC zt}(1xe!K1$b=)`g-s5$|aoT!wf1R&@aa=(J$Ng6waop89-(8n5;}&>{WD^rbL6R&y zo&-XilUrX>zovdi{ZsWv>$~eesVDwXI>ujmwf@ceY-I0{+NAYsus=x6&#gBX)rUCeLA0Rt1q5oouHM`rM!!kX|IMN|*PFMA(LsuK zOsCZQ>&=J6=pw{ecd_W7)ti4MM!!hWe`e9z`VdztXCQ721(Ok|`QhS&Wfb=U1;1tw zMu-nCQQU0`1s5fGk27-ba?#*6nf#p0syxGK$7zk=vT<4)-i^d-V=>yq8%-E( z#+kuq3Y!Wq+-F@)a_BK86KU?RXS zJzm5?rRR}gS5F&(z2412`qJdpd zO(~>EB~B@(dXY^}7Ro=;r+kAyf7<+)6<+6HZYq){@D!Xfb}!NgcH#C#;QJ~W8s$->NGE7z<<)S&Zg61$*2<*T(L4# z@R7dsbIu}EmTFK>v8)CR$!<=PCvzC`l)*fu$B-xUNQ7dC6t?}J6egnS6-z_55ygEF zE{<}frEx-75+wzWx;zE8R&i2~DNo_i5e0&@*Z5EuuW0a%_ZE;UB0tt;`--*9$!U{5 zzWGJ)eSTa6KB;Dwao%6$p35*N(??3H-YlSRrXF*Aoz?wfH&@aiD{qiiG^m$0XsR2u z)eZXU2189lbX|jGWy7$08-}lGu&!?i#xLRS;g)eF+*B@!OURDn;u02f6S)~n;<>5u z9NP-ofuhg`lR!L7p;{9*UfR_BS~H1#36m+_)?cH)S&Zvpni?sSfp&REK_?Axb|kF-kwh5EbP6_nXzL zu;UnCT6bzBvrEiTtFX1udd*J-)-MEZDglr0>|;4Bl2dzlv?tyups)GM#;UX({aDjnYdpo6fi%FlI!#e zokl4$sH6rB%zr`_W%^E;G8$$+Ih`71VW&=4+^I9!R>0)tp@(3MWm^Gbn}@c*1k1MK zp@+6SL`Uc;yTVhlDMK8dHf?Nr;33=iB$f*4LiSg7I~m^y2N$jN=ly2xk-2(F+|18T zMGZ^V{;`YucKXyV!9x7gJRK*A*T7>;f+ir5$jug5G0_GlEzIwVGGQ-MsD+KEHWL=Y zxPp;uTpY}Mv@jE0r^B&U3v0dUp)1%7YGF`=xb-U4`UH9k*iD-gCqqz4zg+j4*-Rji}{0WC#q4@4TFGaLPV;UA?GTCC; zzOOj@aBEURV!R2i1eCh?5!-MmB@+CnZqug7x3%v+yt8dzF^)$)`*wK_Ji6PnZ(r-q zwsz0H&x?z9>}h$})7pNxxcI>S7EgQI6G-=X+n$4M?b~rh=^ky}w+m1Av^}xCy$x}# zj~_nZIn<7;mM2?w?K*^{#d}(JJlcBj5E8Pu9fuCK6z^(p-P=ORig&f3Ty_;I_e&w? z#}2i$>?_`JXnWhf7D|Vj?rv+Rs_yaZZ}%LaI8XZy&%RcAzPE+yM#rwho_5d9HatJD zyJgRwom9%fmVF03JKEaz6a&SBdw>s~?l^pKH><*dgP!)ohbV6Q9z1SqJ{0Rt3@ac6x!eR zC~EqsXQyX-JLR{l-Sc?M9;(6)Q2hW)xYx5|H%nH$w;jdoCDeDf9^BiuZ%<20=!#N% z+PAkoN`)2g2f7DZb{xdjfx|lw?V#A5sMS+Qk22c!wCts1k+t{i+AC0e5D(O2$3f5b zLr*=m*RyM1%R%CaN828Lm^JSZ*nN+NFluSp!!j=3*}7{_%RyA2_#m2|C_kjM@1fem zp7w`Z4({09yYumueQouAj?L0)B27KH0v_9bh`xQTOcwdP2 zd%>OUEmQ?h`@z;7hxQ@qQ=a{dA5cc?!Gi+q-j=o}4(_I09&Pt*-_F|T`$`*(d;HLz z{Xz>9#~t+SK`HxNA4Pi+>$H1Xg^Ta4J#ahNx~~=K1T4{~zz5sWJ6H|a)qYeO41S=6 zSfdyxB&Dmt8Vp_?@a)@pV0Sxso?U@!cNe$q_3S$g>J`%!u{5q8Y2CGJ&*A-t9)9=< zc6AU}EiI2T&H$h8@wB(F&i@FgCR{!4+21BaGEUr2HF)aKcGg1Z(-0D@c?GVche9jt zZf)NqTmjSF#ZR=f?A$|D0hW&*+Q;zNj=1*LJ>Z!^JkXZyt&9fyNgjCi17_!;T?d6o z;*Gs+)Ji*Bo&ax9OAo>hUhVK4Y-!)$3fR49m;G%!kq)#)FCj7rfnE{n zDZ3BvCl)eo{ZHEt_ zHjz(Re`{~s*&@i;?L;k5?J1$Z?Qdy6(CQ&shmP9zgokn;EN!>v&_0%3aY&Hhsb`Pp zQO{Ezbaf_k+KA6XS9nV7u$Kq~x&TWip+Vh4f~XdxWBZ|&J%eQsg-HG~P85WEL=6Vh zec#poHZUS<^L7vFK+K8$aqysrMN(Iw789g=dn=KjN&Z&ilU*(7-k=KcRr_HyI<7n| zAe3jv!NU>tV^V7GKav(`@pg0v$o>P59cpbqNYrIMcR(Vw;L>Y~_5Ll_ z>zV9*ZZdyj4($ZL=S_)8?Ns%RJLeqMH}ahKvkc}XtHiEM;O~2g>|9Fh)+egrj%wIk zO8?NAZGC&rH1+L;zqQj}9_br(8g`a_2hU(T)S)xpt7A`W#{DJQ(H!8Hp7tF$vwJvK z6H7ak`6K7OhPlbfn@4OJ(QW-VWEtAJeVu;-8^ZXXViy@dajtI)*_>q0ePFI~toPtV zX8I{-rk~LrPBmHXss*bo*nfmKnPIO^$PyEAQ$j`}g2g88o|yaNxzEid^MQYz`^&lQ zbFF7+ul-dD#?&Kdpx`hC|AGLU(~r#^nEUNqHGlkK&#azP4jcbpgu6sCjCRv2_|N8I z3;!2$VKRH2;%U3{@zP{$P%TS_LBygmTsBegECr78Z)2#9TR zNCQgIuCp`qLc7jrXPjVH1`B60r-X$WUCAkNo;tM63|7^r$g-H3hKc6Tqf=Yu_QhQ6Yd_PMbk6%sdZ=vH z8iL6vk?jH_n>K=MVPY|=gzODNw#~>R(p0_w@my?({En@Io6G*EKmFxV2q z{*~G|($LV{Pzb70JIFz*4%ETZxAe5rNHD!@Vl1$_!{!_#(vWIG+!&2Swq&2_OhDm? z5wcJ@^)TPI89^hQQ~^0N$%m=LE09d0t!B9V7=d5M77KY(xASFr`^wLScB1C7ov4IV zXd`MA!(3n%)?nzF;N`HXCJLd7Q3vsUTL_b1LKi+L>Bbs)V-s(jvBDMlQM!nqGef*0 zxHy)8afzPwS?Y7~ERyJZoiAklRRqB{)Q|-6iFh0l&nqHk?%bFroRs zBI}+uY!n?KW(pB-<9)^oME&k=xHOb-9Bsc0%u16d>utB-!f=b=j`E2!@MY+1g8j3) z_d0b^nL`JGljU`0D0Q}E7_I0~TXw6l4FmIKd6im`74pCej^1mVVKp6Mu5SKV@wUDn zoNww|d%pXfV(CK5!jy%x7mZjvVsYl;$&0_iZ~NlM7C*cA$l|WWGZ&XEUcPwa;){zf zFaCJ()y02Zd}HzL#orIbEba?n^!G(EWWOyMwvB3jfL$y3Z|O|q!BSXCS+`K|M+9o; z%Vg>#>vMXYN0m~WL+yNuBIFeDvQmZ*SUZnWgp?wlf-y1c@0-!LNZgmdF@6zD^^Jp0 z06s#dB$u5UCWa<+ti?k&dfKjg+c}H+6s~>;uanF?5?gTtQpiDBn%*{y|ItEQtW{Y! zvY3Biq0MAXr>mD1+7#AuTmcIZ5)Laveh8NOP$BC@K?bpW{*lOHVEhO&_~%n8JkmGk zH25I(9AyC+mO6z7s}BWns0LdQxjZP-`dlGQ&W2zG`~MI9wGeE)QA_VsqjWk+dMI z!VeVvaW>FmU_39kY4$CiO)caqz?j*9J2P7KwaxA35$dumvoeTR6?VX zT#$~?fBsMsssHpDE_6F2c~U{!AvuZ;2MH~a%%WCDzVD#FB2j+{SE?xevcy+1J%z5U zldFLK5(>6d5jozc%i9PzDcMcJ!8B|qnR%f^uEBbt6w7$Po~$M#iAK*8aB)p z8xv!V)0tp7d3{<@>HJczx)jRk;?gCh)|hH!nTLSvCZ(VdNGeTac9Tj4T&}UjN6HYu zA5Pm>`e-Tlhf)sEkC*Dd>d+-1mJ7Ubj; zRj{IysMTl$sRq@S%BIWFgmTeNla+M4^ovq%co_=vm+H&RW!87{N2#5%h^+HR6-0?E-MECx(-xTQ)&O%I;T+B>MlRpG#8sYC&NVDSE;GxgESbGT?W+MJ!x?irGgtqz zTsa=XDlMJ2(>)m*U}_TU9N+sVrGn3LW8%gG;1r+2tlaPCC$jUsd=#D8v~A333`nEN z5I>Df>{IA!7B7Gi~T2UhC(zq-v1n2HvHv@6VdzuUi7oIaT6=6L?^~iNFYEkfWL8Xr>ru9GZakkx1n#1zgXGOe$AM zWoorjr6Wgp60L^u*RPlSd`Lj zWhnGj1mPsNLP@?BlU%1H^J)-mtU(V*4_U-NOgAqIH)`JxNH!(&^99TMIn;y(ej&5C z$0M@PUP?D8x>mHjf0DBNre>5GrtG-7mxA3C{1QQgFi`5zo6ub$UC&AtYAtA>040L* z;UrNN%vc*QPy}0TMup#0yi~zmWmNcG#mNe5c0H7P??>;H=dJ> z6JsmR8>MltJ5D%Efm&ckRwrqVH=KSl=lNBXv%g%|g}NvFMj%a`8w za=owTdS7+i$R6i?CC2NhgDVOS&#xJ$b$xkh|w&tg* zohgIj@M%OwP);UiIcYR1NR~VrA;X+&R2o01I$pJCDR-)h1~_=JXmDiq%si;qY}0Vva~*cR%-$*FmB#M8 z0IxJ~;@MFHnjGnqo-l64L`?a#_kxXI{ib9y=NyLF0d&n*QO=RxS0U7T=Qx)@Y2`<~ zUzj}Wtxui5@aAP9&z>{Gxg<3&-C}cU6tz?(+2K|IzVH zQ}2xa{MXXH>BicWPn4`JVZqRMKVnOba;!qhS- zHA-qY4yKnzTc^}$)YCCMMz5FY^+x8@RgN!1kjp$hd>+E9xkjs_vv5aObbRM7DmvmY zf_tt{%dNhrnyactKbclNtJ?bN!qj55B(}jj+nJ$t&J<^F;8xb-cVhV8$w`e$8kKU1 zYr?$_n$d~sJ=Lw%+>a@@pQp4}KT&PHs~)Vl4go177~AADwh0P}R!QJW4O}|>Glk^C zX}#5duIA*+km+aDf2;OY2dk}$h<4(YRIx!gGY*s`O`xZ}&P2C?!y3VwB&^~Ht}#oNN;zg*6} z#Ys}Bvf<9I>6FV^hwoqZw`H8F25`5QeZ9!SAmjS34NF)85C5g>pFmEJ?Ed zKfUOP3OTOw&Zt2R>fugD@WjId@OC%8lP(YIv@|)V6u+$b@0x2hYL>NQTx4cu{=aKL zQZX-*kk=@JWkz?fyASD3_uF(3bSmVeHhp=DlMi2WpH-^C=U9GlZ!9SBS?#gf+*S&$rQ>?xgx=y zxPf24Zsb~9QY^j*b$|V|`p!D8pq^Ude4Q_gW>wegGV28_qW%FEb^lNi*Yj?HFa)Uk(051X~(qxw_z-0|gv{x|jJ|Exz_lHV4PUvQtY zY5CUWp5?oi?_GXi`QhcyEPr9S;3|Vc33vYDFP95HX~eZG;#wYYt%$f*MqH~RuGJCO z8eAV)F8qST)U0V;-GsYYFG*VVjgx$QIfr&@0NM9tfm+b*m5vCC~2)O^-*+gYgB z%WZF~`J&~vH`V;o<+j(YpUlJ?i@ur3YUjMLj&heQ8H|+-dh5VFoH5sCz{FjdmODHJ z&cJa_g!hXXbPvZD`TNG^j*1TkXX4(G6b#P7IU3Ik5T7zS7@Vz4)4<2hxjFMD6%6i8%S{2$zK?TL;2ELqFUPx*<@i@T+^OT>FQabt%9Z!7#K8ib z@>NRX232M?zPoFjrHq?2DOOocelS*#S#|I7v2_)*vNM&F5{%X4gQY4vvwFEvnLkTu zRAw79S-L7^X0_3nnLjHV+LcmSy#cUQ*~a^E%7+UVBvV$S%xQVkR#JZXWpkDo%i(*Y zN@X-|Kpt?RAvkbZvS?NnfEF2z)yl-gL?iwakwtCY7-N+(yIO_1CBTOa#jT*sRVahf z(1E!8%(}WUW9#afOAZ#4l2Z>AD%yZRsl?Z&lqzHOYT&VY+15BE63vEUgVdFI)Y*#LJ~@MB+Qzp7y}c4V?;MUk)BV;;>(>RzY$z0TeDoL$g*55@o}uuYl>;le@&*ir!IgOpY>w2( zPi}C;^J5z@R!Ago(EzUHF{ilAXEb18W-7(gs4Xo712z;UV=lObE?-BW<`>ap_-tVQ z(I{CjqG>Q!W5TDVm5-20p~W{i#7T`_u9&;(qlTRgoMRPr-e($oMjA!f>mTQcY^jqc z)Lv-tHhkE?|F(hT6$CD=q|!hk$I=25&um~2+`Q7@O9GYz6D3fWz0=@5c)deuR}IQe)kN-kI2J8|`WtGJI=15IDu1^&TR z5YanU?OgSP@T9uFhHgt@{74_vT?u9$mwDfFw5{YQiFmwq_?p zBp@zmQ4Lj@1RPu|nNe87)%Gq-fy z)S)9%Tak^BK1BG=hS14Gp=C`7xH|zDQt!;fC&JIZvw;t1)`tk_I&wV|Lo|mrLGIsQ z-_UyjdK=J#w*~_f0|WH->bV2e<|PDY+DFi>T~m1|tVwT$<>n}uNgax!!R3zZ!e0%$eNOx9fJ zKLL!v?SZBJg?$L~FVH8DS=Y0VcA%SkbOjNqvtv*zO%X&SJ%Xxp1^~KU5idn8a)N3a zR*$&cfw#Da!*lz;9vdEoo3xeGS5T(WuUDfz1k~^tYq&220-zxHWg;gAVQU0Luf@d0 z?2kDVlN6I0WBIx_pwB|!V+48;u);o$bASbYVK`VW9sRl$E~mWHKFe~e z4~=Lz3YqmG^TBfYZ3fDIX(~Ia>040#8e;#~s5!d!c<;34c&?)#fh$*9Q28@iDTGO` z0)Ee$BZCXQbhmj?zt%3Jw6z-P ziIfodp#u-Unh@431}f`Fx5fby&!Hd@&77*=93k>tnD#h68>35>HWdRu_aWK23-_Nx z55SrhD)S3O+}}{^XMQoALqZ7Np2p@19%#Q|hxH0-;%h*~>XE~pXxqrl`Xk(&`*-V) z#&e8d{ShrbN?t>2j#VfxNX^u;<3i}X)>k#Jvgc^FvyC;;@Uzwqw!W1i+^7g2i?jL& zO-`?X3sIiwOB3q$oCQwrHw&EJZ5BAQ*KB5q(vk;B|KLkQBtGE~r2A?4U+^yl{-wab z6!@0{|5D&z3j9lfe<|=U1^%VLzZCeF0{>FrUkdz7fqyCRF9rUkz~4|n3p;q9x?y_m z7{MJga>r)7V-$Cc;f^hG$GGm8vpcrJ9ec?gTk8(rdd0llu|RiB?2f(cj%{|AaQz8u z{ILLk$=X1IC=lBgD7hR!XbQj-0g^yJ!s~umrk~_#AYs8e?4@;*Z~O_P{+ND%)!a01F6^yc$3_ z8GzLXNV)qpS{$C&<-k9`Sue6gp#lJ0ec z;dR)r>m)=WfhxpYg_3nb!WJR+x=`|sknmWDnFUE=*AWueVW-wfSV4r9L70D#WVwj& zvIsjYk_4_JY+i@$S|=$FBFKZVZ-OLe))A`LVXf;VF9#702Vn(4lF=Z-ED^>MN#ccs zb3#lel)NP(6pOG1kwh*c^op>1BFRG$!73PA6)brvm=G9@MFdM6dSd0g@*8@A`fu(q0nI3{%53JM!tM$OHd0;Ib zSg!}B^bp+lz#e&E8V~qYSHkcltnkEqJtbmK!d6dgkEh^>Czj_asq`c?dtzUE3hsMi zv%DlUFTye}%-c)yvKJxN3p?f|$?+modSOy8iNcG}?}h#BC7JXhSbJkjy#-$0ge~5J zecps5Z^1Ed!aLrQ25&;MH`eVf==Ua!dQ0?u2z(zb$p>#LNQ#ZpE83?2^Q%eLJM=!- zsZV-6>1?dtmvQ=8yOS>N(TmxqzaTy-I6+UApl@*~Y40ID*&+Qohm$TH)_eU;ebEt$ z%vnpR1yckj*;#8VS;3MlXC7U~IJ%Uc;!I0kqNN0Jv{e2gN(2W|z}?^}bTCXXEXW1^ zVlo&ZxUDEo&RSYFn-XWGrDW5zlsGUEH0>VuqwcxxCGPd^P1BFQXU6AR&5z2PmB+RT zoM~j_|5>Z~=^GT_P9vM``1GfrwAvrENy2tj6 zj-MVS{-mrx{`>lrY$--b?!=I7U(^ZT4H5WFP`TNQ0wv;V?=U4@?pmDaIM-$Ect?PRRC2}k5m9<6TnF;qG{PVo$FmXdkkta;Kvyg&<0kq#+GVn69U?VId^P{mhqMtJkzyhucI@XX{>R& z20zO~%UQV6cI^`OggbjYggv%ROO-p*#;HJJs(cAG$CO&o9kMp(E({$=( z8hcEjrJZ(WT&6L`1Z=1bLn}tvXcBi?GmSmIRLdA!${pXTrHuiROtmz*9(O{IJFW+9 zSi&9yn&AG_YZQeWqi6|5L1Psy(b99A=yglza%a?H`!T2y!URNKLMw9OrT_+LVAm4v zxVx4%?#^gfVwdJ*yA{VB7tfFkQIES;*FoHMeD+&>_7{BixEmK*z|ji1+939L5KAj! zX@l9?5bk&g>g}~sjQgz=PT_Gpxe6(!eNxZmeuiry=fvnD#{vD0+6?LOl)Ph$nl1jC+mO1?5p~2^Q+E099|L_8L;(hItm5d1-k=~3WFdJ~h#e-5fD^=;qR^W)*CnuSz zegfliKb}=~kKmvvgs5guEwjm)p5xAGaOO5G(dd5-rFGGhaRzi54o@G$5$LsG$Keb# zg!`WCWE@^gkEGFym(aT)7o9FL)evTRv6D@qVD1Etz-`9ixr0)I#(?Gp1=^|{@!ZRf z2Hav7yavC_OKUeFup4*hPPlO=_!c9*$erB7Murh1lu7e z0%t6UpuxvNa2!EPQ~1)lI2wy%UO+tB7)~E*h%um+%&}2SW0(W@>S+V|2K0e(j4_~3 zWDe*!lWAQfW|yhPNDAo|(IE?xdX1q1Wn&EL>oW!hF^y5b7x1DxV_cvy z`Wed6Cp}^}e~Pi2uYtJ^2Ku;JhH=NGI{DIPH^)L?1ei!LQ4qNmBDZ3|Jm%al%(!2e za=##RzaT-EAr{g0W6zoKeoznwT9pNB zZTABwJNj@@6`^0ok|9_RO!l;0G;P;T+p=j}F>Mb_XNQJQ3xiFPkM_wZw?7Hvj!H0Y zQ$J!jBImUvj2$O|LI~VKKE|zqIazKkfqPm;;P~?~wv#6YLhjG%U&ZZQ#qP9c4g1@_ z>Cf%AL~eNykzE!0PH8Zs-OtAsAC(hr_sEF!lv{xDOVmz( z*6=FE?NzKkd$!uuzH2pG0kth-P4F=8kR!$bn_2ITu@yqV7td-k#klo&j1D%Vi3-Im z!L;l?d;3;b&J}xh_5!F9o(b6nQGk_;}MMJ!*Yz(kVIrO1FafnXmyL;mW>_=lmacNO@3Uv9T-lAAxbn@QVA+q7h_pxHMCx}uFccyT(nLlZ z4`Y-&V%%&BwCf<}yA&eryGSDSwi_54kt@?DG8)}5TEP;Gn@q#BjJ;IGUJ@gYqJ8p^ z@xTh>s?T8T>uWk-;;PbOJMz4W<}EPaN^L*FinsLxGd>T}&NeJ#5ulQDRK z+nUK%z0bXUfjbUk!6@TFKas2A0q;-{W_r_6qQhlbs9AeBG1g$az zTBSRdz%B}hE_lcqOu@6d^$4uGK|DKI2I}J$C|b~}Nf<)`bQu5x3W1@(fvpF23dWGR zL1*)!y#jmSDP8aY1S|NE9L!h>um}h<*ANFh$58k)YV8>cS4OQXLuSt|0&%>>euyK| zx?G4fxg!`hkyb|mLn6|Ot#tNOLj?9sQW%(iCD4k-z5}H(Io5#n~lBooCgbjGpnJ|^IQ-l+lgQi3~8I8ys2i>WFK}f$VK>LJ; z#DX~<1W6(wi8;`a0ZGV2dj<75KLh+)R@VZ%T6?zK-mcb_1+duFR&LKMaT(AkpC%eGueNft2$`X8jn^wnc=|i^)JX=n;CctNm$vdddQJ98w1CNBtlpY9f82 zpGg0ulSm(u!W6UybkAo<5zwK2Y@Ko{A<{uP(f4N)=|@wDjN&*VclYrb^~ApI%4~Uw z-eXU@;z}^=h`qg9V+-;_*X*B>P?>QaD} zV9d7d+r%FBXY_1h^!VF0`Lm0F;pW@IyqT*G$G9@2f|6l!hcVkG` z4THjhlu!h>Ef`~7*^P1KWK6sG7k|dED|Z}KjrB-MxQ zL$3_PzLv=7DT3b1CTcksT|w}eC9dpjAaI%eI1kSqD#SCovhZw060rDBi@IF!4y|YK z^tyCByY>KH%Nc%++qH=2o1^-}~GWvj9$;=QDF`*vVF?e;*`ah=}ZN z67&NQvuhM6){pv@)ue|xG$s>m>vM?o;$$MDZa3(U2w?f4O%8qjtX5Zgy+6Hp6T9{` z?UT9OM=%Hc&XB;qoCI7H4kQ&g+)lnHDF6-gB@&N;_!=uCYzr1FrI?Nq}EDvq_ z1~69ZAZ7=)ZEHXD@*vm{cBLO$_${}guavmlT>4Swt`nVKqkYngRx*XY3AaEgIn`_tW1YQwD z#}VmuAj9&yX*&+&D+m$VpV8zB)nhc}9+_1a&$t`+!IDsbT z5tuRxftHg5Lv$gY-c2FUoBP3ygCu0y>SP1khk8V+JQ*Y+*#P8>wx)()+q)T~*3}T% z5j8Nz<@ne(*inmDva@}(lSkn*_G}j15j31g!8*!=*SrYd88@dGbi5zDCT)Zxg#^Qi zt8Z#Yj&{Os&7++VL~ahYG9-Tz4Bu{-22)AeIfQDO4IH(cY%d%X9;+GrDGgrDlix3<1x#UHOtonym+Aaa9(x{aA!gsAx;2yQbeUqB$yY=wc9vg&bE=ER+YwntwmhJagC?PA#_QoPuljPD(yad@Dtm3|GPF96A7ZW~JUc zm6W0L_@0m?rJa@tPn=3igewSzXg4A3h3>xPI&!76L%JMYeKi^00b46)tvL((9I4-< zZ?8|n*UDM9s7VFnBRll;=D=~n4x<%QlrWjz$~dqdH5rat>(f@#==3#s+8P5Ie5RPX z{1z>KgnNtn6GB9lH52u9+aD(jdxsM>MlQ4ZjHqMH%OAD=Vx`~uXk@&ZI?_xwLx-}b z4`b?fMat8~9rs^?osm$}@*7s`HF`JR7i;uy>{+idxKY1;y2fz#*P3%vn=`4`aAbRI{ZSrAUgYt zj<3wniBG+eye~SUS5+fx;Yzf}eRao7<&FA`mOr9TRh_n6NQJ}XuoYN`yc}?wOyh>4 zHAL`}XUa;t^ITauUr>p6JFZ&%UZ}3H=v7l?PZbKs)Bg@Nbp{o6K1wjN+4`RA@6|;} zJI$z+>HKi{Si{mpAu0O(+@=*V(Jx5iziST#>KPdL+Jbgy4-&hOi2og!c_@M;7E2)v9yJOXDB z_y~d92>gNoI}*TZ1fl_qR%!G;LtAf6r07GEKd;ee>$#3BQlQPvG}wm=@%p-W!@rNW z{L$~(t-Ex{@^lW4h@-NkMn}row1XPFqs^qgw47}YyQ0lN{pm}q`L4|`xu0#&aVrdxEeDS$s5BI~o?@=E zUu7FKeYk}hsLP+)Q@`2p08LIiCNALH%V{&IVV zDlAl^l|OtLs)ni*NLh4HW8kQ7wf1JduC8eyUWRLMQ%$CrOd0?&h}9zoQmYrN7&lMN z!yP;pMkPwE)zo=X>&+npHZ(Jv_@?bIQ}0F^jWRFxGtn^sb3ph4a-^~6x#(M&LM7Pv zj@P$*IZ2TAGpa`jQbh6CcFj{cXCqYUA*$9`Snpr3b4<-vnJV_scTZRMb0|rpk#9qp z!phlJ5PS_<{4vF3jb1#2!9S#MMNWj%>vx1>v{;B39@TWpOE&@)A!9303EIwPLBi03 zaOsf|G~JZ?ofM854ND)#S)edZ^W!5z11?4q-Z) z1NBkSp{QRV47&B^+OYJSE9wE&TwUkhTv4aX_rpxS{m*3af>a%r;gItp6iEF*YP4sn zG&r&kSes64(%h$z!8v#CuoPm}KweadA1SVg1?NM|$UP~7-^1yn&!r<@NJl!QBMPaN zH3}TjMg0I#UDA6d&jS z7r}HgPs*x}6PpmdpZ0=!H;4Xm3Z==8l7#6&<%W zw*vuOEE6;&is|pzbX6fiK~M;V1Hu9q{LOKs-dus`9D1O)#mW#I4_i56f-sZ| z?o?agsArB8%N|5H2p&eFdj(_wW19dno9SwqPU58~?qcXD6IJVCU1&l-b6WSUM|Ga7 zA+l#B46hA+uE(G+rkb<3mpm*5w*mP(sg3S9ON6`i7W#Usqn0=q=@=U`+5tj2Q=|}G3 z;#ahN`kN=L6NLM}QH+ ztwT0bPf3l`)HGnCfwcHFxD#P(a2cUUwvSxB;}J$#gCzXO$KbSbM!Apto_kAfSi+f5 zUCv|ihtB9ckS*bw%L_1+K(0gAT+C3GJt)g=o$^0K1NDzO7?ggyE_f=z6@+-d)F>au z3B7n-=6pbis*&$93rQQw^ph2Rs&ri|P`#$AfGV3aljsA42Y)C(%yBZIoQ+={YBhc+ zO$ZpE!Mjmy<57#_5r=p}J`4i|F(t)EhS%1`xBsqRF>sfici(90GRP0U>{iM0|4q7!fXqm zh?X#J)8f$(PK#HdjA*I=U=0GE2m~Uq9)T?gyo$gZ2<%7T2m)ycoI)TUfp-wNh`FtY?5D2b^_%xw_tOz2 zX8KWI*Ofoa^k(5yKd#Z6XEjAtpeG2sj->5wGy>&GJ2d(k8iGb9N^QI_Y}jDkf#JD) zyxAPwM{I%#e9rr^y5%9dnv*3(go+=7;fSach(4KaYC|(KAsi^TF{69|(YkpJ2RYK% zbePvH1VxGNfuWj8$-R-l&M>`!mz7ZlOmI;B+qEPMn}x{y^v%cd$dGA*bY$!wzx^2d zb?2`)ex*;wPqs~({)-3ERVOF+)hE}gyx?agL)-iMeKHlF$Lnk2CpT&z_mNaJ(r!|X zv_{$oaEK>W)i-H>#6^$B-!~XBTzXGg-=Yo|@`OA`o+HJPLZXmxB;0V#cS%`=S%o!) zHN)Ybhkv#Y0rBsyyl^!socB-v!@MjtX}IS94E*20D*LWRI!p%umiv^2e8c2F+|S48 z;%c*}6R3e0SvCI~_=T>Z{|$zJ&ih@KG)t;%P|sJ^&p6L3>z&P<`BB5QYH~zvgj2*b z5zsAa5_C2%JS!=j7tV7eDI1*K$;+bn&K6&^dmyK~li6^CS{Imo)I)=-i9)=>R5q!e zWfOHx^Ye^T^Lfo@DuNnWWjZ+RQCTQkbk%WpBCBgvWG7|geSLL-%F@eH*>d0DFHx52 z#sVnIoli#5-_^*~6jW(S6ORHGuL-f9j7Q>0h0?!9@T4Ru1x&b+uh9`~D%0@DFkOG`QOB zKjLC_ikb+Dx~@(AS3QkX1E}e&LN(JPnCdPzn6mW9fAT6DsP1I?aD9}TPbX9Pp~|{x z3Bc)WVE-f}296Zmb19JmQI^|U4mYYTA%Z+yn;j=pKWnSW?!zEDY7%`IiICdtIp4D> zvuoqjRDMKUHsHvXAqZ}MTm;DU?{$D72ZRERLpU|GYPwFOKPowsKqtG;CPDIyTJd`V z)R^b6{3U^|y}Be*h4O^zT;Qo}3J>rU)~fV?gZ0#LwLx)UQ)LioKvfH&kt!U8A4L8A z;RikUsB86xv(@~+0eXDuaFIIbZvZvuZ<6a!{8Jw8+~Mj&Y6>q_g|iJ+m#Z*auh4jY z6FjoNLbVfEeVwvp53mxS%14S_xLp~(T^YMwSs1S@k5@MCQMP2qL2QJw z@R&08m@?^@GW?jb@LgrikfoPWN>}9$=_%V(jmq#w<&FkreuGRY9fHszNU&KMo~RVA zQ}Wh93WEA=G>U*JQ*Bn4sDkOb5Iz+;2)r-v6VsJ7Ve7c-l!ZfK>k`A13UygoNnT#A zia>xoWzf#t`na<&{PC$U3RcUCRC+;>TU~Tr27#ynK%2Q<@fzHdooIkC*Ks$Zv2J_< zZbtl!1}r4+N!dlUwIEK=rGRC4#*J7@?|0w-KQVIf+2pG=(I^rPztsK7s_4npGb zXG0}}uE-|5q`EPpo*NLtE9bBH|6Jam{lAy5Y@i#^gFTqR%EosSr#$=e z>XnVExyrTRSI^RuQT1-lC(DAACCilMmN3zcoq27577fL!{%Z(h%RcqKLvQXosLa}- zl<(6y4=P*sZFAq3w?}m%PL>?kq--35*9XwcWk*#O1W>_Z4?2t`B`T<;Qu>y%<}GDl zB8(d9&~lY+s8R|_eBF#YQMq<#E@bxOLv3a5%9i$5f@I0cl6}gyPz{c`8|h!NiX6t?CbknR1bn&610fK|dfXNTc7d`_Cz+Y7T0d z{O6cI`)5?ljQ!_$b&)FQpUj`r>jnMk`CVoIC8aKArra4@gZpy#bCXe6G=PB#BtcmW zECW(eSfk8Av$yHj8f6ONY{ZjFnVRP*Tpzn%xPHn`N^w@ocy7viccn}yQq~76WwE=J z^?QEz{cT)Qin7sJ*{F7}cP^pl4%e%rf}@nR5yJ4Sh;U`&aDx)2z{L(4-Nh)>f&2lA6_Yr2-Y% ztPY-W=t6kPX5a%Vs0$vC0!ox3!+6i;e+Io1Pu;7S8O1Yi^ zJj&ZqaVL~1WHV(k+00DY1&(nr%{-w}x>MN}rCg}quFTpFQ$RDNbdjyH%~mP(Qntb5 z5qhkxKq*y)g4P(qROL$PySk7T)I+rhOg9*s+orNr`eVx5Is$-yGx(*Tl@O+qk2SdA zeb5Hz4IWMvE7Ypc6j22;q6n%M6p{OoyDE6dS+xgdrbp{}yq1}NnKO?kg8-?)qQ48Jq7;8hE8{uB%L7l%lc}N{)s8Y%Fhxy~socZW;Sdu14{xUt|5YYHAI`7+ zy9eq*2NOJH!>hqx0{BBz)pMp65Y-NmRkcAwPO9gPo*o3~=~4Am5kvex88R6H$YlPM zHSK=-%0c*7#X%YW$spzS^tFTVuPPb}`m=#~9+j*r%7*&L`tsLa=UK z8Zh-5(hb=f-2R07`aMmm?4Bkd60m4b^P-+q6%(@1JRl3C%5#g{ z_naSs{_u#P940_v_j2r@?h4^pJ+AJtQhs1uG@zd#I7}NO=l8Iq=lM z^Q?c!RBo!ui5#M-AkC1Q3Q`S;RFH0Hx2mof<$z~MA5x)5m7~Ei4(Ueo$1oni+!ow0 zq}0HIu%9v#CchEM$w#xZa{>P0IR-C3aS&KkR08l1Pk{z^;t+HREN=3`ld_a;A1hPT zwb{wpwYBvsGTBTG_Oo6X_tZt%@b;@`K&8?FKI_FaxX%wgR#Jv|(m|4Rs75*nJR#?S zg4g|YF%9KI5E3pO3WpU?IoOV9C6osbWSdF(TpE<#StXPX38gboJ|vW@Vx>c|QdO*c zCI&Ize@cVWJ8N*%!!y$$QzsqWE<#6VsVLhh;mX1SWqEr?f*FXdvd~sp0A6)NQjIbRW+a7Z@Kf*O#VU8HER}7RQSQo` z#p+r_MwkKpZMJog4W>rZ*=itLqa{p?%pfCw5e)CTx@mBdH;?q@+dd`}!%Y#2o>@+U=S z7&dUI4aJmX?|tW}B1?Z$(a1a&Rm&`1Zq>LWa<6&ctklf)=G{5gFC8g?Qs+f4$Y(j8 zTE_1=B^=*kjL*vmToC(R$}CUoGEWg}#g%-1D~D-;e>LaKHx`6emq>E@DW;9Fo15Zf zV&SP(j#+2er0xyDSMoNnnTy1(zgoQah1(k&f;-FB)Av`|-CMhF=Q`%fp z4?X<8tVI;%yTn*hA-ilSZJ@lrDZE4|Z2GK-=e+7f(irKmX_Gte?HI)Y zZx&~>xwdL++Qp!hCJUY{*En2Z8kmtmqO_VvIGnFtlu;4l8@S$i0ec6DS`=r0& zg(07M?JapTy4j_I$$6?dzn2@b`N)py z7XpI5qMY+$y_8>WHv2?QIk9JHYW>57N{tbt=JS;VNBcbqR zw=`yuZ%Nn=+lh<~tjOSH)b!J-)YF_!;nyMbSIa7GGC!Pmdf|ILU*Y@LAIl?h($icv zv|D}T63k(3m+`YhqEe~L4y2}^wcAbmsWi>GWaawHH1fNOisehTxGapQIGy1#bk@RO z=<$|C3w1p$eVys(w(MKM^04%f1$oq$-Ys5jJg{L$@D*)m_@(FvugAE=C%t1|YA1W) zzMFA$Q=94bR>!g^A7i7cS6hut*8V{LX=ITx`P|ksiO1edfRQ#xvgDN%Pj~n5$9pd& zxMjb0rsE8w#A9OxC3|aWb6-ke6hBHvY-TVv_y;UCGQ6`O=EXYw$rFLw0;7cR zGmiG|pB?sKQ0>{3c~&j4^2-^HlxpgH#$}^ieGmG;l@8AvvXcuI@v0y4S!3jsC5}|z zPBDJ=rs(D?+0o4^;f;(7K65;03yLZw(UqTs1mJr%o{1S{RbJwyY;B+mTNO=w(g*M= zF}VKo6TGt8fr^r|9}RUKos?9SOVVnp9=>5>^zCYHk#KPn@xW{$W06-;&}V`VPZxaI zKG9h9xYx7b!-(|UWuKTdBEIIdDoY%) zz9hAi|K8*W)PT*xtI1Ty6z9#xOt<%{(}!$J2-qZXEFk*I$ek3+4>mi6Y{^gU*X$Y! z`?Xm6*+z55O`7AIVS`pyH~UW{Qhk$8n$toxRuSO=c~9nl>RFcR!l_O+PWFw;|8^pk zwu(cD^9cN|f^Cue>7l)&#oUwSJxr$U#>nmk_WrXoG-+>0+_achuziu%V7AkXyGT!s zFAt>5oiBaD$Xl^& ztn1sOTWY^Ka{asH(A)3Kvl$y~s}p?Eiyt}iaqzo0FHxV|>1G^sdEF!8YJJA1ET+rm zr@jZi=|Ao{H#o-e_=SG4IDLmpnK*`3GWzoPj-Kn2ITzx!--~vKX?!m{-1uYbq!$BPq!B-j4?ZTg{KPtXfVmzYN{+jx;*^#$2-)hGretkVmtG(nm{G#tRamWV? z73e%gWt zO{L8e?O=G;2Yu8ImIcemX!{Se601!V_e^fAFr@!(rj_MvLO^KhSA;%Ra!4P`dxuQ6 zYV^aEg`!I?Dtqg5hAyhCu6c!L17oN!hF*IqI%D~}saGy$#@ab+cAj5Sx^}Sg*g3}I z=)|L%yx|`l3`4Y1$Av->YK{#cTGez7)l*^lEZuP#*NIJ!7}(wb>} z-*ivA)mm-lg;<(Yo2c^Q6l#xsx!u_Sd-C{T*U*!N$J$;ed%Z8Xwxi^v{|hA$i zQlcAOUWoHf9!ia3t3_5H1!BpkJ|2Zjcl=~nR8{9&Rqv+nIJ)xYj&%#PCz}>jKbHO4 zuFY6+A^wTl%fwOZwe`pX@pZ?I)jdDFacfccS^1`DdG|@TPl7#M#8IgsgF9DLxpZzC z+sck&2B)Q(->Dc#FOFK}qH1wGFq~^dcsx=jPFRb5d)C)*#~qEciFM~k0oJzjA5}PA zxZtqJB)`J`0x9<3Q2{@wZKr-_)B^7+|JEH%;aTNJBei1}b_Z*X!`lQcjP~2a5XEB` z!8N`(`0cuciNSc2GbaLiqCYIXyP<{VihnTJbH(tkSNQSdQ+DAw8@{WmT2pm6MYNZD zKQpfS`jedV6p(o5#N5c+!lM$@%CtYpOVs zlDoY)*m?wiuF{{rB4x21Z6ozYkZ-01(J4F1WyjVJMH<7tlVajLhm7Oi{yF)jHXQt* zcS@d66nXl5iucBB(W`mPBX;vL!_(jNOkPs`apsQ8H>@&xPllC64|$%*INf@O8JWxY z+-{}$?!w*;rD>}w3*BmCPG8LsCI|eqkxGcP2v}zA!m&GZV$vpMuUY9n0S zVUohl_BAh`M~*HM9WxQ+R#!H?eVHraeo2NlS~*7PbmYzQI>IioI8zskgofmycL@ zxZRD?H+I@j4kEKT#-V2%ny9Ruv-F>~XOg`+n;naLe2d%)JjwG?E4_CXURU~_$S5oz zrFbOvr<~+fhBg;v`{tRHR+BpITUbtu-Ol!QRs_v4YW?1+WU;$x5u;4uSkZbpO2FWi zRZv>WSIrw(U6mz~xQ*F0OKa*PZd}(2__lKtY$xM;6=9sxpq`eH%?=^8IKkWdG`$l!G-v`YmkUjlHr)&&;&BOCk z1jgbWySvHuhtuOfNv*03REr&>^UI7@Y4a*Kh&Kjhny>)@R|iHI=ww8I$UmU z%J>S;KF250PK3XM4`y;wJ;S#$PM@$9X9bkz@smBm`9#BTQI6?p31c5M>lpsSyc0jt z7R6ZlxH)DV_j?lhsEqnq*1h%yBPz?dsF=1WSv=SGc(S2rS?clQ$9+zp^A{!?k_Mv5 zQKu5D?5v-r5GppXKRh$YCpeCDbVUi$EIRY38zg4YbVj=yt9U)0X;HkDv1~&c?HhPa z zN(@3$PWDJv8b{we6tm2VlIml)N)(t&G`F~2NG-thX~ z+QLe(OgNF@E1F~OKx)KqEm$jDC3xTc=ld&7#3r$$c6sg=L3?94?!GZ&muA^;1Oaw_ z%8Tnr7h?+EUnoB8ap%3R+!#0Q3$;T2ooelbP;fbzz(1^T|LxI8)zbGW6OV@s6t66f zZXeAmj>^N^horjLQ?jx|??&G^o?UhH%i%Ly7e%dgxOeVyhX=ujA9CE^obo}vjo4{( zBlSn$C=TawhUU~{Nz2_gva-r)s->LC*r*$qSJ_=Kw-@-o_Kj%@n`&3)7{g^!^|&1_%JWHa-=$JS=ghlc~6}a zsPpevba-!g@6@t<|KR;Z=j$tW=X~9LsL$@~M=qR{EO+CQoI88Z3|AE&xR)0_d2r-N z@x=;WsWz5pxLAA9xp$5(Z4Th;4y;x)_3vX!AFTdBW3wX$~EFi@Df^!=rZ;+Jj)eA~62 z;J6_@^~-cR<9&rsxR0>n29verl32`47p;Hj7hvF5c&P@3f8O()2T*rxd1@T(aFtmzONP>Ld)w3;eK;RyDvs zeMWUM*YNmYc1Ey&Z+78ejt@_k3aWe ztly+fsqN#tB4$cfL)A%6iH`%{red^V$JGOqVFi-6?WCEre48q78pm|{?x3B2ZAH1W zFHF6Udep{&*qglZ(DbC$NAFFZ`@}6bb=c0x^yvw$_PypCxhblOOM%SWB6I1K_m*KXER{mu~Mvt1cgDW(>`S`3sO z;$4j?OtU&X)-cQTm)4spvWXPInXbZ=x6ao@rv7l$k455J4ri0-!d|nZH$;Oa-*LM9 zFB^IX3xyR23ue#ql~F2fUXf(1XfGf~t@unpCtoJ-zHVJ9@>nT;$HZv&L7t#?>-y}l zr%Szyx5G*P_QH!{r3#TKXv51(LbDTCDQ=nh-!5i7?iyO@u}SfYb1{7t!M`_vO%e)& zBDda1tC|&C+W)}?hSLV?W$wZRV_5Ov)7oZ@ltf>3{WWK!8`-G7e<1(ltI-DztQQE* zEg>(W(%#=rD2YfDEsrkRNi>>!ZKtS;6#8`j+AjDK*TuYBx7KQZty(bu^?hOI7zbjz za$o&u$y`DCT(aG{*Dbx;lHxz{&~|rLa6Wx0FIcQPajJZz`t*&+5ATV@Zf99b2j6zd zC+sk!ZS6fg@WDKqnn~|RQ`#At1nfg;oINL?3rhHCv!pT$(p)cU&r9Q61M6z zC1BpklICQpE9P`U6qJS!&PcJ$DcfQgl$>m?Dz;M4O{@wYnhb2EY!Fuw(o-K_4UTE3 zDhrXwGZF%A(yNM#8Fy$dAzx*b@j2pCi$r;4A?^5vQ>(O{6;=LK6_T+xS43U%^BP+J z(&>vO9&ZtQGJ;pFn{!?KfDrXrrFi4X6`57<+QwWqt7<>lS`Z?-M)tXz zQ>8RdFgG?b%8YL=OffQaOW7@0#=NOdV%W27mvZdR$w(PLOkUW%bYr&F>XxoJZq;=~ z=_?6w&And!du&DI6=UsoDc2|SD|2@DhB%2wJVxI8^(+3F+f^3p+hR6Gg=$|k7LVj# zdT~LSSo_d!D5Nr_;l*uY&wjy&1=@!$78@JAOO`!VI=N3QX!$;x#t#2DlWq0GRqE!h z)xjKUG38TQiMN@>#5a7ugft)j5OYb8xAz0)%f)OC^})*He4n-heOY{K=YT3s*~Yih zlo?fTzZib8suy2wd+@f?Nwcc$Hg}6c)orsLapI~3mLH{T)mm+d%*t;iDKbcW{cKKU z!zeE`dg~(3y3#LtkL(jKG>!jcn>bMXTTg%3NJ7JkLr-=FyqIa{Hlf&@JZ_#UF7dSs zpoBEc9VtA?r1Jf9mQnAi6YQ3ISIdmU9+p_YxRP??S7X+7zsx&JH)}5|UblTH9zDsX zW1hM5drs^;&{gQa&@CY59>=6FrS6<@*74$ZCoXq*pUIfD!D$Ou`<8Lzq|^28<352m z-xkqRBJBsmDylwRQuzLG0@MGJQ$<;bqW`JeqmdC_Ge$cXG-x2CTgs+FQ0SH z8H%Y)HD-FA%sqADo>R!yUincA=O`QbNE>0vak*jD(y+qg;!TbsaiM#Y4JSQ3-B)zU zxVmCLb7)qK=yv9=6g%dTrPch@A7gxe6ieR94RUt+KPys*GH!d@RGka7oHGgT22>))icjRgkZiSomcJE&eumLA&4B zE^jaMUD#7k(w7_8b4pr2l$Hki<;@-m>}tIxScYG8uq^R<>zDndPVA6?1$M;&45t?t zENa`kE~kL7m$QHCq~~_=%AI2Sm=ilpVxBDWT3suN{JCFYY?rZv%*)C!Oq_V}B@?hwf)!~4HlaI)6ulG^=n*z9bA>4hCmaR(*l8HR4>){umD7s4eW^W2Q1 z$OL?dXyX$j?+}ZMH;NeiT&u0rW)IfJVd!e94~EmFs*(jp#}r?FuQ2}gt8Z1pa)(;OsO|c{EG*Jr*<{h= z=Vjt&`EqN~3ppeE*O>`y&9oA$YjI*v@@T)fa$?LpM!f3VWB66q^42#H4l;wy*A7`4 z6{fH*r@yw5o+tjH&o^}bHHWGy8#l+IRB!+Fxn~VOXEF^H+aj)OHd>syi)RNDqOIM_Ic6o=xvb3LZ))N^GUMRws2GcrnI$~Fd@k8*;%g4;4uOyB;wrK>Wdlvc?hIlWFe zrZ69gGQe{M?w!j*A1^UF#P-Vz)gIFx-li}r`F<(+oRK{_z}P+fqW>)4RLwH|d7pV^ z`%1ht5Aa4M<|mfA>@#VfYw<}9)$;3OEy7+gpN0{n=@hg|FQPwQAut8-}vWK4mgykph%{Hf`C~# zC7NX-AfOU5s98DS5Za_=W!};&3L>I8prKh;!~rq0y4v8aOmj$^)U@f|ax91Hre!xZ z_58TswSLd~{_*_zth3hM`;2Svz0NuB_kO+J1JrjvbKnkkjFnGPqzwvL#b0MevNW(p zW_$n4eEC79zg0RnF$tUQ@221erE|~@Ab7kCN9TprP-M~jGEF!kCS!_O{~aLi;Rqh2 zje4be^{x-UWzy`9J6xY_AVXr21^+lTs+rV>-^yC|o%4uS&3({M#0mjc>kK(HDhe2G z_+>4uLK9hNX(xoYLSL~D{yU-`Xh;jYX+E0v`Iq?lp0hyex$R$$L?~A1t481Yvu6HQ z4{fFMUaqViP5T)8oB68wx$>dEe_V8dTCb07F)QljDIZErNgs!}{;y06g4AlY44&;* zjN(HX2G94vc~w?60S>N3egjARC)nC~;ZGpFjDs3RilO`P&m1nOivU&#zJ{yWh7-Pn zo03}{m4{hsZAXn@yDN11-6GFH8L!n2ndN7GRn_5XjPp`fAzW)TaA5#pW~LRA*`Cem zMMjw+1XXQfHTx1)9O|N)DaoTfUBOOxnNCWV{YqPsw$5D9FKmtLXy$T*0btJJET&=Y ziz?fpwCY$B*Qy>fN@-X@DXsk4c63l)MCP&P(!E_y3AO_VV`*)>G88fD+j$Amk&4qs zgV!=^dMqt38$qsJI@q9_lkve_mUwq|XT)OO>$bB7b4QnA1jo9zSWoA4*!g7)f3Vzg zynd~g`Lw4|!~{BL{=lN;>}+2*-bz#089SO_iYEN=dV|k*#J*9c$2}_N-J)~BR zhkCsF9M$466m`whVyBKLtSRj&jn)Uat6zCNZK-CrspbyA9S1T`Iu@#rbT$xQH$_68 z$kkoXcSa%TrC%t8WY}5C^hgb^7Dvy#Ql4*1wVxzM0>5wMhX1C|-TB`%_Wcx_rmVb_ zEg-Q?X{D?LK^Vr4nN$<30>FwxBQ560cBT;FrihUiYmM)bAr&JO!WQwjGo`M?p*&(Tbc&;D#39QjXOHNO`}A6jKA7|fl^@uCo)XtR*U@c>iBWO zh*LMtqBw84+Yc`_IEMcgrQqRQ&LHFbO%J38M_%iT2*5i-eW~L+k7G+GS&fs{6(GA$7H*pGidrs|Pf3nK%`q4mDA%;kuBD9yhjyK@L;mz*U>h zn`;RKEZB`w8(ZwbYGP@HaE(5xMh|OZR*WtW(2oQ^r(iG`6?v{~-%SdhlzMM__ZnFfl24P z#=U8soVf?PWQ8L_OHN{!0WkxPrHxe1SL0kvF8(CBzD@b#Yw|UFZlJ~Z5Yz5jN`3cl z>$q0GTcyqPi#5N`0rT(S;ae)LS|+x^Flxk$N(?t@LntmUr5J*e7XF?7(>b)V@N^x& z42^psvob?-rAU?ikcV6)^dCU5n-(A}OJWRGG=lT63nDgF_!OX?#ht}Zu z3#6;0)Xt^eMWZPI?P9Hw5aWw+&nS%7Zqs$YiuFW9h9;5AzA_Rt3qon!{iR&Z}}cmFr_j?KlD4R6GZ6U-KM zaQF&CPv2Rk90UyoD`Fi1kRnv?ln z^+q{#NexVf25{$-hEYr`sBYp-LdUfSliOFTaaQb_M)2i=ocBa|#n`eL*E6cv7=MNl z4%=#OGb$VXsO8tK)7vzN^FP#dFaJvG(uctewif^Zmh0cO{s2}iU75i^oqp22X0GmP z`OpT=nJLm$4P`;U8(#lh)EBz3EC0-k$^mGntCAd%_i#*kl5pIvWLq-au3Dc>PDv6& zWG^Jmspfg{!o{b}`rD7}v`U`S3$E)q6EG|*@0-QAKfn1YzGnA?drJh6vDjo)zmj|U zkFr~6|ci_8cHL{hW-mMp|VabDJA5#??brNaw`~){Ro1Yz0 zjKq3Bw^m<&)r<(?ioHRm+e0HL4kAUkGNf~#j3ZJ)#X02TaCPMyhcIQjbJL!5ZG3D~ zjRRU*BCe2HhJJk0YtdR{ianD4!X5?P`<_K?>q?G9yjyU#)UvRc$kAW0g^zAJ+Lt zZOWiPOj@gO3X6Tb`(J&b#>Qy~Sm@!y$qKUzl>LD@+UwA9<&OIO&6rI&u)1<#;M0m4 zT6|%VFHW!AD944kzZQO{bs4;OfG%&dTtOBaAEXs;JPfHCS|i|EtqnK$BYf;m@?*0r zALpY2K!j7>!ggLn4ms&3-YSrRdn}(6vu|$0En{-XS`~4_EI;iT&5k;epw$>A> zIJ;4qX9y7n=@d>?nU&z8y9V<83vJBjx8RQ-9Yi~dIla~Ktf0oJakb})nn+9v@a9_T zZFV(;GI;&&#{1}zeU~>UIpXc?J^ZKj*)ZyLE)#M2!z){*{!5r67*VvpqsD}xC#c9k z2W770v>mgG$$b18IhadAVz0sM(_KPi@HS6gk7Y+Lz zA?)_4`vQI*#i9wG^~YjnOlAx%kc#k0AjjC0v#@l%!*#|4Ur)KCpvx(~E~f^fClufx z;F>vPI(bnVrDcTe-@aTT&@V9LsgDe$8vDD2MktuBy}S-$7no{GZ#Kk}h;mld=kt!( zGH5ihj0Hy1`=#4qRCNE4ex07{Oeyi=@27=fa_@~(amUDOI2Lbp3p+8`z>$;!7b9a- zZOV6(>Nn&ASsUuc+Z7b1o#^vAEqPONVD*{;U!|c`lydBsZJS6fgMTm2q)pA#h19-W zVHH1qKNZxt+Ulf|^WZ*rdL?QEB#+5hFG{b9kf;k)?p(^T`u$X*hG4G@wgzqDkN>FvLa(<9#1nXjFQHlEaaQH(5} z`MRvSAUfzA>fDVUgV^$sO6?_<$sb?0W>ZDcLVV?yoZk?#XeXqJQf*}SFf5-+d#;V( zH|x0Fx>dI29-hA=9{mDo0V}2sXp*G|sVj^0y&>YBY~b(oRy_Gtc5)aflD1bRNBOmm zgDylw(u7;ARqatX*rXm^P-ZRBy;PoZM#O3-hNk<393m@N3J2(fcF`~I;t=G{lsu9 zYmzaqF~jrpudRKp)9xCyGxA((VJmYmhl$(gZjFdIw|IS!sHn>e?uZVbE?S;8>g9NF z3W|oA_A9%|;nU%x86uy8MSYj%(_jP>4e8j6+4V!2n)M7k=sS00z3Y#v$OXU{sp44b zN9r0U?rBzL0{pf!L)`;maVzbxAX3jo1?ygo+hphtg zn=R?qOJH#9>{N>z^M<>1_|2!g;d9maP&^Th)V5iELUg_xGN3hbJQVce)0=d9jD&4> z85d;@$KR^f=Ng?3cndP0dFx*gnGn+Q%>$?GFXxlGH=pLCLs_wZmxWUF7z6UE&XIeq zA2!D|a4B&YelD9t%Ui$9xc|1MakyXq@cky2fOVw{i1GOOx+@lD8_nMwFyB*t27jul zY9{UZr47LYrqGZr{7I22eh~^RTQ5xI7aXbk_@jJFo*NKsr59JxBFJc(xcA%K%OHFx zh4W!Hs1gcM{WhK*zLd@l3Dv!VFW#nxhH{V_4=;014!#3Et9mW%SN1PyvxOS5@F?P! z-vHpbuc{61jpT3k0_sa#(xjoFJT06g_^)%cu=I`2g<}q>#o?m#saso7AuX(fKY+^k zg-jbb4lm_n`e}Z*Y+z-Gv~*ZCzNrfzLA$Yz&yNvT&M=b4B^r~hW)Bm2+~^*3#ev>* zepQNL=6TVmti-1+DN09AKU*0J51V|ouY?$cJ@|O4J6u&2*t-u2ey%I!+-T6_XT5S; z8dPg92xqwlTB`F#bzuwjQ_<&^)LM1YgDR|Bm~;35f*VsE{-N%5ZESwIp699LX?MY3 z^2s}N@Z7QTC;IY5a32XrJpS@~^tNbVQLpa`{V_cQsH$D#f&+lj+Zn*D<30QDOiU^{ zo}9MT_o%RE!?Iz6mF|Q5b0e!6;5(!Qck3Me)~wY-HB&yTgtS!ih12{l<2b|5<5>j; zqoRjhG<^GY>ly#Zkt}C)ww3=zV9`2b(}MF)RHf*i|9Wd+_t?W!!=0n{S))LQ&CfHw zb0&j^iq8b6eL<-|uuhdDNok z`!4QX@**m2{(Xui_MRHh<~$L{R6EwIo7$)$x1soBLk!g?c%2{H{5L;y1Bi#mpAeLcb{NV z9S&>7UT;yftDwne;+k23l!)7(5#8ZvT1EexpWohP840IjuF*4L2XKywV9jC?zo|=N zyrU*~mmJ?}>tJzTx_8YoCh%VLqfrOcwPMLuZO!t}{zC~#_)RvIHWRm-s|7{~o7YkP z9KGiFc4GzU1{cc6YSbSvJqILVi-co;GxMM*E}8($C>S1&M93&Bc+6!i=uR79qyfS% z7-=riBm6cUHG6yN5i3cpnmAy&&-uWH6%OG5ypglsqLb99D@tq}XcLtux#dxg4Q@Gs zoLdax-sa4yY&!QW?$%xX!EkM4L!wQ&3v!Psn-VCEv#H=tw5f~gTu%0)ODH$Uyh?P| zfFYLiHhtrA?s7K8BuZal;*eiQ=Hy+->(MOUo^Q<`(7aWLV%lZxlnMu?+@ zig~}6sI1$Bj5opcG0K`ZY5X_8TuJ_+PJS3vF21Zsje{S`+~1-K9}ykYf0qHQ`dh`T zxVu-uO{pW2WD2kx^+>>!vHXn>B%ot4+E>lR^^(v3|O$w z>edDp(g1s7OYn)^E8gLQ<;{Ud`{GaH`s%y)z63OuWp^`YLe&!!$7IoCzXXl!_oxTl zix)QKX>>t%#iOV)e=sA(JDjZqRv9^fa=NxhO|0GRoi%B)_nF453;@d2{|rxV04r~n z1LHf753jM__;=F%yB7nEzyIe{D~NNE>?xDlU)j*+2{~74)_9gPizMvyhu|){7bfg~ zV302ne|gHsd+*gvAEm2Oe$TT1-Z$&B&b-ZT-S4?J_k87uYw~RP<*~lcZ8skTFw5Q| zTrWGM1ryEuDmIq z`Biy)>sXXqT}3lb3i2fc2dx^=J5hfjDEU{bMztD|=VpK5fJiBxWS1H;>Fm>7M!;mIMvm#c_K zJ2dCqA@GjBH)dkGafCL3sg8N3A=bFxI1fL;D=@ZV>`VF&=`M*mINcUrRAdMNXSwg4 zeV9kGn4cu>Z+9PwpP13CAk^CJ9)W^>9|j?iIQy;4kZhOl?5h3Ib> z{&~S$YjpU?;vG}3l`rT4@EM@TSnU)3Ga@q~B5V6s5PAyX1zfF#{=WKM=cv~DpQ|?x zYk|G*y<2QE1Sfq-d}O><%Xqfp)UBaaHM=`}*^6uAi2_zD&1XDutCH}_!N1k`6ztx- z7y1rkztvx1oEYIv-F`2uXHZi$n(#_UCOhvK6#3iFFO>tP=NFES+`Hry5j)tqkR^f$ zQ>DRe`NZ`OdQ=u7)ySLGAApe|XsujcB{E`_Xa_}rvi$b!b@8hVUf(;q${-UQ}_+Buw&3Uz<7aAD8LD+v;Z5c?0U ziYIJfRdR540RN^wS^x=0MTn!I{>5XQ8+{L1a76HeDU^*f6X{e012e)RC~K-ZMwwkh zn2JlugYscdIOo%U(t-i*3?eG~?1IVG8E#6sSsrAkKyp5KNxiC!>&jEty|3pGo2}p* z0`&(^gC`uUj)AXD5s2Mur(fJ*#4ETa<$tl^kFH|wT}&*@7_sMj6d zrS@3^w=SaCn=PbPhI*pX8^dteANhYmx5P%?fMQ6 zf4{@Rx!|hL86&~GLb=GQzPz0EY>K!DYrPGwcIDbU!-o$vfB~S)(Vq0}7ZG@P3;?ytD}cA4D8`WhBIS5NVa882S!YU=Wfncxl5)$|5p*KH9c zlEV%3>#C2wdKFE-t>5aqp7@9qR&UDX`fi3C=A8VM)KGBNG5iq+Jdaul2X+7K(h-+o zbIOvDgPE9{-@T<=>6hvXYN74Bk_L!socbLEs}5jog@s^7f1`zJb4I^jj8_T*Q;PwD zI`|{ky>UhD9`89VNId=ERB&v#;a64MSc7oBybVyp>nbSJ=^W_}uB%Ee@srBRRJITdgu^$14f)0E z4E-3PM~Mn89y9_4ZS0FUF3Q4Sn!z{YfFnd&p9>45D$RPGH#VxQc9eH|s5%3{%7UCw zxUAhhM#DFAB%Zy>8M{AwrczE1PnNW9Dy==BdQg#{X}|b*WsQnSGXhHctJaxrs+>); z7+zIxp_>uXwC7rZW%H`WOyE=Zy0kT|N~RYu>3LTpS-zjx2)ViJ1=OaEjQ|The|F$K ztw$cZzj>UYJN9hx#m}og`NK;|Y4c6^z2Qs8y#nB@m%mm0O8UdJj>~Y3pJap`6Spblm1=)kvo3SasXhaE>+AMh9Hdu1zr> z@om*V*>o0v>JDl*4fuQh>nj{wmy3O#4p4&^METQW4#|+$`huy1(}r@}ICwLIre`B2 zq9O8Vo2>X!P$x*v;^Ab~!RaVCq{}tC7~LZf&d?Y)aCGUo2v1eQOkgtAh&PI`>6(NA z$}Aot*lCH`dN5PnN@f7Ym`V;&TZFvO9+07sWaoewl*rMay)6Ubug+F(+!9h_rXymQ z4e*^^dB)knI(3eIHO{GpX2I&{Qane9QtTxX#nM2UKd-vvRT(b`=`D=WVC?&8Yyrxj zV>^HhX^W>5)A5v$UYAg8?-e`)i|3W(+~S42uX9lK2!&Bs_QZ4A;#9Noz(2)7c{@fo zT`GH2FPFHLAL|Gm9(LKpJ__gz7tfNtmZV^sC{oo6J>zb#gJGd!Cy`r_Y z>=y#VHryQ?`KmWcX)vVQCe6%gedj_Xidf(WYX%LFFLzyb!s4kEV}oyWOhsXda2gBY zKU-^H&a6@hgn`}K9gYTo&3;365v34wb?bnt(;x42EbOXtvsvzSSI3vS78M=GlTKbm zZ|=C9oFBkl$NiUz(~yNv-5MGy@?4?X2=`y)LEFxTMLtO9zpkT*qXbH-Y9O0sOk;2| zt0p7ka;IcjNCH7f0#` z->0~9VAz9A{i)uB@XzUW`uR#7RSZMl2DwE+L`_qPgcPMlV4Tmcfx6Y9HCTxxg2pS^ z_FdW z(7ZaYESD3T@KQDz(qDsDYv=hsim#|4KnW|*O7oH`rc{}(E2z|1+bI|=O>L)GuIz>r z+9)*=MSYm(HpLGXxwOW+L%EF=@~`oA=WwZD!KDiiQflqXLluEsaJkE|!RY$M%7t2e zQWp$Z%=rAd+*JwFfJg#h!FQYEMW$;9clj9GOd?M$%r7V-pk=E@3Sea6)?$5!x)pe~ zYQ1n~`3}GFd!Xx9pe@KcYjjca9k%Ci`2G9iKU2G09NQOm5_aXJTKBwM3oKF@){33R zgTVLCyMU~<3&$^p`vD7Q$W2!LFT;UlgK1adMUYoL#|^M}{m21W-rwJJ{25@u_l;)* z9WhCpPgb<{KhR3DW%uh{Uq0>#C4ZQEA(Ni{59xa0My~s2uMG7()Y1D5x`{jEG+&%n zn#%#-)49tF!iOt(9MyoEchv9S>Nb8$s)OwyZfhL$ibw^$=vQk~Vz*@sc`v3`v*GZ@ z&~tgEcE5IDaL2bUILzUq)}{?@)i6_=u6uIGz(r8&Vm|;}v<4QRP{Y3-DcV7NTzcDN zRp8(CGHt)*K5YC+-`@Yk-a#==u+Gn$zd$meOTf=TjGNTvKt-7F^!keU$F@(%*?hC; zBhipHml!jf{iW0k(IZQN@pYiMiA)sARb1Biki$cAqHsK(xgs6JZ_C4?Ly0F{lArK4 zsY~+XsZ!HIb-vg~tCZo9P0zk(Uy2NX6iXEO)rR0owkw`j7)J!%3Mwp4F9<9w)c9ra zDm7${9^ttF28r<9dz+wP2*g? zY`n5Av^73x$a7}fC6ihYUS?>9v7LT%8`oeoYJdl_5(LeL-?0D zWr^0>TqmoWinu*RYro=Fi^Ht7s~lyPSzpy%J3$IX=@&wB{Iy!4^27P8DQkk2{dkj3lAE7z_pk-`|<4j*`H@IsasQBQr%N`q)wduzin$$byL@+nx73^A zKW(C>^iSia?bXyVX@}BI|Ig8X@A0|0-Y>%FbmLq-n1BcSHrEoL>u=nYkj(Et+R!%S56aO!JtVQtqG}&svk6s{DzvvigavUM9r#+x~u6KIk?uKA%4n26` zs&9UQhGPD|3NpaGJH(l_)^Dojyyq>(<7AUjaiI6P<0r_zgw4+A2Q{U2Y&SnEgybT51fJo}tcHjFj)}`rQw> z+UHg7ym${-{9(Jiar(={tI=w&Nu2en*|4N=`1jNOY2ypK01YN* z4_KZD=B$Uc>8fYlDMG+lcqSR#IB+fGPV%XxjQ7J1iv>R{ENK_*?;-YU8FsZOxqZK*DIc$Q^^?6*^StNyU^z8s_veG_z;o_&t zi&rPt&|@s|NuYRXWXNiI4&OIll?^bPTP;lYiD+-oVxtSBh zrTp@%-t`w{mS;4t$Huf3cF)-;-6;mvqKa5t6qhyBjGDW78p*Zwj%p8w*jc z;^&ymkSwjNwrT$_G$AU8jNTCUvn0TtoE(Bn*9P$~y@C?rBKW;5lTBe(#5|ChOJ4*0 z9jcTt{>#*p8yXY$7wBT-esT1y1NRJ9yvLo>#ECAgEUo$wNF~PU`+HTyy33fdXl!E6 zp1k68B*h;fZr^ef9u_!s^qhV*Rh7p7I#V1^IMA_4ed&T#j)9dR(=e2tJp75R6KQ1x z6t>F`2mw=5)PbzkqaqyZ#B0gIt0(R4-RV2tBeFyp8(%|!qLov%>G^MOwLWOA!9L8- z2Q=mkY1P*r7pJvxd{QY}IsOUMfPRT-@@yBj+w&kk*`0b7VVU^A-`L=jVb7>)2Kci1 zBwE%0I2c$ijA@u^T%W>@l;`dozFLg8^LKK#2>^n!)Mk0B z2HqN5?cddEZKhe*9G%I7{-c8Ru-=uZrC)8sbVAi?R<#8+X)NBQNTBh>i^`&hOh#F? zHNE3*;To_-*Nrb7WLWS%Ruo;A+1xuPELW>*;r{}|Mk@~7)4^4(-8(8)%hi{CSIcD@ zXr}xGA^c_e!Ecuf>>L8_7uY#>+!xlKjT`BH{vU3uB|Dou#KsZKh>DpNY6xLKS6tz@ zh*pN#An~=cQ*R}&?WxKPZ~T6$ika>|*j+!tKmVK(J%kT(73UsA%f_;)l2X+~I?Tq^ zGkTf~tGVQ!Ur`W>&O6}^nQeIWXX=&89$0n7g-;--^Gg`VJBB->8tOXwyunq^wYwpt z%kce1mN0ZuLEuAa=^Z*~62em?`>aoF|Jmn#==GDBy1e8#i@!3jL6Vq(V-@$3i@Qch z_Y&PX#r*dbWgeE04IbtZ%7))>e7m3T4fQyB_srBk@pP{I2W}+X07R7Q_f_FYvf(A(mBjPW5K46cyoK^pgj_rq1Q z{c&AFpXz=SV!0%8SDi>jCU=<_)9?-Q8ond56MLah@uK(X#CEu5RUTB7))XN>bREBi z8)htsyz*wYD^8T(akFlR<>A7L+*3xxnjb3>5(y>K$QQkyROA!=t44q^xZG4__7bg* zp_|Q+pwhVvIPz6{k*{#PviK1@Zw4=gjj$|ZLPiy-2zUM_VMIFN%bV{bsCg4Ua8eAupyf zx-0D~O~Rim==;4v5G=a}c)yR!{O$R@to4*X^*uMt1vif?SYZNmSUTtJnALZEVNFEp zeDw;n@UVWdchIFn$gq)L^8J+hX=X5pRYa`tF~9dj9WfyyMMDesaJ_v;QUgQTP{&(a zv!`rfm@I!t+ccBjX67K3wHr*u5k(=P(VgTv5u`MtkX7KvJi&@V)$?ExZ2ROkyyVIS zeS`q5L|s2iOxJsp?@b7-hzY@fWoG5Zd8D!-d3IbxlqlqBE`RQ_=`$rQ*>;yyZ*1zW zKB)Ux-@A-tyF($CJ_a7^taKoKowTv?{(KU_m>pz4ftESJfGSfH!I%<&Sn zMA3{5O-JGbwq_rj56W^1c)1*;MkkdLb7!+#)Lg*UrtGMPE zL^#D2yD-9SCb%-cJK!@YvW{M!6dxkNLFD>u8An& z4W?OP=e!@KFY%_f8dLwUJu=(RVYhMDfHqCpa{n^986F7Q zVQw25FM?p|n79W%OmBGj6XtN(0qtKorGXX67OvGn;&hiN&=lD*+4&wqAFB`g zm`d^XS5}YlWRC{NlbcvuxwM9WU@16Ck5Uc8ak&CV`3u@%pJKPF0gJvb`v4-1uYyntD-Fnjb_TeBZBaX|f$>7&8di+0mquIgE;2=|D|LrH(>P`rOEzbo zhlS5S5Lr|adhU>RXY%FUUL$3b2m3}Trw6WjOI07E6FoxhRCOb;+_}@3tKORi zXj*p;(hEL^0}JFkiEg>ou1woI#}f7!pPCJwd$OS$L%J1C=S)#Kgc_fF_P}i zzbPNDya(ML=FvKSUla3%+7u<3OowW{KQAyddm4Jv&SR#=6Et_A>VsKg#Y4N}f|Ch{ zPTo1uYSnV6JWeFplJMr{v#iO@+mCnegTRyjB^vMDW)!Qd39q6`XAV;W{+dn}8q7zz zjaO@xeOE;Vq1>yv`gg>g%F?i^l)EJqYIuBs^j$^MZAv>tGBtjdd7DNn(uCmppF$biJ7p8hE~J|7;DWug;Hrop-~k?d#Fz8*t>QO2=BFSC1TmV6Ki!9v36pChD$;$H5hoC z8nO&b)dxGc+)c7hr}n&Vt;ny=ez?sYI|4f-9ff%8%XebFiv9^(*O?`6{~%g0{5-mimH=gz2^eB|Jpv)(IaA}L(=$7)2LUL!CC8~;shrt!&| zKjoBk&wi=Ad^7pz1$98JTSD~dCn9&N&Nw#>Ei5G1Hp4tKq2oatPNU0 zk0ZpZu~sTEBrpKEb%siYiiOcVns0m~lY%eG4N6yVX|nd*P}d`l)%u_(e$=6-9^%}w zEh9=H!c#}>ry8ZQIN8_PqMR&Xi|%}#o9vbtQ_azYX(&ASB6#vI0+X$`jo5M-r^eE} zkuKDnKUdxIFt-jYn3x0!91BfQNQw$)$P{jr#vM~Pv@WR*N43oCT}5!daFIEcwVkIY z7N@sP7um(=0wtF%Xg%Y=*WghN`uk9E!qIvagt7DJ!;sT{ZVaCaEKapbN}KMkLN`!f zTFMf7I}+SGjW=4Cs4qIuK>Lb@ru*&Je9Jl~5Ej_^0$B@DyB?D?%=EVhyJjBO`l!uz zdaXVa98X)W1{P8++&fn{#6d^e&K^tTbWN;`W}W%O5A5>eITn0F%MMC?^hW4p=6B z9XWM-c(eobV}i>2B!M8{#tqhRZ+Wk2EphJTNucRbpoN zOx_@z?u}51#`{V>KEFuyhTM9FVsv1JynW_BgjdFK9fVsJMpIz6%@X>;hh!CA6YTPD zmJFw_H77gIZ+mQ0%_?2*Z)44fzbxA-wRch$Q!73DpKD>>SK_A5I)FM2h6wz~VrCtm zolzy!M*U?2cPi53eQcb-)OlAu-Pg=%N8crL*ibe~B9jFx?$v%j%!@Bp`hE}hJ>wDi z^z`jy@0f^7_9jcy7UNE^NT~LfWR1SLlYGf48hA~6kN39X`GM;`Y?|E(O<_x}pPa>D z>5(QEFR@Bhq1Ln^Ud?7McF&MW9R}s-;9st~=3?Esr`qx=o_2lzMyWBp&h94Xs=C!m(RUU~+a1@s^1~Cfw7~yVuSPM?z#E34|=89xO4`2wvq$o?U)#Ccd1}Evjp`CYH#41%b zN+mz6yhu|!h${z63JNinH-fS&&E)%gs3KNKzgkDEXxHi#=6;Oa+ggK+$yR2Ez)G@x z9rCbDF~6NBp9&Jk;iyIqLZ*{e&MC_i!C#UpLc%egT8%60v|F9pBX~aSAni*O-(U z+~BbGA&TmJa1?&5$;Zc&BzbVaP;Z^#was#m^1Zw3>?fk{9DA}BzomoJT3G(a<<8#k z&3m4J^QAsoP_F**S7dx!bsz0X0x4j}x?NY5?hg`^w@HhNEN|3+11;Q$wU(kt&(62| zHj!@LWj7ETx$Iw_!_%BwnOBQILsT)tcfOM_>|JVdE@%FTKq(K6pGrNktAqAr*Ttrbk9jqY)vS8hwH}ILEz;2t z4oU2A zTEPg#r652}HntPr=%6k=L={Sik58A5JhgzeiNEZz@rVlHgX^N8RQU@tm2%Fc4+xZo^y)Z?Yp{;#tRgD!bxCD(4G7PBP61uyo1tkDF?yV;0RdfAJi5<9 z*i(4ikH|J!*SaWSv7%qRuf_qNrJ)h5C~fp_zX5k|erH8S7TV}Ls@3T&Fo^BGv6_H) zSWq-}j~Nml_?;U(#ShGulp&20k$>~d47ZA-QFM*JMz zmKzdTrss;0fxS7TsBuct^?QTf#&_7LG><=@7L+6ogTq@!F`WmqZ@qI zHMX@Ydc`q<{M95yknAi7DaF?ptk96awT0LdT`4Q}_>8y7hrhMVJ9oIuZ&@wX2r)2;g-? zKw1^kkf%xN>Hw8dex0I!S9lySk`NSq`aoiOawA{ zEkbFDYbCjb+v=~6_x8!c2&9i#|p!)dj1H4=@BbM!~cT9esYLP<_U(rws9eKeP6LylbNjr6`6 z@BbVwyy5oetVB9hs(nBb;2^CW(vojo=yX*S7DP}5-kLy*7>O!Nr~?%g$2UJuL2%0I zaC+P{Aa4VYcM0DLsNLV&1dlf!!_`f>Z2hj858TCUmw0s@)XpN@9cNbSs{L`DugmEXZWEWud0)s} zYJIoJd19oOe7?n?j9K`)kfn-2Xo-2u{JK6(Iz1kt=m9$C_x?r75dyHM5Y9 z$W|279>>uIpuk|6^o>NI#d770Rp!&kArlNE7&{k*Pe(#t=OweZp%E51kUR##FG1-1 zf5e^nThi(O??1=T5G^-QG)r*@Gr=X7nhXR)MN{CdX63G-lev^-jU!)4T+v*x(9~2G z0X3`97RwAxP1{`CX2xApo2D$AQB&TB&-vl}1?RfXFI+eKb-myBeP8!$c|M+0ZEs$J zT|OS(7f%scHiYQvxrcenETiloQ&m!+Ayl;(BLaYimiHDyYfLC9-F{oiwNQH-ti&I2 zn2);r93E97y1y5h$$xyiL`EZOVtj%Sq4mV~$eY+Un5Oo}93|zeo6T4z9^Z3SZ`l$pZjZ!-$>E^!kM5A;$Rjji%vc=P%SMSGYA*IKBB* zkgwFcbDSB2c=*HxhMA7CjiV$)udF^X#JqUp(1DCp9}Idx<*`)TY6Ew+AfYs{D6kDy zWvzLBsnC0nFY!+qvKjI@Jov+SbvLa$0yH z(9{4QL^Yr?dN9f4HNf3?~Vd$ayI)QtqRaSri`mwE}oR|-vq34s$qx6dy@Nt4h zR7l7IHJM5;!}$ep+(ypX1q2cH`THbbj8uyU^XceSv1@bR)v=zpa;;}4gLr*qmfVr9m(!ndr~%YypBRH{kFQ+0Q zy-Z@RgRHCIO9o(d<9fQ&5ac|{o($Yz*K=gYeY9~w4Rw-LKU;5u94HRDmk4#DMN_YC z)A(YpYUEv}F8V8mEwW;oR}$m*jnU2rva4^gFJQ{!pk`nB0}n&5>ZsJ&}3(%)fxRp)l3@E&pP1_=GF-q-P%FE zi==G2zK_Th0G2En^8Nh{Tyz}r6JftU%vGS9p>HR7sU%r_x!;x;fDUVDv_vCQ z#sly^X|mxjb#Zq9z#VY9DAl3>eo~hJnrUsRa3Evc$Colt8cunE%p1qbjME1=vT`MF z)jGoWWHj`yW}b|q4DtM`V3Lujp<>89TL5$98m*3C{h8WjA>DRohy`32SmE_7hr$?Lj2#UP6o(kvHK5(+?qrQ)4w&iEO!JFPW_NL8I7Pp!IhBlsDsSfSk4Hp93R8fl#OBsn(FCfb(_L$CnBcIYttk`=xJcRqHaE5X0SHV3dl- zFFgbvuUG8=sBGPvXl);NzFn$Fu2ME+Dx{M-kVNnE#3!L}ImY+7PL1_8RH+_h;K^FN zI8vN)^>6K)&&d(9%KRegbV>F8?6w%;W?y`Pw94t}bdR%H?~>+~7xYQlN&wmB;h*Uv zeinT?H7HM2Z*+=!vbfpDZx>_aiyMz0SRK^^t0Fn9`f5uax9v6#-ahVw#SYtk(Dm6t z-JuqwRZX?=WFW~E7vzkzg#RezGM21wS=W#E%1Dm8Lx0Y?f5cGE&MPNT(kE75Vl!Ji7_UHt zR)P|(p4&E3n}bk=o&RnputcEE%T7RS@%p%nYgZ@@GIl^cmzRiGMDb$FBH4~z?7D*7 zbIcrypa9x!juTcK7~;|^XW`LQzIm+c*hAV+xKLbFmC+vfH7;fJ$|)Gda&QX&{uYdb{ocYXxPOH0^Zn(4~R zB?)#d8@Ya7wD~;ouXWXv&{S(H0<0PaPfZe>4Lgpwk@A!%*clDcOvUyTU|{9OFxgE7 z)&kJv>NIdH+PHfh2B~f>L_D#f-cgQ#q>@w6)%`RAdd~6*fj|7R(t#b(P;Ez&pLK@U z2mY2QYj!`e?VGi##ycEt2Lz#69rk2EbN`1^!FoQ%dfsovcBSRJot$iaOP&S}UHwiD z9Bta0kxabR#-Z}Y6OD$uxaO)F)8djsN%**Veo5K#TAqPfj2W_t%CEF`2ng@iaD3*q zD0N63cjm|<$|jr(FAWG{+OvGRe2=P|m{EDT^=yUkwZd$z?+B+-XwCQ;X3U7(SuTn{ zOVmCh%)EJsK1?$aus|fK!(dr!BieVI$iZsc zFayNLrl?N3b<%zM1(XWp1GB6Ef=|>q8ZH|_$Jm5JZ*V2uU-0c)h=VX1+}1cc-{I#} zgnX$ep`l8S_lHSd<{#rtd52k1$E(t~K~Nbg z3x|&?qXl?VXN|a`EOg4*eM&n)ey4m-4Xcw6^$0nO9b6{l6<5vw1 zId9X`(SQ*I4*bx9o1vtfC$@)sj3(?_?@3~bxaTGHAq)9C3gVhd9zX3BrisXDF{W}| znU98KQS2+YISh@2K<}ZrxXYdx&jwC5LvP$T(W=BHZJQi(>gLF?W7xx^L~(TlHxg^% z>D>`aB(~21)yBz$QvFiMxtm0bK<_ab07*|lJ9_0}?hg|0g!wn_G-OHr^q~c+45qn( zP&=~DyF6|uhD|8po`%aKDS`t5J~JntUmxn6RBfHb3=KWVd0J!>T3%m~b@ogdE#hGg z5FJ`+9xYz+e}DNvGWuJuIPcQ&RJ>9Pom&2Dl z5vSQXFCqjUaHvBdKv$xRH%_9Im1BL{7EL2|2(J*-_|O8<<6r z!BCbz40i(B1pdpNAaFpcnXcP!0KUGSz{W(B{NgW>C>=N9BXzvQ;OkV3+4fP}2pT58 z-++znb)oOt^tggqq-V;cnQS{Swy2V8Gm>TG64Ad8!;Rvj(eE^x`Q4QEu(A^*Qe;Tr zuZzw`ck)A;X7saAguh|nQebz;AR8iP7X{obYN5l{-uGH1G}iRRPh43q;FSo`H6`U2 zFa~wt#?~%H=>>xuPr`ExstsD_#}O=+*N!dYW6P;BX;B5ZnUbd1$@kekX^hrTWUCiB zk_XXBE$f_6mNZpvzyej+j>bp}Q5VS3y^*A%L#aQ^8A2O;v8JoakGLH&Fm^a*%7H{E zZZyI^MnZfodcr?w{kx#~ymwOEv|_@)dHBj#DcePNy^L2d{r#!A_oWqz4bgse4;tOt zr>7)rTnKEyRVNwq&f`pp_iMx5k-FxbxyvtuwyPhnD0<|bQ0lKX9W`AJ{9(>~hq|nYmsVEQ|#nsz4O_rB)M9D5~Nl$y)Nz^?bE@e5mwO& z>`dJWt+E*1kuJ!+>)q20TV7gunL8c-R{O4ctWSRglhOO9^>K6eb?=%&undp<mi!{;$$PWYb99>ntEwv%TyX5jOjS@un~+Ykl6|5OmQ zEJ$l|3)}xs4Xh$C$9C${*Aqiv_gvpUmS0);5GK3IHo{kul%FeKEzi)Afo}?@D@vne9@%+`Sa(iJB65&V4JqwQEd^$`mBfs|Jhltr&VdR+~_=?!RtnU|PyAyXN zM{Z~K{HvbT%9(VgFx6~TeraEhLt#_a9Dn9PQbfqqA53kTn>lpm`EA63D{3Nl%)ZM8 zNu-$Yl*_V-4 z0mItyg$uM>xsF{|$xfaW?C}%GVK{dW?gb=rj}34?e6*+T24gP#J9!f9M6Jq~f?Gqo zIt5()U?z zDfoo+_=i8XFC5n#7U~vuX3pHX@WSAlyIax+J>O3|eLX(t`z>gI8*zomuvTzuBX)rW zg2Ra0kxRDVSfWaFI2h8eC7qc_e{-04$c=XWjq9HEv_GP=!oZC)=W8xbK&R@+tS|ny zN>wqv_&eh=o%4CsA_?Uj0YHuJ?cU#(XKzj@Ru3tVY*c<-E=WOX_k>sbj$uf<#0lfO zRwFeOX|YF^Z5!igtFjG2UwiyyQ>< zZ(a$POf>|z2GC9LSy*u0s!Uq~?`tnw@?+T3b9wD}zmHpf7B*F8W7Eg{EJcMamORdk z%{w%<-KeW!aUw*%q3S0Y;nt#f7Ox!z28B6C-S*%FNNIW2Y#F5EyHD_JC?wJ^0bF)X z47+mBdxV|7NF<_XNIf64jMdSX5+X5wpF1dvX4Tx?SU|U5TrV(S_3cj{i`I$1TfI_T z^@v|rYWQq>W$UJo!Bdo>*=Dp}AnwSQL0g3w6Cpmoq$E|uhJ#;moCO_3)f-S`dEsGv z;=ffJ>gw$HACZP4xuF%SU*lr@(&d$&o{P~SPs!1W%xnS`U47?{tQRToDQNVlYvbg3 z@U_l^36q5tomT-~#l%h^_*+G$%&oS#@Q3>+=-^ zXQxGee_1TZN}ioRUXTfQR<84=)5zUPEWAGsJewP~9)0=1KWI5ZR zOC-&Y9}n4|wT>gEEm}K-qo2xw0Nj%$o_=z2-$nJ`_QsZ8^S+avOhH5IKA0VVa84dP zem?Sg$oUR{v4Wtz&p!pwML!f2t`1X1FU2o=eN&GP`ExT7|49ISk?>n+hACJj3S!8k zO9`4eDKdskR-C_cYl<54Wz5WFLl!6k4q&nxDuNxPKtg%ebWlA&t&+^+Ib65kvSqQq zv%aNFNGYYtXkI;6ISLwuS&)|2Ha3X>qB3u$3{MxDME5fqjy0o4*ZE;o<$0+!#pe&43R`UJ9YjgOeAitrjUOP z7a)ZJCpGP3-ysRST;qqt+}N24#P0o*H)mw;)ANqA+YyIrEwJZHWHMb1pUU`-9q&N^ zP+SEV*{8mAlD`2Pe5S_-w zEtN!+NC>*<>}%=3wt%`-O)B9DK5eP2?3Pxf9>*afd zUYrI_GxhP)0hmv4soidE3ub_6>yySy4n(_g-Tr)hIT16wKxbU|`{2b?%?qZ)-&kV^ zkbZLF7noHMkjYkcAt_ny5#iMLmiVk+uW;u>A}8MX8(>@hEowzp$% zc61@L3i&7b+CJCtbwkqYq8oLIAqz6I%kHOZZaFCRel3NLw^JT^Zp%z=*L>@G;ng;L z?lsFez4gblb1blWUx#h@2R*Ppas9~z2jx-SR`#dyksRqO2Fb)Y?iSr;^s&exfWCbT zJ&SP;ph;@6l(U?OV+u-O`aoTNsCQgN3UALo4#lUl7V`5~IP&ga!fVH_SoL=!?@php z#Ge#qHj=SF=MfSLIzRTqbqW$J^O>}dq^z|}vZWd}f?!90w&M{;5SLVhhvk8q&Z%Pb&hccy)YDsl zO0Nj-+4P(Xj~{?01@0pq76dg{n3dh%Uy5ln=ySTIb3VZ(p`dHysds$yS3lMXN>EHe z>{RQe+_U($!=4A;(6zG1(x-U;>n)1m7)rYHL5W<$sXzny8F7iLw$)i`ID;z z8_~8`PuZUGUHyRV_d^C3&Z={plaE6Wp#yKYAGEK&8RoU#KxhuC@4FdUX@22>I2nUE z=@1+Ik3RpVm2<|^zIKef{)rc9|9Px+#*RQGuJZnGt<vq^9vi#5$$^ewYpfLdY(Ks2Ge2?B&c0r@xR7I1Co$zhAP;G} z);EF-i}=+DWq{>B$YX7G3y77FV+yx&8>V@FLO~h5#xbDYUsVKoxt4cEieZsWffG8faFjo;PO`seM^|om~btQlsk!Wnp3(jApaQ=ImCl)>G<9Kub zKtr?&RrEpa_+Fp#wYm>_DnzLHFV8jfm%L9Ai+23rDfr1kN6WFu)i7P%=kMek!zc7x zzxAb?SC5?3B)*Sp_Z62?&caAFx3bkIkzU$L*FJzTb@tfeb${1SgagrCzdiE*=fEGI z%R9se>=E}(Mu!^U40PUM<{p#^P$BBMhL=_YtaKun;Y~c6i zQpcpIsk#7P;k!&+p+x^ZHZ?h<9U}ð%LW6w^_VA=_@P9t5lBU>3LISy!Zd8W)@pnN$CdQ zzX=XpeoQwviC$pG>Tkcw=JOcB zF-#e+X8Bp*8I_jZ)b}RsY+5KmeTUVm)~ePJ@$sGLBlT!8M!!x0{WzGUj43@p&sB6n zOkH)GL;PX!t#`;VNnhXyJDb2T>dSw=>2N82wq=EK^Y|T1y~t90P|KEK^OVp=eUHwF zSpC}0E6^z`B2-ymmeeVhgKf0E@sSBFWNmtieAm-Zr%2A><|>D3UHz(NqHg6IV_khd zicbX4PC3b=+Bw?R@KD2Q>3$r#;G|8x5!M+a8!kw~_YFCySGDXps0UCp?h&u~M8_3& z$?$mW$>&L)SyQ5;8;-Ongu(1ZnH*FUAuO-|nD(>o+&N)ctOhDj`O)#_m>WfyU3e*_ zof@Qy?50q!HeSHxabsDZAZYlTE$_SHyl9LdRPxor+P%`Wx$1V+=#;ELZ@p2M?W3hg z5w=c#(C`@Frbtlwn`?nprbV<@;JSGF7qY=ZdggDSux}V{0xqZAQJy3FD3+7K;L?@7 z44vI6EB^r={jV^$t6)I*-Qv)VOBXZU7VRPcftV}#i?*jUCuZCs$_$yndnxR#?!zST z>_=@?vBP;Z)NDAO0-|zwwDFaOz zgYUJ1+~XClz8s8Zu-0D7Tv6#ORj50t0v*Lia-9J%oRUN=cnu;p~j0zW~NJfW7lM5nP zL!|_lG)TaOprIT~ha6Z=?E|Knk!!gT%E~n$|5zB>^}VGA)5tA?C)L<6Gvkd!8z~Rg z<=$?Fu1kJ=WwlF$W_Byx52kCMP}L``i#I;1q$9w;vd>Azry*zU44+y^AHcJzP;c$N zB7}}6fvwY_N%cYR$@VlP2lW0l)30mTy8e{AH=0$AzAOSi7-<4ZiZKb@%zpzCg#*pi zRNd6WRXAF|g*w#hhBCZJ5R@jk^FKx3Ka_P4t_QfrVUN)ZRP`q}7h2D4ev}EOPfF?m zFQeht!@t+8Po2!FRZDlM!ld-JSlg+uW(JmXgM(P&Fvt zKA6V>H_XC}g7bdxiN* zunsF+S_S21JHZoC6`7LobOs#DvoXywsw-lxTv|lc1>mPxm4J8HCPRX%g>A1RTZ13F z2QI-;SzMcn1VlZ6z{nUpAOXb;dTr^KAhTm$SI9A=v9xxe$rG<{^&J}()4%c^^13q! zCpG^eGy!yUlCCcJdiiL}Sj_O<`Q+ zEA(D6a|u15KR%Axb?;V#&d~yGhUd0zhA6|qmK}i4NB?vmS^Fo^P0YAPfvq74?!=GbNCzVJ?PsN_dWV74Y;4NU&D`$@zw{<#~ z*3hO)Mjq4A&jlf!+eW}S&mus^)hQbR#};%`TXrz)52ebA0t+5$EhSs+rCtSmvj15~ z(Lj!IfWuv9lgjuu^S=k5+(9E|?=XzcI1}yQR#<-VjPDNQFsHUodFuf>C;W>{=FE~T zrvC}x(x)z~C~5OwON!s!mq{5jQniwJjd{Pn9MF+6H#@=XNm&ilbvP%Hv+KfJ4tZbl z!n$oBSIocF6Bl04PWF!imrt$NtOBss^*gt;UCo1%0*>JR^y>f5`Fkcn@ONMTe}`p~ zg07&E)lu)$4ghWW2W4)&EFl<_HII9}_y{AlTLLb1f>=A4nL_4j4;k24~<=&r+U{VX3!&ckQHq0SfC?6G|7v4OYKv=d_q(a3-V=m7QeRjETl zo0*6_`SlZ6&%zdpWt6&00?gMv%tbcOj>@ZmMMLI2fAOU;F=z@^&uiCgNX|f|VIVe@G3pB&$J6oIO`l`}o@bF`IFJUtfm%#*_QZe!%JaAyo`yX7c#u2aP9F2}QlV|FTSD2GH;lxA(WdSh79o%Qp(vQdatPp0%aE$Y)d3=lCON!3H( zxlP^v@paNrGna~Lcb?qzO0_Je4RaC}Z&h3NNV$niMu?Gt>X(-dwh|)4>Jx~um1A^p z5hD!ZY_Qd}Dy8P{BQ^ z%U&?}Zm$4A&7I1o9`z*U&u<3zF@;H!QafL8HByOu*FI+uA^mt5irUjD(7T*#zPReLBniWlJAKg$oZV=Y*U zQr7Q^Zjkk9+G;=eCDc}-G+Si}G<9_&Su4L5DgWt-6=k5QvJJt)8>hy4U4;@mf?ldQ z#0iulxL&o!k*K2)%b}ICF#OK69yL`OZOpWCLOlp|yGktr|E%P!?zLe;A;UGJ=~6&d zawH|akNx|4q>?!?)6QkiJ!%2`<8x%id28=(Cx|7t)RO|KrSNRmNZ4GjjSU(~by=W3 z+x8^GetypMnTpWk8-k_>(Nq|G!#Oy=*2|=;Ex`2)GpLvQZsicCeXDQYQKGC%<$=Ss zni&zOpJV@zB7P%$sL>Rw6w2!?zxuCcUQMZ;*D)M2Qs~HYT+{w!0epjZ4~1^w5| z|Er+?_rF7fR;7I2;L-m>4gLQsE&l(H-#Pzz%zlVPatT+^**D2@#3xnkMNFkbC%Ijn zL|OKsi#rKfsi@rhKwB@Av)0{taWy9UAYzKwyWt$xx${nGNTnIphwdhVqEbdxd-L$F zJPW?qHx_R5!Vex0!SM-=9EHl931J&J8IHca=&fl~(uiJ>-=gJhjAi;4iO#XL7Ons~ zEl@+Jw?`5a=MyY_WwsjQL2m=t3Df9n$GsLt+E z8%tFAT)!$r=uRL0rF^Pd(&VM}MeqThY;mt^Bbcq;U7~EyRrbMY7t42@iYoP8*)a|C zV;gpJn?O*-fN!yey7o$04(a){D}5vWJ1CbESqmu!#qm9$jzK%QRNo6ZQ-l$Zb;mnr*m_58(KXj28&x?E-<~!H|IZp>(orB4(^a4T7NRc@76vq zYiOywHK_$eBL9c@u)=+;kTLGqR>8YFi&2k4m!`vCkWY{or!NEsX4ZGYI)|7++do5d z`SzfO@^aysZffSN((qW;;`D}E$y|HT5x^7Jg(bdsyTE}*jx;-m%6(n`6bMui z`v|y7T#K8sQy4?D@|U5xw9m&aJ~V`MJF-P*uH>cXW%IOS%x`d}axn0`e0Rwnj8)x{ zowfT=fh2n8EL2FN&z&5y&aS?FK6OuMqP3mOhg_CTu9q4Z-$kyowe);L)zxoDN5rrYI#8p?X_R)jb zyh}~FRz7vn~~Q2 zB%*Zw!=+Q9M+|CJ`_!FI^j}AMJynWF=;_l9Z>wA-xft#R@4C7`GWWy0DvYgP)OsC) z3M<}4=8n6x4T$_E;Mb8;>7l#v>dxsV`Gh}Wdb^Zm{D_MJBW0fqy&f}K`;%eAwMKYk zS+&iReLg2u7}zdYqASWwLBJ&9r3i>pbQlG$%P$<+f~4H@xb^&BFtgfDLqQs{Iu)7T zA4jc0XDh>#MRroobQ>(2a`T;V(+RTN3a%lBOwrSC=|u(&~e2f>A*T#1;X~bBI~-BXDDa0+pIZE^ee2cD6%*9VFXQ*18pk^ z+8KP?AS>pj%&dWd(PYfa%HWMTy)O3(fS|&<+CjcmK^ppcpSQaD&xWoiHKPrK7rMj= zu`9eo{^}kZe(Md9Go8v4SPJKdJT!W#1*V9!+HEvlgiEq=kIykIpT2d3kAi3uEharA z!F?6!!Wd76ft089SvYko$AsSlswRO3zbF#8ng~ntWJR*%heHQZ%S#1_W?2sRAibc( zN8VfXQt2e$yfU8|zkkzQ-K%Kqb@N0q^!G1RoshXQ2B%p4*rV;m6=4T3hi+%c&fLW7 z-G6$?;B;f!(O$l=(csF)`s3W?&VTz=oWVz_a){Q-yTG*w;I|9kRZ)Oz0HbPSSv8c` z`(blGB-;blu*;{0a3O5SFQtv6ABVcQpT|%#zZeLrw(N=zr`Z{XC}G+wQ_QwjuzllU zm8^$in8L=4z6Pp;2CzAwu zr(@4n_+dmGR9qaOY4L{iwA%0jq2BNBeOJG*S@7ZLEWGHEC`e$~fI+|I2bZ+ImNwW0 z5Cp#{1FhqBOPo@r7ubSFTbJgMCCQuSBVJ|k z(bI|QkKm)Hw}ykkZ<^IlgSEctth|~}kBu>v_S`&(iS$?#EocW7@8y7fcJR&iMd225 z-z6RT%B7N4<;gk>E`xsQ0+sbVV)vt6!C>I4z#-yq0KL9p$s2H#j4-o@i^|N23{gps zp;M$Rx9@{o@g5Gy3w_Tl%CRg}bym$oq#RJTZ^|@A1`ho>A%5KN6dTwb< zSM@Udx^9hw>*L_SxI$?WE`0ODD6}+F7`$*DT&{cEWb_6cUQ3VbtYEa$I|G(m6`k(a zWeL!9ZFU9AA7*D&R~A%4DG4n- z{vLL~R?)SHDVP`}grX<7Lwj#hYdYV^JW6*$WyuSSN)(g%R2Ux*%bh8an6jxd4$45q zSeH=Jtgfp$>|L#sa9lm5PV(?rSwU%M7E{#sUUeX+ z;x*b2vmgOs z-dNM>*Sa(YAXiCUIO)%H72iM54A&T z=UT$v-rZm^>CEU`pQ2uM^eL`zdOjk6IiHtOg>vU~hJ3aRh=x=+3vB+T$6_y*H>Cg9 znNpb?GQzd1V*PEFo5$&ZWBLR)q`)Vk6$pQ6>qCcx^vQ~Up`rIhXU$f1eWXd9(!cx+ ze*6xs^`%&8EZ6E1vX6noeLcwFmBP+|9&311A-q8j!|bcZioLUKY&=yr<8_~SYHv97 ztVWBu{vzzd1#O|^k$BS=;W5Gw1;4|NX|H4xHGW(uVniC0ikbUBV_4$nUEz;X!T}(B zH92g_Cq4r)1;*a05wYs{fmD;flN(B8;~nU$9*5{+hCQf|r(C_~F~6_{06);a(;kYF zcS_FWhRg)~pfjuF z4gZHYxm;dPw(?Jpn){GtekQiibIz3Cp4m_rjSiQLV660A>15ZN<*IIJWqY`c!C=_z zvCVE-*T!x5Vk2-M_K?FZ*!y#t1EYyQjQ{<#QH41M=4OOykPSBLAtmx%8FJocvWEpR z*x2?oug~b@iwmt2Vq~bcESQ@dh&!7`>>vLhfcKGp)G0`a2rRdV5lzj7$pX2hZ6@83 z0<;qk^QGT!Y~(Fdo6d1FrJr3HEt*U31@#?+)gZdYx@JF9!?FnM2=+9Uc~9rq>nZ+G z2S#3Qek%aKk0PVF%bkeG(^n9AXRr9m>Z60%S$Soz+0Nbd-Se)!G`1k{xF)YmO@NuRKyzoj301Qc%;!)$H zT1#wgYwNC60$nHJT6m9zISg2{6p>#cy%NdFkmA~E?ohm|oksep0LjEq&enB$Y$DU3 z&(*>ntjD{G)Uf^`!#^dV-D>Uq$=fGLkm>Op^>C4U0^%}9sT-!CVQ0aIIxknW%^Ovm zwVzd=scZ9Em?%9Mx$s^5ZgDS`xW5{QKHqOH$49Z1R(b{MhEG?x8LsC$#sS8+rOc)+ z#@CO$s@CxXuN&g$u}x!3(ed%PkPlG+I8G*%o_0e->EncG7=<^Jc^f%F-d-G}9;H{b zYhRJk^XLkFr30cu(th^>yCKx5p>Vksff-XRPA2clKo-Y$3tMypbl}p?^ zIv?vz$qE{U=I{5L84GK>$9s`iWJn!Fo0TE*qS3~7glqE-WeMma(U;bwwbvB@^JT_h zZSTd#tB`1xbjBSm0wuS`#*KqP;{n)e>K|tgfc-GKvC`VJHzqVi_-Qlsf`L?K(mLy9 zFPs!pSc>WD$@xjqEC?1=Nr_@7P3NxVoimz3RE+0gK#eQm&jBy3q=+ zVuxeX8_L(&+>)+!{dF7=34R0>CL8UHNK!-j4&_i`qFms|k0*vtg9@-6H2%%73tS9d zdZ)cXQuc2Rcf@P0mIoG`S%5wwQkmRqQB@a?s-xM2xb8li0j79_Si;dTqFA~gKWTL; z*;B{BSm!L0c>CBWsgM;AL04@U;-d0HU2@Fu%&9!Cc`+ovxWc_wq^4_4jzD^ZG zXQyD7D1)Z+DwR>Kb57L%6Q3yd<{@td@=n(cl%+IWu6to^uEHs5bc)?$3Oq^!k0`xq zRKc-viLNAfQ8sFGKS*`4K>6f-XkCu2ne3R6`iKfEf)JA!bZtLioLw zGf`ni>Xz8?ZzQYwGQGWtPT@1UF@1hvIWjEozQD+3JnA3!c}wP(gvFIW+tLM< zg|6T?%5xdWX~t!5L@K{5ZE(2=u(ragEVefM{?Bvm$m4)=mGc`d5PvR>TM+RzU(B*I zo)SCT4}^RYRQhsaUVqnM@Tc#gQ)9_4O&IdqKVdk@bTe|?k6{{z6|g7O;$fhx?H?TX z&$F}EcWPR8bI*vi?M|wMdKzCT+I?AZMcJ;g(e**=gfh+AU7Gtnu>TZTGieeM*A7_H z+ks;-w#%bU3wM5%bhx)lWCzoAy0U1DzwwlCB=V5|x~F$uU~%rU$TC`)707|-8Q|^A zc<(uNcvglLz_xB1Q9SBejHH^ymFF+Mz!pUKO*nW{&8GbJIFh1&B1Ds%Ld}X$S#G=z z=OX5m66NAud~Kt6@5)sEf1QWw3I!y$cZG`~eWOME?!KZV#z10Wh`y^#*%9g>b9moS zR7hHuOV?=-QvJlpB&Os|}$j zy_lg(_4_cGQ4=)09& z%WpP61Pj=suD#&czHL)c5xfrGc-FBtBySi{g&`3; zxX18!Ph;x135~3=rYu)XnwnK{sNiKy!udn-My~xTCj$pe`_!Knj5qEjRm6{~bS?FS zk`dtI;cIxfvZg2sDw*yHt~%VxSf}s$lfL2SWu~8z4BSV6O3MgLr#k}H0fxF6VY`M} zT=_!IiMH9O5_Z9zVx$`1h7W3Hza z`gyNurI$stkr(_-Bji*gF;O$x=*G``2l^Uy)x87X7(NWI!RhiZo@p3IW}Y#3MuLrc z+g=$??ql9E==)BF4Zoo^87paaK=^27X1jk-fs(BsbU9~oU%|Np=)sxCLtfUeH5;ASkNZ8T=k}fx2?tXsZ%G5a^@f21n9v$$ zM#kZ|`{TgDlijkqE&mOK=d)J&0Xd`ZpEM9KiwQ%Ko3?1Dw+G6$Vi9?COsCm#d(ww? zyq#YQv!I0Lt_t&^tI~9@BB1aJMu!-GP#q>On2LAo*~3rAvNL_*)AUN7Ky63Ez;A$5tgl^YgeRMGd+r zyggD59hT7QVuXC58IX{bObMPx5sV7ni;|DASP}*Xqm(9B+oWwkf@f|0cpN~BCFuAU zoD?*kLHnfNfCD?#rwA{>=uR0o4+NH`7x%8;+*}FBjvZ) z2h6XRjeRIL0uTxKCip}rFn+}iBa?hRhe@&e4b47M4gabExpcJON}1$+fTUFs`hxMPZT06#hp{!>8F-11bFd2aJrNKQg;1G zHuZl^^-04k`iYmoCk`nr@M^XFLH!-?YdjPmEZ}dz>gQ1WSf)?hJ-eS&4?5%O=<*-q zR_sxZUrWN)1r0yh>g%o`S>GzW9mbqeGHfQ|?Tol4V6(k~-+VHUHwc2kO%dVZkcu0w zwQAw@S(fq48P-MUy|bpw`S92*%d*iMjf)vB>wXo!4SNtm%$*&oAkAcp7M@@Ses#BM zi?Q7rDqvV*>q99t^oe#*ps!|$h#6@GyWa4XL{yqNg7uj-6;+=Yq=rXiwo4(Lyrazg zV{uwr($KY#HhIvU0+}Q?>w>RL8d~hTVWqTy|7q!;_!+B?^s~~U#v+;wA-$uY+60bt z#0n}gGO5oF4ELC#ddw44$iU%|E^wN)wcGa%_yxawjyBC&39m_d(ot8p^6pEE9XO`` zSbT7Y{aR|fTTiHv2`KD9z$c%PhOi zikpIq2QQN^+_?J0S_K+_--|@jCQ%(^a+L(ySBE$0~T}K zmZomr3_Xw_D>`|jAR=d`x@oBZ@zK~`9*;f&O0RtqES~tLR1iAoz0#RxQ5DjH-?xu= z)YG(2;Q8`bR~36TO_l_YkdGBwH%`#st{F@H0PwkbvExql-oj0-oD}mfM;{bu>~;Q`X96X;mMs8CvEG||A~7598_hT+c_U(`;d`C0;3jhzIfnm z6vJt_M;~=MpA)5veZfqV7&fUjl$jPK;0XHA3TCe(oqPpDM>yse%04AXxBTJe6dO@+ z&*HnH&!Ft>MQ2}b!|N<1BV~1v8@JIA^@d=Aqtx2ja$JXa7%v)-3}1C zKowqZN`b~JMN9bK1oVZP01stCLjl(|mmIG8lhU>2eCcuFU+Y4TZOR;mcGso#mQS>j zSG^usP=z-=DNBf8$ZGKI<9uSj4$`{Z`jHHpXV(DsToL$j z`@vm(D?%HZ4o8>h1_$VsIa&U3$>D<1T7>I(zynkUJz;z3>E2nQ$!g3#d*-PiVa;uJsGjgkDhEIFO@m^dl&8c>g z73=GaLNY>tL!I;|7h^|D0h+Gs9=|s`j|N?n)jG$y$j$gK-cH@k@zXmiq6o;&cydq9 zYOm#P!@!c5fOq@bj{&>X&6J?isYQDU?VF)_%bkrKmQi|^2450kHyiO;MR3#Wb&9H8 zArtcNO!tuG=D0_fRV4qOpLIXesCKE^F?aH)vQ#z7(MDv8HX`_G&m|2Z> za5D3pmW`TrnkmnwHkCFyqo(Y4Ki}v1y{G?w?_V$b!)D*CwHKccd+oi}y6^kCE;Chg zb04|6`AMha1y}4$_h`ZQ9(T3IA5O~P1+8<<3oHQq>+3>|}hfg6Kbw?J&`41qmw<05M zvEwd4DaFYWV(@(psWD~!yqlMRf1c*3KiHmzo=Pqc^Z>z+$oE-w24`&$f2j0wV=XJV z0XsC@`9>^=-)>{e(!zBX0n48nOI{6-4Um@1GYcbe^5ndX$|_OBtKqgFA>#vj;=3ZV zAX;w4eBF$3U5}Rg<$SGSr`_bZmST9O0a?U@)LqcjO0;Y;(ejTp+seg zbV&A(zqI`p`&$_?yi<56FlQvI=!QO%s6m#suc{CY1lF3Y)50Hyq+$V^Tz+PHWFDnz zAgyXflmNa_BCT0T%p9VY@C(9_H;HN9Ufn6vM#rC$kX`w6Dok_~w>MUIa>cjtrKWf> zi}8q#?H!Km_$%b!}Fi^HxI(HcAVEO|Sx%v~y)Gq`wmVLHypszn>biU>;TpGJ|2lRgY){ zn8Ay>^IWMJ0L%P(dJN~HE4-+#OZ9Loaiy6Q^4J#QSYc2c@IEa#{);W?Wh1j=z?-ti z4$=GZADfG6EdWM(&8OE#rOCK6q}xx@i6R-x0h6Xvx`4R_g8PtF*&q-wnRLW(y%nrn zNs3HJ9@JJCl|31#oAmr>1ftw6dR{}b%@58ciyARSe+GS!Uv#+kwe{8>$%k4n0M-}E z?jD#pv!YE9+u?!CA}L_YPg!cR_AD|2sRAgS7b~{)%RBM2RG{<>%h}h!A@#!w&KnXut#l2Xz-KYhR%1O3}HY1M1JfWyy5V=IV)F3?(|9g zF=*dqzk5Ez_Z-h4lhls!9Z-H1v=-(( z(iLY#$b3dC2MBa0HS^@6KGzcf#zCjU#FWSo%|*uE#%p_j%;D4OQ$ z&exDe1AZ*zW0)ant+UcuKlsA1Q=u+6;F=3SXIzv==VreTrDaRM`a3sj2`2!DNfU$W z<#>ll-DVQDb#?+$6VgIz%LGMOe3|fUyuil?k_`|(9}($T^QB!A{w)AEL++n2a!UFh zKbm97ou;(Mh-!}@RO%6T5U1QyHR##9Rz~J0glH!{b8q%3|5<7@-27l;4K&ysy8@%6 zIb1wJ@zg}yG7$xXYEkr>0{)-|_WE!^`o?TaTUr|L43X#~LpA~iYKe-}5dI;AUVoOv z9Q+8tUb{U z$EG{r2ZS0tD<*P#)RUIM>#&GL2DrTNj%}cJT%(b~j*!$*M+^qcA!XvPj3yL!gg33L zF3*u)Oc9r1rSloNMFQh$pE|F)+%CMQHh{77{7NmVaR_XeI|SbM%gKsHaO5^n5~cY0 zTNw{pXwefa+|~Hz=gyhTy;qATUD*+*`Dt!j1+({ej~zEj6>7WG*W_jMouAyhHUW>G z&3Wrk^Vzx^Uiv<_Nmp)Xu8il^Y-!Usu7el{%XkRE8H!)7pQG!ioHBGDN@Np-=40Zt z0D(Eb4JoHz6Puf=q@)2^fkPsK*gr?AEyVcg!=`_p%etK9m+SZ!sJ%4>&VlETB?Any;c&u5KtbLP~}w9ve~GOAX|2uv^| zHSboV96eZK5|qkJR~__3({&+%xk74QHa|Orm&?Nq1o5{aPAbA@ci!L!atq%p9-RLxXSR1QB!kQryc=8qmFgV! z=*Zu}CU`dDe6JBnnv$1p3NH+ApMci)Z|eW~m9=#3=$|_)95r0c*yl{=ep50%SZi=4 zo@rDbQ?olR_K$7{cZ1z|`Ny|w`l=iFABSBwKh}(b*qu?}@>)&N{d;yv+4Te}ttzMJ zt?dmn>m&yh=o>cN&QIQ;ana2q80+9_K%ak^X@a-DDD_j?Mrv#~wIHD$JUB&Tx7!tO zIR!BDnZ`7}GK9t$4;U&C4e-(7luByZm}t;dEj3()fOCx#BHNK;-6>$o9sfeu3*Uq+ z#JXV$GqBIB_d#t6Hw|Z#`2o_e8K5%*i;P{;@H|+NP{IqH=!pm^?Jc^_ZoH~@r@Reu za~Do0w6f&sZX%+WNjPD8u>GYkuM^)U)b=IJ`*rB@9vABE9jI(YnUB93yxVo~PIdmp z_M$fB(mhQEhjv@tCk$K1Noo^~6SYtw6jhsKF{raGDkp36FR+Q2QXY+U}w2Hv;9+ zt0R~&?zDWr-c&8DtTC28c09SFVMc{shEjw|PVyMnsC&15Xu%yoUEBuT;*Q z*Qi_gfSM_ESui7;-}we5zz^MUuGmtPx?oA0D6f54@lll$gh{YT0Z#i)yQjgcZMhH1 zcuM@t(G=F3Hi2l)JtZ+rF4w_Vh3iLU^rHi>=YDS z=V7H8eX*Rq7X^T&oR^DaX;Sq}Vg2@eV;%vQ#mP0ngiv%ymZp9{MnD#?v0YK}!c>8S z6pzg8lQRG;ooSlz`-CAp6z}_rd1MQSkf3s+|@uob3j!uCHz8*q#Kz;3vhm z((7s(!G+ciaKLiIz)Qa1QSKYnR`cLZ`x8b4&UY#okil z{cV(V!H2NanA=44H2XgbDhqh0kiV&dw_VmA40bE*!Kq|$mfpUQq@JE=w*iz}YWy=+ zl^FlXdn>OnvHUj_YIA5}ocreEQM2?)vP0vAWh+0L77Ag_x8gC1+Vxb-jJMoAyWI_` zXU0RnSPfbp$<=WcRlP9bc>U;;&%`rPXJ}#$A(p51vQDr|tp%e)vaJq)cdSoJ`JvKj zx%2z>@{2cB=#r{xhl#&y4A9dN-kXu(Rjy%EkeFE_se^R)IDDEgjeH2xLMedcwE`R4LJ#m>13o{3Ov@r2bY}#M4y0tV?x$^i`T>G?Mel8 z%%8o`S7iln_v9rn^(*g*at&DiU^VH`Z!D6w`Mh{&8(bHj9}0Lx=c3#{f7hz$YW4UPl?t&a`2Oc3Ck$D;0HZ`$xx=&#Y|D z*_Du*_AH-Hd!dhml|^u0yu596O8l=!U5wY_4d zU6P(6_t4T;a6Vxa0B6~?8Lh4|WSN;+*9S>dh4v2JS#pQI`+h}fYiF$+D6;p0bR5p|ov8|rKJ_ZM*aU65O*tGc_Oq~Wz9bnVFT+ZjSd`0|$hBl>zeL)rK!w>hWFT5kiv|L%9nxyo$x5A9B&bn@=wsr;I)qL;c z&LiIe{3rrWc0O=4T%Q4q&8dVlktP|DfrBlVb`6SbOaZoeW{@BVpU{n90vxzbb&8|D zqv&wXIg@tRaHEF@GOGe8{RY`{j)hP<^5|ayhXRGwQx=(KPy{>Q7y@UwqdA$i} zHlle=kB{-3f@j%9+BdRYBOwKo8n|QvU~2M@`Y_)Ca4jtt5frh=l$e-S@=QY{MpcO! z1394?bQW8H$$6Dt{CX*)q{uixf9ipjhM?dt*n4XxUU{3S5Uyon(mn2nb0wxRQJ;`S zVfMojey6vFVKN&?M3#@VSlL?Ix6J0J{f{y9^4P{>s>Q+KDrj& z#NxThha^;UDodc@s;P~)_`zRD?ISQGi%!TWR|+P07d3^_y^^#s{D2+;2K_1rktzcE}KI6WXeRdPM#Z=}L_|UOV z@2Qt55A%&Za!gX9w>QGJ4>@wVLz&>02;8)I}a&(>$-$<^2 zpJc=}V9Gz|(-?f}GiA0`xnGTDe>brwm2*xc>YrUZ6G*v3?4_`7Y&Ajv&3uH3vW{S?11mzuGJ~Oe$65t3E#b|@{D|5x-jkNhY+%_ zI(){n=GjxXsXxo5nSQxy$Ve87`>}F8E8Xt*+Wb1UY^YTxG~4b5B+J>=)eZ8Jk@=BX z=OgQ7hjo z?}?24P_r%0Mc(>RbpzYtjwD;`ppSLOE>!}L+t@RH?(+T-g%|}hTInD2Ce9aNr9S5nFZ?@Z*m*Q@>-3#!V24I3GP}C-7*Mogdg$LM#~%xg3I%`KD)_o#k@V7 z14C@f>2a{cyIZ4WRlVuZwGvFaweEV}v^YvI`_3YH5mE&3lZ?K2jqXZnMZ0axfXk^Y zjeY(xJOXJC-m*w^e*X5VAMU(ga%7y~*?8(O|DJRsXq}Nxz zK7xGy?WA)%v(wJfRWx6$4is$s@W5;>2k-iS60lRu7%yd(}&7sT(u9&)%Q4IDGMWuEDDMo!>4&iASAg5C-6{rMM0g zfK;K=Oi5Uim&fOpjQIBa0DepxIsTa3V)hy3SPwt(mk@^b@yq9x5a8n%GeTTpV{%h= z#yAUy;=e$n*~n}MF5i{zg~~4qv&mXZVW-ZvoNX3*^KZy2$`tBmb{pnq*0*=^dbD)M z$M2UrtM}F4>Gk zfcCSF4%YKcz*lVkW0bO58!PZo$~(xDgHE$bUgeh<>PSp9`F8ntHK>#_5?Z6Eo8Si1 z3Y$|&vki;D8auzkbGun+7ABv9CFD9_A|Pgn6!dgfUTM^!6r|7(u*%D;t_%q$FpZYl zD}Z}BQ)L-qmwB6TWaCIip>6o#*I8%QGrDj#dD26U;pjdfgXC&qVRhYM>I}ugraBj& zm!jnFOjqP)F8--uR?vp+iPQ8kv0Q|k>1)Uc)}s@h^j|j*=3q|6ZPVnb>{erGYB`K+ zZ-4H{R3kr)Jf>1iWf6J0sS%ylcl5GC@}shKMft@%?uvvOuhGlVGG9?Rb{3i@dMqSw zi=}Wpe_RLiHOeZlCFS_IES8t`@}pY^+f2Gd#d%pJPfBnJQy7#nov3m>dLhEKLsPgr zc34eg^$K(^)cADv7d<`_ZmZI!Vj>Q7}ULa?3@4g{Dr}2{2 z8rT=oQ!dJDdmBkzgT=n#x{8dPNi*QG zpx{+*dL>}X1H{KXx37tDfNPMXI-{7_1ki*feHlD)aqtXZjNo9rnwz9UmxCP5rgF?` zdYt&02Wzzro>G@;PR8B&jbToWq8+?5YZaw+aW^-$toM19-Yx2x^3pO2*rObC=Vtz; zm=9&d4r-L>Rdww1;=$_gNfkb#C#4isV7D_r{LF?ve5*->VU8GT*AW zs_d=oH-22JxYn2&D^}ASmW}#;s6mvU4A(TsbH7m@{B zczqPrQP@)n`dg;<$Ul4LQ2-pq^aL|lZsldMXPLzzHj)0FOw5O+!7|!C&BLORdcYpr zdzJn*R+-@^X88hSlLJBYdLARb+j8!Jvp(-?pV=6feDDS-FDnkG_Rk$e>`sA}`-g^E z2=LsxWgJW&EB!|TsIJ8S_M)`4eb!~wim8Z7R0r3sp5!k!K^c_^w_=VSIlX>?kXy_5 z@m+(QVyC>mzF2dHjU{hb6dupMSE@FcbAFr6X|cmtZ6&J!b@oIa|H_K_c+es3D(*~HX#ciuae%Lry|9uD!W2e*T5e$8*yy6gfLoGK@p!wW zbx}weUGaNlx5L)c{m+Bs$8Wv5UTru8f2yj=d56`>^UJbMA?3o-u(@mk5pamOXC#>r zp7~k4aB8J)Ox8mf-{l{(AG>6UTU7%Lh5_xU$0f$#N3|hUZ{lxCN=B(aU3e@E_(Ti_ zm%Z$Q*J{E>#riFFNz$54(k^pNlr72M#(3wv;Z zCO`}UoZ72?U*?Cc3 zkPp{}6nJD8yx$=_YM0a}JC|%Sq6Cw{+Z_h0t?xznq?tNK3#+Z}Rk5(_@r33ZtfGfj z?7@V0H+&nLhfa(DYmS8FNp!bdd{6q~GJ#N&#VDV>-M$`?A6)Ak0_sgi046oDS3v!@ zdO2riqAb^Af}^wQ0`W9VGNk7^FL_)=HXZGufV06JZm{gBhxiU9w$W-0*l14feHJ`l zypmLBVs)oC83aJr|XritUO)pbs$>)NlC(^f4Q+uX~7L2T;r zl{*3XYo{O5C{HE_ubfDh2`E!fsYb6tI<5pLYR*}?X>Tc%Ooeuh%%9jyw3~W2b?H=) z7~Ok;``~qKPf)D^njE?Vpf7}wo44;nJA9&vs|RzdvHRZoWrD*HbNF!3o?&$Nz%9WH zvTt~dZ!6L!j|Du1lE?)=SKT|Af&OhIZr2F+oqT`kpFKbJoYp`8xZ-XPYpwQZaz&ZS z-7>J20j|YW1+2&2c6N@n4TtED9wPUFO5RF;0JOT{g*~5yxQCdDYpnowd49fi7>5ZX z(B;eeN0RAv+n9T9N&FjiPe|Ci-YYYFXe9mU;x$xF0J|3hZysl^$pV|?daRJd%Ls&3 zE~j1}9#S;v>c~ZvvPar%0E;c(oSk2>guG`lbH!qY5{zJ-=i}Fz5SiizPs=gU(!&&l zR;88i6i8EjWu6-JM0k5vrT_0rnL!KPf!GoD0j0cIlp-Y~l#?yzeHsJjF^N3fEnAU4 z#w}R9&$FJC+yOmkQ^2(Yd*U#3Tl_eSM39e_)Ou_H!C$;IxyCp_*=vnd>J{|CYq0C2 zl3^{CUzSJ|ji-^KwrwH99K9WGxP96}O>|X>u?{bEbN)R+YVGdQ`=?;+I85p7RjWRW z&83YhJjFu9&UG|vFzZ$W2!u=u2*@+wk&ygxG5#6PD)JXM?P+55bDmYR$~9&4-H}>t z;JPA|-0}mO45e8vLBl#FHFSivYmuOdS7Vpk5{M_LCy6~;w=|!8RKkEu7d5|ytQ{Vh zNmd}9Vsd}9`T89D8wEx>(=lrkof7kuL%47cL+<({kU*-Sr_Wxb>-}1GB-!Nwf|FwHl zf4bA!*ns;s7~z4r($<};wY`{qN&R$Z`(E9Qg9IPVA4Hh+s{YGK{Xmjtwiu%>hK`kg z*k;hB|F2%K|5}p%_GkA0vfl(9wQb!wza4rd{Oc*G;;yvw_uc~rW7+?L;9XD^sC*%N z|5*0UZ~v~+J3XV0ktXraSpCZ+Y25mPO7Es0)YPqPoL!!DJcnTa>tF-sR6iEN|F2;O z%zs$>>$mi=l7=ziSn=4k0}*4T%CP>24htpNh0?K-1Bn0AerE5!Q2Nsa&5zHw{cu3F z|I`5tEcxGeT@pkFu(r8v25xSsOgUfx6(rOu+n7VDKO=;DI}ys({m#w_{mTa$=J)sa z>K^uh?$LN?_rJ3*{D0Nvhef`^Wj+?ZN*F)0)f|Ik1&~TQtPoHLz$_E%%jNnNc+Vtna8eAjo@&_ zyGmZ*x&VOsEzG>8&C35d_SHRDH!9hfCPki<=vRq!t)$tJEnCl{uc5EK`V|jE6T(6- z(0PPEdvot6l z(pp*2`g)G*JD`xMucH-5F^d-~g27o(II|z}Un=sNW&;|Yl+<0j8MHq2yLYvsP!Qf_ z3#DfnvgAgKYR9|rP%6)^rG~j*`wk<)U&imNxA;chP9SEtAzuwm##vd*3gXWTG3 z5yeil{?YnJA~Zv&ooWLtdfAy0eF6Xtg%lENbiG&aJX)qsO!TFNje&dA>$eJ;*nPYi znJFk%5@9DSNgl=dg}9Y&OIE?`hsa`#ql9(Tah7ml+3C~l%0;Uv9x0kfzN>bZ7<8nU zRgGcmoq^rdojO<;8PoA2gy3N?k-zLG2u-Llhru;xM#!ML5;%!VaQop5I4&sZa)z|Z z|9QQ!Llc=`wR5cE&f>uft(t&eg{S16a&&{2S-s8Sfdmb~A$xK0*zAxW$J7Hzer`VW zlBbkBpHt6#(oGF_+W(8eBr_#pRX6Ra%pSi9;EhK}A>);Z{ z0#MfmK}8uj^=Y%b>>mgm)jIwINQ;8weD;Gg!=4^ri*A;HO$Jt-0o~Sc$+GoD)q+y` zP($bIncp`I24Z89@{7S8vDIG(FIAlA;F0b0Y;MN2!fuB<7Zm*FzCU>$^}`*ty^s3h zgU6ry74H378`*~LHUbyugBp*goYa1sKFABpE6QtC%-a8&GiABP16JIU!GD_W|08(< zf?E?op36r5oX+IME8ujn!rO{)2w6e zSh{YTd9#ODemvi`$7Z2nJC5x(GbifNiqs6G_KqIkTvB;urdQ|rSFp6k9{k*6ov*<6 z`Yw(g`*qM8lL*&Ub$0}!r6Iv><1U6* z`Y@pM@}z2b*A+H59pc)|B1K5hsj1nkMA2I{Q+-paflIqX?U5+9PnflVO)0EhdL({b zTggsrl90ZQM`Y=%D-%gujBfL6TUKs%W79^x^jl|pM%8RfX61Qty8>tny1+4p$g zqkeig)$ZQYqCMr~^+3p@KjoG3tJ}&XHQ6l?N*FvNYPhnJ%D>v;m6A&OW2u2&X%;jk(oD)V;(d`t`zmFPnsajo%w26f=ECa;rL4bW#%NL zt#@i~!c=w+chDzGgHvK8&JRCpJzd9=wH3S>MPEIRddSJce1HOCL$j<>su6#@{KXpZ#Ay;cf{HqjM)KRS?SNlyvRppp17Q z{GSqe8ty;!I)$XBCKMKp(Ah6+)g}qxRmH1UfVLpAvRQ zPULe#TxMQI!i1=(JMB%zbmNDYE!3>6$9|79L}7S=?YPLCEwuD#aWscSxtM4CoN#=m zaaxOgRaFfv%VWgR0{#lt-1^+Si%unw+!?Il7X=3VG3wzF55GhCt)fW%cNShMh0$W& zT*qohL&s@^kQp#}S4fpBa?IMW-F*Qpxeu=05u8vIe@_Mn2b1f-wdFE*6ckon9Up~g z8WJEk-kQ`s6Y%MN0;$UVRh5)`O)OjalrZHRyz;R*w+Zso@q_=$_K@~7Zwnnx&|b@1 zJnQLyHov^ECiv>T+4;~=4@dLuj+^K2Jk3ibz7U)}wma@&Y(WX8$FkP2X4`NrOc)!( zAVqFg|3NSKdXEwmJZvSl$oyJ2x>ucMlX1F(epx9St{5d{>7;BK7p?kBPK~shGLWmJ z1YoFD>_wuWoc$^JZ;Tf-Z_Hhju9mL0CvaaPE)2Mi zPt;QLJ~xuH%M%8EKPU++Pb41LyT{yp>$J1z8!|4qVRY=#O3w}-mo~q@D(v+BxM9e zMj*M1$B;>_YO-ls(vFy+%ZvD#3GW6biU|10EY_jSfXPxS z#2G&?e)?c7bM;GK!d;z&+jqtvto{t%-(33YKos~_a@8gEsf!H@Nq@+}g|FL90$e~) zb?&az^q(cm9;Az6&T{dY5_Gjg4Hkm0?RaW7v5CA-`(f@Y$B285c}wgEV>FIc;ki2c ziT=QzybMotTNoyUsWXfk_YFjMpE5=j7w6O>_({1O`GLM4^WQ1r>wG)sJQcAnV#S?K zhyw4)onJtZ)~eqM4zw;%4-c#Cx=fTKw3S|@X?Ap(xQ|y}xX)e=^*)rVyY!L!weibE zz?MW4=fiX=edIGT94Sv;^g#rXw3bUznWD0yt}Ks+tdvQ24#~o_VL03%P{=wH+)j*4 zK}=I{ff;4ABtF4)z9FdgTbQI6>o11D9(CIVfU>mS>8NMuT|hSN@Byo2eN6{k?)LmZ zpdu3^F37sF6771QSQd4!yGBZzG1M>Ek^@Q}nw8S^;{Y zX+vxYPW6pnfT)Sg7mB+G$q;gKA2ug0E@nb}+PydQ_3$E{yz&7InpTA|HBKrQh*^ctZd^@fNW^5Wc&L3|ukU3iW`w4v?5z7lr!!O|n(N!i-ccvGW%M!Pl z)7p$LG0s*GGc~9;&poLycfW*hCQf(t#E_c+21gv3CC|m#u=H~Q41DsUsTVDmucYsA z98+fMg7$4E7?RVt=<94)hC5j zX*=GE9G;#h={*uq`1$lU?g2Qh%?$PGvBEGGqZzPKx_|ePqttk^$!}(=FOL7PSkv?S zPZ#O|dhndHe>CYvM&8fEpGkPzta>L1jEKcfR>9k`@Kmg6Xl_P3L5Jwq9@d=wm3PGg zu<-%XGD}%ISUAeN8_WlMI96X-S;?B)u42m#d6R(_U`2lLOw6HtR}os1y9cv}7H(^Y zA-yEPwK)PU8IURI%k*;iGtvvlEvCwma_`M(vjTRpZJ|i1NsbBUIif1V@EnUAlW_XVA6L|;|P7nL`+ zsa7VYK0O{gyOCkMBj;#1Zxf8B%lz3ko%Z~*G#6G^?PlICHLH_GUU!fM?-}8mfQhTd zZxoYr3+53Ah2%dvNxvZ_EMmQ+auMmVx!^B$XpM@di<&-(? zx9%}zQ1YsM+_u^EkW}onm53LASDoh=p*zgT+cuKdx>c+m4i4b^QMK&8uy;e6{F()p z(6aanD!TiY>UxZ#(@}jauX@mKE-P0O*tYfHYltEQP|_$d?d&%&pO;f8&$2Xq)lO$K z;9a$d#lEb(62?(dhrvIHGS*Fv+OXRF#0TVuKW|vG0zguh;AEJj6|7YV#ZSp0kbs#jGEZ&x z35~L!-?1d)Sl}?Y!qbQ|cmM-MIhd?4|Bw)Y)+8b44L{>TuTL?2_UZZT^CNtA#Eh4I z@|650$In|bbBn1LSxt+OU`IW7jU=MtIfA?bbMrB|QSt~PzaU>0E|=GVY%SK@RYDrPpC7sZ@aKiOPYWS8YO4%yJ&jIib{`f7B@7UZT!-^+><@f~e%L--o-f#yRy~=% z1FwbLn|}N0!OBJ7W)el!jq=6~rqYx8ryEAAq|*&o`lLgZQ$j@JcQZ=NLkc=)cZz-) z7PB>DcQYtjw{07@>e2;^b|$^57D^V(V_8-{S0P?m{c}gHj6wB&M#vMJ_=ZTIH7%St#nB0!k0sU5O+t;Tt<# zKb}~MhilF2=&e_uuL@VG&W+5@m&1pOxaP)$?a#5|ET2423$C6U-PK`UoVZeUv1pmF z?}D_}zfP;Tw7vYPFK|%a!VoJX;%rGV-v#0xV|UBD=SQVSHI(LmJH` z!^gKTV1-oVgd)G8J)S--U%5mDD)u#dChXf^w$_o?rf0cLr`2N8F=jF003j z;86(D!s}E{$pAe|Rk`T`Il8JoSTC@bb`}W!R)4l6s63l2F?Z?M8<`k!{huYfI7BNt zsL+7bO0|PU{SdFzJt{RjsV?hyGj#3vZiv;g{%0Kd7k00!_(EgzFFB+k^NB`4b%El? zxi6}T&EZ-Qz4o~>osDx~_q$#odopriT8A?I;thSCogAwt$#h;{#UCI@4q(uIZU4Xw^Sp<@1Zyic74QYC-*(9yJ6`q z;V|?h(MEB^0iw_E;HV%}v@kjcY0@=hj7V1yMMX&Di=~~ONh5@ex?FRI-1Tm3(Wy#6 z*(S7-mdiLql`(^;a1MLA;i-7nADDJd&Il{SOaEMs!+fx5Vf@BNhY{i{=Fd%))cj?O z$`AnCi2aZx1y0{?aLp)FIvH$LBRKK5@E9#2RX5OFD+=C*))y79i=yiS%Sd~f6I!$Q zvC9@V)F^rZR>}rkv4s&kiwGigsVOx-%QG)Ss)ej3{NCmX05Fp*4E=TsO&qxD>i4MU3~{A6Hi! z*U2icuC5(_C?TB-{!{ociz<`PSosRWZZ&N9ipKSV^GD|E1LoNr3+g>8PZ&@iB-Vs! z?7V*V`(|XQf786i{$zbeqn;fnIC{H}DX4oi@NGeNV~@Bu8PHV|%k!G%V+Uq~uHQrg ziKPu=)k&qcgcZ}*ayQULarI9>)eYA|t)_8E{%##Cda@pbR|VBK!121PgYZ_}G?Omg-;-#91VI zPn%-wCCT8zUA(t&rRH{!3pjmnj<4-%aBg%lI$^O$dd5KW6QukEC|&>{c$S~6s08d2 zm;FUHDaoHXk};`~7(Ln8?})MrFZ=+AZ#1HSoYCNq%k1}@1~x&=Yk|6;V{{$(8~=m6 ziQd;(&yM@9y>@zB&;cBJ#MUqi_kDK*R%%Asp!c=z0t_^bwz{mgX#y7=16rfgUy1Y8+XwyUTZP#yl$}otYVGIYQ&NmiYu#r6 zyt`8rCZ}>7bZSvLUGxIob`o-&eFnxA;$~gUu!y~-SZmf?D1>L7Xz&ewn-{z>kl5%~ zd=tCNO?3OsgV}&(-vf!J$$*Kb*hj*_`xr{aIGv zH2k>=pJ`h3Rv1MDgWtb{*SmFt`R^#;x(2Y=H#P9fT7J?t-gtSQk108LB$==2YG@{E zN%fc;DBOxig(6#fyHig;lkD2CG}s+eC9m?oRdD?yvfnot%yq0`g^lXXa7?*bpKM>2x@Ew&&&1DJhpFVdUEBen6G#l z@R{rg)F(BgW;9coC|AS76(<&7LpZMs_aRcS*PL3RTrOlmGB$}AdSTjQd5bNJ8&NbC z?nI0eP3GV|L^oj2bT0KRE={m;2sajuu<8bx{K+)f$#n@HwB{iDD%FF?Zi7Ag7)m?`V@>hNYfynu8B|ibk1LJEz>WK zh46<~zA=(7Oi2dYg0#=?5b|U;#Zk*IML$6Ax?emh*Q9MrXalqyR?dz1)lbh`i)rMN@18oOYMnSYhBvYwjTMfz*Jk$k{XS!ies9_b`KN?@wK0j7P& zc76>t%t=kCBtIOHjsrg2NzNXJ=G?ghmvd(q2>5Ep>8%+r$_~-I0@q1Oi#y8$C`_WDl8m@txa@*F6CPQpj5~j zqXYV9)(P47-(k*!8#EslxB5F3aYlYcfhP@FY!Rn7^0ON){YA5p7I>1t65w_ZN6Qj> z|02xeS-Ze>>uUmlTPxj<8QMiVYbgy!W>Z+j6n4ObC9Nsbr+7pcE8k!Zmw^*!z~!o0 z!lPgP(i*-lAE=Oi=PjaaLI)cXw*QXmeBlskFuKZixn)5YrpTDC$ix*O2#xP=Ws(TRBa2y<` zXGJg|2P+dFZ=)j8Z?e!q4%4BbJxS!Zfqk@V@#8JhQ-SS#^nCrK4f&}4FlK+NWp zBeU8iL-Jw9OtdH2XDClrc6?CNS72VNugA{Ems^)>szkBtwHYW6&5~}da`vt0Z1R1= z=|_-P`I#zFdxN0L4aJtY4h9%&<=jGO(A;<18qJbTeFjy!aQ1A@HG_gv*y=4at*inV89<50mMaFpW!=((`IJ|$M9-x@q;ja zYB@pcY$I8ZKqz?-sumZ~uf_KppM0c~8f!`y%v?~`DQ9|>kb@-2+6T*h2BM<)I!#u` zw-%S*3@N8M@ky0sZOB^7v8gKS8vQ9bFD5zbD7kMWI4SF-1OwZF907vo*HWXGw7u0h zVI{k>j(3t8QdQy^yn?oEuFp{7qB~DZD61J>flYQyq51e38g5wBfvxi-js-?#ukjkS3 zRWU0ZpmSFCT5C%B0x>W!TpQ4J;@9!AzFw6M#+~>0P2}4VdNzQ42Az}69EwPMJY=l= zb6NYGs*?5PL%MqTK85p^kgwVbjmr-CW%E&E4hs!81<7x{0Q-tXY*{2up z#9ePBX7LD4-AtbU-G=+Tl7@hdmM{1l>7ulC4MMMg`Eu**$o8*7kEg``_CJv4V%YHq z`w?g7EOt0x?!2}-S`l;E2yvk~0QBFma`oz&4PfJ~ncTo6C2`n+^3_!GBF`trOu zU@qF0&yn9WH)4L!aVTk{ou0JM$i-QN=J~^V>A5QENa(jK^O;Z1Jf}Vxpax<_2qhouK&e6WE@wNo(8jCU3}Turt_ra73|N+5 z`wJeE=8<5G6IB~^F@m3l6@{Dcgj9LVtvJ|*BaOYvjys?kA_A#xG9!qtt~@kpyLfVk zt8HPIkE?xQ2dTj?+K=Dg%5j)y_wTJ}7mH+8-v&fG<@=%-zKT7cE#u{nNjDe+Vs@`U zbEr=1A0bQV+g(p;SoHuuRpo52*J|DH@g9t4tVegbEQR$Qu3bj=69Or9}aIRZTvrYJNJL4 z|NsAgKIJf@7{e@whAmrUn?tBqGQ&2b*#Sw;htaE|RPrj`W^h4c;<(n-06eRT47H^RP9Ft1d}mw!-Ves>mG?oa4ywM&T991|8{(wYvFZ5eEmUY04HoLx`s0%zI>!L1t> z(e=+X=(NHA9^@LI;AlPP8gAiNgD8LeZG&q1K|>#^bo6#Qn6KnhqF(5gU8<5=Cy*A= zycWx{WNx`ke7T-p+uc=hO}(n=3m7gMjPtwHWkX_WLtl?y=uQ_yj+4!a+7&xG`*VBQ2t&XtfVCcF`vbILpq zBy{qcp;|wJQgiCKlQ^mg@mi`340HMr-D-Oy<(Amz|osk5YFjM>vwA*sSc)%paK|Kf@KX z``)8I*`fO_g>vJ0a3u8|%Cf2~lbWjhR~0S@uJjcf74nWt+-RGU+mb@bLqgiWSDN`( z)yxH2yN#6kaUAwL;fQK6T}%+zvVp7?AU~txi5}^f9Sl|QL@%SBW)pVmJ&<0kzsXqf zvCruSdOPPj7khPnP5=u{i13~;OwuIq^Md`PG20_LPNv#0F4(Vlhrj}QCV}?~VA4=8 zheL&waP{pseOCN?yC+ItqOkJL)ubc6h@4fIP5KMf$ztlG3dE{zmhu3nJ!9U#pXr{z z;C*INb=#eE&n74~Eldx*2OfvtT4!vU>s|@U0g8Z`WbF;jK8ux%pWzECGZFRl1r-8z z)#km4j|yMY6Bbi6X-czS24?$9w$0UleYqD{!^rE;ePDO4`T=teE{<#JhrMjm@wBn@$G`IPIKGLdRs zre^z)Dy}QKE3-oqBCi5-Tx-kL-!eJtFg?yFN<-}zo(BpSbn$T~i-oV1%Q338oz#$K z;up~KQ2$0(R)DiyUikn#wsD3TadUVZv8{6FOmnOsvaJ|%tkUL&mS3zF?v$>;n};TK zDTc8dzQ+DULeZ20C$SUAWQ`5sotFbt&cKe?@D1i%xO^!A%*dNl&hks+GpTB%;FlHaDg|DaKmNsd24_+^mZ2>D+QU2A#3ZT=U@IX`sg%>-``})TV3dCTt6rWfBiQ@|u;iQx=QvTH$p0U46NR7I(VS?o<(LTXiUj8xe0;~H+?%Xsso+o!Z zHa_ywV(F59noh5n?VjV$!qp~A)IN-6QVoiyjf__etqR>7qqV>HMuYdqEXZE(DoOk*(%GgO*AN=cFGI7e<+F&;va z>X&x}zIK^{MzJt*mnc}7c)BX7kvx4J=SDeeP4&LczV|92B^7eUoS1Ze!b{2=p6LA; zB0mnP__z(&v9q6>92yVVZBC79`IrMgKiR-Q}A`z4GKpgT(`ngdL{89_meI1w0XcfK2zL5^p9@E~_xCg?u=t3Rg&IHM=dG=o?N%EnLO62a<~B>Em^=?QoYle#*t#+(|E?JAl^9R z1LR~CEwA$gLf1iDe1IY`0lgt z@VGKJJBeRovOY4=ZqB13q8#06ce&%ZQxTLp!uc-prqiEiJ-~RemD#i_VoDT-Wl;@y zY7yd4y9HrlXjRNn>={IaV#+2rDg{5p*^U!GfQ_tF>cr5pMqYNoUaQGYS))M8lIE1> zxDmP9IH=)!Rfs>*!*auEsU@VpV1o2@^nhBo%LIQIaP)G~f0u&PRf5LdZ1!93EjWsH z(SMVP+Pe->jdx$*(@R=6p1d5yAW&Xvf86cYauo6ew9&!`!;`YNdlQ7PqgE@z!RH!s zus2Hfdw-2Z0VcmQ;?xga{#^_IJKuiiIHvy1+4HjHX3aq2xOKN)^==#N$SGglK*E=z zGE=k-JF0zK?e&xxVP%sJw8s(av1OrO#}F$|81x0}6x}JMF-sxvo}JBlk-AUU#;L`- zP3Eo>vCTKk)JY^vl9cGX)pHEYwC%arGrQ7t*ROW#9GbEq#hePB=hAtyfz((&}dkrT#> zDgy*fW@QGH-v1#!@Gcv%@VDJ@ols#J+OPG{B$s>(7G)Wg$Z%C_U#65gBP)V@1v3$p zZmi(jexui_GS;g|1!Zy@85u5NY`5Bm@yhj^75>VTRLLbzs^ur@>0UdlI;BAAW=#9v zUc=1TpWpT5+pLww&OXn+=u|PX(iOmUZ?ZeU0J@D<6hPKjKp7DJBkk#8$4|ANnv40f z`y9SHZBW~L5psNlE*W|hKA9Ia!@?}O|kV=*~ifP?o z1#QZ{CCV>t`HhW5;jp`MoUTP$TbUbqIXy2bHtQ$dgKRH^Oe2bFGk9B4?CV3Bs`VVv zV85AE3wt)b<>V6Xra$=EFt^ITGRgAMjf^tnL`BAXSP%R0RdFnOM9-MKCu8-mf-S>n>bi0RLP_LisLZ(}?!KT2Tek z`b^j@0~+!i0Q7l7q>-B8Ye_iBTm4z7&%pl>YXM)c(V)D#i$5~Ph9e~*19V7~p{goq z&j937%#spZ5G9$KdFPy4GQx7qC!IIcE``>uCNTL=62+KYmTMxPIeYg6?Ay%e3d{am zz}y}gl6-07Cvfv*cpI>6RQWcPc+A46y1#74s>=KowWw3!wN~or6{qh>v`(r1w{%N& zt9Gr=e(L#&xY~_F?ics-VEp~F9xT=&_08wuZ$(kp z^13LpiP%~hYE9x)a99G)^suK|5n)OJeX_)wUMpY^A|guWQQ%F)q=-IO#>~c~=duR{ za}ku_vf5mgX3LMs%ayY%kBb5bP9eUg?%rDqqJvP)(w1Cj@Ta(v- z^^XCq)ty;8GM35x2UlB{UQY-gR-~p^?ynrr*o@5Bl(p)_s(EdqQ!@ZSknF7mic}Sv zpg3|BWc!YEi&eA@wuewTq|gRFi=T=4xW~YI;2DsU!v+7^xxk{gY?@nST-n$b&I%h< ztre}mnzw}mie2E?em!OjT0bd-a5tIMxyiipQ}aW5Z9rj^7;rbqn5v8m0^s&b)bhSk zOc(JUG~EAOi}#Z<1dBp9u(&pZq01falUaVbkJ!?F;#>tCA=0x(LZAs`7#?h2HKQzjfOdZ%*4W{n{l%AIpM^ zPp&le%qZucggMzJgwzp-73yAI{i6rxZk}H7D1$eqAj3#<2`;zbhw}IIk033?RJ5~G@c9s) zAnN5vUE{YEo;C+ju#t%4MR1A*W&TJ_a6h3~E}QZMBP%ZBdZE3D{PfJWah+a~7s(qL zAsYng8>w;iuG#0_%2Pf3toViK5SAc1O)5FX)s?CoM3vz|^VtQhuNRHG<3J&-pt9h1 zo;?Q|dG%ll!QW@=x)0wbZMPEJ51U*kEV7R%$$HX5EB4zY>bh0eCyh_`Jg~9)FxP|7 zTWIap@iB$yjd(3-u{}O~5@@*zE6z88>9`PXDD3=|EiR~0oe!-zORJ92@?yC5V$}ha1i^S~g09{-T%GB;<(7*7 z5P81zu}NWo6eb+R223CyFgrwe6L55YVlZF z!S~uHDa|t{qo0srJB{P zu#n_8u=7t7?7>AP<()n6H}}{lx`X3Sp42`vZLwW7P9C;Q?x2r71w2C9pf(u!)XzCX z!i4AVPps72|0v4KWMP9V!ACh&s4}YMS3+(vInNVLeU6D0^3_Z0#rk%2(9hXB5F~%2 z#XK+AE8mLTb{D38NmOEKX0R1Z9^4zlLy;p%Ap)j;qI}H=8R$^(saHMC!>({&rsdDv z;Fc9kBfkdYM$jBmD;^c zM!_AR#;e_M^igjEC&yL6!cEcnQ#}W{MM`p35AtBGW84TmW*mKMt2Yfxm#`wFT@Nnf z?7Xq4wpMYrJTgEjvtF|J8gE;dgjo+J-i7=3*0(!%Bo1)?VIV`QFeayo(-oh*8eJmD z9<=B@?T$W-(p!YE3)mTgpjTjHZWsI=vJ1NaW(;DZDyqP2A-aejcu)ULm?y{>(r3@ z>N4J60ZjG@btEO!CdyEpl6%sdKaZC&xq^mlEmECf6q+KY%VAFkXkp>%mT-iJ291Cu ziE7hOl|cv(C=WIDbqXVR;o0cp>5rro%=5pA{K8sXj?A-``NSx3ayy&C?Qt_V^DnG~%Gf&~qyWg{|+WEeYgD@vYuhK0da)Ul!W z;GjA}JKc3mA+WOpLn8(BfE%?1&@PgQd1Y#rU&t?`)(E>8zEd*gD6Dd~-wDLNS=q#$ zuwPuFvtmBVv-CMvYSE*Lm{YhmJp~-4g*G$2u7EuV-{yRz{u-P>-(DXg6TP`{#h^q2 z@e)lu9tu{;j*S#LP#pI%nll|ke1O3)8MW$LoIZDuNjET}G6PRz!!Y?{R)CGF-4od6 z3m$jm8>@Q0yVSj+O=P6;>GM4m)JQ`ef6$rw$Dvg>?6w+^aQbmw<=@)qL_!XZ8>`+% z)sGNA8uIY8ZY=4NM)lZ@gKHs z83OX$9w^u8Lq*!D+eQ`6o#JbguQEY9>x)oyGaon=Oh1~0W8xkjV`}jo%gC)o-Daok zs%^C<0{XGIg$d#nKZ}u(=c91T<W6&$`-A6*`Zihgv-I2m*DiXW$_9uqaX301PJvY{3| z*tj!yWucy1cZgQ{=#b_l>t;IfxKh;wudO1B2cT>vXrEWywtB4hDNmjLrvaxf*u>pC zy8jGoy2kG+HX=~YRD5+vCwpoL;LFIP4jf)`A$T}jz_uC2Qf=7N!N@{uD~^BgQ?*{2 z|M@+x!hR}LirkZ}rf&s9@1e9JL)7=+N?cJ){EN(K=pYh5mYa<#n7oK16qE$vTflZ> zuZ;oRnHWpP<(~>9O_Zs|g-)DbD~?npM|e{vEeLWpyzLz?A~(y6;?cG8`b9)8XZsMT zFs-(3Av2=M|A*Kd`(R=2`AWya@bsaT8x%Ras`=k(>@Zo2b8Jh_M`S;wb$1DeU2%|G zeNuhW6qCf%bJ}e}P-<0yDaipT$)x`B`sR4vmeAPH`od@mIzX|8Oeo3e$y)95)lfs#4^Jj7b< z${({i>s)JYAiK6Bc^j;OZs33&LYNFcf1-eL5)=&tZ2`0BgUj$pQ$1c@vHz5{yiP7J zD)X_85s$Ni>XIKnDrRjZRK7ClX+!fVS9Tc?+Wh?O%ng|;U#pqckc>#Y*B$TH?0KvY z1L;~X>Z&Iv)q3=8ePX*^4}A!l&D(NflrRVhYJtw~ypq;)0K&$OnPC4%TzNV<`B+}ZXYwZI!yKOILmw|@iq&YA^Gp-rq0hibFD7?DLYJaQ)YEU zQy~i4lsN9+b4~_FINh{=F0h^!L`C0XK>OwNovqjs7YDHLb-99-@p2q@2au=HuW@n+# zJ@R-#Pxxlm>}VVVFuX$j? zH}EW$2OXwg6e3AAfFIik0z5XIGK9jDt$@!8lRdC;G3x^ClwAiX`1Ng$ifslL6$E{{ zh!>ZP#5AaKI>M?|`;slx6*=3tB3Zlk(!G@M~ek!L5yW9{I zy<=rAGqO$PwG(rqwLL&z?vAXyIdPS1TG{xnj7-I!l@fb!hdC*tM%%U{@G~q=N$c8@ zfBj}jfYxS<8VLODH~xU;1! z67q-=8|}_bFiXe(mK&dP{vaZHXyJQ<%~k|^=uiKhdVdZgWWQ z-N&vUp?M@diEgdkyy1@1zmDVjCHl_vmz>P_@x+hPmOO^Ps9M@P0ROY_ra|>Ub(W>` zIUv83^O`0vQ=1fH=+ULV(rCU^>8k2IR~}~-=4U+ia5ZmIP8T2j7Cb9zhklVfu9ovt z+L{s`2|Ixs56tM&cc;=@Li)^&fzR>!-5Edw5)!nYtl$Lo*&38;S1%s~YIM_0Q-~ig zssv4{!Bwi^K8vybY{Xidp+7~vS%Jw|{Qc)BCkv$}u5yFH6o(PZXsQD_46< z3Z@09>Tteit)Ko_Qf)RER^3*I50JRVRKTRsY6E;WOisxSWm+yNc^o8S{-!?EGO4)= z9}(O*DHi44w3J=w_t;*`Dk_25tyl(l3D}`F&?q{M5u6Rj-tL9(Myq&DgIYM67oMYb zjHNc1EwI^tng8^I)6|?^cix$8(ocSRA!6um&~(g{HP`7l;PcCw^(Sv?RKtlRR{hwkZ28FR40k$}VB2#Npx3}2%+)T;{J1{?j5}z+32`=<&7?x`xmK^IWo0h!-#TZLw9G=4p|L(2oU&4*# za_4b@5fZM&V)8m0TdBt6fIRtnwV>)a5?TS}Wz1Eea979$7*;r`p!Bfs=O1~cfr7AN z5-@GDH@B`WuoZBq+r!v#@&zE_2(5FKKg8_WTCo)z*mM<750IjpE?|;AJd^53hud&M*?m;9+>B>8J#fkYO+64_7a$?QKSdUQk_e|BX0(ko)t*sfB z#RtplJWynt+XKSopT-C@hob)%OqOwl0&V0I=Ng?>+cA3Hw@ttePChzb)YG$l(9^@{ z54+7Gi0uh>8Gf&dNWZZhLcpfM7D{Y}kvJ-nc@JbZWv!$)d_K)Ox%Vk%?*8TPoKvFW zD)cTu^`=gG;pe)BhM8QYpyigy^7euR8aV^Bf3he7NOz4&yoC9+KCerW!1K;K&>JI< zc$5!V6Y0@9y6Xq{7Gq5Jj%ioit<6D)5>7qH$$ieBX$V7DWr&7$ZNcx|qynGBps*5g z{gAV{mZPZgf$^t9)x+Eiw77?Mhagn*wyz<}fxnNnGk7iP@TQA)^D%EVRG_e%Z0Q8S zGCIU9;+Q{N9iv4Rsi1mrb!6hmTn#P*@J}-VS?6f62)PoDXedw}DHqXXPf0gs$2r=^ z5tD?yqN%oAo^~%gj~oVb>C%E58sW+xqVvUR8dviUL)lYpQnW`1ieTsWbvbC7h{UMI zR5;!;gZ{eUjqMkr(#R9_ZgAB&zP?^~j_0i5bovGxntth_D((pyK}Ky<*mOTyHR<=g`fa7UsHh2#yw@K&E(J2 z|H9tanIRA-;Jy1Y0C+Fz*aUqY-U~GNZ?C@ttaj@ZD1QL!=bZqb%R1?~s!2Hi0Ym>a zH(}^>_!^6_H_f9i;^owB(>#|sh^!epLHoN^=KYsvo z;bAHq-NOZSXI#0j4_+JJaqHR7@be0XpO$^5y2Dzd$bPN+5Q9lk-+pZRSw+C|&U3d| z8OyHB>2Uc-qCZBGId^|4pb)H4AXJdsxU(HpVOjd9dZN6JBu>N!%{MLM&Uv6@L2zsu zzFD!dX9k9xdpgY?P^V<3*-^(g0&?lQj_=72+cU1Z8E{QBG{pdrjhBxI<;Q{*fdI;h zZjJ%%w-0>SSS)=-5((~e5Sc8kyi66aWg-egfTJASc(8GSsI+{Q;-0is`AAp?V;4?m%usG!?e_8^L_s&=rn5$R5z)6J*rMU-1V77KU!_- ze3H1a8yRo=sB)rx9z@2wV47`^ia2Jr;lX|#{bAk~&&cA+eU##ep7RpUS0b_=%q;-x zR{1aax*m4g9SAxA4LNeKi5j`(7YLn0{G-P{wabA-StJ_eHmvctD+`%_go>S=mT zMtvdH!}=|80V^+P)7QF6$hPV6qWV#Zc%Aqye#lx4XndSj2cOE+L-XtN?sHv;-uc?z zE~smIa|tPQ7B?n4o)*a={8}_oUTu=SKu6PplaQZxOvz&GAsELN{eL{Ff7#|4HKg=6 zcZr8mBexch`yte?f;mRG0&`n%S~WKp4HG9vdDzbNXrBY5{Ru@UFcj?X<((ZFZj5%z*LnruV zd+qA)Jye2Lgcc7O~LmvjDN$alX3yiPkda4^4vIq0e8AqJih&_UhVz!DXQ}TR@ z0IC`qFChzBee3ucPRq+@qwl~t*i&u&5x_A2va2shfR7mi&wK=X=!z9Zf0#p*K|azoG(mu z(yMTtYUF*bL+lWB8z`MEM4O3ix@(`>fwcrZ6$ausD-upTlL6FgJ=2D%4tC#FSD8Qx z!pk(Y*W?haH(JmBlh7FGb2?MiiTnJYb9aN5S%&+)jK!FypHvG*!C7@Xmbd!uh3;iQ zCS->p#hmm;C(c{z@$)1 zU0j8ymaEk{RNDtVCV4xMS;o?*-VLAUV1v6qFB>u&hP_;-O~{Rw$dGO%ni_4G!J?wT zZH2~j0|@s0#(=a68@bqK#AS*(0J64GFmCupO;9l^;AA#wfE7B}VdvN;Op|@+F!W<0 zg%jfr?U_z(`qu9VszY)uwFwfzuQ)U0YCsjUD@Rmbs*xL|pD;nm7s=%J0+IAm?Y%eJ z_mm-WNz@tPfMo|ZWGvSzQBt@OhH3{{FUs+))BI#C89fnLA}*KLg6)0i!&>gZriu_I z>efkIv{1$GD$nSz$~S#f-|tIIdJCb-U-k4~NXZ?w1mu2u0Ju@UekyUPQ+Z~An#Aj=&2ZR- zr<8!Oy6Ihc=hG|;pm*l#oM@xQ3k52YXlmDb`}K8;!Xtzg^mdg{bA$fNdzQ;QRRCytIqk@jiCW!*To38~VZ5Y;*ahyjI~?|%PC_c`}Ai1sQs2Usnue4O#E zvi|))M-ckTVMAK?UJEMGE@Ks;ZuH&wns1?srsHi9@{ojclx1qH!VAYbOt_pLa*%Y27biU?3Jsa_MWb? zo!u*6F5!PItwRa$M9-+K49Mfa_RX6d3J(FxC@HkdtNKulW|1L zL|ZGDf8VLd1BB*nFv_Pb)+{ds$n#N$$-6_`Q8j8Jkyi_HK$AveMC0fj3q_#D^V>+kb?!PV+ak zs@7*ZUI2r~ey;s;x$wu>=ieI#=MPk+W9oM81IAL(&s#r+12y(Q-yzoTrT>X*9OX@o zyOep2B5Tt>`y0j>AnCy0lVQub;YkWzW?zn7sDd&xF?c)m)v)*<<7Mf1y$2BY zsztY;m42sCYK;Pb`>+}0DTqrmLKTy_|%tb$`--!CL(IYqAJHI9uZ z?v=RjyXyajvoEkT+mQ_+sNHrfi+_A)j*&^|UWxyniNZ-H&&k`F)o742xO$tK^V~0* zRmZj&drVyMfhKbM7-ruZPW2^HKp3q)M=nH<*;KQBac5lTwv@L^fA})gpN1bv@G=bi zJd~c}(76d_UzW-3r@aKF&M4yob6lqOiX4>B!!vADiuRfl0;nQF5D3y=^;gdt)zsnk zs$)gr&)XN*?SyyPmS07{TK+@B-ZV?+pUA{gaJ&pQzGft_GR{8k)T-e)oJ7}8q^f?W zJ;~%Y4`ez~Kfj|*!<{4Als8_e@5!a=QQ8CvX<2k3(=L$~21O(0*!}66`Dr4rixNIU zV3Y9Lur;KJIhU#kY7FP3!)sEmg6S1#Efwwe}US~iVPU#5f2^-wD+ck1E0N1!viP>1ojIV zC^A&VY;5Z^jI16$|(vhXBa-SAT45*LL5LL2T|c)f49g45wG48#d3l zZ$`rBw}n?6sBdA;TB)6qy7+|qC{=#o-#7M!kF{e8>t=Sp7|1OxTa&fGDj<@QX$+eB zd^#2yfitfG}HmDsWCsbv=uBjFda>^J{^YY9tpx#QsBxsP61v8KktnVed-seYr&&U943P@1=25j}O6 z&e>XyvzQJoA4x8xpo?Y+Zk5mjQ0@#TJD@k0IXlEbOI_2D3FtLV~$aNH?NYwQN_l7TcJ8duSrOTpkuIp zp)hCL%DiOyM}On{S8vXc2lAbY(Y?A`E}Irn&ZO=&yKpc2G^MERbkj;amFM&8g`~I# z?S~-f3%Or{zMLp@YAQpX%PT77=_al{?9lcNw(?%*?~!+EY4CER#7sbSk(-ELazFeN#R+va=Gq+i$ja$?g`65~k{ z5%FlOzPWFUOE)G+zS`PS9vR?_#& z!i^Wq^Zz+_?<&K~_adVvF-4IsC;ia&8^3n)7C6r%v&)j%e_W2#{gXzowo>;^6NF`< znY0{`VsytWdh&9REK0I%LV`IDD}$4l7~5i3-lg1^wtHD6thpXX_bYkkf&lnqQ3$SfGY1)X!i9eXe z!VmI2P4&>P)U{13m<`0Xv;BYflRrIfXt7q6H>^JdrB1;1zm;uwT0;Pws3WNL=X8js zyeS>Va1)4WG4p3*`lt8K{%*HoV0`8MxA*^2MBTvp^A7m$ZyrpDzigh)Bq`N)k7log z>~Y2H-x!ite|{~Gy5eS-9*r3AF9;rswN#9O9DOVQiiLh-4=C-P!M%?;C=YAp@8iao zB3t_ZBpY3Wq5C|yF%;D>g_?9EIco8Zc`mEdxxJT(9B%d7G|!dzL#kcruGrlfPtFDL5N6j3_1w;mUN%>^ z$W1a(V!+t^ z>d2=zTN(_+95kf2_-&0bjG$sBy*T__f&Ry5{6DORth9!uUPk5|S}mXaTXY;&Fcynv z5T(W$<91)v>V?Ki1g!<(ZE5ALJ(>A4%C7d5ov`|#k(>CPRWN=J7quS=Xp-($8lbv6EGY*s1fyXZb~ro#RoLO&|n+n z)jlraEnWLXNPu#2h=Lv()*ao@&LslW#Pp4iEs~y5#qIG? zMd!*Q`_BtoC@I#+)W}B-J2Vwm3Q2do<>cPEsDUegM|y7gC(GyLcXvd!up$JDMZNYT zVxQc$39dhNMA4$xhF9JSgn|Z|g&(1y3uZx`FUBK;R)z9C|GI;!`_ZFLfhjvL{rzhZPtm%W2&_Bvm?r%9K<$P1YsY}K zT3w*>X^bPNKpjc>gEg|tN~{<8vc_fpry=ke4g*kbeYKYfRp%9vMCQs zP$i)p%P2r;QtEK*nMBPC$}+@snOVxa;JKogAO1=lr=&K=@8T$5pTqS`)VMV^3%;FY z%3E|oYgB_|H-_$7nf%%K%#*0}laNiCyxC4WpSU`}yWT*{M-i}l`FgAFYCS2cUI6mC zbtLcN{2;1v9Sk zDC4dN9HhY?#pMc6W6DnMBeUYTB9&4>Z^*o$D$e@`rr9Bqxp_~Hj!biOL~QJ z%M})D%BtoleMbOOaS<2vZs_AngjeV_!I7GYD@Bdq@=~>d))biyd(f8}zNGNYD?L1& znORH`kw~QIn1(1kjw9A9gjvI6_n7mUvx#UQcpJ^{-9>!1Mxa)q=2c5@UOA!JQsSkq zDo%U7wxb2Y%VJt0iBLu^sGNpL`FX{Ry%J}8>TGoVc%JCeANGd%jte~1Oj3DgzdJBFW4*Q)sCEZdQfq-Vuf^M) z;}^_z+=1+B`}LXB>uEUvBHs8*Yv8%CR#0F@w^-Kn$(rUNoQ)W9!hRE5_B?6r8L!U12#w)?#Y4ZdYy5I7O-IPh;a zO!+2lk9sC!pCqu%t$u!=JJk@M_&AAu*J9N&By*FY{ek1*tz*A5*imy9H zNwe^G06?<;Fv^q0xaGE3ia(Xq(ipBV1wk$rp6jnIW!EDGL2wn^CzCoK~6USm!x?zyQ+X8F!AWK%j3n@74 z>i%CVCwcnsa|Bh@T{DowO7GlYeHt7388q&(DP_ca*}UUrjE`;BCUT;#Fn{dx43P#M zy(>Ln(lcp@s7>o(2#ES86x%6nI}kS4J?PbZE&ZNg-sqQtgRwvgz)FKtvg5|Ozf{JpYK+~UEsY^qDL*$3r_B~4&m+2kPqW8YY>iE2hBr? z)JTec7Vg32uqJJKEJS0HY#K>9O3~7zOK)t4F{!?+&_;Xx%S^OR*+^ToF95wVVicOP z+h_Y=B)XfKLXAiD&yLBPd{ij1G60{_zgG91sa#HDU@~z*x^shdi1gczZR`y3uFMPV zZMj`J9aOsqy}u>u47~A;<^4Uv!Fn#Ij(af67n!fSUs-Oqbiw@PB(|LmT2Xz|^baXz zC@L3}7Q>HKGgyxYNAY(AD6`fdJv?flsR=xK`ze{K3v~Yz(5&0_+KGBH&Ef?Z-K_g_ zkG40Nf+;=-OBSHf5SpDyT6Q9Mg}Ds%lRiVB?TLe1?(AuCJB zNm#-X3=s%w3skQA@+bW1!s6?Qxt?g|q zwACuN3wp1&Ew!BAa}sUs{e9oh`~LO*^*tw7vhypJ*Rk z&%7R)b9$R|?Kfc`ylGj<7Hrjh{6W}dDu>rSY5XwisU@r%|LGg%JY#!6r1*GU#CvyB zGavsmHUEe2ILAIrURRjn{9&@Hcy?%iI` z=sCKix-~N_udvL?E%b8bxtTpjX8gnLZyO>P1%20fIw0xf(VeFsIovomymbe~_2{Ex zp$cpR-|O{QPd;pk^6RkS^6lcTbXI%V_u4Nb=6B=g*Ua2i7a8eA{krYDx(8!h_na9n z<0j1N{`Xbbhxz^$MXHo>|7owfK)2AKZHP|28 zRV0fzRC3q@oz8wtqgzK^l+px7 z-M=yv;k4wUns0Mj+;rcDryRPw>u!D9`r_6@IMeCj{>(Xsq5j^QSN89HmDw@(+Ic)M zvySC}Po9iuRn_2AUGL!VBJjM=?JG6l`2yAl;f;(M*0Q_hPMmECTJ7QUEYIN{{pGDg zwAVMNnHh`K9!%ZN&ri3l=t^6d)iv*f-FoE)u3nx5&yebtuC9QT3hS;@#=tT{}AMsgJ&Ys;SPsWO6w>W%AZ7Jl^M@f}d%I zUFu<(pJ>+>mhcKJ?p%LZ_~{e9aLjStmEnLR_E&N8L{e(zp{LUxg}M$nmbg9o=Kb$b z+}mj<8$UY6XyB(6`3=99JYTkXVe5uPy?(~=?j861Ue=#4a>4Pgvby&&xeL-#`np~V z3g1wx&u~w@UV3Fi+c--AWz|E-x%^R<(I^G z=TxsZl=Ulrt!Ia4mTc&Hm;ak5Kc}91+Mn&xf0ua}zKmBK#xA(x7@2w`IQwbL`grbE zZ+F9GzW=PdT^Z-EZkxB6ck-Y8Nww}7`Dca2oZKSL_%>Pqb%Es6jM4W41F^(CTQI6j z7+?~enEw)^Z=ihzHb3s~mdE3f>;*w18BxNd*4*^I^B*vitIn`nsC) z|Jf1n&zR;^Q*m3o{fJ=MQg(T)Ykm3~>^N7<^Gxz9-?uVZpWzcZbu68~WbV_c&+1Z- zutJ*f2R^7{M*)HB$n9jtFJZe3*Ye<>~QI(;U4Ms2|Swf?(4h*vf=4A+Is zm3Zb3ev`P$LLJ?cUYBOCU+FipGvOD`w6qkwv1RL>3xSUXSY2VA8+)+c<-Xtz`@lL5M%ZrdpMBOG6K}sdBP+l)ZchKqr6I}pjW@DipP6OP&TXPOjSsR9#%}RB@wwx` z5%1eBbER!777L~~_4~6u`|1SW!OGOouVMNo=?vDD?%R0!!lRMY-35=Ovg!RvDM|fZ zr_`S8s4|-0tSQF2cds(zrx)CoVv;=p0)0s2yz9bgij`fk>&S9W(XKbIE87-*f`z}! z{#*T9J9cjl`_J^`oj%pnkKR}9lx^yz<}`6OHYGJ5RUZcIuDYLSIS`;N&HyE0@2LuE|*R z@9~!FfA4#xrE~Ydw2VO01I#g*apv1tKK&I@U{+hfx4FkkgJqw6J+Fvc?=C#tF;K_e za$DLSzln7zgR|8+PLaoLZ8{wGH+KE1wy`ZYhCj>}O4~a;SNp!7RyI(-wr&05>%y}h zq5JLM=-_M-`pl~npFs+-goj950-`JBwU9v zii4TGw>sbUH9a)dZ$CSegVic_?8`jK-O5x|zZvy!^^F}O-&()A#;h5#Q$qRgbH7T8 zHNDpHre|gcb#dFs@ae-D0q^8yB`)OBLaub5I&o(B#Gd4?2$*2m-rv>2Yk$8bX0tNj z>yfcn>UJMJji2sxPhNJnF0|M6BeJ5bD&WM@^UY&h3KHhLvx*hq>i2{6X>e9Y`NU9$& zjO7|GaMJ@OyVJQ>K5m?@Pn&ZhX!y;}@w1V-;xjQ@6Hjnqzo^x>Pe|Zx%%S9Ur%zv~ z|0GGLulYK!Xh!j&kap_cF@4*JWX8*12L>djXnn&@utNg0w*%~{C*KlW(#IUi+ba0# zaaPJ!uyFawCsqV*-m&PxY2MqrZ}0qj^YN}(d$QDVAG8SlYSo!9Ey5boN#VQNd-i_# zP2U-Pmg);e=ldAb?}beJYxgT1cRdbN9=>*_k?kJqxbv{2&*#D$ zagB{LOOn!cU+rp5&0MdVbM2aLB(kSO4`=%Win@wBnVc4KlyiuWmcued%EN zc7=A^KEo1hUBS}zUon0iO_WtUy!qbmUJSL~v*~)ockX91W&Ym6#sBUxUjBW_@AC(9 zAG8(R&m3J|+~Jo-J0Y{=>gVoRz&)8yr#GIO&&}MLyXdp6+%t2s^i|0bvf&xJY)~!AcNP~aD(Hzqusu-PBM2ieh%lrDSbs^40lh#R}F)U z+P2m~l?2QhYhRJ5tu6mFFlE_}E??!~D=}{fK8sw9%@-!7)$j9f%ggt9^ZTUrFD2!3 zzCPaWzg*W9w)-Pke;U4%`tbPP3p>J>=O=!?FYnbS`YH9R@m*Wfl}{EvJ^A>|hK5D| z8t?F`Rl{B z!2R5B`x|F$33)A$#n=$jHPRevIyLPh$GFCI3PXcra5eL-g-;emDlaW%#IpmKtm37v z*JI9w+E05VY)&rTv$$D*;=ba{G1-jZk*&cY%k2ALZu`OHbNi1dJyTbH$Ju><$-dJD zdtvYCj)Pli;uA^X9hV~?DmGnC-7WdapBW0@JDg~zvNm0vSa_#5Bx&(~B+Y`0 z0zXA_ZpNttX^}ThPk#AfM^{eUhx_kTZOWf>{*|?pTlM6&8LYH|BOKSN!*jY?wN-WR zUiaff>>3(9mvN$3y0UtTsh4u48(2xk8;-B6?|a;u`$1{u(#>WX4V~CqpPv!RLTrgL zCS&=QJ!k_dp_JDkLY-neQhF&5i4e21pK?9nzDv64{se5qxjZD%vb)p|g*3orgL$Fl zS}E)g+AFv-5%-?>w@st56LIg#ej7mR*REN;YW146>&wyPY|GT^GP|jBGRoA!9ubKY z2ZZ~IOK;!nUWgqp6;_XpboP(S`aB0L$0M+R_0jE|9W4?e#<<2>G-82uWUH>Rw%;K< zN!K(*l8EB&@tZ?fViDaL7V$Xm@0+2r{5t}c;W!Q@VEfk*3ww5z!A_@^@53kk20O)> zvkCNcOSdF~tVxAULM%|PtZ_yjq5D1pJ{qvr`WOjqJn`{5_AP;EWRp>)@ZqHw3y2^RBWzA0@)_2 zG(DDcQf$37@3ZBWh6>wWs18^m5#_7~VPP8yFLvx2$;GLAJa|OI8TTErJWvqA>apB1 z_U$Ws^lRFqU(z1^tmD51#p1tDIA0LXw}kUEI9RIXW_8cx{^3qB*RoX8DPt#0E*ZQK z$aOPaMxS1?clV!TenQWP%f-Pl#AU0*S)R`=I%Pqf^ zTlf`sCOw9JB&pK@EclL48B!#hrLnksD;%J7)t&v}mf(t>J~tBqBLghT21~QSGAjD} zq*fRu(w-Gfz{sir$gp$3(o>0PEt9F1`)0A76qU|)*4J8g0gu;DE=8x7HcC(vcX_S8!Kj_71N*KqX*WVrCY+q4%pF3sIKmD zat~1&OSjnO_BB-4(8i%uwCX9l$g%2A$m3cIW~xl5Bm2Odz=gL14Qp8`LnJD)yoJVC zk(IX}P9*#oJ(}Q511ZzQk3m^WrDcS+t{^h8tcbLf5Xwt5h`xym#&wI#h?Q0LQs5Zi z(_*M@SoEC{F{#N2bk`cdzhC8SP2$PzF{)j zVi~9e5n}cmCZnu=VDw(qq{c$<3YEcjlfov&1K9rI>P{IcoK9vj(4QeH%LNT+_JV46 zkEdGb3|0XELEn?qnwKCF6mZI{L6H;yg38f3tYFdrKO#oL)M1ydO=>MSd?jk7n)N*{ zl&Fo^<7*K=4qz!3s5oV}gmvn+Gg;$E>?(Y*k986PeHJcurH_?tAyMo4a@5f9$vx1t zuy`;bYNLiW-ZVU!Vp%(xY$<%JpM~SX&EqMSP2U5q2iYH$c0< za{DyvAgoz5UN?N(U00iXjxB*)+sfn-~M0~;k>?xV}lM#3I zlt@hKW)BdW7#cb8)_qbxn9S>%|Nd3!$pOCiG1#mUD@jCno(`#=QK)j`VR^LfwzQiyP5Ir%&f z6IUOIV6y)kkL}>-_TPAJ|KI5We@Gxi&;QT)Be{E!p8pB{5Shbsbf(f7Ohk5cc4gaq z9NwQkM`r@UV7jt7JOWB!F_=`k?aJZVpor|sCa{Q<|9z#>ZP40k*n-}A!cO#f7t*6H zxDx&s&acreI6px5pT#NAe56Cu;cvrgMtiMi^Rw`FH1zDW!97s`oB}lC8T=+nfwK@! z8~g^^Z9U(A7S^G~*3*h_hYNo3AI<5>>A7OQVn+BVF7Uo)H%XbK{7(9vM8pv=|53p& zc0i4YBVgC;1m2@o>bAnvBDLCJaCD^84F3Myx`NH%vZkoV*UdRRE1{^<#*W$I+ed_N7 z&mev3zV{Grk9+?o>f4#4>v|IVj9n ziz4a^T=LDe_kXd5pY!?0^^aVkym%Iz1}OP+86X_{XmB#pGJ8DI!b3U2%xvubrpaj| z+vzCX9(tw8ypIwlmw%KVctOkyyeM{qsK6<_pX~-|)R0E-NGg>I#>O|%H?ut^H@SNJ zzKP|IHnTh_o1>#~S1}&#ibsoaSBd*(mehMQ+t+8ao3COs%O`xZ*lc#i#b&?}i^b2m z1wWvR&3{H{7zxD2^M^-|j2<05HgWJ~)aXHlc;Z<4L|ZL{kETx?cxm+L#F6xg{V$Ck znK+z2vG1kP!!()uMB7dO(YA>LH~FInCia87e_|iF`vmVy9E13y5PJmT4v+2|=pH@v zJOhn=&cq?0)w*!vAdos3={UM?1E3vKj~)};Gr`TnoQY#V7;*+;kT1B9E4YWf#5@fH zQjfykGlwSjkM5f|014Yh4{V$wiAgjY>l24=dXF9w90vHo|BDaej_G%qa%u|xxJ*fR z!0c<_HW{Kj`zL9Z1n8307i3h;?*g)Ba(v0)#D(!?gBItq0gX&R*91Up;1i2l{mAk} zGr(_2fm^_{gku5cxq$!o`v0#4NJxfoDH$mdE~I$5pgT;e7aQGip@A*F!=bwZlw(It z;ovR|T8a>Nv8Si-aTlgFl><^CT;%9SLa8(-e;vBQbXJ0)6S)Aj$0AoN4hu=ixRmXQ zfSOxSJo&K;C(s35;c$We73f!_Jeh2hj3kV!-c65=8il5ufiBr0)qQbRO}LY90sKJ(gtzklbih{k+2RHKyVS=sp+#&BC-U0HLxMqIHY% z3*~)-voC-Il=tfaM|NO3^w_dCl*PTnJZRSir8op_aM0y&u#$R@c_b1zVID;(w0q2B z-a2&8jf9CH$LnewndVf3`jv;sYcEFUp$TfVOV zU_q3(V$*LC>Fk0P+8`yDE057%$ZlDN`2)>!Q7-*k7)r#L6{VZ01z3yWT<)Vh%)j+d zn0@;Ef;2tAJ~XN-=a~SeqMWO7xkaR7%0*H+2j1<6>ywhllCgO&7*+=*M)Pt)`E{l|c2CMX)bC$%r z0*DewVf4g0G7&3Etx8ZLvT416XKY_Spw`dPX(^PfJ;pZ|uog>$WB`k`!GuzkC`-xbU(V2Pp4*g`N#u8K%Z}bY zK@4(NXQ>LZ`23U&MoN00E>jLR_*|b2=Alf{%S2Qvo~<9q`fdrd2ZT;ioNirh@I#&{ z1#7e_DmAO!P_mS|j0rMBCu40eFV(cL0O0eVv-Gm;tJ!i4sB@&0skSPh8YQ1`n zG(L!+Ir@wyHal^KmY`W_sLPm`AB2hiq$!!VbgrJD*=PJEDK`}p$$bByDUFvaq-uor z$LZ_hw0%US2)H@lE&^xZ-uiZh^Lm)-a69f4Lrs(3c zQYhrCSB;~3=As>i!GylpU_o-FN|eH*;Awh?m1kBaKr)KYGrJV5*2c^9Jc_B_pe-^L zC(KRz6DCj5>6L_Cx&Y%Db*s|Sr|bT(OCi#Dl~85JyBx27bDeShGo6S88$w6Z)Hynl z&W@L2HlAMGyo8wsoPs^G!W3$iQZBQjTu#w1EL&QRK~a&I5;;tfkx^*8R-Kh)M@eZk zo{85cV#>KY{;&l~rb?J22OXTJpT634jWxgH6vi!b0~t-1>XfEhBV*px45mL6;v8;+Map#2cqxf=Ia$vt z=9Mssws~$#%fJn2n=`aU>KrwRl(Ns55W|RL29Xaz8?(V?s^aBpu=AIfK;J>q28SR- zJ5EWo>e8&NHM$%f=+bQ?ZkSyZ5*Fk`J06?(fY38Fw1zAhmy6HUSC|s2S|K~i@hHY{ zos5lUYqi=eD1&K>;fM9h%35<&R$KnbHklG>vh+Fe@m!MpqOrFuxFSbIkr1}r3X2kQ zT(XJ;g8n4^VA)W40YUQ|#bsi9WGspXn_OfP2nt#aio}aa1=&g~>=y#2g{n1e7YLM> zj9C>`MjI^F#R`jw*D0kSmp2#bUtV=$HTfCMTOA;mSY1K9TuCBj?KW;r%h!=(gRC^I zu(+%`ok~k0$$O1^(wd*aVqL7TIm#5NEFSbaQ;$|(TFpy-L9gSX@j(WvrshVq=pxmMUYC?An-u2QecBJ4|>;asvZEevR)QRp9t zdQa09#20~1sC$gAsh85i{P}V;3jG5COV843U1VIr<$V3|_^S!lKK1w&#?&{FWk{Ek zvPPui3Q|rQnRBH^Z8nU>LjRDVROiH-_^_utsHKaRcMA0X-(Q@diPeU09*aEFwC69;pS74|wd9Vt>A{@^wdH7 zTbLEEi_hT-Q(iY5O#C{@ORfPJZi6k->6Aj~A1-I<%ND<$MI!9Wan#lum`Fy8i;7Z| z&^M+WH7>}>$s;M702Xb7Wr?%}GCAazr+<4@-)d|P)Vnx}F`AO-hL$LE-i+6Ch3cEe znu1piYZPV;OIa2xYc+e&JDr12b#bSj-8Nk*xf==YB z74pC=f#9;ia3-6UL&^b|wQbIfMS1$9_}DUmAmx-XdwzzVl%vc>pi2|m0k&LJl%*7M zxnpH|W5Vl+t%O}V8O7)!Ga^vFs;(>r?1cK3@%y~5@>_!(09Ipz705)&0u|^)p`Mj= zD9Or;nA9+qvM2_vP%Gn`b)Xab^|^)qE3ra&h7)TW#%==4pqA-mYMvl#x$)Bl6N{RG zPnwv*nDAIhMuj;!devs0K>o4ulX<_)x540^&ts(otyC&=q%tb?@1Zo@P%MsP<} zj>hKedl!~1BKijedfjuC!A2D-ZH_(%`mw`?Ym0)iT2~P;sCNQZDUVf0fliFAHLQ)_ zpAb#l+vGk=XVfj##zFt5?lMvmDaq0PAhg_P=}aQIN>AihY#1&7zJjnJ(2g1&^+nD{ zRq7OdSpip|9x`}t`rBqqRSd8i8*GD2uFWbC2;>chf9Vq7W6qH9Tx|EF?U6BPWBeLj zkqVv>-Z6TXs>|UHnz)}Q_@tvvTBS56M<|fLWY}31vyrruNLK?oFC(MP+W9kz^nAYj zh@mk5r-J3yzBsn!(fg6hQMEQ_Mz$WFojMJ9c~_QOZ7b1MI%E=5qupGfSJ~Og`;DKQ zx;8*-Ks30gg|^~{%qayqYvMuH9~rCHWUjN8Z?vod^hJVdIZTy~1AQ^a5Srb$Y(J3> z{??-|XLI_z0xntpiSgqi-&MgGL6NlMHT}KqV9&PH>2+$bXYzj-dkZ!hRG{;;(V7P% zTVzU9uOJSDq_g#$Iq%Kc^_(7Y-KtV4Ra)R>sXlatuK^?MF4zgMyJWPjPOH|gfoHXA zhS!S8t1!>yDtPW7U~IHqt5w&n0l8c^w5((n11uBnml~|k0S($ZNC$GcVc21yuLM{a zaW7@H>=73_P*hxoTfb08fX!tHBQi{vQe{0m!*;e%&0HO4A3)+Ur4t@T~?%v2iSmN zi(b8uSqyisZ$C@76Z-HvHH|F)z!%NJYg#O%c5X_Z0WA z?|%t?=9jsS4LuHBBrg_$U^`sDB)P{$yQq7R*%e~EM$HcIkeqSc3CHb!iMBUK3ve?8 zg+^DgcvON%1CH}(u1~tFPeZQDk0kpa88$jDxzR4sX5Kr|f*(o3gRVj~$tAkSMce~c z7~X?;PmsLvXlFd!d1bD9L$154*nPIyy$kpLkpwyN+0i2LsIxKG8R6U?Np3jFE!PZW z9S(|_-O&z#uI>S5M=5U0h-Vgi4w87rXm3UjOYDl_(M~@`drg`}2XUI7#3#}bhuu#& z@FV_lRIqjwg7nk7gk54b6yzYzNY8~BPert656QC)=g4|EEL;TjWhS|x9`_%KjCkf~ zp6jz5Aqa;rGW&{qB*-ig<0!a?6g=uP;p*FkOT`la^)%-aNFesyXs_I8syNz991XSX z^}G@R#Q2iL=!%v~a7<6~jT8GC2I0fFlexo~->{56xndamdB~ZXa5M6YmlsH-PW^%> z)!UWTH~EqQ0xfSC^Ci#>!`OeGq1||nb~8$HQ}ni&96<^i=pMf_L?^+F94uv>?fbmv z`<#(u)s$U74_&`!v0EtB*wrm`5@V*?r{ z_VAVj-WpGq4&PMWcaag{*~Bb^2px8K(PZdw0!>B_>=Zv0{9N7n!OIKpjRnH&m3vtG z!r9viH0zv+g|{C|fzBy3|Sbz2I?GSde;(CjRvgXs4KDte!2Sc1r|g zcZnNJYyr>!_QTM?s|&wd$X~Q&(WGFwvmbjvP@~gm{qSDA-_26LX!6!jr+8x0G6ZG7 zzFx>8AflG4EZ!jU^RW+UVm_y43;f|eCqyE0uq8#&h>LDSBd`WB;QL1mQXpL% zf*Y+l;0zFh@{barHGG$d!qMeqh-*znyAU%C0Gk&>-1c;Erq4q(l%4^2SSDJB?&`sj zEd-*miy+R5m$n45`o~fTRxSf4DHoFEu3zExMdcUw)Jc~9MT@Hd%v@7C=$H#F^R)xFgEU{9;LVMl%IPcQhN=vsC*UTQY) zXfW65cJFPeZ><50ExPRujRY;5ySH^)letw_zhfIDhv=8~Zrj!b*R2h^As0xj+r7V` zxfx>W_SV zj-cs;+#7#uSQ9+{_hFdq_x7-*M1`%k1WxH>RJNPoXVW;WgwUk1-NsB)R2f@vOY;re zjY|08L&bnFq0zAiCOt-`NMa^-dG_57-?hwsD9hiqVh+ zyeTq-ygp(DC1|Ju1`$vAAm`2FO+%Z;n};@z?-<%JzH^Agh_4!N88VIU8XCX~MkbR6 zJ7o^DWi+hza{&cAdWVOE)#I&01Cv1`ojs6uw`8_)a`Esd1KY7#+0QKEWcCYY6W-Lz zc;o&fQ0R@25avfE4c@c(&lnT@08wrP~h`UOv>Gndp>t0mz(FGr^uU^SCV%*@7p}D z@8tL959E*J|0Dli{!jU&g4Tj}3f?c^t&ps6IJF8n(-8C2 zsS@OTYE=nxIYmP(U*xkxAz z1nk$Xhvz^C;=gV^L~YuLoHwpRuIs?zY)0%&8@0%-v=nhRuG1oWA0Nn%f}9JG_v+Ol z$l>C<$eD^9Pxt*E? zW%PnVxgABWkdLbmFvdHG*caagj`(vCCzFb}KKl{3z-KPvT|5Y{BkhsEXYQ%Yxk!|d zfINKW0@U+p!cydY^cdp3OGTWy7kvmmPrZvgFI~KdykLY5qav?&FN%;zuyiI8u^kWx zpYXUz{NZ}W9|_NZTp$bp z@JS>D*dKYSR4U}9aza9tss%2dDyJ6Y<)lJb3vzdY19`TnS`gNNyy$e~)zScnEr1HF zsQ}B<2^=pKK!FnsL!KG0w<8}6cnoMqzQCm9^*4|oaE!GhE|iLU7O~HsjXsI8tln;XBBd?=NJ)jcS zAdjU)O0T2*V@L$`?jaC(EIn*ZD)m5~@aAwS!mF9Z28px&W=z34lTmtP_|rk z;y6JYaXZz~aSB?c3b9I5P9+d~szZUe#l?u9yDAUySLMnPS5<<9B_(yxI24Fqatdg; zD}Xl^MAwy+K+vL}eO^R)VTQVjfutbRu+5BzT;eA)pyTaHb0RPGB0ENh524TBKiSwoJ~cn|{2*#~Cr zn@yU{iDGI2^I3=&#nA%hvk)_irv=OiQ+QJZBQi144e^A;99X{a*@XxQ_WU*W8Ok04 zX7lq13|kV2lL+@9zdZ;O!WEBnj;vGdnJHJp^Y~0&Q^-}s1r8-ncWXJI8)Sq zcmgCI2eG9q?CtF*?+$kM!#xKrC~*AlAUyiPRPu+EJ%<1H-@_IEGtTpP@=wnYNLFg3 zCq$6^+X@oNKwf8{aSS9+14&{a$qeK$19_%_6isAGN;Qxc8OQ~MpIm7mZ8uCs5BCKY zPKk&69v2e+x2!JV*Dx(Zg`a<7(9qyYAWc3T>g?~^W<~hL>P{6-nTM@-!+pb6QZ^!1 z|Fif{3_$!DjSpV%A2$$bZM1D^fhOm3;02 zaUG`(vHp1r`)+6^+pU`IhCLxX;}36*e>YUk9v{Coet$@irs2>z0;a}|t`tx;Y69|^@ zmDmS;-Q#LF8*tgFxdE`zyb_(ut0~2PxE+cWS!;PmsEI^sqFh%|_rLc2g^1%?m zZMUPuJk@9GC9v8;VtoN=+-n4LPO?5gcZ1)iM5+P)G^{UpB|+u%Gb-K2 z@rOfL(eTY}1Asy7J9I-60yxhCw=}9h1D|MSLSXbD_V1y<(S6mU`{`uM#mI>^n17l; zNG_*(;f7s38(RnHOpR9HN_Wu22$*z7O{{=Qchbaxw5~&$dojz<%qP`P?rFLu>o8fl zmEEyNl1H$b#{f8hLWqJkG%gyk3{Au0R>ICl{M$qkvR7J)R$ALf-}aRd0+&@?gt=}Z zQJwn|1r~AX*2;@DmAf5 zGGsqsP59@!gl=MeLISK8F~iygAa-v6;}ya31{g|!VFzr(HCTrsa4$2i#pEwU5A?yX zihxp9Zi*-)28m!D3UDussGKdH6vDa?;{X)+kKz#p&`BbqpO?=vw(>891K3JixnR`H zQ=*x-R$Eh})kr*HxZKlIqp7hT8VwQFW@{uGy(S6%5^XlXkp$*I5~l?GQBgHDeQ@A- z4;;i5=2*k=+@9*{Be1UtfOy`SU|V7C456p3{8!7>!&AiJ=m>M3ANBUyLa^Fdr|YNDe4OhME!j_=)@k&&D% zlZnN)aC`gq?R2`cv!|!YG%?ZBW5Xvf3DFXc^-6?aIJ~`UYDQuDfA7?Pz`2~kth^9J3G4d1PwHsdwNDkM{}*`Xiv}7 zRAHf2*}*9+oSOP?KA%3NPf_qO??)~(-WPs%5KbYSzuG;5sl4>5r%#EP7f(Aofp?_8 zDZ!NR%XZ=67kpY-INM?jd6IGk@eBwtFaS3|9W(AAGe2x{iAUDx?8ZyKr4q=LaFH zCt-}3xF=Y*{idsRfx^AX)*+yhG-xSxdjz8y#31p-gei)QPjmoE*;x~;`4dfkJlH8d zLCoIwv_@b3Y)xRo*M9tz|K>G7h@oM3u7)h+15PmY>(a=B~M7h-Wi(NnqJ+O zfE^mDu2ohy7=wDBkr0hoMYm+_m?nnEXyI_@V8+@%GKFfwe*W+}2)`F&egv11vB|a} z`PC5YmJ(;{P3eOkuIy!^(mcRI;%9L zbXn>0(lw>#($>-grKd|@FTGMaT>4e%Xz6(Ae@f|P9%Vjd%Ch*f%(CTW>&i;Y%FF7@ zc9k6|J6m?SY^ZFs?8ma-%k0a!|`N{J0Pi07DOl4eUR^_V7>dIY}FIT=+`CjE< zwOqL+UT{R)|$W(LM;d2YdVb&;o)&b|aE&Ct`@4W!!QvZy#}x0Fjw6N5N?tn<6Oj zuJm84SdT~?DY6f8@#Y!5v_5%=B-(*kp*)k!G9&$|OyC!(6 zY8fJl4?9rQHU%dH6gZw zZx(6%gOoF&golxx!b!@O@l+o5*g9FEA`+3{LC_;d+K3PD4ZE4$LFcwjq{^ zSL{(FuJtVmTt5x+VYIra1i{{G0_(ycB%C91^eGQ24sDNch5{vs=lZ1ir^~saFdq;O zvKa0m*D?|{47B*3{?ee}{OOz+0sC$(Own4Amf9 zgIsgmR6>fk#BZw{>X*HNPw{5>OQ!kGgrzOhgH(Cy7P!uWYXn>u!gals?_J0-m_-*9 zVuykuZ_h@=aS%E}%WRWDO}wKO~s=5Qb~M$#ku1+L58Yq7i_5RUaA zi56Q~6>()5$|yuq#r(m!3WBmFNRr^+9vl=3>=C|@pm3-ZaW-;WB?uC!eDestZT^5f zLPy~s@$wMUlhrPedDr?K0#Sh9L*`RE?GO;mM-q{LP{$lv(jy? zfZ}yTBJuYFI#7l};Cdyrj3VT*+}qzbSPsGmUzo4IEI2SIc)lV(0xBJ1G9hL`pddI; z5lB=##Hg$|2ZBo#5fQ+$XMj~h#pV8ULSlf$I>c1C1antI6DWnC+^Ua)m%I!8rX!Ld z#Hx}WdnD}v$wbRsYpp4F3ML8IN{E7}H$<|7+8{AYfmKIu*K$sPFkciX%_Br$t7!jx z`76^QY*RAdIU!)&Y$_#fp9U&r(-=Q>P`VN{hS0s>BTAo0n5hE?$!-%teKU9+vt8!8 zrm@nw3U{^`ZZ=EniI}$) zrdUY=iWPp5P`?}=a>0n)AbYE|loy8=s=-=9CZJLheqdWDsFZRG5o5E}vRWn4c%Uiy zuL?4SmWD&frj5RbrniHU3c|_*d=-aP`G7RMk>yaW!4oFvk;eXx{1SPA|wM6(2>ndFrRH!5rkc1sWZVG`& zCzzITA?Q9)Yx!5~Eth9D>uC`vpUmP582x3S=|7TXpz1VxP56FkF_AHX-1-=3n zP~itk96=Zbk|^Stfs!r=sGUa4eT7KZH;{dpOAs$#)b1A^G9Mz&TYCXsu;&_ST_9+( z&zn{ZK|a*5aj!`hlHz$mTx;q+)K!1E-TF~T`(Qfg`^Ul z<~z?~Jg58V!a$lfI3jW1Lrzkcx$Jaqn)`GtC6G%XUw#(HPxG4YmlDbavu(veFo}l6 z9mb@?lOGPr>{<7RV613za45n3vYXWX*artTn5K@1eed0VVtszV1kbj+emGR!89~NQ zY=Et=J2$}n@1v2ineg{xe zKq3eOcL0Vhvn^vAfe~!kH4RBdeQ}Hp%bE)?>~9-jNXf>*{EdBM8~I|`Pn#c3IE#p# zwK>DAdqbq6;mJaRKd}pTZ-~ViCKU{ihYU_GAHHe4+PsmtHGW~YZo?BSVIf^~4VEhF zKiY2Hwp&5NwnG&0k)QQ&eFU&x=FPk0k+FN#Y!VIGyAcP40uLgPi;M{c9CU-S4SK*Q zMu@MBNTmQLF^Ewk(oeWO+_87c>@_qtyfc0xpm!73NqDk?d-r40Fh2{6ZLw_Lh=o{K z?pDw4jZjL0G8JyTM}Q9TbYUy+Dx#DH!>o^GMSa^hL<}CGWO%zVCW4L;Wf)#V;S-mVTk-sb; zC|IuW2*fSBSHS?1^&4Oq?Hb9B0wYiG-5&Trnq|=%47HIERZ}BzFr5?s0wYr_)JA7J za{}3(Fkql@+(LXmh$j9KzSpDKHTwE!a`)(`qus-W#^WkL>TU!L=v=bZDL=RC)|6v{+! ze1p@S!Az_?I{9r*9%8z&!E15Tfk#7fzQi1h8zpQm*id_FR35ad`DS`*PyIei_*2nE z-%_F0eBEdLxRwh+2>)6Zs5M`jjoM&J`k`g3^Qv1qP-5BNZ~*Mry@S2sSE5P@BQvHFeY&h8A7sG-j7-+f3!P9_-7uJ#vuxr zWGDC;9*Z83;Je(%M2qn11XBD~U1)lMs!9i%{Jq(ny3QNg!Vk^HByTwYwqITAHU6E+ zs{VkKaSd$yoJD(aS*)qw0JQqT)@#YXyie!1zaIc5=wLrn#t}$js3a&PFya6U{ zi15o5en;vAQ_vzaWdhNz@k1XG%Sa6u{ddvH8DvJQ$^Ebj{Hm2E=$ zctdbiWLV;f-0)>BR$*Qk-mOtQ2!WA%v~yBDA*x=(qJHT#xA5uuWB_pomz z`jSxjFeJ)5+`{6V?!hf$e?!Sc@vu{{<(}G~D|&Hi;g{Bn!bK~n;8HsxX_IR(lz1Q4)ryIfg2E%{`p(c+w`JoEXQ!3Nk zug=?9@BOyk@*>8lFS*|TqWPxfIZ|MkH_D_D#^qXW3f~0l6yoaucUdlES;gu%@s?b4 ztFUi{IA%jzR1<`n;a%oXUglA$U6v#)TL~L@+hkP?s8eSX8Z*o7TX06jjB@F5-dP5k zD25VIXapA2c{h8!$@OX8>+WV8l3VLQCk^*8ZzsJyI8Mpkz;S;6mi{Tio+7?@i8LIE z+;Cxna=JL0n`oHp^6R|r768k8&YjkbCa7+auqP)|U5B8Be=w(3-Qpj-;5seRfwBfP z?@MZk=xh=qmrE3Q}W=cK9iea4RZBDHx(nH!*8q z0ute_PNOC$rxRx4I7pgA#3ryO#5NqmEYUMbw5JQRR!|2)Vdu=-w5q8FCXtodb17DR#eKYs0-`oVLeq6(_n(JoI^=ysdcptEY0=QED|MR)Yb_A`yaKbfDM1xb zVC)|?--IYY8GJ~51cytfbyA^o_U#mxi` z_=q6F41|V4$b)~2O2jPGj8wvy8K-7Xz#_{pqyGeM`VaERmHN0dXhA^a{CYS5m88npc#JFOkNFnuM^uhyK^`U^>f z<^Z6E9Btv|P*wkqgO1jNsRK>lVl`mxICwNAUL*B*kR7E6w7MYn%$M6@ITKvnD7~}$xF(m#)(CH*2VFo}X9t`5}lrG4C z*%2nP9U_4JoCnupFg6TBJglgm)sX1H$t8SzAGJu`f>TVOwD8mzLr5@)PxKff1Sy&j zzg&o0VNt6ze7umT^T|hn(7Si+C+e7&DQd(E#}c^yf06E*OL@1OhCD-i-}XdMBpj z``tab3c0Ts>IiUiP;2K`6X_Jbhv>^BRnz>UhLKO8Gx(7W!V5*Dj~YC!gF!%3-@MZe zx}t{mB*P0W!u9AjOyQw1INb&%Al}(L)RXo(e7_c&S!q3P4)a}iW0l>n1=B(}k4dOv zB-2!fskxaPey9-?B?7`|9l^&*bwM}rFFS+PIO;@kUrNP=_^!2h-)TXi)Dx`-#85#tGqX)VJ58xUfR2+(fsr6tPv>676nMGz5 z1=HqPRK+$DumcZJ7#SrtrhiMWa5KH)Xp@R{UQIujl%$eH#pCLWRx}lZm0SmozNNht zwo+I}OT?C_fF+cZS^5N3P|x(FACJeRb_NQ+B@E>wZO{T9v>$62`L)iDCGE&c{!6lx zz{JR}EHdX6+pg`KE9w4@Z-^Tt5ZblR%ThIx&6FY18%w2G>uqfCUTsi?n4-NW8oXaO z@b5PmtRJ&7R+yItsRZcf)+LrDCM8+e#E}MQ;&v_OWTxESo*Sx%m2QsN>Hn+`SFVwf3QIqr;e;3x>8 zRkxT*{j%eyM9~BV7s8*ggVZ?xR0MVBVq{KjiJ@4Nxd%CN-5y2K=lEYTuQtShD7uyHQxg+Xo%wcpj6$B~!{k>^c}Wh9NvQ80Xv z*IdlEPUrghuDNUZm!@&iL?*FIziqZODMcolZ7s&1kqD)TyUSjbfuVqyWjun1^2P5`_B8FbztH-E1O>qg<7 z0(4u#8Ie~}519D=;Z8SCPdBeL4K!Q|&Mo}bS>gh|8F$q>uDdR@UI+1lB+jRs-lWR=nqX3D@-QHpn;7>}Z5i(#xq zZAwBjAPFPQ{1hprCsJ-O12u*R#uh3Fc`1#BO;KRypO%>9TL#^t(aS<_;(r%N2j1QroLiiD5HOSs&52B!}!-5(y`FQ zWH|CG{(8W58vRfIcj2U=d5Wv@_$O0b#m7fXb=e^2HNp*?NC#A{R1Z$p*_>X6NuMm8 z_52VILd7NB}k3S@&wu2GIslL3~aT&U9v;Ma$`i6fQFAN7RP2g7N#oJpOLCdQur%VH89^xl_e?4(os(EF8k4n zHuHsA^M~F~+|8EXnr>jH3Qp!waMsKTA|o!6IAgz6>C6$zG;=6IOlpkFlL~8@H`~oC z3q{7I;7kNJ7Ax5_^LHvOtng5B-%Hl7$%+-nHRP0bN;{*@JI~|&+U@<$ZP8-!Mx`9r z&JYYU5GG8W!LeTw7{Lu$grT=>Hhg_&Tm1K&8uqw|c-Z6Q%nv#*Nlrs|sH|8>DiLZ*%#lLN9O039rzR8&zg-|~T_imAh;JS+ zCMaV}u|r zZk?+9_n2j-5Rt7`i}>Ul!i5Vz&KE)PwcGjpbpI4iCFCuD4WWE=cRf*Us!h1?*(^$> zHpe;vp?{VLvuE?=<*HD$8pHTIHzi8xZ7VI(a*s3#Z_g({O*hAala=mW>Ny@=?Ap&O zXJ7;qn+d6EQ3ZZ%Fy)8C9!K`ZH!!G)AE08Jv9GEJZ;aE4+*%BNF=;bDLi%rPBntE| zA_CZI)zcP#7jy?am!eYTfsq7m5%@hOV6WP2P6yMY)@%@=@Hbk8r_V$+Oe#K`{)30* z=Cw1Nqh`8RnDxB%PCt=5eCl^I_|4=m#iN$ZJ#~Brn9GxH^F7KsPDVZ%)5%yuMge6OdQ^wZKeFpmd;_FrPQfu;QpdlORycg=49scKZsdo&P>z* z)iI>8k%WM(yM_POT}rKedY12NEZK(7s)q!xUk=Mfe#oq5<9MVnDUB2Hk0O{u_;K)^ z4kup-%Y3rTpM^AAPmqH8W4H*`ylmFvv)0WjpXHckTuiN9O2%?BR*~@pj1x$KWdZ-2 zS#%{n+uITIbS&YoQV2!J!j(mL+S}3b6puOQ}=Jx;KU=G49}fdXCt0UVHtpljwpm2kaT80 zY+Ogpc!rEuV4w`@uD4)C3Ao0ezLnoFJE*QdSdcCn&j(e^-aOmbOvx_7sKewSuGTn( zNJ2_!35bar%P!wTXW!#ANxqq9-#c|=4nO^@tHSaK7wuYM$>nsext3v^##LnLkKLcv zYV##}iXB!uIa~kk2S?@r+g+oMrrdbvW6^#z#rIC?gbmeJ(SJ{B#L<-geEl3$3uD~* z7DeBRg@oFC9i)r@>l{0uDG}?F6?U$@ZraMLt|2E5_*} z@6tnwj@U6pI=Rqy9`@yqB}!hg_=q`1 zJpG|lpfp!M`aSg)$KIENPMIf`DRW^%j0xfbQ7!&-OLB2-u$K1_8Kh-!cP+2CNVVjv zdkaC76JX!7PhoADbb=Fc0#29ujJV9;Yq8( zs9c5LVVd6i)F;`?rrf512q_rNXH4pE2&f2m6FWh|{2mEr(%Zil5j)VToDSeYV z4(2+BbsWguR+<`7fiOM7R7qp}ms3^P)mqwzB~_f14NGB%QwIs+DkQyGHsRoJ0(GFQ zL?+u?I5`d}q}{9UZysXsK#=Rh791*K&N|(KL&Y(*O@oW#UBwuZ9F_zDlgyRM?j;q$+B6X$n@ziJ4^cSu5b?ebvHbbf z!=?#XE*X%@l@S?bt#Bno9^q0gY$Q-B(Nkf?gy7FHbN)xneO1x^2h6c5vwyN#Utx7& zL}RGdntex8zPE~4Tvke@TPu#3CyV?2<8$YavHHGf!P(>nwPjNvk&;R#uRN-0inc!G!_J3^G5|(*P)YIyGy)DGwaKpELl= z!bnpJxUDGDO%3RW2E>UCh!PtR-qQe(!JpTjR=QH{V?AQ+@$c)?xxN^WSbzM((QH(2 z6Jm(ae0>^5@3E{X)z^KR>YO=||J{6$Ny9}qyF@w#He7JC3p@m}T22waKhjh3sOwe! z4-`u}n-$mESmOp=SgwND3N3Y|$jxXaGPe{4uEH9I3anc^7Y>1_AEfHo4_aL7n&SQ8 zO;XyDM@KSABem`P4a!|GuW73rW?4`w1vVQU$cC``TQ^}C2}Jrj-B3OS)GPIun&q`v zAr4r8l%Tfz5f@W&@7)*i;*0Rag5bRzqRCigSk_^Yfvk`rayF}^+$4nY|2E~if1UZ; zQq$Xn-$OixZD+8r0)G2j4970|K6BF)IUHwORH^&jAQs)UW_U9nCoU4bpqF!f=ji?q z*MU76n7q_cBI_5F$D+l72$7?X1BsY3N{?`gGz_z2 zZMbRWThJ`30E_eFCKchnHm-e%1vG)11#LXEqM;jErmtvC*Blca9UTjOFXPW0fY85&^N%%9vQCF;>YyX@-W;XriOlh^35CL>r-N2G3gI z9ecGhR<4XyM#svOaWTrc*yuP#bet@jWujTRl9ef0laf^{S!FaE7Y#v6d2F;?uEgVC za&@#^sg!G!is)#CFi;b4yIx!nAw(Nt-i9w?Mb8G@sganaBQs4+3o@yeKZr7>O^8?TIukB*Oz4q#J{wHW(l z5NYR=SSM@p#QQazN_$y-Dr8Z--_RtiFE?xba=82&7_N24Ll&X8xq(E=B2!~URc&KZ zb)u>^4bdDMV$fpUS`Y3S$i>eiAyABj$kuvcz#`xI7As+p!slrrf_5~8ZI)IJ)T0!l zk^~=U&v3YzKTlQm^~VE04+=Jj3V2$4!{A5|Y!+R$4R|6Rw6({|PVlaEN*9-hsq$E| zcs>AJl91-0wd25%T+i{?_;~;j~fwoeSgo7ef_+=N7-C${YMa?4o zAEn+9GqMD_b2zBHtm%bP#qg z0iS_dwupLJrGb!M#>ykLhw{sz&Bv0Z(;AmB3 zGk0?#`XhnFh(Lxv-+xk*L$HAbBVxxA=dDHEOo&^HsMi0H2_aT2)(JQtdiZBd2qe0l z34vp%AQJ+xoNkV3=T~}0v>o5K7(9rrONf|yl>$n_w%~Ra1h!OlAhF;+@DMhaSO?HS zVKzt{1Ch4=9S!bf9e`@1{zsSI&N}G!6FFt4zE~1u9fYY?JP7VtvA(4}>y4H~ z-_4d%%xHJ+S%Daj%%eT4+0(se#nB~;+%Q_M3E2;W0dZAiKz!28fRHNtB__R}G9aj6 zFd+UT0!Uz^`sbR9N#sUcz7+8)A;^G0hhg;h0Iin+ak>SO{yPH#7`bs7ziBabio}CJ z-VzT2S@QP9$B!;;r*d!OL97A~g8J~(FPBO@2tpTrA4P>fA$IAhcbDG5fB?b`rZOZ3 z1jy1U_fpKWAO$8pre2YG@B7G&mFguohVf6P?4OQm=b%)PZk&oLBteGmRXpvM=JEe_ zC+BjJU~}PY@t|s(8PZ)Vh+6WUEs3je@{Q}ekx^LWUv6o~<>odqqB&Yj%MJB?ho0_g zNvumMHSrLL0{b+$bHGY487o6NuDQ|z@wYEqObq{?$AHOPyjcKK%!-TVf7hE#I^4&! z-stIxRuKt}RdtYtvskbt2MgKoV~b@jS?@Sw=j$m6?(w39(scyfb?!c$mpt#dQLQ~I ziN4%+ZhzY`y(HDZMb~+UyZQ60RpAmt5@Ncz8V=#y6e@ql3Q=(go#}$NEM7ZDFu3+4 ziQ9UC?>(|_K7q}lm3C2yo-*&X7Kq^C+|i(|;N*tqEAX7^zeif+lqKWD8N5o}|By}| zn~KL~Et*ZmNgdl0(^|LV#n*2-wx3ksj9#;Oo|5~-psx|Uv0yYaIA>%sdB$Pb_HxHj ztL_0I&jcUF(k&ef=`h|gU1Xf|wfGO2HvX*iAG#4)u#1FymOB?Nr#Z1NaYQql_+-x* z>=}X_65@@h*j3HMsz=xlE&m~m5}PQozKI{yo%r^I@c+I$VYk1I5q`TIN^2Ehqn{uK zQSEx{+;NSBjTf+Lyxw9MB(Ot;jkXk4p*?0jA?{Dti&E6b+Iy#A%%<_J2Ot1*@XqfVNFFFo)Yg;e%6X&b&yNGG-5?kk}EZw`>q-5 zP1hJ#pYC79=3y1jCXPA(Ma8G`i?o^iVi?{^9@&w(HMKAAC^2~UvnB=-9D_~#!4gBt z0X79L=U|h;QNklkt`N4E34x3Ba*;1L#$;HS(MaZ4DsOqj5W z6ce|$i2`H4bBdDb7#vqxa41{sasC^W9{(Zbg~%jVS8Y~;7tf90k9#bO64^g5S`Upp zAGcVxBwDs6T6QH`_9j|t5=Yu`#NK5&ipomjSEOXZq>}7)s0CzZf`y5KctT+&9iA1e zqCF7~q$1)h2V4J61C`qULhIjg&`1I+T2V^zWhbj8X%QSf6T9CHS)Be^{2QfW^EmOdx9a%oI+_w4;>u>iX`$Ov~hj-Q=TmR4XU$1AFCpT1WcyR72&d_M#4442Bb~93Vrku~AaOd1|V~iEI z%?852`mN{Qnu#_z*v@d!Wm3yMnhd2U3&+5i7w?y;hMQyjylSyIqFv0pP0T#sq(t^d zJ%e4Jp6i2QtZIY+c|0V@IgRRdNr2oxn+tKBtc&D7UyY;jf3614I@_!+6ZX@6I@Ad! zeCkD^2&&m=s#yWmETarUMIi5BoJd0OqRjjfa3T|vO5W?I=ZbP{ zgyCK&x%rDvPz_twTR8ZNQTR{D3loD_P7BJ3^Pq@$GHBKPAIgb9IdLe*cx6^3w7Y$tO1E@5yOypWiPi?3_}Ht zn+SaILQluy5+g1op4a*{sj~BCVru6qEa68#PQ*j^k*R93r?A#ln7dN2@|L1ATx#qTM3%kL#EQPRb9kGHwXkot>889KlCUUp1 z*WB^`$8c1zsOyBtUOI>4+B3py<>VWF%)-igu7IMN?zk1ac`Z>#apG?q!CMHajL%sI zYWVE6hyfgsSh#1N*x8^W#kkxU-5;1}!Qy6c9rT`4YrCA9)*?m8THdKOj}(AD^O7 za;!oG^5XV$5@;nTiva%#lvz#*CG`{6{cnLRZq^5^lQ!#E7XZL#0O4~0F-F|@6gh?( zN^1bH9$wc2tTS!H5$KU1MmA?rx$#c~xXtTs2VDF`idC@=uzL@%YbMyev`%Lyh5GN9 zZ<>5i#REkl5TbO{)IhPfeRI{*RXg`W%l7W7s?B6>+UD49cWm0UuiCNcpuOrj$L1<~ z+`_&K`Gw|%!xm;QWZ4Labj8|hVze>OHn{er<4b?q(w2*1O2xw zv7Gr2S-M+HQ9W6TQIKU(c^Al$c!8&rmzDV!;w1xhnSUtws$pe>*=GQLV>=l)sUyUe zvuk=`wbH{X1=sX?TsM}kBojln!ava*=f4jk%z6Th+%HQd+D%8xk+NostkiUaNGSoY z`yR8%@QU{*sNx}rH4%}IdR(7^AU5;Gm8viz&4?jJRvk8LD5cP%s&ieA?}O_f3fFbj z!g&8I(Na%9EJLf}z3BqqB(@?fZ=iQ5ynhofUvG}`@8&h@aoiHc zhp#s){j>PU_02|o9$Gwrj8rlT$(TvTQW!t){}uJ9s_UDdG&ZuC9~`XwmP%C!HR8VY zSj3(mfr$P%k4Z-pU?v8(IKhnq)}UeRDiXxNDt^9)ear(|@2cSXy8JYs5CCPJ{=x=K zuP?8s?kPic{Dn=@j8;_6vx`*GRL<|8QYq>GZTH;2!Cfhd(JqI#>o6`l-4=SiSswn<*-3KQiles*UI@)y4(*eH|`)Hzh0rz5~yA)caAIXuGbTW z)gI)662U=V?m;H;wcOmFR0tbc++7pp*TTfgw{fxUV5PTr3$wMElS3*{^+sxlIxWog zz(#S&@(s-l9Gip> z2&!pOVG%6{syqKyP8bibJECC5z>O0qs;9>??tbn<;4TF2Lg4=r0wh-s#@)RGd?Vdp zs6fDWB;9#P1A%S*i%LUR_cF^=N^mylQUb)^6Vo8vk9!TO#E}mQhOE?tIuiCrx@33j zU%X=k?^vM|c?ch-L%iPkIM{)iO7lOI=6YwpOi5(E%j!#ZcTsr`Dh8Ce3ln!2X>dHA zt&*AV7jD|9Fm0kGLX^9gllVPK5e4s6GVTG)Ftz5f>E?`dvsJ}*Vi7=^CaKs?RHGBM zIl*6Yf)BukR|;#!A8S6rmo|`7Ejmqt@L9HsF`Y!w!befKH*0#uQUF2v#KbeaxjE{`LCR;oUVI71!a$)88?PRzl%=8ud+#e zIJ&{`Ytiy&r{Pu6Qr2Lo6D@tus(vv>r%}4@NmW7zqv={1T0-T!!FJIRC*l()z=Wp7 zs%dGXPEi)8d(CcCn*i5!uHEoeAdcjaZ{J|9@6Nxq|+ zYnyc;XoThQ(ztKfaPDUF-m0pd_FemT;*p-6HF#KOuYI$l#!p(ahb@oUJua~AfAZOJ$QTH1=nfIgRKK3R7Z4hd%D2Ex|&XHCMB=nNJAe53tdtR zfiC=a4XTy&|1A-P^oz*e=u|Dnf1E`ea#|ko{>f=s=KZe0vcjuA!B2&#_;~7TzQK@3 z7E<|h#z{UEk1~ zS74<}FSuaI|Jf;2MIi*2*l^jk6Dntu#z)2T0~#brbW2HTR21%BvNFO4%foO*o#VF$ zD!SqmE4uo`mm0PQ_zAe}CL^>hYUtQ;UfZ$#Qzk_=@_JJ8u#w+(w(jU`-QJeOK85>o zt=|cmed=I7klOL*%X0JgP^B6q7q~ccXe4li2W)p)N?QjsZ>_1Uyj*hm^20^@VXM4+ z`SP1D+o#%>Jo=dQg&O6cb*cTtxm8fM@dHE~eK{eyak)eA9;hvMPVTZ?NA9lNmvWEf z{ykU7{Uo&O8(;f_4!+2qwn+izt8`B z&@SY+=6B{R3!)1K6pSp$FPKvx#d*A-qF{T$^P=nZf_Dm<3oaF0EeMG2hzb2C44IHV zVd8|j6IM>xG@*LJD-(`Ra8LMX!j%cW389633-2$?C`74+iwnyOpDFwm?CrL?!oL>^ zg{`oES16kpJ&~U{Y~uKd6fzm+{E4e!Zk|{@@zBJ#CN{x-Y2ud?uTPX08Hy5$9xTc# zvK1j#(HfZ2cT3UpMTd+2TGUi@si>pKUlalV1TpM>TZV0lZN6=FFlM`LqiwhCSGM2V z{%$*C+g!a34{oXCGqpx0bFh6kM%2z4yIS6=GR`9Ru5EjF?X29rZKs{pG%?1v;PCvxk zHJhp(8|_N@ah35Y_+f}|w#(&-tnpL0HtoVl-&bQ-sZp!Uaf9vKw{3cM+s-X^dFUaf zu@)XxTejF)MH*ua8;``>_ie^&T(Z!8GGht3w>mcO+HY5cZjc*~!F_uh6#E%tLQYSe zw7?_z$@E?#A0?dr_mWLX5+5(Z*`W&b_;LRoB=xvTq}eHSpSA zg-5KiiSF7n!nJj5)N^7(4x=TfXK8>_1D4jEFut1yl$7;Jxz9x0Q{Wpd+-aP8i= zdp9~#@d|5HP8cjcg;u$Dr{mcwdtYsAr14?+ZLGrMY4XrKxv>eZpLF%0LI85t?y7@` z5i2)71Ly9&+feV%6vltTA-gsLeAwQxpK2$W={%o+@6`_R+<6H39y>BNTaswhL)YBElI2)nL#%hN>RJC7e+z986 zeS5c7@7lEkZG2W{{0DqC?*rpVrasIXv+cmWgS&U`+6!39%2By}8%mR_|E4ykPeD$*&^?R>Y4*dle;aO{ zZrq0fsZhVDHu}1~f{iF(jm1+3+qZ!SwuwqdZ4Se|x!SP>d8*~;v#@FCrTyD>N&`}% zo-H>%LSBx|yQw4@qhpQ7;jwiekV?WKg}O>^95@~0dOIG}!=OW>Hj}fus_GY2cBQ&O zVQh!H2MkL2Hege6a8x|Kt9plo%CEv}FUB=q55yCK(h$(i02*w24i5v016~|pkHhcj zT?bH^ON{Y!&>>eJWsQR$B8cn*i;q=oVvIX_oHByE7tUZ?m7%$eF=J+rJDgp@8V|wU zI}TWlk1_i0@KVS@5vI@TNyRGOVvK+9b<0Bs$&B%{yXzoh6s)nl$0?%JM{oi|s=;?; z6(E44=JdG5VYLfxqJF#3A*`m1F@ABIhg^;fi{=89&+Xd2uZ9qTWk7NM0xt>pGOB@T z9#On4TWfX_s>{@UWyUAqwQ=7@Jc?NPjEHy+nNfh>ZNo^!@%u}t_!=Za-FCtu4QG`a zWUmv>p7Fsls9WK~y_g}F1O9)!%|ju7RbkZ42dWUc2UddOGJyJ8coBg{<;4y>1$U6b zg4##}Z^!~dj%~ZQSBdk2GIWO8_$>Tx8x!IHyaGRQ1jrO0%ZvpJyK~yHt7a?cf{8WO z!mnr4C}}>>Jc4l|;T-7yBXD)sMgeqcgnQ$@8a!qBH0ZfpjZr>m(H(G7%14G8E8r&% zDy8~)mGN`9dMJZZzC~r6uvmhlQVzoTdpJPrt7u zRv}*{H`c=$1TYa8dFTg>vCm^@HoebzkY4MQsM$LBZNxkld<#=9|5R@L2!51ENmEJs zGGqk$EDHrS{8iAQ2pym>-h@N!DUrezFAusDp^N0kci`G_kRAsWXEC`ND}(+ks8=v$ z%V<8`*zHoOf2}e86RzF~O$6ZBm8bfp@8D&X1!*K^yd zYxZG8%ha6Q*a45HckSJ~ZM$6=3Q^R;C(wS0-m?sdQXSmexBbF_^^S~rk1@us0j^^S zRI{&|rdn~8v=)BSfR?Ke`HA^Q^7nnc{!6heV7C6h$$)0 z!JL}*qR1Y%KMnCuf z)I&oN;do}$!^!)1Z)BKqr4HGqETtn(trm%r0gU z-k(-0H7fGO?WmkwD>kFvxdLAN@y-(rsgq0*WQ7O3;gLTH8gsfj>bg1(gZ(k>Y-?TX z;d40R3Ya6Yb(%M+=PBoyN$0-oY(3oBTGxqac$`=!SE@B3+EA57rcmnwj3zu(uhhd4 zfgrs~k3e1Ev*W zjlF-f&JH&z+gZX|DxIw(h5eJDLy>>)QHUV0dO0M|zc=!yml^7}vYCwJBF%~#QF{UD zA0T-vKIMYzx~~tev3?FVKu2pHv??NVYIBbS7>?K^)hz%=|1-`P@3(kb^HqKMWyQn* zhvtkgPY1PSY`xg4IRmQKM2#9ao2wJv<*1;yn=Nm)W?Jm6M=V=fC$t_W4#q1^JVT?! zXF&)|}z7?t`S$;39n{Ign21W5i5g5>HF`dMM z+VO&Lc&g=)r2cVxYbJl%sZtBsGlVUZEIYx!(M5M0hWyvza0p9T-b6+y8&LhcHLuS5 zl7}tfPShEOP7w}_@xA2vhK1M33SQ=f+Q$i{v=hY!``G%E3Y-5>irTV+_(Akgir6U; zaZ>d~9hA)#Oa)hwSy5v79m)`zrt!-fy4zX1m?{G~8lV?7Q*2Yv36(P&Cm}8yM)D=j z!s&uxD$Y!v^-v8hQ}Gg&rLT7rZdeK4IZ(|tO&Bs2nF%jV<;8}pRKf|whltKgQ^B`5 zF;$p7RrCX(gn`qX&3Hr|>^GEprkrb9EZL^KpxBLqDS*Nace}rzTYne{TS?fXm^;eQ-qYa3Zdb z;#%gF5{C+0i8$$NDH&#&gKLEVA!YHZvpb6xCvfa1SwvG7INs`T3a{$go^1W#sa9zJ zX!Yo{7%skNabZqVo^Dok96k@BX&{44#FZG%D_ohX(7RS5cNC<+2ZqesO+)QDd*O{b_kF*j*?Qc+TFQhQn#u&=WXTE_m}Ts2Lj z*)h$e**8sNdSRN$l&T-CAEO_uADxn#GB#yQ${71td#Zi3ee9|+t46O%T?Kv>SV7)? zEvisR1zt_>co*sn-z9!f3-N4LxSj~LcbR6F6nowych|$$dT&+nWFN{jwOcrPLB%?eF*KQ(V@Y&sA)}Vz_4WQt$ z6g;gvg`Hf>x+6c{?Y)#@I$(%8K5=1&#>+n>8TybF&AkyR zh5tOPKZRjXA>Y4J3RZ#4AV5#PO7i_1`7#>#iX~VEP!WT~e8pH&3bAHTkq|?Z8e@ zu;O0)+>n?Q4OMo{2#94)z<*x(NzFXM-NX%v7Dplizk%bV26;i)?Gr?Nfz6abkiNso zHZiy%C931aZEkUVm1Ex1;!<5~2Z*yN`W!?PH+t$&8L=8?It~Mi4xhsn%o~wsF2-=4 zW`1;o4$`#fM$3a>pqD|skN?F?2>r2)3LIHXRS!L6VD___Y_DrukLwpD2FAhGBc}6v zqbdxY4b@4hIT(r5>AJVjYU1TS3@P4+Ji?bVgvm27k@1-U*J0PEx=aLP}X7{~;j970DiW>qMCQqSOzHc0=O7jzDC*Z)fAaH?nE z5Y^5wepx`q%49OK`U8H}FZ09to$7{4qY6{OdgIouTZ&tnTVz$-QYaJ}1*|fBk^V-< z&2N3*-MVhKSmw{KuRneIQxLdl07vb%L_5k5~oxnjklMc1#(z6No&D_IHMOLqtjuIuwF*uZgXh2T=3rl@9}~ym-4n*a)Z^QVZwJ0(nKAf|W%}UP zj~N1=GA0$@qxfIOtYYqC`ZGr4VPx)SEJ*DUzlX%sN5$g)M+1+~-SNR9ONM7Fz_jm4 zMoTi4HauJ#*^kZOGGvtnl~V)13w#*361Wj4t6Wu?lA%wCNzi7D$VkqpFS(d@E#kG} zNp*+*dF*{{U|Qv4m7^*x8EF}*87cTavf+)cb4#^d`~K|^AJ3zQ^P&TqKujPxFirfu zf&aZfs)eII_13sRZD4lbuixePp6#ME4ALkOKPK>Or2#Hh^poMg4E~h<%|NmEzYhQ3 z56lyP-4FD!c%{w}xFx@0oc89g=TVxN+seGX{Ng}e;3+_;G6*GB9^OCksf~UnphcR& z!E&w!<_6vi%=N$FFAlsLc-;TlkCXhr#_zSBwww!m6ZmJ~-+}J~KOiT($cNwgz+qry z@5hw3ECfaL32t$gFpiv~q{+_9OZZ{f*adO!vPYm@3xa z7x*z)&p_aBfyI^KA;F};sZ8KhN{9JM$CV=;hg$6(&z@Ef$8~2Nkr0s*9}^aeTX=W& zK1E;)E%4thab?y5>^SvJZH3I#&7Wu3Vc*S2k{$B{V#NWBV?!W>3 zx=WYit;3Ln#LAefpS{!>@ma!|`+q%8d0W3_iT$oc|5Lxn0QY3{`VLw8_W^&Y z|MezK>hSx97d|;&bA1!&5EFPE@!tznpie3huL8g6NJBV8=_{$7_|3ylhI@-L1>TdC zK{jq{)z-Y0{Hxyv+EDXz;*X$G*Mn`{_(niv7`>h|FUfm!{rSUhPM!AVwo<}kE?^HF z3ijTcfjI%6-|zSOuluj~zr#a}(&xKdBbs` zLaWVR`K!IY-)06fE0KtnNer_0>jTWRHUMK_D{Wa^u{VNJ^F<{j`}OycYSYV`+xW2v>y*s{@?n14Gm)0 z{|AO#9jXlr$0$(!Uu6y&g7;X#0#+&drOnICNJ+p}K0+f0TLJTUX5SQbSVU-o$==~8 z>EgWlj6H!HU({xnh{OlfN3PIl)c*k{`josprmCun@<#6LB=&W78vAedM-cTZruq^f zucM^CEVC^0^{nE}zgK=2q1PNcws}*ZzH>`{*!-h^Q^0)T!@*@+-y3%^t+n-kZjsc2 z0RzHj&zPa#^M^kr-ZS2sX+t9-@@!R&o0A+Mrw)cI+q1`G=N_0ne|^<;O@P^ctK!C% zZEA%!JTf*s{J)gI%2XN?SK@G})%pY`BNNzqBoKm`Oyv)|)&E9D$JL7$6m7E1jf_La zD4FbfC6~xC`kDH_d(sm745%#peofM^tE)=@ub+QPRynrm^^Bh5Qc^UUJ$nuv!YBdu zF-&G=$tw8hOSnDyOwB<}M+#SxVtR7WHp83;wua~m6jh2U*_cgZvWIPw`Nq65{>F`; z=N|Ow>0gBcJR8lJviBX8B^exsx;{dqR;ZMC8dx1+N=1)UR3_+oj>&v1Yudw>LoeL|HUX;y^d?jpZ*b&8BPbzju zkaTQ1{%-b$?A6ydos!+!ps4yE`uBfX^8dSN;zC0vwX>Hh^w&qFj2kE0^r2&kqjFq& zI<6~@o@X!JFl0!~2#opv=>wX>03U%ndV^lejo^Ise)dOs*^WKvuLW82H%+hlD(r~i zVt>7!WfKyX2G&&Gcks$LPE6K0`2d@rbah4 zPkKD%!T3JfQ0;_`7_EdYF!3pAO&RuwKRn!)^w~Y1k87|sZT-cj7l&D%X;I(-XGk~Q zzT)mK4pbp;26t%VMunP*&|?jqjTw>+$njPA!+#umz3Z5X(}ND+OP>fvZ|4pUYF&SD z&($Bki1}v!KfD>Yl$fXM1MgRU|I&tU`if6AQ&dx5Zhlo21F9MpcKrB&&&^k`mh4CY zRDj1-OPBufkH_U6=1X?nrqNl^`q7L!RG|QY-NcTYgmF8y{*8^%*qnJ3R}>}HFD$t6 zuQaZ|N%>zPMJ4|H(=%Qi^_e|(j4?+^<{rzK-#QKL zi^0{Bn6ToFTmE%tujG&5#H|N}^EaG^EP*UsgP{=D-ZnWQth2l!m|Eo4N~s?gbx?}3 zU;J~Vo01aMHyDaU%asPhL&4M=Hmv!!sAyNswW251e2cy6-OpVJ+=akh2;7ChT?pKT zz+DL3g}_}1+=akh2;7ChT?pKTz+DL3g}_}1+=akh2;7ChT?pKT!2iD?5TboLQ{RNQT_I}bx$p>P zf4H1E5Uyt0RUx4Yd5AJxuYwZo5T!kQu*k8M zm&w<|37h!gcyl@Az~trSPd?G@htQ0SjIrewnD=pdRu&c>&MTB^bz+hxfp!|x29V|rt4Y4O>)3EB1m*)#9WUN|&+#e>;pso9&- zvv*`?@3&?jEX+2}Kq6xe8E!J<55Y($V>uZ|$@qv2`Air?$tWS?H8MUTLpuw`Xfjs9 zP$|^^%v_K?Cz~nF7JP{S>SNiae&Nt?~Q1XCx z%=u=1&>7bX*Wo7Le!TO?nbQ24`yf9N>N5Xjz| zlolQSS&R^4ZT5v6^DF8hnQT$C?r?JV#tkbRwsu(7xbFshH(=&CHs#=j3FD@Xv*R1k zpfZB{0YZn@tY*9M92u8jX!z&G^PH*3%BzjWn7&PY;_>T~nRWXo8_G&`Q*;LU=ybX{ zvrBc>Tv+hQT%emXUN=sctD7=IS3F~yPM2%X&!3@EQ@ASCicrItv08+W8}~q}?g2P6 z#%iY&TvF+co~uc;U#d{hW94RU%G9&gqv+7|I+I-h(panEGn?emSOC4S#QrNw48Yy|KM88LyJjOvZO)sB&NoA|s28$z(iE z#!fPRMaExX$Tji^2%_T0N5}$6_{j${SMXZGl~9B1ieaGq3fnJKqt=Cl20U43!gSFg z0Z;asa9tFTY}^@LSXiIH2jg4RsI!-j==)Hzm9N3%U&8#U7uW9$~*RNmy zzWw^+X_vnJSvX+?KM=Su8b!Ngk`;al38G&Dmk5Up@=b^C^dfOV7a0n6(|142!4X`P`~bMxWxYykD`llQPtZ&V%+GMn3&jP@{W#) zl|qfCxVX4@(GKWHehEQ83ri5AL`Wurt!UEZiA8`IIRHgNNW@Ed6Y{>aGPXP#3}0Mu zo#aadSB2|6a~7YQCwxBK!(X`oi3C3j{g~G+7rg5|mXEv}Jb0(aZ@EaWkKyvI_jo6| zEe4QA-v-edLlXZldHY>JF3ydQsthVqpnX95fTz^BR249QR2kygfT0f?P^#IN-*Jp5}QVlGLd!aGHnA4~-TkD59JNJ35#R%PsRwzSvD!bzch``s(yQsLaWbB7L&`g1;YM(>Y3C6!yoc}nIf6W?48i~sEe-LCQCm| zOnA%0Vg%Ixl221nuoqAH^ZA?k=*AEH`BE>2N;3@7oouGm>s;5lILn6a?z5DTje1Wh zk1z%-$EgdE!^TIulMlIo2YI0J`qgG1tcy>@4Qqb1;E95#3bq!|>_?qUUsfM=vAW=w z1^e-pWky{*RPaW@Z}FAGUI#rXZ{e$e{k?*w0w=y8hp7b;snhV|du;X|+w7pt_{%w* z-S|Ek=gGK9M*q1m29seUViB?OouM}b^qLG^ z-+(?OBMLs+yhgQgUZW=d#m0y}fs>4EV$zzD-j7-n9$q4%W-L6z)T(8nB_`nIkp3kl zxE8ncvBy@L;>GA@jWT3Wzrm}>8KDVRsP0j#O8O4$hlnL5>JozvPWq?_e@av(L8pxT z9#xsu5dG`o_z|T1intAeVJgqy3&D=6gF~))~8DOp$Mxh*`tVH)j_S zAv$jJJ$%;cn}62EFE0|Zhx-Gd82rc!cxZIXa7!)SYzufF6QIU&^vBI1ig;V7qMt27 z!P)eRfwm~PV-@$=bjk;8v8s_alWMdrM3ZI<(`48pG^1@%up2emHeHC-7K>kqw!o&< zPP9d6C)*6#Vq27Uwk=NE&!!7qVAF>#wMB*^PS{FYXxM67cvz{;5cZ@^8@|yN7QV%% z4}ZoM8NSOF6<%YD4S&IA41d{X(7k5UM_6q-{hKzu{;(}l{|B4a@Rlvq@K;-alLhpO zK&B#SWU}zdlm{F#@{l1Qz^MY{tAf=b3ve3zkz11qe<_w;ftZv6;bKBg8{o9?gF(6I zQ3i`JJxjq9heOVYpDE+0D2@urRB%eML^go(GnHZz3PDB)@udp2Ttpp!OkjTx*CPRG zpX?Z3sL0?q+eIC&UfD6<;5HV8VS|1%!3G+E0We&r2>&wk2D! z0mUmB$1JLiwzkf6?(^oYcGke`Jpfa`x0dWRe<6EK;0ZRK*&DHjjo0rDz+`G7*1}#x zG3&)Ro*GJ9zmHOR_GOG`e#+)D!YnpW$Rf7gw7e(0b474QW2v2)J~*IBv+Zni&yO5+P}sZtUJ&28wV+4a9C{213R=k)04}0$!7uD774Nvb(ff;6C zXqyg#fMCH;q!+2f3?NFgB1S-CL81^45fQLKEV0m(VoSU=8Z`o6^SmFP5AXYP@0tHzZLe~zvRAvVrQ<1}!!U~D$rHmc%EeR2!STXN zo(4?#ROrEXKt2WDMYaEhTL079k1E{%c0qN`A;w)3e0-s?@Yj=b;2;+x6IEuQPDbDo zcWVPZDTOb9DysvdAC94k)XYYr$LGg_c8LL%Poa#~lTIR94u1pbXglEXkrGV+@`^8~ z2<)UPehk!pf0;;PW@l_R)W-OmNs+&1{7D(8+3**Mq;?RN8H}+&8yw=Qy@ErAYJXnL zpu$Q)3XegxpAsV)rx1xaLz0AIC~Vj+g=!Z0A8)zu@NBhh4reEh1+c&k}dRY4Nj?b_5Qb_^094)@-qBgKpD@^_(#h>Eg>Xct6ice zx7IU218d^Du*6!VM;Wcpj|+)L0r`(Mv*zo4wDmWp+Sp0;haLMv!5WrLj_z>Am=ksR{X(#yD&&nDK1&sdr)!+%DV#%sRCF!NA<0~a9Iuey=pK{QR zC^~Nc=#t29KzBs^n5W^{(!3mpJ0)QH`%tGu+v7#~*5`H|HEY`b$&X49k`5o5S|!LW z_3B40AH1Z20}4w!%*vp?bEx|k?z{jJqpbuQMJLrBu^o7jV5`#rb4m#62Wo+=<}$CN}KgG zFjFF!2Ef9wVT(1$>^Oo`goWd<#eHO^Hyt_tjff0H4fXsvUd6-dMw4G5%vADzDH363NgUod088Paz)~Jqu43^n8lWdCG*)0kZOB z7~^mSAce?D+AL= zAq7RNyxX2#8 z2$w&E$b}YEtNUk>)umAz;^xE&<4Eh`hNco9opOllMdRdC$#6;nmQWy8#|;&TansFoq6CQfTn&dJsnLj(^ye8e1^!h3 z@SxDJiJ@i_g9Af!DU`|auJJ8#B>(u2@x3z?Uz_;<7~j5+@ukJ1_=@6DeD#U=a%1D- z(fQ$tNy#ZV^$_I}I%<*Fl~OgZ?}Rj9a0g%`h z6w+-AD*3hri*nn7O}%X)rroiS(C?VokZzjVkZ)2gNWFBLCDnjNGu5GEdN6~>qsb?y0(HIe?4~FnPb~9>UiJ_2_RRxV;H8`}b3kq<_~wCc$O-a8 zE=K@ncDcxs$RsaN*da4{u7w5Je1eZ3WE7YY?&K2k6a^U?H;DUCmV!HS!emQ-$W1bt z$k%{CFtb9TRv&=GHsDjX8VIOcIV9R`E{T4d#HZaN3Fx;t z#*~{}W9m&k5$P9-SQjP?sANw*ED_|pkk1;>6(_L6{EXW!)iBbQowE%8W&aWhh-W6aA^g%Oex*6G?uF(35F*OLR~4N|ZV! z!23A}b^#zyn75f!=51JpVX@GfCxeDxrN|i^{4(_uua+b(OeB>PUgaegCay|^6*TaL zI~iaC0P>1PgAL1KpLlgDu_cjolknt zZ2ChgnemWIWj-WPJ#{cBJdvJy5Um1=Cr1Qru#l%F8waZy`hjYu9(=pldTJ^;P0gh) zV}Vc>7BmWMJ}~dw+M-!4g1=rzhshBLkdDp=DQbK!%!GkEFySm?+Hx&ed>Y6_hl|f6 zUSZSWI5O~tNtm&jOdcC1(zr|kVaVjcQU%QYAsz5u({$jeL*wz$tKbC}5*eS&PVP@4 zjY&rRQ9-hZnmiaq^hcwH*My9ciNOFV`G$3}_J#p~AbF@uHh&7n@>&kE$vT3^!WVBD znL%X%HRvK!=sYbC^wfcIB9McQR^7&UsTtIviE4eA$OomqjF_f&G%<2Ckr_l7!n8e$ zPA1dIwD~gUQHDmTCVcb)I9+Bq(}cy>;mZ6+NDW~Q(PR-t$IM(R%aWOb&7wt%mhqSr z)0y!z!A80We3z10Xd(`F~VJeN;{Ps7f1BNsZH?)cYZrgdhV!If5Dl=Mg+dK$`>LgdhgN zOa$u?97oWDK=>tqH-az(ixE^HAc1f!sSN^O1aSaVngK>rP~~(5SISUOsZ0fl#SlTi z+2$6)7!}rSR0c8$#sf zqdQXy1-*dWXx)Pine0WN)*WcIHd-9^4~&NvxsU^`e;=KKV%Qz5a1D9(w>vOHo@o;# zg(!dl(xA8C|1sR*SU`ld{vj*E!AEymKeVrFt%lN}bvA^i5Wv4*|5&0MrYyx28i^Cr z=1-GMBQ2VSYRboDvbocUWwN{*!^>o6V1*18#%^nu$u7bQ8R+i(_se8eXpLp=G_*{n z%a9H&lTm1-D(KR-Fm)(Z0zGP#K+0(08qlk#2J{vZ#hW8R%VZo_dVpDG3Jood`Kg&Y zThszQv^@5enrncT%80QH(Q;@$hUCR_ zv(XY4d8Ub&STFmy9){M>(842HS_7iZ99mc-93vuvH@0&jLxzS>A0I%w!Rh;^M^7gm znEnav8mAMq`{p0CyN#%IZkgn&yr(HFoUE_2_J3WT}5bdaR(heOusTydv184`! zi_~hM-44D1ts2peSYqVJ3EENVxoREyFzpb{5bd_9`F~H?4q!(AO>xYFA;Q z&DLsVo`&RX#bT6xL~}$eVwqOEv}kNR0;mZT2ghh^KsItThQ{7d`!1O*gaC||fLEVh zKs&~)Ei=nzkao@d2krc@H!}#@<^O|rzaVP$4%6-~(%t{hv_m6Hkyj0(9{2;Rd$6K6 zs|9;EV{qp6wvC=b5KxL!XS&bypSfn{;5Rqm{5I-Yn99?zT3{+)BWS^{UJ#9%*})s_ z**C5OX7VxD?(^4S2g}Us?cXqj^lzxdq*@EiqJYUq58zc@TdqdWi)3al%9|;pii&4~ zPeb19?_-=q@!Spvn2#SCDI=s?|p39g#I=KoYt=7;Cs5LNZsp1rb$Pgu>aD8-vw)~9;B;>e3}_g+Y98H3&0x8yX++&Y zW#D_YNDO}oQH3a!MHC95BG!@7=W~(Fz|#P})(&2^HC0q+HXIas?SdCYMuD6g*8w`n3vFJ03nuWINGy^F#X^ae?r3ss$h&-^ zNO+NKZL#n)@X?FpY@%)d=%Pt!kg9ZsW=3U1V-X>aHq6s1A$z>5Z6qFJkj6Ubx)x@K(Cp?ro)HWFLcy! zUi+$f< zT4*bWGM%smQ<=655L)pbU%f5Q0{cI`gkAN``=)st;0o}Q*|KlkH$+1A@vo__!EK}=Q6&TjLQnepU%J-t6w z7XBdF*W{}&y?*1F(c&eHYS@^7C(M~OCuh!vIaPD2=j@wvY|hy^U30F_c`&Dc&WAag zIovO0U#|GF^vlg(?)p+a_uAavxxddf$gs|E%ov|BVNUp*pbTY3YDPxJ*BJ#Fl^Km0 z-)9`oIFWHa<4VT8jK>+zGhSu9%b;YkGliMPnUEAvU_)(mnMD@y`$Sbeg_Wrk%2XGLaZWPP1goV6zF+pKL_by+m}WmZ5ujdq!3 z6_0DkqMoJOqgtB!sH+mCKs8odB}vVgG|_bK%5R?LRvqGsDOxoKpRnk?qwavTt0z1 z1o8;v63EfT!Iq1aT$L#X)#3be>0{2@?>Kpufy0y$b_68;d#BT$DxK7j%) zG6;VN)FF_^_<%wu)Eq6634aLW5vW5TpFjbDEK-2+=2=2ALM}BDkWWQw9*saYG7+$m znlD5slK(7y#LTFY|iTfmjKGEos#m2=m?S))GoTtly2OEn*8XXocc1qXbk^ph4 zH8LY}6v&3jCmhgqh|)zMTZf8lV15EUL~K2Hj21>CjX)Afn8{txgKU7TK8+-gMtI97 zBZoRd8^Rrja8758Mmj2wa3P?G2s<)i$K~4+c5(`O2t_gQAoGa81Omc^$UtkwLdgQ5 ziXweKoJ*mJ$EM(H@)%^sp^0;*f(H3S71P9K(+zYH;tp&f7zOGf4-#0>fH;MYG)zNe zfphsNIGhGGKVuF~<0C5m4`lv?<`gnbx&}2ZBxcGSSSmosLCp0sCFwX5niQh$p$CmZXh`JC%!#wf6oeE)O`#$+jf9X+nBa70 zV-#6$3XxYl4)G>mfJorTLWv6&AtFwuAqp*FY12tX7Und6Kwt_$)TK+bdE!h^T*xNe zarp$PScGpl)s`p~|NrL0_?)`W6!=Vm&lLDffzK59Oo7i7_)LM%6!=Vm&lLDffzK59 zzexc$CwhX)N8v+d@O_?~5g4#s%+#Dcp|8&f#4Hk3Z9YLjXX{eJIJ(p@HkTB};gZ8( z?Jbt&|BD5zrMX}^Y^zm$^zeV;j<}f6uoa20rkkXPdp+ z4+ic1-!}Ao+Y`#C!uew0YJbnh4sRbm8D51axO(A*4$$h~*wC}_e4Z_N{~6HoY2X;P z(Zu;kbCN9JoLCy$caBe*59y%~m}dH%@nH>)1m1pNa9V-5`eoFP5+Ah0!JKFng&jvm zZ~|7xJZCQ^EZ})P(H>zmXx*ZDV*7S*^3|aujoz4Htv+ob9@4q+nzRCdMKG*m_mFgg zTgV&aX*aU93j>h=R3-(O?SbJQ=7+4wWGaR1%3|YJ$io|o-kc#bX)tR`keW;p2)F{6 zW9FFq+4@@fl1}+T~5kNpC^GM5Jf%R*c1%nM=6b20rfuXZ#3^s$pVNkgYI*-B7A@liU zIGm9oBy&V`Yc}lIA&=zzbYL`_fp^mJGh`lFO%}dALniZdEa9S9 zQTeDa6PGTRMrUxjLg16vs>ECl2MAW}H_0#7kCf#H1S_{p^_%H8$4`0OYiASdI~;L-XZ)rvyq8p4Hu%Qb-u0T;3A+d$wP zE(CueU~)j0AE_Y#g5TdawgYzfVl03AdRvo6U2w!>ke3mZs?Of*dfR6pctTh25jK`s z6Y|1!+dVwJNW`g;*zf+3L;L%zFTk3f-G#xi9iDx*u!z`ac>!vQ6=6W8kT5E#W94|q z06q^+)k5by!uI-60mN~T9Vf=0k8HsvUjT_2`lMuo+@9MS58E(}r>!L_B8$!DV3Gg` zqvNqZnfw-&5+x=_2B@sOX-94{&4Mu6M>hk=jWfm>b_0u6;AWPY1@K*k zA_L?PtejZ~Kpnvx5Hjf4*gQDaQhEroKzd=KjSjHNhuLtYhG9sVK;SxLu#-?eCeSz> z44lJ}i*N$xB7}tP@3{>tZD${$!!$2BVdvWVZBi9XI@dp7pi{KuM4Vv5iQfR@@K}7P#30jOL!t=P6u}rHxa41Wd;5&Rj7`nVJpAl^#+aEAYBQfP zz~@I?KCpkhFmOsBDUdWb@ZjEVTW%qvEv=6ofOFGa0vvb|J*1}&!JN2Isav&xE_P1AG9&BB9L?`5Q=Yo z;17X62DSvA3xsuFf*cVxEU)mk>OiRms3G-;1T76|RY)a3syUHRz34z4oJ*&m+NYm#X;YA*WIU!Nh-P(%0%cHE;QTrKSx zOfHwk6oMcG9#4nKWO^|nmR|;W1&t3P1q8tYefxwU>1q@z4VK6X$V^~eqtLz~)2Iay zBAEofF@}A7eFoYdvBW?mGGy9-uOoEzm`;SROyp}&@P?qZK_ol~(q0?X5VSYwK+voXV>44z6A&%4d%}s}Bf+FA!CKKW>fp1% z9l>XU-{4Yf1te)I01_=j2hlS0zeUS1xzMxh601;raSMZw9~CEr95{7HD% z-~36jAzJ<0 zjd0T@Ebaa|R2_N}ZaS#1hxUZthMNIyUWC34eFZlY)U1iR6LsKbIYUSjM@+Pa8`zp4 zPLZ}^;16Y8m=@CUqqA%bmKF-7OEwZqLeF7Nr)i<0X`!ETI>DZeDVO29K~Mt~xiu(P zPR0PplmPh%cq(XC%~YUT1i-?MhYW49{T7-1gy1}3adz0EADJ;?0dxUa*tKDcg~)6j zf*piK&#*-&GNZ%+FadxoYS>~bGAl!{k+2vTw&+G?tatz^01KlH%Og-BvyBMq0H_oZ zjR68K7;xaT9E25J_IXZb2pGUTeqJQtb3wGgEi!|x1FTaQxdPPI1l*!9n6LvS@Vu^o z30pyfZh`0l5T_FSgd70^FyIdxf#Gr;H{RXV)x*`()%6Q+FIQJLx|{20*ugx8P|-)x zT|h&l({iksX&NcKk+g{p*GeCZmmALxuQk#}u#rs~V;=#fydbfX{pP z(L4SYlavcN+~Q@Aq)MN8rD5Qg@O zG0f*-;gXWvlvDI z;--r2sEl+D+uyUJr`k){Q`NC+G_;8>;WD3(Mp!j23c1RsdhwwDgG{U7u*;m}hZ6Amrv7bq-Lh7Bh{-WMX+iQqJXUIe5B03!sc0IWeEYn<6w zY%6+E8#gx;H+yZ6!hZ`A1LtT<9drb$QOJ8x$n_{>gUF$f%aPxW38;_Uf|NHAyduIv zl@vP{4&2ln7Bmz zGbXO!qcm~~ipfl*%o`3N8A2%jGz8oKA%weF846(&3Sq-1A?!uoJ|jY)B!bcyfQ4N| zUJo}oS0hAMBR*|#fVHycUp)taj8Oa`uY%C4Um?gr?`z4+M)ZV@`-IR7cp}PQ^zs`n z{*e9X)$bFbBe4w~8B1*Om)-{tv_0b8ZNR304!4F*F4oeL;47=7Q%85ir?mTG| ztr%7WUFFwybV#uGZK7`oGvO&w8KKZSC93P<7a&XG(Dc&svcgSK1?9zMQF+?y z{0hSoHbGuta`j+%!?G6W;#b&0kp#cWkwMecIq@;`8?{J~uNDb0HBIz!fc*~zj3_v6 z_V)IE_D)Vtu4ZP48)v+k+0f736dU^etr};F4gJitm#v){j7g41eHk@7inJmMzW$4% zzK;6VvdZ$CC@GGzXh{;lbpT=jmkWa;U=1S%MRb~wt*arE^&qJ@#TvDjRBP0V(mov; z$qZoUyA^baxne1djL?rO(T9-{`k@O3MrdS4cZvQpsy~XviiT)>h@wO@iCg*@#lSMz zCh9MAz9buG(%G=BiUK>UU=T^CxUoPA02#I|LH9ullIY-1_nt6eg0~mCh-Av;o^m+^ z@O!ihn3+h&qfxgoIeL2Z?C6Z>ucD>i;JGvr!Da;Q0Ib2~NKBmtRv!)Jl1vUjJpvsJ z49{SDkdcg!9Uz_z>@a$w(n(E$w{uc#L{ZYUNVyXL;!Nd0Pltn(=wdbqSR@<4NEWAX zAljFyPC&J*G)p=Szf9K$UM7?P2m6tuoQ=&eG1n1+i>;kRq(`HLD|8in1<6K%A}>=I zE6f$rE))tU6~F@kf}(I?3V{oIORRt;=`vXcj8Y_u9+bi>AGwMACwTjFef_xHz##4z zAMP0Fu+=NRRLoY8@)bb%`HIDgr3z^Y^0XNNf2y{-#)Cxgz-L=R5}<&EGM&dl5+jFY z0P={751nvyY2`QyhU7RB-NG)#B?W0wjJ8|YtGKWDRq>l5D`sH~E`62;`$g?$n*-s` zbg#S>6N62O0jhfG^;vaxJaHcSoSck^AwD7W;ZMlS7}+>7eMLvGm$U1B*frVb-Qh)t zos+PU^6#(7uqW6VnC6givD6r7HRmAjQKl_|K&8JSkfsB;BS--Fr}#sLR{SCGM?n`` z$mBv7o5SI2C^TP`mvllDB4d~gL{eK~j>eF#4JGw#Onc15n5&S?7GDtVrVqm6{^|R$ za7CgBJHgz>zYAC7(P`=l0wqsL(pN$jiImbmK|UM@SaC_PEsu=Tm~c!nlZvw#q*xN! zg^u>sGJ)5Y3B0x(HI2yu&IA)RoQzGQ-JTGqR4Pfglx^M~$;vO44a$p37NVS&QrpC` z2CsLo9B1og(sSD@sOOG$^gMMA8c6COMr5z4;I99+rx_Q!j%JO3zaJ{Y8R@D(i=i2= zlkKX(8!*d+ol?S=uN~PVI?IC~>G1$8tV`L}u9B_>HHQqWU`k*xp~8F+Osue=ewY#M ziC7H`WHkB&6;nl1k@zY|H(MnQ4MyoEA(51HG89M(v<4KM!6LOmx|ygUctea3N%Y~S zzyNlW>)Xs5A*HZMVPpWYvCMux*@B?OG*yaMJKc7r~ zp{?}Q1h;-S8U^sNJxBv{0QKmJ(lrO7Bs~*s0bkvlNa+!Rl6XXgl9)iKPZ8=OP!ltN zAV+~LqruzzwL?CF25~?G3WY%>8?%_urV^<~xlWIz#FBWika}jU^s9;gO|Jj+zvg;) zY-lWLTP&nBI(A(wYw#D;y4ib;f?S?BoXgl;G#m9vHiO7HE(UJTV5PA`>D>d7U}2kL zQTk?t4Q1gGI9w2Nj%aj)54O=>K-d8pqkh`NVao z;#x3q9NJRtMJ4*K&{H5bu)`K-Pngmg*TEn~dQCu^*n7sH4eaE;lDcgxBO!4r2~LlOF*g+k4?G6x7>VM- zM(r;bNlK;2)hv=+%_cz=glfoUemFxReK-SR>C_Y^Nlj&rQu7#TaG`ne|1?KV6jgpa zH=Yz04;iQ*Zx!zrKOr92^5Tc`Bm`o{!kmV+UlH0b;!zf@CDcKL`V2|{)Hv4B;Tks@ zajwGb6azkT=_v$m>S{_h*e z>`4nJk?JM^rE@2hPTDky1z(hZw2#<^Nr>D2@4KsJL6NXiik1Fh=%JHMh{i7;iNF`k#2qI0I5nMy?8i8IAfCYky z2(l3rBiMme;}|725>}>h@c$7cL>@M3?Lwf0E`Eq(k=L8kb?^1D(NH-kb&wU zFra#nr2@VVAN8|+I>|IKk`UKUWw3yM)9*Z;XJLeQ`d=n9mVpODN*uP)qzzPr75N9NzCQIc6tC`kDYXq_t2*rP6Hq14NWH1c5`-g<-K^kcIlUJFOo`&gm!aK#wkhVUzGr zt0yCAu>hZhD?_4C2^fkC*b`bLGIltAV4!tEcw}md;$dWBX=L(|xaLrWd{W$!xQV3O z1Z#M3l4x4uAd{#<%r8`(w0NmA1=hAs}9Xg-EW$+j}3_g>~ zvaJj;6Tuo%-canN4Iv=&M|uG@MC4Ea5rVM@HiVkNVDDc@ z`33=dBET02QW4BWupPm91a}ee!vNe71OiZLYy+}~NJ8_F3+Nuen&UxY^LWsT`CO*R z#K5KQ`xxqn9<*kUDKY^Dt=VI$OoAbKmozVshlw-1ka!2CrvVc7WZ}sM$q%dA7lUA( zUw~zD%2~M}2FAmma)>fq9M8n!hsa6;U~0S5jiP9Vq(1gMN031+}u32P$Y z4w#fdcmbIVW*~$PB=wFk1T!zFxH?*HV<%v@GcrN$h>KvV1*ZnCu3!TpL5K#$} zq&un5Wgq^KpH1yZy^`9UDm91$83k4dY7smKAhAed(k+sNe2ZjAxkZvwZ|NIT?nsTP zcc@g-T`re&kH+KCsUrAxG4*9Enx~8hvOPqeToCnD@WfM}5N1J011g-rQj^5+mvGf2 zL-@=8RO=i6sg@dxK}5lqYA%-ovXThNMU;37{6-iU*`qllSNMbAn-OxkJxF~)f_3D1 z7}65LcD#@lY>|zBfVZ#Q&JHB!pfnRml;j4Dj>VYDL6sW@+UU%^IAqI*w+mGOd; z#e0gctg8ND-yw;WLEhpr@g`9b%eFFXX;B)bhB9BJ8=lx3ql3-Yo9Mi; zsxp4GDgmEU_Tp^bs-~u_rtp;MD+ZbevVGRy9BJ42tREL)ohwVjGM3ZdO1Qd(No<9|QNL3m z9a1A_pS9aww$B>yTHO5ALY2ys)70So{$*3S?4>IF$;cxC8xb!_(K8jBWCq6M5I>cOb_0sj%x{u_F6Vc<{4-&~tUQ*dD>VaN$Ds z{El0rk8Y@Tdt&1_wl)8H!Tiv5@6(flgEGtD>7 zHB~iV+w8n5|M2UiiadO>qNc90k$X#K*JP4yc^roC$ypNM|-D)ySAM|YcC`D%pE zv`ea_VpXI;N@bL$srhwi+QXfy1eNP3Kkz@-aB*YVB$nO`_qn4KZnh0ORxcY6X!o&Ao3Gw(Xy+82ow#|`l_?VX_mh(8y&Z2E@yW{ zsEJj76U!v(#1$vJ(Pi$Y-PxIk4t^IlRrhh4Fz`rgy!cp`ightBY6G)3$+fAe+}^o* zMfs$N?^J6PwXY_8IjdZY;ldAZGgIps5~_`gmcs(Ba$KJazFa zU2edF`EDbgH2hquXSVxg`=j_qxp)9CTs+;6KX#z{ZBMGz?6C*m1$j5se*LV^-?4gj zNB>Rl-ow_i`rDtd2(|NWu)=(<~c`GcW0OTUB6>Zk3LX zNXHEG-;`GR?!R`umCns?DjHYypDf)QZ)8!j zZj)G8&haZQ4{1Mq(cQ}ZSy6d5e9Z8 zgntqW|8=e8+XO!YC|i9!$c$TPCK{hyTZP#xR!Bnj%>F^=9TgCGA{U;X(Z-k zS|#j1RkcF6tHOSkozu;*5xx6Z(KR)dmTd;Vvs88^B>^uNG&Sv|j0*fdepePY?_xPy ztdc7hv~jjqh}rM2EpDEmQboF?tqAy&9&x=ykx;R+Y5e_flW);X=@Cz@eer5V6Ysax zHJe5+xEbN@(qP=gcsp@zc}Uo9JI-PJ*NB|TsFJs)UFqT%iutLT9;?HmY90Fbh#TG3 z=(^OzoKxH|wD*`{)$qzO`{17qC+t0KZC~BOJZGo9va|LKQNC}=UAuj%$h+YT%Vv)F zso`Zyr^fE}cqiY``LFuv>#(e)tU&3ub%mifu%})LUxgG3T|1t=4;2JC>~fx>kx-lP zpm2lO+sjlYmf^gctf1Pt!gV1JtP(_}OV(_*S#5ck^5~^U8sgFkya~%&~b&p=~>Rq_3-=%#eYHy?kKVRg{(W9p0&IG{<;dCGA!F zKTNT&E;1Rvt^ogYjP)0ok4hD0ThY7zfYKC~rdOq|j9}}ZY~6^LMy)qD>*zVnPR2`n zf0($Tp!MAG2OQ4Qwz=@;FA18XUXB{@Rk?SQD--Sv9WZ z+V(t5zhb-j6o0{^oDEz13XPps4&;oxB@5}mFX1cSJ$x|DNO(F1$Nw6bJ+8N4j`&|= zalBXaK0L60>IPR(KhvaaXwZw-m^NyhQ!-ct{XM8{o{ z{=$3lB@W~2BbD6)c`Hwz>@8Uw9Jjlt^hCsh5TSp1m#~bp_*5sGId zIBnkes?v&4e(uMD%Tf8VO_fV69~?BR-grymJYZ{b+O1f5@;Cd6UFU8@O)R1ni;F5x zFt9hQskS9iMVN9sJ>=*5x6ul7^VC)8b5Cq6Io4OTIyh{S!Z^0!%*iRg7FS1Y+#i+w zYkWi5n=0SR_(uz7+F4&q^J>8A+OZ`2(9lNNvEq>64{sao*ITOg+FgIL$uec&$cmbM z<(7r|)~>G;R*X3zvwQekgyFzS?(5K)>Guyf{Z)kD%r75UrQ&3-PV29Ws_CmeTl=8C z{94Xt_ortEmuxz6YDq}1?M#QJRLbI1mq`3^$hl3+Dsg;Ur^~odZ~XlN^Fp@W64MWM z1@l{8)ao_7zhZCaQs*zwh%5W8s^9sxY~-aTGW%H1g)dD@r?6cLCVOe_uA~L|o>^Dw z-F!(i!q$AB5nEK?TdHctdsiNQ;QLcZNI^kEGVYi8q)OAt+PN?2ueS!Q+>U{;JyR<2 zC-X$*5`6A6!**}Hd&~ZT+j)&`$!h8Qpvl+Aox)^6QhKOxyo9d|Q_hRlEs)6Uj(??6 z9%;VcvRR!Y5!P%s-&}{8j5b{k9a8yh&rPpP&#f6>T;x$1Ju%y2bNKe%JMA|;nxkBy zf3K^69vpG=*xnhemHj@fhoJ@E=hx>KEpIyMKJHLSN>4=;UY@4MvS$^?nl~3*U6U`N zNlbY67xdN|o-E+U6qU2nl(J_1cZn`B(<{Yw+Zt@ewok4&vOmxcudcb)qsR;>9arJj zDhb~kvUY2$zIm5yTKRE(ab1baK3>HmsOtfvmt*4_rYEl|O|L!BS+UFG{Ob>ELYur9 zJIY?yH>|U%dQxk$@B=mELCxBi^5~0OM<0H4vtzIzw93@Rm*1`dj1b?zd(qKKyB; znsMAiqfTViL>$;6*~KOQA?zmDVht0jwZ++?X~+>Y(vEIw8l86H=ARplA* z`k-m#sHWTex>q9?JvrUb|6DLhsro`3ciAs+ulcHoB14&BciH2yQBkGUjSoAg#a174 z+hi*{T|3k1XP@Be?-ouhr?s*d9)vL^;~?!+1HwzlHdfXUexH`H|BWaqT0%tuC)7!H^{ zy8C0yxnnlIMOBw1eG9{8MDhpsd4BPrpM9q!XO75Z3y=LYF?8bgts5vgF?E3s+5dVe zX0z|CEo7NpZgAR2`Rc?m(H(F6ZDE#K8IIo!9*f`q;lz=+!vhP}AIEW{Nc`?moq{7j z;<#FXYxGV3e6bG4U$)~K6OH_@ygXd(gb(Bmd{q>OzdiRbdBqBf_Y$Lk-1&-tM+c4c z1KDx)4*U7vI|(vy6cVxQPyq` zPuXl!QD&enqq)3oS^P8oL1*$?k1l-BW7g%#cvX@|sG&u5(yE;Cm5*qK8=q7jd6N9s zcd;jnlkZ~g8QWyjy&9)V{F`Dg%7^Z0k`;ZmQt8q}6!TG-j=;nf+8k z8^2m{cU%)oekDDop!}Nhkg_8p029a8ZQ&Q#U(NT)7LT@f&kV1y&wo-RNsN$(D_4Jg zl2MudYQ97nJ6e?(x3TX;_x^(7y>(Zbii);5Hm%+7yuw|R$lRUqI+F7wm&qAfsv1A{ zX8-0i<;&`-gLdpWDvvF!#cAI~TKtu0^`QMwANJr})3UhISv5aAbxJjv|9(k&T&LZ` zd3LiawiSEX`cX~n-~Zrh%{jc<=$gu4_bWfjqF}Qsjo?+P(a4IEMTegc%!6ZG)}C1Y zVP51m?yFytZ(DEfYD>*|_g6h_{`B5Fy!VmylJ+NFCf@yvdo^6W*=;$6A~#?7#5|VP zQ^G`<(Z&NyDxV%raCTwU`JJje>~di3+6|%{VRNI`U+q0Ps(aP=Lz{2j3Vu$-e=U3u z8vJc<*4-XtUdjHT9aN|%>siU_ib|7%w!2amHy3xm-RW_wYDH1SAGRm+#g?XB z%9r2grxZ;2w!G4wZGK~?Dp0@fepFL>+L@5xX*GW(-(9|-BKhEvCk?`1-#18Y89 z`1!R37MCdeXIEp_3nONv)=vv`DR8e^8^Cc)lloeX7YlP3KGjL3CgX+iX{+OE(#*;) z2(yotDmO-Kez3hNGO#GXlbby4YVDgP?}Pj7?H+sgu3Y)kqr~2xefnz~d&Ac_-tWQj ziwmn$dwZk31MY;@8|% zC+Xfgg~rf#e(T!|0S8+DAd$|i;pF!JjLaW9+lEYknnLj=a5vYdK$Cy!w=ETO(l&v%KK4`oZ|Qyb}GZQ zjpNc%zopwZ*(a=ukOnF2Uq{4uF}nsYuiE`OCde(Py1+WzzPT$dzWwXI^}jvXKR7B| zDGYSJ@QYR1wVh3}BEM0A8zUC4zhW_dxp{d~d|kya@5QTMB zUmUUE#{~Tt+n>g5A8e{yBD-JFbL{e~)wE3yH3cT zrPbc4`^@F<>vbazKMZBpC`Zj}uKu(8z=(kyR@m0Pf0R!25#Twp)UB)&mj9hz1?SXPh0Kkl&o9+YT~8ed=2c{qyd&EOn(b#X}q}Uibn9x(p$52 z_qmmL>x*X84;gWm7@Q;X)`YkgjuN6$5-@zlJ?$cLi? z*L9g)8@s=LXJV55l6j>rPyOBhAT2(T7#W?uB69rU+YNuFTmKS?#ga%;)gTKG08^+l}kWyYYp}P&s2j+HiAlTjlcR<}}m8eeCeG zlZ?I6ykB-4KC>ZVRDSyHl**!&;s$@HH_Mu&1*Qh*!G>Gb=$vI6xcmJWE*@g`_coRZlFo_j^Ec7jKAi)otZap zr0IL^lX^q{swTa`AOFBtCS{#!bm`^Lz9udF>( zHg1*<{yKQFP!lwmFjp_HrA&;k!z+DvtzTPn#_7G&%ZgpEB6dmNk3Ds6(D$qH{1dxI zE5ickC*z7H)-KkmdQNyAjt_>i3m16Z!&RD%#@#J@>CrAdfnv$ZUpKYeE|_H;k|8{O zs--Yn;&0Qi{X%xt;^vUZ@V{y=D`#Hvs`A_Y>Sgz@ER~^E%%L2=Rech3-}2G;yEfKF zmzOCqE1n!(ovo1O-(8_>e-IhhlXY)r&$5~sc46{s%i^|oKM_kXn_xwy>IHLm-rmXk z*EjjnG0lqm;MLJ99fzb_g;2Uz_-(<7n|?r7>+99>_3@Z zILa*KN`}NOs`AHyxZWgo;FW7PG~P-*+<-tWD^_oi;Hj&|-;gyW|=ZmJvE z6%k_#ln(>fE%o_2J!sxkUH^q)XKl&Fvs>Js^vxH)di3D!f!z7qujE`Z zr4_i`w+^nW*-m*`61uz2vM$8ddd0 zSE61S6+}_bUvO@5{hpT}f)_V$xb{Sa#o-@9RsY(2?Dv9N`L6O^>}SngALzfjcPUqx zH?OWS9kn{W)}6yyZ;lm66y}>cN3!FJ6R?I&t~uFu&awH9rM0Y%AL{cn(sZXK*tuOA z>9#fQLzwQgw3~D31+1eAY(r7_G>MhZjG_pGnEaJ5{;(F0Z`uGe@(t#;DzRJ2&$LZX zex55c+o|%yt;X+up4Vsi6oK(|N1$rhN;o zZLbGFUwd1Wr6yr?9=`3Ru{`en_C0z0Zx)|$Z1i;3Ut{&N)h0>Ef)_;`YmMBu;zgEE z*fwVVtFF>6gMoAJJ^A-5^Y%I(y_&N;d8z(j&66_`<8_h;%jv#;0ykApazk&_>PFhJ zsd1%>t|muD-HM+L>>bl24P6FdOQYBN?qqevRy7orF4{K5a?|PbF=Yzd5m!UU-F96O zm0Tu%7~uS9uxeU*#oe^FGgwXRm?ovfUTm1FUz~2PunNB)%Q|D{TDN6qSW0GCL!oz9 zgniwnlq%&Jt=bIf?_T#KWFjWGqyiiUIeD!)PZ-T2iJuY`l1 zQUgzWZlwLv$+VochfOBB$B1m!=*)}qeQ06)hw#h}5iQd?*wV+KrnOX*b|flLXTV1H zM>cD&?7hO5eNrRbYq0;ZE^mw3^8U^y{N=7kZK8SWD_$Fvi@N3Z{7`*bK8b|6(#-aW;ca7g<=-&4sVhqEB z?*7&2FDjKkv7MVCx9qf z>o2=}f?U;mcg?=F>&-@2-px&1T0vB6u~hD<5g3x4GTp@DI&%sDptfq#S)e1obTB)K)kv4d*A>6{nmfI z>su@P!0$YJ?`M~Jc0K!?y&sQ|6`6tO_vu@S7{1=B2EQ{MA})7#<=J!MIMtTZq8@Ja z9_~GvSy{@Kn)by!Ys;GF!hR#~()rxZi3#mZSHI9+C4bixWiuEQWD#hf zHnU4#xmpB-CJ&U|nlx#B)5zh1HU4F{T(`#5uJ1ljt8^`x61FwtpXqBN;@d(BNy%Fj z;fKPjV|HXV3YzGB4zFF;E&2lRIpxNrf4{LhKz``ZurB&-NIeKUCE zPN)OcRk6HD#`y_*^4w(#*Y=9StM(ZLV=TJ3<;9YLy(-r;T*T`<%Z1@*N`9#P097Spa- z6jW;!{P26^_H!H7}bJ z50zv=be?@rJgh6HycXIu4^}QuX*wO6lD^e7thn~%(#)aoy5;29%=CSmhF5EU+wqSY z`2`YhUcvg1YEPM7^0T_C?ec1mt;c6AyS6Um*wLHKGo|}itB%Oee(iBrKJOPQIj>Lq z)&1G7na)E4V)=vPAC@Ma3=`YdA0OhZIHWWQc==7xp>4*81pU)9q;tbFYrM$kf;Ri> zx!v2V}Yd$94mq~pAF)^O#lCAV7q9$rhm{Ljv~`?pQ)qsw&M2g5v8xGqhY zKlHxt`SYpEek|UMQJ+Y!?!GdI?YF5fZ}5?`$x;*P*FK$>{C1>n`Bf`KYn52rn8 z(Jcs`mat%BY4P#0*)m15*U}RP3C1N{&o!@d?q?=9hj>}2q1!S-vG)yc1Rw6gkT41wa=iWG%H>~g#PT-ec#&t%587)r%iTBgI~k%s(J zf^uW!h)l@u_diK`+}uyfzE`C<06l2ixtCL2|6 z5FyYZmRG1!W@6{1`{hg*aUnJ;tbTh<)TP_6yHlJW$PpYEkPH|mjNI=j3VL*a82oZc zuJ11CtC!cN2{tGc?h!xj35TD3Anrg;c5rWuq4crXt*Dv5!`yoY@l1^<+ z=yx{Hcj(MIjXf*kIn$fiHyrfxIKvdh>UjO+jX5RuRhe^RI0>iU@3OJluw-F`egLWF zAVwGH^Oh8|zr}t`_!3j`cFa-H7A%}zCph?-N*LL|xlo>|ZzcVI*5%B{vts=0&I_zM@J6@nqL&MR)bQ4v1R7phXuJe}4 zgV?)G5$UNx-&yXEo5>@LJIjLqXk$Md{m))D3lAcXZ4(Z>&bDY$x}`g z^%N-&nDZV4JI&jXq1fZzD#9LQg*JpF|9 zxP2|TY%rhEx5-%PzhY`kl6zH#{+!SHgW^7@j^3?KZZ+JOKXquR_SyDBig5X)$VbD< zme`ETFU`3?9tDB$I9vBh&1YV;;ROfgFDv@;qGhgcS+&;%g;G#8 zlHk$MFP{~myH}CWT%*^SemU)C{iV>E2EAO_$uyaE$l-mjBZKPtY)p5@ZzOePe-f^2 zoKw1_?AkB%kXYtS{mj7w;lD7x*|xqhvJ?(JEER>6fA4zgli2cWy^+=OA2-RW>y(W% z#SsS-;oCejA1Pxu-}8K*(qLCrDT#jmI7E2&eB05_>05tT@e+$EQs#+V3RS*872atQ z%;6UP(OtMQcKayNqi~{kesYuh%Hr*x26fAI!daV5?j) zvc{C_kg<0Y*P;z($a7x3x<&S=o>qN7_w5C7zUR$NW|M~NbSuhI)=^327#gz*Swv^4Sc-PTJlOEq;?UJ+Pkj_y9 zk?SPpsohSqg0&3Zb5G1N4Nuu;tQ2OQ=~--Y_@~D?4WoJ~kBIueJam(%jkNAajXS__ zI`=)FZtI(@$K-`d@~qjlf+ zU!CAOtt&Aqsn#CYogdWAHx5fBx7OGXIh;Sev!{x?YZI5?I?}3Z%Kd8H!FeV7uZQKq zVC&{+u1~F*WU&@XMJx`5&z>5m?>*sA9jjEXh)g&XEY7^UKXTe?t)yuwk?x1$e=YKm z8`f9Hsc1jGwYREy+!0ghW<$G|oFmseo3XY5o-Vsjmd{IXGP%2_&osH+fAUw{e-!6` zdX;)kZ|9KMR5?7`A+R&afPVHg)(|9}BOA1~+<8d9FnSR^S*4b>os#7p|1hq79-PDT-hViF0~|rS=T3cZzKgv5ki~vn?x_*) zDaJ=%>YD^HytbSCzFr(9nEW%R(JRYv?Jp@&wzY}IMJDSDvA077C%!%)D4YL5t`Oy| zS$4X;XvS*WgJ&CU*QCza{*z=Q*B*X8>pJP;$sm8S=!T#=-ht=*A?)j*Y?m0zq!Whyt9u=4>~)((!=`RoGGd#q!--Xd8)VNd40ilLb&PMHhpY3Fl}_1 z|IV(FLyxbTgxG#Ma$?UC>#K%FcI%5nMGb|z@Dlo;*IvdAth@hw;6qRmdsut=_BxB8 zG=;eQ+pRww@d z9VvD8t;w~k^#qS^QW%Yk-0PZeW*Hk8=x>M^sOqh0eC0c2QO@i1kf+%X9W$8`Q+d86 zX=|FSQ`yoRE1TvuUBwSK_j;mu`%1a-R??Zh+2+N}qP)x*e0D%(*3TtedDx5_GjEj4 zV>y*cxR;CduI=|MD9P9v5@c1`QTw8*cH0jUuY^|CG~O-FoSU+8*3RB-S7ro#yDjmnX2YUZaTa?2!5!u3j~mr!z3BTz^?Ekk6+j22E0U z@MBUE$ozfv*~&^Ip21-4>G<_)tHZCYu{qUSbt>`8YDQ!9HNJn5%H_1G`G=O*L8jlm z$bR$owY{qB%Uh)>?ToOc4)2R-4gNnQ>~Nw9U~2nAxc_ZN!(02QGhqD*`-XG+`CLOU zNhHj3U(3_phKtxow%w15ZZ9|@G+f7;M+?(n#p8%Yzc+RL!D}yu66Et`?fXI#q&14zgCDYG z^ZgwP_HE6w5j6UT$ZLK*UYn)Y&={jso$dFJ(XZkRhO87Ms1#va5?ci|Yr|_tf)bUd zKZ-4!s694MnJJ-UD zVd2ne>^r;dtF)7c>^85Qaq#x{5uC66cl&Y^f^TOeZ{3t|*f!Uyp->eW+$MB?^0w~E z8fWt2@{LlMV-#K%8<{I9)!iU=;d!nx#DsYQ&HEc>(Ej=7OAA4jF z_*w3oy$yx_@Oz2bQ9*Z=QJ$j2C~~-6tAykj`Q&6+bGDYGOcC*Ao$~{iV?m_tzh((T z8ZLg`oBbg)dgGRqeSg@9#q+w4T$86;w}yW$sqJpesNU4PDzvuHzk6+Hk9?b`?lXs! zI&Q^`4QquV(twNNKggx^JOe$0wQ=je`tsRGmZw#5|Mq#8v%HL(+k_!e-r}gpuk?1@ zsZe!rHOxp_ zF4qcju@MQGIsEi)mBov_rnH!2kvb)_O`7EX-dS?x;hx*ff}-5hyQ(Alz3c*xuIuHM z%33!D>?x}}Hj~Ugd+*}*yHhfT6Dl`Em+zmfRO+{!Ud?>)-7(TXv)?qNZ*v(52)%Oj ztX_-l;Qa8EkjTs`kD5GTY}My)B6$LC5N4>f?fK`6blT1iWl`;SU1I6GDU};eDiSu< zo)v#m^`mXk9-AD6|0ZRlLZHS7fz~_dgfwufx{Pp%%wIyB`}>VV#Q& zN;s;ZRZMot=It_Ua94itg`n4N5tzzoYtYd10ONOs*wr>6oHl(SS}X45it}xqVc6io zC2d>yq$LyxxymPn-^+?#EdSv0TzZe!*0pp;$Rhw~+q4T^&@*JN(|z)nl~-NIpJW=?il;b__E zp(|g--%+JcyI1_`n9OWbefh=>)y#}Ll13X*jDBogU(rcWxwkgT;Awc;S9c<(t`^M^ zmkT`%NUg>P0m1VPQd z*j(zfu2A2uX!rA!J!Qg~^c9hhW~4M^rl0qmsZ(saMOnc;JhE0k-HznyVZAa^rgJ5H z@e$*)u!Iar)-`h4ose!HnWk*{d~|7Vz}bBg{iFJ~A5B@x$Zk|D`m}9{gVW;B^B1CNfeE+v zA2_pZ|JM4XJ;JT~kDulpZZhTSWoh{xisslx-?@;owj|?FSY9;ucNh_l^?&}VQKs-5 zRtj2%k1ArfY>az#7CMNFWjq~IVZ6DtZjzu>F(bE?U%J)c@Mvf953Y%~rktx?zppM$ zr|{0Ev>Pc3wpBuXh=XFrwRvXwjIYJUF5*wN9vrx7yLw2krh3siF{$cez43<6?lFqK z{pyoCZ20KKjmrAgx?5ha;SH5!b9CP8`Zu8;zOJx*&{Uzj`H^u+mT*(=`9(W@vB$;O z3)saXtabh^cG>g1h+9w(W<$WjaL2O-jOKoTPT98di`An1pv)0vqxf6(B~_s){h2Ym?UckHgIk8;JS0z$fdx6@1Eb%Jy+NxJllMTecnF6 zke44*q5E9w$k``xnv=Zn{`sZ4_g&8HaVa#YHgabLQ2+Mm%U`v$MoGScHxY^`I^`JL5=i5u1J zj&%J@bpE(fd7z%Nr7;B!@9LzOM8`H zhba~L94Bo#e8apv?mWH1%GpXYL3nvpHv+UBtj-q&S`zM7&?1W+tKtT-yV zar>S5ipTOVFP?#Kb1FBz_9Af;K52RqAvXz+j;{DvqbG;n=uY20w$u{u3{^YHGL z>qF~k$Hm<%^{TAf9_VE+a!LK?FPTUCYsLCTlZEwpRSAt$0i&fr2m;udzkWv>!`3tN zq|IGO+LXsubp72Gk!kD%vW=r2rl3t8M@NjMMlEc*=cO4Xz ze=gcG@Tk4vv66W#v*z%Yb&)k&Zc*J%@}8XjyxPO=-uJPaV>Wls8#zk9bAV>M#Z`EI z{{rXXnsd86W^R3gwb^H97rpgsWyWD04)wn8>ajEX^@=e^?gy^1@9ztfvDbyS9Cl)l zOt7o37oQy2{QlGA->eJXO3d|lKf{jcblZA)_7}polLIq#mWvDb=R}do%}qh)wpC8n zX~CMjxj~~2aqF-lJB8JiO%(yuWZ|7t66XAfJ(-8UZ)NWJW}~U-PUj!pxuz7}#xL`rbj#2ieIUJ0+G3Dv)yZmK898Ppo)>G>pXDew*n{Br$4!wWzXyAm$ zOQo{@?ePNK-ntU{W0#-y?ai*{Mn4P`3r1J;>D+EF-}&w6@~L681^#iqCC9(HuRIJ$14ExOaP~{a##) zCDBor9_xE8Z#(>E^vo6R!{nitq!lM+Q5Kh>p@zw>&i^d$Wtu}v)Rflk;s|}&4+X|W z8y6`z+vwLBzIID!co_e~rk~G7?6@^GPiM;oMRsMyvRnF;wXA7B?r8H@`v3EG`u65h z2Y>RqnWQ3k* zB{tq#X}YVM%7>fpZnf%H`mTNSIP1|rirDSDxc72a9Cnc=?+^3OZRJHr`MzJ_aWpvp z@u9DmTAz>=LLD4ke722q%{8s{Ls)5)Hd)fVZ`*grM|F-#I*W-uReun_Exxv{X3lrB zEhL7^7kwa}IZ%}G^4+dcm$R+OWat&d;=y;@U+;7M5PeD3c6{@5zY3MI$1P@)DKFM7 zI1bxwYIFx1IXj%Yd>*sk?tqoW#gyDbiYR!3c^x%1_Ydsa3q9ejKd_Tg+6yur%qk9f z**ot&w=h)x{Lrn_A>VB-e?V27I(o7EClb$Y?YTaESP69bvO{ja?MY}tBb?1dr?Vr2fC%xLLX^@91a8tTOed*4^0sHE-$GNe#Ek1V{H6EHsv$Xsj>t zCtX~pMJiopl-bV@`xdn4`#o!Pk8E!8M#@8sP+dxI+VNqHBALuq$jr5ELG<1OnE zavs~;8aM2BDl?s1VbHJ`dq*!Z_p1FSvawqXRkCI?YajoBf!^j&Sec*4J=gG_F4ReR zjkPUfv+FjNRN99!D^&}g57x8O?N2vHX<^1k*r|GJDhr?I4Pd)c*G--C1UqNhqyLD+ z%aphmzEjlwVfy{a?mX+;*rUKDgQG#%yMB{FRYl>uA8mIO4*9BbL#qs5VyZm)mr-zp zaBicZq7Zu-T(o67HMy0UCv96Ajf3|@eSyzphQFD2e_FjNE8TFzYf06e4=+**jEenFRQqQ)E5AJbB4zc- zE%zwwRf;hAt`9*ER(2M&MwY_bguO8CHOq67YjTKx{~!IYIx{jhM(1Rc+>J}?oMYta z4sRzJ)<%ZC{!F&^k6Y#W#zs*?2R``hxj1(;kbCU}ORuJ|_H6NPN9@i1mI3U{)}w3c zPGeX;EBVb^_bZ&j;qH^Lm0{5EkHVopmhj_LI<>b|7TfAyWB1Am zqn6K)O{;S>6ACEN=u6=dw4 zJU2)x{Iz%6-fHXMgBC0GN#w*;;j1{SaI#gPN8`Ct1!@!R2|mm_o79Ksf9-~jq?cT3 z1C=soeP{w7My?NS*r*jTcKA?-_0Re+!P*(Q$`B7aw^=wG9uI0CaCj4QU2{VQ$3ll; z$u|{PF?dGC3`neE)faHwG;ZChbDUL0s|-p18pcr91j2B27z{mq1BN;bWU2*p&Wxt_ zs3;zhqhH)q>ACo}3}Km)J-+6?#H-f2BzHb4XRPEl$4@CE-P6*Ux=czs%AChqIgeYHwW+tC$poK!#-_c_e9r=OlKmHAA)Il&Su6w{ZU8HXqb{!+mR{yZU(OeNF31xs<*z8< z;&7vpmy_2OC%fSFjO2;N!{2u68ZXv0p4Z7viD0)aVSlPLD{x!lhC5k?O6*+h%z9j+wBtv`ON>g^8>B-Mb zhnAb(%{Bco!ECl4H%n~(Ly$QqhXR0nJ?wgZgFVxbC1O*KuQEYB*E^<>SG;Tg>KE#WRHA;hO zKNjD30_bk<N2}gHbB^E>+2q)5(_-$#YGjO_ucJp;nX6;OdHSS%Tt~h`|cEO#Y zPa~WmP(RVq@?e|3_}A(uuO`Ep1C68ft*c>dKXFAs&7 zWD#Itkxi55^Zxx;{xyV}!$>VaeF*j+LQMYmNIrJ?4Zbmcd zYeP}<;o?@b^S%9cUDDRWLGwusV3Rgd39TDx#8wLuZh-|0e-_Ut(x@Ukq{K_)#R4Us zf|*Rv*C@yUl^i6|LJsI_6nzdZ6j2!>YQ&|Dv?uKrr04AxtSN?5rv~^>f!jya zR7b}EeRQ72l$J{Vno3melVf}kfXoGHvmYrn?D$!oE-htzD|y6cI5bx5sqn4 za1c*1)R?IsQ9NUfF%g^EncG2r%q_%>5E!(KO&|`WL=@a021J1y9`ArCa5FTViYRb1 zHZ}=l1TmcK9qsKM!OkG~F(3rk8M+1xp(cce74g9z1lNQ^!NCII#@zh;)KP+)AAw<@ z;WNT1KKV6hGSO|~?sP=?Fh=QcRO$Q9zfB`g%k;ZO_)EEhgBq0SO z8sq?c5}=*z?NPcWY7TIlGF46ei<^@pNl&a#0ypsU&~b<0CJ+~j3GsnMfKsQcPWWHa z1wJ*SBpAuw1PKQ6heW_&pc2#=JYEb1=YU5bMiGLd7bp^7bOg!TYxvY9tL6YH;~mr- zkShAUzyYZOGZ;;bLWm2P#6sXxGl@~UY9_H0;?uA}vJPUDHi{4GfI5@FB}QpOeAB$Z zOh?iBc!Ti;0;j`xB$**UBqI}DLp(Y-dN>BL-I^0((@rs4FVel~EKpwaS~EgT3{&c{ z$q9xQktkRc&u|hN&o(xmAxfZX+>pDI5F{!}1EsD`!kiq2D3amhJ5IrXCuEpq%Oe?x z(wbxRFO+rMm|H|Zz<-^xm<+L~LqJEUrf_s~PKbT%B?ZCisYDLL6B?kI86c~gu*JK0ac?Zin)L}(!Y7h~h$sUFX5kgLri#v%s#OUVHfk((Rq z_#7#gd?7lbnwE?C6K$yu!S{L>eST(ocj zV_`T0d>0~LGYbp3+`_^f!a^zh)xdawhM5fT{kK7Wdd#?qf+F~<5n4=`|K$7e7-2|f zgoREGof1kC90@qs&S2nRhA=g>lSLrYabJ@exUX?IvvxAwyqyf4kul%UPyp@B)Xo$& zCJQ?YsNSY#=IACA3h@E{cn1du$c}x0zrCZQB zg>^IeP$7G?dBz4J>MtfFBGT^9 zz?OVO+eI+!I5-p>X0iO0pCTIEY&Ah)7MrD^1i*(Xu|k2|G?ZNg-cDr6x8#eE8zL1(8h>U|0Qu9z{3qI}^Q_4$`q79& zZXDdoWhk%cN3SeEd5#SHGbRlc6fqtSh1C3VOTIgBYc58v=I&kqijJm)PYd@A4-5|t zj|`WE$A>3|r-jdhmbxrFH+*II>hQJU8^edKw}e-R*MvW_{xZBF-0)EvJoS;%0jv>t zB1k|`fM73z+X&bh06_?rBeF3*bu+i0O#txrf5Z^5XgTUZ(7oZdAZ__`w&_}Ju4emy+NO9jkB2GrMNAyJe z6!9S9S;V^tVx)HDA-M2H3N8k??~QDZ ztcME}Y)*?9*LWwHpkgMdqzNi}g8FQNDw?3mC#aeUYX2Bzm^Is4YPbeLIfAbcbRy_O zfKLRlLg0uX06`*x#RxVd_zJ;M1cL~eNdV>uyb;7BNI|d?!Iub*Be;ivk_=#iK!%_Y z!CC}O0I2v+MUFDAgW6bJR9e)rC1}Crbbq8;>mmc{gZ@CU!*}*XE8e?;;l%Dv z?jMn(+E-P0d%SKJs6>Q?opbx$&Va#2pMW~)4*sMlP@dQgnt_M4uOeNHYMsA?Vf%jM zA8e_0De7#bw3B2;Hp5`4B&w@rSlZo9X%QvbV{CxrI9I$QrDwB;WQ%{v-|<{#}tQ41{`Y}|-w6b6L$1(=V; zWc3#@m4le5DBS1KRnh&?G*q`1gL3F2(XbK+I^+(aJ5p(hJaWOKZOo%}%)_uN4I07X zbbwa~I2iy^1e7@d#RzHMvZ`f*AD0|daE%XIR5hOqIcV(ibMFdqN7@9p&9&At`~^zW5I0ZL z_05uVFUdv;>XDCdy;I%e5!8BS`(MlB?y{G2qbiGt0*)ItJfT_Su|YmX;j0K$ z$P|f+d5Txo1ixnk@SULIGq{MHX9Hg-N)>D1A_2Wwu~Sh67a8ciie^PUToj-WDZW)4 zfr|?C2}PTt6)qU?Ak*dQA7vTB=O{pgc)SQHV+`O!X4?41$cb;OMp&u;{gR6BsNg!n z=FU%^mksM)h3yVq1FlF2M9q%^(ehmoJ0ke%aFE0mBys*ckhlVbZMXs`3XEomZbnd= z2~Z0_be^@0@E5FGg!7C{<7Q05IXqIkvP;p@D1X-?jt?XFc3gT zq$1c;)vvaASiBUqYLl%bl_tAwfL)W z5nP@Q{1|^P{uW$BpoijL#Qz2tiSu;eO+0?)`}p_qWN@d<R2LH}EQjNi~OcmtV+qIvd^xgt~guE#Q^$kKWp#QFpzYH(MJN zDR+63*s$p0?yEz?I9k4RI>ur8>X~31?U;5NZbm!RETx@h7Sc{N+|$l73TvmDs37&U z6t$sfZd6JN8&Ts{8kt1{nvy~$lPM`wyv7Up`q0wSty1*dky2(&h)Qekg^R4Flg!K}*`%7M%pqy5nu9nshRb4ABuEnc6L1j;P$4@*5)5a9 z3Tq;bOeRd%;^MsNM#SlCBhqxPKHl3zo8V0}BzhA~2pA4$2U_m4+O@bdL63AbXu59# zUDDJJ6K&IWqM>;^(S$f*(6SDZi2ji=@-p%!61|NyHVqmfn`ZR~aUh#o1v4;?*}RZ_ z+y-||d`3oNOGfJW)Ik8eG-1?S2-E@p*S4`}#yBC18e>4$j!X7UOr3=rNb1U+g_>+) zBG+*CXo$MWhG=?aXwMz|)>&O0v$|f*8g;pGX`UtfwT~RyE1pbLH`$R(izl2IgfXYw zGa4QS#m5kOa3Yz&pfIopeBS|w;DV@@J9h@rbFbk8{vFJ1Q2h+_%;9^>C*a>A$n6CG zPQJ^H=XaVqRCr4wD704*;P$lh((jtNM2LDWVKp1|6-Bc|2HBZ=FUgr0-Y>>eKKRNuhk4wc7H?SwlGo}%dRbmv2Y_%yQ==4{Or1#;Y`dDMb@ z_>j~O4?b*7&c^aP{xrljOVm7a5V^*Q<2fWljPP*yg`fKQXDo|8P2+plM>H@o`BgMhc&d?uhv)V)^}J7OOE9 z`*D^}B*3x+U?LXD7|V=tmO8|87qLK1*YxOy7;-ZU25~==CK{c~9@?qgggf8b4A32^*Lic1mQ48*!KxjNzV;-zA5A|dMdL3AK zP?64{88sOmeJzEWNn%FIE9+G$MJel2@VMX`i&FAZK7|WL`M8v^I`M4`6wojNf(&3P zf(-yP{@E0$kX^q{8MVFKWGR3r6R*qaxd^`V(| zMRE_p2mqeMAd?yyRNMfJ*#meAegH>e>Qhw&aUa!N%Mw0IvlCNb943m5sZi)y?F@2u zJA;Y_S$sR5k~wEiHoO2u??C-h=VZ;MuvoEBYOG+^5*9UaHY!4JiD$)8JWyE%1SDvj zL==idiVA{7Pk~aRi05Pl<}O~uV$m~z!9!i}tOO5PD1{Oa*0|{TsSb%A5()(ppe#aB zp%_>T@alIHQS(z%{UOx_@a6y+s131jO<042SuEL~Ru(JaBW9=*VWD9b3pGLU26VP< zdTH9zRNTX~E>aq*72DFdQ_@Dg)wRO=ueE{;wSuay70Gxid8{^Q9Kb{EFg;B@la!}* z%}N_JA85L0O2S2Q1uDDaW1VZtphHCW$2CGw4c)k;DV~OEp2?lST{x);^k2GrU0G`O8;;-W=#OqKguH(o|HXT(6nk5^Wxc_~ow;nX=Vy-v(vZcgE%wb@d zx>leXfog`ISp2DY&K&>L)KotxGSq;f*q~yt6f6p5HWaTY7c5XJP>i#I14-sH|X7Vkm``6BiQ~8jb23B~er6i`C5=LaD8& zRH1?Yk});o`*hrnjIOKcs3=1+xGou^KI)?M`D;<~p(wR!sA0446x6U$yC$N$98W{; zoj#Ms7?Q^rphr+Mu*MkvEF~C8CmMQc#{7)&M}kVAP>IdBu{@(NBOfk;%ZwW(8RZ!p z;DQnh$rvv&`50w*8x_nO1Q-Io0ziyFfuI-wk2f$RH{xha6F7KM+()-$TVUP(_qDw# z&{Y@PdmBT6m2kYx3^8oYb#EFS!`9vs^MIG?%>~PP$LH+^hAB{9sLWE+(A#N$)Dk7| z&zhSHFZrO!1*=;!v=(U3(V9X<-pEMQ{W1y$2AX1^7E4PV7Wtv(Iu_NK^-w7O36GhktJ_ zWF{D`Dt>4A&Swfdn~t_!Rq^cEDr72@+u@$QpmnRgW4zht7RtrCyeO?Q^xer?>A~|Ks5&7_7Tk zY8le~ETx7*09fFRgZ0d0^*TC1uTw>`B_)7@_Ddk#@~R#be)=Z zDaw)ogB!f1B6hW9qWF$?8kVOCw55gz(gadi+Z9Nkmt7|gJNK+xXMjuQ2V@#K#3oxk z;CuIU2|WhU3aYpVPr-E^!;L!kz_i_Y)Vl|Ll6lpc|KePi!f4cI+-iItS$)T?{>aLk zG{z2JaDL1V){oi2s%GbBpXWwpLO4j2&ppp7>gv+x2K4Yf$H<@_ekzdXy7XseCT3=2 zW@awV{4{e@d12+cFE*8Kl~$3OrT8z%F#VFo8!M&uI0bI!PU-D|QRyc@=HjIMgXbuC z78MB!r1aG}ZX-&K-+GR#948w3)yZ}im9O6WDpH3*TYXr$wGxNHoJ)J`X;mMn<*Y48ZH)m<{IpSk3tKI z&OBqV4Z}CEUAb9NBf&7?emyqd9_fZ){Cya=u^(RZFrn6-gVLU#g(}A!H7-Sn!>cbG z9$u27vi%*EtyVfBg=!2(2w&L-^GmZP-ci~0bXL(xv}SI+jO9B7gIBCdNjgw41F&lm*|0!~Si4p&?+DG%FI}I0yLq-b2QAX+! zDTx3$iNGmRfZnS4xTCaM$1EPm^5d9gDzdx-i)J`L%y!6$7A5$f{ytUn_UUi@TLOPe z;BN{1ErGu!@V5m1mcZW<_*(*hOWhA z83le1<@e-Ff?n`Y8%NKIak2ydG$6iHvk_C^$EMJkxXD^Xyt6JF=VHadi|p70kt31d zN)VHYT3RH6_cYiOwwmEBf?JW5Z#$hC)~-d|(yq(qc35#-I_%hC9gakub}B)qole!< z5ltnq!Qc_FVe6n4-UMy!`U~ab>pLAei$vCxI2+M|g{})0&_u8!6VB9t4VuWrtSms= z#lVJkPeEirp?%3f5r`r!yp|SFzz2v7M4%ynk1*R#O+JHp-(Vw$5 zI&K0^C;&kL3$jDRcm`|=2cy}uswOp20XHKSio+gQ#EeA{2*rYG9~fXkRSb;AhCcM0 zuC_B4sTsyt)I1s%^dp5(Th*+ZN&>NrIUvWe?2i3-;RMT=gGNX=`lMe2md3`%l3DZp z!#lODaIQM-#J~_PiF+R0iQ+sQiR?PMNG0rvKy9jF@fZySA)JjWTp)5el-J;5zx#4~2jWB|q^ zKn68F^~PW)wBvi_GQ2g#!I6TZuwf)P&l+b=KwE#Qs1=}h@u{%e+8EgJG`zhK>aRws z3^j8Cl%?7r=6UE-7G>k|Gx3lab6#@IYydC4Zb+S%4^$WGHIni?-R~@ezx1bKO@>E6B}V z2phzaxL~_CY;{*j`eRST5{ZhC@lHuUHefm0^$uIEo8b%qJk>~xL1A&>%j+v-s+K8y zxYI?YYFS}@0bMi-(+!=(LSgAbPZiXo#iBYx57k2Iw^e)^w5P4>^iN(b4HXP~D(|LN*2* za05}>3yr}M>J+4_X$sE9;G(Xp=nx!Z_=AMiz9<-&iR`L>06MDx`Ht7bzf?)6qEHGO zL)_!d;~9pmPz?5&&%Y6R(a0!l{Op0rAptm|Hd~9#XKGn!GpMX7SfBVdp2Bj2Pjjv? zDcbOfPQVpy3JXSuz$+{YeJYF=SJ+e<2aaU8O<*%@pe$~Z*bHl|JLD!=M~elcMK7Mp z)q+!TZWA?`{s>JqT_jt5nhYE<@UMmqBP5uQeeoj1A~Jz93Eb2jx7MOR!-5}ps12Sy z*1E@hQLr&T2n<6e44yE2j)yf-M>`gAu1G#+;2R<%2!%Xj$79aT%^Newm(3nKwP5_f zfoyOcH{d(wJmK=u`7-)A6NXOMuQU5*5{(~)dUVjuf1d8p&f7R~EXF@W18{h4t`>tz zgG~qG+bk+W7mDFFo63e0WCCt;sJc2>PvC7X)k+td#BCCF3IjGH+$QTd(xDi7wRHqE zXcE0F9Rc`<_Of-Xz#i61U_^`;0Rs+q&=_!=pwt9d!FSA2!-p*DunYx*Hcmyrq$tAF z)Rdu6Q_!3ieoR?dFi;}`H#j{a0(z@4Y6?R!Mlle@NC#gH6``S~DBwtmKizb7$9?~# z6pLU626>4HfL{(q9YWm_5T%}-fj`7DW+MJPWn#jO5r7L}G|#AX`ht2HIzIZ)QQe^EgizpUjvG{+x!@jhgQhc=j!H#KCm&7- z3hM>!r8zl?IgxPcMWkI$j@?HTRIzl88;nPAJ^=Csnf@PBf5!43C^PfKu{7pn*!@?i zq%l4-bI}+zC*!|Q(f)rIHb*p`XE?`X@|dik^!}$Q7;Qu%I}wz=2+mJ2*HG$o)oy=M zsF5SzBz0>~0!rPLK`V}!XJMWw5+#~hWb+`uz&0nq=>H>?L=z=xVljrJc7THJZ6q== zF))!qJsL4S?Xmbu3_YFe&*?GkHIdN0(Y2s^(_%tH8X!>NteRf`0iwVR?g0ZNfdzC| zfdgcLl^)g;G(Zu+uBvXy09D`&{J}Sw0%vG=Avd)JleJ-#8K4PVP(!-Of;l;wufT1L zf?*c^kQ+J?%t$Q`pyulXMH9iia^j#c5W<-Gzeed!Z>^2iVSDI#_SWb(*ucKFqqVGosVyWI%TXGipY}oD7)w!E`wX zDCn*tb0(-i-PF`17$xCRASMdxZa@GO!8{A~$!`Cxl2M;X2c^pkP@goXrpDyjxS<#fLOSpJ}XsVOE7O2T2u;@pp%w~ z)|64l9u=vhYk{0Uzo%t*>s2d<;}@sOAMoS5N4H*uz42ok;|IZ!%fZ2kpnO6%i|i0= z{DqDS%f#5ro}{D8Bl}=Fx;onSBwbzJ{g(fSy*Ce!qDtGwYwfPy(@98o5|*wcKnO^} zmLQTQ`<_lZNvD&}4hi7Ci-IgFE~BC%DmXJPGdd%Vql_>rIxb+8Hijlaghp`*qo77b zTtMy7;Ve{k`w?UEg(mf22-w_fyYv>QvQp&Z(vQ+|L=fZ(w6c>L1t?`nGT2 z{=nboI<*7$YlOh_bLDS_ z-!xd!w`OM1@r{G!eYY&j;HS<`PClX>5F>Z))vX$QrazE1CazOHuSye#&=kk-D?Yxl z>i8z_;dyt@yMNWDx!S9fu1Q)xb1H2lKl4`Lg)#EhI*hX1GFZAha9PY@Hipq1(ZtF5 zh}1FX@TwPZdZEdCPaIi3IC<|f_QPRi7c^8iYYdx=tn;dhUaxCmj}7ZIY#{UOormYG zuUfUK*g7yAzv{Y~t8Q5qO5a_KeQkHtTgUVxYQm~$b^^AuCiSxh8UTDa)Y;$L=FnL! zfv^H(i@oyw;qlmVLgX|4qVSOH_R8?*J>m60e3tzFX@?)j${(Kxk0OFBXk`<#=&VA| z^rJ*)0*1L_7`fuBa1hwTU*nt*iIxs;{`OQ0Dw&p6uQnw~p{Ct(Z{1@%uiNyP<+n=5O-pt$7=9|e%K#qpE3Bu{+=+0 z=_b!@o<}_|c@B8K@<{b^{k;0xdd|@uyw~%P=l4i_MtATj&vwr?BmsKAXRl{Bk{Hz; z9PkW!jv#4rx`RJ@`1&EwkVlLB(e-2NZAcR2sr7T}Gmv!HwxHfsUy3wry9S3O;eaAE zsr_`AKN6T4$S^}SRAAM%nqY%s$W{&gq&r6NAH`6r8d4geD%>>%Aif{zHaO=178thb(DANo=8?~kf~Z>_%* zp##23*K{ZJwvESTlDtyol{NMg=A!MTljjoC;V z=-rJ?jrB-c=+A4sqVZxR3Hlov*EQaPq=Wp&#=kcH2}zGU&osW$_yQ67ifTbV<|sNT@K*7isdQ5*+&i0yjXC&8p!J(rqVrLop<% zhC$M$mI5*Xk~~Q@TuQnJ2(~GPnW~|mbl(%`%V-OyYRJN>t&yNhF_fu>`$@Nx;Gklt zR}DXtPA&&b2T1Zl)lfmYs|jvU3>T?}-K6`3;5&i|72#^y)?{7R6dJ2k(^$2drZpEf zw>B?pzN`81=2x2!HGkJ^YMInBwI!ovPRqQO1ubmG;b3NSPV+fPT+ZQORdZu=9TE?D zY4c^x7a|FeuWP=o`6eV0`G4R1X!Aoz8pq+_w&s_bw7q!R9Hj9GdifY(Gx*mdl#n7u7PLR%A2bchm z`w8Ax3=>oXQx9DN!E}OBf@K5;31lyznBaNFKZ zNT|QdBZPWMUOgh+HX>~tkscY5wv0&s8j<`X65!OH~i5qwWDM3CSEln_)ATuiWz;6Z{N1m6*`O@J8$wFE5$cM?2B@Cw2E z1V0k!DPZAz098|5n{}u)G+wEu@oF{Q(6+8^W80tFo@jff?UlBkwta0Z^I7oywolsr zjl@CzqU~hc*GPQMXTkrpiR}!M09oH2iwG>1b`f%Xdvg1DBn{-$_L=QxA!#!{3ud+F zw$DeBn9qVm?bYq&NIJ-#_O^B(5~?MxO?6|^h%|jfnl~a9jYu^kQtOCx-iUNnM6zwC zpo#w`_>4f)4oD-IN8lq^MQ|g*!vwDo>?Rl{7}o(fi=d3)B7&O;x(Ple_=dnhf$63a z6cAiVu#sR3KoW%Xn#mY>Ms7yekAAt8bO3}fO9gk^Qeb4S09nx%aT>_(o1ujx=U);@-fg z8K9x!+$he)t9+-tAfU2X1Am>9p^@u4yLlWy$-A;Mkd$mK-Dl<%vZ-?`q5?W2MaWf3 zfn4~kLv8PZu}XeDfmiX@<;&?^ysibF`D~BVNk{Rud_h>p%8X9=Iw9hsvpVe>iqNz0 zU7QsK)42D1yf(j0aGW6i0>Dgyl>|=_>?B}vl5H_LcujB+=L?|n8ksFF1k0|*kxVT z6)IKk4W*|-Dag*QKyFvy!miLv#6jBOYy;68A=Z@OO9KDD3cN&7mt>T(EApQDx2`w3 z-s*aj<7E*iY~oV7eBub3S9t%-a+@$G~g$TX>;Q zG>CmV1HYdUrXk81f`V&o_&)w9B7)+3_56=@_89su_-G16#NqvnnIhseV;I==ehZJ7 zUxrG*&VVo)2*a^VzZ9It(2L)W#$r!-VmLx6cjEk95ey(5-4N>E=F`wvBcAbMxpTs zaPhrmrIp#pMltB6-`nJeyV>X{=Vbb_3saYiucx)8dDD(8z8Hk`!^t~Mj$?AD+uE=f zs~T2*zksesY&V;_X4Nh^Df#N8WRv4WUh3y}? zv<0)f-^-R8_Oi@y+EDcyCi{<@mIS*0yyV;N$CnIu|7}UaYsZ#+_Sz*kY~J$3Q-6Q> zlIlC3czFAxPghr8|J0Lzefr^TTR&O7;jztIU5|wAtN;Ay)7v)xW%Hw3UE3aec-!jj zPyKWCV-G*`sO!&9{e8<5k8XSP5mG(vs=HzB#!stnT66o_)ikt#4Ht^-Dfnz;q*atKACa)Ttu~*44ICJl+!C8CH$aDPjq~zmY zETbI9zf3xQY}pz1P{!V*cFsr@4n?+(&<#)-~#1Xm1EnU zY6|aUd#Y^*`C4Kr@&W3OsW~q(!*I%L&j8N_=JaYQuTH{?R99rgUjl9 ztcRjx)V`T_-Y*It`U%l`jDx@4g;KCXhXRJ?&rP;ZL`;nEN=BUBj?fr7oa0bVhR$vX z3xadl&Thfs_xx{1o{r`p^}whHMm;dv=%?WS3#^VSW%XRCR?n20tV|gu zqR?uz@!*K(1_Vt!CR)zh!wE40n3!+swKVZ^K|ll{1GKX}yf7ZW6BWH__<0wr!wfe1 z>3*%g!*8+@dA72WIPt`h1DhU5x}~en#RqY4v*xYBhf2@V>p`bf*p8TWHL_g0%3x69 z1%Rm$k(6KB6;_LD z9@9T#0YP$CZlC*EH?M!GOr@y`H|AW4*>{PiT9rFZ)Uiwz2<%lliL25}d=+nE5PseY zYP}AVFX#621`{Tp$a_aL>ZgN5(JyFdvY>)qlTjKEMp(b7(P6!)*R0WFy|~w6u+9Ws z@*S-vDhrIT-lzxsI(DaD&;H4;lV11hr7S;hiirWaQ>Ct|T-NaC#MG%VF~m9Lcqt)4 zISrNY787H!q)v&6aj~?3_UF>8Gv}7*D`OU3aYfjQ`d}+*+sS&0vrvQ2${3WCG7+3! z)Elg{?c_@0on7GyTUpQnvsSKJMkRN2=vC{Su(ic`4)#k2(xM#AiLv^rVYFG=B< zZ3`=L2w;mu*2sDqul@{DHF&Hk`uhB;+RR!F>ZU2eWQmP0w$qH_U{RjTn&14NzE5vBEF-9p%r<)?`HAawy-pcJ`&DogpBX6(PSO6kRejle9N9?^lT63-z zgqOXNW}X40qdn3c{uskbzg2qRjXBb^Hzq3-c*Xr`5t2!MergA+u-`knQrR#!weoZc zBw}jcRb47+7gl2GBIp1ls@h8&GNdV(;dsuqmyrbb%<*_g0+|sM$6rav5XlD#C5M^6 z=d1{q=S`aeX$rBjQx%D(G7d|`&kjo~u351nBCS}lB4r|N0f81sN>`dNVfqNCSS7sU zcoil!B6jE%3N*3O^m-yggY^v3GO?LKkHN!h%XRKMtid!MtfqH3K}XE89>l;%#VlTLbAprrW?2s^YX&O$9p0ct zbc^D51VNV$W?7HH7&`+U@@-y-LcX#d<1>C~1}5L0@q%BP_kv$H&+8WjI^PS!ovH+# zLy;h$J}C6a3X41 zSv;P$4gaYh=!;n^5v>G`vhzZ8rb2^(x)ipjUAJ6tfl{(!rLw|{S_B<(BwWgcEvk|B zOS_+Zn$;5SrZf|EWCw*2E0d{@D!#J*TaQ`TnWM7J?0+n|`c2b#Ce`GRTVD7En9gsa zkN&F%dtCZ7FmQ_wi0N}pxQ-ssq&H#wR>=WF_T*?xzjiRY1=B>_I`Ja36#N?~azblQ zrGer)%s>mnf`+F?x4>NUxCvmk_$guO{PQCcw9}^4)h$=3;*hSsy6zg#xF8`TnBa

b>{&?c1?q*Q3wXC#Fe9 z%ND83p~cS~*oKq&UDvWIrr0ZyR2KX@=)3aH^3!s;`epU}N3Tpg|LDt4Z+&L#?plOe z{ao#{8+KPKylKds>I1#@uI@curS^IDQhV2#j3axSe)K)Nd$n&v$MS3QKUscZ$hC=A zPG9JEZBN%5J*U<^c|hc@kBNwmhz^gv>gTSHdHlk&*ZN)PxG;YFmG6ipV)?k9N(T~z zM@XdrZ@7rM8!n>GvAc42)pOOmYoB@gsl9ujeRhKH)Ty6-@=j>WJ@>7TX>%~wzg{?? z>$1Ob3jxBf#tWuBR|!3X3-5b+;^XPuG@ap8;HcM`Gx;-OA!H>~Es+HBk<{iZ+(e*= zMH_s7rskO%U)OG5*OJO=d=rTsFxj*Wa=$*T+^V!_FUR(1FDrYgPE0;F;V9%@2{A$4 zxalGHUTv=y72-d-lb^s_|6I*8kM62}u5M@DP6YobVK^?wIdS)W2zq@b zMFJmxNqy|8?b~-ZZU#P4K>iC)tpk-~r!Tw57pqQF_#{3_n`HM>=e|z!UCE{Q{I2s+ z-4mOEF9!Zx^>bBJ^LAJFhFo5^xz}{obgv}F=YwqCSYukceeZ#RYiT@lX@#jQ=&@Y~iVtNHiWCd(`mLx1e4KHYkei&;xYMd+ka zckA0&)2(ZFMV_BJ#ESDD3SofpoiDPRw0zOJd{5k4?|d|S?adY+ULp$|Uh#h* zdErI_6 zrihGa(l0yC?qDf!F(UEw(T{?eU}1#xFfKlBEx6%)e=YWfo-4+eC+?AQepUItgPywf zRC6eQ{6Vvds}-&IoORrbEo>Ne(;2vTTJ#Ibu^URWj&{>km4kVfxB2u5e9i<-4EE!0 zdHrqspZ2`<(rbUf`j3@9365yNf~h6KJ>)q5Z6dxHx*|2xhFBvL31kA?oc4Lg_29Me znUcHovHpb@{cL2K^&?&rImkIa)gOFAWL{6F+w|7;%y7rO)#Oj$%~bnf{Lh}39oLU& z@-tA3g22Fkizq>P;WwA_UzR(y>-sYZRda*ay=lDs;Aj`e?9tD9SD`r6K`|{_cRVZ{ zyW!8fxX0Id_H=w>_bL>UWU1_=g1%wUmnj#sXX)=-UW$LM?oIbwoO(TY=l{fdklWMI zT5)XHgM8Y0+8B7z*ZOz;x8@(@A6kcVOO8)@&3dr6)#u*R0V|X*Sa5fr&|`0I zSa?MkFHfVK#5qB2S|H0@k!z3xr*AN89SXb1+3qG&YB>_Y&K!W)yJx=3FIyL2E;bKi z2m7#NmSDH}80yI2W0ny2kYi2m3CD!AVVj9N;TUaT^q=hdFG>yeaw|eKO4?J0n4i>t zvYuk#8U=mGw{BFXa)uEWj%Q^a${(0DA>^O@Lkj`UqaSC_n)hdzOg8 zme;@SQ#f%%i%I8aJcxt~YJeAD5pRExTl#x~EiVy_e~n<>n*`l&5xkj=E@G_uF^1!yZjvq;33)ubosCFVF(j_VuJvEau&9l+z1~LPe*eTU{4i$}MHlpu51A?_Oja;oI zw~$b+B3P?5>R3rgXecLxgc?(vNQi0E=BZ3D8k5@!mg&Y;9!fSVqRL!J$Rk!%v#7C$aCuf+Jf==qCAxGPwOMfH)YQjV=4IPoIE8>ql^C zUE{z&i%xCee2ud{gDcHY$P#e0N)Br|PI{v+=A$O?)fqT}kT(uH1;=FIIH7Q|oHP0l zl5-(D`LYc1Ib;Gp=|gYX*ENG|<`8T27O0&35Uld7&6p~jzaXpiFL zdTL}?+>W8cV|MnRx$JMsQKh4d{OpW)X4GmZ>kg~3T|HUv8?QdxmD!W^p82ZlV0%~3 zBVF%3-1R{jyzRo9M@YQ0pbZZXb?$y$imrp zI_b~NYYB(qd^f$+zSLf3$8Uvwm34`InSHq(zm@hotBv#u!R)oc*w^44q8Q+dXBF4t`-O*jhZ>@;4IMDhYu0G5nRWVJ zbN|TE-eKx%!-9H;1$z^(jTw7w%pK!;$Ba+vosfJjCMETndEzzmN|UCdHWjhs4k>PXy3ku|kwYVp*&r>>v+=+vE4U!D5bsYj=tn)=n$AEvU?^wVOe zjh>b^tzg>HY4=UDPphBy?6g;>y+7^Pv`?pfKdpCKX!d~Y#O%urHP!aVYZ_?ZvVD6a z_LN&a+Z~Pd+iUCWjgCjL!`

bUaqG1zYj#_4SPo>lHX{ta+@?z8O}V>l^E>R~l;? zx9`~Lus`8wbYRPRjn(t$jxBZA{)ZjW+jmqutXChauYI)6zNKz^-IjWoY7o|rjld@I z4j?~PPmZ;9@GH`9*kRvXx6>iezl;btC_;}pp1>w<(6wF$&X$_T9J_X4w{~q^t)l^m zwRH_byn*Hrd%Z8 zJ`FqTYZ2!faA-@N-`j>Ao9hHZTk5yeZ{9)iA_p>-4j9-k#g{1GsR+i-Ddc4 zJO-@BdK?YdT(=#`yO9b?tPq?Bes&58dkh(YI8uy|CeQ#Yb~?li0t1l(Az%-uyaBSX;Y`0#iBIZ@m(S_=o?R6WsSiPGOw<;6^ zVUv8#h7G{lZoRq@k}m>YJRrEe4~j={++J0)1^eFXt(Uig;1ZMXJ{9w>U(wbsiuPu5iJXsmm@#vX7M z;^@za&Di>Fy&5RGLP_;BAU<}1b;L~YseUuqOyyE6$vd{+QuMFDrmDWap}KC1qmg#< zBh__?R^6uRnk`n(7Dqh_D$xR`QF6unzRvb1>Nahv!})=Ybv4^-C@u{Sd;Rvx`UV^W zKplA!32wj%0i53;(w;5#mG=6L$SR>|2vJALLqVZRMs-dgU$<)q3bs%Ma^Fi|5zkkf; zGkqTMAaoy#GcUd<;)~+lAUdtr>-Ece>muJ?Z*%jZLxgb&kBIN{ox?+RUw!q$3zshw z&e^kM?)#iQOVlo39?)81G_7>=K+DrlbZJw|@mrr%M@Zq~u>qZ9jCH>p7XD@b880ZkFwfD~ekjXZ)vU$qD|h zoOcud3!1~Scax8KmXgKa5}nW-mj5mJZxdW6<=&oCO^~o*#4+qy$1MG@KNuS?q0^I2 z5zz6+jV`4+D0}9=a$m?{KA*uI$kFpTynPIxlESH`>$`J2S3CI9G487!uA9#fZLF(* z9LH7atRx@+&hCkyy1vhuIrevB>vHePMbxqpn|!W+ESbpO;k}BY}?8Es+ zNTaxm$M$X@1&3$nvf_y4q({`5bDWPT_M%d=8~gr}F94zI2r@UEwq07vl3I^ZSfiiW-Ia0cM>DNulRD z^RbQDGq)WvI+^nRDm#pQeY*7&5~$WA2RAGajAs{EWZN_<8Ub z)4!g6cDf|Jp!3>v;p9g2u%&_BC!M<_Evom($Rm1*|Gv1!@CSIQkF>K8@k8aI2s*XLL%fFpy$isq3 z$}#Sf>9oLuQZe>=2@oVdpd1*6bAKmSZX`rqAf+d!>rYJQ3-9RJ><(|^e{%=lITrhW z7qw$4;%bMpb8w`3G1k&L77q!wMh-6-5^9Y+RsxHv(jmc-kC#FxTQbC|LLuUhjUn$t zV2mszuu^b{2sk`Rb_WR@6&#EKhtJ6_bSXdrfQlOtaF|PW8whL>9FhYL`^oMz0zU{2 zSpf&tGT0>%NCi-F)__AP*=;4TS8!MqaCo2Wq-6kM03t_?D(=5#fJFuc_X(+#tOD|K z6+kM{>tsH?Ugl$hBjpNTd&X(0GFazppK?Zx5xehrW|x8s*7(}9K9_2OmA;Rsb}5x= zz3;@dGeH_T?6bR6T!g}RBIk1%s-&+y_Y6BYJi^x=lo}d=yHmzj9?|RY*XObj`%uEN zZ1D_vL0QqVY10-jnmsLVPN7XMpDAA=FP&-2$yqp4o}M*xCa(UR1u()!x`NVd`G|Qr zIXMgDOXZnU=T4h8ZT?vKm~^>3LoS~pm&tL@oG$(CnXk=cKAnjM07WLG&6PX&y_u~u zRovm3{uKXlYCJgD5io{Ki?=cor4&LPWk|a;UM=&TU}Z|B7qb_&8e;Oojwq$!N0c(X zTDx|Zc2>wNrr#`QO3KfJ>3u}4Hz<7iD20z5$b6}cWWQ90Nxo#2(l2p5{>xyg{7dYM z{fd#M>VqLMQFws*WCnXJm}(krjgm#Yki!k&?WUwf-kgCyOQR{f_`? z&01{S>rbGc-7sS0ytRhZ5ix5GQNN8Eup$PYRt$5UmqDRIc zZwv#1SQfXsV&mx}M$_Qv7~IA%Gd(;{oyUAYbupwZ74^~8FHgml=Yg?wNY0&fjC+_2 z+&y{xf&}iNwnyBX+8%aq#$k@eHuv~rXfSuQ@!t$j?#FG+!)cL|{c8I&!T|#y8JtZ- zppponV5<80kI?%fUDkMO&>nC#syelhLn&w zOvLBM zHqEAD3$TTeT2(TcF+JL9urgz;sA?{gb*OcOHS&d}Ao3G|S<8l6gCt4`q*LO;B1Rgm zMAN_qD}sH;C9*)Z64!WjslST(E9V>(}R~4 zEGtlX>O0Y?EKsELjpK|QnevTexbX$xvj4LImsVhua+Ao$kj`b1YDw?(AmPIz20FC9rNU{jSLXj9B- zst}(}8j1AdFGn3_**#-X1Sh7H0<2ZELGtwP<5#cRl@QDE6U_N2?AL$Q5fwm1r5 z$wnfT$b9@?W*>xq3{6lkEV3I!T!IS?S>yt`%x&)Awsp3yZGGDu*ZKkZ76vp50R@7E zKE)9VDTN?|e~e?~g2N3m43QzCIO^pIZ6gyzimZ1h^W2GJ=dnoS+&GQ~Qm#X@KbnL8 z?EB^%niF}1IQjL8p{hVd_h9nK^@ux(3@tIUg$q3_?3qBnp^C)RlO0rj?SnOVj zsC`A?DuIYqLsfzEg0bA+2(1a3;O7caeOnkBhPD|Zxq|{#8M&v6q~-3=HjI=-`a@QM zU?G8002TKQc@Gr%o;fIQ-;)hRWh438N1*Xe)M1$%U87v+8kx@+8T%O{iBkmmK4#-o za^DGw>WEybJ|dT)A(dV@%*guR^_xhETE!afzB5XxmcLTeQJ7lD%q!yO6jG7bM$<%RnD3o&kY-E=1ZF-+LR0s6v|Gy;wqO9S-B3dIp{d7)Tf z)Iz!7whJTRzl$T_pzC%t0uB~U7y*AnBj9g5+i3*6z0+Afu|oDv)^1ss%9U^j_C z4uFc2+WZ(5WcLz*_XG!Rz`;v)lQIEj0jRiv0f)V0C&>a(1E{#60f%_9TTP&v90V?K zbBa*T@{0WB>|=8M?Nl?3JY{m9UM|Phr$mhkBhRxerw_r%^PfsCB-nQ%^Pf^qC&$S1 zpDIqR^c|o2Im;>FKJ9Y}7p(Aooc&MP;P7ByyDIO9UWUKe_{m3(N|cY3k4}`229(Q3 zjvOr?HCmoXx{-1@MvfTX$mH?}nbI`(Owm_GOm7i&Wj_@CSahiQ`3-?7(*V%+ zD$w>S(3Qo>5l1#oAwyRdMgpeJ<{yx%y3Wo%S(R zw+N@G+~lakGKVmCT})NOo&2c_GacJ8*XwgXn|pEY^m(4-Pxl?|LU&>eLIY~<(09%? zsPv!CMe}6t;3p+P6);_nbnHU%V7QWfkmvyqWV$vxjl(QDh#wW}+V;5~SpFklA>p3t zEAz_eiOUa-7|kqT75BP%+>bW)O!mE&i~EB~5Bh-dPrXg#wU%3HA4^ zSbzOB7IsvB{c~K@--}d#FM6J$`ukKTap^E|@2qqC+%M)$oPY297v`UuAG%=5g7O7_ zTrgyQ!u)ab`%D1+b;E1=IuSq`0k4ts2;9{N={_KN1tjSLy>x*;da4Ef`uaHe|1*IjeUQq5bO(9i zk{9Tc14yX>q@T%u)J%XFfB+-xKw2dr-LpV{PXOuu0Ma({-%Q}+01`4f8%WOzNY5|O zKOaEa7eHcW!T&%4BLT$BG|IUT7Z{}6k$|TK z&1qMMgh0(aAq!DqP?^;p6cPe;>Ir#B7}RO)!69MrpM63R5&|`+J!G&Rvs`sxdYisv zNqYJc+N+nP(PZI2ABw1ha@R6V7XGAMxAW_)^8&6}Q^_^QCL(HtCu@WzLZ&{yaNEMo z3zi8&(EMFt)muN1Xt$f67^UZG8cNf{xN z-L+`&B5n~gbrHte35!NAny@JHErhKSBq$mbDlEHT{8Wg^3-w``6G-+UM*DEqQ9Ygj@o zqw>5!CEmmxCTR(LaX$Vr&N)AX3nk*I9P6oqy{@Y@%gR~s5PkMBn z*^r)`V@W(k=8f3*^n`(r{Fah8wE&=qz!m@%n!y`cgh0NxVx5tAAOjC%`xqo$?Uk^` zAez1fk{%Y`UxIJAN|g$o9g;3g#s;a>zKl3bn6F@M8FMONq_a9UT`Da9 z(yWFEakdi}<+H*F7FL1b;+0apx0E`fpWO4?J^ebpZyIG5))3^~1y$_Wiv43p&=ot} zVI{OwvGP>w-~E#|5ItHd(9Rf-K>|FYf3IAK0)}M@!HtxR@%o5T!2+X(lYzBjOo%AL z^!P^)NP@Y8s9989Tlha9NnM+pL>qCT#lXxdcg)!7Gq40o|Jh^4-ltT^|G2bZ z=|f8x$5OsQC}6gw`oAsl%o1i#v&7jGhKonJaTq#zmLc*O)W|WY84QuKIIM1o#Q3er z4WC~wnK?FX>4>F=Ad2F|F-tmb<1#^9v%+8Yr0_%YD=uy+rv4vCjctM)<-fR39D_T} z`K8Hf4&>LiUNj#R3Idpy4rh!Z#ljmP5F`td2g`!xH#bWq2_kUKYLVKd?1VWb1>={v%sK z|G#6aNZ{YIRdl<~*3e~sw!X9M<7F&UcFMVoUv?BP*!st1ezxX8=b5+_yXw>=B%bSx`Tn0a`0(YyN@9I1c(c;*^@0XtXL#p$$RE^>guUi3Gvps*o z+GrGa*D>0wY8AxTc@`eSE+c8E@w0ud<_UtdC2bUTxF#TszSnXjV3iCqc*PCr{;N2y z-_HSws@(5MPACa!<@gr;>J_wZ{#lED3Xj<{E~-FuasS52@qI4=!MMQwB2Xv<*d1>UZZ)R3^j()b9arc52W zik0@$tNV@D9nto4=?8wqMr{v~88oaRRCh|vKEnq6L$3H(8uFc1@&?O(9jy6EI&h9o zKZgz3qt!mIk9tw3>Qu9)5o*)4aMJ?ShZ6aR$^rKUYgn14zdSKAO%koqMvqiQ=jfvs z%A(h+%4O1WlWe^tWWBtfLYp|44N6sWdv$7gutth)aZ*R|K6gQ%Rnh9E3;?=@f?(X~haVh6X^r;%8KF;M0F)Wqn3%bwqNV4xA~ zd65*EWd!=1;ox+wimBDHwZYO_jkGpIRvV(O)v9YXx>{XOtunY)rLEP5_#%UCCY?1h z4lr`E&1A*h2y>B*CD=ERt?`9Giu}?2#-N0Ejmm_-8GF{daIpanmE3-AbKo`yZgb!^ z2X1rVHV1BV;5G+tbKo`yZgb!^2X1rVHV1BV;5G+tbKo`yZgb!^2X1rVHV6K%aNy3; zg#U-MHxFp)%KpG_w)cV}1W*i!^0E+~h$JA@R3ik40TdM6pl(D2MC$^g0%|c>s&*aJ zE_S91+Qp93acw)_nNDp0(NaqbwpwRO+n_*|woY)V$Y9>@a}%((-|s)a-!Jdo{oHfU zJ@?$@z1(+h&y%hFueRp(ztWm>w5O)EzXm7c!Fd|$kK(6)y4yUR_r>A1I|DUAILuZV z2!CqA?%Kg{YQj4nZ`7ICz#wSXX*^=4z!bup0p540*9&lnvGIOxjxqCcx0&I1F+(cu zXF9|GUs>?!qV(K{F*-DR9rXdL*iUXL&^>1r+ zPvj*npWxKz#>aYI#mTa-v^H;rXAAWlbv}*LoB%Z4a~8&9HmY%mo^o5_b{Hqj3HWzb z=-+u6^k^&Z(AW_@>=#`ZTGr=cPh?w1S5WBspwN{86-gJa&FN0;+1YyZoN6>~{M#7? z$f!(<2kY9EA&>PukCI<#U1jTXrQPnY{LGowaz3eLTT;us*}cxR4&~F${V(9)+2>o= zN99%Jgr;_f_v~t|=ytm6a8&K5NjSi$Aql4vO#!v|e1H)AGqbC8IyBk);5>;S;C~VL zUutbmb=^Ev;W*k1C&B#5(PkV$yK9%~MiSMg6oq45D0Y?Nab{fqW36*=T+$qOk}&7G zRWQSazA{B3x4rn|tJ`gfs_jX3yTk0{`iuhw12xc72*vu|A3f?PU|hgBr7~WdpWIe` zpt`O4FVz>S2a|cY&yhqfZ!k<9Kfl;;+fbMu+@mpROhaL+IZfeGxCX;v`21ugSx>eP zhK*z!annm8VPqqQO?_y=>eUM_9PYV5h|`&M>{wRrJMYe4c-Ze33J;z2A<_}rHGz`@ zCo2?bx!N^*KiK<0`Zx4~a=h@w#ImyG%gf5PZ=XJ$WeW={D*T`_-_Nh2!e-lU-fm9h z61i|Civx|I@6E@3V?f#`cNs2SG8k+&BqbUnk*)|=`1?vEKUPDvA+GA)(aYQI(@ul>Nz$#Q&m}rSx`|-YUNJ1(dc$}1Z;k;V!x+sFA&aF5{V^Y zW7XkYLK31}E_ok&Pwet{jx+z0bC^LSAr<7T(I}if>&@b^8Rp?cGkhWu!^-^v#;L;8 zh73|t@{G&RzKzoEf$~}+!hkqR7|vmU?-(&ZkV?Ijicn>Q$EAnM+HAG9T4M9}PfXmt zecQH*3WI?Hxm@&n=fuQt{1Ord1_rSx<-v>(E61)rCDaLPP06O@s%omzk76b)_9TY* z#woRmVq#MMAdp5AY4qkyND5m4=FwIN#}zineW!=}UJws|z#%C%42rkg-J(9Wk9GMu z5*#Lbi6O(bA6G3YAvVGhVm6;XJuqN0Vc#5fk{XR(6tL-8U2;ZFMiZd(Dkz)(Fb+6NzYcx*bs>aiPs=gE$;c{2UHoRfgNP+qc`p zZIRHS_IovkhBQMO*GhTGwNigc3I3UugoPQ64u{JX7Dg$)e9&t38#XS`bLf|_=&h=1 z?Kfo5eb7(iD5;UgTw9i{&OtA5H%Sy16z#9@SA=tk4wK_1`GS}vH~l{|89?ihJH!Xd z1;2nWwb4?t+o^DHG~UA+WTyyBrrF6)JpRPvEsx*bm0V>S952R=Q=tRVp5(jK``_(}kpW9@XLfb5PXc^-wKkQ(uCwejLC z5JF6*s^qhO|L+sqQW9hR{YiCoa&>Z}w&-Q;H>O5q5yc-AMCDhh^!KNFFO9~&zN=Sv z@2;q*sloSOIHM!cuss`__i=4U=X2Uzu0HvI)GekL?W^8PB4t9t)OPc)*I zkya|N9L9T>%hy*bmCKFB3jAn~mg5%|Mztp>Jtuv5>;17~cBy&0A<^HT*1O+&uu40S z+vju=VwjU?79|Yv0K4Jrzt*4nurUYwf2702GNhq?cC-1IA+4h3m3+TF%##>}yuV+^ z3+N!C*dUj?|4`x?F91P%8)ili4-ylH^e#}>n;lZ&ff$DonT}5bf>UT5@OLFRXgav2 zG)CHT9fx*ZA{Y?ejCcThVD44zc%_0QF;nDziV#IG4swyR%;^E~bK(uRd_zOGT)yS2 z?DOKMt>bN@u&~6$ZQJ@#cdF@ua$xWm7&viM)U?y)V=nnS^XDJ#linKECv_^RWF|Ve z@3~g*MZ+L^sA6=}vqyetKlC>wI(|Q1B;toHIopTo?43VIa$IsI1tUy#;j(X`s zpHBGdYo5|h$hdI{>Mhm{vkR6~R1h*$?;)3%a4CnF23LfcHjyNdDl!|RJs~`%&2^-T z>OjVoj2Luf1G)RizYtpm;tV7XJ5INgGAx&(G1nt;d$>(rE}tx& z%7lnVh;Z&GdL&&*K>Fzq;*G|p&5hBB)MDYmIXS1j zE*F8U78D#l{Px=siRSgVwyP4yc~0wjeqhHbT<)3y+FIV9NHlpe&j$th`i`LoXp#2z z`1sDwVZ(ZQR*r)O$^;0^3!wwY}lr%+^MOu~ttyLZ<-V_9M{aoqg*`}b4mp^=_5aYi#} zq9fJ*{l|`RoXuu1WR;k01qGd*217-~%9R9Krlr2m;1?WRQnG(P9kU`Ml}h07H5mEm zf&$O-Nq+ite7w@g7iVPP)YIGelBz{B8xI_Zc(uEpV*_e4FEj=(>&F)G?VP;j?aY>5 zvr>jV{ZPa8Q6`{|Vr7q`$+7OAjz@}KdPXYN_Mgz_nkSf#d71ka<|9W%&$d>ar~TQX zPo{fLMg1bv2hTCrzRA3j`D3Ol^OsC_X3OejjJ(ljuGdw}6^R*T00NDx=Fuo|BaMV)2p(2; zv{v<0w|3y9`PW)opgi;I+4PYIk42vh<;7E}TZ(5O4g;#-L!W=>b5LX1Y!9b#jQtMc zVHkp-Q+0bbbl0@}WxByf1MUR$&c1MsvQu^{+xJv<$f@kHr?MkkvnKvCEACYGwBW4i zr?L}C)`B~8%1&ih_+;%nmHo0$)~o-Tb2usMFBw_yZp*4qnA7m$oW{@RG$qVAlQ2hs zz5}Z>f7p;8yL6f(^J{aj3_~iU4L*?^aH?Mt=;Trh^8LNpvNuZTq@b=Mo})! zJOa7gKGc#?%Y%f*``wQh!{;HDaU|#)eLcBEj(`ei8)y_s2|Zd~v9sLgF}H%d8PtUD z9O{)_cq~uY5Atr^>JtJ^{tEf2f5;%{ji3vmZeJXv3@vgAN5Ft4kA}Z`*AZyqJJP27 zY`E{OyR2`YTtG1a3VHxDw5)=%>7RWvyBS+WceVPBg#KmssqA|fv!N5`zkYN3N6o$a zO?F>l_MI(re|c%{?I-8mIy(2}`gu3*&g&gD-*qedKcd|02j>5Lcm7XB3x3>^)ARa* zYt0L;?#lUL+0Om*zQ2_7-Ku%tzBaG@FY~_n``mvY zpZ724!b?R91;1e^+I92xb&>OC!1C-1*Ls~doAD*iQ?0Zcsh-QmcL;yV?ux>LPl=xx%n|#EXhEsB z6UIOVq8K8ALkK-?FO(FD)~{EpM7QoL!$f^<^QC*IV(jBA7#$uWn5!#oLVp1$rkwwRozv#X2`ZNdufWFp9eZ z70-=$>!Zf|p)+HULydP3>Z3I1t~GXFd^xJGC@pw%;g zEL0$v__3fe4~Nl?pEnYxc8~aEX<5&p?fIz+W4W`YCRM16>zxcXfel9bS%ghma~ofq2RPn0;S!oVAq&h` zvPa>CCwPmW#)9M$IeU49arj9!HvKNeis85pF&NKIc62H_~ntDb6hV9)QR4%+so zvW>i1nWeBPi+P(d%WO89dF!|=<>GNResNru(He(uZn<1O%aFwje$pmdzFc*zG2loe zzLE1e9l)Nxa1>42^40tf^mmU3XNZ1H87uZkRukw!ySoX;v@Fh@pp;^y)lA;rfq^#! zkWO%uB9)2k1U-Q_R6qnO(aiW1qGj}g#!qJBuv1SLs1Jt9>c%E27mx}ZAm4J7tFJ)y zo4g_qp{V+hmz^0XSNcq*0zrE+L<56*2bD9#9OAyD^S5fxf`lwyrrN(CfyW?DceC$k z#T&*?Kbh?*SlWe>JCr{t%)HWQ5Nx#-#k=i->gt)UqauX_iZ40>o)?7#oL=B33stMZ z)w?Zo7ouyReUzpulQscQUs!C2a(i!k`wry5PYxP-O{j4f5`YVsj#3>Oa~FE5uX?u; zAJR%s2g|z{)=%zUFSvy9J48{!B0?q zys)d~$U>LpL#_{#{y(5d;Nykp3`d>EaC$dREWn=ie|UO7bhW+$1kJ9bZVA_4G2U_&m%3uSWUa>53U`R9^@abola#>4Um7*l9;2aO%15a~x#(?`^JtiM~Ms#O1ZQwhf^{;3}ue|wLe{pLU zwC>4TUZUsFAD!D#b*SO>1uf{(ugycS#YwaJ$(oRkw&_EF_Ivbxi~-j^r-Ul|uYKHM;ntQZqtH|>PX;M9{r|!l+dZH6{OgOJ_i22B6qEX|!$dC<7*XSYD5F)P+?EB| zl!s`QrVCzyZmU0<2YG|^LY^@kQqjZ*X1>_$Ux-B$UK&FSZwOW=7(D1w=>pR6F+d^G zeUU<6DkreDhj^BDCA^4kYgY9vqOn-N;K+ds8=s#-$}h>Dv)oeHc6 zQ=3))%pC+yZTV}iK})gAP;I3I9O!EKS5Rt4f3IU_Pp?DMe*^9fhf*GeP!xO>&2;HG zk!Rd7y!cS_l;%2OKd7*uB=!R$`y0f3jRAA?Qo|D&)U7u6lXOIKohPh|dp)E!gQ{f#&d zD{RL|-QRK00_XT2Vn2?Xa~vi1Zv^vuD4IA95OXK7e{8mW3|latwL6X~>W-?MO~n2o zXFE&mpAmb5+1})GenISKUA6{d?n`&*#QweA{5^67aEH~3=&cQtjno=y$52VwNO+kxW|eClP~kF*PP zG;0@^FIb#Yv3Sa}i_1?fF8|Nsa&F1atR<#cqjmn`xQA00EQz0%p0jN7^jVMCrX*x6 zS{`d%9G|{yO2%@+`i%` z{6)%f9AFJ(3hW87@kXc|i55NdaDqB=V%%gA(eN>oL{o`&yj~=lMk1mxIu5>1r6r_h zQk$gBp1W{yVoLg)c{xkWmYG@eb4k*SS=kwnEKRm%WGq;;EH)0mN%0R&o;<}E|M1kQ z(~PF+2?>ejq~w$o%M5F3N?Q8Nq?B11nX~8Mr2Fi-DGL_P8~UZ>fgN zsKO-M61=qKnOA6|AL-1f;{Jq*F2RT?@ZQ|PX%pl4*V6;!;+AVm zv1Y_0t_RRFBhsld#G}a^(<_en!BUwjHh-lN!RHeyoljSI7IuxFFLE96t~z!&k9d~A zSb*#u^p53zK*)Kd8CuGrs~oe1_wm(;$Jf+u*SRTkD!ToVTa~qpKJZGJdi;AUVVdyo z?HT$WqNxk7Fgl{Z{~OJXpENYSoluWh#3j6d$G3#j2sHMZsYaQ_t=-!{aSu!27=z#2 zykCNo5&VuBn1n1w{L@%1{Or7d&k0qDEtU$KcOwigD|JprJ0Q(#Zv z)xmOT;K6dBy{EP@;M(URIepwv?QaaIZ5;Gp`#fMj^*6px&q{*QJABRwV$Xen6Xnxe z9C?gHwV(vwYobmqd-Ft9c};%OYlFD)WQXEnO&(so@X64a zj6kC?F)m!GPmD|q4+#$$jTig_8GXuIc-7apzi^-Mv17%~70<5Nx8jd04y-t|;x8*s zt~ia)s6Sir)r$5Noh#fcn1X-;t{}1?reI1zLP2tYwP0pJcEN&z{DL(FB?aXL)djT$ z&lkL0aIoN=f+GdT3qC0LdqHEtCk3qqUlshT;JbpZf@=l$3YbDgVMyWB!sNo)g}H@! zg{uoo3%3<+FMPakZ{drDe=Iyu_*UUx3*RgJpTbWHzbyQ=u%oc6@LJ)`!u~>cp>L6* zD5OYJ6j>BgWGXTj%`942w5Vuh(W6Bhi?$R!R%9>QRrGYxABy%B{juoHqIZf;6n#|G zRMb+`Rur87bJ5MBUyAM)4HS`;(v|X+zPN&LjlreH6@@Dnml0RuO6$tZmGf8Tt^8L} zSJAbi#Vfxp>L|)z=_)E*xoTxl{v|<>6OkYnNd%c#gjoF>AP9^PPGTDtB{0LI1gUSZU>%|K-h$gtDj@6+4aq2+|-8Zh;vo7DS_hFkO;n!QZk=84~!uu2f9;sU6y=jyN5mv2KaHTQA!~x-k;EtfMH621P zjMo*INFvC15pF>;UL@R0b4R(OP(S$ulolN*SSOD1-hwqIFiSAw78rf(P`tl_(sn{+H&U=p3J|RE;nsLxYy1ctyw`7}9Ge_1FjGQtBTQ|{!!eYp(y2!26r&)S7SksP zfu@H9$@G{Gp+f-H%Yrx|hE@$NLTO3_kIYixRuUA}f|<9H!6)jbc-`-Wq^DrVx8M!X^D+f%+L#5IVS+3DG7bGOGs$id zp;?((F(^x5GA0X5Cd}-~f@@AU1(9b>5v9XQjIauRf_3hYFL~a0A!+`2+(Pn# z@nS(E6*R)Vg{X!w!7U`uACK(P9E0%R-2dhZ?niK#BaC2OB!%wtexr5qNTF|u(6&fNKOY_r<#-YS}Ypg;7T-Ul^z_9EAuoZr0 zkSL(1CAb7@$t2u>yX$Rkbd(K~a3kh&nPA;0{k`PLH;aUn@_4~gkz}bz7OY!G3U|}2 zTSAb*x;2Of<=Y^GkAcOU=ceoxeo2Gq$OSQ2CEp&!Jg&hlq}US$YqdkrT ziNGz$pAZRMY4V*JULJsY>ncVm_4HhZ)mGx_Ci30P@|t*S|a@Tf^h9c!TJ)^ z??nkI`{M=a%l-oMN3o#z(^TAo^p&xaSH@Xi1?jJf1=njsE#!XPDyXc28jttxI;)Tg z_gJRyutu^OaZpL-r(KApbG~(B32rt#VyE#B5@DVs`%41-1j+Kqm$R@Q2KD;mqoOj zNuHhuGheW-nz<@_)#6nl#hT(ri_?oEi=Qq2WAR^$i&t$}^~5S}_3G89ilbH?T>bv) zA6L&pow1XNV2!qt{PdKX?53Q?%& z9WaL88G#}a=uZO2kiZBMWW+5VX(S_!;!#F|JJ@rt8f_q>A10%xlF`%1XcHMdos3Q( zqZ7&KaL_WEB#ZosXe>z)1rpIHA_^lG=*kcU5RuXo?aL8g74g*&t1l<^9fg3{cQnFc z-w=}Si4yy=-dLz8_a=yaeaREP28pj(;+rJ#O_l&dj50;MX|6N`_6lhz>`dtx*e^-L zVDFcXg`F!M2YU>$glh@M5mhKrk0Nt5M63~uHBzEshdh2Bk1vT}NrWGX7)7*Nu_jEc z(GZPFtmO&r44t1?7cAC=kw`yrWUx3gjPUpaB3R6ak@0@w@xkKpVI(6;MkdI_6MV%{ z0n!Np;t8Y0QDdYN#)v0y;wZf|nuxKpX7@x3iJ3trT1iYQnV3dm(#b?Ui3uf9dMnY- zB>GuIpF#AQL_eG8=Ma4s(Z>*dHrZ*2C5AX+*h>t4#Nba13X%?EP)K6Kq_HY#tPXy0 z>{w~6S{fTko}dy4@q_F^tP~_AO-|C~WRaYxADT-Znnx^?=ab0`$drX-N)CDR!GLx2 zd@_0g8SO_#FC?RL$mk&Qj4_rx97~LGB*;nPkUe!cnKqo5hLh>TNy2cFIAqtDV~IJAnD-L%D3X$dXYNNxl8PMF z{*h?Lh_z~>2^MR{inaSmM6@&_N*eL9G$Q|ZwnP-Mi6kepBn7vHkQs7fRfwNXRglz$ zB$Xwphe_&RNb0*J^{*uL2uVFkQlBKL$4HT-fXpZ))*_NRbT3a`Ns>zaC8?$Uq*P8y zMWplvvf%|%_5#`X0!f2`4`Ia8G(Z3@m@G~6Co_vBv!Wz855waj8LK6kt0d`$oy!cSx_cfSSHCSBP&ujlGGHEx{2s=H)qOp=gE5{K-E(jFt}kC8=>ku(E@kSsEg zv?`KbMHW?&wCyB)J6W`yq}fTjoh-7Gv}%%GO%_#?v>haU2U)a(Xcs>&SyCfe`h;Ye z4@t|5!d5b3i^47svOJ0`CnP_LNnt3- zDtd|(O(I1xWTjS8B$5^>q(x(;D|ty#l(fiCS~NzwQYR^rNQ(lcMdPF^$CJI{SP~yg zV2k5Od>pmKdrACWYK#3yydSm2{v_U?+8FHPG3+bIhT>VI_!&~nk>W5?972jmlH$#z z_*qgsiWDnIu`elRNbz%|_z$GGmK5tqv4#|fljv2m$f{?^DvqoQBdbEls*z;XX0qy8 zvT77rr68+($ts4tv6>~1`ja)IiFWPNWNi&uyMnBJhUgv)tQ|(yK1npp4#Msr@)rps zNs>y^q|!8M%cu>7=??@%(i&_R-ayz5M81I(uQ!l&22$d&AN1?uW|2vANE}Bd1(UcC zGHC>Pd-E6)KZZPLrdq@vShBii4zLAE{VQD#}R3AyP4k zRJ=nf{7A*0Nku#ny+(#t8c5|qQn`;*E+>^`r1B7{oJ1<$A(eil^3S9)p8W7wamlkK zpO<`J;wll9#+8;@OJVDn71oRRmPVRi;#CRW7ewSGlY5-OA?5&ntyW#g^DD%eMS!%ez}zwz#(> zZq40Vy7j58`?l`i`sb}jwtlhIwKZT{=(Y*lOxr#vzf;avq*wg0EOXoHZCkh5xA_o) zIY2%U8?2%^jFs5>H=W28CQd=3%?kNMvqBMVQxL)dNChAjN0b}@4FHS(h&1DP7qe0sYg2Lt8>dv+0A}+gM2kvAfb4ku zpC17@Ei%R~ixktxEgPb0vWWw%fKN6j|_Y~#~}lzd3=o#VdnUF8_z}9cwS5S zh`s-E8MrhGj2T7wh+8g2#7IPpgiE)d$wz>OFhqc zVmva8M}~)y;bCMzI*)V?>AaB=1OPbz2ms_10AU_s4q^Ub$|k_bePAmA5JDG!Gi+j| zdZ4OUv86yQohVQSz?K?>bq zY>;q}Xs<^um!Mb)AcCM}J%~ev{_g~ZLP8Xrgj2|az?2}!Hp0LZL^IIbG(t(S03!ub zQWu$&3iy@Y%t|hZqoq*scZCH27PN%LELU1=GP&FWXbWm!L2tC!h%%Kh3St3T z3#TL&bQp_Gu1F=~;8Y@2l2j7Nq!M3WKm{U#0FnSw4oIM~i5YP!B2tN{j%0#hqC+SW zp2;8>4+jtog?v2dHG*EWEjIdbM6N^rDI8=A3>*(qc$EAwr-bC7fT8Z-ivmWN|5u43 zEYYwv6QvQk9t_9?uGuJzMYU!FS0WPSiDpD1KWj#$O+hlv3b`Kj&9s3|qCmq(A^QZ- zGZi#WH7iLJDn5ahhM!!71O;#g5JVt{oYculK%HE!s6)hW8wU}?IU*m%$;lW_E)V6< zVP)vBGRXWWbl6dxObIkf^mz__ou$ z1)!CH=3r>ru~0L0AY=zGy*{iD2SsJP+HBPzy=CXf*P_% zXFd%mP}|Tzab{#NBZCbY5TQl}4KiquL2W~=)d0`{Km!0o$dwr!C!a+OTn14ZW|<*O z8H6LV%tkJQQyOOxsX{)}Y*5T3ykRCrmYK*xW^zXPOq;h}`^;O<{hB zQ<@(_H6G}Ma``kmqe9#$-FQi(#6hR%^jI9VFuVGJ-L z0`W$(YEgOwYJru3A_7gTg+Rq~Skz;%&_akJ%nD^ZCZPxjl4qj-t*oN@=@_`Z;;m3n zsfJiWnDHbHfk?3prvOTEIvF{bNF{wJQ3{EYLZW;jD83LBumBhU$kD#>J4_I6@FIm% zDpJf!Wr~eMW)7KoWag0>tVGvCX2QW3D1zTdQ0(Y}avsK*POJaB9KQp=s{^zH3@|Ey z5nJN_-(^q&A?@@^l&D0B7!Gx4-AGhY2T~$ID`pZtk}ygVi3B7nkf=l=heTdS2QGYg z;8`$*0bndx6Gk|=;-R@1ElEFgJ*p&W<-D`GeUi7^`tG3aP|Vo>VQ zwh8EC34o>mTnxtnfa3t5(1WR%Lja)Qh5!^XXtEe|ZUA65qLU2XS)dXL9LT^{eXPbn zK^i=1z!?Y$@T{e0B7y}K-cc72EJx(%yMt?KmX;<0LJ`OkgAy?)83x3|P_mSWXJHb` zK=urqTt3T&8f6k#vx%ZuQKG0&*cH1KwTk`9Vr7Z4BA!>;mAjSuxniz_tKjV1ZmyQw z&lmG0dZgC58%v-B4@TZ!9)e812U0=3;Y+xdPt-?KbaM*pxQT#@h@wvn`iT zF-}V3a^os;bEDV9+tW&tCmSv1xoNh9b^JE|sVq}kmbt)a#D+s`N6bpg%1X=4vfxm{ z40D!wzA@Lh#88lCPJ39pTU!!V61F?OIDU6=mMyE;mYZd>6`Sb}#^E+gnt5beSe7y2OA4li8eW$jwd5%1tXaEBRbxHOfmYVWwQ8O>Q%m7}wx?lZ`POSXvrS2;C9C2YbifZ@qoA=keB_DC{)9 z?x6qAV|R>aqd7JYU<-}&Yr6Gp>=%Bd<-IDp)68>#dduId0!S_P^@%)N7Vhs(Lp;ro zFm&zXAAabT?V?AuXJNM>{z`wZ3cBx`TKcPu=9Y%4dg+J}T<_7IpFU5B?fLQZmWv+z zW52-PRV+&gUPoE$9WJ+^A{#F0!a}=a(VTNOa8{HH4MPp-4 z&=9VKFT6PEHsL0^{q2iJY-0-;L7Mu1{CuYx`|RqmEAs{=7d5SK#?FDJmRO_f{rYY( zC&O;XL(TnPeRhbuJ*7FoDYO)94={^i0~UwSAJ@2!=8O|D1zWGX^L99oHld>Lp`!Jk zy%aL;>K5lw4;bSAj`;p4hx_mRU8v@7WHqYD3sY}bVS6tA$`9GrE%{}C&SM?w4J~{8 zI(pT;<#fLV&P{B-l%qPd{ahmb=fCRQRD&41=v-9U{?pE9o8wgR+IZEB1#xi;=FXp+ zqzX)q(5mNZAX z`$&4trx~(q8LT|B=I~6}M>E+kX4cG~DO)#_T|cvC$4uFtnQYz6nm=a9{+hu$GHTvT zmDQ)Rms4vJGi1v$*y@a$)|s;ZqKH{FlV-^l&0_7dYF?iuJ2i{_c~*^frfkYgcIM2Q zqI6kxI{Qj`&AaKcFVfi?={394WQWq&Pt$7ZGG!+-*)y3nUuMd#XR~0EXk6s&ti9E)%+n# zb});5KdYu8OV*Xeve`BAY}uG>HYU5~zp1joG&UlwCN533AdRg^t8u2u?xeAP=`~r! zvX#Y5d2tQDPL{fk$y+DAnIf&VNKaVU#uVu+OU=L6%5JV@eAd-$TqoPNjybwc`npAW z)*`)Vk;-OBl{2IhW=O3wq)TT=H_VVeJ45=;4C%=k?5P>-xfzy$8L}X&RA*<(KWq z*($4ax0U@gh5dJmr6WalHN_&e$c9@i!4{dyA~jgpX%@>ei)@pHeak96WtBEt*{`hZ zcUHE`D!q+=pHnUVsj_jY(ut`KM}erKP@GaE`LW0zzD<<(n7E*}{Dt=VFWsRhBjl+Mf$h=luwN`R$ zt$k*R=t_zBkEQmM4I-b7;!~UKuWlCoW3#w>v;FR7QCPWnR=Is^x#(cI_Nl@?Mxl*OT?NJL{Da>-UP?qv|%D$90Qck8c4qjsGQ=bd&pWDy+SE*uQ1{M{F4d@y z&yQZN(Iw4CCT@>|<*Hj*>P8=E_29WhSWTy$(R4as2&?X_^F*U0%~v8;bGn+*oUVrv zvFg)a{G;_QmsEcvi=m_u#YoV~xFO>Dn^5nqff<278aUvw+dOu)$3E_{mwW6z9y^KJ!cP*#BGeA(DYbg| zyaY4UqhQ)-PE*Hej;S;bwf?*o*;F^`7}X6Y!}k&@j%Xg1ucp#2 ziGbj%JM65!*WnS=`g%rPpTz3hs##&6Q=!+IovhXdV|TKA-Jqd<#PJ3vs}FQiat2&_ zCy=;mSbd{Yraw)Xs5N$$FRcLRYGs zt-q;or(;bkCC2OOE9mHLSXUXZhm>5H(DTTIvpgPdl+Z*_^~qe7u2) zEW^mL<1=8qMC+NM>z=CpdaCYXG~Z>4K0lpr1GR7IZkbvA6$7h<8*ws?<=e7=uUyv{ z$m&l@Sq)rmqYA~uu>yZFI{J($>Vs&0PZ&tj-jOr9Zo=rkcFA<7owA589Ww2gbuzxg zE~6x!mCAH)i)Ff(dZpU;I;0VAG)T24-;nb45a{Sm)NV=i2j1HCYVTl3>~3In@7o#e zY4Ga(Azpo^Ia|#}e_&^IZzUlqj?ulZV)z4MM$mMcqAx~kJ5BuGmgpOn3Iomj9Xq4G zV`Ef5m|-|Z--co9teMpwGO+qR9O_jW^}`NE{X;&Z`Z^g#&FJgJjP`HItoo%mR$r}V z1?@(acB4XD$_WFvwKtWlzH2|r@5x2px`>l9;Q9s!Dt#_@~avCc!x|-FOO3%SMkdOgn@qD^^ErNEBZ6f@SX4KzkWr3<6X+;n@&dGX@=}@6tkxBaVF+HF?awu(SEr^ z-<`o9hlC8%VPw!Mt2~(EeS46?+%EFh!ym50-4jcWoVB_YuilP z<0fr=G=Biy@iYE5Vbtf1jJm-9!!zm=9E^fdA5?l=Z$&K8jSiXS_+6R$KrhTSnR-tL z%)eyn>NbzdBa9i2zipSQJDf7UtsPZ*EAoXTsk&Mv zA2dZaL`NJjjclnw^`9Vhxo7o)l5WHi6DGMXz6MtkEJ#-2~;K%fDAyk~HFgVA7c(rn(tXdd6e zXb+Y$`VCJG4Nv^nrii9#ny;eOADA?6qWggwm;RSRSybmXnWkZhOn<@zZY+wqD3OhS zZ;VX4w_mD1_zk*QcgBRT(L2yA=&p4PMi2%g2owD!$MB6>M%w`QIQE+&zv?q2zluBhnCEBktA{#UK0}!||k>@dVblF&aJspCo z)eR7p26U0HF?=6{h=9beA!ywgumFi7^k?U>5g%+|^$h{6F!7fRZMR8(gOaAZ<6!hZ zKnQQS7;UGM;oDlNs7H2JGcgzH(d~~j+OH0v_4Z&l+}kE}yofhU{2nm)t>_zOss2ix zRC~Tw%D34e;@2mfH%ep9?3Zdz?3VJ!E2KhH_Zt2AC7Omcd>iPVr2oYsOqf~(H%@;bSHMeZD4eJMXc^1x@0vb8l7Aead}BZLq^1TQ^bkr zh=#C;gJUB0hVs=)+P*jKEM+49r2_2$W}bI}V@}$(Iy~#g{H>aaJh_+A9IR%vCpKXG zSPqfDvLxnWhVG0>b23A7a0!2WjWFP^$B9__ALKIrJ*?mk+Q3pv%-7Y@n6pnxquvuq z^$i^oA?D7u=wH^1@7$)pj4Zb!FLtoHGnd)%a3jw+(aM+MBJKkxYWO{BXwfw`v$~UK z*{IWvEdSnFmWK5Qn;-}w+a}(5Ci>zw{`4CCNi-0|!Hn6!!s;$$Ve&zLYXqO#>VRdK z?yQKN@PQb!K>(}Wr(!j4V9wij*evIbRG*H(82G;?b|M&~B2+l=vDWf@oKHP9(&@Dy(%BGCY&^DStp7wOK?mh2H z;VlieBu~7E$@NwU78jwY-)Guec3Dg}dccKC=mqVJ5OLZ%@huB~dIo>o0@h6I4UkRj z7zGo65itOrepGaauPnMvA&aT^mGSk%WJ1i1!ikp`#GGHqw-uqAYHk+D)R!%?h&HuM zeWC`vFZ|kK@+lkfGkkOV3|9; zoM!V;MR{f=Ps zIjUvwb^9OU5nFX`@(1OrB8Sg1Po`zO-?`Vebo=LQ-D?oz6|?WT@3zn{f*wam$YDTS z?uKU7I^?H_%RPDCK6j*L(cI>imveL6Lc`U$poh{io10JxWf@{+;<*<+1nzV*oIHVe z>&f}{OTYoagEpJ>jSG8}kk1OJBX9Ru8 zHWCQOQqN94*eF&8f-AhVWm?Xqewo9mJ=!C4P&St|yYDrOod=R`Q?h#VF8nX-&|Nt- zu&qq9VUXOEoT>K__Nq&e(Cu=!HoPj0Qj2|XY_sCuC42M4~s?sfpCd`q|CTx1SFzjOF(K=v)}tK0}LB~{l& zwASt(E*{wt=V3HhPK(Z=je$6{<+;SX-RGv91S)?|i=LZu!jtdEp?sSk$dU@Emd_}* zw^5+#h{LDMTiUs9inXz7f%_*e0A7FpZU<5lke3qiGiRc5HwGy^R~^*8h6Bbwcl3PW z=xKHIv^kU^G_uE&^dpkaJ9@r!^nB&$x!|DruX8>$UFr$^hog9!T6%KpY2$Ol`X@Tj z{6~8xdXfjYP$Z*pD+=#+cxdoQ(k~Q~3%YY&&UI?3zmFRZFe>zC5CrR;+z8c0(CtHc zOCdNe9SvZ#41!s?sV!9tD8Es$suMYkhzc_B;m`k}ktpBPbr~jHGPZ<;}8b{nLKfHy_>F+`0kB+>@Q0nIn zpLGCUI-mN=w$Ndre6Z6G^RQ?kFYajW1sx8~KvBxQ0|ke{hH4LCJi;~9kCeWiS|`Zy z6{Nkq*&|RF9X?jCfW&~U7&}@dxfduVe_#qGc_A1&a3XCR9h4xm3kUh;NHW#}E`u@Xh%dJ4o*N(XjMOwMV}1%^~z6qReLz9Z#Rnx`Z-4-HNXMkcXQf|x1ZL3&-odpWAt=m7g7 z_@=5tQ`$o2FI7F~@aaC1uDYLl z*}l9j`*S=wca?A5?+GB=mQ%*Dm;sP$>nURp%~D3QZ19ZPTh$n~X%k_rZuUfb0U$?J zs?83c7csnx$~~E11VT#2i^k!!ztBwAl^Sp9o?1}4yd+R!_YMIap?IWQU(7S~Z-It^ z={d?9TX$vw11h|MQd>@ITu$5AihL}KF7EAzRo#gv%A4PM~?OoI_O{=>*;p%{NM=TSt2h)I#C?He&&niNc-E_N!gW2s-y*1+fOE`ICHi+>uUS^n>Ovq-qikH>AdzglT_{d zy7qKRL|w;gkL@|$37wT)dyXGROxK=codgIeQb`y594txubV>Vr3(B%e=FP}X;>;=$ zsMrUXlbtD&d72eH!*uQT?Pcw|wzj_y65XVE@lWC&W>kA)rzmA!*%e9W`?bej&Mw_^ zMJ4J)iC1Kud&+*2wAZ}#leoR<3gTd19&{_)8?Q)`DBu-Q`!P-X+3_4{Kh}A&{p^SB zrx#?S(yAFrutYG~WqY!d%Ccu%Y{)99J%)_PwFlP8eWh>gDa%f}bb4Reyp#JV1t<4i z(WFS)&rXmGA!~G#O-tH?>N|*&n#_{<2I z0YxFHOUjW+gqn0nvV_E`U-J$Qa^QR8g>6K`xw%WdCH&^XF1$t^wReF zdxw_Ydv6)F8$2GbA3^VZKj}W$P?DRhURHlxasL+X`;IG)D}D{tA5$Dt2!p-iYR|Bd z?U`q<|J=Fqy3l^2>)zo!x8&+Fv*B1>iQQ4>b!+Qrv{YDj??PTziOpO>-P#g!Ep?C8 zme|@G%T}aJYHzsLl-G3vmKY|my|IhNrc9D_pKNaczB+2UNcS=Ou|Zowx@)_L*X9)6 zbzKUt{e@e;F0Z}u-iLX|OS^))OZP2@_dw~%(&eSGzc1x%*UBk~JDf*pBwfEF-BBlW zm%iaaazN-ZW1kAhHrJVtK^Ki+HaGrYZZJE9p5dd=rTja0wP#+51hSWGZpqJi-O!5L zMe0GY*<4!!4HgEPAZ2Xz_x@t*l29v%T9ewp>_jcQPPU)F_r9%b1+~hk^~O*FhJ%x3 z%iAxe=Bz9S&_8U=W(VwZgQlhZ%X=-hNiebXNOsujyH=oZDiy?`aBzxx;B!!X7ys7z z|FHM&!Es;Loo7>&N0zO`q#2Dee{2nDMq$m)%vy|+ac$M^8VF0_CaIbqLAsZUlbVpG zWyMakA;VF)8*kOG0W=6iBtSNrFIQ%70WdanbIEhVXH^QhUo!W`f z4WJZhD_e!K9NPr;^F8ivIr{LlSAO{L`Pgk-Bo=tZjIPvWIcYwe3#KLHdJW}7gtI_&MT?09BN54<& zcUyM7_RXm$rk=R}{~ll4e(`warz%fWeya3D$z2%o7b-t>|NGpZI)49=&)KK{L!T;- zS3Xkt$Xx01%1_-}`>A`(Ko7ljoF@30^UbQ|Sk!XmiFIB6M&+m1-P@IqvUC0y<0nu2 zB8;JNxmM~t-oAh5r}?~Vsk?DtsnSUG*2X$hrP__2c5b!T#=y`U&vN6$v!$!GnL5{g zX=h`9`|(qqwX2DfiIbhRnHOs}T3(;wb@%d%wX4tWYJK~7XR4Aer8IdFV*Je7^bK+$0TI>^_gXMf=Z|!dV z$=X~)ZMPqPcl#9kbt*Fhn|ae_)qSA8vvITj-2R<<hZ}-2_x$Z-VO4Ejn6@jhxv0gnM?q^`b6mY+RhO zwx(z$`n0}zaC-LQEiN9jCy()3^l8(@W}C;FEp2>SKh~V^#wSPa-+BBOA#-y}Z6~K1 zyO&PCeDdV!)2H8_OXVr+Ro~Y5mj{lXKJx2F&eW#s+jrgntry;|*0;M4<;H;nyVhdg`F!ne z<7wL1xBj8{_I_+|J~x0gk15xbW6)h;hRz57_G>!~=;G`1~WzH#a( z-`~Exbow)cZ!gu495_;2etGE3J3D?J$b9rnZTTwQEst~@ZS1ROD+pVs&NL3z{^KIE z`8Qvf-#x$k?Z%>}_HVwhdrsdL`Bty2#V);2TW-8us?+IuZMm-L>C@lto~!eie%5O{ z5R`V`Iyryxjgu$&&ClCAY$mDu-}u7)Z+}6*-T&YI!rJ!F>&wfZxO{l<@csYzg<<_F z|H1v*7wV5R?9ay=gZCR>Sp2)#FYmqmoxh9y!e0A0_x270ed7yu?Y3RKV;36?^WV|p z%b)mzPproui9d4qk@bc2t7n{vpY05m2{IvGS;P2G_c_aAPCzmGg`Ty2pgTLb>pLu(cLo~Ll0sXD; zU;PCC?d3nH#EG>>{`z+s?WbT}?ThVm`{(w|?c7#xKh+r8Ig}bYwRmdo_*}O_V(>8ZI$MR z=DtI7bBmpGr|g^BPtA4CwbSVSxwY-jf3c2iu()?uy+t-~b7=&>9X7tMKI!2D|6hx> zeK7(DBb7KgbZTzB-js6IYmy=O_YwR1(aPg%vA_A^d$EkT{EF1Z+xN>~THC(%Md;W5 zQ}%0r`~A5utv$N)OS<#u&wi=i(J|N2-oAhT-2Od#?*H&h^*wv$_Us2%bL|}+_rJw6 z|J|4F{|${C_)=r%QmVuKN_D_d{jb)~8&@|zb+$ui_3QpSU*doJ82!5U=Kc4-)ck+H zB(5K}3|1pvZ|~%N|7*RmpKGV0U+d9$G_rLXZT7Xk|J42`LAv~MW@?GJ_-EPlVp`p2JQ}+Av;*<3k=bqc& zzIj+Ziys18_CKkAOYNPFZ32FK=Y#)i5j;}q)8=n$v6p_g_Hkji|L@NicF3@xm6&tu zaqr$Y77x~E7C%)VTijQ_y7*MRck!|MnVA>Ij$S=@@7|k-+Me0HBQ|Hh8&lu7SKAS_ z)%y1vYq3B2y;|#)ANTniUYz*o(+G#3TST>(nu^UWmcY(Zdu(xPZtbW4*-N#Nd-uLo z=UZtl_Rn5|%)RrGpR3J-n~(mFFQH=n-b-uS553el@GL4t_ic0n{XPBcTI}CO7t{XY zZDjtPOQpF6o2lhz+gyX)*7CFV;lxY9r^DV)t;G^AEol7G3!HYa>Gx0T`rJ3(ocZas z*o~JQC4Tpjw@QsvN_HWZeEWgMk@fF!ZGN$%?baUj_n}4XLq|??^{pL?eDBb&43d_N z1Z}q#56#Es>m75Rt~1-Ws`b6w8&}^d*Z1$=vu#^rhzpN-`u^6Pdiuy?Z_N)44V^kQ z^wt|!t<@vXKK2X}UmFb`qFF8)k5F5=M)oZ%O|jTpxo6)hbsReMR&|WF9^K0j|FVAS z`WwvGMTsDSp1aQt3TU)`pBnPsq?0-?D#kat)(e6?6zZxi&OPoLiR?w zGc`4TIiat7JkfqUG5_L$%T!h0_hjQ@eaFGQyBd{rV*bF1?zPyr|7VP7A9=d=Mnmsg zJC_s3o_nV4*!;l*FSPA`63pDOd;Y0iPxI>T7oXeFcC|azd7|?;79z>&CJ66le#fwM z{L|mB?VLldmQ20l*2Q^#_;hj8=f=fb^<(q=a1}Xt)3@EX+#UYvz2^H8jT7^UTXz3e z+Zzeqw;t58{qwyvzw5fSz3F$e$A_+}$JT#pul1jez-tZBb8YiBj`_9NZ~gvzv1^X8 zJh8WyxLyBRty({M_vGEi)ZM9he(vh0e(Y|nF?I5dw!3Y2kMU0r9OLICpLaLE+mo@o zvAa9?;qQDc$-nAu9%)>>d+}~UHegArGihH_oaq(l=ChO_$6SYq+ezJD! z0QSYxi$}KCv)zj)7+$vf#DTrFsmE#;AFCxEtDStTcI>g*i;vx7XyJE0wm5U<;F<4y z?48&z*2Wn2|8w%4M|akCy}5Wsu;ORF?U`fG2x4u(vF(}q)Ef?@ivpB>>hAm0-R2el zrhA_jPR`?Eud%+x}rK}(pbxbkPmFa_;c$o$KN%I?@wh6|gXNE~XryO8+$!c^nn zd$IqGp_IPC&z;h}JE=RRA=JDjen0rvUG?`;+`s?#r``Xz{m^XaHtZA)ML$E)G~8tF zH1zaR^lU>P>YFar+wZjB*?(vMoCC_jvEbJhDjry${@6n1BMWJN=hMN$MeZGvO>y_a zr$4zc_Fvz={a!4gUw!&@QNJ?!b&FrycI#K>_Ir=U?DE0^hOuyhf8G2$G_z3gqnd;3 z{()f7I_K!~`a2)_g?G0vV7FrZ>am5Xk1pKa*6{1Mbn4FWJE!hQa6QG}jc=WInm=<3 zSXAlk*G;sSc<=tz zVc)0b9{wHO*I%IMpU@{=anCRGE;ixeL2;YaJjH4rXEpg7^e$8*=&!~8n}7e#hj-R? z{`o_1wV{k_2PYul{Ife- zMlZ9CVJVNS)JnG-dv?}>y|p2w|i8J+m!CLHsJbXX3CvudH~l+yOQU`GHy)kc z=GS@P_rp&fgDb4X-Z}GL>~l7ee}dt-^yX43#dP-8O76q6(FcDeldY9npZFK>+o`Kd zn2#GrYr)dd&3CIfA$&teq7OX(`?XU2lO$`r^Wmp!^KUlx?5W*J*XH$y1>g8Kv#a?{ z&%9aRwGZ>xV-1-7#zWC7nAYa4rTVVgCqId#@JZ}OZ`OAs6s0%+I??=^y}EB~U-O$i zmetqnpX~nD`oh#M|MPMFZv6W=pFcjeb82UWpO$Crx~|RG9ryc3-}mqG*4KCHr{&40 zw`NaKZ$G|G-BnAao%g;8cAA~w9rFg$~G=?5paVJ-Uazc(?xC&$K<=xKV$aFLU+J)$ZlCD%GA!(RpWQduONn zo0x0cX_wvaA8~Wf@#DOH{5Y@cx#(pYQ=>of?#?~!Yq9NLHecmCAO5*_ANk?P%HO%;O1)t^HF0{SQG=tRfrJNCBkXxnkC0Yz$SyTuQLrun(; z*vZ;-x;=F|bqdG(@%BAWwx@R;*s~Mg(DCNw)bTyf?QC8?z2{UZbt<)2kKoTwiMt=z ztE+|-{(5ajcWQ5@A;1JAq5CUrsdUQz)ZXBP-YMwQlRI`F*ri!N3H}^xTyC#F z_0T1BlBa5Kg8%h1jhFY#@Ri{{$q*0L#tv@2@hi2NU#Z=u$0^9`)!JRP?5A?EakX~! zYHbSbhL`p+Sw3mX?#k3Y091Pu2)(fT*ufhor>xhRr)vI2V}>0#Ro`8kQs;QJP?fBY zsTXQ9FVx=bzKVL(Q=92wp=Nq(Qj#Tuc7?t)8*FFis_Tw9_hxhs4b>hbLUU>h#&|%TVyO?w}1Af+<`*r

R3#zn)WTrQFS+P^^s6Yp8E4&&LMFmV>^^P2L&GSM&y*oh=os zg=|(CyF=pKw^A6oGn&M zA+1dWZnPuS@sa%acrLpf|IGP;{_uPvl|CBl&1J^JYkE`{mjk=imF!O^Q%7Tm!x4=k zIJE88@5Kb5e)UkwF{t7M_ez1&ELq`OPNCa z(6-!x17tZtgHl=#ukfX z%bImKMl*3gqGDlumSO!3!-_|*JE(N%Q9;p<+O;0!-Grtyg^JeIjd0~CtGN>PS!W$r z#=ry(b2JwX%}seV9A-hoq0I30IDiaocD#GGl*?2$#uhZ8rD6G5#XY!|<6XtVXem>v zj%OM$KD##WKuNw@)Okp-2t?H)9^s!(J zRG1e|=PP4|h~Y>npJU;cJJMsh*?KN4Rx5@NhCU;C7TB;NH`_85L$I(*(=Ha4qxJKU(HMe8jxEbMwf9IUnynsg`75WZ*>e54NIAVjl4Kw573d{;SB)C_6*oj z!FIP&y8w4*Fa(;TN;dCZnVSg?MSH?1+mWwBD4k05^(Rwdy6?hZ zv|k;17lX`=Vm=GPYQf5@03$PN&<7Wa6LHY6T;>AktA=_&>B(ZgTr8}H)p9OK^r!o} z2hz#q@GKi4UlAY-S44##>KU}IWQHqE3KHDNXTl3znhg6W4(39xx|3Jqxf_}BYNle- z-!ygzRk;Fb6U2%mj;h%>p}Q=g$AmIF$d=c({&apk>+s+KKwQaXuCt9b-e4%l0)SB! z2;XFd=Aj;wl`3S}?e#G_t&GjCYK>;Y31E~1V<$zF&m|L=`})rYm-|wE-F=DvuxB8Z z98AYAB(H$r>16{8q)4<_uk(-c=(J}t!%P?&KoI0?~o(u?2)1@gl839}c7(rKGe}AGg zkqY|;&n5c1S4F-N^w^|Ax%jz6=Zf)4Avi)CC^S4q!+ah^%7llDl=v|MSP5_?vC$Qc zw*WO^b@<-~%rslp9j-h+9vHgPCv!IRTaA};HzYk}#8YzP;~J33Y^*BW^l0o-NlV?& zo?{_2fK+6jU%v(=h?9!D~(*qt%fZRtr~vYj7KwtQAlt}#Jvx! z$W0?G(uX*#a4R!Dz8tb~VH?HaJT$xFksDxiF4%zlv zj*FWJiB~->lyu0*Y#3s=Ah#Dg4L})>2CJb-mhd5V2a`1*4VN+!L(b*J;nZH))6Edc z5-|~GJY86KnJZ4xrX(rtnquLr zurP2g%uLX@Q6Up6SR@v?JeD`~)xy#Oq-=6>)+lbS)Rc#37xge*Fx`;GGi6v%0x{{F zWCM}A05X)*zMD1n10IEwKszT9rfd)b5yi|A<80-HZ}b-okFhv<40b=O?Grble+c%F z)y6k|9SxM-M#B)BOgLVhsX_%=s9ec}+9sRrNSIQ@&BFBd>-{U>#;hPh>`ET%xszwq|bJtmCkn1m;?LB#?0gdEeR+3PT8^ zx~Y4mKvIKP9xuZKjGD53>(9{6~8LC}r*6Cp# zU8T(QI4r>Qw0t3WKnCiqPD~^W*Dj*s5f??whk{l3@ue=Z-%I`rIkPzv>A-Vftm4a&M*e>m5ap! zTWN5(R2>=;JhQps>*atxq2XCbN$EN*UMh`96&uOrU|-|oD=ayXk-ThjKVpycGGpMG ze2Mm89}KpF-qKk=kBAdq$RG?LwOLb!jPHNfBP@Ly zE@`r&3fD#LU4N#qGc(4$%I88jiP}*?T@hIwsv@)77K#rbfFN!09{r2GInhHJQdVL= zJjTl{(iO&NQMx)zQB6Py0i<|Xn9aZTnqCL{7qhv=G53e3=i*2133sRN28E-y*G?pwaIvJ~wm73odIKtf3o9q!Lu)Iuu7z%rG8bV!qCq{$o-Vx}5)W=cc3 z;VPuNr2%8;6IH;8EF3Z=(je;juz~s+tpd z2H+4U(=%vC_7>Y52>IH~hELZE(l|hF39Eqt!{mmJw8?KE3-pDTA^qadV)T4Nh%KmB zA(IHEHm{U%HnYi{8y2t4lj@MTgdS6o%!CaO7CU^MMj;w7M;0qC8~`_E37|ceZD5QC z-3T?hhlEy;;Tpm+&^L{|@Vc9X)O}NHMO>HyDltGQ1%8cS!nSbf*5wf|(-t%UAUO4% zJ$vq2`chBNtKo$zCdA3=WVI?I5JaNHSm0d}WF&?HeTgK6+$_QXw8jAo3NkUvZP;mK z@R70w9hnXM1y;eyjZVds_)y3Xo7S=Mik64YvDz`2EJV#%_YnBV3KSf%fK>*1u2e<- z93Dd#XE9iAwvXnI7&M+6sRT~+GAjZq6R%1!V+R-u3A$~q!Ftm})gD9+fgRNmD=b8S z9YjlDK*>*FH5_ zBj1vZ-~*_HhADw0v~UBX)Sa<2*AQ3-Lozw22?}uE%y#UQOnCO(0QRWh!oaz{t|UeZ zKx0-dP){$=Nq#(l{j}&3f<9JsC_d0}qbLV`sD1^}Q0?A=?OR)rvN%B8Ti6i-B%gQm zRZQR!dpA+pLBw{)^Dtqii}B4_3J{0D022h%9`wp!W@39hGmH@)NEmAr@jB{+ePIjK z11l<4k@AFw3O58xn0l|sGE0V{iogo*(c6QGohcVG)5|%GQQPu-DjS=sKb=qv*|yWl%}XXd}`qkXRe;2_ONB za93_JedGuU-pmZ;{ko8e;V|^ce2JNrB?cI4jU+oUUWOR-^bPi65Dm{>N?n2v#4jgP z=ljm}!KP&krI$3s6u5@GaU(fQ8MExP7GtTvnK0W3Mo@2=gzMT8@D?nbt&5b1Rsyt2D{&@^xyal@ z8EkRgG=E+ygg4d()0uIz+}pB`1C6+M9AUT+uv}-IFeyk7i0SOQ&&U24t!h^2Zggoe zFmFMaE#*fTRRMdR8WfI$M!h^MlQ$j>w0q3KSinr!L6?WpCL9$NX@gEX+o7SMgNAuM z;8=)`Tm?wbthi)m^R5^hMsYNkh)CH4i)^%QVm6LJ0T4P&(Yk;bLsf{=D*i>o)m5Pe zKE37+F)eV6_PogYp!+f|3r`8Fx3e6XhKp2yfF(a6sA$3gXjjbUN2O_`K_!3Ri~yAq z^0Z^FL(&k=_6=N4^!N8Yz+beV&F06h0g+5EMopPEM~z(pQZx^d8L5_J!1awv9)$uy z?WCk_ykfE`FAPXt(%KA_UlFRW!W}XCb2F zPDDFT5_nN6MC9Qy5P$?tw-+5<8Jk7mTVjV?8ACI6L~2Q5U6A!^o6trYCEy*HMh$Ry zttq;vQ4m2HGStTQkCzRcF~26aJCRKVCm!=VzUiQg@YETR#NAhE z39JXw1#lq?=E34hc0r3F7lDI1R_F`8;b7Omg{0hp<_#4Ujhlf-$^ouAn>C}}aF>{U zk3psB3yu}}97K|YQ5E((>W?;wumIueMy66M$^*x(#V-6g(V}pq4}<{oqi6)WzA}fx)!5s%Z!<^AuF%M!>8EV1Q_v`z=cm^j?J4 zmc#EuQp-5>3zhf?fORX$-oN@$W3B? zhkMg8<1qyorNdr88Jfu9gfm%>JrCMA0fP=rn}y`EP_m=p>4mEyUR1*K>6P;XX3Nut zMc9nokxnslT)ZidM}lO$1z$iXDT$()wg}R(!DwMI#Jq|mhp9__;@ueM;lykP!y|M| zTS{7axhToKF97L?bx|X%k&rxEGN^B^%$}8ra0$C>F)n;p2hl>)tl@@N-60Il$8G{| z^boBgv16Gx@fDiu1%T_hS^1%oP+)mi(Cg)l3SrRL^qU@BGalH|w#+Faf^k~ zWL9_?BhC3y401H8ibGr%PPSvAdOWgxSQG} zW-s@iEEXXU6OU+NEv))AcEYA8k)S0?ByXCIW+upI9GwYpjE@&*3AM4MY%&HDPy6D| zO6^>h=1$c*m{u&0T;M2zBvk<>-gIqh67n^V=O-{v8wDnoK&E}ua~LMJb?@=^)#u70me0e7Fv7Mwq7(4fOg)HU-#Z#5fVB?eh3Bx;7Y}a*RFWS< zzD|iLQ4q{nezAi2Dv%Ub)&tJ_C7UwcZMN|PRH;&)Q}#*d7%?}J13=fniW$9$H((!P zC&8pGA4vjTuj`1Rfyy`+w1|LI^0JHbikDGOQKCeZFIHK5;!w;h zp-zG-98?2V2lA6aSHZPJ2xW$Bsxh{wF(Z1ASZ0WviEl*1iJmEp3m9p{fm=owI|j}b zK=kOo4VogEWclV7?hrk3pGKg5c2{7jdAfWi4R8U8?WJSK&6)zrm#PW2Ox`9cO3zJ#E=yc4@?!qhko*&w<8N5ojPDDlKDw6A;a*rm7M(vqSHxmB1<5O zA^wVCrUc0=VgZw_)``20t+q^o2_a5+l(E<;=8Y-3I9?o`jhmSYlrT|nKyg{1y*C&u4&@z+6UJh+rA(w zd!L8m#_f^UB4XjAR=56aL0}64TM*cSz!n6yAg~32EeLEuU<(3U5ZHpi76i5+umyoF z2y8)M3j$jZ*n+@Mg22F-d5#oQi`^J2yX?;j;=q>sgC63gu_TiPpnM)eA}wX8>BApX z#7K)BnfR2*iJvP^Vv)yM+$Dz+Zj2!MK%|nHgG)IQQ3yREP`Kljfu0@(L*;JBYbAR+ zChIH7`W|7)asQGmim@Wx=olTroX!`P$ime#%#9m3ypb5 z>=~BxGRT)}GuqVJfWqS5|KWGdxe%D`TVdGBry%!9jthJq1zN??|G_PM-}x}y1YFcG zo_Zfpn~f9MM0~*Y#o-LeV6=d-+h;Dy6+VF{4quzx0OmcADODREyDw^;XuUmM=Tp5xRnxtv;Hc_w zMebR`Hl1%mZbI)~wPm4Ei}AwCWFf7VjHX~!p9S*$$ZOY`8c6phQ;JyW8P`I&cuSn9 zI5-pzD;F2BJFJ-b0u>fb0SscheF!SBrazr3A zRsf~7Pxrkt*cW!D68&Ah^vpghDgdbUGNBycF^;EH74IcpMG``B%H0eJN6@;-U#4ht zp-qXTjFxSR_ldjm)aD7zk+;aza&VCof|O#r2xPY)KG0tcSj++K5nIOt6LIP2mj58P1P& zE^#517_=~$fPJd$HhJapilbiX!1;7NHz`k)fB_N&BeSH%jukPVQ>Oal+EV`;o=G0ZL+)a6S$`}u>UaLQmuoXJ|fE30`Z&9 zeP}`Peu*tPP2mKD4-ngj$FGSWippov0U(h%B+%h#Yt1Ox)Ux>jBd2PPxWhrx={I@Z z1Ob<}tW*uZ-+&r!>|xxdmQoeC_dbINF;)#gY?16ykV@vC7Krx#?{M=Rhr48`6!&mBhotzzAd)9Uq?!vKHp4 zoN{>#mlc9)G*p{MScm(&>8O959tSfcENKKsXypbn8tELf7^br2@nu?~(0KKnq65o* z&#NB`cyrnDvu;fpt9DDgJgmYOLR{yI)sOH&fFi&O zyppS4;VryMTBm|I0^8BF79IvRTvSZ9!U>uoLh9;kaY|3f>u#|S#MW2>t>FZ_+T|h% zFC$W3cCjwJ8Mg>LV&HtlZyy^3OyVsS98kZ+@sU>0lR}_??~&R>h9$9L7LKZrto(># z`7Hv^Q56OcW`Rlsm>Su%08ubDJ8MME!UsH^wDeUU=*5&KiOm)Tw1iirFVR#5^8_wN zSZGbC#HfRV{8TlAwyk_5R6R^Gs}j6&eAuvANIVeN*E;qVM}z-=!R zAA|S5+e7Fj^@6mA2+{(rMMb^}fSgzgyCK@AK#(es@3)l25>guBk+wsdvWfDks*^+j zAwelCCkg>dTEeZD&PjHGEzO3bNPYrOe=$JVhqOq6Qr;qcBwS<_o3D~DkK|ci3!77l zg3+bi5)emSBD3Bz3(Y(dm|t~qP{s*2wy=vm6VSgwM+~|c47HLRk2#|oF*;CoAE)Lw1dhyl-!CaNTsNH z7OhgAo^tbV%6PsU5W$QP&iZLxcNx3#w zxk<64)V=a*l0|I-dR`}OVpwX9nn$fC$w0}5$Qk9b#8pb>v6rcd(D6!+)FgGr*r|IX zZp2uk;w99Ekj|#$;f?{+Wy(H*2|46oR>vu&!VaW@;pgT8Fq+kv?i*#_sYA4y^DEfXi@K2*JU6-jP zUv^V=b(l=$XRrn7sGwunp*7S2W-J=aK78FO3rZtL4uw=%RTV{*Lbr@)NmQDwzV@0W zdBP4!MmI4xqrzwisHRm9GISN>unFNL3t>Qnn|d& z$@jk-NJASdvG`FP&N!{n+eR}6EmF;rSG1!%l?c&Fnay&?1(oOkR;-=Ul`QzO@H+S_ zsTTqu6(eVAsvu{vxQd?FT2QN@I%>&zvyL@K;+4@QEt?WJ(Tpw2o6gT;nt?$|(PJ;s zhBQ~99rvzSJp>upczay6XEtyRVHY+;sh1#)TK`o7p1BQ}Npj$MkGV}?_vD6F!XF0A z7gmFDVF>fym>B>Ha2}_}0wXH*6axf9Jfan}3PywA1pOw(3790NizJV_L^)A( z)9Dz@$Vf2WqQ%jIVOA49C;<>3F(GW7nIW4X3X1~!ZR2vs0{bn)5(9+We4^y=M9fky zM=cHv6>dxUp9q=$_izw1#!C3UCdk;udL@;jHa4YXo2*$(e1ZoC6x7ZkmbnaBv_fkH z=pzajhH2U)B~{rAdj~EJCYefWg+tL=Y_JeJ0bTho0ZNYQ7lG**fKdnt`nUbABu>WZ zlI_DpDwzl&kmgH#;}o0_bU3^ ziq<*9z=Nq=9Vyk3GYwe8fij@303@ogwfDdrz9M1F#8;Oe7<6SO;8>#t%ftYQR9wyG z#>m14=47z`haicS=+&@gIXBOC6U-bPv9@6QX{Cr&Ai@Yurd48GZ$%;CHke2yq{eH* zkvJ%Ffwt;vXspJQsXkH#N0pp`(rQ8r3lL>Do1%f{iK@ts8pV*N4Wi0kJ^2D?fKY~X z0^QJn%*sz)n-Y~aH6XO@;W0BXZ<@9QL^bAW^oY;H^F=P;vxTDZ372_44SFCt$b@MS zRd)AlcqdqpO@(HyREKRtrRggXsgxVeiRf*Jc)jPp`w!Z}gO^ei(J^#3fl&G6=z$up zE3*JUjA|@cN;Ub)g{*`zUIt0?WNV3aAmZpfv%8vpBkMTyMTF9F+w~y=j>|Zf@=U1` zNEH)vn_N70Br{YUm-WnM2Xp}_d@Zs>ZxZ+(emJcPd(aD+GL-f17H&dzGNdb)^*NzT z!Brd>rcKP6_8(U%1<`b0l2xSH8tP2+rJdo`UNH_<p2Gn!C~VDC{n6Q$TtJ`sANypNKYcBUrykX z)5GLDdGpNlm?{IGr$7=(g3YTKZJ4Sh-J&X^uSFFlB&BK-7gfg7 zwiA#YDq3wyr=tlkXxC@PsWhN@SY+zT%}`($SxOczbqU1!Fc1j6uu20$IH$UTWe?}F z&J994&e8`6Sxg(5=n|L-$>mik<)%W)94AYQNhF~e!U8jdMcHHQU$BU^q*x{eVYDP! z6eAHaZ`d`PvE>YkN(Jt&%fFkD!btWdw}_i))b%A#i>P?scZnapa&8u6eeAbORIHP939Nt{ncE_5rYpw% zP~chBD>U12(>yGtDehKGo6)b>19Myr4tpazc50S!V=VF3Zc`E-#gfjEn!#A z79v%K?wV4(-?`GmEYLz*95XToPihXZ>Db7WRV@QVaK%X`LK_)|9LTMvsl){7GE5BK z1Hx!Ef`-3JNd5Vl2lIC<;c{merVy^TC70`AB7DzEpvcr|`R!j>;Ef=f9s z!_|gKRD=#Ezwc48E3-=hza)G(Pns3$a|RtNA1n?(p|UWN8AOGJT);!?BSN5bR?$N5 zK^L?mJHaM+7^O;3Ph9~tbR`kZ)bl3wq!q*{qXnX}_MvIT0U{4l23sF5J8PHO{(Xoz zUMp5rVp{cn747|OfHq1DVL(avwncD&rO-5-$g<%nXk{*b=buAhJD2QZ<*eF6EA$C? z5i^t=tBp-bezz8=AX;pw6=h|HeSASj4=VO+B8f6Kx^l}AF)6l>Clp-zOZq)F#eKqD0guD!}v5D2UBTYl3iV;r+OCM|zSXuWO3=NpugtrDtPfKm!VDTW+1Ozujj)EA@z3L3ANaxWh97a1kQ`@lWYSAc07O(Y_J#IXR@;%ln2;6QLXPoBu~Y58X^10*nw^B<k zLO(3*oSd;C82w`*lsKD6_a;6FL^>_U^nd9gsCg<`g)YH1XZKMdjZRk)2~->t0R)_p zxi_l=Lu6i+s19Wmtz@TC)&wb(6|)rjitQ?_TU3-n!ok05wM-!}w#%eTupl}vfigaB zx5TA?i<_%@$<6q*YKkvAybz*6G4sAN(w5Ksd15Q`*6lg1>?T+rD7irJ`)1#S6LrXNilV3jNphuj<-T<2!*mh z32jF8guU5p>D~ik!jx0_hG8dF$f061fCrN>oykbMj>O66kcqC%524Y?IuCozc&CRU zR8>{I*>fTTtx>4j)jHvcL1>gsx38;EVooTKiQ^|MLKF+I$_Rr_GEViOt5S86(olu6 z#S($2MT9bE^5)p1;p>a$R8*&Q?*t9^h~wjq(Mpk|fQ^(fLwt?I);{u(*-Dw&n@!=) zBte_P0R#A*+Q}N&2}V{S8^#eaCV`t}WtX#qd)+gMw z6hkKD!bLMOn_KVIqHD#xtTHYoe0a3DUg!b*zw6Q<9t$|CTw;?5@v}{ zn$2L3C6J+0NzgJeTLhWH5R^JCJ2%k_(~4|zL2(2DC;HDOQ$dfa&MMWCc;n@x+kWla zF>`J$%Az{WLGu6UUTpb!T_(W`PrCUgRlzp8!)dw}wJdZ0p>4fy#~4iyw&lY&UF_cK zQC-C3j{ATscs5tum1(T6WeTg)jr_=&@=@KyHR38>E11v1&g|#|i(^s(kNg~)T9L;K z`#FKFcKK*bhTo`j#zGu7t`Cgs_yOc`x#G{Ek#!lfo!vk^j=?8-}? z+%dUuu!@7P=IaGc*D@T;;Epo?V>>_Y0_Vq(-Na$OtIqeM+#(9%PnUHRh~kLOn`?m& z!JuMh_`q895oV)`*Q}(n25hPp+vCquQ(ORHGct^O$3)kqPL8i4`3xU;P`=KAzw~JN z8%rG*-1)g?dRIa&Im)bt@P-B$wa-iR(MUR>#s`X+Z#wQX_{cv79p$o)y94F*rjK2- z&-{* zEQ?Xeiv@xKN(%pWb;sqpVlIM>mh(@J5Yn~fZyU)EyQIDq4$8GK5I{u#}YpO8!!FG0k-A_m>zh2|3Dpe3cMT6nIi za0q$0bR$E=qatOmDHCpCAW0>=GX194fh3LXR@?M7QLox}#8G zU=}JU*Xad9<-1v@Mf~eHlG9Mvo1(&;=*FFE@c)e3fd%b%xx|5`sC(!#heUa z*`h^1L~efq6a*HnCpq?oFtOF=*pO?27;3C8^`a>-t1DHT>>H4eB1iKPqC-6&vV zQ+RCHdok$i@9sN05MDS33MVdgTo~kB+0;PK3Q;So!6f7o3EF77GGF7y`Z#@JfTO^> z5`)^g1W%K8hiJtrfe+(0d+^EoLoh4qrCGo7y3ScI2|-v+!0sX^c}{z@)TF zc2ro^NpJx4INO&x=K^$z*i(Qb1lz}h3CGLAzH=5#tE;>yUBXa*xq~nPXsH?!7JbI5 z*RX_0RyG9i!NTE9x?AbEGzpOpe`v^~lxv2{eai(}Y06k+N}4ic1vEAiQe4D?P)(cC z3ye*aB)(&icr8#W8Vkq8AaYg+6BV{0ktrM&#%@9Sa7z+VtgeW71BaqOy)CGctj%Jc zWF|$Sm&hX)X)ZG75|x~w07e$$O-jb*13_pq>eVp2xlcfEs)^}s37K(M`Abrl9wUg8 z;3by2lZ1}{P6%=VblJ0({X*U`;AtX+2$En&WtGy z_9q8zpATHuA@15qmY>61tbT|`S|!66+79Il#o_8W$GvJ&36e)CQ~(knmO%Rgl3B@| zA?4GuPl1<XyZQ?{SW$>PXjF}-s{R*_yvNP0x(!D>sFe1Ou6{<4>wVN?<$2~{pAW6KDygcpvq zyXFE>eX2yjIld6Qr&Bo(eGMZZ9eCq>8G1&0wLKT(#K)9VygHE@oj&yttUBd;PW zi;`=Nnmj(rP~uUh*`17X9-+oYB20=w8<(UkMAvf+VTc^^>sADVlvw1vJdDF3FT!H_ z(x7DtjS|(A4Joj&k}N{ z1D=K5z(DczoJDWD7NQ2%NnA<1k~EzeA$A&qB7B>0Qlu>jst-gZM^+($am@0jr%os~ zT2CdFQ$vB>=%|lu0jO$(`dRG$roJGXiT-q7_dq%+3krr9D7iJyPP~A?Fg`0u-D!y% z^wYEpY&?|yP@ScX2VM5)2X=KKkveznD`9VvqqE&Q!BE7v=qX_Y624DHHC7o@0!1xD z)H)a;yAfUmVX;U-l>%^eiyRe|qA2R>`u?CyVz2j9pA}1Wbrr z6acL}WvbInOcaMm3qguTt6}}v)E33;5)YcS+WaC~x|CZ;oer+)s#h55wApyHVD#J1 z`Bh#+y$PSD9|%3#i?}o!UKuX#1SJ@{D$~JXLMQ)%3=(QM0W5CJ7iObu3E}zsuupe# zR(=@H3nIEhHpO&XT5RSvxpv(#i^jwsZr5#~@39mg*sygwK^+ri))Kvomf{cgRG*q; zG>wNQ8IMNPY}tjaKUVK`0v^Rv#wW?nL~kAm5o6CK(`k?<5-+K@$zs_#t>QFh z^P$Gf1<7kxt}l)L*JQj_Bmw^Ufa)rdRvgILC8Lyh6%@1xTbBFS&o8wO^VWT4K$AS;JIY7i<4`U$!@F$ljY#E547j4dR%ptcmDp+Bme8SZ^v3w zq3vFlqsvYCIV6KIX5+^(8*jWU+G=3>jYWleX?p~$|lzYRpxMH7PvkX_-qY=<$F5?VT}`xj-;2ofZJ=QouxIzy^-KAG2(7 zY&>=e#)SA4YY2ur(%oNOGO@^g^~f6&juqf zPKqM9FIJxiB_E-mBq)0)nj>&GI%F>yw=9eZjs{$6uW)cA1wAN!iL_3Jtk|g@keSQc zabKC@1MRrVc7jidv%xi@YC(!ALu$ErlQj@K(5f58v6q>UmqcX1u*zM!DmCf#2#P#o zG!-z%qnW4^h=jv})(^6=B3rD+4_VQxLou3b{ePoFgaSA9&$_CQj#JCjGOSS=RDR!n2AbFbi^~wqo65D-1x={(T6wOPbj8}{d4wnZnbq=Qc(w9s&LXGuGn;4A- z$SgLVkTLVR$BR_rteN(j6`x&m=lfErfmC>Y;BxZcLX})Hgf_vU$3OJV7Sxv;N>*(M z3`=0yKFO;WR-n8Be+<#3NcI6r>!CxB|N6b3i-o!yBI~JI-t*?gf|yMU1kSp3=<$7j zxhp2#3H6D{wmasf*ghZ9@>;4*d&qB%=B}%07Dfz^{ZrBICVRYiATq=}5 zjqYgm@EeL;@Vs-1X{H0O=(iOE;IGS?lhFjE6%V!4si0N$)>TXqp{bnB8xR+ifDNdz zyJ0cl9HZTQ8Am6EKJg75%?SXg$Oxlq{KaiJQLIb$cQa#I6+5!qDjCzTbdaV?>~7J) zmO{+mq_)7YGLZ^+i7ygtq!&}Gf|GeY8*}zBajH$1^?dsLLrAf#QE3=;}S7_Yd;FX4~Onu=51#43tg;VVi=`De9g?B0oOX3 zmkbnCS5qOoaB!A=HPQNpWI$A{oBu^GAqZ{iLmW1EsE-dEsu?-5t}2`MnKrQs2_GJYhZ9ZE4qQxoP*djAofRxp*A__Ddz z&8z8TY4$iRwX8G*DO53m0CTKr7+?-5E0xQYi<1uJCQ8%Y4lbKE)HaJWU^jTcV!!At z&LHvr_kyEunffid7!#+DwR~SaqPPZ@-UGE_xdB>L9;Llt8Ty-ZhORgcc72crh z9vc2kU9*THDyU)87inG6x&c$KZ@^NIV3hOIFnrZUdGlqLSW4;%cQm*stkv@6HdXXmN7DRxv zOnloLj(^xzut%`!B4C&SreNBW%vfy6QAAH0v&Bou*&usa7kU6xMusw}{E<81rZylQ zHnG%h1ePAViB71oz{ON-kRmKTjM{mm>9Scdz`{HRD81!<73Tl7^w$jg$om7tHf=aY z#(jZ!GcRyZyjZjmxGLh{tDc06cscOV3$mM&@Mi`+LqtuA1vdnD zO@Pe#!dPaAZJ4D5Jn|o`6ILQ+qiJ;4;&t?}=B91C)ag~PB6B+ZBxXPmP9r6~5;clX zrs}(-MQmK>XC+z72CLdK(IM%s+AyU=N1*)jmSgOecfprtW@uVIn;E*E4H_B+;l}Y+ z$Swxh*H)A$j7o$(-=6hFL{v7x$_|*B0%0sOgiD0}lckA`)}<90*vvaAb<*d_OS}lF z0N|!Lo})sA?8Na6U9m7iN-%{sSaY4K!9qY#sUKo4j7%1zp#jlV1NG z!jTc>c=YfQjjy`^V{o}}~l7GRzUuVq;vS1?GOR78; zq%ZaNC(l{69=OiUINATWjbs3XI{;tIbWRew8Bnuou-926!EHt_cT07W6(F!cT*S~( zH7lLT2|_K(RYvc!!fL|`{Bi|r5bbflh_I&0W-`57@*pAT}m@NdQ^=$gAjxQ*dVUT%B+D2q{_+7QlJ!> z#uB|n?j2lRjI6`n+Tn+%^250g>IoV-X{H(1_rsi+?VR>?o0GjBwnQ!m*Sn~ zkITX4R&7l|K<$70OR9X%a8rpi=Jy0&pCP>1AiS^uc4Czla%2=#Xj8CMcSdb2(a1)L1tfNo z2LO0O`ow5ee$Q;RGAqLiR%|XKQbJv4by|}=jmsUBMG#fu20Ligq#^AL%BC8V1pZX9 z&9LE%vleTL<;6@b^0dc$DX6d5GzKTg&?vLY;+na>6t^BVZsLH%J9s`gJ6;_PNBO0f z_3te9QT^Q<_X2Gc>GKCcgk62+Eb$=k#vW)!Iwt|9AzK9&6g4Z0K8x~RCf5?oQ(oh`j>Uq_Q&*seq^SL5AP zRbic-7fN)Ey3qC}4JyVL#?pg);tnk^D(2h~MuiQ3G7|8pM~n(8b2d(7rRigbif$Nc zlpH@G)`_~BRw>9Tb`WgAIag2+w}Yw9>Pgt4$Nz_KVo~UT2w+h1##06(FjAIIU7-7Z z`kV94NGp&ztnfdqazpL0R-9zNVdF~u{x5PB?bGSSJXiVMU1oGuny)=in@u)moNPXWpH6xK-R zsxm{{tknoL%k1l6hOi0_>UJ^cvVT_MDx-@1xgalu_iLnO7d0a^_Hlv~o#V~=qVRi; zQz~inVHfP*GZOD=bk$8|HpYyMk=xte>F$zJn$M;N_#0lJ3^CJ-QlK%WE6CoLK!_rk zupttL)0I4z=*D+$24KC?%y1hct%dVBWUs`J&*@#}>{p%q=pD+YVl!^ZrXng`kry1S zs8YqU!7@brmPP!s&ic)$T3rZsE(zWWodIb_VkvZoa>!8+8WlEQmVq2YSsqHMk1ec2DJbv5P-0N<1rc{k}88GJ2HgJ&qgo+r+i=? zk21y0=f=|5AS|Oo5hIa;2Tz< z<&1pDq(_y5{!3@iCes#eAn(d|4Pa~nJ4IDT2CK|D%ZYCbcTaS>Z8vAk*=bR#(*Ds~LGXblyE#(!v$6_Ga-T${EtF+?_SoZ_q$KKbIrX5$)~BI`2+i?M{HLJY9_u}HM`Fzx_SpL2=B~+<5t%u zV=3--ks2UI1U>y@Wwaxs00`&Q(7pzo!=(GVjg~1*2#;urjp|6Hy&rHakxt!qg*v!r zNoG7yQaCWd9Qe*vONEGTynUGp(G|GU@r7kTi!>4N3b(Hx{wkS!KoCb1uPck)d5mA+U%pc7f4VpQdf>0*{-5&gGS& zo&g7ppYI{hf>dY450I)w9R&D`PS>Eyg*(I(G-IYbY+LPhf-MVV7ZCKLlZT+i0)z7z zI=8+qloTNXz|Ofv{Gb#*!Yx$V+E7X1YG6&V)5))qt6t|s>$GH_P3eV&76-n1X85*%$|n}`vnA|MZ7>Jq#@P!EAv8z;Bi5X_ zZe?PsDh8gptQe+&l4>Iq60k!uB4@6RBuJmfxoTYBe9{VThynm1g^HpjB-I_kmp=aw z>+O{G=!gg1py=d2w8_p_#Nv8}%be+(u%B<4Y(oHVF6ZW{t zUZ4a*9)})mfIQ>l_vByiadUEz2l@$OnaKVNJB^I>Zxp6wG(wzB#*o7qt)<#*p z;B2x3aq1hPFggrL%-G0=g88WR<4X$M3=@6bNstzn$|g3J4~uhQ{dW9#IpCWjtX0*9 zZ4ZYq7H61Zfd@7c3+Exd6o7DQnz*A264G{74#ldfMk$nO6_TuMN&{WSjtmei)QJQZ zJ6h8L#s^7QW0C=klxns<)_}B9HnldA4<`Qcl#PLiVEDi!k{1=$1NsOR02YzP6qG?k zEpeU!lvX@~u$gJNE0GruRNHC&Y8YriR0K4r9E9k49AJ7BgrF$p)+cfioUR?6oZ*~t z#Um_-SFAwJq>q8_elcmN%&?a9-Cy-%tc5>AEiR*A`r7g-N(l)CqLR5HqgOBun;X&8w4=^MwvJ zdGQehnHFNf$*A8Geb!&CQO~(+E0To8!>xdaUWWJ*)giQI-;xXuyT4#@Ub?0%4W%40 z?`!m9<1*!whaaNCJ;_9B;L5AvE3*jK(Q%w6x~hJYRRS_;t`&7?xb-Wew6a#!Ny8+u zT|2~g6TbZTmAgP7IqHL|X=%xxEv1iZ%=9(tvdadHFif zQ+y#|KBRvcbJgi{wojt)B;%_a&|(BZ=fI_N2vAm1$Ib&638zoukD{s&_DS5=cwiKP zHpyvq%zuCrFh!a*sR!Fz)>%tVT5!iL(RNb?z1-IY>Rz)lS%NPwLzy_@mtt1_!24(} ztVSa5Pa=19iL?QU-5tJ;@ClWMziSgI(kIR-oUWjtEBc^!U8xO+ksR&<0ue>-PjjT( z_(mNor$$o|PiK>WwMQT|mPL*t;(=%wFZ__Qg8~`|_X(LYsg~;&zz4s`PeQe5LI|qb z7783~t!{x73;Ak=f?jsh6LVsUo4T|uY6t(qEhlmSVDr#*79T^}~jSlP;iY*fX0EyJRh0jLIWLzmg zQP5I0AslU#URKa)GNyaNxD|K@afgTy9J_2qfTVsZ=f)!ZRE~-=a6{u&9nP2N?@M&) zEGBAgNOC2wOJ|yyT2Q`@?Zs06#7Iz4tVvF;GU-aXs?G>hy)JPL2o&(;K+7EEGh{V@ z&ycWSP@zZ%PZ;-fVXn(o7!DTc00dK8qM{W#j8-3lB>D%yOrxS((;IUw#gt6A0nkL5 zQhG_kjRO0$bSko>Bi~hI2}?%YSIHO7=SG%7N4b~c1FtNF3Ho!v+0R=&CuK9|bo^Jq1}5xKQi}vZ&YN>F%O>S1 zQNkafY-pqHV?lvVmXG_2hRk5e1S_5`yuRe?w-N1Lr6yYmd0R&c0%P80$tWwrqDZXM zX;_lmI6Hb)@!xO@_EWaFS)^yZT!IJ`gbmefiv-~+b`Hx(cf*$!0w{({RaG=){U=w0 z!Ii<41mWUD6^ru5FDFyy`_A=620e;Ja2B=>-?XY1c0exVL9ysYO086aEC}S3fgBDoi_3Ji) z)xZLH?PzrqiYppt)8c%ozrnRhOkJ6WdX?p zeGH?ZDZQ8)F&$9{l9VTu9s^1gjcrCw#9EnVy}3o9@ftohQYuA(Z>OkL^z5H8qJv2 z7U;vGLCG6Z_Sy6OI#Ga*fCS-?TZDW5z)0xig|4MAsk2)< z2d+vap@bWT+V6e06{o}o*s6ey176V>bxb^sIQGs#-a7jhyrq1iRcNsqKKT*DaTAZc zecu(yVvx~*niUe4oY~G)DNTZspmu(Ebdak~N|PX>LmMqokS82N(XgfP32tx%5V0Ir zV&AGeiqKbB0Y1@r(mYQOh69?G<`Im_AEU#y^QIHC4roWCRba)Vq)}jX6MIf@QYG~; zU0%n~tW{w~ep5Pf=SY_Wxt=U6$j@l61Xn4P^GPKs;Y`QsTQ+Hkm3>;~a$J%BaV&yG8k!<6alNM`ld7g5#** z=?`|eF6>*i9xP|~gBVsNX3ud#-?fCl)BL-VaKnzKu9&02=J;WAE5P#l&9}Yw$zTW( z&no^c_j4s7Umd!Hqg|tLhcLY@`~oIV`@)OD0YPN|QIBTt^p**N zB`W;%yKd=)20IhLZs^%3$o1~G)qWex&Py1TEoYM#g1Q50J|b-OKD}{bc7qXmVG&{FB>5oOXwVrZ9}R~F5s|e0 z%)o8Sfw0BndSTe~lG|UO9K6STEGGxVgx1jA9O7iKhe5{MQa*bWjKILc1hXqp(VXh~ zu|x5o#FLU>dvi}@A^uI0)^CWg&yE)Dy;fQ``+&op6h0LmR zOAZ|Zb_BuVZ#Zb}!rS+Qtt;rS$TwAq(wnfq{fjl|M=p5Gv;HuRq0D0e9hF&E$CFT- zES~Q)V^^Fz4$pasEePp1sp_(XE|Oxfwaa?p^*&q)ICz*77m|AV=o}AB$Ph))1H{xE zXiBkDc!!Y|=u+ZiGcwV3Ue^DVg$ zes#|1ZSSim`W|DLqe}G8>YR37BSMA6x;;MQbj3mCf7?VtpB1{}{o`9>3=H?!P&MPl%|I}u z?{MDF-^i=?kOuE2X1>z3%39wF7s@T1u;}E1tn7z= za{ESSc%kW~ubRCN-#^03I?vhj=nU_=_AM64u0JL#z;$dkZM>=|YaM>yl}#05ZRn4g&ws@_Pc*OWO?MRVbct_5=u2(n zALRQgaZ`rBd^aH~Fo7~B(O;Yl$N-3|ksiRgvs-xH7xs9ZdNtY)yZTLzGt_({B9^!F z*Cr;fXQJd7h1E)2B%r%n_neK7Em6iPsYqi^ zJ4yWUO=M7UM*kIcD!2F#Prbpf<}=C6g|=Dal)2(*iPa&KDL|A)fKef%`Dl@z6tvU$ zI2Eny_>h`J<0cvLXts|~8xdFDVr}x(i3<7^|Az=?AAIP&#HWu8P)b4+{*DZu)9t@b z{P$OGVoj8@e^Pl}pZ9IyA-RFQAI`k>DV6+aee<(OjLaM%Ey0Nyz#a~L)AW|0j&(p5 zNh>&qnu3g7FD%^^G?MjVvLVA#dw7@f)azEfzmC;mt1{^phC3_;P1Zm3md|K%!=bf1 zudjPlkXQioO<<~t{@#rW73BYOO^mKTO2suap#Pt zT>`)q$lLyMjIN&IyC7TEFr?bh5%KFGAQ;vnd;!=Sqw4`p@ZRx~5K+?Cy`h~TX@W3*V3wq>$27_UWsKXk3@g)z@yc0i-MRD;NZ>g9E2VLXR(08|Oiv7vg zBdFl%#${7?jN|OTO+V_R$7<`*JL|ppOlN$|ubauKJK)gaqZ-nRtqw4ZjfNSo?XJux z63<(Dhlk$xZyzPsz0C}89_}$2`>;DH)K#)U9$!27ToR|}<(19$3C7H#sI=`7i!$g#;E7SV&+YfrSJX68KL}0@A8hjq){c*0;b- zZquwH)wT^YLHMxO6=VoLA&|IPS&tT%Ct^x)Su_OoHC3QGrW22lPMA(Xl8_DwN~Z%m z8fORYe=visba1Zkfh32slI0`_dgLJXDHSs42|Sai$4auH>oyIl~

^o)5Ak<>P2GE&}#9tf$$ZuTQjAf5aIi49n_&5Bft%48W4U-NWT>@(>- zX6nso-4&#wu20tB971lR*9kyZ(!ZF*A1`ENBhe=02k1{`ZUpFCqpYTh3jlx%mCAQz zyrhtT>5#R)-6s{?B^J0)=t_vvTdL>RlgmDpg5Agohj$f^Fh*}}^u8cjmQlS}UsX6w z-*|?}l`ePMV&_SokedeRAMg;$*Ogwb{|4Pap{}@w4kIba<9;17N4)AR<}WThSr%gc z0iF?vKcrw92)HS}8DftG;vg!cAd(ua8yO7+AK4ZXnx}9VOOYA0;6dh#3iM)gPQ{UW zE^TdwZT z6Hz1PhwVa2hT)CH(AQ!oyLBGa%n7_0_Z>sHDZLCSKW!-wvA6-zQK2QSZDInIdnbDd zRLS&=@7g`PnkSMO%e*wmJv_|d-trG}J6EPJ(}oU_UP0as(5LDEH7xQbbANKbjaZ<~ ze~JynjrZz;N=A}xwTn0vPbg1e-1Fi=%0!!hf6!GCK_)H3gk3>X@wc~>0svarw?xpP zgwr9204uVC@O8ekV%oKpvMJ0fxx!>Xi&;IbIn6rN8ie3^d281s5&1!v=d_+wE5M=!7PoSa$o)v0O_3wABXR_nwU zP!ff9Ne|MJfEv_{Fg@X5#C9YFP)m_>{<<|DZzaR{r2lSkXK0WM-`+au5~=9`TxDYO z$&W2`-lgCB%2>%2beyfr_I!=+LW+cFL*tBq>|^ltw~y9>PF$mxE41dNn&CM$2`X`y zm!!awvU?NVl;jCS2pXz-2=G~Zdlz2TZp(F-_02*^E}7=w6uHt_;C-&Jf{k8;rfM+{ z_!U?Xv+=nt3WvFQG*FK@|IB^($*UVJzx2W7a@^DSGwD)XkFG%jb7&ejTVHo?Uq);J z*yL+e(W>xPO#7jq+;sRA3XIYCc=8^+0+Juz-C0{=Ig?L|L}EruA_ZsU#-N$l)Mj)v zz9x+qcx)7efve~r>t(P$tpA zD0jv>VVtwu7iw>M6hl#sLuieWHNu@mgTfng{~I(FEteTy%keE*XNwVjSxZrYvFp)Y z;i@V@NdJpdZm1p1q8N^hftc22BjhFj-*?SHC2V}GZUQBzFna9(iQv;5rw(SC;05MJ3xA}Fm z_cO37%b8q$>460S-uCnoRZK%rja&?srb&lO8&xhFfQ**T|FE>_GSa;&oJRmD{4kYT zig}(%=RMFeHpaouZG)&Rvl+0%l+(z|)K##x{KhSz3cx|-3C7dIWQ`QeqPZB~^>hC|&`w9a<@Fah3~AJXG3R#9ieTx0Y8%S8NF60_cqJ={QSMOBef1)_xP`vQIzq+fY&;NMPzyA?Q8w8kRS+qts&XiGx3>7U?N-#q#UUMNTpUF}Jmo9W zK-y(_k~%4ty04NQp|u9uXHt2mZcwa!*2wM68EB&ZJYSn-HM`vDnKhaEF51tmXneDa5B|_kYBM{D@iZAkMVCWcw*xtCa-hNjYag+Adh|$1$@XL7`W%m$Qy& z8SP6@k<^mE7};0{yT*p&T=0%BE(jsCR?N&%L8IIwreMhI7{U!WW_W3keX-J6=}P5e zr}4xCItGgFBWpwyF@s^KRhX1k!)c%_TB~57Xki)Lya_%9m1XtK3(D}>9ZLCJAt|Ia z{PJjdbCQ`WVx}>$4luwlu*tw6EsL!Ux?wVDt8K5*d1JLqYhEHcm<#@sF=zR-$?nm` zYFe03Td&^t@&B&GYuZuuG+?pEgF)*bhRyNB#DRrB=WfaQ4cHqa>@}CFDILYfc|xbB z|G@)2uVyiwL1H?+E>iTT0z0FNznM0Im@|9P_vUFpX6Nm{2M+zDQmO5Ut&|Rt3ETs3 znf0lknPZ^S#5#AKE$0B%l<>JBi7I^NymWS->8zrSA2Qs0f3Fh68-|Osa?qbc`mz8vo8MrC4xs;(F{KD9M*gGNNCsG2 zZ~VRZba4Zl1K&>tOHM#_z00Z`MT0`>jN-wW ztOA@H;M6FW{#s4W;-sq5-xP%zbqq0w-7z;?kYN0@r!!{L=8g^I=JfjLl$Mnmx9*5l z+<`eQ4gT8k=*7~qEqHVoDH6;=25!}oc2WJvTrx_Ir~LZKLDuR!rJwW6?ZqiPm=8-M z8`0&{c82k66^c*wvtO;MtzqL7Ki7KCN;{cpo;+Y1h-*cShXTKsdz|-f@Mw@PDjRx8 zj5|99?wdgh3~xVj<3?@!`iDQg=%2oQHZW_C?&1;~ztw&8-#_gy!zADdJwyT3sLI(9kAclvDUL&*u9X%Nnk`o!8+CVh_|_piuOg)r z0yfHYl*ZdR8gM{vN*@5Ux;gtLz31Awfvqa#>Ao0uYqI~xKP~$w0({CBMxFcBIV&}B z_8g6QC&2c`;2O+ZlOm}Sk3$cMie8Zz;Oi`(B1X|WBdpot4Y6U}C9;IY0ml#0WhRK{ z!MjUBaMLY0V9Vi$l?9{Bji0WL@#y7vxI#>uUu!3@w=_;aV3iP zoMyd*9AaX=u!*xvwMe=}^sy%<7e%B*|Mb^TwP0M&Zr|j3Yg%LpxrNxn!%h*eWkKWB zvFa%%_@Xo2KBHpMSQ7nG7knM}WyRr!uiaUUaKv;$x1_Y@!uY-)=drTg6x3K)m7@Vc zoK99(lUt$!IT>M({Js0sAG?GMQ+EVFa+>w4oWeg0RuIj4Kciu|r;s$TD13S9@bUdy zpum+|O)`tW7YztOg0uQ?KT1~YBEq#QZ~D{7X}RyT%vj* z)>jr0q`@9U!@}lZC*Y1ed12@1$M25wz^UNQEJx6?Aiz5k+jp6prkU(_mZpnouN|TaV zYhASh{R7YWHfv{iiefY*<&>b}A37(ZBcc7C;Is_wy%H6cfeRDl$h;BO_xg$1N}8ld z^jM$jT|F<8!4M}sxLR-?@QoAH_*t=eB-+H2s&eAwmVkmWbwWD25=6b_vG(A|AS4*% zrftQspi-$-L2fqaq=@3|zMkI2rgo>J{Iq_TAa&>DP&x9&gnf}RASTyZ&6ngr@eeT6 z%n@!A=H=sj#HdTO!)ZT<`3rh4H;>b>pWULRyXfx8&APvmN0wlK zqzkb#GQ_c$8^h)7*iEIgf6#2R89-Ba67|MQOS}vg$XjH0jsn?|^OA8NS9>JU$ zCSje;r!ToD%P^MTg2Iby_|a99DHs8yMa=nPNq?$slnCW2?sXJ(n}?gqxZnQizm>4xU+}>2I%Zd2;Rd zZgfF)A7OH14cw z&0VkT$N zcnX(WpI{^Q+4zFKzyUji$nIyK{KTfp46(YW6QC?MmoBeJ>i7BH=)L{peOB|_dQ{8O zm7Q>|?_U0bQRhk=hyIQ1sK=%pCCNN!OOZ8uvaO4kD`J4KLX}q@h&qvQwRh@rpeP9r zIi{_#8`XGX7^JLeWwME-vHcghaOX-LbBat{STaJ^952v^wJvAi^E8X^YGm0MNg7S= z4yqs*Rq(e(gUwP!Oysg!4mJJjeKUF z@b~b;Im8vo{HN90y7~KBvb@EhbQR_tOG=G0ZN8+|1K384X|kVX%8H0VJfDW#T@-WH(zy*wQOv5Gh?% zr5hmw5_O!7+sESG_bv2~(ebVv0}0f@){u-W+l|N0OK4@5o_8Ty*HVU@LyJCe9Mx=f zC6?YZav(Q@=lFQF%diu16VA^*0`4*v3VV%9U}m4vKf07K_9H&G);wQ?ST>qdpVRrl ztsbAe^q4=M%uBI6=4A8Fd+zsHXlpp!W@+n%HWAoWF=4{K@|2SHXP?XyoerK4$D`g? z6?G_Su)~lM!rtDV#j%6ZPOZ#|%ag|MC8v_IwnE@8Tc7K1vbLBIHEKdh{F~b|oOnsC z=w|V>JZ?@+R-?(VfZF*?ZqD5$NgoQcf?~RV9J;a&*AJv|qsh@?vgL zAQTRb#tgZDCE1~A*uQ`@5MRzCbP4+wq9=Z4A{X~l384O%Zafn`z2bsIuiu;!bRz=K zV{2<+8Z3v#wn1gXZb*(1PJ<_cV0op4+vkBf!2jg#;E7SV&+YfrSJX5?Cjvmf8>zBgy5S zP%qGxV3@;cz->V-5ca>J!ij!y$q+Zxx^-V<1zt`c2EQjgOt>E&`hp!NyCuQEn7RS! z0P=)6dRhx*k`;PFPuuSHUEqT$fe&ga`BPzAmLdG`PPRU<&&52^?HW0&cNyBZX0FZP z@^UaMUt5`OEe{>vx|Ku$@ zFl4ov?^Qh}l(|+Xku&;zze@@SJV9EYoX7VvO7w}6Sl8qTnei$(H^pX;CWF$EAhOKr*cewZ|%DZ5$DGigHFDoMx>tO3+_hv!Y6&w>zo^?(4OHka(B ziAytol#I}X?0fxp0SBx~FDyuqXYn%`925iW6tD{bw(0u0iTi!pmBwUGkxN$%!q&y0 z`>}dvi}#rvL!Mjo*nv#|**aIXH^lsLm$M4hAU= z%|G@5hKcG4B!j`Xfd|RdOLdnSMC$c{l#mBJq*SZg{?shYeb$wIkQqVo`Ai$lstd1?i!C&t!561v# z>;+a`Web!Q+#%zxJ`3U!(6pq%8{z<2pmpX6_a~Hs)H58-`5`kt_Va>518_wk6mFWV zHFF7E_27EeNV=^KX3dl-6Xc_8`}cnE%;qj1fwE&kGHvw~mXc|DV2X6Ou1Bf1Ft8tj znXJ}GU@)$3m;rA1w3QQ@CM`tsrP5y0<_jg-;N@Z^sCNR<1*gszfQoTRz(^gfWc zS9UFn4QZL>-Y(7RA_YP0Ov|UC`-b=11S%gfWbX*^1G?^gOZT<0q*s%1?n@9(ugABO z`xv6Ce+wD9okvUR^f?1Q!;qjCVeN3eR~^7;EpVTinAYVh*fCUj()+J$rAB?(pV4-( zwIezB*(X%nU^5B;z?y>~y;?`YLol_2SN+nwv}i7HF70d9Vro46=4YS$1tm}nqE-RF z{0n;47XiWCXW)6s=1)(rEk3Cqv3x;C%zu_26^_ZD9pao3EA)gAx z?fnJ6`^$GACwMQQ1piH}-`PEX1qwi-Jfr!sZymDN_UQRli>%5=^ISg*o~t(QeCGHi ziKuV9l!sIS@aARH56E?Ry_Esx8(v3n1sG7%oUg8C#PW?BS z)DwVletSSI0r;*docW4E9|LpH86ThDv-bef?AHXgSN(7Q=T9_!Y!%ls)B7aqh{O9J zBZ-imd}J?ftGOwl5k<$6r*nqCA7J#bA|d#nUpU^|i~6LSLbjR7+5NA*ifhg% z_kH{#wwfCutGN$-WCNv`^mg}_cgO2v0MLB%m-sP)H=les#_e(cb0bTA-1oj;!6<;Y z2Act*n#oUfN3cBJ@tx*5?$2e41o^Bq2onONBmX@70@Q>3u-X8*2n1cAlAxFNr>E+~ zN*bsI|8Y+-5Ju=P-tn>f^zL{#-rH@9v3OM|F`}`H@5pcdl9j{G%OkQS)cW|#`SlS@ zVw+6BZD%(px>l&+p;aHY;BnqdROyJ7l#883vwqmc-;my`P7 zFKM5Yds3w_6=BbH_SmD9k~gG1PzYvrgJ^3HF3hjXie-GjUujXlXErG>u`e0~~5eEt?xI@%S@3lkaRjd)OL+f4MmPm3$3T z+M}Ubt#To7U-n}xbDr{PVO$!DPX7#y9H2dL-|78H*?@xq=@*jGf9!39jp6><)B>Aa7gSvP20P}Eeym|EkKEJGVM9u*_08e7Pn2ma zBh1PQ{t!v=n@x@XUbFIprM?eyVEpLD;!s4_qTY8DmP(^NpPqku)2;crGGhknEkb`dFz3WjvQa9&a zSc#u=;-e|irw}@XhbZ?yD0(qpk>}=D%riS3-9#Jio6Up*){oUZF&6<*t2VHmQ7T_J zS9ANEVX`v)51r(45hQpRdsL~9CGH%%Tq1P>;A9VpXbNsUep8+;V9zeFT!3+h!3P^1 z7mV97Mmqdf_u|y!KvdSX@M39UJ@V9cw5e|3L53F2a^_10%8wJb^l7^O0BuL84C@^o zKX)i;wpf2@)+mVaq3(G39_9zt#<{=F5dlY!ok8er9XAnqp8t55(iO*zl)f(5S>B=a zH8OZDe9y`gHaDD4)Q~;8yiqJsCqSKl_}>nZqT^`IoAdes9_xUfe;Bmo&OwrOj-yV| zp{x&QMYr+5tLn1w*9EenK(=9YSX)o)5U{0-a?*pM|@u)*$Ggn%Yi9- zY5=;M$%L3DCc0MZw76Wrg*WK=>gbnfmz`o1UK(a&2_pNP|9OOW^Vc5+O%?h3)u8`V zFRkm|51M5b@6HD3KE(k|GsCLX^c~XVeBW}_gVV`ZQP$L$Ia?spk8SJ7T)bi3TkFG; z>z1pkuWC(h5zUpHfo0%W zCbLR~S0hgBjKNRRuQ_jFjD#aQ{py?;%Ok_4BWvP~4?+(7C0%wt3^M=TixrE~XX%dJ zSo3DzmeKIvd~eGv_dhuRg$o2STvRR4e|vZ6=dTgL0@^6sDz z<}6MY{IxVqN1PnruA3#w3UYyW#{l5 znO8W8Q+rB;@~ubHid+V$+;wBBPzvhMvG=j^DGXSeZRtc03&zj52pkl>8L=c?giz3SU*apqmFlRzY>1MaKnDX3xdQ)&TJs3v___8 z8m_FYUf|YPr&~<66}0ZAY^t;rrJg+J{m#O2*;7PfowW5kG-Y z@o|B7D)4E1ke^VApgmw9R;xCMHiFUG_F_d65{qM%y3NN~=SAbWr@n%<00tcokhNh@H=7BiDz4LAxWQaj_!>=iaR6`6 z2u)bvMG311049KWz_Zf0;UUXS#_xMKcT-m}qUHZY&vQ!XrF0bK)|wJ|%}DtP-RU*a zDA({TQ%J{5{X9v~Sc?n?>LOl_m*+{8j2PugJKEm0oC6$DUBBzaw-o=6AutKC=ja0s zb!od*!al0n%0~i(rx>p6D}F<-v&ZiS z!}ZmX?r<~zmzZP?|(NN zPalJvLR-emh5gYlw;yoaE24t}w|8B`WA7A|pD_x92XX-zO5j#ghJp2Pi7s?z@k5_T4Xfd? z+NcER{?4(IN24*@D@HoFIhPSEyV6Wb7_)zP>6*nbVFvITh*J+JurnIXaQRII1e6kd z8ZW7h_CAR?vB4PyBv3=Zm0wmVq(LDHB~yhIDx<+6mOjGGhB?^9jGde!%b6+Z3~P!> z>qwa(pSwYC8#Nw{b23MjRE&_&#SD24`B*#Q`=vEq2+tWTSj2w{1LP~sw`)l!L(|IY zz$x@B z-16qC_Nej>*I{-XTdT*Z)BZdx?XuPg)L$Tk8Ya>=bqNQTx`tLVsyAprO6kd)88x6v z{klBUirc^uJluKx`Cxo_15b zc}zD3;PwiQyBWxQmv+ERtQyufXlE*Rzg1Veh>YBQ=%bOGZ!EpldZp`a_H*RPvOfzY zRp))(fWOtLHe+Shin$u z8uAijj)6FIn3`v()*VV-YCk_@BKf3#Yu|1}nnjv4g%O4!aF8|W!2~O4s9%^gydt(E zca9&6E9mFxwm7?(B<&Y#R6%7Y@5*ZH&M43EDK?RJZs$^W`}&QRMcW)o{<#Rxc=MZo z@I{vVi^F@izPr1(1BoB^jKs41QONSb;&~=g;7P^GaU>fC)l+_-^H#DU4$)4_&h1A` zhxF#m7x9_ld* z7ycNZrre>pc%cDy4TV&tSpn{I)pvl12R8!^-nqi@n_OvxI#PO+1Z#Gr9Tdg;!J*-g!x|g0*r-;jhLMeaE!2-S>GLI3{kU_zz{)T@!VD1@#eXTm(X- z{X*7}<{QLj^ZTBPL(^kU??>MoKi2()90jf;)uV?)aLR!sGCg;z#sRrGWlQA`_tGID zl$M%CZL&j|Tv7>jt&A+U8}i9|=4{NAW?i!*xXTmDBJWgZk?Wg#4uovcA~5h#(8R0L zB6K=zB91oou5oZ0h(%-1Enf_GtO0(p{_=TdoSY`(#?oHnzee4X@@%{n5pStOB`K2-X~d^G9F$5EByN=K z^^(LF@Ky+KlCI?EtbiQXpJ?uDw$_ys4npkPDjYxhP-JfN%&K9wxfN3YE$ zH4CD;_#R8Yi%-2MBmn{VWzM|sN>bK62m0Ixi`m_ew};*H?5iH0k;x;% zicskAgKf_>LTB2R)@z3@rWq|acz{2_y|o@anYR61f{TujX+%A-=_t_g#pw~u3Kuuz z(R>z{@4^+uiqP>k7=ll%on}*^W4zX-M%Pjt*R@rwz8q%HOYOWaNS*CrGRPuMG!|&m z_9WkR`E=)BSFppfNQLCIt(_Qp=WdjP2yPkBwl+ zVK5hf;fOC^9`0k`8&`4YgMNVzHu&au9|vFm;qU*DQ0d@nM0iF5o=)TlBZh*!W1$g^ z6`di)@n>oVS*8w##EbZbC~&rENz6{)u-#+c(7P7 zY#GmXw$aHzNQh!I%+f>uznc@)f6q{VJ6PV?T6w_`e>>P7z2ZRjPP^7RlsMRS9`>9D zBkx-RgjhLkuYRohL;6I5Lz4BJ{1mG4zdIrS)KM9^i#D6-En)yaEHwjB9)r=c2%>Y! zQ0VvlXGRE6Hpnw}Igj@d(7k(^@IAz|_@9LY77|!UU?G8p1QrrlNMIp>g#;E7SV&+Y zfrSJX5?DxJA%TSi77|!UU?GA3e@h_gpri%}6Vpu0&O>Ab8kT~hmC7^)(O(SDmfVp7 zAaYI}f|-Nl`APr$2xI`{8NV}SVZx4t;L6DUh-55-peK}EwHC$gTfOBf;W^8i6mE;q zGePIME8y`269 zw%sPwO|C)Q0MCOXIXQv6flXL|zuRYN_JEIl0mpeeb4YV2AMgv`em5HwMYzBd<%FKk z1W(>vPp{qp;vmIEqMTNw)bN4!G2~9MJ9w3w%I_UaZ^bu%Kf@z0^gKpE0Q>Z9V8*5- zL6Mmhr|h61Tbxw`_&qxB30*Cu%e!P#m$&vdz#SCQ1xVGbvxfSW zby>+ll2jBKKM{VJa?|vDFZ2fYCpC6M!jfJS)$drm2s+Qd`~1<}f9(`fck)HPh1lH8 zNHSJtVgp?ZE+^|JS>aZ{115$RKJshBVA0lJJ?Qaf#hs6AxEi=aL4!=5nqy>kP2)Ic zhzW%mB8~Mc zHneNP$ydF?>+w5p_7Q*w2|Lh7Rpr7=29*=+ngFc=njeubrX2nXjb!OL#3V%LhnNx! zq-(Y}iNQcKnT%R-!5N4wq0xq!;g=x%c7`uMA1qJr-cSgMy0(u1Oq;gaYHN@LI85Xq zK1oPZtx3xAl&2@Zh6t;X9&0BpUh^A`MN8hA-HU-xo)H;S!6O z8saWdOkKt8#r0d%G}-dN)wHm!P+_*%yHU6m#M9G2f@71&4iCxxk0V)0!2rl zGQ7E^eS}GHk*XwGX*3A#FsNT8<$462Fa;}{kwFNHSGfPJ}dS(08UlP_Pe?$~X99w2%D6%-$4h%ei=+iljvYSPclLn^J5;)-fh_}F($y9U zjb;~HU4NcRdTwUYx26$ona~W%CXlHla?@Gsvbrd15Il>@(pk=R?@{X0x1!7lH~}G z1aL($!VOU(6^1YTh!yIc98$If^3SOdIpdzIDNU&Yt2>y8s63-v6Lo-%ts69GLx?G1*xinTpe`WAB}^3i_pLI_ z+g1&!S`v?eEdwwj0F0SyRG5j3V2N3)8^lD?eCX`#tHM5tQ?P70Gm%2!C-|%J=GR}B z&Vi>{-dkSY7%ih&AC~r*LuP`-h7p?l?X9Iu-7K&|1}nqe6>yTVj1A?=L(4RQs6+=h zzWv>xV6Ismw4ykJBH+48Bs#O7wG%MZBg(k*J@oxn_Qq*HAKxP_J^YqWi;(8}+=r%J zs`}EW5;E2f=k4Z%d%rHo7Vryp7bPy9I?x~?B3Vdto|eLJyYi}5dM{eD_kB0-6=qXP z0JcDJtl`vJ8qPNQ*;C_junc?i!g83v;_sry>0ttNiHBm@;+L_riTj&EL~)@i#=k@b zD9mKje;uDD^^kE!dp1NvCC+4X;6{Z~s|QnYf*v;1SF_)d5?JV}#djD!Dhs#mS}YAP zJgpm`o)Bf|XgxJ|J-q{$YIboa6&xhXE7nT~WNoB71NTiUh z)dkztShK!=6u7un`oW%Z5HBSTYhe~Y4)R>uB(kezS-I9woNMY&1xD9O>eS%C6)6_S zs?Zomf8)~Vi>zq}dBBfp-Y#8M6TZPyohAE<3cseZUOIV1FGLlnQ!J;K$bozVLz zfEJX^0NqWV0(D5CM0V!v1rPFvd#RJLOFxQV_- z@TZKdzW11+a#T5RW6esZ*$#l1I=rC2s&|-W&MMKDJxEvZ7@bYovow7mmvC}8nC01@ zZSAeBfrO^53>9olLR6M!<1zvq{wl5~kl)!@+V8`)G2s^WgdJJX9?WKNk|{tapDHVw z7e@tADc&J^P%w3mc#FsZ;fp5hV(V6&h+tS*YA)RauB|?*9(! z%l>-!D~yx2mGgJoJ0mRo%hlJk z#A3}~-_nw?h@=X?o+lhn`&jy{U^Z@D|9o7|a<I(<`>NxD!jQL|i2SeDqR$h2R4Mtv#Jq#vFI3R~~sR`Z>lOO?Az^G)*2uZZ9mN z@f=Yb+LOn*C$?QxZ>Ekjjk=8bqS5OAlQ((&qqm-ai{Jn5Kge6`j(0{cpO4pk-dFu} z5&izltd5?IUhay-eg5HJ`aaotYr}chL*Ogx!;RK2iZYYGw5{d7clf;fWk&R6S zZLr5T*YEqwcF^;C9%BRrC1xm>R};EtV~B9ZI<`S7?Esk{wW!UP;fkZ9vX#I&cjMtc z-`RS#u|8fK@d0}-6%g&&424w>V{bd|D&jM72_c7=@pw{+&a3w)`;6(5 zZ3*W?AuV+c8D~Te9O|eivdUH?Zdp~;s2ru=r`zhCaO~%6Tf3g=hlAbqjqSC;?#kBo zsCS-}aLb>>Z22dC$sP5Jc)wvlbXBq= z)MMg-6LxPSu{}H0I0&mh_i*m;;_xm1%Pk*zFL*|pqpqEw+tt(QJjY=?kdKmbpXQmR zz^KPg%MN34w~giz9$}8&h=zepi=#`_#;V@!qfn7BNES&~Ty5>vOQuFDI2fSBpS z^Y%IyD=eZf7b+^{crMzy(Yy})_4NEr zWo6bTnVK1?9|Z<9OGR0D&feAW9CCKy{6=y>O2A*MiA$fpi|vVjNBV$Jrrd(jRuwYS8euS1 z7AccYVGB@R>{rdsyu(ECwNYrVsef1^atm!QawLSqc{YAkH`$CoYBV`wfY#}9?URXt zMRR(P_kK>GL{>pxoQBMki^Fqb7x>Pc!zMBhDXj=8YHQQtUEHg$xIaQDY2kiwhc$Vq z*kw>;Ie86MCqLmBi6bk|$3^)9{m6RHf2b{;{qqA)pxv_5>x{oEgQ&gF9y43!46V0* zK}99;@KTV?orh<8zgTyZf<=|Rh!c11q1q+9S0bhz2iU_PB~lhe^Aqo^gFscZyaI;# zS*<8x_N}^yVvbOMe0Kb4Ma`P=hvzZ-DEq(X{0mPPS&_3z@sd~$+=MEs%RcX-2?+uv znWXrxE8WO)2o;iI*!J={BNBr1Z#Lu!ZjU?9dWFl*6lzHO&Q&$rr% zgq$BYZv6rI0u5ZC3MO>gMx-X;e3&@!rqMy}Z9HFsXQh|GeD)^O0|zZCNBOsvxaf#E zv8c6%hd`ZuUJ2`mhr|;qF_~my584TuO*0TEYys;i+RUIZI|)-AuI_YZGwX{ zVW^?g1L#TVy;-sqyz#Jd-zeCi%aL zH}%>r-Vy6Ys>C`djBKH(&}Q&KiV|6IE`4IYtYmI(PLhV%SC?oS|Hw=*>7G`NwqBio zXy;(vziA(ihxnc+x0<=_-PfyoEAYBKzay|ZndPX~UvBZ)1iMMtVz&4`4euXrpqwG$ zg~Ho2j>z&?beILWK+!dQT6I0=^T*{A-Q^0Fd+};s)m=CR%tasPIuI}IT@qd}NUlNp zDLGmAZOM?G5eZQJqCKu==vngZsXlJ$zyFvBRgmt-&pY*fgI4(I%Vo7c|0 zOTTRA_m6{L_Htre z3M4_d5^@w(%v7Pd!gAU_AH2AqT-{OGj9@~&7I$< z<8>!$Zw^&MlyWIP_l*H%9}x0f5!qOaC+)*(|?9L8W&SXvoGfm>&cHI^}>bc1z~pi=%sGVcHD zfBB^HjMk0U;i{L*-D>#&#n30J$E+AGLJc1STL#%b{OpgsYa?f&2gm+?4olvcrx|3( z-XwVr^H9Cyc}mV@)NM08*>}r}@MS`80uP=cNTap}_WGvg@S|)xu1sgE*idtRnH7G} z;~XVZjGHb^#IND>NJvu-5N?Gc&7e@Y^w=}bJGtD|GGlzl!pv45j1Fl39SdA{sF5u* ze(1KojIS^`I42@!R;U##zw1v9rb!jEqo1CkJZtcNQ|r#N+D~#=x^q8amaJ(Odcp`3 zx8&ySY@HneGrBt(ne$|)X6qnKSQ$K+2BBgvJj96+1>ylb!XK-DM-*fy9Rwf=hKidC z8@B;KM|yJmp|^edmV}_86|d3^+~$-=VB$o_mC30^`3&K$oZY_h;O=~IoDQcL!TY!> z(ts&PzW;6N&!WH1$5;hxppC1mPNk>GRO zn;cg!5`*TZGC1Cd>JP-CCR8 zHv1k+s7@JZD@!HsR;f$h(U|uiaT(xRW03%3izd2*&T=r;nxpTy213r<*&$WhdX@74 zVd~e`m18V;e@sZDZww1Y*m5Rd=aR~a`jBDG!qJ}efhvLXJ%~Oiw(35;3 z^5Wa^U||&@Y;2bPQ${u)KO`HV02)2&eOZy@jNUK3BoHu0a`boLd7GN1E-&lBO{aJZ zi@&1k(+7k_RKUnD(mtn>_Ua>MBY8~YX=X%pTFJeWyW=1X-3qIQ5Np{WZwlf;aE!ay z8~A>%frIf!1Hd)*mT^v7+Q=NSTeqg9{dLmV$jeSKD-h0v*`ISM5mK@ok2nsY7NYs^ zjxqe)E$`pR;F4cxzHhDS%(DjALsj9UJP#mkLSC2COEnbqjZf#C&TDt4Ii+CcmQACq zJ3n&Vwgxh|0(m8^Qxa6{j4@XmCe7(0;TTR|6|BscKOCkIC+nlUrGi~m_jU?G8p1QrrlNMIp>g#;E7 zSV&+YfrSJX5?DxJA%TSi77|!UU?G8p1pZ%@z_0_86QP$FxL1WP6>eP`wP2|A3Iw&& zmnIDMDc%m|$C}EPE$+3(trmAmw%wO)yRth4wi>VP*+!=dw}9uFfB@e~IJ963?=(1`Hnih}vIZu0FpT*4DpUQ zVM%$KJ0)Xd0NReUDSzr&qxOEOyAL=GP^{Mt_I3-0aO>VqCNyRAR1t#?Y(?n5t$@9t zlYS?as!4iAKYO3GMGKee)piE&_3SBWmrFj7ULrM=>M9>#dQkS}I836M%o#U?4mI%9 z%1}aPq#nVU4oU6X?(G%069J$pIeUBxn5x@L0_?ISkYT5d?T555td?e=qN@WRb2Uh* z9&^wO12sQQt;66OKs{b)5;S%5eH;3!2+5WHXo1-5`RV>VYv=MX*gl+6jtb6z#Iv_Z zQE0Ul3Hg9E`2FEImFuKK$OOvCPCFh7bu3)|zTzz{Q_n5B!?v12kxZl%Z3k7Vr|^sq zmJdlxm??kEKk(e?+(htNss{O&HrJ*~sDMpg7G&BRuutHja*J(Y8iR-+MYOO zPtbje`=d3T9`HTs+lK2hA3{p?`RKLpeMD}HwzO$W<-d1_&z|j6-!GR31nM`UAnO7W z$+uUxZ{HT4WYx^w_WJfV-7Cl*Gi&l2bY(jdbBkOtzjx5xmYVhOU7!Org^I4uWw{=f zJ{#?9u5ZxyXJG0EjtK8aF6w%6Wa(jE!(q{QWQ`sWz2|#7d*+C)ZN+nMZk41k=(eO? zXFS@iUsgUh=PWqMYJwyxV;rg_#T*wrzsS#1yi0~ke9}Dg2D&h7dyLJ<^VG}KOZNcf z1&6xyOoj^w41h_DBK^{sVj4Buy#Z*L3M09CenYEbJ4DVuGTGAyn*y5^yPi^u4uL;- zh6@pTz2VT*(grJ9jxm90JdTrGXW=i{B>`pePIzuV0>ph~G;U;5TBJ{vq2++(@p(sz9DYJGP^ z?e^gL`m^!w((n0Xb!YE6ozfZC($3b_v+>sUVE3=~C{+8r_u1&>DvCml!U_sA+Wn)0 zz(ntDQ|3~ob=K8kcwKL`k}3b7q7G~WFnx>nwOWEONDzY`VY{shk>4|^qZi+No@TTJP=%P#*>p*W8Kp(qNKIUt?e(A3t!$iaRfA1(xz zeT<3>aZBiBSMbnMzE80NGfk$-`5)EdHZh`7sk3h6Um^_&?qo zwW>|l8;JgP6$Girmn+r!x3HK!?I1{XGwcA$3u@1TT3@C7;2~>bYg{H@uu(yL>8gN+ z`Mz`uEEJGgZdiRNa{-s7>JG`<7omy>k~iQo?i-*w#48asxnAVae=&Ude7O69f}rG@ zfkHpu8Ge@9pehbft!E!$VFKBieIV#>)_jjf#~?*c-Y<1u53J+|LBlG=Ntr`8WqJxA zXp+4vSgGAYHKB?(I3|Y*%q#pFz;%?&t*yj@I#Bs82D@mp?|d=X*`^uJSOf5`CpV4l zI$YDr$6tU$$BF~XMwlOZG*)0wX_MN1aC!UdU$ZOM4+N-S$PVaz)v!fF6b&Jx%};)k z#xFeJ`>T}pNNoRFwdJ#0p12HfB70$b{kg3O%9g?EmhBT`gZjs(S2PjBUrAHEZu6Kq zAmSbcEIig?(5zk-AqxykxfB{k61)VXXTX@j^QK{R$@W={c=RiZt*iQsT9vb-BC*l{ zQYrL98#DT1dghjl(5rCL=sH=e`w%+~5s{)QSBNVJDh9TYzU-nrT( zuAhc@2!M9v!L&z?Xvekp%xHGER)=)j+irNHARlJJ{Z|h~Na;$krPteG|= zR(J(8b0WzB^czCVg--iR%nSGtKXA|Q8X5t|Jv=+5;8~&)6q?H)8i&pa{v+G>={e3B zxE2806osJ}VuD$&7f>CcI6M+Z+sBD<4MJ+B`xaD0lm6MiTbk)1HmK>~KfON=aYEDW z1wT^AH4Au6)8gbY)QekB5+K<=Mmkj(4<7M?rgcC2v;X>k{e&HH4!b>$S>mU)TXwK4 z&|bGxblT|=2fn>B(5=zdtMS_BgU!PtheFK4AF~HnM>b?-@dc2yho$;;7>>YSx!2Y> za79@*nDLF#v*EhU6}L}&mmtdhzsz$-Lj^jz_x8SF`a3rV-(nXJv`4dZsNb$Q^xm?K zv8we#SiZv-y-iyEX~B>k@xwN%q9a*V;{RuZY@!5Ri=}3aWyD!njkE05 z=4L8S+qbGx3q5@2$<#^{P>$|sfWB-1X!N9S2?XCLp7t!=)yo?;sX76<;;9yU+p(+F zQsDP|i-g;eque-i~IVGjGux*SvW(q^Zacn#4Pl0Mu24btUw^aR=Kat8EiXT#3pfA8K zMW0QcZzWUJkYt=!o+oe7QRb18?L31cf(#*MczfH}rD`_Qwv>k_-_XJ#^$IENJ?+X2PyZ|Gk1@SS41RE{d#M zrZ85fFe33Ff5Q4QKz2m!n1=d_Qy%`}@k5{6M$YZ{?QdC=*Vkb?ddMYHK`2$W3r*5FM)f*F?=fEm_-3Fgkia{l*U&l1cWrLT$b)qd#aT{W; z&V1#-lp73q`7OYD>NSIC_njgot}ryg!xMw@c(lCrDzQ0=gI+TxucwrTdMe*Dla3+E z)p#TK+9Wx4SUxG3MC(#1twwhIToFvaL+gu#rxN-RSMDJNY0W>os2mbrQ>d+MeuGYX z@)V>}r0}TL@Xb2i8iM5H*a#emnqjxHe3{U$ET<~r*kRG27J9=HMT-#vL-|oJh*06z zN*6>vioZE}KIAxvtYpSHOBF)n@T6)8OK?Q>5w0*NfDry?eK-VCugHn9sct4OhpCwB>OBjOiwgco=hd*V5oAsnKq#SP@()f~zS+fOOWW{DB-Bd~-$ zWsZ+0chDN>;xzbs0uH`O)V9V*`5{v;-+{+94tduKl8W@yjE8vtXe?ZLsG3!7`GQ=^F}N(9Rev zY&-{hOjubFh_~F14CSIj7Hd%L!}fj9JFu>c&DgiRy?nsMDBqo)jkr(nKPHG)SaxnU z$0jvrO-rL2H-kz|j(}-}l0pX0I+`Wg!T6PgCHb_Ub1+p0T|y+f7!sjuP1Its?7pNJ z(ok)&xXzycc zEcBN$1%2pVT!GxWh>QL`r7hJS6n>g~&Q25y$z)VhQm;ehb4sIfV-0C&bZeAYyj&F( zeLrZ{OOL3h|A8tKHRrI!_vnl}?w8aMa?UMUtnS(>3gH*jCv2_L`h7@&Gj`7i3UBG9 zvm*;94SyrS-iX^$H!cwwKaR?2d#R7TH7sR7vFp2;IK8)|D{>$0nh&_@fN}?pJS-Nf z0-MWkH8ZD}Sy`4fzxHK+VQOWrxY~8<%TlB^XPm$8B!f#g8-FGO-RR!?m2*t2nC%^g zP^G3TOUGwTjE`5BC$vg#-H?l7c+T`j!&|YNufVe9P6yME?$Bv(YZ8dhKP=5D`MX{% zTji03OUrZ2CFTOF8_PPE6$>w2Mb0W5P5NS=sW# zUSfsu!HQ8Wk9j&v-+XVDB2UaU*6(OGORHE91C2F%#yfMTc4}@0vQDZDGj$-=%Z87@ z?e7GR7$*`h9Klq=r{04Zr#J;A@F>h_=7|PVmPFFdjHUe0o^ipID4-KT;gh7#cymTo|M?3 zhm7ceG^#|F_N|K}pZ3UOlLOH5)~?~Wcm_n=a9bG48=AFZo*hwp;QM|mj4p4lO=5Z& zEdxN*SO!0S`DBTg-}(kV-y4fq2u@H$8unlA-EX~EvopFyJ%pNbWw^1jzPHJ0V5e@( zQjK(KzPxge9dc#3!??fy%h76EgxWg{Rw;5-X5RN_qkvy-XKOsd9(9ko?loexY!lcc z5=nDkHg+zg^fYL%5lZSB%W}jUvi*Bn+1}cD{oHW&ERWszpK(EPASs$uTb*3Yh2_)d zlfPlGCliA4H`4=xZA{0hE%`=a4w>R=WaJDw&p8!kAB$LL@;|U-HOIFKH4B?u{#69ID zQ-K9lkt@4f6*@p)!7#xuo-D^X`hm?KE3V^|mP|D-lqz*x+<37pZCzn`v(d8on z7s(0#8|l@6t6j5;R&R?%K*1QVik&^>2DOQjzZpG?gBNyQGH!;Mdf&K<*D|3fSa-90 z1tve99jAkH)5C0|;^x;5dqO}-QqV9` z@3y))>S4pbX z>s!SoY|(Hdgb{%gB`Xcbp29y_#7fq)eh3U|?lJFruZBCTBNjco$k{=2g2VgY3YEi! ztIKkO+ncNajL6tsrRtQc9S~v3XM@$pgQCK8V}pu$rU${XMN@%jFXc5Iec=&_c^$AX zrEa;YGTs1ni@-EEOp!1T%@bTY+zQ7YUIBAJ*-D~0xX%--8Xea*jL?b!39~OHOow1} zW8%S~%9SjL5}FaKV|&C>9$3ZBNI%7`pLyar&uAFV6S1VyI2%|sd#A}ZJ7wa?@P6#^_}(Abuv^d>*LosSszasIyT8s>&QIc8x7X}>VcxkL;hr~vo&47K#BV0?7&{Z zQ)*5i3gVo9MA#LjIXcB_L5KiJIGvr)6aDb;Xh4bW$>eBqa*AR<;O-tBQJsrA-@#8r z9tpbcDTTnKHUJ%Pd2f_!xV&A%kKm!=!ol}8V?*|&S%vSgJ~`KV79!L^C_}a+xVvX1bxR zZT{{%*!78{GjCn^Bk(CgqSrNzGV9w_{mik#HiFXf1gr?={RcFc1gorH#|f{MYUY;! z@MvWRuJ@25nLeCbk(_mkmL119v83#s7lSo;yxBJmuAf#Uw5QKH2m$8WCR&5a&+@s% zrqCNs6+R#$TL?pBo@|!}lr5LCH%h zU2c4`NX*?3(Tp-XPDZjKwM&5Mx&p~GJGHf}<}_4lJ_x>g7@*K5bmWGtCmx*7;DCnb z44{K(!7Qu*jc+CQNE0p(H#SgxJ*v5L4W#95;C`Qs5qIFW(#ls1=OVt|_VAI4okN#1 z$$HL41}o9in;H zSs0lNITr>Sw}HcT7C+G%8dmU)4%GYp3OZjAC59pe^*T|rq7z2xr2S5wSs`H`=O&cv zuLs}tWQ0q#x+J(GF?)XEmta^L+Xuk0)RR{n{9%Ag+J7=~!>yf9Pm(>rJKn~VY`mW) zRGs&_j`lXpOaU}J@b|Tdu3CkFCmAY~Ocm^#f!iT2xcNB$9aPL^dFz*WfvTLAxyx4( zdAN%TB8)IH&Pe^?u{%yVy%+H9i>>Fw&j-)$CfGavSK>*Q0v5?VC<$)?sg#}{0$1}ZR71X%MML;Hekdb_kFN-P>fy!fAm1QrrlNMIp> zg#;E7SV&+YfrSJX5?DxJA%TSi77|!UU?G8p1QrrlNMIp>f4Kw_@&-00Y?b`WoBQ5) z>zC^*tsTa-Ss98q$=Dm(P3qp1XF+QFfzS*8rK*W6u3Z5Fv;b^eab!Ss1jo}PrrPC^ z9Wy#@5I7O!S(x`@k}!|`)gIxpB%E63yF4T~(`2`}QE$GVnqlY~7(sDZvs)~gM6A^e ze-z&PyT2z**WkT*_dJG7?W9ZA&qCP)qy7Ew00dO$cv8^ZH;{!{u@A3xN`jzE3Gdzj zTsK4@YwEpBzwAeyva~8+xg1mFxjPa34@;6OLAKt zFC6QAZ}cmENd}SvM(|ssrP5Cp&Deyx=M(Eo6VLTha_ZDTT&{ z+zPsZKcOA`rlrZAW)NO8*`jbr8Z|te&rCVWW9p%orW52a_D?QOZINXD;-US^;(mFVbTxDBf zv6n&jGKkH`yR%rp3Rdx;*?s01*`|m#`hqD?BWDR@3%0?3q|ieI$W^MhWW9frHw@hc z<|XoHmC)P(98s!s`BWl)rk%QBGN!9KFGu!gr=x=-j+I~ zsxVP?ea6)(lI)Fs4!BLkU%)4tog|jp!dddSZj=e3qtSE^Y$I@UK9|P4k3W!L&0H( z2?K3`1TfGfF~}xN<^Knq43CryaL)h7Wlg}^1lP)@2N%7$;MPvW;sRzcEtrrgkODIM zEMLsg(7ncr9g)Pn)={Q*U?|hOrct4%=ORF*!KO8A>4&B5lrX1(h)+*-&&8L3e1!~H zu$TIOv}=v36Xt_Ts^twy7RcrIo|IL&Gq0?_d^ubm?qv5!1BO!#VUR}II?yTXh}Jdu zqFLUWst#~O?B{F&yy^{Wgq;9P%ktjN%fZ@cXu)+AB!E`DqGlR6#N4t3#bB+x_VTl> z4LS>NRbClf!?SgI4KwE5u?xe+MboTQBUE|DY$FlwFN{YsC`y4HZm!37lK`{wH(P3g`iR0M!$!Lx2}y?i|eP?FLFR4Et@j4F?#N(oF%WQvjM& zwFrU51ZmKKeZ(ZwGIDK-Rp*EK58C;R0+_&}86r5*_?Vy(_W|?(v4^dny_S-AA+5`2 z6S10)|LytrKs^fyY9Sp>Rb!z6hvLCl=I37R4Cn;Rdb_AB5?SFtVNc?@Fi?Apon7K? zQK_ZdQt-(FT~^aUu2TW?TQE*3vr-G)n4v#v1vOJvRRH0yQi`={+X=t7c?SPL52lb0 zFdWvewOhPr^{e6z9g0M44*D5i<)(gDmWSFzO3ap za1@msYTK+fiUKH^1VBdaH3z+R&nPBG3RPT}hCSX&gmqAv=|05wpqT0O^?DO`8nB}; zl)^e(hpu@`Cgtwe_+d>bjCqgRmQGq=KUsZ|W2t!%u`jVv$U{<5`i zq|~woY4@UVX_^!~6^xTD%qL*$docYa7m^S+&VvX81QKjMdIBbd9d#9Keg zg6Av4t{{w!P=n))`O2+pX2C*ZcAivHrIgW~`q3b|bm=Nw1~X+kSpAF=|3AzZcopSQ z#{ROSS9|z$)D)Fg>{ZxpzGz5bs-%M8^NQ%|;jbnXgr(J5wvXWTbQ93R-o|j*E*o+G zKZ0yeFG+^w)dRllJuPvceZ2D(1N>^WRld(Y9$O~Hy6noKtD{*oLVr5vBpc9_vw{cT z-yA<|Zsmlf;^1!xL!1PJNXOqR3Mcf4PxtE_22^(cxz*27VNK5lW3i0I zc>x;?v%(q&4GOf(w>`SGM(q*CH^(#gr;jc&My~7y^#sFgi&8aKNz|v*k+8DwqRP!mI~Fzzj?|qHKH=YkUaL2nX-n z?rX>X?e`FJkBDKY$i6zK2^BcY>uYEVK3HlU%BN2Yd4E+6IMMaNpdYvG4QAC4!}`wuu&|%+Y8?SA}=(ON-tbsz`Vb@JhK!C zJ!06*FIY{_OZw3(qn$l~$&}wpef4=B-sAps66rr!ZOueNn*pQ@!sgaa@4?E& zN#TSB#34gMN0F0v)ZW6)7rCNqeM;1G}sjI=@13Js6nq5LHM}V zF-W6#LlfGnOALaJY7Z~79T+#NucdLpihHDt`Sw3ND4lEs7eY@!-NH3BAXFkDgQEUI zU$o1?1XoA6=2@eSm@b?|7Cl$}xsBJNUf7a$v$Ru#O9Os~wsF;u@w}KF4w}u!Pp7P% z!)%w(-Qf0Y7H3DD_BmZKDPEd|dIsA_zeAVqA`=bJ30o};aGr}~t-(xX7XtU{=7kLm zg0cqbk^WyLxFNIKJj9A!9J6d{Sw!*KwfDg+s{i5HLEXebcf|%Yo_A$nU}g>&uzNxS ztTP7bF}OHa)JQigKBuqb_v#_otXc=`_e+t7%7O!wU9$+6Y-wJly7tpyyw)S>3uauAM%bO7nzCwVzL?gfEyi)7} zFHn^nWs*xZP)tts=prGL0kuai2mT67TQ0k-fGOmd2#?*{#;M3W&+g~hf_y158WA;Nuv9h)OdSy7K zXgo9;zCNPBLw~tDf>?$?2JDc%-P7>Od}@uwhrw#~zlvLG>>JhiAOlk#-4e8S24?IY2`{8MQLyuP_k*~}hWFT)gO z9R07-e$H_vmwL7~?usq@+ppnMgqepjq$!-I{B>QGV<7rM;JeY0Opsm3T{idGTi-tl z27%%0LEVyg4VAH&Mxzs1mxvZiz#gIxB1V37Yjw{CzNe?BoQ5~ocXqaR7_6*NK!y9f-%%ei28T9S@d!mAmw!J8JkR-i#;o#UXxr4@CZ}xb=7~mB zXrSNfq@(fC6)8}(TC`$r?5G(BQM(0$~u&@${bWf)$2fgZPvAn?b>bP<4(_P!0#S<#(eA9bD&o~xX zW-=_iYg0JY+{Sezxctg^4<|=sj-C+RO?x5icpX(_VMv3(FRkq+268p1s4Xu+bKwC^ zEQ!w_N&hOpRZ93fZr4_*!?n~@yR&>4>{^=^a)Dpm5+?l6``0QTR;$J?=vLD}_z5G&4v1s?79-C~^w-wM zXvW59lu$_5nUY^!dIq@|Tw1#O_(P39zg&JKjM9lXrh4^2hEONJ>XA(qa5>H#GZ#jp z(=R4xiaDFNKWbtr7E$&&f^4vXhCsTNE$V@AG^E}p!G0rU#$&AGfKrcQze+D)9Xas$ zV=At)^F%6NAx@kokLMKsF${iwO{}J+gUn^QpiJvzX5y#(R#i5D{-K}qvuOmxsxran za!qGSj0DYbt)!z4jo792bG#HXtx_dV0tR7XH`>;!*s+1TYqRj)NUQGZa|3>=ApLg0 z&1T64@g+pfM1DwD#uahyAMX`zoT{dy>egp({6oT40#bJ~V?j`!xKgOM>vxj5!(!?>aokKgxbYfgT|S;J zQ=%vJD(hV5=}-BUjX16XXmV?I`dAO=K?dB+qqu4BVL|+h3+Y4z1A47vORAnKGFyoT2muaWeKN}=zj**ljP;^iz<2G{ZP5tZ2|N`pz@wU+~H%IyA$Vf?~=)gCzPTpF!R0) zyMlk7xOh8{4)%jCC!D4IT2qy4WFeFDqSZ6=!vp{cX&l}`rlp{YsVoJq{L;|>Tyoci zh+T;;RB$$7O((IvCd_55elzc|O1K{}+?EY#M4H{(c5@ngAZHfm(u5oj2j#!?%YO;Y z5Nmbn%MKjd9pp(Qcroy$a>^r%?toD+*0;NC+R9*cK+Z9~Vny&zkDY+!MgxN?DR4u9EL$Ir-LkzkKeQ3I*umXo|+oaEds_ziAF&w3Vg zt<%2zHQc6X#hs{qCj9Kaw2@8viU!UGC691r#Spax*-ElQy*Ak9oC96&OA~F0hcMKz zyITP38RhG*pYe>?1%o6vCq!y**p8}}w`d{*4AEW`M8r(z?)t{|8lru0TyFQARn?-# zXpbHySko8>NwUn5Q}I09DL2-d&7PcwRmcCRbFPdsh>sE8$3rXRfPe7GY_8CUa71Nu zRV9lelKE)N$Z2e{vOe6HBgpB(eT830@KcL^*)kn?fNQ5tDFK0hyUEDVMp9I&;rpK% z(&J4dZ(ie5$DqApH$gGXv(zjQWg}CjtED+(!Dpu54Paj2P^DX?jXpw@N%|>z_;;A zBB3u46LCR``#p9uiue(HAM8lwB6-t_Yi8M>o$=6G@Rvx#FWZ1};76M+J%9Ra?w%t< zR0b=-{d0#eBV|u6=4;TtTpi2Nf)_k0em*1XZbB;<9GDux!IU}pFaNhsWN8l+G&>{X3MPOCguR>3)zhS`R>f>Dr9 zkN7_^iX33uR@%bdP~Tjst@)ZtajOP*{kK%GT4B0cIb8*FIBn4v~ZZ0913WA7W!qpcZQ<2#>{T3VK)E}4z^nMox;0RRi zyBZn5+`DTRR;;hUwr-0pN}vn36(r#uVbDj>TG7p6j)^!I-nPc7o*Yp zDZ2_PT~rG}cJakP^nU)y%Kd%{uL!YQP|MG_5BQk9}KG%kr|L@RP3#h8Uk5X zU@U|3rWYnx^s5QW{6MgxekRkja5fBf#*#%t0Fl)zM( zqZtOW#x0AL4?hfsq!;esaHhq%H2qfqIH=t@;9JvANx~RjPfE*7yf>SD<6Dt(>pq9A z9DGQ@-z#R{8U>gY>viEqpNRVJUz=CwRei(0l)_2dn971*epbaHX!3`* zNfk##!-c*;+6j>A$x6}=3m*ER=#PlqqBMe!T zUUK79I+%0hrSf%>)))3!|Im9iYo?o$0iaNp%~gM#O1-8ZOfnD@hji5#Az7vsf(PsNKAvk7JWr zQ`+CzGOIG}2l4{c7@26b2grjmR(@13`W~71KxFb*rppEZgD+0W7#Qx$wz7n8TQGr@#O?4NPVZb}%WobFmLTpv zyt)KzHz_U+(|;fjw_d2JB8h<2k9M}#N6CL(Ou+<6Q5}$0|J7);x-lY6eF!9pvObKF z`E!$bAX%u1UEc+Mw<|!DJ3)$1SG9L=7Z`8c|ym6z5jkfp$nY1Z~^4JD+{0=kELaul>H~RAsR3`}F;u?>^t^ zp*VSm{qFtWYu;<`MWdQa6Eh=|tPEQHKNDKYwP0TOKUTKy0Uzb&vV2OpUtZ!65Zl?N zY(t}jdWlRWBl2m^Zkf>3DRERu52_br?U;5_3Vm1<8#6MS?{CRSr|E z#n?)z+^$?nv&OKGa?Hq~gYZkWxQ z7+S1cX3GbqSByo-@T8=&B>;&>8lZE|OmZCn2S_G_c_2f!lf`@?GLPf-T?A%pX-l%} zDDs*}j_TwvBWLY!Q#)b?=4L0Ug*PfGGEX%WmE9xf)=qed2}iseH}Wez8~Jai*V`5@ z(ij&U9>b1oyDwH?ur;MI^MRO!L8Vmo-6%QEa)$Ikn=*joRM^rvOJdY zqP{`AnJU(i2m35nF7A1Zr-vAwN(?WmsF!Z6Pz^513s{YI`U)NiGAIG+5;2;gT#{F) zZLYCSJT!~?!3an;ziQ@ z`a?w?vYnG%mL?+9@ijJ{)IGztyS zA+m);Ewa0`PmEEJUbqkaq`h|Zc1>SoR#H2(1&h`wy`|z?m@&rlmQ}h38MnrcJVN%- zEAmM+b^2!9AY|F;%2QW&sP;QGZ8f4}=A9C|>}VuIU77~6M1YQv(r&tHt8G)L@4x4O z8XA5iXAtirDSlGMxTz;h&qhrLwnwaKgL7c^Xz|4C;6##QKN=<``VJzuU}Q_vjqM)F zI(aNUV->Rq^eB2n8~D&ck)?EW!yfHv;ZPpnJ4lKt<$!XfExokW-NWwRlBpmbNls0& zw3GU&3O4$5zA-)0*>2P)VXD_8G}hZwp}m+5En}3dbWL?~H`3B7c1`sa%cbsOseVUN zsm_1NE~7i*h)uFoRg<=Fa%^-cK2?jU$&IG1fqbrytr^48`}1px86B1cRWNG4}8ew}0i8rEB(!aImL#dk40+r5L!xkOT z7D(x7AS7%tv6l2I0!&npnmD-TP4rkc_bN->LngL!_!hm7*}IUg>RRnHk*%YyIK>B+7YT^!?1%#G znKpT->8GCqL+tEjl$1-80G?t4xx@q{zec(ay=mugG1~`|#^D^wmn12`w&n85u6%bn zPfleAs%wH&SV?X~VVpH)XPQ>m^vy$E<$sr^lD3*UZDjafcqIQ$~VKdhTw zV&c>@M6i;s&s>>3sJb=mzGK^dvXcq20Cu{`7=Ua_24K3yDTl$ZhMX^w$Z%kXN$G_U zR4hn_L^Q`uY_rEi8{{cM%6-TSY#V|KpNidoiSovis^`p$Gl?40YFBrnC#RwPG#35AL95a_MOG_>dC=-OiP+5T#z#?(<2t$ zjP~uga^Eo}NODDEYq!{=tJ!uGx0po}>fK`qxhC}O_(QF}D1vORKyqhE+?W7#J;g6|y02tcqq;+%JHbH4TUnH-wxiZpFG{h>*7_W0(WicNhMN9dgJ&wS!`f zB*D;Vbed|CAN*f>>;&bLH*vmI$0X;p4Pu2P(%Tf9Vj0l2WK?2IMRgi?)oWYp_>}hR z$zsCKvz@#+XDXXS+Njz8^(ya7YWhj@6xnIrB`IdM+rc%3F-kS%=cWhN;F%ah%y25e zA*OIIrmN^ZSIDu=4sEt-XwJ5w)sI1-_?6B@u>PnIkR}eJ_Voihnh#YV16^lu%&?_V zo1xf&7q^wHDU>@)xxS8`-b1@;HUt)8UH5jC`)XTF_fq1Wa+H|XtGb4#IbKB8R$^tP zG7-Vh-qF)nQ@O~*^g~-mP*HeBTRuBNeQyQY}3Z&TGD&I;GqZ*y<)&Y9C-nnTUm^C#L}=+ZF3#w4OZx%hY*hjg(VajeOqTzj?L#dpSa65A9rZTpaBC-<_qcV^7C zB11BeHeilHQ$&L*scheh zhta7;EN0~YqpR_nIhl*p^)ZW{Pa$SX4(PSUEC(|Ayb+f8jZDk2m(31My$yR&_Ag#X=TMh!B|?!jc3&Fn&7_~sgw9HuYnz{QE2 zv=jG)jm_poGDVIrz9W^Pld+EuQU2`WrVAJu2CemzQ1F-R|7i#V&a z7mG(so$J%S$k~~O`%>-cua$ED_FpiRIihr!ljiDYeJY)QfEvKV!`AaC3|fb=aCE2# zVwer@<`dWYp~s4hVTbBgP(z?VaK~D;-RQ;^m}w*%^F)|K!ol=-KsyD zjs-Q6^)zQEnTsoJF@Yqyxk&g{@#9fjiR`=^>`JH5OTdGb68C^aVrd=*;M% zF?#IjofbJ>HKem`h5Mi^=>_r2xKk$vF#nA$GVIVqY4r89)e1f3N~x7&hbP$iA%9b| zubnemSW|Q&>avvGl5=4|M4@gox2EK7!cZx`5ValjlUgp!FCHqU!_ca!0URC?-eykZ z=+G2%@QF?Y19sxGM7_DyQLa|doxo7m8o&^zmMC1^SL2WpzFU9&j$CzgaFhtcAiZR0 z3Q}r!jCuukC#R6;^v6#4#iHxXzD#N3ky4EijO{C26u#S%%NL9N)qHU)+XJz!kucB+ zOH$Z6J9O^x!c(DFx9a>(PFKj?1qd_j&9|o&x*8kh6b@}HM`o~_lYlCIDo0wbZb#}F zZibWWzhbG9ZzY1(TIwbE#5k)OXL{B6O|+^QfZD5~D+lp>TM^mg$c;r0+B_{ZeM;4G zXWqE7n|-mMQ!!s|RWF8^?5qV}!rkpdh$$9}&6T?QRzF>|o_uGGbyL$}-CP7-dq2go zb2?}AfCB$oBunCa<^iCVlQT%!(LQU4#UkKr-6XVWre1Qq;2(_=(Ty1n3lnRMKw(-x zNw{lGZ?(LwL~KYj+fH~U+AoWEUbwQ^d7d4gMBXeYq0OHY`{$;FOseKpEgUjn->=mh zm(+L!ql56M;Vo{FF^yxE##eZng#eUEe8Vb~%K;mpY%C$l3DLXxo@OfGN3puIgJTbS z5OvWOFzavO7bTfuu~>1qK1}a5C}w}{@854B z+r}-8J~=gdA2po2mLj)OtqkHFJNFo(FJQ-+jyhohu^f;Yzvz8M>`>>d|xMD zQ0ZI6XIOcNa?@;OE&0l7-i78Xzq|W$~NVjE3J*cb~#n+wi1z^z$ya^&KaVt z1OL^|MX`vySWabCKt$X;#F92E(c+~Ypfk%_vNnKE49&4ckOds<3-meH60=(;Frzex zlCfS8tw`Rjf4|&U$#=J!v(jc~#>z{PSS|3L2&Hv+23eF)s4a^h`tD&g84r{-(&3EZ z{T=aWRZcX!H$4FflU>>=*=en%b~&=P?YI{|J%oJg$_6&gXovWQEN3Vlzk)YcRUuW;1NJ+f;!WS5i)Ed`=+ zNg{w?ag%g7B=2&6Gr0_j`(`Jprtuit28!I{EOtzDY+!+so*_pcwYp)oDYhyMq*eX} zir3b6>}ZTf)<`DR52NRUTZeUy;(~#g6$kfn*a8nKeM8*KQi1?U153$aI??o!(Y#Ye zvxcAU;Z4!PwT2uxaY%-o5g9DW>Z=`^&{Ind59A>hmre_3_t#6q#t^CX$~91wZ9Aq5}*^QX611I4&&J2#L(DBrA6^MYM z_=--tx0n|=r+Aoj?;{4l{ezr_$Qkz&YbugI$dlqE$G8$ZL?|bRRoT%ShrE3lKP1Ov z7(*oIbRkC}2Jfd-*-c1U{Co^2Sqs62s=voOZuYP7*8N5uF^v$(5FK z16NM!ZDuZ6lx%7G@wZ~KSkfDk^OE#2m1mil0d>Vo@KSAkN4ZIFJK7UEUm7W}&mOX% zlGbrJA!?SWd_3?fS@e;aWS^E(VA*XLlzmTzYBKv*l7gtl7-3Ns@T!(2!{7f>hRNBA zUzy{a)Gi!qLUXv(LpUEg$ONg($jJ(Wm@xq-h%gPB4Z@1W;#ZVQ1Q$-BWRVJd88c%#)728Qqb0Rf0f;DoWj7l5*+i(wDn4mj}Po+1V~jf9_yEr>Pkvq zqzTa!A6JXIQh?TYMNuIggT3g&M6N?un4=^m2L~WIlcHwj2kal3;+QWOk1dh8OXM}4 zLO82zI?LFLhh0RuQa{BaHb*xsgYZo{W`wtOo|E9TtTbsOxyqVRaYy3`d3mOmxgEQC z6jBl&D%pxdV(ZZ!nvcv4vx)$<{KPk?F+fw@n6EKiHEW_DfHb-ElRHVqYMtoq7BA^5 zCaM=CU2+sJW3^N}_1`FiNBw^s0Y|_Qa0DCyN5Bzq1RMcJz!7i+905nb5pV_6};6`G4^kXx5*nsL3?%&%xg>c#Dot2<-0`d z6)m>nBQsj;Al|RCYKl4^$EgEx<>6F{-O*3h?-uNuice^*bz)**wY_C23B1BBUU`I_ z)U3Qveulli|1&UeQcgUNHyR1gEEIh&HM9bN%Z~Fm7w$dmdJ+WI^ zEM@zlp*e2|B-?Q~`wPM)7&FCz(CU(^lP|4(q1y|w{ zWb&Hznu1>A>U9z-kG)n>v@(rZLSP+Q`Caz8WDHuNOZ!{185W>?T`NV}%ELsB53f#7 z^H0;pG*qicrbo#hpdyiV_7S#JC$p>9A&EuZZ_ol6e|(x=C%pybw7Z9b948IpiuGu; zdLFyX?jn`K>d+D_OB@S;enh3NB5jZkv2Z7r-UW4AN?>18qM4&g;iC~MjirY+N2d1fQwcqyG?;0H%KA2_4HQTB=li4=kPws5y=yHyw z)v5a9lVjAN%Z?4)L&3eBx&M0bfBgRU*`Z;Iz6{U2i)zhmB&TSnc7m%uTJ=>u7Po5JAy)y8{BHG(h8nb0c(qB1>_xnHieWy#t)+oYevRjD=E2lnSTcoTyI0A}WIO z`~bHp=SpSSVcU?OrN|2Jj;hSn#4t_w&&+Wg?L6lor~@=_qf~(n&gVanEm_?*okpz# z?kAdcx_??+;b0bM=4}Um?p~cdJroByH9ScvF@r?sL>S@?@EDlNSY(rW%bJ97D()O? z=FkQT{{bK9zG2qRF)+M(do`r;(=eYvsWowHe;4WFCYF+DJ)4^WxI>hXd2*dQ$$ z#o0*>sxvYJ=|Uo^RGA#NJ=09fR0Ys^!o%5E$&jNQ7?^5!>T}Erm1MwoYp> zmGgg@I9jnW@RSk5N? z6-!%6?d_a8P%`{Q7!%aEgB2$@jyOBK7v9s+492SiS(O*${PM|(eWIjhtLv%L*;Um` zMNJ{|i5Y5()4Wc9pfA}m3X{P=6T{<_S>q!;6lI0069R#dr*p$2Ban{4NIh?um$Hus zn~hkgptWN+Og%EdKOrShh-GE6ko(LY1c}O&0-G4oUx3rWLMlT_asmVj!orPV#B^#Y|kct><;WvsH()GZX` zBEy;8b7Ny!Y8H+U!==;(hD4i1#VW06Ww07B?&D2LtblqH1(J@`pg~d_BWp%;|MvUe z{~lT!XA~L{Z7_8cxm|Mz%Vv8_V-WFXnf_746lE5vTs4s8V2@FOvU6-6G8N{HYAGfV zRYN)_zTThRg;Ibx2F6r(mBBZ|1r$u!EE2p#Ub{N*f)m`6$hY zvee5|i7y_X8km_i87Z_Vp)of*e;~^UD6tD$jnHLiUtGUa9BU$)#;H_kydUY-{^JrD>VsscJ7##<8- z-}GT@=s>PxZUo5%Gg6sSl`16NBsUux92Kpyr9vC#S5^Bg)z)IAMHoq4;{#<0I%X1v z;W!*9U`mBTrTO4hI1#C3MWj;wchB4y2dK+PK-$r>M94t&dS5)uLH83h+&WFYG!qE0 zqAF)FKB>Pva!Pd|C`6N`#DVDxN+r!VQ~irEV?{7zzAG6uH8(*KQ78fFVbm-sr|}H% zDBs9O0-QwLEDBF3^(09hS3BeBEz zKUBk`ZL7&by^gyE%uLFP7E~Kdn44}kn@N<2S;5i&qNZj_Bv5-8LNN`&6+3(;8Y9Li zu%G%p!HkTKP}OL3N9?5$l5x#WTo7(+7$n|avO-;9_>J&q-v4M3d+ z#f%!|(KI~}Js>^@Cx@`7peA~&iMLUR7qVERlJQa$5J>Y3k{-2g6F5AuKf4DzL851d z?(iVwsPaBhU8~TJMzBd0r&4JP!zHSk`X5w(nVgP{AIn?}Oe3=! z>>>1KtdL$LNec7Xlo~mixnb52W}B=5&cKq?GCd@8Ya3d3=JE2)P$HY^eF0J@61%P(WVuwWP zmefbsnq|+&RLaxzze+*SdY*H*#`!pfa8(kGX2>x&o)fk%R*Ur#Gs=(0SDJYB1NWYq%QziMC zXpBl^P7Y!~?id@c9q1ecMzSV48>_$W25 zCq~fSsyzu;>ylN<$*QCm3Py5)Ye+Z-YnY(G=Vo@yiA^+gS=|(+N}VEUj4Tg8HaJ%h zp517kQ6XfiT^Z^apym(KF0zQ0FhB$|-khjfUqLFMtf!~vrcl}R1&ygGqvJBhRPKm> ziK&`rNf@gwRmpdwTzW_cx^ABGyh z{I||$RW(tj>4eI8GFn_?xWmer?ZkS>Qd@Iuc)lTMj$I@()2gtIaWp+NA&RJndT^@H5KZWTwxikljG(`ny5hU&~o1VqWug2gG&Y? zzM|~#q(lrrr?*576f~L~Hw)0*Lo>J}#nHv$fVq(aISPvNEr^t&zj7-nU}>`Qhr8rYQ9$rIc*X3 zVp>@pLsjBS3oM2;#E{4F#d{K;%N$`S9xjo*F?e{K9%8j4SnP2_U!r%8vRg6efop1d z2CI4&b6GZ?gmP-THYc{L$S1mlL-P{@2pBkn($0J?6{uj;u%oQefiaGfgOpW2D?)=U zJV_xY*mFb$#7qDUPl&HfXE0cWU@!%zcOn$%isb)@ge+z@o$sEchI-xO&#I(Qcz>_AaW1nygpDCrYm@{vc$I&Ya5ScHcd6z*x z1gAm5wAVbY>cmJm$q))m5zP=$3pV4*3CIE#($q_m)?ieb4d{M-Uv6DuLYW4UTm?GC zRUn}xPL$eG&|z$x&&b21eNk$(F)QX8#{zhCD?2Yk+*DhlP61XHBpMg1I-(F9ClR3tVc7BePi6yW@onu&aF zWL=lhlA{)-5orpU87je2`Ew^>F7x0f%-%t_sFo>nDk4V`3=dH0$|i(aHFU-))tQDh z7zBpv4D}3UBt%>wQzl53T;j>|S%e4-OOI1zU{xrFxq@{fB76|LfI7l*A#of`T5~Cf z#T}h}5J(9oE8UwoSnvrdHkNPFG^*KIr0*z3_zv`5BPfO8zC$xfqu7w<{0a>W@KGkv zu3Ih0ECscq38Qk_lhd$Qh8!9XrDy?@? z6w+c|npAo(R|cjr$eJ ztA-POCisqf+At#qiLmPv#d`Q1LwripQ)kzG7BGJmuxP8%NE zDL=(LiMc6af3n#?3DhIw^PT*V%zBi-v{{GQ$-%oK`*5Bs`opxXY$Pfho3l93Y`g>Q zAyIHx>-l@BS=FnqMA--rKH9zs#BoSh`-uzERzM}t0;bf6f z)GJAuR5bk1uvDx1Z=&1cP!c?l&@6S*p-n~K%#=5!fvb9;St80J*fW43?WCFE2XAAI znipzbn-(30r)hkXL^&ZmBJ!Y-HG+i6MurJJ9>}&6`xq1t=?g5As3nW;=o>TmYbYC4 z)|AHg&nM6tO|lZ z=8Q$n-XI~VSBu1!=}=upqi(0=0>QZh$Y)zIfHV>xSe=JlqS?gntQgc5A24ZWv1_7v zMwcrR`U>|m2eMxWvg0~TSM}Dd-*FKKpT^7rlnC|!Wl&|d014e8P(&YW$pX4J|I_qb zBU(2;PXw*rpvlnTy*S&}b2W>VPIdSL%^fr(Vot*L5;~FU;I~l~isp;BoT-DdFwB@# zJxq%-M_NdWGUII0B~6+YW#?HUTuGF0a>p99rE$6bus~ny8YDm~U~6!izYNLc6IfNReM4a~l1%g1*>SNG~)f zt1P3cmo2d@tH6j}aydrEaJeBqMULsd@eIUBC`}we?LAfSX0Q4%Oz zRyHP)Q8F4(hlz`0owHDb$qX!XnJJoTg@z4Wl%sT3ac&y_96cLl9#N}Nhz$WUCKJJ| zJ82G;ca>6<%97Kb2xVAu405(wjL5^t;Hw`jiiZ7Kg6N2T21h% z-NE7JL`KV6&q@d+)xTp1BG&$ns)X6XKho;P!T{jVD1ubb83VzQ%|s~fK^j?Xb(}M{ z@xJY3^}2gWA5>RbGzA(aT6iyphlc0DESf)aQ`Sx5-q6bc$7j#rvnM9s3`Ax2FMg21 z1jc)E^i1{F-8|7Bv@Ww=GSx^_HWBe9i{ebr4GtnY59HK|Xn(VaWEO*Y|E&H9IC-a% zt1KBSoRFw2sT8wJqi!Ssb#JOg5=;?48a{mjRD~i~{w>cUd*^X$XRRekW7(Uy3g{vQ zO(0#uX(FyT1xQpg{QGJ>-6hS00cP{S{K6&jw4^4dM{HSFP^R7pG2~%Zr-;U~ww=i1 znMo)XV6<$J`?tmG;&hIX_T0EdO=hwa!w7dRrbP2N#_|VdS>c#6BOiOj7}plfr8IuO zUy%je=``Aa(;Cf$Xdb8afMZ}+)ExysK{Tz`5^NY%9b=0{A&g;85j}P*w_xaRb(WSU(JiH@D^dtvRM67A-w0OJ% z<3x^NgT%>U1YI@)R-jBH8G%Cb1Mo8;i36;XtA~)WRz9W2Wro7atWoZgRbZ9Hw;G}L z^_KG0p3T%^SA?3TQ-LOifT+zONj)++LoqdrvY6>4Ca$kU%gsj0@7WLakK`uiQ0{au ziBPIHh;xhP@RbE}IVw!K?Z_sH2aJX&A&u8`N!GGm62oEWn^!~!6$7^EGj^RpK}t;I znYf|hDZCDO1Qtkz%&9@IK42i>d$6>=hw9*{C9UeSMy9o--LlYaSVx z9fnZaq?oJ67I9Lwn#Ph3Dxkyo@d4!Pn8U0UN$dr@(J2fr(lfA+p%|W`b4egf!CLh_ zUGqUi$7Lw!j`dUp>zLeh)rX!)br9)dl`^hOm=qQ5B<4>ddZLCzfKugpa$5av8xvXL z+$~rK5fU-nEbmp*C)t1$8X0arw8t_W>^3$z5=Ro3w-a?Jinf~s1crwRc^WIxt8{^v z5Io5kdo8#FI-4z`I=cter<8&i7&~a@r!KJ0fK9B>#qOxEWFn{jeEcr4rdZ4#c{qry zm#D!0KnY@$HxCTbIr@tYrC}Md+&wp-#Z|NFOyg)>k>EvKBY=&@#qF)-_DZQ%gZ@Y9 zuyRjmmw${fX;A~=oMV~Onxgs`5(LFC1q9yz_&sa&NR5RC0m#EXxgkQ*(Xfci

I- zYuYt)2WP%nL;?Fg!lc#}v~SXjYP5x-Ck2&4>jB z59Ipb37h=^XdZ;;bN^F|*xWZc1{W$UK)?YVPajwp;j2bBlE5*Qhj5M7yXXvY6f}{n zJ>@@`CYoXz=>f|SF$&1HrK+?-3nBzz%#a;qrnTN+Jcti8rta4u@EA{p&>Ks!dOZ?n zv}-h)xVk4jAPs#G;{~Od(k=2~cS;->WTxY2zKjt=J1nHqg5r2_m51(|*$^2bhAQ|Z z%agD$u8Y_NFk&Q6(@}igOeRDVW~AvaK62 zABm3X*xK9O(^u{@EmQ32ZtL$W_jGF@7D7Qf!%T3FE$F5E%Eiekf(b|sO=cwE7;aFv zleO4LskUHi(Qy^zG3ce0aUJ-GWB^h(239Okh5+6neS}?_8$fhVr`dRfxF%U5Ws%Vg zTnK=$g1(OA$hLOp=>@Cu!;wiX%Yg)u7`56YXL@YlUd+Oc5C%yh@Q9?LnUaW%d=!R6 zS8)xRE!o9v4kHetwpt&RDu5AD+{^|{1!K(a!W-8pV&0dMmJ~5lHb*o$(cub>nky&O zB~2oliqG44Sc6m$VmF@242~<2D|p<k zxTZ0WDWxe^*^C)bb?62Ysf}2k+*5P`*$pO}>;p*_W3qT|=`dyj=5{G_EUvW+aN`nO zVDcKFe~mN>T7o0@lJjVC7S5fU*fTmjhU8+lAwoW3L>om!G|FLxbU}+zgGaRIEPmdM z-KiBVvneq?Sys<~#z81T_lwP_1E$64`NN`N7J+#F zOg>SA>6LfIZMc+xySYewZnuIAG3ai3*~F~msHJI<7={6$WI6@Nl_^0h@Qc=|WFmF; zEU=~1Rh*;~3-cw%MyG(+RyJ5*LLxSssxlsw>cO8-bF98t+-+cDe-_?F;|xheC|to9 z8tP#|Ob4rT2-%4qS7R`pvWpU98Z%?%bj4Yb(9G;D04$DK* z(sT)y@_q}^C|HWTo5S(g4?~WV55#iO;X(hq=UC}RmYE)H4CcQd#6P3wCf*WrQVaJH zAuWkuJ=47`ty*pgUXiWaDyb4&Y=K`xVn&CjcW4EIC<-Yja;4>Y#yk_gV2rDv2dx

{Sp%;bj6vWv9 zFK4w-nXF#&C0IrtoEco^Ea~gQbZ~MH_7Y?Rrph4B-7_#o>Z)E*Gm(r(hLvocmo~FS zP~?VeCRDyMmiZlxWfsZ|04)g2?uv2SxYz}n%v&^~W2n~5sXCCfUZX?tVTf>Y9F439 zBrJiMG%z?bIc*`^nMv$*j4s)H5*2hwOSODo15#3lk&eal<|fSVPTI!av&0VA5_A;6 zSBM85n?jx-Jh7>Jlm&?fNz!Iz{1GpLN^JoZ6*+?#1rmim$gvqDn+%bi#BDSI=C)-K%35UX^-JWYPl7 z4DsK7k1Z>$ZN68`5G8>@tJ>rb33tAvMGN^k3^0~uGcLr95HBb)BzHGa2x^UqFlH04 zvf!ym%7P4Fb7!=gDcPAc7%fQ6DzX>5Kn-f1cbQcUN-Pm-gro9m3astRFiHB7l279C z9mw`+!nv>A1Jm=(rY2J%M^g47SyLwBV+ez`88F%++BrmEX7*=y%Rxdc5^gb5AbRL= z(ZjT(OwA-8MJYr{0@A3>tgV%>n4mDgPMXi7=|<8ln8m6wT@6n>*T_`T^(oKEgJi;) zNgIB{3OARQ#>H4Mvw5G4zzLE{SsR?hFHpY}N$HK*BDtwu^Wg8oXDDJL0}n9DZNTgs79sd z1xggLvgVi_6pfPDU}E`L^X3>Tb7;VpL)phLL|~&4aKXy76$%m^M2)cIj(I|xa7|40 zYh>*l6a$m5O!Erm#>EgbAx9=fcIp@!*ZczZHlQf!kJ*oCbAX>#ZYMrGAtB>-cG1{& zgMQHq(s6V@oxF$jA1P5uD^NwcOQ>KvCkwo4Pa&W*gGgA4;Ig%j{%&o#*qq-~GWgS^ zNn;97>KVKz#(*^p%lX;GGF>FxB#w&=m83`9$Oa!@xHW@pkGW*snL*lm8eFA;C83VI zoQNpT#Vg9BN5m7HQfOJ^5Q8%cBr-hQ?U;|+i*>7AJ4}=mslpkPL>y#5SnJTq>@Iq5 zs*(O7tK^>Q!^*lbsv!hwrWLaD9w0V_xhQ^%jW9PszPD1D$=tw$B_0K7%chEsq)bP3 zElHe>6EL=Wp)Ng;Bb3>Ym69^1qodGKhxmXvoz#NJ=@Q~v+T<&JQ+hzl-Vlc5orEZP zj1!3|h~Y`}HzoT6&Gl8Fxb&yk5>ARGr_m>x7kN)kNHNiRD;XV;eK3(Mcg|vgQ3}~Q z5LmI?zyOUz{iheKtItZqw*r{<@vQ^he%PTniBPnKBWBW4O6 zOl4G-i6>c&MHVv70WukO5UWK|;pB4xaFp`^^>p|4Y_`2n zlM8Kux}*?qXppQp;^k}2P^OF-J=m;b2}FM`Uo5wZjFR+Fg2eJjh{BR+md4f**TY&G z%iT4nw0n#bMZk@~;$9H*NaRbhW=(flCaW(PTHlYjnb0pf0*-(q;0QPZj==v72=w;g z3A7OH$=6D`Vnd-Gd!t@*7jZRKhy zxl}HuzY^CXzSLKwU0&YA{q}0Px23(mT&eWb%H5@wYJOV}9!Qzb_igT}w)W9xcd^vM zhG!n@tF>^eJ(sW5^2N@U%^l@x#hz`eY;7snOO<>V4R@Dv-0W>3aic5ke6F+1JJw_S zwXwgeH(smuR4QuLF8AfTTlXg)=qTk|3;nfPOGi(&JN;@~e|2m6+pf1(>3)lPR4KI- zdRn*Uz^SWca}}^^`OZ?VwP$m8ORb}t@9Ri_++S*KFLAS6iT#XbUak)e+FNQ2sZ?sE zvEFibuB+VFSLS!6RH`z@TB)U-^nyxDwI^R~>C^Ll{k^3sR${r>Vt)%gJzXuW<-R;K z)*`d7rPNj6~FMs+PLjYaK25LSIj{5a+73nlJNWsZ{L9^#O|wpJyVaR7&|aMqSBQ zGB?%>w=+H&3E^;^;BUX;}@oW+qSKVT#Pgc zJJMaIU-1^YZT}Rz=JM69o@xtHve1$5>Y@v!Exi?%ei@JnAI98UqBr2f-8>?o3YwAj z`YOUba$}orK^)ayW(p{v0c!+AQgSlck&6#n2VhpDP>u5?#E$*##zOrd$0S%2Ve2#Yj6JO_1C@P|G@Xp zX!Z|^UAZ%KI^Pkz2-HqJnL1NGhcbunXfuKbNbo;2l{eY zlQ(?glhO8=KtOA|MO42|Jwi5UTcD1 zbJkf4=RKu^Ghcn?*{^!_YhSDRfA!gCo_*HYuhRUV{mNILnK}K;|I}U_rLq5?&wnQK zqy(6^EjfKD|9{56Zn)@#P*~5OjqCJB|Jh5grVjkI`KkF|#F?6iIm_K=b74pk@PIouvX{w-Kcdk#L+otF2je>sNrMr#S#;nnt z+RLSPoAk>%x`EHO)_)cBtF+;w<3mYr-KJkX`gODyn)HGi+o-2_lRx@rQ-Sa0X}hMu z*)YFj1I{f!J``GYE%*9ohhx@Wd{VgK^~Z$@mpd*vHhg0FNuk*C;$SFN3`MoMNx%L> z0B+o%P6@k1VH3P}>aO8rj~GOZAh}jK8VYv9M%t!FTJ;7~^M^*c;lgB;H!eFqbn(*0 z3y%w*xae7-^yWVcHU)R8siTfVdMms2E2C-dP&e8aPkry=yY^hCuGvHvZTLd6NzIFZ51nl_S14-AbFV)o9CI_T z-o&Mfa9H-t@X-rT4()F_^H3ZH#Uv%QH(c-cbnarcLIa17{`kP?xx0Zsj6V5wd;JZ- zI59Bhw1Ik~_QuY}4I7ZYVGmdIPgs&h^$YGv8sHc6u7Ph-Q}^Z}+AZpHAupa@uO778 zpf7w@DBQ?Dmu}=w$Fk$X2hKksl;3_<2qNh1`eQ7&NrT;PP2`q|g%*!pBx?i>00~vw zukE^F^KHKd)umk~J`AX2oXNFHtIu69&7Y|c5G*ANQfPs@!L}!AY$t}t>erxt zo5%;#ejxeq>A%3?SD5)vyhVdU?J3(^f#8A@>BebvUmtC_*>|y@NMCmyb@%D?Z zoe=(2*9z-2{8kY|VHx<{eDQH%?Iq6)tq8`_h0hG{KJVmEzV^cKJJE{?YwMN$YOT}I znDtNcl};iuHCvDc&FdSB#KrNn!d;tl{+t+gZn)?q#2J5V9QJFQt`&4`Oay+XhGqY> zhwYa&Y7g(y!;wVmEf3Xy8R;EDVU25x`jW`z@7TLGtLrWiaS5Cv-9TeJBiwRH1f~s{ zdd<0~gz~#D4!_fEncg*y+9;7}GA&*cI5iX1kq(SKq1a*rFn!Ht(1x{;Fd5s<+(jn? znEnWojnZ!kru@@xY^y&~$uB=SAh~(CK%ckkVN>Du+%7$L$h)z5Ygx0k%SK-33i@Kx z$N+V%LGApLQ7*n~9k+3O&swX&AE zyPh-r8mJkF(X8aX!eL!~Hb~E9` ziUuB{mKz&H`NoB!yQ+TiHQ*79$P0ARAz11zly7vm5X;*QOTA%$!mT`V1Ttj8#m3x4 zxQP3gqrledkN(*q%WSey_3;+gu7E1*_#U%v z<*~@%r-xSLbNj_7hj+a0)X?+6mT;ettQnH)!EgHp(VYo#qfbLucg-F35^L7y0^g8h5uDXhJOUKRAUR?*)&#KO`N|7=I~3GUtxtq%7HZc{Ebxhzb*!3{G? z&)bboJ%SOaf2t$mf1_DrEt}@}OVZ&pLZ+m5&B9@HA{H@%#O^lz%ILY_0&LZvzvRS_ zu|{Wxup>xHPf$_rAu(y^!TfAq$OKtI*^)Cnt zBgjhq*In^zYVQ`YL>}P?M#qK1TK>7T?b4@*(#ofWcb#{7xD|M&HTDHMM*WY(nb74) zj7fH&96bIckeN8J*RZb{v4LlrS#rf3 zaoXyDG8`x%$Dbzss!x~E5-pv8QN$nnW!IAC_!uGv8KBSFFOxV6z&C*3IqdOto+8}*4#~T59yCDHdJRa18iUcVXk8e06fnD@1i6J)>ho~TdCv{i54~xj z@Tkv&u|u2sYTv_9SSUBlyl;TqAoEnT82SrIdV!1(P;@<+Don0aJQ!_#@>1y1D0J<) zF9w+l0A)Q&rm$9^$TZtk?-iVppm3Nx5Mi5^T6@tcjF<*WXsLHG;#(Juc#}qK@~l_v zXOJ4<*yz5kYqv?pZPY|>)UQniK6;=1O0Myme)a2GS#KaW_;bTbM0O_vv1uJ6x#e{) z3Wd_^8BKA;(~>EcwbT}^C0@8ouiB8lr*TEWW-=`f1TAyeK#nNbG^E=l;*K<=HhpEc z?wVt;Rhfa32yVMc00c_ykXbe0rg=YrWEyyPZ{tRaD*l_jhM6*{$nw`?y+cY4X zHv_Ou1F~jKLCx34#|-MD>2PZWC@`HyyCFn)WV;?&n!os2L4226{+v*}$Po z6K+`c{BYC7FABF@d|Ft?)d~`;Q+_`>trZU%`b0FjInc0)VAvX|fCkB&khukQtc{Dm2tPYb&xdv4<>2A-vSA|yl&O=}PeCRnE zKN!{(-R-dE1nCn?%TLEvJT3G#KPhxxa!mN(vNOZmUvXM^KlA$0y4Rtax18pEIRzEu0gmv|=G2_tj7YL1;%xf$V+TTh# zgrL@ok_wr|4YBA#POQJ78%7*k#5y*fHg)B3|MD;Y68`bmzY6<*_IKeMU%D@hc9#~C zh-BBlPa;K;Q)bggt`5cf=jTFZ`?`;Xy}Gt(v21S;3sgw(N`0|kMwCnhnoF-eB^8wG zC9f|%DXinar7NBt&N?Lpd_d-bklY^R-0t^_6??2}Nkoj?TFlG&aecO*PFd*{|jX7;L?8oi4x3cIoG2%ks@?r7;fd#lGfsI!xMAgU!zWjq zZU#sG5~D;#XEnI>afH|tYSuX0LoIydnA1#yI9N_Nw_FQ&$3N{84B5WeDu<#h*Qm4%gF_;% zP{I&%qYC9T zD9k)>3n7EF>>~b{o!THIX817TGJ>-yy?p}|l9@V`xPV5a*JgL6{H?v%yZt|V*feIe z2Y&lczX_W@a!uG(Al7jN0y9I_NTW$l{P=s{SwLT3*Co4Y6UZNtk;qMSv(tX%FG981 zgjD3>m0tf`^^ND+mqAq>IQp#@JuR#_`||MIV_y`OX5JCbJ+l^0Ir%-|aZBD1t~>XP z@WJz6idFoyP{CI%6fFKPsw(m^l%YvGkq7@YO>eCmm0PDClLtrNkH^1yro!+{spL*g zq4|yaWkKZa(c_lhF-2^YrKloqs}=#5ofr|B~UGZmt2K-BkE1nZ}Zp@o87JK*b z55Er`*d+Y{`iipau}2m%9>TA|#YoaL6cX{e=+IEs7|#^7$v zC8vcmPCq{!|CE=6%;Vn~K6>Lf!x?9-4Vlc!@RnD+AiV3Gmm{K{9y%1QE?D$L#H8+{ zIzhRb1OoyNS=x@Vse*J5c zJ2H*_{^vgn4}D=DYYd;D*9sp>bT&zkJ@U(6CQZ)`+=dY*8ts198xlIJyz?@J6%P}9 z_>?UAOM#oxY!D?HmWF#Uz5e;PzfBtc*^hrjpqvSO()RV&hcEA)4L|;y?*_?5+4_=* zk~{zKi=T(@e(kGaa%(jdn_n!yiPm*BYWy$GPKh;643DpU;HvP=FMlyS`uF?8@BaCp z!$0%?kJ8%b#&=1>pO}7U=BVHK9^aYbJFS{}4m8i|+qqn&y9@)nV-LY z?6L4WWW2_saee2j_lI5h9u+-#B-TMT9mX~0Ks0s!#YN#Ce))?8|2y+H$Vq-y_><1J zF8_m{8|`jGfL(k_c+#Cr^4Bqsq<#MJSLzrLF&XOQ&wujc@GYR5zGG8Ri$%TBRHQS# z^@znc)D#Xq_A zJ*&f)MTkE>0wL1=ow-jE*5k>{2ol1G{E7EX?GC!sy5hNE?#^u{)ly*f-yeSa8)0WT zht$?Xi7wLT1Tj;q|AT8s2{1xuHa8UO|z=1OqC~lpC{a7I0z)Kc;^+No31R zVYy6_L?S_)Z!6}6WmAo!1u4^MqbVXw9LfCh;h!e2#cmJ>ln&p^-jRBOO{2~;OwQ} z|K`^T7@Qb(w5>BqV75qR&(Lcp8?U@=xriJ~s_lxG8~AYq zV#a$0ZF!wd zYV0Du(_pkEzd#6x`K2XHwwhJ?nbDzehn_^<9Ik7NMz6+DE6{wOx`-(K+AIDvJY@rm z5xL8b3)h^pEL{G)mxjy}FAbSLy*#|JFdsfT^y6^;yGP)vmEmR2cy4HU&5E%8^-#F1 zoW<(aW;*Iuu~9?Q8dni;=A-5+h$2WjN!B=`d1kBlMKP1o0FGIY54jE>vYlXf>0&K$ zo*HT&eN)0r@*yLp(icDY=0ge9-m&iEFvj5~TJ$o%I5Qcd*Z|{iWG-;vZ(>+urap zJCP`G;g*Fy76p9z^`-yB}>r+*eMc;O|X zNU%@=MnZG1nSbgR!cr^;4Vl>F5i?&;2>a`g5YI^-vE?1s6vT4+W3H;w zDGExes?gRgvMk9;p|)6c@Rkv6{l)h|cp%6ySIir0RGM`{d*(bb<^lX|f=5aYV) z5sX$dE2AQ9xE<0s4c@orm#Slbk437^Db5@_CtK9)&IS(}89e;MA0+&zffyNQL{5jd z^_xX)nX-!E!Np;uBdIqC3uV!B%^S_uGyIk+-0) zOu(;gc1@;VwB<$UZKiALPQHz){N~ps4Ayh)zyHZE&Poc`C(5V&b*MfhWV~5%)Ykgjqzr-Z`K!(UedosOKU;!HE{Fi_Ca2QixEBbg%zv7BuyA59=>|VklhklyC!!cQ>(&^vV-fhEtcmI%J;oj&S8iz7XCu_&|8;wl9P$+rAny zr(GLPef+D!Yfil!_GW=tv9}`LsRarT@k9wgNT2X$yNO**u&wv9Oh+fy%h_uqX}Qow zwsK(|ONL}dJw3Eta%^}P3yPaRMr?I4<1V?Mhh1py}Nbr>q-_t_0CeYdhf`9IdS4qyV|sfua`<~>xvY)lxv(axsC0*90w#* zH{O_Ifn=i%ask2J_u0@8Nt*XM!8M8CB&1?H($~hiO(MDa^(N_RJsH0-QYnPp`bLAT z7evfE#M??}z;k<6cv^{=WgAhZ)@DrL6;BP+r1^?AgSD~pSmvLGRwrcaPi|D+z9Mo_X3Hnu7nSxg;=F;vr$Wb@&#`ru(Vn(2+_51pk~B%! zHs0^NY6WIHm;PgHUbi-y6h$hoI5mowrf&3{?29OthT$<=Nsg5K$FjH)tsSwACOJxazSFMPqeV+J)4C*Pj$ixkgI^J!CT?oH zCf+UEH3^e=O;i)(Om%9>?1NfjPsOkHT$2ohjc>UiQS)EkGo8Hu6&B|Q)TRlA2E#@@ z+@a){PQ`GwDsXHkyJ5-~U=m+;a#*+g8R32BUlJ}m?Zshf)5`FtPg)f&zy9;#!<&8) z-oE(@;T>DQ6h5%!hvB3ZZQ*H|bHk}mX%08A4tewWXDnh@Rw}-Ndtz<4h$iW{R#OTr=juAtAF&U#H>-ZK+s3GziYk@eis@+v)Px-;=-BMl_{ z$2CP+<27kZ_>XH1o>Zp*ifeWLGw=G)=OnH^t>=tcjRB42?=pDWwaTZh4u!%B`qGWY zeA-PY%MGLztURMRyyDnbS)}zPugit^z-aHRekWYB^}+Ct{`J~}GTncB2eMHue{F&<%9Wy&q^Wm{pqrkm;H+DniW1p>WI zZ#(BjVe_Zndno5&sC?e|tW3~Mu7GjM5;-v9$9w829L9ZO^2|5BlsZyXG#e=fTx(c{ zVuEPkYVA3;CL2Vi@lGP^M)^y$P@*dh!?^E5@8CUT8cTeDD|0yVoc*e2S6Bju#gt+e zfxK3!09fmU@VMdjTf#SC<6l1f6N?aO-6Ez$ZbdXS*e_C*Vo2pH&kLP0a342>?<5hR z)otCWzuUCw`u7C0b+yPG4c;U0;2*=6<9(f>$6}ige(v6*^I&AoBeCBDxC++!CASkM z7B`G7YBIWufAi3TQO}zTs0ABAWQJ#^!D31Pt2?OX0E<>Pz9J8t`SxN6(C!qxo`g=;o{GyLV2?}rOMG9DiH#LGex zmg@Un{=D#s^UjnefhPeo=b zIWP848nx^p^HZe@lXw_+VFYN|KHjR;7RAGs<}Q6E(&D)A7C3Ut&F?>yBTXwthg1V4%d9i7jlr{bKJE_;5$KZnfeA$+Fglo-(Z^??Hm z=DxvaW0S$MoENb=Dz?CVg##V!jqYF2Xg(+yvLCuldW459G1F*A>Iu<&M7r(Db4gp$HHAMT_h{KYa?iI|Ta4VZ z3ES;E5NhNe#cLz?h|{FJObS}KNHeA@C9zAeT!TGTJhq4y<2mMSUR>Yf(H z{@uoSlg3O)%kU}Y_|sVZCmvQKPCy9DNOQ5pYD`jWm2TLJJz)&lq?P&-m)hIl?@YrG z)vs;3k!k3^4h3xOnuSp{HVap`;j`&-z156bwI`d@j;t74A#PICSf+5RwNfP?ATI03 zHyA4295&kZyX)~7JzKVGiiAZP5tm0UYtV>13gkPz-Ie-ujHN&6tzuXWNj#wES~Xnj z;k03Cc4nDW84`OS`Wvn|R@?RX6mDRT8cK^Xq5&)mW!ATa>jHLNj%CjZVAqY)(BdiPbld z3E8xcEm!L=Mvp7Opy}=By@!7>bNW6bimgwEvJ zMNMZJP1;**``_%?fDUEAX6~!!sg=>Bpn#S)!=e>tXA;p`y+ndVSk{9jV#m9213TV8 zT(Ome3~CZm&S25+*0-g8a%khZ396WibTN_~~|7WsS)W6gN9 z)x10mp84qy{zh!Vvy=7gg8CP1-3XJHv^p`--+b)>%X*3dO|`M<1AigEmbb;Y zaaI3UtQ%`(DbBLQZaMo3u`Ev=#>QOx)|XStkwX~0)P}M&%CUDFZ2UQl*Ep88mCsp_ z@g>22hn|gmuV3bT*t6!!n%{^~D|NP#KOM^2X~hzJ!Y5(xPh3u*@)ClhY=!!Zmt7dn zeTta;&Ed3{w}-;j+W_hfTOJ5czIxk3;T>DP7T#X_dbnoWcfu(zyAe5%4QD;`C1Ld| zSB45ay%FC2Bs~5padoFwUE40j%FMAvr_csdc9e|Mxv@!vcc%y#p69tD#QLyhbc=SO z?1YNRvXX;cza|qGp69LtfTpMr9}*;D_w{T+KW059`v$(K4Sq_ezUurJhEM1I>gd{; z<$eh1Cn5=BJgqTngTNwY=LxNRMrNNIyiJKUTD0YR@Q6r z@|RhPPW+CN*5rr8e_6x{c8|v{NJ(2V=^?r}lQ226C{S80fOB^}P&3I|Psw^7 zO|DE%Xccy7ti2vh-$KrOSxgYSs^!i|@mta_WXAbIzn)vt%M$1pv9c6rZ9EUt(uSBe zdi}DDt1P|9hK^6&Pnaj_*(q`$;l#{UKd$)f-yn0117Vs5>ea;A%zwF|$k;&;0H{B$jEQ{9? zoy&18V#hm;6BA9#U8&oLkDzXe@YH?Jx_({6aP2T$#{!0np^?Rwa8Zf<8D-W*?rJ34 zno_m9+sG@4i0WF&u1NvKYqJB}IA&Z4;85wduO(?6E9|2Zv8|$)224XPBbuBZ{Yd` zEM}4Z_&x@NMgEHU#ac45*paoQiT8}s58@C7SeYf1jncU$MGxaF@oyty*73%dVS{q5 z>9$Y2x3LUjzIOFJt59=#e(?u7uRJGo**kioz4`f}-JTllDkftT)yFsWgyGX9s&Bu7 zpuRm@Pq=DQjBh(L-eK1poTGqL*{H z1)g3jby&t8C5s+*%*!ejG3^vF*)K@o-Po>?Odf4w!U#-X}RiL30qt=w66X*9q)(+ZMpDi88n|GrFHM5Z{ zZ6`Qu98o`(Sq`<0pH1e&|*5ljb{oQuYj(gE>)ifi} zz_NB@rmg_LhXL0~iUk@I19sDg-bu>%my;C_3jc}*Z%mf^WFD(THTTWk9YU`K~t)(s;;VY?vu}XfL=TS({TC< zJy^3#T}%Y4kJ{=G+^`|vZ7`RlfQM?L8sLX>r%kl;y#b^MN>3y;c~)l zELV5v@y&mkRzyYIbn~6(;f*VW%9g)e$6w|dt(d9dmEL*zc?5bZq$WMcb*(3yfTT~P zN89!^f?w}U_t|+}HHFmF`u?jgq$FezYyqg+C4BHun9Je#7a`O0Ps`GSu#*p=e(=b95{ev4 z1dQj!2j7wO160=UL3Df|iTO{V7%4{j`;L`KeITd&`$!QAk9LJTBs)>xYn4$%6j4N2 zkRIpBpl-pS9x1(E|T~KAjv2M7Jbhm4V)jC*{zO-+d#@1o0-!!x$$O@jOp55>qyW9PN4iF;6lZ z?ZV6ZtJPX8cHmf~2YU$N`7f_b?(wRE%sYcN?q|PyHw+A%CG zXD)@YRt;}8JD0BQf8$&``$u^HdY7#T4eD}M(9&%r+nblYZ*_tS7ln}*b!X$@o6=)lN?S!F9^?ioAxN>qYOKyvw>n1~4h0DBtvY_Vcw(`J8E{ z=6udDjQM3Ia~mre|EbT%pq#ls1~AU>cb{$|Q-Z*)J5bi-QwlLqhGPE+lp~MVa^ywQ zaoAQ#J@_WX3B|`dlF|StBN~RkZ+ZiQZ4fGnaLAJz-j&skx5d^qO}e$7B*VKel)`xf zqyTMtyF*Fc4iN9hd<(L&5L=LR5D_l;v;dNpdB6i;IPSip#JJqQ zUX)PJyG4l+FRY<4i5u1Z9F@T$2OD3SzCMpLl|_hQqg*R>p>vO-7>Rh^n%3Jkv3FTN zbUz`XMnW;)0n$)+q+HE!M)(YGP#hp)f;!rFUwuhA!Q2#uMm0;1_+7IzKW}~}bUJml zJI|x>mlpd>qUPY*CBiZxQ&7KeO#-Dpu3o#W>G}J0AAx0Z%;edIymVNxIM#mPo@*58 z@x+Qbo*Z43f`&5PU)M}4JMjfxOqaO$=S%`vk>QgXY(8b06wC*V)K0p08g?*ZAOS{TVh$ksNN?bV8B3z zbzjR324zYeYr?E3nX`;6=27#&>$!npn3tOI@a9!crfv?5VqVKmBb4{0Z(2dGzhQs< zH#c;@DdymB>$MSI#YxYeZ%Si2!?auta$E?pUv8*YC9Gml3utM{UwR-)=&1S?!W?9J zqZl@50ZPkv%pNBjCJ&Py=v?WFY>RDpmaN$Gp)7}UngPo*rQsc@4b&M?W%yBDP;Ddt zDDem0mAv{p(s}AOX@vsX_UI+sJbk!qojFnpLpsXtp!UKfjHZEh6D#T@)5SSU7w4n` zhHP=CIdoJ*oM#xRQCBeL)EJ&^0;0s}1LQ>EJs`4c1rUFkfUz+Y?go)gGi_6!yI7~u zP&3d~AcZJ!SUS(w{g`7rpu)ObO?IjlaaCyQkO-sg7--RE1yuo522B9=>HF_G$ z9rk5PYFtK$jg^w>#FY?S-jw>xi}E%oL+R&G_OeLxG#E)Mv~2X93_CeB4IZ*N*fgo< zx*DZ@%d4?y)PU-KS8EQm2ZB${m9~cv_jv={Os9xR4BE(z?~^}GJDBz`QRP-3_rs$y zaw`fqn*S_fXNB>REvpe71}yZKh?`&YOA3~DR9XbZdq|d0LDP_GY_;d_&}3tBn)ttZ zs1C*LgCME!Tejv{Rz<0~SR+blg)5GIP8M#|t5Xuts54LgH~l4MT3K~W<)~L^(~zGb zZ^BAx$#;BDEa;%~s1|e!thYH^BPonz`K?z@!c)^N9trY6C>KJ{H_4!Nk6K|| zM`>&dB6Zk?YreXUMZ@pl+hTrb@|lrHw5`H`(Sa7O#z)Oh+bK7RGw>VY&a1Oe;$p-Nf}Q3wCDopDu4T!9R^ z#eGU>wRxcR@D|8S&U+yRlmp73(tJ0gnqbGgkus`JfOPX2D>lCXnVwdUYKTu!Vf(Qp zA9`C78s5B*9$tbNQDptwvIt0ARsV^EZTSrtAReLPSXnltpKP5q1&tN$(D35tW`Z4L z0tbp3&bS_3UxF%Q=MCb1-7m|nn-M`l!i}t3#7CeqH-{0}&Qr-SCCH&#rRESmH1;8p z&{OJ|EV46MM9SB2LyI&FHx)GIVC_3`{ti}MskN*e#SHA@j+`dI*6BYwYF0Ct_!W4T z#It$@w$q4|7~7U6F>f56X?HRRz)lP*uyNB)s%RQS`2uf)6N(LA;9G8$vFrffb|Z7( zmn3BKl9A1` zVi7U)O~c3H!|zJe-rGW1M-O=2XrHwJ&rgkQJNR~$j@XuLpBuz=1G zkPi<=!A+RE!|Ot)H1DqYi*xP!kXz~=>-z?^@iKW$6(xLw$Xj$3UvgkEOv0i7B=!+P zbRb+=%upf}1^H(enlN_<^p`F3`(Qq8U%nU?_mI6PkE$t;?7T2HYK>r`=pd0BBMO^S(G<)RwpX{ScP9q&MSs^viIsa4Ha>_AC{ zwKD|2vlI2TKH0PVC1Kbo@odF#@j@ArRw7xCB7a-^iKNzi3|gZ%^$6Uhc>1@AWPxOa zds5)&rX#AHvi~hvisIsweYd5+ZKwaU90L#|TIOPcYS z75;o=C9mt@^%);?G5`)O$9!R{h+|xKgLyiX1^Y=UII9%H>&r02e%I_lvSTI+d;Q^@ zFF@QLO>SlQ*_AV9O8SI}GJohJ5;bWk%84IAWhCAJWlfn&_kzIq4O61TyVK$=mS}ph zK8u6Ds=!s{m}3`@lFAc~wQ`2GyP+%1F%u)Exdq?i9=f7#z9~5yNKQ<+=^;1yQCmzV ztJe(k2;P8a>E6wlyYpB;#wZAbiUGu-jrVSOZaw7<-FXc%69q_pe0T;lgUFH4TX z(n_kmEB3TQuS)u1G|Rha=t=sKj*H=krNbYyGLRbZ>@#sYI;jMv6em0G0{FIr?RLUd+z>EY zR>R$z+&NH2wwZ~J=tm@M+$1gCFl%f5BAs*&<$dXtFmsrjPC9Yit+$O-rv3!BaH)c(_CC`vTC*plQSTe8gRHAs>$)uk+m$3uWC z<*7g%Dt5Vb)^G!fuIXZx>|AxjYd78ws~j8AL#muCUT4swR8h}WwbC_$T~YD(Ux5mJ z`3{U>#>+=s&Vg99FULzVcvgU^%!Of{Wu5<6Su=g8^g`=iJKJ=zJ)9+J+uoI=6Yt6* zkid%B^O;z2`vG5l`AH1i5ftXdC+&MvmLB~;=B1thAQsB#w&NvaNQ9J!U;s4G3e62- z7cxp-fj6l3yFP@9fCfGe1cdUJGht_{f;C*RlN8y?bLj>6R6}1^0w)||vl}mL?Y!Z# zDR7KLOdTTA26U2Et%Id?n^3X5ZQ0@(F>UIRfUMpBqr@G#EingQ2PyX5AwAv)J)mPO z7d?E_K$OLY-j!r%n#G4v;;{A_@|2-61Sy3%eZr+Uq@NT8AyEV|art4d7lZ-uS#}FCKv?~Pdwt;Q70$WKF7s#9*7^H~IvX@VaL~nmpvi5&1v4?&u@kdbG zl(hc?grOVWlf?b-@0Eml`D!Y|~`I!;yIHXb!Yf zGE)eH93Y@Vja01WL#SbMKY%%{Ltw}%nKcL>bNit=Kde0*RzKMt4s`>muoS*a+}PnV zv~7?KZWAbW8~hrSl-fFM7MoWNB9#kdfM2xiUW5o{6s#p?x$X2JRIpRxIn-n&88z~u zR^c&2%LfQRnh-=?CBzd^M_MZ2_LF*=-_l5mHo7Qpm@onz`>QSzLP0S%hJB@uAiS0$ zesD{1svn0*(Stlrx!z6D0%qBEQA1cr?@m49W`&zLK*4{)ntp3F*B-U^}#!` z0)<40hhCJFqcHcFyRcZq=WvnGmwCQ4kS`IWOam#GSH2;(zNt_avt(GuX!M_;Rnxye z%xwfgh{B?PUUG{!^)la*T0F{=Xp-+H-ROYR6R&~LtA_9^Mte4O)GjE}op|p#Xtc?k zF-XRBn<~RQjzhBzsKu&=)+=OY*m(&{ehz;xm5IJnWMQ8WsfzWH(#Tf2>cn<%G>Y+I zu8?pDg|fa1_n^fSPMU$$S|}|TE?9+w8jD1uy+@7Jf?#U3x)2P5f>*`$HOS|FM#W+= z$oi|FdrlHt`xHq> zulnj^AInn2Ytmq!r_(;qpjJ!c2h~_HGf{0CiIoDPWdoO9V^?D^MWFQbj)s~UEbHeF zg?X*K%lE}ZfwIr_<}_=(*&fohDzvrKgtw8>P~Ku^$(lZ1vS&%}G0==-w?Q{3y^KR|fL!PsQ<^z6 zdr0be(*z{Z@{fKjUFL4VYYoMC?PytpI9R^_2v{9>U<|vXPlN>pR8T%iqP@h2b2Fia z(?QZl#H%E#jTDA@N)8aVA!LArjR=()J*JD*5hU}o*%HO4bCyiZcvK@lYmUP-t^SR4 zY?q2h2$%S7V=> zQj)1igpM=1Ty5_PDs;8SAv-kI0<6(8uP=gO3OT6uiu2J=z(T(*$!H$3H0Y6vzpVJf_#k15NFtlo zJ1CtJK_}|DoMRtJ|Cln=WJbdfK(K7e0Lh*^5@tDr1P;hVYge$+$?0D}KjTkQ%!Gcp zh2jtFE5XxxZNfus3+pXOv*(~*bBJ{E43LLf2Z?2a*7E8;wN#R~!a{{Hn{n(N$vpC= zOkA~JtTy&w@k|;vLb7LKir`$V6~{4+CcX$ZLBaq(z}H#ApVHR}j64jC;N@^bCq!@q zGz4r+R1O4#qtVhtp&{9*)=rggYDz=$n>w`$3(R80v+*WWqg4`H#cEa-1^0yMN@Z5q zsMcC&v^pMF#xqbM4q{si0l4j9xZ6^=7rqr3om>qNgpZpgqdWChsncUbu`ELXdrAGr zuuR^Tm;<+E(LQ7s8a{B^mMl?MYHGUPmxR=i2JlAQk)FxeUJWB<@~UIf2J~!;*S>f{ zU&-|!gCK^BraM7XH9C)zeuzVn#Qe}di-=6K&lod}fAU*9tsITxRzO2{&6zb#R!kZv zgE|DrBVIGa(>oDQ6CxgcR!R8k>#`h?*_Ck7lTN$_oB3tQ+4qIC8M9g1dIm|Swvk|z zA+mVEC`7rCRS(7rHNovs1&w@35%ftJ1v^OI12J?Ut0`HTMQLVvmcvu8gvU;4db(mW z*0uoJHE9ZbVwDkI1&G9GL;k5|W(nzIBc;l@RZjE7<^XLg?qjGNaUFcXwPh7C990|u z6;uV^$ag1VJ-dLJv6zw8xAhdUwMmfR<=18Du{#J_BTWnsAqExBiKuQ)K=~qEXJnHZ zp0r%Xif5xI-T1%Sqh2cye;^CCT#+{RWbpuDLPk~@2_trK*#1^+&5)@)fYL?(3(?=e>(=vUr_aE%YCVOeM??O2lsKpvE^K7_wkQpp5A{4pKZEQalR3jc8i$JPCEYBHM5LyQCtA znQ-t!NkVsba{c?VX75|F@z^IaBbvFg7-`pGv51f zmz^v{0>DMa?ctUSaI9A$Bt`)s*{Gu8W(}3cD>q?`D5#}Vej5n|eM=i!vn3GW#;AFQ z7giFz)Ph6`u(J8!?oxEud9U`LEiog8z#ESSGe*kPrH{(GqhILDClQKBoob~H|MXr0 z&?VQtDGxoIg9nWj|9%5NkhxgI2m_Tu@d#!9aJw8RWztZAip0Inr&M_Zkn9SEsM#F` zkyJpYDFOwMo9iV#OF}zHc|>P~ZMw=%@bo6YYI3%z=vBF_s*wJr+PWYFB@lV15L)AM zOgMAhODtPwVb|-uyxCQ^Nt; zwl`L719=(L@LmhQXWfEfGO0(T^ly#S7c}k6=o5%9-H}9qTh)k?pjHJ_Do3ZFzjWZJ z-8goUOzS>WVkgdraK{RW7$}A$H6)A!CZ<|9dPDl-|D_-(rPwMZ2{vKEo3$PV>tS9**eIK$*~Mj*RSzx%BuI4vw-0AW0oUP@HDRc1nms}GBFC~1LIT+<5WWU# zK^4?}S>K{~q$DkernAT6<)2d4Z;V%HjV?Ub?uf*H^#|E{;}4Q~3L|)!N)l?YmnfvaFZA2av&V1?O6)uIdp*ZFbkviDcdq|}nM0E`n84U`(OK1;lnIJSo zRTH7roN|eChRd1iEmYpn9dv-*x3l|qu#E zFC)@UxN7h9dabPj(Wl%shZxs0rsCDww<+P^iUtaHeUQr7eS@T8=O& z4t`iV6v6^2itOxh@oial{6mS{@R9~#x_Hiz!Ck|p8dg>f z-a*-dE#qieFI^JJMMo98FqfXpV3ToE=8KuWTRO%HGSGJS8)=Cxk z847;vq9BXL?vh4IH?<*7^G}~Da7QA!r+&^U5nZHTil|RU`$G^bj281wSUBJpSn zH{UW?$K|k+^A-%14Z)*i#KXbT&2utZ=VK%}?!^H&v^o5alXUS2KP4Rl zMGG+uykjCPu^BR z3>X+J!`e@T;U9-I9Kz|I(K2vmxvbd#sqDP;cges05tP>*+5X(evia%vCF{grW&IQX zAuG@RLsmTTciC|DCs}&@W0ZZc{Np`|g*Ozw=WWSr_)3EFpOSVy36LTY64og+WlzQ8> z;2|k>ixlzXoX;08pViR|Pq5;ddxdoRJ3nslPwbd@cAQg|HM?VtK=i=@X;_ z!YsZBYx|7Mlbl+3fH1w1p}-Rmfrvw&laY|Ih`z@`Ual#F=iYlcQd_fRY?mmc50TLg zK(9v`&||L*=qD8{Kyr~zMS+8VHVJhVQ$Ux(SLnvX4^s#mf`-WYg@YvulTD`g94CG# z+3`Ux)rJ6W`<|;LWZgA!T>P_ayz+Zlf9ZQ!3!Rp8`BTX`e@8Z6|5~yy{86&b|12vn z{wS-j{45(Tev8^2m{RGG?B3BZtRf*ow;cUe`Uh4(kt4E%u=A3!10^5E7z`+g^37q7 z$fi)-Svjm$%unfu*%sK}QeNKIn{~-c7Y$MIhg67*keYFJkO~?lI?OE_d-M&+NYdxH z&rQ6iT_m%1g~M-KJaeH04j3&KtzXY+D;}4u1D^=XUSd)9YEjB)d|;5N&vSEP)y@9E3xty*vU$tALIur}69}nu%o(znEO@M?J&_G6#c zp|ah76c!L3CY3Ot9H@xg0{>)dD42Q=^<4P^x`<$;eJx4G00ixldxWNoWPDDDN}c%7 zon4g}KF;T^Cva@s0=2N^nlEj;_2?lvzf2^%3VmNpk_igD6l*7?U8=I!?o@Tqy0kXUO6`Z%O7MIH7w!k(4?Xw!SVYK;~W- zb-fa4aUv=B-@d)~oU;#6Lj#{}3zx!na~yd-*$AcjbHh1)SQ~UieA!&i!7j+-qNp zSLU@ZWX+AQQBD7qq}9DI%fJXrkX5o0;D>w1#e-%%3UsTk>iSd`o)wDVZv*Hq}d}8 zEZ!nj6vu5(7OdB1e0C%}X#F`h#j_1wD`zl4=Zw>YWh)ZwCU}eNTQFuVCl>3yY6*(U z0-u+$kGEd}PA8{PN^lm0PWi+CpJA;y3VTh!y3cF-tIy-Bp>S!lZzWc;!_09`)obkY zXk1c}ozIVdi}bnk zk4p)^u+=2bHKNq#bjdb7f$JdhN7<rtk zrR`&d8?-rx&Eb3)p4-@>!Yas5aLwyS_F~r92r1(kKJ}T4gqoR6dF&eEMLA{RWp;zc zPSRhz+EDEj^CXepZ=2fG`SK#d2w!2?bR%*3Yy4H-(}lVcqYGZ-&+JoOP(ok70O4_~ z63P~3aR^LW8u)<~=3NldM|Qw&@b4WjgYDCiSqPQs(fiPv_Mw(STIn^Pi#-(ymNXVY zP(d_N6)A^NM~P5N_TJx1_c?oz8CobEAma1qjFz=?$3Q4B8fW2N)QY&o8-hG}M6T+s z70>{3;KN=DDN;fyQc5XO%*bekMuOEz0{HAzA^jm|aG@e3$9=ag7!HScl*EjjFO$*J z;RUzI)0T{yz=bk$<}TTG>Mhyx?02&K+`r4Rvxv~;T>26612%w_e_21i6KgH}qz_qSK23?U6Ug46T@g_K5R47cn;u@x#V5VypPw&dBP zq{(Bn6!kLzBR z(YY7#)08L%0*}^7FlO>5pZRGFfG;9{{|a2&DOf)H@I50qJt(q>TM8c|N;w`uFJ?co zaYc(Y6;Eu>F}SloQNB|LL70gFKYjnL9LP@A>l#B$g(z>yey+0Vnun~0CT11T&*?q8 zFYFT&cp^n;WVm>zi-zmqIj z|7&on5aPt}gcLXxZMv*N-~uMk!-FMpGO&m{EFtpf5IDiaU}Xtw zK?p?k9;#^J9Vbg0NNUQw9QL2rZrHE8kP2&@ir5ToXc%u?Lyxnq{)Z^L&sumFvA&LK zZ#!T8*(xW>?sMcN9H}USmfpW6(Y?f>#}Nz%;4j<q~%8trQ*RH#x-Gd<7Y zTwOPCR7cydp{t8S2n^1@15l|h-N4z?luv1MX*iU&aWO+}7UI}`WiX4&p-ytmaXzj0UA-ux6HTEM5oC^w*~Q||SzWa*g?)C0)a4?%%WhZKZVG8*p6 zjJ4NMz7&sDUJ@mEU>{jEe>Tb@P_Rv812NQ6M2^u+224Pd3ry-RsaA6kR?aLQwoG)B z$F)Ei643pq(2xp36$K%7redp55b%QaH_U#mDHsmV}3qG^~NyoO~t ziKaRDe(6XBnVrgt_MHCqeb&dj{oGS6;iwBEu!q<{hQ=$*1A+|t;lXS2eF2l#z+unQ zP=$m3rYA=a{r;ZS0SS_WysFoMoK&?ZIoy&uj!q{HfAhAQ+q>o|XnE5%bxnoRaeRNq z&m3L~|S^{y#?biWSJ=6M{@L{OWz`oZg1?@^Cr%^hV1!KQJ52_3V0RKjAq&OUEmIa|KPy{q{HNrc`-^P4__J)i@@IrZzLjkkzLB-p zzLMO_pCdH#ol%xBWq%Og?91q1J%KoBElMfzY_W%4M $v*spbn&l5fG!dRCyQkH zv_7&iWGo&8n%q+%9)c($-l)MV^?NBln!~(IO;*DEUx2$B2?T;W1!n&fmD>!sZJf%X z%%<*AF;kgT!k&jP3a4=)yc;L5SfyH{n$lUA1lx=a2Aw%&l#*YMtj< ztXjw2q!Kl(`;5I{J!xSe&Q)WHV(z!muQd1l&P&fpRl*GC@i#av5wI};p(V;| z={cTt8Nuqe(%d8nRS(*@WgN}xuxt$&pF+&8LZL!Y;C?@4q5TawJP)s1id7UJ#jLRp zsO;CuznA`c@F4NwWcy2T5nGG@GLX5DK$wsnp3S8CG&)PUvHj&8zu zf1Yl?w6EN~x{Hls#{iaB;J zQ+s8L?|NQ*eA(_0Dse+cN)~!P%is<> zkO3=!a%ODkiZTP4=$!g$+*17G8G!Jbi1y$MBs1*0U?cBlq^^+hxw3f(YgZ#mZ55$} zr_=hN!ANrqk+7ljQ4T&@+P8{?my8fKI^cRvC`SAF`?Br&Uxjh3)kwFlz5J8pUid+_ zoclM~eD-gU20zNW%YTwGs&`MKe(mMoBXEsgRGR&%ct+pY!@rfp$gVOlyw=C4k*tyHaz3~Dwg`bhtAgcB1)zoJ z{bBB25RYSa33F5O(FD-Pva}>A+im$ttwtEv<$KXUPtm26Bl~(^DK9F27*i3=C4jYp~W~cSb}>GL!%t#nV|@_JQ9{Sa7Ecrqg3PVeCOJ#c5RuLt2fJi2+u;b zRm6Bx`oQQc#sb0)%9cusl|4wfbf^i(oNbgYugBrrB2mhRk)aW&8t;cH^WF%M(~-4% zFO}JuH)O}@f6BI-zn2YHzLu<8?@RVmNTK9j`A+Qlr~ggXA#!bHpNGjqz;>X*=0@&? z?_~3hKgo*6P)7k7m9Q7{MfV|XhDiM4$KR9iM2TH~60)Vj)oHurJFn9-|80bFB( zQrA?G=C=FjTKmDgrq4@6F@?=gkTUh&64*oNaHN@s4+XpJK^oU+QtE$$yO*Hz&AvMr zL1p$a4sG@kM+URkvEGuw;*kx@oX5HGdG$cG6SI%)Ue^S(=6WZ0G)~v1{ZOJf{>(M{ zinLIyeyL2~)KrFnTnIk$;j=MhNsUzo+^(HBLGlq0>Vdi0T|NB8t7o>XFaHc3IG9~v zC9{xj35u1hbTlqHG0Kux{FQ-Hp!hwnO8ZAv0v92&p!+BonBl@=*Yap|0s^D#`%#O% z+J(_tZYeVL?V|b*tXmq@0Ut;Wb*h{{T&hqf-M9eFKB(7*=uW7A#n4K`s5AWo(5yH? zMs^H92l;gI!6>yh_HgNhGR)j+>wF88f{^A8?xQM2Q^|DWy^9#8kI~ zw@!tsJndGb+MD4n=U2P*f#}2v7=1C>x1R=|ngSH+7|9;8lJQI#Smg-7N0CG-)$i^B zCxjZklY79)Aa0{}wd=|xxHLeA{bXOmp!ARNAWe_e1sp)D2OP(>5)C6C$W9^>ky07{3GMB-uN-4iNr9aW-`@v z^B|Tv_R9Xol^U7d`41lZ8E+g0EksK>?ZX0q&xZ*q)`e9>027E@t(-Ft<>#Zs2OcOx zw&NlX$macE-xQ`YQ`m8}gdN0b(3AU^%k|J|K_u^!St68*xR&=r1J{9F!(`sW;}HCc z6i4_&%Ce=%Q1X`nz@Ai>&>h@T^6Fa!6mf?R+^bbKcQllt|1hbVJ4C8c0bLu_RZ37j zXoY!8cEDK42^=Srx<|;6wsTR`n5<Bab*0{c}eMeb**{4@#ODCX>2h9=vCywDn7p6vuBRd;doq1_PWi zJfv;jS{7phMQr0wgf>h(_^K>E@wW6G%c^&Di*_21dRinD`eRB2 z{S&oav^VErwp0x)&uWPM-JzYO04g&-bfBya8zga47Rt=ta1c?a(^hMklBDavLRnh# zij-XcgKWI@scg83+T0s|lx%>-T7T|O0N4ejHS=JJT3Jti4&+_`+!&rdjhNbS?I&4w z65b+4+AIc^8fRDKANW@0W?n_JtJebYOc^;;^5@OM>w%S^IZ0MD(Qj17H2ye+h(<2- z1v@Ci9P}Sm0UlKIRP9mSBJx@|k(zFyBS~#ngA^}g!Dp+s8-LM*r*RRy7R&F!+%e|l z{Se2R!v`adrlV>$AP$P+9wcGkxkmM9-y>I22}72|kLH;V-&EK+m&+ zLHGSH0H~ujO<>FviNI3&Bf_xmr63!%-~&LZ;UN`QZczT_v~#IO8z*Ke-d^L4Ldydh z7RwL{fEH^H`aXOs(1B0|Cv3s!g)-0&lNrJLBc>Ij{qJqbL>*ovD$$~lpNWPRTm-Ak zN`RuncpB(LSH9DiZd5X2I89BRFFEqt(oWzZU*%pnt0SLuZfPLBW0B9l% zqB>7ygb^7o6Xv6D`By4$0=n zq3G6MMNtxM&78~7ZmX&1)+j#D{sn+Uu*S;fzV#?Ju-3xdETSQ5QTKUpi;9n+gZ3JGOHVCT;p|2uu&!k+g&u1a$HYwhrW^IKvxmbTZIk96KiJ zABax-3m34=GcIicj|?NaZBi<;mMW3Qt4gvz=ven^eRLI7`ZfVQoj$YA4N^vxRHPYz zU2h4}-cnAH=s}C|-lsp9n@VJ&5TQ7f8V4Wxr|lk~LIB(Y)PH5Bdh$p0>MNQq=J*$A zcbXDai^e;D&3)Hyqm|~gdG&6iwIXVS`us*_IU$R?xOSk%c`PNGF5ifHtt<2>5eY4a z_<4d`WrXpg+)|6(V*Mek+3w;~ix>qvC`y8n(S&>-*%K2Ud@yDc!{B3cpT=rv7^_Cz z8VxVYT7<4wishe3 zQ5Xw9)_3q?S+?_*Y<=oS*@R;K?8`q(<~dlW7k`p`Y_GnCh8WtjnMki%`HF6Q1&Bi# zZ+HS=C%VA@yA#zZ0 zS{97|i_z22RP#0h`+=Gl1*hsBf%#l;GA57%RgP9A!rETcx`haPHELcaYN&bDWA)gx zBovKlm)uL8*tl$;CTp53<#+SMK_{-67HNWOlA(#|%JMt4b8$QP!VNZ7B;pI~V|K<| zfCocZJm5H{9nEnRCFVFru5_QBHfP0N#(fY0mj?g!(??7(%z~ z*JIqe{w;||ye#F!J2GzxDn?pG%K$7HHLZW3>_$=4Hr#9}Y!B`6AVN{156hVkYwT(_ zObJnI;XpNxYY`SmMG2+mQ>nJ?`&L9DNj2CgapWtDoK&Zw1+XG$#C(L|qW2KgfZ2?* zsuHH_#CWq`rM_CjF3VRF^~?qm#|Q|(*mL8KJP1XMeJdWzA zaMe;1Vg@C-euLGyrl{!q`}|rP|oe_f(TK z!=U$+3%%+nYp6=M6vt=vTZM2n&FK;}z*vQt(dLsCFjvBd^haEj&Ca1Rdhv0|I*OJu zbd@I5!?1MvfCwW2s*EL>p)Wdd(_olD=70m8z3Bups-b+S!#Hdtbk#YO2#3gkHj`xT z;20@DtKu$*lv?n0H7a_blfl;1&{h?Jtj1|IbeLx~lu;$z<6SUA3+UGr!4~)283iLE zuD4{&m>~=M!$v#!N zVpPLQm1#JPNC?B7KI3D8y_b^Z-Dc zl;Uom`ER1Lr?eun7sxUyi|P@V>=M!#(=H`jf3hId(epeob8XKA>Q zqfAc2iB_k2HD)*0W!S$e&Y;qM9=+teg1P>g((O&q`s%8H+-o2+tnyIQ zfRdBx92zcVfVD1dffK!@fa+0~J|e!WxyyDSFV*#Ie-q|EU={a43D}|u@+kT|HP=Zs zL`H5!J=XZ%sK53u#e3s7wihoqdvDxV$*e(*e*6C~vR(SuPBXtYb*{NP`=PbzD6DT> zhth>`d)?v%?s^D2Q_qz#XtLs+*{`FLk*G`PR`6h>fBD$Ma^(?Vs=L-3>Ri==ax6_Q+q za)$;C@WMcl#TW=;aZZQhiH_MY z>E}IJW)6s!!f+JM!X2oE%BV&h+rYkprg&*&CzLwEqVS?7D+(GU)pJKm)f}XDkYKF| z!xQa9LdtJl&}_+=JW@tKG*brnj1$i`7--^wbnDDI$*cZOc3=62Y&!F^tUdp=Yy{Nv zf$Cg<8d@5@AuAsDXhw%X--!4a1IH9{1br$-A0$F8XC6YUTiL6ay@AdEd$a`h8YxSs zp$!P{sthxJ%TYth&afBm4|j+oEN@1yxP>wXa}t_LOizZ3SP|EJjXM_bDAes0(PP|e z-+6HH7IuBmk9JqZxqV%e^C9GzmtkPZhyu0_8K_bb|I$&amhH@xxN7^fvO;U|AfSv` zV5bQYZlGD6Fbz)LPI(?INVD2J8Smf?EDm!O4r2YPML-|n&1cnXv~H~MW8EI_n6~QP zCBf>nDimz4H0}f5(sO)EE?}!k?p2%SkBW<3LS;)~`qf?2>!SDM%}f$S;M*@ggXV|B za$*NoEPye7ra$&(_EwT-NVWP;q#h`=`>W@bu{L>(wr7ewGr!|f&t)(CZb zb;4AopB`xzbcCvBWRsB%3T)$qAIMH@2K7caTNV9zg?~j5*sv6^X}dcZBbu;+W8~l{ znFvFgwNI1hH^{2vUr6fS_Yg&T7wHmoj{^aUbe+v->~anWbLbpl7u;351L<#~vj_75 z02f;7DchgL0N5z$<26mD^o~Xm!axj*?I*R6LN)ZQsUH7J@j|24ViedaiUQ_0#&(dd zJ8`$Wf&rTOBcyi0NU6t-?}M<~7>Q2Z@IkVm*Fu@tZVH-&7QyjG@niQGnZ5LgtULct zbl?6zl5-l(eNX%>>(TDF@fr%9U~m)b@UrniyWLuck6J>%J-uvN<4Z6QoSrtJPph2M zSl1u^PR1vlLyyvG6aWfgVryPfIqBXbOgRsi#x^DP>@{P0M9;J{ zhe-sQ@5sA#8OV>7!p^ci_4pBIQ9V^FwTT;>?kA~B_m>7ToQ>*7(<&ZJtNf2}WuvQW ze&rjsE9f)P#8nIl&iZ9lReYcJw?OtV6Byj1aFj6yVz z#lUD8GW34iF-d>tLM+?cF-itt*)&@l%<#y28EO4H2r;2p78YS5IEGN+Hiua13`=g< zX)}_K9Pva_94E99I#t~7o3Q^4NjrkUZ2%1Q%#xy4z{N?@(_=cu^F_!maQQaqlxl#b z2KRT0q}90N$K0|i_`y&i`T=@NS1TODB%qEev8Nh#C}Thl^wuOyohAMQhGLR%r1Y|5 zG9GI7yA84=w(eQk^~{f$_3@1?K97{pjlW11>IECIkay(=$$@#S-m8O6?}`;W)g+J6 z33EP)5ECgd2=c1Gly)Pwp~X8``glgjI*g6k7BF5a0q6>JB_O2SU!LK8E0?znEB%7M z>V%46NGg(}n^&3ek)1v)-#){L3kt#78 zeN+P?dguR35ZMVBg4(<>svugMF7HtRrFNv96@pC5nD_Jt7#g&x-JnumRHI&0^L#$D zmLuPc%kF%a_p2(%qQMqR;tM?m;KHD4f{Pld0&}-37Y?De8YEpSqmcc9Sy~9JIih+= z*4!Cb2W7PM@tr5#TA{fP&7(G3h71cw5yN53^my(Y$$IjRWc}ujta7%~ii(*O~PK=t}714Qj=Qv8uYtw#g&%R*^OXi>VdQiTNO zHY;5y*I9!@AnMpJAGS+>i6T87K|R6-F4jBHWvNM=p%&eFIH^ql%6oJ}ug!&8ho&T6 zL|sJFwezSY2{yH`{s-r1{-q5=oVTC7|B`-u8alqp26q008_xBp;H~7YwvSsI^}SFO zHC;mRPk2X6?oxkO#g2FD$9B|+H;%dACXamJ+eG4sR_H;-jBWc@HG-c{&RunID9yXm z8YMl-9W1^JVThP4&Lq{$ar(Bo&zrDh@Q8Ld-AYoDZ}sE1-;i@v1~pu`Oy4U-R5duXPf zka-R>O+SY;z|2}Wp)TFqj$4!>T-bujI0-IYI%EiI7ZNbtA`K%S6H!JShnCQIXzno`*~-N2g-+OdXc-8P16y{xT4AF1CeY{lvgQQbYfbV>Bp7_K`;pGu8DH zw@iYITk3Pe$nDE^1cama!us{C#dy~}DEHVLIvz>ckun*P-u`~$#lwR`O(MjjdzK{T zz9c)Z|3kK3{wu=F*HKux{>i)InSJFO$+?Q;5WLwn5EX8_R^>tjE1+xRu9|<$Ph!4Oz zgkyXtEmb(AkH_U(P&tKfnGW!xyIzc`y7YJVK**-e8>@MuleA!K_@>;Dw=sL6TB4HV zhRxR)wB;A|+*iRYJ8}^iZ$>WplKf)3xTmoY{)G#tMB!1^oRN+i{e$0!Qlq5DmT`u7 z&%UMTzAwXEfdUvPMKN6@c`8O0bmQc&2n}qH3Lm#T5qQY`Bmj+8UNaEXgv1E+HOU00?9Mm7Q z8JCZRf>5368-oPJ2-y%g6ikL?Dv*HtH@*V|uPD*6rKWKwrt7Oh`>ShJh3>0bESyw_ zaj=y^L&097C3!-$%zl`DULcmd!Q@MOr1YL#B>5*kkkVT}W0KhCP)X=$Bhy&h&LJ16 zd5blT0TKsYB~?<@JfuBsz{V^FbrU&B^%J-$b|023JA7Aq4%vtw43QZfM@ZU)aIqqL zBgl*UW<@$$!cmJtlb{?=ag2{r!iPGf4@Lg^1zut@L#utrOHka+c!@b|eKp`En2z)x zjM2g`PH>-tJkn5skN;FQ`pv0h&O>g(5>z(2#4oIJ-fcN1!Z}=9y6>!hTY)&QZw2zh zRXA)1*xZWhgGhFS3~D<84<0F_7wm(5kCy=+iHEJviHB;^sAy{B9u8_u$16++uPp-y zO-?^1i%XH>-GlweW5)xWI+RmI6Fc^emBXNW3d$N2FnlTP*t=*m{zN*?*owJQLDCC8 z@p{Zy+JG5LRcLmoK>f*oxgOoS67QWgqm=+^HTbFko@^03*$wjoBn`4vL+3s=j}$E4 zk}gxQTIu$)=puaju57*q8|Lc!vi8;;S$pnhINPZ7*?#Kp;1|r&LA46FM0rU0MYrg4 zmzymxjg4HRB`bE;lVzTQI3weDb1Hm1xMv9#sa?49Me*^8#!C#6sDVRe)y%ml_=x~9 zEXtQ+L;_Bb1WHY1pcc&HfQ8p6czy-5fZKkVSu8S3eI-8r%HOpg-;xPqW~!*PX;Ni) z7%^Tq|5TA{+`QsbgV1$dSU=g0yyA}Fp)wRxF1updrL9wjL~ncr4Wytbctxdy##XT+ zB7Z{;eCn12;jCOawN0#wk$(A;d1n)#&a&COT;h>W0-`)b<-Lkq7EPm zi`t3R`#+Q(fkiretUJaE<{>A#A#jwGgFz}#;pk?PPE~l&ng|Gd#K}2ea!ts1SrITw zruN0^HXWvjmnU7xP|V2MAd3s%lbyHzBpYDP=0Ev?Z2HYzjJx{`b6W30YMlEssv6Fq zrc)=UWPwK<8h+703}djWtF*y|+KHJ_@(Z__9i@gMizLI-OhEWK_uw}&B>JFq@K_+7 zS_R7T$yjV9U=m#6aLPl7JbMKyA1Z;{U*eL1P)}|yX;e@3Dox4(5G^xnsi=NYxEv?K z)P8Aju}Ui@Gw4Rqs=82Hq}EcAGSQyJ0orM8q!X_aL@~MtVZFMb0a!p}ylj{?OuAx-oiC;iw3$>S8C4kZ0m~_mrbd!aTz*pco&zr5b>avs=MA^jp^h zTeWb%I#>$^qr!Bkgil^16MMn;;;774m~HCmFC*s{%9fL#O6iq9$U2nEt;fusyo=w+ z1_T1vVmqHDbU7DMbEhIJ3q4oJ2K?Y;%xsD=@~LV(?Uz)2=$Um6tcg0jHD|woWXDTj zrf5h0yoA_MLnS^ASK#9#?$ZprIuEVr@X`6> z$N(lA__v0lZBHKEYZz8z6%L+U!jq43%VIkM_JN4pI;s20!y&v&`B51OTdax#y#h_8 zer4EKiWgKBg6WMgWpd}wmEw($s)xzG&nnXvP~jlnZUKNwN016 zyt7h#8GMRqhPz?$=OaLubM{-b4E{-SF}iNuC0K7%y;^p%=IYmgDVzfHCu4R-9n(ob ziHg>Zes4N}JLO$N{Nc*iC|~&+vqyiBKBDtV=PgU)<#vs<#m$#oI4{ z;Vo!P2%%nk*}STXNA5orYS&B#aJn#KE=n z&DnojvavQwJpM?+4CjTAcQGeFldz~m(!Mi>Uw2p}<7e*H?-O9lTU_qQS`L|NaXDu# zhfu5EhpWLSfQyr{v|q~6*Cf048<~-Q8M7t=#H;lJNt@PBa-ndoI^eusVa50Jv_4cB zVa0L@_+fZ}eTey5`=bzItz$Vf^)`wn2I2!;_fYL3jQ_%v&0@GeWf8r>#8WZUW}-|U zumDwqV=<|gz3Y+U(|@;QZ21J!VE&J6!tm}*7k`kA7dS%Gw4FBn-_#we4qt)niV>BY zP)(u9R4a=E(sJ=(B&Q}_ve8b^ZVNbb<0VX2Z1`4UtM5wu>DMLv=<~9o;Z?~!@jJ|y zKaP7zmZ9y2$-OU3WuWDF_DaZi3%4qFBZ2z{&^hIUpebhROU7Qrke=Otmd9%p;y?)gp@WIhES zFhD%ft&uu)AlPg&UM=36o6VllCoECV+qOziX(kd z9Pfw8@DL55LnU=$h|GUvoOJM-Dt?^E3?pFN^fKA<=+9Dg@!z42F}wdsxDL7JoYKf7 z#1Di~Dd=z2Kq9?h$jRqy%1jtia1S%_$p4mzy1_Flh}`$N zb&y-Wdyr3KzWIYUUO^1?OI5FoiBYvOo=A1e!W|ZI@Yn-9Yd_CdCqPr594Ow)T;dy!k0vh2`*4>kv7Iame*J zTni|Z5B)gDkW+G*!is?yOhtF=#Juy;p&f=j4#<{{J+Mk^*CcgP=+SbrKmA>633)RC zd)(5`PU)utkzG*UIeWj6@O3YWmv=Bmod-zrq`{ICG)?NjYqf~ieC~Qoi@vN?33Z8V z0t7-4pBO`9O^esQIrSeY0BJ04uZf@+5eHoFsE8oiY zCx4L46ByhLC7RIiv4kCZNurLuDmjNgk)VxNF)S+%49O*zM#-v$L9h!^hD36)dIHrh z5FXVam+DTnFHRZiwPelv$vHiensP5ys7gsiaV52}T4?Wc>scPRpIgdC`t5n{yTg5T z+$!f5FiyUq1SnCfjY5qcmEWGoholbif^E=F`E!v~ME7(DXifW=Oe|1?Fvbyj6BtDR zPcyw9RRCP#fs8<kQEC_h9kV5_adA?>DbmWSKN%cw!w(z$1vc(#j>sInJj36vwu zJDjrkUIy}wg@j|smeyJVR>xVr_X~;M_6n+Vu!1SdjpN1*l{JC0aHFt`p&nmzJ$4PZ z00=zT-YAM}vP)4Y@;kdBtug2tdb5^7j@;L!1lCzGIBos>aacNOqRblz*P{I>^s0tw zp}%+Ud|AE?D}vtqtL(b`lVsogNY=prU2*LbS%tA`*_Zw-E1xixhU6T>G|EyNkqNRm zj#v#ejjy>`N;?7kHeUK#mf>|S0wUuv3_a%fZHYSihOCDJ+%K>i^XNjQ18R{nuu4Z> z=u{+r0hmazQYFDr7DHnITg4=(%8xp3shGzo796J%-l;tABk%sscV!revhxF;{S3Dn zxK+U|!$90p2CC&&8NXFi5L`q%pNw5XlsaIL*r_Bd=>zRU+}kHNV7jDYB^{a}tuY#7 z*wO}BdEz5U#59Wp4BA?<{}V~Bfo9|So(^hBUuK+BkAbsx{6=hD7s<%JD`o6J=*PZG zw4gL#+cjB%rRW$=QByx1#j0-UqngpTkq47en#TF8tDr#Q3*V47ehj<^O7uvK3xOL_ z2T!FMHh&Wi;xj_k;~DpngDPoiS%`FFIs)ElF~8kI3|7a$*xZSJ%nnP(#Y$xFc~~CS zA1zog?mYu#$m{}He*`sDm;OsO!7I%@hk^2luw@~_mh;rtlKb>Gvg+)QnAP=XBa_@y z`Rtn@aL63iI+*WPHl0^Bveto}?D>#YYvH@PxydgN+B5&sPbi7`R5F06MZjkqRpA=UuO!gx@B8PGOT)`!7Y4fipJ22xb+hG?OSdc9mg%B^q_^fixR0T)amNkRZtBPeKEXe@bTH-kM60Tjjr za8V2nU%CH|B$eHkww+Nqh=6A3pb@fSPJq;)UbzYut*W;gJ|P4wJ}9$L+A&DHiqX&O zfP5;CM*0ge^IEW59p>Vorw~D(qD3h8z+bt6Q?QWnI2q#=i*zvRpnxR1XOc|GJR${G zf3InywP${moC{yedN7*BajBkbE+H`u5tIk1m4jf2;TFm$-}M*2l+Cczb5R$v`r_xZ z3@2v7%xB<(BUW?HV}cy^L7xn~6%Npf2b5##;V~Wg zP@-1eLQFYc2HGdfoLA48ikMP7s_1~v?XXQp_CGN zx?-q4pAyUttB!@xgV?Nsq6nK1A^qD7#LG^XVPhL4=_JgeL$8Sy1Nm&F??VfC3fW4# zTVi2>`z}MaF{%1>>HJ8NbnKoW;|FERq@ioD=v+D$Bn^_WN%gYf*r$kgI^%0<#dDEx z4NzDKU?}edn6|XbmO!y4SHC6g;Sw+g8_;JYmIMiq~f?s4J1-^ zbQftrKJP&ELpm>_I=Zi9qjhIp_y{cZ8jOX@2cmI22|69@+9gxcH@+#GpF*|=3tr@3 z`BK(i#bmKd;0E}GRzAc3Yx%)=zlL$WD3kIpeJLxhV0{HNzpX-;e+9!2>(Bvb-~9{* z8{t?h3kH*>1v=8R%tHtx8%y6&RHp%e@pz4KnC_H}_;$vTyD|n1taKtK`HYgpQBm;6 zk+j1TP~BDYA*(5%%HukMX&{QrAf&F4qO}HBVf|=df$}x5XuRkt7DFGATlT_ICc~Vs z-61D=MkS*%l?>0QbW+xNl~+;zL%^fA=*Me%WsQGSP{C#-j+9Zog5{xB7&K>JEO9Gek<`bb($NuN#j=Aj6~++a1>hO3vt-4?l=576{4*H^ zzGwsf=-+RNSfd875U&CFXzhc!Y{4b68F{uOL?M!qIMQeq%q1t=ne<`;7$_dQIJ}Mu zaVeb1^nJgRPQ6y+g@(z3N5*17(I_osti*(l(|iXv`D}Hn=gQTdfEm=O7E!A@K(#ue zqwI@)Sn7e0T1*))h(<$T%m7KlSe=03qoCvhq_YPGQ6g|RaQIGy>pzpS>;Eo!u(q?Q zukuk3V^LLE8!+VxnSsCI0~!r|7fxZ~n*;vIzlv25uYD&O5Jy?)j$D2I_d2$A87k3d zqz?K&c*LdC4^&NQVw-%0$7K z*pP$C4OVF^gsEbr7EfqZ#6AS}2}LCfr0)w#-%7(d5HkOob1KL=7&HMMszj<&?ISn) zs3)ds&c+w(W+Y`UtDLH<9EAjaHQ=FYIM-Fs1C@w#TiD5p{4GdvY+f)?I{Su5d+$K; z?4K*EOJOM?T$h09!;la#lemPhX^G7M8~G*S&lGfnXV<(fZAYzlm)?F;a80bzj1=UE2y`qW{kY}Y_sB0n6`h5*g@xp-yz8H$6av(@HYp47V=V)q zIlQ(-Gw z$(*&Pc26`pZYfyIHx(?l-Mm@_NZ0ZC zvK={UG%^2woV|B=Rpq+wok_$PBTWPmkd~g%i@jl^m-I?P0)&L#lqxt05K4Lvp%>{= zY)f7061y%NRwMSuUC;Ns-;n|=SK0dyCL?2xS;jk``ziNRUP3!p zY%}#T`J#ZFxDX4c^imr7Pr;(5XZ4I-$=8`=cXu8^K%Z>I@oapBDRXY3?zSOexW;Wk#wsid6Z1(h!-NMYVt9@hann3oAxhBi* z%YMdIJoCLh$_8t5pZv@gG7M$zkza71euh<-tGx&d=wCwe8;gc-K8Jz2PUPI^`DJTGLnL&3pwjxVkE>qX?UPuXQH8eU$o##~vPG>#;DKP|545L@bI^$f2KBp^2|( z0(D)B?6(Bwo=u=e#?j zZLj+Yiuhv48y{H(!h@^gZnO%Fj6c4gJvOnI6<{((_mLMx@E4qIDeF(!JT}{bCXnL6 zM`wl(vD-um+cY$KyDU~^D*5idw=S~)BB_CWb8T3}OzRbvZG9tiEfRee5^CY1i0rM5{t8Bnv`pYKwK>p$=$wAkxAQ)UdDavvmc*rKQ zpJ!MQ9Q;-H@nMtg`Yy9AY2ydB`sDvXOP!@^^c=gzVFpQ~&p-0-Om9X0W{I|1NU@H8 zk>~??P5ylLIbdf^Mm8yF9w7On>G-0BEI?T29L5Pdc-~gN@EeA&d#{HN)l?VIv4BJ+4b{>4M9&miRCg^XXTPGH6Q0TkN2D#v(?nb6;u5^~0#t zPj!Y-dU>7hvsKhQ0oyXM59TwDZg)%y=97mtB$ydXK_vr0yT5)Cr%I5yz%3JLmzxw$ z17=4nPU^tb@yyqF^r8E0(a3x3wtnNScknPcQ5-c|}H`2?D?`MZFk zve}2(c))e*cmuO>>q;x%_p^&D^lnau162dkTni$}c05O? zlx-haoZ}TiI1zUmqB@lgc1ETgV=a>`EO@AmjF@C=$5SCNf$?+TQUKkAU~WX6$wm}A z=uTiiF#&cHLfX(GSij3 zyH!H!#I;&qW3!%kT1U=M6}qpcbHx4#v-h)347HFgkWZVT%T_=DJVx|6JT%^Jyqa{% zRg>)gcGpsJb>lRfy%r98+gl8}Czj12)bu8q$vitpkUp??EO;{X$0R(# z9JZ*OyX|uuaL*PNf4oIrKgcHDo@|vEnd-?m+d17{fPMlrWnT*_k0*{mghkd!Qdf@| zM4#6{cv@tb8FcOZ1{iJDRGdZ+NpgGKV3b8%q)opi(I)i18~5u$YtIh$ z0oOigvEw(`N+e_rU0iI(gm!cpamUv$LOVJWjZh)65-8Ywj=ZWyiS0Z@bpalxxco&= z|6nr_-`VmwkNnk^9{*3vS9^k2pr!OIt4IjCDUeIWWiYw$w-rPTTJ`LQNPd-Ht48KsxBtBGtAV0=WQO3IkEu+kN_2fa;^E&FS7$OzWb*jxOq+JQgm{CtG zmm;pqHT_HU++?i|NodY2yuw+VKXTi3c7)fD3Y%dABXg{Oc((P6&ays{nHJGE&pKVl z{{B7@A0&}_;8T*kHwul^!RPPYT@HrB@pqz?#Y!1!Dw~nbreNCbsZJ>=G zo?sPx-zsG8tnR4Ller17AEhV)e<_0J-;6b&3?S4xmyU~~t18keQMPr=4bY-*#6f)Y z;d^c2$UA81zuO|NK}EK`-`ZR^#vUx#Ya1Efv+Uq`TS^Qv>xr-EErhsLo0J61=|GiS zxM_iM zb?elfR&?SomWL6a1KH+e%e96y7jo-=$(YLIk}xQ0k;x!CH-%qhI^p0X|8MAqp5mnI zp&qep{65h(W2==|cM^3}3svuQ&m|JYDz=qGts{CVr<|pN#E*pPK*>^1sA~0!z?~}! zXzO^wUZdgRXxTb*3eV{^CvRJI(Wm+Vr|@3Zk<+Y*n!HIq0P;M-LTYebCA&)=yvqu1 zA41l6408(~wC;DTwS^UDEvg4qYKge535)WzU%ZslVC`lwbi$usQX~&RUYVW`pb$>2=~Mvyr!{I62c` zmoiG{1DJJELO~@TEl=yfwMwbLSDrRqsRMhLpIg9>{aY%(2rnVcHn=bj2 zGOHqln94MvLuJctmn6z}jH-X-%DwKEx2dnJ(D{JIg;`By+^?QEY>hhicZG4EKDJE1 z*Crh`hmL%e%~Gcul?E(R$WqOp<&by_?qdL1=rA@rn#5gAvLH)42eXzg-!e?9e>r>G+ z@s>XK1)4EvNBLVVh*;9#!a7d|+wo*bb6~m(ww|GJV;f>Q&cZtmv4;l7QS(nD3K&1z zB#|Jk6xc&Bk<=-pyU4#QsT21a$GPR>2lE3=4r87u9&;J`anXZumKt*_BhA=P8|N?} zkpBTr4y_5Rj{n&!raVZNN!kZ1HmM=QV#BAI&*5|uMG3!WCN~lEQM^gLi<5T=q0@!Z zf3mmwzX0v3sZy#|(C&-VYd>KlTWaGgXsQ@6pJLd1?fSM4+hh0LVucUiMKH?Nme`BE zS|_KaeoY?zMc9i#38MU&oKZvUaQO;P7z0|jmse}C%YUwwL>+NTYK<-NSo& z_Gx`yg^oP4yD3gWhox#)H7?YuaeK;e`)U$;TQ+>hy*G#rn`oW7&$cOa=VxOYl~a%> z5y#yoHrI^12K`QxNEuInNY=QHv8!H0s3uxS$27YIln)P`X0Z`?-I2I_2wz`>uRpod zn{aJpNR#uQv9#?3FwMf(?D{n&xI&tns^a+kM3StMzNt!fuo(Zixr&jRISRROGq|F{}W>7qW6ptUW$)u-(;bjAwrdj^$VOxbrbv zv-2X>^UtQdgNEtNIV@+7AK#xZkMDAA=&}ng9>xrxw@!H&>6sYoSp+e&kN#w{ zZT-qZCzT^9W31QBGws&M88$35$NaI8S>_ML{I~7j7oMoIlCa}#;?!f7Cfg6g=Fg^K zsaejOLmYMI5aM`hHW#-&A7LLo1@D5HY`v}>WcLqDuyXW58MX=#_p;Mkf!davM8HK% z;B$5i&{wzz>_&f>GP#34qOE_n zO^5$v_hj#3>g+^o*D1w@vPy%(a#0BxHaK=F9{E)38Hy8t#_v61g%uwA6Z_wO@22J~ z0%49~YH9vz_624i{00t<{1R)XVe3k&rjgTC3{<%F}OelKi7(v>^YB=bYrbh|0MVF4Ens z*H-JcHc7DExu@Lw>0E`*Imr9A5Y=ziVr-TLs6rhE6;6m{Mt-yn=su3!PtpA7jrb+M zrQZPEBDtST{fj>y(e&o7iN$OydQ)Z~Z{z!fTe)@(u0~j&0`m_J2Lmx+ASfa#%Oaz* zZ2&On+a<%nU`+Y}%aE_}_hF#VQko~1A9yCsY~ym^Sb`F)$2I(*gOa!p5q-rt8v?fWknR0Y$yKTnLt4#KXNTj-jdO`(*8QkB5oXQ*9X$4 zh{Ob3n_#!kJZP(r{>dI8m;5NHoyCV}=b$KN4oDCeH5+$e7TVYYLDLvFFd+}YssFBu z!qxck$SH00PDG9)y^=k3{Kx-d_ow1Dv9ITiH&AyJo^Sp8Wug3uPce*9Afi`vu66E3 z7K(j8Z;xY7^;7?0Ye*g~CGtf(1Q&iuAu)m-PR%U2ukK+Y%~N;fpT^JE9ZpPt>OAB(Se&BBsaM{jyy8}k#{0b zSz%N&Mt19W2;BYH9JYZvK!A3{4i`UemG0MR@k}m9NTYl5_Y6bwAoZI)4d&h^K+d+; zq;#-og*mq1UpUu_3x@`0*c=+3xe^0##+zOCBAy&*1uj<5QW7+eQmEePy8B4X+-d<) zw7XS&Mq4Q*U5WtXP%&Ojz1kodLIRTyxu2%^mtAMZ&tP~axw&rFXIOOT9Nful+{&ru zj|K$(XyDLxP~Uv(cY_Cmhm!VKCNM~9fq^T>Zebs=H=xbIK+Pt3j60b)<0MTHNp@4v zAiFDu-RO!HGL!&=)4IKNrDVjb^h1*E429IiNNjX|4loF*OXy^^j9Dz36pbqoX=%5_ z+3j72up`Ap3k<~FxiQmHR{qYGJ@Yf-gm^!C3O05LqPv*(k9jb$^I>EQUH_a4zue4- z&P%v*?h|JrC%&T?@n_rc#LsqH>Q=-Jv(kNv4UC>?gJSY6x^IRJf`*BV%CzX1EW4Tf zXGm8l80urw7CcMO)SqlMV(xzghubSGYjL)9AhoZ4F$uU-embpBs!o|!|E1l(^f~;^ zG3;rX$vM3Reix{c23K-W1_9iYN%Pqufj znr+2;@?SXT-lRqs|C(%jzk4yi^cFl|e~IE+M}5wFV4O`IaksS%8Hsq_YLO{hZ92sX z$_l9e+n=BsS(nFmMIaha-&P&vQ^`*C8nl!bjj_Hrv`=%*8Lg={{|#j zNVhqbTyz>D1zElj~+{UwZ)2Q`!9hK?r2_5tA7{CVQ_gQ%o z8GsZ-wG5>172J1faXixT3PF|-ZzRH&AlIVp6hgKNa_tOuywY4Np9EP#Ri<}pbh6m8 zjc$O`$L^fQ1bQ;NZE;qU%>MIp?wxn(4gROz9=k1qR}8==eAA#Acc$AzJ!nS0ntWtC z`mPJ#bcHkN^mAsYjmb5qxXw>imbi)QZD+vuB(8@UzdGKo3Q4grSn-&?v(4WZN5dbE zYz7UAMDs*s;*8I>h^|Cai0AF2Yur|KDy8te?<@7KWHVl}nM*C@OcYGw9C%V>^Tw-( z*sT$9RuR`9)ft69$sK&`Zm87Vl>(_^ehq|{n{?+k>(5eYo(8aog;_W1KZQD|}w`k%THx&!7RcXJO?#7*9RzV=^Opem-t^hY_4 z!#Nv;Qp1k-?eZvo@(RSY_~^e|^q7sj^+R^O5?#?4oZg6LEG2^xsWuof9Tdjm^n($? z5AWG)Ds`I=S?8EXt!T%;xve^vocN_c%EzFbIty(3gh6}y*ngpyjnCaUUC;9I7AG^A(=o+h{K23#iMdI8VadMq;hYjufwH8r$~r;XURQy?gFm z=0X3!2pzxX$y}w~Lf-$~i?(%Ms+A=Vb^|Bfd$)kXeZk;{*$E~e<)=S<*EERcPxjr{ z=j`-}LspS~tJD0a>PwowmjLDbr)#RFKHyxTZx{iokwmW92HmewJfFPthCNxa-n;Uu z3Zek{{|YJ2ee#hT)Z@CqyrFV39cy)8*X}P|Vjs|Ms2(1@rKTPI^{;<%#~1lZA2YG% z*_}0}k9N21hBSM?t(iWy3Ah@)^^ecB8k_&u{YE9CPl_iZ`xX3n!JA-CHcyPT#DP<6 z@U^$28t=1SL*~K~eQufMpD;(32oB|-TW7}m%xTr@DO z7N8mUOsNZBV)SbYEXZIR5jM%n2?d>f5r$9e-b$rMafx}5TEz|Ep)?M!pcHHBFXo93 zRY~2fI{7AIh?{K(LOTDxv6eIRF1re^x~+$g$gVN zc406sRcuU#MT934OXt`Se9U2?(`^K1=|&f0-De}>wp!Vd|FmfbpzDwSY*UV%vuRJ! zRH>K&t>IX7H&jp2gQM`6h{1S3Z9=Tgh{w%3i0Y#Pl%k8fdy-gvW8>`Nh)f} z<02@`47b;`cz+khvOl6PWq)!<4|No#2jj00au3F@on$j+2kkwN&22iTjx?9p2xtZJ zO90uiOD=urljkJ+M@PmcB{WEBI~*mHX|Xlvih6DU0P!foI;01G*QfitV^z9 z5L6@4P|X|ojx;Z+JOVWsJ#smm$-Nd8Jj5mqPPNSte?_ceHBnKeveIRf$jg)xAMGz? zdC_=%ZIjmBMG|EAWt6qt6@G+K76ft_~m;q|Hd}Db4Sb8 zHi1iH9GqwLYiM@9tFL}mg2S$dI-&V*k?h{WC){d?vUjB{X=_^UHBju3>U)~$U>(=W{oj!R- zYjIBJj_atx*&3OdkPWQndim!taW%A#mW>%|}PvcPjLB4h%%{LKvfUI$&>cJ7LJ>8OkB$Pq{=Ve7 zFs(B!w7Y1ChwQd{H(E}kcAKZ7me9|YU%R~(v_+W*;Y7~64uQ7X{3r?h<~;faJ-kzh z+6H1($EkFN4lUi`?_2KBw}GmeqIg_}8X41ViS#yZOreyCo83U6*hbXXwsA4mz*M4& zxLAa;zfB!Gg5A`*S?Az;Ereh-ARyiD8+X7~Kdbr5)ZT+u)x)+l{&=-DUL^#m)Ss2Alf4UB2thUv4q@4eAFW{b7q<49KilFb&fB27F|c%?g>;O!h}gLnNsW4RcrHs8 zf$ob0t0Cbiz%W1>(~q$4<{WtJBn#<~Y4dk|Wvie(#6*jWdxYwWCHg=me%j4BB+`QI z?jca7lEhB}rc;2adjC==9?(#wv`w#BNO#Jfues0e=r+u9?oEfWNd|M3&=)w&tX)|` zUpr6+Za0<1!%BFo%VPVtBobRxlC5hiTy9B-baX|1Vqa%zk5sI*4Z1ks)#J_EJAaDH z3Cub7<}=5eL|cS~ckVg7M$Z_2Ngud7*LM4&O#A&SFW8qKyk{4_`qG;!-a^dDB71p9 z$+u@B<(qo*#Wi{HhYL(1$5eV#$OTUif=V2DR|(46woAV3C0FTN`sxcNyYtS31`6i# zTQxgU6CFLn`o`02cjWYq4EI{O#Q}2by=Q;)hI*|puKn1lq5|-|M9yE zt`FW@feR=M&wKv*volSrBA>)l0{{HnQ7y<}eXSk36Bi(CcKFwi=r89XWK(=Nr9WX- zfj%yWmR>jZPFqe(-8CUsrNMNiLA!POtCKArT*Oy zqZQbp``)jkBDVr%^0vzfAZUn=u@1#4Y;l^5O-k#`{tjKN7%47G2}7b|@gHMs*|=f0 zWYi!Va?>aaZ+9oRImtD)kIFk@rN{mUxIalrn2dIn$ihO8lm~sWkL*8BI_qa!vGZ%| zIdV0xyx*?9G0j5JgMCRtMTLr^BtP9m)(Y_vSn24P919~S+n++)e(;!L5C)F$+nSUA zZjT(GWRHMbGj!*pQx=JYr-aW{pQ4K96Nu+i{UY8%tt)Aa+g2ZFV(l9?n_u+qS!DDA z?}4wp-zG;5w|Ni8bH}}`Bnd>93)ZE`hC}{-A>Xgn+U`jXZnwWUiCC-(hp+AC_y~u5 z`PU6e{cPHpVdjwU7XGP*vL@M;^m`Uq*!E;xi1W_!Gtx7_Xx%Vkj7mC5XciXirkMY1ww%Ml`pgeWBt#`L958eCp=gA~^c`zx4ruRVs zmY^(MC>^-tkz9M};4a76KDVo`3Gipx@yJ^sDJ~E2|NNY@`mLE0cW?Xjjb4?^ySOrB z3z~d0?p6iAa2fpNvN5A<>JYXW3Ku- zd6(PvT0UJBxnlL8W{Br5f154;a$E#Gi28`i_!wAPe8)08#yz^feUeS*JNjysa@Lb2 z69=$`N>Z3Tp2*Oo4cNV<%(9ibRzVEHytt+_4d#(Kq z33O(l=0JB8DsXU2E(}A4)@7=7hydf^^2DQ6NKYYD#4PLHna{@^N}|DPB?0qNavgFs z=1~GU2LrFbSqbhrN1)-{_wrNiZCVs7{sOCxG@@<)7JgRJLE+=3eV~%|o{E zfxFo3?Ey4h62xt(uv?lC>e+OM>|ZzRAleyrL0ox=%M81d^*uzuo}|jcc~F)=>}0)- z{A6AB_VZ6QUG>tT-M4$u%g;Q2F5s0Tdz&ED0_Xtw3Leb9_<-&7 z+}Dxr@XobDxP?gei2@VYJ@>qB=0q2cdtYAw{rm7eQN7W7U!QcB-lN=o-ly-r)pTQ` z1WW$Kb8bzJ>EgYjw4PVgQ{*t}7@soyDV!=gIcAQWXb<-pfKY-?1|W?sBD|tAMI*TM zGm9;ehm2nguO(FE>QOf2_Ci;`tmfKgYur?Jf=*}(r!l<2!es;h81gWQI=j$gUb z%JCszMAW)RAd2nPk@M_)4dhL>Vsj|M!w9d98)O~IQ@dM58dKtEP%TTl*;c09ZL=Qk zZ~Za4UD^!h8!C%D-_i=H$a~^{vy=BHw(Ny-HuK2ma7^bs=lc?jy17aPOymk$eDEjO z=|9_=t>4;>L#au`OKI0Bl}^1}>l;dZ5`(((4WukAHXILF$}2d6XeAs+yg%1y-69|) zu7#Kg2uZMo>)*E(Cw{V(Cx51CgnH3V+F40#cr!%jQIKDNY1X*2BoZo`{35-Y0JERU zf=yk6PV1Cz-P+u3;T^`(LpjXWj;9E=R*rW`5>8qP_S9d2@;Xq?!=`dDOZ2AoQ?x8H z`wAEQQlz#RVrfQSRpxEZW%Y|Y3KT|lx;FR0OSU+Arm@1E{g~nR9xRSmtg{WeFyMIQ zh9+nUjGkNn?u*YfoqKLawXJiXqj!{R>|P%z7)r7w?5*GwPwfGAzkkssfJIdJq}Z2hgnRI(WJEpkPXGv<~D_KCzS6uIg1EyT^dHV zI6=hGIvuL5mnd*@IH*-lk5i*{YKeuI~J%R%KsM6a39T~z#Fa{GhmXb?S+ zx|ShS!!;Ly;+fE%8%sZ14B>XK-qYQyJH}EHxEH5%(cufs=%EB$(AMszLi2o_0P%D4 zG}(bJh~_DCevPUQQsOjw$7gm=(oRYNCRupkEmXIqTSZc|Ga3GR`PN$!5rvXumP@!k zDO^{yNDI6_PWR=$b#Y>p)g|bi5E|NiZ!>$c8K@)BsiiqxT3 z5MW+3f3kLqw}DH55?3zS<`arUjCr3W2ie7>0bjiTP7{r;!UQFzo*>Iq>;S9i-}@el zi9Nvn^K&oi`#LT0i;g^%DXQ_TM>TTf8Ql_uGPqVnSwz7V42`dvG{{CqCfdz`7@XiZ zdm!f!@zWPJiGpf>7H$^Pe?g`=W`|7IvQ4|$ljRq2XSP#66vPOV+wUZw>-Nc=oX9W zG1kiCiEJieQw7UYy4`gpWSZ(EYp0xAw?XX^Da@l>BQORu3Yi0(A9+%#1BNoTDe47W1K%$4)a?LLExfa zA+&~kKpm?sgsQ^9iB`b*FF*Gr*H=Atq&XBhjA=(N54q>geCTj0U)P=SX>XD;m^9DC z{u)-5GV<^v;4WFEpNhbtDFB7jGl+ne|%2NpTnus3nHvs2;tL_px=aCJf12i#Zr{(b@Z~1 zJlk5D5N7QJ-Fn=nk_op{Uw(`A>&OmE_*DU2Gc4!vHwchEp$Cx;0;QQ?L7S^~n?daL z!Do}r&2Rj|#!uZ#G(5(-c22TL9OwS{fwB03G2!%%3cntRv8=&iJcM#;ARLXCk{WB# zLsq(K1V?B!Ti9P?vlL+mH-mXHU``O2{U2JuO*5_Y)znE*3R_ACV#%a|0&ZV>PWRm) zY3w9{-ORmjq6Db~QQni<%XX0&ZJ>m9C%$yjkcoCjSK9b!pb&G^rT-#ZQSpT>`^_Ji zX+(b$?(!@uJ^YK+;QT1{L5`|+&T~7>QPVuNMbuEM;A0KJt){o$5H+7S8)-LO&p1~4 zzK0X=4<+!ArNvBmE*u~n%k~CGvuIH)+CY4hSh_EK8Zbwx zHA7i27M!OaU@KBZvrvm}%s3;gv)NK)dd+7x{;`+rD(dXC8~TKs2hl#4Og^ZaZB6Ql z^UNxFU@mJmvTr!_dcaKJ>V)YbR{5v4Y(qSue|QXC$={M_v1HTZF;|F zE(2|`zM@awxd>*r_nA*5wqvIBT)^uvVcz?mCA2O17tgs{Kcb7BT?L&aoRlUg)X^(C za=gNNdGs8GS+Md;$}_DVbH6RV=T_SMM&bKCY&YGx(iZcpPJ+jXZ-66I)ag@ets70J z_%g?_z0%n<7zT_A%>4N)|nZxnc>&XtEKdB5R21PPmA zjz1k^QG-|ft@kTzdd!pNwFb-aRqt9A+}|L5DEWz zO82^6rXiq$kgdiu68!1Y-gsN$2VpW&>2KPaag)`ibg{w-ciZB-2S8Ro$iyf#6dR{? z4qIa@_7T03y45~Mc}G9NhT;a3xA8x6;NO5Jb>KACUTpG#)$kCqg6z&3x+K;%erp{W zjjUjxJ%zo|@a{2Sa!8b#8?!B%(m)}yFb06KHrYJTWfl}mve(hdM6{i#>sZ9Bp(Rv^ z&x1yuk9nosi-&nQ-W}9+xd6f`jrjv2=MtC&F7iLKj65$>M&?zYweWG}%#*px+EM&C zbHrd z#96_p@pVd4yMTYscpIKVbn-&5=5peY+ zs1NcHR1c_XASx<{ssWB=3SCu(LtR8O);v2n#v%tTrvU3?_kMqmN=k-R25{OxioQOY z?-J>QpRx8M09U{S?OQRb6L1BF(o_tRl$dxmV^Ip(J2aGD9!Y zqAmXRi5Ar%i~)nR_i^{_V^-Sgt^ZEN1#=;Z>gG^aSOBJGJ@KQ>RaeB4g9Mq2PvF#w ze`%sT)Z{QbqBKzFW{0XkN;R=^3P10?+x>KXrhImmc@>$QTAyEb4Cw%BuMoh$9$bLXQuP3KP4 zZnknUr~yxJEo(aW(t(}cxi)n(C)n#x9d(qi_Z~{y0;y2jtv9L=uAb4616P%#>>Yv2 z(_Li>56TnV1D8~g91GF2RjFZ?J$jr5QBZSytxQ|6 zkQR=`YjrvqUpa6YJ!l&G1aI5ybY>Cb3<;lsl$sO>n) z5=V1e@z#AxGMt7yF#JpM!o8)lQo-N5r^s;_0G!GIzRQl z_>4<~?$j4tU%^9RIan`rfY*^Lhyd4!wn`(O(sea0z8x$;sJ-I+lu}85wfKNaIW_X+ z+bNw|Nes3LERV!Ofa(gYHDTZQGp=;pAM;&>(kkD>NorH`pGB-pFF5Yz0XjJ!k%{d(B>8g?|%Xzw<;mu#qMpwON*>%3*Cz|sF{-BUN~v7I@Em+mS6=0&U-}ke zHy7Znx>G@`pZtZ`;1laeGE1ZIJGD<_gNA&%{|js&B~yNNI0i<YEV_oXd`4Sy+JSWpCS}?Zhi=0U|dfto>k{bbE#sB5)g$$c;5>!HN^4CbWoE zvNBSy`z!f#yIboDF9*aE<*a&86@ON9P{NB!6Hzqyc?~F$ym7bLk@CkpdIYH?9;u!F zaFdcykm)H2)nCc`mO}89#5XO~MNe-nwIV$kaH6U?+4DOkdvwlMpFhr(NH}1(QHtkP zIxNf3bu@ZWw0yj($Q4CiqBO+R_-dv-+*)|Smf$C?B9$bUdrqYif_3X_*6O?qv)#Ei z^1q+iR^gNgu_eQvcCVOesumHmT|aBGcf$elkKHSLD*iZ1HrKsVn~L<|w%@!#3Cqz)5*$@#Fz`#RIJ>pbO4m;Av*{8K&f)W}M5bZZ>r;RUflf5({^lVQsD%OMw^AQFpaJ8l_Yi zOKzf_n{xXjIkEijlYjTWr z+KIQegEF@wD6$Q-u9cv(OBGn++%%+w+M>}9F(K+s>p-)?b;RWXf%n;fQR{3q(Dsu& zUV8KwdxQ~w&LwH1I!na|`rmB|>#953&0zd{-jScsNb+gEr&;<7y7$hq#{oGlwwM*o zwwx)0i_5=qx1`Ri>#il$+>h}jKGk};xIvM+KL*|mwa!uw>RVua2cW11F(9T-G-1cU zbQBjv2h$k4UXu=uGQsYey3aNq{i{u7YIGJpjQX_Z9sSCdQ+=iZN@DVsoczJE4}9S$ z#>}cOES;|6S=0{{P|lOf4oRuyFIcvBnHa<7(y5 zlylZ!$+Fc~qrFP2q`0K6+^RR~NAQ9Sr_AIqwk?Z~=9i1LS_r!OlwLMt%pGhANq3Y} zQ>wJ~RFRa5r>3NyB-Y0(3NLxifiPh2W3xmVgj(C$=?~hmlGXOgkv;a|>6h%=rXD8; z;e9PPYUS@- z<*UxR!|{Ob%Bxh^DL+NoWpRQcBfM|EZ9$rCaPO;9Pj_`&-My5YD=Foba@Xo+jo6H-V}#`|;uh_Z?I==UyG~@}b@MbyD_EvQpl;S5b~z{>5__bRCWix=0l#_&@p` z-2<7(!V*^l2y!@wX7MT}xvoJk`#-IEXOr~K4&J4mxEqxPZlR=7WgQKfH(G7l4Yr){ z{qe+GEVA>xb`upM0U-r8d(}Ccg6h#`Hr|eLQa$J&%7GKMowlHCWOF8?LKAbJLoVs3 zr9k>-luk5}QKa;a(>78*c=wknA5j%f`Or7qkN)9wW<~uY<a+st~E zq(;J(Lg;5e=+`9RVN@m&KUJYi4oK(tt9aO6p2AX=!L2$8Qu zrZETAJ&s*}V-MTb09$G;ev0mzOI7 zcb!j)qITMY&9E!*)Vjb<&`&B^WhHOT{x6pdAZAv$*M+K~c`F`Z#TgX!1WgP== zvztb&v*k5^u*B-u+)hMZFyuCL5Iqtc&vrElY!NvPKOvvy-q>4JTh91q_M-`-dn7zO z11d7h);sJwEf9_t2#O)y-lr#>C15{%$a2e2=fkf$9+woBU!efJaOg?}@VDN_Gp#_c zlmOPpVIZpsfZCN13YMji{L`;@uJ!7nQosooGZ500 znHWnC;Mve!Hl1i}3GtRTB=BpC%)kYl&1XyC6!JFO+m78kKC+N$uueJfB-4vOvyfq{ zsH?rlLU5}VJ#ZV-&mUkp*n%XLIw;(+y7WE@d-{WO7RX-mU9|^CS03uF+cr0$8S1bgPEq(|RTZFk z9iGbdZJVERNzZ00n2&5(MWaYlcc)L~pyDH2A@8(LoBI6mu8~DbW}{&1$o+=dlRY^5 zRJNn%oN5WU9R8c#_4*EbRuy=@lTV63J*8fFBF|&@iabvZ{5PKSyn)R^@MfuiEqZV& zKqX0qt~a1qMNGw5crM{V&pL0wsfG8okUlNF4%SIO?9h?lS-~A-t8ooc4aJG51}ek0 zrgpVP%EVTUn_$@k={vdV0lT`*NV_9W{iG);fkg;=-fzt+z;J2DeAXQg2R<-l+o@YdCcfCGFs5PYxv3 zhz*q^fG%wp&4|P<9g_H7qbz;)Gq(IB)pi6r1^6VhXa#+Q#?xik`Gquzs$@>Bq1n4A z+Dn3J4vB;Go=mtmg}p6ikZ(#}LY-2(nRdg~!!4}qgSIL0cH0nli;4dfk?yb7Lpip) zunt8)nj*q#uh0f=U6oPw*PvltZnbS0nxKML)ne`IQhS>;!4Z;z>m-S!Wy5T(UPeyg z*(OA~(l$L2pb``hr7FSkG{)tcz`aZGo|XBIS(Uz!xmO{L*v;3Nzo6P$S@fssi#;Tg zRi~F*pMK3&u>E@)QWXhElPDTc9P!q3C#+`bJ$8&Zs8vfis^!`}VEA1$fua{_D&JkS~gwHtTb)QmR$YcwFpvrpkhn|Hd;H^%|51 zKX)-svnxd_bOjsbE?umL@?B3BckeKgyo(DqcPL!hlGXwfJ?XNrPL`1A_(ymj6x63{SfcbKWe7+?m^ZR_al15V=W3s z8y;&{GwSp&<30YV=MnY~6%6;jTdP%^Fwi;`rxAo?Fz+CfIsb|5Z!=-6J;JUBJ%b;> z;ZRQ>W9mn2v?aU#Y^x6bZ@3By=;$n&gL;{F>TAZzc>}w>3VJoN2CEWa0iK5Db}yj~ zeBnVTjKlwK(@H>n*Ns3N{Rv*s}Md|37={wKZZR40x7La3ogTrm~;PF(KRM9W!qubVdvI?Z88qORS%gOV5skjjn> zk1{4L?BNZ(i0$CIOl9t7zJ>LsT&xvEGSk6g55ovWTY$v%0@9T2%ohArKmJzx%wCgCsBv+n2x9qrV)r*-7PK-A^hO3wLe zII5NGS3zR6ts~;722)iO9@S!YH1VU(VG_^<*5RZ$nu|+o0fxT{;I?rehjnVfoO6R^ zuN({mbmU<87k$15v}yruo2C;8XdxA8D#&0Ac5;+ek_{e@h3OZ-Ak?-=c4ypf%iG7E zcJ=V_fI#zw98>S+<^;#FgHsAU8kzx~Nn&yCX6o1?@|oDqJlmVeAku_50Ns2E)?~3- zuqM9DdBsgw%i4kS{SUDAt41q-{YMUK?R-NW*2)ux67o_`&_dR)*NPu&3GF<VHVTi4p5NkIDGX~rz3pUwq9=zUGV}e#;isl@k)Ew4* zA&&7P3Q6&cd64CDXlvg*oK(=$B!-2UvHVjEDkaOm{OFJN*ol9$C9B?HliF zXOfTu>KU8DPH)=VG^yO%wrd=UbW$UhjOh%cmYw2j zOI5r5B|be}ze3;L?0(zkC_zSU&k>19y@TFX#(Jv!A~SmPx4bzSR@oEPRI<&HX6 zhu2k$Pp9m774lw1zh5oqWKil;qalXjiwFX1$SG8lMX2GQFrY+wHP=y@%a?VSaz}d4 ztD1qOKct`?z+Aqr*Oqs#kXvdX2IHxBKnC2qw>P2~56T)W88Id4S~!kk4@>POISB9dOnQN5|ZcEbUq3 ze3vSm-byXyrj%&wP?puxs&W}d#Pg-hvRwLbvS|}gW#Yx~bfDv8&7MEna%iMw^e8&a3{!LYYJ857eZF#UlsV zhQ#|pN+zW8c88Q?%u*Tagcm4~5S{yL0L~@oaRI4AkB)G>Vv#?R?yy!u&$RJ(*}js; z?0JczqnuoN=PJ=SB7>BaQVOd!=N`{0`RemVk&t@6$y&KVTrICHm5p%kQq^*9Q_H!R zTh2MY9zA$ri}UD`Jw1@1DbitsCgXbTdU)}0JEpEL&4)r+;ysRkJaxbDUX4Lr|XD)N6%bsNG>12lW<{pzt}8_$?DF z-nA+4^m8{b!mW26I~m<&-8+tF#?o-yn%k{5<7TTPF!gWKTGb18@_6vZ z&y3B~-yRYC+>T1GvCE5sj&^E$w z*G#|1_AEq%rjN9W8TZ@ftUKND)>#kOwmA=3S>_Pe9J?71ZUlr|xTR774?k1cgDU(a z*JrEuci+IpcJ64s*1*Bj#i3|5)~^;?ELh>I__bQfO16@|Up47on>UgKtS^pVdx8x~ zsj)dU9{V%cG1Qk_0WK?PMN8lQvIVO;O?w_spDEJ7PN0onA~QFH^XbU6fmwk6BtrV{%5}>k!i# za>jW7kV&pJBbK%d^+iQv4Py!8G-*Ih$%T%Hjh0b#2`$%XHiTj}e{UgGsjbN9T)Vk5 zn;h`F1$57}N4I{>1O&F1n#vcMZ>ZMAe%TBP<5-p@R`+bFq)0+a?q$^)6+_s z*1!&mi8;q{Q{$~m@IWHV35dxs6467gGLwAY6vTI%FuDzo++UsH)EnMreJVz?4&3gq zOXG=p9;zC62oQodx}~p?HEm?EeL50=34vlPuokOXpV`l5#*MU7+loE(I?44oi+5jq zx@iEO?52Cdr5I}@+?xdT-|479N5^#Jsxn<7-Wftip4=qcQx1bumcdB3DbZGzHN+}& zhFekE5G&8U!;bi;*sFDm?Zw(h>^D`5*w}ZbJ>k!`!~RV6Yss@Cs}rp%?=CCP8EnN< z`ZHXYXe@&umSC_B7h!uAdPuH9Jx>G*oE2bR-%0ww(*pW(&QH~WyE!aExcz^+${qQ) zXpNNG4z9tUt0u^7jE}T!IIhbk-jA!VbO1p_aE2ui0;u=EpIJ%oZ4$NrspVAjW$vQx zS9PQz*&uUD9b=tHm`qyng0*Rn9uJxfG8y&=?H@^q5<$shIMt(a!7i!Ra`rMzk`+Ub z0%ecgy2>$p(C(X1)k0imQca$LPxTLp%gOa`xS9!v(H=~Z1f$V6PXwb)ZmTqyvyJN| zBgZ5yp60LCQ8hse0SeASH8fL4K~_9dBZOTQ`@>bx)_Ggk1Pg0(FJCX++V)sQ={ylI zCUY4j4oi=GVe=ToF%z>n9r>S0l;_u8Nq#r0vOsN)s+QOyYuc_k4%C)}3*|(z&EWEv z{$jbSPBTZ$Q&R0Ik_abN)DO0$7oJA%XckWUWB7+^n4x+)T)xB$1zl~q%P|e3`O4p` ze}?r4B@_rp_1)NEiVMRdCRNymC)x==4Te zDjo6K$wMAOeR@)Qwpa%~9qFJ{lJC&la%#5&gA(RjT8^5!tHq+|T#ZoTknZ)aREqd_ z%%;lq+BVniRS-v(<6Wv!R#wqNST&Z8j9Xs|m8=Pr+G3;>P;N{^=}#YF+ZR7{_c={_{>gwWq+CdcIP^K^H8as-nGV# zY|6JI8?q_?OtzhmjJMrOC))OfV{HHOID4un$4;)#wkKC7Q@eGqZRYzGE4F2PT!r#| zC6rM46xTM$;St(NXP_TdAW(|A_t#+WvDf?@m7>0?cyg_5S%8QsN7C-os=A|c9l6N% zc*_xaFy6CDVSXhmh3^e#$yDI{hbGv_UJ(ck4Z!^t+LW?4-Ts&|auZp%PGk4p#*=Pd1q0$K-dLVb@8g%5VV_j=m*P>c}1t)+`%eYvtUS*+;&`Vuv zNdQ#G$66U{S3L#oi$bragKE{N6r0>5mIZY3x%=h)i2eqxduHCDeLfYI*L6TXSYYkTITqPwiOSn zPMWAn^4=hqp;2x`ZMtOLsUuOsb(}j;Ct^tK&;}PQ>Ikobm&vt&D|YU`6jOhzP9^M4 z>ub~FAFyZkR--9UThEE(327)8YcKBKYM;FInte}omr|NawKk_}6$hOC==apDD{VT~ zzS66<2tS*2v`$<~x!B1~(nALvupEz~&qTi49oRI_Y6?bL@zmRF+w@_!clI6DIPGq$nR2Tv z0bg8XM;#G?iZDu4m{=l^Y(?eNt3aaxKZKq)r%57hZ9P;#KppDo*R;@1tzCtF1r!hu zN~Ey_996=U1aFLk08Y8h;@P3Ne|zSbp$rDzx5aYVB`UF!?KOaZ8e+vB$|wVscLZrx zzqY#7F6Y`5W@W|aZbLR7U6*~kI|)bpU2nH~Uy9_x1SzW+Ng`x$*c|KLUP@GMmitU--LgVn>Ub@I_**u+YxS&LQoteEbHPwCxAR@R9b(+9VYmO0 zp7bw5s}yP{nGVaS09k@U$v>)z|KC_XRU^4aKC{PoA9ab(Tl$6tUYBlxz_imfY0OB% zJET1(DxCR9gdhHxXll`2e%90LPPya5G%I&4JI+mqzA-7*i|IJp3>pQjxmS<>2o$JX9 zpfo4x_E=kx_^>si$+wdafG?2#(1X}xj-u^7_h+q>zBFWRo0h!_?Gjj*-Vc7RkL4tc zvL|;{+y9kx2B={4kjiu2QK6Gq$*xD)=xCG9t#fRt6oPZrpYn78m8G5UK+Rw^DpFA{qg`d*y>`4X(_XA!ZZ9{kvbPSE*r(5KwfCQD zu-}8{PhL4_XI?&FAD=#9pS*s`zWVSLyZG4~=KtZ`8SDKc4;Mds-@f_qbu`4gcHx7U z?cCeHu?xR{-hTP)wEghW^Y-2Q&)SclyktLr_KN-CdHxA|W&3K| zwL06LFUzyj_4Dn8@&bEeRT5!djFm{T36!MBDiGvyJP2jJYVfS;A@>?khWIOpd6{Ir zOiM2p&!;ug5;@*+pH8jUI+f_iucds-EpIK_ntZZ;HNAdQ{7?(NKWd`&x{5mI-~^j6 z{YlG#NmAuS7EM#B@JJbW0s0#z9#5co&UgweZ^m|-pVz<3B+wKKX2*+AGF#5j1xg`A zq6(s*yrdT{sR>nPv~4VznXVxSt1sThq#v;isss|{fp{B4{fcIohLaMMK-sc1!?e}E zXSU%q>w5JF8`x_Cj@@t^P~4Cf&9GOR!3${Qd^kz%)VxTw>4Y;=a4s-r;$jw!8)caz zh7fpGi?`@xQd;F$U@2YyP1H|FuEn05iSu?X%>Um(GM3Sq&<~tl(*zBf7LWNW*HkyDQ)2V9(g-$oA(10 z_|-P6q)H~guRpDt#AFV?Wfls40Zh}?QL`a0@3R}On_x@mVOvfM@ve+m+on~N3-Gby z8S3OYRN_>?3+*DHUIguP|M$c3&(Wv>n~K3PE>#4%QF`E zhp#@ii(h_VUw!n3eg7rC@=xag!q4BlZ$EzZp8bKBefP!tcHzuh_SO5R?cD1p?9CI~ z%zp-r67t%iA|}KwuwBc?*p8*6ta0WoR*YztgF$t3Y=>>w!CltSBv#L{#}rBp_=~kP zWh|1fk_WYNUIFeht>8(wg1UmA1J|fVwY#$WL7S3B*aiSTu=@n-LIY_)&*?U;PuStQpsNQjQ1 zz9_a&f!%l=yd9vPoO23uPlp*kgJ1hZWA5L++}!h#)10~Ik`(eoIV%{|M%8H7w!>{m zpGoNOA?R?-eH{yNN_gJjM6VVh^fjXSwn~NVl!#OlIdm#d8On}LL#!(2W~kQDFHRSF6(rtQ(p9bHQ!B3{a0t(b}87q)H|3&UI$$I#1v0Hl5E|GjI>DFPk zlc;-#=gnV%VwSNL#r5zMG85AhN8531^*V)W|0z*(^Vb{^;Eoz}ZoPDB$rZ-gb)H;xR?r#4Ui&x9~omui|5&Ix2?9AHf>}dnSl7+xlir<7a!aCv!B?PXMS(zzxvEBe)EN0`1VUX&;LLEaM8a1?pr(m z?N|20A1>Mt-=F8Xb1lz*{^|gY9p>u=8JkX5aFD=Xn3G zLGl+M`SW+4v(Mgs*3P_r+}?h9zrA|!aXVf+&yH`%v^~ow*-@y5Z3QFQ`v~U(YD3Jb zBRxtalf|k4C=sJmBGp;WgUbc%*RnYzpVkrTjfYC&Uw>UZ7OauNi;$w^J8d;XI=ck3 z?+1CdYey`nIq)pr8AU#*ZEb$8W2Nja2XNc8inncA;~5+Jz-H$PcBNW4Hf$EoB2pNr z{89wqZ3b|wfeBK(b#yEP)kyi?*bd4P6erF6jiv8kYdxXZndTHW@w#O1Mui8#LhvI)oPOlTc=W( z?{e(==Irk1boQr78Es4N8ek#qM$w>zk!El1`*TkKmH$PF*T38HXV{<`le_dOYA6qU zPClHirh&8L7~RN-?l6a|z_^bI*WA-6w@!pU$}PGS-5r?nLq33h=j30N9**vlnU1_ zbljvT4mqd045QUWxoGv)G!j{F#kJOSWO2irL3CLLG}rXIt#S5)ka44J=i;%rx|#OY z{zCig)x-AX>&NVq4_>n`KY80e`s`!-#S7nHb>}qba_Ki*bpD&q?d%sH*%y5F*I4oIzB^+VE_`Hv`1E;u=lLD>_OW7n_jswD zeY(b8-S(J0v6v!{DYQ4^W0c7hmnxntLyyrez@HV6CB6!lyj*fCZ)B}jYG2E;KB=Q> zhw*X;Z=!E%g?d=q$KsfxeGe9i*zYO|s0PtqF^y~iV}IYXKml6-SMAv4;0~HjA6717 zYC8AH$CVs!5p3%b%cedN>LkF0^rk<_)OeOzO_?#VITqSuhIPWdSLIsz|IgTe$46ae zZ`^o7h#^EoR8$m|9ta)8zIJIUy(OfQ&|9R5YaK#YYDlj@XeuhGyX(4Z$BG4M(mSM+ z5Q_SJUe9^n*ZoNX?ykSr?+=F0Ofr+1d+zI$>s;sDQ$BJsYj=Q;^UTAA?#qd|h7Eh3 zxdzbDGrusuhIpxf&YXD(#XX`kpa#&&_5K6U%LM3!+Cu*6{L~Swc@ZpH4%K&-shtJQ zC(&6*q&9(}P>)@Q`h~eK$}z)+aH_Ifl-|dK<7pJqW^Osbk=D|>)CAuy z+je=k8$CP$5cyAlA)6>iIR!mZ+8pZPt2Uwq*!)(T5Lv1|-#X3dS z&OWB$x_6{UDD5UWr25B>%jGv*Js}_?5(0?~J7H)a+p;E=gqhW!C)$T^D%5gy^Qt!E zB0V-o-_1h7J4tTaIdF&ZYLZRS_A(074Ob9eC9}U%0eLzA*QB_NSTcdhk6YHH$L!4o z<0;zBwhwdW+867W*ws8J%sC@t)FLkNuzA#=zDDr6S&lDwM>+!*Vm%3TJR73H)ty@(hglDOK{UFoOdcZV^v~R-&#$uw}yqwie$1cV$zp}Jz;;Ph}Amy zQEOKBFRVdd>+tYmW+If^jCF<3+am6zBqMWv2lb73H)cLeg)`F#hw9NYjgkceH?y%0(|*g`1FS-yg_&k-B4#BsW&|%jIiM31qc2Z!*k=- zoe5P3tBcr`iq{x{%M0o(LBkf59a|D9-9^6Bno58ohQ|lw**GRL$8AK3x0Qe$Ey4^K zd{q=Rt#K;vP^yGz1XeC=Z=kPMmLP&s?nu@>e$_tf7QYb(kC=dk8P&O?&FTNNt&hIl z3ed={WKlhR4t5|%OPr}So~tX2F41KMRdHWNB(@K(sQMI`|I~<1^!wU{Go;U`Mo6S8WnuXNr`v4KklTvwON*Zr4i$odf8 z$}++NB(ant7lgOBf?2)I_wLe3*5J#{X}0Iz8|$N>917M>;g=UYXmLF~Ktj** z!UaxWxXZ@B%j5<$gubb$D1xSuBS=}R_bbC8si9{sJoXOSo-i$(?;$XODbn@tei7R4 z5eu&Km_664n=KgnFcu)HDW#AIbTdb?-dcM0-klaYLb}|*n*QhvZ4#&cgU2I8g z56gdfqz8~DT+fE!kNDy(z#rnPzSO)(yr}qGC zAY4>*#Daw5B4A#8M&n}+TL~ti2%wjrIbdfo1HN+XLSPv;XE6?yWk;-{^sqA$r7{l1 z{917F>3w#FmoDM|@*+$O|H?{_U;<8AdBtfvTUBC}7s||c?&4Wq>+B^S{ne^y@H}5t zWoOSh3S7`u{Qs;giX+uNr2z1$DAV+7BWyV87J}*qj<>kr(B% zRp)7|`ZBm`l+1Qqi33}T=UX;1%+|)Vv(*R$R*dY3!R%l?ZXL+s5cl$-!ma)-v+TvZ zeYTJZma~Z=W--1YaSQE~Z<9=FLY;4-CP%59_vZ#-EI~)&)?%AbKy1H}IZ+VmGntCF zh*;vu#4VULR)Ox9Mh%BCx@9aB9tH@6K$6URu$oiCAzntj@Tn`k zG^u-+b-1aIy%u?|EgaFq(xaQBrEJD_61o*1{9SA5C)ktRQ}b|3s~?b0unTMRiT?^0 zlu~S6n`V4VgbTX)k8r_xt~pYA%+*g_xG+Z%;rv>AkmRhz1#jMyp7l zB_LYFbi%X*WXUrJ**nW7*=O&h+M(~Z*e~Dx!;bCx)Q;@=1{VH1+rQ^$@^_CnP*QRH zB&h*8zVG<)U(EmX>AhB1$U%U`CCBWlLX1KYc0gYL=`5==oc*5eG%(l6@wiVCp;rR0|tRYm4sUR7!p7s}07d9l(O zR$Thk&R)D^RTrx4-1&1>e&M3KfBM`dJ6UnTiqCSUXyFMf-uJ0}{8p-MOp3MSDNkB@ z{9W`|LEdDt7QQs#?XPyT6s*A&F@jroNyI`{!a5{l0F+lNzg`OAy)vSQ-P@)=UB%tV z4Tf6(2_KS`GEQ32ykZ2ek;cUbN}>J4rv>Htb4c z;CU~}>4G%%G8B>QZB54VtbP{Ibev6MNafJnZ#+}r2n9Dq^FOpiLm>`p?SYg>;h8&Z z_{4u=4>*~;UMG(D9c-D2YdQCwqR- zQx@}J~LNRvzVH$EuY-$1X-Dz=~&tVCJ6W-*FudBS)Xfy&QS_ zEw#&7gMIvt;}VoA{DDhwz?YVIlWrUnu^^@9%1@6ibh1TzZUCO)xcQe5%NO!0z9J%r24{%sPwRD|8Vd`L^FLWZFjgXe`*|z>t%}KbzgL)l)$hMq#ifhpE3Nw7f-hB_vvW*-xKO;u_W$^y z{cCNK<<1*z`OiGTchv*^6m@8jjY3DQ6I2NV@qgE@^SfGS|5ccXlyFt{=(q@eb@+XZ zw!O!iU)Kk540-g;@l^JHfJfM7vB(7@k*n6?-UR~U61_k`Q9=wA{^1k1x&mKtK!3_t z&sb-0--*UBU#Ke3I*1-At;htntDEaqi~T0Vtzs_gx0qs6=KpMia=x^I+1pg+`%!;{ z0;x`l@WOyUz+N2&Zt~ms4^Tu8w`TP_S3#0C|zMY3#i=fVcX^_FARXO~O_xFnt|!ahZv`@Xd02V*DFcH^A%EyP8=p zZQD$;R;>_n6aM>Di)XsiNb?sF+ZMQEHpL>iLmuD`9r_!|ina&+?Rjovr)|dcc74T_ z?4KntnZ|U=8Cws~JA29<6F!BM#7&@w`Ak^7_sWV7(Vi>;L=h(aX5>TSQ2X5wX0sj` zWUJx{jR=#($S;k6d0mf1^<_mdQ$bcBQ&wPZCK`xj&mOR}gaOs2;J?Cvcrl9#11?(w zRbf4Apevt#ut3(Ju2=(E1epPSl^FzV3v}Vag3H0cQfCutt%F}}u5i1qR7YDorkibe zZh-x3>1g}zgEe;Y=MQb~zVGeGG3sEm`^X4(Q7ib_ieU0fPwceQCk{dk9ELJD z4i(7IN2ar#WJJuFqEl7~gi9(4t+cYpN=fib_`js0#EQy`thfw{ke~Zb@T7o~XHL0i z%gh|-m3*hL8VzIyP7rB`iVzENipWESh$D=FJa*!^dw%IzNQ0`gR&nv1m0mb!Wfw6E zWxvWA{7$S;^?Ru`s=SEVAVxTM{{QU4rT^Eg>b(75`C0q@+%YRT@iTPD2774p%EmaSY)%r!bwW>AA%+T%LT* zc}&s@U`=2kRZy%sDB}4|XY9ERr>yT-#RpH)8Pv~is2AbRe+g}db#2!Hnjn-0qJY-e zgqDN}e^73FT49eoaMA&|1ZOy^O>k2>IXKEtT|&{%e`C*)qsWBK=8&3a-`PvlfVpTi ziPUE@)W!G>2i!RovJ#>Wq~8*2AQzzMY*f}RyXTqLtsZtGgcAbBH1A-^{laZ!Gy=L9 z_R>;X8GLVunUUf6yVlr6VadAkW$@T#?!YJBAV9={!~+Qs2U|rPD3Ht34e0?>1f&qG z`jC?-b>O)07VsKB&Op z6Z_|1R7xNL#pf$O%ZSLbb7dA(2J=?}^H&163rh=~aXBi}K#k!f;e+qw8BV`Dr6MJd zoaWA{(}#&X6hS~MoaRoj%8@Exo+>PY6jkKo-!W&L1J#=Qo@6jt6Sfb8#N5>OT5O3QUqu1SSO?iEU8xk@`4WT zdWs`0ZhM6v?s&XVM#pguZJY&nXg887C;~(bdAqQ2)|3{;KmxkpJ7?N+1)O$6`E;_F zlG)6xragkAHxf4$+f;I&aqE>i{+k)0^!T&b16CcfCzt(V188e}it5$4REYG479d)A z*cw7bzVH}f$nZzlWYH}2N)4J{qo7Xd$Uju7n5%>id!qcp5t1@0`f37GDHmjr$Yi5i z$Rg^UGUPFapS|imBSjg+GCg;$uD;dPGF`3GRh~9HfuoERuk4pe+uRR zR>)P!OBYCMNMZO_27lqZ zaIxHiD=|`vat?j}cYAm365BN6L0isumrtlD?MDV@2B#pqra@c)ApqH_FCb(UmLz2a zIuO=Q4te&ILv2L+9#|3_Z%BXZ{qo;9$Q+dro+z3y!{>S#qbNj%=;-o6SdyU#&Oz_H)sgqvg5f$I_6fT&xVsCL zIslyK*PgPMHx$_{X5q}lhu0kZnB+

SgvM$5UiQGz-rAflNswsUxPnP2Pg_84qii zh#3)%pWS%K=Db^IL&sBHtk;XbML7s_(y9e^pdG9w7DVOGu(oJCUE+t8aAw&HJ)F*| zz3LmT2f7Wj;jrN{emwYwI^Tvz+T=0KRyWohwpg;CEqkmNZ?d7 z5)(HRT5SF&w6cEa47tu}_C2|LKLIBKP)#R`c^MJz_3?I{|2@{~dXCPGWLN>6!oIBN zR%9sDCww`|RWd>I4!7E=s&%@brokRzHpnF-iTMQtzgbmj=fHifX%Ly|tHdhIm1*#E zG00hrLr4|m$Aw=ZJ}@RlWhGWYedC91|FBQe80F6rWYV9lx^OB@A1NyJDZp@f-%=N^ zyY<#%ABc-i^S%wh6QU=inV#7q@dpx5N zi5#lIppF_P-ulSl);;QODv7u_`2F|)EtjFG#UGWaf{%MjLQAd z9v)2fl>;}rHtb>}?~Q<^3^T{JSH~d;bG$m7)9>N?8l{uc$p2)q4Kvw=DbXz~Ew+`- z9x%wBZXHUm&{H^TW;}M7YDue4+Dv@(Y{UkWHlmS$%hbgA%Q7h)p65!Q{xTiop%Ce4 zI%?M>u0Mi#ISH*%WIZQrV6h&f>!H70({PA2Yt9L~VF{Q9#LVa!WfEj2^uO-E=4^yY z9bRD31_{a?9YQtGOvky8;s(iy;;#!6o{7c6r&=3-L62kgzI zFF=s6_RI7PEJdh&tE&QCT{ay4dQ2u`zAngN+*U^>?M#N^Yb;1x+o&AIKZUw}suWwx zh(&H#OlQ8-&v zL-JjZ)aA^?&Eiprp{=Yftv9EMs1FQC$FB6TE)6@>99Go*0S3@ayO`M!tQ=3P8wKSo#_3SXn+FnD82UAn7ZZN?{F4$(Tyjg6C z@9shou@gdr5z(CUH(6cL)Dyf0CYcE*j80Oc&^40~T27(iL4xGz@0_+5Hk`HvTPyA9 zQJWl7>=*R3)k96*z5UnDNN9o*_K2WHPj;*7u zGe2tCY_io4f=ZXUb@8J&`o8nRZtueQUwF5zgT?n|FOdJzuW2Z^Soc`BnQ8<*Hh=& zDg+=)NGLL~-5G>f1Zu3G^7Nfrx*&PN3_^xvzQ&ZeHrB7*2m9Wf++}~l zA=N7wu9Nz6H94W^AY=$JrFxJ?B!6k6a(=S$i@!I&=5Xa~zZ-7WnRCRvVWXiNnEa!d z_WutPz`2(60tAJqmG5!8D?Z;Qq%o$621PeYT2vd{W;HnxQd6xTO4u@t@I^zBN9XUf zd!Jh6Oh8vmz(`C$My!gM)vn7k0qL>`YZ+JNTLmTOTY>5HZKD3sKu37w$2GO*M?Pi~ z`gXJHAq5%)JkD~Av0-DrwU^(kuxHl8L%jd9P5JvS8x8&w$R8|U}z4$u>f80){y8)Q*3!)kS8~$OyAES|vyYWvP^e{66U-m#xHKVNu z>0}T2?9jPlp@|nYn%BF9o}K}4;`k^fx_W1zVs+1i6f^^+vzgAIAWu6YK&*W zsQAP(@_QWmMe{3#S@e}4LkiH99xvzLS>^r}KygmR#S3;-nVt%>cx}eEWjyxk(P0+#$S}L>7Gfo*DdrW2zsY#|i#D6O zfex=3|Mo8CT<@_l=nUeC#IX<64HoXiUF^e2@_6a3WglFu5G*2M+FK|tHy))Ive1T& zqmWEt#b2mqkb#=O+t8olQ&@GC;sO~7{oke)^I5B}^?!9D0g;L2z*MxwN;K-s*n^It zSa)=)?Ku3#KR^QOe%5Qs+cp;pVFGV+vhFLx0b);r4Y_^%+uywrEQGWptV9C&KU=P zUFjkB+MYO5zvf5?9HFR8p6agZ=t>XiIVmzNi*@A?1G!JdL`F`%+8H1xkAL}s5lvtj z;~ucJz6AQQ7TTfD-?ieOKA{)uJ7gC>*g-lVj~=C>N})o+htnK%QN&R;g~jj(Wv~Pl z97a*ep%)mOb0EJITQH|g)=N!cnb#+w}R8$gERPdm$tj4JL$`vEX6a^}g zP}m^TQHfDec5z;|q&lFeH7NYf0+(jUOod$d?VMfwozUaAOT0FL#rfat)LBX?(4Iek z^>5qa8*1|?fUJw-Jn<+FqSp#7)&je=a+V}r>v**mGCx|=hFaPpsNFfl*v%UZV0%1F zYxDCqX2E_Nmh*3uEg4C0p%YzPqn0m{9Tq&4zImN}5VPWIo4`<|$A;#!U!P=fHPl1P ziFEaA5&{u&dnL>+x~MfH)v{o!9)azNC_-D%p^2`*k6PSQ&;P?lui8P|bd7}5X?@+{ z;UO{^5&#Y(($LtH2+UXlvsK#PKaaoN*Y3Tci;a6M1|cBr@i7>V%UMObHc7TUuZxvhLX>SpQVJw+@ zbVG2swY_b!wPyfIXOs~wA$N7CvQ|o#qUQf)Zt0w6y)DT_aNG6~$kD<%x_~~n)+4ag z6RgQ~n)E!tu4_648+DR7D8=Rz9U3@^ccZD1HN{(%UdFGZ#4$4COK$i!eS=f*4(f~> z&XkF$m%cT>CZjPHy{#D|Ar?mE=q|XL=kDsI zFdNtd1s0eM0%IOZ(hpssgHkwU)&EiaaA}I4E0XA`E+@gB=$A1ObrqesNQSpmbB+AA zon4XtjGCt)EBBSAI@qlP@qDza$Z&gy0Jn+31=J1oPp3ybvnV-IZC9M z1%5@wBB@e$UB=;(4TTsk?eJarjg&_Q;yhHPuZ-X)@Er2aUv_+HpQVhq#Zg_YAhtPX z;dU8SWJFrP9a=VbHzYTzCC4Q+x1h8NtRYpzVEl3OzNt1Lndw`(pV2}238Ru| z)=g&Dxb_QK17A3)MqvE%Z^;ODa7adyGX=Na#7Ljk6IGT|w9HMI$n-FgkbkrVK`PvZ zp`K{ZeAYJ2IX0?Zf2%`aGIai@GzbyHXwZLBIDw3333OEX2m+a*)GcHUA}FZD=j^n0 zcZ=e{5?t5OCO(cOV0>t%Qeb^lR|?C}zFO`+wA+&z+LLQk*H58D(O?DIq2*lUjJ?Hj z$K7f#415yir91Q2!dZ(*3!sDY`RoHWYwK=0t#?8}!tY@fd^0xyw?ql7G(n+SGT|8p za*au3_zk9Qq1l-@f7%8_nP?SWB*mYDz;eWN1RwQ!^TzvF-JpTYltq%(ViJNA4N73K z#Mmag6>|sjy1Il+Ku~)kwQe0aW{}Cy^@Hg1syomIjC$K%c)yHB4lI{QPZz@k=mbp7 zbCF4kW2Jmi>D#d9a5Eu;$S(#GmJLn8%9GLEJ(#XBdTyH3dD!l09%E^vs6~)|WyNdK zNHb)UL+%FA@wb6RBswm&*zunLSM(r&2h^Zjbb^8cXBnK0NUF6K#SYH;jvR_p9g2lm ze_iRzB5bJU8Uu7y1Ao1Ot6YF(l{rL#*2V-kD;yA{h4Y-~jxID4G24136dSLf<`yywi&5OPZ*7gp|qj=BqBQ(?U`)Q$EA()=oP-~!t5YE+xm`6(Y z!oYqOb7xmKaW4Q5bpPbd3}M{EOhhJoib*6Gk6=SMnL&e*Tt)CmB_5x4kD zySDLIcErI56RxM0mcoY<=g)s^J}m*s|3f%;>92)&2Si zi(G~S$6`oEq4Tcj5d7Br^B&9<&IG`67$5Kv5Lo)1srbS$<&h!MU>p#&V z7ky$c!x_x_V7El_Loni#8NJA7)hbfX>vCek-Gh45s|+I`S6tfZ!zVWqd@;Q0naMl9QFk;w<_#?~+M zQp2sw4R=|@gRua+lN(Bs8Bbh|U?DgBF4)5!`07#Yuk;u!WEMc*tQ=sibLUrh@>-ya zG?W{kG65_!``VEJ6f9+lEVducv*Z6Kv zfW9PaPX)kcD+AA558u(xQ9S#AXjc>02--xR<%i)K&mf3=_y~%u$ zUqI$8(q~TA`glQ<;Qpf)$pJq|+MRqdxaoZ&Y(N{BL8krGMPS=+{=b|an*94~^Vh7L zC`Hr~%`z@uAcv_7PE6Zr{by|@i5+GE^i(Mj?SNn=jA0*=&`8DG)(!q}pe8hR8XJdf zm*eUf%NDn*tB0s^rx&pXmdDHdfw)< z7Cs5tcCf}d_O-fX{B0OR78W*v_D5MhvYRm7s1Mz9((R@5(qqh)(P<+rWou@p!mnsN zkucoznb&RJJ4H-sWK>-^`U>?Z~ke*MpN^h17VzQc!hSjfR&m|lXe@yKx| zouJY=#S!#{Wu-JM3%8!WSY&_c1!P1Z%2({&RHGSI4m69m_j!ps*z`LK(>K@oXjclT zM2P59@z5vHfzPpg4$V>yfq!>X?Zy{5G?!fZ4VI5)h)S9vgy^bE{PnYCa0rMdnWD6M z;Z#eH>%`HQE)`<_o7N<M|?2U9GEma^xY>Fz1eHWfLBXwnuL4!G=bP95&UWb5zY^ z<}IAN^0twyzT&*QYK#Hv9}w%I+=-w*KRtbybr~uZGuqz}He?5&&900D!LCu4sqD^6 z6N)>{K3z__3d2>`o=pqQe>;=8;`np1lo>rxJ0C3?&jWSs*|^HcgCbVYm5mL!uGx70 zH1h#&z0;=mjmJATgU@U38Lc_`qy=uXXhWi6(YE1=J;vQ+DgvloIGR>>vzeGO`N;@- zqGdO$gA_?~K3nvD*%qNWoUBR5^g1VO05xyJ?SURA7@D=Y+Cw|;&TD>_5`fl6+_YSG zgUK{XPvS_t8IWhQ;r!>UFR_6$>B|ZvkFGP!LYSKndIz(RT1MfniETR4@enowplkUY zaVOo?3Ky33ZbTXb)^BS53>E)FbZK+0CGo)o1rO8l)U-N#Qf+9;O7j1K2`ixJ5?;6SjBz7g45hT;u1cjGI#mFtLgM6k|J+Bs`SEl6RN|cG$rsS#sC~*H13y|sp zD;a2)Sh>~;UQaH{?QpEN^W)eXFs{e&*PK#N z%~abo^)srnUjuSECG!Qw-%$-#@amkal+_zi2|?ux&2h9K!mL%?IzhJa^O zcyzyW`j^bJ2E~_tClH{N7*s_revVxH96>?}`9m@ChJSBNwRJOl*|Hc6vz9DL6FJko z#RL1!tAFK|Os0Sw2{5RF6Ou-Ho=Lo#aQ|rQUSCD;$E{oM*DP+e*sxD6f?9hNJ4UA* zN3)HR#@N8-TN$-|0@$D0)#1I+OkzXHd zZEmF%^7aYVp(Cs&E9Ps{o{GE;^pvIh~Sz5v9~v!VD+w&ETF#)9JAG4`rAoP zWH>~t7S;)C;nN9Y&Qd%>Afu9HWcE)SbHpLDSc@UBFvE~w_=dvYH5ieJR3L}J`Y-&z z{OECZJ0+ox*Yx2)pU$>|(?_z24|1@rG8XA^-3Y8Yu)wTXF2CT*hy!wNm1S{PXwg5= z^1CeEqwca4c8M^-PVf?#nALDAd2lRK2QyhX`DIJ41^m3)EB9^wQ{U!~G6IXF@PaaA z?bi%+3TZo)&9`j`j_-=I_jgl$joh8j@F4}iaBMi*?OF8$16Sdxg@UN_UeX>s0L%wxt;qjqkDe3J<(1!UGpK_%u_=s|e13uWLAo z*@Y81q-D}Ohuv)RL}nw;AaGv_)gJxQKdt_?1mym`?P`eARxGsOF8V`7KnH!Txn~4q zR5|rD1~~!LNf@;fuDhZ@?A~&m)#Ds%zkt3L&}FjCT!Yb(Fes$volYn5S0PgOHDqn{ z8rmaiZBoYXTAi}LLQ?#hcEV0b{gppjboM^Gb2v)wI!{~6;JfXS(4p+tyVd zy~kPi!o9NqZ)@FMM88a5gG=8R>dHTxNG(g7RV)gYm?NoINe>^<*;Z3m$p^TJga2ah zB)@3y=?O>lT{;?Ok*=2M>%D9MoJP^}{MlmevILh^{GNX*HYJ7QpL{E23SN!7&pu9> zV&8rKwjJ92DI-z7qXCk^s5CvEkoF%laJmHIonZszl_Ucw`6LuZ6kJJSE>j@b&-V$~=8acf}`aXPX?vuSB<&S-q*bD1U=iAbeUGeW%@ZYd>qMam9^?S)A`P ziza}NK+5NlI3CNcJTMZc8aN{DXA*(k)^GCrP{#x8272;4Hy`hzx4OK>4rBN!h<2|0 zKVa=`yf9h>ZfXpy$uI8jmu#_FI~@z?i-M5z4G^qj1#1!g4%Q(G{sn7=rh^GMVuAIb z#UEOu2C}O z5UdGd8x_R0XCtW}92Y+FZX4HoxZQs%ab&=Q5Qh)hJ@ExLf6F-rg`n4?U0Im*u%Qx{ zRKVVSrW=50{RCJ8B6lSvAhQpE^)n1v3z3g@WcfeW}Dh z>4r_VYcYnk^cIw*6$^hE%hw3YZ3vKb=u8_heRtc**0~vxPW}G8^WOH@taohg-zzy$ zk^Uy&Tyut@-t8Q{HUC(3r>hfHAPyOx^|=kpq~HPtJCcr!$mE}CAK7Eqgh}t$%eo?x zh{i>Y`*N-Ol0Tw1RcTf(q-kJE1jDIDcC|I2cQsgh zhR#``_pF{!@W0So>$yGPI`{2V#}X6zXEDVpHwKHI%r_X4HEV$Vym^7`WANayeP7yP zWPE2BK6bj00RyP<3ro)s7z0{_wr-|~bKuT*3$@N!zbe$eei^GS7FWS6L?v{!5uPvH zZ%1}+vz>1&w7h4BAR~wOCbp3)&KkuDFu3Acth#{OB`5whzQ*N5jx}~hYLP&jmn{RA zg@VL%UgM!@hR2-~F5=I>{z4+kyUFI(h0kc6%u^ z$2p{zO|D6Y-rNCI$=ne{ZW<8?1(!;MLnb0_8T*DD>v5(Cp0LG?9Z6X9t<}9=d3kTU zic#jb()Hg~hXGJZ%(@X&)cMjj2$&c()&a!c)L@{)->vNv?U{8)>^bDXi4bnH zREz_A8a3pb429lMS7QtIxiRp_e9cdhsEi#^r?9$>FYz^#+}#K`?DxJl6LAixb3leQw7Od`sK!USB>-VHCJlt&~Nrt*8mIp66n?fa1gJMkHN?3S*7 z1tEQ{*^Lnl_h8ajHNsrk*&FTQJY$#(c)?YOa^7}G;ajthLfbOhj*3f2J-%Q}_u%my z4#Gj9!dYzkc9QFFtDU3TaxTZbyc?{yqrt{gVeRwcyB5Nbp8zP@QTKG=C;cs-^h<2) zBCSP^16M94+qc#ww(;1_6ya(GnJYpSqO;u5w=?%-L?3(h@gCMBu(#cyj+L9o+KgmL zOiF2ZD@4L}6sarwSZS(PdUj-&8|&fD&lcmw0of9Ra5Ira_63sP7dIE$j8}JAohGBq z=U0c*sc*bFf~Fx-gtqPCEk{A>HJXjq8Up3qVnc`n;Bxc~=jO7x3i6G7(#Ad7jrk3|kUR9YdlS~#q_kgZ+mT%BmkUs; z^Gw3Qz|pIAS@^=QE#OA)!1U1DVyz3OV?!jlI7yyOR~iLZ9gGThf?SZqlIlfi)jYwj z3h3!NWg}<&gMINc94NSUU~^9Gk6;T?s;TilLcb>bP0ZS3k51dn}qqv zIUo_p<+&ZCsI%4{r?{)!ScTzn+~mcQZm)|5rdeZK2!?huMLK)^im8#PevD5Ke zIB-vgaH{RxN6*PKM0YpbHpRWXW{ll(JtR`-SXXXp0YldcrY_4Zq&!}Tu0l!CyLOyt zE$@i3Yj1#uViM*}bh9s@oBi3h3T+zac1$4lO=QlV%WWGf(wwn{t{6&Tnu#V{){NH_ zKBW$pN?4eTBas~a!Z-A##@Y>mJ*>@5y%_RJMDD+dY(F0bq)Rb3K7T%Ec^OCf~I#0{xk)OCot(9!`B7k8mLHFQDdWgxnu zj{~9x*#sBk8BbNx0a9_ywtw?a`(lmGvx=bclax@DnwTHON3|$)?rgC>OrAd0DqT5F zBT4zTmw78uBI(B7WOEfbYv=$Q*ac$-MG_JeVf|nF2tDL3^9_;D^G>0VyK^j$M&Jfc zN!w?=644^pBhX>ib!W9GHH-7mcV$S)rl~=nR9I}E;8ra;js-@y#T`N)3M3SevCn^O zQP4X|JR(<#O2*p_Vp}j$Z@cI1Ja$(i?x7T*#;5GI`^K!-^trxv)#S%I+JdNFwgyw3 zug?qW#42h5=4g{ZGf<}gFZAK{3aD55(#PMS=s~WJ;L<-A%~4(gesR&rdoB3x7Jc1V zT?wPR_sX={bWrH{`7tzujuT@_Tc;YQu5^TI^{9s5A>g-}5!@BD4 zubeT`kaI8ex`6=<)M`v;OtVDF-=pz;oFhOpR~xjJu(;HxUBIbhE`wS%r<0}ygqHka zU@r@Q`6GL6Yo$$Gr-Lp|qQ63o(O7|HO;S4jol|bAWsN@+_B5?jmTVB~JDdSPBUW)v zcFqs>#NYz=j#}04;yT^Z$KJ(!t8UIGZd44O``_qu3%f*13_IiYA{#9~j)~ZcGt)@7 z3kVklxf;ZMEYJFlxF5(KGH=CeAh$ij18z3y%3m8-*%A>QFQ>6(AxeW*$8@rS=ZDz$ z1uxpR4>#DJ?f;-2vlD-aZi+_hGNv|^R?=B1=&4zwu0}jaS|ML3N=6~)5`~;^UJf}g z!%qG$sE}~;I1L|_Wryvj?f*u@?X&fB`5K}-JJ>mWihnjmu*_Iclm!Z_nJhlPpFS7C zLVJ5%SL-r`yG$*NyK*p8DWO3g2vlH}69*^G1KIqafg_#Nf0#XR2Q96fg5CJ0scy(i z^h(Z&f?FK|wdv{}eh!T~p}xMZbd;o^nV7uCx)00XxxFl;(MbBNpaemjvbq0sjUG5b zsEUZe?a>k_8f}AKDy-djyY1Fd767s6cUzo|o%^*#rZX2+-Z7>YoROk^Yw1^i^$h9s zX2MbAA5+r~SdXaH<_qCP0;ct00&(1GVAz3xkaV;a$F!x{L(S)_bZN%>~d2sM!$Q1WWu+eJ1lf4?>DID-XzoUxXJkT@rB zLRO-6zI_UZa$&j{E9+}bbtO}{tgq>kqFP0{N>inAI-#w{TI1_goq5PYAAA{6SFyc- zFw5z+uhRT{4ZV_A6f%X<8qYY#^|NV3{Ri+x4@%oXR*wcQu<@;vdAa`9y-|Bhcr?<| zMt8E*1eR`o?Av2f{_Gr1dWiGi|NaXW5l%LjMbxXd2)Vof<9$`wGJ>(mT|5C z3^3WTx>}^G*9Af_8RlJGs~==h3d;b98u25BQhne#qq{Rlc7pByV3lqE>I3>5=%+rk z%Z+U>VIYb|yQ^iglmQ)8i$anM~BbMVs+Z}8(#S1~6jB9uv$k zokyUI;a5fiikZp3*mYfI^3>kexG~4Mu}L~&=AEv|oBQFN>grNML`!?{L1~RKhL3%ny z=C8^_PI`Tx&BT4_&?cV}yr6mOPTI})Jj?6#;`RDjlk2f#trGE+h#8wt@FIGuol%x9 z7kRaC7>Yt!n3T9X6k4V&y&j$0jkPAXL|a`=#<}KcOPIgSUfRl07<4UotyjWjV2#UE z4p}n@S|Kax2bNE(8!!aAt^bPcHZJps^(Eyu*tlUSNT6<;=T4k?u&Np%XRkS_g~naUEkTkBfoevQW$oiz||=j{Dn|A zoJb=KTp7b(PE$VfHD!-)xuErrG)<7CiRys7RLVHE{oCz(=F8{KX5c9Nx~LkTcpBdy z{pA|H>7{N#viWcu92m7KzRVghhA5X>I|>})IkICqyZAkW+Qp#14727}w`OMy=9Kl< zEg}CWeAL%cuz-u|?+Y=4T%^Dlh5wS;IC0TW#GH{#;TynNEu2pz&j|bSr(g`J1tVp$ zwyh^HZqZZOT-_KQs9&rDlfiE!G`G!T zTH3`?LekCbfKd?HODA);Vi;uN1tGTOE$7ys-&Yht}gr2FDUUsJWs8nY9xjW(bGD z!l5uI{Ix-|*a0nP$I#KVY{Db+B2D`&uoqu1#8b-vBr0H@Kq?zhGlhL3bCg_RLiRLC z-zH_CAKg+pWr&gL*Rb>H!Wl80buYRy_MZwhOXEtr6yIjaD#2D>&C( zRl~3YWB#kbC+vy0QLLIC)r~GTrjLNYnpibYmT|7qiBq~-s;hiOFYd7gF8fk-4*ww( za?>am2b>4$@}Nr;&MaYXzs63V%Nxp=^{9QgVWA!Q?oHeEGp&GV{|_@=;0(3IqViG~ zyQ+s+Py&tA2oGPzl#T86vwW&9DAYk*||u*~G7ksRtlsS$TE%}L#`;n>9V&lD7Hmj&H!4dkgJK&4z%M7j<>-cA*8mqjI_grgVb z+8|Udw~Z$g(yS~g{Gr&nb_bq&=bw8dDxMM&6;BC-+q4|dZk)g%91%jj>=pvA8R`36 zPjEOMI)=0|?oXU$uuO)=?2X9SMpNsTFoQ?zmirgdjrNG$QvWHNi}`#tf&6eC8^llF zv2%+4y3(qxadeIYrt%Z08wybyIO}}fuzT$FiS2AH^@?Xl47U;Y-edLshQM{vLf_?C zdtr5<>#m*r9w?Zp9C4Q7P|Y=T`J|@_a&jQ`5c|dhP~TXkkL`E;o2d$1uWl=|r?x-tv}(zDH7u~4@>7eHh zV)}@NOwYnh)Sl|%-h+;551c~Os&kfN7>h25)*hnh46pdHkZ8?i$|TjCzKwZD(RO3N zo!0KgUd*3(fHBE;5oxruHN>##(afR%vma>@{k5E0)@-*MbF~|tLvZ<|a!FxyJrQ03 zmEP&Y9(I+(kM+w1dj2|HEz*^P=VhR>e<=mm0(FJ^66Jo7dhs_rF#>k%C3}4>)>HGFs+APaN5Rgvd}%K8 z8)9L1Oq5`i9=w|4w!Ju4b82uCu^MO>i6DsGr=92%e1ooQ6v+$pw9u!QT4L&6=P$$4 zIT#JXa1@)&qlEq#==$q?gTY|e7oPcr1wFIkh&Af^GH&%@YkGA*TbR(^7LVy@8;Mod zL+&JLZL+jB3*-+x3U;lGVNN{c-g>zDjm*%@ACGKpOdA{4oAVbMGDp`h0?fwRxaHq4 z7KAFuyU?y`yqmp|yl&d-P@M?~bigdt8sp(G+ga{aJhrFw*OECVEyVd(V%=6PBPcxr zW#ZgM^}U|HNBbtzrcc?Cw>Igm)1zHcJaA+jZD`-6;`+!zK8+h z(?7TIOaZ&UFJsj>pY{&Uk$JiY#s9ISkYri~gmW9&R7x(hM|H6jt>-4KtXty@xBv3E z3s1rsTiSU_K?8-~%$PfEJz5O;+8PWyKbxdy`Q?qmBGf{^YRy`+1hE<%+4iFlI!+s(&EBcl_vmX5jK z*1t5^UT5UqhZ|qApSN$dvNJ@NMQ8|u3W=HBq~de1O`u()JW2_Z%lKE$wL`m~T6yLw zuLbvTPh7YHjK4zY+DeQYJ-qI6t4^6zz|O0m#}r&Z0$70wDMSWX!7$<zIpq!TELm5Df=Y>!8@@$tNE}=F5uCpbW5A1t0nHMai$@g<(?s9(H}l7i`*V2V8rAMuOqr!JxW)sFFxN z@;$ws5(%@hmT^pS=1vRk`hv3$cQlMda+c^Se6C$zo4Y0r#yscdyGii z7HC{S$JGrZc!gfpJv_^%rtD>&2V+CwjcezSIYsav4Fm*=MhD>8hvC^LE&0W+3Y~^$ zzt8Ttwy&*-ztfh(A*_w-VrvMjaUGp4C6Aj0+J(M+-K>vq1^LK|h^bo>evcJkC|6Lo zNgsW;HNWL)Ygq4o-q#>|aNtIp^L~*%PYz3C9%f*M?1LNaA+PNz{HpDPjD$+0s*^U< zspmQjVI0O{ETz&(H1kbGF7VoxO1nQc-`NWNh3l9O)b93)3<(^=Oi|88Y{P&s#J#>Y zq`=xbAYX&Px>FAPI2q2$ow^3EzOVbY>V?TB;-4tZJttSI4E|euKZOh%a`Ml zF$r3m(AL((Q+p%}k}X+>Eh)IdmH-L(9o;wq0Im_^@yArT+FGbvAzNB7MI*j7s)=mm zT{h0gndU(}t7@6eyHK?xBeIPtD3UE+xo(AH>mihx0c$s zAFa2azkG|9fghRPNqApDskVwLK?&S+9S!&rK`jF8RTtmuo}cbIQ?S6z{nKa;H$ZH? z%eM<@_6dfKpP?LpqM@8RxL8yFI3VMDFWXj3Ka@~gha1Pi7>``C&91-E>m+TD5Wj1)iJr2E z<2%51E%;rJdCPWyU;L`CGmb7ej6wb#TaM)nRyxg5S3D56j#Cx*>&Sa0^BqJ-q54cc zQLviUypcaH0*&Vo*U>b!^h^EHhUX#En7f^UWaI6+!0y(jNiVj}!=!x=ST>c`oG~z+ zIqb{iJZ^l|7Qh)ncJ6xO_kvN)SRrggu&9VkVzDKWPjj#`T;WxHD4vmRcYD@ma=f`_ zdug{2Jn_ zHq97Xpn$*=1+qjg-}ZF^^r*F%IDQA`N!`xW@z&~*CMrKpUdF7iQxMMn-bT&&*8G~HQw;28?QiQ#P2eFab%Hiu_89D7E<)-Bx$MRj`P!2C z+{L+fu?6`ue5<)>SU|3@HlDByZ4ylEkb627CGIO+=&vhZ2TD!uScjG^!=kJO=2DDEJIIoDEhpNojny3e zgk5uMy#1Bg8!xEokAKsu+j-QluQxXVl1(i>I-D&oOQRPU$^fbz9kNme_9yhe938im z^RhE3GV*OqVeVs4*ce!hK6W$bv(6lRue}oeIEp}cOF>^Ly?{o5;F5biq)_nm}$$`mfH6=@9afq|~p)yBFW zskJ&vFRZ#nwrRl=f7k-|CVKY zKFD>>eE$!Bv%`D8up_^0vqJ|tEsbMKi#V^Wr1+#&&TI zb86xtJUAaMi``5tQ|-K*sr^vvmF1kg^Y7j>wDs4@9ORSpua3Ek@pY`nD8!GEgDt$1 zDE0mp92{Z8U-;0bu0lwcj{nT~s%AizVtfVK;cN+ogPN2vC4Gv4NzSgyVF zemV5`L7VknkvnmmK)xpL7p{^V{3jE_BgP>4AN%HEOW1S({bP|m%h9IO7SJ5kV2G0z z%b?tTN31n(5f29^X-wP|iYq5rBO$_ewrfX`zGLfH>)I}X;X7l9Iy{FyaLi_VY0DXo zH6w)(qFt1s3`A2p{AbZ;JaH{WH=TOlU_`p|GD?(uiNjSyB#e)Pdld&8Lyp#W;#<76 z0d`ZJhphYUBRMwj0edZq$y;l+#quzd{yC!whY1ufW7~Q3Q~`XUR&|ksdTq4sQ?%|= z$tFOER^C4YibbFXg)YD+*8U%O-r(U`-rMzTUh!$ZpG z>8~v3=s@~#eua8-4%?f;66taLH{SF<>D`U_cGc71B*D( z@I)nN5bXcd-p!q7`Qv!Y&Qh_=NiG7-)PkpKlPV=8RO)1#v|RxBu~oR`_-yd69EKZYY#oJs{S;Y(-Yd-VAFojxMxO>}+IN zjlwN@(Kj|`#SZ=)tve#=^w+#jpW0Hjr=^Y~x(png!J#DSjMkdYjL?uFkdU41p-w~e zA@A45BcFrIa~~96&Z@Wt5p*4h8)^5ghM>*kutyap)=s2VeKga>Mh>&_k33*Obs*=>eg^4q5|#d|8Y(_i2u4a;-UBtJPhmjpu4- ze!5E1V*s3It=ngL#LqRnbmQ+_yp$&7cok!)XvckU&S~rS5ccI;5y&zuziIVrHTe0B6fk@r&E0X z7qAOlM(zl^^YrWb*QDjX;@_$)u=v*sJBAjmXy*s^e%?GQz+uGhX68fHY9l>hcvhQ7J=XI%d~|PNoPzw&SnbB%+*Vd^6mo%kOS4?9UOyu2dCRj%ffp#%YU_a~k+&^v3=5lmk94JEOKZQfc z#%?@l6L=efx*WKmK5h+@I;5{CU zyUpl7%HA5w94+V#rQ!J`=DrMe77-v^mrUo1TEORM^UaeH1@)bU`s!30tP7VlSPzsl z&s0T)I@|{M=9vsb@(|AkU#uiQx0YjGAdZ<>wWDotj|ukv(pou~t3c3T4V<7SnTNFE zfn2OocJ*(_LamCs)AA=jZ0{#0+F^AXefKvz>c;c@^1b=*Kd{S=(4g--d;;(v<-oyH z#T+2c$zR1~ocP7jS`}pJ73Yz2UMNS24Wt8waCve4FHT-a*8gr?mY>%Q$dBvjs)Qzg zDM~qtTpXRuLanR!SNQJYcrVoFCDuEuAkN-jI&L@V;|x|IsOVz3oj{#>X6J|Y!MY{( z#_Xppg>#ujDZ1)h0bhns^*CD1xye%6n#W^UWZ49E{@i?SQuUaN0=xhqj|kqko{Zj? zJr=$$lNVS!v4=(fg>!g9uqZG`_w-7&aoIF;vWJFX76xaK+Ygsc#!X@!mhrU(i?t7j z%#EAuonG`|M@6 zwVw{DMgO7yAZqW9Nze#QkExRpx@;HX(dIeC)zCc?6}hhS^9E@+dGr(Y`Nj=WQuvqt@%4YR_`)==6<+ zD7Tq|N!O6{CCb}n7Un8PCwX_403vQYJrlu`6*lwGR0?QQ82RHPS$}TB5o@6~FTkbK zMsIHf5vLaDfEMjXSj!IK)(X+KBQG_J@UkhmrZrZe6$Q^WELJE(Pr5PEvpa2-U7C%x zn;kLN*V^3q|1oynfl(Jo`_B?$2qE@@T|o&|6crGq2+~BP_g<2a4x!k~CR9<1NG~D1 zkkIwL(<`2*r{~!fD|UMC>fP_&`F)<*YyzI|`}_UD^3CpMv-{oeJoC)VGc%7F4h8~FPqgmBqHgGd$I1qY*7LfQod!SP8{g#rLEOdmVsL0CE?D+>En9%SyfZ!b5JKaqUM=?f0=|OA?&J82k|oUiO}?WnBS<>!E0! z-}hfQivY;fFA2}xmZk6c`2;hvkJ^4Vf*t<)ZTsuC^|p21cv~~|0n1OjhZBMO0!tN* zujj+(gUR_i8Q5^{#3q&}!`JmqTIyC?q@&F`(aZh5_3jWMxWO_BfLBc-|Ga`ws37%j z>vh{0yQbEy_?NzR|JVvkSW9he39CX^u@IObo*eyq7$7(G1_J{_R+HDkQK}I(U9d!i|5T8vE!%>jzTJ{9)w|x^X}SD`GW_n*#%8(G$QAGX22Fs zY|T00JS8Yo#8os;-YP;|;Q4&+i_1@B33vDFVBul~fkYE;x(-wd8Oqii1`^#OZs<3Vfoz&tnl z0R1jk$FgMShRH12AYl=_sX0x!RnGrxix1w6wZ}Aq<;PRdXxT8qS~Z$v4X+w!bpym7 z7Y?*3^AHAaI!GpPPl$H}W#_2iz6%+9Lc!-=MI9<*_n{1^!7{r#llN;_(BPiH(O=L4FbgcW4_t^- ze((_8Tt6LV?ElVp?9-Q5*zeXnYJXZZ$u>Sc)N(Vs*t(3)Ry3u9Eywh=jAA`!hUzJ& zL}0K@bhsp6QndBD$)9*TTcdd(c2zPOhDl-)IKagAByR@Ox7&vO9K&qn!>_W?o=E}B z=^KE}_oYf3f`U<@K;aFGQZL7ND8gNxmvE^+XjjnM*O*3zpoTt&(oo9dhsyLGCTJ>r zXxK+{^z1Q8JYU9i0lEG=yDzZh+|RLYEg5~ww@nV=kE>o7ivH#QLntsxE{rRCkg`$C z0%_ZM5wCH-wIZgONNiI?X{MNuDX+gi;WoK{3dPj`5X>i3h+P9OSerm(Iw;9{U&*k9 z+MQ@F>u8;(7Flrn9-FEN0IOHpT_U!S@YQv7^80bJ{uEO48KmZuHz3nNdp-qq-4h7a zHTR>-kW~O%cdJEuJ|=d6-P$nCnq9})@w!_hN^XE5Re14!kMd(1X~r3Mi6b>&oS!Cn zG^XNFH=3*+wZc0GEoFw!5lDy{wRVMahEXd0DLbD=j6Xs_67jt2avZod7bQ-46G?VP zQGB1c_EYP?q;#FHYa^Rk_ZEX}8QHHF&?S^3(A>l+kvCaSTpyJG#jUh3+&qE2hf}iu z)gk+ruh)+b0s(=*I*2K?d4S+tHV_aSSUncjDefN#lmBwXuK+}Tgi7G8PQKeV&KYknFUhcNE1$Lx|7)Fn@sC&R*bg7E zpBI*Y$!>;uXoL73cKq&Q2l&3dl-T#|w4?0)JxL?xNtpi$B7kEwWS%<7X1z18|DTUy z^T)7x24#{{muBZbt-h99J(jQVAn3eb>wH6*0Fi-gug&XOfpFwd#Hcp+fe?de}9oudDNces5TA6+E;%a+;!(#ix>PKzc^HXf={PDIdvm3Q4 zgpo;YtYqSC?1_K^6mZE?lE2Mf$>*-M1>Eo@V)_Mmzu*R>E5Q|$s7bGx&=K43U=1(r zZaUqyjz>Fd^i_1~?pa`@WS!qhHu_=8u!ZUa}o#(a?XY%J0Ebq&;K z!Rp`Z7-c~RSbX!LbRZ5nt9J}8P}SW@P!K#D1;$#eP@oyhKedqNQZ{lZJJ4nDT1#C2 zsRyqEN#LtoKNwx8(*d6yBGrHcLCkQ7${5511Gr}dBSu=@Inyuf*7X}(a<37HJX%_5 zf{;%rupYm^M9!a+L;BCTKmkxtND#1sr1jdwd#!KF!PYbeIs{*Dz*LaOw=$};n7O>0 z_@6)^y^LCSH5ybkiT#K-rZ+4qlYD>%Zz*A~#QihnC#+}k7WzF1+@s=R`$3bKqe9wV z-LK7{NG^f*pkJDXwN93#evE0znQ6e8X^4dBvdfS#MY2Nd(h>G>?$`Es0ZMxuzozE< ze&J|EBMM6<=6z}d7gKp5aUwZGSW*!jPk}UAByKd>y!S#tm`)fVbMBxpwO%;jC(TNL)SjzT20RRf%jMrnA3vwqY7!6SY zU5h00F@7feGW;x9f>Ww7e%XD5T+|Ee4#>yUqOZQf{=no;@(RRA>%m+I;akC zh&h3$j-9bzPXEh(0xeFSVm!(rGMC@JXZzoO!}h-WSNrPkFWOr#<=dN;3+%tvK4}{s z?N5uxT~@^RP^Or;05r%EILs1El<8<*0d}&sNXC*+YhJK$5+GhVzBQ3T5{jv062BAf zvn9jYS^d~P$oV?k`L|EA42H}M1|kM7haU7LWC&{OMsT#SVh~u-Z~3d#iaxOZ&;G?O zI6nci8f@|OmNsvkgl2WH-PCN*SyNAb11r4pC))rkSnNlx@g{ue#r0^FgcLtGzKk}2 z54??a@M?$yg0dl~P=<*#ct^NrEW{i_bHSwg8%@Qa9~s3FYd*Ec%@msVw!5!tVw3xf z=EA3B!YL76g#62Su8&YXh8+o(%%R0x(V8s38qxA$A{ih3RC{$x~< zc4R+7xA)`h&YM{Bg-v}4!9HPl8ie93g?=U}Lxz2kCQ$cGY$kLfi;dtouK%kQi4 z#F2$akk;1ULKbDt1M9h|K^7rgj$Q=bbF1B`U)6!=v;d}n;Ws5?+tIN@{sDpVl8J4t z_@Q1*&YfvryuRN4{?1GG<=1agGGtT7p07a-25lcYU_Ve=*n`@C?@_`7>UpP*v+Dck zZaaER!yta73b5aHonUz|&)2Zf6AV>3c>>;XoV4Kyls`vKGVSvSalzRb!(I>745Lmm z9Z(`6^~P#SsA~&&Zq9LT$V?zEILSjU698sT8(9fn)7gkdCj}0IHDV%64?b-d{c`gE z*gsGGo0o)_ATKyhf@J>@>LXw7v=iUbK2OKccak=I_GkOzo$dA}++=BT52kLkw}KIE z$x~1n2W(~uVsIR{S*ea91UB;u6KTXP<|bI2NI|kdH$^G9k4A&yR1^H%|e{$NR76qMO`Ae zo0<=4R$$;nm8?2jWSMsEsf)8&Tcr)Ze{dfgKHA(!n#Nq@s-0fUUW^X1`G~@ zCkvSsFuB z5-YS#fT1c%4`|v_s5)6gR~&NEsdZ#AS#Vb6K}*G?Yh6Y`5-^O3=w~-ymCj^UB-C{5 zHH;rgCX!-BJaya9UZl{1AI?)1?g*f7VH!X)Di#fyNfqBX*^9YaTwcFfmMzTRZ;v1o zo>4+k61Yo4*_@Xk7C08PF^;MHUA(z(6G7JJ|#HyCd^}URFkz-%x8|rSKLQ`BdU0q6{DeOp z5|Q~4kNWd?6IBo7>7{a%rq5Bro@~{vNSpaFRLxo^=ANq$RXXl=tG^0fvtsP+wgTgM zfzP2a8|7f*MzSMY@!ok8+gWjPM_c>&NPB0)eB1Hfi}pQX#8-Phw%y0Rw(k$Hu>9Z; z_5*80_L08aOQ~}on6#g%qz6tgca7>t_K_0@8S6xc?*W#LE5WItMvF&|^S{;%9!I|< zSP`nIM54rp4=?pxh?5xl4?}u~+0_r$@S1?O86Sbu_-gXNPe1?D&ak4u<;(#sJwHT7 zG^h>bv4;W31BZUF!wiZ0@%v9~=U>XL^tlNYR9=03S~JT{ZE6dK^|wdvL(d#VNg>d7Qn4kk z{EQ+cYs%3=Kr*CBQ2B$U7u<+%L}jk})S3?or9#e+MWFER%X#_xyLnpGD? z>M7<|ps)U%@wC_tT<}-B=t63>5&dmIbHQ zGP@DA2HK5R)2xZAyEzSt8m8eIWwgqnRFdx-)S0c?J?3XtVn=Tri`S_5M%1a}nv

AHn zl(J{A6lD)lmN4om`_f-hcHuAX060hSkRSPd^FlxJx3=lYz$1_5^LB!39Ci}&mvXRl(w(*l3=Nh+ykc~L6p@I{o!rCzOj`1#f@kg9cV1-d@ebRwmnrB6cG|w< zklkHmSOR;YK+1~J)o_@2iQp-yZRl~~{)Xes!8*!AM?I`!ks0#@wAlPOBYAYJjmDBZ zp9470h`%`C%u|A8lhYZkNxwu#9%?ZOKXcG0P9CM{;*A%J z?C0q{FqrZ>2_NfLJ~JB@~W|g z88=zUlz7WQS2g~Qc3vnsug)Or`UsmtSAOnhIs~65{1~Auy{alcE+Sej3EF~`g{z(C`=wF99sprVc7k)#hI>W{EV zvj7l;K7;AC7)i2F?;tcM&%5}9AE6YhCWQ=Ij1mjW;x9?jMHD(6=s%Rrz~E~r%#+uJhv=dIiu zy>xVEM#p!tX7xuiLi0ZIrrm5vN`*bO<*+?ewi^yZoD@i{gg6i;`4%w;lN$MSU>fR+ z=?bZox2-n{YBQ14&BK&mXKp)acec&u?RO(m8DN*4A6nw*G*9wp&Rk;%VRlF>4IGE& zCHu0JCLwhT#PMcouiPY9T+=2)twnPt-8DpiRkydFmqvHaLo>~+O6FXqZ$&2!$(ck( zCW&_=0;XYmF8K^7M^iOFnJ-*>FJdKGSI&FjBIa5z{oFfMMy=k#d{E?9k$tQgHTe;D zkG6FQbPa(VxHHhep(8|UgdeJC)!@f=S#pG@WkTs#)o)!qq`?^UM{^aIB(gs}j1&9y z3;!SJ03QJu6fXH+43=_q`8qhg+6b2M|H`C0C@fM@NV?OOrLmc5_Au6^QkN~9Y45$Z z)ee34fgNB2%0XmSdk@m$bYzc(vn~772~AE#j6?Wv1fyr48R-;_74cK|l(UIlR$V!gi-{(DuqLoh`8$jxCL`XCjJu)c%YE3farp>##WTU zi27k;eWQRZ`m(Dg+Ti(b+1RBYaT(ye13~}|0X5(E-W$24W4myqCU=5y7epC^ji;$%hw4TWbbwAZ*A zU6Kn00;oC|C`{R49FKH+d^3MoiP-^`c+YM2?D!#8l#H|_T_{L|R%7=IWcM&D&PX0# zJ3 z?qM<5XRE#Q?{&1&-FzOQ2#HrtpL(LA!hXGE;?20FMmA&EeeT%{^&2nBvlD`lI@J-N zK+lR7`*h^@&8z-#o1U`NfAms75%1uFVmMzB`EW@L3ewwK$u+q2_rbMBM&{-4&` z-~Lo;Z@pS>J3fAgq3GY(-u+}oSr~Q*`SVe_7=jvK5Zs5=){@!EnnE*xu+50$Zk8NH zDubX2Ug1nawv%m&RhfDC$u_xOcfl$Z2DziUR7&MrEt@8I_}pI<9$!O?@7v{jcm)RDXfn>QF#J zAwa^)53EC08C_YuvDZE}`M%cn?AZPUfrLCMeAGfdTMbW{tIr$AhsNdU6y#0f8LMD8 zv1{?h1-NxZL~=4&L&n=ZH#WyKx>#g%PwzXLElt#hy_O{vg3kxgI)j=;qtW37-dg=B z{n6A4Yza@UXeJ`2w*_PB_O)6K$i~D|GHQ%UWStj2LPVY{LJhZx3lF?*&hXv%2BX=w z+?P|+#aaznZS$Bgl+Lb`Gy;rNCM%>-gHb{?vjWDTl1MFCsm3}B+#iO-Cq6sHC77iuS$vekz1}mN?{7uqDS4hm-vr`s^1mrf%TIZ^<0Yf zrwkgkhNR<*PxP}F^PaNzkOqA4(I4!yFQ@>KcRBi_-u-8 zdvdVlrgXNAiEXShfeP{#nQkeU?5nzpXBH>lVGBd{JBe$#6z>$9n~MA=jXj+YjXIFyfd|<&)+_C#rXFY}^ljtTkgQ~g z4he_HA8cm}$Mwc?Z?~dQgnp+j(FdL9AGAmxG%uNRu`(4vDqHg{j<@S?;`7&3D}5E4qHjimj4>b-0g15KTCk=w zzcOaO#>4#bQ3;_%e3I4E3N74F zWjjkop=s5)k+3TeYTMxFC_9N-2acBt^RC9ty z4mBg(LrX;Eh=VOS1q@jjZ5Qj*+yd6At1!AYF>sv+ZFtu2Y&yJLt~YVp*EWHPy85H~ z<5EUx%zKzOhrM#Ose2Y8Mm5_p#2q7-zG_M9|6$GBFXcTBvg>1SwVrnl2jSX!U6#}& z@oXMO{;a!JnYQQ6T;}QKzESsKb1je+Vg1+~F|$lOQvSJ&B%Ew~+p?f7)HA7sGrdPg zHI(`pdHe`H;H9e^<&K}zec3viDU9()U($W#J-D9pISQ7bJ-eiUN`r#Mm6K>FBduJF zyDouC6wMfDKWtk}JK;a4ohT8%rS)hJ%7R_Q#NQv>=QY9~P#^5ZKkqwv(Dt4X z#pZ`v2Ur5G=>T%PHA@0(hizQ{>mmK`LxXavowDc191&iwa>b`YjGIM*KiOrc_^p%t z))^KNpT?NO1IYF<7jV}Rl*xyYP92~-YWIgUGrwg&{;h<5%&AtH)s1TTT~?M%vW!IX zT1<9b3Y(hnU3pN-5VbDSHNAnm>#EaoZEAb#({_YiUx!)FwR+iu2^%TceaswpV$ri) zGqZu-wz{JTtdx1xBNLZ>WJxP`*!2v;6GOiCs$pb>rKK5zmIgC!te{t(=(oIcK;F5L z9+VwN#$2etwu{{{Y?V!6gh5cUnHnRG)ts79bjzjUy07RMq%PLcF00$i7LM(JT&@cr znbPy5)|Q{jM}=gsb?00rhg}3&p(ClS#Z@A<-ja5UEgCz>QreM|i6W=XA8pWgF$MUe zZ1*If#B9|;lwP@uJ->7tkjo+y&W-Zpp5(en4M_?(^}h^EE<2SaU5_xS>+vo7tz}2_ z#rlnlkjd zbb3R09|gd4#k>qVh$H)o=7F6w5A5CZ9Z4*tL5JAhaCoonW@*u$BYSPvF^-R8xTiQ~ zcF$f2?LLb9hgHDGHL5%xn(F}(#(upu;53eygw@Axmd7wgL_!h>ovt=U%KZ$o-it7B z_i=LA^e62@gY+GV^^a*vKKR9-?CsyJwZANyh){>3mEyU`6&T`5H$?PL7^eri@B1ZM zh?gNTb-Tq>rna&Qp0q5ngRM-y*V?1qtAAcAicf=V1QK9{vr0s{FJ%g6C_yFKJd*Ev z1aav|G5WcGSlm_g;s@xWp$lBYs;jLs9)-%Uta}_Z9a3An{*nji{Y1YUkTJ?AgX>c%p~|bS zs`lG@I)`mzV_GI{|Cp5u_lC$Ia)8-IdH2yFxDT-`og zbGlsWRHXjC1yOxk4WC=`mTzpr)^Bax=CApa zxOLv_R5DZ#0U`p3v&U?n;2qTelJT}`5T58RZX9(T&rwv^O7g2`^%8^8?WgI)gUI%!Au$9-2c4m z1zF=wUY?q9D}gICu0ED-&i`ai!D#=%F^4u7KfrkI^0R~Kd5ScshWQqvOHOx z2d!A%2rO^n^B>v+kN%#EgS1F=KiAT=Xsn$A@`o6mFM#)r@2YNuqSdDIfbJ+&0*P*l zH7 z4yA2P4vlli;(UOtR^j?UtP8^gQhN~O4`qE*u*^rdA7Fv*8y0bKKdTJ})ngt=(*{g@ zZrbk+?r<)pu4em0f%bR0w%^H(`BhJ@qv4~ofp|IS0hvcz<>;P5m zy_U+n&J?y@Ct%@8{N1cdwkQDznmzvz{kSUagyr}0g+7EjS|uJY+Jj`H(M(Tx@=NeF z*{-V7)vk}b--2_|9!C~(ZKzG5U?NF5B-%Arms@Q^q=J6i{@n4wiQ_|gC)IsxEbp)W z`?4wbe*uY~Rp`%=#3-jwbfpmD=BfLc`f+ARdlYt)L1CzuH*L*--@0lh<(kD9-#EQ|B(H7@Ca`50B-Ui=_k^}!2|fOn0*vr_ac4U zePXxm!BZZj_Hz6ehS>b_Pd8ARqYROem_(G?p&2~N%^dkh80#5(zk2p%;P6jB(=vl{ z>1L+nw=HYKwVaFQdB0{bco{4H!S2n^zGaB$(vj4-O?v)<+Pr*hLmtF zj-xOISp!Z4BR$((V++$5_lT?9$OXNL|Cc58wC5*uwQF!a(R9p2x5#1+70p)^@kXLo z_xR6~N&$H*c`Yh^|FGy3Xy)BXrCeD(EGBLkUXm+Mwc0R$jn_q~d#bwWWvcPwv_1g0 zNy7;UEzj#k8udZz|M(v)Z5dbG*&Z@Rh2zou&7@iAr7jw6SDe?{THV;s3No4Dm426% zC$)ueQFv8;Y^~dBX{s2jD8dFjW9;&=eeBsm_t6A;uhovl3a%P!PplwzR2p~lAsS47 zKv+g;1PbU=YdqG>KorktxGK8pj!~wnc~R;7KZ8_H3hh0YH%)^AcV{qNZ)6?l>>82< zrn+?#CqR8KEt}992rA(T!+Q8?JB?G&c`GTX8*ZRE22Wb&d}P4z=_vY$o?5#b-i*Qw zq{!N?rGsCy%5x6^D1JaAZEMXy*O7(1M02NUWuo9FTa}%9t|>Nbr(@_p9>4r!>+m2M zz=;0Vh|lD_E)yLShgB0<|ZRk{^b|j&%b>f2W7QE z1)*`W^`po&j#Je+c8VSt-8*`Lod7VA~GLHiJH^x+M+R&EtEZq$A<=6NFymV!C7ur{an?nSrm0P z)*i0f-7WIM0XBTr8(#Ti{Vx@ncPPj3jRb{aXYTR z3@(RKKI+Qq4;?H{sRHF3|49cE)%;cBB*HtB9%Q%cxWdx$7=FJzJZdbrzE zBFN;@uWT~*F^!RL&T~_Ffblihv?{J%O^Ka?b*uiFhDb_zorf#;TK(R0c;Rli%N}-P zeE<#dXCow9H`CqEK;H`owEo zw+HQ!7r~kGFKsF-m!?qO31*fYvO1Y11fD3&rW2GV=4+Zfd2|AG8MSPB1QNMyDRkqM zmJ>csB$+*89wVx?`;k&{yDRG3LjwmfCh|^XxOcg*yBN&RrCz;W_Ev3-3%UQsbqy zKKBTvP!(EyZe;DF%%_rl%4GGw2rqr8qP|$05S>VZ$Qy%^eKKk!N`i!452*5__@=&Keo@`ddYTff6hvu9!7vq#1*I{EmA%~^bpEe zs!P{HwGti0i5<&k3%Sq>$g5QHWjIHk)Q^Sj?X2#3JuHf1WV69*FdZ$2{2O2Qn+i~? z)SAO;! z`yC_u4Gl_cPEDu5H7Ey(PtU(*yp3J(jwKTNp5uY*jo>O&&r8n<+ewQKBc5()J==`6 zlF4mI6QO{oKfRoDkeAVl5he8O@sZcK1sA1(*6X-CwgeAdmU6dE={>~msowy*Kt#}R zD%G6t*$YNGwFGTt5m_LXt!Vr*28waGBi1D5nr#qnxj{{9y+Cew`nG*`Uq%JmMD$>A zkc%!EVJ)dTw?ZoxPL4I;(`pV?OANOah8td&adwM|Fi)aN;BK5@pjI0A;AAji}kr?~2J>`la1Ecr~vMFFCKfO>EZ)J<5Z&k&%R3X<=3&-(?N!Q%MC$ z;_E6jH(;;Aoa2&l&TB&#;aPT@D`R)&yi`Z7XG0WQrDuCahUy-Asg7pJcwPVEM?vN8 zEA%F^rF#o1!;d=#q6>AC2L$9Ol#P)hNFBDq^5Q9X+1BNcdwcpv@BY~i?EVaOBmxE~ za&XTP%y*A0d!IXE%=ltY5WDrAa& z$CRfvx5`ZV0VfW#w65*2+5Xhz``JCo6_&F6OKkf!^fiB_K|q(sD5e|vfP^&dC zSl7vO-?s<~ujg?QUPm^k8JBV+YL*&G(~L`-%*uq&bsM7CzD6znrbPTVBaow1-MOy* zP`9{CZ<YM*&MwVPh-UD0cZ4XS^ zVvlY@5DFJ{#}Eq!CxAc&p!rp4Sa+6!t|o;TQL4uH!gcC!~L-oAt*R!}PM9bA{z zluHr>@LoMP;~J0dsVp~gm#lf=#~r-Wa4!ZqtN(w)#p{BGrGkO&0)!kL@n>7vHemrF z6_!xQO^)7JP*xLNjQU;zy5g)3_R5?A_S%*;_U(JW_jwctHFx5$syw?Xxa?)Dq^y1B z0hAhn1K7OJm{Qb>(+Q#+BtTy*E z$Sn_iZ$Hwmw(Hd*+rDVJZF#s$Rgsc6jc-yKIUl>vk=-wp@y^qAo#Sf2VmEDF(nV>l zExLrvmtsntgtBxB>q0wDgRnp-kmnYm5-2rbETS}n5e&1(jj*wILkI}F0=0)&50q4i ztV`1-nNh2tg#B^u!O=@TU^|0a!dIf3<=&YjQ4`QJ@Ft`zexBk5d-wU=S-i>7=DvF&D zbk){to@r06!$)q!dMZfkVmX>B8D0^CulKQYvhSeU6QUFF|EZhz+RU;8-jl1kSiR`} zcH@<5u1^K)RP1TuVbT1JstwzIknq*V`^As8CqqsF+%zDqu~elL8&5=8!&5N5&} zRzi0humYIvZdX$dyNCHfYZ*thTuSjRRAF318pus${#+XFT*f?G=Jt$?Y?F>cMIvRC z{mAEgcuM&k!=+*Tw>i4MM!8b(B-EgUOLs$62<@Fx zwZg7g|L>OJx(LI|yRnB)X)zRB%f} zWR@$djLVHtj#Xw>=q@(3twk4Nr6n16;n(l*-<3`3b#xv|d2Fp)b+uoQm0vDSBg#e= zSwbm$_Si8tsHHSUy_s%4%7!qqbsS&u$mM^byBgO#0M{IlYaaRhdzu zQA(*mJL@s~?7Ea{BW(%?ukp>H)U@+(u1y~U?RFY12i?5!aI)J8cFpB7)d#G}-OpNL zE`Ph)RJCwmJk#dmTR+1y`q{0Qw6OHPDOL_Fl`0ossV_87NTo<)v6GM@m5rRlgg$nN zy4((2@ic{H(Q^~V+2Gq-GS0C(LanaWDXq-rY&&L?N>L_LbHNzG1D(CkGLs1T{3*06 zWTA9Y3(-`BRgd8lpI|aXr$Ow!LR}U`_4~@p$x1hbsIY=f63C{QYh#cryNT2m$|tOq z?~RjvN-QZ?G($XLfWm}nQrQ6P%!VOPhe*`wgVjG{d#sx)W*$58z^N*-7h zD)9xaDILUUXNe(wu18RvtBmRoO^g@<6(6?xZHn!$^R@nkh0@8K$OrAV3tQWy?&+4F z)ymeu(#Y?_q6_h4055x=P>_dlY5V% zWT2t?AWEtIxYTT!Wt0?J=I6 z(L_9jdl45}pMjs?eb{<2EV~nRFQuU?)8| z-dbMX)IW9o1{s!7%-(Kv{0UIuWQI60!|jKvQBG4yW1X+D3mNnksf3it=;TEehb@hc zi#qiN`YE{dqM>%Za?KpIOH#Dc5VykMQRr$NyZ3mDsq1J%4n=}&^=^p%YRN-r47vbw

o*hX zrwAKK!A6W4`pPoy+7yyV`%efb+{H3o1EZa<0wRihP%fr~Z4n;yKksIec18I?fJ4#7 z=%B&G$njCeuuAW5!uYA%o5bP*`OO)B31=pU>nWM~h{6@j^s6LtJ8d270 z1tEP+YDK~G+(-$7lJ)vYLKq=cLanUOCmHReA7lY^z>{bf>P!}lsRwWxP&FE{Z`2Oi zErzcFpLML)5oi$+)OJK3TS(4CunW1u{|4MtP0a6}XCAjkN+)VPC$AM={g52vEV_t} z6Yv#30H*&0Q6x`DV3k5qxg3j5IiM#C1T}KE(=h3yT?@eKMI;9> z)yKgF_Oq+2a6|n7HNJ~oeak|t-t>_tUb*u%DGNg7`+el(e6lMAPsAly6|7V$_cZcJ zP4h@9C!Kxg!*n2FRZ&LS0g}eO@53*o@H7qMKm~I<-h=C=SL1Vb{uhTcl1Q4xnz-&4 zGi}@9|FVsHJ|U*$Eqj9WbGf`6RMzkP2xvOOXm+zK1{!c@o>n6z2gE^Tp3~}9nrGVj ze$IQlf#w#T2k*yGX;4g^S8}YX?oQ5cCj6ATWzgN4K7JUb6H+TbvPtA2)#B-z@Z?K2 z1!ZLd1e|h5E0?`%{TESMhoo08@GZlvQ_<&jCy?9&>$ERs)nFoahBxfBvac%Q?^kx! zRkLi|>i5AurU8c18!z=o!R}riw$)B^63;m$0lzdz0sn0aciPSKo_BivPPnUnaw^Os z^$qT75Mlj2?%NJn?cmBs?QSgIn{HpkRWa63ygrBGbwhRs-ntjm8#w}S7j0?qhG-&KJxRe)G zwb4hdZ#ho@OcQag^%9)BWoTib#Lg%Am1!}g%r&grC*k}qlA_!25!VI{TRV(4G^!6Ng0eIzv zUU?}=)6~joYmnB$kuKC>ndhne7H~v9+K!Tx-j?Nj&*d;vpOLgQhFX z>Q&N?LV=T~jwy%C&2ri2UIU;Z%O~PR7Ez{LMP^?a?Xg-VEsI@dT4&$NWg5V-9MGF3 zS}Fh)YtZsiN9Wp@9Ko#@eTT2Rn{{kA$aS<}itdJfY#iY^bQq|peHO@fi4K*q~r znL-(iV4@NRJHAZuL&zk_E8nF8B>xMLHVG4K{L=su+>Itn9KG~y;N&Q2 zn{m0vIMTQ)HeQE2cp}~9{F}YohRg@+t5AzN^1~B1Sl50_Z2YI)~|k8J+%ENJpA7 zgF*v8R1~E&%UkUHAJ!1QkE4U!i~bKDgM^ZS2~HF9>-qG0$ABCXP1grpe`g5bz}rWOZhLrk$UAzB2UhzWvb0@*|nHDu||MJ$q8fsM>S;a5T}?+?{##k8CtC@(+? zLM+94nTrW&blwWp3IZ0{;Q2_Z8;BRN3pyQrYWaq&RukGK$~+gwt-$xwv3|ZV&DNl9 zJBy53Ay}FVSR_NOa#R$u$VFO9ZwrL1tm>RuKc`I?1})m)>=I{s-G?xb{je8I%tMxh}d99`3Q2rp%lf`4o)FeSzE%A z_n@6)u3nz>X5g$5fDx)D230nZ;l1(}`8@QY zMMCAAP`OF!zw7h~wctaw9~&^5ITsc(Nv`^+NYEXB%IYMEh>$5iT@W#)*+p5XyGT(MN0A*zxU0jQV1M3bJiE%ieB)IN z)Z45>qL*EGDdD-Zfd``cYpDN!&*LAGYWgvgN?{I?Ml)d>fbV3z$@5Zg!s%O8UTFmzd*r4yX?04&)Xe~ut_!7Wmr`}xZ0T;MqS>R$Qq&Ek zoXh%yuQK8KYeZaNJS((f<#EKx%43L=m8g>#$Zvzmf@paSV(fNbfvVL8D+SE%GA;NI zd}pD!gSrHQBD{h%)aN>H1&fvYKIAg5*;Xbrn~5oU-uc%#+FkaoIva-lJZ|O3o+qh% z$)c86fVVf|*=U5ZA_)583F)JFw0@LMK@|tYZ|8Y*;kgWA^Kjgi*LGRR$qButTG&8H zgK_IWu%R3d{f6AEMga|m3&i#GJwc(>|Cy{rUff0D@1Q3q`@F1nIc0QVwPg-yMux8Q zcUX63?i`HMrvLQqc0R737{G6{t8Sc!8|Z`$rTU@7Y~>o5k7dj?Om#~ohE^_ni~q#Z z7M&TvIN;jV<#+Uxy{5P0xVJobGsba!$_ahf=pOoJWwrUI?Hfwpzo!*B%D4A{gYK$N zUih9rdapH;f~C3qgzsq}6NdsMSisoxSSMiI8S~f~DM)tZ$&ht3!g9g9E99)}zxs5L+6}16!g)zJXDVVsR8PsDMf?2K*R`t-GGmB~>!^qwL3oyy4yHzmS>4{*H&`FBFO;83rg{ahN!Gs^L9G6w8uhz_>zi zp+Z?mEx*@^2xlI=yw^&RqA?L6hQf7t#q%ZAQZg@!`@43|I>LOH?fkv%p=?0oy_>E4 z+}jXG%>DK+H5NXoS`2TXlE+r()kwyq}j77*2ZVV=u66w67>sSz%0jv|lJwCG8J8zOJd3#*plAge!sR};8H<8e4cTcv zfVBy2jDagC24vYmMm$K%2{Rb>K}LNUP$Ve^A%#X7sF74ljUfFT3UY=8%qP$jib7S( z``|^TX0sKp06HPieqphd%WMOB)mI;}2t!tzf~}!7WwrpBX%&UxQ0Y>h$=z(=S2GDkik4JQ7?K_Vd)W8 z6d$3&2xZ~aJr@z=DB48sb6!NFRb&MHsPOf;jvA5VYWpj~E<)1k3(%XBWraqKKv!r_ zPChACU`@nJeiYxKY%^4<=pQU~h3Xp`q6wY_#boT5MQEik0x2;!*5s(gRB;HXq57Z*Ak|SaX)AYktI)mf<^u@?8cIJjgWV=OjX$m#;*9S zwHeQ19J36JdGuo@mL(kJp?9cELY2DiGmqFMeTez!I`fcq0b+a4J55>BT{aY-$fQ}X z*-b;&TKNUTfKDo?e&)N@`8(HI>hZ<4XxA3&K7k>9>5qU^DXqV@pWTwORnPy)HXZwj zfExk=k1(Mw^CdiqLwhm0?~1+5O}39)bn2p1?X{3R2*}3jv@^S|XFFS>Am^A5krM4l zn=GX}D8IO)s?@F|9(pYkOYAuFSDQKgkX`&a>H5F2Oa7&fU;QRD?|W7ay*pJ@=op@v zXY99?Gfo<`{wt?J3T;m&aqKNky079WyOX_@6yA0rR3{h$=9ZuP#X+3=T9Oc}to|WX z{85-S$r9Z9dw%wL(lir{VFTb6UhV^xxlyG7Uy zbwrtKwlqrGYsc&^oEf-1rsD=_#s$(Sr-jH5Mx~%r$mye5COAW~QA0MNfR;$DC?36z zy8uZPJjWu$d6W#%>4YVr8UQM%@vgWffRU!yEEO=Jmb0=+wbaFlz+JVR4QN!WMSWT6 zi`g{lCg59WC8T{uA*-QU4Vf(=uCz@VTw&m2q*ZTuA5aQ#YHPMm5S)G{jVu0Hfi!)s zTkA{vC3S+*TAR!>9RF-+8A0xrET|1mZsiB0=xCeS2HfJTk9Y>P&jx7d@Wmod`H#|E zZxw0w*VYEC4Jp3*E&i(tk3rAEABa#G`NJbntGpf1-{0S>g+h8WD8bRdSUDO2~@C5ie zR3Pid@+egW5y{*^MMKB3anfU-*i=gG^(Psj4<(^`qoXMYR6b{)pu69!V|LLvGMg&t z`L|y)&d*UyvPg>S?2A|Z!qSgFW-|{ivW6XVZSLO9`t3O5%E!Kwd1|`<6X=DmPY4n7n9B3 zx}F4s<$qv$GF6S#qn6))lAriV1dC3sI1~x}NB`eIcTUJbs!hzh=Xc9zIjEM>1*B zu>#D(T{syrt%R$glvKxBv<5MKGW`m$C~mJoK9pwsVjUXf$zgn?_b}*yTjv$oTgt77 zME#d)>mK>g4NK{y=cpxZG`j=s0>yS33hi{@wV4>Y26?1WQk?;1WH+nPpwS$v#o#9f zNKk=MFNK;uH?ePzTnrXiBr1%Vv8E>HsX@Yf}9QU0~e4A9tn;BkM;Nks0~CeRH$1$`me1q zigG}OUSW<;LoZHkAu)yqAC@yhX%4`LnYWe_Y2+{pL7|9J$z^G>k$e!%?wJ*$x=+u8 zt>XA};c3u(oI*w35~R+El~q2za<$YYn#@yka)+BZ1tqzH40K!P%&|I)PG1*G?UxTK#{JSxE`GH`>@ z6yXmlRo1@pu|L{n6JUc!J@PW;Mk)A=Bd*Vb%4ON%3~--0JE=2!%*HeO>!7Kd?2;dh zcj_TgaU*W3AKABlIl`h1^KItNCoD_dvc_WszVAi@IrgYk&Rk;czV&Nv@IN``D!b%s z-7F+H;Mt@90|We5YF)f*OTfX^dzfBaFuG>nM_{B=z9^bOtdy3t)dI*0M&n9af>H1o zxE08sI&lA8hEd7i~Bm%If8B z*(9ieDn(j@Hjbs9nJ9#l{T^o~su*?wOb-#EDKJ%PVpjsY$31Y;elkGifsifKF2A8_ zIo?yES_P&u)T;!h69lF%#!C9Crxq3UVg*qt+a=bG_s7#wbnY{ApWRL5hunpCfVAEC z>jSioZ`^O^{nHSxc?*BH+jnoCZ4;=bqZraYyvqL6M;pmEFp6(sgm~vq!)a7S{tHaV z8!Tu!ur@3Al#C0kE_bx3^Yc z(9FXyG-5Dnctsjpv9==Rg(1ZtbjOiaJ81NYW(=Og;NJnSOZ~ql!VjBpQa1v$IW8bC zKm2D7vz$F$rNX$UrMLj#5`YPT+c4C~57;lE7TOx873?GgL|K7NUTD*-7K$P)Y6>7z z1KeaG@MtRWuGVV#3+q^k(kvQNEOKez zl~$m=vO3aR3AO6|96E0styZtDwwg6HR<|x?sr6|~Z9tXHJQLdana#+7E&PzJ$P*&F zQfRK}O_4Pcu+^}GhtGEP75{5r^+!AqX}D<5qB!&v;-AfGTRjv#le7Of@Sy9(f;)bS zeSlf1w~py;7!gF6DXdIw{m<>fR^jCo`xJLp+z$e#5f7n^3BWTeja08sy?8M70U#7( zwKfgnPFI`-0dU|o4U&lX5=9u)d(=h9YNKLWV4V=yo=c#>F(Uj3=Tob#w`kN;tf~1p z7S=H$*R_?tW>;-J+*DoV+NXiq?!sJYxIw-AYnm?S!VveH*n#X3ggZ_-g<>fFbl!7Y zZE$nmI(!}iw&Twja{RBjg&O_it?#JSmU{RVo4yjYkQuOR34WN&+|`p-A7j+7VKHXS zDTY2EaM_3@?~tv_j3|Uw_CoXNvuLmN!gtj3f$h+%%%Y8lrxMe2a>F6Js>}UWc24X| zOLV#t)$}KJ)rf&M^O;rFOohgV-S<)YW*YI2O*Z9FJqg%&2%q0*Qf!IH(9?S57~xoe`n6EKTsn9Rdt=B929bz)N}@#)&QRyn7WFtv$R*uQPxH&g{t4W zhB_wej>Z!p_z^yX*;(o@iY#;A#8Xo)->VvE%(;8~Z#HkqF}v_fy}6s8Sewhn*|-@5 zOs$2sh9DSCf?<^kNLQiPdtgIM8A#6*0`~{(JmV7JD=D;Irp+<97yh{JFbR_gD*f88 z#L!+3L*B&(PTOk{4_f-LG6=vwFxb<01j!G&5ijVi(Ddg@iIyJg8BqLp#-MW#!t1(X zJM^Y7S`W${4j@iU5w)YKzkTEQRoDrd?&fAbggdO;-79R^0wx|KZle3#9X9CUqo}bI zF=C?g0`{W7x++`5UisRJ*c;Wu+t$nfohU>~;?7XZBaBL29R$n@zmmeLC{cm32m<*= zq`*pHRXdQQ_*WGLH05MnVac=SyqjNU@cTDSv288HCi{$O@rL!DUe$Y zZPWiC157TE<=-Rah7~)q>CZABsQFvD%WT zTU#5qf*Q4IS#(aZNV74unj_ZG%U>2$uUvj2ZwRBUubH5ecS($ECJ=zjT4kc?jWi_V^YF5`$iDLsl;hBh} zXtef?dNiygqiwvREj;bivpAfZ2)M7`PF5r)1#0K{$( zce4201HGm;jhJNhe2FPm>eyVz{}k^QTAf#&LKt;QA+|C|m-N;Kc7dtpe^DLC?F6Ks zhx9^42>8UbpJcm>dkOxEdI%eRWLlBoCA+It&a}3Y?omK2Mbhq}x*1RM{Cdcbv(sf# zXcXk^Sr%G>i(`a|!wXf=3w|42T`|$D5cfymo>Fj=%H!1w}euW$;CkMX0!g8f9-fEw_Y?NJh$08dQ?Xvtsu`~1a&Ilt6k{@`xU{rXD2J-~{tu?wqmS>l!^i$;TbSAB8Dd5@zvSB`+N&O~rniR) ze@kWs)jyPfFN-2rcj!;nZt+vE*cZPc-2b(8;>QkIKxy5j%!0I14+}9iS&Ms~fPPn` zTrA5ZXFg5LD4`w6FZ#QW=8tPv)Uo#l={`3 zuDN)YJSLs z@VJqRN>&wQQk*bClk)iVm=!)fPa%F#duUI$ILPdVu9S4kNespQezk}{288evdhpkI zYALo@LB^7NB`H^se(selv_1{#-m1}0r&|drxGG;nq%Su3d7xd*c}B_Ob8Wc z2r0dll_+YFD1v@LoT!yd(W(Qv19fFHTBKQ>rB;(#VM>@DXcvitgycb1aw4ZzPOT1- z7!nxTE8?u$qCRa@zy7;asireht9@$aR7*=Ft(ZbiV~tIDY8+qQWbf0qfW9EZ4v7c> z<*h*bN0Mhj9eX4*h!|f}!v$8TQ`hTi3EgWD@*~QMLQLI(OS4+eT|RZiRPG4_>RCjB zL{bXb)V^+A+A^#~TN*6Ie+jE-b3HSuf|6Ssv6GNJ>a0*J%U%u7p(i1#WI;uGh?r3U zVMaV_$^Wz-w_ZW$DnU-{dZtMJV<%!y$_;Q%9j_`anS|MuMkc0^NdZ!?9$C~xI$8tS zagk&aatdWd->c4|kDyGSgG64bhmQw!OLk8pO)Hj1X<0}q7WI-vxVaeyl10urxm0qW zX;R`x(kH9n6@00vcwSgi@~6Hee+ca_NTN0kxSAw)Bt1OAMOzS2xe`C+=>tWEU%ZqA zjtemD*Fmj%YhiJxHt<(pG=6 z&Sp^RvEli-cKuy-*8Z!qnttt|rX&hkP-PW;?Q37JwcC1cuqn~+EH&qCYkKfc*1X~` zmS6TKOOsR@t^EMonlOu}PTNqF{9zBAwh{NeMBVe#)~jZR{jl32>-3eOpcjgG66GIn zWTMm6_8&K*_^f`w?%liGrXgYS$00aLN>tEgdd~yU!1FA11})@th<5q}Zb|s*q@>Pm z_MIO^*72f2v^gjD`K2#hZBr&Jwr4S#HXkCFX5Z_!>9}TfdjoIl%SfL$Z5{J`t~pE? z%3f+o?O}Een5@|{hR#(j*j0N;4JHd`-GL8?ef-d#V#@YwdZoxRK55S!{)5XT$tDS! zg8%hx0$=vMXB{>i{BK*l=2iRJcSdqEJj9Cz+l2fX8?)vE8$vy}s#Pa!tPISlc%Fly zPkw~tfwFhWQz3_|q=E!OF_MrfdJ;RhN;>wMOVKF^`hH~oN~GUay#+65SFUrdeedUu zOkw<{O(kn*6sMRVx4yJ6qkFx3G?h`3P%JAbm=q< z$)mW$+lXPjljP!iW}UPzUBlQbJm=4Re~gW2z`$C3!UoJ#$%frF;K9R)k>zhNrO*>t zgcwY2M74?=1ds~Fk6sGFIRj7# zLR2awW<+vHut>~E+`z6tRJnO28ml388PX~jS>s&IHmDqFr_GGYHq$Vq^6)Mqc%*xW zY}Hlx z0{p`IRD?*iB#cBskfOJJip^>5x^%K-mQBIwS7o(NPqd8s*cPx;phiUw84+>9)bc5Q zM20O|J5Jpo&)W5(c~qQ z&3Ad-0aSd-TCLEkctMR2(SoA=5N!k& zhzx}06K6n+umM^T=Ys1itdh{cs!~m<$RRlf6M--zEK*sa*ik4{Y9%}kBu|alq|6`D zaKr+$(Q`&6#yrE<-7FREr6zquA;yhJDP?UENKCaJA0E0O4L?K)Ii=g-yH*S&SDrFESu0xt(fCirEG+eP&vTtG=N?f3d70ap-A1H~|izHaD z3#+p2oq8k8dP$feY6g-(d(+*IWA{oUxXJFkd#P0u5UZ(5E18;LBEqaxIngJ(lONq< zHoZ=w1Y0p^NtTuB`*@*|GF@ARgA|}2+)i+2pvsBCVA26DxD}at3l`QO975fj_t-`M zG@Mr|z2s*5cP6$SjchR?_26-0@n7{h^+rDtCviQaOJ{ZMr(C)!@v5v+ z^-9D6H-V{wPZ;;5vqRU6p(6>SQ5riqX4Lya}8TL^TltqXi#9gS9yvh!+Lh-cJ8R9k#w{Wi3)=bNpTb`4Lf zj)z$M-|!sy$=i{LG6Ma5=rtt#G~ROJQfEu(wDqDb+v-)SA#p0XCV^Kgaf?_D)Cko| zdKc#ojE13H!k{d~Y(RDbg}7y`NbuNhf6bu<^t|E0SS2B%l{^ z_ma*&d#o%%PfB)DFcC{Hb~{IxmJd#zHo5gALRGm-wxZ^}RCSA&D#GIBST2&sT=KI?)f_>(@VV(Il{g+qEIaUSKm}DKKhiyH0n)I^NMDV9MJrJkH%;~yGDYU~8$D95yuObiiSwd^VB8PQJZNH(f3(kaSQ zTt+f6M6{_R(8&|JV5mDu=r&v~$1UA^Lbn=7OeVGJH>cg&>j3q*gj^m=$lB%n>~*}k zRfK#jl_*|WhpDy}#bX2StY&qJk7pyA(iXm%O^}K;YtnW>E!$J;3HYP8VH>iDJFG(< z>orI;>XlUUjP+mZdR2ORMa@R*v942miM-*!%C&D68#ar;k4tfZuSBeIl_5D6)&76X))m{nqN@cF5Q z_~qR6*U50@(h`)ClhiUo43=7$jtI+GcB&OhSgMbpa)e}n%Gw|y$pAzKNi@1x#E5L+ zFvMcqk}wP!5ndRUc*!Iy$vefHAZ1kkbH(sgh!7PSnx`y=(xVy)6bU8%0?EE}#C}R3 zIs=M%nJZYAO_-_EvDBs=T7ZC@j-|;-^T$x68xQC08{v+53~X4({fj8C#tiNU8j05+ zk5T3ug^*=Sq#8zF*kBJ|$#$P`7Wkna6^ zf=dV(eC7nTVE6vnuDpdoNg0kr`x~rF)dp)>_E%EZ747yqV_VrfuiB_5|HM>Mf3RTC z(;rf;WbIK&f!AWMRU3(dvnRyRJj=?ij``8vMUmK{Khjd=u0MB06&Jk5&i&F*tG^E) z7)92qDBw5=a#CUuUKAG--;sF=7+*_fD>IV-WJ zxek;Qb72qWIaRsqK8l{ECR!hggow5siH!c)(1(c$zr)(<$$zf9^_;xH22wet5B}I* zOlhdn9Ru*)$q`qaFwe!{Syp8g3^8?*UZ&V4Q!WJ)*1u9{sgFA>I_OH-wC<7fcoDCR zs^sP`E1S7?GXjnj;|9#lEGDHFpIPUbj5~#j6gf~CdkW)?)Q1#P zDn&EnX$Fbh4S-7o%1vX&s20A_8924;CG}*~#rb|1ggSdD8K_h|{3lIv>Vqr_t4m=A z%I1p{rkn^Ao=_5SL4dsLpjGuNhFLMu@(kqx6Y;B}z#>p611z~04)%?`Jzh^dY9J#r zp*|u=B7tcFAE zAkwg!?ogZ~Y@>M3Gy+Hjqk=fJr&Ez?L>U&zGz)R2fx42SQ0v&yxzt3dg)a_XR(m+< ziSteeuxKM9)Y(r~>S$|S3~5lSg*ej&CsJe9l)glbgl{d2u#QDV&C*Ghkwu6klmROF z8c4XFFL_*)!)n*iS&dwk#MPeOhm5Xye4M2uzaJk@Eb};<@Zdl`Is0<%Werv(SDeiLb<1=`INRzaGONACqH{I< z`YHNh`q2T`2obnxgmMkidCD@B4@qv$J6Y%De`*=l_tRYGaqbQ&o?Xk=rHf*E!#D?P z_$=tsp|z{(Foz-hH=%S%yr(#Kd-Y1-hlu$sB0jg7t;k({6vZzg)XS;RyY*ht%P_;W z{3pmrYyyj9O43wQAr& zY9;ZZai-zB$m7RIBh}NW7a5uS;;h>Q*v=xI<#NcP*XAH|6@Q9vTM`{|2Bni#&!SR` zFjF1NqFj<+WVEEbOyWpfby8fk8hAy~a8m9S73ZWDwQG1B8B}I6faMFNMP8AV0FhCi zPMo4ex-dFMMkI0uN+^;3KU*EeBx|GV0Vo7Ai}U1!$d&1AG8%vr%7tK2XjPPmv|{Mg z>ZDc{eW3A}N+e?+qZ6pamZDhl_*V1K$n^k}iVms(VKL5!v_6$lWX~MQC(RUIo_=gT z+5}|)$5uGzsXqt+11uPs_^Y8^eFSp<)O3675b=!Dh?9m$ z6?gm9tMgVxT5FGa3Seb+DvY$QSZu>E#`?}UWY^sM0F?^*vM1E&+d=x%c5Pm&+q?YxUJdok!?D`Y#00DVlzHl#_9tv zTc@4-{%Cs-{nc)|0gaF_qeSusyRrY{7$3g}53p`YvQk1))f2CxSCi}i8>r)_-lbrU zOzg2T6umUOLSov9ryk6_m6{%-H?cOwc|tUCmx>t%gH#SxbaBVw_mT#j*=C@&sq}?v+bCBzkmop#{~e={T$%LDa6+HnU*Wpyi^HmPmDDAfs~m^AQQrbPz<=J%a&|)?Y?^d*4jnA+Ul~3WedSHfTGJrX?CsQr*eoNW$mM7 zQx8a8kfQ1=5O-~kmrTSkF)ggY$om|NNn*T5lnh!2iX_g@dYhVTM>ZfQ;UxB5KruCPK2v303}8 zFf}zR$9QR0O~yFN2AEP~Z}sRhVv+Hc!^jIR%aE2f>UiatP5Pr^3}X`=s~^gP3TcFS zS%}v@%jMZzQsmziL)e@en4)rf7Karajaw-k0wN9~DzL+ZomJUe0eWP`Uaj(SRi&j~bC zVP09PVxC${R-I*EU#Q4%`}#xWj=qp%TFqtntBq~TIE68a0?WlXMJlJDb7vo)?imb| z3U^C!T)YEN*b$VigTz7L!SX$9_ue$e)lb&1OW&UfAJ5-A5OVvO!p(~3#?b3DLJXn- zVnq&=;b6Ax{w(ncq9ktZZjSmsZrk2IjxZY<2f_72RgPnj<~K(V+m-iotH#()?yE9B za)Q*LM*tK6uY!uhl`i92hUkVLA^8(!W{6=TQpw&vdE9ibaUDlp!kruP`R6Gr^OzM<7u*U z6h$85K#YaNmUn4u!a3Gl5P6aYR2x5qx4_N&unRK`ZqJoC5fOI;%=M&GaE_eOnf=jdm8TG~;L) z3Q(-t+C(RU>ad#8mW^pelw(DSYC?>3=dmtKu#&4G{84yvU2%KHvC25SXe}XC+%O_z|3tl$I+z5sZ{+N z*mN$;tUn$;^EpDW6R$Ta^NlcR0`c_U{T+TTHXIL!p2s(h7;^wo<^lZH2e1nqMAA8A z*F7|mZK8Sq|PCQD85@h`%!BgW*9{ETvo->2;24=~Ep zxtw`F{ArkOF=8Y&kt6m-z#+&Jpi8nyj_aecE``D=+eMv5;N>lf=-y42Y4`j@{`ld$ ztbF!)(pHV4)6PiFsQLbv+jHiuZLf!UD_;)p`OR*K%_!NI!Y_XT@#VHR!!-n4ZlLta z*GW$L7Wddx(}j1szx~i!|GhuLTgR>G#h=|VKqf#x5T@W=gMr7(RjjES}?q(4) z+NjC!Be=@>-N0*VF@cvQ55Q`k?K|s1V_b`v4BM@*quY~@B-?GQO3rIhn_$<`M+vj^ z;qPHYcr&Drode$JVH(I~`#p#3DF(cYcQy8Tncn{+x(G+@8|1hK4u6}DAUrMab-eDE z054@X3Ef12;(?@kxm}Sh-vxTmGf4M$p`+*cnb3RUEI*lVhr%&>)#|(Z$J{OxsJ(lU zWt&w5uaxDltKc2g?uaPsCwIhpsTGRwl^;THA(E2}5z0xbPd51Z^Ph;*Sy7@=zJl`% zd*QKoGb`>PJ!mDv@)$4R)nVLPAI zby+W`Y2BouFXZJh*A)(QQ2RiB&Kvxl{9D}y<1W)cG6ts5< zf=-6Y83;G*xBw^=`OCvX4FsUv9o-;I551~tuK)npqRZ-ckH&YM@Z+6Q7Md6m1j-rH zV!mS??c?-Akv~FHSpr9n#lv%pLvCf9TR?-#gszg?;`m)R&rufc9SlW=&U8rND$NVk zez-bAx8zNk`j8JSHjjqB2ADco+Y!sCq;yX}^ zY{wTdDe*0Qf0@NbpTTte9OBaxc!#_7YC zavnMr>8k#E@Mof&wTxnT&Iz#y(s+~f^t6;fyrldjEl2PJ%J%UaRTUenNb?<4e9UD&Rrug|;z+}>Mh#!}1Y>f;#KtAMQDSZ;A~fpH18u5l z9g?5m7qc9gMO+UAGC2WCqQ_2^HY0j26UPZ*G_V< zGOgP(@xdL7lg=YOoUY7w9n3VkDl$`JVzn|ZVju?6Z}J09MODgHbuvf#Sz#} z1A(vk@+MI2#jRW#Ix#^Sge?iU4I5j;T4PP6*a1Y7oW7JDLDq1sCL=`bE+1jX!yIk_ zD@*YVb|B7nM-yxG!SK-2|2aH;?q8ymc7l9` zqjVH|5NoKelp}O@bZ|_3JH~htJ2pD<>R*Mc51#`4UZo$TvCc*gzM$&XD$;Ly-GeXx zB;51pcfw_pX9FgGLDx*!_;bzhGbBs>W9*Q~PJ>N=Si(-0!ZR%niD(4B zwA8uCM2igs3PvfxMY024Actlb%7YLQ=mO0_db{(tU&2NTlOOJ)| zS87Glk@J=CcK-DLhjdU`3+WU{$B<4!R4MtgvJ(#N)w#fLa4&u0weptVbdMe(uIuGM~Hh0q4vW<}2;;tx?-qdKT{K_xbWj0!^qXrl~y=|XLnIkMFqi+cJC-JxTD8S>aVehpSUi|ju1*vjz1 zRdi+Klx47$7XK+cmRThhLc~kj@(wGr#8pFI#QVkS?GJ;x+5hlLxCdg(g8709H-1BqO=wVFg z80T0_h9IcL`%MjQvYG55gHMY!fUzc`UO^cL z!YnzYDyO&SCq;yk^FNj0;k+6=- z71*BJPP0w*IMZ$1hu5xn`_fR^!@hTef_LS@2naWHpw8#sklwj8l=t+6(rzG*Xzd`| z&Y~1L9{24ra~=hT2_QPmxzy3p%1~S$?JdW4lLvShiK7+-IHu)q@5Um!ION&(FiN00 zT^_*8uxyt3gS*)unqBh)k&H#l4_7gQanX9A55=v`6g3+C2%(}}b zrp^;EjJ!62Kgx%`$iwT`D$g(}(0G{aL*P?U;3}5@Ums`vTXi;EVvh-~tmS-zh99NP zry_0Z2#}NE_?Ig4<+Z65lX^OJITyjbBC4T6-AZ_F^eGTW%U3krb(tCze+l@#7(&+@ zrp4uNM>)o8F;81@p<%rrOwIVTjH6m{!!*@q%=`OXCJT(fn9B|AT5$+Yt6N2jz^>(ktlwUj z>sSYj|`(D_?`ynvVbzr}0(^)PkmVS>8n3F^LPk+D;)G|CT4 za5vx!`ux`C!++ZITDXRC0n>K98Ro4z7yiS|_l6IA0&CLvZ$d3!hnN05bWQkD_{_gq z7zPUm!qJESAv}Bfe}tz`{Y!Z4ti{&I$T|HzG_)Ut2VQ$C96ZCT^~CA#hpr>1zDwQ@ zbCBl_fpmxHsN;a?tk3;~p0|I-cZVqKRS&~w`yYQhyzjD`u_3`Eu-tF{Rvow2&%(iz ze}$HZv+L~Nu*N@xEeGES6R)=L&*$kbsXq+e_2ZDc|3@K1(K(g3u@^Ux;JbM21rIKC zsqXY3>6qElkDSy^zZmJme;aPzdm;LK=|&22n}*XV`4(WCn#b6Dt0{bwU}R_S+6&=* zzo}FD&%=k25f|?M4yNTF^V-)ItW7Jm6xN8{T3*_5JGu&f#FCeh-}>RVfkS@@#GonB zI|opSyZGlAPV!VvQ<-bm9gYll)pTk*%%qCY{M*ij1yl|C!i-&%aiZHxyzJvH`&O7$ zdouLVo9=Xq99<9e-9Ui&dd^@PeL>B=;|(~D>-4~nF4a_krKB?XmVLGZs$4#?w4omN=1CB%6#x;?p;8Yi{Ih-fTVr^*!(%&w>M555&Ls$heX zts6s2qufL56Bi`*A!0{h9WI_WB71~T_WuX95oG1)1h&}qNu=TUF=eFHKFznY*k_q$ZP(KDjNS%j>Uu`QLU?Rn3n=V zRGqf<5P^(@KTBCg8<_2F(WS#?w3$NfQUTb-61EBaOcJ)5w2RkafL(KvU+yRP1%u*N zK10}*qAL-n%plQFc2$jbeB}g`0UlLAvbvHM9Aze~>7~A7jFU!z&R8B?qgduqC>tq5 z6_I!pj$Ai}2&2l?CFsaG^%KYfk5k5m7tk^cbHjv-Dza7ye(9=0U~RjVDMKax^h--- z653ESFGoYO4&_ci`boetbk*=prp~7gsjG6Z#ETGJ1^q6!XneF` z^C@N_=>i)U$8>vjnqcJ8Y9cOI0Bi;Tjl{V_TC~u+GDKlvDMyMhR*hwZh&1q`M%5@n zEfew)l?KDWj)kGgE5F7oKdHlbo$autn=HC6OJ;?gEFU`EqZ{xj9JW7W-+~VdEIX`U zys6DB$U##nZH&*0Zeb17ji6}-@YgmIG!?laL*MGZ5SLIf%j{7 zqWJCQ*mt1{?(Pf2_tQ?e2aDa_fsom;ly#S|ohcn*qQSeOd0%=hN^LGq{eh{#{ zAI0zxh<6`PqZs%A5XG=@kd$iX<=ICLY^-7P8$OO^ewbDhVcf*K1Sk~->n$k zRrHIFfDQ|7sdl&BnTbApif!QrH5|P1Svsq35;m>@j7D-*{IYz1_1~KeXT=h0n@|`M zf1asuLuGJpTnXK=5yvdOg##ZCR#hjSrql*dIL=RT`os#YLNna7@LM{o%y@}u4x3I$ zs>~Uu%^vpCW5@cSpg~zaHsi+{5Sc2&gB3=Svi~Zm{vCd-GE&1GTgPcn2zO{xqh zlR(8N7Pu8eOP4`KjgxCxng*?;sM3eLN6lP%8JGDaGYxqaHlyZezM2tS&3Wp7(Wxs)Fk-><(+r5e#K%`}I{4jP^YhG>*Y(&RcyB(eLcmOIy1XBSw&G1!94| z@p7Q#CkE0{`MS_CdJ3Z++h2S74l-GHwiqzgG?mOqYjTRtry7*!ZKA{tDHgIlha(p1 zdL0@(1HZP5a*;LO0Q&6bFm~Z)l6q1@NSs`HeK_P#H^P>e4}~Q=X`f8SfHv;mhsnQ= zc20NP*HiY@?r^V1#ItJz`iw-#n@WuKV_zi-`Jd>G=c}YVT|?pQnOL!I+;%a{Uj_@# z-XGrgQ5u>W^E+fg9eaNiuKw8UaKo(4Vau+!aNPgr@Z{Dmk7?g0j~fbnmG~@@-+d?ln(o{F2G_@n|G>L|&LysThzRd}&s+>wy`MaR zah4025iXy!Fx>I*MS6An`*7lw?@`r+aPIT}5k&{}>U<_~KuM z#Z>eVZ(=YnR-@&O&dXmi=vMOj5$#>s+ zF?{TceA95yjhlE)_`okO3Z<22sLXXXcI$jC!sGRH%y}IIdp%%#({5_qP?K00uN&U! zrSoJfq4yKJycB(W$4QrJgI|(CE=vs@LUWY7#_()ROwD$9CHRC1hs^!^>nR1tCuW1h4 z6%_|jx!>aci;Qo|6@nqlqK zN@{RFp6nh-C@Mn61oQA(IUtP zVzpmqvP&DY+L>rg$tNXv%kXQ6D-{TymUC47<)Gfl7B+9l#WP zGP=%$DE88LY2vh-N>Y^XexzesYE#-$TzsRCU&FLCC3BcCb15hqRHDA_W%c|pkB zhNK7u4&7Y{D;}Wo!5us#x!V?mj^d_yp~ChGTNZ}Qt+#NxEdKcd99M?vN*qgry^P9e z49mN?0=HxB+s=6+9gf_C%tjQr!t{Y#VcAU(=a$7`Xdm0(!y~^3Hr%#^TMkd&F&O&Y z=3UH#9jh>6{a$!|pYkY*EYpg2X5dAm%iO>RXi^;|)XBc9aN_VWI15=Z5BL^1x8m5a zij>$S3aebG6)*=Q7I~aa^YF2>O;M1od6<+Wl^e6{GdT#!J&1!BCM@#kEBN{4s}sqM z?X0Ml^REzop`Ax#x~okvmp6T+h-g?tfb@rB&2uyqpTLsFal~3ja9%IrZ`Uy$b66fU zeWMI4jx&d2nV1;I$mYQ1(JsYmJp%n0?Xs*Aqw^vcf_3dG25 zzX**)#ATagXbhia+0!s99BGhvlmwBL7pR4Dks1tVq0*RZ(IUZN@NpD!q)Wby z++FCiqjm;;_u}fX>$xYx@6Vh}Ruo)2?(ekaTry%>IL#=YSeKHW!f81KGS6ijje2H*P&H-ta> z60eID&xQk!{vbSa`oD*#sfYSFCcNa>3((EObgcLYw!EXSP`U0UdZnRyofTE-Rre>@ z80b*@odz_~Y*THa;>--~2sqb)-3&Z!9Ru7%^OM4KG>?6TeNr2K2p4qW_K1@9ga_ z8q@{_1;AuBsTEz;5x9|(a^GA?U2YJ|%!;p1*-at#pR^=9nWCc`0m)8qg(~4{bHvTa ze9@K`(<1vgyp92wFMU+;?>i`!Z?~{7c77xFX`EB(izR`^q&@(Bb`$|$fe2p>^S96~ z(dw7O$A5*NZ@G^<@cA#TM%}#-rmuM=e3QO4?AuYv?^|H)wbT=uvEwW~PEcu=!=nh2 zzP$g1_&SVu+E1}z-9epp*~9qa1`pHqT=cy~fQH9f>R>A>%A!##qbD=C(5P-QmQXPU zeUt3|!ksDP^-*akd+e={Kk@C5!!nm)Yf@h?L=O3he+qy7U|babI?^0L?${4P<|ts- z()`?R#7ef;B0n=T1`mA?M5J%hgRHNF`M;1KTkq;Ugcb7ecObtD5Y?ObE4dH%U%Zr& z(;`3J$EkML1tgv|`7$HSC8~3ijlnja1OY)jJ#v>!^Lo9GQ*wvDGC$WADJ=j!iDlzb zCPFs&$!(=jwj-5^nT4OM6F)5;$dJo79M(QV-PfmRwmv~kb^ca7N$+b<@iXuk(Gr$3 ztJ7emR(qXURTPFxCVSoi!w(Xj0j)}?U`96$E*Vi2^HjW4zYO^qAB-VGU`-?}frg12 ziel9Vl{l)%Ez2Il`u!*zi1b&d1cAX+g$<*4`oIcz!bx%vyD1QyG*B6dlKCc;x_ml?W0udhK=We- zm{o(x+_n+O#L(td>2327sK6s_ZxC6X@dQMx17uZ(##)VknoH^t8E!T>ZJEJrw4$|+ zvcUXSt^y0C+=m{vq|D}0W#X*vBYukBHXyPuT;@7iw(YRO)kvVllE*@fw1}kXR*c17 z+BctJ(7rG^ULV#h5ekl<=E2+U0^LyL9vHkr~n?V;3|l$bf&Wu4=cEPpk~GhvNldm4=CTJoj*DOD!> zxIL_#-%J2%!_A?zqc<$uU*?Y|eh0T@=5ZE!-vR>VEH<(|HOj%@8Ma@CSVta& z^4MU-AH22hs(0=QQm!oogb=Qf)7EBJ$re)c!bR#9tQ3#Ng0FF<18=PEHQbU`NR#!2v~C-S`8m~4BsXp zVk6CQPN#EX+}SuXp=FnHTGNT+%?>spxXOBs68~c4d7`0aBh7}Pi!A4`T^oyPAZ)1> zmd1s6RT<}Eg^@CU6=Kp={$kQEY&Q%AI_`Xjt$CQDNw^p#i+05;D2Ojo*aDYi&GH~r z&mzTSrMQa2&`7i~XBA0+(>jpWgk1g_rLBk@TPM=U^)Oo-#t0CvomAXpN#K^EfVtty~n$+QguZKd(Nwjd=3*s9UN_#^jH2kvN6T_tpT~ zcT;DLOcgUomb31yZ|n~1&+lyY3kH!Uf@flE`8^Gch02YiWF)tO*{y)|@^hQQnm5_q zIoQ(3^8`cCBOvE8kkjnqL`p6ai=H%0((lR($h14}50n25eam8Z`_RXhhUsgGqtgB9 zH5=$UkTOt-zPZGTil4J@Y!gS9B2D&e0CsLY8EynzuA}>!Z*6@pTnmzZWy48&KY2aO z*@aHC_FVXK&ynzve~Z!ZitFPp49HF-?)m-?%?!WzOVh&inVZ8VG|UGd{VBaH{tFoT ze}_k3{V(Cr(|;TGKly!9Oj^BsTS@ZZD-;o-AKDWLjF#|!@Z6i>#OrT_U;B0BjPc)q zKJ^t|8?Kq(q}t>^g{SRYj5zgGSI=eopN8L^dS@8g|9=woB}3o{E;uqY`pwW7xcf(N z2vjxPf+etIl5n_`NbdkL)x16D!>r9G!%cM9ebWwWYhbY4N|uZSdL7Z{D`spYp8^WK ziE!_HDsTMmm)5h(FVR8FH$!*zB$=W=M(k?InY{#P`}i}`YCO4RYJ;$DYe}CG)tDE7 zn16pMi;@m;^e@>ANv?<92qP{TS+rdc)52b37|LC;AAxB&0jF$3JmzjK*z}sST-Mr{ZOo`NUTC8sKL2QE??h)^GmAcS4>{F|$ld3=Ss(eoLT? zwO*7lJ2G6p+;K{mapR5Y$DVhhf*SSQ7>14~)2U-K^6b$cf~q_LoPW&!RThnFAO+K1 zoDpm>xXV^dAG&K9TCG8=1+~gU=i(Ld%ETS84!4?%)$p<<`m#IQ(Pbme*6A|HY=Qq+ zApeSX=7m$#Bh5n4@oy5q5Y$>H`eYWTGMzxD)Rrhr@rH<19gXK+ZNV!=K+`T`6cU0R zLZ~!yyAlOs?bH0+JWAI?4->+E0-_z0Hsf1^E!PkOb9eDx2T|f9VnL+i0e+u zYypsv=?YA#?uIs5q7HO5y(&m~8TMz~ILV_UPA+h?hCNN4@LFY=<8_dpUCJY`aqX+3 zi9%qRQ%dE5JolVb*g?waE|-+pV#=VgTOm_76W&wftlg_i7r;P+zzuwPUInj)>o%M? z-Z6vHIgUNaaPY{PjClzY1JqY|f!vh)^aM-%8I3No=^?U35-6+yy%{$yI^2fE5Zy72 zjyM2eCN+e{PdTLs>lOIRu|$T;?Xb)hckMKvvwSX~GS*Net2=>mV%r6_nnB8Ry*f7| z?kSFQbGW>6>;SBq+q4AcM8&*=mfa@yv3_32uDc~^pQ~B&? z%}9Tr25Hh1`6|_nzT=H-5JI6FESZ%=X=3bHD+~O{IWkmY`uH*p(-MDW8o}gMTd$A= znI_>8tJxG;q=H+sRb;8U&vvRzomhR6?!u8&OZ=5lR2^2BR>$<63_VZZgN`}JsgX~e@ZRAU zh;Cy6A0aWM@hq|`e$blr^Q;T6I7+0w3A@HF-PK+{(qv=9RIIgvxn)}$FzN`R=qO%E z=UJXcimg$s(v0Q$Ng~`YScql^!s#w**zKg&%XXF{F$HFBvaK2w>Mdns*39UudO0_R zWZi|^=`oS1F40bB84_YA$gYkkpEekpMV)MTV|z#~JL9q(x4ms#-hgTAu(Am-%TCiJ z2nwm|=%h5`Wt2j)tKZm0LDtPEsU*xW&1@JPp@bH`*mJY08rSNQW8sN$Dl zm`q(0{_MKFVGgp{Ob94;H;t1nmIgOoZl@EmABtqrhEpNA3C>B~u;XO7e*1Hf8_Y_i z7S1JcVlMU87H+=~mfm(Te2Zj@&-~e{F#eb3h4)`QKXm=VENG6B<*0aFRP+AL-xv(j zZs8Jcemxv`Wlh}Ot6@Wnr^@>L>ekVNk=6A#I z{Q;F!AnkGErt)`v_|UI?J>2v7_rnWk{y8k{rxNYBFN9D2I#%`j|0}J~zoYyMNyLXh z)Il&X$=rk3CquN+P;de;J}gjK_eEu}hp@W27B?Xb&)WPa#+9x_~@^;ERz#IesidAwIC|gr&6Z~i!~1~VvA0H=yCj2Sn0t; zbXwLrEa$csfr(h;yQUJ8_rWRTh~j3CUSvK;{7(8yyGo7y?3(&=31qLd4Bix>bnD45 z73!WrRUNDIl{dW^zBqd~*9yK?=>6!dFmL$9Fn9B7;YRuwxo-V)2*fxiut!YW{;Doo z9H9&LUI0q13oAL2x=gxvBr&-xf*+|XT-n&Qi3@cO9=u2oo^Mgi`**34CldJHMG@t#mCRkV!4A?TOr(-JNJ(9o@9TV;v? z*%~aTMphv|G{LJ_<~=b&RBjCnyYf*AI6OirLB^M%&W=7#{7DW*H>seY7Vk#*Q_fW2 z1Qdlyi^hq4P1IT0RuNF~vt63baIa-dVz`%~MnlV;7|B(pOu$4VyX{O=H6(SSCU3}9 zyx&G1raYn%M7Es;!s>US_yT)n_(JVWdDC@~3@L)5T2uw4TB;H6UJ%Ujvaw8tDoQ05 zOx*S5MwKmfYsPDtwJN+*8;6P9>Yn3Wo>17NOytu|TlmDHCs8u3BIJFnj#?MBKa{>2 z>XcDp6foapf}f zRW-iLFe&h_D?>daHA*PK~IES3a zgz8uxI|r|91&S-NoA$nAoLYutS@%$5y$XACyLrynYwk7n{5+b9%R-GV?_G*%C@h;e zVVn`~L`0qFSe_%#iNQ>WpFJCw@HS6UOm!uPUhVd|mbeLs(q@RmNvt-XsH>tU;w|u^eS6Q zvYQr#Ni~`rb)QlQSe3T8ttT|^;9hU<4+HDwL$U08?ajP)R?ZBadAPO+-)0$R*35~+ zGJKjOZ1fMS9C?Lf%5Y3s_X@?!sy`sdIZC;zw2cR(TZX8%GOb1kAFwLpWtPqJtmeFu42%0R1UrWK zRe>H^*FZ3;YHYY3XW$(f?BM>EZj8lz4;^)#1yse9iNSv~>V{<>PC@ zx@XAhJxuyHKR22XGPcF|>8SFv5HpIbTU4Uqn^^j1yyYAnu_AQSk#UYezWgij58&lT zmw;45o2ehVoL6Qmb*9!R%3J`4^MG#&@GXkPWr#Sb6Db;3fr%SMKb9DqV4>$aM)DfC z>;&sQH)G}JDpM%?1K*ZJUud@g50^D5JO_0`l?^$y0vmT$pTskY{yO|TCIGl{IrKL4 z96D(or2UmTOk1Oah8p$362RB0%@%ELu$?A^I>fegkghoknUYbYi`3yTg(-(DISomw z)4oHstOu7aKeZiomM#Wf-wolS&b~_Q9omex0FFe;wT6$MSCHki{vzFtUf30Ksw?r7a|l?;!gJc6|*>HesAC zIi9S(xFbv)rT;vqM%fmO9U}F-%JI}Vo}_k$9*UMfwwo8k&M^6-RIusz!_e`I^TLuL z`kLMX&ZwwvrC$CPP-ccudy`OWhH$IrP{&f!s7^C=>+>kJ&{8sg^Rr=+n(cH{-0Rl> zfA|cSZayF8timJNdo+CXbC~icTnj*d!~E~BgsT-uCtP-I`1ofQhne&54l6*!!%zHI z^1%NYw*Bu^WBf6W&Ywo{HS+Cie;H1G_h;cRzH0HrKM9?k(->kn?fh)W3?B;z9{#5= z;fgPXi65OE%InVafd2!In;+Bn`FCScMTizc%o9X2(E-qLT_@*14K_0`a|a2>S^lgCkB5u8(B4IlsG zdRR^Otc&lbPq;(uW5C#V^enbOHHvx=Ps{xor?o^%!`NmZk z5tT$qamezAc2*wC@oDf57)yW9)=4 zhfn@qDJ;M&x@hC+Fqf0L$+fk(PO^)mYd1cN^8NxsG~ET!dC>p_<{ss)_TI-BR)C8P zYaG8beHey4sw9a{dJI{Ti30@pe~w`hCoyHj6GC`S^;!Lg>z)kg`!o>W4Lzd8#+${z zc(XJFyk`(D9pGN2QEhX_zQZpMq<;vlmllYLKyqs%dPPkP?=TbI20`|COBRM+xyr5L zNJ`$Z@MG&hxFs#F^cr`y%ROe@&ylyuoB2Kldb_;fO3?CYwL07fcZYv*Od!4lvgL=* zgu)3LfpU5aWW9V7+C?k>C!oF51KU+~VqzvfYX-G0uc37lg-zTkGu?Tyc#RSIu~4^3 z$L1MJu~nuO5kG4%t4X?v`r`);ct<~glnKSwnQJh&YH2<+T@y{~s35B!qX+fJF`GV0 z7ZK3xD4$0dSKrmER-{@=g^Xiq)WUm-SeI(Oo3gx{dBc3naJ41?cWer=p=N{c29g~& zHQLnR+)k7-6(7Y!_)3-lLx(a|~t)G&Hc!fy4h*ka?Mt+SB z!&U^|`@=-3N^)#7r=LB@$hu1Y{}*XJ<<2RE=HGA4a`7JdB`aT z3l-tmGVgz#K1_af6I zPGjwotal;{DSNgx&eoPfB5HS)!Nh`|OLiHLi8&dWm*XrjEfK*}vbR?-$#M!^Z3Z?K zTUTkjg`%6lY4P~4bc=F&g)1$`R-w2YG$);AVa_ZRJ4kFlz0RvfrWUkTgBIn|$fsOc zmr2Ck$x^IQ{(;-($F@TQmMe4p6;gEv46+p?{0-F8Dm{~>4MM)7iT3^ zj$Seyy$}4_#l6U~;a{o3uE{POTr?Z z4So*>X^x7tc5Gt(bCd21W?pH6ZRY(a(nh##7U0>-?AgRlO$68)h0Dd)Jc~Hp&tj}N zn`dDY=1T&v6UI9yVXZ1lQAiVR7G=96SD{skm0;s%$kt9u{M-<8JBxl|snQtB=8y-s#e|1n#S=jW{U|PkHqAO*c^)^z8#|eY^I?o9CodkS^)aYH}S__9zS>;arPT9CCsHp<;^=@q0-oe&X&!Kv;g@#{vhY%SHE*!(=8* zL`J*Cie%LSq<7IQy69C)k?eX7(>=-E^y;zYX?m!9I?TWQWSE0}LYkezh42zgLC3sy zBja0vf0XGo7w+?O_h6z$>r8z;{K>q#!pejH6ev3V?Lf5pP2|3K46}E<9A@H;n7W>6ThE3$BhQC%zkCaA0X@fG41av%F5avZE5IEwhh=8q zotTE7Vj4_8orcRzJ712rUJWKU(|?zJvbb-_&ja~+dDhdIm^*TjcI_Kb=S8> zWU(=nAAFm}^c&vmx2UkLn}ch*geSlRdx6uojaFeT!`b6nHrV>l>$5EPjy@Y35YRWg zt@vCx_BNTo+(ps05BEv5GsHH@yU>=VNURvzQKdnWpwU(zJ4GytuTk{pdexdPpf4)64Ce%bvL`%A-%f-Z%`}+0SI*Fj6U@e=C{P3GMqnFeRqOFvifYQkHd! zkz;Yu7XE<1r;?J?p-k77c4d_9q|M^^I- z$m=1?R&&&#DG8^%e#&eKku$z`$gZxTWF}BxVjTO*iW&?H7?xKEm0H^YZNtq)43-sa zl645PECr4cZQcwNX^-JBicr!d&G-G5jW()a~~o8JY*)* zc_bc%s%6pmH2f#E)_l8rK9Vy0Xm(2js#X1T8L6~L+&Bxr6t^yAd5C~v9@>!2j42yi z&Nv_P%@EtpuDvM~V5c&lD{xef{GRN_nO63LFL-SE0dBnT{;oYuc)vu_vyaN5TELBiG5``*CJ%Df~yj3YeI!r<<};INNd(n zQUJ%hL|1id^>Ftjf9q8BNSv2AGHLKO_>bc%aV@2EDb_nE-^k4UWVG9!NKBf#QkL=z zRiZ~|gP5nJiYn2j8LG=h$0LHv#BJe8ID$!;E z+&WNOMh+gt;LyK(b|`LGK;2_ZyP_yohT49D_QMvAY8U5kF@hw|T}f&B z(4N7k?(iv*HVqD!!Q|$VA%d(;#3ceun4KF(P**iQi?lp2emUA%gC%|>G&K~s@qTT! zN96aSz>-oX*OuWIJ_1zQU}O;o?l@{=d+RsdQn1=JwnsPJ0+ogxEtB5ZFy zD!dVrFJW#W0v z4#-WJ@${9Dq=<@N_0g-RhClv%IV>pb3mf*G4o9E+S$OvR|HH|gWvMTR&aQ8UfB#3L z;e#Jo7{;e`=6*H&+80oykN=3Q*howh30Alb1hhC=w(Nfpa|D=+T$IM=(2+fI7Qg42=tot9jw@24v!#q$fMDJp zy6i(yw;9sXcOw&zeLNLXQ?{I>lGBTH_H)NG;qo@vU%Tx!y2_zQ0X3k$FmNc0AOGc$ zvS;0^ri8iWr@{iPDN8n;4Kp@#jdrr>={ueeUANpp1*ko*Mhk>xu4ZjJL)IDcDPZiu zG-LKuya?*OlT=$Rn3tE#(tvHgNG;)uG7k>T->KRN;XGATAG*js=^zIMc<`WCmz&TP@faPr zo2pcnsZ#T`q-O?oc@Tncl}7Ee41CMNz#+75m^UX%wG%zc(($*cn}_~OLn_O&(0>oa zzuyOw!)TST>hr-|s$r(z8t&C2=SbV7x%1>HN~7@A8#@Ue10M*=%=^r=I)RK2f~^j^ zq2Y(yLYE)5yro5)O{Y-!wXmZ_9Sal%$YYE(KO@f9>K5f#FaWXFbZ@i3t00Lbca;7N zv)6&O1`=dl8(fSL0!1HjP80_BfmYZP^si>X#_E05uo^I4`6w>0$N4#Zn5Y_`8^j7N zY@H>Ssg?aBkOHQ_X@nqH zooSjBA=})#Ibm@1>>%Zq6swt^xX<^yVH*ck+gI@!>!Crj5c4Pi%>fRqngw6Zjiw5r zyvmt-pZhkjML;;u))EQ&y^alt`3%MCESuLz;kB~aH3)q5Aznwp*Br3VdSZ^$_hG|; zo5bS&wQ~?nP3q#P`5RnwQ%EySp|^pgS&(z#-GY~s`5E}OZEeVF7l344Gy9G}{?mcQbc!Ay;Zilu$D)Q`yD$a(f?aJSQw#c4HV^IR_So zXII=9`iG~7zTuf+km-HPZwmb^Q@9n;dJ8Om8%=~h7XDBgLSBMVA;U8g+d|Xf!k;WU^UJnD>v^$Xgx}?rUw$t5d)zQTGs@jFr4$z;%*cr zWv+yQiUQ*UT=hYQMMUM~Ktf?GIsoCAq}&9twubnd<;kKqdUqI95C}oxjmzR*58*FL#7zGDl?&S}nplXDm@tx+kLt~R6A)mR5oMb%tl@z^RK#*8=>Ky~`nzNXAPi;m1-3lqw z2@*1}_68YQ$#~USils8IiEW}mircWF@O#^|Y^RfUKDqqGyCd&99Z<0B z3p1N>X7z&cj%n^)K{rQOdLiN_hTzUsI!Up|VpVa*$x z!oteNFzy$A6~Oye_|?xX4-1j_ZZek)cf$=R!c*ytW;!LEW^P0X#jA8Tq=~&XBZpItX3bAExhpBFxMJ@%t3f829z?hhJD5KK9FlVf>`2p`k$h3sI`>{P&^bia!e<{nsYg~H(Ym5c+W(uNd0;E+O?QU*8VU|n0zD2Z1Y0TYO;gqsL_rW7o+pdJ8&NG{c%`u z-`|8}v7JHpNlg(=q{$A`nY!uTN6wH(El?ln&s7 zun~Z)Xb?Wh96rrC!Cws*nP^p~fkR}tp^3X4HC?5DE10z$*%6zg=HGI#&^nljPdT~e zjwi#vnzNnU!mZDSuTk~kFOdFkqNA#r-0UxWaV2dX*g5qV;bXr}>By}Y!osz$aIK!F z?8Pfc(o|r@Z!u@ri{a)y$kO;NW<(>gonO8d>~(uF4hm0i%mm=Qh?hiJxic$1!@in5 z^2ZrRu`e9qB;UDyV>N4;=5?hl0eyO(Nd(g_&3PX^kHYLW>?88+n6VZ`T$2jpMW1|0 zWM<`lS}g-S8EM*A+HEV3NbfK*1Z@un_D%)fx)%t#W01lW846QmPp}By4tPAa%a|Wi z3F9qkSya3^@-4JW4xcxtpTo0|sy!NI;pmL(4#dL}?c=)9fD^l}>ZiBUj>>Twsnm5# zo(7^H=j&-9weemKPrqM#_~7Bc4ij8W#kuw5SR&)w6s$P{F;;N;#=5E#?7pX6($uW7 z0-gC$Y#;-wBrjv@N<|59 zk|!#h7AklpFF!ttk78X|`vhY1=tHZ*hZFSI48YoQvZ6|YRBDa=fT(hhN^tKkm<(fa_T>F@N+JVTw$S?+_G_-RyJ!|+D_&1%xc+6UkbxGo?Um1e;W2rMHM=E0^u zGN#l|tpnxyj`stN85$aX?uL^4#bE_HpwI@0wV{$U28~bWL`IIrGqg@XuQ$i{`C z0SNXjn}Otd6F`h+&Q(r0+cH>luv|O4)OF8K! zqtn9x!@=b^T00+AIh%2IrK2Ke{>dhi#cH_m%E4p zyc{ENkz0^qdV%SEs>)o}VGPGwC`uebVdYI>U}Q$fF`FLfoYB^u53WkX+Uo_Qf8*UPI6(zcirFwuzWN`3ekhbQ%7#96`&LG1lNql~A~c4kN}6A6XW<%z7Z zv$>XdGN?||t}j7B7Jg8zg_|;M&k_`gBdHS8)xeY710`DegqG^29FPiNkqA@mDx?F{ zPe9Vgo56+h80ib_Eypkm!IzGM#wTbm(7tb!*uccHrYrsmd~i;kGPV`ATBOVby&Kfk zofEivjHfFgdURw|Sa$Nz6Dwn%#G}uwg}5pHz{DDyT&8cWDjRChXYt5$^n-a4djiWO zC3NMhE+x)A0Z~7>JQ_1J8*8-~ein{K zJP8(hh`q#j)u8YOEWHvwUJe^K;rHdx_!=w`s{q(!{h58?^3|_F)X355!1)|0Nc;*~9-d}duJQMX~) z$<1Nqi`&AgXYU9bUfLgi;}7T4f52ynx6ceSZ+SFK*>g60}ry=nK8Vb;#a zNcB1i5Iu`_iOV!G2`qI(G#r52#^O69C5dU~ZK#pAo?$8x`&8^46xdFt?sz>HLuZU=DzUJKQ4s{ z|B5g1#II4U;m_$8{wwsMc}*O*b(fE7<%a^)jpL$GfbN!*N-lFMK3-4SiN6FU3&2KsPU=wnVKcA^x_?udnaav z%}<7#w>^Wf`y9rDXTp@*pQekfC%HD9_Z9OHr{`>-FxRf9!t}dd2ve3mMin!U@GIe~ zf3_Jcq)@;E)aZxG7E_nB57oRM`d$DQEmTNcBDh5ovz{#V8qh#dOS{oLmmCJ3(}&Lz z6212=zL_)?6jM|0bV+GP^U*1 z+HGk5$ZH{U@RiVuc;1iMqwSHktbQ-*_yFG7{)1dij#2QPwfA(mj@v&=Rz_)_O&nt8 z##0p5<*sf;&7O*1<4S2ErRmj9&znijiJJiY`N;Rr2tdoUZA)rZ_UKxSU%IF%nB#Jh6*G(SgY`B@^Sl8Gi9o`TdO#uh92$3nMR zD4Px!A>vrvcLCttnd8y1x~z$ARbam#*zbjk$D$l;gxmMMaHW;YEDG1hMb|oBdhlYX z&^2jM7cx%g#ZbDPN-UrZ+M=W12l~0nY$vYSD4?GUwP&z{ zJn>RUQ$26+9+DBcav7fdB+a2EJt*%THYpalaTAQtzmE`a_OjenV775hDG|E)lxT@VYCc2?hnm#tj zyk0a&BDsrs`gv1Ufz(7YzS@o=P0v~VD48;#`shQ{*gj4G5@I#=+|)4@OC$PjUqBbw z3m8HA8CT=9;MFK`TB|<{QV&5T-HP{V?9ByKu7T~q8{^TRQX?pR^&kW#q*lRz5-)zO z5?Ul=%@P1L!rqs2RCRQ-3KrKvUiFJN-9n-iMlG++6-#J; z?zgaoh(1@ecRl>Xxuk*aG8|L~$jUYVG>EeP0H$V5q5W`GhCfrmG&+mD{p*49b#o)e zromzDx&mw!W-G!~Jz_5!rwxJuP+5r2L5~#(QTXg-ok%+D&qzTUs1?ck;m!=#w!rym zNpYBmv<6tGpKVl#{x?B(aXpdSCz=+f1h4$w&mQ|A$fe7sqqffBT0!$48DwgKZJNcF zb9dCV`g_ILs!NI0MgB@$m3|ux?6Jh2ExF)v+Qg|tn-zFC&lYn6J9{ciq@0(g z<0Qj`t}Jsi%q?&YicIwy){I4PuZnCn@qjMRvYmq4(<8yf8DQxi&M3QzVrNjYevj&H zG6(^xo&qB-R+rk~LBZBw%RCwL+o@j0E=PKwwk+iE!%X0-J`#jHpjky(gLssv{ zmvKLy3+6558uxIQ3S6xs*Cf%flCq_e=FT)dr4Q!W_XsJ3$^A&b`{`<7Hwk)o(ey>b zF40;rl{8Ix5$ov-D=0JC`li45$zAYt&96wY)|N&0YDtM9~bYrWC@bEuT@M7qtq*Dihkn0^fEO`aGnb zgVc*i0~N9j>t+jD?wDVJGQ-+&#OM>lymv|=&2L?v^oSf(pWz5(@)Bg9m)V(KVjFI! zL<^wEUxD#5rIG6owHV&z%ngirffjyi0lij}NmaIE>tO`*$BJjjXG7+$lKN3PL3>61 zXIRA?k_ycd=I$W1q3Z!EC`Y5MOz61w*VRkF5an0r=<1!g~=p`IW6? z4z35_>5!Ez3}Zg2BdJ@bLJ3=wNSQir4XX>k&$7a+z;g2gn@IEK1g<=VCmG+!hSPV3 ztrzbP8(yb6+bJts;8A8PHMTayR+E*dcVX&ybqny$ry3hhE@AtJbujCKP5|#Z9ABj& zvFsdMy||A8!}zdiA~b1e)G@IrrPt`+q5c{jb6>a>CpDRcr%}YI-Bx2=;e8n<7IpDk z&wDi6xvbP-o4owRtzqTM+rz5I?nPo+A0{F-k3(|)*smi3E&F!(#`agxJ0a__G6>0y zw?7$Da??x_-;yaCUkM%8!Rvy1+bo<+--a)G2Bemnx#=`!>epIXfnC!!QY`@_pSttW zFzxoo!i~GZ`kkockgXkyCet^=V%LItSNE-aEp&e3X1pZVg#Owq*b;w=J@M~xIx#%( zBfeK}h3Um7!xz7{J$&LbxzKf)=4wg`k0V=g92RNDKmG5BOCR|=*86Ls<3A09bjhwX z-UHb#AwNzXQ~yXWDmcV`I$W7~0Ah#Z1@-~7>)v~CkN`ma$5ChxoQ9NH!}vVQDXcC% zcrMI98K1Km{@jM6WY@D{E}xU@kj}4Y`)6)}C+84Tn6l^TF!QeG!xyi+d+Zpm35yp$ z0xo`+EuN2d+ok(Cp8M!v>VCvcdGLxwh?;iYIshH_)1r_RyQ#3-Cifm#aS`o_LFhVj z_!I>Ks84%8=Ii@tTkMChBGvWY^Y>sJ_?PO2`Q)u+={@vCssVfnEtaJqnRuK`G);W2uF{sTrRSR)+3U8~ z!n`})#E*lS1laAhh2%Kb*o40xkhS-q4iGr`q1QtWkS|kcqH=<9u9OasmLJ5s(q?#y z&6NT1svc;GJDE>!9-a9^=ZP1>@ef@fX@t8=bEpqfe4FEOFnK#$sBJB`D@qW5`5_V` zxzjn?jZ4^v+ndK7TYUTnA$yoM63=cPTYTlg3lO}v7^63>HXP=A4o^1=o)TJW(Hmtj zCt1q5b+j9x8A`%sd7zWbv2!T*G#7ldmJlAYfO9KLvCkDO#@x*n(NEQFOGjJHr0hel z^4ociT9_|~;uA0On@`(x33$aJBi#xGe` zxQN1ThopH@1v8`!+CjUifJHl4$J0__UYTL6Lc14wLwX)W3idszS48REz6YYb4rA*K zuxkRnB)&(T*L!QrMWA`tssyIdC4-E-Ckqocd3%o>8x3m_;YS}?O`jLMU5rB`!E0$w z%%Z#8u>so%5VoZjl*M&<455Cl;+;3b`>To_w?dmDk5(3YAO)tA47fe9glojIuqBw* zl(GRBRwJ(EWbsWbg!B<^^%>Mq21j^f;o8e~U`M$L`;*=n94_39bSP3>QDkQ_ahA;Zvo9D~b)@B@eUNM>TmgAMBC1-g) z$%3e#b_*4@Hi)p@w;oDn33Ko2P<{pIY%r|CWND^HpE5^0NbAKb8e0am1T1hCy&iC} z4re{fGNlTvoT^JgiB@-wqP%`$J;6P!r>ZS0cLSv!nP=sJB^eI!3b$r)ivs7S|3Fc^ zhodY*y(M_QfB8(feiklfycf`>rGE_rEM;p35EAVtlP$y+h5A(_>2V&08N44wT63|) z1H9LZyTF8s?0`@7#fvsN5FJD|5z6n>U03 zS{0t34K~Yr^!dcmPAbyE($ZpEA;Y%3=M~x#{sO4fmzm$h>0%pVWFH*N_fV&bZH_*+ zZJ@@)%ftt1e456dtr?a1MwU%ot+GFaa$mb2m3n_I403Jqv=8d{!pl&0n&)(YZ%}qS zVI;mqX^v}ftR*ZI@bPL0ce(wq_VFz>u?;6&K9#`P0p?D8rNlQdKlH^#RGlvT=j|(rypIyl%*ymK? z6RY1%a!QrLc^Q@(B+Qs$sWjthh6U!S!)HjYOo}uzQU(4M;e5KTs}LN8-lg=mUY{k8 zN19LabYn!nbTxVzBL}m{CR}XjQR)Dbv^WaLCus1M2LbsLxM7g|+qyh3zm6_0o?a8( zEJ@)}+B`*yHK#O>E5RqlM`;0Rc^P>Q`TPaU*)LHmj$w^y<;UTBrF=y51oD=^71145 ztY&A2a385c^g{sn%GYH1E#yW*+!O~HLDpY~)V==nzOd!uec{#%_Peo*-sCn@2V{My zKD!1p40QeK4*34|F#6gyszcL8s9U!g5|3$+9c`wsu;vhZON9EX zt$;VIV}<3Ln7^x3o2yfeZq2#PxqqMpO&!x!h?i_Y;~*zDEtEmZYn8erNr6IaLV9k>~A zDBQT?SvvPXq=&<=XXX^N(_|X>pPB))O^3^<9`RCW&H${sreOfFH@F$#*UUXnf??1+ z8?v9V>AGcRu%(Y&2hCrPGiJfi3z&;<2;<&2l^-nZxOO0m5ZHeY$N);#?)wRk`QL{X z2mc#+LqFy9_Exw)`(XI&*KZ3S{VdY`hvtNMzV8x~|J%@a*Y|ihv5Vrc{poP?mZ!oz z7;-KEfAdb%clh)MIJF%~n2sN4Hdki)_9sa*d_Mf@?+?TBUk(#KaAT;g2^6MH*NyzM+L3@%a& z%mh0u#Be;E*BiB4IPc0Hq*!4~ql6NC_klA+BB;tifw*pLKuhoWX;^aiPvAzj{=g|H z{&Y0253-Li>3Ahe&tbLrp z(z~fO2&u*nk&`^M-BH3TQ${||5p2j(o;n)x$r%98qx5c5FIB|NQWlVVX#OONcuG2R z1WSrcsy=uwV*daL-%n^JnzIuFIITi0u}HVrez}JB(u36GL#WSj8*El8iZ9>>Ejfl5 z&-4MFu_6(H+9T(2;Ltcbc%Gdql}B8URsQ0(`ygn#Kj!|%g3&r!I@Q~ACoW*H0o?J( zm^9i?>yziF-MowI_C%?k2OxUjO%=_ezL!zoD^I@&ufGu6FnOMqB#-LeVa&x+-iwK8 z%-KWi=lTsV<7}g6XkrpMieT{1^2v58Yk9le9lXV{m1sB7pIN402l~-qc)yjDt1O|G zZLXT`Ts3u_n-;enKp}Q|baKMcSs2>#X;JTj(+AYvt%r7{)ECP%@Mcu2HA~B)T6#^_ zK0?PP{FNEE11{fbt`v)*N%(k%b=|mC`eN%1zgFd~XaR_oM~6wO#%FooXJB?461F2`b>jpYd>m%DE^@pE>e%AY!I9E8Ytgbq;g=*qRB=RKDZQ6% zSJ5$Rkh-)jb!*$O4M71li&fYmFGiURuIe<}yBe`!~eg@IS-yGL3%Msex>j%e^JmmOs;e61wZCbEbE!w6v>bdF1)Zw`)2YYn? zFIDgTWyg7)>9W;=AQ*;d8iS!}4QpFw!dUg`&7=W&Xf*_jr@`5@08ZeqZ;u16UNjgq2t9*iyk>3K}$MTQru zi0*w@O8PeDLpM0xJ%4;iVqb}}3nqk*=Xq6S>N19xJfNNSTjl+S6!4=g6F%V_8ex>H zO_j8ENDp$l(tgsVF^|4+4K&suX&PcJWkERugUVuobpw|lqg~)h8aL;5Ym>OXU;TxDQjSdUB^UF zO+yYu#E|~Gita_i4(p`kS+*8;x1|Q2H^J)4ZtUG4x>9$H=!9W$ItiDl6?05)^#b$< zC^oPgeuMF`0iCltyOwRI-ge(!tDRuDIS9=Xx>xwA$?}t9alJBfKpvSQ#SfDC!RGVY z>m{=E-^cvvD&kdBYM2+l<1+`?;>v)UYCa|Bmw8gaQ7CEmBbN6ntn*%prTbnJ92ewE z`zrqzu2al}YQ!bXG*Q)mP8;c~;r?dzJ|*{gG0c~#Us^fLBo%UsqAJ;-pYUV-H+?4; zglAORX(+nj9BMgW9!ch(Gy>2%GymeV7(b}*j81MYW}PbeRhs(MXz?7?&Nw-)`H@xL zu0!|p0Qp5o)=PAZzky)Rf}1Q@sa-@Dx}(<+$MMT7!YiXQra@7@=7UDhz2LgV_@brI z?Z}0crEXlLY#))q5}YV2-`W*6yni69es6Dh@%}cZe3@bA7eX(8{jA`EH)!XK3~#Y# zMfYDII!H~%Xso>tYk|6wyO`d%BD^E1Bb&ec-mX}B*ZCgJCkJy#FP549TNJRSEXgv; zlPtbVSfB%^k2KAP7u{YPUicn)pYQIaVILJTC|0uct+k<{hvz;er}v%=zy4QL1o`AQ z!ms|9X<_Pf*AP4J#g#;qEF=9aZIgI5Weor}gTfr`6E|Fjt}bGAk+y(%eJ=caBMk9n z{I*&>n!JVitUygkzB{3PDu_N~$E#ubW|$7o1nQ_CQJQba)A+e%^eOd=;h|xO=>Lh| zujMke0<;F-G@@dO#LFClcw)Cg>A!N;{0xEf=V8Io|IGmW&$tQxj8bvn$u@*i%-@wG zxX~3OQ%BxJb_O!zqIx1td*<+MtRB=!IY5#g5+-1U&A=MSk7uCN9w;>hpKGl!(JyuI zJ;DncoS?I>#T$dxZsEO|0O(kZAY*V^w+MY4ggSBkZ9c~#v*K*{FQ2#O%Rh!ue@s3% zT6WJ-vOx(LN&|r1E`2y}!`v`nH!#_rf{BvIp=lKK4F2a>&>hw)qntSS4y9Gz!WDfB zz4#i%;BQc+;yzk3nkPW{pu}5?(PWUsfX;eEfGi*;kIBd?);4Hz(>QqM{v# z!|a1+!!$frQ-uAgoGqN0=`Vll9rheGbF(+#~xLzV2l>{MnOB!;sVgk8!Tq(#bQR~ybCYd1k+V;63dU=7waBTAWVcbWpzC~BAZo*e686=bPSrfkB9_G(MJ zH(5`^3?=;r9HVI`E%EYacaVx6cY>8xeUp}PC2D|%!&6MxROHei~F-4?5dz6A_32MvpXCaM>TZoWqz|;fRrlCPy(FOiQ zTEhq*jb==o)P`eFqwOXRtTc_Ve$;fH#&{H4)?VF_i3L zj=@IG`yF+*E`=&KF(fd-q{BVd%9UR;y%Yhx%DG@X=SgDx zCgD4e!hapZPz~cwj(u*5YUG3u%jtOqb=JVd)U0O+(tMTQlDxlY{9sC|~JxJ+s^6;;;in8Q53RU(^?`{f8!RZl<-q>4b*@)T5@>*L; z2;w<@>C*htnUZaiagHk@(g*i34OG_LE^=i@R%IDxubToPcZO;FZBv%lCNK9Z&*%A_ zsbG$aD}xUA-4b@2Dg%1WLzrHWEXsUZKx5C#^%~=0dW|qeo<}8S80r+3jVVe0yz3_w zr1=ICy;DZ!p7M|BD|q7{u4u6V*!xc{qMIVMPcBkC@9a`;cv|F9+TnaHHNDjOU#QZK zwPg`@mtK_jI@Xz}7AKsNO**fJ0sdjLMPu8`RqQ5LR)O}&=;s+6J&P|KXZ!+4T1J=E zb*nG1dwZxBe#L!N*6t=(b$`v=3C_x53o z*+Bt9mQNhe|C;hVZDOt=-QQeKyTJ{ym>yw!>4W)o#|%Udj=(&;_O7d83paVu>L z=t}9&-P;rvkn<^{H&NdEF|IEG`JV&*7vEK(=SzY5`DpLY+}#wO#Rk9X-F;!@_x94? za8q2}yND-e;d?v6Q;BDBqI@|F896C@`CBWIDDQF~zD5QgiG#F9j$3)OO~k#fLp_?l z>2+EALYT7UJojoG44`>5b>nMc$dvVvH?Nf4C3`#E**80yj8S6f6iVz(0?DT$r_Y4b zr(%qmgf>6H`@ZHFUwm;ie&mVk?uYMmP!jOth^dd^R9j5}KYRju5)v?L7p1AC>^$jt zb5Q|j!Cy0Rh0KL%wH##7{3-{2&WZRhjNJSj68;yIR0_&bR5@|z2I~0r*y&E=j;FyJiKMQ<;;HkE5K^kz)jwRgu(b6+H(Rmdosj0L8s7cP;}%} zd@?gp)5oLd%IV|SYvb|skH%&66vGTk!cR8$hR1)Gc3c$j{?hcVR9g6dLih0>hPk+r z>$qa_JMKW|P^7wT4;(x+i=t`1VQSwy@aFf}2c&j_XmRwwHlX^x9flOq)l++~gxt<6 zxa02NHplzHTrGc0tgC-ua}*k*9AFO;kz@&LhydOVBP@j{0A`^5^uWE)a|n%{l*$yo zn&j@E6YSs`VXd;bWb#A@`Te9>vabhIG?NJHF}ug&IyRYUTj;|L#A%V4ynySWXzVyL+eW>0|u?UOT|z-}5+dB>VJ!(SzJ712xa zp{K$Vf2qubyJr8X#sC0~2qIQ~` z2bFad_PBZYgNEW9^msY#h88(ad7Uy|KC$tst#pbZn)Adby|27R#|tbuy=UGf7+~Os z;BFdOE)xjF$KYijM^U8-c;Uu#z$W<)`B^ z)cD0K_{L2qt>E=21F9JyQde~qP--Dn3YgWQAcQKv;$TM#k4qWbE8{adF0u%it!BpF zbQ?;oh+&Jk;o5L<-U)n|+$4+K>`WQ#<<{EA4Z6v+La#0kOCtB9KQ}-nwek`-+g`xE zOrD;VBB~p4j0+|}cx{WNyw%znbN2=gvJI}1(&-2_RP7EehA+BGuvHCq))w19UeB^A zt$rb`8i3sU=Y&6WLo|eFXNhZMb9dHM(HcfD6H_aOmJLldDyms_f_90xNQgYm-CS!& z4wcWYc1^yyNg+D5M$H*nXhR#icJvAiZV{6*OkE-RsKShrcLf%$vWJr%6b?=fBTya# zPYrBP(^nzZGUEEg>&&Lt+44waf26gPJTGFpPZhF2;KIV3Kd@HVPqb zw)(eBU1D#76CF zUQ6q}SbyroAMuI7adLUuoO%Qft=G76~eqgUgBel+%KNE#Io51a9B#38@e zxeApMtOe@z?$4J)P*FSv=5;(WXVx!HmSvk6r~3D0kv@qqL>PFeotINLLXigg0?)((gY{Fwc60i-WGvPSvUK3q43 z3VGiH@f*BX8vx*Wp7$pS+%JgwHORg#@7geDR6=q1q|=o6D;sJsO&RcS9>pDmYrah7 z#*)Rytw6&+xF8uj<# zKmT4fbT#mC$fM->O~fNS36F5xl^PC@Cat&+p#!OUV5Xy&&e(o|9)(nY0lOpZ$?elN zAjHG(D9*nS4SYbO5*>PIMH2m$HHP9Riw9nb;*oMI?3 zbyCbNQ-&@Dnsy#|H6)H)jq%?~80o#F+F=;a9;U_1z!j!NZbbkW-Sq?K;5rMkBo5tX z9d5!nEDvjZ8Vkvs9ajlgX!1f`@VSgS%vyUPOamfk3Gi!fQvy;59V`M9eFt2=oZ-#KJmym!;{OdLW}<%=JE}l2(Za5&aZMQF?N87-LieH5`Ixe-91B?fQN-B02?5lPj?BaFnLW3e@fPaweHi{<*%|*v)(TxAiJfx$uQD)!y1)N@kW=6r z>?@uCN+o&a-`FlqY&3g2dj6DES3}!$^z|87V2B4FcvsqIleRl^-Gwk`%gHcz>nTn$ zPMC+sGM+Prl+wvC_S6kDM1M(}yQ!wvv9I3^fAUu^aBe&ue*2F*!v7loEUCN4!?d0I z!}Lv@wwB+S5)=Gj#DD<*Q3V_QR>M49XA(MkT8^bf&v-(|85=1`v-|DP!^Ra6-Q$** z6)Y%il`}UGqB;Ew>g_3ZSKI(H!)~R3%J-mR;JyOpM#W>u?6F91p`G>;&|U`Kb%PgA z5xm4D#r0PWMm&RA!UT>(9a||M|B&%QRCqLUvwt&$2i*XC3V@HQ)IJ~5f05Yd5;>yh z=x4-oGw`~r6B%F)TJ8q}1KuBu*c?|GQo_uoXkSN6uVHrab&;?v9!iP^1$;upxYkUZ zkUBhb&~uFg%_vIY@K4!*H$(0G_ZTI7CG@@aDlK;3#HB-!hed40mRGpQIV?lQt$2$) z`F70k<2>gXaGJu;!Dp(7>NODFT8GvP>|?06La~wp?vLEd@Dr|2b1c zAxrTH@aEMCmuBgii)dA4o7D-C6+Ifr)-jj@usJ|f2XrhugEh*LR<+AP^tgpP!n7PW zU^7K~^`Gu(#5_O$B(_Q@kFKg8@sBi1IO>Yra54cUlo%YqW8R*snm}!g}5HZd1!!-EyJl*k)ZXEv&B+ z+vErbQhcYfdPU#$3&_9h&Eis|VKB^1{kbO0_iXdEA+xQx{|HmCpy;=jC;Yz z8n9SJ;??LN$BWZ3R)b=hWi#Stg>icqSVy*(@#7{fkb3M{W_nRMDnN?Ew2U;6WP71{ zb2$Zd;jYTDZg8wyO=#k&+YBv4?x+q_wiN+v0XZr#!>|mtgUSFB;sJgzkNYLUT$9N#MFyYeEoS*4=9g1U$< z%DX!aysTxTL#BVA8J|`9($iddty(r#juFo@Oq=uj8BVBkF8N)t<;GBq<7TErod3*` zah;Op6ai+6&No z?I4-Fl;4u==ar%OhbjARGE0G}Egx90y z3D~^%w5hCU>lK0nJT;V}=|79CegO%bzdoKvWr)A6dYoZ_6a7p>xyZ-M7~?D0Yd-4a z1IL?*y6~0dq3_&t+(F^{3-s)Hg(5DrrjIbT#2kMW>6}tCnqjI~;j6OzCFFfx>rsE^ z#%dI8X!3s_=eiXYi>w+r&UZ#<8tt}~tJ0)vmGWnO-FH;>!HBDD8NyADErKjxRk z*l?DS75f}{tc&l$@b}h-1?cjTwP_w+_U4YTg5iNx@9YfE5l1Y#d4yUZ_?dp08hgL= zzrr7UZ5dbNd*NFE>1b*bY8IZn;uaF74Y`3CvrdOh#v7tvVLDp8NNz2a85=KK>*H(~ zG7UVM8mp@2tr7=R5|74U~l!%8uE1ygJ~gYV>AT%cysYS3#UUlmPY$q!5Wb2h#m z{^Tz;fPW>7`2Ad1wDaGQjz0tte}F~gZCo8d=3Xq^i0h`uW%p4%d@t`Egr$;*mK0_D zkQ_|7vJ=?vMnCV`cY|!sSE*ICB{KOp|SMz!hdY!aQ*2_#ayml$|I6s@ie zb*J{+g`e?r2+Hu{2jO=TzWncYBRs1eGvb6A?;y~ibB9^mEQe%Sq-fS={!PJ3Kf<*b%LzG=({%dgn^dmk z5HJK$Ch=D*P4VOv%-)187?er?wq51p$SKR266JWOt%w?5!ZZ_=kKYT!RpG6**vcv{ z@@9!l*Yc?wp>o>b>H~s9#(CI176BTh`q(C~sii$fgiwUu%~!3R#2#N@G@w1fyXF?x z%w#>o`5j%nO&KmE^2+IZgnee*a#{=~BP;gD8L+bcFdg%8VM$KqET?qk6kLAhZN?q% z#`c`p08hdyEApc-OtMdrWowxu^P3%-afl|jmzbB#kQ_lrfzvZ89sOw-Ry>K>=-hiT z-^=-RBA((=N(Y&c%`tTlPFoF)0NxDkUK(okYV>ihRP(FMv+70EZD7ji#~Pvx-Ky+u z(HMEY3fI>*4pwTY@tgtaZkpDqw8F+(6RZ{OUDlj9?rLeqNVt#c$+jw+)jJ|5Yt!zK z=Pn=VZH|=4hw746)NA00Y2uApNT<74sz;d0fbNmYj&$RWw7Q4cj23a}^?uE4>c48d zHq@?@9arFaQhivuf_I{C4=vrOg~s;RW~Ul6XhD}W zlJL7GBIAt;yW8p{J{FfE$36qifs+c>!mpC7;~ElCeXq$#Pz=I!0C2M)hjg=+D7mE>BpCcxM=Iw`*=P|CA0+mVhTCnYBBkWj*#P;LToaX4L3Y7n5 zk-1Z_WfAVo!=DBGA zP^T|0VHzG&va8$*ZQGs4DA1~lHMH1R!giuzZb!*A;M)q$iD2I6SPul;!?qOoCh0h; zuzI6X%u?Wc3M{WI2eO_SzQf~Fz>E@CZ)9)F@)CTL2-FTlO7=#P89qyLB$TD&`sQ$} zNu-f#_hV(PH9YC)A4mK`w6xv0w~we`c9_#UHe~w|=I68I{_&v<*=J$;T>seEBvWS( zS!cb6Wu*B$1^$;=?;6{eg5;|n>vfsXVcenPrdH?~V_Coa4=jVh3 z%h7<7hxqH}$?|>%Nk1yipA^3Ei+PD?WO6Qt3`aM~kdHQeVsOOIa@PY zS%_rIK(JknQbe)-^3+*=WFOH{EhD_$3Cy&qctLW_6xg;BXHjJn*8&QCeNQu#aPZ|= zb4C9OY@KGwX{I-~#&OEQ3P$`&vR@;Gg;DN9M+{3CiHiItWl4J|@L1;hw%d}m!CC8QGYhwzp$TBtZqdb@7$BV2-jj1ZUn_~(ij(HV7b`6J= zcO%5}q|T+>JP3H>%F$Vm3#ZKQ98g~*^;PFhuUub0F4vy`tdB0>ay*DWU*=!+FvW1r zAeWz~)QE_F0_rc(ka%c?vh!xS)`WUWf0f|<>PgDvpy1ED47~T#rgZo``X~3EeU2c2 zx|0`h)gagRgZR-apgmH(PMqFL&xQJh#i&%zupSqeP;El6*DJ5NX4t~3D?^i|_7V~- zzP>gryG3os`!w0Phai3*0O#@9n_EM);OZJ`x4w=m{xuRsam+8eO@AabdcnRyB5U(? z)=RTZO!p}B*z>OuFJO*uV8z#-v+UmHxFq}XcXm<49o^rU0#8lJ@MJis(9R^BJiAG*|^>wN3FhFVc@g_#ZM2o|_5Jeeu7RLHe(TU;DG( zuz1h^;pzu|htemZ#S4zZ z<1!@x{YPJ9j@+&vGL6p24GE!4^~0qc6BWYPe*Cg(4j&R`SNjIQ}3okY*8eQw{+%ID4#uzKEkPX_##0N2bq|5+)BDz#c}+7 zp7Wj3J9VV!&}-I}#T_FnG=92|+g1%&v~f)lx0WDD16jOjH$?-;%6 zk1yf|)eI?a^NynH?uhD4G^};=u0DYER#|N2{R-b7H&iiL=z(~LW{EQT0nc7;=^9rH z2-D_1mVjCX_{bEzp(@ig)~4lDu}q&pnN5H4%8C> zbv_H^h~6-Jjonx0QHU27vt)j{LK%+}Zk<-jEdkT4@M#_S`g7b~dtJ6bUa2?(#CI*3 z6n|a=KKj_&B7YSOO9Fy-|0*;fIwX-1)5x1C_Gb>EFxmy&Jb>FeYc9--$5Bjn^6+Ch zxG#@x?MaeY3aQ|(u)0YVBS-}bR!es799XCwL?Z7;ey;PrrV;HS@n_(3 zeHlc?d|CE?yh5k8XxPcul~1vPkpy@-aM>l+)oqVZrY!5QG*L>kU71>75B zLx#V6AJg@X50!b7Lc0Dm?~Udgup+G_EFpa9VIxw_u_4_%4#1xnY6}TUSknf%ueDXl zFo$L5otMwkta+7rBem$LlR4X(>^&o=$Z>$*G&ZTOhDX_-v7Lv=p%@LuL+;}gN7BSo z$5zsu;@uu;PRk@4rDaHuiCz_{={80JxQehk?PJfMTa)2B#la{e~ zXRTE;HScv z&@QQY9_96-e9mQDfYoLA0>VIv&&xzWzRvR#mgh6Osmkj`NW94ORnvQ5c0E0j5I>~I z0OrWvKHRZI_rTP6^n@g?j*dJKB8QL&|*Hkvix#(AN&3)E}J> zr*UcX*x={3Mup4@Ny%k?ax0*F1CXDG-!Vc+5!;=%$b2Opwd7Q7>s+C@SDR9O{nSF$ zEXceM%x>>LhunT@DRd8$^E`@x_I5@2Se!?=Z(d;06?&vnt7b7uKmYpB=%a;{m~5X1 zgg2SE|JCI*UV@^ZySXVmy7c;HH2EDkSO%!)vWMC;>+#*ZObRTEL-X&yM(a_KeevB5 zIM`RC!{eMG3~18Qv=_s@39Z`XdvVh=uY&VDHh7fVZO|0G^w!Ss*s~D)!W(NzZe0@= z+*u!diXTe+l-1mch4g3w7Kk=$#!Nslh0d>q_Sp!iv$h-! zbG97_bGIMFGLKd|c;B8t#g(Cxkf$w5GlQG>^i`15#*+y7Cs-(jY9y%1+~S8y>|;ss zoJoi<`T48iw|?E!#eWP>{KKO2Iz zA0kB&49UhC;*Y?Ro1tSjsJ;g;4BBe$D2b5+S5b&T8*Ju!A9A2e1~5-xCNJ#6mCU?g z`_C|m<2*>B$|m-|0o&T6@i21@!xHQ=YTuJN zAT>r)h;oK~W9&=ex4tkpeDYhIovL}Cv0FPjM0F`{#`w-n_DEM_Qa^j64Eq%R8 zbEVuqLJhXJ$XbBM?}bN7w42Pq*~vYW!KWB}<>>X09e9;xoZ-^A%pSn)gNSdjK?^v_ z>q%7j9LDH01eqMT%jc|~HOxt9y~UPsxQbM(8ByGeNoMzzkUV^jvO1UIJ!t_GO9B>f zE|m_PXZz1GAaMu4dz;TO((pal_62vgW`tE+GPvx!c9`URk+F(XVfu!%AhgoEIm{eh z<@e1ef%_BmqB;<|wsO+Q?vdST<1Ey;l+kd_T$2#uXTSUkrLt~@KYh9yp7`>d@Y{dg z5hj4Fpc5EZMve)ecY>)Fbn03nL*Gar( zBnemkoShdO4mfA{aez^vzZ1i%|0y&ar%;b&cBoZA{(?M3*wqwLTuu|omWZd|y7qy09T21lF) zRhh9&ax1R<4~=a9889G=SB*bQr-7VxG6^KDnQAr3`dJF#A2+bne??C)hG^194zuVJ zj1(|Dap*#rMKCmXCqD+`SHCtGGjZ(`f?KR}gsm{m#Iom5?*?Q_JkvGg-8$4>dLF?M z5z35B%a&U>#c^iEDg3S-)GC3Z%bF12(Uzqlb|eeuU$h#8T~%7tUSU{0^FVlwZ52y_ zGGxdKvRav2v}CKrLW#(*SWnh3VXsNYs%dMkZXP-JF!Tqn3L0t1#`T2rLVK0_w5gXJODCf`b9mT=709T%1Q;!_FCWo% ztwo?{X$!{qEew<7fVGASECOS|;%n0?MaL{?nG)Eaqw+U9ByO_g*A15oa)^6sdsXN` zo!!BZ43r^(NEm$w`bjNjgdSWcbvc7d%mGxhRXgvFp%4%S2z8w(Bg3Qg zYu+;`BiHc8`C`qVE8nrd3TJ?UAeHIq^AMj|Abn)?|CpM3 z8GT*7JlAvyoWh{`Sze_&(iF zZ?9n=Qbcli|7}>F)=z%Nb8n&2-yzra?ZaVKYF+r)h(AYz|7Q5glj}nVhJ%UAQOD(P z3OwF}zsTX_g~sD?n~#U_TTYPFhF?bi`?M8|?$6q~Kg`@RKo`s1ApIV29%hfmQ|5ix zxJ{SC*o~JyGNH&{(_yqJ>y9B`AIAWJJqN&wiGKK4NO%kgI0ygq(+kdpUl}n8qW^mM zg9#hL!o&X`W??+>j_X66nVqmhW*?sO0+M`o7fg%YTN8?kr0pdOu&jxwsXdoN_m1;$ z^DRO;s0yXD2er9l=UpI*rQrhZzv98{X|6fO3)Q%M$(G zACMq$2o&7UuAz$+iJEgZ9>pDUB+SH;G@H_p0{ujD{@A+l#4OWSUZHT!_3%4i=n9|v zB25jSWGECZI(wXQjjTaq?~g-q8xHsZKoYH6u(yp<&u;W`yfYQjYcuHMY5vMQ@4-Re zxewpRQ9LjV5G06cROO}n%)VFnJBfmSfqevNkL(`MJ@Zo%WNF8`_g`XvMG`zsh-Xxr zQDrZ&W$D8=2Dg$7&lqEO*+=x4$Tc-}|E!^=q!uQkT<)l#4OCxIO}V%rr!h>uzGE zf!d=EnnV#`4odN@5=v9Hyvk4s)seQJ3>|yVGp1{Lby?7~8*!JkQVsyWX-q zw)Vi{4oy5{UIKM_6NIN|h(e2~h1y0q$9=IG^ zO!%xxit#6^iVnV?qfu&sX`2^rg~oYy1M$NAvn=QATX=o=s#wO4Tg@gJpc$Fs63LLe zU13zgnmP5eXzwTPg_+y2LlKyp$Ub-HO$N5%0XR#tJ+>OV*UQT!iOvpx+R6*n znykd7UD-Nuc?RMIGjFugds4{^*-F!@77FE8OFd_~sipv8i)6=i4`8ZWI#?bLxO0>1 zXXv`f4Qn1Zf(mxg6a(VkJiEDp$H|l2)ms(kN@9XHNc<^k+?f~AtXBb!7=J43I%x%i zDfk6U(Q8pPNe-y&V5_OR6BkqQCQ#&98B+!q>~Ku(TmEz6NjapV#l$vW#( zBqY$BlLzo4Cw$l~7CTeV5-6b4JC}tmvmj9pG)iLS?MCG62Ex)j_M+2k7)ZHa0NJR4 zT0K-a5mGX2Zi3@2n55Z5B48(&8f9U>wlqeM44_Jj>P%?e~sa2t$THc`&xC_9O-r z_95dSHK?ipwx^jj2WB^(<(TqX^Gpgj&w?tGU zmxX(#6t*>&2%|!KiO;m(i1%6dGi%&s7~-`5;ady`a(qjHu%*Fykm1{AQX3|Z-dzBU zqZ|wTOb6SVL+#ITZD?8X8~vu7QzAg8=3{|b1fFx0n;OhGUpp6!4L#9luoi0!`$XHA zi0?JhgFPm}Udw~DSsrt}fPDSCv6;P&<)gf%1|$NUOJ)Q4Ac%x1%(kml5VvCk-|^tHk#dXGw#zOT2d^&a(Ag&k!~s&L`QIrY2~#!A$0O8`q(T zuT9=xm{yA~OZ8g?G%CaNLxg)RFs@CKD=o`)nkU?jGHgVfV{8iSjE>Bp=qY`sKgRkj^En=uXF7}4S14*}gDD$L)lV#l-S(!rHu2(=PxC8I7OhxcKDv-f zmy78Yz6>$!IS_x@MjQY&dN|_-r6Ms3=(D)?B`R8e!&euoI>&q5^p1o zHt;?F>M;GV8vp75zF0pWCyzG#7jf^r@Rnt4wgT~p{h)oc`1TfBTHU8P)$Ns>V{a@8 zk1NwF*Uw`xUz(`mMYm1f+_ z_i+>7!%h5J7>8S8%+`Hj{Eh?opDFi;o<9ABx5KpO-y*qj7joTB)cWn<{fN>avS;p!!C5;`1HhFT3b>=Hd>104siotM*5@YN>{E@H}L7IY#>o=9%u@ z1R&_am4h%PLk_up*D%m9c)+I4-9t^u!*2lGuOr5*DQlmS#H)ZW%@ zb}QYWP<8(mS2mk#u50%I!vGEeRKb5L+FV1lzrs>j>VZ3)Jo_kD(sS@II_@!oA-YXr z{K@bA5tjO&AakAzxm~;u))&#QTUF%;MSHy-?F#m)$hm{&mY(BC6aK^!d|b+?edeaa z5dVQNd*klVxpjcgS1ZkU*2DC#gtobxFX8LC3}r(9L(R#y zW5LvIi1&OlbLUY?*#q{wPLl)6ZtL29ISftgc%7ky%V7rQu{qnBpL47W!0+DiBO=Cs z=J$rU?5P&QILzb-~`KU}*0-B7%#+IA)hV7Hc6)&GhASgcl~j3F|_0;8-qWV&*SHUR14xVsz# zz@pP2?kpdoAr&XptQ}`5#&j8MCq~_ND|8WamQJ2xsTUXrFy6exug7J6MP3iHci#-N zcCjbMesn}8z4Q*v_24+GC)ROzC{k6qqtzf}E!kSLmFEj_{S(Av?vq8P@wFb63ioNt zlv@ki?(w#vj70nqtqR#$=u6)mylqqNv85#0ZP(+p62uHGFXP&b5zIQA0?MhC)y*k zH-~H=RnYR=8_ZDQ)~;3E8K}H6EsSXLufYmgm9fZ56ff*jxC}D1&2$JSg2ND{9xHcpe$GG$fDB;e^@VZr@KCW8N%4@GTE4ODc-U9Hu z%)P$By*vTdbTUt?9!7=b8sZ4_)&|F|J&6jnki9!Svi0kz6bHw`iS|}aav<#-T4d|e zgimD-h2O13D#zMerd&&ZFUz%7o@MgVXq*{9EDNT0@LjV|Q@cf=5>j-Vx^V^%N~8&U zR41R!0k=BYwggz6fJl1OE}1mR9uzK9)$fM6^(SK_QzKQQSG!le6@|q5G)UZ0e+t;f zXcGHkVEcBR?Yd-|0DWw6$-~fX8J4Lg9c5tVc2)KqKARfgFS18PfWF=EpoUtn>s{SH z4lRCF@Qgh=FEHGLvMO#F42bwKfHS`_NTrv8>)2SFUSCfd6z)M z_*^d>Q*&mOqBCr-K~fLf8fm!sR1fDx0mn@OeZEXcXkXSjT#`MUc{<-){iG~>)Ww

3teoBb)Vm={_xeg_Qw5&%PtWP5YQ?IWWR7;THfgT+I@e-eS%GWR`NaA(@nxQ$r~=mmX~@$VbSKPJaM0Rho<|P5Qhg(1 zS6fRVLj;=vnoB74+R@WoF*&~73}MZKWzM4#d&e_BD*MmeiMBK=W*yu}H~b^oZ!(;8 z7WY)9FYzb$w>)1C(mD3kGSNusIc8LR_e-U8qvyyMZAD(?*|13Rk4yo=JPF1d5ftG1 zks9i2d-22o^mdrdkxP>&m!=5PS3vVJnX@IT+~kqw_137)m%#fhZm1&fHNf~LKfz6~ zz6#!xG~1wDNXw0bR$t@Cxdhx-2oCBeF-D$X%9GFF_e5bT)>n@&B8L|3 z9@vke|NOI|ac(I&W{X1c#C$g6)Iy>d^!nl{@qQsn|56P1xN=7Ig7STOX|%v!Bh&Tu zRUx{J>VAPd*=y^=v$s&wLHVV(wh#iWArwG+N7;|nddpN^L-9vN?+54W;Cu~FPn~j@ zgIM1S){khsju#)Lz8CL)|5d7J-q{qMBiZ$Ni5{_jAv8blI_8_3>*D8&Zf_z`qT1-I9S)pt*!{Jt1I_A#5Ael7g=pRkwc{Lr7h%WO>GXaT4gNKJEl@oq(zP4% zhMB5p%;{}+LTbygkVTNq?1Xa$kWxX>41VYLp#4l(b^0odALIl~ zzzS}eZ7cSSC$h<`y&L|=)R)7@NKtt7*QbW37p|w0>#H$d=kWXV)8Mkc<$FN*d9qMn zB`U=;L-di^b(c$lh~(fk))7C-zzt4jwgFpz7dgNgGEs2Rp&#*^Ht^43L^rtI19lhf=d_R7lY4FuG*dkB(2qk7$j>kc(4!&g;FWj) zpiCfD16`xk!DDpX+jk%OCxpVTl!q%TN6uk4=X=n$d!bm39dYgT*immW^$|H3)5=1w z?-Ve5CWt?4(=iM&gYK+x@b_4>^{y>@35~Xgt_|Bma?5Uw@qFtTS>GI3s>0t4qh=5m z&LVIe%LzG}1DiqgpSyBz_=7JM!?0hb-u$nR50mCy4&zXl$8In)mO-Lbbj-#1GZq1P z{Av_?0@n`mx98$0n?dv7nZyf`V=Hh!DciHQ;us^vd-9gkVH&c154$l1_eWjZ&WGXM zyRJ}3lbN@kMASbWrfw!?Me-kyFgc|Lr@R> zzDCai$6L&wh0Y1SS|U5;Wf1j~93FNz0aqD!PZgoP_v}4>q+ofoZHG0_TcPr9=sS&s zfBZgUHE*I@P`d_-S7O)J<8aO3=s=dkG+dW_&%g(~%^(#QQW-0La&)!K+_@;9lzE{X`c%93T z_;BEMsGd5D`Tr8e|7)Ro0;?LA!*rsr4lc3Iy$si|)5dSO$X*Be;{!XqsjkLd$p-XA zaIDB}(_5iMyS*Li#wmd&t;ZR7N(+c}PV(?vnGkX_xxcEm2bwE&*#N z(TZXtQ3*ZGZC^iriko{4SZaV%b&MHR5YK^g+k19Ws-;8?Dm&|R5Tf} zeU_iGZak0)dRwfG(pRa~Ek09gZgoMvw0sgMA5Rb#bQ8~&Ja;gPO@ z$C>JrVP@?+sL|jeN281IB=(YHzKG1B9A;6KnFI*x*QSLgIhum81yfRdV;$dj8N7^& z)u+&4QMPj!SRz?@q(xV%oJ$tjQ4{Xw%_P9+F|lBZA!U-aD`I=e1Jx;>m-);PF0O;f zadNDw%V60>F{_84llBj5^V;Wb+!bHcLg%Fr$Pz#&9g=hSk(D?U0HEsC%z`f zG=5fu$7eUc8#*a5DdXElsl>rc@p+N?t3({~Zk6}-k#sE}f+;c6qcv8cO5~JfX|b5k zA*q3jRamdU31Kd8f@mXW1OUUQnBK^!%MF2+^(x7*Wg?{l@8^gPl9i{zT-Mg?V%#ZR z;rD6?|5@hjs5}`u-4=G4+}cb0;1G)On{%3V&|ry*(;28&?oPtcMo6wj%i%QJlYsqX zj%=0F*c2O2Hs$%aA`m!ijUfxscXMbx1Uhr{Y$XT+ERyNfL(=?M zWZAYXYhzjdGzVAb6?JQp;g=k2F&n~@wI7Hs;?GgWPZL{v41LcEs9N^tIk+^+sNAUC z0R??Pt?E2ZVI89!Yggs+$N8EiioqtOV`_{PF|*FHrHmcybW@%fP>3L5bH+8}*S`+uq<`Q;$AHF#7;{ z-hCqQ?8!}{x_YoN(}J%3Wa!@Jc&P1 z^!Ys`!|e=DFF%9siPy#g zm8)Kd)eph$2YHUU0b!Kd79g1oe}>H1aFUOYhs5UfoQWIgrgSuPY&agGC+Xhwg&b94 z(gY9_R-ccpEn}&N`4qvx#O0@`Z>ZdFv2ZG$P#4ecQe$2~9$a|^iSO<3#jh`B1^+&@ ze~LzMYi{8pu=e6$d6x{fmf71+gcQDt{H}{3v->r2S_ujc5+LBBusKc+YH6T(XPG9s z^E8_H1?YraSYSwg)#6eh`!9Ro9H#-#Eu@p!c9S+4Slr9_D_TwN3lxq?;!~Il;o9&% zM>sHT6Qvl}9uKqEU^&@%80b3!{vQSZkFaN6B4>Ea`fFh{x<0k`FNd$Bm){M)_Lr1` zBCX&*Q)j;mn@Vxdd7K@ugyPv7RKY{G-Hf&Vz{OBFeubJ)Z-&hFoA~4IQz3%2X1cBc zP?WXI9)FKDzsEoXobEDkjHeIWVgL%$&XMalOi=c>ALk-E8_bBU*qI3YE}|gM8u)3L zO&$L#u9Gy02_@VpH5C3H#N96TZW=pN4+*5j1E(4=r|rA^ds++6V9Q{Jl^)SF zKLMwd=K9H;T4~~j!p?)?ugB6Z;#a=PPX3?azklnc*d9I=%%Ab%DtQrW z*-x(}y+qMD0fCO3vgIOXApBwk1*1tSnWW;s{wBTwaFxVpO+e!}UJs?cM<~}tB*4j( zAex*3`c7j2AW2iJ%x+w0n=PvUD&rE?)Ev!H+PZh1#7stP(SPV{7}ky1D?tiJ4`*ig z!Jm*xbe$hD`1tTGeyHw*1pBCmGnlm6A9HirM;wsDi8G|t`OAFP5)EIQ=dVNTIGd^i zA0iR(s_zm@xJ2-G_6^2;-U@w$0!>O`HmH$lyESX=B>1zuO_oufLC+8u$?!ah9#*Pv zoV^RL-;W>b3^3G*3>xPc0^pp|Bh+L`b)8B@4(h0$eIN2e@g_k(K`nuCnR-&WeN@jP zWqKn0;6_9H-z5m{-hGZRhq&;}c}fyo#wmH3A0z^0x>roc)ial&lWvAe=I(oih(J5n zv;RUDu+8VGA9XH#yunRJKS&k+6!v4X*YxsnpGp2jWn*vUd>UoZk{^nn`SxdhKd1K2 z3|hyt+LM{Cm!6(v^CEoWhct zkpV%w4Pv`lW=?kuvqen}GsXu)3xK)dKn(LL)`SAB{`20oBdNYE4=3tLr}@w1@KiT? zyupBXd7Ez9_|pJEV?q%mx1hHfgfZ!$MtaAu5TJ1Ahor0H27!->T)gJ z8s<%dmR0sjm)bHknP#gJoQ#nZL}~xkN>7Ey6D-42fi(PP8nhL2x@2aSkz{KNQh5Gb zA<6ewSe`klX7;*nPLnGU;*_5vQI@^K``Th0g(%^Kk>35f5=XJXQFiZVID)f`MhYPQ zUsX}>%dAGm{m;~nuGBTvaNNu*aiqiX55Fzv=WdYlw>Y~+iXPOUd#F(pVhGGXsGhLT?fy-+6!DvoI8$>WI2zdZ_kw!d$hoE^zqLo z;BxfB@qh~B0<93!s#YcTq@-{9jm90bbB%_4&xjy0B>1FPi8V=$2XyrJ5OkVYY)BAi zWOK&E*}y~1x31u&F`q!Qk>_U|jSyuv38Z5r9$_r!2t*%bZ?i1Np)!P;tsV+iS@kM4 zOTfq=e$IPQmN!3bZn)QK8qQ9E*{zts7$L=bdUKLQB3_G*40(OnGQj+CD~M``^E!5v zEWnZ{NGFy3%G zqY^<6b-2>Rdwfx3EuK%O4P6Lficq}aOp3#jVa5`Ye^qfGviJSG1v&?sp}eOaOx>{@ zk7apu`Z!cjKF}8mOzUTP97rYwH~8H73%eO|U|v&rBS!;9mX0mp1~nhcK5WlpD{0pc z9VV!sreiE#ARnDJufK?4gTgVUJ`9sXYg-tYc#+h-MI-<$ z3VoP<`fjWvEq6^=cJM^_l`s7n-1Mz5{MS=q%2J#%SW{+fIfzMjAdFppj)H`Uc<8m` zUq;JceGozK5a|9ox<1ww3Y&~K?R4_WH^QGz-*Ad4k0Y>dMPS_$X0ILybJrdSPXltJ z0l5VJ?XERv2?{98v;LJZ4nF?wO1|Oc)8I1!0J*CZR{;_%%*LYQU&0qp6jFHUZg}iZ z3Nb?e%BS(?ZGRU;{U?z5C!pp(;dQ5;{MMtW{ihgAVibYqOhwA&^nh9kkSlLJd_Di* zaS~-WhXJNAKp?S$iZqC#mY|GFQ69d6%6VIFKa6#15><_|hwyHtgUz%q(Ev z?Zj?V0+PDHph@e_K#U}p5){nbcnFRAFwLqEyW5NiCccPWDE_z~tIsjk0Q*jsK%`D>`zF=*lZP%* z8wdV1oUwNiFqg(5-zlMDKF?qW8Vm}^A>MT%B-lIoJq!n68LF9b37i)Q3Zjk!KcmA3 zHk2gcKyep!V;+PA-R#>8BP2aI_wxhC3Bm}t2u-TigE?@TP~j*t@T;MUV?77HT4p7G z+yVI;+nKmj~QHg91+-+Ykg`+vaJ{s4!~{Vp@Y=YbypQvaz23v1L^OTJWlj?Iz^KWL zK}=%OF|4UkL94%QC*`FQn24(Tj`8C~4W@P1NlT}n7HzU-?qC21hgJ39Rk->F2a5j1 zhp_`4h1(C2biw$_V96s3^0ZrfDShxq!J3%{2T}9F8)0bu&_=&>%-0l8ob!~~@i@6rm3yx{Zq5J+xQ zz=sx9#051*4x+~CcWF~aaz}{>F|~&p{5#&F4ACvNlTm=JoWP72RgTcEb!DQx zrN?nRA5IXnR*t_BM+FgM1f|nN;m6Kk@nR3GzQTwMJ9r0i=#kgxH+L?KfA$Aq?2`Ax zIQFDf0U~=mJ!EmnD39`vC!71A&k)e!JK~h^kk95>L*xlR@Reie7JktzAHm4l*PC#* zEtQfhsHnXR0ajZP0Pbg1?t^*+l&h^0SmnO0fU9@F&w3~vQ$V81V;{{C0@S(lb+HUl z-J}4k5b9H}a@Vuhm9Nc+jC8vXH|VJFO$H8z0R|#T0+j@Yc54?}gr@G=@mUhvdpuWE zhtJ!z%oj;CjBE`wtXnJxOLB~9lo-=!5DHj2+dA<{gj*-l)Dfp?{#_RyX6-c=+16fD z1M-vXlmzyVJag#FPvcTfvV41(TD&7}%Ec0USiK~e(~Wc-CrDzs5E?{bOO%_qS<*Kk zxC3`0r3k4L!{Rf26b`ZSO9Dii1C$GHtx7P$zor(w>j@<27{K)-fCi=%T7#wmep+ZH z4_eJds-9l_W=ND+4#1cKWrcgKFR>6SbTN-Gm;~H=vfl_vFt}X!PRM7z!5PmRBYFVk z1ZY^OA$nu2QNFgkriIvN5@HxK^c21ox-h+Dtq{W+&n$eCGY(!IHG^@8&UuVO@Lkr) zDIiJDN&Q1ev*;|}m0(U0Ji)s4u%2B!Hy{%0t(+ss3baYqSt&cm(hXLk6!F6sv%D%3 z8g&~0fM*68y8Hbw1GFdIVwPHAi^}M?eo7*Z(uyI)!v6CTq}1{M6wK*7(1dh6*Zrd#aD0fH=R;FibxO`zv9 zgM`+=gSIZ0-A$0`vDdS1AY#yJQge^XWf?`b$gsw9H12TAk3bGpxm#Ef$+R{ z{4v4x+DRI7H(3r@esn5)Wp?BQnm~Tz<^QB48j>uWU5=~oq0*|60 ziI?tBU5go>q#32E@B?MHtOO%;Y2|p#Gm(+O6IO9Dyl$0^H4HE$F$^$w#c;*Fnk3wb z3uH3AjR%}A&-;b}@gsXZ4on$UFlWSwAmwxRxa9;2NcuT`A~PiFYwu}UeM$rbIkq!S zi8dH0utOpPl*fE#RA8N-I3b za0yii6^eWwPyLVqL1aYm@i;s%EI5I~=se{+<4AxYAgVz3Lt@0gxGdDE*I5Dc%lsJ% zMDrOQ7}>n?a;Wf0`RtNVArPotevT0U0tm|T)Oaj|`z7A1UK$J#Oc-wPyvF-=MhB`) z*PzL4gA9S*n`;RY2m>DLyS6qoFeUX8ZuIjth8+ud?7y^zoBQ*jc(E^z1A4F6#&&a< zRi~5Gul_zf`t|TfUwIjp#k;?P&O#I^9KYsB8292?x{SWcK>h_J`;$=E5yXFpM>P7v zc-;9D;d{$wYPguX)+wmZvwlBf|2|9_J3{B`U63z{!C>$#1^}k5Jj*mZQr&P8ugAW8 zh5>-HVFv1MD-N*H(F6tsrmRHmr5a22x!d6rpP9*8el7gge`QPvcS#9~)x(|WCnOd-WFu?1GuUW!B6^HhUE~;ySKjv`(GiA^A3{eMeHT`!xVM#$lv?j!5Ajv1$iA%n!hOT;$s<4*d3llOa=bMA(2 zqk!F1%sE627#!i{BiAwF69sHL5^{S^A^+b4(7q3k!|X`(L;*jg`W;gzaj+M5Athr9 zN`jtoH!;jW31W!U?!%!>6j0s|UDD7hcM#g&ag@m6G||y(L`~2=N1|}#a_HK1g1(zb zzXRm`4*ZNP43EGMIT9Z--G@Y1KjdC|5D~kF_-ooWaxFHTCadEl@!ttJ{!AEyp6;Mg zX7gr#&o+eQ`Yl96!~g*Qq}5bwO5EAE}`EOgR-1x&X%1>0C|Gknag4)V zJ5Al79OGG*nj*dW=iw6>E+vgf$$g|QknnE%tMUm-`J83lD<`jqPxhX_OFRJepSaB- zzK0-kmmvCP9Bj|oOpz^zRZL|WmfU+el#dZY6FzpJ=#Mj`U+a!0X^2ZYx$itfvW#N% zox8|5#L4rFYmtr3VX^nv6n5_Ht#?8fiRW_8oJBal z0OngJld>5MZ2D?}FX#L05uZ5(pqEBIH`!D}P=(vQ+@7PNOo}o)Axrj{^;Yif)j!GylyPuA?lR`#F{O z6!_f%#H#NLGQEsdsCswlS$Tlwz1eSvdg>dYkp6lo5)O1^z82=D|1l0Dbe~iKWb3z^ z06dF5QUHz<>957e-U?G@<-ZZ@+UnNRO5X|{1PP|=#vT{qgXvxWGbEWO19Z2-kH~o7 zkcm644M zMmQ$oK4^^;IAY^@(Q?zMR9i18!!{X;#M820BBO&px9pKw1{p&Kf+F$XP|n{cVTS>>Bt~#I8|Gla@daX-jNX)1SzYC`SYM9d% zWJ0fQpw`vl7+ELbvFC&yC%4KPPOTQbdAvDNZmhK%*zvicOA3&Wiv#GyK`D1Euba^T zyB|9mpbJZbVx*U@-Mk*h16nq}$da)`y-MR|!$7z}Mv7m6B>3N|a~1jGcf|j=3m?dD zKqdMoc@+J0%HQ`|51a1fX|sD zPyzfafPa<8I=#0{53VvGP-CjJTlq<{@Y=z z{|0Hum$neeEDy!=O_BzdkaE0^wB%jk5C1kD9va4Qz$ZtC$ytl7*u(~h4kR;qCwNW6+;y)=bl1txl(L}yXgc^mBr)$=c<4V(h}r*3 ze@O|Z>cRn`ylN7j1D*wFo2x78R>E_`4aoj@?)>iPPbSXx|^g z*jGXqOG)F(&mDmz*{*S`8TX(iz$`3LbBTF6)(xO(Q=63R3bP!hTFg}VA3lCLqZM%H z-#xuNJn{t5%vQ+sms9v1EOyqEyC}@s|;XKFmm*m@i&A`6``=6m2dX|Ai zMg?VGlZF+KT{T$%w{?tTH;ovcpXL<#^S>nEp8Ywk=Kqbq_-}=cJE?i(EtA3Rk>v1g z?osN9Mek}{AMlRRo^U? z-8A+wMck3Mur$5RWXh!4a-$Sh_;TW-!M9v|9(n&Vrp)kNe_K0`u? z$MA$aaF;0iA$3I&L_o^RBmI>ed#zkt&zO4x5$8&i~ARV_Sx zZc*y=qsc?%o2hUEReNrE&t(f%Cw@&!8lyBfVNIdwaZ6JViV*zw@vUkyShe-mtvR*_ zvpylU&|1(CH~!Omm=4tZP$jvogb-UKT`6&o)}BSz*L!mC%l)nQwOyLVN6uii0jE34 zdb6|)e3!OjsRjZC^Kn-gpw5-y8~a71`)G}DNjM%!n7&C>sxnRM6@j{L=Bl05Bt-gK z1)?6ykeS5hc{2ztYqNT_6o3P@dlat7sFD-jDUjg1tynOM(y8@*-jhx!y;??+H0ro| z;8cLkN1w!|#5M@tY%okDEZB?G$8x!hAySzw!USP|7Wh)_pt^zB9D`QbyxB_GYXstv zC_f6EyUiB^7+#Wo0%2Y&(`-{)@d`=cZX`uu+i*P}Y|q_g+Oj`1W&3VZ%HL(0^LH4L zxOQ5+uih_`mnB1sA4`bpZvKa{cPNB3CE2GSY!S3vHO+|M@-jt&{>9q0X8TTKS$7(j zEs88{r9QhV>)aJ9?^<{ZZ7P-HNCC+?0*2Ux#85ak~%mXovDa2_*xHi3d}Sn77Rf$Dk*Cdu!SLKAqof@mL>^;6xs^9VRJ()1}ox!zRxBa@eGO*+ncU!h|h9sv8w ztK_%}wonu+4Oy_S$-6STD%i?6vs2}`Q)-;ib~1vqf_wl`U@5??k|$EIqM%X7Sy>*9 zWF7koIV~C06bNZh=rJxiU#?GRiOM9zsLxrAuMIF?ifyO)gtp=ppf0a<{ZLP zBIu9gyIQJG_`Iqtf|`FSM^_yx8ei*XJ0fxRG8O#FN~ANQ%HoA4w5p1b6{@1pkkJyU zUg26t)-^(WeN_d*ajQ?DUrl(`M@X$ewQLnR2=pcQDxFX$KEOYPVD!Py7c2A?Iot>E%JT{ z^^5%Vodp9?8(D%lc+fIfrb35!nR;XykruF|%zu@aI!zVtPs^))rutH!DPQeD=6k8f zT-*Nolcw#pCumnXglvcUd5&6%7alh|o*QM4I?a-mR01rz#jN`Kkh{W1cpF}$eyD66Nk@7blJcl{x0&lB1=gYXhhKzOa zFeETVo0R#udC!AbeQGs0;Wmt%Rn;lL%6#tO30 zIm3*-569?#*XlvD{q&zG{Xl4*{RIe%CW@CLbr{RX;4HBr{)(YD0sNo9I!FIte(0V> zlAoD|)?{G0%76iHhfyX;5D1_h=FHLzvlW);4Ez}Hza;Hr%&~f$5a2X|`L7{2k_VV7 zJe3t61&K#50RAr{Ya<)?oI>3^%@*Kj=P}(qZZbU+BsnG_+v&KxS@6G_=lMCs6P3NSkPAhki}tQf#x9!92jfFgK_cAU`@sT3{BsJkO8k&pCd-;yK|036jjj7~P5H zSS|qwizy#}1=2mwyd0;^qf;DTKC4zU0ag|DnlBJ$1yeZFXMP@6CcAVEN{=wT7%Fk% z&@*u?xv879QWKHX68F$ylke^0Xb#cCXAIjI7JbSEK5p0_k3UVDRny$Z_#rxt>c}@O zuNxYnxy(_M!;F?8MYYB~X#VNmzZRJGFJmd&MD%BnuUo8qV@Xp#*Vkm`u(bmCqvOi)s4#I zqYeAsHPL1V4fEKJj#1n`bD3P_^AJ4eZVviB_A((VR;EML{0{t*!glAu4-*hiXq;C*wgOP#kSqj2Xg;xal?TF|CmEdt1gRlK6$Ht<3C25rVLlyq+C&6j zFxcoZ{N(R#QuaTkza+lvF>V>ZNYCQ;7U|QG%4j1o`afh)+vE9nlx`;gsOaWN52y6D!J9nJt}lf@qVOw(Qg#cEsH#n z9;<3dDW$?N845HPX@CVs+NUt08KhA?W{gt+x9k&1*i|lY-Q;z%k8uk$QLUydJ5r$a z*nqz4uuRQAD%_C1DvT9&=7e5=oClJ$0rwS@Y=`gX`HTzV_^8x+wAh9M*juJ!OWQUq z3i!pNJiuOKLFFEl9Tm5%r>q`abL3VBhg~2v$I&a$uCjo$*oF~2*4ZFlhus4Q!uA3A znnLb}Cd}T+ak1_)OB#f~gc2pX%xvk#NdVW^`T%ndU|v$q+-X{f01A9G=kvIS&P zzP!nNuEa*zY(q}lF9>$;HBRa_6!d%9Z}eRDFUzshq6(N@a)4i+&lL!OLi+raFc4+= zY$ko1$y?wzu|t+8PB`d1U!bp z{U$*yl4oEP*oxL}>>E&}+)5Jt)d4k9_F$Q)T}d7#9yIZ=5)@h9SRnnh;tPFR=9C)6 zEODD81pzA+1&Dwv3|Y~yTs#?~Cb_?~3=85{6!7QrSB9%11H~&PhJRGysQ%xIVAR>v zk~|GJYHC=S-gObEiIidyMZfZ5DPmDcgwk6gX0f}HNb+lG|3t=W(3H|%DWSmeQXHc| z(T9=Ml1POJSztTDc(_{Mbl%cH&5j8d$vR!I+Zk&q%J3x3RWy~1(D6ymX#Q^A!j1T zA3jIb6a6a&Q7Vt~9pc$4@)`OpB+P%&tD!!{k+3=b`bNN!$#W!p#Ru#`D@SvokM072 zm)Ihg?NE=~xRa=s!%tMTi|B-8UYT>I(vPne;ML05(U8bGw?aD6~|F!v@QBR{~~?(ueC&1aUYRD3z2}D3+cID zQ^kP(4tWeFTfr$334Eq{dM9nNsSBp}XLTN7UkL`{j{<8e&2Hu1!k7N4%qN}st#rU6 z5@0fb@})hd#J}RRyAju+cG3Wf07U(TvpbE4O~@x=2+!=`a}d2KzDSeM#RdNI;r|l< z6fZ;yB(70JQQ|K}1|@2GODtE*tWZ+WLi3@@)eci8N+|NLjFYJRa<{4A>o0=-;ngmp zi!Ne;ZqxcEO^{wAbY|Tl_XNs4i2!=~M4DIkKMBKB4_uEBy8#c+M*h`H-|yk(-uE^s zpK*HV9>EpUkGWwKf;w*=Kknb<^dsa~9U2S`!O_rUj6pLle_Vpl#fXDT0F9 zJJt@FNHYw4snI=8zr+7!3KKsEWbr@K+QgrjN82A`yv%ZQp64n@{sihvM}G^M(X;*( zeI%#oFEezB%7NF39&yhcc^N>xfB<@lQpERoq!5>?OLyqs7#VW}3=`c8z&|xIslv(MFo)!ujOgcxXV2jHKW!S0lChY_COu7_fkJ0z z^aaN1o2C^E3+O{?;ZJhsU&4a$JB-)}z0^4bR0m|48_hzXF5&C1kOL?%=RgiqNuC^l zH$kuckr!FcJ2C$IDEIcUUr{T8duNjHgBl5!5J3hKdycYI9mT0*giJ^I?mPw(&c`s; zk#RznlkcH{zD&={L2&UX+br+-{{R!||2T{&J$8z^{AUQ0SPrfqZ}yjkbt>mNdZXDCm}{}{{)7*6h!SzOpsI=gXPaNgw85? z#{M*uf>@GdM5Tw%kP_hvBEFGxtiFrvkuHx&MFo*OG1oOxh@NId}~I2YzhoIP(bt%N#*n0*}(B-S3-?Prn!2b2g9?QTe@ka%INJ zi5(^2$WER%ODwJsn?mLkr40>qyQ({UkyHfl2Gdu~;^ZLd4;)vCaYBwMk}|pJ3+CD^ zxvGTP{K&e~`Qtx(wu+3Mw)0oamJ1gNO-~tH4Wv$yR-pD?^BAw+N7&Hu9%KHLanA7G zjZU&U)lm)dH3TBIfQSO)O zVq@W|^+>cUCEbE%Cd?Lc%LbDsso&T5?kxPH>2!4VYGuZX|cjN=*qR`+F8(bt#=~p$mH@Vh^`qLMmeG zpt)mdH$CK^Kn31I$>4SrY^GeQv_L=}ny;Pzk@<{c!<^2&6y5^b?HDP_Xt{jb1&vEP zG3$sf;K*`6mMYet4IeNK0BexD+ideP5OpDSr@1*uL(BYCm%YQJ!O*r2YK1!;Hn+iS zM%>Qi?*@MFGR5={O(}C1vBQsyO$5+H)Zr70IFFIIU?=<{AZim^&{p21eS9%{m+_Og zn*@X%&~iRxv+~HuSt1B+wz~y46+0F@fn$Qsl?8S|JD=lyi{SA*0D0cE4GJt;C6BXQRVmv99xAYjbk$y?Btu;B zO^6bQ0BlXXCy4nH@HKgbLI9r>L!O^58TmbaYP1He$stK-@mYI2M^;@|3!K=cngPw- zMI_sWW2lpLKaKXV6E6_suf$o8G@CM6*A$(U8E6)9jHi$D+?JgWTc2z{ZBV*&dYO;Z z+h2OVava*NNXKHOzniQ9jaw@REUJ1i81X#hweSF<%DxQc_rwBhL^xQ&{7u{9=M0UaNagij4%Cs87ddWMUJ~;uuPtgmAPx}M>7W21!8_F z{(96L0V)kp{-8<*Kut#jy+$NaJdUP+lHNfls0E(e&ij~y%9C5nq9SYBR+`>QCU%A% zM7-|IMR>0t!(k#i-wW06gZ?q@6ff-NQ|iNWZYMRG+ldjP_%Ve4<17GxABD*OOAFX} z{AYKWfKTcjMGVsUWAhMkL2L`?o&dVcM>s_w!i3yx)YES>y8uOyPx2Q+g4F z|D`Syym*jr0sl8tUf*HLuQ7kYvq!M`3{u{Qf$B_Twoe^3U%BUQxc`3hspSo3;|^w& zJ@BS^0D<*EascYMxUTb6(|mwR;N6p^p<~1}9UL?34yrp4)0ggtX%D=Op@Lf7Edn?6vIhG{sJQGvT<^yya1OikiP-(0MB+L?rjHxHn(1_l; zfsjIiX#=9@hJ#Fwx);&;(97n(-PysG-bIfWs;+imb(sGR5!o-GROEjN_>gG^{&$bS z>%;&S){-jop|(vU-j6|_^G9KxL8$ZvazO8zQ1polKk`7EZ&}m`geN~DD)>DHGDsg^ zcTQdBM~4^-b11fdK)L-R`4i>l;$oIq!Z?dS=hsM2T5dLcSuN5?!tTDKZ zm~;SucX-mQ@4yBj{^xkEBgx_SzGuFA|4y^~bF0nY{)1&!KXuAHdis}0=x_0}bcL-u zLACEOlf+wY%|8QIV?05ARb6v=?k)KLW#f(FzMpsw?q;s8N!sqP?eYMH%wQJT^Z;5` zJpL{|qW7tapmKGLL(e$ z)`S>pJh}hpXa&TP^O5aakAKAV^0skiMv0<^O<|nrp*S05d`DUKp+s+-c8JuT`5AID zazET3&QWhbio&M7Q5N=BML>bhr7jb>>dZ(w-qdr3afiVM&d>FY8LO+?*sy=9m$XX% zQPM3KcW5-T9#7Q<;wtd}P2vBmW@U;DLL)h)Bwd8klngfxjDoBq4A-N$a;BJ;=#057 z@u>N$&toH7a;N!LbGOMV6VQ7W%p`26!^#ppBEZhlzADm@mw>iK+46M=6tRRK7YUNnn09{|!3{?%kQ#S{bd2c@>bpFc-iPiiu(F$8Rqh~K<&HlVkMZA)qJ5MZsiAptMldbQW zRX10u@dcBkBFw$G0RDz5O65^6M0&DF&vxk9HoeE)bc4A;D689Q3e;Ag4JDv8Yik?g zQI&gOg?pqd3W*)aePDh`4tNBrt?1|N&$+uDO9Mk$=6H+7Fmq1vm{i7W%L$SBJI-dYKFN~-7K z1Ie0lMa#IL4vH#fR8ivs#M_u-zS3y+!NtvhY71|cLVC2-6Fez%# z`c-6E#{DdVgnGHCyGIAdGy|k%Wc2MgZ208cL5X4p-m?`1a5MrAm)2zw1h{;rs3?d->$7y1 z1q<<$gdg!*R%xFF`2|QRiw5rzKWQU%fE5*3KzvS17vuxzT62OSu@EF=bW+$VCL#bh z6>ub3z8?bP6?I8fl-xk%3Q+6hFjcO?nMjL|eD^-HqCtGmE|oc7EeG+06G%(c*7Ri> zH*)jKkfiac%87+pbK@F?@2bE+6$r8-iSE^>NzQ(GuHu{$BT=8x`zjUI^jjivQGJf3 zDr}9zSBPD`q||%LRk0}}JFfL$>qPZMgnrc`)K@9#0A{jePj~gG%7v2lJh5BWl zi}XuO6&B$A53vLVfPSPtK{Y*&W6Q_4Q5_sBZ=8^%xb2 z7I6OK>!))Ny@YV*R4*ayU)*O37nNAx@yY>Hy4uOU#Dq_)pQ!ZePIFBg4*u3ly@V}n z1ACu-?0{MFxBnPR`#1jMV>G6D8v*}K=0JMOJb>*$vc1~uG5TN~v z0PWvMviua!%e%%MWlGm0pgrw~!l8M*C~`Xg%sh%0r$~$c+{96n9Y;;Yxl%dtV*)#h ze5tIALd-Ku(}|43K#yZYm>PwvI+c`F;uegE-Dd5c`jE96DY%H*fBtG7)jN*zvCU%de%(U#z;% zeB(P6lREMOLCBBsW4uQw@hXUXjO4;J9rkCa**pbOQ+SM*!{@OIHdkhm`0U21Y zQ8;!EqaBm`meswVLg5?$-*$AGYix|QoQV5}GZP%wA(r~OX=e+{ zO!1qcHGYvP-r8sglqX%{9@Elim>f7f`UYp}6;KkHpEFpVBt?N6Bm*8cVTY+DEh4N} zhtGTuzW#$<{GRnOE|1bpb&@_YOdW-bTnAJEU{uR+iF@*|OcOIUbyH<~q@Nh_5O6#U zvJYUR$6Q5p<#dyq+BITUU9U=NZr}fac)<`)Vp?hFq4q@K>f#Mx{d)L5-A{goKmi(l ziM7!ACsNn}-M<3eV=l5tp48;{FQ)q@W~z=_#>ZvRLHMS4h>FhMEUDF^l!i|t?$d5n6Y(hBB z{8_$|8>Mfk&Dpg;`wg_@S_d+(1I{-hzS~obV$OJiE4s0RAY(1vb#90~GmN<$H7k8o#Y&|i^ zy8TQ;-GQ%2&g?YKWNJ~C<(bBTn^?BbxLNDg;F^-pD9B5 z1wQXFv}JY5vEBk(RY8pQA>15W7>Wf|khb_;lOqRge~JCDS+|QIFMCX36yr-T z+|JKm6p&E)jDkOLdWnImrD;aDGJlKbZMMR~4&)O%*woZZn6JR@0VH1T_1O+KZ&3km zkBS2&h6z8?*9+Ohv6fhi*OxrRd%u^}gY90QkEg@O=~Lkbgq9DoD;4A6$5GFsxYH+I z8+rXbgcwZ#=FMyc+f}TKMm~=|53U#32yV`8oV}y%=s)}yQ~M_bzrgGs%pSteMfkY{ zw^#KDvllVpNSKc+dFP1&F!87rs1L)JFzXcH^)lX^5+&@T3-q6r6S+ zFm~5|Ad5yo&~05WZ5Yu*>km$$r^4^`X#DrBhgH;;y`GBAwFePsk>;KK7tLS&Cr&=* zq0fH9H9JTDCr6ROQcNTAd8Y^7z$Gzd@`FdI;+(-dJ8wKBz!ps&I)!kJg&_mRx#PH* z5r!*peTY9lOI=~{=u5<6L@4;+Es9tRv%f>!{;k=9|K28TkR3j3swWVq=YGdBf5X7Q zEsSv`96yVkcn%eKo;{d^o2V?MLbRD9QP+X5qi?{ZdJbb!8b+?g&P2*#9n@LZ^9~jW zyy)$h&7u_#m_?tt%iQ|VE`)yx;ux8jJvTG?HiK~%7xftH8N-WDoxlha{|;Owx`3VO zk00X8x0oO*i(#j5;w^rUj{dt@S!K#p%`@P^@cAL)fT=gw+YcGiFucV1@sp7FX@>iA zM4c})#Od*ZTpmE{d1yTfM^BlXY%x5-yT`vQ4S*hWNnBRgOiLoUhhFh%z-~seAGALk81rX3;fwn%XjDBh1HD*G(a5 z7ZoXZR2I7YG##eL(vedv{bPzpe{PoSE{czG7-*uH-et~O+%h(7TF1#j;a*81qf?Yi zD;~|#*388aHRH%ZgP-Fohw-~KkY8vd#H~k~Z@>$b!ki;_K4k)zxt-!Ls#k8HN!=*d zlgptF=5@0)fjXWXxj>oA1+pKi;Xa9zkPN}-Gx1DeWMr5xcmqMWtU!-&VXh&omFHc1 z3|*b)8lKS_HfWjV&PxtGPnbx3HABLhK5o2YxVBL1)7XV-RWVPJfNrB#%op+ubrq?5 z)0B7s^Ua*DIxedQ6;`v-BpQC>AR+gGk303&l4EGuDOHYQOV!a(wv4C~5Wy?An+p?d$jE@ZkN$UFI=$p?tgme8Ah33S)WFCdSBs@0_S>;CEp$_XV@;8zky0Pt#g zC|x~;=U(M)YGLOC@G7!P0PpHAqeg@oFgXWiM@5VdH4doR@+d52fipEix)fS^RDdhL z>;i!{keDqzNY4}k3+~_^5G#*{yd~vU0u?a22+jqn!2eN08$MqP63I6kv z7;YLxtYr@GQ#65L#pP}FkT4MjUIlhwNu?h0^`CMTu8{bayporqk#?>|4$^p6` ze>v$8j#$`un<+HiZt9!957~o^Y+hamNjt!*i)}FcV@;->16oJipzoEoFr)%n+azu` zIsWDOoYQ=}aT93r0h{{IdA7piFy;!J@_06!p$3gYecbOD9f?^e?JYCrz@x2fydr)I(1YXNIyf2QEnw><8*r* z4VUFcd7fNX&*1P_x>&x_L6s@EEtD3{OFS0JON!TX;k-oTBt)Cft@ zuBt%gGZz?3w3gLAuC2Z%ma$=IIrtR}sD+UXI0Ach=nRNA)s)BMB2#xwSy9xKM*)NC zgVp9ok+EcV#oJNacsq^i0m%k{yrc{W7eKXy-;A^5ap5R=lp)gdH6$6L!e5JcF2`#w zZZc2NEfJT}NLfM!kIT;5)et8G+Q4Fk6bk}03+l&+KD#dO4-E`R8`i)AX$W12M-@TjO#wH0{QPf-(I!!%Akr3Pg> zlF+ZmJgG!Wc@)B~fUCsiC&PXM)6yRNE(e&Riysc3*TM*AU1>WLf_sco|M5n)c}EjJ zVmz~D{9-J4yby4~7M@03Ktd1qlLmmM14Qot!8?SY3z)7fj)F%ZAgh+fd~p~4yC^T@l%P7~f1EQhuic$P<`RunWvR9R8&#${u@Fx{*4J55#oGshG#f~(&V&z)W$Rv-~V@ z`++F|t^wYTv?SvZ8WDodO*H;X&H_%s?61wz$0k`~#|fB>o}_b=oVnlN2>Bm`V-$rB zBd>;IXXqJpknQfALWHCYk;Bx8x?0yscbvY%h{yc|GJ~dxe(!PRNz$gWm7r`1*iI z6bThyh9<);oq7kU{(k}4e=^lmKPFmz8?S<l)#q(oja!SDo935ZX~E=H}g6IUUr!!`C^O#xm>ATFb>+dzU zuinX8Wut#CZj7S_ISHOOgVD7E%rVDkV!*!yPD8h}jlvaAtPwrbha#UH5YG=Bht;w2 zM=fK60Q-?oKpxLL1FGo=7feDQ$&#vC($LL7>3J?zyyfao0r1HqDEXVk{|)`8sA|FD zFNj~yuB|(ufcWET-zY%_rY1#Ua2C0o*7!_TmV?u?BV-b6)bOPXvjRLwK>iTds0C>| z)RknQ>?E$4Xf;WNngr>B^e{`vl3%$gKYfgV>XgaRi77#xQ%h2;=cEr_7_22ng$?s^5`z2r9r7^~++@yC!d7*n%!onoG9 zYwD%AI6O6u6OXICfvY~-^`c32Trsz7+G@V^-6pf-FYh#;`@*_U7(S$z^<#l*OojBQ z@9Sta2b#-Oqt4>e!z1Z_H>e$8$Q?Ehu*Xv}kqplF*|;+3d%^u)bDOH*RW0+kNJPW^ z8BcO4oLA+Y?g4yfp*y#x0g5|bz!W8zLLES4uoY*>tfD?7YS9v@?L?%BY(AyF+9|N4 z0?S7wK>jZaK!;kg%U2-huZX|E0_6`-^`TtCDb&U+$|3y{?=!3N-n}@S>1+tXWLa_% zBFM69B`~l6nu+8kvgUwK39oWN+aN)b@7WcqU?Ff(dK5x3*NElQL^_h4U2Gy-VEGmp z+`_Nz@QsYjD9Ez`(3t^!T`;&%ppOijl4dDI;IGV0x&_?L0GdeRw?lm3;YyqTELhY5 z@m**sg}Q6YFT!2ifg>_3ww?n~s;)C_fc%z_x&RnBmADP9o24Wqc)LyfXM?dzoAU4` zMsy#&zwjhj1cx}}1bp#p+^Ys|4(4*y(u zKJr=EiagI8n7Wx0;IagVZOy`AT5}TZyu_hvsX%}n`#ced2WRCunbfu3ZEk9DIJg}A z2DY_{Pis9{jzpH=tqgGmKv0@|fzM}b*5tD1wqh62J_~R}_f$3b?0+NTyvLU4=wwjS z%aD7Ch{5NW=(9OoKUq|K7oUs^vsTH4*nGEb znE;wKuYi#K@5Jt6c=5byN!8S--j$)Bbx=o~%Tx5gU{^S+3Cq-^R19B%hvN?asP!Hc zE*W2vyy|F0<`%E3>yHS -AGCo`LJR|=KI&&|XM`mRbn;uwOub%I@7T$(`&YC6@SC&%p@a2- z56xPrJky86rSmK%_}ymR?kCLpeKS-Do{Rh3twUt1-S?rX+y7&f^cQe6&=UhSeN!(o zV+wU~X)Ua?8I--7w)yvTzlRg1hf;|Hz|>z!l* z`c9hF2XJpN&*lSeA6bIcVEY5+`{@Dm)UiKshJK2Z<0sS?GN%yO9zq}vB5R5;z#Bw_ zJ^40R_y#Zvl+ZKB=|4|S=PH6F?wR?Y8gGh@gSd1GG{W36`JqY7BYIAq#p?ZYqjJs1 z$6sec3;f83doh$_(WbmpbB+2lOyxxHj&Kyu!5}Qw&^d$XiD#%zQwLC5SljUed5S}1 z8hXi73?NL70q)(jNLP_#Q}6q<^=H25MR%G-*OTqr{gQE*YSlkVSCRRDHA%IsAIE8N zWYlaO>NihLjUo`gP9uIwV&^E{rSw%(G1;SZtpS1r?k)%|c&`wqxYKx20CyiLUA`1= z`c3qAf%}yh+F5@-WiqxdN({w=T_)-=a<_*JtVaNjn{ zaYetc%v~_)leGOjK52@Be>Ck!|3BPi=S}_y8G|G94D8GN`*G|}3P#2WY4IVE4e{h! z!mpDZBJdcd;}7QiJjdCgEVq5?Wze0B2W>l3LoXwMOMyRy8*dN4T~E*-s$eTOfj0;CW_jk-HspOh`p{{2h^qe#0e)3X1PxFg5i0+B=i*nG7M~;#w zIl*{4Y06K%VXpaV#(e(9)#hJrFPjH;X|CfJ)pY+Ivp7Q-mS!&JO@q_G>#WS{fV*UA zz?~^xWs(uNFUg?Lrw^Yb<$wcx;27k40-9xDw2-@5k|g?6Kh_PLfAz_1hIgB!tv4Ko z_Y?Zh>OE%`$5rCkgVd*IlN$Ckb7?HzbcnV~{j{GwL}KeO%haS2(T4r+nVQY;cP$}v zlo&l{ZcY(6XL_%21clhA0ePx*apK#IaEl|gn(OnCzANSd@@fxKW}C+i53B9J+uBp6)c1hNmev$xTt1OxbOg5hIVkuI5H21#2LivvB}Xf0)W(kUpHn zK#$XA!F|)f#0JgGbCtxc)rb>^BIdYlE&=G^yWCRG&mer9J`T>)KMFBFOP|gB4BLa* zUcqnr@ayKjG9UVHdGqai%jTbcR5Ul;3=HIk%r-w-Yjyp*Yi?C_cUIfQJSDN3M>U=phWoRWb*bZ3wT|HaDO*fH zR$GFY+O#PMP;YQKT-69tXko$Q5((R|ibxQQWNBZPA8OJ1PJk_*HF8SKtlF4KUqM(=~M9)Rr;Xe5#F?b=&RK-i$~xghYu z_tL;#7P;2rI1BFu;97T{J<;E-V6O!h=d`tKm(8+;_i^|U>Dg^57GGfJNpaLWv%&ce|94n!f=HzoyECbn# z+8rJftS`;!TOfNyHcfbRq}%JWE+Lm-a9Lv`GiemDhT>0rt?3J&Dq~+%? z>hKcr$Z@1nTp4a;l$U9v440}pQa&NMc~nNLRFFJZNfhi7!$PIF9)qVLL)7E3F*WHN zIS*c;)Dxe6mVswuBq_5$IfiXkp(Lp!S2#`Ds7+WZ0?+eCO%v+8Ck@*p=e8mb^#{Oa zg>`07{dJKPq_FG4Vrbf2rUB-U_OZ6ul_5__?8FK<|53mvBMI`WQf#mMS1oAQ70#0_ zMIMis%fK%Ks@jJ%7fX)UE1XN&&mAs(g)*|*%PCjn@``lrFUj)*qEcBAy`v?uC#nFA z0+4=jp3Bw2tfJ};dD5Z`vBVd1#5LJAvLK2n8L%OjM!<6g+N$KpasijAI4_`5w+w@? z9XV4=GO$k88;*eRS_YMZM1RaH0dSt>h*}&Oo4pp;msn$f(Iv(4Q`V-Wk)R(9J`=eF zJa}$6s5&b}2tCg$F285$GgZLLt`<6ZQYkKpj?w_+P16~d-^392kj-x?o~b&@Q#f2M zhfu+%!|5+_xB?wguGElgK1cBA@)!~msJOL-M;|X#kwa1;Q&C{!OPFk;5Z4TVO_$9e zuD8Yh&X06JCmoNEyQDm`{5a>xLKKEdsOnWNJh*;E$R?>DP=2_8-MC756PiBZkhB;< zeh};Ak6{FeKp|W^gLKnmBOQ%(Q+Td5P^CxGuQN^bZW<5!@m;GgIUb^a}kKc-*CKo*MzjmZ;3Ver%d@2AbuL? z##K|m3?HeX&ay{g`gWEqoUfjF+LX^=oUd!%dFq^l&Rl8X>#yJ^e|NQ#dWCm>pQ_>w8T1m$(#2{k*8Y=THxkRDq#r{>VVw` zyQp>Rdmp>`QPZ&ZFs833DFWF|KroAkV8%S$fjOl|T{Y2EyJ>9*-q+Ibdn0)N(Ece? zLLdE?`p09mU-YR*%p+UQn{BgyyQmEX4rs5n6mte?*|be5i0zVd_KdA^&QsBQFtDVj~#> z4Y9aruBa059gb5md-xSXNmOx|tDgGIx_;*LIsn!a?kwPaqPGvc??K%>%w(XW^g*P< zNca0DdjJ#h*5^?kKkniG`CE!+J1sXu6j5&k*90bc2Mdo6qNT9}RR(*^R{F}M$Q{_| z+gs*8!VmT?Fpq8xsLKjd!p`oD{V|68!butkl2NcHz%HR4-F-r40jScB+?fEvY3u39 zSX~%9Z@%d;k8Y6}fw!W+7qkXo%_H5ApC-gXH4i}bEPof#>&xi%F3mGbI@0t4vZv>` z%zuS}>E9X07>!WollWMq(pOR8EtXfJwM!Y-c#i2&{do-aQtYXEbqKS{bnr7rrlk7rQXS{5ny1Jf(Q7xq#b;N|2 z&0jIA*5D^ujdi5HZvuoLqacVPm98gDdfzBEohfkh3>Gp*C}>~Xb&Q{ucg#O;>@;8d zr$+Pl|21ju@%!oG1u#F%8;j+9+1!IooPvuc=7EmX-YKd_iC(NYuAcC9Js)1DI*?Q! z=9$JrXyo~!DFT~G1P@y7EKNe>>btXvYeKF26L5WVuc}H<;Z8w_PxHkZ3zJ!{?;LwU zx?r(1_e2jqnj_O(TLit0{j}8Ig!`wCP~Io4e)E7Pm3Wgx#v5i$$GarE-ZPCvam`drB!<*^heQXpwkowvjPf_y ze|C6|$oV*x4EWYqW}4#GCRMXw&`EOvG#*mqPD@ZC(fk~#9;QUI8CXiv)w6+3EUTI1 zOg+B$O=Bb&x?U&5c_X$3X~N{F_1pwM$aLDYv=yYs@)NI-GCNN^dI5XnTjmaT*wlP> zgIV&qTJyaJ9dpm7s#%-kM|W4BdD7pymN{;b$RqWD-==4a^eob|Px)JLYonR_+-*P3 zfU5<3CA2@6Z>YbWbVUmRtk{Pvq?;Ibh_V#>e#f+P z!)xK58W-Oonnih-eZ^MQ4+85d{!`!Z93G$mgKLExxQo1&qfA$Rd^N{RwlYl+q*9Qv z*a94uEOdld(XOT?D()g^P{`s2I9SRku2CU}vrzsJ2M348{X0NhD?UbTCbXtTCu+Ll zSO9Adtj4<-BiCc}2gCf$75>2gV!*Lg<@dr6rMRF3sF|!2q$mbbwcX=Z~C?cGL6_>0`~#4wVmoo$X=$D$l{(Hu%!zjb^G>^H)AJ7{TtZb1l znUe!y2RzTSbO${-wx;ko8DJcc+9wTQfu{9DLMdL)@_p&fp^wiR>q`RKw>Ev(cnv== z{^navSoeKw8&o$c8v#ZqKvoA^Op*f|u(h(pBoz6u&N8CCG8d6u_dPCMwp3djX%m-d z2V9mZBTxYWzRKQ~I7v~~`Vn*c0QMnkX&_~gSA52)OA&|2vy=ej1J1FJp(e)`JH#9* z;)X2Xp5-&L5fwo)i>;EyNUujOanyD72>eO5EzdELokFIgM#2QSpLASg`Dtq>>wk_k_QouE+itfkPi$wjuJ!CEQ!l$nYuPs+L&q0;xF|In5by z0C1PUAOW%`2~x@!djjy$A`s1z8i-WN{N)tOQA8@lRv3_%$pyGnuOD^hQK^7jW%6x1 zM2wHJt#PL!!U>mi&;&xOOOe6{VYfab-&vKBC8wB58VZCjT7CsgSM#JI=IT)T??Hzs zR~>(d)@+1*&I^8i=-%bXthD%=CqEY&c9m1*vuY)uv=gn5!^I5R6km0;^Ahzj+iC7+ zUFn+SEAHSQsRw6`>SHwrSLCsK%W|j*6~dnYF!ccPJPy4q$%a-qwuq5O-BT^phbSkx z-zOBfJLJEB?}p0D@F-hdnL3dYq*)nhjd!PsuQn^NCv#FcOmRNDSm_6ok-RH-(sIND zX%170!z7fhbT}jdSv7Hkykym_h!8|n9-F5=|LO&*+@`vcDq>O2WuaH63W!yxoF>1L zCBLHfJXOHnmvvD#dYbE~cfZQ^GsqUgcn5^H859nKBIGwpgF|jHmn49!b_Lu&4uVM; z@|Jj_M1y`$)wfG!5yg%yJ{+7k`prd92`R5Fu})FDX5LjRp-7pFYf>~TRz0h! zu>CYf@mHCtQ!{p6j(rE~x|ypLL2%8}fWhv)X5+5irfL5K7E_oTY5igNJ9>mL;D*$| z39wd7*aZp5(LO95rIF5j1EEC9EWr_lJ3SsL*~(q zouJb}3G>Y9OE2(E+5*SE1u~Vfzme!{31YVRYK=hf^QnW%(JUzUpfO zWz)qbOH5-C8`$)e3Bj=P&>N=h)N_0uLp|i}%$&hxc7aqCUYUuPP4)DLX6N)AI{8k#mM!;5hPg83{%d|!V6hddg15;kw@CNjXw)o_r$LA|e-)lZx?-?)Xm;6H9QU;9qZJlerk z(EGl*{{ZC<9FvE8SQk-fYT!801mzE1ly4$^H$dteyNE^!ES7FU=~t`QWFO6qdeON1 zY2DI$j_l3|f#4`V9kk_-667~lY^J$PZ66{w-%s?=2ezNo7!h)guV#8EDD6ALww^T` zi3~OnKjwRISam-mC(khK-#g1E=I9=Kl|97!^++Eng$-;|v~h^qSex8Hv_`Mxrw8~C z&;H^DK)#XKtbt@){l544LM)ovnMDdSYB00W1ZkEd3FPDFc z--RrN8;ZS~xJr}LY{Tq4&@y+zT%Tg*-~_(>Mv9UX1Dp?BIUDi0ZK4Wc1J}PBkDCjo z^~|JcKgXEHo!?AklVEc*W6u*UGS$_wE9N`v>0GtyUh}C>{m86bxz0RTpW=S=q-oe* zqj4%8Z@^4!Jk4Jh2#!Ev3(fJQHmTDhKuD>zG8=4I?uYMTZ8Dz+j z>%E0+v+l>bFDtj61Nv22C!E&}Lk*fUw5*htuWo!QbybHp4@F*`>e>KbHP6;$Pby_q zlZpV1OC4o$Y*C6lfx|N8#7Sa5j^r(lRJOUyLIch5mkWiZ zxQS$nUMV`vW4X~i)8{@}zzi!l_Ck*nJB!B~Dwl~zd#o0FawDg+sK1bTlrP-JZ>8jX z-c`k|yvH`tKoOuTqSSjS02rpvCBJ79IW%E3P)+}-8IqFCx0pOpgB;NXlz)+p(i}OU zD@{5;hWIRq8wi#GTuJys(|RHf;b;Jm3-O7(Hk<1#_NA`wyCx5Aw^m3lfYfQZcK~I9 zZH~vR9{H!&(g^H%U^k8WEku=bJPq)=Fq!b)#dDKjZ3+WI06Fq-53LfRZ4&ry{w}gU zt{FZR0``KtB->}#g3$1}&p(gna@-5<1<4t7Yw@4F?UBbDOPdrsu_r1lP;e69Xjl00 zXSmnyM|tsnlE}eBfRBotqi~a@a9d=Lgr0`KlWcsDx!Wj$%PLy< zKgeFuk*Ho`t8DldWG_R%=wEQZ!1gwq?GZt_#5N7Ey^0#d@rqfhSmbp~ni*1hP0@kk zppbRu5r_qalH=o2XBfN4vO*4ao}G>yj=^%3G^>A+yx{VIXRz_4h!o<20M?pOtiow2 zgN`1NRV26mmwmDuYDTJ-J|&hZ_Ev{YN#*jM6gY`lxL$3DRBA1NR!wIcOHkKMb>Gwg zPa%yvsLJ||1aWylRDG##OG#Ay9C3(R6RA+T1)!CSJvfky0XV-u7e|%?^yp)-=Zr); z6)P5NPWmPJGfUb&BRkFw*=Mxb{0e^g2&(uFv#pM|;Jexhv zfxInvSfc7wWLC*Dl4XA^A}qhl1+BTNPJAc0Vm=>@Rfo7-w!3U0IPi$jf-OJ#1P^4v(>aw3;%ff}C#Nz3#$jtoG*)CbKA=diLr zBl8S4cVu-NqF2eTs6Hx!^--Yzd^G!OU4(pf%W;AD0%E<|Q^vE{%2UAPUm-bAKK=xcPnzOs3_GU~z|Udi3+6bV!A76Aq)~7 z<0ilFN%ZgS;SQ?bS$>#piLc;n_iY!j%p-v0CEv)|er^Y35%4Pp1t z&ncb!E$Z-35cWRAq(X;2W^#S}6toU=rn&}*yry8x7eT2Du=ELxC#T8IVD_LFWia_0 zQ$QV76O}wxgxt_obo;l7j^2VZA$X`gge|?X3k;AmoM0gJ%Q=cp{iDz(-4}CESXNZo zJ`4wt9K8UA}@^G3*E>isU#hIVR zEbol}9#$tNIPpI2_gCR1)O4C}h8Tu|!52}^pN(1Go_GdZ*#%RfmQlHe%*b;T!*ZT5 z0hMr;h}S*(jo6rxa+5#d`7v02j?14e?AHf0?y1aN!U}YO%)%Mt4!uKn*q^YyL@$)y zW@rcLV%aGldxzea6bnQ0#o<9B1o8p1R67unXv6UNgS)seJNB9DbG(!}IBwSLRiy&mW*Ar-(7x5Je!bc%9ll~7VbXSk>~u%vaGq$|gZ zOELpPi~>rk7YLrEY$jgB1gO_2c?f{qVdY;s5q`&?K(pZtEnXYL%OlK)M|C{O0Lrv|Zsmaj#DR*>|53u5z zW~vsFc;}e`;0hlnI!H{grAdOi6ve)?;oP zr^<_&UG(mwx_?Sk@AHySew)t+7Rde)ewQJ8FILZB*hoF;Zc-CQIpF0ER$FXMV6QS& zHE|Z`Z#h7_2!aLOn>ATehBDS_N0w`e8wa--*)@{~DRAS~tm?cR8r8zo?YW&ug{(xx z8!PqzygKcK+!m$7tCh88fYszr3zdByO1WwXnTPZqv)IO*VqtpGG*A_?__U$ejNa3N zaU_q?LwrQbm%Ge&vpf?Pi^hEJmIWk5VXo*W7t@>+S==mem=7ZqAq*`zLt7UsgOck> z_9r~RG$DD=!;LQ^M2_zih&BqMsl*R(#30%?-fEhX-;Y0EfjJzuG}(BINi_k%=+0$G zOs<{0N(fnw>T-QZQG_c{mU=JoK8bIoj%`zcs0hl1E{g5k{h`|&^x0T<3zqU9no5D~ zg?{5gPLMeTkPGiKV0~nXz1@N7oipTbpk&IcfM{xx@1eELz}uMfk*qSarmkSgwtAMWI16 zysN5%B9Jd$FXyQshQ}jO{*4*_(=ia_YqJyVpTnA@sK@6E^0x2KNMWwaw>pysr$0$`TsU|1)fHqyt^!5EnEc zyGIi0Z&T@T1wWC^GE`Qq?1CZ%n{|XLz=hFEkK-J}h?3B`WxU9dRpbb(MW$N(s4-}Y zgp)kyMXVwgG@d1^p@Q5zXT)VZDj(sozbY?Q=%vD3ja_vi)o8XL@v@=^)*}T!Pnkn( zNrAqzH2hJY{j!!N6(7E>Xg{HR(Z0rdY+=!RY@3>os?4>zE5*98_hao>i_eg2q=+M= z3hCR(+=8wotmHY@w1Ffo#hA6dj*T!{A*Y%6qT6e)bHQpv4cQ-bS486cfI#V#s7 z#YLV_K~F8k089kIk+R9YMIM(xjmv)?<<)UQZiOn;U1FsamN#up5#vmN_r!+tbNrYr zG=D0<-5z^VVZ4=zB_fYQvMhy%UrkN(kgtR4pTPg(sZe!lE7BguZpc25d>;iJ^mz;q z6-}8}0@;v8T1*>aez^;eIusqO_JgnlV6yJOII#h(IKVRO3~!10Uo$J#KxgZENzETQ zj&}O7hM(QN!!#W@$VdCJ44_ETwWPM2xj4}xRc|Y8l&O4X%-6Hq&zQgXzaD~9Gp zdnYRPAE;FR6)G|IaGF%6Xx8Uo-hJ#eY9Y4!bXPxW_!!Soqj5%ippES4`O(*4&-bbO z`wdDm)IaqG#TIZEtX-U=sU_C+-1v(`0cUW(T*PWF-TxRW`30=*5HdBFS#kpo%gy#5 z$15@wbN{-|Nfg<6bWx7RHL`8g%C><0zM-qfSe<>QG%$wk`9qvaKW3P}Y!-c%etgvb ze(|d`%*JU{oct~H{5lkU1x@_|>`qIb*-0pxoQvN_hfxRByB(#y%xqFQ@)8y*t1IFv zBHv%@(Uaas3$Gmi04@Jj$on$!4H=CwC>l~LA0q~kc25Ol-1vspIrhLQJU{0kuq&pW zy)E*0mc3N0;LiQjWG3F{VjVqhmitq@f+^bL(?#N*G7&?7lgS#y`cEBi+v&Gpb&5Z! z^UbP4xHR`Ftv-hbOkwb_aVQ#Sp-94;lx}~SEq}qZoOln*$8TwW^LrYFqT!AaP0@ZR zOT{MVe8SvlcS8Ify9h$}AzJJ;=}xj3T|;KgKFFG*`v~#XYQ~qE-fTd{Z$wdFcL0UH zV~=Utw+qok%)gu204~HF+JqUr7S2yFppxCQ2<;~sjqr7@&-{lk+{4+p)7T_Uwh?|V_-}FI@GP~`Gx4a<=%6>{8MAU7m7*J1Zt@V#^n3U|)Sr&2UzNL5#rB@y z+Mx3J$YDb4ezuy6v!CmPz1_t3qK8QYMC-{KMe!WB7CC^L+I}oWY*b|7=vtgVL?6?` zr%fZo-$3Xa)g63;IuX929COcU{BcJesZ{7G|Pu-ANhL&>cCJd;l^{;s*@U$9U#mdFinGVR@IlX#k+$DXIm z&Y0g_Xnk7%&2RIC^I>ek;ZF!3hc}oG<2(%EBQIZ9RJj`zu9qdcsVQHH8%X|OHWr3j zJ94p5B~3eSh0Su5Eso_OkPZ zY_GX3QyA(s1&)|s@|b4cT;O}z3FN7XJ0SuuX_WDzO!C{gE$$$n-HuJf2Hpf$Qt^fP zOV#@%2Qp@X0o^=9Zk!SuWn@qf#8_-ysfmUpXO@6D!C4MOl?tn-@#+Dh{^~wh5r7|Q z;6DS@2f$OP00KyiG7Yzqy8-9bqp~Pa0jAS@s<|F59LOz$T~QVWjMDsftz0D;Q6`Km z!cRlGNtj$ZvivLsh%|0!(*gk^oXYNJup44ih1gY23*hTi) zjo&e@c$~)+3@UP0rylXMl{6Wd}PU4NINKfAjX$zM;opq z;BwX+PEg3n@;DMw?mguH1g9hRwy+*qL*)EXJfmnK&oT>auQ=c0xtL#yeTMxPe-;(t zaBAg<=i}DOOUlFIcj^z~C+bk-7B!B;BH2lQ( zYTzlpS98xCE+8ASbzyZ~3TkPp7W-=4?}`5@EDf~;IsZSU$`Wb+^5#&Hf~8Hp8Czj^ zwXdlsY!*o?3lW9L*GuwXs-+7G#&sckjYDM}n9!HhN|vpTbRd{C_+E393{5R^t+4S5 zwUmw!n5wUgN=>UQM6KLa^cqj=#b+Es5={dpE5A(qx|(brWil#odO{AICSuT3US&jg zIq)_4lNwD1LWs#AO<<^S4dbO;Y4dN{K!wt`f__Z(X! zpG&x#gbHP*C44$Ifay(O5$Puo==MyGWJ}oNBbB37fct7nlfkzm-;oAm+_EQ9N7U;U zs(BZPzd%G%#yPKSN*?2320Kq40#{G_vU>ZFm2lX$kf=qk1-qF%k9fe7{(#$Sp*fSt z-eELEIgY|Ai=0bHK$7nz2LL^*kEOcQYyLHrBBaQWYQ74+SA~r$LlsQpE*VqeB1IZ; z4kgLb_|nom)c^mp_a5MNmDjrN62^86CO`)cNFV_Mp&1uhvbwbT zTzzRtvSiuQy{q@;US+uerdNY#1`HvDBtYn}%iTNoo^x|^&&~0F-*2w9TnI^a&dGD0 z{X9Fe|5a!C=Rf~B*EhcLjWJ?_RagR8FL3Wld+Epa2$P_vwi~1##vmH!lTcqCS(x@( zlG@Y`gX_1{f%SnOO-Kk|LVV@8e7X%}-wCpBHHm}E zP2};#cmP_A{cx{2|56gnobdzml}iw6&EI7_tJfRf+Kq@Dh!O2SNLC!MJ76H#Lh;m9 zeWr3<8zrFH%^j=v0x*C+fbdzZ&jX)SCJJeB`%d81HiQtsJXMkh=@w!g%tdos*m;QU zk?e+48U6u~2Fr$8*O2dF1%<8}v70)f!%02TMRv^gmz@GlMHCiNfve&+a&98cFOKcT zd4D@F>^AegTl>wz`~H#9`!$&x$pwi}zJhcgF(~6j2N0(Wk^rZx3n>x6sCPR+7El4a z7Y!XIdNW1-$mq}qNXtJ0p1yq(&d1AIP06zZ>#Y`ug${9efa2QUeS3B%Y+I*>yU z{!b(6+D7`64eWy=NMJX2`*tUqcXpHFIdK4JFn+4Y!XgwKDz#hM-iarx$J7pNMLO~Z z5|X#gZN(&H8Fed1bBnn(Z@rm!?{Bg2fcQx7L%1G-#IVM9KV<5MAjt0So{TWjH=Mf+QopD_xcL1$Pj#9nn z0peRRcpzRAkg&D8$#c(=J6va({KrF!odNjoY;i{!r6##=PVCy1MF|cHSz?|{#jz0*R#(qz|ujCv%{Dm zPom}q29xEo?w;4Va(2CEPM?R7k-~%slIcBwu~9-s`a%kwSuJacl}Dh{+H8DH>x{3p z+gP3CTWvwcPJqaC0vqmZI}9CD!dw|f(Q$qjH8pfG8H|$a1l^+ zx%)A&HC#JelAWB#^-=-YFQ#%<3D-hpKNLRzc~&d)u6xLMyGZynfP1H}9n*5V2@t+g zfB;4%x9sU;pK`$d=yEuG1p@ebu|lyIN>J<+_khU#TQE3+efJQ^%e*Na*z1&wQ`tDY z123A<1q@$45}b-|Od|Yvo{i+P#T{jP2e-50mL4;zw4V(BtSl*ik*xPpW#uo&lSXNY zXUtd)PC1uuB^s}C#6B_yDmc-Ka|tNK)=huUtiU#OZ$-$oXS)d=Kq*C6;wW_PT-aeQ zDNdTJXNAo*c~Ns=?oZ8iH~64=fn0v@^-7rUzCu&56lT4DEs7oJ`6a^gIg*h}da_7t zeU1{=h`M*)E!KCol1*#+_quXoV)zAz*LP~l%Shn6ApE;D`6~7z zN3f8-k6>JtezFksNc5wuIW;Xlqrx-MIFJZ}Q@CEa>#M=~%0aK)dm>QA2zZo&Q#pJb zeLU=a7?NF?$Q8M$$XUr5d=Tp~fR7yL(#FbN;fafEmj>r16GIInI@%9B7O3@rC`6tL z{E3>2vW)=1PFc`Jyhb1*C51?VMgoxZLEw7`%pU|KM}a)T`vO^#WOzXF-jeH_ey9qP zmiO~MNHUsAsBrZ`*ISVYb>^>ZOL)qqdx-VqVp@* zc7=|aZCbq7z9a+};7>yBN7(K+DzPof3a1$b0as(2C^e*mmSuNHcSF36Vz=l}WQR!AudT&1r(Sk|V<8Fmb1IaZR5pjyK(;{t)DUZg zkxNww^@FShVI6CTL6s%o=<6QsC2E&rLEa1514>q^q@k83DJDRKZ7P?O ziV%BY;Z-8R*{6IaOf)h0^VAn0b^s5RE*M+Z@0XJ5$vk{Q=vtI1N(GL^;VYl3c<@p# z$$-O0<39hM|AXxir)N33!ej@a_2WT?>Gn zZ9&`%rHzuAP{rJEOa{iiileCp8_RhR1xc&egHNHu0N5Bv(pq0_ssQ^HKy@jm6q`~Z z69LZND{dOSNfjKw41oYxIRTWFk>CLT)m{YiXk;*N!m$6AuyNih+M zF^;f%iEKo^+i{Nj^ay!Em8?I?vmn2!(aLzJfS(Cs7F0o~t9tA_)K8)Qq~j8aVG%{! z!;S#Tj)DBgDP2#5PXib>;l3o=2*f$NY&cLTePF)@{0~Fz+fvnx6(A3>T?zLE{U!EM z@*kZ9L4P~S!&sfRI0k@!7uy25R|(n!@m0`DFyD?mw3>p8yplvGbzl_==;chGJ~UFIy6Bz1lD(;evXyAb|#n5t)%nDArs&BFZyFw$$x*e~B{#+(I1 z{-cDkRse0A1^N5TOyX;cfl+zrY42`@-Co;ce5<>_3(fuJl3P~qhf7sOSwMUXEN90H zfN~|@Az^##cG!Bdcf&U3wNSTSd@BZl$}lNU_#A+Ve-L`Hb2qM@X5(*K1BhFLQPoUZ zlwD{n_FyQy0_ZP`{zyCR)Ez0xmPMkR%DC5@yX}2*OA?JS(B2G0)ylM!18QJ{-0GqTT8=gi3 zbU(4Q2Tg4FedFKyDpd6I|k4FrfT0a^y+6YwNEo!fcl#sWOhBr41X55{|NKZod@?K8runjaW7DO$jl`PP5?eX#<{e}qUz@6c;G-UF|#sSx;Fs&0sMgdif+m`z~Gm6lLZ#Wz7*zuM$6C0Ku=OC&Z-K! z9R>XITQoff*vGK!#1qy}Dym*wZ|&Q7-Yvb;i=cg?c^$Nm=!ha&p5FU$4KUc{=!$GF z8I48<=~ICHl=Y!u>c?e=?ny=DNb>Z88CB4Vna!2w?ol}gYy;oMejxsOz#p zI%RA$zZKIS)5I*v~o6H*6}^vr>e6j@Q(+XyA%#eiXG=i(i;Z^gh9mP;_$0VbC?q1;E0H}X-hjjO0=wW?g~0}B+ue)FH#0_2|bj4CJe-kKu;zBi^|BN1Tg{OW5A&@ zr|7#7w5t-sh{AP)p}i2+PBs?V89=veau^Rbfoz5t5H=2oRHjQMpbWEI3h)yHODpq> z57=daXao%faczP7(<=ePQqhZY7qX9n>IF8Xl8_2tuvI`fD7gsI6fvv9R|0?n+_s-? zpA#0YXLEwb%IdCU`@-~=AU9hUlvRdyeJ*lbu7WUqOF+I$j_#%xp1Ht!hA)X-AYxyy zm5IKRtgd9F11-n?swT;Oy7`{ogts;FjJ7Fs~SKSnlu1>7nu*28j+w1Xp-97jgH*s?-}HA>2H z8Ix@UTvl9$0(^BmwqkovRWw47zQp)e&{V;|8Xe7-82waA)0j*M#@?avr2`r*$RFp7 zXsrHm~$Kg9Xu_|Fvf9Pd{`@@9>^?cEyl;Fl2RT`jtgfDVzL|0YUC*aXOa3FOmeHNA-*?q0E~xUROyC#SseD6KRZ6K@lVl zu)o;LDG708ktV=6%X>H;A0B{&-m`9iZ3mfBWl{uT`NRg$@WA7z0M?cOJe~#R-mG2? zz~{A=Nph@lma|~+Yp`SD9TBJ?EH1#mGJ#eD&Z`8>J0qry`*f%;;lTP7HDl|xE-(S$ ze7Gry%r{D(;QHGloJ|JGws;upWpmNN8uSN{^*a|*C4Gq#Y8#a728?f40kls~ksn`l zeq^B9Svs~JT)$x+_a1un>a(sx;-d$ws*}Vkpw#-!RT?TGlYQica`v49Fa_iR|>>z1omq|U@ z3AMk-gdVOnEA|bU+p3~e+a!wS%X#L96)nh|$YRn7b%$jCuH}$?t)O@ElH5&+C_AtY zU>^iaoObh?{V=D<5rF-3fc=#cNdV?&HEjWu1F1Ry`^aqO0PG6^_W1ylxt*^7AfO3v z^zoBlM!;>Tql5F?jGtfyzpksPUb`9A8>u@0L$JP(1m`ozl32cW8=jN<%+w#Q0dn1p z??HjuubcVze?)Kh(!f&LI3)%!5z zNIZzFt>{_<9Bf2L!GN`IGq zY{s8W;#n6FbQg!rY7*es!J$vhok@BY*!&s-A!^KS*b4kHCmdx!|BZtv@Oqn4I>EOU&ecbw_@|-j=3PYeX8dv zGmi`>^Y^`oISIu|AaRhe%bKm5Nf)vSZw2!GdtXFIjnRaBKMWvGBE*U9dx>l*hwwE# z3}}CZ{FrQi)05D&@cx7Y%p+8w4&6`^wYHa$3j)&T?_*y(Hk)8iI|-}yn#H@xgh(bv zFK10DfNJ*tl79c15q_Ior4K;Rl7$s>DMd)He{hc}Aj74<2`^S}A9puGmywG3T443t zTTFh_FrnG^n!7t+HFvc$$E0C7-D)K->54YY_XYR`7lF~bF~kRe{!~xydet$&@|x~v z3!5MiHX_v@aG-sn`xW!OvQ7#lx#pO&uPH!Y)%gokgfAoy8r;`@zo~47b?<(hB$t$y zViuPWIx-hCp_uV3Mh=zVB^DkP8=$`kuwMedALv1(LqJNfYrO;P5&rBVa*ees2|g+6 zLIKySbWv|$#{Lq>{Rn<9jKofOe01`X;ml}yo*-K$+UQXKI>7uI2h>}AlI#!ygW;UU z^-k4Y4;!;9f#9~g{{eHlXCod80#zjX@nUk6lgg@sGb8^;3B8u7?U>w6q^-iV@bnS{ z+w~}Nv@T{$H@{aKHkeU*B_6-13ztCmqcR~N|I0S)LC3#kFW9~XUyM`lw`?m=-$T@g z?IGm(tRiBei@Aps?_jsXyOA;uq4nQl?kMjzm)=lozHsKv=BpRwn>zxKS<4#Cg4NJb z{5aNtGvHYOoZq$iF6dprM#CC@Q8v} zdK=}^RQ>o+1UMUp!DW9{{9dPE+7w|If=6@;u=1NNU?H|nKt@sn<*!sUrQ&9j?wgGY zGdbD>zVl;%gxSA55ekNt7{&vIo-K`}EHKiT2q+6AD-XRQ1hcTd5)c{&EN25r1!Kkg zit>)Y=nD8bL57mcjLpJosYwJ`1+~4H4PuP-nJr9yhO`}meWKNstx|~;Q!v!}Oga|_ zyn$%+UNBlzy_FA?rY~*)vG{0PRoVGVWdLV+M)(rq8icfLhHiJ z8XO^diB=?HQNDKxINW^ZqXU+(HmG0neWj!+2Y*YoEt*~f@8E8>=L}bFlwp!NS@iSd zq>wZdFf6-?vB`>SqJnvv%#4NhDB?T8`BjxGiKS$b)CRe zo~1UC=%*Z0T4B3#2@tq5mpp>hQ_uvL4d&G0l9uT-rBo6@uQ~^gwZpenEUDB?@(Y#W zhl&D$6)UYOPub7yFlLginC%=HOq%^95CN`| z$WkE%>2w8lzM>v{QW!yOr-ba4a`v)ndhX*M;>Ccfqi|HJ9jHmkCy9yVo~og%DKbLI zV3a))La$WS5^^GoD?z^HC|^7h7J-H>$#X#MUWQHTd#UD>PDgGu>E4ueDu}tSco0og z)w7ZXAkmU+QAHZ7s96n}mg4w4loLOy?3ZjiLEq#-kS|0LzFJ2% zRE*~Y0N<8vkP~6QQQ*BD+gNA56Ox8!2eA}T_cf0+qOeiaEXAydwYBywC671|{{Gca z`^46gNGG;yDHsWT4-h}K8)%<_`7ucSB;y?QWCOqC zc5+C&eq_#>SZQXW)Cp2@$r7p8vdPR?HcWPVvd8oB*={PP5b`e<&wD+_U6@W;mwE36jn!tWoVF`3@HdoB*G^=<28@`$k zOmO!{gm}M;KLL{k6Cyy=ZSCM%Q@^nZ^Hh5FZ4P^0yXy%AIf^w#%Zv^qi8v-U^bXyF z`5t;7^W;4!XkE=oi zfpsmWVmVfDBbQ+NGLRu=0Vn8ojK(`VUjtM>O4ZYQneGE@r`MEWoVmO4zTk10v+^;A zvv;}j%-NHuch~ZUDa7+J6W@Tl1(kdoSvI@y5p_QfHxCC6I4|fRh8D1#&0Sv%h!zj8 zSleQvWG#5~GWzQ47%&k$HDo$E#TtA8t2p-U__F}m1=!H`bjbT0CHPUIA5w4bM@ZdAqW*!0 z(Muhm!}pkSY^@4vHh7@m-E7?UQq3!;2wh$YhhyjIN}kjF8tGnf)?mNrKy6E;eSGr( zX{GwPt_F;?X#)x*VhKj)%Q_%^QN?=h87Se(*mk+J{wj-M7wU>H-MklXtb^HY97OvxsKSL(Z{7i8-piwLMUUV$b9Sff%# zZowJgO1u_n3Bd!3HI#%#8f|f|%19}Vw%buSK%>LtiLe!j5%FCCB`-9sJd^?>M-e?h zQbctH%LtBz_-$8qmMWocfTrXxF#x0xx4@?|N$N8{&jFqV?SyM&YY2_YrjWi}5J{z; zoCGz%CTAJ;FI9dBm~2Z{KTdSG0HI=81=a;krHapDe&vvn^V>r50{kJGqhMhxvN*i6r&7%72FH$&5uhz5Icklh<7N;= zk6ELm^Us3fk8bslT=6ugY3b3XC%u%+jQPOD15h4pnAX*LsSvcCS41|zI zk5MRMyYZhp`+K=2nIy+$jXU;*Cv#oV(?PRovZ>3F1YTmF$7E;?1z?>~A zUo+Q|0|)RQ2E(R6f0B+1jmjY+w?Ke%BJGc2k(G&3(s$(xiqRiwqeRqeJ6d00A13`L z=1hrMB0|Q@{~)89&sSmMk|+% zWbKOVb^GX-a`iCgw!*$gRfCNM_BDTHS=#d2*aH2hO8Mo8sF=P<7L!m(6Uj|ez2O?f zT27EE2Pp5$VvQ``xLeb&z9lnW(KU*Ck!7R6h8h5@0K7oG>Q+hhBC(Ocy?hS}B~a+G zQWd2TI|b>u21e`aXzC>eLQtdPv31CWbmD7c1m{M%;xs9 z7h&%QJS%CFNPk|P1H0%9!S_Emm1 zNlSr`?c^%-MvA_WJ>W3+XGu7ym<&J6hmvH*2pC8-28@TCL;*0o$}OZ=U!D;q_AG@Z z5w|ZrQ8iS!VuQVSJ(O@$NrCM+J3rI0ak>*msX>)Vs0Ki8iP`5%9lWw8>ANcMc^I3= zhqogEx~|^70LFH{sqKtAXx@&~?Xwf$`($GfJrlWmTEqA~&@o|u1ko|2HqUniIaQ$d zBsPJ>IU#iULBvAR=GX0C0peZ^T1S#Yf3;2oyF{;Ty>L0N1olskL+K0SC!p^`Q1{gj ztmRh-Sbw@+N#YYh>XRfBXIz+`Ek}1QK^0CC{T+P16SAMIK2>1*D9cKolOVpg`mt7& zUg&bpN8Jqpe~MP^Gc(q00hR9tzeCjLNQN^9IFc3# zCvziO8mds-TZ z`{8QGE^&Qfx|y@&X@oYP8b7v$t-hS>B^_nm4w9-6Kw8tg&Me&2!A#z?hoW9E;?+Az zVYA~wAT;L$)qTzGL%4R{GhrkwA)c+>?~RqyNehGYji9;O1ud&0V z(0$JX+0_icU{XWKaJC_P!H*DM-wB-WV;G;t>GP@yA**pKycqtto)n@{iud|MWa*Xlx_PUc8^KdSt`eI{=WiDaDg}VJ30=V3;iUqDa9TQ zwf7RR+hxkz@xB1ci@LBNnRH+MhLRjjH=`zS*IDqanL|~kyA?mtycfRyUQ(SBLfS=Y zO|k49!}y{E=1IQatMFPPRyxFpOB{qO1)o*02l+}9;2kg@2F!a2i}k?Y+dhI4PA_f) z<@P*;x$wGChS@T#=R%U(my$)Nteb0)tEC9@&_cT7Zru!wU&(Y{fj0y1NLe*V#KSj+y zBTGM5e=#BXC8X*pQY~LUB>w5;D7`ANAWQmj=xiaj8|&rA$u@K0wIycaHO1z(+mhzT zKeo(_ImJj>YD^tkN0mC6*9zBXPvtfkodJOmFCYb<4~ij0&6;&UdVcd=N?fs6*v+5wS^V$}HE3 z5iP#6L$JrW3GjOywp>C5zk*iL;soe(oUKLiFDTo$FuZtov8+z2NL~wRiZ)h!rqGfw zymHi3@LdpW5($CSq$Zbr0KyB-y$)&`3=ay_cR^5=A23o?3Kg3VY6P9eNhqEDj$I=#s2k$=)S< zD5sO+a}ylB7-xyc9Ud9(SH_1}Zb8-nq`wIJAkTurg78Z2BKWSWUwR|6qyZz+l~(BRDpCKd-8B%q|O)ftbCaI z%n{!M;KO;>I;TJ)dt2&sgjBb}GXsl(sM?lH0zJ!VAp=IzeZhCz3${I1A+a)>1Z+JR zF@ln+0;`@?Fe=)Qz_<(wXXF@JjfBMd4tVE?#m8%Xr5ciNz)>l&j=;N&67>XW$n69i zvQ?$^m#LJ6?hgEC%(a%SRW1~C7h|oXaPX_xdG-?ohYGzrm=u^CMu!s-cn71VIEE+@ z99~#=ofYj@XCuxuRJKs*sZ>8ppk9t384D84E4o|j3$A;;IEDf@V`wmXU|(ApeN+`& zsl~j|1>gpxJD;AVP+UQG$yzFvR)>BF?kjdR0V6M6kLoQe;l1=ZevAaUz(ULdnFrY# z$*C~0ubeRw_^YlKm!^*`+p>dBmD#AVlLtcdyF!)&tSfy{64tp6U6x~*F!mbRB^Dc6 z65;~ORrht3D%+2SOu;Kjans;aWdzcDNrvQb@Nr_%b9oD{u&` zLYl~PobTn!P*NcYlmz1SEVAFia;OH~+i`gK95-M*K6G zXaVCzlRH2hP@Mv-#~|;M7!FmScfHqh45K0`GXTOq&=hb$xYkKP!PlU4Nuj})B3{XI z0ulvb3e=-?uMwo?wOIH7;9b;w7~><%bA;z87(OO2A7=qO34|XT1nbw{PX^2<5mCdY z*FV^Zpa+q>HifvxjuALJE{f#F+OD0#%Wq%IPRQ!BV=*8U94|=@`8aDHZ)2OJ#5^}~ z4>F$nn@mZxgCy~nkrn4g^Ml)$67Nd#?lzKjuRloq9;ruGK{c)zHg3fA6^#QXf9)2i z%iYkWq_!sU_spi9;PPR9<41t4Pa8k%e9`h?tXu)P$(46x|P}JqXBa*?@t!-q;B6f!FVvu{IgIz0F(rNnZ+h zTn^7FC4E22q-V3({TVO}KyX|X`Z%z*-Ar%kCL_sqg3@0%Cw^&JIv2wBkBrjm z+o63xcK`5)#*0z0WG`A2mECGxYZ@TPQ)p9^h0;RV5GM(a%5p_W)Du9oT~C_(*q-;H z@ZZ4@`3(liJEnRs#>nOo=y<7z9);|FoA*D5MI9nGbQ_wLepA0`3zHR{%pSBhq%(9w z@<#jHNI&1pFdjm?^E$R5v9y#{jgih|{!a8Y42zGXmqFFJML|7p>*IJS4&ov}P)|CP zB*WeSVLxvdX*dV*WFXW|ZhsKh!ET~I`%G1LubIDL6MXHX#@h8P*2cToq3_|t`VFV# zEtGS}FgiD4WZh?$9vE@(@$5C5NoT(i{mpJL_cn?vpaW`Z#MoO$I1Rd!b?xBcN5R7= zomwF8*Wf)_$F;C_3En(n)?3Nk+6ZPQ>Uugr_bwRXDB+~;X3%eI2Ub9vDZ>i&c2Thv z{5yBxHFMohxhnAbxK6&)wJU4LA62G^jcfs0~1yR^T z%q-g}V!1N7Ze@Ti#!(Q!UMRy}sBG_tJQo7r%l^Rco}K{=S*{tc)GO0FUovNvv)w|H zbCz}x>dFOD#QQSrhX_em-IU#OcP(SzE3i3sa{l*YI~?W;q#zuMnOSJxvbr~KClzGj z-|c*Id5+7v4f1;*K*Pq?v2%*rAK)wvk~V5RJ;U{Z1wsl?q0>Mh{R+5Ud;c{%wv?ZURh=4_Sc%9rL04OM?AFEu5k4_}7>PvzBf!*Az6E%kD~=f4HX5TyW`hGrI^~X3a8u(iO&2O;lPV zn#mTonctC5R5N0MXcR8Z9iK_&4KgUKj+v!98qE^v0hWaLiFf1z%k@iWN1z86N#A~w zgznKOcm&k$;CI`>@6j-75mlGj9m?2_lqlaM!ptmZ6*)K;u1HH)N&od*g> z3lpDDWSNcT7W}S_OLwCh^g-~wfJ{(Ksn}Yuf(3d@@QbVL;v(;CVX9Mu5`h3266GNH zGT;o5E(qi)2ihp;G@;*le(!}1yoeTTL3dl=?o??*gpwqp5Gxl3OjLqLE5We=UR$JM z^z$6jW{VlJP|@{foLk+2yYtZvH)|z}p*8b`G$FBBpn|TJ3I9b3VP->fsdy5gZ&4p& zZ}(4t?}#sWwkiPHY&gPuuYfkINR=b-UR8=18q6;)THO`jD^6A!Efqgm3STbBm;}@+ zrc)M)#NxJ6zT{N%X&kU;OR#f65bj%sfZ{hD&KqxpvNZ~C$pG;1y|WDl!r}ITD`fzC zfo4Z+gGEwJ|HacQGmb#D>S;;ZuKsxo;mYR%+4HY8K0vnsod#2|&B+xhMb7ClKy`#Y zNeGi*fYeciEJ((a0`%(qiXG2F_i%oitrrlNyvJ4|opD}hTxGkIXvcwwoE)J@1w5Bx zRAj|JjxljsR&=8glBqu>B{j!1qLnIg(vX={PgwS6g}^z4X)SW`e% zsrzMINvJRNmBvMWjB1X;5$waSE2|}}I~65j%)k&}IfCsNW%fmQUkyl>?p;zAiGgGy ziHCOdU7GW3O$sUrglu*4Tbj3m?Sj%4IM-c?1qv@771rh1V(ZGZnqt3oTp50@#mXS( zn9nUfS0>hKAike2m3uJ(v^=JOYAGk6vTLB1Q&83_=@w@{0W!Q=TtBK_tBYT_SJrI} z&|Ur;jk$a%ZuX}PNVehtPE`oHqEr;X;Yg?$F(-2q20;RpTu<4BI35l8%;Y=6Q^Z9a zgztGBbuk5>gcvW2GZ;gu69v$Rcn;!j@H(KLG(hu<*cUuT9cq8FOND50UPqM$bTPa* zW{i(86CVIPBEEhpcEd9CFU#HBJIjqS;P?UZO4;Ru#}D!>V6V?>0R46pA^xf5STlYc z2Q|ywRCM!jA1`7lAU&`=*&Id@j{?3M1^gOhm#k@r*wwfYz(0ir5N{%ZL2DEZZ3N8? zaRQ6WiKB+EUr4CL(n^eF5dHZvdX!od0AN?4eSrmEKaU``gh{SofAl)J0x!ZU^54^v zD}5%qn&(ECcmRH=IRv051<{5&QWa8Q)&cEguG~^*LS*3d_o4DZGc%7YnALor0?^0T z*TKdo>1$6F3A}j~=}mDJ^i|^s?niqwfZC>phf{-F8_4rQwtLWc0ye$jfhIsJne4T- z;iV{rC}Mh-~(^n(zOF zqPnB6GC5~lZ;C?$W)88ir6>hv^gd^%6D?QKNOdaUyj{7b#hiK9svU6T(2>CN!bTF* zG;iWP31L{Wlsw-)h|r>?+X4B2`R+YtR@LCNdb=Sq|i&440pl{}X)falI^!MmB)?{= zP-pXNidwDS_ZI12UO{;R(cO=v2t*(1>ofJcb`ePN9BE!&#dYz|CbaESpiZF4|4z2e%@d+W#*O z_iyca!-V&}X*|Op8SkEt&C2~i-i}>pL>fs-+l%kv86t8YH39N$hUiNaNkeSIu!*4k zSg_}3D0AL(V0{4C?T6&9+W)HYZFw3~U@w#9eyp4i7?*dQcvb(vc8--A$q1yaEhuml zWs63p0^dWp2RYWJ9xNQ>_dDLei9n`BWD`|bLkouvqp$e@Nd(0IHemgxy)65%Sxmq} zbl^#BQ%sMo2Z?i~QZBhTV;c^l!`X+7pENyt(bcTqV5+*hO>JMlDFO0_b|VA{?Ec7{ z>Byb7{DQ6QFn&ONEj0e(`^X`Qxj19>7UOT*M%_Dv^o_gBtW{f$zp)8Ry4eJmui(N* zc-DO%sjP4d<*nXiu8vXBD7Kofl-oPuQF5-N)DL>{OKrPM!v^*6ZQ19(~ z$Owb5iff<{smUBFWX)}bswd{P7!yG$UV{+s<<0v{MLPnr-i-j_eXI|}@9IL=LpVSy zX@ppJde4ZtyZ2f2H*Al{m6B#+a9e=&R2(SV@EG%fIk=X2SJA!1j4Ey0Ng5{7Ms>Uf zs6WiS17n}=A^T=U>*F}p_P`l%%$$=M=!wb@>z86=&&Kr0#}q8W^eAYTcB%`0p&NnW z(?q;xlD6c-kZQYs2}bybAQtfKPw5WmXQY zH7fo<%Ps<<(qo)ODJwu1zlBo(yAkG2kLs!{n|y4-)3K2SR8T@ z$Y6_cKF0}K1Q!V9N_`+~=;RUyO9X^kg_1$US>241OsaxUoMVc@^f@`aAsU4rMbb*^ zBF#%BmViiAj*h52;c6*sD%pB~PlGfceF%#D24w~z+5=#24||P*b3F8>0xXpP(no>z zc9@5p3XoL)2atJd^r0fGdl@@}j>3v+}KHCt!mkP*{jPp7LB2KVP;d+?lK^6-=$!=YLikZ(bm3*j(?QZ-_6X;*s4~zC zMN8i92R~In@oFjI?igbc1+_~nBQ=x|tdrA*5ldj#h}zW|%xY_Fb$qmNcNIsIMUtu* zE6c$afc%z-ec?>8{6z)V9>w?CpTUEhEL1#>r94F#EKP7;{0jcg4+1U*lxHJPzagOW6+ex1+2XE6dU$)v;$HoHfbV ztFcm)+ra}l~l=s`VUtU zG{O9+rT-O+Wy4o8Ru6kDlYJna54MT0a-8^0sqd;dZ&mC&&NZNQlnhD< zpB&{5vA;FU1ip%yLo8 zh!`eB4E{U>mmbBGP?k_XN2_XY65k8j3)airutSjX7nJj9fKO5w3e_?O*m4L%!7HbN zfI4h_tQm<6thKEFasvfUR#`XwD2%1~<-PvHMA` z`FN{IJhj#&53WPv(+{d^Hs|Lm6!RMMrCdzLC40@BCb{z;H+Mj*-KE^}kc1@&W$emT zYs_hPtRmM)=Y!OkBCpMwX9!Q+h~9V;j(KWQf*(BVcALT_n+S*9fzV+;$?U=MZLjE8 z9c+*Xin0qp@mJ67C9Du<{`AIeW+qiY;}p^KwIP~sgm!FQ1;wh0pp@Bx2E7{;U)%J! z`SuUe)n;=}B?!9z1v3vWI|+)nwt{~V3nU2JjO}`p&;-=tgjSXUKvG?#=Jt`*!wh#-;%h5v%&(a4vB1 z_479GG~fRrH8ox6pPP%w@#jE#holBZ_=fmeZ7)NleVhe(WHwXuf`Ij@ro|5b22IZ=RLHCsp& zO2(Yv(1+mo_rdW9do~W6DuSAq?|&Xz|0&je9Qywe&dm$pcx;RH*dD+)i*3Yr6ZAQ_ z(NuM`6P(iN2tLBYFX0{e*m!q+h@J8_n*3KdDkx{%1oeBKFb#yy<};UOtlDI}?Yl9v zNgcTkXVBUm;Qy8mb82+e3KLmLxB|1#M;LX%>Oqt5{w{!?JW@Lq=;>M48(oV+)WDD86bHN0T#uSi7Q%%=)Cm+UMe(hW34t~8P;t> z0JEHHZHXyrRx(v`>$H1a@ z%z@>r;p!HGwN?hq>RqViMIX9^c^AjP@=M}8EQ;}#2g+0n2rr7V$f5|pt%R=eD=v!g zTL~74!l@~VWR-m0=wnoANd@7<8~igB%1y`3liv3rDGX z)tQQ~Rcd)5N=JABVw2Ka@(DTnh3piCry50yiB(Dz>3_u`i+9XsXml{^XhpV4*X>k* z0vkC@FI#hx(~QdUs}4GZo3o@7p#__Mw0e2nL7-nmD!cLE`5Ir)1|c5YRt; z-+bAL=w+y+!BNwTfzx96yCQIssS2(Q0m=ow zC3TPL0%6}4ONMoV=$|y|F$P@*gpOJhEXcAl4i!F9$%Wx%%B$c(1pFHZO{Um$lt~$9 z%EvgqD3d#)V`3RyaJKvhIV!23k+BtJV#^rJk%goA>R8%iB?rU$- z8Xl+Yvn`7YRUE)SJJT1-K+3WBD9rhH*#2DQ{1hyAlF}mV3uEIeqn1+B%exVip9bKq zD^{|kF#FVK>$MY43-pfzf}?o)EJA#=j$bALcP)!&d1`d+2DpYDjvanq_oxIdf;|(% z+;F@LTn7D zi{Y0JUiG4*m1bqR#m|Mm+=`uo@F93DcFaC1{DA6BN!mW zvQpyPN})44j$B4{3W69IAz*z3I3Ja7AhyC|z7<}HCjseCkd&B-_OO%ZUfC}bB(#k3 zoa{!RgIp)v!gp;^6XSgfK=0H8gPTtbRvC+0ToGl}(faKe9UUx(Pa%#BDBK}~AwiTT z+d(!Y9^c{chnG;MXN9Rp3tx-6Mr!*ck-2e%Jkr3YhL#a<2oWFK(7=su^FniB1n{r0 z+0+4QG(Cni{!tG9DiP_Ity@DZ<63YM0j~XI$!y(c z=7PTBiykoNUR*+7Z!urKC`Rg*w=h^F0{=M(l^8%o1IpYO-u)|bD86HAcfv(>A_NCD z2f7B}tI_WeD;e7S6hrs2qi?r%ftvTeYy8AnR#Ocryp@1g*xm>sd9}k&05}eqFxe?B z;xmK97>2->VL(XTzGrcq5Hi@f84ORp#I?<)bPY9;+Pjg1JW35ws*`ppxj2dVg>g7m z=R443=^FY&ik5TE_H!)M&-xZqc;Ia~=}$~x=ZA=;-b2>%8xy33cs-xkPm4IraBDjT z9VmYDwhD&3#e@d$G0Pu(iP%+CO6{A$bDcx~}<`1oZhW+m|f%SWc zOBjZS-ej(*>Rg9`)#zkjuipETqqDKtXziXCO%TsHh6#irRk?gIWrv4kj#) zg>I@TbSh!$OI%+l?$>mik`+zH+th`w95o2!`HY?y&CK3I7?!V?aaWPG$dJ|{bLL#YyyW5qaM-g+;ab$Zhf4#87P1++q*TMTpdC}D zk+5A{0p1>|WeBrvX~GrIN+QQcz_?FRNUH5+<<$qulR~Np1)E6!QYqcL$<~h;%}-#4 zx3$%jtKu_xegZ0Hg~>fvik5aIg(cNw7nP(??i9Cjaj{+rTP|P^ZZ0klr2cFYROUmL z7orQw!_^h;>4C7I;8rV9=v`Ek!`ja4(Z$O`Ic|+Qqi?$hd(FjxzAlvc-A<3)Juvnd za0N_!{|3@et{=pNx!+XafKaS~DpF*1O=Ud@(8ya~kLzH5`>Wh^_M4l^*P6?3_n6CW ztuWWzG0RN8>2^~P%`>%)+$)!Ph^*pXzJloXX6}n9Un**0+ek88M|OhxHuBBjRh67J zgr_=~fPE)6)U(uYR_!2ReH5DA6@$`R9Ea0#Uaiz;%Oc=)Td&6ImD0lNjb8gL01s?> zypG>2kUDwRW}DN(wdh=VmzWQBpQji_et&tcB1A31(jn{xWdVuvd!K;hlHx#IJU{tA zCP}l*cMNjD>$ei!blk?NW^6btP?}(fYZPy;Q<&X zK!*4*dg>5Z%Uur6f!Gw$DDAN_fOuI(`;}Ot8t@So%xBpkLJog1f)x>%e3$KtABtby z&@vVPH_USChmwtJA3=bx9f27>#mAnN<6e7I@NE*vqpb&6B1DgzHCWTBekIQJn>wf{ z=(HLzr%Wa)vRNC&+0Rn?yb9u2VU2#?XEWYM85TdJwE8J%tYs_bBBo*a1h`H_Z33L8 zZ7X0>$Ejs}T8I8B2e|40RReSaY~$$X9HV+``--Lkx^Q-cDtISe{gfbTB0pgQ%3ve& zLE{$(P{lEuq8>~R#>Cl<92SxueIbJTLcLILwXKAoUU7mo23lHULP6Z`lQo6DIh6tU zR_904K+jI!p|mxc%IdG>+!$^F&Ve)LeqMYb#C9SaRrZXyLBWm`n>ADlO5<*8XD8{{ zy_{cd$Ck)_tVY(y2q?p3k`IKAo!+oyOe3Ko9;frKv#H}1c6QFB&H6!O}?RQh7Lt2omd(HQ&Fg{Il8bv4VioUKb^ zRJOXCvh(OH0o~CgX`AWGRI^s+BwK7N0>l+}u4^m6-feBp)@)nsywU`B%3+-z!8Q

vd-p4SN%=mX=!+_osVI+ew(EBO6 z#Z^O6RMm@&pbj5~hO!h%bgx8{VaSX?N(Kb6v5FY}sv>SIL>nmry^5I7S_)6+;t#wmI*2~f@0l0Ct7=w$qWh>ZW z0RHL9z7qrStIDvmQWHCDLq1PU+NwSfd~Y1IPVP$(d9*bI9gotdE$Y;yQqCMZ+#fTe z!o8?^$a)a%#P(oKJ5HL+oH#i#mFJ)0pb2wYl6awg@zjqG$U8Q*&UcX?SEcUTX0B`Ac{0 zH8=Q3qdVhDP5yS2!!uu zlaZwuGPG#z4g>)YLK}iDS_UCUdl1=>I2-D(07*_hzt?jiHVeTP_MDyy}(|tQgoGqe&sXqXE-~9pT_#+eE zE0p{WR=}?aLuN}v;Dr!=r?%f`k|1Y4MTRV?RW`#yqmxg7nyV3e`w25Fr-$J#^6s}F zu3k$z%C-(l1R=Waf0zL}40^}kP}uh@rJd1^lr*=PBuOo2*Q_#M7%Oh~c60t6%gwU; ze@n3F`@q*vh}c7_pQ}Duu+j5KDHB9-AL*n%0H7#L7Wb;1s9D&5oc)J-yW!sloqpF6 za%zFfgS+1+Uf@#`fzPicxnpGeD@K)XW7{7Eg%dssFJCwOya|#jDA=(U!F4mhZz0|Blf#dIc&_qc@Nd?$n@Dq-IV^)gjTAiFIBP5(5 z7b%&7l9285F%ssJFh0Kh5Uzr~MAPmem(y-1rZd$=L`L^olo=12hWlSN5u#ZW_k4gx z9|M7I1_AvRil_#vdc`r6N{9%ql-q)QC^O0R=xgbvqFEOK&^SL3hNv(>*~&$xY*hoI znMI~@bq~UresDOnHpWuXnnsL5FniOz947QQtZPUDEra znMIq)6!rGKZZ4d?&YXncY4k}m%uR_MI2eA05C#ICVh5G2Oo#3V!TDfjYrs_L0`;S0JRx&ihh~n>-u{zSiwzwk689XAlQdANZS~>vpa!@V|%a&Ys!+ni=iI zdsBv1T{YLrF+ocq@C!l1wvWKx(H2v#5_@Fsx?WDr4lp@l9msGyzvHkO>+WXMK;Ok= z=B(^Pe$$I&rt@LqdNGF?F-O}nwutYzvgX27G zs~mN{2X~Bn1NFNGa3rClFT?t&M4nSP2xU)*iycB}lT%JFEBkpj2Ls~#>D@mww_$>~ zi74<59)hKL7)jC!bKc}q^WE#CX6kg3$n}VS6h)Jw0L&K7XYS9N; zhlhtV@ktZ9x}2i1VN(ag5kg)WP68Cry+|V~>|C+PYgX@UBuOO@e33ACP8N)>3fkFYGD%d*#`!rnqEJW8&y%%VrehH3eA-aH^pwkHuee!1^dO|!UYY9sVjmo%C z*R$oVbff~`5x{loIFK%gm;F3>97y+I0;vCjy#lJ*mf)p&Baj{hgbVs*LAqjl1yco^ zP5|S72BbTX*7NxwJpcfgIz=E|&`oeO0wfLrDnB2j$7FfYTY>$*4APZ<$jQP&e|4N1 zC+SYIAYEfp@kbzCa9!s?qakSdSAg`hvLIcvK@eOsLL(*6uaOjx)rd%|F0hyd@iGIo zKh2FSEc|1buEZ-2uw{N}X@SQqOn1~RY&p*8*qVUj{GWm8K45y}&%$(V^UuL_#}kr) z=}Alj9c_do`dpZIa_*j`2D%>WWy!7%;M$DXug(ncG z4m)udpqG1A5&)ebibv*v5`8+!L}ALE3dZpDe$e?MeRz^0Z&f}@$#iTBjD6bY0rV&) zf{ICnfY++u>#IR9L(^JGm~nx0Tj>1U09n0M{YubWU|L0Z1TkA<_=VTK%9K z3rZZ=4cb;ks!*#%a&R;@{P=`gcrQ8~y^S3No976iThtM>L+uuroFAVY)s_-Ux1+%H z)57HZk5E)rMQNk3@)iYs!<%c-z|;Y}>e0>21Dc|r*;E4#uQy3D&cwGZWLujWFfK9( z-41V?Z!S#igJQpTv5DMko7e#~^3*H6be3S^4QAYzW}7*wP2|aZ48be~8bJzk@U{zu zm#gmUzXzd%0mSAN66Bc=Li)=H-Byx}v&z~i7uB*A`~c!X)Gl~l3dLU70)se6x{4M` zL4qD;dwPxQi$8MU`R&C!sigafsoMJiAoMfvJc7>sw3?lQ=i7w~Uip*o+*VQ3GowU?hKUTd$gPpud7oK$&l5tujU5I&-8vp~9x3rR-Xrq~0BA)hkGy3FN<|ozUOW*&`#BP3S0tiG> zis5uf_1~C)5-XD3Ti7u*K%D93O>oYSV23?pmJLI&6BGI;;rX7A5zc>j6rTIm--F}e zLHsZ{5s=Q<_r3z$evD}cxqVS($2Kz`DaxW<(B~O&9wHlkYWN`&+ktqz?|x_L6f*p3 zL^x605kl2}gwTgZkiTF!^s9svRciPDoH_ZzQG~9uV3Bnt)kV-n_c{lm&p&Y3*;b4c zl8K#9U>L#OMu6wvuiJeP!v8)Dw=O5%Gr#9a1nMZR2{zOD9!i(_n+B1~z@>9mj^guX47~owoU@{{V%IiV!E%gkTj>6}6b&TK; z_@$W^*=|nCxtsHKhq`<3YNe*&NT+puT52jHdQ{#({D;~SkQ z(lkCtQFdAupO=9A%e2QHJPOP$FFAGu(SsoB%BE%qp$GbRo`}%T{5*tS*zwR&gf8*9 zZ00OR5BK8mIS!-G2BYT*qt9g_OiSEmlwk90>;t3s9>wV8UF4@a9-{}r=oe-&y6lqK zts`azcFy#k*KnjgY5t+2(R}gia*+MNjQQHF=8_v?=Gs{SGc&TpgcfsGTD}y{JY3l%b>r+?X54b; z9hc0x>6Y7Wyfpj8f8OUyFN>FjD*cJzWi!fZBXR#_mF`gF((*_ok-Rinll+?u%q0G% zTzRF7r^#1eHRze5xF%lp*YE1DU*kXd z_5UZ%|E#e8N44=em-x#=mrSjhJmu18!t>XUZDtLf;6Hu;pM3e1>GOZ={(t$TE3cUR z_xu0<^nm{rD^5B2q%&B2{DeuRlO~LJ)n``K8$LSv-sPHNy=hH3Zo|B@-aPhx!UR`? zi-+{zk^PgdyTbV!^+j#`h^M^N`TK49`}&cQ(y8OejErRVH*G@ZZ(92MuaDQ?p+kpi z((h~DeDlqBe$C%I>G!;S^T=`UkL^$2kDu_d$79vhSRT*E>E%bVe@CXCafa)pF-Ow9 zDJ{+Phow?)>3`;L+6~=XHf-3^eM7oG(KjcRKKJ|Vmpo7X@k9G}{&?!qPtKcC`iIir zmzGXBFZ~g(t(1qqkH?JBN8=~B(nD};fAt!H?C~>jQ=Jh=@6R=6jO&YIoIj5z^ASV9 z2xN|*O{Pa6^ZwZW()(wBA3Fn(IetD(kAQRhyvq*3vHql2%sft*Hch7_dqO#oZ=UeI z%d(DGPSeK|Ce)8S^+f%cG0R5kvs2)y5zU{GW$D$XTGrImTb$37^Pc-bY5I%IBg;B} z%s}Ul+2{OCm~?b8&ondb_*>9~2@TnO9bJYlA6vn76ARN{O|?cw z-gskV#LAq~2~%sF(=nkT{eAsNdhwCWHhDj08s{f_{>Gm-%{p|1E`L3}{E;V~c;XMo zeLuC7_c{ahneSOYeazYI^VMvaR`kI&41jWJ6e>wflq_HdoQH+5KQII8HJ|^Gem~9g6i4{PQ`yP+ zdoDHoS-($z&t&)2_)5z?neocJKYG16>%TKH;<+}xy!PbmF0;SCbU*m`GuQWT)7SIS z{f+$Vkt3W={xaMD_;*L%dHL9TXRP%$bG**+X&agAA@ltk@6?ay{^fEx-|HAZPH&Iz zPq=?IG!&%g%e2h?v~B%mwx52(^g83%_iw!M#*u%uvhS_>sZ;A2^z?g;r85SZ?Hw6e zrs?`rcK%IEUoMj-WxjVUeB#~c)bqYL=A`uc)6$pE`0>v7I-BXwKj#qxe9|OMuFw3{ zjITd>y}I5lE!EwWNpN(j`Vl5T_V~_YPZo=3u5T?=Kf*F`OZu&p=h*yk)<5q4ea56of6yt(-v9aDIlSY>!`b_^V*{-l z&KpNE=bz=798-@!Pw6SsFlK!Ak~*aOY36$RB8M8)06DW$HwH#b51H-jJ1sLI%9i;% z_RE%jzkuJ)y07Uk{r;zjx;UaqrVVX2-^38b1ck-;t3;TH~|VKZjaB zwO%JAy}kO8Wx9VZ%gzrD_T_hu{O;rQ{GX~HtK;6gTpxetdcRJ6(O>5L{?YZ$29Cd< zeD-=zf5$?Z^_}D6aI)9`XYX&Hdwp|*&i4Nd=h)t;2V6LR{F0n-J*OuFk4Ms1sP^pK z;KyW^*U;!MbAB~9oIf)vM@#&E@7_t%rtp`!{(i@y&(nba_w@R@wvInvHHVgsxsLJ8 z;-|g?2M+v>cAzi4e1k4Mt^acRJ&z|`?_=su{Jr9PhKN06<^%83Q{dS3oSp)i^UwDu zT>rf1a5PA~O8@Z_I_>EA@loc4XTD_$q$fb;JyYN_cqTmsGUre0r*HX3muG-=mXE$q zPl3$%@o8oXq`&`ddi3hk=YQ7D6aTq%|8s`dWr#~YZaK=ZO{#n+E=Y#hr^#9PI6Yej%y*l^TkN=Q99v;(E?swdzb%U=t z#EU~U7+S~vj`lax?+dbDW#044aKfL-9$$9(?EB18N0-m8f5P{f--`+3r?NQs^o03Q zI_ZzzpD-W!K7BlC{K#;gFg|*J{Py&IsME5X#Xwvvy_RsD=gXh@!%Wu5#@zMRW zkM!{z`~5rN_nq(42q!(B>XLe^dsyc8>DV1Gdkg%`?^$}hGxxvr`a-zcl=GLqp&*D{Z#&Pq{`8{*)_u1>)mH8+$elm|T-8$|m z`(u9eqs))H%XPW~@BYQIrk$7m^3W^)_6H;T>QHuJ&ot)eaRyU;`Y-*pY)`PJb<_Z@ z{Dv_(E;o-SxpujX8RdGI$CF+E509f=C!K7}7}qEs$GS%I_yyM(9>=-9z~d>daXg;t zI)%sau2XqD%{89KFS<_W@pM-ck7u}k!j{i;?O>mH0EsA-7NDJ z*9;!dan0g!f@?O9=ep+b_*GXvk6&{Y@OYkUE|2HC3VHmxtAxi3T+KXAbggG=7rHj^ z_zl;26VGR>7xDU=v|QSMp?%AB?nGn0&8v%P|3Lc=?Ypk8PBi8c*I5(4%=4vuav5zB zZ8Gh0+7+}bX;;yv(5|LUrCme2mi9f`G}ko~jrl&Wu5(?>s~@-?=k*V1*Snr@J?VPN zb&%IL(0)YwvFk98H@cp4y}{giea?RMH7v^!m|xqjw) z-Su-`-$k2FyPGz{RhnbWOkT}${nGU-*ROdso0dnLL(6x)?W$pk0@r*V=kiG*t%z3a z8ac_B5?+Drl87H_b!y(tI?(>t9^|2hRaokY>?Bv@k8=`oCQN z)%Ab#DoTsd;*Xv>Mkhc&v5(50~M2o~wbS>UdR8n@?+Sy+!X9 zxK6r=8N^vWllCRrS+p#N<<8E{V~sE8&dJTsE#TFax!zn~uAf)m&8^IJ=X!W`UT$%2Np2~xT)B7gI4w7j z8_czM^$A<~N7|>fcWM7G?S0xm(f*b8-)R3I?OEFMv{z~WC+%a}49?I;JpZ2dTiS%& z3on|RTbNtKcE{&Vyy))S8M!lgy&`u>?wZ`D+=aXzVY$0m?-`!or2UZ5xSnx6WT4bTWLR~-A22eb_eZFTF%KYvX$v4|1*y#^L{36?8&e2F7M=juz^N^4f`>s&GZp9|?cE=DQPX zzdNzoUzzlMccRbj_xh3-XO`9)ad)yR9?op1B)k6SuJt`<7xTaCJjMSP_M&zF@*Wb& zcqHilUpbm%TljN(J7xa&PWkf#{U7w(&%gd7;Y7r8|E+ESfARXiBCY?qYRcqES6$)g zf6xN_{rdmkF=d?VKYhA&131mOF0F|7xQoAxOFjMh@z;8Koe~!PcG<<>OMgHAyXoiZ zvUvF4y8$ix$6Kg$mskC}``|46$J=nne^~4U+5M6?fLKG^BxYxi* z2mcGprG*~HecAp$!e;;L`QPz7w1Ig3x5s(tW-dAPJ^RSb<)0S@=GR>7oU^;>X6`?{ zH}$mJta$HVL7;>GD?K~*pFwmf|Jm$+<^KfF1d;z4fPH-PU}}1L);*bhIDP+GJg@c< zivQAd2mj~tg_R!v04)Ar?fn1voiX?y&;R$oB)jLol<%SZ>+hBhp0g$-XbC75pe z3V$9W3OgEdrW7;T*eT+$Ll@rqy-*&w6<*(VkBdviBrHFtsjo{?x7~+-auf>$D^K5IrXB+8`zjDXa?Kjxk5;IYyg`58reI zUDKs0c`CM>T-R~q>+P_cc&zb>#btA>nH`5RM(Ub~!5sylhK5^t6C@2>HMM319ky_T zRS9Hk_R&EWv-Q4?s2y(V1{tQp_OQ&R*r#jVI|pTpjV&(Hjlr5Li^9;ZEP|EU1Y7*4 zsD+(Sb~B5`QogvbY-lM`MyL485ukuU((Hjhqkbzxf{Ep0_JGy$`G#`ITBQ%hk5Vl$ zaDx<>WZ2h-Sc(~PO2!a{`dZkml$-acf>^ZjMY*{LH!zM*{ z1n6>x9i_ILV0m!hH>%0%k0@+t1A|(M1kJouWSHoyNi`7!5O?H}U{nbQ%7S5N+UR!z ziJAuj&?UwbZc8o=jS@&x(8+`_6m)WpxVlwxX&#eMvMMG8O2QG=H<*`}rgqm0l20BK z#iuNaZ7YAVR2jAEW)tTwzSCTqqPt_IT3s4E4dQH(!o{*`LhP+^<@o`_scu|lMF7)$SM(R z>61Fy_15XYu5H_swr)<@_JV4rsCZH*``$XGrfp71dqMSqDiAF-PwM2*Tc`MKFNzRV zBZ4qBJgJi-Y+Ii3q`lj=r@S~&@3%aulT&YuU(qsl^8_2@2B<-l#gwNlDnAxNCFb=!Ls7wr_j>75hA6 z1i|;U*2%rMP86pDJ2yZ7%E0xh*V%JVIC;P}#cA2*wDB*B5ml$NI8a z%Izr$yAt=O&IM)loQctDM-bxPI(hZhX;I4d?R)wv^_(jNb&!}x5DmR`^6stE>RsE@ z5;rGoPu>1v?%~BF_7T;!-m8XRlRlc>#fs*wD?^~$&`XxloY>t-rmirsk^p5M_eCGjU^rq zhswac^Y5(_+`An~iD{$fyuOUOb)&~kh#MO>_W9{_#pYOIa&Mgidh2BU-n}3t4t4mC zQ?Y&DyTIN$*`6nxih7Q>4QfCT<%O|CP4Dv*)LSR(_ik#&)EDv#Ob~BZ#u8spMhZMn z!M$}#J(#*HaYs^I+Rn|8^ZZ|Pl(EE(MPSfDqa_3`Pw9evDO;1ay}%aUdyZp>8ESAA zK%Ky{v(#zp-d$Vwyf|~5@a-5!xKfP+Fn_~(>y((3lCXL2i>p-ByHDyA-dm^SJqd|% zJGa2ri+PRtbR1lmvYZGa0v76dN=yPpp12cIFXlDo(>cU!${>dZXC%B)b=sbI;Kfv? z_o_*Zxx|MnVFT(!RgJ3C*5u^)?R)no^&axv-!uSmZuCe4{g_^hzjX=rbq z#`N3&B9ce0%(Gk;n!&^{Sg2=w%nFMWmFiz7Xe|t=(;A!4=Q-D_f1O4Ss?$O+%3n06QG@EVBw_Q;?JuBG{W*;uRHu3S zQ&N*sp7V`^I`pqooUKlCl9R!#+nl!R1wZ3ZAABJJB!C2v01`j~NB{{S0VIF~kN^@u z0!RP}AOR$R1dsp{Kmter2_OL^fCP{L5@-JJoeDqU&te;m(?_V-cMV zUFSO$opqLtuA^Ofozl+6uH#)tI;*?#d$T)buvy>P)LAzwqO+n?8qq25I^EgaS=m_| z(RHFz+I7xpcvt?2h*gPu5|h#s=dW72z=QB02qr<${#jr*W)>uD$}YG`EgQ274*cBf zK$*@>*{4Zrf%Gqato){|v!gd=6>M6Sn``$@*2$4j?hm%|o3c)SyD|IBgxuU*=H{F; zZ*9&#J!RneNE(#Y^f~$^^8OB=6edXq_+ooUe)>eb;w(Xd$xo4xPeQ@00 zsbd$e-?GKF54N{bdDK2@Jx|TF?W5k`&N%K3jQP~QB^!5JK092~v}n!Fhy@$AMM60< zRsNMtd;Vs<{%HkV&&zfW;3~78_cXa?UvA&$@4aT<_S%%(C!as7pvYGKoy^m-Y~`u< z)yY}p!VTM>+=KPozgv}**;f{>_ua zA@#H~mHwd@T;tt-m={<`Gcs9m`Q zHM??8X@1&LP_rR5Gtzc0s_gq8eM0`>4}bVc%X=SvOzz4%RsE#=DGgQj+Ji62UAnJ+ zaG{Q&j-~23xcobsZ^+4YeUTgc7q?T8e-;zsOza@`%caX=sI!Nl6XO)jPenT$hC6KT3cay2+Z^$I`V>0Ld zV=}qpF_~a`Om5cyh1_ZQ_L=23)Rd6(iWXUx&9(Q)obLZ5S63yGsYWxI-}6^8tMgMb zwd2|4S4a={m7iCFkoqSWih0HKLBzHC>k_npXXI_6md8o(ylEvgQ@#~gz ztf|;a?x^2Q?pEG7|*PpTsetxKDad+O&cz)s8>;L@Po}(A>{!dp1U(THz`}MrZ2fvy(xsY0@^q2Fe zjQFt+`-k}x+`pbTi4A4`3(AoF7fasU$>qOWJlXAO=dqNXJNbV9GJoE@mZX;cd0)?+ z)cv$`P}j8_H-9Sm_53N8GJh*9B&o%k4|&u+YrRVQ*Ma)HwmSdy)G_j}1;@Wv{;vhc z$j2v-TJou5`}6pE?&L$%dB0gUha~kT^6}B!@0F+WsD0lon{BPb{7D(MI>7k~sq)|M z-a?Y5Zt|Pg7g~;aoS#Kfi{;#JEU@hRcGqUh_E&Q!-F;Gi(!BxY;aFfgWo<0E;`tUtw~j~_514Q2}i>YCJI`Rr8Qi6gyrpZxbP7fu*%yFT>} zbtt!75AM-lsdE4;iiKsNm{MhX@84JRCYAIrOQor2f_gS=b^ZoE3&oS-)yLezWK!4D zo}VY@m|SN2EVgq|?_bTG{CDcQ&nnx$J`@kAOFDI5E%$creMeq4J}!9HIex7Cr{Db751!+P$``}0 zB6WRgq3Uv8|Lvl|_4uLk-(v!-u>3#*$nV+TpP%yl45azfxBe;0;HO{y$B(>V{C2^4 z{a@P78~*a`1^r)sd(rThVoA@}1KN1cI?H+8gXcJ_ zAsykGzw2MNxcf0_{>@`j`PpOgZpXL6XI+=dzoh1%Rfsshe&zfZxQZ~GH@%G2{#*Zuvk4?YL= z>+{LX31rP>J}K<{6WRXj$K=tLugN1&59*v3)nAdt`_Gb9QBkC3_;B)R_wxAP^)F{j556w7 z-5L|~yTR9|w!fJ(Wdc}CH{n!+0e3zX$+MvRyb@P5$O_Q#jUczii;;%+#PSu<>y zSv`FC?&dLLEdGS2UH3)i{X><3xL);=xJCP;O@L>8V5+>NN!|3U{XZq2*Vv?(Tex`D z&s`SYTNp~6zpzfBv9*cVPv5zWq!#KN$K;pE1VOqby}W1@dFa*^GW+^X zGULW2@|}CTd)w9v`TfgJS@ar7EmZk!(Dq-;-bgMedWFoqd6it7kWRj}FO%GyafHmd zc86S1_%<9ju>9;}uaMMYE58QHuPxk09=dpoOg?&+)ZKqXUM>}ouWw5tlkOb-(el*w zR~Bz1cjg=+cjufS_1%xiOC@}A&*8J={yXQsSAKB)sq0hq&$)e@+Cb#)z z=s5XlFDUnEzp~VMO0yJm?qtd56lKci?u7S!nTk1mp8Ec0CD%sA4Ju21_g3_JDF2%* z#az<1JhS}jr~^>G6F$2bmL5odck}Ml`L=R>?-g_2?0;QbdiE9N6guzgbO!gU({%3F zo4?rf(logC!M<`-9prQWnp?H_`+gVxf4D%o#|+-rq-}w79r|Uh=k!C0xyf*jdzp&4 z1^J3uGi}%F|IXli^O~)k?R~MJY9ZNb{~avdu<&6q+P)P1%Tj3u@2eZOa=q`recbH4 z0m_gAmS)zd!DTJwxnGyVIr8ZIuQTY}uVf7F*QIc+(g9^#?LH^TAO2PEJGY#4g0fWu z%iEvn+y4_1)V0VK);O}+em>diVEN(s3B{i4A^&TY0dz-Qf$p^L26rjhwyAy8F;Am4 zb=5w{1?#r%MYV6ngTC!qB%ZX#bV99&5L57+fC8o}kL}2b4Dq zD9<-q%g=vn+wsBWfsLFhPu211^?#RKwbxpI=&qCvE)QHjq{`ct6?+c!@;ggXXfOJJSBv4gLlasKvqKUO}zGmcCvJWNu@4lbX5;r6Ycat_Ne=kGvk@qfqbf1NTQ z`2>S3B9@Sa#Hzlfl=%Ly*E9G*nIll19IzA;8uBNe1IqCSlpTDo{@aDbcW~^j{#E%| z<*9SQIi6a+gieym2=Jy4|M5jX{3EhGHjFw?-}QygKVEL&xz`RTU*Yxh%C`?6KcIYl z(9bCk9@!9!QtqpNTjb9v|B$*i^|F*Nra=$Fu%A<&XDw|hf0*Qe1u~G$4{z&-#rKt` zo?pK6da~O8+)rBSf;RtT3&nPkf6_ap3@*?v(1;cG|D-G6Y5(sMpc6!&^!pUxF|!Db zW_`D<`;LVK>>9MUw~+1NevUWm`5+Dl#G3ARvEHQZnoo*<|Cs(c{g3aTPo=GOqY(@c z%SB;rd42EV{m=5WPt;ou-;e+jc<}`KE1-V0v3-jNYoz{%KkeIXD>qo@So2X|^+SwF zB!C2dCV~F?$C|ckmI0@+X7%6QUo8zdl-l^go!>k9NeQbqd+Gtt&U{LB`yKqfy;h6M zW_?lG_4Z z-G16xtTxHucH%&*s(-nspZRII)>2Q~^Xxop89G4&VOqqR?q9-s3`9OyM~(JXuKzJV zKizklL5ZJ#CMz ztJL7j_U)q1VD)j)2?of36Fg<3ub}ngz$U(s0227=1fG0@2I{UKJj3@3^*bE(RX-Sm zl25=5)SrV6!%ZacZ%u&qj8`8N*iWa^`;LNqNL$x*aPiOxSi=ie3|k)=odIJ_;cLev z=q$Ru3(Lvf+11zEH#8t<$k5^AX3SW)eEFKq+YcQ+ew)K@ZdN{0wSG`v(|!Aj(v+DeOE(OdrgJ*!kNM?8~47l zXyy3v(}xZn6B-ub>E&Z@Z_i?}7+`1Fpji`EfOIDK$tbo~yc9&s>-&B)$hPu_BYO|R zHze?HNua+X>JPyBof?$W_pM4L6FX+~ z_$jkyFJ7?dwKrC5*t~V`fdhG2S;x;`=3c)omB_VqjonT458Cygcj!LXG{3K_f44=^ zsg$<2hz%-{5rk4!l6I3!5Bf?gP;2-qtG)tlW0rM*Y61lXnL42c(xAIQC>6w2w+nR2 zl4do$q>ps$)m`Wm*fp`;lq z0LluqoJQK&%+t3idQ6QUcW8g1Z+##1Rh3jzSEVm4l%G0&IXCN6YHHT@?TM?`ytQEA z;t3NbL`O&a`};aMIWTQ6K>9>M+4N7}U4R7O1L;rRnzkPE{d~+p0{=b)p7kxTwol+| zLkXR3RZwuSRZUS=6%Fhu24zY?f}q*kIk-5xdV2T-1%}29iJdfI+MJh{tXsQf$JXTJ zghTt259b^_otu8&_NY zyQaddlp0z^$~K8gCsC<|twy0*&u;@wXqK5Y640OeX0d@1OF>=Lqc&N$vEdPjrmj;} zW4?W*{L<+=NAgc+9z3#pcj}roo8~WE7B_ZsRCu(nm%o#}i#-zt>d=@L6BHCXjlr;J z`raoF2><&$d-zF_z|SS{EPd6hsVpWFoU_j)u<9!Yoe4tiq%rL59X&j~{rv)l#tfS= z{pGoH7A$+^jXk@P52oj5XC6Ct`24xkH*R0!-o3$>^P5|1&D!RkdWBA1p;IZeO`^6I z31}g6t3*L?Hb907G6gk+XUK730h11ph?i($nUBy(}RGr z0;y%|TE(4>e0@DvThD825$l=-E%lrRjYz2#w`sYp?II1>U|_a^zA`8}Kv^{kb)e;1 zL>)?LSBtnqsW7+5+FL7)pt8)`cUx)=>@xAK8zpDXT+Pltp0qE0!#msFd~M}Rlc&c- z4GRejb8~gKW5Jj<3u7>`tUAipHiQhD+4Xa8CLWIj{>2Gc_0{)()|p^Gfi~)=udF(X zPGd3XcJ?e6S7$FTui)U|=(xBk^X4sEwQ}>et;q*c^U~AuPanN{?>bjlT-hK~*K%77 zwOz)lE<%2c*F8|&6;@{?6ct7jx`-e`yn{uQxDbJL8v}@nt z4v>Qdj}DyZ*`29N$~Pt-Zr_`yPd(9j;PgX~G>fF1xu1HrC%K?A|MsT`FFrh7`kPZF zUtAIWv998a8u@3<;vNvKP-~DFz_QZul#teo^{oPQg z5;DZj&eamk1)3kUmev19J#XK?9slA_A$~k0@Y4wN>8nBC5nFqZil4N;K!HIk#>vsu z&o?kCVi>ge7A<;x#flB!uF1&AKXmZ;iQ|_A+{&hUou;|7wa%!lHmYh(+A4F4MB66T zH}lotj8Y2ppt4%|It{1AB-Vny0#ORhAWfnNAl0G|bWOi&uKS%_^vTJBri7%@4Vx~% z`sT4QbB~Uje|+@I$EPg0Fn#&;(J!Bxy5!o7<+r9Sy%9V8=WN-uYr%qL zqee~e4+wE}^J0Rz1^S9=WK)hos}cLtZXh0o1pbW({HVSH-!FKpz_@aBZ~^yJWccux zXD)no+3GEucBiJ~W~3iIdE(lQ>ugnJdq>Nou9kOo)g4xAN(WtRGLv3nHp)8H0)s|q zR0&NQaYvh=9oCJC&#HtUREj^Zl6)bR{=T~U>zYCy(XBw zu4>||{D^7SLZ{x0n0{yYLU#1rlDXT|bGE8Rzag2jzINy`-pDt^(>B*FPSP#ftD3g4 zdiJ)u4S5f@rpeCU`=C1UXT7{jUhz;OyI-m3kxRR(#qIU- z&en?i^RKAxMf}>UR|}z^G$|?Lop*LFT(op_+<54f_1aB) z680ZHeCFJ_8%-6eZr!_`O%HWd=5~3PPHckE0{D{Z#Gse7YN-)a7I?^2azm@s&?3<{ z$R9Q;9*Jb1)inHG*zj1={9WqBPve%|S+uokS$zGb%=-&A)y!I>nEaYx+H3Ohi}>T_ z3w?)Q7(T5$V*K4t>l*Y!`iA36w(LH@&^r)Zb|LO(z;JdTYk$?{gK=D2afXh zVu8$K_VKPr?yP*mQpsOqV&x?fk>-J-Y;0#18SbkK1?xv*p^5WQ3los8C42(7do zLMFgt59XFu-T`e%bybJ4;X&~&(c#QXp28i{C8?wQD!h(M> zrMcNV_44gQlUqtyZt8fB=AYC07gP6T~t> zfD?pPLJLR*J|B?|y7M3ip-tZ2EY?+vx@yGTeDNo@3p-bCD_*?z>iE}-=4_MuS{m}QHStzgzr(pE!8FR zI1!WqHWd+kkO(=%^gG}jn(ZE%A3pjbE%2CKSOG2OvhPcrF-z~POl~c!{F+<)m%27m zR!1tDNqG|~X#Sg|jV!7E(^c{3$M3zLcwBi~@=0Og&p#89Z&J@T~2%Y zmFD#sr5n;q=Dl+&KCAT9T@@&+dy<~Q;${#DUn}Nm>O`hWt`52j8~G46rUR9wlD1j( z6{su-+=5syDj1cDD5GpPaLa?^OIy>WsqWOa+*dbs9Y1~neh3nh_Ah?r_1MvIKK=oA zc6Ok$Y~do%lh~_;K!;H>P(4BC$iR&MgO4Ou842_w0L?n9=Nx>w*2abP8vx-yc6N|M zFqw2aCXCA?eB8YwLn6kGn=^aP8}ZvyGBb`{K6~@-_0noiy|&s2-F!NQ*(8TfG;>S2 z5{w6puua8p)qx{g)Ltj*X_P(^NIwNBt^UuOqFV z)YV9g;M8icxaC{L5SU7dj^7EQ<+U4x9T0DCgiuw13Iuu{RXi1RJs1>S=Eg@&BCWVo zaVqEB)^(fTT=IJC_&DFtK$fEeSiDS{9fM%O8ie|Zp#*Le{KkNuqGpq@qjKtIE3H-YV=&Io`75?dy|YyBIY+ zJ8*nX)btbXBl10B54#OJuq zuS7`Dy_5RH#VygnX}6QhUU$!Zbe|OOm?Lz*42J(f2d{%nxBYa_10LZ=gC<`El{IR? ziIc^jm&rc4#d&c3PJIbS!{!=F%e6e7Ng(JDbJT(|WtGIF5E`HXD3|m|cn@pjpR9iS zYRsr@ezEa{&zpq%GQx2o&3+!ioXw!mV=)&H4vQST-e3f;a*f%za_7a%?9RJfb&){F zW;cMolCYKH@>W?{8~C+q%2jn74Ny|?jD7k_$2YYL^&p_EAW{O974(flj7Kw915IY7 z%&4h1Hpp6wZxrr}PujS1>%v!Gi5ou-BHQd34xq2-;7X)svH|JUR}2DvZ6NRz+Vj1) z)pkFB<_zwh<&m@Xp@uB6V z_;UF+#kj@SLtnZA68zFlzlm2ur`~poIq5d+taEe$GxUgE_%T{ww)2n^j*-V$q4};+ zC!E5M5o|H9m`IQTIP5kO#OQhXwj$R_vfQTe|p;#vu z=@nu_O=%OvS3s14PTt)pe;&Wqyn;8eSg(0_tg|O(yRa5G5>s56)9o13 z=)`2Y!+e66K{zfTTo!u|-*w=0dy(YfZGIO=tmMnoa=At#X_N5uVy;fkH&qBbY6Rwb zaaXIX8w7lM&`bsoJct&W&!Tp{kPi2m$=Y+O9Uap^n#j>CE-igp9XV zyfb0+R6mbEXO`di9jx zOF_+VN~OOLOS%L?vw*7<^4fR;HK;6^kWyJ-CF(0WVE7M=UzV1e+bXmco)#h7MCOeBa2Oxjd}J_~Fu!fByP;3}_S@e`L6+!fxx&Nh_`TiBvj zk*HNFRVhR!Dc=D4N+B>S*!oJYv5s%7;Zosea8VeFNDbe%=_?J7QdX3Rbb4_5NvTc> zrA)7`Xm6=gbBcxMPhHve&aUZ`X2paLcX6atR&RR{ZY2oy0|YATXX~pM^8n&ik-*O( zVEI+0o^be$rZenaU44cOiJdrc<{NLUONc+PZ||XdmwBq%j<)KqmI^b3NU25UR<;^+ zlu=+X@bwT=1fzx_W)eie?NUhJ6V`nxs{iWk{SCgO)4awU9XjuZ)6jfYWY&=Bcio4b zvJc83Jkp#3vS{w9c3#Oe*F7|ky@dN7k0IG~-z3MN15~5WB_0}mET4T$?_`GOK9+YX zh@*cx;j)+MmEsnb&GJoy79t!>xb9?l?Pa>Bcm(G-_+}C=DNeoz2>W=Jd$LDRrd#+i zrf+8S_`^dd9=&zDt+wtniS!|xV-m78{4y1{w7EiJ{*s|fq0bk+=p9sKF%2%6n^f;I%i-eDAtK9r!re|(K0mSQXJidX;QSx~zkwD4kHcL1SRpPd0 zc?XQf>{O1$|d@E*tn}c!%hbbEpQFa9X8?O@QIg#V~>MG zPCVy3{BXdCV=^psyOLyBcLi_>2t|59$>?<$@l*^u4#!ntetdaPnE} z;Sebbg*E0%o1sr;p= z(hQ=gG*#7fR#x@M6)Kr-&6^4cieVts}Br~^GbZMmB5YMmSw^Jde ze07)HWRz$@Um0a)2nYdv1%@AB2Ym%mxD6uJr3*KA?Mz;}?A3AOCx(ZHI6FFkegdPa z_XVkE>nqDmw;hS^NZ_ALz%n?4T3PhXlT~k9z;^Y%9dIPfrC<%zflNrlA=K;&7EgzR zy|b66Z*=tNsZ-~?wRSs1rxzT%%r95y>P)Q)jYg=2hDp27s0TGAf;jDV2or)~Cbg2T zDxq0c`2}D6(Our}5)UCSx*<7)vL{5wtlh`$dHPT1W3~9>cdR-gN7Z z^wDLGxtOad;c3CLVsq47wwA}y@p)<fm^-|=EH$sgmx`B2?YiSI)&Dvy28*V*Hy|Iitlm{9?aXgamR|+SB)Pt zF~Gyu&Cc15pxaZEm-ebFxXW9>y;fyq)mo5g-DEMCK3?9D5z%vI&wuN!Es2TgXV2W^aw;^f9d(s$l(MRUnWl8$ z_0@7TU{Ha+YAsW?3aNo|^)MGf)w?3uFA7V$ccfIlw*KCPMK>lbx%JZPya}(AM$ftx zIN>}kFw<@5Nw3&5j*&+qC*SmlIq5#+m|N6Q&ml)*rd;=m$_Ha9DE5?VXqHD*o@4Mq z$AFaJ*rOw+Uh)V(=o69cJ{y^GJ~|TMB+fL5WK4Pyfo4!y zps!#M6C^qn_d!`T2wI!!)XFA(b#>F#t9Op(AK$uZ`|<^^jEWu+;OXN4Gt+)dG{_9xA0rcHDY2|M? z!cWc@es=2Shg-5c7j3DGoN?E8>_xxP*C2Y+F(BW;KacL5;vSI8^i3u__fl(*J=RbJ zP)$sqRKhLEA>bg*Glk`Q0L&yvgG&nX8NT}+gERd{oPvbC{~_DV=gCL-k`*P6)j{P5wI+9{EqV+(-mR&4UXm} zSIZR{N;oP`san9%gK-4{m*xw>qowBZRXo0qFVL6r+RFGU4qpu-;;O_vbv3uGhNps# z45dH~1D7C_6lw?q5^IHB4U!&fd@0-=5EaBfNOWxqy|&s^UZ^;hdpUmB!Ii7Fj~+9{ z*FW4ki>W0%g=V?wFyIsJJ2l}C$g`f4f5H=rr$hn+2=rH3&w38w7$^fzF9?%iZ`D^} zp^=lOy}W7r?$mvU%1ec<3YDP&oVo^$RHGGXbYg1C6i`_ZrVc;u;JE?;eFYx%+eP;? zvZcv+Z3|c5jG28oa>n_PDL3q+j(7~a;4|`yoo`Oih)V&HCq0Am9fS7!#N@e0WI6<< zc}C@UL}t5$WO_v8x`yVshvzv5XMwVE3(NJ0$OnDpKkT?mSdP!o<8}cVuHle*Bw+Yy zSTlXn-6Hb9Bm;c~dm#-fD=6-aC$#wd4h9Z64ricyrG|~Y0Hbd_Mx6H_du`afl97wp zna7kI*&je()yN;p#1ACG`!ayWUWLnC)bhQ|j7Zt;rR={IzbQ_R+}OHVD? za_vm{d!VdtE8Z)Sbrwm?Jh4$IGfRaQ5qC&LX0g;Lm763oBlJj$#O)HPnJ+a6WJa;9 z9R!^JAdO-@7<+25P6y63t_p_gGz!`)O4?M_A2!P$!RSjE!UMNP4Uwf{twCmJmZ((~ zhK4FbW3{oIU3K)>)gAH4bLTIMjg9s7^@RzwtaAXu&4&c2EJ#?_{T`J8j}vYnfqyuG z{yJ(v+MGD*3Y3+jy_>gZK-{QFb7wEv8J~9c+^ssPvZ+F2sxT>eN+Vyd zWveZr*Bv#yhfR_XMUu~j;?Lwwe>rkqKXr{PWct;>3711AUke;{!Fy-{%X>fJn#A-- zptEh3H{qE8y?ca9BH^6C^4kaY6?mBl=ba3=CX?grkckdnrl4aveU^wiSE9W zaNlL`mrQq!cl1dj+!N_u`v~t;-!bO{NAF*{kyBauokV%v-u4~$jzicQdcYfA6BA}`yzxf1AmOGqo3BqPY&uuod9u)OrBro`XRw~9q^Ols zt^xlQtjoD=ASGO75xb?ZtgWbARm^DuDdMz&6tlG@V1tz_L11<)kQ%wJLab6K9vwc+ z-mvY;`Rm%6>d&Q;59+vJ5WcJ9ceIpH^Etx^%{G``Rj8{}=o;!eE?g|$n~?p^h8?qK zEslzead-2AVG8zkPB2FqJOH4qtVS2=tAF^n5>NOn0^j#v^|zp``l_!irMN75jKy?t zbM*`g2!~m!U`B=A@%v7kyi(twYpK$;R_oP5b-SXyLu>*u2)oVFhYh0lYx$29mHz>< zaZmY-#fK-Z5RHFBFz@X~x8WxV?{vqIJiqAU;7}Sd>5{X58sV^o>74-j3P#G%eGWK< z=+{ z;uD?)3eBq7Kx=sfXE5A%gUWIX+8+>|>k_!nBXmC~EAY>I1RsF14gu+eM-l@D430Q8 ze{In<{+Dw3L!q!!%5AKXs>?ZQHdiB17&#KH94r}`sa|SmQka^mIx2)}DNj`;F-U|u z&|`d|0i=YlDHrM4viI(AI?juGE=V4nR=j(r;=Pil-0FHYria2|JS*? z-yE0!;vid{D>R-dHQ$nbc(JJUp2*CF7N5`{;2A`McCpX|B9s_Fz^39!^juLp2uGv> zVT<$}v4JP<0FjCeAQDbftxPB3H8)n9WU>b^TqrF|xL|p9!Kuos%1>J*@3qN3P;=U~ zJZg>_=$}=?jL-_`b2Qdgx2rV|&z`%NzCRb{_JL_#M~@oo?d4}}{)6Izwjt`PzOM!* zo)3Zkwv$y;S+D!ON73rYf+hg81z2EKjT|v{*()oyZP^18i5K1D>ZN+nQQ!sv>1}<$ zzrBb|GSPcg@{fhJ-{zdwuS#y6^%g&72`_AJNyJOn9i#I6MxF8>T@Vm=+H3eRhmb4? zJ7@Z3gpRrB6?M!v=A?IIK6u4_qjQ`BQ(gRWy+V%pMjQe0ip=pJdc-{{iwd>!-{%@d zjSZv*35I3+L?3}T1Q73`(AL`v!3@xH^ohw29(B?w=%91(A!s>*hYI{uPC=RA>~aao zW_YLh4Lv~*Om&UUaSc1{H|(@q%oU%Jx5B61ikVgP_VyxK?bp?^t_rbPAq5Sf6$#ZK zQgIhZ9oyI{>Q?fhh1*df(83Tuxy&RH8)SkGDc>ySLkq4`AT>dQ4#K5GVlyZ%P+zx& z+IteiJyE+wI&W|c*Z3XR1)V3$-@PRH>{9i&@n=ozvJ`LURvo>oy9Y} zVri#HU=Rz960u$^(n-WxsYE9eL#^}>M+zc?!GI0mjr~@7!>kR(Ij5B3+AphN&S%B@I`{_-p<)qqFo`8>UNm47z^10FKl20*adQQu!f za{w%>@nff~Te~qiG5zZ0JI#$+Ws3nEAZ`3M4NOH24l9`n+#}7Bjyk@fq2`OTrz*$I z%9{Dg$-s%n?4weN&}?GJ5r`9@!2}5Id+kCFGK10yzf^D~(R}w4Uf}D_2H!Y%$RX;$ zC+e`BZxS>QoqV!Eyu;h8>?*zxN48kYTCHxTKzMHa(T=&{}LW?hf z>A%lDD9sM0t8%CO^I)g-`sY3Nfy)b=R1n4hzIxDF;P?VxJ)8;#<}iH^+WBV^e#hv6 zC;i4;jGkF|{(85t;*Z=CrHG^Dv0L~Y2ntmT_-#B6SUcvLGClk)g~<+Sj5N-*T0 z`3aG$P(vY4BjBo`3jhT2MSP8jtpb5+lohGUcn?5daVvkFlqH_J`u3a2l@n&AuXyLW zrsfk+Sq8pV%TbxdTBF6I1$Pt1??61fu9_MyEfUDH4&`s%96x6C#NePXP+6d_zSfQa3$ep^RR2E!>cJeCUS1hWc^B8cJi z9-8kv{D?>NaS(8i!z5I05jijh**P>bAoe6gFMu@_G43qWcOM)K5;Xb*m{kxj>J^ha zbke0^lP}u`q(zQD2N4dw!;V4F0%$6au*0Dv&-+E6^olqNYuF4NamFY51O$|NMr8X8 zI~z9cdeFFALuayId51Ieja!Q5Pk5CN#8O>FmAOXVQ>%DTCGCcFi`3jI>wo};W_j<7 zptTiUAeHitDn(~iWmjcIr#0%JsnXq}6M=VM&Y57xmO?PpHSy=s0Q1yT>dnAy*E3bVZuI!Rl znLuO;le_}z2DQ3hA?>V&wY;mU;y%PbfK*jKfG7wEF@-d&t@wO{b||b>Z<>cNX> zZW4DWBp=+k(y}8(7&k2~WbDDf(Ff@MI|$!xgu@!T%X&M&0ct|k44%qo* zxP;_FzabcG&fvEX%w+}SFoKRagr6M0@cf~3kHmHFmq|O>+!iihDdrmFLbHSiwv(}n zt*RI3tua>>&>P563po%)paBbqGIIEoKvbtCp{7R7@UiI#$^D`)js%2wBYCMv2Zs*Qq_y>@f z;Uir=ysb0C_i880U+`Gwp`o54tMnOQ0~1ewN--A+{4jyO-$bzGVJ1*(m^vh^e_IC$ z2n2PqcM9?kiW@n0)thV5_GH|?R0xxkfLlXb`A8}4ZW7&x|9q*De%w&;S#$GuH*P%G zxLq`B{u#e8%6zhSSxU28;N(2d$9Fl)ZZ-%(%%Rcevm7DDdpZ+lQ=ta=F0yle)xqO! z@8EbCZX5*WQ2250(4zsv&Nv6K%2;J?xlEV6JOWo_FLi z&+sD*&;4#8d7k0Xy-C)w(_L31zpr%~fqGg$ZW$RLOhlxG*_M2mI$tmH0z$ zk$J_63nNDC2pzJ=&1ZwfaC(hk&LbFeY4m9XH46c(LFUpK3uvqv1Y;UOn@Q;_0<_iw zg7zvHS~SOCZRsHQy^$!9W-eR|A0r5Ua^9ZUU*`s_VqYN}&O! zTNkjEAP_uI2D{2z%gb6y%UjCWt>qjg2&7BOnt7#dAmH5sDJyU56YDXcuWl7LUgJGT zJ|cnt({UfZdqr|(=8ccea36u3Dp8&;Q{57GpSs(6sif^D&v5Z><<0WOQg#anr%Yd3 zq~?^XK)}1jE^8}it4bi0qD%<_7lJh8z(?T0Bwb}NMSLq|eN}u~F8OfjmfEP7E;z)T zaUOo25tigTHa~h&%1f`DxN!r5A3gzV8B~^v+o|Stwed6{Fg_Y)(QmHP-M&_qlyqSI z`YqF^%?R)hbhL*dhu}n@=F5Vi?hpw73}r<FMPa5*s^l+4A-KQt~e3-%ym*L$Epo8S3N)aBIl;owf3Jt6RPmRQxvmh<4s z^$ywU=f9aoU&dlCqSNMsnsRlT!=lC6(Z@L1kF{frV$xz^P0)rD%#j3b1j{atWjD&+ zA&y};md+Z(a$4dSyv{o)#lt^|<(cFcmFE?8Fl5vb*YIrcS-D5%!dM&Mp@*Tr58O@e zVVThA8#4a9dvFE_47c$N&2$T*65d0OgJTMM8-0eJgm`uL$b9G%1Q|N<3i!v|L$kqA z<{qBoH}n{I$)I}?0z|swXo;2ckr%r%XXb2jt)4{r0VRe(X|q z=&YO33pq}s&IV7tFl~)w+S!EbA;To2*UZ9HWYw?!?{R*HL+^`9mj5QPul=ohtv>9LaKwu-P@ zPG>9!eFe%2#GW~wAjUI^(GJXU1TmCBi~xPbqK_o#BS2r#86yc|7~~T~48a&p&_)uB zxs)(B&>S`~JrbS#(g^1*gvU<8Ww#xSR)%?FC|e80<|Gg<5a9`i)*i=z{SacxaNi61 z4Kx*$g6U-lmn6aoBDhi^dEU4U~z+)sz=C@XK2jLM?<^382TYycv4p z*rm;7rOjYFfxQHll~t^k6|5n%mCBCFD>qFTKN+G)S#+518e&PoB?@j&d?A7V2?47fdUA&TI;uApvfxD{AaXsx zFMRq-bJwohlDa>;@D{hN3I63lr;!=pUk}>g2fgxhiTFcl#NNb zQus57HVNMnHUJKGu1d&*&@3IO0&ufi*PtuF{SGIAe9JD#2Uk3(3k^)WCleUOY^{{5 z2Uj^v97;9W_&NyqT zL~0I?ilBgqFRMGM(ruuaaDRmZUXfvsOoBje?^49E8?3vW16R z<=15C@kbUfS{oHP-o@D+tSnGf5dJ>+Y3qH$p8EE4j(zG0F!NuKz~HCCx(#bvCv@*a z=IrVm9vMDu>KqukeBsh9p|}c^Rc(b*52I{E8qilDpse!q#EVv589E^qrm$mpZU%kD z^jHD!T3S==LiUdfOt`ee}K+MXb)N=yC8fNGW|!K zfZjt;Rz9Q8$IiW$eDXt3R^=7H27LvCnyvauz-#AojS#B|&T6o%YUL*DtOzjMRRxUT z<7*($-5R$kleUBQ0Fg?JAXMzA*eI8@+cxzO>S+}S?}QlCN|9O4H$p-#YzN;s)sZJN zfxhC&^bkT{Bs1USYwuP5;xhliMeaw%HNP*GeGK}F3mtsocA;1!uV{xWLUbq;q&(`D zGsq-niHOR#RsiZig^xlFEl0v8v;?8H(1tCo`RLfK=J*?(+pn6oUj2Mla?^xO|DV10 z4vyo@vOTjby!Rd;L4pLm7bQ`Kq9l@{yeH*F?@16OK<~Zxo*;aAU+~@)JU}n0yQkeu z_r4vs`!?R&h<&lMzb}(yOC3EiJ^ROWw?yhjDl021s|u((xc7YLo?A0!z9;#;a_}nl z{liafGEZN+Xa1pLC8Mjf^)cYJ$2!1jjbViSYp zK0_sG|MR{^fBeb(^B(o&tRM4F;1U1%&=v-oop-B{?c!~Vg+VbE&_5_RH8b;-dGl7T z+<4-|CH#t8y`8izx7pfiZH%YsvUvaZt0mt)`$j>=q5jyoqy(U{N4JV1>xJExgQjaH8sxgu@S}nGtbgJbT8#UWKIZ)x~ec_6iSng+-^Y87@6)*gh2{UVNSo->UdL zQQ658C73r6n3Bhs35HFe9Yy>AQju8&#&2e!P!qF>P9GfI87dL?)VZk1r)Ix<@@m;{ zD_r-{rQ>W2i!P)H<_@a~DJH!()PNo6*lSn>G_^Vm%{D`m!_?w1iZ&cuIi3uE2z+L| zwjQSm>xNdRp@Wm@)^U`x-=^pv>}BmVO4~|0+{PX+PgmCMFn6MeK#Ync6;vS|LhVp! z6k^dUQJ0(%D81+eudrlf0m_y0lbifCZ5cA-*mIeUeTr_87`?}n(d_td!us-41=&ujNpI=e`>Wio(`iY3pTS(PQp*o4PP6th5eP;Z$QDKqlb^;v8Kr zr^toim#p4?Agj!MON8rgvHg|-$9TtWBnnnrFI&Q5gJ!>7>Ag!@MIuM}>9Y3{%GH=) z=n*%22<%TCc46t@_Tnnj-RQbiVSiBL{#k+R?~hy`Sbg!5edYlm%XqE2_<}ok?e+y9 zEF3dxbQB|5<)xeN^%7i$aq8+MIQCX|HKDIrw@#bip$QP zFlWwN%a`X|ym%9SwZqw~xO~@HzacD@|8w`To(Zp<8UD<{^bxt5ppOD{v-~tOF~-zs zCTq3X8t5tY7!}EtLP_*s>(=O(p6>dthTmSnp^Q{uQaz; zSvo{;P`-;qRLMoTsf4&`Ypb%hR&cV_S8eSjz%J4)V2w-+B8z&EbjV4QvX$n%*_Botk!i6&^drP^fa2BrwEKsMzt`sf*~5KqxdE+^7CL%RsM zqmZkS!nrJMHJ)Bkikf@fp8HJAxLDYczo-1r)t>eHJYVc@{A_RibNRKz_?)H@E2>5> zEt(SsDyYMV+D(UcCs=0aEvVYU*Pv@@~ll@FwbV7hW zh=GPo3KM?|<Tv~O!9 zq*KpmR1-yLM#?c(qZtcW2^vZ}POb_^YP8uZbvAef$F9{(R!L8(rRf?iT-I<;q_ z43Oog8K+YLcYs@#E^v~B=0WqaKIBbZ(DKOmO_3SsIrn0?7nZg=Y1Gk_F~<`}9blnQ zAGcl;y(TavH*(lEA~YjEC_PV~1fVU8%-DttO>EX~T(gEwJ~8ImOQ9*7A+I3YqciuR zbqBBLttN9zo^W>dm$t9Abk@}TgU9nrq-9JOZE)T88oMez^w;!OySs=+M^B5pzs1XR zcr55~Xcs2!O7P9aJDqV4l_nqP#Eudith4tLm6jIt;SKISLcuGNH0nwmN^9JMbko#T z+^=*EARefy=o8@{kTs~?9w&)bHzCa7-Tidj5H6&rHlYg@(om$QSdUt|D%^t%uO}FK zSnV2wYpQkKLeX07=qJr{TVT=zXXSDCR(SiX-91E=;}$0K4(A=08wKgN#EHUN#|j2E z7ks$w2AAfG2?EFN30^-v` zZ(v|RNNW7hxwGEPU9si*+2Yo!?nX~Xb6In{slC#2zruXaQt|)3`)TpCd1cVu!LiGv zz)$_9>3V5epn9C2G+I(mRcWS4+7Xf_OHDRKNOGv4r{Js*SrOR+f23@(FOn!i9F(#l zuSlghO(l(@W`yR_>Oio}fZ*wp1hw_5S~FLt|0*ner7n1(K4cMr&Vf(|e97uzQ1prj ztYD&KW0`0%{svhB0#PY!E!qYo5U3rHJxKlw)#x8WmJ#&bkZ92sjhF#*Q4OXsax1sVL>)E$mm7Hxo*>R%dRkDzEhvHZkh7uB@}k)Z1X`@D|rs zl{Z$D)_Y2us!i?m_*5A>cwmjOy~5n=Do2&t>?&)r7d2Z78mxuQ1fo+W@{|-c6RZrf z{8wC5UsPCEc(aau6br}|%5OH1UwI5ZUOe-l>yf^fG*hx!3mYsq>&vcJTZ(z*t=_U` z{NBrN)|+oufTd*A3?z(WWGJjvy@{PtBU!8w1-}3Z2$HZlZnL8S$=D42DEuXuu za^B_}UmSO_aCz0zbJn9~6u~IN>MymHkP-Z8&xfV8yb|D=)mZaqX7k%SK;)U%ji1 z=(2SYUen#S>ff&1SohldS0}u3Gj-DO#LP{akT1Y1tuzI&3et=Rtkl}4)c&I-eKu7g zL2)PQI~_`f@j_KaXhl#h5_)MYAr7jk{>BOfgPd1U5+co_cpOGZ>Tw$VB)#7oI{oX( zDfv;+YhzP#qmy#jhQ_Q4iC!5TwIVEjO>El6z}VHn@oR(QbFsR@n;ju2xfA{{k*Ql_ zGIk_oA4nN}h(wF>Fg|OKe_Rf;a$<+=j>y=_+G2R--n2<)!bcu@<~{eWLoJ@V{|R2z zSANSx(FUepIT%Gc*g%RxQ?sMJ$>nQxi2)6*&cPPPK%=9p$=TiF?iJzeYj*T1fq#^; zgNqbhO9Z_DM2oY%&FyP-47521m3doj9C!BcTnq$kB9(RbD?QZ8!|Pq04Ge>*;05$5 zGwACagH@JZntHtCR}K-1Le=RY0qYe@elS$BBDBgmQ0Ki<=NPE6^w5zFPepRKzi4u9F27qULA_rphYrP3FE1cs4V^Mt4U%;_{t$MO zGG$1*p^}s&sggD7RIwwaOR5Y>;^0t~D(ibOOp-DsO{SzCDrqxCsL}{o-Y{IPCefli z975>ysI$_5H97T~tkpde9P+B4|4gm_Gm@4pj=XD%q@AJGKhK;#mHt)9|DAw{1%6>) zs{=n%Tt+4TWs+_&V$p!8jqGShw}O`k#i1!(Aq6Z!R*Ll~1L&zGnU^X>uMf}OpZe6< zYS(vO+kGbW*h_u(;_3>fFxY(VlKNUhcTIU$U3pWZskO=8++c02Gj-LQyCJv;awjE; z65Fz-%2Mvd$i0OvLGHvPWhGmyGS$~u8mkPQ!ehtSQ&rYkX>6!4)K^(WR9c!m#(Kyx z(w@q)ri#)=(khax>hjK7V|PVKJ66WE_Aan+c3bw0hxG9||}E!Q$@v+a$&RqM~zZNA!8 zSlsIJ+-)?pVS2`3i=J{{)77TND~;z*Ut6(c{j^Cl;-XT-*yu-9;h&FJ{|-z&hOZy} zSN6#pRB(#lxcDd2R$&vyOj-EF(u3QN)VrGit43Q3gMeF&%wPVt!g71zs)~8<-^iGH zC2`zYedtR6@YUdzN_vrQ8Ws8kJrI;3X;LM13V5ZGk^vlzHdA5I6|kZ_WJj$Yu42R< zctt39rB0XB>4J(^Wx=sSTk${w#MA1Ak#xzt{Z#NuqkWE0v2LiDDygT5&@yb4X~-{W z1LjJa*Tdqz42W11k+2E}(UADufT#^g!}iCd?Z%QlC>E>a^)%_AllO~Shx$En_#W^| z7rP$o22ETp=IzYid3!}iW7V(Rmb>6po$GFc3p%|Oyb^Lck zY_O0Q^)%W#p}FeJ?eJYqc1AgHyrYGj%Ff`4?nbMqE6LMHpXx1b^>#5N2v0C_wl?f& ztOIqn)_Oa>2hH`amO3Y;cN19_IgfH#*lgG#UPODVBm)$|vwYLZrvg z^e1;7UE|6B|2BRC$}jOheyxwrW0^)L>|ywyPUYvP35!l1K5EjtA1>T?=)AYo)9!7< z76vCPm+@|$`|r-V|JOU~s>aT~88v1<c(@8bw|9^aH9XcXsYNS`#rCG{{=5JZ6XDUIma8O=pNFs*KsN-GLR zq@)4q-}?Yh}@W*vI~2Mn9L&q*{4U$aZH(cI&a@y8hdL@LSQCJCvzJk z{1g;wv39rFdz;NYZMObaXCF~(YN<1edu3X_6SwmQD>a>{2b=6Y?AKewLG~MM-LdL5{#pai)A+KF!wMWCPr~8Z3YksN!RXBhB`nT4OuM>$rk)oP9GG2t0}rhqV@; zvNY*6wYkchSxLl8&~5Rd1XK8Yib0oH>uUWcqsGzN~je(N3-d;-&({HN^YpoX?`*V*i`C#>P(`FA(8y^!pBq%su z?H5c4!5>2__$aDWdbY}^7=A)lFEjLz&ndU)>p>AgJVG{c-lNa6@|Y*vzm=cBpZj}z zbe>MDX7HAz)iXd)3JVJwJL#EuZ-2ab`w@qyxy{qs>}=|`_cjza0ai_wznQ(nHtC(q z*|V;Vdigr5|1{qvXRcEPe4tfN_tQNKSiwQ5rEIaNr$b34fQx{M5}_Th$g32j5;`mG zcv^CRHO^Gdk+fMrmV#G-y6JxEsR6nP1dE9Tjn6<9>UU(Q3SI$L63-~>Q5C#GdMc~A zo&m2U?OQ{#H%6vxCNM)z8h#)=b5lUd+K`MLV)ji+9!rF{C=Z)_Dkyj@coms(Fe&>~ z#Kg;!-m9JY=8YozzX4Xlj=G%T0|I;NqZ@65y2rU);qG2L*!3SK#^r2^~Gm zzM(=S2g5xcjRaoJM5UvLQ1Gh8)(1wR{zA{d4$)xlCZ__gI?Sw5BEx9I+TCq#f&Q}F zx?Ju%I5y)+h{u=L(8t)XGUNRVmphIY{Orh$@A7WmTXnvB`MHiwg?I7`d)8fU%{k-U zU)p)Dr1=s`2~!8FnH~1NW)qIe9gM_fh*(W=z44Oc@}ZkKE4O{}{^EJBe?0x^SF%P= zNKDI&j)}uK3$PN9B?r1v{+KGCRlthi0PzH`{#NklKYE>yaOgie@6r8&@6@TpxZYsD zknCZj-hJZ}1b)s!cZ;iyDRrIB9z0dYP_=mWLJ_?eC9M&2te^ z?*>IJiAq{S^A2NlLX+0%qn5Ea7?ZIbAyz~>>V<9e<^)9NM&gH@oEtG}Z}_zRnB%?t z&Ot~0|JC5UMIeYps{ofyK$QboBv%9j+LGEgF_bCqqaK3*R_i`7-Ac(}=)mF~{sT6f0`<%(ult(BJsKU**6U7%I3g&!qO?UO}a%+bJzf-rcg*RKVmAF-I z6rDtvqr%~nbQKx9E?loab;Eb^ddHDV&BW2mO{Z?OUoP!psA939%VZx!CQ)IB9K&3w zr`z7m;5K}f@quUFeRElRby0)&MorOa+C6K3?+Po1adY@N{ZwR%loh z!asNkKA4YkC_dFfs)dI64~*-hPq6a;|Lo`fhmU@8>o4^a_|N^`urel<)<~*g|G>nU zq&c(Zu3NeJ%<-$u&eleIbCa>P#oX>Te_QAI&4NXS;o~=C&A1+#xewttO7h@jT+kOs zr+yAzskNvVrXWXG%e~B~4jz_%x-5`NQbVK<6&M9TDHsK$C^y;4`^srrE!CnhnE{Km zQkDpHhDMdH(!kZHiC!KUEj8^q5`pIZHQl)vxKX7hv^iqg- zz=|0<;FT_NX+X?+2IU}TAW*;K(hwY%7l>PX>>6$Arl5(tLMHFoxTnfg`Oj5m2NI3`dNEtX!Q9s?+22d?IIrWTQ$h!9FqXr&q(l$YR_xJj9&9C@_QO>uk&#y1fwF_XYctBr%Ek^xS9F-WeNbc+ zvqIn@60M?37Df#nJ9vKgwj*oSEj_ zGug+#Se7*UbZFY1_>sq$)lP~MmAqKez9FfeW^FFOe>zHaIAe{(|Wq=@RI-PbrcqPNpFyYLg8KTz?)#^t8dK8bqAk`xIo4;+J{FkOV7;5*h&?)2A@*DuvMYa>k=78AF*QC z=>1U{G&^q|HuZFD)}FA5+heEiOMT}}0EAF87gxDcq)Z5&B z@K=P-(NDD6dPuQ4JpD)!9;y)>Xc7deMNqpb1tYZ^`)w}4cd=F6qLg!}?36P(&dKcz z&ypY8j(ex0Ps!gzI``-%PtB8dIQxCB0d_jwgX|N^#g#%*c^32u_C9d9?pj!? zy4!QN!!fA5aV&{2Cc1IabY$;^&71aq{l%(TFTXu9dn%K{m}n_VK)9>#8?nh>N#zs# zhtKif()aYqYgK*%fBtVzK9h}F3eyLT9hUvhJD+Ucy!YtIYiBML16Dnr!J3O*6=&O* zFLHeONqNT8R|ALcQ$^-U;Tu(v8>O%uZ4{=R%fb`BMm!+a=2Uou!lDbRO4fX$LqLRp zjTPPtC=(E<6YM;W@829nvZRu->2#)ZPyiPhnv|)LhLK#6Vu=h*%8Ps{JxFW{rQ?GD-Ed za358KqX~;N!`DZ=xFvD!-kqnsyG~aWoN?L;o5-)c20=snn>ItKjrXTWd>N zYRg(hAY%|pgJ#qVm8HlSTB^%A(#j4uYmkhVa<4c-aFa7pI8>B0aRLD!1%(cm?x9vH zZsfSQtGKDUq`9WFrLMe9$>Mk-ZW8Qp7boyaxQng0DL5bZgE0soeiW>1yEh}s&$4cu)UCGsIb3wJ~MwR)R*HKvGEUIN|E2<-n ztS$9b7q>SUI$5d!wb%h&fvg%cJxxuu9^d6NrRUES09lI`uYdcU&qj|L7akU+(ff&k z0&o_OjU%7n)lUfU6igFacq@NDRdjOV8y~#)<*M}u&Ro2By1drg(^d9e?WJDNh2IzL zySF~){`>_Ena>#G$6cq7IC1n*ZOoQ{#GN$41SjoG9KKy2xjZsq0X;IJC0R952g^jx zBV`8qjaHPRkJJkz#ouzzd5DN;Kmtk2y{o>aMwc$SGm2;IAr- zqD&*8wOPeeG8~dC7QZmq#9fox2i-!QqqElTQy6cBSz-&h1p6c&D=QPA#9@krD8eoj zp$bXPmf$#5-s64wv@Yd*_LWD8n$+eaZ=o_pF9DfG%BSqZt#JezU+5_0;Hh~rWLe^g z7(LHAqfC5}?ZAe?ch$+nn)2FMTl6}q)cphvL1@5W z`^mu+jXi2uA*HaBb`C19v!$ZnV`wVAXg$3B?AP;`JU33Z{BqrZ$6*bx%m^z3on)o z%{&;GagqUi*xbSPsH5_MELC`}CUTR1^vWPcw+FnY37jWsr%0N~KnJ0chQfr4HXJ$V zBGlSL`T>w74gWNH#)in*E8jh2*>}}`s=SuIKN^-1Gk{lo@r72?&?Zy|hIaU?R!eu2 z5xc@3MBqXQTGphjufaP(E7A2#Gu>luihTeg>frPwjH0!?g@lGd77o$LU+NdJ_5Zn6UqL2aQp6=avJd;qVw6l@sBSwpP0b#e}H z%5h$m-E`Yf+;heBVBRN(GG}iX_2!ntmi~R^T}!rIJ#X&5QrgBW9=I$#ZK|y8j?#Ks zc%Z*9R<$x3Lv|=ttV$VuXu!T+o`GmEwc{98Qr02Zu);=LdAqfw1v?#gSvyKFq^cEV zWSiuc%&nk1fW-&^-{&r`x7@5af9x`&Ocs3j%Fw?2`Rq z6r|$M6Raf$?K)ieGKXi*TJX+>BfAfsIB#)P_nE$FD;%gi`#a^se=%?`EW55VELjwI0rVILA?zqE8Scxn_*oZ-Ru^D7IJHk&*_gYAU@vTK!Co z?nNPAS5FZb*e^&l$C&4tX^&=1oa6kOOIZ|>^mX94HRInuH{px@+swDl z7gk>>Yal=2>kM8g9m=9-8FhiID-bl1wUb~83|3i|D2QffYDSO^$YRUGl^q2)1VkWs zKw4lDIZ~bV4`*^3hyiMGFN_oWe0e#Io4^ZOCGR37Qy$1xS*cVMs!Ce*P;2o}Qz5#u zALeGVrh?Tvl0bqTf^1N^31dbm^cw366~->J=jW?7UZ4H-;dMt{MGe3DZ1dIKXWcg( zgN26fB3!xXt+w{@b3pV3p7WDIiApmy4cB(F7!byEFf8J6w!zAV;X5wJEvvcLYVK!} zECLCoQHXU$#mUfZ>qevHwRG1wakF6*S`U|nZBxV>p5kibCELl}XI6f;hE~>bBPWN4 zL?Vo5JQG4JLM{?C;=2ooJ;pIe`A7eL>|g62?fX;k>Y>Y{EX)fFj~qRA^qkk`e3rX% z^}el_3(6|$TC2{tR$pi<+jH;u^16>dt{FM1{6uC(qgRv)5 zm^YALX~S3PB31`Pex?oiSfzbIo@+A!yDAN0PT^PuIx#{*ppZZ+;m0m+DmVk9B_yB^ zdz?WY3}?_^jnL|$!Z35d=K&gjx-NjBIdZ?DG@Kz6k~DIveD~!p8`^N%04vr96)j*v>*fT1@$ScTCEKMe2>BTZGmC%gmLhK z^P5wa{!jC-TrhNAHuqdDYP(VD!{tUmR#5}M;wf)~*)tV46N;w|a||(X#?S`yKt@hu z7R~S=0xwpAW28ph z5*iUbcEaTMKm2sV#;sPfr>>^8+jXbDw4=7@_l}D{-qTwZFB&tRx*0p_WW?|z z@nesK58o3wWPix8Ls41#!iMe&N!=VbVy}PH#@LL#A@Lid)3!w>tWf#S_w%2P@CgMe zfdMkM?a)xdTLx99#Nwb(XQ`y|{`zTZ)l@(IGkWa|ty=Wg==3kBbgxO$EJ^!eY~ren ztZk{8n*+l?k~FUg@ux)61-wiM@Snk>0{mXUe}*(kt)HUTP7`L!(p0^Qof#U{vyysF zQ1pWM%&pLCkx3g;vv&FgeI}{i)9YtRF!0h;jrM6jzc=()l_sqTOBUlQQpX=pe(GG} z)H5%9art89|5@$4@3GL-EF@L1Jpz1e!W@P+UMLs7;N&D^R$@)i-ACs#NfGggJEAeC zk5I&)3dAAolpoRuKF9%3kei8{94A|2Sx{Np<0kaGLPYbm<+!46=ZO3e?&TnBl%2xc zN6zu6Nf}kc+y{akWuLpa6xSC?AR}yS-5qw+P`yOE$=AgSBLi(MT}pH!88v~2Ev=p& zJRA_0)_cEcsQA`n8+2O-YCLx_x2a&LqNAVgp?2@R#!^~JdlhPq{%F)z5Bsd$@Kjwa zBf32Oc-@GgoyXOWD-I(Xk&j}DQ{}zQRBJ|E3p;3M4?clP(nX?0Ag(|vMhmtGS@vIJ zXsS22TCY2=9xcdOw(->&b4Lvu8x|0$%#X%gl0U!VyZZ>FzPBq5{rJDuKe~6Q*Xzlz zgaA+c5z+((g`{R=&VBu@wd?bapFD53R@B$FwORTq3!1#wetl(k$C`D6<0hPn9C?}m zuhel{Lx%3uC+7!e9@Hl9WXc0AEeHVc>P*Ny;1`)25WPMkd2@K&GJVMBv2h=2buatt z!HuUt5+Dn_f{6mD1S_SPzz*=G7gp`y&t&jQ!`ha}{rsj&YK)PmYBku6PT^62l}a}mNK{dKaw!?FfUNL@FC@P=Al4Fw zZHrCIi%QN72>AjS)M{r22hUZhpVIryP^;&tRI{TqawAgLgI7#n)ue4rfA-R>h1bt} z|Fy>T0LX$rSMUmU8rB`5J77hhodPThUQw3`qWe*opIo3ZH&&Q4kcmCs5zY((;vQn1 zQkQX)gP@-Rfb1(UrJSii8RsalCf_AMk~E1e5QK9A(DZ$Yy4d||+-YvRogp-p&78A>n z;|i6j=X$mCX2qq0*K=0o&z||lkRc;OLZao8L1agbc9L-*qk z?4P7kxSvt*gRB9wef&MQB2hY*zW@@yv0)t))kNhAtePMX?{Mf`VqEnV73|So% zw}J>uT9+_vOUCHjz?jeUAumh%=aN$1luJUi5a=AT5V1ex!BmXSVI^^fpWm$T*aay= zm&OcPA3GFRs{>h6PlqMtVBeQMA}=g%NpSGHq*Xy7uj~9?jZIsbFl3Ei%G$v6oS{?B z(Up@jtVV~A z`SMC_tLP2t9JCf9%;1Hg!9aA;LAnTH^O|`{WJI;DhqWG3QmQ|Kv`RGlxP|?xXyhT| za*HgB!tilDDD3Dx0~J+woOA#Qqf}wuRpA|^b&)HOl>t@_-a8nJVI|Q;f{H}V)YN2e zHEtvHvV|5?h;-#qf3)Qp1x0UYM{BA? zy`dGSP`>hQ)-Ip5yPbX_vyb4iTwl>$VCp4Cvzd4l*GB^3^OSc8|CzFO5Tk?T%hIO$ z;syf0EN5XO(pFjiieCg-P*-KCud1}$TjX;Vw%7}r%tg)C5^Ui`9(7Zm3|m&-4jW%m z+FDrD1QlOa(pp~3T-O#OQil?uh#>D`iYw1gx&! zD74sJjTN`yHoeyd3@2N5ZR(o;R?+C^3~?jRf>$AFN5hixqtnHFc8oXuk`4r?9}Ukq z6r8dzC~*@WER3g#NZv%JFxCh7pEF-3ATcK}2}dcsJ#+Azib&cT7`-SoepzVzlHk}y zVTp@l(pQG1EcJ`|A~th++KmXLT$0Y6hFyuPjJn%{|SBf=_+}DHh!9Vbo;E2zn6Bb7$uZv7t3s^;^Z3FZI z;smmDT<) zzNDCN!spakMRi6#!_8V7;>JGM8@}T*osQg{Vom6Usw}Jq_L6>3F)6hhs3qz+vk(3HRvF9L39b2UqQw}PRWlL~G2~Oa$ zB1}Hf=P0}1Pyh-d%O;}3($!}20bDdP@DR@DH4_ZIZL$tP;{#brK1N59Fe8 z_r~jQj>sCB5E&Dwp&9n!zsG>}=)jZz|5g43Wa3fIjj;(5rX0!yC8Q~8y)HF9dFHGa z)~v|6ai!?W8Dq7x(`OuLEcBf}_1%ia_E{e^#f~_WHsOXYZl4sJqmIv&lGlq!-y{MQ1E21Cgch)nZ(7nAm|b62wvPQdRg$DFOy*sTc(B zzc?^D*H2D$q=4m8#0n9S%e8T9gqwQc5?%0GZO|G`#5zWo3j1{CEXQq>67!R$olcy3 zN{U#ljwP4-Skl8~%|WH0*1RM*C^b_K=SqGb21b6R312D&FXXbS=+)YU94UOco^8}B zO{91Va8(LgDUo+2=IMeL6XFH)YI&lVT%CA3E45Ku^)cInGS(ls_Rj_n-Me?ZrX~W< z_F8if2u8Buur#}DtxjV@6=ulL!uYY1@SsGpHoJ}WN|HljLs~^vMnGW^%q3(?8?w{b z;xYS}Ht02W5I9iD(dH^6Lu=vuhl!aiX#nwvhuIwoo23IDj6hXRR?HS&8a|D>71=7D zEtq){3PV+6q`t(&NJQLC z+sLxyAl+(~TZe>UDJfzL);-4NT4%Gp)SH{T{q@&Bm@s~FSZE~8hAP<|OZ||77hh7a zOD4B|uw_9}UQ_(5{1*RoUKGC?`PakmLcuG3aU9~mfRNw`lg54W+5FST&pWN&=4w`d zIvQ?vD0sDZN9W5QHV>Otm_D%p$Vwc4EMeTyka7ExW}Jb`%6!F;{gNwXYH8N=D^ZO3 zOWGQevYi4jj_H2MTjEC?h#0ynKKo$e=)>$Jk0A%kPZ+T`EOm2u#^$KZZ2>VkDI*U= zr|yU!vL|Eov4l*<1@4F+wU7BVeu?YDQn%nhl{933+VH~+sYxAu)IWJ^Z1&-ZF-OPG zGrhT@J$B-;@v|N*ld5 zYWPn7q+EScZe-T3*pYh@M(@v_em-&J{+RS#iNhF5m^b02o5@3wUgSg#+Y^+sC3M8W zh*3v)Nw{OBjlGaE`rMe8&VpAJEx##q-DciaYn3qnth4ksxo<;ZReQU=&JK8<8W-|Q zv7E;i;Hq`D*SS!bi#&&{iGYI=6q8%TV}lnMEzDbBdlc7nOyKKTl@o(?gqaM%LwKOV zJ1LYDN5pYCAd3XeXXDo;no_bsFg%sphrw99?VSvhER^OO9p)^-nD z8x|Jr?ly;~U8b#Wxt+H?t~-v30c;|K?L0h~XHbp-77)2CK~5<0Lq}&9qkQa*jo$Wx z0>jFcxpU{do|urL)8euG(9Q2*Wg)K^KEbQMW(WkV_+=@7K_~+Wx&-4g(&xPM!QwSJ z1?S7{rIo#o+by_-UmC2qIIwC>|LnQO@TnI9#+{T#ZI!aOsK@N{pL8VdrIO^?#*Eq4 zfbr);MqbvWon%Tf6O%Pj>tVFCQEUBT89lRH9kE&+xlR?a7XNdJoQnJ^c&Rp=g}K$L z$W@HiV!9uRlN7{|nzdjZg9262YZxETc;%4vEj*AUO&6XU9Jf_U-Vm6zLrTe)7;Kug zclfKtAtU!o$@yyLb1^Y6c5Prn4rN_f@`ixe)g)B9&?NzoWjDzd?pEmGjpz{u4>QEO-{Vu-3Hd8?F=&t05AlTk?O-tesL zX;Y6CI{%JPJb@K1i~ijDav$x?paBULny5x2O}jnK=Ds%D;6vR4l5%+sj`n95Dwfz- znhLf6Ms?G z4Jo*I*^pOUO~~naM=0Sf)Ri4gsG&@7VzovN{w+zb~}M`qeWgtf4F z&e9fTu(iTUvHZs(;EnR8B6C|=akr_w-(c)3D)wDBv|cMG>1rxALTa@X!(v%`ON^bR z{HVgtzLih+@(5KTT?}+ z&)ipE*a}!#PjswY-S_;9HzTH9On;>;=-FcvzjhCQ+c0la|MM$)$Ih>fcAohjXofSEg${Nxu_vq$)f-(WgC;a2|4J<$){0&1t)GLnC}c^ zA*LdCVtg}ri1z{$oI{ef1jKFfPiB7o`tbM-!O?3YhVEfPeQ4H!_z9EzTF7EpoR`i?yS}+1=ypWkg7it(OqOQK)j+jFcU)s~uY^D~p3YoD91qoN7$H zUA95cjFSN<(L*hFRRaj@D?Qx`_r*B`Ssa>GmNkiotDJHlB0V)?6r+0(0Tt;Jv#mW& zR{Hu`2PCW&1NN$0ZpQ;dX|KsVV6omRv3Hld`b>^)n}^AXxA8JH+WJg(ylZaR9D`2# zpuLb_S-pMi_guHSjG<6$uvcLyrOgxaHOxGe$8#d)E+9%RBrpc#IJ|FY! z8QthT!{!!#wC(PTU(|+xRD2fQ$-OPmvs>9t-z!miDS-$4LO)G=3r9R z?xd`}qK7dlkC|M!vPTTr2JN5q)TyA9oUn{daU*v`4cihwayOOfkf~==C!WL}8AtcH zti!>{J3@x;mSQ%bd`QaPACY-b6T4ZPy7jq_ysyr`YO4RYg0fym0hwfvX>ONA@UO#Y<6U^x}xw@@PsYJlyWaQ@ z%=4mHgE9|E@+Uml0 zqP6&@{j1Mcj~+WYJThKs;!rXuxmV}$m+47X_4r5eSF|HDSP#8|v|4piQo^LCpZ$9I z%A=YSk*2k>{vRHOhMJ)?V=1JECr)=b) zI(7s3m6nqu*D%7K!O&7{t~!1b?xVaBbxgiCZc9kkzLaU_#?9Qj^UPh7^Fg7ZU+L$q zHR4z$8bhkf8x@rTOZ;Li4(6i9j)#u!vMC>5cA-VLk-boS(Pk(YTo!utL}aiSPE1Y3c)KD3MuFa_LbE}#k=NVCMK(@1QCtU!rY0B0e3zINmM&; z6HM1Sb;fnzP+4JdGs99L%~<9W;sj%3gQ20;+EQa_t}wS^5hI>do^7G*@T$niL{Ljw zI?2iiMQzUPMdtV@&T_~lX;I05I@h>bS zaPq`)@4x-=fjvhc8CVHwwA`sT-Kr||d2h6BKheJBXv>`Sj=4F`S9kZmcjDU*_W%0X zmA)}^9kG)xCyYKDl)4|Nq52C;+vpd!nx4UkA=`l|a;mVTyvS5WV&xD31-L|Q$e`r7 zp*wLK4vt$Np0qJIej_7F6}}6=f#MEG+Cse+l&~c9RltWa;ZIIGI#QNxC@+Q zOLoVTA|9j4W4LqD$Rjw2#tc0WoVYz8c~ekoenfIU6TWoe$S1b)j;I!?E@Osl4$Ig9 zFlv&w4|(QV)-xw(eqbs${m$n6XSeM>0f__?u3(5_GDA*MX=!6+u*T6wR9Mi23po>C zc0%#U!XOLV85Zwa%v}n6kzzq^LxK@98IH6-ggC*BzyQ5LFKL6w94xrJc5?;gBHY_% z>+m@dKeQ8y`b)t;219o^ZZ|vbH&~Htep})G&glN8z}Uax+5oZQa_{m>41*ZVFZ^cf z@wN+wUplQnuk!r1)_R*zRuj;L!rP0*0=ab&AX3soYCtehVYwMz1~Vp))##{qqT*;L z0V4oyBs&1i_Wf$f>StbfH7-6`s|!#d;7_5}PY@jb3g5E)n|b&LMEsAc5VA2oHtN-v zXD(g1^3<_&@S-d;0ag{o-8IEsHxJv_?5rSOSz`sVp54^^Tz+fXo2G<0B@tuKNy&RO zs6!(+OTjB(*VU2B2q9EpfP26qv_IZR7?ibiFom zqdtMT^GH&2G)x-|&mmN#Rl+EB5o%J2N5$mm({`zowxP?4&E7HNg{=M*6)x) zDS86|Q!+HMgU|@PQjP#wk8!No+}chpW@8YKzzv3o0eV8O4pnYJ6-Kgg+hxBGJ9O+q zZQky(ua49&*jq7gi}lrwhA$5{eYmq?8X|@`_sWuPR+3qyj2V_#HSLrk2 z^#eg0j3t960oX5_8=#O-eNpdg+c?#fx@vP`!pNc5hNf~ z5NVRJ4Kaf(7VW-xsc!f2#%+gcp8MqHi=P)izp6ClwY@K_IJo4rE$>A6sq&_)hPLab zjvMCs>!v!zajU4j4Y_GiX=5qfJw`5w619OQAY4`D+_eqJs z`Uiw4f3K+rm6DLJ#FKx2sh@!IyHK`|);bY>QME3rn z&t44A+|N{t$jtq*BM$q;ZA=??oDLvTyOfc8<1=?erf!TKvKdciF;hNsSHiH}QK|V# zQitMn#H5pF$+9RF`R?PdPSQfa!z*@G>@-{2`K~EV%Hl5hA#4RH zBxg8499RKp02e~5U~GeWYB98fauCi;6KixmsI}d(dw$`m{!KyE-=DXAmv_ByWIjZhjy|=1x z?()!}4H$OfMGu^kQz>bcvcr}#R$fOCecV)km~`O`CWdi1`k4*}Tjhnel3f=pwqC2f z54w!4+1kTR@++#ja*9)P@7c1u2d{L#^x2JPKfIVaYx|T1=k^%7&eiO=9 zXBX}F&R5*IPEq1l{0CaaGYX{+$+LFS6Vg-~KNJ6OkTF&f>g zSLeO>;_UG7I6nTY5Q;W`Bn{vDlKiE(-q9e3yMs$(_Y#`)8~ujeh04G%{aG z-6zHGP(^H)!nOuRZT64I3y5B)Mzj#NL>sY;Y(!X{hpm8Vm;4urlqPtY80LJNkc?hP*+#l%rqIIs<6JUs2-sLDp0yT3vt;GDueX+ekzexZ z9@iTiieKGO_Qn?Lvnz|ATV48mzH{0-f3s@`kduIKduB5#A zW>FnZ@|K&8gr}$uaRp9UK$gQ%bMWBlk3RZ5Gjmi>a40CH)1gCrs9t#V7yYM<9Dk|z z{s)Zu{%=F+qGA9p5gZXedcsp5(bs(Wn%7d@Skc;J>gg374fm@{1}>NMUMcN6X8Zk7 z>+d#P_}4ir+omn3N}XAdG4n>!vzIca+(;O6fqBRAS;rHz51~~^9&;)o`*>i|CjW$7 zcq)_(>7x&&W*vlizc)qcEz9UMieram>hfCGJ z+jyZhzxct%n|F7(|0UP>_wStQd;jd8q(%Gz$#v4)qN+@Q1>m~3*qwIc6;x5EAFBfWz-kb z2@MrLcQ^lj=Y`e}R$bnDy{)+YpN_ll9&_C(s{2P{>wmv!`2E344~Dm7q)aILwg%H3)+RxkW&<)jJE zgoH+FwElcQH8Ny9Myw6QJ@>9h&{p>^F0E>@KuAsvY$;&W1iq zpRbH|(ZTXF^(U{ioGb9SG*1fNC_D(i+6gOKDTV4#*1 zObg*QnNV6Qq2UZ&9WZ=*=%_to-zk~9x=EkDQHoooVmKgU;!}4?F?sr=otpSU@Ru{ z=vSAhLKr@{)<1kDlF`uE4FM5r;MoWSUAjn;x0O=xVwf=`torDUq<)Tzv6usa4(BGC@)atu&p zG1#4nen6Jfd9S3T^VG%qGnX4T9dWMNWBhcxY0-YydplfT9BG)dz3RiG9W!^;zp$hB zsqJ;MkM};k(K%(E<@sH8bB=U8wWaFW9d)z!`d-=H{?g|9SGG0H-{0`|Ht+gF-c#jw zi;6nU=3B}VB;^$}K5K$X&;o;4lwN7tv|+at&8o5mujmPSG}Ex1?mzrR;i-&fR`gil z>lEvHrcQ3+lT3nSv<(!McV06MUNsI}uzq*e^x%x=XM0O~cb9ik5-!{0Oq#MVV#t?4 z$qW33d=WV8>wt`p6DBNs^V4Hj4Br$Kcb1t3N=;p5=5E#y#WG^4&tm9ymtpnOjhYv{ z^4J@zJ#Aa^_q_Q0oQxs3(FO{XP~7|;{aycQY%+4QiQQ`#?)+yT|m6t>pGK_kTNU`qk1y-@d=GW7zX$0Yi_3k31GIWIuW* zEo#q^$HKCX_^0gDB_cD}965Y{NZMh2{2mey2q+kDvL;%d0V0wpq?k+{#gB!d&!I#1 z2Bqu>pm#WVD}t+tVf#Wdc9F4wX8utd=sTvZI5K^=E@4Z|$RnZI2Xq^!iMcd7DcZjy+4?4MGo1=#Zf`f@&o-Il#nl;F)mLPyecwzM^p+P z@_7X0KLLJ$P;giq9>a#e=nLID60IXxuJsp*{73Pf{R9IB3RJ&-gVAu#&8_{M! zzERS0aq(*7c7`SFj-GgW$O{FN7J61({ihc;H+*pN?&sGY%stpL?@+^ni+#(^ckZ(4ajo^M-zuyVuc=Gt zZaUw$r|{dQC%bl({R$fD!z1mVpSkzxsXJeu`tGBHx1L(!4S)Xl%nfZhCI92CLl0is z+Wp$zj<*i=ytJd{?PHyvTpWDkaLa4^nm)UD=kq!b6MGSiiI69735lsgbPv%bjbya7>NYGE_Af4L zceUphP>kjZxs(VYyAmNV8CM5Wr@=A+winp?u9~{eyZSGB2G3Od=EE&znbS8%W-X11 z{mKt35B*z`?oCzPXECGJPkv?lu^aaRAD4J;FUH$&p&ZrVDbS}1SqCJD)5Sw3CR=aK?tFE`cCL^OCyY84mbN=Ibr)u(^i4^}*7rxdV~e(IpOTxvs@b6y+F zKh<37=;LH@C>aPICL)@$d6J8~ff&?r+wtHA()7wceZ@9Zucy ze$HE-_jv#`azgrDWMww)DTY?z5E~c`n7byCB{FKn0T$?k4q;#!1ztIN7n?g|>Ud;m zyQgafXKl;*WJlRgfaSz-#UA2C< z#CTr5-O3A6P@3JEt9#CWv$O20HJM`@^Cvc)eX^l&e0{<2j*5wOxx-t|K3SU7zxnK| zT@^1k6^`%Dy>+noVak;UXPci6bi9PuL}yHp`BgLwz={SP4I-NDj0tGS%TzHsa!e1I znZmt?-!6m%+n@C`kGIqh^{AK(;1#YDl!r2(0lcE-#g+o{ZFBpprnZ+iI$ua ze70pQrRIhAYI5malEoHnz0G=t+w>GW!7Islvvoj(+w_z1g~L^CuPa+#fmh8P&q>%s z`P}*p>N^++n-}gbDc``YCl9+vZ(MCYyf1XloW*8lHsF=;E>!*eh*y6dbo%305l8+1 z53f|ao?B6 zQ*`W;pops}1^<&hUB#}*NTE{|mGO&z+1ch3urhTGh8EqU`Xgc+*=X=*rU-*sd z>MJ^dsag(6Iyl|iC8K<$uuC+yjx)23rprVditf6e$u`!&Bg24&?pf!S9=(0E@QcmaPgf@mE=hefH}1~H zqVdhePxcfJ6g~KTSko^z=8bMHe7ZdO;l{#=b$L%VmwdP^b#Qt5@TTHdtFy+}=005% zf1lge<%|<+vj*2>^zW(oXifUy%Cx~{i4XTwe7vLh)q!)Ld{Fw)f#R1$#O2S5Z~gPB zlII7qhgY0>Fn4dq(nGhsR$QL4w!v<8nPpJ1^|VrBpIpnp5?z-xGrt0Tw=|1@LTBFU z`*&xDjW17rv#Q|LoP>cTx&7}H49!Wr^KRbA(u}cXnd9qnC)VdZ-saLH&~*@M#N zkM1{4+^v5)-2O^L>x)MXPh=`A8--$vP_^;{a0wCxE;fSP&csm2WYMUXCx-A*3A7go zv_=VbF!7jZY8h#69qniy?&L}f%Y&p_&u`R>Ty1^{5N$ctsPH*xXtiI`MEiOP;qgJDJgaLPsc#=`YaMBC8%2o}pPi=KzHTAAIxP6EtuWI@ zJDcuBh9qy@y4%UgQ{-1~7t~Z*0OH*FKHvJ|^XkXn{xV14|A<%oqlTm~Q!ZYzEb2^Z zb!D48VMn7ImjRiDSX1|=tYUceu@>KV^OUo$sC(scK59B9(t6Uhjxn@J(X~j>vrYgs zG+})!Ln->Gu)r$#{yZrI%Z);R&POb&fi+l{oqR`W~ z42N}3Cyo9alTEJkLAXD=&p98`-<=yP)%Adwne(t?G*LZ50QBbP3cbt}2tYjal;To^)nxgBTrsbTX=bj;GV~)w- z74O!-J=MfJQ)_;?_4<0xBdt5He6`~2=&a;h!7)8S5gm(Chvy~s&x^YEUiQ;%X}5P~ z-V4j`z0mm?UuGeMHVJFP52d#fL9GoxZw=8H{qW1tg-27ZT&b=Q9WKrO=vFE)L9~#zHjb++W(!n3!NDD>e5U>L1nBK15^&B~qS{=&XAP z9S)-VQ1=t0v5Ipq?cICC-+vn3(2yGBT2N@0{D@b78B~&=^^d;`86ngVBAG`>kQtngYx_i;EdGU#U$SHq zA;J7a5mXTY@jwThF-1jzHJ?y5Q%I_ZB-5iRInyHsicm@Wprp0W0Nqi`r}s zYI+CN^$*dHlJpLdGEwot&Jw&<6TFm-P)S-W@E;y9l2j@&-r{;!58nwjIW59@Y~tp zzPWbt2OSOzuju+^+Xt7J`esrHQ;h3*Wl0VRS{~W@z6GSFkXOy8X3f~zlu-9;rxgXt z86}cSytZ>PUonQZnR-@f#@0#dhOk~autzj3qI7KH)Xn42fR!g5mOklF`i(quwH#C3 z-mBh~_4)F+XETmJSQs_1G;U;iSnJw?(KYdHt72OsbMc?~h#hBiAt(R^sjPV%T0RYS znY|zc-cdTON76w^L#QND1?d9gdoE#`v7Lkrsq8S@S~u8IE3CU}svq8H8mwsPp?R>R=6+@Eo%*(c#;S)ng7w#rVDy93*o{lw zhYp8L37p6BEbaF1cWD8xAL1{0-u|sV_x}N}I3)b5>JK5OxHPZGebsF&tULmz?GHKA zRCD`Q=P=z-Oj5>LadDa$Yn7C%r zH8OQgXS3MSGm9{DrN^Gio*k>f=5CqXZmjB=ql94Un5b|{LRpk6q9kNV&^i*xLJo_a zXut~PJu`UT*sMZCO#Pk_Q`gW z&Kg?AkX!*)77lSRJPqw4cp%%#at&x=5w5U`G_?#fu{fivIHYtqqp%G#whC3+M?+MA zyG~b%b~@!A^71S>@_y)^v3m$)87NP>_@-$oVap3CR9%}hCf28IT;t5F&sf++7@42p znIT9hofGK2o4Y1z86I$OkJq!0BupI9ok&%BW?TE_v*gHXwsPrZ(}m|9R$mJIplxpG zjpCty_B&YRz3-~qjt1B5^=9vuIBvRXyZWNp(h}qOC0f&SjOG{V&CXLSI;UKEQ3^~o zUT{``)q=~;vny<;o%LCK)z~XdF}cV(xWaLMl_Ic=l6msGjb6(y*~}`4zW$4&rEey! zZM2wKYCEk=-#s0?QaI(AJEU7WXSoCwNV@x7r&aK`)3r%4V|wBgPxk9Ft;occ&8Bl+ z3#*k2%B`1NuwGrcBx-z5#n1O&{Ke+dXPZi%p1eG9;?lE<#%Hy6z5uTX)EL-t7E)L3 z!j()&PpDj6Wg;tWcIdCr9^f{hqs5JK2VT}76&6BW&tW()&1`EOBmb#x9_qOLvbuS+ zrRN3XPE1tU)*+fZUW##H_h*&uA4g{Q(WG+n3Dq*$V&igL*K~(dK$xl1fho(g3TwVD zefVW&=ZEL-ev(=l?k#u5~?b>=pOfT ze0uO=BO?ROlppcxuY;if6<)o4WhkTawePQ}q0nw1@})tBF7CEc04?7HQo937`z$((hYGxX9~0hW*e%43EWCnQapvD+p6-IDGeN$&%7g9DP@K5gEr_CAqZ=^W64^8lUI@F>AFQxH~p zX_HfGhNm@*!$|ogJvMqyNIFOPjMTi6_FhS69}m}J+emx22;==C^ga-wdypL;ePxWK zAA(Rb8p{&QSS)ochrUeh*8*Adohh&a6F zD5mlO!>N&Rn^jZBGI*89SJ}U|iV#VuB7|9nICNyTws9bpq>PkMK;;fj;bzlvrhHJp zzw}eHd3lmYnB*AG;nKHDQ8(u;9cPp&Y3~=J`g}%%VX_D~g6?aruVtMsdh8Gw?pF5`J=J}^HQ40{ zwJwq?m0CNFtAg7=$o~q16e0wd+=97$PYnw8*08xO8szt8m> z*B>A^N{Ypb&82Ji%WFo@UK=Q`ez{^7YK@yD!=;+0EA{Z;HeBdD^>AeQ-L&hYkyVeA zn_llvf8;Pf&e)ml_2UMvCugs}T+sMBt9qj3+RcjUyEWJEHP!dC=uPyr4K>x=-FN8p z)EU^f8S3che2-W1`SizU)nDgK{@Zw!KR&Ym@f#Q=i^lw?!yx_@@0(e37aTfrSZnQx>c{D=b|Tln&u`?r~F3O2;&PYaWN;NXy7bP!Pg;52WkJF8_d5NS*4qUZns}tz2IS){Yd;zFn@mgJeA|GtzVmJv zI%Ux4vkxqzD{eo%)YLVZu%DF2;l+W-$SqyXCQi>KP0cPw;g_T78Rxd_qS3sJ==#4q zUh&^t*IZIeDb(}MRJdmA+9WakWR3}k)_v+(4m*DWN_c{&vh>Wb@ykK<6<;=U?*e_l zOl_}JvpHps%dcrp&p1&2_2#n^J1brvKmRo1`kN}&Ub;R(od&@N*rB9YEHlDqkn<>b z`=nTM9>pa=as_>q;0`2U{QCBuozK~uMim*z>bosOL=gyO@ww+F^ihm&a8MO;SU0<0 zv~|B|>71zUesit;RrSrUYi|8w-R_DNTZEMGw1U2#`}MN`Raz8c-@1T0xHgxD%MDXlo zrlzLiWKpG9au@6S%l~xh{CM>*as>VZum0odMV2N08c^d*OqG*@X1~AxcwSm=cXQWR z8w!&T2V0-B4125n^P6p-?Ks@Ccs8$yEx5mh9Quw8+6zdeY z$|pt21`Ze;0XHf0EghR9zH!lssoNoDE)4v;mbdn�o zmuP?K+NC*6IZx*hi5~bK$Wy?(;4MM+Kt>+6nD857n~9I34CUx4CZ(JCXIRWDULGl8O4I&3h6xybzO>N^SfjLB&4I%u+Uy7i2r`ifjZJJ=|%pPf%1l@rFD<5-Tp~Q)8n&Ew$%X>=aZ}UmtXDu<<;8$nwBxN;<2CRE%APC_l#exXgU=dGiTmAdIkn)jDCOS z$p8QSZ~t)?{dny!aRmP4IP=A!3ExWKmBP%@Z_<>F+xKP_ly^0C_T73o+&nPeK7s}& zn!R^Ae_DBNaP{`O$#ZiNiqUq1lviRIQO}yy>Bj%MHh=DXmT(dpBX8#6OHB!^h~(84pt+J^@w z+4>e(`j)Zjqnweo;>5ku``ys$Z2R(@MeTEs%;z;H7g*WJX@_ z?#|r%|Lf$nFTK~)Sou7phl|H!ZhY3>`%~~ro&d5~%?=Lg5cID^ldAhU z$rW;ZTqjWXBDjTMCMb*xRr!^C`8Mh55JuQ{TOZ$RLuY>CUe^nGXQ!+8MSIt?_O7Sc z5w_i&XrlXc=XGuGi>qB95|!;AiRgNBx&6b6wu!4Z-;}pcobP&B*8PpkBIK+$>e%fS zUTo4jNwJ%`p=0oox`%(?(DAe$AH(MHTOAXFJ57YAfX)`!XL(MD}a?$LP7HGcGi9Ktz6HIh6XFg+(B`C`1?&Z(B}jh7XOu?(B#k;Qv62nGKQWS1 zw8gX%L%$qzuN-nAbwlQoXH0CP0WNdL6xd>DN6?1SS4L?Vg__tVDac4|W61-77Y>n$ zOFm)Xm#gWXwl{sW;`YDm`$SmJNYi#qHulVB`at_gmI#CQ#SS>w3ni5og5BXgztU^o zRbAI)9hW2tNqnm)l3Q|GL**GAKDEhFrER#L=`kav@Ef9H)o@6FCbv5IQB>2nfje7G zX65U;r)W4KhJTuG5M#>-Gus%JA}t+b)f7hz?9L$MMNsYXr!hll(JY3K&vy_cUdS7I zlQK+#^0t<|o*Q*%OUlhXxqZzouiHC*0y6=gmApCF*D!Jqdu3LeQEpMWNHZ&>NhK#y zP!~vM$~$EIC?mg03GV*MjYUlpoh+cS7XZtFHIg zH$JJZ9cA6-M*T=F5?GDHWi4-VZ#+E^cSqf3o2Kz9b;A|HC0t{Un!##q)Ah!7>#sI_ zS%Y_B<9PcGJPIdp*2YAmyQ4q+bn3nXCng8Z!XQ{BH!9Al?@{Z&KEHmv_0M|*{xe>Q zgD-yPe-f3TgQM%RW$zt1a=P|v7d}(Ny-)Br8EG7S-1_8Z!-u1HzK+d(GJ9pdfk&db ze#!~@JhDxl(y3^$Zve9BWf3GT zv`r}b#4fW(3g?BndopMP69Bat8a@PgC2|{waAQYuvuvKq&^^~-`X%KYI7Q#uEj{bH z>Ku4w6I2F7U=I!4QCCvXkt5l-qX3gESD++;4EW5MS~{nYM_IWhaZ2*Ey2=nj03*vm zHc^0{taU8cgMb+Cfdq;7Kmp61HCYz0U^6w}a!QWX%;M==+7|A)Zx&c&Kc$3DI9UoN zK9(*?;GUU7GHfxx3auNqew=*r0V`9xx4eCh5Bu6??nQXZdM&Rt^3Oj}^y>WG@9bu0 z`mL<6n_5n=J%rdGm`Pe_WD{j-kK#SMLXoi1%sjJo91?Y{8Yy1ZwHibujL zU$?Y=)YJQgu$gEY0RQJu+J17W`-?3nn~gmV=$frnGk8}|f3ceSY)NmWoBt^X-w&>}e1#hYM0ddIZtDwt zh#uX3S#!M$yxO#7x1+N+*3YT}M4XF1;*~fGf0Z9q&+w0x$HW$=C8h!tRE z2*ScNx|z+X8y^MDATJ5E7DK2?r(jWHH=|<{C7aryl7~19Fh#}0=nYUpiG}`>jN^~joFOfe0Vbl=xh9)+5vXANr|$`T9BG zW%~fL3y;X_sX(IPkv^Ffk%q2YoeOvX+xKII2*W5 zE0ia-_4WZ-YC3!0I%s1c>y)N9D=qj?d(`#cE5S5SRGa=={F+ggLSpuK}MXk zvydx9nGpLS6XzH~ds8sd1=vp`zAASq?dF#2`lJShbj*spwL9;@zM}rRy2p);RCd_5 z4pR>zCL@ak0!^Z4)%8@?DwNw<-1t3GiRKlL8oTvUW{m<_;z~Q+En&aNql5uj$72*h zQP@LskIofJp*_h6+dscPtt4*gm-R7mJDYghw zmd-LsW07RIfp*rqy%#Pt{=BjISwquP4 zh@b!M8(+Th$IHLa5%{B{tttosEB+kru0ESKY|qas?`eMkSRouY+%gPa-KrS}vcM}( zzhh?pX_Dm$W4BCH4%GFJY8oEbvVeri^j~O6aS292Az-Y}CD&091*zzt@CA)HgBXru zEs8fiBnR_T)O`ZVwDyS^I_yfc8q87Y6z*L}-XTpaoKg|I5)xP}&P1pg?Ul55$n0_9 zf@%}(x9R%k#3zzVthP_8E+kb&gr!4-U=bMXm2`JYI=dk=VAmxqP>l`?+f&%=mQWE; zyE+KfO48V+W5rAC1+Rptf~>@)hd4tBU`6F6_zb);#7Ko%s-R@N{S*eL)r`X>*BIT& znX^wlTAlog>7I~qho=gQ740lo4F(@@WW+%*JgjCJDj-Ym0EY#<66#xkm362%XuA6a z<<%%ea*i;WnjLoWMftto?@b)B2#Pay&mesg(x%3zGz^Za=?TRxEu-U5^ua5^UxjI4 zc1GPYQW=o{?!G>&zyb+Q1w;XhV=(Q4-2(SCn;lb&)v9B_XJFt6>nx>bm{_ zN&}Kvx9cez`$@5Q1|aKZ{UfLmRFOPNR^i6rwXL?l8s9EeT(5ZucA;cdU4w@g+E&9i zst2p^^Qs*Nuc~T?keWw6tDt`3LieX@4mU|Q?@PuT1%p&?xw^?3HH)2^*1ON7-96v% z<@t;EfGqG3PsRs#CVD!C6XUXX?>sVZ{$ew8D*;wwtycW}(HSJ)^yB59_XwyeKKV%h zX*P>UHQylfW-N&bOX{h+H`t3g=IFETr^C&U#@mP5yT9tX`HLM9qmx%&nYN}0Ep(`u z=I+@Rj#&muHhl5niWMz!hgcfgbezB$he_E&%*r#3OHs?NQNE$oU@P}2IFC6AvGVw1!N!1RPg-@EbSBmHCA``c06Fb`bNm^#{`c^4c zo&^f$EF;HMg=;27B08m%jh<7A?WUC41QgHQ*6gwD!i77(DQNw&?Dqehyy=`(P^qb3 zK7?3d`ZJ{%Ga$LXh9bfn=ADpP!CP<+K4h(3xRyrgEgUUv$A~>E(k(Z^|EjcckbG&o!5oQ}T4&63yHa`MywMYNkA+ zXCBEKIO72ETCOol_c&IlAer!0!qkI94U0qDBgJLmbw}ri zGG7$1qTddgfuPxrYa!Ji!4<({PcINycsm9H)l6&yPNucE7#v*H>CT?(TScv-|n|&T;&G28Ui>tLlgdi(kI% zJ$E+`U6L!NgFN zy0Ea!=$s5hZUs~5(VYgV==lh;B|@NPr_~`YQcyqua81WFkUU4*Doj-;p5U=OkcT5T zN=`)yNd`i#M501nBc!De5j6~f=c%g{i5a2mo9wjcT*Rf{Sj{WabV`;W7^sw{^vn*c zlh_!rP!l5a*vaK^x>2(WXH1~<&5_K7Mkv{uw(&^~gJV=TlzV!%5l{=LOa%eJBvhEr z>l{J1L5%oez?z;AZtFq(KaYcB+!=tZnvvHF}A&V$HmnMSD_oDqvZ zVpZpWx+S?#m`GHNV0CXu>Ui6ns>JzaB_j3RV-2?Z9eaqM@yE{1}YRowY?V&%*H zjz54`ib(~M4I>FrFtWh}dy@W(pzZ3M+Q6kl>V zs!k3#hn*J!?U{6-x-TfchQ~FOxY-_OhQa{{uQXf}owi?{6LDunWW&bfuG+dW*7{_} z)w|Vw>;~Si9i-n*enrq%hc7B8SCB=KXb`_PkNm(O6;~Pt=(@{U*8Nrzu>S7)K4JOV zG9uhmn+AJZN17Y(rhiad-%s4A>8q}NR9`(vG}MgLR}a_Lji?eWu8cL;j@MNUU1%OI zu6|Hb|5ZZiv&l>HJZ7c11V`CU4qbJyvZ&#!qRR2J*B-N?$W}GWgMB?u&lXojMQ88b zb7cC|xk_^jEs#niS8svpN4)yWW2k6SslFOS1xUPoMRioJMCWSJf_K6XMRnZhMvu3@ zX$Y50e46gJzed*kLgyb=AFT6RUdsxT+beT+ia&%o&m2(T;IrT8R^}8us>Mi{Wt^Lnp{Ko@ztxv)W zHL;1ea7v}~BUq+B83?&s1eb1)edD$GhGZLO=UZ&+b5`k)P8e9mF|f1s%Oq`}Xyq+2 zHGr|eW1(R{Ip9}WFH7bfX*(r(E~r$S8b9M`XLQf+HxxZRUiFQ`#tXhnY81Zt#?~nc zyL7f!_;lvp!k*Q}E#KNT584K8aKnIfzcn`$Q*te)74pp9!4-^69sCOP+;hwWN(0x| z1#PIW9{86Jl6tBJzk5IVk^k~KtH5GYw=7Ga0`w?oj#;~96Exm|S#m8wRdvm9o>JACAqqoh1vh{or5Q~B5Nym@bA62;+WY|YK`ezw=WHEX4UUMO| z{L8Yw@3y6nIxQ_x1gGsN6hc8NUCG#0XgT3>q;0eGERV7#CRInFF zw`g9GfC<8bpkN7CXp$?gkZb)QQ!gF}7ed82y?1NkX4iOE@3W5XC(WHtTDpW!J+d=s zv!j&N+Vi5N`*~BRxFU?{+k`QFL)&O=$4?r2KJU2u?UlNZi_Q-;bbj9T;Pd92AGLRm zcXT~QnStc$;mv0cdY>kz7lno=tzEs=$==COR~IcfalWWJy?>Hl$%}-4`7`)$>lOav zJ3+qo_S37Y=@}UYOq#mygTv=?F5YW>NZU#@ubM}|t6NRaJF3T49jNtOkYebarJ)kp zgYYa=RurcxaL5?|E7+2Nl9<`qCuv#WH4{Q<273WxK7#FLw)qSlQn2}R3_Pdrkbzx} z-1nAAp`zJtc$6BDg=D^UxzqYorDh4H}7ogm8IMBK3tOgV0Ki`ys+CA ztBRRU8n7~H%i=JfGzzw=M6O~HDl7HL3^bF#tktImO($bKErfIcG0c5T9FiovWPOiZ zX2`u4HBbBb}Aeh5%=z(pU=B1E!^f%k4U154S8 z=;~kYD|~4=Cr5vBf{uL@xhqGToDez(OW)jC>|I)flI1cn;i+`&BQ zR*N+ioAO_8Na)&EFwoil3JVhY?b|yULwV*1wV)?_A15 zLt0x9A?RF<^gbui;=24Rmp{-RC?RikKkjN9Zfd33K3Lm4T;Dp1?kGMK@?}l)C;^S3 z8q31Q$F0pzYuQ|G=)c% zO%&%`I~|d{Wyiq)zW@_M6CDi=fmf2Cs#ZQ@44wtE=q+veuDqW_ZqgU@S zn-nY2)<2tM#@Yw3nIzg=Hs0yZlk@OL=8985F4xU4ptp-8xw3SLcMr_5bc+KA5DL)o z$g-Pt$$L|E-p%jU#f$`Ot#J*mu$x?D>&qJm)w2(`VGG7GoW2uT)8dV-j&n*JW*5g^ z|HnD|Z`v<7FS*70&cBAxpPgr(tA7bZ3$hej|17(JY?q)yPHKj6e&vD!o4|4-j~s<-u8nVru}7kb zXOipm0&~wqd(S*G2n_CpO79Y{9XCU7eCM&D!(iq)8+LG9g_0rSIm#KA-QH<(SWuGN z{N0s@zg>E${7Au2#ogbpI?{(Cz1O_Uc7bQ%4>$!D+xg|Y1eUl3<ho!t2E0o$6C{sq2EZa4-Md(F7WtdlO5lSf?8%tFr@ zmsY?3$ZBRz@Yee6S^eb$|7+=~PVWsBGuE~0x+KxTgKlc&22nQ5#F4&Yl&y1;=cGK| z1K~QW)W|)NFCdqo3g=mswo@jAPzuEsh= z^NRFIkV3mB*lre~a;zrlBBzq4hkzAVM4L-^7vk(Qiu^mG$~+J9q-^)7ME`{Ay}U7f zul=boD`aP<`^D|{i8~$7ktF4MNB1-AZ;IlfBSCiAIEqO2qGv8GK>OQi-z`q37`R@D=ZqbCd>lz0aX)b zpSJmN)u8HxWE-#To@uxIT+55lYEDX)?80e12|+EiZj8=|Tm|bKgOlnOAxKn-VI^-vrC=ilb_T3kt3nZ?W)Y@_ zuQWq6>sXiBmp7LE)bnuXoT$4?k_K4B(+G&ybxs$%$rj8gW7Hv$n(*(Pau7Z~^_$6o$jN%vQ7%fjCaYdYKW zo8<@YOXSmX*nnoS z$e7k&7&BHKbDSdiiyY854bd_<#@|uWJ)(vx4&zRfFww?zOxJeG&|i?hEOun+iQ4xw z9@gI&>uh;-8^50BA#mniT|dr=j0nk~Kp}bih9(t;gXqZ+@IvWpK_%r1ci=jgG`LVA z1+U&}`ZbRT-yfCV8Ebv_>xVD^61}gM@h${s>W7-^2Ai%wYN;Nmt$M((b&Z2e4>2oj zL@%p$prQKFjhZ3BaKMfbA4B|iY94i9Wq9pwOU<2o-D7uJ2eCmMy!ZN2X)|DTA|iXy z^0kiclXSIpz$G0Gu{QYj+x|zq`f~%*fBAf%6St!`CLel^zK)im!o+e;@a!F%x0hv= zKj?Uf3g1A}lm5D~LA3YVzP#D_-!8ZO>!f+PmcbW{{Lh+r=W9Bo$WuHTur#RAX4kMw za$nSB;9WwG#mG5b+b)7)0iF_H`gE~CGfO`<;6j4lYjBx&UQZ=!Y~>hfq!d;Wm?pF7 z1}TV5H<+dH;nD3BWr*?&{7f7PVfa8zL?w?k6WHA}ZIIPcxM%D7XK4AR&N|u=dhM6~ z8?Nj6Cpgoqv4fs1LW0N*H_|Z~E~}AqHldi6zdC&6o$xWk*+mpDH0R-Fv$KQN0nbL^ zMzW`L&!XYRbbw@!6p;;Ix;<xKkVkBJ9t2gsXQMW>hFvG|po8tgsgIn~SVsrxvG<|b?cQx-V{c3CGYwP6| zYPN}X)6VO=A>Aw%nj9t->rM;F==ipv<#&Fo3g&LFPObb^?v3AgEzGrX`k74{q2m?jys*q{L2`D_Kc=_+X7R};rksd2o46vTf$C;n`RZ2jdXCYCE^#`J(F7u~#&#*pD79>2d{8Lj+vB$8(WZ`Z`c#eWV?;|E4$kA;-rh1sFN@>~;dexpyIDnqXj(sd zx9Raf`^3ZM$E1P--A^Aqm`IGvk4ef}yZL=LHy0BVBP}hy)L|@&9~EMWOZkUe05N`- z>v;LB>-AVGUMgSR z>G>vLLB9X|Jn%}*g|E>x9p`lFHG0|%xJg~~Tr#{C+|Y8(*Kp3|#77HMQXH2oLMW*y z^cZ%NfbpNb#vVAQ_GM-o7`tES@xYN?BEGAn_D%W+&W;y_RkZx()$I(?Irv3}5| z&Q0Hv`D}UG$hNYNE!Px#@3|3r`R5yxh7@o)rsRNEU=AfA4zO&COJ?!9-tj16Su9RF zTJfg%-oI{3d*n3liV&H%i{uZ-(GWY2&KdOgkY&JK2o{+jl39l8I>i81f;4Lqf)9vA zaK`@hR~YMnS9R5oZ}og8*LQNEhin=FYN7Wij1&dYT}U4TR`k+kydv+Smp0_e=`N?K zNS9EyM4&A!Q8zJ3w}jz*ObxE4MY#2p62?s8Mk^s2z#c9siqH;)000NuDVpMoEq))B zOqOJNl2$pKOihFRK$hTMQhXU5dn+mhffKK$rB9thjhE&}CV zyLU^El>cmgNYC2jVcb#GT-d^kB@=_2Ex4Tq$3>4FnJi}gHgWX8^`~WQPy5g)xIi(x z7)4?l=KK>jrnKlqajH1MuoA9?nmLq)2wsk9nxN1_#Wa9_4rdqD*CS^9p(x;{nVm1Gfz0t1_X%9-IsUB8Pt_nDDjsOPFniw^acHGXrU?OU^e zB&(_E5;G1;LgP>hb8(RMPoh>z8LJYfIwf?jD9i&B7o525bD-wEoNj)+~t7Y0Lei` zb>K>WZ(Sdc5_hhB)KfpyS<{b37D}Ymc+JCbsO>|#q58&yhI(iZef2eu@U?HK9cZe4 z#NAr2KWw|vhw(kafOqRh9yGCP4b6VI=30ANV&RTm2VLAIky+6_!6TI)kzIZN^QY(L zkNMS~9+Us~Tj;G5ID7zE0GE-WvG1g5+js6iUwrLOSO0MP@KDX_3u_j^>53WSQX!IGwZD3q%^nz^i`N=DRJ9T zP51O26G`Vxeeyi!U-RB@BmC;`OlO_d4a}xzZXH+*Sdn6(90ltM;(@VCJYa=)7_UW$ zk-c>k1OWEwkSQS3Q#hs*mNUwHSJj_x{>{78gV`e}J{_q3Vnxn?Lu`Tyjb@)STX1Z${*_5j=7;qmc%|cANHM7An(Yu+ zicspw;-{A${@bbi7jBC(UEZk(+FEz1#<-d{S6ZuY9-;VN+HWfYJR{VT@?wH$_b9>8P=k6gNq^jU$*(90g;s;ABqXPjnGA9!MhQuZ#U)u5B_SmwlnEFPB048f zZ=lK}C;&wnh|4^NjBP9xj&-z-Qx9Tjh!Uv~(L(0|r?6J=lTQ8w`PHM=r{s7;y%V>( z2C~yicYkoy+jpv-o{nlR^;RA3d$~Tg%Vx-u`yc{$9g?6qMo&ToO5vNk8BnN!HP@ zBKe|sm~+KxUM1Ti65S_uZ$TB?WNmYnaMLu*aEk~t@yU`L!|WDS1aI#}suz72a6r=B zA?du&)}F577%33ILWhc~P)JB&a|7Ve&Q+Y0%Snb`@)RDmE9T}jOtkDH9o{Jm+)mMdFJ|0 z!ft%BC8^J5F}e_`yb7oYK?TnsrAq`#s_3a2h*hSe{JHrCF|ba=Hw3c}zOdAN6Ft^c z?I?M&GWA|c@x9vKFGX6_Jjx|qEbt1R75Nn%axMuO%BTSeS+N0xjpUD5%v4D}Vk)8=g2vZu1Dku`_=9b-@09zSj!2d^HrP5@SyFFu{Iz1eD3K4$J_ z-WjMZ33CKi{(W=#mUmx#eSOFapXCj1vo3nfx$GQRAh!PPQmj4l6wWzzzNmtiu+C<) zpzKKDSMHF4yfat>0kX6V_ZgZW#n8dY8~4B@C`qjOQ_2BWG`k=p5$ud`E&y%<;vC{h za!4e^iQ|^wz2E|PwLSHDWaF==9U&TPXal?+B4V8Io)^R z6;lM7rsw&uuRGiK-ImOkJ}YlHExf=&kcC$cYN$XK8Ka3;j_cGSrz!cY8^gM1Z^*_c zn-_HnJj**omCJR?SttJj48wAXU#~BGvg^Vd$0c>T z{>9Fd%WS+0*v@th$a9`t;S^AAyOoch1=k}Y0o~m^b7lU z8?Bet0#+9O6?}x?4ILHjzq;J}ckf3IE`7hrbavsi-JMIfp1XF*4d;ePU;JbwDz@z8{Otq z+D$#jVJBO5^h>hyj)(V!o~pt=%E3F0z8w8Y3S{yt5^vZnM$>bq?P^c#{kuKqUR2b+ zXuA6gS>cL2iugg8oh(bfE-PG-P!R|(Ale`&SAZ45Q}7v7jruXjqB37pzB1T_YL?j6 zA&`X!vY_nJue8v-f#B4=xjqN^aX4O;(q&6Le|kjwzR+VImy*P z$8)R(hq_+UYzMFI_l^zRn>br=k)1&gR}Uk7BfyH1L_-}WgUGD@bN}kEaL)cMzXUa) z3bLrn^_`r2*00~07@pbFbpKJ~pxA3}8XZ8Rqv>Ph_>P3#bMQW`m|A8wt(?vki3b&j zAS&2KN>DoevV*quXw$Ox%@YndEM?HGf;oU!ph=jpq#>N+l+(|yk9-!qvrA$h$6DM6 zLX@Pv2L~B>S69+UP<@}VZG=#AU^=h2U+!E{FOvB**54Ns1nb+jj{@%NMV)Ejvr z3mnA?jAU?1NX?r=$q3hTO-0=lwJ5RMLf6aqgb$23oJr|$Ok7<54y)WogqwV}_29t{=y-@sRG+FMZ+opF?3!!z32;9vi*A%Zc z&6;y^Jl}6xntX3r%Kb^l+7=}Z>dieT`DN<57DyJ!rh)l3v&%2Ge^uG@%e99dPFh03 zmLR#rS^6f;-%!_d^ViL{z71ScVd#BY(=k&riGtjYybM(>WL>1-(Gz2`AeqHth@;_> zB29{zd9Za^(%q$rcjm?3TAtp&Dyz?GWB#79Cuiz@I_E&EQE)O=wj3f2mjcN?Tirj+ zV_ogqv`2eNU!->Y!edj8`IKxm$4GV62DG~I2{ohRlHM^jgA+Pf3mJ>mZ?S>SUmw1Q z1?|c(E$=kvC0EyG4$qJ1Nj^7-K|GZmxf7KgnGb0dt2aMnS#;gy)C zi54lAEY~1XFICn=LL~=PA!!xCuOj1Wf({`9o`YEPp;y*C#`CZWO*C=YNaz1ibHlLQ zx$3AM=xrFig~V~|V~p>aCqjhisA1D*q^a@&IM$0`d)L^*?(v)LkD@|T=FFUDYh|yg zrmZHu?fQ~yfn9&g81mQs?1CPuCTWvg&78UT`0)j8!QT!MmY#DjlIq{_98A8Vm zRnJaFKid33gXg;qdVcvf{zd47y9N~tL2v&Y`#I-UgglwM@1b&9IYHNjtV7`t$5OC& z@I}`tWj=GSO$;hHn!5Dz>SUDZV1%01Q5H{0Ak!of4i+$qX8xX^1_zMXfn zy>}YH2BKZhkBU>>3@6?;PXTf6fm~)ZF8uI2glg@fBxa2asB5-d@diQr{2fmwnsLgB972zE- z?VP1cIwLJp_jFycs*?jXl!lzm=2=-GC04Jx;rUK+fv z6|g#U^|$0y`>%bG`REUu&kiKt`{y&QznZeC*KkTn;GFANVtK-J^-lMkb{=hZi^)Z3 zv#Wb&?M(TZa@B=14gVC<^v&_QueP82?7;PJ3>REfF28Oabj5pdi{I+H^=F<|-TYN^ z|37R#F|=Sy+my|1b_*|h%qo0mM_WzD*Fe^l+uu!DT|Q-Hr`_}`IPbVk&IeC0zeaHs zw;f}b95assvngls#Iagh;JNW~;;ldIEPt`D^7HpEejM5P>(J(}H|0DkAOEi8?sxMK zci^GJAi!~My<+ku`{h^G#l47Z{N;&jUtraGZusAV*48=9E^(V)?l|SFy?3Vj6a?p! zJSLy@2*|Q>jzJ~N#Xr|~=0(`TXp^d2$G9x5Typ5qz6(DguPbZ%xc2_9XhVTHBDqr8 zD$%ndvm)d{AsG>HgsK(tGNe5;pfGplI#g1Cjx3AE@<5R_siuU~gCtj6C%=;0S%QYj z%2?-9NThPM_5j88?iY7EpNZ&wN!;oYal7{wm-pJ9^>w}M>wbYC{GE=cC@^q^Umte8 zyx;MhH^5_Ww+{B-e0sNg=yG}Oj;*^UPYN{BH&K^VEnji&h=$f*_niIPc{MQ&{63Er z*E!hSpk-iSVQ07EosH=!g%9c;4YiJrH9i`tfB2x|#obm2D!)H;vdwQnC7o(K1feGh zjw0y?tG;x2JQED3=Drv8JYZ`(Q$NW@HY129mtaps3rQ=h2+2N7gnQ!bJ-10M*z#j0 zjk+Va##neuiwoAIl^(~@lXOZoQOM~NR$gmWQ0S)GZ z%q8`m6AWg=#n%36apcXV(YLoHzEbzb){{0-B#KW2U404DK=U{g*IaeGC_MP2$!GSK ze;nWT&z37nU|llP)MA&}TnMMYFGc>v+$Wn?hgP9!84l$YX)I=i$l9Q|&N8o{jG9E~ zGQx9-)$vVp+j@CT%JBU7-qpE-Cu-l!4zF2^$8ma}S#X(#SBADJ+F2n6W+!xvk06;Y z7QpSIt)~@BeyMYhJ(8wHZ!3DWG`4T%sqT5P_g3dTwpo8eeRjT{N16M=Hf%DcZE3#P z`q_<}U;8Y$hU}FA14p5&Eu~l4Y#q5~UxIzA~YI&Z({ynWIaR`xnOF+H>j6hOGN5lX^0{f3rNI)n$3H z};9_^RB zQw+S)fh+{fnc!QxXKR{88o4Ct+Q*ts$#PzJZpEq5#fKm1K+Bn2B#h=Q&cLcd7!zA$ zh|}!bnz_7HN5_`|yLPD5KpANdZDh3E3GhnvwQS-+Fc^{ua?Wntl+|K-2; z`k{-TZcqBqd{&|PBv`Bo@Ee)1qd5#@X;~-h*rozj?(;4RBpg4c#=Zw)H0fe7+|Gv&oxFpW=`4a+L&BpS^*g65(VTCpN3@6ccMr4??*m!Q~oTGj2 zJ1fsL{AOL|lO-_^-$@&KFYoF6$WduVj`g$~mO)hrO{@tSI^Xf(jpUSa;i=KvM^%M zk!wk?j)wzH#1E(iUXfpkXdEIQfQrq-@_m3i0x~`sqv!~~pjT>{4if^|)8f$$#)CgoD|2W##_4B%>PuA|g<-e%H zVcHcXM;vmt^I{Qvl>N^4v<%d67*k zG6$EYJak`GZ4i{FW*DNUj6x~hgzVA$q>z*`KV>zw&|q%v{E++ZyDl89`eIh-z2%AH z>+;6u$J{!2^;>CrnilfHekHcSIr|b{Tt!o@&Ihtr_eO%u%-pI0Z z^W*l05o~c#hJV=g{9ZeVH&R#Ev3vKCprAR%##UOIy7byvB$N{=F8}yPzWI-D`|-E` z+amxgR8#J*s~T2<#=sS%#*9rAlc!JLv}4ERlIr_iLnF;&#KU^}?T=Boib-hponLC? z5^3O?$KHp5StJ3;Sr1txw;1cWC0kQJHk((f?vV^$Y14eRkHwr0`vz^R1U0j0J@*7P z`v}9J^lgdH9Tr~Fo0O#ib=)QaJxmjkL4_dH$)=uY(z1_ce8fO`9J^9nw6x7o8y1Se zs8$LaDHWOlXf)f|!9fX`elN8oR0PWzXBUOFrS<%M!2YW6hHqA#dCbO~flDgY6V3>1 zIzvr|j}2bwSSA^Gq^aA-PB~JY*!w@W<$b6=JrTUZWd<%i)t?}@TSI_{r-AE)2q9dc zILV|Q$U>|bynxZtcJH@!YV7E0Ui8R?|XSkKOotX=bLr zf0^mjiyn*0B1^u;QY!cQho;`SOc2anvjjWBI>pevz`-|h#?tdWeg9I|`Rk&pUx8QF z{@Ex$=sHB`JCU{G9Tur;AEIt~6doyZ4bVzy%^A+j-k3D8IB{@M!oZZ{&AZNhygZ?2 zbKbzt{09fhM>0CUNof43@0JGr;2g8Xmwk71gIDV^26mP7Mm9gsX#U-d-Bn88JmH&T z5eL;u%i@Hgz2MG~Vo?mD)j-3aw*T8%p-rrrcaGPlD?75DA4+U4Zg|6}PE6}s#%ZU^ ztWi0?l5s{f;aMAO8U|a$9Yh;^lyr-bt3q-4y$=Pj#+~V?zwN85^s?A4B;Y&<5~+%J z`ZgbH8HIF;#yfGd{V6uf3G6{w`G3B%#Xdhq`iiT-cyC!k4%S8^HnLrI92gp;%T zrgb|{9gFC#y))D^#$bhsaChscT`iyFUHN9p;(Tlf%$eQuAH0R|e`obW%Og(LJJDiM z>4wDT3lH~kRzhiD?H4*FWCM~D!oXSB&`U0nHgnES-`=+J)F2!K2u0AD=*Ck9sybIf zjRdzWv@SKpf9iO|2#FHpN^l0GNTh!S-w9y^xCAN}n@Ffobi!d|fg7wM8cY#ubO%aD zvwDBMETXyS;Xf`q^gzQqneIA!KtQ6YbtKiLtp_SwsYupPiXuC+EU_nd;9u9JKGm6( zjt?@lZOBx#)5#1$T3!x%74XHY^G>jqKz&Q7*;t-5af&1x1Yk8B)3jYOb!KL6&irs& z>DcnrTk)O0+<#$WW5MXMq&q9KA1}`s^;%aac_(pa*c2!Ui}@f^LhEoN-&94w|Hs~U zheerZ=@vQXoO1>h1A>SM0!mPnAfh6oWF_aEGm>-8xdIdvIp-`Q#x}K`!*oy2%+Bn+ zbEoh7Q9V7+-e>Q6|y8t3({O7~J3k=T_7dtac zx4Y;+^wPd4uG%_cS$^8S0TD$oA;dI|@1IvHh+ifIrl7ES2Wr8EOvt#@*lWV67IDO2#@>)42)!+gnA;j_KpxRSPk_2YK}G z{L3~)kK{=h7J|zmtzSeEf_B@VS2##U2@$c8=$66n1)&#YIrOE%NB~jJkg+Xy$=nGq znvN=+n;d#f6cuTwM4|+WISc}?V7b8Tik;w~X3_=XM4pXcFGDxIbM2kgUMSn%6 zZc}JG+!D}R6d z`~CRuVc6f__uK#fzpnsuZH32Q@e0pTynI5(Pn`Dgdf3|7GecQe7+N9dE95l>?adV9 z<3;y&Y28S~JmDV4&mIe57o0%i4q{P>VO5R27_l5&_Z|O!t`C&2)@d=h91KMHZ??CVtK#GhuFJvGKq!W#APs3JPLaF2K@?*x4dTROli6 zJTaqTVFmO6UO{WjOr{{RRtc*F085gHQ3;Ot-E*gL;C?ZNQab;aBhLLee-zg$z^V;X zC+<_^;2??%0%zbAY@-0bSM%oL>EEbdZzUPTg3ZpWlunR8c>@vc$|4dDx)(qaXo;_m zi4~9qX(VA2A?Skv6Z>|2X@C{KR-v3jop1H$7KuYw3+5lRKKHEL#EtKmw`85MVwt*V zcyo~BNEYyoaQ))CF90qj2pEKNFo<6#EvE1HN4$DMs9zlm?Y&<9=5qd1v!qd!%cIxF z0!GCw>h#=)PG6}n@B4H2+|Lq6f)VY9a{-VpNIVa*$^+d(Qa2Zwh8M0Db`JfnZ}7{} znLl2f>Rq@Xh0I4{;2+Z?6VG4@t0F?oZ6A>{6ymEZ>)I4d)rTmFy+T4}g zMW@15CSFCg?gFw3Mt=%zcz)7r;9By!UDB{??yPGL{eI|gKdSpi-RQg@I!2*?6vLX$}Eo}Q(z z(}(B0?gg7$*ouhB0k2qCIoS{WWSH3WZxQO>{_X#LfByE~e|rU(=mfCB6XsNiN2mp* zrBy5}>>_;&~a=xaPE#Q{!!7S z&cLQi*`!uLGhOm%fs9^(5NHF^k;sRVPzd7|_Eyr(LLs75OgS1-V(=M2*F-}CJ9pS} zO6z5-8I`J^hBs6arZdEQq1}Rymd>RP4Xc){{?~PLKgP80)h_=*?^>6@iCj^wB0l9D z-ILWYc*lC2P)4glm7J$<)phh@FB+lp^`Bj{_7pDHYMZsm9jnC61>*(8*+avkpq;IM zx>8;%S5_li`&glZMjGt4uvnJSOqSJ30p$$bQIVtN?5f%No_!&0-`}m@@oPIMS^U=w z#&^EW?_G;_-K*c;s(o)6w5ab!)-kCQMn;%KgtRie=;IU(@?}pKAF*#QnElxzYV3aB zr?w?)*Q#Dy=4`n)9C)_9zE%0fy@u~)>}!vE58VzPs~h;2t_3g_s*l^Yi|J-69xFn! zyqsc;q)fQ3Ril~M1Hlfx*?&2q19kyA4gm^SgeSk^5)+z0dmyAVAbcL?tK#sHAf_H}w6NSj zC=Z;q2-_L*<|2I$>;)8q{&;wB2hLYSO&pAlKOJQ}L8AR6V;=@t%x-XMa2?L=leDF+ z`Gba*{^fhqcfA()cr(a=;`2}?F)$&RTzB9afAYB03RD6D|qZZ^kfPr@)GYPKTr(>k_|X=s<=f4F~auZ;S*ZkN*w+wEkyEHVksd9x9{@3h?7N&2z8 zN|_{yczi8FJq?pC6dzp8F{pyD`Tz-`_zvN?h3^OQUJ~DZCcBp?To*iwkzaT$q~>jg!c}S9glz^9$!8YKQ4j$ zm=Foxh(aP`MI5wUklY7;0kQi};>rXFVvqdKftqfLBmDBZmSmSnLQzf?OIWAaFTDz!~Vi2tvY9 zvV1B@C(<-%EU0+KEv{#3iaCxrE}9zy<1ETDSfTeZye;)8M!n&rboy=BZ| z3>+8svd{{SAlCWtj#wDo>~9&4jLis-PD2d6 zh?qRmSb$f*^;iE{Z2I>;9&Od(B#3NB&_#${7Jeg0Nk|$SnT3bOO!d#skmt9_J6i+W zBZF@z7$5U`e!Ap0sA5FcI!jkMQh~w>OUQaB6k?hoC>k> zNAuCNKs>8yScv2ra6!f439OjKE0Zc?SZ-+BFJsmyXWo22?~U%&4nw;>i6cb>NmUX4 z@R>LmALxRA9jwW^%10cBA@Iss>7(9U4nqj*x16 zzVdAS+@*9sg7%YD*wop8;mqpQp2=@-r92TgE>Jm9$t44>2)fEdLGgz&N-^^4sVX{I z_SXl^?K%^3=7whe+%x%o*Z8;cCkkZ^^Ch)&;rS`8o2VP*8J7>!PfK=)OQ%UKzr2jQHfg z&>lcBh3(AHE-0z=$*0uO$0NhrjFFuQ`VIptwZW&TIm+Ydeu8%j|5BvztV}#vT6|kk zPDzSSxpV8Tmd;UbUSSd|7s7-I2G-#U3%4EaG2%8mti#spA3ihx-c9-2+y1XtfZ0>A zkRTlR1+UhSM{PUWy@#lg>$Qw9k&fiPrXMjWDvg7W~0$BRcY zn8baXjn9+BdskQ?f=e8q=RSulVP++2Q6_9&VxO~kCVJ?4;e0^z(_6(Gju|tynTr?G z=XC@6Oyeg#D?YNDd=7e1LI2onsPq6&C}LO|m1;1=|S#s}%8 zxM+~?owLg*YkJ;7|2!a(qH9qncf0^c9yspAWR0X+k|4rik-Zo~;)bV9C^%-Yk-3?* zcOrDcIBND(%=nqa8HbD9AiHRbs5~GVG%V z{L0qqYi8-R=Kw3z(9jB%x;WaufnIC2a{-VANLhqmI&}v<5`qQMVlnsaXs%GqQ$jRX z#MbMOqQG3LqaTAU1E>pxIRgc5TASEbLFU8U!~(CDXvAlpB`*W7z%K>p4Ry^y;|#4$ zd;d~v??O-aTwgD!q)P*xbM&tDq0Tjc)iV8Hx@VD~%8&1D&An)CnM{bUyyxj{e%3-< zQl6cYpTv$ZFHTH@L>>P54X^&M0Q4Vz$Dz;Fp<0l+!s6!>FgkVm{@tMJiq<7MbPdGM z3I4eU#(o!_KBjD1bk2Q1NG@McHV-j*$U0|HN|8BT&0&}+VNv1n=-^t~I?nqzRnsIj z(&74oNGU|R6A=c=$sk(usizB_$<}dcNud8l(567uqFKWt7K&Rg0%=oF%fci<_;{)GnOc%=mWl7YbMhAVi8SyJL74^^f&$7e8^@2Y zex_L4q18EkB!B$7+>x)M+n*h^??VKJ0Cdx;I8DpL3LV@<6mC-F6ib|`z=}Sk?RDPN zpA4_VgES7`Glnc-)o4!XhkSB~X$}yO3_@{;AVNA+R4$T7^Z{a0;TDLUJjBkh$r9Bo z;4mt>p7ZWj^=tEl*<0n?kpo{?B}{wOygHXK>DBbsDr?m&dCs%qgUpqBv7<#K`2<0^ z2=tH;A;Qp}?__FP-@gQOyz;2oF-aP+D_Sv6o4=5?408L$%oP|rAYR8RY{D#%Uf2Dm zd-xk2n`J*Y8uANP^&pJoH&8>NL z;zE}AkxY4`Lgq)|7X)~!An*$vra~hxgHu1%DsaX)diqlKwng5uRpFX_(dvcl*^AlB zSi-v%&3IHS6;eNxGrr0ic=@n=F0f)TpnSo*a59Jb7JIE58RIJFszi_GFi%|%VLRcJh+Oj~v5RuIJ4@Y(A){U8K<8Op~`^iw84=Ioi(R;FCGZ z?o{6rrnX5c@|u^J3Y~@iRb3wFHmkZ^U#HCWWV&ICt)xyu3UoCnw>_K=7^)A&R)I&|?v87V5V@{}oq&*tGvz zxUQliVpbQd9|lAZ^fKnC_|*eS@FryG9keg3u4aqqr-&a-=N8Z45=#fu3E`fwi{aMH zCh4bGhb@IPe<|-!!LFQwI<%+?;gNyq3Z%h7P+{Z1Rx*}L?bw8Ng7wPX=DnU)m)6+wToIL zX-9LYBojhum}1F9!%Gv8#jc$sVN!G@iIztDSUmNEL)-v74e(uoMn#xe$tK_%!*>O| zf{Gb=$J_=vz$@?S#|1Ng<~^Fgq8W~)m_w8Khb-8ki3hL}F@^UKSkEr(%OmjsE;p=L z7Ky;Z6kdYCga{f(pUSCfik$gPo(S-2&FYU4>FC-5ikEWbW9XlO2j)Fi&*RK~uQ`pg5 z2pzWw9_=6dT|v!`oNP=#Eg;_MVQe3iuVw%x6 z0-IXtU$)c#lvn$jRX$wBw3J6Sl~pW`5CI83;KW9bClE)UIBzAXM5)^~T`Al@@{oQs zhHjKRVG!DTDt7Qh_~4niF^3HLm8=n`sP6d2-ABV8k~;R>(r6wzjC=Xxp*5?C-EWZ3 zg;N7A^+Z1Ctc76$AAm2xCKQO!Y94s_3;H218~?sA8)TD;V^NFMb!fd9Pjktc&M9Q{ zQeI5-Z2+&ZL>ld09_v~i?_LA!V9^Ay`W3Ih07PLcg$)(cwGRs`bXHh)fu;rS7Vrwb zF<5*tAqyXlzk(Q##*82>^b*<}V9pw46OaY+^Gx?5qkUnjcMV^Cymy_}u{6}RLhfEg zffR~@u?z}G#l$Np5MiaYKCw^ho2jqtEiP%f=5$X@O^uhA7aWE|8UwtK*_o*I8(#fa zVAMZ82QDwurRSIHOk$Olk#oFqH8M75c#LojLX8dX&W=5cFL{2-zD)T{4V(u=6_T-b z2CE!IO)M z{Z7xT|6Jq@0z-w5AXzUP4pdAI1AO^#xG%1p1lKzSolG%AEz86}#{pAxj4+~F`4YO1 zWGxyLteQ;%X1z+kyq&ene=0>>FG~=|lu-N$hah@S;aG*-nF@K+O0S~DJO*)|<(WUH zajrq;cnP0;3<8MZjE9IoR!MkRMKd#_MGzu$p(Cj7RrS)(N3S-^oXL~Z%f~0gtj8-A z0yzno72>in0%D<9vt!@_f0e{>8!3laCNm9f1Q5D+vdFdYHR^oI)cv-1x2refhQGR9 z{mdq9&hgP>`@AjV_&JM=b(ezYV1eRNpv8i`NLVfo^AT1$!l%L<>nTdv8o4=bN_(>~^vEg!#BFQOGMu9dXsa(xtQEdai@1}mBFuqEyeW7d;tA4gkK%+oPBMYQ8 z5{J8pOc1wNFh)p$BY7G&t#@0#R`TpQ7CT{brFT<&61h?dqXMI4*zkwRz&nL)I;lI$Yz(D31q z3_(vTsG2T+zRJ>f%ClnkR>@{c*;Lo~$4ScG6!i&M?x-=)-G}!O@;)}a&S0z!4vn z+e>}xE0o=ZKEjKS7#K(P8Dx;Jwr~On$|!1tx;sqSLBEIEp>Awb)=|4q43Rh2#-7bh zzZ@CbNlvS9z41UvRgH&V06TWvP3W%BW-+4=nA)7*c2@sDod4W2CSKw3@Hm6ux+^Iv zJ6&_m&aWLDSt6E-y-N)0Ho0rb@nx*t!$Lmv)Z&`R1Vdw?5_1Jj&ll*jEybnM|Clb|LI# z_@%<7RFjY|53V?9>Nv*2(HrIn=xdNDf!R<(g>d+k(l0)GeNgw>KxoUq*hFt#j-F#T zh{1tAFU&L1u1Lpl%cZbOCCHkTo7@v|1hcEjrb@-1BjSP5umGSi0%)h#S*6cYhi zux5gVpy=^(CG!@)il-&h|I6aupwKY_{jhVxstPR-7D2!(5ooc69)jVC<4YdV04`xT zr4YV1;JTy4ju$GNtqN%QLD!3Bo4ahCIe)Kl&#U1voJB8XESM+F+2(9mW^SBGTsR#( z;golvV%7k>5?4y%7DMbs3L>=hotp~je+y`Tdc9=cDreO?cg-?+#XMorI$_Z%_wmK7 zx%0{6K1I9Lb3ao?zX^%$*F9e@pcaiu8NoX20yp`@y#ytEIQVaK^WBt`@dsFO2;E_q ze!wB~P(kaV*~P+$1ajZdXXKTi6DsyqOqvyq8h}?AX2s-i8hanqT##~kbhAWH6y2)- z%sgf7eC`Gy%PM>8Z1NKD$~t51O3~{1)bYT|)q9U-GuyYTM&4DAeeRV`4Xm6EtzS+b zdY?1;xnsbBnpu^kPB9Va!ygDKD7bU@mrAZu`NkxHG%nIP6y%oRFXDW=v2ofXIo825lw zpqj%^62(*qGVzMp7vYV-F&JSHw5xu|30IkkPIEo$$V_3L9^%w*VsICD1?3>X3Pg9{ z6>5gEg(J%?^4doK%6i{23bcn=>h|o^i^aK5y8EX60+Y^Pu+r4g6&4o8eFVH>4utH) z>D z%jI_D^TNcNjfiIofJZtkD_P)@r=3GG3_ll653c^5xLE}W_pf{`96@nAfI>;)L|_&{ z2Eb09q?$xJ_Rz2P;DitTs23Ie6-hA}N;*iD1*JkcL5k+|B5~a#ar=N83IaKiC&i0} ztsnB@fn7vEm}D%gK^93hp5siuO~R&q#1u&*7)c5+9{@!G77ZAV_!Tl(Rg!phvMl{; z6WjJ{CcpQ}WC&>^tO4Pk_-1_2#eus>3_%jnY!Wd<^q6uq!j$iotQAiDL{ji3$znf@ zb+I2O0;>4Da1IDU1&RFzuc$A#=zR{MyF9|a@IEEx9YG>*orq7B4I!z8qB@)>6 zBRq3fCO(Nu7d6 z)|tSX*q&!aLr)W$=N*D;uY}h7SI*rlo=73T@+qH#Zy0hk5c^1kz~Z=s{Wc4iCyKaS zhz1k&$HfGBnBa%VhihDHyqGX$5ygnlW%P}GG1a>>(Y?j!oF8tVg)J3QA%+JQ>HQ1C zz4Iuh*XT&sEWKlz+&Vejvw+B(q3(Ia%@6i24EE2X@cO~txuNb^ydJ^y;6K2^9bWFE zowJONnX&eniOxAJuMV3oq!U67O$4(JcFqFv2KyI>kfz!(+1E4M(=p!NJ_i4GDv<@Y zHrlze*1fXYwY=NAw$rmZ+r2T@vzedUZ()AV=4yniXZmfQ$ctA!HMEZM@QEEZSHuE~ zlUTPicUMfvBA)-Y%lgk?7O@>9W^9PJf zUiqaxKWf`7aSRa*u|leeFsnpy$wo?_EQiUk{@vEhv46c^_)*5PR@tNy-~g~vIa-Y7 z3g_AqIynl4#e7HdxOB4=uNI~Zes3AMVDexb{S`dM6|@V0S0ae{6ZFIHViZI-kPvF0 zC;_Jtp9jvO*nt4A5LY32q(syVV(RI;m7m`#d4DH+SM*GVgjN>jJ0;ym9KsQbM=RA% z*6G@Is#!KYEL*IZ`Jrn3TaVNs*e{4168>7ft;l zpzWnc@$dX#A!b)*4y65M;FDo6UrXDOIc~?-_1(3xd=*lDNuB@M~ zc|2E2DWIa^3o_#!Agh7=`O)*ST4qg3r>gYNG^idcBe6P($bec#w2?e|`MM7Mpp43U zv>V3EoQ$8pT=?21>*@WfHLcV2|M6iVXg!#6`u-2<>=u0IDK<; zWQ!>J8u~gY3Mc4D>LE7&yOeFzUjN3Efz8GKolW|)$?;D{M_xEwk8}1&^$kh(^p7z$ zvlf?BL>@gLi#Ty7?#$ot>OX@|%&Yegj0af3LiBKXg-gpJEFxiT?dazhR$JRPHa5S} zy|>o6OCS2OulKFh-AN_WDy+MCp?XtHhCeWuas%L28@OcmqEsls!^)zYI8jah1imvUqYd@MNu2_VPvz6u)#fe%>Z? zQ`)qO|7gAhI!w`Uq?>6NHypWMpVs@kfR-J%qA8pPV!>{nzJM|c$0BRXA&p@fGZ0ZY zS4aP{b?68GIEKD?HHJYU=@6J#@bmf!0Xc3D`+ z){14)jC~-6ux%=hYw+fci2Oj4P9u&}?`Q+0g>gQrxmLCniE~dY+_n+3g z)F^wb7^fZ(q+=Bcm7XY&Q9dtwpyMa6q3#$q0D!pfJq<0?Mr@6ij6jSjB-U2pPhhyL>Sfh9`LENIP9W%oFjyQ!|XLk*1`6y%k; zx%kjq;Wqm_se!oTFvs8#|0CM2-~RklSK$A|D}WU~j#v`Hu8)mNLQ>Yz(cRxad}3m8 zWMt+s`T0)&0fqc&R_3_g#Wt~{`3MUT(|ZK7O~N8rJY31RibFdMKXqv%f4E(;BYwI< z(xgfPCgF;)Ff+$_6PE2rZ)aCX;8jbLGB0eDHZAhDr#HrH|&agF>L6cP(-c5$YZlpF#_K_0jXQ4~K=% z=Zfm(Ar&2`P7*o=P%c9ZsAN%*()!0T+9x%PPdjISmr}c?ey%~+s!dEM8?*tJRc()O}^<$pQFEQ=UrimB%dtK{Gy09*^)*YHvhlnmz=4;7LItKk8^ z=tE)2P$8*kVd)s`&A6nZ`3$p7y%<(W>z*~AITbEnD_Dvd_yD}RR=8=IG-Vn$bvkP7 zYQ*A_5v^M7StG&P+fSbj<|*U;*_jULlPFU`3dV4uP~u=#H`1!c+*l=}6zg zX3N_)iV)OxBzhtd3AZ1a3}?EF*;}Q z1bBs2)!fj*?BG-Met;~16(DPavbF{3B4uZh@oX3^YwL#H^=Q-`pE&26!Il=*%1UZn z$e&;~Sh(j7yR2XF3aj{k>Sq1zMZa{XOw{`2a^P10g64r)92|mja_a6k{d01wmKduO z1Jg_0`y1q!jg&9^VreH_sJwdFMEsUs5lEXTUiEY|Et0ksE;&!qX@4?%K*Ks+Sie9( zl`zDEIF7`ReR~2LBniVJv7?2OHbt>LKPJ+?O`v`wb-qa1wi>M(<~ttoI3d{-VxbLY zj${~q*Yk=33IJSjgr-q*Fz`@RBTvqx;LMG_*1_NPj{i#+;}33r9Y@Sd_!WXRjLM{Svd~ZR!WmUL zjT=rc?%kfH?<^9hk(_uYl5CqXbtZGdp=!%EW8;1!{_FNHXKV*nZ$z~0m(X8SjD8YV zH=5P8nAf@5F!m~};)T3<2Cqi0^oc4Sd3Yfvi>u@b%4NVl0xl2=$MX4=;yC5wM6@zl zG?T@QOG0|SwaZuutKYm=I5jczVQ}OH12n3UJx!FJdu6OKR-}w89v6nQ;?iPJ( zm9n}%u(k{<)c*Zt%CoebL5quF?spQr1F~=3_CI;bf?rVZa9Ks%Wtd+MM;PM1V=^3m zgQ9=#3NVrCA9!^*4F2+=yu4z{$~vysy&D?)XK3^D^rf}_=YXt|)|baGBuJZ7uxk*B zfh7JAq|3?ama;1*g1VsY))w9SN8gHr9^$v_O&|RtW|HG`Q3gB#!5q zcn+VuNxhQ3>Xg0d{OAdI*N!RcLgsmbT6rYtcpQ-vPNzC)YUipFT0Y)PS-2V6+A;Ah zZSl`Rsl(IxiE+{b$~I@`Wcc{~@(qtiOGT~QE%bMtlmBw*POXGi0-r({ zub3yhfIF{<7mx5=PGK*0P}XrkAmk&Z9?dNQd7uxkus@q*JVs8ELI|Hu!g0%#pri@l zRTJggu=M?Njx8$3i=adRSc$-FP&!WNXbI_fs$cDwj`^GB@sp>+`mUF(pUa&&n>}Td zx(dj0%-XezUka#N_bQst?%gRJepy7_3NNQU>fNj#eHmK*T=_zdo=vZ)K?(4RBoqO> zVim&ALo}~!5}`H~^aofWjR^KW2o&>e{`73rm|y9UswKLnhIl*{E?ceR~+o`OYNH1aJ*UaSC&Sh0hwl>d= zjyzi-uPpU10k2m3Ru%`IqG*iw&7He9Jrl3riuDhOa=dz5&%i)HNC?dU{``tpheSsL zvi`Zd^|x331FwF0c6jAj*>E_>%F8cdc;f8+`!QWz6ByfZj5|YpF-3kBR=j0kpDS~w zTG^tB$xi?q5H>8r2I&I2DK3w83YLC$Nm}PNOwuuL5>(HS(9Qry9RzaFGBGGwT%#e( zMec0%g_z-j*}wYKKF6|43b!er zLj60V>viT%$?qzf?*k8%Y*0EQMYe;a~EX>KtM> ze42NnY3~Xc{~~fW5n@0A)kNraCADBX69EroA&E#q@d(gF#T76H`tyr>!|YT>BS};{ zN%}~Jl0&6)>bhm>Bv?|;xx=?grt%mcZe-EmQRCP094*$_=s~-p7bjyEPQ*@2d$d_a zuW+BqmpEMrUmXq&M7^h21XFT`|L9h@>Xfqpa69^Nz$9VPG->*5^rUIj#F>DGi_yI$ zt?S)m@AK>4owCm76bTVkNMPl?%`56HBH_!*=|Z{7J4{06S!FjZD z%0XK9iz6;sy4FqbV}v#eC8Jp=rksr=4$#bi?ND0bHw&TtkqU<>-acW~J@3Fdb>@D_ zPEFU7-qDXk^nJ$Y^T|W1Ibt0^Z-B?k=+M?!{|5Ri0;YgDhl~P@gkZL#vqCY&g8(Zg zi5-s^8}VY8(x4MV>xB`LfHL$^v~{fF2}=i9JrITryXcyRhxW;XFKENBaU_9*iL~bJ zxa#HP&L=TVn-6PN!WuW@yAHfdW)rHH;wl#gM?X-8-%e4VO;QdP26h+8kB6zxhsXyL zjAv(zuHU@*(AzuO+WLx$iY`c`Shf&*t3&Mh`%~uMeuJa`?-lq3r4IX2;u_*o0`3pF zxGch=az@4$US3g6O+$pC2e>GmSQI>W3MKRD_!7zT@^J(|K`;~<4G>(A6vBa54?Dl` zta&MI@rdIHB1hq|Kv*RZaa#OA@E>3oCkjRlT-q5Y{X0!V25jQTbni5Xp2{F8J_K0d zS3lvM#fLn19~9^TBwj!GCIPR|ZV|qeve87uJjBJykruu~n)cPMS+mCeZF+Z`kb0x* z+RBEnE0aQ)4}dHo7JT$lMR>t;&y+=pQ*oLm@ttG;+B)=gM#ZL$N1xWY0>aHeJeXZD zf=wVCR;AGW9hw_FBSjMy`^&QwmG+8AL8~8RV-Y7p6 z(swFuQN@QUakE*?pX`?Rl4Ov?svbv@3l%X$^Ao9j`B6m6dyD8nZI7BWF{7rjV+J8q zIgds)kG5lh)T=2&E*Xrv{(Z{qmjQ7z+|nK#hrS0S4mT3}bpou|T}gZ{B<^b@9y~g; z^Llge`Jez<(z=P4JqPc{?|DXV3o1v->Zh7tEoh_vu5bQllmf!*#eLW%{e@H__|%ZW z;Y(6YG;kU)37$UvaMCD(u6e(miB~4kV;c85js%aY-s@MtQEnbVxf0juoZQzi`&9wu zc~CAjt7SE&aYx=VLO?r>T`87`s|IB8!EOsfJ$@u02k-;;1L3oT5r=XDHVm-BuneCu zxLI>EXW28TwtxI{D(!J^-$sA)EV*?a!SU3#*@5nPTK_UKwno4uKi`_ayM6kdrWdZyX-7m4{pYG*@iYcMz>##XhqpZb==6L2j`F8OYYBkG&(T!$@suN z@M?AN=~UM`WANob_wMZE>$s@ObLXxCvfSM6o;r0-R8$n3Vdh@TuAv>*Zeh3(>P(HeBNW3*!dtx0wz=lJcUe8Tr(SHN3sUF*nLG; z{}j-C;M?%zdftY@*^T8RT9zO zNNA>soh$Syc^lXHwOhvOt>U?BSq$H%7q)4W*D^OntqTPV%Mt1)V^mNx@^eh}OKIbH zLER{At71)~yr87VJrh55jr~~O_x{+$BxR#y0ksD(AQe(T{#P{e>%nJ07^r8_JC}^7 zj`_n8lo$D<--S0nl{HM3(2wI&3>MXh5>bc+n?h77QdlBfSTaJ0kO&2!kWB{tps-fj zCC~A|`mb%{*G@&!&m~Q{=1pacev?jqcPo3$GG@dvbHO%!{A|>~*`zgt;BkY92g>HzU*Al+YFM5Mp)SZ>z z8KWz_Ygj}=VY$OA_fSqhNklJ1%`D9~d8L2x=l-cbm$ZIjcdN$OHe2m{4P<~Ofitez zube8LTIa0VrY=ATX_q;TU6xhh%Gt~r*UByXf`!ZJ6YfPTjxcgBSg#)ax?=c?a{Mts!mhW7c$LTXS}k6$svGly~| zbpWQR&biaU?JxY=Ubqx5!-4-s*`@;=7c*yFa#uV`cm1oMIi<}77fwCQpQvtM?jLl%whRGS5Tere&Y;L<;37;K*L#I3)p*`!}_&K}#3tR8y3wLH=MWPG0y^Fn?R$X#t zxhP}-7tH;waOh`EhZd8|{i;S404pRo1KBiASL>VCX_{0ZVNln;OZ!em68-C(iT{~7 z`j?E3Kg860Y3x8zJ6$WIo`-$A(vf_PlO<3+Lnti)akNYf=BsvZ!Y*vDO=U@or&W$iN%W_E&O~bbL&RMC%$dpTrYbS(Dd!?(zg#9b^_|Q{GuDk zQ=j%R{#w@b*Mee3sK)8`^v-$j%! zr?xz4nE$$M^@rB+zjaLgta3Ez%%v)I{oGS#wdzL;K_kI{4{;M1EFhjiU4;@iex!b> zkBxEG6egk$`nT?aVt+OMe&*>uvaKwVE3<4lVhaZoP>=92!HpWM{#)pX^aeN5; zC?Y@*D=**`po!@)gGU(pp`hOZSm9j=vw(dlUJ)?~tP*=a{TllcaJRBS{@(Sjb7p{9hGPVh^whtK?dN$j$GuOLY*7vDr4E4DG zkf2o&Ni&h-ST>7(Hc0~pEYSidGYkW|Qpf(}9JeiHRw}7i1~)upB7?FH>J-=lgv~FH z4~tYJSOj`Ei<8NpUU{@-6g7csx*`3~}+^XXU;p z1SdLpt-!BOA`-UAyhib!1-n3tiqOk0OVGBvbl_YSD#N|R_brco};^y(e zcZhT_((#;Q-s2iR!{RRO+QGdler+dXdtGYQJ!=oN?=>04PMwaM)(@SKzuPBqqf6Aa z{Y1oqN!*&|yUXFbo-~C!y^5ZF=VAsd z;;DgYeKph<-M!!5_vsdaGa+vPiOYe+X-{Ie;}LKsk!(<`?3YL^)+}t+B$6eG)#|Wp zxOuOTSnPRtT{t*ggoQoX*zCEvud;EtbMbg!E=Gv9{)LR9&d=*9ubPM6x_CCI9eE&c zR>*IVD15b6|KW&102v}~t?)tZh@q1yb4TMRHN1MYy$3Y!^%zG^=!Fg7KiMR*`+Nc= zu5K%->2V5mFNwUXc(zEzycAPENidvU0@`ZWE&6~#%8wrm{s2(m@I!)ZM}iw87s#$0 zf&tSmdHin8tW*AAHF>9z{uJR^c zTrB-uaHnh5R73mf0R8zCeHYChy=ktJ`!jM3>2^L>wJy0Aecu4GTo9I*z2=emM%A`W=|a_c@6pDA-*q$oa^Vj3 zs9ilo(+K&JI+A1R)L+uL-%k6Yee!2(j}Co{T5%mX-lQNW8tf?;X9?&;s+s5G2h})+ z;Z}AK*!fjv-fR&mP<$qM5a)x@OWp!l@d~;K2)eSd+XI?Fap&N&<>9-`&Fdg4ew~Zw zGQXe`q&kFPhuaN!#n118;uG+alzynFn=T*|re~Rc#iui)YN4I+Y3sn(sRe5;QA?+; zcN#^{nkB8+=WN=fuUHgrn&+=u6mFYluiEGAIu}2`lK&XxRI`7zYR{u)^M2D_YU_Sp z-zWJKpQH`$Uyocda_Le(T`#Pb!zUjlqM86;l+#MV7%M3ki}8@4?5d>67(7xulP7*G zMbESD296u@2ZOt|OS)E@N1h?KbOg~kgPR0o(Kd$Qb~Utv8li&cut~I4G$M}hFg2b~ z|BcgNR=fx8A>`7aW1+JeA6%IjTAd~@E)1=~#}8X~?C^nC%+J$Hd)Csuo!R^}yY<30VIw zUZKUp1r*{F(9$=&cKw#ETk82MF*$`~^3eVS?J2EmBe{9+PRiifDC~_pujf6niCeIV zo`G+S+=b+mx2qEdKRjsN)3B=%GtP!RG787mB%yGUKoE>p;O>GVDaMK#7FZ>aL%Lq* zhV|-%_LzmwYu)Z=lTT+?$Pks!;*$Vx0pfi>Ry0(Q`9MbuJs^J|1}?+}BCd|49LlC0 zYkaRhsr$WoB2C?^(!F~3cxca=(4KRV1J`1P4Bg7Ct`{YjthG%16q>&PsUW*T9J^o~ zw`dZya{89-(K)ltw6AK(-`)%!K$I$+vN)uZ5pT*W0@LPrl0tyUu|#RtN}20b=aPm{ z_e*E)7ERiQjmcW(NgC9$%4Bhi#_&nR^T&GW{A7)cLLVj#KUL>g?7QFFPrkqo& zmjAFp@PtMHnyW#xM9RhNF~^K~r|hL8A%lkD!>acwXqFVb1{Cj+rQp2hPdABMJ{mHq zb(bRP*eGa|q3_*#DS6;d#e!7^!#Ji-)4N|UfTrnBIT|*qxzq0k9jq+(>-IHsc)yJJGPPtZ} z2qqgx;Id4dj;0@v95#%g9}CBEz{ttS=~GcN=7}>#5hKP?y{54P*6DpdZ5x5j8$NZ* zu5r8C4s8mjTG-^WiGM^%g5`pP7|5njIJ<#*5jNC>-=JCqmu|d}O}4gYvvFjbZ5I7z zQd?&CRuAoQef#1teFur9gXAS@{{oaaINBrkEMNgOLS8`!#fg!G+H9JNTKS*H#=^ei~Lo1-9f?p?_X|mFov7khOqM@Vgg|5jCF|O@ zTil(9AN-g*`+KjR_fEBYzV+WoIn>LZsO3j|s%QcWUnE$U5aL0Q2r)G*R$#QEbE;hH zL@9#m3@&tt7-h>_lqPh(MRe4i`dzblN?^}>|E{+WT3-gXyh!PMuVJ6vO8*vn^`@~O zulTnhV45TqAu6Avpj9S&tklGj7M?NL$@pF8_@9H)W=*eAPTF-Nh?!R*Lqa`ITrF2X zKUT&#Q`NKCFqq<6vF_2ZmqmY{G59vN<;ze-FNS=TcYT zkZ`YN?MBfIGM#J5uS+XFy0~=-iN~P$#qR*G&{K(u-vCVE5qO3E3Sh;~d5KQ|EtZ{# zn6sFKE8fM!=O`rX#?5n;N5n%w!b?!#CJ(o(pfsf1_FNi1LIy#=E04ILR`Lh(`1ftJ zuPWMJ`R8u9L^2$5R-B8rT`TsyTHajB-|%ex;9U9II%nH1fB#JUB6N=Sxf_m!b6!nP zZdT7e?A^;8|16I3GOY4jGp|w0o69nW4RE67RZbI8Ath#Dkl?Vu&# zjl_W1oHvsiFjP5?k-VwW+~662c8b~A9OaY)wgb<@|t%F+xEh$ z_d=^4->o^gmbY@XZ0APZGq1)M_nKY?cD}q-wQ;9%HEH+@pPF4%K+AiNil?p>`#v2X zJ?fvqG$XL(84i+SI@dA=pH}y-c8xt7AAStTqO^}bO0T+RdqrMchLZ)8AoHd>?5%zq z2mfOz%*3r<9uY7B>43P1_}TOJx9>hMvk5zDe4k9-8yb4nLwSz6Q#f(2WafMl-8Osb zOvLc%&_UPyWz6#a#bfEcPf}>F5(b{ByVi1^PLMXMWY>_cnWI@;yray4EAQ&Wq=4GOh z^Ns^?xszoqI*D42ZBgxSeJggI3KmSld-0=%Ux=3xbd@<1Q8<=dy+|GYNTGjvEtoEE zl8oe5DAaf)Q&|LKrSQP8^_LT`w!mEn{dkB;o7q(szzuigEI1f&D^RkYGM(TF&z$y*fbt?QnSBCmmU{lOI?1KPsyk~B{e-X7h zu)0oJhe!|toJI0BYGLTf9PRNa?ZsfY4O}Q@%;y0WzWtA4O#~-2%Ris!Reksfs9FwoN1l7QKkI3 zMuiJCVb$LiEd0@}XwIwi_2tr4@2W3IhG{Y!zzMJ{hB{<%3p<$&98bdr)8@Jyq)2Xw2{vQ zbVH1sYk*gr@KTn^kk%-Mn+?*X?e3O$P5sa}@}_&})$Pa?r@$%vT4#|>1X#hoPsy@G z&87nUqBAk$?u|QkMYGt4PCPHE2U*O3FyJZcYaRqvZ6ubzyWvC7Yn!%oo^!JUKkoxipwPO3Wam=UT5XF#=+sh#%6~VItz=fkdPaIOHAyRh=@A} zryURP6?9w}22tp{1VwMiDftKsd+_nyVC6i-H$H0?ejAeDRg!=sz=|Y(Q&8Pm&muG? zr>A@L1%>`uSN|s|O|N6B_PvTXaQ$zT?L6rG@Sy8U@8MZBwRX$DaXn_>#s6mSt)tsauq^Ss;XhSd#9)8?3_LO`#mMyJGI?C^zTmTyrW36?8vgd`@MJHefMSe|BI5_n1Sc| z1Nm0om&GuCC9Ki{gq5Ih5$H*7y?`wwg)k&_L$sLXbqZcGi&d}SmQCG@pbm{}x^MkT z4()RZ@vv^gQ8=LntstoqQa z{k>t{nqA`&{Ow=@)TM4epz}1i=OUnGH?sFEo%A`VanG~%Af)5UqIBD=c+<1{ysAGGeqC2~ zRoi}@-+45@3+X%$YClbBUn&_r%p-ru8oqXJI!~Vd=iu(&L=OHBy@XA6)iSh95vN*> zu=U_Q{nkf@)ef24`P095C|>gIyfy}1bnCC~=v6=0>ERYF<$qClPofHB50F{Gydhp7 zmR~SUP$(DHl7geJ!0QrlK7o#;UgUPh^q=5h32J-qQgLXQGUri!;*~!aS+~>Db3&wk zhV| zD0?JT0h{{>uTuGB@?QlIwKG>ts`gE*5B$20l4xI|`ab(KoQheE3+eXrJSn^zHXrWN*92|zMtokf0 z>NtWfflVKa*WunUy2XfSb((&u+;p z;EcU%Bdiv$<(%C}c|)H4K%Bhl8@}l5KhA30ORQK8tlsyp+_f*>@u)d27Q%~C>rP|v%eUnUYf3@e13+uj(JZiWrMH^`>P54;I#-mRSeR6YCM(8^DPj30-o zm!q_6%H)U9@wda|Q{w0e36`OZ9Rb-6+Nb$3W=sS1N;#%Zz5@wp@A%uck+bU2cNN1| z$v_?STn98=de@$q6|Fhe0@Cg}Hk?{l9UB*ITUH!eRUQTQeP@u%2)=- zfAdy&_fbm!CAg}FG#y8GzOgJ`x3AoFZMifr+qNp-5A6Hm+i?QLW6r=)YUg$j>6kS2 z7BsFs?ewUSSXpreel9*V9A`{l_ph@!%o#%F{8OQ09IyJ z-pZQ6Z9RLG(TkCxW2o+dkhIL7Rf+1?f%G_YS~F$AD0f3Yh2mMa6Iny6pq}QAzV|Mj z)6AH&DBsaeUQvymH%{HtiCZ^KJ9*(i5_25At=%Z?(&txx8QO8C6-yNMY1hx5_b7dX zlguE0Q!wdn9Chf2dm%1a3B${*i zfn({Oc^1PoW63pZ%C~5-Yv|4J_;=))KPu^_fe{wip~G%L@UcO2#v!axU=4TUY4&5e zl#q43@ls_Ru48_@N^19z|8Y$G%uJ%J9Rz}CO`5W5{n#C zNFF!NqdV1Zc$98irp-!4ObYvrh=fcD2aF5(P(ae~B#?T~Yxr64#M7YhZ;ZN1!kA(1 zyifavSL>Q$6znTp67m`WC4)@VqXf%-R8Ym3&8jaP02T@o}2o{V6g406a8qos0V&+#Y`pnx{eH5aO z2k`@oJ{oU|@EIdKh6EwQhYB7ZArqF#gz^jDvm7q+TQ4HB4iKY}bsvJ&Mh#r>? z8-;}wP(y*iph5x#miy>u&N-Jad(~|Qmw$qet+)yGhGYZa74BIvi%=GiL?!w`I`^w$ z)Fb8x0QD^Ep;kMOc9D!f>9J?mGoN17j9HcR8Q6{uR`z=FgAPD<=aC#T2ct_V*{#dD zC6w~I*~+?wy5^O}*5!_#&4Ir4p@GfOz7^(%=;7`0{Vf!n$-*En!?eZAL$jAs;iYl1SIjqG_j5B5N0->z9gZ z=$*s^SQ6dQJP{olrzov*lUD#zDrgb@8Lz(PSHIxZe+h?~7|)boF`=IK#w}R|Wmk_R z8~aE%?~B=F0HnQWijI>`f4h~2^ zI;BrKwO(mtFWJ|$0>jbkjC78T>9`O=uY#wALZPVs(ql?BI-C8-u!Fl zrhWIeW1F%qs7G`n20Tkw^O}|#MMW4S_ykOeB``*G@*mXY7c>gB%DYkZmQc-hqv1{^i>k`qcq7lntF%0$G6Un4C z2;s0v+2j??%o(uh^X}LT=-qRuJn(F~)GypNDLb$&-SlgFlijsdPkUF|a2XOmrKa1? zeKSJfo(qD}L1APNloSrH4nbhm#$eTPI2{NsPBT7UD-L!O0^WeYY6u~4(}9=I21>%O z@&+R=9uxQ~1P{9n#0_ps2sSo-W`@RR$BaA9H=hS+Ipq7N4tJAwN2bpE$(MEQ8ztQr zaizO2Xn*-P%cO6@w!9=J|v-N@}bENWkArJT1C4f6E%e->mq!@wup3aj=+by;lD}nBe&k%a z>C<$S+INuHwNu%>+DSbfBX4$fPG_X#=x7++zxM!G;%{5?V6X%#!e1``)py_xwQ)&rgvf%>;Su;|>!yrMi&YE;7 zUMw2gE*aj9Z#gjx>r+gb)-T!+31iBkRg>q{QWn%wmK5V>VaP%|alyBCH>&H6OZl2< z#-w@CrbhC#dicyuy(-wU$|_Zgd6|nA&Oz?Qf$V|(K@LhFnd4?A3ws>G6Z1g48o8SW zE0}pyN_;9lSd_2m=FpX5$cEVqYC&Dj`3tF)Q*D&X;qfm;RV$ni1GpXqVz?q%*u(JL zp|Cm`!F%5TXXdZlB5;DCVp_FLjXQ$_SHpAvOI#zJPb`yPoVlx1!F1r6ZVQ)Ku7FML z1J}04fs|(<6Y^1G;9CWSuvf#bMdrS+WB)6oLDb_+*!axC7lvU2C4(O*S^=*R0WTiW zq}x{Y4;)%WBBsFf_;uK@Ncf0sOrL4Vyi56pVakMP=+tAc5n=zSd(OkRok#d=`vpBl zZ@Z1$^Bv=H?7ijM_dEo&0VIu#X{+)n^O6a@^m)xB`a{od;h^EiPIYQ=l*ER`+@77> zibEaqiYKpf&}=>|1Oo)8$AXqd5D6BP5(H#f2#Yd;s38bkYp@`iXp}aBsI#E7K-j>7 z0x<(996(A6;s<6G3D3l!bufql7BR#inpjA*ARj|(AfS9;HAUD>QNY08)a4Vlcks@t zYMt#KKCSQAENDLo%$P7vnlw+F0VRWK61WR4iHDG26SP_qO)Z^jT(W3gKH=HQ@U7i9 zOPi8*8wR`*G--Ke-~Z6D>$X+1a`dcx_>@7`wsz{8T+F0m{Iq1~pj6n9Of*?Mj0n^{ zQ&F5eBO680&7PNu8qrFdl#3#2#}8@74tV5Go5u9prO<4XC+w0(-E*b_3dbX>=3)v- z4I@X5{kt_?8)fb5$tB~_HH@(GdCN4aSNV!<;k0%Blz#e*LB_0X)Hu9snYeLS@(7&~ z^{g2fNf7q$)6E3PT?G$npfN$OtDHP;kUy=SHfEAVHqIP%%ANEmp0h}$xE3t{UP<|P zX=g0LBsg>&bkdjgQpU}4W`k?y?K6f_%E*nx-BHqdf8RoWcCm?p#nUIxz-jy&UVWvn z{;LP;f4k>@s{nugYyY483g&Tm1OzqpjBOl~Oe~`k5<98m*Tk_?2v|WL)3jw%vFX-y zY*`AT!A1L$O{emmu)5Xw_PvIwiz>=daLu-D+60`lJlj5e^U^deU5C)jUQo}R1G)){ zeV6LFw2AjFwOfAeCt5knrscce_8mJ^e^8EN$Vbe-_Mu?pv+i3o-_>eFo+e|SWj#=D zfq80i+aXT*VsXb2Aq&vP|Hh(d#=3OgvGK^Q?L4S>8a|K%q$AS!1>{Q-ni(3FL!1xd zS-Ham?j~{a`VctW@!XCC9w&i^5n!~!`z%RBqc$mXa*+IGWahj4+Ig?^!foEZ?xHJcNJ~mU-2IUePjy zX9FXm|0tsUB);z|y!m55%^Qz~kA|6B#-)d_{#84769lx{IlG!!+lCbf8u{z`xpP_> zQ#Mt*4t0m-B|CcA%$yCppg{y;UU8(Ezh+Rj3qRbXd>0rekX6`K?Hc7R*_1P^%a;9` z*FrjX(!18djH{8fU)8_SGICtf%1CP7if>pCYdP_$+5(}nf892CgV+|XJCq;WmK=Qh ztXh<;Lx5C6J&A4(qZ37Y26>yN#d~IzTab4dmM%i?0M-?`HEf18?f&9v%c+a3@*|GK5y?!>NXR~x@qmFt=B5w>0uaxDM+nU(D7Jkja$^nM% zu=n{J1M~AE@t50w`wsj&c*V+!7kv2Cz!bDssp>ku=@|p$u}c7}%K90zm>#DLIB8OW z2R18W$V3c!)E=2;Ex6{6`!r`wBgcNNz?)d%8`S2T?Pn- zwft7Sx9kRa%zC*^dk98tXx&C$`vFet9zOe?yB;GCTw7pVS|@`9AgLBllMEVs3?mK_C>rh62I@x8+fI_&MqTR)Bu+IN%j?ga>jh0u1;Vqgl-noC)fN z9`3f$Z4qn#zc=eyLchY6|^@U$<%^%rW&SME8TFQ#+yCv5f9pFp|}~ z1z=S@u-QaBENxry&Y^~u%~@qk>BS5~IbfUw&S{GZAw!Y@!)megCvL5>5u*|z{jdBw zAG@{)dv~cN&8sHPfpfJ&99=GvA{9$gNEy}6pEk&%n&wYgrITHYW=!HoAhhEtvVlEN zCP)Mi$wiKf1rEOo>rv09tH-zKr}re(QnNee0j&B47OM)Yoh+TjUWu%T-3zM(ZVjtz$~hxV`Fsmyl>*FZR9v(;3A>pz^nD0 zP5FU#=B#t$iD%7jV9RN2{Yu@`_brPb@`>BNHJcEwb(c=nXMP>m5kp_x+Ahq>HjE0_ z!bX1O-Fj)7&&Zm(P9mSc%&%+RuK(corsdlXE&HI-acO&JUI`M!k9xUl4)rG{#T&NO z7h%JH2p;^0xbgoPKJWw3IFIeBMLb%Qde3vopL|>Pf;x{q8jfHUDS7#ibpvlksb41O zzp?S3e5q0*tJ4V*2tlD}A>kyx8$ozhcQ!tE{<{IZ_ahB$2k%G}3ad9r8RS+CeBU>E zPMUmg5j3Xj-lyb5zpYSzL$(S)QpCPj$(IU;m08}te$f^z0fcpX4h@H?)L$o&e~j+> z7~FKJ; zfyKx}z#|X@f*fRAkZ!RO6tNgZ3|fHzITcEgfGFY-1vI-dmQ$6LPZz-{a8)cK zBed%rx`gIc+c2(TSAG!IzMePvzF_Psxo0oF{W7}w)T{2?JbOjAV9~De(7N^zWSK5a zZ|!R@+&Zq|u73WKMa7m;{;FN|p>NkGFx_%$xi&1`c5Q!eQnnW`^c%Z|H*OuD9Gl-7 zS0324Tp1Uv+1DJIm#+GDUxoJ{B~#y(Q%~ELzw4qLc8(pu407AhPUX;9Y2Oj_gMw;S zGDohW+jnESKls-j`!>Fd8ThS3^-)0gC;#5}?yctzwa4Ba?=;gEVUMwt1-;+kxXcK!4Wex7O?oy)CT&&yxR?Gmf`lU1Y?_m}5YyTEr!JEg=&->)1 zgteoGj!~G5l3RKCBrxq=W9J3+bFrsj;P)(+(BuzM$tXk#H2NX?KP~I1h z?q~F@*yqhS7R(uBuGp0yK{h2HIii&{YgovD^B{D4Mg6;>Bn)U@EsDr>W+_GrXv2@F$<}jP|A)J7LqrGv6s8 z&v7B|L8+K&U~;Ug*L|7}U|s{J1@AZx2)R&%z3HNU3y&NrFTAF1nD^dy8N1^!a@To? z&#F_%tpoNr`?P@&YehAI4r)w=@EN&Kx=k`UqyIX+V!N>E)X;ob@KGucw-4YI9;1#! zLzSljDHe)F3W5cZ{#F3OH48JjlKPr-i9)&skcCFcBZxHM6$+8ZAhG~i2ypc{IRvW! zc!fo2;Lw_Qv?i8C9br+0z~c20lolJt6pI)jY?f$F8|0QT*9&Lv*XBlkMU`C}^#gka zU56=ktLia>X4z99X#lY$$n&gfrl(zHg_vQ!LBDP>+IZBZ>_ zSuSNpF?}AM$@I6+nuaRUG?#2$OiSxp$r;$H?OlOr>|L*DVXBB@O6fjj^A1^*`0m4i znq`mj9ornxe{Sj~&clR}N<2+DkqQgfK)|4yGzF{E0DK_7($C#6ELhjeU9oLA00pdL z&4zu|ns?QDV8gC=#j1PBl56$0W&Q$)+uvtlBinB{@{j=60_X4{iZ@ zMI2((m)5)4xcvpMnDyWk1*=G<34nfS& zGxc3|J;S?rHK=OGz44QB?7Un&-JlTm+U%L7P8al@Rgphb(yu`v2U;w*>P^tvfw3Em zw8NmNR_?q<_chFff~>`+U=vh2nPaCp;};<P>8@WRVg(O%pOtYGz2k_rn%2$AWXylx@X~<(Cl@sklXn zn0fn>WslnJkhbOERu~4{HcVZ9uF(douG#L#!@wivMJ)bR0#I-d9r_-)j!Q9oUgC+Q-~3&R0m+~x=@5o$B1{v5`_?XW znvyBsg>;`ntKFgIKrwvMB5yCKWHO^`x2or&plQ#+~u)IW}gt6Gy-vWn~K(UD6uz+de7_JKfW zpOf46BWqTJ8xP$}SHT-9r1?!`_kQ}=+w|en#J+vlTI*A}W?rxkp`JaXU(8U;Tu@1$ z)5=~~&sYI}EkGob;vH~2Fe=n3^>Nx%?RTAnAY`t@|&j7la{eFs0Zs{in;eFx9>Q9;5r(z+|Jd6 zp}pXaQ~#Djv*KO%mUl)aJMiu9UGLPh=3U$0s%I{kmh9Tqo;lTD0%{rLt}+{xg$!rN z3|o%_d*1lg?nHH61~nW6)a|*|?>X0O1I9vs1YVCWq=l77jy0z-y{AFV+jZpA2Ff{k zWOHO_ttP+5#oR^WwInwi&oBJde+H?(J?Aet^_PFYYHYvNg8~BluVs{M-F(b#QcbOr z2YUC$Nay`CKa_Uv0y4PeEn1hJIn}&1DcuL=GimS(G_rHMkL$+2E2CWoSJQl(4xB62 zT$|pww_F2QS(a}amaKa9z5@ZCbJLYh0v+(Gc;-$lsa$m3dP%&j(Cx0QR^#s<|)J}s7+-bz(`m3_S<*Lw6qP_S{l!!HE>ZidFVkd7>^v-2v6J#? zi{Q8prl4lobg%l|H1bK!+OKR2_oDlMBdXsEYpgN1A|FYYg0VBTq$lt zENJ$zYll5)`f>5W%RnK&*N+VBCHg~bu)m4)%jcggGax> zAWzYF5d`xR@aJnbB?f5~;1w1tiNT0KpwTZem{)*W2=a^td5uAfVKGt=U(+pVG$Mmz zktd)b-I8WO%VKZ}0E0YyW}u6J8k6q^Na7V(FsdBf1}tc82+R#@gwq7@iualKGpR5! z<@lQZtKO;K)KCA~zi1}383gd_fLDICC*hsD&ZYFG_1{-5{0Mjz-EnG^z3ftZVp6f; z&~jp3cVbh2>e2bVbw6ZSS1w z&tt~^03Qd<%z$>%TJ-{m{%%Rod z)_euDhGpfpQ!O(9tjgy9DTDL{eod3yS*R48nod9>Yu9jQQ+EPj1>sq>>`+M0?_6u7 zUcjpQ-mdw|oJuECC%`Knc3uR*Lw*JFp7F!^bM}QO zeHYola4OmGsABHdgDe`vLfX0OYFRTzW$W5$3)W@(df9ZC;>n))2q#?Nf=o(Q1MTuH`RsY<{(x-BBz?uL@(h?vSc7F%xh5Ao6kM|zTDM&^`D0N1 zhHLqZSIuHrVrT2X!7%B==-6kc5E{?p5I*pqd6l5_&~Df^tEL>@vLoKK9_2G9KC&Mb z^PRhC()HMZ^w^0k>_HQD>(feDOdt6^w)+am6VVW&LIBw~nNcx#+%@xkV(I#=*S>ci zhlBOjSHO{gBnpF(;KazYBGL$21i^`8abjqU2rEVmgS^CJMA67g1TFS8q!1M3PKv;~ zLnR0p1*8^&h!XJ9EQkmJBZ)%+KmQtwk${#WFknD%F*z=*8iqxQfKuTiXkqYbEEr`R z!HAvH9Lr{lW4GfK^b>p%E~B028#9^LdfY<&DZOJK^aEan;~x1G@3JZXs@b}+y=u~S zaNV+3DczuW1wt*IArd+U1~rC-N78XLy~0iBx=YoB8MW*Uz2XCKtIxtsI9vfup`X2Jn7eJAwd7i|?NdBeNPZjDz3W;wrC+ot6-xxQprZL$|FbLN2HO(>a$nRGgFex#jJkep_zqyPNrYc>M#S4_P6${GLpc>OEM z=wIFa4-e}9hoA6o;S~YL^WvGfx}lAOSE!t3poMcbfYspONmj>RWci$a(wJZ4flkr7 zLD@FUhUga@!}yq8&O&1A9FSMJ!{-t8%PwVG=9zOa90w{I04v}b^okgkwR~>+^}Q|@X98CM>Ayx zAj`C5Nj7HCzhX6)^f`U_Ep(IZ3dTLF7h*F8My5UhUNyDsJ(bH46p6$01ajYw#Iic! z*qjNRPHfyRIBpk&)eg&M54WY%s}*z`5dmN1mOsMl^*}sBR4S54{#`HqbHnf%;1z^~ z-;_+ytU=15Uedl)$iz*HMvdIH$NmHN+(&c^&R%(v^-_0i3s>B#c9SS?U27MmTzXvc z_Ei0rbi+240+vjYj=?=xA#m=t*$A6PJAjpL%9&i~h*|Dx*3@sk8}}q4C+|3Q$i;3w zaHTwQrHcixKX;u_i`@mh;?`}J2$+B3JSO5bWRSL&H1GjV;*e>mr_E_aflzI-k#gNT z|08S!6cLA*6OKc!=Kts<_hMk}Zc*Tl_-l7}| zs{$QKFw{a&rhr!n!3I{cvJ1N2eHHpxG2Aw!t7GZ+jnhBHwQd+jG>0`Z;ySk*s0X#= z-Q>O_#~iY8*}7)V9Gs!_3wHGL5A^c(fgw}@=*ZgyJ%CE)ntBeTl!-zIqurG>~zo^dE=RGaSp;^;0M88ZIESf&vioG^qH1ZUuo2lyv}B z@bX}F8rWiJW-O^B&#EOYT9zJrR~_2ruE0E0G37ms_FHBR+tlys7R*B>3)?_Ufu&EF zw#=Bb&tn*+(qj5QWYw(zUd@vk!);?Z@kz#Nnh)rV>#m= z{puK+nN!Ni6tJn3kDdf}T`7?{!2zOf<|s!Z<%Lfld=6FO<`ko+fl!r6qQh2qkmcCN zk7jmWrVSo?6jMRl>|HdMTRq!1{wg|MbOq5yd4Y1ngwSK&YuX@ z6v3Gxh{*$?P;dhVe<$<}PlVk8VRz<#6v21PD2ArN&2_nG-_p6uexh7 zbjzdrJ%mkFUp4_!Ev!{P?IY|tdXQ4fc9>kXq}ltR;O zZ6;N5%b+9G0G<5#{{H~hA!<4{1zhyS4$ z3&9A)1}H!wW^o5Bx)=(1&CHHaBFsR5uo6Y1M1iM5p`Z+W1uPZ@D+(Y6*DNfe0C6BL z{YG$Xu;IT?*7CD$w z#No7Aux1#7C5FR|mDii~mOuCX(3d({EtCILMf)zSYSAdF6GSh0gWH9}d*RJnzLksM zDD}d-O(bj>1bFfZv!Y=Xi6{ybgV1w%>enai+YbT;&8(GI!6U$~OGZ!Jb8Z5}Hpp27 z*}Pm7Nh4)SBAg5ZI|haOTG^Z5&WzIGM4&?r5=S&5djm@+Yo!#jk5YIy!R#c;jhUt^?iIdW?RI$*ZSAl(^!F|SsEAWy)J}MJ8EfPkN zjG`$d&Pm3QVO^|p+O%lIuyNM7X%5XLcQkY8B(m+$F^>-0Z=qQr5j&-rwgi(qDhX5x z-wwIpKE=Qe5X;4654R4V(gx;+TE>#1V%6o9?%ckILF2#aMVV72Q0Dx-%P)BKvv=k1 z;}sX1fP{#=u9>@?dxWk-j$35w0PSrr^-X9!tgzhjZ9epB*aNo#-GU{XiWAuR8`ij+ zI&fV*e%L@itDOCk3HeF=LCC;IyXsR2^U7oE+H(3Bb+v&wi|+{1jHP4z-43^&6AC z{nx%ExwvJOlnu4)Bc=2`xx{VhxDBh4kB?o(z=T;oeB7gD2kK?}luGcw_uQlaZ=adRd)+py5Egz*Q>IEF^-vR2};sLwp$m6*>O zw^qBfAHyj9@|n}PT;#e~;DWHv5O{S0*!xDQBZI!_^ByLA1`_kdTq?JJFAr|pwh zMg4oFLx&}#(|Y=cV%jH<;z_6n!+NeEo3g4og25jc{{c;cb>$8uT0psjVYO;H!=&_3 zJ7>eK^Q}Sgx=sDDOZ$~=$$Sj)Efkg2vtQDP?_lwwQ^OT#9<=he>|5Sjmv4bTgIY8x zvhQO=$9XpOS1rVo9_sbf&_ZwhaHwy9)GJY5o*QTs4#fg`2H5ZNvxD;gzWEDY{p|ht zId#Rn{p~(0np@<#l(BW7wR5D9VxWdYK@I6Rr;VW*IiMFeqLVhQ5=T)=1+(;dA@AM? z9$kt-ZH7st_~toiABVSYtA#YZ4kZfM*Gh$w_)N>BV`##GM9_@tYL$ z85iAhY?O(kaawh9S$ARdT3C%c`K@~}I<*qvE8<~{hfZXIcH<+bcDssGkG4I}_ISmAh}XUVZkg*=g%}dP7lmTK|6|on-*H1IWCP> zXF&s$sdDq!pfLu(Xd!4b7A_Zr-4Wq+GxZwvEm}_NzJf(LY2DjVjXT;wt@IDrvKt*-J**(`NbeHre9_@dN1tM@vxl3~Sl|1(!?Vym10ptU{H_}C`DQtDIcYS>S2`eirU=bRKc9?nw#DZh*?_K`QFZ{hH|G)m&H+=e* zWifAmyU)!kASNuMYwGRfm7r{$?UgjtIrE`s{Em5=nrAT-?_J5cz0f_C(b+9zA>*jv#30G?)hZV zc&?j83m&-k&6}vAeuDolu4y*APy$`uR%lv z^Dhukn`q^%C}-@O*L;>s*i%S45DuW zOPoNE=Hu0ZoC-K7EKUVnW!N|k1@4&e+|UON1GEL1N(Ph+s22dQ@a#G~H%!?$jR@=p zx9&IsWZ?+R<{*yS87!39`0eokP^`K; z{9Zeq0j)rX+H=FAJ+JN`^oowO^Y?A*-n+H`2*Zq!yg4_YcywHX91aw`DFbJDln>!8 zhY-*su&p?@s5)_Kd1qa{6SUqHcn zAHwFv!*0*Z;lRdbDInlN;50+9FkqsM!x|xoJ_n}_2CIvPQ~@z3VC~pA9U)b~gNdQG4#8(O(6b!;5ho!W1P>d>$dqI!~^qQIsdt!rjz*o zk07iP4Iqm8&p!8h zR{Th4;Z(=$uX8I;?+J%+a@xXD8>SlrlV5s;;6$*f*90t6X9Z+C4w1nk(s-N<1}zD7 zALLXBXtD4LXq+~J)16UXg{uv(+ot)N)GA?S`_Gbiv_<9V&H zJeDXytifEyh$b+#y^cl5eI*2)8wo3_YYH}AqFk@Z9(9f7ODq=`P z4BF((n5WZX+V(Pr-ei(4gBuv&AsJD>SVKIi9y-o%oT(q&ZlvzUR}ur8Hyny4jq_&Z zqXzVIV14#1DBM6=1N@j?*1T*2&9&nlqeThQ#$s5Sp_YM zL*<4=@s?WRlxF&}RmHJ+=>{`pYB+VN+>0Ez0K6)n`N^|%2K?w8YIYrKj=zqY9zYKW z25_vw9Is^CzV6hmOphpp(?fjLTmm&HY2$$UBdkBM4|#+SFbur0$7CE8<+8& z0m)e*{U3chKC8q}>!zOw+6>+{r985omiAf`by<}5T9xu#k?>v=^PHFR9X3p1q>sJ@ z$O61_uh}Z@KkHrky`pX*m!KPXhqAN7K%Y2{pnze6^ywwY71#-qEI4rjryK`X2_Osb ziYc#xqzf&MAt-Y3F~N$J!|?V!Z$;G{ahXhYoyr^c0%5t&&4+<#4!hez0fJA0p1qEE z@HFs+WR$FWhKhcHsY9cYW3yZ6Xh_OTRMwJL_-H`vgt=R%z2BgQdCddSs3)Q^cb|nw zD5gCW4!!%(kLQLn^e;GgT?jlL95;M;?nMAzpcn2Lp<_H*Zo z4b}8Hkb?pZWnQ*#Sg>kWdt}@E2Ixu{w=pi=hY}BRb?}gZQ=V)6v2*RAZPkHQ`7V@! zpc;k2nPmDu!siX9y8Qay!<>|3;UZK4fz^!ax!)%A9=MlGCUtHlc5JpyylW(1HVyB! zj~#bRpHz>m`!}uyG_AuvLDPbHulBbvfCGMg;NS{AHulx~O!J?%Ym2&5wH$^+^QBJy zs#EEnW67>n-lj{%v0cGROy8%Bk#||6AAB0t-K&?~z>_3@0d!)}RWt*G!8#bDo=qP8 z1UT6`{&t4OgslF?;f$zUb!BZXHdyh@RJDI=41V24^=Ab7IY#~b_J3P|`m103TSoeI z*#x|U%nX%)XMgol)WpKq**!+xEZZxxuVeBqUd*RPost(q3D80M{Lq|R8Coxw^_P;Egz2F$8r!X!Wz?D+y;8m(N0LEfTK!7@0O zJLOMhL0f$CV^QZ$Liuz@-xe4$)c5^bLBE9kQ3C#63~Yx%@Rl3|6BMEa_9>hkrr=rt zZFd}A6Z|%@tZFzmb$Ae5Q#f$uXjspOQe$P;NAcP~!XWrEQr)bMH1os2#7D=>84;T@ z{gh3`uo;-C5e;3u>qHcE91;nbz3(`3%Xavw7oFF9K*)XSuEm6M#OVX;E{og~nBaD< z+4Ki)HftUh1-|luJ$*9|ok#B5QrWdTpF2-NymW1g?EMlt_}vYQV#$!{2af%Gdi}h* zeJ|~2Uf9y_8*&e$jLKQTxd$!$9dFPOdmG91U}fW_#- zF9>o_;K>1_5UdyhBMgDY%CfR6LtzN&DFQ|U2bu&HP*sV6hYUB51%k7~bGr-66ug!% zX20o$=X1O9z@7V!(=Cw@e&GNi$&gn{v93N%PM-C71=ID7+Z|0?!+mEo;`toq-2(X% zVu^IRJbE@caJoQ#+taj}pE_Jsx#rN3n>KotPHYa!f<7*TEKFcB8oumuUfRpF#n?Y45-xG}uK zT!wk!9`KprRgCzi?drxE;@I&VX_eML-(J-bykW`Y$QZeK63Nd0S`^;d`H zFL(dWJMg!7#Y*6i5SKPI^>X!$lTeQdO&No8Q+5*rz{;(1-LdM}09Yvy{WiXFs6K<5 z-7JZc*!#AEdJT~>_|Cat4(fNOCg#}+>iw7g!=K8yLj?T zNW;2gEeHaaVNi={e_eEBUVIFn9LUFD1Vb}p0o+tzXbV&~+IcJ1mD`|`_pM@hS1eVH zT{Y1^mvrxCH?6`7S8$Js&Dp#!63O=>9eq0j%V`hWVF0f;1`b8{{|I;mmI6=QhUKFc?^%oiWIeZ;g1DnQ z^xA$_E9&5Z*|3z)h+*;y6dkEUS7BYps*zo-v|kx`*7Dx>MswQ&xs77cB0!0Ul1AYr z0J2cXW6-xlg$Nc{K)i$U6AzX$AX-4A@F*EbDcRVKVULgC<0u%P6cCCCns3UKuD4*!0H`Ak6vm-i9oIA>zpsGwc)Tr%nAlW4BH!T1{iH=o4c(AMM4SO(A1s;sH75h3_tH3-c$I-#r8~#W8niIe)=r*dPEouBQi?)RW#=i5ZTrn%& zhR&c{>pL*YR!EvRuRMiDHjLqe^$-X|l@n+%BX3-}=g@W~6*j1wIqQ`(<5#fIG<@Ai zyeeqf$Z1#^96g{ST!65%nA%}cw-D&kLgd2 z)_`6Z8^IEfHN&$Qvt!LMz!Ia>5xfDLfZff<2{^uhm(np+EpHoWpG<=4oO5>-y@?_| zQ@6~!u^M$x+{W+Pj>|_L@EZ?``Z8ofS44bgMg5kZxJ=$K>wM`=OP~E;aCW}$)B>XG zX!5^kXKaauP4if^NQCX)bE0z_kKDGQaha5Z&2lX1d(*tRo2Je8ZMyE6k=RsP*yWq= z8;;!7Cq6JDJ+`HAsJGlUu95Z|&8Pj4LcDg&9XE{aDQ>^yedbQ!w!Hh;2ZL3H?j8y& zg~myL(_i6GPYIakIE*YFD~F(kVTuqKcu-!U5qTV_Jy{HRcpcE3E*v+(^u|I?xAdi4 zkhx1mANi0xeYH4vxHfveGPuVW*xiCXGJR{C!&^I}yX!-18^rb1p;d@2(#AS*b#r8O zV|ZnCU}Jq~Yh_?(d-Rw=++P_!V2}^zi9568gSoN8aq9c}y5(C!UV=}3pGoEMKZ+5Q zh_wkC9UnO!8#?G5J}Iu7_pCcK%bu5yU$m&WR8CxUYIqMuc{1^^CvIOkW)ehD%r>!C zw?;D4{m&qG9ma5gwu0dZ-K?qTuJaUF!Cbom@+YGVvUMRH@B~(jfuVg4@dA_#F%8SQ zNfd~H>dlb)-MWFTHu6![@>uz>o5eHP8O3??^8u(eq=c|s{=+N0|O4DSO=CLd3R z0zoZvP9~meQ-5Gly#uE4k|A9>r3}-$9p$(|!<l@(KUI+APCr|38(j#-nGHMn_hStZ&_9g~sb%phQuKtP=O1xbBK*Id_Fa-9BnPvTg zSATv#{=m8YaygkN-T^Z0dW9?1**f?@_A+SiErbt|UA1}<0) zIR=6#?dXo^?t|3+%{=lEI4EQlnu8meD zbB5XDv0bO`B@1A}29A-^QB?7;QSd=}5jb+kxf%2WGT|g4mu9ixL0~FGqsh-h24PjD zdNNJhx5YViyu9G)%eZB_8tKjk@_T4$B*YfmQV=HLxXTs;|+?C`1v> z0;+6nX2%NA07EBeaxvLv79$qK0FCIgVax!pnEsjUCKzrD1nbPg>3#o2Kw80O%k-Cw zwyozD4a&YFvY|`D9^;Q)sbHZXU`}G!?cvbr!m2j2C{sqUS8jE+ix80I%2$2OtoYHZG%K>Bw<*!xE?JEof!|SlzYi5YX>OBr33y zwaDvoEob++D+2T?|Ml4 z{bNV;uB~O_@#@e%K-SLa{@UOs;MMBD+Dboz8G|bj+oPMSgN$_|V|8$8gSfp-+FKpm z1;|<>9W4*-F~MqZi#D`1F}OKOdPAG|I7)fN3w*D$$6jqqscCLBs+a?!I5prsM?9r^10sd(tFpL8gBKTB*-=j#_ z&;#d6`IsTC$iBGVH-J|bsbr0~KHK6MxkxftsJZ5hWe=UFb?rE%4cHYk3{ofbBL9E( z-aD?z1Z@`%9Ta6lJy&4d**$yq-Tl7r&v*FUzvLkaDvx=t+~vBji*)g^Ft=V>LG90LmO~Ef zdZFTQVEK{zM5`z&)EE$G_;0*P+!oS;#y)CN=x=NcXEBH{?CMapJq zS}TZ;Ba-c{9KKq*#?08lkYN0Ca`iJ_;STZZ*FQc3pYdw?mD8tfw)vdR8@9T-`vqJN zcMiynE$l88y)Ws07hEzL-k@)QLk>v4TvMRFSv?$B)*n$Je?l5f=S>!Lzm1`Nx>+^u zk)aE&{>H2NDOQ+mGlsls-p_1C2i88jS~YgHS_g-btoGkWHox$#d1aj_bW!cT6jjS=U;6-l3NEPEX zhyP=8nrPeJWb=7fOf4=EjNH+rLg{B}VLf~9X$!OC=BCGHx>$=BIhvUsTe`x{a-OZ( zto^g+9!3(fY>EB6`PetvWMqD9;W8%^OSeTU{Y>V$c=%OPMDJVLU&mKZUXJg)ocHR` z&Gxld`G+Dkr~&tc^{qU|+ICHHJbYl^P5Hi1IW%DwxHs$!6$LhYf3x+su#7)=Pr5az z<8;DEaQz>gQYKu}-+y_Lw=Gz{C9rpMFlT!RKaBP%Rr&%*X{ahKO`~HD46ug~NTM{%k$(1=iZ-NSj%ry? zHJrXamQu?eR5J&3^brkNH_RB&QSl>+QJzLhma3Sl-nN$t;Tsz9MQW13#W|_IZnRx6 z$z~4MalT2f(gc)0J)0su8YjZrz_av~UE1Jv(sy2!&u=z;@+q0bMl*;m5Gh3x?q4zL zQ!*G>slDAe8d{@{Y#vHsOq7T|rE$NxRi?O_-+Qe<2KlMr>QOZM3Pe9)QR{Yv8jE9a z2e^?hMumva+#3GN@{W&CX$vL452~9&Gb*s|CCI4$_1}0^y*U&kj^O`0-l*8A@v55g zs(OKv@Mh}=`~xl*>fkWqTLt@@!Qh(ytL3WPo}ZF=?;cX$1Xt+Lg$t>D=7r{JjxwxF z9a`EKmfMj(?(>umFuKBmL^`bWWwmD?N1midO#^ zs-|D@w|He?I(z4~-RC^7_y^qGdnUp^vZ1i!&11^Yr8LFavV5T-5W}~Pm7Iv|+HkWGpG~_Xy4PN3Zn#d?+ppgyZol4mB9`Hn z*{uhw%-#c0?T4Z}565)j7Hfu}C_^`LTR0o;-aGHo_uS*4vA;IB`Ky42O+Lj~#qy6L zM&xu?5c>gH`Atu$qTf=PA6BpRUa*(#mS1GeKGS4!tctL&$kL`3giqrWr3+k|AhxjTGW}3QPYCgMXtOUp*Jx>9 zJ>RK*y+3EUN9*DHgPX4PAUCr(-89#^+~ic=p$9CVvXPzF+h?CHH9Amku&>nOK&9#4 zGRp&1ge`f5E$K^an>JpoL!3>ZMK%v-v`%J|Uu-@YX0*V`$ly4FV1RWSJ?9FLWk}eJ zFfd$CFj$9W9Q{5HRt3RrFxYKivY%jdbomz^E7$lgTje!(ncJnSnVsA?oyNTrli9iopuEGG{Dveb+bDOrqA;x#NC zzzQ)yQTL-rB=z)>#Tt$Vc-2N6>|%@yx!<<)zT{@fJ`FKTmydjbNL$zk_^=8{>{@(DG zZMSOOGukmQ3U3;@-#qG_(`z5YI&znM{2uM-t(N0=h-afHZjt0`iL{$(+_Kg_deyaLRG{^5t+wK;sH{^>YUXIAvt`D_;FmU^U(Ho53q!y}pdr!@R*<^95Vi z?{M?D{3N}ItoW(C?WKDP?QAjyUPZ9zI+h@YNSgcOF6@&&&XiF&KZrWM74qJu*Qxv? z>+o^u5Z`euQFT12&+2jKj&SOk{AYWkrPfJuhs*(R<4-4aB((nsk!=@9qD6DztB$vd z%@Y+Gn~o`({r3d><9m)gmhFfX9(*K0M+-8!$D%u-K6E2To=kcT1xs?r>%!I!YR`y& z7~N>GyNShF1WaKF1~!nDGb9{0CY&}i1p8VqF$cWDf*ZDa0aGXp5yk|VDd5HH2!`uH zOwub781FVjlZS8&2ml%+V)mlTenCtSP_af4kt=n(QT>%`$$F1U$m=b;M6^6xJO6wm zU}~X5^D-yayi+7d885%c`05JNtK!qX&@M}dlG!J#7T7n;J>I(1mSKLl46)L!8GF+^ z0z2m0*Q~j~a87y_*!pSl#R@~4GBf*XgTpl@#~bDyYcSngZn>{=_TGy1ZuAwW8!tUl zKcW6>v+_Td9lc|)(1~Dv(s1@EfR6>?z-&FOeKXbo35FYt%<%7DXGBoK1M&>t#f2jc+X1KY{NM*KU2E1$92#v|hYn z_C$)1Xyg~Dpizqyv=1#7PdXl<2>_v!f=jixR}ho zQ7nBzeOcQ5+ki5~#jFmiaJqA1=ZOfGJG9)>c;4CVMZ(t=q7PZLDTpCEMlep^X~kcs z=WeCQ4@dH`ZsVAxI~XT9mZZR{_0a?o=92p#3XeVNv3@Mo16mXxYs=@8#ZmR+8Jurp zT3>mm_MCkpIq`sfB3fwoNaXxTcqvPEC$~GIRNhD*Z4-YKwm;(w#@Ss{WsQ=1_mUqx zNWB&my!XIC^LZ8oGkrD%TKhCkVHpQ`mJzPOztU*@@relPkvcs0v-&i0MF?42$= zO3tnAd{@MJ7FZ?xnS+O8CD)oi0nN^4 z4?CsxpUUcYD|>b#U2UD#hX*m8anBoq08vPuGL!kSxorx@0j(VabzJ4HlL_ z-0@83xB{OEpi4D3wIwip_3oEE9u zgYg-LXuzv!mGV>Ovz!)v5xjYKY~w0FX;*g_Qs2CyRY^vb8grj z)UhkL>u{+2@Lk2Oplrv|GC*YVfmJ8#!Fm{EKd{6tbtc%gnjx2K*OyDCSZrI2UyKA0V8w+fw11vY?m=% z6T$F+iN$e%)rvJ2&-&)Fx_;Bdm>_Xqz!)9D;py1ifj0Kj_O@rF`u@5yS!FhpS|jeE z4@g=1+7O}T=zu@KDEK4K;MLDw$qZE=T?w$#Qq^e4YZzL*05}H2cZ7nfmQ(t4oMAP+ z9~l~=pRS(4D=~eT#h+-U4Mdj@-p!Gt$hw%Nf($Ym=_f&Dd7?dAIB_x=GFC$fNPnDq zqJzXShRgRFhZCU&+4k~bl?>Fo6q4>$P<-2Nt)JC#s35MCs`maDv)qW~-3F-r;IEL57V`J=!qhn(S)shYDz z@OT}vO;@?(4?1RR&*b!j?ciHB7FaZRzwuQn^TWf2iSXL-paS)!Y*-K~F60eB@D^=~ z;ELf~=F3vS2O{SgmH&dx83taZ6|$qBG^M3g+`1Ki(c9;%wd;V&a6ME=gfT9nj^>lJH@~LymjxKYHiF=8OgLd`XoGSOg5)r$f=v~8><9=nAqdE$ zpjd7KONIT@YjhAxK>>x;6)ei_CLj+n$3Dwxf+2QEJj^XG!(0{O#%oTe-z%O#r=?l& zF}F#Y(?|H`9uk$vVm5Bj20HFK@%4EGexv1^`ns^P0k4Yu)$c-Dt4enpFI z8&*0IG4h*xvSHD&s@eOB2s_dZ_hb`})R>)YUg8Qm7JvDrilFBAM?NWGAZAq`U_G^~DoD~#T!q$uzdhK%TR^^%lw-eebbsIYZ3Bmu$* ze4B?1*peQL?ZTS``_B6!`OuHTXxJ)Rcp#K@GNuz5)RpXxbdoBUF%VxP3e97c2;bbu z;$2H+-OLe0)N4~%&yiW#Mw3p(beu_&fTo48jisMW72eFC6>-N3DTA4fDxYl8nOORX z#14dQ6#rBN53(WqquPF--fY=1b{q4{D_e zByD7E?~VL6xObh2qPZltTZdD<(>Ry2_%RvG;-)@Ey^>GTb}x<7JR<7~!LYS$n3*~V?R$(g$@bjgZaa~1^5 zvB0p;dX|MXnpCD{XXea3hiyTS+u`-}IfqRx_5-YD>&2a*1H9K{ zu8rCJ(+ieD$M4dnZSkA8C#>F`x6P{h=;g*Uci7~vA6nbLZ4``A#jk2)KelN9B~SXN z82WE7=X~7i&9k~Qa3Dyr-mml6gJJ6^v2XEsDc}BjriNr_HS3XF;xEG@^9^(x6xBCm&M2^~uqCmOb;U zdvm@(=UF&-E~7WT?We~be}r*~SCKZP`9(<6L_qaWy6}BY_jg6zZ;D0V# zXBZErnb>VV6VG#u<9cUxtWv=?T5afDt6=jzAj|G*MKJ1Vcvx!PXF~I#`#pIETE2VB&5#>mtG6 z0>K=ze%I!H@nGGt{6*UmFI+2UcK(jc9BQU$10q{5hE$%o)3MW+d?0La-Wkd)2coe} zgQZ;^V&27ujdz7!#mZ>j$HguUbM31LHjM~NM>^qPmC=C;gvEg-vwaN<4^igqZ6WL{ zG(KLn&PQM!ISfGtlSAbu`>IU$SI@R;AnYodW1YXksrpK6PU$^%;4kZ zp>)bPTnobr#J97!;RWsYip0U`Z2>VY*sUlo>1=7$(#aYwbBM~)k?2}h`*2|u?{;{` zqm=3gk&iq)FK^tubM~A?04x2LAeL}GUuB=KzW?qh^w0nPpU>Fm`_E?*_w(k?-@W@# zKtM<}Lq=@ZJ)%!VwTvJ^x>`3GLV0tpK$S)8s}@cIti-IL9`+dUiqi8sv4nrCZV+NA zAuXTIq^KaUfVIJ(*6)Ie-@{JAyL9+Y{rI&K?Trdes^Hr@O%u=rzFz+Z-q1dU!{^df z&e_nyQn^=-x|Ha`n%^Vig1kSBGViy(xKTBnTP<&ef>7I=F5x@>P&V*t>B_MAi(&ca zMlg3Zw6I#R+-2?@kiCyv8avD}ahzr0VqxxVXo8`?HH<+4Stf>{V;zRP08Cyi=U<$+ z$lJu?oW&f^#jAq8+;C^@)~KbcZ|yjcdBmpF{yfd&ig2HE{o!*h;R!re*YCOQQ*6OA zO81Y^*E;vn`f2wuyNyc(p&Yp{X+udcmZz?xm?OAh)x7M3~B77Lh*oO0+yDrPu zU1(qHDLi&ZWE-grcr32(`JeT)mtk>?ZHHnPuDK=a z&kB%*ZvkcKVu7p$Iu>FEweUFN&v-T62h-|HLi!*ei^iF%Y0~C*d>2-!#@-h8Ae;&Y zv8)HalYirsN4f}h9=A&sS#9qty1xfr70@S>>$DY|=TLzz7rcn6=qc!YRipg=US0p~ zN>y0(_^qOTI%^S;QJoB0UW$5P=VKw_(z+c;b5PHzCd6 zUMd{FR5;~V_ByEc6+SVs$r#J}biGu0zi}k2N}0@W1?`y67a9(J{rcz6z-OHLeE<10;(pHD`5QLvx_sqE1yusPN~Dfo&S>+` zQ`{)mdF4xCp_N}PVt2oiFmy`Z(_Yq7CGQ!FH(uYYjA|ObTiJ)5(2H3Ekllk)D0DeI ziYMTf3pL}5nZ1E!gV#$nY5ebls|URErT*pPp1IhsAMh<1gLKTb>Nn1LI=hTM-}2}1 z0l(b}J5)_@nFfX?HBCwiYn01^B(R9hy9$#eR(yS8xY%ejZhbk93>2WaEVn zh{h~&psYT}ooz+6w5F}|60i4`EVL!<4N`sO#$D^qpLL{ml?!{T7uxl#%W+*5f`22m zy@|_cJ7Akhn0*evCPts&f1+78Z7+CG-^DW84fxW>w3_iuo{4@PvdZ<_;t-|$|E%f$ zQ+n<1tUXD)-I#mMvR0p_nrtn!4w7zirCz^X-YNb;!c;1F+J3H9#n3mVhS=z$BO}r( zF)lLz|tYV(gzcGHHZgQjD9&o z4T#e+`*j@PRlkZe%;Zm&)k@=9nz~RjhU(Zor}uoG{6>j5yiT3Pdy&e#+_kCban(Tn^7amV2eC{mX`2Q^i3@gvynV z>r@r|SB>HyGD)LhSedEnN1+GPH(=wn+DYqFk$>w;km1ozKcB7g$WkUS-pA42VudG# zI99`+Xo5f`XS9~0t!?S6Y>?-abrsk4*0m~HXj&d`qO0pQk1;IdjEURFMS`dN_5p;T zcOs>r^+7^GQdVtZeD*c}yIZ#Go;!ERbaNdIb^RCG>*YpJ!bbDopFQj(+m#WSrakI+WX~Id6nY+kpVT-z( zqGNK$Dr&?xihIGqc1e=CB`W|{_GuF68$goXAz7+dUr*`)WO+VmkE6c!EtI)F;X9|u zjy~YJq$+J44v&?1&@Wf&pD)WUFC8f$Ua{FsY?^{?uGWow@3xCVuf6Eno*U>h`rVaB* zsxHE!ge4E+${M^kZsLJoZL0{vgkM&-{uP?N%_oZ&|qm}jil+AmW(DKPTn7q!5 zz4|-4{;tB`mT&qT-y=BG+E5NogJ3?G=nr(QfjN76* zcIl;Kz;B0n#D2Ylv+2dN7l~JsDqkoOjNRoL2JO;W?M5dX-EdRZNLpq`=wSW!8{bovk* zLsjlLmp;_N9qQx_(^>MoLSkHcO;mC@@G9_blArg@ZJQ5SS}rm$Fb7`gAIpg$&Jk5X$T0{W0dFhyewFxf+4b$vm_BD*B`;0(a>(ygE$`ITel0PxB+L*^^bga$zq7SZrbhSTDt54y<$Fe`J%|gTPoByRME&3fEMPd$QnWj(zK7~82%8eJ@H8*pzob85&m8r>5a1|EJL+*6K$imjZ97B8?lz{}pW5&kL zmX_x&7hW_!dFiPY;#rruVqt_D)XdzwJx4I7mGmhQnfhgE4 z{S8s@O)cZuxf>K0NU)x2*y2iCe2Tcvoj>2YalwhEl@2Y-?V6TZkrp3qS#gTI*s6Jz zJq@w+IPnV`+Wf<|l*4m>MKPGwcPl$MvJVX|%y^Al7XpRDJ6Si5Ai=1+z~+ zjaO2-TE^4@xD-r)637gCbV5#rqH^XKh=(K%T`wHySjs`R9_8>;nEMyi$^#1Je%U=2 zGNH#Z?3JoKm(b&z)*aP2k>CC%Px$%~?L|-_szNzbxUXlh3b>QGwEhgD3O;U+iT!>B zGVff8d$#;W*Ai;me4R#*!D4-_ZC8V_)J6&f3ZO8k)whNpGW?%N1+a! z9B5vh&60R$N`10=FQo`Wt98LSLinUSs_06p5>>UzN!($0Z}Hgu0*bPWsg<&{J@h_t zTVD@PrR3=FD|ga|CEN)nZ>X@07xSbbA-yCcuQVnx?aGy#R#x`wRiT34*;*ESnTL zvaI6~9nMes&OPS)WQz-mMGW>-d-osr9}Y8J5=NMNbM`D(>@TBX1rEau7u3KETuN&K z*rC%Nd4MbgP_ zsh%}O5`shf#?G(qixag7;MGb;y7Asp)BWYM50?_QrkiXl1v)J~(Q3G@aMr#G^F3uo zTZ%3B*33K9vhoyb{^811cEsIIc^OR~N&FXxSu4HgtnxE7JwY(WGR{E*g1&!+emfv* zdUJ3qkZMMa0Y*7ck0BWECcsO=)Y)X7Ct+iR@va2pRgcZTP6b{e2rH82Z7*JWB>n7t zNjvkYkTD9pLKht^bS+y8`T=$ZXR@Z5U1kwUqhO67(L%ZPTrN0O#5EvZrjUW}}a+3_Z`q{}x;V6;_eo*_vYrs1Wzt_gsMfeewK_gx+dQP4iWiy(b4YGK5zDp? zC0Pcg)n^L_oHKQ2()*n=l<*4o%u#z6>Yz)5 zt;5W&Z=sgvS2E97ITXQHc@i>P&F5tc* zH4k2i;=2Sk?GI|-b%pnpd)pER>iRPsvv)VFIM}fFY{!y=^DMVM)~B1SOjy37VBy+=wR;<^JR9$4j!Ws! zCA6tN_OO(qk+U>1rn;A*l(YJjoPHe7WE8kg@w=n(t`CL+eRxd$&`wve`_Y?HuyJzK z-Bh`tr3c5o4E;)2QRvk$+G(bSp=e zPI*%x{63re;cm^qwE`*LCl@k$?v!g0IsDg%jP@6yb-j?jzg7xr=eu}0&v5h49(=~B z&-cIloc??+ShV7VjYCLOS~FV$1Ez~H)feJ?cFYL_h8AI>@w&U8$IgCX1Pu`rrC zaXyu670EdmN`*cH7=t@*@(+gh?0g{Dc8_-|WAN}J1&nF71k!E8n?P92E) zCTN4T9aELggH#-1j-QcK&nYEDtwgO>Ee8>cId;%O{91I9{FdVd4cxBP{J6_?O zcF|8n+KVpgh=~4FN>pI+4QT-K0pOL2qSqNv(FRqlQ7L7hk2r(?Sg9!b(Y(HU%+e3~ z_3auxt!R2D1$7Nc&R~wzH^_6D&*5_JkEaOZirtysHo804o{uB@!o;dt$1hha&Hx z^mdaZ5}Hy(mWin1a5=4RU#vad=Dd;_YBrWiYPJUWhDot!2ypb*RNMN}*F4)`&9clo_iK2q)DB| z97|<9^?B0i^|;+NRqB-71K$VdY&irIpayv+Red5(Y#qr5Wcg=`19D}T5}6@|l8pL3 zNPvQo&TD(x!|d;(sYQ%|4vL!GAf+|S8=86xinvuxl2(S6Op-J;cG4T#+sG18+bD;u z%FHHSzxm{(wd2a=Yb`A;^^)xRMH^gD`mY(Jnz{WmUIEFb!RlAMnmI}TA8!9oyfQMy z_|<6sf+a_fowyyDOycx3iCz@awb8Z1vGt=#wZoajDK6&)qD%0qzN)vOyr;M0%}hPT zZ2!v1<(lW$8eU&49>o#_Sb~9-gSp}#;uw=~9Ef4+ zSMmc}KH`-(TEB(bl}phee08rieY{8cF^v2}bkhi?-u0wO8t(&N{HJ4fnaejMELj^n zZ;_wnd~XA|-WZ;NG@m(gEdz%+7H8)!4Vb??X!i0uD>lZ$rEA~eC*?&-Y4`8Mj0qX% z`7mchP0yQ4H%*w)8XlG&ChBksxwQnS&5?LLsB?z%W%<;6*zc zO=;j2QY=jThdKQU{-~5Qn3O|rW)0T#{wX-S?@EH~egUT2?-|_Z5~>CRwQkmkgg1`u zY|k5&XTsY(Vx@ZnB-qf|bwRq`NwDv#c7;7>!};#7Tm@gBhPvyL zBq;f*%dKvX?0>Wfep5<(H~(w@rC<2XS$H0NQG;oRQ&?`zsYTbAw?+2$$Wd!ec{zXFpWltZG zUL;Xom5Se$N!}OoUX=>phSZG)Rt!8Ky}i@$+&{HFvSu)@aX6w%b2~>ITdj-E>ddYk zNXg^Wk~C~+4+`I)ch|`t7qN#r83SGXiO#lh8s|Aj_zgw;Q#s>B4skS}GF~HmTgrZ3 zD|iE2ZINKKt8G|Fm-h+>)AQ=ioV&Vh`)+fKInywN;h%}#r3>>wz5asUOJWAE{(M#=`Eug}Q#=VyOC_$SW5|A|*K_>cdB0|$>@35m)nYp!e?y`9#2yFh*=rTuCGC$dP1 z$-aR9hR=SM7~2$fJr{U|OB?+k66aNNPDcP*eoypBnco( z#!-tI3dleKveXngqL({_BBGTuoS02>i{M;I?RC6Pce%yRF6aPWVHSo)J@5*Hi6;K1 z%o?3Tm|&w@DYTA__ZKZV)I9%Sli{u^%Ofqud#lY3)XlSMG~QcA*pO#&u-uib_?Rk>dFwwyMuB7#?!M=vAj@hvl&%5|z0`?FZ=K3{f zUVjHw))BPw}}K{mC&xKfr?&>5aCxRu1Zlg7K1!g*LELWF0v#T0cjNpcQV zCE{wj*nLUq<)_YguUilQSx8!;#>1sFUF+dqpI`loSN{b3{J(g~FF60pk^V%3i)(Cd zX0d7GX5Xu~({svOI!8;WGAOh^ZW+jJ8Ah-K`$FICAy3lJ-Fnzn{#T zYM_mTR1V*+9`z}oa7i7xSf8k2$8ec$W%T6SD62Sj!zmCO`v0Xc#0SHE&GL z8SP~a1CEeH$$5jloB;)=51;;8u3E)Z;6TPwssx%|jzU3~_VfCb3^@WV8e|cDOmt>6 zSonq5rkJ6|@CfZYL~YM+Ze@1{WNJ^}qQ{qX5_{eY7~>u6$zJA|h%(f}d*02NWOuwT zty7;5XI_qLx4A7|?O1c@hGMxRan6aRFI?I4Pc*?9$Lv7mHg6I7S7^oWcPE~_%uOyE zY7+d8DgXC12Sb*v@+O#`f~O<9QkJUS#FCcP$5>f|{0b)1^4P*=Yhk2!4O0>xbiI$KJPpY2yxuSjAxEF8r!dTgbC6&8 z)Xm!G*UFv-SB(W$z-D3y8JAs(%&&UtY~ip=p6)_nzfak4H060#*KZ!vpTXchiZ~ir zEV)&$38_=ZR>~4;lm%toc_p1p?gUTxqC@na-|>b;9g=i?BSac09AmdlA~?b~Y{6@? z;C&r^Dx+~cwQe-A^-Wmm(4DHW2aPYhvU|Z*zERPCr9l3uZs>92Xgg;R9EMJoLP+n; zsV2Mng?znjD`A#}F#%Z>xK$>InVbq4mOiGx{(Mo+tmI68J9EwH4}UrO^Xq;+_`jTi zUr_3oBmK+pL1AoYV6^6|uiei3Ka5W&iN^CMQXHMy=qfwn6c_Y|d#wH*HI!>i3uGI{=W^@OZ ziQ}RCP&s_3Y3f8$FJy?EGly)G)llt&{=@0G-ivu-zQsd6MT3E<+{8v*UbU7Y_}JF- zr!`w|Z`c{V=*#OyMkn<)=q6C%I|IdIFt0#XU$De)-l`i**4^D>9n0+c_a5PEE^QQG zg@riaRWC^mypmA+0ajAxkeoAuoUolF6JwN*Q9Dxsu##bhHH}?z%!Al~sa`EtrDm&u zS7;;a`_D)l!0TqIA*+JPQ7^ln&l=^>25Uq=rjf?|o+vIok_5#!)d^m7!E&1RR6-wB z^Ir&Pqn)e?D(@8_E1~)sAnW+`&fPxPsD1jS3w3vZV#B4*8N6C*OI~oI8O`?PHl!U+ z_13;@d!Ldz?vM1|f8FaCw`j!$nElPTbWMZRCPSl5#wJ^USH{Mh;YY8hU>R?OS`OBB z2>OL?Co|LY>o(`lp8wEzMTFUx56w2G8gEEmZ`HWnj$-4INoo6iCu0cAc0dhSQk^Vy z7hA)m^+Cm#MjqsICmZSq3i3tX{#j|+!mK<#AdABoW>R%XEYa}6sT0wWP^r=5(ietc zM4-io?VA~-no(?Eg7Bc}ruTCir8pZs)M4Nii#AcroJgvc`(?KIX7DcLOU`9=x#TDv z(xq6AxKuQDK0^s-2MGQ{8OAle7m|H$x&5#pan2pMSn=$1V&}!8fonx_?9QjMUp!$> zWwd`t=Dv>Syhz}_EM!j=uqIjj=j}c3xq{~`-ZKX08Bh31$bH6VkMrr8cGduyK1^qi zHIjx(tL14Wy(vYKyJ=k!xxLqOR6$t^-%R!Fl{I(r@=y5j7(>;e)-Xo@sC>cuBaorTHj6K5T zjdpZSab-VL(MFr7FPdpDsWpn`(jIno8|oJw3!N)D+AJtueohajJHsmds7r+cmVLxe9KVYVTEWFS!$v{w&o-G!54YnB6ClCn_0F%c#R-ikiXH0fbSE^QdEOwDAV^%QE6C-5{pV-bJd5`Es{Bg-ebMBSrT@jSK#+l0mn0<@p?~cfp8#f;hQSo>HwOl6yJ4 zfi}T#ZGC5EKIL*?g54>*B@37Qd~q3>5sb{t2*#$!yTA9E zUmyQ`27WnPzZ~hG(|?EaY+*iY?fM;9gSwMg9-G_xFoRLYddg-$$5KpdllVr^)WU z31bim6;#wpO8K6_xz``odtEK^2`CYBrrN>0qRG)8R*|Lh)}9%)0SvZ~9%!jhBmnPG zC8sLX+A^}r9|T72gk+yywGSStgiUzR z5XyvRTcL;rk(v2RPXeqKesRNWX`Io*hbC(?39C}(Z_C?xhJHUuTTA;l0c(=ad?sb- zy20)s$);*knMB3$B+aJVe49*}L%w={G;QboR);4&eifsK zBDkODDNleE(Rc>)~k3_c9lXeKm0I!b3ur~zP?Fu8?BzD>+i=c4j^rY7# zQ)?IBli8rH7kmS-VzM>dwm}RBkDv0xJKx>SebvfUps`Q4ugt(*G|{(IkYs^prN^u3 zCq7?ue|`Vg*WF(~_v?3m{|x-)dBYa@G%44}(8z4z;xG3du)1?MCMC5nzlcs__H|N* z!Cxw@?ssrc4!rd!G&0l4)y>wyG4NVML0)4{jVLIh)IUdcGL&Ky(RHP05@yXuqWRVd z-L_A9PsfY51hk$@mAE|ae$0J;F}=ehxzi=S?NAiYI-&D;f^26P|Lg0N(;3>6k7Q?a zM^1;fTrX5HT1TLM$z=a{!Y09T@m1{o84|FNa-0CVg25RxQ*R4%U&1^;v*p3ZZSPaL zZ@Q`4E{XS7fX7|wmK|r+R!fl?C|FVZM1}P_~luM~{ zB}*-5$`KkiiarHcqiVJqaD<+@rcEPb$WRYX6OB~*`4@I|X{+_>M>K=~t;_rF>M-`8_K zG_`+M&;J-xuJVZ{&pQ%1_i)6v%j7j4wM!k!7u%JZ?|$f$tgh<(mvi^1vlm<rJJvaG*}!xZ*7|4 z#+1c}%Wj0yiHsiolxDVVYa>OXj66z)zDH#yI#u}9bk>k6oY7jNd-e~>_2dszsoEY zViy45*3QxS#xeZjnXpL4#+K8gF3=K=hm(%oBf6x@k;ytM*cAE}D6^`it%4UY*8uOOl_+m&mhQ8@dEP(6+c$9S`t5{i z1qKs>F(moGzxwl9^Jl#J%PVZ=`0rnhzdrMi&cI)t&FNhy{ZDa_`rS-bVJ|E=UF z`DK+ne!HH$gea{ax))2k^C10_|NVUj53Sp{$<^6EJ+-2wMUh$AiNZg$X5wPzkWcPY z`_x|ViZPdL&Dp$x3wgu0TRx$E3K|32q!7aL&r_l^?~o?*EFN;pA3IwxZkILSQ9gCP za2x@iOi;d}gY&AL{gN;IqmN(37wf_RS&J8(wX|?BG;*Fb`~3WQ0gDy}@3783>Riz! z`#n?e9&)}=$kfuH(WC><6D(_X`^TJ;UcV@=ZzRViL}VY@d+|wFJuwpVFQjBcEM#ALVLA{YYHPK(ZdE)k z>SRm5V~M^a3*MGeb?G&d%J!cg6!j6lxc;?u=CW-MELH`t-xa-fN7VKMiO!yNK~dD( z37m|&K|oeZ?;ps@f2&pfDZ1&^&8iQ_?zV6CrmQ{Re9*tu@t&}z``^k0zgx5M&azd3 zW^>LM&$8D`vK#C+owdinWIF`p~3}Z>60tiM(F=@mHhTmPTOEJ_rqSB2zWh1Y-ia*Pje%? zxhD3DW;q+1onN-{`ih-#TdcFu`5`kW+Ib2<)_~wC=nzOd)wE&s+Y#*yRR^>0W)RWe zrzSRyjBQioV?DyBVfoSr#fqSc=l(@w7c!N;`TZevPoo*{!pNWO6MG;e3+F-SJk9yC z5vS}y@2Xe$r1L5t4{Z7d{v&Ypx=sH6e6HF(TLtIApsFE!@ZGF^=8>%nta*K{Y8aM7 znU(S;?n^Y&&{6|fA&9K0{0doQ^;l4rJe2tEa_NYDia4n0CG5h_(U^T!QYvYefq^})3;yo^>U%3{t zYtIpr*>kWb2(SWVO|RhKlG9&RpX%7K!o{{5W?&$=ph>rTnG>jH9lr! zaTZ~=@N6CBBcC(Mrt3iC9N-N>k{6^<7JaylGwyMZv2gd@Wv7c*J5?F%&HCDd>UEFY z)cFS?NdZ3dj9Mo21oY}mWDPo0Gn0BTRo2lW5>d7KAnTJWWNsa#z7DE_Pn6=7s0~Hz zfp%J7ZjIuY(}UHA6D>F1O|N>r0JFb6(2$uXg>C^-!OB^mVj1EVWQJXOyfQs$Xk=x)^s>Bg8jtL|;IExMESEU$K`j`60OrVtV(5{e25QaiB^!D8r0tx87c_ZCa-%@&*^ zm}7a|3L@}esDj+3m&7+dX}ZXL-R{uR;yx<*C6^>^qsTa|;x=+GwpXxl$0sWgOy299 zLeac6;q$+~e>R|~m^j|VnaZq?+J&~dJ!GDY;6qV%PjHh}IMXe?=RWQ2rl6*S4>-H- zvUl8OetE6wXrg4#UEYom7DOBH##rcC0_jm?SuoPwcB2{2&c3BOEDr*CkOgfIWm+YQ zPenrZlOJ%evVl1v=M43-bYk8}4|lkfJ`og0g#Oiu`?R&!8aCe`9*J*Xb+u+qK+{q9 zI4AZVf7rPenJ-}A@N`q9VSkJ#LS zh&Nnx@iBL-UgQ2UUj!mp&rrbMVa(^CLMz3eD1`7^99+IkM0Qr_V;_&o~PN| z*Mz2lDD*!;^~8h=^&m9H(Rjg<4j@R))JvmiIYSygHd|HTl|eJ7kEcV(I3ozOVq|Ul z#yg^iqeE~c-<=Q0-tAO)!n?uga{V^zq=FV5sp|u&=Le$b`>>?0SzlZ+c-0%UypsY3|xvE04y{*%7wcBPXPI0C-g?|BuS-g!buY=dDy{?y`Ftmok6&#!`Ede8&Oigy181I6T46w`6@+gqX$Y_tTF<9?Q4vv;oU5o@6gg** zY;LuKoz9svXJ+1;H+SCLnY(sXpYERXzW06i+;iryX}(`qZ;Gk{w(M2EuzqXx{G)Tu z2o`6q)P57*`g_mEZ~W`Nb}w0W$Q(CMl44yesP3z)E#IFmo&jEk)P8|K58#!5#R9S* zXsm(Z;P?E))yjE~oF0Hxv-raRmZzX)%3tW=zIZPFlya}etBA>~0T+wtb8I z4Rc1XM=vpp45)m6`T19nFbZq`JMTxYp^h8b@;g{LpDSB9TQnYA^DegWQ+V~;vX;e$ zo^P;3iPi7E?pHn1)wFzpS6~6~%FfACWz#m)BLFKv7P2a6UHv-0`p;G2UvrKA_S|32 zz|T1=*(j8K;4K68^hb;=W1^Ct+-qpB6~m7J-J$5r7AK#Kiy=46?cBGjY+zD}{k!-3 zxcDTb6xTF#M&6Y~mq{VH=A0&U&KR(P+eo6=Iz;H?}{GyfB}wNJu?GjaBXTAr>csw* z{=W7x=spc_$ND=)d+R`$96^2syyEnHWAA=*&HhBhdi7}9<}1ouyeP^pn|B6oSG_`x zFNu>3stww1q=+$b1b*=d-~gGr5Ln8#g<#kE4L*!@9_zMURM_sRh$TT47sfW^jh;L9 zg{W)|)H6(mRw_2QnF`0CJt(8KAI40O$uwXv;FNlRLT=w2Si1)6NaWBEeR!FCp8SnYzJ>0-wOw%48B$Y-mr zIo%#bgD10lvAGN}H0vaZQH;>DYz10F7|$6-wAp9&!z&zi^YB?V468|K`vf0(kKCb? zX;QnJBKLw3vv~H|qS45E!~U6qCzYdJ(yzx_XC~P%AeV}kd-{{9&}@NE+1!cSeGWMj zunapAFM>}T_{`{IV&( zh4dTxOFD+XYwY>}umWUZJy4EUa{{p3SEf3a#zhO{REs+@*-37ifO9p$pCJ2J!a2kc ze*$6qPL@u`W}ovSujn^$TmL#pS5KYZ*SdK304tTuc_h<<;KUlItF8*BkOOWLKtKN7N zP5YKDfFN-)cl1i#NAyv>%jOUfEnizE2~HIZoqIS7yozi3GQDcHl>NS6^b&Z5G856j zd40m|mb-6+$N5M-ZT&T@wE!suK{|B(QVhylSaQgc-Tv*a*#Ew-B*!Z9_Xk*kEhK!p3de78N{MMRCI+9RuHUK_x}y z51U4l3YvrN4k8Rfnonj9+hp`34@Yu!=mrOMpG(2CMMOP>*%KO<9B$MGJzI9l?n3@= zlR9j1tH=A}k}EwPIjrg4wAl%Ip2BU85Y4O6Iq^)@`XNvJ zk}r8R${QQwkD~@e&lzjHL(RiIO+(#{gTnSvF=t%Np6QgWqKJ`ru!noNV-oJPkc~F- zU?;mD-h9Zfpqe!%Smv`oG}SKeJ(9RXKMKt>g0NRwgG2~g@xTyc$lbtK8uqMUa^jW@ z`T^z|BPyY$q@bh7(4i4~X@oA50?aXj#Ta<$RLT*8iX6;T&I@Hw^^_G3!vlmu)uoaS zgZl_VokGE!5 ziki3fnCCeJcDP50a_YXX5`1|NYMjy^GOOl54~Qt~&UrRc$$wQ|`${tWFWQ!cdyH;x zJeYpKsiN@N9O^;0)XtL$JeS)-NYwh=8;fdw4_G*Ut5ZLki>VyA>-(=YTcz}Y{Q@sS zlawL-c%jvuQTx())7!&_$&y1Uovy`WmbXN%xkJ#iI(26PGeH>WoX7;5bkOBapI>?- zWM^6%r-WSCPcI?_ZS#_j<%CC*zA5d7vE1Xg2M)uWH)99}n(%HmiV<7g8gwsMICi54 z-_$axM?16?)Mba;BS(|q9UyhinSkmkY2OnkaY`HV%kG9mNn6KaD`x?8JH(TkX(!i2 zC-*4NfLo>q&9<)HMnmrk7Xug#B$556W;=;jzxw#^i!p!8-~2z}73x9x=XA&-Qs`@y z)>~WJTn~z@sc7hG9znSjo7wCZn0w(;thJ-}W|j4HD#0QcyHs{qnAs-YNH4AF2V_M& zoxT2e%Cm45bUXOVdp}%0b(b_z4XXa+^XS!ul2O0A<4MgcrTxG2xI5-nGIGBBon=zr z>AUlA1HVxI@>K3bV)@LC2UGVSbU`J%RqzD{Jud#W2dr+d*%C%ub7|e?u?FfWGp(v=Nh+DMBK}3fp6~^ED>D0Y| zEIOf~K-X5J8z|5YLbpm5CcrBS%>*w387m+d@Ji<044*+A24g=0U`1zWF_`-RQ@|)3 z&>5OQDmi4)nR^igp^e8=XrKn|QKTMV5xOiwM}f3hwFF+NXkV`4{l22_Lt<5*U$zvQ z8`m;KNu?u2^^0}g-`8~h-u>D$E6=C4KGla#)M#5hvhv~DTo9;QwD0?2v&cq_;+{ijqfx}H?Y5N>C@tPNzl;w-M#u{;MMi=1?bcI zJs3;keU5JV0#cu6izcw8b@&Dfv=NtrNvOUc+#bG%f2C8&oa=*Sm-3gExf3=86L3xP zdN}7@{^DBQ7lD;4p2hR7Ig{t^F2FDXy{w=o%LVOA@#VeP73vbd8EwJB)C(zZ6?m2Q zd?BJ_z_oPN{lVh#+)10fDL6mEN&HOlB9xB&9=>x*AA@>BP}L_ag`ELgwP?=!{)%JP z=*is4llfB)*`po>a{=XVLQBVDAJ0Fp8{SM7h_*OKEC`TLV+8mC;AxngG%pD8OS>*?xwx%n36 zmU5qULN+8Ms>11P@&*4GTL+&l+qPjKLL(S}HJyF?1N|-)6gNDpk>Wi!tVrsR3THP7 z_Hhoy@s6c*S|q}Mp$+e4aNs?Y-G44$l+e5kHCiYw2R-}3G+v1D(1C01`jLFIfrqsiWf!2v;NvRK~={GER3>U%z0! zmp9kavD7v2wW#kO2dDmBB>r7>&C3?fd!h8ZuJL~s4gCX8u++w$?SrZ+cX>>>+SfkU z)$w+?^XpUYkHEcGWSwO(PRpcS_LEC72ttcW+phrP0Sz)QhDf5&Ehnf(1Qod!xlIF; zQ~532xMX5h2QlD->H@ZyX>?f3W4UHGLE8hy0!loxJw@orbwqJX9?;RPBKe~7+7P`g z9Lw%Ggu)Xb#!|p5;JauOOfp!?$FQnHU31dRHoa!}cNw+Q2YkznFFiSx^};!0#>lVE zCXBb?Kompm3UhPdnw=r*cU)s_3|hZ4WS4fV($)*K^`7gt1!(HWs~o+3^m6OLEA93v zL;m@_9%=mN9d961*e?1PyHj_esi<|N)G?qYws5w3=ntUk8D>DtU;R{e=P>#trn@>W;dnBGo%(Nf@2A7zGdSe zTwzJa_GTCO4@aZhoYSP9+5GbbomuyVkD4a%&oRK6f6+KQSv}s>uvlN(llEXXI;YR+w13Tr!?+M7}$sPB9a<;FhFi&oCkg@9~Bt1B+P>8?&5I(rW)Dv;?F zIVXgBmyFr|3r_v%h`hRf`}k|mz%O_uAI8d4EID4W=&Ze}dtIE)q$X$bo=e5`eV%?f z=C)xM17htQeYbAkPNmao5%G;?K+_quZ~vJ4^Hl(%I(MszGkIP473o(P@)DbSPE~vBuou$VjltbU@Q?Zr{w z$06AxFv;3;mP=EDUeqS~NmWE+s0vQx`2P9LSJL2gf)d`|vE7(IcbV zL*`xd{RB;yP|zjlfKX!+vY7USf@4+xcO~4{s;)T(e&wp(wflqEx*m_W9M2)P`w^Rc ziFHs!JWDXV5R^4O2nZyi$p%suW1Tml8D?~$c9(ml-lf(vDICbpK5c(_w|Y7ueOOWD z98DzxkfrC4Ti^TdiI2xT6Y8Mo5|Z1M0Zk9y>oWzy!x4{cQl-Yx?fb8_?z_@}R+V<( zbBidpb6O9mPg|(-@Pa>ms%P6Djl|>*c!kv;L-iLcITAyLMVuHEQ&{mHj^`gs zk{U;GjpMj`{3^k709Dl}j;(vGPA9D1K6k(}z0)|6YoFHToYn7|(slY~cXW2k!1MtYS8z^2O<*ad?59&K+|@&VOghvuFY9tNs=65TCsIWF}wyV|>l( z)!G%$(jkx1sf!g$u4PMhd6NMp(^1dfKCGK;@A?P^AmlxJAh$00>~pC_-!zR-PayUt zsu(4njTW}|d|S(Z-!5Ei<@&UH@4BUL@+()g&El+27410?rmY*1kksSh|9s7+O^N zJ_c2dNmFN0)fDM_S#(u8WfzSBq|&6&@KtRpO%p9CRCZ)pM^hz(s*Wm8L2*CoJ~XVb z%gmr@kR>Dy0H}drDd;koi*V6a=Q8`tY-|7Kb=!TI8_r@Cajmj7GD8G@7$s#A z6_u2Xl$ee?ws`G0l4l>lcS?bR!PgKjPHTJjT=H$p;2#|>)b2Za+tH`h?BvtTis8oI z?{eAG*Gkz*&lgKX-{lPaK1KM+A+PUTB?|vfh?95U7^jS!efS39oI8Uu?c%eq9dc*S z7A>AGn0J4$>{I#X;^UVWDps#ne*g#mZ0Wpj#cTNL+7?cFJQ(wSG@07In%ult+cv`Q zUIvW;G1)vf(KIV*d(-@M`cC~9F?Xl@A;R|PjcW-wsPCO}MgyOJfwg*445Vn@>)r~= zz`&ZXun>gZ3a|1vXYMY$mM(Z#yg{1_53@@h@_Y0y@cweh<2UKgCJI}ZCF~byyo-e| z+goS-!XBUW$?^3Kv$65mzI78CzYGOsTr|HR)PFwu4R8JyXW$pS0#eBXFH0ju^3i*z zq9oMN)bT!dq5Mu&TP6Q0-W;7`{QVN_?JjQKwv)<$4+snYP{_*E_Uu0Gay~IWtKe}@ zY-W8x(V%;}&>~4-m)V2&M2ECq_ktG&SKH4Pj6zu3C7o+?qwz-VOJJILe3Q+s4h&_? z;yd(W_=xlQV<(fviFevsB=4beN$UJ}e1W)mXJ(%P30B0m2&%@_Jyy3%pHIQxp`yC4 zsbdyuoXK~k79rw|Rwc@|?SQQH$DS&hmJ{Y>iq5s0j^9UIy!@nR_+NonWVDPzmjEII zT`i-n&6Dk|(>wL9vbK9t*Po@VJ3~NL3oK1#S28wuZQOV5^ts!0?JqkTCK2McVJT;< zqp6S6*xMxhsI<+V&a$S^ElK4BLW`j9C1~mtITjJS=@eC_EC5y*r~<4A0)284vVcDX zg+vx6gV2qyn?!JG7b;77;R$jsfoq-AZFj5RG^y)g6wefiS#qb*4T%*f zG%0;BV=_zbR=-rQA1gW-CpJm!Mp$PKA5HByOX<-HZPmTpYja$hah@(FD7cZ2rgx9=|Z~1g4 zOI*J@l`Y(wEQs-rW^{n_9PgDr3buZeqvDW?f&2L&V(PlWn`5 zDl|_&H}h-pOdh?FF(~N!caRAOMav_C*hW$rV)@+4G;falF zU2$#F;2NgnLaaG^*d{wZwV|W)qfqn`!ILhsMRRQFLS4srgXCM?qhX5cP7`!^hZ&;* z1&DwS6@!VQPYZo@1e4guqG%ygV$wAkXhtC*S0(ecfdIP#_z8p#i>9f}(otk;A|GQA z+DwWLlWGW+W59(hecFf2ibmJQ%l?E{)IGpABv)jL#n41B=~#T$l0O%B%4UUV&TF#> zZ3PNi?g!T~jg{9P-?+(<*yL>GRq$}&ebywY*8M`xII<HHoJEPglphgzvTX4KCIyrHWn|HzdcttADAO9 z5q>QZy+TNZP}6!{@OaAEC;wt_>KUKt!-j{}Dz8E3iUu{TUw!-$f?Z!6RF)+H@m@dhk*_pb55p9yb6ZSW=kS#S8j1X z`4;!N=5)Cg^w}2LlTAR@uwWUc(jvhR^|h}JPSq%C-y(KL zv9yxhr5-O-D>xHHk^v-HS(#q zK3Ukn{Uh*7%AUc}9QJ&nSqFL{dQ&j^3A@$3VQ&zbW6STcPV7fei2Z1G;TEXHgc3VSKV(p7IuW~M`Irvif{Lye$)O_iD5OiHonxO7z=_EmU&KqzYngU7wp%xE zffm!x@BVV6`uS>-Ur_(YSLuJ}C;k~i{d|VWb0W{KWJj|5X-IKdESjq7&U3DQx0CXU zszYDrf-7enEDtS;pSk0Zy>-Z8@0zu^q z=#<9regyr`|M8o!#&6*}ANKrXBLAE74<{NB;*<9GwfOe;F(JA+T`zM)k)# zPv)NRzQ()fh;XroGu+!T(l2?}EqHbJ!5jTUiF(Fmrq)$T`bmd9pR*VKt+MY2zuTjF zZVx=u7Q8c-;>+eO&sW42ELeG09kIHzRqd*p(T&}Pu@-i@r_VhZ?0efKS?&_fNFi@4 zegnr|zGw>3D){brBeBUA>wzkpy}(1j9FWP{k82#Vp9lt3he;#Hc9`Okb2_w`m;f2H zs*r;Lf^?WHJqGgt4v+}Rg5)XymlTx`u3cw@F9DzceI%KI0sz#)=n!~_CK%bgqH8c& z7&4-}Mb>@j?X&25N|Xc2AVMhaC(r?7Xj56b40N9u2bC4|se~pzC1}v}Gv2)Ygu+H= zeUpfwThr_ICll*^7@Pg*3dfmBwrkf|Q7J}r2KI5x8Eb6dl14C1_8IsSidZc?vrhN? zv2%HkyT7a*`4Jo0huw?J&OANlS#!p}^g-QnN8h*2l8?{2U)K$Mk=6D&FmKrF{`95l zS3cEm&OLwaR=nbQ_tmw^@4RzYY_cZ(o`2(3`{_u|sAI{ZW%h(e$y>Lg*QXyWU8wmO z+WsL7e?06jL!T{0KK{Qy;!Muel_wvP>tDgI2NW!UEI|Ki}cm=Tf6JE(k4fq7f zEvb^RZQCYWvlB5_6K|FZ%w1!wZ7*KAn(5+vR(qeGlHyuC2Bjl{pwTyM+U#Ivml}OD z`vI@yS+`%dZL7!Dqf7rCSl?DWn*ev@-Dfs@Jp#yzjsDV2XX zu~k2|!Td`7rQ+GJOkrWoGE#kM%Q*0ASTqG5AgDEst$(j)n6PEfEhUv0XdqDcMSG_- zCRa@!K3B;&5V`M6?MBPeO^2f?YW|cRLBysD6eV{Ap?Hc=@!GUIXotpCfEB-EhSNOI z(J}~!ama+WvWFU5`f6G~L?*T~vF%H>1tFY5fRS#F#?%qV%*wXUEz);)tA`&o&erl? zWj&v94lc92bU(3bF1>7kzRi)K*dh~yV<{jDH55RGAnBc&6j`8OO)?EwI^>*=f)>^e zWKF;;%m<+nN=^yMSs~g)B&$l+FWQT4JfIBsW^ewk>885m!PAWhMH7|EICms((sKi3($nl1C3=$TVu~$@3hn8j!)ds zR;@@t7L8?%U2>4eV0llW9;4BJa&;sW%qYr7X=_~&bk(!@b<4o3r+we37)5M69ImVp zy+P+je#K-<=l4(Bma*WR-#C(0-FGsU?UT`M9NTIX)3PnFQY*6AG_Lzlgvcg#z#>e# zC$RBgv{*Mqx--1Z;`Z2qIEh2XtX1-uZWPBRcg#4c%|5T&;U@QVw$vrL$2qaf9KaGM zHonnhmo2`S-I7u}&fzR_xyxAR1Y`lMM(Zb}4KuCfy?4q+l5;v;QoC*9cn2Z`y8{}G z6S@pz#X8rU!LBikXTzBnD!BHUgL?z(3?jHTS>yOBY3GzZsd=ekoA={=SL*b`+YVoA zfdjQoQjgUQsZ(sDU1V)R2@iP1ZyN)DxQ6=`@XFZU?}Sf`kJtJA+Injg*Pw-hs}W!& z_aBsBnetEnva9sBNB<>f;3p1=j7b9721P~IK_e@#^T7r8Tas^AIGzsi2~6^EzpSr! z42HH$3Jc^?@|}gkU@5FI);$(+DWN3i3AeeoUASCU*_HTY@@#x zE1mMVHv?He|0i#Ka>t5${x!aR)xALIRXFHdI_i`byLRzQLG>U+ z*P#JE#984;K13uub2(e3d+_GILnXU)b9NYJ-LCj?w_f6webFl0y%g5DD6Bn3VVV$% zCWOKfw3=CK4dFM+Qg+y}FJQwi@0~x5AMX%&Ud+W<5r$e z)@p`P*LV`pgjew0t{$UmoUUh6bS{>QHJ^sQ|G0QVaw@9Z<_Z_SuBoE`5tTE#UOR-z zvQ<=aP{8Uj1Pzc}fzm+J*s$dYAcBH=kfMpIkf5n!bjU!{iKdEMCIgIgRgkREhGHp# z)j;M^;IShBO{B^(9Vka0u*e(?NCha9Jw{e(;+{2Y4Ot4HU1=co!o%=HGNVKGMb?bu z3(6la??F+)ub}9_@C(!kfGXLOrx+3m~y)<84=4-)<>$fR?G zubS8kd7SSq=MOvFnG34$M@m&AARr5o-G*08YA*6_q!|h*-#mMYj=APROiFtyM?5Xtk~Dt*HC!psRO}+J>C=N)8N&)YZXI75NoD@J5gEx-4V~z^`+y zzvL?X?Xmw`XMjAte>&kf`FIZSYOnTTh`N_NVu!}$9x!ro^@{NIxpvIbb^E3rP$>gc zq0>bWblB@0);=0}IkBwZd3(LIL-G=FIah=@oilLwdc9?eXn$zknc@k@?0)FXz?|ZE z6z5D@Z>IDs&muA8B9F#2`Q3l-p0^nN?B%7qlij1Ag?%5M;*N8Q_x_-@sYS5gmE*?mRVC`JFsoh^GJ^=*sQ zO)?1;w>3H;1}6$U!a26VJoAgq>rWI%HvXt@pG9o)K=mZYtMxP}B%lGV1H7Uu>LRN_ z6^1Sr69`6C174v+g;5}aMmEe*7-AZTdv?jQCZtcm9C^qxG$d){J+g{V16YJWy$K*9 ze<>tdfI&jzXOx4SJ9&@%epwm@;39t*iY9}hN27t6fCv1A?W=djojZ0ILm;nM^%Ffx2ms|PM%AZ9J$eVFjBHNh-;QO=326Be`oqgqSQWT zLNy3dFd_t|ggOzNBPrcTZw^H809FRk-KQVU9=+Xl@#(5fW;eD_&7--;&Ex(%Bv-pG zRG!Ltc_#l2ek6@69bkQ2dhkA>e4>p1wP@rUKvolb)i)r|(DZ_fd%}6&P=kZVfL9D$ z1pgnrlHDakvj45?@3#m2WoO`Lypn+x$yWdwPF+>Y!R};2S^>XnY+&l;gJ*62S0h|J z&+k%Gr7{^%pdo>cPElUJ=FmZ-i@yF(@70OhdLa)!2o2AkkA0o*A~M-2C0!?yI?#ka zp3wz5F-XNG$)XdPBiINtj%hesJQ&~lDxv+2Lvp)g3fn1>b2dYAF`*$cPr~Lbi^T7m z>PDYDl0xdLzx(}g-#?8G{NI)irAnLpiFFrfTQ3t-I|Gx1^&4$5i-#sKR$yd9uKlQz zz%ZAYAY&;QEOCICCAu_QRK3fdEZ(i3F0GrY5P$hZ`b|aOf51%8`aDUeD@f=MxcDr$|ihTt_{d88I=!Xp&Uc?$}85-zOn4n;3 z6AVC&Dg&7hSs3B~*s=$ZMW<*}0YLy6bdzXg$SOf~pd1-8kooDDBqyi>tWa0VunUhw z2}uUPio7LX^Cx_hgByTL-f1VB?Nk{OQpsgQybeJDzU`GiOinJ9nX3Z6jOhxN1k;RI zcbvBQ6l?q0O==+qM>EY&K5_N$u=j1Y@osPn73f$O=-3zUHov`A<0fgtx+|907P(R5 z(iZKIYmucjjpMKut#6-#TVMO=AHuP{p3q^E)MuL9fAr>vNkYH+r8cAZ-ouGK`mqwt zYaElC0|#S!03f;%oreV|hA4n%aQfx{5qb}*v-coILf`b}Kx8^=`kv1E}+EC)Zv;kX{)=i&HH z-C&8jUx#W4_dslqMdGkgbkEU<7W)LgXIvHNSheUR41FFL`qojO?ErX0 zn8bk@&SaQkxleJe!#b6d+thuE%V(c*Uq)xQUB#PnX}4e2q+>W=?dUyXXUy7dAS3zF zY3HaEFRFqY!90W9j8L>El+G%s_)vC7>p4{#1PXP}bN0Aol=l3Q*kGr)>onvM$UQ-{ zj1&(bxgw~06&d>#!1<(TVp|aPAccusOAC-C&$|F104sR_xMV{>GL`z%J$uQHI=b<) z3K6v-FbZEqzC>1zvcR44G7tyk1JIC{GZ|z&2cQ;$#49khs2cbd=-ZRkB{qN{??8n+ z*kPuU6#;8(xaue#rKmtd#tCwQN?ZNtTdpeX2wSHaM{EhE?F=EdT_&~#5j!petTt$+ z?Ko1ncvT&3WBOo1@4WZbWC#5Q{hMW1neFOrZg0baE?F5RkFO1wXJu6W5M zbKLg!tabX7b;gWY@~CC{ECTc@r+m2jPC@zhOzvO;=exZAKU}X_IFUU7u7$pM2<>%|~=Zov-dwx6kE6;$Ob0vR~U)O^WZGd?#gQ>7O(W5=njxi>TS89Y&~}BN&)u9Y-DoT#_X)nj2`k zO6cv7Q~@1Da)P!Sqyq4u=u`^@rWLW))%{XUMc?0D&X+pgXf+Laa>QSvb*7o7;sa2k zGVBQIaRsIY>Fgro)MjCO3+U3(uv$>cTdyyu4%|4>~|Ae9Ef#RbQTt2 z4xm*o%Y4)UN64>egeIC-KlQKZd(jdH6%)h*(4_z%2p|bT;K9F2pJb{FNRWUwB=ucJ zD3zs2WaTJFA#}ZPfZLxB@BlR7$ycN7#S8xY%48-+){N+Yp^B6ZD`oy)Xkn4M5ct)= zab@5D+VA=d1!F3HYh+vuM}lTgFl`uXPY?`zYDug+MXYrp)&(#(2WuL}Uyc$~R!w#A zKfvh^CRvr;KU^!2y58DCWROLY$cBUonuC~bKWE*)(<6h9=X+H0;SNb z9-lPMg-l*`%{Wr-zQ*xM-XhGYp~>7YSdz3&S99JKRZe)P4+i8-+1#46O`S5nF?cwx z-#lgPKsXd3hSaZ!4Wow45~qyg2XwEAtdpeY?=PqFK1SCs!9EQ8iTcq42O|6Sh4pBK z_Y&rJ6`Y=_1q=0K2dz@)4o37jXTLCs>G93#3CJI6Y< zO-|2gY!?)jKMIYFJ7#CMe#;gHi>0Wntbai7*%L1!5|HI`Yy8V_fFYkeoww|Eu4#NdFN3w2)w#G{>P|>w@~ViuUd{M zp9NU8NGYi8T%EHgb=1I#xY{u=^gv8JstW7K$cgw^n8Aw&Glh5=h}_xA;2p- z%K`es6aw-u#^eef0`(n59Xo*J8laLJb)A=nO{u9@T^9eVi-kSJCOhT5Za@Rz6-yDM zDH4K6eu50I(7Yn?3VS-}w^PZK4}Ex~SV*XTB32RVKoxYQ0qgAygxn3}fg*P#6c8 zN`}Ztl{Z?lluQ&M{ik@0Ou8txBxGSo%0%B!rj5MTW#is}y@nY(b(60|3)#|t>+Jqc zEd7kj77nE8)i2;18}MMk>6SFO`YYSi0pI)YJc?IO7R`fB;Ck<^ZO**M<1g*<7msC6 zI}|OQD1M_G+3i~N>16&Fj#)1d=xX|uF9bfG&ma1i8y!EK$sa*l_&>uifMV5h(NaekNzYp-LQTSy=2tQ3i^tQ!I9;(!9J+RY=K6!#cJ2y*dQd!vc=(_uz&{Me=$JR*!udJm zNF~4h`9k~c;BRsUe#R@DUik@^;}z_3(3wJ#1;x?rTeh2&@c`zwqH zyP78M+!GZ)?j05^!TwLmc{L*aDz$iOgSx-s&hy}0FkPXU#S(1^qkAHzN-#RLxTicIvokX&h^ zvcoM+L5DP;LC_osh7)z8-}!68CxUNOO|KD1x)>%bsy-xQ(6C}+%m+dgRTGsU743IW z2#`U^UWY-`pi$I+>aoi>>awH=_aG_KKtV^=ck(9HPrWQn+=;%^&vhR@CCfmvY((Nj zwy@-tAPz7k{Q0@SDA^M=<�O0K`rWJnIQP%m;x~po$>~;s~92RFSY{5ywd>RKl8I zSrSxJI@JmRzlpVUM+!j(#u*@sZrXFk_woaF%OsyO2jfv>R(IQexRlyspD<`1CdM>P zJ5*qjGP*xfx<8nIBpO`MfupxZwXO?QFS8HCc56k5)j|Xs*Tg#m_&VYJhS9@%;r#|- zJm@Fr1V29aU?QyH3;Q(5kyxQ=yjVL-U=Y`Bn%r#=BRF%b9pdL^{{tw!<}y>D9e1R=+Gc5HYA1 z-m7^p}Sm#;L|Rm*W+{ibltv7N63wP6)`-(LQj@^0>8)lffa=ecA?^S_jQc ztb+nV(~`1yZQ`-c=>h&Iyxk{+(-7et7B9(N;c9A!q+M^i#H*dcWnus4M&7H-xq>qB zmr1SPhd+CN`N`LwMJpHYuUsfwh5)Hw;V|&3wC4}$4J$Wm7VbYC;dOmUQX2S6Pn&1Z z>g;Nr0%Ub{ycV`B@rV9BD2AhBo}|3{q5{ht^r5v(eQcmG=~^_3h8zu$W+1Q*gWX}Q z@hU4A5)3oOMth2ex0+3S!|Z?DVSj6Wp^;DvV=!%$*Eq4Lrtn#yQ_%Y|WGG=@SQGO; z;FU~5!H~7)H1KMVeo{%*cb9LniLK5QMGJyu2C#zu9(q$8+&j1e2+c;UE^4S+LZhlL4L>DnURNQY=MfY!q5-TX$B8Vn?SOS76vH zthc8q9AhzTwr)PVbEAhc)gEA_z;eYVj_Up!X?arV@IOfeOJe>a43xY3zfP@qd9!@w z>f^7^-k!C;Gk>yh)iPt+sc;qP&AGAE5FKjm!5yJx;=I3?klfHug^Vx8&oow()0!_ z0=S96t$Rwi3cP|H(x7m;r{e`%u)-C;dffFp$X;Ek{L(Ol&m1EA!;~5L`ZEN51)yvf%Z#2Is9r`|@^|fztkNf=(E=8}*(`HZI`*02MhBXqLMXbQ%~? zY6NIVxOg|6Vs3W5d{a~<`h(NODq_ny*x3*YwgkyZn0WGRYlimV5J3No+TOXgPy3X&+994IO{bfS># zQB~!E$H*WKPuxqRATz|zuL``CKTBRYlD#SNbujpo?cm7PaL7+(@_j&N88;qs;n+ z_iMuV&n#`ip>X9;%m^~5^`6ggkLGn`R(!qK!2>Y^x{>`xNs~IEJcFoC{p-yKLK`ER zzewPHdo)FA7{%G{TMI6PeuNZ_Cex6{OZOH+;;Txl#$b0i%9(+`?QHub{4&tI5{h2q zC&{gzLImEQv5aaqOB&hiRihspee(y5qK5Ua^=@=)-Qy?T>CvF()4C&oyYXDJT44J|_h)Js z+c&$_m_+f9#!KR}c@3g3(eob=F4VV(LnBg7x}4d(We48ne+dfZzx0~@@BHFGD*XDm z1#rpVBY;{6&_ThlQlyZOMJKS&No6q=Hmu*Mt$pz5QClCMOY!k(g*oNy=FZ8!#R1VI z{6=A~+|OTuhW4|z_i2T_aS!H0^G9=P-=>tm$iLTLRyhH%!pN^({JN%XE{pT!<&vTE z4<}FO!*XuL`{AN{!5D}!7m9kWRZitdK15Yd+^HT}mAja2-$TJRzN>BN&q-L=o) z;Jnn`Jj>;L_3Y__v0cs%-EfdXDGY0X28kPJk7K_WJs(`W04ur{m7z{!?nPolrR)J% zp}kD3aiFWXC~5db=M7y+?mB3fy>`1hOXU>7v}LY2p{(LeQLt9r2+gRYRL0TuDkosy zpt9+d_WqFLcIgJ@2^3{#5XA|a5%3D@$;xznCZr7HXaj7K&Hj+rp&kVC05oKQ7Sldt zR%A1ZvIhaYVlqffBXcm>bLHJFKpgIoXNJHlauZP2??QQtc9tBSQ0?N?kfGsD9Frkq zGRSY`xuyJBV3wkUM7kx*#4uGv=5`PjBF=+?vgvx3*&57M!S_IS4&uoQhu5$y*DF~o zDY!9cr`B%2v}0f7e#7v@RB4~!1MsS)bq;J>)L-XsvYj$!tdmA;ZqDq#0!8Z~!!R+^ z z*StQH8^V+M6SxyoMVm}a_of3&U-%WxR5ZSTVE$0sBrs~a6{DO9;1xRU0^zF%52cT| zZ!#-KJaYPB;ANNf!XTh;NcGWE9trs?aKB3W5({;M};w zujPN}?wA=8FEz8fE{EQ5baMGKy!!8qC;!#IJF=>u@d_{n=pxaJoN*u&p@#KT*2VU z3=x)Yys~(~_Xlr38GS1HfWI{S&7*gUSx-_iFD#=zprFS+wZr$$B*G)D$L&^^Z+6!m z?&sut{ns)(gzYcHoCRpM-zy&~c-WIs$mh3C4|KlnZC>hYSx!k5?c4@wh2x-C$>;T` zm~e%%&`knkld=!}ZGx(fkhOh~sOYU>SsPYOCtq&gqg`Y0Gg z%8EzSj|iyBkSbU-e0NL<(RG)RKhfO+bfCLV0u+7{b=hUO>^08Uxt-U+NNQ(xm!L5)C%s>yxfT_ zYhQ5Z&I_Eqmqcp*0`&l)S_pT0K#O6*uwHCGa13a6HmBRCWH`2YHN1A-Jht!9bum&b z-C*f~D*~+m4xY8smxHzyxLCX0>aF9(%%UZZX`>OhJ1f{iydE2xAa9o$jU4AcyGMJQNP)_QK(ecAYY^`UcBr{eltVte(yo?2XLu?%jqx!!&{ zQeYiWZ{TK1mSxHFD-avVkg=q| zUcisRVqi*$;!zcW{0ewQqo^Z(jaRanBPk^+hZ-4t{e({PM!JlpK%y293AaDzU9uvP z#4DT!61rvcL4cJU0C9^(7D*YUnvm=T&}&KSRfyqW#9&G#%xDBeDjW&A2W7qgPQ#c} zLA88T@w}H(!Al8mC9Pu7FOjDo*kl&QKM*Q1j_KPI#M2G$S?^Y5b9>GycOH<1Pt~so zk*n;x(!1NQT{VEC6D~e2OZ$^Uj`5Dj2F4|6LDfskdW!x@}~ZJvPdjlGgTh@)z40MsJt*K4vf9c)H|~ z!ozZ+ZZO+8adM|WS3OXqaS0&F(Z1S+uD*JZP$#7OaP;Voz*hCEyuG0!^{YbQ)#2Dd zyp4Jm^v5)3D)3CmSA#9^C{*~m8 z2Q4399EQFJ@G3GY6%xDXxBm&L$hZ6dg3I)`m;B`n$Xo9C9QhSWLfn#x7Irul8SA%f z+qGBI*537UaAb5?a#ckm1Pca4qkZhre$LpSV706L#enFOl=J3s+m~4nX95dG5GOJR z>{EN3Zx8yFuQ=Tvbj}`jEgU_CFBSH~#klD4bl$`9_Eu=+O_FP*;@8!}FVf0-0x|?w z^SVO{#saeX;Z1)brzfZ3MREJ;)2eju*$b!1t2(sYtk!Z4Sa;6(P^2a4YlfF(ETd z0x~!lF_^Nb=5*q?0%1>3U1*B#Yj+2%+2wyF{3%=X4U!oNZ{c~*xA~0=F3AHPnG*+s zB$lxgdLi8g*ZS11NHFg+N}4uHoi~ad)(RFM4DCG-+@%xJdnjs5)sL?cB-RV-(zwJs z5X!f@If_MNvjizTwl3Fxbs}fhJh9I_Vc0%%&N!mmB5u$&T7ZbU(;1N^?(A6Y=D!9d z2E>@&)=B8{@dZnm-PH14<~`~y6@1ESS_!=W$|hc_8`_UJ95c1;9QVMrKK-x(wSZ2b z<^IqSjiBCrft~w0nNXjfOt?2C> z8|a=KkxuptN5(|6h~AFH0se}l{S~`*E+So=`*=Q~`i)=iVBq6dP=<8L9tK|7rS%@a z*=3V1J&`kTsdx~0bt}KSqT!{GztF*+0baFpmzui2sqg%Fe--R#bpa zranZUNHr&_KIue5M-K;*<|Hwa1~VGM2w(+@smvA`m61JF@g$*ihSVxoInUf4NC8J; zlLuvoJF&r;P{J~fy}b91nH?Ytlq#@K$!rRF6h$5FGL(Km3{-X~10laaB{@{MB{%rU zfgP0$dEo{;L81kiLe>YQl1uH$!AjP=B3oWyK9B=V(Btv#WSn*Y5s5`Im}0U>x~UAH zG~@>afl?O;MzTZYctxgLs8T^=0PTvRFAK8n17v}Mg@g($EII}X(9D4m1_84k3ns;k zLD(=sZ&>TSUG*yP%H{mi4#~Hz{4Y^|^@vxqs;5t0Ejy9WYZWd~^=dN=>Cw3)F^`+j z4(oG!_}#gue^9+5IdHxEQ1l@1N-I#b!>7X}etO^KPUF~d;MI1YCbJv;+E+M-qWCWP zGcnvh+T9-3yUsgsjSK$37LRJ{q%o}kwq11y+=aXK%u=sod%KPyDkX#T;y%@ZaZ*&So3m^cJQFq zl>yBF$!;I+`ZJCDuMKF2^lDs^0<4T9r{&(M*XkA%c^_S}=Z(TU0agcsht|5Z?71M_ z;nueKRO2T1HbB-^r@F(J`i#S*h)cXNrn!sY>493zk$&R$epAN%BIDUiYWw#=cV}S}5W)WJ`f$bh-hxlX_b!F+&Oi9( z($n92mrRA#eMo4SjjS5IFIaxw|M5xZhuZ$n+^!#a-M`}s!908??tP7TP&ZlLFrCx3 zbgO1Ev1UA*vs~Z#xvl^AJ>2<0(aK})>%8X^_>MXMi@o;%iz@BXMR!$EWDpQVM35{J zl_)u9BnKmk2q=e{Gl8s`kXh2vb}5^wO2?jG6lhoeMfLZR@E z20GUdYBHxltS(d|pjvLc2?pfcsL!Vsi~?c z*-uv128=^tu?$2G0B+#02ed~FuPq^_4+w+Df-Ac!4p9YbPzf9w;)sSMR!bZUXa*82 zG$2VtMemT1;=ULx0K$NtQ&Rl6gc#ZrjY1ZPNKq-Np_qsfY=t}Gco;(QMdSdCPN-WD zYD&c=41^#CqzlC;6vwnt4Feu6xubGZoCaVTRO#U$oC)_41e!L2!T|#04IpxW={$H* zWB4?%coT8tguI0HKG}dHDi<*FA!^1c-d>rbBY&7=z8NO(K{o+~_UU5vyND+*&XhcN zOc@UFXwmvz`Sn0-t<@6wEq(+3MD^YxbUZ z{tLGp)a}!^XeD#-?;lS5b7bQ?@aPMF`pGeK#WHopDSJ1%{u{5X<>ac>go>rEzC|YY z#T;pFiMBLHT3Dv9!jM5&7w+c0t?FAX=v?U-{T4(o>D{|QrO#dOFIlC((2AaQ$$702 zIqX~b#w};pIAIauc+8wq2-`Aw(L3+8)y-AI*eSDwnUJ!tobT=i7Ju!OH4;(%>=yk+ z?%3yq-tW)Xys$`KK6zvQMDmVF(zboZCcJsG%$JtgZ!D76jN;~iJ=$e1U(Ok;V*F`> z_G|`f8Vqh;PQHg{$bLn2cxr?pK&>xe^&7wX564-+EBJ!j!e=Xj!vnK|bwH(qhfWxp zp9_ynPkB&L(g@ahGwdy)u2|?h1Yk8tUTN-Idr-y-Pwh-7<=H0;1m%vH-6la8rm~Fh zaP+PXTBOZd-JEpDSa8kcf>t3Uk8rbn9`NchdG&t7cybx@b`~YOc(9_H4;nl&YrUVk z1e$hW`!_0h(Z#fg2YoT+?At}`f`&OjNcO-&H~&-m6YixfV&bF0JNMdPWCL>Qwg%**s3Hpiy(KzB5Ok-I$Dx!4IShD(MZZM@U`iAnFQ|$~x5B~{XeUrS zfy_=20t$qIJE%j_he7WEWh)RcfW%Z62RFy)!`MLx;XYgfWJ$=E1eXhM1yytkSWDnM^3oEfTWz`8;p`-1dN z-D9)9VbDJf5qBVnD6!E@A;X^YxdX%gNwpr}*| z=}`OXS6Jtq@p6;5}lpQj&-9su9tpz=lgOpbC`lR+H$P-rh& z%|6FeyTCS%W*oaf48B9ZS+mX_d_|@|o9vrhpe)Rj7iWp{FlUfTT#L)>ymr4U?deEP z^W2#No?cin6q-~*yJY?8GN)w3GzEVeVp*>eO5N|*C+^ZF z@7piy*?usfU&6Uf{R~GxuFoum7S+CRxosY1OsJo0I~Yio_UMxFV@h~Yr9C@jy}J;P zUc|ZMU?2@++jKCj7YL;FnfmOO*L=e2D0zcSpx(cm?dldNCl3y>U+@au`PJ8d_yhZ2 z<%R;TD%c>xt?(ZXO@i<(NEgI$5(olqn_`l32aXw;hDXHQNiU$2AOqZh5hPGOm?l1( zCGS9L0M(3M{)al!R$9yM-Hw;%OBZf+yt_sEM@V+8U{Ep1~K;*n5 z4}I6q{_07~Y8&P4!>Y;Z?ycJP8QRcWCVPv++bL^Xx>Le#qJL;%eu7dwm%2Gh+g%#@ zR8qdAYj_PO9f*E1gTjcK7y9 zCa;*L%(>+5>c*f2rDIok?zuaWwQv3MSMJk)m&^VWjBm5MH)42m+CFdFv*49Y#@dMs zl%TA&-1eQA0zPl>HHZ5Wrqj-V&I*PZF*hmf=ggruP28^wI@Sv)AIsR^6|g@(9{K)q z(`TQ8P1me-r+X{Mt_*8l;MRVZ= zWPq$v`f>?vDYtnm@*dsm4*g8wL}1=1biQ9LpE;X96n(ERsen=2vD8a{*~j|SMtapu ze3f4{eJhWiQ$G6O5e*=V&fH*eo@G@GXFTE-x2_d7uYlSCAZvuW!|7jR^ZyaVLf|F} zl_(4z*62|$EPx}7$VmhPX`q$3s3Qik1;_%hf+a%K{ugJC19LyDG1T6_G~J+N3}(#$ zp@PZ}l%}DL1sVgPg8fA~AY>_EV+D8x=^+l*^)Nt+jsda(EC{y(UZjOuyPyFRW|hEA z6kLuG>~SnipAphL;5GtK!a}<=%pZh$IL=yKBf?1k8cOrvr#P@vKs5{k8m5KT&A=fU z2XY8BLlm+vG*!gv0D=koslfsQgQA&+AhZF^&=QuQiiQ3|fKWjNUcl&}kOluh)Mf_| z8^l+L305Hp!qy?Zv*!(eV19zS%3E2WWTjA=?CDm;kZyU; z7D=aC<`oKBz;Y+XpM+9)QyEfzyKkOV;_ps|ZodI(__5iFFX)6Gjyxtiq=S5TJtbcq% zNOEgLE<3q?C8K}GH*-Kav_mDlOVX`Q(Z567wMF4{pOkyI*2Q5NpI)qE6UMe)!nIw@ zu}#jaUoD6uZrd(uS*_wbpb^ec@a$3u>r;uOX`X%@nlqMOHGb#m*!hwP>$o;0-&VEY z9$B}p1HJ?)=T5}DM$EBgpJ&g}5C+bw_E2D_;Z;spGO?)RHH*4D!rSiap=938^L6n% zEDz%3-@g9iKY_o*D|ij4UqL1aJXTah>Y$>EgM)iwVro?x$Osn4D6^CFg-O6SzOickKEefl^UW!q(=HvUe9Gd@K#j`xRR zYS!ZFHew!+l+fQl;=aD$zZze^ex`8LIg59pe#@(9I<#utzi=wFY$4(SKfZePM(JEy z^+tOAvoi9xmCVnL!+&h#e_hnSRZrS@+%elvSSC|9I;bzZ=&v7kZ>81FJgVdO(6_my zXK1j$dsH&2ZWybqa|xQ`q-2~S%Y(pS?9`4#h>1dl*<4D-URKTt6i4VoiZ#KBnt>IJ z2#isN4m+sE1LoiWHw<9%vXI*d*94(h1R4nl!44GCp=^#apI_8XfCFFZ+h3GU0-QnN z0yS+Aq-L;m2#a@sdwOCL)<-ph@DesyXnVw&qw|+VU?jbnmS)&-z4JJ%mADv4CZHP# z%H}980U`lp;h-}S(pUkTg2EKs69RodsC)|@QV$_4ZNVidjtQ#$0(pamP&8SqA; zA{KafQBg3K2MTuri#G*FcZ{U7)WHzHh-z}zGalvb5N(G;+H7L~c>D2;)2%6olnKq~ z0fPjFM%1+G#c_jcb4Skdj$a-!xH5bsm~Ij?t$Aq#YSdbnC)Li6sGeb1-ds|<)UO#$ z(u(SL%Ug(S_!RQwxlQVvb|fA0MAMX+<55iQ3l!IQvhy`!V)o#jqDfx&!VG<9gtQ53 zz8v;DHtTIO?RO32?{8JV3{K^TWO6R#k0ms2We$9}*7(^WWmGSUr*(m;7ddt$n5hvw zq~gcY2_Df68CCURDtk~>PSZ3)xrc%o5Q@R{10f7Kj~>+!#(wX9?Q??`F@rYoqZbkh z?eyREQ=avbHXn3s*_3A-*G9+e8xJHIh2!A=Lqc_5;+Dj6sx;j z%M6Zo{D9GI28`=<$Q+C)n()u&Js5Znc$M5ValVM`oZRP`M%IjMaLpNlHXN%vOs5RC z*^PeJ#6I`rfv{A1U@|H2COIUP7WI%9S2B9LdMvqu58g)rS)JXpbmlgIRWo4+!0P;c zVrCH<^xoA$%FaOFD<0>2Yxf*c1wX6^IAWawH*y4H3wX6p#tQ>&H5hcno?s5LG2jD$ zm53OqyMaDIKy3%AI>LRFO#!hHC@sN^2W}8G{haj)LlXKT<)WJKK%oi{D#)M43L#lIvJYOtABxP62%Cp*pcw5(21E> zi=4nZwn}*P$hfsaNI15t1kv{S5ukj8*fbvs<4U@>XHPEB}rJdA9N#2J2z>aVT4~NR(5~QB+L)d*T`g6 zQc{|S+v!6Gp#kc*um9Xn0E0l9jREBX`Z5@-sDz}Ru92TlP~QFGA=dZ^dv%Dh1j1%6 zW3Qj{sjPASQqjbn*1e!d>wbkxo)4Ft?oS6kT7~e1fy&VXv(FI{+pu=MdDA<821deJ+~WsSZ=Xo#I~Om5!<$F(YS80t z|I$tOocXZwy>rzs{R&qC3&z7rXD&S%yV1A=!|q|^eI4<6@6hK;>f7$gKjl(CT`Zfp z@p$-F^;CDy3Wxi)wSI<0dD%*MV{DUj5N51nJrKkNi*Xaj+ev`{9;(?m11Whkyp$1w zF+j5|fGj+K17t=}r!q%#Lx2vf8T181Q?PLLAM!gWNudMZ@kT<)rI1+(!AgiHLZtyz zydi|%F9PTQuRHxrsP4JJgFXX5NK`{uYT*DxG~-wvV3F#jwt&iw z9R5%6ztucx!Y~#lM=a`I;u&0^X@?D*zdIUolM|EJ*53aDY#4bkJ(;q@Aa2n|{z&5e zklys(^9DUI|GDuMuHEfPr}SC>ypasjH;H{8VN$&6C9Xy^AErzm4`P^Jo<88(ry4jY z?bxpsF|FvuKJ3HM37asCm^$Q2m9_3V>`qnnq3^TnIvU7PbSG+rQf(6Fy<%AbiF_DV z$fSQ5B`!j(1Dac*U(6zkZV=I@=tY1y;7C?+XKJ`I4xZ|hwe42(Wm(3KTVJ2Ld7s}+ z{hhEMhe%^zPrB{r7cT#=<%7bC)_?9Z{9ozrLc9XR0?$1xUi6U45qDRg=%{Ob9pnlA z9Gg7Lq0E7{nb^CWS23DV$ns02cqR`xWQ@3GO*-70)V)G*%bBzlOfWfqrRUV$>65oc zV61>qGTrXpn0@BBPcF~(F8zE7Cy(~JfcD{D&#wOiuIn9A;G^YJw^@ca87I;>MyWjO z+-Z}WT$q{Skq5qx9OukwplY^h!!GxyLcj_smmic%56GsTx!arFwp`M(6rW8>C>;t& zYzcnAi74d97IQCTlPf9*$&?*J_XeeZo51-lSh0jmq@3&1M~6m!s(L6qs?ai}~V&J-SjR}pe5cmpWu0$POu zi7ASl!az9~x;zS&(NLVX6~{Y>E1px*x}KHGCDXovj0{K)h4m)&UUyg~$t}JKz^Z)s zkJTgJ<`H*Iqxjk(WJ%|~1AdHs?!Z;r<=wm0g6Rrg1Msc(g<%CBf?9Y#v<#mvUyB>~ z7TRRAF7+t|bweh2{0jfX^+_{mcsWlEPaQ1m{+7u6s*n1f%iN}u*9I9chS{(0yY?eK6h%*( ztTRE*jgFYLA8@D3JCpa>^vc`yE4h&N*>r38vqetUAMhYS9P;fwe7fH%tm|stI)nBe z0%To6yy_vp)C=tfygCxdQ1IxNvgnew>^@-Ct7zGy=uD8Y={o4qt{YCfl1S>J{5VX5 zh3Tap0yQf3hO6u8{rf>L`sZK2;nkmiB7e*G!c6ejS6~nv1cKm1#3aRK;;&8X_CS@b$h}r zY1pNB`&iCfu?<0Ee4UrilU0gF#6v~Easjax7c&Le z0RvJ9aMwfwZ9;+64+`2Qc+3e2Jdi6CpoCZfC!-;(R14%!C_V^ME!d)ffYA`_0B8VE zKnf)8)lr-QN``1at_OGp0W1rPsDlauazhlF5I7TVt0C;3hSfkp-U=WI?+2(I044yG zrZ6`IG((|JzyJ~4A*lZYX#_5Z6LAv(cRr~A!&CQZ0~Tf> z5LdP9ev|EyK4%`oHjWt+cWl`2-(-1nRMEc(tY#9rKE`*v*SpM-ac|mpx)&r6@~2u= z-3W&~2%_foh)K1qbMHYn;y(LsY18H-E~Nby?P^X$)6g+QwHVPU-*4S@$c~`qLemTE zP<5|8m(blp{RWn4AXey0iQOKMz>GV&6cUHWm}gUGC@_AVvzOblo?bn7sctKxd@1nhUTEzr z-zV?fi(hz^?YfsdyWH{3b;2K#3IF6*v~8ES=27-MxZ$sR(Nr23t}dT1xO>J1oC+U6`+3j(kUI{nYr zK0jBpccFYfrhcPg?x&k=dqEG!A}f|-+umHP-9F#=(*N-)fYrsag{FaZ($IV1Zy@M} z;Fn6*B=g|W8{*RL09i89RubZ7Ld~a`7$ktkC|==DN=aG6w}4loSm0M6KtdPz{znLU z?f?gX9SNBUJo1oO0jdZ*JkfzQu#e7*$D@{3IQ&t(n1-~ho?!fqngDZ94;gWZMvq3I2Ds0J03OE*Zuw zJKlM9EOJ^qm;;cdAHi@E8vE%Eq@t-oNe*_Okhg%C?_qW{AR!(Q{1l{43 zQh(1F|8{`;jz@bvNPk14ej4Wgp>O1O*K=r22{dRRHHxG--JH;mg4uto)~ORPmk@mX z@<;zMm-~+%StDjQCQe)%JrqvWxWqFG9Wp&T2Kk^y08>4Lrx`YMJYrNkcu>ceebBBK zz{>v8qDj!Ox(oSa#Drn+FyNK-#UMuW&fBO*}0;*5}pAx_pXhgs8E3DXo!$-mK_(D`{O;!IOcbUf8g&vv5 z)K6Cn`A+GB4ryG&+e4byX-C1c@dj7(D(~3!5rd>*2$*=HeVw9njdv`52-Kkv28nbC zvlNEKEmm~ZcqVc05p^TKfAM_IP}p4-44`z&95cAhh5+ji{dkTcG{s+Mo8KJKk7FK7 z7zC$W_3Lcy#6i6TmR07IUUWA!?|aU?C>spcGb(+9 z!uY;t;KQTNKSpKD>7OMST_9@&(iL61@m6(;9=)KHkacU+jBNBSmtaeN!h^4DiY$ zYb^B9ic`@lIB%O|OxrwMv(8)tcUhmuFC8ANS!Ykd&=Z@il~b8Zo<)0>cjkht_h161 zPtgL{vp*UA9`LG~_o9Tnmecj-a{gFw$x2Z1vPJKY8I%{?hT`l55f0<)&9|IpaCZKjd-#4yJ^MK7xZAFv0+c+^Os(+XqX5 zweMhH^tI;KZT%a7SI}h!wTL0g>k;}puk+1^jgl1A!@-0ci-Fpdxfo&v0bnJDv4)De z7%C7&TT}om05^oXDPeV8SXT$I0%@p_UkPXb0h>Y@i=d`0L?_t7wQz?&i!Xden1x}{ zS`*+5fS!P!p(hIqU$6sUCB!TA4g#-H;Y$d6Y5QVWO{;20nq;1#eqXr)A@urQ)g!c$S>l9J{PE0;&ko)7sG z{{mpeqisP!DZ7w&K5g*kqqTm*3nKY7*tv`|b}NYAol9fcTplwDVE~^w=uJ@z8qx|M zJL1DsbRix)&p3XO6@&1m=+@UbGS)3g< zcelQI`&vSePZZ5DyvO1y+dP_OaE@;pHK`fOGK?J6i)0x@aj$j1OCf!}N%?fKaa}!( ztQkSo4VYB*7*uf_P<19Abzw*ux2iZ(6>a(@PBtEL8rWyqY!fx7V%L4dzDL=nQ^SRz zXx)CykEwB*q3ljD@aI^Z8Nc>$vXb;Ym;0JZ-5w<^P14quNef#{5XWv$(q1%hehR%g zq~tyTY34!OHW|}ebuYHEGv)YszSZ@G;1o&)?j|+l@oZq}lyKJDu^7_H zWR6xe!!UubmpBd@LiOu|5J1vS+~OR)SPzp^?l8W$x=n&=mDL?CSa9pd^ABI3X~hg4 zPaal{rh&4;Dv1V*J4EJt7()O}L;QiIQPOJI*QnxMW)a<+SU#W8xD{}v_VnfIOSjq!>St-} zw-DrkZ8rV&0PSlE`};djUnUf9sCjnk_z!3Y0+RGeTh@x3K9w@7mOIrTW?3O^TXQ6^ z$|rl`!qdf|qOtHtFOLLu$lCRYnzxAR*CU!0iiY*l+7%*dB?nJ5;g6O;$QnEq(I`e# z3&eDvNE_B8Dn*EP1#Za?-ZZEe9g$z=755XDDH217JobWuYUr6hF1Vt7z8hdlTy_@?jLe4IpHpsH347+ zE%3$d>#1eKZaIr~>61oR8TP4@P)RUL;zM!CEPX;hk#C>7YMU|bn!9Y9&bPli68LoU z)V(2SxbS_r98o$2wWi0M@9%Z(Wwy_jvt9sRCDabb*KLPCoVZZAmeTVvXYfzA$zQt{ zE!kyHTBQvGURk6~+h#5r-=1}NxO4K}qS^gruhLbB=#E#V^FM`FEVyKIVaAg~)~NG? zP5Z1>%Zz2Pw{UA!0wyL9Fnm#O0!j#$ z|1^N!Kma;H2q_j|4v;QD2{mY0Z4^*;t1RxgkJG*0(zPVYNZ8?3j#PBT4#gCB4{rX zc+?+MI(t<8ikZ#5q%?MG+xwp0&pgHl7Ud0>_pX0nBl*GL&4>Kv?j0KMI~dJ2PFV!7 zg1DA9>u{#oB7&pi*?Yjb7Z?i&lVIV@G-^yMnC5k7FqiVjg1&bTx?UC3FV_yd?qq-L z8~O}j#o)f@b3ZaDFUo6|GjiBY7kX^M+l~j50kU+1S%znZWKY!}cI(y;W}Y}R2#b$q zSB5WD?Id-6b(i{0*rO@XaO#{RsCYBv9Qu^)iAuHu^2ckGPqru;HypL@Ryx@vq4ika zxJL10{UNJ12wCGs1=ChJ^Y#PQJ%?S$%FZM;Z@QL0#~`ph@#%+N)&~Ob>tWI|#5!#Q z#@Wvkm)4nEgPgZR+;OQVjbWT>W(b`Ww#>W`9CnB_LODJzhdgR^P{&aV$uYmu0-aybqq^U_N!G1)pL^XQ|8~WYP8q)@Fl18*Zc_BC(!S7T5QzrN z4LKD*;2c$b?jHF@5$9psYC-}1Mn3Is!%)e>7{qr~WfS_x z6XfMWu%f3C5nlvrgNT6*Dd;4>l%8-12#~;G#u5#o`-*@~L0wCzRY2*Gz{Lfy1zmJQ zP!o8Rx_}EPG};LL(qRXsNk;)Fgn^<8PM|Rmm>xqt96j?(Z_Z&14z$ovp52eZ96%5S z5!?|BqAai#McvoYenTkBi>N_D2LbKa;Pr<=DHFqZ<{Ca|6tG1Ek%4;toi)L9h*@ zX&V~H!=h?3i}=H==RDdrxTeF*tTEz?3G%C;H2!|8EE$Vds1zXv709tNL?d0rzDn2j zzKL5w-eY#_z{UV!nMi^eTPr-$5|}Z9T|a5`PhIS99WE1(`_^in?%QWmt>n=yYEgwV ztq`-U7Bj0sbc+#<0z|u5&bmO;w@$<7QDo74Liu=R>zYSQ(_!mmqrg^e&zhs&J;^IKQ6ea6?3BxMnXd$AS z4_nb=d53Ll_n%C@UNlqFJV|D~AW|nw9=FFPWdxqNVrpzDCAJS9Bpm)X#QGcY=&zmr zYrFy-1Mn-rD``o2V>8>>8@GE}=|jv}7WX}w_9Cuk-6NH1ow{hBv8oqIbI)8kl{9Xd zFluubrdZB_y*A7lceytaQN9!Sa6Tx1;Y{g*&wYOL@b5b(|63dXyBhkt;*OPS^7F=_ zmv!8|0@8M9W_N7$@{{4eFB$rwl>g&>(x=ELv(5!8P*FdT!UvK3smv7^pQIiGgUeS` zFH>x?mYlQ4&(`i0PW%*5y5Lp1Xqmx-Nx?9L*C=7kARa7pSMAbQ9CKFP^0&MTRv;1| z&0i~=f0Fa`iwKw}{D5<$Rz z!3d8#B`RVqAW>*XFodAY4und;rUW%Bp;I~_kGR;E^*GcIK_Iw-6*pM*!+?GOqYjmA zA!NZm%BciC?ZT~4O8{Vn6*&S(1tB5=i{Of)co;l^0w9{i2~`jRyn>oJ+PN%nkbry; zO$h~e`yY4(`6d7w%#22k!K6iax9A%dpqUV30k5E1B_U;xfx#IVd*vf%G>^p|GrZA9 z`GGt7&$OX$2(0%M`m6e;*%8*}AZ?Y-*lTH>PP|KQBfbT4QDb=2;)F zKi)cZq0=B_7(&6JOU0AqpE7HEky+gGhBWaLbM$Kh`!$QbOJ_VABrlILHn=c2lK(y> zkK=Ks>~!*wUF3lAS*FG1AqD3)Mb{34b3ENJrbX10UMS~yAnTxghrCUpQF!N#>h1eI zUl$I%xYx3pUb|e!`JtNo)0KiPgD|?PXP1OYnXcc!euHvtyLK(N4tdjZMWb?M(`tz$ z`D!N{R8O{OS#>F%Y%=s_syg);2XPETNG9P_!{F|~JM*-$KlFicg1rk1-(5|^y{%&_ zq)ou9Me+(j7J>PSKmFs`%vtmBj-xIEQpPn3R;|bV+564QRUI1cRBv{S{R@Tt5`x8B zdQeagc;)OJqI^JAQdCy>EWzXS>&n$%dmMlJ`Ct76phHj;)muT49eM@f<3&WF0mt0h z`9?|xwTnN&Ug_%FYwzCnf3ySx+CT%N7Dm;GVjR6h(~lo9PMSCs&$9!aRa{%deO6o! z`Bo_}x0GMexYXJ>$Dq6f7fL31rHA#Rq<%EDZalANwT!V*LS0QNVce-4svtbCrM=A~ z?`HLHnkNm|rqT4`hEJx<7{u{)qR?r-`qx3X%+!k?J(V_Q3lrkviMM*c@ywpIPGK3u z^N&VS!JS((hHIQMuXdSdk~pn#iDLxIlyQ8$YkY9(cFCF#e6({ub)bz0TE2C#yP2V` zO_G);hQGd>+G=KhPxeq4A{&lKhaynA!MTfxT8n};mKaFcO~Anq`eFoP2Gq_@5CUO? zK+hnkS!qKxNl+$&1vqek(SYPjh-Q$rK}II5Xo2tmDp7C(q=9fUn$QWH`d|yWC!7xm z2}vSQBRCUoB6L~+t1EDl0j&iVDrSNvL_rBl8;WeGFBT+*C}g4QgMgL*SwQ3jsVJIn z3Tttw>=QbPu<95ba4L{kfWQnyurQF(K}5s_!N6D_5BbAEng&p$Z0)9h>}Gx<41Sjb z)|$n0XA--U9u5iJ23VvOU>yzB!z}9VAY*NWv(?rz%%H7-!eNyC=JX9(*lpf1KZd+z z^FH$@iq=(Do_V+OMg|#sEbf-}wS$QVJo|Ja zxGKJVa!$=|sp}3&izbm1VwMe9{YMAvTQyx8%t8p4@3V`#UV*(;9dQ%PWS}_DV883` z+iYcjS4DWM9nhfeTLX9{YhHQCs6s;Rft*g+L4&6Xx)lfYtD%H-z@!1ES1x8)g*UGd zF)Noc&jq=Zj(xgsbPLQnfm*=?eGUGQ!A#8Vo|)2G9%J;~1aWnSx;fW3JKH-$WPfNI z*fH{L(etR^XIv{|SS@GuMA7!Cu5&KTSZrrJYo%>6xyulb>pQL{XE=F!Ya19Th)RpW zV*?^~?TWeI|c9;eY)J2=EGU>Q{KRPe#$g#wFqAT}JQd2z`OZ`l`Np1%|~R zz0eH)idyGbYLQf>h<3Y^$+m{T~Mv$(j2jNEAzweuHa zTPWP$QHOum!}!!ed;jq1lx0M1Xd3J8lNkuGMuFfnpH&nOkowj*^yggKN?-d(UTzzQ zwFP(u0bq49p!%R~hxExhWrzA>e!Z8H3EiyU15$BmJABrQA?9;3=lffkG*iEP*NZjg zXF88KmEz6Hls((`Id@3ew^+qZxu{*oT|>W5ZTnWyv1Gq>t&CZPs7kiDYVHC3N@@czoqfM9;GZpusJ)K_nSK@>)o`? zS=tuh)f#nmVPKxl|D6AXukKKx;aI8TMpCiq+-Lb%_jI>)XjM_?`@X@K5G>wG$>YwL zl)G*LXEcu+NGT{vBcdo?;qV9s_X|e-+0Os^dHn4s|Bs)5AOi#m7OKJm>Izn(Sge?= zti8QQO3Gat0W|IFeY`gvjJ=qrZ~ZgptzzcA?mRb-AGWwLayE;9@xfSf9;v)@d5Zsz zOMS*?ZE|U=^E5E=+nA@U%#oMbjF$}RUeD0`(ze<1fz@Wt%XZ4M7UD(|<0V8s^?45A zS^m%uXUiv??~XfVi~&>9iW%|9+wpw3>vI34)y?(e3B#VHFI);&?Q-X1dp_MDd>dZ= zwPVJbOV;k;FsgAJ$0}tE%ynIIw{7ljo-X?eSk|dKD^_<_oN{)&i=VqZ*o>>*K36o~ z$a>#3^4$n!VS=$TMuY9r2=5JzxZxdC=HT%_+c-@|DN;hpS47l9O2SE0#1HW6i4>>AMf0dpmrE?y%j{m#9)tIZN`1}Yd}<>6 zx4g<%LH9NsuZ>;Fd+&C2$|ibN$DeK(O1HQ;!cqcOk1;b{sIN+iz5J(4tAvtU=*aovLf6`T2gM&<^*=s?^7meEvrs@7>72 z`Z#F|hWji|f2MHX<(4qOVVlj_o2Se`j8j%X)zCToPx1NV*6~AHq1`9XlJo+*ysx#N zzsINpukZ06NURms@HUk;3XX7*k#Qy_r{v_6zp{`64 zRsgRi`evsI3moRF&bIl~5?XRTv5LG|+PzTUyZp3$wvqk<9E@WshBABCW13bR)B5zU z4CqGo9Es!{h@dJ4c56m5RKi#X1EK0p0^O;~r9ShF@wncv%x=-u&(cm@A6Gxm)`#RY zqE|192J;IbV61?~`@GUPXK%NsSB?T+jnS5d$+G}i zEb8_U`(<0-hw#V-Eu&Pq!%_14L&PM!0j$JD?M3kR7_5zu&j4#ei4d?CXfuRa5?Boc zr;dUWWN;#&Gyp?UfvF3k3CH1Ebc+QaQ4KT%{_SY(9R{9a!D93XfEDki-FPLsL#j{eVpgAnr^39D_F3Xb2KLxUD7{aK2#jm!R^Gwhf|U zD&S@UWxfPrA%(S)74=ry7c8+a)Xk^-LB$MZ9Vd5G5O1Z z$=vg)tUKi}h;0=r*A8pGpzbE?*cIiDD$7tPc^c%ExI9?n$r z?YBEi2}+uxu-=gvZy1bsAt4XKu2NlsnpNDIbo_f1Oe^J2Rw&xHt9cSMefk13wohIj zKIGYjSd^;-5>!I^Oyc-P;Z*zBv9PlB$eQQzPlj^4*UP&n+S!|w;SWVMd^^WXO`Rwu z%_wz)cr}MR7qi$8sQ;kq`}D9wtEBN0ag~Q+hx0^^6v^pTN$WmQG_KueTn%y1t_i{* zxa~~N^8K2{YS11~cR8Flla%dc-rMQX4}Bdok88&sRgVk~y<)O-La||w!)B@UMEQ$?6di`#6l@7dbgJ~wrw*Xd88<_xBLBW?#oUoRcKMY`n&JadW zR}*-gL=Y6O;Op0q{9hjV^-urS{r_rs1s^2@e71rRU^OBpvroy+#V0B*xwn6c#o1_M zZC4L024+t=CNfUMaV!&u!|pJGZ&S(SJudgdD18TFk+d;SSOahEdGh=Mb7_V;H#xG) zWh^(deu&9pCq0=+d^}!5dtOc5t0ljvBJ5VMKHO=Xzuq)o!2J~8`qt_O>EyM^W05?K z2oCrrX@%2u&M>vYxE65>8W-snH)o8JSix1#ulIa!ag%!@X3Q~lRr3t@_@z-W=vKcx zr5iVM?Ak0$G0=s|89^wx+`EZaPBI25cebJlY!=Ld%VI81xT zCBB^PUtJ(>@cPy!XnQTaudgO{A3d3I#5he_>GHnA(O5Ab1n&hJEfKsQg18`v6F8B= zECy(T2CFC#x}#Yk+R}0iE3S{WOT*|caeYa=kr-BALc|b4=r0P4NXX3)Ncv!As}Pg` z^hBY@O*$KAY(ktfWUy@Q%^(!++&U+0E}WVb4LdeJqF!^5JFW0 zV5!h#4<&&xfeZZS(Uk&N*#v`nOHsTH>XU=9N3afvm_JrJMC9Pb6D}o6C$F^fzHQ^a zEa{j@%@9C6L=c|my&Q1E@x9q_m9u^JRMfZ9n(k{pMbr3%jIj>3FHwEqQZNuxlug>T? zcZxaJO1U@6`!wwHsxwI*y4?P~Z|a(T?1Y+i>mjrH{U%RzoZG$9CZj7}r?q{RQ2Q#n z95kh*q(V*`_Z!0CJM!?yy3Us;Y*UqvCdeI%QP4y|#Prj?D?n=I$cjn9`7;Y{jt02TDlv@eDgin?bo&IwBx8l;j?ffsVDR`#;ZCCuC zc9sYZC6oYGz$w8^6auwAmR7W|b-f&$RQ6H>$p6r0U)zgXiD+YoZQH>-Z4 zuw${HdEsH>TuSw1U~1?2$3ro7({34qYQa_N5%m2&-H1gsn5Q9TPY|741-D)_{5w_8 zlI4Tz!|Pt#WsEBLSIfD#?f2>gr!}xG!n^m2dJKqr_aTlg;vP-t7?i+P^|O8Fs$V$~RmBQE>BPg&7Y~i8sg=U?=#1K62E=@#C z50TIZH9G{L8PxMJ$d^(TT7kzHfDa5@i(U>^#;8rb8A!{p;%+cF9uW_~$%G>EXB2f4 zHSH2>Y41xrXYW1bK!0T)Jb;wvMAqAG@?KN-S`+nUMfdu-xTdVqQNSw@tpQj8WKrm! z6I1%soGX>>%H+%*Sf1@W8&%myeM_W%=<0i+<5zwnqVZx}H{jI(>tzpZ*U+=rJfK2K zw@A*Q3^6N4EJ_jchwz8P|H*T`YfKTNVyrGYA< zr%SHM{UA=RCcWzCzNzV6Qr5mGzTXeQ2P0yk7`gNN)UJ!@UMwcOcZ??@de`yCOR&0y zh*F`1PBl)u6j3k4>KDmcR!N%|>6~s)d@xr}`V*z^1%n9wsEbqdO(tPsh`!F?yv{2m zSGA1+WL4G=k4%4_W<3MEn(dufr!BDwJIwxP{x?}#9wnN=jXGg1iBFcw$ltZIUN(@Q z^)S}6O8aBu??#-DH!-o4kx_)n!RRxD6M^`GPCui@UxF1JLH<*|{{N3xP`1Je;Yxs8 zLgH!Zq`hl}&U!OXSwbzfna?Ju>nrr_ zS;FcHc^(4R;O6KXRG7v^**l%P;FC4$mphu${oxVsZ6WhT5%WU<{atL+hX2FCha=zJ z=X^X<@!aWty}Vg2Y)tqWY6%!zc~fA`AUvc5g7 z6~Q@ib;|hatVYD3dHk|o1XbeI_P&Mm?DnX%E`5gt zS>rlQCRm{1QI2^dn3iX{X+)R3&9DVvBI8aSB$1#5r0s9F^ zkE<9y)v;{W^zKx!e(H3UkWjJH%y{2D^evga#pFM4>-pZnt@OCj9r**1IPnmSXb?v6 zjHbn1S(6)G(?3OI&6$L?83hs#+16^icd9xx>HBr4yVQAIYK=@|6_#-ZsL#haufP*k zIF)jQzCOv>o|$_~AWaumbk(#m$js#d>iqP`i-pOz>zu7w(!wltX@W4z;Jxo9ZC@=M zI|mDty|3!IKhpW{7{l**V;dd)L)kfx;;yB7d-<83v`~=SCoYOdu<$n@vXn29AhZ%J z$XR}Yr9VThUylEKcZ3jyCP@H-I6(-jRbPI9-v3v-|K6ATfBSmCEBKQDi?2AWD1en1 zn8--&Q#_z-W@~*m>QdV6V(1(suy$+OCQqkwEibmaUZZ1eT8>=oa?M{<3hG3x ziorA+Ygr>|*NU-fQ1Bv1I(3S=HQ=0UJ4lyfL3>etw z(~UjVaKM+O5n5v!)0^MEmi%a_tz(M80)uyON!=KuY;t-Qp#Dbbn<3D*256hDjCaJb zAG5(i(CLBnfwOAIZpa-x50Hfu_k}zWg9GzqcK`=~EO2rFyn^*ONXmY}E099~Uct<0 z04ov17zC(T!~pOLgXqId2WW&ri%Z~Rg9C}_5d;IMr6F7~6yg;Qq!d8p0IVP|mKYIh z8N37F6<*9%RNM~1TH{3Rg=i*%+Pp)f5b8ezas>#GD_}5=pjZ%>0%jE$zCx{n;ZC#sT%9Jr5B$iVKui|FPY zu&Yr#m96Pfb~d@Sf%=BX+~}jOSlB)gmj(ZyAO!1+;QU1-LJ@I4QRRylvxmSL+ct`L z*r`rVESP zvvcbU$~ytF%4;Z3>*+$B#$^A@MBg-wwx6f3bPa6YOmBC((iCx*QO*3ep!-EXW4DvE zAylwOUb=D0+FeamLq=Nef5IgpG5~TwO87Is`sES-HDvvA@ZY=h1&h%C{8zv$SU7+{ zNtT!dUPj`8s7rjqiXE>5tXvHRzz zX)}wQrBVL&lSe%xw3RW&+7xLX{yf3oS@_jWfBY;wfoU5(t`|slyEAd&$@6T^>kQg% zTZ3A{ihe z8w?K-BIb*c3P8lX(7=0$O8H4h`rt&|L`BiSAkGrv-eTfjqGFzSF;5K66~O{Qa=~HI zX<1lFHw0&o00fEJxuVa4f%gEjnrFbsYin8Zpd+az<|L)B}Vy*k5LNo@U-f6kVoYa4RB09Ni~j+J8$7fWhYis(N=)E^wRc&hKzvd`q9<0YoKXUX;Z zqaB@#H2QNkZ<9h_3XNlHnCBsqAd@?bi1}fp0u{8b7}#YFjQ`Zc_+#Wvc0@eIIq1o` z_`a~{%BbX)^h`o8;rZCuM+ReO5cK)9)nO*6Ue|c+jfv40BNLk?k6TMBo64$N)3Sa;B$iVnt%1{KQbTuf>*E<33VMbQ-U`F z@$>5ne*EQ}pO5{Y{9h4791D6;yqN3(B~5)@S6|P_==ivV+gW)bjm!F1_-tRF-e@8CNB&zU-z~x1jdqG&a?qo zSw`}8B02-}R&EZg-(x(#ShnPp40c9r#}rmZ-`=f`O`r5>4gV&ygf+mcW9P;WpJpgH z4aht8gPssvL||sY{y>U%>6ZQtmU1ZNU=UI1G)2;>Lpg|XB$TZa!qEz1=|_>Rl7^CK zKRD%$nx~E^MYNx|F?BeMtbLxVd6unrnWcV)WE{f^ee@!s{bOMMoMSx8;X2bSxYgm} zKwwmR)Ghjhd}>A2D2KF8>s=foZGbQRFl86;3Kl&<(amLm|MM#b{c8^UyUMz)%m*XM zcZZyP%dB0CZQV-`X~xPPx*&HrQd}WiUIli}?>}@_S?$sx<+IWUPsXw;Rw;L&&edJllfJn40kTX>gzpAHwcco(6_But@ z>#=f3{pG{~0{8F0+NGh1KRdKJ##|cgU*`2KWj-9qE1f0`{y-f1@lNw@UjN6GC(j%& zb~SdblGyJ?sq+xSTRU1#n0_Pg)iGse4P@6)5kWcKVdyXo)O_0?DPFQW>* z%Uyad-LA1y#chW@v_B1^HlfHGU3dCw!79)iH`K50i7h?ZFNNeBmi5wUh`%69c zTi}&%6rreTcaZr9-0(-@*mpG6H$>_ifE9(ZKSTj}(k+Otk5ad>sM)4^Qf^^WesN1; zM!}7+7+3G$o8fVZNxAJESm5mpZ4G+d&!QJ+iOW;Cg#qLw9=E`rGLJm#C$Hq!U}F;V zBI7dMJ$&>HOk|~H1o;IxJ?~CH6{r?{c@r6bIHF*V}9-I8& zIRb|{JM27MZefX&24_v3-P~gn60@>9GqXC%>&R%*I+T6Q%zjv2csIh@gPDFs9jcP@oOY*N$y!ssiIH_9fh?_*BTnHuRl$>}=tUB;uQ!OKU(KJ5?0*;1^+Nm3 zprl8yoFB^M?wpb@Rlx&k5JoqRMg`Pu7R>w_i#_lxeG2QF&?5kHen6!}>&CFE7tZ9? zh_3IT(M{adSf*VxJ*|4LtnXtl@iU74>oDUD)E+X(2V~s-810aO-yf$Q9JSqfJk5MP zLVm>}9CkD=CCBvy1=NNF)_eO^+`8R%BdEsHw=^iE_PR&Dw{Mx3PpP|CiHCQo_sv>| zYXur6;kssbB{jTdwEdvO*vL3h=S-rCUbM3A9o@6{z1)jk9J7P3=S2ln`nhBz-D!H5 zf$r&E$KYPj7$4E2Pf#O|QKKI^DbIUY|Kb?ZEv%l&tC+^4oQ^o1giyG9LNyMd5~S&n ze=(vtAeWxgzt_O}R7*Rkp+4)RZbEKAPWfOzak-E36vccIl0AH{W~E{B|Eiz(Z-FIK zUfHaGd)+mI`y~2yYuD(Po@lgv8fKM7eL-(=2^0%9gG$^(*{ZA0(!NQW*y=NWpd^X^5?1y{gwqx&#@EWd z?$p)|ZV~8v1Nb!xW(CskLD`1=`+|c>{T?WMvM9?;#x{k#HZu8|%6i&6IGd5(k(pJN zn^%>boapcGd-=+hbLQr5*8(60m7Z3HL5<8Xb|xqr6S%cW{Q5X`g$2D-7_&pei$wZZ zTMs%pJr`=zu6y4E#S$eYC1GJ<@Sx!GdpaFW{=PUk97e&FFZ}v@wBp={v;F<;zdsK9 zzuok8|JZTptN_VfN6sAhbMPXNGYRPvumdN=&7Kp&&0o$9k}Hmk{WJj7ufet7p7kGh z=eN&+gDJQQJM7av4iiCMHC^p1&W=&B3C(StJ-w4n&5WdsmX7{uG-h>d{MG)>Ps7Yz z>d-b4JIfYTBX7;Hwx^j}z$+SQZhrP)ZRO3<(8e@n5yBmlgv9~+$J@y$13#RO7fREG zV&pwy7&)R7#&9T~NFV>%=HaqZ0Q$5q+BkM14*TLh@r{4gp2p2yd2cH4O5JZl(vc+R zL|1TOg5Ip68yR?IbbA4$O0{m0Wn76IUa=c9`O)-3$K<^GE@vz~VEpNJ-`h)BhW>PHguGgw2 z$7)IGYDMK{QO#z4tO1@RWdm0|$B(f@7L31A9z;S{?6@Y{M`~wHvjh&pq^)$f36w@)nT+GS|B_ z+#1Z^f8!OCyfnt#m>7RXBCd4x&y`k@iptTCa=TK~@^1#-wX?G|Fwj#~S2wq`yb%zY zlA2dm(mp=AF$`f?!paP3Yl^Tj#aN$VZH|tuAO~pqrM1Z!d7-!C9Nm1h4bDoQRuK{s z;*g3nd|({G)gzd2933{YzKpg1WnO)`|L^|%KRNQnyI>;_umfRzw!!{!HmQzwj={nt zdyj|v1n&u+ug~z$&8y$T>gYp8@CgbjD66<$^~g>y80@7D(dH?PZ%DNFIgMkHkeoBH z+&^?UI{RjB?Yjx)`d}9W)jl*#SQ#a5uZ+J21#kEXJJ|ktbK%1VZ3DW5!`k;OdA}O{ z$vM1V*^we~VLGLSLOE^s@ip=?b!L!X;?limP6;)5PxK)pw9aivco6KdDgk6h@ z$ADoh$*=M09pu~d512*?81;xQ!xVyf7V~Q9qFc?zt+rPQsL!dWe+jF5tK~e#KY~?bjl)cceYLC~rN>sDMYhS0y*$&Fs_niqH*Y+VB1Taj!S=OPm z)*)kHo^i9cGIuko5AvGdHlw~9VEij#2(UOiIF@ZtBh0`o(MX#l+$svQ3^Ao%^hWpKS|?!(tY`R5N$+wo`gv~O{=?qq*#obN zDc^&oA>UVy{QI4TS6(@*{tt+riRgO5K`ZTb3t_DpzuJc1fWo&H(l4&z13C^E3Dbs? zXR3@n@R5b{kJ_KNP(IY*UiDFS(5$D(fn_viy{l)UvwNIH-C&T{X7C%6m{n-5UEjB> z41TO@hp=sjb`Zdm(EerR=@+6!)NYG-q;9Ez{F z*SNYB$Ht-3Qt-XqkMZ~?@F9RG85ji0hVXMk_!$;%n!?=0lGbVmcB}ffihH**n-}u2 zFA8uki^z`)hvJ6A+-7V!WCkc|SG@$`Z3x^?h0Sb(wi( ziD}u<(Mdr;k(X_3l@ygFB_&UuJZWfb>Ez;lCps@DznwtZ92z-*I->~|#46Xon4>GL zU4-<~n%GDAzF`rUoZU>$noFNn;NunosgHTh6V=G2HWGVTdE@aP zm#3djvNl>OFr%ck8OGD)u~#JeKJe;r_t%B-!!^np@M@a4yGVbQ+4T5~YlZYBH1O)Q z1ya+SIXBk6(iN}5GS-tL7 zx#(5Do;dtVIQH#b+_!P$A9IKQyLZL5eh@*_rsizKnCPWuX{$b9pqOQcq;;=^br-i` zm6T-^!PHf;-X+CvV>Ay%mQlZP*wAaVPT2$%*f#CcmGV_E>d$kNe_EdV_sQ`erzd|N8~X?eY%rYxCt(b~K0(}EA?+>`cb17;i!co*Z7kAv zCuuvd1dl^4GAP@u;b#M=#nzq$GV2A3bw^sRT+ zkgi|znb00R|9&tF|Eh=W+sKLUTd1#k7<-M_W#AQl;&nm$3&)UN?W^dM#&rnAbXluL z3%_Pd|CT#B^uE!bu)_zP_;r94bb)X094#(I4be6yK&B73K1!4 zs-X5WH@Yaxql{HBcF<{PdwuHl#`K%@na}v%)v8)ddDUQgR%K*NhEKq)OLngM`sd{2 z)P;pagan0Q_`__@>Vkb>@SUX8s^PIcGIa+GUxl*4xBn~1#r=n_mbdc74gLRp8SgdJ+%>{z&Y_Wr2IrACBt z5tQQc8-grkrJzCEG362gomzw%Xc<+5+9a1@8@GPxF`XiD^M;cajoi9Te1>fZImkJz zK55h>pjE|lx`<0UUs$7-7j!A*3)v^8UM_1r0PdoU-Jq~_leldg|M_x>t4)$FjiUC| zYS$YD%pO^Wqa5xtBroRi8YPRK$rLiqP`0j;H7^!7d?;&{FQOMOs-NJOgwO4K+)df- zAa3C?8|Z-*I(BQ60xrihEOrY=KkUJ5Cuj6j)C~=y7WQ$`&Kxks>C$FK3g#I5Ic{!~5X$NGUM#jUG# z$hik)*p3zgi?#$=YUB7V+|W069@(;&YQ@Y-WbNQH%rJGyzMVzQDkFmV#dTO*%e>%P z<>1%)AeDq3d^I`zVx0ASjI;qZk6MQ`-N}I&NFEr)&qHC){|9`5fS3&;XcNDlzk3!B?y&YwD$4#t92X0`ELhhE?HW-Dc~vc=3s?PageM2z zE{#iW;hZ2RX2tQZ{_d;%gC7J|!x^&Q{!y@9KtMoS-~5_qP`>3?*ApA7D5)+hi0aix02v@Qfb#4BD^1tWVhjDWun+<4BRej0RJ2BMDiw$vXELhOqR5iDuATBM4>tV8$nRF{<&oX<(1_ zUA&=hyOCc9C=y)0O|lNe>pHevxG{Js5aW}`@V-xv$QizwM!uJaOfM$@tcDl|kR~+E zdO;xUHa3oC7DY0NEHFT;=T5+?TA8Jno-=iRgK8i$|NO@7KF zJx%T3i)~$rZeC05-ixSNP40OPf>E_2e?iZG?wkB(VEA2G*HUr&3$kaLrVOv(mo{AFSLSog?> z8rNu0Z<@wFH;jB&M%ZZ@eu-l|B@R6wroAC!pVl=_);CSncG5f0lQqqljNJNL z;R)bi7@C+u-%J4!{$s$Hqv6Wo6~v;I6clY7z5PRDu_L=k`g%>@P);2>E3fuZPW7Fz zSO|<*nAs@GYYK_WB4GA+l%H@6%09rO0a&psm^l}~(r;5j4ov=&y!!ftfAjbM1}nJA z9<{%l4|4V)%q}J*Aupq>Z(<3~WLV6j=;XrCJLS$EDgQNi#R(Pu_GyTVi<@7x3%nHt zF?I}gsc-b7iF2xm=_B!T*-**eM0(#re_GHn6`9tZUPhgSG#lm{NL`?kmWLRdBdqP> zMtuCEdQ#ua7-@5ryg7$i8pdxzXe**{TERNwq)976sTd)fi;&6^R4wN^oqs~U7$KP> zV$cXqj-pMY?D-mpkmg#NrM_*ts*d3E9Wz; z7BFZ8;{vDXbUs40K-i>S%&7dhN+v?T0Op1Y-uO$Y8|NdZ#LhQzspKPMA0k8_@F|zF zvl%7Rc}`~>lT6`K&t*$i%056SW+J50*(R4Ipiy#6DVs|rSN1|HLOBzmnl5mr%siZN zqwtBkBO1y>cyvnyjVi&owTlD{YrupI>Y-GGU$0E%N}qyFjoQ^FZI^1>+ZeZik^$=L zPRt7w?PGTHrc+p}nrp7UPnmT{RpH=%Ti;gK;2y|(f+lA>ZmAWsP*3`IK#j2RBd6G* zpz^KczK=0I`$^~*N$9=%gFDH6n_!8pa|O7^c>^oO*v;~R#cIrIaB}U9go+08UKMtu zp7tk2>l}WK0zvqc#51{N3J@o=K!lT51vJl#5poX^O4$hgDrHxqq;Zjvb59fPu!is$ zi5xU*0`7YFEFLriz?ZfEQi$2s`9%je+ zew(sgj?9GzQWsl<&QzVYYZS34wel-VtzYOtEp{U325_5w=(P^Uc6uGLnKW8~B&Vn5 zdwT?*Ib)@$s39oG&&>^qP;6&}^KCzxwH*iYoRXHhaLLC1X5jtQ%=n~?L_yji}q))@jIVXY*@hLFgBY_x>Qw4B2!pG6CKl?@g#=fG5bNK7E zzx{iJpuauzx7RqQ{be@Db~C>43VbSn6>J6g1y7xn&{WfOb#e{36@Mq;q5s`-OQ%?6 z{afc9GTCH3@(ST3zMS3v>~#M2wf_OGaXuf;TE=f5g@lB}1zV@6gj6(Ukwo6;9(sS# zHxHp6FKCpmWs?FLcdeBDf$=w~#iS;+_r>eND|ynsrXxOOeCVyTEmjgs}Cna{YYU8`5h3TFD> zdWL>(AiZyNTo_ zBSy?_z@c<8j`Txt$2(cSE>#z#t`}bQVvqKfK`FCF8H;9-vyG=L+eA&*Y#^!4r9ck+&Hf=1O~ z0)`cQ`enR&rLe=LRmum$|1wJMLZ9sUHa$1ImUEj&@?1#XLd)o1X;VKEMm}K}-_~?& zo%bsDi5qZD!KU{;>74kXWBfA`e}E#rAQ1P!1{gcNl#RryXIfXP6fai_7^I6_$hEwK zzw&?pyo&B#&11bQX1pz;zbPd@2VUh5u2zutT50<=*tL?b(KhmW8}k4)`!TX;$;`J! z)w)yWY`wu{g1m8upi((Zdj-@hAd?eLo>#9N3h@p6i?2I@WY)V&#q zP@z}n30uIc#gQkgi-${d&uAkDSjskI;u}2U1$A_9ZU4uS$wLUX*A2gY(7klVuU__I zy4E#}P)O17nWED{h$3!G#@VV&_o`iHRDSo^f(@yLBf%GA1$TR)VWXu$iTms)nYdsuqz!PzmBrDLRy)}&O;&LIBu<#^yz9~BM1-ytiV$ef~IdOr7#>s z^s8jdT2!sdtbGS#lLztiZ^*=TEP4@5dtL{jW7^MNi6mVQth9AAGzv!;G#pne7d38? zHmViXDiu4^W*#to%C<|~rbE)LLD9FgX2ogK77^_lKGiZo?OHK|CK;1T6{{xeYqd9Hi1{U~ zZY1QOK4p*}6KRJ8>hs**caC?l+P+oRvB=oE*;>}8I^2^7wc{xIRyTeLL*MPiuQm}6 zb6OTOTp()n=#*s@7>`+*;Q4AkvvM)(dKs4nCC_%#n^hMhTdhKhZxxeD`WBnW`@Ps5 zFg$7-3^V#`VElll4@%0uS;`7|%Dfj+H{pN8uU7#kYS;`DUT%Z>6NU}q=Dm{V2h{Ak ztwTm^yld_}WOcNS(daJc`{*#NLV0~mY9PJV56jEI(i0&8>dia z38Y0lae<27U>jx!^49RQZ6t2Fm#|shJY3MZoY^!}*g0K;UTY#u_YSR%&%Ya*dWj`J z>qBp+woX-3pZOKjr5%!$97`3h7F!0jx+LIg+hzxdPdNR>rpbGlmN8W8*d%2SPkmfa zM!c8R5FDH5>k(#q(M?6ukY7ZKM@R(0!w1PooS7RNTfiVbUMYD+H61;(v*%5W%=Gp3 z6%-UiL_~Obd4U5Q?*)biCtw1UI5IZ7AX5PBXa_L%KX+C*w{mF5+5VmT14r2$f-v%N zUaq4u6G-0XLGT|3*#Rz?zkYoc7_i*jJUl!QZ59=ikd~3x&^>q2*3CWOPDoU0*u7fc z+eMcGi*+3mRUC2+y{lZK+bsQx5eN}5PBsI)4%qK=vHnx+{6Fy^4y@RWI*MFz{tFyl z!9PMwRNTPgvVV9i@CsIBP!oS}i)fY8cp$5ms%ey@pcxIY!i>KskXK05HQ-fr3ehE| z|NPDRq#XJn?IXYnDoH_33VuUjac~wrJ4f9Gy^e0ikHN_VwTlBfS8xg!kPzPnSOLCd z&09^bQ_i_{W;TAHjsAe8LVn=pFzYdjdeA<&QHuTm=9RIlts#pMNC?3!dLWfvOp!0&!#w{<6SKA^P`FXrtQ_O=+r1-*rIHOJbe}~qTM5`(eyY8KtHrcEkVT`CtkuLMs5uhg#gN7j8PW&G9Y;j*%4 zkBl93-Yf@q3wWh#jTTlZ2Uvk=TtXQ+QIszZTKG(yyM{G)$9Ld=>LmP3VM23c$Zc3- zLUeuTO-tv3PYTQ9KJ7;FWG3!i!^rn76F<2{)|Df-2qTX%%$-5X)&OY7jeH7B?z4%+ zt2@^S7#B)dRm(bc3RqQ1UTM+v#^?kNSj5o7%EliJJT1cQ)(^ez8F|$^`Wj1nUegN8 zz6ZnfmyM{G{?WY#fkdmQ(KCM2f<~>!OO<^cxC7rNF2bjOG6QkfZb$JpU|kQOvVOi`hfwjW?9>_v-?w1 zI}=k+N5}WaY0uzGLdWfqQCk@D29CPbgWtfho;8yXA^3ow`$U-kma+DlF!z+i+Q(A2 zpu`wMdYaw0T*o-99RCjbRECzWB(ywBY2B}9{Q+7(fS@`wLj)VeZY(knp!RbJyG|c@ z3GP-qW-_z9w=kzBE4?%%BKEwEqoTT|n3T*3E^f$20`G+F7qP=o$B*&yg9-ABL0=Vs z0B6zxLjz#NCe=~40B3M=cy)vhpa+b8P6+EON&a6)@c%cjI8Gnu2>@0{;=bS%@&c^5 z5P(h23mt=8Dtj@twQXQ+%)=)zEH*MG6=3BP5_{e`M$634{#K=bN{>Sv z%K0AFBcaa~{35 zgxke3zw->P)3E6`aKs5HmO+GsU%3=a#P;7r%c<$jay;$5F+7%22~1|dX5yPlzeF=+o9*3nga%*m~%qE zQ2t7XkyFjN>rK6bPq3udBaEG4`Zjn7Bh-Bw@imM3KD~82B%5Ut+-)8)P=I?|M)}l+ zIS7vHYUo{ugvnm|+h*+3o{60%`cm!iVIFopp>rjwc`mYX^ltOGbM~0Sqv6>0gM_XZ z4+u~5hu$?!yelE^*D{{eF`w4r-c_MrM{5JzY;+r;rT0&Sf!x<4`d7K}Of zoHqTGJo9vT^$m9X8Dr@^ec^p8ZW&Kp9vWe1ezHhg1GHCz^w&+p-J84}|NJK(fT2W8W z)WONq+czXIJS`@%C?c`-#+|CO_L=JE;&dI$o$g?7-0!vvEb|M`zkRs$Kz+Hmgw`=|f)!T;y}a$GF<`C$Ko9OdG2enj9?0tZ-C&*Xx=OHpYD3Of!mp?5Nn zY+ea@^N4yu0k4v2XjbhcnX(B;=_S0gg<2AqTJ38MmabJ6E|r%qJ-U6n4^kP)__Zm_ z{5)}Gg|I&}u#TpG%B`H1GHDRfDwEM~IU!pJ@pe&7XerWea1B?FeBMX<4&18I;im&V zBYW>ns=4tv{w&35gSmHocPOEizZzMK07{h#85fe;e5J>Q3)> znxUAJu8orC+qfWlf1wwlS`3kY@cn>Sd>U19=Q_o7>tswCd6e?SbjpP^ibb?a<<2(o z88rg3L_q?@p-suX$uocXZrgW8VHA<`O?>BS09O3^r6O8|g6erfO8F96)aU-ggu9G%a)bcd|%-U{7FPhUl! zw!zEW5@oIX^gS4o7y7{DtndOl?PBK#d8vs_*WXNvaWE=DG%E&=iA1k-8?NL=*YDq(SNpnVNOIl|0z0{h7M~kE(Gg#REx&{WQiFb7&WM#UyUl^{jc{s`AUgCpIn?5nmMG zpBGa0i)l}?2A6MFlH1XH)g4Riy(<*fYueB=uxZLRbPQyXmgx9-@UMttJM@Y5`c8aC zS$%$eM{Y%JbV|m}fM5`Qu`oWTF0UdZDI+2%!pp-4-~2CY{hYNw4y?faV%M^qU>nRK zkDzsgEcO`s0<{0#fy;T^?;geW@Q#9G>_8d73YIWAygGVGz$hR8aRDJA2`MQRHJx+j z7q4IUjg3vZm-sL_H9Iz`I4I)5wZMFnOOY3^6`46?yT?;*q>Wq+t_Vu$PtEHCOG+vZ z47~Tx%PY=D1+aq8oU?@=moGmt$GN5DWb7R6bFxb4)G^}Fi^lFbed`i&wKxQiKd)$* zf?=FzcpsB_00pG&xX1o?>v;?!9`-$x(Z4IA8hlFT_BpHK+X-F7p^s3y1$rIJ{aZWu zXG6o!JG-U~-J8$)c8aQ&D4DiM=+~Uotx~hDHFEC65!Rve`1tVJ*4nF{zBw{=Z+7B2 ztYVk-u9S2yrQ@FFGv3DZytGOnC|>Uow}pT<_VmR*O*=BAp6dIMFWjEe4CqWof1ir` zbSaqvb0SS&teo>8bUzWdZs#_svbjmI4WijZ^gZf%SxWjgAM-Av;ZQfAPu-OueW}OD ziw0WXs#nqSHhr2-WC)8vk%+DfMaHUK?qV0@g+hSc@H+PTy;XBxs+kW38Yy}fu0(ge zyNCR?YT~a^t#4H9+vIH;<<2!KTeXSnR7)E*!qiXG8hJ{uR#>APp;d6ws#(LX#wG+8 z6xEF+e>1~47$fb?;OAE8(9mjWlr)bSdQO>om(j877~Oj!EDmrv4n3ijS+F>zevg9phtA4mG-H`eE}``{c;%3C!5fU{Q5@H}d98!bVj+@jBiU5|=QF zS4pRBai^W|a?S)PJDjWoq`*y?2CwV+(-fQsykeOq&J7gix5E>^fGapmfq(8A0BVW2 zyi8hIr!21!7Z$KHtE9zQ!t4ThVR~e}IH&$mZbi(!hd06_yn{o00|Re_g!l!9L-~B{ zy@x631rKvd9_5y1l+>l-^=hjCLK|_y|*;U#9SmS*B>9Y?M%pacK2KHRI+31@>f^-Y?$Y;vvA#vy#3G<}0 zc^*0a0<-WIxBM!uyf?0}CA}7zTh)=8UmF$oz|%MEioJ`0(K$I8xs#$N1&(v^Lpci! zh9g(xDD45Ji(kma88twuBZ?f6>*$u>?r^ko1hX$**zfnhJjri&{`#yO7w791yt|`2 zaw=%}Pw5N zL=oB4l9ZLYU~@4pCWS;`bz?U2DkvwU!w_Ntz$?UYZ-jsoXm=2aJ2>2CRoAkX`7N`c z2FuW9gqSNr*olkJM_ejgLCd$iac%?@ zz#@!u5h~E6G7ljSjm1k5s+kCtN8A<B#02FkE z46AvxOHZF~0SzUIb2Z!=Ia23ph4o9MoT^;1W_?OGJd0LCs-Fm5fOeV5h|>uOnFnl> ze29QIDEaW1Z1xF-d>P{=9>a3YYdAURn&;Zm-2V(s|BiuPAHr=-pr=NVW4LYxJAZrh zWo5^tPa0AEYNl~mV{GSkV*kE(A?uuXS@p;TN@M>&uY_Oa9;C?|! zM8XwEFO%~Zj4ZA6OiaLZjm*wjUB2Sr>2f{5%Rdxygj@q6+-}}>^@|9ON=6XH>zTH_E@Bd!&IkPSkd^hJm}9GAU*OgF?nzCXHQHlcON$e{`$9ehkK1R;I% zlxgfqlNfuy(%39AlDIiY-Uc!GsuE^kdSh?rZh1rv2&#pM$Vc-_-{w=it#4a8I`tVtJg7rHj($WO82^*mwIYerzM#d#E9fmI z5p-HVvpI=R!QFiUnb85HnMLYQRTnj>#mrPShpN1zs;m8LqJv$Hc z84>B^;3TY9L~l?$&NZaxif^-XQ1`X4e!n}IYr#FY5^!Ph*s!?X`bnya?J=5e6g8hANzh2VPFD71sri%TJuv?1j9dAWC6&Wu#v5pF3N}Ptq2lL8 zh^tfd?RCQ15_)k1yR=PM1z&3pJ5Q%DNq9u2M zDX+mga69ptNT`$~&Ap?nvaOLi2Q_4=wf(Wht@lcr63bfR9u`L=X88x*b@L2zcJ;n= z*~!@Syq1osrnU)tt7)XJZXhG8ASN!!$IA~vc!+cXWjF>Ir))!jIs+KQ#vxP=!F(PF zl^+@V$d_A>?#ZUqiDOWK%#QDi2un*!D9g)hs;cT}>gem}LzfC@>|*2SY47Ie=70NU zWYX=Vvb(93At_Ba5^8KC>d*QX8u(Tk`cJ;SJ1G1E?{Xqn@Jj(ZoOKY+7S>4B z)C|1bLkea$(ad9{ox|lRBrH$X47R zN1#I`edo!+Pb1?ytNVYRSo(H->BAUn4~Pe;-5IT$WDr_NqX zoYe8B@>|q#pQ%L{RvbT5Dq-IadF-wwTOOI~s@J+S?V4X6bR+f@3oI04r(J zW+k&qpV--``=cb*UrCe?MDly!6&0$Lk(2a+Dbm0q6}NQ83twnTJiz1*3b)Jiv&=YU8Iuexmo#cP9EyY+7hCYyvO-q^ok1$s;J5t z8S9+0G&^H{78bT(c}q%Ej1N4N<2*dPf{JRo78mV+S9tX3(7@aTZUy?j73RU}3}_EJ zBltn5-5n$ik8|50Btv<$la7l9A%t%t#KL%GqBJ}jZ&mGB1@$0QB94oDfr-ewdWF>z zk-NYv^5i$Hg&!W)kn&qt^@RBv>`WVL8IaY^Tq^3NJ*@A2P}7x?U!7V|^Dw78BfBgc zrl^k!5|cAy;!>kxlELoYy&oPP>*ehai*fpT2Fgk*$_mP=N~*Axmz9U~c(%za9hr)f zyo%y!RWKzvHMYsKk9@iH=$_JwrxoC%(bYCNV`5`{@tUhka6rJF@Nh_)ii(Viib{m8 zdH2)vK|C-aqxeo@c1T=-M@Xu4n=J)_1xLeadX3y1WuPz-}kE-OC=h zn@}ATQQ+j}YG!4rq^v3`cJgZ$#8IXg$DR78M?O7c~vA{Lu7~9c0&aI%R466?* zX*opZ9)0W}qi#*p`hoJf99hG3CCf}Br%KY~+iubhc}AC;w`hvIm*WG}Nk@U&!E*E``3K@b4BgcCp+Ip3fcg?|PPve-&Oc8=g4OhPpO_ zLfYpN{W&y>f`ori3>aoS0UakaZlBJ2gJ!&e^}ZU+eq=T-vSPf7{-JvG&ndl!_USB_ z?D2C~>g~Pydk3I@@!M|3dzY}9TM@w4GLkm>{q)%5jpcWA>LLy^QQbUH+1Ovyj;=>Dkh6QeQ`@-JcY_NrJ4f~^v2#Ve zWB1Aj<4bxHN_*3)P+$p#UH6K*lS?}86|~&Ts|icW^$d-5^u1;4>H~K5nm>3!HZJZC zo_<$7{A}I4;Gly?0B39Oe&fnDxYgU%&DX}&)ApLT?KQ8jS;(D&6^j*s#T#oCwmVpUK!-i&( zeeO1RMb-u1EscNB3I&qsIdzF?j{?IYFWcLhnw`^7)sU8u20xHJmVr)37nsTZy$c6n zfA5xm$YUJmijAxzUUBAwFhPVbn6-@)tUh!gXYll$oR%H)>!o5E_W)Vm@zlJI*UhLE zPy>JtP$`v^Q;H$SgxmmD#}PINgx#@Yj*$GoCmo_?6m|C=c8a(;0dT;qEs}O9l%K$E z=WglPH|TgEwXXM-RLtVZA3W%C;y76^w8!*bV=8Zm?Vi3HDVYC^|m3+ezw z0*5Hin4~AG^qmFLIxM@7V&|X+1ds)~Mu4m-^zs66a}u{Rf!&@aJ^^Hn6Q9h|UqH#; z;`qC%kpnVzrN3(wmMoj=hz->^*p4u^0air%Db>Ok>{XY52`KK&0&id4r<3HuKt??+j z^NBhjc&rgzHpjRxBY5oC#_x&{^Ac3f(7Mp1=!n+$Wh!~}>IUNN!g~vmZwd6LB<2AD zIYU7&PzJ{7=qU_(7K@pKWlb*2Mow;Fw7x-KSkTu$n7OGi5- z^*Kehy2tf|r}o{;C#B`~J;>{iO)7Nvi?X!7qO73{(lLUfB0OB+&jOzQgGE3sn5q7~ z%YWSG@7?;3bqp}Yo(X}4z-{zN>EV3*1_{ZW=SK8#aw!dn|gmEzOJBu9Xb00 za{iAcn5Rv&?Y_wugTvo?L^O!Y1;96om;WksTj1ii7Zi6pAr{DYD#Y?i8Q8+qTPAr2 z7LS$*^U$PV6ty-({nS^tl%B_`ZQERA?N5<6=J1=~fNjowCiJZg4orb_#aw*bLs{E+ z{L|>{;TYpNgSdyD`9o|G>vH@kbZAxcrI|-BUQAo@D1UjU=W{&j4^f@3qr2XOb!?^6 zKVe4RqK00x=-ZQH&*n$Ao~*rnw*GE^`PI_u;pEKj!qnQ-$imFf(&G5~+|bU-#M7zS z$1Cfv*EZjS%`d%JT78W~4V6}OR#diE*L0N>Rp;fDrrb{lE6gsz50c2NefsFL>aK5G z0{Tvy_o!Y%8~aTNpKUksAFzuVGH}RFD4iY|`7ku}Zh^Ev!)|RbH%46;r!Gy zpl5%qp}c$4xv8L&d0I0=TryBd%#WMbOY~$gpKz?8SOTw1vXXIy+|@@#l#k`imu>Su z#5Fw8^K7*CYVeK04?u;>{12DhEA=mC2#ebt=dpyghR~D;!L5CaPoJC55=>Y)0E}BX zN%=zc-O`2Zo)@D-Z-$w#pr;jN2r#jWpc+I4DSqY-jj{#FCm<|LC$JNPXJ~9;MzB%x zOiN|Ax1T@g5s3(k^PJ$95SIcRg$72}SGNw47pI0c=SB`!r{7JDKk4ro$;z*aPs$37 zxE~$=Fgv?(U|@8PxIKg4WRPCWPyXO@tINPDRqB)n7s46=eTBHJ5GQPT#jhDfbOhEe zYlaX)TE0oFeXi%+AgK)Bz{>)B7kN)uArR*U`5X`e0n+Np3dYINnbTDI+T`>zDq%c7 ztIEgS*UZHH!X;amYaYH(#gSEdKf69TujxTqPg-erZVR5Bs=D@qzWW}(@|wE!4Q=N$ zcKKb)@J{c{^RAhLj;W{lsLA*`?5(06-;9Q!+;-P{Wgf|`zUf`Q={?@y7o~JK#?*!6 zVZd%=A>C8jof8^i>yyy~J07WR*OHpA-ERuW?6be$=#>(-qF-<#ns?*3;i zY)&g_35bb-vm8K+KFAgxd0&Csf6%&ALwOxtJkUtp>SKJk=$-?-f*(P4H!H*i zJ`raXt#BdfaBk6?Cq#Xfb?*=U2h0!^UiDUV06ug3}Rn!5M$%BRNR3r}Ig z3f!JC$}>7dgp9Av!$UV&os!RCji^4{9Qc4P~YM4cTTTVG$? zU7g=vo!;J<+gqJ{2D}=b*zWA16_s{n=QUT>3=|Z1lvQ>W6t`q%RivaAL`K8~_=h=P zz2()b7Du~|5U#WqX!S2z0sOf(r5}$$1;&&!c z>!XzUaoQpsGYQC|vISB$D6ALv(>l8tFH3ut0ah7ZE6&Meo9IC<{S1VBG(!D8LOx1K z<#tocA&GcEr@e|TrdDD0x+Z_|Nkz+PJwynGAdWjB5Dr{Co(Qh%yh1UE6A_}yk0dqo z0t!bfhkmRcc?-xg5AHSeX$elEcTj#MFaMHILPm&RLkK!@^PPtdJHRV2;1%1BpFwb) z<>GQbe*8K@CWc2fMcgzYykMG6IUwTpApLR_w>m-H9KtUHuPDS70&aywSOYC|urb0C zzH?}byf8_cAEV5cX4Tl*UzL=R<>e9J=M$2bRdjdrEG?|Yp(qT(9BAK7GGMN~JvO{M zKXX`E)|gvVTT#$$U_9-Pv7RO-DvfQA^jr{Icsc|L~xg?5MQz+i8_?*^S{DRX6Sx#Flqd z;Kn*ew)&!j}4 z!tu8;{YwBV+gyxO5%EUT1i;E8pX8H{a*Ss{+v&*D_@w}ax?M^1Xl9CAU3j}RFPMC#_@(~i<= zHVE!2LcBpxd~`&^BQmaw%6<>5LUb(#Txj<4Dr;jIsL{-IF>PgrI^Ft^VXnY z<;?Kg?!l>sHeo^;ExS>eQ_F5+EYB@`Gdca9$=l`#cS}3pS$j0^6($^ugB^>Y*V{cdE#d26}JJGXAPAN>+56RfW8WpPtFQ9 zLAioSo8!`!pd%QEKF=Ueqir2{t4;LHcFt~%@Ka2~Y+%*AT{26pW%f>jBYh=Ww%MPrkwh)7<)m_INy#dtFgy>zMH4zqsb zFy0EeAI8RBQYaJEbxbHn-I)It1g|*s9X{(dbL3wxTV_fhafR+e1ngC4hz70Di1;gb zS!m#8C380+iTj;T^{(uVY!%HYnZy1>-Tbfn z#h=)MouYEOuSby4*-P@$(y~%gkefSwQp?o%vgPf&wl?-oPu#tIgQ8=TLlaV?({mzH z^Fxzz5=)vgsyox_1~VEc#e*X??AfN_tup3Z1$VWQw^l9KsS)nBPVTi&zpoOkfwfJ& zZJBu8G`8D5z1KSZwpzSV%wA}jdQ%}-E#)qy^^Rtfr_#HJat9|8TX`?)=z#^@ez_f< z$+fQW0F^~Pi532Fg<)xx30dWd*%c7{k4?%Aiw*S)^?mB>X#2?K=GChPdU{&w8p=vX zpuGjKEFjvv4@mF~$ONfLsn4jjubP8HQH&t*Mt-gq{F8(AxpV!Wc`<*xFAnf(e@%$i zNl6eGFGW&1s(kIPT@0+d%ew~0w?M_Hsc*54zuP_aZ3W|XM*BkN+;=ULA51OMfpevD z!XGDXk5#x!P`YpVBnQPS!gatdglMIuA9Uw_oM7a~S>77Nx)%f+pyj?mU0$Ste)7fy zcY6uM-Wk&?{Pk(t93&8-C%9kk#3qjmk$Z0_pp{MW*fJ-{o<*uQmf ze{UDQYVIPs_;mEL%Y=$m@8R2>=iOLleqw8HR!H{N(AXb%qF+x;zenZls_MfN)4T(s zT|7e^J;NM4LS0;Z+}!+J-8`N;xwyM{db&MxbaQ*^;otl+FW)$O?&4`3 zLn!K3P*9eYI|Mf@xD4cF4{M(~=k4{ppFBoq&Grd@2bIEhu`{M_lnV|Ww&6qEp+9oO ze*o4H5FNqm7^cmGY=u~`0UZos=`<|ZfIteJy8_k)l2GK;@T&31nn`2N8d$_#bZ)-z zq~WMRDpoB-%cRK6rc)&NJ(vAcTlY>=`)0@FkF8^$Zn-up=mkl79m1*yPXve7j3|Fk zNjpNH9h~{cPUtZ@_MKOFjjE1|)RB8q3Xs5s{;Gzk zVa{N%x&)~+So~=O(Iw&x<)!b-5br|goyVRnL-YSQ!23AG*&3m(031Q*1>oTe*lWN% z=Lt5!#o}{7`EwJpA@DA!!OV!(fb~l6VTJidp3y%`kR}nNiKot-wzYXsQdB&~nx5j# z16~c(j3tEiat1z(5B~sdJ9xaM#l;WHYd=yM3rmyl7smI*ymu4B--adeFWyc=@HRMk zM=AVufGhwj0?rI8{XqGI*NsFn;FVwPYl2y-w2~iQ&P!R&j)2?*yduc}YFUwF?h_R~ z<&^!N1Tj3K1O~Ul+S%_}{Fi-{#ptla>zD5wJ%qLh1bUUU6j7EWuONF!<*52`Rjo66 z=dWD7eb3S5iFbg1bSmIgTwy&}Y-vYKNqbCHUvy>f^P*0d;0Xmeb;xP~nzdA6VS| zys#&@xG$`z2P`75H6*JsDy!BvCg1aUtgBzt{YS2MtQ}3SU)0pq&^o1YROK)rtu%o^ z!ovlLIu?){LscfwnJclM@d|JX1B42Ai53@q_N+d4n)rVeuOy2>Nfb*0R)E7mX~5$Z zfX`s{$R{$fq_|5|PoEj2ZFcl5RI-;!XtVJ(W98Ic2>kk$@}v~}5h+gua|eU9L=-Jl z_1w$!A+<&~ z3$%<9L61eouuSz<9TfbUUyT!r{s`qE%R?{wy4k5og`Pp7w;nvYY6)zv+FR_~0Vu8slJ<3oB~NBay6A5%H5qO2xOl$IsQ!o>_Aevnv!x+PE- zxp&VhC$oabo&eR9)NHDgUz3e;}=^`Ipyg6KnMRRn*T zD0@TatSg1_UMPh1>`NAT25f*b(+{2@WsXi;pi^dOb}7V%<|Tk z0_cp!e>*w#9ngtqA+krA8x($(Qp{Gnnt`bM5P={{w8i4h5bPyb=;5(fu$a3t(vPq@ z;g*5)@RqL*-O53f0})vdSQ=w-ws>gHh`oy(bp?|)4z>vHy!5E}*oANfEpI*ZB!T#Q zGVM)OdB@#5PgIYq0{uy{QbLPua3F3a1*WKQNJaUWrq-!*2IsHew7UPm-pSq1J0Kk7 zuws+)U&Lo6rWK}SmH=r#BeyCoyCN&EIz780t)Mz72i&2u^un6-!m8}jx}@CVJsOB7V6Ua>4Mz*)wOA4=XDv9mnJ4Wo6`m!7A~7{!AVo+^PMG6c7x`4$(b60}|*t zfb0z{qEI*^z#0mLFEAA2e)gjNgk3+6{O$hxr{ER3FhmUw2-G_RSXo*=3XIIoE$i$b zec35o>ls*Ka9%Zvw^~PcYuWDruZlQt?Gif`ltbl@h5%T}$UaooagNGhX&MJ3a#lDz zxaH;~IcFIKS2evD2XD&Q$a@}V8*<8kR}9)}PuEmm+ZaIB#>7`kL$BAzc9(~?M)^w| z%J=|%uC9fbTRNDQ*OeGo5gwB36&C9gnNXBo36Lcczk<3&XokX=`b}lW4-sjz55iZj zKO4K?OuOzUDz8}N3;tnV0KDk6(xS%5uoQDEYZ+x#d09EA$CoCci4z5g0s}7Nq0C(h zl=(?SdC=t`!M_A4z-o|XgIg68y`pD%pHv6u4hsC4s<7cImy@=r)~2F7lxVZT=oKsG0UTELcc;9_f^;6N^0Y*SMtD> zXRW%AN_6j40AAhm?#yo4>lOaGoBu1?@NdAmem1}Yq2BF0!|eE#jrw>6JyLYrgg z%x-V**3mHtU^T?u5Q_fcj%DgS=hjmui5D%B&zOc6=FUzP*!=qf3C>voKfB5EqZ& zCtkr2x_9ypefliK-re8HJNU`70B7HzC*FY$UjC0^#3#hjEBL8*C_JMZZo!WneeYO5 zy?pKdeiZwIeXtoip%f|%enqCPPCrO*?Eej#Ap z!VoNQ(PSqC>j(-&c|9#%OE}8W>5*k!?IRl<>}@a*`G>wFv8}sq*(0}Om@dV0$t|yr zT#Clx9>T2+k$#BC+uH_p1?P=nWo{sNGaTV6g1L;rLC@m*h^qZPzvdS5Mi2Y7Q1n$^ zJ`Fe|@ilYNdEC6lxyt6@nzpg}W@>9EyRM-lC$B6kt2i++%NxoxY#c1FT?JnVT%e1_ zR~|ohjfqJuD{mKx7diY5HgBEDc?ZM*GX1Nfvay5|nxk_ea69=!zgn1jJ=iVEO)K?y z>aVM*4K?`t-x~d{sO>+{yAFB?&<6p5do56rrSS-;^ut+(JPTYJk|O=joBO+Cz{gfq zK7RAQO+aK6i#93X%ny;*N2r^#9GJ74!hu;ac^>GXV6?#%Fb-pjNnLNDf8EXdF}z{h z+`rTCag(l1%@wPRTekU7Uz5|g)+6|dGWv%~%AQC3KtYwDu44we<8g#9dzrh9Jxj&C z^HtO}^M_f8oCT3!jl)6@XlQhD4UxTv9J0mfI7U^C)i74e$qQuq2A%y92(F+?T2MP- zVV82kAPxtOo~3OO(gQ@+03n>gAeuPLNhw528aahvv{A#t+VC8LyABKooQ#c@ZeU;U z7MJsp0|7VkJcTwxrO(o7^FUx=(;#HMNGC7v+aiOqB%sWLO*7`_*iiC3JHebD7R*$a zwKzFCozpvaL`Chqv8lsj*RGDi3EtW;b8$rYTR*SblNVABX@w%P?ud+=hN@q6*{)dp z9(*~9@P~HlUPk-t__}q^^kJ1N@yHS2Q(0qi*D=^@IOHM;cLk3#!(lIDNmdF+?GIm0 z_RC+?xK@N5@x>nUz(8Ybbx*x}1tDddS3EkU)%_9KCkVj;BYhVq>r7N|i;HgsMOGGV zIx)5c=<6pmb-}6HpV#Qrkwkw!$8XX3k3J+z4_I%&9ZhmmlLaA{Lx)sURMgegf$s{> z@K8Obrlxva{W!eVkl1lGb;*ciP~(IqjKj8M9Nq#i4&?Qq+Xb+s;6@3h)?o10KLh3$ zP_U9yutc!HaCmg_aX~HXhsOR@is%E6zc)JeoliPD zx9ep^_XcC~_oMSaLTM_4GfiVnHn;Wyuh`Qw@a|o^OUCA>G|n7TR6yM!DFsy(4X9Ii z`qb-1baq!ahbP<`pL!1-2w(IKU;GmobQ}ZV5|8~>H2RyRnYWC=v8?2xCl5VNs%j`e zh+;n|De;%S#48DENg>iigoHtzX8M-e5*M556R`@l+2Qh5QJ5bn@3xd_#}Jsms| zZxL!F=lFY*jEy;1(eNQUy)I^<2K}#v+*bn5E<7_P{znJ<)7dALCZ0{^9(|U9O#dhf zng9ENkv|TOf(Xy=^P5(^lc@<+Q&6f&6YNo0tDrna7k%iWZTF0R>>c~s;8rXc9(NZ^ zTHgAYy3^6K{x=*-^ZK{DrhZSI`_#nShHmm4!5iS@mozLxs2r3WAbojUKL%P$qmU(Y z4w2HsV^5KYXGq9N1w86m$txJ+rA%-{WBH?xlutOFIvW%m#emL+eBL*}4jtuf@rCOG z(Z-PYB@jeG_XebX#QazLwj<{6Krs$v3<0m^Im`2cr5W!0#PH%kH!CbS%*w(_!p@)t0T=}%2Pg!87fkX}vMqTDBL@Z}2a{W}&%w+8^v0K8=x<^BKg2DN`62G- z3gFzp0|Tms=z16cOAarsbnJw-zR~3e54~gKQ;J)vI@#gLwV{dCp>fUP=^xuTzq0jd zR5+i4*M6aJHP6fsnkX$H+CEsK9YNXwQT4y=)~li&fXLes3D>X~GXyb_B3{Lj9^j>I zZ34SoVwtyH3#uuv+3fdV871SXg(FoR>-6DYv!=cq9C}9+FSnA1OG@gToqY_oFQ^~Z zRFXSP!bzjiL-d-$kq9zJmDSE0U9`4&93B~0SlUqA*u@cD~8=AwuT*>=!kS{k9w z&cVExd>Nln9TAi5RxVV{&d&5nxx`~$T%Zdd%Uy@B4dd;Y^!rKw4igPnY>=tyW|y6 zkXu5h^4~H;2%u*d&M$fe?2EdftxhG6{Wm^8 z!N_NHlHBklRUx1EL(%5{YJU}Z_OCqj`aAe>$;iRW|6t?bXaCb1Uw)y#g>A{i`zz1z ztwM56C%I<}+JIn|vT?X-7o%uQ&1S6DXymY!Z{YwL9Kn6@JE zFcAYl1#pFaWLSm4g#^tX<>Zw#PwL*heb3Ve6(lJtf)Lo&+Typ9BfB%At#R(^IAdXq zJ}(&G8k>LH*3FKJ%e`cF1ELW7U-;nre+DaXDgT65k~h)2Eoz_t?#~f!l&7>y$SJ4fGlWlJfPi+%&4JhAXKck=huooj{lQ}p2<24_C?PJGRr`Bd3A*WNWuV=e+- zafZJGys~gC2fUI}_C*L!!WqCT0udsOmz0%#u3s7yWj|SU|Z$5 zuWvv#U-U`9pR20ua(w*sf}sgSus_cW^sK}GaNa@X_)mEC8MgKphJaEBGyGuu=MnVh ze`&vjnghs^Y)E!E_(Al;eDQmJ`Qv{v^5xF|!S=yV{rqYFcK-e4K?7{scc%^xHtYfp z#r`Rfl~GVXt_eN0t!(U_eM7?%GNbb=D|+a$Ikow9{XJbG25q{vZFFY#6JzH8dm7q% z!ldlbnJmSNxdDZ*{i@fIv(HIK-LMKz9(c4|w91v1GAH6MW3gv37(EDKA#iDF`a&0j zjDdg9xL0}lPG&^e5|i_u%6P*Qz4!7hc#+WQ7hGN4I@-%vFRCAmQI&$4q1IH_xd z1^ycrV%{Y5>;b3%z`#L=XDlKoBddMtwB?O^p3dHpA<4;cd8Nf&VboJ_02sprk4h+2}Q3I3$?@40&Ba(aLpRN`-K;UPgQH%Xki>4t! zSp*iQ3UbPjU^KIK^omF-tm^?An%n_{S63GC;!`U%FFlS|nMmR(l!QaG5SwIQl zwfhD9;SV5t&J`~3M2ozkO)_(i!(XL?;<_ZpF4_R1IA|U7xGNB5ALgKKBS83ig1rLd z4d9zeHs*v|{e7IU(8Na%-3$%Pfw2}I8q4WnPjV*aIqM?>Gb8*Ti?aD=j9=)QM9UxZ z2I4D*WQ*YL5#_CbZh@0B!w@bZgsXVj+w!M;Oz#(jmn>g&sKy-urmHm(a~Yyo1Slp# zu7Jw~83$RDH0WP{GfIG5NPtTbE=U4$4Ge<^PV7}EID#5UJn6Brn$IQk7f|`du39tTQVoPA^XZPyo7V`(-^@|PI^A}@(W#BLV z%E3$6^u;n9lFAwq3mU;P(rU{~d$MzShMHtq_YWv=*Y+zLjszhWOc+eA*N=>K50t9EKBods#6??&e{XW;)}m3F6S0i zi1@?b2`9gygQqb84L4V6J18M>nWk6oC>_%Ryh5A10g`}p$Nq;$DJSTE7#WiEF{R^Y zPaE95Z6E0KB0MxZIk6%&qXByOHnt0a4gp|AV~wYzq0HFpOsG;3s;Vyhw=?ElljLw_fynffs#U~t++9mZhoeYX_mcpK;ap!@L z#AYlB=!-Cm0jyBS61?P47i&s6z|5y{*IB}CE^}MVe=|I|I0kCxoS7-%Vnh23m_YC~ zG&OEw?Io0ppCr+J3x*RKM2(_1m9#gdgFAY+GGtEqVwGF~uV4{mcCY9~!va)BXVEtk zdgeQaK2%XRGRvlOD(5^>xKCoJp2=MuBi{z+QcDNcIz`_nRgK@W%_At;VlkH>QjOpM zp!6^VLjf&C{MrnqGC?AL-mzgN!W*BvKfVrJZ5&Av3rFc*S7?J9Hi> z;w;V*G?D_%M1gs<(=DT{{qi7=n^BK$aA81Mmt*yoo^l4(1j~)`lqK zpm@aH=20G-4~?WJt7|$OA3VN%{^Bq33S4@Wxb(&2OB|34e>s9)G+&^~|8)n+&q@&Q z;Ex;t;FrJo-}_YuKLs0K?*Hf8`x8boZT{@}&-ePTc=hjnGRe5)6T!p-=K_{~5O$U) zDI7bj3QYd{kDOeBUWBFQrB}6;b<)V(sl1BzjEt(()N(h!5c4}W))o)^JOiU+a%l8X z%JlE!D~3;9$|tCX$Y{SXv26@%+;qww#+~xRpY{hjF&F_cl|n8<@Cw+-i0pmfkvf%) zNA$fi3v4&_Yq{c9r?A#HT3Dxxp%F7!(*IvutiXxU~Y{LEY7o`+3^wx zZvxX2Iuy^a_C^M`Ax#e^;LP$^(<98a8R0JUu>y^V#+uO);n!Tz*8{X2&_H%cWI3ly zN7sK9nLpgh{jt1nFScY-%``;`W}==qM%&|@V|oGOO_}ifeAb6L&i8(qys)t0)2Cxj zUP&>rDRoYoxD!C@;Oz~LewSDw@=NYvh(8W;-=-FcPw2a22)EG0B6wC{xN|ruaIUV) z5$+O5w~b6fGAr3+@!J95wsAH(x<-H$%IB?v0s|yB+4M~)ITzDc_>4s{XH~$M9pM34 zZc!rJ4hwJ*YjKpnCgLoC!ii|g~7w{5OmwG8!*XshiMlZPi* zQ$zGsSWAj|KPJbKl{MTTB#wu&Yvd*g4=Yv!67D1pQI{dFh~RFY)b`Og z3;>^sBz0MuWCku1g0nyr-3V&_C(J4}u2dladE?La(o%XOSfP|0O2C_Fu)5gSq~nbfW&^ zcm5J>z8v{-=Yv0VuyOG2!N@N*e*QiOU+foq{8tV9@{@fzBKcG>Go=Vvd7_ls;UfmR zh8EZFJaP4jh)IdeC1fOU0=KA!^T$7$&w;Pdv{VUshH>i3Xj1J|X}|`;dh$03b{u!7C!VUIvIliL#K~0lEt?Mb%W) z^mO!0FPU54e+Z1hz|feOa<>h%29#!f-s_zrjV+tNDfAbVb-SvO7J0Gpz%0c1&3 zf}ubdAZwETdX)TfjJ6;imvp1mIPAQV-x2wC)1D^35J{if32_vvqB2 zy%T7a1Mli+-#7$!s9#RQYX)lFN%qPV7P0nnC_Bl$+cvR1=WR0)63h>>@KKbojq|2Q^dYK%1-h&h{yQ>nud#3E+?8MyuYd(XJbwULGB``XD;fE_X_-Ri z_{R?B#vp4AAPexSZ(xeaSY$zAAY~0G8A9rkh_=k5FF=frIWPugfKXZm3^(BALbQ-i zpF^8F&}YFQ4+u63ykFLAQ}bY0c#6HFhl%Np2NsVa0$$MDn4-ZU5Y+)`9X{(jF5{ak zw^QYg+GDY|!H8IZP!zAg5JZcJKLcQeM%S^oa70U3-+|$<#$b|F9-`!7Xi?%4y>#Yw z6C&@A$n9qqNRJTW9irTQgkX!4ehgrRB|>c95hM-oITirf1MsS_w9VDgHoF!JRF;Ml>G$gJ1IHo_}@l;48oa23^DK^Qqtf!90X~ zDtuh{A1$zf3_Sr4{Ma*Rj4oWd4cvYQpNQx2IboUAWnJ8E-h3lvG_$xVr>r$SyX<*r z{1XTFGunoVii(g50YcsNo7X{YyR~buPyD`r=qvpj*;r+F1r2`)r&#)R<@J7ZH;jjz z4kIW(K@Qm=I4gu`jo=?jDY+qso>)9>@T}q`($>qlZ;F{awSrIeq8|!rudDc9LkGh) z_UrWeg@}AnXkveC785kvx%^iG;ZA)6KRvZ3EF{a-)$jK02M}2^yJvgN!UpV)wcRZ% z+nbj6FJ8G}V01xSS5NcwDb*9|Ai@urbxid*(2^m62q1IW&{Y4Vp0fNQSx}gj(B|N1 zz~XMdixbKdCCNz3$wS!@G@b)ER8*8zQ8}!pu6|la2l9!a=Wk`_;`uzvFFrFQtspq7 zBBP-%x0OYi+NDjsCy&4F>Ys0D9feR8l#nbzM;OM^3VVB&vNBFznPjewahJz=E5ocM zFes1&cLLN=An686Cs;QDn{9K<&==;Rd%@MG+0muqV&2`Y$4EYp3e;jHV7KG~~ zPMNov|aHSyy)DcZdq~ieyxFJg}y~u zNK*Hp@S|vWC%>rYv4gvz(G`*mIPK_^hFs3)8NNU94rbhc^9>0uNe;r7c=bzkI(SzC zya#{=e5W(ERkZkY@&Zr%8*EUPGh;J$$`#P(CC8KvKs95Zg zPS5P!0LyEd0EHi8n^bd$+$(ouQwjwDR{euZ&=aSwo>x)UTUOGYn_CW-cW81(WO`0| zZfSBR)Ik))r(~yQOk+S1P6-pkwD z^I1SdRD5!7Sz>lcL{>>oeP?kugl%4ry!^3yXf3UVQ9U@_(mA=g`#-l9KaKG>p=a3~ zb9tTy*|E)G^1>KxSp=TO-~@MYibtLXyy8GrPREpBa2db~WRQXSj#lf?Us3wj1Cyw( zVeRRK!a>g0&B9-sJuOnco#Imnq3XqkQUgqK% zW^u>vzKv64WKvE}*~;)XK-Mg0Z=ALx8vR{y#e}@7E9ems@z?R#t9T5s?$06MT;X&O zNZcU01mwIl&IF>P7{nNnGDT#}@JHS4p7n;5zPjSxk5zt-D0pL$2N=W#0T~%7YY+$1 zzEkL$y5JZ;b?Z6D>={MlQkJ4_Olk>_HI5c4rf0P{KJ_vSkmE`Mx2|Hgxjs%4c4w2+7*!f`OFE-FT1{x{;Q!__c9HEB#vqS{wva<5Pr_$8X zKW}P&@1cWJczRe)ZBR~KcwuurcUG|diL>~wpq-sj)LdBI1G=wn9sxIR-c(allaWQ) zPT-25OC|-`v!=#RT)msx``DxJc@rPqBk5FVLY{VaF;p#2j=hxD5<8+{rX8nO-vOxv0fBcLyoN;45;jO&u@&%Y>Uh5PRj3% z&*{p@@6Imj%PsCn&uvT1tcg!93yMm2^@((Va%Qj4r@m44USSWNeXrfMzhHhF7Pe5l zY-nO`V0;BM;jUZQS>AWDaqzZxeeU5O<>VFO;O6iAEZ8|P24Flay*x6jDz>2GMQ&?g zc1sy~s%!F<==JXeo8R?MzO3yVYGX{#E`KvJ^=9wwKfl`jqV{aE5hLo_RuOAD3n5_@Fah0TKIB`wLZ<>pfb0Bj-Ju~*Mq6$Bb-g2cn##s%8M9;E7iYx_Y~yw)x|f=wpgMKQ076! z#D;dpMcZ@G2$i)6Bsa9@Aa4^Wqr(Cy<=&bQ??TZHuu33)wZU3n1y@tNHaoh-VogOw zWqUk}@(qa3FKB3J9OQKmtqg6AP`77!@5sU*gtPzT7}J0BQm~A|eFS$yhHxDZ@lX7D z4DkYnbQU!YMA9;e%!8pE&r%##&xH9bH|!)<|2Pyfd1X)M)p04-=(F(Hgr$#kyht{mw z1ob~l8@7$(*(Zx*dp<_C@4e{UiD=u(?Ay!eee0e-0zw2Dwi)Kno1OC+(Orw_1MgD% z-nOwnG*I6(_b;`PSL<0jwT$f=_I4#Ovie8jYbnpGdxL8F5(;{Q66;(8b04_GyLzX3 z_+^B?D2_?0j*Q7qNGXp`FHO&{P0XnTOUkcJ$gM_2*wPBa;!=a7lOXl^B0deC!=sa4 z#OEZXm!##@fF);_CuWvr7FH)_7ANG_#AH`QWml(`x2IMNRCEuu2sawIEBXB+$<3_9 zn*QuI7HxD(xbS{#W^ZQc>-DvtW~M)k@>d}8JVKioXHHMCz_Xfx>=+2MLm-Ytoux8o z!1|d}RNg$LZwd^;@(}ETHKTZ7jw^gySju$Ip1B*&v<&QsYuIQU`sA0#iYyT3wytzB zKeSTbw)ZX5d2d_UTMe|;@VX(F%s&5&F|BJUfLAzKAFR|9*+ZTP@gYX)5u)gY9C~&{ z%_lQ|Wt6+ar>?TO+XB&R5dUOC$qf6Akn{GGal#?3Kv`uk$j70?C!qK~%I%fKH2N|J3LaVTQ_ui+1(IvTM>ZtI8`npq6S;xIW8;z}Lt3bt4UC*+79q85yt2tw4KE1e5-jplGCzM>Dk1~)Q1 zvf%MkPhA63lAJW$;s1_TUt-jk+y5S3{RiU*KmMf;w(kMK-C)0X1S^e&4%+g^l+?7< z^)DOWvbA*bcMD4n$}A7ht9en>oL)ZwBGv4Tue(Hx1?|kJjPi`~HV|=ZZ68tRmeB4T)#?`0;S^I9klh)a z+YwgK9hBP^QQQ++*d3JD5s=^GligtxUS=O#>z3Z;5MSq((d3oWmewV%6K@K)eoLGG zhCK8Nn*C*!4kYHlO06Zgyeq4)vAC+MyNfe1zOgjD`)=pQ#nHD*z!7CHfx+yXV9ZTH z#74XYEzzMXABVfg7ktGLzXuKBcItd>*JyA5*x1DDA?nNwe{GJv0tOV0#_s8WrmwDq zbHZ!h1e9#n@qei1e3w->(kuEv7EjSeW;r|%Z-HhXyDi;QO@nLPsUJBLKMXDWevtb< zDVK4{I$6skK*hlSlv$*@amKmZkkxH0s|NzurhvZ8<*$P=*vr5>g|Zs3(%!F(th4<~ z7au3`<4Tu{I^nOprj6_g$6ryo%Ut0*j$jW~yy}3~|>+1)CzlssJ!q2#&obd8@iMU%}Si(gN z-UN%+1tVc~WeNJAe+7Cncm=zY=R$K^-d}U9lT-1KQgQ~ABarS$6D|?4CNdavNcv!L z_wj@Wh@1-|?+WEeCKko5l-E#70N+$Fwp(0U8x|37X>}i(@<1f>XW|Onr_t+we^rQX z|NQ|+;IFz;FnHiZeR-55QA-=`5-&9f=1VBU!I@RyXaQb@Bo%rEMwwgK0$725hJbGxNXQbsrKT|G$CnI zF#WD({B`TZhlb&|`8`WHo%5iD9*|CPPpk*X@=I?5$ns5Z@Xu^=jxG02Yw*fwbx&<_ zOKW?U-JQ}gmew`VGV!(&IQ-+U3TZR>T_dp-l%S+~?-%9qS*^)=oiS;Ze&LxOelh-` zDTM`%09l($@0Vv@!6FF6fk)_QxMmVWo*8rCbqv#>24`bT@PwCrr$dgcr2Vez|HBN!x&oX=XT}~OpA%9ujzW!m1*dcK&taL1+W3!3=vV;4!mp4is zo?&rTK=`Ysd8oQc3_SK;?wf|bm44n{FY^t1T32(79utg-XYO0bYTDj02Oo zO^3#0j14Y(1Efbm6@QVvHOE|B;;t@^ZH;o~K+j=$@vAAp26$i7EKtth0I7tw&Q-@4 zs=>p&w(*}5nr2R%@zT`umXWeVGXmHPs3E8DL=b^L1CWKsUIqy)h)}6%`@2W;2q(O; zat=WM1H8iEZ{m>)B)lmJF+(AXXp110I3>?Rnjv!P0gs;zKpg>D_=z|2vYRrMn_uqX z6?o3z0`$4qzw-AX3I(daTa&O6Qk`W15!P*dVb|BWJprCL}`2;9A zT`;+7e$DcMqo=D+sB2(sSW-bmUSnGAKu(vipl=u)hDzQ_E_DVZ!t%;H;?gVPQwjq^ z6Q4eDfiAJoF7~hjw1bm^DqrxXq)@biOfD=lNjQwm=g1jo?i@XO$yvMOaYyk*AeiCw41nlKb=2~*mU}fiUZSQzv zb5BlQc~V9`SaL>bD#$HnRp*wqC*(B8Wi>`*H$>;RBv$r7uinfKW=b<9p@CXTn<%7A zg7zcePpxPpr*EWX^kv8Bb}40|ZFswiIbX$C%I_J^>==!$VV6_qW2@+K)zEFEDXF9- zB(*d?t2`#XBqcL1E;+;Rx$jfgCzkhbU%qznj+NCjAD`^R!V%8Y>hP;+_UaO6dy>2a zgaoh=%JLX(l_%a6j=ZU3Z&x!m(z~`2nwN|Ec2gP_irZ&v2iKwD4z#g=<&ucKHq3w` zmzN-xm7U8AsoA*~#km(*7}NIWnH|!IJP^?T3BIhud#M!m~Y1^J3Zpx1g0|YCJHqjs*3x+ zZsPyLMau$Nb?+l;-atjzr>0-W;m={PXR(Mj4x@u0fM6y#WxKmBmHL;{5E%!A1j2*H zQqnqDycQ9wgGWw76&MCF1wI2pvXVXe@Yemzh=^7)88Qx=q9NezuVm&n#U;M5u)3js zOc}(5AbAc3w`X(?pt!Z4YDZuE{qd(GZ~$2_bg&H@2YW~cB~BN>6i71xMky;RYiVhL zvYffOxsA0Q^h=73PmfE;h)XMYk(3hChn)ed7?{ z;NGq=fUFMk_j)E#$J7I{M0+Tb#e;|_q6?4(U?nXDbi{jDDO+ibH5drFql_%<9TEYm z<1G-<9Uv-Wl%JA}Q(Uu_oO2ct-3WP;q!Si}#T8@FdlbM*%v)oPe^uW%6PMSSQ^Sag zPH}eiwR`IE)ZN$1FY1~93%{_m=TTYVNtJ+C2_>De(Ceh6J-WCpq^JojsIV0*xTM=J zuQjw{z%#4KGov0XD8DtNu>D2FfNy4FaDI1KQC~>WfNxeuP+nI=$v{jcN{@XE>OIlT1d<@9QCx8Oa1m598>XDkC`v3iyOuLj6( z(lVGn#Va?1D7H!B$7!QbViQ$A-%VR@A6#ZIH@kagsnlJ-tDJ_B)Jp#2_yPNb!KWz# zyEvA0WWQ|;#V&#h7LmpGdeIl3NGT~B2c_kH+AO&fWc22G2UolMmuq`gng%y%Et8^w z)n3l8!5mT;P8pos`lVjMPp~E}sS~7BvXjc0v2_!1^^@^+<1y7EDfQ!tH6yWQ{G8UA zimu6&GI~Wh85H#;r8hu)9Ris?`U-=#T-iCDTFT668BeVhCDibOa{FTISm_-@oW6x2 z`o=nA6(DPdF$3+M0jwqkYqJ9@^U!UC`F4T(Rbl(4{qtr$_hxmw@(T|OyT|^uoAXbq zXTueay5nW+iP9Db#vH&3%@5+hxjKVjj8Rj(|G=|O_SiE7$^-G25S%H3)c}(tog-kh z0jyBGB3XeZgUk`zlG^ysE0BWaKn@db^%A(2sk6c$Lx2Y3b1 zV$|jOZ-`d_K7iHx-yGfiyh?@y9z?X^n1J9E`W^uMXOw~!7`zEDalnE^3j%<3O~im& ztBev<>z>d#cfr)$>YlB$gVS^0zy!aP@~Fa=z})8Nc`YFo&P7PvNMq095q%=Y0Eaz~#Ta6-Mqqfv z5V(Iti9rQ4Fi7!MSm;Ti?*A-d%p-9Te=-JpB7vZl>>kSMVEzx#MxNsDfTOZ3ew$O- zose7a9{9q*?9O>3;Em~CGPz`GYDL& zNlD4e$S8`<$pcHsEQm|b0}4cDetCXrZ9!RGRzXE#dVXSBUUEhOD6}W0k-gH;m3-&`?)ZJ9bo7ULMFfN-CPyEo_3Hh4!@!EHS6R7U`Sw)b+{1 z$!W^;C~Ie&^NJ;S3uP?D9TTZloaDxtz+9GJu`sA&B&%sWvvI7Yb%HN=JH}lU(x${9 z;y19yVlF^Q3wda#i89+Pc-zE(Q^nkF;J<0-ys7G2>7%W6lb8F+Gi2I)D}AetvE43y z-8Hh8-97cZV89}>_eN;vqm0?hL5xe!+O1!(9>jEeA!Wy!B%EWCNyIhXHM zG#uWz6j(RsQXm4zjjWzdDi!55&a^j-()&^83JL}x#Q=QKe*Wv)p1Js@rLc;L;M%!> z$|=9Hk&xQy=e48Z&C_k|QzG&EMcT_b@+JuNudz1)wdPoJi?pTb{uu#vXM+C$+SH!C znt0??%&{{GB#mbgIn%76f30nQuc{fOrWGu&5`dL;L!i|lVu3>prEq8~AGDi~l!duf zIzi?tg1d;p-T(u>7Vsaihyej(gdkTTmW7a>$|(EZwvDF=zh*P1g!~1*XqiHv02$A) zhy>`+2b{g1=bgky`11Nc@EZPGZJD4ozT+OJgu*H`Np-ow!qsCgjO}s`6wo#F#JWfPf}?_ep6~Q3sySS z!p$PaLN0wNyq+6gO$#a;cu~|ASJnl|GVjnt7dPKKRu7>g?a?F3PzMM6ZGaVjj8#~v*$0K(mVzIB|!@p#M9uu3kEtyDyphRrq|uQgE)h{QSLZ^)dGED znYq0{+gM;OtP9owuZHMb6xPd@uGzBgX@IQk&Xv5L^?dr z8D`CisKD!f4fVnd`dk-hl{)gObL3;2_{gEcF^%%UE_2SUWYf1~DWH5cxqGvD>JL4mABuWr`OHm#Ea+_k zJ+>J99Wra9lePlJV6Bm-L#Dtp#xeaj=D@x@t%4jRyt3lgJUtnIqqd06?Tc5DDx zl?Z+es-8^h*^2L3Ng3R1Y#Qb9-z-qKS6Q#2x5ylMaS3$Vxr-pd=q~@h;pAX}Nof$Dbck4@$_UQ3W44tm(<|E%C^DTw+Od zY}(c9ch$8tfh7F-lK+fJf5$6uF;VAf-+z)E4fN0$8Jd|~xN2l{<@|ZGa~I5j7j*u@ z6|l2LmkmtJAsBVn`mw#8tB0Gv@3RQ!Cw`tjv4J6Jez9c{8I8_~HTOgE?#EVnmkb8h z3xXO&@f{<1jAaNWyTA@<I0bWUv zO7i>{cm+MIQ3Dqbi&s(Ad}#NysI0kRi~-1)U`Q5+)f{z=(vCnob(!bLq41+;Q}l0E^61+`+&2^S zwJDHx=Wk|bwIw7qgh!V71*SN;M%=T0Vsh~ol=4AAA9g=~iAqty!G#Y9vfEP7jOFm* zBgeoF9Z>;OJgTOA9NKZ8)ziOVaNg9==#q}Ep_=+Br6X$Kt%AV@?5v=81Y~cCfKdo2 z=jk)E)TwbgEC9D>Y1>oejb6rwlsrLX-K=k+ z$i0~7l*jZg;(FvULvpBT^<&N5Q*C{-4C=yQ-xQfT4MypoBf|)N0qR`ZnCod3Opjdh zgP2CIqCxxAmeRqcO4?d&?`At=uZsIqOx;Rw?UrlqR5tmmTZ=jvE2IWo-gJWPltd)k|iMrltu;%WGMs$%l5A8hI z1B+w4-2uU?%nDXeF*m$I&tN+g4n-Gn(rQPc z@5TsqeWGt-6*@uFrbXll@!$*?t7mRT__n!gNA08&_J}V6eiY6gE9k06Ow z)3tf#ax_Ni5gJZMgXgyqj0K)>4}2{I0gvk*D&T;CH+2zG{qeY_dfO+}(fzH;SxBq+o``7Wx z-#5(HJH*2yz{e-V-TOJ1e_(`{caV2rxVuk~k6&nbWI|FxR$59POcSsqXzPRzj$j&^8Vg51bhCau zYZfJS2uieWNMkSKffa+(#1c*-czrNb2o7f?!7Ci$Bthylf`#WZ7$WR;9`Fjm-;h`K zKYscJLJE*Qkpy^U{-^^wqJoZrL~CVo;vJK*RQUh1_m<&tU1_$k%xuT8lQ`^f;;_Tu zBu*SVF~!Uvv@Ax8nYqMJQZX|#sZ^u_m6&bEjzf*pJ#%l*%=i76ZylABPEWg^nR#aJ zH{Ewq&-;{1$E8x$uCv$K@4MH#Rt>kJiVZ`+oc!kWjN*&oi90^{`2GhT*|=#V7Nt1Z zpwhTdfg^@`G4kiz0USfNy>ij=HIV6Bv1-H0)pxC0gJ0PYws_^@r9a3W6C$DjDEux_ zv4CJQx(M;{7e)qM*2_@k+x5wwl*D|6)Z$P&ohp}G?C{Aw1XwA?J<>^+c)Yc5h{Btx z5YE*|ub0SXtFR4QH(*2!-E!S9lvqMpn9(qyR0R0OxmLFG zQj_X@r7*5t)o#1avfb>{&xuUm_Xwsg)!6pL(T^2dfLHs{d6BhNl5~P;|BliBZMW_k z)$ldf{%bswtGy*LeqUIpFA)YRWupw$C|xsx#NKYsXlYDugNj_OG87ooWil+`m^^Kftc3$cm%@W^CW>1yre~C+DSq(#q z50*{;s6Y^hu?Y&iNHlah5xGv#_Z$9*Z zI1La#--r>oy}DZXC!>&_nny`4q9HQMILU?d!~$As2`jpU5mU;%P(V4GOAfD~pD(4H zEAKmBK}l>AhgZ`xdo=lU>~{+j>P1PlLPTOQDWRw-v#cqtxIQ5*=h&HueFqM__Qo6A zo_*%ghacLwaU-@7iLZc=WWfxDtO4=Wgub1B^&oVRc%wf&2S;vqec~k+g{@n={_VHk zNlqzbv6ULdAjpK!+>3~4+;IP?uw}cJE`D#>lJ_B|1bvc4i=IL(UV_r-6JcRn!xlXT z^^(QQp9`(KLe;I+OShvJ49%_BJq%j~{!HYW2eKY`u9Dnt*T}9~gjinkr10sX%ScyUJvNpA}3UTJxae;IRW+ZTIxVq zmnoOxhkGD|=o4$rC2jV~Za209+xf#>X^_qzR7xEXc$bMSD!E-D@*|`Qw^HNd^Bi)S zAFdD;jhZZy>3kNmq}$Y^m>|o7eTtFnuA#m0^mkK@uf?ezIwgK8Li5%o{Y&R%2jlpc z%Lh`*WzFmnrh2SfI7k-zdPLsLMqN^s{Ad;}pXz~fb(g^3!8CWVtwQApnc3gRbCWqv z3VVPKF?P1ou9d&Ekr#vqnQEq-?l0(ZCUm(`^*YmJKUr@*Qf;|R8NWz!pQ*D)Hrg)K zn&MimX=FEzVg(s>K;&|W2{J0S8{`srRro?Y5ToKMy=!3Wwv?53pIp2mI&4We$^|R$ zKD_^QB~>(y%0oMS>{JZr**C7-`*hshkH@Tg^imjXTtBj}wllh~-CC z+yyzKsHGcY7jH>e`AFKkAJya(xizwJoJH1w$?|G4`hZTH2nXQ`t8skY_~sW*9-Jki zEBMcNg;BYE`zc<1yg%i@$-K``=j}d`z5i@ccuMQB=<1YWW@HhZ8raDVlFL=R_$FZ< z)mSU{!dkIG7099KQ`+S*bzGENFBa2M>cxpQf|Rn>(}@KK&c=Rt;PeaI-+Az{XSY1? z0Ggpf%F*~b2;o+u(--R_fECO&{z&l(Z99hE9FG6+Hi>`nW9SGnEkM@o?-Go?r=E$3 zOr_DKI+YKh(cBaWCLek_20?&T*jt32($eP_FUDRWfmaLh1mr8j7C*IU8KCSLK-N;M zyB5C~>IGZ0=!50U;q`fH*@o~f&y;W9Nnum{TKTmQlTfFaG-+m?u3I#^mDH|i?oc+j ziK^?E#TB(ElE=hGz5MEnVB;^mb07^gvhXo) zidWqKYk_H&Z=AtB&oE8V-l%5>GdgXJ@>!~U43NcB2iXe0SUo0EjWWc3gg_pYYQ`;! zQLA#y$oKj5b8YmA9`0NTeLSPhT`HJu)O^#xovi0fP`Oil`3>l|>$G3PYa4jwQ%?Z0 z29zU!EO1J(=UBxG*7L_R>BBkf@p$TJDtkJKIRm^(>>E#^O=UADQhSFQG&d_GvuvgV zvd^%UbYt^ZKBSTQb?OnqwNT+>I#VzsyYA@G^Dn*hHcG@;gols{U;V=Q6Plg> z)A4G-SOtR+nlhL*w`a-67dqZQMS9~x+ZQ>Ky&3#Z5*gc0*BvQU9?qa1N~c6sN-x)` zqAPe&<=oUp!TG$-G4!Kr*=S)%?jFzBSxJ==9@%EWj1MVTOtBkQp|6L`?zmed`1;bi^er-W}M+3woie9yj)7Z28b zdWjjA&11@MFjey`_0{TLTXwyyM>yQU_4kP85wVrLYL15{2)0ulWQL=Q+TY6@!2V!2 z%|hck#nPZuJ|bifLP;KFa4OA_-ek!jSz(@@(rN$?A*)r@O)+!91yzhf1IHwETP0qr z%5Ri;6ap)PEgj~_Mrt`@S6Zy;l<|m$fwQ#(Co8Qds``(XTVlFLPt`k*m1{3F_Ma<9 zMj%J+J+aeO)2d-X6HGP?ZHJy78;PW$Eo@n$X&O=wcIl*9Fj7#c+4|V&wJQ#Ek&9CH# z-5astsl-)}Ub_F;RG0z1wyX5Og zIJ0km^&zDC8LzN7xdUEB7HN`d`=c8Njut2m*LRF*?jN%)obDLih6ixLf*zJEQyF! z5nksL+ugkN@}$hK^tfvLNcY@LFMu;XU-pu49Qwg=&EV`s4=L zID#en#qJ{wcW*hiY|WnKOP@h3BUY_~F4H1w$4F0w43o8!;wW zr7c|o!t+~izaIledtQZ-Z|>Ln;CEw@_y;6dSq%=T(C6z#1+SOk$fS7-c%w<({l&tu zKFJtUHG^g)v;fegL$%#HiFyoy=VL<+bZ!$tEeon;eyP%hP)T4yF$SSgQ2IrRIp7tH z9i_@?u4ogWLtMPXM zSuD*rRQZiI#W(_Z#gdFM_&%n84;UC9`! z>#RD9zYfxArV6LBtsOaW{s5ec~g5wW18KG9!gO5^9WeETNHj{JIDl6I&7?^gR0-W7 zT^)t;mu2Oq=bui!fAfXaYY(kleQ?FbBg^kPyz-vokG+(fS7~L-zL%PQCD48=(EVK- zW45yUYEp?aCc}C>N_sTKcracQooA2A?T0W0P5K9l^jD44d5B9(rLz{L6N=LXWwm<_ z9D_D2()`<1+y!?VeESP0!q0dW0*276AZ80P6GR9|a!VQ6#k9I|cWv0X{q-FuPe*pt(u`84 zMLwhzxT&J~Q!yPY?mil}97?tX7Ge7j%qtN57Bq{VSQLhMYT4rF7NcOb=;bh&=780( z2=0U*5?;e$AE0mwMW#ioFK*b9bT*06$-m0h|KWop%}>6b{raxzzAiKlPeM)#VU$9{ zlSrea5^qj%+sO;*FTeQaJ)0g{zIZXg%wIV77OZ}-c*5x5VnLAH5LjIOaAso6h+F83 z35^@>Z$tW$MWB~F`SeRikDpJA&(}z8NCS}!Y6M=`p32!)ER)boXHX9D6jQJW%x-q( zwz?BYraI|dv&aYgKeQZ{w#v%8b=7?)HXqP5sbqWPOqWtR2FW`**TUdgd)a1|*eOFZ zvcL~=te9tK$~{!E1C#?yM!61d(oRKKJtza=rJ z-oHfKnZW)eo4+eZP{#A;(H!045k!;J*{U3DbJX;_h>`gEn$a;8ch(_)J*=GU@^(76c(QIFW~g{Xqqg|Nw7dcIXG@(2Yk_YRz z`@3Iw_LT?jePq+dyP;UV6w3H07XFA&#K_ZNz`mTow-W*r=OUs$#b>E3hbp#WaNIC#a<=Kxk=NDmjk z0vX#dLL}s!#j8I>ge~5=dc(o6MV~EN{Q0W8WAA-5Gq>I*H2;pF`G;3_mEE;9>XDby zax?qnqH#2=L4XDNmU^+@pr3#$LNR#kNu@hK{Or+(p9WYFLlC;%u2})JvF}N|eVmpd zyt@5_1z5vlVAM~Cj(G0!rT0Aaz$@F|J$B-Pl&3eUoc-zmD(yNEP-|E(c4LjC5W1iS z40FIvx+}fjmRf76;7@cIz5zd~Lq1&5p{(pwW!CaJ##v}Dz_(N<2p}NN3CQA0U2LJ9 zEAs%avv*Iv__G2@hw*xNr69SC+s+SkX#6CZs|VQ@O8xS2rgDzLjAgZC(Rf!tux6D17D^?d5a4r;l{Ma*kQp7EpNpMQ!+Asry#z`X{O7 zcLK-nl!1R1>#wq8;{Ypx(5JB6G`fGOwtlJYzv&zNvb?lAIiuvGPmiEC1edDYr@_y7 z^%pS|_yWTJ>V+V{1*&B`KR)=;o}Gw~ckM!B+RmN(5Fft(*4uBq^1|~^J@NQM4?p_g zgAd=o>4AIKZrXs0K4=9*a)+^ANO15X_~EC2Ff=zq_dh+pFlB%I&p-X2f9t0ort_+> zMT7t&mLVWdzV*&KIq8K8k=CXjv}=7F&PYRpZtDxFYwkN6w({cAbht6EQseK~(qBFO zO48!hZ!cN}6_L-Nj`Hx+3HLu9+u1#crj;I+8!dGxBI)^V7>^d^QO}$!$jKw0JD>2@ z+q>`Cv>Av*tTl;ui7NxfW+8|p#MDSGY2S42VW9oDW(~+Nd{QxigB^rfpS(4$Hf%?m`SM+eD0$_a*Kn6C~nBrb|@u$^IR>9w{|`b7+nRy>9ggULmMFp$}*Mh<(rLVBjw7}M^G zqK+MDw8xNaNnM^YlBJb4WLI6a%4Z$&VT;fU;|!(D-zp5|wrHXn?3YN+vo(f`4VIIQ zw&V4dSmxxZHuu3A!?7mY$wo^w*%#a4I8&o-R$uQh+@hJjY>|vsh$hMeW2dVWm)fkL z-zT;^A{$K6O_sMx&C8UhRgtuOK8G5<5!D``5A+T#<&xJT^e!l&21pYN%tzCEj z`V9}R+q{15rgiJ@LYlR4{rW9XCckUl$~7zD4!f`?N2D=7JFFs1rf<*3NuGNn_og{LuEK6Nx;r{ymcM?_gW+p7p4hPE{IT;)foNW-{<^i#Ceh7dGaZm+FNIwOu(8(FP$MMjoTgcQ2;@0X_>z;n$ zrNbvr=jK(x=}9H(SBveCGVa$5o0Ovl`LKj(22~QR%7|We04zkI{wDCMiQ#YKjx_c3 zOY~pD28#))bKR^!KK3JC5f%)(X|Z}js+y3gC)vswrhKZ8=>&%jg)F7kD>sjF6mE`U zTxPn4OjD$RG~bsE5Sq|@AJH**q;7a;uJ!Yxp|=uEAEcVzj@KNn^B=4p3~#a58h=SQ zUu&0-igdHRJTFV;;iir*?a4XN$?!&XPHc`$X`yQDWi%@Z1aE0Wx-Yv^CMdGFFS zJHxFmErk08=3ZTfi$~+!oqymaSX0aqB}*?%Q)1HTL#4 zHixZY(=|da+U0CeQ-KVN3hgZ{3$!#*K!Z(856#=!JwOwBIr3p_v{hCKg={C@n3z9E zB^w#ceyMB-LQe>x&?=KTSjf@X&UWrpujE=YRHmu#FbA7qOm`Qpds9fd!_ zmQ6QN{T-aKMy9u*MUP_m-b)?Zqj)czXJCu)ne)6IN$h7&k@jSCovRTy$pQ@$UlXgp zxLwiCA8KZMSu|`o4hncaA>U8wG4*vDErOs+F(s4Fw6q$JmWiX=ET7~FFLbz0)*JVi z$j;SUPuG|tn(e2m_0jeE*d|j(5m%(WZd1Yq6&CYO70*UjPUJVrj#udq6v>ZNnp2pw z`%1JY>g^}$`wx`q_T~!lyYUSgkmPIn`dc_&bURX{<5gs5QmF_%K9}1aUzDp)HCUp1 z{a;jR4^${mkt|2+j4^$I&vIlJnp~&Kl#vbQv(=)Q7EMK~p^Fm`iN+O*Su6_?;Ekwc zqbLK))zf5Fu!>|%DwZ9O?fNvL_1Rrl_D8qxjcm;?WAkOBp?z40W*B%5z3LZlzZSRe z@RfwLj-0I8qlcs4eE#JJ@7f$XB|;Z0;tT;;EnJ1~G%x;aBHigp|F<3clMnqzyuzcO z;uXLMc!eN_kQl&)Dqv_ug(Q$zC;Snw;B56{{GY}v_|_wC@4GF$H@tI*ZN2c~%Tdvn z7-WH3Vn(a4RWa4coKMJ>M`n4RdZ+G*H)^+RD|%#GS8t%Qed7 zPPRB8P=I-UtFp@zTc*2QuCJjxDVkZ4%FmIwKr;Ydv7}Q~Er#4$E$|BNHgwHZl4uTm zgD*;)AEc;0FZS-twnw%3a`<1C%f=h@R|&9^1<0~MyTA>wq9~>W9FLgqlSxJZSzM+Q zlieww9FUF+gkz*;eKvO_o#Brn`yzY1iS*%!4rc;+2;74-`e;($P(E|Gls{SBYV2nD zVcesKjxW$1LXHHAA7-sM50GiTEnGikm4JoZEa zXtx}1L7k$7=I-rvuvmU2Kd6^ZXcXgeaZsk363fTMnj0eZmrV877)G-8yL#SC1AC&G zKO@ylBLT-IEVg37z(>=N-Te1^Kg~aUG9P$#aR0@}x4w4&`ny*xOsLQ)f%D<^gN4P` zonYrrrtY1d@PFko;!|U2h_y{<02Y2&NcAv-LaP_#dJ9}Bf=|ADAwVJ^cvK5dLsto& zx$p|15dvg{UXgfF;ud=0Kfk}z|Ac(}6*!`Eowx(=& zIc>=kF>w`!PQ|wz<@a>Styi9lTe)cG>P7pOhwWLi5Q`S?UAO*3R7#87d>t|c>AAf% zw84xz6}iuhsSS2Lbj39?hs`k5OI73+kcul>Ad-V_?)B?7;6i|b!DuW1SLh*DUAM2K zcmT6zAlv4Rn;&`bk!PQJ_SKhO`}E^Iu@Ui=#Wn0Mj+&=oGc`iKi6^viK{^t<5h|`j z!M0mi{SJW}(weCJ(>TNFIn2UNZ8g20EAb=bVmphbhIbA;7lcfYT0F|64q(TP1tUM< zV6$L6ug!9%ZSd82+U_grH=KSj=c|-CT{e<* zs$TWghq0ZXW{BU5V;;D|iD|SzAR3H?Ch2G~Z6Kjq4PHU3U<`v(+H0w0xhgyKkaj_d zj4kkq!ERCpA;zwj_<&~RU1k)W_LeA5Hab4a5=XRH&ovm%)>sY|Dv#A#&ybvZ^ArG( z*m8A3wH_iiTHP$<7gVAFmLyo-C_P)KywVjoR;NdVw>!`SStIKVX_dly zniJ67#k4nZ16LYVm)hJX%C#rUO{Xf%V7wnJ(nNIo;OQ3G=Ra7ZJ6dJF(BipR?><#w zJ5^yhTit)A$#SmQcCbQuyxtIAYmRSo=e0TuJ3QSK4@Wp5<@>NVar32}AG59q{Uhq>m`XEX=+iUSXk}`~!v% z!%6&&JH?%k{YSolKjIbsDDfxpULhU3V#B?gp%-yEDow;y4~PQ@IC4r2C|P{Zu>6)~ z__fUSPZH}t3r&9@@&4|3lIHpSln*Y-Up&ToYJcxLr+Z^6v1jxTbkpy2&i`k}-jekz z_H15vVAJYjYnL3@xc2y}r3aQRKe*$ADyi|RSU;yU%=a>#osy|8=`^TK5F`h+Ua$76 zBzA{o)a|`G;F=+|Gg7aV9s1(%qmOJQIwY}ty=}}CIzMmY6~Jos>eZVzZF=tM=b%fo z`;*-#kDZK;xRjNV(_Gia=w+LvW`o$MReKOe)ioH?frAc>2`E4u6&QR&=|)SbVcW@ok~4n(xbGU*)i`=5eos@gC7Kn9P}urH&+UCN48a^CY*j1YZ{LZzc6$Wi^t^xt_!r zN#{;xiRbVqGWwv2bfca%nbSN#WexQ){M2qEL?=+xG7v5p(>lmCE2qJN5GtlM=C49- z+Jl;Dv_)w7qryIyka?{uN|+u?@2u*+*BKCbQF4BOLFO&-F;Axq>MUf08D<&Q{;5Vvkg^hVwW> zm)lH{-Tk$;?>gnbj4skY^IA51!IA60qh**P8m(+IWRsM+EouQoGUq~CfLGVaQr^Bi z-6!d?%w~I&a31TZ4$Vw_6~9wCQ6U&E;rL5LUm{}LCy$j5e44A>ldq5OuxB%a4c*2* zzOR?#2I+{&atK9!v=T!rPp+62OU6@MEm4(n=)<7QezwWEuSk80Jh-D+a)#tNR%<`j zY(3d#KMNujc`&8LozdYdZP50xgI2L04n9c0IaKqd8VRHr&NVo~n?0#rfeV$!#71*Y z&tO`kqKfHm;W~QdLu~C#d512k$&}V=JJ~=KxX!i@9;vr|R;EZ1%$#nto@=&at%Zo} z_U+0ON45-vllu4ON>A5VzG!qEZSjWJ+fS7n&NsWm+q_4sjd7Hb*cN+SnIeV(`#TQ;e zcNKB5#VJA5jQ>>-z!i$W;Ys=PTmOqAK;YG~r7It}|KYda+;RC*5>h9X!igdSpY4t) z7o+Zq!UZ79Wc`)S_?^)B3$FGXis?JD{%bPU3Uh2(QBT%c-KSWOEw&Z z843b;wP@MS|qN^nSSV@lqU?tbi0IX0GwyVe8 zh8eH-OD@-(S6&w$m-^bfZ{G9JmJN5ULP2n$Y53f8&%M86XG&^jb#-%B z7oE#d%cK^a!iCgQCw9WyRIeG z_?oHCq)I-+a8;$eCY8)6wBvHkm=LN~>LIl0DfCk^&9KTa4zLo+C&=30#8+7k7U<5^ zxw`uQccb=K?fRK4vT=VdJG@a}Bb(`S{JO*T4ZH=zNr8(^{zHkBZuK{v+Swk%Rl4~) z(|UvM`c;eeYD7c-&P4k2r+N~)XLqDYcV1EEvPY^E*P8pR0?jl}G1kZRh{OSncFGPp z1{aEzrMtudbdCr*)^QRoQtLhGv(LAJDs_*Ygyex zfGi4stdBS9Rui;0WMO8_I7AoUcSOJhn#HDjkD(7tcH^u+F10 zU(u%IL-JKoW225`8$4K6;7l2izSkH)5HWz!*5RS?(8c9k4A^QD(LDt2G7A)1VYL6U*5v__q@h`@;RYI^QSLD9KrPnm7>QVd+OkU!|iQM%zA@%9MK`2 zgU&!U)%!_&$C-R?LW3^3OkPXz=U4Y<6zd}kt@~s7Z^m#IznZr3x#YW^O%0s{-A1xId72F7VQURC3)UwyWC6W|3)vqY1LrL%63JZlpJ=BOC2$ zeIuBmB50 z8CFXs4azy}r)c;?6#j54#aS$z%Hxcd@n>^sBNd!!lKd;O<|@s2lc62Q`l?IdX=e5p z^g1$HVJ0$>h3`xG-I-=rG<7IlJRi~Jy&}4n$e2FY;z<|XNE3dEeZ$z^Kn8oJMDa}| zeI|-An@F3)@-JO-GevkkMSLTIIu=b1r1548MYCzNAsCe8a!2#o!D7hE^QTK$V^uVN z181~dJPch6q~t2&jEoUfvPTQkxmV(;N%2)t;RV}Y-o6qwSKJ7O@K5pT=atn@=k~iy^(t$Hqv`0$qJ5%Mylax{U{qZ^6BjHVZcIU5M^U*R$v4wrOa_y1L zTQ2O}Uy0aryx?4XOD)@vhK~52Kt!`6v)2g`xzbi+7k>m`rIC%Q`2z@*1Rm%vI$d2~ zPb)2JEh;8OM4Kr z>9hc>(5H;HVz$T&X;9SMC=xea?xo2Fdqqw(q~L=jcKOfOn34WmY;r`_$&xyZz^jCI ze;g^0)-{pd?x^HVUGDImsx-!SInUJTDtoNGvWa%_SV^}vqCuP3We@KdIoA@1AWfaD z44f<*I96=C)M`Ilt&OMYU;nx?v5Z? zKt_%0w5RlW(#TG*whC#%V#Wwgwo0n6p5<;}dsxCjq~T(!-yoVHRp{GmEu}@|$cy>g zp4kSX3vr$k?9iVkgFoZdzcu^+t^faTT}s{Y&HY8Z!sQCKs&Ky8x9@mXR*6#Xfj^y8 zFwCMl&!tlHNtR;TWQ*cEs_E}2#^3TRzaz`xC-_^E^6MJg@9XUUP$vBr#n?R&ymikc z-Syx(^ztlQx@Y;a&!E)+-N+>?_pRS_;(q5YU8x$O-n*pl|}GEu+Mz6MA$=g%Dyl#3=LvC&I+{8hL|S79<76 ztzdD;C+omW* z>|&+nlenIoUQ45VtWNQLO6SnWNs@!PhU9v6m-Y&Ml-I8mxX9KX^{l8vFW237Pv z$vA=-K&(=F<_;BFUyEVyEik=%nSLN&l>&mgaIOxlONpN%b&^GPShcF8g9^R}Ojn-f zYAfB7(&@NNGRL+KqE9)lZ78ZKQXzI{#!~vdch${_{l{4kN_B_gP zN~`m9wK}$AAgbMZu2BcTx!mcDXmtafVtV}t%2kOy&X`uqB@!W%mB<)6*`Uwtb*FUN z6a|WP`$n4Q`DdzH`rc+0wpmDu?38DVIknx4i=i6uXUqSwI$4U1$bMU`=HTCBM zb!WT^ef1y)Y~H*XZA6zZrwe#iiwS0$Giupn6LSR1s*A;%@Dgoog}%6NB&W&FxBkA2 zGhM_OkM12hMY3-@(e%U@)vKS3U;0S&@{LCptv#@K(XOyCsNEh|vULB}r!GJASai}A zp3e4rq4gG)8I7{30;(%pFqOs{sbY>6_xhO75;xs6!1YfF=>r$SVwg4SAv>U`trIqq z1c*L{w6mArR8LmPZB~_MK{h;H@Gf^Jt-ts$n~)T){8GG48ff0s?2L}rIbZPa#auD2@Y zi>ZU>YmAV*OKVYMACM*+Q&J0qbZOq`>8S)zzXJQ*c#A7TvT_xo#`#+j_1$eAlT|e{!EUgB?s~4dwDCGjU=tCNnv+DV$047*;B; zA-_xMcBc1wawM~HR9_CwS0S20b0Q!sn?IJt8!Zw|WwC-+sO}tww}2ZcKPU3&!dtQ)F>~rWnN{U#}U1fGS$3@~%|w{q#5l`N6{mUV+E>r;tUQ z?SFkU?$77oU+)E8>fWBEss`E1%o;(!no|R#$at)GjkPmXZOvWP(m{ zw(!2*7eRggjNrLbynA+aK6Q-y$nLJ^4l^J4jB?+ned&R&?`zhz=?9`M|`$v$Y+7==~e`-0$9eojePh% zxUr6cqzN{}vA#keF$C!dm3G2fT|5XGOt}zzs(wOD6~|>kHq*|h6LzRD356*}Gt*hx zrfH-)Dbfjwc&vl%qq5^mO!3zU zCMq~1apbG-CP-e0m%Wm#x=^ny7LV8QMlxHBhtfr{wF5;gZ-ZjGQ#sWv9;xRKgRiwa zO9G1f^Ox06N6DVJsCxLcpA@Vi(;O(?0+U0qxvczm}&IEdQ2SVA1nZcxOw zTF+IhPE_i{Ndpm0j&rqEVBOhT`^gI3xmt5XlP!|e9|Mb=wt=EHV|llYO|>e;0V6Nq zkWZ>PV>b3IsCBA{T?$8wd@-9;1!R>FvrHRj`0 z##q%gw64WLJBVT z-uK|U?|qn^Rjt!{j7kpySxU&2&#?@D$gJ~xm~46Zf@FJy>iq=Ewj-<;j&WW*E8liX z@}4SY67TsN&6%S$>vy!ls=>Co*&|p-%-lDTqp`)DsAUan9lVdeAwGuxo<@ zx?w12IaNb;v3Ee?!%iO>H*Csb1gce7Uzs&ypeor7BW5)?S7WHOoAeWCpfjkvHp8$< z7X;%=rE>YH1Ghmad3N%BJpFZ!_9|?bMaCNv)inB@HO6_g3PL!YB@eI+ zQykMwk6{kMcm1wcf2&1yjjaE+*Zf_x;%Zd;)RA)6Vba9D+F)W&e_Q`|z51I?qKRt3 zS7h`5?lONxQqQsbzvel(0=u53o(K42NG-x)t7yb5nbQjh3S2X9q=@Tp($2S9Z!{X_*~WRU z`I;7@sVZ!V&Vk(9C?0E;P38!vixt<4WVf>USCiQjCE9P(*mK3o@ADPE$PnC2=FJys ze_0})YtVn&rn^N_ec53Au10&SRQ%Ny`c#?bR|T?fAOeplRDPc;{kmNHn>6-(uI!sD zqMP~hZ!`GUbGTn-bFQNfpTPi6W*BPoUGgBBrlF9Akg@vN-I}=Q^pD>A9Q(q+D~Osb z4I?x~{|e^Rf7e|8pYV6@j92*N_}&-fBEr_L+wjb@+s>YeWzZ$4NJHTbE(}&qfX15H z_eI6}w@Nqfs9y6RL}-LQ>{e5e`b@Spwj@-pjYA--1*qg%N6Zg=}B+OYvE(DfUa-KuMcOs-5JMOh2 z2Uu8mfJK*_=aO=W|HWg0hzJVH)6}kK_F=^pbntynfuBM%G&KwRSoR*emBMzT#@

OM?RJbti!%l^7Y zkG6btsiKHI(8zVxvFvTquWDG+6|$R2peiNyU1~x`JXb54LWO5u?l5)vvq%RM|Mv?ETKE4V}-r8_!{x)GR=i*0?~!|Ap~Fl6K3-NjL&#yyn-w|E>)osK${-i68G&r zSzFU#6u2NtX<_>ZWm8h+cQp<6H!ljd9i_Z-!T#Xq;+GGbpWUn3@(%5x9jvDhNw=Rf zzH(H$Biyt%QvKRK%I7C(XD-W045*R+o~*l3%^teaW2)f$P`Ds!7lNyaJ%RI$PH?bM z&_I;-S{t}tKF6m*>02@i(93l9L zJ`SzKtC#sh1P0=P%mV{rl;3gOs2D~7({Nm+84*ba$#iFDUqAGOAqnmh1^`(sj*ZRj z2frPgQyg&++kz~qpDr2{t9`&L6rY*G!7lks4Z{mjg5+*bHO1T`3o><65NU4^O~zKq z_hnl?P1EhkH|)yMUg(H`YUi}*${Ie5H8`9+@iNS^Ryv8sPCQTly3Ph5eps81K?Tu0|jBF6l){`ivROlC$O^OwBR92w0$5To1r}qRw z^^9!wg3=J*I~>#LOQ-qLsNQ0RuZ%rZOLevKf*i%9#Bfcmnbhj00ag;Bo5A&T^;t+1 zcT=AWFH+p)0=vFe5TIzsSmqg-a!9EeL9+}{0xMoX7RXlx6kh__AK&9kr;J{1^WXuf zs!8M_M0`*13VZf)w>yJ1TFDF62uFJqljx&_S8M^B)zT4o#VXj|?s|Dt zc*=Wk?^%D>dYq`C9+ErGSwPkukNegepw8Mi}&B(otm0w z5?Q%D6m8|J1(^Q5XYM|r&|q| zn^jjR{Y`CV2srf1CJ}Ch4^9v!j>#^vJ9(}_k=H8=B3#mdM~;dU!A^(f9$-x)^C-nm zrPL)84Jbqo=)LGfgBpQbE_Gp}QziF-<&NSNN?6ciXLH?5^;9Fxp5LL*ZPRwr?PyVf ztc?u{4D129z=JL!JcrI3>SKA~CkVMbs$!^}=YYp3^T+eG@25%*RoK&;`>Q#V zRs8X0<+ZpT&nFp-57RYoTo!$nr3i2G)+)y;rNIX2G&a2U=h@%BBzYuC{cxn}(Tma- z5=|ebDx*85EBUiEqN`P^tLe1CPqMi?(&#a5{a08cIjn(9nzc^mDCHV^`A+1aG(iBS z_ATP+q8=xdw=aTPP;L97!hEK~3$_3_2FFR(lqNm)B5RwqT~wz5;xp1wk8Ip780r^I z>6k-M9;<6Gqj;FyV7%PiA61V^kv6T*S=?uAl?^e40|JFtDt5>uPJwiY&T&>!-Q|7G z*fu)~QxUDs@D^0DhECPFL770DK&`CBd$!qsq#7kG^TiHNWUV@n5x}(x`7f4^Ahm|K zxX#quE_8U#wmQ$XInbAVxo`M1)Zkm(M{6uF3p?7-f1=KGyw(`rU^-W$J5#GbV9TdF=y=E5&vWYcj?+Vn14MvoUeXy_xu)i$nuFscdlVS5^N^c0G* z_4e?d{)^qV#CBaquNC=@Kss#^kJ+RXaISGkJ^jLdn4UYhPJ~P3bEBz5I0(o>J_x)* z8VJZji=SEw-M>MV%pKCxGsyygEX+QYVo;+D$i!}d6;>AjBB40YCmpHnwIKa0>@s%H z`UR>9I8eYT24DrTCaA%n+Kk3qD#s7JqR58ZxC5O6SC??AgFg{f>-^%1{F7|;7v=p8 z!nqdNmsln>$>*cn2XiE%v-_cW##}mob{y?o1&M6!J$}q=9bDxKQasXuz;l`G8kc)<6SisG2?qu!`?= zMz*;CStn~yeU%7V0H*KR|V>MTw76It`pBf`!}_F z5CQfhB7-#&*=mdJ8@$kFgIv-%bhmXl!8ttN<|QuH-Oh7l_vKF06&A9vF}$EnGHk%* zwMPvSiKt5>axe+D-cvjw!D={ipNCr{eLg*A;;FVVC1zssdZYahWBq)CodxgjZ z!I41dcpeSMC6msg*QS9sT+-&q?X(q=9U!ht)KgaRkVO;#=K&#*xoI3Tljmj&2K&T* zve1j=N3+CVC74U^aPQ8Qf0`rvESsN92{uZ;MC5blP}n&S4Cx)opk6N(|2msXP#DXyNNw<}a$;QRKN&=`Hjrx2vw92-YJV z>Xrl=dA1gjgUPqE1Or&_0b@Zl?G}$h@i?-{j9oTttDzGIJ9M%22Dl~GwpvKt4v4x- z<%DW0;McDt49f=icAwm9!>hdO&>J2_IhQ^Z-(pRsjRUgIqpz^t72W9wZ?z?n{n)q+Z?vXShr^pK3B7}Ht;Uq@ zeo#{L$pfuS2Sk-+ya_3HTrV0EQk;C=KwqzxR8KF?Z~kP*XOBJj^bd|v1pn%eOQ|~^ z{7+7jpMU+YW&}d{Al6okkqqLZh5FU%HS1n}>AlpHf)HLouE8xIf%Y%z9w_Xfydzf( zs|d50DO7j>R$wdfl(THvR1GIsLUHF)(BS4O=1phz1xh7XW7`HUbvjaLfr!q5c$z;$ zI1|qp23W*kvBz71BVD1X7be zbo_-XS2jGxRv;=@3cpcJ2q{36hS>FkNxE_f>nns6+k(nq$ZgOl^dU6rFL~V2dTJ1O zRYn^GixNIr5M09kASewWXqmunlDT0d!Qy+c%%DgDA-rl5dFv$CQ(7JGC3D`2XQ238 zuDsQz`ld;G<6@olc!@ek@>R9@_a&lVMK%th3HorcF^Z(9)l8G5Gr+44Qu<$wR6Ti2 z{L%&OwgladBHu@4gCCT*pEyH)F`A8@odUsivf);@?j}u*UYKEuZny{CH*&8)HV7J6 z2(KW^0D1O=E?0EVaCir#t46U&SHd1EpaA+l(mV*W@qHwe8QhGL8=9X6|PYNhiU z{;)%PjohQ|XqSPpo~H=$|fCzjwn`8U|1;?U-gpFq&8RHH(Dn`ZVL;WAqd?# zv{NQ&&?=eK^M=J}*ii?;cF?NF`LanY`P!t@WX<&)_O*-kD7iRJwG6_>v|V?j&2+s{ zGjpP8@Qozi@y3Zb#`njH#&)MV-$-*kA8XoOCNDAnve)u;i)!wC)76hN?5`!d9y_CY z=CU+~`|D%P6HiBScjUR>%Ix1;<@=(3IGYmevHebFxXxEj%d~S6^^6wcV6tJQa!M*4 z>yghlaYiy};|09=Wa<=#G^y8HB%UL&2WjdVkKGFB zKZo>?b+QQw$JfdBw=o8*JM3is1XnwZc1VMHTB;zFYA{@ASwbf`HWQVqah74l0ak-K?EU`bI!3Ol`7|)bB+pC$|4vXkA2SR zJ{?BC`^M|hqu<;rlI?TuJ%76Iy~8Rmmv-&iDoWq}_S)-PYpyx*RpBsQtfzK*myz3{ zq&8KMc~6py&Yq3>=%eLhhJG+OBn#QTz|b^-Ck7uK)Y5%D%tgZ;b%quY%{j zH{Xtzp#U^70yar@2YFiQBf$QS{mw&RTL-S?giYoglgM?C(5-^^{Z|&Hpj^lsJ#D7RzO#Jl@!BcJ$g5B1pG{NdRp_f|ZVJm+Lv?a!Ht5}p zL~UfUIj+PQldC$Oszxjqo^CvzWdXGELa{lqOj9FnM}iSf$t(0bI6f2I?c)2@Jhzx; z#^Mh88mO3{va&uDDXDi^@}9%~8gbTke;d6KXx^q)w&z&@EWPYo>`>D12gd4}axk z_UOqi{7PGXEaS$Vq%Av+Em^W^^ym)(U_eE;z`1A?0wFHvN(k>muHx(TqPe6tWK@<#71dtdbqmC7yUfE2TyoreYWQ~L= zny@FRBuFd<%+ijS6dgKan3%aSboj^WvuXt`p-qipOZyTPvmy&jB}i?`iJoR zZ$FE6Z;S7|&iwcF4;mL;vVC&X`{{k_&g@RCl(WqLSfYGUB!5;XgQQL?PvDa)+gXb5 zYI!~B>~C@eKi;8r!S2_4fF>=ju{UtrERt4-qSGm``=lNW7w{*DISG@X=Ll?sJ{b06 z`K%Q*8bSW7Xch9@5Q!ElI>b`HLe-(ww2MXFAchuD5JacJxQ;D(T2|-E6+BO6v?mC^ z0V?$Y|NHyA?*I^uBDW*cexB5dsxyYzN%Fwg`gWDUrVfEd2K#nrxhe!G;2v# z)!i$PHgEb0qNpQAj6ky(u0bMp!ZLt(ep}Z5JzSc7f8#GkAQ(bp5(EwWLi6S>3_o%_ zD*6#iqD3~FFky$7)r>_%e6IRThU8kQ@mRL>U^&8Y&IYYjvLi2z$%=} zGXoZQAW?y05JIW&Y{StUBTCqy>OEWP-IJ_FQwB5+_GcM)r)dvm>Gq|mE*0u87a8uP z^UAp`LbhAP@gSqF2V9C{S1qL0Rouu36tBH2!uz>N?K`F2PO zf>0O9b_LrlV>*E%gTI2a($YK`Wsb*Ln)AihL#gtJBGu_!X;QhWTI9D2+Kj9wPJ>g( z^wslhH7pYv^vY=7ygFMc!+W=`efI;wN0-@4uJQJzaUO}oEOSJd=hUp{n8?X=^0XR4Y~#LvJ&@I|x+{%YZQ1!+xg$eO~z8!Bg= zk}STYAGn3me`77_i|nz7DXXqmqY@EYYkyc{&8#(M*PCe!n@G|^=5{CM>n~=Qk3W_l zN>zgZ;X9SMaeR2*=7yP1b^j_!*#bP z*e({`Qcu=Y)EVoEQmGd%QNVWz1#X~0(58fOBVe~&FHQjk%*;jF+o+giC{JYRVJJt2 z=h*hA8~3K_x5g@hWH_h~VrMkt#f~@`1T4Zcbo&zJ2a@GSGqtxWoGCn%Py>ZRe>uli zEpWkK)d?EO{3f_8rlgUp@N+pFpOPUDxWH@r(lf<+|o5awC$l*nnsh=#MVdG(*!0 zhK;kuo*R^|OO@WMHBHycOb8p&tBuvdR++d71}6h7D0-81P_z*>LMRXwKp3$^6%l1Y z81ge%L0}JIQZEq)_OkOqSP*Y%g+AnvgAC7z4+V5zGTHOE%oqM$uT{qhm()t<-l zMG?yRXJs>wvDV$OEWK=-u%9<-8)xKJ*2I0R$p^XXq8YcD&vGR_0HH+{J=_1-vG9y? z`eFX${rm~L+0(;?Yi_xw9hc2Lr=59*y)a6ABwKl#*_ul8WU`t{=?=&x%lPd|QCAJ4 zHNDXApvV}VtxBpf$CheQ=v0jFnjJOdiVi>TpFq6<};Mxl-wgDz`^dn(vT(j~VU7 zpf^-MXG&We1Wk~c;0XLud8Y_sXF`ue4B=W2qCo)afKfqFz|QweDB7~ry3Poy4h7@rsU|dldO6!+6Es6Amfnc+DA8l`bt<7vKiQR3Nq zD+hm3K5S!E*t&|5TPQ;}RZrN zV5};uZ;a1W+{lpM&QT|mEm<^oJ;y6hb!%iD0HP!FhA>i2w?cUq(Ge`zl%(KVVLGl= z!!|o5jSk4o2)yuDHn38N{P0&&j$4fU9yo{DR%mcw05PgcoCo zOKrDuw5PKT1pigK>P)fiNS1zI3M9bH`%*PWvQ5YGtO%ZwjXa*MM_2_pu%qd!BWbcz zx!R~g)A=0jgECDr#Dh2rilPK>XSTJ`>xir@PsOa(0E} z(dFc|D>qD=I48((_10PaFXwRI0l$Y4z-^0|620p|1XsZgsMSxKHh15?@ThBd^NOo= zT8~_2MY2dKbjc*GVz3i18}H}KuU0y)RXHOn8j+qt&H7T66C`rcjKFoO|1PI1itN2o z-xOKp0p&;x=jjv4x3}s7cc~rd$&I0Qpe6rOS@SJ&Q*>=}60`YXt)r6br7JrjLyYDT zh))5EfOI;_f(Wiu;wD5;Fpb2EAPQj>f`OnRk%gT^cpz&u%9@C`5ML2DZa}KsWhMt70`<#GOV#n_31zPY>9S*s@@^HvKq%?pf(a z7i4qK2zJE@;{ec-c4zQg52yM!MC+HFGmqL#8?~7^Wv^uNLE+TH;&u0$7Deh8UEpkr zvpnPk9`oA?>IRk%G{_XL59%-)UOT11L#}lcR~Z`6RtfGwDZaDUEF!X1Smo)YeksR= zss!X4kmbWmgjh&JVTfQz{ed~h#&_G1!Q*?}00m`UW|QF*6+b7{ZIZzqy>mMKx71n zXSghE^al`Y$SCLl?%ID0E{jqxR4VLPHJDVye1m}*DZS1PX9eaE+++bAj3~97$kl-O z=vbcSM4=H{PR9!jP>e!|b)wJ=kxevTL>44iHsMgleKVG<91h%*uosJu6FEh?yxP?ndelCu9!#d zsvEnvVb)3R7Z02$s9}ASB?NbI)8@OT`A2Evx3foVpiJ1oANU!0$i~_aw$T=x*TQC> zrmngrzftGBi56puJ*D1;6<^R_i5k4+6{d+~DRtQQNJcIEVpsZt=ChSM|&FNgz z$!tSpq2+Y8?qZP%b}e6Zzsh<)N1Rq|s;swh#O)H1U%+d`X~M~JihK^C*U9!7DK-g3 zUzSRFa3g8cn%yIZjvG8+B;l`!*+@KsZtCrGaA)81?{EZy$xOmy5f9Xfi4Y65!u}y) zV?G$SV9~NeM@~MBO;M=K7L`vcwg>OXd~pYO0}|^!Db&VCoGx^{qNM_jU+H;A*iY24r!yHZ)>@CXOcsPapyb zA`?ZJqzM6oS_GcDCZwl+8(-lb4MR*7v>-YwSX;F693H$Y>rx2VcHF6JM1#r0 zGBbFqWa2KEUEYDr6#!REj*Ty9fq|I;AkqS6O9{8_LaOsrobgz}lYfiK73!H#e~E4)uJcJ5%vIP1>_1 z&cF1MZf>}K^k&ZF-O3pUbW;w>CheCjyK35*+Or{6xii(ABx+9-w&l}YrJN?9>m|w# z#Fp^7pqDpF+RdUi^nlw%jiCHOrxH3V!KaGw$)M;hl}ZpG`SkoIqp$`0iKL$hv1Jno zc0gC?5qaH0BDiw$+;CHHR$dVTEiXO_i$oyV@GDkT0GD?bcY@QFgUWre6h?*SfTY? zjv9Q6AA1{Uk@|=A8#Lj=>8n5cGUCFG^2!FQ zy3wTY1hI%>c@K@%n8^a_FM#CgV_r|H_~m_SAW`u3Lq=x|vl~V2Sm8H7K?53ki`IFY z+6g+!B=L7wDt+maACma5@NTC5FCb{TNA|&4QPf}aWzcu%LIzkZBd`j@(ofO^%20#6 z6^or9jvf1PO$FC|@KJD9AaDp8cE0sja9KW}Nx62l5K8F&Y*s6L)DuqE1273to2r!G zXp}Dm+<;Bij>}x8^b5pZI4g;?9Zg0Mn5dRK&7u0D(%q3MjyPI#wdK!cvi1^5>y`9p z+b(F9o%hT-q+58xI{%n?!5Q)Xf!|Vz_f%NG0Fi5R~6Aah}7#4sq16Wmom6Zb2(FAAZ z;5j`)U$e~bllZY1bn#t2u@4^w0x^6JLAWaKZ5EI>VOb6KFknZaTg2oy=P_HM0Rg^K zSc2rmBOZvbUZg6&z0d2q%Wj9}#T`~#qV#1fzXxowNC?F7dmi%u5AIG=e48QtK1cb} z9ZJ)!T5lq+ErHvb&2;B;8__$!6*cQcjreZJT$wp8Gu>@t`ATx@FQ32n*{Tf_$4*D) zihwL&G7|HVSP}*w!K)L_3i`Rfzbm!xFaGTa1n*tMb8v0gf56}mCr#VDb?>zs_fu0! z#UeApcz6jA1vAM;;2RUOMPT~9mLt5DZ@O7zMdSaeR5=y}r*e!)IG-tTzt%x0cHt%R z?EpEP&9~s)!@07v6~+tcg6LvRNwv9wO)P4#5`h>5zzIRV1%=Q9h=PIxz6CcHgFrI8 zT@Na_c33dAPHgvPZjqeFA_zT(V8?PImf-u)sf{mrzuI}NKo^;-hCR#>mrxPBbpb*N zVi`KqQpYma&<$lQ4_1PuTvr~=44gJtU)JB^!LC>9QY5W$f{qh8vN@;awPkavbIR%Zk^3sghu2R(QMffx8OQ5@aQv4Ke6vrArtFao zS=SJ{vVpXuhP0xTw5oj6F7mWvob?ZdM+%)ctMwrH%&O9ZMxMp6OT{f#p~Jv2>*)?N z8*ospY8%lMi3);>5l{*M zDzFSZnr+515Q{^g`VS2zC5Sor?h%}s#Orrk z@80d(`hAW-a4rzf!Brvj2}Ao0obcf+xUB2f;_7OJE`2AG4_Xw{#jSK<8$;BdLUSfH z*b}I2U`N5)0T=ttTK{cI8|vNnd9N;1`)|;C&}epp+64qDVl9Z{JY+pRUuBMFx1=(g zK<6%yKSifAlEz5(qOAr7=mG$u!7dxLA)~V|sJ2W%7sMW$@V;t88@-lHtd)B%jAL!e!0B)Ho}`HS?%o-YMy%1Dy5u8qZSx zv@5r3dzNoQl5OD?>D-ILRng2dRV^9HS1`m^t8Q49M|vjjmWHiijM^;zaG!YEVa38o z`Rd!&y;-IQ(w}lvJsGkNaLAMSEpqS^D%#<%ECRco-{cgw*u(*_%?DR`!MX#&Cjd5r zJxW-l8)PoD6zN4oc8lmg0@bPrjZ3Wc945@IC?e}z;Y3J|~#*!W)fD;P-cF=(i< zVrd!tWFo)py|amIlzPLjQZ+(tIH3H?5x@=)y7 z>`s&b?SS?ifJ@P}0a4L2Im+l7?X7A}Y=O8G1$1sBL|SD`hnnX_K!x}U>dfGQk%Hbz zOpq-|7$B#z0}Dzdlfls58(F;#v4~u8Z-@oJBthLEB4|j>f>y{$fW+xaGWS}s=^|5_Xz`pP;hh>lU^gkDTB%~(V=lrcaKU@B-JlI=yDrnFj1WU6Y{_4?!S(wOSzMEc7V z*0%=}+>4GszORSZ}~gN3an!v=3E!UrzDTzj_68&ji=rI-q< z4OKL!0%>r8&&74ZKzs@VkPHktJdu?nFhiM9Ah4iMO3DChy&EXdAS1niixKmvg;vB` zfX-sLfLjo=oF<0V3p^Xst7&jhOD$ZoN5urYG4= zd6(k5Q>#zn`_OxWju^SP75*yNTdkHf!XV8I>Z+i>LLh-?0Yotb{erj=JtJ6*)VTYR^|L6^{Bxo?r}-22 zu;!gqY>KxZD(Kjm(hBs#xC69_hnZ84ayP}bEV`(hdQ3R?RNeLjOPc8GOzAi0ihDNR z)y@f5PueYBm^huW66un89tHEpAE2Xs~@WNVv+tEa8WWk}AgSXP z0=?h{6w|=)z+bVdoK^`zG6oPS{FOx>0Gvn8u30)?&1+Nql*98G_2G>Pp z*}>RZT4#c2*TY=NxhKq1kEkb~Fd=OpnasbCBDj>yiO!MU%N57uNq{n{V|!Q};#SUM znqhz}3K&Lc?Qt0#TRGoHt4>=*)#MA9SWt=q(qEU#yA{EIO+i@?}NX=c%D<5(j@-vf;jWbF6350SakZ zddMdk16CH3mge#`^8uGw&pb*9)6Tdliat|~53(dcgUFQY@*%CbA~hoJA9MNre@@8xlf zFh1KP;9vyoh@AvXyNKbtY~kFdPlr$SE6ED9JH!c!S<`o54cEM?N3)i=j&>rEH!IdCV?YL70?aefO7gfF6 zdh=f2&)@S1ysgE6**!RadPA&!A^nC zxuz4)YZzJFQ7h>zmp!l5eg`^nD9YvWJ0TugChjT`c9in{RPEP%kS|Hw_`*hX^#(Bv zLChzLgLtV{wW41GQI-ZQ?usTPuQZ@}0o0+F;VRhCOi;)477+0g6)uEZ2(Hk@6Re|w zTDh#+cB4T1q~4p%>5Q(hS1?;7=ARX^PPiBv}+}PpWJWZI&F&QcIAu6OVyjV#cDJ^ zsMX&i1Z~oFkqbrO-qA??daz)L8;L$~3_f6N%2v6og{6B{#PEX53Iq6v^D05~}O=Lki5Ffeu1{5tM%3+&NWNCXq92 z(MsElK-W`DI*yxKD9Qx4)!xWia~2I7F}5F8f}vpm(qPKHbyjdqZyxWw)Vr-W@Adus z-HyQP%5gBXdJ~WnkSyH%NTEZ*22GqiZOJDq51hPk`*CVXIZvs;GT3}QxH`aQ{O(`T!sn8~udqpA# z=mLo5GNHGgtmYu-5_v#tOpvh)Trgy2P&CA12L|dGq_aRGiVb9VP%p!^00T}5$f6>C z+mlMujUv+>C=qANK_~})7{06rYtQ-`13|<`wE*mtM|Ea2*z;K46j4WptOwB!ikMKK zE>S!$g1Q8&WkZ~O{UghWo#e6mshe(TFPFXAlluIFZS?~dmycV|T(U`|XH=Nwdw-@+RE zRq5w9^}wW|Hjz|oEaW%QC=Q9R4fQ+Z!>tlD0NR7hIcT@ha9kReQ^i153V*m45ODx6 zMM8`fxMBbhwV}ZigfIra(I_x!K@iQcph-~9^BUL=jD}p$;kNv|YFqri^OaYh2>7PI z5Mo1ER0^8Jbaak4Nx42X`U<%olna4yK(`LU<_2k3W|i@7g$)JPi>02^xfX!v(0&DF zXQK1E(gO{8^c5aRQ(mV8KqU%lK5T?%sF16Stad~|%{fN}!mApxRVeBJNK6e$T$Q)c z(Vd^$aN}Cy@naW3UNmy#@Bss`03-}EuD7e1m~X)->&=z;&P%=9dh=f2&)@9`1pO7@ zSVV9YLg*4=D2Qp)>#s0{`h^W1F>36hmFxE&JAd+tfm_&-c zye6)sg9l|~`7^4Z9c4s73s}5nbdUk&BoqZS9B_WV&LqQM!DKRzLgAB28sV?hiU1hb zwWZ&OhNfn;HUpmt$Wso(UBqk7*S0ogBjtH85Yq5S$vrg&wv zdd4aG{7A)~tY`7O|7Z6j`>5>{_^VN$QQ@){?GO!FSTJH~C23~%w69oW){!S4VP2*G z+lpx6yvT-!w5}}qPmkC?!C$R9r(PYQ9kQx^=%*^+KWzPwxZ;y2+ioOLb4Q!t! zB0qzQoO!@23jmm8lOh-A)C=4|Xauq7L2nG|LZD|+FMvrUO=6Kxhvb#Ou9P$Z0B;hS z%_0jLkyJbzf-9u3Fd8tmq{m_W@ot)a?e3Hfhf>(OKY>Gi%y@Z%azZi{>kO2b+LRt0G)$5KQkBE&;dGIJ% zBGa1TAXsqD(&bY9L@ZH_grxh1jr3tliV$n9IH(@=6*Z#bU(b|3+xW;>sQg2j?#~5=|99D$s%2*lt1eh)ACoRR zt63gl{_Kit#Z~U1Y;U^$+b6P~3Vr}hc2a@YpzZ(=)Fy8+NL*^Z70grwu0!1c&I*kv zpceYI0{qqO!O=skC=)>lyA$otfP4VGfYlr@9z@!lC|lqeAP0<(AB2RsttfSWIC(C2 z-xbE`2Qt0t8-@5Ox(H!N=|j=XiqKBb3V|UkCzVo%TxcrBmELiM)*jD!_K4n@%|j&9K*L5n+9Bw!I(c|6=;}z33Z(zcvC` z0tS;;Z)VVY2Lb0WVDQ*+AI_Pxc=zrjQI~Jujfu}ltpftVEN=rwG3c+*28d;ySmYJ~ zjwo=T0g#}p;yZu^g~^4@P;f?g0F#KpF5(f3orHmlN$7xo!|@=!4AO+6;EtAL#1BLu zfp;N%BXQ$OB&uUvmx4_=D?QJK>(0V-!(Y)k-snox?JDz)d|h;r@oqeWr+fh#6OaRt zdCkQQ_Ckg;k7_GoSqm8EY?dRJ<2n>ChF!|F=F5Htl)XUE3@-YkkC;dETQ8Ddoha*` zd8+=y?G=-DRE}O-Gjv7i)MeBOi^zi)W{>)$IBY@A@TJ9LmRF8lQ8ji4WAGQ%NAg;i zUlm1{yRyaKB#Zwvbyxb--Q4MW`NKDnVPm&Yr|so0zrwl2{4s_XcpzxYZE!*$6-zL1 zyaZ8Xa8@dw1(Xy*t_45^G1he4Mj6K^XL(iJCWy;}eH5{xQrZq(QG#BE>%qt)^@M_H zaJ`JS8W@=R0Dge8f*Eapxp=jF?w5~0J5*3zW>U*uK%4?}G=NN?5UFD|8aUwVBcQnw zfmsIlgxHU!gF-=PY=t>0PkFc6cCH*sUZ&F(?z2@8p|FAX41eSGVjI}cE`wnPOhM(I ztA*y<6|M($E*uYk#SwMD&BEZXlC!Djqo16-`e5V6?H_zF0nTb5u?!^8>_D;i_BIp# zs?S-ycd_+t{#_&Rp0oOOeAWB=Ap^n&g@p}A8G7y7&3pEQU%q@NAt9@-ieodPK?ZmO z#?@<9{FYbdcaT8z=m?CFfXcFIktKQce1TJbrEE zoUd5JmK4nSv|-w^no%DY4Vjxga8CZ{rByS(U`<;`2Z(g|=Bn+fh7;v2_v&3~;_fov ze=NCBzWB6a<^j&wos{{fWs`T)KfPo+S=f}M{MR@^+dYO4@;BAOHV_qp-qRonAUfrt zKS{>t~a>)rN6?+ye{D2HaMt%|DmHsO`1D*$;OSlA|kHeyOq#D=7W3* z+RDIiN|7+{^bME4i&ghXNr>r9rw7;ryfchvbK1{7v)1Xl#@Qm_%hmkH1pL*=W3&Bx=-dx zuaT|s#VUXYm=rVo6{1sKy@|!~!5Y}!I))4M=Jil+WqT^AwrZ}UjA1UI=+Y~sIpwnA zT5WNOqJe6cu$sh7=wZ3Rwg<)u7?8Ix8OwscX&}>J;C$9dIu+_4xPqtm?pN+VcrPuR zqtN!Km{?GEK(4~Va4C2?IakZ$nOH0x{1uM}a`ooCDjnp3BGQy63hdzGI8ow0lxsPd zBtM*@+!HUnQ0CZ?p*RRt`eZS9IifNZF%@<&;fth=xF6wWq!Kok=5Q`wj=y#-Y2#N1 zrp{VCeE4vHtl*sn^y`nOxA7JB5DUZJ2c}owRoFKIf9DAF)&?Aex+x?oh6!t67V-^XXOQcU>Y*8EdmmtspO&QQ2!-^DLIif(m_Ggew z#MODq)!)_2JCN7P;eB1M{P|*aM-2CevnAatF7cNiHO}8Ho3%yq;X3xrFBntTHcVJu zIdy&Aj4jN0JNc77=V1Tz^_&qOSI#>k`{2vkPp|MV*L+=~`mR9svQYPzlj+*eZW>ly z)hxXrKa|;hI{({^cbrh%NKyVJk>85CBt=3Pgy2<@Hl?&vCF?3vy~^aaB{N%-7=Z*v z=c9T*!kZ_Qz>@}FBE30@;YjCt3z?RDx(NzvQdt0P;AjR18iW9T^dcWLG8Zh^6%GYe zm{t7TEPQGeK66OEhV~F7t*_syEUU4obw4RJKZ5-agr#Pg1*TP_Ey$x#cFW|Qh|@rf zU&Zz3kgd?Oj;Hw0*#3Zq5=LVp=lNYq0Qy{z>w3iNj;*xk@wyu5Ej(e5lkY++5J3hj z@rtCb$MGfiVv@Fgbr6*7Lx+rj%w=$D5z1V>$k1T^>UDhehKKFV^!qFG@ZF5;+v*zu zVxr*o_E+W!Zi_^E0ZKXp1_m<^X!wH5>K_*N!RXN|R;)dFGNPieK`t;F2w@tljB1oN z7Qq2O$!P9Lp3Bv(H+y%p19J(30nJ_-X3YJkk zqjLnmg-?^y?NX{$PSu-xMQ|X6gO)&YsU{{npH4he(A`MOGr~whcC_#os|+YHzRajCTV7V$n3(fIfeaZ=7lWFAH1e~ z)Rv5o&r+W>G{ND-GJ3weS~qbInY27<#bx!JFD9Nv`AxGV3%b8L-$+ z8b*(85wXl@RfYjp%4Hk)Of3vZS}Dtd78o(rp`f*>nXMMVQzN$vi*XQVv4!m?&u47e zcCU);G0WPFk^r2Qf~^$rtQ?k+&TzqabQ5CTN={31iROHY@Kihp#6bt1@Q=hxV8_yw zTW(W9eFjC;=zQ(1JWVad#}_?CleL9qg%`!Qy7wUW{Dnv1M_=i%-etPSY}FzOlUO8&?DmlQz**oDE1Nj>Ol^xUUg1X17V1=pd|uD+rPTWqY8oF@ zHOJMpl?mEv70*=arvQCbvOV=8KUv;YE(}n_fhvwShvTD~zrB)cyj|)nRd<(bpB719 zR%!omm+}t>6B;+h`&L97ZgBs+Bi#+P(?utwgO*eeTwFEw(}wYDXjuA9Tva!6Y4Pag zWrG$L5B<1o^pe^SSJ6rHOD2CMopXe@;kGM|@jP4h$9%&-fsbP4HPy-DuWvE_$D(u6 zxhDmCQaZN92uiL0-(!k9gWp~&Y_DLW6xfD(pGfhns^0OK`|N6!7c60rYrI44L3>LA z^I06NJB``)sM-Yz{c@gPs_7B{FN(2(^ARFdh{0?|R}KPKm|pHP09h(;M$jc!^l*6~ z%t5^L6i_Rm7j(h^>Wl{IbF1o`gQs$05`=Xuzd-rYB?$mjZv@MhtWlzBmI4y2^r#eW zmb_JBd|trvCRAv_^L)G9_>dYvcVu*p>rSnwSkiO5P+iY*QMq1FvZFW3#OpM0+EwaK zllklGv8jj7Ut727i;?3;!zJ}b=(xwhSrImnSQru%F|UIw;zrr$uijm8eOrIe2>dO7 z73}Q_t_p*GH z3On#Ap%qRjf0|vWj484{EOp#0gs4OyCQsI&c?oVS285+(cKE1#rUw^Y1&eqI^_GX_ z>I)f~R8~)}7|X+s6nfyqWA@7P!cWfd=A0Lf+FP^XiD_%Hebzzl*e&F-YncStjK3()}O_r*dtl^Xy6N7w0n#_bcr9l4MC|t+b0HZstk-&<}!R#}L6^0rmiwB@=rkgmMH? zO9jYQF7mM0jRIjSlhssRW8u;4%sP{l;Rd;uM%b+t^$68}IDM)7dQ6>E_dOWz9axWZ ztUA7fCvo$o9;w)d4tJiqlOZL%JwyZXg=6bo&_cadX1`VKyk22Tqc^5dy=;^TWNk?A zL(>-i$}WC}*e^4Sb@s-C)m!&XpEoOX@BlcYUQi!4h)e>JObCYQzwuYU39bh5@4ptSR{6c`(dtvQC zu5t|@(Nr_gq4+2wMTVAVMTbGvRl)1XrFb7!w_M3FLjfm==0#GPuJH4vjSQZnoYz>y zbirAb@>{Cdu3EkixvYCxf}{#}wfLKS$Nryr?^oqRtTikfZtW0i$)zZPUjWWphtR=Ny+z+)w}Pw&QS$I!XLPEZLFH4pefQ zOXwaB%PEuiIqH`=)t1K%&myyIV359A)p)hSe5urc(m+zZg&}R`s@hmwyO03T5~S`5 z4&vAVc<*8ObqpX}7Vr;ZAV4Hd0y#(s167i)LUwaT}{4nJ@w$Rvoq%}89Xc~c^aH(gs1AY zu-@Q`NIeAODhD*-+uF3?+1JM z#JAVMU;nhez5lyL0F&pfv%>ao&(kkYE-~8(mjxZ(upx`)uiU*OJUOYDPLpfZKBb(H zmx9YeNgd3eK@>WWpF|glz=@P>5ND+TssStnV(`N^NyLpX0&vxgSp zrU(+ogujA$K*Gs$Acv2%SazK|rNV-+3jQjd;(`KB1>43qbW@mS8pl?~^}#B|ZG~)K z1=GxK z>tBwhNf$WGFRos@`TBMAeAirX(zK+k6$5Ef3 zOE&{E0J^Y?#UPsQfc9vyxRnNBHBAQ>d^=c5_l^&GYE%%)frb&_?n1&4Wr3~%)m3;f z2EVa^?arpUArX>5cEs1%GpY7uvazbx%H{{ah-DG_`TTCZ{-<-dIVY~sl*}Hh^aoJT zfYm{(a;g<}g~9_88-&4FW1^`OY((tRRiBTVFpX%i>E(&(olLJ6gIEt@;=l<1^2TMsUj^-#4(AthFgX2s z3yHtDfxfw3-uE-X&wlgHFMqy2jo;sX^Nn7A4qgTyzx?gKSN{i%z`N7;CZB-$^Zt2! zJ6nh^jRfidP!|!6JYzaa9K?ddC_ug zD6%8y3iihZRnY|^4`E_2;s>$RE0O>z=@RlBSkw^oGJJ@0c_E^w=OU~^e1)bSw^a)M z-k!V?4R}iu>HaH)whKAN*fR6uatp|ffnO@GGt&8uWt^r`c4HCCUCahExs9v{WKwL% zWmU<#tK~g0)z7zG7cReIn{iYEPqpBTVe&TKlXKJk3ajg7-BjQ-FQIn%3-&pP+Wx+OHPfR!?vT#m}B@px!iCm$9XDI z2WNG;!h5mYoG5u#AZ;&_cS3BmR?tkBG{JF^1zwswKvT5UOIql1=#YAuvKF4YohE1o zQmcX2T+8yJVL7|b_Nc~vr_@3e^~gS?#X$7~ZTfmaJ37QM{w8UUUepaKUB|H)M0T``qL&kQ5S$L26ceZdB>|(_k5xZi zV#_LL-+mBx{mz3!2ac^?_4&k+;|Gz#2KNHlgWl=Q4Uq68!N=R=RqxG_$X^9r*4z2k zyYcSoc>Pt^cz|;NAKB zYjc1&eecZ{B6W%+R_|l#AW5ARND1{Hp?rwvcse5G4h+? zuK+?oxJ6tqq9!EIu_Pp17H;CQCO9j&EW%kyy+lG@hS19g3vxP{1aN%>DIZ7%9EvuZ zEP$quf-+rfofplyH_P1jYMSA!lE^NW&@WVUArDOB`6_rVuu1^5n647OyIR&#BkQb| zb^sj;e-)YO-4!iee8D(mV-1#p6ZY_D>=w`3EB$aUd%|w!^kej!tbd(%m^Wc78P00r z`l_(SC4-ih4Ov_^VJ($3JAe2p%7+`Nvv=_auF72yF4%Ba`H=UI0C;DLx{FmWkx^fG zPP8;iF<~cb-f`uO6M{t-RFQ?YYn8rINq4#IDQW>Vyhb+5hW=&vtGGhd)qD@A0>LZ| z(D>PYt_E23L{b z8OcDKvJL*K*P6i*ffI!Lf=%Kv0O}@j!odCtoWtubMQJOrC1!0aN-DSG3nQbG&tJO! z`KE1iW-S~)b~53tNCPoJ2%r__&AVy-&R_j9n17vb?>#mc9sN2+3Qo@VXJBv-sy}bT zv$q@goOhG?ms`L6gx8<^n>8sh;fbyC0__!xZbV6)%`|YC1~5Jmq*zR|4B9aaJ6O$iG`pT_2l7fKXhE+> zPL(6MP=7X0yX8)Oc)ak)6G7AyZc?Q~DD32NTLE`0s4*1PJJL(Fsa0Aa8PY_7BwiCV z)1NTfA2Qo+*EfE+hdOy5ee^CS>C>X|JD8;91p}6p3|(18`lw*&XSMy-6t0VQPut(n zZ&f;JeqzX?l(5;^{bpp0m{%}ze&K*c`NKXb8~SN($j8b3KTV&0py6;{^ZNU$J@L#t zH1yW_Z`Rlso#c$(T-0w_-muTghiokwv7_Qrkr|4jP;I`GD=DfqRL}_GFOb7j@LC__ zNH^SMZn?ux=%XBcuyf;ICC_x2M^y3NQQ^~RuN&JJ4=oj+k5xLUvM0!N7_$Xio z8PeOuhMNW28(GRrDdH@8O9r*6NZ66dXuO=syOhB_nZiAqz}y|nI+iZGo6IX`fS&9fL_gz@QXJ zR0!WJ|A^@m-1EM_dNYfN>GyW~{f*#$Jpb0)1pU?9`S}Z%^=1ygeHRyqi_4ae*}7+&97(0oB4p#Nj!deHedUzV4zOC)%zf3APPNbtst^k1kNFJK-l16 z!zWFdwQBYHLx)aBMMWpZ=9A00;N`PuS{>R}bn633YLhmDv5FwA0#j3OwhF9P2&f1^ zsiG0>&uDE1;}b4qD5o1FXjkz&1kElH?)5$kINKFnI!RjvBT&chzDf2#kR_hk8B^Po zLv10;UMUnW1cHtRK}$Wasb0`VlXL|Up=9Szr!zS4SEc$t(bg>_z?a&4S#}^-}IuzI4hMrrs9oHJV&XqStk^@(1-M4Dm9x+}3 zI2upyfNIYpiZ7AtPvEp9a+_o6?#I+7=#HhcS|5{L>C~17CFXoidk!;z_^n?59a;Y} zgXPT-btZEIiNa@h8=9**t>Cc_^4`N)flXZ~e6H93v5wOgmm#UASPjNkR&gsg=#V zBQO(iy$|UZ22TYWK&+|=2lc+^2>PqH>%rh$3{I-I&%e4ZupfKgzWe@0(9Z-XCvnL8 z|I%OE{*^nz@xeX8&v}14_))+5CVemen@1pcu7CB9zL^id@>c{`ZEtWzYy?C5xAP&C z1TqlJMI2S?Dwg94b*O zoou?3rnr}(+MOgglqo-%B#Fw^-^pZDq2?%VY^c+gHt6!In{x+!lG}fA=CG|rqjy!DP8Z*(9K)mINd}oRlw&9U@^L@eY1m%H5**=iozp*xqRIZ~kC zm!&+AB!r#GR>Pocb2?2Pk;=Q8E6b)j%Z05eWcQV1;n@ULWQy)u3hQo;h)*%2wg@Q- z2vS%$jW%AhksDCaya@@c@bLJ8DkE3kV^nnj4u@qs?j~Y{$08d~*&)$CqY3{|-taX1 zs(9VLvW*e-D~}X^vMc4|ui`(Pc`|g!me78)Ng*>yq@f{Uqlgt???MXqKGXz5NP|eB z14$uag#YNBNtjG;{S}c>_|4hV+Xa_@Zh2I9h9}LkJVM7Ox zoG@<2!o_PgZao}+78Epz88uu9!GsC($Xh@sj+zu|=pYq$h=Eu1qLCSuadb>$!GdKA z!Y#F;1-yJ&(?6wmM_3fMndltD726gFEMTR6+*UeIU0mI7F_n>6PW83Tb z&Ps*};=)V;kOP4ddLvkT52Wk1K5%>zDVcvk{OMiOtSj~rN5tdy(Px|x%|EUK*ZK#W z7^AnartKC_*vgr(i#zpzc+OeDsfr)w9g$4h!I-;UFy_;mHQ~yodjvD~(pE;OV)_5$ zQq}j1&j2jSnX;d@=DO+7V`aAVAF6c!ay~^HUHjvbll0v&{-wuci=(6~uB#I{ZBLkf za0bFEs1~lGJ;)=<(R`m$V!T4`xL6rDRn~Z-#CxU!EynFpRnUL$A=2-qF67Lk>-`TQ z^2q3dD8|haS7fdCQUe(BeX!fLK8VBKEO*?g_QcgW(pb$oG*^wRt3mr?QnfRV+@473 zP9>Z3nO;_n4*XXTC4{-fZ4QCoD(rx%)vu(|r!fii$7x)&dD;!nyqb;{<5PnnpjJ25 zFda7^RW4n7cl6ZoVKbrzPmSz1=R9oa+|z?*oftFu$OjV-4j-|k|A4uq(BY(zVZ_Z1 zQ-N?+@K1w6u`~?&E6lPt{_6ep;QMp(tw(x)iUtn|PR{oaAojlrqTZjJy>s~&%Y>k_ zBL4Ya!^`)N559c+QEw0K-FW|t^lkswjlf{YM!Y#cy=RGVF9X6z!}^nk;HHM+9!_5G zVh;DdfdhyHDUKhGTO^4zlGJ}}XvicIX<|Rp)KJnC5@{MKWI8Ey#%l|i9ukV+e<&%e zKVd{u1!gB$Bavk7kGc?X(sfMnmPuwCIyHPmubI!nZ>*HF-C6X(am=?Wbhjzsx^Zu_Io8 zrX(=_0D1Nq&Vn=SDF?}EOu$py3b>9;8UjBXh2=6yyL7@fuHt24j^bW*M`V`$V2%}b zxX`mR-E^v`@mQWayuf*`%73=Z7oKaqRPH;QZ$m=6i?z8;=mP%M z#Iri39#l6(Oh-wjy`U5w*3U93+ah93%eLo{7C$5{dpznGb>(Bnriy1f>%ZI1{&pMd zn;qO&o9R#2=X)kyW0F?Kk(S&gjXg{nxsTLu9BIIW-XM$c1egnmw(v5P)PF$e!2Ykv zWCp{J1#gGFVHYk0%)>zgLPv&>hGI&E5zEQm8Qc$n8Pre+3kexQB*sX?NTDP9lRoUV znFC0(NI~mAl?3ZIffPEP6grAT8UYbt!a{nl1=0|FGQI}kN^vFh!?zh6Tp$q4fxQoW z3H*dh40^@?x{I^#lYcV;fD``}e-%m^)Q>cHU}#tvc=!eoE(^{owEvKyA;SleFd2sR z>;D01-~>|G_<>>5hYX%IbkN+9!xnxpdfCWPOT$Kd+;8Z@enS?74xS&{Z)E=gqez3o z;IBZBg-;nk8UzD^^tBfxCI$(q*CB(4jvX^@=E4=L)^FQ&I5Of|?Bn?I>^w$AsSu=p zKJ!zLu^avh{eW7YT`zEg5ru&Ch}yx&fG5$r@oC~fw zmdCVw5&zAYL&`CG_!AFGR$pnHaZvHmQTu|!mf8Cai%+;lZl*6jZ~Ztzz4EF#qVkXP zP6;>OZdrBFw&lL_a`hh*r2nzuuJPm3iccc6a8~`6mu!jgp(W?jtD@VCKR%NFy!;w< z#bsu;=|3WBe_9YJ-1N}8N%Y5Qjxd17lBEKw1l`r#ckm!UsX^WQ@KCDW!+?b zeX*|Nd~N61n)V0$KSb4Z-r;?Fo$(xbtvD%|OJ6)-J_9`|7?p35+aIxB#`9iXuWE)k zV65P~Yn-n8@^2q<0{2-hWl)aRyr@@xlh5#jPcN3@Pph}qD7uBpcAhK%I4+pm;jG}Y z(A)%<<(B*OY?DRZ1(#*A|C84Ar|VDDYj>p&o*6ZJT_Tpf7s|gmR{t|>AN?m7{1suG zm)qE1ALD#~koI+C&8tnZrU^@K4w-p=To&9E`uBTV`1`-_pn|>&&%e2*`gZ(RjQ~!^Tf?}&8~WfatvA*pk;e8K1i@#K z27W;r`4ws0QPPZvkVW@N3+|CVdK|L&|7Y*Lslqfmpv~%8@EGkJd2uKnI1<4t;s;hhM%$+;acfC+m=TzTwKJ%H|-RGY!KC3nx z3S{&0yx(U%EBw|IZM5Uf zSZm8jC)_LzFe-Ekh6#4nL8VsT0IPqHJ+R+12&&5u$=rATMy146h za$|f!S3~W`rurEY?LC=32GYklH63~M!3<(|EN(m^2%BVP8~!Z(zzRD2fQn?usbt_Rl~ED}%UtRQY&B@rX}KU33tx2Vw733ab?Fa}ef%-S^u%8`EwU_ zqL=ZZnY{v*j^FUSQj464JK$QRpEKz~-ZCU@n9+CbSU+3QzFDz$z|3m5P1##!j7<~T zx&!6AJ^7mrcF~2p=}%ra&l;6-c#LRv0+IJA`+sNq{&Xcfo zZ*$4sLJmc9iP<82rUJZ57*1JEh^@hn%n5*mfW=;1ZSU#+-SOAF`t7Cs`Tiew1%8JW zx{vH*WABHX1`DG&^!93^j&XcF1r9@`g^{y8##`BKRu z*u{zkP~D6wTMRG!68L<|`A+W{*D8q_50qIkL{o^Lmz|5 zr|rz%o`!cL4G?L80Sf({^q$(f_f^$x_w!!CT#4xN-pG=!Sn@q8~B50I6Idkcc?*_6KG+R^B|w@|~Nc7bAgzg;Ktt&Au0xC>j>wN~q5_i>-5!%i>7 zt=MW_JxcDKQdVSHmpU02nuuxnF=slAzftw6J8X|Pz0ww%G4Go`dIPs=7uOD@R>z#m z4_M_(m{lIJBLb|B*|WsW@bYdADn1Pd?Fb@fC2Icl;*KQ6pccQ<4WmczbZ<0kTx8rW zn@C}-BohX5SQ7xNYD#+xs}p!dYxta5)DFCQSTh-3HVnuLEF20c841Yhy<9N~^OSuu z-olgz&`Xc09uG-ty;1QVO1YxS`oThT;W`Y%c@U6w2R{~B+;g|&E!g9n*6R9sLj6J! zVIsNgZAy7pHLagiHwryFAOj2Cn$R@>uwv8SGpl>*34;KuKIU{Ib15sORoNs#LgS`+ zT-Sy2C1=v61AfiA_Gb&`cMHl6@XCU*1!lt91hZgmTe5c?sXuIqJ08qkC-S;`)x2lT z!VUbi#XYL1q6haOTOQ1D44lz^;}t6R0imnCVF7=GS8#HK^CG&(!TJP4*C)To32|vX z5yb#8gLW~mbzG{& zw4R6`_mWcZJ9b!KTtt(POPq&8l$)0i650FJgXj-})9GH6>Q7$%y>=_lf06ywZEJHjTIDRI-ByzRjJ*_yKJv~Scc zN6Mxxb;W_PZcksaB7L=_tywcR+zL0&JsB4?D?~J(acSK^4hJHbGYF?P7l$AZw+MLu z;CaI#5#m|^M_7NbPT>#=11!WOrIplAp3*gNaPqo*CFW6FMruk)d+X#t-&|+gY)9)1 zz^c1`XoN8`UOV2}__5>VEUs+@rh_HZzuqYszFs*2b2%>;_B^6|OfBps)-TmI&(dnA zaLuz2w#sFWgC*C0%4=V7O?n+tICP1yeaNRu`QmG(h*!ojWBS*JbR!3KBKqXcw@EuR z$osS(^LTZ{jV57-1Lx|9Bl&h#)R+Kv)RBEEq+8>1`>}vp^~gH!{5iwBbp|oDNvzrQ z#)T}_I1Fm9p}m8m^jDz4-Z)8bSS-c9zgsy1RT*LB?}LhlqHuGUYCij<4_vL83$GZz zjQbc-Gv-^+6IeJHUNLqF`!S;W!&S;uSk=&F-1LLG)l22$-sx{W5}K}8k3(tMJ;L}i z+C&^-xUg=r`psMkrMrUBU)M0&&@=|j2kk6I%O|jky6J4fU=d-el>D)ZvRXr1ce&Gy zC|nW=ta2=wwPS2sQ#UM_yJqxlTiSO!`VSl2x-<2g4Sma+wh8~shPLTI+6J>Ge6u6} zWX#w$q-|Q({xG3$JK}eoiQlYJ#}LB=MA8Hi)Ps;IhC>j%DJXJ4*8!{sSQ(J(`!%8S z>&~|4@BF$xF|a-*ytouEAv&>$-V=%N8q@4yd(x^cVcCSRW=`G&ih|b%@U&!ZThZ5H zLE2H*9T{7$luak%ngwIsinZxbx^VjWprAyzQUnhg z%Ho0`#_wmq-=FN?HGe+-W3Is8;}tkRJe&dmE6Kx_JWA23HtF_peXvQn)vS4wb{xq& zuqGX9f3ao$1gq4Fykk$?f=@c_@ydp>Y)4ylV658FmSKeeuY4T=}zK=8}x< z3qGQA5l%^(#R9gDMges_;gATjU0Zxa!GTF;JF%6Q#^-uA!3||80H-Cs4$N0 zQ4B7V4=lM_`1Tf*x#IhtVS5UyI>4wk9WYgp(YW+9rOEX^+3#7Mc`Qr+Cc!5DjpgGO z=V$G%37zJ#Y=?vv+k^(Y#72+w4yUA7hW8jwDQ)L-T5S{9@S)j5rfcHs(871XtMf@O zp>;7Ry~QV<5|-ZZsN{7Dz882^Ozxu4dP$USJfVwB>8qd&6yds_7q{L`W8X_`yqnN) z{XvtRM>ePG73*lG4`B_=mc9iBumWVkwq-;8=EnHR7QX?!LTwLOurOQzW#pe6X}?(1 z{QzVEtV|gwtZb_{E)aK3o)1Z@pGU+D`M5=Rxr6~$5IRR;^+#UqN3;M|a2DKOp8%@^ zhb_64B2{c(z=XB1sx^1)ybpQBiMruT+q7r@WDEWt^ScRk+l;mW$bzK^ys{y$+EUh> zN$W0T_~g1JbHf9>;Z_X}*p`3BtfEB{k5ZJBqBEDcAs4481j;}ymmgi2dq4SiPW|!8 zKjv=z^QWLY*1n^=cNj#Y1_)$K#1Z~;$Pov~_z0N1FvNInIXg)st$#ig}0betVM zqORY2l9=(Lpt=al7-=2rYl58M=v&qZt$DWT?P_FRdm{UDEP3`;)%XqU=sn7ZYk4it z$s^6LzcOk+&>M#F^d1<0Q^Fd|r;kF9b9T$Zm4a4KXmNSo6ji+#R4{GuWZ?Auw>r1F zG@{?g2DcveZB`01+Z+yRkG!i>;89x<6`wCwWjr(%3^5ZSyLUh$kQ2xM$;^Aocmg3nS)za2odIo2oh{x z5R?E;z@k7O;3>LF5JZv#0;<2QPeGFx##x`;u-_c$JGPWf2iCR?Z5>|8{)>UvV@uhv zqi)($P;;PeIMO!3>?!LGp4vK3|9j`7`|`ja(r*A2UME^U(UbR42|P5giv zCq^6Sh=J-0F0?%CkCgh$M}Ly!A9Mx&$Sa5$a3B(#h$M2zj$hGJ!5bT1wCF|n*%SA} z4!i11f=zQ37-i4euw$;nb6dvRKCdhpyXLfQG|)-|w|^51c;!M|fyH3XSa7EQY>nS? zr0t*_+e21V{+z61q2ysJ44eXBxIHY%z0fKr2J)4#JOP|&j|M6-iLO!zYH>m)h>u73 z$RSyMW9z`M=-W_l-8L}%1`6N@VZ>)MzKdA*At|@%VoqyFT61V-XGlheZ`#YNRqy5Wfr*ZHgt?~J$32`yfk{pU0K+><&zQ@Y^mz0y0q(>opG zn}TzP{4#p|Q#&K_hOQU2T`O!&u6|QmKZ<4agH_NcK(*#+QOEtPmp5`-E~c;|b6PHD zHQU}{h#1CTOw+xyKf4hj{kH|MvS6>+k|6^K``3yUb94YITtR>h|0am8?H9N`=Tk>~z+%_O9DsNWNrRd-h8(slDfE8LB zhVt?+y!!q21ZJVxfj{5=L$APJc7nZUfBCmz3MKe89O&vmL*7sV!=cI}bQ(E%OF5|8 z4!32G-!`w?vTWF~VSToseFQ*(TjfCChCK^{5)ig>saZQu+VQJe4#ciqs9X#w|9YWn zAp*M`id_z@{OU*A@W!K#7U0XC`Pq&!YeQeOV=jAF?>gi!N}arpNO>XLQmFA`Ktu%g zGFTf>Ex$)C)aTl3*xC!L!KXl8nU`N(^`xh}Z&E_$+m69^uOBL<7#mUkdL_2B zJD#}!&K2bDuhmT7A&%d~jXtaFD5#yNtDk6W`T%_;U?6G-qx~wFlf{(LqQ*}!aUMk4 zlPQy)4_H@n`Yz*EO&`25xHq7CtNU2gOQo9~IyXj?!aC(#Th3m3uO0DL*{@mcQtjEh z9fprPVq5>8JFNfim^`WG*I;&YNHc;NkpIQu@$|{CH*&5GQdSgAzs{rfwTkYoGLFr% z&aLvU?ed;&3g_Fk!n+PQ(sVArJssU;dAHjlrt2wl?Rv$BlEx4D?6ETT7%0iZxOQCa z44X0DRR57x_nAN*f5!S4OCGyM{SZYMyH5QYP5gYJVB~Vehs)LD7m5e3)C@;f3|y-i z0i}goxT!mY=@`<|ZNfqfZT1H7!)@AlNO3#F+n=yLKPOGa6DD%V6BP~fgqAttt9jC! zrRv7d8MR+P&LV+0l}P%KNS;X`eR@b-@J;MMOp}CN3vJ5RJt@CfLNJQ5YtPySOxcrn z>|hy?x11^4p2Q6|+^ShzJ7V~ROXUh8cad8mT-7F7!!=#a`Gw@^Til9ah}w;V7O8G| z6TvkLHk3t(7+6x4VB_<{&8yvJaUHWqBuu&aU_C(48;bq*%A$B+ycfzXNZ0N8TWUO_ zXOUC4mJzE^LRAk3a`hEwPnuUcEN2~6wOQMUPlgjAY72R zl-jTDL8EDVw!bd-jwXM(nf`qCA9V%(F0Wu~;6!t`fGoK9(2tDpXbDRih}oqD7k+dg z?6^>V7|@mt=_>#$Ko-CX^{mM2z$*x0S!37Eri~rB)*$F!gjl2?da=maN61--%-==M z#c|uD3iy^O-EK6<9kZ|bYD4>EOP{f(Em%_KeQLhBmaH8mks!*gaKK@p|J*p9Y-m@Cm;_pS=xLt&0SEa`e$ zHQoMyq0w8 z2v{oZ!wdTKbMl<;iFn(r`R}h~40*-W%RA+9orpmUVl9(; zt;q`zkExyvGpE zgW%->vVP~)U!MFM2jD;Ij{PtH@BEIeKVAtaQ-`28$^-O-&MSoQ8;Bfp*1i8GuxbfT za5lts%eq}t=B7LCnw^w?8smlK%_cdOFxYl24>X!)3Yt-fyO4D)zc0LKeaG$sknl%_*@j0wu@*!#cE)MER zrjuU&^CQMeeCk_$+fsjVBkaJf?VmY)*tv*DF;dAQDdzd>a_SG46xkwuaz5Vbg&OL9J~imn1~i2N97$gpTs^2!H?) z7b41uh=6ki$bzzV1S5n984AcaoqF)vr+N{-#g4dc$KJK1ZFo|4opI|S6>AaL?SQOt zjbN;>ZZwBlFsHI3kGdGxpn|WY zag0HDnOnv{c=hM7icb+$v*zKjK5cnKk0U%%e7yYJ5NG|PX5jDC`r|$I=STl}S3u|w zyut_|LdHkb{G75Tf~uFD=)1O11jyO~bHJ}d2uu4xD`J(3oVbQ)-{eyZOQ`r zjONkC9_GFbN`3{yq(V~r!!zE6myG#k_4%hZMHO{}Y!v?GJjAa+JTsj%lFOLPV~nQ} z1`Da9xkM<+8iv}26523WF?|f%Gz-I*6KS6TR+e`gb)wqA)Ph@}jKTQM;JF*U+L7!_ z6)UN&|06JGT<(0OtY^g`Cn9)LGVaZYPO(BjorrBEhkkZ=$q&s7Z=@WFhn*M@r{XzV z!)JgyU|TQe*{*%*-659-DQEH_H=2|e$*W-1^6}W&+r2s$N%oK0N}FafsUx|>VNhdu zQZi<6K0{RA!_fJ0LQXp%>r&#|`-KzdpSL+aY_z`LY;u!rc8vvQ5mWDx*yWSb5t=g) z_@X@qI~|lLt*LdR|@*?6m%q$C-NG`3YsR;+3&zW8alS3J1n^|u6hI_ zW4Fr&@04|4$$N7HegQ04(KqdDznfFm&GFytX#Wi7 zCY|I_MDwngRpx~!Fcfdwh8w@Sg^-pt@Jc|* zP*~9vc!e%k6&rvRAWJ~r2MkdSLDWJK?Q6*C8=?-$vi?PU8t0K?HVFSAZsB8a^Z)~7 z?Mu`AejeOM)_>mp`RBj<*H>U42@ubOa&v@J4B?hQ#9bB6+_JA)h8&P7ZO4-J17hi> zP*wH(6Nhm=uhMlM#cKkJenQFtqH5M+>NXPE#=@FsMYPVrqlCKg0Zmg04I?o%0|5;^ zF!;QXhQ5&cIbjV00aXKDC4C-cGXZrgel=?@1yg>RQ=HOjLJ~*#M5MV9L0&Eqh)_Xt z5FMI{w%DW9&O(C1QU|1UPaFIBT!;$07ayBNEUFuNGd5bqu)ilmzR=+K#zI#Dz2g@gQ7E!xP83V<%zH&-m z8MzmPk!xV|Fr%*m*9t1cRqUw*`e*ltRLh7C^RPD4t4#)xwThvo#t-YS(pF>YckSYO zr0nw~EsA+`)A;oZK)p)Jnj&pOm3CwvcBwt+OjQneX&f^wWK|(*i$CsNFJ?p);{$RdI~W5Nr(>AZ$qtktg?5F&Ara6#h*gb-bLoV zyO7=+n${heJ9If0M7=(MW0u3(&ST7FkUl=H=!q?Td%wC5;_WaQ_I7DcOkvNx;=V_v zJqb1M9#wt3lG%5_G5?5rsa?&wEBTuV)TpDjX2#lpdH@IdCKR+g64tG6)*`A=7XC%g zNI^J*{fJna#YP-s=)pfoMNB zyVYew+Hq$76F6+9q*d4F-H6t8jFdKqxE3P7kMQwA1ON?MqCI1O(OX;|;CPa#bMFi~|gaZL*` zO;ZtdV?GT%Fkvl2L5*`lnmWQ-r(wDBs-EUkHWPyNsbI=2V<2$!Bt}|YP*R3Z>7&JDZDB@glr@XDO=&5HTW z0KdX-U5=bd4~VE71Y#+1t6%d zC!nUwuc9ZQsxPQ!2nM|3Ry5&|Gv<^x0bX%Pse(oWMo>~*_|QJDATtPWFdYndg~4zg zJ#tL)M#YC2ovSd|9o(l}d~adhP*MH6a@If@v%iAJ?GR;MpP0J z%@^Y41f}yYkGVI>)_LYlO8Q^=LTaUaxy~KqdG!z)Jgahi}f3 zSLRp4N9_s`B&}<&PT%P;dC=yOG5)xGFt2w0dS!dx72 zKBi*E>MB)2`?`Yp6PKvc=)|U{Rej0Ck-L@PQ@wpqJ#?e!Ex;;`KAXp$Ep1+WQZu9B zoGfgW5nS-a9=qX8+_9+L1zwpl*TJCP(u%kYHSN+j8vs^-tSr(}F?$<$g>PCdV2+eG zPF2^AfF?8Wid_eDC{SKu8^>xI-q&=@<=2nhNqKuIw(*ElrLqsj5)W;L->sqUlmX|s z_Z+(S1dr+iuee2o0a>tlabr*oQj}L*2T)##ILhhXvZ+{fgPIERCLqg(wrh-C;j=1( z8QF+pG>^tDQH>Bml>mU1sJay_OYu`idr&eERy6_tNaMgnm)hU zNdfg!`#UV~ibv4|bKH zrA_SK_7>21hpy*$pw84o8)UI2@c8}*xvwG~6N6J;2PU=nCbxShwnC^mD68{oRvVmC~_{N*q@q6TtnwQwp?q!HYp=`vnLP%`l#g{AFNEp41+QS-$Cin!1M<8|-y1p&80-eXpX zq@jSgD7PT!C4;z!0Jzy8`G{}}BN!1x&5`HUN5-JQ8%$XGIAufmB^CwpAl zuM*ApXx~Ln-r-P=z^F%IR4;HThX|+!@+$cWDnN9?T~x_JP|k!$@iec}86J6Eex6Rwi}#2Iue37XK^0Cx34|AVF)+U$3IF8PKY~!d z{fuA3@B7JFKm%Ii0%dxl5Wf;UWUqCn*1u-XhO!759DtQ^?XoKoN~g90af@L7nWJ`b ztwtBHN6nw{Xhs0C09J^SC$FL%82HkB@+QD5ZaF=^<7atg^!bmU5R^N`t9TL&RtOjh zD;a%(!y1A|G%=D#IYbX~@d@(?iUF*6xdcH@1Txpc0>WDAT3(+1w{F}clbSj^Mqf36 zjvp$;00J@ttdUMqZ+-nVn>|^;{E$f+yBxjKA$pD&@i4?_r8Gku81*G$#_R-n5bq=fn9snaoRQs`T-;J zSIr{pfmipiAJUt*9x>q{XLmPFY`{aEZjP8$U zMz&c#d1w5f_iDzt^+g)y)C2GM0jOniW$Z#JCS>B=3BR~te}eQqB*pf-iOnf1Hq6c6 zc?HPwt6sBCpWrutX7ji$s&e9D+57X)du5!moeC%Y@rzCs3%-<{6Bp|+#xFt>`fe9~ zdQNzsNE$C}`IOfLbrhc<)SpS7a)`)9PTh7&=ml6g;k!tSbM>cx^&3|HL*MTmwD;XtIBY=)12wf>HyYptRIsTN{VeCs}lCT^9|6F5kVWn*?F@R@P)k-EXz5Q|Zr~IaG_o`+>Qo0hWr=FCKrr>+h z$paac+;ss7Tox*gkKno-aPbfK=@(?MJ<-GXA&|(e=jy>!4{-H@L|(szX1r zf%EiJg-4yxPyk&dU{F8;HM;wiZ%_?lL7sERZ=5G>`w;;hn-|MAFO_daRBnb>Y}VLQQ@pX%t7FtReT}sQnaL7n%CDp4rc)_3ZahGnwPC z%iKyIm(aR%Hfzw0vJ-0jWO!DmGalL{HZ17hEE(S|DNumAvfmvBNg}9BhCWss3Uq{hwPq|>6X(tp z4C^KL9=%GJ3nOvcq;Wub!N`qaA3b@C>ne&yGEkdiN==!3|(BgZ{>4molju;muh z<`g-JKnP1nnv);=J-+?=P>7&_Snhrw8Pwo|!DqnG|Il}EVgdW}?SKCY?0c}kJ?`-e zV1<^JqcJ1UK;z*OLj*JtF&#uRT-^GRL&c&8VH0=-t)rIpo4_lmAGT+1*)zWH^9mkO zSW%Z8C<{)sB~Q|tJ7LAYdIf4n!>hiARnAA0%v~&<4|p-`@~Ff0exrU!g@J#Lj7iMl zvr!^iLHzP=d~&Wr$IUSZ4Y=N!9d5&Qak7WvCjyD|`mvCp19 zdAAj#bi?=l+p>oB;@XvmRns~?*~%fT(9#WO{Dv3(hZS|vnzp1D)`X}%I&4oq8QiLU zedNroF_SwZy3sv$&&D(_HilQP+a(Sw1(Bp(O8{2U6+4Evx_vUg+9yow-RuUMosDTV zdpdRQ!N`TQMc-$iB&~83JgaSMRv;mZw!E>SGIPU%ya+`~P+IB0hMs~YfR$0!r2O?} z#5xnvO+-#VM+}nX{7J?sV?Nj|fYq7H&4D=|6n!goQu{q9>-+WF?zH~~$nwefEM$?Z z?VgfOUnIPm2CJ+e$Gx1+fe{;yHcSGq@C{>()*0xE0$$M@zkmP^y?%_@I8on-j$i|s{nt(J zL8Ar?c*S6h-OHJl*1m6;JM4^~2VObRckBskO7UIdat;E}6(}yxA#xmG1;_$KaPSEr z+)(r`g7C_7i)$hpK?g1G+EgsK5;p->#-vThT6l$v(72rf>)}Ork-^bG5{m$P=wO^yV$1Bvcg53a0 z+#wCa!^_Ld#V^7mB+emy27G2-o$DTtS^}$9LU9|OB)}0`h6gPe)`T^v%Ys5dC~w{; zm<3Ray#a9*=z<5`252PQ&)w{IiaC(y!JMcIu8d_DI%qhcU1rd=;f!CfF8^ed&@CHD z7PQJlv||xPH$>hA5j-h$%uHY3`S$J9W?~z3G`F#*nkgfNtWU|+gEw+t-zjXrn$>W( zxV4lvhHsoLV}30l&)h7YF$yOlrtzFE*~*XJ*i?LW!EZp8)1!RdHs_11(F>a}_Vd!w zY|`gU@=yV5{6>D8^R05vv{tJ)rtOnjo5$>n*&i*gHVPW$1*9*!70+`z<}q?APQoVl$oZOcx7%IlOK{mCoo9hxgwjfgeVJWrL6mMfT&m7x zuB8*kKnWRSMM2p$`nK3pjSX&l#8{l9=YcsIx*aa$L zoaA=<)wS&DT*`b7d9IK?3kH9SLeg**v7gKu!-0+#tsfo<)IKt0m_Qt)5+^7y?wO1l zg9?&0lTptH51o$PKM%s$7CMok&F6IL$bmEdf*S6kQpfm3rTO_KKzR=amY}Wh7!H_R zkKvIJ6gq@CU?d`A&82k|f4x^h_;+u{KmW)7=N0&0d4<9Xy{tem z)WzE86-H1DkvPSB%m7ilh-gG|Sfv?1?RBi0b;Zp?r-Ks%nnrgVsM}7^bPqWi;u4$? zEztt_WjMS5uK-r40up5lkOgSkv#&rZJK`66(i}9p!jeE?1zoX}RafGYZ}ryz+|s40 zbx3%*JtRt*UJ;YCl2W#Jb-kFEM*(!1dR_=-MOTsxaVd|&u-A-Ca63U%~xbq}HG za|!kRy%%o`UE(oXH%u>4TuNtsq1hI?!>|j$D=)*7Y)HF}Tg!HS71V+c(Nq93J(m z1rW4C=_kXOO2IT3=ZeCLJa0`}ac1o};I^$QR>e)zM2%DL<_=}imh>QU7v^-8f#?JlWVZQ&&ITT>tfD!$KSVLpx)- zv2MDaJ>_@j^%31iW>vFJd!j=C5ZGK!B@M}$T~f5Xd|XLWOj<@jKoWxy;ot?$2FM9P z`4uk@ucUzBK}1AP;IKKO9*t;TMJ&?|p7gnvFP*PJdukv<A(e!_Jmmn;%De9g!Ktm8&C#I6#fNh)AqxzMwM+v zmTvmquanlhDR{)3Q~WIGfpcS|P*_1I1-kRW_TGNy71}cL=i9&Q3j7+p+V`qZRzVC4 zj)eQy71A)j`Bwtc$Ak~d@*h1ZuBeZZcNJ3eMij0dG)OoVfpvM_5nM7CR|z62e}$pe#6(7r|Vio{+QwX#(r=1^36@ASvl{ z6_-z$FQ$x?(%xrKJ`~o?dnCUFGmU-alQ-`3Vgl}WUh6#H!X;>Ul)lb97(qQ5*J)8R z>quR;tb=BaIaAsaq|9t!!IRePV>&ss9vWVtN2E;|+E~ z37P^x*TRFc3-vgXu4{p~rWt7V(;h_HAkSDFlgvEOW<1zS8Ak`j8nei?jxJ6n7RpblB zbC)WXPCn`4a4)p3T7>#2d-{?CW7!;(6Q~<-jFt7HAj;7eS8L;mbN4HzZdAYw#PQ47 z9|E5bAV!JG(e>c>LWJLy@WZ}p%bob$6~Aj)11`soIdjvJy$yPypuY#(6T}4ENgEc$ zGpBB~a@*vh(w*9mG|m?}-F=x}HiD~LVbzW?+3%^09xxiS7an2cYh%NE7+l!N8f$Bw zXAnm$BkSaCaxCyG@GGMseb(A}{HFTD4n^nt=FtUbjO>mmoP?eRZXO{nelfJN9Snlr zya#xN4hu@kiyl-KICffG(SS?dML^99QM`D_=<%rtqVuz^(BjV#K# z(C-gh6*$;7sRJBViM+=h5K%)Yw?@Yq?6+j^MOUC3V^2)*&-m593srmH{C9W-TLSza z@Va?;IQfLZzv32?7Ca~;bX-RmvL}k}{K}rdD_-?G$cZb+>6?i5J><+oZu|V>;Y`)o zHl4)&vn5mJ*g1&JqJl`2O#l?Y3i37k-Zc;m7K1hQn=KSGGrplUeyA7`Y<8K;@NT+MI2nAPo{(BctSD`|XNLO;Xv z{xE#KZ{-5;3PP+_v?ZXQ9qtS83bpuz1`T(d0gDV3DWP>k0U%jRCcmUD7Bja6p zBWt*{X!=HXrjUO7~6d(r;I z1-By^Re$K-OK>ybR0v)c@XDA85`3rzfj$vzk*l$j)uXtguGs; zyrMHl_DKbgU`)mUAPZ)#zNQSls-MM`cPrWF8(*NqH32iDFN1jzw&ZR$tGdSpCb5Gr z-8QxLR8~C!$l~M^MYup=MhGej5NItFI?O97BP^vTD02p~c)ZFU{Ho`HSKuEaCvG4* zpm=;2bh&x#Gv&g`%8%MlCiUx=Oq*f9f}d$m+W?mdb-gINa5`|Mes?16*im-usk{4s z9pIG%ELYH)09`LAIirJQ7HqE|?uQ!i%9-@DZ`o`><(!Uv4A&7Gn5crzGT4XH9<@Nn z;ZI)u`%(3`d4=$DaiIAQFv!(HIUEI%8bK^ zx`A|$hXd|$@6SJ(2+o?lkUJMzG6$mvAS@5U4z6%ZQg1?C;=J!V815vo&$i9lPpHf;y1x3*;ZRgf)8-dgGhG*@w1kSnyHR zDfLeAWYE(g;Zt$Cc~j6}V#r)Ig_5T|hI`Pz!=7$-^EK#@+gvJrT0N0Yn}B+ZBIa@$ z_G47(;HBbzx4h;E($J;yG0?X1%KIYaS*i52AKLvKL9&3h0w*9l)(?;avdUlNSC2oS zo9-0Xa;b14x@PP`aer9ZR8Zl2$VhUXi9eY(;z-&wt6McENwE;4P3%9y6tj?>s< zOx7@1J$v4QC==yvF@)RNYpTf$&L{!fE)~vu`(1pAWe+Vb$HImg+fj*mI2xko!`~f)|DYT9zvMsjd;IG6^B}+q45CnxkHC8%fuSI3$4-L!n=T;aT9?f1Q70;*8qU%eygM-owc=6g zNx?QD_<8$D_li>{Ke{a}r@Vn>Ag`S^-{N zsTjUmIpR^!5?s?0nA;bS)2kH5IO>N7RSlpDKozbAgb=}8Dz^pvDcnkN#z74Ls|z_J zpx6L?h5mWNcJZ%8%`$YtSoYwLQMOHMp_XYGO$rx%M)V#Z_p6a`EfloNax7i;A$|va zA<*jpbq+Ad5nGZrA;Jc~GVscS^er&^(?Q3AlV)+x^GAVK6#54c%^*;RDAayBV+eQ! z#SAYQojtEc$m9=xekuIc`GLi&c7$zbDr8!hApv^6XqL}0JL*O2wXC;sY1GFV^xJXI zTz!M}jZGyE9l`Jj0I#?(B7iKYIR|9%96Tx{Bab<*A)t5)I+~$LP*B4bOiaxQHB~P# zfEAB|KSnteki{h*0)|nD0^^js!6ADcQI0|sFCiK+&;p5QJ%CgNI&SRr14RD;a`qu& zlXf5otN8e>LHhIh%5gZ8sBrwhl1!PD?A&rB|@|9DpVLk5Y>`}s)fUO$E|7u+<=hc zU9F36(Da;6GKWqY7@}}P#|!(Q<~@jWX4byXV2^^bXaVDW8Fj3fG*Vgjp@cD3_-ZDV zF&v!T?f9tH>hU`%SMcAmy&k~Hed_y)j%bORJ2K(N=5wC0sPCGB3sEqC*TL+MfLT$m-qABc6SfiUkTB&{H( zZBerdN653+TM&Z`$CMf9djgGCE5@odbIp|i^RTw;vOXdP3C0&Hp5o_UFh zT-Hz}?NbHyV?6c4z3O)t^SWy3JYt(^UHBOUVL%oJUKp5v#e$S?g}Td&2NfT$ zX7wvrKjG7V;uQNfsCXf)Vl@~Kr|)?-xhsB%fmE+r|u6~~y_ z@4;c#gMT&3q7BtDhF=nUx@zCQu6y6wF#aIxos!`LrH9=RB7*`{sF{b5kqh(N`RD!8 z)@ey41H_h%!kU5fqV^{#m3N;Mght&yZD=id_$YW;us%7UNRMBbPh5&e{D9EGBLauy zM2;yz;6g<144>*bVJ#C;m9s*Mx(C(G4(zEhfFJ{O;)|+Sh^ZPv%NUr5@;Lz&GcbN- zW7HH4U}1x_2&`Csd229Xd3zx_J8>mFjnJ>8F z=1+O0j38ae3FE4{MNv^n4k&d-HAc|e3sfh6d;7OHha6ro}h?LOca;}$)_D|H3P1Z3bRpludY4OaWG4B8qmR(6%FME3V=Kyb@A5FLdJCF_XuKO>zNQ$8I;f zfO6Vixkh~KFb34^e@(U7`6gpCTLMK$cCFxp)d)=PPcqX zKlBnu5xopVJLR|!-8W|?viN&c$q$!XZD#|>arlXN%Ex$oR}!T^lQ@7P3qMrFoGPS_ zfJ8%H^K@t;;e667{iq7#dp#!idjVGbmSw`uRfuVhup7m@1Y`uZVImdq3d(zQBia%5 z#N)1H&eQ42*P8vYTQ2lnh}S`e)D+^n_+`_wSw72D5&NtwDbvZgpFAH8AnNyyUT@gv z6=c|fS0GIQXIp-=G!e(jpwexC73AagD?^}p6IwVW{BTeOald>znYNlj8-7OUOCxs! zvaqZ#_}clH%E2q3RaHKG0W?LEdJo&bIQ4AEsS-kMKf&t+SXmRlI#Ir#%9!NPN{}=y zbbi_wls)aAKj4?w?_WIRk=<}3pa#tF@ms|BS@83=XT*i9 z+ReMgW2b_Nh{kQSUcx8|cb>=>=;B4quK6BzGOYFEcBBIO9Cke>n;DQk?Fg9h6S9>?&KCb?R z)8D@WzaO08$zR@n!~EX+Kk#b*v<>xcke21$yWoNxTrdvx00*Z82fsX@m>MFci%94r zhis68)`CYJ1&%oI9X%@~Yb2_C5==x*T|h}$P+1*JNJUFn^@NDZX)s9KKogdPk}jCA z>M0R5Z2=8+J~dTgMKuv6btwg130WO6dAnmL&L6gTq~l+Jm?j?dF1I3VK;+Yi@dM18 z_>*qpn5sji>#ZIxy<|mik~40{1;1-m|J|GoC$%|S%KUz8KcaLkAZJd}B$w;NGpL+2 zdOQfui5Km=clCE)>`&fF)AH`Ppcg%vuYM_K&sEgU*ED>^HZCyU%;V~&8ah5QTE=Rc z$0_YIF%|DXQ^hx9+~s+{XWDc?-n>`h@L z$J0iswNq(~$rtpA+?M}#r)>7jt+s<+SQzsM(G^frHzzH_F&U1f{)G#CR@s6E&phJ$ zqZmtfUhYN`K1C5{uHe63tejB~qf0mzm{l#Kk!Si3n0e$*`9IA|HZi90hA~Z6z!9>6y7}z26>Kdle^@%Bjl9Is5$n zKiPX@-n_MWQJYJ)on#zHmE0*-=CZmgguVRg7o4hYrcBS2s6`KZDj)WtvEiY#rwWet z;vPU&`TNP!)x_k}QNJ{kGBVt6ON5_Mc_F2?OJ4`fJ-_wD1776-6H5Cm#eI2iYx}$6 z(wg)F!Kq8x%aXPPjGsZZhc7e5!g3U00v}!VGiLGL5x~SjEuK-kF#`*u^u~> z>M_&Ne*%CL(#9{uCNRu42q$MSPFKf(aKPR_03Y^o3&3Y;W*QhGRDk$BvjfA z)~f~$@4sDqKeqnG5%_=LE5nkIR7y9H6~ZioN;;;rOevODqphsRSl9(v+6S7Bnr%L2 zE~)!H$7p0Qkx?EFy5m=JE4(`Y*dioqEW9L)pfH7i3wP^JTvHzaoUcuPXoI zd!%+OW`w6)3*Ro=nL8X;1{V6S8BB=QBIo(ifKQRM*OT{D5>qdMtQ=<~xI9qVrdsdvKQh`d)=Tm-pmOnHpB1c`RiS55ps^#heB>P^7aO&$D_# zSt~BLFFIKhb+&!_!G|ELaT|FUdjVgeV+RH+=yUKnb>A%Dtl#1yVnJH){)c2q6w4^# zhe#e0>>p5U@>s)gh{@fa+O^_vozsjJT4=Q22jys%zyWFSu zSVOs@59q$QNgKS!et(DgE=MqMm(f|k?aN_ym2mWhOfB?z=n`FpP*KcoDrYva_zEc( zG8$blw}oHitvkvYvrhP|FHbHQLSY4nU|?j1EWM4trV3kl<$O+mIj@5yfk|tpRM;UD zYai7-EoDEtbgSgp*{d-tH+Xu7Ab*9%CmUN=3ph1X{2`%i=?Xdb%>cz~xxMd7C*KIm z(UU1&A-0~u7G423CoTPg0i39So$q*n;xik-Kr3eODSqPtj64Ije&cO?$3Ynhl;z+b zYws6h9=6>qG#O;IK7Rm}UtkVyshlt1E8oLn3(qBhwVkVl?Pyap;iDDb9HT?<9Qbbm z!@sy<|7U;epYs*ggMTau4ZRD0T@`*`4Wh1r6*t`0D1=3zsncY_InKl_(E_1<(0-Q{ zc^LAIxTss6{$ks;M!PA82+#S1+gvlZ0Ah?U)!mQc=4(IJ{}0%?1(5Iv1ROmBkz26! z3Z;05S^7@^to^3g_)i@Gai@RgON_VLI~`G5I1f`-cDNRtWYk5&UHl_t(Yp z-@s{TDnJX?#O=)S+vvYAy03`_Gx?v=IPdT9-k&Raaxy~+0Z&%tYfklBwy;l9{SrYJ zt#SzBocr=LdoZ|nv)wAOD87gs_??UKG#**XPsn^l%)RYA^X|meJd?<@g_rckoHm*g zp@@>i`7P*dvzg}!Yd_dq|7;d~YSaOKbjfpQMv>J7@mDmSA=QRb<7(Q6xZFX<$U^Ix znKQDx$*KYO4N3;_yswZ$pKw@e6L;ryk?OYad1iIrU1{fC@soR!fih8VK3m5Zc8I0j z<(1E}*g6o}tnCbk&1}@~(1?!WV;l^v*l*XQtPgO%{R7_tGHw2N8Q$CYUKGTnWdrdq15l4xu0 z_f$T5UP5mjzplb@&eiCGmvEgxs~(1Zkgi8Xb$#KB5lQ(QwilN$UrJgEkNxOy1i=ji57ai0j-d-sN%E?f{`7uBEZ^`(d^VJ{ucEit;uR(AHF&XF!kv6)PxE&BCmQFVIV=Y{! zIeJBo3Qt+IIcN2S=EDVpJ4%K(=M8Nv{StlaiEHFp!fONJy?_`s!(^-<_{!YH&0?fG znU?=6tVemkClE`amwm!ZpCgGsMIzgzyX|$tpb3Z_d_`1-q;#>My!g7e#$ zqmPIQ7m2CYW*lwUQt*Bm?JE#1{I5vXm+1`jc78zUJ~wY*?6R~~SK9YwHg3Q5FzKKm zJoX0Rxsh;RKXT%p)rZ+BCm7drn(5pw2CutB@;r;xbxr=^4Ey=w>#b&sQ?U|US^O3n z1xutK(I*MMnslUrm~=606>CBg*CHxw+3lxf%QRHNcps7Zi7t9WEXxL2dCks@Iaqrr z>&tz+Mz{Y6)G3s-o8wzzs43F5YFSnSM<`PwkmJIL}%8q1xlRg|-^n#dse&*@N z*SSw_@}FMgscs6jm*|>Xg5E-|KAWzhGuwsYPVm)@;^s9M8nJ9#oHe+z6s7i$=;{Pt zE$0r$7reGySwNk3Df*|HO~t)iO8e1Px~@RAAzu$HKGkS3^Ab!#VZCSME3B+RS+2`U ze3O_Mz`P-Rm&@0Kor*>JB4I}^Ujqvac&Cz-g&AjlZ!WI~$Pq$}x+{;R#Rmgl6>;@N zd=0=6s~P-u3BMI%&fu$RsjigKwq@rv)H>tOw7}8}UG(#CSj6AZ0kV+(X2In)(?!=) zZ?{(P-tvWNphlnpWl01&P?kX6!INsiS23#(j|zx!^jbJ-;?5;ovlA~V_7@CoE&jMM z|6OwF=VdqhMlU!=AlHQZDQ5P^`hu^_M~<}^e}&)LBt{P&LZjJ6#y*A@yJ6jvyi zL1xd^!3BVzF@P>U5{{#AyRjMJ0@#l5w{iBPIQUZ?18kk9jc}beV&ZPU`6q~3XRQ}s zpL$mpTR~bu!Mp%jmuSI9wBp1tJ||;n<&xGU@C0?zrQpjA%h~VdVl8Hnk%t$6F&ht? z03!Ns*i|*z?}srlvL_i!Av9YKqbX>Sjd`ip2unlze^;7PY@v|iLhfPGcLHS zDxGn>aqbDF%L*D1c+7s<<&&4{ikPo?qCpmKAXEJ2Vo9gl+LGBPYLK`_S#U1@1&~8VZrQ^Enz8Dwu`gYW)8tF7C^C^EE{2AXrLoB94hr-2oDSr#xRM@b)zH0C<-|QSkJV}TtI znlKF6voc{{xmXWCG88BjsES3Ja=8|=hY;ieNO1;%rb47I;i_389aE^43zQOWTRmUj zAn24!KM47+*Bq-e_1YJFp)R)kCG5188r)P7UnMa5&AGpSG?4%LyQ*B1Np~ae@ zI-+oCKHvVwdeFdE7%BClj9lXCzdB+&Gv%&+UHQ<43eun%1vof% z!MJ((y#XTfHW7S~@Y!u{H{HU12FS|F(F=S9g;+E{fUlsz4w%@CHnkmNMs)_v?HvF! zs)vQWmo?SL#?IGa)NBv`81NMkai(Td!83S*!($g(CC2f8Jfal`^>>gJG4qO7RJQ$; z)X2go;49-w2Qu<=dBbQ>#O0Y-@&+)*2H-2u!Xgd?UNFpp?e~$wx4_c!Pt;^S$jWX~ zn#Ypt$i4U1r}aZKb93SQ3Hu)qGj6TCHFzLv$bV^mVEDl!XCD-nYRl+d2XEB{E;<>I z%-)p$0u2lhQHc<|1W>_u+FSv?3g7uS=4#i}BXyPw(h}}Ig9$rej8CxELr*DK3upLz z?lAbu_}M`FIFc9x1f|53yd>f?d>3ae+$ATb-blPT2uD0n7J@WT)`Ck~i^Unq7a!f^ zyuQm;-Q%d!_?nx{wsfW@1Ky?;O7K-7t+klm&Z>R|zH*GYyy$Edq7)n!>>OcU0)!nh zdWq?&4sm(0=hcZfdN*ci(P{;s`oud88*+N)oTwt^Tt|u?WQ7(lqcazxGGbFf(Au;; zc^y{-9pEdpeB?{I3)uQ1ZdZvwo6lAh36wxSPf;XP=kr^kDV;9X-r*~=n63FdRUu1J z#8wv3n+q$Nc=U#9v8INjZ4`F#xkHB!GR%Dr%w5ljqYWh>3dJE}yus)+1|kwFKKdVj z91wTsc)>F|x0`{kEoKX!s{mQm3A;g788;u!UwPNrZ`+h)&d$sMXnbv?kuAZXEKEf$ zWDPG(?kPtdI^ma0gzO32%TCPgiQ~M*atu<~kRMr5L1J6}D+o8)25m6)O0XIoZt5In z;W*aZVT^_2NON$M9o3XdF}JlfwT8Ae#m36s+RVvwj-6d^PQGwMod)iEGQJZR2?_ z&50{`xtj6G=qa#Rh{0-7ZVNN5n2E!U55Wu>((s0%T!&c_z&K}(CMfh3Eajux_%@R9 z2C0%2tlyV2f5T)=H1lQHiN;aMf*I#@3vUd7g_h<$cUX20YDj_03q2QS5@BaumlemA zqT2px4)5b^?uSIy@G3+vKROHV5&}6M##}1Q!6_ zFwEF~ftoZ7uQ33Q`N5^M;Z22uI-W3!dh1yR+Dx*<3{it2KkA#xjk;(;yebt9)}kqroELa^h{h zQEecO@eSCLH|)2GPfYnG@>JvI0_B>_rq$_f>#~$POP{Vu*KEt^pT0*(EVv$%`2@62 z2CG<#V#f2T9&+(3PV!DyK!d$EN7ToV=xIVNL!d#(L>FlRhCoHQZ!qZ- ze@$UJ>+GI$f=o_7ORAxZlu(-yi@T-bPlfs2Gxv&#fc>EdBxogtG~aSG-Em*SzY?QH zOBwGs0}iTO4M2EN7jWl&XZKCT<+KeIPEW6&kmd zJz4$H$L^a1tuqhZNb!$^l&-x`7}YDpYLu&)^C-L>1W`>)QEIn9V-P@Ict8IA`4RXt zzJgc}03su~4COy-NVU&&8WrmicVp`v)yC52P-`S*9=Y$J?Y4mVVI||Y1v#(m7T+Vr zp8#1AZYwNCPB3>FPcHm1r{g>tuyjNOWe2{()FH?UX9CE|(gY$}&agEh%twH-2)iIV z*QwTlNnx=kH(b;0&wH7`_=xuDD8Z{p&R`Vp#bW+T3_gR7ma+d&WYMRwiG{?ZQ?s}8 ze_?!`yGQB~lL@klFMS({5Q{S$35ft`aIuE~EVz)hMi_&8AIf&~k@c#0gV{H7IFa|o zsKAN#a;V?LiN50MSW5o}#IS}ySxIG|Ru&CAt>pwAtivh~l(jayZ_*)&S?EdAkQ38W z9&FEk3why0_OFrRZ}UZ8<11cAr0cEcoJT6`aAx0i-nTR59}Z+bMLVd++Tu9++a+Z~ zNbe(Kwh*p-oOejPqr-}{>Ja`KL4O~~`n0Iv#n{7@#LTm%k*Uj1J@|$F{s#MP{2@LO znXxAK{bDBO*SPrnLBbT6Va)0WsOh=(Vf=@ruRk`G+J-Thw~&)GWp#gD}XKT;7U6=@-CKC&lYPr z5*<^bWr#7<+*u**DiL}u2wb%=?0wi*sNUDLD1|&5^jKSmk=oSHcBR11w^844Y zNV|$TT=MpT$O=Pz5rxm}7hj*Si+!h}vsm`Z$X6gM$Xs7dt(!ID=&0zsoA32(C?0}v zXe@IGloca<1OG})2h7WRYP;kfG2sNrig1s&b{S_iBFt)xoB7Bw#`Dw4(Zw7A4+W~E zR^}8t0)||sHso1q?qothTG`ozGKO%NU^8Y0B_Jtm@$oe`RXcL~*WkucL2AB{H$DN{ zREAM!K~)!rXkN+lkkti*-yW;+TdXI*!eAlz3S?#D9{BfsWol;igRlOaqW;BqjG+}d zG>*1)14i1KyArmu2&YJsX~!au%VH{qRzkGOpq8+N_xl3omyNW)tS$K#byz|K?4|~- zF!hKs9}`MA`#X#cwi)4THQE!|bt@-VOzWVb6!Y?g75?;Sfv_jc(BJD#nEAlLkZ_n! zc&;accbG=pntHfqVcxU2GF%kHm?T9e3OQk{@9?-Bs~E=HwWaTXr~|d;H4>OYMKS^FJ{}Cme}~}1s`77%6~85Ayg-GBm~dhC z-bd&fMVC7%9wPXH_ktV>Ms#O#-k=R0K++!L&ui}W+b+C4df~mXQR(qHFE*5uC%jrBi^E)@0LVD$mlINhsHRyfVL zx&A`uw(^e~3g0Zh)(W$;)kj(P_%G2OfQ}}}NddXcHlUE*n8&C~XV;~%YKv)2WsFu9 z|M}_jVwd^1H(l>eV0=ObdsXhcq=FB&^HS{>UXQr=U`2*XtMn11uT%nXQAka5lT-r5%FOvvJ9-AVF zhc_JeFEK25Eqz067X#o}io%fBcYRTK?D@+@`U-v@jn`Yw=wrQ%m;|pj4_jwHZiQ7qv`cV=gWpVN?{T(c{B2xZ zEgZkcSEym3N666L{x7c0AK&`NBk(uAvLsc8;o0Rx@|9Dh*R-AM?x=R=_bp?+#g+A4 zErIhZ_-bj!Ym24Dq&#fk9up}4yDhYG8&CC~?Cc)q=o(@@#>-}`x6KH53kR68xtLK$ z5Vl|~s6LYJfu=S=HjWc4#>9*c-7sx){*K#i+loFU7k^yE`h8zG=hO& zKa`3-mWe-|Dt-bVbI;uzIL)DgjEW5MKUimh ztQH|d1(g`i*Vz1Fj{}e3=}C#nK~t#B%$u=!uM)~XfviYGVcZ#rYpZLi^ZvUC;x2HMpE{eaz9ILgRc42- z;$63(N+*8MSt-{5^|FCF>60>A?~0XI2>)&KQW$W1U&H*kjQ3v{Ofd2lx)lyCytE8{tiRzVMgHk|m{90mk_bd-q_Q(SFt=kS7_5mV2xRfAG~mGSPqbj1_zZ4NV~E1HmoEk+7d{Ha5;V zv3Pyq8&U`q3o!&OJhTCPj464yllC?8oYEG57oVNhUNIK#i=ih&@dzK`Kg-5-qOHpe zyV0{PMvpgj2{m;HGqDdP>?c78lyHb7ODe%Th|pc8QCC6_2o@FeBy!)z@F7k+7=aAA z0Ga2v=>0}_0n}aMxxZs(b|d3|B@}($nA+pEDBH$=htJ%z$v@L?m1;7$+H8RyDH{02 zL!WBXDW=Jk!&7%xtfzn6%>D|8@%ZwOTPnV8rhQp^b0BaX2a=?eh-=YD<-0Swc3)HY zEJ*cTU$QOlSv+HS8SM?SvS7%S=s_)gy{+gYdLE`Gqae6Dc1KBSN&h|e^MltOkBm-T zcK#6xc2Gx&#^oUT9j#vgl#ya8K5WV88x?zR#H2%;&fL#p^<*-;b0peyz5=dQx#Esu z!9X^n^YmS1{Ejl)@rTR;_gMSxr3M}}_t@$fvVX~z{N3jtTq#uFWAtV+J9D|cIb2-^ zQo4G_(aVbTH7ai997P$s zy`0;GFs4{sUns0)Fk4H@>Luc5^a|aSW%pdhA6|W37k^1%J@X0?cy!|SqU|}lq+-pw za(zN>TT;GaZFcR3yap`%*I#Q1UC(igD=^L}&u6|zmIlg%wyW}IZY$ZJrAOupDCKF& z1v(BFqsj^)UndfD;E~+mwh1|{cog&61w18>)6Qnq3-~P@R;@_TEMj-a_}wDOZ|Rv` z0n2mE!j4b4*c?xLixL2$qxtM_3wgie76WX^9-Mco5w=_@zdR@wc9n{I5L|(>t`$9> z9iL9wP)=q5SYH-G?8T6QT*>;7$o;&r=xxNgHcI$04AG-66s_!bo>QnElSc$hK{tZs zXf!8Gv>G$Pd?W~nIeyD%p3n_m+FsK;Rt-^D?=ZM9m!WCm-x@#pO`(k zrR>8T=9?vwZ^%}`ZZd)WYh2lT)VPUB=PY3i;hAjdu>^dDfh2=JBV zmMd`VA{ydRy4WS@_GC`bBY$*D?E z7BTM%QZB)#n|zKwcH7D$=G`PFUa*^=Hv2%;-lDfhOI{o=8@em}b?22fi@6ugW}o*z z{diIS(?!sN<9v)Oe+!}S348Ao)34aiIlCsc`5xzW8uv|c)u%kkyTq%FPKz!~ywV1~ zLSGFjEQu07`}0cPZg+honKY?v)k+=tBRV?i-sO&DP zhFQaxw2HSoQyWj@bZ3c&b7dbvRtT;tq&;+5FJ0WpkaQt~gp4 z`wjZrQH&vI?nRfp^xaMt5eWZ1Q2em*SPH(vX$i^#S=oC}0CC|&wHP(d4EIy#@i1Mr z9yOOTcD~z$?K9%eC!DItc(<)=2zf%N+Aih3fd(ToqA21RSMkvT$l82{n)gD^ zm+5ypiRGEZghP-pwGLPhjPP3lzM_WCbDFpaWM%CYZd?gEj`4+9geBF*%*N@vTMGD! z)a(7hSN}N)lLyO~dp9NEdnVj})LC0OD;vW0iu{#aZ))iRZgX zsem$;g2quXkzHpgSR54|nVhByW<9H?y6U$Hrg)AoPM|t$$69%k@1FQSk&2iyQmw7 z(`&D>dy09T=$D|e+5rx;iN|i?a+*2pCJwKO%WvlM>$%)oHm{z;Z(#B;%iJa^ZjEzsUh2IMDt@DF@t7icm% zJa}i>?ux-hG|ZX)2Fo@Wx1l{?Mp>Wj(!0d;Q@E&2Jd@#BW9z%pE-2Q@XA#9Omg*m8 z8I&}7=B`Ow@5G&AuD{v5C$Do8{n`5RC#x7kBxq=%A<4?fSE%NLtRe-ttG>gTX3PV` z7QLEtx7&GH4(_Ui-$Cys>03|M-C=w#kbcY)zlVEWLFHh9OrI;(mWg_Re37<9-c=;; z0}AEuGx;y?i2rgl=gIz}H+u_S?Jao?94H-3DICD)ZVGeY6it0a*blxcd+<6<@G?jC z?gIT)^3~>bCmu&_XRkh5wd-Sqah;qX!-d3ss+D)~-B z*mj0v^i3lCnCGhOm8YtHE_s^G8!SP+O!TZkGFXDBPt;8pc3~QqE9qkiv6G$(NneHZ z2~E;Z7xmEuJw?Jnpg=fKD0-SN=_`~yfjK+;j*F!FVp(UAq@zUESq3W~c~`NlyF`v( zwiiDRV1q{Psvm8cD7~SV0ALDq&_WkUy3oxIU<`-DZ{>>=Rf6t^lKx7b1_ozh=_{f5 zWs&^zwbH&5C4*-xULR)m?4+u6j)q_f<&xksK39yW|pWrBo-Cs3l^R(c?xYYm>{{rIktmgUrxo zf57W(kPWbyeWy=xy{Db9^W8ChPu1?cchDwHWd9De3i$h=wu=ct6r>lsF(_2nI zfRY311pq3H2qrTaPv)(<8j`|JE`Nzy45<&se}`f&>Ymd}1{~sYh^ZGqR@UCTa6;m= z1X)@7&$aPiN`cBp&<5DqOx~Qa^aO9it(KJht}PYMHkLhsO&GA0`3C)a#%W5B71?kC z7KPD(Vf6>H0%bu@b<(x25%Dx)@)gs-Lxj&>Yu`k`At1`mZz08RhNFS39Q|iH22La? z%OlWol$V36H_}!hD=Rw}a~nq!OS?bgE3z>E4_I)%M?4I~=DjmdC`acciTSrImt+ue*T61aN|xrgY%5T>1HzZrA%cBLs7_30tE~Wkj>Eod93yVjuHha)SgP{8bm>t z$~umu)vrlwTXDTEDO<4IvTx|KR|IjVe~21%h(p&mR_ChW%4Fu>$$7#wv4x1$u15~ml1xpam;n*&oq zZ6-^d!|4LxSzO4}6fxU?Vs=XrtGR^PT*hw2Cp18bKq#LB_r3OPUOSw^@R-GI%VDpt$xSd+Rb?_ zn{t~It~3FwuPIhsXk49ExANA*n2WWuj);i4H=?iT(XIx{f@X3&=kvJD^hw(}cNjfs z?EZ4Lwv45rGnzQuc6d8-ICY4oi~$vkTgPEHFz7V`o|eN>(%^T)>n|;Rcm8~<_mVq= z|2~tLwCH=i#(ko53FpRa(TBMbvI>mC%C4e!AzQg)!c%siuP$Kq6ta66IQaYyKC@TI z?mwNb_nmcmMtUda9WVlk5G$_YSv>4|^WK@QDkF6lr(Z*@*=k`LN;B>$V)vufC~+>x zeTtI};S+$-O8_J1$drQd0ApN-VjoI=M*Vi_L=Vxyu=NLVGCqsh3-)M2=~d!EAn5gtM~vv zBTyE|3i-x_@^33kzicV_4cJ&Tyt(8<65~}OeF(ja0A!I?mXk8z03tC^7RUD=eUt+X>|II!uvdhAdS=rgD9O z9%QvKqb)g438Yr2(nJVONXlaIdpN?r3f2JLh0Pu0@Ln+a{cPbtnY6o9Lf*>B)DVhp z(tft6izV#j2s*ezL^55VEacCT?#|=)BS6B($in~~uLqW(WxP(HoTsMo(a@*{&^gHz zs+s7eM2C`y41|jKDtNZ$2~~fffUg9~_*&$yabdCqdM4QefJS zEm9eQJ(F!tLJeD>7V=d{YgY<7pvUq+)CJTEb@gI>t)Qod-wl)NdXcJL)&Er9#- ztT_i{;HzBG3-A>V1>`^hk*Gx?X%oxZ`J!f?ut_Ls6$#sT+$KI(1HNLgd(K}H#m1(O z9lOnH{IS@>RclJ#Zmd8M^&y6a^2!I?&cIi*;3tA{iHg_WYs&2w-93E0K8^j7CVF1N zd%_lW;;;x;z=<}9>VU(LO zcZpGP6gNpT4k+Qn2IBAd3TaYM7Q!>&dzX&k{4^@JW44-XRw;Q6*D%)&d}8)(OW$K8 z{B|Q5g3fk;8n6g(2%2f+D^M1sW~k7m@t#2O9B1nhWbGDUHPXY}84V00P3@c^AqW{6 zlB~?hHU`89f7O@!!B>A{r9ay;=B&PVwj;VirNV?_Zb~Iw;$XeBG!H{1@FMv#mrX`T z0Qv+_6hn+e-h&|D#CZb|IjD;)Wa3+2ktRj56b+eZBgd0K6bx=SUm;jW`gt)(QD3A+ z6OfxK7+#k(wD`b7%(htj?zZ&aN%7n4J@aV%fvh`ReW{=e@eE7S$(D8@b$u2fp5-%6@zr8Mw}{_` zg%$Y>K8a8(7IezQJ@>^um4Z&OPy>o!iO|ulfhYkeu0qtsko17iKx?>!`2rPJtmH{l z&^ZxFbW)*KhM8PL-JdSk(4;Ex3=}nyAqT#%>7<=#4`7Hom|{IotOEpM6(EwR#8S1< zM@BAE%Y-V4P$?CujQe~n?x>OI8>E^#v8qu*0(P;jLS36!+b+?yh&r30C?#xb5i457 z9SuB{M1&F^2BHVfmunBRJGU3M?90`isCc@gKzES-WKWsuAXC3HProC#!(s8=h+~gY zvd0KE)Tg2761+=lvGCr>jNW^kFQxMS@+!zrb+IJyk?#S-qUU_x6TaXzhx?K%`pOf3 zyOce&ZvXu;Gt!F-P!izT_{)%o1A4m!T6L?ZG@u zm}1m)2qF^XtSA#VO7zQ-3fKTPAVY*I2`Mkn{ECy4JU>~(E4UxmF+RiRYe(^?br~JQbSoE`C#;eI~nj zPIPu3Z|53J854-s1xpuiOnI2v8M>{kVc`lv23V&e$8P$4>g~I^mxaj>eTF~dslPt| zFZhb;w|>@D?P?k+AdGg(2sVP}_b7*v;uwa2IfnOcF&obEq#9DJ;CIaMf~;VEhp`t> z7Sz>ndZQ%?R0eT%_@#oca3`I9Rqe8aiw-Da(s|4d6MjE|uSSeNGIQmvZ%1@fK<>Y#w41k zhruV)K3qOoPy;|#fAAH!0)P=7?C`4L$13asUx@^2v~Yv3AW8tff>kjni_O;|7Qzw< zQsfL?3&3QzqL-4-Zs)PuSe!O|SuAKR5w=yZNzkxB<0_FbFEKn~!x)>fK!%2i6`oKb z5GjP9K7j_1@D*qh5O7;X{B{vf1w0UF9*J}yt6Gt=PT1ZcR)VZr1lneS3TWi(8hF}z zUNg|hSJ$xG#6le?>rAooPoPj@C(jnRP;)X1arb5uc5Os1mIyPI&<@B*xJ-K<>)GLpY zcQdEWK5gTk;^2G8HuO?VO8uJB7aQqsAPEJ<el-3p!w+EOfBP2uLTO$u~5_loP?5 z$}Z(}=kh+#xC3SEei}!E(3&RIfUiJSGTxJusqLPjhftME;CuyN&E#T``5Tf;iz;5B zu^cX_7{Xf2BLSL1vmD$Xpe8}eSqR?)*npsip$p|Rs?RZO3>kfdWolH}%NePvvAYB) z4U@*ThVv6-W#zq{>XBsQx(a*+Kr+`pcpgbs!BZ(g;kJQrSD8%l4|ntmxA&Of=o)4} zCd6ixzx7Bzb7xOeM|TtINJCo}$O^7K7UYoI-{;tW@YP@G=->Wt%vpV}r5fTZ(g?|% zLfB2R_E->2c-~zE+xHb>rF<$%;*#-b-1$qB6Ov5c_yjjU6 zEp#`Qz29E&e$CxyafccM<4UMOC(OMLp-I@>ZwKMKg79By7ZPXbyU2agikZvzZ91B9 z^aeYh)kl}U;z*yDb9=}Ikr+13`Ukx3`^=67MLvbgRa)BzDhJ?7ITB5I# zc2-LCf=WGCsx7$xSr3xZH9Td5NZTaP z)p1l0`1<=i?4+wwq<NiH$k*S*jX#k%Z1uXGE&k? z<+>_)k6hX%;daXfea6>U$#lR2c?VD{(btGOnkBt0(!NG%7f>T7Kl}rk>Y-fyP}1>8 zsz)0957daeY9-xR#5G7do26YqlT-`TOO&;u_Bv@NP%qZvBR!O=0OS6ZqAs9KtOQ!* z?QK;`rC8M_Xm63L0Yq6qqgV;F%DS5+oi&n<$6{TH2br107O?% z2V7tBZcX9q*~tu(;Qa|Z^E2pZ2koN^dLT21Ww;PQuLv~@4TNG4oeD&ny9Mew(WgVV zv33>?EiS_n?;Cc4o>EK-AX|<%!rS3q87KS;)ag;(2Gip1X^g3`Bt*V+Gh=uI?agj1 z7;isWeBiNfY`$a2NgLmvsD8UFJ+`9QXXTS%<-5Sff013lEUN!ZhoEUrAu}8TBb-Ab z9mD2PgCOob4fh3h;b{J_kkBAlO~EI0_GQ5=>i z5bg$3MYCUlvKBL6!YBd2%?qa=MoZ>ZyquY)3;5;ns0|gwylbQ~-ncV_-wDG1q=olk z68<~ESLVSmtc<4y$9m1#G-KJ`4TtZX&5&eq6%5(yBJKc7{FEyjM6v<_)qQT4q(Tj{ zf)T1jge90Bb*^fGu3D(B5@1c#E)^*xSl}4K3`80niH0p!=U4aN=Bf^qsN zf=Fh1>-K!@;iB4KI9Q!^g0i3xUdva3uK*AfP$ljJUy&Oe#8-NNv}h4)YXquCJVhNx zft6GZzvB^?Br8ysSgH|8)KamY1h1!3*e@5T@FQ}Grc$cCZ=fuY6#%JBphloYLdnRq z)e=ResI5wX-$G6PIszSdn51Gs$0MO0FRK%E)Fb-@h*S+?b)8rNzQV3RP#{m>fkas? zYDY5akx<*r(X?>2jl7m-L0i43320vbY+ z5F&dRm!2be1IhwlMQ~vu4Kb_lev7epd(C6g$IQRH^&0dXUK9ymRq(sPS6B%`3`ZdB z245jx2g<_A8YmaMNIA|TLJrTt3=Z!v;HxENZ*Za-b5kHI2v8swftVlNI8e+mt^(k5 zx`6g>*1fL4v-Kl4l@be5iSTno*eN3D1YqfP(8BY8t8wik*~l!|DB=!`&a+NiRoYd`Z!XCg&`W(;Ll|R<2DQ<5O!njg4R(2 z*0?W9k3Z48A^i!IRS+-jDEzQBe|QUQ(=%Tt-RxU-vUS=v(S#Kh&Xcd1dmpp#Id18{ z2QUjtGznN`6&M9j10(H&7draSg5QLL4}|?^IS0JJqa&b3XHo%nhXNg~=@t^)&+)5%;x__Q9%lp{50a zmLZ6$lD6HKD{x&KLJ@T{q8d;Q52Bo zd`+VWFN4;l4iQmk0;;IS@sEJ)84-o?sZMNTkYR>8}vd0B8e%RU#aJ zFjX4G`E?-+k=QrLIFM2>kZ{4c6Z+LzU*U>Nnv}sqS@3NY?E{polJnn&Z5NsO?U}cw z;zqFwYWbxiEs7DPLJg~`2Szza(A}3j#l4`GrElP(A5~HFs6*QJ=J-w4l$hH#p2?nz zG7?UaPU+(`=_hY_}R_SO`trM0!WrKN=hOghcXVSGm_V49PPmqr*mu6{7ozoex< z{iczxKvw1^@INJ8CJE{o69+fKWw9x=$O4a<1piD-JV{JGL%>UP;yLmWm~fUDcbXKn z3pr`x^E2UPAS>UWO}%%R`Rud^S#27a0J5?PUP1|&Z|gtL=!`Q0{x}AU9Jh&4;fpq| z+n;*iTy6ocnO@m}JUOBx8qzWxm4Kz-u@oFen~bTFGL$I6KNM&l3X!N$HgMaU_+*x* zhTmEvY^fEsK47b>7z!y}C8Htw6$^+;46?7C<}p* zAskYJubTOqCY~B^1k~XX^*a%mL_r2ZA~2Prp4VE#ZUJgJt-xc1On4Vo%_DAoCAVI} ze2h=^fTK_gyV|+BI(8#MtZG362}Z+xX5#~4GhTMTqV^%9zM5HkpH=rzpnN1mz}8+T zY=u!H>>799u3vXfy8MCSI#>rSexD&ce!Tu-S*_0x)moL6OmU!_KA#2 zGSEx_P$&dnfu?{s#%n{*66w%wQ-^!?T%c*Zvb8Z%EIKr;_}zvt4Ws> z#I#EeOEO`;c8m8dpA^IC2U!7yTm^uPA1JFz^aRUo@KqzPM=EZSOWQzJ+kVbmyrIN% z3iK8ZngkvvCLJaw|3u8VK}=31vrmA*^_~d(nFu~=5^$LCJpi&Y_uFsklZ*)8DsYpL zuPj5O?EE9Bex%bJoSPhiW`nP&fpY<};WJ>Cga1T(zX{fXfq<=NAk{nA-ZRM7)epIJ zz-lyv`@GGZ#+o`}Le>cqF_t#A=2q6=DJ0d+&Ea|nkbLzwvLdIO$rh_0eD$Z4^rzqW ze%MI4V^V>~%;?&TMYk2YaGiZ&CTQ(Bi|QLe4UDx9UP=i_fTNaOP!fsYRrVnX4q?jy z$FMku&{+G>MRp+zsUdR=m`x3V)gVHt*{Jp!FvTHg3T{;Z5|y6Q7e=m4IeN3OfL05d zx-aaOb32d+774V**^Me$2l@{m81Pu6u9avJX|#wn3Zbf9plo3@YXoYARI8Ms3WkVF z(=5~Bl85XYz?XFa*`n?{EcGwUjx%)afl~Da>5JUbN8htr9XoYDEYq(EttH))pc1OJul(4SZ~Tc)SuXQ^<9IaoZRR8Gjtl;Q98djux2) zXhrNKR|5#!5WE>A8%>|eilE~B+(##!=Y=F>Wm-87|~VV zA7FD-X~KbXMeX}aI}en1pW+VwMC(0Nu0h`KWVzxjLvyXX^A4+j)5&UUzwMEyYIhdD zimiBu(h0O0NN_(u3<0Wx5bA;GD+DXhpaNjS@FfIPKVblH3GY_~UBFT%iLHh2=ACXC zHQ{Gq`$1M#X@7-epj^~XL-&ZR7ukEdP>)ihK+sjgQZ(|l)dD>rmh?zveN_$5?&Qh# zpSivHz`2NJ8$HI&aqyny&v)X`A$ z_Ou=8hW<~e<61h5w4gYe+d7!pPz)9lh6*6s70h7L`TgJbQs7_z`_s$u$2b1X5%^bp zW$xqyCqXNZncyo*K#W~boI}VO$I!Lk5tif#j9USKtp1FzKv~9aI@Evd0w&>Zg#df> z#5v(HNs0T;UM}F#`R&M%OIVspp5Dk;7&JqlfJCSg3zRZGe90BYsGyG9)+kVdTU26A zJG)KIS0Qx4b=t&7#D#zXjgc)TevO%i`ev;`w1_jp)u zw(&X?0+OsiS;iiKR$hA>A0d!R1qza=08kKeJ|HWSsf3zlPCLS|RzA6YGy?R6BsO05 z_W)TTA~LcT9-Bp=GLob4Sj%bxW!15p0R&xm2A>%(z>fe8{5AkTTgyQekK6-*jXG`% zVyzlp3!*+OR3C}jYOs_uTOy(pOS;O+o6h9797%h;ExSEFwR%fh^U6zAD=&*yrHZ%SknGKTbg4*lk28RQ z&BQ}OV&d`e6d}lJCHD)28s;+5`~4X;K1ie*RGo*>P=_91kQFuzg4JK5xF4hWzs;*a zyWKY|6(P6feWrz&eu4?63Uv|NZ~pT$De){ijFZ zkFXT|?PPp~RW?E_+$k(5cKD;j$JB|)Um~_ zf=U(A+EpS=wNO*ZSK(2{Rov%e^{2)f@R3MeBUB&|Lb}P2aU!D#Fbs$bffmVK2#rK! z+=5Hhm>b6;0!syd=C-x+6-Iu*h7m2ic917v{3O^g(g^vC09>cQ z#|H3GjUTv)(~1ua0x<$Kf-jAa*aKiBF~nNfFw$DBKmmYia2&ut4SaAl_)rT9#ljX8 ziVct|wvFptd;shd&yc~PK!aszJF8X2RcIx8q}0$>ica{S@7(|Cx@<>AeR5jumJHR( z)S80@?MF(~X9^#mFRd@)>qr89`Is3;s1X;IoP4;Y_*HV*+vUZt*DyaX zs~85*U5Ub+F|vw<{tsg)vHV36?PYS|!1ki22^Sh%qi;C)CHv1jv3^fkS_$H)X8<}t z%J?1SLN(b?hn8BQTFlpypeY^;dvI0&Vv$NN(}}B9_j0(0PhZ(_@YL)@u|A>Uc4IuL zqdjchLrJ$9-|27+cM6`5`W+_tfDxe)2F$@3i}TZPicWD3n(Q1H{x<|nK_j|@?*tIk zcaHK7rFaG-lp<+rte@=|U-A-g@c>6zI=R|7jIy>zkNOC63;V}KIJ`)fY=@@YnXJbbXqprG%@VO1e5K-&Q1dkkjuO!eqA3NxT`5qg z`HDaI3OhG063Mtrq&5Oi8Y#<2ICwMy6lCNgkPH@FSm+s-V@BG+Hc6)-Is;P~KP`R` z{DxJb@s-98k8LB%;Y<81qA#rVkSaHZTV%i{(;+91)g034Sl?lRj35wvW#lN35*hUw zh|9Qv9b#7?F|1xyLM=E-!&h~Pv@PuRHm>rKtXINO->%RCN6U4X4m5 zd_|5~F@|Op^iH{0=embUiAqId0};A^$~M}u>#f8VneZLRiXj>_cC5jIkY;GR zhIVvU zf9o-1V#?CR(;U)R22F1?e4>rY$W&&S{ zQqoQnC|Ob+o7cn_webXS1XD3NU2I-YDR1abzApKwctJv%eMpLh_g0K2py?MQpVq!9 z*4`;LK6_ENv-jIgaa%WK(Z!8>icVjBm{*4IX;8rLho%h+J`wCrV;3j}lrTsI?JO=& zCF7wTREK5~6opX}dBE@Di1gyBevU+WHnn*Fu?tC?QYO!w4VQUq#Q&Do7Pb!XEG9eS}s<5rPV2kTi%N5Je08*BF8p4W6~tS+D(a}5@jXEOpwP`At=&_)heM9 zP)m^4B9q&otd`0y1X?xKeW0vzOb}PJ6rv@brz1l(Sw{z7+bQfoq@fqco?&Rd#BA={7#d<6=GHB9w)3g@ zBwV*WKY!X@1~=onxuy_;+DTDZRX2M+sOUZ%0=H!P2JjW+`J)~yGJe9 z_i5aBA57amiaV1fN7EL5le%EnocUWb=5V})ZE5Kn=Po#yGJ8+V>?84+$ET;AicHTQ zo0i>w#=hPYzUw@A^Lrn!eD|Xj@AX>QqW79l#_Sp}W#9Bv4*i-PGy70n#*xJI1Fj!7p}9 z83RxJzM2Oi{LY6z*QaoowPj;6NmeVt5T#%su(!RtkX6X}iXDXI``&KJg;g`IAq`ldZmsKTR(oA82khnFZTU za?PBtznr@xC2iZd2@6I{U(sho#s`DbhDNT5PuR!~Ykq~u)BH4ZN>5%lH+@satPKlU z8JoI&PTJSDM(pI-J9$b;+0AbBeoxNcF#}UzG&Vz3+C(`Iwq}W zpQ-J-_OJV9>!678`8aWjn+xlhsMgup*~P_^Cl1uf;X1ju;ckcjAKi-u@R0t_i5Gb# z=j7$dws&$XRLZrWpR;#Ko?JaSx=TUldmU# z#fnd>Uh(#jan?n1GelJ%~ zZ#F~aDZplP#`SkjzKro%f5H?0J>C5eMG8jB@8S zyR4$VrC)2%qIaJ$Lxx9jXSI;u)mZxqetym8ou7Rc5^xuh$>R-EJYZXAWW?hN9&+%+ zk33JdofUU1T;b1c*2jNK*4JNUe$8FhnmN1J1+#Jv%S3nCst&lb;x6m!v@P3HH*cN$ zH6tnOP|EC@%#&EhA>3JQO1b@nyw$d+;z5^f2gMcJZi+weoOmT)KZ_subKBgVT(LbB zf0{3jGPc|HTKvhcySe)^7kLxET;iAE)`{!3T@4@0*KfOt>v!*9eM7}Z*{-oYzwOR< zuHmEj0(j9pdFBr8sd!@hGxv4;B8y?5Ik>WdR_?D>XKi1wXfInPrzLOU%rzX*G-2@p zTjjut`QPxn#HDk#Ey>!tc;43wvbHi{=P4t3>)hEqBHBLNbV`0bJL_AHp21UE+FtIm zQj*#4{KKroJ*g@Cl2Umn^{r|7 z9n=mMv~Y?X&g#W%AWsYD?ixFCcK;#qAAUOJ>6hLKDfEDz=8R5E5qz=|d(7Gmac zcXGQw6|F|va`_;~h`>WsXschH$>eKqGW3XS{s*8Vf z3pnnz9JjaQyWu#-JBNAa$+nksyuahGb-cg1r{iXjz(0M?-@Katu`Bpb|IYt?$CrN3AANhTj=;1__O={>S4P0f4Bu~?}Ow1>h8Og>-MM@ z_q?@tZ?^x_`OP)v!(hMBymZ?q$oA9mPqE#}@f!Q1?mYbViv54F<1^oV^sn!2p5^uj z^3E%029+q+=9kL~B}_sY8G-EDgB z10DZH`;pQg-PiGv)_trWjt1^|q{9WpR|i z+4h_cceStD&K-Z6eUan;1>3s)$jbIzg!yTcbMNxO++atKV+%|JXHmH?w_{|G`t+?)caDS62Ut_E&$f zHFfp>?G`Xv9clmew>jSWN9&G{;`|>x**_$AS8QvJ_vD_<>SXx6dpq9m-&w!=dv8D5 z;n&;tsE+^k9d7)0e%XEU7{|ZDwr=|yZSRQVe#Y?y+p;P4t;9FvcGzVdUw_A#n=={PkDBZ%9Do0B)@@Jc@M~?q-0>yY9^-iZZ*RT#c^&V2?=Amt zmmHt>U%iI^x8I~kn=N3rvEw%X?N)KT^^evaAEo`3|A*=so@wy%vjKS;=6P+1TESIG9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9Uvo zAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW z12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3 zG9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkWW12P~3G9UvoAOkY+_YCC9l?!?E z=7o!k3!I&uq3!qgwx70_wwDaZfDFih49I{C$bby|H3J?V9`N+^gqN3>wV2DfbLWPM zNz9_{_}8|hwv)D#49I{C$bbyUfDFih4E(WyJbCiK)zuXR3KX#74|jKWI5|1NTyM@z z9OCWmZJld7{_%Fyw$Zkc0U3}18IS=PkO3Kxfj>83@*5`SVHP(xH!J2a+ss~rWv|0B zwOA$|(f0iF?Wygf?IQy+AOkWW12P~3G9UxLHDK}`_PE33I83}@wv##c^YcScP!Phy z!>y%s>Cy-d4MowSMHPc^8_AQlfegri49I{C$bbyUfDHU~116VYYN|}W!^9ruvWYv) zdhz1L5fTz&#T#K^VRvGXvSrI6A|k?yS+uSH`nJ}#(zcQT8IS=PkO3Kx0U3Bu4Vd~V z6L*;Y4ij^j+A6bd@*w7V6MNWm9=|>}F^P#s%(;2&gSrj%cWeJ412P~3G9UvoAOkWW z1AlJ7j9q17jePm?Sve2;x*6xn^p)EeQ+MT<^KgtoOx$5E2L}hM4_!4_ia%vQ24p}6 zWIzUFKn7&scMX`DDtn)Y$#s~TtNi)%-x*`qtQRa;(CY0lJs+me!!hnK>n0{K*PHq) za~~70s2BauV?M>i+CDNM12P~3G9UvoAOjDY0TUzG$J90TRc5irA|~#z$03Ca7e>jF zCGW%;e-?iP1_oNsY5Lb6wC$Gd!%f{8QC93S>xa}#@*#pFUv-IeJ%_xJa|Q+M@8@rV6-lm9Sz6O&ib zoap*oJxHG`{jKsY12P~3G9Uvo@SqvU%^sIrf1%IC^+an7(r}4~V&J9&h50Jb5)A;e%#Sf3NntG9UvoAOkWW z12XW>H(+9pJf@y1j}r=TanF?pdHy60F@5G%-Ic40HLr(RH@Obe=TWR!F{{_Zokhk8K%`S!Gb(R(ZdG9UvoAOkWW1OF@oCZ}Ov zOpKA2iwCds=6rxfSUVNu<&AQl1yI?m5T5e!!{ddDp$c;sWm!Yzo9iJIF+JwIzdLKJ zOq`NCcP@B&=3{K&3@4Yo%ySfgudgrsnCB=Jz?dUA$jW!vV-5RwSN7b8Isd)*!=4{8 zw+93Sz_XAST-{vM1Hx^t&!o1249I{C$bbyUfDFjM{cOO+DG%IPyOfW|u0^>7=E{xG zJb4kyn4>h$YZfeo4%KQPwtZKmwC|3L_8%a+elrZI@hm=ixGK6-sEA(G9>XWqtD{9g z5MD0egJ*pMP@H*>LX17U++E=6k_RP96l1Irh@g;Q_%rS>i&;0Z#9vuV&chye{5mG_ zF2ekWyOVY7{b#wD`}uv)Ytw#024p}6WIzUFKn7&spK8E``3dLS-<6xV!`CSno?=d- z?US`Iq(MVWZ1OH9HfV&&Z#KlZ7hl25*Bc@At@p5|Z4WGN(iUI7*A?44e2Nv#yJF%~ z&!cVO;`lHy93O_1!{FL4Vjv$^wqOzX6!3&gZpJk}1rZiudO8?GgohzGEEGXpf6ku$Xhk2QQ>iej_ zOYf}=$bbyUfDFih49LL!Xdo|-!A)J2d2L?IZd1V$9=5;N1=|{T!}c~kvAz38 znA5N+X4H8BvtDb6C&t9&FlFXfWII|urzdItrgIPyq<`QHKV&V@jLAT?O--|gM zuQTz68E4n@ikR`P9OI7guyBMkE-A;{h`*;dYK4U2?aGhhVfM8L=E{p==I`b5SNi1d z$M;RIN&6ESkO3Kx0U3}18IXbhB?IQT+lh-imjDk}yj}YVOz-yjIq^gBL3CaF#DbN5ZUNm)MCw6dBzLw%&YhoD}u6R!Z==4IP0f^5yHGj zAoCt(3A$ZV9y+pk^vcz0U3}18IS=P_+K*M$z%0=Jnr^k|9AO9-e_38 z3TAxt0k*_PV#ACH*fe?|z8dy9)(`(2OFsD!^SXCMJaZpYpL-ceuQb5Ix8Fs4?dLEe zqC8`ecG%FWJvO)LfKAMWY-!s8v!AVt-i3qE+b;~GpL`P0Z`8x|dUX-`R(*W_!ixxZ z%8TOpUE!V26~X?#2n!8l-IVDiXRn7n|H1engv&ko431~@>&s?LEHht-88^#}abOrBXn$H^_RI7y^4_Cv-Ja1jTBA(({TY;=MGxb)Q9V-^U$tn5$j57=N8w_a zTK!2ZXxIcvtj(JKWNoC>eI2XYbj6mB`(WGP&#`mVVCBZsKR~^A5S-U zGX^OW7L4-cA`lu9bUXfF--oHc`it?0slPJuhnZ*4jOAOzrwD?XH!-;n(;HHzOc{g( z_@N4W-yd`LM9+sG$NRx$&^zK`^kW{R2kWuw2Lz%L`$PO#hvvma^;r50JAP)gE)Oyw z12P~3G9Uvo@b4Kg$JGUy^QavXfH7U#;k%4kIJqzbKPF5^cJfSI$%w(}=<&#jn}Bl( zlW{RQ5*KGh<5Fq@F3gC+{!hQa(zjY5rp9xaQ?~(@z10j;AA1s?2bD%Q_L#>o@3FdF zXRPhe9b0>TinYCZVe{aA_D*k*-=2^8f%hBM$EulAaAx%q9Lh+*p;^;#Aw3#rne(_fa}0i&9f`}cCgXZqBo0j; zhLt@!VO*UjF`{x+jIUAy885Q$q28-FVp4Gl3Qd_=*lxB@MR@So^{mM%i`Cenxi3mo?q6JZ^xDNsYScAo}uk7Pr zg;@CyTl^8mnyX(gR(+M#TW*UpOr4dtx3^V)W#&w`_kNh%habnjDjr%2Wdr?DE_WVu zC>4gDKK|%mJOuqp1Y<~81q@|8(&v$C==yLKJXfMP3a}pQLA0X3S^G#CkO3Kx0U3}1 z8IXa$YrynjJ2^SuIezx?aDx|Xt=@j_Ib=mnL(ZDT*poN|Kd{#7+TskHj+=%<w zVh}ntcm*Ma@}Z!vv7mT$@8C|axp%2le2(6SGsXerJG5*C3{!K}w(omFUQ)>4Ir zbDj|9NrFRAIy{17^m2|uE=5ZCaE=c*&NIk)5IK*C84IgixpFAQaf5vWOR@(&2o>_> zM~l!hSi<;dOPlUk_(FX|maU3`zTx-3NX)6;Nz@qFx_J`&fK zq~gG|kw|FzI=*O78R zJ-gssN(_F=N`wxdoT_O3=6Q9fKY!FDC`aQd~PUPzAVaDEYEtb zFcdFZ4CP8Qw^E`6igO;t=l%SV#9sLg9Y4fY#!uh9+Zh|*YKf_jK7n2(*fU?I5PRaCou0(>){Gm z5)+Bjt5@Rmym>er8;zfrWny*jF8H`&Fj^P!KsWy)nE1@&NPhcOtm@Vp+xmWp!=s1d z%+!h4H*63VHG3Cx8a2S&hHvAmj_t9h_s7`vK@Y5cm${Ng?_gQ;X4uxV2M$l2fbT~Q z#qO~~klvv=+Op@nLr_U{i73VM66jt!5LvwbLUIf)B+bMH#vcdMqBzcP2ENIRM_=Y# zf(zzHAy;RV@b*G+??UkM@MLdCVH7J~(wYmsOxcQ@7d-@}IF^+^Yp$%ENEyZ!tmO)4 zj8TMr?QU)^2nY(`5{RP38N(DWj(pq}KKZy!^5jNEH+M{F+MKzb53r(PE9_|AnM+6P z>d*~yUwaF^147Y(WAlDk^>H+=P#$I3*ItNYVrkxVeGdQ5=TP^R7a5QN8IS=Pkbwum zKyLO;7htVbaFHVTsAV%8{c0_aE}Dw9&>4vwLf6VKlAj70prYCf(kPRCE|Em`wXSA15r9J+><#3v7jqjOL(d{MO` zb`9-|YrOA?q{-MDJq|x)%*46%ORWSS-I6>$_OjRVI+* zYcU=PU=E~3rH3)E^9NYosuMQ1?uvCyT3~JCcd?^=7i@0V1(8oagD(C-=*w}vIz3z& zHP};9jIoQG@&n3`$bbyUfDFih49I{C$iSWca%XOfssW`C_r>S9wsSj<&zpDR^A8{=wK!J013v47~NxD+=TS5hKzDtasy_Gr#Aa;M?yoH$(1O2ExU zN%(m|3NFr$Vh=|g&Zo}63677I9m8Jr#Ob(^nSfI<6Y=esK{zyXEV5H);^M+t){@QV zHMgHnnugRCZ=q8lW1@2Y=*k$RRWT3DZQTer=ESoOYdZGFjK$tqj=QxY9mf}^A*yFv zyk5p1kFYK*gt0`hs~hJ>bVo@Oi+JQiP$_>zlwlmgadsk>M6gF@BIAuE@Atwg#v!X)wPoDV9&4BvS=X!; zzU|o?i7&l^ZpHmEpz>q*_~A!U$;}P^+`fg`o38PB^?k;J@O_50{%j}q*=Zc?izmQR_0Gb@+j412#%rzGLnj7dmt+yI?R6h^t<8E@`@TzvHnJaXfwk&StQ_YvpX_KW5(p4k?8mVI?r@?Yg*{8e`>M&M?L~nGuBpeC|{8;_>C^e(3eWlW0`2ES~Z8MWy^6 z@Z<5npHm)`Vm>02bya2k{ZWSfUzRV%QN|u4pR9@&h21fR$Nswq_r}G9@wk>e#ab@LG3O993dv3D zV(Y*jxH4xZjz*8fdBzMm36pRsJqp+6##uQLlNULaJel#w6r7(u1LspXmKNg|6JMNR zoN+lT8o#W{z`4vQWT#E%Tpwd_hQH@n>{uL*)~}21b!y=4a-2`lDYun}2w{EI zBkU~?E>H-?IIeI$#$djj%RG!RNon?-hg;)iMOb|zzU(D0T-+BP`Q5Gg%>xSLvtpUo z!$UB=U0bAo@ByYZYJ`~$8({(SAYXRwfkjO@##e_Av7TdP4UMRbPJY1{Q2QCYUa}NI z8GCps{!siS12P~3G9UvoAOkY+fEjS+F}I)7L-@48YuJ}E3&+z_aDIL!ZZ2Ddb$vfV zXa5ptZ1$@v76$Kyi6I9y4dh@TQC;=7@}u%vTiTw{E3V&*XRhfl(J z#tG-*S!2aq$CdP%_-PLF8cUNoUT*@fE=s_yrKz})6^jeArs6DPkDOT(nd_L03(Q}f z=B<#~vIACk>Vc(A+hIf7?%3A87baA%gLWnS@o|kO@f`c%eVGSQ zPrAO__$Pn2p}$SOWk3dGKn7$$27Yb8lQl=3>pqP`bCPj(ZW@o=~&XUGv4#@ z#7E^ru)0S(T;-gCC*wvj1{lpaWGs6!Cg5@kd%s72ie=rJa@?xkxW*XaQtA|BGiJEJ z{KF;26&D#toMVspDHE?Sj<}F99p^J<0u?uq| z*?jC#_H~@*?I%oLgYk)VKhCXwl`+j(=1x+YyoC=!1JN`d(5HE48;LA&AW81_bh-%dY2_0KwZjTQz|HGb$W#7g}ufBojLL=B8o(Dx;T~UBb zVa{V-lH>RmVSXexd(izjW>!F0ICCJy;OkccWjJ0|Ilq#4nCq2Uj}^|IkaDc)s?C_D z8T&onf4mMN-)W66Kl%bIyMBUY?R(ReMjbkx+b4=KmD~4e&$F9wupNu1MQ*bFW5lcVnj8*}K zG4lDxv2$1-{KUGa3(Q5Foi(0u!8l~ckKy_R>>1q$-wgj4t9rG@nK-NRmevXej&)Tdr?D;qzJqkw{ha8$VoVk-|_K7ea zVJvexhA{|Zk8`GGi@B9E>>0V75{KBvZ=yq}FWxU7ihfT#%GhH%&ZH*bIOi)o!~XS) z%(a*W>lWhMDI+nf^*cyx{1#(^_E_7sJJ$6dj9EQ;p;EyD2xQ#hYsSlEzQZSf0l2v` zA5y#o!pm~L5RRD@!afjRKVOc?TND-88&aBM^i~K7MTMXsg!=fPl$!^F_?R*-o~V|; z2%4686qA~=Kcssf&SBCQt3Mfln0MQt>m!e&<-=7`p5tk7kfNnzun|R%yXP!e@QlDnBy}>VgL9+xX2#$Gcl~a;y766IKJ=Mc#}6_{J|W@ z#nfnAWY2f&I|8QGGn- zQwSk>oe;?0kb+Lmj4wFuZg@E7OXs*)x8sip_J-umn;SkpMG$UckMIbTVU1Q<&Jj{6 zBn*{9!cpGWAJu~+@K~u3RPzf$jbg0Ta?OuN^17pjM`1iyA{cK!S`!tD`Kku%0qeW^ zC+tV`H|YPN49I{C$bbyUz+W+7dJX(Jx5ePj?QneA0({RoIF2TByxg>z7*yv`%xF{> zN8%^q)~YO=Vmxrs^nI{*;~e`v&NBC5;*TpCk=Xb}clL5H2g2Nk$yHor?UjisPR5VL zCHA4;i7y=T9slY&6L*;VnE1sk=b7iY!q;_V>Im!{@`;uAxRgA@ia)ZM4>5U=E9tQ~ zI+?F&c03ME7{$3kN}^|22)YLNV{zvWxH^w>mvD}dON&x)g*_mr7;7DyF&>xWBe8eD zXIS2>DNc8%`I8WBZ{peEyz8vem} z(k~P>iU*^LParB44`j_(K{(}79oAnltovwRCj&Ad12P~3G9Uy08wPT5&WVB?d$#q9 z&$8|+4F{5Aa4>!a-K2NxdhgVCB^;fLak%uE`rr6W z>3!1sBm*)a12P~3G9UwgZlE&f?_M%-G;)^C!wJ?bnK{Y#jQ9*OZ@q|vQ-|YB+6-J{ z{Bi5cxj4lhkCTi8F3e?qB$YXdH1>g{PQZ6#KeOttu5nJm73@7X`4Fpy>UJHKRe$ww z#2_Z_FtLq2{xJRJCf{LV5L0ipi@hmJy0ye<&Yx~#5_5gF=^0_In3*Hp)MNcLD-sFy zU&FvhD&T$pk{H5%^plKFF0;S>9Q#{Nb3KRmIUUVj_ZiHwOy?NCLkD1fi^ez|%khOX zVzFb$XV}ocFE$Jxj#n8!l*;FhV9t+jYOqWXh{=PPdDBfTR#A@4Yhn<0cQ<&rxxgiF z9(Zt!-cqG}5y&_wFgzGR5sW`dbKb)6Al7mPp){YfEPK|=vo@<*xyq;*Toz>mB2X@% zj1}AXbN-RSg$u*Pi}L*Ep0$0nePloeWIzUFKn7&s{xe{{PdCT1&OHC3&AZ56HV;RW zqS#9wgKH@>F|Wnj*u%NSZ?I132FHoIx-uQVd^I0A%zs>77>}P8#oeW zYSbq#jKO;E|Z2_-;afYwTQ8E47(@AU~zE{>iGlVt(Xy|Ayna>0kd>F^Rd4 z$(xw?!#uC)V>h){Cf8x&4wLIRK4Ua)&PlL(K@#7ohp&h9#$o1UjxZ;4nEffonSVLW zIoGeU7i2EutSK)&gP~76hMt_mWZ$@X5L*)S{_NJShiK)4Y2;u#BpRy+R5z0EOuwdp;f>FLwMbxNW8|5lJi~#0C`~ytA z7Ux}OOjD{ zu8xc!f{pB{xXK=oGm&FizcdxccI_yWb#9Gek3WL>j7Llylbyivff=Xd@VQPi-a5`XMa*L2 zoEzye*!o!yTuz9@si-NOhcN>w{dysyfE$W2kK*G~7-8%q4`2_uKhHx;m$Sy@HMxzl z<;rke-Vlz-TMUH?aUKzl!yC@a5sWKL{82iXWA`%lD9yZwl?!2yNHEv^Ie&Aab+!+T>op=+D6(&G9UvoAOkWW12S-b8Su!%xju5|M&oCm!hr?ztUifL z9LLry+XsAzLlXz%N(y@{7?Yf1j9}&*KRZ7LzigU^Lm5-BCt(y0vi9oiylCv3HiUBy z_QMtCC9d)K{Q_&F_K)h1t30m1kZ9&QpJv4!r+7SXdc@6Q`Zmn5z3JsJ`3!T})Kr

1uJhO(H3wgtGG*V~Zu2#oI_IW*F<{kz?|5w9 zrO};R>*|G-x_1R>?i`*6LZk0o-hr8%4BQFh)E@ZjJb0`+Gm+S3&^YzNOy9CYANjQ! zPCxM({sn}?dk-FI^n*wD6uGpUp4`DvdX>Q}Qt=zP^ zirw8uyB97-J3ocZ>zo?3>!RO(UQ+-3vW%KAWzzB~GlhKy0(`wV-KcR9-`aLm(^me} zxNTs5tq}8?I}ETPz*nE++YsF!_E*<{&$pp!R;n(axm&2_?&~kb3ey+&)BN!rv}jsu z{o^|yX-Nq(TLojTDf38x zuBQxFPW(V+@Ae}(ZL(%CvNw6*d5xQvp|Eu<@QrS*16wC)?8LJg_EW6t1;?uIqIk^> zNYLUHY1+gRlpRl>X%#p(i|+BnoAwjLF^i@UfQAro|Cz>uf8+0yUdrt;4_{~;n)*2G z4C4?iCxCyG!M*^t4o>1ajhFp&&TP&CaBmTua5+Y*Rp8$`IN=s>ZwJ?1U|u-*7s2f) z7YJI_)~HO>qe`& z?|zl^U#zkl53%EQld4u-3QKe`L93E&DfWOqG$CZV2xre@2r`bL3z$RvD-HuRJoLoiWdP}J(0Ak{0jb>2?cy-V;?CnI z^j*p&4L%gEQ*=0zV1IE*WM~0{w)Z+dk^R@0Fm~cB4cxLri#Kjl;KuDt;zW`~v!86O zNG5fH8EsyxC2Mx-01$Y1i2iotdk83{TW&a-|NZUhY-Z z%^`K3>eLeG>*TNuf{$zSSnZtaZ1UhSeoA#N^ISxzx_LL*>~TZBfM;ERu|C)OfM)$G zH@Vv3J^<7gAanqcpRxgFL;D!OY?Q|Vj%_QnecYJO*_f}cMDTJ!RkGBlv;QGQC$a(R=2@p$io?p8+MY4R`$`{nQQb6 z8gmcsc8{u=SD^N<9EpEZ?lIT4ASh73`Ld+`_NkYuuHVO7ba$sI(W+xtni5^q3^LfnFtJr@H8xB{ z_iOA_#jPA7=-UV)2+mn+qE?;yY#AnOKJ$`3sZd5$%hpit^($I2rL_k3s;9qw>7)6h zJLvfSzS@D@k#pmwuH@yYa4pmoQ@5+dTWJ%lX3DY)nlK|>xiNLwgt|bZ#wM!oDoEf~rhO;GXzq-onw^@bWi*ec zqW}*_<`|7!G7{By7_x$^QT|wiz{G(xX$Iiv8*uNL2Eq#m-eWB|+;AY+I2ddk0zVw` z_?1RHd98p^{PFb!kZ>Z5a59W=2DfK{iu3Tj1X49G<^N?FjBpJfuLlt~frQ&QJ3-1Y zhb2-`bAJry2qy*o@DxaS352}OxevPDeN1di?pvKW2|6aeRai1hdAMEWmh>4c@gx50 z9lPs)FWmm1A$G{mfOzR3qM_t`V}nku>_SP4iEyE$?c;M$GT7KBpOc+SJFsgwC3CTW zB`S>JzRa*dXN0kMG(+fq0V>vXr2c1tt7YQGJB+g&>tAmC1b(@8yT0x?M~!QTIlk6< z4Ytc`>S~qQmY^~dDSR5SzqFof9LSm=ZP~13hLFBJ;WQ(TDTqc-&^~^W5u8Z7zSZIo zxcSCMnz8!6ew=hk-D#H0oPSmE*{_^2Yio=+4cZTB5Ken!+<9gm-dzSfZ0#nmQmBnlq6WNTeR+k~LEp02<4QYH)uBtGgPWEqX3h~O3<4doYhNOc zNXKwdNH&e7ol{A|;7ZaD_1GP+B5eYhM_}?3GWs4l4Iy155wtYINbPFqX{c$4YFRfP zkV_9f{(^M={)g7<PuK7zKjHkdG6GE_s-m{0N^niP5)Y>h$*WR;wV? zx6GLwd7rzY3Yi4lal10Dl!_p$PnMlas&byK5$D(%ah`RUL}b^YIKw5Tw)OJwTP!)s)RqNS-tQs{nO6m)8+RwfLw+(5H$Ty{Ty{6VJ3)e%uu=gHf!pFOo7Qb6j3)&H~vzwtxc5C0>NN8wN1@!Py8n&%_H^NB? zT&~E~i*@DdH7qC@tgJhwQ!K8^hS?{j#OrI%YWnkMMb(g4wGO@et4(KSsycQ?Q>0_k z+NC8nZPijuD4`oRrG#$MRP`HM8Esl(BYGx=oQ>EJ)6X$vX!sXl@rBPrHmA=BfO850QKMwkloL593x>m8jfXh249qSYVP;j?L56 zqa&0X)kkr=u>R+f;fZWC0!-RQH9KzM1x=ZCOe>dc(a=%HG-M5;_=ZSLnTEE%G+DzC zekT}X9Ed_(X7H^C8UT0f2WC3$eQukv$Z;!jwJqO0?mSm7@Y7bm_69p`OLwpPFV*+a zbIwckgHsNA{8~fp0G}hk(lPMKahw3qauPN4Pax=Yuwxb<&jdMVb6vo7A!rx`r(DU| z$l1!-2|h)Fs0TsQgx9Z>#5Ij`1~k0{*Sv)``TX5GJ>_{<=(c3gbxBNl%S-8Z{!JS)9$WEm5s7(mCaMW%&IO^Mr^V75jQ)b--fM<4BT#B2n&Ck<0TXoRUA>?FI3d615=_{hA@DbD{2zb3aJjzi zI9+wC(Yd9WT)xFJmE6pfKxm@MEM^U-|8^&NoU)x^z5);p3X3GoCwH(}tu*Ij!yTp}G7wyXzu% zSr;ZY>$&FcCS+w_t~zAgQ5)1pYmT-8Ppuqm0+u$Ue5?<)+H2fi^R;+=8%Fpr{JO|vx(j`RLxSU<2V+Q5zM#6sqCaRD#du4mEsoC zWPH=Z%5Zq8J83Az9EI|@iZS8j4x*ZW&mBHm;MhftJs7Cu5I-d!9I3>F{cNB+tzs;DGKMYR3!rrDHwj!`Pc5=x>>V^uq&baP!$<43u9A=N-()z^3W-jI&)Q} zX|9)J;f4KM%W|#2zug;+(K~|$7Gx_|&LqqVJU3h0rkhgB0-R2z)F{v&eH-G~-yug+|G`L3Dm(?&km%yz{s>^-8$BwF2xk~yP zWA2Ozy+Bj;pkgY{JG+vM!_68#Wf;@o{nT?1$ci-4>&KC_^rosR`d`gzt@V)B^wVe0 z0auEfA@%SIu4V$Ab7hTgTv|j~9)Ks1^(uFEYwl1VUC+zY)x0ap%e$;$7qTy~Ipl(p zc}wa$c%;57T3+82D5igW@q_vd{E;m48RIXyZ?Ik)N8jgqu>I zH)&42PA9qns9FzHty8awzAk_fytktk#IR=w;k4<)H|hm` zO@9S5JO5N8r)O&1j1&z)cx=2pitznNjU9bJljj}9baY>R@D%i+&DNi5f5TG5-TpYD z`f}}s%Fz?UW^Z_?U3+kB3t#s;Y~;fcZkzeK!cDtUv-jfKoonw0FVu_E@8K);p(^e7 z=#>VbF%AY}2T|n?p??37GmP(X6lXm5Ssg!%vyc-6wyx&73HE9lW+-^O7YvO8L#@w~ z49=bcW3ynU7r6ft_gzQRy#402?sI*Dw)qxq^C|!S8|2GoWD}X1^j61VtCP>YQze=d z9|L8MF~-de?|Ob6&qj>=?I?f!s|#bF8;btC1aFG5)Q@Z%sP%FtIgc6s+CEX|F*mE} zUC3+q|74)+dcblV9r)dDAo^=38geNf9iaC&OO~nh(77sGuB*JJZN&M+j0t6a;oj3+ zG?ze-moD)AiyJlI$Fmozi2oE-_nD(6^$)7_h|MZTN^M!zMwMmsqWq98YEXBF)ABI@ zHtV5(i^J;FZ69>?i37Sp2MEPB^!;s+k=Srf2)gIy$C?&&kH*h+^&6b69s{$Sbd2qB z_eleKtxJ^rA7<3Y8SGk&PzJ-I2SMmr+pnm1c#b;aGi^)zv=va>nxeBM4T@$!u$kx@ z8Lcwtg-+F>IIRl+)L;R#t>&!0CsTb0+^_%+(?yNa4&-$1e?n!MBPn-^jpu-GX(kOy zojAwI0(?nvF>`bRk&GcYH5P18@hA+@n0DO(U!$z1eHO*CSd3%9TO4PQLuuoZ^$kgV z0}icGT5xkE92lW4mDAJu#4aN^mAX~ft7b?wh^xo0^I8!$l+?meL6lcWt38WWWhs(bgg z=*Crc_1y{9{X09geqI}0D#=2=yH@NIm-Yr&HBaUAlE;O(UmsC;3xk`nPYVc5VIC8j+wy%Qk9G$EXPtUcQYP zuK(UWTcd?+DYye zyQxt5z6hfWbRuQ8t|Sc5{cZKtD+QYwrV-zJFXa!397_4U_3b+?h`vikCnG^C!q}a- zo><3K8Zt48-r*6oy!ViGp8zl>r@jpM4*+xrGTPSyX|TG8K^cP|_5GXU;>mz+25 z@4|CB-DYzPAl%_L;Q(B1EmnJ;-w6QjeE$WOf)}h&C1@O>pc_Eki|?r?gtrGIw=cJc z0LCV&PUcJppr<3K&Igp20mke2-h&Nv0pe&*?5kHg4(O(FvH;w_T>x<}bFOf%fx`6n{c0PKW|7I#Ra;zRoemG8>+?&zbZ_vR(O_rBU+f2 z;Bej!0|%W`y=h0_fP^XIdoGiPF$B0V$Sr}AP!iLnR}y7{b>d^0Gs2izEQ|#aXsg8? zofXx9+s1W^;ZiDg2*~BQA3ClA%usfV*{Z}HE%D9{R#x&V^7q4)b0%B|qmSqqMeLf5 z!Ai@_V%Y5@UHM}QgCcF;wO1R1L!1Dw6}XTV2dz@@&InxPN!o{zEDDq60d6NG9(Pm; z+l`Qf_L{;;%RHx4_;ljQGfD*3lh0&m>72P*IE`7G%60XxLf-nSP$_*~xSam=O;P>x z)9>~54<%Kcp|Emw+snJ>I8~guTqUNkXKeE!6~mqEi37ew65N=dMcGvLSJJR6$0^U- zRE6|hVlcR(PE&u-9M|K1UwCxg^OsZy=&hTbqkwwg zci&oPFRMN)Sp31ac3pcQLRMC<_RV3e7Gpw(J#W1xO#cy!P!IJSFjW1196=hx2=zf) z_;KPyHEQFhg2g=9gmE6{rmmDguQimR%g1t9om`Qu|2bA z&rH3gv=ocGyDOdm3GVKakN^SNQo||k?gR)S3Bf(Y14#%D#jTVI74F}8KMTlozI`0u zA5YhMl{9(Zb6wAMoAmA17vA=iZr!_EyzPq3(7BUzO6h2rn@pl$hjxjuH%Z#Ip#rXT zYuMXH{OS0f7@dNBagmlXdu7ekj#9oiRW6h*lD)Y(a^VJ*KF%TH8QhuGMVteBN<*&! z@}cKAxp_KW?i}brPr4y|ZrPdKcp_o9e~`9p==;Mi4G3*}{0rlF&P$)wLUssArh{STAdCVnb?nX28Z!-FmA53q zrodk9!>LU`JHXu(%mqCrb4=#>nH~9Ins$M{9UnfCWR8QmBjX#wSDa@;;|bq!gus(n zGmyuNRO+&}K;3OnHwVdEz;QpO$YE%E4C)qgEW}PI=2(WTtpKi-tZD#T1AJ?d!xy;y z9Lo2&|31+D4)~fxQNsMy7oN(gqNlQhaMmEs|Er|pIdHR{je@qZ>E83-fqRhvz6Dn8 zi!#N4RnH7qryBk$XO+R*%!3-;G7qlPo6jbyvVS#p?H~SU?ox5;ltDkVzVhK`YsJ~E ztNi_=XLWmDQ5cLV@(i~$aQUxKXYkz{C4NZ^h#ojk9KT!zZcD`{uNb4@q=ckzfs@73 zviSyy3tdm2$vkNl$9T=D<+5n+uNH2{smPt5tIN{4bGJQVs>wI<$=v&t*4*MVeU;uS zwbHw5xpYk_l+GRYF)(_g3?H*bzF2gaYPd34ytQ0DqmN4u8fSH3x1LgaLpom5Tps$Q z;Uy%oG*hQFM-{os+BkgMSXML_4vpl5UcAM+ZiH?S-}D%`-Lp%vXeOu@G7lMaR+5Jl ziBArr`yhxrJ8rkqDse5wWhh4Eo}}d$Lf7?}hX46&6X8+97qUgN&}w2Lr0}%eUu!?9>mn7IWz&wthlRZ3EhOLkgXk|nu) zd*=1Fm-ei7tPbrg__hMR@d<6EnS-l1HSw0BGw0-sk@1vHPM6*5=8^zcDox!(XtdK# zyn?!jQ(!lmnD!C(u+eh$_-MJG-%chSTqJK@|3!SS{~)0^Y4v*lN9l!loJ6c?E=c-x z-#r;Txm*U0Jt95&=E$H?`I0$duOyL#7ea)q4Fb3OGiPB4k*%Qsb10A^?)@NR0Boh1bcaB06kivwH1wwd?oH*)^_%jZ(Ev!CLTrp@2VCzP_Z=cKrD9vX8`j z^VFC0Z17+@rSf9)9AgGg*1K)$7_OMM?o%`4GlOpJ&}Xq;jpRCh*E5N#(8H8QzUh#7qHU^;4^yb5q-NPFscA%`mV{kCE!y{x z8@LauvFr|zhp;7?l%bwddgxQRbOvJA=E&u0UAc1nc#iDYo`+9d&2U$2L@2y#FZM)s zfvn%MT~@5zAal9m&YCq(wxXT)9y$=2k-71MRSZGU)bla3J zl0>8{xodanh)fNMZ7p5ex8#>evjgU8rB5C%9ii^P;Ui`6=ut$Q#!&w;Rz|0%a!i+0 zByZ}3@z8jZOq?=>oTf~3JAJ|=$^7IKnfNjHLF%!5`%=@#N-ESJm5MbnI+Zm>hL0MF zg*IFU4I3i8`y-Y6^px)1dq~%=T@9@}A(c})Vo!8Pkq#*xB=H5Y+euPlk|bhPv?U@J z&;L(!LL0gf1;{^NYaopp*-LzwCmWL>dB3Tjc!jnTk6k@!W8~Vd zMCp8Lk2FRi`+fbLgx~(&urUQIU;xCP4YAi&Kcd9rDg)%M^M}4EH4I(6%J%UpUy@Qh zyCOdPrA*<;y>OF~S%?j5hr(6uI%LTG=m!}Ltp~6)#@3z051rke0;RQQzP58sys6VE zwLSH>w0UI|h#qe|=A3o&JBj1xYH{m3B75IS8t*+4DXyK3MsnVG*uC#%1P~vAt{x7& zM*#Oxco?IBcN!}lkY{K@7yzFPz&~P5K}CPTng+mU5VZRWaL?mh6T=oM*n##+?puqm zv7TSTX4Vd1oy$>^V~c=y6;_5?99l%6R?VYE&t09y2zw#bO119r~^N)MU1ptwgW8 z&oKMhMBE*_EHc0R%Ix{_{*X`QwXt8y%QL@v&g+~!-u7paziWl)@8;k@cNj0eu_MH5 zakjXv$rDesmHWm+(z<_^jGcT_(#BtrF%vG~y`7hl<13_7x1ACbwt^{wRkHMey2&qq zJ#RO#-cEdU?e~nVc_5Q#+?Di6*Jae`OEReUS%z+$kxs47&_9f1?-qp;I&7(=5CrPT zXD&q-)qvGq$y;PKt1d-p*uXxU_8x0f?5H!R|rmBmcSLo zSQ=E-52BWI*cl0*ampH6tbj&RyCW6d*tolqVXH=lww`yUQpSP$Nhi`FG+<}XR6Lc} zb_!~Ob#?^+Iv+6S9T!{5uI%X^_HIFyOvsrAs5{Atf;1ADHX*Bb%f+hQm>M~l8oM~= zO2PgUq%)8r!Dc9b{}CF~G0+SsuiLmoHmuts3l}YuuVyZi-T8ROh2-V3j<5;{_$jap z%g)Ftz+6P4R3QdNF_O9nNS6TrV`Y`b;3z}Ip02$pRmkiz)a^Aa)K3;Jmfyefs)2O< zMlLYJgV>WA9iC$69VH%-?Zp?F9h5vs0ure{Y0*!-M|>sy9`T*VM(POfP~H^TsT$i0WsV%nGN z)Z(R8hfY+LYoIKd0?uS<(>_HKQ##R6r>nH@+?By33G#7zPdU7MqKuk2SbFvw2&_lQ z(2-+gB(NSi7LOx64d|xHm^7f9#_ch{o8u^sqxC#>4C9bfc|1+hf%F)aybP* zoHcaBC>b(*xRKZW@L78G?;}0%k-IYAqN~blq_u*&1AazQyACV`bUWmAk|ecBlGaon zv?L)n0dFHJjwT$<+ek=w3vu=c6$cll+Xc6gfT#|DI$7NCkehn3rOc{q(Og8CC3$xm&gsefO@&eKJz?Zkn@*r z%31z6RT%iUaFwR;{Gp_g3v`PuZ#jM=VG8i;q+N_gx7&|IoR7ls7>Q#t0zw-h&%ZW=HH=HaP-s0A$vp(g zt;b=cs|_VpZKRT$l?t)baG%F=%)s{;j|Vc5+q#kX7zsY*8O1;4_Gdi)C6as^>5 z*R1F5Fq-Sx%$-l$BK9N}l&@TuKS2Yp=3~UK<3#Zzyyu;LQask~l};lM$&6)>7}@&3 zRIO%wa#O~CaYJUUzr)b5^D=Zou8jQnm@LTqPBIq&Wg8{43HFUsGSAz|MRCg$nYR3~ zOqu&YCQZM?`&^gdLoZ7Ac2&~34ILd@os!tu*@nm+A#gGuxON=d@}X;kTsBD*hRT{C zr4c=7OmdWl_d_+ZL|SPuAI2b-KeE{u$>(>XM%quL=mKkb(18M8mXwMH8d`U$mP|w zatireTv;O}XKJOihSDrlY8er=Gv_bKEdmz3CQv5$uZB{;nVYem8#M96eD#p`?YtSI z8zN4jN#Y!qB(71N$vB9U9wf31!eko27q>sv|GkLTcOwI;3x;MVip;cSk#+^>LcmBP zuPun~MW4ms$KOyWj|qm#Au6Mh)4`|Dab7DCrZy`aSftY8)@nL!^EO1w zNUd$zwym@!f|iJz+#VXXLRu%ZOp-MVMncnp(!1XPr0y`tJW_^@9*y~-QX0A{iB(dk zjyBHm7^pjj$I_s7s!D96cA6f?A)hmNY+O3>JB`;t^D!f2@Cf8HYXBS5euL?mG@zgK z?A;s3xf_waE=)K|k)-5gY1aWNC$*QhZQDpvTQxjdGZ>nmy?JX%APqPkB1bk)l<=1A zBs`(LL@)s_I5t@VB2vUNtP?$Ld9RMc=(CtCBlj+ncdz~gk-wMV>yIVk&W{rI&CfK! z`#}zKDZI%Z@;blVE0FgJ`^Ag6fJ);F953>PIL|)#0y*2YNavbM*KoY9$rUb}i=p;F z=sQel3^#`&od@AG59W3sj=gAgpluygGHcDAcJWOh$1R?)dFva7a83)NzVen|yD1OFFh4Np9^KQc-v0ej|%7b~dKmYnb%#i*(YXH{G0RGhh zck#_3bbm~d%mLu~ZDsagwg^K}*29Pj4tw;o3`bq-QB&kb!R(RTHmP#3S<^St;q?TR zwx)2*fzRtu(g#t|Ww5x4^KigA5$< z?;i9ECL1TijA1fhRvcT!6>4r6C|hoczQE#f9edT>uz37iZW|tFDRb+YmUgHm!(&t3 zVfu;x-DY>byq-Cm$oC-eCp|;$XOG3Zq@Ku-Mode=#a~C%>}IKg#sg-^rIt9?7R)Q9k_fP3hO`th7r$ zB(1Oj)Us#?bJb|hY|H0iTq{0!R@IZHquw^@s+t-c$p%xBaxkl#6z!iZ7fx?S2j^m7ei z5h0iJWM}p=`7gIdvTa)yy12q5tL@o$2>rWPwr9~X1zo(BAmH+4Yh>fP?WRqE=1&|s zRV>G_sE?z0PnMo$->QMV8Wvg@(yD2pR4zpu7gw;*$;GEF0$0{vkP6~z6=>tCOIPK= z_fMn;(D~n28_5UFyf8E%G5WYcGaouZ21o-(fBDcY7D9(f0ttS)FCEPOcEIgN(uX~+ zwvW=LQQDtH2aKlxh|YX@J0qPs@#RhCOWzLd+?rgMcqCc``4}NJIMB%9P_70+B=@y! z`~g+{)O96xkc75YL2GR5meh3tu9nSNoXX!%J zrgz`IP;!6_A|FD@ITQn8#F$Y==Z;cSL-ntcm;d3^^mG|JAp=7rL(<2O3agsu`8(@h)$yGvm7V7YXtr?gnNN9<9- zK35-0Fhh1D9{ePoE`BTf`ISCoD{=+)USV5!iI4v!gvdoc`WFx#7x?v_H|v(vUe-mw zaw09K$tA2hcTH;e8Z3vMeNe#4URA|<9KaT*AIDzU89GB*XU8Y(Y7O!kJVaQ$~Rd*esxcJB#`%nj(=jd)=%oR02Lx`*EX?7X`kVRLtg-2+bd=DZh- z?u`jQ5MB>~&8g_;>1gGRYEQ%7BG_97cU2=_01a|M3?oEqy8{h?6B2Ud1Xl z+W0ra)r~H;l8j$4*c9@r>ue@>+9-o(n#2p^9vdI|#dD48QHNxM-@2QIyxT4EYA!OC z@w15yTeq94wmN&F-VE}SyG<6~_>tmI7rwx0*^>6r1zB_OCs}ip#>NL}dAIvVnY#25 ziuOKjk{AC7n|bN*m&D zDtp`E5~~?u@+mMMw2DgW*kU=?3akiYMgU*H8;%(fh+`bU^5+ZhO9GY`ip!5y4n4-6 zAv={W^>fMAqdT-)DH#<8yui1Rj0%nIsq8&&$zErAy=ZNQj(auP!&JXH>_z&r?3q1m zM?#q0PM}M2nC(tteLH|LbMrJ=?DVEMVLTddOe5)giTYp?9i-Y9YHzmWH% zy=20dpGj%i86++(&hu$mp1lV+GecqX4q3Biv#dq_=I-8$%smZUF&)aQfNFdSh(oHj~Q0rD6?oQiponvqUr80X{0$yhxfmto}aC?Ks; zc{pZ;ni)e!BZWtfl71v!^v6x^I|u+Hg*$fZE^Ah-;}23Prca znUK&*65^@ph$G`To>s#+;E{9;jYvqAus9Ihau9vxCrLmGB)Y)fFY_GVfR?q-tcYsT zid6VkB77@>Zw(19pL0!A7!G4;{n{X4tTh>ZSZYUf;JT_-L~H(p@c=j)F&znR!>JMv zW9JhL*n=;C-}ASm!j)0Djt6rb0Brl< zUUX-5=Gxu)7UL0F$@tM7ZeoY9^w<^)rX7BC6005ONq2}V-XOlHF-B5NlGqTm(fc^I zWhDXc_V-xWHYtF+Gf>u4yBP@KRe*Ots}QrIgkvcHKFztN&}p*9Rn|RVTy-9!0#5Zj zenVa^DMx_<~ah-zZ< zsO4aoSLkDwN1>T?mUga-KI*?^IoL1IzFuFpL*Z>>L-pu0aL=clgq??x&41P5V1J!5 z8&7$p`1biiVn4~1&lY?m8%e@mdrV~Y5e4^CSq7x%W)az2LuPW;kFvA?STBayHsaCnRh&c^JpACyJ@?Amhzhqj@J)7^_jt!jdp8 z7|6p=YeIXX+LH-quWUvjH>1&mZH~4eJT7+GaGBB=+boXTj*9KJ6SPz+l6G0^in zi@45}Ro5E3qKx}gKo_yfxNeo7y#S}L%2_O_hY04DeFw{{?>NBdAZgIlR~l*{$~i*b zcrRS~p^b(rqxpjMgUh{Hoo`$Ag!b^#eqP$?RN35~l?b2P@MUkswbkS)a$VJGkZ8nt z80syQe_vgSpbEyD69^38dK1>Jjf{&72$JX+*qo36+u(CF6~58Y5)~CAkc8$rQ)=;w8743N1lWxt98Xn=z*osXFwmsE#i6DU}FXk8#Vj|vqy~` z4X+W;YGvpVR*z0gH`c~Ty>Cn!f$Y&TWTZy?VDyl|(uV}Oo_+gCH{Lt3Lwgd1tEoab z2dD9Yuw1J6z;4dVmWT*`KKQJ?yW--tdjnk@qFPE=6ee;^dkKx}CXx7m2_x4^@<*G+ zr|)+0-NB4gWOCT`@5Gy2jOky~7M5T9jk^}3uiQi)^P#`UhyMK6Un7xWG=IEWUHo#@ zny5yoRN>8?W|w$|bi_(_L>255FR(lM6bnL4gP~Xx1EKT)sM-gDc4POGjA5)JeRKv| z0$Wj~bQE+ByLelI`CZL*649teHkUpLFOXt1Pzx_eRajw}I zX^(y&sHaA?niX29heYOTpu--miDwwqn9yyI@QIkvAGEqo6oJb`i?8X+d+i&3kVkBX zajbEx<2aAQw~6JK68rUIiPI3{4Hn0ELXB~R9pk}v{B8PrgK^c<(|`O)wt(e>U|Cy2 z6yse~u*watf1%WbJUdn`>pG90yZMWp*!Qb^bm*SJ^+%R=-gnUQFMjJQTP4n#WnoJ5 zUQ)$8e*Ab*4gH0I?+eh@Q~0Wx{E^;o8tBv&mgw_M!HJDR+=8{D+=8`&xenl#(V_2D zcb_5lPD^g1f;0j8+1Ob!2h4ECzuFMTe2;PipYWm5ee7Xbob`ijCS7IS3Ch|HvBeO3 z`QE3pB<~klu#?=yT*@Dn*h~1&OM14LM-|_7f_sws&t!4@DwE)KyNL`B!Wm0aPQ&Y# zYGz;|C-B|Z4hC_`YNUnM=7#Z64M9f-b1exZu;;I42KvnhE(D&ekycAiO2RsF=JFXf zcN|v3G8b6whKb>Ff_{lG+Vo7M|Cd(fnVM!S6(_C8+s`7fr`Z>F`Do`H%#3WZl+n+& zFxr00Q93~#p@*WLAD2d1#j;>ax}4bALn@C>XKq(6U9R#aKX)UITE66KI#paI%$MKI zm?QsSzuh3*Tk?rDS{Stdmam!%nR6CfnF|yfv1$mFuJtrESVTqPTfgfQ=*SyGnXk^%sNk;`U;lwC3eU+ zX|CG9F-+cW93U}E_sM94(jXeKD64z1y25UwrQvi3tY+;nrelQK zaMTWB+IB~4(wp-)(|YI_Wwq8&Bl03^VK#C)5NA2?^jSumR!hL~Qm(O=WnA#+!4m53 zEn&*(NLoO^>WBzdbR?bXqd1R{$jC^EGLI?4;WxTFfz`Zu3u7jox63B zZasP!JGf8(ellS2Kp8xAFj{+rj2JmwMxdETYeoll^KcCoVrFQD$1rsGAPkK`Xz2mu z_Vpb!fP&Bd(xX=oqo zFjX;g_DX`lbZ(-rky$PC{!Y&rid} zN{7K2yjMEh&(QVl_cETaT?Ppk+KtDIb9hWL2K-h<--qXSHSU)xX*kWl)dGX0`BiKb zZ0a}TQDHIsgoS!=Q~UQ)AIX1<0^v&Vi$XbcfU=zr>zIGZ)=#fdH3(6Qv~9-+Y-gx+{c z45e2efzXFUR$zWC;|jH8&#$sL?^jXhS=IDXCATi}>-2UVxz!?3YQK=%UJH3$<}CKl zv*?)ytK0IOH;EYf-RCc=-iPT)0b{glO{lV(k5jOEAAF?z_}*(GhBr*`Jc*gSG)w&Q zOU3&nxyU-D| z4pqOycIz>5V7{i^RyfVkmO>o6EhJ`aIW1Y6`_kobsC<28lkC{GPWld;h41m1_>Y(; z|2=(yl?yZOl`n8Y;)7+*;>DEj9mf60ht_*#%a)z8VLcNf7q3QLuajLn_b^M4CIF(_7WbXs%}(uMa_8=AUuT{uRMF6+ZT*N zFXN~xTWx8L9o@KhUxrVgiOP1D2KG20o}Gy8Jdz=|9#X2y&?SUX7aWgdzSt=&(+iT# zc`N+U*7&2^IYe8|X}7iJga!03WvOa<4^he&L7Ge$#11ASBUpDmWJ()a^ZylaqFnsh z@CQ%97;tj~YLOBe7A2wKVG8_;Er66qDb?QXyk3~#U+o7r1F@45D$^7^e2?*oop$%G8G&7c> z6S$ag9u+TP;jt1DmLS35EhH!cSSO}2-fQe;X`Z@{S+`8}Krnirdm!GxCk}OelaKa! zE^mgw{K6{vg_U6)l_Eb%$vZ412eFJlatYhVa-!VjTmqHO<*4W~T}YKuo?pzdh*gYy z=?*QG(i(p22W5NUVQ5cv9edt}m_Y)8zi7U0k&rrsl7SHZeYF$)NfYs{xh5XW;~mEb zU@Wg0i~Fp;hxSYx3ysI=Iiwzsx*iXy$3y9i$4`v9*2Ikd7|`8G+|WRyAvOP2OFlFS z_$k^!FP3A}#k+h!xJsPIcR|UAatuAk72`Y}%-MU$u)D}G*7^JVJom6SABtzyeQ~XP zfc&~EPNzAZBR+z%U-^TTC#^*+C%|!LA*wo4&;E1*9esq8Lp-F%V;oOWWvH2VH4orA zmhOrJkLACi^`!swreou*_@HURYodZ*ys$!+(o9HcZIM~c5laIrXN`$rfm&}`pjJU{ zJw;s-OHQj?x9(GTTcG|e&<&_}S)e{}n74Y7!*S<<1?&HL2}{g##7g;M@jcl_$<3xy z3TnchCy~=f)c{dgKYa#kpbUNum;v-s1vJOZWt`M|j_pY*vVZp+(~I(dk&Nj?09O=9 zrgpk^)-SwCWL9bR>`NcP=STD7w7xp%9Qko9KR&BIBt`r1+4ZiZ(vBwGH2B8mP&uuQ)if{8N?;}~$c!NS0ua3i8J&lGCdFH=XnSmFJ4VAe zf@iypy0ATH=4rQ?(Ouh#pzbM^sFKSvm1Yb5#;sx~r>8`rRV2k9|- zIBCwzVBk`{devsxxN)1TqZnm5NM0~+Ifh4p>0Eh?`FO>c8pq1YnK~PLou=4CV@-?arri(C2G-6l`vUOjqMz#8!j~{<8 zpD$e@ul(hG>03>{%zZk|@U86$io2lalF@bT2^(o@d20~d0&l9Ijg|1yU z4Td7odr|C{6~z(!WkMiF2own-SuOxy+8@Ki9|7%OTqS-K)c71P5&ue1y=8+0dwWTc zf3O6FgwfA0M1n&@B_t$Nfdl-Mo1M zohe$AW!#z|UJ@x3)QTi`0MDIRU8Nfda6QOa?y1Reefp4m$LiAyZ1T&ue{d>U-=a)ch3D>KmICA?5QSW0{x0{tm zPJKRV!5rycwU4m%J{~`OO3UnP=;mAtdMazB)d_yJg}}RrbeL0=0v#YdCIyMxAG^a? z97N_i8;gUaWqhgxq^yEi8x@2qh)IN282jj#=>E;HbA#f$~TIZAo?hJz$(dX-pe+G&JkuYcf9A4{P)>5(_1Se=`izJM`=g zuGqIIVY*3y{|%~2Z=kOjyI6sQFS|*FE@Kc%Z&ICmlP~TqX?FOQG(B=#J}7-iv$!X+ z^T{t#@Z@J&yJShig<mdcPofr)>xu~c)1=~6ZKx3Wy)s*X_eCMOZdH{esN9WvyMtD{(hRI5r_JU zN72OqO$-NWs1%vMYbT z?8wR^__R@0t=uS!<}H)O^Own{joWE;p)&=`jH{s=XWc-bDAi7GR=RQ}|EHE#uI0!% znz;lBm!gMN6BlxR41k*y4uGwRc7=d2vlvTZoO&Il5TKU1QMXBMo|u2sq{0nko7RP0YM=W6c_}SSwSE= zFxVUeIS=MB#dHYB4i68Na8#;V9?@Vq7DW>uPpdVxItVSQP2C!lCTVCfr5yz#$&%8E z^1d!9lH57PWZ@;DrrU9UJC2EET!BOHD#CdE_X+0AAVlIPwtM5?ReuK*Po8orvzN|TQ zPPQGalvPyXF4=NSR`GdXx#f_o*u-e0EeB-zhP|?M(>_^6-~QFx4#;|{dp2etl`P^R zyZCJ8@tNIA{Ny0*GX;SQM*+F(dCBoM_gwLQC?Htc#57(x`IsTfgw zu@uC?KrukgK(3iys2P{jm+4$`T{2M9V*vOVylVBE$Kr#eKSCV?kwXZFBEdRv#G)j5@;pay5 zf<N!J~o}t_LcP5)7bL}xSujX~E0ml>n4a`Ig zSE^tJ&Y8=hv;T8U>y77dR!}RXmC<@!&T+}!Uu4u5=Oy7_1uepn%zXcwbJTv0+EF)( z;Ieil(_WFGa5)Gb_`_vCXyvVbGn+VVvg1`jKTYLwsdmCZ9HTI_0gz zS&W=&)p5Fn4wxRKqnb>QYLm@T$bF~qHjb86 zn8%KnRLF7uuQlDSh}5-0sHl!}30JMtxYQ;5rXF9XJ1F1Sfr#Sn&-{rF2xBedX^E23 z5}tU3aLiSAW#&H@7ik0A%XFI2b@4S(7i7rTeKKrZ zu8bO=O&6~nB$MutkEiaC&t~tS<7&3dTC!W_EMssTEu|K(wpZrB z$8h9y25)y=z_b&kdF?TH)t+cU&@YZFYxreSGx!?@^S2A&${Bz);muXki;a~By-!B) z+~GulN3%)Nw8_!f9jRClV^P}~q-JE0vz88g7079i@pU;Lu1cKe^u!`D^v6tY!DmVT z%@{sAkpvneuq49Ha{<5(39R}W70ka|j>}laD!C%=g%^naoJS>{CsV4HZyST!x7JAG zwbjyaRjs_e@{+_BlA!zjFR~htt^=g&f${IP-I319*!;s!CV6f%=h}NNb3On0>v~wc zmS?Qw-qm_!Er(~TSZjHLayg&p9RCg`@1d{dJ~G*#N+5Ri^C>~!%TNH!_(Ai zFkZ8bW-(hJ{y*#o3&d(nTOd}{n)@sUtK(rk<%OdD50z~|yxRit6Iv+eVH(t#7UWWy z>g|_*$JN(qD-$o4+>w?0$>~=7)-$;p$l{6WSJ6R!O+$h+WHgB@PQ%TY}&PZu{Wx~19jk1 zibGt=H(uLc{I@HHgp1~27&C$xo^qB?t^~I#69~M@-M21g25?yj$Io;iy-ZcY0Ma%IbT*RS;Z940(PY*O)uobg+&a*C^8ea^BJb0 z-QWuj9yiq0@sh{L(>Ts5#tqi^-3hfVAh0%u({t^caT1651o;~$Iaft|g!_xIC91G9 z=0ME8X!dS=Lz1x{)OJvRK7l+J&3VzrdM4k+m_LMg2q6U{l>*NyS?S=Z-HEUneCRde zU3!*p5Y6P+Eqh`7c=C((V6Wj$E}|>DX=gN>3qHIXM-M!DPwWVH8ti!-EENC4rz8mb zC8&RA32^nW_!WY32lF*!B$RXL8q9q`9D^WkU=UY|fN=5i4HaL%aJn#tNQ+)e#S^-ESKgEXKBsS) zjka&qUGb~EM_7t<1G2+X(Q2zt+>{<49gxU5xsotFS9(mzmOc}A$bj@L;*Pqu%9!!n z4H;x&6^`Q}4pyC0ITz*a{v*_Fh`j)>lN{9)U0`D_J7 zwUJB|S#XM54X}h@&-?0E1@pm+&5#3?mmSEz7)S?s?bJL^I)C~zMv`u(HSz)ziCwCKkt=D3jCiwN=Qa~JTq_N$uTs;pgX^3ImBYrHuz3Mn z>nXnt*;xR7@f6FOcyV)s%I4fU?2=$@uxn$3ATm9k|D+S#{#<)gd{&i9+R{6+G@o`* zNL?kb8WO7y*By;RVWam<(TBMC49b}*j9pX@uVg#Wd%_Wkg^vj^Af8-`SdKayF^Z3m z_CVK;7RG;oeEzs)mz6Ek~{O=H+gTGPx0IY)|_Pa zbq>m0bgn}#ak^b_7~jDjt!oc^jn2)Y06Vutybqj~2x{ls@KNf+)%;UFviW>G+x1;Y zub-*%LFQMcPW>|_Z?88pQpKfp6vW-Z+9h8tSb?TpEHh?&MP}nXnLB5ZY}&lj%-lGM zzCD8XaOeb+#_4FLqlgY*9`9!zgjfZT+mu%GxcUmmODQ{{08o2fXtAE&cYwzZp(k~2 z#{u3;i~BTQr)F?9PC#EahFTJ>1(B_xY=Z6}$XL;t9{QUNL6;bt9eX{1YnisM@YSAh z(A9(T8tn<<4q4skOX5rxiW6BVPGk%^YTu9DI5TK5yX^;wXcmb5Iyy?O+$DDF@)!cR zpWVS>b_aC!KX_7n_a2wP11C*&b;uM7L_cfi;piI-h6@~ zKRGY zc`;2YjIzCtMSqWh$KV!=A%wrEc6|v{Ws5iG$sWX+Yo$Nxb~b3v29u?vKG$-+y@0KM ziTL*|((3l`9)qwJQbDbHy`wme0J+9yz-QJ3qN@;PP)qnEqg@Zc)=} zFPyo;r-uD!aV?Dtn4Wl;`3(h?Xc}q(2>3TzPEOL?qw@arqw?y!sypS!;Xw^ox2wSX0=9~;bSG|e#7(yB^Hi?DSG z$eOZjVYW^M>zRewI*UTz)MD*#acqE_r@(#5j0!n_S!@W#m=Q_;rJam^kJ4+ht4ca9 zx+IfVJdmY0!HQAi02``KQu5lYA>+-M4>lHQVeZ6LXkaI$?gfS8{5kidwn!7m@ zWwVkWw5gjSf+O80?DH{xcNa376~F>l2MhxTOazDRAcUx!TOJ8ljM|Ll8r`Yph79Aw zI0Jtr3;!yy-(m^xJxl&EYZ;k`Dr^5VbsF_#5i)90retl~ElZZJqT+c4hVF8i1srD0 zSt#q)Z!=ZV+RCjEX{xn%M~X@?ff;vsm=dW58$jc+N(PeapjuSTWwy2UI4ejBM zGh6OBrZ7O&CPSLycDRsp?9^ib`w)=Th}|@7mo7-zb~I&5F!ELHa_dqR$Ym-3v)G&H zm=1&TD5BXW64jlw5m!oOoUvP+kf#p0qh%X7tUdA>NT+Q;o2 zv134EvzcqfcIGLEi-C{pbHzLFu!Qp030c2dyzFfO z8`2f92Ko6L85`*9$I)Mcx$Vy}P>()-(&)n`l23~EojYWDfrg!VyUF)-6mL&2U>w9! zd92cybCtkY$H9RiNKwwY9e_m~!0iBB2|vFO{@oz)@d*%bFF*10@DpbTH-POao}PZ( zkCX;^h@29kg#SK&&pTc7D2r6&LAN-WGRkyHE z3FcpTAmP^-$cAP5JjY=oSj) z@|CX{)q7QHA)wYySCglDf%7TsNk>4@k>ApDf}`nXL8Pr0LRXXAk`T+9`x4L369Y}d zNrnzH!j*p$dixSM_2vuVRYao!&FIIyw$Fv4d}*5DF@88_zcl=GkG%KMK6z*I2}wGB zSEeFHKZ4#LQD67bw?E0pH@Q{|fq5@Sl1%3;xZ-HDtAr zsZg{qswn)w>{;u1zs2K!id=ovLaVZQvZ1uTvxU~*BG{mHzoPYz3euO^FT8c2Mw%}@ zE29_Ok!fom$*KcbDkspcz*8wYQQ0|J&nD~H?=<&8(}~v|XZGi_=S+IRS4R!KX*u0(-FONN$ z1gp&}FH3hq4`WDeTuOX*J6ofWwlgHE&usahsSD@_rC7DWEqHfeFA3_{MskRg&6>49 z)}UAB%w8x9=h5Z|Z+0cOH*MWb&o#PaQr28iUCZPoH0qIKl0zo>&Vqwz*OT~idqpQC zW$!)2V}-PqXHpW{_P~i!*?sV+6wvc{?;)_uYxm(W=r~WU&O3OrRL-DzdlPv~GJdP| z+Y35(#Wch8s#JxqQ=$0naKUk+FSA2Fzk!{kX%M}!TVH_g+%FDm3dCXc0dWMMwlg+K zGt_ybK@(|BKR_D9C(GOHoIi+2mL{LBmnQQWAvqnif>g)FyTzsVAn~aGhIlr3U)((X z#VxwExOC_x&I2>Vaq3#}*>ObtH*6K}AYbwG@L&h-XAl~oSoQNmv+9w@IQoHA`(}1B zZSpLsy>OAh@!PAWeV!ge6#MjFQT><( z#nsJAT--dx$<<9r%#48idN8=WJ|MOEBn|ns$Xsz|T zc?+ztYV$W4Y?U^2t;A6f6vPL$9ovdd;Ikva%uc$^0INFkIgwTmExBI@fvI(_ov$>Q z9E#2eBuMZ9d-E{t*Ie?4A5ouom$|4{xQbpz#9rVkdV%|EXf<7Pk)lh2oM-sr)S^ok z++f-Vm>bCkYzTgUHVNv5AJ7TSkc1oAz}HM9=sVbJI3`-o=cB zCi&ip;EH_?owCUIX|(d7G@PC-?|+mn^(W-eKjE+pp{2%55(y?^^-e?(XY%ik=QvKS zV3u0K8kb80kz+YmpCT3X>h1JLvz|?Y1wrfl0YhHn54@~74w`tTFH-<#DuHd*f?z^zLOXNttccdQ+Zx85 zj{CAq7VP*|#(#B7de5$sSW>rw*%ND$l19f=j``vw`r;a>p!MWhZl=wtG{ZS?)#wvIxzwmk)09-isx8$O8G}^tp^}fxN-5a1C=vjFxt!D$SfaSLQER z3T+q47oX0MMe~=)#x+~%bDWJ^a9EDwSt>0H%PVC6(IR5fg;4gOY|EuSnh@%yoLt#~ z$jv_pkxB7W+U6gk!#pm6iduCNb{{w{dyg{QgZJ8htO(DxQZ|qu5D0Po_)WQy|LjaM zofE%-X6*DEXC0LH*W}9^^R~&`(6Zq|#|CQJN`I`LewRhxSul`G3=dp%y%%qsLnMv7)#kE^+ zasS{Q$#ipel2A7%dvSAe5%*?|#iP*&;@;Fw+}?RxT{RZC%NJyXT8fTN$ZPI>tAz6yh%-6h+l9A zy|oO<+lH9e-yAPrV#0Y4P2jZKH-e*^F5Cb6JSebzzux60K5=Wmm~EYIZa{yZ2O%U3n_GRZnGWiA7dJ= z^LHHykU1fL)n#zQaZm_{QySg6`kD+xePmpFD9cd^NBGz_@4H;$2F#N`O`pdw0hPb6 zO`0IiZ6awLlO~@{`4ad}lX8qsWmrJD247OA&$sgWz0E@Q*&>xVLJ_F^Culz;c{ntBE|Bd?c z?%Rz0XwXF7`@l}>zu!#WZP-lSY0yYsf4jcC@y>hl`kQ)uS6+YPT^d$!WGR&2;`L2q z+K5wATXAx*7bkl~qJubsHb)0XadmVSH)lt22XXFLubwOqS9b7}Sa`d+i?4^f_<4FF zgT0Zi9KFFY^3~VJi=(%E@c#R?*-DhQ4`+N0la!3Q^BQ+8>n=arcIhj)27X& z8Pn-(o7fr5+BbFN+=0gwxwg`{VN*H?e<-%i91NCSuzekozjjR=rE%k?V%N-39Bf?; zs_nQ;*fn+LaS!?Gvw701_MtRbeN>vQr=VRYl4q5Oa~{Egqa-Yn`{Z46Oy`LwOr z#hV%Rf$U(-T5n0T|X4dkJ}6BHseIBJ*7!7QCMGVne<*jU<^tv|mp9aO6K4dOL}mB+l_NF=dlNhpiQvNDj$ z<2WjZ)rlC#(y1bo3A3sAod$!y;eb^@qkc6Lcq4$;mrPcT7txb?qPw-hbp2!j_~3#H>!P+gWf}w&v_JLz}nn*-vZv1F|uffzEpl z%62S@Y#6-jz#-X*Xx>NZ_^$m&;PEjdl=mQ#4`OR*T}JM%J+hnE>_aG@AT7I4Lu-c+ z&{z~lN$t4w^$odCZN=KWT=^G#eYd`?ybFIDG<1;quF z*WP?b-gx6}dG#&sgUN5c`4-~%4SDyyhSI31lQe^Kc1`Rh)6UjGf>ngNL1tGcXK{CS z6%Q8`sjhgb?&1YSy*T$oe0pOF__%XKAp0PIy`ii*LTEb(`^LXs6GzMlX9p*76n?Pz6 z$W2&HS^wbwXx_AyQgQyAyvJNX&rZX|Wz;Nbx*QtwdA8j~x#UjzFz25Zk0Y27%$9ei zL|{neZ7Bl6mG{1v8#s3Hi}pxMu6ib=JNTVVTO@qb9vPguT?S-klXmyDw8A=V1^ikf ze6=V)2C=F(ZX{`5k)-T|W5;@s2iuyh;9VlvcW%=LlhQ-&IiW$YizH^BRqIwEj6HK2 z2%Fj)QhLg025r&>*)G;roRwLCejpImdgZRq1aK0*M=LC39mx<4{53UD`^g3)fPD#y zd8^Tf=irX}uZ>vjHKB4F0(eP|d@yC5yqmgA-W|M1>JQ&ROEwj~?u8P@I9`J4wx7Fsz|94a=>(_p_Ae{48TOR~du%6U*RTyi9EV{1*$! zR=YJrUd;zHBRdRv&6%ZW>lAXGji63#T`0{+UCWVBR-2oaF4lOQ^)4D{v)=i|Q#Ps; zH~r)Pw;n(G@7eME4NtJs%pytuxKciyR3)EJs*(5++r(qx5lNVLT6)gCC}UULmKk7h zY5w=J@$eJLDI+QQI`gI;J_XEZVI}k*^h_~*mYMhZNckOf^yR0rr{<|_FSAgcsm08O z)i!EaWLoG}ZEW4-QJYOg<|c1z?o&3KvqsOA_1a@J7{bO_#C2lkmTz#LZ_Drn=OyLK z6B0LLzXUES5dY0bq~&z-b*3JX7V{5E_?AKw-f%SuPlV@>qL`18Xhx{RB=)LeCj8;7 zRz(5ZPe|-T;Y2Wj+1S!c(&6lN8Op@dOxlnvSN^eJokinuHfuM? z?+Xb!bfzVEBHNOT$uepDWSKB_f@G#omicp+$mUHuW!v@~$uky335GADmT1wT$+~-$ z%FufAZu)2DQ=q(?UYWF)$USgGR&S@R#Ev}4;dM&l?EL+Z`H1YmNZv!7Zd>ktsE&Hx zcLaq^r{jIcP||916kuIoETg*jU@$BFkC)Mcf^GxX2%Hv_a^0cQ?A2F4FeI-3K~o0f zLFf0Oa)YKEo60-&8$#Z9?`aw!8_MRUyC5@y)m2legY%ARj>ErcLc( zo3hb5w?`>EIbs4hJ7WN_oLw*mFfL%In<{2Z1$P%`I195;x*pFst@nE%W<0s=0lyu1 zKWAG<^BNbP>w*j7;)o%^dpdL5nfG&2a{|-B(Ls#~7!1Q5Q0aEORynOEaMPw-HMn}% zsaavm``Wo#yyn~crPhr$LUgYgY>0-Na^UD!&X{+_dm{_CvMwvC3aJeB&^yY zoi-OpDm(ot1(&GKc_;yuj5$FG$B-}-O^iz`#I%4goTM;y3Veun^(F^J;rumD#`O{XSY8B4fWkhGZl%kBaOH?UfE-pJOr*Rp^7#m>)e+R%U$Y;r*ajF(tGl5KL~~427lZRO#WN~;6sR5prq$8VsUcJ0-E^`eX8nZ6 zdhRDF1JeP-J`AF5Y#8)nLT^?#pE~U7nFY~0=U1h)rH+65yt=Sm9mXw2>nr|^(RER` z7rNW#w~RJ3r2lDy&HX!eO0SVT`1Zyl;xK88`1V^aVafAk{LsTPXI!n!$vA6{6Gxno z-XnL*TzuUXd%l+~Cn!R}PtLFURZd)`EgizS_FIupl+~}Cd&X*&)Mp+%mD1ZZsDssc zcph1F4V|Q%wo!5Yk)HidnXGbIiEJb{cTQAzH`QA^pnCz7Kl$}jDZBer4qo_Gwo(wi z{`jx5fwlH1iIfL^1lW&d>V~^Ae#s3P{AsC77;{vnPpFnD6DnnVW{Gs0Ogw7QPNZ<5 zxE?|( zoF6iH-?V#=Y(yk)j5|edsu`z*D4G6q7+* zNoTfeG?BS3cNqQNb#QG6RY22E@+3@ka?3<+zbE6B`ra&(k&F7}Q97Rai_fv|Q% zSi7;yGj<2ib>lI2fb9<0U4g9|M`s>)L;$;x5TQ1SGtY72^-hR$M+CDY_c`#m0~ZAc z9Oh;SW?Oy|TkMG@AM%r6e>B7DXvR;b(%u$$J1VRZ&~`Y{mb2_3q0udSnQTP}eUh!yi4vxCl~h?IB%dw$Hk8K4Xl*D>HUu(SYn$}S5KKHmePka^ zLxR$t#K%qF72*=MJC8}zmAj?k7f?ENp41;WTi)ooLWXjEQc9;m+*IhC0bx@iZ7P&* zsHh&r4V?xxn6Fhop4g8(;+~ok0-n3l>!=f}Rqe-~DNC z+#g&I!R#1;q8^Tl9*tff@sKw27$Mq@ejwN$1g6J;=<%p%jqpvy7fmaoNL`i;T-AGkKni`9>?w6G?VS*EbwXCeCqdtW@)Y9yh$*?O*?S=g?-PhW3M z1yPT~dY+#BhrTvNa~o7-uT#LhRu4<(&-B)K=g1{SEmb0@PfDk$MKWS?v7}EZlcBwH zq;vD7k{mr(+Q-h6*%>u2fIbVbj~{YC=B_B0eP@|Lc==Z;y=CEAv8{6ZGllt|Etn&| z5#G;%UIx&QU$cCYoJtGoifUEUpDEItZQ(!apd2{=RElp}@2k>XC44pSUy6J$IBQuY z8+etzatp!9tW#V-_uiNEq5JrGx%jYVk7KvT&z?FkU&30^(z5GZiKV9kM%b zp8>Q&Spl9$c&~u+jRWZ9UFhW9XzeXIdyKALm$eJ6t(qHG8dz^ddl%q7Z`w^;H#GRx z{C%>K=VtMq+i*M7!QRSan{#on(c@W!5;yZYb*{JPA2b^Lz{yf}#IB$d?Rx= zu94T?{SZKZC=EcJfi`;EIMMGlMngA1Prog1y#c^gQ@{C!aX$>qaYPi{Z@<$JP2Py4 zh-UKPhfSqnqh@Grdh+o-R;V`tKt|0>(Lo3JHvSw9(M!B zF6vv@+7qx-XIniC@XK<*Lsj?Z)gW+}tV01KA-F%_S(D4iORP>8Lgm9s|1L+Dl}7M~P|C4SaW(79EC2 ztIne(v3rKJ>M}txrtg$J7w^k<$~Icie7&rKmZZBy#o&iJQAp`fbRS zMTO@i=fXodeDg=y_w^5Q?9LN8OjpQ_m%fv|lq*z#oWu8jlHih?)OV6+L=@4lf;3K6 z0P7;zX4m2N71Y;RuDoh_Xm9J&SRUHdskrJKbv^W&C_hVbV-+K2D#`L8)92J_hIv)W zv6FhFmInpXjtaRBa9caio2ef#I|e^nQ#?YkTtaHE<3D46RFj`yjt8w-JM;oDvws3QX$jH0h!8aN&cn$uWne`J8`v`5-BND*ta@AZ?Jxny7lPVm>(;F}V%l+2F@Ety z;7|<`D>(V$x%HMl>n^ljpT9~$^F}@V^_Pg*{_E655>G9N_d&gm{rC)4YqfkazDlN# zuaQ~l)dq+&Qt9h9@QCzFTqjA9Gh}F&Z8CQ}^;`-|6#Gn`_fZ;M$o8I<3(x!#Mffy@ z`CneZoJSPq>ZGVbuRvE9qObR2eD4J4+feB$z&D&!B@WB~pg`Zwy}Ni+!F~KH9t^Ll z`o{8P^qn*H-}vLX@19|vNAx{+mOpdFd55f1PcV^>$n?}o$B3ypx&9%p_s1xu5%KTI0P< z^L)EBHDr^f;u_7WXjNoqyIKx(Y4hQ3ay2`2>HL0udFiCSy>>}I{`jrl4`|kdfd$O7 z#>BqfY?JG*e!(A~-}l4;5kaW(XS8J20o_ zP|h5v^4kXu(Ji+Q(9QpKvjg>;ZZb6v$?E|s22MxZPRNzqE0Yrz8%DdY@ ziw+)&u{<23*Z@BQ7#o~ zhCiaQW9e?5FqwY47wB+)S>qLy{S8TO*@G6Q|a!Vp4zDOjlBxmcwEK1uBZ=IZ$~8b68-mJ z-fq404O>ILRtr;uI+*mkmFxGiP2}v?f6>eXSLhYRt>`|XTe^;G7v0Psir;aMrN6`ZZD!sZ+yO!GP}Nc6zyJN;n+xC1_zZSe5|UBOR6ejWYw+{I`vJzijOrY|4Tpkf40x%7&d0h7@%8^O0CC) zu_C85#f+9-VgV~vImidZ&+&j`?)=hJyxn5TzGl}C@(=1!=-S@?SNMlmK7tm%TcUR+ z#cS!?6$)G3t62B`k0$$xVmuD<5!J`Bn~$v>id)~RII>5n5ydLaF4wlrtvY||u)e%@ zQD1%eiH>0wzPO@D{~4dxU!-^abwJi~yiUWp=dZ{bJ@DG|8uiAD@>sH3%jYf8s->$G zus%?U$!X3K>%uY&6cAfc)2t>cJvOv&r8=aO#y)&&@LY%9-heS;#nMGJ8&pmvu@Ze= zv0;;g`C5#YMq03I%t#@VSpni}z4Ady8V-jArr z9)Hlj=4{&gKGXE3%Q0vSg7au40 zaQi)WKXC5E3ViR~SS!Qu=GvdR(gex0Y4vf~r}^OEL=M>{ySz^6^DC8?#Zt&?D|3-!6{3f#vgxP%>0 z5A&aFJF5lTPwO+*mGtr1yO&u`rolVV-Wy35I#c495m4K-P1OxOs;ncxtL{<-9hVig zn^n$HQBQf1%`2iCb5rdW&9#)Mqsx0)inHk$ ztKqq|Z!hLPHlJ=Tdj3N+`g=H;@1xDFJltvqr=91(ou5kjblUkZG##!R)8E5lnMDHA z)cQPrhx6e3+)tT$55(W+@|)cDCcnp5QS=j!u~w4bWdH@!L8PxjNm@pt*5lB(R!F_I z{d;VdYr2spF`s_0hlKZoy?+j;4GoHMu;~~h4t(vp{{2v<)ce)DU5aw+E_5wiyQ7f4Kgezi4nPMIf=ev?6$){6mf^!Uv_i9)BBLc^O}?i~AX}|6*Up zbA6Kcai#j6RA%s5Ovo_M`tF>~$op zKhAbVip?g+%58R&qFnbYk?WGYPRb|Q`=oxGg45k1S1H@)mv{Tz$-$CM#>l#TQHgUayvxm^vR)1jLmxNVg2Ec16g@$3C6oMXb|o-PPT#bkN@>Y-2`xNqRit~GdwtM z1*W&%K8X9>p#cN$Kp)?!!MNAf6>{egOb|05(5MDfGak&Kuuc*$lfIr0m|`|;g3%H8 za&YT?!-mo0Veaxhx{qTh7D~U`HEi~y)G&HChoSW@M{fn7kMfwVT~ySe^ul(<(HoSU&9YpScy3Ca(&_if&8Sy;R*N$8Ta<3YEeba&yQocN zoD)#DFOx%jjY!!hTsj@ktWnfPA-kI@{_-1VXuX}SnPfEz*#_1x!U37b z{bobafgkeC?_qbmhg_d#7zLrP+hJvhhEoTtHr3v&5M(l#H0Rn9k+Z<(3=sP^*V%5U zDSSM=c=jtj(nd>K*9EQNNh44>(cskTKf=(;F&H1w-%*r)`3Lnjey`Vyx_?IL%#Z#a zrKWTHv1t~_-<)L!o7Wpu|7M2Ref!s-+V$ZMcI~_RQEHbQl%_jo#dW~^*9^p&_+F|O zy;q@-HM^ANe@4mPr#Mc6q!UW!NbxzT40LHu*m)JkTvRzND79Hvw4va0Z7QP}y5=i& zH+};`Det7tqA->=&DGl!;<-_Kwz4REU-w`1%YEHUL)wgI+jN1th8}G{#OAPXND~@d z|G6KS->Rx=w@NdQInPm*enmBz9NAZt5q3-~KP*?k@~zN)CiuBw*rtV;h>6)B(csy|j%$Z4he^C1v$RH=dN)e73C*L~}BLu^8S z2Xw!+KmmV<{dT5YN8{Y!`7?Cyi(|EXF54ky&DP@iOG)_oDJC*bv9ZbEvqYs;bzrXz zZ+N5Hu@^Q`nQSc~ty{J^Z6pmS+?u8i5NI|7-Y}kVVPylA$Dk0qq1Mn!?L|pllL|S? z(4I9^(OJ7mRZ|=H*@zTD$KofKH&B6BSMTUqdkm|>GYg|0y}OmyyK~u$qmzcFBSX{Jd>07$EY8(}{3y{0!!s}9qBb{)4HIPXP+jxc+I z!^=eI+@W_HE=_eBLNOKq^gRIDF%iJ6;qo4y!JJ^LzA$7y`-}~jU_j+KMxs5g9_dNSINb)^D>2+ocPi5r$o9yW`Y`)LKwiP)?&T%`a*rMI$rsWdzI0C zMCn~8mAjLe3v{M$JEJm`Q#F9kO4d?%Z@!=|gl8AH?BZSC zc&IWKjoUl8y&H@gO1DuVzaMd$$z!}w&-k&dZMu`D>YHhN9b)y< z3}GG30>{TTZP$biU7A_hD$m?TMKPi+FSz$5n%J4!i^ddnxz4&!gc$cKn+@wfe8FkD-n?H zpJEUr5FKQiIn10)uXQNS|FCX6H-@sUCfBm!3pxWac^3lB`9O9i-|-=>DwfrI3kmur zR>D*pwQ4OhlvcldhGBoyq`txN7U|PBova_LQs3j(^l$HDAHU1-2FA>*5OfR!Mei;? zsC$YjD?5Bue()*wTkK)ZHh7|cCskJ_}Id6~7J>-SkjB`-BS?*>VUAFB1_l{fQ;ieIC~uAiTCXWKVQ2t0847RP_g zii~fZ*RmTS?7f?%s$RYP^PApwKBjn?yX@d4+e_cp!hdkOc{Y}Qsq$22#L=JVgWsX_s7P(>Y&fwIjluW@QGDjPd+`}Q)% zVz)DoxbNs`XV3etqX#tXQB$V3JFcxM(gA?%w%Z5mCPMsM2=Psg-gdjC;08J2{eS^? zP|Q3?gTd2OP%*_kE{CzS>WO^+H*`>!{5_ow?fXHsnF zO2h7ORINF{=D-fK^0m7N+xgm3aaOl+?@+2UC{KQJBom3vi5<(-GoU)g&V2p+3+PXP z`uy{MVhIz|)6AirL`XmJbtV$OsTW^)i)m|YnttO0hP%&XI`llf{N_R}@ySqTO}C11 zX;bi@(mGElXX|NYaFp&ougd+OXi+!s^rRircY8(GV z%gKuzX3sinAqnZnQrSEj;p_BK(a`#+5tRmc8!Rp(({L<%gfvmQZ^k-|<1Hoy-E)A-lf9~&cHeKj+TSMF>h*jHmXM-$k56B0+Z{NkL zoeuG>1<}elY&XZt2}$T^h&NDWp92RrmKt|3udR_>X?F{>8|5 zz3EI#iG@0JwGiFXWln{Iv#QQXmpQlDB_pQere1GmfTi6+9Fm$IjsB}fbsozZROx8c z6hp@EEr|UsKgqP%?eve~qvEGVy6#i>T823-t<}7#xr)HAtVq3z`Xj7?T1HU==srrx z0u7eG-^W+G0NAFoFO(F}C%?6|>e_Hs2mX$xcAwtO1Vj+Ert%Q^|HC>?YVOvTYpeR_7O$6?ZjB%9%-Ly$HwoRR}o_O_y>D* zBl{jGZ}>EHw$*&D$TVt*eNy=V0+%<~u!!r*s~kr(+6!V;EhtenfprCn(gO7wlx9mOrD0v$wSnF`Q<&zK+H{^u zOJF%kEtDk*t147w>y{pZ^M2>k5Lw$~6$(vY6J+9uW`W2&kX&5TpnR*AAkZ(aY*cYY z9YejF2sg3DWOBf$kK4W*XkvhyG(*=50ee;|JsxV+OGN&zHEI7oF>?a9yO&7|@dTMlXr#l_FU%V*jc<=NV!r#k2>v+jn(50^W4q)Bp`SH+^kQVQ2C8B5yFN7+hq3st)R5Y z!O%tU(gOE6=+6&Ke^N4GJB+5l$XCx<#|YCgXeFEsFK?bqDgNZsCPtCY0CNh!G%-32 z(fTHUoJwuppA3|Y^Bk14lNY*2!%CU=zw0uU$pq^FF@eLzPR0;Lvboibr(yzdRhKvSDWKPSg@gB1iD0gasfI@9QA*Y@9ThIG>rc0#MdTDzf@h#K5eRD5mv{SpxTiA(_{VW z0Kd(g_+1Kd=~hO_S@h)>j`lR5N7(Ce%mhRH9UA(YpK9ahlGW8h=k8&7C!0>(+QslMyU`f7+5mBbAz!ugWTRa#Ey~TU@35^8O}@ za+G5;k7%A{BOBqYj=((5axmJAH(HJ#+SJ~o@_H(EX@x5Rm-z(eWd!VXD9}>wSA_B` zb%OYQ|FeQYBW}sMh9io`B8_Z2sf5i)(w!Gn!&rzSj>Q!RReA7=iitH#iTlea z2FO2fReAe9CGP)JB{XMbF)1yz=QOu{qM9Su)C4V?DL&}H3uuC{4fq6`P_SE2s7DBD zHm+ z9l6K4_8CvMl^&xGTNVI8NgmykS*szz*&4VkNVkziyZPNHE&Ph%47ihSB=_AMiW)up zlSdxdoTfM}f_H(YHa2ZJWL?JXHd@`(<{YSN11H`k0ri%_5cl&{)aENBw`^g}q|+$k zQ=FZHVHBwBmrq^MD}2gK;nQR)mhzMfU!X)k*BA<=2ZNV8V;M-9c@XlS;y!$Y2yjRF6B0~W%FrXvdQKA?=CbE?nz49n7j;eNSj^xE0} zjnX3yYW)HVI+2rAsm%1`c87onIO7}lBJQouy{K^aZlwnAL2$AOiSKqO_)kt)PS@Lx zHiDT(a+sBeRo(pwAGV@0OZ_AyL{IrE36JxUx2f}pYRcKUfT-+cwvRoEm*MbN_PX|O zWz2Et7R7t-QFho_Z6!e8vzgBxBjGRX9=kSwt<-#0u?7D$*W~)^Dr=m$JIa3gN!MTe zM0d`9PmjGm5%!14b=6ueoV!qgzJc=b3Q$Z`f{Kbul#hrkudP>EO`}7r;z}BV5r!L} zm9>{OAuQXvchHky@i;>lur({_X)uAoDJ!m)H(#TuLqJ58U!itAUibBq2gff zI}ln9(yaraCfOq|L#F2d@=JpphTZ{Fxd+D`WOwc#!KjAE5QxuO)I33B9H#Z#lH(~- zwRz&>o}H*MtXq4A+r~YIP~_|J;}MeFK6boWmi?>Fo;Se=^CnH6q8B+{dU+bF(qP`} z?-5~hy#ApkPn)4vX1dEKp%~K`lbIUNr1Bocvp6rZyq9^UeM)H9uPoSC(0z&#bg3?LC=kL2r z{{oq$9p{wXepH$8wDQnZH66bK_O7V$$fs&Ld_^0c==he>|8?8Abj zas3%5;NGF95s#xbZgci?PbRSL-#kjD=hVl{Q(!tWS)Qkv8f5|YNCucZfo=Kdj>B~E z(8P=#I-K15Jvke6cX+M_yCrDgd|%x(#Z7OsAILVKu155^Q`>5FP?j@y18r8%YAcIv zyt!e|X4fod#*VG9x7}{@IL|>q&H&XP5Tsk)+**xo=h|e<%R!dZpL7cDSvwt1^nx99 z*H2{o<)jlROn%tc&QjEMo+uo5VjQA!Al$nnbhGYA+@qm|hcs&EC7$#0x3(#l`qV**U<0ygnw$NSkg;rYK~p94TAx=yk;^sj7M!XNkqS{}HQ zyv8|g!hkdXaIblX{elfFY$K%|@3TiSUOQA2b4g8wpF93xxFex@J8@7eKT}3TpJIGB zYby=A`+t^m(CkP3lZC_E+rLn4C3$oBQryOa(Dl{D#2YqyI>Q!B+r=5p{?RH$Pf}BN zgx{+}w6X*0-bm9qn>$Ub{Y~GQiMfro06&*{r3CUJoO-!GT;}D+|CMSxJ5Zl#TXj=# zB8f4_O)M#Qs1{?t1kZo1D0MorX3be3AKb$Q^A~8%;?)YbF*6}ixQU61Pt0-({HqCR z3!qU^Sv@Wv1wj-C)j=tnplGh2xr&vzh&52ht}BH`jTGt^Q50nEVj-j|G)JG&&veE@NA;3c6<$< zy`dN3+2og}Q~W~^{N@aT;dk`P^aWb#ouugOMt*ngN-t?u8Vw&|Ihzz!yj5|`*G#V6 ztK`Ogq-SsvaTD`;&Zq=7rS3edC8=F>8Sd7ifQp@pY&@i>#{Ej~JgIyN^WCcVE2-v? zGTFJ6M%p`tG2*FP&L|tWWo|jH_|}68tKX{}@;p^Qu8#G8?EtXl@MSepSXp=Ag6gSA zs^5Q}qG$jI^md>7QU~edp3r$f<2JE(b5oB-QOxrsTJHHH>=~nobJ8iBOw2+J<{&;fU3V3h}1PvunTar)i}1n*XAWGS|h!pxNdx`oXYJ4hw?q9QYOG`*6%!XKl=_1<01&PT*W|><6`#f2Lphhv+)~ zV>%@J+dqF}+Ks=Y8Ta|b9)Lj0UH<2|Wi;bDq%v@9s=zDr>`{KyITgizOsNiIbNfm6 z6I!~OzE({xfAvU0wbBdf>-kGR3x8uQb7T_Ist1WxUvXMl*?r2bJ)_E<->UgA%16ICBc$EmS@6CEnrTi@0P59Ff-5av72KXRB6OCOFZQ1;S1X$6&}O3gX9dwB&8|82u0Pb9}CKgoJ!?RjtQa5i_UskzgN@`S0hiVDRE)&(3 zQCLRoiXB*1OMzv*a*MbRF>DL*aVtXutiIkxb8X(X!x>c2*LO@uPMp%&3zyW^yIbSm z`alnjeNj)6UAT`atao7H4YrsROK&i-r}51!zX7N?Q)agtyC|T%4R+mj+ifJP86M#9 z?WgN+y`2I@8j_gQI&$P_jeKehQ)1b@_%z2;7MH@bF|f>d^>ggWdE9fvr{maSU@Uu% zc$CY}V)(rP(;Q=O;;ZapwCo3!I4{25ug{#A^gT9vkyf7eptVL#0d%ef=5qjmB5+Rz~ANrL`SZ4qV&F+ii7Wx7MV#$}Mw? z7Wpy&F05v+VwJESX)W)xsp07S<_rp17j@#H@8pr?rJ0V_JI1 zL3iW$?b3Jz+4w_e9F{$E=#<9vopcriJ&8aYi9oZK{>Qf+(qnYzJ=n3^89X?G#g9W% zt2HDrQ+IkKY0z9>-Ta0dBI^q+!8LRto8d})>I$dUUa>qg0u6q-5TmYwX*O^6BUtwl z0&OOl5{pYevMdPS{~q7xFpb#s4TRdOADg>pOH^5uzzo{{C91IP2=ig+5`2yZfeD}I)fcEy|v%#olx3QuD||&oo~GU+rQ}c&Bx`vekZjkSDcX3 z-yxTYqTQX}t1Rt|;=FgLAnIeMrpDxvV{`q=(6Y0QyhYVjm8Bn5F81Ws=4e4>7l1|><{yAIMDc&c=VWQAph`nY9rQJX9qP|d3+HO_nolj=xLcV73ph0~T9+b?RV#Eo|t_lL3)-S_fyTD`(u{ysrkx_G&kEm$tM zHJ%C$j*@?1uwvs<6_=EyiH1tE8GpxtzVE6?k*)+>c`Q!ct|I)F>^dNSOs_H|~?o z?TJ}MTvtY6IH`?_S|>eHO%z;<9;_r%H9glsG~Cn6M#S9*w4b?hM^B#7k<(`so|&!3 zU!1Nnue_yaUwd0m!IBXVKTbCIR;MoUc6fIie7pHpior>J+(I$94M%Z$d~Pwu^?P`C zl2v}_(UE%ci7}2o8~xNcreHtIf&q@F$FVnSJZ!VQR>m?k+W419Qaq1VW3MZRB`IvT z>+{AqJCoUcj)cWTUe61#ZPK5nIvQ>AtJBeI?2DcH0f`D?&o^i4y}53R!nDsWYEn~k z7wMihg(a4=C8k_qX$=aa(l0E%Sy5RX3NP5AC@_?b97`c4O#@9O^huV1m$%oKYFT)d z*2XnzT}HbW#Gu_`8}=!pdz(|U}&5QKhV_eq6R?o~wHenph-aHhnsN^Dj*^RQEz z_N#)i+KuS5MlvGJXtj3qTRs75)s9oDgK;%GPpO)6OWj@3|TX(p`=++NCH9B{TQ;faBvc0C+;FSxS%?-xc_!1X#UUOla&C!mazNYH( zHEsO(iptPrwpjdK4x6oQ*^B8^&%D9$vaK$_dz(n+!e(sQOz&~W7!+{i62k&)Z~!He zFnj`m_wyW+s7-o-uJNZ}-hhCOENbr5Am$j|mCEbid{*xhl&?TH+K@nB_!Yn#-gKG| zv8N}=4I2RKiNbNZcbs_Ck{ZOLR3>hw?jt6(`+u^{$>ch0`^9fS$6FCS%8j_-*lA9- z^_OPmZ)^EV34z_pi9D&|pY)o;w10GrH11(p+AWP=sj=jOauau{B%Ot%t)J-tD$2(& z@;k%GZp<_*$L?W=;--d6s;xLl{`EA2n~!4`(YV`sQf&-e=%NvK8)Kn&p=-T*F(ZH5 zOS)&zk@MQZf5A@s1nfFSamO*$*B#M@+S6)lIHT=gtQX7~K<(L_=lzHMT-w+5otk)_ z@~k7;Sn-M4s(1}ejDq1+r`oH#(eA&i^Gi)!8r2Ut46pk8vhG93JwJ7ZUi)aVCcisR;{eH!5fp1{_Yy_R-#+r$SNFxX}QT76c*>f*YBF%LZ2{>Os zoJ}C;oJi0)(SpuDk$rvjP3r#M>JK>Icvr6ivsW?FUgh%S@v^1hlE28V= zR|HwN9A*FfDYYKDh*&$X#{K6AO!$x9b3zR?e^oLWwS4;t)$TY!lhzq^a=#ujn)Y8j zo0&?pS#R?o=dq1j*-Wutqqni0oCQKpa`|y!_Qcjc#M)jx+PN37F&eOy+3J981p6I^ zGuP-|=I9I!FVqmFSaOkt0Q-)e)g-`X&Ejuz*wO;0)|--*iQLx~BiY{8aU5e08q@$BZ_{U( zjxz2L2QYg9fKQ};eH`L#NXixs^4z3>L9H5+K$m;Xagq?9k;Gu86L9mOoW=vd+4N}- z1e?Lm#_z2~)VUz;OvD9p4ksYB?NzauZT0)US9$v3{}pb|+xW&C5N^ZTPb$pspqdN& zbCeF?e&u8<2~V3!FDi2VW=FU+7kv)8{-Q{O1CT=j;bvK>M>}O6jYSufpS(*2DQuK$ z_?V0Va?|elYexh+ko(%fkhxwvDU;sb{*|`2UDKA07qzA3oZ1`Nf85%5PQPw#Jgbfk z{4Z$cV~$|7r|mQC?EDHCaq!)}o%FZz{HEI+p#5V%(7xBks`IMIIi%+D%K+_5b=J{M zwF%o0sHOc4Y8{_z^3-4r^Jk#O*^6>e|L?aXCuzi=#%mRYC$R~MTCs91V>H%jJ>}5r z$sxG7dr=mhq?m+srDYT-HYEqou$0KCTuBtDl%l?@?#?1obI`m@u6dT$Q}9e)w4kbi ze(NpZtIR=I9J$y63ae9zHxqO6l~q*f;3}UuGZUQI*Qq(hY%VTVN_K(bQ?eb8t(+J& zJ+GYZglfFE4aBI`#HZzWc#JCLnVUQ4HzBuLg^ugm!NzNj14mA>WvCx(+Yhkq*wss8 zUw==}PoJUp7Ov7qOX##%>7i*K&Sz%OYxw@Q7nE%v4?m$NMvlQV8>f*^j%GCT81xwU zA{RQ=i8=evhO=ia&K!>xBj0JU<^*z|6VYNXOnjNm(&#Y57cu6Gbbd^F=?!xJ)7UKi zw%#DleBJ!BDda(UJ+FY;DIY9kpIs>0xR4&3W-vzeV^ynCGs+bjnJ3SHG=)bNC?>f= zzG1m+doFXdT6o$9g`(Hu^0%;_XS3pwVab+5B}ZV5c+(fhX@zI1Rt7LSC#G1wF%|L% zr-(JZNuk;8iY@HY;>bGrM%5{l$8e9|pp{|OS{hKS6_J&4PpDHkxrvhQW2!`k)u8_x z2st+rdRFxuQw2M7>UKgfW+RktJIX-u-DkM+uv(ezyP0@x7v6eW(@te(H7JzCfvubw zOO@S|n|A1lcIurL8kTH0E79G7 z`5H*A_o&Pce6laKg!s`~MAlF>;s(mrqR(vJXzZ2G^f?vtpWyqSI?wQaj0zjxf8xv; z_N1KAu>&U*hYp(r5}o)H{q_=rIlPQzcQ{QeNBSZ5%wZOmvxNE?Msz&OdF%m}8UwiJ z>2;WZf_tE4zi#~~Pq%wE>5gdHyR-Le+=0tPy*8+hrB%De>iMT&~>AgMEsg&z?mW2RGRRq z6 z?8$*OCDn~&E1R77&}5l2@TYq_O&c4KWA(}-tC?F`Lup*Ca>;b&b6p1Cmz+~VJXwV& zRK~XTT*YPNa}+8*t^aale1;OJc#clYR%}uZT~bK1f?_0Fxl*%>kSDYN6qhN#xXO`b zmYLl^?MW5S+eT)#mDkXPJnJL&Jc2Yk#edyBM~-O~Khv{QKG0NT*#`?iu$39xV zPVRsa31;m8QKDnkf zu*+)=LE~MP!YoFZT_v%976Eql!ey4{vEd1Noj`;gJ<3+6gADZSJEje+C>?K+CF#wV z8Eavalx?K_cw1jW_G0W|)|xU+`RM~3cHVbJWA>jRLOzERh#12`d<>l5Iwza4_SG8b z-=w>eyEU@sED_Uv$no}<;YX0qNWSJ#iSMbGhh-OmE4SIP)E}Ie&W?mZS zB!+eLmVHfm`^f((#hlzgKe=xB<}a*dqsiBw_U$So4Q|{|Z+(jIYA!0)8~=bVi_RK) zBp^t%-TJ$qW!P>6&h{3QVqd7G{1ZyoPAEUIS4Bk0&E=uc#uoPuX$g46}}-q(0MD>f($^dq}Dpm&`BAu$S-;_EKx|88|$N zZ5RuiG;2wtMz1K*z_vrOAFJOFyE8jOLne*UTG#b3C`Ic%edXffE)REKdHVz?fH2a_ zJ4i|Boap#eW#yG9DXRchl;g#tvN&74Sv71j9;N1$a;AHtzL~P!8oaOmyk!oIO3E!& zIw4!Yi*)Q}OD%dIKFbW$OESnWEfx z-e0J7fzgUfFLuh9>l-?>c{2l%YhY4dl~U8o6&0Pu2#+K>TH+NLlp>$NM7erK$=g3! zUVdqCCS6|aYl>xmlV5Zx`lwYgd2KKXeZ|(sv<(N9fj#x+2ku(#62{*$LN4oKm1HA;ij*SkM31)_p4J zIOv3h6+MTP!?MCc*kp_Q%eVK6050EzW>{S(dYR_J_ z6r?l0JFiub;cq?2F8YTs_8!P+(gP$f9zgg#kixc7zUTgoMvZ_?Ba&)$PfRs@D$}sA zdZwd)rX_gtE1|$DJg(Iw|E)7D1FdxJB1<_g7@atr%XEC6flf@!ICS)c4nn8Bdk$(d zExu1#cf&bbu!OI5irsRj*fWpsHI~Dn6Uyr8{j>$66-RT7H9`?4kAqrIp|0)>sncx> z3pH?kjfSACMv%XJlgi*3mlzq0OSJ@@xAHT1#9@n$j7`fpY@x&xj;k+_r&LoRjAKuZ)T_*T+#;zx(7H%?jVH%Cu|P;bcc0Mj3^6BXe@&cT>Q1 znx59H+7BR{04k+5P$`iEJ1EU-rZ!6$|DJ9zO1 zsu6E{b%I`-Ig|8cmiz)k<>eKmmCN1b?!I0D{^4@>@Td1SMj4b$gvX~Lx7ahBQvg!( z9NRrDzXY6BsJ5XM8C2zzZR8`btc13(rk?An8P(Ck_<%aFRHgVVKI%bMVy2-g*D1k> zP00mw1(alzDg|tX$EPbEjK!ztDUM`os$mV3#^b=n^L+{6E`v}quaxvA@++I~E27IG zw}{jLxT~pWd_jGqYAN+?*hC7I*S2jtp(C>E_{p=n$mWAe(g{-+tWnfS?cCbQ0J?KYkh#7x0bp4YXSFI zuxh;)0>C+oTs3pplu~< z5^5*jT^+223)X4D;&ocPHdvnPW903fpml&TD!xa}-PYkg3byjC#f zWWrj%3@xSSVU;f*C!|D+S}9@N*sHR({i@k|NZHN16i?)qR=ZV|9S2m{4#hSfP?Fx3)pn7R+I>PBdG{AF_F`3Zoi^>$GgeRJw(22h^^omw z<|nzI) z&o&D?pF?AvI)}bGc}|Cqoz%gD$F&!N?(99JJv%Vj&{WQnV=|LAgngW8EBxoN^hJzj zefv|ai+yVENj*ge(da!V8B_(ve)}{L;xJzIO>ZY_pli7Xg|L;nfX;MkINqo3fw;zx7!Et45Ud>Bgn82rNzq|7kF z=0*R%>GcaUyYA~erTCCT+EV{*e{IE$d%J#6XZs)mr(vHWX7e!P?4#qyx%|!e|KDs`SWRN@sLSPU23LWw3XP2)H6^ zzY3`_DbL(bLXp3E)b&5Emna{ zj7=`1lVjs9)ldkQMj|nl$(2b}xM-DK%HOzKRS2)#j{Pd-_M(n`D(gH5;tr^7_i@%{ z(3ODWwUP{IIiSv~r>?nYKdu-not}JJBdB~C{rohIUK^=LNjyB5h7gM?)5CGKdJtqi zfU|agVgr}!bRYP-8`o_L|8*BqSg{Q8wE~ZQCG%7k5g=ar30vn_#B&bebpdppI*af+ zeHv`Bg_4h~J$sL7HkZlNH`Y3HHL)RD8j)}U~6PA zMIihfqj!U_UB~q_mmg@^hn>PFr{%J;%gy= z9aep7t99mco&(6{T=|9t!)ASbNAa5pF!SsQ5;7=74U%@|5toDZ(m1z z{f1}zkT<=J46!(@zs%L*uRUA7Q6A!}Acn#|in2^HId!Jj|BNv&W5~^x+%uT%YNwA0 zqiZWAWm_6;z{wXBbI}oybyqzkIe`9vGbXb`FYO52)ozS{eNfmjjoNzf}(QHdEG=}I6m z5EL1w;OKZRqs6e=(ji_F1WVwxBoTrdRSPKeO-#)rtTciV-sTo6oyRY$u2xQdHO=}B zH2!yL6a9%@WG43=JcjRahG^q5W8RJ^rMyb6;c=AGMrfH|s8;wy@Y_t3Uu2TjVgb7Q zh0E1HTCUK`le1SSc2g|jTtq4nSg|t8H_*z}O=Pm4@y$maQnoXq%519wO1)yRs{$!Y z_68WCp~-w|L}Dd|Y2^xEhgvRcL%1$nt5*3#Fv#f|g002<)<<#hyo7=NVc7}{&yo)o zy)V0AqFIa*LEoj{j1L!U-kddBwHzB@eHedNDCQBN$cRiuN9QP%O_sqS zS(^9mTvyGSxk^h`f=YJ?wkAx=SBGec3o)lxGLx7Zlu_EI%(|^guIdDn?TTksba?JY zB^0&erBNcjsaNG)*kA4JE#@esw5tNky@^cXMnW_TD?jjO_+sa7<<@klfz)sl!smrI zr)k&-HUp1-UN7JiP8>5qPtRDTCqnY|Z~<0Ve2pH0Tn~{Ry+46X@QE8VJYj?0JISIv z>g|_6FB4z02p`KYU15jrCpw3*b)Gc(Irci9`^kN|B9+hU z8G$f-0b^_YG25?jPGb%eCLTm^9e`SU*i5~XQe3j9qgY%ziu}WhmM}Qfb{zfnpVy)HZ zl@hcYzERi!shnD?p9tm{?$$H}#{S*<%=S(dxs3fJN<#Ss+&sR)DS)!l_if?(Y*wl0=nuZ=jyYV=Y5HB)51)`d9md|aN`#%-0 z-}EW2dq*E2%v(U6rgL&g-C#FPh2C z!y@o7V!}|Zgifnh`)dvHor_DL)~pF4T92Zc0xburyr7MTX9S-dk@5{nl?O4OkAI4M z(Oi)h@1?d-m%34T&3*FDY}DIte#C^VwOTNDxmGUo(mIb|G#8JzE>a;u5Y{hR{(f*H}6OUQ1rZlQ_2KRJy`C}>o4ZiC|U zn<>QTR6e0&J@4Qmx{c}}R9WYKWi!dMq;;3-I`*h#`$4ttJgntOxT0J3sc?f$8f0`U z#b1j9LYR;8AX(gJoh-(L@yy|Sa*UoF#-OREU(%yNg?cQxMvp?Shm#xiAjEnktDR7b zshHnT{Ig!_pEdkz-gU!Xo=8LCY59l7DkwZrm9?9QGD3(r{Im)Jtz6+IFMm8N z{}6Vt_$w$Zis;XZ95S3}EtN!vvQpC=EcVzmd?@U8(?>~o zQK__jNAu23;azPh!LYbgg%IWW_=S-oOI0Wo35nz#NQ7nfdPEFVfl#KQ(x6HZsmkbt zG)f+F6rPZbUV=O^sn92x!i;2vK&&_-#*FL|JgzK7K(eG{^ckL4F6lRG6)n%VrfA2k5dG?#1nG3qkVz`6XdcckSaK$NS7eF;2@ccv}mC_REi`G z8z6VIlB-9Ee0&nL4qB{rBl;%tbB9uH(8ARmCyNrpva}9&$x0f+ai=pXx@i^Kuc`0O z*Q^f~X~`lt9@kZFtNqYPAzJ4iEMKokg$BlH{kkYEUP3B?=Y3|})004-pB69lBs^TN zRm;5P1_Iq&$hG(-DlQq(TimGRJZfCI9G*sPMMkCKayKZK=&h8MkGZt+7=?1Eq$)=z z6>QuNt(ZvF&bBYweOh-N*4iwFOfx6GfclJ_>NfDaUq1XHhYf#-WwWC+fw6THte5nu zr|HES%`)02bl>biJe+TcThK}E^i&?E^6PnC`^e5d%qS@HH0T*J+L*%{ z;gP*8Q-!IIL7d0Ck5WHI^Abh=_mB*@>8%J2^klPj5X;m_jJ|&U3S-}{VX%Luc|VcI zhROZBpKmsot$_bS;=uPWeaT^ku2#@b=cRE7+iC&qS%w@~jcRh^yq>SUzrwoN_l;^2 z4*jqEaeDuLah)|l_Fa;v&n~7^d?Tk&!70f!tGgoW5V2UFT8h8a;lJ|7iMTxXZ7~S_ zpoXGj&V9P-EhhVs;?D1s7({}E#6c`SQxZf?hVSVp(>#DvPRey7b!NwzT+~aVppe0V zzPUa6a2I`-s)HzYKXP^?&90ik4>g5*y4whq(9!zWPdFrhrW0-U#bB(`}RZ~xTH zV$35JiV{X;B5+~}sge*02^d)MnT3uep1|8aod0p52pkL3va!@t38xacpJf3PK}tYG z90qU_vy`d450Bw(##;uAcn5|MqC_haQ5J>JiE+Zlboqrw(SelA^;T(=1d1?IsAPyV zd?BJjxh)JMD5n_vo#)R4k12$H8JIySJa2WwMirIX)L|;Lz+@TNt!ZRC2jN^RokLyQ z_o`>tK6P{6Lb9r7*M2JPiA3nGsV4+0E2mhts9s@+BX6%5%$;a7LJ>in z_liIT5r@K_l}o&+PMxkiP^2CCOL@RkoM>{Kr8 ztcm&cN~^GWqnoK}E!182veOCtIPK}Q5R4i*R*yY0iv3QH>%rL}dbs_l9;{)TGC$+6 z1pb4kH0gtr7d7|HCCvpv?^FGBjB2Tim`fiMvVDw)Zlg&~oI0<*BPX?Q|1s7av67C$ z(+&hr8+RBUH z+18@B7*+8W=l4)SGjN~gpkvHUw=xBnpD1KYo3jpltA@m5y79(e{!a=yn>+g{^oy^4 zWZYb@vLnwrgU6hr14jk*v|Lq`7rl5HSE+3JQ3s7eH~cJq_QD|VJ)M8iRBQh!N};qQ zf?{-%e>>YKRM_}~3KGuCBYB&`NlZjSp;&&w@ennR%kemU@%&&35GsT8KptdjMFMU9 z<_C47`!@44)-VOyFLxV#7tMO#tz6H(pQ@2lV)Vj?iF#^YnjZBi(lcHqdXT=25hd-q zW#Tie<~~LN$p!j8n8p|wOWjj7#zd6Xto5Q~J(LPhZ!UW~hSGX(CPzT2pipRmSP4g@ z1Y+!@La(UQEJP1=3W$%Gv`mB!;aNsD;wVqy$*B&pOqhgY2qi+P1Z;4-EfTtfAY%N( zqA`);6&#VQRj%I7*M1=pJYP5hESgX()*)3iCQ}#&QwaABiHRizg(-sY363CNABw3H z5sTvz4J(aX)`1-unn0?Nw-a4Oaml%`wghLSNDqzL z%94tJ^vnvLArG$c44B9vLCFdZCRnuq3HBIT0=a$-(#Dl|W;Iw@vD^pi%@^t8MX*JZ zZY=-a>0$3|^v5wh(nu3d3B{ecEgBqErRg+!e0Z8wfM-6| z0*VEGy!eSO8iEL(ZAG;q=+F^dA`tY@wq1RW!QIixzU=m1HBmLX8;LfV^CKO5_1NY< zJwX-Mld#A5GjcoJao9tLBRR+?sI+(-2Hn45mu{OGq1%^dX@Gwj8^8PX26F2i4EXn% zzB7lnrHP;UaA+Yu$b1-N%ZiOfA93AG;}B7pGb0xky?OB~isHZ2bTITjg2*hSxddaj zPkt3b$c4*RiI8%T;i~Bu*&A~E|B9h#Qxg4^2Oncl1#DA8?ibkG%*!?4^pDBf@~txI z;?4>?<_z>Q^SjS(z1}kXe?`%6%rf6ir%jwc`w3I8;Ra!Xx0(^oIt?Z(dIt2!m(KB^ zk3Ul=0?8|kAKEh<=@;_x=L!H&zMR(sC3j?@2SKS9cL*jRO(a&!;iqc*kv{A1epD;+ zZ!rb**#hvwMlc=SL>De1^U-flbvYe^qGrl+S;LI2y>s{C|u=iig3b- zB7B^}&9!d)cXe?immT1EMm_-%cr$Ux7u;nct6&`8xHP;OL3>AOiICMGg29nNW!37aT6%0HPb9 zXAz+nU$4Wf3X3F9$8&}ektG4ac%+$mLgCTLYcY|F=cHD zPqf03HXdt8Kfoe4iWycd^?+@zSli1r>;0vgJ#VF^O@2r2YXdZA#tJQ6K*#&MwQ}bN zTeZ|v9=s?&WR&;%2(9J?d6F#j4^LM>3@HqTMdcD%6*p2wP}!!$(iX)OG;yYq3rUn! z*U5?>w!5Gm>!?DjYp0Q?yjg1kQrXIvpiE>@Rm&D77T4;5ho58<@lzW86caJ%B!B#o zC)rXwQuo|)hn}KZej=zCN>la|$gcZv&hJdD(Q_26e@KziRE9u!aa<-MyF`QXMeuO^ z%y}K8+HEiSwyirrQP)27?H;wVWw)K;_4>vhO=)B#Eq;~lseYW&heyd9jwI$9N$m9m zZu}D<>M?SPk5eA;7|43CVV4H3jMME4*?)i>dZ=Nq-k^Z}ZKA*rDe?S>H{E>Dvw%0= z0`Rlo+Mn^QICvAE{|}CC`1ZebH~V|Sy-@8{{X=D93^-0X!N$t7&g`tZ?9UuC z=x-=8LBzo6zvvG(Q>&-t3&r}9VJM_M&&kIbiYWH1{#t(C+vP$@su!T~wF8yp$ItBt zn$~mnJRGuH5zN*>GgO zz+2S?GwsnjZ zKk-_vUeokdHpN!4*wu!nfG|o9i44tJkG7wQq+v_~&mTs4kTpJx^C*yW2|C;?i7 z!LnBK=d9Gcxhph(0SmeaYL=rKR$=$fo$Ep$w->2E${Zli#>RJKU9++-@9IG!Ol_?h#P8Zod>OxF5I@ppRYp*lzbR_8^HZh zO+2Ry_;XzwN^lm%-+_{YpbSOCl_)BKy8VJy`Nr33C4t_Y8OyYm{+%WBR}l%iXt^&B zz8JZ*iWjn+A85fxD>Zut(Hk`fFHzjSf^c!>hl@eeA}yM|Qgc68qPZU~(~9}7@`RNh zuKa;HRvCZ&hz^l`p*UaZg$xL)!Lml;WRx{2zQ`P^O-d|lCHdCEyb;!)G%-qTgDv!A zI|SivTw$%|z||#iHG`hSD#F{C+)6$E)N>597^TP9d+_9=oF5vg;rBnN>2JKJYgf1G zVjoQjy^VUJaVPWg+jSr4y^Ffc>4(nh6_Q^KRCj-d9J+k@Dt#>HwZHGUc96u|N<`L4 zMAqHDo7S>jD&4S6D@Y37SHE5N{vW>HI>5^FTKgsm38YEe)1LSA^z>BHlQfMB2~KbZ zhGE>@-QC^Y4H-rl90qp?9$bQj;KKkR-Zp8I_U*gA-?}$R`n5g%<6%ErX76Fob6@wh zu63=o5QfGgr;j1|H<#gg*Z&aE*7EGkT!+2F7yt$o&ERZhqx z&Kyo~16P`|x&ucVsOfZ-2*%aK0ZEDYpc23MO8O6fDXZH~|2+&D&$wYlk39N^zsS6W zCvjX3$uYzoR&)RfjW79No0t#?d*?7RuiRFFQs|7+9GuTWvA@YKG)N}hHI+_Hkv zA=U31rRgM;==g4qT{P_4_O-N@zb6UXFG?Etk`C5nfx+2?rb>b`*$2{~h$$R#JQvLo z4*Z0WWekGD`eStUzwsg6%&1+tN*i*{ov(Z#w(oOrJMYSU&hMLBCkmV0c>Njp?ak|V zjP3C9?Li44^IP4vP*$(mO0>ql2ts8S>Z-|=T)M?1rgPEeml}jfrTDn4s?nH)YCxX4 z)-DsJsRckQ>FQe-87-(16i^wt5@cv2GHW3&>gZh!0qc?WC2K*Z`I1`-;lbXSQ-p*< z@-DZi)aX+gc|?m<4P>9QKqRCOx^WejR!cQwR>~kZ^`Khoq9wdPgp2p7BwB03epy&j zkEy8>?W&h#Qv(UVCSz47DS?DlHKFs=NEPv08k`^(d8L5+=@69oSWqWEOOoUBB@y{0 zB1{n~Rl+0Fxvyx0X_3X6#BCaqPJA3Q2Y5UYWKxuhg$TvPR+GpqqL(qakgj z1P~wX0Ih1b9FTRp57XY3fDONcB9A{8R3N|SLSEB9uwB}gY>>$_Y~8GBTWAAK{Gv~I*sq>rU?AZbN^g@StZ{8+PbyM5cF(5NG9T)4%jKSt&S5l;m z{`6VM5Zz;rqEDShr#gwvU>QNA+q#4DCgb;B+;+lL_l?6VI*#YYfjZ+9fgnfYlnCu3 zHUovmfl_1W=I|PX=(nYP@{8~``87!NT-RQ4BvI!+^pPP%;SilDP$uSc3YtNqII8~Q zK%qDYQ5=LQ@^_@lK&K#H<9nZJMXs#eCmq2c?Ii7_xTN$5EYhy}0qXGnnBjRO{1d<= zt!-Jg2O*|n??1&N(}2?wq22zR)@QT{?x1iRP%(J)AVQ<}Y5N7~EV*cMUK*jDQ%uU! z{Mi0YpPE`cg``t^wI7Tg7K75_rW3LfLy{6Bjnj_rvH;Ujz^T8T@rOOfCH^)EOTLRl zs7?|9l*Iok{w~yqL(>TnJRU?K9SA4|V4?87^^tf3M4s0_5)XC}4?66)VG48S*5%qg zak~70*t}0QBt_fS7{%t$jY4Z3?_3+ggL7N1UB4|uNlxD3&|jQn0Rpjb_`)`)1-0$nSuB0__DRRFFEu%$$1O+;!nbx@9KT!_%IoPuiF z4KAW6x(Lctj$^bAx|0UjsDM)`sZf_h)@T|T_v}o7g&-yitvMz-hx=tFnoBf-P>Dnn zsl`K~@)C%AQh38SqNOyzARe%Zj?UtZ@&FLDI2E#U2>YNhDpqH}oz#RB#~Y=hBI$G4 zpja-Va(P*clptW&)R76OgNH8I$d|Z5a>{xn6|+(h$+M`SIA~9(q{L-P9Q-Z@5Q+$l zhZ-eG05yDJ{&DcHGDDHPoI}LZGgQ1>0>zsn&@)70h}@DQ;e04i(P7C(@J@r{X~M6Z zKTK6a4_3{UCKuMfekb*jTFcFxz%`WTttN6@LEo$%wQOvm&*?$>>oAw|?W5$%8y`0^w`vyI-0o5;Se zkyEF8<;JOcal#h+OxI3RX7|<;h&cAd(Hwt=K!N~P$iAb&T$|V;r<-M<70XL_07lRxzeQ+&2`Ar z6>ISp?UcDJFgK+~L?@xd6`HTtC`}_X14y*QQhF52?f;49L=*VIAeQ#P(m~Cx1S*cK zS_i@zdw7yg|Ii+!&V+7ms7XHenMjAW5{{Y_#}P@$wtn;HQkk_%9{R@~RYu6R;L}5d zY|kDZlKO&6vbpzn#!+p2-i9yj-Sm-EXC2@fOUU-F3Fg$bcx1;{vax^A*pW`dmI@V| z9#x8TbSFwu`Ci$v;`b(eI}SP(Dm?w@7}&I_kKnBSh=hYH5w|{+NbpAkw1^>6n_yKq zUscH9hZ4lCKX~NFx%Z8a#1mZdxN#pW`cMiLkREd5A3Z5_zWRaWIY5@|2*z!}CR@Ds z6S=(tVY+^6NUl+JbcHsXm#*J1C8_FEu5Vr>T_`{WNXvz#H4+(@LZS^dB#n|Sa49L3 zb%+bRk}xT^n4}zGmpZStOjp&UcGRM3e1py4k-D8r>uGJdfO1~kNTpy%X-ylB=nn9V zS{QB%AuxrgQ|h43$|JN=+{-GG49@exMfFaWR#7UZ&ht{#Cdg9-3AqArN|mO{I?9y6 z#7ce#Rk+G)kiu&_;2f$>)f&f*Dp2ZTDz9vkM*e?=MGz?R-#OWpgi3Y5Mu~xypul7} zOF4=Ul0H#QKKvmAtjdJzWNK~<(v(cOu)bc&QwGE<6YPqM%rLLb27WRSij$NhB^P1f zQGvSvVg>y0xZz6ag?yLFn|S{M^7vq0ULJl55_QGJcp!0nSJmQQXu=EHj)=s#^L)y8 zu<21A9_^LoXW!wbzSQQ{Sya`j}t3hfP{7 zRBLw1vd#OXefegJhUhuL{pDNUrcDq1BY55Bw~tXOvqs!~qQ%oYnizh-kgggsp>rI3 zy^4wdt@|0JKRIOdheACTx`utWob76y=d3Uv(KG`d$j<(6rJA|IA2jm4Z z?Qfvy|DKKbI0Xs^M6pA1cI-JNBvS9}-ISlDwqTh=P z(Buhq3V=EVe}n=BeTw|uSF&j>T1wL5|D7^DGW?6b$jq)&(p{yV?Jq2T?cr(<(vATw zrH751Tibx1RXC!{z+X)cZp+g9)Z5;8V1WDvl2pjvz4l`o9UsC5`Awef0VL%qB<)%E zC2_|o37}&|;7y>1!s{SlCzvAu`WnEk!jPZRqgx+~4_rAfe%QYCk86`DK&BTs0P zLXnY)EucXU1R%VKDQIIU^8?G?H0OKT#mn> z5;!ZWGgPm*xIqf?QMB@~KGn_#Udrf4-)MyCbaME`u$IDnU?Zyxs8UNcYEO>(1M4Ln zMwChDl>|g(16jF<*IC>u)yhNQ$gTWFmtI65+6_;wMG>!%h|pw$Md(pj0`XWJSQILu-VwxY zP$cju#4iTSB2I&@Y3mmU8wRG$a}&F{uHphTIdSgH;ldG!W73OO2?0J)1f%%8!Pson z_neXz$wyf4S%L2!Rj7CMcIjNYkzjlsb&XUPp(eF(-bR9QLBFa_w1#JLy4IPt^3To!nydrl1*bR}Lw+s$v?uVl;sSR6Ox%-fPas|e8PLXy#o(Gq( zfkW8vUfSB-7Fcp1vU9nsQ!D-;kLviz;QKmD{Yy!{gTtrizDynO^iOfglv#Y6Y>O&A zMpN~VO-B+-Z(kLV2D-0HdkMB&Ttx<#Xr7{Fy=dok@8aP8n6L9e2&W`z2c0xQuvLrR zqqyy|C9LD|A|*-&l@4wFTH0$bN&xL(eLxg{kV#R<2NlT|?DjbG*pz-EJ@EMHpxU3p^rgEKACQ;+o=S3rPUp@ zSX&6^ryU1~Qw2I{-+|J)PH6z8YB5jNwqfkUWmHy&Dn#nOfoyvP$W%-kFQc$V!s6Js zF=eJ@k~!y4g(4=7peEJ!Ar7r6L;$nuVFN3Nlnwfy=64K0Os6 zOZ@%?AX6!6wPIe=+R}|xx}CHZrom#64YHJ#MNCCpRa#8;y{Jhl%G)s%sztg15(GIb zZ{CPb+Kw8}{1cZCGy@mOkVAzC>^iI~oy4+x<50RLtb0c$;Fub>nSm5rsa+>+Hwk2#NU%0hi4*4& zc7ssc&rlFjEze{xkr!Gv$%~72$ruzVt;h9- zq|;L8EqVG^FZ~Nh(rFM+o%={Cv#G4^_{12A3?!N8?a-FbNVpvkZBVDm(ix>o29|Vg zcYeZJMlsNO?t!YLb-a7mf5!I<$trorl)Y*CP2;x*u(b0p#C=$l=HC&&o+IK3gm^%P zyp{X_L0%9fF9?x0q{$N)QvJxC?h_usm6wtvAjp$*4`#=CUQ?ZkL*Ikfc>q}+oVx=> z`n*17$NfE6T5oF%cLPYe0a+rWaUGrMk6+PuCa)Ynbf2W3aQkfDU6 zY)Q_@B%a77MN}j4z*Gtll8YdoLiK7sdQ&0#PI==(sc7s1YA`*b@iYQSbzJFn)UMTV zH5U@cl__j+1?z2LMLU%vOQ?LUqiUb{jUER{i0jFzv~0mAo{w2Guc(sr9MVg56M9k` z@mPx)F;)V>s)B5l6T_8NHUg2P>43o)VweITB$MAOgE*;z&nN`O)Fn_@0JIfBqDn}0 z!4E3Xpvr-sYT&Ax*siX6J|5>5X(VlE?kkVs=PUVr)qB{0kw>4aC(vHS)3VCV7dt5eTk0mg#7&lUVjh54P zNjApCgm^sFFt;>PS_(-isPh_k`M3v&hl98Hy7`L_J=0wry(EAjE*70Aieny|wxv5CvgccSI&BEOAVLG!;(T zPEKzE5!+;%y1cPszx+>bC(QvUXz1D{uTUcR#>)LN6VJ9M6ekdHQ8&0oZgEV)F|sxi zcRVyH`jc;leEq@X{Cxl|14!5>or&C3NU}qbvH^>1U=@l<)i2!bgskiG{U?6(FJS56KmK3zGx|Z7G7z;3(VNk%7FaR`uLoc@<%ea> zf+17n@f|E}UB-L_|HX((49EtSGaBqV7f6#GzUQKIs6W@n?j`$(I<~cXY<~JBxP{-<*KMt z!8KOEK_rrqEeRg@1GFfn?v@9}o_z_feS4Vj!9)%WM;hKeO zQxS{z(&j0daGxq7xJ*E)l&o7}NdqDkUWQWm4kA+-V5Z`ACBIieevRQh3yAvEmekbL z1!zHA%9^n;wbREPZv#?8SahwR25~0>_jc(c zit7fPR;=4a1h+wI+NlrhqS@)P^;BGIZ|4IDuVsV)sfpd%90f9&3|h2g>Ep)*Lyy zIgz7cffvwsx7k(Y{Wm^zV`xK+5D52LPr0^440Wz0xml!uk{P z7JaFvY-AejrV}!rf|TdVmdpR7x69Ks=hGfgZ}8Y?tf1p}o)#x$5kJJFQ0zF7h)60V z#jEv5vu6H-VrWuxArd?%*n8dW+jHB-`aQDR{T5eb=C z31A6iy7B>q0s<*zN`=*AyODV`nA1S6o{U^Gy-=DLER!OF#R`J1Qm)?;RO#HZdPyN* ziv#o$lc{_Fl(e@>J`z?gr7q>9{qq2)s(J-KBrR0=0!&DG7@R5qo)%0^YAq-NAhUUW z7Is3FrLuBhTM7<^RniK$G?EdlV*^(EL ztcLHR8o5cIZv<2-um;xgb6U4r2HPqFfK(l-A(54aqFusc75u!ix&{(k3PhzavS#8L zwTS0cHsGZoTCA-Hol9tn0z1k~ufd3!EB>VKLxWRrJmrdqTQFY83{c1)w&NxCWVC#B z;wg+L2w+i3$=5R&nJCmu>+%AvoIx%pdoQuEauH{4JwP-UdtY&N^cFiZ~cGAjW2L;hIpI^6~mJDkEuJxobR=|#U zZ2fK;$n2!q{5EvJQaTee9b%q0w7MGCzotjq#n(4jo|*0`uLb4Fj9tfN#=g_yeejsv zMCCqvZXLk18em#3XHNCNlv?O*T_y*&XUlO=8uxQbsS@#_QI}v)P^WEC-O_NY9pb$!}_x z%d3>-QO=01lK|*M3#z z%?|#j$Ycf-8%gO0_?=RVPs-AIh9nJqDV+wHR8l&;^>eAur`0!lz5UV z@FIa`Av!8wE2j8>M?Q*CiZx1pxK&K@;lHhTK`F1Giq0Ji!47Otd}alhQV%xP zDn@}lWr$FfL~$)(SOsT@5xlLSP*1 zy~UMi&&`Pr!%jX1>%9FUDV4+bjl&=+7N0kId;xif62z_=6u8Ap7|yVAlfj%m2vgsx z?b6=8TH1TpQuDYH_v`>udv-FVjH%gVc@Xv{Qg7pE=O)k2 z1ec;KWd?q0tNo|sHH?kN&uaEO0S z+bz#A4B`cb^}WRKm*?oJ{(>HLOXd0cehAbOdA7Vuo}&xs=)7#P_4~EhhK!QQ$qDk? z{6+Gc(k1eI8P&cmt2x%n8#LCNMAh)5T_?o$!fgpek`6;q3d5olV{i$Q1Qw}pI}&^f zQ=&x7<_b}=g;YgBuGZbXFXzb)-e)tvJ9t;_-o7V)<#s;#r70|09VlHmhgCXqHcNLd zLd?9IpD@-B%5?KH@dVu}cHELB4QJ)aC;shUfRc(zzdUnKs zppSVB-vI1Uy#oOtQ~>7zAX5NrG5{0{fqXq`x?BNMx^ZLBXi7IgsluClt9j~H zyG?JjYd3Gnm7&|>>=B8Q)6Kk(GK%9ik)G=&TTP`X3Q#I*Jrm_82E{3fGOL(m8uCP? zaT$^gN1;-+DIQfS0h|bByH5kta!RRihZEJR%B1VHqerSKsjWmP&j-g;Y%gsDC-gp; zq7J6K0_=~7?wQ$iazeezDJ;c|-Ujy}V~?s;R9uOeO%Ta>CZDCo^pwcwb{ZR#KL43pmw8P+AAh)qru${J&bD3F@?H0+(8GRJG4vO7MvR z9!Txap~2^D)AvS?5r zS0^tMw1xB9$k0UMG7H?e0S7wV)ZZ(HA%2KQcAm_RaRIJ8h}&oejA_Y9X%w$_c0!aw zCl3gUGq)l7*fr?)Q*{kC}SI;lrP4K2^xutNT)^437whhNVQxZ_bI(unX zx_SrPicatY1bV%z#E*#5b}o~h=eVK()EdKh0&XoETMv0=c7VK@+rePblVY{^luV-r zq=15_+voe`^cisJe7+nRx$)Zs;#o^%1D8;&sbqT2ZP5M872diIc=CCtaSchHvq+ui}^= zPm}T~+m6Zf17}T!D1;PT7+&T`uqR5n5?G|2kW6VU!nbxDvEwlxxYe%9Lvj~c_C6)R zLmY#5?#T^xRt??9VfBH0%90FZiK^Q`QAr1pnp+5lWkBD@;!I%Y0q*s+T)+zZ53MR| zbe6k?Ed zcu&J^30-*DC{Eslciy0}0+cV}wNfWvrAUSv0YU(hC7e^RQg?yHVW4@vK!7TcZ^bwe z_@)%7g89~h`3BuNIyt`ug}SC9IAAz<2NwZzg9oYGy~V9*uY7G#*6iF)AN~kw>02ww z(3oW#c2IlUZ8W7+peGF~6$6!uh)I)hXjCko!VE&KL}*o9x}IZBOwJ?p%K@%Z#0URO zI5i+yMTBHf8r7c4(T+->7@d8qECM=ostkit8ljk)sk9y@1HGvj+N6&30`w<^u%hx> z@_4z>A~iv(xti)&K1ZP`1u7RG4?F@-351-6kCO6ce6OxWk_CvNV%k8hL_w0!(=9Uz`Z#$-q`MKUSG!-ZHZ43&cSEm}q| zQgo*c+o(rbPCw8!jHYU)Yg{Y5lCtL28~2c#+rx02ef*I+#nU|usB%U0@`gsW!l#=h z0Y`#^Yp^^$FG|MN03mx$$t-A;%{%90DwVP4FjihV)g`Bnw9B!Bbqpgall@zADbq?Z zP_<`mf|M^QmtQe&;U%EvWqL=wR0l+%AH7u54@8k?Gv`1S=la}B=u*!!1L5W7RWhfP zKXCFJT$nS(y1Z1LYTYK|>Fqg<9HG^bi|qa%08?sSQmE3_i*CLJJM6fK<5`G{XL8N8?1Wt^RLCR`Isy!9h6NypBZDN>DvZYQ3$&ZV`ch5 zWBRs?o--~c!a7SU-LGlZ{WY!H{%q23-x8}Q-#us{Rl%rKb3wYKt6mS0D-u#~x zpnN!2`P;;Luq3@zz|t5mfX9_p`RlF1J8@nRk1Jq>0Cs`A)|=-W0jc{cj>E1r&bxK{ z0~x%1pW_~Y#rFTWCHbC=sXcDc-5m~ z;WM!SLUbyo==dzti#CgFRxse<5fp_{m{27=UV_8uMV5n22#%JXSB-NLJqKP@i#@4z z;d1)a!mo&r)Si?Le@iE}EW&x22M1E{N=FmRA+s2hfUy}%R0d*tHb9fW=R`%MknzjJ zxsxa%fl)XXQ%tfe44pPIG6@Gb4xz{t2@WO^mY5}RvFQ>6t%!?Gr|^yH4{ZmKjP901 zsSX*xVs&Z~8>{OE4<8BifPGOeVZoIf^6t zj;ppaiAdu}Ho~@-XP6;Mt}a31j9Fm9*tf*p#C{%35_M+Mg16XMy8wEAVrQ$Ocqm|{ zfW@>bz|R*Q%ahnKm|{BrU<&K_;^LC|BPQh`1{NAYQ77Ou&tFE9Jq8i3-41`+#^lxA zWaF61+P@Ls8j~du%lmO*c5y!v>%0qqXgkMQJiQ{Y=hCc>U_T})U+l;nzUZ4NV_VnD z^u4EK_TjT)d*r;#<(RUAi8%+`<@7rZa%_JUjS&kdvB;3O*C*4bHBsJP8!Nd>YUIVH zHS#K8^%~91U#(vvFB9v%q+kW7(%ToS`x)AfJ_T46zN~`PD@`lq#WtFY(-6jrf`hC) z8)`Eh#igT5rqE2l?(B66EbdDva216T6$vzj5%om?Pr=;!;R(0pvEDQ9%b9o1%aPM~ z(l6a0{Gj6N&V7n1?mrl#pkt~SQN{f`y5!E%P@F;xE0*s}mhvoeRI_jyS_4}OSN5O% zLE4*6Now4pzelRt?^xAH4CJ9jWJD|P$?nx(7>4v6Qk~k%2-94AuZZEy9R903Vw{-N z=^oz3$O2HRX#d8q<)K4(E466lpuXlwo#(Wo^{zyD(xkdtyP?3k)z^v;tIH=qzX*pKWxsy9ive}CH*+p=lsAOjRI8@_vO~u zHhC;Sbto{(M1tJ+2b&bDg1FVFu!89F6Dn73sBVtaK=%TJPv%SifEZA5N?R!3kvr&A zUZDvPgQb{%mr`I_CjA??VIp3L9^MQNVTR(d^jsxSx%Bm?>I3^?P;4^V6|oi?bslm@ zIOHmTAc!fx0JY{RqwBvw4rDU;}Q!bZB#=n>ttb#bH0By)oEbRH+aQzO~*Nqky%PVNh)T*tD0(t zq`(y#hzXm(E5)A%&l!IHUiU1ZwixrR9T5vT=Gof3^LJ%n06XQt#i5Y*YuW6}%3 z-1sq*!2nOD>^U;YiUFZB9hhdt&`@sYf>(-J^OR)q8pS6M90i^ne&||W=u^Q8+7tzc zL#(1Wl1O}{WS1hSk!5A$Xu^cmy>vZO?`b%`Y#la{rIZ6`6L_5#O+!p{^jiMYeqgMF zov+NEW+MUgIVdG-nt=!y3*(+WFF;-jEt1hq12S#zNtu1%lvp2nSLVKRL1rDG5SQUl ztG6}C)xDWajLbxnN|ilpQ)Jibc)2vdz}3Y|WZZl-rIuCl8p!h+@!hMnOAR)?LJasa z~~Qd&tI1ybg7Vg zpGpKM6^4N+gd>o{ml8e?^r}e2-7_Q~4;=-iAXVotU1#z&5r}T?_jFu>6046ai-yJY z8Lzitj_KsHw;)p>6m_k$sBfKl2_60FeN$+cvYWWA{E$5JKd=5%l&Z6|Izg5C@s*FH zH20MBR^Ksm$IUoiMy3Bn7S*1SuIejhOo4XD)oAa~7O-jGhOgye1*n4{)hUYa4jFt> zq*~wgu_XBoNLu6)S=Mw{>T;P*w(^d&lpjDix3oXe$xfQuQ+z5`eERW`?cC#JbKmDu zQE*l~=+5AYyIajm8vFUGP^IU2FkmSQ{ksmmer?OQ5CkjqV zuKWQdf8M2vDDrcFN&DL9P{JEJpb*k@OLqfe>_P6|0jM+zRPZ`{=3SX(Qb;MM-EV zm1RNb#t{_KMM(kTIht(09p3rcAM-#|T}r zC(Xk7G)m^^0!$CRI^#|bBO$AA3V+ZQF(pMVF_Q- zCwn)h$@?3^<(+l0a$tbIb}Jg?)t;R)Zowv+=&JQ;t&9SsUInB^5dpq}c>apsHULlz z9exd9dQFLz0uwf?QSGZ~xH}-D=C6}C7j5F$BCjmkB{O%P5XW;ji8`2TxP%#aoH1bpWbOSo}8B22p!wq!q z-Hh{hW!C#lSHFCh{&wxZfMehO+m>GQl+^>-hBUYV9U7*aU@QtN#cn27L{ zH4X6{>m0(t4`|&^()2dpwWWPKZAq^W(zkH4IHSm_(`9H556wstF*$ z`-of=0U*WT5{M=;N`l=4v#6C-Wpiz3vY6vxMmx(o%Rs8|A6dV2$0 zB;Z{h&7o)6>W2(y(mlge^ntv>qz<;^#_<*^BGOg68ZI++>93Q#i{xsI%* znLQU!P~|8Ge4Wl9wn0X0=f3{PVgCF95^@NSX_7#SHi7>{DW0#k`8q>z8N(a~i1Kh9 z07~tPaU;N{>RS5fMwd>u(L-hfO15*{&?hsw0I-aJ=ppo-nZ=IrI#J~4><$^VU_d5Q zcrtbKA(=s^rasM&U$wou7FFa2w6ItI^%t zW#Y;M;(YNs`};jwpL`@iT2FTe0|4yFlUUD<`*x`0tB=zCn@IE^tm)WEZM1xYUcIE4 zlr_<+V(3NqLIJzJ{R zn9c%7Mk!x=LFO0Tz!?6asfjaeX}B_#!ybqj5uz?m<%uh zRM)6)(a^58iy<0x{isEOD8N3TDXYb+wn#+p<#;p^~V`R!501j^$2LR#^8&aF0tEZoMQO@Db&-wW9b1)?rLPsxvMwwBNe-tva zKj9qj4Wn{#^`V5r&%E9r=H|`kDnNPh{s!OxC2#Kg@Uwx0eZIb61fUj6_!$xsZ&HVG zFeq)1o1x)ehIW(zhyZ5o&lE|We;}DH&HB3oMs8q@3qa&R-K)yoZZIcT1w~I-qYHo( zgih|nZ6ef2^c63a!M}qPq{G-y&$qz6jz6O!q z`BDOdR1Zv)NOpusc9b-Bk)$*{8h9oe(AVbo4j8Ga4GUDu{1q5uSCD6|f$jy1y{(7L znQkjKfS;FFBwo34;(Kza$Y)k=UNR=!UD6W!Bp_{}SQmH8gjQ@z-2*al3FBT@?viQi z-JR++eHBgYn*)V)zA_3z-=E)y7YFrgdPq`=g+9@~?SfC7*jS1}F> zAgU+SBi%Quf%8UK60`SSZzTk5Do--A@02HLz(LAs!F#u5^t-oZ z$~gu^T>y^WyCbvSyNmgWJ|er`lk%+1GWyNA{{oVRfBu!&wY(#XEAGe!fJcGF$V>!q z+JDj#WW7D`rIaP@krgc;$iDSoNuly215JAdfTmqv8fZGKLEI1Y9Td*?uKPlovY7%f zuTApfw#cf*=Os6GJ&*sF-I~{n;WmJ*{D#fvoj^lCD}h2QbWj z?z>mT`oaydy>wIN0@U;L{NgRKzkEv^-WwEqzA49x^xEQF`)xT~w)EYy1Ay!=-4eU^ zZt=5&V#BS?#X*^U@tRnjyC&1m&{qBQ0A_>P17165YE&(O@0yO#_8h4M;qfjnDM zB)=*xk)Kvq%Wqoh<@Nkrc{wIbUJLV)=Ur`NTo8!mYA+LK&X%_()97~GbeTG7rV*v) z%+_)0ZsG{K=>OA&@4*`=whkd;*8fPnN^Y49l`5j$Xob$GXK(~ccs(|`N_Cc2b%;M- zg1wC=CPOEgJ>5oT1A~4@YAQGCz=I&KIGN(*A)}&$WJbdp#)>W>?a)tzyb#OXVsXn| zBvWw4qOk0_Z6Livobuww;1{vSAN!|jQlsAn9n#RD3-UOOP z15J86O1TnK>qa#xT&Q?%1hIs7<#>839PFlENV(jVDwKQ6}{% z?7)lU-Q;%}4$R`5c1cH=)22wnnKL(~C}Sg+Y|-DtQ^R+RX~c(rlz@_>Mg`xt)KV~K zOyZ0Zx4?|HTGFaqRg)B2n(|K2Vs4OJ-k(T%>f`XIfzL5JeE~=TEC!?uliK_z>4b^J z`K%IOmud#^o|CfV1BNAO!LI=*plHjI-v0H+XF>>jwbC6V2SFf8xm*VW*Bgz zjICHCPqgtnD3o>KL3R631c!A7!bCly9JDbL;|<2LQ1y6BKh+OVJdZ&S9tn=scca}TthpEMv1~w+F>9BTdG96Un~&!>6E95$kELW+N)%3m(CAe0 zLF0*IBaVVyHFPe){M0E4gg|8&pQ4E#T+w{2Y@8@x2aro`5hs%2*4Cvr0$>q*FT- zN=kDUYy8a@n7QWQC{|e+GP|r;#?;lyFFR;THLR&cA|7gPmEjyeTHGVg&ZkLZcDg(l z86dx$J565qb(GQ0K+|kAsL3;ACi>OP$#cZo$__XLaveP(Ot3@PTLgNaqELJ)p*UMf zHV%t&1pjgz5d~1Vm;eIrbFhYy~QLrh**GM93IbXwEAQUi+yBlpu4{P3}*T=S>}7(79E{(JOsIH$<#w zw^(<-E$(ewC8C7uGh?~rB=n0{-`lh`W7B@0P5b>Ju_5xXf%4c8iP<1^xFDrm+sCw# zqwmR)Gw;a-Hg=8FlqQ+Az?x7~!DXVAGgpS>=gd=?a{e|nX-KSy+^pXJfC%Njl%x*O z_qaiR^rQdyr#NIrqdhw8&;L(;Kxs=>&Qa-xD(xNk!kE9m>olNL>BtU?jAZE12t^=m z^4(F)GgeUON;=88ndo@pkb{Ebml(dozzdK8ooN^#r)aj`C?n0Tvn zRo*lLlR+n_lN!@|YlcjIPzh79!c(3SDJ50?NM7DNzTcXiB{<{c}}{F zpOYaI^_ZS2Z&{_uL>scRbGbh^M<&lqk*U_1@|I18OmWCDx6@~($qf4(ndVd=GhB;g zhF2N1zfh)nSIFh}Z<2~*!q$V>%@WUnMjtYL>mCPxiQB~6Cf3t)V)7d(=a+Rv+L?3W zivUwhgT~&KTO~HHjI7K;>EFb->%P^J!=9Rrtul?PJc&ZsAYL1jmW%xy9}+r5E^%HF zugR~*7D?S%e0B-(9E2hu(x8(Qq{YFRstmATo+HXHD`M_k!V+r-LJ~K$6FWA0S8&D$ z#Bvfxh?2b{VlTRkn+F5{%<%Omd#+>&YzYXABzvwRk|j0_LE%;+6co&7B4BB{EP(W$ z5Ak3Cq|MwXmFEGOGNKee=L!K+7q_dcrM}ihi5W<$@uwU3<4-&qfUDaDqNElh&73LG zb9UzSPQ;o#=k0+=2G0l!N(Q%l5zP3#h#MbQ7Nsp*lsP5G=a?ejaaQxhIwxDKVMT8? z*30)7;X&6m|LaGnKKf}}tNa(wyaFA0(c4~L_q3HaU2J5+yg4N4W{Cs*)0xm$v0RH| zyy0P?WJ;s>Q)uE$`B@_M$&qk9m4#e^Qq{|?iOy!tm?u-tL|2{_fW)r{ak zRQQ~`wfw4rCNuimOnQiaMz+!niSARAYL+swa0P-@Kb>28VU-IdDydt-vU|my4kfmg zOJx?Z*G%jHlOZ=_=;%2Xa`RRTOWb^b&XX?ZA9PD9+OTRv6pCR&4Rnq zoO=e!@;MEZK9!wo?^3qQ@Jf{IZ)^gV83U*3Ua7MNj5GX61)O7yJL#z&lG^k$;y8nh zcj#({#(iXDBvr%JaNgf=N0v6;<9GR53KeYl2Ou-BqZ;}OUhf~hQbv&2`Z0-}9~1jL zLDu{yE&UV%vFSlV{*&H5KgXT?d{8qbj!<7+n-Zp^i<6v`43#q zkMpy7X$)^!z%gGQX<=Ln#OUIsYxFL~368XMn^^cZv9ksEff*t;g&Lg?ujfjTbRgg@ z?q4Gz_Z|)4cN};}W;+H^&fCG9*A?O$nTTPyM^^1TDAfz-W!bO@Nr|c!brxk&LQeuN zf_Nr|1YJT_F+JmGq=d^Sx2~0{midxiTq_Z2dANC?Do8>~d2AhAOlw9PTSu8bV-C3_ z8ywG=daRLB=Q@fFv78-pl!KE8F_<3|$y?^mbAZY~Nj!VUZA9+HH z{BQ_pJQl(4tn?@{n$6tB$4Ew6bm2uTXrwIQAOIOFm}Fci&I8||XhT&(LgK^^XbM1H z@>c5P8HQ{{%xUdr=#RpVLWMHqh2Sf1mFZhd*b#?NK##(tM++SYsbCGAPr^xHBsNRhH zvxPT0ArSc(^(++ALlPW^-obo~r*|008p_w@P9#NmHp@lk%&?OglL_C(PL-(>tz-_5 z8`kGYZWRB~bayxT4KVg3X$-@@ULMxeDnD#lBtOHh6||G)wv{WyA9#t+?3dW^1(NMg zjWsZnme?!l+-AqoUkCXpJ!2WYZI;nDW~t<)EM<^gzr+-9!SM5T#8wj*&`Yv=mHe14 z$|IT1^-xZpJW^67kLDGMJ5ZGtzeMbrR6hCqRhfAnxdGW?77~RO8tW($IQxz=h4MIw zF=Pm3Dw+rzVs@Nfv^Q{V7hVQOM*RHDEt!VQGvmTtfan8pKyA&+TmuJOB0u}tvwsgF zP2YjY!+-j#Jiq6fwB@}oOKNGaO$y9R+BP7frL*c4(m1JTFS^bMJ=2pdOFomauphCz2euQ%0hZwCd#(^-OBJ95{T=gg)1pEPaFU<~CoD zN;9g_Xxw?5(8rJrUGevH<$q&)xQ89$Ha*whmla#Kh!>@vI;x_XL_|2vky;4XwCi#Q zcD7W=Mizd*EYj|&h1F!du*GE+Nj!euxJ)LH6_T>2_9C4Q9C;PkM@q1`VU`YqmODcP z+{r?Dp~B4JlD3;i7{snQdk*Iglwz^sZS1kSKsX#(`Sy^2xmwEQ6Abb2LLd$!vy5O1 z8hD`0==<1%4yv$tkZSiMXbB}l7KGg#o2xuZn^T))~u{JS} z)^%ADN|GiGQWS$v)1TKRzzI~`_HYkI%^`FHRn&H)-eyNl9I?7x*q#0GPJ7@#_9eCN z!DskGs^-zXEQ9b*Tfk)?W+Y(A2_g8guc%-zu4j2S%Oiw1?fMt{*~2YuGQ6!_Uh7#X zzlaW#7rgA`C8t^Px|5a6M89z$5$~osIsRwvP$5^S&s@01jHz=`k8Q+i$~;nBb7aD_ z88X&thP*kOAt2MHn_y-(ud%^^^s4)8`DI+9)aWOUdW28ZFiY?JH^UWvGQU^;PuEiU z_4=J8oYu+9txM(Uwk7fmiG*i)>}kqEe%7;6{*AVNkKr?YC@Wir=NHL{vP$`0b)7s> z-y}~qunW~T$jIt?d91QV9?i@VSL)icS=gQ(^!q3Dn1+5hjRigneR0C&A=z?_Mv*5k z(j(~#^_BS7%r*KENhM5zWXtct8N%M>wJhnG@PpZ8wp|&7otnRneg(_rCxmSOPuK8w z|1|&2lK$e)GP>s-=_(zP<;_f|C-5-6Va<}(dzw7bg>~plJZt; zZwr>Pfm51=y)7C#oS0iF;VHS2k8Lltke*%~h2)Cz)N0HSdTlDCwHUr(3F7Y0rpV^# zLH}htCqzy*bq|)K9fGGToBLc_Czg$y%p+#dT#y41x-FW6UocJn>{#9&Ka z%;4hYEq;iY`knzn5hl+R8I??uJlHr?5`d7{Bt~Dv&`&z0kmZ_f3?y2*mXSmMki=YL zMGU39Ks6N2DO+1Z%!v{pe zAU-3J$9+%{Y_WMyZEBLmx^DjCKk{?r#iS^C%8CIOF0*9ZyxB5qHq>RZHGV&9nLY_? z%oO(CS=KVfW|ll}J4JpmcY^#6%lo%}j`HhSbboe4rnR$@7wl%pf4SPq58D<%YI*n9 zM|MKw+B)QW3l_-;jz{(W;$C^IZ>bFL>XAqE{=&sFqNiU*_Ai$wSFVvKIDdi}bKh@l zl_%N9pX6MZ=HoO6f4sUuMzBIppl7eX3>(45ubo>J| z52LH%rgRoulXVL}HvTxXC?C~DsdWqLx7)V-4-~Lpke@{tS-4rmFhKL^*cw`FZNMh- z0oiWWCRABzwcc0ytedO`I7+MUFiUBO4fYm~>B`i#JIMX(WOpyVe+`%PWhvyZ<>8wu zMT7x0oy#P#s1kL&UDo0VXa|g&`_@WH<02`*Oq;@nl8g^CiNH0hjB1`thFwuusRfxO zwRE;&1!v?|(UGuQ3M-q*{Gt-nwn=zwhWLdhNJwe$F*NqL? zjmX-^SEKYeGQJjDh_^4B86zO zoXUBUx+i!|8iw1nOboLr`TTq;?}Lg+gzgL#chKnGDM;*aWjH%pltfd|7!Z#tkN^_I zq9BBs6|0+W94oPk|6?BSpG$T(F)~A3ips>MsUFR&O&*0s_vrfh@sAptb*TIq%HI4v4Sey^)rMt1kgh~9p)9v^4@=^A`|=?Zzge}#-}n=i$W z(?RV~-3&*v>KZKZj@Kk%-~1nz=%kf1fL7_2of%-It}W<1}7Z zX4J3x{e!hZL_+? zR2Eh=QmoUlSTfi(OK91iT|ysW)@UlPPtK;hQ(OkcVVdGBL1Za4`GjytX#(pf6gNW@ z4IF~P6KJoOi(foLBJ{a5Jf4Ku+E_vj0NU+JZInr<>zVo3%&?{D2#5s2?>u(xSoH7k z$TW=f6eDXY6Edr{C(eYf_K;cabznW$)ik%%#!YV2#sp$$_rW`=zS$5uj$6$|<)h9< zJAqa}_*FD3;CD_SMe9T)H@CT2{+qR-gmQ`gl}7x4ed{Mh`HVw+Szhw8k!J&4<*AHB z`Fzl`7*S>GrlX)OO(RgH|` z(?+n89;>L7$2p#4AA2+}Umk{zmgtK5(ZBP1c@z+VvZE!ls%Fx+pa)<2yJs)U1B;Nx{cEP z{UL@$W*sx8fSoIJfaPB;<53tfkcQaj4`%u}tDh9{#PcO0>8pXpuL-NSDl;P?QA!`;z zxYgFRN?LnY&@zCDN%Y9gBCD3l)s@RGmP)CA8oaBZvI$2w?UHybhn=pmv!9j)4Gc6{ zBn$f(GTlMP4JsHk>sCiLrb0y~j0B~uv?5A6ba#wHYtd;>sc7Y?Tp2mMpYqli#Mewh z*7Q6YM&=e_yv(7U6FV!dSTgxN)FP8zP)8YQHI-R9KUg1Q_yDWbKUl>gx`=pd!XLd_ z^I>S<_UvFzj+&FhjOmBbIVhFv5oP^|M%oTQ&%@!Yy4o^Woi)|;-{mvQ5QPe<(um}D zwXbUsTSCJh!S9yq8hPjkFu&n-_0nzbJ<7V$g;J=?<_SF;&e|EtYeu$p%J+&(WJE!s zJkB2Tcwv!@gyB8L>d^h>k?b6)&=vB7mx@~@EPthB#4VNO4B3A7;x+R(Q*QV9=buaS zu`4o~>x8;d0o(#JAU`(JM@6T`!n%ZQv3Y0|Gg^x@`qndDt6Q`utu^-{lnn}`*41@d=;E@gvU z`gd3=hV-GXs2%dI*>Ef&nO5uSoblWDSXQdQu)K6zzkL0s96yck`<)XI!6uw#3?FNu ziw=c*k&r82Dz57nEt4hdw@OtT9m(ow&egt%CDXu$!mwt@U;>wqR!$evX)GIkwE&RT zN-Z6FR?f0mw2ZEOt=*=nek~&&YN@!?E<(k08k^t0mda}0vtc3KI%vz-MD-IyG#7Oz zgD|kRX)*6d4^{2uT7gHOZXLzkX5sJ6h3w_9Ty>12DZfvq9G)ej8;+_j>Q(V4l+(>d zi;0|_xFtobn~4v_Q9dMDBOq|@EF)byF-ckYcd&$@s`x|t7Ix5Do6oHx@m^kxXDGE) z{Bw%QQZ&m%^pYn#7RWiXFov-?Jd~Lw4SI<`If4@XP$bD^v?zU-(B%#R@db$ts5>`}3Pt3V23_elqFj1IZ^4*&JKF4XI~@Ze@-2K}v; zHQkr|l-=^vxFX9{9sF}@<)_=_iOq>iR3VTCzK%iVI#)E-iJMdysK3ixxk{-XP$#8R zTDCL9)jg!Z&(G;=)On}rWYaEl zM?(i=%U3dKZpj*{?quF@S3g;TcCrl^SIcT8qnIm$5ZS}d)WHgu{g>=!yJqJ8m7(>JTMnsOQX1~#_Qm#duqe7s*Buc>NU zAjS0QQe$j68%HUhTTFjI4PBI4r9!PD$Qt-#hVbBuR8d0Jd^g-zcJ}me!Q|kr0FTZX zPZmT?;2|8YD0NEZ!eX;z7J#p9@3d=i2b)$c#-|!WvrRU95*bnw^{G*}$1AXuF%pc7KY5`!t zcgN?_QFX-h?AC6RXK0JNYv4n337$YMHy+1_^uj%~`A<@$QNZx#+)KC|>Bel^Ldss# z@n1@*Ua7;ry;2QbQ5;^;dSB}EPs*r}A{hn=Y}D`O@ljEAGR3J-Tqx*s#AfxotMopi z%aN&*A;&d{+O1ezILIaGcIWP=mg|>m*WwH%Veo*o3@YJKR0g$gYA6AcYe;_J=tRVOWJ_wKe{hTTGp zbUITGb?|k(e{~Z*F_sQc|Ib)^uJej2>gD-;a*zsAxURGdc3e^pVLM@S5FsayFddWjn3|_ zAe7KrU_(#{ke?whzQA&=q9kv(oaN?OuG+``U4xV~CY1N>rDNO%Dth}RAa9}k8^KJ4 z1!rw+|Nbg%{gzk{AO1TPhK@)N!RY|`4ZViURCtq4`DXLi%f?)#!*#Io>c#KNnx6OM z*lx>JYI3+E6_bzb`W*)Tqh_$hIY4*oio2A}e_^gu?L%m;(}(plb`#VtD7q*ZehlZ3pDB@bKSPfop zlF?Dc{N4B7mwkti%dWQ%(ur$<%&_vq2GSzwP~mzg_H0aN`EZ5awan98vyrP0hj{mL zhM}(J3WGL-p7{i=r5K|MP%N~-vI1U^SwtNVfoygmaxYZ1wyh8E?lKT}6^#w}+b-WA zt&3Mn2WZ>D=d|KDZ(F!R79dt>OYl^;|)8Y^fVh@6b^&Ic;(>l;Tq=0@pXK0t-`Vl%(6 zpiI(^AE7x8eLr)JQwpO+!=IRITrcs3 zkcoxt1i2Br#A#-wbXQ-csl=cE;VReQaqWCl2Xc)-@+N3(dia_^Qh9>qiql#LW`9r5rx7?S zArHw&IZ7V+(B$kgctwVI2F1XOV(Hyd&g)5pdsALa;-U_|(#s0f{wZyIZcB3)O`w?E z0Lw4O6%tTUCw6d#sf2(kqZs4B!^0MJ%dqp8WZ0KqbNziIQ4IU+50-0v>kb))Orz^y zkzU3BA6@SOW>uMG{hun5X{O^h-!tFLzr*x&+dbVTlqfmpoXw$wwz1o+2)D?f1d%97 ziIQ`ss>oG96;R|@fPji3ii)Uh@BeS@_ndnRb?SL8b?e-d?&Yqv_g*`^S<%5GrrlDi z*~^ajoTL1W7QM+LH{n~3aOr+X`RLi_ExPAk)0g@xk}}zM-)BR@H~bgB{9Yy>5}Mvs z40wWuuV;}+2E1b%7JXjE-;l(wX07~%^hwB1_HX&Zw@%>C=DlO% z`W(O}d`PqW0b4m!t2&Zc=NrCNSh#vO^uQP`C6Klupj_1I`M|^iBs+=H7EX6NA!Q-9yJ1$>D5u+I0eGz`2B)O7& z|CP57?ec6Va@0O*p+63`4jyGxQpsLhlef`UuFmzPsav$YpCZ4B_9*#xEgaGPp+~6J z?_{ryVMSF9ISr#Hj#2a{|};Wr2)qsG6@-)~?Q7-oi8 zGaSGDHSXa>QW=kcmmYL5biud&+jA^?MgsJ%`=6qN<6$aip2PoOB{BS_iSp%%V8?Tg z*SYr*BgWgPe%cQkZp}xJw%_vqQf?GWbBF(z4juU)`t`5*UjOELi}35BFTV+6 z_{s?%(FYeSTASwtN2lN|&g}^S9k6!L=(JMnOdTW|ROIKLL_heW=%yrk{F>zEB-F+{|>n5VQ^~#`V zuU-uRQe*bNuRmg=UOwcdZQCh5b2D*u;s(i87Jxj?B;Z^&^E9gnvLYAiqTHXp0!D>> z1z*{$@q2CZpp!T&J8i~mEG2t5|nrJ#Sc(R(F$`n}|Nw z2UnlolivN<)`hSA>pp^RG+N}VG6`s$eSl1VzLq)s?oG){KOCu-+3&f&gArH80~;I^ zLIJt+PeS>El-6r`j$HGza$H^*z+yaoX%yO zC?-vzN0NgFE)P6H#()x>mvV+7#tgJJxc;5G{DnD%18pp!gzW|HNM=*-oym@VAdbiY(zsnDVJq#C{zd4sYz$9wWSsMl{3>?AI1BBLEm}(H1cnZlS zMbPngu<;ZEV;=?!yo{LnQV!#zp!!}s*Rl?O<2$Y3;-M#45DN|cIb5*k(a~Sv_ajgA zV(GW1?T&k?>mcL(SL#BZW@yL@1Ts%CDWxsAXwiyhHG+)+6x~iC9G^ng?~OO6+XT$a z6+LFpOl%JexLgp8fH)vDOlN)Ezy}D&j)9EF48wU!CBiPF>2m93SF2 z@tT4R0*=_3`teVaJwZxrUa09G9KNb|OM(Pvl{^&r^s+@ecUx4rBe-Njnm|B!k`fZK z{1xEfQ0S*Cl@}{k}?Y!mdT``QCg2K3*llJs|i>a&~%*rH}`SL4W^%YGZ;kN_f+H?WP0!-b4 zFNk9<;H{P7)eW~E?Izi;Ca$&Y&%U&4DfrC(;vd0$-c{v^(RTaY1FbnGrUOHa8Uc(I zn2ir;wm3^^hRQYGd51n$0HB%vXXJ+wfuF_v1b<8sc?=Aqa3#28ZX6J2F+Hc)|6Ls$ z)O>9}j?Z`G*gGUvjxc7b80~JY&7Zf-#!i`PE$HNYiba8*BSAF+zi7m?`PRJ4oisu` z!54fSOIa|R8!{dPSxZ-vFQzq0wEDKzAo=?X0|CM7K3L*Kh`#SD<9w>f%l(+OM#)Hu zM^7{(=|(RRA!}}=w4OgvB&B()&-K;u9bV)S5Js-<6i zexOaF7I4norNkikUOb;nbpIA$m@$4T~*o;LI>5O~K@QwF|c73F!!K8)il{Sx7LrxpXLK05DUZ~#OCK%7>n#-j0D@wyuV83qi698j`y(~Lx($j z*6)}}bM1|pOKjGXH7qTSW{MG+Fl!0%{5;m}nSt?mgZkt*iREYFtg&)EGy0x|iND^j4kPw6LJt}#1Ozu`W6KIyAsM8PM){^FBCEh z>OEUM>!R%|jA4K!$du+O!YE({$>0bj%)wqNGLroD+5?)-u?5Rm=TPgHJTjN z?74i$$#J{|R^G%xO1;HD*Ug+h&*sftZcCP~wv{W_+uAjoZ2kH|%grsY^?3!hcG*UI zaMT;tn1Y4sMB-Nw^EwK$BZ}i9g?4=ZV z@_EnXdQ{*5*o6(5Gy0t6sBN{9zWCFIo}qq+;&I}F!A}=ir=|mlu&q1uUawuw5!^XERcGasI}bC}0>Kag4A>khRmj_~xZQoM4F z`06Jk$UQy)Mkh7LU%x$;01o<%e5FcPJr60ivn1-y+7V*y13;h{i7lT7vjxQ3Z}XL# zy_?B?6h2~$a- zE%XlknNac@Gnd=&iE~Jy(UpxX^)$oC{tER!@Yu_CH(&7{RF&R&pQ>0Nqt<7T4I4hr zrPi6V7qKD_D~mz#Q+Z6AIp1bd95MUtr8a;5a$B}^ovmK8(em=P+NRArZR19k+*`lh za@TFPt@+z+*`i$QGVFD0`r1hQl_(e|#=rdKTs*w|kMMQH5sJUmeC2(4ziih#B;C3k z1VLv-k3HeyR6qTXWqFbUIVlyr+)Mu;EJ-hlPs2g|wao+VNNQ3H5KNF;2PDElvJTl1 zQJNop?|lHJb63tRS$8PfLa-UYHTwHA{N)}~tvW=RL?qeK4}WNK-~`SbT_DT$P{8X8LtV z0Q$1fMfuF=TK1W(TgWU|R`VH{Ham02pRpdTS)%IsJvLPV$ZDczz1mM^Yq*~Mi)t!z z=Y8ray-X;=fInI@=8gRj#J@{|q|}ByQ*0fZ^tWZ;TN5)w(}ojj6kBdWy%<_e`w!S=NpEI zM~KcbIvAnggazm9gd-9pqLG!J4rNLbj*sJz9m5c5sQqE;XNANfs`b_hi3^!sK4+25 zn77bc(OmTiB|R^{!YcLz82w3}i~w1~2nb$%W2OxrHmG2yui&BOIrcgF!x1M$dAilI8g0t2j_!&#XvaUyg~tqI~Cl$V#LmzlE`Y z%!^;J9eicE*#TAqq8n~RCF|0SbO{9+5B>>hm|DMpvGEgqOW%O8|M@-gm0y+X>pmRu zk)EX@5R<`4->@6o1jG17c(cAtXjx2g``?SH3MAFL_uoWt&kD#SP|}f2`6RL_#7WCv z@{zYeJElCEk@f5K*gAWl6XX2*y~A1%ADPNM<_k@knG7k_e&>{I`o{X`*{gc>2U5$V zGOOZSwSWqBCi~-*SF*0Azhe4u79vI68v5*RtlmKHq0}TA!OiVmB)Fwy@P3fXKkKl1 zt7m=Y>6%f!4qNAD^d~*I#1>CEPZ`f+44_t_3j*Ml^+^u6!jB_};$!!as; z3WZPFE)_Z8P=SwDvMEI*IL7Z2SUL}a5FON&6}E#vO@TN82ANZHnBZvtkz-c0b1#J_ zn{C13mG<_W#WsKOa=YV?jLy98DHP=i;7a`;uQD!6eIDa*M{hS3W zY!R#NEM2zFR;^xd`Rfa4BxP3i)}2;Zu-mrn*kjwamRRBT65G5H+~sexP5EGt;OAlH zHP<6uSOeww8t~`Xiy}Um_$!RHh;avwT)oV4IhXB&!&h5Y2HbhBAd&%zafcI^!CkBY z{QT#^wo!^UAVfZNIt>)=qNs9Z&H?bUBJ5l=hT8IgJOyI+-p^lHx2)*zPh0e#|6gK~ zu$6v|EYHSZ%Hq5BXKu8x$R2t{x<|j`C?bN2@Ae8gVZYu_CjWZ%sSjx+D?$-_*VfLa zM7$u5rMwGKOVDjz@hM}Xz6yryDuHH49uo$JvFJj(arOe`t8Zcm)exbwSs^Pk2F2@K zQiAZ*D*>4$7z&RAceDOemY!*gA2~?7x-FGuT{7hYK^om$AT%Xs^lCku`PzG43acRo z!l!Jix~EpmIf+*q@adK?B~<=U=5X!o0L^)0KOk*%*zRbF%=^e%)-1kgucUU{pVuF= z=P`0a-o0Qm&VOq2PkdlEx9Dg8lbT^!m`bPUZWYlg{{74a``OHVtIIH!>Wj9pr2G5U z21m6Xan&G3-JB~`6|L$IKXM)Ktl~9k82s%M4S;HxF@dA%4r>s+rSEC%_;KJVed0JK zP-CKwNx$>w!7OS(%W+JmrXXmM^dsbN50m)|P%X6`Ks7givqN;&?1jKBSu-k(e}ftko5q>cv|wtS7Grl3KhKA1q|q509;t31x1YY- zk!)oA&2Q5-!6}H1amuq8r(oC3EvL}e=S^~f(2pQ&VF-DPa#*8#3SlC-T=*p{O5J@epVd$=1i)Z?4+ zBbix1_C~(rPRh)Zd~Ff^iN#Fk_tn@alhiPg-GFn-mGF%O*p#4~vx@;F*;=Q&n1_D% z^(}fWLA3)q+ehQh`P3J^Oi5Bn3CPz9+rs!ptm>6$9%ySBdm?KqF(rvB9nh)VxnJ1N zWNhW+uA2Fo*NeXX(jmLM6$_Bj^0H>mXS9MHv%gK+Z4bQjfjvSEPp{J-+GrBKj3v@WPw+>#qIm+TT53)xdPqmd{(AZHKJoku$83e%9Ke%h%=i2?jn0 z*YA?NN(s;v&eG_tI(kRD61#++s)I}ENqwbuLjW2A%%ix`T53Q^s#09tQruhxo9^<0 zZ*7ywJ%*DYT&sQaDAl6}kDj!BhmNzn>ORZE>@7l*nLTfb&6$I_oV&;d41Uc)|J*zt=CtK;WkRu^J=7cE_DD^};b zYO*$et7CX`!A{$TIo)2oheq4|R=jJU713~8xD8Bi+hc{8UdQtK9j>r!B=}snYLoRM zk=u00tJad5lYa*wF`n}_So8%gN5R!4^oo&ypBN(n;QF>K2NSS#7-zZe0>tC}@i1d| z8N(RIcYrT`6&mOtVm^+KAV|Rz`K+jFbt-8VbARqGD^G=q zc4HmMO?E?F(G^pvpU9Vf8LIqc!J|iIg56n`s{n5~*egXxPk89;j=TJ0jJ8a(e+cXq z6BT>K4hWw?T+^Ywv^QJ)H&mjt#m1j^7qdq4IYkQ0zn3+#F<(_ithDK`o^xeKtl+HS zg{8_UOEYqqR`dvzsc576?8d;4v1cDxjQ3kiAt_&L(M5UHS!nrL6-P;D(%M8`auI0` z$t1Vl?zLm~Wz@wVqJxx(AxktNmPu*oNIA_D5!dJsJXOzRw&b__`_5&Xmw!Qr z%m?nSh&jX~q7nU`L2N8TFJ4QSWW)>m@WBVM3e|^cCUI{)l3(C7l3F+ClC@YpEAWUq zCq}+_(C%wXXUgFHwq`b?*&y0f|6RV|NH<(*Eim$E>HF3b&GpH>G??G{y4AnyHL4}w zwh3>qx0M@kL-!oEO@ywu?J2b;M>O`1`M2;$V~!mI2YiC9mrfh{7UUn`6Tl{#Kjj0p zmHVT{P_Ddc5zio2sVhf04r#fia?#<7BlrMEan&`3!TCbG0cVuL9paFqrL3__C(z+z z`hD8{1o6rKgU4;hF8qWI1-5)uE(IkkvE?gmE}SuIHhDDczQWxZ*!$_z=lbs%vsi|8 z&O%E`5dMz^Fw9~s|B6+4wtDpjTa&xl^04R|HgC7h1-op=j(xDkK4*>Mk^?Nf$|Q}F zgSK7Uan=h8`IHKG5h&vgY}k%RP+<9JwcC)Zro6q}IuCu#8Vnm|H&EH82C~>`C!OXZ zMHD&u-QdF|-t<^@8?Hheu4eWFxAC!XNQO;D1xEVpa>5Clw(_dG>jMUH7Uu&>Nz}*V zd^5-qA2n&3Sb2aK!;;&Jy%69VZ{t}EZp?bT4KT;Pi|7ImJ>Cx3J<^Z=1pnWQ=n5ZS zrm%O3O&!7#@H4|aRacPG(*}fSq0q7OuX5YBvV{GNk*pea=M;OW>vVhmfn{`@9dYZs z4$W!l)bloH>=`c^S3#{@dZjqLPbXUm_N~k&R1?t~!Z_RkzGIBLFOV&OyZ7Mu2F_U; zTd$=w`fQ^KJ5twZO3%t`yYQ|V3Yz>X-8xCoXicCmQLfIrtDwL{NY4?(ubDUQ!!Qh_{d`dc?&{!A2|uX5xNCpISDJKhkBP0FCDP^JG^1D$DVcv zVm9N>hNt%1gPTsWUhX;cu6M2DQ6}dzn7aF}<95&XL+D-$VnSX z2Ygiuikly#PnT^iOV6?@I9=}tj@mys-s`)hPCIx7=-5Swo&J=({kn?UeQFAHptPmx zz7&;94HLuR--4%9cuMR!dyoL9J>dz=b2LPo(J#MWN^*1 zcpHImjB7Gx8TUTMH945r&TlKSh}wst0n$JFc>?K-$Ob@TNVjd5z|;kA=N?{-v5JH5 z8gmpSuD&bb88~Np>WCaZ>BaGWok@R5z8;_dP22do3Zc`GtWEe@ZyrW6!3DL!H~Htw+o>x%9D z^Pdx3e_*=^+Ru{iexzVOD}kJ1sUn6sfnUwHZt>nH)_BGo8_W8XA7A_wElrsuM)`x( z(`eeN(3H-t_S%#zbe&ROdB<~3F`n7G6t(*ptfFxK2&VcdS37!4m+-j_;a#1($yTjdA8<>EkiTIY zxZlBSZ^H2HyR4uHH-0DXJ2>4f%)8Fq^L9|iFm~VA zv4f5Nei*lD8;%$qEHfX@w-B5a(W4cuUdL`&=O`k!a0F*5FRSo77Qr&;#Pr7K#HMD9 zuqTP)T4x0Y^0wpsGMONb81QXr0i*uCc+UR(Yy0ht&8X3*QI_BL+8VdaIkJ`RWB+sy z5Yci{lLnr&zjS@mx-}bVkKQqpUhw7QSGQ45d6ep#6Ejqy z#_k`-(YsGD&M4m3C0=)8k9~5VtTE`-jA7wbHeKhE7cWcSM<=Iuj79yl*$s0UH2=d> zU0TF+0q%ijiq1lYQ%WjF7W$gGB&fX58zhTv)UB4FxntA*wtDtQ{<=bWNAsT&QhRn(37tHsZO2*ko+++P_Lus~4|NLmT9v#a zyCZ*>oy9ZWwwF%HZ6#JYuf*yfJZX&?Nzh@K<@ zS4XiYsSw1yQUWDTg1P$Hv|TEkswFg_S_E*+_XE!EX#-=KVY-wZ!kF#D^wh~r3&w)` zK_Y^KM+2M>uzs3GpzS{d3=bS;*&;z3^NG)_&g4R1yF=y_=YBu;A6XsV>=)uQ61t0 z_p!^JvEDb{WHGS!?oWUXl>5o$F7Lo5PvyDbf#_)&|N-#_u{gq`4!SbeMFkSfefu0!%|5*CjE&}I7kPC|$d>g(2 zy1{~CMQO6gTlhJby2L24&-kt9pP46!vxRRZs1@Y9jizuAqmIb820GG$RSPDZcgmSF z>ReFjWU#OEN~^a&a{>~=mrX-O!%mOG{T}h+e(Oj{L28%|I@p6LaOz!ajegz?v^GRwa|TtxsM0=eYEt1 zYjcXN4}tCjhf4X)wnK8jkAdu?ZnO_zwD;^~VX^~9K&m3)131kx#60$bWQ?zjvDiTS zq-2qQs#kWpxjxLe8kuIs-C>fYsP7d=NMmhGVKPMX$ z>@JBaPi&QoSTMm;T2KDnCGa7^pJr>E1I~oVAnrSUGI)$3n@O@^VPlN)EXF8-visBS zS;yP(%D;tMcPhM?_iDy?re46aCU{h?*KtdClJupoP2*`_?|sm^H6L!B8nRC7opb#w zJwA299oA6WB&+LHu355-Qp>(&Ykw4MZBWh=Pg!<0V`F2Gawb*h<|Qy8N|iZXOMI#o z;8JU5e`@8|%nn=f7k=T|nC`Z}BJTey4?>Kwc`4Ps(?21r{IQpsD;5xNrHrXGUM6`4 z3ctFYLN#!>uKW?fc07i8*z+aUz11roO^cU2k1fdNC{dPL{q`lh$Ng(c7d4k=*mHYq zY`=XmXhS?bjry}eFYU5!J5D)hWn!C9s8}DfTpK^TI)i?zOLohc$})@d2djf!`D;bbm|%I@%3}jiO&xXc5*;5Tt~^Mje26%HKYt%^ zz#c&u1GJdqy*%U{m+U)$nGHbQg-P8-BqiILK{apgzOh}9QkKua-EZrrD{c6g^V&rDDX?Bj0i=B;;3+lfYxmlO~Vb{+q zz&}1~atURmTyvrqPDjF5R7Gc zC2*@Q(_u{Fd&tu}?EbE=xeM=>SCqni>D~n7HF|($;aPTA6fhbOTVD1^R&{%eJidG1 zGi0L~{|1E&WvJ*~i*{RE>}m63?=q_VG(%K@H0574w(Ya3*y7vPZMWYq-D3Zta)bvhl+9>l>fTMmY#C(R?OvwncePi0jk1qE{={LehOJUySqdzV^Ee_n z((!$O#}S}-n0(g}pe?Ui+P2`We7Az4WF1z=ve6@mRa@IQ#v{Y82+;xHS z+F0I=1ljVWRo;~koO2mQzjo~=TeD)LLwe=H_12Bxxc-3tEU7cbelTWyu)f(Iq0(BV z_K_IA6DKF$GvJQ5;akUEHkq$il)Z}m=nVcb<1wxYkO#{kXDfl_X(@8ovD8(gCQ_H< znp(<%!gUCeD^y6Z4Ky9NF=nBV7@xclTV)6$#y05n{o+62g$%6Yv>Y0E2G$1^I0u7V z;o?`;eaL2?D3OdK46v4oD?px}IpRG^8+TZz#)GYEVYhPYRUlm&HCz2#*haZ*`M>xyZB8knY* zz4eJzSo-ECu9vIpaWxLH#%k;4`^i4jW)?!^&C6&#;ML_*KcOOx8H`J&d}5V^@dV=Y zsd1YN%w@3!X=T6N+o-6^$gP%*)_l0sBkS#v`^VYV6_A;3GTY%DL)-22-NC{B%qBw& z3Ajholl}H6JT;@03Tz&ki-J$JeLx7i0`$) zEKmo4%h3kZki#J05n)P6dbA4h^_+ z=2U)2~If<<8yKOtL7xcGKLb`=!iLD!U1lL^Z7|K{a?s*30o?`bGWlbirx?kPJ&~Af40XIMgLqzzw_(sTh<7X-KPOI{2zaNf0uIoo zs9wE#mMeUh)3ys2E@-Q1YZ=t5IlBwf@-;S3E28f$_(xcN*q5XdHnw1Ir_-?4`|*71 z(DYS2_A%C}5zFPa8N*lpgd<;ixK`WCAYbmbS7}_ej<5dOIXw6+D5%X^j`fpJ z0}K%Z{EOlPIr_>wOX2oqG!$`j#JAn{D=fUw8Y$*Y$xQbVTFWisABE_yngMv9_e1G< z2t$+(6Aj7O%i9;|bJC!9%J}hOirdyvji$C*-LP0qG`5xqLL(l=VeEzX@qJF&a}Tbx z)Zdr;EeD6B3_&G$&yt*|Y;&OPa+=On(4NI94PuH+Z~`$6IRpj2`x-G}(ibA{)^ zI$YwRIl5XgVR*4rZ!o`&>XPj|3b%wRlg+tBwrK+;;h6c2DB$_js^+Z=SkGOJa<*cV ztysF=wr?o5$56o=^dD#%7VfH9woh0hs8%TMtx<8IDai2li`Z|+d;SjUao&AfjCw}7 zc~f9H7uMBSh*KVc_c;E}Aiwgh-$s7u2f>1WrjT_L2%zWL^x)2ChN zMQNxE1w?*3GxUpoCbW`F zs62nMj0~|>)6(L20=U#YxAQ-B--4@qJP}u~D0e0b5Fg2t_o7tJq%%4k%ft|(2eCu& zDMB>hG?S83P;Mdrn1nAH3{E%A95`IX-K;!NdEmEvZ7DtySfm33z4jUD4$!oL^JRaFSKzw-;|S!_6Dm3 z>C$qT0@vtnlm;1s+t*@a3AJwT;#&}2AoJDVcMLi35Zb}P5MFH9W0k4$x@q+`yJ68L z`}ORNR^{>MtTl^zietKU>B2&pU75frzk>O+9Xc`lliuOB9a&Aiv(>5B+!jn*XqUdY zObVX#yE1ap?UDOR(drKHfya;nkproZJBW55&e;dg>=)5Bw&ugzsNC@{KE@o$Y>`2H@5PHkz(1~c`ikXR%ll?e0P|m`I3mx}jgg`m^vkc{w z-C>$eT~5x1el!7IPKbLx*$ELTH1Q-uc7A@o@267-+9|uwV!usMQ*dl_oec5N*7=Ry zz5v?byRAie)cfM3!+aPOvdX<@sb1WZsmR`c>sMqyEjnS<|1`nwY&zENgnaI9LI3(a z%W!9o+k`$RKnG1-f?psWj&v79#Df~wMp8g62Fd#9d2&UY(>Bij}4?>)8Qi>VM&mVu@7Lxc| zzvz+^kKU{kkEaGjI$K~k-MFgg5~V@s@2B%$D?U?TA$>vAqoRRC2hkgH`r(FWAnho$ zNy*o#I1Zimk?u2W&{LRT-g-hl3T|NJ&+V#&d{hH5y62HHfz5F*6IzbDl_NLjcD>=b zV?MM|eUDp*`CDAJRQj+fa%5dxomxeQ?RM6RlB-i~(=NM(qJYZlcG!)}3+#8Rwp*Ph zZ5aICm9@9JLOsw<=T1&RojZ4AIDALz&_N4)vQAjr_N)`u-fp|SK9jMYvR%l5pIo}+ z?v7H7CrKZkM5gqbJY1i>q6*Q(_F}@1-B!GPCz7M&#{EzTArRsI0o)tWjl!Ss8yX^g zcmV3z2jwWt(RoBaB~mkRZ&K1Jf1SJ7VS@D

`uV-(oLWW*z2aQy&AzLd*`H0!izYOH#9c3{CK{Y#jCTAFTyV5&6@x&7>K%+wvf}1jB zN=#)sI3YL>^|BN1NP5cxC&9A&hy;TdrE}WeGLsoV10W1H}CA;~>8I~h9D|dgZ$=2(kd>0{93+y!JvwpLj!vK1JaY2rx zlSpcfSLT)1vqVi1Gp!=6&}Zdz@VpX!SUxq@R?7H6inkJF)P12yzL0ZM1zlMQ5cLO1 zQnfi#QoDr{9jHcUD`be&w3bB%WOhQ(g z`tCEfD`*aw*lJAgWA>*mlc`xi4}f<)AdOKpoe{^(Zq?bzz~hFbC`)RUq9454C2!``J$>y_t}e=C%+wDw7iHE2Kn*2`w>7 zaX&&BqoO6JE=N8)L=nst*C(=9+)4up#H~muGjWN-J>n>@OzKQk(!=xuf_*P__~V~> zT@XqU%)u7iiY9Gx@;x}bJ5oCgl8T+2F5{|i8Ctf>n!C&6MPnV zLe4VT`ft{cg04U`Wu=*^`Vb-oZ{avS3tm%RUY;K(AIYgEb7JS2?6Nz&uhaNFlviK+ ze;2=Nui)UTOMWZMm^-8VPymwEm%6%wwC6b-@!_Iq|4hj=*jIqRYn0#M)3(+FYX2aV|IZ^#(kVDJrk@`3OaH`CpjyoeP-D% z))MzP$`u89GBpy!`bxsdN(9%G=tCE}!Rcx%DeE~P^3wI4AJn3_g-sCB%YgJ4&K2=J>^_+iRA`;ap-`VCh8~$Q( zaQcWgUCs?&&n0WKirE2gy?WY4Q9YKS5(zxVoUKJAA`#t#lL>^j6nYy6nY_@y$XAqZ zarCS;qUfC~w+OEEwqgj!uY zb+WD7HDX@#5 zeoiH{k@VaSk!&s8fdmVw?AQgkciAr5m5Xs{{-Latk7MA@cyX zZ>Q>+{*9s?hwS8m)AsVD8CDm+=if(<3pA1yZDn}tm)|5w7=j;1FoljkPl6X>ueiC7 zXYz8qf!_CsvC8(CIX=1=n1d0pByp-%2c7QCz&BC1?uqXLW5iuVXgp3?+0Ic4xL^(U zuCm<&p@vb+;cK4_(&7v-g-0N zcgsPp(>Zjse+*gr7}M9hM%U2Uv{n0+{Ybz45&H)aGHjVK59$r3x2JD?lI|=Ri1MHR!3_tk7BMyOD`rT2@eNJwCDysoaN_9E*8lNBC%^$u z6xeh3ub}j-!~;BK%6!4X@;+ZO4jY4*r?63`LQ!xeuajrkidEQ($W^Me>EKTSE+X7`!75&1XWjy%of)6b(Tu$F*4Q9dl`eoA1Jt>@LJIjR3Ce9Vt=$jKBi0BR&1 zGToXFvym_F_v}NG8B9x><+NhJ7_xwgDRK4g2F z9@{9-BL~+5&$K#*q>k7A;F)gTYq#N*R*`3#M=-sm#OgF{&H{rSSi~CRA= zn^~G4s7;R98K*ERsZxq|e}0@yqOt`Fk4yFhzj8+*NqcmxLTG#k$^GpLv++B3U|x#x zS$FNkZ0sQvXBGE7WFO?0s^UkjE-Dh(Mt6G=&x@qy={f$Uce@u;A;h~bX3+bN?T4wu zr!sdJ|71VLQ1W^&_pv`rX03owq9@;vwml!Q>^Z>Lgy2v*I(){g^D>4EN9MP%EZhBF#4bYY>Jrh;; z*I(rojq3G8def18^h)Gs^YbdY?d#h_R!%UH;^S~Fxu)*6Uy*SXiTOLpR?Mp({dW4w zn1^5olHge<@{4M3-!og(ryt#K=n)dnhI`R7XVxr{r0zf5w@&BVE9gi$+=;8Lv*`VX z`_}P(1K+(vKckKcSMvAjpM>7Of3D^AZju|iSHzM|huZ)^*u$-L3YTsO|ps@DZ&4`tIjUP}>eIF@2ty zTguRQRkZgfYGEH`P*kO%33TJh<8&Rh-LCpHo-_C*3$N@wZLL}jv%8v)u~(kj>Ateo zJ0J1FUhDVRW=8bvcf!*-g7BcoKw4prxUPa{a^<7PVSz~ANnKB{0E!X#$1OmXzjy`h zf4@T7Pf>#_q(5B(&F9hqtr~8%HEvrQ1mMs+CH;h0fq|Eaaw+w}3oZSALd}(el;qO# z*mK0RF*FfdM>ZYG zLXU@BVonM|62(+XtX9%Zh(A<>9dlzai}FuVe_!3nPo$2#iPSxurIQ|*x6c|g>+kuq zA6Xk}xNk2$Y&8n^TlIo{6oil@-muedTTcYBcC$6CT+`aOlR7H0??Te16N#Emmg`xT-EB= zYv!>;3BLWg4=?yg1oc9z{o*(ak{u(KI7BR=QcejGBKU16p9Py(K5f%BD!8`T7RDLu zATB7{PHce@*hy?5xwN2^kwX)uJN|_2Ns->2lXQJ33nG zV`W2G2-YCWci6Erl#2xY(f5Y=eSmCC|D>>ns4^tW%fNUsr81BT3MHcY4Os4o>0wME z^0Seqj@vEzGrQ1fMdlzTbHV`ks{@p(p?_}$B{pj@^Z3%9wzb5L`kM{A`vP4?CL?AkyKP4XY zKPx4cL_DS+ol;z++i^D2M(6%u1$2#YA{`NgA6-B{IyU&_a%96^I*;>U_|sqTPtV_t zjw+{Z$tnEwdcB-(LO*&R+9Rk(I-Q^CTD{NYGtz#dSh@5%IHCCDbJV_m)HS+J@=0r} zp6j;tqbus;(2w4Fc*8np=B)$+CxfCNH%mH&8)R+q{|xRx*YTrVn$~^#=dN9{lDiCN z_4Dhd%a{EOv_bdd`;<@KYx4iD_v&Wm>g1j3?7E8XJK0Oybe_!jM(5Fwe{b|s1%0wQ zTe3CzM8kD;q;^ZLl77Ew!Cmh+W43&K+~4IMv5~1G?oAi2x*SYarM(Qt5bgTlILwVY z(kBl(Z7)%R@E^O*@L>b*Ysxbo_161G+5N32+OTI!ylzJ;dCeX3KJ7)PP>BzD-cY3K z1n%{`E|<$jxIUh}CJqQBLVJV~MOzX^pq5JA3N}=Cq(pyC95lry({ITIF4+fNS4qDWGe2M< zfl?$gjMe6^LweASl`^8iSgCeF{k~e}R|ZSQN|ge`G3VWyji4Cg2rTujWO9~~CLg=9aSIBZF{MkjQxx;DAEjF0Z7>@mq3O}I#}dFYUK^PPLNTd;My zysI%~?L?YOuhV_#N7qdD&~u$Yuj%f}-b4BW$WHD`dz3L;=~IWx>s^)836f9HEvnz1 zF5~o>r9b`c>rVXhteBiV`3#c(NNx8|DM}yUDv?eR>_lb{-K%f&+e^nQdRyV!kz7P? z!B1LVcb}LA9qwj0eOK9fS=SZcmtk|MO>IVO#?d`PpVYgy7uR`|oM_e&4b>VNE#!q+ zFuICLXN^2(V`z|QNX{*rqn*`%oOSWC{X8|*9&9^>&|{yox-^n?WC%5iMPrCG++Y^H zSW43#5!$Age>vAXL{S&4cNvtuikL$gkCSxRAu*y$I+K~h$< zqW)Y%b?K(16uVPiURZ|MQ)2cC$qW)p)!O>ByvNeY(=)7>9*30UqR1Q+p0A! zm(66%cK#(VYWMPwbg^4fv#LN$3l3-ot9sWGB}yzm?1d8R*l4h)DHJ#*saPdXym~C> zm@|AzIgJY9cjZQB6O8DNWNZ9wdkRO-eyERHt!hfWKHqHOZZ*Gl=Od2(U=^Hh&di5I-oiwo8_3B%#y7le$+I6jF-3C^zR$aUKwrcj< z8*Z^%Zmen#u|Vq72~(|b(+>Oi0vV7GF0vAtMn$lIO(~TeRCXv$x{pG#UAu`yNP{XJ zTCi~&6IB?rm`{(%x(!}*zMiQ|TB<_h8P?}&;tIv-n@gPOXU;6N`|{3O!>_)v$ACxU zUdyb?$b}&q2_0R?Wv9gQQS|X=p{_iNrp-tgzE*8A96&bY83;w9iId?&-yhD;FnxAH zhT@OFyn>^n|66}v$?qbLD{(Je`yrJQ+=~fx7YPYUj}gSZef0{*T3Z8MC&Vi!G;B$j z&0SfY?wVvDQH3_>Ui72u>hDDN5$}Xzv9d?_JysCK=y+W@IbNTIznYc2gOr|JRrcH> z%H(||$LTzN+!bYNWk_3czkhszLbbp1VVZ^$Gmw}F{q1Kgms~?PqI(Tz5O4bH{-;Yg zX(|ndL7zk97t-B_|Ec6%>73zy6WZ5j8?Kl9Uuoa;;hw~KOQ&=qtsu|hCnrC#o_%-u z%28`kI5frm^_Z07S`G4}uAD$7@-V~hD=PqJanpc@q_imBjy*LiW}>C!qvf_cFIkOax3`Y9En_HC6Wv3u#~RqP4tmJ)Ah@{ zMl<&ld;5)pwsyf;X71AE@LkR4UsXS&phD}fEN94uT6(1UsFwNF=XP52I=$S@)`Tn1 zP;+ug_*x$#B_BEx!=}Wr6_O%dXUMk#j3D!m3hod3le!YsV=b4Y}Zf4qc z7Rxfox|T{%+@pqN*YC7jcTvdOwY{}$(}}Dx+7AzT(h~huA=lZ3e*W%2=D0&!Yu~nw z^J_~y>J}}VGgP;Qd(w@X!Ld!6xi?*}0UX<)fz^RmYr#l0YuB@yx7V@iaBTIOb*)CN zT6Sx-+pTid8uqK--Dto0?;ETZD$y&?-i3lT(AF(piI=?7CHs>74D~qu2@l5d;BB9j zVnlI>dIL+;myf)^2bq6=$x%B-lX3}VHmfN3ANkrWd-$>8_J>+e+An|2_?!KoTE~lD zThD*~)9&lL&FbAd-F}uc0a@Pb6*G~{$$h>!dB zQC6H|udE6arZT7v=yaT>f&Jb619Ign=||}FGn7xToN$qImv(UulDaE~^Ccb9d0y=k zI5i3J6@WW2rI|?Q)jgHnBRGV*Qc$#Y=AftlFE^g1lj{=l)@c({Ba+i4^pjjJp&gyt zFPCmpl3DSaj$AF!LFGkT62ouaDPS zj^_l1S(HS^bnRrz0goH$Q!ZN^TCNRR~Qf5{D{( zs^~)dNXQqBdT!V`^xx#6tB6`F>eb(-0A$Y{G*5R{!p|?0@=Ax9rzOK@#w2RLiSD1!nt)7cjCfrf5%b1wk%a8&vlS)N*T`oD&KaF%r zv0n8Xb{|p1<2T?8s-tu!{iMmS;}7~ji=^H&cmu?Dme}(=PAE;bayL;wEU?LtRc%_iwQ)MDt%O#x`nlXby5vh4le1J zMAjFHX+Q9@DS{UnD%qD2S-s~YQ<>r!$}Gv~ry3T3c={3gWkc4{r&e5*2qv4B zs~H`K7FlB|HHez8oXZ$FQK?gCrHTDcS>MODuyo36K50ioYGe(T;>8bpey8Qg`K%bi z`_LpNe{-cq%b;WHP4yFHwvzX%B{4_z-e+Cc?6n^6eQX`^JGF>PM`l8aGrcjD$i6BQ zi5n4rHz!7IOEseW%}&JfohULEBUQKirLo$X*vm{Y9T4AyMgA}F~H zo67fWY7Jn`x~%0}hxon@=dMkCU9GzKn-FLXIJ0`qT2}4$z@1gA*R-nDYT$>~u$!w? zwd=31Zi~jWvSm|R+0uzEZTW=OwrqSWc(tc{qh&Tw_pDE zO?LfntJ#e=)wP>$ZHRWz9L2bk-CFa0t5WB2t5&b4)g51AbN?K;GiMw*rZjI-t9Ul>W=6?nY3+=X8_$BGPB||2Pz@n@K<7@cLUBAr z!eyW#e^eso+2zY|W;mf*{!@4=(h zK%m;DADum6H=WDbK~&&3mU2GTey%JBaW;vYb!eIQptJZL`;k}c0ts)IB|mM~-}=!7 zzx6TsEe3kl3AMN0ke}0Os_Z8iNHF<;5^_%d7MXs_dU@JW`{_sfg)@{rr|vD;Lmy$F z(d3=ze!g|beu|(2=&a$t@jLe(=}4DZy#lqo{KOwK{$W5)u}`N~)puBLCMi@aTpKFC z`-nO!h)gAFPNa2W6ccEAKfT#%Ej)}lgitGGe{$J=KVTj*Aq{e|$0>%;uu8FzS3&p^ zQ}R7GEdJc))BO=TKp3eNcaL}kFORHDVV{ERzP?S-uKS`cwYo1_K}U!TC1I+oS99z| zrG3&~=+%0baB3J664~P~#RPTDGNO9%z z$|;hlvSwab00opEurI)o#4uHv9b_ZnGP1gj#RBokuNd z2kYC-w>GuPx3++;yI7T4tmo6p16K3Vq(OFD{cH z-T96+d~l-uXe{e)2b!J9+EWyE#58;Hi$qSHJ~N?NdF;5Fe4AwS?db7DC~PMTMoCU{R08=YjYsHhXx zgXfx%v3|R6?L?M7kyD!(ClX=!Yku`?Ibr(I4uQlySeMvZ=8Yyim42h;#ANb?^@`5x zr_3BtCO?>dHCxXT22ANPS-P^$8SbU*dvFU-A-Oxf&+pvB)roVgS9R{hq-lHGwrzcW zf%w$#t(^Aw&NaMhlPu`ipL_5eb*XIDzasn>{n$LE}~ml?9uq0vC- z`Lw^Po7d##L4Vs8NSBg?#Q&vunl~P(H!~aV3hMolM#kuKADud8_q?8GE$Izz%J`Lr zRM)A=ukp?!R)ze1l`RLX7WtV*4VqC7-JTkSc0~TDsd%_vP1m_gC#xweZdsUrvCZQcapMHy%e0ps6_eCss8w?!Qg`PN1cxV=uD;N!}-t%=Tx zHc%B^pb7+hTNTK+I^n`UHN^5TS|xb zp7l>|K)d_R>Kr~hMkmpY_)-40wM94TQpMHDN0a2plAF;P_13hvY@Q$QeLmWf9HsNP zrHuSW^`9S!@qKR}faCVX|E#Ff=wO{z-wFNba@yv5`2TPCoHOrR&z!z1`j;3X;i?nw z+x<_igketOvVH6o(?erfBD8#HUX|QM?}e=7`YoZn7EO5rU-^~iifq(?9X6=nAqGvB z#w@P(nIFD$(H_s);#oKGj@U>HwPnTSFs|y_j7UKP4kD^FOEp8vNtFMste3c4M~Sir z$p5UM$X@v<5w|>NtsJujdUn}15^)C#7t@AyVZww><;>(lD;ChZC`;k7`-~o;q4Z0p z!?+_^JaEYwT<6cc_`uhz`gsyv_<%e=$0azGHPFX>KztEaeG!R^!!cskKnv3np(*#aSmYxwQ@gudgA7_Vt8y#u^KI0t;acBH1$SjJ zdgU5+%gwi=sMSFgR%JtDyQNBVtU)_m@g7#K&L6Etta@i}v--jZ+oL2|=lC;jLZ9jcE^ujzSm>4dcsvefxPz@Ve_Bl`5dzw!w+C+E}6 z`iB^4i{EFOmUXT0aq5i8)%09f*OC2n^2qnortIYGy6Zs1+S}WQ{NvP4`j7SZ=x)3$ zlD29;{iN?SeJ_rB)t6eLQ12~*`vL-SoHDdIOx(aD)8-ZJz*zu@o{G)uRVY_wfu!N4A1H_>onxg z3hH*KyV5B}ujhoBVx3#OLXM5;8GWgbX3X)xziqY=&+l~_4zzt7CH<6B zuB2fvagICrHE#7|^Rnij>6t!Y%|#vc@)7IVbE`FG5@}-w7dNCcQGJ ztJnW!YgDhXHEl&HZyTItsTe32o$#bPcj*WbcV==aznLtiZBjToQU=`42^)bK5^jTo z-4e$-r544T8dCt=uu%(ZNYbr-BQ>qyR@awwT%Q79+-gxUZgou_)zJiMz{J(7$-PF` zs7}hQN_9v#$j7%@T}xjTJZExYYD${Q-P?=5v89jAV+ zW)G`g?=M!XMK5c8{{pLV^rAKX;Iei2VUzgb(FRo?!#s_xx z+-Fw*o=MhX=rXv`U1|*(Bq0|Qamn6JKo`^%v^DIj zX9=Uo!3-oUmJ8PvpN994FrRanzt7}4G6Laj$@`RRnZ9zC&YO8(VlutvUZ1nH7ia0# zD(acuvrexo>nCB}lulkruOxS(J@j{S|N7e*(W4Q)`|#=LKGRnWOsW%mw~aovE29m+ zuax#Lr<3bN{rFDW;B7aVx1;UplZVgDSzEjM|E)8#*IR3ouBST-|HpbuZp!?`$!p=R zlg}x`%h?w%+x0I_v7yiJc2H}ja-Z9ru40fEEbq}d`6~B6Wg3TCrz^0DbWgAz%Pq7%LMY%>;d9a>1D{J(%3mm8Rx0DDurNuC=8^@T(N4n3nj?IT6FQ0Px_{~?S7JDQQI;O;dN1*RguLtuU z%5+tnmn7?>>8sDEo%-Ol?%OCNks&#Itqudln#5dO|KK}T_aLi8FleJn!C|ZO>52O%Yie5_zp!Gsj2@ zGi@0vfoO_zthS5>&d6%ZKxJ+S8&gCkR<2zOCmA+YAw-Q@^*oVR9kD}&5J6$)cNGK= zSh{Le7`QqG68x?VJKuI&9UgUYe;e?6Bc7usS8axx+?u3dC#zQbPODk}VXM-TCM|>-|cBee?Af&-hdl+NriYr5uMNBMa&try|6xxdO3Sv&B^ct!jteip!#IG#fkN zUL_w-)R=g78mFtSD~SVd4$?ZTWqIUZ$Mrd34|bkxjT`iH9?{t8v6S`qd}x(N;7K$t zZ(E+NC?pv!;bUr}G>zOQ8d1rGs{2RuIbsdoUTck6Xr>_xy3{(%FnSi7smbVt+X|0a z-4~v*22ERAla_6*C05v7I_3Qtch(i!=-L$;=?0D9(sku`m#$EW9#BYoT)*~AZfx7J zEt4BLo(V>B?V6LcYDzb<>H-=we4-(-c6|m=)TgtnE_MHPq?uCpU#~Vb0jNVYW5-UK zsh(FOc~!%;(?A{7s@Jhp75JoFRi0I=M)g&-`j84WSyievv45*ltvS@w8s`uSsdbmt zYVfetZ9BkPKfBs$p83KWz5k`Pl0yeoT>sWdYuSDV_dCkE-7&%LeQbdpC^}~sKmW?^ zdUkT%q#@@Z%0M-Np<&rH3Z~!`J)lq-gq(mR{IUQNdWNNtFK##2sLXH+|`p4^@)a z;}^!yE1C&4I$DcZgUSRQO=^*wq4F8^)g&$cYMkt&YHu&I$<{M%QfQSUi(XNSFbaP` z<;vhsDwi*6TFI+z=FwL3<|%t?bdfEcb=Ly$jmKyS!;8)!)@^DmX zIWC3umQlW1&t%3`yf_ZD-Q9k)HL2ax_YeYyKDXQYJ-I3Dovk|g1>i~*m)=nnNdxnN z^jS$L<$+ZP1yx%8ZhW6opPSl#ssVt-YmIWfyb8?!U_#HKTVQ zL)@AwoOV33WYqbSJRFpm*&?palv$(X8GDf8m1c>xB*}4GN`p)#gz{4??VJwd$aCsZvK-jM{`s z;I1Zy8|+o9Uf-%!t;g#P*xnH2HR12Z?AsD&pgqTT!8y1a6h310It{WmPhrSE_{tib z1BDm9w$5ZJemmooHSI9f+O-}|fH=(V{?l|D|N2(5Z_HkOYn#=2W~xO~XIS+9c{>*n z$byiux|Nq+jJT}2-_$D=dZFXnI?~pzLChhIDMP zV=nvSOLqM;lkBBGukmD^5`~V0@0dPG&5pZkg*#Q6shwgXW>4wB(S3_--joxTx9C%s zBi^D1?y=|dc*7qB>{ZI9(DVAur|i|7635<>$)9-6Pb-k>YwlMK-FU(v6FX%JecT>; zg5;OPl&PmJC6txZkPSgC`JLl034~dWLS9a3A>&G#)~6|^!4fKB$RNoJ;3T75r7q_L zjmu`dhf}@BR?L3KHZK1FWB9rI1u5ODTSWJ&l}c47o!kMXLN#|u6&d=SBS`*0Aj?4V zgmr2%*jmt*p#_)Z7r*>)t_^*5ciO4e(UO-1N>7-2mzzS3Y^gw3;Ih4D6{^l!OfVV) zd=Fh-jaZ(v0ZWh8qiaEeM=fR=*I?<>KMWpjbrCz7VcA+CV0hmf>awg}7p!78IoLSY zUHt(z`P~J4cIwduTn23Fn6@3%4cCT&p$rS+n>oY5SG9I;t&vL0^%4DLD@-$u!cnlC=e7d?sWOSV(kK`AZRVNs8!o) zYd5X7salO%t!VqTKmeH}V-jPa_1|UEHdLpr9oxFiXXpN(b0@iu^Mvr`aA)AxFFIt- zeeUx$Idx?T4N@9#hG}YfkC%g2APIWaZE?soQ^g*bsE|% z-c@^?J_BuYD%#|9v`2J}(`GEhzYB4^0(NMZ#g#_MyiXW&EABMPuY1mz+4`O_=P&OY z3o*c6iUIank6?6g*`vma#k-7(@?FOIE52=PzxhSuf3aEPedtWp^t!;L1<|uREpWik%?ySRC45(jL`K#H))KeMtRNkD`-m1Dd zhx%IFTh#Yi=Bi%|R;^6cm$E1!LvF@NTb=*Ak&^}UVj9>)arH)h*WgK#xaRD)%!-6X#Ez-&An z4M$B(Z&CeOqVeE|)xM7w_w}29V{E=*pHWixDjwC~qf5W}qY*fQ*(rvW)A875Jbv$E zYVjOnq1wZwIyG!5y%-H=mFmFIcvfACS?XFep0)Vx6a1^VWDPnu%v4q9hS}@ISUFsw zww+>_xeN_REf8IZEvJjnh}29~ec{b~^`$o$V$Q>t-pp59PqBVD2OlpDs0M`2O?|X9 z5K!AsXQ2_HA))ciM8lbZ^mKd_YPw3J!A!>&j;r@+Xh74Z&qG=@oJB}4#>b^DL}Oct z4s8uONpxxpK4r|S__DG5+9z?Nc*~gm#(PHDn=xYvwtI|z=(ooCS3hU0UcA#-RsLmT z{rU%tEjK)8#A6>Ae~Z3nto-z&#(>xV)zP70z-j(Ck;C!foD}nTvz2`K=X6W5oFJiH7Z&Gq^Fcl^ru`YrXwlizy{UC!T( zea~WMgfXFNJL+d8ZpLr;_Q&@+n4bf1<^Jn`jj|sdHok>l|4`$l#B)pha0Ui=iBHw3 zo4RTjx2S$+hiVr)8uy`bG~kc=wpX>Jtr~#pN7Vams#n>eQf5cAL$#1zs?{Vn5Y=O< z;8owCzWQm0S{HJuU+j4L;XfHw54>vpr0V|}`=5_sgZ00R#{KUnwo2xx@n>SFm#|ec ztsSamIMlafm;=53s#j5C-j3cyy{nIvtSS47F@O3NV>@;Ts_*>!)Y?bQPp_!&+NeU- zvDFb9A+0(@N=wzs zIwoM~S^_0#85r)V4_}*WI%pB9mCV5UPBB{U40JcsXUs+Gn1>cHA1$X0T?jU<%q&N1 zSc#!x1zJR^98ik=?Mj{nzHvJk)Gwr`0SRsxjQ6dXF5{B$5|1RXa7m>!z1l z%lPF}s;^MZA@Ny*nx96{+VE^2UmRn83?tWkqy%y6$7!&DS%nW-?NE~(vo+weTEEBa zuhm>4Ry94*XZ+s$(dsK#e9M?M`FdmHrB50=KXb_V+?78;%lU)(@io;B)G~~k2OgtM znBNI)b`|Qu)HmVij+>f|*?0Zee4<~felr5!om_nQx5i8~i>X-5Jm=nT8FNuF7vknu zjvZJl)I%jSiB;-B62?-OtV5%?bUnHW{1o0g{9M*L)j06Q>==KoMB`9%p^MP9sP3g4 z<1MwQxm2x2sO|y{qwGTbGrJ14u&KTuO?4Mol|bWAI|@qYEI`AUkA^W9T}H?1M0*;I zK{bxz5_Bgeb1{CJi$_uDB1+~1E5q?ZoL_=Z*Dgn6T8YNA)+m`%X#^Icn^=8^vFzH% zjnbE}H5QMQ7QFesF%PQ{{%;*NMsNIuv8>|j#@ZG4V2t&Maoy&<#(VF^j1T_(Z{yQn z*>8;d!sCYHwcmEEKH!_#+Q(V=wwd-P`wx8EaNsv)KkO;Yl-XTmm0bE&<91xT{XfBu zYBhkcW+$q`soA@=FgH+DbhRb#M_)T?d~4?sgS$R zkKt53hUzeOsAl0%UB<1dQQT@Zib1NINc0kkMS+fHk=#?5J;pP5(C~vl7>|GVSNH_u zAB=s^{nhLvRHIPYSH8_{_2wKzbz|mW>}l2CypM;)QL}HbdW-A_uq>dy8t`#^0O#rN z;O7!lBk8Bk-}tc?jQ_f{$|%0zI^)V^-!nF@f6Vy8#)GE4s_<$~qw=jrRH}vC_K^<5 zY#hVX3ZQymt@e+9`Ezx~r8hij1b&S#6#sSD96tpPs|m<&&0i@Pzc*w|pFQ7Lj0wmx zjG>le!hf+^)kk-s#!qX|ATC{x27!O(I7&4V^ct%#sW5h|0&&U;HIhP;Dpw;Zs4T_T z1}<5KHGlLQi!cpYh<|1iQJZ4aNJ{k|s_#%wX7Sa5b1|YSorC^k&U{quc^FNhX`l(H z5mqtYOJ<=d6yqzK0_a-;Xhs3mEEb@7pjnhG1$PDdi3;#8!A|ij&@?t0b5?!HShC?U zW6qv8i~#zI`Dhxm-o~=P{msT%*Z;x@ph;YQ@z;!X*F0l9^n>4{S$u#WzKt6)dR{#x&{G0ECD2m>Jtfdn0zD zJtfdn0zDJtfdn0zDJtfdn0zDqKfS_(bdE(TW{;}gx@jyc*L{&tEM72zgjiPRwhobi>*PbE z5hSvZ3?d^bRx?ZIqkNJ%C=e7^GJ-M@Mvihw7+RH_5td?(U5K79yR6culcJ0ZlzhE# z`EU`F5nN)_>SP2J1C`;U$hukc7AGS}Pn-vPz#0 zEAt&G1;HieI~&F)$=3^aq{S;Lk`bgaK1oJqmM-8sEytsWaPN>ZEI|*F91PMJkWf#w zo_j0q(NbCgdOcyxR^_yA`;4#@bL>L&eA#7{KAjY09#!(llSij12u9(ZR-xodl^BF4 zBN#2G1fzY(BmBfH0Jm=3%yAZn7hQVAg)1*Xjh(ZoJTPw&CZRl=;28%(LV=(oLrX{J zl{iG9rOaG}k>mc4S2CHAL&eA#7{KAmLcPFDtSDRDt@S#fbe#&u6wVL;u$ z4G_J&wF-d>gKC4ygDQlIgzAJ!g{p-LhH8cufkR&LNRH%0(j3o;sC8}2rEx4i>Y+8M zJP{7tN|Ys55*n)v%;}R!2 ztS&0Kgu~)?SxI#CIO((E(l{={BhTZSXcK7MYuhM=S4FggJgyxxIp?h%eBd7)CCW}Qw~pO^*&S2<;xsfTnbo-xp_m?b)#DTx(xl69~i zc-+-pd3{J`CVR2cSTjuC@nYd8nBX;h7EF#!o@O0>g1{UgDE5RGtCH&>or-4+v@2$b z4rfYY#hetKlz9^_UkU+-^7@d>WF3A!$Q(U{pTn|Fa%}Q6>!kSVbeL@wd%_VaxgNsa zGl|$0vqXpUC9z`8admL{m?N(b$xPPaJs!-_LnO+{vB}dMPfDqFT4L5zE8z&OKo4Q> znMCZ0S)#-Fl2|c^btHErd3{J`9@iJDC3Ex;N$-#xn>@|&NP0b3S%q)iRdQ_dH0wxaE(t5#?eR)h&_j|H zGM~09W{D2xPGZHJWF5)MfV@5=Gn2ho>69HW7Jh;W{`?LLCdVdEvyOa42qkY#Gg;?Y z2wO42w#;Ef&x&>Q5WBpyPS=QJC0Sk{l9}w6KL^AdJtWyL()j!i>!fgmhpZ#q1A}Ui zaM7(w&Q^?YNX%hG&x&>Q5WBpy&T$cX8raER5n*LWp|NZJ91wH#kQCRQj_^}B!b6Tn zvIoYh1_>|1O3qe{a6HUmM9+$K^botevyKFj>=hAKh7=lm=g$E#M-NGHjnD6}P6|hO z$U2feFxK=Z;l-M4vRX32R*WR`6KUo!qG!cAdWc=#Sx16M_KFBALkf+(^XGt=qlcup z#`XZ#N#O_&S%-SPPJF@2stm&Fop8ifjBrTIVMNc0b@ULsytB@65y@T=VP#06v1|Su z5Oeep{`?N>q=Y9tWF5)OC1Hg=9WPes8euC&Sb;f==vlFj9%7ew*6A9NtPBV%Lkf-k z^5=k^kKsaHs1wY{iIGF|10SK7_qX5RQkfGRe{Np2-~@DbKrY{5+9FIi>0f z54lt&CB{~aSW~t{B-(pdBs%O}g0M1MWs;-kU2;bfR)!QB$0NDZvXump^bRTE2@l!3 zq}OAsP7$kmSnDn6LplxMxFE;FCYj`Dc$bVSg_R+N#=%HN%WNeFfN5Zi;7pNQ7 zG&AAdE`;;K%64%i%69qcu8!pH$C`SGd?mTN`og^;-IeW>Z(~n{ijlZ2Se4u^gd=BV zyEqbMyL@TrNJg+MtB26jz)tqS=qXF~is&h`m0hz5t72G{+%AM;W@WoL5@ox5>FG#T zAy`=tk?eudQ@Ch-428TS*Y= z9Xj7DB9S^S$HrdIsvfqlrEo6Tmt7o*vR%G3bZi_|viB4u#n*rQ_obv{ztcnX@^~em zvI|MpOr%-aE{;UmE??c%v3F&Fy(c5-Tk+s;wLKMn#|PKlnnEU*Lvp%@lUy2{KJoJD z^izi^J5_kSg;z!R^E(j1P5b}s@A%--SW`&8a0#S`gCgqUCSXhXq|BS}!DN1B$0JV~ z_xAjb&pFA}*t#@bRPr89qHvB?$c2!DPDvnMMHNc^Ar9Up7* zl_&vgBAMI@dN@|~NNf3|>`Q^K6a*EX*IRg1gg?LYfBbiRtP0%eZ zFNJriq^yBp_jL-=^E*DtH)ku2eikq5u+u~jr_*Awz!NW@PQNcDWv2?SxA3Y6e|`ru z&5Zqyk5wS2R03D0i)mCMROVz7(JL;Fkad{D2wO42RuY7DdJx-702d-L&g`O+GbfXX zUY0pR)?p4KY{dv$Nf6fQL2NGp>q2x<$(fT$L@&!6A?q-Q5w>E4tt1HR^dRXd0c#4G zsNtPXrkImSL@(DIA?q-Q5w>E4tt1HR^dM;}0qb&fTD=oanUhIGFXJ2`>oA8Awqk^> zBna#DAZaQA^s0DuEzX=wB3;LJtg{>;GnvB(TQR~`5`=aBGZ5sxi)o#`d6f8K4kPwP zb>eE02<_r~w2Q-8V`WD4tRy;_RAyfi#F~I~v34QRk#How zn8S#~S0*`<2<_rbNwCFXk|ETt^uuNFub0!&zfx zM)a&CI+;{vUqS@^5ne*_3DP9Kn8U~khGDz8BtpA596T#CqGu)1$)qy-k|4;%ao18L z9EmRpN8(G5Be9Z1sK;UNdI)<@pN?I=BoVSNTM)QD?le=vu_YLYNPOvWBvy9if_2!t z9%7fWL`TBW%LQApFIy1HQ5Th5!m%Y7h)8_taU@oD<$`tCyB=bfvP4J1(aQx}u`jz2 zYbw#jT8e~os>Q=GGh$cF5*_xghp?~o>Dc8<5+VDt5wQa3Vl73&u`48rFFlUL%C20n z4tv)_>{6EKNH}`AU@P`zBZ6K7udW3poURq*XC=P$I1(#)oZV%zcRhstrccK%Uy=yf z*Qtge7aD6aY{dxYRKl^#$}SyA%o2_y9@b%mbr@kQMkH1ejzpPtGKL_$E~cxAFqk7j zI16mW97go4?9!2VmvAKUunr@v!w6e3BC(QiB+9IlF~kb5i%QNM3Bp-mE9NkwXJwa; z#JhweiHCIDPVkO~7lv&3v1m2IkPQtz? zGm<_XiL!*lG3z1e^JSN^o{pZCUKyrX!F3l?$P}`5D6x`oEWs`k>C=%YOE_Hw->p;W z^JSN^o{pYXw~FpqWXpB8D!If;!Z}t{$$0v7B+3#_a*?rO>6KxpR#pIAtdp>z#7e?pWk%Ac zBT<%cIA%R0eZK5c*3;3m(ksJGtIo*&=gTf- zJsmx(6D&;29NukNOOfa>hY>3f91L?9kytS&eF#S= zK_v0mrNh2hS&wsat=PLBVod=~a4kim!yHC97ZMIz*@duo2_o@smk#@4Wj)TxwPNqu zh*cmbxRxT(VGbjl5ebK_>_XVP1d({RONV{2vL5H;TCsO+1pOLb-8E+`Mp%UIpD+LRMykmD9&z z<%}W7X16Au^1vj@%wdE*>T%fWEnM%b4ghpkR7BFUFtgsjX6E2odc${9wi z%yw&aMG~Y$nK_KGFFg)hom@ncFTDs^nGse_ABUAQjG)iLD;-WH%FJPeW7FfX)yYL9 z`O=G!l^J2>^l@0(E(EzqStnsc;)|{H5Q#75urKB?!d4Q5br@kCJq}wj!oDO3>o6kG zVUC^-TiJpjyp$;*#UViV^lDL0E?oi4Jr0blA!k z#0t-<hW#T-W1N`kNsBdnvxVJk-1mjq!QMkG4S(bHioyAW$CVXc!e zBJssmdWggqbJ!Pi7-1_3!a9twjvj}t7-3%$gmoB^=rBi5hplWxtRSs*5=JEM*h&wP z_+k$GVh$s0B|%t+5!TV;uoWZhOMaL)k6?@5~4*Oz65+PeL!a5Q}Pe)?K96f|{VV4do>mi8exGN{j zu?yjt^^{phg0L^Pl5p5c4`E-7u(E{1R*bL?BND6haaj4d2(ob8NhNdaLO47+btDM;Vk-%Ut@IG~ z#Rw})IBdlT>o6j*N*{-nC5SaC=wjuBId&l&p`J49ND%hLRuT?d=^^Zk5muIP*oqO> zVMJn;J`O7j5i28Iteh~%E`)>BQ)V3r!oJu_!eJ{tgnco>$`TG+F~T~GNUYMwVPzqL z{s^zG$;`0}VZVCHtRq3#7h6deTmsszsQ|clsESUCl;0`8)c+r>$7jYEmD#L6xm_QeSMVnkxa97ZI{5-ZkWgmoCvvr3;1D>GtE zCAzhiqNkHSD@iU+uJ=eTmsszsQ|c7?9yRhjIb|8Bv#B}M4~LQVjV_UhY>xi^y#p2`VizjWlctca6Ece zcImKpi86B-(Nng|igol5&X)vXUu-4euvNwogqJd1l^`6Ro|RoX>|LVF97gn%?XqGW zJ%sZmLD&~tNjPkkF~kbbs^k)c!_%{}ONYHnl$pbbp0Zt5tfPl;z9b0yVk-%Utul#N z(-vz@MuKpJdRBJnuy=_va~RQ6w#$lj^bpRM1YuunCE>7Dh7l`BYfVOiaFBXdcImKp zi86B-(Nng|igol5&X)vXUu-4euvLZ;^fh=TJCz{G{6t#M$}S!DE>UIl5BYMhuR_t95k$7k2^jS%i zQ#c6EnlL6#F_L0}LkUOEij^6WC`+tZM-O3NjOZ!rS+RFLMB<&5(`O}7PT^SLS(TiT z6cZduIC@sB%!ou;V#PXo2>W70Pg&23z3U+o@2s3YD~U35tO0))t0EFB<}kv(B%JhF zv3EU$BVmd^Fteie8iE^hLE66TZMc9z7n8S#~iaCr(lqFWIqld6BM)Z{R ztk}CABJs}3>9dk3cgjIugIDq?Mv~7a(h`oI6)Q6$QI=S-jvm6k7|~PKvtsXhh{QW9 zr_V~FY!?UlI_?ULgrgUaM4374E0Y|FcaBF7VPA|$lqFVr9JV^85EPCzIZXtnhv;R> zE?=y}@z}+YD6=m;gncn0QI=TgaoFmVLaf5ED!Cq_mnpk^u@1*$7e}JZzVs0G#fU^% zVx`Ant5XfJCKp|-z(_cH`I0Czhka#|Bk|7h=ppQj5s9+IN{_=W70qAan}*PdBw0b8w#ygma13^FB+Bed4`E-7 zNR%a3dK|X03qih8)S%;DIDYGv|B;M_^($nDxB|6NJAbP&^tn}hxUm6HpThl`g zbIXKv7_rFRO0bR|B5}&fdRBTm>`S7<90{W5OV3I#9`>bySgud7lCusY8sWi&b@UL4 zcUIQ3($isI5*_A95ItXdR(kQUFFnMXTv%%$cIjkNnSC)L$(LPLdO94TM29&NM9-I= zm0mpTOB=BQu+~8Iq*#ZM^eMA1MkLsjgPurG-Yb0mnKFFh;0c-WU70`F;BOW}Cf7bALB5*=1%L{CRz z#T*GDiBO`$9Eq}o!^({4>9Casf?!T?nwfAa(P0iFoCW4c5Y~|(tZbJRD@zdeF0qnu zB+3$wUA|a{y=x$r>|GDB zrU16DrEom#ixE95i4H3>qNgLVVvYonL@3c=jzn3)VP!`2bl6H8u|l$aErmm3UySHk zNpx755j`D=6>}trBtnS}b0o?V4l6UFr^8m-2>J-Tw9PF;i4JoZu>`FIb0mmm-mL^H zOUxx!%#k4MU1BBSNR%ZUyL_<@d$$XLFOAg|wqk@M)Z<93B)(Wjg0OP>5ROOUi>(-8 z9X$?PF(UCLv0@z!1dcQ&o@~Vk2cyT4SV?@bjs#)l^dTIN#1~sJ!a8~!wqiu$OJc=3 z8i?hnTa}!x7~x>_I1(#~FV>MDteifC(c`ccBNAT{E7s9Q&}-n;U30c#gf;az5-W)>){!8roIZr(k@#XO zMp#FW!&Zz)d`YZWM}k0EW93Am%pCTWNkkHlgrgTTD`ygs#LV%q6?0B;1X<|Tr1C_v z!@e?!aOCV=!eJ{3!pfOM^de-dOvY@BFDnZfsO0P`lL!|VdzWz7N`kO*CK0^|*(#GU z+vUp|-gj%|M9(|>$|S-uvv&!Htt1F5XA;qikgYNqvyHy2jC5<|L@xmLl}UtSX73UX zTS*XB&LpB2AzNiKW*dE>Kf=pK!7ilOS0)h-jJ-=ZY$ZWhIg^N9glv_`nCsfT1T3z7&q9=2i*BYIY> zqld6}3BtbEDt#PQK8c8xajTN+A(_mABtnjdt(e1zo)zopA?#g(urIbsABUAsE@Dk3 zthE$9B$K(2M9A^56>}KTvtk`RguP1;_Qh7|Wi>=bfVdayKpclg{ISf4{Ss~qNNrW5&TQP?bJuBAHL)g0nVP9;OJ`O9N zTm*SfSxez~BpkM4=Uw7U!eQ?k2pn0{%ww5LILES0#!s$J z`n*e&nIl1xOD~aTE9Nl5R*bL}BN8j-=ppP~1F>9pQOPA7iR+WAlRobfW#&i_E>*T- z4kK*E2wO2Cv0{!M!rt`|YXV}erLc~K!&Z!(T%GiJmnbtwg4k7tdcO3$OMFQ<>|GnN z+*xZWEG6Nv6(c8CCw<-}%FK}j$?R@OieOc&G4grJ1Ot|eB?u?w*)9@f!AIA3}?c3E*edI-m3mkujyAXYG4RB{Q2 zT}!N(V;5pqJglRKaK7|(?6Tr`^bn56E*)0ZL#zS6?Q1D|%50^FaA~lP9*3gGF#~(Tp+BY$6+f8BJnQKv5Uj;=ph`BT{^6+ji6`2 zt7~%!hZQ7N%&`lxD<0O-LpWc0I(AucJbDPnW0wvq>mi6oV=aZP7~y!BBS9oO%wdFm zF-L;fr6cjh9QH0j?9$1kFOFFQLBL&1GZTW$ksut5#ELl*9p*41QD!Sf?9yRn3Bukb z2rEmh^f-3;VjT^{%0d^FoH-JNgOOMZmp%T6(bxEb0mmFhdGR}FXl)PyL2SJn8V&Bh+R6F^u;l2BUaemT1#OoMmQwq zNDzq*a~NS?%#k2==}3GrhrLS>yL2+?i(}SC&>!K|wK;Pn2y05Lm?P0)4kHp}wqnFC z9afeg>|KJevcyV{W0x=1`OiR5sv2uMoOeAPwn`tuF*Cy6?czw3*%u>r>9F#DB!c4V zV%nR?a{4%|oIXTy`Pe&K>2V}h?28e*bXfU660wS_i%On84lAb*kz79Z&Q^LHi52@| z#4a6H{!c}$iA=ZFcDOY3bl56=2*=C_d$)@tQD$F^*rmhD|G|h=Xx&=d;R4aqVXO2Z z95W;A-7bzqnSC*0mkulc2P5eF@aj5)>Ep0+`jD>km^jPc*-DQiv0`70*rmhDCyq>< zJbij#Zt46B%a*MyU%l@9DKpL*sL0E?oi4JolI?T~S?D8(r;RxA^ z5w_|sf@+x<@h1LG3(TE3WkxbmUU6CSA=0S-sMX0Jng(k1N0IfY)yW8|H!6QJg4*8Q zXuIH}a1!F(s^n}XLAnUTIwjFzj%98oBpi#}t%O9`E)ECA%8am;2C}exWpb^XwO|QG zzsbn_3olAOM0)Y^ioo1O$>4&e7pK%-+|1`KUY^XEV&1wxg3O$y5pbs_R^cS{g_WGG zBuJ+Lq<|6~=A?+=P{Ls=2_jLpi^K7-G9zrIhhTh?T3WOY{J2b%Ps#}V|zlN>Xz ziX@-4H_huUHtM606GI@YlAl~eFKZk#>*#UViV^lDK~6QDl$d!{B!yt(A+NXCC2ke6 zRmo2-qL(j@nRWCyY{dxsk|3v=4#&)^BFwQ1;q?}~l&wihqK0F#d2$iGd~wXIqsL(@ zM%b4GIn{JH=9D!MtcozlE+oYl)?4gShK^O#)>_KRMf9@9F|&>yhpiZ4UlQb0(@BY$ zS4C0?HXdT8$?GjP>Z8ZRD_QX5BFT}+(;PF~>T%eL5%wiPPBoq6m?i5Q$&1+Xbg~yK zow8HK!Zi{oRclgtEb~lqjuk`Kc={q_Un1!4MeiOkz8-(X%2>WsxU`_SjE*vCC?;B5;Jqs z7a=QW5|QLo5)bR>A(HhCd96-nay%*fQc&TUBSEaGO~RcuwM@3nBq!OgJe|G>Svivk zmw=vk*3m;G>l?}SR-Wc~c&7?;gossWomTIJNG3VLuv2L1i;$HwiKJu`hkD*wM+1?p zZ^&zPGPBcQQg*6z$`OL->G0~BoJmgCksRx6`XXfIOd_0LJ@2g3U4%cs!wSjuR-R@Z zd-uSg#8Rf2jBpHkh(uY!Vef1uK_ohMaX21UW`wO6kytUOyGTln#h`^1QaHjx*0FI9 z42mlehE>TK;Q;gyiL!*l-q}imNObJta6GKc2wO2Cv0{z}l2ToE zRa{mjXN0}$ArfT?hrP3v1d-_2#o>5ZnGv>PL}JApJtU>NcDlZi!Vw;FJa+AYv8FAF zNIKnx!rt`|_Qg69j>L*}7?J4M#gTZI_>$;IIP6P;q*PaY(t)i~IKo5LNm;i!kv%Y0 zfmmxPjBo&Yh(uY!Vef1uK_ohMaX21UW`wO6kytTD1L4o_u!yiqr_fl(-aRnr`|wKk z!btMj6G=;yB^-`{tt5y<$1V=X!^(`X6(bTW=4c?t-7At(b%lo<3D(24zb^&lV@)bq zIe|zxY|B;>L{EpU7-8?sksuNs2}k0KITB^&Fv7~+MI?JggjG6)#*w7#5RiXg3NoG$ z@1l}RI2;mNNf139wqk_6Ge?3*bR-;!FXl*;nZpPxYao)nA}Li@c*wz6Sx6}0AwF{$ zNwMm*l1n%eW!7OtPlv4-k@#XOMkG2C4l7F#i86B-k@%8uBzr}KRXT;n-cx*8lSF1F zBi1A(q2H;Mgp;h9NVAm$(bHioM%X)ZB#1;u!jbr5jzpO`jIgpEBH1gFQgwxg9FO+* zrC8bTw0b8TNjMx5TS*W-9kybGy)#FGNOU9|i7)0zl$pZ_E9)W0-76xj(kV0!=0v_P z1-%$vteK2RILZ7(nyn;=o(@|v!rqx9K_og7j>H#pB+ATTgq6FC*t=JxYwwcJ6CFzd zc~2RE>mkR|PX{iEko~e1b0mmFCzBkzVwUJ6b8Orzk}TV4TJm|KV;H8crQp&ex(ut@ zOOQ^*(*)|p!&Z9XNpv#Fk>o-Wk3=VhW7l4h6xmJ>Q&tNxI_i{`0$LfjsuaGe?4OQAn(q!#e3h*gGS7-dTqc zRAEA}Pf*k#2!jGThM<6{+( zwQ|B?Ge?4?PluK5LiF+_@vf)LR_sf{vCE2eQjk;gcYM$r;*}C=${}+kNQwv!C05K~ zo%A8>oe@3ntiuQ^+r`mSW~&~grv!RRpr-_SN}#6%dP<E-Hhki;qDcGzl$y}XuhyF3%yM0YlV>pIxGJHZll7+fRi+w=DYJ=_RE@VG) zO621N^p&&Y`Zz)T6<<}(Mr9xo!#S zs+oM;9i6VYrl!XIp)1YQbJRXk2{s&m#D{1wBygHs;3|Er|7h@VEMgK)1&?#b^^x4M zCuwz-{78XxT;MKzSe;`>2j9+3jmeB#o$Js{eeaHsr2N3_qn)R~M`~=QMo0X~@2T3U zF(2!=-A?Hy|3_ujk&k2PbcH7ix2H)TxLMvE?_KGop6f(kL6#34&14_P&^LXYsJ8Oc zg}&({IToGtar95vhd{quK0vnGV0&8V;@E9Ax!g`bU&V3E`$C706VyMh4;%Em^kI{} z>7x^^)N9+>Jx56M=cGT03_pS^y&Qbf& z&^VsSM}4%jRp!)x-F>ea?fr;djcb&7TyvJseE)TIctF%BtJ@hiqVwYScw^Dhqc?|3 zH;0X2w6x9$mjVW`#bt(f5vgEqo1R{qqqCa+rQ+<|4sd; zj{f$yzy9XWezxJNPv!r${fgeRX7&!Y>_`Se{up@|^2eK0x zca*kg{GmA&b63t^R^}-E#v(^))e=YP$VHFf|C&-q>CxGD&)qTKfz-LPzqsJlIlq|q z-wXOJ{N|!@i(XsoT{7*$&CA{@HOd{Ov*zBi;9F(uWQ+p;>cdisK@1rsX1w6Nx) zEvwJ2{LbpRS5CbAkE{Q<`d^oOE7n*1?24^dK6!EDyce%@tbFpCg)84%dD(_r7hS!! zWl_Q6=%owRUUJb_FCMd~aP{|BS5k zvE?TiNry}ux+q&{fW8K)w?_9BJ?R!_(SN`FO zC$6eo^Sw(Rz2b*!Ti5lyYUKKluYY#EvHnk&IhMLE{rA#mR{y@Ty5ig`-n{(Tineua z>vFb!daHU@|8Kma_DbK?t`WX%3u_Kf4j7S7hC;Ikxw3te=Y|eX_KiDIx4@qp$c_{@ z`Nkiq`&8YN^?x3;|I9q!`A4=L_4xbOeHW$!=YtwLXEdyKnO5f>se2N~zA;U8Z`Qq2 ztu(8>>h+>GHswg&rv2Z|jvZ*I+V@;;Xz2h~FW>DShd^w>YgPM-d--5|S>1P$ik*Mt zsAu0bd9h0xtM-j^#U>o7yV;);eb$o|{YhP=-&GyHqh@PPU0Lm4a@4tseW9GtzbAOt zgq{mT|58lpz(rujE^Cey90|RAB@&^Z5Atnju8Y_FFuOgD8Y9~Wo%^5{a7LEY$NVkIN93HA z>WIGuXQR&|&ODsU-W$mAjH=s&14AA3_6)7tXddM54P<%p>NfbF11)!Nq^QNrowp*k z1ktRB6}6Pb&S}~0FRPpSRD7YgS0D@0o-^ZLK+>s_L*j#w%u&g_xX+s#=#8Wb>#%Q0 z{bcXkPyi6R)%Ds`7eZ=3L3Jg{Se{NINzKMAVTZMMtE6=)AZTPA0 zf+Ka`?Wj!QXK_{HKZNGDj?~3frF>HX{@UwYzFQZ&1|ZHGs{Fn4`-G-X#YIEOS2Tu( z53HG(7lYOY?+{f-2E<^u!Q0z4z&B_k>U~u(R#9KIM+uGa=0=}AdflEHWa`Q0s#;{~ z$!3?MJa$EMMeNGvN?&zz(Tm>7qMv!!wH;7l9!9nQ&OEr?+d6Go+W{2i-qs1FF~nTq z4YV8xJ>cBi1jVR-oaa19l`DZVsO|Q;@qQ)V`xHgadv#lQmuKjxQKR~MTX7kXsCllJ z!i&PYV0BMq<`F~}DLxWv?d>g8$!nTpA8(Fa+Z^2$LD(00dk0*R_06HbdqctAo*B_y zal?N$&Y*qnEK|*EZ3q_)?Y8cBp|9k5vcXc(f3fZ^Pyg68&0qqlhJr#5hF%+l!prHu zuik|aZa#?#Pw*nUJ$#lKc4T;i=Xb#^%-+L*}i4-T-m6As6&U{-#yg7WwL05PenpR$3UVe67 z>=VtEu}`9reXO~xEqX_J!QjIF-dJmN*KHdoI7jDt|AH%zI_Ck0tiGtR9jvc{^);}*4%U5O-4E6`60Bf;c1v4yR~g2Oxd^!_dWRV^@_5j7Yvlyz zkpAA^2iscmvq3MeS~pPTD_f9ODGX>lxXZ#>7_YxBKj=yrz3 z9Z23%hVE!!yq~w%mRrgLPEYQZd&|+WpzmpYwd#;>;NFUn&bFc||A28t#r{6yigtT* z$8CGT-=}r!!GRk`oaX&wuyyOvXz|9n_>JK^f{EMzl-RUT6&htxOGT{T-tT)o$VBLq zs@wJU_igJJD(W{aH#D%{g#1|1p7^sENj!`CIyG1oG~O_ zcc%v1%u_7~TrS`B*Q(oUQ)`v!Y)_)kRz|A!DU-8y`*TK(@;#yzcT;c0|z?F;Z=Q_~RR!|-~V?b-uUfiKa;bQ)+>BEcI z8o0c@t~SF0&%a|=q0#3!CphwASDUFUN1pq^8rPuwA&Ht0$Z0otvwh$l%idcS%iUY< zJJ2xMn~z)G_QY*&hq}WZXo&aPHzj{d-02+@8`DyGG+c4x!K|ZaJ`)+!;#q>5qlF&s zKqqeo`E-yEmVz{4OziBI;-lH`d?Rvpi)R=tPQ$6g=Bd6oRnmTHOO@Z@ySjPXj!p3_ zZ+`VA-ydI{CK z)JyR3eYtvxoX^y#D8}DeE-DwLjRc` zw&mOx{DVF3e5BEPoKX>AJZ zG4Hx{zX4FQ&;z-_pH}J{nj^!S5_0MeQuoWq2He2wHt+F0=>%MNHaZ%!aFnMF&G~)W zTd5JjpaTO441w-#j$H@KHGY@-)6Jo2gX)$eb(5J|h}2FqRf^QTDpeGDw7DqqSaVzK zQS=^xsciwOdRsJe#GjSh2^hdOD_Hog5-Yby7;LY1R1%xaIJ?Eu0IWQTq}*;g_LUGM9m(B$ar zW)Fc*I509YqY15L+dE@61$}-Dse=dumHhDJnqH$Y>pc*fIBjqA+4ur~-{^Bk^SrtJ zy>F-iQ<>^%1~r&En|JPnk346NL)}!Z1t>I)z^4lXR~EJft|~mu`$6n$4JCp9_B%^9 zwcc3eb>TjJ+DPY(hkH-!QyKVV;f+;(m*=g(Rkvb8RwgGKd`srA0m^~HtNg|V^q zZx@b=UDZ^Dj2FhvY^n-m`*W)!XEqfVzGdcWaebgP@~y_uz8Rsv&Md1&GB&0@GPYic z{WLbYzG~l(hrAU&Qn%21rYSQ_oxZohcXg8*eQraRBfoAyyj4N`nHsEH=pW+B@%>HR zf~q5v>myqm5v1q7gcZ&V{yffjzUX`9zc7OTzQuKI{HOkj?&q$J@AenDr(EOO6o20Di=XB{+q|scmN-W^ ze7~C;+Bw6$yAf$rE04#wukpH3pBZ(%C*QYrP69{Kf5#Dn?(W97ppCIj$6y3S^xP|$ z(r%sM{_jwWv#*k9LY1Fg_d?y%b&uA4%-^eSvp0K6bW}mz)KJdQ0{lZ`{YTwq|Dd|- zyw0&;sIybv2{lg}6+Ais^%dv(0?q|o_oKSq2j3~IX`Tk~ox1Dxj0!q;H{uTPc;mLn zj~h`*%i^a6oc^;m$A22=>mRu}er6zV+Uc9)ivxY84cr|6Y@qM7yv^}%2Kr6Q3iPk} z_vjWMLOgpY@>o>f)N*t{cvo4V*WJZ+v&wev+Tux0DzR^9Q%z)O^iEY-qPyNsnw&VNIr82r@%}aFyxmz{ z*mv{O-uG1>SK8vc{}K0qhn+hg3hWQ>Dj0r#pT6fO{zi9|gm-!W7JIC*%AfBXm<|29 zDWjC-d#&)EKQX$y3|&^=euGc*7>57XkU3Xcf;T$x?fBw{YE7z%1!HB8T zX2Kw+|LJFp90l59qff#4GY#j!!NUvZTx8@7IPJ`t^UGGPHgZq%6nK4wMdwa1j3K8N zjPOpIZ#Z+^N@Co_M!zvbM^2h*3@A8rjQ%8)_#ke%?H=C>zZeYkHjyoddzX8D$JX^XghN}yFW(eyNLbgA zwL%isft%e!9Bl_ME&X6`D;^yDE12)X(+7;`Lmzm+@;O{?&;E{dKlj}#T~qD7A-pg2 z+YwvCH8+L#ZwVi`F}yeE{FpNbeN*6OC5Aa$&5@F}z?Q<|Q2DUpO|5VER7lc*~ zyZqzs*BZ?CCgtd>cP#(vJ=<@;^9%PZ|H>`P@44%iFMr{y%fE8hmtS1|xz8>C!V{1D zc=yfATmP`UW!_TX9R;D%;g^5hG&}ua#5Lvh)?jRGQ#_~k`vrkFBmdYRnlU`|jcI|K zk!*GUq+ob(c}o)R`@w$apq$WtPyP@rEH?RG*pD*(2;t)(^s)%8zO81lcSy8AyU7%9 z33-O&h0D?e3E%Gh?nm~!ic!(k$gOpM;AYn#^^nSyiy8$ecmPW}dxNnx&2QH=R7U^x zcw|lUmdK3y&5@b)MY#OAZvhCl#ZRw&ctkw^m5C#Kdq*7Dscuz!F^YYowWzYF0-bVs z+m)XT6%K3l)U~c$fBDBzhF5-al;;=b={EDY)$>$>jKlI!=rmkK&v#pk;Hta`zRGG= z4R3X}?#ElA*d7>R=IsD7wl`5~IAtah8EhxFx>pTvX%7R+Wk&~KdK0aiTK8^QsInMN zV5JsGF>%TE=H`z?>F!ln>w&RFWo^EzM_`Ew%OCG!o-qWy+raoxf4^-QdW05EZQToA z%eGMC;3hNK_ltub$iHX67YBaH{k6g081kdj?jO3jwWtDK1D`8wfe*C~tDLB{;nTd4 z4(G^#=@GXov$V{+Rof@8M2%^`C&AB`hu=T^2g9EqzIph8;q}A+JpBFP#_%&nOdPR! z!~-L$>x%2n?D+TG#?8-e2nKHUIJdeTIiD;%!~4N$=oX@lRfo!|!;QJ#(Y_DrqD__2 zS1R(={IF2YoArQV}Q1~gWOe}yHzUx9TrJD%kmcILF+zH`p>XZxm~>7Hz~?1K-*)MUIi4Rlw(aoXxSwOtE$8O9_WO(@fMcA^x%4}8Jfj`|Pn{28 znYXP3f2L3UC!TqSjqu#?oUk*T6T7|MC129#~!D{JH?S0 zWQ20OzU_wdW=AMI1;g=o4LefXP*U^ssJAi3jqZ*VHbtKd&y7}x=foattn%hW z5lE=wj8N+tA?F#P%SMK>MuvVdGPK?32!6nl(7HhMaFsv1I(#_Vg7=beOQ_Bt`}-cV zDPv_SHb16ph(f6zBE1j{zCX=nkzrTj`;m<=7 z7YIx8Wxk=lt#@M?`mCaGSy6alQFu|%*Wc&L@#OkO_*~f*n%^6jCD;4+pwE*y>%-X@ z;YBmT3ulDOth0t;#N+S1|EE9wsWFV#-P`XjEiJ_(ezO1`EA|hGI>S#ye;js3AH&nS zF}Rjl9UeN<*oi0hInf-<&12?CWZa369}UFAKkkVC@onKBhaT`9C>s@+P~!b} z^zo|Ad;NXJ#{ca-S{;7e(~5BwMxC#rjy|f~V9{ttI4k;Sm3KZ4o!)}b)I$Ghp^1fU zzJ>LZyjf!>wF2?}u4YzY)Hte&vN`tI#*)Zq8@;u$&mr--M(x(gpC!zWN+SBJezE-MwVJ*f%;%NDhD>6sbwsqe?W0JFF8Y)pZK~8ogF^c?IgbXHb5hp$>Bu z$KR_OKz{EP>Vb=Y7_M+m;1xVwI$U-`Rp3l-cA}|x@?vY7%R;w}nwA@@ZP7c5YscP;+HSdROlj~D;+_z~3)~wr53awZ-d?y%NhxP2g@A;WG7Y(*5xTWgG z4t1nw@KN=<{nl`3MN9$(MU_Hisf>qA!^3%;Q$!LoafuAreGhUTRRw7O}d9 z63D#W(YPmF*go=)=j8Mq(9ekX${BJ--+uW6%+$z4%IPxVuAIUB^9PJH;(6JFC!aB` zZ@>PasI*Eddfw}A)HeJr7;5^p5zoB<)0OieF@EZd*>mR312Ss#S!2$IOcqQgO#_fU zXz--Tpk!qantp~#xjGVn2D&Fro^CAn9UdJ#{i~(k<)`1L{yeSzyrTYmfIqzh>u@8i zIWk(U^dzP$fj$w3L(LFF1!uMA3p2p{fv)Uo+>o*Q^20`Kwy0{Xjy%*D`F>;MM~$If zV=!jIJT>x2<7PE~Rmq1NL)VSLN!Z4I)QIQo*}j1fhwk^QgK~d=oWyen{4I_=s+hQ9 z_*;&Db-t(Za6GhVOz2l#+4J=T^gT4J?P>Q02|KvC8|V=SQ(e8p~qeZ!F&JAB=coPc#-so@m??dlK(Y zHexOetO`@zfhEY4uez}aXSb;{W-en7H6HAZoR-BNZrttf2kVWn+%T%< zB0p%vZiXK=#(vP)3+bcIVC-?Y`ElchqOz@6X}Ae14V!~bN4BGvV}RpK$1KOq*qmlK zjclWrF~B&}m}T5-7_mni<5{(v{8js2I$JFXygCL2-hPo(xvS}XZ{PE0yMKAM$K|U! z+g*M3*2vQkf2Q%q$WIz?h&Akg#P>Nx~Uad>PO<4vW|0`H=#st!#Xqy z>LwJ_M~cY%Kh>40SWw<5*fKD8mV!i1r~2!rs)rh(ss5*%1{IYR{AkeN1oCe(+{N~uWAZXTeZ*R3iGw@+7`I}2KTiZ+N#z-~F_^HOAqjyfftUj)M zXI^gq?7qDQsL&p3d|NGCc9c^h;J1L(yo8JNL?difNh@=oV{d4`-{;tezi5n(y^;KV zzMQ>Nibsu_QW|s)bg03L`MABW+TT*XC$K3zIv5M$o|s#Ln^-Vr-pit+@vI-Mwj?pt zDXE+Kw4%M#fVIh_$M(@ZxYuq@+`w^%a5;VVU59(M&)rbBpze!aSK>)UU}U((_h0Ja z$52P~j>zDKs@hOdyt(%7qIhHNw~FFTwT~9XU#b0N5uS-vM(_BUKWoAW^++Yh_gSU3 zw+Soz(K||ZnwNUiw$_r$x>3WRwk;m79gl~owbvKLKd8NYQvBbwpO_SXzxL)y@wdHw zTxa;g%V3V@bMMxEc2fKu>>WAqX|qT5Dy;!XA4cnJL01qU#owaE+9!R_w$Tjc(p|zWR`x~$=2s;!i>#<(`Sii&_vF4o7 zZN61Sp+&{5qe7P!VXXMIhNKR``(N#}!{?m-?Q8tYah>WKZi@Juwnolra^Kj1aW#4* ztiy$Oh3^R8IV#EY=tj%b_qUI`dLe%`htKgnqI@B7`ty+Uy{L{89Z|zf6tw(aUT6Ooya(}o!#w#vSj|>z&ga%|KH6vBbz?*S zn$kh_I*a3u+OJ<1ch)|79qvq7pNVJJUjA9EX8iGU@!Z;XKBq3oPt*m$gOQro&%uMA z%AvjMW(FKzDnHHpZmu`F1xvj_gzftz7O&llntcx$`PqTKYD7Oca#mC5^$CGzLZwr& z!mkRjeS_#{m$i3V2a>>?W$i25dr{^uqThZ#cBvY-W3rhQ7@(e-B-Zq?kY3aj+tsi! zc1Od8ZAb_DCmgA*g7r1-{5(9~P}RxYSU0skR@8*Md={?1zaCrNM%M>&BWKkIdPUBu zH)rs07P@pi{Jn@366MlAJn*;3+co*iF$h;>=zF_nYh*(GO_7Q9o`I-~xFTcTX6P^`7d;eGN6= zKNk<9RK?ggdOW9|=F? z`|N)ABo&JLdq)1lSYq;hdcXU=24~g|tOV73>0I@!1w)3(^#LRJ);sSmzuEk6d7^kw z4REEV)^`*Wp42Gn)S$1m#+8?!kCitRawY0k#b8{;a`S?0@#fT>UFS2q5Z^mBuAI%d zoCT=)xb59@9;TaZE#OsQLzdHjcBtVz&slAJv9N9C?lMSj$5m^^#Bt38WTB}w_Ej|! zZYyy2UVy5g>VR{YBhSp2()0$@bXxJ2bSl3n?h5THzk^XYq0GAc=7!c2C0gk6Zz?f zwLLrZ&+}k~r$p$4RE+W9g#HI}QRcqD1ZS25!=qyLuIm4D4iF9>a=ml7&$R3u&-(}a zyp0LmTdsGuW6#9$K`J+DO7PV?cHR-+KP@{R#8w{PMHAdkN6q6U0|rlD@HL|irTWuG z$f!WZC0ZP$Th)`ZL|>#9BJgndv3}}_@Qoc?`#*9z`GneU_d{%tySp6sMKsUi`XFxV zFRj8+(mn63YnyH`i%aDa=da#icD1J4j+sm3`i>`liOr?hS6RLX8!C=&52`(us*68Q zojFvpbEu=zS2|Jk$||lk^@%GnupxARN&5|V&ea32*?J9DEW%eI61<;rHQs|aMJBwq zH8SzF;M*;siixdnwW+J5YhtEGiD<;2phapby?#u#NGn6PrRSFHo@^RXd0m z>Ec{MlPw>kov3<|5!hfOsei56E(en46|6%A(gdQ7w zBz|bZP~Xcf?kop1Lywo>KEAX*;D&Q`Pey@aZmc%Ps0}kH)u8J%-;R&r0>sV@MJ{QK zD1q4c(6pS$`o>`7?53da{SBV}zF{Bp^!Al}3={G7A9I}sx+=Dn>rs9MiM+;*LuM$h zELDzXDWZY5v?(5jYLS4-V%^k8NhmNKvEZgt5~|wc>*pA@a=m9a*2?b1(DjbSt&ux1 z{JjfPjjvz~o6~}Yg~1IaJ1d73Ma~Uvi;NG|ynaEODur!zzi2(As@T1aW)*95<@pwG zL)G;)T%g8ViOPoB_2+BU*l6L@SYO=9@?v*1ZiwC4xG@;J3yH5Far*pH%&wll088YU z->PjpW$Kz%2T>sL)FoH%5c+c-+28 zA0EDsLBj`$F>&3?uf1-x{Q5V){o|k7jv6pHwA(wV=mqZp)JJS%3iX>@f_+OtY{c{Y z0b?T!W{z(53{a`wzI`h_xvn9;;i_F?5QiNZ13aNzprTpM2jKhUw%L*zJkk#?`nKD)K>XzLLURK&?!pqlU{71X*aW0F*cMtgc}hIAW-`LS-BcYJIGSR#2B8M2gRYIi zmiE!T^4Sy&eRnb*&Qy8NGWTM{CN`G%hFs#zHSgpXG@1_^+zS%#7-sk`XmtPXQ`ig; z#AIR34amQ{tQlQn%&)v=N)uT4Tfe<#ukKSld-pOZGFB2yW#rbZt>oh$bg2u>OvmGQUR`N zbA1U~D7LcUGW^-7K7R(fzoPr5<&K&(*7F|j%cWQ>&G&7;)a|(4>BtG>)Qt7Gw_obR z(e|90FM8U~-+raraUb^j;rzR&yKleJha+ze9>}+!fABK5_dX{UTg~$iUgpEmNOiuY z0(+a)^Z)itP#jUMHsv|Bf z1c=KNMFMVJ2e;ChE{Ig^GVKI{B0>a2lyPXEpoF$mZM0Qe+9tp6bxyF_&b;sQ`TXAZ z{p%r|``qhwU-!OT%fZ-xrxA4ub_8NR%CUpgi)pvk?mLdQslaX$Z@9_`~i)zWXF07L5Z#*WN70 z9@m}~uD$610&cO{i-^SdlmCW~G~Yk{EY?+!mQk3^T{{~v-!y<1#JfDvoPs?lE}=Ep z^9yqex2pk52KK_(CIn0665klj&%?(%c8+)KAXx`LoNEPXyRF%(e2*6lH@yLD-^lXE zS~|d-EOk}zGS>%=b=*r# zZ(7lXT?`5bl8Aupk(WeFg_}xrzDz3!vvo7i&|U|Y1m3rMPIG4;M~fQA9}ppkt_fe6 zT7i2xqUfrXD1hcmN{`|A;)j|aU;0RMyOvwISzy)@cN0!8^J6WzzwOf=bL|TXcI^)e z-smRM0-|h4c5)v!(jjC?yR(jiyvxJBWsbd$eTog3R)QV-9k1BmjT)cq+Ful&?ArHg z)Rnr&+D~EC_pRKB^?kHk&OeGZeym%`k3W@#n;$85$@nFNi#Ah&*Atdbsi{(}CU+mT zDhr0cPIM@AaP^l6duzHQtc$9P+K`8?+UMBo+V9wBNOQbm zkSEwbiUJq2K?#oKp-l;{{U*o$NTq9EG$Qyt;B@VCDQiO8T+-y2Rc_-SAHXok~nyZ-OL9&M$cUI80uxNz)St^lrYMT!V2j0KV<|=$Y{N zDAGp=92p?lh`{b)^(AK;#tZ#8z)2gM=i4CyR)|IR*IZo3YrDq*;Cc0>?hw5FFwtQ2 zQt`V(>xn^WuA zNiDp-HlaJRKD~QX{fe>IHej>nwP)Aj;B(_cjap!Vvf@h0vBPS}&IEl?7_S(;*a|!H zt$4hF7{zo{AvsrRmp=#$*o-@26|N^lVV8C(I5A=epDJ_gp#gwPMjYh^p_BI>wTeI8|Sr}el4B{d%5=Bk?{H$c~p<_G2(dh z!^mLQKJ3n1d%;YMu(B8g?Jsof_s7=o4cK2t{5|D7OSw4q)Yfe}GxiQljZfVRkfYpF zdPYZ+2`vD0@=%q=w0uqD3Vnk(#o3Q|Mln$RJ+Z0^lw#tS^)c9`RIwsI}I&gdsmz8ne{8Wjp&}U>XW;l zs9)0kWPL*S?E0Ct5K;7_YcWhF!t@X^!mv$_zF|8#{w(N4+ zf2DP#olN_CT4mblw7N8(Wy6;JZPoRK%jRvEw_wHY6?YfKJhL$?D=RN6VdadKpFex$ zS>nTMWva@9XJpIQ8`#osQLEeU$@tIfS%ob;j~X8wQ0 zFvaeVHRBQAhhw+Hz5|c=J{(&J`))kHz7NAq{^Fa`{r`C+;F~n%w}-n$44&l(MTj3A0MrcME8IYT~}a(T{v_g-BI&8|aTQ<`0eyKuWIh~d3icL#*%XYB?S17pr-$|r4E zWlt(PjW5kVzx2^5b3!M-m!rP;?B8w=o4}1VmSl5be+`Se*fB3~PST+8KWVpbFH&F6 z&v~rhl(?7YJUVSnW#5{2o}9{M_1pdE)VZNk=DoUQit#T$zs$b9<-IvqcK3ain_~Q1 zZtmz0KaToq(xWT)gln*=L`^EhEM;@89Ni{&>KkCt~{r0yll|7Mm^GxpZ-)CI#^()FxNX{%`AS zEb&~r@OhVVPMIg_`I55v-{o$9;@Jxqe^@;FQ1b^a{?@|If3#dZcBpIUsY8Arj`aO_ z!r>3@l(IoPe4c!@tlz}hzLkM*%2G<7IFPVN{Uvx!-&ph153&2w=ufR45j!U+PB{T` zR}wimEQCMq>-sD#u#a-36V!u;XO*6LlzVrAM&;~w(iN?JT)%E>V;9@l?zD%FYsbyS zfF~DejRT&6A>NU2f13pUMSJ-Ku6z<$7-1=M90kK2+7tJmJx5whgtS*D7Ml05bd(YE zjJ?l5x_L5<<<6w20(VP|65NVF7V?KwRmyH@q1R=4QaFz=VwmYERba7Hg3|@X)W_0U z1nCCZhpX)aCvhii1`}9A0~jXIsf~u>igu7wzT-w#8%8mKf`|R{i5zb;tjpx?RI9S% znLwPDz(c4G1dV&b#0iroCrp_-ZF=I2Bpi}yBHt`A9L0&&9x}=BntjY9I*P>tb?G?6 zemEHh0!NTJG)TD)2T%;@F6W!(vI-1RPY1%uiw1 zmH>#oZq}amSprnG(FnoL^LmrPCpQ`Ln;<#vmr8sL*&r-pX+x*vR#&56+Ws8u_!L~h z$c%bY$yn8y6grF!Q9!~8O|F_d3D>tNsZXaaO-;*QwtU6PRnH{#IG=rP_4Da#GG4gn zv3A{`)@N?mxM{QTX!$E^8jA{c?l*QX zxeTOmMU9P;Kj;=qxN!@a091!a;sBo9vrWlR(0G$z?S| z)DGMu?{7df9C7I{NCF9QiA=DIMqrN}gI8u0{)GsU5=p2;(oX`~JP7pv@lR=#$c+@r z_5AObNbdii^1GzIMv5$IDMm~n0F;nXtdN&dFd4uMBs`I|2pa9#@+c~a2BmwEoM`(XeAbB(NcQ} zoNX!CWj0#OyFkn+$j{3*?Z^RB_?GP!v$x3J+{E(lHBkkN_HDbeckeRpvY1H%m{8m16`<{f zIu{zpV&1cTk67(gQ+BD1l;^zx_K=rTl3+Foqlv1L28t`Rl0Yg=|vE;WzPZMWp_M#szFzD2Ap^S)hQ zQAek2Ed_bTtpx?5#ak+PiS+`E0FKHh+Nkz>JVa~G4_k~mcefbv58IDhjNMy|KW#Do zyv6v-7NdKM(Sx8nco3e0pc9R!S_i%xXgqN&>=M0?N9Zf)efC21C-koS;(`!<>cqvr zlY8J1!ME1hKyTlxZw1ra+7NE6yZEtj@Z0bB8}r{9cvT27PAJ^^-h`rejG{TA@Qoe2 zt{Md+Z`;n&cZ!M24YU=H6^AO@PF(yII(GH1bnRL)sPyc6(}xTh)ManMEvM4nG+mwH zE{S3~`#%5*;Tltzs*&2I&f={ z&Sg36vvo+&5I;FM`RpxpgCl6Jco7^^xa^r(H#Emo8KfJMh2y{6wflrFXh>ZGU$xm$ z=-PEU&@HLr04_aDP?S|7NZ=bvaJ(t}^vs%p>TclZC?dl`@}$U8(dh~r;#MK6`qCIy8Da=XzZfvnaT%L9UmWx7vlDT?gFXUC4tLhNrBw?PZKIOFU*jn59?+2B zy8NL=ZX5fAttm+oR_VHYT9S?}-%F?E>EZSlW`v(sm^xkMjzV%|30BKXr`hzf(W70K z(XPVGGRLmEaZ6m6KRLT<#%wgisu?I>G+uz@mp)_=k_{Oo0@)iW(?>fBZ`Y}AK3=C{ zSX_niGRD_cSm-F);3$lO*F%Gb;4}!oqC&9btQ-4Uv6a z|LUQwA#rp)7nTG9Sws@(PqhOE#%X#P2ZYCIjNOtdTv`G5J~3UADsaCptacQ;Qy`-1 z>5^5}+Seq8Rg%^r&7)AjR0pZ2GBpRSP`KGw4@8GnK<$MJ-C1GqSNoQAv6WpumFmzg z-^yvP@kTlp|zz`#=YSZ>0&@xQb_XKicw6Nvv%XQ;owt@PxB|WRFZv%C=bmGf+&uDKmwtAg)*;U!b1R=|+ zwMJYyolQ2nS1ncq>5ro`LBl$S9v5-ADOzZ=mBLHpt(!^ zrE0lKB5?{s%Qrm(sLRt|h=^F*-jZa0epXYfP#Q&gR<1THFBA1KHZU||tlXA7>%nS{ z5UN>79iEV7(vm^ZL$YErtp)}a>UKx^xGqPhhmMuj5^w+I(?030=FaTQQ1Trsi-;(j ztc^&@Btn=_e-RN#q8N)S%ttk>7)dIi>61QI0t86+Q@ZAQ-Dgl_K)obDq7Fi*Q3NQ| ze$-n6FsK5Mh{;Gs&Oe;?{V-}E+OB^}_{Wif<3En{ zmtOPu!mh~rILco@U6wx9Gfq83=qs9j_T*WF5u5&Nhs-Rk^_G!pFu_%fhj3nVuUb$k zGU&F7gm#HhEh~s{nevh5haM!O`6q<*igZkkx#$-05m|Ze!pLY$v}-WY3W5IVStXiq zA&D$K9JhyTu3H&3P_4KqjS5cAs@tql=DC%EQ!)Al5hHICX(KWTWuJ6vLTbHnBECX? zkO6xfhpvdMy2t5vx-aGkTv0=g+}C$tZ4c8YNG#cBh$SPd&VBZ+C%Ap}-Q(;6Cu5d7 zR^w|w_C$cf;8usbC89$Dy=o7+O>mriBESbBfo`kl@JEQ;?Wq;}8rpedrrq`gr*3%E z3jSbq12@k82yW)b*#(!)_Jl!^pq3k$1n`8qE^h(Z7Hpv?O+b1U)*I0mP_o<-@JT4J zmizEZw?8kfH6=K{wo9KBlA$qNUnjV_OqrN3dS)7HS*ADw99^{nuNocjpt;F37V_`* z&iPz?H6sh~r={_^YE_>(SQ@!?jb+-gM(&9w!!Ha&;(=ToSy{3|QemON{Y&JJaNGv{ z(C~{^t7XoV3DLH-O8?p;n#?`ZqzWRvH2xdizwrGx#AuWop^>V;4&zPp&BmbMu^x4Y z!4njWv9A6XERdZLL>>C#P!5>}5@*2azQ=Yc2C}stAVNe=@Rp==26qrpR28>M-x04DTA>T# zUa;!*R_Si3*G+`i??FYyVKhKCD7cjW2~h7M?sw?%0nSs5Bxa_s!JS#zu5Ra6obRpq z7m&hX^?x6^K_|NvXFAa=&s>S8Z8*1hBq17u{2VP zUW(!7G}nD5u97Tf2-{1^0S_DgX+NM-_uhqbK#>_6^6kZ68o34Y8A*3kJy=sdpRjGF zFSc@D6NJwB_FKvJgUMxFOg)-36Wnj0{(!>L^+C;Q+WIyI*f5 zR!LuCl?0Kbp1b3zI|rsmdKZ+QT`(8x;ZTs1W`a)hQ4|Xs5uOlra1+hkQfCAS6qG{)CthBYP8x%BLYEfL^w$A;c(n0l`>$? zdk`6H(*$(-+m_8mwf%~KH}@617BK!z_OG`hdpWYVCC>qgOpfe{gYK+!u5H~M++PvP zY)=UlRKnYku*Gl+qTzI-;h7&P|iq%NC1`@8>UEfrL@pYJ3bEq_^2MoZ<5Ox!B zagl|(MjVLe>L^Yx)GozI*PMp7kT&%oiuK!ah^c@O1>)KVEoOgS3n3wQpR+^efVan9 zlZ-+})!T;5DJnJ<7YXc+IPc>`CR8|V$tMwB?r3VcOVx%f=_nEm z+N5gLwpOy7u&L6T>_g{qbE{Qvw1U3_Y(Aj=oB|irM#mm7Ewm$6Q*b-cE-U@jj({|Q zyEncbf>tyj9;t`CE29uH!UY?2dI*{`0D>4ER@+sN+i{gktcC_V_eSgefg$rjJOl?5 zx(zqBTH4D848{>nJsc=#J`}H%{{z}+!hM-Q^jkH4K9E9V+SK#Gf7sKmF`E9r;&Lw< z;t*bI&yyOBI4?4oso;q#G1Q~fUjm&MiD1;4VJ9Tt{U^mt>WO){6`uFUdyDrp=RYNr4EOblA zC_zX;MlzjF@fKF7bDEK?W9dQ`^S2aK#V9nmT4~VZ#RaSurVsC|1%)O&TIs>c7)Etw zFd}xqXrT$w@h3g$ZBAhj49J9BesOupp~Kk+-+#C4ox>G}4}EDYe*gXK10{#P%q}iH zoLxboNheB;!yVaD*0rrQ8Z$PSM}95wS&{Xu*1p@|G;DxE2FLt+3K=$&LI%hD zv7&+oQpf-m4eQD0C9gsT)&9*~%08)YFK`6eJqyaZUWTO3_D1`gDUnJ+wXC2$pbVLE z!^J86#YWoQoS=%k9z%px5Dc*CxzoM95tZCe97Mf|qx-B)m9+>}s17DiML>_|Hu9u2 zC$Ne5b!Lmk6ctS~TQ8cGw>M&@qZw;v)#nogB!n3TnaIw*xj?Z25?T-?cw&+L<;Ca` zFE`rQ1@_~M1pdh~;&}w~rO3*nVF7|&p#GY!+i}aT=n8KUxbeFWLJjVcMc}!0udiCN zs0)eRzlw-fX-_Mo7bFX?6E*TL7DGxnrCt5qrn%y2o}zlW(g`4%E67PR_&vL z(T)sL7E}QlSgnD9Iv|}vriEIdOq8ZmzHM6q3Sv6lh(XvDUvE#K`85FonT@<3#5M(+ z=Iafe{$OI9P~Yj#*Q)!A7Dm{G_-;VLPFhcdjgBDxS*D?l4wD^_-TxZJ^?@S3uzGYa zcA62a9C6b&bd9dw*fqa;Q&(=a(9vnC5F$<%BR)=g&R{JyxNva%mhhiKMHD(d)k;D4 zi;bd+VQ+_cq#k%sXM~)qdUP3PHKK!DdV!lER1I~J+5wGAL7TcxM(;GOQGjFbmnuR) zBY{ndasv3%_P2Pkks+UBg(BD70^IoS+-*+UY2KT?)wIK$RIp39zZF)S>|8Uh{4Ghj z1^KwzH1FP#=zvdEtDad*eJ!QhJBjbCw(A#jA5_~XEav`MZJ&d_ z54gsml!tBJl+>-!q;{J({e_-IKq{o?h4eEXNblt4HbdAbdw4sz+riupok&jZ z?s+D-$4gFLs<_KiIWfMEU9D5aUxpw7Ja^@r_M&wH*m2x}n$HD(om$#R{P;)Pw~OHm zT}o=GO&W=#gc1AlWOpEcvTkM7-X*rbE^!Ak-+?y8gOk-Q*FnFmkB)zc!7Yp0?Zf;; zA${Dvb+|AIWPZ`{a;CS=1hldU{51i*!G5C`CU={9N%!MqeO$1{*fGmIHt#DIZ-0}rw}3#AoxQ`HhuiV&qWprr#vI%f=bN)l zJGbvJQNK#c2CYH-E7*eTRx!A!cz?b*DZ6MJUH;;)2$$a8p2qE^`kM(2rljj5D;XEQpg;J;{HKMJrLpo>{Vy%1w?vwIKOI!4Ir&Ls2Ws7U4t-%0#{p~fdfJ@3l7Lm)Ak)uLAHU* zU_3&`J{Vl?(+mT}48r1sgK_Qbw}1ZO`wj?fPRALRSeEc|O~2@a{ib8O`W6=aQyc8x zjD>WsN>T#NT-YX&8oaLll^aVrn@uA}T|y0>K}r%3o~K2{hG>bob$fYb_n=GA=bi+1 z)2=k!vRI#tf(d=9GWW2)T^PWTY!m)WPRNUKB{}*CG}Wh?0>8Kp-Ty*pZgD&W^(^n zid#DHSnHca-8l*jE4EwTl($5EgKJ$n5KG`7AvQN9EnFw6(7j6>U`v_<7%{&xY!?Zq< z&(iuys?&zoFvvOO%%A}h>4GzZdP}5tYJ!3#(r_Wm=o&>YiS%TR-!O@E!V2RsWSHoKY+d!Gmxq9*pa7^$oxI{rawqS|2s-F%L1g z)9w*eju>&L)~g<}X`t_s@&h%?9lCAQ4m*XJl%Pb%7(eMT$~LTr8@;WsW7-BPY8zAozi>z>>CMm>H{wr?r^17i> z3@KAq-w~8AEl+Rxx(R&XB9dOzawW7oZi8y`{6=A`OEq)0WGuJfd8QBeIDTGcSn>0+ z2s~;$vK8Mg+p+xmvb^QrExUuKXnB+B`m&bpZ_eG2c71cM7A5F9M`u^JQp1877T;32 zMlMElNqOW^kMRH@pzG)C->mGue$MSwZCQzhvO{%oC06j4uy2lJ@xd53t5(v>FUkiJ z8W}6w8;2t{uIj|q9YLjM0Acu8qmUnSM#%1L-xbl(>Np6<#t8Y6Z_HVKMT~lcK?O$O zFyUgR6nEittsqqofKN26Sd{7e54d|#x*4m`5Vjxxs9LdtlkCFXK8Z0{UFUx3-8%sL zFBG>__2vqVTy=2;$5cZi9?FDCW%ZBJ{y0iQToYRv+OB}hq~yTCLx+#NRr>Z{|Mt$i z@4a7kwES4b2ggsG{P3gfo3Fn1`WtWlrTxm)&M&{c{oSqaUAuP?nO`9K5=R|z(-9}# zj-3U&3N1y&yZ7wf2eyIVr+er96Nk%jZaa3^h$`8LkM3~iZBjoeT@IbMsiu=+H?Gqr zR<44<=7aGwtfyN{!3%X6sX%?pAd#lVo(Vje*lsCN8$z(b7t20_<2^w5j?JuXp=!@+ z7k3DaLQ~eB2s=6SL;j;-ABTT3{O=K;j`(ckKlIkf%28FLZDXn*IXk}YkM+^^m~)0L z%B{>ccDv7?eP8y=@3q5!XYYc5U404zEvllR;^0>XzB=f&!S_N|{-hRgZ+%xDWP%FvZdd7b78QP;?Tcv&&dz3QobV9QS|1E7aF2!IIz|bCm`^zfg zd(&ecAuyla2gc`F0t2o$fYET%n$h9JX-R-{!wY9>3U=jy^Q8c18sI>1$R_ROk9HLn z-zIUkqH71-iT-R;y#yMbnuT;WY-OP8I(BYy^s_<&omx74_99WSW(~3bQvQq|?ys=LKV(xKdIlBQg!40A znB=@iWI7*X_M#(lG$t_HXXB|ZjdVaFOOnN$mt-p1mh@-hfVk(IlaE8xR+D9a(w_^q z?KJ)>BC`QISAX@b9w8ZUI`yOhS4y4{kcrY}twLI?z;g>xVz#qaqgAkK$~ z8q*W#Z1KXIz32gmi07p&Ctx2j$gyX*??EoE|1r_ViX6tit zX^>%QraC-R1o$Wk`9qbI9Q8XG>IQY#TSW6pm};zZW9c&c9t_A=cV#sS&Etn_b|J7! zkESVZ=&1lhKaugD32IW<70M_!Cy7HkrVh3_8ZU8!1;C46IJBMFBv${v#dM3uJJvK5b0Z?~0 zI122^Bcl0_x$x(u(tzJB%b|7-`nj6>a-%d%df%y=5S(T|75uB&(Cp>5F)lS zt2wtpuzqay{ncj>{6;+2({&*# z$PFex^*=d{@NVKBqc=c7b^u==%4$T*)(-Gl&SSey#$#kWNyZv73dwk%j0Q4XWb|GE zV;~GP9yT%9%|H&HE_TN@ihBfZt-yjP@EOit#3;ZkG6bsperU0?=}ng}Kksazo!7ib z?o2vxfefvqF_Tp3J6mEnNvu?qbN~7rL?)pI`Np}X_Do@S;eH;uC3Nd?3GaR$<9bLV zv~yz;1F6ebHNxw#xu54gBCx-yU(CZ*3!djbqaa37%e^O9q}XuTejl5*e-F1xfA;t~ zRc&6t+%}OQ)9&Ox5K`bCMj_tAOs-b7H$rIVlH(3$G+6dI?$G_1kJg~1`?2ol>{^3d zJ67@l$>la$?q)lv6&fe96RyE;pR!MltZdp8rD*qsV0}B~)2=QUS3BU3EBIcFae$Gk zK7)*x$v8~Lz?Hn8kKui&2H`G24tOY>10q)2pHU(eIo*P494I^!6`bL8$*mR=^hJW1 zI2eL+2tZySKZuJASdF~>27EwhoFn5a!5z4YH#)hZHMo-$z80c{xG@+~@v)_$Cx(zP`eexfLA?t1HyaZW;G+p7i+_L*mMSlW0qY64M^2N(6-2@XO(opG zN>RB@NM{N>5cCe>4L?DhuZrS9J0N;`S*GK!M1;xK zlD5ET%^$O(HRJBn-$(bTXDB)(%`1erFL~L8oRCDDDcr$RrnP0GGdaJ7f-L5M;pjgD zR*|uVjQUl)pK-vy$O^7I)+JXmc&H<|Ub#idM`vnJR*Y)Y; z1DP;Wpk~uYV^qymy$j?_V+6%E`h&y>$c+T_A5!maGITM z*}W52jrsXEy;qMppsptsZ?hEa1#4;U%VLD0z1xd(w1|UuwlnUB;dU1Esae z5FjSQ(k=|``zhl+q#7t5Li&@`wx7}W3ose=0^ymy`8Tpj9gHzBvI%1V&=Nq;{tz4{ zLWt;vBmDjOA*z@aJ`xBG(INF4vCD=2MxvBDxrioG0KrS?DB13G+70WwA$Fg!9+#m8 z_`Y+~LfgaNyUW!vAREvj0kyLncyKm1-LQz=_Hq{YL&;kK{ zHzbW(ccWdPHEDjl*$$a0;Vi87r#SGYHApRDUrLIGfO9|}%p~@?>+xAAI^9ymQQ>>M z$JMHEX~EFO5u)&?qyad-1~4QGE&7XJ3cJsr1_^GFO4j2_sg#UkWC+er*RyiTnf0tf z+Oi%|URl4hAZfq3$cQItXMu5N0T|1Z_JYwJY|^`71)D~(*H^F#1e2bAL(JJdb}(t! z!K9(pj`g=+%NU2 ze%pL~Jlv&5Fp6oj>K-0_LL<{X!u4xZ=^9<%m7Y!Az;!mLzHg9TI~Oj?>LnZ0OBRf$ zyR~t$X*BL{x-T_O-mdMsaW2Y#e8Ql?h0s12yg$-^5QPmML;=A7!z~6;fLGvSI=ohPv^kC1@vu{|(4I(P34ju%X)$mG|~08eG`W$+R(Aoem3} zu*N|T7+8Sx_1sW`A&jr8)fzEHFWvV$SZ_7;|>lCNWDN!>h=WHt)#kedHt@ zt0Kg&q6o6o!W1;No{mTwU+#|t*XF;Giy+Hy4oCM+M*bUdGQu$3+aRc;3gAWw=p>H- z_tHBXLAC&~BFdMG6@bA*IQP)1{f-xzvEGoL%*R6?f-g5)@I~g6$O16Go^*thk$5co zUFOp$HjZS-oZloKVUYP#0x)<0n@@({pZQF0$bZOu@qfzPi9=!gW&e#%6dojip3>8` zE*%a7q36qsNjp$EvdLZ@X*;qBOU<@Ci)n8*txrjL7*a*si$w>mbfPW4U~4uJ$p-v& z2}l>8k#UKP+hj;mV5rF$OU7(6){>D$#x64cN=7XiU&A2vWqY8QOwO4uXW?r(MGdso zUo<-ylVmhLFtGM~f29yX$%TL3KN#U)Hi7vuKI7u4oxKQ0DqrdG^CAo>^MyV5F|UXh zL1jeIE=olMUWnx@<&Y%&b2SSl6JII#T#%#(0@U3BVo!Vl_}w1hSH7?zCf2??h8P-U zw2Im@B85And*85`3DrD)&4xf4i-Iz)|C5qd{{!oPYT$or;QvVtKpLC&Op4G&&A@S_+cvc_Jj)`Z-#j}5mXCIGeE zO;b9jvAw37!>22!PG>hvH*428k5*(lgwulm6sCP&O~!olG2jI z9!@eB%v6@oWG~D#zm=#wp2*fDnmtL%K{MG$XPRA!N_GbOhZ*MbB;|!9_S+=$l$pw< zGuf<}=7t%{TQk^!N#-wSD!XU0y^ZEUM&$@28*4PrFe=v=*&-uO@XEK0>_P zuXuW*`OFK-_7|ADFPNWRtIS!;ys=hsdZOaSM8z)?75pT{A15i2CMi};QkW(w_DoV7 zousInq_{YVZJ)&6m^AU>$;z>l6;mg(vnNknJz2S9vf`b|Y5o~mHQA<5UX(uj zlC1kB>-uM;MbFAcKPUh8Ig{c~(p7(w#jZEite1|@lpW7Bt==HLut65H(fZ9sY3e4~ zTbty)H(TdzmcF@J_Wou$_oAtEt#sfzS=~C*Q|Z#brpsd1m^2yEPcmdMcM8bO@|gps~5=5FR*^GKssxotaYJ0WRdlwMbepzWv?xk`z*1( zw?yijBFj#Zk4m*Z^R!g4R93xI{zjVBwM?3}T=wyDd7l-U$}t{IIi3S}a>jUun#YBi z$A;!T8j|;jE_aMJXS7E%D;%u!!!@blh!N<~a?RBKNl*_l?iVBVMZt zUiImX8y?T~FFc+bH~zJE6vFM_y1($;X#05o`q`rcrMgKgUbf%3n|-70ZE|y0#_;W0 zPgh{yw!o`#v({QNuE?dF^lFA>R%V??dpAUT_mPmh6Z!Aw@HZ!VhTWXVH^qCd$@unI z7B48(knrVkWDOi2a!Vo$)bdwg`oJUPriuJHLNO4g8e3CrJd-1D_mGW@{ZPs$k1uaXGf&!!s2Elk;YY8zVvgokZ}GiC*L# zI6zM(6)CXa{mEqdTUJ(&iB@;O#Oe-6@WguGJ#H(@!=H-ok}!A_cw{7^4zDnmgbjg} z-lCTjSzVGa`jaN5ew#$8PcSL;10)KuHW5>M(?p*plTgi4O2Q}tC@KTB+M6(a?gyjv zf?)uL0T`CRh&iwbVvqv`DG`K}6x3gTUbM;r_n^p>ulD9>E#<2PWH^GzaX>Je1T#l4 z%LOx4FfD=^N2ceRJa9e=4Df`l9ySp{d5BA@5WVohG@&386#cw_W5_`rfAbMk>u>ws zH5ozZfkgIu52^r}>0P;AsJRNV-+ON5DyV$aK~Ys9S74Hz4bbY_a*GlN5b#4vLRP5q2IO= zG#X6$(gRG`)`Lv=x&zG5OTyP*WJ2=($>)p2tdC!c$s0gAXZmho6YxEkl4($Xy>MtW&~-U2-YI zsvXMEW~(x!xkSmgo0No7jY1jrmP{G8@1`Q;gLXyep(;g4#UTY>iH;M|fzmCEI3bqq zX2@MkL!DJ@*l`mRQjNMg-cwigx|$p|;)IC}I}(SW(M;HJj^Pi;7>}+aI^tqPNJlh( za-qIzk>}@H{w`*&yD3n~8jDB6=$kM-)WotOrRahd4a&7K{L5TM`{mONcWDA1Eu*iL zF(D@>u-bj2S$&R{^@ObBLe>R_WN17;-wyds&FY=|S>7@aX-h&Yd|3Ud?dYac(C7z- zjNBc;=b$2v&T>-t;oQZ;|)VDufa=sOyM zth41YBR`O#4$x0RniuLj6ZvxV5Wg^tz_6<(WmxkXC4V3VO>jHxO0FWTS*i>>c16MG zR4P0_*N5B$uI(l^qzUzclsoKHc+kEDej$TeA=)6;b-44nq({#o#XY z0e1-8p0M*nhLuO~RT0C=qr+exj2>DQ5qcncSXD&GfoODq5G-SSOA4#Ig7McBh&q}d zT5*#Zdg=*QcTk0DLyPDRMn~+9(B%%{GiWm4?>aC>oQ&>!2cx^w$mp(GnUGsYG54II zi9iSZcwurn#ON?N>DF5qU0yB|axjC@zwqat>50D-9eV1Ix(gB76VbZE7=FOUrN6UG z8Q$@tQdhN5sXrEt+L%A`qFg!bgTcy>qHcx$;J+};IunOq!stM=V7Qhrm_ZoKAWTHF zhT&}?Oh^^p<$*wDe#n`kE)%&=W7P z`YILc8F42uq%&H7i%<)@Yi0Cbq7#1aVnR9`4Bym9U43Y04l}Z)62rcn3Au0pt!H68 z;crD_;DsKF<}Ik;BN4Y^75b|sijeb#3cksNE`DS9`6$K6)B6>=W7`#c`38k2yz@Ez z`GvZw=lCYzJw|`Ws^qW!T^V-15hKH)46AY}`EnYzuZ%oht{7^2PZ4^oQo$EBDZ&o6 zD|pLI0>!3@4i=g)A8F{7g`ri6q35GRk41!54GBFsIJ9UGpQEPs{m#TvCGyRIXa`j0c^7KT zL2Vmmld>aE<}gDmiWuF&946%03z$Dr(dDl$9C~yrQB2jm6Az%KS=jT59yVwML z>7(R7z)tC43aWJC$V)kjku`r-gnuAa=&Rc0o{@K7jJWgMu#Ok?SCHiP(2MPC*y$_m zFuaGJcA%B7;0?bM4wUe}P{N5}wpuodp28cbxvT8vnHFy3sar=}7>@e8Ywvcpfvuo|e?kYbM29m1Mtc^dQam1zEA zV(5kFh?+z#?6kOjuXicga0e>;15`;f-k6E_10kpqt^TNu2`{N+!p!Hf?Bboocrn6r4{WID^q0 z!x*kQ=6z>ie9fYYP7JX{1HF*yh_DaDox%~__i@aKi&$L0ABfGxAe65@2nM80|wUp^64GvcO7IikHE9u;Op6$X93h<1NvL{p%0BtBZeSNbVE zBX2Dmab?cP^K<#8A@6wdoD-)HWOHwwphEXuh%%(319lle)a#m4l-jCT zWoV^FsVy>Li7rv-nl(yYwF7o+1AkU&V{+s}Z%Y}jDhDGXM~-o(H5^qAZCS)}$Br_5 z>QSt5MN@|!AI2SgjJHe$zd%hxR~|lgCnzTa19^ZCDLIFhi7xd+-A^^T&qVcgf5-c~ z?`p`)&v0GM7`}u0QkU(3E&wW~xG<|P_*1kSq1JX#w+x?G>kBm$!FAASVJ&lnItJl0 zaf3i~i<-63A9S^IwMcRTNg$lnI4dTTlKFDs0t{&_H`3}`w;nv_z2_m?SU4tYd<4(A zn!dt&IRs>XoXaH%31pAfa&yV1k=7=2i(#V=a>F;PZtRInZn@QWv5;snA5iz^rp`Xe zn~T6wDN*~^eX)tY*qR5ICz%0q^PtD`d88-6pq(S*w?JU%oCS?<^OD`3s&!8QAM#Gp z4BzOMN6OTX*Xu-gs z>UM$O%+@)Jdw7AbEA%Z#Xm_~P-4_5KBFk33f0Rregj&JZ&T8hib}Ow8kRp{&v|4n@gY;|2NPdN*%w6*;=Z&(*-57raWXe` zM%E2YM$|8?zAqs8CihpG-XbPhH>8<_OBeX3L#c6vihdp-2^uv9{Lq$lk1yF?H?9Jp z`UovrH}05_?wg);>+egFfLQi<1nn(k$h~j%T`T5R*GW)qeskQ{G%8s8^y#!B#DKJf z#C1(H^}E3c>H5k_=GV~bf6m&~VC`zOb~Rbm1Ie>X2>J#==dE4M)~*ZIt`;k$zX1gd z2v-P>Z#4wx6g~@BNsX`Z>mFf6^MhC}1pkchP6`E{jLbW&0uDk?xtqZ@j1cx4NGo041X!{*w5nA2pRKDQPX5H(;E#I}O&K@(63L`KL&6OIw$KFS9~ za?lMyt+Aoyl-dUt@K_-Sp{R;YRO+Tpw>$fQCv1t4x=7Yad%`@bUBB+HtjXP9TbHPV z`%C{IakG3cd-2@vE_i-pUGfrgJ!kcO9+APp58K*JG%aL$2fd$AMRR#sd+kl&Vbw$u zNFQ;c&|tE`CneGQsB`srJdB_))6KykZEclV1)Tsp8;0l!opJi~$xCBc?qsT0z|kD}}w4 z>c|U$yTrLYunF20nuE6T+Y$DwvY2r6ey1 zbM|H}W^FjWYYHrZM){DFA0;(9tPD-u>)W1x@LW; z>$)|o)5@|lXKmb;1A=e&HS3D*>(+GNX;|aIJ%R!a#J1z1&Dc})=|-hM8Fy_KKB?X- z$`{VhczKkxwyfppXQ?i+@`57{i?BAci4xKZ55qvlWHOS-m`lcDGM1C^JQ?fB$RcAa z83knQCF4yp-Xi0DGRDFX$_@Jo@;D7+Gjwo4YnLN%W9ivl^LyJ?JcV%^=D_#FLLEcM z-x1^(;NYO3wy$HLLq|2y(~dHsDZlAy%@VO44buK_uxzKCK2sT|2o8{Z#4G(Fl=Or1)NLq6pbZ7mWZuMr!UzN6Vx_P-!PiKX8%hTS zYZ?$N>`cPRvX$3iXYw$nI&cJKazR#A{{`sI*r0&f!4-ln3gKVt3G6rMVR~+S{z)c1 zD(%GW^hEsd#t-a|&;EG!M_qSjcTIQDPxF3y?WfB>;mgNgKvop!st#t@Qx>QmdV$R2 zFKpIs($?M=IxxeQvcR6OfMUKzc8FLC-=;(@)HDcM7ZBU#g_ZscVqBLLx-zfHzG};< z{6;dp{2R$^JQL$=-$?!#5047mA-CB&Dk{oz+N!T6c-jIx;wtgWnN;byF4^zO>{93` z^#NN47mA-I(0Q~Y&}p&k=}`4k1v@PrDrb2I-g~^^v4~MFgd!}?X=yvyu{J)n?Eqp} zQj5zGy#nuyxL`{M=PWMIsOaG0R2%@hC0{QfWSV|iw(yq?3(4HM&@Fj#VTUF*H8u5~ z@j}WZPoO3)F7BR@5*wSMOC`^Y)HsgtQMH|~xY$IPw!tjy2n=mIpR&ecN#(9`s*duj zst!x4Hf56FWg)L)Yv>inwKa8coX6AU6WSJB*`W(|Rup&WoW(GMVRp!2lKVFy6$t7H z8S2d3*D*jaL*0_k7kb)k<$WrD_g~)U_ul1w==Xbnr2dcI0$?GOBK5@lw{~x^TN1L! z+qAx+*Q9O7IxC!8QsW|1;yTNnahANLJ??VRUD0}s+OZ=}Fh)6ZIz|bG%9+}s5)5Z~ zTzPq1PHGM+*dm%a<@{LMee%Wv8XmIjXWVr_!ma>`bjJ#}G)Zv{cfQ0~bAH zr%=G?EUyIY9E=pVrgt^bV#N;GdiRhv*I`@fSkG}cb4w^Uj=rAQm8}|$HlSe z1`^J>wj_yrveI;j$DqD%1kL{+XT52{dA+#iCNM}zK#Ahaj_J->e+ z8&JGC+?W0%A+C@z_&53diox$w!sot}|2F(T;Qa4W1_|X47O?nl!g5PCrS^1QKXl%M zoq2hAZP|Hk2kCwCDEjizwv)%>;ydDn8N01Kx9w!?vk7CC-t+4SZY!VAb~19h6B9&7 zypxN=JcV_F!^(r{BQDjFlPY@A>?GLBTaOp#E$xUO6HKcBCipSV2~X!1k!6DOSnkv0 za7$i(y30QVvuKfXLP}fV^tPhTV@^q1VdqIqWHp3XM`T;gBxiX=M+Kmz6q-`ns&Zr7 zN}QiuleATJ9z!Ha=Sk<7YjR9<-dKfK12N6DRUxpj?dX=a!YyrUwzQ>hX{*V@xXWAG zTDYt=d)YNfYoT*#{L($w-d2*(Ryx%!30;a6Kep=rUnIHc&x*G-r7DH~@Gi8Ps!a4p?+5JvDgM!_ zqx5IRn_!7BF%S#ygPLO1RB7ms-oM5|&iCi`D;6mP?H<(oFfz>yWlJq z{}6KwT!+LzxMtzWXgj*Eb6?v@XL4IoXQ^AFT#j9dHv#DSv>U5(4jnpF*EWC5FJ;Ty zP8AF0pk*@n_~6!aBrU@+^{bw zp%X%z%~{bQ)n#x}XGKPb4zKdc@(!3CY$Xh-(^8&cNqrznMru4KhkpkchOp^hyA-i9 z;xe$Y$40QNqCA7kpyz(y9zRQ*H17T?TSY1?lenSMj&e)JRgPX8 zDH$6o?KoLUHn}`hqJbUZ`{FD1t&Lx?w&LVIwjMdE?oVdBT7F*&N*bF|ximh-goLB2u3E53y`rj& zTTvM|N>zC^2m4icj7q2+r5bhBl4B`3YQxU5035HD14mOz4KOS;*>Wlc4C7RBsi#H(zgEKUE4O6hGh!9{gkXt1<;+_e7neFJ zE^butn7A>jxcIgs!PxSvf;;~|_TD|dsVeIqKDjhW+t4&^Pm^9qa@qo+s06vRK%2A_ zC?e2uQBcvg76b&P$Y_g{qy-gbbd*vRX2wxa5cQcEKx9D2!L;Sl0)bYnAVy7X16UCP za)~vZyx(yFWd7gjX%jf-_owLurt$p8Xuf6upUOV0Uudi6>9i9)<7NXeeckb|N zhalAG0CHg-F^<;M!UWRYoE44#7*2d^_HQ;C?};EtjpIH)M@jB-4X0{W>FUw z^Wy|!JAUZ6xvN4hlR-Gc=H7iy+O5)crgYVJV(m0U+x3rCpDe7cBLe05f=@bAhUAxn z>goDNr*=p@ku87P(J7I^Q10HnzEj!tPxmu5?#*j?X5B)<8t`!M`>neP5m0&D`xXcZ z7i1NbyPL2Gs9!}+O=Y$9ps|8(?OEKt)pdRUBKjR&gc4&FRaOhzj+@4?2bPiWM78Y5 z$0V@6aQ(d1h0hn1q2bWvWo49JZCPz?z7PdP1D7%cqtEKXodxBq8W64l0qa+l4XG=m zAPxDYHF>40L|C2~zDRT|s}0iHwE>U~q3;la?ezxT*GD`?zj5^Ar9UnrOUYx`r#-ey zu}iU2dHwN_l?b)!!jbMdA8T9`k zVSr>5{lS^}Y=^hDw${C~t03s_Rt-2O{j33t>wI_9&Y=G@(2-73nC*5DKc_}y1?>Q` zrkcwia(d@>uO+YM!|P`ryMFF5=miD&<8HC=%;%5gk1LxS%pb?~BaDpbIW2Kn>S_z} zYCzu>f;pfq;L7U7FEMxodtF^Es=KaEa3ABY&2u+!W$WB^Yuyb(NK-81-TuCNQ;oX; z0At*Bp#ZfAfWQ>K%w1dRZm2;VJk$SickD5dRBgV#=kc}9wfjJY?t^iAV-1MYwT;&s z9&aSvN#^aqNHyd_*wjRrm&jN0;h7f&V3_v>2|JVHw?Mr32HnT#aot#^?bPlP2tgtZ zMRIUgh$tj?nm%t5iew|#@FW}dC%Xt64&U1zj_)R!$uk{~|G-obp>-C-5iKF|7P{Z` zj{6X5Xj!@N_A<{csH+#>+EsH4YFCBBkeObdd3JHPN{go3hXu8zbmKqV?_)yO683Y? zA#Rvpf*Y_JuwN}ENx|?x3$?3@^@77TE;f&_hIbdbM4@|b7rvc^;4{2Zy0$9|9x}m4 z;Ow|}zXTeu!X4Mr1!~^e8SCuYzOS=jzo6f6D#eVl{Xf2W@c;F9tpNG&;VaNPy4DIQ z|BKE`Kd$JiK?J>DUV5?uvms4#H(p-)Lq+c}WQMe~B|P(S#ShFJo=IO4YDR(Ova?I* z@SE1wRFvLhYBcSuTT-`kQ~i=I8P^0s3}_KqemZEcE=ki;;$xO!kcgU>>*5-q$-I~u zyChSIp)z%d#Jg!p(_5geHi6RJ?On>JJKe z`^L33OG=CLEd9I{jTMb1XBRiM%zcoeTY`*i0)^DIWXsM@Ns~;1z9MmNAMD-*9?f(R zY3}Vx_dz8x{MM4G?(Giu&Lv*JPz0E+!zuKNmR#Klom_*qLDB$>LPDBT-D}U;e{3bH&*i^S{ChGh#pY^_73n)aU;{%HMJpxo`IX&Kj=yaud4n1t|3D>30evcz}^CyZr|Tk zKV8}0xM|a-B}+E7?^`d#I(?|p;<7)$gcV)fB%9 zhMhZ`yaRaV{iWv^uth+f)#Zb8l74bOO&IU5+x6_a_q*7Bao+d4#-+u1cXh$EZpDYnxo+M2NF&Y*{tOs2?>B-?^YBV=YR1H!hKDz9 zjOapPkc0QT#*of4hTpj3j~(vXQM-QLs;1rRcduU!Qe$^L{&!I?`~#zW>8kq90XkjR z?%nIxuU72wXGIf3# z-@a!7cVM@>QP}aZ6oC6w;BK_UTJp->2X~f--ShJ-d8M^AYirhSFSUq4!Q$Etj8q8H zw0u?l?%k`ph6-f%5O?Fan_1(T=bv9}wTK=LdujU8IymlLU%s?{X?guG?L70@Q&_t+VnP4}VB8zm zBh|*PolAE-xxHfTc0yq5>&xrruC2fp)sCe*;jt8*=Y}7phABcjpmTuxgRTLT{*JDK z@&QV5F`f@RH6ZK?qY~jkM#IE26D!^E2Rp+lcX2yrhagWvxKN?5TYJ)UW(47F0Xn)WZ6yy@e#?j7mwT|2SO zQ0E5SvTJF1ewlm6QZf{z7tDnt%!2pMr4Q$UBk|@^>?NkVpCE0kch{0a0-e`2mlN8r zvb=z2s;X#WOb1)`Ni;cjMcfUrEPbV-v>;uI!6pg0cz4(THv!P{?(JRuygMqp#-S5+ zy;3GHNq`Q$J6_?LFRDP4S2XUZr~uvRM75MU|ED%gIR6W{okIMwuI-Iz6M-8`sclCb zo%syII2mU?rm?l)9+Z}X2`kKW6c(#AS~}EWlH(cMvLBe&1lFHW``!Xe>nP^K;SVPoc5NY#?)WOCgb`y7C_zKb1?%$c@P6x*SC>trXz%VU-!z>Ocz#QaKV5fT$N zcHYlPuvA{-UQH_!bl1wt!a{WHojP4*<-B=2mzMABQYwGNRjDKZo>{oOn;8Z)Q`ae5 zy0aX#;PP&{);(N^tzTEsU`>GxlT^XK8r;LbrP$s5Nbe95DuC%<1Kx0P_Y)w5u$~(L zJoDjlVLi25xm$_#TeZMFCR!NCZk_jg<}LsLEj0MP&HOGK)R&B**$oDOLbR0Y4BTL?ZvbT`uSEJRs1`l zKdaJcH}pxS;-1qRy~X2Bul43lUs^C#*syf(NOSMXn-0V|HRQsXL@Q`P09+nr@Nc--3RlEpF||yC2){%zw}z_Zd&3#Sh4mk_da5& zGp4(FX5|XZ+$~*8rgGOu+pmwc|GGX|aPOs0-9)NxD$hvm;PeVAh;j=mDEdy_gr=b* zD=06T<}EL{fbLyg=>pv&%wyQ4ehXs~jv%PuLgbKuOTh5`@4})Tz%SkbGFJH3Eu|0G z*uYwtQtNiC??OyFg&6ZWqSxSolSXLLroN?pv`62ZvC$G@AqvV~LZ+YH-dZTA&m1hTCUbWbi2&tSO^el93 zZ5~|c`(UHz1K&<~w`_w*3&VyLnw&6^-#?{ijie4Dy?;ub zf=+JX&`rn-nGXp%`FM=2h=W`SqE&!um7e@n)n)85o&<~!P(MQbd?VCHDAUh)DTiTo z2&ssQa`FXof79+m95>ZxfT5RiKsl#;Q(C0Re$MDb?TLzF57%T9LQWmd8NNpBGf^|=R&z}hX2t>sf6uLsRyM|;L+k$CL~CdES|); zL^d%o5e9tO1U3OroKB(CDwWE(;-d?NMKVeX*0-+~56fyrOW(eVzLYk-1fWC= zT4h3Uk4yOA(6=v%p!ZC~UC7;|+q!4B z(qQm>(EX^Z`>l4)b^_-LAwtSP0=rsz{&sw8a}l@gIK)lvHL>XsGr8BKNzcUH{dUju z9E6>I-a@;XeN11skOYCpo!sdHl4ps4MYtbxCT{9#{>Ws>++(^u^Fz}`663Q8m#{tZ zx!FYKH({RtxjBJg&*N}3bD}%Bt?7q2oRHiPudp>GN}Cd`?W^MYMsk~!ahsI!Z^p>q zjEM;1mS>1m6(l}#X=6#kT{v;AVQl+%bZc|w*kNNwjm;a|GynMNT--OTPlQyW1U-&} znq%})JqzIap;@kHgnR4T_q%>Ojxttm9)2U@N-^RC#~`ef#DXAF$Jo_le>e8`VOV*B6bdf#5!~^WZRnYIoGw)6jtH?KDoCD1 zY?cVB#aAiPz*uISY+S@RW?Uq`k>jGr1;+-*WpguV*n4Fr8cY1JGuwa%cB|exkI!HzP z;w1lVE8Pwz6RwcsAepAm35iS!c{kjiChf9ubWIqp3b&J?r|=XXWl?Y)O^_4EeT%yZ zAr6OR%gn}f-&cE0@q;o8eP3#_BYf^$z0Bv% z*<WS5-ib%BK)w zuCFKbjBYzEYb+`xIckgBv~$|*r&Z=rg9eQ%%-n9a*mLj9G0BIg>-%T^-IRuN0+q?Q zV7MKZT#0uRZ|h#@f;41ntLFumX<%DNdU||vj#(|i?O3>t_Smov{dUBP)MgqOM7*j3Np&@{{{5d)rG5T z@E?T|Zf{|dc2GM6WeQg%+C3+>c}{j91n&5Lzfc?&Z5=rCJ@0s-?|BTep244?5#n9( z@#q()CEex6(Kqm&bG$_s)khl_uTDtRD1%9!aZKKD9WL>iCQYiC=9zpKnS)I7C(}Qf zJYAM5G)d?mywNh)6Md&);)#z}f6 zoZ8yVEj~5OIf#CCzWAiIxU!{t;tvylocPnkGrg4RZn6!BK3Xu5%_^Ak1%2Y(lW(}6 znOF?-y?4(RTuSbqf5WHdhUv`2#7WQfvYnY|oOEX55WN3W)pi5A&o7{Id)f0Q6->G- zWPfDxugAUU-?)D$r10^LbVTTNcfWG?hPyZ2z4`9@8wIc7|LaPn_&#D00w^+}puzG7bVAs6%obP|bH62VH8TB(ecMzAu8RwiX- z3au=Pl|{2r5;jW8M# zvw}4%SzH%=yM(?DQD6QNcDU*+v!H7|Aw9v5kG$SrT@ZR69$i9U8$7Rj@;q>}VA` zI+7h7#g2|`S?Y#^P|}V5$pj4dmxHE zs9+B&*=8x*EMuGHY;y$LB4b>&wzD1tqtU=JzTLn`f|NbNBRdrZn6ld;F-?6C;8 zRm!%?*j72)CS}`XY#R&_Y@32@Q?j2**-vHcr*ihw2=-G2`zc&h>~RHqT*)4XA(A~F z#eNpSex_hQQ?j3_*v}%_&)^cxex_#IrEI&5ZI`p(N!jmY?00guTf%lr*=`xz4RZvG zV>92&*ze`+_Yv%6Df_vUJt1RH$k~%J_9XNO_N0P6sbas7uwO{oFJ$Z&a`u#jJtbwo zl(1hym$6^US+|7!7C$Nbt&HuIu$@x2Q^qdBPtI0JwN44^l(KI~v~NhY8ztI}Qtc)w zyGh1wiqLLSXy24*-;`?Kl(9hx%b6iBkb7@3-MaaY$#k1(PToKj-D}wzkK3)APGsn& z;-YH`c9g_ZEjEb+p|hv<)rT^-v6=F-XQ}Wl*<(F3Vm6t>@Ka zSN6Aiy@_{P`~DM>Y>t0yk|rkL?_&`3tjR1yntKjSoC0aoLDR(!{DEx5F#GCUy1o)V zX#h?e5o~&N3Jj3p&CfYCf6C|OxQG)071r{!CT>c{R=upUBdepWp`i*ME#7p@$%h9B z;=BFbrJ-uvt<@DcA{~7AUjOeNN-LqxtKc@bAJfbW23*X68%cm~; zh1pp+_Uqk$BJb#_GZQ71$2d8~C?Z;`6)Bn}~tKtDOa%W7Rv0w)I zIRyRJLj5NRY@Gy|p#`4&0uB7o}_m|=^^kX1;xL~M~)L{tc_GK7#Jv`iKe5h2sa zHH->=OJwkuFHtO!SId^mW<<H`5y}ijgfc>vp^A{riI}6D!$heTDi=mBRK2TM z7_~6!UDadJ3srK_Rr#*!-N=Pek3}tvUKlBle3yxeTp0N-g^Gr&`mrdvdZAj*Bt&hA zicoD)EK)^8EmCh$N2nI57coi73e^&IhWf)kA4a_#^I@M1)ywLa8I7tUa!DV-RSnmu zmzCA3<%}kFOKe2Umgq%&A~cJ%TeJ~<7HJnTnm&NiWJHZrkJNk^`(bQG%*fc0|IRgL zktRaDDALj=qK^e}L_}LO7R0+yyHNYC=F!-9;}&WbY9H;Brb)ZiRr{zmtxsCqyKq$? z4~kG86yZGRKTOKdW$5!0KTOU~{xBsY^&`Vaj3zE4ZlrcmESHdxFfx9TmeX)?9HWWP zi2qPKGV#Mi_{MPwT>Qv{kpj~yDj|tYN=(uv#V5rj>5~$)iQ1%k<`&nadUDk#{To+} z2oG4qkz9|E+SGccmuqUs%}~!IP@Yq61C`*b<%-5@pTa(nrcMNyvl67XrpqC|&Pkby%&281G^_rwRlBB806gD|d z2Uo+^6t&?UQ)RL_HHR@IA*>EDa9fkrNg88ia!#t0VIm^*QF@JD)D!dueY)PP*BC|_ z`WbYF*{QSHg?(414o=neuVJDLDTdi5ooRMzKk`o<)xWCWgK&k}G|JR3bvF5@>I^IU zshB8ZKjSF;(Qs7X*+!jlc3<6q2m4jQ6*g`*r|Sz}W52$m2B=IcnJ811AuH`I!&_;b z=`BN_)VKP*G++%}xwNdbEW=xdEYWqqOa0(#%;LCoxTL*hekrX_|Cch}%7iPIWz0$k zv@r{=Z>9Iid=s>y;ceX(HpB3$>D5$&!C*4{YI&pXSb0b79V3SPW=Q3*+lTZY zcE|90hEHNNLw_^0a%lfyl3{hjexGd~F*j>c&Lk!&OOjQW_4_jn)#&v`WY-Nc2NY39n?(*_L~xH5C#?E}NEp|FDMpgJZYZgl); z?dXKjv7h5NU8Uga(y%k-?bdp1D8$RAvP$);MDS=A6It@8W< zqT4>q#>MxUh4#bQhmG`ZHA!+p9=`Q-B~8$?p`l0Fx+gmpcHF^%eE2r(!QYard>c?E zB;i>PeFwz zd^jMZLf=@(L6ic76pcd8kRwo{Qiz}yt|DJ{MRbq|wu=zC#+6Z6*Gh(>F|-LcnhSl) z47nF~9f1eQ3FYX!c^)_OzMhLG4i}na+-w5VM~X=i`2DS0ow&$82Lx=>KL+Ur&I9pW zLfVt0)sgl-X~*UbjDv`#^JI>l4{iATf$@rB>fnvFb0JL0It79;L)IRFLCZ@Iq3fG8 zuKf#0K)Fkq&Ou;iqHBNTr+=ACj-C&4;Lcr|3oj7wVJLGy*Pi*O{yvx6sCG?M!{9RC zPq(%60_T^anRGvbZ}Ys6h^PCv2YxF_k&6P!?dPUa@NguQm0V(( zAJB8AB$Rm4_7!ojxgk&qmb?P}3IMCDx!%{mamc*A8B zds6qkZC4-_az!it=nkP{f%t~(AysHqV6M-OSYL$bAd-j>^OzzA+}<9p4dgs^IaE19 z2zBnN1{!$Ob+IKJG4Tbzx&KB_B`JtPZFXrB^!>T-?k5-&i`nqE4;*j(?XP2OJjbx zWf4CNw+E$v+VdbEYbk*gGFlKxR6ai1Y?Q=aP~!?hCSk0iWXl6RTcKv+xg zs(sU;r4MeatU{I{$?T)XWe;xa*0*}OIjx7E>%iVYB&29aqG%;!HKUt1EqgFMv#|Tz zQF{>trEWLn2pKRd`4PBCYUzViA?D%4%U2vL;;tM4w~{XACl0;fGOJY~jtFqc^?d|b zB+rk4=G`wbL2L{57o_$NJ50&s8QZw@!SwV|Tj6aTh9(*`Xi(F{2e#pYt?o>xx19ho zA*t04NugBLhxX5g@LC$}nOE#rxZk&-j=(yFBmxTMd4uCZ6;{z@6jnBM(v>IDmrvX`UmW*Jy$Ola_5c$IgqN< z8!6MdiX3yIqSzA0=P2&Pg*Neu=4=H_Qbj^rhg}dkVn+g&h+*_;PsfEC9Frv0qYe^C z)~1Y4-eBR#Auc-^6`QEPeNal~VOt!6L%vCT90?}Tt24;kNl8J zoyFO-#NxG+G;%{5iHWcS_d+Up`_m$)9J2V3j``54hrFMsuO`8I!dl%LRcPnuSVq*) zg=3W+uHWEZvJ!;+JgumYIWn`*TD-^flm0R!#)i7?i{O@X8707^O(-TeP%wFOC233~ zBwCygMk*vtBSw0K9Po3@U*%LHAKvzv+@nQ`M4*AT4#^MbEU%{d)~ES4RCb_i2$NE~ zm!illoYJx1i(GU_($R%S)fL${6ly)eBzx_h_BEAOKk5h7(e^aZ$Z`}^!1qt!8Yiyn zQOuE$SvEJD+^oqME8BpD!q^80=P>3wan3`|buSQJdmY+p2o|beU0hRNPtr$MJ@f1{ zzhC!E@w%6uAvruRJ+pF6&GW_F7AhvEY&~qX9^$?`qCI;=ujk$iIoekXm1k|?&K}Wz zcZ8-~Ot_vO<3I+SR`L;+YdPSeh+$~zjTzrGGE29IGH?VMHJ(Y>V7q3v(ry8Fy@a-F z?t}V#4?)y|b^w284n z#hegAt?K@=wW(Z?ZjA|vD{sXWUgf~K#uKjR#`Qcmj@O$axF<^WT0R4YKb2xL>LJW& z+`du}S0u>~Py*#W4Jz~-jDD@3G$6~(t4lgpW7@(4+rS}tuL`Qrlk5hank5_i9qEy|g=*VEJDl)1yGBWy8xl;XUgtE_Zbwtc@tZLg;%GmZu zrS?0OEbhBVS$yz&Rb;~Vk&$c=<;X>b(0*0FD9BM1MA6(7QL5;HM&%8a@bgfCL5BfQ zih63{J_YFlx`ldnR;8r(i! z59RWfQE?#J<(-o-bNW{M#!BwHW6&Wos3+I86#$12w~#{5s@BsrxFl{umO{lT%4rI{ z4OiOqaIqAr_BJL)VZU-(3DQ=A1TJnQ0f^^YtdY4Qd~*XV|Ma;%s&xDa3X`esr3sf1zjG%Tpv7qs&=mAStOz#CR)&| z58JZiz>t($e&iev3(J!6=~K2^8Qpmastrj4n?5(M`_@y&2g=07YNU zH~~>`apjh{7`gRzOfP~Q)jp;lxjyAoiXtj}EwoVKLI?->5(K#ma+U+}7FpBOIcNcX z+NUXV&}Y6p!aXS1i?e0i!*kH!+q&;K!X-@;Xjv-*i|G?il*iTi2=J~T_SDrsyMrPr zw%kWjPwl)jTgA;IX#HFE19`ZJiNYx!;TDk_(L%uASomP*B3pt0R8t(chGeW_vb-Vr zRHy)Mi4e~r*XeT8r%hAl2&k{}ksEoS1VJemQuq{xP~#vTCP~62eNWdTdZ;O-_Q(MN7=Z zizLP#ls_u9UzW81Y41lQ;vCqpY%99r77}Us5T&bshtt~?(da+fuUk_PG(166ZEXgo zfV8QTG*uW;I-P~IF{C{XtyjmyjMIytTx$hKOW@m6)*b;*JSL z{!GZge(sC8dKK3>7dKUYEs(<0W#6V`T1oqkG}%IEX`~G!Z3<}%NMrIcBXp5@nZ-H{ znG9sgAd>|qv2js$^dzsg(q(-J1?-4n!Cu!^xfG1NijQcfrIksE8qe8dQlOvg8}mqd zyuNFHvS-6K&nvWQ6=*zK0ow}?XPwp@w&7q2R-LMBsa081NbqJEB!*WswDjC{WUH8{ zxi9yZleuOc_xdT&0lAQpKJOHQajC7Y?;gR8tDTS7bG;msClTcVKjsqT0c)RdB^P$= zM?XePIO~AjJPe`J&W7!fXI;6CM$VW=(5+!;5sQU<({2IeG762=kzMR{&6x*TX&qZl z%-85loQNn?to*MB0347|9uJ z0O9vp`d;DwFps1oYN&T!%q;@te1lqdidj3k4Z&M{5?>MX2IKUNX0$b@l5^rH&0VcU z@yUhDCd6U6b`=C0WQCC!uNu@?MlQ7-N%ETUUnHtafT(<6dI$HWTq%}OaulM*(+f#oG^%eN|=`SXOD5-W7=0wNz~-Y z-FF;^A?$JS?L7n9Zc==ZVIJ>Wk9R{{{5C~YTzrJ-XYS%L1kH@&_+turW_(b(V;)eE#QE@0~y zB)+&nw`qZX(}L7Z3;J$aV0dqV@x2A6_ZDy~7o_c6kiL3B#_9$6s~0@<;(|@@EqL?2 z1z&7faB9PXFE=c3Z&>i{&IO%27j*4h5R_{4nnJ1O&zeG+W-vZeq?#!jomBU@rk`9h z3+BNvMCf7ov*ua3CPgz_qtpCZu2bn=*ZofSpj`L5=;eA(4Qb2R5<}05VbVwCm=nCT zE4Fo?Z-JoUtczNI#u|)kNmoQ+9PTyAmc_-VLmKy`K`mOFi+lA^iArddyIe4A!_hVE zT`tb%>bduLVT|f%KFkc(lW8MLIr}~Yb4_}b`)HqbvMWa3?!}Cf zmV@~+d25f=1yQASkLqPPIqBV2mo^^DEt?B2NqF~jc`hU@rrOYf_Z1bCiz1TWaGX?W$M23xsp${l$foM&U%QYKcf zQYZpXK>V#-8S&gvMx~D}EoB&)OfFZcVq?=yg?WW}__Ku5WQw(@viIeDYxvecZZ=bD zygFL0l*t%|-1g?>rQ++a-~H{TXB(dVUDRu-o>KowhLPZ4m`tjOP(-Ms^*RPm4IW&~ z<1~38i z;y85y4qJD1v>JhM2-FH@kD*;E9Mz7B-#op1g~RS}Tv4troL7m%o=T%er#rD; zB9Y4U#{Q%FW$AC9_VjOmppxtTb7pTom-@lPhw66!_J?Ut>u>Lu)qj-UD3wVhb-O1% zr2k;^xjD1-e%we=<8a{M#`$YUmhW@qUs ziPc0alY-(VQEIxg;Z?haE)9w~;gSgI!M`}mn^DNky! zX|PGBk5)%0D0POB2jl^<^(l48zY(5C-gy1Y8JI2veSUu+z+e4&`I!rjPoRb_OnJUHp0{5$ZE zAnJc>*35AK=GCm=xJSc957k&AyMW_)c5_gT!+JXc9CQ*PqTf zYMsHP>eI5T8&-fjRSiCsRqELr6S?2(<*J&r35;(qiS%{79n+yT!BQj!?qj;<`E-Q` zVvs?gZZmOvgTsb(H1shwU-X=~2odttYn?0VT8Q?=jI`C<2iLl?n3nirQ;c4hOD1e> z@YBrE+=|6Sy!ppu7I#l}fj|I6nDP`vZ-yw-y}5MO7zx+4W?_0}QF=P$1*0u{im`xw zsRD%F`U>HS;FX2TRu#2iGhOaa&?l&dsV<*QFekJNZ4bgNk>N^?qunCuq$?O;a&rQ& zGV6Qhpqf+k{d&srjn~HtU$s6`aF5hWA|nmbBz=@Y5}Blz8)T75ZT6z%_;?(u{?K$S zCAqTY&c}u>8n$@&q|(QuqjHAZhUbnD&iJY=(InwC`h>tp<*rNs^?>VUg~KLZZTG|# z^%hCL#ntQPReN4p;dynNXFaxSWFZbGaYK9?inK@DJBT;aXOAf=Gd(VTnK~|Bk5i&? zE!^A0M5S4l>z=r+dqOLMHG6TuMr%^TuV+Fl5_g?m!cAx$hN)Zc@twl;<=oMBicY&H z({zpYJl<|c5Uf%p+dN*1vS%_;xNsv{AY`RjUU znxHdC|4u1%ax+R426S@QusqtP`09znJkBK}d$Wd*h_(KuNrZY4BH*g zl(6Rvv~Bo)hcCC6vLuq!2U|1a+v7k~i@)}il$342h*m4wtgYw1p0JqRNc^9j)0(56y(8&2C}-NOlME?TBNID=vq-7rf?DQ7b+5E1$=0a~aVKr6n! z2@SIdeU}K0FukBDKfJ_z8+M}2-ov&7Qrbj)B3_Zm6%=7CJ`J{A2l4aM!VG>i`BvdX z{C|gnqL9~^@q~e*$BPI^Ha>)ZxH)awMQw!q?!|$58I!cFvRxtPlnh;-ZqDUWnWSIq zO6W)EP4W9hrWTf=t~L&PKIr)NxV8>2#_GchY0;|RvJKod3`um9!u?>mHPGJyB21Sl z-`hM}Ja2opCQ5v7p7xmrCHUS1Yr|LQd+TtP=dIJ4?VdM%Z;^d7?3>B{mT&WEpJ%iF zSbMvRscNgD;GQk4d1|}sL?yZSwrnSRe%LOCc$+m34!ii?-tK|j7`BTcwzB3vVHe-l z?Vhc^ElB)rB)HYHxy`Crx3&2SlDL>_^0!cSPHV!s^lkTSMlNAT<~=9}2K{Lie`|j7iv!|P27&UisH}egcEMPudV$C5 zVUI{FBYI$P&$jwL>%Q+eeUEqFe;lMq$_b1W*TyQ09nv9q9y%nzL!WTmYPoY;T6!gV z5qIx#{Bvq^J2YRrq?!Ic)%4_&ZE3lclpMg)sRJnXn6B9iTNF&oHg0`TxWs+^5iP^` z{!r+9#Wi%qO#FGqw*h;G8+?B(^t}p~64B+DZ~#JP9=80W>;&JR!G)J6I`z`T8s8re zNIZYk$HA=-ZVcS=e1Cx3AD+g(Q;uhSQ*#wWuy6DHxkuhGvq#ZT!Z8iLSDrl}Ukv#N zPZwq)4NJ6_`*ZN{_`?S}^!PK0V0^B_%Xx!o*4Q-H!Vz}QD;?v_fW zV~e+t`*a!Ai*k=ymae~I?`X-(1Bq{P#s-B^w~c!>m{ygxENz4ZXH{?}H~H|W!zuJ) z+Z7cRI;7&+P~};_9P|ru?|d6dI<`8&1Mza-AI&VvEX*vqw*&v|I`Q=KZvN=g-Peyc zw7J@zZpJ@@Aey54!cnwO&ksjSdd?r6+1~U0(W0JnM+*_aoNbAXUWRScDr}j$EX$X# z)5pkq*`Ka=T|tgyt{qPU9NWQ&02{$=`j6U{!}c`HJ0U>GvV1ziStSV8bRyS#r9DyM z8WE2TiIG`tJr|Cy;)ht2CFu31A!Vhb<>|G~<#o`rBh4|(>qr7e%d+~Csz1(bSzecY z#dHpRrR7R{&&xoN7UZ@2;!)(b+jrE9o#jHD%#URBGA#>)Vs)T*b!dG@#lLoe-0x_+ zh$_KWcS+_}_{_vut@=!xelkPA}e^U36UmR{0YD`_p&gyv~=31a9dgI1{3?j8f&=REE6xJM$!W<|UZ(aOzLlH!q@Z zo;od0I%ACVo-v9UV-)v{i7OrxH*HLx5qUus_r-E71n}pe!-d?}%W-g}lk9XleC9oA z#kzTFhwA@!quJ@EY#_eE&}k{GS^5|4I$WWZ>}_jCz~Jaj)a9 z#rHX#;PF)X^#L{iD8KINA8jM7BbOIB?y^~ou|{J|Okh#I)N&6uK5Ycxvb z)jv`R0+$0v{1disr&hYP1R?kvC2&08SmKy%8*S8!@cgO33xOQ|Q$8+`LmWDWxwQlg zb888V31SJ1skUq?zkh=-)<55W*1sX}S|Fg;Gcrc0(xk>4w6S(l0ELyPGkw@^BR$?Nf z1wm5VEVgWF7n@BNf)Aupy95GfMR+BnVT`g=rQR5ql3+|=JdCe&Lx>GMAN3zg^)JIC zM+3-Ye!aiS=cD@fctjrgttCK(+){!SV;mJ!|0%{8O(g1n@0fu4H$weaHH-CsYY9a7 znz@%yATfv~0Q@Z_K>Z6PFd8##@k0Ik^}Y)9 zkPVk#>!SL{lSdlbQKgABGK>O>9*-vu)evVKkUKcrG0pLW{Vqq5#WKO)_3`CYej-1` zzK*}7RtrI)#omBt7(EohCjcJITU$j*Rgo>rF^k}d!yMCNxD+_YC-;VLlI=tKYE3vk zA7Cl0QCAX+GN2dPGHe6%dU@cPKo`aZ#(^nRej)#2?&EIc--BKh<)7dW<$jEHh?xIS z?#EQWP_fqIq0~yD#L^d|8klJDr0PF{OBCiP_bhSMo+9?mEG*lK@COm z;r@S@En8>k)&JK8QqNXV{}7y$SzuHSp&wvG*&LQreUW;ZF|@T@!SV(+TXSPK`IlnzI&%@xLXz z*{@1CcQu6nZ6izUB@UY{);Q8;wFVXiUhA><@PUBJ|5~8BIt)LUun+JLu&)4rnXr$5 ze@d!m+KZOjhNg<}>K;S4{nF9Ek?at>T4RjW8mycxJ7<6`gW%DyDs+8$U{3YRz?!j! zB*NUNJ?MdisVGtU8Er#tImS3++|Bw&Bjp5gjH$x> zg_@7R_*N?Y*}jTaUokK!wSZXv##l#%?Z1lWWQ^K zO&@Ci>etR+vaeed&iGG%YiPxU+h1$$7M5>l-hvPLhxw+9z{TIjMb>4 zfk2XtVR)Z~>Tj0+7x1^Cq!wdpZ}@YU122pDk5DRPsYY8m($|YKm&cRs5A5^%32!Fp z`i~xvGdR2GiIOKgp0&PNXS-&1=L&UrTvnYCDo>o(X{YA`LCR>_q zKyFdh8{cAoQNX=p16?0qGW=Bd(xu0j5nToP2d$t`Tr7I(bx1ta8w1~;NNfn|KJ&H zFz|-pPmZ5>;2%7ftExi%*XD50__cv5q4@)wv^=mp`fz1c@RQ&tH{s74uyK9;COrDJ z95YZV#xAg@F*XFB6R1Y~34sI}z0tx5NApJu{h#o2Hpa1!${>?b+!+5fd*v;@7yVDf z->HQCu0AT#Z-jp^x^B>Kgntl=KtG4zMf`Is{e0=FKtDT5DoV1$@WT8R)06rO_`bm5 zP>D4))GsLRJ)q)!aHA67NCdDy^mTi-HELr}|8l}VK7X^{>^HX}_a+amUa)*IW}$mj&T@?R`KtUVxc?lQ?|d@ab!AU`!w3J5Yy{{VBU%($Ux^d10HF&Q;f70k7`Xd1P zElht-upn)lEhi_m{)$rvD2F*YG^zx6R4>(kX!H^N86XTqbb(`@qxc5=5v(3h^HI0L z)9i;HmUv_RE5M_VZ4k$=OeR4G3e#_xel1l0)B-owpF{zp1T_B$eNfE7qmIz}D>4S- z2l$)E`m1UKiZ~&>{<^gUzku(-+HDV!0a9;nu64O#;=BK2sR zL)TQTsiHYFdw|VE<4QbVgA+Yn0XZQC#Dlh@2X&*ja?x2&PI-EA(K3Rr*zQ;5ef(P2 z$72Iy=RIW4H>TS%41FVFWLSS4`ORi`#hN`6!Y6bH+GfHkIS*5H4PWc=VC^BN!%Y{o zLCJO5C(ds+zSn-wqhnU|vn3mq%Ab^1qC1TD{w<215!eG7f?-f`Cd*)(>CW5fWf8K#_*IrwVzxW855tX)9YyAjutR^S}oLq=9392 z2`PH;9%$^5pZVnc4JUCrOB{RTg8r{c>1*Ze1;LfU8mF@}{frkh%JrxAUbS9*2(7Zx zUSQ=?QZ$o2L>5R8CJ=_NHnR%l1idcL-Z&lO5MN1=Tk!tj07j$=plQA zY_PF9c)>>_f?>|eyN>e5zW=7=Cx>q_<_kO$nM7LaY`WID+uzj1o(f9vIgn{%_oj;JV8MX_L0KrOkat|;j}r0Sbz<9 z=uv~aOi&6r7*9dpHNVlH63{@cwkz#o%HbUFk_XN>4qkilLh6?}pWtBbF@Lb;jQ$%- z&=So4#uhYQjG;8YPYtTCy#S>Ss;_E(R*G@FQF^WFx;v)`tc`DoO^OQJTLj54;%~Z=MMx6a01!m2zsaV$`Nkg^)C4a$ zI;okVe2Xu4Ui2U?XQjU{PhE%_)n{vkYO~JT?)Oz;>16byVuFl=L1r08s_dF^`X?8I zS_=CObBx)4KW$}Sdq0pzKG@#+@@C^3Ze2G69gNC3QiEVUjbojIUKQ{aF zfCNlVDuaZV`^A9`0Ll<@uC5TH&Z`ksIH5dStVS-oap086MjVLcUmGF}fP9EK2{};w z!5W7m97V8VRUTA9jp(loN(99ORZ3F9RXwYJe(p4%!-JXOXM`E^;>8CZxaXd!Q^QI8 zr*DlzVxJJg$`lTH{eSf%7cgY6Ec%;!<-V7D$QWxjkF8$0lJP(DOkm~80FyHY9b-%m z>?>EUe8$i4H8p{n8b0)`A^+D`!XLgoUZy&ho@&OfQmNLgsbHR2vvzy)Gb_=x=)pbb z2i{vp;Z`=jx$bw*tz@#t!ZtRWp~MhCu>WrCD8ar4a8=LLR7+P@GrSOQETyw@?m6-*hOx`_COczsiur9Evr@=^ z^Mo~&FUFboy2&81GR_HmVMYDqy_uGlpaT5=zaL2K$fFwYZ1nu@cj~C9lkcoqvo1L? zj@;~coq6@RYdIF*R|n#O+YL{(xFf z@m3$G7VOaN3b^CR$$12i-A+2$tE(S*gkI9g?sQI_+Rz|$ezM|U88`Ki33G|)8nQbX z=Ph;*gQ~sz4bgJb6!s*3O`un4_4?ayx7){z>DMngIU#{UQC?Bp zP>%Kbzx;*#H*cObODtn=Js}}EISfy|(`=qKD;z%5Tf+$pUv#1k8=#?j)sDi+}p{r|iCP~9KE!}A9Y5JUiYgI?0fUR{0q zv=h(i(;`;z`;QzU-y=svJ_OG@odNKqoKCT?lRfN0@OHb$bM)we1E){h?PModN{b%R zKiuJN`ky~vU7ejRVxH=1kEgmiCg$i-G5yjTj~IUC$^!?^pXd3{KNsTzj-}}`q?3u- z{~6&C5jN@ADaTV$A(hJIBu+sH28|*&nS=>haEgn|$QXeq>`(QYkud@PDC_;)Y@M)c zZ#;nM;QwOpUBIF^(zfBA^Ld5=k>NPgfDumtJOC=p;31+$0Tn^<02*VAMj&bg6=y~z zN<82(iOD7=*(7T=n{UbPo88yVW+Ms_2uwgtBAay+%&KcxH$mfJGMUVL_tQNMLpJ-q z?{|Iw^ z^FIIHg}yE3r;x;$4&%Zpq!|g#4%-jDqTaim>a@W<>W$wbkDvPE>)S5L`rpJ$ZA{GY z(X-c2aS)@`sy3 zSUO|sE!&bZeb)KIKYY^jy9$TF03Ojk?A*EjyZ`7udCBp&u8X=@d@q)$(|`A?f85^Y zpX9J#I(ez`yLWFt;UO7y`|$=GAqNf|c=_c6y`2Yw-~UtBlS(E{vf40FjUQvS*uMMj z*s-zRcwaoGl27}x{SCF(YO5FDXPcg8k@=QTUpf8w*$0-g@if8ZX_C z7&m01I4eAg;ut-eUpocGi93R6gRg~Iz3Ej=HBB`av8+b>0(}FFHjih=v(fnE9BS6- z10}{F=Nd4ovNSYs+nB66@9J6Ag2mA}v`xv07AY->2RMz4P6R1-#q%7HRG#n1d)uO_ z&nvOYiy9Lj^}Gx0w?B52Snq=k6uj~-0UH}D&M)yR#6`41oB&je&vo!i!>!-O8{Z9F zU&8he>%w5{1+3~po}YE}{DH$Ye4_&)VAGd2o*fCmZtIxtM6&QSM8YQ1)sSX%ma?7C zh$K?iPLuIyDeHvgGuiNX%VdT+Lbn{+vbY1-7|Sq?WsyR~tS4$h4ay(l)S< zG>PO&_^?ZxjIXbzjY$69Xe|LB?2r!EcUf|Y>zgb#smb_4hwIWHSS8`Ii3`Ry8Qk_^8O|?~Ni8 z^T8G4gf&S0rBf>7dt7OztTDdd;ey-1xu-j@ZOaw#bjg^+M7HuEV7UPhuv`uVj9d-` zj4z<>cSSOWz1T^Ho-cP8FLsKg9LU11MI6c@QXo>xTumnSo5r*%K82x_p28;MrA{Qp z^O!3$&ni8bgIq_P)^)D7$6%}}&$IpwSMzdNbTdDIUDSQ;_S;pJSJ=vxC}zT^ zsw5+)L4=E9>v`O@e9aZ(<1TDI0}e=HQKH;6#|^BYP66aaYWXdDrO{ab7)Abvj@tlb zlV(DM+54K(DiRVP88>ie{6z=rZ4@aac#~`AV{~h7;&0hsHo6)gBcW(~j29x;v1DFG ztbnB>LEuWBYC)Z~61Ct;R-=L9LR3+ieK;WO8y&qzpBdfz?6J|k&m0>K^VW{~`1s1! znrHVr_SeS*jviysY8D-R5H2n!GO3dRZti;xkXt(`vU zhf!s&f371GsS>hZc(oC`$JFO_@9i1Y5e49~@G=14Z@R)m|6Bt12)SwjLc-AXP)8<= zO4pGM=QyAZg=FPGN>5mnfJL-kk55RT_e)?ACrf(h3b2J#eC0ychcjp~fL^GwmZHYs z8pwsN=CVtss4E=U&?V!mYhk}DF}|@@6w6#uk??^T6|(u#*)UNOtUR@ilC{oldusCc z)g5+l7gyND6>`RNv?FU*TS%VDNPsvZG2?oXVb{9Iu$}YJ1w4$}GKfcbLIRL;?~E8R z%~N<5fNUo$Jw`rIK?#jYC+d>j+ebv_M5VwmmMwpec2z&8p<4HHDyng)s-E_Iih6= zEKa(}xj~L{DI7C7spLFJ&cozvCFck^Z;3iSB}%QFmy$oK zV{B{X$-NiOpW9rSd-X`cslN^S+twkw-`)Lk(Uz!5^OwGUY8d;#(9ZvSWA{@}eK9QZ z{x^>7Waqz;*u0&cKE3w+-KQQHbLi>fSKfI2uS1k`_RW3slj#LdYkbnNwS(rbRyN;N zx11YPu6(pIKllFYHOs$QT$>gBy8ruV#p{JfhNQe%|7Csq(Xugb^wfW{cF6wGZ@&4e zSM}1FRgeCoTGc)Lu>GuwLa{3#+-xOV$tht>R_474fuJVug`wt<``%d?Mc1Br_4Y7vcLRCH?r+#!LuEgc` zw?|vWm95rcs4oCFpymR&2Y@a3VmNFwf%ZDQzGqxJK!^Zq06;I3I&cfD*Ay*vsP7X2 zLc1cagCkrJQyvtL%Y=50hAKo&C&YHY0l zj#xdc7_DhYx;35B|9DE{FDnQzDo`ElS-Vhy*y_ir4gpx_tA@wx9{(6W$-1z0qt-pJ zZuh#jq7T1V=end!3hg6fpIk>~S|=-9zf7ThK1xpic^xdV2<7o3yuU3E6xK|{=UMGK z{^7|Am}9j)0zbKgZJ13>9c=euVTdPI1%W8fJ?nZeB@h-l*7)ajZ6)-IMU-UzJ_q;p zJxk8BNfb5j8SzVO6k?72={Ni+#m+#A*)4Pt1WWl*+b{H)Fxv~fvYj>{`3E_QNq|WU z295=4?2jO0C%{_qz_i|HkDhB==NZv{8whX$H#d4lv?GJqj|1^WMB{Z31!M(#P4G*h zDBd9$R;xVCp~^x};Zmgo55zM9ux3hj_y(lalpu;d&+h5i6kk!_bC`hRj&yji1Ic~u zuB#&;5j`W@A!iWGm(zHuv^sijH}=Ff^*qqjv$n}~eIf}YR2-lD!Q-v>U%(ON>d9bJ+#*kno-1p&^TWeEz8o;RhWunRZv*jG?8 z4|cF)g}Vq8E`rww6|;9;W5ozhTgPp_+yOQ%*?MPTqB{Kc@f-i1V`ypv^9hzw9gwO^kgfopY75I0Lr=b2q zGei|OeqIJ8*gBEqav8(6U;{l@*Ar}OBe@j^jLZR1gNSVZk8UwmJS%cCAGjP(uu0WM z<{43i2-m0Bqg##6edK#=wUId_Vx(4y>uv;FyWH5xL>f!?0hGWh{QzF4SW~sJf`YoX zP&K!P#b?E*iLl9^>*Xit-bnWn_R%J~U)5y2K#ADWL~e1D@!2QPb+aEf8f&OeC2El_~Ah1mhI!0=Nz8q*c>+H)5Z2Z_T&40Hdxs3MID| zH~Aa4Id|-=IkYj~y2-d@v#aq5SLYLe)&g*fUY=GRnO22+o#nQ5tI=K=52UTU&G9;m zcMGsFZLS0W*R(<*)+-6+^ZQm0nu^NP1!k*_vQm`Z_{Fe39f{q&6r&PgXavbL+BHPw z8nO{W2e#u>jL0S@!`=K_W zE&vP%sKw*jp){fTWVxU>1={S^Dm;eTy5elX5J@5@S`FwrKTJoSNxrq7x?zi46cqNOWVu3G=Z#;Q&BZQFP4-v2`3)6c#5 z%4>$O@zai=oq~Qo!2=k*H@b+`T@!%jQHk2ce!33z35u=;&wJ3d5YSPH+a%69B*J>oXU+;QlwVV@m98L6^F^3bkp+}fSJp) zl2!wam|fD8>lydSA3VFdk|M2x{@{77E6GSmyF)S-kTtU;X$~Ic^qxPFGQIcX9M-gH z_=yzQ!GD*_)^=fkP(XD^*w?$D77hn6g`Ikgt`07OSkGR-pAJ2HBEw)ZA|~rO==hnL z*cg&hQ{Ot8d04zx`nvpmDaF#aV#a0mjRX=R3 z7jVwmW19#ds&mGWe72{<7}-gYKhl|`xI#GN%RAdDErU5A3-*mIu1_|xE-v^L3O;X( z+yHZOtAdSkxu$Gp@8{f5mvKm^YvyM5K9})M2VH#CVf<@5UWO>Ba*^sT0znC`%bIA=RZ4LYtk`pG0yB1>1dCxUMUK* zw);GtKR(+1acl5g(7o$>IdCrr?&ZL}9Qc1O2Mn-X2{8-Sx30tM@tU2XDJ=&mxn@mpGO>5^OP8 z*L@X_zV!Xozr_EgFDAx}Zxt3>WtF4c|FXZvv4ZTDLwZlZ00q`VHSVL;>-{hJU#fOw z!hAXgs{z~@i2CwTtbBLkAbd)qufXbb*onR5c!a0VaKlP~>=TbV7F5D=Cc{<&BcieC zpkH+Y#z)g(dD4K?6GCQ)*%SfW#4%(&V21q+Tk6DUH1SNeGt$tv4oMf0Ak2 zQnG1jpZ#llruTEtvCV@0D^H)1UOgq%MjQz7#~_u&fna|k*#E;iuZrvXM1J$hd(0KkQGy!Odgq z1pEJi9Q4!25CcK>CxZPyad6Eo*#Ao;)i9ojw~e)JEpgviS~trAQ7M+ z>Ah%w-Z#N}QJ@#%hj|L}zu*3{#tSK){;&D(UIoJx*uM$+Kac~48OQ;w`nddu@ur^e z7w*jD^B?c%!@uAyNG&$vfarrcc&vo%e{2(BgAF@eg(A(v+yB@P3HTTN@e>C^{8WpH z1F93e{ZAnOr(==vD%g((@D~&cTL$c&B5f&K3hYzL=W_Oc*9d>)^WpZ>WdCe`)c>si zuzkG^7O=2C*V>=)f8}qre?->1)zxHuK_4w)KbP;AUS81M?TtYNg!L2bFGKGP&l=;X z`u;!tZ#zoKg4Sw%uiY2-#XtQzpZvW5J?x{iQAbl^LnC4+|GO<@K?>_Wt`W<$o{-LjEfhWPz&JpFsZiR=BTu zkKpIc$l&FdwIx`St^M*(Wp@j;w@?0OOw2T!qa%Pn!pr}miAw6T5Pd#ShH;Ze4X}IlKXPC z6!j;0Vo~*Be`S@~l$@D90{!2`9&4-r>o~XRR_67OGcp8vvOZ(2F=m0Dtj}tyGu$I= z`HqABbq?x-ssH@gtM)zR&-GCs+=TMiYRzFWVPrwR-0{&#CsvR+omFmFN7iJt5DI#A zrF9rq(E-DpkjzD*l-}v?oxTqozjPeC8RPBlCWPsJ4!Sw|ehw7=7k&G`FM{=NIxMs( z{eN)W_@W2azt>D;LCxS0=!t_%Sfv=u!7j%O{yqLVj?pk~!q9VKQe9om>96V|;Q}vTelMZ&$TsUXHm1({uce zcx{AFZUD3jb$_rw{1^z|*$t@UFB85yNuWp+%mK+?Fb7y35o#T8OGf;#W2E#G2QacE z`RDSVdUlOACOQduoNA-oEA7tjZK;}yHbCl)ht`yl49ojSz;A$_$45uYi#+IZQ*ICB zfMHIYSbX{Zn}a=({z!lLUE2uaKxZ(hZ4`aZ(QlZ6 zo-zma^VI&6{jJ;k0%t!j^uIIu@QVWNkAPp)N6%?L7_u7XtR5YJ(ol4~Ku$O~_OEy%n$l?I!u}O996L z*Zv1_P(IiHTl);OACWx%67|2;N1(tSqP2>A{snS?;~z`B_(y#f*jcs|N>N`Pyyw+I zq(|q@h<)}?$3x5p6?Ryd>YcUj(21}9bOqMe2l#c2ee_7g0D5F0X}@{XiQdH1U-q`& z3?+KgkLW=>(H!z)dg>Dhc}OM)f&|)sFVgSMXlZ$Q#gPp#)oY;e{F-V`in93oehwhi z90!rl*6!!hujM&7`qidZzWo?L&!s;o2fRoXIB=|r7U+RGK^$~_m34(*ciK-+9Q-JL zFUb^fU@*iEHmGGXk}95qw+n6+y!a9n!VtUbaP%(&1B=E%4R4#Hk~4>949y6O zF=(;ANbX*63(d>rn3jy*6emYdBbbpGrj$B5Pp+yg<;FGH4fJbjO7mn6wI;+Rn2j3j z4)8*RoQ4KUedx_k{`0Gn8@65Uyo&UUK6>Vo z`KJDQOdmZr{-V?`bDTT5y3)#)qV7%gZifyIlN@i%Eix~pw2K1vS{c`g7HN0#>F2dC zXpa@pAE))*#C;7VrT|yi?_zb*?;SA^*`y;UyiBqPObj$@kbof zp}oHBs33qGqW6VDdzJb0q+t;~k6ysFJwWdmfPaxmT>$CM1|6!tQK#YXg9!fu+CTJv z4go;W9|aBq`X}kX90$N38ReK~OQG}|Is5nOchK?AdI$0IE5!pjV8aj?_yv9R0)7NK zUUOJ7M^EX;z$TOWKj^3!{g4C<BMXK*V^dmmvJ7Ao^?@tm=8~m!k(( z9IWH1T`dvlF|wd`HGrSe+l$^)j;hCvAt?XRa-={vA^e9Gl>hwbh1z&jVT^ygD>wv_ zqwb>_T>Sm~^Bhpy5tM@E9DYHj10yS&EgTp;9DV^f00JC1pcZH#2S1`G`~nl@01)KR zdlEf3$n;@s>Gi(R#o=FR3AqE47#65V7T~{>qUoR!3^z)o-k0zT40=BO?iP$-x`Dn{ zk?U)xRS3+R9QT24Y=5cBv`1MsuZgZvlxS%g2u_kMi;+XIzih@BNwW|C(*Js6U-4&y{ulUD6`g(k??4WM+HQ^m^uKT0XQbPr zWBdAFE%m>j|MtB=|Jz3&=zj-tP+sK!jbqjrn+d|f^}jt(AIE2fsgOYVr|7iwF;GksPvF}cP<5)v29MRM4 z!)34g1nHqX2F5@R1bSf%31AESFt?S1F|NgICjAo%fE&^spdZKq<-afj6~pM5@}D?> z_5c7&iR6?6J2zp+8uw8s*DGlL4Z2Yj>d)9d{G(o^PU#&Pz&}F!?K|kNb(E8SVYO2G z?Rd&>^xZ-A=jR`I{T1kajvTK42+02(kMB#bmfC;sVgG?(dRr?-??LniHF77EQW|06 z^;fi=)$c9F6kaCf8MRLwfD_V+HiHy{18^&#escLA%mLT_2613bwIw-<>~kEseEU(o z*Bj%xy7WuTjkXYeSdjk8aS)&fZ(c8P0P#sGsjPkw5@=H>V3h+2_Iz#q5D1F5`1Xr( zu%82gUf=+&Pk;k+4A*{DUpq==?>2LV3|dOvze1&x4%@v{g6k7nTeQ?PL%Syc7Eq3n4FH~*YvCD|kVHh%v3 zy$!(s4dBlP(^r%Xq}O{Y@~UY52i)`Y`kTZ7Y6pEq;H;*C=?6y+q^I=r97LP5AOm{6 z(#>;#_U8q{Kcdzv45B^KHXNfbTRgR1m|w^2%sY!w*QVM=-#pSQf# z*WbHEIY{_(G<)0M{`0M$(0Wq)PrnpfCSoW3h3^-j#BsHkr;kJJ8RQV&2Vp8fRw90={V zzyYP6dH@T0V4|n=b3MSd-cEv&pxFP*^i%r}9h%d!z(G^>WFL?Ne5dVSLc#_82fg^Kus^PRcLMPgTtDI{%^bsNkC?xuTtJ(Z z;%))<7rGFdzv`pMEBq(FIN3*!^m%VxzvU=JzCe2=d_A(J<>>JNUvgApA`SHiBeG-Pd}sd7_chc24u6kYPr?tga{608eKn_nPE2=H-970( zDbQcM?u+~82lEdD=}F3LEaV^kZ(sZpk^ z0oor9{~9>3C|<7pfd-9NC(`^sgG0yx`u=4{`y-?P9j(_Mz+c16NDSd`fQD?h&dC;ay+DnEf9MQEn}_xg2TsGD!3koup> z|33WpK>iDF;5lHJpcL@mANl;}<}dmD=f6J+^Z!Bg;9vkfIN6^YssTzs2#mW2qhUmwfBt``lOO+ibs?Y_+C3^0wyU z`w1uix2mi6`fk3z4&P4#^3S(EsJ;#w=l0Q~0ik}D!yjDaSdcb8kpG0<_n9y1u^0IK z=UaB$#F+>mOWgPx5kDiX%2VVYZ{7m@sNj(1PTpE88dix+k z@8-sj$>V3+m!j<={AioatG)HYZ|$4W_7Z-y*DKHq_|XFW{~SMBiZ6g1el%6$BpQ8J z9N@<9+z1|H22-4oQcnH!zv4#=@&Ehu=WQynQ`;AU45ab*&0`)rBokwh6wH+g^j!M0 z%ku}MUwlVxOF`oqz`y3{F?0{$UlY9o$a8VVgv_mzxq%MofiK8^f#gQ;gvpwffU1Lo zIKaG5X9d2?RA3BH5zwE}0%MjCtq<@kss2;#rW(xSS7uIh%nH)qw3!!yf7++N1?&Hg zBFB^fJ+=N`UytuJY8BP%63PKi|3kABtiSQ}v1V##@B@N{&;vles!Y&-p#Njs_3!n! zKnemJP>UGM0kxmii)^SnV4m0Cv{*s{@L55B8^}Q)eSibU6wK@e>2JQ%G=c$lefrx# z4ua{40}T5)4g~$p^dtR^Y9CcSh&G2`&*dAc9z>hRuMe!>;PQ|9uUY*14U!VoXFb7on{q(`>H|QPz z+J16+9cJ%P_lE*V68Ou3**B^8vM4UP@wFbm$`3*Gpx=OfRreZO|M zNKpns^cJdtLG)5gB8wf_6?vs4c@9T~IfSDZ>u<_EH+??6TNzBxH4jGfV1Yi+0@YCK z5B~5K&Y-3FTTXqZNfd8yNHBh_zyayM!5pAYPcJVi*#HjKbMddnss@ke*WlnIia%)n z5bYoK{|KfB2gDO`kOK%*KK(w9gD-u)xPkOM2mSOs2Q()ta6l-Sedz}WlztjJnnS4b z=H;Kpj&3FX-Gcl>f3{%+`5w$kws~0$W^j{wVe?ODz4>$f4;x}{SmtgvV^3U&I@~`Wc1P=HbOyjq{6rctR@*fQ= zb7A}l{f*>5uznzjo|FF|dT_w&53~jjVnFQ|r$2m-`CnoFP@o5Y;9x-f$b)|U;iuOx z1x62Mn-%IKzH|w#ueTcNBgR_R@e1q@6BkBxm-N@_7rL=OOcmySx^Zy$>lnYp##yNV zaPagQ?rOwM2hI8f(|hsFKbW4cyC9_X8ytQ;z2RCfhNpDA$7?^_9_U>B_$GjL6Ak$I zQ;PTp%s+7)^!Fb;2Q>d+8ybVL3my3WhxXHbE%P$XUIl+Y6*v&+1r9i-g6WYcj{cfJ zKac~S9)n{p`ThA1eCY@vb;o(%BM#^b9kt&nDSZA%m?t9jRLlANyXL-#{HJ*?tUEE7 zBk&Co3q)uJ4E=U5R^Qyhw}nia##AWum>Z5ZPqby(;vnJO-4(qj++FUAh^Pt@jxQ5t zTQX|K0*BpI9MDw>8{mSGt`^k;} zs%YM@x3~9z8%J;N|6TfN{`vnn{lvW&+G`cIp~Uxmu$n1wvX{0UY!;XwEM9`bmqIaIGQM`RAg z+&lU&TK@p;5c1Ok?TyB-60yz@&E@|@+eBNYts(pE-YzcxF9Jt66Z`KNl(uxDr|&1A zzt$V#y-xHYJpKP=`lEbs<9l zNG5u@9PK7Jpaq;=D1D+A`tNebmU72K=>Lyi_ulc*?=E({w+*u;VdfrfR}3frew*Lc zT}twwfm}{W5z5at5$iXm()tZIH+Sg0=-cg!7rr0aXZyZ$`yCD%zmxuB|E=RCGv+UX zzyF~9cktsEPWOQ9LJ7h8G42Z>?=&*lu;soVi zA3a_{7}tF{z;OW0Egf(yNV~&9`U_@0`4O;3(0}^qIS#1(Cp0#J1EKwojk8&ap4N}~ z9T*)R?O7 zpq7kI)Fh4`4G$8J!{OlQs{)N5@|n_&$+1z!xX@VAUwF-M@jJCu(@%t;1`6?~Ps|#F z86bZBObbs>VX<<6z8_Kh!_A)u_-gt1EveUp`AcelqJg}P(F?x+^7#8*8Q1}Y)^9Es z<{viY5`I4M&&$uTb%dW!`g33I*)V#USDw%FPw`{)^5Gq|qr#R^3H^cp{!8@Un6IHf z#Prdl1ygZj7yAAlSpQS)^;Y9ID|r1a($C2czON3@p9Kj(9{%L|8ES!|BQk~t*1vG| zx9eKWWz&z=zwl*162N%Kjg;mWAr-e*LC{9{zvUVr+pPW|E96CG;@kyi~W0ia{mzj>;8vt8+zgd4Ui;A;DF*M2@p7NtoY*P${DmXQnHo4Kl|?c zUiS4N+8N2MEalp73QzPr2Xx2N^Bin_=!@4j&RDWKYxw;(qJRI)_e07Ky<7NRLDg&g z`aKHY&jH;9bAU1la8Oh=5_J&imw|&1eo)-eYq|Mze)af$w&d}c>)0rKeZB0x730-< z%3kVSy6NOMTUTQmVW`=J{Ra%2kNt3W>F-euFXKx%+7Ds%Ien$bM*EWj{ag4-A@(`_ z*^U*C%_Z0#jH4I%#lHJ|OFc&h&<9rEq6YWV*Lc6Qzf!{MKVqyg(rQQ(x?;X+$KFS8 zU(2|D>lWe2A@71YpuFQ#z;jTt@ul9}O)vS01L_AoWjqJ=UsPiYoM3vIeoC?R(-RL` zZ?=OtNVIJ(c|4E4U(=pSVqc)WV&;k#r(yJwP5tjc4*L1$IVdmWI4H7ZqWMSu-&xInfx$SmiE>Y% z7dYsr=Q$`XNwG~xcFc!%&e6*~TJHk4_chGF512C)rs<87}HTU(7r#E3`$z%uC z58JYa+9o=k+0f09z1;6WFTZ{mV^_Tf>vzrO&R+MbCM<30T0ptakH07d0tbXV8O(us zFveeqJ(k=54Epb?s-tM0@db(39!Y=f=YaM<3FbiR#h006+x>CSzWM!Ul+c^qRn_={ zR>fIQ5PdKQwEj4l188O33TUmthVIpD29_Pi0lq(C1tUKK3}J>ylBId3lF+r*^**u;9tR|URe@?LPQf3NPUP$$v2}m%S)F1%&UqV z=@fYg2)xqoq&Juky1%rXF6~F(?&pAiC(ps<`+QM=b$t0jX{uOAKUU?5k7l1?z6%5- z@VeR+EHF1hrLO5Fqy141q)y*B-Q?P`sf%S!8Fi=aq1KQcCDxE9%PqG&mp(pj5w+&Y zLs;GE`tG{nqqm+3DVJI9vT>)4v8T6O?akSGwf97lChGkUi#BaJ6H;ROhf#l8E~3k= ze}unJlk)9}jNTm6Kc!W-?K!@z48@J!x-%M+=tgDtzN)NUyFR$W4&9O>O5`vluDBlG zbo-MJSjH)8V0!m~T3HmX3b%ModbVL#Z{2Z=oOSNX?5;a?_Qn;muFvr_b+qMJ&|oaWum}q1RX&c9f)u2Jr!OH!ihZBm#sosp%%CEfsli>6A$l7F9`X=}zyf0-N%X z`by#+T(mZ5z7H zY5c=xE_%GtDykH{c%I%FRVfaWZ1w%ga#Jp)`}#`6f=s?`)%0BY*!6hT4V;j-azkGl z*pO3t#(q3WlVg1Gyf!NAgvF!1l4#XGS-z?A620TN<%{%IpF1g$eQNVnLl(u(rE$1V zG(0Cs25d!>1gMH9GDHdXR(AP$yKjV5)MfWst?Ev@FI}!o5zBQ5b;7FdvWi*>|575A zsbMN165SAszw>$4IIz+`PWLY_(S~a?-WLB0nB~&ponbm95 z+N>!mMMknlmKiV2vN|U<$e1Y&GUrsBr{SD~^9-D4;yerI**NFnoR9Ndoaf;@ALl}x z7vQ`Q=S4U##(62uB@MFd(gs<>GMpd6c?HfZaef5nM{!<_^J55`-5{lZ#4knsQp7LK zegN0g8l(;QM>?e0({Voo_xMM8q}dPReirWWk90|qE-BK*{Wq*d++}!oIo@5t|2N>A zy$*4%$N34IH{v`eTk6Dr1OA!0+0tzMJMrIue`X&4pN+Hd@5y%&KvsRVO0_hhkag}C zNoA-C1Um#!khTsWezaAx`x}ifH3Cw|(P-S?C_2E{Lq|kwHoc9yFFobSbG4-tfZOn# z1p66fp7D3p^{!_paClLKP~@t&G!9GrQ}qwkSzFy`emu-z%qdH%)tA!LC5rhfu{Hxc%KMxTxCVCLeN9iSKc zNBd{uCkFjg|C9mo$NNwB$M1=A`F19$e1{r5W|wb&1CYhC05@nA5fsblo)KqR{aOww zvL4rsiUj>=0J#8v#CV}y^bjF}B&mQxV(e-ct?E>_Jz|;q!SHEqwl)*}e`37pk33ry zI^jT({d4A2#;EvprH{5<^~^ut<^X1h+>j(=y9?!U1Q8Z%cLArXcs7R{!p7T85_YJa z;75{y>fFBbfisAEA+7WUpLUxKI-P^n<6GRfF6^2RDb#$^L7zN{woE zCO+Gs(WZ_lZ?!nsv(NW}W&#v&uB4SwjDjN1Ii{UTKNe zj%o>u8Ql^#G`S^=eX}Ln{8meJ!rLv;BMgL-{u2jQtO`eYxw@SHr&F21!p_HG(Xre= zUDL6)%&_WFi%!R`ay&X8{}z`2(SvmRDu?6I^sV+y=@abf+^>4we9W27M@R(!mje&d zCrnuXV}Fi<_uQ1Ck`z|rm`_g7gZa4yvynC=lHxa%RrbB)5%X$9Uu~aHDKL~Fj=*7> z5{Xw8R?epvjthDq1mMo#!@_EHIz7D?{0I26u*i~hdx+5(O7BI&5k)nws_l5dQEsBp z!SBKYMKVp7DHKG}f8c?T>uNP$Dx=frj0ed4fkzs5YhYCBA12r4Ey~qu4^8^V8MQir zQMFjs=Krc$t!5ygjgvJJnT#1C(=kIeTA(QDbW)Wiz8qC+Jw0^%xr&ahEadN1^ z$4H`^WioTKOqbWJ(az1AJ2y|0KX-0^t|()?i2i5iDl@Z0^glb7$DS6^Rb` zZ-Adz5*3BgjtUMJ$UTHBDjE`?C1Iw6t9}7LLKUF{@ry*9R47H2l_E7H4}P|Z{8JHS zyt;Zl`HdVFQ%-UuJR#bV!$j(_C-*GSC19^qLLNq zTPN75geRk7Pv*i=<||QP{2|b8z#$Zi)n-Gf1P%&@l1>^4;Q|p?o2aC4Bo-BMek4^~ z5%VS6M;lFnxX46Q^5ys|kLIHl^~GUfA*`s5m8pGksH@j)5S3Ai)&}CB*Wd{Fq0mMQ z5s4*K_R2D9vDS*7xpr1%`yJIaKWv z?x4oJld!c%T4}Hk%?M`$ya3xQ-Z%! zq8%LO6G^p^P^M(5Ar`a?@;KIiP9clKwNh?|ze*dT^mnRLL(Kk8&7o#Z^vPy}?qahs z%-b9mM^cm15*fLxStG4#Rz*M6tWlLWt5hgID#9sKA`5cWrYYPpa^#32)N%65SM>QI z3>}fEDE)qsT&tg^URy>N2E$ssE0XIV%HT&A@GB~+h!m?N=mJp&xDeqA4N+vEL{LxF zY6w6sX7nN#D-eL13LFrWd~BT*&Ix7pIt2+g>V8l=A%ctARo3%^I zP?r?BOJ-A@gddKzL(52ra)-|5ZXrpwndJ*!DN-2?Tn9puG`QpeL1x~aF-0ZOFbj1m zrdSujEDF;yi^C$ACFW3OsX2^UsxvT6nDTm6A&FM#hA4F=l|-x7DKudUtszz?H)tY! z*ltxFil!tiKEi)iqR~Knq%s}r6UoBNu|BapzFDGqwOOZnvsoAMZF88`-5eHisKp$L z|FB;)>kO7=i2?=8YYM3rmg_y>Oj)xAD#E&SduqC!YGfsq-INu=WB!a@By!3qb6lVA zjOnSI-xT-?-cuhC{46ZuNex88gRFe42Ok{jVr(k z3NykLqNy2&Uc1`<@QQ+mNlF9hdzg~>@Th|OgZ+>o^Zio_rmQd+D9v=xa~uIb{$@%6 ze@q$m2;va@s<>my6lh_zuNRK6f-wGKO`u*-P?hB)k;b${`QVny7IT%k3I z{p~EYCXwz`OLJ8F3_&tJe$b%O$(W#@0WY;=er+!!khRj^@-=s^lyxXwJ-po_r#tXdkPCvgeKXboyq zJlYqjHpYKenxRVYF|sUmtluw}sY9T5Ky8P@o=FP6%BoWP{pwemb+Y1?XwA}==& zE-Rd0$UQ7aM311**TPRUU&Ph!)YM$jAQU5Nb1D2t1XEKDeJZ0!G{0m6bdTsVLoWKL zz%j9e`Wo^}L>ka$7FpOKB^l#0#*^QIYNK5&Ns&~qTbP=em6?@Fe!Lh%C>NGM*Q}&) z#R|n@q;auAv54A~RD?q+=FYX+CQ{SEUC%A!wYj8`!$|h=h|5=3S}q|==d^exe+C%V z2R_T}dEhf&W%rgadQ~0|npLr(XZqjEye*bw7=`<+(LgBRK!!7M}0g|<6@R%O@cdTxBu_-xj; z+~4M&%MHzYFt0FgSDputb7;F3pQxd}`yC*vCw*e|V+3v$=UM;adL_Z??OEeu@h%?* z*Ec=^ps)@zBtUBgRI4A4tW3}Bc566*Yq6yZp3^g{w0ocH7h^Fm0h(p!;q^1Cs4czw zX=^;;-9GIfXSLu0h{D{PCZzFik`O)dl7k#kodPYQqUZ<2C+Z37sP74(X_}(;-V;3w z+L34?ECRHxRmNS;ywFx;F<+HnvLlkk&8OC(lu9F|GKots0RvM8wGeA}TA#@~pVyW5 z*Ss(D{+@R|PwCMCt5=N}GTYg=^DtfUQ68o}8ZRV9JTQ5fQm@85P<>CHt0&)Ookj1Y zT%)HeCIh4UA~~^B;A|jg4>`Xl=M)?&i68Pjx2Pm!`OEY7=by@VY4RJh@;$S-k|;dy zb6`pwH)mR@Sdh)O~ta>ibQAVzgd?2IW0>?;tIahWnE>IZQ|JOicPj&yplXj~6 zx@YX^?tgm5o$mg+9st5%uDBD~HT0~tqGw?z3J-7W{YTH(Q@z)F(oXgMvuEt--miPc zoyM#T3bLMx!N9+raEZBsr!-`^jyF(2Geqy&ITr8Da9N!_=i8|a5w2A{M=@vQoW*k- zbDo*=#hkdg33HR?_9T9jIBM?bxsh`t+L0?t;PLw$?9e$$YR{YtZFztVj-M0A@${*b zlW>&mZ1QtmA4ii_z>F`VTa%ofD+E14L0#nhg~D_BgK$p-!fh794S4`TO5rHkgXAaV zC>7!F$eYR{&yv7?NKZwgo38tgU>&1k+&!;;HZ7lgApKg5u`ayI<^xqLtK@Oa&w$rtAZmVbhg*Hb6TRGQta%`uy zmkJF6(r6iGOfV*f4hb9L=PQk*ugY4-qUQc#tV@wV6Mt8&I=-T3cK^eg(tX{k?f$3L z*!?xcFAVz`jkbc&_|aS!DzLcc?k5~tu%EBM2qIKC2|eOTd>|2;3r?aKdKRd;NQ9DW zH>{?CiQpyQN{PruA_gN7AxMNQkO;73oHvgWA)~i7&>^Hk+LsDBmkN#sso?yn(dtjd z@p*5}`^`LAL0Z8h1& zrM5}j*EVrkb!#+=8>NL}E}V%sJweXT$vFc@$qp^(d#8_q#EztU2uCWNiE7Y;2%AC9 zd^k#W2|YktKygX>;^MeNT+%>XyNKW;a(v{>oCW7M|O?kIetg{E))q1)ic#?9#KhfRiD15p@RQKwH4kw0hv@uq3g0^C4;}7691$ zL{{uGj9yAAr`EBmXV@ufCO`)H^AuBC#}-iNP7ib8c#;xbz}F4vcl2WG=je8*FCu}Z z#&1xPj_Xxq-FsZjxU@(k3^3W2~3Z271CT_Oyzn4~60)MUl41R;bE~7cj zP_kcfafCs#(Mx_#H}Y6^-E=Tc5f05mG~4rrX(FD<8>Y*T_z$}O2RR}6a8k%ABj;Um z?!Zy@p7*_j_ofu#Ri;qi3S5uluI20mI@4=w=OFY4a2|j|E$w}0+cviS{z_9@(WSPswqG|j z6tNeJJj1EZxE5P`KfbE(nR20(m2|ZgwzMs6`@8|7GW^rlt3@RX#w^HPaNh!t>eTTD zHemrtJ5^e!HE21ZL3uz^WKqj)))*9a74(;Ebevol%6FxBO(vJ z5~H`Jpb~n-b;eYUQF*wqoCl|_@b^zGs9W%x1+fd`7iKKXS~z(j$xY6}SqtYZj967j z62YZM$sS)oMIdM2qBCXt@9;F@%l;r)V9BS2p!tcZ6eTNNNE9Pk6`lL|K~omSJqTm< zbcQ4i{}k^v(GA`k8)gpkN5mH40i3xDhAFM9Y12AuSh_%G7D3K{ zrN0JPiui%3ix&;kK)x5@@&q}5CMRVvI4K7wl%q2i!{;G#wv%I80%sCA+sQdh&Pj5t zOW~}B)0mmLwD_UoRmE$I*9HA5iz|z(i>V;D74IzGQ+%NKwc-=S?Zw^2w~8ZPAmY!- zv6jGDL(VhgJV(wcaxRi{ha6)mIA&iergBPh{cJ3yGN1GN56({>@Y}}uHFJLAfZto3 z-(NVtApyT1IKOW=zp#Mc$YqqPckngZqD6-h$_`(I=uF|Ph0fOHCM7$ByDAP46oDY( zAUPirsZ@GrQPHA_i_c7H&JX+fJ+*lE;{A);6OSzRNA%81!eFH! zDgO>5(I^RsmuQwS z-E3ECp@Em(yeRuaId?-$exWab($6mtrFbSq_hX29x z4?M>t#LbA$&n)T}?uJ%;& zi^FZigXGNP9=t0&*iL>wC+7tB;EeF#Hu)(Zg)SUrs=a@mvb%jRKBQZ+O z8zj;mjZxOaC`QUL@gp*Y>ip*?UyZV0mhs$_%QBNb&VP35)#xl8Wbw(dSsJC^zcVdM ztMdDI#j2Yblct%8QZ_S#CO0cI(ajR$p=N`myjf$+%*x8L(r2~I>a4`A)~Vyh#ZA-e z^~qD==%?X!+%$boj(%$PL;6Q1PaPLEZdx)POr5G5tC}{|q#rj8{>!FL)u$maQQ$ur zPt#P>h+-1`SMX1XjytC6(pA%@&kzo}nh9AMyzIS_^b%%YscUu#$;!DBPg~ z79=armXNF*EAfmB$Vv&xibO2P3W*QzC5TT^1Mi`bapEJE$gyPE&yEZh3aq7&Krq@q z4akP1G^%t=>8#R+OL^(Am+mO7Eft51=t?ZTzjPRW63d9LtkRs)$@odLM|2fpSMf#o z$x=pim6vWR-GCqDC8X3CUK)^>G%DmOI7)CAke4^fuY;UVxd)#M4-~86H=3L&aFlG1 z@L(JHG1+W>gdUEPy(2uxB)?K})|2xZIXB4}JBj7x>OAD?EXkE5TK2I)CH+dKk#-s+ zvQ9=bQfDN&8l)w;im@ngo^n~v>IXxv{wgvlE&j6)T#d~#${|>1v(%8UU5QzPBK`i_ zl*u7ce!pt69y68d$?6!tUlS~Gn97cRy4j!_)hxr85Q8Lp*|NzHIviMSlxT(26aqkr z7mZ|2i1f+&;z=Yrlj*itU%G6v9zwWf+O+%`Gv?@5fB;9@GSo1zx=PuyYN%O|N8Pf%WvT4_hjJp7O_dZd=1tIDcPCJjd{xhlCu#d81Wh$ zCA)07ai!qhMBabrysMTQw+h~V^0rK-(EFDgj|kp*@QK*TdH-U$@mGTPaq|8v=dE5I zkV^R!_zfo~4UUo>EIe3Bey@@97WW`tc+f?DcgT@Wg|x|-5Yfkso;k;aLfRzKvyupT z2csUT)o)zWIV%LM z+EWQxVGzFE_e-0Z5J@wmmo+n?A_CxV0M1*@|RNKu9Whfht`V5T{VR z7UDCOj%m}fCryU5q@|~)lPH-A^`ZJSJfNExJ#O$IJsmeu#rj969m6{yMEx=}6T7&! z)wxtFQ)2jeRII}z9i?xEOneH;JLXg;xZnqso<)G2ZFNNUek4B)fRvFrMU1RLk}c{M`Lo3#5~s`}a>^mZm@>q8BrreJ&t+q7>Y#_$ zJdB9HY3S)~z?hsHP75(3O%(CMhXWDU_avXS<{`0^g5~7PrGR6yl@Vo2EV^vDKU?n9 zWlNkQKH341ZTl}G6WDYKvEj8r(S6nz9lepJ#))B3h!{L-vSnCW#fY7TY?)I-IpC+Y z#z$IM*-FnSR}QHn(i1JFyIjdMP8xUV=C}S&*pVx-rJ7N~xPFy&HpQ4go0KkY%Aq|| zPguT7Z#~}16s(jKtrRa@sa&*DwPdAw$x7{#mAaCZq03f=J-l+zqbmomSs78j(jUEm znZPV%3YdvZ921if#YDx-W5zO57DO`>qZw`~Xak}`8H_{bVIY@-i1IvVI*QnimE3|l zix%3EYWTYrxxK_B!;ZzKYrXHh+QN-INfhs(D7FL-KzmnOe~!7ER%T?nlNq0e|8%Ev z zHcR>GkbCaE9JrSQ_j2G~4&2LudpU3~2kzy-y&Slg1NU;^UJl&LfqOY{F9+`Bz`Y!} zmjm~5;9d^g%Yl12a4!e`f0zR*^`qI_W=76bS&VbZym}$?hgS2}Nkf`dqZx*6j?bO~ zQ)3b9TF^Phl4nYLLX4~3aeX0uA3 z+pN*#H){;06)<_(vIWLirWG)@*|G^HSf&+Qwrtu$N8l-Ug{Ndw20uKlURS+-i)mCG z7YgA5_E%;z8Q<^+6RP%R|8{2mOsy#Dfoo?%1|_Kf)WZBQd14E1A$}!W!-%3)K#Yk| z`9vbAF$`8rw17zs^SiuM*vsUqVdJSzg@rJ#VB{JV1@j&?%tXsHIM%9Rtv5Mv1)D)N z3~Jz4u27W6&{NQE*pRBx&|B~brr@}OfiY*|7x1I^%_hSljV6l1fkLApzo=9t*&!n~ zH9YW-H)}NXx(&FRGv^@l3aUQID z2H~Er+jF??;5J-QxZSn;cH-%tx@Wc>tbDr-CIM!@^{uCUhXOo?`{6g2aeR#?91PNWLw?78VZM$?y5UTN!{bz zf6#e|{G123JNMPn^Sw2cHad15bslu?sKfI^yK46A*+H=!uGx3kxxKD#Pd->Yya)W? z>Gq?CcX3HLbl7?D=n?YUwg->vY7f=q@2}l=sFq9BVdP8A9w(metvz%I?Cz_()_=7V znX;!AFUqgmSNklzBR~I1A*=9~9Xo6I*pNf}>vkihyPZ3n+YZwEb{=#-U9*RhupPO6 zhzq#axqTNGEPwAoM6;Jz-&K2fZ{5B}ARXHeJGUKq?zz3ro%?DIlT7Tcd-6%Hcn8q# z+a2Jjre+WK;`|-8JNMKaMgsB=qv$E;2gLRhx%Q;<;FC3nx9{rS@pR3;x_wTf-Eq*l z6L|>P=ug#8UG1pbafBod{MPNMeZ~p#%YW+VzChmZg>)XQp(HpD9wItQJ# z{KZeE9=si{-B*inJeR0bkb`Zg9b5{ytNlnc1pH79iAFw72ufG|Dd@jCwDPgZYuf6x$YpuP{$zD5~OD&0nH+JkKv$U~r z4|s#j^uxLjLj`%Ig~hLKMco~kmsfXgL^;qFiJOWG3&}Y0c94NQtO2R8O3IdfuM!r) zAJVMDgf1!F!zGryva@)59$_s=1?IXKXdYr25ZYyt#eum*GjhTWExL1G33@Xymy@^R zof``+IyRqB3sif}B5$u27MENy_N@2 z=XB0a!spfyatS-^AOr$kFiK8CgSxvcs@kF*i+2@nf7k}05YfLJCt8&JfF3+7_j{pN zcY+bQIWNvb9|&_oK1xgTxI`ifWX3F7zIZDkKd1S(5em4jkI;+1zx)m%Ak^;cINb4hsIeNPImqZ%4X z%CEina`*O&>$-Q~zO@T?j&v(7z|OL}^dgQ!?Yh|1HCFc$;-8Zf%_jD#3;iV*w+!Q@ z4kss+*&{7YgCk|Km!zwujqdLPrS<6cEp`tMgt3)4MaE8w?0r;9dFL@akj7OO1Se>^y3hO;_WOH8CaVKox5SZpG;C-RNRvPfb+a4_<4WO1bX zMRL}@ivaHofF%U%BcK8RhtuDWyc>BxQpBFQc0T<4If)0`Nyg6S4<)DRDfUJrj`05w z36t4dB%K_0K9eZJ0o5cK3?kx^5L`#VTLegwWg3d6v_S?Im*$0oeRm3qllmVs4 zsk4i-t*6e&$vBH$87!QMIVCL2NJvNut3}phX0WP0M=Xmu(=eMk^cXogbhne(b5UG( zINN41H)Ui(Tpom6AB2W-A%f~N&Qy^m6^UIi%^CYz8-LIt80*4FlQYid7=V}wksfo* z!EkkL2D=ta?$=D!O4?MT9PQyR-XBFU3zZARl~EqaJRS@w)n)?C;#1bFAn}4A^tM!RfgO z?E@okE2XSvr~QFVICCuw91D9qJNQ1Z#~WumHVA^j%COt*T6giq?#G&&-c(uJ=4QiU zGD^tS%8|`s0NEZ8i=&Fw-q32>3>*VZ)q8eN$AQRS*{Tm3(D8w0gM6#mAdcsPby6;Y z=U_qi{RH;ocyV1kOzNyAc3g+J32`KtEOxmhP9~451IyZnon#0PV<2A!4kpE&hQgK@ z_OE1)2O1iRmqdfAWFCYdl@@)->wfA&pcARn#yuEYSY6@~=xw7R=?URR7Zmc4^$)pd zq9kq>6ilEa%(p$9KqGjJNywSx!&KrpG?UF%^FjM=7JeP8vEU|R*FUwXJGt3<5>?He zL?wf=9z=EKMs8siZo(j$;N=IVnrMV{j0i~6{b-o{lHuYGN)mA&81b-00*6~dkRz3C ze1X2U5UDqUE5LDyBPX*&=0jRd5W|szLf~<2Yg&hSgH_!RQ|jOH77k zvEd}$e?VyVTcAF_69+}5Hl$Diy;nI_Ak=Sc#Fd789*-QqG=(dLGDnZwxWaI?_sBdF;$MX}mPvFMdk=FZkrg7sbC7e(@@$KkrHIIFjSKKL&;qnL_9!Zk^=JBXJbhB!C{YQ#yJK zWnYi=817C-durGNu^vO*RV4IYtOwpcWd^`k@X*DN}S!}CWfi>t;; ziNQbXMc|R{Sr@0vq7Fr13qr0uwCP?J4U@A+Mg{wSD?Lx5fQa1V zkt-R-{&bmkZQ3xl|FLG1z<&g1`KEMbM-$_8uKB{9nKG>!%2A&+s{QOvu5HqIcNfhpqns%x97~@M-xF>a=uIA z#HWPV5U@^MG7LV6PeyZ@jOH!@Q(^#?#dwO{hiDKABj8yLqJ1RvW-P!r05FEP)twTD zw50$dR&7grnv2HRq91b6g|_HdT=ZF6R3A_3uCqn&anbFzs8<5Xeccuf<)ZJ{qUi~k z0TKIwEuM>P_mcz|xPq5$8G=Nl#S)N0z*+(h5#XIf%mx=FAsCcQnxbsh{of*LCm19Y zm?U!+G;Ak1^FqGR9`6eUc#VhA z6RSzr21e-O>S{l1$k3r4!`BfAH*jkUl0M@9Ry683Gh6CgB>H_p%oq`jWP4_V;%x8@a84{UAmvu2u_Lfl_3Tkq;tcet^kMDBLl3Msh$hZ^>L> z2}^!r?##KO{!}nBE@M`4=IVEn>2Xk2N)`J!i4$W3Jemv-9M|>*O|erq;K7YWg>$T& zvvSX2CvpBV)|vR+W1IH{EJ$OBA-_d5Ho*k!9Kjdjm8_&0=%i~`RPaQ52m8g zAZ-`{Sp;k(;Apf0lF~+k_XwC11G2FpR#fiKk|;+4HhnH`&RJl~&>_RU55Nh`AjC8Y zF->lqap)+_4__c;C|o^fV^Sd{uoH=BW)QgukMCg5@z+1+9-7NrK98`-`*XjTYnnS~ zp2xh!^F;k^8!g~NzOr8r}4e1T%I)#j*hbl!XOcwHP7PR^^F=kA|@ zu8M74wUR<_?N7U{KT#QI`vU;dww3+@ic>_RMG(mcT+OwSfXfJYt@FXv7?yQ&(a5fZ z1n}^xplQoA@!V#oK}`|!{YSC6&3qqQ>bw>w!HAC~jLdbgyDrZ;^&z3H^1*Wahe+7kPkT5 ziFUfa;LL)!r+DWUkOdC6SS*qFoe%${Uv&ldnw?Mj^o^&^cVU?#0%^kIe4rZE?+|hS zCSvE+{bbX0Vh4BrIW1?KhVc1Yu=C~YovgRgJRaDJTWN5Kr#2NdInpiAIlY7jF?xSf zs|UNZp8para44P*u-80|c8;{2hEi*r6*w20R#tH}S{8oR82C<;dMa?9zc`Hdn1~hd z>|gFyTwT}gb=7#asl};j-hyV@xhZ&olc;Ikg29shp_HUoH(Jtqq%E?ox@p&fz@oNl z=%Mo$+jZGvbDH+rv+uP`ZajOH71!ZO`25ruv5+@u(s0yl)-~eUxz!ns$Iy$A89-Dl zU%YAov9-GAeBasRY zY=`8Pc1@}Cr*a3PT1Nck?M zKgFElPG#bDg}6-Ib3{0tET>CI%5DJCPuoUfG`Cbk^%Ct&HY;{&vj2H>BQaxPz(U?O zf<9=WsQ)92qI_W?WR}l2S`_6P5@V4?6y+uofuhVKK55#t2u*u0R^p9Z;9>;V0gztU zE}8IpL}tZ8p;Pet3#%9M&Md?`h{Y{v`1C^eswGm*%MaFnp^$f$$M+(geIV@i4MHI& z@I4E^TgYQlQSbJ`pBK8npC!ez&;Ql3Z`-L!h-&0dePpNRXeabcJCHgtmG=uV{O`|b zWoM*f2dhclmHP0?oVv}E`jvPL(z36nlB;&Gax1UmjRif7eT!(ao-e8-&en^onnF_1 zgA81!W4VckMa3T*@jL0l2YXuba861bPW?LdW~zuoE%6zMOw4|r3XXFkZhao zoZ|_HJ-ysrV2__;d1l#gP~t|~`)SkDcps+`RTr7oKc%&4@ASs#wBj`D=y#-XqsQju z4@X~~hS5)f0XrEsAptJs65uQPM+Z*|5RJ)Q=Z6Xp)TNasza9dH!S}=d;_{ylL1=d* zeM34gowteD)c0q$vV+sf5R~c9q+8mP;I-u=?O8{bmClWfye#{pc@?LlV&-q=RR|+o z>zhw*UNc*}pSb>D7biWMCD4hRb6h633;D6xGYh)BtADtge z&%*~UZV)J7VNM6~>r@y4A0rT81b8Ol`*9obKOcdxI;c3~ZyCIO8G)`A!7j~ke@iC8An;|A`h%Jk?Ev5#kZ=tb<px>Ht$eQm!r}v?bGGB8DZx)XFib$;iydwgLt?vBYo-O#mg4sj|1>R z8QLkE@k_z)?mC6jBPLHCPN$H2FqV2}Ez2C6J}=zgkDffrDTUm@vcTUjCDVxx4X2%G ze4~0_}An>$zR(ks4^mKJ5Jr;pwz~_fPf?^=TV`yD6DtzW#pJdw&G*&;7TM6qH zpI*%SbTN27a2RB!@$6#vpCe@4QfS%ZLt?NLl85f!Sqgtye0MP~c?p(6^J4W9?ineU zow7tSk{!DQYXzTwmMq{7ES@QTWPO+5#mti=ovhk|XfWWCXc?XbSCin!03tSyWaG{T z?tU~AG&<-qVTJq%*_QVpRub^lE*AUNtrERb-N-FT%6N>E6?>L9>JIF9Em6jIA3EnS|)`)VnM z*`MCZzL*6SU68dg>+P(wS%a5)Eo~&1^NIIoN$kXBS!95gZwJ#`xo-!xYIWX&?+DXv zn@hG2vqJ`oM+g+`M>O>l%l9|}yqCr|aF&}&X}oi%+HR4XQZsDt{js~p_cyo(Q_L(S zO$iAG@*Nw``c)*sOB%Sv;`fryfsV+xzKF9#rY~K!^wQFRrT0bb;-!SB))&!(+2tgP ziAiq-jh`nGk8cTqv*JL{uy}xC01@eLmSh}znv~%4XAq9_V$YBmX}Aktd0W5vz?XEk zTRP5j=xFvF@d?s91m9~3GBK@juTDVt5`c)kZp+_*uYCuD4{h&YkE`oz&V)DK3|M9YG?H zPt@HBbngncL?{xuXNf%WUObQngEJ&|LW{cyr5x!ow14omh<>MQ zG1W?^K`(U=zP7sC>DrO*@av6eq&xcn$nApmvWw1~08Xkc=Ql6>jx>(bmRx za;>$+(EO%t%j+DThNMDbEk6lHJDv84ES<=3(s)XuSHRJm% zCmk;I;%@U|zc5dhG&I`VCGcqC=mflKOyvpS3lJwH^liEm*yvu4HW0H=mPo(`Ndms; z5aL@CDsUXA%#ki|JPJEWh=}g6^v_8{BKxfo-+?(?vCWnoeBDQ6=S$pwjv2r^Ez;&i zLfl`-=xyJaIyn;rf45=_Km_9#H4UH2Zg>V%Jkq`H5;-2w2*Gc?G7%w6bO@6e!psX{QbGzCJU)l2o5M8EDU6;?Jv*D(F}v`7G&L%Qc`~N(KT%Xq6eE~ZxFw1zk76pK3Qt5) z^-)YqRAEyz)fUbC5M6j}7Ik|T;}%)CBAP0WW{yV}+RdTH&tc}wDO@s#dSwoCY);|j zIaKc)MiO0^97QdUVqT6ad~G&$d^U4&cHvjEDM1wD8CCdUBy~NKxgS~B5<_*xFh9o> z(i)1@Faesv7!9>h!#t}g{EvpZt6^MY3$tUW4Kd8lm_kJ?^+YTa6!Bo!9P%#AEu97%1BWd0FZ z=sKJ7p3MZ!E_``4wQn_Dy}GbrHPyA6Hmw%^Cq#HFM0h`hX$=w9g@ld^rKW_2P7h^f zhK5FkGV!5IN@(bYP^u`j&~*(pehnSEhB+K6d@oe^K`2un%6t;aTnJ@aLz%Wv=Ic=A zb|_;CWd?;Y!^0Rw7&9@9i3($q!kEl3W_cL1DvVhh#uS7xJHkRs!2H8k>Q1j;nbpVW@UKj`fz4>KRA3+VD$xNCV8Znbv zI5YHxnN;4)&@D5mH)j@}m`T;oWLjp1w#}q^W)=!&Q9-kqyjen*(7fzSe)(d-_e=7I zFXO-Ww7~h) z>gf@x`ZTm9Iu!XdamXMLWq6XyJVtU^4VMR}WxU(l7#6yNR9C6`@)!hEwFSg;9)?;% z)KXPQ&8lXu5&4~o%G**^A8VGT%cSKKrMijISh2KsqBKZM!hT|DK7q=hi3CF^=@4n% z+9g#9k5-ic``vEmp`SZ<2FJZvvZBM$EG>62-{dFrSI?V+mP31<1LiHKNxtBjG! z>!pf5nMpV(%&d%=Xo;!%fZaSnc{@bem!RxjY-VdGO8Z!ln5~__mbkD-{d|g@m3={G zc9)DjE>-r1nx(rY%8yIsy`f5UMs7|d)ue?X(t4?~Z<1NwJ4w~I$SmyzkzCBuTE6Nw zU)9IQ7$zutK@;AuW=+x@EH9rRX_hL=Czxd=ezKzzWVI8?h<$p|BZ3J;o**svQxyOM z26%absxQPW?F*5gm@sCupVuOusxQ$-GD1Do3~qu{F+s{#gOnG8lzqV}jKJHhQJG_v zeX$C2oWdNhG$*L~63A@N&@!s8w6MbS4p%j68S}kkD%B^9>S6C0EuI`hrmKTIC~W0*;}JKX2?zkKfOSKa=n`Q8)q+dNuU&!ap~@aSch>RbrWSJA>Jn@s_G_~1Ye-F%d&i)olM6Q%6fT} ztOkA#&(1{M3|Hp!gl1WWR8}!Tb{Vx~vN#tLH7G)v?}CO^w|SJRo+ngwXepDOGy)BJ z8GMDR|(OlqTE;+st~C+iJD0@d51tCZ|`7C_H7a1 z#SnR4sLB3&v?Fl-Nm>69qpbfJ?hG8}xL(Jo`m~&U36%BONKA*zfXhVYB4jRNz&t}$ z7hP2sT~rsvs*BE;GQuL}Hs%r6*9HY)r!sdSxgE~x_jPc3T;I~Ur6V(>a|?;fZVJB0>fCZY%aTIqoyUOYa79+X%<5NLeXZ5M zWcAy?$-c8xq>GrB-h3qU;fk$(xz(?+`Z}xMZ1vl%)iH3ZFpS8XWxm&=YRh9(J%x;_ zu8lAp?fpz1qs%EpBb2Hvh*4EzPgYt(sdnio@2DU~=@-sG$fFc((^QwHDKGgbx}tnu zj#9Nm5nMl&F^aBA#`|^|bMK({kDoL0&TE*z&j~iEh{sb^mD7sN6}0!Na{6AX_lvEx zeB-}qRmC+LI0KZ1K-IMX#n~qnhUvC4FBdmfv~D4R9Fm#e6AVN}P2j10cKjzu#Q z7_+j~$LCyt_emdR@hEgj{*#DSbb*Dh^-zlXHp;U_OUYZxC}n#dMY@DDoQk&vlwxnM zP=35!=vi4Slpm`UDs=@yvyTCzTi|ojGP+**Pgu>nY8l0eJX&54TAi@b>Vm8xpYb`F z$0!a4A!`DyIKk4&ash3Y83KG-edLA!<*5a#+7u{Q9dMp--;b;~@Di5S({tzgrcnDp{d<9GQe^FfG%@^&aNEY;EyHKS}NTG~Ng(@x83 z;WF}RWlcM@Uit)SI;%_Rbww#_z#$Hb4rrB5XqA?1 zN?D$UDY&EPC=e=I_>|&khftZXgZj7tMGLK($H<#Omv%TP1bH(LJ|BJoBi99EvV$<* zP#^FVm)wrz<{%V@>n#9_K$uk`9(YdP93`*ukv9j(YXamtA7wej@q+RWkCtBcr=_*N za7tQwR08KrODjA$-!hO;pE@lTrk^Qkc`w{Il(e`V?%$L&znSxuh+~CN-pLb6+uJB* zvmQe_=(RgYD9vXnW%>w2w|ZhLHKsX@_Uv$>$LOTAXCHKDGZrDiXjv*PloF*QEQTAwjB0Sds10Iymf&+>pVwLbFl05E|32OcCk zjgfUg{+fw$p6_|Am-adv$H*$gARA^xRuSN{%STo)N|{5Hf%2y|$cT}a-EO00KVG6` zomy-`tD$>7A&NkT{wX=-R7uOAoMbN+)3S{Pw7epRR;~D(O+6{E1$dr)Qg+2hdNM$E z0OE(<^r(JZOnDpDQL@?vl-Emrp5=ZKUK!3&2WPv%OjuD7&KM zR~E>xM0wRkDa*ldBfYS1RvFV6m5!*Od~EI*c`Zcb8q{|MSOi_X2IlI5!a_+jp=yX{ zJWsA*RJCHpJnqLRc~^j{k91A(la^L}4JN$ZL(2_qw6ggUVRf&re0uy<9mKwdmR~8y z>=n~y@3#XWc%GF3%3=`spiiG#sOl^e$}blQmCboz@mpgr`wPdP+b5JA-6~Ypyd*Sx zcRi!Jyg*j_jItU1o~Zg!ODQ}5MJX;{f@HK&irOAZSwqD3weja_gkE*;3O$eNgvyd; zp`xN)s4VU!C>D6PJ|nM2zQJ$9rJdgT#){gS580lFuLYePD=J$s@h7eKN;*5C!F)#Ok zVr^t@6?J@O{Hc7}>sSdbtH`J2M^`|9q=V%<7mRO>Qk)Br9gC7xEKt@wW4<>;^%M4h zUyCT^@jP%*8b}&C{#w3pe8b;_-pBbuRc*VSdHhf7e13dpjA5Os16A&LwYD>ga~;eW z_+IDQFv}hAk#@2TBm4>@3{})MGKymjjCXwwvJ1bU9XjO(WyZ!r z)f(V^Hj+L16ell+4tfP#U^=aWljxl|*THYhl>H#5?Y!>rX|^^W5|M8QIg%l~au|*fD=)CY_2Q#krRDYF(+M7~Bmq9T7zDYfahl|! zJ(x8=uxPd!JHu+Rv1BK%-Fv0*qYbYXX!3Ct92ejK?#$YBV`ttrE)u!DFmLm&Le2J_ zn>XMJLJc`hh_lcw7XrFZUTV@#Ay;4Zr#0bd<)FaVaL$qahWz$=KYp!Tae>X-D_*~h z&v$}3VUzt-3nd(_M;Y6b$dF-bEs#!^%4C5;X`r1HKU2(3xggE$R$X9k5k#!6o)&P& zAN$L$c5N`(`wwchXM5|X{B-U|55c*gy8G(c?s~B+G0L_YV{)e=Yqusg-Fy-!Bhk~U zPd$=M{7?UxXcBz7GRb83>9Hhhk8$@`;OmydnJmWe9!^R2;?6Ga#AIWCX7hB3J$s+~ zE%_S>{dw2HI`*u9Gi$z)z-Bf#eVlatMnco<jjnldbdit@cxXl3BVgouXl3Opc?#9P%pQcC_L~(yNZma*?IKY&z}s zpi!=|rPC~JTN;IV`tPA;ZK&9hq=4Yqc-^5*sdp1NyZ!COuXUW!5go<&~8?MDf2zR{U0?!Tk zJNHJH6c%pSm-n>>;SI06cSFOjBu35KCC1$|cH)*~_KkYNR(17aJ!hv6{&JKCI)JfcU^K#EFu$-c z7`kgYKx>b_<7XGAD}}_I8i#WU!a$xx0Kvh9EmLs5IdCdKljqc?B42WA+-ZqNy>)mR z+la}%ex)T3j?em~<1FxW0zwIxM?fwC`v~}efNKQ&NPsc}U^)Ry0eTLb_@9uYw~ku! zLz3SI3Y7eS?y=3}aI+NWaFH+I@?RALz35)_zD7f9**a~TtiO4Z$!+TOxrd6l)9pkeGc^r z;#{uI+vndy-y}4&Iev_{DQjM1lOZ+PWUjq44_zZ&ik6IBZL;$fc+5DzhwJNRh?gjk zXBo1@vEL5FppSIhX+1`J$j|Q_##_B5m8G@AjqEV(@RWr15mMI?xpi6d*e^5edpzH6 z^CV^fLxFHK32asl^A~uypc6`A)3Xad@29kF@*~}pmQXyq(R9Dodp^2!hjgnq_3Cf1 zd%L(!b7@{FTVd_)XK2Y}s$EPfrB*3Dko+-5{Gr4#ke`b*{G&tw2@;$U4-ocBvysu& zW4cs(U_PjbiswKjj9sZf!Q|Dr^vE7VcVWNQ!qlisi!!-ux_r-jC8OwN>n+i$6r^v1 z@lz}MZBJ-RN=PKLFaiFd)?(q3X-(S~5PD-^>yIYG!~#4Ge95qvu!K@qo0veJlDdl2 z=H#nQhf|tXr!+TRNNEHC{N2}>oFy&~uyI{+Mnh;s;tgTJ1%FPy?D?sL&dD!bJ?kMt z;Lcgn0yk9Q8ZzqUH83v;pn0hp!XoRJHqmK>x(@v}w8{P7Xj460hw&fdnHc4uCe_0J zZX|xIO??@yex|j54uw+^NND96q9LGCG5&Cg14p7HrJ%hLW-BJG#FwBHS#*X3dPkrX zg8K+_+2qK>ksEcO2>LlMw~=G0R;_)wg+ayxE!0R;bm~=tX$UZpD>R`+aOqw%(NEyn zBrDx4R6-i5g*(+o`SOPn#j=tR4#{0abWcJC7^NeSjj(phrC+Eed2c88c#>|teKdJZ zo2OOxC6PW4G11CFYr1A6KQd#O3(IiET@`m}5w;V5tsTLcv!sU%Unomrea-X`qGLw5 zN?)R?BzK8=ZC>+ZURQ%fkwM_eeA+c7EhG~waqcGyOlg0lyH^WKyFP7W)Aoh_RMT4v zeO-s~`unu!@-U?CZ?$W{ z-^$OGt^bmjJGF7@j7FOVqoKY8{&q;2+6WDsrx|&N7LtO%?sH#iKgBI zsFE7D(?Y8(v3a-gNU?|O1C^@me#pZkbYUZKssAuEA$@0BV4;D)wh35l~Oo8 z*`sgmW(_c4z$-{^bIFKv35SHE9>YLESfqG;*NmgNjSsZ3cj~m{5w2t=RwuP`?%c;{#M@`sa2!5Zk%hlJ8k)@1(l zhji07pAJsHJ~-WEQrcY}oPMO6M^qNHV0V|c`)lnm{3g4$X=Vmy9B`Nriw}v7=U^ZQ z!#Nnu!6XhYp8fYgF896hl6i&@NEvhM_?cyD->z%BnQtC2qg_O zC|o4jCdWO7&X5GpBbEg>Fc-QrI^+3N1utRDa4}Ckd|mfV?aSTYY1emY873xn^_Kh? zn%93*o7MlF_IdkAY!*_7k^KuqUpaa$HYY>+L6o7s{KoaBp~^x2_K1G0wDadT9=V$F zG@&KdZD}r9!lk**q$1fW00a^cPCzsPNdzn;Uj~IQz)k}85b!1eZxiqy z0aF0DaU*<^B%A|S3po~&;jXUwG&*B&ogy7luV@=V_E)1wdYem|dm9_5ZX4P*yiGaH+N^-9egC0ObXk=PDB7$MM>|$Q(8WJRQ zb>e-Xq#W^c-gk{>?~toG6lEY3NqseD41JF7xx# zKY#kOtUtHEq2J|~xxc*e%k^LI%%z^nI%&ny%%;(qVowgf5xQ2oM%wrtpLh3jUj4ax z{F(0})|1;!D{cyIwAL8&^IMPQ*BB!3wUWr|rl3`42vVzC>w@x6neVnb8>+P}&ehs# zZ7X1>T5C8~Xa0`2v?uqbUAJh`4gImR#x#vuqxMz%N_-{G5@((>udDj&yrQzAvg)$x zuC&k6K6!zF#0R0>X-4NX^`HHBsf&!xUDf|*;QtO*-PhIHE*Sv45Q|4*UE+t~M{~Hm znqq4KBZyH{{l9@1xrY8X82-HO*G1YQt^R~@r2d#K_=f)2MAwNynO!wTae7Ua?lzvxarSw-3jp%8*2<=KmDnj0^?qTdxX3G>`lAhWVstp z?L}K5L1L2qb#<*#LOLy}Q%m5f>j>-V)Xr+HM*G_gwbofHflJe>wH)E~)y886J7Xya zR_d#>^ry1)bv$PYVR*voMcHH+Y1u{9j}$f7A$mqX!|=Sm4!z)r++ch|UuO*(M(V3) z=ugcUn4sMoaYo;8Mqh6up03*9n^vaRo_YSQPIny!wcEsNTinf)=v~hns|^q}2pq(Y z%m?X&Ce2u_HKb|(X9zm~cLfvw+k*c!MmPOXOk?_=x?)3+@z31^9 z%piUkel&;6t0}e=xPW?p=*UbPMjAP9_6*}0OTaziPsSVeCwVXYNgnklc`ulFHCf;B zvN=UfLs1`XF#c9g6V(7UT~ucD42x$&674J=U;L}6{sbE$mUSJ=GzQ7UY*4cPs8s@Z zoDcTTBVyny;XP84C=h*>mwVSKqdPLhT{XoyI^#g!C=Tg@=op=4T||V8u8+h9mMpHx zF|tAFImN(HtRoQNpqzBb^n*TN$$?Oib%`No`@*c|w*4w-hWQG-Dmc#@!4_Q5A8_K}aV zhTm0e4Ei0w4`RE@jj_K2*x27G&Y}3TI;tUEN7fo8>TCngE7@3OV7wxdbA#&e(ft-0 z`7+F=tIk=XhJx&>)*78ZAtd4GR8LYhP?-`f8x)&ENXb#>lk^b3p!EERtX!y2LR=Fs zV;L3$2Ty&iflN;kbXE~mR}nN=5$3H3`m6|Qt%zthW3|5BaOR@E`ONuJeXa3?!A%B+ zcl9hTKhfzXGt_jtdKyag4aO7C9?LwY*BBVRFQboU^bL$Psc5fWvsbU)tM}cjZ`fe) zGUn>@Y)NTcQbbma{_IMyQV<(N6uTx%pO&T1&eE6V>Z@|~r&j9E7Uv*0U0=3EpS?w& zw?&_}MPK%ozPi&rLa&t>N;~=b2E!?R+A00A6Z$YI%R4_5BpU232x)H#T8 zmLAJ_4a;8;i&gN5uH3+nMQvmG866VI06?1|5xFMby{E|nF_hzOLSt@y0yh(WCJPpk z_q^irni_}`rW9DZY+=G${0FiBe{#yIjp=CS&s+}Q`r#%59r)AIu|zz6?N~8%MR9(P zk?s0Jm;XEU9>Md6H3`-~t4;LOZ~F{w6~w07#>UU_i_MAk%Ms_>K9G#`pnSI2_JN|v zi4BrWJ0}B0_`=2QBXShk;|F(XmF}};>A^~-uX!Qt$pY>qnmAeY`};*vkm_>#M<(L@rAW7zpz?gv`k<70vBAZKl{SskQa8Z zG;Gh&<>%DtPj%w)0ebo1MuQs#6`U9*!&*{lKri*$SM}Ae>Z3Pc)i5Sk8N8D9S}5@t zTX=(hM&}Szo*jhV>O%Bq8=s2RJeu`tsCTHBY0} z@Y1wtylibY&sbh#c*ro8kT~BpzdRrMfq1bd!HE^WE@A08)Ux>3IlqqERE*94b-uCO z5c_BD*X8-Kzxq5-*}o~t<=EP_`6k}yD<0X5;-vu=CP;$50xScmD67_&klma0u|{7& zIGgaKUT0K?Ym%~G)FfH_yn=~(ojO>5EJUx<#OaU4>vh>H^v6~{i2ZI}UV;A9MExma z$gzo)veK?&#?1IkeNDP1ttdTBf2!+*9$R4jsmuY{Pgm*}eyBeh92|tl+-f}QK6Lt8 z64PG>L|4MCpJ1>x*RvDo5<0=f^ryo0x}fSJ+kc5#%6%lUWUP;ZqncpuqfR$qU-<|S z7}Megejqq}eYLy(lsh_}m4#=`z4}voSAM9kCceHpLVqekUtOg?Rb?PsJJ;FRdyLep z?>pz>|4}kLjXFpgIC2h)fdST2`ctR$)dqsj#2d59B9XP7JVRb}T9G;%0gbbo=ZjgB zAj~r&xlB{kiGXjm1X-Otz0NRzLbaWkH3NwAJAsM!g}J}|w-k>wZq#2hL`?NUkFHgI zsIQ65D5@?(gEd9f)kS3k^9&PbgC?gSwO;yWv{Y}D>6=ND^~QKxfJ;&9>%j*s)P-6t zffAKy)M`#&rKw4bXgphyYle{6r?CgEIff4!i%(yxujSj}qraA!vt3^xcGXviU0wB; z5$J=fS8Mdzr}Yh)`p1n~`l2js0bTXlv0nNHFTFNG-+;{{W~^baUTa8(*63smReJ4P zT*_H8Lp20g2aMr17`*gRjQ$!&0K`)e*Fq~1OqCy+cwH}G444fy&ycM#8^{*XfE`gf zYlb2U=?pQ%cTO~{#Ljf%F}3=v?O!)ht=1ty*J+39I%KQW2$ug|DoaZIs;o}!i-!lb zQLQs%`Wk(8hIollqBDe~8Pkvw|0hqU>Hk$Fpic{``MnSNB7=*!_;@t1TM<@%c#L^I5(jy))=nPAo=(SR7>Wtl|4lt;WA02W|Y3Bg*amGpq4$ zDDRB@wZlG-6&uQn(Vstb`G16(q!aW(#RERE={a~+H}K>42;oRR>iwaM4XOc~08Au6 zW(X=iX5zh^O9nj9nbF^%fzJ9inY>CqZiv5f6zfFmF+abc*5k=|p)8c*g>t>2^h#}U zadB&Xd3kwj{a*4~xwG_&GZsXATAj1CzS?XplDYTNz;yMvL1t&%d-bTn&yU4z+~r6h zrc~th^wqP5(s<@-El}m;lwT#-t~z(dPh_yn;sKOk9DvL2M(a@{_St!PkOx0s-_{d& z&5bVA8juvER@YQl7Z(+^o`p>XUUk>#I>kCaU3$(&yy9-dn-jqe_*W_nEa$N-i${9) z%CVj3)}>R!CpClKu3R+^4Uk z&AyT~+r+!P=8AJCd&QY$4R}-X#uYZBHlwxxpAvkI;xjPb=~C-rD9PxQ8c?P)*nm=< zaR!v@Twyp`L2BUBDL^UmF_f5i^0nM*ei!Qj_O=LPNvXyQ;o15OY<|=8^EVb3mjXVF zY{A1%4id}DD*+!y_L_Lx*J4WWa#Nj_SEO(FP+wrIDb6phsX1m4i(QTI2S%~(8Ow|D z^vkznSsCEKC}ZM%w)U=G(y7*VIBPqrwH@GzS~V0r_tk|J)^;K#P1~7x zvwDlZdXqZulzy)pa-6XvKw8L3tVa=E?)ts|ZSlPvzN%bo0WPe&Dd_f)>+21>(~3Gh z4Mm+2>pSsUvg%;Uj5Vd?-JHI@6fbRlm8SD-ttBtOob|Q8E?m-D`#b46ESP8rI}k5@ znU{VqqQ(<>)%rZ_NXp3KXM91Ot$*I&u5WP94AEDQGu99?Vh8lQ)nZT$TO(_=YE(Pr zj*XEkDh7?k^3L_m#4CJR@7(R|V!)(47-bfC1fN>$-nH4aMR>_ugir=P57P+`kr?qM z^%8_EE*m~^MOL>$EB)O(QYP)3?R5b0^V5SKRpVI1#Kn((2A0Qbkf4F_|I_+-0}*86 zEnd(2f9fyy!^D>ZJfprkYz%OCJu&H1P265{{HEh$yuRHdbz9?GI_SD%tSO zn2hIV#vb)NRUq6du4t_k)gE%GKGC*W;dz4c-T(gE6)Up z9q(!L{i2>MnwcIwb8GFYx0`3q^Y~BX_VwdLnRI!S^U`gi6W;8J3Q7LV7hY%M+@oCL zx`!!PvuDK=k5kJsRt;?(v}s4u(3X-tHYL#+N1E@IXURcPEFrJ2jT8*(WA1z zE*KO({9t&TV(Q5~LFc?Z-Goa@_Wj3=I_IAu-n!FsghOy}^D7(5c24sx+NX4GnHzs{ z_gtmt*u;RJ-TrYg__?|9mkuV$UOYVJ#*76G+sD{XsCi;zK|{c%wRgTbcs4FGa)LwQ zA>DD2_Jri03(_hznz~QQ>4_2E^T+Qh+MVDKpV(j0TX-PcC2q0%bn%EFLq&}yHuk;k z!#@so^p0COLAMTJ=VzD3))zQ9Jiqbz&?i3KcToPp;|U){ ztg3u@X}y1aReqxTtYNCJ|DIO)*xwI&RVBKFo?KNmf9LFhWp$;Y|tKCdJ0iSL~j+X45MNPUR1qFz1L)mvBR~ZI_2jsT(^Yy!qfO?oY)@ zHcdY5y?HlKdI(ydhax3v4;9J#T4pYyg=uC&Kz zOV%Gg^w`#!WtGB!j*8_6;wpxo6~&c~2p+Ln;ftT=s@2RB4GXT^Jf-CMuI-Kg@s>_W z-IPC{Dw`L)*)uk>GIg2P?QL@v8S#_Zt-Cg{ySy)HzDSTQIrz?q9q$j@_4q%o{9D+T zv}HH#y>+wy+(wTN{Nue9S-PO&gv?Fs8%5sCssa@bX+QatNGBB2@Cxn zPd~J4n}6qPZc&=BSKZFCNz$z`E_yi{ZQD6C zorzHF`q#bC;8FH#()RiKgnY6tOwRf!-`VYPHoNxtHebmRcBK5ceW@T!)_$@n{8Qa4 zqsFR_+zC?jiVG(AvXPe(g@YF?tv^}3wBDfkbld(}PT_+?%ik$n`p&-+<_NFM-?zL+ z@y@&If<-4}nsd!{LC){tQKBR1v+e4GHSLEgU;Ci*^2Ywc!&QZws}J9K&e8s>>8f(g zxH|f!!5aD4i1OG^Lf_xD_w&Zvrw-q}8ou}a^sS|nKPu2|-LRuAJ?#G6Jrm-JUJIJl zboua_!&9R&Tw2_=W{Nf)X!^(O4XrzN?Q(f0(LeF$^bGlD`)ep8~IWA!A<_&NAex=BQy7Wb$gR^nm3gb7X9@hrCaGoYghGDs9veM;_2x% zKci)oPt@RTrp?b42AdgkXx3P>-C)1Ro_D_QaJ;=>$VlxymD=R+@z{drE<65^`h&Ua zkmSO*)M4|z=eL-9&ZL@0zQ5sKOsRR4TkOo{$-S4q+PJXhKkLtYou7Q|&0!;YI~tCL z{_Co+d;N#;Z=HXay?4DuzS{rUu=LZ%wtb}V^iR1T`O<&d{uVwYe!1`8_O~S_Ze8Yo zFmbt}vS(i3vMXo$OZMlQzlmFsYKq){Xa2pF-sXm>X49roW6eEZeN83CzVLWSUgAfS zCnRjS(y_VZ@bQ1lXjFy}<#;qki`$9o-KnLjJ)(CNn~ZQ576b>{2?pZUAZ z4M?06@205yTb#`8iILsCJBBv(9p0L>syU%KAwxF8O%Z%GXVv1xzDv&rAA0@g_5LHi zxRaQgk#J!5rm*0G(^PxBL&e_igy(N;^6yw2cdhg28Pg80L$7&G+W*EZP2-HJA?m_n z@qyHDj%{n+EiixcMrg&QCCR469yznB!ef>1FJ6+me@M*!$Gc*u_FP(Wsw=jsF!bNs zmNsg>Kk`Av$CVD!s_83pU;59_rkc&~&hC0Fa&cn9dyh9KDZ}?|FwbZR ziRm}rUUhAQ`7y_+MWG)rPUuKkv z9ce}HwX#hLH-)`@*0<71j|GyD9ja_iLfe-+JlqFUbCNgxn`%|$C$uVNF4O6z^}PQ? zS=_t+2A|=ti~J2mmxq`@~Jx4nDnyUNlx#+i3a{;uzd(~mco`1)Z~9 zn=UIGJ!Y79?9Y~J%^M66-eu-3pJz?9WA5EueYx}A<69b@6-WFt^y6ifuSAWm-1d%J z=j#PaPx+6|nVH|YDN|{T^Y|c|$=~^54=&xAtz$9|UwZZMTU(cHeB%7Fm{I0e>P8*8 ztNXdpylv|K+6SE{tt?t#-lE+Ll*>{}mtRpP0ERq2uYP zhy5=t=v}1D^o-xUY3TJs?OQ7{r}-Ps`o7dvYERwmKA5;>2J_Wxk)mbSO%ol5U;1Fq zaIcX+9rD}1fBaa-J%@buJ7=%n7#bAY@U&n@=BSy6qs}d>ODn3{m|^bSzarl3kk$}- zR^E7xPH4XCANp}nV*KBauDRWj>$q?GoGVM;Kk((;v(fy7cg%J7Z!?*92b*V;zEg-*qUE zvMs~I8xL)moVHux;5lZ^aJNI-rX(afD60D3p8L$6No%ABygf69y)#Dmx>MY)>%~uP zO-bCcIe*jc;DhwA9pe%t741PDYaBj0H|D_q$J)C`C6)dE!=JCIAzFcgqL~T`0%n0} zsa-`dL^K4Bnw1ySLc7^@%qbla5E03HYSwU50W-7FE>2~dm$aLjc5$Y>WTiGuS~jDm zo`=tOt>;<4KYo8c>#Vi+KKq=r*WP=bbKdXw>wT;I5}6&-!r%}{G&(3Uk(56-4R+D5 zt7~T?!w|`PNV!%-8S(ZZTQtCPDmzK})1nvY(B)U74Aw!yy^W(e|<8QH- zATM$OQ|oooY&x@`L}N!Z9;FM4S!`a>MFBlBpS`~rn?|sf#YoNtWO&s5E=z3aMo9;9 zqbvFE0&=899fMe2q03W(58}9DAVMSd)hQ_TNkvUkRz~pOk!TYhGT6)3n@A|lnYZJZ zSg+Z5NkY8cX;PJFAy}W!KvY}9`AT+{1+}nF_uxv-F_KS_e<(Syoch3Refi8@E+v-U zz0y;7G=iM`0y;q0$iDc%ICDo{6&(w3_56C#E#-KBq~<~R#oj9p9`{?ARHE&9=K!gv zrY01BU%*p_CT=x)l)r5Fe&)(+^!hCYWn75HS4y<(_hi64Rb`3}mimpcjs(zsOMkO{ zWC%Wjq*30+89~XX;h}Im5gJ~)?g1Ki(A;RTO9rPC_mNcn3?=140Nh%nqaRc>|H;Ua zDlWhTwDe&??hajen=+qKY@w-x^{j2jk=-d}13lW%m1Z3iWVO4$rP8Icm!$1zh@-mf zsMI>OSNmFzY}Mxpg_LPR+x=_TW4oI{s-Nr1UOX8(u8k&YLi^jf`_^&m|3fWuWDgA_ zscJH8O}H^njguaXagtPUx*_%JqoNXP%FY2s%D{(~R!B)+{QifwsvicL5>l#q&=Vka-G4Xs5yMkDCBXaE=JjcRgmW&`=H$y}| z4?t8Ayyxz4T-?J0>aEuIc3Pc-z35=t>e=monO*Og2whpBAR^eAe_f(MurdfVPtZX)a z&EbFZndnj}+Sqc!kZ5DTOg6s9#F&UNJ=OnvuQK>`Ah(*NTmK-pw;(h}^;S&2Q9`49 z4_Th~Jqk)3WL_A34uvk*AxZue$ggTgNMD%=Q*jT8<4d|i`7x~sOPANi_;No}Ois*Y zV-A)m3W$k!DavsL@`5$Rei^hFKT}8yyTGzY=yD33mt}mbIOj9QEy*U3LXu_&ErkDD ziGG+j-qmP^#zB=Tj9Uh%9*ST2yBE8kCUgO2)2s?6Kw?kR_Ump z32E|4UmR78>?uY^2(9?eE?pFyD$E#*RK>e^MTjwP3}PaYrQ~)rqh&-nLz~Sk$$9HL zuOGf_x#!dbAUJ*QsO&Q^8641ccQL%o&xM^JhME!8%eaEvexVPP|LEr=FO-ug5aP=Y zDKteOUn&FnXtt0^k^asV=FN};i(@?mv0NRVs`R8-vVY%c#QaCweqsr}CcG*zf)g7B5#Zv zkncrRLJ?sN2$C9hg&E}b3{LOi^~8FsMx}z5WkzaeI9*3r{kU&)&yF6R4xWoqKQM`1 zsw-$aJbf`7rlGFq=Cj-RbR7A}&Iwy2it5FhkuumT5$j+#jpHwDXZcdE_<#A!#{#fO zo+1?cBSTLn6a5)U)3xSyL~1Z0=+CNMu&SgBR~&(}w85Ib!Xyf~rk>?DSO?Cqs0|zw zzq7smKmMK6d)DaEv$-QG9~HlADo+(xY`m5$@?Ptdm&g8<-<_SW&wTZvG~O+4`?~S+ zh9@+WKtFCa6XA6AH#>m5?)BaTR%l`hHW)$MPOiENWaXCV?6ULH`p{3_7{aMZMk;xQ3=|I=r~;DmwB6Z-wpcX#!((o%M@B{@ zS=~fprjw7d;X#KPl=ci}iEY@regf`=X|AOm25J5JGY~Oc3=CR}rxqslGWX=>^O(k$ z=LrI+=g^h@l}tM4zrUp|soH{~62#P$c6?h=+d?SdK>4i~5PAA(qD69-8+2xczl*Y*L80WY8o@p{ zIwY)_CL{s%%WG)thoNKLO`R9;r+-#ZZxwTNlXcNv(f{^YFK$Rh zul`H>gdR~N_bOp>PMdCM-gLa+kLN$XAe7zqCJOTWq3VLclcgW@s+93!{`{HAG*y*$ zhX#zUFZcgpnY*;VZbnNVyj?t#HANAfvt=dU%O^FJGeFXf+z;1IQM#>__HuBt;=A*# zD`$4+@bFLi=Lx<8Ui|rBFfe~VniYGyyDrb+WaVZs4vWf6d@74k~q6u z=?#ntWNEvxxTsnHz)IL*--CkfzU%dG-2+(}q)?e}YzDa!*XP7jA$UW>*ddy6CAEpt(~Yv#-E zPzpsK2xgXxIUrcm)?FwV)7DbA*S1yy!@{gd5{==u!vY^5VP2dh=w>@YMlhQ?euV4{u{vp4dU2TjdZ-8;zE!@?I=Z|^f?;;Jfs z{CGP!r?+2y_*8VcOGT1qsc_K#ZwSz0MY>3*Rk9;+-M@ zy@^CL+r&v~)K_wat@5-6YdretcPE#69iK)m_g|33g2tgNOIVI`vf0@kNI7OM}2BS@9W#jA)-}I zcQI{c{Ur?$zkjX^|L+SKy*xf2T5&g|4+b^&)ShOFr zzzaS8K9#VMUe^MR{;sxl@Nw#%gW{TlWP_gjz=qz#uHS*FT)gx0fWp=NIR{hv6ii1- zaMC!@;)URPIW#X@_3KQ-6MCuCJc1mx9y|}dIZtkWo*fwS=n~smz*{>St<~T4P+a+t zie=W4wUyl7;YCV=2+KU2`K6ADZyL9B3gnnB+2%KtZzy<|q!U500l9_poN+QYexNlI zxgpN3b+XgMBfAx%_l#C#1A9qqK;i$ujwp$dFxa)wI_+ufJM$#=OW9EY0h{Jo=NCRc z*bJnr<$8Il_K%dVz-|E~rUDY%mO6a#&OJu?^m!qrT+719^9nA;x0K!2OAFDh)6#Vi z4?)7RlXJpd7n+lM;Z15}P=2WU5XZhNX!|7`S%d=txx zMDnpSLWC4TDc=TT5h`MYTx$w64sK%1Wk)WU(YZ+N5v7Y?Au1l-M#DvBS$H8jDlCfX zD^~7h^tOvUk8$<=XHnFK@I_kmlgp~~N#7WG5=n0O^b@=<-$TF@&vOT>uW^1(DXVE1 zW@~l9Jrs)kK$U`1M!)L^<%k%{p>N{vfVl1{QTy$Kz*;iCo-P86b6B&B^faa6==w$EzHZL>b_MV9MB<6~535Vu!qVkwe+fpMOeEKNHb zqm0a0C(44v2-c~tm-k!ZMdg)|Y(mU;sZ^a*8OcFR5kq%!I;8^3OJCaibW#mQM}(0N zn`HGOCgYYFuc!L=c!ke;nEi|oDh>y;z_SUxX6gw~c)8hHcresIriy9K5G{EbSw9TO zX9#yLeKR&wBXT^wPg!)WLf*NCw)rEgoizZM47cbVrZf+NPy_gVPO_5Byi$_8QQi+F z4PWJMKGg<5g*1wuAq&2_zzu5~SV5ezLGIkg>bpZ2W#>_q>HQ*h@z=@WECZ||Z0((# zsW`}DI%ELHP7*Sho0LFU1{dcJu}dll~PNe)E?jG0H{8(yDL0S(AV32i7xq zFBg}Mq<`A~tId+l`HF$R|GngibX>W=$-1zcr+z52qJA0xn6Iqz!}NN6kzICBF_w=E zF@L_>j;C>O4tDn{4C*_=9OIbCqn{wULk=1=QX$J9{*ePfI=o>@!PjU#$6{<}zf(#x zS$&wTHz6Ac+g*{zZ?N5LDK5a{c60XhCygTO$C3gW$C7IehK17aEs= z^veB~UYaiJfU>CkvcQV^&A2dmjPQ74*`5xMWS72!`vY5cWGWN%x8=$4vC1>6`s;;N zUH0}@Rw3#yAFN%Tllj4?=-Az0{5S*erG>!NnHwIwgmD!0(W>MD*g-2xidoU%8t+XH&-yGY+x zpW~W*2jc3t*lsi3f@(;A8W`9E`siP6f7(>ZY0*v}up{>gPm>GuN7`#CuNz_!PfGP2 z&$q>)8D(Dr3TUWv0TaVj#A+f#c(o$Wh3@u|77PBi28jL@3T*qIbk6-$=Y}kK>N<$T zxlC15g7zLFj9ONDI|Rd&hlZPMFs&>RdXq9iR&4xkcM(Q89N@i9@-1aVt9>Fr$x{8{ zTiIU%!QjXBDk9c5A=9)tu1XTIV0rF{**pJk+mQz!eIrW`Y`zeX*g4(SX^&4(!#=ug zDic{ zZk)q%-vFBr&)1Tpe~nY}h@NLLiA<{l8R4<@Ju%^ciTijZ7f~)1h)t9l*P(EFn!XTA zqe0p!JZy^}gJW&c)eH*q0aH>MnOnTxCjn_fEAUw7?!M^V?>HG+pTUflG+?Y4@3rjl z(l8Q*NS9WT84aj}AYEZnux0a`$$^xX*lcyKVC;e-hlwE=zleB(ks3bN&qcxytibG! zjK11*8NxClhm{j>IY+NIsg@JCdZag=Tjr@PZAA^=!|pqDr3GW=7g8=_TN{|XFEmu z#G#csv(}=~0`2``(ty5_9Av3zV|PKuu29A!^pTcIBfyhd__(em3UN3f5vFmvU}G#0 zuu(V4oLvY9D=B3Pkr9+yWk#^HF2+>^Lt|mj1MqmfmNs3!_htZzN@hfvsrHL0n~hos z4erGH@}L=Wy8xfU`+By8IsnfupUisJ|5Zlx*q>|rW%y5yaXpb(@UrLwKUsLMcfKc0a11#72)SAv;R{##b zIiyeaN({fxKAZ2+(d$$WO=BBTcs=@s3J=7sjwH%cixF5^!QUA_Hbkll&gl5%IO2;U z2WuQ4!)VlJm??6wBKetetJJNvWm!`rCy_^ zwa<6Ytr`b$o{k18@#C24`x3ZNP#Qa)KC=V^OHZY@HWz@!UPoczAK`PX=6QYHH{4Nh zVbj9FEO2@AQcz~;pQs^`VEahLricEZ_%thYN&(yicKuJ<9p_7ns|O_^r&vw;@aV-5 zGw24bzR!{AGOkdnirTp?!H9wEnWD8)0+U5g9>j@)xjD{ak0a9fV)DVDL#REkDj(9o zb9|vqoSn(FCS`V{Iw3C%3FtA_8&a)H(AY>*FF?#@>0RZ}8jQ9tgeubOxx)9_LG{38 zJ@_#)7??RZgk=#Ry0O9Jw)zJjH!oEZ9XM5Wuq*jF?;?(3AHXf#pjT1FN}b z$Env0DhtNl=$hx^p2#&Fd1qg!`jG8jYFdo^;i&qw_X*dMjVX4nl~4{X^`rz*^g`O0 zW+P7$%{^^|Za%WjA!XVuT-S9rc&MnNXA1B0{N`UtRlCM~nqt7rxdw-t#oRN$r}xbq z>sViXfOh*$=kaqperg)}4u0QKiD?ed?=p)vXvxEhKBXxQ>?Fqd`6(bgo1Yy~j3M|v zchp~h)rgJ&Bz_R9&5Y znwS7)68&Lcp3N`jy^_SnLE@V{A~zHX ztnsha3>DKt?7WHkbH-?1oY=Q6sNFm6uCYY;T0Uu) zacE1U+WqzA`R_Zb2=qcTXq}@L%JkyiDZxOs4E&k#Lt;;;Fx# ziTc7xa6N=SxEPdHBcT{qlh{r}7?b@JQuttoA>aKztRMrTd2&QqXKG^ngf7XhQ_C$7 zqA=5fagB8eF}|ZOk6GYsGqa9#;%GmPEa7%nCb7fn#^33;Eb1wglfiy~z1dnX3uFkd z*9X3r5!-WR?MX7p)y z5`<9EIB{^|5|up%IIc99iEMs3^JczbGEIiKIf~$18XZsio^k`}84e!yY)E(t%u6dZ zk=XdxjA->4Gvi`omrB`ob%|GLkq5&0Iz(^WQNZ!?*8WbSbQa54a;!ToOl6G)SV~4Z z$7{I;6MNx}Bwr99srBT-i^G%+nEerP(3EmJdJ^`C0HSGO6q=7)lk~f1OW5kpd^Wgwq%}#mkE+Y}0IQ5kuAObOEA_)lj~D@#I=P6 z#hFKL9w;e^=N37)Xgf~wxZft(5i_;OtwF3m%|<4VwO(p!uUg3%zGTr$MsQlk?+f_y z0NVz;tl#H^3BrWHP&(Q_nU>&O!6q=w4(s6FJGYdQ1sxtqx|}M6nMgo-Ky2jF7_>QA zobf6`@8*RP0W{x&r#~`~24`-Hj8U?@x_NDs4jA2q(P%-UQcBsH&lkvqa%4QEoDIV< zdS#nYbX@NMRA=TjSw^|^+Zj<*so$FM#N#w0uI-!U1?_l3=x}Pj=PEe1I`z9{7+&8d3U*}lmQ_ST$#C-I$J$o|1VZUCgzmOUS7r{&0*rc8ARDS52 zo!tgp$@AOGser8eh0Z26B{U6 z=csLsyTPG$Er$rJDL%cW?Z#mf{(|Q>n3fSq(csgKSPQG4TBTRs#Nl77_jp7iVria# z=l<1-yoG@0Ufmd>+4K+6M7{srnsdb|b|z@Q5WCsp{aBXDE&8%gB1W4vA*~ydpS}yE zVOJ8hpCo!U)c1h+a_Z_z*I!!d17)}0778I%$@*9$N)>Fc1*)y`O3)8HpsGs2zs3*E zFupeTG*9>#(9YQN%>~V@{u~x@ua6@-=KS3Ceu`2j4{wW)o+wnU-vD_AS z(V{1!M>56!`EyXu#xpQ93x{aigWvJ5IxXuNtbgb9k(FNmYGP+WI7Z90hsG|q2 z^c(j(jf2y{mkT0A-jMN;_L{|JJ(c}$?<1IjOh-`~x36jB?zJP{H9pzqqD1`aLcR48 z>>oWh-n5Bz!^biD=F?qv)0L!15(S4bab9>r*>E?a&v^JmB;>_kgBgqjDaZ8+G0xGB zbgL2ytU43?24XY$hM6Cm9MSa6m#FTo;8Q!-p5fyn+57)4j|?yi=_}Q=58rG4ur{$4 z2uQs6W5F`MwE4@V&#y*xL%q<$_ZvKeSCq}7-zClHuG(6!u^BvIv%BIf>8A$GWcu^V ztHb-OkP++nAH~|FIV8B?I6Iz~e?<4`-->neO<=f#S)!szkl8SH@7L*%M41eu*u%^T_T^0$E8xy7Bf1VGF%2>0ZVAMUWI9i-Berr88qKSR*Ur?1aD|EIa zl4N{*Z(z_ZXH+>lJp)xqYUm)v1m0M|=O;*1lOZYZqz03%MqkU)#F5=N#ewb&z9!W| zctJc;RN~)qGS1Wtnyrqsi~9I#ZwV!gaPaYXXS7xm+PxP8d%j%8y-{n%&w90KzF%)L zE1Ck#jkOn6>7r(9#^cY=>y34?gIdC-s14D5Xdt07`h)Iu_5QpHvn@ZRO!x@;Q%>Ju zz^0E^Jb{+Z!Fs4f%88fX<2S~Gb7nnP8IKv6pr+c$lL&$%w==;h@;$fjEPNU*iI%>8 z=TTAD>II8hhvg6Q&JQnT!tPL$eH?S3%~?x_s>c17ywlTcX3y|D;E5KW-(}^SkBA?3 z1d>{>J5DlVhqE@|vK^Rfz&XcEr`ZiZuqyFA=1NC!*XYAEi)|xrStDSZ^N+JTr!D&} zXjw~+PnM#8Tjo5wefCUd`m1L^!gPO_uI**kJ@&9-vQjE z&0*7L-ly6V?&(1j?h{EuCAmi5&_a*6jU*i(a1VCkMUj4@bC7}*O)=*6SWAh5N&GrN z-cOY84&1*X{$s?`zKv|9Vf@X{YwfU)wPWDx8A8+nBKa81AS{xcI;8NeRpC2I zNzE?qw)bUwj27^r_u?OoxMS;!rRz-$;-A}x5~}E1(Rlh~;x51#h88uh2>4^9p8RHw zf_ei$hGf-2`>f7`Ckch3(Z5-8Bo@GVgOkb-Uor(T!VVwx91XkE;yql8;N%ZCmY8|} zIuSQ@d;Agmq+UCAz<%$B1FILg-UsaJxGQbjsddZ6$Lji8#1$tu$pen}uRDdAo{Io( zbEmb=?Yrl8EnoUK#H)^jh_?b}OMS^V)s%nrDG$RcBv;JniFSvC`{?78 z5%{RQK+r1P%QtyDs2UksO5Pd`PA+}j)Ip~Wf#9%k3%@`=1TMiHDhzKKIO~?xX#&os zgKltp*r{EMe$o9EjiE<-l1>wQYC8A41PzvDcZHLY`mwR&Me(CQhYj!ZtpR&|hfFy7mk2;wE5g5-S<%=4s@ zFHiX-zdg${Mi|=E-?H4k_e}Y(uxW8!@msF*y`81#`qFH>E2BN1TW&rGW|hA|dtGr) z52si&6I)hxYx5rHX)}6Ig_>c3{=f`;^d6#jk$GzXR2qCm6LfUIj$$P(B%CgrWodZEJcm0@Sk&l#N39( zblI+86V%fy^KFz5kKtd%C~dbR^Mr7&5E=qGbvohLVIvA7WQ~<^{)b&94Q7zpG%*VM zkM-?f>J^epoN7ethY)*c=0Arrp`;dV5?qK6HZE6uUg4iZ8ZHY#Jd73Wh2I<$z{R93 zPao{Rb^qax+>RNWd)DTtTQT5rQ?nbSv{gr07`4+NisZa{Y~<O2B|`M7)5CG-K82d;#qVbf=^t2 za}ulSOC`=H2?Bwm?!4h3-e_#b!v~a`;Ec#5hdZp$_oj$ucMrdkVu)x7b6`m_=8V#m z!m@+;H=#HIA{rYbi9<4rN4Yn89mq4$)d{st5-sMTJQAcx8e*yUKe!F;$M_ zqn>atWc&yW2Z2d+T=uzH%k`5$YK65Nu}vVo5I(P8QYUuE^}6>pTuP&Z-Re+i{~6er zyTfr<{kS)!bJ@g;J0VF*z_Q{`j@_ec_wAg1Ltkz~}72<9HNxgl?cf08KTWvSw zU-Lh^N-(2T&#^17EMz?!r_7<6Z^J6R0Ox0<=)PJQ2$qxGsNa4T!-hsdu%n=#Bi!{) z1&$a%r*5<8PiMWJqz7b|mwGzZ6JXOd0YM4xisw2SI)W0$c>N4Lqn6TfTO1I}1ww;5 zYT~b5!!d3{n|H3HJfcR`SOLJ!wTQ#q)4xz_^Usl^A8}zb*u`i_=Z_9kNjV{>JO$G) z#NYhxCj(?(Di!nsm$xOg2<Dk%q@1KmE0RzNxD+LYZz@WccUp z-*>mHNS`{^1FpCPJLWcE&!Y4-ew>@|xO_|0Kv0tDz`w(c zIB|jPgE}z3g>#7rU~SDOLipBPSd7^Cb3wjLYmnD@qa*4{a%sD-wmlf8&d-UoD{A#g zFzB1P(keJp8qDyu%AeW1t_y3IXaG}5vHSAk`{niW<~s;P9_p(Xt~ zhP8LP$#gTgV56xMf`4_cNH=O$v$lgDx7;;QmhY$5AZ{*f2dmRZhr!vdKiWuJ9ETtJ z3_i|WKKg9##gA+Lc|-Fj(`On;d!px0Y!9|$zx-A63-xy^9T4J`^f4r|I9cFx*cnTo0EbSOD(>-y>iFQxCe^9%;hoLU z(+%fHKi$FZ3IzY2`TB}zw;Uim&j9J+v*NsoQTG(YYp7s6`HV%WOQKz4NT8Xsgn~nq z#ye*vl|kAerEDIts4_eQYlrCY$}Yxr2}F~DAvcH&**h_bu0~m+inPOiSZ}9#X$VAE zJmBqWEa8};td^@-!FV{G7NNI|cwy34gvHP{1Sep{WF}{0CYq_wR=w?-n$D+_N(A&3QUCiGAc+l6zRdUNYUk(=I^|7?Vb|ts1-FPSy z_E%c~S%04PYHi-1_5zQX(t22Lvi}NW5(B_;Y4%&7Nuh|@um?u{=9rf|u6Phg^Z>Z|HwIo&P$HTjAo$Og zncJ{5N`WY})1-}T4m$6%;1mWF;IFOk)3!579>=4uZD_R4z3xSRx!hLKcH-peYq+&- zS5oqVffc}iRdEJo;nPjEwFoNqAZLzU_w-etV5eo1~##Fzxh)8Es~^d+On^;ta`1t3;9{5qVIMY{4w>qMJy0>-C_xYvan*R5x zK3o*xU_)=3pLg`<3>`F2ZK_QOfjVQ>DJj?qI>kFxZ6FvIva67rbT|W6B8>^;m2CWO z`t#kD*wf2jjhx$e8rQHkO}hftJ)|7roM2&7 zDKF3E?oWPM^f98hiljG@?|hV`sPaa7FCtYoB^s7Yov~b?GFaOwLz)^|eqwuZYEPM9 z^%yMup?uRgKV0nDoaBQ9>J+74lXT~aX)wX%iw{z(-6|rLp#ZGH^LT%J&75ks8cOXz zfpeLkKUa9EQ3eo60M72*NWR4KY6BLIbF8JMX$5)t<=(iWrBzCBc=py@O`EfT{RVLjz@*1aae7%U z7k1C|E-#D}t>kgFeVhE^e*30d^X;S#wUx55u77(>8stT<-XviE#>@e~xwJ}-on2kz zd3l-ZFKu|@iS@JY)5N%C=>zKxnklF2Tevjv5~O*q7X&Xkf^$#k(O-`gZlydfyKT87 zV0OGr-)Fy|vZnE~Oq$O*Ve%4yG(Cp;&8 zNnR3NW>uiillU8#h4^MOvhTT-VS*9GQe|GH1x&^9BJm0mDUe%X1;rWpp#=p7zYLzr zpsX?Tel9>EVwh`-8rn$;KTLeXlU8(`w`JK_c@ZBQ>8YT{-2F-{DYD8AyY#TCZaS~% zok|zkoD?>&Wpd+X%W7YqFftSF3T>^0;#1E0ocYaY#vfDN~bUl*+O%-YH4-)gtwW3t8hpbXC-9^6w*Q zwAxZF)ADFa62ZDll=}GMTbmookxBngsUG|+@mu6_QGV_0Lvs15tecq)QD_4AIm4p!vdSqtwxAB;?;r0^3yY~Q}@TJ5I>2Mb#!?^*ZT#@bz3S+Iu0g`17D z>7V>YxJPHBYm@qF`Jr93@OSA0pMQ;^-g@g7?UN@)hiv+*(>sbECZ|Efrdc5d-jnOB zLPvVzIh(!ng7V*q4aW68i4XHAKGFTK@ef+Q)VH=Sq!hUu~uDzMNa1G;F%%Jbe>ebXi#IcuprPIf?HO{)Oh*v>7qpUtM&c-|` z+V=j*CgjNb`FlN2vdG{|Emcv-c>gZR!7G^&hkUG5ybj;f?>jd4Awo z7W(QrL!fb6VszNZ1Hg9d+^2Ih=YE{Sr>#%(O!G0 zmMhPf{gT5HNyJ%&l3X!MlvDcO>bzW1AkQ^)=L=aSzZ44dS>pU(3JO?;+&F^5e2IW{ zzMxc)WvC?rq2ZFeC^wUpFBcdbWF+~Stc)TtOPnPyC}bJ3>xd2GpySi#$vs;QVbaaa zi2IMi4?i(v5m{n6&2_b=Jx+U-#^`yIHj(x{?LX;^9!8IOx>dTpq2=DWwa3DHLQG+ByGSNp}8tVg4_Y zTw(r~|D*lguySdW?3Y~0F9KFU(RpEhy5Wxht|(ue^GiNUm@76sVi+U4NG#4V)CDCH zne4yg3x6ppEdAd-_&=^@RUB_8Jgc?$W{Y;^a8E@*>sg5#}WE^`h&nND?Oh0Y(jGkT@PM( zL2WJuVp;!x1sMSD4sfR&p$(PX_q@3zV$sLAM9BNxcc*AOz1MEQJ*X!jUymr-94fVPsL~M1-e*_A<1mbti5PRH3VZ#D{2>< zFfsPv^OD%S677M}qz!t#TE1=l&r(W?53)^X_6QDNe}_bJU9r|bilhlU;j2blUsP() zbgt5XiEW{N-lZzGos*igMU}*oYwgbM5kx)0AAhAtUc8oS<|QC?p`1!vjLo>z4F`=O znza_tIsq-QD42>r=Wirh;c~^?@(%2=aPz@)Jq>?m*5G|o;jEvpJ~*0d(i>G4nrk08 z9Yeia$;o(bqu-=pkB_EQh8Gr7$i<$@QgNZdFXdg>dYZm)cPPcdmngpEi*zs#IW=1M zOf$6EK2W{7#&)_p6L8iaH1}Ld?K?(o(-N+STeeL!8vhaaXJ$dCn=IsH2hx%L(>)*& z$^B}l(rST_4>{~|JKPrIEC9u0#}xy10);jqUhf59=l$-QaO?zubWP1CkQH<9%iqDS z#W?zf;?(XJI*64tFh~&qV)UBP(B}fhU;F5O;*B?m9tDHf`I2Fp#u;I6XZnKtE)0W- zBg!If_}X`)wHl=Q^2*05Y@j$~(>gzz+!O(AKdeh&{?f?y# zoEvC=0i1RmGGS<+b*73yxae#Otgf#<;!es>^O^659JT_ESq8kt;HWYGJOiMs@Rg*K zIzc(9A?tFXPvDKgvr_Hwjl}rd-uN`str0~|aSq2@GSB;wBj*7dncB%rAi=Y#0r>q8uo4h_z== zt=(H}nfJS&$DiCVn7F^d6=U{E;-}n!vw&o`54V9EU#2S4d;*MzoXQ zm$j#HMYW*2x&7>@K~qiaQMyv)J{zK!ib<|aj}6YjVBwC=$ZewQGO(cj4`=blm*7}+ zmY=ro4cuYhj%G(|gIsfTQjYvbi|S&(Ez!%qxhxQ=bqUv*r!=2Cn12o%nvS|YxqPI0gIk`xW@a|hK zQ3TE5)KShDQuWmM8|iB|x;oR3w2!W3Wib0YYsUB&o(IGakixtqxd(AYquF$6nRYA# zyon zL{P8T?OSD!!kx?yeJCrt!+?B5@RTY3E04AQ=wTV&J{&wTr{X9RU@6o$w$Nx!^m(D-=H^{!hE%dSW^?(=3 zr|XRD_(T2aHh$8ngF7yHx9uEO0KX5-Ozo~DM?Xi-VOO}4wEXHOyZxG?_JEwgpV7t+ z9I?1wY`~&;a&)U691#GN+kog8rGF~XQZY9(%CQWu;Q@xlBmbp~Q^Pk2A1 znd(jK5cya3T2d;cu{(5PEsfS;2@fRImR9k}taif10_BVDr(>J#3{rVmVR}PM>7nbS zbwCtc5PNlSsv}XH*LG94)&6jSBKN0Nl&XIhW2Djm;i{dumDEE2_+JbJECc}3)Y=`-F%QWg6Ot?<9)J@cuIReONoH(tiE- zsjJ-px6Xd|#fis_Cyb8;yPQQ-Y?-z=Ira2prp~Ze-mk(j0hJVfrQbW_NQ3!{a{i4VG?o&ESa!jg0E!+k8?Ho=EjpQK7 zx7KHmyP)t{Ohn5Bi_v23E-Pv^A5Wx+BO>G5X*w~YET({+AH+JvPQcdiP%#|0lopco z>P0A8fKy|ypQB`$4d(fIhbj^x@USB53b>qFK2VyS7!xOsc$&+fzGC%E9hl;>LuNKQ zeisVqJl^v*GsX1~mFfxXxxCg)G(CL33G(Dppul|UK(>)%&%{BRk`Sn`jn3=9d!HRb zDPGRQ_LyLIJzigRq-+x^~#8#h`v70yVDGPXCkmpnNI* z;a^84%#T|h2R5CtJk~;bF0062)w#K@y|=Xm)m-7(LNM<%nm$<(K^|J`0ad!L2=Cc( z_t-rjHnEdQJ>#@r366<;xm|$&{FnYwy@voxv7Pi{TiN{U72%B3XJ!xp78_xU(?r>j zqkZc^GUrI~-ba-f8HdKI+Q=;(%S1)&8w~f=uRyF8U^n}$!r*dwLxI3VN=J5y zceJ+X_2YiM0yuIV@!%T!)hYIbMGjJf;PZL|>GV{YLxxnwPr|4!y31)L^rEAIyMf4J zAX0`^^vqWhMx$!hXX%f9_>P=W+MkS>pWrf~@wc$px7uyj!q37qBi>BviNFYk!TTz) zF#+8~U5!6_tJ*3vv&FyJZlT4ElSxAk|sQ$6P6cO)22D|m_4@`JC@4dP_ zqx$7Eue5lCmsr5XIqN+Y|CNbzd3pTb_=ioeO?Snu+xSrpR>6$i+McFJc6YA6hv@$D z6RdIwL499o7aBX6_G`%wr*Drs177`5w)v0omVQJaLn8x>Z3h4r5I|O|R3KC3Q9L)* zWbRSp<>V~fy30V^ftoH1|4FuTX3&JibM3|cHq5O!9$FYUAd%z|aMD7Ym>=5_;4$KN z;{$O-kz?h=`73zjqpns~h$zxN%rVIkO|P5NloiQlZnB`fEY~RL92uYCat{T=z@Q&8 zDFnJy_BK-VXly#8mAM1(ZSoHm8bs+(WJoLk@bKd2zDeHY?in+oH%t>-O1F9p5r><{ z)eXyo>2jSZ$z>1Qerq3#GBNsSIyJK#jej{2Ay?kJ29+SA?~7)kq-izORw7+*=$Re1 z4Lr~DU%_u7_ul4$1&CgMR|6Z{J=?(PQvNz-jLlw6v_L2`Ms2L{L_E_7GYkdWvo9gT zmmcJp)q4!wCGF3S7x(X-tbBiDXo_-rq-F2CSyclJ#GB3x@U=2k&EQ(^9z#HNkPB*7 zcaP9YK8AzKksK;B*AnV38cy=CXMAm0sLjH{nDNv(Zocbs=J<><+~ zCpx#bAFWEr5jds1zV$5k{q|kQ`wzj*GydCXymu#{TqW~(8C9{6MDhP~K7+5j6y-iG zgH(P~LszKlaQ%LJyNNTS z$pq`-*EyE=3gb(0Vr`z#7HEpQCOPD3bXc5nC$m@~D6HURb=g|^5(AVlcsgqX#>$Ix zYchgq_L7ls&DJA2;oDpEK*(q3M1c(Du~61TCfH_0=M?46s5ZbYBQ06g8^D>1lXn~> zdHz$KAfwoOLzlL5kw+NVJQ+r?8hORaX@mVlR}^$4@jV^JB2A)b1&VjguS1p=cAa|B zKr?F8c{p)gqTe*%-cRgWMjbpYKN)N2x+(fP)DD}g*1_EoC|*4rmrwj61_6a z)kH*`Isa`d^m$pS(3N9;tj$We$wZ0>yi|Gkv)q12=|{d1d2{Q~4+_KP;aGwB&b9B) zQvpD0^D`}iQz+SBA-zXsUvDjXs7miSxPBcJw|C>uh&9h%%+?mv`k7^4Y&vSSNta-( z$J8}e9q9o8OHr?LcTqot^TovvyS?X^z#f5@TOH4M-=&y-ExzQ;PM*>I3kD5j33cM$ zZVWTxeie=|(R5&Yx&tbKyYCAdkvdX`~Jtg||lN`^j$2mpK7Jo=A9!d%ZWt6jBe1rQB>naE)&DnaS zsM^l2YlgkaUA!58uCK39IPU46&H2u1>?GS$X-Ly1Y?a|I)~0WEY~A zmf(@7!faLK!2|uRb}UfIh&+DufaV$B!l2;F3WKsFfUl^#Fx2fBUIv3c@uQAE^~x)J z>oh6lqjqbn{1j7ECOiKIE2khAblR|_bQj&uvzM_on1<3L&x7Cp>A_&>>?F1~VpSMl zf|V<^;19KXk^SwsWh0{?9=_Db){3IQ>M{6Rgb8V?rp{GGQdIlGK{bl~39u@tYv?^a zvogP9zRWIW19-8~%y(cK{1QB+ss28coWO5WL+$OnhV04QA6vrb0?RYErgP`}>(Ncr z7Z#$F!JZV)Uc)WhE~=^>eW8cS#^;9})_u*rz~h(L`GC30QTrZ~G@a?M5B4oQZtzx_ z?Afb+#yieklYz^bW}dz3EeURGYp;d_GY{)$XC!Q8zt7T3@Znqhhtzs*7ebf7ejD%Q zJrh0C-W|DZ6v2!eH$mg>=@0~>*E$gU0sqGAk7p1#R^i*QT3>(UrIvxt0By7*d)PwM zrExX-@;HJm$g-@S@{(^z53l-ZpFPuD)YcfQK)cLLuBgH!ATv?*wj z`epLeoj3d49Lcow&mT0WoWGlfK!IKC_|NR{IaS4e#N2D*Gu;5!f2SX57;s+p^8ETd zM)*R}m^qDrQshhzUHmXwO(no@KeG+!u^%URFU^M6B>;|mr{$?LNSihRZFx3Bfz!Y) z|6z)-Fvz0lQhe8AYZ zdkl?ZR9(ZYP=s#t9gmc62QUZ5jgE$v6y;SH&1qAsQxYWA7mLW4;l~5J12gY;mc% z78^qkXT}e}4dPW4mu6NLWEk0w4yT=@#1*<*Xi&m3EB~o^R|@yjcAj@C~J#_ z$ojfvZ(7Vce{<3)0MK1%u2MWPwH^H%mh!#!9=3<<<8C}M%nKm8Ml7R9$M>}foI_0} zn$xp`n;h3aw57TnnKDmn_4eLP5fnB*!%Xzuv?uFvPCcZ~(yHGZ zdk4R@9e83;EcAvT0NC-DWL%eQ$oEMK$^Vy)`&y))4^lIB3d_nYZpsY;&D@C%7CD^V zy?-6DB;D#@H4&Qu)~}=HT$fHpOBr;Wnit@+)axicoOH-$YRvp#8dTex{olT5mHvhfp%%XkST=Gd)Z{3!o4a zUcp>KL~`y+6s5SBDu-rsvYgL!BuCsKB8||*2+a_%mCn{F9uIDo0}&aUW32pCA<-sM zS1UwqKq&SM3fgLIGxL=O?bAWk+wyUVS;EPuX2`C*PY0~MqC(;glu-z(__+x($M%}k zu2TawLxqI&x)o>n2MR+5wVm_i7>yM%rMYps`}4clWM4D(Ux^LRcIz2k?Gj9C1z%X_d>ndEv)s%1m9A)tOt z?JSH=%+Bqy?;e1Xh<^eY#!-ObCe-U=bU~1TO~@YV{`>dK_54CZiE#z4S798zOO%hF zC3>6+8kAPtMD2=f`mW#&9lZz6SuPmc=$_ftPq*kTda}K z+q#G_c!58TT1IiXYh>*4NB`}vD2fOCIZE5LwU_@dAl&glyEaUhA)E{a=eiZE2YBYn zagbY&O)@@Xs-@m0?nRx(l27v@7WLSHL@!35LTFfKH@7@;25^Jld^RK~yCb(p?Z`t=fsRZ=n=q|%QXGH)c@&OWkHVt!xgx0BC>EAGJ zQYA`W-)80&wdI1jyWM6BS8P4tVk~Z>+G*+0v5z^%Ti7=m9ef}**_}wOORa_i5rvk*aCSe@N}7(}nD?n1Brn*CKM<>x%!5DOBWqh%6J}*zfYF zc{w|om||*xLl=rDiORXBT~rB8B$rhZhj<=ym2sOqJ^`WZS=EIdC+*B5Ci~&~_l1VN zBO{OdO&5^|Uiq+zM*Uv6r|AQsC;j4rOCTpO##?q_O&Z*^K5X=HJv|Au0u1)MQpRfM z#0vX~zD~xacHK%w>8nzvA_fJ?i)0iB769K+T1aLD9|~CgR5J1MXlBja)_fJCG#-^N zDffMxK;uCJgGIvE0v?3v#(rB@>`M-r3D8Hf3T<&&R`6Fv8LXXXlo=K(jzPs=L}}9v zd_{?l`2=`h0##;P7h+`W73Qn5jdX-eRw{wIP^}`Y3;^nyUfa~$VMECoJJuIp4&7mo zQv@LPiBT6G!y}7jceW!l#rJO%tC%D`EG-BTDj~f_w%}S}dIleIG?cGy9(#dwXzL~8 z_4`_w^2ST9@N7!<TOV93`$_}!Dn4D1SQ1zm z*b1w((>pa^;5#T*1f&kx57CZ$H{0Au^DYeh_CK+=gWv48QffmMFVT%3(i3(&)UuFW z%Y8`wKRfjqMF#LHfu{{f~K)9TNVTL5NQm+nl7DEdC(Ar)`%7?#YPzzNI>{zoU6Fbi8#1DZy!sc`A@sb)9z_TNVqo`XU~<8+yrbT{V8k`bvM< z^>%w#+0J^jp&wXpHCAYEAN(MGrenb5RU55h<$zgeiW?Gr+@wJ(lS%ToOT3A_ei+8G zbMD$q)(lOetdVooOqRSH zy8Z7UEw6_C1WI1U~2+N#<=&u+!R%xsmL%E*bs#PHPea6IRz? zi$SK2GYGU3s^QPIu{Qz03vfN7)TaXeN_Pg+vZkbd;Oscfk2+8iPJM#R8^@_EG6wjn zG7WFlF2XM^3VKT~Pes+Fc>a|z#Yp5(5#$|D3Ud*fFOA>=;tfhex*d;`^28_#^lcQp zKKUiwxJ1Oq)nCbSE{Hb5Ix;apQHYsi9mZ?sX4W`%mz5FIGQVis^k!i+zwi%j*W$5| zyvazL*TfEwad^}NAZI!1NMJ-L5bD}E*&H&@I8|G9XkL)SH&@`j&VSXeTv0LWvBI4K z^E3is{w{ETrE()c=NYwN3}{|r$23{jy3!%bdKS4IN%B2K>IsE+Vf`K(R@<#dl^8Q^85H}w ze`SpL+w>V$qrA0zF{wH!@y2T=R!#E9x8+Lea zMB7N;s2!wVMYs26BPr#lyVxfZ|3@R2vE_cvT1YsLDzbM!oEXLXt}|7XsQP8DHRN4V z2>V@N38&~_h_&P<3RQ$9ygcIxzX-t=?NUqMekT%B&)NSwlIFK>ZRN3AXp|N))Z^o9 zkAE&ad9?UxRn?3AkmJ54{p|PW7}(=Z(k-rMQ(|wj9&_*PH|yf%m653#6H8BVna%C& zXCOj9QG-^`Z5^q}L1@8FeRGuBA~4pahanCG6a1Owi_|(5k0B9?k`Qw!QA{a^=hDfm z737|b&!I{M&~9sdefh2-A**5<9z_>h$9Rn0W&VN>#Ya|}Z-rkLVkg5wl5fJ)1}bQk}%53js-^q++W2nMBNtZ4XgA{ItTE7g1N`NbX8^ zgG&N`OHws@9bW&{PD}R{9={QS(5njT8PMDL{%Ei<&BECCrQETkY>TU_gJ1E(z@bau zD1oC_x1UWRU2o;nMdL~4!<|BFE!`=3ae*Ry+&aIwbYVHq)GFEvd6h1%uybaFck8-5 z@|jaQr;WSuRS~5VZUyHDq|t3zv`)VRI@_%1qFf12UH@EdwcNL#Ur}$zJ_55~b2gR9 z64FTq`|C4X_OOPT+oW6&Np3e?&|i)68;@t}gNxMbd|B|kDCWb)Tkr4An}?s@g6SRfEN5iBa~QjRu8QjWH>fni?2I@6aXF zJ#Oob4Rv8esk1m#&=N|{>2cWiz zk&33Pn3MZSTZW+=2=q2eh`->C^{(S*vyI0slF-HOC)RgikG6~)Jc!#jN|IMa2st<# zZ{PM95~*zlsIo{QmY9@4PPUM20)59+03;(7rsb zBTqGA3R7qgY#I#>D~Tme7c0jf@3}peI@WlScEuvLHFNi%xg#r|WjfTxGi@&g*d_|A zxdf;f$IHo7MYPn8TuZI0kcU`9BZxxzNLuVgA*bP{^JPq)%(W(dq6=Wl9I33VRqUM1 zbSNtThCd9w3Vs((5cwe8%Ekg^^+m=9O-vxSQG*R(hCB=7a>E zn{zY2nICfXtw|P&_zw)659|&ZadAZ;Dz3*=7nhyJ zn%07=KR2sOPMcoq3C|T&nKr*0M{v158-H3HTu4(X3(LW^)D!AWV%nBB78qT1woai7 zWe}s$vd+}2k|)bdx!^jUiv`j~)(P^Bt|hNCq)PVjhcKp}?O0k}`#txVS~wrH z{KAQSTEdP&S0IOnQ(^J_T8|?qFLSgbCwVE2#;3B=$X(j~$&ebojM~`S%#XX1N4SND zac^r6>z76wjdVh8U+JEz`{|>fm$}L1AMI~i2m4G$uxES!vO8q$wc=Y{0G8s7n3!gD_bf%Yp4QW6ik(uRDnFn$EU?}X`!OB4bz`@ zJabl4bX@np{e5b=Q$vr-oti9^AQT5Z~8D(0^I=03OgPDn<=w#9&w z^?N~Zp{Z-pHC*le2K?%tSzG0HW?S3i$B&mb)nntpR)a1V?Ku?plR66gcT<_MRyhdb zIy?W^pibE!P;I z3+r^jG@0Dud)b#A{_L`^{S$2iG;hOzhnqR30mE z&Axy{GlmTk3TBztb6q+wQCz*LxI>4L!*JnN{1XUgt37ZheDp!>HTF#SH_98Z1GUsO zAKV<;*&+40qJ)L1o8xU^xVn$=gQGO9z%ao1xs1t<$MBlNX+&A62$_-0I8KVv4HAk5 ziuiE>x5z`2ig)4dSmA=JBI0o8G%^V<39}lt%^@7diDhYsI)n~@z6|^uR34Nk$5*J# zwW4@S?ci#W2dj@#LSo}{*HpwWr2moq+d&|z&ydBoWBApO{VzuJSf*=)T@F2X(ZwyP` zEKeNYyu{H}pXgla7T*Ui<6TAIW#63UpBAPw<33ZCny&Wl6Y7Q0xKaM9RjVOD4L=Wk zHA$G|^{MW?J$_=FwidOo^avqB2)rShZ_VODf7dPmzhv|h^Xcr78aaxXM~-syu(#N5 z1w7?b16wYJD<b&*qVfeO zvpsz`A?bVNs*VmX;RnY|)@6p~_UoQWn7^?2;K7+FP^95#aWb!h>dwBC`&SAz*Az6r z*SQ*Z3Vd$(`^2`{MZ;$dpCVER5d5_~Q{`DxRPe*=BlI6&*UUfhpTY=Bb1j6?rcyVr zxZF;!m<#zeD(^dk*_^m)qiRJQ*QaBv9?KW=1cKR=c7H|xeUR{+2XGexUo^b^IV6O2 zfAGOm+i+0PXyE^*8LKgJu-< zsB$(y=gE2>KJ3|%ZWl{BF=yu-j(OMxFz`L|B9oMqzB4+%ZI3Cr?0Yjig^GdJzPH*1 z;m7Shbc%B&0uln+ZTGV+(`;t=?f!RN*RWJ1g!c<7GsDM7Sa<__^!VF9_SZ zE53ffalW$7DEKWFmned>yZC~n;5NTiL}+Egk)mDAbT)>=jJ+4ec* zy&@;PraxB>tY_3N>CuTjgcI|nrPuX2#>fuuIh)XM;^LuWVw!;sin6`* z`qS44<5*q1UfTVK129@}iQ^Unn|Ow0b5Fy0XOiQ%QGY(6jD#JYWwB5Hv-?b%-f2tH zZ`?5i$cmfz6^1SZGI?6=WDTo5BAou(mXLMsqVQb^XW~VGDX!^zVKcH)RRn|SpzZ|F z^eNE>Q3dgp$iFC;ojk%<%*f9Ruhk}n%&M#|cpa<0?yS-KH5ItrNWJU5J~O3F@1@7- zXX^>Mmu+K>SME>GaKS34c8Boy#-Jo=rDuYV+FR9H`j^H29OW}Md7DM-b(Z_+eVH?Z zwc#gb8tcYjDr#`lbbiD^H8n6}pf*3$H?}-gwAG1ErFGOmj(mY5Z~a|=`QSx#e>d{h z)X@q;TzzH(1$QKmm?-G@&<{5hB--Z3Ge3~CmNO}~+PDa!BN3KQ&F5L+iIFDxzJW@p zC&U=uix(YJ56a(LGVnx%$vIq4A49_b@dm zS`ahYd_Fh!3(*bDZuTb8`i^RxW3lxKwAlJU916iYvHK_dVrhxu4voKuSKNuTCP`$P zd)){zoFF9WWFxING6x-AW;iR|D_$(Xe}s5j->BzoCJfC`4BdL8HQK;)yX>)K!kPN# zug%q${I4XLpJ|nV}lyUeMI%;!?(D`u4X*OeZ_V_|UH`R8IKD z-D9fi)eE%0-C;|KDM>zLW4%tUF@bV6GhVOv(1QrBaxl2)C;Y$3;o{d!ZyaWn=F+lr zpe|}1UG`r4&~{qca_xKLbtI_uua9+2=6#Qn3OD``sl_SvF1BNwr7$C-$FI8hW<9Ly zzx8EUSB=E!kzU8P`N>PD=`eEj^=zFtNFM`@YahU#Og}hxCBWk&aaUC5Z}$TJ-Sy|E zvUd3{N3$7OKzzcXsQEZ^7%hdMo9@3ZwLc~st6|NITW?)BHF%0xo%coO#m3BHiJkw( zZ2_n5YOy5X7@z(8!P0Ce_(S1|4@K;<{Akt3WLjTW^9o`+$aw*$cv-AtI|2Wpiy9wM z<~UdKVbo)fgg;5+nc%Z@%$=1hI)oMd1Jd|JXy0V>m%XoZTv<0{bZOBp7cAZ09)5c! zZA^)ptY!GszskfHC`?{Mp5nuAkNAbkr1@vGZG$5tqmW%dzQR0s^){0uoUTa3pdhVN z!jHP0;}~K{_8@v^tBs(JZIBi%xBceUYV$PCPbJ8!(5$*L@+M0~um9D`EJCA|EK~4% zqO(vO-7QRJ2^{0wgKv*?vU@o}MKF&A5L8_#n}D6Dx1*b<+w7E~ml}@#<6qHu3QIhQ zEfrNSJPJI%u4xPX^|m%1GnA;a5xu0pq(4Nue=};o1S7|q)T*H$29q^8?0`7dXPpCbG@@@*l4`pHG->TBNodx`~y@Y~{Q49oY5{iLLb4n6nW} zU)n?h!_q=xr44pohiW_6%G{p7No=ARuu{7=KMZx{@b@)VI#(H)R5p@~DqdI^nTSzh z5`b~dNf|ZBF|dP&npG)x;xU3adx<&D4XYX!Boq3EoOLRjw(d3t=x1+}F4Ll73p!N< z0xs@xvUk>`?7*rEGZJAseMZ#6aQ#a0p{KZe-Tk^aptTa^d#m3I7!m_dQM&;sPQ+~2P-WLna{u#`P8oz)7gy7-@y95VfZ$1A@!yvj_jk_z6l2BFK%ZW zZb@DIAK>2q3iG@KGQw{ag|41Ilj%9<7y(G-LdD-Q0MrAy?t-M`D~Vj z`-R0Dh3N6Xt`l2#){wV~NnSxkHv?YUOaZ>ZknCYWCEnk9r&8NhF+e5yW3}+&1N8UP z6mz#0X?rbGTA7&_{r=XGSG$s@+ok<~C7#@Ua^#e6_qgvUlA_aPB6m(Q_{lC;){jJ1 zEoB&Hr~AWrCx%UGAZMvS$0=~^Q{9LCy7Nh1AF0L^ZwXJTvxo3n(sk>@rB^rq`*96vO zzMf_t^ZsH@w@ZeJ@7A~7$&t$tXSfdK!`KB*X=f}}f|J+x8&4$r1TeGU2w z5r%q1o?*Klorc+(?QKS3^#1a;-^i?a<)LtU6t@aVTM zjnej2;+g$6I#8c$n)D)3T9W7`{up&w>Z9cj7K_#7vQ%C?G z^Wo>ie^jqb#%0xLXE;}4Q+u229M{32zT+@MO_T4=#Vmj8YGtIyb7=*RdV*c9Wm>dh zFpmqaTCKQ-FSvvzkK1-TW)_rQ+@^2R0qvT5uEI0YlC-P@fa+f7)g~^xARc4VTc581 z>u|%Bl~7@}D?ABRo~a1WV8d}Dd&?~I+CuK)`8iZAgD}ah0DQyN*a}n)Y(p)@4*bwP za2}4z655w1A|wC;t740QL{xmxb6fvJm1F!Bbr*IthS>&O^(L60zu_XI`xn1Ko_7S{ zmDZn`$nc_b=-_vXnex=(j>Mdt0C53TXpbFcm6CNLKfZPJvVSh!Kskq>sl6^hDOL{0r?mHg(Wc!o`Xqd_`)tG9AetZv|fe*$YhIa@u2%~QF| zx>h3!@}QwfE(qyZKLXBp7Xm7wVd)4sHfxmDw2{4IPnxPQP;gg&J_WsbZWJj&U#pzO?Xzm3RYeod|B(gQ4h_-B>MjjNc; z_zS>iOkP;0q0N6OE_!uGrDVTVY8NNyzVrXv8N*R|I!dSGRMk+A;hZG?=F>0v6sMHg z6^B5fTzvgOY`CC}5)cV499^ki0$|N6H?JFbSO+CD_T&HZ>HnWox3>Yo-~0l;533Y{ z&Y+Q{QQu?E0CV97b!NOYF&I=ej{7|M03)~A0`9fa7)O|uTII0=GO)TN21X^DoI%Qn z%8ctV?PWFc&h~5JE$161Su|?S-ABQpZfAJBv3$F+ftORv!()k2NJb)bfd1){(mAo! zN=A9}c@=7VyJXupUu-DIRh1Dfkfre z%U>O6IexFGQY{^{8!PEk6xuw26@z-@P38Hvvh%q3YrFR$_vby;4lQbo67<6sHsn$mlkORiL zVKqguPn`T6REx=V6@SD}|M)eEdw+uHM=ACOFZ|#tPG_L=jLzYBM>V{EwU z67C=BZjk$N3cVBj9O|Ifn5}Z9dPYVZ?&7&Z%`f$!sRLIlS`l1=MOuu{B`B#q=&81I ztW+a{>(y=;i98Uo5Lz(}BWybHKwFE+9J8#L&wC`bcsFDDXkGo@uL!0wL{Dw{74Pi!+&Gh^JqtG}I7`3KcRhzRAnAl8v6fNTKxYX-*f8I*p4AC**#p%;DpD!m~CMzO;-?9x*QTpR>JzwaxgfFg&>2B$Ps@ zq}rH_HV%=G3ecDdu5Q4Vk)}=`{xM#+lv69AN@>4_YMkc`o2;^^Ifa-kauz?o4cA75 zvIj3_MNC7))(8gA^_o@T0gVB)K~_QCw4)VK8Uq>3_sz?Xo|e!R=4p(+?)e>n*mHT_!Q@<`SQ@A}S3&yEcaQ_0)XZbzd6x{2badhuw zIiwvZc{<(2n(*XE;RI$*wsbi&Ze3cB|HEPP1`6XCO*iwg~9YgU!8$LmE z#XCS<&FLbRUsN3-c-1*Ia=zk5)59P(T|NiM? z?(&nVqawz#8~7rUrdoD~z=L)CJe+5!4 zgcA{8fp7BEObTO}=l~T)$ozE3=6zjAw+l~p{9;~4Ube^}+WH!QG6xIK%lA@j#iDEX zZ>n)Z1(I1E)6jY*YbI{UF1zZ+skE)3Np_AZ8l^OwB2k)J+(NGK^o{*Ob#!h-aT4s8 zCAb%%srN-W6AqkphQd@OH7wiNpwXVt=S8yoCW8ffQZ~7FZwWd`sH0OwGltl| zN=v=&Vm4(mpIx)g$Drh7RKt0LUQQWy^+YcoDV4h=3>)>JB!-ueKHI&GF3kMHKGEG1 zQS$En`J4CJbX*VjUqSjj)QCq|8B=vHD?JpsSm9~k+S)*h@clb27|*1z`3eLT zR>p!CJ&*Hax(g3 z>D8EQO?q-q#$Gg_?6$Ye@kHQby<%W871ooDEte|Qw!05aQrzq2hILr^h@C~IIa)i( zp6t)b6hAhTbt2-PZC-5vR>co>EgT1GgJiZuo|{S~Oo&iKbtyw0ougsiawBRsJ;h8+ z_50J_{=Oy6-zTw^m}IxnP>_KS?6sg?@7;{+uGwhtK2Mlf-#3TvZZPS?Dh)_Jy3C(b z{}#bFRf#y-x@-OCNqze?@Cs=OsByrVs|@l?VznziX6{O6-GO}k8St9T_gb^QAx18= zUC5nyU8PdoP5T-jZ1D}}IZjx2a{DP-h9)aI3$NMae4@L$ZJPnmaS4~+yEH8Ta13EN z%Z=qRc~!|^nHRnyoKb$WB@*ytJxkW+P94Y_^m|P|Lt(vP?8;=$%pjy&Jq4ik29CR5 zJtwNk3s?HjiTmdoyAA_WfwjzXgu^#=))gP`Q2tuCRb!a!9IUpG(;IU)f~m-XwhDqa z1>Z2uihioHs$*mI*zZ)O@P?dT_uB#>sGzoHP>dFwz+CC`)zLX(<`JhCWfnZ!DNl@9 z6zvJn*}Lk$Qpb7Qp^3m!`9Hcsqvo4nY7Tmf`BWi38SRyjV^%hGeZLq5F(BEz*{cZd zE6=Ep_GX(ZMf#uWC$Hyh6F&g8l0nm7)rmqqgspXoIz{orxt*l%vkr*j+73TJ`antd ze1Eb^lyAh=75VWAJJ+mrd!GPi^I!#G=mZ6tOkTFE)a1pt?xoH@d+P#qm2dC1wXS%xOFf z8zG7bB-61{%6VJzW@$M-kQ#6Sf*_kJ-f3>b4Itgf%Aoj=J$tk5Te%ek8tTH=Il=%PSbm=pX3m=ZkBFOH^f~013Sj%+m|SG}r-!TMhf7oWY$h>5mTK4{sEh!C>ICz#-Ca083Ig?+dsnM&h%F3rnp@Y+3OG zGgpo(w{Mq*wnm@3J*<-`gWhp1b6A>+qLlmFJh=z@CjjxQD>KcY@(CAYm)=NN^8Tqi zRoTn-@4P+^u8e~N<7$mXc>RkX=Ak8-^}(}Oz=hiTSIu95!^;`59p&scRtICDS>54v zMU@E6FyNJQ17MEm+R~t6YH?`Up7h(M77F_?sl$OBYEEGO;SdqL51O5W6DVZjP~n`2 z!N~`bYC{H}^Fr`rRx${-ZWN{n$|#^)3WIh6Q^2_p1z#$VoT<0o78D=|tD81ot)E)e z!Iyc=Fil)!Kz#P}X%8=r#~G_Mpunkw2~gOx8dqX0)sWCH^oBdH)5_H+oZW%Sh16xWEkpTjD|9g&!y^YzvN6w zBj~p6<8hcLocA`$(-rd%)*Bx(O43X5cm%$Dtx~mkb{P!o{{ex;SlI9Oen2rw?<(uT z`{FFCo*OaQK-apo*#piF_3tSK!K?+m-U%kDOdBfMa&tFw3WDE9x`){n`uaB?XLdF~ zU~k==}53wTzF_gqz(6d#+D3lb>i_R_S7GJM#TQ`T%uR?eSmu(SU;cHUra=-om3t$AV`X)Rj|G-l3 z)rkaIpnn)oxNVd3DXk3Q@LPMMFhzOZ!PRtuGxL(9uB3OX;&;V>M!aKNXa58PnH00- zdhkb#TWoflEgjCbNWe8uXe8Di@dC(^fK`{)MC>RT02pNdCSfpL^?2Tq9-SxHN^e&> zdKB|Ebl2Iuabx$bOwup8(2B}kACE|3Zl{#=`YyK&cGq+%5CtiBliL5oiou;JtIPPW zGo_|DWR7ps!UfnbG>)?Xmy8Kvh=7*Z41_;*ps^q!eX62gnHZ<2tm(?m4@{+N#^)p8 zhi|}gUn*L6p~i@qeGnY(dw>jHEa+f7u!Bby!0WnTSf?tS+&A0a-dk%e!KlaEVAc7- zQj}a6Aj93AHKz? z{7S=_TvcrYe`ucjfC>=&NmGQcZPUzWG?KwDno8_{m#yV25Om5J90w8v$=v^9DQ{`s zG5p<-+o|66gA0n~^C!1~x4Q?)wy~DKGy*3irM3Q9rpTU=D=vu4~y>~S1Yjx!Q8W_JI6LMszfht&-5{OSfLFym>4ygsB3BC9T`K zIZ}+P2>ZF;e{AGsya9{vX~{}o94(y5=mkw&g0&$=7DiS_=wVqzUIcH79)H{L;PXlG z0cUnzZhkWWzk{M+gbN)A&asP#y!4BHDoIo@FDtL~InOQQazVMq+4${Y=mAWqYZ5To z5{Z@Os1%A10#<{0k_~`V$P%iYnZ{GDuzRnnX6?y)!5`*tj4pv7czKqgInHwzySSSD zAAYQi3#!v71+czFDjI*XqW#^;-89yUhO@QKK&fv4t}qV803Y6Vf~TM91ArOXRz7NR zK!2WRU}x94L}VEzUJid?V-5S??7ew7TU-A(+`CPbRBK8I)e=KUS|x@G)oLOMF^g_~1X8@K>YiQ5Wu5mPINpWo{b1;Tzu_fuGujKt;#`>@RQE@Dt zUZRO5SWP0jnfC=wVKYB!-^}i|qUVh8z%W^U5OSws{Y+zKo)v8d)3jEhIFr94?6MfR@RQQN+mFkuK!*XLv6y zWn*He)V9b(!`GdjfydiP1K29)_c**mVU$}?1U+cRdtU_H;q?sNF9PmaV(WzogSt39 zBHN1YmKN|rIeV|y#K^JcyZnKyTwTu>IHN*TRs>Gpf_!b-x-b@(TeHx3diiBBzSze+iNZ{G@d6i%Qeo|^z9c=YUzA*lOO+7RexcE@JiKynej$WZk=t^PD7ym9Owgi z)4;(IxkOWvIV*c%elGw%dDtV(E`sBhkQ+HI$}5(7N{D3y=9uspjmwHa)}ST~BZCAz zrW4`E^i)i(O!sEake27nvuO;$1-GA{CgrjdwKX@j?<>Bh1e_JmzK6A#dq}j zVm3m47mJBB=ob+zDlje*yh{a_9W~Q4Xx8p}AoM*qg4fB^(`!D?Afrw8Abqa^XVbbS z2qn4#UqSOSkaL}oz8VIdEEU=(1F7rB%1qW*z5b`H9(DwPdbyy^1oduCZbBhdEEuI< zdPHe!*%$O#RO-QreEDMwQ!suPml#E}ugB9~ze5ltE(8+#OdGB@kR=wc~@@Q7FvXRgn3^ukR#SF=`ML-2#~U zw*ZGDcg?@3pSk_Bq}8!eB6CX8=tyHQzmVKQ(C7o+D=zdbzr4)(8q)|UDv*K9(ji$G z@!xW)NU4{w0Nbp2Skc}w8|G;gU6egLV8spfdT&klG#c~TX+w?JPmZA41{>vK(j54$ zcDbxENXmttcWpIq_u^RgznzDwazs>zH#xIGy)SYFUA?)dnf-A&LE1zagb1~kS-%w) zR?M+T%T5;(j!dc^J2%<=$f%B&{-<8on|IZCSGYIst#r$GThDW$h^~h{6R; z=gYW|wtm2sjL|*Z^ZRg*CmsyCn!Qx5vt>W%bMZXC`+SY~ae~`xYJX3)u3tYsxWbNk z>0tCdIpB1>OIEe+y^3;q(&)dhliB;%IS??4JcgmwuQN_<_LHqgp|bq(ZAM2dsUKQM z7G4c3Za%{ij&S#fGc>QFl##_YfN$dviOfNl)xg?ijq-8dG*fh!N3Lv1QtL!S!He0z zzJi8;Z)^S5K)rRBpX8ZJK*M%eHWFECpB)hL+62QujR^7=&lws}E#fj)< zb6MmyDI+6)f?ca38>Cies?XzMVq45(%*V#=hOz~_E~$rQre~((rzrPzi&X(t^ZnQ} z`Ur&Vr8#XRo{11)pe|PX&q$s7k={Q#hT~35X0*9~bqGgiO*e^TUd-{_XghE8a8VO` zpYgASBOi+N08}ig9{Iivke4{%Ws+~_@d?=9aBQD)}a`G^32tJJ(g_ znQ%X}c97as7T$?(MtWV3*wo8vpyx(=l9AQA^1!Zoz^^;xM!jqIFTlM@@d97+@z|{w zrNBqs?Nd|Wa4aO2gJT9Qm?wQ@L>U=}D2PmhA6dTK$gu_AaFlX-mR6vkyRJZ#Hp5C6 z9~Pz6TGM?Gg?gFGeuo0_4sqwnrb>>nRW$+5X73P{7R(D`S;g?gLo@pYk*8$^fRHSX zVN~7E#n>0h7$3H!*CX;=FlO3^DRfo$lMe=O6+}Y%ArBtP!kqPYp=EK$O;z`V_c_Tj z#JiK!&mEuMKxwBszB_gHLx9x3GDo=c8M0a1;rdP^M8xH!lXDk+UHKn4UGbkF)SqNc z`{zXWb0kF{kupZ zaJ1UGG3!yXYa42IqOKVj&Co{d0fCOki7+&PsFZav3s|^tN_lJviJN zB`U?sr0!esyu*s}5f@M)1BZq?!12`e9Uia11=9R^#(3&tNX6-gtyNWvZx$LXz!8-P zwN6_tmlInYx`V|OKlZ z+<I3s0U!h&RarL3uM&)21F)b!t`*M7L1-<~j>;lbIXN{*kuca!KCt)gVNH+Brr8C-o z6kIkxm|5%JIlhK+hQ(-%FTUc;{gG-A3bYnG%B^M0iGTo)Dj{y~%|vy#z%qVhe+lgN ztcl?(>q{m_1e~Me{k)hoKEI|n_oVMf<^KDVY~2W0@-y@y9%p~2{xbqyOKfaL`p#xJ z%#Gc=8N4r6mV5jLH#B3Sync?0`lxT&8G}0tO0Rtu%^v*@F$k@-o@(GL`AHx2*n&HZGl(D_7@_2=#f*Jgt(iY|(mQx`%WwKn!L zh%fIq|MkO_0)B2t)khrJk@9LSJuZ{YKy=JDb^4E0kAuuU6a9bU)(P@Wa+Yf?L{vZB zMtu3&(C^u9D~Y*w9{hw-3vvF-Z5sOh7-xF3cw!XTI_PcAsnPQ`U7()NGtoHBd8RXr z6cgXME=-3TvzKEb2+N1-+_MOdb@mg&YD_Ag7JdSgF4NZ9Y1~8skZ6P zO3#lwk5V4aib)+-4M4Rd1&WNqbQR*#K8tpx9nvdPYoeU6o`dn1kA%xeO> zXW!(01!b?3?L2tGmuZkj%F<(A^r|rY71@BmAxL`N!eb`Ux4rcWO5*lr^T*zKd}p-+ zg(cPX%Vx2a2y)2--Z?@c&x-Jp`(j?XdGU{2aNY%qH1$Jyq`6=98^J+vU3(7K0+2hv zjr^Vj?w03@hLA60+{FrCXDFbdK&l%{4wk)h>sYtD{2=Gkir9G*6vI&OxV+NvnUVjz z$9efx8R;KzlQT3$*LqW^Fqrxo4XmUe-wa=tVCQMqyboAf8OkKgt+ii6Czc~FQFi&P z-1hFAgbd3)Km}E))M`29eN8I3iZ<-sO$-I|TU|j#yGEslM#>dM3uClJ`VXu zP}Yer_NDiG)jDmC_}1tp!+90(f@m2+`PtuLoSPE#TPYB^{nD)D+lSh*w&ON7jSjuf z;rKeewe{V-^Qg^@PiG`=y}n8BvpZweHg1bfpF8iGS$4SgQfAr2&?%Q_{=n6OjBsd*rg!gK%4)=iix+nMgsRNi}>WR1fa5HZQoZ>JhtIR_h8uBLd52J5-2*S-w+4TkiYjC?uLd92v|J$m9FMRsAV z%*yjsD~7ZdEA!9&TFcD19!x65uuTKGGTKgFSSbf9ou(BOhDXu(&xTEm;{13h5<{d$ z_p7R#!4i1I+m~xFO5(d21gQ!-ZaW>+tFDUVY;p5#j@y}rfv6N%bd1u=S852z2U^l= zaXclzVVi|%tXBZJv4>{clV6CTrGaZEcAlE7tXO2uU+v{5cu^Sf{m037iY*Q$D~Tn; z(!T>FT{oED$_Nn;iw_0m%DMbXJx_u1p{qYKy+4 zx)mV+{9=Tfv*P$UL>>M_1krgeMGL#Y<}T%4Ff;>@XdqGMS72|AO@e$6j5M2lSa z`vh(Q4wa05G}svwQ~7uiZ|-f)esZuDSl3`-D3f_?mxqv|d9X5N7eV>KUFuP-@39(c zBigEGPksTm{L|}Ru7`}6CtUejBfd2PR0F{grM+MN)w_@Fanpf@}zC#@5uomZtvkg;)X3e533wAgJB}J98nK6 zQ|9;PlW180!~9xieDFn*GQYlO%i#{faw|Es-4@bVaiX|^Fby-C}j{a8QP@_m>VFt4_Tc90)dk$M|Q4tfK|&W zQAw#oS_*@*2ZQyKULOoVl&eMGD`>X)-bt{i9?$=D?7i$F@#@!(8+*j>>%c(R<1l9L z;Kb==ExgDM2W0alfGsC&sm0ohZvfJG5S-UYWb2=O1lSv4hX*IwJU+54H`HrqSmCf{ zkb1k7FWtSG#Pa_MTp>{{@*Jz`bpY0vq`&I+xfb+g$q!asw+sA|DCs?WIg?<`~= zM@nM@muF7pfI8DjKkJTz8&&+ZKGOu}$tsOAD^?VeZW8uAMN?HfZ28jhWQK~y>G8Fg zi(TMGz36TneGB-ImY1Vw+5z^d?g$Hc@O=1uH)<#Br(Y=Tej)3`SFPMUZJFao(T8LE ze)hlZJ969MG(raZAd_9G{nfV4I_kJV-SfKAa%s*7cgQPfD>FqknnOhSSGcu#&O>3u zw`k-~p2>|1Qm`0nK}v)4N^_+#Jf?0)4d|cYh1B4DsTYsCbA!6}`jz9G&@E z@@U{sMI4N0Xhz4ZWY%AKVZ^aW2OK2j0niy2WwCiV@50=2BwquZnl+0j0OF*He$9__ z#7Ui2vQfwE1mq^9iPVzv_(r(0;xp%XzP^xcK=D(#P}`a#>6r*<16WzIfFyaGeuJ zsrHjcnzv|q>}c0u6seaJ%7P8ZW8BlY!Z7>I1nW|(T2)P)_4O$ChOLL(tPJZ;^eP)= z5^;mY>TD}dXH$I?)c|&V-dkJ8wf-xdiqAn zh89}%Bnwwnj``WMCUfsp&yg?hNYwZ^x2?jn{|}EH*U1&CyVO=?W%Ca|y7p`U?mwCH z(WVtJb=JN0d~cF3-^^Yf&#&Fwsb^ddDGrvg5xmn>|2%&O(#PB~^kbCJCI-#HBx(XY zb518xM!zaDH&sc?0JuTJLcAy-SE5yn@z;Y*|2oJ0nd_f)|2D3=CuZlZooLOP!a=BJ_FZZbF(=_|LBFq4$(Fj`ulm{(J6h|6a%jnaO)Qv;e~EiF>qV zZ($Q`8&QF`T$};-)=6WB%6{**v-x1*touz#pr%{5!YpQgRybG`H$p{u|p$ zGwT#03iJyf>EfiWyRp!%a*TCI4WP&Q+0z7PeNo~M-$rikGPNM1?%s`aV|Lkopw z3p|b8I7$#3V?1!UP&mjzM^LM1Wn;o2l4^Q{3LZ;JEJk)A$9mJiw5EU}*fYN*E@EwG znrF~sv;MnvX{-#aP4;`pzh;o`8N@es&cLx@{NiHPXqRb5iC?2+lBtP4rl%)zw_er= zORA@*4)3&&IcD84ae6W;M6&Sr1DOke8=Ix;%vV1p7xswZ&6p0s=eX&>=UNeEtu(9(YXHD>b_-KO$R#PwZR z?XW7rqum5VzbF2L>A|iSe(Z<1&SEV;{Jej+4!gZbckf_T2g-c><R^bhT}x`Q9FP88b^Y)@!xzxDJ?RUf?h?9k^8l-~lub>_QOIbHU`essRkLv(=m z>28nrD{jczY_c^|+g7xBwSmygtmBDx9c#4W@=m#hMkzxYgpytSiO4Qe0`UZ68&jO?)wq#*G5xNa-D4? z$$Fd+y!Rpxu#~a$kPHo)t|@H5o@30$W4Xb3CYVsFHrdkDAIJ*ivYWdUf@h`*EaZ4( zW}lh`7|}gVlm3|4shp1F2gq_O;j`(!?BR%l>3L2+wC0`csIHqZ?|Ms=)K465Da-xawD_8 zwi#UL=mrNZ*Y&N}EWec=)xQF9H#qa>FWH>SyaLWC`~BYIKc>*G@X^?u`9QI^lyGMo zHIw%~JU#vAver}*1i>O zGL-pvTsM?m>x{o%)SY}>iRglygvCE}Prnot-NpfbI0Xtn0{g~_8S`!4_hPrh3+p|9 z^+sQj7QWe&pSm=lv?qoX_~X6RByqr4DCzWlcF#7XKB6ED@QBUZ0y41Iv!!8!%$HLq z#)Dctjf`Vz!sO?O;kxe$TeQwM{vmRjs+Z zlF~Dt6wuwC>0x1Ik*sGgE@Sr?(c^}b-e3x2@kZm#XISYBO!YCz?`MbM97fgZUXiC= zimoE>(9&0MK4}yHXPI?b9V98T%*?Fky*Q>qYlqG(rCZN+zoN9`VVw&owHz9wgn)~W zWTg(k+S%Z$bhVYk$B!l;>NkRwYOD5l7O(|9P*|p?rngYg_(~DBdgOTOcg5D9@yn^) z1g6fK>vNE!ICr426TYzTScTfiy}fD+Zz=I@mw!x6Qv16)Ub0j7EOG2Ss;QZK?22v*jvNpsM1 z5FXAwYtluEpc!~BzucZ1an@&C zeI~&jRQ&D$<%B>m^B;8TlEIIZ>XgGnYE*@fz~qANnQC3{-jiGXuIX9zE+InuUTpwc z4cxq^$H&-?A+t=rR%H$;3UV;1RTfVGo*JB^zMgLZWlc?IA(XMm7Mqw>u}wq82Gz+~ zgSlZ@bOw`$$$gnw@@gqdz&8%mo4Tv1&MW*5duQ#5Q`#mhQr0vv=^gjSk_Z`|sEgi{=wv={f{x8QKr&>s{UHbaXYg zg~4`_4U1{!GzL$dq@jhg*c4DqdyID%FFGP)NK{P7E?O4t?`5}#I6tlc^w^H2*KIn+ z7eBa)O?2|YnPVA|k||Fw7Y4tKbV)Zo%#B7@K_1rgt6J!y!&tK=`=;bY+#|IC4zWSmK1%%Mqx1N4&6En| zlkSO)nDWmBZtfh~6D6i*xqq$3Krf*$J@~9pI54|=;f zw-HB$2ePGcUX>QXHT1Fi?VqQLjAEczAF9^4nRb8F71T4O!yVFMv+XWGs*G7v(--4GlM?=}3)V1jl zQN`h&kfkw2{XCXlUQ;L;zdwMeGl7RCYC%2oa%xV2H4YKp=AKUK^G7 z%TTc=d8#U97K~{2&;I6f>%|pt~%16Ak&{7Bekn((%?{11q342fQ zfnlcQ^f)N+=~ZuAQENGLRe;H~)>+G+7RB&p-&&+DLXH6b;?ZZX&^;*~XqWXF@JBjB zeP2L4C1~(wgR4=_R#m&55=#5@rSa6!pJnz**JPKpgp+st%Z7t+%*pn&v=gdRl55Lf z??W;FF7jE!oQyMc6^&;rgN5sx?wV}{r$RCknVwaB=jx`afVSfGmVL)KI%{A3V)p@A zd2*_8bKr{i=Jt46zVvn;oFg%cn{zNh_Ugua@7)Fup9%0b^$2zeHy^82N#kZ^dBbl- zC})btZ`0^u3xdh^N3uP6?z%Sh^Uv~1f~8QFo)kVWDwzeG@G^%FcdIHbKfC?{?nJF6 zHEWkhpRgVXY|rery61GRUrkU)Tc6o|=FY6e;fqi6^jFlHo?n81M-R;)4#4-N#BLLS zT%p}cObPNF!sXw>VZW1I@q`P>t|;L`)>443UPO=H{2i97;nL`vX?_`88Fc5qM97rLGF# zcJ5SJmdJVDCIZ=3}lf>78X|5h*PJj7B)3`xcoGD zfD>Jjm%aE&-K?!e3Mv~JSnh8D!+=m-l+*sNtS?VNglu%`L4!r@_&X|l&c>b3-G zu-8v(V1asB)zy?-U+2a0vVKl%$55w9kFX@4D|jHlCQV^b#&m+pwb+G7QnyC&?t~Fl z^_9y|U#RtcIKXc|5@D;-y{%)K(4c>3P3&6a>PER+3^~HpK^6ydBeOEbfLo}X8&GCl&qNedM4Ob>V=+WP1j&pVA}syB#kA+xmh4*3?{Mw>tL z`IpdIMEMfFAG0@&ia~O`Rg*H{R&P*g*l;b|=4^G`~Jukb->_dkjxG_BA%^TR%^Z6~{vQWBex1=2DKQsF@FoxG^x z)?{AN-^c##DrU98^>naM<0XD~NNqU>7_Q*baGH#`J_|h|J2{V$TmoFrkI~Z!j?jmI2G^@-h#PMd|{3Y;RWu z)LLanoS5bCkS#>K@YOsH5BL79u=% zY#s+Q$4dVe16!8QJ%3i((KYM5V&$obNmc{btR56Bwm^u=q#N-^kDOY&fX}Pr`1-9v zL9saRug_MUU}LH47DdN%ZkMVK<(}VWb4o-UtE*xZqRyPi=UiSkA8%Rnzb%@)@ZKzK zXI{PTab$sE)oLvJ_>UOTaMKA`95YGXPpv{{1o1NqXlnuXjeZLHoD_uq;ujjx8RQG4 zAbihWtKU9tm*kAVv2w5SJI9JYX`)UmRo3D>^GR8uM@bmv0huu>)5u8H+-aeQZOQSd z_Q+@WGW=-b9G+nsHZ2%|kldq+ae!o280+j<`8MgMW#2E2i(?&&>zjwt;w}`1G%$ zg}CMVF=-!ud{;pHexoHz?20O&KLTjQva1ek6o|KfLWi zR%^pYMS5*^DUw=2mlyJyr=&lPC+JVJDuSk>hxV{I%`v`YdT2zN3U=t?g+16H6j6)| z6wU<{>IN}^z2e*U`JUs2 z)*0>m$KI&+8s)n^7Il)eIx%cv5R6gMZJ8Ih6Fa z(yzI7_=Fr-b-@3aMEA->ws zaDbJE4~8t&R`?7RmESfY7txnm+>){rX(RxI4Nxt4{1M(M|wn*s|~ zPu+8)KA0T3d?HoKqfR}d8N3Ybz8t8iJ!|EnwYf+<71kr4Ke3TuH}!VvQrs~Sy8i;} z?yH2pV|DsyO4ts7z7R@j-M$Y^{OBgC8Op0M+V{pk8yta@!$*$o8A10B-r&t3ACHW2 zY=v5svA{Re1Wv|rJX_wIlufnd81tXd& zzb%oe>W`v?o!df3f^~PeVE1ViYoMzI#@g(#jRm)P>2fyneR0ZM@ zChsS!O_-ve{>@D`I%?#rLxgt!{xLiX)7+r55w$^Q1L|MeFs%(JSgYYE z``m`H4Id6lHq08j{kObf19Zl}U;iy{-Z1^2_8TOIkA7ionB6e@pZ5PPf7meg|G55# z4eA;qOxC0ni z>c4wk3M2-wy0LRc*?gxG^?*K9kyNK-V-C6g$nm!g5lYqrPEJV!KMpj`?;q&bIqU)T z(R0x5f9JFC|JAiGbm#@bY0w>9er&|j>VSj5^uUe>MCCQ0u+j<^-6@B&P?>Hb9A0Bpr&c=W0 z&(p)iZjXTDVoSU^_`;yb@Rt$Y;Z;2KUI$56I6u}sLMBhygUr|^x*-|JW#D`;#kGiR zsrTz_72q)WqF>R|W+Yei?Dh+JN6|}3Z;EZDqb$67Crl-0af_>aQH^_tqF{%-qpGmu z)f~%jP$5-YLo1GA7B5zWfU{un%zh|-smO1c4QzZMsK0vs*xJ+|J~fIWUPO;A1kc*Z zkQpqh9`D6LP@Y{&jdQ<0K8yr^%sGP!exo0QXYK-OtaYrX_F+A(ET)_>V9`#vHOjyH zQir1MLpLCE);UuV?v*AdVwlO+ zKUx1ofMy7FQ=NcCKQmjbhX#WWRH@9BJ6UnC8KcmeN+j?LCiSnFpIzN!|~(n@|ImEl-L)8fGk9U6dtg_roYQf#BQS%b~t!6bFwA$w8D*zB->u&D=-`qX^*1sk3^ zpWER1`mxMF1^8BD)hIW$Ei$cgXDrkrjUF@yH@Onxh|sOOIbvOtN#)Hf297 zhcES1Mbv)RV=-IL)Q~b@IUgq-y#rWw^kVy32ZHO`QPLz#>K%Jg`DluD3kEhPP$v`B zC0rj}3qQ9WPk?b1l6P?^y=$uKgl(aR2C%eYjUgjqJkX5JktL>gd%(Wcu; zwrzA@vT&Y2!h0jYtU~mdkEUq&*KFxjv=wv<9ZQ>MTcLYhe)^gMwU7!bu7OLz7J!-- z2rA0JsgE0FWq(8DsE+YXpj(VG)^|TRGvej(m496Tw&+_u4D7X57XPrmxTUa^KHT{5 z)yyC3`hyAaDFr3qj)a=8LzgN}bh9aTx;EDnJ76~>oC*t{yY5e&M{R0S-FyG>xsdUv z{zZGg)4WU>e13k1V%Glm+$qadHn8lH3jW=4=Wp=?5Zsy! zvYpop=Cmg-UIwQ_6h6MxMf)jw`i@og(bagGc6_&vUyp$m<=&B_L>;hwXXHRIm$!$I z_^X2?b5b})ej&S}vGy@}U!3>qq}MaNpYN2@gmj!NnQTe>b+SzIy%xu!xLL3aT#8^lLx;3YON|gP;4X3lzA1zs0fW z--moK$;vugTpfT|NoYuC`E-cvsRYug3f!B#X04@v#bDcBk%^X5LZhlN-Zpn#CslQ# zH48Xi6&kieV7&Pn<4(T}kLU4gH)og4Z_a10+1R-qB2-Bj9lr%HPkDs;4lu_^zU~mb zJf%jt=Q5L(32AL|$&q4odV0Bq zk}|ik2@E|oB?5V~!A-Vp+w%2Zql{5+y^h(wQB_;PtSmoqSCFlL`+O)FVYKVK;k|9) z6}PwDL+BD77T_-%E^1lMJ?!+KJ+h{)x`TJ>r9u9XvnXSVaEE>ZuHotW#}6~5qXe~w z%ZWSD(Qmd|wf|shLBLW+np$8Iw&B%fT|2~Xug{FF)gHBv;{o3X)tkNJ-1`vx!9x!u zreb`R42Ki>X&H4rzB%NyGx9MPkEHY#Ez^jUgZ2FcQAE`>;^Q`atrxg0X5|FNM;>@# ze}9J7Vg`a5xtu&0hJJJqZ1eIN|~-{ zp|c0YlnKfmh%7Wamdv~VZZdFy|Hov@Ggwc^JJ`Uy>AdAr31>5JZS1$x``Y*2AD~Cj z>~25e?Z+Ia) zi+w8ZkM*Q}DIs-aJXmF9s^sHfk)05A8$;C%>Jgf2z6@xSX3QuVVeBGn6*7Ei*G@Rj z1Grrsal9-_z|1BDZ_d~om0f8Zf43!SnLnU5X@WF&;;3?YQGgP{;icY->`BO5FK%zr zR8B5y$UAA8$N$K2M1CNJM^F}mdJs(UfH#d0S{PgPlXnR&7GE5jMt)IH6P$N$JIPC% z^_4MF(;(_@aqIXY>KFYnDtc&kEn#o6R;y2>D@W2~kh>&h)#0xX1>}o|cWWcBVLqPC zQFKYum3y$Qqb*KQBICgjKkn=L!AFBpCgvtxO&YrZ?I*7WMb$9z!Gb4RdNzyp|D1Zy ze&{Z!wb;~)S3dgFJmmaqhi(poQ-%|pa%cokL;-fzj~{{Zi#OJ5jxNyI7^9jV-G7Va#Ab&+cH9@eV}5BLZ99 z^_PCf(Dd}ABEHkd+u(?2xtHu@3m9oPFko z{V3aFUM-Y|e6}PO+B1LdBz?5=rZdtcz`o*{n=nBBQiPj_Oo z^RtpBg#6x&*ICoe?_adhxZHOC_AFsIj%PbAG-noDdbBy1L#AAwr~MtV98cqnHv8)8 zS{T1l4u<<^IQD=&)InEN4B;^Vv%mrmwi9@+k+h4;Ml9xvyiE`_=FDhUR;;T znY|Pueq2_&*C0~>O6}0S7eK)saJ7kdLQ(QhDmXNhS`V)ND04+YY1NhSQAnmC2@2z_ zN?fx6-`)q1tK9eMl)S4V>GH>J0gF)7D8CxRPX2`U4xg<+t2gNey){4-N+~v})#r zZ>urdoEtRWx+n3ALyTJxo@w?hnODyInEDsS8=5!ftx8r(SGtl|FAx_7N#hfBwEWM_ zl$`RU!9Na)!^@Ki2lnnUcilSeB>aX<3~3x4yT9DG!`Hdf|9gdsc*fLLAPgisXudw2K7}{8TP^n4YDKV{j&^Ifc^2m79>+;RLARjuV*Fy;J&#X z9IInmxtGu5R1-q(WL}P5bpE8eGyWquzEwX2TrjhUKU}d8vl0q)pqPuHUwsfr)?(^Y zd9Zj&q<6hl1_X^)dq;V(K9E~%T9&jTXXr9MCp+ow-~=C!o8&SMWd}}{(jd+FdC{Z0 ztJy1G9w*(>PP*ANes|?p@Xp54mj`0N@2S<7)TS;rE~NY^0~fw-HwknG!7X#QB&L5a zS@t2F6?2x0PvFqq4%1%dVja zLU)E^LOr!dP~(0<=-xPER7pv09fFgR7c4vQ_@{!migWdT59hoT3C*sOQ|}5E5xEm!PtRW&9qlMph-^s0t1% z24ucP_S__nDZRi&wti&DJ#vZ`g_TTrV(~d)m)8SqM9LX@IFGP2y&j%spl(>kFjI`( z^4dR8Si)cxTffz|&fv`B=t3aeG$2nIDK0kSP1eHF87#jNyhDUab}^gx`UC%C(5D)2 z6l)Q(Aq>vD*P6Vzm<{P^_gCua;)L4y<%1ZsTQ$biIHjB?ViY~OX{`z@SCxr}7@eq$ zlM5zT6_uP`OUPL$U%o}Vw3V!Ee92WS`M?mrlu26?Kxqe8)gworUITVK7s0&o;$5Kh z>3U+}H;$pAzS?y=3O=qdm}LPB&)RxDpMO$2Ss@Vn!L(X8(l_!DGOXOqlo~bVb{nTr z9@~F0=@vS8cXX+Xv1!yeXS`8g>R=tomUP zex_!`Q=NAG?1Kt(*Gsro!gNnxJf#J24;DpnWqDW|hF%_kQJ%bL>g|@tf$I^EW6Dgu z9p>Ps-adF4+$L5b^QMOfE^FmB&R)xBy$E`HKo~3Ix6tZ`&Z$f5bPrgrJSeKp*zrb4 zd~}|yd!I+;6wo_a2bA49%}_7f6+06!8iDJj`*$BXN;^j}d2Y7l+3`(_wS9m5a-jjB zhs-$z#F8ts@_!xqOvc%A8yq1rqLI;LwQ`q{a=MXeSYB2aUYp?G72cZjm3`R)u<->l zvP&5|7+C7tO3%9-Wg|T$CAc-KOU0HI`Z^2EGZOkMXJZZ(kc4Or)*j3rw+LH14EY6K zSu2>QDFw2{kF&jrpQ5~hyb_uWDf8KgHY;S7*cJ)lEiz05+W}P-jtjQPH5rGvph?VO zFJ|XnQjWLTthm%--Y5<8lrbAa=0T4pm5r+ouxge}yH}^>sr}#yB9Ns5DB-4!jO0fJ zYZEO_vvNkDPVG`j}ueoafJUYIhZ!adT$$)NN$%Qnfm1;N65QeCHma0ho}~pHofF zE|^CiET;VVko+7eW)K?0Rf|ZEjfLNtVYMn6&LX-)uEj>2msELQ@n({aG`GxgzjdFf zJ2k(?*JYbsA6dmt3r@KB$CmkE19Z0;W!rk{YOjjby`e$e0IH7pIQ;Ff2B&s`QEXXq z85P@mW6N5+;-Q1uSboir-5fVh9Mrk>;44TX1c0jxOdk&Do6pOr)F)gGKh;w??#exN zh{ea;e1ZE>a<~59h%&}?^}6u7{e-)ed%vz*GXg;}m-jUp|Hi&57^q%o*Y!EN?&C*p zUK+{q(ScB|RzBKGv9gls6K^QNYag`P)%w6w@Bj9Etm zZJe#&mBo5l824pj2ORmhS|}`bCxsu%Cfj`A1ogQ6v}|M*O7({mgYcMHzIl49Z&-}| z{Ej7Qumu)_EjoobjRP=Hmcx?~9uOMJ)11WTzUE|I==UvAo_%ya=e(T5jGXb-OP!Kk z5BB#F&)o3TjjC~r6dR3t?UE;>&IR-G3(d{PWCp2nL_uMJG(sk;2br3Txhs%gd7$K5 zO#mlq|KZOIa~~H%E91bwe-q`ZK)E2CyIa|ccn zxi|CXqk~n8eywEc78mMk7nn+4`X?8Rrr@Cqw)8>wmS6z^joa-mFb^$!IBO{UZA8S> zNZ9R8)x2rjyj6$JTeLIj-(mr`@QmhK`BIvRB>7x1t>07CF=r=U*z5r}kvX0-9^&mo z10Tq^4xskgwfp5a9YZ^hUxouf)6jDNN75;f*H`DE_nT+ z)YM9LvBfXu^DmSd09u&H{S6fNpGkSK_xH3>nObaiw4%0kNhN&X|MO|o5UoT(kxT={1T(=Umz+#Q zL_|{-H7a)vZ7MA-^C@{Ga6vQ|Ff}V=QM_ih=(J2`uBB6rYfa5lxnx5&O?|XT@9;fOjcyn2saTS%#M3}BU%Iq58bG8S#UJ5K(dJFwnqNwR1#+w# zXU9*qdyLd|EO6RbA4aEBi2(Rd^FMxiX2r0Ai3Lkq2^Ci%;CFeJ`$iq%G9td1h+$)3 z-NH#tir@Nxq7ZA?wSsHmb%N%U z5=2w7bFe#jF zI%96RqB&WYV5licDk=kD!!o{uEphV`oJtZ_8sfya^bhj$oKa;j)|{3t5OXB`r^UafQwFlQ#JN3LobjFF_P8sb{J@1m$r~@3h z&tMOA{((E0S9w<2sq~04w908NvWQbhj4unP$BpRwG)I`&^#l@0%AVL(2leQo&9gW; z4LP}%WEEjpQ#vJrU*2_Uw%$;5oOU{c9WJf)P871s#`_BFb@t>PrVfqG1SKp5PMLin z;#Ca>NsJ8IPEk|qnqw@Z`spXQF<+WbR7KYoQPmE<-8+-A6EA+7cRvpAKu1?tu{vn( zdMQ6->i50XZu@CdWB2dF7Y=QQsFuxF?5Vdn{eG%bt@myfQ-&QTTe(KF0c_rFWqo=v z--#T$%a7?}Tda4x_Zjk0L5ZH}zCw1Ub=a>zjW<&o%||jK1k=wf-!j^=CbWI3N0(AF zzaO%?@aV_2dz6b*ACK>6H}4U*fHP^&ET9tHu?}#J&;_M|`J3Cow<~Ea`jl6XP#>#O z(`?fv;}<)JY9P2xf!XD~|EEJvh*%!|6b}gg(VE1v@2c|jE{=I`<-gYJYngvZ+z(wz z%uqa4r1H}%7%Cc-Do-s&+Vu|G!t>Y2N*NOQY<_D<&KR+vsl>svWTg)$JEGtkxW*~y zC5(NvMrJe(#^X%4JXSgW7u&@v9%IFZVls+7XJYUbnX7+#j**`;ue2#>WeZM$@Ua=3oDio~rlq7q$=rAz@k?`1 zjEeDXA!0q2MlQ^n>d-{lz*V{44qbVRZ@iBKSv#B8m8vMOPWi8;?fvlI^GmHORKw@z zmk-@lQ!--ylHZlk8iDtuaC!W-mep|Ogk?a>R5PBwCFP`|m z4jC8GHe>Rm0OMuzXv<-q<@V$?+71&!XY|eV1A%Q;K}OlNrEN3mgSzO8SCQQ8>Xva$ zPPH3x5&r`42YuJh|HU?1^{X&#n}GCpE1>M*N;JU;+_VZ#G@T!Uby(zW;_QbGxY39( z-|Dk7N#Gj7RH9WaRa#rD)q&tVNq1km>3vp~-}6l%XxHt3VI^g~CI$rUowD~%JiqPlPXD>5Tkm3`NL2 zuF^jfqa>0Z1E@D8hHK2oj@10;sJ**wId}Z{A78};l^oa}J+^UQR zXgp8z29$YkP`O1H1v$YvrpK4t>wLH2;5(~vF02o6&_3&AOL)x7(wNo3>{fQ=Rh*;0 z^7`+0bdd|;?UA}iw+aQo!t!7ZnTH(Db^}@#BG=?e?g=HsL={o{w2-^Aoxy|D&TpDV zpLa|i#JJb7J}$BKoQ>i?77|wYbY2>cQYglk<8Ni6b(XZ2>aZaN2zIyxw@TdG&n|$Mka0OjWOxo zi@B2{;!%^nFZKC{5FrNLnjrz!xA@NYE%Xg7(mlIo35J!N5W$eel9zAGUrVs} zZF76qY!YL@@87|TeHJm|R{`LP33qPb-Qca|vYd^=iQ3XIJT+!aAV&CEZ&S95f&JC;;Kn zqwvi5X_8<>Gnw@%vjnNZZzfFXZ=&cDI|IVsUZ(?hewq0;{&Ae;nyt;BsrvY!)9cgW z1PHEih*w#9k?0}&XgVFev)U)(NPSR5b>kRn{5?Tf5{yXRwKZR$SW=1CMj}5^y|~Re z_fYQ*1bebIXW|+Vi;bwlG<(9yrU5h!W zq7aL@{P3t(Umft=)Ex%GFDiG{7SHG%JNaSdZ#}hnP)*k^taiHiE6f!Cw^s%1E-5@s z{Wnuxz;UANV(&x#R21N4%Fe|^T3%#lqDt&K*T=O$kHZEfiNCNd_nOl4I!J*#cHsyt z?(Oo5K0qIqDBd-N&&vjUGF5{S=Piy_UOv77e6^|SG@Qb?2$&E>?)A6mT!Rl9BQxrr z`s+>%Y5n$7qePXlX6|wIAO!if?KcfZV1}L|D>x?g9}IsY%1Vb1z*9wP#`Qgo>9B}R z^T*cRWIepdurY>LJNews*nUK8k;w3!Vdd-HcqpxM$Vi}vvdjBC{fG&9hv`9xYwQi> z`H$eqJ-Vw&dE`D(>;;1Z9C$_m?YKkK#80(_VvH`?W;sobn`_;>;^5p^e*NZLcL4cE zz0V7bvH9cs==JU~0ox+#Yz-`p{Z9wIAlLwd&IWR8Tkt>+<$e~^=y&dP`1sb(an{A6 zECu!Mn0A62#-HNt@Vr;@VfWb*-7Jxy@tWRH@T_JZJrroHcreCa-1np|(6s!VRWUjc z2_fg`8Ey9>(HpzSH2xfOBgE%COUVRer0usMR?_sY`MqP^8XWe&1+nV|M>n;tYZ1 z2(GwXkaGDA+8?pQj`S1G+5}`#0IM>96FKQjZz~L|9J9aytE|x)aPkbXY=PV0ztkq-NG9q@R=iemz3EjOfuplhfc_fw-B%sm6<^WVjOg?@Sie*}c5R=Mua{+)#`fMP+L z{|t5yyZG9W8)cIl^3GXxZLm#G{jO#3tqM@}zqwboC37vlT!J`UhQ3EM+B3Mj|B8-i zO5F@kIcxN^?HKLmCJf`)+ht|Xp&!#XY*qr2?SF1S!O1Tw8>kjGrl;E7L*;AivZ2sq zC85MT&+8KGK7q^nSW5GhiRx`Zo4(})IV~X2c?Nr~v7$I2jLvN2_j=pmY_EAnRhgO< zGAk;rwpL`tk0@b{Y$rcF&Vz+Jj*0=f2YH@cOTWc}VGxk1JG)wNI78WhIf3G;EZc{p zT$W?wa}3-D=xaoJA>=~Td&X?j?HAEj@My0p1Ue z;?p8-s#(gaMngvXQa~IxAb>b1Jy6hCPdSdl`Z4JHoEb&srbC5dSl8Rg^$XH?mf9Aj zch|5=_J@>zzU!+uGa zPqb1kiNvZqamL3JpPGu<6I1uiMd|n;>HAX#=C#bwDr&S^V78|=Y%nE7Y~DsXw4t*0 zYHTgtTTD^ZbRrv^$KTbt)MMTO!Zd;8Aa!6YCP(s<8mqSjImV5dSr(qacWv&m2z7elTonaHXc} zgOR?=*?kt4WnmSVj@TOia$A9(8C>ph&%U7CR#{L|gHC7+(6iM9z&6%so%x zCq6iB@xws`PzqQu|#uHJ0A0q->V%tsfzrN z>L%s^R~>AaZ_GWbI_XEJJPJzeo#IL(^!kHJ%<=r*PFGfim?xdIbIoJl=qg|~2cLNz ztV6I*&nV?=$HHI3if4Gu0xm5IJ4USfvkBB%r8@e!bL6g}nr#qiva&9c6cV`rT=)u0 z%L~r3wO49vdKoc~<7EjBTOlit1Br)gIndf~;I#$H5aCEOyZ6#mjbh)F+uToE{M;&f z!~8rdx+yK}RJQnO2hVec^K|E>E|s#8^kq=F71))+2w&Ur$vG2vK)K8qRB`&Hh~XyF zZ*rDAysw$kvJ?z{tSjE!Y}&CJws$C#v69;BJ0CxgEPnrlJ)iuy5R>d41}Rm z_*1{;h>ghW9JO5_OAWQw7?jM#1W-CSk!Gjb+(aj$*1bYFyxG6Ly7eG5DK>n$}Zv>jMXoeH8Y1}8&Jdm z!J0`V&@%B$pgW_Eqv5jZJj4GWnDgeufw_#97kwleglrNlgoTB!7awq39uZ5btKAN` zdE;|KtREQ6qq3hw+dgrEu`vWJc8n8uy6VnM%Y{JMswd&)F)xYzc7)XuTk5j(B}x^ zW}G}-RH;>7sAtu6ch$Qzp4ar>V)@?7c+4?x2q1Ptp2Smid-t`3n1dtj1?@oxm0=O9 zOu4JN+E3fXF==XT09>oh)1E+cA@<-TatvT#Y1s9;zCu4d za^f0FuOG{}bo_|BGQJ7>O5GO`;T|rukBYXpbfNusg3fB><4l-a=}oM$SWp>TprGX9 z?1{X>Xl*C5+t@*5mI!>{Tou*8Qt&Rcc%Yofsm2Xnrwk|V)AcgT=o;%>b5e3KRQIH( zb(_0rvBgmUhFrjm_R}x%vRA7U))y>J6og%uAJ^Tp*Y~W%y3ynL+`N(8Z@G#P)Z&(V zw2{EP13owzU@-%aW4^J+)yQ+1S$+RN!v#^*!AkQI@e!4G*qZ8RRf*~WCHtR?S0$JA ztfhvI=6$BgLjD`sFceH@Q>5GZ;JIe7NKo~}g#P1ZHZ*u*BB&2@h(7)n%qcTnV=o3e z=XZm>9lDOWUgPiM;A|5%rYD-1HUWM=<2+%(_e)6DLJy3y&Wki2I=p8BeA@|5piJ_G zOhmcJ)Ojs%F|@aPyyACz640@fw!asfzvQ{bdI5D7vmRDqmo}a2+bwJp%!KxHe2Zpj znG?`$cfvQ1(z#}1wfimjIOf(0d(C>&#mIcH6nvL%w7UM0&7$CY%q(OkVxBkyAz+sr z-dYAi_?n*R#L@|?Fy{quy1#sbuKx4y9^f(&s6X|d-?0<|>RxsUKoUUjA6;=J+`uIWYhoE6unO%KQE1BNk zY#Cc+_p>OmJ}uEsDZJ!Wi?~^n)YGx= z^C-Z4*RbqK%zfuD9wy#;5If;zt5&_S6v|Kq=lhznCb)D?ZIBCbEUFY9@nUax($h4-WogNQRbB4xy|KtHj z5LJI}05@;#7o{IKgmAQG#y9_&k2yWjApEmR9B4}x)*BOnL#AE5zROJ&Ur+ynZ;u3* zJhM(q*c!(r>E0GAYs997o94YhdYswZ?uW8=tDpAvrgOue$lfES9%WH)rZCRxf6YBe z_t#Anf+?Oa`bzSpx=c5=$0z>#teUUe3WC@r1+laeZ*%-a#;aFO7LwLGV>fl%t2$F> z<~hAs{_yQFqN+yKTkU4Zq+rrDvuo+2Es(_b&7+J?(Kjdstuj)r{xl zVL)#T*6_847mD}8t-8-Q^ZJX&>7Pe->vemMONKzV08i658Td_ourY53ADl<=L4v30 zAG!7(D+p-4`;3HD-m?1S_h&?`eSqFCclr(8WMXO9NXh-73GHi-6dC%U?V{}2a{~ZQ zv)5kfzhqNPEb53o{%w=wj!o$8FIR+aS$_$4{N8-?(m?8%UAIZCqXTL9c<`nO%HO4O zD}n<*zHLL@^^8PWb(1l&$BpE-ZnobTMFLWu1;dR?Z&!qIDiD~StyfLrHa%S)W0pBu z>aJ5sS8r_5r_+gPYHIKg{-bb-O&RtGEB2Lx&-M>oV;6$S5>yzV)~&xl?{ToBds85L zFLjgYIkuUE`74cV=&?_*R^?BC8(wp0es8fl-7__lS~sve$=R*EgPuhz3qsWH$dgUx ziw@OU&E&De9@iTgWHgFr#)T0Ghe7YOoBRLitO`E>x4HWuZp|&W>dcR8$Lr4UbV|SrBv!9gmAoWqawhEifu};;SNqrSD=H z-6ZK3AM;mG8XHgwL7BXVhlk498*Mib0}4W>Wj~2kHGt|#EpW7+6|l9YLk(7}CAR$) zFvLmv{?!E7VAp4{Gw`>+jceHFayr55v>;!Q4R)I^c7o?VgMHyK-?E?1wSU+9zJ9J~ zdY9|xo#ad^&+O~-?P>n&Ik5i~f#j|%_Ty<%opy^4+WBl`BbGB;j)_^c&=2i(jgucI zcvs%nh9AK-X8f7KMqemTQXFGfdh$2_8s5Sd>+8LW)?X&Ius!_vo!H!sM(at#j-&l9 zc@(WElZm{y8i4x}9}@`)cTO{jSL4eq6Nx}BoA`jOk40YOqgYeI7WqVLlC~{xN~w-5 zab(AELyevh7hHjkF&ffU+42Mh7AnfJW^J@JjVS2W3$ne5C9s+y?HyZhd(WE=61*7w zY^1o5ZRa3*J~|c~poes5q;onUo_*w8>`kZ5ET~Di3={z0bd5S-fn690$r4A1Evwwf zHSL#F;QYFO^GWt((zbl}YjJkA*5(23&r8d;^waMmHkKf!u%&eZ@wyD>`U4y&o?{!F z*V5|HzfG+>Hc!483jb|LR1;dAhI@EJAjgka2_BZ0(Ii#};yzZKHY9I+hdZ~u3O!VZ7Vsof6T+ome>)&e+d^ z5B*-{rI~3%<~7wG+bn<*3UDp8Y%@eKw*cQRU9H_Tdxi~uI+JD}ygyD8+c-r7gm|*sMm`4YlU45 z?RZk1)_z&#Uc65Q&-HU=+EUSdQr1Md9ji{te};`MpRtFpVJ8$Uot%?L%qieMlj>p_ zQS!P1NV65f5f=bl+z~}M#hu5gEUYlp7c-~Z;ILlJ&JgQsqd&tb8YY`ad}VKLG+IQe z&?m8yiiFx{o*A5eJcMo#NE9rzU9SryTszAn2E|_f#rll%<->ywrL$P$kY(T!-1IQm zQrmHEvtS{pf6r3O{Ht-cUInm7uSsV6r+n62v&qGb% zkujmCnrTnuST2KQW^?Twkp;NkE>Jop2qg!Rc@>4Uy7+`sg<{Vwf0KlsD5EgwAG0H7 zJf7f{`Zz}Se$D1<-3#E>Wz~~6U6gctX5SfY2CHr7p&vG^qX}CNo7T;v0&&G>pImI} zdDo|V679Y{g{Pqob?OHM^pEV(-8?btSAzI$1!CK1NOZPdTM(P3i7FrjmBnw3t8lv~ z0}3Qr7ua?$@i=lc&V}ypq;|sMtJIySDZ4}h3>6ntPA(|kPfOe?o~&?q`}pAFEP2VD zLPOef)%FB=+9bREOIRd9@99q7u!Xww$=4_e-CuiQ<(V79FVYY@nXuD6>NHO*jsJaE z)A(gkY$U`Mucng4vBEN`JQTkk-cKn5w3GgDeANYVFR~X~l#|;!X56a?pwsZN+Gj9R zb3KvCHRpm`h0srkt)zs&<4O~<)vDv7O=`$NR2>sJlULmGYR;lN8OGyA%A?-+_v~&I z*TWf<(7+#70woUFj(wzl^u!8fj=#Sz$V9z&(RqVPe^br%35#Pr_Z@8C>w2&zvn}1m zfmR5U;edHVzTf)~QbTW9)#)ZUi_8-pK%c(2&eMLxm}eE=OE$rG=z1QXE<*M>+zU|p&7=gDFYtMeJ-$E8QujzaTa3*Y=3Qv^8?@bD{zf(K`d@wvAq z*`(dN%!(}j*nMpMJz-2mm_yIm@y5O7L!!WMRaxZT_ZGF6W0(4KF8sNxVts83nwS0u z`t;KjXLxCOWk=83wH?l>zVJiGjv4Krve^i&lSeNEwX;T_f_}VKqyrI{{H{Y$#{I86 zvDI(;rL-`YONy$79~9Qu%bB>(l!CILLVpbNIWb8l(XXginmTEaAM-Y2>7nLxg#qZ7 z!Bquqo*dKi_|%HrC|fiT)te}`4~nDnq#V;!VA&iW;adEmS3ld&sbp6!?t4L0^CGcP za)}tiprD9~zK|oVWpu}d({hSdwWm?odeGs9nZvI!V@uLvwJla(=&Em@)xAN>An#@# z(!1dnsNV`tPp(17SP_aQd-jM*`-0B(;P=$IB@eR_#|XE6poNiGDsHU0>;46@6OClw z+M>(@;==p1cJnr$4{g_^5m%z9cQB#7^=&)bQwM~f*mzzI(eea!s_H{Pqi1Z8Usyt+ zQTrpI8!K!rO!1V1%1zLB&$%K+pO9#qquJ%WE1e}RFGC@j`G1M0Y`50ZmFEy~^>@af zq8WXF;r96c*3^fOkm}~^4e;CSJ@-@8*p`;z)R_S>$Eg1HMomY4gPrpqSgTe9;cYWi zZM&JVfNXpBQsCzWT#qg&K1|U*4GsgWqC}HIsr8psEnx4SgAY2$l1D&-btdngzE=F- za1Q^dKAv&FAs(g7C^$xw%(!SdB56aOAzg!tCoq&O0R40zEILLXhr#+8gi-KxMP0Ui zbtKjgDYl>dJV}(k@NW$C55+TzXCz+~A<@mA`)9cGzzE)j?PfJ0vkh1ri+xTgW_zz< z@O&;Q1mglg))A#$uR$oWE0!J`L{ESQ!6JvU^RT(4TB1`>i#?E=$t9AiG<@V;3`|35 zV|k5sN}ZhG$T%r0{6<|dvWu?ZT%4Silt|>vOR_F@@T9hH1YPYIaumC3T04F_`bW=% zbBTWf=S+nc>j)#AiO0#UCY>02L&6rT>z(NPF&lR7ufK+&ur}87w2D7&Tr?|JAp#WR zj|Zb5*|B-2F_J90KoCwPQtuOq9Cn@lI`@z5LG&9$h1|^F0u>EB=7u{!<(`PvVECAu z!~&}MZqpA)u+-AWrcU=%G2>9ip|H&Q#|LU|IQ?KoCz~dBReot@Q7QRkQIdWu(==B3 zaL~`+uCcsJ9pB?L2CqZ7IbjYY%EMEUJE;BbaeC)WZZ{UwKbYWehPs<~6=!!6(h)HK zjS+zHBl|cf{q6B3y5ka~pvxTC*7{O=)|NmF6V5uAM&^(o9Of8G+~h$mrQKVOJJoJC z91rg&k!Q!L7ej1@ho6sNa0^*o!eLpLka@)DtxFv9?<_99Af&>QRB>sSNy6md z+ytAQr(-!Cg+)1)1uQFh@JZ>uyY&f`5%viW&s(Guk6jEAmev#FN7j&iT-!XPO%EwK z^N#j_{|}oLi;q}{t7&#uS=1waP!YVYCP+De z-r*(dXCl@39eH}DwrIi*Mhl*&zk^)vWzTVWkvoNahIbh)$g?k=I7_A!mq)rZ!<|N7 zS%BosL>&9V_fCA6B3Dm@96!BW76(m^h$k(Zu|av5);HqVf^z{3zplksFJcRX8wcqn z*>#%P+}NhjZ%S*@{aM}f#rD~uslAIg7y!TK>OWJYp&&!y;dS|c;`y z#tN`o5E!_5fH92l+nn$C2a^Vd^+QFOUTJylQIonMOIEN|tv@N779qE4zG0H>W%zPv zd*|2_|1GcK-PVzohZ>-}LOUw-_CMay`ro~@9BZdyt(GV+9->s#?a%emK+H%kY~m)j zuq23*Xu=I;81Dw|PsdhV`*F)+jH0G~BvT0ZZzgZ(_uvf_3r}omswXg->3U)L2yA zMR(%79jp`3w#a=Iaz6@eAeTu*zY7Z!hP=CM?)kgcwis4*XJ`@{@QMH$gA)uGF%avr z-d)D_0CiC&Y7trvXiz~+CxVOkL?&UCM*nLb^{-nk=PNO#fz7Q{V9#mJNGR#tcw~$26 zIPM>Vu}|gdBA2BW5=FJA#q^r=g6=7Q;=uwTa@o_#i`cTJo%NU^=l}{MYXE#evfWlR z>Tq&rowb?v+UE2P=mwUVD`^mGIrRKVCsLTw*+4Opa!TKO4h=Wey8u-_$L#yD04o*^Qek<(i*X7}ty2=ks7JyvgX?{$a^m`C!` z6+PIA0OF7w+6l2n2yb);Zt>O-Ylp_T)?2ARbMXSz{~m5MA=bIenwY2j==Ez_+x_c1 z6_INyH=iA+v>2@WP3PxQyD4dW!YwwkA7E{5A(eZ&!ey^2JGp|7qt9=osW9$I!V>Mm zpSyr`Ww-uF^$oIv;ti zcci!{X6@YcNOG8G>tDl7s+YF;9j{I=e zMOi+a*Z|Gx$R;(GXk?{aKYGNi&E60broNc?^s<5U1FbUgNE`Q%*b*;w!sXgS(<-ts zKdB6l7Q1mRu}qnan=8jFA~?1I*rHfjXMrY;H5%3BlxN8_I8{f!-m@X&P)E@FaVTPh{d+UBoCf8rpvOFJJ zzg8W!vtpD1Cu?-uEn!TqcEaiu>N$cKqN8rJK5QIkd{IkOQA zG%Bh!6dI3N_(v`iicDLi9E$mUb$@xYAc)lTgW&t}jmKT*o>-!?R|8#OF=lv9X17nA zt+gIPv-v;NJ68a%S2Mr{hWQ`PdPnM2d#H9>V4LJwUr{yWw$YxK?zjV%y>W|J6%8!GHw7)VmfMuQ%wb zr)>S%A}Ly;*_MzvZ2MI9YNLDDAahEx(uIw%2x4tFS+%hE_$x=0qpv@yy|;*ZfE$$! zvE5s`+=@S`>K8_SRy}@GMB)azN)hA=PN|4`QQh-W)F@#c{9%DBt7(GpU9A)&@Zm~m zW!<9f-skb^ty7+fL5PZg?6!z1T`ItwzUeg_oV>dv648yh;NE=37n|yi549w{s}4UStFmU;L`E? z`$!4CqLeK;F8?k#lyQ0wHeqn~YlFiNSpMLzp<7LUeTLQk+hEhv=k8e6|0n`jHgwee z+})ysfe*vJ7;M3v`f(p7S)!?C%SS0cG4Kuf&FaKD!%T*`RvKR+H{HJn!* zJ&;^(%IE)4nkn4ZM6VjIt9vYKlT_$KGQ_e3m)uCL6E5V|O1%dde? z%p3-G0I58zn8qy#N#yRUN+Ki(J65Gc)%2;+SCkCR)MM;{>v)7YJqA>Z2Rrp8%PWav5p3z7G^j_1W z!os0ET;g9BVmg{umj_4JwrX6$RbGizXmx_#fP{|*7zGD7xcNS@5RaX?X^O<9U9EA6 zjcS}wDhh7mv}gMLHr8=V%h67YxbOfe|9}HBo)yN9%EOR;?!`C~AYRimLvmPvi%{<{ zSMOP#)WPS1HGtvbn_PIpxRX^>Ub3ul>M_Qb&Nbdn|7cM91FYWJ=q z{!=_|LeW|H$*ZYDS-lP05J5%PoU_NvA8oQgZ^yU`MHb75dvK<4S$WratjXBABkLYx z;mn?gVr1SX`$qm?SXZ7&kfn%nxOg4QoMFAJG-It3hDL(hw+Jfs@y1KmmA^j@HjKud7(=j;hqo{md^EG zHoF_SIrfH&p>PlgaSSv)K(4eNJvnq5@ci>kvy}-a{Xf)7R?4a$INAk&uSDc-gEhz; z2yG~U6n?EhxwY(n&NoGrppKD?+F|=ec^Ri4lsZr)x6jSBQBD~h)mLZ9Ug5D>r2THO z%+$9b+ZTM+W{!X3~Cb0!gg;jvv)%XL=KMI%s1u@?vC%a@Dr8R?=slJ zcoI@emin7sVzr(jCEppHVBc(X%W3^2^x%9@svIfoOYaKepqLtSg9p2N^bF1>VoTS!Z)9cuYb)lWmqMnh-(3A38(dE~OMCt}2 zw0Z6Cb}r%&3s_67@UZY4CEt$|_IZi-Ty*C=N$@1V2Hm;SiFU(G(;brTq7D-UiJWz$Czm@DJsICo)NChhuI4IfW%k9j;L>h4|mDm<j!sQ8@eeP?^}G>TRS8=6PEnIX)l6l-TIlg5OHO+jV*50$26UFnn`?Z0D;18^3~%M zTmsKK_HZahpJ>QbKu|r5K0b9=cZnv-z1Bx*1Q~HhRF`>~B z>;%O_G1*!mHtOXU21TPiy9_ZXb8_VaLXk4t;Bw(UB!9A1P4MH{Q=CFRFGNmJ@kD4% zMM%?{^=qP5H=c>l4jQlb#z5=%rY14@{u`1b8uZHe_AF{-t@8!@6vN%ed=NRwV%smm zB$FxBa)SQ3c}CLvn1Fze&EqdOc1Rect#jRwxBgzzYV{3IN+-DXiUD>s?vO(dli#!c z2YX-P@DT3cTi*o`q|F&SM1CIf02@L#*53w~x{ZtbzJV*J-NC>M#yJJhCS2$MDs)InM?7=_S3}vKKZj%p{EX^y^0(U`>O?V8W0xXJ5%=$ADcRuZPabJ%ZU;?vzvJ4 zK^BJ4BZ74cF5WYRFOO}$_1pKD)19v0agVGv4H=H$`wj0Q%qA3%d`LMbJHr>Yp1Q>q zEO>FIVu0b)P@*bVcW*wt1a43)>kMiYO}8^;@|+R ztcfrm=ZFW5W$Kr7h4h{fo69vU%!Pn0`;_&`qmdCJ3o>Fk`5IdIgzQKW8f0jv6#03tL(}Rz zPNTQYL(Zzq>RdeyxqcMOO8LpmvV0NQ#T@27r^l$=qV9>mKZ&lAhb^zTyxp<{&OVRE zkH1x1CAZ}5Sc69P?krXV6i#ia+HRYv!&I4wtmcTP{^CnWyni;D)YBbL4YGBlde;v4 z&9=IwD?L|1ZSt&^xX{%ISp5dxI#TVx2#h9SEgf`xWnMmJ0!6>M!P3vhJGouMb>i-d z0lpt@gfy@webNJezqw0|1u!u9q{}PG+^{-O3ca7zHLb zpV9U%7dE(-Z!6IC6(gU!FlE0^+C8JxOJ(`NatxQz=0p#R*2mkciS5ulQh!cio9^BY z*-Twqv`f4^Y8r5pSKXcMH~jCrd%~&ZOM9ESbCG`@=nFa(ke!51XS|g8gKFpc--uPj z*OU&h581NH3Z9Pzzr7EGx|Q|diuDnFh%i+?yU(&`t!(MsOGCr%^=s$W5-zpJE}kyQ zayO~+nrsw*)?ha)y3P7_+9=jiTQ@C#Xakp1Odt%z5pEoYnkfM54SzF2Lyg@xwKbNA z;uyJs(K3J_(Fi8aA7mEbBlpaj4)VwUoVpXaz(x54SSX22-r&B`8a(S1-YdBr`ipmOuf_T%EaYm6s3*3#svnq@{ZnW)? zV+-iacd`LoJBc@1V4JEcS&g=DgW1giE-h1%bW#vuJfd7#3Dm)z16f0czTg@}2vc+$ zr_R|x<9F4Wrc1zDAas47=dhY7HKEYke-P!j^-}OY&LDWBa^-mHd{kv{ZY0rarn}C-}MgZKFqYGob_gtKN4GhL2pEtY$}kPIdkwB}i@F(M;mXz_yhR z-R}B`V zM{B0G6`sz<6(eu!H11&|7PG|=Ni?f#rS1BPP04=BB4HyW)Ldo#_?GKAL((pu{;-W$ zTJ*@akE~2cvZwDdNIrMt@EW3K)3~C}HCzdH>IM6R#`)@eTMLggg>YIPHxJJvceDGIyVR>C^q`QCbe=kQfSMpW^?hr_E|KJRo za$#MHJ6p8;^Th{tk)gV0px=hotgRu0O>4OJNaKM&{gD?vy1{RWmplLnYVYr*-P*nQ z_j#9}Dm3;|7pi~!x%V(NKGC70rp~B$|4Mx2@_{vkq!c1lfV2wei&{ZkT@Zl3TJ}Wo z6C>7YSmrM?xc1wNf+UC6p{E*!$N!n_-Vzp-KDUSaBg!YsY#UP6MiO2R@;h=pZJfs( zHuW~Qs?rV^o8H+%Y@W9!cSED62pQj&5uB-i^Vt0JGeBO7UyP@{r1!L8jz4?9p{0>w zf#jZhsUM6WUS(HK*(~EOlvtAI|8Dd%?^NB>!@zwU9MLNVr$1fZ;f%pa;;TVZjqN(t z`(q!_g5Bl$i}tSTsc+XWnchz3C%bKWSeAph7yp2E!q1L$V)=UT-TUb4Z&wF>XO0gOB!duT=aexp721Ip!%3 z7{S-&d<;b;n&DaCUlY*_1u#Kb7N8m?SW$qYZUZmtCfre(~kP11~`|$w~NnBQq zb-7<}5b`_Fj===iX@a@MM`3&b8wA97mZ>`_U0$3{Wak7Rp^*WyG)k;%;0sO+w z`r+pB9vLoM*5Cd^j{9Sp5R+F|b);o%EJktYqqYkyZ07-Lj^(mp(QPE)LqGm(R%}8Y)IAyCg~yKrsq}zC(sC+YgGNgB5pOpkCq&F#P-n zDd95twIssx@yoXeV{f;Ne?cWT&N$ug3P5p>(R2SdxA^eqx3g*I+~bxD8%M`dJygEC zE{Fah+!axg=f+1+^nP}eA9{RS$Ihj6FCO}uYfn~9oC4Z7wFKBsc`4_Z+^HhMeVyC@Du{Al@Xc2%FiCx$ZkfQz4Q7N)BRvG~_T?*AdH?rPX)T>WY z#5`}CTXB-z;p09lz~!O`sNQVc&hPlt3iu%{dTiNTYHN{q#J$D9Z77Xpn#zPeGn(Lt zt`6k7Ge5owo5JjjZSA}9LVrgA(}d9~P02pTl5w0;!=jM{td8HGv%V->5pY%|!Ac!c zUZGler5s&WXJliHFb8uf<1(C8MKFYDzsL4~Gt{?L*_$9*(7>+cS**b73Mg)N9<&P| z0N-zVy^g_36VS+PlQ$L@-Hu9nrasp)ki39*6BA3nngDJt+ZXaqI1&3@ep{=3vI!j5 zFwL#fZ{>qu!SS90EH1GulQh(Y$kfF;Gw;U)DCGs}QR4DI$USd@6~o zgw|_)#{70jZtf$%izC^L)*{KBH=DUGbY*O;pC{1yxMcm;!W;!R#AN(y{sfQ65GV=m zygW~b=^Pl>1icC0wO`ozOTym3|K2^ETti zG}FS{V|jSSF+=AXgZ7Z{lwBXsZLsd&bwv==RGjea*a%_Wv-ZHM&d^KkbNsV^dM0r{ zyJyEjbl1Mk&8B%b(eIN!p5)PkAN@iry0dy@gOSUCpxszQ+r`JZ=%wqFv$L|>QaHXY zYvZHmtV!?JPvW-vYN;}%wjSC~?kpl?jrkmx2Uq{1==ybU$H<3^1!v|lBfku;`g**j zZcaFJUe~FRU8#pcBCjVuTQ7$%?Z#g$hy5I+_P9@0n_6*yRG*^I?_kZrSr5mrP^#b)#W# zs44Cas6=iV@_-RmhBGgSxDb$h zcT*lfo|j3rcg*BI&>p*bEXT(q;MX5x--aj~AOHG1@>9``1zuIVNKZPCuK%U7U8VI) z&DWeiOZ`jE-)NgC-KFd=?ma~HcCOB=h`)m=`d3|$&8pt9;r$HSzzNV17)?xOZn z$@R52G~K#BDb5#D>5n5P8w18ziV1Ycd##Q_UBv`guNYg)whG#{k*PTS!t8gBgo%aaBQo{|rpJ7tExUcK;xeEfLT zA#@aPJ#b34;D{`RchB&^x9xd(9ohNc*lj4$=y~LqbMw(D6QB9CpArs+B^-QLzGr{a z@Sfd>Q+cVTE&S4-Q+W(w{MFmQkU~<_>$ZgM`;!fKhwfk5w9(Zr@N(dWv7t@%F%+AT zetJM)8c&tMn^jZ4IA1r&V&nUZSLRh-SukB(-QwJfY}wG7E*pbu((rl?F(|8e`3{~;x{K6z+x$82@!rUe_-4JaX8Xixv}=becEHeSne;=GfxsJbZn+Rq_b zO^qqcj@m8F`|pyIZ0q>CQ7^&`zY^>_)SNrF+2u@BEoYhF##OfK$-O0wdpt;ax3_Lf zm}}z_LW++QS1XL?iVKQUN&9lmiaPu zgkfANv8{`!EYk=!f)88YDfdh7JifXi;srN3ysq=o;XmjTmz-1I?&JHYKkiE$38{5S z=(nwR*7Z7y(8Kpu4!{RwS{xZiY-b1hkSkRc$Bis#d)MY`Dk^Rx7Pn$jw97oNqL#{IHkumgg*kSvv*_eGH@&b}Vdh!rZDGiJK-96Qm9_hv z+%)uNDB$&A`w?q+dL#d)c#kWp|7PIi*WC)#x$%5t_n%J{T3v^>(<9~;H%Sx6Hzf`| z6+Zuh|G~&~|D*Sheh+NyM?c*?Z}!D^=f;}ePNnDi4-gz~@BE;cJQH`$Yl*mK;xkz?m+MVYrGhJ@6 zyL%-q-@oHU__}9rlUkcNC&KT|ry2TcJw39R&b)nmaY4t=9q@yKXAk(a&-bxe?R=Zn zGr2P`9YIGwI#_)7F-DbF|3jAdhn1o5s?=_UL-uuLWIkf~WvSu3O}F{0$(LR*#T03tntNZ1^S&g0xa!MB$wLz zC+H9(_Eim$yF*ruD!lxHZzrC%wz>YcnpYT~I98R~R67v$u&TPbuWP~i_k+vx7?s*r zzRS3^7uhdKaTe^@?>SJcYpjTWNHOS~okwrXi!GkZ^{#kF+Q8sCopG9XX?=KOwe^i) zJ=Q(OelLrGzn-^J&HDrqhA_A$;#kSRfGGDo@#mWBtp4Oqma+yyB#ZFh( z+Z3tr2{`P{7}>Yaaf54xU2fQht`T^pyh!%rxGMVPXnv_HIifgKX!Q>+S+xCcdLuGL2yWl)a%$s=B*dwEl6?;cnwl5FMBD9br2)>B7k3uJfV# z)&6(Si&85pPQGW`kVE$VEW1j_5`=z!%Am4WH&Pu65q@_8C~z9KbjvNp@vjcb{W+ z@jF`0ZG?WN$nfJr!lexOzW|$~)^W)v_(n$IB(CorYJL#mVvAF=?glx9Q0$|FfBnGl zTw{xR!=|Hd-t^vvqu#aQ+Osxz6-Mu+u6O>h3Y8CF;efcJm5eVB_sAXGsGc4@U#T&OKX_ z`6FB(_HM%=LdM}u&fi|KHPeNQr+T(W>s?uym(aB-D{ucR+uEyZwyTn^5YqzmeJvXL zEX%L#OFAPDHV(y&pEMaiKc5@7y!%(f(k}J~x%>&IVOh9&n5=J`bL7L}m-i9h=r4m>S5E$FD>&GPl$4QxQcA$MR7td;| z<~to@ns3dA?Mlfg*3bU*Ec0mAE)-d5 z`nJ0V|2f}#N4@mxgCCkT%Wu9L7?k^DO~{FU9FON;|5CJL!Vdr0WU35>3j`y+o%_8PT%x_*?J+Ezi z{=#5mLF!;y@@cD&Y(?%=gw6|>HW9UM6sk)9TvB?q%qp{%RnL`h7pc

hkEg`l zzxwCBD?X%VOX({3^~JB{^3<-b&WM9CZ@YPNxt!tlXh+nnqEXq!dv4vg+We(chdz6e zpIr`q9o8UG-5O7{soHt^fz8!JBZ|9bhkTn8YX@S_-S$7RF)-+(O_SWe@^IA`C~A}Z zjmhqo#CZir*iEl14@x84>3v>ZO;yUFgL{(OY>Fez;KzM(BmDDPu9}CC&$uM0>~AZ^ zn`t-PXbb$8n|(6&buHRMG@IJ#yZq2jm&#|~EMg^)=4ABT*)QA4o|7xAY(FopX=-+{ z{PkAQp`Sku1Sdb+V;@y@CLo>{qP^($yo#ERr>%lqXSu9yp1n=gSH;%68}g2ld_~C; z_l4N1oB>bYD81lWcf-|P^6fpJ<*)Ay{~0+do@$9$>C1hXpFMhK>R_rWe!uLG`QD0_ z$YrNnJQ$ZA8zTp^E=3gkP}lb92c9%XxJSj|^@ZBhOHo0I>#6dPwC#%8{=DdYZE~Kz zg@T#V(rHgVlze}yeaFzL@D(Os?vWY)M%Hebt01G^DQoCo)k=P*Kdhinq(8Tv2rDG3 zw1diDHCs3-Ryg+Uy5)6E4{z?TkU6b}>-pl1?a0CwAMrt%uUSC9wIbgkyK6+SSJP{i zb>ukBCpa#Uy2JV0-sOjM!dFl<9|u^(1uhHJHVkh$rcajz2g##5XH)mec)HcMP9_AQ zwEeeCqB9))^l!xR`ehlxD{Y6K-|0H!2R}ttjS4b`CR=}z4g8iBVV~<9Y4GYsE3*A7 zmy^laO?J6kPn|5dxa)i{|J>y*sk&Fc3tEx?=9bFI`?t(dv8?8u?A!haY<;$y{r9d- zj?W`MKu;2XK6XW1>&twwdGntPWIo;E?W z=4DlMWL?=Zb@}N&)d_p$$CTKP*T4G@KU5Xlm-e9d(79dny1UV*xw1DE=MVXZG9RS= zCVq8UcG)eaW2b)ZQSjt z!+)CG_uHYbx3Ex^`A2bR#fzZ_$((0``WqSuNprxU-I?OM6oPs%|7oYk>i5%UrkX6C#`)%`P2UgO*obTAf5cyoJXucSHUi9-|h>MZ` z)z@O$(Dw^>1apGco&RB}ip1*nOT1-EXO+_Jb$@-a`x}8GUBDpCncY}^ebBi}_xjJH z@>i^zZ<5s~P+$2{%EGoiv(b-*-MwX>YOQagk8J$WH@n`)s(bEG1bZH#=mzaAsJWaH ziFRN2)@uByjzOmedrD*4EzzlG9>LX<>m$);XAY;MpNd{TegsL1DliRw&8+-La&jdG zrer^hDKnBja}C<}sQgi0?fTS;eJEM)b&bq7>E>Wx_Q9H}L*%wamrkJeG8IJ!ooty~ zA_l{B)k-!2I4EQYJp!`J+nh z9{6(S`u&W1zsVVob<=u=dG*>CQH_a!VA;M;v)?%z4(YBkdiV6oOW^ZWNK4`E1Ed1e zkQCeD^MMiEZIKmOQGK?`@$Qo6wqM9kq!^%RSGwxF%y@A~P=D8#4z5|b@^G`@`&NH0 z&fVQ?yZd04+v;zmzZ`EK-q%$>UaU&L{7wDUI44`}!db6_KKM)YgDsB>@{&L1QC(%L zvbxTh{%K(vlV{vvM>QCHMBWd-jF;*{P3+Ni3$Axu_Q`9##5mu|Ea`%&-TX&g;U_Nc z4BKYX^5bAYu331(5k@L4Hib66lgJ}1X1BVJU9q=E{P*lY2wVm)li3upo76wlyaI{v z`C9#c+>N@}VI+JZBOuU!mwhmIU78XkZoFcPEm=qHwvmr zg|vOeMunx;5oXN_i{wIDIHw_SV5DW1#p`aT3uf`R`@4!0er)6Y=v5q?nOZB+9-%Lf zre=5>=7k=o`WPY>oq-46RFEkT(1{ooMQX=h^l9pWD!869s|bB%-Qv@3-nSF|xT{T@ zWShOy3VmT!Qy){YaEjvkdVN^?)9jD+;T426^S^$-wzxifs_1oqe@nojpU{OBMkvJNt<#NPgLML*z zg!1f6ew5m7cZknr&3RP!TwcUFyYj0NK|#T=YStpQMeOyb{;So5u|1)x5N&y~?MSKL z2iokAAhfV7|Nd$F_jE+HQe{NFo@elaeq7uBtkdF^qT3@>BeMq&ioGP-Yr+*gLm%J4 zdC{{1UnmEb9i6Aprp6W#^~SGL>%4bZH+`!+RBttEu!vK;VhMdt(V!jGqF+US3Exb0 zegYrg#C0NFp*Dpbr{9ePS0=vaaOVsL1O*IswTdjL3)6|V^QTB@=Pr^Za}q~62zw8Y zE}!KVc9}8TDY*--IucJyDL;8xP#bj@aXm*poOi0Ea+}NVa{^1Pw-at(5teed_7P%= zU9LvtYDskBGL7g1(v}+}hx@m9mB#df-GcG~_MzZPYYum;@?>c+`$g`os0Vg^6NSz8 zr5$Ccmgr8c^X^a{EzUnw5PvY#BRuNY@v_Tb_a7{4uN;~kZlC!I(G4VZKJzx!Jjk?H z)FwWQJ+Q%%``}4figBJ9V}IL_in?Qz(=6FaIU7#P*Y|OXGp;Dw?{b)$x4QQ6j)CD@ z%NU&IHj6bjS3=T<^48U^Uvimo#N4??`*<5|2g5o{MUQJ+Rr6a%K(QImnQBt!`D7$x z@Pv14XI|+lsqIM}dc4jgiFzyPm zwJo-uh{zvqaF*SB{N`2P+HccK^@`K?UO%z-4m0_gWca>I-y-Y$M@1o|SQWpNCrH>Q zS9r`x`j)h6=;ARd&83|ni_N!OcaWT1{YvEHlXUjsN!i*ypDQ^HWe#?>RTF{59;;@X z3i8t09QCf~*|4ssyTxwb!OhKBlBoTu2V_1ti?E=EZlx_;jf~B z5~fYAt*TJr&TVDzKQDS1;GOwp+er&q8(~T9$Z*I0aNaku3jauB;;f$T)~3$kraggO zbKwJ)&4XQKCe2sMytWB=PevXeR8=-~pdIaIfy*DMocj!KYdEEE<~2p1D1N*n(a-mr z)fAqg?N6Lfj*7O7mQ|<@StsT-WmopETz?;B&m^VFQ9xm`4ToE#bJDL8QIOi0ns5#5y>qEpZc!mT?6u2HP!tj}3p z!%x2|>#FYzOutj~ab!Mf@!M_ZF6vWSHRIY(yy7AF6(AQ~YW_<}u}}Q|seN}_?7b&D zPyIMYc0Z-hi0=0|HtDo+C~vYm)VSwP;T(C0Zkx$5w`mmPwaXAL1G)1Ch9Dnc$BA2XgNhc zEBD$LmrsBAUJ;ZJJzPRy(+c}-B~h8N)VLB-^OTh2W?Kvv@gBbq+9;pUalWWLtZO`|TT@f$Ycx=P*~#9_zTd_r!}~)-iZI~*F^Wrt<&Bl=AN%&^U8!w6 zU|Z||%r3XhrdZ_&Fscg@appZs}02ys^17`Qk6T%PQf0rxgbq3b?jMFYavYK3kWu z%SpVmI%z4AmKeSMA?f3oKX>EnYv(^(l0^GG)1*`9dY(= zG4iRc3YYHtg%D4vhT;mh`zpait^qYK2bV$;bA1e4Q@>9$E&a8r{U&g!K|9I5w zK;GODCeyxAzYm?P;PvjLF!u4BtQS|bbsLw)_Zt%f-yh?VKCBqfa~D(=aaY`T62(`w zp7iAqbZSX$kYq|NB-XsgR7vT6gq zK_nF?^{kf(f?Vt~?^MWw-aU7+ce~{NTwK^i&7y?e@Ht!UBA0h{HP3C8$DkKGd4uDM zhORj!7u;SuZM_g&$^O}n>?qD#q=|DTc_gK@YcN{ZUY^Y zKiq2TimAO-bAR*J1m6<}*G=ZjHEP`{A&K=g!_E7ByDG$+Rp&0-(&m=m96J`?)W=EQ zK1G&uj5%490Of%0!S(&`D`Ky1kVS9HAre7TRbE24GX+rD0f@Gum!UU;2|p~QhjLyTpzTLet*K}JnPS` zW8M=!=eU0kf%WUwu35ci?Yi|DU~++a>L^!h>KGS4RoBbJ;d~(D{?rYl&$}a$#tn?^ zk4M@E$GQC$L+Zx4$S?hxTKc+bHUlADqC}0T;d^AOFHv^g#{vPDJW|+mQ@h8n-9-FT zH1*+2Jo+{L?n3pibKz?^x;Oohnl$Xip7M0K(y985>!j`Vc9v`bmOWJ6&7P~_5eydz zRo_{l?#NW<%+(~Se_o*eeu2lcF@MDA-nHMm$7_a>1!^1(sK@52tJAT>udqZ|1PZuz zQ~lEdHOWI=?xe;E)%UQnlgqFF*8hrUS|(=0CF_*kNT8anRL3Zh)ft!$450^poOd0* zD#X3+p*wDU-NRtq=6d(I?e%f{>*K=fNZ}<-qCNquZsR4&@(fr@^@VvaG%nf*q4Itn z`0{b78m?y=YTwS%-G0W2glxk2(mT~QLbX__9#yJyGCT;#A~hR|^%r{ds*iDy_0zJC zWT*=^&a8#1gRI1o^hL0-kS$mcIdBPQpw~U_IO0JYw;55ta>5#`SA9d-U!DH$W5~M? zA@BZ>ntlnZWqJi8-(%z%M*e^V307a*-aA<{+|DvqM|-q$seY47ub+0Kc-%VehMxh}Dz9>K8dIEe;$GEZre}ygg(>&|`fV5<&J*VfD#PGg&m%Yd7}N zwIDT{(i-j_4^a=n;uIgX*@ZzPxO1leun=7ER^72_QVR9qB2zf7JC@H^jSEn#n>Jk~ zY(l)JqkdSF8-~Rse}P=@8J4&i46bN1ozs6hryZt8FMRJTRPD;rK^iu}?&==b=*4QI z?q+qpPbO$`bO{2L=s48V{_6*TSc z@nE$kiINCGXzu|ckKHg48sJop2XMnf5SpAOjpB$KGM($iCQFgCmnOyP0UNeRAfmiM z8Elafd4Fl{+aV-K4LeTI&8D=D>T7uDVyg8G^7NWa<`>FK8gs&NEWe~btYe2rc> zv=9k&AtI#*alB}FGDy8{GElwp)F1^#8QaE#)LX{`)rg;Zh8wmjce|hxgYc3j28~m_2Eb?9EMsg;F>Ss>LSN=Yjy94l0v(4BZIqbh818^xO5f(Rs33o{__Y{|P zcf?FI#bn{SsY940I=fArdVw2+E_3?=$|5yacL60t&DC`AxX^!$W7ghF|4khSkcUAO zkb~>Rc`(&~m?B|W6i|+nYIx{jF^EYk|G|FCq%`*9CNOhVZvlvh+QR~KYtz1?e@^D~ z%a0m(0ucaBEt2+h6!(Amk@a;r7ECLPzjqEy&^6GrwqzlefA7{Xfo!P5F)=kY`FrQU z1YL@r_1|&qXbls{)c>82s-tW4zw;UWzvl<_19S%Xd;eQMoS8Z9?;X<*XwXb_^$D6J zGSJY~H>A#lXeR%LboDWWL^h<-OfVG7MIsY4XO1+J85C$3Qn6fE$^U&MXwIOy+u;)Q z(;Hlg9_<2h&;^fJ_&?hda06~v!Hd7roInJSf;n)X$yE%hrnln1;=91jzqT3N0`TBQ z2kw92*FX^5R>Ext9{`op+m*lKQm|xto6fI=(m&XZ#q`GX_T=>B0CWtcTV2wc#82Ws z<38iCGz_yFqkqtX+^{qZyQD?88k^=mQ<+>K5+x<+>S}5xC5c42P|$QWVUGXenws?% z0>O5;eEa{#`++%qOQt#fJ35{IKk>hGMn!1SOGUq;Kk21trdHFmzx97^f4|84_Yo71 zM-5P`sVRo&&(qlR=AajyKtE(>*NPr7-((8U&1Zf@nFc6+nxEwxkMA?TKr<)M-v3Ae zXcCInp}A=8_I}Yz`d>)DsQ)}bwNb0z7e1Reme%V(=yM66Ip}cqhuKjEx>~DO=Ivs^ zb`zpOH*H>8LCGjeGH_b>J<5K1>B@)c_}_Z|bNojttS_p7TN14K-)#U;Z!-RNsQqb{iTxRt5lph5LI)%_p}Snt$F(F$3Eu7Wi$Ro~R)U^)y61S*Rh~Y#W7RwT)_Hz0JtRX&c4b zbsH-u#}H-Zz&tD#>u+sg7-nbX{F~rG^1~LM-#=DA)-ZNpqVC$lu{tN##DUO>+FTfK z2%Xrwd#quiK6IjH_gMYJ{?Li)-DCTST(gPVYj$I`6ML_jj_sYOfwX3#8q#X|Hxmb7 zdILzg7+ia1-$cz=^~7FSuy$OY5U=|` z^uW%TK63?AQ*cMQ0!$_ zd2s2P9z2+8|C?GQdZ+%)W5~2D2%Z8S!H61?zZ>}fKmLE)0yw}0C`SVb0Ls8y8i4y` zf+ZE)Hy}b^e4nOi2vM3AA&7<=kcdGH)IeJ^$P_goPnXgGLVz-LZE+x&sAneyJ!E|W zbaYGu$n8DTa5@hKa5PX3)dE0nMh+5<_Xae31JFY=hWvZryuvX-$)+}9D249G#GyFDM3xP{R8LosF*d}vl0S3wx0hOu1$Z?8n94z!arLYG#@qCr1GR zvDIJ+NF<6I?YLFBT^(3#H4||`RYyiUsDQ;K`r|Lk;T!p33R%883TjLD#lh^71 zW0boNL%C^lFwW~eF}i_)wR5@{eh4ZJU*taG$oFok_b-%mz}}M>+N!;~sJ@1@=BoWrx|x4oj%NL7s#R zM?}6WCTph&pkFuGh3QN#;LBm}?DhtrhgnEUq@xB!uw{z5#naYUf~RSr2Bpw)ddOvV z#Tw6vW8Sl{EcY90=9u93q$+`V()jLoeD3gi3aI;}2P zi+ykmUN_k9C?Gs1*SkSY$PFNf_?&#eN(!DEd_jh#n2mId9>gq!+{A@eN^Zua&{{$< zxvfrcM3ZrRXJ@|H1kd-B1JCE42p<4^3*N04Pl9J_B9Db4Da1;W9Hfz92tVLo3@;6j zkS0QGSQ#(g>kTmze2e!?If9*wgIGYL@x}7!=;&o+jOQtQ=-^Y5Eg;VGoF^4StTahC z#y^(Kclj6743UK-%4r(>5#`SK>O_b+;7@sn-oVOfIXa0Q1jfdEFZt$h zH&+AbaXCx@O$(2@$hU2@hS%c%DX7n92sjKae5RjVxoNKQfABOAOSwUOEj<4VWq~qh zvlUj%8a`ds5BtH8%jddrpal!%?Y>JTh7iKr<4L{Vx@16EC=&V!fJWx}By#4`&4$oD z{ew{>q(Mt1K!bl+d2#dREru5H5c8fXXT)^l_`~Z0)Lot$DwbmH2^wb?3|%B?0GcpN z6bJpZA|okFsuzyf#X~H61~cZ0m=Y_f%RKobzl;8!ux|mTixE?7gLsS9Jmnk zp1~L#AyXkRHN6ln-?peIM25*bwxgu4pY8?BL<(V|!qhY%gM0KK#TVbW+|NQ!h?GL zIA6|Pc5xXWf$iDIDd^h)+l49d@OBg8@tGTwie!UwK0*fgv4u03l_EScI0#SRUsP%@ z|2YOB+p+QQ(6TGd1p>gD<<1pgJVkPmFGu2l@f`b$C$hlbU5xSEl%xuuh;Trd|MFyq zMK6+LJo}X&0%C&^CfDX4o*W6^i6a7_#z(G_gt|l$c1P1szwSfqw?O z*u~F+{V;>srSoYtXfIvC^4akQ3DCpN$ZLl3xWy7aAKHsxO_F~?PvUIBI{dUe4C8V6 z9N6y~=v=w(TGMqUSU=d~>AhZ1o_&y1q6orkC=Myd;JL|H|Rq&!E8~ClquCR3CdA+EGb?}4uP6Ne>ROdiG%_^R||h3 zNFJFUoq@or0v6tF7|+!J&JwXmq0qty6)HO=Vt+)isN^4CARr4FF??u)Ve&a^4A)M} zYs8aoXcTCGIUK1VQ$ipJ>XLGN>?LIWQq1OOFc;Wn3OEMf^CH?3D?iMCg2u9fK5T5d ziX|dA%K=4|lDUSkj?8yl2^w$CU~>g7PD1D-FG%I&Xpd#n@{aWw3|@r3PAClzkxPw@ zgT7Rf!Y+oB?O-L2p);5pSIUuaaJUPBa!RVnDl#@UkL@TM8h~TdU7R9{5#ew_)k;4v zk`LKIV;>x2GuS+#gfD`A{=!l?ci_a1vj8AA;{B&>X})5uG)4+-X;g_OEl8Q=;$Tf| z^!9&+*_jBA1_jsH7+oaanCZ8<0*b>oE+h@BxKyw}EEX$Z9Wr+${j`30dPR(I+Lzzm z$rS((g*-+gF~;%FDErbKH^vC@Y|NKWV+$EH14Rm*J{Taso_;eU5#xCbZ!odT%^P?^ zpPZ6Orzchqa0s%e0^xhoS=W~ z+MmniND__l7gFT*Yc1BzfqD|H7t(uokW4^;R3c8yG{%e6Nphcl-#Jbkh-J@Ufm~@K zjY%Y+i{+tqp zuhRxLcw%$Fmr&1sl0J}eXM-@2Czchl{K6`%+up}iVNC4-?pa$jQn3y=6pa^1~Gnj%YPUP~T zyg2z+tNYg=Yhk~$7Lvw-{Efg;LCi^s+?XM{rp!(}l(g0<$Aieqp24D-9Humpguf7@ zRIV#upS5NMz_UQ@2su>)EaMCKG3g|{VtZ2Idf)W_fh`w_MQc?gJpV${rlkYX)7UZZ zFGfmJ*&v3)Z5~~CBb%oF-Vnt4Tdj*|-At|YI88HSI1F`9`InNu! z$pa+b>2!Kft8!UHxEvQFSO%aiP3(eLJTpZhU>F-ePM0hFj`~+%eyL?4saJzE7bFN( z=|Rv>h;As~#63)?aL|ER_6(NDWeO67&?Z*ODFOQergdTA3LXbVd4UxofuvXpZK6gV zyV5QhSqZP_fy12G9A-li46yAc)~`34{xg@{ZV=xNVrfhUca?nn-MrB9gA<3kZautx09;aO=16 z9WnrR{)u6!f=t&)=wJ9n%AWA$GJ5PxyY#~Uhl5pul+a)dD^5Bm^IlAd`wzBSAq--| zxu2h{Y?pZ~<~Tv@RCd{wCfF`(xZ)U&2-?zyq_&kADaaOxu|UDJEv*$RGDUJcUUWq1 zle%d&vSlm8JZG?VQh5x6Ng!tKQj+2g5}B|VaSUH@v#Ed$(o$5JTt0y)x(;n#!;5KZ zXGMhPHV_kl^^-)RAO!#>n)GEb5`x2H=LPUw<7@W>ut6+L7bTjQ@Y|Byx4hh%M}thU zYXlXXZ_`s^q}UwC?^f>fYV#o^Kl*?~6>2!sZ76?Yj3Oi3&Cf z#WC_2IFId5x)kN0s923*u-`Fk6W?335Zc7!bxG?aHGZDhxlQa}<&@HBu@9X8L|sa} zKR(dY4mMisU*$5He4!kZmzp$|@n$3DL*O_nc-QY10XB<*-&ZA;MIM zWzS$)T)tS5NT>4)l75l;!H+q^g2%kO-|ceq0$U_&r71#qjqr`qVuL6Hoh^O&BR zV5?ZbiHTv*`MZ-!H+yZtm15+M9mM9l$Y4Hb@-)44Y!O;MS@SGNo6?71}g{m>7OcQTWDCKu?GLH@=l7) zYR7N~H)3P{lZ@xB`&pg#7^EERfTD&-<4D z%?~@~3xxuq80r!&cV1zWgkXLb`U&WFHNZ}lSR`HxuhlLkeVMAU8nK8M!s`wUqk>&x zu}HNRw#((DvSe~9#ANV%sbKm#pg^pGmC3=OMj#D6dE&+9phg*p;N)F-390 zwQxj?W$VE?l?sZPQiYHYF{M0F#*>p%|5L6+l%67$Kx`;!hg=j%PK9T#U;S0C6wcu) z5mAGGRq4Fsje-&f+sxkEzc&G1JC!xA6*FPGF!m`KOP@zu=GOz_F|_+$cZUF!E98mt zZ43?kJvjc{ygcV&6^d;%4g3S; z;Vl~5J>kDXAV!*&w}!wT2nU zy;lCQERrWRr&srFuj!Z}(+fpdv3dn8>X;`iML?mM0?jhig4IiX@dFH#e~8sB=+)`M zSyHeJGe5&0aArQ92BKb&V+d0$$8vPO!Re!@9*Syz@YK%nq@y`7%1|1zSYvF|6Xww$ zi?t3lv@VD>c#G41OPb+h5bJ5+nPc*eC;cssQD?{y;S4-`4OqR<3&Z;$RuecY)KedI z)lZH!D~L5SWSK3rJEHKwnO)d#5YTbvP!Gm6cDY<22baDdMPYJ1ohN=>uEWe!>mJza-1nv4*O~Sj6!`_Z^!8C#$Z&l zqny#jqQZ*Qp`_4Qm}24NY0-Peu-RihEn__iEKf_8C+ua*zdI2^q#tmk zE>8{{MdUaeAC^thb@*Z2$=G4Uc9^Re$A9U zgk_5xMr^QbNyEtRe`Oo^JKME|>}$-gSQ>M24ny7J_it+A;1fAWP}N|F6hlg`6_M6RZNJL?nukL~SOzlePP*d9K;@*HW7T(Aqv zHvP;*}AlcUFdLw~>7#X&ShWPSVxZD-+>+ZS*N-E6vs8QTax z*aD#;> zfcnq^SOcf;w+|4N^t(8gmp3{&dVLDl`+q5{zBxs9`+3UDjXWiAdpYIhra^z~N`Lr& z=6rs66bVS2ZqJdv$CJ#FDMR>KUc4*)dnkAE=FLc`DtrP75V1{i5@w15PhboNJOT6uUNH2X7jObn z9{^9Zd?6Xa{we>?4~~YH{=gMn2!v@B!Jr(FLm;qi2~67+3dx)>Km?)TFdrfVY2c9@ z5^f}9>Kz5srt^g?g`&QThS5#SAqj|u#bV+>9oQBRMM5G47ZPCfi$oZ8O~RzDgv2`q zrg^M_#B((yPHP}JwHA`Q>mZS?ha`LhB*W=YA(Et!zj`Yae~+5$;! zX;sP2$~}1%(%h<@*{Ym9s$DQ#lv7zLt;{JXDy@+2u6VVlBB!7vuj1$bgnyHkl@^{Y z&M7I#QAsPS%JM3*VU8WrT?K_0uNhiZv9lxRY6|Ko`T9f(wzmR)j1_4 z1v5PNNL8h!MgLUrKat<0xfN9@RVA!co;0tbpfE>TSh_O@lMHJI zTPwGspd?4S6N)Ly!|FDz$cLH3M=5N|yrR4Us16hkLlx4TojH4U<-oQsQRPXI?}sUm zhcy8lI?DqXMo!SKGNirvC(!j4uS!fnJY(2#5RD_`0WIR z<9tLhD|&VsTDR=RGTr4-%QKfZEZ2^)jaeR3AM-3mE7k~Z0kI{qCt^opjpOX%oZ`ab zR>fV2dlqLIFNWLp`1*K7LViML!l{IB68aK`5=IifOL(5}a{?~0BJrEVD~Tp6*ei5e zR|9<_Ah))z0{X41R{?`oBB0m+{nfF+7!QnB1EbhgfYRF92B`RUKq0n5Tr+J8&`MjM z2DH-vc?*nar>%$AfjZcpwjL&J-2(KtqyfV;NNC#tb?X)}Fxs#I(6*$Bfwr|Zl!piU ziNI>jnpr^S%sHS>0EX5EKp*Y~cmtq!#`+AP!U(lh222e)0DaM-MZn0q6~74Hm?RK@ z>ACa3^vqd6O*I9SR5~z*hiFqepwi7@AUYb*Qh~8d26X1fV$}jvcR)J^42iH7^I?)P zaugV~&WClhgq1RC0ESSGp*2*@qz+KeoP!#fE&?4d~X3 zT4jp>)6Wl>TQ7pBMT1{7uxdB}OwJJiZP6KPOwZPHz~bzgGr$u5hYleC%X4R#fJu*@ z2bfeHK!fc|v$3%OCPyiNVFS3wjdXx1Ow>7|33T-|g@C3h)I0)A^a}KVnGl!=kCXx0 zkt4z*fDUt5hlfW1cJtA21n^pb4H6E>ot;#gIS?!LYT`!4-!iuM4=`K0xZIhHUnz}>d0#bHc(0S(c{1tYK$}kV^}NWBY=A3 z$Xq~apf>;t-P{zIH25_DI*ge&0AoMXhG<}Mpy9v)U}aha%=4#z0674&N#kJP-iNvnu#BjX2OOIMu#!u zX(OSZI|s~kfqAQ}6<87$0S;8c6l!hdcK}${tN@nKV370BR?Yny4m9`yCNvXEb91Qq zvgl>N%GSo-7O>%t*w~POEeZBJ>|aaG5@2a-4|q#tZRrIfOrB+crdH+lvo3c42fhq z%FY00L?VX>m>fbg?9k$f=3HP|0u8bRn9UWI9RUnY;oKw821}p~>XiTs7zLIv z0XZ^P6R?kzz~?U5bgHEWKyBJN8a7m(Awc<5`%R99d@TVE=t0+~6AOv%s@1@-4f+!& zU;sTKt!))Bc7lGStqsuh;21G#ZEI_Vqf!VctAu*1U}|fd6EIFq1*Wm9L^sxfS%+R{$^6Vm=Cbo~Ee@67|6y3)V# zd$Y1jAdr9vxd}=Hmxv0~!gZ-NxB;%X?*+B)0s(0Om8z{<5v$bcbhA@Bn{=j~ez7y{ zputuo*MwS^>2!ga!PZP`p)J;?PV)Oa_lCvJeBbx|{XaKw@7b5GD4=6 zjz5?dkdd7c$wbGH46H83{~?RM_I_7?kXrJS%+VA=iUK!dOf564mf>RX^<{)*>`AYk zFftSC@d?oxi!&By{+ge{)Z_A>tcxIUyo!rh0n&1iTlPp`V4&wSNBu?69Lkhr_h$|) z{UAzyOI};>fB(Dn$bSyg>n{7+AAl88V|&Od`|%N$Es$+1P-+X@G1WDG|}^cfVGE#QkYp8eo30fZ|GNOL38=_9K)9&I&P0 zIQIp)R#4xd^+9~3DpjxGBUBd=2{9_%|GZq4>i+6-h5O6P?%S6w%1j$RrU_O}k27{K z5_vk=8jCdQEFqDxgDGSz1rWxs=PubB+{c}KHfTZnGXA64`BQ1IxomCprmn}$N4l$2h2`so4eQ16 zVc)+VHoP?z8@TYjtRl>wtruh)xJTPGYukiZ*Ym4591^hc0dDb}fxTnB5VL`M<%Z_D z8}Nl6pKVMt@OQ~uZ-;kmkLK3pFcm*80*sL#yJ6`O&aaQ`&N6)8Vge6FRZ*`R3!>kI zZ>mA5)XPk!(g@bf1h$9~`_Cmb(D?)_&Wlvx>;e+&Y~i9e;CKUA31B;LyP9zhLm#`- zwv`(>z`4Z^wu)Z9v#2y}Cozd|4h5x;Nh`@Rcw%ra#MXie_f?N7kY`Mr)LTEHWBq-V zgWr0oUf`O=8TmO|Cs$TZ=8bV+m&e8Ne5LsCJlQ8N=Z*XVemee*lb6GvF+v8Cenyxl zPOPl7+iqXG_Ki23P63b8*_-AIFFcCpg%_mMy1LZrkdVQH zb$A934hd1K4<2l7-MsnLS5Kc_wW_J9s_F`!H{Mvg)^4XXDtS}6|!c#~BExp7q*#|rc36+)Y5dS~t{b_jny@5Z9 z)}GKb@!Uka`1AS5_wVR6m6cLVa({m!wAcGnVp+LdtyZhVA9`R_RZ~-Yd;2Q!*WT3R z^%fS2ogJ^jLa+Cy<-B)K<(2z761oRH@P5qa&*B$@-w*0;i1Mnu_wJF)z@J*JPsm6r zwU%1%?x!D>N-iH15*Zg6XUZgrD(odB_;BQd@yYM`7_~Yfp;WB9{9XbaaoC{2<~iof z1^+mITi5lT1~=E1NMUg-%b66RAvh2sm38(t>q{W#J2 z{9m>tTRmr;jUSELtdD@P#@X2K_R$uwMlhjpZJiaExljo14<86`M+w6+xY=7V*@UHn zuieo8Hitt{+7O{x&$I1s^FBIvx`*LzJ+6v})c!}KwsJg$?x+C6$zA6}Qb_bI7as=R z6WC6j+(TQ1#dIG!*gJOj5w}AWG<3XJGHhuyoM_9ACPak6AME-4~3y73_ z8(rN9!M*0xyiNT0vPAr*l@xzHu7CllQ+-sJ&MW(GX&QC6FMap zT$>&9LpA{nKbyP%%(SOrf!9_7KodX#4w=VNx!p|Ac?aLju4*fx5*@wv^ zV~wE(PYWMz-^}0GeslXb+vPi=b|mf?yW_zfGk2`mv1Z4X9aTGOcAVVt+K$(E{CS6K z$EQ2mcer=l*`eAwcxU3y)Sc6I&fmFa=eC_Yb{6fd-ud*-=XU;f=es+dJKJ~O-ubVc zfkjb8T+zs)2a2+b78gMVqR3WMR`f(sZPCj`uN1vebiSyq=#!$)iaLt^Ui5VlQyfwp zRvca&QEVz6S3IS7M)BO@CB@5%A1&Th{8({CaaHlt#m9)#BHR|EKu9;w#0U z6n|NKx7bsBuQ<3wSCUvVs$@#Z)RHA7n@TE5o-TQzHPw$WB%tF}FDd(QT%?YFiD+wW|Dww<#Hwl>=p+h?{8 z+gG+9Y|2t~X?ST=si|~a>6Fr`rTL|WrDdh%rH4vSl|EPceCdm&FPFYidam?x>5Wo% z>Alj>GF=&0W-1$3mR6QgHoa^~*`sBTl|5Bgl1;(X-=c4x2G5H*FTk6&>~=b%RoMTN9#^3K`jGHi(JY88_XKGjw+HEK4rK z4m-faALJe#`dIQtOJVv+?7yxY_7n>F8WRwNLM9Cvk$4J)6m2>q!^YJxF)0Z}!-l5( zY}8tYO=kTy9cf5SNk>h?M{Cn!j0u~EO&FCy=sxIatunsEyn_H~NqN|GMlTuPApoTwV)Rs_FggH8Wa5cBhTxiK)SS$nwuQWZyFq#x?k$(M<)26WG z)fBgm(WFOj9K6A>d+4Ld+eagxfSN(+`Vk3RlJ|^*E#~3)ki?>tjbl!yg`q-L!|cSI zq}-8FV;~QRM`i#G88J?m5}%l~I(0n54AMp}idoA=r9jqz;2vW$PEG;bBTg{NxR5oG z5pkNt)gx>S3uaU=(9KU+Rxon*876$WHg#}j!iHfhl6S&k3=_OHd{I>Ckd29psj>8< z<3|pAbOf3;Z5X^O80|wbDTzfR9v(LZ886puPmm|A8vP0|)Zk&UDMgk8;~@vksfPum z1X`5irviXx&4|HICKir{KhUKc5xTJ*C#N{ccP-ixFHxrVoS*{;4 z(dgufkZ5f-A zzB=9CrYGDd6C=@BVo zP&_h?N*RwvF)U{yH|bO2(}%96a!cmntErFTVWU?wL2;VXdUL|=VW$8JmQIPMugA#PzzklKkTi6} zNB|$EaYK{LBa%}_%(JXbL!-lGK3oqo4%BvZq~C0z`2a>NcxS{jNRH(czYhN7g0 zM@>Ny_b@@0K_j9zV+ibkb)?uI^-m@g4jap``cYz+99(NWJ$wd@%&lTe#mYJ3@Fxfq z)NTx`Mr*J^J5bb+gzzHm@R+sn$)?o=0;!>s){cB>EbLMz8~X4lAUCN?nNE*Jmy&wS zu*{U)RP-3?dn2ApP0WC#4jxwh7^VI=j3LVh%?{7e9qS<2IO9C%*&?Xc>l1oJL52jZgCyGN7k zD;&dr&jgMeloGu*{`9c%qvpZk4RIET9uc?2v?m!oIq^*~gnlh|I(a;V4cWxFzIh^P z56v2sfPQV_=~3g;Y2-@}8}&9bXtpLNGFLyA%NsR|Ce1(kUE;@XBgUfwMSe(aC-lB*SDM%^=UHh9fnwmSmMv%#_8vmJ;a78}@UCsJac&j?N?D;Rh1#+BJZM>z_@t!U<1vtl5R zjaxDse%x<%fu$ssU|zYsqg-deecHP5^jbtWYinJaPA9v;%drqaF6JOq&=HBcIR-<;2x%EHnc&X`5Z8$P+7}3lz1|$iD%`T}buaM73P!(p>T18ot4$ z5uCB!NrqrtJ3biKj$bd=2evN64dmCjkIOqHkaqk8X!{9XXYdm5B=7B8|NZ_K0{?}; ze<9Eh0ewu|sL^9G9+)(F%0szx=P&S?hx^!|;E>R;K@pMKsAyfRA$9Dy@oDK39?Z<* zC;H^-fbb#lBP_G$h(^tj_$2f2lo2B>gOh#2u}xqgi8{bIWizXmgYyKvJy4J)EZV{` zbu6RcD~-XWzcbtgXG+7=sUpI($q{j281Nx`Nq>;ia2xu1_@~=nZ=cc7e!abcRIWik z8hBZ%ZDCKBwV#2uASjixwr96bUo~oy5I$LX66HdL!wmQAY*n=V+V~3`YY&UkD46l%V^EB9E%$4mYj7`exqBS$jZh|n z?Hlawq%hHPZSq?Nd7%F8E;sL>4UgvJ=@N4+CSBM&V^{s9^lWHV^DJ@IU;6E2;fQN1A$KHO`Qfvq{)6qE*2(vQyl){kUUJhvcEMU!cU=L?urtp!i4;!GFsO(RsqX>1$UWMT3C1M$Ap=SF%KaB7rH^_C3ZG>|X&i!p zNp^u-*!5Mt)`P!X5R z?lv42)-4drXc+I|9o|8gWK+Ch=HcE@^U!OG431{~t>y^NCr@pg#|~Ox_$*F zZJ_Y8E#9h(nR>rLrk{k4_ANK+5iyU9P~lGn9;#+(Js=~z^AN!WB+ZJ2y{@ps6@G9X z^ss&Gl>hAa|CFj2AI+eVs5BK?LUYR*dsA*PjFjlCHTYHjRPG-Lx5vG8vT>a86@ z)>Mt3D$=ZX#qPJ5I=jB@xs6JQVXO$#-To~F6HZU<)!B(83dX`h>Y1Jl94KGV`{d$TBn&qVlyMKlnKl- z+?zTZ%ydwWHN6|Ob+q+r32ZRhKr7NN?479{EuA1!iBgh-a;3Z|E6q1P2pfXt?2UQA zh~VH<=1!>bP;u%qf=bD$j8f|QmMV$FBtu6Fs86KWOMqVJ-Q_*k;@JpAgi7kWXFOZc zmeiHcK%%_MArwB`JGjN(-@IzJxY;S>PP=qsn&@Ou3qP~o5N=q31vd)9x@qXA4KPtl zKO}}W4;r{hjA~L&CmP&EF76Q*gw0X!9WM9R4)?bXuG<0c@McY7vrwB&ocv$~@G0eK z9@60MZgPLq#6OQQ>Pc?$K5zbke})v;WvA-{gomc_KM1$|WeW6kfx9dhCR@egU*z~{ zXjb9)7IDl5J5@7<+HpPRU{2;zsatsy$X4nNT<%;|6tGkGMO0>~!?U(c#iX}}W52T$ zI8pQ^r0_m^L4$j*%bnbm>AvG=!6v!20eDg~f_cmIR!WT0a2MP8@y>XQ@N^EBzg`-S zgl-HWf^wlanlI8Y51ZcLb~phn_fHN5Y;4nd%M%ExaiPwdx)>_Im4O5f79$ zqk6ZfBBJ%85V2Xpz`MtC{~%}0^ebGsD@@J@gAc9yggWdGc=Z6=+-?HU!UDR5mrVBS zq>U48>jw@Hw}{aUVQB3Et?O^r^J5_}`_q>7jCSM#y{Z@q!J@yM@a%Q9R+1?58Onb;1JCK0g;>;F5kMs43z6eQ zh}?QR3`3}QMg`Dp?{5dLI-A;N#TBplBBc6p6ywQkDR(({MD$9%-rC?!y^gIEh(IKx zz`AUD?ZC@px!%+Iz1wnKrM_^rQ>D7lc@=AUth3rW*e`v7STA93qT`&>aFe#;HP^GD z>r~VR+R+9_M>k@&_%{{v+7ISl=v1jYyAI}d9rOm6l@p96y*xQJCDibBheiu|Jj36m zxRB(y+Jc6}{vTQtbEeduJ=hSGrp$)_JVdh~?<3+1?)P>+fM#8(*+f_ep@UyjVAj?r zsC){H{YLW-5CtfO3yF_lbLpHZIk)0>=D(vExC?%!JY{jYH4D>;l$i7u#Xb# z-G6sfxc}imzZvH63~9?Uuf^ERGB1}}WFZ!~tu{k0S2lzC%ZO%{4e0AHq{Mc7Z^sZ5 z$QZ(nb|9;Fp&qnn4q{Me=@dH)sg@P`S|8hny%6OOJv+M&XfY z-U-SpshOA2X4MTR`n2%nY*8nypPB;VvA;b>S558xCbjq4wv`RsrZ&)4z!`x<3_s+z z5IEo>f(SDZDheSF?oG-Ovrr3S2@@7wS~e3zmRCk!0ylku9t}2+p)J#GXiIKCS z+kQAQw*3hDu;!$XJM0tZb<5g@_7l9J{aN8R8Bl}v4Ah{V=sIleI)dpdf&S~wliQz_ zL}*R|YDh6R)Eume@2ab6uge&!{|3~6wX3et5-Xwv?&M6!z&|$=<%2z;4Ryr0q(bpB zL!5|eHwsYMJIaBPhoXpxkC&O*EDV2<)Z$*E$Uqkej3M!Nf=)NR5*7hO;>I90Pw9XR zm>nS^+hGuTzrlrLF&G<~kuFwL&#E!HuyY9)&tIHUvtSn!U0Qg2f+o=K#Ti|iL4p)a zh}|s2Y~j_a04`QADh>At_5eJ(DP;y$OMhnFPJd=zzigA{TiPb2%sP8ByZsl$r_4U` zdvV`7HKyLo;x}_=T^dX^O7KuH)rk3y67xkg_ZK)>usBB*O>7yFw0vb2I*+hwHU!0p zj_=?`Vpha_f8dnn$W{KCbF<5R+u{D+A$Cx4;wDOpw}Y(Vs{H*C!wCKH_!fH% zQOT@YO}Kb;GpkfK;9y1jLCC3X=EY-S!i3q}qGrf1pglJU4Sp{yA>hH!a_?@I;@dGL zk9PF+RmgosQA2>6gHqeSoK3s%eMny>shZ{rn$vcoF}Sp5;kg{rM-84_1cxNk7PFm-1L!30T5_+D}esuY1d& z&RrR;vRCHN;IW80FLI9@+*?WKcRV8+)K>yLh}*?p^7H3-qqHoH6Sj~;qo zbe=O({H=z)K%(!-2rYm4pqLQs?vW02h?h0UGxbUw zZ}ZB|UlK(V6ox?VLLN|!{f!)`I~M~R)O-|$n$rtfIY0}aEQ5v{nb&&`NI!^Gr224F zsMn#vUF(Ea^5ag=2m+OGGlfbt!of38NRB1kM{ndv(h86ig!n>(dv2TXCkxRNdl;Ht zq=LrK((h7Op0tV!<~F*<_fp_-!215`(7Ku0Thx^fRoowEHMry2Fqs8Afi1@XM`oS( z%;~F803VGC*;nQvS_3E{T2S7L{2*oyvi8qvP`obEG=KxQznR_5@Rd;3PJw9>{18gk zB~AvKGQ?78taICb3E%Fk9-CA`{x)o(D9N4;=V5+DDvtuhim zBhCC2$kG>Rnm++Gh6lzL3J7_r0G_odu=39|nmn7JTa=u$ROfI=Ol1d4KqOOxJyt(b*eUD(Lp=Dlc<@rzMwdS86Kfg5>a$e&d=o49hs+G!Nkaf3Ym15E-Lw6H5(gk0U zq`NuMoaEUo9xTo}3t6yruGWGqhpx>aa6T{&JS za4d3vWo`AI{f7@ceZ2Z+9^%%Y_s$i5c#z+3Dw|#dL!%*BbQ&f)k)+dTht$NKh}^+OF@g9J_)y7CL=X>J zgUUy8qA_-wtrX`PfnLNQG?PtgR>{Kx(R-*O=IH+1gK2TKU;#DeR&JPMJTbB2`XEm= zAMF4Ejx&xJv$g`2oT!aqj+}82+#Bf%thhPRy;)r5AhDGWm~{`!f(uuJSh z@UJXhh0FantRQiC8Z12hW+085tBCCY)>#t-@oy$Ifl+poYm(5Tg7@jCbGMxn>J0%n zm|oBS!Z1N(2?TI4`Qq5@1YxRTy%RISObTyhMgZRLX2?v6(k$fTKg-@&(P6$`Z~oBz ziKB)8h5jy9s^Daf0%y&fATr`2h%@#JRhW5@GSeIkAH5pm@;!yM)IG()DQAg{OTlgg zHx`s^rujQn5R7n88orl|Uy%_M$G1o+^HR{F2KP#r`zwe0I|m;G;*D}SAGAo&EP|gf zf02Q`MPLLsqyR(jz%sact~k9(mr}QTQ}EKO$?w(Hw}hT095YGtu|pM0ywfXAvWZ9D zKT6$B*6Duh$C6dk>nqC_Osj<2Rpto6xmJ!r}hS!){`PeBcBIa9#V}u|sPMxZ}NoJWo zP-LssBRshV8bXDCtr0=-mBW5&p?97^C1kIK3BH`Rx11<8l_pg9+fs_9Hb>h5q0d$c z%a(EF<*H!R8pHTI2Su{<*OiF0X|G=t-daO|T4;_2Co9Xn(RE&%-+F>mF2V>VHWOmi zqX^uC{+J)8Zb$OEUtv%aKS0H{U|rP&-k2dwo#ijF$z+9d)z!goj#T?dphFdtm5%{Ry9G+#nImi$M zrlNyeN}d=*`z_pO9z_dE|b=T_#C7f5fz(wSXDJ5k-!7|63!Ve{D znOGR4$9=r;eEO13O72Lj7iGOE&&+f`>go_de<^keS3yDj9fs59BQ(6IciS#Ku!LXR zCxF`EMyGpyAv_yesG)W2Vsr*Ay$tjkN3ZGhT1c<;^s1oO5qiB&ulMNnS9*2POSuHE z!FU0%nl&P)SYgr>x?)@FBgD<~MHcS0CBzXMPJtc~>vY$d+%uualZ3k_%q|;u#o1ZW z(_nP3aPej$&&1)~-C^T?aCWD5+o(}9!Tm+6uEKKcTRXFc`%z4C(h_3;x;ln57LpK< zbvU_i95$-$6H7f`fn*!EvsH*48d zvFopJwZ(czHc^M1);h6O-}}EU#rV2GhU-qO%Mebb;1e;?5r&WhlJ+U9btP1dC+YPH zUdV%*>rEJu1CH@$?dNta^Q-IkXB4Kz^+6TO_Ab-4P_!F(HDGcOsWpQ_L?JdJ0Wnd7 z?D8zW@~$Dk7OqXj`}N(+pv)EBI7HKx+;kkJVq0HP>TwM7H7!T6Fvjg~Qt51%!P_+?jeeNq-!N9Q>Zt8E=2l|3h`WEQ55xKa7x%X~_wsIiQz`>Qs zR*AKEuC0Z*B;eNevA?>Vng%C$TNM%KFrZ&?3Ns#P6SWszahm0%5l3xMwmyKZG4Bv8 z+~c8%V%VkVRlDjhHgM1Qu>VuO-=gf{SzEWs$SYGXs1)FpoEtaJv;&OFZTR0Vx}>Fw zAHZ>%$dI%Ibe+s>KUr@c*Y%9G>%{*UMs%I@$}ul1EXJ-n?@ddbsjF^URchDCX$Nc> zgDT(`4nLJ?g7;>I3aeVaGu2e_o-EbEj-v(=L@Fe!MK-hUw66h}mC$6T(;&wtg|vG0 z{K-WO9td)M=)|TX=B&$3Y${HuznGE}+nSFdX#h#!)5}^jxFf5Q&zjYlh96op^dZu= zwtsUQqf<@4Mi+*|3YU~0CHjd&bJ>Xjh4F@o;X|jmGutH2cNN~L7fJOIjxMOM0F+^w z1eEpGMN$=Y)Mf#NYy{3}bz(%M zwW2j4;&np?&qkn28C?}tObFhG%?9ry<~WtsJH{NXGJEHm!z-+<7||H2^=40_<$J5x zi%V^kyS3tV^IUPge}2W930BYNPV7xSO~+HMo|{fc#MR-5swK?xMl&)0zXqQ-ee7?Fo%@gGk%a0GXW+VHn5JiaQtIK%xZ_A2O zeZ9M>_9e5q->d!n>_&2XG_KzU zauvu{a5mVGn$AjSZX;ee3ac3S##i*V-h{7F`vRp!0g-{EkRVbvtEAMV4&(iW<&L++{Ebcj7WMCuF3o{9tgFz! zy-v-!8=k*8Xo?(%y)7!#Xa|r*FRmHa!o`S0q8s>fh36`r|Dp6FI5>cIgeRPx!!@B`>(tqVkpmwCz4$mNM{X(jzzAgJiq;XSF}=|+x#DfJ@{fp-(Rsl{ z)Ik-obE~jM1Cy5;N@V>4^YB5~5FvEbb<&7A!}hvCk%?h;t^+5nJZoD-6<{&0X{H>U z*T%6gF@uZXWBF_G)FcTp6v@M$42jQOcNT zZHz)2Bh#{smX#}6nUd8jS+$Z?YS|bq1TE#!TDe?_%fIAmtz4;;2PhRVKYh^m6jMd82T3NJKhU3JnR*(A~v`TffR?RBaGNoFtRR<{5axE1ay9WxTQU-6W zGDZt+fB||&8>@_pRqA4u(Xq;ySZ!>q)`vwsXfgJdztgTEu})U+iuDENa1lg386Jw*cOR$pcW+`l_dB;Ylbr|+%+n)Cmt94j1_Vr zD&TT@QejCDa`~{DT=WxhqpdSqc7baxQMMYgF;$*R7WW6xm!wWpXYD%q`gvPH`$=&6 z>n2ATu5_KO@2bNp+t*H#4m6+9REtnKC zFCAJ>OoT)0rKvhZ#nRSVm{|_S3U}2pPUJiInGV9y_24s5%?b<=prr^{{Tv1Zd4R(J zg6btSH2VrxGbpRa{W{t!#5OM1}sBk~)09YI4Z`?SL zb_1!zTVF|5W`X1uDJBC^?j@Z$rYd*$U2Z5cihK1__~*MQ0UtK!LK%O+rT>r zqvZU&13TRMnFoKSW)YbOc?d(y1OJ*8^ewGf?>dd1ADlMKX!oyK(J>xbNo!WKt9Q+c ztxFcEVYGZJOj!*E#MdGN;*(wmgjCpDnDldkU#hBpw9PmUs|IlFKVR-?*`p@*Ti~*ajX1 zwc(|oZIpNr)Lppa6cp~%v2B;$-gqAa0v#@e@{kx1Kueb#8!^uU73jk;^@_}U&tDv% zR6llL82@C-{^_W;56cko#-+$vB*@T9#nWnOCHGH9@-#yP*j(6KtWzB@L%M4VVN0&t zY21dLZyeu^hy;;;)7go`%^hMuvsR3280Gm6E#2cZHkfRB4gyhNpZZr0pahda8Paym z7fy)3-E!&~?p>D#leu`Z0BYEe>7=xAJh8#uD)Ou5ztuG0BJa$$C4Z@WX->v z{0cJOx5v&kQ52lxMGd9n2srE9yE`vA-glxp=!zuzGGO0+z&5=k)nL#zxW_rTYdch- z5Ykdy>R$zs~h<*|%K4;?PQ~D5I;?{jC!s zc-VK;1XUR1no||HPW7K@yquC`?AU`>spDS^lSgOZvROW0Prj+^pfR)kAZ~oU-F5Ii z1@`Cz_O4VKKGB5N3hrnyni=dfGLtx_N^{_)u10Iv7$I8^7l!YZ4u*6XSG7=NoOAW~ zLZ*$oB7LD7kp;U*NZM>)x0&X|IO2#-y2vHFCSc9r=a3L@M8$4vAyz&7esul^KZ>lU z$l({cVZD(DMuhwKy%Bre!x-Tgo1wH;0XF&tVi47rVdaivBy6kzs_~9fGfZGd3A=MG ztRm=~^@6xQEfb}v&vo`s!k> z>^L+7EqyO~7GAL;+c3x_e>{GR$<&$=YWS`N^k(aX*1^616?;=Fo-$6j_Ibsp@*A|6 z{5%zRC8u>w+Mf}}RjtyvPOy3g5*#Udu5Ojaa+0;cW>3*;s#bCElPiRMdQIIb4n8V{ zeV?8?wFN9BX}9|PGQRVI=Tl;xaM^8vneI;=-oT1;9XC2JV7u*82OL#_6}kKO@6N=I z!=3JP9kkj8Weg^wc+3gpF&VKUDg{ySY*TEjttr_X0JcNGMdGwK;UZnglRW0a)-oS} z{s5Ua=(WU~c4}`p^|2nvs^yxMU2nGLHhD7Jupzds6g17X@lBrPS9-WbS1Nj1k8ll- zsI+jyc)E7+qk~)BV_ZVPcy8V@v2O{fn}nI$NHKAHhbS=i8@ni(j=}MT6PvR6F8e=$ z>G6e>7Xp)9U5!}@Uc6yEcizPp7}-A*ltClUM^1j9k>79Rj~Mx5M!wdVmWM6&9=;KU zmBg<|$%I}dnHx|F$jtaN69w^vS(9k z5OxX-UKE74<=S^d`$bl9pRXs^QRvBYZ0+j6fS!eP>&@fAWWS!pUiSq82%DgcN8T@p zL#`y811ei`q&uhKsF$-(_yRHR$LNFllY~eQ#QJ(Xzk=*&c=v@)TTCY8`a4YLa7%Ry zn6jaP=lWe!L{}1&f>4dJ8TZAL5F;1L2uaZ*){zhi;g9gzura_Ob|^9e4~8Ac(gA}r zZ@ZttdF$Tx+#R=egzThWH%ts;F6#e<;lhSl#r?nN^7!)35}oYhFupN*i$HF|Qb!%&b%rH3C3L;F!&Deo)SXyt0y9#DX z8;ur&1`{CseuxmBEax63fBTAZU6d84&4%Iy`mOKWnw}OoSk4%r%cS10AsI?f)=j`` zWvo}G8fT93a;ie}piVLE4l(iRdL@!?bfvU@dUY^{vFd#YkjFxT+z_Dpr6fS^U1kVu zeXk*c`^OG!jeoWSJnJcDb*XTI&eNexc*CVh6pEmdJwPR!K_#153ZWvPcQ8&QA$U<{ zemyvmMw2bJ_0JLF8Xo1P?XUBDc9Isf^MBik^|saHb~ax0{F7c-gsD}r84A_xYwlCUeXe{4a&G<@PP*SO~+uPO@`1c2WtQWxN5dVi4{Va>B$Q=Ho;@ zF)m~gOE03j|3f~5kWUQq(Yt6~60?AD-DW9uBn`H;n5u3CReUpEHw|Ejpbb%xYuYB{ z4fSGuyoCmEZ;F88oT48hZ|&!{ihd}dZV!PkR_JS39Ad39*7caI)Wv446P-6FHphw~kovqu44a=(!-Wm#$*FwoQ1goLocC@vN-x z2q=o_h}puKiwQf56Mx5ej;Btgd&W96fSXc`5auT$S&LhObT3+m>V8cy0${Mf z7tf`d^#n02@YlG+nbaJB&f=Z)(UKDMu=7hwV!cx{Ldj{t2YDs2*QV+daAp;w3|drZ zC?G@-5u>bfcGSawj5jExDBv!);g3pR$P z$i;3HSsQ^^glLokyA|5>a7;G>dzx}?R#hJC(0>?6r4CA8ic*<4-tV7 zuOkHNW0*&iA_Op?HyTuIqs35_8-ieGEgo>)G8!%6A{rug^1AaY%I)*YaRflzj&zq2 zaiT8}{kaY0QV`(MdFB2ji71A8p#LpNkTd@wNrzJ(*_Wgk1WD$U_W&J<2Y9+US*dp& zZZc4pdPjk;8d6F^+4Oe_l@joJ&oPS(uUKz_Di(rRvk|z_)%qzAVhfjFsR|*~ zj1XdA)fsaD#T1;XhSr<0gK_*r(RxRcb33i6l)QZJv4ysrw-+Q zC^d85SsduSSnnQAUS^K;9_0ecu-y{Lg_fC>-lbebS&J?_8#PX(R|dUi(Q664HsbZ~ z?Z2f7MQy$PlgdW4a4G)6@2gY=QYA)|frz~}9s#{EE`1nHfRiw=#R)DQy#^Iyw~-(Q zsQ5K5_E8sbeQSjwuGLHP2?0>n?VZ((>Gh>DYMxRQ$2;qyG^6E|b8LZ1OZoivag~z3 z1J1eM##t$e(JqH`>lqw$8sK}UMNFf&EM-&{$VIJj8A3%AWf+MiB*|Ua49iK1=%!rU zuk5Hdcjx=Vf?+KN`kO;PR0=s3JCxY3!ofWp*dy8zNk|)=3%ijzrLarfQiles*UC8? z9qvaj*Bv4t|FS|AM4)=D-2PB`Z@G4AcDRrVas&r`vkQsD)*Dv*q(E56;_R9zzZN1E zzQYjR308V%uP|GOIXSQbMSq_vqRtFy9kW{`S#HzJU|>yHP}#t}=K=}2cTkC*rxG<* zsDcTor=>>ZKJtIRER)uTzuP5!PnL^c-CGoCx;R0!!07o70@&PQ(SDV@)``Z?VbuLd z_9D?9I(=x~eJxcWu3BilBF9Rl{vwtmC?>B05iLhoxBsb}dOV!&3xXK~Cr+TKo-WJy z@AF>>{1*cMg~0z$2#{Pk7F9l;CX8p#+G( z8#5u?k8=$wW7=3jGdUxnfrR}LFWJ%lKkf;F`$3@_X$T)?LA>6+9qhnKO7mZp<|g}) zNs`EXkJXdx=%M_oC>vnn9!%Ulq`~q06qU?8TKFNCG7B>DgG9M|If>sR7g6wDB{Ph{ z3{!7@Fv~nK%WPG#-5>%;()N?HtI9oGW)uL4|2!ETR zV)XAJYvC`EI5(?*g`WXL3b)@AcO@IvV1qn zfeOZ?bfPo>V+YQt$oL($P6?`paLref^_qU|y?KB!6w`E=P{a<>lMLv^w?!FV@pFRc ztS23FIDcqLs||NIr8(*^)lAL;gzYtxakw=`EYC+Zldq|*@N9%G%M zdusSJ!m2Fw2cg6IX^v~;{z1*;2FW$OrM@LB5S8G!+hT6Bp@tt?j#XD5&O37AFfQpi zT#Ji!j^*vGs;$b|Q&X2yRa0G+^YrlpwRwOBM8stx&$GJ-B3Aeni?6) zB{oZv==>^MWF*dBvNGxq{A$=DuW|={6+N-Wik`u-HqAjFHxsAbWYleQn!65N3+g)f zDPxhP-7zJnrhU`heyF?sV26o)9OvcQzY``6Zoqp?M%N#1%FW+Hm8u_I;NZ-QY3L&y zV0(nOwI{ahudS@Sx$5T4)j20%s=Rsg=C5DMo1eFS!=usTYZiBLoA0gW4 zc{p%d%(RiX4>Wh$@@bo@TuC*`2w; z(>rsAOdmacBEIvc7fvsmz8@y~otpmJ>F@Z>!u0m(-P4sbv@;TCq|KNUzyoB(=qceGrySW znHfAQZr12o6K5gUS%tI8XFWOV=P-BXHq3fwmN2Uw=I>_7W@~42vr}hJolQP-@m@1~ z2i|*U*UWx#_M5XW!u;{6ViH$bn-=4p$yMa5#?*xX9?0XG?4D{N903iT4DE@?_i9$or%pmtA9)$Tl{{Jcu{INUJA_vXpv zMppMJYjs^Ne`vu9Xzn-sRM`i<;jCzRO;&CP`z(o9;?V?bRkm_`QY)r zxQ$B|d|akmMfUwwdykyRQv~ml>(0SGunvk7j4t8fzB0+pO5NkI9z25ExayGPAx8IC z*pD5>-DSs6qAvq=snbx$nySOcjvlG0%?pry6QQex)4^(7^0l`LkWk5&h3dY6)8Xn9 zl_FQ78YwMdbh*})ysBE<9CqNy@nd;WicGDp5l*}5Zn9?(hC!H^?3BDGs}CNmqwCO6 zhcD#19dO!Lbu3RImod6)u;3gbE-gcaE-Q4Y(^0zGsv1-hXG&!1yE5Goa@vnH#3YpR zHEP{Iq)_{IS6Aa6GQ@map?hdXO5QVcNts+Olk1*`?db8NN70aqS6H2LW{P+fTII3B zRZmst#RWx2=vKpRcQr0glLu$Zbr)g#NmCD-1wbA-T3v?_(Q@6BupT{j0OkIhLiZUg z;+<)7d3d1if!R`<$*H_QgGIb7?&y&dxB*QO9H!EJ3%A`>H8lswLH@czw>T#y?0W}%p=w;fcH}Tp{5VGEg9Dnr_K5>E0Gj+m zxo-6w6#QWIp4uARKPOkChy4jIhpP4+uC7HQ=sq!X`+68PnvBshIvcqi*jIVz$l<2| z9X4Q-O!q0=j#XDx9z1~D6%h6^b3(!g@4jh&Sq(Z$+u6u->s`ehGoMcQG zt2+;e{m0R%q&}ojSIc!n7h+r=#D#hobg0x`ver~rKU8Qo>SMXqjS zbt#JpBFDkvV-&&lwHs2UWC1W9Iyc%M(4TDNg)SD zSh%z=7OQxZ(Y@1emj@4%>0+1lmO;iSSY3IaRqRrKffYTZ27E_W0R))7yw5HUt0S-z z_B(jKvjU)e=E%Y0wbT(<1{mjm;3NTGMkUa%B#gIjf9+xF>N0hl zOt%wGyN~b2rHGYJiXE>?rW4>cU>J#geDo^Hz7~;Cw!^SU!&#*U+Uth3Z+x%}$~J3t zf6tK10sr3*a8Sr!Rp`RjpsNtNN3R6NWdQYJI1z$I;l&2L1iK%@0^3LfZ{%9)90!gb ztQO}5W$+@k?kTtp7!%?E`~q&`2#_g0lIdow>rLssGYcg+D&;_&zl8<3zPc7DK&9Rjq>EUO6c1KcV^-XkrwV>9NmmLNKLSS~ZixQk zq$Hu?qP%xvmLTKY$6r z$b&y%bb}v7wdsD&I=Zb>!e%9K+l_h5e;1}){;6E|7r0R*B~2w+n~)Ijvn&|c@aKMu zA~;c@`vDfQr9=#uzu9k71Q*D4XJI>3N0)<&vzS~B${>CVwF;(e8O^7=du=N9%K^I2 zVC$dIL;yax6{Wy|dI>@d(AWzDT@<)eQO9f}2-Z|r?mtq4@h>8`<@dWO)yV<6X1D>x zpfBbzI>UC!B2%1Vb&tU^V5%2u`PZMg5t7N+;h&jU1#C~l_RN8r+T$3}GPOaj>w?1* zM~)pka4=693{lisJ5hfL-?I#mQUmM<4?J51dPl~*%jlwu(APl%)gG^*saB+tis2>= zXt^4b>xUFX@|MfLV|62od%cxvms(c~>j{FUh%mZ)Z89}dUsOUt#d%U5j7q-MZch6v|>oY`mK8(Jh^8{_OkNQ zz)I|JPgofpo;zvg_J?+Dd{jR=ZPhHMf_Z%IW+r1{Y8BWK^DNKcJwNlYV^7yqk6Q!t z&|xvL3{!jj(BYzD=zxxU>R^)ji39uhO&P8mmBmB#AhY0sv16bf8j1*~GU=<6PaNIN zFpHVBOPNO!w~XJwET1@86H&&>r!ys_fS8$`6RG9mXFPd?nS=YM)ye=Bx#D!x!_%x- zjJj6{xbermQqW|~(GMac9N-Lx>2shlr>Co-r|S&Z9}BLuH?*I*iY+dmIRZ*8 za*mpF^;UQLneO(6ZUn>S#4@>39S|54tO}4R)L}j*AT&5!84k-Jc!jIN;Th(8Y0krQ z>*jtiH*H?Yy!Ynqo^x@5cY$W%$c3{OE?M~C+|L&1=7z1qSt$Ri8*BfTusqmF+0J^F zue7(P2`A=2ha&gx28bZA;c`fxf3M>%Z_+gFXD2a|jWjC;h}sKC{{YEbahB_?cRYh} zjP)O219Y`#L#rYZr#kmZfMJVGQr!Y@#JAa>AI-bkr>o+)P5HzChvtl1m;Kr@_TT8& zoB`EqqDBqu%{2&b8z`fOj%!0OxZ-kmT{BMPlh5WDZq9CqF0t2co#*5GiZ;*#@aRIlfxwoG6g;W^G(V%-#HN`sltx!3$dk(^~AtYa7pS4iX%*UR|Q!XkY zKOZ+y@p0}wIAJBYmqRtz0%7EQBqqEtpA##tQVACj9wIs~%m?4%!hB)be9;Yn5{53Y zLob8|he?s#I!bCPCAG3Qsb#%M9VZwf_`jz%vM)6x<*zj*9Xyu=`p~u*6Qq-q8io7O z&M!CeE5ZVB&&NHk1MQ4 zzbchqj$?%YAtmvuy*CM`9ewO4NoXkvY;Sehg;&Em9&7*L@pfqcXm^DLVYqmn!hyMf z@+`Be>&!I>O`|i&#J&<`a0_3|R~kOWS+345>+Q^TtJLmc+KStgsO|4|;1Cyj{hmc& zaSDqTK+Z5si|fMn8F5e8J}7VrHFUQieTalXeW@^U0rsW!f$SZIjLf}K0K5$Fj#dca z3y>8Ah#p9ff~XN!v>;5;aAAdMp()2S&D5FMgWlKO0WD+yY^h!l5O8RLKH&I*0R3|d z^!kkO2f`?Q&)Zc4A8)o-9!iRAqtc`xXVkw>;o zy@9v)I&Y+qRd|UyK5<}%T-z43vPc0IDzEHSfKwpCmUAn>0f-(MeRpFv8bml6KVBU>ryAfq@wQvtKhe4Va z&B%`h1HBaDecZE4AoRyFDsW^mRV`kuVNS4<*nZoAKHIaaG)xuSgpl^{b*d0FHdH5N zJdBY@jUM(UYE8V{)sW&{>=JG*66P+#M8-|>wVrAHG;9*QF>jRRO9H6^wW9-Mgo_7jTb^ihBx$B0vG73_rxb+x5dYp6~A6 z$>aGoYnqxaUw-esf&#j@O^;^;o{EZT)4u+iVLtzS?OGe2rFdFfDX%qa9(!!vx>c*z ztfA}E?%i9nX5Bi;g)XwYcdr1?V~=gwQc!T`j$Hor*98TorJFX9eJx$#fF~hg@Zk7( z%1N?6{`lt2Wo4T;Kk|rV|NQeqhra%L@7~+DCHt;jYuA>S)4ycjy0xI-=FNfv+-@vB z85yfqm6q!D+qS`~VsQO8?i`F`hA=SE)CKZF?xmr^DJ zzeapZnQhDnCZ5qD4IML@;St*<{$3PgH;UQ)A78k9?!E^^mJHWcfN9?sjYu+8P-tjS z#1M9(VWO;ZM&*3pZ+sv6zVO}kl~!)6v`h?7h)M{WIDTUC#HLj@GQS=4TK=4d7e71q z=OEvL%10~HEBT3;6Eh}S@Oxy}uX?U-4C*=l&nofqJi0hf>kIHj`I3DL#Q$I6+y76c zsA|f%_mHpNx6Jp)?;iF%)kAR@#8D!Al<%oZ4Q#CFCc{?-cZ&aOU%vQl!1vF-mEwQz z1$``TsjKqclYgOG@avaXQk(Pysz zxU|ld@p_)2YgKy_F7m6w<%j4G_dQirlbWhlwHsc{%X>Y%EBx+jcNcnp>6-{bq2 zznnhbpL~Utp@IIW=u?x>rz~COFS@>Xz3avHJeTX~c9+4>oAjWBL6+F4kYJp`yTA1* z0L!8es1;#>Ln2~_j!T(bxv`R9bRBu&`ozkFiGvbw`LP^*hI$RF9<-6H0&P->a25Dph&a@TD1If?6aOpmFT=S-nF9Ao z${-uJzxw}U@4e%qy0*UY(`L@}0t_?5Q0CA@%FxREORx@%ikeM2G=ghpcyE=!#}=fb;t^K5&U&Bj`6 z=5zRM&eGe<7x5jPot^ES_d0KO-hqP{9qP_QG_`kLfO}-8qi$o~&O?2IXscpl9krzD z3Ds3=7)B;boAJiW9dE_*v6W?&cMnXdd89>Wwf2zrImiYlS)5>RTS(4y-h?PYLdtHjcL+#CD@O5kaQ z`FpIeZN#>j+j4GydVfANvI7k~VXF^4&-{rwtpZvq%*WL@8PHSXA0q=Tu@at+%(_ud>G&P_9NS)cQO9o zIyw#?7To?9fM(?~g%VnU`2Q+$=tJN@)x}$x}(-e4jx=oZSovj^5>#Qoz;AB>$zU#OZO*SjB0E9 zub;^A1pfYtF$D#hb?<-Z8E`?zD<9m#gouc55Se|=gr-pQ_m(JMlYeE#A20fCU%$Qt==HCvWMQG%MVmlmc*E$scX~{mJy5KXkb=t7z`y+QR$=M%tY+eI9sV@ z+nek7eG|qE9{e9;Cd?)4)&Y~cgn&UI#7^y?tyDdALHwt@Q}(UquBOpk)qtTJh?!Nt zE<9VkZ%KjVmbY26Xc5Z{9Q;MYAM67@O&>y^a8{W!Q{~EhkY&80g ztFC4ku{b;;y<iw!#UaHxv*-5its4Ms{=ZVt=MYdIq3&q38ku>3xucYSvGV@bM;;xzmtNb(bNq!15($?3zgN&+*TG92jz5!1WwLbH+loB5 zqfH~83y<_L$>g%(3!$}QZ2<&T(iYzD{r5|+`h6R8E#YwX(WS3ezuC{S{1gKRIK%Fy zCr8{}$w9A>T43I`a3RAIY7LB`B0qr)gp?;woe4Mo~H<^<4uaCd~ zU6k3|Ao`D#!W92ib+?zQhS+XBw6Us^*mW)I!gESW%%Fh4>on`a!&_Q3nt$z~xwjg% z*C)ZOmSYlD;JD@XG(O(>)7%JL58%$-Z`8&$qsDw#n*nTZ)s3)OXWC(BXkoV25&Ahn z2Bom~i`#^U) zN}AZLWQpryshpvuBBe$QLbRnK39FUT5~XV=?6FZPVKa(CuIQv_54(sq+eNAaKlExUdP5~25UhW%oP{c+h2jiSU4V&ad9>L z;nJj66a?hR$apt#yth0)SQFn*7a!#jpX?K#;~!rb5VQP_*wD1z7{>*1h_{~EKTq%1G`fSk1RE z-gcJuv9pZ3O5K?dmas3L*qPA$Wjq}6$MsLp1}1b2z0h0|(LVG-6Bl^;`1IrN9_@Gq z&iOMNNQJmro7l^VMF_Mt7cH6sSFFV&E3J z95spIW+&TaqF?NKo##=L2i&IExF=OS2rE_Ps#*{YOe(13~^uPRDZC8&~B zxdp2H0-H*eoRgMTAZF2BJU9hhwL^!=z&#-$Vz4R#j4{Jxx#?->NtHiBFbaNI2;gu< zV=8R6?sk>Sfg#w+K6V8UiK=90Sa8jH!U%4VvMM>XAZA!TrUOc>5^G)DUP`{3_*Eit zF9~akC`tQEVh1PG6z)QkqaX{DN|GifJ)87=Qh8EE(yvKm?3vbONiQd@hKmCI=A_!B z*WseW&$RAJdM{}&Tny+xPCAhE8C)Xpb2#Z_QWIQa(4S5EN76;OSkQl)^kdTZa6!co zB^ls6C~cC#Q^I*A8QdjYNRmM#;RYlbWD+he$-qds%p_;!8Jggiqc1{u7U6Y-&k=4S z1SJBDLKufojqn=6E`%n8I|$+=fIx&e1S`UG2&)m^K==fJme6Y0hzd8Srg%TN=>Xy; zoR)A?uBC2j1L&Kimt4ZCq;kF`?zBSXCgoe=Pb*cfP{|Tbs}u?oejDkXOd28 z#hxB~OY%t7Ic(O>sZ2-58jBf@}qQBHq?4-5@=urpo34wDmZ1gCQPgZy*6&v{L{@48% zu)tKsYoV*sdXT)K%g~qvFJf3{i;sq}zILpMM2daOPhOZ)LDIV)g;~u0zF`ns6bCjao@rHqL zN18D7tmF60M$6o;;X4ogo&tM$C)5EdcCuyAr$@ZPO(AP-2q-qq9r+DXTZ{hB7H zzmUEleQ7$r{jiYnA~miT*Qfs_{S~;VSl5f&((BXTf{O-wcI$Gwbz_`5{a=dAIr;+#7Z4sGc#j3>g^-Of17Q)uL4+R>9s(?2SUr76 z;vqVuHZg|?N_>cru~IX<7{8~)S~-6<{wBq`$e<7V9`^WY`Ll^P>1e4p&o3SrEtm8B zl0RZt4_?E@XtcaW5~K3uHPRSYu#u(OS$(lx;_;?kZQ_p*RHomHC65&=Q7TJ>s_71v z3Re8Ayu<+YvbT3h39!XYnL2fb!9(yKED=d3di9!#MzuuAh=W*hiD!Tpcq}PlOSCF5 zq7q~MDG`@AjTG8V76-Gi^{-pW7z&0)X_;;r$A%N%XEe7B$C~7up;cvcL#;ava>ff83o@2wV2P9Ax{I|Ldoy;y zMVWOM-^=(c<72pB$Z_#NMpMRNxESzrGUH;#S-3=?|3}8R8SCMKQuod1D)m0yx}n{= z}PIkMw1vuK*dnH1qc%nY7llH>_xbQ(2no`!CV3`7$F6r9APs+ z9}%S|j#4^msjGoFZqU(3U5(^%f;A|-p?2Jm7-Sl#9XF%~ojc!>a6@MBa)sJ)LvC<~ z+LLrc5$&Re>fsfwgO8b|F5Y%Z?`5ZScDt*AIcmUvV|RA}W2*RWL!Um0(`O_*jKW}R zyh=66;hrdrU=RfN*w9|_N|hA<&^x#$gAxA(V@ir(gg-R8I9%}$jm}|QylRpV)Hr#6Ea%ORJW zq>M+lobk$5Gv;g!6Oio+W_KnmTP2Ffb{7xKHi(C0OC?d+3Q0`1S~4Wt74&*Ze6~uO zlI;$+RF-HYVFB^U7Aq$7gHgQ?gy;;72hdTdsIMTdA0xtyRp= zmMIrzE0jyJHOl4LF3L68uF4JB?#kD*^~&08t*S0tqfW_IY4&DoH1B4+Xx`73X+O%A zYd_EC%@nU;_*ljXu_V~U(tH(#78E$}W-*VpV$fDmyjcQ2G)rQ^-r-BbfKLno?m|Gb zj5o``4gh1(KpG^tX-ITNKW2y-{KryeOv;Rj#4=`)kRr)L`mrJ*2)aN-;LMU!!61YWVp6d2RkO6?R4k-azN~FZVrTj4<$xx0DfEsHtXKK z{-rduI5a;rJ2VA8K;e{(gBJ0^?5n>X$&j0ev+l*x8^yE210*$VEN~MM-tAwu~nTNOD9HetqsYZfvj*(VT)Bsog zD52*_H0lS00FRGe=mIb*m5EY^=xwT8X#I%>t(B43s#N#q}4@z#j4bN zZB=NmST!zJtws2650v25^O-iAG8dxbs7bqe3he}l0pkP)SCTIO~jPjKUb(Q zX5+5tvZo0CS+qwc9n(iw+9WyLWj` zgo-s_Ml$sO!dqjGQ7}mtt!Z4_$w6qkuHb9}uLbXxNgqa~{ zbxBM~QCY$09Lm5nQW|tX$}U%xO71WURV^_E#z51PagqpY9vCOh%uVl(3N$z+ zx~1bCRUbTKy6BDpK_x4<90ZXTNN=U47K$G3^g%Wp0WN_ zP0=Lr6R>0dL;^=PEE>>c#}S$e?G+qCE7e~WOfQ&PK&&i)59h8%HostD!IA=)A?M)h z4WZXaE{6~?g!rQBLTh6uKci0gKDxb?(XyVRJvV8H^%cR2o~Wz3&%3ILk=oBROTktP#oii(bo zwxA`8o);vhB;_Ut1o-<`RQd%6`k>WNGQyd*Bex9e3+>MKKd)e&|`FZyvbAn$yA0xLP<#}$)s<^$goK8 zKYxCukhKcbf^vN1&CjG=+$@Ffj@mnlI6ulszb{4|9Cc*W@lh?K^vOUqy%k|0!g7Rf z00^lcMO^Wt$t!*m>WZI~zT)S`eC4MTedQfQT=EGbFVTL)RT1M)8yUt&DdJpV29Kqp zMbN4j`bW$4K;PT@kNQz?(+7|GN#K^+kNUa6t$Y2bchKuceS-SfX+H{y_E;gYsY*Xz zKcJjb`H}uWK72TTcybD^1q(CJ( z0Cpi2=qMDD1vDXOXR7e?BYk7z5}=^KPVi^akz=eRbZ(G$XOV(GvT(G2B9tac3gw!V z40ZvSN(B}wCj|C_G(Zz+st5x+U&wffDZetTLdZcyq{%gC0MOtV^ z-eW!<{lRGB%h5tL_qa&Gx{P41$O+LELd9Gr)S}BWFY1!q zi@xNlCH_IVxxj=0O-8F=iC|#_dDN(aTRq7xBPQ7)keyJ$t$xWa^LoiH_iD7eYO%6H zkrg=dQCVs7^MxD(`uT=HDF`JPf~`p?r~qhM70|@|;THzw=I=KKS`4%qsL&KNH?pwE z)W>8S4Uk{i#}rUF796vo7_pGU=Fblb)CUDZc;5=BB?2)3u#!N!@E2w>dV&VpW*Al{ zaN|sVLP8;E=EB1Kz_OwuNFS)z2NneB^`NU%FwCE^x5xZ6hUgrFq#N^KjD7?XZXSS) zVkya2EG_wppp;@=l+~ufQ^lM1pIcVun9UnZz=_g?=ikIYloO5o?5~DvN50mKVVa8pI+W4G;@}Q8AZT znz;l~v5*sz6T^ZS6(*L#ve;8m9WH7pA}$G09Vl4Qi!%YDwv8a8mk&BA4|B6?e3o!h)FN%n%JGb#=0`sNU7)=O^UC{Y4#dH zM=Lp~JlWB%kgaMeTBe0QSfj9$Ua5Amd$OH%g?E?K)lQRTb~(L30zz3N&?!h&z`P$E zjI&w-f4x%4%G7E!iBup(O(ln!Fz^R9vIT6g+)tunKrT8cl|l$26~S?25DhEXNm*7Q zg^4sds}?L-1uRv-+#i~N_nJ|{zmid?FepSJhleaEmKNV0OAIW=@u<33OBZ+K2;~K#FMzP(!5kfx*+FqEy?*Vg&-m@sB*;j9vY48D;S+iy>P_UHG#Da<7qMrq^>q!YY_QhGV zUYzAK%QM8=M?orKB?CO>!aWO?!)i;Jk{^nR=u&)iw-Rk6T;|2DbQjby{TrAl8l!lc0!zBTIpVGmlk#GTF-AWvUm2l>6U0AnnaJMe8TbI+V z8`G^TbL#Y7Q=rx-AdEtoj<5z{JHl~%~@@X03!otc7uN+)1fQ1+72+v{WI5ZYALqtuPv3 zM)4E_!qE7Zq|-97*@Zuwd{U;82EdxxX}Q7|#@(r>M8l67xllW8T4$H*z3nuuhtmA# z%g2IiNVtpy2&+J#C@{eql4C{6futV(9sZn%e!BhnP!tA0KMw!kLXs8%9sa=RaB*N) zd|>Td<{cPGRFhyAq!xE1`Gvvce-7L<&IF`vy!U`FfzWUG0WZQ6!W!iXLCUX(%oy%ktLu`W~Z3C;Mwy9m|ZEC%^L2eXn zqm7~lf{KypaG6X7OAj#1Ofk4LmSAU)HhU;gz@Q6!mK(vX@g*Cx5 z5)q;ao(2Wt{DkWM1KM>=cz42x3B(5zo}%5J2?Fh^o}k?oq}DfGwEGH8ZU32ewMe@? z6OeYUVs|I)Xc4hhDI#itc3XjVu)Iju0`0b{j7%-kPFP};nFQL=q6)iG)I~d_8Pe_z zyXx_Tz4I}!ra6>bl)Gbj(6I^&eYV4Bi1r}Mt+Vm@k>*G&VVTykwCLs43#bVc2haFz zKzjD}g3jK<5tbx1kbvhLi0Wwtv=dKyZQ|-@h+Pw(pj`rY?-_x13!k9fKag5iyJ+_{ zn!f$_w8Jk;tz|n>58{EpkCCmb1UEoDA zGWehoSJ)MzIJ;QV-_8ha2kXFlcC8!SI-v&bnUX;UXk_sE1xxS@b-@EXd-m>yp5ayB3ym1s!_%wO8=9m}=RV8P*c58q;Sl0I z%d-?#qszs!)mT^N&cY^&?Wk;i*{hR?FUp`Ubd+7--kAi&wXePG0?cwX*(b4O?qwxq zpG*=az=FSTeyJZ6LD}OX;5sKYAL!qLT@@WJg@Z!Rov=^_3QBHpGnk+(9A)_m*g!C? zn^vcB)94&@$H_5gbPI(lVIhKpxy&+%(L#iKJNiG7c2pS@thMZM!Qx5}jnToV4OS{> z4F$^}@JGWRtTd!_k|&-oD~FSog{;E)+pX;$ryGBA!IIrj_CeVvWfW0;aeJBLg3-Z} zG8i3L7>E*QtzL@tmB8^lU1KkO1-^dk02VM>H&LxtC$44XWG!Q)YALl81g(qc7#yBL zeSlFjB^AMoI3c}XS6Ro~Svl5$K3IHEDo}7da<@xho1iyoRW7zHJ);+8_Aodq7} zJBoSMEHt9WFdUFMjL=s)3teypTZ5wx2u8P;ptsPugDn^-s79z@XqQ3t+1KvfDy+0O zI13KUIG1<>7vXO-aX;{IK&|g=EkSUxQ$kZfKx1mh*t4GoGp??N+uSQtjIdsFor80O zz|+-Ga1LpYZB7Yok893uCa2tP-yN**19hE?Y3_g3@O3C0F%;TvX@*cu7QXFg$5yvs zRi^}wb5sPIpc9BPFo4mYn!TYf_?y{aaE1S9upDThN#xP5A-_d%uN+uEA~gMvds zd-d)=aPUz0QeHi3%)-S>macm3ja_>`NF4FY?Z{}UzuSZ|d(*MMzHE5?%9&g5UHdL~ z+xE9weGknjAirt5`nOFr@9W;Jk9XH!xcGzT>^b6E*qFck+H(~nO-GyR+CH>UqI{m%41r&BYeGc+^2X86zO zH6vz5@r>tZRL)p3WA%)UGiqnNJLB^ihi06gadXD&)5)2VnL3ce8aH$BjEotnGqYz- zpE+;lvYBgVzB2QTnLB4Pq83R~0mHON0t)!23?#wmmy8zCE&4g5c`z8H&yb{mEFx@t zWY~hqFzLlUGZ~!Oeb0h3AP-_-3`G-YC1Y@ZhUXdD?DooJg680S0$#0V48{p+7et<> zKtla!F<|3pUPhyxOf0xO9mP}e$pwG%f9KDUA_F-sn!u|Be=5NrOl#_YDPl=N|FB33 z!?A}&au{zuECP8jXhSn-LyOQxBt{z%i#8$&+OSfzVP$B;%F#xuKpUwNZKNtdUIb~v zvp$tkwU7a|Bcp1U7G>`Wm4HeC6#~iyl)3QWDpR5#xqu2~C+L-eUL~N~feIlW0hIzO z1e6OXb090kBcMV+rGP2{)eaO3@d&6CP$7PVsSA3U14$ts0Tlu&1yl*B7EnSYdA&MG zLn6xQY(N!_dIck(6m8T})T=az8W|!h9}g%|Zv|8<(1!0SJFGd~2B9FIqN7ra^@CND ztbPh9a{*+fu7FCZ8zKn>H-#nL0iiH3xU&{Qw~96HsRDY+;6l22Et?pskpuDy7a9CX zxg0boCA?eTDM~p3$kTynN6M_|!m0!hBBfBf1e7XibbJFBNako zYPH})YjikC@UcLsqSifums5<}pb}n64n#W{<2H937%(QwyluT!qQ;47B{|Q+Y;(RQxZ<{1nY8lF_flu7zMrrovJIB8v#yf%`*m zK`@96JplR-9$KlJ?-Z#R5qcgs$rR{$+;mfT7P=In?cpCo2?l~}VTVs9DMU)pQ#9%s z0#PK`@S<=p%xnxLl$AmzgjA`K1idBraH(1(;%EjbG)LliP8uD2nM6Qf3P9?LbdE9! z7bvcg3jX9Ofm9M9Hl7X^YQ_KCd>B1X*F%9G3iME*hXOqm=%GLl1$rpZLxCO&^iZIO z0zDM?-=u(4HX_y*XN{x9s<@j+)J92!*)DrK{q7O9n}ne4zOibN)P>5BxzHI>Igufg zlNqq~mPsmMr(e8X>SDFaTr75}Jj*VVkA|f-fyG{ch=_<3VA_=z&r>^eFM`fv%Eq+okK-aH62zpCfIx49cer2w z$jAW$31ZOTVS|SaC5R!-8!fj}-h*?67&tiScFK*1Z7EG)2P+}lTK2WQ(rk=_pQzk? zXCGKJ-F~I6?UlB46%FT$fvS>Rc|{y9aj?S!a=0(h z3QoXkelFa?!UCS`xb9gJ&Ci_%YnVET;!5`kfz`v#>G zT*hcH(pGd0$pDc6G)n=qJuuwE{7@iC(i9mfk@9EAt_?-^j*u(^v$g`MNlLAjt6`2= z=9>^49}rI*j)%;r$FGimIev5e>+!YmyWrjn_j_=E9RFGT0pXH#l(zzlnHN_c4;diI z%guc(;W7>^JGlk%1_`$;-avDU&=GUzmKv0!FH8-R!*&hS)+5*vdZz)rgm50gH64IM zNI;l?uoz({!e0T@G^rpKzyj+$m<59kUzC`ELtsP_Ml2OmGBGU|ixgt9l2oZkIGjwL4{C-TzMLd6ba$}#_49DVV~WKSYSrnh<-3D_0KpS3uGhIi!kUnUcWH`> zwh+Rpk=)OTP(u6K15d!3UdV}#LCw+a!LW$f?tcPWN`PQNQUpg6%}a;&PEsl0R4qK` z5w_R&OA?NQY~DZgcyV2Kqk=O!ql5jiip(}o<#b7qM)QqCl6-)* zB#$$p1=f{&P3UKaIfY}o{oF@C;he0?4=h@NpGjsv?sv?q5YKt^qu?H(1;zs_XMsu3 zMz}CUv4|T~3CCLMKZYXEpBNsb1XlTsAi3Tn1GR+$u1AZv1nmt0y)wZfJQICn3OEfB z9&BIR6g29gP4(zzcBV7GM#jIS;uo@7Apin4TmbI{u z%V$$8DMM3;q!d`7Z;DOPuf$XtSR$(?SzukGm@1N?t06^_fY`)cG2T4_eUF>YsMUI~ zK@e*%7gx5g5G#wZrlf92S(ifaDe&w&QtDFPN%*fews?0Np*;pv8NtQZB9LsdXLu!TH%q#0ib9Z5r~!% zJr*s)%AspjgMb<0pG3=msG^$TyV7K7MEG!Q3A2v>^>C2DkpD%RHY=@zKaUb-`14I% zc$zjkt+6tqx@Kk7qBW~4tCwxqk^?7Wuc*oq_>=hakNJ~EraAbN64C_bB#TtwOXB9Y z9zRKv|GXaDyCVkHB6s*0dG`3%Txjd@uRG?q-h0?Szm;16?u`j)+Vq9#ucd#O zej@#PdS|+R__Xxr)90sC=J~BF(>JBBgNp|J&h&TF_rS%(&TsvDx;_06Tq4k4NN-EO z0+$&4{F444{SI6#=q1BlhAZKcghNWhdkqhS3)q?DFDy|NI0fT9)S(*HY4l=peZdQ1_2jhIPlp7!irkrej>$cF))uG z*Q!-=5G`<-6ib!BI(1U6#=a)$G9_kV2TJmB7c~o8K~pY+=m8L?l6sTO0s$Cs!$x3G zk%Na0iHwYjjE;;P7GsHw>@VscIRJJr4-|Bwexe94Fd~tQR7U5l$oTtkVq13eso~8( z3S9p#86CyAvCCPBk2a67+&MMX3@JN?`mK>Tt2Z zV`s=PW=zg#a#Ue9!%>BmLIoA-Y1{y9VFvCM6Prca@fijg?iiDpY0wMqLkGfOq4+`* z(IA}N)WE|5P7Muw2kiVxX%My;C3kV>VQzm0u_FZf-O*OK4Q+9a9zP7DxwH8g=w&q;}pihj* zG{kjVakacQ?W~HnC}8}9w%g#a>RRnv=fOcmS>#}gkq2cOlw4RQj8q3^LXSEO)51FJ zF$&7Q2H`D)FA=UH5QPAq2&Dj$4j^m3c@XzH26W`DKjtmek)-CIlH|ZUZmENTKrN>H zHm1BAQ#NKhQ(l8{?0wt!bZv+%LH!jQ(gJgjt1Aa5yWGh*_mYS#|36} zXQwY_C%};%^S{Z?4X#%f`n3IX9t?Wvn7*bgFbPB=$MG9YY zt1*Qwn8JpqQg{cW{Xs~9Dgvz+fP_1VQFnDXXS1|tv!3p7fVHyi!?q8Aj8OfdtWq%O z3kY*Dyo0<_q$h0L7ldBGKT`grC84YOL-AwK_ljU3@dh3lD{S%Ce+v;fM#Os?flUDq zw}wG3*U%_tz;M{Woom$2&Bh~lZZ>KccWF}2s&+It>$r!F+A6_Lb6C4t(6}Df?mVxm zMn~b$^i^wC*KEnDUbAdUc*oSle z%nlVCVuo*$FLIvEnVdr`&Vjf8tekl{ulR5CugcN$SVVKi0$czPKHw_gqX<~TgpVQ- zqmjCFlB6poFUmaqX=E_M&i4Qq63gB6@MVNQxy~KFjPQpFK8*0oOcXKV z_ng}~gk%I{<53PZf)y_P4a|XmaZt`5c)p~RXGK!jRz<Hb7gzzdt z6M&>+5sInv<93gLdP$N=I3iGTV0nal8?6i~?gQap%zc9YSUc$w2tBtXNSmWyhuXIQ zAkVZ6MmjQ{5V=V~z#{1hU$Q(UgKW3ZeSvCc8GjMOw}{+a^|k8HV=A&zfG7Y+iju<=f*kgi1OQ7?3uypGDS~o^ zT6m_Lnzms$YST9zalya}3uM z@DK`!IarVcsFq-%DQHbI$G6;{_ko#FKanAXuM{}EU zPv)M5$83lP;co6AEbhtJyM!wWRk$zAZTz!vMTLm5$Ex!bd4zi&6p=Ph|2xQslL0F( z0o(FOo?+pbVwUD5VqzpgMu>1)#aVclOW|Rd5$ht(s7}6>EK|CciR<9O50bCujg@7@k3IHjL4R8;P3X8XtSKV zfU`!x-w%!9h<sB7CVA_!WSYT>go!Nu$$aH=(%2cN=jsq0B&A}(C0}%ffnO!B{t$~8_;4hNDlbB zP14cYsvhjey^j3(B>9V@(bo#x`mOjCpyJ*}1Iz*J#(#XSsgNc8kyJl;>s~@_R2n|w zr#5`VLP396&@TbKFarp36i5RDq4zmH`2-r|0}UujOp{&`7W!1->9N#BBdL*uVkA60 zJ5v9`@c&TifBSDsJ#%FGNaBr=@T4O~t{*As_y_iGp_YD7%EP-#nVW{QQBM^!h@6vi z;P(i(YNYdd--b*`xGf{``JTye7U8FGxFD3A(CG+yXPNKv3-kAnBv$6*9_e>+r+mo; z?$k&a|F(|w$`8tq%Wt;jH*jwGxTV@c3u9LpDF_?bVT*G#Olb{n78BW)SlqEiiG66yXWKsz?d2{bw>+;Ai$PZMx@ zG<ezQ8RlfO1<~aK7N1f(Hdcxt%Bw z%8mLTmfK{Z+yH6dng>|{|ATS^&;L?xV5c3`Zbuxl>x$rPFomxNcqVZrzY>U6NC$e>oXMnjAnl zhj16cH3h&AVK_oL!ZL)n5Dp@oMfeTDKNX-iLJ`6mgufs(A>2nG(*TA7&>}w-335eVWx3dh-Tr%A>QCB!w+VhQkXCL9+j{5<*7i7lkqLGvH%y0|7$27}Yz z6B1Ip?Vez^blL%nB_xfEZJ=}72?ilU049@}^K}{oe#|a^V9$Xp)W`lDaiE;jr~H8# zmB6qm#OE-RC@mJ?sdNn}3RM7SUcg;2qR7~;{DFnTix82I59Y(u+uzf>o4CHvgyKs2 zkChh@R|MAZ)Un#}MIEfrgxCum_uwo0C^x7G`lE0$2TOObtN^&HNhB93L`soLEEg-p zO0kNSvkF$psw8rW0uGf{@xp`(D@>@&C_+(LuN8e(^k#WPng$;?8c^z{V*;k22v=5GqdCaRNn!ScXm>;_yprMuaP648!7A=o{6Aytr+rWa z{8{&l1b3K>5jp*{3Nd7wXCb#D72go+oRM+N@8C3qb50VoI2#5M(}BZhTGvd?Qz_3G zdvNUWvFFErGxpZl5P@y})nY34UhCH4J;giWqCx*|@u$Tf!o`68@5T1wLvV>ef1>z8 z@oBhVo)L)~thmu&j^x%BV{aS5Eyn+@&;1p}+7-o5f9}I8S9o}MlWs(>&@oH6)UjQi zOkTIHq+9oFm(DR4;E%z&W{^OtL1O!Y z`w+GF5TwHah9Q(9Ohb4R;W)zA2&xQ#AqdF;G$S>VQCb}nWm1cxfHfzIkSY|=i^a82 z1~=eRkG}!!!xeh787)Z5Dg>@3i5l@4y>zQAth>5cvbB{0>3S7T%(xIjvfqA?ttAVJ{l z1-rx$Z_kh9#|TK*$|rS74V0c1}Ty z)}R3y4G=5ZMGH1)=g1}44enNt?Lf4PQ#tJ%?0^DKAhHEwCjV7|2$a8E@=Vej6fO`O9RQUM8}iX9Fje?Zzxr9)^> zdIAV;GJ((;zeJR*l;jZDQ&HJPM-cV{l9(z{{u2t?0eL{2DPNFY1esm{KTvKAQ#sya zyna0K%y^)%=Xgm+{zYM;CTBc!8YFqd@y%vK69-QC%~pa2=#EC?KlT+nQMOFNC=R~a z@<)M|LIE!@dm;u2G2$x(8H9@f-8(PbU0mJa&;$5^Qn3G*=aT<#?hERPyN3cj6zHKq z4+VNC&_jV93iME*hXOqm=%GLl1$rpZLxCO&^iZIO0zDMyp+FA>dMMCCfgTFhI!?N=PvpLz&!)3?rg-dsCs)Zm?>anu^R`U|18jx-)YZQn ztz2GTU%x7}bMPivbZY1KTiZh4&6vLH*U$J)xyy=B>ms+N1N{9COVYsgH#A2+>9oY` zxMlioj3RH!;`;~gm&d()sZYr1A8zwn?)1`C8PgYu9_ZvQHDje#<7Wwn)0*|3;c@HU z__b-$eaq|vFT7;4Ma$~zVjlilzsB&ZE%WBDw^tYZTF-o}mh3)oc6DXFF5%EBx2?bB zoxWL8Qs=AZJ3okN{CU-81sB(tQ^DEX*8Zl+&FEipz%;tEE_mzhN0~Ffd`Bn!=z{E> z-1%G_GvTG->Gk#1{oh`e^To_JGIh3RR`(HqzscVDldZ6Rr)%|yzm$c1)3N%8HT`|} z<;3qev^cU_e*gBm%qeTV2h~SU&Hg&*XCTI#<6zgpY-{=N@TV$&-!(GQ@69a5i4!Nv zTV_T^eryQcbF{|B{FMAnXZnw(B}>`tnT=9w4r>?E3fU(ZM?dogg=&h>7yEbs8*I3a`5$>ArX>( zitmt?XM}Fx4 z*}`oJM-E&(R=@4QxmUxNFZ|^0*o~F^XzTW!oA!w7R;=71tAEt5zE4zP%>GGt4pnP! z`1k#tDerjugeK9xqPDVzEG-T^9 zFTXRP*R7q}4<2}1^*`7;_EbM(_`7ob;S1jT9*)d-Az?z`0QZ`bExR{seXg#Xy??}= zJ0s8aj%sZ*<=yEOH~y4u>@r)nv1C(DXZ?Y@>1Eg6vK87Q_jV51{7#wo-YoxXBR}$4 zpc@=^iNC9pF)MS|tn&UmUe3(?CN+0WK%uN;V~us>`F?k8-F7a61$<3=rNnD>9 zGOeGre{kK_l?w*${PMg0Z}2HcHVh0g$_wqE?(~@(y2?7ve}exA>#J8ESc9ATtzWnB zevRh9@b`*s+=OGv-|2MutJ)9zGCp*5@6PYe?fG_Ww47i2)%V9!cCD-4{o3Dp*|)Cy zYOZA|lOA8r-`{r7eebr7_TJ|y&Gt=qZPe>OhPC(Ym^u9Qx`wk<-H3xFueJY8_EF}o zqpv=zDf*>THF8VZ%ho|1i@xF49<2=w_kXK#sqH@hp#O8nCNF8U`aGz4zVMlxz2{;y zHRIY|{aRXPGt5u-xc1GB*GKkCh`XQk_bH2bYWxO6>WN7W{GZp7r%df@h+Ev7=if`+ zc|rQJVrJYReoG^xy( zhF%uEQ>3r081~kgcYj`1e*166qK&=FuT?&>>5>YiruZRaBYsGztNZx7hA+Rl9=~VG zu#KjJfytu4wd4%Z@}tYj{J&o?Aph-Yvb|a9-T}AkCEhvv&-CT@L`>VVw|vIOAN?g` zoXd?eP4cG)3*0_GZS17w_STuX_2HAA z9XsK0LBz#H-+Yiep(SNpRJJ=`Q?3bnWk;ob*&P>o(u>dc?{%~8@2gzRdw*@ZUa-gH zcAu}AJt09g=zi^kw$gyfgFgB*C8mDIydT;Vd)H2GzI`d?>L-DQ;#*DYzN=M#d*4!8 zc`H0^(X_$k#X9ZW(n|LwMF(!r(XQy5Jh0SLGiE~VsAF$@6LHFGlh1yjTY0%{$fm56 zGu~%c@4We{OrE7nJ~$-e<@u3G9a6W0wmVBWQSIWK{0^>Sm7Bs3+}pTk`Rzli-YM|(Td{tNn`VtHVcD9rrcX`| z2^jLjk~LFybc9yib$Pu$_hUYirKqq?NF<#50-x0;Fk z3hy0%2A{pp-w#h-%P(48`9fuJr@qv4{(I$9JCo+}53ZD6<@tm6vpZi(Du1bS5xXjB zP4#mD`}40dLtj3~|M-_Lubw-&G-AMq1Ln^>yuV-Lgt?oxBpuxq5#I3fuReB4aWT!_ zzhTAmA0Wj3;FYlhU&SJL-yK$(cT|=O>XrF-qp((vZ6+= zsa}83W%~iG+mZhA#VxfS0oJhLo^Ef2^q;URI zP`K~#w#AxV8$&0B^u3hP>*~9b5!<(K@^3W$EU|^GSdsMWi}m&IQ2mnME7&!Yd+y{K zshiDYeX&vY=0-Q^!*jC_#M*4x5oL>$eivn3SYa*PxU_!gx33gmW_(0hw*uq&T5G-H z$CcZ+40!QU){uxguX^!=;p^6UH;MUb^Al3gM;r}=AtK;-3bYdPRn~(U$O4ZaoU)= zBa)!0Znr#I{QK@{eVIS4@(BN9_k{J_%=waJ{Tu6R(l2tiEQK$m)o3D{e|VU#P6^u; zKBiMg*Yhcv#*tSR*u4ES6_+F_JEm#Yr+pVts9iN@?W;j612|*K`Q7gXr0jlh>m#3_ z9qZHD)3ojO>)U1z)1N&v*BCABlO55r%I{b;llN)frs27NIlBI>l8t?(3koIIK6dZF zsP7Wd&@$IN-_!5yNbDcIe&U%AN-{JHR~vdC7*iA6B<&L)nPBh`^BKQ>=YM|5%$a}T zPv`CNvG;Q1WXiRAB67QkwtNGst1`gxmY_^QxjaOg(AkT-_PuW(wG)wA!=-_64 zRnE)4=H|99rN#WJtM3orP<`;mzUAc`zi5Qbf)>fUeS-S0TeCQKR&NjSkTGwh{T9Bm zW#*1I8AHFX^1=(-%Kf(2?yS-7uRPFs@>L!4jOa}9p&cI_Wc**fA^G)Ia-Df>)aRm{ zjzL>P&&~N!5_@jW^1%(~-mK)@H@@jRCQ*HT?uOUfYrOg{y+3#GWkXsse~MrF=e6&~ zduqPS<@rDEPab@=daB!pgLwXG=flk8+v7Gwg8qljlGhs7ZU$>x{9A!7eFmnOPaNqC zX;ckclW`(t?S=nQn|*kP;^N^icjt}V6!Yko;1 zH{~8GUsif!<({l-y5w0K@~&IguUww>rSG0Qn*zjZj{UW|C1;^w%clAM-+g4R-F#UW zem~gz%l^yq4*eLqao4enIm4GQ%iNZ1+ArqrNyY`Q$XUYWy(voj`|bxLtiHab%co4+ zzj?*y?b}wSW{k3WjjTIzXw3J^YI8R4%PIf9pl`jB=B6BrHgOAN+2LCE@Jwh(#Lh%@r`x96 z0kwa|H*8jv7P0M;pESSvtQsSYs2*+U{CX*q5`Sd!Zh9pJAn z{pA19_TF(#C2jvOC4nTg1PFvqLQMn(L@82CAfXsSNFj)Y>I%3PTwIVRQi5M7kIsJl|c0@y%d1%#Y;4y@kyb3ga{`TgEM-Wm9wYi6z~=Q?L*&Y5#^ zzT>oCJv@ZMx&X*!|3sO%7gc@U?el^LDz1B;d2V|VG!co*#zTAGXm&Y6LnTe~f5z9} z3FuT`a@+QYZ99?RrjGQ)+T#^@OkSjqvJg)o-}r&gyVmmj_Q}pzJhq~gbh3)5yFo7z zT##yoI~LFC-OsU4OK~Xj*%D)L(yO$gno|674=-75WKf87XFd6?aTh9enu>biDZG$S zn~;(yYO}MwoE|t@$cD1RR8SODnlGtE*q@VtN8okkpGS>VYPJa#xhdJ`Fdm^r?aK~J zZfKEe)tNd|Rnv(+bM!LeYDUGtC}%%C)3(sM74OyPk$bvTjWkFI$-becT9s~jUcT@p z=s<(ZUCRO%jDmi8F0$eq#hd3bum z)t67Y7loch&dF0~?H}S?ox0yuh!d|L9GeerjUoE5oh;lm$L8Z)zE~AdEKH1A=i~Im z^HjXN)xq_xVmx%a*jVkfpz3*R%#Ihop6Hah;ec~e({*?nvT$|UHL$GJ%QfKd>ce+V zFiqE*-5HMzIQ=QpEk%PXBM=G?)ZKCs6GH8*%Mm|}(4cn>3+ZHyURmg!^D8T?-5(GH z%^r@1Al)N+g0rPRNB>sj?Ioz}=R4Bpn)SS`M1Lw)&941%;%?paJEg5W{w7sHj|-!b zbc~gvNzfe1dS%0AXO`E$=ne5L|INDClyJB5yLC6I?&YTrZOKM-p~6Y&6`_7_nhg!H zv6<{_M!jRJW36x8mY?$4%qY=)clq_uzC( z!+Ne>p=7NeA?^An1v^4fOot zt!sj-^HKRXAV}LA8osU|ymkeGI+Y-?n%<`mc@Q+y1&MXVTA$R*WGUyv+Vr@C9Qw;8WWA|dMTF!NBA zHOj$)l-PlOrkr=(O)9t4EAXUAVU|W`7Q%AjcJxi;cyGXh!yvTiu)Aj)RJPN>Q`4Y) z=doD(qL&EG6B9+(CIUX6@@-2C7$(~7J3c}b2TWWuC|T?sPP=Y(-X^MuPE$l1TkW*w zy9;(^KC{0^3u7cb+dHkqP`*@JkV?*{%3!HKC`Lruc8#;QJ1O3E2?QErn(vYmK`Y=i%t zH)bME7PB^!Z@>4+^vN*ZOnF%|8NG+^P=bmMJLPTgd56(>*X1eV_rAxG|ak4{phY=CRUma(q3EGmU8vo zd?cW8$-R}h9O->VZuVKgpT;K#?*zqu`CN-Q7&;aYjlDEJ+%@5(>pUGjCYDnPzZ08; zv!;P5=9PM_6ce}KM`!+U(d2c13rkd$OMBH-%S*Yr1-MvjOTE+QuF+WjNICSvzTY0tdrxVW!{Vwx}#h`NPp$uhnL)^DCAepW2vdXzT7c3dR{HJe#|S!{P`#Z zJv>w%G&bhrO#jQXRy$Lzj?%LD9aL+G9Y@YVlk46=XC6Y(g8HY{1uzkTNm~zVZi90*y&bv1AHzoC?>wvF~+$a`g_Z=&VH!+k6o{SSUTwI85?&i zb{*6^8M)*X{hL4EQ8l~Xp-8}7Rz{v@}0`JzvYD7`+G_ncjiN%Px9=47VUFu&9a}Cm_M)^53jDf$n#zAW-n3{H!^1Kx zet%|^HBc=gq_|iyPOzf$`wZ+8N!dI7stTXk4xFecOp$+3Ry2MHuXK%rV-A)-ToZN0 zUyW<}t8M9`sOm7`dEw}9J+m2z;ui(!v*v+YvU%fa$=p1q$}WryVL$(AJwK&d^;x`3 zb1Ka)Y^=_l7`r(8aeuXeagO~GA#Ap3{^gnbv31nlCB>DgrT$a%y-adnD`nkKN6&>? zW!BXfp6CjmRb)%~r=d%0=3`OJ(~Tc9w@{U!SVGWg)U8L0>Wj|@gXUdnCoA6tK;`jo zb6;47Uyj%okSy*}7Z+%*TRt3cHTe^Ef_I<^${87Xm-@S_hUK03#c41rWLWw{w#Luq zj1Aq3yK7X_i_c4(-SX%yO@n+#oo;wb?=Agy{lnruvC9athqoC^=b{3L zM`b^}&6$rwqaQf++|XNe{xThua&V;eU1dBnP7fj9Devw5Vgn;@P=COtskVB@PRilP zOv_1EyN?plw|02@L?nCLU;VT0Q-tv|Z=!D|{-=Q=`?J%ce2P$5`-T;JS_=_)Yd}5Z zN&-e+e;L_EBHIqeKibY2@!uL zPNX@tDOR2p-RnSpbfocVUaB3Df`k#;%~7HIvC)gPoiaSfWF*8ov@q<&dT{g}V1@QRFkwE9L2A#Uxqjd-UzYTeFL<%nQbLq8WVyPXq(CWdRlM_R?9H6f$*c zL(>tb&Ozgk>!2}g zL0ii!a$#BS+6hXWzK*b5kaBO0-sVEYl(;)I4lD_&7m(P0t9Q&lh~*ul10KE zok0{0-jsITu7i$ytg(-*lldT`E zwLUFaW-5n-J=u#CqONm@1u0%3cq8hr6qW`zA@##YV^w=m0a%f*BboA5tpjf&iYIRF zCFoc4T_7X-hIjE(npc))A~rUvJNjdsgU)uN!*P*9&mSsMPG^jrelIscVO6bLR6Ap7 zA<~0VA@NgmFCivCtT!i*yIxUDacv!F(WtJvV7y`b-vt3W>*It;o-~fbeodR@7v*{R zqpzg`%aeQA7j2syPp8FSs>l_I3FcN-2L+4hs;Vs%>?HW8(y8Ib7wA!E}&=-^uW z4BJrbzabtvGozy=cwTxgUh(JXTjuqSc4|3BH;sz%9#J1sFvemnTH%KSROT7kgxSH& zL5=zQOOA@qi{cy2ulL6$1{_gateEIv*((GrW+Q1XO4j_*fVweuMm^%UU_mBlP-HGs zm3&i!VjhOC8`NMP@yVrCqXvD;>QXX)JhR=f_-@3;ERN}#eoxy!*C(?BvQ%HtEnY5` zg+vq%hu!HQR`_ld@$eK?%{aBR2olH0>$xwggS@_~q?#GHpIMjWJjkL{6$h5_er-z= z&2iIf5vsa{s#scPL<`s6IL_euVm(*b!l}Ct9dlWOK%wiWE)ioR`a^939+Yqt2 zS9Q18ad9R&3XyEu3j>{x*p9O}#C~IUL#jqaYbGx28k?aoZ=!q!joM3C;?U4-Vr-*E z(<^2968*&KUJ*1?^YRWZGQV(6BWSwlNU#`|(6ICl6FBM#ly^X0B(;jkjo~Gs6 zaE2--NZL-M*yC5@GEkv^uL7|Rw z=v{F!XZw$(-D}S16)iJHo{#)pseOu)X%TTOemU9t*g>`r2m6ISO69LzA5%O0rEl2a zh_Wxq{gkg(it%r)6&m$WX6SX9jk$kq&GzRPr--U~`d30OQNZn09pPpL53!k^aseL`M2%EIaXlmL%7 zbYSF*>|$uTYxsHBKnR*Y5PXuCrdh;v&kdvQKzaN}H^%)s1|&iw>K{gP?&poU}m9$eRbNSyL# zMC9htk`_pOC)KcreD*2&^a%9PC3Dy2Di^yOqH{4CKHY|vorwI-xBAhyh_sM?8e#Ss zYBu0nt+&w_oleV<$`ue3I&=BA83W3}p_Ro2S*zT!>4iWe!{AbIQ_s>dQn{ zaT`4ILw^fN_VVj+k4FUL@|lgyB2IBwHK`WePnokyj!KSa=c^r?vud;qYFZ>2SMW*( z9^_YEJdiL~P0UdkbUD!~JL;_^zhKsmMN3HQ-WHjn#AB+7|B;@KDb zleBJ4XT6jEVfU7&ZZo4E6sSAzP%RhxC-i38VuQ>N#_qPz4C=CCWTQMIFljrT9rImR zMiP(dNlvDo&gsyuGS5;zQ7hNMvuVcm=-;cFsqC;4C>Og|QA#4uJdg&H>7DG?fD=jvOd8%>|AyT`ghoA#nl~Jxo@U;eb`N+6DWR2bP zas`Bf)VY{FPvodbT^B_xqc4UlrFOjjrH?h%t=cY8FCzMe+Dk_*YM{3xc!rx}c~@P* zlHT9ScrAm}(z74Xiz||gyZ$%p#GPZwu@x1zlk7zP>z3a?sty;1s$&kJN&OgM7XM!E zcg+#??!24au)D(L0wl>N#L`Ds0`v5S91x%5vn+o1RqT$}1Dt!;K;>mrobzjmI?`NrRh0+21k4 zN*s`P=s7f1>+w=$TCAlq`E}Xbdv3+!?^}&aVsw)(SfXxcow>Jdv0`kS)bOF-*DboJ zOX1}1H(<5UkwEP{#%#e#fY}4Po}cX zn5XSwt4RMn6H67-(;E*yNz8#{->@H@ez;3%b5?)M*z0v#ky`BYPF)W+7YF6Ol?zBw zzjW}G{hKD0I5&I$?=#X9uVilL^6MNTZ>afeCgJRoXQN((1=P9Q74>v=o8>{c@DnYO z{mAG!1tDLkUc3KxpR$V+-NIy7&R>~344;fBS!^ynnjs&{B)AcxTdKH!eD9k>G{+yS z8si=k8Idf42l(Rse1Yg#f%Tf%^td@B#^gp0CbvMVkZ0zM5m}C=36eL2@i7)V%zZ@} z$LJy=!^mUEgbQ9RI5D7K6fj%dsyN8SkoX@C2lDw;i;>Pdp3NB_xSGQl5x)%;Mp-*k z6?==6ttpz}l8J+~n~2G}K}5trx|_-EWVhPj1zNpsiW)&>-~qGaj*4)%APm)AIHYNkJ6dS|f2E zUCNc>ONbYX!k~6`4Nu;J8V@a!i{=L`yHy5NPEuoCv84JT#*n)I%!^(j{dK*x+ouE3 z&ZpS3p9btn$M}33uRqT)!EVZ2mu`Z((BNvgH5j#zA?@i!HjI&YZNO-Cq~m3Uk; znl4t})&hMH64s$>l^#=6W3W>)`~*LIKt@!OX<^uR9ISuK(kUZ@V+Zzn;aw0V4G@}y zCmcvrx(YqcKHC_+@(*|6wb zyZcixZi;cNJN-aS7snstbzMF<&$Y_XvmtMR;ObOW)$AIgCC>Iv@=8C|t}kkU7P7oT zg6P-ui+MUcFU_t@w=W$^lehEKgck$E+rdi}qE}=dIbvIH%e)=d3dIY&A?y{3>U9Y( z-OP3uhw{%@nFWfrhv-D2qv9iej&5uyEn1+46N~@ zH1zG~9&g?cE%wWKitHMh)mE3)2(O!<&slpsb38dJgLPufv(@^iDd@*H)MxV7{@6tK zqg&7`PMfY_6JOBvXHIo|=phm+?<}b@Ermj~o>Rr7YT&rGy&Tok1uKlvcAno^{`@2* zz1HRrtS#H}j1)9^J2wltIW_52z|36(Y1xH}J>i|MULJ2QM0{6chaSi(JLwWy?Z!m; zo;hH$BSQ4>H1iC41C?>F%A=Ry<{EoYc=o=2v~y;W!(G0JR5;^rTQ$hr=A}}~_pd8a z?F#ul_-W+>kF9EbIPT40u7dl8@;Mg0qTfjSv|k3IJ7PUkRJ|+xK<2!s&H@E970Xv%^T+ zBKx8j(ernyv35_hbj+tJRPr(dlVv&m#+PXeh**d{Pg}oK0l!H9=IILDL!l6HRW(n{|v>v zHKK!zI{fhN_qmzh(;{ z9_yT)TFvq1#%ZDmr@?cg#@#WFtP_ zXCFF1EJka|C9B=k=xG;^|MbyW%JU{8Mul7kk%+!E-T8o3!>XY_&tUddjmvZ{xBZnnJC# zcxZki?#B6gQs$mz9^W!1`Cv<@a7%)5LtC|Ra?q9&e=^MD!Cm@MBel$CeGkvem|Jv@ z28J4uuaq1yN4m*a9_Z6OlCjir+`Z|trg%-th3Rd7AnxC!(~y>rNkx7X!n$S8^YjP{ zj{eRY>VpY=YX(km!dj1$YMz@Kc=ko~dzfcVm_F?Lkokhm44`EdzA9_-t*@hG7QU~h zDj|7Y+%{3==Y<8KwZ^M5Ay{6>Z^Z!_18{2MiynYnY@ZdRSJ)tAK~lzYTm645hx99$Kag zm8KLnov6^G2lJ`fSM#qo69VdzS-Zybwmg1l8NVf_NO-Tg+A@%yl9<76nGChQADr*U zT{q$tP=wsV9OZ8Di8(PXN<yjb1aXCt2QTPhOrNByI*p*5%HU9T^m8vXoTcg zpG~{RD-NtMZ4D?(P$f-1mBCc+v#F?i8m_6PhCk*tRM=NiJ?lK7mrdxh9iHS^Ihd2EBSy9ID&fBFCx{30_n6NEGC6|Kmzmjk~&n=I) zK2F-LXqL&q{hp{gP-7RD6nfH~ZcuQq>|K zTWxDDp?+mvd8#CT{I6?vHK@(m-Qdc%>&LwC{Cjt#2(Rj@nkf#hP8TzAm*m_3uzv3v zJS|$RzLZ(mC-3!29!pm8&f9!9@b^p`>EbH0bT{HQ6ugYqgt?ADstnBo^5jh;PHMJC(;c^^QE%aFgm^ zF{mD4gt?(2`$r0@)j#cwc|!0SS}B2KV3^GJ>AJ_JsV5vAi%}k06s7&nBk}g2cF@iF zwnR>#KayBp86hgrAgGO%wfLo_6fp;qjc)Z7-r8}t2vhAdK%@!97A@ks>rHcX?Q0(+ zKF`mYiZjm+rw4XoJR>PfLR1y)x__}5iUclguQO>Qn5ucxja$I_6Lb;VGX0&p1A_&w zbLV)$^Gr*nOUGXbd^+PUk=0WPTlGW-oy&_i;R{m1Dzm6S#kzmjZhN5DYOX&6Y=mAbp<(f}{Su$6h9QPxu(T9j3H)T1n()|2AV%R6pa@gpU$0++YtSPI#l?Q);` z1({w+P*YV)5u}|v`(Y;B&LDB{#O~k29W?7Y$nM^bRBzTf)#A}SzTLaBYI=dcaY2bt zEm3v+Kz79Ah>tqlj>|vwq$)&k-o9xN%#1b(@I~2A%fTDC&K4s=v)D`}snXc=Pjx0q z#jO?=22#=GGUyu_Cru1p%ueYGxkSzxQ;NSI@obFOU*YDjLF0bYO z@r{bQsRQ<|5!=%ht*pu^A>$&guzb$F$|IJA>9msuMh5#8_)?gP({@So6v9Y5d(fvn zuUWW5qjvk=b(Y{gXr=oR$!wDZ|C-$RWL-pZY=bgXwPoiao*do6$dW7{MGWZ?>wPTM zMsY5)l#{k=)$(YL;XKiW-VymYVRXx>BCkOQ6PM=HK0-RTHN)jhX2IpHNTs&%`zM}n z2%YjTIOdaGvsNU+H?<_lzr1!C@ms{_s*vLrGcFzvo7+^IjK}sc1Kn9+g|;OzWZ%M{ zKC=iU934^@8TbD7F$8t;o=8}Bt((eT*idlnCf`4!tc|+9@QJbTj8PPymL;m@bLBq! zj|4U4Y|MG?vGiB^f!d^7>0v#$OO;MByU>3I$OlPF)sNj#ElWzJL>jtjDzX%ynwiU( zz8MQ@3v}`!x2*cbPgHy=l(I`UQSjk~uXmndG&IJ*is?t?m6CE!aG|kNv2J(ibJkvv zSR-}R9bd^+6T(d7w^H5};3B_a+$(3U0gBXzBIpQLySI7`zD zT94XMxb-gwb`m|O@RKb5VUE^faz)gxcXmZ1X*(4x4zStFHg!e^_3F~DWfUBu2cGJ= z5X)GrmPijv4$D|p3J&~RkFqr^Dk3v}F|%dj;W@uiaftnR;_PLvPF7`h#<3##&{0OU zktGN3ThTAP2`Kkcyw%<_gU^k!HYQl^qGpqA)exonk~fKjoZ`EDIykfM*QGn9#^X(dr>6tYWRka{53^ox39JeWX}8;| zoT!~E%EMilN#SiWL0H)u9$|5nA2Rn}(#-VCEB@0=$+fI;w4X{?+HJPMZ^D$;Lo2y8 z!LYa_>{qR5>c|aZdl9x6R+q=&T6uv<@`)-MW~co_Oj*IArk@rg`&`<}8Te-W$m>3^~8%N(bdn5&{XsN3{hok#jwL1ctXX<@rjwM{OqxOK2QH;ZJtWb zYt5u^a#mmazLU<-WFoYMV)MLcAp?S5&WZa|FBMNJE%V)wV)fMdc;%FJ?|ctV$9N^G zn8t)akf`Q>;Q^x>h4~>c35a*$7^arWdU2>j0%-IM`jGQ4%0)gS_)n^(Nu3R@wY6CA zP(uyAIf$s|b|;AHW4WC|>ng(;b^vp-zrE)`|2A(lO~&h;gNAQ`u;BKs6t7WlsT#l0 zsznC9!d$-0TpY#YTr1INI(2ILSlz?i;enHD z=QB_2V)DN~Hj+uUK5>R5s!Lg$RnL5Z%{-oczsNF{9yTMYrcPEqidInQ@8+!u$gyvT znyZ^StKVFXIeaTbPAX=h)pFdOvR~Hta2y5m)us@ zsMK!iqE3kA&TX1fCRzG#nBd0}z;j77X!k)|~zxIjBU;`Zb(Iu^#<sB527_U!g-RMu@ zTZi#^*%O!jZA7A~;u6wPkDN`&36t+X^m}Vwsm!wSdgf2fR!tGz%6b`xwtayWiHOw! z28!l(Q%xyWZtvIfi}>3{w{Q=m?MG>%x=)SJn~;a#?sjZ)X(Bx~cg(F)9yfUy3slkR{b5u_*r=~bW_KD7W ziukcuGX)-ahxwprt;?XI%K+oRSP=9g#-g1a8o|r&uq_AA>%uM1ZQ%1=Wb~E~H(Nd) zS#q{wjVLDR1w*BCm)|xJuin&~&iq~cKH2pD= zin>DWIigx<*zr;|VxL9OZ_mP-2g|501LpN+ciA0t2SK=f}E0WNY z7JrtPMik+EUb#|9i--G_M>?}lUR^x2(G&GOP2ik#<>KAr7Y^RQ5#ps<7AV^r7JRjq zs>aqYdt#axdSVS{=wsbvtvEP~_re=`==960b&JcUKIiqmILC|qMOO!>%BIPRHjj`& z_rQQSra^_0%flAAhR)zEDtpgVF~cnJlbs4QC|EcnJLrJZJK*E}U=r_esN=%t#oG^Y zuL34MAr9Znyf?I-pnBoC*W)yW8T&*zM)(T#Icxu_SAN&C z{%Z3o9^M$EoO_oaQIL0V7%!8eX#b?RgC?T=HWG58E}cR{rfx;-vOBrqo=aMCDQibL z*VULx!-pJiWWG=);gN{@q9OsiyOtM#VpqLrVPWbz8AgtB!72&0*;94T^9=??&MB`a z!(aa*RO&p18;?4C!Gax7<4KEdCHQzdFCDgRc8i^CJRfOzgBuUd!NvV;9oPY@;MQf& zbZ-SDqptk;wJVFtml<7&(oTh6q^~9pq?YWuwq1{*erVsa^zC|K=%=;9$!l~lT~~T%uLp0sak$0(T2A&$S^ll&``LdY z2qr0a`te{T(BkYpp6T&79{$zu%{x4b+#5ADPy1U6Eka3?6{>97yT?z{55_eAc-bHf zzp>)+>GOoheDkW|Oj7e1wY{3`8`YIU8sdJc93uUoMp#`pF>~hLO**Es1TpAFsdG{+ z9J`D%{Pkw$bE9mJ2~Ka50Bw`KM#u>*5w;cf*&C6#^2NRORVUXHLuW!u+>@yZ4u03! zwIhAa?=lAOY21FFH1fT7mI$U3^z@NlP4MM+EbNe)6Jz`FX*>3O09!5c9yO^ z?NmxHz$0SrlP7{lXG4TB#|Z~}$=FF#W6i1>vrO&p^3>k?wn&E-2DQe-dGQNR zjEmzZoW;=|h3cOmaSZybH~55bbTuh29{S`a%sn9+&?+Cp?uhh}0MCi~T|aQu-|6=J zP;@jrME%$tqi{5!+-oQDP2E;{z3=gfR&(`)xiFocJ-)D=QtWO_-7ebBcE6Rsrs`!7qce zU7?{FK2Z?}8_o2JbsSy@W!_x9jO97^BRA#CaCWSwhWAAMveTLS-z~c025u;-mc*B} zC7xabeXeO5f^O$GCs(vUP^@CW=Xsll*!ZcQo8YGmW9nbxC%zmY3dG7~BVxVdm2=Se ze9Xq?>n;&s=4$(*a73@0CI` zPa6J`XIS_2nw?tcX zS1XM4C)rMPM`#n9^`|e}7y7j-(h2&sR+drt#C=+1N?TggT?;;&*8!=ix7BIi?WQCy ztTEo!`kY%KEI(FHEI(Ettmi$n@cVY%EuO4P6c*&9zMc>N_VIataoNW@IC)_sMp)w9v8O7y zWuDdojaHjd&WQZdA?ujS`*8sVp=+W ziT^zRR(V)Z6~u2hj{dx))n2~9izsWXDuYS5xObcnX>Un*{UmQ#bJQ4BXu# zd?d8Mi>9;5Z~Kmy78$xV=pDf$kUNetk7AEXaE}5WjcJh>&?cHnImwS^t$alPyfyqu zdd7neKq=Gagd#a%qMcAv8m+M6Jtx^Ie4CRz2zIfKs!IaSZAA$QNl8HaAR(!xtD>up z!Rjev^oiOe0}Me!69X#CJNh&D+_XgM(L30q!lUYl|CvW!MGNG?DPu6Ics0yQ9?+;J zz&W!R(kqs+Wi9^vRIF;@+%y&5vzYg2>hU9@*1|5GBq&hy6HnNG%ao|hUHeEzlcw5^AGIg8St$Z9GRAJKvikt(?OiuQI ziwUqqJ9@)(vyx6&5S)P-n@ZOa?c(4s+5b!>gKu2tP|1M94Zx8p@86G3v41D}{2ojC zi4;SMBp!~#Nk}ZReh)}Z46u+?)!^;WoVwbhqPbs1b9a|gpqEm|0i_=f$Zd{Ol8)59 z?k{Z>DP8@e?oKah-DvnvCq{Z>%s(3)-GLSQ>W2Gi@7N-pLPv1J5rRF~=WM)EI2Oy6EDx6E z?Z@`g6tC^q#zbqc36xfeRNuJ`;S`MsiPj$3q5juq>6ZsVMM`hIv;)1-dyXRAjz~87 zOTGzJC_kdD6r+9fN9~D2+Rvl4pZM!+-;4{V>RzYoV(HSi=+bfw>62cPV_xXuqtZV_ zAwGm5{tlDv@KD>p{{Q)t0%%po&4+w0vCyPY#+wcdCPyOtfuw{h)S;w`l928sZ8noc zq9j@Y-w+_iLjxuNKy(FAYEvf?rJ}C@9MRNl#jOzt1QfGPVKA9txFHAtXC%8$*3^t_ zbM&bF(Kr?OreM_>3dpO13i$51j;_p3k`Z`$^K-{-0)RZhI#{vWmmX^NJ z(a~@mpT8RCw4w*=!p;z`L)P@4^1fC8Z%xgd|Cck9KwBN9lDz7f(x?NQb34%(2^FbM z-BfR#PI-)>#6pJ()kO+vA#odRFLhf=cD1gr^9 zWk|}KpnlhfVCjegIADe_BplFV49UqV7(=~oBXT4;9jMp+sVoVr4fS|D#FFGypkB|X zsQON%h3-AH{ht5NZkNk{aT=jc&YNOk_g|9#OO%U?MyR2T(f`LBu{>04EU4(e6!@P} zJRWGJMrbS#Q~@gb&t#DJpHVR}a1L`l7d^cQ6fc(WzxVP#bF64+tQZgvvi+AFYyWp4 z{~q&Sa{M0-hwA@MS9ix;a{0`8>LZU%@qoJzPU3JU(Q)&s2MVeZp!)>5C?PUrrCKvk z(ye+3iSP9kCEFy4(kNL=6PU!y(m@fBc#^it1HML5D4^s(SnkCFzDCQRK#YuKCO}!{ zgA7@(2N|e0oqCArPCdm9>Kiw@&^Cb0zeyX{tZ|{4nQhp(VI$RrMx|0=32ea*!;%Xe zNn1^I0pdy=4LBf~t)Z=?nypz;ha>;Zk^f;(pinocuey!@CJ{7OofcKwMArngM^}%E zaR-x@rWPmzCJ_a3pafU~agvf0SORhC>KkDR#A#}3xnk%TGt)JurfWbLBefX=a)2;K zMGZq<&9SNq>w!OzeKjAP9RxtWf8sW8UMUj9ZI;5Qt?H?%Y~H-8r>3IvPaK^3Puyk| zxM~oP0(AgtPml?gKvf`4891;33V>M*@y`YpR~-X^U?ALJ8Q1~nF@S7lY6{n@wW0yy zHf&sx{zshI8iXnpj{tEX%~sh4WY+>^!6m_Zz#>3esduH~|4}c{TTx`V!M4|e4FlQ- zn*f7>kKn44l%#?KN0Eeq3Ks~7Ucey%ife#nO;`0+j_isCu(Bj&MFZ3d?=R2*wE|_} zR!bynpgZ&eLcOQFJb!{vcZWCOrlOu4> zK#)+zyk>0SHFA;CR_?aKig^zZ4R3Vp2+`)GqSZ?na_>jSfhQIeHi#JFbX)Y z=xARDM=(KiTwE|Kgu6^86SMF8eNj>14>))t#$dpX!E-h9dnRV@_xmtWQTtaC|CI`x z+;Z>tn7vF4NZkvk>geh5czSxeATKxy|LMSd08cZaAoYJu@|!qcoi{iH|LMqj-`syo z{r5RS9gXqy*yypr13|jv($I;)NPsJZjUHW!Qb@GKc_c>Syo7{KClamOi3Ed@CQ)6T z1p1k_i8kDs^i1@?>8-7!3vb9|vZM=5l0ucX+dM7iiGm3mwXSn@hok%se_3qFE80dP1HP{x2gmVgD6PzZvKl2{5!z!{3AWC$cRv6QU7vb+&5;EknpN^7p|lqO|#$|>Y^%4uNl z;gx^5r-MFvPe*6v0D1$ow3Js+lvhwtw6$Z|+QA+^Q^5TZ76<+%SXc=MN32A&Z?vT) z4B+33# ztCESAq=}_IQJ-iD$H9U=(L~ahWEmD77QPY(3t{2Lz8Did>|UmI}!3kx=J|El9( zjU<8gt(N>RG+Al$YFpu*h9x)-D{EKr=x77ep6SeVWqL4KOfJ)pxq}(Z+zoo_L1r}b2s441!pvY!8RjyJm?g{) zhG&^oO!e2n;I0o50>BUkI~e?7h=ZXNh7lN)LIKcWI0VBVp=3NDd51;9E&$#zM8i-6 z!(|xeVc7j0fKC{m!!QSc_!_>`UN~*9Mbj0YK2t#E`Sasf(qd^-eW#&r zc`v8O0EiPziWo9geA%t)HAa|y^7PNYMn<8DB4g>-DGCORo=J3trMJ1y&>QlAB)-sk4YIZQ!MVY|OG?tpQ$I z|Mk!YmNUy9cm#-dWwBTuz#}bQ4{=#LSbo6EfcRk6_pIH(%L4sK)=#V-fk%P(pIPaw zWZ=<2KZkXaRR}x=#Fw(_Se3v7f=zp`uZ(w$ZxZL5wDX%3@lE>ind~AG64XzVBo?K4?_wJwE*D5e~Yz<`2*0#N_Yo*U-qW3Q`sYIAD=UoDcXRH_A0rX#>JS+|-VqF5DN^qQWDwq^YDzH=slW3p;metZxGcExrMC()Wnw z-he!@2QULqDLjI?7*{xdrKU^=;dD2Bxd+~DEOr+{2dM*rr4sM%rYUx}6BDe7EJ_U3 znxdSbsrR?LFB&LHfpeZ2`Q%Znsye*GB_ZK+{1d1fW*@y0}zhy~3@y z$}jwt`tYg`4lv2{);o<&ZS5g8d3XQ80@TEyu#1S3$O|&7)Q}HZfb+RlAMqc>t+bs8 zn*DyI8T#a}jgyfgx@`k%L#s_ecB9w?>23u!;8X+!Sp&GHlojG*Pzq?||Eq2Otr@%EW;nt8zQ9O`e;Emm`VT|N zf+B&%fVH~+vD7Lp@K;Mc@WJ)0Sn4BesV8jMQpgocVNS|jkpF6_|5M4|jQ00Rv;K$C z4*k2)9DRV%Xg*FdD@J325YEd7&I640GjRWICWHSlQ#LS@ES&ErpF*EO9~69U?FZ!0 zmwdoV9N>^^gtsuIC7ciq5<31#X#FQay*n6mg8d-?W?{gF0${@+vkO2X3}rCLdY*(COR|Y+BD4hbo4SSrooEZ+0&jBQ* zZn_eRvS1v&r>$^J|FhUYUj}9@RqXj`H1jZEE(WL6yP=h}!Naw;yLWK9^~s?3bQ#$4 z1H+@!AmWc4(51X(B+zKecl&XByD7>lVz&N5*8|Qi&P7fw=QJmWlf+5-Ij@=fm6(*b8W8@RFZ?+%X*B@) zo^7|&&tOTjX$sv67`*SKSg%k%1BUM1fa05rb?^oz@$LV|B>GCkY%Vya-H$n-J)l}*DI8p}iR4$y zffIZ+1zuFu{SLICx_h%tx4R9@CV2ciLpk+l;ApB#>|P!Ew()QexQkLNGoREST`MD= z)C$k+AQzslNIV>G@dFrg+BB?)io8`$*nj9{!QmlJ4?SQ#$iBB?niV6#_^MdN+rW3`d+@pZ9sJ$=SwpGKABMnt zg8UzWm&Se=`k9~3PX-rwcko+*2NND> zboRAMrLd|*OJNlTcF(S-;a(?QgPqlm^U2v+Lw&YV(t1b*(& zJ!AzNL3(wkfN6;qusSRdSMq@>9>NwU?gkd;17oWn29gYz&0x6>hV(E1WdKmbZM?5D z@a}KY58tHtZ&JoL>BK*h`g6DxiOoi!`@-M?Ll6uHVJL#335FXmjKHuA1C|P4Jq&CZ zLSRUNVFHFP0J_KcaEEvD#gTj$rB_Z6X>iJY?e`yt9>m>#uuoqe^!lKcUJovD9(;EX zP}LfK9jKgwzeyoqRaUQp8hkJNw)l4W_WM5beeFBr`^9(GFjF9@KQn|BC{rF@g}ze%P4Nb0&YU_&|# zJQ(s}cm%^=FkoE(*uX%CAsmKe7)oJih2a?tA7P-l0^q|C4#P+p#p|}064T#(^f6NGXe?x)_;y&d%FOZ_B}Y?-X(w!@diKK8^NOU${}_JhdBK4 zgIkMWTz50Y%sJsDr4ilF1vB8X#z_Y(+fSYCaZ(2ZeAkQs9v_Hme%&u%o@g);fPqLX zWh%S!Xp4Y+5cfcQ8?NYm7giFBhT{Cv{PO)y`_=ee@cT+P`_d5hlAGTT-S->tdj!0c z#rvTre&c?_z)J&p!tbNsJKz!6_d}okB)2a4E%_lqyv$bYRyp8hB;F5Q_gnSgkZ$n% zdPu3?B(HDM)^F0TZ&KtxlKMWj0m{jvyGP}pu`-%%0GQxmXoO)51|=T=+A!F_;0;3n z44E+8hv69vsvH0oFgO4>DvOek`d(H?8bX18S#^mHMGdJASuM#9NlEDr2?a$3ELe;h zMa$zfpg!6&DOq`NOY1U>l$QaEx~`98p8m$DL2Y6UHqV>Qd<0p;^fKfNi z+EGaX5Gi*%B9y?Qi;c4~3c|`cqtOsn-dR-(!YXh&Q4(7^Wpx5OQ9ACOvg&6#6*W9N zWwpeh_Ta!3C$qYdl?haWrLRF0QV|7YnLs2GDHA9wxtav0I-!C?3<6bcU{dDQ9J^%# zd6oi8D@`~E^u54FCXfKQl<~$uM+OH6was;O%#DI{19u_hj_!grR~=4KG0&gjPxF`X z@&_kmm%G3Ec0ge*jY1-&Hp$^69MKxmo0K#Vn{aqZM=b>@M`?9wM`^A9hrKrekD|)@ z#;dxzx~sd>-RT7APT0DVKte#0unVNgMpm+tPG{dpSVTYt2LxHfb=+~qnQq}b?er- zOD%oRxtbuy#bcHGWnPo53hPMUkCpCsU@d9=fsy7>Uco-bD~uEdH~Oq22=q@|)ZD04 zK}d~KVhTo4O!@jlDJaI4U`E1FY%ays81_njQBk2!Ml3&e2w<*q3`<484*c(9p=?4a zQAA}MVK93d=G8UTaQ=GV+8XMzb#*p-Z6KF**<58*Mt?pa@2l}0sPTPU6G-mqSmLyv zbCsjN@}j`H>^B{&23bZ;h_!aFlE$cW*)f6(qQP_aJ(@$4lM73wYhpJB$MlVK3n=%7C{!mlpXc zPbp!w$|DL&ykB|MLOEPo_VVDeDkTe*SA83@jjmH(IRsmDomxT>IpXDTOB#Fs2^G<` zL%liTwTGU3km%03PwR~Jm(-WkFRR~L|J(YP>XnhQt^Pp$k$TaY)KgvGQs01}OHS%p zUB9t@9fBV8?e!1TZ$psMl6s!1-&Ow%LQo1!rcvA)nAOv<*?EclVI7`P924cEwCAlD z>0HU914j?-IMh0eT2&A6WgN2~uMdBt2tC3iXJN_dM+mCt10DiMN{*7u)l-f-S)@HB zeu07+h^3TlXV z6T#g~aJ4FUgLr=<_$L!wrwT5~1+R>t2_VUDsOPqSR#_E*#-ZlMEt0YEH7*g58=)7JT3oMuy=>0LOib*R7HrvBmYgi?!>SiqmSjMZM*D2DWm=BuPWR|QM*dsDCJIi3snu&e3a*QQ6FE1}Y+md9-CW^Lv5B^73tl>?CjXe!qccbrY z12qs&qb;W~FqaKGb1w`#fd|mcoKY?duhsaH8eQeQK}-7vUNB+b4nh%FLIO)jz#b+r z>fp=6fOaoEQHyx>bxu$o5?dO-joa9`wejXgp3CW3*|@H8H3IJPp2kp{_;VR5sEMm^`pJ=@Rgct58N8?GPFq#xC%nw*%H7N4%eeOO43)}zvwd5z*_ zUZb9Fvb>kqEp2VR3_pO2#HddP3Oa#Ap-wdHG{kD2MVR4A$|B zZf!o>#GPsOX`884JkV^L-W*6}ts?d3t-^*@p=Yh4f!B+n)}SyTV2nA<>`Ah`*;msX z7~|h@Flx$x;CjlbaUJg)?Qge)TWprd;I6(g{s0E@C41FxYh(O0u%D5q0NO7!AsuT% zyPE&fOoQjCW@CXI{^d<`0_v2xv+VG^-DckB2BbUyiyTMG#AnMbJoa zHNg`AUNGwUfP#$b@O3ThG5 zGSbr1SEskOW;8W5rJ>5G1Ebo|Ff4A1PFIWSO<9WwY6aC;ixj9;G>jCg_gb`+CCkhe zsCivpUTK!jvdU6tw&+8xLT|}Qsms$@)_BT1d8O3ebahIduVURBN3kf?DmwUwEi+pF zvWVN>;_F;QRhipjOKu6cSXH`yUX?Pc(kxNOw(vUY*wn8D+L!YZ@!MUOgc3A_5@1AN z2`r%m7itN2(!q}2)Uv!qeI>XT6xCQk&($rPTh=3Jk_&onXt}fH*9fSw+!nRQ%0ra> zBvs6J1VIAX4M-<&6I>7A`4M*UDNYI-3CEM^M-5Kv*kD)2C+1WghU)7RQln8}H-x8- zwg-bZ9#54F!Qf3Fr8|&TpK3$omWln|5%xyZ7u8u)GyOW9K|L`W|CYsT@gpC)Tn_8W z=q>2arAnoen6_*-F4JMy&=s>x785&`WYk?lS%sqiDpdx8>LyE56?$zbXF8f4rktn( zXTK;4p(Sf2GF7B#JZqU$8Q}9VvJjQu@9%rJYggZ8zCKf@Jn>LWOw8K88Hf7nyZVN8 z^;LHDB^~Np*VR{dR36blEyPH|=m{L=V`VmaIa-IG|0)U^w@*yu6i7GdvY&=-S~N z+i_lwU%?obF}_P@$~!l(h`bVe}awea~fg4cBvRFT}FXvgcf#UEN2HzI*KRzAu9K?&37r4Qb92`vd?!aC-1Pvw?j_ z*9>bP&^k54+Xp14W_0_gcHMlO-l>x}Ey0&L8DH_w%Qq~+J!eaC?@_{y;WC{1hMEUMqf^TN>ujv@y8?!r#okrZ;@GF(z+rO0Zd!^le zXLF3X#Qt=1ObNd2#+3Bmeq88F>c08r5nO|uxil)Vq9OLQoZ9W1FzXb3K~3-Gb)4^I zE|AoX$M&Q^YBx>E>`apX-sW>h1zc)0`fZBNQ==IabzBlkjv1U6Cr9++%a?}8`Q368$Tr{bs-<;HTb3?ex@zg_rFY!9`QDqi+;QtY zCHHA}mhf9dJbsl_Mn6-Mz`41H9x6HM50p#=xt1%DpKa6e7Ck8nTKZ#~?I}8&ysypn zj7mItjGeZ9>z%jUQ9{!SH*YQpT-wdFlinS*tM}2w-p4le{=OZ0?Yp#_l$P2ZwFx>= z6eL15_*{=mYFtK@5PG_(@V&6q_rmm9xk@Svrn%<0_+t8?nB<5?tPgWweQTE$f0Kg; z?sK8%?QgnpnEd;o?WtqJ*4R)$v+ay$zhj~_{?ZqHNQnidf`f#Cu| z%(BgqZ(TO{8&!OF`+Wwjw9{4@5gqkRG)8vz1caBTwsS7~PX#zclD}ma@%}PrjQoR2 z+T{V243mY+aFy~|V&K6@{+vmai*C2CT7ZIVUO)wTg2?Pb!0QB)iel(jHP=i!*S=6> z7DY~kA~PuR10u@pfD*?OODc}}pPrwp{Q5M6LmC*;z>o%pG%%!rAq@;^U`PW)8W_^R zkOqb{FrStS zT`|OrNwew^>^fs=3U*s#=Xnib z`CgN7w>Q#iI}jV5d?4PMe_)~z;niy*yav6pCt9zuV&e&{Fda1UBgwSuXOwH+yg9^9 zNr}^W#-&`oV#?*0ODV9(gij3^Xwp`8?Ito8LyWAakQpelO9rJ8QcS$b1PbYZv>^k9 zKssZHf(wB`-kSf0S7s~=Nu6eymBnhkcH<^i7CNtymBng>M*?Qa1v5#bk;=k@f=wgJ zVp>W53KWW@Yk1?TRjZ~kY9%sXq3|xh{PGpJ$Td6)ZiGFg(F)fH(fVmP)=KuMMoMQ* zkyI(aW=$v^{an0i8uCPDBNgp(hFEuo&Ha73(Hh9odd-*E4!?9jW6J)FygbB@@Jbnz zINmVFXb7{WVs4Dq2qW5zgIcWw`_jyIUS}Q_Jd)MHYYmv^IRBuilST%QWOrz^=4i~2 zY1e3tqcB6}Ab#~87wpdK5PoiPc~N`s30>p_v{sf>X(Y%c#2{vaLAyDYn-bv_vT_|>#UID+%t?Z1;#oWdv3d&_#%3+T7_CRkfXBRMbe z2@}wM6|EXs;%d|-+bHo8nhL{m=6OUD6t5pFMUBzOGEG`VsiQ|lM>F3Hl(Uj|!eCNyzee(xf>`#%kMz0?|U0CZgtyQxws8Aj0KE zqv};fW6#>f&tcA*H86iaGXLd@-4$U%eV#f18-J6pTEagu-zbhY3fZF#nrzv~WskIR zIm3-yEELRDDBActpy``oa}_1L=Gu4@%jbvPxaMiKvkcsA`gunJv#3u3Woz=Em8Z)~;Ov z194Ip%)MdiK9GH^;iT2do1 zjpWudtnpHNRkuX7OQ6|LgmpV>F;qySYYw`++N#iHQTvM2#m1WnNpM6%4F^$@mX#Hg z?iZkmr$}+*NQ1P2!a2vm2L{DltifW;nvg?0PBi{-VkV`-uniWMT>$wiAgS6Cf7T??L{SU3<<6`eQ)#qY@`A84 zU*3~xh z*rGGcz}@1oRWF6ZCBsRL)i@4y@t)Rdj0<+#2F0_%Rz z0wbI|C>wZ#6eAFYG{jWWQG^|9bQ>j=D#Sxk;iyrgjBZAuJFU2w8aviVod`U5k0``w z6{4ma-66_IlyMQH3RS33)7@|>ae)^ZsY)+U?v;1~Ls<$lapl<95v(T=#h%U}M=qhQ z@Pe0#L7p*_%QfySxVL6~P1wjE3%=NI9%kc?dPo0m0UZ29!7Yh5qac&hO*O!PBdh?k z{tcE@2J0P$aASm>OhkIL5yPyw9ruV4Bcxz=<`F3(&Vm)H5$oY0DE|mnFI}^yZcP!qUKGWzSrdN|g(kL0;o*J+ z{{SR~PXCXo3%UFoYV?@8&^cOL;{X3p^`Ug5$E1X))|UUAlK!7Nc1?;}X819g9MTnP z?|+)Y-6ka^J_WU(0{85IO0*4M)Q54GW~%f32j;hlk3C_Qj}jYH3=FXt475ZWCs< z>P%LBsv$MiWYX(UgOf}nP16Gty9cxfe3zHY%e!~=-P0MH_{zZ<<)`J!uE0H=u#FEH z#-9Sy7S6#VsI2L-h>1DTTOyJzBctagXd@yWqAM5?8DUP)Mn*b5+12|%?}GuUt9N_g zADz7q`TjV|rSE-6r}h11mi+f%RCa8j>gXP)Av;igbdQTm5Pgr9W9npKCk(<;-+r_l z{&2GUxA!gR+%hG*|G~b3&RfZ;k7$uEE7pyGYl{8{ za{3=E?%(b?HT#~~4{h2$OTRAWnwa%dCelIj%SU{#4wrYAW0vKvzPv-et0GVFk(}YQ zZiJi(PaV@wZF&`#7l`jZcY1waeD_-ZWRRVLrs~cd&c`C@?BeWq%Io;EL4%I>&A4>m zsoC3#H*L?c^#-FhT{mUZEo%cwhjMVPJ2)5l+$ zwtVi;uC@DI;bb&a*_E@)B8}j7bWI3ocYFVXxAZ>PZhxyLMhes%k~_+G?3H`U1BIPC4#@A8x7)iQ z0HfW0swT#Mwgxj>`Pvv$30xeJt-{&zf0Wzjdtl;w8Gvjj#<^`Kci{VDzQ&Zk?~k=B zHcU6UZ*xECe%*cC{k2=FkSk_aEUeHt+x+*tA9eo*K}c@%Kkwe-ei1efkt7r- zWF~ctiunV9xsn7as$c=4_RR$MGC`^;=px=(f`2kWo+^l|0xyeTF+h^ts^AaA>n3=g z37S-aR1IDN!5n}juTTZe#M?x$jR~$%1$&9tL+~+yzDCjS#tPf=iog#{zdxw@y|v;l zxDNO_ZfC`F6`JIC{0~(;QSk^u&^`u-N%BV3Ccgkt`{e|;5cmkr08pKOuCVKCm2-Si zVe702Xqo+s_IRicD?RmaBygGM3eT@R*TQwcEuL@VqAL01PX9fg-+3NH&^SB&zxO=r z`2&KG*6II~=T*0iXpvwrWCE9DN%Rkifsb>W->g5DcJySM`Ug-y;~2=H;q4t6oKb#!FSt0AFRo z#fC8pFctulR8^2qyu}1-m|&SI_yh6w6C7oNt5tz8AG{QTT!18BrwXni-a`b>Fu@(F zpo@545d6dh52=FD+2GA2C;~|GQ>tJK@g5;~feBtv1%1TR;WCey)0d^~vh*t8F!jHJLTFHCNa0&iDN{R^L^9 zD}n~}Bh@>rpFj}O-uM5xdSCTx2-@WL{aw}XRUbnTL4RKTkLt4sI;7Fmgw^ONfF4;h zuEvQVfu2_5s<{-wfb@kmo|-ZQBlwGJuBcg#fC|%8hnl=O7iFJEPzsP_iz>L2czXyA zFhR5`=p$Z29$*GQlEhoxJ{{pw1v3$~R}r)_LB1+@h75qdzxd1R3Aj!?DU;**g5nRs%D^vD7Bg< z)y}W2uU%VvckR=)Z`HnE`)#ecZhYOuy5zd)b+hZ{)$z%v{4;9PYUdzm(oXq{YpZI@ z5d_dnYp<$ZfuIF_UF~hPHz9~f|C`z;Yad0>IZydttbM(94}upT z{RarBzttgwdP&|qNZmF_Jvc}`F-Ywir2aZcc?T)@B{-AwN^O(Pm?1NDJ1teVEC)pUKs9SsjQ{J!DYhL;=OY-n#d+Q4(4`#)^> zwBc_E8qi-hoNxFBK}h@D|IY@okwegeHZ~4}2Nr9i2s)}Uws8!C4s=4}l*UUC^vR$5 zXEvrc&P9;8&;8krC5;6L2GH)thQ?|HRLh74RgE!&)Z{^G_8^r#NR;=AitxU`-jhuhnuGP@h1C|MDf{x7=i@=qeichf_g#1>KpMAKB@Ad z=>|fC)|lJ$edD=C&enuN{3>p1oTf?N6xL*4o`ZvT6MO)$3VfJ$Js-|r3)j?}dEO#w z$LsOMoFA{p#}ADWKY<4YvlKDFYlHjwFj$C({{Y84VP;1Z&kN%;_=SI%-4q>7f2QFh zOk>8-A8q(8*=RItwe!k0H(lGr$;~LnbxlkcOQ4I_n=Ud@gf0pPb#X?1s|mUo)eK!k zG(#8mX2rtKet&iX9Drpfm`Y0D>e>A2o5e4`{c8K>oew{|Ir-C4pKJG9JriF(Sp4hj zZhBV#+AEvidT;YPA0>}3Mv~o3^p3yy=*hPcIr`CfNKbq;srOTleP#|att8kA2opHc zs74R1>Pf3m#!>#;{T!RX0qqK`ddr%No4KkMTvBN}kj5 zmZ1gjj;ZqemV<^Cc^CuXiZS3lse#rM@BFslGQ-eXlydk!QBNhcqKSItg#4 zaz4d&^-ZLA(aSUVtSjLbN*>eFhC}4M_wc@s6zo+U zujuR*fBitqEXRd6etE@v{SU94k!g5Ma1x{wEF!p@;5h*GL@nBk z7HuY6e{oM_?PV)`1#llxd%2;7b%9mr0(_1UDM*$#_z(cT_;5vdA2#yha4w$Tm@0`y$3->Ph&M^tPV^%@i zDVoGigGo5XX(z$U8JvRa?D!sk1|C82T|M&?gCml@1)qr{k2r#tvyexeT1*4m>a_~+ z`DH5f8ccAb0e1||aqxdKln4K5KDlj8$;J(w{A{%o=>NRgg_NCg}+Sh6xR4cS>U zXIMz0_)18cS#8NdB*$VPcPsf8PrfCWyf;K7v5b`56sHOBmq0EPFc{IGVvVAKhMDpE zF!r$|SouCkb=}>Yi;rr|+CMb3 z`BU3INR=zQc`leZP;$WR_+k4JU)$qL{?YdIl3?32OQPRCyX5n?ueg5au4kYB<6~Ep z-1Y2Zd!Bruq-5*!&;8+r$6nn1>E?TP?A%@Sgd*Sk_>(WZxbvxxH87>u-4Qvyz*(+mD&*XvR?wHs>N;gXpn9>~+nA*Lz9VO_PN&ZvsTo#z;+mS#XC!zNC&8?o zWKV*97bR57k&xuuwQQDsmm_|#zzL&>rKM!Pk10!BtK8`8*bncd@Qs}6>ps;^C(;g{ zD9uN4-C#W3*Pes>%bsM7V*+$Fz$I9qEF+W^J`k1=rd;qqT7uDGq_Ympb!uj|?`S74 z84C|)T=p-S5BvykJz;&nJO#_xX+Q=8b7#dm#=$3s5=kE6aKJT&0oOQ?mTYjC6hi9? zI`~~Ee*1qq^K>ZvkOqb{Fr(EJqk|61Ol$>WWhJiU?2Guya)EJUH# z>7!sHp6=7?qOj0%#$k;%QVUDWgGN0qyqx6|VUPi{v%`XR41OodK4|)BKX1SaHpa4C&sx_KFPWP>|%_9pC9^DLtg=9J9Z5v#6-wre+;Ow3;Z zEHy$D`=y=n6iP|SXo3_ItYWZ@0mbYIGFw2EE(&=PFc}NW%2Jr=AQD~1mVYjVoj??p zf5rv_$^Ge_rLU9<#@F*zGga-4X;)+QT{2TGPM;(ic&-=*?8OF2Q*4xkV!_P8{k#pP z^#&}yoZcmv%vg9L-Y#V_{_Tnl*|P^}!d?vGGRovrvY8VI*>j8wZjk+)x3mr-ClthYw7bCLM@pCh$!Ci6JAC%*=!)o>{*)wI=Y2ZEE4g z6pVtO@<*J}?rnir2dutrQK*vUXHf3M%=8 zVA8|8Ma~JW){q3tvUXG0uoQI2cLi-Y(&e{@z3i1zu=sY$t6pjLt6sxwk5|;v^{!Al zRW3RQqd=fO$n{7HoK>udr*X+d$f){3X+@lF+|Q**WyA{UbS!N#EK8sX%U06~OsiH= zg_33Q7&=z@Q+Mc#GdIFp2^wX~3UsFVCKGij98agNyZmyNGm}zY%BE&PMGm=3Sy877 z>AZCM_=}`grJK@9)S(m14@tQh#_*i0EB@iOX!oV5)@F|1<*qwu9>XP=y(8AoKLAVT zgXp8b$e~xV(fYstBDAe-hAqw0{6UxiiGgEO;>(-TD12ZmANC-=C zMq!X->DFbU%`$5Fa@^dOFCR|1P}Y>o1q$}%>tV149Mzl$=S5MCCX-$}^5m zMU<7oKlnFbcd>yDzF6^2}igd_ZNykcsTyT}d zn=u21gsk)n7GP|fU_A_UOq#~8U9_S)1@(<5tpXqheMQO>4=}7?efc~Qq3V3IOV}5g(%8U;gzo+ zq}GALXmcpf>v`TI=$~Dn-u|O@<{RLpA`YWXQC_B2(sO$ZdVY^&(d;o;ggv|=KFp-E zUV@S4@Gza_QhHVzuD8Xa$)42dZSiEH57$GN;&$?$!D_h#_LJ`!Bgmsd&JiKPLbv`S zTAg76>?aS8(Ah>{q&aL)HDCdw+dg>AE9oDDN2MpdlI2OS!NPjke*uw^t7zPSgQ9=8 z(USm^7KQBMf3~w)%gWG-OV~~77eFHsZuM?A1_Iosff(*-&+h5u1Oa*fmpLovr96JQ z(SU@Fo)G`drU?Hl8kEhGCn@-~Ql8zQ14>6Sc&{j7eFuQy zhIz7RL^|AlnSSY+tU^gJ$b%r{Y9o}6`MfE;z@xi&5qol0d7L5YcME!}z14#7a!JBP~Xg#cH*X{i<^;&E2_smUiI&S(5`jY*Oo-B3gbY zL6Fmm946m{BFivZXD7etw4Aq8XTj{VQHGLl?}MBAJ~`C8-4(?QdF5|A6SF(!bvWpM zolXlT8GhoRf$U_P{BqGi0w#mMRy1Ht7UZ@fS|9th+8D_ZX>X%lnB7M^(S95|`A|{2 zy`RqOX9>@PckCVc(@xtbhq5O|-`%@?WOnrS-Ut7?Q}64>$;TCAj;5=4U`&rZsdyl} zN1j^TZvTl+WU=e(u+!VkwBwMd-9EeyYocuL3>gsf!+e(&pO$xa!e({$Hkc64eyIO} z;!O{oN%t{U795cx4vvQxtdcj*;@SMD21!$PX~q z7R>4WEu(_H@3-4C)3G|!Cj=!KfZGX9WH?PF_Af!wL|uQ0t*s=$v5C5zYQ*6zy|lEj zbaCnC((R=$l=57=Ke2RLX%d14bSCIr1R<^6?jAL@c>vPF$ECLR(g4r2z^hs)DO*;ywd}WL zFO~Vq&Xfhq91Bwx@@YPQby-VU1A+$h>avYx>ktIcx0gLowhck+^!cAE+g0`qf|%^{ zzfpFetPKH6aQXdZr^-G+&?8NMS)lA3f&|*IFmfSQAzWxcJ~0a?EsRHizCKpV{WO*K z7{Mn1N&Z?D=o-KqPcRoC$^TRZHN@LQa5od^%R;)@OT14A`k5e76(lr*mq*YDkmRwd z;2z@bA$XGsCaQwZi8rDNkO+|EnW~_fc-IkZXM#*s@GkKJ1TvZ8HUmiiix%4Q76wG7 ze^J%{9~Zu}@S}y_EetQ8P@Yl#bzDYyPC1{}?SEzA-i3cf&?I;JI~Sf<_%4C~{$~sS zzVIsqE%5ps)G@pclt&II?Wf=`JTwiFNxkmN^IK^F0@BDjIzU4l~p z(#nQ%TSIvumT4tc)ylW!X7_maJa?u0O82eqC)}^OkGapf`Q&5%fpW<$AZVP&{C2nO z9)%!)pX{FPo{pdeo#$TYE%K*s$Nq$xploIcHg8P}^&#GV#@s1IkW`Z_VAS?%OEWvaDEFM&Whj>>K zJj4X=tAew{bBk@hS;c65Iu#YT8y|vsDD*ST)5RS5|(GV=F&LRnXd= z3o7Iuf5#@Q`rPrWj#se0r%PFz*>wXJVs?#z3kcU}bv0y|)+mRvHJB4##By!{QztDf z@3OEZmno|O%!hYzp@e5D&S8RoyeG|5<+;jp8?5ucjeFAbwC9V8{t8W+-yf_nc(e!t zXon}pGa5k)I>j@`GXp^co$o346eH+BFY>JLEJe_RzSeV-=Q;!_-0#2N^Qh-H2toTJ zbn$Nzd<~Fr{h>3+vf?4V^ud!?O~Ob z^_4A^msMU-`K!unE4NnOQh8_Pw{eqUjsKy4d*$Pm42my2i z(Z^1D9Mj+h!Na^Dc$gQ2O6CQjl6gU>WL^*|nHPjg<^`eBL0%A46L%L(r0pvSwh(+s zU@QcTAjl=SlHdk{9Rwc`^b<@i0u&J}A-IX)8G?NTUlCY~0Z{~11h*4BM({SlNrJNk z<`TdJf_VhZ0IGz}DqCq)U_7gY@uB`Rp7o!qD(XLXRmr{njw0$m*&R1g|1m17k6-9N zvf6*pU(kh=qm^aMv#T!ZLnfsUA-ls$A5u~}s#B`-s~1&YTYZ1^^VP3czg7KW^`2@z z`J_LldQx>fg2s8$Kc{+rbsB;Iy1cr+x(Y!HdPVix>Z=e$&^J}zU40vZF72fM(dwtG zpF}|YbykJC$aQq#_Yph;kmUDOfuDHa5d6dhpQ?f}rQoFzlmaCAAF5zA@$MjafC+-C zpoe(p2*ffv!lW9`&p^~ZpP-W9W`dmrJp^VlDxUwS{S?quJm^l@73w>g0@$8N!z{C z?yK2XbGAmT9aVcv?H#rE)Jl|MGhSW)T!RN?8Iki2ll+<*d4tT}u4)~R_bdQQycUT+ zQRM?j{J9!=g%WpC;vglKxmtP(FNb-gFLx%%CM+hlov~+MV5bw?x4OnTTW%$p`mi4> zUq(@$zl5IZ&GIUWQ4tS2M#$Gw#9@)IVSB8cN_#pq?-e%8Q3aX9Z?*vnq z0dfhhAb1#HhV>v1!#zHzf#X+BC+YA@VDJcU){DWTnpqNPVXg#P8!qCf7%@?ViLOqy z^|ePtj))4kSslZMM+;$sfF-aG)ZbM1O)a;$-lwml#&UO^ZA)DslQovii;ey2e3^B= zRds>!Jsqo@)^o0MGWXMHTy_|TebcdaZ-^l>`#+6F)ci*lfb#erG6EdnokGXi_Kx!* zL%@A?n)J@OugDdFH`MAj%szH^6wtB;{V+s zwR4bqNww^EA+f!h;97zw31E!~PY(p&5Lg!j>;w%2TM6y}z@*Tjd6|pmy0~H7mx7?{ z63p6T){){dt3i8|6Gw`0D91a)QHdF!Xq+}U_s#r7a9H8mFYAom0cXG6^UpYpUe00i za?z5P8#c@<2vPXu^AWFg5aZC8>ponYOuZ05XfRJE$gC|wzGj++H(zo1eldlOJjzm zS{RnHmR20HG?hY@rf|j{loKwrp8f3|heNIBbc4`1s`1-6jWfQ-+-Pr%KoFASd&V~= zH%>%QO-BbBU^@CkL#QqMg(~MG0KT25{sIPw7rg{99sp-rs$e1UZX|dJFxkjO^PQZ7 z>!#|&g34WjARe&_x+B6!q0=M?pJQ2ocda9ZE?A3(jUsDN6D_oUCdz5X52l%)XjAcH zc<_b@s!gg@s?n>wCOg&YJunz`dWDfoVLW=d*MwhYtRv@A#j@?%)QxdU?W)z6l#OM+ zVON^olwqkxB{#QNreW1>3;qcgXR(T-rP;CNWM?JKv{a*ER0FXHI9sZl%tS2}z*5$3 zl%!P67aNiy%?N{3-F#EirA^#Fn|#GhRJ->y*|szVDp~DTUR1lQo2Yhw)fAY)jE31L zB8I9`3^GGtNK`}MXPaJbdb3GcQJqho-t%G8r%iuD(4DmXH{H{u+>#~v z5tUMmf_s`!vq#B+0QK@a3Sr6ndxCce&Jk#e0MiM|2o?h->p1wN;EdcCTo`K6Aaq;J zVz=I`>*jP0Gsf2RGx22IdnDr%)5u8pmKRdPb*Qz!rAEL2_{M}(E3LXd{-66f>Bs$? z@u&SI{~?u25&AURE9IeA#B`HZ5^t28&O3prdZc&Kfg4+p=M1 zc9wBWwq+*MJ@u=6(QN*F(fx~_Z|2@vXo%TcA0xkSTrP1*HcT(@3ayrRb)# zebnr_O1JtQHhAlN{muK<5h>`{u)V7fM~RCTOvzicb&+;aI~}-ouk2dndvn^6s42U8 zUxKaVfRL=GWyi7T{eYM-MMj!U9Rqtq%Zt-D(6^g;QKK`7CSABA=(~D~^6+-9Idl|^ zI+y$4JkNH`B460_)V^6h-%Zo-q_>bgC#Hot!?x(1x?o_IZ^vFd+3iB=knG7tJh!;# z`9*scy@-H{e{fOgS!`|{DzBv;@JPKZQJK!8#swkVq4|yzxpkZl|NIycKXs;m$3Nx` zcMR<3#Nd8Tm&d0};qwJS$V-`$Uob@!Qx+gnAc_nAeWWa9%Bn#LQVRbPDXX|@bqmxmAM`Dz3_@ruF7!tCr-gAqzg5qEBGZVii+Wh)!ysMm_OwO-cxNDFr*Gt1xI z5-2#{_MoDlg5&Mx)`_iuZF#k&9XbnC9z92TbGd2E?5jK~PxW`)8QZacmt1%}CT1<^ zv*5VAs3!*7+FhXW4jSdxjgoWM;mfv8w5-F|bJ6)dY_!|T#}3w5LhD5}#^bQ|G*PK2 zI8{hcR-;d!?vi@%@cm(0sP5*f0_Oylk4sV?@Ld|p;qq4d%MEggpwVkJ>-3_4dJ=TF z;qi8_UWJ2Mv@e(q?`ae_u-rgwZd8d(#f5;kR1+ z&_+MW^@Sa8Z!dujlwLEA+7&y>vN_2pQS#Cr7*RLhmYp7h<@MzsNm&$TK{16OXA~_~|g3j>3h`^1*KB z=pp?0j9G<_ao|K9cZ`uIUpVyu=fql66nE(4S+u8V1e03FmDn#OxQgIbf*l0k5X@K% z@DN-Lz~W2lVfRv$uDRG5FW*UAo*zq-#fH%p9Cl4pe-@SR&4A^{BN>>W^pJY+OO)Z= zOU7Y>(#|Cy+X0gNoGSi|MPE~+u}jC57)7|H2bf!I%E6Bt&y@bq5GN)wD z%$%ErG3i8&Ueubz0S!OSpbd6uoCeH# z5k?!VIKRb!<(Wk%&ZpOlmGh@(-JHoyo=>w1Fwy$$Co`#mr)Sv?W(Iy_3#a{ftX+OC z)ApClw#_Mb-SEJ@H*DLy^_F|Lmt42)&aJnWut@_y9_zdGz0h2sBbmx9gf}x?{q)1Q zR+&BO#tdwp@1tt4xWqx;d57MmQ(_fIJNCP zUxL|;n3wiimhH7HU-{Jj+xsFr;Q`y{pMr*2+eQ6N=wnwzZE!s)mrKK}zXiYL`0gb48ruH&J6R?a7>NRilR=dZ%Mmj{>}3_bG9!KgC=+X{0HX$c79lP z(5}rv*`W{&P(n5e1@&58 zkkd|}d6j&)2}bprS(tU%B_!&s!7l9>toSh&GZs+#+p-I?=Vx;bq0*OUyR)ma7iOOi z+E3>~VTpO;ODIPTa)iP{IffZ51DqyY59R$V$N%m&fxfahH$UgaY;Ibv+E===sjpP# z*uKvW{KWdoPv|QrvTdJcqpxheVcUJT-LT~jrMKLE%RT5bthfAhQE%aLl-}}Hw$fWd zJ)@rWmZM5<3H1-~sJG|`d&^1|Y8UCrvGwHqtcz#{yU0(+sOt7X z$My~RfIkszEEtcG^X>wQ7mT;*&@n1=LLEa~0PZY;LVzT#yr6w|3$nTtGq+ja{MSOq8!X5xQbN)HU7&yE(&%Tc) zS1-BjUpl3#OCw#sPOra6mwJOZYr$vv^`+3pZebS`L_G> z0|Tt@4WRG2^KC8p=zI6yu1tCFX26$Nn3jmTFt_toZ-X96}l7Q}g9yHKzS&4P> z545LZOw2@*30d*z$u=}j8}(!u=3_Ei`j>pT5&jG^z7fL0^ytYS@R1huwyZ-^9A7rW-NXrEf_ULh#~$Fxu+3=E72Zs)xut56F86-T+7e!@dEnJgN|LXzhie zEWRdbMrDHXLa|FD3Ob(Ci=*|@0M?~9N&}esPYM$ZxLbBQ73*}EELrh za=$I6J`!1E+fW$DU~^S7LY6`qYzFA{g=8tTzcBCuu79sDYD&O;XvbcP71L`+pShD> zGX(ZNqTLJim^%T=?8DI1LwYswIVZF$9p#F`fVp!=LijII(UTzZJ@4v!!5``*thXuU z$SQig=&wcZ7JXHuD=sSDUZhET!T-miSBhRh5J10E)LC>8L7V)7|D&SMiatgVL4Q}o z7ynrFV-dOuUBO!$i#m$my0J*UlQ|IxJ?Gt9WV^TM7afD07&Z4W^FW}Jx6__#t_&Kt zze>f~f#Wo~Q~+iFXIVlT0vE74#6#Py>ht z&=s87i-me0D5j>A?3(EN?KC-$BI+~aD6E*3V;SSibtT(e`F(|lTsFK|%DD3L9s8;1 z`Ts7TNtDmF|0*9kdH_${1!{Jb&lOat-v9)SNy`UKA|K@R7Tln^(tCLe?jJ`pdNme$ z=*;XDECvIdkMwFSChX_;im7-g4eCeq_Ec>pwuL2uTGn!FG0S>ti7l-Jqx(HuZoF}uI=0`l z<+^RR+_6P@w5nAsNT*P{t|?I(Wp0TwdMoyC@{4$8;`#H+=p8a`18+Y@@36tq`z(## zX9F+#&;Qu>qF;Uq^0wR(N9oO_+e&|1`c&zz(!Z3pmHJ9om#!<_TB=EY(cfPhC_RTD zfDV=#%CrCalY4nsd)V``66g}y`;y1F(2k7M=^ zYC(^v1NiDNGW8NQuAZ7~TgX8G4DSZ1_Xnv@2dRGyQo%vW6f&S!3XKu}3@fNk{(|;Y zhFqM(-cK;K0nkjahM<=~(+G$n$ROB8@GwC;!8Zi@Ccs>RdV(tnen;>L!2rS9X23y$ zqkzdyo1_Wa44R<8kJv4U*4-i>v0D_S-3ET-Zi5)U+r*2zO`>_XmACJVK;p4>=sR7yJ1VR+iDuSTd+EI3z4ICi&o8UG19o(U>&yG5IK4`-mZ3= zB6Yj1*5SLYkx{#CR?}`1TI>{=7z z^WWD**$~e@=g`^^&v{>fKNk31dS4qCiQ^39*bn~(gIC~9UO|lViu_2gC|(LjjB~sO zG0$t_3((J&d9D0%uT{LpYvVWI7HReh28&lPjrNL$F<1eu2*xbrYAoC@ERgZye4az*A#h$*J{1WYmMCEwOO}%ZIM_KjTTPBF3FOVm6QZ)iKGkE zze<_W6O+Qi0*U@rI)CukNn{+A#2#+L$_?e*sB+ww+u|b1?dA557oiFhTN2pgE0*xn zVhO*{b7B}R{ie|wj4%dKA75ee^mzHQ@}hF?igMiWm_f<``7f{@hqZ)j0S#@#@p!kq z++K}5CyO@RDs3h_$47IWWIkjJ*L87xBE3iO&w6b}{F_uOuT@@SIP6F^tF}L>8(o`X zVqz_p(d-Y4z%lERF*T#`2eX~*EVISptYO=wsx-RBfj?Dhu|%;yRjL~M;8^(a3B^D$ z+n>rw9+;reme1bS=fEWaSL{}v(lgyz?mYM<2-@$&h1uT({F^suD@N!b-gm=(@xE)& zig%~o>b}{{ZFfWace?L&+kaXN_c?V-VoHo!4ue03!5{A_Q}rS@mD7aj@bZ99N-)CF zoZruB@h_^z17Vbz-~Fzeb5-u=(E~Jk2x7!_D!yB9wz?c$3A7A#x& z>#Ex-|LWo9Rr$I-^niJ9rR~PbKt8)o=U*^}k|$UCW>)$ZRR*SAY+uL^+7}KQw;ELA zR?h_%%v+(~Z#o)6R*0fvIHlz^2GO7s|1+D{X%|~94rpNddbk}Q%!Q8Q?fBf@@loj0 z<(|rKD+em2Doxtdo`|YZRdxiyIkiWwnpia+K?{Cz)$FS22)IAfYM9PZ^65%6S(hHA z_4PPmisL))l>3N>7lN;8Pq#nQ0$5C4N{|bXpflx(5>8D9sb^Ks1GSWHGr=tcuMm7f zaGqc)S<`t4t^iCHu})?m7tS4{wK4^RzRPOU9>KS+2>N>FK#SqhlCc z|7M*TPwQjSI+?UaW+d(szxG;fwDKhe`HgXGZA^?qSo4x?*;&;~AhD2HYE^btg(Zg; zz=Vxs1Py*m(lX3huti0r+G256m?>FCc1eC_CXUX^*r=9A$G>M)HAnI65ZZ0%X>Bng!mutmilIF7POV2K3YLS@1jpEZkOv ztm`HD8r9DJnp!CNae`e0M+x*~{}v6{D5#GYSf=?cPOrl!_M_>aiEvDfTm7eEsumyH zum4A?&J2sign5yMV7NF>7ZD8C&9mr&;d=F^PHQ(eiyJoWI3+5nU`^Wic-vJ#O?E^W|&8L|)?S z@$=Khg<35iw^3WVaii}(7cX)KIL3m9u+zSo!%qd?=!yxv*|oMEN_J`6&bjRI#WD1_ z?Gh0Ak-duUrKr(&&V~03wvut%i5hz)lDYm&@e?&9H$eXXvG?ZTQ5D(W_`SU+ous>y zKssx8Cm|al2@sM1Njii;LK3n7A&`|t!SU#7x9KOway2cs9B{>FQyyW_iHPt<0d`wExP{`S$K(mOKBRFQW!@WzPOF z*$9MNOJ5TcNE^@~g``L|h{o~^5%jm8T6OSL!oE`}`!K~#CXlobByREhuL4o^Y!z~}}F>GzX#i^D*QP};vrr^I&G%i1O$&*Hl*P>dEG;F{Xm*FY6ZWXPy zx+Z#G zk%|W&x^J@$cbl%=c<-H6-!vR=_`V^mjKc3E@I8Q-hv$eG-X{+eDG#z=%>(bRqAcv) zV|cldvha^RhId56ixh{Hmzs~4Cyn+AuL2H$l2r$dZ+(1y(kP!dgdO^>u?^WT?q7A# z4!Tk|4)!(r;$T#xFAnt8NPY!??ZHi(D{Pw|ycfX!K$UIH12COOj6e?$Jq+2HopmUoPtTE5erDmt7$6*rz1 zxkDQ$UC^oNhx7A|0p#!j^$@@0=iys2Ue0m2UtGb-&`e-bs4(l1EAh`jq2cgn z*pE{vR2qM{XgRscKY&xH{j`B{jeig)^9w`>{{Wb@Fok_EH&%oHp7~E>U(wCl!Z?qL ze5hOXJjokvKf1l$<96EOak}I$`G~^^21YP2f`JhXj9_2{10xt1!N3RxMldjffe{Rh zU|<9TBN!OLzz7CLFff9F5e$rAU<3mr7#P982nI$lFoJ;*42)o41Op=&`2Q{jvPa1# zLx_M3v$ChkA|oS{Ws%8~NF+~%13;uKa;l6(_EZ(F=1{A6fZ-0{{~ehe89BrUg2T5@ zkpI;ok|IT#+(EJ_HaK`96~8Ex;p<2TFZvdpM2GB1i{u|pqJukqULTh@sE}kS8{Qzv zbpNLXt}5VxG94+JMIc6SIR``> zOWpYY#x3fSuS6iz!($}3OMK$E->>@|9y%O8FL4WxK#U}Ob4lMJ;p>~Z4e{+hZYX*l ziWBJ^;*c05l#Ln{o}CjA5a0$=C&TOp+DMqa0G3O|e-ajVB;Qk%UX)tI%_+jU>B&X; zMbnE)ie?vu*@&F>T>{?`h_3;d3Bbz@{ya|j^MYS6znN2}7(#HjOH_bAPOWF^aqWjZ zP-_4qgm4gFe5!20iGL_92q1!yb-BL^m;ONLRj5%a4bKNm7OR#ykoR}jF*Pqa1qB83 zbm*T%3?D$+7^@YBH$%x3q@`$-Q9&_E+==Yxzij5w89x_sGex3tzZv~wJ$DL>6{(hV zGnUSHXGZ@OAo%RCG|j+G5C_4=|ECTd3Ja3ue*@Bb3*Nm!7eny*8Wm^uBl|D;GF5<^ zCU2#98-SZ64+MPOf8DFpse*J89h9p`q=TYBF1H`UU&Qa-VwM|TnjyMP$ztDB$t=b7 zpmD_cK`DJ597j)wK%fIgp+AG@2J>?m@feZxfubKb97rL$W=xx@5i->2nlRIlJrkr$`9I@Uzy48&U4I5~uEOZ=dK|jaD9cx!YCMQjonm}+j{0^gperwy7MK>SQ%j z$!5(dhegeg3Ys&Ap3x}TtT{orx&~Kc zuCW-$Vl6+;G<41EPZiHCr?N}Hf{UYy6N=Br^X4lLXB1BIcvf){q#W)Q z#S4n(LgFm)k2Bfn@IH@8$*ARTMs~vUB z`v@E&;36=3AwVL4h^+^Kt@}Auc#t2Cb6@Za*Mf6P;RXM2eK3fTF9hTT5w_;!1>sot z`k=f}*zSz`HQf1maMu(PR$W;x*0PYWWtA1PQOhcWDrZ*)iM1?fc|~Q&a>CuR5Fi%) z3~E_eMJ20cHSYf7uF@xGO_;@%h=lJi%`(iG)t@HfF75NZWwYogyyd}J=rwWzEop~8 ze!;T*@W;FM;5a;VB7`EoCPaoyFTe98R}d){+-xPN1@G1PYqWm;IL`j%tgczTvkavv zrRU?Pm&(k`5C41CxmiC!$}^T9mX!vSsv#9{k1QQiYKBz8oLQP*IvG+3TL7GDEZ`}y zZ#=c#R>JeU1ont8US}`9BDX#Q0d*8&H+vBSYgiJ2apH^p>_ri|)e>kTun9mcya)V( zxrb1A0Vo#q0O;QfF9e0F#iG-P2l<1J{DL7oG*CD+<3ey=Fh+zs$NyU4>Fck|$`U*O z+TWFDm0yjDKP4-xvNDUh2t(DJtch83s?qsZ!4cgC3a@E7iu5WJ@{lefD%xFmkCgwp z>`WrWR8FWpU%oi2_6VP#Z~&z6;x^Tq)T#PT#q8O%B5h2?pWa`RP( zi_5FaNuZ57+#CWlmXAHA!yc1KB&>fxy8I6$&R{YV&q(P%qylyl$f*aYBv4D>1_E~w zc$~lo1imHk0|CB4tP;WegL*&iVNMy2c8m5L67DDVexc!hq12v7<J_Wap* z&bBPt|M8ttNgHS5!Y8SCLk@_9%lqG$jY5-xNJF#bAD{Jy94JoNkzyY39i+kW=v2+V zQ#oIv4oLo`3xlRJPhi31w>$rl?oFs0>Hmc7%0o0{f8+6QIX)XP=Y5<_C-1=}pcuTz zDpPitbt!L|15)NU<0USxnvxY47iauFz%Qgi>mOO6)y7t617a)u1ClEIv>6qC{;?H) zez6rAzw8P%%xb(><2~jU5O#s)8<=Jg-~_vm`_%mtvC&ddRSb+#)`QfQ?tkPcad=bxT?4;zoRBlMEDp5!j$|l zG7-IfzR}~RkZ?y`TLfxb*!V_(`2>~_uoE~&;2eR8O#pKUTn&Kvr62zgr!eZ!7ft&v z#2ARdx$wJCqZan*-;Elr#^9`ARS|0+Y33rkCg@rj%}Hgl$w6kBED#q%N+uaIP4bwq zhJ!!MKgk~-Dw73)H5k=B<#@3w1}pr(sl2Q5&Pwi?O3bV`S3X?%cxBiPGr^i;KY=;L ziB&o*oWb;kxYf9soACkM?VxzF$rM@{A0+2fh_IAT=~T<0y-ij51Z-Dc#|f zr}T&S|4?OlwTdWcPEUgO7tI#SU&-39JM6>UV+T1|{se*%kPBLNl5KC;=hdLJT{s6| zGl35P@Xhw_qbV-o!xL@_*N^t}9OaWJt%hs&6Wz{HA@i8=>wf)V^6*Uh{)8NSO7gr{ zZZv?uSao1E_hmKp1BKNFb9KK_><5f&TC}|Sn(CXY?bXu6=*{YPt9Ms_Q2lZB!RpVd zWd-LB-(CH1^=3#p%#T<9srng6h5p>(t<`_2eg#qpi=IyRDHbw9eM^PMROdE@Erge_ z4FsMeu!q3U1hho}IRq9ExQRd~0sk2Qa|x^?@Bx94nE=ZHAo>e8ellpilourWmaPdx?+adAexy z&)Pf-&9_4H;=ojIgF=yN5(Ev`$?<$ACo}F%*M;v**Fza1_NE61`h|AQ`Q4l==Ww^o z0bciBJLiTuVJpg!xbFZ0w75aCiHqc$G$wADCX8RE36U++=;X^ZTE#LAxP7T)sztgn z$|ZU^cLgVl@YjQzUWgyQDAVK8NT|r$IyI)7J2hc9c4|Uy=+x*|bZS6fuTjtGRLMT> z)Q$OPryfjfydp>+=(V^_%q&R#bGJXo1G-8DC3-nH{~&D%M5uf;I$ zR~D*Rqk`i5_pGNRf<76BsA-efBorjyGPBYUFwZDA1kT%!RVRN65mTQoXyP?v1Y%`5 z#_UJLYoFx@82R?@dnt-NFJww1+y2q>Xs#+oYfh#Q_^u#%_X<*m6{H+1Nccuf_<%HY zZl6mIB6mW$IC8pECw)|Dc#D$tCW7GQuPlh=6q7XmxR=0UQpD`i5J5{|jF_MAJvQ&V zdAgdg%-PiPxEktB+)QbdH3t70tb1wfcml7(YAXQN5O@P1z)$PPE!PIhmTL`)<=RoI z<=Sw~a&5H#a)nIO93bNtE8@8;Q7N_HK*q~7Nm!yBU?gjNbmm1 ze8cYf{b6DU9mYE7Qy}j@KfiB&aIGRkI4rLXtkpm&VUDUzsI@=}VH+z^zV8tD5xi3Mhz1NS ziuUm#0l3O|#y(kkrz$WV*PzD5CAdXgj43`oo(eX`l$@wg=uqzFWXd}^T4EJ&#U+h#i$IOKdcm8uf34*r7f^5de(guK2WtOW`$g?Hwa072PEZ<0R|8}ds3CA4 zfxQ44i<;=*dk%q>nbH!lz!(6MRi(wS0E|~hGYWb69Qd9{;12{|00`hYm47p*4h>ME znuiAXfkQ*6HV`cGLj7q2FEjv985#tr3N`42Pt<+5XO#F}LP;|VtyV>Hk~W2;M@!X` zbc?a$LB#?H z+Uo;{OxO2Gedt6es(;YeU!|bMbAgq>d1eDH&7KEiBLO>srvU}e#=6`T?_j)Vm;Qddi?pq?uDlo zo?lp8S6)|L=UO-))bsUqyjgifTQ{ms4=Kw~9*L-nuQNf);htPKu`Uf#0dr1WVO<_1 zX4+d8vYGauJ*J%=(_XhJ?C?CZCjUyT{3wrSDLZL30MiI8CU6IVCkX5$aEQQ30+I6p zDhS+4pp(GQ1VU>8vIr~$2vBjHteNwdH*=wiW`9oE?C-B?_77Dzb6P#PZG1ZIEU(v~ z@)VwxDT1L-->XsS448F%tPNC0xOk<1umTlKqXU~Yb&d|y{hB~*ogMPa3&CXM?t^+m zxJ#zRCBz(NBL3j05L(me&((GM`!{#`hx+-W8M%R03$q)jvS9WCSS}U+NmvwW$Mmb~ z%j&s%8!(8vc}lOVH(XKQ?mBub>krj`U4K6QV!f*2eEg_}_=brMg$=w} zeWbdfz5!fQ8e|#jBa0fYZnzQ>7Z4x0zTwt}8zB|&)6%f9VJ#$zcU?Uz-upeKr#z;u z%tSQ%Ki8x7gRVb+9e9yZF+YxC(O7sQ$0zFr(W+UXSW>X!=>DiYiRe#{qh9 zD>(?hXf$)J)~mpXLp??rfm)QON4>f$Nv{V#X8%d3dV)4uA0d1ipu=s>hXTQ!Nd_e! z)2R%A3QXx#j)n@mty3q1lG{3U0Z@VKI(4I=!o-?zU1LoncT*G1+SWB1u4?R07VAJV zs{{KR4>ulb{GsteqtLjb$*+lRwE7(x-DGZxgp_6Y9U0S<-jo6Fa05UrfjI{fjvJ(*63y)K2#-F&tRjzff$a3w_upWiH;Iy?Fo9#l&X_f7#5$`Nn;Hyh{Fm z#s8?M`^66}h~yX6!KphlGwAE%<8#0)uq= zFyq~u?z#8A%?~{I(4&t%{=_q_ZGU=x%M06Ie&yBn*Z%yMH+Q@x(E8`pLUFJ1=wjNz zzIw?+OA?oe9FjULh9%MtHnI8$JiwNK`R=6`Y11YdMlYeImVD2Livv~Q`$`KzTKeHF z{%X>)ulArz_~`G8!C=(IC#mSKr%^$_LH9>2k(P22ci#PH%=@ohOdCV^ukneQvhAYe zA!7IMO6h~Y77r~W74XPbX&Flm8B2#URuoryO8EI|Ny5^xOQ$TIyL8f0MM3tFqNNo} zXF)16vX3+_UA}Y)q{JiY`u8+TErz8S?6CDF%@jwIjgs~gSdd!Cf=OZ&=`D^cfV@MT1I)R%AgjWNM2LQ{)CGG{p=j7H)z;6z{IKW;c!Wvdf;A-*3?evlS zZSH~i3AhC+I6wXr7s#C^cCs?L{GXh1EL|6Xf7aN8l!XQQ<2T_6nK4vNtfP{Rf%uy~ zSe=3 zbGm#J-22cbM#KmPMldjffe{RhU|<9TBN!OLzz7CLFff9F5e$rAU<3mr7#P982nI$l zFoJ;*42)o41Op=&7{R~@2L6AB0YR9&Y8%(Z-M0RMf4|aEV7GU4tms+Ln|r$9e9Ni9 z!)uJPcx7Ew;TQ4TQLbf+krM>&6Cw+NzR682LRsc{mC6{i=w|3@W8|XS?MLAs65ilT z@=vz_8~7kqeOZU3t`cfI_}ywk^yzW3uA?i_a#@*LO8S#h7) zN&6c^rIc%e{83d`co*TxEuq1}@_p2PbkV?L1N^l^CHWn&qT- z3-(^Fo3kT=3%dt8ZeG&<^8BJ7?VsN9?=|1q`b;jhz?(QV$KySJ?V2AK|M>XeNpg=_ zp_j`8gF=nwj0|&X#@NiOvbwvEeOietnJ(k?mn)Odz+ifC2*^`ZQQib ztykBqdhUbTqe>-fJuuQ`3XW#A2zy$V?aV#8Yhd-s zU%LM75VqGezmwkh=-A4}_Lz&#A11a>>-xh_Ef?}mHHi55Y)$XK&i?bud%u06|Mit; ztcO3_UesjFjhd2MyQ+QaMd6sY{M{z5imTyp848yK$#K02yB58=V(ZPuo6Ga#Oi}Wn z3Hh=qD*vp2EMsmrAr)oj+x}ioFAUpOIA69Upf2DAU9~!;yQbq*!Dj_mXMC1()z6P~ zQ~s-~>+8F^9)aMvc6E8q4t;gT+lxwXyl{2P_(wXfUh#HjXkBvZA6LENyzMKo+HoIz zunpp)kM6lgw9B4<{?%7M`sn4CUwA=!f7e}Kez|@7-4K#JJA2!H(ZE_pu66?Rq z+|t(4=IU^97wWcOxbV&Y2o775V@p%L`W4sVmY-a!UH#4*`(L{8XgA27l&ZbTZRTf! z%MYerf%9ZyQv{IugU|Z@=Y}_4Z~XF!udn>>)7xLVKz+>o(u%^XXJ%e!L~8A?QLb&a zYHp5LzvW})+vV~>;dhbyr_Qpzp~Hufae8iZOzP@CFeo@(&cQ*KQ+QdZ9cb@!XTzfj zTn=s<%Rx0=i}==ZEZ-)h$z;--OucTOy~f_&UQKVWzkgD4Sy`D0N3u;35fPQ32#lLd zKopbXl(_VJ)abCVF$vm$iipT4wOZpB7G?~maO6MKBT~kOhEAE93!#8y!r&Gqv$C@n zEX>YM^%2<+#8XBRGm9rro?okm2!n|8_m4yT5kB5UBS`&+2&HQ7+)+8f!JpZ61c334*4t&)CU!)pDe9fKhw${PgXo-u{BYIJh*$hG7 zBthoHM1w(8NF1flV2F<=m7Sdlm7R%z7Ec6{Sr5BMdBVHnVd1^HRDrTX42BT+@rp_G ztw~#g6Qa7B6h;+xC`)5fJ$Rp;dwOiN9zs!mO1cuq|n zmzJ8EmoLFf-7oboxlldRp}~=&?-3rU{8&1e-P6v>%KYKA4E4_+^$%wqWs{L_8N(0i zZ!DFYE>>!vR9~sw{QYC4_8i0WF|3TB6M?BO&QivvrcRmaixtW2b@%2ZJF}|VgIKr0 zw|p(A55Dz5LA>>g;_$66zG1Vn!C=NGJnCB}OF2trD(;(?awO?P zZRDG|vv$mUGrOd-c$v=HF$>S!SwF{g>26ssWc3L*D;C$(%&%p*N81oZA|motsj1QN zzRLFQhzD+cb@j(ZWqu@sP5u;MEb;uQh&<&LwB|F^tayj zD3u7S2TW)A^XklBfjADZc2qJeGalnpCi*^6pbdq&#{n@th11JSrKJ&-EPX{YB)b@! zJXMZIH2RK3V-jLxeaD{I*ra5JUvOjzs)4{+%<(Kwq-S`<%;JoU`L(GTsTp`unVvB@ zV=|r$rhD**9)iYaq)+TGsLznbFA1N7OV}y>;(MmMrz>pQ0y_Qz&WssE5?93CffXRk_eLcwu0+h~r-35!}6wbB~I?jr=jYHcpS494!T+XaWP>zLE&lDS+0 zFYvrDC@6(nmwmG9meLbX{?H{nc~gzW^35_`-*a8tKRbF+_~NHi%a(Nul0?KVp;tH# zN_WB3XFD!z64K8)&eC)h0xZ+i(b2*v!9@B^H+6MYSD!s=FocEKIh(a$QT27rwt|9x zR2LN3xeoiHjujnObzD)fq+oFYO(K1T6rUHqXkLyU$!fNyuT0;Wl0W%d#kU~7b1IzY zqt3THJQ&3ZsyAn6b`3O3}J$w9$@ETv~B<`|;FOd(Nz z0cthJoj?6;l&1H4OwIH?-Q9?9lVCmT7(Dm1C?7zWPpl*lTfepr-qLu{aQ5uk2hKiv z@#(=wF0>*e?%X$@B^1NnVY6ASdV?V?NGi{3_Wk_ev9Y^%Z+PRr9i=7XGaT)ZZEX%x zt*v(Z;6+IF1z}LF9u)d`-qGO@94B_3*mA-#2vf%(=B9&*V<4dmgSh(HCagSY6MCy8 zUEo|okk%#W{3YFHv!m?2(o@keLlq^ffK-7VQ(xf%DIvb$k#1jZ-yFW^E9HVWW-@gk z$E2ec3Y&%Ao-+rrMBoR32wpfVm~21(!G9QW9CdS+<6z&td;%^g!fKi9e1TF#cdX5p_3igmgE1&~j6yI`{w*_w-+i)^dF`^!F5 z%0X}FE0GH~e(VSdVKR4<6wKB$eLpzbgVxgeZ9<A$faj|g|CQg{haq(j~E^`ul&+|b# z%!o|P?tM?!`bJ@Yi23&iGmeNzuU(}Ex5hA#gAEZZ9&`!{>c7XO@qAvsq^#-mRtm?y zOPoT2Ls+Ow^@3>}XSO6H7EVu1nJ_VT3gs^`nd4H%^8A#kJYO_}=QUt}Gqadj2BH&1 z6(GrUZ~y$C_TN(29$k+PPtX7B{`+$EV@hI}DbjTNvMo;zwA=n?)TsMh4x3<17fv?s z+U?rj*w{f0^!aZc-#$-GvBNH>2D)BY|K|Dw`_TZYiyIp#?dtMGI`4)o>NC-8JXgV-YBU9QXZ-&X51 z8!isFiE+dtmEvi_FY6Y|XFsuc~ZgzcSgeY5PIRaqa=_vCV|Cd{PM zjf#vIMdJz5)wOSK`JsZYY2VOzB9qGoDOE|iN+%H%o!pS7|98Ack(PVHO|DWoU_e=5BHvj6_WqFbw0Ey&L_ z$#ilxI;VY#rvh?Ak)48`j_v}C-5cKB;Mf2xw6?Xq+Sb-4^oD(lc^D_GT6@RTJLGo= zwt@~@S94cab2DIbmxxH;7Fkdr^aw_iTA@Jna^yoMcMbFp4D|N{_7D8G^E-#Vwfj#` z{d4Vh`#%f5H?ORs`q5=>ud3a8`?|?9Rkq%(j&E(#O_7OXZl77aDksNbD?mq5MJa?& z)b#>ehppQtd}g~^m?W44xy&VZsa-;?>t$gcGKwsV0^?sR%`fE0GfCSWf|JUE<-3dU zK;=PV&6>y8JdPg|%q}|8Sj`D6-vfjPdViVu9UBLk&Uz>JxG0V= zAB~4WI!VTuVoVs%;xQg(viCH~(RdO8KEyPh@cdAh;r=-;0i#jIc%CN}V;V9T!ouQZ zrIDL`m&MEG8#L!2{PKKu z5}(cUB7jcjY}hU>uc+ws$wf0_@s1aP6eDMiE46a-YFGqO(N)z&Gv>@?@eaoyO9yr} z#smaT%8^Rn3pL_;j^i|Nx&z9Ny4WUc>2JUIeec4pFD;-ND^^U*yZa!Aujgv;$3#+6 z|5MP>jNXZqRNLk9fdNU;99tN+p4)Ee@>$Obr>Q6p>@YG7rHM`mJ^ zS3y`U&yz>feAq`&cyR(GymE3+;mIv6b>0{ylQ;cRJ{D@WYMM3e+9qwgw%Na3*9QdB zpn>TuEk}Wiq3b#H=fa?E(AsE?w$(UltiHJ?-1VbxCPi(T?AK?%m{T3~rfF{OUAe`k zHr<8O-$e!Xp6c~;20Ksm`uD7LZs^_YGt0ua#f1o)qqBTVI^`i+9w=8L-x8Ecfk8pY zjb9btQg?DoS>cu~Un2MH4bz2Qokq|Iy^imNtAwq#t1h>m!+4J}Xlre|Uy>Nlf#Kzk zO@E$$k6XjPce(k17{ANmeA~IhwQX>lbNGBfF!j*zWf}|* z-yUF!tylij^&G8hn8f}=k}b)GoKx<-x;q!sv2!FxpIO*td2=AVRF0Ge`tXQdpBt;=s?D~wC}@2B`nhKg{dhRJEAPdL~jkhjhioT51JSAYT&B0UFr1qu%@Gb#Vadscx~s6E$4fB ze3~cM)1%W2l|A~Qa_C#s)l1qp>)}X89#DULA^7ZCefP-cUz@t^#oj z+?CeBlY_cJA@3w~EJ%hVuIE?sZ|d=p*ple=m6&j#z4}V2dti{VHB?l&g|vF*`RX~P zWpn41mhrr#*n5%JBi6SDLur|>A_lNA5Nuz%yu4&qOw59X%#Sbj$xQA_C5ykV-aJgi zkI9@=Fs*R9OkOiT82@a3OR(><_+g(tIxMD$CN~!B8~AV9@v(3^R)j24i^9jM6fVUuoIQ;?go>cwIfihqSuq`KqeYGExD7rDajk zWR?WOCwuR&EiH?P^u8zN3)pUr_WJkNMny+NCM1{4ij7;aFgC8VY{JCSvhwoOhM1Vr zG8P{8O0u)^`7K>%DJ?UNud8SH(Lvx3uE`rRMORlp7WRb1(z2{@?+(}$_M-AV+@9ZX{^3vPAV-coQ~8a zmzO7vN=VMBmG)oQ_s69f40-t!n@ny10}B>!&HSPDk>Qh-Glj9H8w}p>vXBM?abe8D z9L`s<@CfYc8AUTRej2}-#WRbI;l^3UvmQH zlM^OVeJYxfkgV~`nmn^OYqBw%rJL2a(y~O9S2oIvsi8H1rH##>6OyZ{eDPUTMJY)d z6&sgROX*?hWB!>P_)Db!Ma<6X1;Y<>uc$09FD>)dND6~?HHE#W`T*-xX8-WRj*g8R zjmF2^qN@!X#29DVu&Qdq{vcMxcX5lji{h!LC)HhEyY5Wi#h;tVE?*kuynWz}HLvP$^Frw^VJ?y(Ck z-yC#)bz{8Kso?wi{QUa7;enwixvvVR|LeG~+_dq5`=51u(_wdDWozGT|F-!2^Ul9H zU+yvYLORWA;Y`Lr@tc(wH(%U*ZgWp-uP~tM!-zz(4|55e&njGl<5@ysE>0;uj94aw+q^YY%QJ#Gjt2a!S^8VhQ-4Goe-EAA}Ywc^W z2%z-^VzD{RE=a*_GoyO7bvs^bKHYr0xyOp%KvcSd9EJgx+KEjD(JtYazsR42e3Jiq zSnfF;&XLKHFSig{HC>RHA!}?Jt47z$^38PNle1mEYR}*I{Qda1Z7)_GEcr0;#gI>P zbC>NYTvjM7+p}yBD&1E|Go{<3Sl)Xy3e*9G^RdV7zkl7jfPnJy4@7aS?e|r;mssPi zaX6h5V8Z_tx1@<7&3BM@p}-?;cx&pmVOJg!zmsSV(xY>pbLk+lBLT4u>nNtAH5o<2 zlpQ#;a}*4K{-tR|X|x$JJKiYh7-CRMI0SN`0p-#f05#$Z{u7?}o2s;6B^AeZ68C^(yeYPlidC1#_>e9$_iO?|+|>k&_c0 zwRv-Kr#m4mLDZs$2tJvAiRR?q_Rb4Iu9%-QPiLOK;;SpZatT(;;$|ijCrkN4*2H|; z0Xd+hU+CBQ3;sG$Lhl!3kWRv(Nyrgwz1R1edaZr7{_82Elo-nX9fDxlZFB6A3;CTv z1G$Ht-wr6TAOtd{S)kxj=kq@O9Y^QkI&3RVf*SRY+BY^^r4sGMTErpmB790~Ec=7h zleyn|l5MkXvv)Y|ZtHSOmuowIh;3I6xaAdJE%|22H`jJ$pjzN7g2igHee%fz4`9;? zNk@KI;;DEcdhhA=!+bfr`(*dYj-&RkBv&6Owj(hWq9gqm_7&*+r_g^5CVb!FfRum9 ztkSXt3vCg7|TDL?QTr}35fCstOtj=^NM#KvVL}f$&M!L#H>)|zPcK(LMUbaVUAhB-4I*$Vx ztdM9CazW=5^!dkDy|?JAi@Mc6_o_Q`xDIrT8ZPWi&#p>Sw>%1+WH@3QYAJNl+Uel@?7&zlxadG<;{IA-;gg7Dah z-gVv2JaY`_?Z93|H+LAhRwE(1@zX;+DC2%WuDfAhD~~dDI|{;IG+ETQ-ns$kr**vg zzg=Jd+W)zh7U5apSxIbv@}H~DSr4u}vg7o-$G1CM4}CE<|A12)6B(VI*ZG;XZ^Mo? zyVmTY0ailWvFKxgXYuEf*(rX+hd*SJAUoj*4*=2T&msFQn5octlUn)90ag0H(x_*4#tobo6D?H{ zF&m$COvwn;{6ir?TL0dajw}rk!uz)OXCV75J~46lB0JCWW^b#rRe18^qrFd_f3!F9 zyz{US<_r^lXmzedV&4_4KM3DjzZVYoS$7L+w7VZoebzqVi!=W=ebN5!)+6od=5(xh z={!hIx;4p~b6#;CQ*Y@!h%?j~*_f+3A=Uabn?Q0cF z(VagsHqAkQ)GwrtCfKV-l|WgGsuATY~S&&FJaqVEdbHe}c{KDCjbu(H~BF zr)c#ZE}H0wC}i<49nRuIb3vs7|KIfK=H>zi&AbZQ%m?+~YtAeBWpr|aym=+10cYHI zN>XScJ1NP>rT@$5w1uy9K6+ifHBTM{hREVHtafGOjoCSoq3Qr$oRbeI&*@G^ADG;F zYkFU0Uu&QB-#35he79qTy&FB0ozh|_$=l_2wLQolC7{kg+W8K?n_t1_*rVX8##^5J z;cX6FyYbde{wS%4!z;)xIjhlf@>SEH;_OrkYGsa|44+CJck7`UYCpCPdNr2@_1y3JWO?vQI23Dw^(&&{|MXPzhkFEGs7`SaGVWdQN%S9MMNe zXl7NS+AE;@awTs%%1qt5WS~XvhR7*Fs^oC9pz7QsZCp0w*Wk= zJ>k>Fr7dXi#)t4}NU!%jB^Y98d=zJ9=EAz7BIfQJAAMu!Tc7yTSV|Pzpo4gCrGLq1j*$9GJ}c|Cit*{8rr4>A zYz<96aDSXedn#UfziY0Uf7?ChlX{E3Qn}u~?Gk!7_kN1B|AX~UhokM0)@RnV+P~S2 zi9;*8OLevIR`IPHw%69Q_X+O_uL)NRwYGPxP1Y?jb9LKXb6u}GZ*ulKZ|ZHk?fstN z`#rYCB_B;DJxYDN*!w{4roW(AbKY2v?MJ4Qbab3rjv zK0wTr51{gD-Tc_b$2N8yuy&hhcvJUX3=azr8@T9H_X__Zz1y2(oBwlqx5x4t-)8h~ zzHNuhm!tm@E<+#HvSw%DQEU~SG#-uLS=fT1nC1`!Bs;73aHB`K9KG1(=&9V~RUQpU zFXFac^I&G_>!pWMm*K?FP(kz_;|PdiTpXRZ2bpK+(^M{JGbh(_=m;|{zDLD|=uc$TS z;=+t^<5E-O;)ePUgphnoAp!%Fl1Gi!>2P;|s78$r3ZnlqlF;IY;m9bjO{a^*?ZY_L z<_QrLgp1=earoLed`bGEZ|ckzUmKatmef?WCN(w8$n>E$O0zzATwGFe+_+Jrx1K98y5%LxQy{}aV$Ng6U_nTiMf%T)jT5HNlRxo(j}L`K;QIdj2|^RFp%XxV|-8$ zs~eN2WM@y!_5N?TlwOPZWV%GZH9S8opG;@<##&!Cqo~uqm9I#RqiRRhf$1p0)THE8 zD#27L&r~Yi)KQ~TQMz%S+CViUEuC<|FetgOjF~N=p=s&NM!MwU#iO5pYHE1I(B9}$ zTZC)Nhn6J=Q@&Goe0(!5+c~&Dp`ibYgC93{ST=srpT3VzrF-=H)Am)WIKN4BMOe=l z=Z<~>U4Eec$pg?=?m2q&c8d6`Nt4Cp@lUVp{}I-G`}W_OLGEW>-gg=rpZoi0Z0~UP zs5jntirl*o9z008uaLTL)@ef@wq5j`ky~b5V_d^6TlV~V7g#CXYI*3 zvJ%@xj^o?0UF168)I~+cV7q9r^RwZb+`cD%MDh9B^c?gyWo11pIAvpai_T{!f` z=HrhKym9*(>*ux~Mm^g8@!?lC)js+|=W5|L-@M!G9R3vfN=`VPemt%_L+?B|@id4V zIN|#5H*eG#^|r9bu3ypG&EY5E|4vRJw;ykHwzVID*5sGaT)2 zZfynaPn)CdFR%TG2!Hu0tWOA3DP77}70s{@+kTbG#RqyTqgXT|KE*o9{LnVcZ*SM& zWD+LV+kMWrtl`$=ay!@LLZU`8b`5v9YHc2N4XzrT(y4J0yN1s&Stljd5g^Fr`Z-9Y zQp|%aQrxI0!iymS%~P&W;0M1}$n0B}$b30=4U5v-;unqWUWC7;HYxz+6{<|- z!zvX{E{Ug$Df13T$3ce!Kcj)4>mOC3iM(Ii*&-C7carL~z{SIesVOaXXuDRf9UK&J zyce!wt=nVUV|$n4hYvhViFWd|$F;|0#c^nXGnp1GqRQlG-|_MesJ=cGgi9s-V)`ZK zqA9DlS4}6uv3cvfsBm5PM;xH17KHsX{NK`^&?>cCpp*mTLNT+($8&v`*2;Bqt*n6gc+H;S|iH|GX{sSX@*(@VnV!Sb~2HR*UmypI&;5V zIPZHYeikp&r9(QtabM~}Z&^HEpOOp17cPwV5040s@beE14UfR@H@EIJd0l*Q>J2A_ zm*o)o5<5I(FocH6azaDtH(zWVesKNDaTJAud@(iDW-zd0D^%|&?d&~Ubg=gH5!OlgPBE;tcsI#cv27+6FVmU3$z(A2s-ZTMiKW9^3x>ML$C3aO z5x1T?j((70qUhE|XMogkW5=eYlg(=)+k%A)>!f-jl{X8=d@(x<=e1L4=1RKs-GXUj z$5vH)-MyxvZhrLjt*IcOA ziwDvu1o`u|Tdlcyq=vi4Cn}X=Ch7HKz<7d`QW=jec4iwhDIP2qyf!iBAudvULw$I^ zPwqow@U<0+sU7O#vFV1UpT$El{#rQtrmqn3G)a%8jlnQ`wl6;76A**mYRv;a=#5kk z3@=P)?g_}P7po|l*;Xql_AS_mX@0?D)j;*$iJ&PAD$vtygF9e|WOPh)jK_WI z)T!_fRveO;nqn|at~3~^{V+GuS^vq#AH2uWTCW)Do7|-mjZe@`qWV}eD;~!MS^i0v z1S@x0j@c3%LgcP=nA2b|TVy#ItN?Qc3T(6{9b=H#$dJ3{F#1vF-bE7+7o2bJC}w(_;eKP+P(TVb-B7+wOTn} zy-FOxX<|SIsNv+qJ9(2Ih8KgplANn+V*xE$dm_{K7HtwA6|d+>%*_S_{uvw-|@V6&)N%+=l2k=1~{N^ z$=7oB+;`u7H{&(>TZo+Q#yT_)tTgiIZ=r9_#b16tIVTK&1l%Kl7hvYEZ$1l@NVu@$ zfEK0Ri!bC>w0p4$d`-)HZ$NQT^ONE0*msH)NZSVFomenXS$T6VVPgN+>+wbDTlk!- zZCjh;xviky$5%<+`_9fy_YT}U5I8U>s;%aR1=lU>d}Qgh2RAPVd3J)LDdLBvXSd9J zRU*&6i${Hsn>^&%OFI5uP~tY#SI&TiyL<3OVz2buczn12krO& zc;|&XPj9$zC+UN(^{zpF0ErvG%vDm9UBV;NJr&1Yfz~6;de;V_SDe6ux>XD(E%9*r z47Cpj4R*D?yQA&Te}3+{wk?<|3S-788+VRboi{kB9NfPB`8QvF(eb?FMJfM-gPVo3 z4+xJ4k92*aYo9TrZ`mh*Tw416Lq8kV-*l(5ve(~H#Yb5p({qyFz*)Lc_a{Y1> zO$BN<`vs@QsdskwhIapmys`YPcU`#CZa?;i$^)A>Ki&GX&1o8t-?H(YqOW6rGF;RQ zDDvLhHSNvC?TeXm*q*hCB~GR8mQ<$C*+1#{uw$M5J^OAuX3T=QyStmn?|Z+0XRE;V z3JSFv=Y5_qAv%oMPYhnX7){J44p8|I5wtq-6_ls_ zfBACD_m6(`y0}!qH~%{O%~^k){m`}49VZ>?er+$S=fik;`3XVbEOifBEElVmX zpFOKYHF_4W<+X-LLnPC2>e`=<>3Qu6r7=8o6tm~R!_fCb?eSwKYcnV1MkXX?X;a2V zL?%I0RN~P2?DE-R(P7an9v*iuW4ay1>;VD1HY&;>`lm3=y`eEFsj1m(XY+eT{=xh) z9l4X0B_##VR%dBPgJ6T)Bapu=w>~^Qb@g@iY%ZE_&9}063Z_k)UR7N^7sn8b=hf8I zGItgad!M7xCj(tZ=8pImCIR1B+8|v-WQ>Wq57)i<_ggRw|8D#i&NM{Mna{p6JROwo zP#-*zo$^K{3{|R6E-8mnDU>;y&{5v;YM$H*VSt@;YNBdeUDWh79Ul5l1%sg z^-X54pq?es?6p%*@vQ=OPgsiQa_k}S>)X>lsGYFg0yd5ei3}0`x8&r*_meN#|B{-c z2YT}-nG%s_-{WDv?1IGOVeWCjjRo#xrX$NdH|Uj@BPYKcJA}&}Kcw;? zUH~Lf9AbI!gMCVp=(sM+E{Is|p4@YC4N2kglNir0!ybmtdu`($!It%-Tszl_{JLu( z)gE9Gy(#vA)g&dBG~!MYPD?Z1An5;bRFR|uqu^G49`CDMoRjP2dbnel6|U#B6lK(z z8+Pvbr2XHI?zSDzck)A}@BTNLQ|zOLC>n7D!ObzqLDhstL^=&dQV^DbR$y6SOI=IL zGRWNA%dvmjXfSN_RYMP#)NG^w%q_-~xhIzixi~>7A;kwG_Z`wna_~;U_lLLFFfN^I z2Hk?q9frsld?n8A%eHNk$@=>Vx?BN4HroS_JoT6RUTWQeN!KouY5boL9_$j9{vqS- zhG$L(arnrJl}>z#wG7d8iM_Ws!o>68;nMyeYL1duu35kPgkU_Gclg>v*R6HkA$)rM z;cG#(J5QKD*xuLvlJJTk%x|M3444}yfeo$?{4bP&X3j@Bnru-ESHG1x&Yk zD$m?6$sW)Y3ku!O7yTruI}1e65@9-5%vHi<<6QU*$$m(XG3-K~2fjP$>cWoa9#^Lj z;5r@Cqw1D*i^piaxppT)u-OUF3%QV@8Lcl<*C3y6go4m9BilcXDX1GeI@ zHRsXI7M@m`yri2g1|oaIx>M4{bO12_**Q7czRF)~AXXEe_>?LRQ~?|}Cc(f@%HjAMCb@{@C~7Pa~yU`aW~_#xI34 zThy8f6JznSoya9)aTtM_B%R@v<~bs{p9k-fol-*hXYos^pz>kyOa6WiS^b%48ROACg1w%eNXilM1UN7?~Px=iyz9zH~%QVA^4awWn7;7nUV(! zo_yHz;hGP7{tydZ8o+>rH)LiS_{oz|WW+p|2Xht!c9xKCDp#-_A#z!Fd3tpalo}!; zl_~>2YBXN#_m9YoVSn2s3c*DhG-n?D1en8X`0 zW*YeMxr9HOQx;E|GIOpqH<$de?=fA9kF^HE9?J)dN3yec7=D?~{IeL?cbPl;F0*^f znOf5D)1T{MFsu1Nlqy`QGsFvhro|vi8L6 z!`~0LGk>f+2$R13&2V=$`qwZc=)8<$5++Qf{#&Wy4Rq{jOhTA(QdXF8X#d;PWZ-jh zctcK(fp2Oeyb~lFxi&Sie%;%jNadW94IkO?>DImdZ8pMX<8Pj~W=QFk+*!P=-|~J} z>gSldHyx5YOXu)@h~bC1mz0c6E-l4wu&3Tj`Df$V6<01>e&bCy-?DD~of{s0GbsfB%Ede}4A);jJ%i z+rHzix8M12??)dW`Qpo?FTe6?`@1`LIri=U$APcD{-$gA@lk0mOH*0m83!(8So3Y= zrmHt;iu4cb=jv&G>Cb)A{iWWbNzv>ju0x^RG^J9jRj4$9#t4~gTwYDhr=P-`I2A1@ zc?uwY>`K~GN`;d!sA~`5m)3&Y3*7mlT-wQZBRI6;4)nav1i%B>>_Pld}^Pa(A zSCA`NnD0svtY(&T?9ky6vn}SFQby;0=B=7&t@0rkOUd8o^!Jd9ITaeLyD8_8cyQf^ z-1oW<(2M8NiJ;rKvzXvIxZ&5i@SGXPSCc)*SGV)iN8=0(t#V#?^9?6XUhJOd=H~nO z&!6)A>v?q%uisR7+xM&Q7rJew!rz3eZI1|xZYx=xVT}fJ-U4BpL(!~pC~Ya2*l)w? zjl+TMZJ2s8lI8nce$A>^gI%f4oE_cWCey9DTXn0oOj4c+2VUJOT;Y)9vYj`*ip@D8 zVNjAUtX{UWzxSD*XL@!WWODd%>mRt!aV-swx4ZK{{P_0p`rlC?JVNXTwyEa^J*%q% zOHiR2%2nF^{))SMMs?GC+*drOnHGBga`WTYJgC3+;aStNeiUL%lWbMJi+b-tec^1i z!VYIZi+`lT6l%f7Q5o7OR{W6`R| z9)JGjd6l8Mt(#ZgUQ|TK={E^i3R4B`PaMdlU%+vFHNQ5n#<9)zPeJdz+;Q_ukMCor zr1iD?U%TJY3W9Vb6z9MMKb@bhPv{4i0QT??P5zAxz7QT-`{GrpTM z@Y03eUcaR8Av8(<79p0JIov9&0y*d;qeRJJWta~W^>2DEgS!QX>286phf4tW6L$tG zfZmp9YDUFo9ju==@2+n1H8U^l?#RsazwN=8d*w542+@^=eI&dtoU%3AraIKua|xW^ zGuO{|y)szef7(^h%YDmPIIb~@`m5J6v$Jitth|xqZq1?e1*HCX+VxXRn(Y?bEfaII zt*vNV92TsupM;zxIQ^eCwSHOM${lAg7@4wH%wg%TzfKGTA zxq$sSeF?W_PRZXMUX*0#k-ecJ6T4dwnUJDRWZgKa8b)N=+@!1wI=<~IL|*`4;VBOe z2@YYp*WGLm4x#sw?lnm+%s+e2?9AV9yG!32{vBo?9)7sH*Un7yYRu;OwU^p{%U$w` zwYw-7o-#6I@{Ek&5KF8~K7In}X7l(7ELJn_F_J_f#B>OTSLUw4ywMmQ9u88zu{p_8 zrotKkYn0xQoSK}RoXh+%oxSII={>_A)0sbJXF78y61B`s2AY~Iu^AcTC$P7;b%}0X z5*5p@ug#mU-|{ELHEII`(-j^i&n{hMurrc zoQAqgZWg_XfSnIwy67lIBl#L$zs=^^p=NUllq6WV*`c8oC843Ep%rFxXeoP3xnyEE zrlfLbZ-?WVy&bNz`f|B&?7i2&JErKEnCNk7Y2)0ASbe4Wh?p2tMp|0B2`XJu(#!my zw6q|fa4ft}P`8nVV>j!QX!~6`%5B!St8hR-yyc`mrB{nT>`~=FSRKBQQCRCGjQYc?5vCksbSxjHBFe9U` z{?gPl_rS`GjE2Tb-!u2n(u|BDs$!@;BV)FwYzW6iGyV^I?*dm!A)wF~Efn3Rg5R@x1k#<6sYnwciM7%&GdqCMa^ zW;OFBRHk7mW+oot?Em-K`z+3Z=JNKR-~0Le|DWHx_StLgb$OoktY=-$+G{`SS)rk` zb3+GQlvOf}9_F%enLEq}_eTMPG3MtF_A}lxyo_(m1%IN!8*F}+?`Uj3p=}xL4h@Zp zCZ+N0MsoB;NbI?921l;cf4pEV=|r~&HZ*i5^{)X~>Q9WbMa4xpd}h&N=CbhQ(xx%7R;Tju&_O*jg#>FWAJ8}EDd-CsWZqvHv@ib@mT zf!Qw+Nv5uq& zSf*j$EvW3IJ^3=M5{=+wCBXzwO z`U0IJzW?F;0qaotb^08KYe4-1eJNmjROq>f>kAaqJJavB-B~^+Eiu){N2B$=#7>;f z>2=ZeTpw<8AZ^b*?GiT*eV>;pMy3DL<2FiDSt9;aioYhen>-+ zafx4wG2N+Or+rg?$%e&`bbX+nD~jBkHnsc*Qux-Fo~*~`#zyh?_%ir1Y!n=?rTwCS zcdFN6qu@XzlR@^25?cAg8`;C)@8U)3AM`paU9{bJ(EG4V>&SB>N!cJFpz<6&ci`N9 ztbpNr>Y&a3*kEruH&V=UE&FP17vG%GoI!`$9Q^I#d0~Nvw{I%Xne7=rQ+yk5k?;-T zDDei_AS>DS<~HT$9Vd~)3OK-bcRO>d%l>!j?L~|!-urE6f79I)AeLkUJAK4nX+Za~ znEWYo6$*1Q-TXv_f^LOkB5b@PNH+OnV-<>p3+0;*)bjQz6gL;$Tr@R)YWz@_Aj!;H zxNsKTvX5-6r_vV>g%6H#35)Ub$5-SC?^um?*l?^j>wWZLF<~(p?YQy7hL271(T`0E zgNl{G&>lF?6VIbOW|T&96JbcjSCCGjh{9HCD8L((BVini&6z9*Chvp z88B8DPyKo@cyl@+P@xzRDdQqr2}9?m5s%m%9ISv?)8fS=B9|^@DOntI86Q0DMSf!K zi6pN{R*cny%vIu|Om8BN+nJumu#-D3QK6VI-8+Pyhqfb#t@)Ddg!ftnJ$vAY0(0`D zA%UIa{aMcs5$G>d00g$=zS+m+4W2It1O<#A^% zRH8!;} zO`1NP!F%dK#sEJ)N3qzk*to1vq)wA>YQ>%y`B{b!rB=N_uxY-mD=r(Ln!S(C@=UtJ&onVppep?vmD~}CL=wL zO}e>gY|_+t<_`7|466%Llss=f4#XJcearP9q#K(=cT_a-k^1DExlnB__sj8~SmF}3 z2TzY=aAT98d^yR}kJ)%HV`Z_}_5%do^(^O4Elj3d#?O3Ge$x2N`k!1+gjLQj6V*8M zE_Bx|Ii8-&YH0AtMjVpsiN*go#9d$GK{wi;{C~l)c-Ic$DIkNI8Mudd2^Xu8nHGg2 zZni>^m(TL1Hpc!b~LsmM>nMHO1qXTMgk-D#s=T2h;cv zq+7a_jn7_x{qiHdkkR%D6E~8h7ZUee#XUi!Dc!$*0pvJn#4tn{3^8G*&=DIpVhY%^ z1ZQ&K%tKSc#}}h%h9k|{{@I3a#Qsmd0J6CksF3Dh%jyqU=|14UOhflTL8WLazC15< zPsV=q0yuPnS-fn+5^Jfg6mnrU$b;DuKfM^??{qmKXGaHPy8hjU@Bir+K=v7qxiTN9 zbaMSmFA&oFepe4&2rWlLkS|CeLi!!=qBQZQk1l?CNUO;Q3c775R4{vA|6hLrluIp7 z{fP^5sdx3%;d%QFw?L)W3!q$T`rIUn6VJdJIKSop))&CR=TlOLk#DKzz=N-+gU+)g zo_QO2na2G#i3nP*At<_NsQAxb0EaHn{7=6CddANwcmezZB^a#FR~k^Lvk{+Q|EDj2 zq@&T>c>VWDk8C2!To%v#%%!c2Mk8$?mnYss)3LuO7SE=rGL&Z{^gqTgmy7YwlkQ*V$I`R> znfv2#R&R0&RvwQlFXJ&kgJ*P*9$iWy^KA$5j+z4KuvAyz`}BFU$DWe!BXSy;CfTY1G|4O!S8?_vIxANgIA-U)-0m zU(RdI?>PIC3z9sSaKDvv&9{O3NO4F^go2?&yVK6wt@g2)`8J8Y>1pTQx$U#x|NQCy zdL#5g+L^^~q?}IvKIPhmYwN#P-$)hDUpjv&aKbm2E?&}2h!K)y0Gko87 z!*>G3GduFensYWs`KMpG1*Cp?VSnAP8;S~s=@0FE*p{6;?7|%%+31DHEpWH@!qa5Ry;dt}C>+c;FZ?)CgUbr>0>mJ8j@44Rlt$48w=F&8a=2^`BJ+`#EM!VuR?4NmN#g)b{Y}ahp z);FeLUyXc_gzJ*)QlR(^_SJOK1W$~)mVWx?cT&zkQMYvUUFf~^J`}8{y8Ui_s^Zg7 zK(E0uC%@V1^+8D7DB>hs61Wo|LA;NcMZ^^1i~%tRVpC^P7oit!KW%L=pV=b%Lme2z z3yU>}e2WWlD{zy>+rcJKO#GtQamTUW+=!CWQ{8&%w@Cb*aC=?->Xz*A>YI-Ub1ILW zI-IlODNE@QOVM5RlRp2t;ziNBeH~JiS3c7h`+4)qo~+*YHk}&*UABiSPI2!_?MLJ` zROd*7jlYtF9Er z-WMRz_hs1Gu=gkUw%?Tgf#eUpaN)FfiRi!*ZzIwFWp>N{>X0MC2g+mAzICn9@7wDm zo;qAKyFMrn6RE!B)*xZ@CLgURrZ>Iw!4_MSXunq7*wiWZ#`O7I z408p@{Z+KT-t9cw(|*43lz0bPUBmL?hPUr7eIo#;-n@cVH?;q<_c!KxM0MmR^_Vd} z6E&JJx)Y#RDs6~i>6yR?b3Nhze-U6)4v5$h?H-@!X>ho^gkX>w%$exEA!Ig&l%_BP z_L;#tAKYPdd-GG`s~0Tc__2}U7`y}n&w$I|Q91Y-7(C5i$S^omT^PK^0XRfZeS)4b z2-DC_@ZR(jJp7Z61crExCZ32MFr%ofqnMX;%*(e-2eY-K zwWCKWMk<&KbwzGCna?a8%a`TD>X+eX@N#LX)G}UHe&+YY6ITd&a0pAs@@1|k9~q8n zQm$PF?+KC9`ub_0dVs-cH2wh^O~eRR4zt-mz-*2f!MZQYXTWvylld7Qk6-2!^E0|x zx>1M-gT?&t#^X1Uxe()=DBm(g3_dK(Z1%oA>E!e*j-_Yu%#RIq=Ex|sIWQU=kAhYT~&X~hPPqu#zQCLpMOAbNW=)nCz)%+xiMqpoGEwe=U65W88@D#WBta%ClAM& zNHdjT0*;M|g|M&33<+_Mv#cCL%V#!^O@a>3@vL4wu3Uc}yz&#{6XQQ~8Q+;dFi5G2 zjPeL(v-ZebR!)|V(WTMo^coF`vkf*wN(EvDhtLQ~{h0Bem6uvLwRFZ$*3Ufo$^D(t z!(2wEMkD_(vHv6gfUvNL5n*B65M$-)v30zj(_ott-B`6Sq^H`l3$o|s_8mWl{nouW z`9?a`r|)3HwSIuRSK~Z07MiulK2c=&Y~>KxUN&o1Id_!%8}|C(ls@x8^KIq&9A=+q-R919=^eWuateq4iF#H~u)?;%Y zvSrhin%d$zCbqa*#5Wsj>vrz6+YdBc6%RCM#AD)nI8ag{9hu`UE3HWqH&AxjkUMME zpHOO7xkB2{C5pG1>uG&|LhppWv2V>R=e|;F=&YviW4=%SYsow1+>rBypnL4UdmcLD z!(f4``ioHQaOvRrgXbG@e4!|=@mb@expo$_=6=x#KjZ&7)XGtOs$lgc3$5X62Bf5* z-v<|5_`qGUe>AigL5C48@UpJ1^VRcjTx#sBKlfs1Jp`=URMb~rHHyEHZVA_!iO7T9bo$3&1x=Lyi!Z+XGKsZG zpJjl5+_;xsBC$4lakGO5bW`cbrFS{HsdVH@ar+wg9jTL^ZBkr#e|Qu=VBp!+*;prb zG>Wxi4U*zY|K{X(D-Sm}Z~f!WBkg%&@=$?7cgJ9zg*$cl@F}|8Y>>VVv9gm(vSK8V zH&{Vaji|0s-&a#Z9N<7@x@epjb7EpTac`)CChS9e85gtNuKZ;NWkLaetiUQB3asMe zCG3P=btvvaOXWj~|q&h&F1EQn+i=*X#8#0`5D1TFF*@WaUQ$V0btCZw0o!ajM z&zm}u>&r5lzzBQl*5sY$I<8UiE@UU&3R^Occ1HCCaadpQoYqOtuhtE|g02s~2FKdO z!Lg+CckuP^6j+I3w%CUc1jGf2)k73m(Uz|AznwdpRes>;r^{rH4dMad-g&Rlu|5Oy zUK2JU!4G-5W}Q;4HkmqmxL3K?xtFQjBq|B`AoyPAFs``$gOG7v`#|Lgi7J8{a!KS; z_z;8kF<@xE&OGvY-X6bv9y8C69HrAwxe2=p z4ELg6r`PGDW1?f&|0Z*#bDpOS8#Z;C*-SSnW@EHd9!xP7%WtU5;FwGJ7%wO-ykmgR zU3v;(DP@<@OK$ua4}Zze^YNHF$%gS^=y~lp+AF&VCM72YCy(W%_>CSNj&nt(%}z&2rsRZ~a#EPf;5@F6Z%#^>DJ4gCi4HPD^JVGfSXszo$x;vf;~}C1_Vc4h zkDuUOewiO09xyy9IcjxIN@ytatJNvkijb2+_z4dSS12s-r+fM3c((4(T*e0vJS&&X zC(t3)GmB?@W_)9KD4yztQOxLY*DDS+%FE~ZB}-X2RI6d@y@y`Nr_A%dSvpp4bLV-k z`3vSRm^y9n#nKc1DTYp`pNiAzCDggIy9Xp9;taMdrHpSc{wR8 zT=vbK$NVgwxh$T!teivhAw>_VFey0-MNW!`KSPE)8g2)f0rmE71@}!&ZuRzV1^4nW z$_7*d_ZEn6Y@~l!Z=re0Pp=O%O-QC|bSll8uJ&}Bt_FS|cs20LNJ&B4tBtR+d4PMo z_6*mOz_e%ZmK3-J^#`#{7emW~owbmQ@m!=JiX>y?YdUSj9b~)z5Vuk75!Um$EW>>URG}Avdt6Bl}p}alP{Z?cro$f^ouhthPYI?NFnNA zL+#Ytc+-z?ocShg(HL+UJ6HuZHm0Y0^RU0aug}~6A1l`J2j6=FVE`4CVHZ>lMR}i$@Z>KDXDu_ z!^-5zo+9u|``faL{j@=$V*lTkiD|%1b7lAYK)v{%D%7I_lhV+w()1Z(^^%_#yTBKa z>ypb|j`QOkNB?#d8|~|XOr5C+HZ!xDLwh_ z^Kb0Ew)cwj>7N;Jj695i_1Bx}3L>V2$te(!WB z5c^Skqb~S=%(NGt8}mhye7p?G&W-)F^tac(5BM-8wY`V@|IW}@cCFVC(W$` zR8A)cvU{+Qxk3TIG}S{A`o=w+{tvtj!XU$f;|6fbC~cq*iVBLtFUZf|AMz_nk<1?y z<>MO_6lP+6AK##;FjEvxRW}%-V?1y}@v!vFrTn}Nqno*iljvkFg--%~W=u$vL0=q* z_r4h}FL)L-fCu2Q0EZ&;;E9v9P`oyL&KyO&ER4_i2dQMqFy62{m|v|Poq#!4>X<~e zdfIdk4Fn|fPp1zKiH?y|dE!~QN5arqvnU6Ta!h3S7+owMdFv)ND&tTEQV>gLrdiVC z)HpCrDmU}PRZ}=ir%=$0l0xLXS^VJDv(QjFd5z^ot_NN&KTFTT$07Ah+{~3zDM;C! zbPqxXeBl|Hk>S?D$nc~H+)0siUVTzVW>S*15J!VWBvDwvjI;p87b*Uxo05{~hGF5O z6M~{rQlqeX=oc6qGIeZT{!|q zaIUhu-wbVsEZoyylq$Ku$nf-@<=yXwc5rC};J{mJF=j6qx9!l5x=X$=-@%}C+rF${ zEB?e)DE@?R*Dkf%<$KxiedM*6YcY0vd3kua#%HI>rkW6P=_HN$biR7Swe!78Uwml^ z{d?f1leQGsaV3c7#R=kzwsnn-HX3U+_)n$(Rs6G3D(>IOLmnzl#E#A4#J!2diHC~D z6on?z5X=H#cs5XZw-rBh~McU!iF3@0vL=${1yQ zxS{Sy^*h^+Y=384 z^JM=QwA$u}9TR$AeSj`NAE1W}8I~aFkB@Y_O4Em-3N?o+D5d{zcKxFbf26e4`x>m? zwNHUnJv!N)&UR0yvSV-J_mSWCeGlcmedMn`vgMtMMw)qm*(j1R>iL-!(n_1`C!4~V zOItB%BPMf)Dvb43MoZ6>#~_2&Bmbw$TMY?WCYIStP9bN|ls6c^Ir5`vDAfu@%Bg5-J08xw%ZX9PD_wwX>(;IOH zE=tOMhkySEdal~3FZ{a$&unMhQ(KzgVlCBm!=?HPmo&Y_;ap(dAmd$j@CE9s)~8%zgrZnI#^bHH*WI=bv&QfKLoJ95}SrAs#)770wDQXVVVscW~J)v=dvrdsps@suo41qEgk8 z`{LcZDAlP7$e_3voT)7lHp$=#J3E_fXVwo~I44Zyx}h7mhK^?h?`_z74s*TBPS4(J zyYx)`5wqIf#_GoE4cJbK(E|RLG^7dMe@-@%Sk+W@XIs50I~j5fLL|V+}@px8qqnOHYSN$A#?OM{`i0iK{Dn79 zpI)Sh*XiR)8ESk+X1u~$$o!c|SBP{uIkR($ix(C92h8=47_mG8-W+&~;SGRygd*Nr z7_Yc_I)ft^Z1@_$i}W*)eg-y(&4AMQ8B>RtdGk%-Q*OdGU^ljizjuGl1saxB6D-2Mw-G$CC0{%9nu_r%(8au9 zlp;QMEWykDgq4TVkbzR&_~;l2~~G zW;E5*oIY`F(@Tx-z8e`C96Sl;FW)W1^_TAkmoJs@4Kg(9$u!FLwR>&i7hg0tw_dmv zgLkBO?n~P%;OFyhSg%~E7Ro7HuGTf&>zN=5K0BPA2?vb7Y}IT&mKhAs6M~eSxRtkR_Of|B(&0qFac^c6;AnEA2{U z_xYrxUq1B9hkPKhhJAHDz%C{vn9ZHCX(In1ZTQfBKWkQ68o~#RXdC>!y5bAchk}V% zqi8EWe7Lx|5&xSud98{5F*oP|$Y1duEe~U&)-SpaojP@>F+KB+&5fHc;69A| zg(r6F9}SN&#^4i2`pVKw+wJ*1wflOjd#n1Y`W|ssx?FvmKWgr8K8^bn?qisaWOSBh zoM|ehE8`4KO&>9JQp&^)_bk5W^ob`=_Vj%G@tyO&*?zI6yXL~SuiIEUxR86m;9$r6 zz%Fy01_A0nlFtqyk3)DJa;cO)PUQ`ildeIo62hYBQ*}FEeH>p^A1BTGui{7`eBY;@ zVir5kbf!1q{Y8a$09-g4+NTdQ=W!c)1B`V)=wq-A1{S?HN5H6X z@>>W7cYTbHZ;al@mkxp>!_sM?;9Cp1D4ZT2Ga}MYuSI|s0eS>PQ-B*zcEd~zZYspC z!c6cFq?7ZF3ev|68;&LGn5du_I(yzt&w$I)yInJ{kBN zpezPIq?7q0Lu<7+-6Z>S^YZ6Nd~|0xCMhX_%0OO%O3%*DfhNY;41Q4g|%vrT7LMP9ed$Z1%>C zGv-SMI`FJtNr!*;E9v;UONKM%#ta+@{u7Oq)nH3nfTu-x>7o|~diQ6S5#_v$qsIEh zs}h)8`cj6X`0$~{#jhMHDSqqFeZ}2}P7S~@_{IUu($lF!-NpAEdaJnP&@07@4;}VC z!AL3zt^atNfIys71&g`Vm!V|SkNHi*0s@Db0t1*E5U5fI284vNcn#8%5>Mubmvq7V zGe2_~Jj2iYMr`mRL1lKs8w@XGf#sWpGna)km-dI@dB8BdDs@0$NT@g6ayc#6JM%2R z?#wqv=knZR3PrS#XEH|T@doz1E0Z_lITGP~My9dMp~&Eb*E!yvY2+LV1Lt_16Sxe^ zpM=-qcm$~H&mJp3u8u7~-WMAe7i7MoQwY7m&0QatyR2rV>GLDzGf1XW8`a#@`tTsL zQ>)_h#5P@OK!DUL&9M>YL5R-Y8H#mqutAwJf`Qsq7<6tYt{c4vhLz}6~9G)4C zYhCiXjCD)aZCsbSE^l4gy7lX(tedy4Xx-{{Y3puTcjvlaidtX(76(up`^17NAooU3 zJ_OS8bt;+G&s+1XJGi_hHJsJDld~?_#VxVca!Z!%=E{=oTv=)bSC&!9mE~>b%B*|1 zvL#hqS=kn@Y#sdT5x4OXj;pUXa4*&;`_?~i@O|<5WHlFq>4?7>n=RHun2i(SvITv( zZnZEiMX*m5>Zb}TIiB06;CwAMp>wM6AjfBjZJ#yp%Rf|K|d&$Y} z3?Z%aE&f-h%F_}QQ!KkWU)9A}J`kRd<5!>1iHTrfX5iUlVA!T^i@1U*Pq zm4=K7!-g!7-_ZFgk@#HeR{OSXwwf)rE%xnIRusz8(b-^W>U;(4?XGR_e!ZjnllJbY zc4vlgFhL_&vP?SO&?2M^6CMq*sD-;M+5jCVT$*Y5vNKmVQMfB>czv|mIimewg0d}6 zI5n%Gv!Q@Ox#&Kj!QAu8=FV5%GGA?VqGYfCMR;qN&@;=S&gS2DX#LRCP@0Gq`}$^;#7Xq7rYBCXwFTyla)3vV%YOEgYwF=l=W<#0l2+SI$^j9H&5lofd9i(8D} zO9}35G3K7sy&wp~cxRUIc@{59cFBiAewuEhV_M42ZT5Y(J=Ng-_L?14`>bJ>S+Ulz z+hEBR2u7g}QP^1UA-1H5ze`XAQ1`a@cfa4>-P&#uyWeYfd~7zpk3A z>QwP;PySU)XJo3%}(d7Cvqv~IfUq<(SXp^otK(i zG2J~)<{*~VqU^rZWH~Pb4o?uSWIN-VT;~(6>&yVT+?n5Xd4prjNE*A#rAr#cB`Yv6 zIGRtNJT5voFmU9QhYVwrA2y6leHfcnA2uYzy$SA3aJ9ZY`G?Sl{UsW%v_^!)4*Xh$ zOS3KCbgP?%(=*QsKbZN+r`yWg-Zf`f>S=(Rbh>SA+i$weqlH5`mKP8rY|Y(x&^(Nv zDKx~U#aeu0r;2=@ASCAsK5>p;&*Zy3%E|&*!07F;IhnR5(4`@@v9JV3xqx zslLYDIl?Qmg(v+?$2I%(yG+$)`{<41)=yeDwQSmw8P>GCvSokmTtvtQG~t;T$;=nqupBv@MTjw%CCC-J=L%h| zLRc=cE%-`h_QgQu5?j!`EkXqby#f&T=KG-A^fz}RWK)5rRDc9;zK_@fiu}S^ARy3b zr9!k~{JN+}OKZi*@KUbxwvz=kDC^%eYn`{Wyqkcpj;4!ovp04x7g~p#6~m26W319p ztPrId<)@x*`@v|>9B5V+HNQ4bxMwj6QvigE^8Ad?;2)X(0i{0>5Pp!)%}dC1DfxMM z3DdR2I$>5G|BM4R7^*Q}1guMK)`0iVIQRlI&kdG&GzPkZvnjYR4`T}D{zv>JwU%F0 zY-kOepJBF!tt6`w*7AA%TsCfNh713SF7vmg%4oAas7x7MW*-N;-afxf72UDZ8G5=P z&1Fc|b%&k?#c$>Lm4i2}&SUK^u1Od(5;Qe*{-N{toxei@DMvo}blbZP-FFDBsZ*y+ zg4O`2E1x`NYHC^<{ulCv#C-m@4uy}8(1K0|*taaT-CzINqUgNB?^&#k7CyRZxE*7P z#J`^Ww$W{)JM+z#g-Q;P+AmpfYD`;dOlLlN_O}3i3z!_0G_Dh;Cvxb(7DIPshh=?t zMF-7!wA$gm$DEZNr4JtWEsb?nbi_Uoi=Gu4WWE>*-*I20Yu1?m-s(n%f5e$+&-j<( zmCZfdQCCI-SB{ETs4>O(0W%k!-^R9-qX_|LkKv!S0srdFT}Xn+^PokTKL;OioMTV8 z)CqpV=lQ~=d?9=e|Cf9}zr?k7e?4;kFXntX?-z6aFwZu(eBK9hol84h?vH?HIC)NO+Of8xbX7hs#53Z6MK?<+a5(P%N1JNS{ul5t~goBr_Z7GsD0bq z+jgRr&z5|Cixb~Y{o%p4lD}!IZJoTZ>AW~&X6gMqo^1b84+m(Iat5j~Af*qLh) zJ99hpI`dndxzhjpp*f~l{ueD4Rd-#-!`)AJJke0Wz@1Nb-0gg-<2Gkqhl@)Hb14#{T*`zvmnvb*RFRR@Iu?}!Nn1bD zg>ZT@`HeMo#nF>)Y`E#PA3dqV<4nR-5qQ$je-sTUm8p^c#oR=o^uvUO1~k)m8uK@; z*YQc_`j@*hxQtz2Ds+Cw&`9~D7Gp+>;$u+=p2x3iF&4Eb5;%H((P4baf!)wT`aJ%y z!+6M{P;z*tcBIn+BZ|@p7U}%)|E}``rel03CIk%C9~{Pdha1)J9LC=>RL@J{5-KnS zO$vC9F+7{V=8YIdb-u^Wo>G9-uX9}|Xw1Vfmg|R<=kHi$5p|)lLFT^Jfy91DtP3s= ze(-o`vLdwfVRA;^9c2D?FzhFHtOD0{!Kf9?{abaxs8Hk87NY#@sZ+wCd0n_cQx~eo zucW98`BRpkJE)LTMVjefZ`Fko)O!vF^)aA6Ca4o#&2b}8yOi3`n83Mn5&GvT{5gK* zd_g;3=dV@pd*}&?v?`%wF0iy7JG)V^B2x|L2QKfsN9<`b0-l+>bN z0HD$hL{x%#iC`YRr=T-Bj?GuN<|no&)C(>-6uJe!b12LUUU4YKFF54j#xHou!I>8v zaB#W>&pSBvg1u4*}=aFygGR zWFcme%LNRF!ls2?z?T>tf|tna9^`n%Gr5rq#}^3`Q+r;|{mPMW#j+ifp|O(SMbe@v@%_R0K^vrqs>QtKvp3F&H(a zp@qZLJ41rC{y6oFR0>7;d=gz3gM$KNkNe&1ay5~GT!@Mc$4Oq73u1IIHk%iRgiD3O za}z*4CiZ2w8y_uzE38R%lXcX#qiXjaEBzHcZN)?of2}l$$#72@jeD$oM-9D)KVlNr z4{)72!d+H+cUf^#=DbBP{?1{s1)n|3zu-{liMd_nS~XS53+_tM=`nQhzjI9emjAtD z>cy_J7;9zbb%A@A+cM00#=%%{aEi%jsR2XFyCY814EVFSHWx8f`0GsKC$gilFu}*= zO1R?qr~uPK*cfbR)bxbr3#JQuUa?|wiEiu+I9=)tJdIl{?%mPqIZLlsFFGlq8`{EiS_XL_Brn1+<_;(i>!6IMI5-E%|5jVKP zh=U2ixnJoE@E7`({&*RUQz52qyeVsyczvWl(7(@YKzm3-8Cq@k-Fa_C_MP{vu9&r| zaP>XS_ZI$gRpzRDRu#sG7gyHG!e7?TdTkbYUdwuZHBcewwaYmxf0>o_{5_eM zXVu<%&#LU~%b6#-fPCd^*;%#sRLlbKYk5d`PgnEjC-Mt&IEm+HC7z&>NG$}+aeO=T zDoqeCd-WUPu0j1p?t}I8E{D~Yw%aia5{%8 z`73=}3OyFYwmO$%0=mnQpyKV0vwUBlU-tYiEO?zdwlQ{7EFxpmP>_b$P>XLxK@|R^ zPgs2Ixx>t7FeAA|7?jX?ix7L!j8J#lbIm8t^2>!OQ@Ui3Q>|1s8ube9SVisd%A00o z!-hE171yX#J;pS?^5%C_RemOCoXL+5xtT^DOrL@=X1D(C-l9rd(WD(kiTjII94vb3 z^`gZsMIWCi`tGwL^TncN{YBipMZfYdUKLzCC89VXws?AC@ne&UmrO4%nN>V)PVs_; z#m_7+er|Q~(YuP*Y>9UjXCwQZQL)9d;pWdtES~qXNyPkB zdG`H%i|XLMaJ693uK{}i&%gPuX3;AsX9Eg)1SNgz6I=1oqUz#zUs+w;bo!~{W~BYo z`VWd7$fE`M9s}I*tUDLI2Y>tG2Nr#_tZLCG!0|b7pAG-@qOXwGIne(#==~OPy`V?j ziFKf=J+?j6OdhYUt=?R1-(jn)-m}lTv+9XGRkiYSWmWCoZB;C0oBi>s9h(s+Lsivo zuijQ&;|8m&+GgL(JX`iwZrxpNcO$9ZvBO?rueDY0-e%vi*;>70bM+%NHY|ngsj~02 z?zV5)Qp*5qYxeG`vR$*vZm-+D?slDS_lDc;bG!X+*X4Faw|nge_P{V+V<@jNoYxrA zYYgi(hV~l6d(CCtjc(;8PW1Bh{^0Flx%9GJdRZ>LESKIJ9(Hf3sil9L?R(B|uc_Gq zQY#;`?b*9yN7Xh7X=TlxJ@!Ycth>+eK5s{;wFqlQHdMzWd#kK_sUjW$MLRazcG~xB zl_OCxRkZ}XrN+M9&F|gFuyRjL?LN?N-)sf%QSp0@+A2|-Ql4lATX$J^S8v<7)mB+^ z-a5y&-M(WtDwe9oUR!P3kEJTBrzsHJPRfX?aK|3&thM6N{o=BbPK@RlyFy%(%rU(0 zFak<7 z)~80M{^hI3DCO^3)p6o>Azl&am6>QEQs)84D0n(R9CBlTopM zsUp%|@e=I%iZ@|5RkXtHtoQ^rSNSz;bLDl|8I^v^6p>|>OP8r5?VIhnz)&UOtZG^h zoK^Pu2-#xa0GwNvBE5af?Xc^&Y=YgiXFQTmI3L+hIJcfX zb*yJQzxqV!aJ+L0UoXKxFF2MopXh3B=-los5#%7#WM^$V9_*_O@+EtN=V%QP!7Pr#p5TYBq;^<43ywQE;r@6WEDOlyjh_fO_F z+`qOAkAAx-V8eY@ZvQT0c8*nP=Iolnu=NPsm7*zLXfES!Ut-Ry`(Cl(}3n4O!MiD(#X=JH8RzvZ^NFY3;2zp~NhtN-PO8`~bv zNuR9KQ9NOAIPSi4vIUauksBT!F$i9U&bBSPt@PH?H6v%3Vtn-*He7#{!DCvl^1+ws z$dKq^IzP3Kzdj%+BrGgXx;GA4a=WJp5#_-W&3Bw)M8=$WzU#+cw}T0y1! ze~ck4+>HUk3A9nf1Pp1Dy)lG%!4nSI(8dzkP_9s7)`wRQp8#E0B&2auOV^jKw{=32 zQ2vT3*(^P|LJS0)i{Qhw$X_%-yP2xSC@n)^B*B6i14ytSELn~v6S&{pgdyOdIY98aB~{DsD52%CU|~8M*z}*@79LJ7g86Bu z&;n`xf0uAVUROW(B8Pvw+I@5$gVnk>k=t&s#b24^d-xa1%B|Ip;lB))^@Zu&ZhQ5% znp!DNlcC(a_etpymT!Or=l1?QPqD3Lo89dz-l5oBQ(L`T_GU&aD{HHFJhrWh0#thC z?wvJz+$kHnAMTLWr20ax3ctGLvPJRfv$ud5x#*8aEK2iz&fV=^ABaYuU~ExHY~ib^ z%t&(;Ye`pyrl~^nEtXX9>vH$#6PLSpw}YMd#?#Q9|6%vz?Ly2niye=`=xIWD3IFiJ zS`AG}G1vdqEtsJG{pauPykij5`w(h}nWK`@pWw|)$p-#}lv+-c?sw4P!t5pJ>YCq?5@ z0prBkV>GyTwc?`@wUL4no;4O3J%ubSk(-Zdmm%G zx0ITsanZ_CU-NmZjjyk4CV+1d}xR8WNEJR_748zc03jEsE`elzoC1lG{$Y z^a+z(#)L_DPr-aY#PxY|n3bX)ugiN$2PXo)p- zH<->H^X5o1dVMsOU`VMucihZizsNI z7tdysCL(U8x$kmFkohZq-)aD~iY3|=c`FK5RIaF7@tYNYSn=|T_f|Z(BCPc76*Ed9 z4iHQt0d1w0@TPK%7zY#lk4gVq&G_TOfWp7OCcM0r|9%x%r%0wIM^l(_?eu3>QWSA8 zT9e>2Gul5v8LdCXr?lgfBO=ivPu$yD{*}-BxyP_hbG@OHvm|$NT0^vN;^MYh76X<) z%yL*;M3nhkjrl9)Z|J-(%vss2dEa!bp?gHT@N`)RDttt{GXfu86|Gl<`^s)0037jM z!=Jxf2w2%b9@84W`ZnhIcr{km zHA~j4TeERZ^_qQaUR-lz4d1)^3gU_28=#?wqg@2%xkMQqvxFf0s2uJmgB;F|VDiMv zA+q0%MI$Iz9&Ck`(#oG-ja(daR$e)Uxfgw1HgeTq8hwPWUTM-QI0Hrmd~-Jjau&NT zNE;fPrZL~Z`sG#27o8bh0B-2az0qo1G6H{5BOds@xwlo~j^8Qau9aQF)|IWNsF*0X z#ooCtPG?Sx!|`>-vbCGBQX0{DJFPahYVA4$*0-=Isxvf@dqZRXww1@q8^?th>CcZ0 zeB_DM`1o^yAx4!(!TIB_+}|g}U**rKeFIeb04_vJ$pVlVNt7x|qEPw!hWH}{Nt7xi z@lkQS!Uy0!S{XBkH9dUdKx!W?76E;bjmj6OI60ldmySY~jFb-RFCj>bU?leQMPfgN zOqohUnG-c3eo8&3rL5Fyy&q^IiYXF>qDYk#siH`kRuqipC7@2J;e12iy@g({E>R&c67WiaGB1J%JA*xF!_7w8*|5(WAP z1A3&tk|KkY8lOPlASJ~4plQqB5MT^cYIH$*ol=H!d{r3oa9<+#FO zo@aV0jNnE<>Nbjn7V4lm#=wOR_zhev7mQ;_+y?m#GKHbY&&w2!L~12ku-hzU4{rC- zq5gphsT{F?Nc{6d{BI6P|K^bRO(niu!1j*s%iQ6c7Q+A1xjIEtIi2U-xhWU^mX6^E z+FCUohF>LYN`t>A_&{sx`yG)7K4{%E5&l3tly_*6rhHR8{L_TIz>XZA@_~)5@rJ%CzZo}~5!*M=WNJz-=;UPHq3OY@~!-owE4W&nHkj1`IsOd9> zg&B>ME;uxF*f1muLAqc>;}H^{z!4GxH#j&fjGzG+8X6uB*l?36IM`$g8&1Jt6c}b4 z77_wP;bFrKrr=@W!A3xan1aKNMr0jkq^Ds9L!<5S2}QOn-$vX1yJfdfFS{vOvRnIr z>^}W-*(Ms8U(2b|ab~%yof0lbWaTxOZEO+6ma~X}ceGhDV zKnkDTF`wMsKfh2yZe8NCaB^?j@bk6g{%zG&Df}7BsZr!F%6fD>xu31-D<-#Y##2gi z-&%GlUv{64AXm(twusyxvSfGt{jz&5a#bLOuSl2itVoyPSES4Nel}aC^& z#y-#wRi=>H`+t9%4ZPt$x&M>A3D#^#4xJb}u_(D{p<(DX+z@OCF@*joeBl5LkFqD5 zCYmNLNnWBbME*CgpaB@lUl*zm)fefCvWAQlLprLLH_MDc&^NlpwYLTS7}hSA>@SB=|9=MAKMP zlGOeug^mjyA3EVD!B4^t4g7OT`Ln)|{@)zEA`O`a21ER3ePQV6`LFy8#=HG{+O(%n z{QEFZ|MT>zpAz;{^7=<2zq|jR z$NvZpYpwd8n9lU}^!7Ad^15mH<_-Hd>@VNEzE1XA9OU1y-{N5Y^>uVHKho}bXlwbN z4g2Nz^yc+-1fAY2`)w7G=j2QFpPPm~EMvqm=cdX24f}16+G;5W4}5yF&-L=nvR|g> zp{*>QLdy?ZPRX%7`X2o^;@>Y3{j{$O`k?CACG8WFcZx}?$`C_yiG4Ugpyyn#qpyM# zX)2&e*GJT!i*ck^*kp_kLCL^coJz4)g2C=Hu}pjjx5e$3LDGwn9BJK-`{z3VM(o2|3=h7UmiUG!Lex|B!bDdqv z#B^?)L%iSSAM-wCT2{9!eZ8%>z0ar5N35%OuJXCcciuU8aPQvzk3LtEoUWRnzQs2o zsN}iEUD%o5*`HlL%T|G+D!{)c@%o!<&T2G%FZnHf^!l{RkG}Nu&S!SkZAGq|pWFKE zmb%SaS2`+Zb7P;av#Y+d%(lc9Nl~S@j zG4hiqMt-u_Rn%2Jx4CZXGfzMD{PWK~n<9Sv@s%sCl=l2f=S8mF&JBFMu;Z!I_UaG> z1iu*UBnD?xrrC96kro3HcJ03tVS@co&p zXR5@`I7za|mB1li+n>>LYt#ou)|)xbWTLet+P8#d8ih)!;Ecu) zBR{QqQ}gw%O||=L!(08neiYe0x~q2Ao?UfM)a^sd$$oF$rOV=GQQa5qTG`dtrx$&D zclGUpmh0#0s(1QAugvv|O_`fAuQ$K>{F~2TzwBLj(t1{3-`FT`gp=CAklI3%pzbzs za~#zgRRFbuEzefg(FZNNy{xnE9Wm?O#!M(9q#eT8P#A*4aZcWOH?rPTK}6u=FS(CB zwR?Bnp6!4q45)v}Y_+3v>=Sc)#2CMHt*8{0?aI2RE`6CUUeBlN^8U-=UDKKYFK7PT z=I1J@=hbcQ3+&yvy)X7+?9Y|aq6po*G3N9P+w+ZIi0?FB7DuPw{`J>izj^(@+54_O z{`mg=SFh676?y+q-2JIKVb}ese!|iFQ`HuwX*gu6&$j)*N8e9dMQEo{SKA-4rd!?7 z8g@Bnlok6wI1YZUteeZ=_Z?7d(+i6>7C7TxfAfQd_YV&E(=`gf<`wq`k{1pbul+^w zs1L26-gdIh#V5UNm>z$|hrdN&jPZg`w2sr5Iz5iciW}fpC5)&aw4aQqf zDE2BSbD5BM`shd5q*yqqJY1^~cR#q{IC?+iLNArz%M<_b24UTXgH6urj+qHT!ifhG zeEF?%kdU{LKhUBGhBTdtf3wB7Yy+gBbQ?*Uu5tsIXZfR$ks{=!=%OKyyW^EV+J0C6 z`in3B2J1go`Xrdtf(27cX!ocS!ue!;F>DRf%^qb9OC~D|*5I-)Ibj5^rO%Z7wZ9l& zIN)X@*KACBS>_;b|J2y@s?5Be)7`PJ4^&2X-0KbQ0uILN1@Z3_-+IEB)Zk{IOoGI~ ze+Z~Vdl9y85I*1F&~F^hB~~sD*!Y^c_kjtmJXdd=|CUyJ>=aSDXyb|C5Jx z-$a6eKZtFA7T%psZcST3lknh1>|3&bD(E(Wy=`K5{V4>YeIbCq^P~~7xxpdj!Gb28 zY7+Yd_35n2TEp%^4V?8bYa<%F%-ODn*qIwp2*tbzP~Sc8E#cOUjJXgVh6MYV4=n-R z2_K@5jQr3N*gfjQhVGOPrLsZHq&x9L5@2-i?D{K}2D04RK%EcC)PeGkjGt`cn@K8^ zd{4+c@kH+?^1Eqm{uO;v*B3eDOgSk0Rj5tEQy+U@(1A=7;YGQyds3158|sREG1bgSS%4hh((;)B04&! z%6}67YyU3?{+9#)%Ypw94ygS!K9Xt-g;EcdInbdR;x}B6&qnl}Cn7+v)@l6o6c-qz z*9Pc)%m#%rFer#uLqkn$oUa5rLgyc#)9ZCJ{btS#2=LM3vuRSmh=7~4k$iooEZHM( zV25ZUSFPaG!adluNHYBN(D@|fPAu56H5Gr8!h@Ookrvq47@iA}eS~MEVAJ}0*tD** zW1>a7Hn6|OQIpA+Wop%l*jlAQum(H5@n0;2rwE%fu>)bj6i5nA%*1v=X=gcac5fu- z1NRB5Gb!b$6nxUhv*lptT%LOdPk^-ab>=F3I3XjGKE#K@?V0MrQ zH7+=A@9447`-acE^=+T=W#i4l!pwMX{CYSWkNf7f_GBM5-*~7qt0()Ngd43*9i2T7 zcfRvb=TZ7=cATC$m5Ym`nbEaYg_X0EW0c1ZaK-za#fC>?)~r(}c)sN z$=Fsg)zzPn=ITpGcil*s<#Hy>#pVvjERu%wgG^{dNP$+w9;D*%F6{O4J7GF5yp^F_ zW>V^Y4$cT|8K&P-z(xdYM}X9Wn)6SHS!FU($@y&-#B_H)^U?zXj%tYiK_Yth-pzLFjmK)XK3Z+tQN6o*M-6;c$ZPK-fF|^I z06$hkkz1>gR>ohu*S5WSpIyS=3j*v!&|~%|AjA#4)?UEusCvx4e=nr9w^nbp*8*^B zb*)48n90Wd=&Ox-)a`1Azo*+l@SsfQo>;357c+%0$9JVKP0n z`)am=<|=S#N3}cImc84nB}6-FcGPU&OY~4;3bt+8yTAGgiA0nfeArG@?5^I9H1@{; zwWkJK1GZQ1M)5qQpu$SoIgw_cRItZT5ulMMLYaUAtk`FlD+mlk38ajj;JST#HR5gi zi2MB{0B`NzTwPm50`1ltJ8NqmskLw4j%v4FuO#MG($?S+P=-UXRCe3W4o<=asnc6;L+M!^<-7$-aXZiSJ_y!M5DVR zwnOyWdV@7xsiit=L61#h9WfJps@V=UQ@fN~^4{G;n*Mc!RMyngZm!;8-$Ro8D0MZ+ zs@}G_YKPUi!(M}iO1Qvjv|PEq2iX2Z^|o!**gx<{b=B@FqNUbutJz&qQ;Tf?=p#>} zz_r*Rfc+bU+PR~q!dCMLs!D1a66t7pXeiXlsLx60tM~6k1D68qQUFyKbrZ0kS^?F# zR66Qod+caykL|6tUfWT*4P9&}Y88UH)it)tZF?(F@z9Puz;#JIA2iSXW0R0@&dbOf zp}hjm9XKGv%j(^rI<3#;a_f5Qq|`1~bMvud1aS>Uh8M+4FckL17cacf+e z@o-%IR_ce&RTS`cvI7stHE*ZBoznV|#?|w212k-yu?>6vhn8WG4~F0+o{aRQWlzEh zbE}V^f9||*@?Xf~KAX!o<{5=N!8TDyOXGd#7`yVEH%0Q5VR)W7_=^5 z%lG!F5Wtklh(+eE`S)b zb8!bK`Y6xRLqr62ZWqjB_`=g|e^w~I5XM`Qb(Wxku;V5li%#|}qBXTdl)zbd`iH*m z!qd)$r+-j&FFb9DV=U$`085+8@loFGbFRz@oI7f+W$xm+>*qc?_g8b@p8NgCGjqP2 zb8(I`qwsY99G|<q-;dpKG2w0+$-k6Xs5vI|Y}B%|9lXHZk$vxY1L5sN8o3t2m)h*TDFgu?z#*0)kb zHjD7R6=74!nhDF7x3Y*b3foE6^HRhuEaE7IsaC@Zh9z^38r32f5T?fS)E!wK==Q!_vUd?9a;Zy-M;ts zy+G64289L@Za0W6E;NYRQEVD$8&H;JQ`}oNaYs!QS6V}&*^SvuCX;A3jgyF($>f>L zObiA$qOF*W(aG8*Y7#TaG)4_FhWq1xgS9;DbG@QrfLi%5?{f}SQt8P5nn{cppmYRJ3>^U3DPuMr z)k%1D`3%@T%w-s6_7uLPW@@#=F=tk(qo}OBg69kPdAzHjA}?=d0dKPx6hQQ6A(Rmn zR9E84k%btN5Hr(;N=R^fW%z#`9S`pUrbT18}z{0kSj4O%s-VmhIs})_eT44r}FNG-P%b;-8myE!EiR1BKhOqpX z*cba1VJGTBz%f&rC`2jB=CX-6O0V3V`p2U>J>KY$qs*YZqe9foqe0=!QS7Ka$};sw zL)eK&)kHQ9SdZ;>10z+c0Rz`ZRt3cl#x*id+)y`oaGZ+MM5&7AuIjrIBrcw6S8RZ% z<*Tr9FOn()oAe__R<6=d91*ulAAM(ZOkEs+>ITP&P=;@aQHRYP5Xpqe##O6Su_NP< zH~N@hhJjR9Y&_i{8xv#WAdR8G7Eu&bL=Mops5vze^|5_mk!V<51j5ooa+k)QFs!Er z!;&J;jAX;QQyVTlaBBUf2XUC=u~V1EoIr#5_$klD;g*4hdy8;d#OmaqzFM-kk<;kMo740l~xoB@uOVOJ}Zx=;vr!JSNGP@MY zU#OB?24yQ%j#A|+6b%>?1Sx__R0LK8r|@7Q2>E>F2vH$_>B}0PE=Jhah`^$|KSjwW z0!y|mU9#ork}ZQJTgq7Gn&HznwW!t5ljc}mRv*$mM-S;^LZ)l;YXI{W)|-zP%QLXR z3@#yME#Bw7yR0hjPR}c2%xc4j#W?BX`MTKmNiG=Qq1_&#&hYd8IBea6E{3jq8_v-f z89rBZ`5$UoFbPB7N2AyFjoI)S^=|l*s!=P7hC1)TDa|c(PSE^l(e{V$b~iop@FPVJ zG-K%KzPq_-v-=@>UdY#d?OKuVx?lOvwIXNKlkgeULX}pkc%c}G6A|7L$Qth_$=*+s zy`OFLe%_veO|uiR1=vbhr^s=#E!L@bl2j+ETD#FX)H%W#^Y>hHm7oH5 zN(d|>Y^;E$feBHED5q6if3@rxYvxf21MsG9N>DOxWexl|L z`pjLXAIlU9$$6*EmOkr0~Fdn zpi%q1fU(fWI6}eF5IDeN9K-t^enCSh8j2K0y?R1VQ4?5-thr?I7(P7Fg+-#ad(-Ja zs{L^3`(=1bmz5nZi#kdvdA@F_*k956GX6aWt)K{Gr&YYaER=b1C$!_1Y!vS*y(-f11c%{3c~-GQthDen@wKcr$sP^@qHhlZi2^ihUZKUR*q+XATh zOQEMQQV!rBQV)dXRB=HO4HqeRf06f^PrBJ)6^4J2@VU9=F$osoS@+sk% zPl+l)9jtu7B#6B7p-Mc;vq49B4h<=L^$6i27cGoZ1&NG)@q%a}h~GQ)O!>reQaROA zR!)oDcjdax~>#Lmxghc4`!E0s7%n$4oWj#!wc~DmD%94`rV!r$gDXh6gG@YW*m~Ci?9k zuijgsySL&u<5eExRa*C0(28cw8_1BTx`j}P&E$+)K$Y)oCS8<5bvaok%XGz{u@*hTGB zb|^tmM8nX2ha_s(K$W|xgP#h9vZ*L%MN|9A*$341&PgUZ^5l3$$Me|wWY&rpdH%o{ zbQ+92KNAd^5aq+1&sc-RW90dnXb2LN(~~}D3~IPLK35q+)XE3BpK*y1Axei>bX3RT z4K#lI$Wdl~B%fmDQ=szv$dM`hs1)8zbt8EmBS#ExIG!KC3C3w(PyK2txiOV?W#3P| zJoTrkQM(YcsEbs|c0fVft47SWw?Q1uzo2GkUT3b`<=HD=<*z|yVE0#I@bJsbvYFx5>+>V(}#fkQP(>|ScZQA6@ z9?QqOk9pCZ$iZkpO=omxr|CuA$J5X}na+5|kHy#Tv)ygOE~Fj|S8`h^KKKI~?}Kgf zFslUiqk+1%eOeDJKPgtL49}ePbWH=pv=HoGu)dCw3ch`gOu!MQk5t82IewOcdS18s z<7xRA&1WFUew=~&+gDeg@z>uU0`<4A#=?%)-@Z96>hCpLf3NjCL+kG|XDOAAQ0o2A zwtd)Vx~_(z0S3c@z7V3u0yL_YDr;}?G#8#8 z_j`JJy6)+IPtWyxYNha3sG^$kOGxwKson4C zEt#QP((h?Szo%^!{vcI8==X$-&V{Gn`#rrdL-#_zr``RYNFm?{QDr2QKxWFk;k_Ap z)^M~RXa;rvCzMf`?J}6{VrUu^EMPd9^>0R_9*8!lBS@pcH|Il6BVtf#?+Dgt@SXG_ zuL;N3(Gj8v2Yl{_YK;cpybevG4zt{#{^_l4-aMOa9^I>F*J|x}r{fdQ;j^e(YsX7J zH|_d#&dPpQ`y}d`R}t{2^c4QjGN4667OiJ+``a{_gaI74XjbAZ!z?ms7RK7ivr=Y_n-%qEgf03x zDC*TBmR&G@D#zr7_F&=Fpf}EVVDz~rc-VIoFItB{7ljT{XiiU zBUgknaQ6MPw#*{`qM$6#3;{JM;*t6^G@g_OJaBLRJAj5n|n~zX~hnfs<>cx=! z95rCg<3swTQ3xsqW%7zm7tlzH2OB;N^|O#}l#VMOxyGh9i_)g2ytuXB@ck1*`Q2 zwG-12q~GrL!7}$WZYiM){0?1PiPF;o^0d zuGd97q8~3!@8}tLw)YL0voiYN-ly>mbZoQx#*V-n=x~S4rArm_&mBM6H)#XXV=h1L ztT7lQ01*BArkN;USf=p1(NESG-2j*00;7hH`qzpvA)*ncSKsIXNidzE*sP-WAF16&IM!vGW48 zE2`6Fa7In2g7PL+QmUaGgd+Atokc~aTw3IQ*!QVpbq$pHwFV~`_OQ%ytXM3^n#n4{ z;Z>>Bbm+)p`P5&H{L6~{GpGF2w8>Mj1WMo1)U;)Snt!dTq-xzf;;!;M>MvjwRl2{; z>nZflo(coACkz*l8PYLy>ZwNLF{t4&s7VA%SsYfkMq&KcatV-M&MQdEtQt{u7_2Bh zJYls#8kZ65n$>+}j|B{!Ul|grF!lc+I;{nKl;6Dc;R(3YIX`O&G64Om>K0v{0n__C^MT@^#B&n>Q6Rka+qA{r{H z`sO141_h%I)j|1?D#PYef`)LaeK>i)55&BN1NqkoGeI4MzWWL@@@NQ$m%oN7C|=%R zNHiE!IB=y3C^9drR53huj@x;=3Z!Lg_EdjVMb1`x{#8Zm?rYV$@amo-KWU48A#G0$ zr7Cab+f>!RAuFKns4hr*vik1o*y{g&|knjtmk+NwR($8dwJuT}SvH6L`0;_IOdrpgp3ezIN-;n}Mo>rWu-PlOroC+oNW zjjRlVxs`}{Q?MqSj|kNuw>6@`gX4gX55}$^-c`%jj;tZ+wVs?BO4guS-GZ8)Vn11n zZy{@KfUMfK={42~zbdVO+E!DL_I=IAH7jfW7qS)y$a=cwesspcC-2pMcd|6Db~cctJcxs%;;okq9#0%O&TC*Yl1@S8Frv9Xy6#>XxPAZ-JtiG z=;+x)%aV9Dh%t@` zGCCrRGsO2){Ch&ovJfr9X(M@aRHiCc8x}iKjLp-<&g5d(h^skvwUJw+(yZYJs>95Q zOz^}Y!!9X^57DyN7RQ>DsE%@@h*d^b%O*?9vBg zse6|m;|T9g-OFbTyA-X;8iIkUp$}UiI-qjTOJ^|92f!h?gO@Z4KxJ`lE6u3=++Z4D> zf!h?gO@Z4KxJ`lE6u3=++Z4D>f!h?gO@Z4K`2U3h3tY*U?(69JeaGCMXFH~~Tx#y< zX@+Dxd>#P%qx6aIZ?#P{X&~J8-tdG72(#6PL!WEix~FJ2+fAWH(i`?;l>s80W79Vjd?zyky z?f1fMJ)iS(T_pvkPZ4(bZ+WMcUZRjQ8)P*yiWtG?ydAjpL zM9i{?nEATKtTW#hU(CF8Z%4~S)jP{kXfawWS>&tL<1zJ4DcK*n#!x#L@q)fS~{@rhyT$zTZEVsMW=9RlG zH)?J)gHItC>jy3>>PHu+i_`1V6RWaMZ`!r#^rk;-IEBK5;77p`puMcn&gvwedbskKbcRKk)}Sgg{&vN^k!K#9~wM56=(KdIzx!p z>)gNJS-I!6@~L~Z*C;%A)<<)piHpO>hL4q`yvoGI+uz#$R{kgS26Mdl%*>T5=gnKW zvZ-m}L_w&nZEVznWxiJ1*ywUK*_v#ba;6-w7a-6G{N93kFW=z0MW6ZHIkVa2f>Wkt zDBPuZDNMt%-)#bGL)@FXvR5Rg>-7`t+AiC>bx$|BCmcfTM|10zKb+YbeUT{kzl|;+ zqk$fG*2exY#BTjJmSez=#Cu(CH~eJcjwfLRaswb#wU^w$O&REUNh@)``Q3BM6Uttt zqA59ZaJ(RdU61clIuBf))AQPm248C{AtFfz8~rA{$+SJ^}M|`TE zbJyJ4Yq9k9cIs9=+_=LZb^r*nl^7KpJJ=X6TeD#0^NHQU&njP-H_rBVxz&b964FSH zS}e-ZqX92|Rjs}w(*_;Gs0C50i!;O;%>|^P;X$9)y`IM14;4@tqDJIs#2|+Oy8Xm< zi!0UASj6au_`g)Rtjo2{wT-yK!ZI_Pn%1vxY&4rGkk3cYJ7;Fb?E~V0w|zTSzV%9B%(M#91v@?W{u5?HIi6;A|xEp$|1+g0(5=w*lTXF2^Pd07sF8R zbUPx;`jF=|Lt0zCxLR9*RUhwaayPl-T|>b`?YC?U&3WcLxr5SD?x6aH2KfY{HkQWt%NHCDZE#$;U+9-IN;5K$S@z9oBOMqhgo7iT~PqBSXiCoXR29f=bPSLCk>mJ-{%5F=n zdphxxj5d88#UBwt%dcJ^7DoAAS}fh&-+Z%mYhz<`GtPfOMn|T(sRWz%aW|pzd0jqV zw|Il=RneQ))xgbi>gZUb+xE-dSK~6RSy>0ft6T`mRX}Eon?NWay@`9M93g4Yj?ubA z%hgMN|EBR9%elsndQ+8GmmN7m+dDJvSky0CQfRveD;Z6gqkD(f%idsbp!hf9wy+s& zEK00E;u$N|v$2d8#DZ8i9zy5DFzl3LZT`|q%d3p`-sjV3I8GETmPTB(MvJ&&V=4Cp zyh_7A?0mnKQ$}Xu5kGFKkS_QQ7VF5@IgSv@zCx8elh^`OG|0^C=et0^ z0q-akeuy}<$h3XBp?HHn%GTXm&Ji?-y=v7B?1A}t!^G3#H7s#pV zu*;X4>+~_7p7#Yyy4FsMB`7FF)bbJWBuE#j4Px2z=f4rnzGFV|*fBG0FKEAPu{1Ts z$7?iZv&}}^e?>W}+YGP|*)3o%C7U+GeK49}}wI6T)Hw;m`fv&{jkGK!I^@#3c`jaNsjLK(;%MUA8*36y?%p?D*+X?CMEBHJ+V zkiD|k)@o~QZKc$Uh&Q5w=Qd5+u(i9pn`I9lU8AUa2i!P+qrNe(apA(cx=f5v0<8fd z$;o^7qSpmy5!w?`{AjVlNPK4I(4iET)^wkbpsd!^?A`myD?>7E%WyXtGUNQxdLF;A z`2g8I)G=g$WRU%Iq#Vcwc~D@*5;&PmPGqppEV z@a4^yvsW0?Vq&gcqy3;ieb`VwC|(|Ix+8B5wLx1WCna6FG`=VNGWIdMY%W=rq=JIc zkm$K}Yx9HlSs59!TwcCo2Zio$>E#UBVndv0OSNOi{{6D-a+%G}2Aiv<=KOiHxv_En zd;%`hoaRAXk&z7zJ9f}EYv@qD9yl~+i)lnnjeqzg9y*ksuD6)#3ko3h^eRqLc@l~+ z;n;05_8yc4-L}FrZIN?&um!wH7Co;Ndb(_S9((%1hU=X|K(}CI57Fcp_fN!>qKnE% z#n}EBo!8u>e%HkJKC6DGweiyW4#?9!vHRFWzf{yyg+Z9deEUh^SB2jd`Uoq6T=V?6lTGYM!%qq37(VJ&o?9Feto`+kXzDGEPiIX}oXS!t$*7FpmJ5P2j zyHEt)YNVU6XeKaO3n>#jM+SJhrN%PNjc)&dKY!RLEU|Mvn-!EpR zy&UF1G8$ARh|YiLJg9ADk)P5KW51dB2?itLX}DSh-Zh>-Of&~2fI7OaqBGx8a`FdC zGzUte50nf(P%^Z`Ir8t$v;!p*BApWtlw=ZT#ZSd650o?pIUhSv@^p~%_x~*3o8|mN zf%CQX&V$zC_ns_nJ6U|#T71M>tbpG^FKbr&@_xwh<{_@VAu?}$6jMdIDOzP3iDMwW zQY&>}O#&>~UZ&OXMw@N`!9fE^nyjik*clDpb=X`lwfn(ZX>$EqddBZTpwgP?{1$X* z#Xi4@*p+#V5|I)_cSX554aCmcdPTFkmwEp{NxPb{CSungJ_dRK za7)KU;RLLyhV9ezGP2LWA8KPNspnAm>J6d_PZd8BYOlR%uY%4WRduU1rA_1a#kA@g z!EK<8;RqEiFWtL3XhW|g{}^!?=Nt~|FJM}3-GS&`xzerZ{`3pv`(e?2pqC@g#Pn() zNEuw@touNK!+s8b2Yvg%iErO&{fQ9GmFt40TT~E?PND*s!DSUOn|R__Q9HJZZt2ht z0RQFQ10_FyR05tj|IwEA3@p9=NlABY$xmxbuRT?I^}ezzEu}v$E4zHXtZQJo?@GzP znaUq_m4AP|{9kny->sc?>G_Ip+bh1=GVSX-XI;F1)`dw^&##{S)#}+_CYEmaZ|RH2AK2%-Pm1tx{evSoS$bLF}|mg(-*M}hmj zKAbs!ULT5HK`%1fw&_{MW}`7`G%;)7LCyP%1E(sU^^7xim$_ zwMbd}qAE!DMxNwubocJDaKo)TjjJIM^7~&oG~DW7SXPGkUZq>HnM!|&_B>Y>DA}R% zcU|p013E5UI@xpK)TM7vwmmk@a32NlBLj#4&XI=as1;2acSxr`WKx5TwC?q`7Oiv@ z6u5Ba>V*rST4#V_olKAbF6CYS&8GA8!LCplVs)8HiVApG;A!dis%8DiRkR%|g0NG66*w3Pmep;C zX}LhDfB<<B& zI!(M`M}^gdMx5?u-`s%}#`ljE`2*%IAmmQ{*OJYox0n^zw#NFcZpHA;kqa%1#Deif zr|xkkT6d^I%f}dvpz3u`=~Pq=h4k8gpMl8J=+nG>9+^p3Svv;~ zmd~_rJRD#>fBi(V2Xcfb|Q!jY-P4(ITCU>LL|0@^?ygL<@p~br&(z_wC0DIQ|>aYFa)%q+D zwEMCyvU1NxZw{ba0o+c9aC9z9#Yd?8Q(BlYn(n0+zHTJCkA5_DNd|YWPCVwxoMzaT zt84UYcIN8ze$D<|-Bzm6CmLG&9XoP$-}oK9eU1iSuCANffchXkIv*S(`YDQL@J}at zsyk3Ce>~As-*Ew4_ju1!R1SShY3Ih>?>%4PL6v^43`UQade!oW;f}oNhJn_5)PA%9 z-=3rq)%SdRGI08$<e8R7y_G|!{!25_1qU_L z_HRmP15@d#D4{e&t{grSDA1=5w#-F&L+M3%MsrAuCJvZsu-U&BgC;B*g9~poMki=I z=uqhl+;JG77Va9j&_!jdux+>y_q2ik(NY^(-iG!Sm0E+|Hh^)_X5?wI=jj#`kio zUQC858M?-HI`kZAQumHBsdl%IYu`!SFG%h`5%(^}{UWh_OOzKS*NZarJ6|F0mu1__ z#QhT4xm#-8O?K`ft$U=MuM+QWxpgmbzfIhKVBG&j+^_p=`=Ju|UnKV%%+7sSbS17g z8QWWA=YDDDf05R`l50QN`8EVC$gO`N?l9#CD#z-?h2kg{s(& zx?5YMoh=6MVdDOq>^e%^Cy4t!oBOcOdy2S^`dsf3_eJ9VJ+t#wpZr&*^{>RepLh>2 zt^=~|Z}4JkeS>wqqx0^Oy&n+wAMxmR{*h^YbwKMIs-1^@?!$8H86uyN-5-Rz4iNWV z#(Ox-dsrvGBH3P+kTm%mai7=epO;&olUv^*(gC0Rg|BtD&-=X3_6c!+;kJDNUpjfO zQF^0Gd9_Q~JKFr2t@R~Ye#s}j+%4_)N$(K%KGOPGtMdG1xs$j%iS2n}+btbs$bY5U<}G=6=3gdQLBYCfZ(Syt{*x^V!TFiSn7~MT(x^D!r4Z zJf|psQ>5nRenu#KR;qV3D1GzEo2((_; zJ0Tt+=pZkDN2@?*d*aO16*H$b&K&p9%+&{GuKxGT)$*)+owG7hEspY;X?NsS%u1h- zKW)y~iBqP###swy%u995OwXS)u3#P!v;$)kk{K~9a&Y2sRge@FH)I4GtkcIQjpRbY zqvfHacuho%!IYv79Wcl^%=~K)|084{NFTC3EdJK4Pl+Zfb%-<|h7duc8#oBkctgV@ zV+j|ejfff?&j*Jw`ZyV|W-<=y@YHk*SdNTf#@t~w4jq{`mLUnIQKOmhBym^@!%QGU zlF>T$t*6ouato) z`_g{s@P#uQ(aCxuXL~-Gb=rWwc6NCu`dK5I(y!240DNO_y?l}mN~5ucj1i{_!!tnS z>OyBPLP7$1;GfzpHm9p$>$a)$C$Dbak!GB=c*Da_)0kHG!2zhJoiwXA zskSnA^Y;b0g)Qu6?jG@8o%EQ2xY0R+*>;O}U!Z@aJ)=SX9XdLz1zq6JrG4Ed+VQg! zb)w4i?QD!0F~#)*`g=s$RYvVx=u z%c>9K@9hz~4srMbmM}V#LI2C`ZO7hgd&PPXwy?84f$5v|5DaZyHp)?EX2->*W4*yv zS#8$7V$xc@YDK%>thPGUjCMDg`9?JJYv|;)(9>IL8m<)&8y;=L5bypD8s{>@({zH+ zXYl3!P~**~g_N1JY2Tc7^hle!&L-}YxJD+x^RaGVp7J$?!j z;ghX7mIS}a%ff789SyP@HWj{n@q%*+^?IW#VwF7MNym}XytuLG~_ZEeNT>|b4U zF)$;8{z&jQHaIGee*^qO4}AaK=O6v$FD_SPRZLY})exLvH&>0TvQ|y1a#odBRaVWa za#by?YN%R`v*eqqwp2Y_wY}=;s^3?=RJEt-wW>c>y;b$ss)JR>s?Jq?R&}w;SM^iX zf2xA2^*FMfP(8HTT%BHRsm`u0sCHJ*uCA+IQoX!-UG?Vbd#fL+eysYL>Rr{ltN&2_ zr|LsEMt!3CAJv~$pRew%R@dli^?I zs*A2ms2f^0sxG6>RyVnBYTb;w`E`rx?yOr|x1r8mx25iZx<~3Bt9z#IrMf+Jf2@0_ z?r@!_?sQ#b)%SHj)?KT+UU#F8%;)Bd^EJ35a1X+5#GQ;g6}JU<=6uKe!ujR%=g$9U z-G#bu>t@dXtgf@JYQC?ocK(9-5mo0DMI?+OGOWU@7(5CG)-qr>;{d}rxNv-_0+CG) zh;md5DoIIE)S~KV#i0zpp(yGgNMZ|4R@5QM3a5!w9HIKaqx5Py1?DhtNCqmfrFH0} zPZY%w&V8mRTtosMMLj^JFask+2o21Ox*5DMGesdV8D zd=>RjqVOgLkHQXPl%Ml@lY5hqK5;lg8xgKJMh*--iepr`Q?cPu)G4X`_F)o@+f84N zv3k+*P%q!WT6aD4{zMm^u4-|c&Tv4*^ z#T3J5N|xREDMTmuspJ69GoM4P7}Sap$b7lIO29znWh#!mK^29uiZB05YWjL|mfOxC zTh&uWAuL5*Fji3);w>7h_=+!55YahKag@Y66pcd(btqcJQQEJ|E*qv~l@G(CWLFGR zDG8jCp!_@)$xw#(D%s`3;GLUhR{m4@pGu{7I)pjmRU9)o@ILRcIA#t|x@Rffvr#^~ z=P16p4kgDQMV|})uFMOhRb9m>KU9AYkXe9p)EXSMM#WJVuKbLIcYR2+A5zb$#3S{{mysHi|Hu_;-7cLE+I$DOG-Ht~vmGp7WssIAyM z1dk%#!zdT>#Cr<@G(hYfTR0T1-mQMBcHj5&ed2v88tVPgO3njWyi%cv52}7C9g6y) zaOH=Gzo-7F??(*wM~tG9`;DSRZX2VhAC2mJz^zKX9R;KxHR{Q^S;}`$DBnJ*IGzIg zy<{b4N4mm29j2(CQ7O{z#^X`AX9u&-#yNhEsQ+H2_@3*}q2A{miou~6F}?5I=}-#s z{W;IEi&g~n3t`HY7ZHVjf>jVQh01qTDIyw;AiTlKr;750Li6dWqMTQhdzCz;S;@zD zGTtf3tUzHvdCUQ}>jC5SKBEtU9bwBwB;rxTh@p7;<0}1b0-l?cZB7!KlMs4{a%~2! zX6yrHc*_;Xg2@X?7R+1_U7t|Ds6M}bX#GR=&(yzOU%z0*f_oOo3l}atP@lZug@u1! z_}#)u3okEJ7RE2KFS={d=0y)K`s<=y3l1zgyy(=Tor`xb-naPAi#rydT|8m&V~fA4 z=NEJ>dSk(-3%*@&_rlJ_-z^@wWXY1XOCDSD$0gk2zb`(rxOee@C0{LxS*lrddSU0n zRZB~jx|cq*bm!8&OW#@g{?e06&n@j*DlXP6HZJCtMJ*e-taRC5>vL2w;NL`4EXl$r zgf$b^PT0o@>muwb!ah&fhX}iqurY+)McDKJ#0!K?CG3lYO(X0}gxyZqmkB$Nu&>+- z@fcy}5q2eEcN2CrVfPSLOW0Q_1c${a&OlY(z&X@|h%ktVV+mH)f(O!vV@47-g|K4? zTZoM(zb6GDNko%G`cxCqm`F%K9ZEDqNr+#a5{lo-_)p1_P@Vr7M?%LD$v_|7Ao>)9 zGbB8WgbyO&Lr8=Lk7|I046vvMS_qy<|Fa;z7Y((Vi-B6m4TAa<7YlUofTR?X zlp>N+Oj4XAWfVy%A@`b7i8+m!w-d9Ln8S!!BKdgD5}O*!r5d=@BB^+$OvvoGB@ODZb;Q{RF)ZX7s<{RNDdx5A(KSnkW>%kN+fqG$rVWMUXuFB$=HTMkd#@Q<7Q8!|-cJ!9uoh0h_-lpy_vA{A<@Ge%IuF*IWGp z)godq8cvFb6Q}>lE*VKmmXa3&pQ_U3q;v&Ql`^Ds1gS1tPRg1{*(SnbPEVW+QSr>|zGuVtqAZf#jJ{2+0gH$=gWsHSIyU7eU$=gKoH<1~eNZw|WznRR~OcH0_&CY6OXWzrl2_kuOld+YIxRSBUgUm}N z^9ZR*CRNyEQGFk&xr2kPa*XWl6slc$CCPJQa^yyuOjsik@|t8ULy4xQm-cU50m;w zNc}capG4{tNPRpRv0w^W@E}$L4Wd9#wg&f?@hC28L_K zcHtF7SV6=Uq<)#1EH#q`zj~`aDQyZFT};wsGCGo^MU&B?kjBSI<2=&1k~HonjiX899@3~Kjjxi%bizDGLe`kc znit5L$H& zy(_2OIqS~aJDjL>bq9YXk65|zVV^P=NjK_ z^fl_%q^-$W<6JXu&C)en*1Wc+ea*==${J~H>e@MLf4BCvwVt)TYctnXu3NtD{&kP7 z+p+G|b^F$xTIXA*TOYH2`1*|XZ>|1mwW%?`@tKu{>ldzHx8A)zh!FGv;z(?;8X=>t z#MZxwM3gdQiHxvG;z*k$jc`eX$N(|`$RHEF3_vpgQvsMNi+VGF%>YgXaH>nvn_YS$ z+w`Krrk4yZy4*dhc3U=~Tj;W1o>g&GzDHf~13B8tF5kcp@UM3gLwk+Oz}32;q= zD>ev839=}SMp$VGD-B_d2L1$uHyYukx%5)PFOlqz+|9`TCX)S;yBXQONZw54O$2(R zRz_;|NTqC+^+=^2sf48s;$3WdeX2_@n_aTr-~yOSLr5YLH3ZR4$N&5xfJ=nOba+gM zr$l%fV$;j%@Gt}(5`W`Ch6fWon9^k#9?;F>G{z8{Y)W^T5Mec}&1(A)?*_G6BE@02u(Lv6L(T5CMP2tGL(CY)9^>Tzv zL!$`v_|mA*P$?okzKC!zA{+vQF+em3X@Z3a3ylPg1dSdpdbkh?ka|E$fYf78yC^>!C8igrNTkpeqvquoXHxkN1yJJ8x?J+Y(0*j=KOOH`4$ zgwvB;60XiA8V#VrVL<>%04V|zs9Y+wDi;>HgxN_75n+-9(@SeEQF0JKe|69xfKc0i3z5MP4O=r28WB@KfI{FZ zLSO=tRRmm_a1=9bu!MiX21}Pj3T={@g7g-;5Kkf@-e28SHNOU_zQQ8TMUuO<1LS!Na%OV*hi(-t73d^Iy@+k8IQDFzlydG%u zsPi)Fyo@?;;<6~sd60%j$_K)6pe%FQ#Do`{&2h8?&~yW>1ZX{=WxUiE==baPM1l`J z-hSTzK!o7CzkQM5>sAaX*Vt`O`wYAQ1u6WEc%W5B$;n0_ctyNaug5EAqYNV)*y&-G z;V#1tz%)j9MZ8q6$17(67-7Or53>w+8FmONAN4XH1p+U=0SkRT$_8G10~TUFP~ycG z7CDGr4$_iiqZJoh-bW*#(a7b|$V_x41XY^$JG8$cdLtld|C0kC_`2Em{Rk%fzea$x%Mr*VaZL(dCG}>*E$#$1I4fWcROJXAJBqq)-8zb#DW1JlwPcBK;=AzK_0fZ-^ zc^HvP;$m_!(g-*v4gdflV`Pzxu}NeM@_3Ak*v1giHpV5{#>jfx7$oDCN+^mGXp@^s zP zS(}Igl`dmYkH#Vqg=mOP(x;;n8iIo4@92MBR+0RCG~9vWElIRgqgbLaVd)X z0D4tE8PMlQOM1T}hZ4o1L}^e^G$<$_0Wbhirgh^tm{7PuiyT=m<=FK49G48wGCZ5$ z*#yrZC8{1g6B)0WBKWNZ#f~Z{n($ikY4U&L<2L|UIzT?)1x5)Nu_gZhnFl=((n_yK zhcqh(!>%O zUsZo!jGUy$7PS=ryWixDzx)szCGK#EbanT)cT&7)A!Qixffg1oh&j#&Xs0pwA# z3;^AqIKSVWD~LW&9r zlp-S4OAS(^$mE6$n|oA+$g){t@1W`hpFDwU}`kEOr&Ht)BVnjJg2S3V!?((Y)5qFIh}cxPCJAW7TBD&a!aLUmboU+ zmUl_s5o@~poI88ON+Y;R)8q9FW zu-Pijm6dtU%Dj4;-c$*%7O}w|n^9?Ti7rcnWiig1+&SvbbZ3eywV}W~!8X#FluaHAK1wREC!iaOw+U^YToD&>iuQV(-|WJFd1|y1V02GIpB(&`ST$V|R>yqd7JY zU<-}+EZurG_>`7--rPucn)wB&d*0rtBipdAkMVC=xVbwG_S8Sj;I)rG{NOEnfr@H( zVz(fErN6lmyzdWtdNx{Yp7%B$q5}jg4Xk|le>?NYd?s;>i;^4fb<@92sXIUJ#nYn+L|N!aam6VaMEqUhw1jW zQ*GGBrVAy9d%in)uMzv~4q{j4Wg103~Q$YnRgwVf{;A@!{$Ea)8{m?siv$y3i68a_*deFa@f|tKp>uvFa!TxR7 z_awLWzHPb=*8FWkf??>H@mDuudoF(EN3XxgUfVHkL#J_t=TU8Em$7R#-ERT8iS6g6 z8Fn`v&!m6;Hy$5vR$&*Nk22eT!23{pnjt+g-7u*lEv=%oyfn)Yo;@VdSelrgjbY#a zrwe-|g`cwpCP(0NgrFQDG)Itggv1gBaF@w#^neTa)itrAty)3%@K-ngo+$t zdX6wVr};)cA2L~pncS=?;NuH~w1VbMQ}}IDgy*I-56b7q=L^&Go8K?szbz2N!sfk` z`FAD@rzSU-Pv)0S7M4wJ-aMIqbh5B>a`Q6<{ObimYeDl%x%|Og;mh3S%mRK+fv~Bd zxnnZ_9|SR_dGr*1#uULlrTO_O{DCRL_fwh^C-dVb3zH`|*X8q@@`Y#fn_tW4Pvr}j z^P9Kk@w@Yc_w$-}7V>{86pj=&e^|)>P$&cyHOCh5!;6IRMa_GQ_`^klx2SnyAzx4^ z%q(pFv4~d}3(>{Rtdmc23i;0FL4|yBp^#D7d}lHLNU^ZDxVg5FUtcIZR@j_W%;y&i zHO0;E6!Yhbg&&KX?M3|jBH`hp=2=dDnN!&8Y<|Sazu*-9>}-C|$zN~^LP@h&!VfAD zMwK-GCzlV;6Ncn9r{(b#c|v1evp0|bDNoSmH#_V3`St46_06WGeC|^9+@;))Iovio z_eZrXle7EOZmr^s#}(F&)d19cJ3oP$4}z)lepoNIL9Pz_9Sk_ zB<`U}+@49?pC$6nZBOF|kLr8VlCp-8B4sNSMct1z@ILF?Z!+(=w=j?ol z-5zP@4R+3K7be*4bL{+GcHw0Qcfi55JA{8YgwGwq1qXK(f1h*hVYz%lp*=x$lZe7sI|W1ai$r3}AJRl3Z!VIA|#y4JtVWERg-4VcZ= z&v8euWu9HD>RIa!sbapUQaw=JYHwuz-l!V9hMl>l_4FL(^SP=|UF`kyTDR0Q=jv4x z7OcCy@->+i+ zx=M9%mHYZCCU&)I%4+wz)yxa4RUfRD4~|ykH}LMlyJ@sCw0T@o^VlJGk4d~cJz?`` zkLA3W^QWA)zFXzE|D@9U{inxY-BN2GZPZcozm?t}KBE>nMqR{$cYgRmQNI6N zQGWR0lP6Q*?)i7`=gJSC{&mNy@-&G_m^A->&ksK}{qX4?YBqd1+SF-Oj6WqBe@ajM z$!@w*Vd}Cg!@BII(>cn&RHjawfR7Pl1JfH>R4a{7yo@ynqv=biA}kWSAhG&iDg!_g zcg>^P#7-iZE_-j&{9ezAlh>&pJtxh=KikAq+^E>_42r1zojF50>lRDwhLA;D$JQTnmmE!YpDVLpU z8Z{yfKwQwUVz@+$vz2P3W7j$t@&oLOeFv`o8_< zR==4h*GJTNIlL+ZyacR-L}+0p1gsbYcb2GA{>#m$Y$1F~uA582ilRSw3Tfav3Uq-8vWY&13s^B+ zz=|O0ANb>#_(FoID;;G0ZF&2biel);MD;gckN|H=BNQ5`T<(+E7Wv|-QMQCwE_6Vj;w6wEBQ1FeN zZXuh!glDy+nI>wti zMkHM<7_p%s<--Ds>!+PU(#02r&B_#q{6f?;t(KhS6Z74T%ZR@wiCM~ zaV#r0eur(cCEIFj%euvO$Dop&%hHsl0b)4oyPXhAw&y|*FavFd?eqD3pI5RR+HJr8 z6GyLJz3=lrm+$kvJ>Sdo?(QX1FRyb0qj zet-Qf6RS~$DY{x7vl&-SG#ks`Xg8Y9w;Rijw;D@dt236oR%sJroQ{MFeYAwSUO%tBnk}+3q z`D+EarqSZuqL?Yy6j*~!U0s4vmh}QoyP=*uS($rFQ_Q$>Cpbsr&rsu=9Ope{6Ms_j z#-Egptu`gruYUDQrgP|RciBuuZu$6{+!B13hW;$qbZ!&sYbYDNHn%*Kom-6WlF>pm z^M%}b)7a|OC)ckUT5WQC7F{a&=qh8`guz($#=ALX$1miRz81+TdCiq$ddrr>E}hEG zDeKA1DLedLc1ifH>{53uyCme!HbsHZtK%5m1FMJB=-w;&2rO|TmRokrW-K`lSRG5k z>Sx8L?76FlY`JCKmALft52H*Ys)mN%AWmVY@nbKdm&-ja(il%L#diuael@k06g{RH#BT`-o%D}Xx% zthso!$#`ox6EFatl)Uyp`NTb@05Ih0GH`~naa&H=YjruM&RR^t2W1xsq`RbOQNeyogl}bnLaQWi(b9mSQJ}>kI7gREWjtv zSk!fce5--nwR$v?QylnhPEqH3`21^5k>f3V{&!B1{hWN8@Ea1&^noqA=&cJmrgIvG z)V=axWpgX;l}Z`?YTm2-3W4{}O6E@hW@ z{Sst0anI-90CiwmK&~z$IEWD(#JKvk0;6fP#8?u;cK|V`AAh4{GQ(&Z%QBXn%rLGV zwda^ZO*tjOMxauC&iu-;2TT+9l)U~x$?Ny59KFZX355HDm9K(zBx-ZZqhvw$q8Lym z1`>G#?7Isnf-b%RM4JG^LP<1Herii@>Cof3<+1$S`CC4`r(|M%`TOiz*+&s$`6Q5V z=3Qe+{DRSR?iWP$l@oU3t>>d4`+%|J^-j#51JQ6j>p^&>?)4@I0NlO${fg}JaaVT9 ztL@pQb2gy(uRs6l?b)}UJd#};Y|SkmphZZg?#;QaoZEtfzvy_Sc005D&D7ZAI^xh=z5|JGr8( zSlnedmINOM|JVkUAAjK1v3tr+t}hPVQ{44{De#^7kC&C>jacQASLK+((BQgi0n)o} zeZ!u8>!}}RuL@^mm&e}9n!oj}Fv9200o?X z6I7rX=Sz>@eM|RUrsEq-fx7^jTi(mhx#g`D_~e5l=7Z>0tbS{0&gye{Ik!fa=9r>a z=gi;w{v)?swA}jYy{2=If=rA5?ctoFi+AOeo-4{J3O0jEy0VM^tt6);9>;kms`y#) zYqdE=v5K71XhBXN%ap(As5=Kpuq?yC-D{xI`u)B10G|IqxWVazQoi!6B-n}R$wm%Zku zOPP^gyiwd*u>8#YbY^7mLg|H@?yz0B3HhV_)lV&*%SA#H9vQ+T*oxt<&0lKZV@nEG zNgWxd3vZ1qIrAj8J+$A4Vqe6MyAe9Ti}x0MM!p|4WsN>oQ}|VRAoGt;7v9UWf{fEO zg%9FvVp*>VSD!ue#i546M+&~@VW?dUv4T|epAEfH#QeK z?_ct6Y0rgH8reRB3O~n_-KOhq&%EJUK*f~(%AeM}c_}Ayp=5A6CqgjSot~SGeQpc7 z^Z~o|-q!PioHb{0RbclYOLX>KldA0OI^gj`&H8N+gwdV9it52V@C`er@4o1liXU5tM0odScC) zl{F~(FOemW4HDP09LX#|1axHX6ShjZZ|R4}wV_vZi;j zch2+oT`1xCZwjtKF(Um*`~>JP6nv_14ET^$jFtKdC(Xe$BQRLZg zzVhOIgznXsrXn?${x!1ohUM2~{5Qi~uIZXra%(P4Lv|qaat3j&4{gqrT%RWI@^*P76Yf zMV8#H5ad>X6};n>tozQhre&zXi*!8-6p+H+(|z}b6sxG5;%8lSq`l>J#GTaugX zB;auQf01;DKm)mWQytiz-mPmdWk-0gr{>*Kl6OzA=IINiI>Wn{eO@+aG+p!b1QPet zXAE_*ZVOIsMAlYt}5k&VZcrlQwjD`d5*sfy6f~8N?YJ57QATu@t%KOdtLHRy-zG zt^U)@!7GAhT>=c#n5ou>D%r+on%f%aHh=LvvB1$#iYL*3)d9>Eg9?~ zz^(9EOl9qjU;E3#w#br1;clS8Te}}QI=wK+xL)u-jM zDgZosw(!Zwl0#tc84dFAAymk29J>7)(hDE@^$o?Ubr}WwrMke*b|ee=SWosdhqkV{ z^fY!D_)^Uc??1D96KcSKA7^hHIN}D*@!fbXHy0$X=0mzYi44J+tb}AFRIt z+bcEJoSx2zV7CqLH|AnLjeY%}Vqc$|GiALR`}*LtflLQ{YI6Lza9CX z)9*x{orvV-nya5`vBQ~k>FvmlOYcO!x8%Sp>vu`rI?nDVALVP(HIJua-FTu~3O6i)9^~Os9=^-N zlRP}j!)_khcsRtv-}2DIgO7(V;vnP3`4BIh#NnB_Y-~D#;Xc*-)2#bHHTui1gKo<% z+(fnLv%G%c+6&iTD8!pBKXc*63&n&)avn2fDu0!nO_!R-J2I}jK|vMp1UU;xPk*^6 zr{Lq$7<3v8!BdTqn>Oa=PGm9dxiT9LNo)wc6uZ~_CUN2eqrpst0?#zO2Z3S~f*6a6 za#FN>Y0me1Z(3e(7Pmz+S;dpxrebI&e+X7rg!eNSUK`1O?tY*%6qMeACGVC%MPdI> z&*!bU=@0q&^*_JZz)ybBU9J4A{>|U~Cil00_1mBRw)j%RrBj!#MSk4>`uBhO_jj-AXBAgwRMyv5S8k~++)|tf#J3bzR@Y}#W)xOxLtoc=sw=CXsw}Lu zOlhIY!h(wGicM46u_vBzR6n7G>$hm0%0kVVaKy7R5`lKVBM`@)l?g{6fGY`yKW;#U ztTZcu^8y^Qv@d08Vav`HFW#oHnk|M&lV(TXv3T#gDc7pRcZWj2C9a(c*Yc+_CfREUmfw?M&^&IIiLIy#D=^ zHaebF$%5k)?$Afsv zfkVhy?{@60u6*;jbLW(;HXL#ZPZFw|qh*U%pb&+^QglC3G zU1U?F9pCNpU4iccoF&>L@lA48fnOCU#ghEyXW@xDlvmf%?=P-_zxaFsjtifJKN3&= z;yLf7x65A@^4vnZ3nh3@l`u#dmgHxlXYDegx`+$cUAW_tqZ(7P&whQ>k8YjIntHHejo(#gi@4NxyNj2z z=O3Iszco=;TT#dF_PUC8e*4?&YPHdw+pE@TvDp(_6G0p@@wrwTP4H^fx~z$i7DIh5 zeiDWWzs;{7^9&R134=Noz%C=*cCTnh@!(4743D{!D0<>WE*RvvwgLREFPBguugj|j!`B; z+N-n2Y7^Ue*vW%Cc?0Yqv~!y_wy|bM0}B0p?dggLj%W1GE81(buhg!?XKfU>Bel`Q zb~H|`Fhueq1$j}_7h!#4!|~ft;&3f{V))gfF6w=q$CFVGE5@_a^OG3y8lHki*8t1& z4D*Q%PgEU@=OjW;bZ_7A$h?+6eO1{j@q#t872EKCymB-_sKmF=er;QPClAh$d*}8O zvklw$%}JeoaN8OE!=a@8LM;z(!~e=r6d!)1V9nXHn3dY`s*w9)@$&JeogsJCI%iYW z_I2|Y0e@);6T?2DNW6G?BE3kQ9oc?@$DKS@xaYN3{7d~yXW!d4m({*4^r_I&(5C`R z1L{Jjej)U!*-NB7;4i9I%bE?z znnO$HdHHnc)AQ=-&^4f(?~6QH`bQ89iGy0ezO8a?{+&2qKGBq@ng}HvEn2VL5zvn9 zs>H2Itrr-2Y#nZFUl%y64aafqkMk32E4S6#wZpbLTb*4S-k}{!dwdv=tA}@Jhu1An ze|nqU5po6`_H9~>ZBu?O1$WBD8&-HvHu^S}=d@SAOShr#5V7 z%eK0fIYZGy5II*DYbWC?v}l5LS8jVd%MW_>yM`fVPRXd6s^a;Hm*N}N=CjD(ZC~fy z9$)*pM=*7Z+Lk2mWOA*{P1ke!?WLcc-H>#?4gI( zpco6Zqd+?zs{P%?Dq;zL3?xz!^GEnBs_J{V0_FLv4P2j30@ahZ(9oQrd;8)Ns_cCF zMP6dxaM3Sy`B6*qY<_X)ShhWai?vd+7LO&*7F|r$S(~b9;cUJ(HQrKJdt!;dquh2_~wlmd_b3KCGQg zl%kH6^EsBRmD;4GV$I4oPi6sWvgWmDL1dz!pdj+e&-`@W-EU`TZ%werwaFg8Rn33f zaBsHg(Fy04+0~Cu9R3N<4_3c9NoEVRYjUM_aH6!J*2?P+3(6!iCJr8}ufgv(4^Hg- zTF09c@hw$bw8aKh0GVqVw8_J0ZnC?&Cb2T^4nf(fZ%Ay^-WbPdzW8XYAXe~Z zVw^+!;-dvo{u;-xcxcXW;1O*y@kAhwM(4H3IETlxw+f0Z zBmUmZlaV-PPd_^Qi${4>|9|o5T-L+<@kG(V%^jO(-*~i(hv4J0+N1HzgnV6_=$K7B zI{quemy1U){>t!$VmXbznJ1u6JSx{l<>Cpsm_RolM2$}rJzg|#$+To{&YbVw+`V}o zlHhTE(8GAa@%gb)e-{3-{n?s7Gv?1c?$6{O&iMb$Kvp0-kcnev06OMEfvniFQZ@1=8c#?i=E9zxrG}28K^-$ z&NC^)hq97CaO%&Nic>X6T{)-=rBO74wc;e=&xpJk$_!DuUA)_vcKLpK;NULH@=4b)f?=B?Jm zPuM0}_?`df3>Du>f&)FJI@wttosXxqoOz8p1U^^G_cfsS%Rk<=VB;wS|SVAAdVuSQsr_3s^-f ztE*>!jxy`NJ^Rn7r0Uy={0T?3IykB!QT0Rm`NGwOGkYcYEDy8O-^PDAO&-pkn*He8 zssC%KaebWDS@w9o(vIi#!+c^buGJ?G^U40OXY;5u)z`PRRlm2q-5#|&9G#uf&OqRl{x2Q~L<60j4oB2s zw_hJk9P13kInsru;`x94M4};Tsf2jL6g`3Uw|pOruTWRV^W%;u9CAE3z9POOx?yeQ z;%@C4&jGfqUBS;pr9F{B;8)r&|IbO#k&0)Ff6W;l`z!5QVz>V9%vc@`3!I6lnvb(* zPmgbm50Bp#?;T$mKRkYYyk$H$-Y~qQx90H1vu96js#sHyXNbx%;Xi#=%S+ak{(XAR z@bq`I^eg|-`DtC9xTX}!;X~tCTKN5j=y(9w8K^Xj`=fK8zVR`w`|R1D$MGvLXSne( zu(|20OSBkpGyBgT!xHN|kIiLmdMr`34oixrQLG90y>s21;j77uPW|F2bpHH_Kr{hj zO8d)*CO~aze{)ya9y8x*ZMkjEV0&zg{pY$stqv9)Kh5jW)2D_%J!d%fnBv55XPyrv z91hxrFy&cQi7oTL!L`_Ubw#8Q>-Wxa*oU_4#MSe8_8gA1A#jRX~u@l7#9EM6Ve z`8q~>J{&L3N*q2PjIUi=n30j_#D!d)zn?!5cW%i&AM5Pwtgr7pfBdl2x@BGN8fbhK zsBjai#YK@3tjm*dpNFN%U^wqtcRo|FY3xJMi+9;yA76L=oZV*Ybh*wS zAHR+D#n(0M+;SUcYOkzT@~(wJYr>Bec15kN-5+00WKTHl4u9;RjX!a^y>go^wxjAG zc2!@wBGDet+gQ9j5pvpMRok2948Qm;jA&PvYR40NUg|k$tKG1sqBgd%>XC|q6~N5A zg4p%TOYvyIjtzMghnpPs?e=Z35K&hbMYsUttA(ZGy6_>Nl@T-HVQ?7C&*7 zEvA21U;0OSpsyN|$LmhkolN*o`eXPz$-j8* zNkhV4cf8_c#mQQHSfCbvbvQ3b{g#r3lZKOd_``QhYsM#BfFgF^|-pdO7s8KPR+lA3tK;b|3vfS z9&fadFN19|?rhqwm5-Nekt*01caCq#io2V}x1)RRrtMY5nm<=-&(&NUZkf_^>dFYs)WIplmJ6 z|2*|~ay)r)&d^oApivZ!g(g6Su!W7et{DquO!!^4+6rhwC*+S>5Y9UFUx|!p#tHQ| zfoswF)1=@r*NbBz*xoi({B)Deh~PDKl|=Z^?y|Fnsi;d?LbAz zzs}?^)L>2|Sb8E^Ho=qlqD%406O|{{o>&`IKpCqw|M^%*2iBd-##~pAIrTetn#bC4 zZxd~b1!H%XkM*t^9eu}OxyyQzOxD6V=?H`sf%OB-_A<3d8^(^)X18TKZlm7i#p{Y$ zCF^jGh2PH7o8WKvWxqq0{f=kxLIO{Ws`1rF-!{Z6qshVH-lFSCfbzPi_EhiHCl2vl zAN}Mpd7s~aqF#b$yrRmFwT!3Wp@U)+vssVX+=ki2x4C63oP_?I;nu&NzA9hKKl6#F zDzF$Q1>3;DaTHqSuT2q~{Ni<9)&Jn-IKJulrdY*K*TmA!BAa6JhsVee@CQDSdI-Pq zgnZV3pRBA|xnpI+%EKJMI2KdYSTe1Z=^d}EhCL9!E?z#kvHa1?{%LYW#si1Z6Ch)V zl*}nDFq$aL*UZIQCsu7*UGbd3_ay8YLom<{gK=YZmXYAfE~J^=TCCpg=v2S%#IHF+ z>`5)}6bx(0ak#-=pHy{cOu;v>3x>=549%XXnp?WG0S3Pi&J0V@vKC7Ov{R5}F_>Op z@kcW-5jr}dVT7Psgq$>yLT`7>8Oj>a$ar2P?uXo*t!uCWIQ*ne{piWP$;*HwG?+Tk zU_P^MN()1OSyOTUS-r~b8>+WA#8;Z<4EyQfyP-%s9;c?8crgk=@Q?Vl;g6x{z@Q0x zYCK;%wN*Qj*b%=TdLO!R0)426K<26=^aPBY=ZikI5%%_zM|gA!#IJMN@slNMAreR_0xTLW$((=FDd5cPxs#y{Cs}Qzg+*j7T*h> zYjJ+9Ki{7p!e3e$xz20Daz`D1|9$;gJoS@&{-u>nww7us+1h_xC-1VRK>pcRfSqC| zm=?s1r?iWHCud{`FmO|T%0GKp+-DsIPnZ<18VQ_M15iX^Y~Dmb@048quTAP zo-_QPXS8eMg}B1MxutW@6z?pCGF-KDyK}pf-!QhIhia8|6@5bS4OjpH`gL)viE86{ z#g%y#d65J-Qbk1se_%AJ^NQL!ZOB>a*y*T;<9%CY;fhM<@~Xmo_=dKnE<3grZpcqv z-dR{5aMU}BSp@!k2c>&eF|P_z=-0Jj-qB7u!GIBv;6T}J^$xAQVaLXmFbily8`czP zuIshl>+uU~HO+Nc>piRuJyBdA(uNzhH)-vMcWk^~8(w++#BgGz*1mD&j*XgY<;In{ z4K*8AYOWPp?+R_Wc;gebn>5!3t#<={s0z_^A-aT4RYBcYzPxHX3k=IOXGn9!|B%hX zU)IirTe}uGOcsTe<%u|!o=+6iX{Y|mUSZQ>4tS%S?d=YS(;;8lalE0|5B{_wub^r< zN4*00voUe7GJgFhE@4e_y><%tA8$xJQ8dp)e3 zWX<|e+7pMh!-q9LRyTNPB?gN#4q09CuLOX!Q-IJT1+^QG)%m5>;p;X1Mq(Hg=#Lj@ zel`xT7M4oVhW`<5_z~??(_t)+c4@=AFj2!Tn*X3Sd{8?T0`Ene$F$*N7%YM=Rwmeg zfQ>aL{!VH*MQ;NrypVlL@UXl%d8tA3|D8UeQG!m39tM+!ovM92uQcu-FF7F@MZr|t<+rQs6y2| zm!HxOw1e4Kt^EH>{;zf<{}`iES*_|vLa_Yl700c!_^%pK{d&hb`;Jv%QTs`lbU6b2 z&8O&fzCNJ-<`)eBgP1RLs6SXn)!%$&K>f|@H9|pYkIfs@Kf8CJ$2YlYlfmrl^;jEi zjwb7K%||T0LC=84Z4Kd?+vf{R))<;xfq_YDYsfm_@wkIlmpNH>vL@rPR}3#$QO7=C z$m%)f8L+yn1K!TgKF{QRhCM#t(V(@@d(^|)0-l%51HMo%TD9`m)P07w-br(7=p{VU z=?(D-G`2h73lF%h0bkH#4G)@wzJAXTi{qBF*Bi73JpQmZ;0c;LoQ~#wyPYl8kk8uh zJH`UGzCP=SFC4I4*rK3Th5;hx@*b<>hx&M!BZk9r3HNnf`#KV!jT!SLW9 z#tgvwEIr<19(l+$VA+&$|IZAQ)g8VW>*h&oi|d%joK~GHWa;y`g2{TV$$Dk16E%iC z9)LIK@k~uknGf`i`+6riYHKg5vFJVW4fKtmTmOu1S(1+{s8q8kp{Vy-)o%8x0S&nZ zLY!CC!>Jm~=9INn8mm6k3rt`)dpyamsUgo;yD*{FPFL4a3jk@A(c#(M0go%R&^L1m zTI`lSDvJ)TNlT+|peNu8h5K9~uWukYS=|BzQSJGFMVqZXz(#ZpGf3cJ27zg+Z!BeY z`vzVX7+75cBbMZ>E*eZLCJY@V=2?flp|3mY~R47MP{Va6$yKRhW_C!;4|?ZP7#|9_yaOH*a!a@u zC~6J32Bhb{ZYh9gu(U`Ygdv0PqHa`vyGv@Mf$-E^i3*IcYxB z>jH|gW4+-(U<5eVY9{_l$Iyu$pU-V^aXP#~4hc1ey#1cwjLZZ&ZtVswSc9Q(cQ;zF zu%;g20U(`(wGTXm9D`KHTdG{E#U1bs4uYuBT-tc7Uo+cnd-ep$6J!Jm0-V4}!RBDE zFWl$GJ#^LV83t%LBB#UFy06(`b++#BNYbl9Z=cz9%;$9jVL4&J834mIBG3me`1&nC z!(b2>fWE9~7f^c8=MDM>W~||$$86i@Y;9_DHcwi2gAlwS0zz?cg!1xA3s2<#7Fcbz`RJ*0mcrJDeq~v9c|0@7O>Tb)O&ww7jFQ;p$J zOPft0H0G)6sK;&Y2OhQc3a-RGmLG+|>0Dq3ocBY%p-FRxDra@|0LOt|&w0UCMdFao z)og<_Iz1L$hBRR^$(V!Gb1eHM6prXAaYKDh+*GUzO!Tlpiw#E?&G3tyDPqa!uC!}VNDp(7j|^mciD;UM}tU`7c7gcRHb*)wHfSFEm1@+(XS26_bZMYfHRv9+LUh^6}h z)`U3-MB^{ATtR1Nvu&@{(bo7}vlDRG?ZZv5jGkV6dxH=j5TA-@IHbmA#{nSWK0!4U zZ#5J4P(PkOV7ED~&?!QEcG7GQhh{J(=-~h{1_TV{L1(AHcQQnnY20ue3njd0&73y0Xo_C9Mmt$mR^qL zKEojoet29MW(bsT##kpU;3%CQvXhx*!DHe zkbOhZ1CbKtEPHJBDUp>#a42m+p{`z3jPo97nULXRC3+tLSSoM0% z+(12^d4PLz#e8`)md-vXEPY;3ERYqI9P-Rq(+bT9e#?k^TmwB|!2vS&R$zr^2+AVb zpoArEx%&Dhtsq>84PTcRJUnP6`BJW+$D~IQlxzaXJ{ay3UhX1OvHr-{DdaV2p)?^9 z&*;36+97%--Jrk)a_efR0LZ1I!HiWjOUNNm2L>xZ>I%51hV1cD!m+-f&Nr>lETJYs z7!M7MhXI+-Oh4q$eFlyi9QPQQHK!ik0DZ;71T) zz&Wd{AC(Ii614)8gh>wedIfzsv8Vy8Y;bTyIIbs<(uYUJSr|=VxK>o|3PJ?gpeF61 zZa{Wt1{?B_?nXrX0FSJLfVPJ!Oi&;MM5Hi>8YeSPd_#NYu3k(Ii$UCvkbEqn^mjr$ zxJmdTuag}GwV`4#8<({&JRAlW#6)=lqSU6uY_&}mMYuWW3t+N_Jmy{>)Q>?|AmruD zLocy-2aaJm0nVz_G`6zk1#1den?ce2t{zlQ)tXG3BNu5_y_r=4=A3$HAbn8e_1Y$| zV6Z|^y~KL~GqnbaJUl)D2I1;MY4->wh9b#)=|iPq&!A&{lhsY$?rziy5Xy2uK!&AV zU_`CMsv85Yp+1NJS*Lji%$MmvE#dw_Xj>S%TA82&agP~;qiB`xB(+YgXOtL#G(jnV z6w~SLIy#ZAs)0ETdLZ>w=k6nHAmu2FsB2*GLoQ&Zwef({(vO9Z;FGn}hx=32!q72I zETVJ=v)%-l7v`bgH880P;c-wW7)CeeREMP!0E-mI9>{+WX3-15)X@+AVjXc|!rGvj zHQM$&p+=Hjxy->KAB3gq5SJ%vZ49F60#`P(HBcZ)2M;R@4TMHsvSJwL7#5`q}0(B2zPc8o^DUq(V!V^f`_}oN&-hw55!kr-xQ`C zkfFXTdOy@2uFFJ#ySxF^2l0Wu zy#){)QD~CVH(=-v#>Bqq6myEx?)PyR*I3iV_%zNkL~b8wGDU%+2Qtq zX8=91R939J&*K?Hn;ip~kUrFclkRTSps4noWlXj-?i=7z88mAL5|V(`FAeL|52qcLh2I6#*1`2rwsJcN70Ov*@(6LUG1hVPW_=2?!te~eCuHFH!KkOlU2Ef6bWSxO}Xm1hXfRayQ7JNE7z!e9O zo64$LfFXKAwNvyrAPe{l9tP{De5RnsFDS7CY?a7FhDqY(VjRRQdgp@0Yw@6}sV-q1 z6Qa%p8y-Y#*HKgorUBuI$+8d!fSa@gpgv4nTQ3T#920#sFs*i z9|pW#vg%lPgwun@VYS0x++b=Vx;uf7n1KPsEFdb)EEfnv|Lp3;S{##s=?3|5{7{4X zJl!F)QoY2AfF%)o zLCt&s8U%5OpmBQyTcq|bA1JCz^b%P|2xPeSq6TZxg}-o3UjThhPB@5ch?>Jf0Sjaj zuvuxgSOK6%950MT=oS?t7^T0k}PoE9CgVICL6{C9Jh*42`2|Wz$i{S~PqJ zYgtc#9Ak)dW0uvw3$XOS#$z4ydMvt{2nl3`-1G`B0}nSt$Ut336M#^cPuMqgBgg?P z2?bNk)X=O87{%s9oT-X{br49R2cjS?Mn2FkMadp864@ih;B=f3K%096L+yhor zSVe;U>?))oumnSIAzQ|jVWA3z6|#p9Ie*p+x9g>+qLdG(Ad(^YLn$S*j)&! zi>PACkg(V^K8Z&6s)Y)`(d2Twu_BcU*jpY~Q z5luZ-8!T5!>d<(XtO6A9(Z6FBTmi_!9<1D2K>+0V!p5;0WUIZ<>qJ=_61IyP0bw^S zuGB!l5Bhi)Rqe-GVnj$eiQH5jUoul;9H9_l&CnsKT5??j!GT^L>h(e>DOFAEWmv-M z>nAJLpe_q-Izo@&Dy`Oj7~af57#%}0Rx}HhCg1_OBo|$z*VHp;pf!oFu;XCtW)Ln> zL3)MTP8t{>g#hLe)J78@NY71697+dt%avjXzyMogOWSkJFIaaE!GmGm?d$2mH#qtc zU>ZfCRiK0hM$k)`W5uontr4cZAgBfGhZBNH1oRv-H>d>m8o3O<4%HXEXmRzrup|+q z4OuTiB6X+|fCNN@y7Cf+4?Tj4H%5lV`%xkjx`VC{dIK0)kZOR4)}&@f!HX`MceQr3 zz#wYfeZX-5a=>!1*|E2EPbi*D08c@L zgLI)KVpRfY1*R+*EX+mX9&*7J*M#c#atWauYt2KhKC#@(wD$oT7Ts|K!v%q*8nZ)4 zfdv6Em0kBf!w<2l8X>w1Um7=yx4`NSc)QW70oe0cA#ogN)Pk}!dBdZD)jiC?uz-oO zgS9+3txa)JvNrH(Wjho!RL~Hw2P76$M_dJvz_TpWnZ>&zVi*fYafy(X^<$ESxAl)$ zU{C-E6{c`rfEb-&FsB*#7X?>mh#K(er6@#JfxW0tS6MH2Us`D43Bc;DEJw1!g;oFs zi+)0&q9_MIJD=Oz!PwuPu3k*=0IaZBbOBCk zp@j;S+pW{n=Y=GLu84X$K@@_poTzd#O&GfyEkXT3bxPX9e!KfX^Q6U2R0rb;_Ynfg zCyAb%AyC*+ogu*#0|yZ%bU<8kw7J6~qAWyc*bdcBX9;+aONgY0M?e51NV&bx(4pQD zD0~y3kVCy#87n3=LAB28)|YKW8?Gn;-nJnu0~B6!h^jOeh(H2+pK{P8@l+X+DBWjJ6R;kT9sn-5fq4*d0lC1*po>63 z9aiZ5E!K|4w*Ad?2Z}e8T+|{49xe{xs*_Qp*9-0vvG1W%PP7GymGn7~B@v@Spm!{P zNF>ApC|Ac^Azy%|MshxgZ#xX&s5c1_WxxauLO~JRBYKbO#Z5h<2vX+A{K<#})6Ow36%+rr*&*X ztUdjxnif9dyBb@_*XMy*BlMCuu7nlJ?11Tk-P2Jb7A9)sFphy0p)Cb7_Ei{yviHeE z0UUdsI&vCJEa(4 zBDi3u?LfB=fq2;q_EM}Y=yQwB$+a<q?WT#TJBXfQ5(+T`5eKUSJKoPRN4ahz*PeUhn|VAk6QO-e?&8kp(ao z9r6GcL;W5&;Y8O1%>!+ef`JBQH4B!DiJ~11o?b{bs23sYUgy-_HnHWAV4-X#-H~cx zrlfdEA5SWhmNa|;I&qOmo+*>SH8wDsSPW(!h9(D77u$q)qYs5`BQ6*o!N*8aT$KlX z)ZAOmKsv;_uoBD>kvutN;J%(9XqG0z3D{kI7UDY_NKQ1W72MF5?qCec$1VzQvJh&8 z#tzH8sITC;x&m<2GeSR9GdM84D_Gal8D)ilhD|@^!4>0yOl{iOrz|P&C?GDeFdWPj z9)@v2U%iP-N+t}WzRXzR-22;)X&38g-m|L-u4Tu8Mkkj+P|_f>0uUBpjbWv@%d&~W zp6)$bEUbVSWki~2!K@zvB`k^(F{ed|cx9!-krDDP#b?ZLjQ9CQ5Nab+nGy`5p0-+) zm0Gzh#huD|kX11~a%RO5sHqY#mXvFggP^au&)X04v~Xa=6410S>l}0wwsqa(qcbX? zLLbE;)PsK4k11G^f(gDnQTaelTtJ98*Y6Tp#0d&dmDdFuAMH;tyu%U(e1eh-4{r#l zL_Y?7om5kjK`_1E@es^cW@=$U7EsNP6CrQeI#kvLIe~f7U0QaQ)Y1^=xZGcG@vq^3!FrNl=`xY^Rfi7JjEi4T)91r zxkns|cqQ0~ISdKP4zmIJ$-q~EYc?x5GuS3819^%tLJL&O1d&~qg=jePGlp>iM(nX! zO{0n(1I`Tq(UbS3<7f)iCYPou?>EfCgS1#yrwv=A9VijpM(lyTKtGS0x^O>brDxhP9pX8v?+7x42$=CQS%UBspe#(Fm<9421OzP-gW!i;x#L!P+u#&tE^%lJ z?ibSxxKV1x(2Om>mBW38T|-zx@o&-$jaVcZxeRQwFj{m2F@%E2IJ>B0qKwcZu#2`e zkPqxUKwr04p^#G03Hc#de$|+i=vEUzLl6mHv*=@A}fI;y@>MBbvlY9WvaCT-Noo+mSMnR^U+7UP(eCez;i%9;MrlQGgYp%InE+Ux4;C=mYL&XH#A@0QFd(QCI?71w6vhoxw6D+C zGhz`l6;MJ{Arx)GG7G9g9|I0Wf5)@rW0Z$t(K3hoAWpHOvwqFOKrF1wX=f1gh8{ry zt1-l`ti(aJE@&on^yF2qa2l8h_>=JOyVQc{LeKKu?wjHKC-5ucKD;(LOFu*kz&+(?HK+!*HM2_lum z931c<5e1<~2o$b|%atB*c=bW3>|=*yK6Evl`JVR0XQ{Gm7(%wqdy z7&h}Mko!c(1$-U@s1=U>-(ABc<-aqzX#4IthFx^gU?VfeXq6FHm^a9&FAIFo=8rUGj|Kt!`U-~(T+8=hFCv#66P zGd-?=Y%(`06)u3pCd8k*CsCl+!$dfy6*4kRa#>oiIRlaxdokf%J|s6PFPMa{BiTWm z%aSaL!i>}t;Gh@qF~IB08b09|2?a*zo-WJBLF(wm^4nh$wIYc0%uK*P1-r4$GN2}HDutZ}gWj+MH+;KvG5;nZo;oyY$q0 z5t>79k=n~aMNSY>jO{`oy9Dt8{aJy;9H3srP+7U*1!{oPnLZ}Q{Yefkufe~ghCwGQ ze5@15@kLw+{hlfx0x=en`7nb1A#gyVT_pm8m>?60Cy6si&QN}=J+}Q0TZe?fm_et^ zZlhPu%Q)((YB-;cdIsr8)>X7K|iovI$h9d;m{ev#LW5Kw8$Ox4io z4N!v{y9;hpNvSfc=dASBSwKHO0`CU6ga*0cM%qw>{V87_N-*}6sVQj%AR>}%Oc5s{ ziIcPms7P`G5Cw5Oh_Q0h?YZb_2IqiVVs4Ob)W;+q6b6id?BwHpBWAaRc`~P*9>Yn7 zpb8Hq@eu3a{!TgSUq*`^u5L_e5{}@N3&<#}vsYr6f|AGQN{d3nqk9+~7}RN=?MT3z z%8nmVbBex_S}egXZhS$+RlZm}t$3`SUW&AAfCaQc`qHCCgnxSi7$f2=5op3-s3u5G zq%sHqm@6pY5#n;~FqO2q;xMmF_HMixNA zp$g{g#{L(K{7*(-B^}$0TLWYn7*1rsq@mC*5Dn9N^;Qt40#$;cD#`sL^dLYoUFa zNmd?Iu`YPhA`y6qfzu;?TR|YeBs|3p2iPv+_>fkx%K?P~au2CZ$go7Ln1rJ;B+J{) zSbmAXQ(Og|2WA145MU~7QvyVRvF;IJY7#!6^GQix)dRgSq(Q`HlLJb^E3_~2R0i{y zRg5sv8le&+dN3T~C=ept=|ip(W4@^vFgX}m>^@|9}?w|;mbS%q9(#C zm;?+QNHEtN`Nv8)V@L@5WQc-_jb*?LV&`P@1#*6BWztA83>qC)X+l;NlS{p@6G94< zE+PIF>}TNQW(Nlxcn)!)U?!Bsd`zVOOXx4CCK;NQjQ^cf+04kdBm|IDt@IqgdeWk{ zzd#I#gdJGY5^os_#7GDtg76%MU4u#`TSDUZB#r{tz>Ac4L7We!jMxkH7B`q~86>Hp zuZVX%SqJ;sJc!E(UGR;)XBs=4XDAHu0N|u?yRiXN+{i4(c zJQ9e>y>O7fO)64(7^}M_ zx%`6Qz!6LtC^1z+sSM1M0Zk&=U1g*xHAThUxh&Xp3llQnVn~!shwLOE0~QEN)yS!$ zxCIOW1Ql|{*x!COm`d(Q23hT9^aq2609|U7h&Ur&GI|p6W=XUF`&Jv@fFa6!F4QdQ zlLQ7~%N>UBfmk8h&`Gb#7E}FzqCsH|3YKh)W^VW*yPrr<5z;k$OdMrut?1MU*r8G& zDI^w1NyY-pUIN6L|I!RVLH(Uf_i}X+TMI3yi-!OVmupg@AIXxa$nBTy4J6CR3ivZD zRT5h;cU>ZIPzHQJk(a2C=8rzyh0sgv7epFDkQUIIT;xXpkWxz_ZV>G=fFM;sexIZ) z2B4)OJW?n$rJFFHDm;h?AZSp`%1MR*HA}*+uAL*<1!8H$+5^px;MwOhL)iyw;R1?z zi)h29BC9}rA#bqTi|LiHIi@HGU-C=<;#e*rvtAb#9C=b5#Xuog&2WEbc3=GTkpjd2WkaF$b_h#O7(z{gl;hnyxOj>LS(`N zh+&!myC!l8+M^BT;8A_-p-RsjSfoEg4w9Q=fY4-QKOPBG#dZLxo#fI621Hh2`JG{k zTHraVlo)UH54?#K6!c(`8zKh@`M94&x|YXMYWyi3Pu~s*!Hi(W7KQ>Z+PnZ6O@c;x zev~jMix>M+sJ)4x-=R;kDuE<2Umoz<(cI{0cG?_AE}s+Z2+)O~=pG9dIKUYEmAbjh z-4ABM`3L|j!T}O6^oU*vEv8}&ah=3m8`-&uv834dN?#^P)FwcW$B{PC#bpkw$Fd$t z223`Do)HXEUB#Appk?fdQ2m?-sYz@MeaF5xlt$=Fa`O`G4Z$@VlZUI@uw2HrPrw8Z z^kB@6T9gtyp!Ea$R5W8!kJjrGz|np(U;HDt99lPvks*#WLmfsR3i z*5D2h#^k}E!X{;MOA4q{No=>k|)F=lF>!Yb#Y@fD5$ck z?m*YMA%}#B3et5!Gy^62fGY#Spe#YEs(3^qP6<7)D=_kc^@m~by?;0F4v)A7Tr-vq zbfwp7gPcJeDpC~&JVVMX#7!-T!we0D2x0;qb6_zwSUe2$h)F2D%8x!YbA{F$z~m?Q z;k2MOw6;)dY~oL!Idk~4)+ep zeh4(M;psl^J+pvoPK_11$qO;3H%!=PJoGR$cN-nl_*D!E^9h; zrn}qRm$r&S4T4!I_+SwL=0hO_Tc@j228aa<1N((=aYq9CCBqU12t|D4(LtSxN^I+`(*^c@b#Yhi;0vm?-%|6;}>hx-=+(_sL{f&fAPLhnrC zL_bxsz18MuwwbXhiL>PeIk)}>>9qe*D@talPDnx|vI(&L0yB?LE30D_i#kU$1q0NX zxPYK@6qo&lCaa(K_WT&stMBx-XxAZt3h7$NK_}usMGl8Jd+9?y1e!w(H1;sFw(OOK zIHz5P52IUpH_@;3Avv1c4{(J0+MGz?uhvyE!5Os0r6N-Den_mI z0m;Mw5^-}i85??Ly=+VZ>))E2VI_LOnl_z_N4p4SijPQL5c^K1h=ss}p)|>=62|p( z6aw5jYz`Zj@gz7T4w7A9wW{x-F=J_Vv?5iohshaOw2IP#2}ou)%R&PyPb?KdQ9UrE zkwCb!*Dmh>&;Uvqv=i_Rc1W!J*w-e2oi^DathT#)#lXC1*i;Z%ncAa=avn0D>;iIj zz$bD-W!?_~J)kJTzynm!Ye0-i1pncjkm*RuD+-;#to z4mhxhj-azBgv=+$I*{E}+blpHCihs7lxpNF54fp};b9=D7ui}A9Z+%joY-AueM9Rw z_zM}O;!G02Fd9X^CE>@O`qdlRNBz zU(l4ntamkW{j`%oyHZ)7{mc}cfdfNU6C<+vw{R;3@^pPmR_@A zmW8Sg!33KIgf>)FR1HoJ>_V?;j$x*Nz*rfV#Ysa0i)>7#XRkudhG3M9FJ+?&w?#HG zAtK3=Pw5nJRzdqRH@4XJbu=F#O#w^TGxB%HN3tRm5A_On1oT9{F#}8%&DdB)ZH}T4 zG)!HL@TG|1J`wDx>>Dk7RT#*k-ENiCRJ)M@GXOe(GO5OrM<*>$aI7dP1Vs^g2}U8? zqEP;#N!Z)~Xbz341~z7rjUcGN;F=|ECyptx*$ZY8`&}udfJkp{KG@u>8-HNrrAuzt z9&iviY*YuyO1TsAOJ-G+x+ms{C84Gtw816E!pL{h%`-#2+!=T;Hb_E}VCpK2HW;cT z-^hYhnY~2k6(5S)sgwL1w3ggaf?6tx*vD-=g`5D{PM_>esn%%33)HJ;#&K&v@vzX; zE-f|jSA;iUMRYGr8i{=8QzmvAQCp^Df}{wB(v1}d zEUrE@2nMH5p``^3oQf$}INGb;LZ2(lpkOB`r_jPew7@m+Xo0Ud2JsjR(An|3yARsI z#_}&%^=;dzFQkhn3-C{LRx#F42BiSe!ep$rU6x(8z0FA%x@@Vy*%R0(9P9NBphv0g zn!Eu}jM&R`mkZGb7$qDRr~#%38#!bkb~_aM7a6QKW>t;piI@Z#%&JhL;ZQ(X?pG+b zHxTT@e0%+f)z5$Sn)`jT< zN5GX73W4(lyx3Y>_t4TGs2jymmONb2E75VJG$WD$vYg_BG7&rB>eh8GEg`OyErd%M zG?&uib;{*BOad)P;xHq_;E6p4Ky)BvY^xds5P>U7Ga=g0Fr+{(dzw;B;93R)gX{sq za5l`J036`17VYNr9db}xzXz5IY`g>!BRP(MB4GsEGApBT-h8=nKDlJYcxAJ%eQn~F zl&zAPu%}#cg5p&Az(=6WNWLfeop3UOiqx;%0gL8&f?KZzJkVr`vs7n*SHf^6EL=Z< zzL=#=fAxYp2!e$UE$U$c2cK^A1iZzz|p&c_fT2+@_IBsxP42Q7vf$u@v zfVD5#u`LjlaB_Nsy3q(L9iW>;3&1ddz0tY98-y6^5OgPC(!EGnc+gS8q7d5HdIk#& z#RMR^L1{`hQ6Nl$*(R}m(UuS+!r56wZ7wSe9H@fo7@z^X451dW9tRY3WPlKd7%+t@ zciRKiE7K~`reAuHZq(B;TQrG&=zC(=OwE$WjfFm`RBjA8z~ws(C|Gr4sX|njJy3ba z!ikWCd9}jpWLiF9l}!5RQZG4Y_3xY>U7FOa+IbRF(x#LAr3!DSrjf}sKCHsY;-Qs<@8abR%=h6xb7WW}o>x;!r^ zgDSN10y)gVXr`B(o;_Wh_IuvzR@10RVWfLM#zegkPv@4k-QR=ifv7xg<{4eg+3%y z1?v`el!Ar>|E}z13I-!o#WCgC0L%j?W)GpxLqITG((8h%tp=zJlUR~* zfdK`@EFNOA#N?o1lEzrDW&>DsJwSLbnFnjcmI!KHgnfDNdLnGy!`(xBSTxzle~!~F zSac(-O}ULjL*5?HGW1D|3F{XZQvTsf;gEV^>zDPoc$6vlsk-Z)1UmJwQJAclbP7&x zrv&0xv@b*kN^bKF2I064hsNRG=z=aJ6`=wGTngb46&k3P63~+1sO2oA`K?@{he2&n zT_EFv8I>3+fpmO76BO1TVSdOZDb&GZ2uCc);jQ2tfzgn#f7k^J7hy}Bn1<}jcEmygM#Ri*v0q*v%de{e-^-e<^B~2T!Fw92wZ`{6$o5`z!eBw zfxs0AT!Fw92wZ`{6$o5`z!eBwfxs0AT!Fyvg#ZoL^ism-tG`HC+_QSZP1Z3LtyGO?c9i77-D3T3W`Gzux;P&W`}tfcb#RbCE|@IYcl@)7Y1=| zjnkq!gcr&G(^ z2$MV92e<;y=9IcJ1nX-M8>^!k`jK718s3C!MD2LZU_J>ulUE-|91|0G=;v5e3q4-2 zpChnUF4q`n_)RvBz95bpt`8X3;Rm3{<&gd!8d{fOT2^}@I{;cl8=-PIY+%=g$<&VM zCb}IM@dmRkE~0b?Q>k#1p$7U3M^t&dYbTk~gG4)&RAIU z?Xdl;7sVa%z;A^4qmkTdMbxQh;Dt>~?*G|xgBd^7zqTP%iK`F%Y`I?0A;I*I)nsfv zYf$dT-ADG)>D|=qcmV*ZJ8P&ugm(#ZD+oOZwc`czmjA!yEt~asRH+D8ZkUd64l(LW zklu_%-aAGY4y@w9SMl`%PDfmLF@t)Q`48p&ar^Q9IAk~BWxg}Y_ru&GY=}P;U53pg=%FlGiPn2T0~*>J~e%p|i0WT+C`qrXp$aRCUMpv4 z1L8FlD%1n?3ugv_Az6$}UK~I$K!D-jYTt3XuF#uB!H8%Fo<2I5!t5$sLoU2zwTEF< zc#nujPl*vg;9XXdk(P8Tqb)rs5yUC}6DcM@VRj&*Z!pz#{?QSFbZz?Ey1iX0sc#A| z%9St>fC%j)? zsp2ING0%uW_3}b-iQz>{OjVWeT<*d_D~JhGq30v!x%N4M0T{v6oe=6wfn*NM{(&;jy-*aTUmH&wj~6#`5`1?f87k5Kt0%+omh>u@AH!ChY>7seai zaOVj9kSbc&yc;ol#7&9w*72Y{?EUd%^=|Mac+*t27h06q4JIlj_ql^*p4>)mom!r8Ek_c7c0gBFfa~ED*1R}+x677@GQFdF? z?q-TNzEJUyEwyWq^|$IRVYp+%BQytz+wd?W#22$Ed`P+nKf479Dxe@le=`U6s64G^XWL$ThZ8*A zfm@hI`e!>4#)5a}A<7ma7U7ZzR6;<7;FMrC1!@OhdNPSu@3RGqkMQC*+21?F|FIBZ3G=ah5Y0MCl)sol95T!LeaE+Lv zLcgHVG3buk9%{l=AfO0U*yRNYBK;+DNgl>jGOR-OIKVBiSTsStn+(`k6dr4BX*aj- zYiixyX5GIBC~P}Wy}twRm36f3nnKjdjCm035*oDdbY{L=~a)J7FR5DwtMIJL?a$>6i~0SFDTQp|C;ZA93UGkAj|W&xJoeppln~!H$?F^-nfcg zBjwvZ{OvFO6lAz$%^q)G1or#e-s%P#TV<^@M=!_lrgjL>j>ChKTXbtWjnUNwP8wUX zg8BAgj44o546` zN$?%J;I&|>ZY;Em!Q{LKCMvgKkqL)Iu?M7&wj>cHbw$(-G(|yr2UJPc=J_$nOrp>) z$s<-YpEKu6DmftmA{P5oNyg@bL3m{M)^PT8pTOQ!6Z3A3%zjn=((3XuK%9V=Sn5SG zqFZa9h0ER(Q0(YdZA~c7J5$72AAL<;+PyldA<3f@Du4+vOOSm%l3B@|A>}jKr_ig= z>AZ+8mF(2vh~}EZrSbFi!4p%kPI^Ogb;zNJPD3+!qzHw%`somzy0yLg54rYHwqNCB z(Xv>jw+^z3^gvzq*wm3m!~i)%}AiiXJ%|g@M^r!((ZWyQCq4+KPC;I zVtJEbDwE19rs$th<4JUUJ}8b*{B&7fb*>XuwY5&`v(erL_A0irlH4_#>i8~0iA$O0 z@~F#sL>fm##ERiGuB9xadmTe~K@R!r6u}@R7CY}4#Zk(SEu(C%# z`l{{W&ieB|AFPgOon7mMLQ!w=reOpmdY_DHyfQfiDlG>b>rjO3MsyW|B}hR_0aV?h zlA<0Im9F*fkIiy%Z)Y{n)e{+IlZW*+3;q# zR0ky#x|QkBFoUvxVFryFI)L?~d{H)LOUUQHLVZ@}tmAz&FN|1CHdVSaPn_m9)pM)O zVwCu|pIaN~8Hhdiw*!9tP4AXSxCG|F0tn_JB)5PaPjhSujwUp}{bN-tu-V{kde|~Uu z)udGem0z+;iMOC&5VrR0j1QLfp2AYq+P9BB`O({6+;SAun@W_K&tT(j53Y|!OLVRs zjh68mTwL{j^uhC*SC3Dt^3LCU`Y-;cfB$bjnN5YxcL%gC&*A4&9mcqgzk}QO;bvuP z4$UqA>WxIQxIHQGfzKzt3A?0=%mymYVG0_>DXVTtl6Us*!e^yVIArm4Ufi-4;n8}p zUTjoS)pbIwaz9x$y0XbN;VAQ2=NPY%#OrOv&?E-eh0}u;Jg(=f;Oy9Vyl}}%Dd;ge zIr5inIbkmkW!Cqh3Y02L-`&IMr)e~2+p<{bbJe#zQ$1lN{Fu!^azy9EpAEj8FVTGoC{pgL& znB#}3uV>Rx`2H zs1989a2$J?2{lVZ2SzG)`KiaGuR1DnO=K!$?sqfsB?yV)g4tj6v0_`i?|+)2SD${u z<7WSRcp*kXP5nnz^|3Uyu9kgA8LIs7Ei<8&GA@&jO0AD=ec1aU16e{kCNcU|s`U}z z_?q7aPq(Jrfr^`e@b4;g-WS)rIDCl!gj-V9E{sGv;a9!$7wFWwq!Qa3AU#roEX71g z%y`AgP`tdmx41iA8}G$7;uzZwZ7LcE$SfYN(3$zV@x{(?C9b_`#pin5#@f!#*3MvK z>+{ink5sB;2sgo}-}z7eYKHXgbN9ncY zpY!bsqKr{;h%}#)-`Ll`$S>XzIq}wz3gu6`Z(Kd%hKdWWub`MS-FoW3DF(pL%9_(@ z0@JEPlRDL#J$m~ou82X7oYOB5E*t_LsK)L_#lUln_VLFAI&t)=H*C!b0jS7`qWZ=E z_HWQcpDgKrj~gph?8t7rp5%mOBh5ok@SUwg^zuKSeB1nEoe{76#P0aSR z-^bve4eDOz9k==R66-hI=TMVDZ;0MbI}XJ-O=HZ*djCByy~b4%^X2hdAFpQF((G}bG_%qOq=Cf*dbne)VSqd2%2ci@ z7v~wOCd#9ii!P5g)Sm=tz;0-S#ecDQ{!=X8{|ZRKwC>nf6llq!g!|G`R}SORb+(9! z?tPd@EwEJ^{0DhHpH@d^?HW>B(G7mysL^`r#v_WU;Dd8sW$8$R&7nF)-qQIm_uuHx^s+C8lS_9K3|V z2K{AAoCA4g{gQDMR;kP z-fFRm#DA0iI$)mgpi#Uk+DeiSDdbVwsRp66593y>k%;X@!6}%3%20_CE&6DP@Sj}4;xdbyNkE*gf-7;yHcm$ zw<9v$=`U~t!f=k1^h%CV{FbABB`xCP+PKxS)(2~CnXXBCRU4+1=n<0NXgSVqqYJGx zGedLvGBeJ488k8q!A;=p?BMGj{7+pJgeH z*~eQ;)-pE2DdkLvU09@qmJwI|?&9xaC;lsJ1;ZP4r0~RQn+6;rRFJv<{&zNh_n%>> zYX8E0f6AHzvS1?aB`c5h#(SHaqxDqlLF>Hjll@QFNCzO=0s7*mD@*8YkD67xtL2e| zw;8?RmYWM!0APVyBxdZ zi9FQCP18IT8GjkZ3F_Pr;_-5pKCJ2|u@wdYW|#>y;Ap$FH)eRe(He815P|~QV6N(A zc3_g!oZJHnlw#8)(OYp}bS>n`Roz=aBj2W=Yqc5sF4UkF%JEL+uO~3X-REmNYs+iH zO^U=@YVoeWn0VYFYVLj36b5wv6JN6OIm6uJDSGH^2SmFW=F4g#cKy4JiTu z0XEN5{!aHX+?91u@Feb?;J%#f%MzjHePMXjAiD4j?!+rCb4&ykW(rAlXVg)N5gV5* zAlOMRfZ)IIJn{0zxaYym^{tKWmBUh zp+8k@Cv5oh+h9%cyu{UFq`kjNL4C1l3{J}MP-b;NXy)}@KW}v0;DFQ}T;E$cxp_Hw z$v@ug|F7U5_2*;U3$jts*BU_#me$74yBnUvSmAf^8@w<04LZTl2qtA&oS>{oc^qa` zVb~%>#KN(w?vR>KOf%!0YT*vq3)U?A2OBI8pD$5y@4oj;*j<)B+qYzL!FDyZs>XX& zRbibg3Z-15E_CkXfnt17EKjgcs%b%_ScM}Zg~LA+4Ls@*a|G3$O%T~Mef&_}7h#Rd z(g$FjsH>SuL8;gQ*n&P+NRZmWRA+4>?9=c3*MEgaVF4k4L#a7W8H{A4ES<05?EA0& z>R*?WR+81Ju4)@XN+$yo#G#AQ_;3D?Pl9QHR*MGEx=K-&=4^vws~yr_EOvq{+)sEm z?h#v6H%ef$Vj~MQ!pNMBJ2t6J*U35BC31KA8Sy*hno4Vxizr}|qAURjzjjT{r9BsF$ z5gO0zSAz+#3L14623`N>b>A|o_@B>=LbSNXSifkT(D=szDOTVu@1pSgAzdnY=(j_# zf5S*xsIjV>>NduWjFY?h-g(`gDa|W8Tl^esQ-+x7bt%v|(*@bL5(piF2_GUboTbtF zaGBV79KhZ(&2W1~S_}O-^j8wcr+Zg|{np9v?xAcdKI55eDp2VnFKDc2sbYPw43W6y zIdR$Yelx1s5JLKr5UsEWWLjbg-Ju+E_XbCW&zEH&$58LN!4=%Tv_+l{<8C3DU!YYk zy10A7gC;5vSR;|IfPa9x;6#jGfTWt>$?hEC#@PS^(B%W~c$X=jm>WxzK_sI> z#7Gw)vE!3hOQ{a#*0nu~w-;Z(^L|W7bI!VHCM&vMs9PeqCUYk3*IW400Cr2jZJ}t$ zOfn!3KV?-c-%Q?wPWSQ%o9#&ym6;?5%Vbt6{Z_gZ#2_|oq2-A&WYVLqdYgMIE2DAH z21ZwY8G^A1(nZyl!In8^If-o%?&-SQF4JQ!-J-1I3|u7LS&ZmxZLa-45L949|a0UnDbA_Uqn6EK4Ln;` z4pNVhr5zs(4-qY^zy%RKX#MAVi^H+8D`RFnW_0-4s{h0n=#3<#C7a(m1jKmRFS402 zO^4PR_EC>Gp8#qG-)zn9jp5Sj*0y|?08XuLCX*ERd`JzD2*D=*SQ&R@2Y{%chWi?F z?vw6Y8*OrVDj)GEHfo8=+~1=ukzKc|PzT>7$&3pwg#!cTAa-so6%gG-`zF_*D+s3( z3w;Q#_PR|L0X6vgaq$KMBtQGv&s>mc(Ul|xu~ms+ktPCP5%z7ve^2Hf6eJMWB`ZqB z*Kk?j2{sHln{N3e3M5vS3}59M(W7%R(Ma5kdgyl$0s`o(hXfR90h#`+paX&i$o8z- z+-ziImnj56bg>H}S6iBP)CCbYLFY!LsAoWf@r@_sS&-^1et=Xh>L8$B?5;tTi)!Kt zn=w-^&Q|*hu;m%q1%Q6+JcKNk3>7o1u)ZH$iV%Td>$Qjw@Xez*92^?>o)P9U3u33|Zm zSzHMHK|sEQ2FTV+@KRTHh^@pBHa*c%Ii36(L-qEFwp((`rfkN-OaR|EGyE)|`NT3m zTOv)h;T)KoU@tNRXpjU0YYwj4OiZg{5ScqrVTP1c8=;Uunq+jr+>E3*-XORdt)G~* z;D!zWh$s|A3naB#@QpWq{W~MQ{#5)4Zz5V=7^1=Mv$ZE<*?~R|LTfNefEZj8a)ud1 zN$}*#>g$s1!Xk1WwKb5E4FGZ_2IG0NM8ZMeYL)zl*~iUtL`@Z>@gG@w$NE4WE>8UX zaPVYpca{9r-pbz29>62IL$iZeCxDEn7jO#icjDbk%(a!;GKF4lY5x``ZfljUi zt-8K7eQi9|0$h>HV|&387pK z1hWLxxuI|h>=I>6`{Y2u-Cd;ZsUEgovBEY0S5BVKbdZ5^QG@7&5%^a5gUT}sP)rI3cMW**Oo^xEh?2w9F>oXD_DQpk6-op zON6ymZP@l`h^V-5N`MC$N#H!BmqHM_rl}nZB;Z4Y#Y{qv{E*;8>xYb|FC3ZAPS5IOd@$vSP$$YD?lue#uSvn zM7^Y+0g_f70c_?C+7;x*2i10F{|pBPLL zAu}T^=#2V}^4XuR(UbM(_gcd0@D%XyW`r-O4%wQ0OENs_emgiXKQl|ilq2T-ocCm0 zIec>Qx1{is(Qs$$*%yPSw;0!5JI4UnAUgVnU0vrUbWQ0?UPhZIE?FRHSRi01a5ri(TUS82fZAisJI^~4tf^CA5! z%GK_3*(V)5DSGvRT8yB#xV5*A0hN+E=?AU|=bhk>x~dTQP3;>U*dfp^=vK%4x9EVW zXm(N`KJT5qmdaYFc1t{aYJ+~hwgl@wPnj&~%gsn8TKrPXsx`dt=E7WK9H$cwR|1`ANu0>0;$C#WKe5c2ppZQZh;kx_?o4H zH`nx3PE7I9E3-w@_!n(?dI$j?51qS7?CkBGRg+9}DS3Ng;!=i#`B&ja_Gl8;*-7!g zz&2JEv3+R(rjFxkFgr3xW{nQ~6=KU205Fk{4}7*;rf8)e2L+dMO5tv!tg?c2lF8W< z#Vzm-;f@di9Q!UsfINPha}$K0<)|nF_u}Nn=6u7=wc(Pzn5ea(WZ5{@W&B%P~bU3pfuN1*k()EWpV=u1P(L&|69H9*ghun?+Hq=PG>JqzagE`{Mx zkwqYs+8q_GIK#O52qfhn1j~tv*XG=KI8#h1#tno9WlHHKjT?b|E}cb|Z24}HB|I7Z z$|b60yc;z3%Bstc*ArgFYf)D>x0=iL^@Tv^H!d_K3m-u}-;*zVe0X#>D9L@--+FpC z81lXXXa6AeoXloEwEb6)4Gip1t3^YQeshIcj+JMkL~EcNwsHFe6j-)=zg0A326r*6 zxc2O;yH>vqwEGP;*)FlSZ7B$ixtk@UtO$#uS!Xva?KXNx--`c6Td4?k;ifWv{ zy{8X)GrO2D6kzF+80(SjR7|q${)MLc>rCK%F96=OR*z8}_@Won8xz~7AmA8`VJNs| z^;p|oOVavC&9}NiMY}rV(1!4w49hbt56)va1#{@d)rjkeI*_D1ap(zAIy82ioS3z` zW}CZ3XuQM6M@pqA_>EEwm|-;|#6SniG=+y1B2lM_P4l$6vP@V>Rrp9zts%+aS<9Hn zumwVmr6gG@{oLHzJf2H-59JCo8zZMw#5t6zqBv-?*%1Zs850Tg|2^r1g^^Z@{>9Dd z#k9@$>BGTN1)_!FQqHL6J_WkS#f&o$gJg1xhKq-6@GIP*4;uVy1a||kORnysZyqr1 zIgEeZ-yS`)5?fu=&exc56cvojc;gmW!=pjT8&cyvZ`n4EG&3>D%+C^P`5Co6 z9{fGtfvV@6p3HWcs;H)zmAZBrS!_^FkhvvMUfq1^?sKj^6D49x8;~a$H%BaVYyH)Zr z$Gy&b56xI^3CB^v(;wC0I=64-da#|<2NA4N%%0=8zH1BrM)B`X!VEh)cgGwJHpcfG zTLG5WHNWn)PXaF@_w)~+FIUQ_7JAEg`X$hY#EzOh|(RD=EK8Q z^XZM_vm1=y3zPUd0ri{d^u8v1RH-XXIL$NY;Zy z(ZDk-J{(RNL`c%~nU32Q13|@OdLh`flH0G34&Gxvwk8LK3C*FqKE%jChf$2Tg?#o% z7@-0S3yfAEqdD32V~65Fi8m#{_Tq-fUuUC18_nb5@7J{XteeW~g_UA~XPirzaCL@n z$Ik~jUt*KTB-cci?$WJW?Xu#!wI*%i(1-irXDrXk!Kl3DB$YlmY2X*#D^|ZHKZX@N zyc<+f&DK+n#TY{tG=q``@Y=)G_IYp@hxD+}?GhXpa(?9?)=3_@r~P%Nn@79gVLKv9aE!b+!?vfG;zPDCBgT_;#ISmzv?QV`XOIRfAyOXi5*nPNrzoI4)g)iV-coilj+K}NFjWOfn?8;$1mj1MTE7F(I^ceW%N9;ww5LsL*Co9E+qm?Z241p zh#HZW?}@dJB*-DPImU}0)>XA{*hpm*(0rQ2|KXD-J66wg%oMAk!YS3Cbg80Lsd~zM zDh&+tSXVXU#ms;(gzqrkPhVJ9?>)-9ek06~I+YtKfD;FZA*CzJ@5=|>WvqOKYo)ce z6(*D_9JlD?jHv9peq#H2XPD6Wg;S00!}bsHvd?q&JUYR;F1^Jj+4W+g0^EnPY2%ee z+3VEDellF!c^(Rb5-{u`HM-By^76%1wd>Xl;XrLRyUstts3=tmYg7K1_53I7^LX=0 z-gHL+PnXyxxW42@{vh605g+KxFsGX>d918?LS&uS#=%#Ta5JRikz#O7jbRtOp#~*n ztzBGJu961hIuMPpxuS)@RxDiNT*-z0!6#2Wi?`cry)n#Pp_x?WSOt1frqNlpGHxVR zO>>keT&p+LiQ{wnS~H26I4^(Nsv!$@i)bNqO<0Svvy}ESD?AOBAGBO|rYhP%y7L!b z9@Fob+|Mo+|8B6786v?P9}i{ti*F`)1tyftiT4*HgJJ;q)d&w@+}SNW^QC$`M!g*E zhh6?A#~E@yAraf#^=k{0=@}?_3BxKS&f@mgS>!g+sKW`sgP31y5#56jaHbRGfOBlU zOD@I-b?o|w!`U+_z1B6AetJyLj;3sNCM2_z{TI&z?}Ck)yjqaMdBUiKs;l!!23se^ z{d00L(^KQw>TrBlz7;J0bErmnO^lqxQ>zb#RtUB@vuGl>ibh1W!~kKz6|J3i&Z5_N zCGphF(`3QJH?nj5b{Yu8Pa)*PmwTy|gYQ9a5Ga<)Fg}?;9cZ(H%Z4qSl0}*}ksf@$ zam(5Gr76l7CFN<%X(xd{z6lM=&*)!ar!tFw_t+ZzdNz{GS}2i8WGA|0MIeKJVMY!{P?^emL>b$7J%u_07&AFfuiSlmxGg z0QNBG8>hDbb)*BdNLax&R1{?FT4Cv~ppdMISq+&gwTEw#o_f`i_t%g*s49bQsc?s+ zpvn5X-r@;OZaB1d=k+y@3KkYXeB+pEq`&H4pxV_oEQ>}Sw-4i}N2hkpzifzC<~vrz({&xPBTfuE0%g#GJvux*!4rFq;`87IlUGOaft(o)=M{OOu9zyKSoj1D zER+JQ8N3fe0Wia;wWA{Oecmkq|-Sw@!m?8+_2WH9gH94BQy>pop zLXf7~bGcLS9JD$fVJlAFB7|PDsqt*-dH+f)H!1j@MfBeCy%g=dyYM0BVWwfddj}L5 zWf=Mp{2Ug8ddEEdlQ`O2QEP4Ge%y`wMh~X^U}di0?Jke^At4-MDS)i7}l0+wh|{dZe}%y{q1f&2+-YT-`)YJpqFb8&#K9 zWOaaHC>mD0)Ln^BD4tpRg!|ryj}Mb;-ev_j5BFG%eX2W2)McVU9$!27Tmq-3WtC0! z1Y>4XRM_^2O&R*A?hv6?F;8uf1R{M)w;e%Q=?*PrLs97%uhLm&JhtF}ArL(kGehhc z7VZrtnH|^se{%}VDKMwNoC0$S%qcLZz?=ee3d|`mr@)*7a|+BUFsHzr0&@z?De%vZ z0+v;+9OWzEtgnHa+@x7WvTYk?0{3CBOUMv>f+KOGq8`mJkH-|}vS8 zom4snNkTXzD4h=MsGl9U|G^Zt(!set07(v~Da#2E^oT+1lPaXs6L= z>r)>q52-d#6<3_lx)F#%LKl2B1}|35Wze$8WI9Tlk5%GZ%rW>c0wvTnxS}EYOB+;( z*dul!ME6~9Hhr#dMO=d_1R5NB!ZXG_L{i(7Nl$qjdLX1GyV;LCj&$M+1U9IuZB(Q} zR0hlN_!_6HWS>dzAyRKd>rFu_>i$FxPASN(_c{*f3i?+i@rN53*+{er@d5gi85;rm z)=E~>#03DrnM~ze880CuU^+ytZ}tfVcYy_N6uOc^=`Garv&luDOu=sCxWl`QM=C~d zt@pkpSe8*eU0aqojo)~O!Ids{+I;5;o)DV`=pXP9%-5w}uKgU|fT1qAhYll2$>Vt) zGDp1X)aNfQJW&>W{sErhh(9D@8VI-{zA0jl4dNgwq9BqQtQ!#x2_M=P5}LR06jPBI zwBSM3iwyLt=A4Wp`P{O#8NN~STjKb{#zbLpcf%%sGa&Y9V^(4@UG^`WZX4(+$*3Yc z%&twNQRzl3y9%n47%>qwVtm*xq(m5Am<)X-cCy>&LCw6PF2-$FA>5E&hLlTN$U`h{ zKy+kiiEEn}K;_wqUIJAzJmXxucUSX7B4b&X2DzsWGq|_>L2T#J@MYT2LDEZ#cLVgP zJU|7Db(48MvENo$psjzB4aAN2>V^tN5^c4MI2lhcPhs3M@gQZwO~60sst6$ymSMpz zDO2&6H>3gpTG%&5(4nNJLl6OGWC!8vdS}P9dn;s9m{($jiGWsR^|aQsA>0?&(E zy9SAf54t_i>pe!OfQF+#yY`O`^P4;vILkE32ic2iiR%W%YdFgi5bTEN7dWy-*|V!a z$Qn*;jm(l9;am*Off+#~q^x#B3L8{p`!Ie=9*F7r4`>QUfM|Z#+iehEVrBH`WhyJg z%)+lORfAZdwH#aR6DJ@g3hj~}q(uQas0m?u!ch_1krY5JNzVCoYdqdcgz-`T-QdpP zAUD3fb zYqYsUYhJP$R>(<^iMzNY36`YY8|Wq_Pas0jP}M_#&)V$Wc-gxx)?Ly!8zHe|nuC+% zN@sz)++hYAy$B7}A|9|SkRV3m^H>-Taq}Rc9%BAk`_w0|ZnRwKi_7G=rSWINrI;RF zg9g^nFm6;|_iQI4wg7DM6|87hcuS^z*H3IZ^%V+?(dzMJ9!vqs58u2ox5RWN-xi8Q zj21--&d7s7GojR`=VX0eSD$z&W|D}s&NRdF|tQ^vS?81#@zlKPKC>@46o$) zHC$(l5w5JQD8bNrbXT~nOc28V;*=X|2eBxIqq1)3p%(NkoWelXdanigN4Y%%+|M=* z^unL0yrwyk3NBKYN|NLrQslUQ=@&La-{)VHZ3lq>Y55i%&V%X`7v}Pk?Yr*&NQ=j& zW8Cf4U#0$awjY2BtQd7^Q$Z2_jdfUJx{-x-RlGdk+wK(j@1W5RcroQoRvt@-P7N5A z%C<9z0>m_F-^SOC-cP}IY|S-4J`c^2C=8LSr82v?a0?D}zW5uqS9 z=B0VI$zMt188jOLvl*XEHBh>T=iM(<1~hkUK@+owd*jO56I{cBI8kLiLY=nuRpjF# zd4g*&kIOEDdYk9(dv7chr4$FVd&HwaJ00~F*Pdc9q)`XLoX5E;f~5nhZ7APL0afo^ z`KE#a0m7pjG+kWSJ=uA@Mr?Xvb|4C#4Fe&n>;2&DkLFg6*jyJm{Sz4`m@At!C6U@AFuw|-tg(D z%0xu;LHvI8Hk2dsZXVkT2B1qP+#6&jgAOjUBREGZAzU5$TCJ_T7jMEk3V(t4mF*wS zZT%@~UkM$u3WLygx_NYnpTL^znSS-!hrw(qEzs~rQLG^+HLtNc~We3rxK0OS_AE~sLZJw6nmdNa&vtGny5cpug$cYU7qyB zoJ?&OHz4=@Q;1)Nsd-;kat?Ue3=CbNE+=BVUDY`MB0%J>O)y-arYsq> z5HLjuaIk7;-_3ZfcO@6s{_|=1t>|2478uDCrclW}YexdDy|Q!~?O62;1h^OS{vEg4v z%)SSOUddjrI;3T^o1h}eC4V}yu?}(#h2vT<$ERnw5Lzo{)~KLS>WFhNWOfYU0UR^D zHORh5>Fji=^1kDE`~h7BitZzGL?khTVW^dulvcxOpe$OeV4!ee3Ea#Cn}W=;`sOKV z_-Kb>K6gkGX?4FmNZy=eW|Ej`46FeRFbr%mFi6v4OF=hGCT+FtH99M-7HQ3kM+b4i zKN)kjPh0FBU98Rv6Kd<#+dlT+rFcy{svZX{_HZz0{lkzso|rhW@N?#ooZo=GF~VLm zsT$Lfe4ICQeEJ{V(erHT(;394)9XA%f5@>jI{Svc=rXa--DitAfHfvu(Irud&zzS|ZnK<~wDIiJ4>@u39SxLwlvnr?8qqsE|CNCH+#>zo|2IVCIX8Hy%1=5Yw zM*RzH0Eke&57Osi#4+yFjllC~!Z&Nh{lm$GUg5786d%{ohFu@l3Edd5KB^NcJ4oYM z31|Kr5)PqwaAH*f&JEPmD3kt5PR`~etI}(#gc*4Z5r^F|H!4Ule%jONvuSIG0=YiE zIy$ChrNXT{VpZ+HoR$WE?s&9fY1tM$Iu$A6%z_50YKwM}{m5D}N{**o{pcWT_MOzv zdFJNqm^zsE3nLrR<La7x z93H-Q$gZnM>9~OPG99Jyc8&%dkQ>tn04;A$ucY@}J2#-JlAi9wcv_?V-~VCSKO*4c zdST?bU!Jm4<7dy&m^lHq*9X^N-ij29D)Bn_5U=PZfdRhG_Nl@sT4%U5o4+A4th>c3 zVKKn5gEX0O;(74yf)G4(%Nnp{@Kcoqq0ECH?~d_kb39zar_I&M3FPgx%2O`_zq)<0 z4lK>0f*rpS$$KudRzeOj5nsr}>8(m6%_92PGRd_8M8mo?7Pcp%mo#^%*<%>p=XqUR->$q=K93J>w&7y}RqKk4%QftPI@BBEA zmFy;=#>A=|4RGRgw7Q(!;1$Tp2zli7>Z#v%3lXO72ms|2>z6r&zZ)z;nzepL!*Gu& z(!i#0^5o%T`!`2{JGYu-R{dT$AO$M4YR~(-qv4aS;l^NXmjsgKUG~>*E5Jog224uG zX7}byr$L-cWG_VeT15nEpo3^w*bMAA+@U8Ec8xy%bc_d11#gU!9AOolsSwIp@sRZn@QgeuZyX=KGq&~axvTVxtYw-SMAfmipanNFOB*3vg+};`D zh)&)uv9Ne)k}_+qt5TqU;5pxB?F>&+jE01q;#B-yXGC;GXg?sFlA+BjUSTV6A%Yy4 z4?_B0JrY|9lT;Bs_NRPT@5^E^#7U1@Ef^2j#&K$Vzp8n}+r*nHbK=zv4h4PcxO6ln z@OoRv+Jhs5u)rV>Z99$)l}xR2a-*OVB8sv5{QOO1YIi!yrFC7L)SZz-=E#>5^df0M zEUvklo5Vn|4-nL>5oQzVGmW1(Jje+KPW87;%N;H$v94gAA^nt{8E59Pkt8Ib!4iQve(Tw-G{vw0PT=Qsq z5ane1`XyP=ClaPWw5`pV51{S)984>=tdg zi|&~`toxNXvIPbRy5Kt_LL7OyK3t5(ZY&-BL9@+nM6&jvhqVg1j`ttnk1m^>gAsswcv5%?8n@N;tCPL7n#S4P zLR?WgEPlD>k$BLK42u0SxiIOsj^0r&Im^C@+m>S`J-%ajT3)7qee;3>8=cLYiQ{Y1 zugdm>p_(sxf^}tr_=zk5zW zFCSDDm2`aScb2uLJ}Oibp@VCPkG72vCpuoN(FN;}xyc}Bs}pL51h>7fj!(E8Sq}5R zibF82Fx4tza_WsIak=#g)?**V7xV=N*dc}NzW>R0ZK})=t9v>Q%Btql#T5ztuI!EO z>>uyDn&s9bTb8cuxO1I**$aA|D{!3hZ$w8uHsvTuW7cx{!zW~)LbVp%PQ9sj3Ej2xfqzzPZ7atRK3LTJg6-&Eiz zB}7|XE~{D@qX}@iU#Xed-TzrtqVXivN{l;f%*}v2q9rJeB zGGKfmu)cNUXXU^1EL;iy7i>-wvEhcqewu?Xg4xZGhj|(%qT$r<2fL>hfTSp9iMV%E zvYYNAWa%Y7h@`H{(ybr^6m^`fwvWlZcg^*W(DA7p198+*tsxOv)Q!i^3(CqYtaL6~ z_fm$OLyIk$>aod-kNNRvU8>4sPB#Cr_kLJ~wuZxF7Pg)$6Mm{EM3tjChM$(aru*N#vRO>E1XcA#xnxTEz=zrA%teCAl}M4l4cyM$2pzg0dAB znYOw$Cp$`|P{)V`&Eezl%i|Nu)o3uf?D}d72;@WV?9rXY)!4i1wg~0v_|lqQR#&wM zw70_pI;Q=K3LsBsHU&iC(5TOl8`zQ^ng;y^qyhhOUZF|YHxWJlGXuGppHcw!M|5ME zXz5igNcj52F-|u;@VvHE3(H_SG_s9SHfTd)jMOxELzpUL5giN|rSl z+5hY?o%0FJDKMwNoC0$S%qcLZz?=ee3d|`mr@)*7a|+BUFsHzr0&@z?DKMwNoC0$S z%qg%&Of9(~B1RI+eMP=Nmx5sorvbMGwNSAC1sP8Ci%W#Kq1Mg&A}X+Xen0pv;bGkU z)S)lfaiUum7#Nc`U^#%iVWvE-i86@_Jt|Mzp7xu-2a^IH)KcQ7!nRC9`1X@*ePEx9 z*+RFg#H`+CXumdcZ3LIeQCa!Q%ye^cD1#pWKIwHe|9{BnXsiLI&YII^xB(y|6Q>Yb z0xJ{uW@1Ly0-F7!kLj|`IwZ+mKEO*69zP7H;s8FOh{WL3-SYN0QKGB zc@yU|A%tE%AVA2?C3H4{e z`+eM%#$Znsm#!Ryt+PRQv3zEW_bDAyJh#eY2Q~p@`=sSf2#2IU2({IzP7XsA!tQYo z*QA4zo?;V@X?yy6Gqk)8a2O;2wnsdQS=?MOEt_K%;E4#7onQg?%bwtE}Pp!ht zXI)AQ)JXh|PDQCbK~fuV%K{m|(_Mdw?DPasCBA6~6}ICx3s1D3do4Z>5uOu?6m-uV z1h_NH>ewcPAr7DgTxXnce?lrqy~EL* z9AZQ>4Rny-K#F0{bDD$!d)R2IKOY72tu7TRFjL!ZMf0FCVUq0DiBpCyj23CwJsW zqTCNAbd@CIB+Zr2Zv%OIX4kUFkQQ0)?b56+R1n0@vV4|u-_-p!fXYV<*(Xx?0bcjH z#rw)w!mEim_bm`kugBMu+X$k{e@iiRJC7FC>2n5rh9Oa2guTQ4-gQ7lYk~W$#ChGm zgdBsFC%ymHR%+yz{RwRcTRW12?|(wJ4Kkwu0PHymq*v=m>JXgU!K8Gska{i2BA`c}XQ8PXy6io&-PkgHKequLU!L8|#{$pxoY|Tg~W5 zHwq~rYrf?3A}<(q^1s2Pz5*EMw+G}BfbTk|X1=7*#y}i&!pHab>^%TA`?Y{=s{g}Z zeWK_?Ra{w_-Zzm)oVpKIBoVTckL<;5Ha7`0qUhN2bk6Yl0YVQck^=veToWq)(DB}! z)hFE&qGl#1w?FeP?m3;@_OXjlHP=E`^Bnrf21+sM?d~n^j@QNjp!w!U*fD}PAALB+ z>{0)z$dVuT!S_oD1@P8jGeA_c_{r`Fmd7W)RXoT1xk!>ApA`ooLV$GS&%-Z4J=hPc z4Un5a&;=?9dTIasSe{r)1GV5kZb=402>tLaAFHQ#$HVd7ZrhAiSA`TK8oM}0uK5u= z2hGbXq7rI<{AhN61e4en6L8zf^(##)*znMjPs%gN(l{4k&wcjTqm_~mq&-jy%U{!GLrO z1f~Enmt@)XCSwjAl;i69uKmgZQkWsx?O z>czxS?IQ|o*9%;+u==_;W*`0oZ|PWghb-m zeWmmwb+1j?_Ff*edtP|JLX>mpqkTs8WO?6TS{?4t(}$u-Xzy=bm|T!N=6!$n&-T`K z#_OYxT}OroC^KL8zQ4G)zBt?+?)kt_Ei=FrVRPD-Exkl&sA6q|&y-?^5a0eOQ(#|k zkb`dHz3q`cQV(Y??8GlP@zIp%GYUGS4pE+eQ02v(BJa&rtTUR9ZlVqMjWQvD^?fx@ z%uPVlsts%>l*$&)-8?>LnCwjdp_5#0q6i+s9#-lji95qCw^%v>aI%L)I0dsFyD9G$ zuxA%oZa}zG!3P-~6O6|)Mmqdf_u}N^P^heH;l197YZOV;5m4iw`frC&(Q&lq&6$3H#~Prg z?*?tVbC6`8W2lpKXw`?4Dz|aZR5jUu+qIz%I1>~<66j;=?or-uTd{2K7kzE<43Yyfn;45`^|S|MLo; z=GE^8jTQO*a?t;tx7K}kgC?29yQ2WrQykC~Gwe!5-yu!T_f1zlIG%hRW=)Qns|7Os zrEMKqix=#BbA8xy-FB7rWv$5#q`9+Q1dr4iL zvs_qWai;p@cMHO+(2G;f)HGCWM@JtvSeC(Go>z8=wYRbmdi`V(RVdcL83SgCO*Z)M zM+LZP0uUDM*rx^n#Y?)pH_{MVwaN$V@$})&HF*8B=Iia9B^~}tPX+IgO&4}=$A*Cc z%TAG#;8tE%B|C?w(7fD9oZ6Ejly5znmgh1+<*pl3xl&+Xpnp#=ey}+%JPB(~bGicSOC{}YrwihW9FAof+#2we+hesn@ z$TOyWD&5LS(!(s3A}(0uK3hDC7hfE^R5c%Cor%VBPkse^0Sr18AbUfnZj=eBD(=%= zYJ<70ur(U(VgTNp;F>VOixgH504xCOfMum{!$P(;8Q1r&-<-RPAua!jp68U%OX?`h ztu)2+nvrq|-RTw4FxT)TOGw8|?L3R1u@@N*rHhyxljlvOjOgV`JKElrH3vANx_{TI z-csy8hQK03p2H6`)TQlaX`jxVtsa$- zCmF8fD|SP#lgDod!?op+=5Q1L7l?DrFIMOH>WhU>zw>|o?q7ZqsjS{O>wWs2|7-dI z-h;z~=?UmeL!IgL4U)P)93P?%C`b&ZM5u6iqKA$Hgh_}NF zRXnhcCGQ4(*K0y?yy5QZV0B|k498zLw#>PQ%$$gT{+PsN-X2}u$9Dj^a=1)>uSzk? zkK>I>W-fD_i1jvPHdPd#tZ4v$_(Esm<#kZQOwUP!)p0=88`qV<&>8&pmu-Mt;xoDrXApN_1tUDKh$8?N1EpwMPTERgKRYoOu!zZ zCI(q_g^exa%|G71If;Y+K*hmgN|kR<`B%T3nRDC3CC)u^zX?sl$LQ1coJ=q;lQXI& z%Yn1PUM8_BOFh`Vq2>cOjDEV$&akNRU~KidO4x3-u3(1h%j((Q>@{xKqBm{pOq&yW zva1nT9?w0Pkh#M-OoNcE=WfbK*mWKnS;wPHnyvk=^(t1BJ=i#PE{7cOeOYJ-SPz%* zLMImA_3_lO8y>Qaih$~Oj+ML`j@e$))4{{J4QJVPhX~MgORZR%b8Eja{e@q3) zXNqt4l17H2mED0+=vhXU!`vsCh6mm)nRCpJlNhEuWfC{ zN=>n4{IT&8@HM8|8w4;~CgMP`dU^<(kh!J8vRVr3o;ow3#KO#;g;mNsj^(@m`o%f6 zDhaS@w@K{}^T}eCH&eAomUn6$M&sC8Jw~1K=YC1tN^A$yuy0OoQ8YOG*hF<8caPQ%=EU}{KQuA#{QQVCeP-eDNm{2UV)9Mps?~{x z0u(lzKW$zabVj6M5i7y8I6AV=)&t~G$Unp{q(fA>-=wC#F08rA%j13yP)8cu+1Mtn z-*yqCcMDj^MuE*CFEZvBh(U*_c>-&_fys;QXNQa@pU`jV?N&&$iYA>?5r!dfkTvMR z0!wI0zp!XnMW`b+$H)8%+IgBSt}Y@;`NbZUP|@UFT5UZU=6QLHOk~dOT&lLOYm_X? z=9J{0@$if{zWF;RvfwWc@5$Qk?%obX{CH+4mhBHimK7GuGoAuZDrSyD*;G(H=K7qs z5)E;Pc3O6A-y=FKZ_Y|iUY>InEK!90=xT;(>4X49)Rs-w_rY3T>M;uw{v|d|nL{!0QU=&Pl%gt43hF>J&LxK5!s4{ZL}v zJyFM3P#-Cc3qkO-pILRJ*#?o>T;G#%XnM@){pf@7Bi)}`qriP6d-N~}jyaHorl+cE z43O(%R4PBzr9)gOEi?_=L_--|k_k1f^endr^2u7(Y|N5oU!xJ!^0=~yJJng_>iU)g zAu3t~1~v+uczIj}oemp`!%e*_44ejHQP}gyr^6j{fS;~yu4KiDX)408J4vQQYIkM z3ZH6lkSdLnxRqqDN#b9?TEV?ZxRT4+0XeQe;@sz`)}>b*gwWeE92dQ-Vs5jQ+ovP1 z(Y)<<+|-U=+3Y9^xu;IwEF_Gk_H~^eUgKR6=N8F|!{dH(+X1cc;f-F3!q-gWVoluMy_cY6OxQY(rbq2aAF1e;hnjZ&dwywasc*Fqdur7D&;htYY-o!11Z zvptmzvWer31)B6Qd!o>pvPvcKWHxEeLlavi^xTSr$0q*$(k)-;O$=>(%N@zxn_xV64K$W&B`nez$;fa}gTy*5exX582* zF?@3$S7B7oRkCB`+*s6l@C}vOB&R2*0XE4kF+fc%4tLNJ-^THNw@=`h8V8Glgkh^i zrMyIT^4^C=FvKue3&3#rmoEY_P)56Z09(X5^q9XKVXDyQ?)GqLG}v9;8x!m5 zEp4suZ7i4i7NfyydwV8l`>L`Hks)oA^_hl zGyzc-gWj?bqBF{1=)3+CJp?ct#WQv}kM|+at-4J39%P#TZ%%s;wzendip{s>-d7EhJ;?~|exPwBv0I8a$+_-X& zz6>}cQ3mKr?lfKe2=mOu!D(-`yuxhPh?i3(`||MeZGGKpH4EseUdRFt16`XEl=dJ3 zJ6$q^)uckP1n?C(0cpld`xFa32W%^yh*#PEE~NcyB9GT%YLcMZyXDn%DY54wkRb!r z6>F(B7C>s!tf8(lFDo%ff{G&JC&Dk2ZknF&h2G%#gvPE3Skh~v`W=fGf#>(}S#u!;$!#J)PWP)LakfVXi1=*WTO6<&xSz~RLS#Au@Q?!dR*tj-UIL;UhIA7Kz&q$+_{8V!Ow4C+@(xgS9%oP(9gmp}*IERgbY{& z;mHD_p)<_E!twZ8h*s_298m;f=zc&Y_Ow)HEP`?)M3U!B3{^mnSD8Lb<0VAqgG`2o zLDq@LVROxD*4i=@uev$J)^y&F@TjI;3EzkFYOUck`_EUcKAf!(E}4S zRJx~uEdyQBkws_! zn4s0pKwFDMe|)QuX_7jY4Fj?|F=t|&&hAxbQT;e;QsLcLdqq%DE`b16j5sB;yiNmXEX2NMyNXLPHg z4v?|+fCgi1YL@qFF0b zkXk)8DbO5Ua2_Br>z3rLMqP=*+*XfU?gFoLuZfU_DQe4rS@T&fz)x}{rUfW=)lm@C z1*Ev362<;)%MA0el|w3*#9}~Y07e9WF*S_}Gm#N2uxj;yh)9|bot%7K*hg^+rcGxh zk|_KLe>L9t)vt=@z|$=5EiSH)7U8US3wx{~E5T+%2u=R-##E+m71$wzrQz-pILS!H zhH~YlC7M7~!h`F-{^g)xuGt;5qBx;Mz*VJ4bYeeyCt#=tlyPT!X!|YgjnjTUwntie z_${ASL7J;mUz&EQ@=Kpg$VfYkx9e9t`*}gOfM1|pq_}wMK!b#cWFyU3S`tHb}4 z`#Yx)#hI)a`w|u)F%zZ#JT^`8A!Cg8Y={O+oLJ3)2Ng=KUQEUbeArN5O@4<;V4*7) z-(mQwY}}@`*cxDXS~ox~A=1#{dUEc1S_f{`XmJ-693wK&KqUN{PW*n8o*lyq7kKXtiuB_Zp0IMgFP4 z=-Npg8yvVJ#p0M18sX?QZjHXk`j)=Fu!S}9vk6RWsR6(3`XcWGwaqBy4|S6(LZ3EB z@pH{1OikJe-Gu>^peO@uV=~~ur)eEJMD5qURjcaUBWhW}MrA6p&tr>18jmUViv{7d zwS7-!D`Jm_Xln$2%E;<_j~OyYr31IBS?M&}0T7di7xY*44l~VJCi<#J(G@I4SJUcQ ziawA_7&#ow^6t;K_Lf#bLeo};3^o=aEK9R-D*_z;G^Qtz-|1M|^{KTn;Su(P9huM` z%w}+sNkAx@Dm$8q!-B9Ba|j<4Ox+`1yT6F(rjLD1x+)@Rw%aV?A!SGGG1)TL{@~^v znnVE?xR#k`D&}Z))qczHMH6;(8eFJ#?QeH+feC=2NF@z2LzRqJCyT7!I60US4K^e# z)Y@g0SqO1%{~GCwem(pt!bw@o4M>pWo3~YdD7%n0T2(<~XS6+9XP*q*NSG8Dgicix zui%u{5~A`6ql0>6m0i;`ij;4XKehZ|PhO6O=}r#Nm!rN6lj?6mOizOR4tKc#Nk!$P z*V`HHjF9k~%g8ZNvAkEW*|IREK1IcDUiSx9nnyhkN>PoNj$YavaOU%(^ z*W6mB$z#aPnMpLBBTAt?dYwA4X;rP6I?lAxW#ku)mjB<(RuM(+-gNQS;h-m0EFh zR5lYh=WZuclH5g(v)$$)6@W+?1xaK)PZl*-xM9Id0bdhBA)Dg6J{#WA4Z zE9DjM=QPM^?(m2~+1l@rerDuotHmv?>dD&~dGnnqYPG19A}&0hvL zmtkFE$eim&tMTRH)(K;}NLVx49+Bt`-huZW#{e=sNy%jaU1{I&D&4 znJugrf*Jw12+qFd$s0qcKYZG^+5`jFAsPi!1WtZxTA|jck+)s#D*Q7s2`LUSt>Z~1 zI#cgY_8HR!Y6;^*A}w?c8K;FDIMk6(WR|T$+_b97Q8`M#Pu1!h;n*vyTf3g=hlAa< z_3hQc?$XxwsCOFwBIjZc{=V<#jLf^zb$R$0P51PkBe0qpqHw+SSwLJjGx< zupTApKFu;qf>94mi-s||+eY&c4>w0|M8m+w#o;A#V`cC5QA&|8NH$5ATy5^w!=q$0 z?#l$;QJCr7!;qfI=h{Hbpk|nIxsQ{|t7cob7a7(5&87B0jAM+Y!E}aBj*&d`9M0Jw z=~Xcii(E-Ii3BTRN@)lm()Uto7ZJfaGg$pS(CYlInxQf~M2mwwIJ`(TJnYDu%AJU0 zLh8g7NMvMRvX`EJkBgMFAmoaj?&I^*MVGvVb|@xiQTzNQwXQm&PZ5TggECSLn~mp@ z%gs`{1^MZ#^Ny7XeS5LK6`j@Kyra6=06C+1xv+k3w@)KKZ?1B)#KQY>CZm#$=ccU( z&GNvXpP#;{sLbjlOEWF%M}h&(QehU}vv>J&^2#^tT^=3rlj%b{B?-PK&n2n=n5fr8 zAyniy(&~`GIUBOLJZ5A%DGPgXb4kk2A!irPZv+P{3HUQPapAMKkv*~R2p{0ew6xK57`ok2F8_M=VM_f3ZXJc1&i_Q4MMw253 zXr3DAcl3WgX{moI3HMBfEsEu77_ z?bPV`Ryh%u^Mm5n9|Y24%YlT?^EL;w&$xG#oYGp^X0uI>bkAG!Ld4-#;DddxA<&=+{A4$-F%;= z?jL5LHA7Mt3Tsb4BHLfmAr`0w3a@F?%Ii6wKWv}yE_blqtFGo{J%v-ijQ4S-1M$M% z1?~l%SF3DgHP*l)} z4(I&9%xmY~g`c$Z`}@I9dO0yJ^P7b>M$7RS<@Y+Hk)Hg<*D!>z*nO9p*K&7Z{Hk!3 zB0>ly!x@q?-|vh*U;BJ?XLSS$OCWJn4Y$;A=MXT%m&}Qv5a*NDUZ74_h=ZF#O%%5z zyy}6#gIE(XbUsOXAg_6kKDt`S7@}W!lc=d`iPZ@`}pLj@-Br>262|7j*-;ch}lX;?&+a| zU}{Zbv#I&@I$kBCe`*~tpH=J>&P#CI2^MP3bE<$2;?Un5Zj1)j2EZrzOm}UmF{>Oz zjXl(HfjiuX;d>UVTtf~}H(vZfktrydyC3`swXIVt7$+$x1*z9o$6nvi9CnmV$EE3X z7wc-ymD%A3JA=1?oP%=js{^;K+z$-yZeIio@?S@~^$a&VqdF&h2&1m;<#?l-yaysKT3!_ph| z39DpIv(OVp7{4VCZ)fXh1jOj>Xk^S2O^xcnO;`~;Dh*PKz3>pP^eEsD;1ymh{~eK# zop2CsC)Q3XB70jC)SI^>u=Al+_WVT%-4u|vh+VXIBwZstrN>+a0{lK$)%Wp*bF0c7X zpeBbWAY1x^{e<1fT#fEto!|Mv`K!S#g`w{6akTL#m3&eu#@{t5^1M>m(0^ey>%f;z zH`g~c>qpoTQ5X9+2kpMNwkFh9n|KZ+I?dcYH~0ttZ;5VjH0893&Pt$z!~Sb(gVk7D z?VD`pGqklby(#-1Tc}PMa4TCSbF0v$bJXYkdrSsut+7dfv4s=Wpwk$Px#sXYrh$+% zH9JL>ww~oYfSdZcdF2QT=8p(z_OYx8r z<#@nx2(=K+hjonL=V_ULD+ZVNLbH8qS7)6Sz#gg!ALV%fYUA>{IKPlXLErdx&go3M zJIzT2Bey7xlI~pOxNQxjbA{rSv`&dru@lDJt(!Ebi@0MreU-B^`;Mh1$Q5rEjEvhf zev}IKBDvVbm}th_aAn{gvTik2plmP9PrjgZ zZXdJ{fm*FdxSEpXr#MOiccJ>RJtR`0lgl_I$yZ?5DCo(-k%eZ=tnU1Oa|+BUFsHzr z0&@z?DKMwNoC0$S%qcLZz?=ee3d|`mr@)*7a|+BUFsH!(rxX}=U~)Y476$HBqD#43 z7e>t)YQ6$a?ewKd1^Xm#2lHc2Ws4T~TH{ueJ1w@|x7v0^cM5DZUfr{eP9<&u&ocl4 zz7uz7!4}?DkQ}G%2PpH)7ED@yo&dLDjW)vP0i(2f!<7!6-c%K_m@OGFc<3W)e}S3& z{BBrV>th_dCP5l`!cR;3*&}x_PTS{pQ~{rooEn1w*5Y;oph)Qu9OT=i%SgvV9y|$c z4ksjKh>uw?NXp<2DJpDMNurnC0FpW{P>V2Cf$=I--y2?@;sIYD--91t8G$`b?=M1> zZ?tJJKfosb`Mb-9q;qa2lXkuNv&_h8n`HdpnWPq|uW_ z3_7qSq5q;B_JU6O9aSnP=?VSpeb*K(T&h>w33achZ%Mmc;(_!Msi9O?`2f>{vNy(I z5Y1rDxFK}NfhSjn6f!;a5YBK&a^H4uF2S7$08Pr-!&|^q-CW>cw^{-bcG}p!OAEtl zX$C5~I`FYpgQV)Q2EA0E=F;Rk488%>n`-mikR$Gx2A20{MKRhLKop1<|Kx?woj)z1Y6PG_^yoE*bxkY!_R#PaF zfs`uSL6+(!*v-CA*8x8dhWcBh;7l9Hf^c=dw2Nc$xikC za(hrf{aO@c-9RAu=JMwC>%x;P8@bzF+uo*o1<_+x&H4si+Kz>}MXng%JLn!u&U)%y zzymae3a`#Yx$YM}AMI?ct<(2sVCaS#5k8Sv)Yat3)Wb}}VbOSGl^zhimA#!kV?CVdTf(l>I@+yYRz5f8EI7$*f&?lf9I7S7Of7h>$mL1iB|;@WX}0nPyfAHh zjLgXUZ@~YSw)X6EweSs}k9US^o1>lou$yl{m6E-_@N2*Le6S+8 z$8^Vq-|)e+wcQc9+k=(0C*$3P-}1@w&fW^0(izvn&eqnG@z(ZW_s{l7RQsa$`Dk+) zMj=OG35FT%{@y_#qW88*bE(ui^Xd@1?zh^>q<@f62etv2zRCMaEkPIrh{2DbZtF(q z_XKJtsL7n6J3(P)-*7#t15v0j$T24W4qjw4uL)?2C>?jv<=;yb*AXBTNugE_Nar>< zwRJFZubxc4xqfC_H3xNWzrAsvnRI3 zCGrIu6~vdW3UHY7rCVU3fQ)ie)rT|}a9OhMkhpynR1rb)0$j#z15~H*N=Qwt7kc!c z4mVeZyH807N~{?u^vcfg^W+9qa)4|-{RjyY$j|Mf2X$#qeEZ*Rl94auc)Yky6BV}%EB^K0y%y%}}g`1u8*8Zwo|Zmd0S+B04lEmDzU$Fg0iDtowOw#=^Ru6!mFoflDhRRzdS5kc z(GW(1$Z+$cOVap-7ks!&X^({ZSE?|UXTHe#)dEF;g49Lg@g^S#b^y*r z-YE$(0FaQs&+P>BWM@PTrDugyM64GS{vo@hlszokOLZhx47l+Ou4lSe7xEiySRm0J zLUmB}8L-afE^+-d#Df5|BM+uMbc8#ud}c`cu_avpEQ>7#&3S-tT;OS=64T78Skt$uy3Z!4hwk6nUS!7{n|DP z7$I&3gU_C6D`JLMKr^o_azObFA?8A-y%O;Pe#8&d`CUUJ;JAk;$0R&ks04=Q_WM>t z=N0xN>ihT<;|yF2fNhe(U<@(AY}YeN9l^=!QQ#bD#GibFwW;g8Y5)sYQanS22x?S7%I zPK6`zSL)gt2c{_71~I-qdNN$Ix#IS5?*c@*|7D%KGE|_Wd#`UBroS_Duq}46KzlSh zr}Wz;hu$017`s|4gzY?k*m5ArKdqry`uEKIX5vA9i@~byAEFIBay)Lt1{t^<* z9MH<%cyHb)0>%`w5ZnXc;Gwarbx^WeoGwuF=(oy~_;wpr(UI&b@&D67Hd2DFMN%`y z65?#EROJY30>L+ur@c#a_2L>ORVN^K zJlSHeyXtDS6}Wz8^_MMaaDEZ_UmUPDc)AH_a>ViF`PhR=RyH{RTzgpw+N~s!17;YM zM8ZCbaY=E(&?c`~+Wikl0kx_`>wbN8=AhYS+J|(fA1g} zR*F?k7fIG_Qz}*_F(UpTFJXV_AUh&=OhJ9gDGz(`<$a&WhR*Hy?X~R5tE*Hyy3aOZ zcTnz82rS@hSOs~7aR%UA6H~*?;tv=#oVtP1R&Pvro&&4!bsKzEDh8RPejU+hEgP)- ztyjwOB)384>daRLOqs!emtO;{Ctov&cIOl-afhx6ULGHm$D_rqXYtLE9Q2$qc|WN% zq|EmDB~1594o)R)!o0p_P?!PLhStYIu@0gd{j3`v_B*6F>_7WJz^VoHX&| z`Kb)_mJRalbSOpw;I%9^mjIDrQ7yPG#b#7^^$7cwgG$EP`tlV@bCH7+ncgsiu9D(# zgxUobfEB$*S36^rR$yHVPz zK-Pkj+nTzS*?7(yRo0c6imHD9P*MP0d3asA6PdwT4Ti2XmsaJ5mlm(5s-JCx74P?^ zk-R#8L81%X8G(h2=U|TrD=9+ZE!B~(TzJT24YGYu-v_+|^SV&R&hqBs9uuQ%cX~Er zK2iTMPPD?Z^RSs}QZv%DIJ(tlkg16gu&k7%u!3hD&EoA~{8GY{eA>@Bn974LBH~?4 z5uvCia>z{+^dIc)JgJfp__iX1}Dxm6acySI`;xPttItuM^cPfNRHBDJMJ}Y8;y}Uf3RdVZwTqTBQL~l5}CA&EVwk=OOIDfB(PJ3H} zKz#mgVTQ@y_G;Tok8E68o+B<17f9Vm)|seS>e7|xtlZIrFZRhAD_!rhm`_0(`n1M@ z#c6h_sWjVlh9oXrx>peiPOR>NYainRuRVd#45tg5g2YRBS^;gIU-{av35=%%?-v-fhq zE$-H3?8YYI35gwg$OsQuMitM}zIk!P(;n*B?amTfvVjA8qlnTVGJm_u3>DoD(FGrur|>?zdj7(Tu97`;_Kf z8m=#`?QO6d(A2H6R4Y0)n_jtxhFlu%Fzyep94)s^sJug96(d(>=52pE3hK-4Y>h|A zqwY0Vy;c}4Y65vgAZg~yR-FqfJ$BkFgc7<&vK%o()W4^d?X8{XE4s6%aqL$A850x( zlB7ww)x||zm_B_v`3na7YJxNV`uqTA8_RL5Nstl@F##xolptDlqn$Yz#Mcii+9voM zPtO^}rcto}4|{JP9M^T8c{T__CM{Z)C4a_FhMpvonMq7pPS)#q;yAJ_JIE*vP&N`L z8xM<;XiK(C$t0DHv)Sqf&>&g_&@j4TimK7pHh=~Q3qT|I5Cv_Pnc4AVlWgrI`D1rB zl|N>;im`;6^;Tu8SeBf4qy0Vaxwp}v>3mG3GL@MJ5=nI5d(S=RIq!MTd)`ktN~cEh z(4LtAe5N-!%V%0wl~f-YmB^LN2=Q zlrA3xv`8-VU!a#doXRz8(MsB45fCuOP~o%7G>|q?>^GIM5bz>9FBUhcnFe0fE}oVN zLBSF?ldQnxhh&FnoOnXEp71N+u*GA`&HFJYjNVFCui z{?SBSW9!NXdxu%x1`yNn}-)n7lP4mC=+fGf1~NfGM|({_`0$)FPOrQ~){)p=2Lf z*d#4Hf{CO`Os#r8i?}3PG`SHXBLXK%RvLmmfq%*(may*BL!eV#uemyKu{<+cVbQaT ztSn?gaOC~Z0+k~du0)nC#NMz9kP#WaD^xY*q7D*aDW45o9|?*G(}@Wp=9wOVV~ZvN zQMHuECFsjNB6MC0>`M{1oRKop0C9`BX>gdrU><3n$fZM52=?R^kPRrdlAs*K=cb|> z)vswXLJI~EW?u?59l%J82?-8TPR4>DLRrMpu{~f(5?IomVSWm+z9Wgpc}9$3H8hq) z8pj5fioH{0o1HTB$m9)Cf+>_$U#ZSiN2^$|ki;G0(Le5vnPlO$bblq(NfiZ31bim^Sm3W57vuC)8JXAbbYF|bIW|7mL zZlz`J;xl(Vz+q6Fm7VUqN~kv~6>>TDXrSu8mKA^H0gHj~<#M5ziuy{n z5r~#Iz(rv1-;w4LWtHOB5yI0-mE{)&aAjnMTd62FH9;d=SUr*8^bQVaNX|HPpe^XA6-eWojC+^~hszTakiI0U zu5%4Z%d?K_dRUBTfo7FfKIw4QLe`ru@1jL7@>X^RFOzl!cMWP|k(Y#CEvDH59Di ziUg>ahDM4c1b^(BP@dl`{po-*!bP;YlHgY4v!`!# z5g(Q;+Xs$g5l^1<;JYP6(xH7lm%25V=`pg0;~k^XNj9XP3{(m4={d^VFf++PLkIpL zaYU_Jfq*0#sZe67$i5lwcECk$KF)s&N#`%~E1%XO^fKC$4ie#g1b@EHy>f~INobN(t z{I_A7EjEgjL5%z}YhRVr8z-5t+9u_*QriU`DvzJCeaPpmz09`BU>8!VsG&|(A4$+D zk4e~TLUvGMc0^!0D#t{5fMs%HqH5eStxZewy=#r`t4Gtj6#T^-5FVQk7OL+~aRd#QHAbT5-< za;Y5(7kat>64itiS5*PR(E?}Vq({c74&`_hiAm-1u#QPPEhTVhkUMJL>tTf1tFN}_ zE{nk_t9%zP2|v@YZqd*{cRe+!p;O0Dijy@v($(rA1`C5e756~jKf%$qDmO)sr5)S%j@Ni_0mA)1@6QGNdP1M zTPo`m76d$tUci3eypma!`4yL_mvBqM5R*4fBgw@|Zhi9POzv`Ilt=%cd{%~3JSe>W z00z%^J@R!q4n}}J@1p_DzT#Tt;~&;x*~*iEoHr*ixEb; z3)oBG&nls~0e(agoy)gM#Lu)7_j5e5CL{w>`eq=NR!Hum*tyz38m<&CD-(BkXv(Xd z(GrK0B1}ZOddJ2xDb*ooLH8Y)9~X#OKy&7n8Pk=#GV!<`qTbUyzL21~n0$-_H1LwO z97o{Je5P5Hdo*5Qm?%jCp($m}XF23!ktaKwR=Bw4@*+NPaxF=*o|usHIuLTYZRH*? z^@-ZW>DmP%<;R0J6Azib7?@KytYVD9F9^DW&a-QbJ*9w9=nw!bwd5R@CCyI^iPqxn zva*I>b7p%N>BxeAeF#TuSaMddxU21`{j|K6r3=Y@AG)0+7{0tB>V)|ql4^KDNfxl>59|x8(#||moti2SmuF)4 zhyo1DVuayo6k7*01s@T24gaE!-I}Nl{D|1k*#a2q7Hfo^0H2oO*_o-*c%`g>>lBcH zx8epd)3`%)Ela!@6e}-&`IXuPm4$1`u8d#9Se07C^ts;9!qDQPXjVicr0|T+Mk05A zx$%e%%1ePAuB*m(h5)m&?+v&?iIovAr>2L#vo0$uis?+zr^x`G_G~yo8lgl9cI3Z6 zc=^_!?+Gt^qaoZS*bO}mrnI2~bDdmF$0<`fGf64}oM-W8ovuw?YT!^3p$U*u_-KH$ zHlKaonC#61Sq_iP4=_kdVhWx*$$=)KTI2!?3lc-a?ITz+B_qe%aCL5szo5=B0${=| znl9oe8Zsu{i1Rq~;9^g4J>gjtCS zwK0?aC<~}*v#P=&{9=S+O{(mKuB&(kAE1La$p`2T>sPT`j5F1%qJ`XxMARJKe<9t( zb}f&XPB3PJ=fF|>vmBsSveJzN5UPFdgG}M7fk^Tx8LIw$5k<&j z!K%o!0P6;+c7-md%W9Afh3ej!TU4iVRB|W7yD!%A965>-4r$v=WfbK=$t2)pq`hWg zAZs%SlOu&lTp|s7ydn{*cx6WQA+F=aOr@_&lZeweJ8D1?ScmA47jKD4x$+`%SOyAx zo+Y*=M+@IiR$t(l$UHn^r{GbI@i=>KBM(xyl3{gv$s=|q3MwkvLp*bFB`D*kQ|I3bC6c|M)PaFw0Ee2tI_{n6T9RrIq`VYOFE4f!&roEKz+VOCh< zc!T0vrqM2LD@JY4jjt=u+`cyDBACL@BVt;i#?8`Xr9lisZIYxEykSdJ7}1(3CW2~p zIjn?GJ&$2hkzHG*2o-*oo13I5cv+#=;WPU!P6bQh(M=#8D?TxP7}`*IrcoW4ovK|g zJyV_@t<__(O_EiQlqB&iu44F~vOD08x&@D7>20rR1SIl;B8l`u1jd>7h4mGM0zpS~ zoB738Q|Beg(Ib_aSsarIzg6n1XXE7qv`45!Qu}$fD<|K^0yL@`9ISjYT;%a%qs?A=|jp%}8F%4hPLl z#*a!_Gp*PzNq2+TGnsOBq|-j9D<(yc#zI{o+sIJvU0MedF`&zAwPb+Pxky=SU{kRR z;rFV|3mzCAl&O0sE!nfrp3%0VsCOlyFHU%~Pl@ z^7H(2_~=7>9ri>pBCe41itq?JpTbL&O(DeHr?cQE1x)DV)J_sZ(q)9EV2dz1R*N8K zgCaaDo?|LEn)H|qV1dX@cBOJQfyv`Pc}T~z5ZfY2Y(h6znW#3%Pg0wm5ql+kWL|kQ zA_rgc0M`-?{4(K{U>EWNrI4eT;+uf zV%r2nt}I?t*+o|00$J#IYl?f5@Hn)Hdu}$lOndj!5-uW(;3~DX=1X~;&NvOnHxR#k zlG7bfnfi8vq#MV9rA-XU<~8>0dH28znKT>BU@BUHC6^oJ;+c zzT~A85~qc#s2JwqdA3T9J`p}1{Dt!ZGCd^}Q_3r9DhDqdfa_%WjrOH^%Cw?P%KpuA zUryF89L_gZ@)!Kj*lFOM16>+y-0rw_YKiBAIyzLu!-r zlwYeNIXWU)2>)(qBqm5z$hB;CVsCwE4;TPL)+2RG=xd0Kg*8e$5$h6Y;RNgv7WOU|m?M@<-%(X^2#6 z6l7EAoFYDy;Ot7X+0=WlAoiCxHi%dx_bHNjqzYh5p>jNL5&t5U5kZuB@H1Hhq-Tv$vKRM4=n zLJ_Gwov0k>YCs%I4`{ur-w5|nU0XYgPN1nyL9H#(4wQqtNo2#O1rC}N3zeo^UPmES5t`19PZ zS)dNj5>u_6<>gXcv1yT9;HhoYgf9=gLWHrD*eN$frVtjH5<)1&r!*Z(3x#qBaa&=T zMB8aY)CE{FZ9x+$IyR3+3iWqDz!N-sNj#;#wLLc{>6Pz@SmK3^oEJyS*$VD7yd9g# z`sNNM7x=GIa0JSPh_Mg>2d;;;1OrW^dD3nyaK@_V#~Wl)8XB!V6{o%SqU8P%QUX@J zl~7LvmTYhctn(WPW3eMCscI_Km@D1VG@yQh$*}_>7(WM-XAnc<)drL?QK^I~B(F@# zUF$l7td-Uky1RFym_K(8?Vh(aYVuP&vP=a$jxfi}MMk3K=bI~nIW}+I zl);j+h_cV2WFs4BB#_R+7A1jjG$h_8l>O3_Ngty)4pQn7?3c_7a7PY2x|xWp*m(k# zYru)nq~kfke{_S}H__E(<{;U!w4h|xiJ1vGg zze%EIG(VUtLln{6@3j@VaZ)rLQMY>c#Q&Gl5oyF)%~`2nF#wL~tg~c86UQJ(m0W0S zpR5T@69HNZ#8Vt{ZmfI?O;_k>;rM93(rl_N7Eyahwis+GHo${eu?#*tqe5BpqV z8S2MA3nys`zn#Jy`9;uDcK#v>NVS_u7evYvtrX(zhH_-Cz%eB{aoh}ZaF*97*5%&m zGD7r}dX;r9;ps1uE3?FLNr9%^nmIkDm-8Yi++;`5racdb80+Sx13Dn;NZiRhly^08 zT4sreU1BL?XNGc9C2B3e$Uv4w=q|(7(;8za)7^aHI)#u)tBM$zmXu@zvfTX!r~f#; z&7r=Kc_h|!CmldGDuD{@Vp3vBq?b+WpsL#9v1fq~Z-gPHxVJ>Q@G~|Q66=r!i-evm z-qx>gV~I=oXrb1$;248sHOy-mJ%Xg5cbVC9k(b2Fu~6w;o}Uk`%sg5eSOWKAR1!-a zjXi_u+g@W^P`z1ZJ+geHGp4vnoEpT7Tbs=*pckcnbD)Bz7g=LT9A2WhJ9;kdUCLy{ z8xo-kFxh?Sc2fT7#Kq`zbWlC$B!siHFNsyfGs;4yoEKRcHpoPUVD_ENgo?pM+$Rq7oyFlnd}NWE?F`SjBQmPLh;7)|d>P z<XOj!gCI7$sC^S*$+JMmnK|Hk2pQp+#(H;0i|_77rzf zIq$58)=3f-Yn^jqN)521Ll_dTtgHh}B+%lLk_4ceWwLLuEV2U^BOOqMak|#Yn6FS^ zSVAX#a58F06cMMGo*tN;PKgF&eqncHcrhyVHuH|r_5!xtEX88SaHR!0S$;apI=+Ja z3IlsE6;U9O+{#HllyZ{OTKI3!6gBHv&}p3xDSr*kq_pCisCg!QWhYT1oAd?+oTZdp zM3j{eQMMqnknBjkR+{FVL%QB68QMZ0LRTZZy8>W!MtS9xG2Rh;K}wRX%V=u1*p5;x zZ%Pvxjv?X~$wfq#&U$rXdK_qX)h})LoK;0dSw?&4FqAb}#zBlMUCF6Pp_Sx-uj$QfuA~p)h|1Vx1c zv}{<)Bx;GBvEXB-ua?NXz@bWFm3Z_bKz5E95q7;BnRb=h9pcUenxQ`#Jn-MY_O-%p zsdhn~%e0g-Wnq5FR}k;ea+OFGQYcA<#CSPdlfXC2D+xls2~6k(3GUain_h$*!S(PR zNw!Evn)I5n>{nKJXprMOdhvL8wH7oRd|GQ~DjtoIEa0%Lv7Jf5O*2zWo8mKRx z4$hG&FL+hR`SdJrgix=>_?V`bqZ#4(5= zl;>cFyfUP1mRcgF)EtrPN)4Kc;zOy?PsNK^HfRN7mFG$K(&coz9n?)KtPW3-JRG1( zHM>^&)94LsbQB)Q5tFaNl>&<^`dF|HVJFt1I6$;YKVP|CdR3g8C4zRNG~MQW#4lt8 z*SOP&a@}${Zu?YWoTN}4->cLc<+O_TDyv{umWIxTIRaBqK0WmR=qTasy*7HAy6s8G6@9I-8;Q6hRC6AD0^nm zT!`YGBn1r#+&qFZ6%Qhm2^-Jrm{2DmJffYg~H60vr*d0m^TPInT1Hu+Z^B9uV9B5URf98Gi9$ez*h zhXV=1UszG-71mzZgrqa2MLwkT3^U7{-T4m7jL-?t~40eMeJ2VFZkT z5ikNqzz7%tBVYuKfDtePM!*Od0V7}pjDQg^0)MLrbd2D3}~0)E8QETbX}R+NFTjT7l0nOk66^j459rkbOY~pRrEMwnGaKT*XQy8vFUeC-#1A;G2WtH?oW4teBE% zLoQJjR0J4qf$EbC)x;36Y~5h3M+*{47B&EB4MTL)E(g2PQ9e$W{Xc?GUDd`9-7{+!j`Y@1uT)c zyS1^7vt2Xg(vbNN&%@dUQK~$NaI3G(Ojj#m|5|I~6QmT?;iNTmu~HeGs9>gU;gUpH zAIwPha~bpSWFaQDTF3paE(cLsA}Kyq@zxgBo0+EoR!u6otWv04C5QBaFn5#NoY01O zmbd&xS~5sSoC$8FSnIGW;!`s)UAaiVqUHjAlASUz5%)sRarR2papf|lawU6Z8pbF< zUvJQ;<}%pKQX9)))c*^nC0`5Xh5xZ^KMy|g&Bc65xnCY42}ne?$=fg}p;IDL&WOC4 z+%0RGIysKY=|Od5o2wc6P0AkDE=oIDBRs#$FF0K0SmbW?g?nT^0pR%Xmm|gxBI5WN~MxuY^!<1?tIhJ=$Pe<3`NQ}`|nbF}hw7Il=?nn;f7^q@D}*_uEJq^u<&B}~+C}=tYM*N0 zfH^&lqnlE7tW&W@!3fjS*JbF>80nTa`7FMf{W1O4*#q~XlJ*AQruhJ{dS1n;9)_>*Yr^v)C@6yE9bQ&)GW z_Pf3jHKLQ}ogBL&HBz9iod&XmfiB_F9(&cL2vg|9-;ZL#8+{OZ%Y`D?FrFy zuciax5kq6F92R?$c#?N;#z~PM1CwBV*Wp_%F5t|+F3q&&cP9T!u|0hKCGPt(>^jp*M>Y(dX)kTT|#Y_i3)b!KO<^qwujFNI`V!-PJ zkc&+~@8eerkz(}%x2t^7C^XxDGd`2XL`Gmg+xjj@rMnT64M1sAe#fO zXbeC?W(G7Af#adhG!YRfKRw>GF|@-XP7!*Pl8;G8NWcNVt!UDLIbP1>(n{>$5e<_& zpGWoAkaH9ti^m%Nq<c6qlVewd9+y($gwv~+P&i#R_S!dP+FXRbmXRNWe)?+Dw^ zBAFlyV5ggm0m#-R0Olc1B?N{ce7Sbc0LNR_aMoQ?PtEqR*p4K-^v6oYh`SLQzD)rxNvuS412DWZD(8 zNZnYeL{0J{(oYe0mfWk`bI->v8LY6&XIP>~D!Q5E+g16#BTC@p%8spQv6qh%c9cTQ z5(iUY1zx6d!sD>H&GB(B!b3Y~r6DJ6;jS!QaQv4CW;uIt{-}-&*J_h5r&38exnwsC z$pIFZX2?r!{LE~6Fbi@SP&xw8L1BWLVwvz+MT?Ykc@I4 zY_7H2FD7X{zrrDVrQKBEUp~!}<@2iw!(@%f9X({H?E8TTuYxzEz^WuxrFa3@Z0vvt zaSQO7kxNKd3=#5<&6vf((f2avlSp#NM@3K!i4!a=r$bXi{Dc4Vv=fw1{tEf6#@pm+ zn?nl8xOZ%9(q%x`;!&9}mA2CqRj;tt)pf<|Nn+xh7m>Ui&QvxDx6zRQJ5}D9)clok zQY6xPQd}%#x9da0E0k&~Z*Me*IGMzP*d!~!4WjTgqO0h=G+ZLgj@@ivVLQUmI%yCn zexWqI6jm}cT)j{!)yHeoH+D5-2qeVL z-aA>XH!j8AONn>NQ6gFoOtv;iFCu9xld^K22xB-uUaL1$E;1AS*sT+&18g(!>y>56 zAe%AMWCr6u@$uNY2H?tK9IzPza22smuZh4-q?tUjTN{MrA-su!bHG&>HPJ-h|*C+&0Vh17A!ni392SP{u1zfN)Y;pzR4racWd&D`|`xbaqM! z^h(p)8ysMU8jJ#|3>J`rBe|MXk^tq)#SkRih_{YCy<0W>*gU9U2h<9+AMC` zm6^2pMj=3D2aAkWOwTqnMC?HfZAJ&C3bIHS5)%2@Hqb7$P&Q^71^STE@ zO+^%JF4l*4J4eyI7Iu$E(YP+%Y5rQBJjBo#8R!P7L(bH;1w87mqGIAZDzvp9b!M;ged3^6Ak&;$w6ZEMAn|BXm+Fd(+}hkbzRc8S8y)Gr$Ad7e!Qw`RM z+2MgQQfEM`yk!Jo1vx+hd(YkcbTiS|#Zq#<5==G{r7CKmG*BjI0@@_W2zyPC{cpH7 zBQ=$zc}@WrYGY$4I>nswER9JJAn_>FtaCq!Gg4MRoe4vannL`z8cOMoHQc6 zi!>h63a4|A64nfbkpUKZh3!`T(R6gxNY>rtPKqP0gz9;YTvtovVkGwfG}UGdlGT$$ zGr+-ttvjeL73qePMpz|+YDC?nwK5;8O?xs2kG;b3C`Vt6oYdn;`EUn_R~xpJfhg`` zugH^_MrbU&gu{$Z-J&lRlu~D=BO0Seo?Z;i@xX#|+Y0wNNzz^V%M_`T6qv6NB142G zn?}7h))=l;Cn}?)9bO~yL+4G+z9MI2Sd(@l?Pd9L%ksj2h*aGnZmsLM$%4x9g{ULZ zPcFGIznoAJ9To=Gn;dvVco)gYF|H{l@rg2m0XzCxwBB4Aug*-ccLGCIHh=}PmPlP) zZ;+&f_jVqCwluRmw~U5ij$Se}DJc~lqh7JPvn(Xa{&<1)654fUU!ruZkxBy)CsTqMMqI=;l7~&d*XDyQDm$yHfniNS5jO;sn69oaG=TqJ1k6OGUs5-9)t+ zqF$C>@UM&#+Ko+;g=uLlL1D6=WUFgvdZzkJ1>KNn_B`sDB){xi^TL&2=N%$G(Y%FH zLcyPF*S6P%Ouo&lS~z4t+;7wy7uR?Rp#$}3;H}jnVVZ+ku3zD93;}E=>4~UNt^-(; zvazTr*F^7e_6$*ha}?H{dD0%%V0B3r29q2gurW^~IC5VXC?S7co4pn)+r3K~eU>%)Dm9!ZnTx<}n*NSf>y>ECnod-pzEA|Dlb;fzGH3 zRObjm>b3mcI!7v#HW>vu(Jp8nSb*vU`Q)YJiY42*eWE-)Q?4H`?_Ss~@5UAsjuN>Z zgX2->)*5U2QlmmY14wl*!u>gz$rC~q7m|jb?4Ob4uk+-E^6+e<_Sbqajzd~e5tJWC zX$Ahq*ZH;{mWVt9s{|}o&H`l}_*apOS|U2dl9g2o5v}G0OxjqYwU*{VXA4`h0>IZ6 zwh0l$fP;L&e$IE9*sToAY#M0EuoomLl4m>buhu8ZQ=@TM8H=2;I;DuM4)dG{Wwf;k zFUlx1%;Gmb`yDiy63PbYkYo7TcuK8GMza_53`mIV+MTjUYnhf`8W4+9<^tBqaIIcX zt5)X$WLorV5__T3$VsbPGo8KIP};Wg3nQlqEEc zJ}Kq$4EzUmKbb|AC*3v`OQN?hvM& zC98_m8#g@t9qS=Wj}Z$Z%hLrP?at>y2lfdLW3v+zkx5-1T2g07yk1^O3tQq;I`jlz z)B;zACK4S;J_98Lz{uX6pA@d9GBGd-6rti7Ovt|1Nhfh0<9#C-I|c%3%)mfaky*rh zn3E8dA^`--9PI`yKpjP8FO+KX+E)A8p6Q$RJ4y>ILSvYX$c0>;80ApI*hdl!jSZS_M=_h}pp=RG)HHzOEMht5TKNh*ftTf0-jwAh6Kq~CDf+$L zMpwWs${a)H%J8{iRkrmsGnW}92YdeL_mi_&)*GDjGWRi+XIa|>b?HkurG|Y+zDb|@ zZg(iZG+f|n+!RVB*>T7awS`tbCA`XvJ`$7S)jAY}cNrqIAWu+Ad|j@}EhhU8DNl=BYyjCZO<3uZ z17i~$?01h(wXf*J7i^FDg7+d^Zo}Xbc=_o*>9Ve9Vz$@geG*i&+5aRih-!=xjz|I? z7(CGW-~UyC$+^V2vP7QLNeaQILn6Sy)X$14nCMg&|#!!#E%2o{U|kI0vZ zRk+S33s>OX962})PEU&`L|Q?rD`gdKLP?4)h21)?55)DoEDYq8Ak8n+HZ4ZJ+I)c# zz*X^h?0lV7SCac8O^Bv=xmwgW!_XR!NGqf?*!#X%D~;f%u>) zPX2-^ZHdHPG_NTO;g-DV!ecKbyGVSclf@!6M>oQQ@ByV6;c4Y_5}e_crrk(KWzDEo z$KD+}<;Awl<`Up|u{ z`hC8t%J3dBxOhon(oPy&d>@mc5hI1{JnaqY(PD*_@>X{x-G4aVW>266tv%P=QAqdN znv(zWUbOYn7Dw@sO&L4T_p7X$w9a>ubs$+DzK>#e^b`ACSJYIxL$=nnwdV17DqIqH zgiAc~5|PwcUMN39tS^3dD`7U5)mYV*Wh{`+I^KidREn}%l393-;KcCR?1cS*BB3-= zNUuF7FP5s*)p%iH+e`0CUU6vd!~IMn!~2ZjkO;!gm(egCLgn%7d{$269Yz(r{<^65M3=2@+E=!R@d6=lx z*6}=>f9^J>p+-G2-HP`B6^Wv=FA-9m&8{AYB=&WGj~4Lwn$kf-MtayG-(i5 zsz)R1dFnFJMJk0gE)y&!jxL~IQmLy%8@NMsM`Gz&P!CfAaZP(!!bfHs88KeQK?>3m zb*ERxrN4-_AjDh6ZPtp-4Qg9mix~UM%L}dRMIx>Vt0pIN1mCw8`$=6+T3Th*Uu~~Y zgRZ#Je4c`Pi=}T}|MoY(SzKsQ^rf|Vf@;kKl2f!(k>IKixw2DK5l1DM&a$b~wn`E! z0RC!!RR#6q1cy48ZhU;6)qyeVzgr3*;MZ(iJ`GVZ{szb4{ zThzNL49@Smsh?`4YZUn9O}uZTRa~cx=>`>3bg{VEny1#ix4IveG zah{5^DIYUcM4FpL)zKx}@hXYxsY2FYjV@}4N|0S#R4oe<15ig`d9654^=(zx;%ZZ% zRGKtCx4lH?*NPMu+uWonUE3w2b5RNS84IP5C>2h>$*4}jA}WG&f0N6UbEUFuD+2P1 z6j|ZfWtF*FYti)V<~HeQcgTaF4$ypzQUx~1&%ax&MBO%JqgI0ZwSHyy&x0mcDaE8 zMv*g$gS2+87UxKtkW)x~yfQJNDrO{1*eWvDWaXwjju6~x7xUT-%Avlz($D3nt|5#- zp%_WQsr5xB@~fql*5X!Cx#3Hj^Bc`|y@1LbQI8MASLSFjC@wNJsLseHqzj3tQe~EI zd$XUGsS2Qc!mVPeWJoFp2BsRGdL6SuB^mHtX)Wmu6D?|}lK+>9qm>u~cLg!D=czwL zKKjk;JlN6-iHAvTzu6x-vsEuhX*GgultX!Wjk10`PGc;^%F~te=gB%y3H(JEYt*=7 zDXx)@xY&AuwWrh!u~wT!l@}y`d3)`uD5*c{dMZ1+s(PuYDP+F3No{eOSM~?`Qe2@h z84GBwwMv;aUQ(kdE2}yq5D0mr)LL4CbOJ`|d9!#a`*^)Sh=mGT^UtxUmzsQplt3Ys zl_^5*n^#~YYO@^0szvS8>t5NqyaR^`YA1OJYn`>QQ=|$_6bsm1?@u-17*(qE23aaC zGBu~RS4EUr6^2C;{ZoN2Iz6k}s*E%0AE`>VXqhLJYnc(Mh%xiGO6Bi)^_%)o%>||& z+>432qvtEC%Uk4K+_JnuE_M}8R`=<06flLdDHj{`6KsOYC(!-IoU&y{5A@RhNbsC^ z5H}?oVnsI*BPf|b^0Q3>#2x>-$NeN+t}l{C!k(!08EmkRYfg#a; zQL#!ZMj5O<7_agqC00N^u>x^NYS6%`Vo-qTIupO%(6dj z(-=g&MW%llHbt35Dpxg&B=%SqD2ppQkf|`=tCkWBQ8lDXTG!W#m)R5`j^>K$t}^(3 zRsn^Sa)^pr8%k@xlT~*uHs{GC4+SvsQQGLcHJ`ZoLXmozD)Ghb>&?xr;E_U$5*piE zJG(_jK#5(J)e>EX_ORqXW9=up4Sp77qI0%Yj6~w>9Mm;~^!sBgi83m% z=#r{{6(MD^>SVO3oGPr`Sg)z5#}x>K7tH`VAf`)eV&C*(Wns58zP$wJVlh&gQk5#i z-NZNdc5t?6l`R$8EPhqBFH&tSRa#^rscXETDn`dlvS3Ju0|l(BP^fl3)+#Fzt`$Y3 z^8N4m?G+NJOGtp*(X))nK=gWEYnVj$YcxE%LA|tK2rNZa&R~4n{>tzv)q$W8O_34@ zv0qRsX{Vp+UyK@u>CfHHwHr32={~W^p-=1kt$!C%<5(|apr+%+7Bg;!vHCmoey$nK% zRkH{`-hxYPuI%)0Xx9O4$t7!$3`}-yK_n%v&h{1XrfpfRQU-UMnstdMM*bZ3;Z14~ zQ3r3K7z?BHRjMG0l7SPkLm7}%pdy5mqEbXfH6RHf#Y_MpKMuX2c{23?*dnV~thPvz zM(R5YRwxjTpzT0&M4=Ugq0Q_4+#K8ArWTEQoJu+efXW8Nj0WY=G(8YKz&_{N3&>MY z6TQ{M$0)QGib$j4@!BXLkp4|LJ==OrV5@npcm+8@tY?$%a3kcX@;+(1R-qk@;47*) zm2+DbT((tH|AXo;?TxhXQ<;nA20UwRp?{7l4thtd3x-IIJ(%8R6w*s1NnyU2(jcc0 zH$oahY?CxV4lHr4*oTBpj4wFnnq-i09xEa4oTE4t`D;f$)1;~lxOV!Dg{C7 zW%6*X@^T8{s(d{%AH>KdF$CsB&ynS}>aP{Rwbj2%s0Q6lSR>CfPI$Vtdgl1(5J+EYoT;<`la z;5fXCktEinRw;3~Dp(-ec}n(Duwngjlf6Lupo$*GTm|@|pnm$a%?3az+Jz|6So|ub z6X7yU2m>mnQY&*iv^+!g+D&>$6&U)v4rS39?XR)VsgnF=5=O-`+j9tz^DC_m-WsAB zWEfF9FRg^lB6X+Jjvt`sXNpow+ylZ4#ucQlrJy=ly}r>K%% zY%t;rd5MEs9-&7%Fs$B)@2%vEu zq+NIsEg^siW=?aWYP|)nz-GO%vAxcgO<&kCHDz>M!kEe(@kxuSe^bYuj0v!~S$>@E zBtpa@r&$gVZ3;pmP%NnF5J#EtCdAHOpQJL$;|S$zOSHhzXQRzAG=vl?z3GS+`}QUR z;?`w0*=QNzVWWw-Pha4gDg-6T3!ai*q7DNpOl570M^gSUwgJTd=zLLC6D69ishlUH zht}y@vE(wU76(xsfC1L37rtDTydT=z2eFmv|3vpR8o|tkj zyY^?YtH>uE2^V(OnlKnv2Bn>OUCvO!XitucMw=_7l7p00KPy3lEZn9L6U%c+1;l~@ zwbrz*V$Wc(Qo$e!ZY;tS=!*FNl9()FHl3epQ$xLT;xDSCP+F_mnLj(#OB5kLAVchr zYRdx&opf!F|W62o{l5-Y_HRL*V!a$4KYvYEg@aTu9#|mOJs|+ zCGH{|gKfY>SmA7=ETbrar=6sOeYRqFO(mbjQk+(~oqa_LqBx6a-X)MPu+ku5+Us9c zbz(T2cnAfi&}N9J1zW7jHOPV`q^TDtZLm-!Hn8{W{W{iVB2?@k;;TR>y$U3h>4|b# z3OY=U^BSEnX;8m9tybgQ@{K|Hp$Y&!*5Ns#Qgh&Phk`a{h_-7J8P9aDv| z;yjkCHelH7PT77;=MxuYtRehv0!%Ek09e`tL}Io`WJDxpM9##(`CHpeTIWI59Ud({ z8d@5WrjXgB5-gQJ7g2M?32rUq9rhO0GG$Ih>lo60w78rAF;+;O@MR`2zK>dv zMG9&q5k}>-+Z!y6IF99D_G|y(4$`iMw7pxLXobkKv<&4Te6_a#7quRZt3PY4EA&-D zChAyigvj?&wt{dmcptl;_9emGuhW8*sjMAtgQFupCq6x^L9__NbrAjO$$(Q|^bRH5WrwyI4m|0%%;)|i^;wBCt+|^-}WohfW zn!ULkm2d%;{sp!|Xe2v>>p&{TrD~xJfF-(9Tt%prUN_C|U%hpBBpWqiZdt$^K8g{*6q@#XE5MS5ybe8K?1iQ3l&bQetKsw`3tXYViGJmwHmDXBW z)Hx+i65H$O{v@-35~!zz&wI)X66@InHbOcqw&%W@mJj({**{{pm5fAX<2Wof`(y1u zdvG(>0sK{)e9(4`i%o(r*xf_QP4Z6XC>RHN1S;4UE#%@SCpK|}q^^(ir!-&b{7K^Fy%nZndA~Pvj;{dt5(T|>YUix*Z9im~R z3Y0%_7)v|*9tmlC4NYv74t01m+wF#qK&;#*{5dQJkVbX}R_7s?BsTGTQ42JT4~Vo| z$TdkkqstRw`cn5Z2a;c##Z@KKRlW7-cQWE|rU|itO$2#>GN=+;fQ0U#D54KxvViX6 z{2BY)p0;jv2Mt=M!Qi2-7dUK3&($naI@RHK`^RZW#GI+^#dH$YvEG(dD4I8NS11#InhF1l$paOUDBjQQFiV{!KZDImL-;!?uoHd)MsU@r}s5oI-d$Hv%u543%me(ZC z$vCkSwYNB-FiqJ`A`??O<q=F!N@#Ul$C=`P9!V>g09-tti=Iq=kmlB-0Oi zXr$I)JZg8Y)t~WbN$W*1fvoy>QbDBJ-)Sphwm2Wjy3wrwTv&#Y3c6T8tjK;e6wkwr zLbtj~j%`lgky*WSyrd7RD=nG=jbJT2m()Y89WYDc&-QwB6TLU|(j-JstF7>+c-%M1Rn_#Cq}6AW_Lg=$Ar^v#~ul2kYD|sS`>5#)uRWL!ADx z{s=goPQ_O-8B3jzZCTnx+s`2i&I38+{&e- zUf*W|geWxn<%O%jGQogCa*PcpseDi+Aq@uTvgNSUHJj4wZ0$%)gx_e>4DH(neF2uF z-YiN+&5T{K!|Keb>hdhAWR4KmTyJe9yEancbH$`~*e%Vn!1~!sIihj%eA4KN53mto z(^w3BycFYTj#viSA%_u6#t5)L#f}sN3duKF&!{AJv68EYkg+VE+Q%h^vXrq=UY1l4 zmBlXwq1LA><(b+=YOza0P189;(}IAg<3N(1$XFTDsfCs$L?hY`FZDYf%4E zX>FU$o$h5CO7#YI9@-q<(#4n4hN)vayh-c=hUGSK`2rob86754+uz{Jut0bp*lF*lC1jJ$Ye`;P7->U^+M;F zw6)Q1l*Cx=5QOq3wYX|w#L2hST$g-Z3LVDJ89-;9I55j1iM+sRbRB^U_YCA?D2BV} zT&4(W#A9|v#15FoJ%4C@cE-Ko|#Gj1yq#Y6lN|o#O zhWb6WBC_Og*JTG05=q^x)2pUWya6t>)at*n#}XXkGBPd8dea?uWvVHTn(u%b{yFiQC=h)0n2Drt9`V3 zexlN7K>y2hSiUE;%ZDWKfU* z=nQ%kb|Oi8@_&e(Xq{=K2bdv}7La#qtCEElL{P$nAUnrQ%ia)ckTcMVy5E4nlRgzf z-!sMP@kE?SuF+_cbx-?%cIfK}FKmiA-NGN9%ZUSlEcQ5>uOh_I4u(`(kRC5tdFXzK z4QW9nRRyoaJjoK~=%Qr;7)g_-=@UW>h{vzS;pVbIIhD_^$PQ6|7O zG?|Hjle$6O&TO%XQo~>y+Hn=+3Fx&eb9CS(;sJ2oq*w_>84P${`w?f7Xm=7ptr+0ilb9ydVy8Gl@@7uIp83Yv{qlyVS1(cB4XiF5C%>mtPyd; z5G7$5<-`opu5vW!4`-KBd#?5T7s8|?VmpP4V6v^*PPD|35$(tjI zob2IJjmA+0g@9C;C+$KbQ9-0ih1%dHhS7qbl!@`@nZ#3GVV&Qiz? zT8tVzk~|ms^M2$`S+qi?MC@3LgJAfmgohDwodi1m(hP`BgQ>F8LS2z_)i~>gW;}T` zvc<|7p%puRl0cJEKVL!UXLQU*$XRQLlT>yvdpIlNez38#U$57t!43RlrJx86 zGLvN`*hHrBmvAKBjdCjYc?23UYBty#ca1Pg6j$Np*GsRKF4V@xs#E7T;|#f|wVfR~ zFIFnga3LK6qzg*xM!n9DkD4cR>@l&SEy~?WV{OBQI56Y$DW2L~7S~{r(8Db)fKafq zmC*)DQh8$_sZ-zzFnL9TMK8ZAF0)EexW^HR*F7gCLsGiOz8q{;d^Fs&a128LkTabW z^KWz5mHw$hP~~fOQ(a>xd88EA6H{6I(ZjmLVrINRu-&QMDoImy{u80s7%*p z8o-Fre6h8a*c_6FxMl1mNXpkjMI&V?{BE0r$2At@D*iy2i@sCo|LfaWy5VK9kM0fT z&#rSmqvyfiGI3Id`-G58B1q44uSl!mTf(U*?6z{M1eY-IYe>v!Yhzv(2(&1;oaiX6 zlV|cX;SI5HrSzb+0D_4_JQ1(&Qs{&Tl1r@pndc6Iu1rms*~Ji~YnPTFwjZhTvGY|g zlxL=SNfmmL>P||WdDe1KhRV!($(vX*I>Cj&6^A9gU6{_buOKf$Hef0b;?ncY6Sv7(wA1l9|}@<+04~Nm#~E768Z~uyr}pF9aT9Y2SST1x3) zco!v=mcG25ap^Qh+#9!7*HDr*uY~v@m%QXk3t=Q3R`B)yI2d+zoNLA46w;H)n->Ft zws1s;R`^w^_h=?V(aaEE`6jZgcI`NOB@a;?7-ZGPe@M9VCK)Ys&S8M5EL*HXjuBc5 z(hTXin{5bcjfsfGrnQQ}Q<{`658yb?$eJnMnKhUsNX;s|7r8(UYMw8LR1Hd)2sOfG zooa@$?MpDp`jV4RcH-MD)-~Z=SMYJf$WFSFAv*_y^V+$t1&qHk%}bS=j3FUHF11B=>KHq2oC}C;V56izAwRO4 z1N?@3J2}In5{lJM6itL1%!*#%j?35RlYwrxbE=vHX=vz@Ix!#-aeF+T8O=2drU)&(CGdbct{?JuW;{oE~-~8GN-nGy`vs z?ac1XAj6)B%{195Da`}DWS2-|D;d&`v> z&katn=%XNQ$yDheDbZ0~%N%FZ1gt#Qy_fEmP-X7%N^zOkqZ89nhj@WjI<5t2rHhHn zw8>lQ>$*W^ZwN#DPD~U(#%*4t%Vy4)Gsf>!5xQ#UyUdT9`crwhRt7W6&kk1#8YbbHx9dg{rx5Wlz z6)Ls}?_%NO00Je7+9JLyX&e+x61%+ul61042NwtrUmY#TCPlc9jAV9Z#h z08Ptfx>l{%rlxBbBNnRNEemuwh1P}!iN%pqzHEjPWkTpdX4R5_^_R*c)lrdA<{pZY zSSJ#+usE9Kx^>ufOQx~XSGVPMk8mOlco0~M1&I@h&XU-y=`Lonj=?bce$!w=e`y4a zfDtePM!*RCT|i*E#z|lhZBMyTDUFQRrUyrBv%?dW`b2qpaHKX_X_TgCr$)vHCoAX6 z*{{>(OQq5BrNOc4OeOoOI+FjE9WByB^%2_T;jeK0{7iLv@ce9bVxrclPE`hH%Fom| zfmC^Y{bFrqv`(8-Bb7k{p1G~w806CVQn}G6k6akMI9{EZh3M$cEc zSe;1yOk!TC4hH838w{yZ8Ktr5>Qrg6TCZ36eWFsCVT_H+;Cb8&CI)9}<(a{{?yt{I zS7wkBt0RN)_i(K?IXGIamzl9aiG72W$zdKIqgNHWQM2bzq6%b5Ej_iAs5lQBRa-(yP0~Wty9vD%DZ(RtD=lKV3><^x$-*QJ%=?idSmp z>*KWsT`r%mO_lh&lBl>2{>)pPin)VPWgmuX6OH`$I4B%O^iI78x+&AnOl54MGSV0vtBuUoOO>h0%y}(G z^{LXBsZGH!c&QR;c>R4m2eqnZEqBN`p#-y?2M#@uD&>JvohIvhSa;j3VmIp7e zwlJbXGh>b68VhT5aJ*XD;|1p-B_?VH+)5QKkHKtho-fw}0#Qez#);|}zcQeSOAxi_ z_dYvF*BgIsx$z5sHUdV#2p9n)U<8bS5ikNqzz7%tBVYvnRuH)RUw-X>^^XxS0!F|H z7y%<-1dMy@aRWRJ^1L!(?{>W|D#9m{?TLaJ$Cm^ zv=4h;0)@iC!vFi)o6E8#>o-G`E=hw*057d>L{b)@3lldled>Qh4V=#PpUH5&u>u7#Q z`Zves4S&V^-okx{_|vP$|AO|uhs$dFy}D07M+*ggm;dOR{(L`w4&-0*@4Jo`3WNNs zcj$Z2mup7hhxrrl9?7p3c9*-a($P2X{`=d6z`y@KA@C1kq)TznL3*?MV*2&B@4L>G!vFn!6Zc)8 zdh?impSbTx&mT;H%dezcM(?}c!_|Ls-=Saoqt7v%-S16rdg{JEnHrUHWN^2b?%b7L z^ z7yDa3LhF5pXgnLn)X??M6&|3`*FE*M-TOODM2|l6W&dXcjDQg^0!F|H7y%<-1dMATW65)Y-E~ zPoDnL(a)dy(y?R53Lk&`oPPaa;hra+IC{?mAHVm5g^!#(d+KQa=||7$`bQr<`@~}> zzts8sp8-Z5q7g6xM!*Od0V7}pjDQg^0!F|H7=gcw2)sG#bkDCoQ0V!!Lp|?2a`0dk z4}N*5zl%Tr*YCgf+DYB>(IY*DkKf*R;K{;A-`M-)uiSEb?|~ANl9}b&Nm!+4 z*A6Lt#eoB_d#C<6^tvzd&%uKa#id)6-J|a@{_452?}PlqPc+{1tloKxCZOle+jQl? zOyQQ*`1n1#bYSM7vS$=}-X6~#Qk$RF7hfd7#KFR^@>|yLQ3k4h)92gY!|(n4e&FN$ za-jEJck_F18bfayLvI?x!8C^6G=|=u7(;J1hF>N3#erMX!)ZKy2L%I7Xgs&*_t%{| z{mX^_vA6e@+kb~w9XiA#y@w9z_rjr3eK;H+%7_1$uXa zYX=Vhf`UzoI+u zh)O#_a6SDp8MYT zw9{L7y-@r^Zn#yGR4N=P@_Ww*Zh3tVxjXo#=h=I?{|!MQA9#xf4u!lSDC7h0)+H$9 zwo`?kpL(OvI56|b8~?2uxVKlg{xDzNUU<{{Y3nXN-u7sr=O>P&HXz2ngHQ5h-@$SI zKEj_u&yU^m4Ia=k?s@h}p1tGrlV9N5w`H#_9CuQIQ0%VfS$#@lc*EPW2k&^|Ztna3?72Ih zcpsmRrB8?Mc;ZL-^yBH%k+)2$$=eRAkpnYN6yAEUFiNWj3%^Gnvqg8ATeRqEAS^B< zPWB(lEZ{C$RtIDL?zkmyvgg@80o(KD!-+jGahkA$1Yzxs3n`7Lx{AINVNCf^0qo6lx<`<>A;xi_|a(`ow4 zo9v>Bn>8xo2twp1ZQcCR*{k(!y1vu7E{>o*G5<-|-^0V{`FySIzrNkMo-cs>`hEP; zTTm!wPtTv-_6GirDqy^!CsJ!2dnoSgdv~Ev-Mqc`j-I{)hw6QOhweZ0?!F_3-rU#o z3kP1$W4{p%efVY#J&3WV@aXA>9((fPQ-y*)(JF5^d+uSxj$@Aq05;$BOQG*Wyh_9D zJ<`+H%L`tA=g&@#f86(d`e&uDmw$SGrti-4eZ4PzUERNh?n~h8Er?%! z2M*Ew!o$f(m3m(2dkdWu*1d1)0gHF{y^BAG|G2O3Lx=99Uw1~EAB{HO{oULA{DTkY z?cGj$nwz)u9j1i?zsx^B$*2$X(VvG;J^18jPdxGDISFY`o<95NXHTDc_~=8AoIF!F z`^e*G&K>Q1ryK5iO-GBb^6qqM<3$j$ukc<@}WoH|AF@(ea~l)zGr~jK6Co<_dNLIqmMD*^nuK74}JbU zPn>!D+^L7oJ${BSKXc~PDZV`o1@X{lPM-bJ>4zRU^Z4n6*G)gIR)6lk2R_k1 zP&{#8@#pAA_CR#y-oc^Nh3v}{gWdNJ-t)x8pL{HkyN7AZUw6;L51&aGJ=|F)5ci4Co;vqX`aY5RL!est_`Uaj@aR9xG7TmY zdC&X*(T&8ys=4`(j!-OB_=kQ{ranGrOtkYEQHP&HozICq7LF>joStX%Kvr3_IcmA1;zw4)$3W(i5NWa}5X%NK`w0*eL%M^v{RID>b37{8ajUI~fH}bN%;tUP89+|B{~X`h1?xxyY>R(|qRXti1z;MSafj zzMZUoIwbNF+n?^g!iRi2)8~K9=lm?8&pGqSmgPRmgD0K%`27PPx##{910Va?C+_>? ziBI11k^ApEk+1O1;^rAS2D>C6V5qG#*aJf zdh`2!A-hi; zLj2(n_r2P+xYUMzPVh&+2PZkod*7QKE_IO~aTNV|gg?4Z97z1+2=`sTNqbLp-4}HK zQ|NQ@mvJrQP@xIY+ShxB*tZ~v=7bW0Bm?q2=>+xrsuII26%S5;koNG+*#_z*UxZA`dg9maq!uw}b324ib% zjIlFLTb5dujNDRMEg!)oHi87N@L*@ySu#-uc4v1slZ$MA`4NJd1W+)Lz;7U%4f)Mx zGc4mwIs>~yh_h=Z-qn8Jd-bZT+p^uT~+UYyz6^MRhO#1r&RnCUMZhx;d`*S ze~!nrhqrkArlG=P&>a}N56a;?qSnx~19!y7$AuWGlMJ4GOweBVoR`TRQ8BT@zful9 zT_?&}*uu=NV!E$Kdzd7+KR>OgKqcWReHPHCF6bi)o!aMvKvQGtU=T0}7z7Lg1_6VB zLBJqj5HJWB1PlTOfiod+m`jfo_>z4kQ=5DC^DA^j<7 zPz4tt`A7U}cAtg2`e|Rlr%dDSqe?D)Qw#~2%^+Y9FbEg~3<3rLgMdN6AYc$M2p9wm z0tSKi6$0PE`}}{0{rXH_U;l@byZdu}T{CCSd|#E(6viN65HJWB1PlTO0fT@+z#w1{ zFbEg~3<3s$-yH$I;Loj`+cXIs>9=0NANM6+f#&;cD{_*yz`hjwLOq1<52HEi~T3C520)m#ZSU^3VR0j z%{cq%lh1UWA|0I$brLT_d=5UdgFah}WmpRPgJ-Z0z^3XLvW5{q1cJvhDjg7OfG7-1 z4UfU@fI|X|SWc8=6(K3OA<4A34vJf`yL1zw8*s3~p-&(=YbU~cuuGHsG(sZ04F@Y) zL(}sN9>PJ|BR@b0#2~jaW?lVyoY;s_5^I3il(yqM#6nb8Ft@_@CqAC<&S4h})?L|0O)4v|h(p)1d9E59^<6wv4)VoeYQY7luP!n-^ zl2t$oOvW0mXWceJ4Z?{8JEAq(unOW62!fb$5*bRZ=tZm-7&gIm0y!k+@u)EW0fKxf zWh!=VcVmB-F@FhJ1TcS@*`5{iU(n%n%qs|m2A=Jrf&Xs^SM%@|_8K0Fz_ahzZo+l= z%}(MkDTTwX!|!!!9|snEz&D#QMr+9e%V&N{tosbC8HgMX)@UE3`b*$phi9-H0K5L` zpcoPj--nOw)S{&l9Ann#q+4;im)Zw$n5-LW@(e^|PZU$wXJ5ho81|(olZrP6X{wBO z1av3lx_Jp2`@iDgCn6f@bprdF*jxO#Q>8271vv~iOsTab$>jnJCvrHFs?o76r@FGT zNFf;t(j#W8=TK|Y3j-f zMO|50WVMVZJbKNlBDrF*eYBl zijx$sN!gDkYe>J%#=KO8+8$|FESqEaBmOT55Uh6%Wyo69a7wU^QMit z-h3w4)H5)^^g0IydidvoCIl!imQ;pwdb8J35@2lwl_nBzblsQTs^}Cqq-Y*Pwi~Aj zWtj@n%Oh@m^iI$~Hfx4WPE?Lqj^jBLqFAaklp=(zSl!8P?Xw_vvn-byR(y(Er!*+g zdC(D@26x)C?u;eTB)K!g-R`9DeJ+W!q=ch=*qsrM&g_0Oy7*1I0jZ@oug}lRWV`y_ z9v>wT{DfbXBKIYkCi@36xeky)E?z9so7b$*FYx{P22<@fb}AOi%P()8S57VXF7i-< zxN>MPGpBP;#~ko%?&-}d{>sdr&dfl*w?8|0cCN~jt|L2<$oKRPDppPjX=ndXUP$Us z9tJ?XR#y4t^HRIYbt|MU4Hmk5Z)ci(pS>M@y&s3vpG|{9Gu;I)&D>C@lv{k}y!7DE zw)Bd$sz{)pvqzQXx?=9>xh|JFkA+XBwMwUzMj_JR>)Z~4J-;}aG?GmZ{iG(AA(KJsa$Ayv=Po$n49HDq3MN-?z+!o}O zj7d4++tu5@4Zd6{?UD};A_E54b?`w7Yk(csEW%hr7ES4%D65!e7UAJ!EIy*!TN#4^- zd~vTKCaWUJ3k-QBr$KHMG(Y~a$=N!lgv|j`}+lSF=k$y7+@aL`fEL@IKkb~tf zy&$AFuf9@^Y=6Fz7mD=ed9CSl9iqLxrGvCMu!6(QAG#A$VV?64o|qZ4bk1Gg$_XG1 zCdo8reS}V9)0~hD)4xg-C%3X2Z86O-}5``z-o7*f|fh!|!W> zX_hu_4`bJUB8emTnV#kc^>1sTW0?DQu`?U`@p_R!dK3A*2s`s-y*Mv7 z!0+`y`E;Bg2mIuGw^S{s0JYq-->Z;#)ndM!*Z!~#e4g?_hjf#9G4yln%vW#p8(<`F z)3#qh)?u2SUm*lnm(ZKGk!W6rX&YRrp5T=GaiR_SeII`FwG+{=nN)kfHK@VD`jp7JWFc}ZiqmdUs*j4Bd(w+gwQM%t57N1Jcw7^Lsn zcuDDEHiLjcz#w1{FbEg~3<3rLgMdN6AYc$M2p9z3Sp^%vR$3OuZ)f*C$H z_Pp5)0tNwtfI+|@U=T0}7z7Lg1_6VBLBJqj5cvNU0m(s<+~`q|REV~0f4(P^OLlea zP4;G!10A^ztcjdyYHCvN9KN$pA53Zn0fT@+z#w1{FbEg~3<3rLgMdN6AYc$M2)q{v ztnSU;mdPzluE=cb?Z_rquU?UCy`rh5sda+P^)~}F@tZsOxrlnZ9~xVJ1;}>>R8(7k z<0s_=z8c_n3+!b@uPvnZftEO@n)P<~z3G z+=GuzRY;x1V6L+nAE)N>O&xR)+~;~0&!AT_U_?-VD^rEA@0WyM3lxEkHg1!!>u+k1)*1cIgCFDg$sj#b?!ufH*=!xxb8G5)brNOR*Y>;GW* z^{It_i*yf+eI5xH=HT(hq2Y({EMWNcX!{OPIEv(kzngd_b({&mmMwe=4=hGf$A_P2 zeDW3h;4?CKBZJ3Ah8KfuV`Rhe;inp(eAT}6#e+{h`41OZFTQm0;FBZ6^R?~9QrqzB z@t&hckBW`A{6TwRIT9cKZnDshCn>|JXz{nOX2h3G~zfG@i!)u2aABv9;MRz!b$HvFU zQ7z^0c{+SP=nyJ=RyhDNCUHAGZdVz#@30ETq&4bUx6rypTSeguK`RQ{P*?(w17nNe za%eaX9NPw9P2pQA_)LlvS>m-BBdHU9JI1XSN8r6jxeTXHpfyh{N=5hm%??zj zaK6gvVCs!S!z4OsFRW3X1wLv!tRawPIEtrc2gbgMXNZ9O(C~%Q{Q~KpKw~34tMJ1A zm9QL4oj^8T5BM9U(+a!roKgf+4;8k^)HfmZL&N(~6fg2VFY+Hx#q+e0;psTmJp9zb z;l&6X8{P^>%TI?bT8CuZI;1jkm@y8%RP*pn@sSNt>w5<`oEkaIXbU!++I?lsBO4Mm zkNn`^OHclHoHx`W{N$_A*h>i4Asl;YWWy=+vyuG?#IRmG_`QRP*DTds%;rmI1oumz zO|E%lKMQf!6Zz{7r4k2Ir!ZJ*9$9MNlX^>qtb0=bBtzn!)Nh7g4;_4^=9?Sd>ORO^ ze{)Z}t$I}98i`|E=OKIN4anrc*mW`&SykkcdM0%ez>C+Kb#qS{*?``90v%ypdtr-8 zMz-@X0a%bavG1qD7|sg21*wz!jv*7>u!UDaT<5+zjeWatmy8@L*79i@pN7$|WzAjp zB6B%?oO-PZ^%@_ViW;;Rj>~oe((#d01LqD}P@w0PUQQz$q9dtx#9odkuzDLWt!l!j2sD_`xNhYH4Vw+51X{Q8Bn_s2pwyQL3GtsWd z8Kt-hs70-3RWUCL%^n+>K6{M69L#1AFbEg~3<3rLgMdN6 zAYc$M2p9wm0tNwtzy}|Jwt<0U+q#v@7m8&agPG(iEMfz039+JgaG(#A6I%Y@17T`t z5HJWB1PlTO0fT@+z#w1{FbEg~3<3s$4;TUsUVW^OuM^h3s5LDf3f+Sb`0;A7++X?Y z@o{hg2+>v@z1v<^<=WRh4HvN#s>RqVUK}4khO<}^x5UbXYY&O*YMh~ga3W$4?MsC1 zp*;!59?IKac@hq7V{OOUo@sk}Ig=n&fY^_H-`|dpLzEkJ_hau1=#r4XfV~TOU52w? zmKDR!wx`ErS}gDL*muBZX3%GgEUv7}>(Ji@`>de-qeVLkD0ae*cj=3HY%bbA3_Igb zWKSZ>YS?>WzbhCYWwiIHLeggdKF`7Dqvbxg6n*Z8kMq*_IF>gpmV@amRX(iiqwu*H zKHGyncBd>X?LUS+3wu|IeXF!5p*sot*J1Ao+L_1JVjk1+#m4`F4_;_4mgANp9*bdr z1NN^5?e-V_GW;RzpZLMVWlSQ@KG>gzU2=`+{)IAhs3M5_VORYkWR0P`@r&>c$6qot z^qmA0+~9+QGo7R;PAD=PYR3wb62r0GE=Zw}+Y5FQC+c$DZpVr)lC}sIT^079L1kB} z$kE7oD)I_g+)Q?tc-(QqiNAs}Y||2rGAzPhp%9b8{>Z%)DwM^Fu=_fd%49_@p%hm( zJ3@L4r%KuE$Wg|tRyHT{r?k~XuES}+6IoANLP~czku0TJDc$2leo4=0upSGhIsGa3cSj@y?ghqmGEOXfHq&W6OL}*q@|%hO-Y+ z1(`*xP=sdJd1$UkR8}HrRl5X$)FYfytkGsPZhR_(H8w3%AXkZM6e4j4#F}1V)m6}7 z522qY?q(X{FysWMENk>W_}32PbI{f^Y#$MIvuFula1mo23DrF!%Z5%sz#h5a$Fi%N?X^SY=sSuwARN}C7uccE*dN8qOp=L8Y}6dv63ztyOS{KE*jfLNq5m$X&0>^ zikv7bRTqtKLZeyp!{0(P-UX92x*UqCFH7wt+0TxMs{bU#nKYpTRcC~?v}TnQdTQ>X zZMj3&%Mnb7+Mgk#`6LXUd2*=<6!t)M+IVr(UWfHvBmwRz-4fQFVsi&!_% z3cm}zcy$AFAvGx}S~qY7qyzo#ePlpP4vAr;8d8@8busvBxNy*2V~Yf@ zrawVL+Uf#es|$dwE&z_Y0NCmRV5O5)yk&kjgY>y$$2BBFKu$(21CBcv~Fa^48(OPicGLi*As=Z%oQw8?oRG)?C4 zHAl`Hq3Kfkh9l>V(D_orrLE!s%G3b7ym>=j+Cnp&F{tBjL2pIEba9=nSBXS?3ZTbj zgb`e4KQ$H9#41=d*IB$!B&uFxto7lPD-xGNYmHWagg&dnKMje*cBy#-E;W0g^9GQp z*$ctDa)oMkL%7--Of@|a+Ptxp_^?drCgx@zNz}fD6ggwoVMbbArKXpBt&N=LQoBP~ zH`OZb0OaaDjJ+t_f>^xIvqtwp!E!8`p;DCPSag{ZWH}aHrGzNUv1pkR;)!cyN^6vu zs9%c|Q%JE3YL?|%T^3P$KTIpV!YudHC`{E)iPF_!%m)1Sk|?cZnsdTmbwq-9vexLU zP^g^dOj9|D+V8{4oR~|CPOkQc&|dCk((2V116)+EV4AbSH^AN{(`?3=XN_k~RglUW z&zhx#kjiaVlUL`u+c5K1Gm5%r;HaF$kB_bT@ZVvMP>p$)mt=ioAjx_?HL4`*TR67u zBhksc;jkJjRStPkC2xr;!<=%imn9TdEi$dIbgHLS*IISq#1urFjQh)lm5VADRIaMW z;GZojE3btIW-c!nMfa<>oM@%1+$^|-s{*m+ zoR&1&C|+fgwWP7AWSN#u{gY*lj2ADpEtX1Ir|L@7qb>}zkz!Pro#`claV~CD>HQm( zUaec^TnB|;bH=U@7LbaD8i0Xz;fdh<{`lz>!XE+{K&u?jXbF7CGghJio)sF;N{wd; zK)SLXcvao zwAcxCe?%t?1=II)M&~R~dBP;mwVPL0R+e^i9|76T-;st37FZ30swPn!2!Xm)2kTtc z#x>>5lPGWWVoR2{e!XgAjx*WG*(oPYl$Y0flY>R((2!3`FwbJc9Hln@$2LViU9bi3 zMwMOv=uxiPUWHMt?D}S^)PBEj*Edeu-iZ4+NAQNrvVK!tg`))xNhPh`Y-it4R|eON zT*vOFPR1C_cj4E46D~AD;P;RU2=@x%vJQzUZso7s$ac44m+R!+3fv$%&2BYM$KCUI z+UVBeWZmF8JS}#u&2D_PYe!#p-A!&q^jg=>yJ0#uyHz}GQPRCiYE{x9nTXTk&Z0}V zJDsP)?qxhRDVIM|F3o3gxsUGA6{=j$u3J$9S+clO)$LlF>^Pt}ib^?R367_MvkmX; z2p=IzKnSS#2mug<5Rq}O0YYp#CvLe;v;lRU>RQ*hEt}m6r{Y=Hiq3Q|Z*iR$W#~fS z@SJPC>`wOrOAu$~&)oP|2x|ii-t4+O9d~E&^d*Jo4Q~CXT<7n9#^Q%jjT90zo%QRm`9UZ|tnu*i&A@Mp*86;BM z!&~+MICaRE{nDwh&=+R9jpztX-R|sew`Q?h-{V?C?$tf+^pozz-EL*K8y|K<-R`{2 z?xoQ;-SfKLOCdD5bDP}h*Spq-+$&pL`&VxDSKSNI5u;1o3p-tRv1{8G*0|Os?krf5 zMb%ebH}BRqyRp3LTg`4Ok&Mo9XXA_>8sn+kor9CT(M>8PL5I@Lxz@$*q|L62W_r-w zaINe9%B}i)*X@?koMyP8#Z==&b8e%GJ(;IFWy_)OSFQb>{GGk%mQH2TT`%i5K?PVw zC;Bbfqjd!q%h7=f$h>dRd8-OcZb37%X=lo&9qj#hCY={+*Qb{a_4ai!u%=^YMh^dU zFJ4a*yE^)YGSn~c@5)Hq&b?_q7a7V9_HNH+x{{qe9XWAxZ|7};Vz8$_mrwc@J{4To zc2j!8V5UpI()23@VTyL@*;QodAA3X zZEw4I`Sk*2%Vk;RogKYd-*Kbp>(6da%0o$Yyke)xyXJt5x-T;*x-#2_wx@gh!86S_9Qi_{ryCeT26kJJCBtM{av354!|?=89ZqaHub@o2;#?E2okz&TyT5nT}j~uoK14 z3Ux{k4RoQe6gzltM<3AaQuAWEFO%J#?@?BEa#>DqTI=pbA=o7I(IUC++tQu=ef>F+ zra3*(yC>5p=%VwJYAP~a=^T*k$Zqe;h|d20To-U+oT8Sg;W^V#XI`vazItvKt4 zbM)_pOne>()U@O0H5?RPb+#@35u*MDO#e^OzEs&0@IMSuKNFz+LCE^iB;_wc)(mpL@(jrOPLwkLmZyI|Q@#qae(p=T4YGdDKzR*hKD*I)$uWZ46mOO&j_UNv)oYiv ztxm7K?z;7=GZ(|zV(%2c6GjbC7wqV|+ z!P_{$aPPrRKhETwm*em|F+qBqXSAOj?@NUkWh8I&W_s~)$ecr&FXySzWtiUr({2)a zZlA=i%SxGkmj|YAZ5t``d*&t~Zq%6tY@ZE;5fpXnFzy-fHl5xVAnPzqpMhWH1nGUl z^8*}m`}{5Nm0&8FX>k9Jch-K*oALL3}Fdz%i{LJs=fhd-q}tDSJxerH-I0xoi$h!yQB(%V@lVk--i^u_`zVb+OIn3|(O zz#w1{FbEg~3<3rLgMdN6AYc$M2p9z3D+Eebci`F%iNY`Nc;~>_FD@YK`-x-XdeZnm zVI32DWxzfrcFBNqOmxUV2m!T5fn@Nv3VhChl@e&=iV${z4~YW`tMC`TVn-57M(hX| zRw>P);n@r@npN2EdwJ>f`-&X`4v2h@ho8{l$3chk#U37`$0P6n!TjlqJ&e-&fVNJw*uyS(92naLmqWu> zqbl#lVh?RH-7_!t@Ft$Z9TLy>B6Ka*HdMdl=v6WAxsqw0tNwtfI+|@U=T0}7z7Lg z1_6VBLEr;}K!aD4@^vCwpeG|B*NONq^eL_bu>$Kr><|!Hh|09+_=#-}Lew;vm z2wDfnU5FDlnYc9?Cg@fu3YrM8>E|`cJ&WrV=m2WK0--RHu>nZlF}9Y<3JJKwyhiHYfHpZ9ZA`YTA6V>MfLfvg%*c(~81AqJwM;yMhm8cIG{^-+5IWYvE{$tSCRjgn7ReHr8VWYxFR=95)Ret)0j{t#_G z$^Bl&^VeZGjpTj_oI!H`32-E_6MH20D-p?>?~~kTr8qIk{STQy3CaBzkrung*+}j| z{scPv@K(5TY@LDR{sQLP5?c0N$wk&!bLvG{h$dz#s8x2XIpNv$b%8c+${xl=OusL7SC=h zdLe0NE0FwAnbnesvLb)m@5q|VioWkzbBXrZSaVBRK_$ssQB}ez3PQ?`w@GkXY)(IA zNy|C`A*)i6i}U@-9O_Zh1_(sKbXvwvD|zEe8AajbGt??FTFKq%u?N0GEVQMpdp=>S zCWSp4y{z`xDA`L(7*4fmeUa-_QshcUdY^WLVTd=jz_(?q{R>LyHjYFjxc=Ko0H7q~55O8htm zbsQSrT!}Op@HTDZvlktvY2Ed5EP7r=TRA7@iy(FQc3Hkm=R4SWZt+t1qt)leiTNn} kNRr7(jL)rDb%x71F&_nY!5H*<(`7H`#Jqj&#GIJ_4|El(7ytkO diff --git a/kernel/asm/gdt.s b/kernel/asm/gdt.s old mode 100755 new mode 100644 diff --git a/kernel/asm/init.s b/kernel/asm/init.s old mode 100755 new mode 100644 index cca1dddaa..cd2ad1fc1 --- a/kernel/asm/init.s +++ b/kernel/asm/init.s @@ -11,7 +11,7 @@ .set INIT_MBOOT_HEADER_FLAGS, ALIGN | MEMINFO | VBE_MODE .set INIT_MBOOT_CHECKSUM, 0x00000000 - (INIT_MBOOT_HEADER_MAGIC + INIT_MBOOT_HEADER_FLAGS) -.set STACK_SIZE, 1024 * 16 # 16 KB +.set STACK_SIZE, 1024 * 64 # 64 KB .extern kernel @@ -49,6 +49,7 @@ __pre_init: push %ebx xor %ebp, %ebp + call kernel hlt diff --git a/kernel/asm/interrupt.s b/kernel/asm/interrupt.s old mode 100755 new mode 100644 diff --git a/kernel/asm/link.ld b/kernel/asm/link.ld old mode 100755 new mode 100644 diff --git a/kernel/asm/paging.s b/kernel/asm/paging.s new file mode 100644 index 000000000..ff2f0d1d6 --- /dev/null +++ b/kernel/asm/paging.s @@ -0,0 +1,33 @@ +.text +.globl load_page_directory +load_page_directory: + push %ebp + mov %esp, %ebp + mov 8(%esp), %eax + mov %eax, %cr3 + mov %ebp, %esp + pop %ebp + ret + +.text +.globl enable_paging +enable_paging: + push %ebp + mov %esp, %ebp + mov %cr0, %eax + or $0x80000000, %eax + mov %eax, %cr0 + mov %ebp, %esp + pop %ebp + ret + +.text +.globl flush_tlb_entry +flush_tlb_entry: + push %ebp + mov %esp, %ebp + mov 8(%esp), %eax + invlpg (%eax) + mov %ebp, %esp + pop %ebp + ret diff --git a/kernel/asm/regs.s b/kernel/asm/regs.s old mode 100755 new mode 100644 diff --git a/kernel/asm/switch_task.s b/kernel/asm/switch_task.s old mode 100755 new mode 100644 index 9941cf82b..313e53c80 --- a/kernel/asm/switch_task.s +++ b/kernel/asm/switch_task.s @@ -3,32 +3,71 @@ * Переключение задач */ .extern current_thread +.extern current_proc .extern tss .global task_switch task_switch: + # push %ebx + # push %esi + # push %edi + push %ebp - push %ebp - pushf cli - + + # Save current thread mov current_thread, %edx + + # Save current thread's stack mov %esp, 28(%edx) - + + # current_thread.list_item.next is next entry in list mov 4(%edx), %ecx + + # Set current_thread to next entry mov %ecx, current_thread - + + # Load thread's stack mov current_thread, %edx mov 28(%edx), %esp - + + # Load stack_top to tss mov 40(%edx), %eax - mov $tss, %edx - mov %eax, 4(%edx) - - popf - - pop %ebp + mov $tss, %edx + mov %eax, 4(%edx) + + # WARNING: THIS CODE IS MAY BE BUGGY (NOT TESTED) + # IF YOU HAVING PROBLEMS WITH THIS CODE, PLEASE, REPORT IT TO NDRAEY + # OR REMOVE THESE FOKEN LINES UNTIL THE `popf` INSTRUCTION + + # Load process' page directory + # Load our process structure + mov current_thread, %edx + mov 12(%edx), %eax + mov %eax, current_proc + + mov current_proc, %edx + + # Load our page directory address + mov 12(%edx), %eax + mov %cr3, %ecx + + cmp %eax, %ecx + je .no_addr_switch + + mov %eax, %cr3 + + .no_addr_switch: + + popf + # sti + + pop %ebp + # pop %edi + # pop %esi + # pop %ebx + ret diff --git a/kernel/asm/sys_calls.s b/kernel/asm/sys_calls.s old mode 100755 new mode 100644 diff --git a/kernel/asm/usr.s b/kernel/asm/usr.s old mode 100755 new mode 100644 diff --git a/kernel/include/common.h b/kernel/include/common.h old mode 100755 new mode 100644 index eecd25d09..1563ccd3c --- a/kernel/include/common.h +++ b/kernel/include/common.h @@ -2,7 +2,7 @@ * @file common.h * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Основные определения ядра - * @version 0.3.3 + * @version 0.3.4 * @date 2023-12-07 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ @@ -23,7 +23,14 @@ typedef enum { #endif +#define SAYORI_INLINE static inline __attribute__((always_inline)) + +#define KB (1 << 10) +#define MB (1 << 20) +#define GB (1 << 30) + #define ALIGN(value, align) ((value) + ((-(value)) & ((align) - 1))) +#define IS_ALIGNED(value, align) ((value) % (align) == 0) /* 64-bit types */ typedef unsigned long long uint64_t; @@ -38,8 +45,16 @@ typedef short int16_t; typedef unsigned char uint8_t; typedef char int8_t; +#ifdef SAYORI64 +typedef uint64_t size_t; +typedef int64_t ssize_t; +#else typedef uint32_t size_t; typedef int32_t ssize_t; +#endif + + + struct registers { uint32_t ds; @@ -51,8 +66,14 @@ struct registers { typedef struct registers registers_t; // Use ON_NULLPTR macro to tell a user (developer) that he passed a nullptr -#define ON_NULLPTR(ptr, code) do { if((ptr) == 0) { \ - qemu_err("Mumble, you have an illusion that you see an object but you can't touch it because it's not exist..."); \ - code \ - } \ -} while(0) +#ifndef RELEASE +#define ON_NULLPTR(ptr, code) \ + do { \ + if((ptr) == 0) { \ + qemu_err("You have an illusion that you see an object but you can't touch it because it's not exist..."); \ + code \ + } \ + } while(0) +#else +#define ON_NULLPTR(ptr, code) +#endif diff --git a/kernel/include/debug/hexview.h b/kernel/include/debug/hexview.h index 3649631d2..06a3e632f 100644 --- a/kernel/include/debug/hexview.h +++ b/kernel/include/debug/hexview.h @@ -1,3 +1,3 @@ #pragma once -void hexview_advanced(char* buffer, size_t length, size_t width, bool relative, void (*printer_func)(const char *, ...)); \ No newline at end of file +void hexview_advanced(void *buffer, size_t length, size_t width, bool relative, void (*printer_func)(const char *, ...)); \ No newline at end of file diff --git a/kernel/include/debug/memmeter.h b/kernel/include/debug/memmeter.h new file mode 100644 index 000000000..51cdeca47 --- /dev/null +++ b/kernel/include/debug/memmeter.h @@ -0,0 +1,3 @@ +#pragma once + +void memmeter(void (*function)()); \ No newline at end of file diff --git a/kernel/include/debug/ubsan.h b/kernel/include/debug/ubsan.h index b59297677..08425d97e 100644 --- a/kernel/include/debug/ubsan.h +++ b/kernel/include/debug/ubsan.h @@ -6,7 +6,7 @@ #include "common.h" -#define is_aligned(value, alignment) !(value & (alignment - 1)) +#define is_aligned(value, alignment) !((value) & ((alignment) - 1)) struct source_location { const char *file; diff --git a/kernel/include/gui/parallel_desktop.h b/kernel/include/desktop/parallel_desktop.h similarity index 100% rename from kernel/include/gui/parallel_desktop.h rename to kernel/include/desktop/parallel_desktop.h diff --git a/kernel/include/gui/render.h b/kernel/include/desktop/render.h similarity index 77% rename from kernel/include/gui/render.h rename to kernel/include/desktop/render.h index 8fc845872..3566450e0 100644 --- a/kernel/include/gui/render.h +++ b/kernel/include/desktop/render.h @@ -1,7 +1,7 @@ #pragma once -#include "gui/window.h" -#include "gui/widget.h" +#include "desktop/window.h" +#include "desktop/widget.h" #include "gui/basics.h" #include "io/tty.h" @@ -10,6 +10,8 @@ #define WINDOW_TITLEBAR_COLOR 0x909090 #define GUI_BACKGROUND_COLOR 0x505050 +extern vector_t* windows; + void gui_render_window(Window_t* window); // Render GUI void gui_render(); \ No newline at end of file diff --git a/kernel/include/gui/widget.h b/kernel/include/desktop/widget.h similarity index 83% rename from kernel/include/gui/widget.h rename to kernel/include/desktop/widget.h index 717ce8c09..f43e5a445 100644 --- a/kernel/include/gui/widget.h +++ b/kernel/include/desktop/widget.h @@ -1,7 +1,7 @@ #pragma once #include -#include "gui/window.h" +#include "desktop/window.h" #include "gui/pointutils.h" struct Widget; @@ -27,5 +27,7 @@ typedef enum WidgetNotifyCode { } WidgetNotifyCode_t; Widget_t* new_bare_widget(renderer_func_t renderer, destroyer_func_t destroyer, size_t x, size_t y, size_t width, size_t height); +void window_add_widget(Window_t* window, struct Widget* widget); +void window_remove_widget(Window_t* window, struct Widget* widget); void destroy_widget(Widget_t* widget); void widget_notify(struct Window* window, struct Widget* widget, WidgetNotifyCode_t code, void* data); \ No newline at end of file diff --git a/kernel/include/gui/widget_button.h b/kernel/include/desktop/widget_button.h similarity index 100% rename from kernel/include/gui/widget_button.h rename to kernel/include/desktop/widget_button.h diff --git a/kernel/include/gui/widget_image.h b/kernel/include/desktop/widget_image.h similarity index 59% rename from kernel/include/gui/widget_image.h rename to kernel/include/desktop/widget_image.h index b377b9025..80792bcb6 100644 --- a/kernel/include/gui/widget_image.h +++ b/kernel/include/desktop/widget_image.h @@ -1,21 +1,23 @@ #pragma once #include -#include #include "widget.h" +#include "fmt/tga.h" -typedef enum Widget_Image_Display_Mode { +typedef enum { NORMAL, STRETCH } Widget_Image_Display_Mode_t; typedef struct Widget_Image { - char* path; + const char* path; - struct DukeImageMeta* meta; + tga_header_t meta; void* image_data; + bool loaded; + Widget_Image_Display_Mode_t display_mode; } Widget_Image_t; -Widget_t* new_widget_image(char* path); \ No newline at end of file +Widget_t* new_widget_image(const char *path); \ No newline at end of file diff --git a/kernel/include/gui/widget_label.h b/kernel/include/desktop/widget_label.h similarity index 53% rename from kernel/include/gui/widget_label.h rename to kernel/include/desktop/widget_label.h index 6954b417a..b5c0da32c 100644 --- a/kernel/include/gui/widget_label.h +++ b/kernel/include/desktop/widget_label.h @@ -1,15 +1,16 @@ #pragma once -#include "gui/widget.h" -#include "gui/widget_label.h" +#include "desktop/widget.h" +#include "desktop/widget_label.h" #include "gui/basics.h" -#include "io/port_io.h" +#include "io/serial_port.h" typedef struct Widget_Label { - char* label; + const char* label; + size_t length; uint32_t color; } Widget_Label_t; void widget_label_renderer(struct Widget* this, __attribute__((unused)) struct Window* container); -Widget_t* new_widget_label(char* label, ssize_t x, ssize_t y, uint32_t color); +Widget_t* new_widget_label(const char *label, ssize_t x, ssize_t y, uint32_t color); void destroy_widget_label(Widget_t* widget); \ No newline at end of file diff --git a/kernel/include/desktop/widget_progress.h b/kernel/include/desktop/widget_progress.h new file mode 100644 index 000000000..6d42445a5 --- /dev/null +++ b/kernel/include/desktop/widget_progress.h @@ -0,0 +1,13 @@ +#pragma once + +#include "desktop/widget.h" +#include "gui/basics.h" +#include "io/serial_port.h" + +typedef struct Widget_Progress { + size_t current; +} Widget_Progress_t; + +void widget_progress_renderer(struct Widget* this, __attribute__((unused)) struct Window* container); +Widget_t* new_widget_progress(); +void destroy_widget_progress(Widget_t* widget); \ No newline at end of file diff --git a/kernel/include/gui/window.h b/kernel/include/desktop/window.h similarity index 68% rename from kernel/include/gui/window.h rename to kernel/include/desktop/window.h index 886b8a60c..2ee34f6f1 100644 --- a/kernel/include/gui/window.h +++ b/kernel/include/desktop/window.h @@ -1,8 +1,10 @@ #pragma once #include -// #include "gui/widget.h" #include "gui/pointutils.h" +#include "../../src/lib/libvector/include/vector.h" + +#define WINDOW(idx) ((Window_t*)(windows->data[idx])) typedef enum WindowState { NOT_INITIALIZED, @@ -16,6 +18,10 @@ typedef enum WindowSignal { WINDOW_MINIMIZE } WindowSignal_t; +struct Window; + +typedef void (*on_close_function_t)(struct Window* window); + typedef struct Window { size_t id; char* title; @@ -30,16 +36,16 @@ typedef struct Window { uint32_t canvas_bgcolor; - size_t widget_count; - struct Widget** widgets; + vector_t* widgets; + + on_close_function_t on_close; + void* data; // Data, used by application to unify window's data } Window_t; Window_t* window_new(char* title); -Window_t** get_window_list(); +vector_t * get_window_list(); void _window_add_to_list(Window_t* window); size_t get_window_count(); void window_destroy(Window_t* win); -void window_add_widget(Window_t* window, struct Widget* widget); -void window_remove_widget(Window_t* window, struct Widget* widget); void window_send_signal(Window_t* window, WindowSignal_t signal, void* data); void destroy_all_windows(); \ No newline at end of file diff --git a/kernel/include/drv/atapi.h b/kernel/include/drv/atapi.h index b9fe26787..ce76f314b 100644 --- a/kernel/include/drv/atapi.h +++ b/kernel/include/drv/atapi.h @@ -1,8 +1,9 @@ #pragma once #include "common.h" -#include "drv/ata.h" +#include "drv/disk/ata.h" #include "io/ports.h" +#include #define ATAPI_CMD_READY 0x00 #define ATAPI_CMD_RQ_SENSE 0x03 diff --git a/kernel/include/drv/audio/ac97.h b/kernel/include/drv/audio/ac97.h index aca052072..8518c1578 100644 --- a/kernel/include/drv/audio/ac97.h +++ b/kernel/include/drv/audio/ac97.h @@ -5,7 +5,6 @@ #pragma once #include -#include #include #define AC97_VENDOR 0x8086 @@ -31,39 +30,26 @@ typedef struct { #define NABM_GLOBAL_CONTROL 0x2C #define NABM_GLOBAL_STATUS 0x30 -#define BUFFER_SIZE (64 * 1024) - typedef struct { - uint32_t memory_pos; + void* memory_pos; uint16_t sample_count; uint16_t flags; -} __attribute__((packed)) AC97_BDL_t; - -static AC97_BDL_t ac97_bdl_buffer[32]; -static uint16_t native_audio_mixer = 0; -static uint16_t native_audio_bus_master = 0; - -#define ac97_clear_status_register() outb(native_audio_bus_master + 0x16, 0x1C) -#define _ac97_update_bdl(address) outl(native_audio_bus_master + NABM_PCM_OUT, address) -#define ac97_update_bdl() _ac97_update_bdl((uint32_t)&ac97_bdl_buffer) -#define ac97_update_lvi(index) outb(native_audio_bus_master + NABM_PCM_OUT + 0x05, (uint8_t)(index)) -#define ac97_clear_bdl() memset(&ac97_bdl_buffer, 0, sizeof(AC97_BDL_t)*31) +} AC97_BDL_t; // Volume in dB, not % void ac97_set_master_volume(uint8_t left, uint8_t right, bool mute); // Volume in dB, not % void ac97_set_pcm_volume(uint8_t right, uint8_t left, bool mute); -void ac97_set_pcm_sample_rate(uint32_t sample_rate); +void ac97_set_pcm_sample_rate(uint16_t sample_rate); void ac97_load_data(char* data, uint32_t length); void ac97_reset_channel(); +void ac97_clear_status_register(); +void ac97_update_bdl(); +void ac97_update_lvi(uint8_t index); +void ac97_set_play_sound(bool play); void ac97_init(); -size_t ac97_copy_user_memory_to_dma(char* data, size_t length); -void ac97_single_page_write(ssize_t page_num); -void ac97_single_page_write_wait(ssize_t page_num); +size_t ac97_copy_user_memory_to_dma(const char* data, size_t length); +void ac97_single_page_write_wait(size_t page_num); void ac97_destroy_user_buffer(); -bool ac97_is_initialized(); - -static inline void ac97_set_play_sound(bool play) { - outb(native_audio_bus_master + 0x1b, inb(native_audio_bus_master + 0x1B) | play); -} +bool ac97_is_initialized(); \ No newline at end of file diff --git a/kernel/include/drv/beeper.h b/kernel/include/drv/beeper.h old mode 100755 new mode 100644 index 9c921cfda..b336852e3 --- a/kernel/include/drv/beeper.h +++ b/kernel/include/drv/beeper.h @@ -60,5 +60,5 @@ typedef struct Note { unsigned short duration; } Note; -void beeperPlay(uint32_t nFrequence); +void beeperPlay(uint32_t frequency); void beeperSilent(); \ No newline at end of file diff --git a/kernel/include/drv/cmos.h b/kernel/include/drv/cmos.h old mode 100755 new mode 100644 index 5aed7a4a7..f57f389b3 --- a/kernel/include/drv/cmos.h +++ b/kernel/include/drv/cmos.h @@ -1,10 +1,6 @@ #pragma once #include -/* -#define uint8_t unsigned char -#define uint16_t unsigned short -*/ typedef struct sayori_time { uint8_t seconds; diff --git a/kernel/include/drv/disk/ahci.h b/kernel/include/drv/disk/ahci.h new file mode 100644 index 000000000..376424edc --- /dev/null +++ b/kernel/include/drv/disk/ahci.h @@ -0,0 +1,304 @@ +#pragma once + +#include "common.h" + +#define AHCI_SIGNATURE_SATAPI 0xEB140101 +#define AHCI_SIGNATURE_SATA 0x00000101 + +#define AHCI_HBA_ST 0x0001 +#define AHCI_HBA_FRE 0x0010 +#define AHCI_HBA_FR 0x4000 +#define AHCI_HBA_CR 0x8000 + +#define AHCI_HBA_TFES (1 << 30) + +typedef volatile struct { + uint32_t command_list_base_address_low; // 1K-byte aligned + uint32_t command_list_base_address_high; + uint32_t fis_base_address_low; // 256-byte aligned + uint32_t fis_base_address_high; + uint32_t interrupt_status; + uint32_t interrupt_enable; + uint32_t command_and_status; + uint32_t reserved; + uint32_t task_file_data; + uint32_t signature; + uint32_t sata_status; + uint32_t sata_control; + uint32_t sata_error; + uint32_t sata_active; + uint32_t command_issue; + uint32_t sata_notification; + uint32_t fis_based_switch_control; + + uint32_t reserved1[11]; + uint32_t vendor[4]; +} __attribute__((packed)) AHCI_HBA_PORT; + +typedef volatile struct { + uint32_t capability; + uint32_t global_host_control; + uint32_t interrupt_status; + uint32_t port_implemented; + uint32_t version; + uint32_t command_completion_coalescing_control; + uint32_t command_completion_coalescing_ports; + uint32_t enclosure_management_location; + uint32_t enclosure_management_control; + uint32_t host_capabilities_extended; + uint32_t handoff_control_and_status; + + char reserved[0xA0 - 0x2C]; + char vendor[0x100 - 0xA0]; + + AHCI_HBA_PORT ports[0]; +} __attribute__((packed)) AHCI_HBA_MEM; + +typedef enum { + FIS_TYPE_REG_HOST_TO_DEVICE = 0x27, // Register FIS - host to device + FIS_TYPE_REG_DEVICE_TO_HOST = 0x34, // Register FIS - device to host + FIS_TYPE_DMA_ACTIVATE = 0x39, // DMA activate FIS - device to host + FIS_TYPE_DMA_SETUP = 0x41, // DMA setup FIS - bidirectional + FIS_TYPE_DATA = 0x46, // Data FIS - bidirectional + FIS_TYPE_BIST = 0x58, // BIST activate FIS - bidirectional + FIS_TYPE_PIO_SETUP = 0x5F, // PIO setup FIS - device to host + FIS_TYPE_DEV_BITS = 0xA1, // Set device bits FIS - device to host +} AHCI_FIS_TYPE; + +typedef struct { + uint8_t fis_type; // FIS_TYPE_REG_H2D + + uint8_t pmport:4; // Port multiplier + uint8_t rsv0:3; // Reserved + uint8_t c:1; // 1: Command, 0: Control + + uint8_t command; // Command register + uint8_t featurel; // Feature register, 7:0 + + uint8_t lba0; // LBA low register, 7:0 + uint8_t lba1; // LBA mid register, 15:8 + uint8_t lba2; // LBA high register, 23:16 + uint8_t device; // Device register + + uint8_t lba3; // LBA register, 31:24 + uint8_t lba4; // LBA register, 39:32 + uint8_t lba5; // LBA register, 47:40 + uint8_t featureh; // Feature register, 15:8 + + uint8_t countl; // Count register, 7:0 + uint8_t counth; // Count register, 15:8 + uint8_t icc; // Isochronous command completion + uint8_t control; // Control register + + uint8_t rsv1[4]; // Reserved +} AHCI_FIS_REG_HOST_TO_DEVICE; + +typedef struct { + uint8_t fis_type; // FIS_TYPE_REG_D2H + + uint8_t pmport:4; // Port multiplier + uint8_t rsv0:2; // Reserved + uint8_t i:1; // Interrupt bit + uint8_t rsv1:1; // Reserved + + uint8_t status; // Status register + uint8_t error; // Error register + + uint8_t lba0; // LBA low register, 7:0 + uint8_t lba1; // LBA mid register, 15:8 + uint8_t lba2; // LBA high register, 23:16 + uint8_t device; // Device register + + uint8_t lba3; // LBA register, 31:24 + uint8_t lba4; // LBA register, 39:32 + uint8_t lba5; // LBA register, 47:40 + uint8_t rsv2; // Reserved + + uint8_t countl; // Count register, 7:0 + uint8_t counth; // Count register, 15:8 + uint8_t rsv3[2]; // Reserved + + uint8_t rsv4[4]; // Reserved +} AHCI_FIS_REG_DEVICE_TO_HOST; + +typedef struct { + // DWORD 0 + uint8_t fis_type; // FIS_TYPE_DATA + + uint8_t pmport:4; // Port multiplier + uint8_t rsv0:4; // Reserved + + uint8_t rsv1[2]; // Reserved + + // DWORD 1 ~ N + uint32_t data[1]; // Payload +} AHCI_FIS_DATA; + +typedef struct tagFIS_DMA_SETUP +{ + uint8_t fis_type; // FIS_TYPE_DMA_SETUP + + uint8_t pmport:4; // Port multiplier + uint8_t rsv0:1; // Reserved + uint8_t d:1; // Data transfer direction, 1 - device to host + uint8_t i:1; // Interrupt bit + uint8_t a:1; // Auto-activate. Specifies if DMA Activate FIS is needed + + uint8_t rsved[2]; // Reserved + + uint32_t DMAbufferID_low; // DMA Buffer Identifier. Used to Identify DMA buffer in host memory. + uint32_t DMAbufferID_high; // DMA Buffer Identifier. Used to Identify DMA buffer in host memory. + + uint32_t rsvd; //More reserved + + uint32_t DMAbufOffset; //Byte offset into buffer. First 2 bits must be 0 + uint32_t TransferCount; //Number of bytes to transfer. Bit 0 must be 0 + + uint32_t resvd; //Reserved +} AHCI_FIS_DMA_SETUP; + +typedef struct { + uint8_t fis_type; // FIS_TYPE_PIO_SETUP + + uint8_t pmport:4; // Port multiplier + uint8_t rsv0:1; // Reserved + uint8_t d:1; // Data transfer direction, 1 - device to host + uint8_t i:1; // Interrupt bit + uint8_t rsv1:1; + + uint8_t status; // Status register + uint8_t error; // Error register + + uint8_t lba0; // LBA low register, 7:0 + uint8_t lba1; // LBA mid register, 15:8 + uint8_t lba2; // LBA high register, 23:16 + uint8_t device; // Device register + + uint8_t lba3; // LBA register, 31:24 + uint8_t lba4; // LBA register, 39:32 + uint8_t lba5; // LBA register, 47:40 + uint8_t rsv2; // Reserved + + uint8_t countl; // Count register, 7:0 + uint8_t counth; // Count register, 15:8 + uint8_t rsv3; // Reserved + uint8_t e_status; // New value of status register + + uint16_t tc; // Transfer count + uint8_t rsv4[2]; // Reserved +} AHCI_FIS_PIO_SETUP; + +typedef struct { + // 0 + uint8_t cfl:5; // Command FIS length in DWORDS, 2 ~ 16 + uint8_t a:1; // ATAPI + uint8_t w:1; // Write, 1: H2D, 0: D2H + uint8_t p:1; // Prefetchable + + // 1 + uint8_t r:1; // Reset + uint8_t b:1; // BIST + uint8_t c:1; // Clear busy upon R_OK + uint8_t rsv0:1; // Reserved + uint8_t pmp:4; // Port multiplier port + + // 2 + uint16_t prdtl; // Physical region descriptor table length in entries + + // 4 + volatile uint32_t prdbc; // Physical region descriptor byte count transferred + + // 8 + uint32_t ctba; // Command table descriptor base address + uint32_t ctbau; // Command table descriptor base address upper 32 bits + + // 16 + uint32_t rsv1[4]; // Reserved +} AHCI_HBA_CMD_HEADER; + +typedef struct { + uint8_t fis_type; + uint8_t pmport:4; + uint8_t rsvd:2; + uint8_t i:1; + uint8_t n:1; + uint8_t statusl:3; + uint8_t rsvd2:1; + uint8_t statush:3; + uint8_t rsvd3:1; + uint8_t error; + uint32_t protocol; +} AHCI_FIS_DEV_BITS; + + +typedef volatile struct { + AHCI_FIS_DMA_SETUP dsfis; // DMA Setup FIS + uint8_t pad0[4]; + + AHCI_FIS_PIO_SETUP psfis; // PIO Setup FIS + uint8_t pad1[12]; + + AHCI_FIS_REG_DEVICE_TO_HOST rfis; // Register – Device to Host FIS + uint8_t pad2[4]; + + AHCI_FIS_DEV_BITS sdbfis; // Set Device Bit FIS + + uint8_t ufis[64]; + + uint8_t rsv[0x100-0xA0]; +} AHCI_HBA_FIS; + +typedef struct { + uint32_t dba; // Data base address + uint32_t dbau; // Data base address upper 32 bits + uint32_t rsv0; // Reserved + + uint32_t dbc:22; // Byte count, 4M max + uint32_t rsv1:9; // Reserved + uint32_t i:1; // Interrupt on completion +} AHCI_HBA_PRDT_ENTRY; + +#define COMMAND_TABLE_PRDT_ENTRY_COUNT 8 + +typedef struct { + uint8_t cfis[64]; // Command FIS + uint8_t acmd[16]; // ATAPI command, 12 or 16 bytes + uint8_t rsv[48]; // Reserved + AHCI_HBA_PRDT_ENTRY prdt_entry[COMMAND_TABLE_PRDT_ENTRY_COUNT]; // Physical region descriptor table entries, 0 ~ 65535 +} HBA_CMD_TBL; + +#define COMMAND_LIST_ENTRY_COUNT 32 +#define COMMAND_LIST_ENTRY_SIZE sizeof(AHCI_HBA_CMD_HEADER) +#define COMMAND_LIST_SIZE (COMMAND_LIST_ENTRY_COUNT * COMMAND_LIST_ENTRY_SIZE) + +#define FIS_SIZE sizeof(AHCI_HBA_FIS) + +#define COMMAND_TABLE_ENTRY_SIZE sizeof(HBA_CMD_TBL) +#define COMMAND_TABLE_ENTRY_COUNT 32 +#define COMMAND_TABLE_SIZE (COMMAND_TABLE_ENTRY_SIZE * COMMAND_LIST_ENTRY_COUNT) + +#define MEMORY_PER_AHCI_PORT (COMMAND_LIST_SIZE + FIS_SIZE + COMMAND_TABLE_SIZE) + +// Here we using port_num = 0 because we using new memory layout. +#define AHCI_COMMAND_LIST(mem, port_num) (((size_t)mem) + (MEMORY_PER_AHCI_PORT * port_num)) +#define AHCI_FIS(mem, port_num) (AHCI_COMMAND_LIST(mem, port_num) + COMMAND_LIST_SIZE) +#define AHCI_COMMAND_TABLE(mem, port_num) (AHCI_FIS(mem, port_num) + FIS_SIZE) +#define AHCI_COMMAND_TABLE_ENTRY(mem, port_num, i) (AHCI_COMMAND_TABLE(mem, port_num) + (i * COMMAND_TABLE_ENTRY_SIZE)) + +struct ahci_port_descriptor { + AHCI_HBA_CMD_HEADER* command_list_addr_virt; + size_t command_list_addr_phys; + + size_t fis_virt; + size_t fis_phys; +}; + +void ahci_init(); +bool ahci_is_drive_attached(size_t port_num); +int ahci_free_cmd_slot(size_t port_num); +void ahci_start_cmd(size_t port_num); +void ahci_stop_cmd(size_t port_num); +void ahci_rebase_memory_for(size_t port_num); +void ahci_identify(size_t port_num); +void ahci_read_sectors(size_t port_num, size_t location, size_t sector_count, void* buffer); +void ahci_write_sectors(size_t port_num, size_t location, size_t sector_count, void* buffer); \ No newline at end of file diff --git a/kernel/include/drv/ata.h b/kernel/include/drv/disk/ata.h similarity index 53% rename from kernel/include/drv/ata.h rename to kernel/include/drv/disk/ata.h index 89bc3d01e..5f95873fb 100644 --- a/kernel/include/drv/ata.h +++ b/kernel/include/drv/disk/ata.h @@ -1,6 +1,7 @@ #pragma once -#include "common.h" +#include "ndpm.h" +#include "../../common.h" #define ATA_SR_BSY 0x80 #define ATA_SR_DRDY 0x40 @@ -35,16 +36,16 @@ #define ATA_CMD_IDENTIFY 0xEC #define ATA_IDENT_DEVICETYPE 0 -#define ATA_IDENT_CYLINDERS 2 -#define ATA_IDENT_HEADS 6 -#define ATA_IDENT_SECTORS 12 -#define ATA_IDENT_SERIAL 20 -#define ATA_IDENT_MODEL 54 -#define ATA_IDENT_CAPABILITIES 98 -#define ATA_IDENT_FIELDVALID 106 -#define ATA_IDENT_MAX_LBA 120 -#define ATA_IDENT_COMMANDSETS 164 -#define ATA_IDENT_MAX_LBA_EXT 200 +#define ATA_IDENT_CYLINDERS 1 +#define ATA_IDENT_HEADS 3 +#define ATA_IDENT_SECTORS 6 +#define ATA_IDENT_SERIAL 10 +#define ATA_IDENT_MODEL 27 +#define ATA_IDENT_CAPABILITIES 49 +#define ATA_IDENT_FIELDVALID 53 +#define ATA_IDENT_MAX_LBA 60 +#define ATA_IDENT_COMMANDSETS 82 +#define ATA_IDENT_MAX_LBA_EXT 100 #define IDE_ATA 0x00 #define IDE_ATAPI 0x01 @@ -97,24 +98,32 @@ #define ATA_SECONDARY_IRQ 15 #define PRIM_SEC(bus) ((bus) == ATA_PRIMARY?"Primary ":"Secondary") -#define MAST_SLV(drive) ((drive) == ATA_PRIMARY?"master":"slave ") +#define MAST_SLV(drive) ((drive) == ATA_MASTER?"master":"slave ") #define DRIVE(bus, drive) ((bus) << 1 | (drive)) #define ATA_PORT(bus) ((bus) == ATA_PRIMARY ? ATA_PRIMARY_IO : ATA_SECONDARY_IO) +/// Эта структура определяет каждый ATA диск в системе typedef struct { - bool online; - size_t capacity; + uint8_t drive; + bool online; /// Устройство доступно? + size_t capacity; /// Ёмкость диска в секторах - bool is_packet; - bool is_chs_addressing; + bool is_packet; /// Является ли пакетным устройством? + bool is_medium_inserted; + bool is_chs_addressing; /// Адресация по CHS? - uint16_t block_size; + uint16_t block_size; /// Размер сектора - uint16_t cylinders; - uint16_t heads; - uint16_t sectors; + uint16_t cylinders; /// Цилиндры + uint16_t heads; /// Головки + uint16_t sectors; /// Сектора - bool is_sata; + bool is_sata; /// Является ли этот диск SATA устройством? + bool is_dma; /// Поддерживает ли этот диск DMA? + + char* model_name; + char* fwversion; + char* serial_number; } ata_drive_t; @@ -122,14 +131,14 @@ void ide_select_drive(uint8_t bus, bool slave); void ide_400ns_delay(uint16_t io); void ide_poll(uint16_t io); -uint8_t ata_read_sector(uint8_t drive, uint8_t *buf, uint32_t lba); -uint8_t ata_write_raw_sector(uint8_t drive, const uint8_t *buf, uint32_t lba); +uint8_t ata_pio_read_sector(uint8_t drive, uint8_t *buf, uint32_t lba); +uint8_t ata_pio_write_raw_sector(uint8_t drive, const uint8_t *buf, uint32_t lba); -void ata_write_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, size_t sectors); -void ata_read_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, uint32_t numsects); +void ata_pio_write_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, size_t sectors); +void ata_pio_read_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, uint32_t numsects); -void ata_read(uint8_t drive, uint8_t* buf, uint32_t location, uint32_t length) ; -void ata_write(uint8_t drive, const uint8_t* buf, size_t location, size_t length); +void ata_pio_read(uint8_t drive, uint8_t* buf, uint32_t location, uint32_t length) ; +void ata_pio_write(uint8_t drive, const uint8_t* buf, size_t location, size_t length); void ata_list(); void ata_init(); @@ -137,4 +146,19 @@ void ata_init(); ata_drive_t* ata_get_drives(); void ata_check_all(); -uint8_t ide_identify(uint8_t bus, uint8_t drive); \ No newline at end of file +uint8_t ide_identify(uint8_t bus, uint8_t drive); + +static inline void ata_set_params(uint8_t drive, uint16_t* io, uint8_t* real_drive) { + uint8_t _io = drive >> 1; // PRIMARY / SECONDARY + uint8_t _drv = drive & 1; // MASTER / SLAVE + + if(_io == ATA_PRIMARY) + *io = ATA_PRIMARY_IO; + else if(_io == ATA_SECONDARY) + *io = ATA_SECONDARY_IO; + + *real_drive = _drv; +} + +void ata_ndpm_read(const ndpm_drive_t* drive, size_t location, int size, void* buffer); +void ata_ndpm_write(const ndpm_drive_t* drive, size_t location, int size, void* buffer); \ No newline at end of file diff --git a/kernel/include/drv/disk/ata_dma.h b/kernel/include/drv/disk/ata_dma.h new file mode 100644 index 000000000..0f1411e27 --- /dev/null +++ b/kernel/include/drv/disk/ata_dma.h @@ -0,0 +1,15 @@ +#pragma once + +#include "common.h" +#include "sys/status.h" + +#define ATA_DMA_MARK_END 0x8000 + +typedef struct prdt { + uint32_t buffer_phys; + uint16_t transfer_size; + uint16_t mark_end; +} __attribute__((packed)) prdt_t; + +status_t ata_dma_read(uint8_t drive, char *buf, uint32_t location, uint32_t length); +status_t ata_dma_write(uint8_t drive, const char *buf, uint32_t location, uint32_t length); \ No newline at end of file diff --git a/kernel/include/drv/disk/dpm.h b/kernel/include/drv/disk/dpm.h new file mode 100644 index 000000000..af65a82fa --- /dev/null +++ b/kernel/include/drv/disk/dpm.h @@ -0,0 +1,36 @@ +#pragma once + +#include + +#define DPM_ERROR_NO_MOUNT (-1) ///< Не удалось примонтировать устройство +#define DPM_ERROR_NOT_READY (-2) ///< Устройство не готово к работе +#define DPM_ERROR_NO_READ (-3) ///< Не удалось прочитать файл + +// disk, offset, size, buffer +typedef int (*dpm_disk_rw_cmd)(size_t,size_t,size_t,void*); + +typedef struct { + bool Ready; ///< Устройство подключено? (1 - да | 0 - нет) + char Name[128]; ///< Имя диск + char FileSystem[64]; ///< Файловая система + int Status; ///< Режим устройства (0 - не обслуживает | 1 - Чтение/Запись | 2 - Только чтение) + size_t Size; ///< Размер диска (в байтах) + size_t Sectors; ///< Кол-во секторов + size_t SectorSize; ///< Размер секторов + int AddrMode; ///< Метод адрессации (0 - CHS | 1 - LBA | 2 - RAM | 3 - RW for FNC) + char Serial[16]; ///< Серийный номер диска + void* Point; ///< Точка входа в оперативной памяти + void* Reserved; ///< Можно в ОЗУ дописать доп.данные если требуется. + dpm_disk_rw_cmd Read; ///< Команда для чтения данных + dpm_disk_rw_cmd Write; ///< Команда для записи данных +} __attribute__((packed)) DPM_Disk; + + + +void* dpm_metadata_read(char Letter); +void dpm_metadata_write(char Letter, uint32_t Addr); +size_t dpm_read(char Letter, size_t Offset, size_t Size, void *Buffer); +int dpm_reg(char Letter, char* Name, char* FS, int Status, size_t Size, size_t Sectors, size_t SectorSize, int AddrMode, char* Serial, void *Point); +DPM_Disk dpm_info(char Letter); +int dpm_unmount(char Letter, bool FreeReserved); +void dpm_LabelUpdate(char Letter, char* Label); \ No newline at end of file diff --git a/kernel/include/drv/disk/floppy.h b/kernel/include/drv/disk/floppy.h index d849626a5..b9bb36a5a 100644 --- a/kernel/include/drv/disk/floppy.h +++ b/kernel/include/drv/disk/floppy.h @@ -105,7 +105,8 @@ enum FloppyRegisters FLOPPY_DIGITAL_INPUT_REGISTER = 7, ///< (?) Доступно в режиме только чтения FLOPPY_CONFIGURATION_CONTROL_REGISTER = 7 ///< [Исп] Регистр для управления конфигурацией, в режиме только записи }; -typedef int (*FloppyRW_t)(int,char*,uint32_t,uint32_t); +typedef size_t (*FloppyR_t)(int,char*,uint32_t,uint32_t); +typedef size_t (*FloppyW_t)(int,const char*,uint32_t,uint32_t); typedef int (*FloppyCache_t)(int,FloppyMode,uint32_t,uint32_t*,uint32_t*); typedef struct floppy { @@ -118,9 +119,9 @@ typedef struct floppy int Motor; ///< Статус мотора char Name[12]; ///< Название дискеты char FileSystem[12]; ///< Файловая система - unsigned Cyr; ///< ? - FloppyRW_t Read; ///< Команда для чтения данных - FloppyRW_t Write; ///< Команда для записи данных + unsigned Cyr; ///< Цилиндры + FloppyR_t Read; ///< Команда для чтения данных + FloppyW_t Write; ///< Команда для записи данных FloppyCache_t Cache; ///< Команда для кэша const char* Buffer; ///< Буфер } floppy_t; \ No newline at end of file diff --git a/kernel/include/drv/disk/ndpm.h b/kernel/include/drv/disk/ndpm.h new file mode 100644 index 000000000..8cca2b352 --- /dev/null +++ b/kernel/include/drv/disk/ndpm.h @@ -0,0 +1,29 @@ +// +// Created by ndraey on 23.12.23. +// + +#pragma once +#include "common.h" + +typedef struct ndpm_drive ndpm_drive_t; + +typedef void (*ndpm_read_fn_t)(const ndpm_drive_t*, size_t location, int size, void* buffer); +typedef void (*ndpm_write_fn_t)(const ndpm_drive_t*, size_t location, int size, void* buffer); + +typedef struct ndpm_drive { + void* drive_specific_data; + ndpm_read_fn_t read_fn; + ndpm_write_fn_t write_fn; +} ndpm_drive_t; + +void ndpm_init(); +void ndpm_add_drive(void* specific_data, ndpm_read_fn_t reader, ndpm_write_fn_t writer); +ndpm_drive_t* ndpm_get_drive(int index); + +SAYORI_INLINE void ndpm_read(const ndpm_drive_t* drive, size_t location, int size, void* buffer) { + drive->read_fn(drive, location, size, buffer); +} + +SAYORI_INLINE void ndpm_write(const ndpm_drive_t* drive, size_t location, int size, void* buffer) { + drive->write_fn(drive, location, size, buffer); +} \ No newline at end of file diff --git a/kernel/include/drv/input/keyboard.h b/kernel/include/drv/input/keyboard.h old mode 100755 new mode 100644 index 4595c6307..f7b267f23 --- a/kernel/include/drv/input/keyboard.h +++ b/kernel/include/drv/input/keyboard.h @@ -14,4 +14,5 @@ void gets(char *buffer); bool is_lctrl_key(); int getCharRaw(); int getIntKeyboardWait(); -uint8_t getPressReleaseKeyboard(); \ No newline at end of file +uint8_t getPressReleaseKeyboard(); +int gets_max(char *buffer, int length); \ No newline at end of file diff --git a/kernel/include/drv/pci.h b/kernel/include/drv/pci.h index 71dc01c2a..db56b654d 100644 --- a/kernel/include/drv/pci.h +++ b/kernel/include/drv/pci.h @@ -3,69 +3,68 @@ * @file drv/pci.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), Арен Елчинян (SynapseOS) * @brief Драйвер PCI (Peripheral Component Interconnect) - * @version 0.3.3 + * @version 0.3.4 * @date 2023-01-14 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ #pragma once -#include #include #define CLASS_DEVICE_TOO_OLD 0x00 ///! Устройство не имеет идентификатора класса, возможно, оно было сделано до его определения -#define CLASS_MASS_STORAGE 0x01 ///< Контроллер запоминающего устройства -#define CLASS_NETWORK_CTRLR 0x02 ///< Сетевой контроллер -#define CLASS_DISPLAY 0x03 ///< Контроллер дисплея -#define CLASS_MULTIMEDIA 0x04 ///< Мультимедийный контроллер -#define CLASS_MEMORY 0x05 ///< Контроллер памяти -#define CLASS_BRIDGE 0x06 ///< Мост -#define CLASS_SCC 0x07 ///< Простой коммуникационный контроллер -#define CLASS_SYSTEM 0x08 ///< Периферийное устройство базовой системы -#define CLASS_INPUT 0x09 ///< Контроллер устройства ввода -#define CLASS_DOCK 0x0A ///< Док-станция -#define CLASS_PROCESSOR 0x0B ///< Процессор -#define CLASS_SERIAL_BUS 0x0C ///< Контроллер последовательной шины -#define CLASS_WIRELESS 0x0D ///< Беспроводной контроллер -#define CLASS_INTELLIGENTIO 0x0E ///< Интеллектуальный контроллер -#define CLASS_SATELLITE 0x0F ///< Контроллер спутниковой связи -#define CLASS_ENCRYPT 0x10 ///< Контроллер шифрования -#define CLASS_SIGNAL_PROC 0x11 ///< Контроллер обработки сигналов -#define CLASS_PROC_ACCEL 0x12 ///< Ускоритель обработки -#define CLASS_NO_ESS_INS 0x13 ///< Второстепенная аппаратура -#define CLASS_CO_CPU 0x40 ///< Со-Процессор +#define CLASS_MASS_STORAGE 0x01 /// Контроллер запоминающего устройства +#define CLASS_NETWORK_CTRLR 0x02 /// Сетевой контроллер +#define CLASS_DISPLAY 0x03 /// Контроллер дисплея +#define CLASS_MULTIMEDIA 0x04 /// Мультимедийный контроллер +#define CLASS_MEMORY 0x05 /// Контроллер памяти +#define CLASS_BRIDGE 0x06 /// Мост +#define CLASS_SCC 0x07 /// Простой коммуникационный контроллер +#define CLASS_SYSTEM 0x08 /// Периферийное устройство базовой системы +#define CLASS_INPUT 0x09 /// Контроллер устройства ввода +#define CLASS_DOCK 0x0A /// Док-станция +#define CLASS_PROCESSOR 0x0B /// Процессор +#define CLASS_SERIAL_BUS 0x0C /// Контроллер последовательной шины +#define CLASS_WIRELESS 0x0D /// Беспроводной контроллер +#define CLASS_INTELLIGENTIO 0x0E /// Интеллектуальный контроллер +#define CLASS_SATELLITE 0x0F /// Контроллер спутниковой связи +#define CLASS_ENCRYPT 0x10 /// Контроллер шифрования +#define CLASS_SIGNAL_PROC 0x11 /// Контроллер обработки сигналов +#define CLASS_PROC_ACCEL 0x12 /// Ускоритель обработки +#define CLASS_NO_ESS_INS 0x13 /// Второстепенная аппаратура +#define CLASS_CO_CPU 0x40 /// Со-Процессор -#define PCI_ADDRESS_PORT 0xCF8 ///< Точка входа || Адрес конфигурации, который требуется для доступа -#define PCI_DATA_PORT 0xCFC ///< Пароль входа || Генерирует доступ к конфигурации и будет передавать данные в или из регистра +#define PCI_ADDRESS_PORT 0xCF8 /// Точка входа || Адрес конфигурации, который требуется для доступа +#define PCI_DATA_PORT 0xCFC /// Пароль входа || Генерирует доступ к конфигурации и будет передавать данные в или из регистра -#define PCI_VENDOR_NO_DEVICE 0xFFFF ///< Устройство не найдено +#define PCI_VENDOR_NO_DEVICE 0xFFFF /// Устройство не найдено /** * @brief Структура устройства */ typedef struct pci_header_t { - uint16_t vendor_id; ///< ID-Поставщика - uint16_t device_id; ///< ID-Устройства - uint8_t revision; ///< ID-Реверсии - uint8_t prog_if; ///< Положение дел (???) Prog IF - uint8_t subclass_id; ///< Подкатегория устройства - uint8_t class_id; ///< Категория устройства - uint8_t cache_line_size; ///< Размер строки кэша - uint8_t latency_timer; ///< Таймер задержки - uint8_t hdr_type; ///< Тип заголовка (???) - uint8_t bist; ///< БИСТ (???) BIST - uint32_t bar[6]; ///< ??? - uint32_t cardbus_cis_ptr; ///< Базовый адрес CardBus Socket/ExCa - uint16_t subsys_vendor; ///< ??? - uint16_t subsys_id; ///< ??? - uint32_t expansion_rom; ///< ??? - uint8_t capatibilities; ///< ??? - uint8_t reserved[3]; ///< Зарезервированный - uint32_t reserved2; ///< Зарезервированный - uint8_t int_line; ///< Линия прерывания - uint8_t int_pin; ///< ПИН-код прерывания - uint8_t min_grant; ///< ??? - uint8_t max_latency; ///< ??? + uint16_t vendor_id; /// ID-Поставщика + uint16_t device_id; /// ID-Устройства + uint8_t revision; /// ID-Реверсии + uint8_t prog_if; /// Положение дел (???) Prog IF + uint8_t subclass_id; /// Подкатегория устройства + uint8_t class_id; /// Категория устройства + uint8_t cache_line_size; /// Размер строки кэша + uint8_t latency_timer; /// Таймер задержки + uint8_t hdr_type; /// Тип заголовка (???) + uint8_t bist; /// БИСТ (???) BIST + uint32_t bar[6]; /// ??? + uint32_t cardbus_cis_ptr; /// Базовый адрес CardBus Socket/ExCa + uint16_t subsys_vendor; /// ??? + uint16_t subsys_id; /// ??? + uint32_t expansion_rom; /// ??? + uint8_t capatibilities; /// ??? + uint8_t reserved[3]; /// Зарезервированный + uint32_t reserved2; /// Зарезервированный + uint8_t int_line; /// Линия прерывания + uint8_t int_pin; /// ПИН-код прерывания + uint8_t min_grant; /// ??? + uint8_t max_latency; /// ??? } pci_header_t; uint16_t pci_read_confspc_word(uint8_t bus, uint8_t slot, uint8_t function, uint8_t offset); @@ -80,4 +79,6 @@ uint32_t pci_get_bar(uint8_t hdrtype, uint8_t bus, uint8_t slot, uint8_t func, u void pci_find_device(uint16_t vendor, uint16_t device, uint8_t *bus_ret, uint8_t *slot_ret, uint8_t *func_ret); void pci_print_list(); void pci_write(uint8_t bus, uint8_t slot, uint8_t func, uint32_t offset, uint32_t value); - +void pci_find_device_by_class_and_subclass(uint16_t class, uint16_t subclass, uint16_t *vendor_ret, uint16_t *deviceid_ret, + uint8_t *bus_ret, uint8_t *slot_ret, uint8_t *func_ret); +uint32_t pci_read32(uint8_t bus, uint8_t slot, uint8_t function, uint8_t offset); \ No newline at end of file diff --git a/kernel/include/drv/psf.h b/kernel/include/drv/psf.h index 778ada4ee..4a8aa977f 100644 --- a/kernel/include/drv/psf.h +++ b/kernel/include/drv/psf.h @@ -22,6 +22,7 @@ typedef struct __attribute__((packed)) { uint8_t charHeight; } psf_t; +bool text_init(char* psf); void draw_vga_ch(uint16_t c, uint16_t c2, size_t pos_x, size_t pos_y, size_t color); void draw_vga_str(const char* text, size_t len, int x, int y, uint32_t color); size_t psf1_get_w(); diff --git a/kernel/include/drv/ramdisk.h b/kernel/include/drv/ramdisk.h deleted file mode 100755 index ed2a4c2a9..000000000 --- a/kernel/include/drv/ramdisk.h +++ /dev/null @@ -1,56 +0,0 @@ -#pragma once -#include - -#define USTAR_NORMAL_FILE '0' -#define USTAR_HARD_LINK '1' -#define USTAR_SYMBOLIC_LINK '2' -#define USTAR_CHARACTER_DEVICE '3' -#define USTAR_BLOCK_DEVICE '4' -#define USTAR_DIRECTORY '5' -#define USTAR_NAMED_PIPE '6' - -/** - * @brief Структура файла - */ -typedef struct { - char fname[100]; - char fmode[8]; - - char uid[8]; - char gid[8]; - - char size[12]; - char mtime[12]; - - char checksum[8]; - char type; - - char linkname[100]; - char signature[6]; - char version[2]; - - char user_name[32]; - char group_name[32]; - - char device_major_number[8]; - char device_minor_number[8]; - - char fprefix[155]; - - char reserved[12]; -} __attribute__((packed)) ustar_file_t; - -int32_t oct2bin(unsigned char *str, int32_t size); - -uint32_t tar_getsize(const char *in); -int32_t tar_lookup(unsigned char *archive, char *filename); - -uint32_t initrd_read(char *filename, int32_t offset, int32_t size, vfs_filesystem_t *u, void *buffer); - -uint32_t initrd_file_exists(char *filename, vfs_filesystem_t *u); -uint32_t initrd_get_filesize(char *filename); - -uint32_t initrd_is_dir(char *filename); - -void initrd_list(int32_t argc, char **arg); -void initrd_init(uint32_t begin, uint32_t end); diff --git a/kernel/include/drv/rtl8139.h b/kernel/include/drv/rtl8139.h index 2f49e9b8c..d273344ae 100644 --- a/kernel/include/drv/rtl8139.h +++ b/kernel/include/drv/rtl8139.h @@ -1,5 +1,7 @@ #pragma once +#include + #define RTL8139_VENDOR 0x10EC #define RTL8139_DEVICE 0x8139 @@ -20,6 +22,15 @@ enum RTL8139_regs { #define CAPR 0x38 #define RX_READ_POINTER_MASK (~3) +// Ethernet II header (w/o VLAN 802.11Q tag) +typedef struct { + uint16_t Header; ///< Заголовок (?) + uint16_t Size; ///< Размер пакета + char MAC_DEVICE[6]; ///< Куда (на какой мак-устройства) + char MAC_SOURCE[6]; ///< Источник (от какого мак-устройства) + uint16_t Type; ///< Тип источника +} __attribute__((packed)) EthernetPacked; + void rtl8139_init(); void rtl8139_wake_up(); void rtl8139_sw_reset(); @@ -28,4 +39,5 @@ void rtl8139_init_interrupts(); void rtl8139_read_mac(); void rtl8139_setup_rcr(); void rtl8139_enable_rx_tx(); -void rtl8139_send_packet(void* data, size_t length); \ No newline at end of file +void rtl8139_send_packet(void* data, size_t length); +void rtl8139_end_interrupt(); \ No newline at end of file diff --git a/kernel/include/drv/vfs.h b/kernel/include/drv/vfs.h deleted file mode 100755 index 081acd1b1..000000000 --- a/kernel/include/drv/vfs.h +++ /dev/null @@ -1,76 +0,0 @@ -#pragma once -/* - 0 - диск не используется, - 1 - AHCI, - 2 - ATA, - 3 - Устройство хранения, - 4 - Другое -*/ -typedef struct vfs_storage_dev_t { - int32_t type; - - int32_t disk_id; - int32_t partition_id; - - int32_t lba_start; - int32_t lba_end; - - char *name; - - uint32_t (*read) (int*, unsigned long long, unsigned long long, uint16_t*); - uint32_t (*write) (int*, unsigned long long, unsigned long long, uint16_t*); -} vfs_storage_dev_t; - -// Некоторые файловые системы -typedef struct vfs_filesystem_t { - int32_t fs_type; // 0 - tar-fs, 1 - ext2, 2 - ext3, 3 - ext4, 4 - fat32 - int32_t block_size; - - vfs_storage_dev_t *dev; -} vfs_filesystem_t; - -// Содержит указатели на некоторые методы файловой системы. -typedef struct vfs_filesystem_handles_t { - uint32_t (*read) (char *fn, int, int, vfs_filesystem_t*, void*); - uint32_t (*write) (char *fn, int, int, vfs_filesystem_t*, void*); - - uint32_t (*readdir) (char*, vfs_filesystem_t*, void*); - - uint32_t (*mkfile) (char *fn, char*, vfs_filesystem_t*, uint16_t); - uint32_t (*mkdir) (char *fn, char*, vfs_filesystem_t*, uint16_t); - - uint32_t (*rm) (char *fn, vfs_filesystem_t*); - uint32_t (*ls) (char *fn, vfs_filesystem_t*); - - uint32_t (*get_size) (char *fn, vfs_filesystem_t*); - uint32_t (*exists) (char *fn, vfs_filesystem_t*); - uint32_t (*is_dir) (char *fn, vfs_filesystem_t*); -} vfs_filesystem_handles_t; - -// Точка монтирования VFS -typedef struct vfs_mount_info_t { - char *location; - vfs_filesystem_t *fs; - vfs_filesystem_handles_t *fs_handles; -} vfs_mount_info_t; - -void vfs_init(); - -void vfs_mount_list(); -int32_t vfs_mount(vfs_storage_dev_t *dev, vfs_filesystem_handles_t *fs_handles, int32_t type, char *location, int32_t block_size); -int32_t vfs_mount_find(char *path, int32_t *filename_add); - -int32_t vfs_read(const char *filename, int32_t offset, int32_t size, void *buf); -int32_t vfs_get_size(const char *filename); -int32_t vfs_write(char *filename, int32_t offset, int32_t size, void *buf); - -int32_t vfs_mkdir(char *filename, char *path, uint16_t perms); -int32_t vfs_mkfile(char *filename, char *path, uint16_t perms); - -int32_t vfs_list(char *path, void *buf); -int32_t vfs_rm(char *filename); - -int32_t vfs_exists(const char *filename); -int32_t vfs_is_dir(char *filename); - -void vfs_get_file_name_from_path(char *fpath, char *buf); diff --git a/kernel/include/drv/vfs_new.h b/kernel/include/drv/vfs_new.h old mode 100755 new mode 100644 diff --git a/kernel/include/elf/elf.h b/kernel/include/elf/elf.h old mode 100755 new mode 100644 index 390aabb5f..20c6932a6 --- a/kernel/include/elf/elf.h +++ b/kernel/include/elf/elf.h @@ -1,4 +1,8 @@ #pragma once + +#include "mem/vmm.h" +#include "lib/stdio.h" + #define EI_NIDENT 16 /*----------------------------------------------------------------------------- @@ -134,18 +138,19 @@ typedef struct typedef struct elf_sections { - Elf32_Ehdr* elf_header; ///< ELF заголовок + Elf32_Ehdr elf_header; ///< ELF заголовок Elf32_Shdr* section; ///< Секции Elf32_Phdr* p_header; ///< Программный заголовок FILE* file; ///< Ссылка на файл +} elf_t; -} elf_sections_t; - -elf_sections_t* load_elf(const char* name); +elf_t* load_elf(const char* name); +void unload_elf(elf_t* elf); +int32_t run_elf_file(const char *name, int argc, char* eargv[]); static inline bool is_elf_file(FILE* fp) { - char* temp = (char*)kmalloc(4); + char* temp = kmalloc(4); size_t orig = ftell(fp); fseek(fp, 0, SEEK_SET); diff --git a/kernel/include/fmt/tga.h b/kernel/include/fmt/tga.h index 10e572c00..aa94fd114 100644 --- a/kernel/include/fmt/tga.h +++ b/kernel/include/fmt/tga.h @@ -30,4 +30,5 @@ typedef struct { } __attribute__((packed)) tga_header_t; bool tga_extract_info(const char* path, tga_header_t* out_meta); -int tga_extract_pixels(const char* path, uint32_t* pixel_buf); \ No newline at end of file +int tga_extract_pixels(const char* path, uint32_t* pixel_buf); +int tga_extract_pixels_from_data(const char* raw_data, uint32_t* pixel_buf); \ No newline at end of file diff --git a/kernel/include/fmt/wav.h b/kernel/include/fmt/wav.h index 71bd0e352..5f63a3048 100644 --- a/kernel/include/fmt/wav.h +++ b/kernel/include/fmt/wav.h @@ -1,3 +1,7 @@ +#pragma once + +#include "common.h" + typedef struct __attribute__((packed)) { char chunkID[4]; uint32_t chunkSize; @@ -10,6 +14,9 @@ typedef struct __attribute__((packed)) { uint32_t byteRate; uint16_t blockAlign; uint16_t bitsPerSample; - char subchunk2ID[4]; - uint32_t subchunk2Size; } WAVHeader; + +struct WAVInfoChunk { + char name[4]; + uint32_t size; +} __attribute__((packed)); diff --git a/kernel/include/fs/fat32.h b/kernel/include/fs/fat32.h new file mode 100644 index 000000000..d3f5ac6a7 --- /dev/null +++ b/kernel/include/fs/fat32.h @@ -0,0 +1,110 @@ +/** + * @file drv/fs/fat32.c + * @author Павленко Андрей (pikachu_andrey@vk.com) + * @brief Файловая система FAT32 + * @version 0.3.4 + * @date 2023-11-04 + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ +#pragma once + +#include +#include +#include +#include "../../src/lib/libvector/include/vector.h" + +typedef struct { + char bootcode[3]; + char OEM[8]; + uint16_t bytes_per_sector; + uint8_t sectors_per_cluster; + uint16_t reserved_sectors; + uint8_t copies; + uint16_t root_entries; + uint16_t small_sectors_number; + uint8_t descriptor; + uint16_t sectors_per_fat; + uint16_t sectors_per_track; + uint16_t heads; + uint32_t hidden_sectors; + uint32_t sectors_in_partition; + uint32_t fat_size_in_sectors; + uint16_t flags; + uint16_t version_num; + uint32_t root_directory_offset_in_clusters; + uint16_t fsinfo_sector; + uint16_t _; + char reserved1[12]; + uint8_t disk_number; + uint8_t flags1; + uint8_t extended_boot_signature; + uint32_t volume_serial_number; + char volume_label[11]; + char fs_type[8]; +} __attribute__((packed)) fat_info_t; + +typedef struct { + char short_file_name[11]; // 8.3 + uint8_t attributes; + uint8_t register_sign; + + uint8_t create_millis; + uint16_t create_time; + uint16_t create_date; + uint16_t last_access_date; + + uint16_t first_cluster_high; + uint16_t last_modif_time; + uint16_t last_modif_date; + uint16_t first_cluster_low; + uint32_t file_size_in_bytes; +} __attribute__((packed)) fat_object_info_t; + +typedef struct { + uint8_t attr_number; + uint16_t first_name_chunk[5]; + uint8_t attribute; + uint8_t reserved; + uint8_t checksum; + uint16_t second_name_chunk[6]; + uint16_t reserved2; + uint16_t third_name_chunk[2]; +} __attribute__((packed)) LFN_t; + +typedef struct { + fat_info_t info; + + uint32_t cluster_size; + uint32_t fat_offset; + uint32_t fat_size; + uint32_t reserved_fat_offset; + uint32_t root_directory_offset; +} fat_description_t; // This structure never used in data parsing and represents all needed data for FAT32 driver. + +#define LFN_LAST_ENTRY 0x40 + +struct fat32_lfn_result { + char* filename; + size_t encoded_characters_count; +}; + +typedef struct { + char filename[256]; + size_t size; + + size_t starting_cluster; + + fat_object_info_t advanced_info; + + bool is_lfn; +} fat_file_info_t; + +size_t fs_fat32_read(char Disk,const char* Path, size_t Offset, size_t Size,void* Buffer); +size_t fs_fat32_write(char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer); +FSM_FILE fs_fat32_info(char Disk,const char* Path); +FSM_DIR* fs_fat32_dir(char Disk,const char* Path); +int fs_fat32_create(char Disk,const char* Path,int Mode); +int fs_fat32_delete(char Disk,const char* Path,int Mode); +void fs_fat32_label(char Disk, char* Label); +int fs_fat32_detect(char Disk); +vector_t* fs_fat32_get_clusters(char Disk, size_t cluster_number); \ No newline at end of file diff --git a/kernel/include/fs/fsm.h b/kernel/include/fs/fsm.h new file mode 100644 index 000000000..27805f71a --- /dev/null +++ b/kernel/include/fs/fsm.h @@ -0,0 +1,89 @@ +#pragma once + +#include + + +typedef struct { + uint16_t year; ///< Год + uint8_t month; ///< Месяц + uint8_t day; ///< День + uint8_t hour; ///< Час + uint8_t minute; ///< Минуты + uint8_t second; ///< Секунды +} __attribute__((packed)) FSM_TIME; + +typedef struct { + int Ready; ///< Существует ли файл? + char Name[1024]; ///< Имя файла + char Path[1024]; ///< Путь файла + int Mode; ///< Режим файла + size_t Size; ///< Размер файла в байтах (oсt2bin) + FSM_TIME LastTime; ///< Время последнего изменения файла + int Type; ///< Тип элемента +} __attribute__((packed)) FSM_FILE; + +typedef struct { + int Ready; ///< Существует ли файл? + size_t Count; ///< Количество всего + size_t CountFiles; ///< Количество файлов + size_t CountDir; ///< Количество папок + size_t CountOther; ///< Количество неизвестного типа файлов + FSM_FILE* Files; ///< Файлы и папки +} __attribute__((packed)) FSM_DIR; + +///! Буква, Название, откуда, сколько, буфер +typedef size_t (*fsm_cmd_read_t)(const char,const char*,size_t,size_t,void*); + +///! Буква, Название, куда, сколько, буфер +typedef size_t (*fsm_cmd_write_t)(const char,const char*,size_t,size_t,void*); + +///! Буква, Название +typedef FSM_FILE (*fsm_cmd_info_t)(const char,const char*); + +///! Буква, Название +typedef FSM_DIR* (*fsm_cmd_dir_t)(const char,const char*); + +///! Буква, Название, Тип (0 - файл | 1 - папка) +typedef int (*fsm_cmd_create_t)(const char,const char*,int); + +///! Буква, Название, Тип (0 - файл | 1 - папка) +typedef int (*fsm_cmd_delete_t)(const char,const char*,int); + +///! Буква, Буфер +typedef void (*fsm_cmd_label_t)(const char,char*); + + +///! Буква, Буфер +typedef int (*fsm_cmd_detect_t)(const char); + +typedef struct { + int Ready; ///< Загружена ли фс? + char Name[64]; ///< Наименование драйвера + int Splash; ///< В какую сторону кинута палка? + fsm_cmd_read_t Read; ///< Команда для чтения + fsm_cmd_write_t Write; ///< Команда для записи + fsm_cmd_info_t Info; ///< Команда для получения информации + fsm_cmd_dir_t Dir; ///< Команда для получения информации о папке + fsm_cmd_create_t Create; ///< Команда для создания файла или папка + fsm_cmd_delete_t Delete; ///< Команда для удаления файла или папка + + fsm_cmd_label_t Label; ///< Команда для получения имени диска + fsm_cmd_detect_t Detect; ///< Команда для определения, предналежит ли диск к фс + void* Reserved; ///< Можно в ОЗУ дописать доп.данные если требуется. +} __attribute__((packed)) FSM; + + +int fsm_getIDbyName(const char* Name); +size_t fsm_read(int FIndex, char DIndex, const char* Name, size_t Offset, size_t Count, void* Buffer); +size_t fsm_write(int FIndex, char DIndex, const char* Name, size_t Offset, size_t Count, void* Buffer); +FSM_FILE fsm_info(int FIndex, char DIndex, const char* Name); +void fsm_reg(const char* Name,int Splash,fsm_cmd_read_t Read, fsm_cmd_write_t Write, fsm_cmd_info_t Info, fsm_cmd_create_t Create, fsm_cmd_delete_t Delete, fsm_cmd_dir_t Dir, fsm_cmd_label_t Label, fsm_cmd_detect_t Detect); +int fsm_delete(int FIndex, char DIndex, const char* Name, int Mode); +int fsm_create(int FIndex, char DIndex, const char* Name, int Mode); +void fsm_dump(FSM_FILE file); +int fsm_getMode(int FIndex); +FSM_DIR* fsm_dir(int FIndex, char DIndex, const char* Name); +void fsm_convertUnix(uint32_t unix_time, FSM_TIME* time); +int fsm_isPathToFile(const char* Path,const char* Name); +char* fsm_timePrintable(FSM_TIME time); +void fsm_dpm_update(char Letter); \ No newline at end of file diff --git a/kernel/include/fs/iso9660.h b/kernel/include/fs/iso9660.h new file mode 100644 index 000000000..e0a371999 --- /dev/null +++ b/kernel/include/fs/iso9660.h @@ -0,0 +1,67 @@ +#ifndef SAYORI_ISO9660_H +#define SAYORI_ISO9660_H + +#include +#include +#include + +typedef struct { + uint8_t Zero; ///< [0+1] Указывает на загрузочную запись? + char ID[5]; ///< [1+5] ОЕМ-идентификатор (Всегда CD001) + uint8_t Version; ///< [6+1] Версия файловой системы + uint8_t UnUsed00; ///< [7+1] [!] Все нули + char SystemName[32]; ///< [8+32] Имя системы, которая может работать с секторами 0x00–0x0F тома. + char Label[32]; ///< [40+32] Метка диска + char UnUsed01[8]; ///< [72] [!] Все нули + int32_t VolumeSpaceSize[2]; ///< [80] Количество логических блоков, в которых записан том. + char UnUsed02[32]; ///< [88] [!] Все нули + int32_t VolumeSetSize; ///< [120] Количество логических блоков, в которых записан том. + int32_t VolumeSequenceNumber; ///< [124] Номер этого диска в наборе томов. + int32_t LogicalBlockSize; ///< [128] Размер логического блока в байтах. NB: Это означает, что логический блок на компакт-диске может иметь размер, отличный от 2 КиБ! + int32_t PathTableSize[2]; ///< [132] Размер таблицы путей в байтах. + int32_t LocOfType_L_PathTable; ///< [140] Расположение LBA таблицы путей. Таблица путей, на которую указывает, содержит только значения с прямым порядком байтов. + int32_t LocOfOpti_L_PathTable; ///< [144] Местоположение LBA дополнительной таблицы путей. Таблица путей, на которую указывает, содержит только значения с прямым порядком байтов. Ноль означает, что дополнительная таблица путей не существует. + int32_t LocOfType_M_PathTable; ///< [148] Расположение LBA таблицы путей. Таблица путей, на которую указывает, содержит только значения с прямым порядком байтов. + int32_t LocOfOpti_M_PathTable; ///< [152] Местоположение LBA дополнительной таблицы путей. Таблица путей, на которую указывает, содержит только значения с прямым порядком байтов. Ноль означает, что дополнительная таблица путей не существует. + char DirectoryEntry[34]; ///< [156] Обратите внимание, что это не адрес LBA, а фактическая запись каталога, которая содержит однобайтовый идентификатор каталога (0x00), отсюда и фиксированный размер в 34 байта. + char VolumeSetID[128]; ///< [190] Идентификатор набора томов, членом которого является этот том. + char PublisherID[128]; ///< [318] Издательство тома. Для расширенной информации об издателе первый байт должен быть 0x5F, за которым следует имя файла в корневом каталоге. Если не указано, все байты должны быть 0x20. + char DataPreparerID[128]; ///< [446] Идентификатор лица(ов), подготовившего данные для этого тома. Для расширенной информации о подготовке первый байт должен быть 0x5F, за которым следует имя файла в корневом каталоге. Если не указано, все байты должны быть 0x20. + char ApplicationID[128]; ///< [574] Определяет, как данные записываются на этот том. Для расширенной информации первый байт должен быть 0x5F, за которым следует имя файла в корневом каталоге. Если не указано, все байты должны быть 0x20. + char CopyrightFileID[37]; ///< [702] Имя файла в корневом каталоге, который содержит информацию об авторских правах для этого набора томов. Если не указано, все байты должны быть 0x20 + char AbstractFileID[37]; ///< [739] Имя файла в корневом каталоге, который содержит абстрактную информацию для этого набора томов. Если не указано, все байты должны быть 0x20. + char BibliographicFileID[37]; ///< [776] Имя файла в корневом каталоге, содержащего библиографическую информацию для этого набора томов. Если не указано, все байты должны быть 0x20. + char VolumeCreationDate[17]; ///< [813] Дата и время создания тома. + char VolumeModificationDate[17]; ///< [830] Дата и время изменения тома. + char VolumeExpirationDate[17]; ///< [847] Дата и время, после которых этот том считается устаревшим. Если не указано, том никогда не считается устаревшим. + char VolumeEffectiveDate[17]; ///< [864] Дата и время, после которых том можно будет использовать. Если не указано иное, том можно использовать немедленно. + int8_t FileStructureVersion; ///< [881] Записи каталога и версия таблицы путей (всегда 0x01). + int8_t UnUsed03; ///< [882] [!] Всегда 0x00. + char ApplicationUsed[512]; ///< [883] Содержание не определено ISO 9660. + char Reserved[653]; ///< [1395] Зарезервировано ISO. +} ISO9660_PVD; ///< Primary Volume Descriptor || Дескриптор основного тома + +typedef struct { + int8_t LengthDirectoryRecord; ///< [0] Длина записи каталога. + int8_t ExtendedAttributeRecord; ///< [1] Длина расширенной записи атрибутов. + uint32_t LBA[2]; ///< [2] Местоположение экстента (LBA) в формате с прямым порядком байтов. + uint32_t Lenght[2]; ///< [10] Длина данных (размер экстента) в формате с прямым порядком байтов. + char Date[7]; ///< [18] Дата и время записи. + int8_t Flags; ///< [25] Флаги файлов. + int8_t Mode; ///< [26] Размер файловой единицы для файлов, записанных в чередующемся режиме, в противном случае — ноль. + int8_t Interval; ///< [27] Размер интервала чередования для файлов, записанных в режиме чередования, в противном случае — ноль. + uint32_t VolumeSequenceNumber; ///< [28] Порядковый номер тома — том, на котором записан этот экстент, в 16-битном формате с прямым порядком байтов. + int8_t ID; ///< [32] Длина идентификатора файла (имя файла). Это заканчивается знаком ';' символ, за которым следует идентификационный номер файла в десятичном формате ASCII («1»). + char* FileID; ///< [33] Идентификатор файла. + +} ISO9660_Entity; ///< Сущность файла или папки + +size_t fs_iso9660_read(char Disk,const char* Path, size_t Offset, size_t Size,void* Buffer); +size_t fs_iso9660_write(char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer); +FSM_FILE fs_iso9660_info(char Disk,const char* Path); +FSM_DIR* fs_iso9660_dir(char Disk,const char* Path); +int fs_iso9660_create(char Disk,const char* Path,int Mode); +int fs_iso9660_delete(char Disk,const char* Path,int Mode); +void fs_iso9660_label(char Disk, char* Label); +int fs_iso9660_detect(char Disk); +#endif //SAYORI_ISO9660_H diff --git a/kernel/include/fs/lucario/fs.h b/kernel/include/fs/lucario/fs.h deleted file mode 100644 index 254e5f22a..000000000 --- a/kernel/include/fs/lucario/fs.h +++ /dev/null @@ -1,19 +0,0 @@ -#pragma once - -#include - -#define LUCARIO_DIVISOR (8192) - -LucarioDescriptor_t* lucario_fs_build_descriptor(); -bool lucario_fs_init(LucarioDescriptor_t* descr, uint8_t ata_drive); -void lucario_fs_destroy_descriptor(LucarioDescriptor_t* descr); -void lucario_fs_read_file_entry(LucarioDescriptor_t* descr, size_t index, LucarioFileEntry_t* out); -void lucario_fs_get_file_entry(LucarioDescriptor_t* descr, char name[], size_t folder_id, LucarioFileEntry_t* out); -bool lucario_fs_file_exists(LucarioDescriptor_t* descr, char name[], size_t folder_id); -size_t lucario_fs_file_size(LucarioDescriptor_t* descr, char name[], size_t folder_id); - -static inline size_t lucario_fs_sector_list_pos_byte(LucarioDescriptor_t* descr, LucarioFileEntry_t* entry) { - return entry->sector_list_lba * 512; -} - -bool lucario_fs_read_file(LucarioDescriptor_t* descr, char name[], size_t folder_id, size_t offset, size_t length, char* out); \ No newline at end of file diff --git a/kernel/include/fs/lucario/structures.h b/kernel/include/fs/lucario/structures.h deleted file mode 100644 index 06c7bbac3..000000000 --- a/kernel/include/fs/lucario/structures.h +++ /dev/null @@ -1,37 +0,0 @@ -#pragma once - -#include - -#define LUCARIOFS_MAGIC "LUCARIO" - -typedef enum { - E_NONE = 0x00, - E_FILE = 0xF1, - E_FOLDER = 0xF0 -} LucarioFileEntryType_t; - -typedef struct { - char magic[7]; // LUCARIO - char version_major; - char version_minor; - char version_patch; -} __attribute__((packed)) LucarioHeader_t; - -typedef struct { - uint8_t type; - char name[256]; - uint32_t folder_target_id; - uint32_t folder_id; - uint32_t sector_list_lba; - uint32_t sector_list_size; - uint32_t file_size; -} __attribute__((packed)) LucarioFileEntry_t; - -typedef struct { - bool ok; - uint8_t ata_drive; - size_t disk_capacity; - - LucarioHeader_t header; - size_t max_entries; -} LucarioDescriptor_t; diff --git a/kernel/include/fs/milla.h b/kernel/include/fs/milla.h index ad20298a4..12d316732 100644 --- a/kernel/include/fs/milla.h +++ b/kernel/include/fs/milla.h @@ -3,16 +3,15 @@ * @file fs/milla.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) * @brief Проект Милла - * @version 0.3.3 + * @version 0.3.4 * @date 2023-01-23 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include void __milla_sendcmd(char* msg); char* __milla_getcmd(); int __milla_cleanState(); -char* __milla_getFile(char* path); +char* __milla_getFile(const char *path); int __milla_writeFile(char* path, char* data); int __milla_delete(char* path); int __milla_mkdir(char* path); diff --git a/kernel/include/fs/natfs.h b/kernel/include/fs/natfs.h new file mode 100644 index 000000000..ddfc471ef --- /dev/null +++ b/kernel/include/fs/natfs.h @@ -0,0 +1,13 @@ +#pragma once + +#include + +int fs_natfs_detect(const char Disk); +void fs_natfs_label(const char Disk, char* Label); +int fs_natfs_delete(const char Disk,const char* Path,int Mode); +int fs_natfs_create(const char Disk,const char* Path,int Mode); +FSM_DIR* fs_natfs_dir(const char Disk,const char* Path); +FSM_FILE fs_natfs_info(const char Disk,const char* Path); +size_t fs_natfs_write(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer); +size_t fs_natfs_read(const char Disk,const char* Path, size_t Offset, size_t Size,void* Buffer); +int fs_natfs_init(); \ No newline at end of file diff --git a/kernel/include/fs/nvfs.h b/kernel/include/fs/nvfs.h new file mode 100644 index 000000000..ef3a59952 --- /dev/null +++ b/kernel/include/fs/nvfs.h @@ -0,0 +1,21 @@ +#pragma once + +#include +#include "fs/fsm.h" + +typedef struct { + bool Ready; ///< Готов к работе? + char Disk; ///< Индекс диска (который надо подставить) + char Path[1024]; ///< Путь + bool Online; ///< В сети ли диск? + char FileSystem[64]; ///< Название драйвера на диске + int DriverFS; ///< Загружен ли драйвер фс? +} __attribute__((packed)) NVFS_DECINFO; + +NVFS_DECINFO nvfs_decode(const char* Name); +size_t nvfs_read(const char* Name, size_t Offset, size_t Count, void* Buffer); +int nvfs_create(const char* Name, int Mode); +int nvfs_delete(const char* Name, int Mode); +size_t nvfs_write(const char* Name, size_t Offset, size_t Count, const void *Buffer); +FSM_FILE nvfs_info(const char* Name); +FSM_DIR* nvfs_dir(const char* Name); \ No newline at end of file diff --git a/kernel/include/fs/sefs.h b/kernel/include/fs/sefs.h deleted file mode 100755 index c532b5861..000000000 --- a/kernel/include/fs/sefs.h +++ /dev/null @@ -1,23 +0,0 @@ -#pragma once -/** - * @brief Структура кол-ва файлов - */ -typedef struct { - uint32_t nfiles; // Число файлов в ramdisk. -} sefs_header_t; - -/** - * @brief Структура файлов - */ -typedef struct { - uint32_t index; ///< Индекс - uint32_t magic; ///< Магическое число для проверки ошибок. - char name[128]; ///< Имя файла - uint32_t offset; ///< Смещение в sefs, указывающее откуда начинается файл. - uint32_t length; ///< Длина файла - uint8_t types; ///< Тип (0 - файл/1 - Папка) - uint8_t parentDir; ///< Родительская папка (0 - значит root) -} sefs_file_header_t; - -fs_node_t *sefs_initrd(uint32_t location, uint32_t end); - diff --git a/kernel/include/fs/smfs.h b/kernel/include/fs/smfs.h index ba34d69d6..9994f68e9 100644 --- a/kernel/include/fs/smfs.h +++ b/kernel/include/fs/smfs.h @@ -49,4 +49,19 @@ typedef struct { uint8_t Length; ///< Длина пакета char Data[33]; ///< Пакет данных uint32_t Next; ///< Следующий пакет данных -} __attribute__((__packed__)) SMFS_PACKAGE_BIG; // Получится 39 байт \ No newline at end of file +} __attribute__((__packed__)) SMFS_PACKAGE_BIG; // Получится 39 байт + + +int fs_smfs_format(const char Disk); + +size_t fs_smfs_read(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer); +size_t fs_smfs_write(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer); +FSM_FILE fs_smfs_info(const char Disk,const char* Path); +int fs_smfs_create(const char Disk,const char* Path,int Mode); +int fs_smfs_delete(const char Disk,const char* Path,int Mode); + +TarFS_ROOT* fs_smfs_init(uint32_t in, uint32_t size, int Mode); +FSM_DIR* fs_smfs_dir(const char Disk,const char* Path); + +int fs_smfs_detect(const char Disk); +void fs_smfs_label(const char Disk, char* Label); \ No newline at end of file diff --git a/kernel/include/fs/tarfs.h b/kernel/include/fs/tarfs.h new file mode 100644 index 000000000..1461244be --- /dev/null +++ b/kernel/include/fs/tarfs.h @@ -0,0 +1,74 @@ +#pragma once + +#include +#define TARFS_ELEM_TYPE_FILE 48 ///< Обычный файл +#define TARFS_ELEM_TYPE_HARD_LINK 49 ///< Жесткая ссылка +#define TARFS_ELEM_TYPE_SYMB_LINK 50 ///< Символическая ссылка +#define TARFS_ELEM_TYPE_CHR_DEV 51 ///< Символьное устройство +#define TARFS_ELEM_TYPE_BLK_DEV 52 ///< Блочное-устройство +#define TARFS_ELEM_TYPE_DIR 53 ///< Папка +#define TARFS_ELEM_TYPE_PIPE 54 ///< Канал (FIFO) + +/** + * @brief Структура файла + */ +typedef struct { + char Name[100]; /// Имя файла + char Mode[8]; /// Режим файла + + char UID[8]; /// Числовой идентификатор пользователя владельца + char GID[8]; /// Числовой идентификатор пользователя группы + + char Size[12]; /// Размер файла в байтах (oсt2bin) + char LastTime[12]; /// Время последнего изменения файла + + char CheckSum[8]; /// Контрольная сумма для записи заголовка + char Type; /// Тип элемента + + char Link[100]; /// Имя связанного файла + char Signature[6]; /// Индикатор UStar + char Version[2]; /// Версия Ustar + + char OwnerUser[32]; /// Имя владельца + char OwnerGroup[32]; /// Имя группы + + char DM1[8]; /// Основной номер устройства + char DM2[8]; /// Младший номер устройства + + char Prefix[155]; /// Префикс имени файла +} __attribute__((packed, aligned(512))) TarFS_Elem; + +typedef struct { + int Ready; /// Существует ли файл? + char Name[100]; /// Имя файла + char Mode[8]; /// Режим файла + size_t Size; /// Размер файла в байтах (oсt2bin) + char LastTime[12]; /// Время последнего изменения файла + int Type; /// Тип элемента + uint32_t Addr; /// Адрес размещения файла + uint32_t Real; /// Адрес размещения файла +} __attribute__((packed)) TarFS_File; + +typedef struct { + int Ready; /// Инициализировано? + size_t Count; /// Кол-во файлов и элементов + TarFS_File* Files; /// Файлы +} __attribute__((packed)) TarFS_ROOT; + +int oct2bin(char *str, int size); +TarFS_File tarfs_infoFile(TarFS_ROOT* r,const char* name); +char* tarfs_readFile(TarFS_ROOT* r,const char* name); +size_t tarfs_getCountFiles(const uint32_t in); +TarFS_ROOT* tarfs_init(const uint32_t in); + +size_t fs_tarfs_read(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer); +size_t fs_tarfs_write(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer); +FSM_FILE fs_tarfs_info(const char Disk,const char* Path); +int fs_tarfs_create(const char Disk,const char* Path,int Mode); +int fs_tarfs_delete(const char Disk,const char* Path,int Mode); + +TarFS_ROOT* fs_tarfs_init(uint32_t in, uint32_t size, int Mode); +FSM_DIR* fs_tarfs_dir(const char Disk,const char* Path); + +int fs_tarfs_detect(const char Disk); +void fs_tarfs_label(const char Disk, char* Label); \ No newline at end of file diff --git a/kernel/include/gui/circle.h b/kernel/include/gui/circle.h index 57f7966db..ffd19b265 100644 --- a/kernel/include/gui/circle.h +++ b/kernel/include/gui/circle.h @@ -1,4 +1,4 @@ #pragma once -#include +#include void draw_circle(int32_t xc, int32_t yc, int32_t radius, uint32_t color); diff --git a/kernel/include/gui/line.h b/kernel/include/gui/line.h index f04643019..6b0b1e5c3 100644 --- a/kernel/include/gui/line.h +++ b/kernel/include/gui/line.h @@ -3,4 +3,4 @@ #include void draw_line(int x0, int y0, int x1, int y1, int thickness, int color); -void draw_line_extern(char* buffer, size_t width, size_t height, int x0, int y0, int x1, int y1, int thickness, int color); \ No newline at end of file +void draw_line_extern(uint8_t *buffer, size_t width, size_t height, int x0, int y0, int x1, int y1, int thickness, int color); \ No newline at end of file diff --git a/kernel/include/gui/sayori_font_file.h b/kernel/include/gui/sayori_font_file.h deleted file mode 100644 index 79fdb39fc..000000000 --- a/kernel/include/gui/sayori_font_file.h +++ /dev/null @@ -1,53 +0,0 @@ -#pragma once - -#include -#include -/* - * SFF1 File Specification - * - * SFF Common (Global) header: - * |- Identifier: "SFF" - * |- Version: 1 (uint8_t) - * - * SFF1 Header: - * |- Glyph Width (uint8_t) - * |- Glyph Height (uint8_t) - * |- Duke identifier: "DUKE" - */ - -#define ARRAY_CHARACTER_COUNT 148 -#define IS_IN_SFF1(chr) (is_in_sff1_alphabet_array(chr, alphabet_sff1, ARRAY_CHARACTER_COUNT) != 0xffff) -#define UTF8_GLOBAL_SHIFT 0xcc80 -#define UTF8_GLOBAL_SHIFT_2 0xcd41 - -typedef struct { - uint8_t identifier[3]; - uint8_t version; -} __attribute__((packed)) SFF_Global_Header_t; - -typedef struct { - uint8_t glyph_width; - uint8_t glyph_height; - - uint8_t DUKE_identifier[4]; -} __attribute__((packed)) SFF1_Header_t; - -typedef struct { - SFF_Global_Header_t* global; - - // Data for SFF1 - SFF1_Header_t* sff1; - uint8_t* image_data; - struct DukeImageMeta* image_metadata; - - FILE* file_descriptor; -} SFF_Descriptor_t; - -SFF_Descriptor_t* load_sff_font(const char* path); -uint16_t is_in_sff1_alphabet_array(uint16_t character, uint16_t* array, uint16_t length); -void _draw_sff1_char_screen(SFF_Descriptor_t* descriptor, uint16_t character, - size_t x, size_t y, uint32_t color); -void _draw_sff1_string_screen(SFF_Descriptor_t* descriptor, uint8_t* string, - size_t x, size_t y, uint32_t color); -void scale_sff1_font(SFF_Descriptor_t* descriptor, size_t w, size_t h); -void destroy_sff_font(SFF_Descriptor_t* descriptor); \ No newline at end of file diff --git a/kernel/include/io/duke_image.h b/kernel/include/io/duke_image.h deleted file mode 100755 index f9af2b925..000000000 --- a/kernel/include/io/duke_image.h +++ /dev/null @@ -1,44 +0,0 @@ -/** - * @file imaging.h - * @brief Описания функций imaging.h - * @version 0.3.3 - * @author NDRAEY >_ (pikachu_andrey@vk.com) - */ - -#pragma once - -#include - -#define RGB_TO_UINT32(r, g, b) ((r&0xff)<<16)|((g&0xff)<<8)|(b&0xff) -#define DUKE_MAGIC "DUKE" - -#define PIXIDX(w, x, y) ((w) * (y) + (x)) - -/** - * @brief Структура изображения Duke. - * @param width - ширина - * @param height - высота - * @param data_length - длина всех "сырых" пикселей - * @param alpha - указывает на наличие альфа слоя - */ - -// Duke Image Header struct is 13 bytes long. -struct DukeImageMeta { - uint8_t magic[4]; - uint16_t width; - uint16_t height; - uint32_t data_length; - uint8_t alpha; -} __attribute__((packed)); - -typedef struct DukeImageMeta DukeHeader_t; - -// Returns 0 if OK, 1 if ERR -bool duke_draw_from_file(const char *filename, size_t sx, size_t sy); -char duke_get_image_metadata(char *filename, struct DukeImageMeta* meta); -void duke_get_image_data(char* filename, struct DukeImageMeta meta, void* buf); -unsigned int duke_calculate_bufsize(unsigned int width, unsigned int height, unsigned int alpha); -void duke_rawdraw(const char *data, struct DukeImageMeta* meta, int sx, int sy); -void duke_scale(const char* pixels, unsigned int w1, unsigned int h1, int w2, int h2, char alpha, char* out); -char duke_draw_scaled(char* filename, int width, int height, int x, int y); -void duke_rawdraw2(const char *data, int width, int height, int bpp, int sx, int sy); \ No newline at end of file diff --git a/kernel/include/io/ports.h b/kernel/include/io/ports.h old mode 100755 new mode 100644 index 0ea5b2f4b..cdd479983 --- a/kernel/include/io/ports.h +++ b/kernel/include/io/ports.h @@ -1,6 +1,7 @@ #pragma once #include +#include #define PORT_COM1 0x3f8 #define PORT_COM2 0x2F8 @@ -13,19 +14,27 @@ #define LOG_WITH_TIME 0 +extern void (*default_qemu_printf)(const char *text, ...); + #ifndef RELEASE - #if LOG_WITH_TIME==0 - #define qemu_log(M, ...) qemu_printf("[LOG] (%s:%s:%d) " M "\n", __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) - #define qemu_warn(M, ...) qemu_printf("[\033[33;1mWARN\033[33;0m] (%s:%s:%d) \033[33;1m" M "\033[0m\n", __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) - #define qemu_err(M, ...) qemu_printf("[\033[31;1mERROR\033[33;0m] (%s:%s:%d) \033[31;1m" M "\033[0m\n", __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) + #if LOG_WITH_TIME == 0 + #define qemu_log(M, ...) default_qemu_printf("[LOG] (%s:%s:%d) " M "\n", __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) + #define qemu_note(M, ...) default_qemu_printf("[\033[36;1mNOTE\033[33;0m] (%s:%s:%d) \033[36;1m" M "\033[0m\n", __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) + #define qemu_warn(M, ...) default_qemu_printf("[\033[33;1mWARN\033[33;0m] (%s:%s:%d) \033[33;1m" M "\033[0m\n", __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) + #define qemu_ok(M, ...) default_qemu_printf("[\033[32;1mOK\033[33;0m] (%s:%s:%d) \033[32;1m" M "\033[0m\n", __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) + #define qemu_err(M, ...) default_qemu_printf("[\033[31;1mERROR\033[33;0m] (%s:%s:%d) \033[31;1m" M "\033[0m\n", __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) #else - #define qemu_log(M, ...) qemu_printf("[LOG] [%f] (%s:%s:%d) " M "\033[0m\n", getUptime(), __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) - #define qemu_warn(M, ...) qemu_printf("[\033[33;1mWARN\033[33;0m] [%f] (%s:%s:%d) \033[33;1m" M "\033[0m\n", getUptime(), __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) - #define qemu_err(M, ...) qemu_printf("[\033[31;1mERR\033[33;0m] [%f] (%s:%s:%d) \033[31;1m" M "\033[0m\n", getUptime(), __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) + #define qemu_log(M, ...) qemu_printf("[LOG] [%d] (%s:%s:%d) " M "\033[0m\n", timestamp(), __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) + #define qemu_note(M, ...) qemu_printf("[\033[36;1mWARN\033[33;0m] [%d] (%s:%s:%d) \033[36;1m" M "\033[0m\n", timestamp(), __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) + #define qemu_warn(M, ...) qemu_printf("[\033[33;1mWARN\033[33;0m] [%d] (%s:%s:%d) \033[33;1m" M "\033[0m\n", timestamp(), __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) + #define qemu_ok(M, ...) qemu_printf("[\033[32;1mOK\033[33;0m] [%d] (%s:%s:%d) \033[32;1m" M "\033[0m\n", timestamp(), __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) + #define qemu_err(M, ...) qemu_printf("[\033[31;1mERR\033[33;0m] [%d] (%s:%s:%d) \033[31;1m" M "\033[0m\n", timestamp(), __FILE__, __FUNCTION__, __LINE__, ##__VA_ARGS__) #endif #else - #define qemu_log(M, ...) + #define qemu_note(M, ...) + #define qemu_log(M, ...) #define qemu_warn(M, ...) + #define qemu_ok(M, ...) #define qemu_err(M, ...) #endif @@ -34,53 +43,78 @@ qemu_printf("ASSERT FAILED: " format "\n", ##__VA_ARGS__); \ qemu_printf("======================================\n"); \ bsod_screen((registers_t){}, "ASSERT_FAIL", "See additional information on COM1 port. (Or Qemu.log if you're using QEMU)", 0xFFFF); \ -}\ -} while(0) +} } while(0) // Check if character received. #define is_signal_received(port) (inb(port + 5) & 1) -#define outb(port, val) __asm__ volatile("outb %b0, %w1" : : "a"(val), "Nd"(port)) -#define outw(port, val) outs(port, val) - -#define fast_inb(port, ret) __asm__ volatile( "inb %1, %0" : "=a"(ret) : "Nd"((uint16_t)(port)) ) -#define fast_ins(port, ret) __asm__ volatile( "inw %1, %0" : "=a"(ret) : "Nd"((uint16_t)(port)) ) +/** + * @brief Отправка одного байта в порт + * + * @param port - порт + * @param val - данные + */ +SAYORI_INLINE void outb(uint16_t port, uint8_t val) { + __asm__ volatile("outb %b0, %w1" : : "a"(val), "Nd"(port)); +} /** * @brief Получение одного байта из порта * * @param port - порт - * @return uint8_t - данные + * @return Байт из порта */ -static inline uint8_t inb(uint16_t port) { +SAYORI_INLINE uint8_t inb(uint16_t port) { uint8_t ret; - asm volatile ( "inb %1, %0" + __asm__ volatile ( "inb %1, %0" : "=a"(ret) : "Nd"(port) ); return ret; } + +/** + * @brief Запись 32-битного слова в порт + * + * @param port - порт + * @param val - число + */ +SAYORI_INLINE void outl(uint16_t port, uint32_t val) { + __asm__ volatile ( "outl %0, %1" : : "a"(val), "Nd"(port) ); +} + /** - * @brief Чтение word из порта + * @brief Чтение 32-битного слова * * @param port - порт - * @return uint16_t - word + * @return Слово из порта */ -static inline uint16_t ins(uint16_t port) { - uint16_t rv; - asm volatile ("inw %1, %0" : "=a" (rv) : "Nd" (port)); - return rv; +SAYORI_INLINE uint32_t inl(uint16_t port) { + uint32_t ret; + __asm__ volatile( "inl %1, %0" : "=a"(ret) : "Nd"(port) ); + return ret; } +/** + * @brief Чтение 16-битного слова из порта + * + * @param port - порт + * @return Слово из порта + */ +SAYORI_INLINE uint16_t inw(uint16_t port) { + uint16_t ret; + __asm__ volatile ("inw %1, %0" : "=a" (ret) : "Nd" (port)); + return ret; +} /** - * @brief Запись word в порт + * @brief Запись 16-битного слова в порт * * @param port - порт * @param data - данные */ -static inline void outs(uint16_t port, uint16_t data) { - asm volatile ("outw %1, %0" :: "Nd" (port), "a" (data)); +SAYORI_INLINE void outw(uint16_t port, uint16_t data) { + __asm__ volatile ("outw %1, %0" :: "Nd" (port), "a" (data)); } void insw(uint16_t __port, void *__buf, unsigned long __n); @@ -97,7 +131,6 @@ void com1_write_char(char a); void qemu_printf(const char *text, ...); int32_t is_transmit_empty(uint16_t port); -// int32_t is_signal_received(uint16_t port); uint8_t serial_readchar(uint16_t port); void io_wait(); diff --git a/kernel/include/io/rgb_image.h b/kernel/include/io/rgb_image.h new file mode 100644 index 000000000..0c4529135 --- /dev/null +++ b/kernel/include/io/rgb_image.h @@ -0,0 +1,12 @@ +// +// Created by ndraey on 25.10.23. +// + +#pragma once + +#include "common.h" + +#define PIXIDX(w, x, y) ((w) * (y) + (x)) + +void draw_rgb_image(const char *data, size_t width, size_t height, size_t bpp, int sx, int sy); +void scale_rgb_image(const char* pixels, uint32_t w1, uint32_t h1, int w2, int h2, char alpha, char* out); \ No newline at end of file diff --git a/kernel/include/io/screen.h b/kernel/include/io/screen.h index e58fe620c..5d620b1f6 100644 --- a/kernel/include/io/screen.h +++ b/kernel/include/io/screen.h @@ -1,10 +1,13 @@ #pragma once #include +#include "lib/string.h" extern uint8_t* framebuffer_addr; +extern uint32_t framebuffer_bpp; +extern uint32_t framebuffer_pitch; extern uint8_t* back_framebuffer_addr; -extern size_t framebuffer_size; +extern uint32_t framebuffer_size; #define VESA_WIDTH (getScreenWidth()) #define VESA_HEIGHT (getScreenHeight()) @@ -27,10 +30,6 @@ typedef struct rgb_struct { uint8_t b; } rgb_color; -typedef struct screen_pixel { - rgb_color color; - uint32_t x, y; -} screen_pixel; enum colors { VESA_BLACK = 0x000000, @@ -78,15 +77,47 @@ typedef struct svga_mode_info { uint8_t reserved1[206]; } __attribute__ ((packed)) svga_mode_info_t; -#define punch() memcpy(framebuffer_addr, back_framebuffer_addr, framebuffer_size); +#define punch() memcpy(framebuffer_addr, back_framebuffer_addr, framebuffer_size) //#define punch() rect_copy(0, 0, VESA_WIDTH, VESA_HEIGHT) uint32_t getDisplayPitch(); uint32_t getScreenWidth(); uint32_t getScreenHeight(); -uint32_t getDisplaySize(); size_t getDisplayAddr(); +uint32_t getDisplayBpp(); size_t getFrameBufferAddr(); size_t getPixel(int32_t x, int32_t y); -void set_pixel(uint32_t x, uint32_t y, uint32_t color); + + +/** + * @brief Вывод одного пикселя на экран + * + * @param x - позиция по x + * @param y - позиция по y + * @param color - цвет + */ +inline static __attribute__((always_inline)) void set_pixel(uint32_t x, uint32_t y, uint32_t color) { + #ifndef RELEASE + if (x >= VESA_WIDTH || + y >= VESA_HEIGHT) { + return; + } + #endif + uint8_t* pixels = back_framebuffer_addr + (x * (framebuffer_bpp >> 3)) + y * framebuffer_pitch; + + pixels[0] = color & 255; + pixels[1] = (color >> 8) & 255; + pixels[2] = (color >> 16) & 255; +} + +/** + * @brief Получение размера буфера экрана + * + * @return uint32_t - Размер буфера экрана + */ +inline static __attribute__((always_inline)) uint32_t getDisplaySize(){ + return framebuffer_size; +} + +void setPixelAlpha(uint32_t x, uint32_t y, rgba_color color); void rect_copy(int x, int y, int width, int height); \ No newline at end of file diff --git a/kernel/include/io/port_io.h b/kernel/include/io/serial_port.h similarity index 100% rename from kernel/include/io/port_io.h rename to kernel/include/io/serial_port.h diff --git a/kernel/include/io/status_loggers.h b/kernel/include/io/status_loggers.h index 6543222b4..b19bb039a 100644 --- a/kernel/include/io/status_loggers.h +++ b/kernel/include/io/status_loggers.h @@ -1,18 +1,10 @@ #pragma once -#define COLOR_TEXT 0xFFFFFF -#define COLOR_SYS_TEXT 0x92D7D4 -#define COLOR_SYS_PATH 0x335190 #define COLOR_ERROR 0xA5383B #define COLOR_ALERT 0xA66938 #define COLOR_ATENTION 0xDBF03E #define COLOR_BG 0x000000 -#include -#include -#include -#include -#include #include void tty_error(char* format, ...); diff --git a/kernel/include/io/status_sounds.h b/kernel/include/io/status_sounds.h old mode 100755 new mode 100644 diff --git a/kernel/include/io/tty.h b/kernel/include/io/tty.h old mode 100755 new mode 100644 index 3059255e8..55d68cbf8 --- a/kernel/include/io/tty.h +++ b/kernel/include/io/tty.h @@ -1,9 +1,15 @@ #pragma once -#include +#include +#include "io/screen.h" +#include + +#define NEW_TTY_PRINTF 1 extern bool stateTTY; +void tty_fontConfigurate(); + void _tty_puts(const char str[]); void _tty_print(const char *format, va_list args); void _tty_printf(char *text, ...); @@ -38,4 +44,6 @@ void _tty_putchar(char c, char c1); void tty_putchar(char c, char c1); void clean_screen(); -void buffer_set_pixel4(uint8_t *buffer, size_t width, size_t height, size_t x, size_t y, size_t color); \ No newline at end of file +void clean_tty_screen(); +void buffer_set_pixel4(uint8_t *buffer, size_t width, size_t height, size_t x, size_t y, size_t color); +void clean_tty_screen_no_update(); \ No newline at end of file diff --git a/kernel/include/io/vgafnt.h b/kernel/include/io/vgafnt.h deleted file mode 100755 index 377e26300..000000000 --- a/kernel/include/io/vgafnt.h +++ /dev/null @@ -1,8 +0,0 @@ -// This file was generated by bintoc utility -// Binary data from file "a_vga_font.fon" - -#pragma once - - -extern uint8_t vgafnt[4096]; -extern int32_t vgafnt_size; diff --git a/kernel/include/kernel.h b/kernel/include/kernel.h old mode 100755 new mode 100644 index 2609c71c5..845e4a827 --- a/kernel/include/kernel.h +++ b/kernel/include/kernel.h @@ -1,11 +1,6 @@ #pragma once -#define VERSION_MAJOR 0 // Версия ядра -#define VERSION_MINOR 3 // Пре-релиз -#define VERSION_PATCH 3 // Патч -#define ARCH_TYPE "i386" // Архитектура -#define VERNAME "Soul" // Имя версии (изменяется вместе с минорной части версии) -#define SUBVERSIONNAME "Flight" // Вторичное имя версии (изменяется вместе с каждым глобальным релизом) +#include #include @@ -15,7 +10,7 @@ #include "common.h" #include "config.h" -#include "rust_header.h" +#include "rust_headers.h" #include "lib/string.h" #include "lib/stdlib.h" @@ -24,11 +19,12 @@ #include "lib/split.h" #include "lib/math.h" #include "lib/setjmp.h" -#include "lib/dan.h" + +#include "mem/pmm.h" +#include "mem/vmm.h" #include "sys/acpi.h" #include "sys/timer.h" -#include "sys/memory.h" #include "sys/scheduler.h" #include "sys/cpu_isr.h" #include "sys/bootscreen.h" @@ -38,9 +34,8 @@ #include "sys/v8086.h" #include "sys/system.h" -#include #include -#include +#include #include #include #include @@ -48,18 +43,27 @@ #include #include #include + +#include +#include +#include + #include #include #include #include #include -#include +#include "drv/disk/ata.h" #include #include -#include +#include + #include -#include +#include +#include +#include +#include #include #include @@ -73,4 +77,4 @@ #include "net/arp.h" #include "debug/hexview.h" -#include "debug/ubsan.h" \ No newline at end of file +#include "debug/ubsan.h" diff --git a/kernel/include/lib/dan.h b/kernel/include/lib/dan.h deleted file mode 100644 index fce59794b..000000000 --- a/kernel/include/lib/dan.h +++ /dev/null @@ -1,24 +0,0 @@ -#pragma once - -#include - -typedef struct DANHeader { - unsigned char magic[3]; - uint32_t frame_count; - uint16_t width; - uint16_t height; - uint8_t alpha; -} __attribute__((packed)) DANHeader_t; - -typedef struct DANDescriptor { - DANHeader_t header; - uint32_t framesize; - char* data; - - bool stream; - FILE* fd; -} DANDescriptor_t; - -DANDescriptor_t* alloc_dan(const char* filename, bool stream); -void read_frame_dan(DANDescriptor_t* dan, size_t index, char* out); -void free_dan(DANDescriptor_t* dan); \ No newline at end of file diff --git a/kernel/include/lib/libstring/string.h b/kernel/include/lib/libstring/string.h new file mode 100644 index 000000000..6b547e716 --- /dev/null +++ b/kernel/include/lib/libstring/string.h @@ -0,0 +1,30 @@ +// +// Created by ndraey on 04.10.23. +// + +#pragma once + +#include "common.h" +#include "../../../src/lib/libvector/include/vector.h" + +typedef struct string { + char* data; + + size_t length; +} string_t; + +#define ADDR2STRING(addr) ((string_t*)(addr)) + +string_t* string_new(); +void string_append_charptr(string_t* string, const char* concatenable); +void string_append(string_t* string, const string_t* concatenable); +void string_crop(string_t* string, size_t start, size_t end); +void string_append_char(string_t* string, char ch); +string_t* string_from_charptr(const char* chars); +string_t* string_from_sized_charptr(const char* chars, size_t length); +vector_t* string_split(string_t* string, const char* delimiter); +void string_split_free(vector_t* vec); +string_t* string_clone(string_t* str); +void string_reverse(string_t* str); +string_t* string_from_integer(int number); +void string_destroy(string_t *string); diff --git a/kernel/include/lib/list.h b/kernel/include/lib/list.h old mode 100755 new mode 100644 diff --git a/kernel/include/lib/math.h b/kernel/include/lib/math.h index 33a62c6fc..746bb5dbc 100644 --- a/kernel/include/lib/math.h +++ b/kernel/include/lib/math.h @@ -2,8 +2,6 @@ #include "common.h" -// #define MIN(a, b) (a > b ? b : a) -// #define MAX(a, b) (a < b ? b : a) #define ABS(a) ((a) >= 0 ? (a) : -(a)) #define MIN(a, b) \ @@ -105,7 +103,7 @@ double atan(double x); double sqrt(double x); double cbrt(double x); - +double modf(double value, double* intPart); // static inline double sqrt(double x) { // return pow(x, 0.5); // } diff --git a/kernel/include/lib/php/explode.h b/kernel/include/lib/php/explode.h new file mode 100644 index 000000000..3b1a6705d --- /dev/null +++ b/kernel/include/lib/php/explode.h @@ -0,0 +1,6 @@ +#pragma once + +#include + +uint32_t str_cdsp2(const char a_str[], char del); +char** explode(const char str[], char delimiter); \ No newline at end of file diff --git a/kernel/include/lib/php/pathinfo.h b/kernel/include/lib/php/pathinfo.h new file mode 100644 index 000000000..119454de3 --- /dev/null +++ b/kernel/include/lib/php/pathinfo.h @@ -0,0 +1,9 @@ + +#include + +#define PATHINFO_DIRNAME 0 +#define PATHINFO_BASENAME 1 +#define PATHINFO_EXTENSION 2 +#define PATHINFO_FILENAME 3 + +char* pathinfo(const char* Path, int Mode); \ No newline at end of file diff --git a/kernel/include/lib/php/str_contains.h b/kernel/include/lib/php/str_contains.h new file mode 100644 index 000000000..ddd23a840 --- /dev/null +++ b/kernel/include/lib/php/str_contains.h @@ -0,0 +1,17 @@ +/** + * @file lib/php/pathinfo.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief Функция замены строк + * @version 0.3.4 + * @date 2023-07-30 + * @copyright Copyright SayoriOS Team (c) 2022-2023 + */ +#pragma once + +#include "lib/string.h" + +static inline bool str_contains(const char* haystack, const char* needle) { + const char* result = strstr(haystack, needle); + + return result != NULL; +} \ No newline at end of file diff --git a/kernel/include/lib/php/str_replace.h b/kernel/include/lib/php/str_replace.h new file mode 100644 index 000000000..d9e50a169 --- /dev/null +++ b/kernel/include/lib/php/str_replace.h @@ -0,0 +1,5 @@ +#pragma once + +#include "common.h" + +uint32_t char_replace(char search, char replace, char* subject); \ No newline at end of file diff --git a/kernel/include/lib/pixel.h b/kernel/include/lib/pixel.h new file mode 100644 index 000000000..1947988a8 --- /dev/null +++ b/kernel/include/lib/pixel.h @@ -0,0 +1,19 @@ +#pragma once + +#ifndef SAYORI_PIXEL_H +#define SAYORI_PIXEL_H + +void drawRect(uint32_t x, uint32_t y, uint32_t w, uint32_t h, uint32_t color); +void drawRectLine(int x,int y,int w, int h,int color,int color2, int c); +void drawRectBorder(int x, int y, int w, int h, int color); +void drawHorizontalLine(int x1, int x2, int y, uint32_t color); +void drawVerticalLine(int y1, int y2, int x, uint32_t color); +void drawCirclePoints(int cx, int cy, int x, int y, uint32_t color); +void drawCircle(int cx, int cy, int radius, uint32_t color); +void drawFilledCircle(int x0, int y0, int radius, uint32_t color); +void drawFilledRectBorder(int x0, int y0, int radius, int w, int mode, uint32_t color); +void drawRoundedSquare(int x, int y, int size, int radius, uint32_t fill_color, uint32_t border_color); +void drawRoundedRectangle(int x, int y, int width, int height, int radius, uint32_t fill_color, uint32_t border_color); + + +#endif //SAYORI_PIXEL_H diff --git a/kernel/include/lib/split.h b/kernel/include/lib/split.h index 9aa4eb799..5b7e24486 100644 --- a/kernel/include/lib/split.h +++ b/kernel/include/lib/split.h @@ -2,5 +2,5 @@ #include "common.h" -uint32_t str_cdsp(char* a_str, char* del); -void str_split(char a_str[], char *out[], char* dec); \ No newline at end of file +uint32_t str_cdsp(const char *a_str, const char* del); +void str_split(const char a_str[], char *out[], char* dec); \ No newline at end of file diff --git a/kernel/include/lib/sprintf.h b/kernel/include/lib/sprintf.h index 6fb1256a4..0115c8006 100644 --- a/kernel/include/lib/sprintf.h +++ b/kernel/include/lib/sprintf.h @@ -1,6 +1,5 @@ #pragma once -#include #include size_t measure_vsprintf(const char *format, va_list args); diff --git a/kernel/include/lib/stdarg.h b/kernel/include/lib/stdarg.h old mode 100755 new mode 100644 diff --git a/kernel/include/lib/stdio.h b/kernel/include/lib/stdio.h old mode 100755 new mode 100644 index a0357923f..b53099db1 --- a/kernel/include/lib/stdio.h +++ b/kernel/include/lib/stdio.h @@ -1,7 +1,7 @@ #pragma once #include "common.h" - +#include #define EOF (-1) #define SEEK_SET 0 #define SEEK_CUR 1 @@ -44,9 +44,5 @@ ssize_t fseek(FILE* stream, ssize_t offset, uint8_t whence); void rewind(FILE *stream); void perror(FILE* stream,char* s); uint32_t ferror(FILE* stream); -void fsetpos(FILE* stream, ssize_t pos); -ssize_t fgetpos(FILE* stream); -void fdebuginfo(FILE* stream); -//size_t fread(FILE* stream, char* ptr, size_t size, size_t nmemb); size_t fwrite(FILE *stream, size_t size, size_t count, const void *ptr); diff --git a/kernel/include/lib/stdlib.h b/kernel/include/lib/stdlib.h old mode 100755 new mode 100644 index f2d027a3a..986a75cc2 --- a/kernel/include/lib/stdlib.h +++ b/kernel/include/lib/stdlib.h @@ -1,6 +1,5 @@ #pragma once #include -void* calloc(size_t nmemb, size_t size); -int32_t itoa(int32_t n, char *buffer); -uint32_t atoi(char s[]); \ No newline at end of file +size_t itoa(int32_t n, char *buffer); +uint32_t atoi(const char s[]); \ No newline at end of file diff --git a/kernel/include/lib/string.h b/kernel/include/lib/string.h index 97ef2895d..d04ee46ab 100644 --- a/kernel/include/lib/string.h +++ b/kernel/include/lib/string.h @@ -3,8 +3,8 @@ #include "common.h" int32_t memcmp(const char *s1, const char *s2, size_t n); -void memcpy(void* destination, const void* source, size_t n); -void* memset(void* ptr, int value, size_t num); +void* memcpy(void *restrict destination, const void *restrict source, size_t n); +void* memset(void* ptr, char value, size_t num); void* memmove(void *dest, void *src, size_t count); void strver(char *str); @@ -15,13 +15,12 @@ char *strtok(char *s, const char *delim); size_t strlen(const char *str); bool strcmpn(const char *str1, const char *str2); size_t mb_strlen(const char *str); -void substr(char *dest, const char *source, int from, int length); +void substr(char* restrict dest, const char* restrict source, int from, int length); int strcmp(const char *s1, const char *s2); int32_t strncmp(const char *s1, const char *s2, size_t num); char digit_count(size_t num); char hex_count(size_t num); -bool isdigit(char a); size_t itoh(size_t n, char *buffer); size_t itou(size_t n, char *buffer); char *strchr(const char *_s, char _c); @@ -30,8 +29,14 @@ bool isnumberstr(char* a); bool isUTF(char c); -#if USE_SSE void sse_memcpy(void* restrict dest, const void* restrict src, size_t size); -#endif size_t strcount(const char* string, char character); +char* strstr(const char* haystack, const char* needle); +char *strncpy(char *dest, const char *src, size_t n); + +uint32_t atoi(const char s[]); + +SAYORI_INLINE bool isdigit(char a) { + return a >= '0' && a <= '9'; +} \ No newline at end of file diff --git a/kernel/include/lib/utf_conversion.h b/kernel/include/lib/utf_conversion.h new file mode 100644 index 000000000..45fadd467 --- /dev/null +++ b/kernel/include/lib/utf_conversion.h @@ -0,0 +1,7 @@ +// +// Created by maractus on 27.12.23. +// + +#pragma once + +void utf16_to_utf8(const unsigned short *utf16, int utf16_length, char *utf8); diff --git a/kernel/include/mem/pmm.h b/kernel/include/mem/pmm.h new file mode 100644 index 000000000..0570495cb --- /dev/null +++ b/kernel/include/mem/pmm.h @@ -0,0 +1,66 @@ +#pragma once + +// Scyther Physical Memory Manager by NDRAEY (c) 2023 +// for SayoriOS + +#include "common.h" +#include "multiboot.h" + +typedef uint32_t pt_entry; +typedef uint32_t pd_entry; + +extern size_t phys_memory_size; +extern size_t used_phys_memory_size; + +extern size_t kernel_start; +extern size_t kernel_end; + +#define PAGE_SIZE 0x1000 +#define PAGE_OFFSET_MASK 0xFFF +#define PAGE_TABLE_INDEX_BITS 10 +#define PAGE_TABLE_INDEX_MASK 0x3FF + +#define PAGE_PRESENT (1 << 0) +#define PAGE_WRITEABLE (1 << 1) +#define PAGE_USER (1 << 2) +#define PAGE_WRITE_THROUGH (1 << 3) +#define PAGE_CACHE_DISABLE (1 << 4) +#define PAGE_ACCESSED (1 << 5) +#define PAGE_DIRTY (1 << 6) +#define PAGE_GLOBAL (1 << 8) + +#define PAGE_BITMAP_SIZE (131072) + +#define PD_INDEX(virt_addr) ((virt_addr) >> 22) +#define PT_INDEX(virt_addr) (((virt_addr) >> 12) & 0x3ff) + +typedef uint32_t virtual_addr_t; +typedef uint32_t physical_addr_t; + +// The space where first page table starts +/// Начало где расположены все таблицы страниц +static uint32_t* page_directory_start = (uint32_t*)(0xffffffff - (4 * MB) + 1); + +// The space where we can modify page directory +/// Начало директории таблиц для страниц +static uint32_t* page_directory_virt = (uint32_t*)(0xffffffff - (4 * KB) + 1); + + +extern void load_page_directory(size_t addr); +extern void enable_paging(); + +physical_addr_t phys_alloc_single_page(); +physical_addr_t phys_alloc_multi_pages(size_t count); +void phys_free_single_page(physical_addr_t addr); +void phys_free_multi_pages(physical_addr_t addr, size_t count); +void map_single_page(physical_addr_t* page_dir, physical_addr_t physical, virtual_addr_t virtual, uint32_t flags); +void unmap_single_page(uint32_t* page_dir, virtual_addr_t virtual); +void map_pages(uint32_t* page_dir, physical_addr_t physical, virtual_addr_t virtual, size_t size, uint32_t flags); +void phys_not_enough_memory(); +void blank_page_directory(uint32_t* pagedir_addr); +bool phys_is_used_page(physical_addr_t addr); +void phys_mark_page_entry(physical_addr_t addr, uint8_t used); +uint32_t phys_get_page_data(uint32_t* page_dir, virtual_addr_t virtual); +uint32_t virt2phys(uint32_t* page_dir, virtual_addr_t virtual); +void init_paging(); +uint32_t* get_kernel_page_directory(); \ No newline at end of file diff --git a/kernel/include/mem/vmm.h b/kernel/include/mem/vmm.h new file mode 100644 index 000000000..7dfc8a166 --- /dev/null +++ b/kernel/include/mem/vmm.h @@ -0,0 +1,51 @@ +// Charmander - a new virtual memory manager by NDRAEY (c) 2023 +// for SayoriOS +// +// Created by ndraey on 05.11.23. +// + +#pragma once + +#include +#include "lib/string.h" + +// #define kfree_debug(ptr) do { qemu_note("FREE BLOCK (%x) at %s:%d", ptr, __FILE__, __LINE__); kfree(ptr); } while(0); + +struct heap_entry { + size_t address; + size_t length; +}; + +typedef struct heap { + size_t allocated_count; + size_t capacity; // Entries + size_t start; + size_t used_memory; + struct heap_entry* memory; +} heap_t; + +extern heap_t system_heap; + +void vmm_init(); +void *alloc_no_map(size_t size, size_t align); +void free_no_map(void* ptr); +bool vmm_is_page_used_by_entries(size_t address); +void* kmalloc_common(size_t size, size_t align); + +SAYORI_INLINE void* kmalloc(size_t size) { + return kmalloc_common(size, 0); +} + +void* krealloc(void* ptr, size_t memory_size); +void kfree(void* ptr); +void* clone_kernel_page_directory(); + +void vmm_debug_switch(bool enable); + +SAYORI_INLINE void* kcalloc(size_t size, size_t amount) { + void* x = kmalloc(size * amount); + + memset(x, 0, size * amount); + + return x; +} diff --git a/kernel/include/multiboot.h b/kernel/include/multiboot.h old mode 100755 new mode 100644 diff --git a/kernel/include/net/arp.h b/kernel/include/net/arp.h index efafa147d..bda171ee3 100644 --- a/kernel/include/net/arp.h +++ b/kernel/include/net/arp.h @@ -1,6 +1,7 @@ #pragma once -#include "kernel.h" +#include "common.h" +#include "cards.h" #define ARP_REQUEST 1 #define ARP_REPLY 2 diff --git a/kernel/include/net/cards.h b/kernel/include/net/cards.h index 698d92bac..7122df257 100644 --- a/kernel/include/net/cards.h +++ b/kernel/include/net/cards.h @@ -4,12 +4,13 @@ typedef struct { char name[64]; + uint8_t ipv4_addr[4]; void (*get_mac_addr)(uint8_t[6]); void (*send_packet)(void*, size_t); } netcard_entry_t; void netcards_list_init(); -void netcard_add(netcard_entry_t card); +void netcard_add(netcard_entry_t *card); size_t netcards_get_count(); netcard_entry_t* netcard_get(size_t index); \ No newline at end of file diff --git a/kernel/include/net/dhcp.h b/kernel/include/net/dhcp.h new file mode 100644 index 000000000..03ca60c6f --- /dev/null +++ b/kernel/include/net/dhcp.h @@ -0,0 +1,28 @@ +#pragma once + +#include "common.h" + +#define DHCP_REQUEST 1 +#define DHCP_REPLY 2 + +typedef struct dhcp_packet { + uint8_t op; + uint8_t hardware_type; + uint8_t hardware_addr_len; + uint8_t hops; + uint32_t xid; + uint16_t seconds; + uint16_t flags; + uint32_t client_ip; + uint32_t your_ip; + uint32_t server_ip; + uint32_t gateway_ip; + uint8_t client_hardware_addr[16]; + uint8_t server_name[64]; + uint8_t file[128]; + uint8_t options[340]; +} __attribute__ ((packed)) dhcp_packet_t; + +void dhcp_discover(netcard_entry_t* card); +void dhcp_handle_packet(netcard_entry_t* card, dhcp_packet_t* packet); +void dhcp_request(netcard_entry_t* card, const uint8_t req_ip[4]); \ No newline at end of file diff --git a/kernel/include/net/ethernet.h b/kernel/include/net/ethernet.h index 6b9b1b27b..924eb0a6d 100644 --- a/kernel/include/net/ethernet.h +++ b/kernel/include/net/ethernet.h @@ -1,9 +1,74 @@ #pragma once #include "common.h" +#include "net/cards.h" -#define ETHERNET_TYPE_ARP 0x0806 -#define ETHERNET_TYPE_IP 0x0800 +#define ETHERNET_TYPE_IPV4 0x0800 ///< Internet Protocol v4 +#define ETHERNET_TYPE_ARP 0x0806 ///< Address Resolution Protocol +#define ETHERNET_TYPE_WoL 0x0842 ///< Wake-on-LAN +#define ETHERNET_TYPE_SRP 0x22EA ///< Stream Reservation Protocol +#define ETHERNET_TYPE_AVTP 0x22F0 ///< Audio Video Transport Protocol +#define ETHERNET_TYPE_IETF 0x22F3 ///< IETF TRILL Protocol +#define ETHERNET_TYPE_DECMOP 0x6002 ///< DEC MOP RC +#define ETHERNET_TYPE_DECNET 0x6003 ///< DECnet Phase Iv, DNA Routing +#define ETHERNET_TYPE_DECLAT 0x6004 ///< DEC LAT +#define ETHERNET_TYPE_RASP 0x8035 ///< Reverse Address Resolution Protocol +#define ETHERNET_TYPE_ATE 0x809B ///< AppleTalk (Ethertalk) +#define ETHERNET_TYPE_ATARP 0x80F3 ///< AppleTalk Address Resolution Protocol +#define ETHERNET_TYPE_VLAN 0x8100 ///< VLAN-tagged frame (IEEE 802.1Q) +#define ETHERNET_TYPE_SLPP 0x8102 ///< Simple Loop Prevention Protocol +#define ETHERNET_TYPE_VLACP 0x8103 ///< Virtual Link Aggregation Control Protocol +#define ETHERNET_TYPE_IPX 0x8137 ////< IPX +#define ETHERNET_TYPE_QNX 0x8204 ///< QNX Qnet +#define ETHERNET_TYPE_IPV6 0x86DD ///< Internet Protocol v6 +#define ETHERNET_TYPE_EFC 0x8808 ///< Ethernet flow control +#define ETHERNET_TYPE_ESP 0x8809 +///< Ethernet Slow Protocols +#define ETHERNET_TYPE_COBRA 0x8819 ///< CobraNet +#define ETHERNET_TYPE_MPLSU 0x8847 ///< MPLS unicast +#define ETHERNET_TYPE_MPLSM 0x8848 ///< MPLS multicast +#define ETHERNET_TYPE_PPPoEDS 0x8863 ////< PPPoE Discovery State +#define ETHERNET_TYPE_PPPoESS 0x8864 ///< PPPoE Session Stage +#define ETHERNET_TYPE_HP1MME 0x887B ///< HomePlug 1.0 MME +#define ETHERNET_TYPE_EAPoLAN 0x888E ///< EAP over LAN (IEEE 802.1X) +#define ETHERNET_TYPE_PROFINET 0x8892 ///< PROFINET Protocol +#define ETHERNET_TYPE_HYPERSCSI 0x889A ///< HyperSCSI (SCSI over Ethernet) +#define ETHERNET_TYPE_ATAoE 0x88A2 ///< ATA over Ethernet +#define ETHERNET_TYPE_ECAT 0x88A4 ///< EtherCAT Protocol +#define ETHERNET_TYPE_SVLAN 0x88A8 ///< Service VLAN tag identifier +#define ETHERNET_TYPE_POWLINK 0x88AB ///< Ethernet Powerlink +#define ETHERNET_TYPE_GOOSE 0x88B8 ////< Generic Object Oriented Substatuion event +#define ETHERNET_TYPE_GSE 0x88B9 ///< Generic Substation Events +#define ETHERNET_TYPE_SV 0x88BA ///< Sampled Value Transmission +#define ETHERNET_TYPE_MTRMN 0x88BA ///< MikroTik RoMON (unofficial) +#define ETHERNET_TYPE_LLDP 0x88CC ///< Link Layer Discovery Protocol +#define ETHERNET_TYPE_SCSIII 0x88CD ///< SECOS III +#define ETHERNET_TYPE_HPGPHY 0x88E1 ///< HomePlug Green PHY +#define ETHERNET_TYPE_MRP 0x88E3 ///< Media Redundancy Protocol +#define ETHERNET_TYPE_MACSEC 0x88E5 ///< IEEE 802.1AE MAC Security +#define ETHERNET_TYPE_PBB 0x88E7 ///< Provider Backbone Bridges +#define ETHERNET_TYPE_PTP 0x88F7 ///< Precison Time Protocol +#define ETHERNET_TYPE_NCSI 0x88F8 ///< NC-SI +#define ETHERNET_TYPE_PRP 0x88FB ///< Parallel Redundancy Protocol +#define ETHERNET_TYPE_CFM 0x8902 ///< IEEE 802.1ag Connectivy Fault Management +#define ETHERNET_TYPE_FCoE 0x8906 ///< Fible Channel over Ethenet +#define ETHERNET_TYPE_FCoEI 0x8914 ///< FCoE Initialization Protocol +#define ETHERNET_TYPE_RoCE 0x8915 ///< RDMA over Converted Ethernet +#define ETHERNET_TYPE_TTE 0x891D ///< TTEthernet Protocol Control Flame +#define ETHERNET_TYPE_1905 0x893A ///< 1905.1 IEEE Protocol +#define ETHERNET_TYPE_HSR 0x892F ///< High-availability Seamless Redundancy +#define ETHERNET_TYPE_ECTP 0x9000 ///< ethernet Configuration Testing Protocol +#define ETHERNET_TYPE_RT 0xF1C1 ///< Redundancy Tag + +#define ETH_IPv6_HEAD_ICMPv6 0x3a ///< ICMPv6 (IPv6 заголовок) +#define ETH_IPv6_HEAD_UDP 0x11 ///< UDP (IPv6 заголовок) + +#define ETH_IPv4_HEAD_ICMPv4 1 ///< ICMPv4 (IPv4 заголовок) +#define ETH_IPv4_HEAD_UDP 0x11 ///< UDP (IPv4 заголовок) еще как вариант 17 +#define ETH_IPv4_HEAD_TCP 6 ///< TCP (IPv4 заголовок) + +#define ETH_ICMPv4_TYPE_PING 8 ///< Нас пингуют через ICMPv4 > IPv4 +#define ETH_ICMPv6_TYPE_PING 128 ///< Нас пингуют через ICMPv6 > IPv6 #define HARDWARE_TYPE_ETHERNET 0x01 @@ -12,7 +77,65 @@ typedef struct ethernet_frame { uint8_t src_mac[6]; uint16_t type; uint8_t data[]; -} __attribute__((packed)) ethernet_frame_t; +} __attribute__((packed)) ethernet_frame_t; ///< 14+ + +typedef struct { + uint8_t Type; + uint8_t Size; + uint8_t MAC[6]; +} __attribute__((packed)) ETH_IPv6_OPT_PKG; ///< 8 байт + +typedef struct { + uint8_t Version; + uint8_t Flow[3]; + uint16_t PayLoad; + uint8_t NextHead; + uint8_t HopLimit; + uint16_t Source[8]; + uint16_t Destination[8]; +} __attribute__((packed)) ETH_IPv6_PKG; ///< 40 байт + 8 байт + + +typedef struct { + uint8_t Type; + uint8_t Code; + uint16_t CheckSum; + uint32_t Reserved; + ETH_IPv6_OPT_PKG Opt; +} __attribute__((packed)) ETH_ICMPv6_PKG; ///< 16 байт + +typedef struct { + uint8_t HeaderLength : 4; + uint8_t Version : 4; + uint8_t DSF; + uint16_t TotalLength; + uint16_t ID; + uint16_t Flags; + uint8_t TimeLife; + uint8_t Protocol; + uint16_t Checksum; + uint8_t Source[4]; + uint8_t Destination[4]; +} __attribute__((packed)) ETH_IPv4_PKG; ///< 20 байт // NDRAEY: PKT is not PKG! + + +typedef struct { + uint16_t SourcePort; + uint16_t DestinationPort; + uint16_t Length; + uint16_t CheckSum; +} __attribute__((packed)) ETH_UDP_PKG; ///< 8 байт + + +typedef struct { + uint8_t Type; + uint8_t Code; + uint16_t CheckSum; + uint16_t IDBE; + uint16_t SNBE; + uint8_t Timestamp[8]; +} __attribute__((packed)) ETH_ICMPv4_PKG; ///< 16 байт + void ethernet_send_packet(netcard_entry_t* card, uint8_t* dest_mac, uint8_t* data, size_t len, uint16_t type); -void ethernet_handle_packet(ethernet_frame_t* packet, size_t len); \ No newline at end of file +void ethernet_handle_packet(netcard_entry_t *card, ethernet_frame_t *packet, size_t len); \ No newline at end of file diff --git a/kernel/include/net/icmp.h b/kernel/include/net/icmp.h new file mode 100644 index 000000000..9a33c2578 --- /dev/null +++ b/kernel/include/net/icmp.h @@ -0,0 +1,5 @@ +#pragma once + +#include "net/cards.h" + +void icmp_handle_packet(netcard_entry_t* card, char* packet_data); \ No newline at end of file diff --git a/kernel/include/net/ipv4.h b/kernel/include/net/ipv4.h new file mode 100644 index 000000000..f637618f4 --- /dev/null +++ b/kernel/include/net/ipv4.h @@ -0,0 +1,13 @@ +// +// Created by ndraey on 01.11.23. +// + +#pragma once + +#include +#include "net/cards.h" + +#define IP_PROTOCOL_UDP 17 + +void ipv4_handle_packet(netcard_entry_t *card, char *packet, size_t packet_size); +void ipv4_send_packet(netcard_entry_t *card, uint8_t dest_ip[4], const void *data, size_t size, uint8_t protocol); \ No newline at end of file diff --git a/kernel/include/net/udp.h b/kernel/include/net/udp.h new file mode 100644 index 000000000..80566d5ee --- /dev/null +++ b/kernel/include/net/udp.h @@ -0,0 +1,14 @@ +#pragma once + +#include "common.h" +#include "net/cards.h" + +typedef struct udp_packet { + uint16_t src_port; + uint16_t dst_port; + uint16_t length; + uint16_t checksum; +} __attribute__((packed)) udp_packet_t; + +void udp_send_packet(netcard_entry_t* card, uint8_t * dst_ip, uint16_t src_port, uint16_t dst_port, void * data, int len); +void udp_handle_packet(netcard_entry_t *card, udp_packet_t *packet); \ No newline at end of file diff --git a/kernel/include/portability.h b/kernel/include/portability.h new file mode 100644 index 000000000..0b916369c --- /dev/null +++ b/kernel/include/portability.h @@ -0,0 +1,112 @@ +#pragma once + +#include "mem/vmm.h" +#include "lib/stdlib.h" + +#define malloc(a) kmalloc(a) +#define calloc(a, b) kcalloc(a, b) +#define realloc(a, b) krealloc(a, b) +#define free(a) kfree(a) +#define printf(a, ...) qemu_printf(a, ##__VA_ARGS__) + + +#define passert(expression) \ + if (!(expression)) { \ + qemu_warn("Assertion failed: file %s, line %d\n", __FILE__, __LINE__); \ + } + +// stdint.h + +#define INT_FAST16_MIN (-2147483647-1) +#define INT_FAST32_MIN (-2147483647-1) +#define INT_FAST16_MAX (2147483647) +#define INT_FAST32_MAX (2147483647) +#define UINT_FAST16_MAX (4294967295U) +#define UINT_FAST32_MAX (4294967295U) +#define SIZE_MAX (4294967295U) + +#define INT32_MIN (-INT32_MAX-1) +#define INT32_MAX 2147483647 + +#define INT_MIN (-INT_MAX - 1) +#define INT_MAX 2147483647 + +#define UINT_MAX 4294967295U + +#define UINT32_MAX (4294967295U) + + +// bits/types.h + +typedef signed char __int8_t; +typedef unsigned char __uint8_t; +typedef signed short int __int16_t; +typedef unsigned short int __uint16_t; +typedef signed int __int32_t; +typedef unsigned int __uint32_t; +typedef unsigned long long __uint64_t; +typedef long long __int64_t; + +typedef __int8_t __int_least8_t; +typedef __uint8_t __uint_least8_t; +typedef __int16_t __int_least16_t; +typedef __uint16_t __uint_least16_t; +typedef __int32_t __int_least32_t; +typedef __uint32_t __uint_least32_t; +typedef __int64_t __int_least64_t; +typedef __uint64_t __uint_least64_t; + +// stdint.h +typedef __int_least8_t int_least8_t; +typedef __int_least16_t int_least16_t; +typedef __int_least32_t int_least32_t; +typedef __int_least64_t int_least64_t; + + +typedef __uint_least8_t uint_least8_t; +typedef __uint_least16_t uint_least16_t; +typedef __uint_least32_t uint_least32_t; +typedef __uint_least64_t uint_least64_t; + +typedef signed char int_fast8_t; +typedef int int_fast16_t; +typedef int int_fast32_t; + +typedef uint8_t uint_fast8_t; +typedef uint32_t uint_fast16_t; +typedef uint32_t uint_fast32_t; + +typedef int intptr_t; +typedef unsigned int uintptr_t; + +__extension__ typedef long long int __intmax_t; +__extension__ typedef unsigned long long int __uintmax_t; + +typedef __intmax_t intmax_t; +typedef __uintmax_t uintmax_t; + + +typedef __uint_least64_t uint_least64_t; +typedef __int_least64_t int_least64_t; + +typedef long long int int_fast64_t; +typedef unsigned long long int uint_fast64_t; + +// bits/types/struct_tm.h + +struct tm { + int tm_sec; /* Seconds. [0-60] (1 leap second) */ + int tm_min; /* Minutes. [0-59] */ + int tm_hour; /* Hours. [0-23] */ + int tm_mday; /* Day. [1-31] */ + int tm_mon; /* Month. [0-11] */ + int tm_year; /* Year - 1900. */ + int tm_wday; /* Day of week. [0-6] */ + int tm_yday; /* Days in year.[0-365] */ + int tm_isdst; /* DST. [-1/0/1]*/ + + long int __tm_gmtoff; /* Seconds east of UTC. */ + const char *__tm_zone; /* Timezone abbreviation. */ +}; + +typedef int32_t time_t; diff --git a/kernel/include/rust_header.h b/kernel/include/rust_header.h deleted file mode 100644 index aef54a8f6..000000000 --- a/kernel/include/rust_header.h +++ /dev/null @@ -1,7 +0,0 @@ -#ifndef RUST_H -#define RUST_H - -extern void rust_main(); -extern void rust_command(uint32_t argc, char *argv[]); - -#endif \ No newline at end of file diff --git a/kernel/include/rust_headers.h b/kernel/include/rust_headers.h new file mode 100644 index 000000000..cc3c63683 --- /dev/null +++ b/kernel/include/rust_headers.h @@ -0,0 +1,6 @@ +#ifndef RUST_H +#define RUST_H + +extern void rust_main(); + +#endif diff --git a/kernel/include/sys/acpi.h b/kernel/include/sys/acpi.h index 15ddc3549..a7ecd353a 100644 --- a/kernel/include/sys/acpi.h +++ b/kernel/include/sys/acpi.h @@ -1,6 +1,6 @@ #pragma once -#include "kernel.h" +#include "common.h" #include "sys/rsdp.h" #include "sys/rsdt.h" diff --git a/kernel/include/sys/cpu_isr.h b/kernel/include/sys/cpu_isr.h old mode 100755 new mode 100644 diff --git a/kernel/include/sys/cpuid.h b/kernel/include/sys/cpuid.h index a327d9e33..fe1199df6 100644 --- a/kernel/include/sys/cpuid.h +++ b/kernel/include/sys/cpuid.h @@ -80,9 +80,10 @@ struct cpu_info { size_t l2_size; size_t l3_size; - size_t feature_flags_ecx; - size_t feature_flags_edx; + uint32_t feature_flags_ecx; + uint32_t feature_flags_edx; }; size_t cpu_get_id(); -struct cpu_info cpu_get_basic_info(); \ No newline at end of file +struct cpu_info cpu_get_basic_info(); +bool is_long_mode_supported(); diff --git a/kernel/include/sys/cpuinfo.h b/kernel/include/sys/cpuinfo.h old mode 100755 new mode 100644 diff --git a/kernel/include/sys/descriptor_tables.h b/kernel/include/sys/descriptor_tables.h old mode 100755 new mode 100644 diff --git a/kernel/include/sys/isr.h b/kernel/include/sys/isr.h old mode 100755 new mode 100644 diff --git a/kernel/include/sys/memory.h b/kernel/include/sys/memory.h deleted file mode 100755 index e5e508904..000000000 --- a/kernel/include/sys/memory.h +++ /dev/null @@ -1,156 +0,0 @@ -#ifndef MEMORY_H -#define MEMORY_H - -#include "common.h" -#include "multiboot.h" -#include "sys/sync.h" -#include "lib/string.h" - -#define PAGE_SIZE 0x1000 /* Memory page size */ -#define PAGE_OFFSET_BITS 12 /* */ -#define PAGE_OFFSET_MASK 0xFFF -#define PAGE_TABLE_INDEX_BITS 10 -#define PAGE_TABLE_INDEX_MASK 0x3FF - -#define PHYSADDR_BITS 32 - -/*------------------------------------------------------------------------------ -// Page flags -//----------------------------------------------------------------------------*/ -#define PAGE_PRESENT (1 << 0) -#define PAGE_WRITEABLE (1 << 1) -#define PAGE_USER (1 << 2) -#define PAGE_WRITE_THROUGH (1 << 3) -#define PAGE_CACHE_DISABLE (1 << 4) -#define PAGE_ACCESSED (1 << 5) -#define PAGE_DIRTY (1 << 6) -#define PAGE_GLOBAL (1 << 8) - -// #define KERNEL_BASE 0x200000 /* Kernel start address in physical memory */ // There was 0x200000 before SB16 driver -// #define KERNEL_SIZE 0x1800000 /* Size of area for kernel */ - -/*------------------------------------------------------------------------------ -// Kernel virtual address space -//----------------------------------------------------------------------------*/ -#define KERNEL_MEMORY_END (0x80000000) - -/* Kernel heap params */ -#define KERNEL_HEAP_SIZE 0x20000000 -#define KERNEL_HEAP_BASE ((void*) (KERNEL_MEMORY_END - KERNEL_HEAP_SIZE)) -#define KERNEL_HEAP_BLOCK_INFO_SIZE 0x400000 - -/*------------------------------------------------------------------------------ -// Any types redefinition -//----------------------------------------------------------------------------*/ -typedef uint32_t physaddr_t; -typedef uint32_t virtual_addr_t; -//typedef uint32_t physical_addres_t; -/*------------------------------------------------------------------------------ -// Memory pages block -//----------------------------------------------------------------------------*/ -typedef struct -{ - physaddr_t prev; /* Previous block pointer */ - physaddr_t next; /* Next block pointer */ - size_t size; /* Block size */ - -}__attribute__((packed)) physmemory_pages_block_t; - -/*------------------------------------------------------------------------------ -// Memory block structure -//----------------------------------------------------------------------------*/ -typedef struct -{ - void* base; /* Base address */ - size_t size; /* Memory block size */ - -}__attribute__((packed)) memory_block_t; - -/*------------------------------------------------------------------------------ -// Kernel heap -//----------------------------------------------------------------------------*/ -typedef struct -{ - memory_block_t* blocks; /* Memory blocks info array */ - void* start; /* Heap start virtual address */ - void* end; /* Heap end virtual address */ - size_t size; /* Heap size */ - size_t count; /* Number of allocated memory blocks */ - mutex_t heap_mutex; /* Sinchonization for heap access */ - -}__attribute__((packed)) heap_t; - -#define LAST_ADDR 0xFFFFFFFF /* Last virtual address in x86 address space*/ - -#define TEMP_PAGE (KERNEL_BASE + KERNEL_SIZE - PAGE_SIZE) /* Temporary page for */ -// #define TEMP_PAGE (0xFFA00000) /* Temporary page for */ - /* physical memory access */ - -#define TEMP_TABLE_IDX (TEMP_PAGE >> 22) /* Temporary page table index == PAGE_DIRECTORY_INDEX*/ -#define TEMP_PAGE_IDX ((TEMP_PAGE >> PAGE_OFFSET_BITS) & PAGE_TABLE_INDEX_MASK) /* Temporary page index == PAGE_TABLE_INDEX*/ - -#define PAGE_ALIGN_DOWN(x) ((x) & -PAGE_SIZE) -#define PAGE_ALIGN_UP(address) (((address) + PAGE_SIZE - 1) & ~(PAGE_SIZE - 1) ) - -#define PAGE_DIRECTORY_INDEX(x) (((x) >> 22) & 0x3FF) -#define PAGE_TABLE_INDEX(x) (((x) >> 12) & 0x3FF) - -#define PAGE_GET_TABLE_ADDRESS(x) (*x & ~0xFFF) - -#define GET_PDE(v) (page_dir_entry*) (0xFFFFF000 + (v >> 22) * 4) -#define GET_PTE(v) (page_table_entry*) (0xFFC00000 + (v >> 12) * 4) - -#define GET_PT() (size_t*)(kernel_page_dir + PAGE_SIZE) - -extern size_t memory_size; -extern size_t KERNEL_BASE; -extern size_t KERNEL_SIZE; - -// #define REAL_HEAP_SIZE (memory_size - (KERNEL_BASE + KERNEL_SIZE + KERNEL_HEAP_BLOCK_INFO_SIZE - (8 << 20))) -#define REAL_HEAP_SIZE KERNEL_HEAP_SIZE - -/* Switch processor to page mode */ -void switch_page_mode(void); -/* Check memory map from GRUB2 Multiboot header */ -void check_memory_map(memory_map_entry_t* mmap_addr, uint32_t length); - -void init_memory_manager(uint32_t stack); - -uint8_t map_pages(physaddr_t page_dir, /* Page directory*/ - virtual_addr_t vaddr, /* Start virtual address */ - physaddr_t paddr, /* Start physical address */ - size_t count, /* Size of memory space */ - uint32_t flags); /* Page's flags */ - -physaddr_t alloc_phys_pages(size_t count); -void vmm_free_page(virtual_addr_t vaddr); -physaddr_t get_kernel_dir(void); - -void* kmalloc_common(size_t size, bool align); -void kfree(void* vaddr); -void* krealloc(void* vaddr, size_t size); -size_t memory_get_used_kernel(); -size_t virt2phys(physaddr_t page_directory, virtual_addr_t virtual_address); -uint8_t unmap_pages(physaddr_t page_dir, virtual_addr_t vaddr, size_t count); - -/** - * @brief Выделение памяти - * - * @param size_t size - Размер - * - * @return void* - ??? - */ -static inline void* kmalloc(size_t size){ - return kmalloc_common(size, false); -} - -/** - * @brief Выделение памяти - */ -void* kcalloc(size_t count, size_t size); - -void* kmalloc_a(size_t size); - -bool is_suitable_phys_region(physaddr_t address); - -#endif \ No newline at end of file diff --git a/kernel/include/sys/mtrr.h b/kernel/include/sys/mtrr.h new file mode 100644 index 000000000..f1c3f30f3 --- /dev/null +++ b/kernel/include/sys/mtrr.h @@ -0,0 +1,9 @@ +#pragma once + +#include "common.h" + +void mtrr_init(); +void read_mtrr(size_t index, uint32_t* base, uint32_t* mask); +void write_mtrr(size_t index, uint32_t base, uint32_t mask); +void write_mtrr_size(size_t index, uint32_t base, uint32_t size, size_t type); +size_t find_free_mtrr(); \ No newline at end of file diff --git a/kernel/include/sys/scheduler.h b/kernel/include/sys/scheduler.h old mode 100755 new mode 100644 index 5a3763c33..8c0703d28 --- a/kernel/include/sys/scheduler.h +++ b/kernel/include/sys/scheduler.h @@ -3,7 +3,7 @@ #include "common.h" #include "lib/list.h" -#include "sys/memory.h" +#include "mem/pmm.h" #define DEFAULT_STACK_SIZE 0x4000 @@ -13,12 +13,12 @@ typedef struct { list_item_t list_item; /* List item */ - physaddr_t page_dir; /* Page directory */ + physical_addr_t page_dir; /* Page directory */ size_t threads_count; /* Count of threads */ bool suspend; /* Suspend flag */ uint32_t pid; /* Process ID (PID) */ char name[256]; /* Process name */ - + // Every process should have a path that process operates }__attribute__((packed)) process_t; /*----------------------------------------------------------------------------- @@ -41,9 +41,6 @@ typedef struct /* Initialization */ void init_task_manager(void); -/* Switching of tasks */ -void switch_task(void); - extern void task_switch(void); /* Create new thread */ @@ -62,6 +59,8 @@ void thread_suspend(thread_t* thread, bool suspend); /* Exit from thread */ void thread_exit(thread_t* thread); +void create_process(void* entry_point, char* name, bool suspend, bool is_kernel); + /* Check multitask flag */ bool is_multitask(void); diff --git a/kernel/include/sys/status.h b/kernel/include/sys/status.h new file mode 100644 index 000000000..a76fc94a5 --- /dev/null +++ b/kernel/include/sys/status.h @@ -0,0 +1,16 @@ +#pragma once + +typedef enum { + OK = 0, + E_NO_MEMORY, + E_INVALID_BUFFER, + E_NO_DEVICE, + E_DEVICE_NOT_ONLINE, + E_IO_ERROR, + E_TIMEOUT, + E_INVALID_SIZE, + E_INVALID_SIGNATURE, + E_NOT_SUPPORTED, + E_PIKACHU, // Tsssss it's an easteregg + E_UNKNOWN +} status_t; diff --git a/kernel/include/sys/sync.h b/kernel/include/sys/sync.h old mode 100755 new mode 100644 diff --git a/kernel/include/sys/syscalls.h b/kernel/include/sys/syscalls.h old mode 100755 new mode 100644 index d3695c833..896aeaec1 --- a/kernel/include/sys/syscalls.h +++ b/kernel/include/sys/syscalls.h @@ -1,39 +1,21 @@ -#ifndef SYSCALLS_H -#define SYSCALLS_H +#pragma once #include "common.h" #include "sys/isr.h" -#define NUM_CALLS 9 - -/*----------------------------------------------------------------------------- - * Syscall interrupt number - *---------------------------------------------------------------------------*/ #define SYSCALL 0x50 -/*----------------------------------------------------------------------------- - * System functions - *---------------------------------------------------------------------------*/ -#define PORT_INPUT_BYTE 0x00 -#define PORT_OUTPUT_BYTE 0x01 -#define TTYCTL 0x02 -#define SH_ENV 0x03 -#define SH_ENV_DEBUG 0x04 -#define SCREENCTL 0x05 -#define MEMCTL 0x06 -#define KBDCTL 0x07 +typedef size_t syscall_fn_t (size_t, size_t, size_t); -/*----------------------------------------------------------------------------- - * Macro for system call declaration - *---------------------------------------------------------------------------*/ +#define NUM_CALLS 4 /* No params */ #define DECL_SYSCALL0(func) int syscall_##func() #define DEFN_SYSCALL0(func, num)\ \ -int syscall_##func()\ -{ int ret = 0;\ +int syscall_##func() { \ + int ret = 0;\ asm volatile ("int $0x50":"=a"(ret):"a"(num));\ return ret;\ } @@ -79,13 +61,3 @@ int syscall_##func(P1 p1, P2 p2, P3 p3)\ void init_syscalls(void); extern size_t syscall_entry_call(void* entry_point, void* param1, void* param2, void* param3); void syscall_handler(registers_t regs); -int get_digit(int dig); - -/*----------------------------------------------------------------------------- - * System calls declaration - *---------------------------------------------------------------------------*/ -DECL_SYSCALL2(tty_ctl, void*, void*); -// ... -DECL_SYSCALL2(screen_ctl, size_t, size_t); - -#endif diff --git a/kernel/include/sys/timer.h b/kernel/include/sys/timer.h old mode 100755 new mode 100644 index 9dc941785..6212fea80 --- a/kernel/include/sys/timer.h +++ b/kernel/include/sys/timer.h @@ -1,11 +1,11 @@ -#ifndef TIMER_H -#define TIMER_H +#pragma once -#define BASE_FREQ 1000 +#define BASE_FREQ 1193180 +#define CLOCK_FREQ 1000 #include "common.h" -#define sleep(_d) sleep_ms((_d) * 1000); +#define sleep(_d) sleep_ms((_d) * CLOCK_FREQ); #define timestamp() (getTicks() / (getFrequency() / 1000)) size_t getTicks(); @@ -13,9 +13,4 @@ double getUptime(); size_t getFrequency(); void sleep_ticks(uint32_t delay); void sleep_ms(uint32_t milliseconds); - - void init_timer(uint32_t f); - - -#endif diff --git a/kernel/include/sys/v8086.h b/kernel/include/sys/v8086.h index 62f8a16e3..0de14e600 100644 --- a/kernel/include/sys/v8086.h +++ b/kernel/include/sys/v8086.h @@ -1,6 +1,4 @@ // v8086 by NDRAEY (c) 2023 // For SayoriOS -#include "kernel.h" - extern void v8086_enable(); \ No newline at end of file diff --git a/kernel/include/sys/variable.h b/kernel/include/sys/variable.h new file mode 100644 index 000000000..ea50b29d0 --- /dev/null +++ b/kernel/include/sys/variable.h @@ -0,0 +1,11 @@ +#pragma once + +typedef struct { + bool Ready; + char Key[512]; + char Value[2048]; +} VARIABLE; + +char* variable_read(char* Key); +int variable_write(char* Key, char* Value); +VARIABLE* variable_list(char* Search); \ No newline at end of file diff --git a/kernel/include/user/env.h b/kernel/include/user/env.h index 6b7c75b3a..9edadae31 100644 --- a/kernel/include/user/env.h +++ b/kernel/include/user/env.h @@ -1,29 +1,23 @@ #pragma once -typedef struct env -{ - char Username[128]; ///< Имя пользователя - char Hostname[128]; ///< Имя устройства - char CPU_Name[128]; ///< Имя процессора - char OS_Name[128]; ///< Имя ОС - char OS_CodeName[128]; ///< Кодовое название ОС - char OS_Build[128]; ///< Дата компиляции - char OS_Arch[128]; ///< Архитектура ядра - int OS_VERSION_ENV; ///< Версия ENV - int OS_VERSION_MAJOR; ///< Версия ядра - int OS_VERSION_MINOR; ///< Пре-Релиз - int OS_VERSION_PATCH; ///< Патч - size_t Link_Display; ///< Ссылка на виртуальный экран - size_t Link_Time; ///< Ссылка на время - size_t Display_W; ///< Длина экрана - size_t Display_H; ///< Высота экрана - int Display_B; ///< Смещение экрана - size_t Display_P; ///< Глубина экрана - size_t Display_S; ///< Размер буфера - size_t Ticks; ///< Количество текущих тиков - size_t RAM_Install; ///< Установлено ОЗУ - size_t RAM_Used; ///< Использовано ОЗУ - size_t RAM_Free; ///< Свободно ОЗУ +typedef struct env { + int OS_VERSION_ENV; ///< Версия ENV + int OS_VERSION_MAJOR; ///< Версия ядра + int OS_VERSION_MINOR; ///< Пре-Релиз + int OS_VERSION_PATCH; ///< Патч + size_t DisplayFrameBuffer_Address; ///< Ссылка на виртуальный экран + size_t Link_Time; ///< Ссылка на время + size_t Display_W; ///< Длина экрана + size_t Display_H; ///< Высота экрана + size_t Display_B; ///< Бит / пиксель + size_t Display_P; ///< Глубина экрана + size_t Display_S; ///< Размер буфера + size_t Ticks; ///< Количество текущих тиков + size_t RAM_Install; ///< Установлено ОЗУ + size_t RAM_Used; ///< Использовано ОЗУ + size_t RAM_Free; ///< Свободно ОЗУ } env_t; -struct env* printEnv(); +extern env_t system_environment; + +void configure_env(); \ No newline at end of file diff --git a/kernel/include/version.h b/kernel/include/version.h new file mode 100644 index 000000000..074aeb123 --- /dev/null +++ b/kernel/include/version.h @@ -0,0 +1,12 @@ +#pragma once + +#define VERSION_MAJOR 0 /// Версия ядра +#define VERSION_MINOR 3 /// Пре-релиз +#define VERSION_PATCH 4 /// Патч +#ifdef SAYORI64 +#define ARCH_TYPE "x86_64" /// Архитектура +#else +#define ARCH_TYPE "i386" /// Архитектура +#endif +#define VERNAME "Soul" /// Имя версии (изменяется вместе с минорной части версии) +#define SUBVERSIONNAME "Scythe" /// Вторичное имя версии (изменяется вместе с каждым глобальным релизом) diff --git a/kernel/src/compress/zlib/README_IMPORTANT.txt b/kernel/src/compress/zlib/README_IMPORTANT.txt deleted file mode 100644 index 68fd69f56..000000000 --- a/kernel/src/compress/zlib/README_IMPORTANT.txt +++ /dev/null @@ -1,11 +0,0 @@ -Zlib PORTED from following GitHub repository: https://github.com/madler/zlib. - -This code doesn't belong to me! Code belongs to it's original authors!!!1 - -See kernel/include/compress/zlib/zlib.h for more information. - -Sources - kernel/src/compress/zlib - -Include files - kernel/include/compress/zlib - -Ported to SayoriOS by NDRAEY. \ No newline at end of file diff --git a/kernel/src/compress/zlib/adler32.c b/kernel/src/compress/zlib/adler32.c deleted file mode 100644 index 05178e0f0..000000000 --- a/kernel/src/compress/zlib/adler32.c +++ /dev/null @@ -1,164 +0,0 @@ -/* adler32.c -- compute the Adler-32 checksum of a data stream - * Copyright (C) 1995-2011, 2016 Mark Adler - * For conditions of distribution and use, see copyright notice in zlib.h - */ - -/* @(#) $Id$ */ - -#include "../../../include/compress/zlib/zutil.h" - -#define BASE 65521U /* largest prime smaller than 65536 */ -#define NMAX 5552 -/* NMAX is the largest n such that 255n(n+1)/2 + (n+1)(BASE-1) <= 2^32-1 */ - -#define DO1(buf,i) {adler += (buf)[i]; sum2 += adler;} -#define DO2(buf,i) DO1(buf,i); DO1(buf,i+1); -#define DO4(buf,i) DO2(buf,i); DO2(buf,i+2); -#define DO8(buf,i) DO4(buf,i); DO4(buf,i+4); -#define DO16(buf) DO8(buf,0); DO8(buf,8); - -/* use NO_DIVIDE if your processor does not do division in hardware -- - try it both ways to see which is faster */ -#ifdef NO_DIVIDE -/* note that this assumes BASE is 65521, where 65536 % 65521 == 15 - (thank you to John Reiser for pointing this out) */ -# define CHOP(a) \ - do { \ - unsigned long tmp = a >> 16; \ - a &= 0xffffUL; \ - a += (tmp << 4) - tmp; \ - } while (0) -# define MOD28(a) \ - do { \ - CHOP(a); \ - if (a >= BASE) a -= BASE; \ - } while (0) -# define MOD(a) \ - do { \ - CHOP(a); \ - MOD28(a); \ - } while (0) -# define MOD63(a) \ - do { /* this assumes a is not negative */ \ - z_off64_t tmp = a >> 32; \ - a &= 0xffffffffL; \ - a += (tmp << 8) - (tmp << 5) + tmp; \ - tmp = a >> 16; \ - a &= 0xffffL; \ - a += (tmp << 4) - tmp; \ - tmp = a >> 16; \ - a &= 0xffffL; \ - a += (tmp << 4) - tmp; \ - if (a >= BASE) a -= BASE; \ - } while (0) -#else -# define MOD(a) a %= BASE -# define MOD28(a) a %= BASE -# define MOD63(a) a %= BASE -#endif - -/* ========================================================================= */ -uLong ZEXPORT adler32_z(uLong adler, const Bytef *buf, z_size_t len) { - unsigned long sum2; - unsigned n; - - /* split Adler-32 into component sums */ - sum2 = (adler >> 16) & 0xffff; - adler &= 0xffff; - - /* in case user likes doing a byte at a time, keep it fast */ - if (len == 1) { - adler += buf[0]; - if (adler >= BASE) - adler -= BASE; - sum2 += adler; - if (sum2 >= BASE) - sum2 -= BASE; - return adler | (sum2 << 16); - } - - /* initial Adler-32 value (deferred check for len == 1 speed) */ - if (buf == Z_NULL) - return 1L; - - /* in case short lengths are provided, keep it somewhat fast */ - if (len < 16) { - while (len--) { - adler += *buf++; - sum2 += adler; - } - if (adler >= BASE) - adler -= BASE; - MOD28(sum2); /* only added so many BASE's */ - return adler | (sum2 << 16); - } - - /* do length NMAX blocks -- requires just one modulo operation */ - while (len >= NMAX) { - len -= NMAX; - n = NMAX / 16; /* NMAX is divisible by 16 */ - do { - DO16(buf); /* 16 sums unrolled */ - buf += 16; - } while (--n); - MOD(adler); - MOD(sum2); - } - - /* do remaining bytes (less than NMAX, still just one modulo) */ - if (len) { /* avoid modulos if none remaining */ - while (len >= 16) { - len -= 16; - DO16(buf); - buf += 16; - } - while (len--) { - adler += *buf++; - sum2 += adler; - } - MOD(adler); - MOD(sum2); - } - - /* return recombined sums */ - return adler | (sum2 << 16); -} - -/* ========================================================================= */ -uLong ZEXPORT adler32(uLong adler, const Bytef *buf, uInt len) { - return adler32_z(adler, buf, len); -} - -/* ========================================================================= */ -local uLong adler32_combine_(uLong adler1, uLong adler2, z_off64_t len2) { - unsigned long sum1; - unsigned long sum2; - unsigned rem; - - /* for negative len, return invalid adler32 as a clue for debugging */ - if (len2 < 0) - return 0xffffffffUL; - - /* the derivation of this formula is left as an exercise for the reader */ - MOD63(len2); /* assumes len2 >= 0 */ - rem = (unsigned)len2; - sum1 = adler1 & 0xffff; - sum2 = rem * sum1; - MOD(sum2); - sum1 += (adler2 & 0xffff) + BASE - 1; - sum2 += ((adler1 >> 16) & 0xffff) + ((adler2 >> 16) & 0xffff) + BASE - rem; - if (sum1 >= BASE) sum1 -= BASE; - if (sum1 >= BASE) sum1 -= BASE; - if (sum2 >= ((unsigned long)BASE << 1)) sum2 -= ((unsigned long)BASE << 1); - if (sum2 >= BASE) sum2 -= BASE; - return sum1 | (sum2 << 16); -} - -/* ========================================================================= */ -uLong ZEXPORT adler32_combine(uLong adler1, uLong adler2, z_off_t len2) { - return adler32_combine_(adler1, adler2, len2); -} - -uLong ZEXPORT adler32_combine64(uLong adler1, uLong adler2, z_off64_t len2) { - return adler32_combine_(adler1, adler2, len2); -} diff --git a/kernel/src/compress/zlib/compress.c b/kernel/src/compress/zlib/compress.c deleted file mode 100644 index 741b9b7e7..000000000 --- a/kernel/src/compress/zlib/compress.c +++ /dev/null @@ -1,75 +0,0 @@ -/* compress.c -- compress a memory buffer - * Copyright (C) 1995-2005, 2014, 2016 Jean-loup Gailly, Mark Adler - * For conditions of distribution and use, see copyright notice in zlib.h - */ - -/* @(#) $Id$ */ - -#define ZLIB_INTERNAL -#include "../../../include/compress/zlib/zlib.h" - -/* =========================================================================== - Compresses the source buffer into the destination buffer. The level - parameter has the same meaning as in deflateInit. sourceLen is the byte - length of the source buffer. Upon entry, destLen is the total size of the - destination buffer, which must be at least 0.1% larger than sourceLen plus - 12 bytes. Upon exit, destLen is the actual size of the compressed buffer. - - compress2 returns Z_OK if success, Z_MEM_ERROR if there was not enough - memory, Z_BUF_ERROR if there was not enough room in the output buffer, - Z_STREAM_ERROR if the level parameter is invalid. -*/ -int ZEXPORT compress2(Bytef *dest, uLongf *destLen, const Bytef *source, - uLong sourceLen, int level) { - z_stream stream; - int err; - const uInt max = (uInt)-1; - uLong left; - - left = *destLen; - *destLen = 0; - - stream.zalloc = (alloc_func)0; - stream.zfree = (free_func)0; - stream.opaque = (voidpf)0; - - err = deflateInit(&stream, level); - if (err != Z_OK) return err; - - stream.next_out = dest; - stream.avail_out = 0; - stream.next_in = (z_const Bytef *)source; - stream.avail_in = 0; - - do { - if (stream.avail_out == 0) { - stream.avail_out = left > (uLong)max ? max : (uInt)left; - left -= stream.avail_out; - } - if (stream.avail_in == 0) { - stream.avail_in = sourceLen > (uLong)max ? max : (uInt)sourceLen; - sourceLen -= stream.avail_in; - } - err = deflate(&stream, sourceLen ? Z_NO_FLUSH : Z_FINISH); - } while (err == Z_OK); - - *destLen = stream.total_out; - deflateEnd(&stream); - return err == Z_STREAM_END ? Z_OK : err; -} - -/* =========================================================================== - */ -int ZEXPORT compress(Bytef *dest, uLongf *destLen, const Bytef *source, - uLong sourceLen) { - return compress2(dest, destLen, source, sourceLen, Z_DEFAULT_COMPRESSION); -} - -/* =========================================================================== - If the default memLevel or windowBits for deflateInit() is changed, then - this function needs to be updated. - */ -uLong ZEXPORT compressBound(uLong sourceLen) { - return sourceLen + (sourceLen >> 12) + (sourceLen >> 14) + - (sourceLen >> 25) + 13; -} diff --git a/kernel/src/compress/zlib/crc32.c b/kernel/src/compress/zlib/crc32.c deleted file mode 100644 index e25ad3ff5..000000000 --- a/kernel/src/compress/zlib/crc32.c +++ /dev/null @@ -1,1049 +0,0 @@ -/* crc32.c -- compute the CRC-32 of a data stream - * Copyright (C) 1995-2022 Mark Adler - * For conditions of distribution and use, see copyright notice in zlib.h - * - * This interleaved implementation of a CRC makes use of pipelined multiple - * arithmetic-logic units, commonly found in modern CPU cores. It is due to - * Kadatch and Jenkins (2010). See doc/crc-doc.1.0.pdf in this distribution. - */ - -/* @(#) $Id$ */ - -/* - Note on the use of DYNAMIC_CRC_TABLE: there is no mutex or semaphore - protection on the static variables used to control the first-use generation - of the crc tables. Therefore, if you #define DYNAMIC_CRC_TABLE, you should - first call get_crc_table() to initialize the tables before allowing more than - one thread to use crc32(). - - MAKECRCH can be #defined to write out crc32.h. A main() routine is also - produced, so that this one source file can be compiled to an executable. - */ - -#ifdef MAKECRCH -# include -# ifndef DYNAMIC_CRC_TABLE -# define DYNAMIC_CRC_TABLE -# endif /* !DYNAMIC_CRC_TABLE */ -#endif /* MAKECRCH */ - -#include "../../../include/compress/zlib/zutil.h" /* for Z_U4, Z_U8, z_crc_t, and FAR definitions */ - - /* - A CRC of a message is computed on N braids of words in the message, where - each word consists of W bytes (4 or 8). If N is 3, for example, then three - running sparse CRCs are calculated respectively on each braid, at these - indices in the array of words: 0, 3, 6, ..., 1, 4, 7, ..., and 2, 5, 8, ... - This is done starting at a word boundary, and continues until as many blocks - of N * W bytes as are available have been processed. The results are combined - into a single CRC at the end. For this code, N must be in the range 1..6 and - W must be 4 or 8. The upper limit on N can be increased if desired by adding - more #if blocks, extending the patterns apparent in the code. In addition, - crc32.h would need to be regenerated, if the maximum N value is increased. - - N and W are chosen empirically by benchmarking the execution time on a given - processor. The choices for N and W below were based on testing on Intel Kaby - Lake i7, AMD Ryzen 7, ARM Cortex-A57, Sparc64-VII, PowerPC POWER9, and MIPS64 - Octeon II processors. The Intel, AMD, and ARM processors were all fastest - with N=5, W=8. The Sparc, PowerPC, and MIPS64 were all fastest at N=5, W=4. - They were all tested with either gcc or clang, all using the -O3 optimization - level. Your mileage may vary. - */ - -/* Define N */ -#ifdef Z_TESTN -# define N Z_TESTN -#else -# define N 5 -#endif -#if N < 1 || N > 6 -# error N must be in 1..6 -#endif - -/* - z_crc_t must be at least 32 bits. z_word_t must be at least as long as - z_crc_t. It is assumed here that z_word_t is either 32 bits or 64 bits, and - that bytes are eight bits. - */ - -/* - Define W and the associated z_word_t type. If W is not defined, then a - braided calculation is not used, and the associated tables and code are not - compiled. - */ -#ifdef Z_TESTW -# if Z_TESTW-1 != -1 -# define W Z_TESTW -# endif -#else -# ifdef MAKECRCH -# define W 8 /* required for MAKECRCH */ -# else -# if defined(__x86_64__) || defined(__aarch64__) -# define W 8 -# else -# define W 4 -# endif -# endif -#endif -#ifdef W -# if W == 8 && defined(Z_U8) - typedef Z_U8 z_word_t; -# elif defined(Z_U4) -# undef W -# define W 4 - typedef Z_U4 z_word_t; -# else -# undef W -# endif -#endif - -/* If available, use the ARM processor CRC32 instruction. */ -#if defined(__aarch64__) && defined(__ARM_FEATURE_CRC32) && W == 8 -# define ARMCRC32 -#endif - -#if defined(W) && (!defined(ARMCRC32) || defined(DYNAMIC_CRC_TABLE)) -/* - Swap the bytes in a z_word_t to convert between little and big endian. Any - self-respecting compiler will optimize this to a single machine byte-swap - instruction, if one is available. This assumes that word_t is either 32 bits - or 64 bits. - */ -local z_word_t byte_swap(z_word_t word) { -# if W == 8 - return - (word & 0xff00000000000000) >> 56 | - (word & 0xff000000000000) >> 40 | - (word & 0xff0000000000) >> 24 | - (word & 0xff00000000) >> 8 | - (word & 0xff000000) << 8 | - (word & 0xff0000) << 24 | - (word & 0xff00) << 40 | - (word & 0xff) << 56; -# else /* W == 4 */ - return - (word & 0xff000000) >> 24 | - (word & 0xff0000) >> 8 | - (word & 0xff00) << 8 | - (word & 0xff) << 24; -# endif -} -#endif - -#ifdef DYNAMIC_CRC_TABLE -/* ========================================================================= - * Table of powers of x for combining CRC-32s, filled in by make_crc_table() - * below. - */ - local z_crc_t FAR x2n_table[32]; -#else -/* ========================================================================= - * Tables for byte-wise and braided CRC-32 calculations, and a table of powers - * of x for combining CRC-32s, all made by make_crc_table(). - */ -# include "../../../include/compress/zlib/crc32.h" -#endif - -/* CRC polynomial. */ -#define POLY 0xedb88320 /* p(x) reflected, with x^32 implied */ - -/* - Return a(x) multiplied by b(x) modulo p(x), where p(x) is the CRC polynomial, - reflected. For speed, this requires that a not be zero. - */ -local z_crc_t multmodp(z_crc_t a, z_crc_t b) { - z_crc_t m, p; - - m = (z_crc_t)1 << 31; - p = 0; - for (;;) { - if (a & m) { - p ^= b; - if ((a & (m - 1)) == 0) - break; - } - m >>= 1; - b = b & 1 ? (b >> 1) ^ POLY : b >> 1; - } - return p; -} - -/* - Return x^(n * 2^k) modulo p(x). Requires that x2n_table[] has been - initialized. - */ -local z_crc_t x2nmodp(z_off64_t n, unsigned k) { - z_crc_t p; - - p = (z_crc_t)1 << 31; /* x^0 == 1 */ - while (n) { - if (n & 1) - p = multmodp(x2n_table[k & 31], p); - n >>= 1; - k++; - } - return p; -} - -#ifdef DYNAMIC_CRC_TABLE -/* ========================================================================= - * Build the tables for byte-wise and braided CRC-32 calculations, and a table - * of powers of x for combining CRC-32s. - */ -local z_crc_t FAR crc_table[256]; -#ifdef W - local z_word_t FAR crc_big_table[256]; - local z_crc_t FAR crc_braid_table[W][256]; - local z_word_t FAR crc_braid_big_table[W][256]; - local void braid(z_crc_t [][256], z_word_t [][256], int, int); -#endif -#ifdef MAKECRCH - local void write_table(FILE *, const z_crc_t FAR *, int); - local void write_table32hi(FILE *, const z_word_t FAR *, int); - local void write_table64(FILE *, const z_word_t FAR *, int); -#endif /* MAKECRCH */ - -/* - Define a once() function depending on the availability of atomics. If this is - compiled with DYNAMIC_CRC_TABLE defined, and if CRCs will be computed in - multiple threads, and if atomics are not available, then get_crc_table() must - be called to initialize the tables and must return before any threads are - allowed to compute or combine CRCs. - */ - -/* Definition of once functionality. */ -typedef struct once_s once_t; - -/* Check for the availability of atomics. */ -#if defined(__STDC__) && __STDC_VERSION__ >= 201112L && \ - !defined(__STDC_NO_ATOMICS__) - -#include - -/* Structure for once(), which must be initialized with ONCE_INIT. */ -struct once_s { - atomic_flag begun; - atomic_int done; -}; -#define ONCE_INIT {ATOMIC_FLAG_INIT, 0} - -/* - Run the provided init() function exactly once, even if multiple threads - invoke once() at the same time. The state must be a once_t initialized with - ONCE_INIT. - */ -local void once(once_t *state, void (*init)(void)) { - if (!atomic_load(&state->done)) { - if (atomic_flag_test_and_set(&state->begun)) - while (!atomic_load(&state->done)) - ; - else { - init(); - atomic_store(&state->done, 1); - } - } -} - -#else /* no atomics */ - -/* Structure for once(), which must be initialized with ONCE_INIT. */ -struct once_s { - volatile int begun; - volatile int done; -}; -#define ONCE_INIT {0, 0} - -/* Test and set. Alas, not atomic, but tries to minimize the period of - vulnerability. */ -local int test_and_set(int volatile *flag) { - int was; - - was = *flag; - *flag = 1; - return was; -} - -/* Run the provided init() function once. This is not thread-safe. */ -local void once(once_t *state, void (*init)(void)) { - if (!state->done) { - if (test_and_set(&state->begun)) - while (!state->done) - ; - else { - init(); - state->done = 1; - } - } -} - -#endif - -/* State for once(). */ -local once_t made = ONCE_INIT; - -/* - Generate tables for a byte-wise 32-bit CRC calculation on the polynomial: - x^32+x^26+x^23+x^22+x^16+x^12+x^11+x^10+x^8+x^7+x^5+x^4+x^2+x+1. - - Polynomials over GF(2) are represented in binary, one bit per coefficient, - with the lowest powers in the most significant bit. Then adding polynomials - is just exclusive-or, and multiplying a polynomial by x is a right shift by - one. If we call the above polynomial p, and represent a byte as the - polynomial q, also with the lowest power in the most significant bit (so the - byte 0xb1 is the polynomial x^7+x^3+x^2+1), then the CRC is (q*x^32) mod p, - where a mod b means the remainder after dividing a by b. - - This calculation is done using the shift-register method of multiplying and - taking the remainder. The register is initialized to zero, and for each - incoming bit, x^32 is added mod p to the register if the bit is a one (where - x^32 mod p is p+x^32 = x^26+...+1), and the register is multiplied mod p by x - (which is shifting right by one and adding x^32 mod p if the bit shifted out - is a one). We start with the highest power (least significant bit) of q and - repeat for all eight bits of q. - - The table is simply the CRC of all possible eight bit values. This is all the - information needed to generate CRCs on data a byte at a time for all - combinations of CRC register values and incoming bytes. - */ - -local void make_crc_table(void) { - unsigned i, j, n; - z_crc_t p; - - /* initialize the CRC of bytes tables */ - for (i = 0; i < 256; i++) { - p = i; - for (j = 0; j < 8; j++) - p = p & 1 ? (p >> 1) ^ POLY : p >> 1; - crc_table[i] = p; -#ifdef W - crc_big_table[i] = byte_swap(p); -#endif - } - - /* initialize the x^2^n mod p(x) table */ - p = (z_crc_t)1 << 30; /* x^1 */ - x2n_table[0] = p; - for (n = 1; n < 32; n++) - x2n_table[n] = p = multmodp(p, p); - -#ifdef W - /* initialize the braiding tables -- needs x2n_table[] */ - braid(crc_braid_table, crc_braid_big_table, N, W); -#endif - -#ifdef MAKECRCH - { - /* - The crc32.h header file contains tables for both 32-bit and 64-bit - z_word_t's, and so requires a 64-bit type be available. In that case, - z_word_t must be defined to be 64-bits. This code then also generates - and writes out the tables for the case that z_word_t is 32 bits. - */ -#if !defined(W) || W != 8 -# error Need a 64-bit integer type in order to generate crc32.h. -#endif - FILE *out; - int k, n; - z_crc_t ltl[8][256]; - z_word_t big[8][256]; - - out = fopen("crc32.h", "w"); - if (out == NULL) return; - - /* write out little-endian CRC table to crc32.h */ - fprintf(out, - "/* crc32.h -- tables for rapid CRC calculation\n" - " * Generated automatically by crc32.c\n */\n" - "\n" - "local const z_crc_t FAR crc_table[] = {\n" - " "); - write_table(out, crc_table, 256); - fprintf(out, - "};\n"); - - /* write out big-endian CRC table for 64-bit z_word_t to crc32.h */ - fprintf(out, - "\n" - "#ifdef W\n" - "\n" - "#if W == 8\n" - "\n" - "local const z_word_t FAR crc_big_table[] = {\n" - " "); - write_table64(out, crc_big_table, 256); - fprintf(out, - "};\n"); - - /* write out big-endian CRC table for 32-bit z_word_t to crc32.h */ - fprintf(out, - "\n" - "#else /* W == 4 */\n" - "\n" - "local const z_word_t FAR crc_big_table[] = {\n" - " "); - write_table32hi(out, crc_big_table, 256); - fprintf(out, - "};\n" - "\n" - "#endif\n"); - - /* write out braid tables for each value of N */ - for (n = 1; n <= 6; n++) { - fprintf(out, - "\n" - "#if N == %d\n", n); - - /* compute braid tables for this N and 64-bit word_t */ - braid(ltl, big, n, 8); - - /* write out braid tables for 64-bit z_word_t to crc32.h */ - fprintf(out, - "\n" - "#if W == 8\n" - "\n" - "local const z_crc_t FAR crc_braid_table[][256] = {\n"); - for (k = 0; k < 8; k++) { - fprintf(out, " {"); - write_table(out, ltl[k], 256); - fprintf(out, "}%s", k < 7 ? ",\n" : ""); - } - fprintf(out, - "};\n" - "\n" - "local const z_word_t FAR crc_braid_big_table[][256] = {\n"); - for (k = 0; k < 8; k++) { - fprintf(out, " {"); - write_table64(out, big[k], 256); - fprintf(out, "}%s", k < 7 ? ",\n" : ""); - } - fprintf(out, - "};\n"); - - /* compute braid tables for this N and 32-bit word_t */ - braid(ltl, big, n, 4); - - /* write out braid tables for 32-bit z_word_t to crc32.h */ - fprintf(out, - "\n" - "#else /* W == 4 */\n" - "\n" - "local const z_crc_t FAR crc_braid_table[][256] = {\n"); - for (k = 0; k < 4; k++) { - fprintf(out, " {"); - write_table(out, ltl[k], 256); - fprintf(out, "}%s", k < 3 ? ",\n" : ""); - } - fprintf(out, - "};\n" - "\n" - "local const z_word_t FAR crc_braid_big_table[][256] = {\n"); - for (k = 0; k < 4; k++) { - fprintf(out, " {"); - write_table32hi(out, big[k], 256); - fprintf(out, "}%s", k < 3 ? ",\n" : ""); - } - fprintf(out, - "};\n" - "\n" - "#endif\n" - "\n" - "#endif\n"); - } - fprintf(out, - "\n" - "#endif\n"); - - /* write out zeros operator table to crc32.h */ - fprintf(out, - "\n" - "local const z_crc_t FAR x2n_table[] = {\n" - " "); - write_table(out, x2n_table, 32); - fprintf(out, - "};\n"); - fclose(out); - } -#endif /* MAKECRCH */ -} - -#ifdef MAKECRCH - -/* - Write the 32-bit values in table[0..k-1] to out, five per line in - hexadecimal separated by commas. - */ -local void write_table(FILE *out, const z_crc_t FAR *table, int k) { - int n; - - for (n = 0; n < k; n++) - fprintf(out, "%s0x%08lx%s", n == 0 || n % 5 ? "" : " ", - (unsigned long)(table[n]), - n == k - 1 ? "" : (n % 5 == 4 ? ",\n" : ", ")); -} - -/* - Write the high 32-bits of each value in table[0..k-1] to out, five per line - in hexadecimal separated by commas. - */ -local void write_table32hi(FILE *out, const z_word_t FAR *table, int k) { - int n; - - for (n = 0; n < k; n++) - fprintf(out, "%s0x%08lx%s", n == 0 || n % 5 ? "" : " ", - (unsigned long)(table[n] >> 32), - n == k - 1 ? "" : (n % 5 == 4 ? ",\n" : ", ")); -} - -/* - Write the 64-bit values in table[0..k-1] to out, three per line in - hexadecimal separated by commas. This assumes that if there is a 64-bit - type, then there is also a long long integer type, and it is at least 64 - bits. If not, then the type cast and format string can be adjusted - accordingly. - */ -local void write_table64(FILE *out, const z_word_t FAR *table, int k) { - int n; - - for (n = 0; n < k; n++) - fprintf(out, "%s0x%016llx%s", n == 0 || n % 3 ? "" : " ", - (unsigned long long)(table[n]), - n == k - 1 ? "" : (n % 3 == 2 ? ",\n" : ", ")); -} - -/* Actually do the deed. */ -int main(void) { - make_crc_table(); - return 0; -} - -#endif /* MAKECRCH */ - -#ifdef W -/* - Generate the little and big-endian braid tables for the given n and z_word_t - size w. Each array must have room for w blocks of 256 elements. - */ -local void braid(z_crc_t ltl[][256], z_word_t big[][256], int n, int w) { - int k; - z_crc_t i, p, q; - for (k = 0; k < w; k++) { - p = x2nmodp((n * w + 3 - k) << 3, 0); - ltl[k][0] = 0; - big[w - 1 - k][0] = 0; - for (i = 1; i < 256; i++) { - ltl[k][i] = q = multmodp(i << 24, p); - big[w - 1 - k][i] = byte_swap(q); - } - } -} -#endif - -#endif /* DYNAMIC_CRC_TABLE */ - -/* ========================================================================= - * This function can be used by asm versions of crc32(), and to force the - * generation of the CRC tables in a threaded application. - */ -const z_crc_t FAR * ZEXPORT get_crc_table(void) { -#ifdef DYNAMIC_CRC_TABLE - once(&made, make_crc_table); -#endif /* DYNAMIC_CRC_TABLE */ - return (const z_crc_t FAR *)crc_table; -} - -/* ========================================================================= - * Use ARM machine instructions if available. This will compute the CRC about - * ten times faster than the braided calculation. This code does not check for - * the presence of the CRC instruction at run time. __ARM_FEATURE_CRC32 will - * only be defined if the compilation specifies an ARM processor architecture - * that has the instructions. For example, compiling with -march=armv8.1-a or - * -march=armv8-a+crc, or -march=native if the compile machine has the crc32 - * instructions. - */ -#ifdef ARMCRC32 - -/* - Constants empirically determined to maximize speed. These values are from - measurements on a Cortex-A57. Your mileage may vary. - */ -#define Z_BATCH 3990 /* number of words in a batch */ -#define Z_BATCH_ZEROS 0xa10d3d0c /* computed from Z_BATCH = 3990 */ -#define Z_BATCH_MIN 800 /* fewest words in a final batch */ - -unsigned long ZEXPORT crc32_z(unsigned long crc, const unsigned char FAR *buf, - z_size_t len) { - z_crc_t val; - z_word_t crc1, crc2; - const z_word_t *word; - z_word_t val0, val1, val2; - z_size_t last, last2, i; - z_size_t num; - - /* Return initial CRC, if requested. */ - if (buf == Z_NULL) return 0; - -#ifdef DYNAMIC_CRC_TABLE - once(&made, make_crc_table); -#endif /* DYNAMIC_CRC_TABLE */ - - /* Pre-condition the CRC */ - crc = (~crc) & 0xffffffff; - - /* Compute the CRC up to a word boundary. */ - while (len && ((z_size_t)buf & 7) != 0) { - len--; - val = *buf++; - __asm__ volatile("crc32b %w0, %w0, %w1" : "+r"(crc) : "r"(val)); - } - - /* Prepare to compute the CRC on full 64-bit words word[0..num-1]. */ - word = (z_word_t const *)buf; - num = len >> 3; - len &= 7; - - /* Do three interleaved CRCs to realize the throughput of one crc32x - instruction per cycle. Each CRC is calculated on Z_BATCH words. The - three CRCs are combined into a single CRC after each set of batches. */ - while (num >= 3 * Z_BATCH) { - crc1 = 0; - crc2 = 0; - for (i = 0; i < Z_BATCH; i++) { - val0 = word[i]; - val1 = word[i + Z_BATCH]; - val2 = word[i + 2 * Z_BATCH]; - __asm__ volatile("crc32x %w0, %w0, %x1" : "+r"(crc) : "r"(val0)); - __asm__ volatile("crc32x %w0, %w0, %x1" : "+r"(crc1) : "r"(val1)); - __asm__ volatile("crc32x %w0, %w0, %x1" : "+r"(crc2) : "r"(val2)); - } - word += 3 * Z_BATCH; - num -= 3 * Z_BATCH; - crc = multmodp(Z_BATCH_ZEROS, crc) ^ crc1; - crc = multmodp(Z_BATCH_ZEROS, crc) ^ crc2; - } - - /* Do one last smaller batch with the remaining words, if there are enough - to pay for the combination of CRCs. */ - last = num / 3; - if (last >= Z_BATCH_MIN) { - last2 = last << 1; - crc1 = 0; - crc2 = 0; - for (i = 0; i < last; i++) { - val0 = word[i]; - val1 = word[i + last]; - val2 = word[i + last2]; - __asm__ volatile("crc32x %w0, %w0, %x1" : "+r"(crc) : "r"(val0)); - __asm__ volatile("crc32x %w0, %w0, %x1" : "+r"(crc1) : "r"(val1)); - __asm__ volatile("crc32x %w0, %w0, %x1" : "+r"(crc2) : "r"(val2)); - } - word += 3 * last; - num -= 3 * last; - val = x2nmodp(last, 6); - crc = multmodp(val, crc) ^ crc1; - crc = multmodp(val, crc) ^ crc2; - } - - /* Compute the CRC on any remaining words. */ - for (i = 0; i < num; i++) { - val0 = word[i]; - __asm__ volatile("crc32x %w0, %w0, %x1" : "+r"(crc) : "r"(val0)); - } - word += num; - - /* Complete the CRC on any remaining bytes. */ - buf = (const unsigned char FAR *)word; - while (len) { - len--; - val = *buf++; - __asm__ volatile("crc32b %w0, %w0, %w1" : "+r"(crc) : "r"(val)); - } - - /* Return the CRC, post-conditioned. */ - return crc ^ 0xffffffff; -} - -#else - -#ifdef W - -/* - Return the CRC of the W bytes in the word_t data, taking the - least-significant byte of the word as the first byte of data, without any pre - or post conditioning. This is used to combine the CRCs of each braid. - */ -local z_crc_t crc_word(z_word_t data) { - int k; - for (k = 0; k < W; k++) - data = (data >> 8) ^ crc_table[data & 0xff]; - return (z_crc_t)data; -} - -local z_word_t crc_word_big(z_word_t data) { - int k; - for (k = 0; k < W; k++) - data = (data << 8) ^ - crc_big_table[(data >> ((W - 1) << 3)) & 0xff]; - return data; -} - -#endif - -/* ========================================================================= */ -unsigned long ZEXPORT crc32_z(unsigned long crc, const unsigned char FAR *buf, - z_size_t len) { - /* Return initial CRC, if requested. */ - if (buf == Z_NULL) return 0; - -#ifdef DYNAMIC_CRC_TABLE - once(&made, make_crc_table); -#endif /* DYNAMIC_CRC_TABLE */ - - /* Pre-condition the CRC */ - crc = (~crc) & 0xffffffff; - -#ifdef W - - /* If provided enough bytes, do a braided CRC calculation. */ - if (len >= N * W + W - 1) { - z_size_t blks; - z_word_t const *words; - unsigned endian; - int k; - - /* Compute the CRC up to a z_word_t boundary. */ - while (len && ((z_size_t)buf & (W - 1)) != 0) { - len--; - crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff]; - } - - /* Compute the CRC on as many N z_word_t blocks as are available. */ - blks = len / (N * W); - len -= blks * N * W; - words = (z_word_t const *)buf; - - /* Do endian check at execution time instead of compile time, since ARM - processors can change the endianness at execution time. If the - compiler knows what the endianness will be, it can optimize out the - check and the unused branch. */ - endian = 1; - if (*(unsigned char *)&endian) { - /* Little endian. */ - - z_crc_t crc0; - z_word_t word0; -#if N > 1 - z_crc_t crc1; - z_word_t word1; -#if N > 2 - z_crc_t crc2; - z_word_t word2; -#if N > 3 - z_crc_t crc3; - z_word_t word3; -#if N > 4 - z_crc_t crc4; - z_word_t word4; -#if N > 5 - z_crc_t crc5; - z_word_t word5; -#endif -#endif -#endif -#endif -#endif - - /* Initialize the CRC for each braid. */ - crc0 = crc; -#if N > 1 - crc1 = 0; -#if N > 2 - crc2 = 0; -#if N > 3 - crc3 = 0; -#if N > 4 - crc4 = 0; -#if N > 5 - crc5 = 0; -#endif -#endif -#endif -#endif -#endif - - /* - Process the first blks-1 blocks, computing the CRCs on each braid - independently. - */ - while (--blks) { - /* Load the word for each braid into registers. */ - word0 = crc0 ^ words[0]; -#if N > 1 - word1 = crc1 ^ words[1]; -#if N > 2 - word2 = crc2 ^ words[2]; -#if N > 3 - word3 = crc3 ^ words[3]; -#if N > 4 - word4 = crc4 ^ words[4]; -#if N > 5 - word5 = crc5 ^ words[5]; -#endif -#endif -#endif -#endif -#endif - words += N; - - /* Compute and update the CRC for each word. The loop should - get unrolled. */ - crc0 = crc_braid_table[0][word0 & 0xff]; -#if N > 1 - crc1 = crc_braid_table[0][word1 & 0xff]; -#if N > 2 - crc2 = crc_braid_table[0][word2 & 0xff]; -#if N > 3 - crc3 = crc_braid_table[0][word3 & 0xff]; -#if N > 4 - crc4 = crc_braid_table[0][word4 & 0xff]; -#if N > 5 - crc5 = crc_braid_table[0][word5 & 0xff]; -#endif -#endif -#endif -#endif -#endif - for (k = 1; k < W; k++) { - crc0 ^= crc_braid_table[k][(word0 >> (k << 3)) & 0xff]; -#if N > 1 - crc1 ^= crc_braid_table[k][(word1 >> (k << 3)) & 0xff]; -#if N > 2 - crc2 ^= crc_braid_table[k][(word2 >> (k << 3)) & 0xff]; -#if N > 3 - crc3 ^= crc_braid_table[k][(word3 >> (k << 3)) & 0xff]; -#if N > 4 - crc4 ^= crc_braid_table[k][(word4 >> (k << 3)) & 0xff]; -#if N > 5 - crc5 ^= crc_braid_table[k][(word5 >> (k << 3)) & 0xff]; -#endif -#endif -#endif -#endif -#endif - } - } - - /* - Process the last block, combining the CRCs of the N braids at the - same time. - */ - crc = crc_word(crc0 ^ words[0]); -#if N > 1 - crc = crc_word(crc1 ^ words[1] ^ crc); -#if N > 2 - crc = crc_word(crc2 ^ words[2] ^ crc); -#if N > 3 - crc = crc_word(crc3 ^ words[3] ^ crc); -#if N > 4 - crc = crc_word(crc4 ^ words[4] ^ crc); -#if N > 5 - crc = crc_word(crc5 ^ words[5] ^ crc); -#endif -#endif -#endif -#endif -#endif - words += N; - } - else { - /* Big endian. */ - - z_word_t crc0, word0, comb; -#if N > 1 - z_word_t crc1, word1; -#if N > 2 - z_word_t crc2, word2; -#if N > 3 - z_word_t crc3, word3; -#if N > 4 - z_word_t crc4, word4; -#if N > 5 - z_word_t crc5, word5; -#endif -#endif -#endif -#endif -#endif - - /* Initialize the CRC for each braid. */ - crc0 = byte_swap(crc); -#if N > 1 - crc1 = 0; -#if N > 2 - crc2 = 0; -#if N > 3 - crc3 = 0; -#if N > 4 - crc4 = 0; -#if N > 5 - crc5 = 0; -#endif -#endif -#endif -#endif -#endif - - /* - Process the first blks-1 blocks, computing the CRCs on each braid - independently. - */ - while (--blks) { - /* Load the word for each braid into registers. */ - word0 = crc0 ^ words[0]; -#if N > 1 - word1 = crc1 ^ words[1]; -#if N > 2 - word2 = crc2 ^ words[2]; -#if N > 3 - word3 = crc3 ^ words[3]; -#if N > 4 - word4 = crc4 ^ words[4]; -#if N > 5 - word5 = crc5 ^ words[5]; -#endif -#endif -#endif -#endif -#endif - words += N; - - /* Compute and update the CRC for each word. The loop should - get unrolled. */ - crc0 = crc_braid_big_table[0][word0 & 0xff]; -#if N > 1 - crc1 = crc_braid_big_table[0][word1 & 0xff]; -#if N > 2 - crc2 = crc_braid_big_table[0][word2 & 0xff]; -#if N > 3 - crc3 = crc_braid_big_table[0][word3 & 0xff]; -#if N > 4 - crc4 = crc_braid_big_table[0][word4 & 0xff]; -#if N > 5 - crc5 = crc_braid_big_table[0][word5 & 0xff]; -#endif -#endif -#endif -#endif -#endif - for (k = 1; k < W; k++) { - crc0 ^= crc_braid_big_table[k][(word0 >> (k << 3)) & 0xff]; -#if N > 1 - crc1 ^= crc_braid_big_table[k][(word1 >> (k << 3)) & 0xff]; -#if N > 2 - crc2 ^= crc_braid_big_table[k][(word2 >> (k << 3)) & 0xff]; -#if N > 3 - crc3 ^= crc_braid_big_table[k][(word3 >> (k << 3)) & 0xff]; -#if N > 4 - crc4 ^= crc_braid_big_table[k][(word4 >> (k << 3)) & 0xff]; -#if N > 5 - crc5 ^= crc_braid_big_table[k][(word5 >> (k << 3)) & 0xff]; -#endif -#endif -#endif -#endif -#endif - } - } - - /* - Process the last block, combining the CRCs of the N braids at the - same time. - */ - comb = crc_word_big(crc0 ^ words[0]); -#if N > 1 - comb = crc_word_big(crc1 ^ words[1] ^ comb); -#if N > 2 - comb = crc_word_big(crc2 ^ words[2] ^ comb); -#if N > 3 - comb = crc_word_big(crc3 ^ words[3] ^ comb); -#if N > 4 - comb = crc_word_big(crc4 ^ words[4] ^ comb); -#if N > 5 - comb = crc_word_big(crc5 ^ words[5] ^ comb); -#endif -#endif -#endif -#endif -#endif - words += N; - crc = byte_swap(comb); - } - - /* - Update the pointer to the remaining bytes to process. - */ - buf = (unsigned char const *)words; - } - -#endif /* W */ - - /* Complete the computation of the CRC on any remaining bytes. */ - while (len >= 8) { - len -= 8; - crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff]; - crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff]; - crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff]; - crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff]; - crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff]; - crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff]; - crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff]; - crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff]; - } - while (len) { - len--; - crc = (crc >> 8) ^ crc_table[(crc ^ *buf++) & 0xff]; - } - - /* Return the CRC, post-conditioned. */ - return crc ^ 0xffffffff; -} - -#endif - -/* ========================================================================= */ -unsigned long ZEXPORT crc32(unsigned long crc, const unsigned char FAR *buf, - uInt len) { - return crc32_z(crc, buf, len); -} - -/* ========================================================================= */ -uLong ZEXPORT crc32_combine64(uLong crc1, uLong crc2, z_off64_t len2) { -#ifdef DYNAMIC_CRC_TABLE - once(&made, make_crc_table); -#endif /* DYNAMIC_CRC_TABLE */ - return multmodp(x2nmodp(len2, 3), crc1) ^ (crc2 & 0xffffffff); -} - -/* ========================================================================= */ -uLong ZEXPORT crc32_combine(uLong crc1, uLong crc2, z_off_t len2) { - return crc32_combine64(crc1, crc2, (z_off64_t)len2); -} - -/* ========================================================================= */ -uLong ZEXPORT crc32_combine_gen64(z_off64_t len2) { -#ifdef DYNAMIC_CRC_TABLE - once(&made, make_crc_table); -#endif /* DYNAMIC_CRC_TABLE */ - return x2nmodp(len2, 3); -} - -/* ========================================================================= */ -uLong ZEXPORT crc32_combine_gen(z_off_t len2) { - return crc32_combine_gen64((z_off64_t)len2); -} - -/* ========================================================================= */ -uLong ZEXPORT crc32_combine_op(uLong crc1, uLong crc2, uLong op) { - return multmodp(op, crc1) ^ (crc2 & 0xffffffff); -} diff --git a/kernel/src/compress/zlib/deflate.c b/kernel/src/compress/zlib/deflate.c deleted file mode 100644 index 7958a638c..000000000 --- a/kernel/src/compress/zlib/deflate.c +++ /dev/null @@ -1,2135 +0,0 @@ -/* deflate.c -- compress data using the deflation algorithm - * Copyright (C) 1995-2023 Jean-loup Gailly and Mark Adler - * For conditions of distribution and use, see copyright notice in zlib.h - */ - -/* - * ALGORITHM - * - * The "deflation" process depends on being able to identify portions - * of the input text which are identical to earlier input (within a - * sliding window trailing behind the input currently being processed). - * - * The most straightforward technique turns out to be the fastest for - * most input files: try all possible matches and select the longest. - * The key feature of this algorithm is that insertions into the string - * dictionary are very simple and thus fast, and deletions are avoided - * completely. Insertions are performed at each input character, whereas - * string matches are performed only when the previous match ends. So it - * is preferable to spend more time in matches to allow very fast string - * insertions and avoid deletions. The matching algorithm for small - * strings is inspired from that of Rabin & Karp. A brute force approach - * is used to find longer strings when a small match has been found. - * A similar algorithm is used in comic (by Jan-Mark Wams) and freeze - * (by Leonid Broukhis). - * A previous version of this file used a more sophisticated algorithm - * (by Fiala and Greene) which is guaranteed to run in linear amortized - * time, but has a larger average cost, uses more memory and is patented. - * However the F&G algorithm may be faster for some highly redundant - * files if the parameter max_chain_length (described below) is too large. - * - * ACKNOWLEDGEMENTS - * - * The idea of lazy evaluation of matches is due to Jan-Mark Wams, and - * I found it in 'freeze' written by Leonid Broukhis. - * Thanks to many people for bug reports and testing. - * - * REFERENCES - * - * Deutsch, L.P.,"DEFLATE Compressed Data Format Specification". - * Available in http://tools.ietf.org/html/rfc1951 - * - * A description of the Rabin and Karp algorithm is given in the book - * "Algorithms" by R. Sedgewick, Addison-Wesley, p252. - * - * Fiala,E.R., and Greene,D.H. - * Data Compression with Finite Windows, Comm.ACM, 32,4 (1989) 490-595 - * - */ - -/* @(#) $Id$ */ - -#include "../../../include/compress/zlib/deflate.h" - -const char deflate_copyright[] = - " deflate 1.3.0.1 Copyright 1995-2023 Jean-loup Gailly and Mark Adler "; -/* - If you use the zlib library in a product, an acknowledgment is welcome - in the documentation of your product. If for some reason you cannot - include such an acknowledgment, I would appreciate that you keep this - copyright string in the executable of your product. - */ - -typedef enum { - need_more, /* block not completed, need more input or more output */ - block_done, /* block flush performed */ - finish_started, /* finish started, need only more output at next deflate */ - finish_done /* finish done, accept no more input or output */ -} block_state; - -typedef block_state (*compress_func)(deflate_state *s, int flush); -/* Compression function. Returns the block state after the call. */ - -local block_state deflate_stored(deflate_state *s, int flush); -local block_state deflate_fast(deflate_state *s, int flush); -#ifndef FASTEST -local block_state deflate_slow(deflate_state *s, int flush); -#endif -local block_state deflate_rle(deflate_state *s, int flush); -local block_state deflate_huff(deflate_state *s, int flush); - -/* =========================================================================== - * Local data - */ - -#define NIL 0 -/* Tail of hash chains */ - -#ifndef TOO_FAR -# define TOO_FAR 4096 -#endif -/* Matches of length 3 are discarded if their distance exceeds TOO_FAR */ - -/* Values for max_lazy_match, good_match and max_chain_length, depending on - * the desired pack level (0..9). The values given below have been tuned to - * exclude worst case performance for pathological files. Better values may be - * found for specific files. - */ -typedef struct config_s { - ush good_length; /* reduce lazy search above this match length */ - ush max_lazy; /* do not perform lazy search above this match length */ - ush nice_length; /* quit search above this match length */ - ush max_chain; - compress_func func; -} config; - -#ifdef FASTEST -local const config configuration_table[2] = { -/* good lazy nice chain */ -/* 0 */ {0, 0, 0, 0, deflate_stored}, /* store only */ -/* 1 */ {4, 4, 8, 4, deflate_fast}}; /* max speed, no lazy matches */ -#else -local const config configuration_table[10] = { -/* good lazy nice chain */ -/* 0 */ {0, 0, 0, 0, deflate_stored}, /* store only */ -/* 1 */ {4, 4, 8, 4, deflate_fast}, /* max speed, no lazy matches */ -/* 2 */ {4, 5, 16, 8, deflate_fast}, -/* 3 */ {4, 6, 32, 32, deflate_fast}, - -/* 4 */ {4, 4, 16, 16, deflate_slow}, /* lazy matches */ -/* 5 */ {8, 16, 32, 32, deflate_slow}, -/* 6 */ {8, 16, 128, 128, deflate_slow}, -/* 7 */ {8, 32, 128, 256, deflate_slow}, -/* 8 */ {32, 128, 258, 1024, deflate_slow}, -/* 9 */ {32, 258, 258, 4096, deflate_slow}}; /* max compression */ -#endif - -/* Note: the deflate() code requires max_lazy >= MIN_MATCH and max_chain >= 4 - * For deflate_fast() (levels <= 3) good is ignored and lazy has a different - * meaning. - */ - -/* rank Z_BLOCK between Z_NO_FLUSH and Z_PARTIAL_FLUSH */ -#define RANK(f) (((f) * 2) - ((f) > 4 ? 9 : 0)) - -/* =========================================================================== - * Update a hash value with the given input byte - * IN assertion: all calls to UPDATE_HASH are made with consecutive input - * characters, so that a running hash key can be computed from the previous - * key instead of complete recalculation each time. - */ -#define UPDATE_HASH(s,h,c) (h = (((h) << s->hash_shift) ^ (c)) & s->hash_mask) - - -/* =========================================================================== - * Insert string str in the dictionary and set match_head to the previous head - * of the hash chain (the most recent string with same hash key). Return - * the previous length of the hash chain. - * If this file is compiled with -DFASTEST, the compression level is forced - * to 1, and no hash chains are maintained. - * IN assertion: all calls to INSERT_STRING are made with consecutive input - * characters and the first MIN_MATCH bytes of str are valid (except for - * the last MIN_MATCH-1 bytes of the input file). - */ -#ifdef FASTEST -#define INSERT_STRING(s, str, match_head) \ - (UPDATE_HASH(s, s->ins_h, s->window[(str) + (MIN_MATCH-1)]), \ - match_head = s->head[s->ins_h], \ - s->head[s->ins_h] = (Pos)(str)) -#else -#define INSERT_STRING(s, str, match_head) \ - (UPDATE_HASH(s, s->ins_h, s->window[(str) + (MIN_MATCH-1)]), \ - match_head = s->prev[(str) & s->w_mask] = s->head[s->ins_h], \ - s->head[s->ins_h] = (Pos)(str)) -#endif - -/* =========================================================================== - * Initialize the hash table (avoiding 64K overflow for 16 bit systems). - * prev[] will be initialized on the fly. - */ -#define CLEAR_HASH(s) \ - do { \ - s->head[s->hash_size - 1] = NIL; \ - zmemzero((Bytef *)s->head, \ - (unsigned)(s->hash_size - 1)*sizeof(*s->head)); \ - } while (0) - -/* =========================================================================== - * Slide the hash table when sliding the window down (could be avoided with 32 - * bit values at the expense of memory usage). We slide even when level == 0 to - * keep the hash table consistent if we switch back to level > 0 later. - */ -#if defined(__has_feature) -# if __has_feature(memory_sanitizer) - __attribute__((no_sanitize("memory"))) -# endif -#endif -local void slide_hash(deflate_state *s) { - unsigned n, m; - Posf *p; - uInt wsize = s->w_size; - - n = s->hash_size; - p = &s->head[n]; - do { - m = *--p; - *p = (Pos)(m >= wsize ? m - wsize : NIL); - } while (--n); - n = wsize; -#ifndef FASTEST - p = &s->prev[n]; - do { - m = *--p; - *p = (Pos)(m >= wsize ? m - wsize : NIL); - /* If n is not on any hash chain, prev[n] is garbage but - * its value will never be used. - */ - } while (--n); -#endif -} - -/* =========================================================================== - * Read a new buffer from the current input stream, update the adler32 - * and total number of bytes read. All deflate() input goes through - * this function so some applications may wish to modify it to avoid - * allocating a large strm->next_in buffer and copying from it. - * (See also flush_pending()). - */ -local unsigned read_buf(z_streamp strm, Bytef *buf, unsigned size) { - unsigned len = strm->avail_in; - - if (len > size) len = size; - if (len == 0) return 0; - - strm->avail_in -= len; - - zmemcpy(buf, strm->next_in, len); - if (strm->state->wrap == 1) { - strm->adler = adler32(strm->adler, buf, len); - } -#ifdef GZIP - else if (strm->state->wrap == 2) { - strm->adler = crc32(strm->adler, buf, len); - } -#endif - strm->next_in += len; - strm->total_in += len; - - return len; -} - -/* =========================================================================== - * Fill the window when the lookahead becomes insufficient. - * Updates strstart and lookahead. - * - * IN assertion: lookahead < MIN_LOOKAHEAD - * OUT assertions: strstart <= window_size-MIN_LOOKAHEAD - * At least one byte has been read, or avail_in == 0; reads are - * performed for at least two bytes (required for the zip translate_eol - * option -- not supported here). - */ -local void fill_window(deflate_state *s) { - unsigned n; - unsigned more; /* Amount of free space at the end of the window. */ - uInt wsize = s->w_size; - - Assert(s->lookahead < MIN_LOOKAHEAD, "already enough lookahead"); - - do { - more = (unsigned)(s->window_size -(ulg)s->lookahead -(ulg)s->strstart); - - /* Deal with !@#$% 64K limit: */ - if (sizeof(int) <= 2) { - if (more == 0 && s->strstart == 0 && s->lookahead == 0) { - more = wsize; - - } else if (more == (unsigned)(-1)) { - /* Very unlikely, but possible on 16 bit machine if - * strstart == 0 && lookahead == 1 (input done a byte at time) - */ - more--; - } - } - - /* If the window is almost full and there is insufficient lookahead, - * move the upper half to the lower one to make room in the upper half. - */ - if (s->strstart >= wsize + MAX_DIST(s)) { - - zmemcpy(s->window, s->window + wsize, (unsigned)wsize - more); - s->match_start -= wsize; - s->strstart -= wsize; /* we now have strstart >= MAX_DIST */ - s->block_start -= (long) wsize; - if (s->insert > s->strstart) - s->insert = s->strstart; - slide_hash(s); - more += wsize; - } - if (s->strm->avail_in == 0) break; - - /* If there was no sliding: - * strstart <= WSIZE+MAX_DIST-1 && lookahead <= MIN_LOOKAHEAD - 1 && - * more == window_size - lookahead - strstart - * => more >= window_size - (MIN_LOOKAHEAD-1 + WSIZE + MAX_DIST-1) - * => more >= window_size - 2*WSIZE + 2 - * In the BIG_MEM or MMAP case (not yet supported), - * window_size == input_size + MIN_LOOKAHEAD && - * strstart + s->lookahead <= input_size => more >= MIN_LOOKAHEAD. - * Otherwise, window_size == 2*WSIZE so more >= 2. - * If there was sliding, more >= WSIZE. So in all cases, more >= 2. - */ - Assert(more >= 2, "more < 2"); - - n = read_buf(s->strm, s->window + s->strstart + s->lookahead, more); - s->lookahead += n; - - /* Initialize the hash value now that we have some input: */ - if (s->lookahead + s->insert >= MIN_MATCH) { - uInt str = s->strstart - s->insert; - s->ins_h = s->window[str]; - UPDATE_HASH(s, s->ins_h, s->window[str + 1]); -#if MIN_MATCH != 3 - Call UPDATE_HASH() MIN_MATCH-3 more times -#endif - while (s->insert) { - UPDATE_HASH(s, s->ins_h, s->window[str + MIN_MATCH-1]); -#ifndef FASTEST - s->prev[str & s->w_mask] = s->head[s->ins_h]; -#endif - s->head[s->ins_h] = (Pos)str; - str++; - s->insert--; - if (s->lookahead + s->insert < MIN_MATCH) - break; - } - } - /* If the whole input has less than MIN_MATCH bytes, ins_h is garbage, - * but this is not important since only literal bytes will be emitted. - */ - - } while (s->lookahead < MIN_LOOKAHEAD && s->strm->avail_in != 0); - - /* If the WIN_INIT bytes after the end of the current data have never been - * written, then zero those bytes in order to avoid memory check reports of - * the use of uninitialized (or uninitialised as Julian writes) bytes by - * the longest match routines. Update the high water mark for the next - * time through here. WIN_INIT is set to MAX_MATCH since the longest match - * routines allow scanning to strstart + MAX_MATCH, ignoring lookahead. - */ - if (s->high_water < s->window_size) { - ulg curr = s->strstart + (ulg)(s->lookahead); - ulg init; - - if (s->high_water < curr) { - /* Previous high water mark below current data -- zero WIN_INIT - * bytes or up to end of window, whichever is less. - */ - init = s->window_size - curr; - if (init > WIN_INIT) - init = WIN_INIT; - zmemzero(s->window + curr, (unsigned)init); - s->high_water = curr + init; - } - else if (s->high_water < (ulg)curr + WIN_INIT) { - /* High water mark at or above current data, but below current data - * plus WIN_INIT -- zero out to current data plus WIN_INIT, or up - * to end of window, whichever is less. - */ - init = (ulg)curr + WIN_INIT - s->high_water; - if (init > s->window_size - s->high_water) - init = s->window_size - s->high_water; - zmemzero(s->window + s->high_water, (unsigned)init); - s->high_water += init; - } - } - - Assert((ulg)s->strstart <= s->window_size - MIN_LOOKAHEAD, - "not enough room for search"); -} - -/* ========================================================================= */ -int ZEXPORT deflateInit_(z_streamp strm, int level, const char *version, - int stream_size) { - return deflateInit2_(strm, level, Z_DEFLATED, MAX_WBITS, DEF_MEM_LEVEL, - Z_DEFAULT_STRATEGY, version, stream_size); - /* To do: ignore strm->next_in if we use it as window */ -} - -/* ========================================================================= */ -int ZEXPORT deflateInit2_(z_streamp strm, int level, int method, - int windowBits, int memLevel, int strategy, - const char *version, int stream_size) { - deflate_state *s; - int wrap = 1; - static const char my_version[] = ZLIB_VERSION; - - if (version == Z_NULL || version[0] != my_version[0] || - stream_size != sizeof(z_stream)) { - return Z_VERSION_ERROR; - } - if (strm == Z_NULL) return Z_STREAM_ERROR; - - strm->msg = Z_NULL; - if (strm->zalloc == (alloc_func)0) { -#ifdef Z_SOLO - return Z_STREAM_ERROR; -#else - strm->zalloc = zcalloc; - strm->opaque = (voidpf)0; -#endif - } - if (strm->zfree == (free_func)0) -#ifdef Z_SOLO - return Z_STREAM_ERROR; -#else - strm->zfree = zcfree; -#endif - -#ifdef FASTEST - if (level != 0) level = 1; -#else - if (level == Z_DEFAULT_COMPRESSION) level = 6; -#endif - - if (windowBits < 0) { /* suppress zlib wrapper */ - wrap = 0; - if (windowBits < -15) - return Z_STREAM_ERROR; - windowBits = -windowBits; - } -#ifdef GZIP - else if (windowBits > 15) { - wrap = 2; /* write gzip wrapper instead */ - windowBits -= 16; - } -#endif - if (memLevel < 1 || memLevel > MAX_MEM_LEVEL || method != Z_DEFLATED || - windowBits < 8 || windowBits > 15 || level < 0 || level > 9 || - strategy < 0 || strategy > Z_FIXED || (windowBits == 8 && wrap != 1)) { - return Z_STREAM_ERROR; - } - if (windowBits == 8) windowBits = 9; /* until 256-byte window bug fixed */ - s = (deflate_state *) ZALLOC(strm, 1, sizeof(deflate_state)); - if (s == Z_NULL) return Z_MEM_ERROR; - strm->state = (struct internal_state FAR *)s; - s->strm = strm; - s->status = INIT_STATE; /* to pass state test in deflateReset() */ - - s->wrap = wrap; - s->gzhead = Z_NULL; - s->w_bits = (uInt)windowBits; - s->w_size = 1 << s->w_bits; - s->w_mask = s->w_size - 1; - - s->hash_bits = (uInt)memLevel + 7; - s->hash_size = 1 << s->hash_bits; - s->hash_mask = s->hash_size - 1; - s->hash_shift = ((s->hash_bits + MIN_MATCH-1) / MIN_MATCH); - - s->window = (Bytef *) ZALLOC(strm, s->w_size, 2*sizeof(Byte)); - s->prev = (Posf *) ZALLOC(strm, s->w_size, sizeof(Pos)); - s->head = (Posf *) ZALLOC(strm, s->hash_size, sizeof(Pos)); - - s->high_water = 0; /* nothing written to s->window yet */ - - s->lit_bufsize = 1 << (memLevel + 6); /* 16K elements by default */ - - /* We overlay pending_buf and sym_buf. This works since the average size - * for length/distance pairs over any compressed block is assured to be 31 - * bits or less. - * - * Analysis: The longest fixed codes are a length code of 8 bits plus 5 - * extra bits, for lengths 131 to 257. The longest fixed distance codes are - * 5 bits plus 13 extra bits, for distances 16385 to 32768. The longest - * possible fixed-codes length/distance pair is then 31 bits total. - * - * sym_buf starts one-fourth of the way into pending_buf. So there are - * three bytes in sym_buf for every four bytes in pending_buf. Each symbol - * in sym_buf is three bytes -- two for the distance and one for the - * literal/length. As each symbol is consumed, the pointer to the next - * sym_buf value to read moves forward three bytes. From that symbol, up to - * 31 bits are written to pending_buf. The closest the written pending_buf - * bits gets to the next sym_buf symbol to read is just before the last - * code is written. At that time, 31*(n - 2) bits have been written, just - * after 24*(n - 2) bits have been consumed from sym_buf. sym_buf starts at - * 8*n bits into pending_buf. (Note that the symbol buffer fills when n - 1 - * symbols are written.) The closest the writing gets to what is unread is - * then n + 14 bits. Here n is lit_bufsize, which is 16384 by default, and - * can range from 128 to 32768. - * - * Therefore, at a minimum, there are 142 bits of space between what is - * written and what is read in the overlain buffers, so the symbols cannot - * be overwritten by the compressed data. That space is actually 139 bits, - * due to the three-bit fixed-code block header. - * - * That covers the case where either Z_FIXED is specified, forcing fixed - * codes, or when the use of fixed codes is chosen, because that choice - * results in a smaller compressed block than dynamic codes. That latter - * condition then assures that the above analysis also covers all dynamic - * blocks. A dynamic-code block will only be chosen to be emitted if it has - * fewer bits than a fixed-code block would for the same set of symbols. - * Therefore its average symbol length is assured to be less than 31. So - * the compressed data for a dynamic block also cannot overwrite the - * symbols from which it is being constructed. - */ - -#ifdef LIT_MEM - s->pending_buf = (uchf *) ZALLOC(strm, s->lit_bufsize, 5); -#else - s->pending_buf = (uchf *) ZALLOC(strm, s->lit_bufsize, 4); -#endif - s->pending_buf_size = (ulg)s->lit_bufsize * 4; - - if (s->window == Z_NULL || s->prev == Z_NULL || s->head == Z_NULL || - s->pending_buf == Z_NULL) { - s->status = FINISH_STATE; - strm->msg = ERR_MSG(Z_MEM_ERROR); - deflateEnd (strm); - return Z_MEM_ERROR; - } -#ifdef LIT_MEM - s->d_buf = (ushf *)(s->pending_buf + (s->lit_bufsize << 1)); - s->l_buf = s->pending_buf + (s->lit_bufsize << 2); - s->sym_end = s->lit_bufsize - 1; -#else - s->sym_buf = s->pending_buf + s->lit_bufsize; - s->sym_end = (s->lit_bufsize - 1) * 3; -#endif - /* We avoid equality with lit_bufsize*3 because of wraparound at 64K - * on 16 bit machines and because stored blocks are restricted to - * 64K-1 bytes. - */ - - s->level = level; - s->strategy = strategy; - s->method = (Byte)method; - - return deflateReset(strm); -} - -/* ========================================================================= - * Check for a valid deflate stream state. Return 0 if ok, 1 if not. - */ -local int deflateStateCheck(z_streamp strm) { - deflate_state *s; - if (strm == Z_NULL || - strm->zalloc == (alloc_func)0 || strm->zfree == (free_func)0) - return 1; - s = strm->state; - if (s == Z_NULL || s->strm != strm || (s->status != INIT_STATE && -#ifdef GZIP - s->status != GZIP_STATE && -#endif - s->status != EXTRA_STATE && - s->status != NAME_STATE && - s->status != COMMENT_STATE && - s->status != HCRC_STATE && - s->status != BUSY_STATE && - s->status != FINISH_STATE)) - return 1; - return 0; -} - -/* ========================================================================= */ -int ZEXPORT deflateSetDictionary(z_streamp strm, const Bytef *dictionary, - uInt dictLength) { - deflate_state *s; - uInt str, n; - int wrap; - unsigned avail; - z_const unsigned char *next; - - if (deflateStateCheck(strm) || dictionary == Z_NULL) - return Z_STREAM_ERROR; - s = strm->state; - wrap = s->wrap; - if (wrap == 2 || (wrap == 1 && s->status != INIT_STATE) || s->lookahead) - return Z_STREAM_ERROR; - - /* when using zlib wrappers, compute Adler-32 for provided dictionary */ - if (wrap == 1) - strm->adler = adler32(strm->adler, dictionary, dictLength); - s->wrap = 0; /* avoid computing Adler-32 in read_buf */ - - /* if dictionary would fill window, just replace the history */ - if (dictLength >= s->w_size) { - if (wrap == 0) { /* already empty otherwise */ - CLEAR_HASH(s); - s->strstart = 0; - s->block_start = 0L; - s->insert = 0; - } - dictionary += dictLength - s->w_size; /* use the tail */ - dictLength = s->w_size; - } - - /* insert dictionary into window and hash */ - avail = strm->avail_in; - next = strm->next_in; - strm->avail_in = dictLength; - strm->next_in = (z_const Bytef *)dictionary; - fill_window(s); - while (s->lookahead >= MIN_MATCH) { - str = s->strstart; - n = s->lookahead - (MIN_MATCH-1); - do { - UPDATE_HASH(s, s->ins_h, s->window[str + MIN_MATCH-1]); -#ifndef FASTEST - s->prev[str & s->w_mask] = s->head[s->ins_h]; -#endif - s->head[s->ins_h] = (Pos)str; - str++; - } while (--n); - s->strstart = str; - s->lookahead = MIN_MATCH-1; - fill_window(s); - } - s->strstart += s->lookahead; - s->block_start = (long)s->strstart; - s->insert = s->lookahead; - s->lookahead = 0; - s->match_length = s->prev_length = MIN_MATCH-1; - s->match_available = 0; - strm->next_in = next; - strm->avail_in = avail; - s->wrap = wrap; - return Z_OK; -} - -/* ========================================================================= */ -int ZEXPORT deflateGetDictionary(z_streamp strm, Bytef *dictionary, - uInt *dictLength) { - deflate_state *s; - uInt len; - - if (deflateStateCheck(strm)) - return Z_STREAM_ERROR; - s = strm->state; - len = s->strstart + s->lookahead; - if (len > s->w_size) - len = s->w_size; - if (dictionary != Z_NULL && len) - zmemcpy(dictionary, s->window + s->strstart + s->lookahead - len, len); - if (dictLength != Z_NULL) - *dictLength = len; - return Z_OK; -} - -/* ========================================================================= */ -int ZEXPORT deflateResetKeep(z_streamp strm) { - deflate_state *s; - - if (deflateStateCheck(strm)) { - return Z_STREAM_ERROR; - } - - strm->total_in = strm->total_out = 0; - strm->msg = Z_NULL; /* use zfree if we ever allocate msg dynamically */ - strm->data_type = Z_UNKNOWN; - - s = (deflate_state *)strm->state; - s->pending = 0; - s->pending_out = s->pending_buf; - - if (s->wrap < 0) { - s->wrap = -s->wrap; /* was made negative by deflate(..., Z_FINISH); */ - } - s->status = -#ifdef GZIP - s->wrap == 2 ? GZIP_STATE : -#endif - INIT_STATE; - strm->adler = -#ifdef GZIP - s->wrap == 2 ? crc32(0L, Z_NULL, 0) : -#endif - adler32(0L, Z_NULL, 0); - s->last_flush = -2; - - _tr_init(s); - - return Z_OK; -} - -/* =========================================================================== - * Initialize the "longest match" routines for a new zlib stream - */ -local void lm_init(deflate_state *s) { - s->window_size = (ulg)2L*s->w_size; - - CLEAR_HASH(s); - - /* Set the default configuration parameters: - */ - s->max_lazy_match = configuration_table[s->level].max_lazy; - s->good_match = configuration_table[s->level].good_length; - s->nice_match = configuration_table[s->level].nice_length; - s->max_chain_length = configuration_table[s->level].max_chain; - - s->strstart = 0; - s->block_start = 0L; - s->lookahead = 0; - s->insert = 0; - s->match_length = s->prev_length = MIN_MATCH-1; - s->match_available = 0; - s->ins_h = 0; -} - -/* ========================================================================= */ -int ZEXPORT deflateReset(z_streamp strm) { - int ret; - - ret = deflateResetKeep(strm); - if (ret == Z_OK) - lm_init(strm->state); - return ret; -} - -/* ========================================================================= */ -int ZEXPORT deflateSetHeader(z_streamp strm, gz_headerp head) { - if (deflateStateCheck(strm) || strm->state->wrap != 2) - return Z_STREAM_ERROR; - strm->state->gzhead = head; - return Z_OK; -} - -/* ========================================================================= */ -int ZEXPORT deflatePending(z_streamp strm, unsigned *pending, int *bits) { - if (deflateStateCheck(strm)) return Z_STREAM_ERROR; - if (pending != Z_NULL) - *pending = strm->state->pending; - if (bits != Z_NULL) - *bits = strm->state->bi_valid; - return Z_OK; -} - -/* ========================================================================= */ -int ZEXPORT deflatePrime(z_streamp strm, int bits, int value) { - deflate_state *s; - int put; - - if (deflateStateCheck(strm)) return Z_STREAM_ERROR; - s = strm->state; -#ifdef LIT_MEM - if (bits < 0 || bits > 16 || - (uchf *)s->d_buf < s->pending_out + ((Buf_size + 7) >> 3)) - return Z_BUF_ERROR; -#else - if (bits < 0 || bits > 16 || - s->sym_buf < s->pending_out + ((Buf_size + 7) >> 3)) - return Z_BUF_ERROR; -#endif - do { - put = Buf_size - s->bi_valid; - if (put > bits) - put = bits; - s->bi_buf |= (ush)((value & ((1 << put) - 1)) << s->bi_valid); - s->bi_valid += put; - _tr_flush_bits(s); - value >>= put; - bits -= put; - } while (bits); - return Z_OK; -} - -/* ========================================================================= */ -int ZEXPORT deflateParams(z_streamp strm, int level, int strategy) { - deflate_state *s; - compress_func func; - - if (deflateStateCheck(strm)) return Z_STREAM_ERROR; - s = strm->state; - -#ifdef FASTEST - if (level != 0) level = 1; -#else - if (level == Z_DEFAULT_COMPRESSION) level = 6; -#endif - if (level < 0 || level > 9 || strategy < 0 || strategy > Z_FIXED) { - return Z_STREAM_ERROR; - } - func = configuration_table[s->level].func; - - if ((strategy != s->strategy || func != configuration_table[level].func) && - s->last_flush != -2) { - /* Flush the last buffer: */ - int err = deflate(strm, Z_BLOCK); - if (err == Z_STREAM_ERROR) - return err; - if (strm->avail_in || (s->strstart - s->block_start) + s->lookahead) - return Z_BUF_ERROR; - } - if (s->level != level) { - if (s->level == 0 && s->matches != 0) { - if (s->matches == 1) - slide_hash(s); - else - CLEAR_HASH(s); - s->matches = 0; - } - s->level = level; - s->max_lazy_match = configuration_table[level].max_lazy; - s->good_match = configuration_table[level].good_length; - s->nice_match = configuration_table[level].nice_length; - s->max_chain_length = configuration_table[level].max_chain; - } - s->strategy = strategy; - return Z_OK; -} - -/* ========================================================================= */ -int ZEXPORT deflateTune(z_streamp strm, int good_length, int max_lazy, - int nice_length, int max_chain) { - deflate_state *s; - - if (deflateStateCheck(strm)) return Z_STREAM_ERROR; - s = strm->state; - s->good_match = (uInt)good_length; - s->max_lazy_match = (uInt)max_lazy; - s->nice_match = nice_length; - s->max_chain_length = (uInt)max_chain; - return Z_OK; -} - -/* ========================================================================= - * For the default windowBits of 15 and memLevel of 8, this function returns a - * close to exact, as well as small, upper bound on the compressed size. This - * is an expansion of ~0.03%, plus a small constant. - * - * For any setting other than those defaults for windowBits and memLevel, one - * of two worst case bounds is returned. This is at most an expansion of ~4% or - * ~13%, plus a small constant. - * - * Both the 0.03% and 4% derive from the overhead of stored blocks. The first - * one is for stored blocks of 16383 bytes (memLevel == 8), whereas the second - * is for stored blocks of 127 bytes (the worst case memLevel == 1). The - * expansion results from five bytes of header for each stored block. - * - * The larger expansion of 13% results from a window size less than or equal to - * the symbols buffer size (windowBits <= memLevel + 7). In that case some of - * the data being compressed may have slid out of the sliding window, impeding - * a stored block from being emitted. Then the only choice is a fixed or - * dynamic block, where a fixed block limits the maximum expansion to 9 bits - * per 8-bit byte, plus 10 bits for every block. The smallest block size for - * which this can occur is 255 (memLevel == 2). - * - * Shifts are used to approximate divisions, for speed. - */ -uLong ZEXPORT deflateBound(z_streamp strm, uLong sourceLen) { - deflate_state *s; - uLong fixedlen, storelen, wraplen; - - /* upper bound for fixed blocks with 9-bit literals and length 255 - (memLevel == 2, which is the lowest that may not use stored blocks) -- - ~13% overhead plus a small constant */ - fixedlen = sourceLen + (sourceLen >> 3) + (sourceLen >> 8) + - (sourceLen >> 9) + 4; - - /* upper bound for stored blocks with length 127 (memLevel == 1) -- - ~4% overhead plus a small constant */ - storelen = sourceLen + (sourceLen >> 5) + (sourceLen >> 7) + - (sourceLen >> 11) + 7; - - /* if can't get parameters, return larger bound plus a zlib wrapper */ - if (deflateStateCheck(strm)) - return (fixedlen > storelen ? fixedlen : storelen) + 6; - - /* compute wrapper length */ - s = strm->state; - switch (s->wrap) { - case 0: /* raw deflate */ - wraplen = 0; - break; - case 1: /* zlib wrapper */ - wraplen = 6 + (s->strstart ? 4 : 0); - break; -#ifdef GZIP - case 2: /* gzip wrapper */ - wraplen = 18; - if (s->gzhead != Z_NULL) { /* user-supplied gzip header */ - Bytef *str; - if (s->gzhead->extra != Z_NULL) - wraplen += 2 + s->gzhead->extra_len; - str = s->gzhead->name; - if (str != Z_NULL) - do { - wraplen++; - } while (*str++); - str = s->gzhead->comment; - if (str != Z_NULL) - do { - wraplen++; - } while (*str++); - if (s->gzhead->hcrc) - wraplen += 2; - } - break; -#endif - default: /* for compiler happiness */ - wraplen = 6; - } - - /* if not default parameters, return one of the conservative bounds */ - if (s->w_bits != 15 || s->hash_bits != 8 + 7) - return (s->w_bits <= s->hash_bits && s->level ? fixedlen : storelen) + - wraplen; - - /* default settings: return tight bound for that case -- ~0.03% overhead - plus a small constant */ - return sourceLen + (sourceLen >> 12) + (sourceLen >> 14) + - (sourceLen >> 25) + 13 - 6 + wraplen; -} - -/* ========================================================================= - * Put a short in the pending buffer. The 16-bit value is put in MSB order. - * IN assertion: the stream state is correct and there is enough room in - * pending_buf. - */ -local void putShortMSB(deflate_state *s, uInt b) { - put_byte(s, (Byte)(b >> 8)); - put_byte(s, (Byte)(b & 0xff)); -} - -/* ========================================================================= - * Flush as much pending output as possible. All deflate() output, except for - * some deflate_stored() output, goes through this function so some - * applications may wish to modify it to avoid allocating a large - * strm->next_out buffer and copying into it. (See also read_buf()). - */ -local void flush_pending(z_streamp strm) { - unsigned len; - deflate_state *s = strm->state; - - _tr_flush_bits(s); - len = s->pending; - if (len > strm->avail_out) len = strm->avail_out; - if (len == 0) return; - - zmemcpy(strm->next_out, s->pending_out, len); - strm->next_out += len; - s->pending_out += len; - strm->total_out += len; - strm->avail_out -= len; - s->pending -= len; - if (s->pending == 0) { - s->pending_out = s->pending_buf; - } -} - -/* =========================================================================== - * Update the header CRC with the bytes s->pending_buf[beg..s->pending - 1]. - */ -#define HCRC_UPDATE(beg) \ - do { \ - if (s->gzhead->hcrc && s->pending > (beg)) \ - strm->adler = crc32(strm->adler, s->pending_buf + (beg), \ - s->pending - (beg)); \ - } while (0) - -/* ========================================================================= */ -int ZEXPORT deflate(z_streamp strm, int flush) { - int old_flush; /* value of flush param for previous deflate call */ - deflate_state *s; - - if (deflateStateCheck(strm) || flush > Z_BLOCK || flush < 0) { - return Z_STREAM_ERROR; - } - s = strm->state; - - if (strm->next_out == Z_NULL || - (strm->avail_in != 0 && strm->next_in == Z_NULL) || - (s->status == FINISH_STATE && flush != Z_FINISH)) { - ERR_RETURN(strm, Z_STREAM_ERROR); - } - if (strm->avail_out == 0) ERR_RETURN(strm, Z_BUF_ERROR); - - old_flush = s->last_flush; - s->last_flush = flush; - - /* Flush as much pending output as possible */ - if (s->pending != 0) { - flush_pending(strm); - if (strm->avail_out == 0) { - /* Since avail_out is 0, deflate will be called again with - * more output space, but possibly with both pending and - * avail_in equal to zero. There won't be anything to do, - * but this is not an error situation so make sure we - * return OK instead of BUF_ERROR at next call of deflate: - */ - s->last_flush = -1; - return Z_OK; - } - - /* Make sure there is something to do and avoid duplicate consecutive - * flushes. For repeated and useless calls with Z_FINISH, we keep - * returning Z_STREAM_END instead of Z_BUF_ERROR. - */ - } else if (strm->avail_in == 0 && RANK(flush) <= RANK(old_flush) && - flush != Z_FINISH) { - ERR_RETURN(strm, Z_BUF_ERROR); - } - - /* User must not provide more input after the first FINISH: */ - if (s->status == FINISH_STATE && strm->avail_in != 0) { - ERR_RETURN(strm, Z_BUF_ERROR); - } - - /* Write the header */ - if (s->status == INIT_STATE && s->wrap == 0) - s->status = BUSY_STATE; - if (s->status == INIT_STATE) { - /* zlib header */ - uInt header = (Z_DEFLATED + ((s->w_bits - 8) << 4)) << 8; - uInt level_flags; - - if (s->strategy >= Z_HUFFMAN_ONLY || s->level < 2) - level_flags = 0; - else if (s->level < 6) - level_flags = 1; - else if (s->level == 6) - level_flags = 2; - else - level_flags = 3; - header |= (level_flags << 6); - if (s->strstart != 0) header |= PRESET_DICT; - header += 31 - (header % 31); - - putShortMSB(s, header); - - /* Save the adler32 of the preset dictionary: */ - if (s->strstart != 0) { - putShortMSB(s, (uInt)(strm->adler >> 16)); - putShortMSB(s, (uInt)(strm->adler & 0xffff)); - } - strm->adler = adler32(0L, Z_NULL, 0); - s->status = BUSY_STATE; - - /* Compression must start with an empty pending buffer */ - flush_pending(strm); - if (s->pending != 0) { - s->last_flush = -1; - return Z_OK; - } - } -#ifdef GZIP - if (s->status == GZIP_STATE) { - /* gzip header */ - strm->adler = crc32(0L, Z_NULL, 0); - put_byte(s, 31); - put_byte(s, 139); - put_byte(s, 8); - if (s->gzhead == Z_NULL) { - put_byte(s, 0); - put_byte(s, 0); - put_byte(s, 0); - put_byte(s, 0); - put_byte(s, 0); - put_byte(s, s->level == 9 ? 2 : - (s->strategy >= Z_HUFFMAN_ONLY || s->level < 2 ? - 4 : 0)); - put_byte(s, OS_CODE); - s->status = BUSY_STATE; - - /* Compression must start with an empty pending buffer */ - flush_pending(strm); - if (s->pending != 0) { - s->last_flush = -1; - return Z_OK; - } - } - else { - put_byte(s, (s->gzhead->text ? 1 : 0) + - (s->gzhead->hcrc ? 2 : 0) + - (s->gzhead->extra == Z_NULL ? 0 : 4) + - (s->gzhead->name == Z_NULL ? 0 : 8) + - (s->gzhead->comment == Z_NULL ? 0 : 16) - ); - put_byte(s, (Byte)(s->gzhead->time & 0xff)); - put_byte(s, (Byte)((s->gzhead->time >> 8) & 0xff)); - put_byte(s, (Byte)((s->gzhead->time >> 16) & 0xff)); - put_byte(s, (Byte)((s->gzhead->time >> 24) & 0xff)); - put_byte(s, s->level == 9 ? 2 : - (s->strategy >= Z_HUFFMAN_ONLY || s->level < 2 ? - 4 : 0)); - put_byte(s, s->gzhead->os & 0xff); - if (s->gzhead->extra != Z_NULL) { - put_byte(s, s->gzhead->extra_len & 0xff); - put_byte(s, (s->gzhead->extra_len >> 8) & 0xff); - } - if (s->gzhead->hcrc) - strm->adler = crc32(strm->adler, s->pending_buf, - s->pending); - s->gzindex = 0; - s->status = EXTRA_STATE; - } - } - if (s->status == EXTRA_STATE) { - if (s->gzhead->extra != Z_NULL) { - ulg beg = s->pending; /* start of bytes to update crc */ - uInt left = (s->gzhead->extra_len & 0xffff) - s->gzindex; - while (s->pending + left > s->pending_buf_size) { - uInt copy = s->pending_buf_size - s->pending; - zmemcpy(s->pending_buf + s->pending, - s->gzhead->extra + s->gzindex, copy); - s->pending = s->pending_buf_size; - HCRC_UPDATE(beg); - s->gzindex += copy; - flush_pending(strm); - if (s->pending != 0) { - s->last_flush = -1; - return Z_OK; - } - beg = 0; - left -= copy; - } - zmemcpy(s->pending_buf + s->pending, - s->gzhead->extra + s->gzindex, left); - s->pending += left; - HCRC_UPDATE(beg); - s->gzindex = 0; - } - s->status = NAME_STATE; - } - if (s->status == NAME_STATE) { - if (s->gzhead->name != Z_NULL) { - ulg beg = s->pending; /* start of bytes to update crc */ - int val; - do { - if (s->pending == s->pending_buf_size) { - HCRC_UPDATE(beg); - flush_pending(strm); - if (s->pending != 0) { - s->last_flush = -1; - return Z_OK; - } - beg = 0; - } - val = s->gzhead->name[s->gzindex++]; - put_byte(s, val); - } while (val != 0); - HCRC_UPDATE(beg); - s->gzindex = 0; - } - s->status = COMMENT_STATE; - } - if (s->status == COMMENT_STATE) { - if (s->gzhead->comment != Z_NULL) { - ulg beg = s->pending; /* start of bytes to update crc */ - int val; - do { - if (s->pending == s->pending_buf_size) { - HCRC_UPDATE(beg); - flush_pending(strm); - if (s->pending != 0) { - s->last_flush = -1; - return Z_OK; - } - beg = 0; - } - val = s->gzhead->comment[s->gzindex++]; - put_byte(s, val); - } while (val != 0); - HCRC_UPDATE(beg); - } - s->status = HCRC_STATE; - } - if (s->status == HCRC_STATE) { - if (s->gzhead->hcrc) { - if (s->pending + 2 > s->pending_buf_size) { - flush_pending(strm); - if (s->pending != 0) { - s->last_flush = -1; - return Z_OK; - } - } - put_byte(s, (Byte)(strm->adler & 0xff)); - put_byte(s, (Byte)((strm->adler >> 8) & 0xff)); - strm->adler = crc32(0L, Z_NULL, 0); - } - s->status = BUSY_STATE; - - /* Compression must start with an empty pending buffer */ - flush_pending(strm); - if (s->pending != 0) { - s->last_flush = -1; - return Z_OK; - } - } -#endif - - /* Start a new block or continue the current one. - */ - if (strm->avail_in != 0 || s->lookahead != 0 || - (flush != Z_NO_FLUSH && s->status != FINISH_STATE)) { - block_state bstate; - - bstate = s->level == 0 ? deflate_stored(s, flush) : - s->strategy == Z_HUFFMAN_ONLY ? deflate_huff(s, flush) : - s->strategy == Z_RLE ? deflate_rle(s, flush) : - (*(configuration_table[s->level].func))(s, flush); - - if (bstate == finish_started || bstate == finish_done) { - s->status = FINISH_STATE; - } - if (bstate == need_more || bstate == finish_started) { - if (strm->avail_out == 0) { - s->last_flush = -1; /* avoid BUF_ERROR next call, see above */ - } - return Z_OK; - /* If flush != Z_NO_FLUSH && avail_out == 0, the next call - * of deflate should use the same flush parameter to make sure - * that the flush is complete. So we don't have to output an - * empty block here, this will be done at next call. This also - * ensures that for a very small output buffer, we emit at most - * one empty block. - */ - } - if (bstate == block_done) { - if (flush == Z_PARTIAL_FLUSH) { - _tr_align(s); - } else if (flush != Z_BLOCK) { /* FULL_FLUSH or SYNC_FLUSH */ - _tr_stored_block(s, (char*)0, 0L, 0); - /* For a full flush, this empty block will be recognized - * as a special marker by inflate_sync(). - */ - if (flush == Z_FULL_FLUSH) { - CLEAR_HASH(s); /* forget history */ - if (s->lookahead == 0) { - s->strstart = 0; - s->block_start = 0L; - s->insert = 0; - } - } - } - flush_pending(strm); - if (strm->avail_out == 0) { - s->last_flush = -1; /* avoid BUF_ERROR at next call, see above */ - return Z_OK; - } - } - } - - if (flush != Z_FINISH) return Z_OK; - if (s->wrap <= 0) return Z_STREAM_END; - - /* Write the trailer */ -#ifdef GZIP - if (s->wrap == 2) { - put_byte(s, (Byte)(strm->adler & 0xff)); - put_byte(s, (Byte)((strm->adler >> 8) & 0xff)); - put_byte(s, (Byte)((strm->adler >> 16) & 0xff)); - put_byte(s, (Byte)((strm->adler >> 24) & 0xff)); - put_byte(s, (Byte)(strm->total_in & 0xff)); - put_byte(s, (Byte)((strm->total_in >> 8) & 0xff)); - put_byte(s, (Byte)((strm->total_in >> 16) & 0xff)); - put_byte(s, (Byte)((strm->total_in >> 24) & 0xff)); - } - else -#endif - { - putShortMSB(s, (uInt)(strm->adler >> 16)); - putShortMSB(s, (uInt)(strm->adler & 0xffff)); - } - flush_pending(strm); - /* If avail_out is zero, the application will call deflate again - * to flush the rest. - */ - if (s->wrap > 0) s->wrap = -s->wrap; /* write the trailer only once! */ - return s->pending != 0 ? Z_OK : Z_STREAM_END; -} - -/* ========================================================================= */ -int ZEXPORT deflateEnd(z_streamp strm) { - int status; - - if (deflateStateCheck(strm)) return Z_STREAM_ERROR; - - status = strm->state->status; - - /* Deallocate in reverse order of allocations: */ - TRY_FREE(strm, strm->state->pending_buf); - TRY_FREE(strm, strm->state->head); - TRY_FREE(strm, strm->state->prev); - TRY_FREE(strm, strm->state->window); - - ZFREE(strm, strm->state); - strm->state = Z_NULL; - - return status == BUSY_STATE ? Z_DATA_ERROR : Z_OK; -} - -/* ========================================================================= - * Copy the source state to the destination state. - * To simplify the source, this is not supported for 16-bit MSDOS (which - * doesn't have enough memory anyway to duplicate compression states). - */ -int ZEXPORT deflateCopy(z_streamp dest, z_streamp source) { -#ifdef MAXSEG_64K - (void)dest; - (void)source; - return Z_STREAM_ERROR; -#else - deflate_state *ds; - deflate_state *ss; - - - if (deflateStateCheck(source) || dest == Z_NULL) { - return Z_STREAM_ERROR; - } - - ss = source->state; - - zmemcpy((voidpf)dest, (voidpf)source, sizeof(z_stream)); - - ds = (deflate_state *) ZALLOC(dest, 1, sizeof(deflate_state)); - if (ds == Z_NULL) return Z_MEM_ERROR; - dest->state = (struct internal_state FAR *) ds; - zmemcpy((voidpf)ds, (voidpf)ss, sizeof(deflate_state)); - ds->strm = dest; - - ds->window = (Bytef *) ZALLOC(dest, ds->w_size, 2*sizeof(Byte)); - ds->prev = (Posf *) ZALLOC(dest, ds->w_size, sizeof(Pos)); - ds->head = (Posf *) ZALLOC(dest, ds->hash_size, sizeof(Pos)); - ds->pending_buf = (uchf *) ZALLOC(dest, ds->lit_bufsize, 4); - - if (ds->window == Z_NULL || ds->prev == Z_NULL || ds->head == Z_NULL || - ds->pending_buf == Z_NULL) { - deflateEnd (dest); - return Z_MEM_ERROR; - } - /* following zmemcpy do not work for 16-bit MSDOS */ - zmemcpy(ds->window, ss->window, ds->w_size * 2 * sizeof(Byte)); - zmemcpy((voidpf)ds->prev, (voidpf)ss->prev, ds->w_size * sizeof(Pos)); - zmemcpy((voidpf)ds->head, (voidpf)ss->head, ds->hash_size * sizeof(Pos)); - zmemcpy(ds->pending_buf, ss->pending_buf, (uInt)ds->pending_buf_size); - - ds->pending_out = ds->pending_buf + (ss->pending_out - ss->pending_buf); -#ifdef LIT_MEM - ds->d_buf = (ushf *)(ds->pending_buf + (ds->lit_bufsize << 1)); - ds->l_buf = ds->pending_buf + (ds->lit_bufsize << 2); -#else - ds->sym_buf = ds->pending_buf + ds->lit_bufsize; -#endif - - ds->l_desc.dyn_tree = ds->dyn_ltree; - ds->d_desc.dyn_tree = ds->dyn_dtree; - ds->bl_desc.dyn_tree = ds->bl_tree; - - return Z_OK; -#endif /* MAXSEG_64K */ -} - -#ifndef FASTEST -/* =========================================================================== - * Set match_start to the longest match starting at the given string and - * return its length. Matches shorter or equal to prev_length are discarded, - * in which case the result is equal to prev_length and match_start is - * garbage. - * IN assertions: cur_match is the head of the hash chain for the current - * string (strstart) and its distance is <= MAX_DIST, and prev_length >= 1 - * OUT assertion: the match length is not greater than s->lookahead. - */ -local uInt longest_match(deflate_state *s, IPos cur_match) { - unsigned chain_length = s->max_chain_length;/* max hash chain length */ - register Bytef *scan = s->window + s->strstart; /* current string */ - register Bytef *match; /* matched string */ - register int len; /* length of current match */ - int best_len = (int)s->prev_length; /* best match length so far */ - int nice_match = s->nice_match; /* stop if match long enough */ - IPos limit = s->strstart > (IPos)MAX_DIST(s) ? - s->strstart - (IPos)MAX_DIST(s) : NIL; - /* Stop when cur_match becomes <= limit. To simplify the code, - * we prevent matches with the string of window index 0. - */ - Posf *prev = s->prev; - uInt wmask = s->w_mask; - -#ifdef UNALIGNED_OK - /* Compare two bytes at a time. Note: this is not always beneficial. - * Try with and without -DUNALIGNED_OK to check. - */ - register Bytef *strend = s->window + s->strstart + MAX_MATCH - 1; - register ush scan_start = *(ushf*)scan; - register ush scan_end = *(ushf*)(scan + best_len - 1); -#else - register Bytef *strend = s->window + s->strstart + MAX_MATCH; - register Byte scan_end1 = scan[best_len - 1]; - register Byte scan_end = scan[best_len]; -#endif - - /* The code is optimized for HASH_BITS >= 8 and MAX_MATCH-2 multiple of 16. - * It is easy to get rid of this optimization if necessary. - */ - Assert(s->hash_bits >= 8 && MAX_MATCH == 258, "Code too clever"); - - /* Do not waste too much time if we already have a good match: */ - if (s->prev_length >= s->good_match) { - chain_length >>= 2; - } - /* Do not look for matches beyond the end of the input. This is necessary - * to make deflate deterministic. - */ - if ((uInt)nice_match > s->lookahead) nice_match = (int)s->lookahead; - - Assert((ulg)s->strstart <= s->window_size - MIN_LOOKAHEAD, - "need lookahead"); - - do { - Assert(cur_match < s->strstart, "no future"); - match = s->window + cur_match; - - /* Skip to next match if the match length cannot increase - * or if the match length is less than 2. Note that the checks below - * for insufficient lookahead only occur occasionally for performance - * reasons. Therefore uninitialized memory will be accessed, and - * conditional jumps will be made that depend on those values. - * However the length of the match is limited to the lookahead, so - * the output of deflate is not affected by the uninitialized values. - */ -#if (defined(UNALIGNED_OK) && MAX_MATCH == 258) - /* This code assumes sizeof(unsigned short) == 2. Do not use - * UNALIGNED_OK if your compiler uses a different size. - */ - if (*(ushf*)(match + best_len - 1) != scan_end || - *(ushf*)match != scan_start) continue; - - /* It is not necessary to compare scan[2] and match[2] since they are - * always equal when the other bytes match, given that the hash keys - * are equal and that HASH_BITS >= 8. Compare 2 bytes at a time at - * strstart + 3, + 5, up to strstart + 257. We check for insufficient - * lookahead only every 4th comparison; the 128th check will be made - * at strstart + 257. If MAX_MATCH-2 is not a multiple of 8, it is - * necessary to put more guard bytes at the end of the window, or - * to check more often for insufficient lookahead. - */ - Assert(scan[2] == match[2], "scan[2]?"); - scan++, match++; - do { - } while (*(ushf*)(scan += 2) == *(ushf*)(match += 2) && - *(ushf*)(scan += 2) == *(ushf*)(match += 2) && - *(ushf*)(scan += 2) == *(ushf*)(match += 2) && - *(ushf*)(scan += 2) == *(ushf*)(match += 2) && - scan < strend); - /* The funny "do {}" generates better code on most compilers */ - - /* Here, scan <= window + strstart + 257 */ - Assert(scan <= s->window + (unsigned)(s->window_size - 1), - "wild scan"); - if (*scan == *match) scan++; - - len = (MAX_MATCH - 1) - (int)(strend - scan); - scan = strend - (MAX_MATCH-1); - -#else /* UNALIGNED_OK */ - - if (match[best_len] != scan_end || - match[best_len - 1] != scan_end1 || - *match != *scan || - *++match != scan[1]) continue; - - /* The check at best_len - 1 can be removed because it will be made - * again later. (This heuristic is not always a win.) - * It is not necessary to compare scan[2] and match[2] since they - * are always equal when the other bytes match, given that - * the hash keys are equal and that HASH_BITS >= 8. - */ - scan += 2, match++; - Assert(*scan == *match, "match[2]?"); - - /* We check for insufficient lookahead only every 8th comparison; - * the 256th check will be made at strstart + 258. - */ - do { - } while (*++scan == *++match && *++scan == *++match && - *++scan == *++match && *++scan == *++match && - *++scan == *++match && *++scan == *++match && - *++scan == *++match && *++scan == *++match && - scan < strend); - - Assert(scan <= s->window + (unsigned)(s->window_size - 1), - "wild scan"); - - len = MAX_MATCH - (int)(strend - scan); - scan = strend - MAX_MATCH; - -#endif /* UNALIGNED_OK */ - - if (len > best_len) { - s->match_start = cur_match; - best_len = len; - if (len >= nice_match) break; -#ifdef UNALIGNED_OK - scan_end = *(ushf*)(scan + best_len - 1); -#else - scan_end1 = scan[best_len - 1]; - scan_end = scan[best_len]; -#endif - } - } while ((cur_match = prev[cur_match & wmask]) > limit - && --chain_length != 0); - - if ((uInt)best_len <= s->lookahead) return (uInt)best_len; - return s->lookahead; -} - -#else /* FASTEST */ - -/* --------------------------------------------------------------------------- - * Optimized version for FASTEST only - */ -local uInt longest_match(deflate_state *s, IPos cur_match) { - register Bytef *scan = s->window + s->strstart; /* current string */ - register Bytef *match; /* matched string */ - register int len; /* length of current match */ - register Bytef *strend = s->window + s->strstart + MAX_MATCH; - - /* The code is optimized for HASH_BITS >= 8 and MAX_MATCH-2 multiple of 16. - * It is easy to get rid of this optimization if necessary. - */ - Assert(s->hash_bits >= 8 && MAX_MATCH == 258, "Code too clever"); - - Assert((ulg)s->strstart <= s->window_size - MIN_LOOKAHEAD, - "need lookahead"); - - Assert(cur_match < s->strstart, "no future"); - - match = s->window + cur_match; - - /* Return failure if the match length is less than 2: - */ - if (match[0] != scan[0] || match[1] != scan[1]) return MIN_MATCH-1; - - /* The check at best_len - 1 can be removed because it will be made - * again later. (This heuristic is not always a win.) - * It is not necessary to compare scan[2] and match[2] since they - * are always equal when the other bytes match, given that - * the hash keys are equal and that HASH_BITS >= 8. - */ - scan += 2, match += 2; - Assert(*scan == *match, "match[2]?"); - - /* We check for insufficient lookahead only every 8th comparison; - * the 256th check will be made at strstart + 258. - */ - do { - } while (*++scan == *++match && *++scan == *++match && - *++scan == *++match && *++scan == *++match && - *++scan == *++match && *++scan == *++match && - *++scan == *++match && *++scan == *++match && - scan < strend); - - Assert(scan <= s->window + (unsigned)(s->window_size - 1), "wild scan"); - - len = MAX_MATCH - (int)(strend - scan); - - if (len < MIN_MATCH) return MIN_MATCH - 1; - - s->match_start = cur_match; - return (uInt)len <= s->lookahead ? (uInt)len : s->lookahead; -} - -#endif /* FASTEST */ - -#ifdef ZLIB_DEBUG - -#define EQUAL 0 -/* result of memcmp for equal strings */ - -/* =========================================================================== - * Check that the match at match_start is indeed a match. - */ -local void check_match(deflate_state *s, IPos start, IPos match, int length) { - /* check that the match is indeed a match */ - if (zmemcmp(s->window + match, - s->window + start, length) != EQUAL) { - fprintf(stderr, " start %u, match %u, length %d\n", - start, match, length); - do { - fprintf(stderr, "%c%c", s->window[match++], s->window[start++]); - } while (--length != 0); - z_error("invalid match"); - } - if (z_verbose > 1) { - fprintf(stderr,"\\[%d,%d]", start - match, length); - do { putc(s->window[start++], stderr); } while (--length != 0); - } -} -#else -# define check_match(s, start, match, length) -#endif /* ZLIB_DEBUG */ - -/* =========================================================================== - * Flush the current block, with given end-of-file flag. - * IN assertion: strstart is set to the end of the current match. - */ -#define FLUSH_BLOCK_ONLY(s, last) { \ - _tr_flush_block(s, (s->block_start >= 0L ? \ - (charf *)&s->window[(unsigned)s->block_start] : \ - (charf *)Z_NULL), \ - (ulg)((long)s->strstart - s->block_start), \ - (last)); \ - s->block_start = s->strstart; \ - flush_pending(s->strm); \ - Tracev((stderr,"[FLUSH]")); \ -} - -/* Same but force premature exit if necessary. */ -#define FLUSH_BLOCK(s, last) { \ - FLUSH_BLOCK_ONLY(s, last); \ - if (s->strm->avail_out == 0) return (last) ? finish_started : need_more; \ -} - -/* Maximum stored block length in deflate format (not including header). */ -#define MAX_STORED 65535 - -/* Minimum of a and b. */ -#define MIN(a, b) ((a) > (b) ? (b) : (a)) - -/* =========================================================================== - * Copy without compression as much as possible from the input stream, return - * the current block state. - * - * In case deflateParams() is used to later switch to a non-zero compression - * level, s->matches (otherwise unused when storing) keeps track of the number - * of hash table slides to perform. If s->matches is 1, then one hash table - * slide will be done when switching. If s->matches is 2, the maximum value - * allowed here, then the hash table will be cleared, since two or more slides - * is the same as a clear. - * - * deflate_stored() is written to minimize the number of times an input byte is - * copied. It is most efficient with large input and output buffers, which - * maximizes the opportunities to have a single copy from next_in to next_out. - */ -local block_state deflate_stored(deflate_state *s, int flush) { - /* Smallest worthy block size when not flushing or finishing. By default - * this is 32K. This can be as small as 507 bytes for memLevel == 1. For - * large input and output buffers, the stored block size will be larger. - */ - unsigned min_block = MIN(s->pending_buf_size - 5, s->w_size); - - /* Copy as many min_block or larger stored blocks directly to next_out as - * possible. If flushing, copy the remaining available input to next_out as - * stored blocks, if there is enough space. - */ - unsigned len, left, have, last = 0; - unsigned used = s->strm->avail_in; - do { - /* Set len to the maximum size block that we can copy directly with the - * available input data and output space. Set left to how much of that - * would be copied from what's left in the window. - */ - len = MAX_STORED; /* maximum deflate stored block length */ - have = (s->bi_valid + 42) >> 3; /* number of header bytes */ - if (s->strm->avail_out < have) /* need room for header */ - break; - /* maximum stored block length that will fit in avail_out: */ - have = s->strm->avail_out - have; - left = s->strstart - s->block_start; /* bytes left in window */ - if (len > (ulg)left + s->strm->avail_in) - len = left + s->strm->avail_in; /* limit len to the input */ - if (len > have) - len = have; /* limit len to the output */ - - /* If the stored block would be less than min_block in length, or if - * unable to copy all of the available input when flushing, then try - * copying to the window and the pending buffer instead. Also don't - * write an empty block when flushing -- deflate() does that. - */ - if (len < min_block && ((len == 0 && flush != Z_FINISH) || - flush == Z_NO_FLUSH || - len != left + s->strm->avail_in)) - break; - - /* Make a dummy stored block in pending to get the header bytes, - * including any pending bits. This also updates the debugging counts. - */ - last = flush == Z_FINISH && len == left + s->strm->avail_in ? 1 : 0; - _tr_stored_block(s, (char *)0, 0L, last); - - /* Replace the lengths in the dummy stored block with len. */ - s->pending_buf[s->pending - 4] = len; - s->pending_buf[s->pending - 3] = len >> 8; - s->pending_buf[s->pending - 2] = ~len; - s->pending_buf[s->pending - 1] = ~len >> 8; - - /* Write the stored block header bytes. */ - flush_pending(s->strm); - -#ifdef ZLIB_DEBUG - /* Update debugging counts for the data about to be copied. */ - s->compressed_len += len << 3; - s->bits_sent += len << 3; -#endif - - /* Copy uncompressed bytes from the window to next_out. */ - if (left) { - if (left > len) - left = len; - zmemcpy(s->strm->next_out, s->window + s->block_start, left); - s->strm->next_out += left; - s->strm->avail_out -= left; - s->strm->total_out += left; - s->block_start += left; - len -= left; - } - - /* Copy uncompressed bytes directly from next_in to next_out, updating - * the check value. - */ - if (len) { - read_buf(s->strm, s->strm->next_out, len); - s->strm->next_out += len; - s->strm->avail_out -= len; - s->strm->total_out += len; - } - } while (last == 0); - - /* Update the sliding window with the last s->w_size bytes of the copied - * data, or append all of the copied data to the existing window if less - * than s->w_size bytes were copied. Also update the number of bytes to - * insert in the hash tables, in the event that deflateParams() switches to - * a non-zero compression level. - */ - used -= s->strm->avail_in; /* number of input bytes directly copied */ - if (used) { - /* If any input was used, then no unused input remains in the window, - * therefore s->block_start == s->strstart. - */ - if (used >= s->w_size) { /* supplant the previous history */ - s->matches = 2; /* clear hash */ - zmemcpy(s->window, s->strm->next_in - s->w_size, s->w_size); - s->strstart = s->w_size; - s->insert = s->strstart; - } - else { - if (s->window_size - s->strstart <= used) { - /* Slide the window down. */ - s->strstart -= s->w_size; - zmemcpy(s->window, s->window + s->w_size, s->strstart); - if (s->matches < 2) - s->matches++; /* add a pending slide_hash() */ - if (s->insert > s->strstart) - s->insert = s->strstart; - } - zmemcpy(s->window + s->strstart, s->strm->next_in - used, used); - s->strstart += used; - s->insert += MIN(used, s->w_size - s->insert); - } - s->block_start = s->strstart; - } - if (s->high_water < s->strstart) - s->high_water = s->strstart; - - /* If the last block was written to next_out, then done. */ - if (last) - return finish_done; - - /* If flushing and all input has been consumed, then done. */ - if (flush != Z_NO_FLUSH && flush != Z_FINISH && - s->strm->avail_in == 0 && (long)s->strstart == s->block_start) - return block_done; - - /* Fill the window with any remaining input. */ - have = s->window_size - s->strstart; - if (s->strm->avail_in > have && s->block_start >= (long)s->w_size) { - /* Slide the window down. */ - s->block_start -= s->w_size; - s->strstart -= s->w_size; - zmemcpy(s->window, s->window + s->w_size, s->strstart); - if (s->matches < 2) - s->matches++; /* add a pending slide_hash() */ - have += s->w_size; /* more space now */ - if (s->insert > s->strstart) - s->insert = s->strstart; - } - if (have > s->strm->avail_in) - have = s->strm->avail_in; - if (have) { - read_buf(s->strm, s->window + s->strstart, have); - s->strstart += have; - s->insert += MIN(have, s->w_size - s->insert); - } - if (s->high_water < s->strstart) - s->high_water = s->strstart; - - /* There was not enough avail_out to write a complete worthy or flushed - * stored block to next_out. Write a stored block to pending instead, if we - * have enough input for a worthy block, or if flushing and there is enough - * room for the remaining input as a stored block in the pending buffer. - */ - have = (s->bi_valid + 42) >> 3; /* number of header bytes */ - /* maximum stored block length that will fit in pending: */ - have = MIN(s->pending_buf_size - have, MAX_STORED); - min_block = MIN(have, s->w_size); - left = s->strstart - s->block_start; - if (left >= min_block || - ((left || flush == Z_FINISH) && flush != Z_NO_FLUSH && - s->strm->avail_in == 0 && left <= have)) { - len = MIN(left, have); - last = flush == Z_FINISH && s->strm->avail_in == 0 && - len == left ? 1 : 0; - _tr_stored_block(s, (charf *)s->window + s->block_start, len, last); - s->block_start += len; - flush_pending(s->strm); - } - - /* We've done all we can with the available input and output. */ - return last ? finish_started : need_more; -} - -/* =========================================================================== - * Compress as much as possible from the input stream, return the current - * block state. - * This function does not perform lazy evaluation of matches and inserts - * new strings in the dictionary only for unmatched strings or for short - * matches. It is used only for the fast compression options. - */ -local block_state deflate_fast(deflate_state *s, int flush) { - IPos hash_head; /* head of the hash chain */ - int bflush; /* set if current block must be flushed */ - - for (;;) { - /* Make sure that we always have enough lookahead, except - * at the end of the input file. We need MAX_MATCH bytes - * for the next match, plus MIN_MATCH bytes to insert the - * string following the next match. - */ - if (s->lookahead < MIN_LOOKAHEAD) { - fill_window(s); - if (s->lookahead < MIN_LOOKAHEAD && flush == Z_NO_FLUSH) { - return need_more; - } - if (s->lookahead == 0) break; /* flush the current block */ - } - - /* Insert the string window[strstart .. strstart + 2] in the - * dictionary, and set hash_head to the head of the hash chain: - */ - hash_head = NIL; - if (s->lookahead >= MIN_MATCH) { - INSERT_STRING(s, s->strstart, hash_head); - } - - /* Find the longest match, discarding those <= prev_length. - * At this point we have always match_length < MIN_MATCH - */ - if (hash_head != NIL && s->strstart - hash_head <= MAX_DIST(s)) { - /* To simplify the code, we prevent matches with the string - * of window index 0 (in particular we have to avoid a match - * of the string with itself at the start of the input file). - */ - s->match_length = longest_match (s, hash_head); - /* longest_match() sets match_start */ - } - if (s->match_length >= MIN_MATCH) { - check_match(s, s->strstart, s->match_start, s->match_length); - - _tr_tally_dist(s, s->strstart - s->match_start, - s->match_length - MIN_MATCH, bflush); - - s->lookahead -= s->match_length; - - /* Insert new strings in the hash table only if the match length - * is not too large. This saves time but degrades compression. - */ -#ifndef FASTEST - if (s->match_length <= s->max_insert_length && - s->lookahead >= MIN_MATCH) { - s->match_length--; /* string at strstart already in table */ - do { - s->strstart++; - INSERT_STRING(s, s->strstart, hash_head); - /* strstart never exceeds WSIZE-MAX_MATCH, so there are - * always MIN_MATCH bytes ahead. - */ - } while (--s->match_length != 0); - s->strstart++; - } else -#endif - { - s->strstart += s->match_length; - s->match_length = 0; - s->ins_h = s->window[s->strstart]; - UPDATE_HASH(s, s->ins_h, s->window[s->strstart + 1]); -#if MIN_MATCH != 3 - Call UPDATE_HASH() MIN_MATCH-3 more times -#endif - /* If lookahead < MIN_MATCH, ins_h is garbage, but it does not - * matter since it will be recomputed at next deflate call. - */ - } - } else { - /* No match, output a literal byte */ - Tracevv((stderr,"%c", s->window[s->strstart])); - _tr_tally_lit(s, s->window[s->strstart], bflush); - s->lookahead--; - s->strstart++; - } - if (bflush) FLUSH_BLOCK(s, 0); - } - s->insert = s->strstart < MIN_MATCH-1 ? s->strstart : MIN_MATCH-1; - if (flush == Z_FINISH) { - FLUSH_BLOCK(s, 1); - return finish_done; - } - if (s->sym_next) - FLUSH_BLOCK(s, 0); - return block_done; -} - -#ifndef FASTEST -/* =========================================================================== - * Same as above, but achieves better compression. We use a lazy - * evaluation for matches: a match is finally adopted only if there is - * no better match at the next window position. - */ -local block_state deflate_slow(deflate_state *s, int flush) { - IPos hash_head; /* head of hash chain */ - int bflush; /* set if current block must be flushed */ - - /* Process the input block. */ - for (;;) { - /* Make sure that we always have enough lookahead, except - * at the end of the input file. We need MAX_MATCH bytes - * for the next match, plus MIN_MATCH bytes to insert the - * string following the next match. - */ - if (s->lookahead < MIN_LOOKAHEAD) { - fill_window(s); - if (s->lookahead < MIN_LOOKAHEAD && flush == Z_NO_FLUSH) { - return need_more; - } - if (s->lookahead == 0) break; /* flush the current block */ - } - - /* Insert the string window[strstart .. strstart + 2] in the - * dictionary, and set hash_head to the head of the hash chain: - */ - hash_head = NIL; - if (s->lookahead >= MIN_MATCH) { - INSERT_STRING(s, s->strstart, hash_head); - } - - /* Find the longest match, discarding those <= prev_length. - */ - s->prev_length = s->match_length, s->prev_match = s->match_start; - s->match_length = MIN_MATCH-1; - - if (hash_head != NIL && s->prev_length < s->max_lazy_match && - s->strstart - hash_head <= MAX_DIST(s)) { - /* To simplify the code, we prevent matches with the string - * of window index 0 (in particular we have to avoid a match - * of the string with itself at the start of the input file). - */ - s->match_length = longest_match (s, hash_head); - /* longest_match() sets match_start */ - - if (s->match_length <= 5 && (s->strategy == Z_FILTERED -#if TOO_FAR <= 32767 - || (s->match_length == MIN_MATCH && - s->strstart - s->match_start > TOO_FAR) -#endif - )) { - - /* If prev_match is also MIN_MATCH, match_start is garbage - * but we will ignore the current match anyway. - */ - s->match_length = MIN_MATCH-1; - } - } - /* If there was a match at the previous step and the current - * match is not better, output the previous match: - */ - if (s->prev_length >= MIN_MATCH && s->match_length <= s->prev_length) { - uInt max_insert = s->strstart + s->lookahead - MIN_MATCH; - /* Do not insert strings in hash table beyond this. */ - - check_match(s, s->strstart - 1, s->prev_match, s->prev_length); - - _tr_tally_dist(s, s->strstart - 1 - s->prev_match, - s->prev_length - MIN_MATCH, bflush); - - /* Insert in hash table all strings up to the end of the match. - * strstart - 1 and strstart are already inserted. If there is not - * enough lookahead, the last two strings are not inserted in - * the hash table. - */ - s->lookahead -= s->prev_length - 1; - s->prev_length -= 2; - do { - if (++s->strstart <= max_insert) { - INSERT_STRING(s, s->strstart, hash_head); - } - } while (--s->prev_length != 0); - s->match_available = 0; - s->match_length = MIN_MATCH-1; - s->strstart++; - - if (bflush) FLUSH_BLOCK(s, 0); - - } else if (s->match_available) { - /* If there was no match at the previous position, output a - * single literal. If there was a match but the current match - * is longer, truncate the previous match to a single literal. - */ - Tracevv((stderr,"%c", s->window[s->strstart - 1])); - _tr_tally_lit(s, s->window[s->strstart - 1], bflush); - if (bflush) { - FLUSH_BLOCK_ONLY(s, 0); - } - s->strstart++; - s->lookahead--; - if (s->strm->avail_out == 0) return need_more; - } else { - /* There is no previous match to compare with, wait for - * the next step to decide. - */ - s->match_available = 1; - s->strstart++; - s->lookahead--; - } - } - Assert (flush != Z_NO_FLUSH, "no flush?"); - if (s->match_available) { - Tracevv((stderr,"%c", s->window[s->strstart - 1])); - _tr_tally_lit(s, s->window[s->strstart - 1], bflush); - s->match_available = 0; - } - s->insert = s->strstart < MIN_MATCH-1 ? s->strstart : MIN_MATCH-1; - if (flush == Z_FINISH) { - FLUSH_BLOCK(s, 1); - return finish_done; - } - if (s->sym_next) - FLUSH_BLOCK(s, 0); - return block_done; -} -#endif /* FASTEST */ - -/* =========================================================================== - * For Z_RLE, simply look for runs of bytes, generate matches only of distance - * one. Do not maintain a hash table. (It will be regenerated if this run of - * deflate switches away from Z_RLE.) - */ -local block_state deflate_rle(deflate_state *s, int flush) { - int bflush; /* set if current block must be flushed */ - uInt prev; /* byte at distance one to match */ - Bytef *scan, *strend; /* scan goes up to strend for length of run */ - - for (;;) { - /* Make sure that we always have enough lookahead, except - * at the end of the input file. We need MAX_MATCH bytes - * for the longest run, plus one for the unrolled loop. - */ - if (s->lookahead <= MAX_MATCH) { - fill_window(s); - if (s->lookahead <= MAX_MATCH && flush == Z_NO_FLUSH) { - return need_more; - } - if (s->lookahead == 0) break; /* flush the current block */ - } - - /* See how many times the previous byte repeats */ - s->match_length = 0; - if (s->lookahead >= MIN_MATCH && s->strstart > 0) { - scan = s->window + s->strstart - 1; - prev = *scan; - if (prev == *++scan && prev == *++scan && prev == *++scan) { - strend = s->window + s->strstart + MAX_MATCH; - do { - } while (prev == *++scan && prev == *++scan && - prev == *++scan && prev == *++scan && - prev == *++scan && prev == *++scan && - prev == *++scan && prev == *++scan && - scan < strend); - s->match_length = MAX_MATCH - (uInt)(strend - scan); - if (s->match_length > s->lookahead) - s->match_length = s->lookahead; - } - Assert(scan <= s->window + (uInt)(s->window_size - 1), - "wild scan"); - } - - /* Emit match if have run of MIN_MATCH or longer, else emit literal */ - if (s->match_length >= MIN_MATCH) { - check_match(s, s->strstart, s->strstart - 1, s->match_length); - - _tr_tally_dist(s, 1, s->match_length - MIN_MATCH, bflush); - - s->lookahead -= s->match_length; - s->strstart += s->match_length; - s->match_length = 0; - } else { - /* No match, output a literal byte */ - Tracevv((stderr,"%c", s->window[s->strstart])); - _tr_tally_lit(s, s->window[s->strstart], bflush); - s->lookahead--; - s->strstart++; - } - if (bflush) FLUSH_BLOCK(s, 0); - } - s->insert = 0; - if (flush == Z_FINISH) { - FLUSH_BLOCK(s, 1); - return finish_done; - } - if (s->sym_next) - FLUSH_BLOCK(s, 0); - return block_done; -} - -/* =========================================================================== - * For Z_HUFFMAN_ONLY, do not look for matches. Do not maintain a hash table. - * (It will be regenerated if this run of deflate switches away from Huffman.) - */ -local block_state deflate_huff(deflate_state *s, int flush) { - int bflush; /* set if current block must be flushed */ - - for (;;) { - /* Make sure that we have a literal to write. */ - if (s->lookahead == 0) { - fill_window(s); - if (s->lookahead == 0) { - if (flush == Z_NO_FLUSH) - return need_more; - break; /* flush the current block */ - } - } - - /* Output a literal byte */ - s->match_length = 0; - Tracevv((stderr,"%c", s->window[s->strstart])); - _tr_tally_lit(s, s->window[s->strstart], bflush); - s->lookahead--; - s->strstart++; - if (bflush) FLUSH_BLOCK(s, 0); - } - s->insert = 0; - if (flush == Z_FINISH) { - FLUSH_BLOCK(s, 1); - return finish_done; - } - if (s->sym_next) - FLUSH_BLOCK(s, 0); - return block_done; -} diff --git a/kernel/src/compress/zlib/inffast.c b/kernel/src/compress/zlib/inffast.c deleted file mode 100644 index 6b990952b..000000000 --- a/kernel/src/compress/zlib/inffast.c +++ /dev/null @@ -1,320 +0,0 @@ -/* inffast.c -- fast decoding - * Copyright (C) 1995-2017 Mark Adler - * For conditions of distribution and use, see copyright notice in zlib.h - */ - -#include "../../../include/compress/zlib/zutil.h" -#include "../../../include/compress/zlib/inftrees.h" -#include "../../../include/compress/zlib/inflate.h" -#include "../../../include/compress/zlib/inffast.h" - -#ifdef ASMINF -# pragma message("Assembler code may have bugs -- use at your own risk") -#else - -/* - Decode literal, length, and distance codes and write out the resulting - literal and match bytes until either not enough input or output is - available, an end-of-block is encountered, or a data error is encountered. - When large enough input and output buffers are supplied to inflate(), for - example, a 16K input buffer and a 64K output buffer, more than 95% of the - inflate execution time is spent in this routine. - - Entry assumptions: - - state->mode == LEN - strm->avail_in >= 6 - strm->avail_out >= 258 - start >= strm->avail_out - state->bits < 8 - - On return, state->mode is one of: - - LEN -- ran out of enough output space or enough available input - TYPE -- reached end of block code, inflate() to interpret next block - BAD -- error in block data - - Notes: - - - The maximum input bits used by a length/distance pair is 15 bits for the - length code, 5 bits for the length extra, 15 bits for the distance code, - and 13 bits for the distance extra. This totals 48 bits, or six bytes. - Therefore if strm->avail_in >= 6, then there is enough input to avoid - checking for available input while decoding. - - - The maximum bytes that a single length/distance pair can output is 258 - bytes, which is the maximum length that can be coded. inflate_fast() - requires strm->avail_out >= 258 for each loop to avoid checking for - output space. - */ -void ZLIB_INTERNAL inflate_fast(z_streamp strm, unsigned start) { - struct inflate_state FAR *state; - z_const unsigned char FAR *in; /* local strm->next_in */ - z_const unsigned char FAR *last; /* have enough input while in < last */ - unsigned char FAR *out; /* local strm->next_out */ - unsigned char FAR *beg; /* inflate()'s initial strm->next_out */ - unsigned char FAR *end; /* while out < end, enough space available */ -#ifdef INFLATE_STRICT - unsigned dmax; /* maximum distance from zlib header */ -#endif - unsigned wsize; /* window size or zero if not using window */ - unsigned whave; /* valid bytes in the window */ - unsigned wnext; /* window write index */ - unsigned char FAR *window; /* allocated sliding window, if wsize != 0 */ - unsigned long hold; /* local strm->hold */ - unsigned bits; /* local strm->bits */ - code const FAR *lcode; /* local strm->lencode */ - code const FAR *dcode; /* local strm->distcode */ - unsigned lmask; /* mask for first level of length codes */ - unsigned dmask; /* mask for first level of distance codes */ - code const *here; /* retrieved table entry */ - unsigned op; /* code bits, operation, extra bits, or */ - /* window position, window bytes to copy */ - unsigned len; /* match length, unused bytes */ - unsigned dist; /* match distance */ - unsigned char FAR *from; /* where to copy match from */ - - /* copy state to local variables */ - state = (struct inflate_state FAR *)strm->state; - in = strm->next_in; - last = in + (strm->avail_in - 5); - out = strm->next_out; - beg = out - (start - strm->avail_out); - end = out + (strm->avail_out - 257); -#ifdef INFLATE_STRICT - dmax = state->dmax; -#endif - wsize = state->wsize; - whave = state->whave; - wnext = state->wnext; - window = state->window; - hold = state->hold; - bits = state->bits; - lcode = state->lencode; - dcode = state->distcode; - lmask = (1U << state->lenbits) - 1; - dmask = (1U << state->distbits) - 1; - - /* decode literals and length/distances until end-of-block or not enough - input data or output space */ - do { - if (bits < 15) { - hold += (unsigned long)(*in++) << bits; - bits += 8; - hold += (unsigned long)(*in++) << bits; - bits += 8; - } - here = lcode + (hold & lmask); - dolen: - op = (unsigned)(here->bits); - hold >>= op; - bits -= op; - op = (unsigned)(here->op); - if (op == 0) { /* literal */ - Tracevv((stderr, here->val >= 0x20 && here->val < 0x7f ? - "inflate: literal '%c'\n" : - "inflate: literal 0x%02x\n", here->val)); - *out++ = (unsigned char)(here->val); - } - else if (op & 16) { /* length base */ - len = (unsigned)(here->val); - op &= 15; /* number of extra bits */ - if (op) { - if (bits < op) { - hold += (unsigned long)(*in++) << bits; - bits += 8; - } - len += (unsigned)hold & ((1U << op) - 1); - hold >>= op; - bits -= op; - } - Tracevv((stderr, "inflate: length %u\n", len)); - if (bits < 15) { - hold += (unsigned long)(*in++) << bits; - bits += 8; - hold += (unsigned long)(*in++) << bits; - bits += 8; - } - here = dcode + (hold & dmask); - dodist: - op = (unsigned)(here->bits); - hold >>= op; - bits -= op; - op = (unsigned)(here->op); - if (op & 16) { /* distance base */ - dist = (unsigned)(here->val); - op &= 15; /* number of extra bits */ - if (bits < op) { - hold += (unsigned long)(*in++) << bits; - bits += 8; - if (bits < op) { - hold += (unsigned long)(*in++) << bits; - bits += 8; - } - } - dist += (unsigned)hold & ((1U << op) - 1); -#ifdef INFLATE_STRICT - if (dist > dmax) { - strm->msg = (char *)"invalid distance too far back"; - state->mode = BAD; - break; - } -#endif - hold >>= op; - bits -= op; - Tracevv((stderr, "inflate: distance %u\n", dist)); - op = (unsigned)(out - beg); /* max distance in output */ - if (dist > op) { /* see if copy from window */ - op = dist - op; /* distance back in window */ - if (op > whave) { - if (state->sane) { - strm->msg = - (char *)"invalid distance too far back"; - state->mode = BAD; - break; - } -#ifdef INFLATE_ALLOW_INVALID_DISTANCE_TOOFAR_ARRR - if (len <= op - whave) { - do { - *out++ = 0; - } while (--len); - continue; - } - len -= op - whave; - do { - *out++ = 0; - } while (--op > whave); - if (op == 0) { - from = out - dist; - do { - *out++ = *from++; - } while (--len); - continue; - } -#endif - } - from = window; - if (wnext == 0) { /* very common case */ - from += wsize - op; - if (op < len) { /* some from window */ - len -= op; - do { - *out++ = *from++; - } while (--op); - from = out - dist; /* rest from output */ - } - } - else if (wnext < op) { /* wrap around window */ - from += wsize + wnext - op; - op -= wnext; - if (op < len) { /* some from end of window */ - len -= op; - do { - *out++ = *from++; - } while (--op); - from = window; - if (wnext < len) { /* some from start of window */ - op = wnext; - len -= op; - do { - *out++ = *from++; - } while (--op); - from = out - dist; /* rest from output */ - } - } - } - else { /* contiguous in window */ - from += wnext - op; - if (op < len) { /* some from window */ - len -= op; - do { - *out++ = *from++; - } while (--op); - from = out - dist; /* rest from output */ - } - } - while (len > 2) { - *out++ = *from++; - *out++ = *from++; - *out++ = *from++; - len -= 3; - } - if (len) { - *out++ = *from++; - if (len > 1) - *out++ = *from++; - } - } - else { - from = out - dist; /* copy direct from output */ - do { /* minimum length is three */ - *out++ = *from++; - *out++ = *from++; - *out++ = *from++; - len -= 3; - } while (len > 2); - if (len) { - *out++ = *from++; - if (len > 1) - *out++ = *from++; - } - } - } - else if ((op & 64) == 0) { /* 2nd level distance code */ - here = dcode + here->val + (hold & ((1U << op) - 1)); - goto dodist; - } - else { - strm->msg = (char *)"invalid distance code"; - state->mode = BAD; - break; - } - } - else if ((op & 64) == 0) { /* 2nd level length code */ - here = lcode + here->val + (hold & ((1U << op) - 1)); - goto dolen; - } - else if (op & 32) { /* end-of-block */ - Tracevv((stderr, "inflate: end of block\n")); - state->mode = TYPE; - break; - } - else { - strm->msg = (char *)"invalid literal/length code"; - state->mode = BAD; - break; - } - } while (in < last && out < end); - - /* return unused bytes (on entry, bits < 8, so in won't go too far back) */ - len = bits >> 3; - in -= len; - bits -= len << 3; - hold &= (1U << bits) - 1; - - /* update state and return */ - strm->next_in = in; - strm->next_out = out; - strm->avail_in = (unsigned)(in < last ? 5 + (last - in) : 5 - (in - last)); - strm->avail_out = (unsigned)(out < end ? - 257 + (end - out) : 257 - (out - end)); - state->hold = hold; - state->bits = bits; - return; -} - -/* - inflate_fast() speedups that turned out slower (on a PowerPC G3 750CXe): - - Using bit fields for code structure - - Different op definition to avoid & for extra bits (do & for table bits) - - Three separate decoding do-loops for direct, window, and wnext == 0 - - Special case for distance > 1 copies to do overlapped load and store copy - - Explicit branch predictions (based on measured branch probabilities) - - Deferring match copy and interspersed it with decoding subsequent codes - - Swapping literal/length else - - Swapping window/direct else - - Larger unrolled copy loops (three is about right) - - Moving len -= 3 statement into middle of loop - */ - -#endif /* !ASMINF */ diff --git a/kernel/src/compress/zlib/inflate.c b/kernel/src/compress/zlib/inflate.c deleted file mode 100644 index cb35ff237..000000000 --- a/kernel/src/compress/zlib/inflate.c +++ /dev/null @@ -1,1527 +0,0 @@ -/* inflate.c -- zlib decompression - * Copyright (C) 1995-2022 Mark Adler - * For conditions of distribution and use, see copyright notice in zlib.h - */ - -/* - * Change history: - * - * 1.2.beta0 24 Nov 2002 - * - First version -- complete rewrite of inflate to simplify code, avoid - * creation of window when not needed, minimize use of window when it is - * needed, make inffast.c even faster, implement gzip decoding, and to - * improve code readability and style over the previous zlib inflate code - * - * 1.2.beta1 25 Nov 2002 - * - Use pointers for available input and output checking in inffast.c - * - Remove input and output counters in inffast.c - * - Change inffast.c entry and loop from avail_in >= 7 to >= 6 - * - Remove unnecessary second byte pull from length extra in inffast.c - * - Unroll direct copy to three copies per loop in inffast.c - * - * 1.2.beta2 4 Dec 2002 - * - Change external routine names to reduce potential conflicts - * - Correct filename to inffixed.h for fixed tables in inflate.c - * - Make hbuf[] unsigned char to match parameter type in inflate.c - * - Change strm->next_out[-state->offset] to *(strm->next_out - state->offset) - * to avoid negation problem on Alphas (64 bit) in inflate.c - * - * 1.2.beta3 22 Dec 2002 - * - Add comments on state->bits assertion in inffast.c - * - Add comments on op field in inftrees.h - * - Fix bug in reuse of allocated window after inflateReset() - * - Remove bit fields--back to byte structure for speed - * - Remove distance extra == 0 check in inflate_fast()--only helps for lengths - * - Change post-increments to pre-increments in inflate_fast(), PPC biased? - * - Add compile time option, POSTINC, to use post-increments instead (Intel?) - * - Make MATCH copy in inflate() much faster for when inflate_fast() not used - * - Use local copies of stream next and avail values, as well as local bit - * buffer and bit count in inflate()--for speed when inflate_fast() not used - * - * 1.2.beta4 1 Jan 2003 - * - Split ptr - 257 statements in inflate_table() to avoid compiler warnings - * - Move a comment on output buffer sizes from inffast.c to inflate.c - * - Add comments in inffast.c to introduce the inflate_fast() routine - * - Rearrange window copies in inflate_fast() for speed and simplification - * - Unroll last copy for window match in inflate_fast() - * - Use local copies of window variables in inflate_fast() for speed - * - Pull out common wnext == 0 case for speed in inflate_fast() - * - Make op and len in inflate_fast() unsigned for consistency - * - Add FAR to lcode and dcode declarations in inflate_fast() - * - Simplified bad distance check in inflate_fast() - * - Added inflateBackInit(), inflateBack(), and inflateBackEnd() in new - * source file infback.c to provide a call-back interface to inflate for - * programs like gzip and unzip -- uses window as output buffer to avoid - * window copying - * - * 1.2.beta5 1 Jan 2003 - * - Improved inflateBack() interface to allow the caller to provide initial - * input in strm. - * - Fixed stored blocks bug in inflateBack() - * - * 1.2.beta6 4 Jan 2003 - * - Added comments in inffast.c on effectiveness of POSTINC - * - Typecasting all around to reduce compiler warnings - * - Changed loops from while (1) or do {} while (1) to for (;;), again to - * make compilers happy - * - Changed type of window in inflateBackInit() to unsigned char * - * - * 1.2.beta7 27 Jan 2003 - * - Changed many types to unsigned or unsigned short to avoid warnings - * - Added inflateCopy() function - * - * 1.2.0 9 Mar 2003 - * - Changed inflateBack() interface to provide separate opaque descriptors - * for the in() and out() functions - * - Changed inflateBack() argument and in_func typedef to swap the length - * and buffer address return values for the input function - * - Check next_in and next_out for Z_NULL on entry to inflate() - * - * The history for versions after 1.2.0 are in ChangeLog in zlib distribution. - */ - -#include "../../../include/compress/zlib/zutil.h" -#include "../../../include/compress/zlib/inftrees.h" -#include "../../../include/compress/zlib/inflate.h" -#include "../../../include/compress/zlib/inffast.h" - -#ifdef MAKEFIXED -# ifndef BUILDFIXED -# define BUILDFIXED -# endif -#endif - -local int inflateStateCheck(z_streamp strm) { - struct inflate_state FAR *state; - if (strm == Z_NULL || - strm->zalloc == (alloc_func)0 || strm->zfree == (free_func)0) - return 1; - state = (struct inflate_state FAR *)strm->state; - if (state == Z_NULL || state->strm != strm || - state->mode < HEAD || state->mode > SYNC) - return 1; - return 0; -} - -int ZEXPORT inflateResetKeep(z_streamp strm) { - struct inflate_state FAR *state; - - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; - strm->total_in = strm->total_out = state->total = 0; - strm->msg = Z_NULL; - if (state->wrap) /* to support ill-conceived Java test suite */ - strm->adler = state->wrap & 1; - state->mode = HEAD; - state->last = 0; - state->havedict = 0; - state->flags = -1; - state->dmax = 32768U; - state->head = Z_NULL; - state->hold = 0; - state->bits = 0; - state->lencode = state->distcode = state->next = state->codes; - state->sane = 1; - state->back = -1; - Tracev((stderr, "inflate: reset\n")); - return Z_OK; -} - -int ZEXPORT inflateReset(z_streamp strm) { - struct inflate_state FAR *state; - - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; - state->wsize = 0; - state->whave = 0; - state->wnext = 0; - return inflateResetKeep(strm); -} - -int ZEXPORT inflateReset2(z_streamp strm, int windowBits) { - int wrap; - struct inflate_state FAR *state; - - /* get the state */ - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; - - /* extract wrap request from windowBits parameter */ - if (windowBits < 0) { - if (windowBits < -15) - return Z_STREAM_ERROR; - wrap = 0; - windowBits = -windowBits; - } - else { - wrap = (windowBits >> 4) + 5; -#ifdef GUNZIP - if (windowBits < 48) - windowBits &= 15; -#endif - } - - /* set number of window bits, free window if different */ - if (windowBits && (windowBits < 8 || windowBits > 15)) - return Z_STREAM_ERROR; - if (state->window != Z_NULL && state->wbits != (unsigned)windowBits) { - ZFREE(strm, state->window); - state->window = Z_NULL; - } - - /* update state and reset the rest of it */ - state->wrap = wrap; - state->wbits = (unsigned)windowBits; - return inflateReset(strm); -} - -int ZEXPORT inflateInit2_(z_streamp strm, int windowBits, - const char *version, int stream_size) { - int ret; - struct inflate_state FAR *state; - - if (version == Z_NULL || version[0] != ZLIB_VERSION[0] || - stream_size != (int)(sizeof(z_stream))) - return Z_VERSION_ERROR; - if (strm == Z_NULL) return Z_STREAM_ERROR; - strm->msg = Z_NULL; /* in case we return an error */ - if (strm->zalloc == (alloc_func)0) { -#ifdef Z_SOLO - return Z_STREAM_ERROR; -#else - strm->zalloc = zcalloc; - strm->opaque = (voidpf)0; -#endif - } - if (strm->zfree == (free_func)0) -#ifdef Z_SOLO - return Z_STREAM_ERROR; -#else - strm->zfree = zcfree; -#endif - state = (struct inflate_state FAR *) - ZALLOC(strm, 1, sizeof(struct inflate_state)); - if (state == Z_NULL) return Z_MEM_ERROR; - Tracev((stderr, "inflate: allocated\n")); - strm->state = (struct internal_state FAR *)state; - state->strm = strm; - state->window = Z_NULL; - state->mode = HEAD; /* to pass state test in inflateReset2() */ - ret = inflateReset2(strm, windowBits); - if (ret != Z_OK) { - ZFREE(strm, state); - strm->state = Z_NULL; - } - return ret; -} - -int ZEXPORT inflateInit_(z_streamp strm, const char *version, - int stream_size) { - return inflateInit2_(strm, DEF_WBITS, version, stream_size); -} - -int ZEXPORT inflatePrime(z_streamp strm, int bits, int value) { - struct inflate_state FAR *state; - - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - if (bits == 0) - return Z_OK; - state = (struct inflate_state FAR *)strm->state; - if (bits < 0) { - state->hold = 0; - state->bits = 0; - return Z_OK; - } - if (bits > 16 || state->bits + (uInt)bits > 32) return Z_STREAM_ERROR; - value &= (1L << bits) - 1; - state->hold += (unsigned)value << state->bits; - state->bits += (uInt)bits; - return Z_OK; -} - -/* - Return state with length and distance decoding tables and index sizes set to - fixed code decoding. Normally this returns fixed tables from inffixed.h. - If BUILDFIXED is defined, then instead this routine builds the tables the - first time it's called, and returns those tables the first time and - thereafter. This reduces the size of the code by about 2K bytes, in - exchange for a little execution time. However, BUILDFIXED should not be - used for threaded applications, since the rewriting of the tables and virgin - may not be thread-safe. - */ -local void fixedtables(struct inflate_state FAR *state) { -#ifdef BUILDFIXED - static int virgin = 1; - static code *lenfix, *distfix; - static code fixed[544]; - - /* build fixed huffman tables if first call (may not be thread safe) */ - if (virgin) { - unsigned sym, bits; - static code *next; - - /* literal/length table */ - sym = 0; - while (sym < 144) state->lens[sym++] = 8; - while (sym < 256) state->lens[sym++] = 9; - while (sym < 280) state->lens[sym++] = 7; - while (sym < 288) state->lens[sym++] = 8; - next = fixed; - lenfix = next; - bits = 9; - inflate_table(LENS, state->lens, 288, &(next), &(bits), state->work); - - /* distance table */ - sym = 0; - while (sym < 32) state->lens[sym++] = 5; - distfix = next; - bits = 5; - inflate_table(DISTS, state->lens, 32, &(next), &(bits), state->work); - - /* do this just once */ - virgin = 0; - } -#else /* !BUILDFIXED */ -# include "../../../include/compress/zlib/inffixed.h" - -#endif /* BUILDFIXED */ - state->lencode = lenfix; - state->lenbits = 9; - state->distcode = distfix; - state->distbits = 5; -} - -#ifdef MAKEFIXED -#include - -/* - Write out the inffixed.h that is #include'd above. Defining MAKEFIXED also - defines BUILDFIXED, so the tables are built on the fly. makefixed() writes - those tables to stdout, which would be piped to inffixed.h. A small program - can simply call makefixed to do this: - - void makefixed(void); - - int main(void) - { - makefixed(); - return 0; - } - - Then that can be linked with zlib built with MAKEFIXED defined and run: - - a.out > inffixed.h - */ -void makefixed(void) -{ - unsigned low, size; - struct inflate_state state; - - fixedtables(&state); - puts(" /* inffixed.h -- table for decoding fixed codes"); - puts(" * Generated automatically by makefixed()."); - puts(" */"); - puts(""); - puts(" /* WARNING: this file should *not* be used by applications."); - puts(" It is part of the implementation of this library and is"); - puts(" subject to change. Applications should only use zlib.h."); - puts(" */"); - puts(""); - size = 1U << 9; - printf(" static const code lenfix[%u] = {", size); - low = 0; - for (;;) { - if ((low % 7) == 0) printf("\n "); - printf("{%u,%u,%d}", (low & 127) == 99 ? 64 : state.lencode[low].op, - state.lencode[low].bits, state.lencode[low].val); - if (++low == size) break; - putchar(','); - } - puts("\n };"); - size = 1U << 5; - printf("\n static const code distfix[%u] = {", size); - low = 0; - for (;;) { - if ((low % 6) == 0) printf("\n "); - printf("{%u,%u,%d}", state.distcode[low].op, state.distcode[low].bits, - state.distcode[low].val); - if (++low == size) break; - putchar(','); - } - puts("\n };"); -} -#endif /* MAKEFIXED */ - -/* - Update the window with the last wsize (normally 32K) bytes written before - returning. If window does not exist yet, create it. This is only called - when a window is already in use, or when output has been written during this - inflate call, but the end of the deflate stream has not been reached yet. - It is also called to create a window for dictionary data when a dictionary - is loaded. - - Providing output buffers larger than 32K to inflate() should provide a speed - advantage, since only the last 32K of output is copied to the sliding window - upon return from inflate(), and since all distances after the first 32K of - output will fall in the output data, making match copies simpler and faster. - The advantage may be dependent on the size of the processor's data caches. - */ -local int updatewindow(z_streamp strm, const Bytef *end, unsigned copy) { - struct inflate_state FAR *state; - unsigned dist; - - state = (struct inflate_state FAR *)strm->state; - - /* if it hasn't been done already, allocate space for the window */ - if (state->window == Z_NULL) { - state->window = (unsigned char FAR *) - ZALLOC(strm, 1U << state->wbits, - sizeof(unsigned char)); - if (state->window == Z_NULL) return 1; - } - - /* if window not in use yet, initialize */ - if (state->wsize == 0) { - state->wsize = 1U << state->wbits; - state->wnext = 0; - state->whave = 0; - } - - /* copy state->wsize or less output bytes into the circular window */ - if (copy >= state->wsize) { - zmemcpy(state->window, end - state->wsize, state->wsize); - state->wnext = 0; - state->whave = state->wsize; - } - else { - dist = state->wsize - state->wnext; - if (dist > copy) dist = copy; - zmemcpy(state->window + state->wnext, end - copy, dist); - copy -= dist; - if (copy) { - zmemcpy(state->window, end - copy, copy); - state->wnext = copy; - state->whave = state->wsize; - } - else { - state->wnext += dist; - if (state->wnext == state->wsize) state->wnext = 0; - if (state->whave < state->wsize) state->whave += dist; - } - } - return 0; -} - -/* Macros for inflate(): */ - -/* check function to use adler32() for zlib or crc32() for gzip */ -#ifdef GUNZIP -# define UPDATE_CHECK(check, buf, len) \ - (state->flags ? crc32(check, buf, len) : adler32(check, buf, len)) -#else -# define UPDATE_CHECK(check, buf, len) adler32(check, buf, len) -#endif - -/* check macros for header crc */ -#ifdef GUNZIP -# define CRC2(check, word) \ - do { \ - hbuf[0] = (unsigned char)(word); \ - hbuf[1] = (unsigned char)((word) >> 8); \ - check = crc32(check, hbuf, 2); \ - } while (0) - -# define CRC4(check, word) \ - do { \ - hbuf[0] = (unsigned char)(word); \ - hbuf[1] = (unsigned char)((word) >> 8); \ - hbuf[2] = (unsigned char)((word) >> 16); \ - hbuf[3] = (unsigned char)((word) >> 24); \ - check = crc32(check, hbuf, 4); \ - } while (0) -#endif - -/* Load registers with state in inflate() for speed */ -#define LOAD() \ - do { \ - put = strm->next_out; \ - left = strm->avail_out; \ - next = strm->next_in; \ - have = strm->avail_in; \ - hold = state->hold; \ - bits = state->bits; \ - } while (0) - -/* Restore state from registers in inflate() */ -#define RESTORE() \ - do { \ - strm->next_out = put; \ - strm->avail_out = left; \ - strm->next_in = next; \ - strm->avail_in = have; \ - state->hold = hold; \ - state->bits = bits; \ - } while (0) - -/* Clear the input bit accumulator */ -#define INITBITS() \ - do { \ - hold = 0; \ - bits = 0; \ - } while (0) - -/* Get a byte of input into the bit accumulator, or return from inflate() - if there is no input available. */ -#define PULLBYTE() \ - do { \ - if (have == 0) goto inf_leave; \ - have--; \ - hold += (unsigned long)(*next++) << bits; \ - bits += 8; \ - } while (0) - -/* Assure that there are at least n bits in the bit accumulator. If there is - not enough available input to do that, then return from inflate(). */ -#define NEEDBITS(n) \ - do { \ - while (bits < (unsigned)(n)) \ - PULLBYTE(); \ - } while (0) - -/* Return the low n bits of the bit accumulator (n < 16) */ -#define BITS(n) \ - ((unsigned)hold & ((1U << (n)) - 1)) - -/* Remove n bits from the bit accumulator */ -#define DROPBITS(n) \ - do { \ - hold >>= (n); \ - bits -= (unsigned)(n); \ - } while (0) - -/* Remove zero to seven bits as needed to go to a byte boundary */ -#define BYTEBITS() \ - do { \ - hold >>= bits & 7; \ - bits -= bits & 7; \ - } while (0) - -/* - inflate() uses a state machine to process as much input data and generate as - much output data as possible before returning. The state machine is - structured roughly as follows: - - for (;;) switch (state) { - ... - case STATEn: - if (not enough input data or output space to make progress) - return; - ... make progress ... - state = STATEm; - break; - ... - } - - so when inflate() is called again, the same case is attempted again, and - if the appropriate resources are provided, the machine proceeds to the - next state. The NEEDBITS() macro is usually the way the state evaluates - whether it can proceed or should return. NEEDBITS() does the return if - the requested bits are not available. The typical use of the BITS macros - is: - - NEEDBITS(n); - ... do something with BITS(n) ... - DROPBITS(n); - - where NEEDBITS(n) either returns from inflate() if there isn't enough - input left to load n bits into the accumulator, or it continues. BITS(n) - gives the low n bits in the accumulator. When done, DROPBITS(n) drops - the low n bits off the accumulator. INITBITS() clears the accumulator - and sets the number of available bits to zero. BYTEBITS() discards just - enough bits to put the accumulator on a byte boundary. After BYTEBITS() - and a NEEDBITS(8), then BITS(8) would return the next byte in the stream. - - NEEDBITS(n) uses PULLBYTE() to get an available byte of input, or to return - if there is no input available. The decoding of variable length codes uses - PULLBYTE() directly in order to pull just enough bytes to decode the next - code, and no more. - - Some states loop until they get enough input, making sure that enough - state information is maintained to continue the loop where it left off - if NEEDBITS() returns in the loop. For example, want, need, and keep - would all have to actually be part of the saved state in case NEEDBITS() - returns: - - case STATEw: - while (want < need) { - NEEDBITS(n); - keep[want++] = BITS(n); - DROPBITS(n); - } - state = STATEx; - case STATEx: - - As shown above, if the next state is also the next case, then the break - is omitted. - - A state may also return if there is not enough output space available to - complete that state. Those states are copying stored data, writing a - literal byte, and copying a matching string. - - When returning, a "goto inf_leave" is used to update the total counters, - update the check value, and determine whether any progress has been made - during that inflate() call in order to return the proper return code. - Progress is defined as a change in either strm->avail_in or strm->avail_out. - When there is a window, goto inf_leave will update the window with the last - output written. If a goto inf_leave occurs in the middle of decompression - and there is no window currently, goto inf_leave will create one and copy - output to the window for the next call of inflate(). - - In this implementation, the flush parameter of inflate() only affects the - return code (per zlib.h). inflate() always writes as much as possible to - strm->next_out, given the space available and the provided input--the effect - documented in zlib.h of Z_SYNC_FLUSH. Furthermore, inflate() always defers - the allocation of and copying into a sliding window until necessary, which - provides the effect documented in zlib.h for Z_FINISH when the entire input - stream available. So the only thing the flush parameter actually does is: - when flush is set to Z_FINISH, inflate() cannot return Z_OK. Instead it - will return Z_BUF_ERROR if it has not reached the end of the stream. - */ - -int ZEXPORT inflate(z_streamp strm, int flush) { - struct inflate_state FAR *state; - z_const unsigned char FAR *next; /* next input */ - unsigned char FAR *put; /* next output */ - unsigned have, left; /* available input and output */ - unsigned long hold; /* bit buffer */ - unsigned bits; /* bits in bit buffer */ - unsigned in, out; /* save starting available input and output */ - unsigned copy; /* number of stored or match bytes to copy */ - unsigned char FAR *from; /* where to copy match bytes from */ - code here; /* current decoding table entry */ - code last; /* parent table entry */ - unsigned len; /* length to copy for repeats, bits to drop */ - int ret; /* return code */ -#ifdef GUNZIP - unsigned char hbuf[4]; /* buffer for gzip header crc calculation */ -#endif - static const unsigned short order[19] = /* permutation of code lengths */ - {16, 17, 18, 0, 8, 7, 9, 6, 10, 5, 11, 4, 12, 3, 13, 2, 14, 1, 15}; - - if (inflateStateCheck(strm) || strm->next_out == Z_NULL || - (strm->next_in == Z_NULL && strm->avail_in != 0)) - return Z_STREAM_ERROR; - - state = (struct inflate_state FAR *)strm->state; - if (state->mode == TYPE) state->mode = TYPEDO; /* skip check */ - LOAD(); - in = have; - out = left; - ret = Z_OK; - for (;;) - switch (state->mode) { - case HEAD: - if (state->wrap == 0) { - state->mode = TYPEDO; - break; - } - NEEDBITS(16); -#ifdef GUNZIP - if ((state->wrap & 2) && hold == 0x8b1f) { /* gzip header */ - if (state->wbits == 0) - state->wbits = 15; - state->check = crc32(0L, Z_NULL, 0); - CRC2(state->check, hold); - INITBITS(); - state->mode = FLAGS; - break; - } - if (state->head != Z_NULL) - state->head->done = -1; - if (!(state->wrap & 1) || /* check if zlib header allowed */ -#else - if ( -#endif - ((BITS(8) << 8) + (hold >> 8)) % 31) { - strm->msg = (char *)"incorrect header check"; - state->mode = BAD; - break; - } - if (BITS(4) != Z_DEFLATED) { - strm->msg = (char *)"unknown compression method"; - state->mode = BAD; - break; - } - DROPBITS(4); - len = BITS(4) + 8; - if (state->wbits == 0) - state->wbits = len; - if (len > 15 || len > state->wbits) { - strm->msg = (char *)"invalid window size"; - state->mode = BAD; - break; - } - state->dmax = 1U << len; - state->flags = 0; /* indicate zlib header */ - Tracev((stderr, "inflate: zlib header ok\n")); - strm->adler = state->check = adler32(0L, Z_NULL, 0); - state->mode = hold & 0x200 ? DICTID : TYPE; - INITBITS(); - break; -#ifdef GUNZIP - case FLAGS: - NEEDBITS(16); - state->flags = (int)(hold); - if ((state->flags & 0xff) != Z_DEFLATED) { - strm->msg = (char *)"unknown compression method"; - state->mode = BAD; - break; - } - if (state->flags & 0xe000) { - strm->msg = (char *)"unknown header flags set"; - state->mode = BAD; - break; - } - if (state->head != Z_NULL) - state->head->text = (int)((hold >> 8) & 1); - if ((state->flags & 0x0200) && (state->wrap & 4)) - CRC2(state->check, hold); - INITBITS(); - state->mode = TIME; - /* fallthrough */ - case TIME: - NEEDBITS(32); - if (state->head != Z_NULL) - state->head->time = hold; - if ((state->flags & 0x0200) && (state->wrap & 4)) - CRC4(state->check, hold); - INITBITS(); - state->mode = OS; - /* fallthrough */ - case OS: - NEEDBITS(16); - if (state->head != Z_NULL) { - state->head->xflags = (int)(hold & 0xff); - state->head->os = (int)(hold >> 8); - } - if ((state->flags & 0x0200) && (state->wrap & 4)) - CRC2(state->check, hold); - INITBITS(); - state->mode = EXLEN; - /* fallthrough */ - case EXLEN: - if (state->flags & 0x0400) { - NEEDBITS(16); - state->length = (unsigned)(hold); - if (state->head != Z_NULL) - state->head->extra_len = (unsigned)hold; - if ((state->flags & 0x0200) && (state->wrap & 4)) - CRC2(state->check, hold); - INITBITS(); - } - else if (state->head != Z_NULL) - state->head->extra = Z_NULL; - state->mode = EXTRA; - /* fallthrough */ - case EXTRA: - if (state->flags & 0x0400) { - copy = state->length; - if (copy > have) copy = have; - if (copy) { - if (state->head != Z_NULL && - state->head->extra != Z_NULL && - (len = state->head->extra_len - state->length) < - state->head->extra_max) { - zmemcpy(state->head->extra + len, next, - len + copy > state->head->extra_max ? - state->head->extra_max - len : copy); - } - if ((state->flags & 0x0200) && (state->wrap & 4)) - state->check = crc32(state->check, next, copy); - have -= copy; - next += copy; - state->length -= copy; - } - if (state->length) goto inf_leave; - } - state->length = 0; - state->mode = NAME; - /* fallthrough */ - case NAME: - if (state->flags & 0x0800) { - if (have == 0) goto inf_leave; - copy = 0; - do { - len = (unsigned)(next[copy++]); - if (state->head != Z_NULL && - state->head->name != Z_NULL && - state->length < state->head->name_max) - state->head->name[state->length++] = (Bytef)len; - } while (len && copy < have); - if ((state->flags & 0x0200) && (state->wrap & 4)) - state->check = crc32(state->check, next, copy); - have -= copy; - next += copy; - if (len) goto inf_leave; - } - else if (state->head != Z_NULL) - state->head->name = Z_NULL; - state->length = 0; - state->mode = COMMENT; - /* fallthrough */ - case COMMENT: - if (state->flags & 0x1000) { - if (have == 0) goto inf_leave; - copy = 0; - do { - len = (unsigned)(next[copy++]); - if (state->head != Z_NULL && - state->head->comment != Z_NULL && - state->length < state->head->comm_max) - state->head->comment[state->length++] = (Bytef)len; - } while (len && copy < have); - if ((state->flags & 0x0200) && (state->wrap & 4)) - state->check = crc32(state->check, next, copy); - have -= copy; - next += copy; - if (len) goto inf_leave; - } - else if (state->head != Z_NULL) - state->head->comment = Z_NULL; - state->mode = HCRC; - /* fallthrough */ - case HCRC: - if (state->flags & 0x0200) { - NEEDBITS(16); - if ((state->wrap & 4) && hold != (state->check & 0xffff)) { - strm->msg = (char *)"header crc mismatch"; - state->mode = BAD; - break; - } - INITBITS(); - } - if (state->head != Z_NULL) { - state->head->hcrc = (int)((state->flags >> 9) & 1); - state->head->done = 1; - } - strm->adler = state->check = crc32(0L, Z_NULL, 0); - state->mode = TYPE; - break; -#endif - case DICTID: - NEEDBITS(32); - strm->adler = state->check = ZSWAP32(hold); - INITBITS(); - state->mode = DICT; - /* fallthrough */ - case DICT: - if (state->havedict == 0) { - RESTORE(); - return Z_NEED_DICT; - } - strm->adler = state->check = adler32(0L, Z_NULL, 0); - state->mode = TYPE; - /* fallthrough */ - case TYPE: - if (flush == Z_BLOCK || flush == Z_TREES) goto inf_leave; - /* fallthrough */ - case TYPEDO: - if (state->last) { - BYTEBITS(); - state->mode = CHECK; - break; - } - NEEDBITS(3); - state->last = BITS(1); - DROPBITS(1); - switch (BITS(2)) { - case 0: /* stored block */ - Tracev((stderr, "inflate: stored block%s\n", - state->last ? " (last)" : "")); - state->mode = STORED; - break; - case 1: /* fixed block */ - fixedtables(state); - Tracev((stderr, "inflate: fixed codes block%s\n", - state->last ? " (last)" : "")); - state->mode = LEN_; /* decode codes */ - if (flush == Z_TREES) { - DROPBITS(2); - goto inf_leave; - } - break; - case 2: /* dynamic block */ - Tracev((stderr, "inflate: dynamic codes block%s\n", - state->last ? " (last)" : "")); - state->mode = TABLE; - break; - case 3: - strm->msg = (char *)"invalid block type"; - state->mode = BAD; - } - DROPBITS(2); - break; - case STORED: - BYTEBITS(); /* go to byte boundary */ - NEEDBITS(32); - if ((hold & 0xffff) != ((hold >> 16) ^ 0xffff)) { - strm->msg = (char *)"invalid stored block lengths"; - state->mode = BAD; - break; - } - state->length = (unsigned)hold & 0xffff; - Tracev((stderr, "inflate: stored length %u\n", - state->length)); - INITBITS(); - state->mode = COPY_; - if (flush == Z_TREES) goto inf_leave; - /* fallthrough */ - case COPY_: - state->mode = COPY; - /* fallthrough */ - case COPY: - copy = state->length; - if (copy) { - if (copy > have) copy = have; - if (copy > left) copy = left; - if (copy == 0) goto inf_leave; - zmemcpy(put, next, copy); - have -= copy; - next += copy; - left -= copy; - put += copy; - state->length -= copy; - break; - } - Tracev((stderr, "inflate: stored end\n")); - state->mode = TYPE; - break; - case TABLE: - NEEDBITS(14); - state->nlen = BITS(5) + 257; - DROPBITS(5); - state->ndist = BITS(5) + 1; - DROPBITS(5); - state->ncode = BITS(4) + 4; - DROPBITS(4); -#ifndef PKZIP_BUG_WORKAROUND - if (state->nlen > 286 || state->ndist > 30) { - strm->msg = (char *)"too many length or distance symbols"; - state->mode = BAD; - break; - } -#endif - Tracev((stderr, "inflate: table sizes ok\n")); - state->have = 0; - state->mode = LENLENS; - /* fallthrough */ - case LENLENS: - while (state->have < state->ncode) { - NEEDBITS(3); - state->lens[order[state->have++]] = (unsigned short)BITS(3); - DROPBITS(3); - } - while (state->have < 19) - state->lens[order[state->have++]] = 0; - state->next = state->codes; - state->lencode = (const code FAR *)(state->next); - state->lenbits = 7; - ret = inflate_table(CODES, state->lens, 19, &(state->next), - &(state->lenbits), state->work); - if (ret) { - strm->msg = (char *)"invalid code lengths set"; - state->mode = BAD; - break; - } - Tracev((stderr, "inflate: code lengths ok\n")); - state->have = 0; - state->mode = CODELENS; - /* fallthrough */ - case CODELENS: - while (state->have < state->nlen + state->ndist) { - for (;;) { - here = state->lencode[BITS(state->lenbits)]; - if ((unsigned)(here.bits) <= bits) break; - PULLBYTE(); - } - if (here.val < 16) { - DROPBITS(here.bits); - state->lens[state->have++] = here.val; - } - else { - if (here.val == 16) { - NEEDBITS(here.bits + 2); - DROPBITS(here.bits); - if (state->have == 0) { - strm->msg = (char *)"invalid bit length repeat"; - state->mode = BAD; - break; - } - len = state->lens[state->have - 1]; - copy = 3 + BITS(2); - DROPBITS(2); - } - else if (here.val == 17) { - NEEDBITS(here.bits + 3); - DROPBITS(here.bits); - len = 0; - copy = 3 + BITS(3); - DROPBITS(3); - } - else { - NEEDBITS(here.bits + 7); - DROPBITS(here.bits); - len = 0; - copy = 11 + BITS(7); - DROPBITS(7); - } - if (state->have + copy > state->nlen + state->ndist) { - strm->msg = (char *)"invalid bit length repeat"; - state->mode = BAD; - break; - } - while (copy--) - state->lens[state->have++] = (unsigned short)len; - } - } - - /* handle error breaks in while */ - if (state->mode == BAD) break; - - /* check for end-of-block code (better have one) */ - if (state->lens[256] == 0) { - strm->msg = (char *)"invalid code -- missing end-of-block"; - state->mode = BAD; - break; - } - - /* build code tables -- note: do not change the lenbits or distbits - values here (9 and 6) without reading the comments in inftrees.h - concerning the ENOUGH constants, which depend on those values */ - state->next = state->codes; - state->lencode = (const code FAR *)(state->next); - state->lenbits = 9; - ret = inflate_table(LENS, state->lens, state->nlen, &(state->next), - &(state->lenbits), state->work); - if (ret) { - strm->msg = (char *)"invalid literal/lengths set"; - state->mode = BAD; - break; - } - state->distcode = (const code FAR *)(state->next); - state->distbits = 6; - ret = inflate_table(DISTS, state->lens + state->nlen, state->ndist, - &(state->next), &(state->distbits), state->work); - if (ret) { - strm->msg = (char *)"invalid distances set"; - state->mode = BAD; - break; - } - Tracev((stderr, "inflate: codes ok\n")); - state->mode = LEN_; - if (flush == Z_TREES) goto inf_leave; - /* fallthrough */ - case LEN_: - state->mode = LEN; - /* fallthrough */ - case LEN: - if (have >= 6 && left >= 258) { - RESTORE(); - inflate_fast(strm, out); - LOAD(); - if (state->mode == TYPE) - state->back = -1; - break; - } - state->back = 0; - for (;;) { - here = state->lencode[BITS(state->lenbits)]; - if ((unsigned)(here.bits) <= bits) break; - PULLBYTE(); - } - if (here.op && (here.op & 0xf0) == 0) { - last = here; - for (;;) { - here = state->lencode[last.val + - (BITS(last.bits + last.op) >> last.bits)]; - if ((unsigned)(last.bits + here.bits) <= bits) break; - PULLBYTE(); - } - DROPBITS(last.bits); - state->back += last.bits; - } - DROPBITS(here.bits); - state->back += here.bits; - state->length = (unsigned)here.val; - if ((int)(here.op) == 0) { - Tracevv((stderr, here.val >= 0x20 && here.val < 0x7f ? - "inflate: literal '%c'\n" : - "inflate: literal 0x%02x\n", here.val)); - state->mode = LIT; - break; - } - if (here.op & 32) { - Tracevv((stderr, "inflate: end of block\n")); - state->back = -1; - state->mode = TYPE; - break; - } - if (here.op & 64) { - strm->msg = (char *)"invalid literal/length code"; - state->mode = BAD; - break; - } - state->extra = (unsigned)(here.op) & 15; - state->mode = LENEXT; - /* fallthrough */ - case LENEXT: - if (state->extra) { - NEEDBITS(state->extra); - state->length += BITS(state->extra); - DROPBITS(state->extra); - state->back += state->extra; - } - Tracevv((stderr, "inflate: length %u\n", state->length)); - state->was = state->length; - state->mode = DIST; - /* fallthrough */ - case DIST: - for (;;) { - here = state->distcode[BITS(state->distbits)]; - if ((unsigned)(here.bits) <= bits) break; - PULLBYTE(); - } - if ((here.op & 0xf0) == 0) { - last = here; - for (;;) { - here = state->distcode[last.val + - (BITS(last.bits + last.op) >> last.bits)]; - if ((unsigned)(last.bits + here.bits) <= bits) break; - PULLBYTE(); - } - DROPBITS(last.bits); - state->back += last.bits; - } - DROPBITS(here.bits); - state->back += here.bits; - if (here.op & 64) { - strm->msg = (char *)"invalid distance code"; - state->mode = BAD; - break; - } - state->offset = (unsigned)here.val; - state->extra = (unsigned)(here.op) & 15; - state->mode = DISTEXT; - /* fallthrough */ - case DISTEXT: - if (state->extra) { - NEEDBITS(state->extra); - state->offset += BITS(state->extra); - DROPBITS(state->extra); - state->back += state->extra; - } -#ifdef INFLATE_STRICT - if (state->offset > state->dmax) { - strm->msg = (char *)"invalid distance too far back"; - state->mode = BAD; - break; - } -#endif - Tracevv((stderr, "inflate: distance %u\n", state->offset)); - state->mode = MATCH; - /* fallthrough */ - case MATCH: - if (left == 0) goto inf_leave; - copy = out - left; - if (state->offset > copy) { /* copy from window */ - copy = state->offset - copy; - if (copy > state->whave) { - if (state->sane) { - strm->msg = (char *)"invalid distance too far back"; - state->mode = BAD; - break; - } -#ifdef INFLATE_ALLOW_INVALID_DISTANCE_TOOFAR_ARRR - Trace((stderr, "inflate.c too far\n")); - copy -= state->whave; - if (copy > state->length) copy = state->length; - if (copy > left) copy = left; - left -= copy; - state->length -= copy; - do { - *put++ = 0; - } while (--copy); - if (state->length == 0) state->mode = LEN; - break; -#endif - } - if (copy > state->wnext) { - copy -= state->wnext; - from = state->window + (state->wsize - copy); - } - else - from = state->window + (state->wnext - copy); - if (copy > state->length) copy = state->length; - } - else { /* copy from output */ - from = put - state->offset; - copy = state->length; - } - if (copy > left) copy = left; - left -= copy; - state->length -= copy; - do { - *put++ = *from++; - } while (--copy); - if (state->length == 0) state->mode = LEN; - break; - case LIT: - if (left == 0) goto inf_leave; - *put++ = (unsigned char)(state->length); - left--; - state->mode = LEN; - break; - case CHECK: - if (state->wrap) { - NEEDBITS(32); - out -= left; - strm->total_out += out; - state->total += out; - if ((state->wrap & 4) && out) - strm->adler = state->check = - UPDATE_CHECK(state->check, put - out, out); - out = left; - if ((state->wrap & 4) && ( -#ifdef GUNZIP - state->flags ? hold : -#endif - ZSWAP32(hold)) != state->check) { - strm->msg = (char *)"incorrect data check"; - state->mode = BAD; - break; - } - INITBITS(); - Tracev((stderr, "inflate: check matches trailer\n")); - } -#ifdef GUNZIP - state->mode = LENGTH; - /* fallthrough */ - case LENGTH: - if (state->wrap && state->flags) { - NEEDBITS(32); - if ((state->wrap & 4) && hold != (state->total & 0xffffffff)) { - strm->msg = (char *)"incorrect length check"; - state->mode = BAD; - break; - } - INITBITS(); - Tracev((stderr, "inflate: length matches trailer\n")); - } -#endif - state->mode = DONE; - /* fallthrough */ - case DONE: - ret = Z_STREAM_END; - goto inf_leave; - case BAD: - ret = Z_DATA_ERROR; - goto inf_leave; - case MEM: - return Z_MEM_ERROR; - case SYNC: - /* fallthrough */ - default: - return Z_STREAM_ERROR; - } - - /* - Return from inflate(), updating the total counts and the check value. - If there was no progress during the inflate() call, return a buffer - error. Call updatewindow() to create and/or update the window state. - Note: a memory error from inflate() is non-recoverable. - */ - inf_leave: - RESTORE(); - if (state->wsize || (out != strm->avail_out && state->mode < BAD && - (state->mode < CHECK || flush != Z_FINISH))) - if (updatewindow(strm, strm->next_out, out - strm->avail_out)) { - state->mode = MEM; - return Z_MEM_ERROR; - } - in -= strm->avail_in; - out -= strm->avail_out; - strm->total_in += in; - strm->total_out += out; - state->total += out; - if ((state->wrap & 4) && out) - strm->adler = state->check = - UPDATE_CHECK(state->check, strm->next_out - out, out); - strm->data_type = (int)state->bits + (state->last ? 64 : 0) + - (state->mode == TYPE ? 128 : 0) + - (state->mode == LEN_ || state->mode == COPY_ ? 256 : 0); - if (((in == 0 && out == 0) || flush == Z_FINISH) && ret == Z_OK) - ret = Z_BUF_ERROR; - return ret; -} - -int ZEXPORT inflateEnd(z_streamp strm) { - struct inflate_state FAR *state; - if (inflateStateCheck(strm)) - return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; - if (state->window != Z_NULL) ZFREE(strm, state->window); - ZFREE(strm, strm->state); - strm->state = Z_NULL; - Tracev((stderr, "inflate: end\n")); - return Z_OK; -} - -int ZEXPORT inflateGetDictionary(z_streamp strm, Bytef *dictionary, - uInt *dictLength) { - struct inflate_state FAR *state; - - /* check state */ - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; - - /* copy dictionary */ - if (state->whave && dictionary != Z_NULL) { - zmemcpy(dictionary, state->window + state->wnext, - state->whave - state->wnext); - zmemcpy(dictionary + state->whave - state->wnext, - state->window, state->wnext); - } - if (dictLength != Z_NULL) - *dictLength = state->whave; - return Z_OK; -} - -int ZEXPORT inflateSetDictionary(z_streamp strm, const Bytef *dictionary, - uInt dictLength) { - struct inflate_state FAR *state; - unsigned long dictid; - int ret; - - /* check state */ - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; - if (state->wrap != 0 && state->mode != DICT) - return Z_STREAM_ERROR; - - /* check for correct dictionary identifier */ - if (state->mode == DICT) { - dictid = adler32(0L, Z_NULL, 0); - dictid = adler32(dictid, dictionary, dictLength); - if (dictid != state->check) - return Z_DATA_ERROR; - } - - /* copy dictionary to window using updatewindow(), which will amend the - existing dictionary if appropriate */ - ret = updatewindow(strm, dictionary + dictLength, dictLength); - if (ret) { - state->mode = MEM; - return Z_MEM_ERROR; - } - state->havedict = 1; - Tracev((stderr, "inflate: dictionary set\n")); - return Z_OK; -} - -int ZEXPORT inflateGetHeader(z_streamp strm, gz_headerp head) { - struct inflate_state FAR *state; - - /* check state */ - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; - if ((state->wrap & 2) == 0) return Z_STREAM_ERROR; - - /* save header structure */ - state->head = head; - head->done = 0; - return Z_OK; -} - -/* - Search buf[0..len-1] for the pattern: 0, 0, 0xff, 0xff. Return when found - or when out of input. When called, *have is the number of pattern bytes - found in order so far, in 0..3. On return *have is updated to the new - state. If on return *have equals four, then the pattern was found and the - return value is how many bytes were read including the last byte of the - pattern. If *have is less than four, then the pattern has not been found - yet and the return value is len. In the latter case, syncsearch() can be - called again with more data and the *have state. *have is initialized to - zero for the first call. - */ -local unsigned syncsearch(unsigned FAR *have, const unsigned char FAR *buf, - unsigned len) { - unsigned got; - unsigned next; - - got = *have; - next = 0; - while (next < len && got < 4) { - if ((int)(buf[next]) == (got < 2 ? 0 : 0xff)) - got++; - else if (buf[next]) - got = 0; - else - got = 4 - got; - next++; - } - *have = got; - return next; -} - -int ZEXPORT inflateSync(z_streamp strm) { - unsigned len; /* number of bytes to look at or looked at */ - int flags; /* temporary to save header status */ - unsigned long in, out; /* temporary to save total_in and total_out */ - unsigned char buf[4]; /* to restore bit buffer to byte string */ - struct inflate_state FAR *state; - - /* check parameters */ - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; - if (strm->avail_in == 0 && state->bits < 8) return Z_BUF_ERROR; - - /* if first time, start search in bit buffer */ - if (state->mode != SYNC) { - state->mode = SYNC; - state->hold >>= state->bits & 7; - state->bits -= state->bits & 7; - len = 0; - while (state->bits >= 8) { - buf[len++] = (unsigned char)(state->hold); - state->hold >>= 8; - state->bits -= 8; - } - state->have = 0; - syncsearch(&(state->have), buf, len); - } - - /* search available input */ - len = syncsearch(&(state->have), strm->next_in, strm->avail_in); - strm->avail_in -= len; - strm->next_in += len; - strm->total_in += len; - - /* return no joy or set up to restart inflate() on a new block */ - if (state->have != 4) return Z_DATA_ERROR; - if (state->flags == -1) - state->wrap = 0; /* if no header yet, treat as raw */ - else - state->wrap &= ~4; /* no point in computing a check value now */ - flags = state->flags; - in = strm->total_in; out = strm->total_out; - inflateReset(strm); - strm->total_in = in; strm->total_out = out; - state->flags = flags; - state->mode = TYPE; - return Z_OK; -} - -/* - Returns true if inflate is currently at the end of a block generated by - Z_SYNC_FLUSH or Z_FULL_FLUSH. This function is used by one PPP - implementation to provide an additional safety check. PPP uses - Z_SYNC_FLUSH but removes the length bytes of the resulting empty stored - block. When decompressing, PPP checks that at the end of input packet, - inflate is waiting for these length bytes. - */ -int ZEXPORT inflateSyncPoint(z_streamp strm) { - struct inflate_state FAR *state; - - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; - return state->mode == STORED && state->bits == 0; -} - -int ZEXPORT inflateCopy(z_streamp dest, z_streamp source) { - struct inflate_state FAR *state; - struct inflate_state FAR *copy; - unsigned char FAR *window; - unsigned wsize; - - /* check input */ - if (inflateStateCheck(source) || dest == Z_NULL) - return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)source->state; - - /* allocate space */ - copy = (struct inflate_state FAR *) - ZALLOC(source, 1, sizeof(struct inflate_state)); - if (copy == Z_NULL) return Z_MEM_ERROR; - window = Z_NULL; - if (state->window != Z_NULL) { - window = (unsigned char FAR *) - ZALLOC(source, 1U << state->wbits, sizeof(unsigned char)); - if (window == Z_NULL) { - ZFREE(source, copy); - return Z_MEM_ERROR; - } - } - - /* copy state */ - zmemcpy((voidpf)dest, (voidpf)source, sizeof(z_stream)); - zmemcpy((voidpf)copy, (voidpf)state, sizeof(struct inflate_state)); - copy->strm = dest; - if (state->lencode >= state->codes && - state->lencode <= state->codes + ENOUGH - 1) { - copy->lencode = copy->codes + (state->lencode - state->codes); - copy->distcode = copy->codes + (state->distcode - state->codes); - } - copy->next = copy->codes + (state->next - state->codes); - if (window != Z_NULL) { - wsize = 1U << state->wbits; - zmemcpy(window, state->window, wsize); - } - copy->window = window; - dest->state = (struct internal_state FAR *)copy; - return Z_OK; -} - -int ZEXPORT inflateUndermine(z_streamp strm, int subvert) { - struct inflate_state FAR *state; - - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; -#ifdef INFLATE_ALLOW_INVALID_DISTANCE_TOOFAR_ARRR - state->sane = !subvert; - return Z_OK; -#else - (void)subvert; - state->sane = 1; - return Z_DATA_ERROR; -#endif -} - -int ZEXPORT inflateValidate(z_streamp strm, int check) { - struct inflate_state FAR *state; - - if (inflateStateCheck(strm)) return Z_STREAM_ERROR; - state = (struct inflate_state FAR *)strm->state; - if (check && state->wrap) - state->wrap |= 4; - else - state->wrap &= ~4; - return Z_OK; -} - -long ZEXPORT inflateMark(z_streamp strm) { - struct inflate_state FAR *state; - - if (inflateStateCheck(strm)) - return -(1L << 16); - state = (struct inflate_state FAR *)strm->state; - return (long)(((unsigned long)((long)state->back)) << 16) + - (state->mode == COPY ? state->length : - (state->mode == MATCH ? state->was - state->length : 0)); -} - -unsigned long ZEXPORT inflateCodesUsed(z_streamp strm) { - struct inflate_state FAR *state; - if (inflateStateCheck(strm)) return (unsigned long)-1; - state = (struct inflate_state FAR *)strm->state; - return (unsigned long)(state->next - state->codes); -} diff --git a/kernel/src/compress/zlib/inftrees.c b/kernel/src/compress/zlib/inftrees.c deleted file mode 100644 index e4203cf09..000000000 --- a/kernel/src/compress/zlib/inftrees.c +++ /dev/null @@ -1,299 +0,0 @@ -/* inftrees.c -- generate Huffman trees for efficient decoding - * Copyright (C) 1995-2023 Mark Adler - * For conditions of distribution and use, see copyright notice in zlib.h - */ - -#include "../../../include/compress/zlib/zutil.h" -#include "../../../include/compress/zlib/inftrees.h" - -#define MAXBITS 15 - -const char inflate_copyright[] = - " inflate 1.3.0.1 Copyright 1995-2023 Mark Adler "; -/* - If you use the zlib library in a product, an acknowledgment is welcome - in the documentation of your product. If for some reason you cannot - include such an acknowledgment, I would appreciate that you keep this - copyright string in the executable of your product. - */ - -/* - Build a set of tables to decode the provided canonical Huffman code. - The code lengths are lens[0..codes-1]. The result starts at *table, - whose indices are 0..2^bits-1. work is a writable array of at least - lens shorts, which is used as a work area. type is the type of code - to be generated, CODES, LENS, or DISTS. On return, zero is success, - -1 is an invalid code, and +1 means that ENOUGH isn't enough. table - on return points to the next available entry's address. bits is the - requested root table index bits, and on return it is the actual root - table index bits. It will differ if the request is greater than the - longest code or if it is less than the shortest code. - */ -int ZLIB_INTERNAL inflate_table(codetype type, unsigned short FAR *lens, - unsigned codes, code FAR * FAR *table, - unsigned FAR *bits, unsigned short FAR *work) { - unsigned len; /* a code's length in bits */ - unsigned sym; /* index of code symbols */ - unsigned min, max; /* minimum and maximum code lengths */ - unsigned root; /* number of index bits for root table */ - unsigned curr; /* number of index bits for current table */ - unsigned drop; /* code bits to drop for sub-table */ - int left; /* number of prefix codes available */ - unsigned used; /* code entries in table used */ - unsigned huff; /* Huffman code */ - unsigned incr; /* for incrementing code, index */ - unsigned fill; /* index for replicating entries */ - unsigned low; /* low bits for current root entry */ - unsigned mask; /* mask for low root bits */ - code here; /* table entry for duplication */ - code FAR *next; /* next available space in table */ - const unsigned short FAR *base; /* base value table to use */ - const unsigned short FAR *extra; /* extra bits table to use */ - unsigned match; /* use base and extra for symbol >= match */ - unsigned short count[MAXBITS+1]; /* number of codes of each length */ - unsigned short offs[MAXBITS+1]; /* offsets in table for each length */ - static const unsigned short lbase[31] = { /* Length codes 257..285 base */ - 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 15, 17, 19, 23, 27, 31, - 35, 43, 51, 59, 67, 83, 99, 115, 131, 163, 195, 227, 258, 0, 0}; - static const unsigned short lext[31] = { /* Length codes 257..285 extra */ - 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 18, 18, 18, 18, - 19, 19, 19, 19, 20, 20, 20, 20, 21, 21, 21, 21, 16, 70, 200}; - static const unsigned short dbase[32] = { /* Distance codes 0..29 base */ - 1, 2, 3, 4, 5, 7, 9, 13, 17, 25, 33, 49, 65, 97, 129, 193, - 257, 385, 513, 769, 1025, 1537, 2049, 3073, 4097, 6145, - 8193, 12289, 16385, 24577, 0, 0}; - static const unsigned short dext[32] = { /* Distance codes 0..29 extra */ - 16, 16, 16, 16, 17, 17, 18, 18, 19, 19, 20, 20, 21, 21, 22, 22, - 23, 23, 24, 24, 25, 25, 26, 26, 27, 27, - 28, 28, 29, 29, 64, 64}; - - /* - Process a set of code lengths to create a canonical Huffman code. The - code lengths are lens[0..codes-1]. Each length corresponds to the - symbols 0..codes-1. The Huffman code is generated by first sorting the - symbols by length from short to long, and retaining the symbol order - for codes with equal lengths. Then the code starts with all zero bits - for the first code of the shortest length, and the codes are integer - increments for the same length, and zeros are appended as the length - increases. For the deflate format, these bits are stored backwards - from their more natural integer increment ordering, and so when the - decoding tables are built in the large loop below, the integer codes - are incremented backwards. - - This routine assumes, but does not check, that all of the entries in - lens[] are in the range 0..MAXBITS. The caller must assure this. - 1..MAXBITS is interpreted as that code length. zero means that that - symbol does not occur in this code. - - The codes are sorted by computing a count of codes for each length, - creating from that a table of starting indices for each length in the - sorted table, and then entering the symbols in order in the sorted - table. The sorted table is work[], with that space being provided by - the caller. - - The length counts are used for other purposes as well, i.e. finding - the minimum and maximum length codes, determining if there are any - codes at all, checking for a valid set of lengths, and looking ahead - at length counts to determine sub-table sizes when building the - decoding tables. - */ - - /* accumulate lengths for codes (assumes lens[] all in 0..MAXBITS) */ - for (len = 0; len <= MAXBITS; len++) - count[len] = 0; - for (sym = 0; sym < codes; sym++) - count[lens[sym]]++; - - /* bound code lengths, force root to be within code lengths */ - root = *bits; - for (max = MAXBITS; max >= 1; max--) - if (count[max] != 0) break; - if (root > max) root = max; - if (max == 0) { /* no symbols to code at all */ - here.op = (unsigned char)64; /* invalid code marker */ - here.bits = (unsigned char)1; - here.val = (unsigned short)0; - *(*table)++ = here; /* make a table to force an error */ - *(*table)++ = here; - *bits = 1; - return 0; /* no symbols, but wait for decoding to report error */ - } - for (min = 1; min < max; min++) - if (count[min] != 0) break; - if (root < min) root = min; - - /* check for an over-subscribed or incomplete set of lengths */ - left = 1; - for (len = 1; len <= MAXBITS; len++) { - left <<= 1; - left -= count[len]; - if (left < 0) return -1; /* over-subscribed */ - } - if (left > 0 && (type == CODES || max != 1)) - return -1; /* incomplete set */ - - /* generate offsets into symbol table for each length for sorting */ - offs[1] = 0; - for (len = 1; len < MAXBITS; len++) - offs[len + 1] = offs[len] + count[len]; - - /* sort symbols by length, by symbol order within each length */ - for (sym = 0; sym < codes; sym++) - if (lens[sym] != 0) work[offs[lens[sym]]++] = (unsigned short)sym; - - /* - Create and fill in decoding tables. In this loop, the table being - filled is at next and has curr index bits. The code being used is huff - with length len. That code is converted to an index by dropping drop - bits off of the bottom. For codes where len is less than drop + curr, - those top drop + curr - len bits are incremented through all values to - fill the table with replicated entries. - - root is the number of index bits for the root table. When len exceeds - root, sub-tables are created pointed to by the root entry with an index - of the low root bits of huff. This is saved in low to check for when a - new sub-table should be started. drop is zero when the root table is - being filled, and drop is root when sub-tables are being filled. - - When a new sub-table is needed, it is necessary to look ahead in the - code lengths to determine what size sub-table is needed. The length - counts are used for this, and so count[] is decremented as codes are - entered in the tables. - - used keeps track of how many table entries have been allocated from the - provided *table space. It is checked for LENS and DIST tables against - the constants ENOUGH_LENS and ENOUGH_DISTS to guard against changes in - the initial root table size constants. See the comments in inftrees.h - for more information. - - sym increments through all symbols, and the loop terminates when - all codes of length max, i.e. all codes, have been processed. This - routine permits incomplete codes, so another loop after this one fills - in the rest of the decoding tables with invalid code markers. - */ - - /* set up for code type */ - switch (type) { - case CODES: - base = extra = work; /* dummy value--not used */ - match = 20; - break; - case LENS: - base = lbase; - extra = lext; - match = 257; - break; - default: /* DISTS */ - base = dbase; - extra = dext; - match = 0; - } - - /* initialize state for loop */ - huff = 0; /* starting code */ - sym = 0; /* starting code symbol */ - len = min; /* starting code length */ - next = *table; /* current table to fill in */ - curr = root; /* current table index bits */ - drop = 0; /* current bits to drop from code for index */ - low = (unsigned)(-1); /* trigger new sub-table when len > root */ - used = 1U << root; /* use root table entries */ - mask = used - 1; /* mask for comparing low */ - - /* check available table space */ - if ((type == LENS && used > ENOUGH_LENS) || - (type == DISTS && used > ENOUGH_DISTS)) - return 1; - - /* process all codes and make table entries */ - for (;;) { - /* create table entry */ - here.bits = (unsigned char)(len - drop); - if (work[sym] + 1U < match) { - here.op = (unsigned char)0; - here.val = work[sym]; - } - else if (work[sym] >= match) { - here.op = (unsigned char)(extra[work[sym] - match]); - here.val = base[work[sym] - match]; - } - else { - here.op = (unsigned char)(32 + 64); /* end of block */ - here.val = 0; - } - - /* replicate for those indices with low len bits equal to huff */ - incr = 1U << (len - drop); - fill = 1U << curr; - min = fill; /* save offset to next table */ - do { - fill -= incr; - next[(huff >> drop) + fill] = here; - } while (fill != 0); - - /* backwards increment the len-bit code huff */ - incr = 1U << (len - 1); - while (huff & incr) - incr >>= 1; - if (incr != 0) { - huff &= incr - 1; - huff += incr; - } - else - huff = 0; - - /* go to next symbol, update count, len */ - sym++; - if (--(count[len]) == 0) { - if (len == max) break; - len = lens[work[sym]]; - } - - /* create new sub-table if needed */ - if (len > root && (huff & mask) != low) { - /* if first time, transition to sub-tables */ - if (drop == 0) - drop = root; - - /* increment past last table */ - next += min; /* here min is 1 << curr */ - - /* determine length of next table */ - curr = len - drop; - left = (int)(1 << curr); - while (curr + drop < max) { - left -= count[curr + drop]; - if (left <= 0) break; - curr++; - left <<= 1; - } - - /* check for enough space */ - used += 1U << curr; - if ((type == LENS && used > ENOUGH_LENS) || - (type == DISTS && used > ENOUGH_DISTS)) - return 1; - - /* point entry in root table to sub-table */ - low = huff & mask; - (*table)[low].op = (unsigned char)curr; - (*table)[low].bits = (unsigned char)root; - (*table)[low].val = (unsigned short)(next - *table); - } - } - - /* fill in remaining table entry if code is incomplete (guaranteed to have - at most one remaining entry, since if the code is incomplete, the - maximum code length that was allowed to get this far is one bit) */ - if (huff != 0) { - here.op = (unsigned char)64; /* invalid code marker */ - here.bits = (unsigned char)(len - drop); - here.val = (unsigned short)0; - next[huff] = here; - } - - /* set return parameters */ - *table += used; - *bits = root; - return 0; -} diff --git a/kernel/src/compress/zlib/trees.c b/kernel/src/compress/zlib/trees.c deleted file mode 100644 index ef0b65543..000000000 --- a/kernel/src/compress/zlib/trees.c +++ /dev/null @@ -1,1117 +0,0 @@ -/* trees.c -- output deflated data using Huffman coding - * Copyright (C) 1995-2021 Jean-loup Gailly - * detect_data_type() function provided freely by Cosmin Truta, 2006 - * For conditions of distribution and use, see copyright notice in zlib.h - */ - -/* - * ALGORITHM - * - * The "deflation" process uses several Huffman trees. The more - * common source values are represented by shorter bit sequences. - * - * Each code tree is stored in a compressed form which is itself - * a Huffman encoding of the lengths of all the code strings (in - * ascending order by source values). The actual code strings are - * reconstructed from the lengths in the inflate process, as described - * in the deflate specification. - * - * REFERENCES - * - * Deutsch, L.P.,"'Deflate' Compressed Data Format Specification". - * Available in ftp.uu.net:/pub/archiving/zip/doc/deflate-1.1.doc - * - * Storer, James A. - * Data Compression: Methods and Theory, pp. 49-50. - * Computer Science Press, 1988. ISBN 0-7167-8156-5. - * - * Sedgewick, R. - * Algorithms, p290. - * Addison-Wesley, 1983. ISBN 0-201-06672-6. - */ - -/* @(#) $Id$ */ - -/* #define GEN_TREES_H */ - -#include "../../../include/compress/zlib/deflate.h" - -#ifdef ZLIB_DEBUG -# include -#endif - -/* =========================================================================== - * Constants - */ - -#define MAX_BL_BITS 7 -/* Bit length codes must not exceed MAX_BL_BITS bits */ - -#define END_BLOCK 256 -/* end of block literal code */ - -#define REP_3_6 16 -/* repeat previous bit length 3-6 times (2 bits of repeat count) */ - -#define REPZ_3_10 17 -/* repeat a zero length 3-10 times (3 bits of repeat count) */ - -#define REPZ_11_138 18 -/* repeat a zero length 11-138 times (7 bits of repeat count) */ - -local const int extra_lbits[LENGTH_CODES] /* extra bits for each length code */ - = {0,0,0,0,0,0,0,0,1,1,1,1,2,2,2,2,3,3,3,3,4,4,4,4,5,5,5,5,0}; - -local const int extra_dbits[D_CODES] /* extra bits for each distance code */ - = {0,0,0,0,1,1,2,2,3,3,4,4,5,5,6,6,7,7,8,8,9,9,10,10,11,11,12,12,13,13}; - -local const int extra_blbits[BL_CODES]/* extra bits for each bit length code */ - = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2,3,7}; - -local const uch bl_order[BL_CODES] - = {16,17,18,0,8,7,9,6,10,5,11,4,12,3,13,2,14,1,15}; -/* The lengths of the bit length codes are sent in order of decreasing - * probability, to avoid transmitting the lengths for unused bit length codes. - */ - -/* =========================================================================== - * Local data. These are initialized only once. - */ - -#define DIST_CODE_LEN 512 /* see definition of array dist_code below */ - -#if defined(GEN_TREES_H) || !defined(STDC) -/* non ANSI compilers may not accept trees.h */ - -local ct_data static_ltree[L_CODES+2]; -/* The static literal tree. Since the bit lengths are imposed, there is no - * need for the L_CODES extra codes used during heap construction. However - * The codes 286 and 287 are needed to build a canonical tree (see _tr_init - * below). - */ - -local ct_data static_dtree[D_CODES]; -/* The static distance tree. (Actually a trivial tree since all codes use - * 5 bits.) - */ - -uch _dist_code[DIST_CODE_LEN]; -/* Distance codes. The first 256 values correspond to the distances - * 3 .. 258, the last 256 values correspond to the top 8 bits of - * the 15 bit distances. - */ - -uch _length_code[MAX_MATCH-MIN_MATCH+1]; -/* length code for each normalized match length (0 == MIN_MATCH) */ - -local int base_length[LENGTH_CODES]; -/* First normalized length for each code (0 = MIN_MATCH) */ - -local int base_dist[D_CODES]; -/* First normalized distance for each code (0 = distance of 1) */ - -#else -# include "../../../include/compress/zlib/trees.h" -#endif /* GEN_TREES_H */ - -struct static_tree_desc_s { - const ct_data *static_tree; /* static tree or NULL */ - const intf *extra_bits; /* extra bits for each code or NULL */ - int extra_base; /* base index for extra_bits */ - int elems; /* max number of elements in the tree */ - int max_length; /* max bit length for the codes */ -}; - -#ifdef NO_INIT_GLOBAL_POINTERS -# define TCONST -#else -# define TCONST const -#endif - -local TCONST static_tree_desc static_l_desc = -{static_ltree, extra_lbits, LITERALS+1, L_CODES, MAX_BITS}; - -local TCONST static_tree_desc static_d_desc = -{static_dtree, extra_dbits, 0, D_CODES, MAX_BITS}; - -local TCONST static_tree_desc static_bl_desc = -{(const ct_data *)0, extra_blbits, 0, BL_CODES, MAX_BL_BITS}; - -/* =========================================================================== - * Output a short LSB first on the stream. - * IN assertion: there is enough room in pendingBuf. - */ -#define put_short(s, w) { \ - put_byte(s, (uch)((w) & 0xff)); \ - put_byte(s, (uch)((ush)(w) >> 8)); \ -} - -/* =========================================================================== - * Reverse the first len bits of a code, using straightforward code (a faster - * method would use a table) - * IN assertion: 1 <= len <= 15 - */ -local unsigned bi_reverse(unsigned code, int len) { - register unsigned res = 0; - do { - res |= code & 1; - code >>= 1, res <<= 1; - } while (--len > 0); - return res >> 1; -} - -/* =========================================================================== - * Flush the bit buffer, keeping at most 7 bits in it. - */ -local void bi_flush(deflate_state *s) { - if (s->bi_valid == 16) { - put_short(s, s->bi_buf); - s->bi_buf = 0; - s->bi_valid = 0; - } else if (s->bi_valid >= 8) { - put_byte(s, (Byte)s->bi_buf); - s->bi_buf >>= 8; - s->bi_valid -= 8; - } -} - -/* =========================================================================== - * Flush the bit buffer and align the output on a byte boundary - */ -local void bi_windup(deflate_state *s) { - if (s->bi_valid > 8) { - put_short(s, s->bi_buf); - } else if (s->bi_valid > 0) { - put_byte(s, (Byte)s->bi_buf); - } - s->bi_buf = 0; - s->bi_valid = 0; -#ifdef ZLIB_DEBUG - s->bits_sent = (s->bits_sent + 7) & ~7; -#endif -} - -/* =========================================================================== - * Generate the codes for a given tree and bit counts (which need not be - * optimal). - * IN assertion: the array bl_count contains the bit length statistics for - * the given tree and the field len is set for all tree elements. - * OUT assertion: the field code is set for all tree elements of non - * zero code length. - */ -local void gen_codes(ct_data *tree, int max_code, ushf *bl_count) { - ush next_code[MAX_BITS+1]; /* next code value for each bit length */ - unsigned code = 0; /* running code value */ - int bits; /* bit index */ - int n; /* code index */ - - /* The distribution counts are first used to generate the code values - * without bit reversal. - */ - for (bits = 1; bits <= MAX_BITS; bits++) { - code = (code + bl_count[bits - 1]) << 1; - next_code[bits] = (ush)code; - } - /* Check that the bit counts in bl_count are consistent. The last code - * must be all ones. - */ - Assert (code + bl_count[MAX_BITS] - 1 == (1 << MAX_BITS) - 1, - "inconsistent bit counts"); - Tracev((stderr,"\ngen_codes: max_code %d ", max_code)); - - for (n = 0; n <= max_code; n++) { - int len = tree[n].Len; - if (len == 0) continue; - /* Now reverse the bits */ - tree[n].Code = (ush)bi_reverse(next_code[len]++, len); - - Tracecv(tree != static_ltree, (stderr,"\nn %3d %c l %2d c %4x (%x) ", - n, (isgraph(n) ? n : ' '), len, tree[n].Code, next_code[len] - 1)); - } -} - -#ifdef GEN_TREES_H -local void gen_trees_header(void); -#endif - -#ifndef ZLIB_DEBUG -# define send_code(s, c, tree) send_bits(s, tree[c].Code, tree[c].Len) - /* Send a code of the given tree. c and tree must not have side effects */ - -#else /* !ZLIB_DEBUG */ -# define send_code(s, c, tree) \ - { if (z_verbose>2) fprintf(stderr,"\ncd %3d ",(c)); \ - send_bits(s, tree[c].Code, tree[c].Len); } -#endif - -/* =========================================================================== - * Send a value on a given number of bits. - * IN assertion: length <= 16 and value fits in length bits. - */ -#ifdef ZLIB_DEBUG -local void send_bits(deflate_state *s, int value, int length) { - Tracevv((stderr," l %2d v %4x ", length, value)); - Assert(length > 0 && length <= 15, "invalid length"); - s->bits_sent += (ulg)length; - - /* If not enough room in bi_buf, use (valid) bits from bi_buf and - * (16 - bi_valid) bits from value, leaving (width - (16 - bi_valid)) - * unused bits in value. - */ - if (s->bi_valid > (int)Buf_size - length) { - s->bi_buf |= (ush)value << s->bi_valid; - put_short(s, s->bi_buf); - s->bi_buf = (ush)value >> (Buf_size - s->bi_valid); - s->bi_valid += length - Buf_size; - } else { - s->bi_buf |= (ush)value << s->bi_valid; - s->bi_valid += length; - } -} -#else /* !ZLIB_DEBUG */ - -#define send_bits(s, value, length) \ -{ int len = length;\ - if (s->bi_valid > (int)Buf_size - len) {\ - int val = (int)value;\ - s->bi_buf |= (ush)val << s->bi_valid;\ - put_short(s, s->bi_buf);\ - s->bi_buf = (ush)val >> (Buf_size - s->bi_valid);\ - s->bi_valid += len - Buf_size;\ - } else {\ - s->bi_buf |= (ush)(value) << s->bi_valid;\ - s->bi_valid += len;\ - }\ -} -#endif /* ZLIB_DEBUG */ - - -/* the arguments must not have side effects */ - -/* =========================================================================== - * Initialize the various 'constant' tables. - */ -local void tr_static_init(void) { -#if defined(GEN_TREES_H) || !defined(STDC) - static int static_init_done = 0; - int n; /* iterates over tree elements */ - int bits; /* bit counter */ - int length; /* length value */ - int code; /* code value */ - int dist; /* distance index */ - ush bl_count[MAX_BITS+1]; - /* number of codes at each bit length for an optimal tree */ - - if (static_init_done) return; - - /* For some embedded targets, global variables are not initialized: */ -#ifdef NO_INIT_GLOBAL_POINTERS - static_l_desc.static_tree = static_ltree; - static_l_desc.extra_bits = extra_lbits; - static_d_desc.static_tree = static_dtree; - static_d_desc.extra_bits = extra_dbits; - static_bl_desc.extra_bits = extra_blbits; -#endif - - /* Initialize the mapping length (0..255) -> length code (0..28) */ - length = 0; - for (code = 0; code < LENGTH_CODES-1; code++) { - base_length[code] = length; - for (n = 0; n < (1 << extra_lbits[code]); n++) { - _length_code[length++] = (uch)code; - } - } - Assert (length == 256, "tr_static_init: length != 256"); - /* Note that the length 255 (match length 258) can be represented - * in two different ways: code 284 + 5 bits or code 285, so we - * overwrite length_code[255] to use the best encoding: - */ - _length_code[length - 1] = (uch)code; - - /* Initialize the mapping dist (0..32K) -> dist code (0..29) */ - dist = 0; - for (code = 0 ; code < 16; code++) { - base_dist[code] = dist; - for (n = 0; n < (1 << extra_dbits[code]); n++) { - _dist_code[dist++] = (uch)code; - } - } - Assert (dist == 256, "tr_static_init: dist != 256"); - dist >>= 7; /* from now on, all distances are divided by 128 */ - for ( ; code < D_CODES; code++) { - base_dist[code] = dist << 7; - for (n = 0; n < (1 << (extra_dbits[code] - 7)); n++) { - _dist_code[256 + dist++] = (uch)code; - } - } - Assert (dist == 256, "tr_static_init: 256 + dist != 512"); - - /* Construct the codes of the static literal tree */ - for (bits = 0; bits <= MAX_BITS; bits++) bl_count[bits] = 0; - n = 0; - while (n <= 143) static_ltree[n++].Len = 8, bl_count[8]++; - while (n <= 255) static_ltree[n++].Len = 9, bl_count[9]++; - while (n <= 279) static_ltree[n++].Len = 7, bl_count[7]++; - while (n <= 287) static_ltree[n++].Len = 8, bl_count[8]++; - /* Codes 286 and 287 do not exist, but we must include them in the - * tree construction to get a canonical Huffman tree (longest code - * all ones) - */ - gen_codes((ct_data *)static_ltree, L_CODES+1, bl_count); - - /* The static distance tree is trivial: */ - for (n = 0; n < D_CODES; n++) { - static_dtree[n].Len = 5; - static_dtree[n].Code = bi_reverse((unsigned)n, 5); - } - static_init_done = 1; - -# ifdef GEN_TREES_H - gen_trees_header(); -# endif -#endif /* defined(GEN_TREES_H) || !defined(STDC) */ -} - -/* =========================================================================== - * Generate the file trees.h describing the static trees. - */ -#ifdef GEN_TREES_H -# ifndef ZLIB_DEBUG -# include -# endif - -# define SEPARATOR(i, last, width) \ - ((i) == (last)? "\n};\n\n" : \ - ((i) % (width) == (width) - 1 ? ",\n" : ", ")) - -void gen_trees_header(void) { - FILE *header = fopen("trees.h", "w"); - int i; - - Assert (header != NULL, "Can't open trees.h"); - fprintf(header, - "/* header created automatically with -DGEN_TREES_H */\n\n"); - - fprintf(header, "local const ct_data static_ltree[L_CODES+2] = {\n"); - for (i = 0; i < L_CODES+2; i++) { - fprintf(header, "{{%3u},{%3u}}%s", static_ltree[i].Code, - static_ltree[i].Len, SEPARATOR(i, L_CODES+1, 5)); - } - - fprintf(header, "local const ct_data static_dtree[D_CODES] = {\n"); - for (i = 0; i < D_CODES; i++) { - fprintf(header, "{{%2u},{%2u}}%s", static_dtree[i].Code, - static_dtree[i].Len, SEPARATOR(i, D_CODES-1, 5)); - } - - fprintf(header, "const uch ZLIB_INTERNAL _dist_code[DIST_CODE_LEN] = {\n"); - for (i = 0; i < DIST_CODE_LEN; i++) { - fprintf(header, "%2u%s", _dist_code[i], - SEPARATOR(i, DIST_CODE_LEN-1, 20)); - } - - fprintf(header, - "const uch ZLIB_INTERNAL _length_code[MAX_MATCH-MIN_MATCH+1]= {\n"); - for (i = 0; i < MAX_MATCH-MIN_MATCH+1; i++) { - fprintf(header, "%2u%s", _length_code[i], - SEPARATOR(i, MAX_MATCH-MIN_MATCH, 20)); - } - - fprintf(header, "local const int base_length[LENGTH_CODES] = {\n"); - for (i = 0; i < LENGTH_CODES; i++) { - fprintf(header, "%1u%s", base_length[i], - SEPARATOR(i, LENGTH_CODES-1, 20)); - } - - fprintf(header, "local const int base_dist[D_CODES] = {\n"); - for (i = 0; i < D_CODES; i++) { - fprintf(header, "%5u%s", base_dist[i], - SEPARATOR(i, D_CODES-1, 10)); - } - - fclose(header); -} -#endif /* GEN_TREES_H */ - -/* =========================================================================== - * Initialize a new block. - */ -local void init_block(deflate_state *s) { - int n; /* iterates over tree elements */ - - /* Initialize the trees. */ - for (n = 0; n < L_CODES; n++) s->dyn_ltree[n].Freq = 0; - for (n = 0; n < D_CODES; n++) s->dyn_dtree[n].Freq = 0; - for (n = 0; n < BL_CODES; n++) s->bl_tree[n].Freq = 0; - - s->dyn_ltree[END_BLOCK].Freq = 1; - s->opt_len = s->static_len = 0L; - s->sym_next = s->matches = 0; -} - -/* =========================================================================== - * Initialize the tree data structures for a new zlib stream. - */ -void ZLIB_INTERNAL _tr_init(deflate_state *s) { - tr_static_init(); - - s->l_desc.dyn_tree = s->dyn_ltree; - s->l_desc.stat_desc = &static_l_desc; - - s->d_desc.dyn_tree = s->dyn_dtree; - s->d_desc.stat_desc = &static_d_desc; - - s->bl_desc.dyn_tree = s->bl_tree; - s->bl_desc.stat_desc = &static_bl_desc; - - s->bi_buf = 0; - s->bi_valid = 0; -#ifdef ZLIB_DEBUG - s->compressed_len = 0L; - s->bits_sent = 0L; -#endif - - /* Initialize the first block of the first file: */ - init_block(s); -} - -#define SMALLEST 1 -/* Index within the heap array of least frequent node in the Huffman tree */ - - -/* =========================================================================== - * Remove the smallest element from the heap and recreate the heap with - * one less element. Updates heap and heap_len. - */ -#define pqremove(s, tree, top) \ -{\ - top = s->heap[SMALLEST]; \ - s->heap[SMALLEST] = s->heap[s->heap_len--]; \ - pqdownheap(s, tree, SMALLEST); \ -} - -/* =========================================================================== - * Compares to subtrees, using the tree depth as tie breaker when - * the subtrees have equal frequency. This minimizes the worst case length. - */ -#define smaller(tree, n, m, depth) \ - (tree[n].Freq < tree[m].Freq || \ - (tree[n].Freq == tree[m].Freq && depth[n] <= depth[m])) - -/* =========================================================================== - * Restore the heap property by moving down the tree starting at node k, - * exchanging a node with the smallest of its two sons if necessary, stopping - * when the heap property is re-established (each father smaller than its - * two sons). - */ -local void pqdownheap(deflate_state *s, ct_data *tree, int k) { - int v = s->heap[k]; - int j = k << 1; /* left son of k */ - while (j <= s->heap_len) { - /* Set j to the smallest of the two sons: */ - if (j < s->heap_len && - smaller(tree, s->heap[j + 1], s->heap[j], s->depth)) { - j++; - } - /* Exit if v is smaller than both sons */ - if (smaller(tree, v, s->heap[j], s->depth)) break; - - /* Exchange v with the smallest son */ - s->heap[k] = s->heap[j]; k = j; - - /* And continue down the tree, setting j to the left son of k */ - j <<= 1; - } - s->heap[k] = v; -} - -/* =========================================================================== - * Compute the optimal bit lengths for a tree and update the total bit length - * for the current block. - * IN assertion: the fields freq and dad are set, heap[heap_max] and - * above are the tree nodes sorted by increasing frequency. - * OUT assertions: the field len is set to the optimal bit length, the - * array bl_count contains the frequencies for each bit length. - * The length opt_len is updated; static_len is also updated if stree is - * not null. - */ -local void gen_bitlen(deflate_state *s, tree_desc *desc) { - ct_data *tree = desc->dyn_tree; - int max_code = desc->max_code; - const ct_data *stree = desc->stat_desc->static_tree; - const intf *extra = desc->stat_desc->extra_bits; - int base = desc->stat_desc->extra_base; - int max_length = desc->stat_desc->max_length; - int h; /* heap index */ - int n, m; /* iterate over the tree elements */ - int bits; /* bit length */ - int xbits; /* extra bits */ - ush f; /* frequency */ - int overflow = 0; /* number of elements with bit length too large */ - - for (bits = 0; bits <= MAX_BITS; bits++) s->bl_count[bits] = 0; - - /* In a first pass, compute the optimal bit lengths (which may - * overflow in the case of the bit length tree). - */ - tree[s->heap[s->heap_max]].Len = 0; /* root of the heap */ - - for (h = s->heap_max + 1; h < HEAP_SIZE; h++) { - n = s->heap[h]; - bits = tree[tree[n].Dad].Len + 1; - if (bits > max_length) bits = max_length, overflow++; - tree[n].Len = (ush)bits; - /* We overwrite tree[n].Dad which is no longer needed */ - - if (n > max_code) continue; /* not a leaf node */ - - s->bl_count[bits]++; - xbits = 0; - if (n >= base) xbits = extra[n - base]; - f = tree[n].Freq; - s->opt_len += (ulg)f * (unsigned)(bits + xbits); - if (stree) s->static_len += (ulg)f * (unsigned)(stree[n].Len + xbits); - } - if (overflow == 0) return; - - Tracev((stderr,"\nbit length overflow\n")); - /* This happens for example on obj2 and pic of the Calgary corpus */ - - /* Find the first bit length which could increase: */ - do { - bits = max_length - 1; - while (s->bl_count[bits] == 0) bits--; - s->bl_count[bits]--; /* move one leaf down the tree */ - s->bl_count[bits + 1] += 2; /* move one overflow item as its brother */ - s->bl_count[max_length]--; - /* The brother of the overflow item also moves one step up, - * but this does not affect bl_count[max_length] - */ - overflow -= 2; - } while (overflow > 0); - - /* Now recompute all bit lengths, scanning in increasing frequency. - * h is still equal to HEAP_SIZE. (It is simpler to reconstruct all - * lengths instead of fixing only the wrong ones. This idea is taken - * from 'ar' written by Haruhiko Okumura.) - */ - for (bits = max_length; bits != 0; bits--) { - n = s->bl_count[bits]; - while (n != 0) { - m = s->heap[--h]; - if (m > max_code) continue; - if ((unsigned) tree[m].Len != (unsigned) bits) { - Tracev((stderr,"code %d bits %d->%d\n", m, tree[m].Len, bits)); - s->opt_len += ((ulg)bits - tree[m].Len) * tree[m].Freq; - tree[m].Len = (ush)bits; - } - n--; - } - } -} - -#ifdef DUMP_BL_TREE -# include -#endif - -/* =========================================================================== - * Construct one Huffman tree and assigns the code bit strings and lengths. - * Update the total bit length for the current block. - * IN assertion: the field freq is set for all tree elements. - * OUT assertions: the fields len and code are set to the optimal bit length - * and corresponding code. The length opt_len is updated; static_len is - * also updated if stree is not null. The field max_code is set. - */ -local void build_tree(deflate_state *s, tree_desc *desc) { - ct_data *tree = desc->dyn_tree; - const ct_data *stree = desc->stat_desc->static_tree; - int elems = desc->stat_desc->elems; - int n, m; /* iterate over heap elements */ - int max_code = -1; /* largest code with non zero frequency */ - int node; /* new node being created */ - - /* Construct the initial heap, with least frequent element in - * heap[SMALLEST]. The sons of heap[n] are heap[2*n] and heap[2*n + 1]. - * heap[0] is not used. - */ - s->heap_len = 0, s->heap_max = HEAP_SIZE; - - for (n = 0; n < elems; n++) { - if (tree[n].Freq != 0) { - s->heap[++(s->heap_len)] = max_code = n; - s->depth[n] = 0; - } else { - tree[n].Len = 0; - } - } - - /* The pkzip format requires that at least one distance code exists, - * and that at least one bit should be sent even if there is only one - * possible code. So to avoid special checks later on we force at least - * two codes of non zero frequency. - */ - while (s->heap_len < 2) { - node = s->heap[++(s->heap_len)] = (max_code < 2 ? ++max_code : 0); - tree[node].Freq = 1; - s->depth[node] = 0; - s->opt_len--; if (stree) s->static_len -= stree[node].Len; - /* node is 0 or 1 so it does not have extra bits */ - } - desc->max_code = max_code; - - /* The elements heap[heap_len/2 + 1 .. heap_len] are leaves of the tree, - * establish sub-heaps of increasing lengths: - */ - for (n = s->heap_len/2; n >= 1; n--) pqdownheap(s, tree, n); - - /* Construct the Huffman tree by repeatedly combining the least two - * frequent nodes. - */ - node = elems; /* next internal node of the tree */ - do { - pqremove(s, tree, n); /* n = node of least frequency */ - m = s->heap[SMALLEST]; /* m = node of next least frequency */ - - s->heap[--(s->heap_max)] = n; /* keep the nodes sorted by frequency */ - s->heap[--(s->heap_max)] = m; - - /* Create a new node father of n and m */ - tree[node].Freq = tree[n].Freq + tree[m].Freq; - s->depth[node] = (uch)((s->depth[n] >= s->depth[m] ? - s->depth[n] : s->depth[m]) + 1); - tree[n].Dad = tree[m].Dad = (ush)node; -#ifdef DUMP_BL_TREE - if (tree == s->bl_tree) { - fprintf(stderr,"\nnode %d(%d), sons %d(%d) %d(%d)", - node, tree[node].Freq, n, tree[n].Freq, m, tree[m].Freq); - } -#endif - /* and insert the new node in the heap */ - s->heap[SMALLEST] = node++; - pqdownheap(s, tree, SMALLEST); - - } while (s->heap_len >= 2); - - s->heap[--(s->heap_max)] = s->heap[SMALLEST]; - - /* At this point, the fields freq and dad are set. We can now - * generate the bit lengths. - */ - gen_bitlen(s, (tree_desc *)desc); - - /* The field len is now set, we can generate the bit codes */ - gen_codes ((ct_data *)tree, max_code, s->bl_count); -} - -/* =========================================================================== - * Scan a literal or distance tree to determine the frequencies of the codes - * in the bit length tree. - */ -local void scan_tree(deflate_state *s, ct_data *tree, int max_code) { - int n; /* iterates over all tree elements */ - int prevlen = -1; /* last emitted length */ - int curlen; /* length of current code */ - int nextlen = tree[0].Len; /* length of next code */ - int count = 0; /* repeat count of the current code */ - int max_count = 7; /* max repeat count */ - int min_count = 4; /* min repeat count */ - - if (nextlen == 0) max_count = 138, min_count = 3; - tree[max_code + 1].Len = (ush)0xffff; /* guard */ - - for (n = 0; n <= max_code; n++) { - curlen = nextlen; nextlen = tree[n + 1].Len; - if (++count < max_count && curlen == nextlen) { - continue; - } else if (count < min_count) { - s->bl_tree[curlen].Freq += count; - } else if (curlen != 0) { - if (curlen != prevlen) s->bl_tree[curlen].Freq++; - s->bl_tree[REP_3_6].Freq++; - } else if (count <= 10) { - s->bl_tree[REPZ_3_10].Freq++; - } else { - s->bl_tree[REPZ_11_138].Freq++; - } - count = 0; prevlen = curlen; - if (nextlen == 0) { - max_count = 138, min_count = 3; - } else if (curlen == nextlen) { - max_count = 6, min_count = 3; - } else { - max_count = 7, min_count = 4; - } - } -} - -/* =========================================================================== - * Send a literal or distance tree in compressed form, using the codes in - * bl_tree. - */ -local void send_tree(deflate_state *s, ct_data *tree, int max_code) { - int n; /* iterates over all tree elements */ - int prevlen = -1; /* last emitted length */ - int curlen; /* length of current code */ - int nextlen = tree[0].Len; /* length of next code */ - int count = 0; /* repeat count of the current code */ - int max_count = 7; /* max repeat count */ - int min_count = 4; /* min repeat count */ - - /* tree[max_code + 1].Len = -1; */ /* guard already set */ - if (nextlen == 0) max_count = 138, min_count = 3; - - for (n = 0; n <= max_code; n++) { - curlen = nextlen; nextlen = tree[n + 1].Len; - if (++count < max_count && curlen == nextlen) { - continue; - } else if (count < min_count) { - do { send_code(s, curlen, s->bl_tree); } while (--count != 0); - - } else if (curlen != 0) { - if (curlen != prevlen) { - send_code(s, curlen, s->bl_tree); count--; - } - Assert(count >= 3 && count <= 6, " 3_6?"); - send_code(s, REP_3_6, s->bl_tree); send_bits(s, count - 3, 2); - - } else if (count <= 10) { - send_code(s, REPZ_3_10, s->bl_tree); send_bits(s, count - 3, 3); - - } else { - send_code(s, REPZ_11_138, s->bl_tree); send_bits(s, count - 11, 7); - } - count = 0; prevlen = curlen; - if (nextlen == 0) { - max_count = 138, min_count = 3; - } else if (curlen == nextlen) { - max_count = 6, min_count = 3; - } else { - max_count = 7, min_count = 4; - } - } -} - -/* =========================================================================== - * Construct the Huffman tree for the bit lengths and return the index in - * bl_order of the last bit length code to send. - */ -local int build_bl_tree(deflate_state *s) { - int max_blindex; /* index of last bit length code of non zero freq */ - - /* Determine the bit length frequencies for literal and distance trees */ - scan_tree(s, (ct_data *)s->dyn_ltree, s->l_desc.max_code); - scan_tree(s, (ct_data *)s->dyn_dtree, s->d_desc.max_code); - - /* Build the bit length tree: */ - build_tree(s, (tree_desc *)(&(s->bl_desc))); - /* opt_len now includes the length of the tree representations, except the - * lengths of the bit lengths codes and the 5 + 5 + 4 bits for the counts. - */ - - /* Determine the number of bit length codes to send. The pkzip format - * requires that at least 4 bit length codes be sent. (appnote.txt says - * 3 but the actual value used is 4.) - */ - for (max_blindex = BL_CODES-1; max_blindex >= 3; max_blindex--) { - if (s->bl_tree[bl_order[max_blindex]].Len != 0) break; - } - /* Update opt_len to include the bit length tree and counts */ - s->opt_len += 3*((ulg)max_blindex + 1) + 5 + 5 + 4; - Tracev((stderr, "\ndyn trees: dyn %ld, stat %ld", - s->opt_len, s->static_len)); - - return max_blindex; -} - -/* =========================================================================== - * Send the header for a block using dynamic Huffman trees: the counts, the - * lengths of the bit length codes, the literal tree and the distance tree. - * IN assertion: lcodes >= 257, dcodes >= 1, blcodes >= 4. - */ -local void send_all_trees(deflate_state *s, int lcodes, int dcodes, - int blcodes) { - int rank; /* index in bl_order */ - - Assert (lcodes >= 257 && dcodes >= 1 && blcodes >= 4, "not enough codes"); - Assert (lcodes <= L_CODES && dcodes <= D_CODES && blcodes <= BL_CODES, - "too many codes"); - Tracev((stderr, "\nbl counts: ")); - send_bits(s, lcodes - 257, 5); /* not +255 as stated in appnote.txt */ - send_bits(s, dcodes - 1, 5); - send_bits(s, blcodes - 4, 4); /* not -3 as stated in appnote.txt */ - for (rank = 0; rank < blcodes; rank++) { - Tracev((stderr, "\nbl code %2d ", bl_order[rank])); - send_bits(s, s->bl_tree[bl_order[rank]].Len, 3); - } - Tracev((stderr, "\nbl tree: sent %ld", s->bits_sent)); - - send_tree(s, (ct_data *)s->dyn_ltree, lcodes - 1); /* literal tree */ - Tracev((stderr, "\nlit tree: sent %ld", s->bits_sent)); - - send_tree(s, (ct_data *)s->dyn_dtree, dcodes - 1); /* distance tree */ - Tracev((stderr, "\ndist tree: sent %ld", s->bits_sent)); -} - -/* =========================================================================== - * Send a stored block - */ -void ZLIB_INTERNAL _tr_stored_block(deflate_state *s, charf *buf, - ulg stored_len, int last) { - send_bits(s, (STORED_BLOCK<<1) + last, 3); /* send block type */ - bi_windup(s); /* align on byte boundary */ - put_short(s, (ush)stored_len); - put_short(s, (ush)~stored_len); - if (stored_len) - zmemcpy(s->pending_buf + s->pending, (Bytef *)buf, stored_len); - s->pending += stored_len; -#ifdef ZLIB_DEBUG - s->compressed_len = (s->compressed_len + 3 + 7) & (ulg)~7L; - s->compressed_len += (stored_len + 4) << 3; - s->bits_sent += 2*16; - s->bits_sent += stored_len << 3; -#endif -} - -/* =========================================================================== - * Flush the bits in the bit buffer to pending output (leaves at most 7 bits) - */ -void ZLIB_INTERNAL _tr_flush_bits(deflate_state *s) { - bi_flush(s); -} - -/* =========================================================================== - * Send one empty static block to give enough lookahead for inflate. - * This takes 10 bits, of which 7 may remain in the bit buffer. - */ -void ZLIB_INTERNAL _tr_align(deflate_state *s) { - send_bits(s, STATIC_TREES<<1, 3); - send_code(s, END_BLOCK, static_ltree); -#ifdef ZLIB_DEBUG - s->compressed_len += 10L; /* 3 for block type, 7 for EOB */ -#endif - bi_flush(s); -} - -/* =========================================================================== - * Send the block data compressed using the given Huffman trees - */ -local void compress_block(deflate_state *s, const ct_data *ltree, - const ct_data *dtree) { - unsigned dist; /* distance of matched string */ - int lc; /* match length or unmatched char (if dist == 0) */ - unsigned sx = 0; /* running index in symbol buffers */ - unsigned code; /* the code to send */ - int extra; /* number of extra bits to send */ - - if (s->sym_next != 0) do { -#ifdef LIT_MEM - dist = s->d_buf[sx]; - lc = s->l_buf[sx++]; -#else - dist = s->sym_buf[sx++] & 0xff; - dist += (unsigned)(s->sym_buf[sx++] & 0xff) << 8; - lc = s->sym_buf[sx++]; -#endif - if (dist == 0) { - send_code(s, lc, ltree); /* send a literal byte */ - Tracecv(isgraph(lc), (stderr," '%c' ", lc)); - } else { - /* Here, lc is the match length - MIN_MATCH */ - code = _length_code[lc]; - send_code(s, code + LITERALS + 1, ltree); /* send length code */ - extra = extra_lbits[code]; - if (extra != 0) { - lc -= base_length[code]; - send_bits(s, lc, extra); /* send the extra length bits */ - } - dist--; /* dist is now the match distance - 1 */ - code = d_code(dist); - Assert (code < D_CODES, "bad d_code"); - - send_code(s, code, dtree); /* send the distance code */ - extra = extra_dbits[code]; - if (extra != 0) { - dist -= (unsigned)base_dist[code]; - send_bits(s, dist, extra); /* send the extra distance bits */ - } - } /* literal or match pair ? */ - - /* Check for no overlay of pending_buf on needed symbols */ -#ifdef LIT_MEM - Assert(s->pending < (s->lit_bufsize << 1) + sx, "pendingBuf overflow"); -#else - Assert(s->pending < s->lit_bufsize + sx, "pendingBuf overflow"); -#endif - - } while (sx < s->sym_next); - - send_code(s, END_BLOCK, ltree); -} - -/* =========================================================================== - * Check if the data type is TEXT or BINARY, using the following algorithm: - * - TEXT if the two conditions below are satisfied: - * a) There are no non-portable control characters belonging to the - * "block list" (0..6, 14..25, 28..31). - * b) There is at least one printable character belonging to the - * "allow list" (9 {TAB}, 10 {LF}, 13 {CR}, 32..255). - * - BINARY otherwise. - * - The following partially-portable control characters form a - * "gray list" that is ignored in this detection algorithm: - * (7 {BEL}, 8 {BS}, 11 {VT}, 12 {FF}, 26 {SUB}, 27 {ESC}). - * IN assertion: the fields Freq of dyn_ltree are set. - */ -local int detect_data_type(deflate_state *s) { - /* block_mask is the bit mask of block-listed bytes - * set bits 0..6, 14..25, and 28..31 - * 0xf3ffc07f = binary 11110011111111111100000001111111 - */ - unsigned long block_mask = 0xf3ffc07fUL; - int n; - - /* Check for non-textual ("block-listed") bytes. */ - for (n = 0; n <= 31; n++, block_mask >>= 1) - if ((block_mask & 1) && (s->dyn_ltree[n].Freq != 0)) - return Z_BINARY; - - /* Check for textual ("allow-listed") bytes. */ - if (s->dyn_ltree[9].Freq != 0 || s->dyn_ltree[10].Freq != 0 - || s->dyn_ltree[13].Freq != 0) - return Z_TEXT; - for (n = 32; n < LITERALS; n++) - if (s->dyn_ltree[n].Freq != 0) - return Z_TEXT; - - /* There are no "block-listed" or "allow-listed" bytes: - * this stream either is empty or has tolerated ("gray-listed") bytes only. - */ - return Z_BINARY; -} - -/* =========================================================================== - * Determine the best encoding for the current block: dynamic trees, static - * trees or store, and write out the encoded block. - */ -void ZLIB_INTERNAL _tr_flush_block(deflate_state *s, charf *buf, - ulg stored_len, int last) { - ulg opt_lenb, static_lenb; /* opt_len and static_len in bytes */ - int max_blindex = 0; /* index of last bit length code of non zero freq */ - - /* Build the Huffman trees unless a stored block is forced */ - if (s->level > 0) { - - /* Check if the file is binary or text */ - if (s->strm->data_type == Z_UNKNOWN) - s->strm->data_type = detect_data_type(s); - - /* Construct the literal and distance trees */ - build_tree(s, (tree_desc *)(&(s->l_desc))); - Tracev((stderr, "\nlit data: dyn %ld, stat %ld", s->opt_len, - s->static_len)); - - build_tree(s, (tree_desc *)(&(s->d_desc))); - Tracev((stderr, "\ndist data: dyn %ld, stat %ld", s->opt_len, - s->static_len)); - /* At this point, opt_len and static_len are the total bit lengths of - * the compressed block data, excluding the tree representations. - */ - - /* Build the bit length tree for the above two trees, and get the index - * in bl_order of the last bit length code to send. - */ - max_blindex = build_bl_tree(s); - - /* Determine the best encoding. Compute the block lengths in bytes. */ - opt_lenb = (s->opt_len + 3 + 7) >> 3; - static_lenb = (s->static_len + 3 + 7) >> 3; - - Tracev((stderr, "\nopt %lu(%lu) stat %lu(%lu) stored %lu lit %u ", - opt_lenb, s->opt_len, static_lenb, s->static_len, stored_len, - s->sym_next / 3)); - -#ifndef FORCE_STATIC - if (static_lenb <= opt_lenb || s->strategy == Z_FIXED) -#endif - opt_lenb = static_lenb; - - } else { - Assert(buf != (char*)0, "lost buf"); - opt_lenb = static_lenb = stored_len + 5; /* force a stored block */ - } - -#ifdef FORCE_STORED - if (buf != (char*)0) { /* force stored block */ -#else - if (stored_len + 4 <= opt_lenb && buf != (char*)0) { - /* 4: two words for the lengths */ -#endif - /* The test buf != NULL is only necessary if LIT_BUFSIZE > WSIZE. - * Otherwise we can't have processed more than WSIZE input bytes since - * the last block flush, because compression would have been - * successful. If LIT_BUFSIZE <= WSIZE, it is never too late to - * transform a block into a stored block. - */ - _tr_stored_block(s, buf, stored_len, last); - - } else if (static_lenb == opt_lenb) { - send_bits(s, (STATIC_TREES<<1) + last, 3); - compress_block(s, (const ct_data *)static_ltree, - (const ct_data *)static_dtree); -#ifdef ZLIB_DEBUG - s->compressed_len += 3 + s->static_len; -#endif - } else { - send_bits(s, (DYN_TREES<<1) + last, 3); - send_all_trees(s, s->l_desc.max_code + 1, s->d_desc.max_code + 1, - max_blindex + 1); - compress_block(s, (const ct_data *)s->dyn_ltree, - (const ct_data *)s->dyn_dtree); -#ifdef ZLIB_DEBUG - s->compressed_len += 3 + s->opt_len; -#endif - } - Assert (s->compressed_len == s->bits_sent, "bad compressed size"); - /* The above check is made mod 2^32, for files larger than 512 MB - * and uLong implemented on 32 bits. - */ - init_block(s); - - if (last) { - bi_windup(s); -#ifdef ZLIB_DEBUG - s->compressed_len += 7; /* align on byte boundary */ -#endif - } - Tracev((stderr,"\ncomprlen %lu(%lu) ", s->compressed_len >> 3, - s->compressed_len - 7*last)); -} - -/* =========================================================================== - * Save the match info and tally the frequency counts. Return true if - * the current block must be flushed. - */ -int ZLIB_INTERNAL _tr_tally(deflate_state *s, unsigned dist, unsigned lc) { -#ifdef LIT_MEM - s->d_buf[s->sym_next] = (ush)dist; - s->l_buf[s->sym_next++] = (uch)lc; -#else - s->sym_buf[s->sym_next++] = (uch)dist; - s->sym_buf[s->sym_next++] = (uch)(dist >> 8); - s->sym_buf[s->sym_next++] = (uch)lc; -#endif - if (dist == 0) { - /* lc is the unmatched char */ - s->dyn_ltree[lc].Freq++; - } else { - s->matches++; - /* Here, lc is the match length - MIN_MATCH */ - dist--; /* dist = match distance - 1 */ - Assert((ush)dist < (ush)MAX_DIST(s) && - (ush)lc <= (ush)(MAX_MATCH-MIN_MATCH) && - (ush)d_code(dist) < (ush)D_CODES, "_tr_tally: bad match"); - - s->dyn_ltree[_length_code[lc] + LITERALS + 1].Freq++; - s->dyn_dtree[d_code(dist)].Freq++; - } - return (s->sym_next == s->sym_end); -} diff --git a/kernel/src/compress/zlib/uncompr.c b/kernel/src/compress/zlib/uncompr.c deleted file mode 100644 index 61d019b35..000000000 --- a/kernel/src/compress/zlib/uncompr.c +++ /dev/null @@ -1,85 +0,0 @@ -/* uncompr.c -- decompress a memory buffer - * Copyright (C) 1995-2003, 2010, 2014, 2016 Jean-loup Gailly, Mark Adler - * For conditions of distribution and use, see copyright notice in zlib.h - */ - -/* @(#) $Id$ */ - -#define ZLIB_INTERNAL -#include "../../../include/compress/zlib/zlib.h" - -/* =========================================================================== - Decompresses the source buffer into the destination buffer. *sourceLen is - the byte length of the source buffer. Upon entry, *destLen is the total size - of the destination buffer, which must be large enough to hold the entire - uncompressed data. (The size of the uncompressed data must have been saved - previously by the compressor and transmitted to the decompressor by some - mechanism outside the scope of this compression library.) Upon exit, - *destLen is the size of the decompressed data and *sourceLen is the number - of source bytes consumed. Upon return, source + *sourceLen points to the - first unused input byte. - - uncompress returns Z_OK if success, Z_MEM_ERROR if there was not enough - memory, Z_BUF_ERROR if there was not enough room in the output buffer, or - Z_DATA_ERROR if the input data was corrupted, including if the input data is - an incomplete zlib stream. -*/ -int ZEXPORT uncompress2(Bytef *dest, uLongf *destLen, const Bytef *source, - uLong *sourceLen) { - z_stream stream; - int err; - const uInt max = (uInt)-1; - uLong len, left; - Byte buf[1]; /* for detection of incomplete stream when *destLen == 0 */ - - len = *sourceLen; - if (*destLen) { - left = *destLen; - *destLen = 0; - } - else { - left = 1; - dest = buf; - } - - stream.next_in = (z_const Bytef *)source; - stream.avail_in = 0; - stream.zalloc = (alloc_func)0; - stream.zfree = (free_func)0; - stream.opaque = (voidpf)0; - - err = inflateInit(&stream); - if (err != Z_OK) return err; - - stream.next_out = dest; - stream.avail_out = 0; - - do { - if (stream.avail_out == 0) { - stream.avail_out = left > (uLong)max ? max : (uInt)left; - left -= stream.avail_out; - } - if (stream.avail_in == 0) { - stream.avail_in = len > (uLong)max ? max : (uInt)len; - len -= stream.avail_in; - } - err = inflate(&stream, Z_NO_FLUSH); - } while (err == Z_OK); - - *sourceLen -= len + stream.avail_in; - if (dest != buf) - *destLen = stream.total_out; - else if (stream.total_out && err == Z_BUF_ERROR) - left = 1; - - inflateEnd(&stream); - return err == Z_STREAM_END ? Z_OK : - err == Z_NEED_DICT ? Z_DATA_ERROR : - err == Z_BUF_ERROR && left + stream.avail_out ? Z_DATA_ERROR : - err; -} - -int ZEXPORT uncompress(Bytef *dest, uLongf *destLen, const Bytef *source, - uLong sourceLen) { - return uncompress2(dest, destLen, source, &sourceLen); -} diff --git a/kernel/src/compress/zlib/zutil.c b/kernel/src/compress/zlib/zutil.c deleted file mode 100644 index 740836653..000000000 --- a/kernel/src/compress/zlib/zutil.c +++ /dev/null @@ -1,301 +0,0 @@ -/* zutil.c -- target dependent utility functions for the compression library - * Copyright (C) 1995-2017 Jean-loup Gailly - * For conditions of distribution and use, see copyright notice in zlib.h - */ - -/* @(#) $Id$ */ - -#include "../../../include/compress/zlib/zutil.h" -#ifndef Z_SOLO -# include "../../../include/compress/zlib/gzguts.h" -#endif - -#include "sys/memory.h" - -z_const char * const z_errmsg[10] = { - (z_const char *)"need dictionary", /* Z_NEED_DICT 2 */ - (z_const char *)"stream end", /* Z_STREAM_END 1 */ - (z_const char *)"", /* Z_OK 0 */ - (z_const char *)"file error", /* Z_ERRNO (-1) */ - (z_const char *)"stream error", /* Z_STREAM_ERROR (-2) */ - (z_const char *)"data error", /* Z_DATA_ERROR (-3) */ - (z_const char *)"insufficient memory", /* Z_MEM_ERROR (-4) */ - (z_const char *)"buffer error", /* Z_BUF_ERROR (-5) */ - (z_const char *)"incompatible version",/* Z_VERSION_ERROR (-6) */ - (z_const char *)"" -}; - - -const char * ZEXPORT zlibVersion(void) { - return ZLIB_VERSION; -} - -uLong ZEXPORT zlibCompileFlags(void) { - uLong flags; - - flags = 0; - switch ((int)(sizeof(uInt))) { - case 2: break; - case 4: flags += 1; break; - case 8: flags += 2; break; - default: flags += 3; - } - switch ((int)(sizeof(uLong))) { - case 2: break; - case 4: flags += 1 << 2; break; - case 8: flags += 2 << 2; break; - default: flags += 3 << 2; - } - switch ((int)(sizeof(voidpf))) { - case 2: break; - case 4: flags += 1 << 4; break; - case 8: flags += 2 << 4; break; - default: flags += 3 << 4; - } - switch ((int)(sizeof(z_off_t))) { - case 2: break; - case 4: flags += 1 << 6; break; - case 8: flags += 2 << 6; break; - default: flags += 3 << 6; - } -#ifdef ZLIB_DEBUG - flags += 1 << 8; -#endif - /* -#if defined(ASMV) || defined(ASMINF) - flags += 1 << 9; -#endif - */ -#ifdef ZLIB_WINAPI - flags += 1 << 10; -#endif -#ifdef BUILDFIXED - flags += 1 << 12; -#endif -#ifdef DYNAMIC_CRC_TABLE - flags += 1 << 13; -#endif -#ifdef NO_GZCOMPRESS - flags += 1L << 16; -#endif -#ifdef NO_GZIP - flags += 1L << 17; -#endif -#ifdef PKZIP_BUG_WORKAROUND - flags += 1L << 20; -#endif -#ifdef FASTEST - flags += 1L << 21; -#endif -#if defined(STDC) || defined(Z_HAVE_STDARG_H) -# ifdef NO_vsnprintf - flags += 1L << 25; -# ifdef HAS_vsprintf_void - flags += 1L << 26; -# endif -# else -# ifdef HAS_vsnprintf_void - flags += 1L << 26; -# endif -# endif -#else - flags += 1L << 24; -# ifdef NO_snprintf - flags += 1L << 25; -# ifdef HAS_sprintf_void - flags += 1L << 26; -# endif -# else -# ifdef HAS_snprintf_void - flags += 1L << 26; -# endif -# endif -#endif - return flags; -} - -#ifdef ZLIB_DEBUG -#include -# ifndef verbose -# define verbose 0 -# endif -int ZLIB_INTERNAL z_verbose = verbose; - -void ZLIB_INTERNAL z_error(char *m) { - fprintf(stderr, "%s\n", m); - exit(1); -} -#endif - -/* exported to allow conversion of error code to string for compress() and - * uncompress() - */ -const char * ZEXPORT zError(int err) { - return ERR_MSG(err); -} - -#if defined(_WIN32_WCE) && _WIN32_WCE < 0x800 - /* The older Microsoft C Run-Time Library for Windows CE doesn't have - * errno. We define it as a global variable to simplify porting. - * Its value is always 0 and should not be used. - */ - int errno = 0; -#endif - -#ifndef HAVE_MEMCPY - -void ZLIB_INTERNAL zmemcpy(Bytef* dest, const Bytef* source, uInt len) { - if (len == 0) return; - do { - *dest++ = *source++; /* ??? to be unrolled */ - } while (--len != 0); -} - -int ZLIB_INTERNAL zmemcmp(const Bytef* s1, const Bytef* s2, uInt len) { - uInt j; - - for (j = 0; j < len; j++) { - if (s1[j] != s2[j]) return 2*(s1[j] > s2[j])-1; - } - return 0; -} - -void ZLIB_INTERNAL zmemzero(Bytef* dest, uInt len) { - if (len == 0) return; - do { - *dest++ = 0; /* ??? to be unrolled */ - } while (--len != 0); -} -#endif - -#ifndef Z_SOLO - -#ifdef SYS16BIT - -#ifdef __TURBOC__ -/* Turbo C in 16-bit mode */ - -# define MY_ZCALLOC - -/* Turbo C malloc() does not allow dynamic allocation of 64K bytes - * and farmalloc(64K) returns a pointer with an offset of 8, so we - * must fix the pointer. Warning: the pointer must be put back to its - * original form in order to free it, use zcfree(). - */ - -#define MAX_PTR 10 -/* 10*64K = 640K */ - -local int next_ptr = 0; - -typedef struct ptr_table_s { - voidpf org_ptr; - voidpf new_ptr; -} ptr_table; - -local ptr_table table[MAX_PTR]; -/* This table is used to remember the original form of pointers - * to large buffers (64K). Such pointers are normalized with a zero offset. - * Since MSDOS is not a preemptive multitasking OS, this table is not - * protected from concurrent access. This hack doesn't work anyway on - * a protected system like OS/2. Use Microsoft C instead. - */ - -voidpf ZLIB_INTERNAL zcalloc(voidpf opaque, unsigned items, unsigned size) { - voidpf buf; - ulg bsize = (ulg)items*size; - - (void)opaque; - - /* If we allocate less than 65520 bytes, we assume that farmalloc - * will return a usable pointer which doesn't have to be normalized. - */ - if (bsize < 65520L) { - buf = farmalloc(bsize); - if (*(ush*)&buf != 0) return buf; - } else { - buf = farmalloc(bsize + 16L); - } - if (buf == NULL || next_ptr >= MAX_PTR) return NULL; - table[next_ptr].org_ptr = buf; - - /* Normalize the pointer to seg:0 */ - *((ush*)&buf+1) += ((ush)((uch*)buf-0) + 15) >> 4; - *(ush*)&buf = 0; - table[next_ptr++].new_ptr = buf; - return buf; -} - -void ZLIB_INTERNAL zcfree(voidpf opaque, voidpf ptr) { - int n; - - (void)opaque; - - if (*(ush*)&ptr != 0) { /* object < 64K */ - farfree(ptr); - return; - } - /* Find the original pointer */ - for (n = 0; n < next_ptr; n++) { - if (ptr != table[n].new_ptr) continue; - - farfree(table[n].org_ptr); - while (++n < next_ptr) { - table[n-1] = table[n]; - } - next_ptr--; - return; - } - Assert(0, "zcfree: ptr not found"); -} - -#endif /* __TURBOC__ */ - - -#ifdef M_I86 -/* Microsoft C in 16-bit mode */ - -# define MY_ZCALLOC - -#if (!defined(_MSC_VER) || (_MSC_VER <= 600)) -# define _halloc halloc -# define _hfree hfree -#endif - -voidpf ZLIB_INTERNAL zcalloc(voidpf opaque, uInt items, uInt size) { - (void)opaque; - return _halloc((long)items, size); -} - -void ZLIB_INTERNAL zcfree(voidpf opaque, voidpf ptr) { - (void)opaque; - _hfree(ptr); -} - -#endif /* M_I86 */ - -#endif /* SYS16BIT */ - - -#ifndef MY_ZCALLOC /* Any system without a special alloc function */ - -#ifndef STDC -extern voidp malloc(uInt size); -extern voidp calloc(uInt items, uInt size); -extern void free(voidpf ptr); -#endif - -voidpf ZLIB_INTERNAL zcalloc(voidpf opaque, unsigned items, unsigned size) { - (void)opaque; - return sizeof(uInt) > 2 ? (voidpf)malloc(items * size) : - (voidpf)calloc(items, size); -} - -void ZLIB_INTERNAL zcfree(voidpf opaque, voidpf ptr) { - (void)opaque; - free(ptr); -} - -#endif /* MY_ZCALLOC */ - -#endif /* !Z_SOLO */ diff --git a/kernel/src/debug/hexview.c b/kernel/src/debug/hexview.c index 02a5a634c..ef5bcccc2 100644 --- a/kernel/src/debug/hexview.c +++ b/kernel/src/debug/hexview.c @@ -1,15 +1,24 @@ #include "common.h" -// Prints a hexedecimal dump of memory. -void hexview_advanced(char* buffer, size_t length, size_t width, bool relative, void (*printer_func)(const char *, ...)) { - for(size_t i = 0; i < length; i += width) { +/** + * @brief Печатает дамп памяти + * @param buffer Место в памяти откуда нужно печать дамп + * @param length Длина куска памяти + * @param width Сколько байт нужно показать в одной строке + * @param relative Показывает относительный адрес если true иначе показывает абсолютный + * @param printer_func Функция для печати (должна поддерживать форматирование) + */ +void hexview_advanced(void *buffer, size_t length, size_t width, bool relative, void (*printer_func)(const char *, ...)) { + char* cbuf = (char*)buffer; + + for(size_t i = 0; i < length; i += width) { if(relative) printer_func("%08v: ", i); else - printer_func("%08v: ", buffer + i); + printer_func("%08v: ", cbuf + i); for(int j = 0; j < (length - i < width ? length - i : width); j++) { - printer_func("%02v ", ((char)*(buffer + i + j)) & 0xFF); + printer_func("%02v ", ((char)*(cbuf + i + j)) & 0xFF); } printer_func("\n"); diff --git a/kernel/src/debug/memmeter.c b/kernel/src/debug/memmeter.c new file mode 100644 index 000000000..0909dd363 --- /dev/null +++ b/kernel/src/debug/memmeter.c @@ -0,0 +1,24 @@ +#include "common.h" +#include "mem/vmm.h" +#include "io/ports.h" + +void memmeter(void (*function)()) { + size_t mem_before = system_heap.used_memory; + size_t mem_before_cnt = system_heap.allocated_count; + + function(); + + size_t mem_after = system_heap.used_memory; + size_t mem_after_cnt = system_heap.allocated_count; + + int delta = (int)mem_after - (int)mem_before; + + qemu_warn("Memory delta: %d bytes (%d objects)", + delta, mem_after_cnt - mem_before_cnt); + + if(delta > 0) { + qemu_err("Memory leak!"); + } else if(delta == 0) { + qemu_ok("No memory leak! :)"); + } +} diff --git a/kernel/src/desktop/eki.c b/kernel/src/desktop/eki.c new file mode 100644 index 000000000..eff32e8d5 --- /dev/null +++ b/kernel/src/desktop/eki.c @@ -0,0 +1,59 @@ +#include "desktop/render.h" +#include "desktop/widget_button.h" +#include "desktop/widget_image.h" +#include "desktop/widget_label.h" +#include "drv/disk/dpm.h" +#include "io/ports.h" +#include "../lib/libstring/include/string.h" + +extern DPM_Disk DPM_Disks[32]; + +void eki_on_close(Window_t* window); + +void eki_start() { + vector_t* eki_strings = vector_new(); + + Window_t* eki_mainwindow = window_new("Eki"); + eki_mainwindow->x = 100; + eki_mainwindow->y = 100; + eki_mainwindow->width = 200; + eki_mainwindow->height = 200; + eki_mainwindow->canvas_bgcolor = 0x333333; + eki_mainwindow->on_close = eki_on_close; + eki_mainwindow->data = eki_strings; + + int yoffset = 0; + + for (int i = 0; i < 32; i++) { + if (DPM_Disks[i].Ready) { + yoffset++; + + string_t* tempstr = string_new(); + string_append_char(tempstr, 'A' + i); + + vector_push_back(eki_strings, (size_t) tempstr); + + Widget_t* hello_button = new_widget_button(tempstr->data, 0x00ff00, 0x000000); + hello_button->x = 10; + hello_button->y = 10 + (yoffset * 20); + hello_button->width += 30; + hello_button->height += 15; + + window_add_widget(eki_mainwindow, hello_button); + } + } + + eki_mainwindow->state = DISPLAYING; +} + +void eki_on_close(Window_t* window) { + qemu_log("EKI close!"); + + vector_t* that_vec = (vector_t*)window->data; + + for(int i = 0; i < that_vec->size; i++) { + string_destroy((string_t*)vector_get(that_vec, i).element); + } + + vector_destroy(that_vec); +} \ No newline at end of file diff --git a/kernel/src/gui/parallel_desktop.c b/kernel/src/desktop/parallel_desktop.c similarity index 51% rename from kernel/src/gui/parallel_desktop.c rename to kernel/src/desktop/parallel_desktop.c index 1353524be..cb84d5d06 100644 --- a/kernel/src/gui/parallel_desktop.c +++ b/kernel/src/desktop/parallel_desktop.c @@ -1,9 +1,17 @@ -#include "gui/render.h" -#include "gui/widget_image.h" -#include "gui/widget_button.h" -#include "gui/widget_label.h" -#include "io/port_io.h" +#include "desktop/render.h" +#include "desktop/widget_button.h" +#include "desktop/widget_label.h" +#include "io/serial_port.h" #include "lib/stdlib.h" +#include "drv/cmos.h" +#include "drv/input/keyboard.h" +#include "io/ports.h" +#include "mem/vmm.h" +#include "lib/sprintf.h" +#include "desktop/widget_image.h" +#include "sys/scheduler.h" +#include "desktop/widget_progress.h" +#include "sys/timer.h" extern Window_t* focused; @@ -14,36 +22,82 @@ char membuf[16] = {0}; char label_for_memory[32] = {0}; char label_for_fps[8] = {0}; -void make_time() { +void make_time_string(char* out) { sayori_time_t time = get_time(); - + uint8_t h = time.hours; uint8_t m = time.minutes; uint8_t s = time.seconds; - if(h < 10) { - time_for_label[0] = '0'; - time_for_label[1] = ('0' + h); - }else{ - time_for_label[0] = '0' + (h / 10); - time_for_label[1] = '0' + (h % 10); - } + sprintf(out, "%02d:%02d:%02d", h, m, s); +} - if(m < 10) { - time_for_label[3] = '0'; - time_for_label[4] = ('0' + m); - }else{ - time_for_label[3] = '0' + (m / 10); - time_for_label[4] = '0' + (m % 10); - } +void shutdown_system_activity_real() { + Window_t* progwin = window_new("Shutting down..."); + + progwin->x = 20; + progwin->y = 20; + + progwin->width = 500; + progwin->height = 160; + + Widget_t* progress = new_widget_progress(); + + progress->x = 10; + progress->y = 10; + + progress->width = 400; + progress->height = 30; + + ((Widget_Progress_t*)progress->custom_widget_data)->current = 0; + + window_add_widget(progwin, progress); + + Widget_t* lab = new_widget_label("Getting ready to shutdown...", 10, 70, 0x00ffff); + + window_add_widget(progwin, lab); + + progwin->state = DISPLAYING; + + size_t tst = timestamp(); - if(s < 10) { - time_for_label[6] = '0'; - time_for_label[7] = ('0' + s); - }else{ - time_for_label[6] = '0' + (s / 10); - time_for_label[7] = '0' + (s % 10); + while(1) { +// if(timestamp() - tst > 100) { +// tst = timestamp(); +// +// ((Widget_Progress_t*)progress->custom_widget_data)->current++; +// } + if(timestamp() - tst > 11000) { + break; + } else if(timestamp() - tst > 9000) { + ((Widget_Progress_t *) progress->custom_widget_data)->current = 90; + ((Widget_Label_t*)lab->custom_widget_data)->label = "Destroying FS objects..."; + } else if(timestamp() - tst > 5000) { + ((Widget_Progress_t*)progress->custom_widget_data)->current = 50; + ((Widget_Label_t*)lab->custom_widget_data)->label = "Synchronizing data to disks..."; + } else if(timestamp() - tst > 3500) { + ((Widget_Progress_t*)progress->custom_widget_data)->current = 40; + ((Widget_Label_t*)lab->custom_widget_data)->label = "Flushing logs..."; + } else if(timestamp() - tst > 2500) { + ((Widget_Progress_t*)progress->custom_widget_data)->current = 20; + ((Widget_Label_t*)lab->custom_widget_data)->label = "Notifying services..."; + } else if(timestamp() - tst > 1000) { + ((Widget_Progress_t*)progress->custom_widget_data)->current = 10; + ((Widget_Label_t*)lab->custom_widget_data)->label = "Destroying FS objects..."; + } } + + shutdown(); +} + +void shutdown_system_activity() { + thread_create( + get_current_proc(), + shutdown_system_activity_real, + 512, + true, + false + ); } void parallel_desktop_start() { @@ -54,8 +108,6 @@ void parallel_desktop_start() { keyboardctl(KEYBOARD_ECHO, false); log_window_manager_state(); - - do_load_cursor_from_duke_image(); // ROOT WINDOW @@ -70,20 +122,14 @@ void parallel_desktop_start() { qemu_log("Root window! at %x", root_window); - Widget_t* wallpaper = new_widget_image("/var/Jump.duke"); - qemu_log("Widget Image Info: X: %d; Y: %d W: %d; H: %d", - wallpaper->x, - wallpaper->y, - wallpaper->width, - wallpaper->height - ); + Widget_t* wallpaper = new_widget_image("R:\\Sayori\\bg.tga"); window_add_widget(root_window, wallpaper); qemu_log("Wallpaper for it..."); // TASKBAR - Window_t* taskbar = window_new("titlebar"); + Window_t* taskbar = window_new("taskbar"); taskbar->x = 0; taskbar->height = 30; taskbar->y = getScreenHeight() - taskbar->height; @@ -99,7 +145,7 @@ void parallel_desktop_start() { qemu_log("Creating time label"); Widget_t* time_label = new_widget_label(time_for_label, - taskbar->width - 8 * strlen(time_for_label) - 8, + taskbar->width - 8 * 8 - 8, (taskbar->height - 16) / 2, 0x000000 ); @@ -149,6 +195,17 @@ void parallel_desktop_start() { window_add_widget(window, hello_button); + Widget_t* sh_btn = new_widget_button("Shutdown system", 0xff0000, 0x000000); + sh_btn->x = 50; + sh_btn->y = 80; + sh_btn->width += 20; + sh_btn->height += 15; + sh_btn->on_click = shutdown_system_activity; + + qemu_log("Button for it..."); + + window_add_widget(window, sh_btn); + root_window->state = DISPLAYING; taskbar->state = DISPLAYING; window->state = DISPLAYING; @@ -160,20 +217,16 @@ void parallel_desktop_start() { gui_restore(); break; } - make_time(); + + make_time_string(time_for_label); gui_render(); - itoa(memory_get_used_kernel()/1024, membuf); - strcpy(label_for_memory, membuf); - strcat(label_for_memory, " kBytes used"); + sprintf(label_for_memory, "%d kB used", system_heap.used_memory / 1024); frames++; if(get_time().seconds != seconds_old) { - memset(membuf, 0, 16); - - itoa(frames, membuf); - strcpy(label_for_fps, membuf); - strcat(label_for_fps, " FPS"); + sprintf(label_for_fps, "%d FPS", frames); + frames = 0; seconds_old = get_time().seconds; } @@ -192,7 +245,8 @@ void parallel_desktop_start() { qemu_log("Exit successfully!!!"); - print_allocated_map(); + clean_tty_screen(); + tty_printf("Memory allocation info written to COM1 (debug) port!!!"); log_window_manager_state(); diff --git a/kernel/src/gui/render.c b/kernel/src/desktop/render.c similarity index 66% rename from kernel/src/gui/render.c rename to kernel/src/desktop/render.c index f87f9e783..037a6712f 100644 --- a/kernel/src/gui/render.c +++ b/kernel/src/desktop/render.c @@ -1,12 +1,15 @@ -#include "gui/window.h" #include "gui/basics.h" -#include "gui/render.h" #include "gui/pointutils.h" +#include "desktop/window.h" +#include "desktop/render.h" +#include "drv/psf.h" +#include "io/ports.h" +#include +#include "drv/input/mouse.h" // getConfigFonts(2) - is height of current font Window_t* active_window = 0; // Window that should be placed over all windows (selected window) -Window_t** current_windows = 0; bool dragging_mode = false; bool click = false; @@ -17,34 +20,12 @@ uint32_t dragy = 0; void* cursor_data = 0; size_t cursor_width = 0, cursor_height = 0; -DukeHeader_t cursor_meta; bool cursor_ok = false; Window_t* focused = 0; char* cursor_default_path = "/var/cursor_normal.duke"; -void do_load_cursor_from_duke_image() { - qemu_log("DUKE2CURSOR: Loading cursor from %s", cursor_default_path); - - if(cursor_ok) return; // Do not reallocate memory second time. - - char error = duke_get_image_metadata(cursor_default_path, &cursor_meta); - if(error) { - qemu_log("DUKE2CURSOR: Failed to load: %s", cursor_default_path); - return; - } - - cursor_data = kmalloc(cursor_meta.data_length); - if(!cursor_data) { - qemu_log("DUKE2CURSOR: Failed to allocate %d bytes for DUKE image container!", cursor_meta.data_length); - return; - } - - duke_get_image_data(cursor_default_path, cursor_meta, cursor_data); - cursor_ok = true; -} - void gui_restore() { if(cursor_ok) { qemu_log("DUKE2CURSOR: Freeing cursor..."); @@ -59,37 +40,8 @@ void gui_restore() { } void gui_render_widgets(Window_t* window) { - Widget_t** widgets = window->widgets; - - // qemu_log("Widget list: %x", widgets); - // qemu_log("Widget count: %d", window->widget_count); - - /* - for (size_t i = 0; i < window->widget_count; i++) { - // Create copy of Widget and correct to 'stick' to window! - Widget_t* wgt = widgets[i]; - // qemu_log("Widget original: %x", wgt); - - Widget_t* window_linked_wgt = kcalloc(1, sizeof(Widget_t)); // Fails with kcalloc!!! - // qemu_log("Widget copy: %x", window_linked_wgt); - - memcpy(window_linked_wgt, wgt, sizeof(Widget_t)); - // qemu_log("Copied"); - - window_linked_wgt->x += window->x; - window_linked_wgt->y += window->y; - - // qemu_log("Rendering"); - - window_linked_wgt->renderer(window_linked_wgt, window); - - kfree(window_linked_wgt); - } - */ - - // /* - for (size_t i = 0; i < window->widget_count; i++) { - Widget_t* wgt = widgets[i]; + for (size_t i = 0; i < window->widgets->size; i++) { + Widget_t* wgt = (Widget_t *) window->widgets->data[i]; wgt->x += window->x; wgt->y += window->y; @@ -99,7 +51,6 @@ void gui_render_widgets(Window_t* window) { wgt->x -= window->x; wgt->y -= window->y; } - // */ } void gui_render_window(Window_t* window) { @@ -137,9 +88,9 @@ void gui_render_window(Window_t* window) { gui_render_widgets(window); } -Window_t* is_point_on_any_window_titlebar(ssize_t x, ssize_t y) { +Window_t* is_point_on_any_window_titlebar(size_t x, size_t y) { for (size_t i = 0; i < get_window_count(); i++) { - struct Window* window = current_windows[i]; + struct Window* window = WINDOW(i); if(window->with_title_bar && point_in_rect( x, @@ -149,7 +100,7 @@ Window_t* is_point_on_any_window_titlebar(ssize_t x, ssize_t y) { window->width, WINDOW_TITLEBAR_HEIGHT )) { - return current_windows[i]; + return WINDOW(i); } } return 0; @@ -161,13 +112,13 @@ Window_t* is_point_on_any_window(ssize_t x, ssize_t y) { if(point_in_rect( x, y, - current_windows[i]->x, - current_windows[i]->y, - current_windows[i]->width, - current_windows[i]->height + WINDOW(i)->x, + WINDOW(i)->y, + WINDOW(i)->width, + WINDOW(i)->height )) { // qemu_log("It's: %d", current_windows[i]->id); - return current_windows[i]; + return WINDOW(i); } } return 0; @@ -175,7 +126,7 @@ Window_t* is_point_on_any_window(ssize_t x, ssize_t y) { size_t get_window_index(Window_t* win) { for(size_t i = 0, wnds = get_window_count(); i < wnds; i++){ - if(get_window_list()[i] == win) { + if(WINDOW(i) == win) { return i; } } @@ -200,7 +151,7 @@ void gui_handle_mouse() { if(left_mouse) { Window_t* tmp = is_point_on_any_window_titlebar(mouse_x, mouse_y); - if((tmp != 0) && tmp->with_title_bar) { + if(tmp && tmp->with_title_bar) { if(point_in_rect( mouse_x, mouse_y, @@ -209,6 +160,9 @@ void gui_handle_mouse() { WINDOW_TITLEBAR_HEIGHT + 2, WINDOW_TITLEBAR_HEIGHT - 4 ) && !dragging_mode) { + if(tmp->on_close) + tmp->on_close(tmp); + window_destroy(tmp); return; }else if(!dragging_mode){ @@ -222,8 +176,10 @@ void gui_handle_mouse() { size_t mw = get_window_index(focused); if(sw < mw) { - get_window_list()[sw] = focused; - get_window_list()[mw] = tmp; +// WINDOW(sw) = focused; +// WINDOW(mw) = tmp; + + vector_swap(windows, sw, mw); } focused = tmp; @@ -256,25 +212,20 @@ void gui_handle_mouse() { click = false; } - if(cursor_ok) { - duke_rawdraw(cursor_data, &cursor_meta, mouse_x, mouse_y); - }else{ - draw_filled_rectangle(mouse_x, mouse_y, 8, 8, mouse_color); - } + draw_filled_rectangle(mouse_x, mouse_y, 8, 8, mouse_color); } -void gui_render_windows(Window_t** current_windows) { +void gui_render_windows(vector_t* current_windows) { + for(size_t i = 0, wnds = get_window_count(); i < wnds; i++){ - // qemu_log("Window %d: W: %d; H: %d", i, current_windows[i]->width, current_windows[i]->height); - gui_render_window(current_windows[i]); +// qemu_warn("Rendering %x", WINDOW(i)); + gui_render_window(WINDOW(i)); } } // Return exit status void gui_render() { - current_windows = get_window_list(); - - if(current_windows == 0) { + if(windows == 0) { draw_filled_rectangle(0, 0, getScreenWidth(), getScreenHeight(), 0x666666); draw_vga_str("No windows in the system.", 25, (getScreenWidth() - 25 * 8) / 2, (getScreenHeight() - 8) / 2, 0); punch(); @@ -284,7 +235,7 @@ void gui_render() { // qemu_log("Reached render step"); // qemu_log("Window count: %d", get_window_count()); - gui_render_windows(current_windows); + gui_render_windows(windows); gui_handle_mouse(); punch(); diff --git a/kernel/src/gui/widget.c b/kernel/src/desktop/widget.c similarity index 90% rename from kernel/src/gui/widget.c rename to kernel/src/desktop/widget.c index d12577e15..8d4144a8f 100644 --- a/kernel/src/gui/widget.c +++ b/kernel/src/desktop/widget.c @@ -1,6 +1,7 @@ -#include -#include "gui/widget.h" -#include "io/port_io.h" +#include "desktop/widget.h" +#include "io/serial_port.h" +#include "mem/vmm.h" +#include "io/ports.h" Widget_t* new_bare_widget(renderer_func_t renderer, destroyer_func_t destroyer, size_t x, size_t y, size_t width, size_t height) { Widget_t* wgt = kcalloc(sizeof(Widget_t), 1); @@ -20,6 +21,7 @@ void destroy_widget(Widget_t* widget) { qemu_log("Destroying widget at %x: W: %d; H: %d", widget, widget->width, widget->height); widget->destroyer(widget); kfree(widget); + qemu_ok("Destroyed widget"); } void widget_notify(struct Window* window, struct Widget* widget, WidgetNotifyCode_t code, void* data) { diff --git a/kernel/src/gui/widget_button.c b/kernel/src/desktop/widget_button.c similarity index 95% rename from kernel/src/gui/widget_button.c rename to kernel/src/desktop/widget_button.c index 2441957ec..49cd91cf2 100644 --- a/kernel/src/gui/widget_button.c +++ b/kernel/src/desktop/widget_button.c @@ -1,8 +1,8 @@ #include -#include "gui/widget.h" -#include "gui/widget_button.h" +#include "desktop/widget.h" +#include "desktop/widget_button.h" #include "gui/basics.h" -#include "io/port_io.h" +#include "io/serial_port.h" void destroy_widget_button(Widget_t* widget); diff --git a/kernel/src/desktop/widget_image.c b/kernel/src/desktop/widget_image.c new file mode 100644 index 000000000..cfb926751 --- /dev/null +++ b/kernel/src/desktop/widget_image.c @@ -0,0 +1,73 @@ +#include +#include "desktop/widget.h" +#include "desktop/widget_image.h" +#include "fmt/tga.h" +#include "io/serial_port.h" +#include "io/rgb_image.h" +#include "sys/pixfmt.h" + +void destroy_widget_image(Widget_t* widget); + +void widget_image_renderer(struct Widget* this, struct Window* window) { + Widget_Image_t* this_data = (Widget_Image_t*)(this->custom_widget_data); + + if(this_data->image_data == NULL) + return; + + size_t real_width = this_data->meta.h; + size_t real_height = this_data->meta.w; + + draw_rgb_image(this_data->image_data, real_width, real_height, 32, this->x, this->y); +// drawRect(this->x, this->y, real_width, real_height, 0xff0000); +} + +Widget_t* new_widget_image(const char *path) { + Widget_t* wgt = new_bare_widget( + &widget_image_renderer, + &destroy_widget_image, + 0, 0, + 0, 0 + ); + + tga_header_t hdr; + + bool ok = tga_extract_info(path, &hdr); + + wgt->custom_widget_data = kcalloc(sizeof(Widget_Image_t), 1); + Widget_Image_t* wgt_data = (Widget_Image_t*)wgt->custom_widget_data; + + if(!ok) { + wgt_data->loaded = false; + + return wgt; + } + + wgt_data->path = path; + wgt_data->display_mode = NORMAL; + wgt_data->meta = hdr; + + wgt->width = hdr.w; + wgt->height = hdr.h; + + void* buffer_image = kcalloc(hdr.w * hdr.h, 4); + wgt_data->image_data = buffer_image; + + tga_extract_pixels(path, buffer_image); + + pixfmt_conv(buffer_image, 32, hdr.h, hdr.w, SCREEN_BGR, SCREEN_RGB); + +// hexview_advanced(buffer_image, 512, 24, true, new_qemu_printf); + + qemu_ok("Loaded successfully!"); + + return wgt; +} + +void destroy_widget_image(Widget_t* widget) { + Widget_Image_t* wgt_data = (Widget_Image_t*)(widget->custom_widget_data); + + kfree(wgt_data->image_data); + kfree(widget->custom_widget_data); + + qemu_ok("Destroyed image widget"); +} diff --git a/kernel/src/gui/widget_label.c b/kernel/src/desktop/widget_label.c similarity index 71% rename from kernel/src/gui/widget_label.c rename to kernel/src/desktop/widget_label.c index a9048a1d7..e13833017 100644 --- a/kernel/src/gui/widget_label.c +++ b/kernel/src/desktop/widget_label.c @@ -1,8 +1,10 @@ -#include -#include "gui/widget.h" -#include "gui/widget_label.h" +#include "desktop/widget.h" +#include "desktop/widget_label.h" #include "gui/basics.h" -#include "io/port_io.h" +#include "lib/string.h" +#include "drv/psf.h" +#include "io/ports.h" +#include "mem/vmm.h" void widget_label_renderer(struct Widget* this, __attribute__((unused)) struct Window* container) { Widget_Label_t* this_object = (Widget_Label_t*)(this->custom_widget_data); @@ -10,11 +12,14 @@ void widget_label_renderer(struct Widget* this, __attribute__((unused)) struct W // uint32_t color = getColorFont(); // setColorFont(this_object->color); - draw_vga_str(this_object->label, strlen(this_object->label), this->x, this->y, this_object->color); + draw_vga_str(this_object->label, +// this_object->length, + strlen(this_object->label), + this->x, this->y, this_object->color); // setColorFont(color); } -Widget_t* new_widget_label(char* label, ssize_t x, ssize_t y, uint32_t color) { +Widget_t* new_widget_label(const char *label, ssize_t x, ssize_t y, uint32_t color) { Widget_t* wgt = new_bare_widget( &widget_label_renderer, &destroy_widget_label, @@ -30,6 +35,7 @@ Widget_t* new_widget_label(char* label, ssize_t x, ssize_t y, uint32_t color) { Widget_Label_t* wgt_data = (Widget_Label_t*)wgt->custom_widget_data; wgt_data->label = label; wgt_data->color = color; + wgt_data->length = strlen(label); qemu_log("Okay?"); diff --git a/kernel/src/desktop/widget_progress.c b/kernel/src/desktop/widget_progress.c new file mode 100644 index 000000000..2ea2b3804 --- /dev/null +++ b/kernel/src/desktop/widget_progress.c @@ -0,0 +1,42 @@ +#include "desktop/widget.h" +#include "desktop/widget_progress.h" +#include "gui/basics.h" +#include "lib/string.h" +#include "drv/psf.h" +#include "io/ports.h" +#include "mem/vmm.h" + +void widget_progress_renderer(struct Widget* this, __attribute__((unused)) struct Window* container) { + Widget_Progress_t* this_object = (Widget_Progress_t*)(this->custom_widget_data); + + size_t cost = this->width / 100; + + if(((Widget_Progress_t*)this->custom_widget_data)->current > 100) { + ((Widget_Progress_t*)this->custom_widget_data)->current = 100; + } + + draw_rectangle(this->x, this->y, this->width, this->height, 0x000000); + draw_filled_rectangle( + this->x + 2, + this->y + 2, + (cost * ((Widget_Progress_t*)this->custom_widget_data)->current), + this->height - 4, + 0xffffff); +} + +Widget_t* new_widget_progress() { + Widget_t* wgt = new_bare_widget( + &widget_progress_renderer, + &destroy_widget_progress, + 0, 0, + 1, 1 + ); + + wgt->custom_widget_data = kcalloc(sizeof(Widget_Progress_t), 1); + + return wgt; +} + +void destroy_widget_progress(Widget_t* widget) { + kfree(widget->custom_widget_data); +} diff --git a/kernel/src/gui/window.c b/kernel/src/desktop/window.c similarity index 57% rename from kernel/src/gui/window.c rename to kernel/src/desktop/window.c index d28ec8ef5..12b4568d5 100644 --- a/kernel/src/gui/window.c +++ b/kernel/src/desktop/window.c @@ -1,13 +1,17 @@ -#include -#include "gui/window.h" -#include "gui/render.h" +#include "desktop/window.h" +#include "desktop/render.h" +#include "io/ports.h" +#include "mem/vmm.h" +#include "../lib/libvector/include/vector.h" size_t window_global_id = 0; size_t window_count = 0; -Window_t** windows = 0; + +vector_t* windows = 0; Window_t* _window_new(char* title) { Window_t* win = kcalloc(1, sizeof(Window_t)); + win->id = window_global_id++; win->width = 10; win->height = 10; @@ -19,13 +23,14 @@ Window_t* _window_new(char* title) { win->minimizable = true; win->with_title_bar = true; win->canvas_bgcolor = WINDOW_CANVAS_COLOR; - win->widget_count = 0; - win->widgets = 0; + win->widgets = vector_new(); + qemu_log("Bare window create ok"); + return win; } -Window_t** get_window_list() { +vector_t * get_window_list() { return windows; } @@ -34,32 +39,19 @@ size_t get_window_count() { } void window_add_widget(Window_t* window, Widget_t* widget) { - qemu_log("Widget count start: %d", window->widget_count); - - if(!window->widgets) { - window->widgets = kcalloc(sizeof(Widget_t*), 1); - }else{ - window->widgets = krealloc(window->widgets, sizeof(Widget_t*) * (window->widget_count + 1)); - } + qemu_log("Widget count start: %d", window->widgets->size); - window->widgets[window->widget_count] = widget; - window->widget_count++; + vector_push_back(window->widgets, (size_t) widget); - qemu_log("Widget count end: %d", window->widget_count); + qemu_log("Widget count end: %d", window->widgets->size); qemu_log("Added widget %x to window %x", widget, window); } void window_remove_widget(Window_t* window, Widget_t* widget) { - for (size_t i = 0; i < window->widget_count; i++) { - if(window->widgets[i] != 0) { - if(window->widgets[i] == widget) { - window->widget_count--; - - while(i < window->widget_count) { - qemu_log("WIDGET ARRAY SHIFT: %x (POS: %d) = %x (POS: %d)", windows[i], i, windows[i+1], i+1); - window->widgets[i] = window->widgets[i+1]; - i++; - } + for (size_t i = 0; i < window->widgets->size; i++) { + if(window->widgets->data[i]) { + if((Widget_t*)window->widgets->data[i] == widget) { + vector_erase_nth(window->widgets, i); } } } @@ -68,56 +60,41 @@ void window_remove_widget(Window_t* window, Widget_t* widget) { void _window_add_to_list(Window_t* window) { if(!windows) { qemu_log("First time creating windows array!!!"); - windows = kcalloc(sizeof(Window_t*), 1); - }else{ - qemu_log("Expanding windows array to %d elements", window_count+1); - windows = krealloc(windows, sizeof(Window_t*) * (window_count+1)); + windows = vector_new(); } - windows[window_count++] = window; - // window_count++; + qemu_log("Expanding windows array to %d elements", window_count + 1); + vector_push_back(windows, (size_t) window); + + window_count++; } void _window_remove_from_list(Window_t* window) { qemu_log("Window count: %d", window_count); qemu_log("Removing window with id: %d; Address: %x", window->id, window); for (size_t i = 0; i < window_count; i++) { - if(windows[i]) { - if(windows[i]->id == window->id) { + if(WINDOW(i)) { + if(WINDOW(i)->id == window->id) { qemu_log("Found that window at index: %d.", i); - // TODO: Remove all widgets before freeing. - qemu_log("Total widgets in window: %d", window->widget_count); - for (size_t j = 0; j < window->widget_count; j++) { + qemu_log("Total widgets in window: %d", window->widgets->size); + for (size_t j = 0; j < window->widgets->size; j++) { qemu_log("|- Removing widget: %x", window->widgets[j]); - qemu_log("|--- Destroyer at: %x", window->widgets[j]->destroyer); - //window->widgets[j]->destroyer(window->widgets[j]); - destroy_widget(window->widgets[j]); + qemu_log("|--- Destroyer at: %x", ((Widget_t *)(window->widgets->data[j]))->destroyer); + destroy_widget((Widget_t *) window->widgets->data[j]); } - kfree(window->widgets); - - qemu_log("Shifting array"); + vector_destroy(window->widgets); window_count--; qemu_log("Now, %d windows in the system", window_count); - // while(windows[i+1] != 0) { - while(i < window_count) { - qemu_log("%x (POS: %d) = %x (POS: %d)", windows[i], i, windows[i+1], i+1); - windows[i] = windows[i+1]; - i++; - } - // windows[i+1] = 0; - if(window_count > 0) { - qemu_log("Shrinking windows array to %d elements", window_count); - windows = krealloc(windows, sizeof(Window_t*) * (window_count)); - }else{ + vector_erase_nth(windows, i); + + if(window_count == 0) { qemu_log("ZEROING WINDOWS ARRAY"); - kfree(windows); - windows = 0; + vector_destroy(windows); } qemu_log("Ok!!!"); - window_global_id--; break; } } @@ -134,14 +111,40 @@ Window_t* window_new(char* title) { return instance; } +// Returns true if window in list false otherwise +bool window_is_in_list(Window_t* win) { + for(size_t i = 0; i < windows->size; i++) { + if (WINDOW(i) == win) { + return true; + } + } + + return false; +} + void window_destroy(Window_t* win) { - qemu_log("Reached window_destroy()"); + qemu_log(" ========> Reached window_destroy()"); + if(!windows) { + qemu_err("No array!"); + return; + } if(!win) { qemu_log("Window address is 0, not destroying it"); return; } + + if(!window_is_in_list(win)) { + qemu_warn("Window not in window list so, please destroy it manually!"); + return; + } + if(win->state != NOT_INITIALIZED) { + if(win->on_close) + win->on_close(win); + _window_remove_from_list(win); // Reallocate is here + } else { + qemu_warn("Window is not initialized, not destroying it"); } qemu_log("Freeing all its data at: %x", win); @@ -152,11 +155,13 @@ void window_destroy(Window_t* win) { } void destroy_all_windows() { - qemu_log("DESTROYING ALL WINDOWS KNOWN TO WINDOW MANAGER!!!"); + qemu_warn("DESTROYING ALL WINDOWS KNOWN TO WINDOW MANAGER!!!"); while(window_count > 0) { qemu_log("%d windows remaining...", window_count); - window_destroy(windows[window_count-1]); + window_destroy(WINDOW(window_count - 1)); } + + windows = 0; qemu_log("DESTROYED ALL WINDOWS!"); } @@ -180,10 +185,10 @@ void window_send_signal(Window_t* window, WindowSignal_t signal, void* data) { coords->y -= window->y; qemu_log("Click on: X: %d; Y: %d", coords->x, coords->y); - qemu_log("Widget count: %d", window->widget_count); + qemu_log("Widget count: %d", window->widgets->size); - for (size_t i = 0; i < window->widget_count; i++) { - Widget_t* wgt = window->widgets[i]; + for (size_t i = 0; i < window->widgets->size; i++) { + Widget_t* wgt = (Widget_t *) window->widgets->data[i]; // qemu_log("Getting over widget: at %x", wgt); // qemu_log("X: %d; Y: %d; W: %d; H: %d;", wgt->x, wgt->y, wgt->width, wgt->height); @@ -214,14 +219,14 @@ void log_window_manager_state() { qemu_log("===============[WINDOW MANAGER STATE]==================="); qemu_log("Window next global ID to be specified to next window: %d", window_global_id); qemu_log("Window count: %d", window_count); - qemu_log("Address of windows array: %d", windows); + qemu_log("Address of windows array: %x", windows); for(size_t i = 0; i < window_count; i++) { - qemu_log("Window #%d (%x): ID: %d", i, windows[i], windows[i]->id); - if(windows[i] != 0) { + qemu_log("Window #%d (%x): ID: %d", i, windows[i], WINDOW(i)->id); + if(WINDOW(i) != 0) { qemu_log("Widgets:"); - for (size_t j = 0; j < windows[i]->widget_count; j++) { - qemu_log("|- Widget #%d: at %x", j, windows[i]->widgets[j]); + for (size_t j = 0; j < WINDOW(i)->widgets->size; j++) { + qemu_log("|- Widget #%d: at %x", j, WINDOW(i)->widgets[j]); } } diff --git a/kernel/src/drv/ata_dma.c b/kernel/src/drv/ata_dma.c deleted file mode 100644 index f20eabf62..000000000 --- a/kernel/src/drv/ata_dma.c +++ /dev/null @@ -1,127 +0,0 @@ -#include - -#define ATA_PCI_VEN 0x8086 -#define ATA_PCI_DEV 0x7010 - -#define ATA_DMA_READ 0xC8 -#define ATA_DMA_WRITE 0xCA - -uint8_t ata_busnum; -uint8_t ata_slot; -uint8_t ata_func; - -uint16_t ata_dma_bar4; - -typedef struct prdt { - uint32_t buffer_phys; - uint16_t transfer_size; - uint16_t mark_end; -}__attribute__((packed)) prdt_t; - -void ata_dma_init() { - pci_find_device(ATA_PCI_VEN, ATA_PCI_DEV, &ata_busnum, &ata_slot, &ata_func); - - uint16_t devnum = pci_get_device(ata_busnum, ata_slot, ata_func); - - qemu_log("ATA DMA ID: %d (%x)", devnum, devnum); - - if(devnum == PCI_VENDOR_NO_DEVICE) { - qemu_log("ATA DMA not found!"); - return; - }else{ - qemu_log("Detected ATA DMA"); - } - - qemu_log("Enabling Busmastering"); - - uint16_t command_register = pci_read_confspc_word(ata_busnum, ata_slot, ata_func, 4); - command_register |= 0x05; - pci_write(ata_busnum, ata_slot, ata_func, 4, command_register); - - qemu_log("Enabled Busmastering!!!"); - - ata_dma_bar4 = pci_read_confspc_word(ata_busnum, ata_slot, ata_func, 0x20); - - ata_dma_bar4--; - - qemu_log("ATA DMA: BAR4: %x (%d)", ata_dma_bar4, ata_dma_bar4); -} - -prdt_t* ata_dma_allocate_prdt() { - return kcalloc(1, sizeof(prdt_t)); -} - -void ata_dma_set_prdt_entry(prdt_t* prdt, uint16_t index, uint32_t address, uint16_t byte_count, bool is_last) { - prdt[index].buffer_phys = address; - prdt[index].transfer_size = byte_count; - prdt[index].mark_end = is_last ? (0x8000) : (0x0000); -} - -void ata_dma_test() { - // SETUP PRDT - - prdt_t* prdt = kmalloc_common(sizeof(prdt_t), true); - memset(prdt, 0, sizeof(prdt_t)); - - size_t phys_prdt = virt2phys(get_kernel_dir(), prdt); - - qemu_log("PRDT: V%x => P%x", prdt, phys_prdt); - - // SETUP BUFFER - - size_t buf = kmalloc_common(PAGE_SIZE, true); - memset(buf, 0, PAGE_SIZE); - - size_t phys_buf = virt2phys(get_kernel_dir(), buf); - - qemu_log("Buffer: V%x => P%x", buf, phys_buf); - - ata_dma_set_prdt_entry(prdt, 0, phys_buf, PAGE_SIZE, true); - - qemu_log("Address (physical): %x", prdt[0].buffer_phys); - qemu_log("Size of transfer (bytes): %d", prdt[0].transfer_size); - qemu_log("Last: %s", prdt[0].mark_end ? "yes" : "no"); - - outl(ata_dma_bar4, 0); - - outl(ata_dma_bar4 + ATA_DMA_PRIMARY_PRDT, phys_prdt); - // outb(ATA_PRIMARY_IO + ATA_REG_HDDEVSEL, (0xe0 | (0 & 0x0f000000) >> 24)); - ide_select_drive(ATA_PRIMARY, ATA_MASTER); - - outb(ATA_PRIMARY_IO + ATA_REG_SECCOUNT0, 1); - - outb(ATA_PRIMARY_IO + ATA_REG_LBA0, 0); - outb(ATA_PRIMARY_IO + ATA_REG_LBA1, 0); - outb(ATA_PRIMARY_IO + ATA_REG_LBA2, 0); - - outb(ATA_PRIMARY_IO + ATA_REG_COMMAND, ATA_CMD_READ_DMA); - - outl(ata_dma_bar4, 0x8 | 0x1); - - while (1) { - int status = inb(ata_dma_bar4 + ATA_DMA_PRIMARY_STATUS); - int dstatus = inb(ATA_PRIMARY_IO + ATA_REG_STATUS); - - qemu_log("Status: %x; Dstatus: %x", status, dstatus); - - if (!(status & 0x04)) { - continue; - } - - if (!(dstatus & 0x80)) { - break; - } - } - - qemu_log("=============="); - qemu_log("Buffer: %s", buf); - - hexview_advanced(buf, 512, 16, true, new_qemu_printf); - - qemu_log("Ok?"); - - - - kfree(buf); - kfree(prdt); -} \ No newline at end of file diff --git a/kernel/src/drv/audio/ac97.c b/kernel/src/drv/audio/ac97.c index 49d082f77..4cc344e2c 100644 --- a/kernel/src/drv/audio/ac97.c +++ b/kernel/src/drv/audio/ac97.c @@ -1,64 +1,105 @@ // AC'97 driver by NDRAEY (Drew Pavlenko >_) -// FIXME: Partially works in VirtualBox, fully in QEMU -// FIXME: Per-frame lags! 180 ms! +// FIXME: Not working in VirtualBox, only in QEMU -#include -#include -#include -#include #include +#include +#include +#include "io/ports.h" +#include "drv/pci.h" +#include "mem/pmm.h" +#include "lib/stdio.h" +#include "mem/vmm.h" uint8_t ac97_busnum, ac97_slot, ac97_func; bool ac97_initialized = false; bool ac97_varibale_sample_rate = false; +uint16_t native_audio_mixer = 0; +uint16_t native_audio_bus_master = 0; + uint8_t ac97_bar0_type = 0; uint8_t ac97_bar1_type = 0; -size_t* physpages_ac97 = 0; size_t currently_pages_count = 0; uint32_t current_sample_rate = 44100; +__attribute__((aligned(PAGE_SIZE))) AC97_BDL_t ac97_buffer[32]; + +char* ac97_audio_buffer = 0; +size_t ac97_audio_buffer_phys; + // Volume in dB, not % (max 64) void ac97_set_master_volume(uint8_t left, uint8_t right, bool mute) { - uint16_t value = (right & 63) - | ((left & 63) << 8) - | ((mute) << 15); - - outs(native_audio_mixer + NAM_SET_MASTER_VOLUME, value); + const uint16_t value = (right & 63) << 0 + | (left & 63) << 8 + | (uint8_t)mute << 15; + outw(native_audio_mixer + NAM_SET_MASTER_VOLUME, value); } // Volume in dB, not % (max 32) void ac97_set_pcm_volume(uint8_t right, uint8_t left, bool mute) { - uint16_t value = (right & 31) - | ((left & 31) << 8) - | ((mute) << 15); - - outs(native_audio_mixer + NAM_SET_PCM_VOLUME, value); + uint16_t value = (right & 31) << 0 + | (left & 31) << 8 + | (mute?1:0) << 15; + outw(native_audio_mixer + NAM_SET_PCM_VOLUME, value); } -void ac97_set_pcm_sample_rate(uint32_t sample_rate) { +void ac97_set_pcm_sample_rate(uint16_t sample_rate) { if(!ac97_varibale_sample_rate - || (sample_rate > AC97_MAX_RATE - || sample_rate < AC97_MIN_RATE) - ) return; + || sample_rate > AC97_MAX_RATE + || sample_rate < AC97_MIN_RATE) + return; - outs(native_audio_mixer + NAM_SAMPLE_RATE, sample_rate); + outw(native_audio_mixer + NAM_SAMPLE_RATE, sample_rate); +// outs(native_audio_mixer + 0x2E, sample_rate); +// outs(native_audio_mixer + 0x30, sample_rate); } +//void ac97_load_data(char* data, uint32_t length) { +// size_t samples = 0xfffe; +// size_t i; +// size_t times = MIN(31, length/samples); +// +// for (i = 0; i < times; i++) { +// ac97_buffer[i].memory_pos = data + (i * samples); +// ac97_buffer[i].sample_count = samples; +// } +// ac97_buffer[i-1].flags = 1 << 14; // 14 bit - last entry of buffer, stop playing +//} + void ac97_reset_channel() { outb(native_audio_bus_master + 0x1b, inb(native_audio_bus_master + 0x1B) | 0x02); } +void ac97_clear_status_register() { + outb(native_audio_bus_master + 0x16, 0x1C); +} + +void _ac97_update_bdl(uint32_t address) { + outl(native_audio_bus_master + NABM_PCM_OUT, address); // BDL Address register +} + +void ac97_update_bdl() { + _ac97_update_bdl((uint32_t) ac97_buffer); +} + +void ac97_update_lvi(uint8_t index) { + outb(native_audio_bus_master + NABM_PCM_OUT + 0x05, index); +} + +void ac97_set_play_sound(bool play) { +// outb(native_audio_bus_master + 0x1b, inb(native_audio_bus_master + 0x1B) | (uint8_t)play); + outb(native_audio_bus_master + 0x1b, (uint8_t)play); +} + void ac97_init() { // Find device - pci_find_device(AC97_VENDOR, AC97_DEVICE, - &ac97_busnum, &ac97_slot, &ac97_func); + pci_find_device(AC97_VENDOR, AC97_DEVICE, &ac97_busnum, &ac97_slot, &ac97_func); - uint16_t devnum = pci_get_device(ac97_busnum, ac97_slot, ac97_func); + const uint16_t devnum = pci_get_device(ac97_busnum, ac97_slot, ac97_func); qemu_log("AC'97 ID: %d (%x)", devnum, devnum); @@ -88,37 +129,30 @@ void ac97_init() { native_audio_mixer--; native_audio_bus_master--; + // uint8_t hdrtype = pci_get_hdr_type(ac97_busnum, ac97_slot, ac97_func); + // native_audio_mixer = pci_get_bar(hdrtype, ac97_busnum, ac97_slot, ac97_func, 0, ac97_bar0_type); // BAR0 + // native_audio_bus_master = pci_get_bar(hdrtype, ac97_busnum, ac97_slot, ac97_func, 1, ac97_bar1_type); // BAR1 + qemu_log("NAM: %x; NABM: %x", native_audio_mixer, native_audio_bus_master); - uint16_t extended_id = ins(native_audio_mixer + NAM_EXTENDED_ID); + const uint16_t extended_id = inw(native_audio_mixer + NAM_EXTENDED_ID); - uint8_t rev = ((extended_id & (3 << 10)) >> 10) & 0b11; - qemu_log("Codec revision: (%d) %s", rev, - rev == 0 ? "r < 21" : ( - rev == 1 ? "r22" : ( - rev == 2 ? "r23" - : "Not supported" - ) - ) - ); + const size_t rev = (extended_id >> 10) & 0b11; + const char* rev_strs[] = {"r < 21", "r22", "r23"}; + qemu_log("Codec revision: (%d) %s", rev, rev_strs[rev]); uint32_t gc = inl(native_audio_bus_master + NABM_GLOBAL_CONTROL); qemu_log("Received global control: (%d) %x", gc, gc); - gc |= 2; // Cold reset - - uint32_t word = pci_read_confspc_word(ac97_busnum, ac97_slot, ac97_func, 0x3C); // All 0xF PCI register - - qemu_log("AC'97's IRQ is: %d", word & 0xff); - + gc |= 1 << 1; // Cold reset outl(native_audio_bus_master + NABM_GLOBAL_CONTROL, gc); - outs(native_audio_mixer + NAM_RESET, 1); + outw(native_audio_mixer + NAM_RESET, 1); qemu_log("Cold reset"); // /* // ac97_global_status_t status; // ac97_global_status_t* statusptr = &status; - uint32_t status = inl(native_audio_bus_master + NABM_GLOBAL_STATUS); + const uint32_t status = inl(native_audio_bus_master + NABM_GLOBAL_STATUS); qemu_log("Status: %x", status); // qemu_log("Status: %d (%x)\n", status, status); @@ -128,49 +162,26 @@ void ac97_init() { // */ - uint16_t extended_audio = ins(native_audio_mixer + NAM_EXTENDED_AUDIO); + uint16_t extended_audio = inw(native_audio_mixer + NAM_EXTENDED_AUDIO); qemu_log("Status: %d", extended_audio); - if((extended_id & 1) > 0) { // Check for variable sample rate - qemu_log("AC'97 supports variable sample rate!!!"); + if((extended_id & 1) != 0) { // Check for variable sample rate + qemu_log("AC'97 supports variable sample rate!!!\n"); extended_audio |= 1; ac97_varibale_sample_rate = true; } - outs(native_audio_mixer + NAM_EXTENDED_AUDIO, extended_audio); + outw(native_audio_mixer + NAM_EXTENDED_AUDIO, extended_audio); - // ac97_set_pcm_sample_rate(ac97_varibale_sample_rate ? 44100 : 48000); - ac97_set_pcm_sample_rate(44100); + ac97_set_pcm_sample_rate(ac97_varibale_sample_rate ? 44100 : 48000); ac97_set_master_volume(0, 0, false); ac97_set_pcm_volume(0, 0, false); - qemu_log("Updated capabilities"); + qemu_log("Updated capabilities\n"); ac97_initialized = true; - currently_pages_count = BUFFER_SIZE / PAGE_SIZE; - physpages_ac97 = kcalloc(currently_pages_count, sizeof(size_t)); - - for(size_t i = 0; i < currently_pages_count; i++) { - physpages_ac97[i] = alloc_phys_pages(1); - - map_pages( - get_kernel_dir(), - physpages_ac97[i], - physpages_ac97[i], - 1, - (PAGE_WRITEABLE | PAGE_PRESENT) - ); - - qemu_log("AC97: V: %x; P: %x", physpages_ac97[i], physpages_ac97[i]); - } - - qemu_log("OK: Page count for 64 KB buffer is: %d", currently_pages_count); - qemu_log(" Physical pages position: %x", physpages_ac97); - - qemu_log("sizeof(BDL_ENTRY) = %d", sizeof(AC97_BDL_t)); - qemu_log("AC'97 initialized successfully!"); } @@ -178,72 +189,85 @@ bool ac97_is_initialized() { return ac97_initialized; } -size_t ac97_copy_user_memory_to_dma(char* data, size_t length) { - if(length > BUFFER_SIZE) - return currently_pages_count; +size_t ac97_copy_user_memory_to_dma(const char* data, size_t length) { + currently_pages_count = length / PAGE_SIZE; - for(size_t i = 0; i < currently_pages_count; i++) { - memcpy(((char*)physpages_ac97[i]), data + (i * PAGE_SIZE), PAGE_SIZE); - } + ac97_audio_buffer = kmalloc_common(length, PAGE_SIZE); + ac97_audio_buffer_phys = virt2phys(get_kernel_page_directory(), (virtual_addr_t) ac97_audio_buffer); + + memcpy(ac97_audio_buffer, data, length); + + qemu_log("Made user buffer with %d pages on a board", currently_pages_count); return currently_pages_count; } void ac97_destroy_user_buffer() { - if(!physpages_ac97) - return; - - for (register size_t i = 0; i < currently_pages_count; i++) { - unmap_pages(get_kernel_dir(), physpages_ac97[i], 1); - vmm_free_page(physpages_ac97[i]); - } +// if(!physpages_ac97) +// return; +// +// for (size_t i = 0; i < currently_pages_count; i++) { +// phys_free_single_page(physpages_ac97[i]); +// } - kfree(physpages_ac97); +// memset(physpages_ac97, 0, sizeof(size_t) * currently_pages_count); +// kfree(physpages_ac97); + kfree(ac97_audio_buffer); currently_pages_count = 0; - physpages_ac97 = 0; +// physpages_ac97 = 0; qemu_log("Destroyed buffer"); } -void ac97_single_page_write(ssize_t page_num) { - size_t pgs = MIN(page_num, 32); - - for (register size_t j = 0; j < pgs; j++) { - ac97_bdl_buffer[j].memory_pos = (size_t)physpages_ac97[j]; - ac97_bdl_buffer[j].sample_count = PAGE_SIZE / 2; +void ac97_single_page_write_wait(size_t page_num) { + size_t remaining_pages = currently_pages_count - page_num; + for (size_t j = 0; j < MIN(remaining_pages, 32); j++) { +// ac97_buffer[j].memory_pos = physpages_ac97[(remaining_pages) + j]; + ac97_buffer[j].memory_pos = (void *) (ac97_audio_buffer_phys + ((page_num + j) * PAGE_SIZE)); + ac97_buffer[j].sample_count = PAGE_SIZE / 2; } - ac97_bdl_buffer[pgs].flags = 1 << 14; + ac97_buffer[remaining_pages >= 31 ? 31 : remaining_pages].flags = 1 << 14; ac97_update_bdl(); - ac97_update_lvi(31); + ac97_update_lvi(remaining_pages >= 31 ? 31 : remaining_pages); ac97_set_play_sound(true); ac97_clear_status_register(); + + while(inb(native_audio_bus_master + 0x16) == 0) {} + + memset(&ac97_buffer, 0, sizeof(AC97_BDL_t)*31); } -// FIXME: Needs optimizations +void ac97_test() { + FILE* file = fopen("R:\\Sayori\\a.wav", "rb"); + fseek(file, 0, SEEK_END); -void ac97_single_page_write_wait(ssize_t page_num) { - ac97_single_page_write(page_num); + const uint32_t filesize = ftell(file); - qemu_log("Polling..."); - - // uint16_t status = 0; - // - // while(status == 0) { - // fast_ins(native_audio_bus_master + NABM_PCM_OUT + 0x06, status); - // } + fseek(file, 0xae, SEEK_SET); - // This also works, but without `sleep_ms` function it skips a lot of frames. - while(ins(native_audio_bus_master + NABM_PCM_OUT + 0x08) != 0); - sleep_ms(140); + char* data = kmalloc(filesize); + fread(file, filesize, 1, data); + + size_t page_count = ac97_copy_user_memory_to_dma(data, filesize); + + qemu_log("Allocated %d pages for user memory in DMA", page_count); + + ac97_set_master_volume(2, 2, false); + ac97_set_pcm_volume(2, 2, false); + + for(ssize_t i = 0; i < page_count; i += 32) { + ac97_single_page_write_wait(i); + } - // How to fix that? - /// AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + qemu_log("Exiting"); + ac97_reset_channel(); - qemu_log("Ok!"); + kfree(data); + fclose(file); - ac97_clear_bdl(); + ac97_destroy_user_buffer(); } diff --git a/kernel/src/drv/beeper.c b/kernel/src/drv/beeper.c old mode 100755 new mode 100644 index 478f93ae6..b0b2266c2 --- a/kernel/src/drv/beeper.c +++ b/kernel/src/drv/beeper.c @@ -2,27 +2,28 @@ * @file drv/beeper.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Драйвер пищалки - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-10 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include #include #include +#include + uint32_t config = 0; ///< Корректировка /** - * @brief [Beeper] Вопроизвести звук + * @brief Вопроизвести звук (квадратной формы волны) * - * @param uint32_t nFrequence - Частота звука + * @param frequency - Частота звука */ -void beeperPlay(uint32_t nFrequence) { +void beeperPlay(uint32_t frequency) { uint32_t Div; uint8_t tmp; - Div = (getFrequency()*1000) + config; - Div /= nFrequence; + Div = getFrequency() * 1000; + Div /= frequency; outb(0x43, 0xb6); outb(0x42, (uint8_t) (Div) ); @@ -41,212 +42,4 @@ void beeperPlay(uint32_t nFrequence) { void beeperSilent() { uint8_t tmp = inb(0x61) & 0xFC; outb(0x61, tmp); -} - -/** - * @brief [Beeper] Настроить звук - * - * @param uint32_t val - Корректировка частоты - */ -void beeperConfig(uint32_t val){ - config = val; -} - -/** - * @brief [Beeper] Инициализация - */ - -void beeperInit(int test){ - qemu_log("[Beeper] Init..."); - if(test != 1 & test != 2) - { - // beeperPlay(1000); - } - sleep_ms(50); - beeperSilent(); - // FIXME: Beeper interrupts for a short time. - if (test == 1){ - - Note notes[150] = { - {A4, 200}, - {A4, 200}, - {C5, 200}, - {A4, 200}, - {D5, 200}, - {A4, 200}, - {E5, 200}, - {D5, 200}, - {C5, 200}, - {C5, 200}, - {E5, 200}, - {C5, 200}, - {E5, 200}, - {C5, 200}, - {G5, 200}, - {C5, 200}, - {E5, 200}, - {C5, 200}, - {G4, 200}, - {G4, 200}, - {B4, 200}, - {G4, 200}, - {C5, 200}, - {G4, 200}, - {D5, 200}, - {C5, 200}, - {F4, 200}, - {F4, 200}, - {A4, 200}, - {F4, 200}, - {C5, 200}, - {F4, 200}, - {C5, 200}, - {B4, 200}, - {A4, 200}, - {A4, 200}, - {C5, 200}, - {A4, 200}, - {D5, 200}, - {A4, 200}, - {E5, 200}, - {D5, 200}, - {C5, 200}, - {C5, 200}, - {E5, 200}, - {D5, 200}, - {C5, 200}, - {C5, 200}, - {E5, 200}, - {C5, 200}, - {G5, 200}, - {C5, 200}, - {E5, 200}, - {C5, 200}, - {G4, 200}, - {G4, 200}, - {B4, 200}, - {G4, 200}, - {C5, 200}, - {G4, 200}, - {C5, 200}, - {G4, 200}, - {D5, 200}, - {C5, 200}, - {F4, 200}, - {F4, 200}, - {A4, 200}, - {F4, 200}, - {C5, 200}, - {F4, 200}, - {C5, 200}, - {B4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {G4, 200}, - {C5, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {G4, 200}, - {E4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {G4, 200}, - {C5, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {G4, 200}, - {C4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {G4, 200}, - {E4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {G4, 200}, - {C5, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - {A4, 200}, - }; - for(int i = 0; i < 122; i++) { - if(notes[i].freq == 0) continue; - beeperPlay(notes[i].freq); - tty_printf("%d ", notes[i].freq); - if (notes[i].duration == 0){ - beeperSilent(); - sleep_ms(100); - continue; - } - sleep_ms((notes[i].duration)/3); - beeperSilent(); - sleep_ms(100); - } - beeperSilent(); - } - else if (test == 2) - { - Note notes[150] = { - {A2, 50}, - {A3, 1000}, - {A4, 1000}, - {A2, 50}, - {A3, 1000}, - {A4, 1000}, - {C3, 50}, - {F3, 1000}, - {Fd4, 1000}, - {C3, 50}, - {F3, 1000}, - {Fd4, 1000}, - {A2, 50}, - {A3, 1000}, - {A4, 1000}, - {A2, 50}, - {A3, 1000}, - {A4, 1000}, - {C3, 50}, - {F3, 1000}, - {Fd4, 1000}, - {C3, 50}, - {F3, 1000}, - {Fd4, 1000}, - }; - for(int i = 0; i < 122; i++) { - if(notes[i].freq == 0) continue; - beeperPlay(notes[i].freq); - tty_printf("%d ", notes[i].freq); - if (notes[i].duration == 0){ - beeperSilent(); - sleep_ms(100); - continue; - } - sleep_ms((notes[i].duration)/3); - beeperSilent(); - sleep_ms(100); - } - beeperSilent(); - } - qemu_log("Ok"); -} +} \ No newline at end of file diff --git a/kernel/src/drv/cmos.c b/kernel/src/drv/cmos.c old mode 100755 new mode 100644 index 0e24ef9cb..3cfede887 --- a/kernel/src/drv/cmos.c +++ b/kernel/src/drv/cmos.c @@ -2,13 +2,16 @@ * @file drv/cmos.c * @brief Драйвер CMOS * @author NDRAEY >_ (pikachu_andrey@vk.com) - * @version 0.3.3 + * @version 0.3.4 * @date 2022-11-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ - -#include +#include "common.h" +#include "io/ports.h" +#include "drv/cmos.h" + +// FIXME: We need this? #define CURRENT_YEAR 2022 // Change this each year! int32_t century_register = 0x00; // Set by ACPI table parsing code if possible @@ -37,6 +40,8 @@ enum { /** * @brief Проверяет CMOS на обновление + * + * @return Если значение не равно нулю, значит CMOS обновляется */ int32_t get_update_in_progress_flag() { outb(cmos_address, 0x0A); @@ -54,7 +59,6 @@ unsigned char get_RTC_register(int32_t reg) { /** * @brief Считывает время с CMOS */ - void read_rtc() { while (get_update_in_progress_flag()); // Make sure an update isn't in progress @@ -127,6 +131,8 @@ void read_rtc() { /** * @brief Это високосный год? + * + * @param year Год в формате YYYY */ int isleap(int year) { return year % 4 == 0 && (year % 100 != 0 || year % 400 == 0); diff --git a/kernel/src/drv/disk/ahci.c b/kernel/src/drv/disk/ahci.c new file mode 100644 index 000000000..266cd9da6 --- /dev/null +++ b/kernel/src/drv/disk/ahci.c @@ -0,0 +1,642 @@ +#include "drv/disk/ahci.h" + +#include + +#include "drv/pci.h" +#include "io/ports.h" +#include "io/tty.h" +#include "mem/pmm.h" +#include "mem/vmm.h" +#include "sys/isr.h" +#include "drv/disk/ata.h" +#include "debug/hexview.h" +#include "drv/atapi.h" + +#define AHCI_CLASS 1 +#define AHCI_SUBCLASS 6 + +struct ahci_port_descriptor ports[32] = {0}; + +uint8_t ahci_busnum, ahci_slot, ahci_func; +uint16_t ahci_vendor, ahci_devid; +uint32_t ahci_irq; +bool ahci_initialized = false; + +AHCI_HBA_MEM* abar; + +#undef qemu_log +#undef qemu_err +#undef qemu_warn +#undef qemu_ok +#define qemu_log(M, ...) tty_printf(M "\n", ##__VA_ARGS__) +#define qemu_err(M, ...) tty_printf("[ERR] " M "\n", ##__VA_ARGS__) +#define qemu_warn(M, ...) tty_printf("[WARN] " M "\n", ##__VA_ARGS__) +#define qemu_ok(M, ...) tty_printf("[OK] " M "\n", ##__VA_ARGS__) + +#define AHCI_PORT(num) (abar->ports + (num)) + +//#define qemu_log(M, ...) _tty_printf(M "\n", ##__VA_ARGS__) + +void ahci_irq_handler(); + +void ahci_init() { + // Find controller + + pci_find_device_by_class_and_subclass(AHCI_CLASS, AHCI_SUBCLASS, &ahci_vendor, &ahci_devid, &ahci_busnum, &ahci_slot, &ahci_func); + + if(ahci_vendor == 0 || ahci_devid == 0) { + qemu_err("AHCI contoller not found!"); + return; + } + + qemu_ok("Found VEN: %x DEV: %x", ahci_vendor, ahci_devid); + + // Enable Bus Mastering + uint16_t command_register = pci_read_confspc_word(ahci_busnum, ahci_slot, ahci_func, 4); + + command_register |= 0x05; + + pci_write(ahci_busnum, ahci_slot, ahci_func, 4, command_register); + +// qemu_ok("Enabled Bus Mastering"); + + // Get ABAR + + abar = (AHCI_HBA_MEM*)pci_read32(ahci_busnum, ahci_slot, ahci_func, 0x24); + + qemu_log("AHCI ABAR is: %x", abar); + + // Map memory + map_pages( + get_kernel_page_directory(), + (physical_addr_t) abar, + (virtual_addr_t) abar, + PAGE_SIZE * 2, + PAGE_WRITEABLE | PAGE_CACHE_DISABLE + ); + + qemu_log("Version: %x", abar->version); + + abar->global_host_control |= (1 << 31); // AHCI Enable + + if(abar->host_capabilities_extended & 1) { + for(int i = 0; i < 5; i++) { + qemu_warn("PERFORMING BIOS HANDOFF!!!"); + } + + abar->handoff_control_and_status = abar->handoff_control_and_status | (1 << 1); + + while(1) { + size_t status = abar->handoff_control_and_status; + + if (~status & (1 << 0)) + break; + } + } else { + qemu_ok("No BIOS Handoff"); + } + + // Reset + abar->global_host_control |= (1 << 0); + + while(abar->global_host_control & (1 << 0)); + + qemu_ok("Controller reset ok"); + + // Interrupts + ahci_irq = pci_read_confspc_word(ahci_busnum, ahci_slot, ahci_func, 0x3C) & 0xFF; // All 0xF PCI register + qemu_log("AHCI IRQ: %x (%d)", ahci_irq, ahci_irq); + + register_interrupt_handler(32 + ahci_irq, ahci_irq_handler); + + // Init + abar->global_host_control |= (1 << 31) | (1 << 1); // AHCI Enable and AHCI Interrupts + + qemu_ok("Enabled AHCI and INTERRUPTS"); + + size_t caps = abar->capability; + size_t slotCount = ((caps >> 8) & 0x1f) + 1; + + qemu_log("Slot count: %d", slotCount); + + // Scan bus + + uint32_t implemented_ports = abar->port_implemented; + + for(int i = 0; i < 32; i++) { + if (implemented_ports & (1 << i)) { + AHCI_HBA_PORT* port = AHCI_PORT(i); + + if (!ahci_is_drive_attached(i)) { + continue; + } + +// qemu_log("%x", port->command_and_status); + + // from nakst/essence + + /* +Ensure that the controller is not in the running state by reading and examining each +implemented port’s PxCMD register. If PxCMD.ST, PxCMD.CR, PxCMD.FRE and +PxCMD.FR are all cleared, the port is in an idle state. Otherwise, the port is not idle and +should be placed in the idle state prior to manipulating HBA and port specific registers. +System software places a port into the idle state by clearing PxCMD.ST and waiting for +PxCMD.CR to return ‘0’ when read. Software should wait at least 500 milliseconds for +this to occur. If PxCMD.FRE is set to ‘1’, software should clear it to ‘0’ and wait at least +500 milliseconds for PxCMD.FR to return ‘0’ when read. + */ + +// uint32_t norm = (1 << 0) | (1 << 4) | (1 << 15) | (1 << 14); // ST, FRE, CR and FR + + port->command_and_status &= ~(1); + + uint32_t st = port->command_and_status; + + while(true) { + uint32_t cr = (port->command_and_status >> 15) & 1; + + if(cr == 0) { + break; + } + } + + uint32_t fre = (port->command_and_status >> 4) & 1; + + if(fre == 1) { + port->command_and_status &= ~(1 << 4); + } + + while(true) { + uint32_t fr = (port->command_and_status >> 14) & 1; + + if(fr == 0) { + break; + } + } + + ahci_rebase_memory_for(i); + + port->command_and_status |= (1 << 4); + + port->sata_error = (1 << i); + + port->interrupt_enable = (1 << 5) | (1 << 0) | (1 << 30) | (1 << 29) | (1 << 28) | (1 << 27) | (1 << 26) | (1 << 24) | (1 << 23); + + port->command_and_status |= 1; + ///////////// + +// volatile size_t x = port->interrupt_status; +// port->interrupt_status = x; +// +// port->sata_control |= (3 << 8); +// port->command_and_status = (port->command_and_status & 0x0FFFFFFF) | (1 << 1) | (1 << 2) | (1 << 4) | (1 << 28); +// +// while((port->sata_status & 0x0f) != 3); +// +// x = port->sata_error; +// port->sata_error = x; +// +// while(port->task_file_data & 0x88); +// +// port->command_and_status |= 1; +// +// port->interrupt_enable |= (1 << 5) | (1 << 0) | (1 << 30) | (1 << 29) | (1 << 28) | (1 << 27) | (1 << 26) | (1 << 24) | (1 << 23); + + } + } + + for(int i = 0; i < 32; i++) { + if(abar->port_implemented & (1 << i)) { + AHCI_HBA_PORT* port = abar->ports + i; + + qemu_log("[%x: Port %d]", port, i); + + if(!ahci_is_drive_attached(i)) { + qemu_log("\tNo drive attached to port!"); + continue; + } + + if(port->signature == AHCI_SIGNATURE_SATAPI) { // SATAPI + qemu_log("\tSATAPI drive"); + ahci_identify(i); + } else if(port->signature == AHCI_SIGNATURE_SATA) { // SATA + qemu_log("\tSATA drive"); + } else { + qemu_log("Other device: %x", port->signature); + } + } + } + + ahci_initialized = true; +} + +void ahci_rebase_memory_for(size_t port_num) { + if(port_num > 31) + return; + + ahci_stop_cmd(port_num); + + // Memory rebase + AHCI_HBA_PORT* port = AHCI_PORT(port_num); + + void* virt = kmalloc_common(MEMORY_PER_AHCI_PORT, PAGE_SIZE); + memset(virt, 0, MEMORY_PER_AHCI_PORT); + size_t phys = virt2phys(get_kernel_page_directory(), (virtual_addr_t) virt); + + ports[port_num].command_list_addr_virt = virt; + ports[port_num].command_list_addr_phys = phys; + + ports[port_num].fis_virt = AHCI_FIS(virt, 0); + ports[port_num].fis_phys = AHCI_FIS(phys, 0); + +// qemu_log("Virtual addresses: Command list %x, FIS %x", ports[port_num].command_list_addr_virt, ports[port_num].fis_virt); + + port->command_list_base_address_low = phys; + port->command_list_base_address_high = 0; + + port->fis_base_address_low = AHCI_FIS(phys, 0); + port->fis_base_address_high = 0; + + AHCI_HBA_CMD_HEADER *cmdheader = (AHCI_HBA_CMD_HEADER*)virt; + + for(int i = 0; i < 32; i++) { + cmdheader[i].prdtl = COMMAND_TABLE_PRDT_ENTRY_COUNT; + + cmdheader[i].ctba = AHCI_COMMAND_TABLE_ENTRY(phys, 0, i); + + cmdheader[i].ctbau = 0; + } + +// qemu_log("Port %d", port_num); +// qemu_log("\t|- CMD LIST BASE: %x (%s)", port->command_list_base_address_low, IS_ALIGNED(port->command_list_base_address_low, 1024) ? "aligned" : "not aligned"); +// qemu_log("\t|- FIS BASE: %x (%s)", port->fis_base_address_low, IS_ALIGNED(port->fis_base_address_low, 256) ? "aligned" : "not aligned"); +// qemu_log("\t|- TABLE ENTRIES: %x - %x", cmdheader[0].ctba, cmdheader[31].ctba + 256); + + ahci_start_cmd(port_num); + + qemu_ok("Rebasing memory for: %d is OK.", port_num); +} + +bool ahci_is_drive_attached(size_t port_num) { + if(port_num > 31){ + return false; + } + + uint32_t implemented_ports = abar->port_implemented; + + if(implemented_ports & (1 << port_num)) { + AHCI_HBA_PORT* port = abar->ports + port_num; + + uint32_t status = port->sata_status; + + uint8_t ipm = (status >> 8) & 0xF; + uint8_t det = status & 0xF; + + if(ipm == 1 && det == 3) { + return true; + } + } + + return false; +} + +int ahci_free_cmd_slot(size_t port_num) { + if(port_num > 31) + return -1; + + AHCI_HBA_PORT* port = AHCI_PORT(port_num); + + uint32_t slots = port->sata_active | port->command_issue; + + for(int i = 0; i < 32; i++) { + if((slots & (1 << i)) == 0) + return i; + } + + return -1; +} + +void ahci_start_cmd(size_t port_num) { + if(port_num > 31) + return; + + AHCI_HBA_PORT* port = AHCI_PORT(port_num); + + while (port->command_and_status & AHCI_HBA_CR); + + port->command_and_status |= AHCI_HBA_FRE; + port->command_and_status |= AHCI_HBA_ST; +} + +void ahci_stop_cmd(size_t port_num) { + if(port_num > 31) + return; + + AHCI_HBA_PORT* port = AHCI_PORT(port_num); + + port->command_and_status &= ~AHCI_HBA_ST; + port->command_and_status &= ~AHCI_HBA_FRE; + + while(1) { + if (port->command_and_status & AHCI_HBA_FR) + continue; + if (port->command_and_status & AHCI_HBA_CR) + continue; + break; + } +} + +void ahci_irq_handler() { + qemu_warn("AHCI interrupt!"); + + uint32_t status = abar->interrupt_status; + + abar->interrupt_status = status; + + for(int i = 0; i < 32; i++) { + if(status & (1 << i)) { + AHCI_HBA_PORT* port = AHCI_PORT(i); + + uint32_t port_interrupt_status = port->interrupt_status; + + port->interrupt_status = port_interrupt_status; + + // if(port_interrupt_status == 0) { + // continue; + // } + } + } +} + +void ahci_send_cmd(AHCI_HBA_PORT* port, size_t slot) { + int spin = 0; + while ((port->task_file_data & (ATA_SR_BSY | ATA_SR_DRQ)) && spin < 1000000) { + spin++; + } + + if (spin == 1000000) { + qemu_err("Port is hung"); + return; + } + + qemu_warn("DRIVE IS READY"); + + port->command_issue |= 1 << slot; + + qemu_warn("COMMAND IS ISSUED"); + + while (1) { + if (~port->command_issue & (1 << slot)) // Command is not running? Break + break; + + if (port->interrupt_status & AHCI_HBA_TFES) { // Task file error? Tell about error and exit + qemu_err("Read disk error (Task file error); IS: %x", port->interrupt_status); + + return; + } + } + + qemu_warn("OK"); +} + +/** + * @brief Чтение `size` секторов с AHCI диска + * @param port_num - номер порта + * @param location - номер начального сектора + * @param sector_count - колчество секторов + * @param buffer - буфер куда сохранять данные + */ +void ahci_read_sectors(size_t port_num, size_t location, size_t sector_count, void* buffer) { + if(!ahci_initialized) { + qemu_err("AHCI not present!"); + return; + } + + qemu_warn("\033[7mAHCI READ STARTED\033[0m"); + + char* buffer_mem = kmalloc_common(sector_count * 512, PAGE_SIZE); + memset(buffer_mem, 0, sector_count * 512); + + size_t buffer_phys = virt2phys(get_kernel_page_directory(), (virtual_addr_t) buffer_mem); + + AHCI_HBA_PORT* port = AHCI_PORT(port_num); + + port->interrupt_status = (uint32_t)-1; + + AHCI_HBA_CMD_HEADER* hdr = ports[port_num].command_list_addr_virt; + + hdr->cfl = sizeof(AHCI_FIS_REG_DEVICE_TO_HOST) / sizeof(uint32_t); // Should be 5 + hdr->a = 0; // Not ATAPI + hdr->w = 0; // Read + hdr->p = 0; // No prefetch + + qemu_log("FIS IS %d DWORDs long", hdr->cfl); + + HBA_CMD_TBL* table = (HBA_CMD_TBL*)AHCI_COMMAND_TABLE(ports[port_num].command_list_addr_virt, 0); + + memset(table, 0, sizeof(HBA_CMD_TBL)); + + size_t bytes = sector_count * 512; + + // FIXME: Simplify statements + int index = 0; + int i; + for(i = 0; i < bytes; i += (4 * MB) - 1) { + table->prdt_entry[index].dba = buffer_phys + i; + table->prdt_entry[index].dbau = 0; + table->prdt_entry[index].rsv0 = 0; + table->prdt_entry[index].dbc = MIN((4 * MB), (bytes - i) % (4 * MB)) - 1; // Size in bytes 4M max + table->prdt_entry[index].rsv1 = 0; + table->prdt_entry[index].i = 0; + + qemu_log("PRDT[%d]: Address: %x; Size: %d bytes; Last: %d", + i, + table->prdt_entry[index].dba, + table->prdt_entry[index].dbc + 1, + table->prdt_entry[index].i); + + index++; + } + + table->prdt_entry[index - 1].i = 1; + + hdr->prdtl = index; + + AHCI_FIS_REG_HOST_TO_DEVICE *cmdfis = (AHCI_FIS_REG_HOST_TO_DEVICE*)&(table->cfis); + + qemu_log("CMDFIS at: %x", cmdfis); + + cmdfis->fis_type = FIS_TYPE_REG_HOST_TO_DEVICE; + cmdfis->c = 1; // Command + cmdfis->command = ATA_CMD_READ_DMA_EXT; + + cmdfis->lba0 = location & 0xFF; + cmdfis->lba1 = (location >> 8) & 0xFF; + cmdfis->lba2 = (location >> 16) & 0xFF; + cmdfis->device = 1 << 6; // LBA mode + + cmdfis->lba3 = (location >> 24) & 0xFF; + cmdfis->lba4 = (location >> 32) & 0xFF; + cmdfis->lba5 = (location >> 40) & 0xFF; + + cmdfis->countl = sector_count & 0xff; + cmdfis->counth = (sector_count >> 8) & 0xff; + + ahci_send_cmd(port, 0); + + memcpy(buffer, buffer_mem, bytes); + + kfree(buffer_mem); + + qemu_warn("\033[7mOK?\033[0m"); +} + +/** + * @brief Запись `size` секторов с AHCI диска + * @param port_num - номер порта + * @param location - номер начального сектора + * @param sector_count - колчество секторов + * @param buffer - буфер куда сохранять данные + */ +void ahci_write_sectors(size_t port_num, size_t location, size_t sector_count, void* buffer) { + if(!ahci_initialized) { + qemu_err("AHCI not present!"); + return; + } + + qemu_warn("\033[7mAHCI WRITE STARTED\033[0m"); + + char* buffer_mem = kmalloc_common(sector_count * 512, PAGE_SIZE); + memset(buffer_mem, 0, sector_count * 512); + memcpy(buffer_mem, buffer, sector_count * 512); + + size_t buffer_phys = virt2phys(get_kernel_page_directory(), (virtual_addr_t) buffer_mem); + + AHCI_HBA_PORT* port = AHCI_PORT(port_num); + + port->interrupt_status = (uint32_t)-1; + + AHCI_HBA_CMD_HEADER* hdr = ports[port_num].command_list_addr_virt; + + hdr->cfl = sizeof(AHCI_FIS_REG_DEVICE_TO_HOST) / sizeof(uint32_t); // Should be 5 + hdr->a = 0; // Not ATAPI + hdr->w = 1; // Write + hdr->p = 0; // No prefetch + + qemu_log("FIS IS %d DWORDs long", hdr->cfl); + + HBA_CMD_TBL* table = (HBA_CMD_TBL*)AHCI_COMMAND_TABLE(ports[port_num].command_list_addr_virt, 0); + + memset(table, 0, sizeof(HBA_CMD_TBL)); + + size_t bytes = sector_count * 512; + + // FIXME: Simplify statements + int index = 0; + int i; + for(i = 0; i < bytes; i += (4 * MB) - 1) { + table->prdt_entry[index].dba = buffer_phys + i; + table->prdt_entry[index].dbau = 0; + table->prdt_entry[index].rsv0 = 0; + table->prdt_entry[index].dbc = MIN((4 * MB), (bytes - i) % (4 * MB)) - 1; // Size in bytes 4M max + table->prdt_entry[index].rsv1 = 0; + table->prdt_entry[index].i = 0; + + qemu_log("PRDT[%d]: Address: %x; Size: %d bytes; Last: %d", + i, + table->prdt_entry[index].dba, + table->prdt_entry[index].dbc + 1, + table->prdt_entry[index].i); + + index++; + } + + table->prdt_entry[index - 1].i = 1; + + hdr->prdtl = index; + + AHCI_FIS_REG_HOST_TO_DEVICE *cmdfis = (AHCI_FIS_REG_HOST_TO_DEVICE*)&(table->cfis); + + qemu_log("CMDFIS at: %x", cmdfis); + + cmdfis->fis_type = FIS_TYPE_REG_HOST_TO_DEVICE; + cmdfis->c = 1; // Command + cmdfis->command = ATA_CMD_WRITE_DMA_EXT; + + size_t locsec = location / 512; + + cmdfis->lba0 = locsec & 0xFF; + cmdfis->lba1 = (locsec >> 8) & 0xFF; + cmdfis->lba2 = (locsec >> 16) & 0xFF; + cmdfis->device = 1 << 6; // LBA mode + + cmdfis->lba3 = (locsec >> 24) & 0xFF; + cmdfis->lba4 = (locsec >> 32) & 0xFF; + cmdfis->lba5 = (locsec >> 40) & 0xFF; + + cmdfis->countl = sector_count & 0xff; + cmdfis->counth = (sector_count >> 8) & 0xff; + + ahci_send_cmd(port, 0); + + kfree(buffer_mem); + + qemu_warn("\033[7mOK?\033[0m"); +} + + +// Call SCSI START_STOP command to eject a disc +void ahci_identify(size_t port_num) { + qemu_log("Trying to eject %d", port_num); + + AHCI_HBA_PORT* port = AHCI_PORT(port_num); + + port->interrupt_status = (uint32_t)-1; + + int slot = 0; + +// qemu_log("Slot is: %d", slot); + + AHCI_HBA_CMD_HEADER* hdr = ports[port_num].command_list_addr_virt; + hdr += slot; + +// qemu_log("CMDHEADER AT: %x", hdr); + + hdr->cfl = sizeof(AHCI_FIS_REG_DEVICE_TO_HOST) / sizeof(uint32_t); // Should be 5 + hdr->a = 1; // ATAPI + hdr->w = 0; // Read + hdr->p = 0; // No prefetch + hdr->prdtl = 1; // One entry only + + void* memory = kmalloc_common(512, PAGE_SIZE); + size_t buffer_phys = virt2phys(get_kernel_page_directory(), (virtual_addr_t) memory); + + HBA_CMD_TBL* table = (HBA_CMD_TBL*)AHCI_COMMAND_TABLE(ports[port_num].command_list_addr_virt, 0); + memset(table, 0, sizeof(HBA_CMD_TBL)); + + qemu_log("Table at: %x", table); + + uint8_t command[12] = { + ATAPI_CMD_START_STOP, // Command + 0, 0, 0, // Reserved + 1 << 1, // Eject disc + 0, 0, 0, 0, 0, 0, 0 // Reserved + }; + + memcpy(table->acmd, command, 12); + + // Set only first PRDT for testing + table->prdt_entry[0].dba = buffer_phys; + table->prdt_entry[0].dbc = 0x1ff; // 512 bytes - 1 + table->prdt_entry[0].i = 1; + + AHCI_FIS_REG_HOST_TO_DEVICE *cmdfis = (AHCI_FIS_REG_HOST_TO_DEVICE*)&(table->cfis); + + cmdfis->fis_type = FIS_TYPE_REG_HOST_TO_DEVICE; + cmdfis->c = 1; // Command + cmdfis->command = ATA_CMD_PACKET; + + cmdfis->lba1 = 0; + + ahci_send_cmd(port, slot); +} diff --git a/kernel/src/drv/disk/ata.c b/kernel/src/drv/disk/ata.c index 2fc4a008d..2971a9180 100644 --- a/kernel/src/drv/disk/ata.c +++ b/kernel/src/drv/disk/ata.c @@ -1,11 +1,19 @@ -#include +#include "drv/disk/ata.h" #include #include -#include +#include +#include +#include #include +#include "drv/disk/dpm.h" +#include "sys/isr.h" +#include "debug/hexview.h" +#include "net/endianess.h" #define DEFAULT_TIMEOUT (65535 * 2) +const char possible_dpm_letters_for_ata[4] = "CDEF"; + // PRIMARY MASTER // PRIMARY SLAVE // SECONDARY MASTER @@ -18,39 +26,65 @@ extern uint16_t ata_dma_bar4; void ide_select_drive(uint8_t bus, bool slave) { if(bus == ATA_PRIMARY) - outb(ATA_PRIMARY_IO + ATA_REG_HDDEVSEL, (0xA0 | (slave << 4))); + outb(ATA_PRIMARY_IO + ATA_REG_HDDEVSEL, (0xA0 | ((uint8_t)slave << 4))); else - outb(ATA_SECONDARY_IO + ATA_REG_HDDEVSEL, (0xA0 | (slave << 4))); + outb(ATA_SECONDARY_IO + ATA_REG_HDDEVSEL, (0xA0 | ((uint8_t)slave << 4))); } void ide_primary_irq(__attribute__((unused)) registers_t regs) { - qemu_log("=================== Got ATA interrupt. PRIMARY"); +// qemu_log("=================== Got ATA interrupt. PRIMARY"); uint8_t status = inb(ATA_PRIMARY_IO + ATA_REG_STATUS); - qemu_log("Status: %d (%x)", status, status); +// qemu_log("Status: %d (%x); Altstatus: %x", status, status, altstatus); } void ide_secondary_irq(__attribute__((unused)) registers_t regs) { - qemu_log("=================== Got ATA interrupt. SECONDARY"); +// qemu_log("=================== Got ATA interrupt. SECONDARY"); size_t status = inb(ATA_SECONDARY_IO + ATA_REG_STATUS); - qemu_log("Status: %d (%x)", status, status); +// qemu_log("Status: %d (%x); Altstatus: %x", status, status, altstatus); +} + +void ide_soft_reset(size_t io) { + outb(io + ATA_REG_CONTROL, 0x04); + ide_400ns_delay(io); + outb(io + ATA_REG_CONTROL, 0); +} + +size_t dpm_ata_pio_read(size_t Disk, size_t Offset, size_t Size, void* Buffer){ + /// Функции для чтения + DPM_Disk dpm = dpm_info(Disk + 65); + qemu_note("[ATA] [DPM] [DISK %d] [READ] Off: %d | Size: %d", dpm.Point, Offset, Size); + // TODO: @ndraey не забудь для своей функции сделать кол-во полученных байт + // FIXME: For those who want to see thid piece of code: I literally burned my eyes with this. + ata_pio_read((uint8_t)dpm.Point, Buffer, Offset, Size); + return Size; } + +size_t dpm_ata_pio_write(size_t Disk, size_t Offset, size_t Size, void* Buffer){ + /// Функции для записи + DPM_Disk dpm = dpm_info(Disk + 65); + qemu_note("[ATA] [DPM] [DISK %d] [WRITE] Off: %d | Size: %d", dpm.Point, Offset, Size); + // TODO: @ndraey не забудь для своей функции сделать кол-во записанных байт + // FIXME: For those who want to see thid piece of code: I literally burned my eyes with this. + ata_pio_write((uint8_t)dpm.Point, Buffer, Offset, Size); + return Size; +} + + uint8_t ide_identify(uint8_t bus, uint8_t drive) { - uint16_t io; + uint16_t io = (bus == ATA_PRIMARY) ? ATA_PRIMARY_IO : ATA_SECONDARY_IO; + + uint8_t drive_num = (bus << 1) | drive; qemu_log("Identifying %s %s", PRIM_SEC(bus), MAST_SLV(drive)); - + + ide_soft_reset(io); ide_select_drive(bus, drive); - if(bus == ATA_PRIMARY) - io = ATA_PRIMARY_IO; - else - io = ATA_SECONDARY_IO; - outb(io + ATA_REG_SECCOUNT0, 0); outb(io + ATA_REG_LBA0, 0); outb(io + ATA_REG_LBA1, 0); @@ -61,6 +95,8 @@ uint8_t ide_identify(uint8_t bus, uint8_t drive) { uint8_t status = inb(io + ATA_REG_STATUS); + qemu_log("Status: %d; Err: %d", status, status & ATA_SR_ERR); + size_t timeout = DEFAULT_TIMEOUT; if(status) { @@ -71,8 +107,7 @@ uint8_t ide_identify(uint8_t bus, uint8_t drive) { uint8_t lba_m = inb(io + ATA_REG_LBA1); uint8_t lba_h = inb(io + ATA_REG_LBA2); - qemu_log("%x %x %x %x", seccount, lba_l, lba_m, lba_h); - + qemu_warn("%x %x %x %x", seccount, lba_l, lba_m, lba_h); // ^----- If they contain 0x01, 0x01, 0x14, 0xEB then the device is a packet device, // and `IDENTIFY PACKET DEVICE` (0xA1) should be used. @@ -81,48 +116,92 @@ uint8_t ide_identify(uint8_t bus, uint8_t drive) { qemu_log("ATA Packet Device!"); - drives[(bus << 1) | drive].online = true; - drives[(bus << 1) | drive].is_packet = true; + drives[drive_num].online = true; + drives[drive_num].is_packet = true; - // outb(io + ATA_REG_COMMAND, ATA_CMD_IDENTIFY_PACKET); + outb(io + ATA_REG_COMMAND, ATA_CMD_IDENTIFY_PACKET); + + for(int i = 0; i < 256; i++) { + *(uint16_t *)(ide_buf + i) = inw(io + ATA_REG_DATA); + } + + uint16_t* fwver = kcalloc(8, 1); + uint16_t* model_name = kcalloc(40, 1); + uint16_t* serial = kcalloc(20, 1); + + memcpy(serial, ide_buf + 10, 20); + memcpy(fwver, ide_buf + 23, 8); + memcpy(model_name, ide_buf + 27, 40); + + for(int i = 0; i < 10; i++) { + serial[i] = bit_flip_short(serial[i]); + } + + for(int i = 0; i < 4; i++) { + fwver[i] = bit_flip_short(fwver[i]); + } + + for(int i = 0; i < 20; i++) { + model_name[i] = bit_flip_short(model_name[i]); + } + + // Zero-terminate the strings + ((uint8_t*)serial)[19] = 0; + ((uint8_t*)fwver)[7] = 0; + ((uint8_t*)model_name)[39] = 0; - // for(int i = 0; i < 256; i++) { - // *(uint16_t *)(ide_buf + i * 2) = ins(io + ATA_REG_DATA); - // } // Do my best for processing packet device. - // 1. Get disc content size + drives[drive_num].capacity = atapi_read_size(bus, drive); + drives[drive_num].block_size = atapi_read_block_size(bus, drive); - drives[(bus << 1) | drive].capacity = atapi_read_size(bus, drive); - drives[(bus << 1) | drive].block_size = atapi_read_block_size(bus, drive); + drives[drive_num].fwversion = (char *) fwver; + drives[drive_num].model_name = (char *) model_name; + drives[drive_num].serial_number = (char *) serial; - qemu_log("Size is: %d", drives[(bus << 1) | drive].capacity); + qemu_log("Size is: %d", drives[drive_num].capacity); - return 0; - } else if(lba_m == 0x3C && lba_h == 0xC3) { - // https://wiki.osdev.org/SATA + memset(ide_buf, 0, 512); - // Send a standard IDENTIFY command to the drive (0xEC). - // The drive should respond with an error in the ERR bit of the Status Register, - // and a pair of "signature bytes". - - // On the Primary ATA bus, you get the signature bytes by reading IO ports 0x1F4 and 0x1F5, - // and you should see values of 0x3C and 0xC3. + qemu_note("DRIVE: %d", drive_num); + + qemu_note("Serial: %s", serial); + qemu_note("Firmware version: %s", fwver); + qemu_note("Model name: %s", model_name); + + ndpm_add_drive(&(drives[drive_num]), ata_ndpm_read, ata_ndpm_write); - // NDRAEY: What about Secondary bus? 0x174 and 0x175? + // (drive_num) is an index (0, 1, 2, 3) of disk + int disk_inx = dpm_reg( + possible_dpm_letters_for_ata[drive_num], + "CD\\DVD drive", + "Unknown", + 1, + drives[drive_num].capacity * drives[drive_num].block_size, + drives[drive_num].capacity, + drives[drive_num].block_size, + 3, // Ставим 3ку, так как будем юзать функции для чтения и записи + "DISK1234567890", + (void*)drive_num // Оставим тут индекс диска + ); - qemu_log("FUCKING SATA!!!"); + if (disk_inx < 0){ + qemu_err("[ATA] [DPM] [ERROR] An error occurred during disk registration, error code: %d",disk_inx); - drives[DRIVE(bus, drive)].is_sata = true; + } else { + qemu_ok("[ATA] [DPM] [Successful] [is_packet: %d] Your disk index: %d",drives[drive_num].is_packet, disk_inx); + dpm_fnc_write(disk_inx + 65, &dpm_ata_pio_read, &dpm_ata_pio_write); + } return 0; + } else if(seccount == 0x7F && lba_l == 0x7F && lba_m == 0x7F && lba_h == 0x7F) { + qemu_err("Error possible (Virtualbox returns 0x7f 0x7f 0x7f 0x7f for non-existent drives)"); + return 1; } /* Now, poll until BSY is clear. */ - while((inb(io + ATA_REG_STATUS) & ATA_SR_BSY) != 0){ - status = inb(io + ATA_REG_STATUS); - + while((status & ATA_SR_BSY) != 0){ qemu_log("Got status %x", status); if(status & ATA_SR_ERR) { qemu_log("%s %s has ERR set. Disabled.", PRIM_SEC(bus), MAST_SLV(drive)); @@ -135,13 +214,13 @@ uint8_t ide_identify(uint8_t bus, uint8_t drive) { } else { timeout--; } + + status = inb(io + ATA_REG_STATUS); } timeout = DEFAULT_TIMEOUT; while(!(status & ATA_SR_DRQ)) { - status = inb(io + ATA_REG_STATUS); - qemu_log("Got status %x", status); if(status & ATA_SR_ERR) { qemu_log("%s %s has ERR set. Disabled.", PRIM_SEC(bus), MAST_SLV(drive)); @@ -151,19 +230,21 @@ uint8_t ide_identify(uint8_t bus, uint8_t drive) { if(!timeout) { qemu_log("ATA Timeout expired!"); return 1; - } else { - timeout--; } + + timeout--; + + status = inb(io + ATA_REG_STATUS); } - drives[(bus << 1) | drive].online = true; + drives[drive_num].online = true; qemu_log("%s %s is online.", PRIM_SEC(bus), MAST_SLV(drive)); for(int i = 0; i < 256; i++) { - *(uint16_t *)(ide_buf + i * 2) = ins(io + ATA_REG_DATA); + *(uint16_t *)(ide_buf + i) = inw(io + ATA_REG_DATA); } - + uint16_t capacity_lba = ide_buf[ATA_IDENT_MAX_LBA]; uint16_t capacity_lba_ext = ide_buf[ATA_IDENT_MAX_LBA_EXT]; @@ -171,27 +252,81 @@ uint8_t ide_identify(uint8_t bus, uint8_t drive) { uint16_t hds = ide_buf[ATA_IDENT_HEADS]; uint16_t scs = ide_buf[ATA_IDENT_SECTORS]; + // Dump model and firmware version + drives[drive_num].fwversion = kcalloc(8, 1); + drives[drive_num].model_name = kcalloc(40, 1); + drives[drive_num].serial_number = kcalloc(20, 1); + + uint16_t* fwver = (uint16_t *) drives[drive_num].fwversion; + uint16_t* model_name = (uint16_t *) drives[drive_num].model_name; + uint16_t* serial = (uint16_t *) drives[drive_num].serial_number; + + memcpy(serial, ide_buf + 10, 20); + memcpy(fwver, ide_buf + 23, 8); + memcpy(model_name, ide_buf + 27, 40); + + for(int i = 0; i < 10; i++) { + serial[i] = bit_flip_short(serial[i]); + } + + for(int i = 0; i < 4; i++) { + fwver[i] = bit_flip_short(fwver[i]); + } + + for(int i = 0; i < 20; i++) { + model_name[i] = bit_flip_short(model_name[i]); + } + + // Zero-terminate the strings + ((uint8_t*)serial)[19] = 0; + ((uint8_t*)fwver)[7] = 0; + ((uint8_t*)model_name)[39] = 0; + size_t capacity = capacity_lba; if(!capacity_lba) { if(!capacity_lba_ext) { // capacity = (cyl * hds * scs) + 128; - drives[(bus << 1) | drive].is_chs_addressing = true; + drives[drive_num].is_chs_addressing = true; - drives[(bus << 1) | drive].cylinders = cyl; - drives[(bus << 1) | drive].heads = hds; - drives[(bus << 1) | drive].sectors = scs; + drives[drive_num].cylinders = cyl; + drives[drive_num].heads = hds; + drives[drive_num].sectors = scs; } else { capacity = capacity_lba_ext; } } - drives[(bus << 1) | drive].block_size = 512; - drives[(bus << 1) | drive].capacity = capacity * 512; + drives[drive_num].drive = drive_num; + drives[drive_num].block_size = 512; + drives[drive_num].capacity = capacity; + + // (drive_num) is an index (0, 1, 2, 3) of disk + int disk_inx = dpm_reg( + possible_dpm_letters_for_ata[drive_num], + "ATA IDE Disk", + "Unknown", + 1, + capacity * 512, + capacity, + drives[drive_num].block_size, + 3, // Ставим 3ку, так как будем юзать функции для чтения и записи + "DISK1234567890", + (void*)drive_num // Оставим тут индекс диска + ); + + if (disk_inx < 0){ + qemu_err("[ATA] [DPM] [ERROR] An error occurred during disk registration, error code: %d",disk_inx); + } else { + qemu_ok("[ATA] [DPM] [Successful] [is_packet: %d] Your disk index: %d",drives[drive_num].is_packet, disk_inx); + dpm_fnc_write(disk_inx + 65, &dpm_ata_pio_read, &dpm_ata_pio_write); + } + + ndpm_add_drive(drives + drive_num, ata_ndpm_read, ata_ndpm_write); qemu_log("Identify finished"); }else{ - qemu_log("%s %s => No status. Drive may be disconnected!", PRIM_SEC(bus), MAST_SLV(drive)); + qemu_err("%s %s => No status. Drive may be disconnected!", PRIM_SEC(bus), MAST_SLV(drive)); return 1; } @@ -239,28 +374,17 @@ void ide_poll(uint16_t io) { while(1) { status = inb(io + ATA_REG_STATUS); - if(status & ATA_SR_ERR) - qemu_log("ERR set, device failure!\n"); - // break; + if(status & ATA_SR_ERR) { + qemu_err("ERR set, device failure!\n"); + break; + } if(status & ATA_SR_DRQ) break; } } -static inline void ata_set_params(uint8_t drive, uint16_t* io, uint8_t* real_drive) { - uint8_t _io = drive >> 1; - uint8_t _drv = drive & 1; - - if(_io == ATA_PRIMARY) - *io = ATA_PRIMARY_IO; - else if(_io == ATA_SECONDARY) - *io = ATA_SECONDARY_IO; - - *real_drive = _drv; -} - -uint8_t ata_read_sector(uint8_t drive, uint8_t *buf, uint32_t lba) { +uint8_t ata_pio_read_sector(uint8_t drive, uint8_t *buf, uint32_t lba) { ON_NULLPTR(buf, { qemu_log("Buffer is nullptr!"); return 0; @@ -296,7 +420,7 @@ uint8_t ata_read_sector(uint8_t drive, uint8_t *buf, uint32_t lba) { uint16_t* buf16 = (uint16_t*)buf; for(int i = 0; i < 256; i++) { - uint16_t data = ins(ata_data_reg); + uint16_t data = inw(ata_data_reg); *(buf16 + i) = data; } @@ -305,7 +429,14 @@ uint8_t ata_read_sector(uint8_t drive, uint8_t *buf, uint32_t lba) { return 1; } -uint8_t ata_write_raw_sector(uint8_t drive, const uint8_t *buf, uint32_t lba) { +/** + * @brief Полностью перезаписывает сектор на диске + * @param drive Номер диска + * @param buf Юуффер с данными + * @param lba Номер сектора + * @return 0 - ошибка, 1 - ок + */ +uint8_t ata_pio_write_raw_sector(uint8_t drive, const uint8_t *buf, uint32_t lba) { ON_NULLPTR(buf, { qemu_log("Buffer is nullptr!"); return 0; @@ -327,7 +458,7 @@ uint8_t ata_write_raw_sector(uint8_t drive, const uint8_t *buf, uint32_t lba) { uint8_t slavebit = (drive == ATA_MASTER?0x00:0x01); outb(io + ATA_REG_HDDEVSEL, (cmd | (slavebit << 4) | (uint8_t)((lba >> 24 & 0x0F)))); - outb(io + 1, 0x00); + outb(io + 1, 0x00); outb(io + ATA_REG_SECCOUNT0, 1); outb(io + ATA_REG_LBA0, (uint8_t)((lba))); outb(io + ATA_REG_LBA1, (uint8_t)((lba) >> 8)); @@ -337,7 +468,7 @@ uint8_t ata_write_raw_sector(uint8_t drive, const uint8_t *buf, uint32_t lba) { ide_poll(io); for(int i = 0; i < 256; i++) { - outs(io + ATA_REG_DATA, *(uint16_t*)(buf + i * 2)); + outw(io + ATA_REG_DATA, *(uint16_t*)(buf + i * 2)); ide_400ns_delay(io); } @@ -347,18 +478,18 @@ uint8_t ata_write_raw_sector(uint8_t drive, const uint8_t *buf, uint32_t lba) { } // UNTESTED -void ata_write_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, size_t sectors) { +void ata_pio_write_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, size_t sectors) { ON_NULLPTR(buf, { qemu_log("Buffer is nullptr!"); return; }); for(size_t i = 0; i < sectors; i++) { - ata_write_raw_sector(drive, buf + (i * drives[drive].block_size), lba + i); + ata_pio_write_raw_sector(drive, buf + (i * drives[drive].block_size), lba + i); } } -void ata_read_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, uint32_t numsects) { +void ata_pio_read_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, uint32_t numsects) { ON_NULLPTR(buf, { qemu_log("Buffer is nullptr!"); return; @@ -367,13 +498,13 @@ void ata_read_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, uint32_t numsec uint8_t* rbuf = buf; for(size_t i = 0; i < numsects; i++) { - ata_read_sector(drive, rbuf, lba + i); + ata_pio_read_sector(drive, rbuf, lba + i); rbuf += drives[drive].block_size; } } // UNTESTED -void ata_read(uint8_t drive, uint8_t* buf, uint32_t location, uint32_t length) { +void ata_pio_read(uint8_t drive, uint8_t* buf, uint32_t location, uint32_t length) { ON_NULLPTR(buf, { qemu_log("Buffer is nullptr!"); return; @@ -395,7 +526,7 @@ void ata_read(uint8_t drive, uint8_t* buf, uint32_t location, uint32_t length) { uint8_t* real_buf = kmalloc(real_length); if(!drives[drive].is_packet) { - ata_read_sectors(drive, real_buf, start_sector, sector_count); + ata_pio_read_sectors(drive, real_buf, start_sector, sector_count); } else { atapi_read_sectors(drive, real_buf, start_sector, sector_count); } @@ -405,7 +536,7 @@ void ata_read(uint8_t drive, uint8_t* buf, uint32_t location, uint32_t length) { kfree(real_buf); } -void ata_write(uint8_t drive, const uint8_t* buf, size_t location, size_t length) { +void ata_pio_write(uint8_t drive, const uint8_t* buf, size_t location, size_t length) { ON_NULLPTR(buf, { qemu_log("Buffer is nullptr!"); return; @@ -421,17 +552,32 @@ void ata_write(uint8_t drive, const uint8_t* buf, size_t location, size_t length size_t sector_count = end_sector - start_sector + 1; uint8_t* temp_buf = kmalloc(sector_count * drives[drive].block_size); - - ata_read_sectors(drive, temp_buf, start_sector, sector_count); + + ata_pio_read_sectors(drive, temp_buf, start_sector, sector_count); size_t start_offset = location % drives[drive].block_size; memcpy(temp_buf + start_offset, buf, length); - - ata_write_sectors(drive, temp_buf, start_sector, sector_count); + + ata_pio_write_sectors(drive, temp_buf, start_sector, sector_count); kfree(temp_buf); } +void ata_ndpm_read(const ndpm_drive_t* drive, size_t location, int size, void* buffer) { + ata_drive_t* disk = drive->drive_specific_data; + + qemu_note("Reading disk: %d", disk->drive); + + ata_pio_read(disk->drive, buffer, location, size); +} + +void ata_ndpm_write(const ndpm_drive_t* drive, size_t location, int size, void* buffer) { + ata_drive_t* disk = drive->drive_specific_data; + + qemu_note("Writing disk: %d", disk->drive); + + ata_pio_write(disk->drive, buffer, location, size); +} void ata_list() { for (size_t i = 0; i < 4; i++) { @@ -441,11 +587,16 @@ void ata_list() { drives[i].online?"online ":"offline" ); + if(!drives[i].online) { + _tty_printf("\n"); + continue; + } + if(!drives[i].is_chs_addressing) { _tty_printf("(%d bytes | %d KB | %d MB)", - drives[i].capacity, - drives[i].capacity >> 10, - drives[i].capacity >> 20); + (drives[i].capacity * drives[i].block_size), + (drives[i].capacity * drives[i].block_size) >> 10, + (drives[i].capacity * drives[i].block_size) >> 20); } else { _tty_printf("(C:H:S => %d:%d:%d)", drives[i].cylinders, @@ -459,6 +610,12 @@ void ata_list() { if(drives[i].is_sata) _tty_printf(" [SATA]"); + qemu_note("Drive %d", i); + qemu_note("'%s' '%s' '%s'", drives[i].model_name, drives[i].fwversion, drives[i].serial_number); + + _tty_printf("\n\t|-- Model: \"%s\"; Firmware version: \"%s\";", drives[i].model_name, drives[i].fwversion); + _tty_printf("\n\t|-- Serial number: \"%s\";", drives[i].serial_number); + _tty_printf("\n"); } @@ -479,7 +636,7 @@ void ata_check_all() { void ata_init() { qemu_log("Checking for ATA drives"); - ide_buf = (uint16_t*)kmalloc(512); + ide_buf = (uint16_t*)kcalloc(512, 1); register_interrupt_handler(32 + ATA_PRIMARY_IRQ, ide_primary_irq); // Fuck IRQs register_interrupt_handler(32 + ATA_SECONDARY_IRQ, ide_secondary_irq); diff --git a/kernel/src/drv/disk/ata_dma.c b/kernel/src/drv/disk/ata_dma.c new file mode 100644 index 000000000..ef605c5d5 --- /dev/null +++ b/kernel/src/drv/disk/ata_dma.c @@ -0,0 +1,472 @@ +#include "common.h" +#include "drv/disk/ata_dma.h" +#include "drv/pci.h" +#include "io/ports.h" +#include "mem/vmm.h" +#include "mem/pmm.h" +#include "drv/disk/ata.h" +#include "debug/hexview.h" + +#define ATA_PCI_VEN 0x8086 +#define ATA_PCI_DEV 0x7010 + +#define ATA_DMA_READ 0xC8 +#define ATA_DMA_WRITE 0xCA + +uint8_t ata_busnum; +uint8_t ata_slot; +uint8_t ata_func; + +uint16_t ata_dma_bar4; + +prdt_t* ata_dma_prdt = 0; +size_t ata_dma_phys_prdt = 0; +size_t prdt_entry_count = 16; + +extern ata_drive_t drives[4]; + +void ata_dma_init() { + pci_find_device(ATA_PCI_VEN, ATA_PCI_DEV, &ata_busnum, &ata_slot, &ata_func); + + uint16_t devnum = pci_get_device(ata_busnum, ata_slot, ata_func); + + qemu_log("ATA DMA ID: %d (%x)", devnum, devnum); + + if(devnum == PCI_VENDOR_NO_DEVICE) { + qemu_log("ATA DMA not found!"); + return; + }else{ + qemu_log("Detected ATA DMA"); + } + + qemu_log("Enabling Busmastering"); + + uint16_t command_register = pci_read_confspc_word(ata_busnum, ata_slot, ata_func, 4); + command_register |= 0x05; + pci_write(ata_busnum, ata_slot, ata_func, 4, command_register); + + qemu_log("Enabled Busmastering!!!"); + + ata_dma_bar4 = pci_read_confspc_word(ata_busnum, ata_slot, ata_func, 0x20); + + if(ata_dma_bar4 & 0x01) { + ata_dma_bar4 &= 0xfffffffc; + } + + qemu_log("ATA DMA: BAR4: %x (%d)", ata_dma_bar4, ata_dma_bar4); + + qemu_log("PRDT: %d bytes", sizeof(prdt_t)); + + // SETUP PRDT + ata_dma_prdt = kmalloc_common(sizeof(prdt_t) * prdt_entry_count, PAGE_SIZE); + memset(ata_dma_prdt, 0, sizeof(prdt_t) * prdt_entry_count); + + ata_dma_phys_prdt = virt2phys(get_kernel_page_directory(), (virtual_addr_t) ata_dma_prdt); + + qemu_log("PRDT ON: V%x; P%x", ata_dma_prdt, ata_dma_phys_prdt); +} + +void ata_dma_clear_prdt() { + memset(ata_dma_prdt, 0, sizeof(prdt_t) * prdt_entry_count); +} + +void ata_dma_set_prdt_entry(prdt_t* prdt, uint16_t index, uint32_t address, uint16_t byte_count, bool is_last) { + prdt[index].buffer_phys = address; + prdt[index].transfer_size = byte_count; + prdt[index].mark_end = is_last ? ATA_DMA_MARK_END : 0; +} + +void dump_prdt(prdt_t* prdt) { + int i = 0; + size_t bytes = 0; + qemu_warn("Dumping PRDT:"); + do { + size_t size; + + if(prdt[i].transfer_size == 0) + size = 65536; + else + size = prdt[i].transfer_size; + + qemu_log("[%d:%d] [Address: %x] -> %d", i, prdt[i].mark_end, prdt[i].buffer_phys, size); + + bytes += size; + i++; + } while(prdt[i - 1].mark_end != ATA_DMA_MARK_END); + + qemu_ok("Entries: %d; Bytes to process: %d", i, bytes); +} + +status_t ata_dma_read_sector(uint8_t drive, uint8_t *buf, uint32_t lba) { + ON_NULLPTR(buf, { + qemu_err("Buffer is nullptr!"); + return E_INVALID_BUFFER; + }); + + if (!drives[drive].online) { + qemu_err("Attempted read from drive that does not exist."); + return E_DEVICE_NOT_ONLINE; + } + + // Clear our prdt + ata_dma_clear_prdt(); + + // Allocate a temporary buffer + void* temp_buf = kmalloc_common(PAGE_SIZE, PAGE_SIZE); + memset(temp_buf, 0, PAGE_SIZE); + + // Make a physical address from a virtual to tell DMA where is our temp buffer + size_t phys_buf = virt2phys(get_kernel_page_directory(), (virtual_addr_t) temp_buf); + + // Set only one PRDT entry to read only 512 bytes + ata_dma_set_prdt_entry(ata_dma_prdt, 0, phys_buf, 512, true); + + // Only 28-bit LBA supported! + lba &= 0x00FFFFFF; + + uint16_t io = 0; + + // Set our port address and drive number + ata_set_params(drive, &io, &drive); + + // Set our addresses according to IO + size_t status_offset = io == ATA_PRIMARY_IO ? ATA_DMA_PRIMARY_STATUS : ATA_DMA_SECONDARY_STATUS; + size_t prdt_offset = io == ATA_PRIMARY_IO ? ATA_DMA_PRIMARY_PRDT : ATA_DMA_SECONDARY_PRDT; + size_t cmd_offset = io == ATA_PRIMARY_IO ? ATA_DMA_PRIMARY_CMD : ATA_DMA_SECONDARY_CMD; + + outb(ata_dma_bar4 + cmd_offset, 8); + outb(ata_dma_bar4 + status_offset, 6); + + // Send our PRDT address + outl(ata_dma_bar4 + prdt_offset, ata_dma_phys_prdt); + + // Select drive + outb(io + ATA_REG_HDDEVSEL, drive == ATA_MASTER ? 0xE0 : 0xF0); + outb(io + 1, 0x00); + + // Write LBA + outb(io + ATA_REG_LBA0, (uint8_t)((lba) & 0xFF)); + outb(io + ATA_REG_LBA1, (uint8_t)((lba >> 8) & 0xFF)); + outb(io + ATA_REG_LBA2, (uint8_t)((lba >> 16) & 0xFF)); + + // Send command to read DMA! + outb(io + ATA_REG_COMMAND, ATA_CMD_READ_DMA); + + // Start DMA transfer! + outb(ata_dma_bar4 + cmd_offset, 9); + + while (1) { + int status = inb(ata_dma_bar4 + status_offset); + int dstatus = inb(io + ATA_REG_STATUS); + +// qemu_log("Status: %x; Dstatus: %x; ERR: %d", status, dstatus, status & (1 << 1)); + + if (!(status & 0x04)) continue; + if (!(dstatus & 0x80)) break; + } + + outb(ata_dma_bar4 + cmd_offset, 0); + + memcpy(buf, temp_buf, 512); + + kfree(temp_buf); + + return OK; +} + +// Internal function: do not use in production! +// WARNING: buffer is MUST be PAGE_SIZE aligned! +// WARNING: if numsects = 0 there's 256 sectors +status_t ata_dma_read_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, uint8_t numsects) { + ON_NULLPTR(buf, { + qemu_err("Buffer is nullptr!"); + return E_INVALID_BUFFER; + }); + + if (!drives[drive].online) { + qemu_err("Attempted read from drive that does not exist."); + return E_DEVICE_NOT_ONLINE; + } + + + // Clear our prdt + ata_dma_clear_prdt(); + + // Make a physical address from a virtual to tell DMA where is our temp buffer + size_t phys_buf = virt2phys(get_kernel_page_directory(), (virtual_addr_t)buf); +// qemu_log("Read: buffer at %x (P%x); LBA: %d; %d sectors", buf, phys_buf, lba, numsects); + + // Fill the PRDT + int i = 0; + size_t byte_count; + + if(numsects == 0) + byte_count = 256 * 512; + else + byte_count = numsects * 512; + +// qemu_warn("Filling with: %d bytes", byte_count); + + while(byte_count >= 65536) { + byte_count -= 65536; + + ata_dma_set_prdt_entry(ata_dma_prdt, i, phys_buf + (i * 65536), 0, false); + + i++; + } +// qemu_warn("Remaining bytes: %d", byte_count); + + if(byte_count != 0) { +// qemu_ok("Zero!"); + ata_dma_set_prdt_entry(ata_dma_prdt, i, phys_buf + (i * 65536), byte_count, true); + } else { +// qemu_ok("Not zero!"); + ata_dma_prdt[i - 1].mark_end = ATA_DMA_MARK_END; + } + +// dump_prdt(ata_dma_prdt); + + // Only 28-bit LBA supported! + lba &= 0x00FFFFFF; + + uint16_t io = 0; + + // Set our port address and drive number + ata_set_params(drive, &io, &drive); + + // Set our addresses according to IO + size_t status_offset = io == ATA_PRIMARY_IO ? ATA_DMA_PRIMARY_STATUS : ATA_DMA_SECONDARY_STATUS; + size_t prdt_offset = io == ATA_PRIMARY_IO ? ATA_DMA_PRIMARY_PRDT : ATA_DMA_SECONDARY_PRDT; + size_t cmd_offset = io == ATA_PRIMARY_IO ? ATA_DMA_PRIMARY_CMD : ATA_DMA_SECONDARY_CMD; + + outb(ata_dma_bar4 + cmd_offset, 8); + outb(ata_dma_bar4 + status_offset, 6); + + // Send our PRDT address + outl(ata_dma_bar4 + prdt_offset, ata_dma_phys_prdt); + + // Select drive + outb(io + ATA_REG_HDDEVSEL, drive == ATA_MASTER ? 0xE0 : 0xF0); + outb(io + 1, 0x00); + + // Write LBA + outb(io + ATA_REG_SECCOUNT0, numsects); // 0x00 is 128KB + outb(io + ATA_REG_LBA0, lba & 0xFF); + outb(io + ATA_REG_LBA1, (lba >> 8) & 0xFF); + outb(io + ATA_REG_LBA2, (lba >> 16) & 0xFF); + + // Send command to read DMA! + outb(io + ATA_REG_COMMAND, ATA_CMD_READ_DMA); + + // TODO: WAIT DRQ HERE + + // Start DMA transfer! + outb(ata_dma_bar4 + cmd_offset, 9); + + while (1) { + int status = inb(ata_dma_bar4 + status_offset); + int dstatus = inb(io + ATA_REG_STATUS); + +// qemu_log("Status: %x; Dstatus: %x; ERR: %d", status, dstatus, status & (1 << 1)); + + if (!(status & 0x04)) continue; + if (!(dstatus & 0x80)) break; + } + + outb(ata_dma_bar4 + cmd_offset, 0); + +// int status = inb(ata_dma_bar4 + status_offset); +// int dstatus = inb(io + ATA_REG_STATUS); +// +// qemu_log("FINAL: Status: %x; Dstatus: %x; ERR: %d", status, dstatus, status & (1 << 1)); + + return OK; +} + +// Internal function: do not use in production! +// WARNING: buffer is MUST be PAGE_SIZE aligned! +// WARNING: if numsects = 0 there's 256 sectors +status_t ata_dma_write_sectors(uint8_t drive, uint8_t *buf, uint32_t lba, uint8_t numsects) { + ON_NULLPTR(buf, { + qemu_err("Buffer is nullptr!"); + return E_INVALID_BUFFER; + }); + + if (!drives[drive].online) { + qemu_err("Attempted read from drive that does not exist."); + return E_DEVICE_NOT_ONLINE; + } + + // Clear our prdt + ata_dma_clear_prdt(); + + // Make a physical address from a virtual to tell DMA where is our temp buffer + size_t phys_buf = virt2phys(get_kernel_page_directory(), (virtual_addr_t)buf); +// qemu_log("Read: buffer at %x (P%x); LBA: %d; %d sectors", buf, phys_buf, lba, numsects); + + // Fill the PRDT + int i = 0; + size_t byte_count; + + if(numsects == 0) + byte_count = 256 * 512; + else + byte_count = numsects * 512; + +// qemu_warn("Filling with: %d bytes", byte_count); + + while(byte_count >= 65536) { + byte_count -= 65536; + + ata_dma_set_prdt_entry(ata_dma_prdt, i, phys_buf + (i * 65536), 0, false); + + i++; + } +// qemu_warn("Remaining bytes: %d", byte_count); + + if(byte_count != 0) { +// qemu_ok("Zero!"); + ata_dma_set_prdt_entry(ata_dma_prdt, i, phys_buf + (i * 65536), byte_count, true); + } else { +// qemu_ok("Not zero!"); + ata_dma_prdt[i - 1].mark_end = ATA_DMA_MARK_END; + } + +// dump_prdt(ata_dma_prdt); + + // Only 28-bit LBA supported! + lba &= 0x00FFFFFF; + + uint16_t io = 0; + + // Set our port address and drive number + ata_set_params(drive, &io, &drive); + + // Set our addresses according to IO + size_t status_offset = io == ATA_PRIMARY_IO ? ATA_DMA_PRIMARY_STATUS : ATA_DMA_SECONDARY_STATUS; + size_t prdt_offset = io == ATA_PRIMARY_IO ? ATA_DMA_PRIMARY_PRDT : ATA_DMA_SECONDARY_PRDT; + size_t cmd_offset = io == ATA_PRIMARY_IO ? ATA_DMA_PRIMARY_CMD : ATA_DMA_SECONDARY_CMD; + + outb(ata_dma_bar4 + cmd_offset, 0); + outb(ata_dma_bar4 + status_offset, 6); + + // Send our PRDT address + outl(ata_dma_bar4 + prdt_offset, ata_dma_phys_prdt); + + // Select drive + outb(io + ATA_REG_HDDEVSEL, drive == ATA_MASTER ? 0xE0 : 0xF0); + outb(io + 1, 0x00); + + // Write LBA + outb(io + ATA_REG_SECCOUNT0, numsects); // 0x00 is 128KB + outb(io + ATA_REG_LBA0, lba & 0xFF); + outb(io + ATA_REG_LBA1, (lba >> 8) & 0xFF); + outb(io + ATA_REG_LBA2, (lba >> 16) & 0xFF); + + // Send command to write DMA! + outb(io + ATA_REG_COMMAND, ATA_CMD_WRITE_DMA); + + // TODO: WAIT DRQ HERE + + // Start DMA transfer! + outb(ata_dma_bar4 + cmd_offset, 1); + + while (1) { + int status = inb(ata_dma_bar4 + status_offset); + int dstatus = inb(io + ATA_REG_STATUS); + + qemu_log("Status: %x; Dstatus: %x; ERR: %d", status, dstatus, status & (1 << 1)); + + if (!(status & 0x04)) continue; + if (!(dstatus & 0x80)) break; + } + + outb(ata_dma_bar4 + cmd_offset, 0); + + return OK; +} + +status_t ata_dma_read(uint8_t drive, char *buf, uint32_t location, uint32_t length) { + ON_NULLPTR(buf, { + qemu_err("Buffer is nullptr!"); + return E_INVALID_BUFFER; + }); + + if(!drives[drive].online) { + qemu_log("Attempted read from drive that does not exist."); + return E_DEVICE_NOT_ONLINE; + } + + size_t start_sector = location / drives[drive].block_size; + size_t end_sector = (location + length - 1) / drives[drive].block_size; + size_t sector_count = end_sector - start_sector + 1; + + size_t real_length = sector_count * drives[drive].block_size; + + // TODO: Optimize to read without kmalloc + uint8_t* real_buf = kmalloc_common(real_length, PAGE_SIZE); + + if(!drives[drive].is_packet) { + // Okay, ATA can only read 256 sectors (128 KB of memory) at one request, so subdivide our data to clusters to manage. + int i = 0; + size_t cluster_count = sector_count / 256; + size_t remaining_count = sector_count % 256; + + for(; i < cluster_count; i++) { + ata_dma_read_sectors(drive, real_buf + (i * (65536 * 2)), start_sector + (i * 256), 0); + } + + if(remaining_count != 0) + ata_dma_read_sectors(drive, real_buf + (i * (65536 * 2)), start_sector + (i * 256), remaining_count); + } + + memcpy(buf, real_buf + (location % drives[drive].block_size), length); + + kfree(real_buf); + + return OK; +} + +status_t ata_dma_write(uint8_t drive, const char *buf, uint32_t location, uint32_t length) { + ON_NULLPTR(buf, { + qemu_err("Buffer is nullptr!"); + return E_INVALID_BUFFER; + }); + + if(!drives[drive].online) { + qemu_log("Attempted read from drive that does not exist."); + return E_DEVICE_NOT_ONLINE; + } + + size_t start_sector = location / drives[drive].block_size; + size_t end_sector = (location + length - 1) / drives[drive].block_size; + size_t sector_count = end_sector - start_sector + 1; + + size_t real_length = sector_count * drives[drive].block_size; + + // TODO: Optimize to read without kmalloc + uint8_t* real_buf = kmalloc_common(real_length, PAGE_SIZE); + + ata_dma_read_sectors(drive, real_buf, start_sector, sector_count); + + size_t start_offset = location % drives[drive].block_size; + memcpy(real_buf + start_offset, buf, length); + + if(!drives[drive].is_packet) { + // Okay, ATA can only operate with 256 sectors (128 KB of memory) at one request, so subdivide our data to clusters to manage. + int i = 0; + size_t cluster_count = sector_count / 256; + size_t remaining_count = sector_count % 256; + + for(; i < cluster_count; i++) { + ata_dma_write_sectors(drive, real_buf + (i * (65536 * 2)), start_sector + (i * 256), 0); + } + + if(remaining_count != 0) + ata_dma_write_sectors(drive, real_buf + (i * (65536 * 2)), start_sector + (i * 256), remaining_count); + } + + kfree(real_buf); + + return OK; +} diff --git a/kernel/src/drv/disk/atapi.c b/kernel/src/drv/disk/atapi.c index 346cae229..0d66e1d1c 100644 --- a/kernel/src/drv/disk/atapi.c +++ b/kernel/src/drv/disk/atapi.c @@ -1,11 +1,25 @@ +/** + * @brief Драйвер ATAPI PIO + * @author NDRAEY >_ + * @date 2023-07-21 + * @version 0.3.4 + * @copyright Copyright SayoriOS Team (c) 2022-2023 + */ + // Super-duper original ATAPI driver by NDRAEY (c) 2023 // for SayoriOS #include "drv/atapi.h" +#include "net/endianess.h" #include "debug/hexview.h" // FIXME: Add REQUEST_SENSE command to handle errors. +/** + * @brief Ждёт пока освободится порт ATA + * @param bus Шина (PRIMARY или SECONDARY) + * @return true - если есть ошибка, false - всё ок + */ bool ata_scsi_status_wait(uint8_t bus) { while (1) { uint8_t status = inb(ATA_PORT(bus) + ATA_REG_COMMAND); @@ -22,6 +36,14 @@ bool ata_scsi_status_wait(uint8_t bus) { return false; } +/** + * @brief Отправляет SCSI команду на ATA дисковод + * @param bus Шина (PRIMARY или SECONDARY) + * @param slave Является ли устройство SLAVE + * @param lba_mid_hi Метаданные + * @param command Команда размером 12 байт + * @return + */ bool ata_scsi_send(uint16_t bus, bool slave, uint16_t lba_mid_hi, uint8_t command[12]) { qemu_log("ATAPI SCSI send [%s %s], LBA (MID AND HI): %d", PRIM_SEC(bus), MAST_SLV(slave), lba_mid_hi); @@ -51,7 +73,11 @@ bool ata_scsi_send(uint16_t bus, bool slave, uint16_t lba_mid_hi, uint8_t comman return false; } -// Read size of transfer +/** + * @brief Считывает размер передачи данных + * @param bus Шина (PRIMARY или SECONDARY) + * @return Размер передачи в байтах + */ size_t ata_scsi_receive_size_of_transfer(uint16_t bus) { bool error = ata_scsi_status_wait(bus); @@ -64,11 +90,22 @@ size_t ata_scsi_receive_size_of_transfer(uint16_t bus) { | inb(ATA_PORT(bus) + ATA_REG_LBA1); } +/** + * @brief Считывает данные с ATA дисковода + * @param bus Шина (PRIMARY или SECONDARY) + * @param size Размер в байтах + * @param buffer Буффер для хранения данных + */ void ata_scsi_read_result(uint16_t bus, size_t size, uint16_t* buffer) { insw(ATA_PORT(bus) + ATA_REG_DATA, (uint16_t*)((uint8_t *)buffer), size); } -/// 0 if error +/** + * @brief Считывает размер диска + * @param bus Шина (PRIMARY или SECONDARY) + * @param slave Является ли устройство SLAVE + * @return Размер диска в секторах + */ size_t atapi_read_size(uint16_t bus, bool slave) { qemu_log("SIZE REQUEST ON (ints): %d %d", bus, slave); qemu_log("SIZE REQUEST ON: %s %s", PRIM_SEC(bus), MAST_SLV(slave)); @@ -87,7 +124,7 @@ size_t atapi_read_size(uint16_t bus, bool slave) { if(!transf_size) return 0; - uint16_t* data = (uint16_t*)kcalloc(transf_size, 1); + uint16_t* data = kcalloc(transf_size, 1); ata_scsi_read_result(bus, transf_size, data); @@ -103,9 +140,15 @@ size_t atapi_read_size(uint16_t bus, bool slave) { kfree(data); - return (maxlba + 1) * blocksize; + return maxlba; } +/** + * @brief Считывает размер блока + * @param bus Номер привода в системе + * @param slave Является ли устрйоство SLAVE + * @return Размер блока в байтах + */ size_t atapi_read_block_size(uint16_t bus, bool slave) { uint8_t command[12] = { ATAPI_READ_CAPACITY, @@ -129,6 +172,14 @@ size_t atapi_read_block_size(uint16_t bus, bool slave) { return blocksize; } +/** + * @brief Читает сектора с диска + * @param drive Номер привода в системе + * @param buf Буффер + * @param lba Номер сектора на диске + * @param sector_count Количество секторов которые необходимо прочитать + * @return true - если есть ошибка, false - если нет + */ bool atapi_read_sectors(uint16_t drive, uint8_t *buf, uint32_t lba, size_t sector_count) { uint8_t bus = (drive >> 1) & 1; bool slave = (bool)((drive >> 0) & 1); @@ -164,7 +215,7 @@ bool atapi_read_sectors(uint16_t drive, uint8_t *buf, uint32_t lba, size_t secto } for (uint32_t i = 0; i < sector_count; i++) { - bool error = ata_scsi_status_wait(bus); + error = ata_scsi_status_wait(bus); if(error) return true; @@ -177,6 +228,12 @@ bool atapi_read_sectors(uint16_t drive, uint8_t *buf, uint32_t lba, size_t secto return false; } +/** + * @brief Извлекает диск из привода + * @param bus Шина (PRIMARY или SECONDARY) + * @param slave Является ли диск SLAVE + * @return true если есть ошибка, false - если нет + */ bool atapi_eject(uint8_t bus, bool slave) { // Byte 4: // Bit 0: Start @@ -212,7 +269,13 @@ bool atapi_eject(uint8_t bus, bool slave) { return error; } -// Used for error handling +/** + * @brief Считывает и возвращает ошибку (если таковая имеется) + * @param bus Шина (PRIMARY или SECONDARY) + * @param slave Является ли дисковод SLAVE + * @param out Буффер размером 18 байт + * @return Структура с кодом ошибки + */ atapi_error_code atapi_request_sense(uint8_t bus, bool slave, uint8_t out[18]) { uint8_t command[12] = { ATAPI_CMD_RQ_SENSE, 0, 0, 0, @@ -233,6 +296,12 @@ atapi_error_code atapi_request_sense(uint8_t bus, bool slave, uint8_t out[18]) { return (atapi_error_code){(out[0] >> 7) & 1, out[2] & 0b00001111, out[12], out[13]}; } +/** + * @brief Проверяет дисковод на наличие диска внутри + * @param bus Шина (PRIMARY или SECONDARY) + * @param slave Является ли дисковод SLAVE + * @return true если диск вствлен, false если нет + */ bool atapi_check_media_presence(uint8_t bus, bool slave) { uint8_t command[12] = { ATAPI_CMD_READY, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 @@ -245,7 +314,7 @@ bool atapi_check_media_presence(uint8_t bus, bool slave) { return false; } - char errorcode[18]; + uint8_t errorcode[18]; atapi_error_code error_code = atapi_request_sense(1, 0, errorcode); diff --git a/kernel/src/drv/disk/dpm.c b/kernel/src/drv/disk/dpm.c new file mode 100644 index 000000000..a8f127481 --- /dev/null +++ b/kernel/src/drv/disk/dpm.c @@ -0,0 +1,260 @@ +/** + * @file drv/disk/dpm.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief Disk Partition Manager - Менеджер разметки дисков + * @version 0.3.4 + * @date 2023-10-16 + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ + +#include +#include +#include "mem/vmm.h" +bool dpm_debug = false; + +DPM_Disk DPM_Disks[32] = {0}; + +int dpm_searchFreeIndex(int Index){ + Index = (Index < 0 || Index > 25 ? 0 : Index); + + for (int i = Index; i < 32; i++){ + if (DPM_Disks[i].Ready == 1) + continue; + + return i; + } + + for (int i = 4; i < 32; i++){ + if (DPM_Disks[i].Ready == 1) + continue; + + return i; + } + + return -1; +} + +void dpm_fnc_write(char Letter, dpm_disk_rw_cmd Read, dpm_disk_rw_cmd Write){ + int Index = Letter - 65; + + Index = (Index > 32 ? Index - 32 : Index); + Index = (Index < 0 || Index > 25 ? 0 : Index); + + + if (DPM_Disks[Index].Ready == 0 || DPM_Disks[Index].Status == 0) + return; + + DPM_Disks[Index].Read = Read; + DPM_Disks[Index].Write = Write; +} + +void* dpm_metadata_read(char Letter){ + int Index = Letter - 65; + + Index = (Index > 32 ? Index - 32 : Index); + Index = (Index < 0 || Index > 25 ? 0 : Index); + + if (DPM_Disks[Index].Ready == 0 || DPM_Disks[Index].Status == 0) + return 0; + + return DPM_Disks[Index].Reserved; +} + +void dpm_metadata_write(char Letter, uint32_t Addr){ + int Index = Letter - 65; + + Index = (Index > 32 ? Index - 32 : Index); + Index = (Index < 0 || Index > 25 ? 0 : Index); + + DPM_Disks[Index].Reserved = (void*)Addr; +} + +/** + * @brief [DPM] Считывание данных с диска + * + * @param Letter - Буква для считывания + * @param Offset - Отступ для считывания + * @param Size - Кол-во байт данных для считывания + * @param Buffer - Буфер куда будет идти запись + * + * @return Кол-во прочитанных байт + */ +size_t dpm_read(char Letter, size_t Offset, size_t Size, void *Buffer){ + int Index = Letter - 65; + + Index = (Index > 32 ? Index - 32 : Index); + Index = (Index < 0 || Index > 25 ? 0 : Index); + + if (DPM_Disks[Index].Ready == 0 || DPM_Disks[Index].Status == 0) + return DPM_ERROR_NOT_READY; + + if (DPM_Disks[Index].AddrMode == 2){ + // Диск является частью ОЗУ, поэтому мы просто копируем данные оттуда + if (dpm_debug)qemu_log("[DPM] [2] An attempt to read data in 'Disk %c' from position %x to the number of %d bytes.", Index+65, DPM_Disks[Index].Point+Offset, Size); + memcpy(Buffer, (void *) (DPM_Disks[Index].Point + Offset), Size); + + return Size; + } else if (DPM_Disks[Index].AddrMode == 3){ + // Режим 3, предполагает что вы указали функцию для чтения и записи с диска + if (dpm_debug)qemu_log("[DPM] [3] An attempt to read data in 'Disk %c' from position %x to the number of %d bytes.", Index+65, DPM_Disks[Index].Point+Offset, Size); + if (DPM_Disks[Index].Read == 0){ + qemu_err("[DPM] [3] Function 404"); + return 0; + } + + return DPM_Disks[Index].Read(Index,Offset,Size,Buffer); + } else { + if (dpm_debug)qemu_log("[DPM] This functionality has not been implemented yet."); + } + + return DPM_ERROR_NO_READ; +} + +/** + * @brief [DPM] Запись данных на диск + * + * @param Letter - Буква + * @param size_t Offset - Отступ + * @param size_t Size - Кол-во байт данных для записи + * @param Buffer - Буфер откуда будет идти запись + * + * @return size_t - Кол-во записанных байт + */ +size_t dpm_write(char Letter, size_t Offset, size_t Size, char* Buffer){ + int Index = Letter - 65; + + Index = (Index > 32 ? Index - 32 : Index); + Index = (Index < 0 || Index > 25 ? 0 : Index); + + if (DPM_Disks[Index].Ready == 0 || DPM_Disks[Index].Status == 0) + return DPM_ERROR_NOT_READY; + + if (DPM_Disks[Index].AddrMode == 2){ + // Диск является частью ОЗУ, поэтому мы просто копируем данные туда + // Опастна! Если не знать, что делать! + if (dpm_debug)qemu_log("[DPM] [2] An attempt to write data in 'Disk %c' from position %x to the number of %d bytes.", Index+65, DPM_Disks[Index].Point+Offset, Size); + memcpy((void *) (DPM_Disks[Index].Point + Offset), Buffer, Size); + + return Size; + } else if (DPM_Disks[Index].AddrMode == 3){ + // Режим 3, предполагает что вы указали функцию для чтения и записи с диска + if (dpm_debug)qemu_log("[DPM] [3] An attempt to write data in 'Disk %c' from position %x to the number of %d bytes.", Index+65, DPM_Disks[Index].Point+Offset, Size); + if (DPM_Disks[Index].Write == 0){ + qemu_err("[DPM] [3] Function 404"); + return 0; + } + return DPM_Disks[Index].Write(Index,Offset,Size,Buffer); + } else { + if (dpm_debug)qemu_log("[DPM] This functionality has not been implemented yet."); + } + + return DPM_ERROR_NO_READ; +} + +int dpm_unmount(char Letter, bool FreeReserved){ + int Index = Letter - 65; + + Index = (Index > 32 ? Index - 32 : Index); + Index = (Index < 0 || Index > 25 ? 0 : Index); + + if (DPM_Disks[Index].Ready == 0) return 0; + + DPM_Disks[Index].Ready = 0; + + //memcpy(DPM_Disks[Index].Name, NULL, sizeof(NULL)); + //memcpy(DPM_Disks[Index].Serial, NULL, sizeof(NULL)); + //memcpy(DPM_Disks[Index].FileSystem, NULL, sizeof(NULL)); + DPM_Disks[Index].Status = 0; + DPM_Disks[Index].Size = 0; + DPM_Disks[Index].Sectors = 0; + DPM_Disks[Index].SectorSize = 0; + DPM_Disks[Index].AddrMode = 0; + DPM_Disks[Index].Point = 0; + + if (FreeReserved && DPM_Disks[Index].Reserved != 0) { + kfree(DPM_Disks[Index].Reserved); + } + return 1; +} + +/** + * @brief [DPM] Регистрация дискового раздела + * + * @param Letter - Буква для регистрации + * + * @return int - Результат регистрации + */ +int dpm_reg(char Letter, char* Name, char* FS, int Status, size_t Size, size_t Sectors, size_t SectorSize, int AddrMode, char* Serial, void *Point){ + int Index = Letter - 65; + + Index = (Index > 32 ? Index - 32 : Index); + Index = (Index < 0 || Index > 25 ? 0 : Index); + + if (DPM_Disks[Index].Ready == 1){ + qemu_warn("[DPM] Warning! This letter is already occupied, and an attempt will be made to search for a free letter."); + Index = dpm_searchFreeIndex(Index); + if (Index == DPM_ERROR_NO_MOUNT){ + qemu_warn("[DPM] Sorry, but the disk could not be registered because there is no free letter. Delete the extra devices and try again."); + return DPM_ERROR_NO_MOUNT; + } + qemu_log("[DPM] The drive was assigned the letter '%c'",Index+65); + } + + DPM_Disks[Index].Ready = 1; + + memcpy(DPM_Disks[Index].Name,Name,strlen(Name)); + memcpy(DPM_Disks[Index].Serial,Serial,strlen(Serial)); + memcpy(DPM_Disks[Index].FileSystem,FS,strlen(FS)); + DPM_Disks[Index].Status = Status; + DPM_Disks[Index].Size = Size; + DPM_Disks[Index].Sectors = Sectors; + DPM_Disks[Index].SectorSize = SectorSize; + DPM_Disks[Index].AddrMode = AddrMode; + DPM_Disks[Index].Point = Point; + + qemu_log("[DPM] Disk '%c' is registered!",Index+65); + qemu_log(" |-- Name: %s",DPM_Disks[Index].Name); + qemu_log(" |-- Serial: %s",DPM_Disks[Index].Serial); + qemu_log(" |-- FileSystem: %s",DPM_Disks[Index].FileSystem); + qemu_log(" |-- Status: %d",DPM_Disks[Index].Status); + qemu_log(" |-- Size: %d",DPM_Disks[Index].Size); + qemu_log(" |-- Sectors: %d",DPM_Disks[Index].Sectors); + qemu_log(" |-- SectorSize: %d",DPM_Disks[Index].SectorSize); + qemu_log(" |-- AddrMode: %d",DPM_Disks[Index].AddrMode); + qemu_log(" |-- Point: %x",DPM_Disks[Index].Point); + + return Index; +} + +void dpm_FileSystemUpdate(char Letter, char* FileSystem){ + Letter -= 65; + + size_t index = (Letter > 32 ? Letter - 32 : Letter); + index = (Letter < 0 || Letter > 25 ? 0 : Letter); + + size_t c = strlen(FileSystem); + memset(DPM_Disks[index].FileSystem, 0, 64); /// Зачищаем данные + memcpy(DPM_Disks[index].FileSystem, FileSystem, (c > 64 || c == 0?64:c)); /// Пишем данные +} + + +void dpm_LabelUpdate(char Letter, char* Label){ + Letter -= 65; + + size_t index = (Letter > 32 ? Letter - 32 : Letter); + index = (Letter < 0 || Letter > 25 ? 0 : Letter); + + size_t c = strlen(Label); + memset(DPM_Disks[index].Name, 0, 128); /// Зачищаем данные + memcpy(DPM_Disks[index].Name, Label, (c > 128 || c == 0?128:c));/// Пишем данные +} + +DPM_Disk dpm_info(char Letter){ + Letter -= 65; + + size_t index = (Letter > 32 ? Letter - 32 : Letter); + index = (Letter < 0 || Letter > 25 ? 0 : Letter); + + return DPM_Disks[index]; +} + diff --git a/kernel/src/drv/disk/floppy.c b/kernel/src/drv/disk/floppy.c index 1b8245769..3baf1c122 100644 --- a/kernel/src/drv/disk/floppy.c +++ b/kernel/src/drv/disk/floppy.c @@ -2,20 +2,25 @@ * @file drv/disk/floppy.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Драйвер Floppy - * @version 0.3.3 + * @version 0.3.4 * @date 2023-07-25 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include + #include #include +#include "sys/timer.h" +#include "mem/vmm.h" +#include "drv/disk/dpm.h" +#include "io/tty.h" +#include "sys/isr.h" bool _FloppyDebug = false; floppy_t floppy_data[2] = {0}; // standard IRQ number for floppy controllers -static const int floppy_irq = 6; +//static const int floppy_irq = 6; static const char * drive_types[8] = { "none", "360kB 5.25\"", @@ -28,7 +33,7 @@ static const char * drive_types[8] = { "unknown type" }; static const char FLOPPY_DMABUFA[floppy_dmalen] __attribute__((aligned(0x8000))); ///< Буфер дискеты 1 -static const char FLOPPY_DMABUFB[floppy_dmalen] __attribute__((aligned(0x8000))); ///< Буфер дискеты 2 +//static const char FLOPPY_DMABUFB[floppy_dmalen] __attribute__((aligned(0x8000))); ///< Буфер дискеты 2 bool interrupted = false; floppy_t Floppy(int device){ @@ -194,13 +199,16 @@ int _FloppyReset(int device){ _FloppyCMD(device, 0x02); /* load time = 16ms, no-DMA = 0 */ // it could fail... - if(_FloppyCalibrate(device) != 0) return _FloppyError(device,FLOPPY_ERROR_RESET); + if(_FloppyCalibrate(device) != 0) + return _FloppyError(device,FLOPPY_ERROR_RESET); + else + return 0; } int _FloppySeek(int device, unsigned cyli, int head){ - unsigned i, st0, cyl = -1; + int i, st0, cyl = -1; _FloppyMotor(device, 1); for(i = 0; i < 10; i++) { if (_FloppyDebug) qemu_log(" [FD%c] Attempt Seek %d | Cyli: %c | Head: %d",(device?'B':'A'),i,cyli,head); @@ -326,17 +334,18 @@ int _FloppyCache(int device,FloppyMode mode,unsigned int addr,unsigned int* offs /** * @brief [Floppy] Чтение данных на устройство * - * @param dst - Данные, куда выполнить запись - * @param addr - Адрес,откуда читать (0 - в начало) + * @param dst - Данные, откуда выполнить чтение + * @param addr - Адрес, откуда читать (0 - в начало) * @param size - Сколько считать данных * * @return int Количество записанных байт */ -int _FloppyRead(int device,char* dst,uint32_t addr,uint32_t size){ +size_t _FloppyRead(int device,char* dst,uint32_t addr,uint32_t size){ if (Floppy(device).Status != 1) return _FloppyError(FDA,FLOPPY_ERROR_NOREADY); //qemu_log("[FD%c] Read | Addr: %d | Size: %d",(device==FDB?'B':'A'),addr,size); floppy_data[device].LastErr = 0; - uint32_t offset,ws,ds = 0; + uint32_t offset=0, ws=0; + size_t ds = 0; int ret; while (size > ds){ ret = _FloppyCache(device,FLOPPY_READ,addr+ds,&offset,&ws); @@ -348,10 +357,12 @@ int _FloppyRead(int device,char* dst,uint32_t addr,uint32_t size){ return ds; } -int _FloppyWrite(int device,const char* dst,uint32_t addr,uint32_t size){ +size_t _FloppyWrite(int device,const char* dst,uint32_t addr,uint32_t size){ if (Floppy(device).Status != 1) return _FloppyError(FDA,FLOPPY_ERROR_NOREADY); //qemu_log("[FD%c] Write | Addr: %d | Size: %d",(device==FDB?'B':'A'),addr,size); - uint32_t offset,ws,ds = 0; + + uint32_t offset=0, ws=0; + size_t ds = 0; int ret; while (size > ds){ ret = _FloppyCache(device,FLOPPY_READ,addr+ds, &offset, &ws); @@ -365,6 +376,19 @@ int _FloppyWrite(int device,const char* dst,uint32_t addr,uint32_t size){ return ds; } +void _FloppyServiceA(){ + outb(0x70, 0x10); + unsigned drives = inb(0x71); + int DiskA = drives >> 4; + if (DiskA != floppy_data[FDA].Type){ + // Выполняем обслуживание Диска А, так как диск извлечен. + floppy_data[FDA].Type = DiskA; + floppy_data[FDA].Status = (floppy_data[FDA].Type == 4?1:0); + dpm_unmount('A', false); + dpm_reg('A',"Disk A","Unknown",floppy_data[FDA].Status,0,0,0,3,"FLOP-PYDA",0); + } +} + /** * @brief Автоматическое обновление данных о FD */ @@ -394,12 +418,14 @@ void _FloppyCheck(){ } else { floppy_data[FDB].Status = 1; } + + // Обновление имени устройства char fda_fs[6],fdb_fs[6] = {0}; char fda_label[12],fdb_label[12] = {0}; char fs_fat12[6] = {'F','A','T','1','2',0}; - char fs_smfs10[8] = {'S','M','F','S','1','.','0',0}; +// char fs_smfs10[8] = {'S','M','F','S','1','.','0',0}; int read = -1; if (Floppy(FDA).Status == 1){ //qemu_log("[FD%c] U",(device==FDB?'B':'A')); @@ -411,15 +437,14 @@ void _FloppyCheck(){ floppy_data[FDA].LastErr = 0; } read = Floppy(FDA).Read(FDA,fda_fs,54,8); - if (Floppy(FDA).LastErr == 0 & strcmp(fs_fat12, fda_fs) == 0){ + if (Floppy(FDA).LastErr == 0 && strcmp(fs_fat12, fda_fs) == 0){ if (_FloppyDebug) qemu_log("[FDA] File System: FAT12"); Floppy(FDA).Read(FDA, fda_label, 43, 11); fda_label[11] = 0; memcpy((void*) floppy_data[FDA].Name, fda_label, 12); memcpy((void*) floppy_data[FDA].FileSystem, fda_fs, 6); if (_FloppyDebug) qemu_log("[FDA] Label: %s",floppy_data[FDA].Name); - kfree(fda_label); - kfree(fda_fs); + } } if (Floppy(FDB).Status == 1){ @@ -436,12 +461,48 @@ void _FloppyCheck(){ memcpy((void*) floppy_data[FDB].Name, fdb_label, 12); if (_FloppyDebug) qemu_log("[FDB] Label: %s",floppy_data[FDB].Name); memcpy((void*) floppy_data[FDB].FileSystem, fdb_fs, 6); - kfree(fdb_label); - kfree(fdb_fs); + } } - kfree(fs_fat12); + //kfree(fs_fat12); + +} + +size_t _FloppyDPMWriteA(size_t Disk, size_t Offset, size_t Size, void* Buffer){ + qemu_log("[DPM] Floppy A Write! Offset: %d | Size: %d",Offset, Size); + if (Floppy(0).Status != 1) return 0; + //qemu_log("[FD%c] Write | Addr: %d | Size: %d",(device==FDB?'B':'A'),addr,size); + uint32_t _offset = 0, ws = 0; + size_t ds = 0; + int ret; + while (Size > ds){ + ret = _FloppyCache(0,FLOPPY_READ, Offset+ds, &_offset, &ws); + if (ret < 0) return ret; + if (ws > Size - ds) ws = Size - ds; + memcpy((void*) &FLOPPY_DMABUFA[_offset], Buffer+ds, ws); + ret = _FloppyCache(0,FLOPPY_WRITE, Offset+ds, nullptr, nullptr); + if (ret < 0) return ret; + ds += ws; + } + return ds; +} + +size_t _FloppyDPMReadA(size_t Disk, size_t Offset, size_t Size, void* Buffer){ + qemu_log("[DPM] Floppy A Read! Offset: %d | Size: %d",Offset, Size); + if (Floppy(0).Status != 1) return 0; + floppy_data[0].LastErr = 0; + uint32_t _offset=0, ws=0; + size_t ds = 0; + int ret; + while (Size > ds){ + ret = _FloppyCache(0, FLOPPY_READ, Offset+ds, &_offset, &ws); + if (ret < 0) return ret; + if (ws > Size - ds) ws = Size - ds; + memcpy(Buffer + ds, (void*) &FLOPPY_DMABUFA[_offset], ws); + ds += ws; + } + return ds; } void _FloppyPrint(){ @@ -496,10 +557,29 @@ void initFloppy() { _FloppyReset(FDB); register_interrupt_handler(32+6,&irqFloppy); + dpm_reg('A',"Disk A","Unknown",1,0,0,0,3,"FLOP-PYDA",0); + dpm_metadata_write('A', (uint32_t) &floppy_data[FDA]); + dpm_fnc_write('A',_FloppyDPMReadA,_FloppyDPMWriteA); + + _FloppyServiceA(); + + + dpm_reg('B',"Disk B","Unknown",0,0,0,0,3,"FLOP-PYDB",0); + dpm_metadata_write('B', (uint32_t) &floppy_data[FDB]); + _FloppyCheck(); _FloppyPrint(); + +// fs_tarfs_detect('A'); +// fs_tarfs_detect('R'); +// +// char* fs_fat12 = kmalloc(32); +// size_t read = dpm_read('A', 0x1F, 12, fs_fat12); +// +// qemu_log("[DPM] [A] Ready: %d | '%s'",read,fs_fat12); + // base - 0x03f0 - //int data = 0; + //int data = 0;ЮПСРВЯАФ1234567890-= //char text[32] = {0}; //int read = Floppy(0).Read(0,text,0xD0,32); //qemu_log("FD0:TEST = (%d) '%s'",read,text); diff --git a/kernel/src/drv/disk/initrd.c b/kernel/src/drv/disk/initrd.c new file mode 100644 index 000000000..c9e768d67 --- /dev/null +++ b/kernel/src/drv/disk/initrd.c @@ -0,0 +1,71 @@ +/** + * @file drv/disk/initrd.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief Файл виртуального диска, основаного на основе TarFS + * @version 0.3.4 + * @date 2023-08-03 + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ + +#include +#include +#include +#include "drv/disk/dpm.h" +#include "mem/vmm.h" + +#define INITRD_RW_SIZE (2*1024*1024) ///< Размер виртуального диска 2mb + +int initrd_tarfs(uint32_t start,uint32_t end){ + qemu_log("[TarFS] Init...\n * Start: %x\n * End: %x\n * Size: %d",start,end,end-start); + + size_t initrd_size = end - start; + if (start > end) + return 0; + + void* initrd_data = (void*)start; + + qemu_warn("Initrd occupies %d pages", ALIGN(initrd_size, 4096) / 4096); + + TarFS_ROOT* l_initrd = fs_tarfs_init((uint32_t) initrd_data, initrd_size, 1); + + if (l_initrd->Ready == 0) + return 0; + +// qemu_log("dpm_metadata_read:%x ",dpm_metadata_read('R')); +// + dpm_reg('R', "RamDisk", "TARFS", 2, initrd_size, 0, 0, 2, "TAR0-FSV1", initrd_data); + dpm_metadata_write('R', (uint32_t) l_initrd); + + qemu_log("[INITRD] Create virtual read-write disk..."); + void* disk_t = kmalloc(INITRD_RW_SIZE+1); + if (disk_t == NULL){ + qemu_log("[INITRD] Fatal create virtual disk"); + return 0; + } + qemu_log("[INITRD] Temp disk is (%d bytes) created to %x", INITRD_RW_SIZE, disk_t); + + + dpm_reg('T',"TempDisk","SMFS",2,INITRD_RW_SIZE,0,0,2,"TEMP-DISK",disk_t); + //dpm_metadata_write('R',l_initrd); + + //fs_smfs_format('T'); + +// qemu_log("dpm_metadata_read:%x ",dpm_metadata_read('R')); +// qemu_log("l_initrd:%x ",l_initrd); +// +// FSM_FILE file = fsm_info(fsm_getIDbyName("TARFS"),'R',"main.c"); +//// +// qemu_log("[FF Test] Name: %s",file.Name); +// qemu_log("[FF Test] Size: %d",file.Size); +// qemu_log("[FF Test] Type: %d",file.Type); +// qemu_log("[FF Test] Mode: %d",file.Mode); +// +// +// char* b_mainc = kmalloc(file.Size); +// size_t r_mainc = fsm_read(fsm_getIDbyName("TARFS"),'R',"main.c",10,5,b_mainc); +// qemu_log("[TEST] [TarFS] Content:\n%s\n",b_mainc); +// +// qemu_log("TARFS:%d|%d",fsm_getIDbyName("TARFS"),fsm_getIDbyName("TarFS")); + return 1; +} + diff --git a/kernel/src/drv/disk/mbr.c b/kernel/src/drv/disk/mbr.c index d84290356..4a34cc7d8 100644 --- a/kernel/src/drv/disk/mbr.c +++ b/kernel/src/drv/disk/mbr.c @@ -2,13 +2,14 @@ * @file drv/disk/mbr.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief MBR Info - * @version 0.3.3 + * @version 0.3.4 * @date 2023-08-03 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include -#include +#include "common.h" +#include "io/tty.h" +#include typedef struct { uint8_t Attr; ///< Атрибуты диска (7 = активный) diff --git a/kernel/src/drv/disk/ndpm.c b/kernel/src/drv/disk/ndpm.c new file mode 100644 index 000000000..ee1ceab4d --- /dev/null +++ b/kernel/src/drv/disk/ndpm.c @@ -0,0 +1,48 @@ +// +// Created by ndraey on 23.12.23. +// + +#include +#include +#include + +ndpm_drive_t ndpm_drives[255] = {0}; +int ndpm_drive_count = 0; + +void ndpm_init() { + +} + +void ndpm_add_drive(void* specific_data, ndpm_read_fn_t reader, ndpm_write_fn_t writer) { + for(int i = 0; i < 255; i++) { + if(ndpm_drives[i].drive_specific_data == 0) { + ndpm_drives[i].drive_specific_data = specific_data; + ndpm_drives[i].read_fn = reader; + ndpm_drives[i].write_fn = writer; + + ndpm_drive_count++; + + return; + } + } + + qemu_ok("Add drive ok"); +} + +ndpm_drive_t* ndpm_get_drive(int index) { + if(index >= 255 || ndpm_drives[index].drive_specific_data == 0) { + return 0; + } + + return ndpm_drives + index; +} + +void ndpm_list() { + _tty_printf("Drive count: %d", ndpm_drive_count); + + /*for(int i = 0; i < 255; i++) { + if(ndpm_drives[i].drive_specific_data != 0) { + + } + }*/ +} \ No newline at end of file diff --git a/kernel/src/drv/fpu.c b/kernel/src/drv/fpu.c index 46b494a26..d90faa471 100644 --- a/kernel/src/drv/fpu.c +++ b/kernel/src/drv/fpu.c @@ -2,7 +2,7 @@ * @file fpu.c * @author NDRAEY >_ (pikachu_andrey@vk.com) * @brief FPU - * @version 0.3.3 + * @version 0.3.4 * @date 2023-12-19 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ @@ -11,16 +11,19 @@ bool fpu_initialized = false; +/// Возвращает статус FPU bool fpu_isInitialized() { return fpu_initialized; } +/// Для инициализации FPU void fpu_fldcw(const uint16_t cw) { __asm__ volatile("fldcw %0" : : "m"(cw)); } +/// Инициализация FPU void fpu_init() { - uint32_t cr4 = 0; + size_t cr4 = 0; __asm__ volatile ("mov %%cr4, %0":"=r"(cr4)); cr4 |= 0x200; diff --git a/kernel/src/drv/input/keyboard.c b/kernel/src/drv/input/keyboard.c old mode 100755 new mode 100644 index 6ee5ce3a5..4853baa80 --- a/kernel/src/drv/input/keyboard.c +++ b/kernel/src/drv/input/keyboard.c @@ -2,15 +2,21 @@ * @file drv/input/keyboard.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) * @brief Драйвер клавиатуры - * @version 0.3.3 + * @version 0.3.4 * @date 2022-11-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ extern void tty_backspace(); -#include +#include #include #include +#include "drv/input/keyboard.h" +#include "sys/sync.h" +#include "sys/timer.h" +#include "io/tty.h" +#include "drv/psf.h" +#include "sys/isr.h" #define KEY_BUFFER_SIZE 16 #define KBD_IS_READDATA (1 << 0) @@ -28,8 +34,7 @@ extern void tty_backspace(); bool SHIFT = false, ///< Включен ли SHIFT RU = false, ///< Печатаем русскими? enabled = true; ///< Включен ли вывод? -int lastKey = 0, ///< Последний индекс клавишы - timePresed = 0; ///< Время последнего нажатия +int lastKey = 0; ///< Последний индекс клавишы char kbdbuf[256] = {0}; ///< Буфер клавиатуры uint8_t kbdstatus = 0; ///< Статус клавиатуры bool echo = true; ///< Включен ли вывод? @@ -42,10 +47,10 @@ uint32_t chartyped = 0; /** * @brief Выводит правильный символ, в зависимости от языка и шифта * - * @param char* en_s - Символ маленький англиский - * @param char* en_b - Символ большой англиский - * @param char* ru_s - Символ маленький русский - * @param char* ru_b - Символ большой русский + * @param en_s - Символ маленький англиский + * @param en_b - Символ большой англиский + * @param ru_s - Символ маленький русский + * @param ru_b - Символ большой русский * * @return char* - Символ в зависимости от раскладки и языка */ @@ -66,8 +71,9 @@ void changeStageKeyboard(bool s){ /** * @brief Выводит символ, в зависимости от кода полученного с клавиатуры * - * @param int key - Код клавиатуры - * + * @param key - Код клавиатуры + * @param mode - Какой-то режим + * * @return char* - Или символ или код */ char* getCharKeyboard(int key, bool mode){ @@ -245,9 +251,7 @@ void* getCharKeyboardWait(bool ints) { char* getStringBufferKeyboard(){ memset(kbdbuf, 0, 256); while(1){ - - int kblen; - if ((kblen = strlen(kbdbuf)) > 254){ + if (strlen(kbdbuf) > 254){ qemu_log("Buffer FULL! Max 255!!"); break; } @@ -280,34 +284,57 @@ void kbd_add_char(char *buf, char* key) { } if(lastKey == 0x0E) { // BACKSPACE - // qemu_log("BACKSPACE!"); - - if(chartyped > 0) { + if(chartyped > 0) { tty_backspace(); chartyped--; - // qemu_log("Deleted character: %c", buf[chartyped]); buf[chartyped] = 0; } } - }else if(kmode==2){ + } else if(kmode == 2) { curbuf = key; } } void gets(char *buffer) { // TODO: Backspace - // qemu_log("KMODE is: %d, curbuf at: %x", kmode, (int)((void*)curbuf)); - - kmode = 1; - curbuf = buffer; + // qemu_log("KMODE is: %d, curbuf at: %x", kmode, (int)((void*)curbuf)); - while(kmode==1) { - if (lastKey == 0x9C) { // Enter key pressed + kmode = 1; + curbuf = buffer; + + while(kmode == 1) { + if (lastKey == 0x9C) { // Enter key pressed curbuf = 0; - lastKey = 0; + lastKey = 0; kmode = 0; - chartyped = 0; + chartyped = 0; } - } + } +} + +// Limited version of gets. +// Returns 0 if okay, returns 1 if you typed more than `length` keys. +int gets_max(char *buffer, int length) { // TODO: Backspace + kmode = 1; + curbuf = buffer; + + while(kmode == 1) { + if(chartyped >= length) { + curbuf = 0; + lastKey = 0; + kmode = 0; + chartyped = 0; + return 1; + } + + if (lastKey == 0x9C) { // Enter key pressed + curbuf = 0; + lastKey = 0; + kmode = 0; + chartyped = 0; + } + } + + return 0; } /** @@ -372,7 +399,6 @@ void keyboardHandler(registers_t regs){ } */ - timePresed = getTicks()+100; return; } } @@ -406,7 +432,6 @@ void keyboardInit() { outb(KBD_STATE_REG, 0xA7); // 2 // Flush The Output Buffer - // FIXME: It works on QEMU, but on real hardware it hangs until you press any key. draw_vga_str("Warning: Now, SayoriOS will perform PS/2 buffer flushing. Process is very fast,", 79, 0, 16, 0xffffff); draw_vga_str(" but on real hardware you can encounter system hanging.", 63, 0, 32, 0xffffff); @@ -414,22 +439,11 @@ void keyboardInit() { draw_vga_str(" And even better, help us on https://github.com/pimnik98/SayoriOS", 73, 0, 64 + 16, 0xffffff); punch(); - - // inb(KBD_DATA_PORT); - - size_t spin = 1000; - - while(spin--) { - uint8_t bit = (inb(KBD_STATE_REG)); - - qemu_log("Status reg is: %x", bit); - - if((bit & 1) == 1) - inb(KBD_DATA_PORT); - else - break; - }; + while(inb(KBD_STATE_REG) & 1) { + inb(KBD_DATA_PORT); + } + uint8_t byte = ps2_read_configuration_byte(); if((byte >> 5) & 1) { diff --git a/kernel/src/drv/input/mouse.c b/kernel/src/drv/input/mouse.c index b6e4d1e50..05d96f0c4 100644 --- a/kernel/src/drv/input/mouse.c +++ b/kernel/src/drv/input/mouse.c @@ -2,21 +2,26 @@ * @file drv/input/mouse.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), Рустем Гимадутдинов (https://github.com/rgimad/EOS) * @brief Драйвер мыши - * @version 0.3.3 + * @version 0.3.4 * @date 2022-12-11 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include #include #include #include +#include "io/screen.h" +#include "sys/isr.h" uint8_t mouse_ready = 0; ///< Готова ли мышь к работе int32_t mouse_x = 0; ///< Позиция мыши по X int32_t mouse_y = 0; ///< Позиция мыши по Y + +int32_t mouse_ox = 0; ///< Позиция мыши по X (старое значение) +int32_t mouse_oy = 0; ///< Позиция мыши по Y (старое значение) + uint32_t mouse_b1 = 0; ///< Левая кнопка мыши uint32_t mouse_b2 = 0; ///< Правая кнопка мыши uint32_t mouse_b3 = 0; ///< Средняя кнопка мыши @@ -25,15 +30,6 @@ uint32_t mouse_b5 = 0; ///< ??? int mouse_wheel = 0; ///< После каждого чтения меняем на 0 -MouseDrawState_t mouse_state = CURSOR_LOADING; - -DANDescriptor_t* mouse_normal = 0; -char* mouse_normal_frame = 0; -DANDescriptor_t* mouse_loading = 0; -char* mouse_loading_frame = 0; - -size_t mouse_animation_frame = 0; - /** * @brief Структура данных пакета от мыши */ @@ -72,10 +68,6 @@ bool isMouseInit(){ return mouse_ready==1?true:false; } -void mouse_set_state(MouseDrawState_t state) { - mouse_state = state; -} - /** * @brief Парсинг пакета мыши * @@ -100,8 +92,11 @@ void mouse_parse_packet(const char *buf, uint8_t has_wheel, uint8_t has_5_button ps2m_buffer.button_r = mouse_b2; ps2m_buffer.button_m = mouse_b3; - if (mouse_b1 || mouse_b2 || mouse_b3){ + + if (mouse_b1 || mouse_b2 || mouse_b3 || (mouse_x != mouse_ox) || (mouse_y != mouse_oy)){ CallTrigger(0x0003,(void*)mouse_b1,(void*)mouse_b2,(void*)mouse_b3,(void*)mouse_x,(void*)mouse_y); + mouse_ox = mouse_x; + mouse_oy = mouse_y; } //qemu_log("MPP: B1: %d | B2: %d | B3: %d | X:%d | Y:%d",mouse_b1,mouse_b2,mouse_b3,mouse_x,mouse_y); @@ -114,50 +109,6 @@ void mouse_parse_packet(const char *buf, uint8_t has_wheel, uint8_t has_5_button } } -/** - * @brief Рисует мышь - * - * @warning Не нужно вызывать самостоятельно, только для обработчика мыши! - */ -void mouse_draw() { - if(mouse_state == CURSOR_HIDDEN) - return; - - if(mouse_state == CURSOR_NORMAL) { - if(!mouse_normal) - return; - - read_frame_dan(mouse_normal, mouse_animation_frame, mouse_normal_frame); - - // duke_rawdraw(mouse_normal_frame, &(struct DukeImageMeta) { - // {'D', 'U', 'K', 'E'}, - // mouse_normal->header.width, - // mouse_normal->header.height, - // mouse_normal->framesize, - // mouse_normal->header.alpha - // }, mouse_x, mouse_y); - - mouse_animation_frame = (mouse_animation_frame + 1) % mouse_normal->header.frame_count; - } else if(mouse_state == CURSOR_LOADING) { - if(!mouse_loading) - return; - - read_frame_dan(mouse_loading, mouse_animation_frame, mouse_loading_frame); - - // duke_rawdraw(mouse_loading_frame, &(struct DukeImageMeta) { - // {'D', 'U', 'K', 'E'}, - // mouse_loading->header.width, - // mouse_loading->header.height, - // mouse_loading->framesize, - // mouse_loading->header.alpha - // }, mouse_x, mouse_y); - - mouse_animation_frame = (mouse_animation_frame + 1) % mouse_loading->header.frame_count; - } - - punch(); -} - /** * @brief Обработчик мыши * @@ -190,7 +141,7 @@ void mouse_handler(__attribute__((unused)) struct registers r) { /** * @brief Ожидание ответа мыши * - * @param uint8_t a_type - Тип отправляемых данных + * @param a_type - Тип отправляемых данных * * @warning Не нужно вызывать самостоятельно, только для обработчика мыши! */ @@ -246,15 +197,6 @@ uint8_t mouse_read() { * @warning Не нужно вызывать самостоятельно, только для обработчика мыши! */ void mouse_install() { - mouse_normal = alloc_dan("/Sayori/Cursor/normal.dan", false); - mouse_loading = alloc_dan("/Sayori/Cursor/loading.dan", false); - - if(mouse_normal) - mouse_normal_frame = (char*)kcalloc(1, mouse_normal->framesize); - - if(mouse_loading) - mouse_loading_frame = (char*)kcalloc(1, mouse_normal->framesize); - uint8_t _status; //unsigned char // Включить вспомогательное устройство мыши diff --git a/kernel/src/drv/pci.c b/kernel/src/drv/pci.c index baeda4448..c28096de1 100644 --- a/kernel/src/drv/pci.c +++ b/kernel/src/drv/pci.c @@ -1,29 +1,29 @@ /** * @defgroup pci Драйвер PCI (Peripheral Component Interconnect) * @file drv/pci.c - * @author Пиминов Никита (nikita.piminoff@yandex.ru), Арен Елчинян (SynapseOS) + * @author Пиминов Никита (nikita.piminoff@yandex.ru), Арен Елчинян (SynapseOS), NDRAEY >_ (pikachu_andrey@vk.com) * @brief Драйвер PCI (Peripheral Component Interconnect) - * @version 0.3.3 + * @version 0.3.4 * @date 2023-01-14 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include + #include #include #include - +#include "io/tty.h" /** * @brief [PCI] Чтение 16-битных полей из пространства механизма конфигураций 1 * - * @param uint8_t bus Шина - * @param uint8_t slot Слот - * @param uint8_t function Функция - * @param uint8_t offset Отступ + * @param bus Шина + * @param slot Слот + * @param function Функция + * @param offset Отступ * * @warning Когда доступ к конфигурации пытается выбрать несуществующее устройство, хост-мост завершает доступ без ошибок, удаляя все данные при записи и возвращая все данные при чтении. * - * @return uint16_t + * @return Значение поля */ uint16_t pci_read_confspc_word(uint8_t bus, uint8_t slot, uint8_t function, uint8_t offset) { uint32_t addr; @@ -36,9 +36,17 @@ uint16_t pci_read_confspc_word(uint8_t bus, uint8_t slot, uint8_t function, uint outl(PCI_ADDRESS_PORT, addr); - return (uint16_t)((inl(PCI_DATA_PORT) >> ((offset & 2) * 8)) & 0xffff); //this too... I'm too lazy to write them + return inl(PCI_DATA_PORT) >> ((offset & 2) * 8); } +/** + * @brief Чтение данных из шины PCI + * @param bus Шина + * @param slot Слот + * @param function Функция + * @param offset Отступ + * @return Значение поля + */ uint32_t pci_read32(uint8_t bus, uint8_t slot, uint8_t function, uint8_t offset) { uint32_t addr; uint32_t bus32 = bus; @@ -47,7 +55,7 @@ uint32_t pci_read32(uint8_t bus, uint8_t slot, uint8_t function, uint8_t offset) addr = (uint32_t)((bus32 << 16) | (slot32 << 11) | (func32 << 8) | (offset & 0xfc) | ((uint32_t)0x80000000)); //yes, this line is copied from osdev outl(PCI_ADDRESS_PORT, addr); - return ((inl(PCI_DATA_PORT) >> ((offset & 2) * 8)) & 0xffff); //this too... I'm too lazy to write them + return ((inl(PCI_DATA_PORT) >> ((offset & 2) * 8)) & 0xffffffff); //this too... I'm too lazy to write them } @@ -194,13 +202,13 @@ static struct { /** * @brief [PCI] Получение основной категории устройства * - * @param uint8_t bus Шина - * @param uint8_t slot Слот - * @param uint8_t function Функция + * @param bus Шина + * @param slo Слот + * @param function Функция * - * @return uint8_t Категория устройства + * @return Категория устройства */ -uint8_t pci_get_class(uint8_t bus, uint8_t slot, uint8_t function) { +inline uint8_t pci_get_class(uint8_t bus, uint8_t slot, uint8_t function) { /* Сдвигаем, чтобы оставить только нужные данные в переменной */ return (uint8_t) (pci_read_confspc_word(bus, slot, function, 10) >> 8); } @@ -208,12 +216,12 @@ uint8_t pci_get_class(uint8_t bus, uint8_t slot, uint8_t function) { /** * @brief [PCI] Получение под-категории устройства * - * @param uint8_t bus Шина - * @param uint8_t slot Слот - * @param uint8_t function Функция + * @param bus Шина + * @param slot Слот + * @param function Функция * @return uint8_t Подкатегория устройства */ -uint8_t pci_get_subclass(uint8_t bus, uint8_t slot, uint8_t function) { +inline uint8_t pci_get_subclass(uint8_t bus, uint8_t slot, uint8_t function) { /* Сдвигаем, чтобы оставить только нужные данные в переменной */ return (uint8_t) pci_read_confspc_word(bus, slot, function, 10); } @@ -221,12 +229,12 @@ uint8_t pci_get_subclass(uint8_t bus, uint8_t slot, uint8_t function) { /** * @brief [PCI] Получение HDR-тип устройства * - * @param uint8_t bus Шина - * @param uint8_t slot Слот - * @param uint8_t function Функция + * @param bus Шина + * @param slot Слот + * @param function Функция * @return uint8_t HDR-тип */ -uint8_t pci_get_hdr_type(uint8_t bus, uint8_t slot, uint8_t function) { +inline uint8_t pci_get_hdr_type(uint8_t bus, uint8_t slot, uint8_t function) { /* Сдвигаем, чтобы оставить только нужные данные в переменной */ return (uint8_t) pci_read_confspc_word(bus, slot, function, 7); } @@ -234,12 +242,12 @@ uint8_t pci_get_hdr_type(uint8_t bus, uint8_t slot, uint8_t function) { /** * @brief [PCI] Получение ID-поставщика * - * @param uint8_t bus Шина - * @param uint8_t slot Слот - * @param uint8_t function Функция - * @return uint16_t ID-поставщика + * @param bus Шина + * @param slot Слот + * @param function Функция + * @return ID-поставщика */ -uint16_t pci_get_vendor(uint8_t bus, uint8_t slot, uint8_t function) { +inline uint16_t pci_get_vendor(uint8_t bus, uint8_t slot, uint8_t function) { /* Сдвигаем, чтобы оставить только нужные данные в переменной */ return pci_read_confspc_word(bus, slot, function, 0); } @@ -247,12 +255,12 @@ uint16_t pci_get_vendor(uint8_t bus, uint8_t slot, uint8_t function) { /** * @brief [PCI] Получение ID-Устройства * - * @param uint8_t bus Шина - * @param uint8_t slot Слот - * @param uint8_t function Функция - * @return uint8_t ID-Устройства + * @param bus Шина + * @param slot Слот + * @param function Функция + * @return ID-Устройства */ -uint16_t pci_get_device(uint8_t bus, uint8_t slot, uint8_t function) { +inline uint16_t pci_get_device(uint8_t bus, uint8_t slot, uint8_t function) { /* Сдвигаем, чтобы оставить только нужные данные в переменной */ return pci_read_confspc_word(bus, slot, function, 2); } @@ -260,9 +268,9 @@ uint16_t pci_get_device(uint8_t bus, uint8_t slot, uint8_t function) { /** * @brief [PCI] Получение классификации устройства * - * @param uint8_t class Группа А - * @param uint8_t subclass Группа Б - * @return const char * Возращает классификацию устройства + * @param klass Группа А + * @param subclass Группа Б + * @return Возращает классификацию устройства */ const char *pci_get_device_type(uint8_t klass, uint8_t subclass) { for (int i=0; pci_device_type_strings[i].name != nullptr; i++) @@ -275,7 +283,7 @@ const char *pci_get_device_type(uint8_t klass, uint8_t subclass) { /** * @brief [PCI] Получение названия поставщика * - * @param uint16_t vendor Поставщик + * @param vendor Поставщик * @return const char * Возращает имя поставщика */ const char *pci_get_vendor_name(uint16_t vendor) { @@ -290,12 +298,12 @@ const char *pci_get_vendor_name(uint16_t vendor) { /** * @brief [PCI] ??? * - * @param uint8_t hdrtype ??? - * @param uint8_t bus Шина - * @param uint8_t slot Слот - * @param uint8_t function Функция - * @param uint8_t bar_number Номер BAR от 0 до 5 - * @param uint8_t *bar_type ??? + * @param hdrtype ??? + * @param bus Шина + * @param slot Слот + * @param func Функция + * @param bar_number Номер BAR от 0 до 5 + * @param bar_type Тип BAR * * @todo Необходимо добавить 64-бит реализацию * @@ -339,11 +347,11 @@ void pci_write(uint8_t bus, uint8_t slot, uint8_t func, uint32_t offset, uint32_ /** * @brief [PCI] Поиск устройства по ID-поставшика и устройства * - * @param uint16_t vendor ID-Поставщика - * @param uint16_t device ID-Устройства - * @param uint8_t *bus_ret - * @param uint8_t *slot_ret - * @param uint8_t *func_ret + * @param vendor ID-Поставщика + * @param device ID-Устройства + * @param bus_ret + * @param slot_ret + * @param func_ret */ void pci_find_device(uint16_t vendor, uint16_t device, uint8_t *bus_ret, uint8_t *slot_ret, uint8_t *func_ret) { // qemu_log("Checking device: %x:%x\n", vendor, device); @@ -362,9 +370,43 @@ void pci_find_device(uint16_t vendor, uint16_t device, uint8_t *bus_ret, uint8_t } } - *bus_ret = *slot_ret = *func_ret = 0xFF; + *bus_ret = *slot_ret = *func_ret = 0xFF; +} + +void pci_find_device_by_class_and_subclass(uint16_t class, uint16_t subclass, uint16_t *vendor_ret, uint16_t *deviceid_ret, + uint8_t *bus_ret, uint8_t *slot_ret, uint8_t *func_ret) { + uint8_t func = 0; + + for (uint32_t bus = 0; bus < 256; bus++) { + for (uint32_t slot = 0; slot < 32; slot++) { + + if (pci_get_class(bus, slot, func) == class + && pci_get_subclass(bus, slot, func) == subclass) { + *vendor_ret = pci_get_vendor(bus, slot, func); + *deviceid_ret = pci_get_device(bus, slot, func); + *bus_ret = bus; + *slot_ret = slot; + *func_ret = func; + return; + } + + if((pci_get_hdr_type(bus, slot, 0) & 0x80) == 0) { + for (func = 1; func < 8; func++) { + if (pci_get_class(bus, slot, func) == class + && pci_get_subclass(bus, slot, func) == subclass) { + *vendor_ret = pci_get_vendor(bus, slot, func); + *deviceid_ret = pci_get_device(bus, slot, func); + *bus_ret = bus; + *slot_ret = slot; + *func_ret = func; + return; + } + } + } + } + } -// qemu_log("Not found"); + *bus_ret = *slot_ret = *func_ret = 0xFF; } /** @@ -379,30 +421,28 @@ void pci_print_list() { tty_printf("PCI список устройств:\n"); for (uint32_t bus = 0; bus < 256; bus++) { - for (uint32_t slot = 0; slot < 32; slot++) { + for (uint8_t slot = 0; slot < 32; slot++) { uint32_t func = 0; - clid = pci_get_class(bus, slot, func); - sclid = pci_get_subclass(bus, slot, func); vendor = pci_get_vendor(bus, slot, func); - hdrtype = pci_get_hdr_type(bus, slot, func); - device = pci_get_device(bus, slot, func); - if (clid != 0xFF && vendor != 0xFFFF) { - qemu_log("%u:%u.%u %s: %s (%x), девайс: %x", bus, slot, func, pci_get_device_type(clid, sclid), pci_get_vendor_name(vendor),vendor, device); - _tty_printf("\t%u:%u.%u %s: %s (%x), девайс: %x\n", bus, slot, func, pci_get_device_type(clid, sclid), pci_get_vendor_name(vendor),vendor, device); - } + if (vendor != 0xFFFF) { + clid = pci_get_class(bus, slot, func); + sclid = pci_get_subclass(bus, slot, func); + hdrtype = pci_get_hdr_type(bus, slot, func); + device = pci_get_device(bus, slot, func); + _tty_printf("\t%d:%d:%d:%d.%d %s: %s (%x), девайс: %x\n", clid, sclid, bus, slot, func, pci_get_device_type(clid, sclid), pci_get_vendor_name(vendor),vendor, device); + } if ((hdrtype & 0x80) == 0) { for (func = 1; func < 8; func++) { - clid = pci_get_class(bus, slot, func); - sclid = pci_get_subclass(bus, slot, func); vendor = pci_get_vendor(bus, slot, func); - device = pci_get_device(bus, slot, func); - if (clid != 0xFF && vendor != 0xFFFF) { - qemu_log("%u:%u.%u %s: %s (%x), девайс: %x", bus, slot, func, pci_get_device_type(clid, sclid), pci_get_vendor_name(vendor),vendor, device); - _tty_printf("\t%u:%u.%u %s: %s (%x), девайс: %x\n", bus, slot, func, pci_get_device_type(clid, sclid), pci_get_vendor_name(vendor),vendor, device); + if (vendor != 0xFFFF) { + clid = pci_get_class(bus, slot, func); + sclid = pci_get_subclass(bus, slot, func); + device = pci_get_device(bus, slot, func); + _tty_printf("\t%d:%d:%d:%d.%d %s: %s (%x), девайс: %x\n", clid, sclid, bus, slot, func, pci_get_device_type(clid, sclid), pci_get_vendor_name(vendor),vendor, device); } } } diff --git a/kernel/src/drv/psf.c b/kernel/src/drv/psf.c index 196c45d0d..120eea8a1 100644 --- a/kernel/src/drv/psf.c +++ b/kernel/src/drv/psf.c @@ -2,14 +2,17 @@ * @file drv/psf.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), Арен Елчинян (SynapseOS) * @brief Поддержка шрифтов PSF - * @version 0.3.3 + * @version 0.3.4 * @date 2023-01-13 * @copyright Copyright SayoriOS Team (c) 2023 */ -#include + #include #include #include +#include "mem/vmm.h" +#include "io/serial_port.h" +#include "io/screen.h" uint32_t psf_font_version = 0; @@ -134,6 +137,9 @@ void draw_vga_ch(uint16_t c, uint16_t c2, size_t pos_x, size_t pos_y, size_t col uint8_t *glyph = psf1_get_glyph(psf1_rupatch(c, c2)); + if(!glyph) + return; + // size_t ph = _h; //psf1_get_h(); // size_t pw = _w; //psf1_get_w(); for (size_t y = 0; y < _h; y++){ @@ -157,7 +163,7 @@ void draw_vga_str(const char* text, size_t len, int x, int y, uint32_t color){ size_t scrwidth = getScreenWidth(); for(int i = 0; i < len; i++){ - if (x + 8 <= scrwidth){ + if (x + _w <= scrwidth){ if (isUTF(text[i])){ draw_vga_ch(text[i], text[i+1], x, y, color); i++; @@ -166,7 +172,7 @@ void draw_vga_str(const char* text, size_t len, int x, int y, uint32_t color){ return; draw_vga_ch(text[i], 0, x, y, color); } - x += 8; + x += _w; } else { break; } diff --git a/kernel/src/drv/rtl8139.c b/kernel/src/drv/rtl8139.c index bd4b9b4af..2d6c9bc86 100644 --- a/kernel/src/drv/rtl8139.c +++ b/kernel/src/drv/rtl8139.c @@ -1,11 +1,28 @@ -#include -#include +/** + * @brief Драйвер сетевой карты RTL8139 + * @author NDRAEY >_ + * @version 0.3.4 + * @date 2022-04-12 + * @copyright Copyright SayoriOS Team (c) 2022-2023 + */ + +#include +#include +#include +#include +#include +#include +#include #include +#include "lib/string.h" +#include "mem/vmm.h" +#include "mem/pmm.h" uint8_t rtl8139_busnum, rtl8139_slot, rtl8139_func; uint32_t rtl8139_io_base, rtl8139_mem_base, rtl8139_bar_type; -size_t rtl8139_phys_buffer; +size_t rtl8139_phys_buffer = 0; +char* rtl8139_virt_buffer = (char*)0; uint8_t rtl8139_irq; uint8_t rtl8139_mac[6]; @@ -15,6 +32,12 @@ uint8_t TSD_array[4] = {0x10, 0x14, 0x18, 0x1C}; size_t rtl8139_current_tx_index = 0; +void* rtl8139_transfer_buffer; +size_t rtl8139_transfer_buffer_phys; + +void rtl8139_send_packet(void* data, size_t length); +void rtl8139_receive_packet(); + #define NETCARD_NAME ("RTL8139") void rtl8139_netcard_get_mac(uint8_t mac[6]) { @@ -25,8 +48,9 @@ void rtl8139_netcard_get_mac(uint8_t mac[6]) { netcard_entry_t rtl8139_netcard = { NETCARD_NAME, + {0, 0, 0, 0}, rtl8139_netcard_get_mac, - rtl8139_send_packet + rtl8139_send_packet, }; void rtl8139_init() { @@ -68,17 +92,13 @@ void rtl8139_init() { rtl8139_wake_up(); rtl8139_sw_reset(); - rtl8139_phys_buffer = alloc_phys_pages(RTL8139_BUFFER_PAGE_COUNT); + rtl8139_virt_buffer = kmalloc_common(RTL8139_BUFFER_PAGE_COUNT, PAGE_SIZE); + rtl8139_phys_buffer = virt2phys(get_kernel_page_directory(), (virtual_addr_t) rtl8139_virt_buffer); - map_pages( - get_kernel_dir(), - rtl8139_phys_buffer, - rtl8139_phys_buffer, - RTL8139_BUFFER_PAGE_COUNT, - (PAGE_WRITEABLE | PAGE_PRESENT) - ); + rtl8139_transfer_buffer = kmalloc_common(65535, PAGE_SIZE); + rtl8139_transfer_buffer_phys = virt2phys(get_kernel_page_directory(), (virtual_addr_t)rtl8139_transfer_buffer); - rtl8139_init_buffer(); + rtl8139_init_buffer(); qemu_log("RTL8139 Physical buffer at: %x", rtl8139_phys_buffer); @@ -90,12 +110,12 @@ void rtl8139_init() { rtl8139_read_mac(); // If okay, add network card to list. - netcard_add(rtl8139_netcard); + netcard_add(&rtl8139_netcard); } void rtl8139_read_mac() { uint32_t mac_part1 = inl(rtl8139_io_base + MAC0_5); - uint16_t mac_part2 = ins(rtl8139_io_base + MAC0_5 + 4); + uint16_t mac_part2 = inw(rtl8139_io_base + MAC0_5 + 4); rtl8139_mac[0] = (mac_part1 >> 0) & 0xFF; rtl8139_mac[1] = mac_part1 >> 8; @@ -140,7 +160,7 @@ void rtl8139_init_buffer() { void rtl8139_handler(registers_t regs) { qemu_log("Received RTL8139 interrupt!"); - uint16_t status = ins(rtl8139_io_base + 0x3e); + uint16_t status = inw(rtl8139_io_base + 0x3e); if(status & TOK) { qemu_log("Packet sent"); @@ -148,66 +168,77 @@ void rtl8139_handler(registers_t regs) { if (status & ROK) { qemu_log("Packet received!\n"); + + // TODO: Push packet to stack then, when needed, work with packets on the stack + rtl8139_receive_packet(); } - outs(rtl8139_io_base + 0x3E, 0x05); + outw(rtl8139_io_base + 0x3E, 0x05); } -void rtl8139_send_packet(void* data, size_t length) { - // First, copy the data to a physically contiguous chunk of memory +void rtl8139_send_packet(void *data, size_t length) { + // First, copy the data to a physically contiguous chunk of memory - void* transfer_data = kmalloc_a(ALIGN(length, 4096)); - size_t phys_addr = virt2phys(get_kernel_dir(), (virtual_addr_t)transfer_data); - memcpy(transfer_data, data, length); + memset(rtl8139_transfer_buffer, 0, 65535); - qemu_log("Send packet: Virtual memory at %x", transfer_data); - qemu_log("Send packet: Physical memory at %x", phys_addr); + memcpy(rtl8139_transfer_buffer, data, length); - // Second, fill in physical address of data, and length + qemu_log("Send packet: Virtual memory at %x", rtl8139_transfer_buffer); + qemu_log("Send packet: Physical memory at %x", rtl8139_transfer_buffer_phys); - qemu_log("Before: %d", rtl8139_current_tx_index); - - outl(rtl8139_io_base + TSAD_array[rtl8139_current_tx_index], (uint32_t)phys_addr); - outl(rtl8139_io_base + TSD_array[rtl8139_current_tx_index++], length); - - qemu_log("After: %d", rtl8139_current_tx_index); + // Second, fill in physical address of data, and length + + qemu_log("Before: %d", rtl8139_current_tx_index); + + outl(rtl8139_io_base + TSAD_array[rtl8139_current_tx_index], (uint32_t)rtl8139_transfer_buffer_phys); + outl(rtl8139_io_base + TSD_array[rtl8139_current_tx_index++], length); + + qemu_log("After: %d", rtl8139_current_tx_index); - if(rtl8139_current_tx_index == 4) - rtl8139_current_tx_index = 0; + if(rtl8139_current_tx_index > 3) + rtl8139_current_tx_index = 0; } size_t rtl8139_current_packet_ptr = 0; void rtl8139_receive_packet() { - uint16_t* packet = (uint16_t*)(rtl8139_phys_buffer + rtl8139_current_packet_ptr); + uint16_t* packet = (uint16_t*)(rtl8139_virt_buffer + rtl8139_current_packet_ptr); + + EthernetPacked* e_pack = (EthernetPacked*)packet; + + qemu_log("[Net] [RTL8139] Получен пакет!"); + qemu_log(" |-- Заголовок данных: %x",e_pack->Header); + qemu_log(" |-- Длина данных: %d",e_pack->Size); + qemu_log(" |-- Источник: %x:%x:%x:%x:%x:%x",e_pack->MAC_SOURCE[0] ,e_pack->MAC_SOURCE[1],e_pack->MAC_SOURCE[2], e_pack->MAC_SOURCE[3] ,e_pack->MAC_SOURCE[4] ,e_pack->MAC_SOURCE[5]); + qemu_log(" |-- Кому: %x:%x:%x:%x:%x:%x", e_pack->MAC_DEVICE[0], e_pack->MAC_DEVICE[1], e_pack->MAC_DEVICE[2], e_pack->MAC_DEVICE[3], e_pack->MAC_DEVICE[4], e_pack->MAC_DEVICE[5]); + qemu_log(" |-- Тип данных: %x", bit_flip_short(e_pack->Type)); + // Skip packet header, get packet length - uint16_t packet_header = packet[0]; - uint16_t packet_length = packet[1]; + //^ Может быть и верно, но теряется сама логика пакета, из-за этого я не мог понять некоторые моменты + // NDRAEY: Это сырая реализция!!!1 - uint16_t* packet_data = packet + 2; + uint16_t packet_header = e_pack->Header; + uint16_t packet_length = e_pack->Size; - qemu_log("Packet!!!"); - qemu_log("Packet header: %x", packet_header); - qemu_log("Packet length: %d", packet_length); + uint16_t* packet_data = packet + 2; - qemu_log("Packet data: "); + qemu_log("[Net] [RTL8139] Данные с пакета:\n"); - for(int i = 0; i < packet_length / sizeof(uint16_t); i++) { - qemu_printf("%x", packet_data[i]); - } +// hexview_advanced((char *) packet_data, packet_length, 10, true, new_qemu_printf); - qemu_printf("\n"); + if(packet_header == HARDWARE_TYPE_ETHERNET) + ethernet_handle_packet(&rtl8139_netcard, (ethernet_frame_t *)packet_data, packet_length); rtl8139_current_packet_ptr = (rtl8139_current_packet_ptr + packet_length + 7) & RX_READ_POINTER_MASK; if(rtl8139_current_packet_ptr > 8192) rtl8139_current_packet_ptr -= 8192; - outs(rtl8139_io_base + CAPR, rtl8139_current_packet_ptr - 0x10); + outw(rtl8139_io_base + CAPR, rtl8139_current_packet_ptr - 0x10); } void rtl8139_init_interrupts() { - outs(rtl8139_io_base + IMR, 0x0005); + outw(rtl8139_io_base + IMR, 0x0005); // https://wiki.osdev.org/PCI // @@ -225,4 +256,4 @@ void rtl8139_init_interrupts() { register_interrupt_handler(32 + rtl8139_irq, rtl8139_handler); qemu_log("Initialized RTl8139 interrupts!"); -} \ No newline at end of file +} diff --git a/kernel/src/drv/vfs_new.c b/kernel/src/drv/vfs_new.c deleted file mode 100755 index 396859d97..000000000 --- a/kernel/src/drv/vfs_new.c +++ /dev/null @@ -1,414 +0,0 @@ -/** - * @file drv/vfs_new.c - * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) - * @brief Драйвер виртуальной файловой системы - * @version 0.3.3 - * @date 2022-11-01 - * @copyright Copyright SayoriOS Team (c) 2022-2023 - */ -#include -#include -#include -#include - -fs_node_t *fs_root; ///< Точка монтирования виртуального корня -fs_node_t *vfs_mount[128]; ///< Точки монтирования -size_t countMount = 0; ///< Кол-во смонтированных устройств - -/** - * @brief [VFS] Получить реальный путь на устройстве - * - * @param int node - Адрес монтирования - * @param char* path - Путь к файлу (виртуальный) - */ -void vfs_getPath(int node, const char* path, char* buf){ - // strcpy(buf, path); - substr(buf, path, strlen(vfs_mount[node]->name), strlen(path)); - - // qemu_log("Before: %s; After: %s; Path in node: %s", path, buf, vfs_mount[node]->name); -} - -/** - * @brief [VFS] Получить адрес монтирования у файла - * - * @param char* path - Путь к файлу (виртуальный) - * - * @warning РАБОТАЕТ НЕМНОГО КОСТЫЛЬНО! ПЕРЕДЕЛАТЬ!!!!! - * - * @todo АХТУНГ - * - * @return int - Индекс, или отрицательное значение если точка монтирования не найдена - */ -int vfs_foundMount(const char* path){ - for (int i=countMount-1; i >= 0; i--){ - if (strlen(vfs_mount[i]->name) > strlen(path)){ - /// Нет смысла чекать, ибо длина монтирования, длинее имени пути. - continue; - } - for(size_t a = 0; a < strlen(vfs_mount[i]->name);a++){ - if ((int) vfs_mount[i]->name[a] != (int) path[a]){ - break; - } - if(strlen(vfs_mount[i]->name)-1 == a){ - /// О, кажись совпало. - return i; - } - } - } - // qemu_log("IM HERE BLYAT"); - return 0; -} - -/** - * @brief [VFS] Монтирование устройства - * - * @param int location - Адрес монтирования - * @param int type - Тип файловой системы - */ -fs_node_t *NatSuki_initrd(uint32_t location); -bool isInitNatSuki(); -void vfs_reg(size_t location, size_t end, size_t type){ - if (type == VFS_TYPE_MOUNT_SEFS){ - //qemu_log("[VFS] [REG] [%d] Sayori Easy File System | Location: %x",countMount,location); - // vfs_mount[countMount] = (fs_node_t*) kmalloc(sizeof(fs_node_t*)); - vfs_mount[countMount++] = (fs_node_t*) sefs_initrd(location, end); - // countMount++; - } else if (type == VFS_TYPE_MOUNT_NATSUKI){ - qemu_log("[VFS] [REG] NatSuki %x | Location: %x", type, location); - // vfs_mount[countMount] = (fs_node_t*) kmalloc(sizeof(fs_node_t*)); - vfs_mount[countMount] = (fs_node_t*)NatSuki_initrd(location); - if (isInitNatSuki()){ - countMount++; - } - } else { - qemu_log("[VFS] [REG] Unknown | Location: %x",location); - } -} - -/** - * @brief [VFS] Запись в файл - * - * @param int node - Адрес монтирования - * @param int elem - Индекс файла - * @param size_t offset - С какой позиции читать файл - * @param size_t size - Длина читаемого файла - * @param void* buf - Что пишем - * - */ -int vfs_write(int node, int elem, size_t offset, size_t size, const void *buf){ - if (vfs_mount[node]->write != 0){ - uint32_t ret = vfs_mount[node]->write(elem,offset,size,buf); - return ret; - } else { - return -1; - } -} - -/** - * @brief [VFS] Получить индекс файла, который находиться на устройстве - * - * @param char* filename - Путь к файлу (виртуальный) - * - * @return int - Индекс файла, или отрицательное значение при ошибке - */ -int vfs_findFile(const char* filename){ - //qemu_log("[VFS] [FindFile] File: `%s`",filename); - int node = vfs_foundMount(filename); - if (vfs_mount[node]->findFile) { - char* path = (char*)kmalloc(sizeof(char)*strlen(filename)); - vfs_getPath(node, filename, path); - uint32_t elem = vfs_mount[node]->findFile(path); - - kfree(path); - //qemu_log("\n[VFS] Node: %d | Elem:%d \n",node,elem); - return elem; - } - return -1; -} - -/** - * @brief [VFS] Проверить существует ли файл - * - * @param char* filename - Путь к файлу (виртуальный) - * - * @return bool - true если файл найден - */ -bool vfs_exists(const char* filename){ - if (vfs_findFile(filename) != -1){ - return true; - } - return false; - - // NDRAEY says: - // return vfs_findFile(filename) != -1; -} - -/** - * @brief [VFS] Чтение файла - * - * @param int node - Адрес монтирования - * @param int elem - Индекс файла - * @param size_t offset - С какой позиции читать файл - * @param size_t size - Длина читаемого файла - * @param void* buf - Буфер - * - * @return uint32_t - Размер файла или отрицательное значение при ошибке - */ -int vfs_read(int node, int elem, size_t offset, size_t size, void *buf){ - //qemu_log("[VFS] [Read] Node:%d | Elem: %d | Off: %d | Size: %d", node, elem, offset, size); - if (vfs_mount[node]->read != 0){ - uint32_t ret = vfs_mount[node]->read(elem, offset, size, buf); - // qemu_log("Buf now: %s", buf); - return ret; - } - //qemu_log("[VFS] [Read] Error!!!"); - return -1; -} - -/** - * @brief [VFS] Полное чтение файла - * - * @param int node - Адрес монтирования - * @param int elem - Индекс файла - * - * @return char* - Содержимое файла - */ -char* vfs_readChar(int node,int elem){ - //qemu_log("[VFS] [readChar] Node:%d | Elem: %d",node,elem); - if (vfs_mount[node]->readChar != 0){ - char* buffer = vfs_mount[node]->readChar(elem); - return buffer; - } - return 0; -} - -/** - * @brief [VFS] Поиск папки - * - * @param char* filename - Путь к папке (виртуальный) - * - * @return uint32_t - Индекс папки, или отрицательное значение при ошибке - */ -uint32_t vfs_findDir(char* path){ - qemu_log("`%s`",path); - - int node = vfs_foundMount(path); - - if (vfs_mount[node]->findDir != 0){ - char* c_path = (char*)kmalloc(sizeof(char)*(strlen(path)+1)); - - vfs_getPath(node, path, c_path); - - qemu_log("Got path: %s", c_path); - - uint32_t elem = vfs_mount[node]->findDir(c_path); - - kfree(c_path); - return elem; - } - - return -1; -} - -/** - * @brief [VFS] Получить длину файла (поиск по виртуальному пути) - * - * @param char* filename - Путь к файлу (виртуальный) - * - * @return size_t - Размер файла или отрицательное значение при ошибке - */ -ssize_t vfs_getLengthFilePath(const char* filename){ - int node = vfs_foundMount(filename); - if (vfs_mount[node]->findFile != 0 && vfs_mount[node]->getLengthFile != 0){ - char* path = (char*)kmalloc(sizeof(char)*strlen(filename)); - vfs_getPath(node, filename, path); - uint32_t elem = vfs_mount[node]->findFile(path); - size_t size = vfs_mount[node]->getLengthFile(elem); - - kfree(path); - //qemu_log("\n\n\t * [VFS] [gLFP] Node: %d | Elem: %d | Size: %d",node,elem,size); - return size; - } - return -2; -} - -/** - * @brief [VFS] Получить размер файла (поиск по индексу) - * - * @param int node - Адрес монтирования - * @param int elem - Индекс файла - * - * @return size_t - Размер файла или отрицательное значение при ошибке - */ -size_t vfs_getLengthFile(int node,int elem){ - if (vfs_mount[node]->getLengthFile != 0){ - return vfs_mount[node]->getLengthFile(elem); - } - return -1; -} - -/** - * @brief [VFS] Получить отступ в файловой системе у файла - * - * @param int node - Адрес монтирования - * @param int elem - Индекс файла - * - * @return int - Позиция файла или отрицательное значение при ошибке - */ -int vfs_getOffsetFile(int node,int elem){ - if (vfs_mount[node]->getOffsetFile != 0){ - return vfs_mount[node]->getOffsetFile(elem); - } - return -1; -} - -/** - * @brief [VFS] Получить размер устройства - * - * @param int node - Адрес монтирования - * - * @return size_t - Размер диска - */ -size_t vfs_getDiskSize(int node){ - return vfs_mount[node]->diskSize(node); -} - -/** - * @brief [VFS] Получить свободное место устройства - * - * @param int node - Адрес монтирования - * - * @return size_t - Размер свободного пространства диска - */ -size_t vfs_getDiskSpace(int node){ - return vfs_mount[node]->diskSpace(node); - -} - -/** - * @brief [VFS] Получить занятое место устройства - * - * @param int node - Адрес монтирования - * - * @return size_t - Размер занятого пространства диска - */ -size_t vfs_getDiskUsed(int node){ - return vfs_mount[node]->diskUsed(node); -} - -/** - * @brief [VFS] Получить название устройства - * - * @param int node - Адрес монтирования - * - * @return char* - Название устройства - */ -char* vfs_getName(int node){ - return vfs_mount[node]->getDevName(node); -} - -/** - * @brief [VFS] Получить количество файлов в папке - * - * @param char* path - Путь к файлу (виртуальный) - * - * @return size_t - Количество файлов - */ -size_t vfs_getCountElemDir(char* path){ - int node = vfs_foundMount(path); - if (vfs_mount[node]->getCountElemFolder != 0) { - char* c_path = (char*)kmalloc(sizeof(char)*strlen(path)); - vfs_getPath(node, path, c_path); - - uint32_t folder_elems = vfs_mount[node]->getCountElemFolder(c_path); - - kfree(c_path); - return folder_elems; - } - return 0; -} - -/** - * @brief [VFS] Поиск папки - * - * @param char* filename - Путь к папке (виртуальный) - * - * @return int - Индекс папки, или отрицательное значение при ошибке - */ -struct dirent* vfs_getListFolder(char* path){ - int node = vfs_foundMount(path); - struct dirent* elem = 0; - - if (vfs_mount[node]->getListElem != 0) { - char* c_path = (char*)kmalloc(sizeof(char)*strlen(path) + 1); - - vfs_getPath(node, path, c_path); - elem = vfs_mount[node]->getListElem(c_path); - - kfree(c_path); - return elem; - } - - return elem; -} - -/** - * @brief [VFS] Создание файла - * - * @warning Еше не реализовано - */ -void vfs_createFile(){ -} - -/** - * @brief [VFS] Создание папки - * - * @warning Еше не реализовано - */ -void vfs_createDir(){ -} - -/** - * @brief [VFS] Вывод содержимого списка файла и папок - * - * @warning Еше не реализовано - */ -void vfs_list(){ - vfs_mount[0]->list(""); -} - -/** - * @brief [VFS] Удаление файла - * - * @warning Еше не реализовано - */ -void vfs_deleteFile(){ -} - - -/** - * @brief [VFS] Получить тип устройства - * - * @warning Еше не реализовано - */ -void vfs_getType(){ -} - -/** - * @brief [VFS] Получить точку монтирования устройства - * - * @warning Еше не реализовано - */ -void vfs_getMountPoint(){ -} - -void vfs_unlistFolder(const char* path, struct dirent* ptr) { - int node = vfs_foundMount(path); - if (vfs_mount[node]->unlistElem){ - vfs_mount[node]->unlistElem(ptr); - } -} - -size_t vfs_byteToKByte(size_t bytes){ - return (bytes == 0?0:bytes/1024); -} diff --git a/kernel/src/drv/video/vbe.c b/kernel/src/drv/video/vbe.c index ca43b2b14..10c5b960f 100644 --- a/kernel/src/drv/video/vbe.c +++ b/kernel/src/drv/video/vbe.c @@ -2,7 +2,7 @@ * @file drv/video/vbe.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Драйвер VBE - * @version 0.3.3 + * @version 0.3.4 * @date 2022-11-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ diff --git a/kernel/src/extra/cli.c b/kernel/src/extra/cli.c new file mode 100644 index 000000000..7a378fbfb --- /dev/null +++ b/kernel/src/extra/cli.c @@ -0,0 +1,491 @@ +/** + * @file extra/cli.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) + * @brief [CLI] Sayori Command Line (SCL -> Shell) + * @version 0.3.4 + * @date 2022-10-20 + * @copyright Copyright SayoriOS Team (c) 2022-2023 + */ + +#include +#include +#include "elf/elf.h" +#include "io/tty.h" +#include "mem/vmm.h" +#include "io/status_loggers.h" +#include "mem/pmm.h" +#include "lib/split.h" +#include "version.h" +#include "drv/input/keyboard.h" +#include "lib/php/explode.h" +#include "fs/nvfs.h" +#include "lib/list.h" +#include "sys/scheduler.h" +#include "sys/timer.h" +#include "drv/disk/dpm.h" +#include +#include +#include "sys/pixfmt.h" +#include "io/rgb_image.h" +#include + +size_t T_CLI_KYB = 0; ///< Индекс триггера +int G_CLI_CURINXA = 0; +int G_CLI_CURINXB = 0; +int G_CLI_H_KYB = 1; +int G_CLI_CURINXD = 17; ///< Текущий диск +char G_CLI_PATH[1024] = "R:\\Sayori\\"; + +typedef struct { + char* name; + char* alias; + uint32_t (*funcv)(uint32_t, char**); + char* helpstring; +} CLI_CMD_ELEM; + +CLI_CMD_ELEM G_CLI_CMD[]; + +// void F_CLI_KYB(void* data1,void* data2,void* data3,void* data4,void* data5){ +// if (G_CLI_H_KYB == 0) return; +// qemu_log("[F_CLI_KYB] Key:%d | Pressed: %x",(int) data1, (int) data2); +// } + +uint32_t CLI_CMD_GBA(uint32_t c, char* v[]){ + if (c == 0 || (c == 1 && (strcmpn(v[1],"/?")))){ + _tty_printf("Эмулятор GameBoy.\n"); + _tty_printf("Пример:\"GBA R:\\game.gb\".\n"); + _tty_printf("\n"); + return 1; + } + // gb game.gb + tty_printf("%d\n", c); + + for(int i = 0; i < c; i++) { + tty_printf("#%d = %s\n", i, v[i]); + } + + gb_main(c, v); + + return 1; +} + + +uint32_t CLI_CMD_CLS(uint32_t c, char* v[]){ + clean_tty_screen(); + return 1; +} + +uint32_t CLI_CMD_SYSINFO(uint32_t c, char* v[]){ + clean_tty_screen(); + + setPosY(256); + + tty_printf("SayoriOS by SayoriOS Team (pimnik98 and NDRAEY)\n\n"); + + tty_printf("Системная информация:\n"); + tty_printf("\tOS: SayoriOS v%d.%d.%d\n", VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH); + tty_printf("\tДата сборки: %s\n", __TIMESTAMP__); + tty_printf("\tАрхитектура: %s\n", ARCH_TYPE); + tty_printf("\tПроцессор: %s\n", getNameBrand()); + tty_printf("\tОЗУ: %d kb\n", getInstalledRam()/1024); + tty_printf("\tВидеоадаптер: %s\n","Basic video adapter (Unknown)"); + tty_printf("\tДисплей: %s (%dx%d)\n", "(\?\?\?)", getScreenWidth(), getScreenHeight()); + tty_printf("\tТики: %d\n", getTicks()); + tty_printf("\tЧастота таймера: %d Гц\n", getFrequency()); + tty_printf("\tВремя с момента запуска: %f секунд\n", getUptime()); + return 1; +} + + +uint32_t CLI_CMD_DISKPART(uint32_t c, char* v[]){ + _tty_printf("Список примонтированных дисков:\n"); +// fsm_dpm_update(-1); + for(int i = 0; i < 26; i++){ + DPM_Disk dpm = dpm_info(i + 65); + if (dpm.Ready != 1) continue; + _tty_printf(" [%c] %s | %s\n", i + 65, dpm.FileSystem, dpm.Name); + } + + _tty_printf("\n"); + //clean_tty_screen(); + return 1; +} + + +uint32_t CLI_CMD_CAT(uint32_t c, char* v[]){ + if (c == 0 || (c == 1 && (strcmpn(v[1],"/?")))){ + _tty_printf("Данная программа выводит содержимое файла.\n"); + _tty_printf("Пример:\"CAT R:\\Sayori\\motd\".\n"); + _tty_printf("\n"); + return 1; + } + FILE* cat_file = fopen(v[1], "r"); + if (!cat_file){ + tty_setcolor(COLOR_ERROR); + tty_printf("[CMD] [CAT] Не удалось найти файл `%s`. Проверьте правильность введенного вами пути.\n",v[1]); + return 2; + } + + size_t filesize = fsize(cat_file); + + uint8_t* buffer = kcalloc(1,filesize); + + fread(cat_file, 1, filesize, buffer); + + tty_printf("%s", buffer); + + fclose(cat_file); + + kfree(buffer); + return 1; +} + +uint32_t CLI_CMD_JSE(uint32_t c, char* v[]){ + if (c == 0 || (c == 1 && (strcmpn(v[1],"/?")))){ + _tty_printf("JavaScript Engine.\n"); + _tty_printf("Пример:\"JSE R:\\jse\\console.js\".\n"); + _tty_printf("\n"); + return 1; + } + + int res = elk_file(v[1]); + + if (!res) { + tty_setcolor(COLOR_ERROR); + tty_printf(" [JSE] Произошла ошибка при выполнении скрипта. Подробности отправлены в консоль."); + } + return 1; +} + +uint32_t CLI_CMD_SET(uint32_t c, char* v[]){ + if (c == 1 && (strcmpn(v[1],"/?"))){ + _tty_printf("Для получения данных переменной введите \"SET ПЕРЕМЕННАЯ\".\n"); + _tty_printf("Для установки переменной введите \"SET ПЕРЕМЕННАЯ=ЗНАЧЕНИЕ\".\n"); + _tty_printf("Для удаления переменной введите \"SET ПЕРЕМЕННАЯ=\".\n\n"); + + _tty_printf("\n"); + return 1; + } + if (c == 0){ + VARIABLE* s = variable_list(""); + for(size_t i = 0; i<512; i++) { + if (s[i].Ready != 1) break; + _tty_printf("%s=%s\n", s[i].Key, s[i].Value); + } + kfree(s); + } else { + uint32_t pc = str_cdsp2(v[1], '='); + char** out = explode(v[1], '='); + + if (pc != 1){ + /// Поиск переменной + qemu_log("[Режим поиска] %s",v[1]); + VARIABLE* s = variable_list(v[1]); + for(size_t i = 0; i<512; i++) { + if (s[i].Ready != 1) break; + _tty_printf("%s=%s\n", s[i].Key, s[i].Value); + } + kfree(s); + } else if (out[1] == NULL || strlen(out[1]) == 0) { + qemu_log("[Режим удаления] %s",out[0]); + variable_write(out[0],""); + } else if (out[1] != NULL) { + qemu_log("[Режим изменения] %s",out[0]); + variable_write(out[0],out[1]); + } + +// Почему-то не работает, а должно +// for (int d = 0; d <= out;d++){ +// kfree(out[d]); +// } + kfree(out); + } + punch(); + + return 0; +} + +uint32_t CLI_CMD_DIR(uint32_t c, char* v[]) { + const char* path = (c <= 1 ? G_CLI_PATH : v[1]); + + FSM_DIR* Dir = nvfs_dir(path); + if (Dir->Ready != 1){ + tty_printf("Ошибка %d! При чтении папки: %s\n",Dir->Ready, path); + kfree(Dir); + return 1; + } else { + tty_printf("Содержимое папки папки: %s\n\n", path); + size_t Sizes = 0; + for (int i = 0; i < Dir->Count; i++){ + char* btime = fsm_timePrintable(Dir->Files[i].LastTime); + tty_printf("%s\t%s\t\t%s\n", + btime, + (Dir->Files[i].Type == 5?"<ПАПКА>":"<ФАЙЛ> "), + Dir->Files[i].Name + ); + Sizes += Dir->Files[i].Size; + kfree(btime); + } + tty_printf("\nФайлов: %d | Папок: %d | Всего: %d\n", Dir->CountFiles, Dir->CountDir, Dir->Count); + tty_printf("Размер папки: %d мб. | %d кб. | %d б.\n", (Sizes != 0?(Sizes/1024/1024):0), (Sizes != 0?(Sizes/1024):0), Sizes); + } + /// Сначала чистим массив внутри массива + kfree(Dir->Files); + /// А потом только основной массив + kfree(Dir); + return 1; +} + +uint32_t CLI_CMD_RUN(uint32_t c, char* v[]) { + if (c == 0){ + //tty_setcolor(COLOR_ERROR); + tty_printf("Файл не указан.\n"); + return 1; + } + + const char* path = v[0]; + + FILE* elf_exec = fopen(path, "r"); + + if(!elf_exec) { + fclose(elf_exec); + tty_error("\"%s\" не является внутренней или внешней\n командой, исполняемой программой или пакетным файлом.\n", path); + return 2; + } + + if(!is_elf_file(elf_exec)) { + fclose(elf_exec); + tty_printf("\"%s\" не является программой или данный тип файла не поддерживается.\n", path); + return 2; + } + + fclose(elf_exec); + + run_elf_file(path, c, v); + + return 0; +} + +uint32_t CLI_CMD_ECHO(uint32_t c, char* v[]){ + if (c == 1 && (strcmpn(v[1],"/?"))){ + _tty_printf("Данная команда выводит сообщение на экран, а также переменные.\n"); + _tty_printf("\n"); + return 1; + } + for (int i = 1; i <= c;i++){ + /// Сначало переформируем все в переменные в текст + size_t len_v = strlen(v[i]); + size_t len_e = len_v-1; + if (v[i][0] == '%' && v[i][len_e] == '%'){ + char* tmp_ve = kmalloc(len_v); + substr(tmp_ve,v[i],1,len_e-1); + char* tmp_dv = variable_read(tmp_ve); + kfree(tmp_ve); + if (tmp_dv != NULL) { + _tty_printf("%s",tmp_dv); + continue; + } + } + //if (str_contains(v[i],"")) + if (strcmpn(v[i],"%DATE%") || strcmpn(v[i],"%date%")){ + _tty_printf("2023-01-01"); + } else if (strcmpn(v[i],"%CD%") || strcmpn(v[i],"%cd%") || strcmpn(v[i],"%path%") || strcmpn(v[i],"%PATH%")){ + _tty_printf("%s",G_CLI_PATH); + } else if (strcmpn(v[i],"%RANDOM%") || strcmpn(v[i],"%random%")){ + /// Магии не будет - я хз как у нас тут работает рандом + _tty_printf("%d",1); + } else if (strcmpn(v[i],"%TIME%") || strcmpn(v[i],"%time%")){ + _tty_printf("%s","12:34"); + } else { + _tty_printf("%s ", v[i]); + } + } + _tty_printf("\n"); + return 1; +} + +uint32_t CLI_CMD_HELP(__attribute__((unused)) uint32_t c, __attribute__((unused)) char* v[]){ + _tty_printf("Для получения дополнительной информации, наберите \"команда /?\", если справка по команде есть, она будет отображена.\n\n"); + size_t hlp_padding = 11; + for(size_t i = 0; G_CLI_CMD[i].name != nullptr; i++) { + _tty_printf("%s", G_CLI_CMD[i].name); + for(size_t j = 0; j < hlp_padding - strlen(G_CLI_CMD[i].name); j++) { + _tty_printf(" "); + } + _tty_printf(" | %s\n", G_CLI_CMD[i].helpstring); + } + + punch(); + + return 1; +} + +// Pimnik98, don't being thirsty + +uint32_t gfxbench(uint32_t argc, char* args[]); +uint32_t miniplay(uint32_t argc, char* args[]); +uint32_t CLI_CMD_NET(uint32_t c, char **v); +uint32_t parallel_desktop_start(uint32_t argc, char* args[]); +uint32_t mala_draw(uint32_t argc, char* argv[]); +uint32_t pci_print_list(uint32_t argc, char* argv[]); +//uint32_t pavi_view(uint32_t argc, char* argv[]); +uint32_t rust_command(uint32_t argc, char* argv[]); +uint32_t CLI_MEMINFO(uint32_t argc, char* argv[]) { + tty_printf("Физическая:\n"); + tty_printf(" Используется: %d байт (%d MB)\n", used_phys_memory_size, used_phys_memory_size / MB); + tty_printf(" Свободно: %d байт (%d MB)\n", phys_memory_size - used_phys_memory_size, (phys_memory_size - used_phys_memory_size) / MB); + tty_printf("Виртуальная:\n"); + tty_printf(" %d записей\n", system_heap.allocated_count); + tty_printf(" Используется: %d байт (%d MB)\n", system_heap.used_memory, system_heap.used_memory / MB); + + return 0; +} + +uint32_t proc_list(uint32_t argc, char* argv[]) { + extern list_t process_list; + extern list_t thread_list; + + tty_printf("%d процессов\n", process_list.count); + + list_item_t* item = process_list.first; + for(int i = 0; i < process_list.count; i++) { + + process_t* proc = (process_t*)item; + + tty_printf(" Процесс: %d [%s]\n", proc->pid, proc->name); + + item = item->next; + } + + tty_printf("%d потоков\n", thread_list.count); + + list_item_t* item_thread = thread_list.first; + for(int j = 0; j < thread_list.count; j++) { + thread_t* thread = (thread_t*)item_thread; + + tty_printf(" Поток: %d [Стек: (%x, %x, %d)]\n", thread->id, thread->stack_top, thread->stack, thread->stack_size); + + item_thread = item_thread->next; + } + + + return 0; +} + +uint32_t ndpm_list(uint32_t, char**); +uint32_t minesweeper(uint32_t, char**); +uint32_t shell_diskctl(uint32_t, char**); +uint32_t calendar(uint32_t, char**); + +CLI_CMD_ELEM G_CLI_CMD[] = { + + {"CLS", "cls", CLI_CMD_CLS, "Очистка экрана"}, + {"CAT", "cat", CLI_CMD_CAT, "Выводит содержимое файла на экран"}, + {"ECHO", "echo", CLI_CMD_ECHO, "Выводит сообщение на экран."}, + {"DIR", "dir", CLI_CMD_DIR, "Выводит список файлов и папок."}, + {"GBA", "gba", CLI_CMD_GBA, "GameBoy Emulator"}, + {"HELP", "help", CLI_CMD_HELP, "Выводит справочную информацию о командах SayoriOS (CLI)."}, + {"SET", "set", CLI_CMD_SET, "Показывает, указывает и удаляет переменные среды SayoriOS"}, + {"NET", "net", CLI_CMD_NET, "Net info"}, + {"GFXBENCH", "gfxbench", gfxbench, "Тестирование скорости фреймбуфера"}, + {"MEMINFO", "meminfo", CLI_MEMINFO, "Информация об оперативной памяти"}, + {"MINIPLAY", "miniplay", miniplay, "WAV-проиграватель"}, + {"DESKTOP", "desktop", parallel_desktop_start, "Рабочий стол"}, + {"MALA", "mala", mala_draw, "Нарисовать рисунок"}, +// {"PAVI", "pavi", pavi_view, "Программа для просмотра изображений"}, + {"PCI", "pci", pci_print_list, "Список PCI устройств"}, + // {"RS", "rs", rust_command, "Rust command"}, + {"PROC", "proc", proc_list, "Список процессов"}, + {"SYSINFO", "sysinfo", CLI_CMD_SYSINFO, "Информация о системе"}, + {"JSE", "jse", CLI_CMD_JSE, "JavaScript Engine"}, + {"NDPM", "ndpm", ndpm_list, "Список дисков NDPM"}, + {"MINESWEEPER", "minesweeper", minesweeper, "Сапёр"}, + {"DISKPART", "diskpart", CLI_CMD_DISKPART, "Список дисков Disk Partition Manager"}, + {"DISKCTL", "diskctl", shell_diskctl, "Управление ATA-дисками"}, + {"CALENDAR", "calendar", calendar, "Календарь"}, + {nullptr, nullptr, nullptr} +}; + +void cli_handler(const char* ncmd){ + set_cursor_enabled(0); + + uint32_t argc = str_cdsp(ncmd," ") + 1; + char* argv[128] = {0}; + + str_split(ncmd, argv, " "); + + for(size_t i = 0; i < argc; i++){ + qemu_log("[CLI] '%s' => argc: %d => argv: %s", ncmd, i, argv[i]); + } + + bool found = false; + + for(size_t i = 0; G_CLI_CMD[i].name != nullptr; i++) { + if(strcmpn(G_CLI_CMD[i].name, argv[0]) || strcmpn(G_CLI_CMD[i].alias, argv[0])) { + G_CLI_CMD[i].funcv(argc, argv); + found = true; + break; + } + } + if(!found) { + CLI_CMD_RUN(argc + 1, argv); + } + + set_cursor_enabled(1); +} + +void cli(){ + qemu_log("[CLI] Started..."); + tty_set_bgcolor(0xFF000000); + tty_setcolor(0xFFFFFF); + + variable_write("HOSTNAME", "SAYORISOUL"); + variable_write("SYSTEMROOT", "R:\\Sayori\\"); + variable_write("TEMP", "T:\\"); + variable_write("USERNAME", "OEM"); + +// T_CLI_KYB = RegTrigger(0x0001, &F_CLI_KYB); + +// clean_tty_screen(); + _tty_printf("SayoriOS [Версия: v%d.%d.%d]\n",VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH); + _tty_printf("(c) SayoriOS Team, 2023.\nДля дополнительной информации наберите \"help\".\n\n"); + + punch(); + + char* input_buffer = kcalloc(1, 256); + while(1) { + size_t memory_cur = system_heap.used_memory; + size_t memory_cnt_cur = system_heap.allocated_count; + + tty_setcolor(0xFFFFFF); + tty_printf("%s>", G_CLI_PATH); + memset(input_buffer, 0, 256); + + int result = gets_max(input_buffer, 255); + + if(result == 1) { + tty_alert("\nMaximum 255 characters!\n"); + continue; + } + + size_t current_time = timestamp(); + qemu_log("cmd: %s", input_buffer); + + cli_handler(input_buffer); + tty_printf("\n"); + + ssize_t delta = (int)system_heap.used_memory - (int)memory_cur; + ssize_t delta_blocks = (int)system_heap.allocated_count - (int)memory_cnt_cur; + qemu_warn("Used memory before: %d (%d blocks)", memory_cur, memory_cnt_cur); + qemu_warn("Used memory now: %d (%d blocks)", system_heap.used_memory, system_heap.allocated_count); + qemu_warn("Memory used: %d (%d blocks)", delta, delta_blocks); + + if(delta > 0) { + qemu_err("Memory leak!"); + } + + qemu_note("Time elapsed: %d milliseconds", timestamp() - current_time); + } + + kfree(input_buffer); +} diff --git a/kernel/src/extra/texplorer.c b/kernel/src/extra/texplorer.c index 55b96db54..f418bad5d 100644 --- a/kernel/src/extra/texplorer.c +++ b/kernel/src/extra/texplorer.c @@ -10,7 +10,6 @@ */ #include #include -#include #include #include #include @@ -31,8 +30,7 @@ #define TE_COLOR_PGB_BODY 0x12 #define TE_COLOR_PGB_TEXT 0x13 - -DukeHeader_t* TE_Icons[32]; +//DukeHeader_t* TE_Icons[32]; int TE_getColor(int item){ if (item == TE_COLOR_BODY) return 0xFFFFFF; @@ -55,7 +53,7 @@ int TE_getColor(int item){ void TE_DrawTime(){ setPosY(getScreenHeight() - 20); - sayori_time_t time = get_time(); +// sayori_time_t time = get_time(); setPosX(getScreenWidth() - 68); tty_puts_color("22:22:22",TE_getColor(TE_COLOR_START_TEXT),TE_getColor(TE_COLOR_START_BODY)); @@ -118,68 +116,44 @@ void TE_DrawMessageBox(char* title, char* msg, int mode, int x, int y, int close } void TE_IconsLoader(){ - char* app = "/Sayori/Icons/app.duke"; - char* config = "/Sayori/Icons/config.duke"; - char* file = "/Sayori/Icons/file.duke"; - char* folder = "/Sayori/Icons/folder.duke"; - char* hdd = "/Sayori/Icons/hdd.duke"; - char* img = "/Sayori/Icons/img.duke"; - char* off = "/Sayori/Icons/off.duke"; - char* start = "/Sayori/Icons/start.duke"; - char* videocard = "/Sayori/Icons/videocard.duke"; - - FILE* fp_app = fopen(app, "r"); - - if(!fp_app) { - qemu_log("[TE] [ICONS] FATAL ERROR LOADER!!! File: %s | Code: %x\n", app,0); - kfree(TE_Icons[0]); - return; - } - - fread(fp_app, 1, sizeof(DukeHeader_t), TE_Icons[0]); - fclose(fp_app); - - bool error = duke_draw_from_file(app, 0, 0); - - if(error) { - qemu_log("[TE] [DBG] Во время рендера картинки произошла ошибка.\n"); - } - - - - //TE_Icons[1]; + // If you want to place icons here, use TGA. } void TE_DesktopBG(){ - DukeHeader_t* imdata = kmalloc(sizeof(DukeHeader_t)); - char* rpath = "/Sayori/Wallpaper/wallpaper.png.duke"; + // TODO: If you want to support TExplorer further, replace duke with TGA! +// DukeHeader_t* imdata = kmalloc(sizeof(DukeHeader_t)); +// char* rpath = "/Sayori/Wallpaper/wallpaper.png.duke"; ///< Вот СХУЯЛИ баня загорелась? ПРИЧЕМ ТУТ ЖД, если считывание с вирт диска??????????? // Да всё Никита, успокойся, я пофиксил. ///< Спасибо - FILE* fp = fopen(rpath, "r"); - if(!fp) { - qemu_log("[TE] [DBG] Произошла ошибка при открытии файла %s\n", rpath); - kfree(imdata); - return; - } - - fread(fp, 1, sizeof(DukeHeader_t), imdata); - fclose(fp); - - uint32_t w = getScreenWidth() - imdata->width; - uint32_t h = getScreenHeight() - imdata->height; - - bool error = duke_draw_from_file(rpath, w / 2, h / 2); - - if(error) { - qemu_log("[TE] [DBG] Во время рендера картинки произошла ошибка.\n"); - } - - kfree(rpath); - kfree(imdata); - + // TODO: If you want to support TExplorer further, replace duke with TGA! +// FILE* fp = fopen(rpath, "r"); + +// if(!fp) { +// qemu_log("[TE] [DBG] Произошла ошибка при открытии файла %s\n", rpath); +// kfree(imdata); +// return; +// } + +// fread(fp, 1, sizeof(DukeHeader_t), imdata); +// fclose(fp); +// +// uint32_t w = getScreenWidth() - imdata->width; +// uint32_t h = getScreenHeight() - imdata->height; +// + + // TODO: If you want to support TExplorer further, replace duke with TGA! +// bool error = duke_draw_from_file(rpath, w / 2, h / 2); + +// if(error) { +// qemu_log("[TE] [DBG] Во время рендера картинки произошла ошибка.\n"); +// } +// +// kfree(rpath); +// kfree(imdata); +// TE_IconsLoader(); punch(); } diff --git a/kernel/src/extra/tshell.c b/kernel/src/extra/tshell.c index 759123c21..9e43c6a13 100644 --- a/kernel/src/extra/tshell.c +++ b/kernel/src/extra/tshell.c @@ -23,7 +23,7 @@ uint32_t bakMenu = -1; void headBar(){ drawLine(2,TUI_BASE_COLOR_HEAD); - char* OSNAME = " SayoriOS v0.3.3 (Dev)"; + char* OSNAME = " SayoriOS v0.3.4 (Dev)"; setPosX(0); setPosY(16*1); tty_puts_color(OSNAME,getColorsTUI(false), TUI_BASE_COLOR_HEAD); @@ -148,7 +148,7 @@ void menu1(bool items){ if (items){ setCurrentItemTUI(0); cleanItems(); - addItem("OS: SayoriOS v0.3.3 (Dev)",true,"",""); + addItem("OS: SayoriOS v0.3.4 (Dev)",true,"",""); addItem("CPU: CX",true,"",""); addItem("RAM: ASD kb",true,"",""); addItem("Display: %s",true,"",""); // 2 diff --git a/kernel/src/fmt/tga.c b/kernel/src/fmt/tga.c index 29830d092..52f3f56b4 100644 --- a/kernel/src/fmt/tga.c +++ b/kernel/src/fmt/tga.c @@ -2,17 +2,17 @@ * @file fmt/tga.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief [Images] Targa - Формат, который также используется многими игровыми движками (например, Quake) - * @version 0.3.3 + * @version 0.3.4 * @date 2023-07-28 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ - - -#include -#include +#include "lib/stdio.h" +#include "mem/vmm.h" +#include "io/screen.h" +#include "io/tty.h" #include - +#include int tga_paint(char* path) { ON_NULLPTR(path, { @@ -26,7 +26,8 @@ int tga_paint(char* path) { qemu_log("[CMD] [TGA] [PAINT] Не удалось найти файл `%s`. Проверьте правильность введенного вами пути.\n",path); return -1; } - rgba_color* rgba = kmalloc(sizeof(rgba_color)); + +// rgba_color* rgba = kmalloc(sizeof(rgba_color)); size_t zxfsize = fsize(file); char* ptr = kmalloc(zxfsize); @@ -126,7 +127,7 @@ int tga_paint(char* path) { y = i = 0; - size_t pixel = 0; +// size_t pixel = 0; size_t current_processing = 0; size_t cur_x = 0; @@ -203,6 +204,8 @@ int tga_paint(char* path) { qemu_log("[TGA] DONE %d-1",ptr[2]); punch(); qemu_log("[TGA] DONE %d-2",ptr[2]); + + return 0; } int tga_info(char* path){ diff --git a/kernel/src/fmt/tga_extract.c b/kernel/src/fmt/tga_extract.c index ea785f4d4..a560d6584 100644 --- a/kernel/src/fmt/tga_extract.c +++ b/kernel/src/fmt/tga_extract.c @@ -3,8 +3,8 @@ #include "common.h" #include "lib/stdio.h" #include "fmt/tga.h" -#include "sys/memory.h" #include "io/ports.h" +#include "mem/vmm.h" bool tga_extract_info(const char* path, tga_header_t* out_meta){ FILE* file = fopen(path, "rb"); @@ -25,108 +25,108 @@ int tga_extract_pixels(const char* path, uint32_t* pixel_buf) { FILE* file = fopen(path, "rb"); if(!file){ - return -1; - } + return -1; + } + + fseek(file, 0, SEEK_END); - fseek(file, 0, SEEK_END); + size_t filesize = ftell(file); - size_t filesize = ftell(file); + fseek(file, 0, SEEK_SET); - fseek(file, 0, SEEK_SET); + uint8_t* file_data = kcalloc(filesize, 1); - uint8_t* file_data = kcalloc(filesize, 1); - - fread(file, filesize, 1, file_data); + fread(file, filesize, 1, file_data); tga_header_t* targa_header = (tga_header_t*)file_data; - + char* data = (char*)file_data + sizeof(tga_header_t); - // IDK how to understand this code. + // IDK how to understand this code. int i = 0, - j = 0, - k = 0, - x = 0, - y = 0, - w = targa_header->w, - h = targa_header->h, - o = (file_data[11] << 8) + file_data[10]; + j = 0, + k = 0, + x = 0, + y = 0, + w = targa_header->w, + h = targa_header->h, + o = (file_data[11] << 8) + file_data[10]; int m = (targa_header->colormap ? (file_data[7]>>3) * file_data[5] : 0) + 18; - + if(w < 1 || h < 1) { return -2; } - + if (targa_header->image_type != 1 && targa_header->image_type != 2 && targa_header->image_type != 9 && targa_header->image_type != 10) - { + { return -3; } switch(targa_header->image_type) { case TGA_MODE_UC_CMI: { - if(file_data[6] != 0 - || file_data[4] != 0 - || file_data[3] != 0 - || (file_data[7]!=24 && file_data[7]!=32)) { + if(file_data[6] != 0 + || file_data[4] != 0 + || file_data[3] != 0 + || (file_data[7]!=24 && file_data[7]!=32)) { return -4; } - - for(y = i = 0; y>3) + 18; - + + for(y = i = 0; y>3) + 18; + int g = file_data[j]; int a = file_data[j+1]; int b = file_data[j+2]; int r = (file_data[7]==32?file_data[j+3]:0xff); - pixel_buf[ - y * targa_header->w + x - ] = (a << 24) - | (b << 16) - | (g << 8 ) - | (r << 0 ); - } - } - break; - } + pixel_buf[ + y * targa_header->w + x + ] = (a << 24) + | (b << 16) + | (g << 8 ) + | (r << 0 ); + } + } + break; + } case TGA_MODE_UC_RGB:{ - if(file_data[5]!=0 || file_data[6]!=0 || file_data[1]!=0 || (file_data[16]!=24 && file_data[16]!=32)) { + if(file_data[5]!=0 || file_data[6]!=0 || file_data[1]!=0 || (file_data[16]!=24 && file_data[16]!=32)) { return -4; } - - for(y = i = 0; y < h; y++) { - j = (!o ? h - y - 1 : y) * w * (targa_header->bpp >> 3); - for(x = 0; x < w; x++) { + + for(y = i = 0; y < h; y++) { + j = (!o ? h - y - 1 : y) * w * (targa_header->bpp >> 3); + for(x = 0; x < w; x++) { int g = file_data[j]; int a = file_data[j+1]; int b = file_data[j+2]; int r = (targa_header->bpp == 32 ? file_data[j+3] : 0xff); - - pixel_buf[ - y * targa_header->w + x - ] = (a << 24) - | (b << 16) - | (g << 8 ) - | (r << 0 ); - - j += targa_header->bpp >> 3; - } - } - break; + + pixel_buf[ + y * targa_header->w + x + ] = (a << 24) + | (b << 16) + | (g << 8 ) + | (r << 0 ); + + j += targa_header->bpp >> 3; + } + } + break; } case TGA_MODE_RL_RGB: { if(file_data[5]!=0 || file_data[6]!=0 || file_data[1]!=0 || (file_data[16]!=24 && file_data[16]!=32)) { return -4; } - y = i = 0; + y = i = 0; size_t current_processing = 0; @@ -136,7 +136,7 @@ int tga_extract_pixels(const char* path, uint32_t* pixel_buf) { while(cur_y < targa_header->h) { uint8_t rep_count_raw = data[current_processing++]; uint8_t repetition_count = (rep_count_raw & 0b01111111) + 1; - + // If packet is raw, repetition count will indicate pixel count. bool is_raw = ((rep_count_raw & 0b10000000) >> 7); // Extract highest bit @@ -144,7 +144,7 @@ int tga_extract_pixels(const char* path, uint32_t* pixel_buf) { g = 0, b = 0, a = 0; - + if(is_raw) { r = data[current_processing++] & 0xff; g = data[current_processing++] & 0xff; @@ -165,12 +165,12 @@ int tga_extract_pixels(const char* path, uint32_t* pixel_buf) { // b, g, r, a // }); - pixel_buf[ - cur_y * targa_header->w + cur_x - ] = (a << 24) - | (b << 16) - | (g << 8 ) - | (r << 0 ); + pixel_buf[ + cur_y * targa_header->w + cur_x + ] = (a << 24) + | (b << 16) + | (g << 8 ) + | (r << 0 ); cur_x++; } @@ -194,12 +194,12 @@ int tga_extract_pixels(const char* path, uint32_t* pixel_buf) { // b, g, r, a // }); - pixel_buf[ - cur_y * targa_header->w + cur_x - ] = (a << 24) - | (b << 16) - | (g << 8 ) - | (r << 0 ); + pixel_buf[ + cur_y * targa_header->w + cur_x + ] = (a << 24) + | (b << 16) + | (g << 8 ) + | (r << 0 ); cur_x++; } @@ -207,7 +207,200 @@ int tga_extract_pixels(const char* path, uint32_t* pixel_buf) { } } - break; + break; + } + default: { + qemu_err("Error: Mode not implemented: %d\n", targa_header->image_type); + break; + } + } + + kfree(file_data); + fclose(file); + + return 0; +} + +// Pixel buffer needs to be 32-bit ARGB buffer +int tga_extract_pixels_from_data(const char* raw_data, uint32_t* pixel_buf) { + ON_NULLPTR(raw_data, { + return 0; + }); + + tga_header_t* targa_header = (tga_header_t*)raw_data; + + qemu_warn("W: %d", targa_header->w); + qemu_warn("H: %d", targa_header->h); + qemu_warn("BPP: %d", targa_header->bpp); + + char* data = (char*)raw_data + sizeof(tga_header_t); + + // IDK how to understand this code. + + int i = 0, + j = 0, + k = 0, + x = 0, + y = 0, + w = targa_header->w, + h = targa_header->h, + o = (raw_data[11] << 8) + raw_data[10]; + + int m = (targa_header->colormap ? (raw_data[7]>>3) * raw_data[5] : 0) + 18; + + if(w < 1 || h < 1) { + return -2; + } + + if (targa_header->image_type != 1 + && targa_header->image_type != 2 + && targa_header->image_type != 9 + && targa_header->image_type != 10) + { + return -3; + } + + switch(targa_header->image_type) { + case TGA_MODE_UC_CMI: { + if(raw_data[6] != 0 + || raw_data[4] != 0 + || raw_data[3] != 0 + || (raw_data[7]!=24 && raw_data[7]!=32)) { + return -4; + } + + for(y = i = 0; y>3) + 18; + + int g = raw_data[j]; + int a = raw_data[j+1]; + int b = raw_data[j+2]; + int r = (raw_data[7]==32?raw_data[j+3]:0xff); + + pixel_buf[ + y * targa_header->w + x + ] = (a << 24) + | (b << 16) + | (g << 8 ) + | (r << 0 ); + } + } + break; + } + case TGA_MODE_UC_RGB:{ + if(raw_data[5]!=0 || raw_data[6]!=0 || raw_data[1]!=0 || (raw_data[16]!=24 && raw_data[16]!=32)) { + return -4; + } + + for(y = i = 0; y < h; y++) { + j = (!o ? h - y - 1 : y) * w * (targa_header->bpp >> 3); + for(x = 0; x < w; x++) { + int g = raw_data[j]; + int a = raw_data[j+1]; + int b = raw_data[j+2]; + int r = (targa_header->bpp == 32 ? raw_data[j+3] : 0xff); + + pixel_buf[ + y * targa_header->w + x + ] = (a << 24) + | (b << 16) + | (g << 8 ) + | (r << 0 ); + + j += targa_header->bpp >> 3; + } + } + break; + } + case TGA_MODE_RL_RGB: { + if(raw_data[5]!=0 || raw_data[6]!=0 || raw_data[1]!=0 || (raw_data[16]!=24 && raw_data[16]!=32)) { + return -4; + } + + y = i = 0; + + size_t current_processing = 0; + + size_t cur_x = 0; + size_t cur_y = 0; + + while(cur_y < targa_header->h) { + uint8_t rep_count_raw = data[current_processing++]; + uint8_t repetition_count = (rep_count_raw & 0b01111111) + 1; + + // If packet is raw, repetition count will indicate pixel count. + bool is_raw = ((rep_count_raw & 0b10000000) >> 7); // Extract highest bit + + uint8_t r = 0, + g = 0, + b = 0, + a = 0; + + if(is_raw) { + r = data[current_processing++] & 0xff; + g = data[current_processing++] & 0xff; + b = data[current_processing++] & 0xff; + + if(targa_header->bpp == 32) + a = data[current_processing++] & 0xff; + else + a = 0xFF; + + while(repetition_count--) { + if(cur_x >= targa_header->w) { + cur_x = 0; + cur_y++; + } + + // setPixelAlpha(cur_x, cur_y, (rgba_color) { + // b, g, r, a + // }); + + pixel_buf[ + cur_y * targa_header->w + cur_x + ] = (a << 24) + | (b << 16) + | (g << 8 ) + | (r << 0 ); + + cur_x++; + } + } else { + while(repetition_count--) { + r = data[current_processing++] & 0xff; + g = data[current_processing++] & 0xff; + b = data[current_processing++] & 0xff; + + if(targa_header->bpp == 32) + a = data[current_processing++]; + else + a = 0xFF; + + if(cur_x >= targa_header->w) { + cur_x = 0; + cur_y++; + } + + // setPixelAlpha(cur_x, cur_y, (rgba_color) { + // b, g, r, a + // }); + + pixel_buf[ + cur_y * targa_header->w + cur_x + ] = (a << 24) + | (b << 16) + | (g << 8 ) + | (r << 0 ); + + cur_x++; + } + + } + } + + break; } default: { qemu_log("Error: Mode not implemented: %d\n", targa_header->image_type); @@ -215,5 +408,5 @@ int tga_extract_pixels(const char* path, uint32_t* pixel_buf) { } } - return 0; -} \ No newline at end of file + return 0; +} diff --git a/kernel/src/fs/NatSuki.c b/kernel/src/fs/NatSuki.c index ec200ee7d..6a3388ea2 100644 --- a/kernel/src/fs/NatSuki.c +++ b/kernel/src/fs/NatSuki.c @@ -2,14 +2,20 @@ * @file fs/NatSuki.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) * @brief [VFS] [Драйвер] NatSuki - Виртуальная файловая система - * @version 0.3.3 + * @version 0.3.4 * @date 2023-01-27 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include +#include #include -fs_node_t *nat_root; ///< Ссылка на виртуальную фс +#include "drv/vfs_new.h" +#include "io/serial_port.h" +#include "mem/vmm.h" +#include "lib/split.h" +#include "io/tty.h" + +fs_node_t *nat_root = 0; ///< Ссылка на виртуальную фс bool __milla_b_init = false; ///< Milla готова к работе? char* __milla_null = "null"; ///< Ответ, если Milla не готовa char* __milla_buffer = 0; ///< Буфер @@ -40,7 +46,9 @@ int __milla_getCode(){ * @brief [Milla] Отправка пакета */ void __milla_sendcmd(char* msg){ - if (!__milla_b_init){return;} + if (!__milla_b_init) + return; + __com_formatString(PORT_COM2,"%s |$MC#|",msg); } @@ -156,7 +164,7 @@ int __milla_cleanState(){ } } -char* __milla_getFile(char* path) { +char* __milla_getFile(const char *path) { if (!__milla_b_init){return __milla_null;} __com_formatString(PORT_COM2,"READ %s |$MC#|",path); int answer = atoi(__milla_getcmd()); @@ -173,9 +181,16 @@ char* __milla_getFile(char* path) { size_t inx = 0; char* buf = (char*)kmalloc(sizeof(char*) * answer); memset(buf,0,answer); + bool st1 = false; for(;;) { if (inx >= answer)break; - tmp = serial_readchar(PORT_COM2); + tmp = serial_readchar_timeout(PORT_COM2,10000,false); + if (tmp == 0xFFFFFFFF && !st1){ + //qemu_log("SKIP 0xFFFFFFFF"); + continue; + } + if (tmp != 0xFFFFFFFF && !st1) st1 = true; + buf[inx] = tmp; inx++; } @@ -281,9 +296,17 @@ char* __milla_getList(char* path){ size_t inx = 0; char* buf = (char*)kmalloc(sizeof(char*) * answer); memset(buf,0,answer); + bool st1 = false; for(;;) { if (inx >= answer)break; - tmp = serial_readchar(PORT_COM2); + + tmp = serial_readchar_timeout(PORT_COM2,10000,false); + if (tmp == 0xFFFFFFFF && !st1){ + //qemu_log("SKIP 0xFFFFFFFF"); + continue; + } + if (tmp != 0xFFFFFFFF && !st1) st1 = true; + buf[inx] = tmp; inx++; } @@ -354,7 +377,7 @@ void __milla_destroy(){ /** * @brief [SEFS] Полное чтение файла * - * @param int node - Индекс файла + * @param node - Индекс файла * * @return char* - Содержимое файла */ @@ -366,10 +389,10 @@ char* nat_readChar(uint32_t node){ /** * @brief [SEFS] Чтение файла * - * @param int node - Индекс файла - * @param int offset - С какой позиции читать файл - * @param int size - Длина читаемого файла - * @param void* buf - Буфер + * @param node - Индекс файла + * @param offset - С какой позиции читать файл + * @param size - Длина читаемого файла + * @param buf - Буфер * * @return uint32_t - Размер файла или отрицательное значение при ошибке */ @@ -386,10 +409,10 @@ uint32_t nat_read(uint32_t node, size_t offset, size_t size, void *buffer){ /** * @brief [SEFS] запись в файл * - * @param int node - Индекс файла - * @param int offset - С какой позиции писать файл - * @param int size - Сколько пишем - * @param void* buf - Буфер + * @param node - Индекс файла + * @param offset - С какой позиции писать файл + * @param size - Сколько пишем + * @param buf - Буфер * * @return uint32_t - Размер записаных байтов или отрицательное значение при ошибке */ @@ -402,7 +425,7 @@ uint32_t nat_write(uint32_t node, size_t offset, size_t size, void *buffer){ /** * @brief [SEFS] Получить размер файла (поиск по индексу) * - * @param int node - Индекс файла + * @param node - Индекс файла * * @return size_t - Размер файла или 0 */ @@ -416,7 +439,7 @@ size_t nat_getLengthFile(int node){ /** * @brief [SEFS] Получить отступ в файловой системе у файла * - * @param int node - Индекс файла + * @param node - Индекс файла * * @return int - Позиция файла или отрицательное значение при ошибке */ @@ -428,7 +451,7 @@ size_t nat_getOffsetFile(int node){ /** * @brief [SEFS] Поиск файла на устройстве * - * @param char* filename - Путь к файлу (виртуальный) + * @param filename - Путь к файлу (виртуальный) * * @return int - Индекс файла, или отрицательное значение при ошибке */ @@ -441,7 +464,7 @@ int32_t nat_findFile(char* filename){ /** * @brief [SEFS] Поиск папки на устройстве * - * @param char* filename - Путь к папке (виртуальный) + * @param filename - Путь к папке (виртуальный) * * @return int - Индекс папки, или отрицательное значение при ошибке */ @@ -513,7 +536,7 @@ struct dirent* nat_list(char* path){ /** * @brief [SEFS] Количество используемого места устройства * - * @param int node - Нода + * @param node - Нода * * @return uint64_t - Количество используемого места устройства */ @@ -525,7 +548,7 @@ size_t nat_diskUsed(int node){ /** * @brief [SEFS] Количество свободного места устройства * - * @param int node - Нода + * @param node - Нода * * @return uint64_t - Количество свободного места устройства */ @@ -537,7 +560,7 @@ size_t nat_diskSpace(int node){ /** * @brief [SEFS] Количество всего места устройства * - * @param int node - Нода + * @param node - Нода * * @return uint64_t - Количество всего места устройства */ @@ -549,7 +572,7 @@ size_t nat_diskSize(int node){ /** * @brief [SEFS] Получение имени устройства * - * @param int node - Нода + * @param node - Нода * * @return char* - Имя устройства */ @@ -570,7 +593,7 @@ bool isInitNatSuki(){ /** * @brief [SEFS] Инициализация Sayori Easy File System * - * @param uint32_t location - Точка монтирования + * @param location - Точка монтирования * * @return fs_node_t - Структура с файлами */ @@ -596,22 +619,22 @@ fs_node_t *NatSuki_initrd(uint32_t location){ nat_root->flags = FS_DIRECTORY; nat_root->open = 0; nat_root->close = 0; - nat_root->findFile = &nat_findFile; - nat_root->findDir = &nat_findDir; + nat_root->findFile = (findFile_type_t) &nat_findFile; + nat_root->findDir = (findFile_type_t) &nat_findDir; nat_root->getLengthFile = &nat_getLengthFile; nat_root->getOffsetFile = &nat_getOffsetFile; - nat_root->list = &nat_list; + nat_root->list = (list_type_t) &nat_list; nat_root->ptr = 0; nat_root->impl = 0; nat_root->readChar = &nat_readChar; nat_root->read = &nat_read; - nat_root->write = &nat_write; + nat_root->write = (write_type_t) &nat_write; nat_root->diskUsed = &nat_diskUsed; nat_root->diskSpace = &nat_diskSpace; nat_root->diskSize = &nat_diskSize; nat_root->getDevName = &nat_getDevName; nat_root->getCountElemFolder = &nat_countElemFolder; - nat_root->getListElem = &nat_list; + nat_root->getListElem = (dirlist_type_t) &nat_list; nat_root->unlistElem = &nat_dirfree; return nat_root; diff --git a/kernel/src/fs/fat12.c b/kernel/src/fs/fat12.c index 5aea26b49..c5eff2465 100644 --- a/kernel/src/fs/fat12.c +++ b/kernel/src/fs/fat12.c @@ -2,7 +2,7 @@ * @file drv/fs/fat12.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Файловая система FAT12 - * @version 0.3.3 + * @version 0.3.4 * @date 2023-07-28 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ diff --git a/kernel/src/fs/fat32.c b/kernel/src/fs/fat32.c new file mode 100644 index 000000000..6ab77e5d2 --- /dev/null +++ b/kernel/src/fs/fat32.c @@ -0,0 +1,301 @@ +/** + * @file drv/fs/fat32.c + * @author Павленко Андрей (pikachu.andrey@vk.com) + * @brief Файловая система FAT32 + * @version 0.3.4 + * @date 2023-12-26 + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ + +#include +#include +#include +#include + +#include "drv/disk/dpm.h" +#include "mem/vmm.h" +#include "lib/utf_conversion.h" + +size_t fs_fat32_read(char Disk, const char* Path, size_t Offset, size_t Size,void* Buffer){ + return 0; +} + +size_t fs_fat32_write(char Disk, const char* Path,size_t Offset,size_t Size,void* Buffer){ + return 0; +} + +FSM_FILE fs_fat32_info(char Disk, const char* Path) { + return (FSM_FILE){}; +} + +FSM_DIR* fs_fat32_dir(char Disk,const char* Path){ + fat_description_t* desc = dpm_metadata_read(Disk); + + FSM_DIR *Dir = kcalloc(sizeof(FSM_DIR), 1); + FSM_FILE *Files = kcalloc(sizeof(FSM_FILE), 1); + + // TODO: Actually provide an information about disk + + Dir->Ready = 1; + Dir->Count = 0; + Dir->CountFiles = 0; + Dir->CountDir = 0; + Dir->CountOther = 0; + Dir->Files = Files; + + return Dir; +} + +int fs_fat32_create(char Disk,const char* Path,int Mode){ + return 0; +} + +int fs_fat32_delete(char Disk,const char* Path,int Mode){ + return 0; +} + +void fs_fat32_label(char Disk, char* Label){ + fat_description_t* desc = dpm_metadata_read(Disk); + + memcpy(Label, desc->info.volume_label, 11); +} + +vector_t* fs_fat32_get_clusters(char Disk, size_t cluster_number) { + fat_description_t* desc = dpm_metadata_read(Disk); + + vector_t* container = vector_new(); + + uint32_t cur_cluster = cluster_number; + + do { + uint32_t old_cluster = cur_cluster; + + dpm_read(Disk, desc->fat_offset + (cur_cluster * 4), 4, &cur_cluster); + + vector_push_back(container, old_cluster); + } while(!(cur_cluster == 0x0fffffff || cur_cluster == 0x0ffffff8)); + + return container; +} + +// Make sure buffer size is cluster-size aligned :) +void fs_fat32_read_clusters_to_memory(char Disk, size_t cluster_number, void* buffer) { + fat_description_t* desc = dpm_metadata_read(Disk); + + vector_t* cluster_list = fs_fat32_get_clusters(Disk, cluster_number); + + for(int i = 0; i < cluster_list->size; i++) { + size_t current_cluster = vector_get(cluster_list, i).element; + + size_t addr = ((desc->info.reserved_sectors + (desc->info.fat_size_in_sectors * 2)) \ + + ((current_cluster - 2) * desc->info.sectors_per_cluster)) * desc->info.bytes_per_sector; + + dpm_read(Disk, addr, desc->cluster_size, (void*)(((size_t)buffer) + (i * desc->cluster_size))); + } + + vector_destroy(cluster_list); +} + +size_t fs_fat32_get_cluster_count(char Disk, size_t cluster_number) { + vector_t* clusters = fs_fat32_get_clusters(Disk, cluster_number); + + size_t cluster_count = clusters->size; + + vector_destroy(clusters); + + return cluster_count; +} + +size_t fs_fat32_read_lfn(char* data, char* out) { + size_t encoded_characters = 0; + + uint16_t* chunk = kcalloc(sizeof(uint16_t), 13); + LFN_t lfn = {0}; + + memset(out, 0, 256); + + while(true) { + memcpy(&lfn, data, sizeof lfn); + + data += sizeof lfn; + + uint8_t lfn_num = lfn.attr_number & ~LFN_LAST_ENTRY; + + if(lfn.reserved != 0 || lfn_num > 20 || lfn.attribute != 0x0F) { + // It's normal + // qemu_err("Invalid LFN!"); + return 0; + } + + memcpy(chunk, lfn.first_name_chunk, 10); + memcpy(chunk + 5, lfn.second_name_chunk, 12); + memcpy(chunk + 11, lfn.third_name_chunk, 4); + + uint16_t* prepared_chunk = kcalloc(sizeof(uint16_t), 13); + + for(int i = 0; i < 13; i++) { + if(chunk[i] == 0xffff) { + break; + } else { + prepared_chunk[i] = chunk[i]; + encoded_characters += 2; + } + } + +// char* x = new char[encoded_characters]; + char* x = kcalloc(1, encoded_characters); + + utf16_to_utf8((short*)prepared_chunk, + (int)encoded_characters / 2, + x); + +// qemu_note("[%d] PIECE: %.13s", encoded_characters, x); + + memmove(out + 13, out, strlen(x)); + memcpy(out, x, 13); + + kfree(prepared_chunk); + kfree(x); + + memset(chunk, 0, 26); + + if(lfn_num == 1) // Is last? + break; + } + + kfree(chunk); + + return encoded_characters; +} + +fat_file_info_t fs_fat32_get_file_info(char* data) { + fat_file_info_t info = {0}; + + size_t ecc = fs_fat32_read_lfn(data, info.filename); + + size_t byte_count = ecc / 2; + + size_t div = byte_count / 13, rem = byte_count % 13; + + if(rem > 0) div++; + + // Skip LFN and get into the file info section + data += sizeof(LFN_t) * div; + + memcpy(&info.advanced_info, data, sizeof info.advanced_info); + + if(strlen(info.filename) == 0) { + for(int i = 0; i < 11; i++) { +// if(info.advanced_info.short_file_name[i] == ' ') +// break; + + info.filename[i] = info.advanced_info.short_file_name[i]; + } + +// qemu_note("TODO: Read SFN and make it filename!"); +// while(1); + info.is_lfn = false; + } else { + info.is_lfn = true; + } + + info.starting_cluster = (info.advanced_info.first_cluster_high << 16) | info.advanced_info.first_cluster_low; + info.size = info.advanced_info.file_size_in_bytes; + + return info; +} + +void fs_fat32_scan_directory(char Disk, size_t directory_cluster) { + fat_description_t* desc = dpm_metadata_read(Disk); + + size_t cluster_count = fs_fat32_get_cluster_count(Disk, directory_cluster); + char* cluster_data = kcalloc(1, desc->cluster_size * cluster_count); + + fs_fat32_read_clusters_to_memory(Disk, directory_cluster, cluster_data); + + size_t offset = 0; + + // TODO: Actually scan directory + while(1) { + fat_file_info_t file = fs_fat32_get_file_info(cluster_data + offset); + + if(file.advanced_info.short_file_name[0] == 0) + break; + + size_t len = strlen(file.filename); + size_t skip_lfns_count = (len / 13); + size_t skip_lfns_remiander = (len % 13); + + if(skip_lfns_remiander > 0) + skip_lfns_count++; + + if(file.is_lfn) + offset += sizeof(LFN_t) * skip_lfns_count; + + offset += sizeof(fat_object_info_t); + + qemu_note("%s %d", file.filename, file.size); + } + +// while(1); + + kfree(cluster_data); +} + +int fs_fat32_detect(char Disk) { +// If we initialize fat32 again, bug will appear (could not read root directory) +// if(dpm_metadata_read(Disk)) { +// qemu_err("WHAT?"); +// while(1); +// } + + fat_description_t* fat_system = kcalloc(1, sizeof(fat_description_t)); + + dpm_read(Disk, 0, sizeof(fat_info_t), &fat_system->info); + + qemu_warn("Trying FAT32..."); + + bool is_fat_bootcode = (unsigned char)fat_system->info.bootcode[0] == 0xEB + && (unsigned char)fat_system->info.bootcode[1] == 0x58 + && (unsigned char)fat_system->info.bootcode[2] == 0x90; + + bool is_fat_fsname = memcmp(fat_system->info.fs_type, "FAT32", 0) == 0; + + if(is_fat_bootcode && is_fat_fsname) { + qemu_note("FAT filesystem found!"); + qemu_note("Disk label: %.11s", fat_system->info.volume_label); + + // Calculate needed values + fat_system->cluster_size = fat_system->info.bytes_per_sector * fat_system->info.sectors_per_cluster; + fat_system->fat_offset = fat_system->info.reserved_sectors * fat_system->info.bytes_per_sector; + fat_system->fat_size = fat_system->info.fat_size_in_sectors * fat_system->info.bytes_per_sector; + fat_system->reserved_fat_offset = (fat_system->info.reserved_sectors + fat_system->info.fat_size_in_sectors) * fat_system->info.bytes_per_sector; + fat_system->root_directory_offset = ((fat_system->info.reserved_sectors + (fat_system->info.fat_size_in_sectors * 2)) + ((fat_system->info.root_directory_offset_in_clusters - 2) * fat_system->info.sectors_per_cluster)) * fat_system->info.bytes_per_sector; + + qemu_note("Cluster size: %d", fat_system->cluster_size); + qemu_note("FAT offset: %d", fat_system->fat_offset); + qemu_note("FAT size: %d", fat_system->fat_size); + qemu_note("Reserved FAT offset: %d", fat_system->reserved_fat_offset); + qemu_note("Root directory offset: %d", fat_system->root_directory_offset); + + // Assign FAT32 filesystem in-place + dpm_metadata_write(Disk, (uint32_t) fat_system); + + vector_t* root_directory = fs_fat32_get_clusters(Disk, 2); + + qemu_note("[%d] Root occupies folllwing clusters:", root_directory->size); + for(int i = 0; i < root_directory->size; i++) { + qemu_note("Cluster: %d", vector_get(root_directory, i).element); + } + + vector_destroy(root_directory); + + qemu_warn("SCANNING ROOT DIRECTORY"); + fs_fat32_scan_directory(Disk, 2); + qemu_warn("END SCANNING ROOT DIRECTORY"); + + return 1; + } + + return 0; +} \ No newline at end of file diff --git a/kernel/src/fs/fsm.c b/kernel/src/fs/fsm.c new file mode 100644 index 000000000..e470d47f1 --- /dev/null +++ b/kernel/src/fs/fsm.c @@ -0,0 +1,246 @@ +/** + * @file drv/fs/fsm.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief File System Manager (Менеджер файловых систем) + * @version 0.3.4 + * @date 2023-10-16 + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ + +#include +#include +#include +#include "lib/php/str_contains.h" +#include "lib/php/explode.h" +#include "lib/sprintf.h" +#include "mem/vmm.h" + +#include "drv/disk/dpm.h" + +FSM G_FSM[255] = {0}; +int C_FSM = 0; +bool fsm_debug = false; + +void fsm_convertUnix(uint32_t unix_time, FSM_TIME* time) { + if (fsm_debug) qemu_log("[FSM] Convert unix: %d",unix_time); + uint32_t seconds_per_day = 24 * 60 * 60; + uint32_t days = unix_time / seconds_per_day; + + uint32_t years = 1970; + uint32_t month, day; + while (1) { + uint32_t days_in_year = (years % 4 == 0 && (years % 100 != 0 || years % 400 == 0)) ? 366 : 365; + if (days < days_in_year) { + break; + } + days -= days_in_year; + years++; + } + + int8_t month_days[] = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31}; + if (years % 4 == 0 && (years % 100 != 0 || years % 400 == 0)) { + month_days[1] = 29; + } + + uint32_t year_day = days; + for (month = 0; month < 12; month++) { + if (year_day < month_days[month]) { + break; + } + year_day -= month_days[month]; + } + day = year_day + 1; + + // Вычисляем компоненты времени + uint32_t seconds = unix_time % seconds_per_day; + uint32_t hour = seconds / 3600; + uint32_t minute = (seconds % 3600) / 60; + uint32_t second = seconds % 60; + //qemu_log("%d.%d.%d %d:%d:%d",years, month, day, hour, minute, second); + + time->year = years; + time->month = month; + time->day = day; + time->hour = hour; + time->minute = minute; + time->second = second; + //memcpy(); + //qemu_log("%d.%d.%d %d:%d:%d", time->year, time->month, time->day, time->hour, time->minute, time->second); +} + +char* fsm_timePrintable(FSM_TIME time){ + char* btime = 0; + + asprintf(&btime, "%04d.%02d.%02d %02d:%02d:%02d", + time.year, + time.month, + time.day, + time.hour, + time.minute, + time.second); + + return btime; +} + +int fsm_isPathToFile(const char* Path,const char* Name){ + char* zpath = pathinfo(Name, PATHINFO_DIRNAME); ///< Получаем родительскую папку элемента + char* bpath = pathinfo(Name, PATHINFO_BASENAME); ///< Получаем имя файла (или пустоту если папка) + bool isCheck1 = strcmpn(zpath,Path); ///< Проверяем совпадение путей + bool isCheck2 = strlen(bpath) == 0; ///< Проверяем, что путе нет ничего лишнего (будет 0, если просто папка) + bool isCheck3 = str_contains(Name, Path); ///< Проверяем наличие, вхождения путя + size_t c1 = str_cdsp2(Path,'\\'); + size_t c2 = str_cdsp2(Name,'\\'); + size_t c3 = str_cdsp2(Path,'/'); + size_t c4 = str_cdsp2(Name,'/'); + + bool isCheck4 = ((c2 - c1) == 1) && (c4 == c3); + bool isCheck5 = ((c4 - c3) == 1) && (c2 == c1); +/* + qemu_log("[%d] [%d] [%d] [%d] [%d] %s", isCheck1, isCheck2, isCheck3, isCheck4, isCheck5, Name); + qemu_log(" |--- %d == %d",c1,c2); + qemu_log(" |--- %d == %d",c3,c4);*/ + bool isPassed = ((isCheck1 && !isCheck2 && isCheck3) || (!isCheck1 && isCheck2 && isCheck3 && (isCheck4 || isCheck5))); + + // pimnik98, ставь kfree если есть kmalloc!!!!!!!!!!!!!!!!!!!!!!1111 + kfree(zpath); + kfree(bpath); + + return isPassed; +} + +int fsm_getIDbyName(const char* Name){ + for (int i = 0; i < C_FSM; i++){ + if (!strcmpn(G_FSM[i].Name,Name)) continue; + return i; + } + return -1; +} + +void fsm_dump(FSM_FILE file){ + qemu_log(" |--- Ready : %d",file.Ready); + qemu_log(" |--- Name : %s",file.Name); + qemu_log(" |--- Path : %s",file.Path); + qemu_log(" |--- Mode : %d",file.Mode); + qemu_log(" |--- Size : %d",file.Size); + qemu_log(" |--- Type : %d",file.Type); + qemu_log(" |--- Date : %d",file.LastTime.year); +} + +size_t fsm_read(int FIndex, char DIndex, const char* Name, size_t Offset, size_t Count, void* Buffer){ + if (fsm_debug) qemu_log("[FSM] [READ] F:%d | D:%d | N:%d | O:%d | C:%d",FIndex,DIndex,Name,Offset,Count); + if (G_FSM[FIndex].Ready == 0) return 0; + if (fsm_debug) qemu_log("[FSM] [READ] GO TO DRIVER"); + return G_FSM[FIndex].Read(DIndex,Name,Offset, Count, Buffer); +} + + +int fsm_create(int FIndex, char DIndex, const char* Name, int Mode){ + if (G_FSM[FIndex].Ready == 0) return 0; + return G_FSM[FIndex].Create(DIndex,Name,Mode); +} + + +int fsm_delete(int FIndex, const char DIndex, const char* Name, int Mode){ + if (G_FSM[FIndex].Ready == 0) + return 0; + + return G_FSM[FIndex].Delete(DIndex,Name,Mode); +} + +size_t fsm_write(int FIndex, const char DIndex, const char* Name, size_t Offset, size_t Count, void* Buffer){ + if (G_FSM[FIndex].Ready == 0) + return 0; + + return G_FSM[FIndex].Write(DIndex,Name,Offset, Count, Buffer); +} + +FSM_FILE fsm_info(int FIndex,const char DIndex, const char* Name){ + if (fsm_debug) qemu_log("[FSM] [INFO] F:%d | D:%d | N:%s",FIndex,DIndex,Name); + if (G_FSM[FIndex].Ready == 0){ + if (fsm_debug) qemu_log("[FSM] [INFO] READY == 0"); + return (FSM_FILE){}; + } + if (fsm_debug) qemu_log("[FSM] [INFO] GO TO GFSM"); + return G_FSM[FIndex].Info(DIndex,Name); +} + +FSM_DIR* fsm_dir(int FIndex,const char DIndex, const char* Name){ + if (fsm_debug) qemu_log("[FSM] [DIR] F:%d | D:%d | N:%s",FIndex,DIndex,Name); + + if (G_FSM[FIndex].Ready == 0){ + if (fsm_debug) qemu_log("[FSM] [INFO] READY == 0"); + FSM_DIR* dir = kmalloc(sizeof(FSM_DIR)); + return dir; + } + + return G_FSM[FIndex].Dir(DIndex, Name); +} + +void fsm_reg(const char* Name,int Splash,fsm_cmd_read_t Read, fsm_cmd_write_t Write, fsm_cmd_info_t Info, fsm_cmd_create_t Create, fsm_cmd_delete_t Delete, fsm_cmd_dir_t Dir, fsm_cmd_label_t Label, fsm_cmd_detect_t Detect){ + G_FSM[C_FSM].Ready = 1; + G_FSM[C_FSM].Splash = Splash; + G_FSM[C_FSM].Read = Read; + G_FSM[C_FSM].Write = Write; + G_FSM[C_FSM].Info = Info; + G_FSM[C_FSM].Create = Create; + G_FSM[C_FSM].Delete = Delete; + G_FSM[C_FSM].Dir = Dir; + G_FSM[C_FSM].Label = Label; + G_FSM[C_FSM].Detect = Detect; + memcpy(G_FSM[C_FSM].Name,Name,strlen(Name)); + qemu_log("[FSM] Registration of the '%s' file system driver is complete.",Name); + C_FSM++; +} + +int fsm_getMode(int FIndex){ + if (G_FSM[FIndex].Ready == 0) return 0; + + return G_FSM[FIndex].Splash; +} + + +void fsm_dpm_update(char Letter){ + char BLANK[128] = {'U','n','k','n','o','w','n',0}; + if (Letter == -1){ + // Global update + for(int i = 0; i < 26; i++){ + int DISKID = i + 65; + dpm_LabelUpdate(DISKID, BLANK); + dpm_FileSystemUpdate(DISKID, BLANK); + DPM_Disk dpm = dpm_info(DISKID); + if (dpm.Ready != 1) continue; + for(int f = 0; f < C_FSM; f++){ + qemu_note("[FSM] [DPM] >>> Disk %c | Test %s", DISKID, G_FSM[f].Name); + int detect = G_FSM[f].Detect(DISKID); + if (detect != 1) continue; + char* lab_test = kcalloc(1,129); + G_FSM[f].Label(DISKID,lab_test); + dpm_LabelUpdate(DISKID, lab_test); + dpm_FileSystemUpdate(DISKID, G_FSM[f].Name); + qemu_note(" | Label: %s", lab_test); + kfree(lab_test); + break; + } + } + } else { + // Personal update + int DISKID = Letter; + dpm_LabelUpdate(DISKID, BLANK); + dpm_FileSystemUpdate(DISKID, BLANK); + for(int f = 0; f < C_FSM; f++){ + qemu_note("[FSM] [DPM] >>> Disk %c | Test %s", DISKID, G_FSM[f].Name); + int detect = G_FSM[f].Detect(DISKID); + + if (detect != 1) + continue; + + char* lab_test = kcalloc(1,129); + G_FSM[f].Label(DISKID, lab_test); + dpm_LabelUpdate(DISKID, lab_test); + dpm_FileSystemUpdate(DISKID, G_FSM[f].Name); + qemu_note("[FSM] [DPM] ^^^ Disk %c | Label: %s", DISKID, lab_test); + kfree(lab_test); + break; + } + } +} diff --git a/kernel/src/fs/iso9660.c b/kernel/src/fs/iso9660.c new file mode 100644 index 000000000..354d953e3 --- /dev/null +++ b/kernel/src/fs/iso9660.c @@ -0,0 +1,123 @@ +/** + * @file drv/fs/iso9660.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief Файловая система ISO 9660 + * @version 0.3.4 + * @date 2023-12-23 + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ + +#include +#include "portability.h" +#include +#include <../src/lib/elk/ext/jse_function.h> + +void __out_limit(char* pr, char* str, size_t count){ + char* buf = kcalloc(1, count+1); + memcpy(buf,str, count); + printf("%s: '%s'\n",pr, buf); + kfree(buf); +} + + +size_t fs_iso9660_read(const char Disk,const char* Path, size_t Offset, size_t Size,void* Buffer){ + return 0; +} + +size_t fs_iso9660_write(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer){ + return 0; +} + +FSM_FILE fs_iso9660_info(const char Disk,const char* Path){ + return (FSM_FILE){}; +} + +FSM_DIR* fs_iso9660_dir(const char Disk,const char* Path){ + return 0; +} + +int fs_iso9660_create(const char Disk,const char* Path,int Mode){ + return 0; +} + +int fs_iso9660_delete(const char Disk,const char* Path,int Mode){ + return 0; +} + +void fs_iso9660_label(const char Disk, char* Label){ + char* l = kcalloc(1, 33); + int buf_read = dpm_read(Disk, 0x8028, 32, l); + if (buf_read != 32){ + memcpy(Label,"Unsupported disk",strlen("Unsupported disk")); + } else { + l[33] = 0; + jse_trim(l); + memcpy(Label,l,strlen(l)); + } + kfree(l); +} + +int fs_iso9660_detect(const char Disk){ + ISO9660_PVD* pvd = kcalloc(1, sizeof(ISO9660_PVD)); + int buf_read = dpm_read(Disk, 0x8000, sizeof(ISO9660_PVD), pvd); + if ( + pvd->Version != 0x1 || + pvd->ID[0] != 0x43 || + pvd->ID[1] != 0x44 || + pvd->ID[2] != 0x30 || + pvd->ID[3] != 0x30 || + pvd->ID[4] != 0x31 || + pvd->FileStructureVersion != 0x1 + ){ + qemu_err("[ISO9660] %c | No passed test!",Disk); + + kfree(pvd); + return 0; + } + + qemu_warn("--------------------------------"); + qemu_warn("| Label Disk %c | READ: %d", Disk, buf_read); + qemu_warn("| Zero | %x | %d ", pvd->Zero, pvd->Zero); + __out_limit("ID", pvd->ID, 5); + qemu_warn("| Version | %x | %d ", pvd->Version, pvd->Version); + __out_limit("SystemName", pvd->SystemName, 32); + __out_limit("Label", pvd->Label, 32); + qemu_warn("| VolumeSpaceSize | %x | %d ", pvd->VolumeSpaceSize, pvd->VolumeSpaceSize); + qemu_warn("| VolumeSetSize | %x | %d ", pvd->VolumeSetSize, pvd->VolumeSetSize); + qemu_warn("| VolumeSequenceNumber | %x | %d ", pvd->VolumeSequenceNumber, pvd->VolumeSequenceNumber); + qemu_warn("| LogicalBlockSize | %x | %d ", pvd->LogicalBlockSize, pvd->LogicalBlockSize); + qemu_warn("| PathTableSize | %x | %d ", pvd->PathTableSize, pvd->PathTableSize); + qemu_warn("| LocOfType_L_PathTable | %x | %d ", pvd->LocOfType_L_PathTable, pvd->LocOfType_L_PathTable); + qemu_warn("| LocOfOpti_L_PathTable | %x | %d ", pvd->LocOfOpti_L_PathTable, pvd->LocOfOpti_L_PathTable); + qemu_warn("| LocOfType_M_PathTable | %x | %d ", pvd->LocOfType_M_PathTable, pvd->LocOfType_M_PathTable); + qemu_warn("| LocOfOpti_M_PathTable | %x | %d ", pvd->LocOfOpti_M_PathTable, pvd->LocOfOpti_M_PathTable); + + __out_limit("DirectoryEntry", pvd->DirectoryEntry, 34); + __out_limit("VolumeSetID", pvd->VolumeSetID, 128); + __out_limit("PublisherID", pvd->PublisherID, 128); + __out_limit("DataPreparerID", pvd->DataPreparerID, 128); + __out_limit("ApplicationID", pvd->ApplicationID, 128); + __out_limit("CopyrightFileID", pvd->CopyrightFileID, 37); + __out_limit("AbstractFileID", pvd->AbstractFileID, 37); + __out_limit("BibliographicFileID", pvd->BibliographicFileID, 37); + __out_limit("VolumeCreationDate", pvd->VolumeCreationDate, 37); + __out_limit("VolumeModificationDate", pvd->VolumeModificationDate, 17); + __out_limit("VolumeExpirationDate", pvd->VolumeExpirationDate, 17); + __out_limit("VolumeEffectiveDate", pvd->VolumeEffectiveDate, 17); + + qemu_warn("| FSVersion | %x | %d ", pvd->FileStructureVersion, pvd->FileStructureVersion); + qemu_warn("--------------------------------"); + + + + +// ISO9660_Entity* entity = kcalloc(1, sizeof(ISO9660_Entity)); +// buf_read = dpm_read(Disk, 0x809C - 3, sizeof(ISO9660_Entity), entity); +// +// int lba = (entity->LBA[0] & 0xFF) | ((entity->LBA[0] & 0xFF00) >> 8) | ((entity->LBA[0] & 0xFF0000) >> 16) | ((entity->LBA[0] & 0xFF000000) >> 24); +// qemu_warn("LBA: %d | %x",lba,lba); + + kfree(pvd); + //kfree(entity); + return (1); +} \ No newline at end of file diff --git a/kernel/src/fs/lucario/fs.c b/kernel/src/fs/lucario/fs.c deleted file mode 100644 index 694666d3e..000000000 --- a/kernel/src/fs/lucario/fs.c +++ /dev/null @@ -1,146 +0,0 @@ -#include -#include - -LucarioDescriptor_t* lucario_fs_build_descriptor() { - return kcalloc(1, sizeof(LucarioDescriptor_t)); -} - -bool lucario_fs_init(LucarioDescriptor_t* descr, uint8_t ata_drive) { - ata_drive_t* ata_drives = ata_get_drives(); - - if(!ata_drives[ata_drive].online) { - qemu_log("Drive %x not online", ata_drive); - return false; - } - - descr->ata_drive = ata_drive; - descr->disk_capacity = ata_drives[ata_drive].capacity; - - ata_read(ata_drive, (uint8_t*)&(descr->header), 0, 512); // Read header - - if(memcmp(descr->header.magic, LUCARIOFS_MAGIC, 7)) { - qemu_log("Invalid magic for drive %x!", ata_drive); - return false; - } - - qemu_log("Initialized successfully for drive: %x", ata_drive); - - qemu_log("Info:"); - qemu_log("\t Magic: %s", descr->header.magic); - qemu_log("\t Version: %d.%d.%d", - descr->header.version_major, - descr->header.version_minor, - descr->header.version_patch); - - descr->max_entries = descr->disk_capacity / LUCARIO_DIVISOR; - - qemu_log("\t Max possible entries in this disk: %d", descr->max_entries); - - descr->ok = true; - - return true; -} - -void lucario_fs_destroy_descriptor(LucarioDescriptor_t* descr) { - kfree(descr); -} - -void lucario_fs_read_file_entry(LucarioDescriptor_t* descr, size_t index, LucarioFileEntry_t* out) { - if(index > descr->max_entries) - return; - - ata_read( - descr->ata_drive, - (uint8_t*)out, - 512 + (sizeof(LucarioFileEntry_t) * index), - sizeof(LucarioFileEntry_t) - ); -} - -void lucario_fs_get_file_entry(LucarioDescriptor_t* descr, char name[], size_t folder_id, LucarioFileEntry_t* out) { - for(size_t i = 0; i < descr->max_entries; i++) { - lucario_fs_read_file_entry(descr, i, out); - - if(strcmp(out->name, name) == 0 && out->folder_id == folder_id) { - return; - } - } - - out->type = E_NONE; -} - -bool lucario_fs_file_exists(LucarioDescriptor_t* descr, char name[], size_t folder_id) { - for(size_t i = 0; i < descr->max_entries; i++) { - LucarioFileEntry_t* entry = kcalloc(1, sizeof *entry); - - lucario_fs_read_file_entry(descr, i, entry); - - if(strcmp(entry->name, name) == 0 && entry->folder_id == folder_id) { - kfree(entry); - return true; - } - - kfree(entry); - } - - return false; -} - -size_t lucario_fs_file_size(LucarioDescriptor_t* descr, char name[], size_t folder_id) { - size_t size = 0; - - LucarioFileEntry_t* entry = kcalloc(1, sizeof *entry); - - lucario_fs_get_file_entry(descr, name, folder_id, entry); - - if(entry->type == E_FILE) { - size = entry->file_size; - } - - kfree(entry); - - return size; -} - -// Offset in sectors!!! -void lucario_fs_read_sectors_to(LucarioDescriptor_t* descr, size_t sector_list_addr, size_t sector_list_size, size_t offset, char* out) { - uint32_t cursector; - - for (size_t i = 0; i < sector_list_size; i++) { - ata_read(descr->ata_drive, (uint8_t*)&cursector, sector_list_addr + (i * sizeof(uint32_t)), sizeof(uint32_t)); - - // qemu_log("Sector number at addr %x: %d", sector_list_addr + (i * sizeof(uint32_t)), cursector); - - ata_read_sector(descr->ata_drive, (uint8_t*)(out + (i * 512)), cursector); - } -} - -// Offset in bytes!!! -bool lucario_fs_read_file(LucarioDescriptor_t* descr, char name[], size_t folder_id, size_t offset, size_t length, char* out) { - LucarioFileEntry_t* entry = kcalloc(1, sizeof *entry); - - lucario_fs_get_file_entry(descr, name, folder_id, entry); - - if(!entry->type) { - kfree(entry); - - return false; - } - - char* temp = kcalloc(1, ALIGN(entry->file_size, 512)); - - lucario_fs_read_sectors_to( - descr, - entry->sector_list_lba * 512, - entry->sector_list_size, - ALIGN(offset, 512) / 512, - temp - ); - qemu_log("Temp buffer becames: %s", temp); - - memcpy(out, temp + offset, length); - - kfree(temp); - - return true; -} diff --git a/kernel/src/fs/milla.c b/kernel/src/fs/milla.c deleted file mode 100644 index 4d37c9e0e..000000000 --- a/kernel/src/fs/milla.c +++ /dev/null @@ -1,12 +0,0 @@ -/** - * - * @file fs/milla.c - * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) - * @brief Проект Милла - * @version 0.3.3 - * @date 2023-01-23 - * @copyright Copyright SayoriOS Team (c) 2022-2023 - */ -#include -#include - diff --git a/kernel/src/fs/natfs.c b/kernel/src/fs/natfs.c new file mode 100644 index 000000000..2be49465b --- /dev/null +++ b/kernel/src/fs/natfs.c @@ -0,0 +1,171 @@ +/** + * @file drv/fs/tarfs.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief Файловая система NatFS - NatSuki File System + * @version 0.3.6 + * @date 2023-12-08 + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ + +#include +#include +#include +#include + +#include + +size_t fs_natfs_read(const char Disk,const char* Path, size_t Offset, size_t Size,void* Buffer){ + char* buf = __milla_getFile(Path); + qemu_log("NatSuki:\n\t Path: %s\n\tSize: %d | %d\n\tContent: %s", Path, Size, strlen(buf), buf); + + memcpy(Buffer, buf, Size); + //substr(Buffer, (void*)__milla_getFile(Path), Offset, Size); + kfree(buf); + return Size; +} + +size_t fs_natfs_write(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer){ + return 0; +} + +FSM_FILE fs_natfs_info(const char Disk,const char* Path){ + FSM_FILE file = {}; + file.Size = __milla_getSizeFile(Path); + if (__milla_isFile(__milla_findID(Path,"file")) != 1){ + qemu_warn("[NatFS] File no found???"); + return file; + } + file.Ready = 1; + //fsm_convertUnix(atoi(_m_s[3]), &file.LastTime); + + char* zpath = pathinfo(Path, PATHINFO_DIRNAME); + char* zname = pathinfo(Path, PATHINFO_BASENAME); + + file.Mode = 'r'; + //file.Type = ((strcmpn(_m_s[0], "file")?0:5)); + file.Type = 0; + file.Ready = 1; + + memcpy(file.Path, Path, strlen(Path)); + memcpy(file.Name, zname, strlen(zname)); + return file; +} + +FSM_DIR* fs_natfs_dir(const char Disk,const char* Path){ + size_t inxDir = __milla_findID(Path,"DIR"); + if (inxDir < 0){ + qemu_warn("[NatSuki] When searching for a folder, the error %d was returned, perhaps the folder was not found or the device is not ready to work.", inxDir); + return 0; + } + + qemu_log("[NatSuki] Get path: %s",Path); + FSM_DIR *Dir = kcalloc(sizeof(FSM_DIR), 1); + size_t CA = 0, CF = 0, CD = 0, CO = 0; + + char* listt = __milla_getList(Path); + char* _m_d[256] = {0}; + char* _m_s[256] = {0}; + uint32_t _m_d2 = 0; + + uint32_t _m_d1 = str_cdsp(listt,"\n"); + + str_split(listt,_m_d,"\n"); + + //tty_printf("Найдено файлов и папок: %d\n",_m_d1-1); + + + FSM_FILE *Files = kcalloc(sizeof(FSM_FILE), _m_d1); + //struct dirent* testFS = kcalloc(_m_d1, sizeof(struct dirent)); + if (_m_d1 == 0){ + Dir->Ready = 1; + Dir->Count = CA; + Dir->CountFiles = CF; + Dir->CountDir = CD; + Dir->CountOther = CO; + Dir->Files = Files; + + return Dir; + } + for(size_t ind = 0; ind < _m_d1; ind++){ + _m_d2 = str_cdsp(_m_d[ind],"::"); + if (_m_d2 < 1) continue; + memset(_m_s,0,256); + str_split(_m_d[ind],_m_s,"::"); + + fsm_convertUnix(atoi(_m_s[3]), &Files[CA].LastTime); + +// Files[CA].Mode = 'rw'; // INVALID! + Files[CA].Mode = 'r'; + Files[CA].Size = (atoi(_m_s[4])); + Files[CA].Type = ((strcmpn(_m_s[0], "file")?0:5)); + Files[CA].Ready = 1; + + memcpy(Files[CA].Path, Path, strlen(Path)); + memcpy(Files[CA].Name, _m_s[1], strlen(_m_s[1])); + + + if (Files[CA].Type == 0) { + /// Это файл + CF++; + } else if (Files[CA].Type == 5){ + /// Это папка + CD++; + } else { + /// Рандомный элемент + CO++; + } + CA++; + + //testFS[inxFile].type = ((strcmpn(_m_s[0], "file")?FS_FILE:FS_DIRECTORY)); + //testFS[inxFile].ino = inxFile; + //testFS[inxFile].next = inxFile+1; + //testFS[inxFile].length = (atoi(_m_s[4])); + //strcpy(testFS[inxFile].name, _m_s[1]); + qemu_log("[Milla] [%s] %s (%d b.) Date: %s Owner: %s",_m_s[0],_m_s[1],(atoi(_m_s[4])),_m_s[3],_m_s[5]); + } + kfree(listt); + + Dir->Ready = 1; + Dir->Count = CA; + Dir->CountFiles = CF; + Dir->CountDir = CD; + Dir->CountOther = CO; + Dir->Files = Files; + + return Dir; +} + +int fs_natfs_create(const char Disk,const char* Path,int Mode){ + return 0; +} + +int fs_natfs_delete(const char Disk,const char* Path,int Mode){ + return 0; +} + +void fs_natfs_label(const char Disk, char* Label){ + memcpy(Label,"NatFS",strlen("NatFS")); +} + +int fs_natfs_detect(const char Disk){ + return (0); +} + +char* __milla_getDiskInfo_Name(); +int __milla_getDiskInfo_All(); + +int fs_natfs_init(){ + int _m = __milla_init(); + if (_m != 0){ + qemu_warn("[NatFS] An error occurred during initialization, the server returned a response: %d",_m); + return 0; + } + int dsize = __milla_getDiskInfo_All(); + char* dname = __milla_getDiskInfo_Name(); + int dpm = dpm_reg('N', dname, "NatFS", 2, dsize, 0, 0, 3, "NAT0-SUKI", (void *) _m); + if (dpm != 1){ + qemu_warn("[NatFS] An error occurred while initializing the disk in the operating system! DPM returned the code: %d", dpm); + return 0; + } + return 1; +} diff --git a/kernel/src/fs/nullfs.c b/kernel/src/fs/nullfs.c new file mode 100644 index 000000000..ff2cca990 --- /dev/null +++ b/kernel/src/fs/nullfs.c @@ -0,0 +1,44 @@ +/** + * @file drv/fs/tarfs.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief Файловая система NullFS + * @version 0.3.4 + * @date 2023-10-14 + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ + +#include +#include + + +size_t fs_nullfs_read(const char Disk,const char* Path, size_t Offset, size_t Size,void* Buffer){ + return 0; +} + +size_t fs_nullfs_write(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer){ + return 0; +} + +FSM_FILE fs_nullfs_info(const char Disk,const char* Path){ + +} + +FSM_DIR* fs_nullfs_dir(const char Disk,const char* Path){ + +} + +int fs_nullfs_create(const char Disk,const char* Path,int Mode){ + return 0; +} + +int fs_nullfs_delete(const char Disk,const char* Path,int Mode){ + return 0; +} + +void fs_nullfs_label(const char Disk, char* Label){ + memcpy(Label,"NullFS",strlen("NullFS")); +} + +int fs_nullfs_detect(const char Disk){ + return (0); +} \ No newline at end of file diff --git a/kernel/src/fs/nvfs.c b/kernel/src/fs/nvfs.c new file mode 100644 index 000000000..48a84fd1c --- /dev/null +++ b/kernel/src/fs/nvfs.c @@ -0,0 +1,140 @@ +/** + * @file drv/fs/nvfs.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief New Virtual File System - Новая виртуальная файловая система + * @version 0.3.4 + * @date 2023-10-14 + * @warning Некит, напиши документацию + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ + +#include +#include +#include + +#include "../lib/libstring/include/string.h" +#include "mem/vmm.h" +#include "lib/php/explode.h" +#include "fs/fsm.h" +#include "lib/php/str_replace.h" + +bool nvfs_debug = false; + + + +NVFS_DECINFO nvfs_decode(const char* Name){ + NVFS_DECINFO info = {}; + info.Ready = 0; + info.DriverFS = -1; + uint32_t pc = str_cdsp2(Name, ':'); + + string_t* strname = string_from_charptr(Name); + vector_t* out = string_split(strname, ":"); + + if (pc != 1) + goto end; + + info.Disk = ADDR2STRING(out->data[0])->data[0]; + + substr(info.Path, ADDR2STRING(out->data[1])->data, 1 , ADDR2STRING(out->data[1])->length - 1); + + DPM_Disk disk = dpm_info(info.Disk); + + if (disk.Ready != 1) + goto end; + + info.Online = 1; + memcpy(info.FileSystem, disk.FileSystem, sizeof(disk.FileSystem)); + + info.DriverFS = fsm_getIDbyName(info.FileSystem); + + if (info.DriverFS == -1) + goto end; + + int fgm = fsm_getMode(info.DriverFS); + + if (fgm == 0){ + char_replace(0x2F,0x5C,info.Path); + } else { + char_replace(0x5C,0x2F,info.Path); + } + + info.Ready = 1; + + end: + + string_split_free(out); + string_destroy(strname); + + return info; +} + +size_t nvfs_read(const char* Name, size_t Offset, size_t Count, void* Buffer){ + const NVFS_DECINFO vinfo = nvfs_decode(Name); + if (vinfo.Ready == 0) return 0; + return fsm_read(vinfo.DriverFS, vinfo.Disk, vinfo.Path, Offset, Count, Buffer); +} + +int nvfs_create(const char* Name, int Mode){ + const NVFS_DECINFO vinfo = nvfs_decode(Name); + if (vinfo.Ready == 0) return 0; + return fsm_create(vinfo.DriverFS, vinfo.Disk, vinfo.Path, Mode); +} + +int nvfs_delete(const char* Name, int Mode){ + const NVFS_DECINFO vinfo = nvfs_decode(Name); + if (vinfo.Ready == 0) + return 0; + return fsm_delete(vinfo.DriverFS, vinfo.Disk, vinfo.Path, Mode); +} + +size_t nvfs_write(const char* Name, size_t Offset, size_t Count, const void *Buffer){ + const NVFS_DECINFO vinfo = nvfs_decode(Name); + if (vinfo.Ready == 0) + return 0; + return fsm_write(vinfo.DriverFS, vinfo.Disk, vinfo.Path, Offset, Count, Buffer); +} + +FSM_FILE nvfs_info(const char* Name){ + NVFS_DECINFO vinfo = nvfs_decode(Name); // no memleak + if (nvfs_debug) qemu_log("NVFS INFO:\nReady: %d\nDisk: [%d] %c\nPath: [%d] %s\nDisk Online: %d\nDisk file system: [%d] %s\nLoaded in file system driver: %d",vinfo.Ready,vinfo.Disk,vinfo.Disk,strlen(vinfo.Path),vinfo.Path,vinfo.Online,strlen(vinfo.FileSystem),vinfo.FileSystem,vinfo.DriverFS); + + if (vinfo.Ready != 1){ + return (FSM_FILE){}; + } + + FSM_FILE file = fsm_info(vinfo.DriverFS, vinfo.Disk, vinfo.Path); + + return file; +} + +FSM_DIR* nvfs_dir(const char* Name){ + NVFS_DECINFO vinfo = nvfs_decode(Name); + + if (vinfo.Ready != 1) { + FSM_DIR* dir = kcalloc(sizeof(FSM_DIR), 1); + return dir; + } + + FSM_DIR* dir = fsm_dir(vinfo.DriverFS, vinfo.Disk, vinfo.Path); + return dir; +} + +/* + +void vnfs_test(){ + + FSM_FILE file = nvfs_info("R:\\help next you\\main.c"); + //qemu_log("Ready: %d",file.Ready); + fsm_dump(file); + + char* bf1 = kmalloc(file.Size); + int rf1 = nvfs_read("R:\\help next you\\main.c",10,5,bf1); + + qemu_log("Read %d / %d |\n%s\n",rf1,file.Size,bf1); + + FSM_FILE file2 = nvfs_info("b:\\pizdec\\вот это драйвер\\ахуеть.exe"); + + fsm_dump(file2); + while(1){} +}*/ diff --git a/kernel/src/fs/sefs.c b/kernel/src/fs/sefs.c deleted file mode 100755 index d29c03775..000000000 --- a/kernel/src/fs/sefs.c +++ /dev/null @@ -1,400 +0,0 @@ -/** - * @file fs/sefs.c - * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) - * @brief Файловая система SEFS (Sayori Easy File System) - * @version 0.3.3 - * @date 2022-11-01 - * @copyright Copyright SayoriOS Team (c) 2022-2023 - */ -#include -#include -#include -#include - -sefs_header_t *sefs_header; ///< ... -sefs_file_header_t *file_headers; ///< ... -fs_node_t *sefs_root; ///< ... -fs_node_t *sefs_dev; ///< ... -fs_node_t *root_nodes; ///< ... -int nroot_nodes; ///< Количество файлов. -struct dirent dirent; ///< ... -size_t dirName[2048]; ///< Ссылка на названия папок по индексу -size_t diskUsed = 0; ///< Количество используемого пространства -size_t diskSize = 0; ///< Общие кол-во дисков -size_t dirCount = 0; ///< Количество папок - -/** - * @brief [SEFS] Полное чтение файла - * - * @param int node - Индекс файла - * - * @warning IT's MEMORY LEAKY!!! - * @return char* - Содержимое файла - */ -char* sefs_readChar(uint32_t node){ - sefs_file_header_t header = file_headers[node]; - //qemu_log("[SEFS] [readChar] Elem: %d",node); - char* buf = (char*)kmalloc(header.length); - memcpy(buf, (void*)header.offset, header.length); - return buf; -} - -/** - * @brief [SEFS] Чтение файла - * - * @param int node - Индекс файла - * @param int offset - С какой позиции читать файл - * @param int size - Длина читаемого файла - * @param void* buf - Буфер - * - * @return uint32_t - Размер файла или отрицательное значение при ошибке - */ -uint32_t sefs_read(uint32_t node, size_t offset, size_t size, void *buffer){ - sefs_file_header_t header = file_headers[node]; - //qemu_log("[SEFS] [Read] Elem: %d | Off: %d | Size: %d", node, offset, size); - - // Did you mean: offset+size > header.length - if (header.length < size) { - size = header.length; - } - - qemu_log("SEFS -> Read from: %x to (%x) (size %d)", header.offset + offset, header.offset + offset + size, size); - - memcpy(buffer, (char*)(header.offset+offset), size); - - // qemu_log("SEFS early buffer now: %s", (char*)(header.offset + offset)); - // qemu_log("SEFS buffer now: %s", buffer); - return size; -} - -/** - * @brief [SEFS] запись в файл - * - * @param int node - Индекс файла - * @param int offset - С какой позиции писать файл - * @param int size - Сколько пишем - * @param void* buf - Буфер - * - * @return uint32_t - Размер записаных байтов или отрицательное значение при ошибке - */ -uint32_t sefs_write(uint32_t node, size_t offset, size_t size, void *buffer){ - sefs_file_header_t header = file_headers[node]; - //qemu_log("[SEFS] [Write] Elem: %d | Off: %d | Size: %d",node,offset,size); - if (offset > size){ - return -2; - } - void* newfile = kmalloc((size + offset > header.length)?(size + offset):header.length); - int w_tmp1 = 0; ///< Сколько скопировано с начала - // int w_tmp2 = 0; ///< Сколько вставлено с буфера - int w_tmp3 = 0; ///< Сколько вставлено с остатка - // Сохраняем первую часть данных - if (offset > 0){ - void* tmp1 = kmalloc(offset); - w_tmp1 = sefs_read(node,0,offset,tmp1); - memcpy(newfile, tmp1, offset); - } - // Сохраняем буфер - strcat((char*)newfile, (const char*)buffer); - // если остались остатки, то копируем - if ((size + offset < header.length)){ - w_tmp3 = header.length - (size + offset); // Откуда копируем - void* tmp3 = kmalloc(offset); - w_tmp3 = sefs_read(node,0,w_tmp3,tmp3); - strcat((char*)newfile, (const char*)tmp3); - } - return w_tmp1+size+w_tmp3; -} - -/** - * @brief [SEFS] Получить размер файла (поиск по индексу) - * - * @param int node - Индекс файла - * - * @return size_t - Размер файла или 0 - */ -size_t sefs_getLengthFile(int node){ - //qemu_log("[SEFS] [gLF] Node: %d | Size: %d",node,root_nodes[node].length); - - return root_nodes[node].length; -} - -/** - * @brief [SEFS] Получить отступ в файловой системе у файла - * - * @param int node - Индекс файла - * - * @return int - Позиция файла или отрицательное значение при ошибке - */ -size_t sefs_getOffsetFile(int node){ - return file_headers[node].offset; -} - -/** - * @brief [SEFS] Поиск файла на устройстве - * - * @param char* filename - Путь к файлу (виртуальный) - * - * @return int - Индекс файла, или отрицательное значение при ошибке - */ -int32_t sefs_findFile(const char* filename){ - char* file = (char*)kmalloc(sizeof(char)*256); - char* sl = "/"; - strcpy(file, sl); - strcat(file,filename); - - //qemu_log("[SeFS] `%s` | `%s`",filename,file); - for (size_t i = 0; i < sefs_header->nfiles; i++){ - if (strcmpn(root_nodes[i].path,file)){ - kfree(file); - return i; - } - } - kfree(file); - return -1; -} - -/** - * @brief [SEFS] Поиск папки на устройстве - * - * @param char* filename - Путь к папке (виртуальный) - * - * @return int - Индекс папки, или отрицательное значение при ошибке - */ -int32_t sefs_findDir(const char* path){ - char* file = (char*)kmalloc(sizeof(char)*256); - char* sl = "/"; - - strcpy(file, sl); - strcat(file, path); - - qemu_log("[SeFS] `%s` | `%s`", path, file); - - for (size_t i = 0, a = 0; i < sefs_header->nfiles; i++){ - if (root_nodes[i].flags != FS_DIRECTORY) continue; - if (strcmpn(root_nodes[i].name, file)){ - kfree(file); - return a; - } - a++; - } - kfree(file); - return -1; -} - -/** - * @brief [SEFS] Считает количество элементов в папке - */ -size_t sefs_countElemFolder(char* path){ - ssize_t inxDir = sefs_findDir(path); - if (inxDir < 0) { - return 0; - } - size_t count = 0; - for (size_t i = 0; i < sefs_header->nfiles; i++){ - if (root_nodes[i].root != inxDir){ - continue; - } - count++; - } - return count; -} - -/** - * @brief [SEFS] Выводит список файлов - */ -struct dirent* sefs_list(const char* path){ - size_t inxDir = sefs_findDir(path); - if (inxDir < 0){ - return 0; - } - - struct dirent* testFS = (struct dirent*)kcalloc(sefs_header->nfiles, sizeof(struct dirent)); - - qemu_log("[Index Dir] %d",inxDir); - size_t inxFile = 0; - for (size_t i = 0; i < sefs_header->nfiles; i++){ - if (root_nodes[i].root != inxDir){ - continue; - } - testFS[inxFile].type = root_nodes[i].flags; - testFS[inxFile].ino = i; - testFS[inxFile].next = i+1; - testFS[inxFile].length = root_nodes[i].length; - strcpy(testFS[inxFile].name, root_nodes[i].name); - inxFile++; - - qemu_log("[SEFS] [Init] I:%d",i); - qemu_log("\t * Name:%s",root_nodes[i].name); - qemu_log("\t * mask:%d",root_nodes[i].mask); - qemu_log("\t * length:%d",root_nodes[i].length); - qemu_log("\t * flags:%x",root_nodes[i].flags); - qemu_log("\t * inode:%d",root_nodes[i].inode); - qemu_log("\t * offset:%d",file_headers[i].offset); - qemu_log("\t * root:%d",root_nodes[i].root); - } - testFS[inxFile].next = 0; - return testFS; -} - -/** - * @brief [SEFS] Количество используемого места устройства - * - * @param int node - Нода - * - * @return size_t - Количество используемого места устройства - */ -size_t sefs_diskUsed(int node){ - return diskUsed; -} - -/** - * @brief [SEFS] Количество свободного места устройства - * - * @param int node - Нода - * - * @return size_t - Количество свободного места устройства - */ -size_t sefs_diskSpace(int node){ - return 0; -} - -/** - * @brief [SEFS] Количество всего места устройства - * - * @param int node - Нода - * - * @return size_t - Количество всего места устройства - */ -size_t sefs_diskSize(int node){ - return diskSize; -} - -/** - * @brief [SEFS] Получение имени устройства - * - * @param int node - Нода - * - * @return char* - Имя устройства - */ -char* sefs_getDevName(int node){ - return sefs_root->devName; -} - -void sefs_dirfree(struct dirent* ptr) { - // qemu_log("SEFS freeing dirent pointer: %x", ptr); - if(ptr) { - kfree(ptr); - ptr = 0; - } -} - -/** - * @brief [SEFS] Инициализация Sayori Easy File System - * - * @param uint32_t location - Точка монтирования - * - * @return fs_node_t - Структура с файлами - */ -fs_node_t *sefs_initrd(uint32_t location, uint32_t end) { - qemu_log("[SEFS] [Init] loc: %x", location); - qemu_log("[SEFS] Disk size is: %d bytes.", end - location); - - qemu_log("SEFS INIT SCOPE ====================================="); - - // TODO: FIXME: XXX: NEED TO MAP PAGES FOR SEFS LOCATION! - - size_t page_count = (end - location) / PAGE_SIZE; - - page_count += 1; - - // size_t* pages = kcalloc(page_count, sizeof(size_t)); - - // for(int i = 0; i < page_count; i++) { - // pages[i] = alloc_phys_pages(1); - // } - - for(int i = 0; i < page_count; i++) { - map_pages( - get_kernel_dir(), - location + (i * PAGE_SIZE), // Find secure place to map pages - location + (i * PAGE_SIZE), - 1, - PAGE_WRITEABLE | PAGE_PRESENT - ); - } - - // qemu_log("Ok"); - - // while(1); - - // Инициализирует указатели main и заголовке файлов и заполняет корневой директорий. - sefs_header = (sefs_header_t *)location; - file_headers = (sefs_file_header_t *)(location + sizeof(sefs_header_t)); - sefs_root = (fs_node_t*)kcalloc(1, sizeof(fs_node_t)); - - strcpy(sefs_root->name, "/"); - strcpy(sefs_root->devName, "SayoriDisk RDv2"); - - sefs_root->mask = sefs_root->uid = sefs_root->gid = sefs_root->inode = sefs_root->length = 0; - sefs_root->flags = FS_DIRECTORY; - sefs_root->open = 0; - sefs_root->close = 0; - sefs_root->findFile = &sefs_findFile; - sefs_root->findDir = &sefs_findDir; - sefs_root->getLengthFile = &sefs_getLengthFile; - sefs_root->getOffsetFile = &sefs_getOffsetFile; - sefs_root->list = &sefs_list; - sefs_root->ptr = 0; - sefs_root->impl = 0; - sefs_root->readChar = &sefs_readChar; - sefs_root->read = &sefs_read; - sefs_root->write = &sefs_write; - sefs_root->diskUsed = &sefs_diskUsed; - sefs_root->diskSpace = &sefs_diskSpace; - sefs_root->diskSize = &sefs_diskSize; - sefs_root->getDevName = &sefs_getDevName; - sefs_root->getCountElemFolder = &sefs_countElemFolder; - sefs_root->getListElem = &sefs_list; - sefs_root->unlistElem = &sefs_dirfree; - - root_nodes = (fs_node_t*)kcalloc(sefs_header->nfiles, sizeof(fs_node_t)); - nroot_nodes = sefs_header->nfiles; - // Для каждого файла... - for (int i = 0; i < nroot_nodes; i++){ - // Отредактируем заголовок файла — в настоящее время в нем указывается смещение файла - // относительно ramdisk. Мы хотим, чтобы оно указывалось относительно начала - // памяти. - root_nodes[i].root = file_headers[i].parentDir; - file_headers[i].offset += location; - - // Создаем нод нового файла. - strcpy(root_nodes[i].name, file_headers[i].name); - root_nodes[i].mask = root_nodes[i].uid = root_nodes[i].gid = 0; - root_nodes[i].length = (size_t) file_headers[i].length; - root_nodes[i].inode = i; - root_nodes[i].flags = (!file_headers[i].types?FS_FILE:FS_DIRECTORY); - - if (root_nodes[i].flags == FS_FILE){ - diskUsed += root_nodes[i].length; - diskSize += root_nodes[i].length; - } - - if (root_nodes[i].flags == FS_DIRECTORY){ - dirCount++; - } - } - - for (int i = 0; i < sefs_header->nfiles; i++){ - if (root_nodes[i].flags != FS_FILE) - continue; - - strcpy(root_nodes[i].path, root_nodes[(sefs_header->nfiles - dirCount) + root_nodes[i].root].name); - strcat(root_nodes[i].path,root_nodes[i].name); - - int fpath_len = strlen(root_nodes[i].path); - root_nodes[i].path[fpath_len+1] = '\0'; - } - - return sefs_root; -} - diff --git a/kernel/src/fs/smfs.c b/kernel/src/fs/smfs.c index aa4411ce1..6886783ba 100644 --- a/kernel/src/fs/smfs.c +++ b/kernel/src/fs/smfs.c @@ -1,378 +1,76 @@ /** - * @file fs/fat12.c + * @file drv/fs/smfs.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) - * @brief Файловая система SMFS (Sayori Medium File System) - * @version 0.3.3 - * @date 2023-07-28 + * @brief Файловая система SMFS + * @version 0.3.4 + * @date 2023-10-14 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ #include #include - +#include #include +#include -#define FLOPPY_SIZE 1474559 ///< Размер Floppy -SMFS_BOOT_SECTOR boot[16] = {0}; -SMFS_Elements elements[8196] = {0}; -SMFS_PACKAGE pkg[8196] = {0}; -SMFS_PACKAGE _smfs_getInfoPackAge(int Address){ - SMFS_PACKAGE* pack = kmalloc(sizeof(SMFS_PACKAGE)); - - if (pack == -1){ - qemu_log("KMALLOC ERROR!"); - pack[0].Status = SMFS_PACKAGE_UNKNOWN; - return pack[0]; - } - - int read = _FloppyRead(0, &pack[0], Address, sizeof(SMFS_PACKAGE)); - - return pack[0]; +size_t fs_smfs_read(const char Disk,const char* Path, size_t Offset, size_t Size,void* Buffer){ + return 0; } -SMFS_Elements _smfs_getInfoElem(unsigned int Index){ - SMFS_Elements* elem = kmalloc(sizeof(SMFS_Elements)); - - if (!elem){ - qemu_log("KMALLOC ERROR!"); - elem[0].Attr = SMFS_TYPE_UNKNOWN; - return elem[0]; - } - - int read = _FloppyRead(0,&elem[0],sizeof(SMFS_BOOT_SECTOR)+(sizeof(SMFS_Elements)*Index),sizeof(SMFS_Elements)); - - return elem[0]; +size_t fs_smfs_write(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer){ + return 0; } -uint32_t _smfs_foundFile(char* path){ - char ser[2] = {0x5C,0}; - - char_replace(0x2F,0x5C,path); //< Превращает все (0x2F)/ в (0x5C)\\ - - strtolower(path); //! Нет поддержки русских букв! +FSM_FILE fs_smfs_info(const char Disk,const char* Path){ - char tname[32] = {0}; - qemu_log("[smfs] found file: %s",path); - - uint32_t dir_c = str_cdsp(path,ser); - char* out[128] = {0}; - - str_split(path,out,ser); - - qemu_log("[smfs] found: %d",dir_c); - uint32_t dir = 0; - for(int i = 0; i < dir_c; i++){ - for (int a = 0; a < boot[1].MaximumElems; a++){ - SMFS_Elements elem = _smfs_getInfoElem(a); - - if (elem.Attr == SMFS_TYPE_UNKNOWN) continue; ///< Пропускаем, тк битый файл - if (elem.Attr == SMFS_TYPE_DELETE) continue; ///< Пропускаем, тк удален файл - if (elem.Dir != dir) continue; ///< Пропускаем, тк не рут папка - - memcpy(tname,elem.Name,32); - strtolower(tname); //! Нет поддержки русских букв! - if (strcmp(tname,out[0]) == 0 && i+1 == dir_c){ - qemu_log("OUT"); - return i; - } else if (strcmp(tname,out[0]) == 0) { - qemu_log("Next door: %d",a); - dir = a; - continue; - } else { - /// ???? - } - - - qemu_log("[%i] [%s == %s] => %d",i,tname,out[0],strcmp(tname,out[0])); - - __com_formatString(0x3f8," |--- Index | %x\n",elem.Index); - __com_formatString(0x3f8," |--- Attr | %x\n",elem.Attr); - __com_formatString(0x3f8," |--- Size | %x\n",elem.Size); - __com_formatString(0x3f8," |--- TimeCreateHIS | %x\n",elem.TimeCreateHIS); - __com_formatString(0x3f8," |--- TimeCreateDate | %x\n",elem.TimeCreateDate); - __com_formatString(0x3f8," |--- TimeAccess | %x\n",elem.TimeAccess); - __com_formatString(0x3f8," |--- Point | %x\n",elem.Point); - __com_formatString(0x3f8," |--- Dir | %x\n",elem.Dir); - __com_formatString(0x3f8," |--- Name | %s\n",elem.Name); - __com_formatString(0x3f8," |--- Size | %d\n",elem.Size); - } - - qemu_log("[smfs] [%d] %s ",i,out[i]); - } - return -1; -} - -void _smfs_PackageFix(char* src, int count){ - for (int i = count; i < 9;i++){ - src[i] = 0; - } -} - - -uint32_t _smfs_ReadFile(uint32_t Index, char* dst){ - SMFS_Elements elem = _smfs_getInfoElem(Index); - if (elem.Attr == SMFS_TYPE_UNKNOWN){ - qemu_log("ReadFile Error"); - return -1; - } - if (elem.Attr == SMFS_TYPE_DELETE){ - qemu_log("ReadFile Deleted!"); - return -2; - } - SMFS_PACKAGE pack = _smfs_getInfoPackAge(elem.Point); - if (pack.Status == SMFS_PACKAGE_UNKNOWN){ - return -3; - } - int seek = 0; - while(1){ - for (int i=0;i < pack.Length; i++){ - dst[seek] = pack.Data[i]; - seek++; - } - if (pack.Next == -1) break; - pack = _smfs_getInfoPackAge(pack.Next); - } - return seek; } -int _smfs_WritePackage(uint32_t Addr, SMFS_PACKAGE pack) { - int read = 0; - read = _FloppyWrite(0,&pack,Addr,sizeof(SMFS_Elements)); - qemu_log("[SMFS] Send to package to %x",Addr); - __com_formatString(0x3f8," |--- Addr | %x\n",Addr); - __com_formatString(0x3f8," |--- Write | %d\n",read); - __com_formatString(0x3f8," |--- Data | %s\n",pack.Data); - __com_formatString(0x3f8," |--- Status | %d\n",pack.Status); - __com_formatString(0x3f8," |--- Length | %d\n",pack.Length); - __com_formatString(0x3f8," |--- Next | %x\n\n",pack.Next); - return read; -} - -int _smfs_DeletePackage(uint32_t Addr){ - if (Addr == 0) return 0; - SMFS_PACKAGE Free = _smfs_getInfoPackAge(Addr); - if (Free.Status == SMFS_PACKAGE_FREE) return 1; - memset(Free.Data, 0, 9); - Free.Length = 0; - Free.Next = -1; - Free.Status = SMFS_PACKAGE_FREE; - - return _smfs_WritePackage(Addr,Free); +FSM_DIR* fs_smfs_dir(const char Disk,const char* Path){ } -uint32_t _smfs_DeleteFile(uint32_t Index){ - SMFS_Elements elem = _smfs_getInfoElem(Index); - if (elem.Attr == SMFS_TYPE_UNKNOWN){ - qemu_log("File Error"); - return -1; - } - if (elem.Attr == SMFS_TYPE_DELETE){ - qemu_log("Already Deleted!"); - return -2; - } - if (elem.Point != 0){ - /// Зачищаем блоки, только если точка монтирования указана - SMFS_PACKAGE pack = _smfs_getInfoPackAge(elem.Point); - if (pack.Status == SMFS_PACKAGE_UNKNOWN){ - return -3; - } - int countPack = (elem.Size == 0?1:(elem.Size/8)+1); - uint32_t *pkg_addr = kmalloc(sizeof(uint32_t)*(countPack+1)); - int seek = 1; - pkg_addr[0] = elem.Point; - while(1){ - if (pack.Next == -1) break; - - pkg_addr[seek] = pack.Next; - pack = _smfs_getInfoPackAge(pack.Next); - seek++; - if (pack.Status == SMFS_PACKAGE_UNKNOWN){ - qemu_log("CRITICAL GET ERROR"); - return -4; - } - } - - for (int i = 0; i < countPack; i++) { - qemu_log("Delete %x",pkg_addr[i]); - _smfs_DeletePackage(pkg_addr[i]); - } - } - char eName[32] = {0}; - elements[0].Attr = SMFS_TYPE_DELETE; - elements[0].Size = 0; - elements[0].TimeCreateHIS = 0; - elements[0].TimeCreateDate = 0; - elements[0].TimeAccess = 0; - elements[0].Dir = 0; - elements[0].Point = 0; - memcpy((void*) elements[0].Name, eName, 32); - int read = _FloppyWrite(0,&elements[0],sizeof(SMFS_BOOT_SECTOR)+(sizeof(SMFS_Elements)*Index),sizeof(SMFS_Elements)); - if (read != sizeof(SMFS_Elements)){ - return -5; - } - qemu_log("Deleted file complete! %d",read); - return 1; +int fs_smfs_create(const char Disk,const char* Path,int Mode){ + return 0; } -uint32_t _smfs_FreePackAge(int skip) { - int adr = 0; - - for (int i = 0; i < boot[1].MaxPackage; i++){ - adr = (sizeof(SMFS_BOOT_SECTOR) + (sizeof(SMFS_Elements) * boot[1].MaximumElems) + (i * sizeof(SMFS_PACKAGE))); - - SMFS_PACKAGE pack = _smfs_getInfoPackAge(adr); - - qemu_log("[%d] Test PackAge"); - - __com_formatString(0x3f8," |--- Addr | %x\n",adr); - __com_formatString(0x3f8," |--- Data | %s\n",pack.Data); - __com_formatString(0x3f8," |--- Status | %d\n",pack.Status); - __com_formatString(0x3f8," |--- Length | %d\n",pack.Length); - __com_formatString(0x3f8," |--- Next | %x\n\n",pack.Next); - - if (pack.Status == SMFS_PACKAGE_FREE && skip !=0){ - skip--; - continue; - } - - if (pack.Status == SMFS_PACKAGE_FREE) return adr; - } - - return -1; +int fs_smfs_delete(const char Disk,const char* Path,int Mode){ + return 0; } -int _smfs_WriteFile(char* path, char* src){ - // Тут мы типа должны найти файл и обратиться по позиции указанном в Pointer - - int found = _smfs_foundFile(path); - if (found == -1){ - return -1; - } - int src_size = strlen(src); - int src_seek = 0; - int currentAddr = 0; - int read = 0; - char src_buf[8] = {0}; - int countPack = (src_size == 0?1:(src_size/8)+1); - - qemu_log("[WriteFile]\n * src_size: %d\n * countPack : %d\n * src: %s\n",src_size,countPack,src); - - SMFS_PACKAGE *pkg_free = kmalloc(sizeof(SMFS_PACKAGE)); - uint32_t *pkg_addr = kmalloc(sizeof(uint32_t)*(countPack+1)); - // Выделяем память для структур и записи - if (pkg_free == -1 || pkg_addr == -1){ - qemu_log("KMALLOC ERROR"); - return -1; - } - - for (int i = 0; i < countPack; i++) { - pkg_addr[i] = _smfs_FreePackAge(i); - - if (pkg_addr[i] == -1) { - qemu_log("NO FREE PACKAGE!!!"); - return -1; - } - - qemu_log("Found %x FREE PACKAGE!", pkg_addr[i]); - } - - for (int a = 0; a <= src_size; a++){ - if (src_seek == 8){ - // Buffer - _smfs_PackageFix(src_buf,src_seek); - - qemu_log("Buffer: %s",src_buf); - - memcpy((void*) pkg_free[0].Data, src_buf, 9); - - pkg_free[0].Length = 8; - pkg_free[0].Next = pkg_addr[currentAddr+1]; - pkg_free[0].Status = SMFS_PACKAGE_READY; - - _smfs_WritePackage(pkg_addr[currentAddr], pkg_free[0]); - - currentAddr++; - src_seek = 0; - a--; - //src_buf = {0}; - } else if (a == (src_size)){ - _smfs_PackageFix(src_buf,src_seek); - - qemu_log("EOL | Buffer: %s",src_buf); - memcpy((void*) pkg_free[0].Data, src_buf, 8); - - pkg_free[0].Length = src_seek; - pkg_free[0].Next = -1; - pkg_free[0].Status = SMFS_PACKAGE_READY; - - _smfs_WritePackage(pkg_addr[currentAddr],pkg_free[0]); - - break; - } else { - src_buf[src_seek] = src[a]; - src_seek++; - } - //pkg_free[0].Status = SMFS_PACKAGE_READY; - //pkg_free[0].Status = SMFS_PACKAGE_READY; - } - - qemu_log("Write complete!"); - qemu_log("[+] Package to write:\n"); - - for (int i = 0; i < countPack; i++){ - __com_formatString(0x3f8," |--- Addr | %x\n",pkg_addr[i]); - } - return src_size; - - //uint32_t fpa = _smfs_FreePackAge(); +void fs_smfs_label(const char Disk, char* Label){ + memcpy(Label,"SMFS",strlen("SMFS")); } -int _smfs_createFile(uint32_t dir,const char* name,int type){ - uint32_t Index = -1; - SMFS_Elements elem; - for (int a = 0; a < boot[1].MaximumElems; a++){ - SMFS_Elements elem = _smfs_getInfoElem(a); - if (elem.Attr == SMFS_TYPE_UNKNOWN) continue; - if (elem.Attr == SMFS_TYPE_DELETE){ - Index = a; - } - } - if (Index == -1){ +int fs_smfs_format(const char Disk){ + + DPM_Disk IDisk = dpm_info(Disk); + size_t MaxFiles = (((IDisk.Size) - (sizeof(SMFS_BOOT_SECTOR))) / 2048); /// 1024 ф. + if (MaxFiles <= 0){ + qemu_log("FATAL FORMAT!"); return 0; } - elem.Attr = type; - elem.Size = 0; - elem.TimeCreateHIS = 0; - elem.TimeCreateDate = 0; - elem.TimeAccess = 0; - elem.Dir = dir; - elem.Point = 0; - memcpy((void*) elem.Name, name, 32); - int read = _FloppyWrite(0, &elem, sizeof(SMFS_BOOT_SECTOR) + (sizeof(SMFS_Elements) * Index), sizeof(SMFS_Elements)); - qemu_log("[SMFS] FDA WRITE:%d | Index: %d\n", read, Index); - return 1; -} - -void _smfs_format(int MaxFiles){ - int read = 0,seek = 0; - int sizeFiles = ((sizeof(SMFS_Elements))*MaxFiles); - int freeSpa = (FLOPPY_SIZE-(sizeFiles)-(sizeof(SMFS_BOOT_SECTOR))); - int allPkg = (freeSpa/(sizeof(SMFS_PACKAGE))); + qemu_log("FORMAT IS STARTING..."); + + size_t read = 0,seek = 0; + int sizeFiles = ((sizeof(SMFS_Elements)) * MaxFiles); ////< 74 * 1024 = + int freeSpa = ((IDisk.Size) - (sizeFiles) - (sizeof(SMFS_BOOT_SECTOR))); + int allPkg = (freeSpa / (sizeof(SMFS_PACKAGE))); qemu_log("[SMFS] Formatting FDA STARTED!"); - qemu_log("[SMFS] FLOPPY_SIZE = %d",FLOPPY_SIZE); - qemu_log("[SMFS] BOOT_SIZE = %d",(sizeof(SMFS_BOOT_SECTOR))); - qemu_log("[SMFS] Max Elems = %d | %d",MaxFiles,sizeFiles); - qemu_log("[SMFS] FREE SPA = %d",freeSpa); - qemu_log("[SMFS] Max Package = %d",allPkg); + qemu_log("[SMFS] DISK_SIZE = %d", (IDisk.Size)); ///< 2097152 + qemu_log("[SMFS] BOOT_SIZE = %d", (sizeof(SMFS_BOOT_SECTOR))); ///< 39 + qemu_log("[SMFS] Max Elems = %d | %d", MaxFiles, sizeFiles); ///< 1024 | 75776 + qemu_log("[SMFS] FREE SPA = %d", freeSpa); ///< (2021337) + qemu_log("[SMFS] Max Package = %d", allPkg); ///< 2021337 / 15 = мин. 134756 | макс. 1078048 байт qemu_log("[SMFS] We overwrite on our own BOOT SECTOR"); char oem[8] = {'S','A','Y','O','R','I','O','S'}; char label[11] = {'S','M','F','S',' ',' ',' ',' ',' ',' ',0}; - char fsid[8] = {'S','M','F','S','1','.','0',' '}; + char fsid[8] = {'S','M','F','S','1','.','0',0}; + SMFS_BOOT_SECTOR *boot = kmalloc(sizeof(SMFS_BOOT_SECTOR)); + boot[0].magic1 = 0x7246; boot[0].magic2 = 0xCAFE; boot[0].MaximumElems = MaxFiles; @@ -381,19 +79,23 @@ void _smfs_format(int MaxFiles){ memcpy((void*) boot[0].oem_name, oem, 8); memcpy((void*) boot[0].volume_label, label, 11); memcpy((void*) boot[0].fsid, fsid, 8); - - read = _FloppyWrite(0,&boot[0],0,sizeof(SMFS_BOOT_SECTOR)); + + read = dpm_write(Disk, seek, sizeof(SMFS_BOOT_SECTOR), &boot[0]); + + //read = _FloppyWrite(0,&boot[0],0,sizeof(SMFS_BOOT_SECTOR)); qemu_log("[SMFS] FDA WRITE:%d\n",read); if (read == -1){ qemu_log("[SMFS] FATAL FORMAT!"); - return; + return 0; } seek = sizeof(SMFS_BOOT_SECTOR); qemu_log("[SMFS] Create markup structures for files and folders"); + SMFS_Elements *elements = kmalloc(sizeof(SMFS_Elements)); + char eName[32] = {0}; elements[0].Attr = SMFS_TYPE_DELETE; elements[0].Size = 0; @@ -406,125 +108,48 @@ void _smfs_format(int MaxFiles){ memcpy((void*) elements[0].Name, eName, 32); for (int i = 0; i < MaxFiles; i++) { - TE_DrawMessageBox("Разметка макета", "Это длительный процесс...", 2, getScreenWidth() / 4, 100, 0, i, MaxFiles); elements[0].Index = i; - read = _FloppyWrite(0,&elements[0],seek,sizeof(SMFS_Elements)); - qemu_log("[SMFS] FDA WRITE:%d | I: %d | In: %x\n",read,i,seek); - seek += sizeof(SMFS_Elements); - punch(); + read = dpm_write(Disk, seek, sizeof(SMFS_Elements), &elements[0]); + //read = _FloppyWrite(0,&elements[0],seek,sizeof(SMFS_Elements)); + qemu_log("[SMFS] DISK WRITE:%d | I: %d | In: %x\n",read,i,seek); + seek += sizeof(SMFS_Elements); } qemu_log("[SMFS] Now we write packages"); + SMFS_PACKAGE *pkg = kmalloc(sizeof(SMFS_PACKAGE)); char eData[8] = {0}; memcpy((void*) pkg[0].Data, eData, 8); pkg[0].Length = 0; pkg[0].Next = -1; pkg[0].Status = SMFS_PACKAGE_FREE; - - - //char* outmark = kmalloc(sizeof(SMFS_PACKAGE)*allPkg); - - //int32_t* outmark = memoryMulti(pkg[0],5,allPkg); - - //memmove(outmark, pkg[0], allPkg); - //read = _FloppyWrite(0,outmark,seek,5*allPkg); - //qemu_log("[PRINT] \n%s\n",outmark); - //qemu_log("[SMFS] FDA WRITE:%d | Count: %d | In: %x\n",read,sizeof(SMFS_PACKAGE)*allPkg,seek); for (int i = 0; i < allPkg; i++){ - TE_DrawMessageBox("Разметка пакета", "Последний этап", 2, getScreenWidth() / 4, 400, 0, i, allPkg); - read = _FloppyWrite(0,&pkg[0],seek,sizeof(SMFS_PACKAGE)); - qemu_log("[SMFS] FDA WRITE:%d | I: %d | In: %x\n",read,i,seek); - seek += sizeof(SMFS_PACKAGE); - punch(); - } - - -} + + read = dpm_write(Disk, seek, sizeof(SMFS_PACKAGE), &pkg[0]); -void _smfs_write(void* data,size_t size){ - qemu_log("WRITE!"); - for (int i = 0; i < size; i++){ - __com_formatString(0x3f8,"[%d] %d | %c\n",i,((int*)data)[i],((char*)data)[i]); + //read = _FloppyWrite(0,&pkg[0],seek,sizeof(SMFS_PACKAGE)); + qemu_log("[SMFS] DISK WRITE:%d | I: %d | In: %x\n",read,i,seek); + seek += sizeof(SMFS_PACKAGE); } + return 1; } -void bKbMb(int bytes){ - qemu_log("[SMFS] %d b | %d Kb | %d Mb",bytes,bytes/1024,(bytes/1024)/1024); -} - -void _smfs_printFF(){ - int read = 0; - qemu_log("[Print Files & Folder]"); - qemu_log("[SMFS] Emelent size: %d",sizeof(SMFS_Elements)); - qemu_log("[SMFS] MaximumElems: %d",boot[1].MaximumElems); - for (int i = 0; i < boot[1].MaximumElems; i++){ - read = _FloppyRead(0,&elements[1],sizeof(SMFS_BOOT_SECTOR)+(sizeof(SMFS_Elements)*i),sizeof(SMFS_Elements)); - qemu_log("[%d] READ: %d | Pos: %d",i,read,sizeof(SMFS_BOOT_SECTOR)+(sizeof(SMFS_Elements)*i)); - __com_formatString(0x3f8," |--- Index | %x\n",elements[1].Index); - __com_formatString(0x3f8," |--- Attr | %x\n",elements[1].Attr); - __com_formatString(0x3f8," |--- Size | %x\n",elements[1].Size); - __com_formatString(0x3f8," |--- TimeCreateHIS | %x\n",elements[1].TimeCreateHIS); - __com_formatString(0x3f8," |--- TimeCreateDate | %x\n",elements[1].TimeCreateDate); - __com_formatString(0x3f8," |--- TimeAccess | %x\n",elements[1].TimeAccess); - __com_formatString(0x3f8," |--- Point | %x\n",elements[1].Point); - __com_formatString(0x3f8," |--- Dir | %x\n",elements[1].Dir); - __com_formatString(0x3f8," |--- Name | %s\n",elements[1].Name); - __com_formatString(0x3f8,"\n",elements[1].Size); - } - //elements[0]; -} +int fs_smfs_detect(const char Disk){ + SMFS_BOOT_SECTOR* BOOT = kmalloc(sizeof(SMFS_BOOT_SECTOR)+1); + dpm_read(Disk, 0, sizeof(SMFS_BOOT_SECTOR), BOOT); -void _smfs_init(){ - qemu_log("[SMFS] Init..."); - qemu_log("%d | %x",0x167FFF,0x167FFF); - qemu_log("[SMFS] В пизду");return; - qemu_log("[SMFS] Boot Sector size: %d",sizeof(SMFS_BOOT_SECTOR)); - qemu_log("[SMFS] Package size: %d",sizeof(SMFS_PACKAGE)); - qemu_log("[SMFS] Emelent size: %d",sizeof(SMFS_Elements)); - qemu_log("[SMFS] Emelents group size: %d",sizeof(SMFS_Elements)*256); - qemu_log("[SMFS] Free Space: %d",FLOPPY_SIZE-(sizeof(SMFS_Elements)*256)-sizeof(SMFS_BOOT_SECTOR)); - bKbMb(FLOPPY_SIZE-(sizeof(SMFS_Elements)*256)-sizeof(SMFS_BOOT_SECTOR)); - qemu_log("[SMFS] Count package: %d",(FLOPPY_SIZE-(sizeof(SMFS_Elements)*256)-sizeof(SMFS_BOOT_SECTOR))/sizeof(SMFS_PACKAGE)); - bKbMb((FLOPPY_SIZE-(sizeof(SMFS_Elements)*256)-sizeof(SMFS_BOOT_SECTOR))/sizeof(SMFS_PACKAGE)); - - //_smfs_format(256); return; - int read = 0; - read = _FloppyRead(0,&boot[1],0,39); - qemu_log("[SMFS] Read:%d",read); - //_smfs_write(boot,sizeof(SMFS_BOOT_SECTOR)); - //read = _FloppyWrite(0,boot,0,sizeof(SMFS_BOOT_SECTOR)); - //qemu_log("[SMFS] WRITE:%d\n%s",read); qemu_log("[SMFS] Check BootSector:"); - __com_formatString(0x3f8," |--- magic1 | %x\n",boot[1].magic1); - __com_formatString(0x3f8," |--- magic2 | %x\n",boot[1].magic2); - __com_formatString(0x3f8," |--- MaximumElems | %d\n",boot[1].MaximumElems); - __com_formatString(0x3f8," |--- MaxPackage | %d\n",boot[1].MaxPackage); - __com_formatString(0x3f8," |--- OEM | %s\n",boot[1].oem_name); - __com_formatString(0x3f8," |--- Label | %s\n",boot[1].volume_label); - __com_formatString(0x3f8," |--- FSID | %s\n",boot[1].fsid); - // FloppySize - 1509949 - qemu_log("[SMFS] %d b | %d Kb | %d Mb",FLOPPY_SIZE,FLOPPY_SIZE/1024,(FLOPPY_SIZE/1024)/1024); - int fadr = _smfs_foundFile("\\TeST.TxT"); - if (fadr == -1){ - qemu_log("Test.txt No found"); - } else { - SMFS_Elements elem = _smfs_getInfoElem(fadr); - if (elem.Attr == SMFS_TYPE_UNKNOWN){ - qemu_log("SMFS_TYPE_ERROR"); - } else { - char* data = kmalloc(elem.Size); - int asd = _smfs_ReadFile(elem.Index,data); - qemu_log("READ: %d | \n%s",asd,data); - } - } - //qemu_log("Delete file? %d",_smfs_DeleteFile(0),_smfs_DeleteFile(1),_smfs_DeleteFile(2)); - //_smfs_foundFile("\\SUKA\\BLAT/Poshe.txt"); - //_smfs_foundFile("/SayoriDev/SDK/Chip/ПиздЕц.elf"); - //_smfs_WriteFile(0,"Is im here blyat! Da skolko mozno tvorit' ety dick!"); - //_smfs_FreePackAge(16); - //_smfs_printFF(); -} + qemu_log(" |--- magic1 | %x\n",BOOT->magic1); + qemu_log(" |--- magic2 | %x\n",BOOT->magic2); + qemu_log(" |--- MaximumElems | %d\n",BOOT->MaximumElems); + qemu_log(" |--- MaxPackage | %d\n",BOOT->MaxPackage); + qemu_log(" |--- OEM | %s\n",BOOT->oem_name); + qemu_log(" |--- Label | %s\n",BOOT->volume_label); + qemu_log(" |--- FSID | %s\n",BOOT->fsid); + + kfree(BOOT); + return (0); +} \ No newline at end of file diff --git a/kernel/src/fs/tarfs.c b/kernel/src/fs/tarfs.c new file mode 100644 index 000000000..a4e2986ab --- /dev/null +++ b/kernel/src/fs/tarfs.c @@ -0,0 +1,279 @@ +/** + * @file drv/fs/tarfs.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief Файловая система TarFS + * @version 0.3.4 + * @date 2023-10-14 + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ + + +#include +#include +#include +#include +#include +#include "lib/string.h" +#include "mem/vmm.h" + +bool tarfs_debug = false; + + + +int oct2bin(char *str, int size) { + int n = 0; + char *c = str; + while (size-- > 0) { + n *= 8; + n += *c - '0'; + c++; + } + return n; +} + +size_t fs_tarfs_read(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer){ + if (tarfs_debug) qemu_log("[FSM] [TARFS] [READ] D:%d | N: %s | O:%d | S:%d",Disk,Path,Offset,Size); + TarFS_ROOT* initrd = (TarFS_ROOT*) dpm_metadata_read(Disk); + for (int i = 1;i < initrd->Count;i++){ + if (!strcmpn(initrd->Files[i].Name,Path)) + continue; + + return dpm_read(Disk,initrd->Files[i].Addr+Offset, Size, Buffer); + } + if (tarfs_debug) qemu_log("[FSM] [TARFS] [READ] NO FOUND!!"); + return 0; +} + +size_t fs_tarfs_write(const char Disk,const char* Path,size_t Offset,size_t Size,void* Buffer){ + return 0; +} + +int fs_tarfs_create(const char Disk,const char* Path,int Mode){ + return 0; +} + +int fs_tarfs_delete(const char Disk,const char* Path,int Mode){ + return 0; +} + +FSM_FILE fs_tarfs_info(const char Disk,const char* Path){ + if (tarfs_debug) qemu_log("[FSM] [TarFS] [Info]"); +// FSM_FILE *file = kcalloc(sizeof(FSM_FILE), 1); + FSM_FILE file = {}; + + TarFS_ROOT* initrd = (TarFS_ROOT*) dpm_metadata_read(Disk); + + for (int i = 1; i < initrd->Count; i++){ + //qemu_log("[%d] '%s' != '%s'",strcmp(initrd->Files[i].Name,Path),initrd->Files[i].Name,Path); + if (!strcmpn(initrd->Files[i].Name,Path)) continue; +// file->Ready = 1; + file.Ready = 1; + char* zpath = pathinfo(initrd->Files[i].Name, PATHINFO_DIRNAME); + //qemu_log("[%d] zpath: %s",strlen(zpath),zpath); +// memcpy(file->Path,zpath,strlen(zpath)); +// memcpy(file->Name,initrd->Files[i].Name,strlen(initrd->Files[i].Name)); +// file->Mode = 'r'; +// file->Size = initrd->Files[i].Size; +// file->Type = initrd->Files[i].Type - 48; + + + memcpy(file.Path,zpath,strlen(zpath)); + memcpy(file.Name,initrd->Files[i].Name,strlen(initrd->Files[i].Name)); + file.Mode = 'r'; + file.Size = initrd->Files[i].Size; + file.Type = initrd->Files[i].Type - 48; + + kfree(zpath); + //return dpm_read(Disk,initrd->Files[i].Addr+Offset,Size,Buffer); + break; + } + +// return file[0]; + return file; +} + +void fs_tarfs_label(const char Disk, char* Label){ + memcpy(Label,"ustar",strlen("ustar")); +} + +int fs_tarfs_detect(const char Disk){ + char* Buffer = kmalloc(5); + + dpm_read(Disk, 257, 5,Buffer); + + bool isTarFS = ((Buffer[0] != 0x75 || Buffer[1] != 0x73 || Buffer[2] != 0x74 || Buffer[3] != 0x61 || Buffer[4] != 0x72)?false:true); + if (tarfs_debug) qemu_log("[0] = %x",Buffer[0]); + if (tarfs_debug) qemu_log("[1] = %x",Buffer[1]); + if (tarfs_debug) qemu_log("[2] = %x",Buffer[2]); + if (tarfs_debug) qemu_log("[3] = %x",Buffer[3]); + if (tarfs_debug) qemu_log("[4] = %x",Buffer[4]); + if (tarfs_debug) qemu_log("[TarFS] is: %d",isTarFS); + kfree(Buffer); + return (int)isTarFS; +} + +FSM_DIR* fs_tarfs_dir(const char Disk,const char* Path){ + if (tarfs_debug) qemu_log("[FSM] [TarFS] [Info] Disk:%d | Path:%s",Disk,Path); + FSM_DIR *Dir = kcalloc(sizeof(FSM_DIR), 1); + TarFS_ROOT* initrd = dpm_metadata_read(Disk); // noalloc + FSM_FILE *Files = kcalloc(sizeof(FSM_FILE), initrd->Count); + + size_t CA = 0, CF = 0, CD = 0, CO = 0; + for (int i = 1;i < initrd->Count;i++){ + ////////////////////////// + //// Обращаю внимание, для за путь принимается сейчас R:\\Sayori\\ + //// Если вам искать только файлы, то вот вариант + // char* zpath = pathinfo(initrd->Files[i].Name, PATHINFO_DIRNAME); + // qemu_log("[%d] %s",strcmpn(zpath,Path),zpath); + //// Но мне такой вариант, не подходит, мне нужно еще и папки. + ///////////////////////// + bool isPassed = fsm_isPathToFile(Path, initrd->Files[i].Name) == 1; + + if (!isPassed) + continue; + + char* zpath = pathinfo(initrd->Files[i].Name, PATHINFO_DIRNAME); + + fsm_convertUnix(atoi(initrd->Files[i].LastTime), &Files[CA].LastTime); + + Files[CA].Mode = 'r'; + Files[CA].Size = initrd->Files[i].Size; + Files[CA].Type = initrd->Files[i].Type - 48; + Files[CA].Ready = 1; + + memcpy(Files[CA].Path, zpath, strlen(zpath)); + + substr(Files[CA].Name, + initrd->Files[i].Name, + strlen(Path), + strlen(initrd->Files[i].Name) - (Files[CA].Type == 5?1:0) - strlen(Path) + ); + + kfree(zpath); + + if (Files[CA].Type == 0) { + /// Это файл + CF++; + } else if (Files[CA].Type == 5){ + /// Это папка + CD++; + } else { + /// Рандомный элемент + CO++; + } + CA++; + } + Dir->Ready = 1; + Dir->Count = CA; + Dir->CountFiles = CF; + Dir->CountDir = CD; + Dir->CountOther = CO; + Dir->Files = Files; + + return Dir; +} + +size_t fs_tarfs_countFiles(const uint32_t in){ + size_t count = 0; + uint8_t* ptr = (uint8_t*)in; + + size_t pos = 0; + TarFS_Elem* elem = (TarFS_Elem*)ptr; + + while (memcmp(elem->Signature, "ustar", 5) == 0) { + int filesize = oct2bin(elem->Size, 11); + + count++; + + pos = ALIGN(pos + sizeof(TarFS_Elem) + filesize, 512); + elem = (TarFS_Elem*)(ptr + pos); + } + + return count; +} + +TarFS_ROOT* fs_tarfs_init(uint32_t in, uint32_t size, int Mode){ + uint8_t *ptr = (uint8_t*)in; + if(ptr[257] != 0x75 + || ptr[258] != 0x73 + || ptr[259] != 0x74 + || ptr[260] != 0x61 + || ptr[261] != 0x72) { + return kcalloc(sizeof(TarFS_ROOT), 1); + } + + size_t count = fs_tarfs_countFiles(in); + + if (tarfs_debug) qemu_log("Found %d entries.", count); + + size_t currentInx = 0; + ssize_t sizeDir = -1; + TarFS_File* tffs = kmalloc((count+1) * sizeof(TarFS_File)); + TarFS_ROOT* root = kmalloc(sizeof(TarFS_ROOT)); + + size_t pos = 0; + + TarFS_Elem *file = (TarFS_Elem*) ptr; + + while (memcmp(file->Signature, "ustar", 5) == 0) { + int filesize = oct2bin(file->Size, 11); + + if (sizeDir == -1 && Mode == 1){ + //qemu_log("Mode:1 | s:%d | m:%d",sizeDir,Mode); + sizeDir = strlen(file->Name); + } else if (sizeDir == -1) { + //qemu_log("Mode:0"); + sizeDir = 2; + } + + tffs[currentInx].Ready = (currentInx==0?0:1); + tffs[currentInx].Size = filesize; + tffs[currentInx].Type = (int)file->Type; + tffs[currentInx].Real = (uint32_t)(ptr + pos) + sizeof(TarFS_Elem); + tffs[currentInx].Addr = tffs[currentInx].Real - in; + + + memcpy(tffs[currentInx].Mode,file->Mode, 8); + memcpy(tffs[currentInx].LastTime,file->LastTime,12); + substr(tffs[currentInx].Name,file->Name,sizeDir,100-sizeDir); + //qemu_log("[%d] fix name:%s",strlen(tffs[currentInx].Name),tffs[currentInx].Name); + currentInx++; + + if (tarfs_debug) qemu_log("[%x] Name: %s; Size: %d", file, file->Name, filesize); + + pos = ALIGN(pos + sizeof(TarFS_Elem) + filesize, 512); + file = (TarFS_Elem*)(ptr + pos); + // ptr += (((filesize + 511) / 512) + 1) * 512; + } + +// while(1); + + root->Ready = 1; + root->Count = count; + root->Files = tffs; + + return root; +} + +TarFS_File tarfs_infoFile(TarFS_ROOT* r,const char* name){ + for (int i = 1;i < r->Count;i++){ + if (!strcmpn(r->Files[i].Name,name)) continue; + return r->Files[i]; + } + return r->Files[0]; +} + +char* tarfs_readFile(TarFS_ROOT* r, const char* name){ + for (int i = 1; i < r->Count; i++) { + if (!strcmpn(r->Files[i].Name,name)) + continue; + + char* buffer = kmalloc(r->Files[i].Size); + + memcpy(buffer, (char*)r->Files[i].Real, r->Files[i].Size); + + return buffer; + } + return 0; +} + diff --git a/kernel/src/gui/basics.c b/kernel/src/gui/basics.c index 150e2b798..162cebfe3 100644 --- a/kernel/src/gui/basics.c +++ b/kernel/src/gui/basics.c @@ -1,9 +1,9 @@ #include -#include +#include "io/screen.h" -void fill_screen(uint32_t color) { - size_t w = getScreenWidth(); - size_t h = getScreenHeight(); +void fill_screen(const uint32_t color) { + const size_t w = getScreenWidth(); + const size_t h = getScreenHeight(); for(int i = 0; i < h; i++) { for(int j = 0; j < w; j++) { @@ -12,7 +12,7 @@ void fill_screen(uint32_t color) { } } -void draw_rectangle(uint32_t x, uint32_t y, uint32_t w, uint32_t h, uint32_t color) { +void draw_rectangle(const uint32_t x, uint32_t y, uint32_t w, uint32_t h, uint32_t color) { for(size_t i = x, to = x+w; i < to; i++) { set_pixel(i, y, color); set_pixel(i, y+h, color); @@ -25,7 +25,7 @@ void draw_rectangle(uint32_t x, uint32_t y, uint32_t w, uint32_t h, uint32_t col } -void draw_filled_rectangle(size_t x, size_t y, size_t w, size_t h, uint32_t fill) { +void draw_filled_rectangle(size_t x, size_t y, size_t w, size_t h, const uint32_t fill) { for(int i = 0; i < h; i++) { for(int j = 0; j < w; j++) { set_pixel(x+j, y+i, fill); diff --git a/kernel/src/gui/circle.c b/kernel/src/gui/circle.c index e52dc9207..3c1807c99 100644 --- a/kernel/src/gui/circle.c +++ b/kernel/src/gui/circle.c @@ -1,4 +1,5 @@ -#include +#include "common.h" +#include "io/screen.h" void draw_circle(int32_t xc, int32_t yc, int32_t radius, uint32_t color) { int32_t x = 0; diff --git a/kernel/src/gui/eki.c b/kernel/src/gui/eki.c deleted file mode 100644 index 75bd36dea..000000000 --- a/kernel/src/gui/eki.c +++ /dev/null @@ -1,23 +0,0 @@ -#include "gui/render.h" -#include "gui/widget_button.h" -#include "gui/widget_image.h" -#include "gui/widget_label.h" - -void eki_start() { - Window_t* eki_mainwindow = window_new("Eki"); - eki_mainwindow->x = 100; - eki_mainwindow->y = 100; - eki_mainwindow->width = 200; - eki_mainwindow->height = 200; - eki_mainwindow->canvas_bgcolor = 0x333333; - - Widget_t* hello_button = new_widget_button("Hi", 0x00ff00, 0x000000); - hello_button->x = 50; - hello_button->y = 50; - hello_button->width += 30; - hello_button->height += 15; - - window_add_widget(eki_mainwindow, hello_button); - - eki_mainwindow->state = DISPLAYING; -} \ No newline at end of file diff --git a/kernel/src/gui/line.c b/kernel/src/gui/line.c index 037f3657f..005a147f2 100644 --- a/kernel/src/gui/line.c +++ b/kernel/src/gui/line.c @@ -1,4 +1,7 @@ -#include +#include +#include +#include "lib/math.h" +#include "io/tty.h" void draw_line(int x0, int y0, int x1, int y1, int thickness, int color) { // Calculate the differences and absolute values of x and y coordinates @@ -40,7 +43,7 @@ void draw_line(int x0, int y0, int x1, int y1, int thickness, int color) { } -void draw_line_extern(char* buffer, size_t width, size_t height, int x0, int y0, int x1, int y1, int thickness, int color) { +void draw_line_extern(uint8_t *buffer, size_t width, size_t height, int x0, int y0, int x1, int y1, int thickness, int color) { // Calculate the differences and absolute values of x and y coordinates int dx = ABS(x1 - x0); int dy = ABS(y1 - y0); diff --git a/kernel/src/gui/widget_image.c b/kernel/src/gui/widget_image.c deleted file mode 100644 index ac616e550..000000000 --- a/kernel/src/gui/widget_image.c +++ /dev/null @@ -1,58 +0,0 @@ -#include -#include "gui/widget.h" -#include "io/duke_image.h" -#include "gui/widget_image.h" -#include "io/duke_image.h" -#include "io/port_io.h" - -void destroy_widget_image(Widget_t* widget); - -void widget_image_renderer(struct Widget* this, struct Window* window) { - Widget_Image_t* this_data = (Widget_Image_t*)(this->custom_widget_data); - - duke_rawdraw(this_data->image_data, this_data->meta, this->x, this->y); -} - -Widget_t* new_widget_image(char* path) { - struct DukeImageMeta* metadata = kcalloc(sizeof(struct DukeImageMeta), 1); - duke_get_image_metadata(path, metadata); - - // qemu_log("Load image metadata code: %x", code); - - // qemu_log("Image: %d x %d", metadata.width, metadata.height); - // qemu_log("Allocating %d bytes for Widget Image", metadata.data_length); - void* buffer_image = kcalloc(metadata->data_length, 1); - - qemu_log("Getting data"); - duke_get_image_data(path, *metadata, buffer_image); - qemu_log("Okay"); - - Widget_t* wgt = new_bare_widget( - &widget_image_renderer, - &destroy_widget_image, - 0, 0, - metadata->width, metadata->height - ); - - wgt->custom_widget_data = kcalloc(sizeof(Widget_Image_t), 1); - - Widget_Image_t* wgt_data = (Widget_Image_t*)wgt->custom_widget_data; - wgt_data->path = path; - wgt_data->display_mode = NORMAL; - wgt_data->meta = metadata; - wgt_data->image_data = buffer_image; - - return wgt; -} - -void destroy_widget_image(Widget_t* widget) { - Widget_Image_t* wgt_data = (Widget_Image_t*)(widget->custom_widget_data); - - // qemu_log("Freeing image data: %x", wgt_data->image_data); - kfree(wgt_data->image_data); - kfree(wgt_data->meta); - // qemu_log("Freeing widget data: %x", widget->custom_widget_data); - kfree(widget->custom_widget_data); - // qemu_log("Freeing widget itself: %x", widget); - // destroy_widget(widget); -} diff --git a/kernel/src/io/duke_image.c b/kernel/src/io/duke_image.c deleted file mode 100755 index 33f6b4e17..000000000 --- a/kernel/src/io/duke_image.c +++ /dev/null @@ -1,281 +0,0 @@ -/** - * @file io/imaging.c - * @author NDRAEY >_ (pikachu_andrey@vk.com) - * @brief Встраиваемая библиотека рисования изображений формата Duke - * @version 0.3.3 - * @date 2022-11-01 - * @copyright Copyright SayoriOS Team (c) 2022-2023 - */ - -#include -#include -#include -#include -#include -#include - -/** - * @brief Получает метаданные изображения Duke. - * - * @param filename - Имя файла - * - * @return 0 при успехе, 1 при ошибке - */ -char duke_get_image_metadata(char *filename, struct DukeImageMeta* meta) { - if(vfs_exists(filename)) { - int mount_addr_ = vfs_foundMount(filename); - int file_index_ = vfs_findFile(filename); - vfs_read(mount_addr_, file_index_, 0, sizeof(struct DukeImageMeta), meta); - return 0; - } - return 1; -} - -void duke_get_image_data(char* filename, struct DukeImageMeta meta, void* buf) { - if(vfs_exists(filename)) { - int mount_addr_ = vfs_foundMount(filename); - int file_index_ = vfs_findFile(filename); - vfs_read(mount_addr_, file_index_, sizeof(struct DukeImageMeta), meta.data_length, buf); - } -} - -char duke_draw_area_from_file(char *filename, int x, int y, int sx, int sy, int width, int height) { - if(vfs_exists(filename)) { - struct DukeImageMeta* meta = kmalloc(sizeof *meta); - - int mount_addr_ = vfs_foundMount(filename); - int file_index_ = vfs_findFile(filename); - vfs_read(mount_addr_, file_index_, 0, sizeof(struct DukeImageMeta), meta); - - if(width>meta->width) { width = meta->width; } - if(height>meta->height) { height = meta->height; } - - char *imagedata = kmalloc(meta->data_length); - - vfs_read(mount_addr_, file_index_, sizeof(struct DukeImageMeta), meta->data_length, imagedata); - - int wx; - int wy = sy; - char mod = meta->alpha?4:3; - - while(wy<(height-sy)) { - wx = sx; - while((wx-sx)<(width)) { - int px = PIXIDX(meta->width*mod, wx*mod, wy); - char r = imagedata[px]; - char g = imagedata[px+1]; - char b = imagedata[px+2]; - char a = imagedata[px+3]; - int color = RGB_TO_UINT32(r, g, b); - if(mod==4) { - if(a != 0) { - set_pixel(x+(wx-sx), y+(wy-sy), color); - } - }else{ - set_pixel(x+(wx-sx), y+(wy-sy), color); - } - wx++; - } - wy++; - } - kfree(imagedata); - kfree(meta); - }else{ return 1; } - return 0; -} - - - -/** - * @brief Функция отрисовки изображения - * - * @param filename - Имя файла - * @param sx - Координата x - * @param sy - Координата y - * - * @return 0 - OK или 1 - ERROR - */ -bool duke_draw_from_file(const char *filename, size_t sx, size_t sy) { - DukeHeader_t* meta = kmalloc(sizeof *meta); - FILE* fp = fopen(filename, "r"); - - if(!fp) { - kfree(meta); - return 1; - } - - fread(fp, 1, sizeof(DukeHeader_t), meta); - - qemu_log("Draw Duke Image!"); - qemu_log("W: %d; H: %d; SIZE: %d; ALPHA: %s;", meta->width, meta->height, meta->data_length, meta->alpha ? "true" : "false"); - - char *imagedata = kcalloc(meta->data_length, 1); - fread(fp, meta->data_length, 1, imagedata); - - size_t x = 0, y = 0; - char mod = meta->alpha ? 4 : 3; - - // qemu_log("Pixel step is: %d", mod); - - while(y < meta->height) { - x = 0; - while(x < meta->width) { - size_t px = PIXIDX(meta->width * mod, x * mod, y); - uint8_t r = imagedata[px]; - uint8_t g = imagedata[px + 1]; - uint8_t b = imagedata[px + 2]; - uint32_t color = RGB_TO_UINT32(r, g, b); - - if(meta->alpha) { - uint8_t a = imagedata[px + 3]; - - if(a != 0) - set_pixel(sx + x, sy + y, color); - }else{ - set_pixel(sx + x, sy + y, color); - } - x++; - } - y++; - } - - kfree(imagedata); - fclose(fp); - kfree(meta); - qemu_log("Freed memory!!!"); - return 0; -} - -void duke_rawdraw(const char *data, struct DukeImageMeta* meta, int sx, int sy){ - int x = 0, y = 0; - char mod = meta->alpha?4:3; - - while(y < meta->height) { - x = 0; - while(x < meta->width) { - int px = PIXIDX(meta->width * mod, x * mod, y); - - char r = data[px]; - char g = data[px+1]; - char b = data[px+2]; - char a = data[px+3]; - int color = ((r&0xff)<<16)|((g&0xff)<<8)|(b&0xff); - - if((mod==4 && a!=0) || mod==3) { - set_pixel(sx+x, sy+y, color); - } - - x++; - } - y++; - } -} - -void duke_rawdraw2(const char *data, int width, int height, int bpp, int sx, int sy){ - int x = 0, y = 0; - - while(y < height) { - x = 0; - while(x < width) { - int px = PIXIDX(width * (bpp >> 3), x * (bpp >> 3), y); - - char r = data[px]; - char g = data[px+1]; - char b = data[px+2]; - char a = data[px+3]; - int color = ((r&0xff)<<16)|((g&0xff)<<8)|(b&0xff); - - if(((bpp >> 3) == 4 && a != 0) || (bpp >> 3) == 3) { - set_pixel(sx+x, sy+y, color); - } - - x++; - } - y++; - } -} - - -void duke_scale(const char* pixels, unsigned int w1, unsigned int h1, int w2, int h2, char alpha, char* out) { - int scr_w = (w1<<16)/w2; - int scr_h = (h1<<16)/h2; - - int x = 0; - int y = 0; - - int x2 = 0; - int y2 = 0; - - char mod = alpha?4:3; - while(y>16; - y2 = (y*scr_h)>>16; - - out[PIXIDX(w2*mod, x*mod, y)] = pixels[PIXIDX(w1*mod, x2*mod, y2)]; - out[PIXIDX(w2*mod, x*mod, y)+1] = pixels[PIXIDX(w1*mod, x2*mod, y2)+1]; - out[PIXIDX(w2*mod, x*mod, y)+2] = pixels[PIXIDX(w1*mod, x2*mod, y2)+2]; - if(alpha) { - out[PIXIDX(w2*mod, x*mod, y)+3] = pixels[PIXIDX(w1*mod, x2*mod, y2)+3]; - } - x++; - } - y++; - } -} - -unsigned int duke_calculate_bufsize(unsigned int width, unsigned int height, unsigned int alpha) { - return width*height*(alpha?4:3); -} - - -/* -DUKE SCALING EXAMPLE: - - struct DukeImageMeta* frw = duke_get_image_metadata("/initrd/res/SynapseOSLogo.duke"); - if(frw==0) {tty_printf("Return 0!\n");} - - unsigned int bsize = duke_calculate_bufsize(frw->width, frw->height, frw->alpha); - - char* imdata = kheap_malloc(bsize); - duke_get_image_data("/initrd/res/SynapseOSLogo.duke", *frw, imdata); - - unsigned int nsize = duke_calculate_bufsize(300, 300, 1); - char *ndata = kheap_malloc(nsize); - - duke_scale(imdata, frw->width, frw->height, 300, 300, 1, ndata); - - kheap_free(imdata); - frw->width = 300; - frw->height= 300; - duke_rawdraw(ndata, frw, getScreenWidth()-300, 0); - kheap_free(ndata); -*/ - -char duke_draw_scaled(char* filename, int width, int height, int x, int y) { - if(!vfs_exists(filename)) return 1; - struct DukeImageMeta origimg; - - char errcode = duke_get_image_metadata(filename, &origimg); - if(errcode != 0) return 1; - - unsigned int bsize = duke_calculate_bufsize(origimg.width, origimg.height, origimg.alpha); - - char* imdata = kmalloc(bsize); - duke_get_image_data(filename, origimg, imdata); - - unsigned int nsize = duke_calculate_bufsize(width, height, origimg.alpha); - char *ndata = kmalloc(nsize); - - duke_scale(imdata, origimg.width, origimg.height, width, height, origimg.alpha, ndata); - kfree(imdata); - - origimg.width = width; - origimg.height = height; - - duke_rawdraw(ndata, &origimg, x, y); - - kfree(ndata); - return 0; -} diff --git a/kernel/src/io/ports.c b/kernel/src/io/ports.c old mode 100755 new mode 100644 index 1eb0001f0..38991dd34 --- a/kernel/src/io/ports.c +++ b/kernel/src/io/ports.c @@ -2,43 +2,24 @@ * @file io/ports.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Средства для работы с портами - * @version 0.3.3 + * @version 0.3.4 * @date 2022-11-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include + #include #include #include +#include "io/serial_port.h" +#include "sys/scheduler.h" +#include "mem/vmm.h" -/** - * @brief Запись 32х битного числа в порт - * - * @param port - порт - * @param val - число - */ -void outl(uint16_t port, uint32_t val) { - asm volatile ( "outl %0, %1" : : "a"(val), "Nd"(port) ); -} - +void (*default_qemu_printf)(const char *text, ...) = qemu_printf; -/** - * @brief Чтение 32х битного числа - * - * @param port - порт - * @return uint32_t - число - */ -uint32_t inl(uint16_t port) { - uint32_t ret; - asm volatile ( "inl %1, %0" - : "=a"(ret) - : "Nd"(port) ); - return ret; +void switch_qemu_logging() { + default_qemu_printf = new_qemu_printf; } - - - /** * @brief Чтение длинного слова через порт * @@ -67,13 +48,13 @@ void outsl(uint16_t port, uint32_t *buffer, int32_t times) { } void insw(uint16_t __port, void *__buf, unsigned long __n) { - asm volatile("cld; rep; insw" + __asm__ volatile("cld; rep; insw" : "+D"(__buf), "+c"(__n) : "d"(__port)); } void outsw(uint16_t __port, const void *__buf, unsigned long __n) { - asm volatile("cld; rep; outsw" + __asm__ volatile("cld; rep; outsw" : "+S"(__buf), "+c"(__n) : "d"(__port)); } @@ -89,10 +70,29 @@ int32_t is_transmit_empty(uint16_t port) { // Read 1 byte (char) from port. uint8_t serial_readchar(uint16_t port) { - while (is_signal_received(port) == 0); + //size_t to = 0; + while (is_signal_received(port) == 0){ + //to++; + //qemu_warn("TIMEOUT: %d",to); + } return inb(port); } + +// Read 1 byte (char) from port. +int8_t serial_readchar_timeout(uint16_t port,size_t timeout, bool Alert) { + size_t to = 0; + while (is_signal_received(port) == 0){ + to++; + //qemu_warn("TIMEOUT: %d",to); + if (to >= timeout){ + if (Alert) qemu_warn("TIMEOUT: %d",to); + return -1; + } + } + return inb(port); +} + /** * @brief Небольшая задержка используя порт 128(0x80) */ @@ -100,19 +100,6 @@ void io_wait(void) { outb(0x80, 0); } -/** - * @brief Чтение 16х битного числа - * - * @param port - порт - * @return uint16_t - число - */ -uint16_t inw(uint16_t port){ - uint16_t ret; - asm volatile ("inw %1, %0":"=a"(ret):"dN"(port)); - return ret; -} - - /** * @brief Проверка, читаем ли символ * @@ -134,44 +121,36 @@ int is_com_port(int port) { switch (port) { case PORT_COM1: return 1; - break; case PORT_COM2: return 2; - break; case PORT_COM3: return 3; - break; case PORT_COM4: return 4; - break; case PORT_COM5: return 5; - break; case PORT_COM6: return 6; - break; case PORT_COM7: return 7; - break; case PORT_COM8: return 8; - break; default: return 0; - break; } } /** * @brief Вывод QEMU через COM1 информации * - * @param text Строка с параметрами + * @param text Форматная строка + * @param ... Дополнительные параметры */ void qemu_printf(const char *text, ...) { va_list args; va_start(args, text); - if (__com_getInit(1) == 1) { + if (__com_getInit(1)) { scheduler_mode(false); // Stop scheduler __com_pre_formatString(PORT_COM1, text, args); @@ -183,19 +162,19 @@ void qemu_printf(const char *text, ...) { } void new_qemu_printf(const char *format, ...) { - if (!__com_getInit(1)) + if (!__com_getInit(1)) return; - + va_list args; va_start(args, format); char* container; - + vasprintf(&container, format, args); + va_end(args); + __com_writeString(PORT_COM1, container); kfree(container); - - va_end(args); } diff --git a/kernel/src/io/rgb_image.c b/kernel/src/io/rgb_image.c new file mode 100644 index 000000000..5b3c19467 --- /dev/null +++ b/kernel/src/io/rgb_image.c @@ -0,0 +1,83 @@ +// +// Created by ndraey on 25.10.23. +// + +#include +#include "io/rgb_image.h" +#include "io/ports.h" + +/** + * @brief Рисует изображение в виде массива байт в видеопамяти. + * @param data Массив данных изображения + * @param width Ширина изображения + * @param height Высота изображения + * @param bpp Количество бит на пиксель + * @param sx Начальная координата X + * @param sy Начальная координата Y + */ +void draw_rgb_image(const char *data, size_t width, size_t height, size_t bpp, int sx, int sy) { + int x, y = 0; + + size_t bytes_pp = bpp >> 3; + + while(y < height) { + x = 0; + while(x < width) { + int px = PIXIDX(width * bytes_pp, x * bytes_pp, y); + + char r = data[px]; + char g = data[px + 1]; + char b = data[px + 2]; + char a = data[px + 3]; + size_t color = ((r & 0xff) << 16) | ((g & 0xff) << 8) | (b & 0xff); + +// if((bytes_pp == 4 && a != 0) || bytes_pp == 3) { + set_pixel(sx + x, sy + y, color); +// } else { +// qemu_log("FUCK! %x", a); +// } + + x++; + } + y++; + } +} + +/** + * @brief Скалирует изображение (расширяет или уменьшает размер изображения). + * @param pixels Массив байт изображения в памяти + * @param w1 Начальная ширина + * @param h1 Начальная высота + * @param w2 Конечная ширина + * @param h2 Конечная высота + * @param alpha Имеется ли альфа-канал? + * @param out Выходной буффер изображения. + */ +void scale_rgb_image(const char* pixels, unsigned int w1, unsigned int h1, int w2, int h2, char alpha, char* out) { + int scr_w = (w1<<16)/w2; + int scr_h = (h1<<16)/h2; + + int x = 0; + int y = 0; + + int x2 = 0; + int y2 = 0; + + char mod = alpha?4:3; + while(y>16; + y2 = (y*scr_h)>>16; + + out[PIXIDX(w2*mod, x*mod, y)] = pixels[PIXIDX(w1*mod, x2*mod, y2)]; + out[PIXIDX(w2*mod, x*mod, y)+1] = pixels[PIXIDX(w1*mod, x2*mod, y2)+1]; + out[PIXIDX(w2*mod, x*mod, y)+2] = pixels[PIXIDX(w1*mod, x2*mod, y2)+2]; + if(alpha) { + out[PIXIDX(w2*mod, x*mod, y)+3] = pixels[PIXIDX(w1*mod, x2*mod, y2)+3]; + } + x++; + } + y++; + } +} \ No newline at end of file diff --git a/kernel/src/io/screen.c b/kernel/src/io/screen.c index 603460f18..6afcc718c 100644 --- a/kernel/src/io/screen.c +++ b/kernel/src/io/screen.c @@ -1,7 +1,13 @@ -#include +#include +#include +#include +#include +#include #include +#include "mem/pmm.h" +#include "mem/vmm.h" -uint8_t *framebuffer_addr; ///< Точка монтирования +uint8_t *framebuffer_addr = 0; ///< Точка монтирования uint32_t framebuffer_pitch; ///< Частота обновления экрана uint32_t framebuffer_bpp; ///< Глубина цвета экрана uint32_t framebuffer_width; ///< Длина экрана @@ -11,19 +17,6 @@ uint8_t *back_framebuffer_addr = 0; ///< Позиция буфера экран bool lazyDraw = true; ///< Включен ли режим ленивой прорисовки bool tty_oem_mode = false; ///< Режим работы -/** - * @brief Обновить информацию на основном экране - */ -// void punch() { -// fb_copier(framebuffer_addr, back_framebuffer_addr, framebuffer_size); -// } - -// void punch() { -// uint8_t* temp = back_framebuffer_addr; -// back_framebuffer_addr = framebuffer_addr; -// framebuffer_addr = temp; -// } - /** * @brief Получение адреса расположения драйвера экрана * @@ -55,23 +48,12 @@ uint32_t getDisplayBpp(){ return framebuffer_bpp; } -/** - * @brief Получение размера буфера экрана - * - * @return uint32_t - Размер буфера экрана - */ -size_t getDisplaySize(){ - return framebuffer_size; -} - void create_back_framebuffer() { qemu_log("^---- 1. Allocating"); - back_framebuffer_addr = (uint8_t*)kmalloc(framebuffer_size); + back_framebuffer_addr = (uint8_t*)kcalloc(framebuffer_size, 1); qemu_log("framebuffer_size = %d (%dK) (%dM)", framebuffer_size, framebuffer_size/1024, framebuffer_size/(1024*1024)); qemu_log("back_framebuffer_addr = %x", back_framebuffer_addr); - - memset(back_framebuffer_addr, 0, framebuffer_size); } /** @@ -80,48 +62,54 @@ void create_back_framebuffer() { * @param mboot - информация полученная от загрузчика */ void init_vbe(multiboot_header_t *mboot) { - svga_mode_info_t *svga_mode = (svga_mode_info_t*) mboot->vbe_mode_info; - framebuffer_addr = (uint8_t*)svga_mode->physbase; - framebuffer_pitch = svga_mode->pitch; - framebuffer_bpp = svga_mode->bpp; - framebuffer_width = svga_mode->screen_width; - framebuffer_height = svga_mode->screen_height; + // FIXME: Something wrong with `svga_mode_info_t` structure! +// svga_mode_info_t *svga_mode = (svga_mode_info_t*) mboot->vbe_mode_info; +// framebuffer_addr = (uint8_t*)svga_mode->physbase; +// framebuffer_pitch = svga_mode->pitch; +// framebuffer_bpp = svga_mode->bpp; +// framebuffer_width = svga_mode->screen_width; +// framebuffer_height = svga_mode->screen_height; +// framebuffer_size = framebuffer_height * framebuffer_pitch; + +// qemu_log("[VBE] [Install] Width: %d; Height: %d; Pitch: %d; BPP: %d; Size: %d; Address: %x", +// framebuffer_width, +// framebuffer_height, +// framebuffer_pitch, +// framebuffer_bpp, +// framebuffer_size, +// framebuffer_addr +// ); + + + framebuffer_addr = (uint8_t *) mboot->framebuffer_addr; + framebuffer_pitch = mboot->framebuffer_pitch; + framebuffer_bpp = mboot->framebuffer_bpp; + framebuffer_width = mboot->framebuffer_width; + framebuffer_height = mboot->framebuffer_height; framebuffer_size = framebuffer_height * framebuffer_pitch; - qemu_log("Booster is: %d", (framebuffer_size % 4 == 0 ? 4 : (framebuffer_size % 2 == 0 ? 2 : 1))); - - qemu_log("[VBE] [Install] Width: %d; Height: %d; Pitch: %d; BPP: %d; Size: %d; Address: %x", - framebuffer_width, - framebuffer_height, - framebuffer_pitch, - framebuffer_bpp, - framebuffer_size, - framebuffer_addr - ); + qemu_log("[VBE] [USING LEGACY INFO] Width: %d; Height: %d; Pitch: %d; BPP: %d; Size: %d; Address: %x", + mboot->framebuffer_width, + mboot->framebuffer_height, + mboot->framebuffer_pitch, + mboot->framebuffer_bpp, + mboot->framebuffer_height * mboot->framebuffer_pitch, + mboot->framebuffer_addr + ); - physaddr_t frame; - virtual_addr_t virt; - physaddr_t to; + physical_addr_t frame = (physical_addr_t)framebuffer_addr; + virtual_addr_t virt = (virtual_addr_t)framebuffer_addr; - physaddr_t kdir = get_kernel_dir(); size_t start_tk = getTicks(); - for (frame = (physaddr_t)framebuffer_addr, - virt = (virtual_addr_t)framebuffer_addr, - to = (physaddr_t)(framebuffer_addr + framebuffer_size); - frame < to; - frame += PAGE_SIZE*2048, - virt += PAGE_SIZE*2048) { - // map_pages(kdir, frame, virt, PAGE_SIZE, (PAGE_PRESENT | PAGE_WRITEABLE)); - - // FIXME: Why it doesn't run when setting size = 1? (Workaround is 2048) - map_pages(kdir, frame, virt, 2048, (PAGE_PRESENT | PAGE_WRITEABLE)); - } + map_pages(get_kernel_page_directory(), + frame, + virt, + framebuffer_size, + PAGE_WRITEABLE); qemu_log("Okay mapping! (took %d millis)", (getTicks() - start_tk)/(getFrequency()/1000)); - // map_pages(get_kernel_dir(), framebuffer_addr, framebuffer_addr, - // framebuffer_size / PAGE_SIZE, 0x07); qemu_log("Creating framebuffer"); create_back_framebuffer(); qemu_log("^---- OKAY"); @@ -130,8 +118,8 @@ void init_vbe(multiboot_header_t *mboot) { /** * @brief Получить цвет на пикселе по X и Y * - * @param int32_t x - X - * @param int32_t y - Y + * @param x - X + * @param y - Y * * @return uint32_t - Цвет */ @@ -147,27 +135,6 @@ size_t getPixel(int32_t x, int32_t y){ return ((back_framebuffer_addr[where+2] & 0xff) << 16) + ((back_framebuffer_addr[where+1] & 0xff) << 8) + (back_framebuffer_addr[where] & 0xff); } -/** - * @brief Вывод одного пикселя на экран - * - * @param x - позиция по x - * @param y - позиция по y - * @param color - цвет - */ -void set_pixel(uint32_t x, uint32_t y, uint32_t color) { - if (x < 0 || y < 0 || - x >= (int) VESA_WIDTH || - y >= (int) VESA_HEIGHT) { - return; - } - - uint8_t* pixels = back_framebuffer_addr + (x * (framebuffer_bpp >> 3)) + y * framebuffer_pitch; - - pixels[0] = color & 255; - pixels[1] = (color >> 8) & 255; - pixels[2] = (color >> 16) & 255; -} - void rgba_blend(uint8_t result[4], const uint8_t fg[4], const uint8_t bg[4]) { uint32_t alpha = fg[3] + 1; @@ -179,10 +146,9 @@ void rgba_blend(uint8_t result[4], const uint8_t fg[4], const uint8_t bg[4]) result[3] = 0xff; } -void setPixelAlpha(int x, int y, rgba_color color) { - if (x < 0 || y < 0 || - x >= (int) VESA_WIDTH || - y >= (int) VESA_HEIGHT) { +void setPixelAlpha(uint32_t x, uint32_t y, rgba_color color) { + if (x >= VESA_WIDTH || + y >= VESA_HEIGHT) { return; } @@ -190,7 +156,6 @@ void setPixelAlpha(int x, int y, rgba_color color) { if (color.a != 255) { if (color.a != 0) { - uint8_t bg[4] = {back_framebuffer_addr[where], back_framebuffer_addr[where + 1], back_framebuffer_addr[where + 2], 255}; uint8_t fg[4] = {(uint8_t)color.b, (uint8_t)color.g, (uint8_t)color.r, (uint8_t)color.a}; uint8_t res[4]; @@ -243,10 +208,7 @@ uint32_t getScreenHeight(){ * */ void clean_screen(){ - // punch(); memset(back_framebuffer_addr, 0, framebuffer_size); // Optimized variant - - punch(); } void rect_copy(int x, int y, int width, int height) { diff --git a/kernel/src/io/port_io.c b/kernel/src/io/serial_port.c similarity index 65% rename from kernel/src/io/port_io.c rename to kernel/src/io/serial_port.c index 72fb898c8..08aa5a523 100644 --- a/kernel/src/io/port_io.c +++ b/kernel/src/io/serial_port.c @@ -2,13 +2,17 @@ * @file io/port_io.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) * @brief Средства для работы с портами - * @version 0.3.3 + * @version 0.3.4 * @date 2023-01-07 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include -#include + +#include +#include #include +#include "io/ports.h" +#include "drv/fpu.h" +#include "lib/math.h" uint16_t com_init[8] = {0}; ///< Массив с инициализированными портами @@ -33,89 +37,6 @@ uint16_t __com_getInit(uint16_t key){ return com_init[key]; } -/** - * @brief Получение одного байта из порта (Аналог inb) - * - * @param port - порт - * @return uint8_t - данные - */ -uint8_t __com_readByte(uint16_t port){ - uint8_t ret; - asm volatile ( "inb %1, %0" - : "=a"(ret) - : "Nd"(port) ); - return ret; -} - -/** - * @brief Запись одного байта в порт - * - * @param port - порт - * @param val - данные - */ -void __com_writeByte(uint16_t port, uint8_t val){ - asm volatile("outb %1, %0" - : - : "dN"(port), - "a"(val) - ); -} - -/** - * @brief Запись 32х битного числа в порт - * - * @param port - порт - * @param val - число - */ -void __com_writeInt32(uint16_t port, uint32_t val) { - asm volatile ( "outl %0, %1" : : "a"(val), "Nd"(port) ); -} - -/** - * @brief Чтение 32х битного числа - * - * @param port - порт - * @return uint32_t - число - */ -uint32_t __com_readInt32(uint16_t port) { - uint32_t ret; - asm volatile ( "inl %1, %0" - : "=a"(ret) - : "Nd"(port) ); - return ret; -} - -/** - * @brief Чтение word из порта - * - * @param port - порт - * @return uint16_t - word - */ -uint16_t __com_readWord(uint16_t port) { - uint16_t rv; - asm volatile ("inw %1, %0" : "=a" (rv) : "dN" (port)); - return rv; -} - - -/** - * @brief Запись word в порт - * - * @param port - порт - * @param data - данные - */ -void __com_writeWord(uint16_t port, uint16_t data) { - asm volatile ("outw %1, %0" : : "dN" (port), "a" (data)); -} - - -/** - * @brief Чтение длинного слова через порт - * - * @param port - порт - * @param buffer - данные - * @param times - сколько данных прочесть - */ void __com_readBigData(uint16_t port, uint32_t *buffer, size_t times) { for (int32_t index = 0; index < times; index++) { buffer[index] = inl(port); @@ -153,7 +74,7 @@ void __com_readString(uint16_t port, uint32_t *buf, size_t size){ * @return int32_t - состояние (если 0 - готов) */ int32_t __com_is_ready(uint16_t port){ - return __com_readByte(port + 5) & 0x20; + return inb(port + 5) & 0x20; } /** @@ -188,42 +109,56 @@ void __com_io_wait(){ } -void __com_writeInt(int16_t port, int32_t i){ - if (i < 0) { - __com_writeChar(port,'-'); +void __com_writeInt(int16_t port, ssize_t i){ + char buffer[44] = {0}; + int index = 0; + + if(i == 0) { + __com_writeChar(port, '0'); + return; + } + + if(i < 0) { i = -i; + __com_writeChar(port, '-'); } - - uint32_t n, d = 1000000000; - char str[255]; - uint32_t dec_index = 0; - while ((i / d == 0) && (d >= 10)) { - d /= 10; + while(i > 0) { + buffer[index++] = '0' + (i % 10); + i /= 10; } - n = i; - while (d >= 10) { - str[dec_index++] = ((char) ((int) '0' + n / d)); - n = n % d; - d /= 10; + while(index--) { + __com_writeChar(port, buffer[index]); + } +} + +void __com_writeUInt(int16_t port, size_t i){ + char buffer[44] = {0}; + int index = 0; + + while(i != 0) { + buffer[index++] = '0' + (i % 10); + i /= 10; } - str[dec_index++] = ((char) ((int) '0' + n)); - str[dec_index] = 0; - __com_writeString(port,str); + while(index--) { + __com_writeChar(port, buffer[index]); + } } -void __com_writeHex(int16_t port,uint32_t i,bool mode){ - const unsigned char hex[16] = { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C', 'D', 'E', 'F' }; - uint32_t n, d = 0x10000000; - if (mode) __com_writeString(port,"0x"); +void __com_writeHex(int16_t port, uint32_t i, bool mode){ + const unsigned char hex[16] = "0123456789ABCDEF"; + uint32_t n = i; + uint32_t d = 0x10000000; + + if(mode) + __com_writeString(port, "0x"); while ((i / d == 0) && (d >= 0x10)) { d /= 0x10; } - n = i; while (d >= 0xF) { __com_writeChar(port,(char)hex[n / d]); @@ -243,28 +178,28 @@ void __com_pre_formatString(int16_t port, const char* format, va_list args){ switch (format[i]) { case 's': string = va_arg(args, char*); - __com_writeString(port, string?string:"(nullptr)"); + __com_writeString(port, string ? string : "(nullptr)"); break; case 'c': - // FIXME: fix this! "warning: cast to pointer from integer of different size" - __com_writeChar(port,(char)va_arg(args, int)); + __com_writeChar(port, va_arg(args, int)); break; case 'd': __com_writeInt(port,va_arg(args, int)); break; case 'f': { double a = va_arg(args, double); + if(!fpu_isInitialized()) { - __com_writeString(port,"0.0000000"); + __com_writeString(port,"!0.0000000"); break; } - if((int)a<0) { + if((int)a < 0) { a = -a; __com_writeChar(port,'-'); } - - double rem = a - (unsigned int)a; + + double rem = a - (int)a; __com_writeInt(port,(int)a); __com_writeChar(port,'.'); @@ -281,7 +216,7 @@ void __com_pre_formatString(int16_t port, const char* format, va_list args){ __com_writeInt(port,va_arg(args, int)); break; case 'u': - __com_writeInt(port,va_arg(args, unsigned int)); + __com_writeUInt(port,va_arg(args, unsigned int)); break; case 'x': __com_writeHex(port,va_arg(args, uint32_t),true); @@ -291,6 +226,7 @@ void __com_pre_formatString(int16_t port, const char* format, va_list args){ break; default: __com_writeChar(port,format[i]); + break; } } else { __com_writeChar(port,format[i]); diff --git a/kernel/src/io/shell.c b/kernel/src/io/shell.c deleted file mode 100755 index fb340b8f9..000000000 --- a/kernel/src/io/shell.c +++ /dev/null @@ -1,1066 +0,0 @@ -/** - * @file io/shell.c - * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) - * @brief Sayori Command Line (SCL -> Shell) - * @version 0.3.3 - * @date 2022-10-20 - * @copyright Copyright SayoriOS Team (c) 2022-2023 - */ -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include "sys/cpuid.h" -#include "sys/pixfmt.h" -#include - -typedef struct { - char* name; - uint32_t (*funcv)(uint32_t, char**); - char* helpstring; -} Command_t; - -bool force_shell_closed = false; ///< Принудительное закрытие shell'a после выполнения команды -char* cmd = ""; ///< Текущая команда -char* oldcmd = ""; ///< Старая команда -size_t ShellKBD_i = 0; ///< Индекс триггера -Command_t shell_commands[]; - -void piano(); -void minesweeper(); - -uint32_t cmd_crash() { - // size_t a = 2/0; - // detect_cpu(a); - - // a /= 0; - - *(char*)0xabcdef12 = 0; - - return 0; -} - -uint32_t cmd_help(__attribute__((unused)) uint32_t c, __attribute__((unused)) char* v[]){ - size_t hlp_padding = 24; - _tty_printf("Доступные команды:\n"); - - for(size_t i = 0; shell_commands[i].name != nullptr; i++) { - _tty_printf("\t%s", shell_commands[i].name); - for(size_t j = 0; j < hlp_padding - strlen(shell_commands[i].name); j++) { - _tty_printf(" "); - } - _tty_printf(" | %s\n", shell_commands[i].helpstring); - } - - punch(); - - return 0; -} - -uint32_t cmd_cpuinfo(__attribute__((unused)) uint32_t c, __attribute__((unused)) char* v[]){ - detect_cpu(0); - - struct cpu_info info = cpu_get_basic_info(); - - tty_printf("Features: "); - for(int i = 0; i < 32; i++) { - if(info.feature_flags_edx & (1 << i)) { - _tty_printf("%s ", cpu_flag_edx_description[i]); - } - } - tty_printf("\n"); - - if(is_temperature_module_present()) - tty_printf("CPU Temperature: %d *C\n", get_cpu_temperature()); - - return 0; -} -/** - * @brief Функция позволяет отчистить экран - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_cls(uint32_t c,char* v[]){ - clean_tty_screen(); - - return 0; -} - -/** - * @brief Функция перезагружающая устройство - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_reboot(__attribute__((unused)) uint32_t c, __attribute__((unused)) char* v[]){ - tty_printf("REBOOT NOW!\n"); - sleep_ms(100); - reboot(); - return 0; -} -/** - * @brief Функция выключающая устройство - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_shutdown(__attribute__((unused)) uint32_t c, __attribute__((unused)) char* v[]){ - tty_printf("SHUTDOWN NOW!\n"); - sleep_ms(100); - shutdown(); - return 0; -} - -/** - * @brief Вывод информации о системе - */ -void sysinfo(){ - clean_tty_screen(); - - tga_header_t hdr = {}; - - tga_extract_info("/Sayori/Images/sysinfo.tga", &hdr); - - size_t size = hdr.w * hdr.h * (hdr.bpp >> 3); - - uint32_t* buffer = kmalloc(size); - tga_extract_pixels("/Sayori/Images/sysinfo.tga", buffer); - - pixfmt_conv((char*)buffer, hdr.bpp, hdr.w, hdr.h, SCREEN_BGR, SCREEN_RGB); - - duke_rawdraw2((const char*)buffer, hdr.h, hdr.w, hdr.bpp, 0, 0); - - kfree(buffer); - // duke_draw_from_file("/Sayori/Images/sysinfo.duke", 0, 0); - - - setPosY(256); - - tty_printf("SayoriOS by SayoriOS Team (pimnik98 and NDRAEY)\n\n"); - - sayori_time_t time = get_time(); - - tty_printf("Системная информация:\n"); - tty_printf("\tOS: SayoriOS v%d.%d.%d\n", VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH); - tty_printf("\tДата сборки: %s\n", __TIMESTAMP__); - tty_printf("\tАрхитектура: %s\n", ARCH_TYPE); - tty_printf("\tПроцессор: %s\n", getNameBrand()); - tty_printf("\tОЗУ: %d kb\n", getInstalledRam()/1024); - tty_printf("\tВидеоадаптер: %s\n","Basic video adapter (Unknown)"); - tty_printf("\tДисплей: %s (%dx%d)\n", "(\?\?\?)", getScreenWidth(), getScreenHeight()); - tty_printf("\tТики: %d\n", getTicks()); - tty_printf("\tЧастота таймера: %d Гц\n", getFrequency()); - tty_printf("\tВремя с момента запуска: %f секунд\n", getUptime()); - tty_printf("\tТекущее время: %d:%d:%d\n", time.hours, time.minutes, time.seconds); -} - -/** - * @brief Функция выодит инфу - - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_sysinfo(__attribute__((unused)) uint32_t c, __attribute__((unused)) char* v[]){ - sysinfo(); - return 0; -} - -/** - * @brief Функция выводящая содержимое файла - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_cat(uint32_t c, char* v[]){ - if (c == 0){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [CAT] Необходимо указать путь для чтения файла.\n"); - return 1; - } - - char* file = v[1]; - if(file[0] == '&') { - if(strcmpn(file + 1, "com1")) { - tty_printf("Внимание: Этот порт предназначен для отладки ядра.\n"); - for(;;) { - tty_printf("%c", serial_readchar(PORT_COM1)); - } - } - - return 0; - } - - char* full_path = kcalloc(strlen(getSysPath()) + strlen(v[1]) + 1, 1); - - strcpy(full_path, getSysPath()); - strcat(full_path, v[1]); - - FILE* cat_file = fopen(full_path, "r"); - if (!cat_file){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [CAT] Не удалось найти файл `%s`. Проверьте правильность введенного вами пути.\n",v[1]); - - kfree(full_path); - return 2; - } - - size_t filesize = fsize(cat_file); - - uint8_t buffer; - - while(ftell(cat_file) < filesize) { - fread(cat_file, 1, 1, &buffer); - tty_putchar(buffer, 0); - } - - kfree(full_path); - - fclose(cat_file); - - return 0; -} - - -/** - * @brief Функция выводящая содержимое файла - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_ac97(uint32_t c, char* v[]){ - if (c == 0){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [AC97] Необходимо указать путь для открытия файла.\n"); - return 1; - } - - FILE* file = fopen(v[1], "rb"); - tty_printf("[CMD] [AC97] Попытка открытия файла %s...\n", v[1]); - - if (ferror(file) != 0){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [AC97] Не удалось найти файл `%s`. Проверьте правильность введенного вами пути.\n",v[1]); - return 2; - } - - fseek(file, 0, SEEK_END); - - uint32_t filesize = ftell(file); - fseek(file, 0, SEEK_SET); - - ac97_set_master_volume(2, 2, false); - ac97_set_pcm_volume(2, 2, false); - - char* data = kmalloc(filesize); - fread(file, filesize, 1, data); - - char* dataptr = data; - - while(1) { - size_t write_size = MIN(filesize, 65536); - - if(filesize == 0) - break; - - size_t page_count = ac97_copy_user_memory_to_dma(dataptr, write_size); - - // for(ssize_t i = page_count; i > 0; i-= 32) { - ac97_single_page_write_wait(page_count); - // } - - dataptr += write_size; - filesize -= write_size; - } - - ac97_reset_channel(); - - kfree(data); - fclose(file); - - return 0; -} - -/** - * @brief Функция выводящая TGA - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_tga(uint32_t c, char* v[]){ - if (c == 0){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [TGA] Необходимо указать путь для открытия файла.\n"); - return 1; - } - tga_info(v[1]); - tga_paint(v[1]); - return 0; -} - -/** - * @brief Функция позволяющая узнать и установить имя пк - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_hostname(uint32_t c,char* v[]){ - if (c == 0){ - tty_printf("%s\n",getHostname()); - return 0; - } else { - setHostname(v[1]); - tty_printf("%s\n",getHostname()); - return 0; - } -} - -/** - * @brief Функция позволяющая узнать имя пользователя ОС - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_whoami(uint32_t c,char* v[]){ - if (c > 0){ - setUserName(v[1]); - } - tty_printf("%s\n",getUserName()); - return 0; -} - -/** - * @brief Функция откладки - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_debug(uint32_t c,char* v[]){ - for(int i = 0; c >= i; i++){ - qemu_log("[CMD] argc: %d => argv: %s",i,v[i]); - } - return 0; -} - -/** - * @brief Функция откладки шрифта - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_font(uint32_t c,char* v[]){ - TExplorer(); - return 0; -} - -/* -uint32_t cmd_milla(uint32_t c,char* v[]){ - if (c == 0){ - tty_printf("тут типа инструкция :)"); - return 0; - } else if (c < 2){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [Milla] Минимум 3 аргумента. Код ошибки: %d\n"); - return 0; - } - int init = __milla_init(); - if (init != 0){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [Milla] Не удалось запустить Milla. Код ошибки: %d\n",init); - return -1; - } - // init = __milla_cleanState(); - // if (init != 1){ - // tty_setcolor(COLOR_ERROR); - // tty_printf("[CMD] [Milla] Не удалось отчистить буфер Milla. Код ошибки: %d\n",init); - // return -2; - // } - - if (strcmpn(v[1], "list")) { - char* listt = __milla_getList(v[2]); - //tty_printf("\n%s\n",listt); - - uint32_t _m_d1 = str_cdsp(listt,"\n"); - char* _m_d[256] = {0}; - str_split(listt,_m_d,"\n"); - uint32_t _m_d2 = 0; - - char* _m_s[256] = {0}; - tty_printf("Найдено файлов и папок: %d\n",_m_d1); - for(size_t ind = 0; ind < _m_d1; ind++){ - _m_d2 = str_cdsp(_m_d[ind],"::"); - if (_m_d2 < 1) continue; - memset(_m_s,0,256); - str_split(_m_d[ind],_m_s,"::"); - tty_printf("|--- %s\n",_m_s[1]); - tty_printf("| |--- Тип: %s\n",_m_s[0]); - tty_printf("| |--- Формат: %s\n",_m_s[2]); - tty_printf("| |--- Размер: %s\n",_m_s[4]); - tty_printf("| |--- Дата: %s\n",_m_s[3]); - tty_printf("| |--- Владелец: %s\n",_m_s[5]); - tty_printf("|\n"); - - } - - - kfree(listt); - kfree((void*)_m_d); - kfree((void*)_m_s); - kfree((void*)_m_d1); - kfree((void*)_m_d2); - return 1; - - } else if (strcmpn(v[1],"info")){ - char* devName = kmalloc(sizeof(char)*256); - memset(devName, 0, 256); - strcpy(devName, (char*)__milla_getDiskInfo_Name()); - - tty_printf("[Milla]\n * Состояние: Подключено\n * Имя диска: %s\n * Доступное пространство: %dkb.\n * Занятое пространство: %dkb.\n * Всего доступно: %dkb.\n", devName, __milla_getDiskInfo_Free()/1024, __milla_getDiskInfo_Use()/1024, __milla_getDiskInfo_All()/1024); - kfree(devName); - } else if (strcmpn(v[1], "mlist")) { - char* listt = __milla_getList(v[2]); - //tty_printf("\n%s\n",listt); - - uint32_t _m_d1 = str_cdsp(listt,"\n"); - char* _m_d = kmalloc(256); - str_split(listt, _m_d, "\n"); - uint32_t _m_d2 = 0; - - char* _m_s = kmalloc(256); - tty_printf("Найдено файлов и папок: %d\n",_m_d1); - for(size_t ind = 0; ind < _m_d1; ind++){ - _m_d2 = str_cdsp(_m_d[ind],"::"); - if (_m_d2 < 1) continue; - memset(_m_s, 0, 256); - str_split(_m_d[ind],_m_s,"::"); - tty_printf("%s ",_m_s[1]); - } - - - kfree(listt); - kfree((void*)_m_d); - kfree((void*)_m_s); - // kfree((void*)_m_d1); - kfree((void*)_m_d2); - } else if (strcmpn(v[1], "clist")) { - char* listt = __milla_getList(v[2]); - uint32_t _m_d1 = str_cdsp(listt,"\n"); - char* _m_d[256] = {0}; - str_split(listt,_m_d,"\n"); - uint32_t _m_d2 = 0; - tty_printf("Найдено файлов и папок: %d\n",_m_d1); - for(size_t ind = 0; ind < _m_d1; ind++){ - _m_d2 = str_cdsp(_m_d[ind],"::"); - if (_m_d2 < 1) continue; - tty_printf("%s\n",_m_d[ind]); - } - kfree(listt); - kfree((void*)_m_d); - kfree((void*)_m_d1); - kfree((void*)_m_d2); - return 1; - } else if (strcmpn(v[1], "file")) { - char* file = __milla_getFile(v[2]); - tty_printf("READ: %s\n",file); - kfree(file); - - return 1; - } else if (strcmpn(v[1], "write")) { - if (c < 3){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [Milla] Минимум 4 аргумента. Код ошибки: %d\n",0); - return 1; - } - init = __milla_writeFile(v[2],v[3]); - if (init == -1){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [Milla] Не удалось отправить путь файла. Код ошибки: %d\n",init); - return init; - } else if (init == -2){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [Milla] Не удалось отправить размер файла. Код ошибки: %d\n",init); - return init; - } else if (init == -3){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [Milla] Конечное количество отправленных данных не совпадает. (%d != %d)\n",init, strlen(v[3])); - return init; - } - tty_printf("[CMD] [Milla] Файл отправлен. (Вес :%d | Отправлено: %d)\n",init,strlen(v[3])); - return init; - } else if (strcmpn(v[1], "mkdir")) { - init = __milla_mkdir(v[2]); - if (init != 1){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [Milla] Не удалось создать папку. Код ошибки: %d\n",init); - return init; - } - tty_printf("[CMD] [Milla] Папка %s успешно создана.",v[2]); - return init; - } else if (strcmpn(v[1], "touch")) { - init = __milla_touch(v[2]); - if (init != 1){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [Milla] Не удалось создать файл. Код ошибки: %d\n",init); - return init; - } - tty_printf("[CMD] [Milla] Файл %s успешно создан.",v[2]); - return init; - } else if (strcmpn(v[1], "del")) { - init = __milla_delete(v[2]); - if (init != 1){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [Milla] Не удалось удалить файл. Код ошибки: %d\n",init); - return init; - } - tty_printf("[CMD] [Milla] Файл %s успешно удален.",v[2]); - return init; - } else { - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [Milla] Команда не поддерживается!\n"); - return 0; - } - return init; -} -*/ - -/** - * @brief Функция перехода в другую папку - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_cd(uint32_t c, char* v[]){ - if (c == 0){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [CD] Необходимо указать путь для смены дириктории.\n"); - return 0; - } - - char* path_to = v[1]; - - size_t path_len = strlen(path_to) + strlen(getSysPath()); - char* new_path = kcalloc(path_len + 2, 1); - - // Is a absolute path? - if(path_to[0] == '/') { - qemu_log("First variant;"); - strcpy(new_path, path_to); - } else { - // Relative path. - qemu_log("Second variant (syspath: %s, path: %s);", getSysPath(), path_to); - strcpy(new_path, getSysPath()); - strcat(new_path, path_to); - } - - // If we want to turn back. - if(strcmpn(path_to, "..")) { - size_t len = strlen(new_path); - - do { - if(new_path[len] != '/') - break; - - new_path[len] = 0; - } while(len--); - - do { - if(new_path[len] == '/') - break; - - new_path[len] = 0; - } while(len--); - - len--; - - do { - if(new_path[len] == '/') - break; - - new_path[len] = 0; - } while(len--); - } - - // Sayori's VFS is very strange, it's a fix. - if(new_path[path_len] != '/') { - new_path[path_len] = '/'; - } - - qemu_log("Total path: %s", new_path); - - uint32_t inxDir = vfs_findDir(new_path); - - if (inxDir == -1){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [CD] Папка `%s` не найдена.\n", new_path); - - kfree(new_path); - return 0; - } - - setSysPath(new_path); - qemu_log("Now system path is: %s", getSysPath()); - - kfree(new_path); - return 1; -} - -/** - * @brief Функция просмотра содержимого файла - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_ls(uint32_t c, char* v[]){ - char path[256] = {0}; - if(c==0) { - qemu_log("Listing local folder: %s", getSysPath()); - }else{ - qemu_log("Listing folder: %s", v[1]); - } - strcpy(path, (!c?getSysPath():v[1])); - if (strlen(path) <= 0){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [LS] Некорректные данные `%s`. (strlen(path) <= 0)\n",path); - return 0; - } - uint32_t inxDir = vfs_findDir(path); - if (inxDir == -1){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [LS] Папка `%s` не найдена.\n",v[1]); - return 0; - } - size_t sss = vfs_getCountElemDir(path); - // qemu_log("SSS (?) is: %d (%x)", sss, sss); - - struct dirent* testFS = vfs_getListFolder(path); - // qemu_log("testFS pointer is: %d (%x)", testFS, testFS); - for(size_t f = 0; f < sss; f++){ - if(testFS[f].type == FS_FILE) { - tty_printf("[%s] %s (%d kb)\n",(testFS[f].type == FS_FILE?"Файл":"Папка"), testFS[f].name, vfs_byteToKByte(testFS[f].length)); - }else{ - tty_printf("[%s] %s\n",(testFS[f].type == FS_FILE?"Файл":"Папка"), testFS[f].name); - } - // qemu_printf("[%s] %s (%d kb)\n",(testFS[f].type == FS_FILE?"Файл":"Папка"),testFS[f].name,vfs_byteToKByte(testFS[f].length)); - } - - kfree(testFS); - - vfs_unlistFolder(path, testFS); - return 1; -} - -/** - * @brief Функция для отключенных фнк - * - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmdDisabled(uint32_t c,char* v[]){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [ОШИБКА] Команда `%s` отключена или не реализована.\n",v[0]); - return -1; -} - -uint32_t find_and_run_program(uint32_t c, char* v[]){ - if (c == 0){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [EXEC] Для выполнения этой команды необходимо указать имя запускаемого файла.\n"); - return 1; - } - - char* temp = kcalloc(strlen(getSysPath()) + strlen(v[0]) + 1, 1); - - strcpy(temp, getSysPath()); - strcat(temp, v[0]); - - FILE* elf_exec = fopen(temp, "r"); - - if(!elf_exec){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [EXEC] Программа `%s` не найдена в текущей папке.\n", temp); - kfree(temp); - return 2; - } - - if(!is_elf_file(elf_exec)) { - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [EXEC] Файл `%s` не является программой.\n", temp); - kfree(temp); - return 2; - } - - run_elf_file(temp, c, v); - - fclose(elf_exec); - - kfree(temp); - - return 0; -} - -/** - * @brief Функция выполнения программы - * @warning Функция сделана для консоли - * - * @param uint32_t c - Кол-во аргументов - * @param char* v[] - Аргементы - * - * @return uint32_t - Результат работы - */ -uint32_t cmd_exec(uint32_t c, char* v[]){ - if (c == 0){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [EXEC] Для выполнения этой команды необходимо указать имя запускаемого файла.\n"); - return 1; - } - char temp[256] = {0}; - strcpy(temp, getSysPath()); - strcat(temp, v[1]); - FILE* elf_exec = fopen(temp,"r"); - if (!elf_exec){ - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [EXEC] Программа `%s` не найдена в текущей папке.\n",v[1]); - return 2; - } - //elf_info(temp); - - run_elf_file(temp, c, v); - - fclose(elf_exec); - return 0; -} - -uint32_t cmd_view(uint32_t argc, char* argv[]) { - if(argc == 0) { - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [VIEW] Для выполнения этой команды необходимо указать имя файла.\n"); - return 1; - } - - struct DukeImageMeta* imdata = kmalloc(sizeof(DukeHeader_t)); - char* rpath = argv[1]; - - FILE* fp = fopen(rpath, "r"); - - if(!fp) { - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [VIEW] Произошла ошибка при открытии файла %s (evaluated from %s)\n", rpath, argv[1]); - kfree(rpath); - //tty_printf("%s: Failed to open file!!!\n", argv[0]); - return 1; - } - - fread(fp, 1, sizeof(DukeHeader_t), imdata); - fclose(fp); - - uint32_t w = getScreenWidth() - imdata->width; - uint32_t h = getScreenHeight() - imdata->height; - - clean_tty_screen(); - - bool error = duke_draw_from_file(rpath, w / 2, h / 2); - - if(error) { - tty_setcolor(COLOR_ERROR); - tty_printf("[CMD] [VIEW] Во время рендера картинки произошла ошибка.\n"); - } - - kfree(rpath); - kfree(imdata); - return 0; -} - -uint32_t cmd_meminfo() { - double used = (double)memory_get_used_kernel(); - double total = (double)getInstalledRam(); - double free = total - used; - - char i, fill = 0; - - tty_printf("%c", '['); - for(i = 0, fill = (char)((used / total) * 30); i < fill; i++) { - _tty_printf("%c", '='); - } - for(i = 0, fill = 30-((used / total) * 30); i < fill; i++) { - _tty_printf("%c", ' '); - } - tty_printf("] %f%%\n", (used / total) * 100); - - tty_printf("Total: %d kB (%d bytes)\n", (size_t)total >> 10, (size_t)total); - tty_printf("Used: %d kB (%d bytes)\n", (size_t)used >> 10, (size_t)used); - tty_printf("Free: %d kB (%d bytes)\n", (size_t)free >> 10, (size_t)free); - - print_allocated_map(); - tty_printf("Additional information about heap also wriiten to COM1 (Make sure you're using DEBUG build)"); - - return 0; -} - -uint32_t cmd_sound(uint32_t c, char* v[]) { - beeperInit(1); - return 0; -} - -uint32_t dan_view(uint32_t argc, char** argv); -uint32_t mala_draw(uint32_t argc, char** argv); -uint32_t calendar(uint32_t argc, char** argv); -uint32_t shell_diskctl(uint32_t argc, char** argv); -uint32_t dino_filemanager(uint32_t argc, char** argv); - -uint32_t gbwrap(uint32_t argc, char** argv) { - tty_printf("%d\n", argc); - - for(int i = 0; i < argc + 1; i++) { - tty_printf("#%d = %s\n", i, argv[i]); - } - - gb_main(argc + 1, argv); - - return 0; -} - -Command_t shell_commands[] = { - {"calendar", calendar, "Календарь"}, - {"cat", cmd_cat, "Показать содержимое файла."}, - {"cd", cmd_cd, "Перейти в папку"}, - {"cls", cmd_cls, "Очистить экран"}, - {"cpuinfo", cmd_cpuinfo, "Информация о процессоре"}, - {"crash", cmd_crash, "Crash the system"}, - {"danview", dan_view, "DAN Image viewer - Просмотр фото"}, - {"dino", dino_filemanager, "File manager (navigator)"}, - {"diskctl", shell_diskctl, "Disk utility"}, - {"font", cmd_font, "Показать все глифы шрифта"}, - {"gui", (uint32_t (*)(uint32_t, char **))parallel_desktop_start, "Запустить Parallel Desktop"}, - {"help", cmd_help, "Справка / Помощь"}, - {"hostname", cmd_hostname, "Показать или установить имя хоста"}, - {"ls", cmd_ls, "Показать содержимое каталога"}, - // {"milla", cmd_milla, "Утилита для взаимодействия с Milla FS"}, - {"meminfo", cmd_meminfo, "Показать информацию о памяти (полезно для отладки)"}, - {"mala", mala_draw, "Рисовалка"}, - {"piano", (uint32_t (*)(uint32_t, char **))piano, "Беги фортепиано (PC Speaker)"}, - {"reboot", cmd_reboot, "Перезагрузите систему"}, - {"shutdown", cmd_shutdown, "Выключить компьютер"}, - {"sound", cmd_sound, "Воспроизведение мелодии через PC Speaker"}, - {"pci", (uint32_t (*)(uint32_t, char **)) pci_print_list, "PCI Devices"}, - {"play", cmd_ac97, "Воспроизведение мелодии через AC97"}, - {"tga", cmd_tga, "Targa"}, - {"sysinfo", cmd_sysinfo, "Показать информацию о системе"}, - {"view", cmd_view, "Рисует картинку"}, - {"whoami", cmd_whoami, "Кто я?"}, - {"gb", gbwrap, "GameBoy Emulator"}, - {"minesweeper", minesweeper, "Сапёр"}, - {"rustcmd", rust_command, "Команда написанная на Rust"}, - {nullptr, nullptr, nullptr} // Конец списка (EOL), спасибо Никите (pimnik98)! -}; - -/** - * @brief Функция обработки комманд в Shell - * - * @warning Функция сделана для консоли - * - * @param char* ncmd - Команда - * - * @return uint32_t - Результат работы - */ -void cmdHandler(char* ncmd){ - OffTrigger(ShellKBD_i); - set_cursor_enabled(0); - - uint32_t argc = str_cdsp(ncmd," "); - char* argv[128] = {0}; - str_split(ncmd,argv," "); - cmd = ncmd; - - qemu_log("Argc total: %d", argc); - for(size_t i = 0; argc >= i; i++){ - qemu_log("[CMD] '%s' => argc: %d => argv: %s", ncmd, i, argv[i]); - } - qemu_log("Check ok."); - - bool found = false; - - for(size_t i = 0; shell_commands[i].name != nullptr; i++) { - if(strcmp(shell_commands[i].name, argv[0]) == 0) { - shell_commands[i].funcv(argc, argv); - found = true; - - break; - } - } - - if(!found) { - find_and_run_program(argc + 1, argv); - } - - set_cursor_enabled(1); - OnTrigger(ShellKBD_i); -} - -void ShellKBD(void* data1,void* data2,void* data3,void* data4,void* data5){ - if ((int) data1 == 82){ - OffTrigger(ShellKBD_i); - set_cursor_enabled(0); - tty_setcolor(COLOR_SYS_TEXT); - tty_printf("\n%s@%s:",getUserName(),getHostname()); - tty_setcolor(COLOR_SYS_PATH); - tty_printf("%s$ ", getSysPath()); - tty_setcolor(COLOR_TEXT); - tty_printf("%s\n",oldcmd); - cmdHandler(oldcmd); - tty_setcolor(COLOR_SYS_PATH); - tty_printf("* Команда выполнена. Нажмите 'Enter' чтобы вернуться в консоль.\n"); - tty_setcolor(COLOR_TEXT); - set_cursor_enabled(1); - OnTrigger(ShellKBD_i); - } - //qemu_log("[ShellKBD] Key:%d | Pressed: %x",(int) data1, (int) data2); - - /// Помещаем 0х0 для отключения дальнейшей обработки клавиатуры, но триггеры продолжат свою работу. - //memcpy(data5,(int) (0x0),sizeof(int)); -} - - -void ShellTimes(void* data1,void* data2,void* data3,void* data4,void* data5){ - char time_str[16] = {0}; - - drawRect(730, 0, 8*8, 16, 0x000000); - - sayori_time_t time = get_time(); - - // use sprintf! - sprintf(time_str, "%s%d:%s%d:%s%d", (time.hours>10?"":"0"), time.hours, (time.minutes>10?"":"0"), time.minutes, (time.seconds>10?"":"0"), time.seconds); - - draw_vga_str(time_str, strlen(time_str), 730, 0, 0xffffff); - - sleep_ms(1000); -} - -void shellForceClose(){ - force_shell_closed = true; - qemu_log("SHELL FORCE CLOSED!"); - OffTrigger(ShellKBD_i); - set_cursor_enabled(0); -} - -/** - * @brief Точка входа в консоль - */ -void shell(){ - force_shell_closed = false; - ShellKBD_i = RegTrigger(0x0001, &ShellKBD); ///< Регистрация нажатий клавы, к примеру Insert - - //changeStageKeyboard(1); - tty_set_bgcolor(COLOR_BG); - tty_setcolor(COLOR_ALERT); - tty_printf("\nВведите \"help\" для получения списка команд.\n"); - char* ncmd = kcalloc(256, sizeof(char)); - tty_setcolor(COLOR_TEXT); - oldcmd = kmalloc(256); - oldcmd = ""; - oldcmd[1] = '\0'; - - // v---- BUG: Clock is always active, even in graphical apps like `Piano`, `Parallel Desktop`, `draw`, and so on... - // RegTrigger(0x1111,&ShellTimes); ///< Отключена, из-за кривой реализации. - - while (1) { - if (force_shell_closed) break; - tty_setcolor(COLOR_SYS_TEXT); - tty_printf("\n%s@%s:",getUserName(),getHostname()); - tty_setcolor(COLOR_SYS_PATH); - tty_printf("%s$ ", getSysPath()); - - tty_setcolor(COLOR_TEXT); - - memset(ncmd, 0, 256); - gets(ncmd); - - if (strlen(ncmd) > 255) { - tty_setcolor(COLOR_ERROR); - tty_printf("\nERROR: limit 256 char's!"); - - // Oh god, just rewrite shell in C++ - tty_printf("\nTODO: Dynamic strings for shell!\n"); - continue; - } - - if(strlen(ncmd) == 0) { - continue; - } - - //qemu_log("[CMD] '%s'",ncmd); - - cmdHandler(ncmd); - memcpy(oldcmd,ncmd,strlen(ncmd)); - oldcmd[strlen(ncmd)] = '\0'; - //qemu_log("OLDCMD: '%s'",oldcmd); - } - ///> Эй, ты куда? - // Туда - kfree(ncmd); -} diff --git a/kernel/src/io/status_loggers.c b/kernel/src/io/status_loggers.c index 2f666e110..bbb55c1e6 100644 --- a/kernel/src/io/status_loggers.c +++ b/kernel/src/io/status_loggers.c @@ -1,4 +1,3 @@ -#include #include #include #include diff --git a/kernel/src/io/status_sounds.c b/kernel/src/io/status_sounds.c index 96d14ed68..3866d70af 100644 --- a/kernel/src/io/status_sounds.c +++ b/kernel/src/io/status_sounds.c @@ -1,7 +1,7 @@ -#include #include #include #include +#include "sys/timer.h" void ERROR_sound() { diff --git a/kernel/src/io/tty.c b/kernel/src/io/tty.c old mode 100755 new mode 100644 index cb3a7fccf..0276dd3c9 --- a/kernel/src/io/tty.c +++ b/kernel/src/io/tty.c @@ -2,20 +2,22 @@ * @file io/tty.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Средства для работы с видеодрайвером - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include #include -#include +#include #include #include #include #include #include #include +#include +#include "lib/sprintf.h" +#include "drv/psf.h" // TODO: Eurica! Split tty.c into 2 files: // tty.c - only text processing functions @@ -40,15 +42,15 @@ bool showAnimTextCursor = true; ///< Отображать ли анимацию void animTextCursor(); //////////////////////////////// - - /** * @brief Инициализация потоков */ void tty_taskInit(){ + qemu_log("Starting task..."); process_t* proc = get_current_proc(); + qemu_log("Process at: %x", proc); threadTTY01 = thread_create(proc, - (void*)&animTextCursor, + &animTextCursor, 0x4000, true, false); @@ -69,7 +71,7 @@ void tty_fontConfigurate(){ /** * @brief Меняет состояние печати через printf * - * @param bool state - Включить или выключить печать + * @param state - Включить или выключить печать */ void tty_changeState(bool state){ stateTTY = state; @@ -78,7 +80,7 @@ void tty_changeState(bool state){ /** * @brief Получение позиции по x * - * @return int32_t - Позиция по x + * @return Позиция по x */ uint32_t getPosX(){ return tty_pos_x; @@ -163,74 +165,24 @@ void setPosY(uint32_t y){ tty_pos_y = y; } - /** - * @brief Вывод линии на экран // LINES? DID YOU MEAN RECTS? - * - * @param x - координата точки 1 по x - * @param y - координата точки 1 по y - * @param xe - координата точки 2 по x - * @param ye - координата точки 2 по y - * @param color - цвет + * @brief Устновливает пиксель RGB в буфере в котором все пиксели представляют собой RGBA (альфа канал игнорируется) + * @param buffer - буфер RGBA + * @param width - длина кадра который представляет буфер + * @param height - ширина кадра который представляет буфер + * @param x - координата x + * @param y - координата у + * @param color - цвет в формате RGB */ -void set_line(int32_t x, int32_t y, int32_t xe, int32_t ye, uint32_t color){ - for (int32_t i = x; i < xe; i++) { - for (int32_t j = y; j < ye; j++) { - set_pixel(i, j, color); - } - } -} - - - void buffer_set_pixel4(uint8_t *buffer, size_t width, size_t height, size_t x, size_t y, size_t color) { if(x >= width || y >= height) return; size_t pixpos = PIXIDX(width * 4, x * 4, y); - // qemu_log("X: %d Y: %d POS: %d", x, y, pixpos); - buffer[pixpos + 0] = (uint8_t)color; buffer[pixpos + 1] = (uint8_t)(color >> 8); buffer[pixpos + 2] = (uint8_t)(color >> 16); -// buffer[pixpos + 3] = (uint8_t)(color >> 24); -} - -/** - * @brief Вывод одного символа с учетом цвета фона и текста - * - * @param c - символ - * @param txColor - цвет текста - * @param bgColor - цвет фона - */ -void _tty_putchar_color(char c,char c1, uint32_t txColor, uint32_t bgColor) { - - if ((tty_pos_x + tty_off_pos_x) >= (int) VESA_WIDTH || c == '\n') { - tty_line_fill[tty_pos_y] = tty_pos_x; - tty_pos_x = 0; - - if ((tty_pos_y + tty_off_pos_h) >= (int) VESA_HEIGHT) { - tty_scroll(1); - } else { - tty_pos_y += tty_off_pos_h; - } - } else { - - if ((tty_pos_y + tty_off_pos_h) >= (int) VESA_HEIGHT) { - tty_scroll(1); - } - - tty_setcolor(txColor); - draw_vga_ch(c,c1, tty_pos_x, tty_pos_y, tty_text_color); - - tty_pos_x += tty_off_pos_x; - } -} - -void tty_putchar_color(char c,char c1, uint32_t txColor, uint32_t bgColor) { - _tty_putchar_color(c,c1, txColor, bgColor); - punch(); } /** @@ -279,11 +231,9 @@ void tty_backspace() { } else { tty_pos_x -= tty_off_pos_x; } - // draw_vga_character(' ', tty_pos_x, tty_pos_y, tty_text_color, 0x000000, 1); - // punch(); + drawRect(tty_pos_x, tty_pos_y, tty_off_pos_x, tty_off_pos_h, 0x000000); punch(); - // qemu_log("TTY BACKSPACE!!!"); } @@ -301,134 +251,14 @@ void _tty_puts(const char str[]) { } } -/** - * @brief Вывод цветного текста - * - * @param str - текст - * @param txColor - цвет текста - * @param bgColor - цвет фона - */ -void _tty_puts_color(const char str[], uint32_t txColor, uint32_t bgColor) { - for (size_t i = 0, len = strlen(str); i < len; i++) { - _tty_putchar_color(str[i],str[i+1], txColor, bgColor); - if (isUTF(str[i])){ - i++; - } - } -} - -void tty_puts_color(const char str[], uint32_t txColor, uint32_t bgColor) { - // punch(); - _tty_puts_color(str, txColor, bgColor); - punch(); -} - - -/** - * @brief Вывод целого числа - * - * @param i - число - */ -void _tty_putint(const ssize_t i) { - char res[32]; - - if (i < 0) { - //tty_putchar('-'); - } - - itoa(i, res); - _tty_puts(res); -} - -void tty_putint(const ssize_t i) { - _tty_putint(i); - punch(); -} - -void _tty_putuint(const size_t i) { - char res[32]; - - itou(i, res); - _tty_puts(res); -} - -void tty_putuint(const size_t i) { - _tty_putuint(i); - punch(); -} - -/** - * @brief Вывод HEX числа - * - * @param i - число - */ -void _tty_puthex(uint32_t i) { - const unsigned char hex[16] = { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C', 'D', 'E', 'F' }; - uint32_t n, d = 0x10000000; - - _tty_puts("0x"); - - while((i / d == 0) && (d >= 0x10)) d /= 0x10; - - n = i; - - while( d >= 0xF ) { - _tty_putchar(hex[n/d],0); - n = n % d; - d /= 0x10; - } - - _tty_putchar(hex[n],0); -} - -void tty_puthex(uint32_t i) { - // punch(); - _tty_puthex(i); - punch(); -} - - -/** - * @brief Вывод числа HEX без префикса 0x - * - * @param i - число - */ -void _tty_puthex_v(uint32_t i) { - const unsigned char hex[16] = { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C', 'D', 'E', 'F' }; - uint32_t n, d = 0x10000000; - - while((i / d == 0) && (d >= 0x10)) d /= 0x10; - - n = i; - - while( d >= 0xF ) { - _tty_putchar(hex[n/d],0); - n = n % d; - d /= 0x10; - } - - _tty_putchar(hex[n],0); -} - -void tty_puthex_v(uint32_t i) { - // punch(); - _tty_puthex_v(i); - punch(); -} - - /** * @brief Подфункция-обработчик для tty_printf * * @param format - строка форматов * @param args - аргументы */ - -#define NEW_TTY_PRINTF 0 - -#if NEW_TTY_PRINTF == 1 void _tty_print(const char* format, va_list args) { - char* a; + char* a = 0; vasprintf(&a, format, args); @@ -436,189 +266,11 @@ void _tty_print(const char* format, va_list args) { kfree(a); } -#else -void _tty_print(const char *format, va_list args) { - char* fmt = (char*)format; - - while (*fmt) { - if (*fmt == '%') { - size_t width = 0; - bool left_align = false; - - fmt++; - - if(*fmt == '-') { - left_align = true; - fmt++; - } - - while(isdigit(*fmt)) { - width = width * 10 + (*fmt - '0'); - fmt++; - } - - if(*fmt == '*') { - width = va_arg(args, int); - fmt++; - } - - // qemu_log("Width is: %d", width); - - switch (*fmt) { - case 's': { - char* arg = va_arg(args, char*); - - int space = (int)width - (int)strlen(arg); - - if(left_align) - _tty_puts(arg ? arg : "(nullptr)"); - - if(space > 0) { - while(space--) - _tty_puts(" "); - } - - if(!left_align) - _tty_puts(arg ? arg : "(nullptr)"); - - break; - } - case 'c': { - _tty_putchar(va_arg(args, int), 0); - break; - } - case 'f': { - double a = va_arg(args, double); - if(!fpu_isInitialized()) { - _tty_puts("0.FPUNOINIT"); - break; - } - - - if(a < 0) { - a = -a; - - _tty_puts("-"); - } - - if(a == NAN) { - _tty_puts("nan"); - break; - } - - if(a == INFINITY) { - _tty_puts("inf"); - break; - } - - double rem = a - (int)a; - _tty_putint((int)a); - _tty_puts("."); - - for(int n = 0; n < 7; n++) { - _tty_putint((int)(rem * ipow(10, n+1)) % 10); - } - - break; - } - case 'i': - case 'd': { - int num = va_arg(args, int); - int space = width - digit_count(num); - - if(num < 0) - space++; - - if(left_align) - _tty_putint(num); - - if(space > 0) { - while(space--) - _tty_puts(" "); - } - - if(!left_align) - _tty_putint(num); - - break; - } - case 'u': { - unsigned int num = va_arg(args, unsigned int); - int space = width - digit_count((int)num); - - if(num < 0) - space++; - - if(left_align) - _tty_putint(num); - - if(space > 0) { - while(space--) - _tty_puts(" "); - } - - if(!left_align) - _tty_putint(num); - - break; - } - case 'x': { - int num = va_arg(args, int); - int space = width - hex_count(num) - 2; - - if(left_align) - _tty_puthex(num); - - if(space > 0) { - while(space--) - _tty_puts(" "); - } - - if(!left_align) - _tty_puthex(num); - - break; - } - case 'v': { - int num = va_arg(args, int); - int space = width - hex_count(num); - - if(left_align) - _tty_puthex_v(num); - - if(space > 0) { - while(space--) - _tty_puts(" "); - } - - if(!left_align) - _tty_puthex_v(num); - - break; - } - default: - _tty_putchar(*fmt, *(fmt+1)); - } - // \t - } else if (*fmt == 9) { - tty_pos_x += 4 * tty_off_pos_h; - } else { - _tty_putchar(*fmt, *(fmt+1)); - if (isUTF(*fmt)) - fmt++; - } - fmt++; - } -} - -#endif void _tty_printf(char *text, ...) { - //qemu_log("\nState sAQ: %d",showAnimTextCursor); int sAT = (showAnimTextCursor?1:0); if (sAT == 1){ showAnimTextCursor = false; - //qemu_log("Disabled sAQ: %d | %d",sAT,showAnimTextCursor); } if (stateTTY){ va_list args; @@ -629,7 +281,6 @@ void _tty_printf(char *text, ...) { if (sAT == 1){ showAnimTextCursor = true; - //qemu_log("Enabled sAQ: %d | %d\n",sAT,showAnimTextCursor); } } @@ -665,9 +316,15 @@ void animTextCursor(){ // thread_exit(threadTTY01); } +void clean_tty_screen_no_update() { + clean_screen(); + + tty_pos_x = 0; + tty_pos_y = tty_off_pos_h; +} + void clean_tty_screen() { - clean_screen(); + clean_tty_screen_no_update(); - tty_pos_x = 0; - tty_pos_y = tty_off_pos_h; + punch(); } diff --git a/kernel/src/kernel.c b/kernel/src/kernel.c old mode 100755 new mode 100644 index 2e4f228c2..8318226b2 --- a/kernel/src/kernel.c +++ b/kernel/src/kernel.c @@ -2,42 +2,54 @@ * @file kernel.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) * @brief Основная точка входа в ядро - * @version 0.3.3 + * @version 0.3.4 * @date 2022-11-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ #include "kernel.h" -#include "sys/sse.h" -#include "gui/parallel_desktop.h" -#include "sys/msr.h" -#include "sys/cpuinfo.h" -#include "sys/cputemp.h" + +#include +#include +#include + +#include "mem/pmm.h" +#include "mem/vmm.h" #include "drv/audio/ac97.h" -#include "sys/cpu_intel.h" -#include "sys/cpuid.h" -// For SSE -// #include +#include "sys/mtrr.h" +#include "net/ipv4.h" +#include "lib/freeada/ada.h" + +#include "fs/natfs.h" + +#include multiboot_header_t* multiboot; uint32_t init_esp = 0; bool initRD = false; bool autoexec = false; -bool run_gui_at_startup = false; char* cmd_autoexec = ""; -bool test_ac97 = true; +//bool test_ac97 = true; bool test_pcs = true; bool test_floppy = true; bool test_network = true; +bool is_rsdp = true; size_t kernel_start_time = 0; +void jse_file_getBuff(char* buf); + /** * @brief Обработка комманд указаных ядру при загрузке * - * @param char* cmd - Команды + * @param cmd - Команды */ + void kHandlerCMD(char* cmd){ - qemu_log("[kCMD] '%s'",cmd); + qemu_log("Kernel command line at address %x and contains: '%s'", cmd, cmd); + + if(strlen(cmd) == 0) + return; + uint32_t kCMDc = str_cdsp(cmd," "); uint32_t kCMDc_c = 0; char* out[128] = {0}; @@ -56,11 +68,9 @@ void kHandlerCMD(char* cmd){ bootScreenChangeMode(1); } else if (strcmpn(out_data[1],"light")){ bootScreenChangeTheme(1); - } else if (strcmpn(out_data[1],"dark")){ - bootScreenChangeTheme(0); - } else if (strcmpn(out_data[1],"no-logs")){ - bootScreenLogs(false); - } else { + } else if (strcmpn(out_data[1],"dark")) { + bootScreenChangeTheme(0); + } else { qemu_log("\t Sorry, no support bootscreen mode!"); } } @@ -73,14 +83,12 @@ void kHandlerCMD(char* cmd){ } if (strcmpn(out_data[0],"disable")){ if (strcmpn(out_data[1],"coms")){ - __com_setInit(1,0); - __com_setInit(2,0); - __com_setInit(3,0); - __com_setInit(4,0); + // FIXME: If uncomment following line of code, it willn't boot + __com_setInit(1, 0); + __com_setInit(2, 0); + __com_setInit(3, 0); + __com_setInit(4, 0); qemu_log("\t COM-OUT DISABLED"); - } else if (strcmpn(out_data[1],"ac97")){ - test_ac97 = false; - qemu_log("\t AC97 DISABLED"); } else if (strcmpn(out_data[1],"floppy")){ test_floppy = false; qemu_log("\t FLOPPY DISABLED"); @@ -90,19 +98,13 @@ void kHandlerCMD(char* cmd){ } else if (strcmpn(out_data[1],"pc-speaker")){ test_pcs = false; qemu_log("\t PC-Speaker DISABLED"); + } else if (strcmpn(out_data[1],"rdsp")){ + is_rsdp = false; + qemu_log("\t RDSP DISABLED"); } else { qemu_log("\t Sorry, no support!"); } } - - if (strcmpn(out_data[0], "exec")){ - run_gui_at_startup = false; - qemu_log("\t After the kernel has fully started, GUI will be launched"); - } - if (strcmpn(out_data[0], "gui")){ - run_gui_at_startup = true; - qemu_log("\t After the kernel has fully started, GUI will be launched"); - } //qemu_log("[kCMD] [%d] %s >\n\tKey: %s\n\tValue:%s",i,out[i],out_data[0],out_data[1]); } } @@ -110,8 +112,10 @@ void kHandlerCMD(char* cmd){ /** * @brief Монтирует виртуальный диск с файловой системой Sayori Easy File System * - * @param int irdst - Точка монтирования + * @param irdst - Точка монтирования + * @param irded - Конец точки монтирования */ + void initrd_sefs(size_t irdst, size_t irded){ if (initRD){ return; @@ -120,61 +124,68 @@ void initrd_sefs(size_t irdst, size_t irded){ qemu_log("[InitRD] [SEFS] Initialization of the virtual disk. The SEFS virtual file system is used."); qemu_log("[InitRD] [SEFS] The virtual disk space is located at address %x.", irdst); qemu_log("[InitRD] [SEFS] The virtual disk space is ends at %x.", irded); - - vfs_reg(irdst, irded, VFS_TYPE_MOUNT_SEFS); - - initRD = true; -} - -int get_cpu_mode() { - unsigned int cr0, cr4; - - __asm__ volatile("mov %%cr0, %0" : "=r"(cr0)); - __asm__ volatile("mov %%cr4, %0" : "=r"(cr4)); - - if ((cr4 & (1 << 21)) != 0) { // Bit 21 of CR4 is set, indicating long mode - return 64; - } else if ((cr0 & 1) != 0 && (cr4 & (1 << 21)) == 0) { // Bit 0 of CR0 is set and bit 21 of CR4 is clear, indicating protected mode - return 32; - } else { - return -1; // Unknown mode - } } /** * @brief Инициализирует модули подключенные к ОС * */ + +size_t last_module_end = 0; + +void scan_kmodules() { + uint32_t mods_count = multiboot->mods_count; + + for (size_t i = 0; i < mods_count; i++){ + multiboot_module_t *mod = (multiboot_module_t *) (uint32_t*)(multiboot->mods_addr + 8*i); + + last_module_end = mod->mod_end; + } + + qemu_log("Last module ends at: %x", last_module_end); +} + void kModules_Init(){ qemu_log("[kModules] Loading operating system modules..."); - uint32_t* mod_start = 0; - uint32_t* mod_end = 0; + uint32_t mod_start[32] = {0}; + uint32_t mod_end[32] = {0}; + uint32_t mod_size[32] = {0}; uint32_t mods_count = multiboot->mods_count; - - char* mod_cmd[16]; - if (mods_count > 0){ - mod_start = (uint32_t*) kmalloc(sizeof(uint32_t)*mods_count); - mod_end = (uint32_t*) kmalloc(sizeof(uint32_t)*mods_count); + char mod_cmd[32][64] = {0}; - qemu_log("[kModules] Found '%d' modules",mods_count); + if (mods_count > 0){ + qemu_log("[kModules] Found %d modules",mods_count); for (size_t i = 0; i < mods_count; i++){ mod_start[i] = *(uint32_t*)(multiboot->mods_addr + 8*i); mod_end[i] = *(uint32_t*)(multiboot->mods_addr + 8*i + 4); + mod_size[i] = mod_end[i] - mod_start[i]; + multiboot_module_t *mod = (multiboot_module_t *) (uint32_t*)(multiboot->mods_addr + 8*i); - mod_cmd[i] = kcalloc(strlen((char*)mod->cmdline) + 1, sizeof(char)); strcpy(mod_cmd[i], (char*)mod->cmdline); - qemu_log("[kModules] Found module number `%d`. (Start: %x | End: %x) CMD: %s",i,mod_start[i],mod_end[i],mod_cmd[i]); - + qemu_log("[kModules] Found module number `%d`. (Start: %x | End: %x | Size: %d) CMD: %s (%s)", + i, + mod_start[i], + mod_end[i], + mod_size[i], + mod_cmd[i], + (char*)mod->cmdline + ); + if (strcmpn(mod_cmd[i],"initrd_sefs")){ initrd_sefs(mod_start[i], mod_end[i]); continue; + } + if (strcmpn(mod_cmd[i],"initrd_tarfs")){ + initrd_tarfs(mod_start[i], mod_end[i]); } } + + qemu_log("Memory manager need to be feed with this information: Last module ends at: %x", last_module_end); } else { qemu_log("[kModules] No modules were connected to this operating system."); } @@ -184,7 +195,7 @@ void kModules_Init(){ void draw_raw_fb(multiboot_header_t* mboot, int x, int y, int w, int h, int color) { for(uint32_t i = y; i < y + h; i++) { for(uint32_t j = x; j < x + w; j++) { - uint8_t* a = (framebuffer_addr + (j * ((((svga_mode_info_t*)mboot->vbe_mode_info)->bpp) >> 3)) + i * (((svga_mode_info_t*)mboot->vbe_mode_info)->pitch)); + uint8_t* a = (framebuffer_addr + (j * ((mboot->framebuffer_bpp) >> 3)) + i * (mboot->framebuffer_pitch)); a[2] = (color >> 16) & 0xff; a[1] = (color >> 8) & 0xff; @@ -192,13 +203,15 @@ void draw_raw_fb(multiboot_header_t* mboot, int x, int y, int w, int h, int colo } } } +#else +#define draw_raw_fb(a, b, c, d, e, f) #endif /** * @brief Точка входа в ядро * * @param multiboot_header_t mboot - Информация MultiBoot - * @param uint32_t initial_esp - Точка входа + * @param initial_esp - Точка входа */ extern size_t CODE_start; @@ -212,239 +225,191 @@ extern size_t BSS_end; extern size_t USER_start; extern size_t USER_end; -__attribute__((section(".user"), aligned(4096))) void user_mode() { - uint32_t a = 0, b = 4; - a += 1; - - uint32_t c = a + b; - - while(1); -} - /* Спаси да сохрани этот кусок кода Да на все твое кодерская воля Да прибудет с тобой, священный код Я тебя благославляю */ -int kernel(multiboot_header_t* mboot, uint32_t initial_esp){ - __com_setInit(1,1); - multiboot = mboot; +int kernel(multiboot_header_t* mboot, uint32_t initial_esp) { + __com_setInit(1, 1); + multiboot = mboot; - framebuffer_addr = (uint8_t*)(mboot->framebuffer_addr); + __asm__ volatile("movl %%esp, %0" : "=r"(init_esp)); - #ifndef RELEASE - draw_raw_fb(mboot, 0, 0, 200, 16, 0x444444); - #endif + framebuffer_addr = (uint8_t *) (mboot->framebuffer_addr); + draw_raw_fb(mboot, 0, 0, 200, 16, 0x444444); - drawASCIILogo(0); - qemu_log("SayoriOS v%d.%d.%d\nBuilt: %s", - VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH, // Версия ядра - __TIMESTAMP__ // Время окончания компиляции ядра - ); + drawASCIILogo(0); - qemu_log("Bootloader header at: %x", mboot); - - qemu_log("SSE check: %d", sse_check()); - - if(sse_check()) { - __wtf_fxsave(); + qemu_log("SayoriOS v%d.%d.%d\nBuilt: %s", + VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH, // Версия ядра + __TIMESTAMP__ // Время окончания компиляции ядра + ); - qemu_log("fxsave'd"); - - size_t edx, unused; + qemu_log("Bootloader header at: %x", mboot); - __asm__("cpuid": "=a" (unused), \ - "=b" (unused), \ - "=c" (unused), \ - "=d" (edx) : \ - "a" (1)); - - if(edx & (1 << 26)) { - qemu_log("Supports SSE2!"); - } else { - #if USE_SSE - qemu_log("WARNING: SSE2 NEEDS TO BE SUPPORTED BY YOUR PC."); - #endif - } - } + qemu_log("SSE: %s", sse_check() ? "Supported" : "Not supported"); - qemu_log("Current CPU mode: %d", get_cpu_mode()); + if (sse_check()) { + __wtf_fxsave(); + } - kHandlerCMD((char*)mboot->cmdline); - qemu_log("Setting `Interrupt Descriptor Table`..."); - init_descriptor_tables(); - qemu_log("Setting `RIH`..."); - isr_init(); - qemu_log("Initializing FPU..."); + qemu_log("Setting `Interrupt Descriptor Table`..."); + init_descriptor_tables(); + qemu_log("Setting `RIH`..."); + isr_init(); + qemu_log("Initializing FPU..."); fpu_init(); - #ifndef RELEASE - draw_raw_fb(mboot, 0, 0, 400, 16, 0x888888); - #endif + draw_raw_fb(mboot, 0, 0, 400, 16, 0x888888); - init_timer(BASE_FREQ); - __asm__ volatile("sti"); + init_timer(CLOCK_FREQ); + __asm__ volatile("sti"); - #ifndef RELEASE - draw_raw_fb(mboot, 0, 0, 800, 16, 0xffffff); - #endif + draw_raw_fb(mboot, 0, 0, 800, 16, 0xffffff); - qemu_log("Checking RAM..."); - check_memory_map((memory_map_entry_t*)mboot->mmap_addr, mboot->mmap_length); + qemu_log("Checking RAM..."); + check_memory_map((memory_map_entry_t *) mboot->mmap_addr, mboot->mmap_length); qemu_log("Memory summary:"); qemu_log(" Code: %x - %x", &CODE_start, &CODE_end); qemu_log(" Data: %x - %x", &DATA_start, &DATA_end); qemu_log(" Read-only data: %x - %x", &RODATA_start, &RODATA_end); qemu_log(" BSS: %x - %x", &BSS_start, &BSS_end); - qemu_log("Memory manager initialization..."); - init_memory_manager(initial_esp); + qemu_log("Memory manager initialization..."); - // TODO: Read-only memory for .rodata segment -// size_t rostart = &RODATA_start; -// size_t roend = &RODATA_end; -// -// map_pages( -// get_kernel_dir(), -// rostart, -// rostart, -// (ALIGN(roend, PAGE_SIZE) - rostart) / PAGE_SIZE, -// PAGE_PRESENT -// ); + scan_kmodules(); - kModules_Init(); + init_paging(); - qemu_log("NatSuki loading..."); - vfs_reg(PORT_COM2, 0, VFS_TYPE_MOUNT_NATSUKI); + mark_reserved_memory_as_used((memory_map_entry_t *) mboot->mmap_addr, mboot->mmap_length); - text_init("/Sayori/Fonts/UniCyrX-ibm-8x16.psf"); - - qemu_log("Initializing the virtual video memory manager..."); - init_vbe(mboot); + qemu_ok("PMM Ok!"); - clean_screen(); + vmm_init(); - qemu_log("Initalizing fonts..."); - tty_fontConfigurate(); + qemu_ok("VMM OK!"); - draw_vga_str("Initializing devices...", 23, 0, 0, 0xffffff); - punch(); + switch_qemu_logging(); - keyboardInit(); - mouse_install(); + kHandlerCMD((char *) mboot->cmdline); - ata_init(); - ac97_init(); + qemu_log("Registration of file system drivers..."); + fsm_reg("TARFS", 1, &fs_tarfs_read, &fs_tarfs_write, &fs_tarfs_info, &fs_tarfs_create, &fs_tarfs_delete, + &fs_tarfs_dir, &fs_tarfs_label, &fs_tarfs_detect); + fsm_reg("FAT32", 1, &fs_fat32_read, &fs_fat32_write, &fs_fat32_info, &fs_fat32_create, &fs_fat32_delete, + &fs_fat32_dir, &fs_fat32_label, &fs_fat32_detect); + fsm_reg("NatFS", 1, &fs_natfs_read, &fs_natfs_write, &fs_natfs_info, &fs_natfs_create, &fs_natfs_delete, + &fs_natfs_dir, &fs_natfs_label, &fs_natfs_detect); + fsm_reg("ISO9660", 1, &fs_iso9660_read, &fs_iso9660_write, &fs_iso9660_info, &fs_iso9660_create, &fs_iso9660_delete, + &fs_iso9660_dir, &fs_iso9660_label, &fs_iso9660_detect); - // TESTING ZONE - // Use this zone to enter early SayoriOS console. - - // while(1){} + fs_natfs_init(); + kModules_Init(); - // END TESTING ZONE + mtrr_init(); - cputemp_calibrate(); + text_init("R:\\Sayori\\Fonts\\UniCyrX-ibm-8x16.psf"); - bootScreenInit(7); - bootScreenLazy(true); + qemu_log("Initializing the virtual video memory manager..."); + init_vbe(mboot); - if (test_pcs){ - bootScreenPaint("Тестирование пищалки..."); - beeperInit(0); - } + qemu_log("Initializing Task Manager..."); + init_task_manager(); + clean_screen(); - bootScreenPaint("Настройка менеджера задач..."); - qemu_log("Registering a Task Manager..."); - init_task_manager(); + qemu_log("Initalizing fonts..."); + tty_fontConfigurate(); + + draw_vga_str("Initializing devices...", 23, 0, 0, 0xffffff); + punch(); + + keyboardInit(); + mouse_install(); + + ata_init(); + + cputemp_calibrate(); - bootScreenPaint("Настройка системных вызовов..."); - qemu_log("Registering System Calls..."); - init_syscalls(); + bootScreenInit(9); + bootScreenLazy(true); - kernel_start_time = getTicks(); + bootScreenPaint("Настройка системных вызовов..."); + qemu_log("Registering System Calls..."); + init_syscalls(); - bootScreenPaint("Настройка ENV..."); - qemu_log("Registering ENV..."); - confidEnv(); + kernel_start_time = getTicks(); - bootScreenPaint("Определение процессора..."); - detect_cpu(1); + bootScreenPaint("Настройка ENV..."); + qemu_log("Registering ENV..."); + configure_env(); + + bootScreenPaint("Определение процессора..."); + detect_cpu(1); bootScreenPaint("Конфигурация триггеров..."); triggersConfig(); + bootScreenPaint("Инициализация списка сетевых карт..."); netcards_list_init(); + + bootScreenPaint("Инициализация ARP..."); arp_init(); + bootScreenPaint("Инициализация RTL8139..."); rtl8139_init(); - drv_vbe_init(mboot); + bootScreenPaint("Инициализация DHCP..."); + dhcp_init_all_cards(); - bootScreenPaint("Готово..."); - bootScreenClose(0x000000,0xFFFFFF); - tty_set_bgcolor(COLOR_BG); + bootScreenPaint("Готово..."); + bootScreenClose(0x000000, 0xFFFFFF); + tty_set_bgcolor(COLOR_BG); - //tga_info("/Temp/wall1.tga"); tga_paint("/Temp/wall1.tga"); while(1){} + drv_vbe_init(mboot); - tty_printf("SayoriOS v%d.%d.%d\nДата компиляции: %s\n", - VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH, // Версия ядра - __TIMESTAMP__ // Время окончания компиляции ядра - ); - - tty_printf("\nВлюбиться можно в красоту, но полюбить - лишь только душу.\n(c) Уильям Шекспир\n"); - - if (__milla_getCode() != 0){ - tty_error("[ОШИБКА] [NatSuki] Не удалось выполнить инициализацию. Код ошибки: %d",__milla_getCode()); - } - - sayori_time_t time = get_time(); - - tty_printf("\nВремя: %d:%d:%d\n", time.hours, time.minutes, time.seconds); + tty_printf("SayoriOS v%d.%d.%d\nДата компиляции: %s\n", + VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH, // Версия ядра + __TIMESTAMP__ // Время окончания компиляции ядра + ); - // *((uint32_t*)0xa9aba894) = 12345; + tty_printf("\nВлюбиться можно в красоту, но полюбить - лишь только душу.\n(c) Уильям Шекспир\n"); - tty_taskInit(); - qemu_log("Initialized cursor animation..."); - - if (autoexec){ - // Данное условие сработает, если указан параметр ядра exec - FILE* elf_auto = fopen(cmd_autoexec, "r"); - if (ferror(elf_auto) != 0){ - qemu_log("Autorun: Программа `%s` не найдена.\n",cmd_autoexec); - } else { - run_elf_file(cmd_autoexec, 0, 0); - } - } + if (__milla_getCode() != 0) { + tty_error("[ОШИБКА] [NatSuki] Не удалось выполнить инициализацию. Код ошибки: %d", __milla_getCode()); + } + + sayori_time_t time = get_time(); - if(run_gui_at_startup) - parallel_desktop_start(); + tty_printf("\nВремя: %d:%d:%d\n", time.hours, time.minutes, time.seconds); _tty_printf("Listing ATA disks:\n"); ata_list(); - // ata_dma_init(); - // ata_dma_test(); + tty_taskInit(); - RSDPDescriptor* rsdp = rsdp_find(); + if (is_rsdp){ + RSDPDescriptor* rsdp = rsdp_find(); - find_facp(rsdp->RSDTaddress); + find_facp(rsdp->RSDTaddress); + find_apic(rsdp->RSDTaddress); + } - tty_printf("APIC disabled (Unstable)\n"); - // find_apic(rsdp->RSDTaddress); - - if (test_network){ + tty_printf("Processors: %d\n", system_processors_found); + + if (test_network) { _tty_printf("Listing network cards:\n"); - + uint8_t mac_buffer[6] = {0}; - - for(int i = 0; i < netcards_get_count(); i++) { - netcard_entry_t* entry = netcard_get(i); - + + for (int i = 0; i < netcards_get_count(); i++) { + netcard_entry_t *entry = netcard_get(i); + _tty_printf("\tName: %s\n", entry->name); entry->get_mac_addr(mac_buffer); - + _tty_printf("\tMAC address: %v:%v:%v:%v:%v:%v\n", mac_buffer[0], mac_buffer[1], @@ -454,88 +419,17 @@ int kernel(multiboot_header_t* mboot, uint32_t initial_esp){ mac_buffer[5] ); } - } - qemu_log("Kernel bootup time: %f seconds.", (double)(getTicks() - kernel_start_time) / getFrequency()); - // NETWORK TEST - - #if 0 - - netcard_entry_t* mycard = netcard_get(0); - - uint8_t destmac[6] = {0, 0, 0, 0, 0, 0}; - - tty_printf("Sending packet\n"); - tty_printf("Packet sent!\n"); - - ethernet_send_packet( - mycard, - destmac, - "ABRACADABRA", - 11, - 0 - ); - - #endif + qemu_log("Kernel bootup time: %f seconds.", (double) (getTicks() - kernel_start_time) / getFrequency()); + ata_dma_init(); + ac97_init(); + + ahci_init(); - // NETWORK TEST END + /// Обновим данные обо всех дисках + fsm_dpm_update(-1); - if (test_floppy){ - initFloppy(); - fatTest(); - _smfs_init(); - } + cli(); - tty_printf("Processors found: %d\n", system_processors_found); - // _mbr_info(); - - // ata_dma_init(); - // ata_dma_test(); - - ////////////////// - - // TODO: User mode! - - // scheduler_mode(false); - - // tty_printf("Starting v8086\n"); - // v8086_enable(); - // tty_printf("Enabled?\n"); - - - // Tried testing user mode - - // qemu_log("Start: %x", &USER_start); - // qemu_log("End: %x", &USER_end); -// - // map_pages( - // get_kernel_dir(), - // (virtual_addr_t) &USER_start, - // ALIGN((physaddr_t) &USER_end, PAGE_SIZE), - // 1, - // PAGE_USER | PAGE_WRITEABLE | PAGE_PRESENT - // ); -// - // qemu_log("Mapped"); -// - // scheduler_mode(false); -// - // size_t addr = alloc_phys_pages(16); - // map_pages( - // get_kernel_dir(), - // addr, - // addr, - // 16, - // PAGE_USER | PAGE_WRITEABLE | PAGE_PRESENT - // ); -// - // qemu_log("Stack: %x", addr); -// - // user_mode_switch(user_mode, addr + (16 * PAGE_SIZE)); -// - // qemu_printf("WHAT"); - - rust_main(); - shell(); return 0; } diff --git a/kernel/src/lib/base64.c b/kernel/src/lib/base64.c old mode 100755 new mode 100644 index 71c439c9e..8c98f98b4 --- a/kernel/src/lib/base64.c +++ b/kernel/src/lib/base64.c @@ -2,7 +2,7 @@ * @file lib/base64.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Base64 Encode/Decode - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ @@ -40,7 +40,7 @@ static const unsigned char decoding_table[256] = { /** * @brief Кодирует строку в Base64 * - * @param char* string - Строка для кодирования + * @param string - Строка для кодирования * * @return char* - Возращает закодированую строку */ @@ -75,7 +75,7 @@ uint8_t* b64e(const char *string){ /** * @brief Декодирует строку Base64 * - * @param char* string - Строка для декодирования + * @param string - Строка для декодирования * * @return char* - Возращает декодированую строку */ diff --git a/kernel/src/lib/dan.c b/kernel/src/lib/dan.c deleted file mode 100644 index 65c1d5b67..000000000 --- a/kernel/src/lib/dan.c +++ /dev/null @@ -1,52 +0,0 @@ -#include "lib/dan.h" - -DANDescriptor_t* alloc_dan(const char* filename, bool stream) { - FILE* file = fopen(filename, "rb"); - if(!file) - return 0; - - fseek(file, 0, SEEK_END); - - uint32_t filesize = ftell(file); - fseek(file, 0, SEEK_SET); - - DANDescriptor_t* desc = (DANDescriptor_t*)kcalloc(1, sizeof(DANDescriptor_t)); - - fseek(file, 0, SEEK_SET); - fread(file, 1, sizeof(DANHeader_t), &desc->header); - - if(memcmp((char*)desc->header.magic, "DAN", 3) != 0) { - kfree(desc); - fclose(file); - - return 0; - } - - if(!stream) { - desc->data = (char*)kcalloc(1, filesize - sizeof(DANHeader_t)); - fread(file, filesize - sizeof(DANHeader_t), 1, desc->data); - } - - desc->stream = stream; - desc->framesize = desc->header.width * desc->header.height * (desc->header.alpha?4:3); - desc->fd = file; - - return desc; -} - -void read_frame_dan(DANDescriptor_t* dan, size_t index, char* out) { - if(index >= dan->header.frame_count) - return; - - if(dan->stream) { - fseek(dan->fd, (ssize_t)sizeof(DANHeader_t) + (ssize_t)(index * dan->framesize), SEEK_SET); - fread(dan->fd, 1, dan->framesize, out); - } else { - memcpy(out, dan->data + (index * dan->framesize), dan->framesize); - } -} - -void free_dan(DANDescriptor_t* dan) { - kfree(dan->data); - kfree(dan); -} \ No newline at end of file diff --git a/kernel/src/lib/duk_config.h b/kernel/src/lib/duk_config.h new file mode 100644 index 000000000..586dbfb1c --- /dev/null +++ b/kernel/src/lib/duk_config.h @@ -0,0 +1,3778 @@ +/* + * duk_config.h configuration header generated by genconfig.py. + * + * Git commit: 03d4d728f8365021de6955c649e6dcd05dcca99f + * Git describe: 03d4d72-dirty + * Git branch: HEAD + * + * Supported platforms: + * - Mac OSX, iPhone, Darwin + * - Orbis + * - OpenBSD + * - Generic BSD + * - Atari ST TOS + * - AmigaOS + * - Durango (XboxOne) + * - Windows + * - Flashplayer (Crossbridge) + * - QNX + * - TI-Nspire + * - Emscripten + * - Android + * - Linux + * - Solaris + * - AIX + * - HPUX + * - Generic POSIX + * - Cygwin + * - Generic UNIX + * - Generic fallback + * + * Supported architectures: + * - x86 + * - x64 + * - x32 + * - ARM 32-bit + * - ARM 64-bit + * - MIPS 32-bit + * - MIPS 64-bit + * - PowerPC 32-bit + * - PowerPC 64-bit + * - SPARC 32-bit + * - SPARC 64-bit + * - RISC-V 32-bit + * - RISC-V 64-bit + * - SuperH + * - Motorola 68k + * - Emscripten + * - Generic + * + * Supported compilers: + * - Clang + * - GCC + * - MSVC + * - Emscripten + * - TinyC + * - VBCC + * - Bruce's C compiler + * - Generic + * + */ + +#if !defined(DUK_CONFIG_H_INCLUDED) +#define DUK_CONFIG_H_INCLUDED + +#include + +/* + * Intermediate helper defines + */ + +/* DLL build detection */ +/* not configured for DLL build */ +#undef DUK_F_DLL_BUILD + +/* Apple OSX, iOS */ +#if defined(__APPLE__) +#define DUK_F_APPLE +#endif + +/* FreeBSD */ +#if defined(__FreeBSD__) || defined(__FreeBSD) +#define DUK_F_FREEBSD +#endif + +/* Orbis (PS4) variant */ +#if defined(DUK_F_FREEBSD) && defined(__ORBIS__) +#define DUK_F_ORBIS +#endif + +/* OpenBSD */ +#if defined(__OpenBSD__) || defined(__OpenBSD) +#define DUK_F_OPENBSD +#endif + +/* NetBSD */ +#if defined(__NetBSD__) || defined(__NetBSD) +#define DUK_F_NETBSD +#endif + +/* BSD variant */ +#if defined(DUK_F_FREEBSD) || defined(DUK_F_NETBSD) || defined(DUK_F_OPENBSD) || \ + defined(__bsdi__) || defined(__DragonFly__) +#define DUK_F_BSD +#endif + +/* Atari ST TOS. __TOS__ defined by PureC. No platform define in VBCC + * apparently, so to use with VBCC user must define __TOS__ manually. + */ +#if defined(__TOS__) +#define DUK_F_TOS +#endif + +/* Motorola 68K. Not defined by VBCC, so user must define one of these + * manually when using VBCC. + */ +#if defined(__m68k__) || defined(M68000) || defined(__MC68K__) +#define DUK_F_M68K +#endif + +/* AmigaOS. Neither AMIGA nor __amigaos__ is defined on VBCC, so user must + * define 'AMIGA' manually when using VBCC. + */ +#if defined(AMIGA) || defined(__amigaos__) +#define DUK_F_AMIGAOS +#endif + +/* PowerPC */ +#if defined(__powerpc) || defined(__powerpc__) || defined(__PPC__) +#define DUK_F_PPC +#if defined(__PPC64__) || defined(__LP64__) || defined(_LP64) +#define DUK_F_PPC64 +#else +#define DUK_F_PPC32 +#endif +#endif + +/* Durango (Xbox One) */ +#if defined(_DURANGO) || defined(_XBOX_ONE) +#define DUK_F_DURANGO +#endif + +/* Windows, both 32-bit and 64-bit */ +#if defined(_WIN32) || defined(WIN32) || defined(_WIN64) || defined(WIN64) || \ + defined(__WIN32__) || defined(__TOS_WIN__) || defined(__WINDOWS__) +#define DUK_F_WINDOWS +#if defined(_WIN64) || defined(WIN64) +#define DUK_F_WIN64 +#else +#define DUK_F_WIN32 +#endif +#endif + +/* Flash player (e.g. Crossbridge) */ +#if defined(__FLASHPLAYER__) +#define DUK_F_FLASHPLAYER +#endif + +/* QNX */ +#if defined(__QNX__) +#define DUK_F_QNX +#endif + +/* TI-Nspire (using Ndless) */ +#if defined(_TINSPIRE) +#define DUK_F_TINSPIRE +#endif + +/* Emscripten (provided explicitly by user), improve if possible */ +#if defined(EMSCRIPTEN) +#define DUK_F_EMSCRIPTEN +#endif + +/* BCC (Bruce's C compiler): this is a "torture target" for compilation */ +#if defined(__BCC__) || defined(__BCC_VERSION__) +#define DUK_F_BCC +#endif + +#if defined(ANDROID) || defined(__ANDROID__) +#define DUK_F_ANDROID +#endif + +/* Linux */ +#if defined(__linux) || defined(__linux__) || defined(linux) +#define DUK_F_LINUX +#endif + +/* illumos / Solaris */ +#if defined(__sun) && defined(__SVR4) +#define DUK_F_SUN +#if defined(__SUNPRO_C) && (__SUNPRO_C < 0x550) +#define DUK_F_OLD_SOLARIS +/* Defines _ILP32 / _LP64 required by DUK_F_X86/DUK_F_X64. Platforms + * are processed before architectures, so this happens before the + * DUK_F_X86/DUK_F_X64 detection is emitted. + */ +#include +#endif +#endif + +/* AIX */ +#if defined(_AIX) +/* defined(__xlc__) || defined(__IBMC__): works but too wide */ +#define DUK_F_AIX +#endif + +/* HPUX */ +#if defined(__hpux) +#define DUK_F_HPUX +#if defined(__ia64) +#define DUK_F_HPUX_ITANIUM +#endif +#endif + +/* POSIX */ +#if defined(__posix) +#define DUK_F_POSIX +#endif + +/* Cygwin */ +#if defined(__CYGWIN__) +#define DUK_F_CYGWIN +#endif + +/* Generic Unix (includes Cygwin) */ +#if defined(__unix) || defined(__unix__) || defined(unix) || \ + defined(DUK_F_LINUX) || defined(DUK_F_BSD) +#define DUK_F_UNIX +#endif + +/* Intel x86 (32-bit), x64 (64-bit) or x32 (64-bit but 32-bit pointers), + * define only one of DUK_F_X86, DUK_F_X64, DUK_F_X32. + * https://sites.google.com/site/x32abi/ + * + * With DUK_F_OLD_SOLARIS the header must be included + * before this. + */ +#if defined(__amd64__) || defined(__amd64) || \ + defined(__x86_64__) || defined(__x86_64) || \ + defined(_M_X64) || defined(_M_AMD64) +#if defined(__ILP32__) || defined(_ILP32) +#define DUK_F_X32 +#else +#define DUK_F_X64 +#endif +#elif defined(i386) || defined(__i386) || defined(__i386__) || \ + defined(__i486__) || defined(__i586__) || defined(__i686__) || \ + defined(__IA32__) || defined(_M_IX86) || defined(__X86__) || \ + defined(_X86_) || defined(__THW_INTEL__) || defined(__I86__) +#if defined(__LP64__) || defined(_LP64) +/* This should not really happen, but would indicate x64. */ +#define DUK_F_X64 +#else +#define DUK_F_X86 +#endif +#endif + +/* ARM */ +#if defined(__arm__) || defined(__thumb__) || defined(_ARM) || defined(_M_ARM) || defined(_M_ARM64) || defined(__aarch64__) +#define DUK_F_ARM +#if defined(__LP64__) || defined(_LP64) || defined(__arm64) || defined(__arm64__) || defined(_M_ARM64) || defined(__aarch64__) +#define DUK_F_ARM64 +#else +#define DUK_F_ARM32 +#endif +#endif + +/* MIPS. Related defines: __MIPSEB__, __MIPSEL__, __mips_isa_rev, __LP64__ */ +#if defined(__mips__) || defined(mips) || defined(_MIPS_ISA) || \ + defined(_R3000) || defined(_R4000) || defined(_R5900) || \ + defined(_MIPS_ISA_MIPS1) || defined(_MIPS_ISA_MIPS2) || \ + defined(_MIPS_ISA_MIPS3) || defined(_MIPS_ISA_MIPS4) || \ + defined(__mips) || defined(__MIPS__) +#define DUK_F_MIPS +#if defined(__LP64__) || defined(_LP64) || defined(__mips64) || \ + defined(__mips64__) || defined(__mips_n64) +#define DUK_F_MIPS64 +#else +#define DUK_F_MIPS32 +#endif +#endif + +/* SPARC */ +#if defined(sparc) || defined(__sparc) || defined(__sparc__) +#define DUK_F_SPARC +#if defined(__LP64__) || defined(_LP64) +#define DUK_F_SPARC64 +#else +#define DUK_F_SPARC32 +#endif +#endif + +/* RISC-V, https://github.com/riscv/riscv-toolchain-conventions#cc-preprocessor-definitions */ +#if defined(__riscv) +#define DUK_F_RISCV +#if defined(__riscv_xlen) +#if (__riscv_xlen == 32) +#define DUK_F_RISCV32 +#elif (__riscv_xlen == 64) +#define DUK_F_RISCV64 +#else +#error __riscv_xlen has unsupported value (not 32 or 64) +#endif +#else +#error __riscv defined without __riscv_xlen +#endif +#endif /* __riscv */ + +/* SuperH */ +#if defined(__sh__) || \ + defined(__sh1__) || defined(__SH1__) || \ + defined(__sh2__) || defined(__SH2__) || \ + defined(__sh3__) || defined(__SH3__) || \ + defined(__sh4__) || defined(__SH4__) || \ + defined(__sh5__) || defined(__SH5__) +#define DUK_F_SUPERH +#endif + +/* Clang */ +#if defined(__clang__) +#define DUK_F_CLANG +#endif + +/* C++ */ +#undef DUK_F_CPP +#if defined(__cplusplus) +#define DUK_F_CPP +#endif + +/* C99 or above */ +#undef DUK_F_C99 +#if defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L) +#define DUK_F_C99 +#endif + +/* C++11 or above */ +#undef DUK_F_CPP11 +#if defined(__cplusplus) && (__cplusplus >= 201103L) +#define DUK_F_CPP11 +#endif + +/* GCC. Clang also defines __GNUC__ so don't detect GCC if using Clang. */ +#if defined(__GNUC__) && !defined(__clang__) && !defined(DUK_F_CLANG) +#define DUK_F_GCC +#if defined(__GNUC__) && defined(__GNUC_MINOR__) && defined(__GNUC_PATCHLEVEL__) +/* Convenience, e.g. gcc 4.5.1 == 40501; http://stackoverflow.com/questions/6031819/emulating-gccs-builtin-unreachable */ +#define DUK_F_GCC_VERSION (__GNUC__ * 10000L + __GNUC_MINOR__ * 100L + __GNUC_PATCHLEVEL__) +#else +#error cannot figure out gcc version +#endif +#endif + +/* MinGW. Also GCC flags (DUK_F_GCC) are enabled now. */ +#if defined(__MINGW32__) || defined(__MINGW64__) +#define DUK_F_MINGW +#endif + +/* MSVC */ +#if defined(_MSC_VER) +/* MSVC preprocessor defines: http://msdn.microsoft.com/en-us/library/b0084kay.aspx + * _MSC_FULL_VER includes the build number, but it has at least two formats, see e.g. + * BOOST_MSVC_FULL_VER in http://www.boost.org/doc/libs/1_52_0/boost/config/compiler/visualc.hpp + */ +#define DUK_F_MSVC +#if defined(_MSC_FULL_VER) +#if (_MSC_FULL_VER > 100000000) +#define DUK_F_MSVC_FULL_VER _MSC_FULL_VER +#else +#define DUK_F_MSCV_FULL_VER (_MSC_FULL_VER * 10) +#endif +#endif +#endif /* _MSC_VER */ + +/* TinyC */ +#if defined(__TINYC__) +/* http://bellard.org/tcc/tcc-doc.html#SEC9 */ +#define DUK_F_TINYC +#endif + +/* VBCC */ +#if defined(__VBCC__) +#define DUK_F_VBCC +#endif + +/* Atari Mint */ +#if defined(__MINT__) +#define DUK_F_MINT +#endif + +/* + * Platform autodetection + */ + +/* Workaround for older C++ compilers before including , + * see e.g.: https://sourceware.org/bugzilla/show_bug.cgi?id=15366 + */ +#if defined(__cplusplus) && !defined(__STDC_LIMIT_MACROS) +#define __STDC_LIMIT_MACROS +#endif +#if defined(__cplusplus) && !defined(__STDC_CONSTANT_MACROS) +#define __STDC_CONSTANT_MACROS +#endif + +#if defined(DUK_F_APPLE) +/* --- Mac OSX, iPhone, Darwin --- */ +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include +#include +#include + +/* http://stackoverflow.com/questions/5919996/how-to-detect-reliably-mac-os-x-ios-linux-windows-in-c-preprocessor */ +#if TARGET_IPHONE_SIMULATOR +#define DUK_USE_OS_STRING "iphone-sim" +#elif TARGET_OS_IPHONE +#define DUK_USE_OS_STRING "iphone" +#elif TARGET_OS_MAC +#define DUK_USE_OS_STRING "osx" +#else +#define DUK_USE_OS_STRING "osx-unknown" +#endif + +/* Use _setjmp() on Apple by default, see GH-55. */ +#define DUK_JMPBUF_TYPE jmp_buf +#define DUK_SETJMP(jb) _setjmp((jb)) +#define DUK_LONGJMP(jb) _longjmp((jb), 1) +#elif defined(DUK_F_ORBIS) +/* --- Orbis --- */ +/* Orbis = PS4 */ +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_S +/* no parsing (not an error) */ +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include +#include +#include + +#define DUK_USE_OS_STRING "orbis" +#elif defined(DUK_F_OPENBSD) +/* --- OpenBSD --- */ +/* http://www.monkey.org/openbsd/archive/ports/0401/msg00089.html */ +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include +#include +#include + +#define DUK_USE_OS_STRING "openbsd" +#elif defined(DUK_F_BSD) +/* --- Generic BSD --- */ +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include +#include +#include + +#define DUK_USE_OS_STRING "bsd" +#elif defined(DUK_F_TOS) +/* --- Atari ST TOS --- */ +#define DUK_USE_DATE_NOW_TIME +#define DUK_USE_DATE_TZO_GMTIME +/* no parsing (not an error) */ +#define DUK_USE_DATE_FMT_STRFTIME +#include + +#define DUK_USE_OS_STRING "tos" + +/* TOS on M68K is always big endian. */ +#if !defined(DUK_USE_BYTEORDER) && defined(DUK_F_M68K) +#define DUK_USE_BYTEORDER 3 +#endif +#elif defined(DUK_F_AMIGAOS) +/* --- AmigaOS --- */ +#if defined(DUK_F_M68K) +/* AmigaOS on M68k */ +#define DUK_USE_DATE_NOW_TIME +#define DUK_USE_DATE_TZO_GMTIME +/* no parsing (not an error) */ +#define DUK_USE_DATE_FMT_STRFTIME +#include +#elif defined(DUK_F_PPC) +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#if !defined(UINTPTR_MAX) +#define UINTPTR_MAX UINT_MAX +#endif +#else +#error AmigaOS but not M68K/PPC, not supported now +#endif + +#define DUK_USE_OS_STRING "amigaos" + +/* AmigaOS on M68K or PPC is always big endian. */ +#if !defined(DUK_USE_BYTEORDER) && (defined(DUK_F_M68K) || defined(DUK_F_PPC)) +#define DUK_USE_BYTEORDER 3 +#endif +#elif defined(DUK_F_DURANGO) +/* --- Durango (XboxOne) --- */ +/* Durango = XboxOne + * Configuration is nearly identical to Windows, except for + * DUK_USE_DATE_TZO_WINDOWS. + */ + +/* Initial fix: disable secure CRT related warnings when compiling Duktape + * itself (must be defined before including Windows headers). Don't define + * for user code including duktape.h. + */ +#if defined(DUK_COMPILING_DUKTAPE) && !defined(_CRT_SECURE_NO_WARNINGS) +#define _CRT_SECURE_NO_WARNINGS +#endif + +/* MSVC does not have sys/param.h */ +#define DUK_USE_DATE_NOW_WINDOWS +#define DUK_USE_DATE_TZO_WINDOWS_NO_DST +/* Note: PRS and FMT are intentionally left undefined for now. This means + * there is no platform specific date parsing/formatting but there is still + * the ISO 8601 standard format. + */ +#if defined(DUK_COMPILING_DUKTAPE) +/* Only include when compiling Duktape to avoid polluting application build + * with a lot of unnecessary defines. + */ +#include +#endif + +#define DUK_USE_OS_STRING "durango" + +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 1 +#endif +#elif defined(DUK_F_WINDOWS) +/* --- Windows --- */ +/* Windows version can't obviously be determined at compile time, + * but _WIN32_WINNT indicates the minimum version targeted: + * - https://msdn.microsoft.com/en-us/library/6sehtctf.aspx + */ + +/* Initial fix: disable secure CRT related warnings when compiling Duktape + * itself (must be defined before including Windows headers). Don't define + * for user code including duktape.h. + */ +#if defined(DUK_COMPILING_DUKTAPE) && !defined(_CRT_SECURE_NO_WARNINGS) +#define _CRT_SECURE_NO_WARNINGS +#endif + +/* Windows 32-bit and 64-bit are currently the same. */ +/* MSVC does not have sys/param.h */ + +#if defined(DUK_COMPILING_DUKTAPE) +/* Only include when compiling Duktape to avoid polluting application build + * with a lot of unnecessary defines. + */ +#include +#endif + +/* GetSystemTimePreciseAsFileTime() available from Windows 8: + * https://msdn.microsoft.com/en-us/library/windows/desktop/hh706895(v=vs.85).aspx + */ +#if defined(DUK_USE_DATE_NOW_WINDOWS_SUBMS) || defined(DUK_USE_DATE_NOW_WINDOWS) +/* User forced provider. */ +#else +#if defined(_WIN32_WINNT) && (_WIN32_WINNT >= 0x0602) +#define DUK_USE_DATE_NOW_WINDOWS_SUBMS +#else +#define DUK_USE_DATE_NOW_WINDOWS +#endif +#endif + +#define DUK_USE_DATE_TZO_WINDOWS + +/* Note: PRS and FMT are intentionally left undefined for now. This means + * there is no platform specific date parsing/formatting but there is still + * the ISO 8601 standard format. + */ + +/* QueryPerformanceCounter() may go backwards in Windows XP, so enable for + * Vista and later: https://msdn.microsoft.com/en-us/library/windows/desktop/dn553408(v=vs.85).aspx#qpc_support_in_windows_versions + */ +#if !defined(DUK_USE_GET_MONOTONIC_TIME_WINDOWS_QPC) && \ + defined(_WIN32_WINNT) && (_WIN32_WINNT >= 0x0600) +#define DUK_USE_GET_MONOTONIC_TIME_WINDOWS_QPC +#endif + +#define DUK_USE_OS_STRING "windows" + +/* On Windows, assume we're little endian. Even Itanium which has a + * configurable endianness runs little endian in Windows. + */ +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 1 +#endif +#elif defined(DUK_F_FLASHPLAYER) +/* --- Flashplayer (Crossbridge) --- */ +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include +#include + +#define DUK_USE_OS_STRING "flashplayer" + +#if !defined(DUK_USE_BYTEORDER) && defined(DUK_F_FLASHPLAYER) +#define DUK_USE_BYTEORDER 1 +#endif +#elif defined(DUK_F_QNX) +/* --- QNX --- */ +#if defined(DUK_F_QNX) && defined(DUK_COMPILING_DUKTAPE) +/* See: /opt/qnx650/target/qnx6/usr/include/sys/platform.h */ +#define _XOPEN_SOURCE 600 +#define _POSIX_C_SOURCE 200112L +#endif + +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include +#include + +#define DUK_USE_OS_STRING "qnx" +#elif defined(DUK_F_TINSPIRE) +/* --- TI-Nspire --- */ +#if defined(DUK_COMPILING_DUKTAPE) && !defined(_XOPEN_SOURCE) +#define _XOPEN_SOURCE /* e.g. strptime */ +#endif + +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include +#include + +#define DUK_USE_OS_STRING "tinspire" +#elif defined(DUK_F_EMSCRIPTEN) +/* --- Emscripten --- */ +#if defined(DUK_COMPILING_DUKTAPE) +#if !defined(_POSIX_C_SOURCE) +#define _POSIX_C_SOURCE 200809L +#endif +#if !defined(_GNU_SOURCE) +#define _GNU_SOURCE /* e.g. getdate_r */ +#endif +#if !defined(_XOPEN_SOURCE) +#define _XOPEN_SOURCE /* e.g. strptime */ +#endif +#endif /* DUK_COMPILING_DUKTAPE */ + +#include +#if defined(DUK_F_BCC) +/* no endian.h */ +#else +#include +#endif /* DUK_F_BCC */ +#include +#include +#include +#include + +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME + +#define DUK_USE_OS_STRING "emscripten" +#elif defined(DUK_F_ANDROID) +/* --- Android --- */ +#if defined(DUK_COMPILING_DUKTAPE) +#if !defined(_POSIX_C_SOURCE) +#define _POSIX_C_SOURCE 200809L +#endif +#if !defined(_GNU_SOURCE) +#define _GNU_SOURCE /* e.g. getdate_r */ +#endif +#if !defined(_XOPEN_SOURCE) +#define _XOPEN_SOURCE /* e.g. strptime */ +#endif +#endif /* DUK_COMPILING_DUKTAPE */ + +#include +#if defined(DUK_F_BCC) +/* no endian.h or stdint.h */ +#else +#include +#include +#endif /* DUK_F_BCC */ +#include +#include +#include + +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME + +#if 0 /* XXX: safe condition? */ +#define DUK_USE_GET_MONOTONIC_TIME_CLOCK_GETTIME +#endif + +#define DUK_USE_OS_STRING "android" +#elif defined(DUK_F_LINUX) +/* --- Linux --- */ +#if defined(DUK_COMPILING_DUKTAPE) +#if !defined(_POSIX_C_SOURCE) +#define _POSIX_C_SOURCE 200809L +#endif +#if !defined(_GNU_SOURCE) +#define _GNU_SOURCE /* e.g. getdate_r */ +#endif +#if !defined(_XOPEN_SOURCE) +#define _XOPEN_SOURCE /* e.g. strptime */ +#endif +#endif /* DUK_COMPILING_DUKTAPE */ + +#include +#if defined(DUK_F_BCC) +/* no endian.h or stdint.h */ +#else +#include +#include +#endif /* DUK_F_BCC */ +#include +#include +#include + +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME + +#if 0 /* XXX: safe condition? */ +#define DUK_USE_GET_MONOTONIC_TIME_CLOCK_GETTIME +#endif + +#define DUK_USE_OS_STRING "linux" +#elif defined(DUK_F_SUN) +/* --- Solaris --- */ +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME + +#include +#if defined(DUK_F_OLD_SOLARIS) +/* Old Solaris with no endian.h, stdint.h */ +#define DUK_F_NO_STDINT_H +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 3 +#endif +#else /* DUK_F_OLD_SOLARIS */ +#include +#endif /* DUK_F_OLD_SOLARIS */ + +#include +#include +#include + +#define DUK_USE_OS_STRING "solaris" +#elif defined(DUK_F_AIX) +/* --- AIX --- */ +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 3 +#endif +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include + +#define DUK_USE_OS_STRING "aix" +#elif defined(DUK_F_HPUX) +/* --- HPUX --- */ +#define DUK_F_NO_STDINT_H +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 3 +#endif +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include + +#define DUK_USE_OS_STRING "hpux" +#elif defined(DUK_F_POSIX) +/* --- Generic POSIX --- */ +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include +#include +#include + +#define DUK_USE_OS_STRING "posix" +#elif defined(DUK_F_CYGWIN) +/* --- Cygwin --- */ +/* don't use strptime() for now */ +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#include +#include +#include + +#define DUK_JMPBUF_TYPE jmp_buf +#define DUK_SETJMP(jb) _setjmp((jb)) +#define DUK_LONGJMP(jb) _longjmp((jb), 1) + +#define DUK_USE_OS_STRING "windows" +#elif defined(DUK_F_UNIX) +/* --- Generic UNIX --- */ +#define DUK_USE_DATE_NOW_GETTIMEOFDAY +#define DUK_USE_DATE_TZO_GMTIME_R +#define DUK_USE_DATE_PRS_STRPTIME +#define DUK_USE_DATE_FMT_STRFTIME +#include +#include +#define DUK_USE_OS_STRING "unknown" +#else +/* --- Generic fallback --- */ +/* The most portable current time provider is time(), but it only has a + * one second resolution. + */ +#define DUK_USE_DATE_NOW_TIME + +/* The most portable way to figure out local time offset is gmtime(), + * but it's not thread safe so use with caution. + */ +#define DUK_USE_DATE_TZO_GMTIME + +/* Avoid custom date parsing and formatting for portability. */ +#undef DUK_USE_DATE_PRS_STRPTIME +#undef DUK_USE_DATE_FMT_STRFTIME + +#define DUK_USE_OS_STRING "unknown" +#endif /* autodetect platform */ + +/* Shared includes: C89 */ +#include +#include +#include +#include /* varargs */ +#include +#include /* e.g. ptrdiff_t */ +#include +// #include + +/* date.h is omitted, and included per platform */ + +/* Shared includes: stdint.h is C99 */ +#if defined(DUK_F_NO_STDINT_H) +/* stdint.h not available */ +#else +/* Technically C99 (C++11) but found in many systems. On some systems + * __STDC_LIMIT_MACROS and __STDC_CONSTANT_MACROS must be defined before + * including stdint.h (see above). + */ +#include "common.h" +#endif + +/* is only included if needed, based on DUK_USE_xxx flags. */ + +/* + * Architecture autodetection + */ + +#if defined(DUK_F_X86) +/* --- x86 --- */ +#define DUK_USE_ARCH_STRING "x86" +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 1 +#endif + +#define DUK_USE_PACKED_TVAL + +/* FreeBSD, -m32, and clang prior to 5.0 has union aliasing issues which + * break duk_tval copying. Disable packed duk_tval automatically. + */ +#if defined(DUK_F_FREEBSD) && defined(DUK_F_X86) && \ + defined(__clang__) && defined(__clang_major__) && (__clang_major__ < 5) +#undef DUK_USE_PACKED_TVAL +#endif +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_X64) +/* --- x64 --- */ +#define DUK_USE_ARCH_STRING "x64" +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 1 +#endif +#undef DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_X32) +/* --- x32 --- */ +#define DUK_USE_ARCH_STRING "x32" +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 1 +#endif +#define DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_ARM32) +/* --- ARM 32-bit --- */ +#define DUK_USE_ARCH_STRING "arm32" +/* Byte order varies, so rely on autodetect. */ +#define DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_ARM64) +/* --- ARM 64-bit --- */ +#define DUK_USE_ARCH_STRING "arm64" +/* Byte order varies, so rely on autodetect. */ +#undef DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_MIPS32) +/* --- MIPS 32-bit --- */ +#define DUK_USE_ARCH_STRING "mips32" +/* MIPS byte order varies so rely on autodetection. */ +#define DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_MIPS64) +/* --- MIPS 64-bit --- */ +#define DUK_USE_ARCH_STRING "mips64" +/* MIPS byte order varies so rely on autodetection. */ +#undef DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_PPC32) +/* --- PowerPC 32-bit --- */ +#define DUK_USE_ARCH_STRING "ppc32" +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 3 +#endif +#define DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_PPC64) +/* --- PowerPC 64-bit --- */ +#define DUK_USE_ARCH_STRING "ppc64" +/* No forced byteorder (both little and big endian are possible). */ +#undef DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_SPARC32) +/* --- SPARC 32-bit --- */ +#define DUK_USE_ARCH_STRING "sparc32" +/* SPARC byte order varies so rely on autodetection. */ +#define DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_SPARC64) +/* --- SPARC 64-bit --- */ +#define DUK_USE_ARCH_STRING "sparc64" +/* SPARC byte order varies so rely on autodetection. */ +#undef DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_RISCV32) +/* --- RISC-V 32-bit --- */ +#define DUK_USE_ARCH_STRING "riscv32" +#define DUK_USE_BYTEORDER 1 +#define DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_RISCV64) +/* --- RISC-V 64-bit --- */ +#define DUK_USE_ARCH_STRING "riscv64" +#define DUK_USE_BYTEORDER 1 +#undef DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_SUPERH) +/* --- SuperH --- */ +#define DUK_USE_ARCH_STRING "sh" +/* Byte order varies, rely on autodetection. */ +#define DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_M68K) +/* --- Motorola 68k --- */ +#define DUK_USE_ARCH_STRING "m68k" +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 3 +#endif +#define DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#elif defined(DUK_F_EMSCRIPTEN) +/* --- Emscripten --- */ +#define DUK_USE_ARCH_STRING "emscripten" +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 1 +#endif +#undef DUK_USE_PACKED_TVAL +#define DUK_F_PACKED_TVAL_PROVIDED +#else +/* --- Generic --- */ +/* These are necessary wild guesses. */ +#define DUK_USE_ARCH_STRING "generic" +/* Rely on autodetection for byte order, alignment, and packed tval. */ +#endif /* autodetect architecture */ + +/* + * Compiler autodetection + */ + +#if defined(DUK_F_CLANG) +/* --- Clang --- */ +#if defined(DUK_F_C99) || defined(DUK_F_CPP11) +/* C99 / C++11 and above: rely on va_copy() which is required. */ +#define DUK_VA_COPY(dest,src) va_copy(dest,src) +#else +/* Clang: assume we have __va_copy() in non-C99 mode. */ +#define DUK_VA_COPY(dest,src) __va_copy(dest,src) +#endif + +#define DUK_NORETURN(decl) decl __attribute__((noreturn)) + +#if defined(__clang__) && defined(__has_builtin) +#if __has_builtin(__builtin_unreachable) +#define DUK_UNREACHABLE() do { __builtin_unreachable(); } while (0) +#endif +#endif + +#define DUK_USE_BRANCH_HINTS +#define DUK_LIKELY(x) __builtin_expect((x), 1) +#define DUK_UNLIKELY(x) __builtin_expect((x), 0) +#if defined(__clang__) && defined(__has_builtin) +#if __has_builtin(__builtin_unpredictable) +#define DUK_UNPREDICTABLE(x) __builtin_unpredictable((x)) +#endif +#endif + +#if defined(DUK_F_C99) || defined(DUK_F_CPP11) +#define DUK_NOINLINE __attribute__((noinline)) +#define DUK_INLINE inline +#define DUK_ALWAYS_INLINE inline __attribute__((always_inline)) +#endif + +/* DUK_HOT */ +/* DUK_COLD */ + +#if defined(DUK_F_DLL_BUILD) && defined(DUK_F_WINDOWS) +/* MSVC dllexport/dllimport: appropriate __declspec depends on whether we're + * compiling Duktape or the application. + */ +#if defined(DUK_COMPILING_DUKTAPE) +#define DUK_EXTERNAL_DECL extern __declspec(dllexport) +#define DUK_EXTERNAL __declspec(dllexport) +#else +#define DUK_EXTERNAL_DECL extern __declspec(dllimport) +#define DUK_EXTERNAL should_not_happen +#endif +#if defined(DUK_SINGLE_FILE) +#define DUK_INTERNAL_DECL static +#define DUK_INTERNAL static +#else +#define DUK_INTERNAL_DECL extern +#define DUK_INTERNAL /*empty*/ +#endif +#define DUK_LOCAL_DECL static +#define DUK_LOCAL static +#else +#define DUK_EXTERNAL_DECL __attribute__ ((visibility("default"))) extern +#define DUK_EXTERNAL __attribute__ ((visibility("default"))) +#if defined(DUK_SINGLE_FILE) +#if (defined(DUK_F_GCC_VERSION) && DUK_F_GCC_VERSION >= 30101) || defined(DUK_F_CLANG) +/* Minimize warnings for unused internal functions with GCC >= 3.1.1 and + * Clang. Based on documentation it should suffice to have the attribute + * in the declaration only, but in practice some warnings are generated unless + * the attribute is also applied to the definition. + */ +#define DUK_INTERNAL_DECL static __attribute__ ((unused)) +#define DUK_INTERNAL static __attribute__ ((unused)) +#else +#define DUK_INTERNAL_DECL static +#define DUK_INTERNAL static +#endif +#else +#if (defined(DUK_F_GCC_VERSION) && DUK_F_GCC_VERSION >= 30101) || defined(DUK_F_CLANG) +#define DUK_INTERNAL_DECL __attribute__ ((visibility("hidden"))) __attribute__ ((unused)) extern +#define DUK_INTERNAL __attribute__ ((visibility("hidden"))) __attribute__ ((unused)) +#else +#define DUK_INTERNAL_DECL __attribute__ ((visibility("hidden"))) extern +#define DUK_INTERNAL __attribute__ ((visibility("hidden"))) +#endif +#endif +#define DUK_LOCAL_DECL static +#define DUK_LOCAL static +#endif + +#if defined(DUK_F_CPP) +#define DUK_USE_COMPILER_STRING "clang" +#else +#define DUK_USE_COMPILER_STRING "clang" +#endif + +#undef DUK_USE_VARIADIC_MACROS +#if defined(DUK_F_C99) || defined(DUK_F_CPP11) +#define DUK_USE_VARIADIC_MACROS +#endif + +#define DUK_USE_UNION_INITIALIZERS + +#undef DUK_USE_FLEX_C99 +#undef DUK_USE_FLEX_ZEROSIZE +#undef DUK_USE_FLEX_ONESIZE +#if defined(DUK_F_C99) +#define DUK_USE_FLEX_C99 +#else +#define DUK_USE_FLEX_ZEROSIZE +#endif + +#define DUK_USE_CLANG_PRAGMAS +#define DUK_USE_PACK_CLANG_ATTR + +#if defined(__clang__) && defined(__has_builtin) +#if __has_builtin(__builtin_bswap64) +#define DUK_BSWAP64(x) ((duk_uint64_t) __builtin_bswap64((duk_uint64_t) (x))) +#endif +#if __has_builtin(__builtin_bswap32) +#define DUK_BSWAP32(x) ((duk_uint32_t) __builtin_bswap32((duk_uint32_t) (x))) +#endif +#if __has_builtin(__builtin_bswap16) +#define DUK_BSWAP16(x) ((duk_uint16_t) __builtin_bswap16((duk_uint16_t) (x))) +#endif +#endif +#elif defined(DUK_F_GCC) +/* --- GCC --- */ +#if defined(DUK_F_C99) || defined(DUK_F_CPP11) +/* C99 / C++11 and above: rely on va_copy() which is required. */ +#define DUK_VA_COPY(dest,src) va_copy(dest,src) +#else +/* GCC: assume we have __va_copy() in non-C99 mode. */ +#define DUK_VA_COPY(dest,src) __va_copy(dest,src) +#endif + +#if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 20500L) && (DUK_F_GCC_VERSION < 50000L) +/* Since gcc-2.5. + * + * Disabled temporarily in GCC 5+ because of an unresolved noreturn-related + * issue: https://github.com/svaarala/duktape/issues/2155. + */ +#define DUK_NORETURN(decl) decl __attribute__((noreturn)) +#endif + +#if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 40500L) +/* Since gcc-4.5. */ +#define DUK_UNREACHABLE() do { __builtin_unreachable(); } while (0) +#endif + +#define DUK_USE_BRANCH_HINTS +#if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 40500L) +/* GCC: test not very accurate; enable only in relatively recent builds + * because of bugs in gcc-4.4 (http://lists.debian.org/debian-gcc/2010/04/msg00000.html) + */ +#define DUK_LIKELY(x) __builtin_expect((x), 1) +#define DUK_UNLIKELY(x) __builtin_expect((x), 0) +#endif +/* XXX: equivalent of clang __builtin_unpredictable? */ + +#if (defined(DUK_F_C99) || defined(DUK_F_CPP11)) && \ + defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 30101) +#define DUK_NOINLINE __attribute__((noinline)) +#define DUK_INLINE inline +#define DUK_ALWAYS_INLINE inline __attribute__((always_inline)) +#endif + +#if (defined(DUK_F_C99) || defined(DUK_F_CPP11)) && \ + defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 40300) +#define DUK_HOT __attribute__((hot)) +#define DUK_COLD __attribute__((cold)) +#endif + +#if defined(DUK_F_DLL_BUILD) && defined(DUK_F_WINDOWS) +/* MSVC dllexport/dllimport: appropriate __declspec depends on whether we're + * compiling Duktape or the application. + */ +#if defined(DUK_COMPILING_DUKTAPE) +#define DUK_EXTERNAL_DECL extern __declspec(dllexport) +#define DUK_EXTERNAL __declspec(dllexport) +#else +#define DUK_EXTERNAL_DECL extern __declspec(dllimport) +#define DUK_EXTERNAL should_not_happen +#endif +#if defined(DUK_SINGLE_FILE) +#define DUK_INTERNAL_DECL static +#define DUK_INTERNAL static +#else +#define DUK_INTERNAL_DECL extern +#define DUK_INTERNAL /*empty*/ +#endif +#define DUK_LOCAL_DECL static +#define DUK_LOCAL static +#elif defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 40000) +#define DUK_EXTERNAL_DECL __attribute__ ((visibility("default"))) extern +#define DUK_EXTERNAL __attribute__ ((visibility("default"))) +#if defined(DUK_SINGLE_FILE) +#if (defined(DUK_F_GCC_VERSION) && DUK_F_GCC_VERSION >= 30101) || defined(DUK_F_CLANG) +/* Minimize warnings for unused internal functions with GCC >= 3.1.1 and + * Clang. Based on documentation it should suffice to have the attribute + * in the declaration only, but in practice some warnings are generated unless + * the attribute is also applied to the definition. + */ +#define DUK_INTERNAL_DECL static __attribute__ ((unused)) +#define DUK_INTERNAL static __attribute__ ((unused)) +#else +#define DUK_INTERNAL_DECL static +#define DUK_INTERNAL static +#endif +#else +#if (defined(DUK_F_GCC_VERSION) && DUK_F_GCC_VERSION >= 30101) || defined(DUK_F_CLANG) +#define DUK_INTERNAL_DECL __attribute__ ((visibility("hidden"))) __attribute__ ((unused)) extern +#define DUK_INTERNAL __attribute__ ((visibility("hidden"))) __attribute__ ((unused)) +#else +#define DUK_INTERNAL_DECL __attribute__ ((visibility("hidden"))) extern +#define DUK_INTERNAL __attribute__ ((visibility("hidden"))) +#endif +#endif +#define DUK_LOCAL_DECL static +#define DUK_LOCAL static +#endif + +#if defined(DUK_F_MINGW) +#if defined(DUK_F_CPP) +#define DUK_USE_COMPILER_STRING "mingw++" +#else +#define DUK_USE_COMPILER_STRING "mingw" +#endif +#else +#if defined(DUK_F_CPP) +#define DUK_USE_COMPILER_STRING "g++" +#else +#define DUK_USE_COMPILER_STRING "gcc" +#endif +#endif + +#undef DUK_USE_VARIADIC_MACROS +#if defined(DUK_F_C99) || (defined(DUK_F_CPP11) && defined(__GNUC__)) +#define DUK_USE_VARIADIC_MACROS +#endif + +#define DUK_USE_UNION_INITIALIZERS + +#undef DUK_USE_FLEX_C99 +#undef DUK_USE_FLEX_ZEROSIZE +#undef DUK_USE_FLEX_ONESIZE +#if defined(DUK_F_C99) +#define DUK_USE_FLEX_C99 +#else +#define DUK_USE_FLEX_ZEROSIZE +#endif + +/* Since 4.6 one can '#pragma GCC diagnostic push/pop'. */ +#if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 40600) +#define DUK_USE_GCC_PRAGMAS +#else +#undef DUK_USE_GCC_PRAGMAS +#endif + +#define DUK_USE_PACK_GCC_ATTR + +/* Availability varies based on platform (between GCC 4.4 and 4.8), and there + * are apparently some bugs in GCC 4.x. Check for GCC 5.0 before enabling + * these to be safe. + */ +#if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 50000L) +#define DUK_BSWAP64(x) ((duk_uint64_t) __builtin_bswap64((duk_uint64_t) (x))) +#define DUK_BSWAP32(x) ((duk_uint32_t) __builtin_bswap32((duk_uint32_t) (x))) +#define DUK_BSWAP16(x) ((duk_uint16_t) __builtin_bswap16((duk_uint16_t) (x))) +#endif +#elif defined(DUK_F_MSVC) +/* --- MSVC --- */ +/* http://msdn.microsoft.com/en-us/library/aa235362(VS.60).aspx */ +#define DUK_NORETURN(decl) __declspec(noreturn) decl + +/* XXX: DUK_UNREACHABLE for msvc? */ + +#undef DUK_USE_BRANCH_HINTS + +/* XXX: DUK_LIKELY, DUK_UNLIKELY for msvc? */ +/* XXX: DUK_NOINLINE, DUK_INLINE, DUK_ALWAYS_INLINE for msvc? */ + +#if defined(DUK_F_DLL_BUILD) && defined(DUK_F_WINDOWS) +/* MSVC dllexport/dllimport: appropriate __declspec depends on whether we're + * compiling Duktape or the application. + */ +#if defined(DUK_COMPILING_DUKTAPE) +#define DUK_EXTERNAL_DECL extern __declspec(dllexport) +#define DUK_EXTERNAL __declspec(dllexport) +#else +#define DUK_EXTERNAL_DECL extern __declspec(dllimport) +#define DUK_EXTERNAL should_not_happen +#endif +#if defined(DUK_SINGLE_FILE) +#define DUK_INTERNAL_DECL static +#define DUK_INTERNAL static +#else +#define DUK_INTERNAL_DECL extern +#define DUK_INTERNAL /*empty*/ +#endif +#define DUK_LOCAL_DECL static +#define DUK_LOCAL static +#endif + +#if defined(DUK_F_CPP) +#define DUK_USE_COMPILER_STRING "msvc++" +#else +#define DUK_USE_COMPILER_STRING "msvc" +#endif + +#undef DUK_USE_VARIADIC_MACROS +#if defined(DUK_F_C99) +#define DUK_USE_VARIADIC_MACROS +#elif defined(_MSC_VER) && (_MSC_VER >= 1400) +/* VS2005+ should have variadic macros even when they're not C99. */ +#define DUK_USE_VARIADIC_MACROS +#endif + +#undef DUK_USE_UNION_INITIALIZERS +#if defined(_MSC_VER) && (_MSC_VER >= 1800) +/* VS2013+ supports union initializers but there's a bug involving union-inside-struct: + * https://connect.microsoft.com/VisualStudio/feedback/details/805981 + * The bug was fixed (at least) in VS2015 so check for VS2015 for now: + * https://blogs.msdn.microsoft.com/vcblog/2015/07/01/c-compiler-front-end-fixes-in-vs2015/ + * Manually tested using VS2013, CL reports 18.00.31101, so enable for VS2013 too. + */ +#define DUK_USE_UNION_INITIALIZERS +#endif + +#undef DUK_USE_FLEX_C99 +#undef DUK_USE_FLEX_ZEROSIZE +#undef DUK_USE_FLEX_ONESIZE +#if defined(DUK_F_C99) +#define DUK_USE_FLEX_C99 +#else +#define DUK_USE_FLEX_ZEROSIZE +#endif + +#undef DUK_USE_GCC_PRAGMAS + +#define DUK_USE_PACK_MSVC_PRAGMA + +/* These have been tested from VS2008 onwards; may work in older VS versions + * too but not enabled by default. + */ +#if defined(_MSC_VER) && (_MSC_VER >= 1500) +#define DUK_NOINLINE __declspec(noinline) +#define DUK_INLINE __inline +#define DUK_ALWAYS_INLINE __forceinline +#endif + +#if defined(_MSC_VER) && (_MSC_VER >= 1900) +#define DUK_SNPRINTF snprintf +#define DUK_VSNPRINTF vsnprintf +#else +/* (v)snprintf() is missing before MSVC 2015. Note that _(v)snprintf() does + * NOT NUL terminate on truncation, but Duktape code never assumes that. + * http://stackoverflow.com/questions/2915672/snprintf-and-visual-studio-2010 + */ +#define DUK_SNPRINTF _snprintf +#define DUK_VSNPRINTF _vsnprintf +#endif + +/* Avoid warning when doing DUK_UNREF(some_function). */ +#if defined(_MSC_VER) && (_MSC_VER < 1500) +#pragma warning(disable: 4100 4101 4550 4551) +#define DUK_UNREF(x) +#else +#define DUK_UNREF(x) do { __pragma(warning(suppress:4100 4101 4550 4551)) (x); } while (0) +#endif + +/* Older versions of MSVC don't support the LL/ULL suffix. */ +#define DUK_U64_CONSTANT(x) x##ui64 +#define DUK_I64_CONSTANT(x) x##i64 +#elif defined(DUK_F_EMSCRIPTEN) +/* --- Emscripten --- */ +#define DUK_NORETURN(decl) decl __attribute__((noreturn)) + +#if defined(__clang__) && defined(__has_builtin) +#if __has_builtin(__builtin_unreachable) +#define DUK_UNREACHABLE() do { __builtin_unreachable(); } while (0) +#endif +#endif + +#define DUK_USE_BRANCH_HINTS +#define DUK_LIKELY(x) __builtin_expect((x), 1) +#define DUK_UNLIKELY(x) __builtin_expect((x), 0) +#if defined(__clang__) && defined(__has_builtin) +#if __has_builtin(__builtin_unpredictable) +#define DUK_UNPREDICTABLE(x) __builtin_unpredictable((x)) +#endif +#endif + +#if defined(DUK_F_C99) || defined(DUK_F_CPP11) +#define DUK_NOINLINE __attribute__((noinline)) +#define DUK_INLINE inline +#define DUK_ALWAYS_INLINE inline __attribute__((always_inline)) +#endif + +#define DUK_EXTERNAL_DECL __attribute__ ((visibility("default"))) extern +#define DUK_EXTERNAL __attribute__ ((visibility("default"))) +#if defined(DUK_SINGLE_FILE) +#if (defined(DUK_F_GCC_VERSION) && DUK_F_GCC_VERSION >= 30101) || defined(DUK_F_CLANG) +/* Minimize warnings for unused internal functions with GCC >= 3.1.1 and + * Clang. Based on documentation it should suffice to have the attribute + * in the declaration only, but in practice some warnings are generated unless + * the attribute is also applied to the definition. + */ +#define DUK_INTERNAL_DECL static __attribute__ ((unused)) +#define DUK_INTERNAL static __attribute__ ((unused)) +#else +#define DUK_INTERNAL_DECL static +#define DUK_INTERNAL static +#endif +#else +#if (defined(DUK_F_GCC_VERSION) && DUK_F_GCC_VERSION >= 30101) || defined(DUK_F_CLANG) +#define DUK_INTERNAL_DECL __attribute__ ((visibility("hidden"))) __attribute__ ((unused)) extern +#define DUK_INTERNAL __attribute__ ((visibility("hidden"))) __attribute__ ((unused)) +#else +#define DUK_INTERNAL_DECL __attribute__ ((visibility("hidden"))) extern +#define DUK_INTERNAL __attribute__ ((visibility("hidden"))) +#endif +#endif +#define DUK_LOCAL_DECL static +#define DUK_LOCAL static + +#define DUK_USE_COMPILER_STRING "emscripten" + +#undef DUK_USE_VARIADIC_MACROS +#if defined(DUK_F_C99) || defined(DUK_F_CPP11) +#define DUK_USE_VARIADIC_MACROS +#endif + +#define DUK_USE_UNION_INITIALIZERS + +#undef DUK_USE_FLEX_C99 +#undef DUK_USE_FLEX_ZEROSIZE +#undef DUK_USE_FLEX_ONESIZE +#if defined(DUK_F_C99) +#define DUK_USE_FLEX_C99 +#else +#define DUK_USE_FLEX_ZEROSIZE +#endif + +#undef DUK_USE_GCC_PRAGMAS +#define DUK_USE_PACK_CLANG_ATTR +#elif defined(DUK_F_TINYC) +/* --- TinyC --- */ +#undef DUK_USE_BRANCH_HINTS + +#if defined(DUK_F_CPP) +#define DUK_USE_COMPILER_STRING "tinyc++" +#else +#define DUK_USE_COMPILER_STRING "tinyc" +#endif + +/* http://bellard.org/tcc/tcc-doc.html#SEC7 */ +#define DUK_USE_VARIADIC_MACROS + +#define DUK_USE_UNION_INITIALIZERS + +/* Most portable, wastes space */ +#define DUK_USE_FLEX_ONESIZE + +/* Most portable, potentially wastes space */ +#define DUK_USE_PACK_DUMMY_MEMBER +#elif defined(DUK_F_VBCC) +/* --- VBCC --- */ +#undef DUK_USE_BRANCH_HINTS + +#if defined(DUK_F_CPP) +#define DUK_USE_COMPILER_STRING "vbcc-c++" +#else +#define DUK_USE_COMPILER_STRING "vbcc" +#endif + +#undef DUK_USE_VARIADIC_MACROS +#if defined(DUK_F_C99) || defined(DUK_F_CPP11) +#define DUK_USE_VARIADIC_MACROS +#endif + +/* VBCC supports C99 so check only for C99 for union initializer support. + * Designated union initializers would possibly work even without a C99 check. + */ +#undef DUK_USE_UNION_INITIALIZERS +#if defined(DUK_F_C99) +#define DUK_USE_UNION_INITIALIZERS +#endif + +#define DUK_USE_FLEX_ZEROSIZE +#define DUK_USE_PACK_DUMMY_MEMBER +#elif defined(DUK_F_BCC) +/* --- Bruce's C compiler --- */ +#undef DUK_USE_BRANCH_HINTS + +#if defined(DUK_F_CPP) +#define DUK_USE_COMPILER_STRING "bcc++" +#else +#define DUK_USE_COMPILER_STRING "bcc" +#endif + +/* Most portable */ +#undef DUK_USE_VARIADIC_MACROS + +/* Most portable, wastes space */ +#undef DUK_USE_UNION_INITIALIZERS + +/* Most portable, wastes space */ +#define DUK_USE_FLEX_ONESIZE + +/* Most portable, potentially wastes space */ +#define DUK_USE_PACK_DUMMY_MEMBER + +/* BCC, assume we're on x86. */ +#if !defined(DUK_USE_BYTEORDER) +#define DUK_USE_BYTEORDER 1 +#endif +#else +/* --- Generic --- */ +#undef DUK_USE_BRANCH_HINTS + +#if defined(DUK_F_CPP) +#define DUK_USE_COMPILER_STRING "generic-c++" +#else +#define DUK_USE_COMPILER_STRING "generic" +#endif + +#undef DUK_USE_VARIADIC_MACROS +#if defined(DUK_F_C99) || defined(DUK_F_CPP11) +#define DUK_USE_VARIADIC_MACROS +#endif + +/* C++ doesn't have standard designated union initializers ({ .foo = 1 }). */ +#undef DUK_USE_UNION_INITIALIZERS +#if defined(DUK_F_C99) +#define DUK_USE_UNION_INITIALIZERS +#endif + +/* Most portable, wastes space */ +#define DUK_USE_FLEX_ONESIZE + +/* Most portable, potentially wastes space */ +#define DUK_USE_PACK_DUMMY_MEMBER +#endif /* autodetect compiler */ + +/* uclibc */ +#if defined(__UCLIBC__) +#define DUK_F_UCLIBC +#endif + +/* + * Wrapper typedefs and constants for integer types, also sanity check types. + * + * C99 typedefs are quite good but not always available, and we want to avoid + * forcibly redefining the C99 typedefs. So, there are Duktape wrappers for + * all C99 typedefs and Duktape code should only use these typedefs. Type + * detection when C99 is not supported is best effort and may end up detecting + * some types incorrectly. + * + * Pointer sizes are a portability problem: pointers to different types may + * have a different size and function pointers are very difficult to manage + * portably. + * + * http://en.wikipedia.org/wiki/C_data_types#Fixed-width_integer_types + * + * Note: there's an interesting corner case when trying to define minimum + * signed integer value constants which leads to the current workaround of + * defining e.g. -0x80000000 as (-0x7fffffffL - 1L). See doc/code-issues.txt + * for a longer discussion. + * + * Note: avoid typecasts and computations in macro integer constants as they + * can then no longer be used in macro relational expressions (such as + * #if DUK_SIZE_MAX < 0xffffffffUL). There is internal code which relies on + * being able to compare DUK_SIZE_MAX against a limit. + */ + +/* XXX: add feature options to force basic types from outside? */ + +#if !defined(INT_MAX) +#define INT_MAX 2147483647 +// #error INT_MAX not defined. +#endif + +/* Check that architecture is two's complement, standard C allows e.g. + * INT_MIN to be -2**31+1 (instead of -2**31). + */ +#if defined(INT_MAX) && defined(INT_MIN) +#if INT_MAX != -(INT_MIN + 1) +#error platform does not seem complement of two +#endif +#else +#error cannot check complement of two +#endif + +/* Pointer size determination based on __WORDSIZE or architecture when + * that's not available. + */ +#if defined(DUK_F_X86) || defined(DUK_F_X32) || \ + defined(DUK_F_M68K) || defined(DUK_F_PPC32) || \ + defined(DUK_F_BCC) || \ + (defined(__WORDSIZE) && (__WORDSIZE == 32)) || \ + ((defined(DUK_F_OLD_SOLARIS) || defined(DUK_F_AIX) || \ + defined(DUK_F_HPUX)) && defined(_ILP32)) || \ + defined(DUK_F_ARM32) +#define DUK_F_32BIT_PTRS +#elif defined(DUK_F_X64) || \ + (defined(__WORDSIZE) && (__WORDSIZE == 64)) || \ + ((defined(DUK_F_OLD_SOLARIS) || defined(DUK_F_AIX) || \ + defined(DUK_F_HPUX)) && defined(_LP64)) || \ + defined(DUK_F_ARM64) +#define DUK_F_64BIT_PTRS +#else +/* not sure, not needed with C99 anyway */ +#endif + +/* Intermediate define for 'have inttypes.h' */ +#undef DUK_F_HAVE_INTTYPES +#if defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L) && \ + !(defined(DUK_F_AMIGAOS) && defined(DUK_F_VBCC)) +/* vbcc + AmigaOS has C99 but no inttypes.h */ +#define DUK_F_HAVE_INTTYPES +#elif defined(__cplusplus) && (__cplusplus >= 201103L) +/* C++11 apparently ratified stdint.h */ +#define DUK_F_HAVE_INTTYPES +#endif + +/* Basic integer typedefs and limits, preferably from inttypes.h, otherwise + * through automatic detection. + */ +#if defined(DUK_F_HAVE_INTTYPES) +/* C99 or compatible */ + +#define DUK_F_HAVE_64BIT + +typedef uint8_t duk_uint8_t; +typedef int8_t duk_int8_t; +typedef uint16_t duk_uint16_t; +typedef int16_t duk_int16_t; +typedef uint32_t duk_uint32_t; +typedef int32_t duk_int32_t; +typedef uint64_t duk_uint64_t; +typedef int64_t duk_int64_t; +typedef uint_least8_t duk_uint_least8_t; +typedef int_least8_t duk_int_least8_t; +typedef uint_least16_t duk_uint_least16_t; +typedef int_least16_t duk_int_least16_t; +typedef uint_least32_t duk_uint_least32_t; +typedef int_least32_t duk_int_least32_t; +typedef uint_least64_t duk_uint_least64_t; +typedef int_least64_t duk_int_least64_t; +typedef uint_fast8_t duk_uint_fast8_t; +typedef int_fast8_t duk_int_fast8_t; +typedef uint_fast16_t duk_uint_fast16_t; +typedef int_fast16_t duk_int_fast16_t; +typedef uint_fast32_t duk_uint_fast32_t; +typedef int_fast32_t duk_int_fast32_t; +typedef uint_fast64_t duk_uint_fast64_t; +typedef int_fast64_t duk_int_fast64_t; +typedef uintptr_t duk_uintptr_t; +typedef intptr_t duk_intptr_t; +typedef uintmax_t duk_uintmax_t; +typedef intmax_t duk_intmax_t; + +#define DUK_UINT8_MIN 0 +#define DUK_UINT8_MAX UINT8_MAX +#define DUK_INT8_MIN INT8_MIN +#define DUK_INT8_MAX INT8_MAX +#define DUK_UINT_LEAST8_MIN 0 +#define DUK_UINT_LEAST8_MAX UINT_LEAST8_MAX +#define DUK_INT_LEAST8_MIN INT_LEAST8_MIN +#define DUK_INT_LEAST8_MAX INT_LEAST8_MAX +#define DUK_UINT_FAST8_MIN 0 +#define DUK_UINT_FAST8_MAX UINT_FAST8_MAX +#define DUK_INT_FAST8_MIN INT_FAST8_MIN +#define DUK_INT_FAST8_MAX INT_FAST8_MAX +#define DUK_UINT16_MIN 0 +#define DUK_UINT16_MAX UINT16_MAX +#define DUK_INT16_MIN INT16_MIN +#define DUK_INT16_MAX INT16_MAX +#define DUK_UINT_LEAST16_MIN 0 +#define DUK_UINT_LEAST16_MAX UINT_LEAST16_MAX +#define DUK_INT_LEAST16_MIN INT_LEAST16_MIN +#define DUK_INT_LEAST16_MAX INT_LEAST16_MAX +#define DUK_UINT_FAST16_MIN 0 +#define DUK_UINT_FAST16_MAX UINT_FAST16_MAX +#define DUK_INT_FAST16_MIN INT_FAST16_MIN +#define DUK_INT_FAST16_MAX INT_FAST16_MAX +#define DUK_UINT32_MIN 0 +#define DUK_UINT32_MAX UINT32_MAX +#define DUK_INT32_MIN INT32_MIN +#define DUK_INT32_MAX INT32_MAX +#define DUK_UINT_LEAST32_MIN 0 +#define DUK_UINT_LEAST32_MAX UINT_LEAST32_MAX +#define DUK_INT_LEAST32_MIN INT_LEAST32_MIN +#define DUK_INT_LEAST32_MAX INT_LEAST32_MAX +#define DUK_UINT_FAST32_MIN 0 +#define DUK_UINT_FAST32_MAX UINT_FAST32_MAX +#define DUK_INT_FAST32_MIN INT_FAST32_MIN +#define DUK_INT_FAST32_MAX INT_FAST32_MAX +#define DUK_UINT64_MIN 0 +#define DUK_UINT64_MAX UINT64_MAX +#define DUK_INT64_MIN INT64_MIN +#define DUK_INT64_MAX INT64_MAX +#define DUK_UINT_LEAST64_MIN 0 +#define DUK_UINT_LEAST64_MAX UINT_LEAST64_MAX +#define DUK_INT_LEAST64_MIN INT_LEAST64_MIN +#define DUK_INT_LEAST64_MAX INT_LEAST64_MAX +#define DUK_UINT_FAST64_MIN 0 +#define DUK_UINT_FAST64_MAX UINT_FAST64_MAX +#define DUK_INT_FAST64_MIN INT_FAST64_MIN +#define DUK_INT_FAST64_MAX INT_FAST64_MAX + +#define DUK_UINTPTR_MIN 0 +#define DUK_UINTPTR_MAX UINTPTR_MAX +#define DUK_INTPTR_MIN INTPTR_MIN +#define DUK_INTPTR_MAX INTPTR_MAX + +#define DUK_UINTMAX_MIN 0 +#define DUK_UINTMAX_MAX UINTMAX_MAX +#define DUK_INTMAX_MIN INTMAX_MIN +#define DUK_INTMAX_MAX INTMAX_MAX + +#define DUK_SIZE_MIN 0 +#define DUK_SIZE_MAX SIZE_MAX +#undef DUK_SIZE_MAX_COMPUTED + +#else /* C99 types */ + +/* When C99 types are not available, we use heuristic detection to get + * the basic 8, 16, 32, and (possibly) 64 bit types. The fast/least + * types are then assumed to be exactly the same for now: these could + * be improved per platform but C99 types are very often now available. + * 64-bit types are not available on all platforms; this is OK at least + * on 32-bit platforms. + * + * This detection code is necessarily a bit hacky and can provide typedefs + * and defines that won't work correctly on some exotic platform. + */ + +#if (defined(CHAR_BIT) && (CHAR_BIT == 8)) || \ + (defined(UCHAR_MAX) && (UCHAR_MAX == 255)) +typedef unsigned char duk_uint8_t; +typedef signed char duk_int8_t; +#else +#error cannot detect 8-bit type +#endif + +#if defined(USHRT_MAX) && (USHRT_MAX == 65535UL) +typedef unsigned short duk_uint16_t; +typedef signed short duk_int16_t; +#elif defined(UINT_MAX) && (UINT_MAX == 65535UL) +/* On some platforms int is 16-bit but long is 32-bit (e.g. PureC) */ +typedef unsigned int duk_uint16_t; +typedef signed int duk_int16_t; +#else +#error cannot detect 16-bit type +#endif + +#if defined(UINT_MAX) && (UINT_MAX == 4294967295UL) +typedef unsigned int duk_uint32_t; +typedef signed int duk_int32_t; +#elif defined(ULONG_MAX) && (ULONG_MAX == 4294967295UL) +/* On some platforms int is 16-bit but long is 32-bit (e.g. PureC) */ +typedef unsigned long duk_uint32_t; +typedef signed long duk_int32_t; +#else +#error cannot detect 32-bit type +#endif + +/* 64-bit type detection is a bit tricky. + * + * ULLONG_MAX is a standard define. __LONG_LONG_MAX__ and __ULONG_LONG_MAX__ + * are used by at least GCC (even if system headers don't provide ULLONG_MAX). + * Some GCC variants may provide __LONG_LONG_MAX__ but not __ULONG_LONG_MAX__. + * + * ULL / LL constants are rejected / warned about by some compilers, even if + * the compiler has a 64-bit type and the compiler/system headers provide an + * unsupported constant (ULL/LL)! Try to avoid using ULL / LL constants. + * As a side effect we can only check that e.g. ULONG_MAX is larger than 32 + * bits but can't be sure it is exactly 64 bits. Self tests will catch such + * cases. + */ +#undef DUK_F_HAVE_64BIT +#if !defined(DUK_F_HAVE_64BIT) && defined(ULONG_MAX) +#if (ULONG_MAX > 4294967295UL) +#define DUK_F_HAVE_64BIT +typedef unsigned long duk_uint64_t; +typedef signed long duk_int64_t; +#endif +#endif +#if !defined(DUK_F_HAVE_64BIT) && defined(ULLONG_MAX) +#if (ULLONG_MAX > 4294967295UL) +#define DUK_F_HAVE_64BIT +typedef unsigned long long duk_uint64_t; +typedef signed long long duk_int64_t; +#endif +#endif +#if !defined(DUK_F_HAVE_64BIT) && defined(__ULONG_LONG_MAX__) +#if (__ULONG_LONG_MAX__ > 4294967295UL) +#define DUK_F_HAVE_64BIT +typedef unsigned long long duk_uint64_t; +typedef signed long long duk_int64_t; +#endif +#endif +#if !defined(DUK_F_HAVE_64BIT) && defined(__LONG_LONG_MAX__) +#if (__LONG_LONG_MAX__ > 2147483647L) +#define DUK_F_HAVE_64BIT +typedef unsigned long long duk_uint64_t; +typedef signed long long duk_int64_t; +#endif +#endif +#if !defined(DUK_F_HAVE_64BIT) && defined(DUK_F_MINGW) +#define DUK_F_HAVE_64BIT +typedef unsigned long duk_uint64_t; +typedef signed long duk_int64_t; +#endif +#if !defined(DUK_F_HAVE_64BIT) && defined(DUK_F_MSVC) +#define DUK_F_HAVE_64BIT +typedef unsigned __int64 duk_uint64_t; +typedef signed __int64 duk_int64_t; +#endif +#if !defined(DUK_F_HAVE_64BIT) +/* cannot detect 64-bit type, not always needed so don't error */ +#endif + +typedef duk_uint8_t duk_uint_least8_t; +typedef duk_int8_t duk_int_least8_t; +typedef duk_uint16_t duk_uint_least16_t; +typedef duk_int16_t duk_int_least16_t; +typedef duk_uint32_t duk_uint_least32_t; +typedef duk_int32_t duk_int_least32_t; +typedef duk_uint8_t duk_uint_fast8_t; +typedef duk_int8_t duk_int_fast8_t; +typedef duk_uint16_t duk_uint_fast16_t; +typedef duk_int16_t duk_int_fast16_t; +typedef duk_uint32_t duk_uint_fast32_t; +typedef duk_int32_t duk_int_fast32_t; +#if defined(DUK_F_HAVE_64BIT) +typedef duk_uint64_t duk_uint_least64_t; +typedef duk_int64_t duk_int_least64_t; +typedef duk_uint64_t duk_uint_fast64_t; +typedef duk_int64_t duk_int_fast64_t; +#endif +#if defined(DUK_F_HAVE_64BIT) +typedef duk_uint64_t duk_uintmax_t; +typedef duk_int64_t duk_intmax_t; +#else +typedef duk_uint32_t duk_uintmax_t; +typedef duk_int32_t duk_intmax_t; +#endif + +/* Note: the funny looking computations for signed minimum 16-bit, 32-bit, and + * 64-bit values are intentional as the obvious forms (e.g. -0x80000000L) are + * -not- portable. See code-issues.txt for a detailed discussion. + */ +#define DUK_UINT8_MIN 0UL +#define DUK_UINT8_MAX 0xffUL +#define DUK_INT8_MIN (-0x80L) +#define DUK_INT8_MAX 0x7fL +#define DUK_UINT_LEAST8_MIN 0UL +#define DUK_UINT_LEAST8_MAX 0xffUL +#define DUK_INT_LEAST8_MIN (-0x80L) +#define DUK_INT_LEAST8_MAX 0x7fL +#define DUK_UINT_FAST8_MIN 0UL +#define DUK_UINT_FAST8_MAX 0xffUL +#define DUK_INT_FAST8_MIN (-0x80L) +#define DUK_INT_FAST8_MAX 0x7fL +#define DUK_UINT16_MIN 0UL +#define DUK_UINT16_MAX 0xffffUL +#define DUK_INT16_MIN (-0x7fffL - 1L) +#define DUK_INT16_MAX 0x7fffL +#define DUK_UINT_LEAST16_MIN 0UL +#define DUK_UINT_LEAST16_MAX 0xffffUL +#define DUK_INT_LEAST16_MIN (-0x7fffL - 1L) +#define DUK_INT_LEAST16_MAX 0x7fffL +#define DUK_UINT_FAST16_MIN 0UL +#define DUK_UINT_FAST16_MAX 0xffffUL +#define DUK_INT_FAST16_MIN (-0x7fffL - 1L) +#define DUK_INT_FAST16_MAX 0x7fffL +#define DUK_UINT32_MIN 0UL +#define DUK_UINT32_MAX 0xffffffffUL +#define DUK_INT32_MIN (-0x7fffffffL - 1L) +#define DUK_INT32_MAX 0x7fffffffL +#define DUK_UINT_LEAST32_MIN 0UL +#define DUK_UINT_LEAST32_MAX 0xffffffffUL +#define DUK_INT_LEAST32_MIN (-0x7fffffffL - 1L) +#define DUK_INT_LEAST32_MAX 0x7fffffffL +#define DUK_UINT_FAST32_MIN 0UL +#define DUK_UINT_FAST32_MAX 0xffffffffUL +#define DUK_INT_FAST32_MIN (-0x7fffffffL - 1L) +#define DUK_INT_FAST32_MAX 0x7fffffffL + +/* 64-bit constants. Since LL / ULL constants are not always available, + * use computed values. These values can't be used in preprocessor + * comparisons; flag them as such. + */ +#if defined(DUK_F_HAVE_64BIT) +#define DUK_UINT64_MIN ((duk_uint64_t) 0) +#define DUK_UINT64_MAX ((duk_uint64_t) -1) +#define DUK_INT64_MIN ((duk_int64_t) (~(DUK_UINT64_MAX >> 1))) +#define DUK_INT64_MAX ((duk_int64_t) (DUK_UINT64_MAX >> 1)) +#define DUK_UINT_LEAST64_MIN DUK_UINT64_MIN +#define DUK_UINT_LEAST64_MAX DUK_UINT64_MAX +#define DUK_INT_LEAST64_MIN DUK_INT64_MIN +#define DUK_INT_LEAST64_MAX DUK_INT64_MAX +#define DUK_UINT_FAST64_MIN DUK_UINT64_MIN +#define DUK_UINT_FAST64_MAX DUK_UINT64_MAX +#define DUK_INT_FAST64_MIN DUK_INT64_MIN +#define DUK_INT_FAST64_MAX DUK_INT64_MAX +#define DUK_UINT64_MIN_COMPUTED +#define DUK_UINT64_MAX_COMPUTED +#define DUK_INT64_MIN_COMPUTED +#define DUK_INT64_MAX_COMPUTED +#define DUK_UINT_LEAST64_MIN_COMPUTED +#define DUK_UINT_LEAST64_MAX_COMPUTED +#define DUK_INT_LEAST64_MIN_COMPUTED +#define DUK_INT_LEAST64_MAX_COMPUTED +#define DUK_UINT_FAST64_MIN_COMPUTED +#define DUK_UINT_FAST64_MAX_COMPUTED +#define DUK_INT_FAST64_MIN_COMPUTED +#define DUK_INT_FAST64_MAX_COMPUTED +#endif + +#if defined(DUK_F_HAVE_64BIT) +#define DUK_UINTMAX_MIN DUK_UINT64_MIN +#define DUK_UINTMAX_MAX DUK_UINT64_MAX +#define DUK_INTMAX_MIN DUK_INT64_MIN +#define DUK_INTMAX_MAX DUK_INT64_MAX +#define DUK_UINTMAX_MIN_COMPUTED +#define DUK_UINTMAX_MAX_COMPUTED +#define DUK_INTMAX_MIN_COMPUTED +#define DUK_INTMAX_MAX_COMPUTED +#else +#define DUK_UINTMAX_MIN 0UL +#define DUK_UINTMAX_MAX 0xffffffffUL +#define DUK_INTMAX_MIN (-0x7fffffffL - 1L) +#define DUK_INTMAX_MAX 0x7fffffffL +#endif + +/* This detection is not very reliable. */ +#if defined(DUK_F_32BIT_PTRS) +typedef duk_int32_t duk_intptr_t; +typedef duk_uint32_t duk_uintptr_t; +#define DUK_UINTPTR_MIN DUK_UINT32_MIN +#define DUK_UINTPTR_MAX DUK_UINT32_MAX +#define DUK_INTPTR_MIN DUK_INT32_MIN +#define DUK_INTPTR_MAX DUK_INT32_MAX +#elif defined(DUK_F_64BIT_PTRS) && defined(DUK_F_HAVE_64BIT) +typedef duk_int64_t duk_intptr_t; +typedef duk_uint64_t duk_uintptr_t; +#define DUK_UINTPTR_MIN DUK_UINT64_MIN +#define DUK_UINTPTR_MAX DUK_UINT64_MAX +#define DUK_INTPTR_MIN DUK_INT64_MIN +#define DUK_INTPTR_MAX DUK_INT64_MAX +#define DUK_UINTPTR_MIN_COMPUTED +#define DUK_UINTPTR_MAX_COMPUTED +#define DUK_INTPTR_MIN_COMPUTED +#define DUK_INTPTR_MAX_COMPUTED +#else +#error cannot determine intptr type +#endif + +/* SIZE_MAX may be missing so use an approximate value for it. */ +#undef DUK_SIZE_MAX_COMPUTED +#if !defined(SIZE_MAX) +#define DUK_SIZE_MAX_COMPUTED +#define SIZE_MAX ((size_t) (-1)) +#endif +#define DUK_SIZE_MIN 0 +#define DUK_SIZE_MAX SIZE_MAX + +#endif /* C99 types */ + +/* A few types are assumed to always exist. */ +typedef size_t duk_size_t; +typedef ptrdiff_t duk_ptrdiff_t; + +/* The best type for an "all around int" in Duktape internals is "at least + * 32 bit signed integer" which is most convenient. Same for unsigned type. + * Prefer 'int' when large enough, as it is almost always a convenient type. + */ +#if defined(UINT_MAX) && (UINT_MAX >= 0xffffffffUL) +typedef int duk_int_t; +typedef unsigned int duk_uint_t; +#define DUK_INT_MIN INT_MIN +#define DUK_INT_MAX INT_MAX +#define DUK_UINT_MIN 0 +#define DUK_UINT_MAX UINT_MAX +#else +typedef duk_int_fast32_t duk_int_t; +typedef duk_uint_fast32_t duk_uint_t; +#define DUK_INT_MIN DUK_INT_FAST32_MIN +#define DUK_INT_MAX DUK_INT_FAST32_MAX +#define DUK_UINT_MIN DUK_UINT_FAST32_MIN +#define DUK_UINT_MAX DUK_UINT_FAST32_MAX +#endif + +/* Same as 'duk_int_t' but guaranteed to be a 'fast' variant if this + * distinction matters for the CPU. These types are used mainly in the + * executor where it might really matter. + */ +typedef duk_int_fast32_t duk_int_fast_t; +typedef duk_uint_fast32_t duk_uint_fast_t; +#define DUK_INT_FAST_MIN DUK_INT_FAST32_MIN +#define DUK_INT_FAST_MAX DUK_INT_FAST32_MAX +#define DUK_UINT_FAST_MIN DUK_UINT_FAST32_MIN +#define DUK_UINT_FAST_MAX DUK_UINT_FAST32_MAX + +/* Small integers (16 bits or more) can fall back to the 'int' type, but + * have a typedef so they are marked "small" explicitly. + */ +typedef int duk_small_int_t; +typedef unsigned int duk_small_uint_t; +#define DUK_SMALL_INT_MIN INT_MIN +#define DUK_SMALL_INT_MAX INT_MAX +#define DUK_SMALL_UINT_MIN 0 +#define DUK_SMALL_UINT_MAX UINT_MAX + +/* Fast variants of small integers, again for really fast paths like the + * executor. + */ +typedef duk_int_fast16_t duk_small_int_fast_t; +typedef duk_uint_fast16_t duk_small_uint_fast_t; +#define DUK_SMALL_INT_FAST_MIN DUK_INT_FAST16_MIN +#define DUK_SMALL_INT_FAST_MAX DUK_INT_FAST16_MAX +#define DUK_SMALL_UINT_FAST_MIN DUK_UINT_FAST16_MIN +#define DUK_SMALL_UINT_FAST_MAX DUK_UINT_FAST16_MAX + +/* Boolean values are represented with the platform 'unsigned int'. */ +typedef duk_small_uint_t duk_bool_t; +#define DUK_BOOL_MIN DUK_SMALL_UINT_MIN +#define DUK_BOOL_MAX DUK_SMALL_UINT_MAX + +/* Index values must have at least 32-bit signed range. */ +typedef duk_int_t duk_idx_t; +#define DUK_IDX_MIN DUK_INT_MIN +#define DUK_IDX_MAX DUK_INT_MAX + +/* Unsigned index variant. */ +typedef duk_uint_t duk_uidx_t; +#define DUK_UIDX_MIN DUK_UINT_MIN +#define DUK_UIDX_MAX DUK_UINT_MAX + +/* Array index values, could be exact 32 bits. + * Currently no need for signed duk_arridx_t. + */ +typedef duk_uint_t duk_uarridx_t; +#define DUK_UARRIDX_MIN DUK_UINT_MIN +#define DUK_UARRIDX_MAX DUK_UINT_MAX + +/* Duktape/C function return value, platform int is enough for now to + * represent 0, 1, or negative error code. Must be compatible with + * assigning truth values (e.g. duk_ret_t rc = (foo == bar);). + */ +typedef duk_small_int_t duk_ret_t; +#define DUK_RET_MIN DUK_SMALL_INT_MIN +#define DUK_RET_MAX DUK_SMALL_INT_MAX + +/* Error codes are represented with platform int. High bits are used + * for flags and such, so 32 bits are needed. + */ +typedef duk_int_t duk_errcode_t; +#define DUK_ERRCODE_MIN DUK_INT_MIN +#define DUK_ERRCODE_MAX DUK_INT_MAX + +/* Codepoint type. Must be 32 bits or more because it is used also for + * internal codepoints. The type is signed because negative codepoints + * are used as internal markers (e.g. to mark EOF or missing argument). + * (X)UTF-8/CESU-8 encode/decode take and return an unsigned variant to + * ensure duk_uint32_t casts back and forth nicely. Almost everything + * else uses the signed one. + */ +typedef duk_int_t duk_codepoint_t; +typedef duk_uint_t duk_ucodepoint_t; +#define DUK_CODEPOINT_MIN DUK_INT_MIN +#define DUK_CODEPOINT_MAX DUK_INT_MAX +#define DUK_UCODEPOINT_MIN DUK_UINT_MIN +#define DUK_UCODEPOINT_MAX DUK_UINT_MAX + +/* IEEE float/double typedef. */ +typedef float duk_float_t; +typedef double duk_double_t; + +/* We're generally assuming that we're working on a platform with a 32-bit + * address space. If DUK_SIZE_MAX is a typecast value (which is necessary + * if SIZE_MAX is missing), the check must be avoided because the + * preprocessor can't do a comparison. + */ +#if !defined(DUK_SIZE_MAX) +#error DUK_SIZE_MAX is undefined, probably missing SIZE_MAX +#elif !defined(DUK_SIZE_MAX_COMPUTED) +#if DUK_SIZE_MAX < 0xffffffffUL +/* On some systems SIZE_MAX can be smaller than max unsigned 32-bit value + * which seems incorrect if size_t is (at least) an unsigned 32-bit type. + * However, it doesn't seem useful to error out compilation if this is the + * case. + */ +#endif +#endif + +/* Type used in public API declarations and user code. Typedef maps to + * 'struct duk_hthread' like the 'duk_hthread' typedef which is used + * exclusively in internals. + */ +typedef struct duk_hthread duk_context; + +/* Check whether we should use 64-bit integers or not. + * + * Quite incomplete now. Use 64-bit types if detected (C99 or other detection) + * unless they are known to be unreliable. For instance, 64-bit types are + * available on VBCC but seem to misbehave. + */ +#if defined(DUK_F_HAVE_64BIT) && !defined(DUK_F_VBCC) +#define DUK_USE_64BIT_OPS +#else +#undef DUK_USE_64BIT_OPS +#endif + +/* + * Fill-ins for platform, architecture, and compiler + */ + +/* An abort()-like primitive is needed by the default fatal error handler. */ +#if !defined(DUK_ABORT) +#define DUK_ABORT abort +#endif + +#if !defined(DUK_SETJMP) +#define DUK_JMPBUF_TYPE jmp_buf +#define DUK_SETJMP(jb) setjmp((jb)) +#define DUK_LONGJMP(jb) longjmp((jb), 1) +#endif + +#if 0 +/* sigsetjmp() alternative */ +#define DUK_JMPBUF_TYPE sigjmp_buf +#define DUK_SETJMP(jb) sigsetjmp((jb)) +#define DUK_LONGJMP(jb) siglongjmp((jb), 1) +#endif + +/* Special naming to avoid conflict with e.g. DUK_FREE() in duk_heap.h + * (which is unfortunately named). May sometimes need replacement, e.g. + * some compilers don't handle zero length or NULL correctly in realloc(). + */ +#if !defined(DUK_ANSI_MALLOC) +#define DUK_ANSI_MALLOC malloc +#endif +#if !defined(DUK_ANSI_REALLOC) +#define DUK_ANSI_REALLOC realloc +#endif +#if !defined(DUK_ANSI_CALLOC) +#define DUK_ANSI_CALLOC calloc +#endif +#if !defined(DUK_ANSI_FREE) +#define DUK_ANSI_FREE free +#endif + +/* ANSI C (various versions) and some implementations require that the + * pointer arguments to memset(), memcpy(), and memmove() be valid values + * even when byte size is 0 (even a NULL pointer is considered invalid in + * this context). Zero-size operations as such are allowed, as long as their + * pointer arguments point to a valid memory area. The DUK_MEMSET(), + * DUK_MEMCPY(), and DUK_MEMMOVE() macros require this same behavior, i.e.: + * (1) pointers must be valid and non-NULL, (2) zero size must otherwise be + * allowed. If these are not fulfilled, a macro wrapper is needed. + * + * http://stackoverflow.com/questions/5243012/is-it-guaranteed-to-be-safe-to-perform-memcpy0-0-0 + * http://lists.cs.uiuc.edu/pipermail/llvmdev/2007-October/011065.html + * + * Not sure what's the required behavior when a pointer points just past the + * end of a buffer, which often happens in practice (e.g. zero size memmoves). + * For example, if allocation size is 3, the following pointer would not + * technically point to a valid memory byte: + * + * <-- alloc --> + * | 0 | 1 | 2 | ..... + * ^-- p=3, points after last valid byte (2) + */ +#if !defined(DUK_MEMCPY) +#if defined(DUK_F_UCLIBC) +/* Old uclibcs have a broken memcpy so use memmove instead (this is overly wide + * now on purpose): http://lists.uclibc.org/pipermail/uclibc-cvs/2008-October/025511.html + */ +#define DUK_MEMCPY memmove +#else +#define DUK_MEMCPY memcpy +#endif +#endif +#if !defined(DUK_MEMMOVE) +#define DUK_MEMMOVE memmove +#endif +#if !defined(DUK_MEMCMP) +#define DUK_MEMCMP memcmp +#endif +#if !defined(DUK_MEMSET) +#define DUK_MEMSET memset +#endif +#if !defined(DUK_STRLEN) +#define DUK_STRLEN strlen +#endif +#if !defined(DUK_STRCMP) +#define DUK_STRCMP strcmp +#endif +#if !defined(DUK_STRNCMP) +#define DUK_STRNCMP strncmp +#endif +#if !defined(DUK_SPRINTF) +#define DUK_SPRINTF sprintf +#endif +#if !defined(DUK_SNPRINTF) +/* snprintf() is technically not part of C89 but usually available. */ +#define DUK_SNPRINTF snprintf +#endif +#if !defined(DUK_VSPRINTF) +#define DUK_VSPRINTF vsprintf +#endif +#if !defined(DUK_VSNPRINTF) +/* vsnprintf() is technically not part of C89 but usually available. */ +#define DUK_VSNPRINTF vsnprintf +#endif +#if !defined(DUK_SSCANF) +#define DUK_SSCANF sscanf +#endif +#if !defined(DUK_VSSCANF) +#define DUK_VSSCANF vsscanf +#endif +#if !defined(DUK_MEMZERO) +#define DUK_MEMZERO(p,n) DUK_MEMSET((p), 0, (n)) +#endif + +#if !defined(DUK_DOUBLE_INFINITY) +#undef DUK_USE_COMPUTED_INFINITY +#if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION < 40600) +/* GCC older than 4.6: avoid overflow warnings related to using INFINITY */ +#define DUK_DOUBLE_INFINITY (__builtin_inf()) +#elif defined(INFINITY) +#define DUK_DOUBLE_INFINITY ((double) INFINITY) +#elif !defined(DUK_F_VBCC) && !defined(DUK_F_MSVC) && !defined(DUK_F_BCC) && \ + !defined(DUK_F_OLD_SOLARIS) && !defined(DUK_F_AIX) +#define DUK_DOUBLE_INFINITY (1.0 / 0.0) +#else +/* In VBCC (1.0 / 0.0) results in a warning and 0.0 instead of infinity. + * Use a computed infinity (initialized when a heap is created at the + * latest). + */ +#define DUK_USE_COMPUTED_INFINITY +#define DUK_DOUBLE_INFINITY duk_computed_infinity +#endif +#endif + +#if !defined(DUK_DOUBLE_NAN) +#undef DUK_USE_COMPUTED_NAN +#if defined(NAN) +#define DUK_DOUBLE_NAN NAN +#elif !defined(DUK_F_VBCC) && !defined(DUK_F_MSVC) && !defined(DUK_F_BCC) && \ + !defined(DUK_F_OLD_SOLARIS) && !defined(DUK_F_AIX) +#define DUK_DOUBLE_NAN (0.0 / 0.0) +#else +/* In VBCC (0.0 / 0.0) results in a warning and 0.0 instead of NaN. + * In MSVC (VS2010 Express) (0.0 / 0.0) results in a compile error. + * Use a computed NaN (initialized when a heap is created at the + * latest). + */ +#define DUK_USE_COMPUTED_NAN +#define DUK_DOUBLE_NAN duk_computed_nan +#endif +#endif + +/* Many platforms are missing fpclassify() and friends, so use replacements + * if necessary. The replacement constants (FP_NAN etc) can be anything but + * match Linux constants now. + */ +#undef DUK_USE_REPL_FPCLASSIFY +#undef DUK_USE_REPL_SIGNBIT +#undef DUK_USE_REPL_ISFINITE +#undef DUK_USE_REPL_ISNAN +#undef DUK_USE_REPL_ISINF + +/* Complex condition broken into separate parts. */ +#undef DUK_F_USE_REPL_ALL +#if !(defined(FP_NAN) && defined(FP_INFINITE) && defined(FP_ZERO) && \ + defined(FP_SUBNORMAL) && defined(FP_NORMAL)) +/* Missing some obvious constants. */ +#define DUK_F_USE_REPL_ALL +#elif defined(DUK_F_AMIGAOS) && defined(DUK_F_VBCC) +/* VBCC is missing the built-ins even in C99 mode (perhaps a header issue). */ +#define DUK_F_USE_REPL_ALL +#elif defined(DUK_F_AMIGAOS) && defined(DUK_F_M68K) +/* AmigaOS + M68K seems to have math issues even when using GCC cross + * compilation. Use replacements for all AmigaOS versions on M68K + * regardless of compiler. + */ +#define DUK_F_USE_REPL_ALL +#elif defined(DUK_F_FREEBSD) && defined(DUK_F_CLANG) +/* Placeholder fix for (detection is wider than necessary): + * http://llvm.org/bugs/show_bug.cgi?id=17788 + */ +#define DUK_F_USE_REPL_ALL +#elif defined(DUK_F_UCLIBC) +/* At least some uclibc versions have broken floating point math. For + * example, fpclassify() can incorrectly classify certain NaN formats. + * To be safe, use replacements. + */ +#define DUK_F_USE_REPL_ALL +#elif defined(DUK_F_AIX) +/* Older versions may be missing isnan(), etc. */ +#define DUK_F_USE_REPL_ALL +#endif + +#if defined(DUK_F_USE_REPL_ALL) +#define DUK_USE_REPL_FPCLASSIFY +#define DUK_USE_REPL_SIGNBIT +#define DUK_USE_REPL_ISFINITE +#define DUK_USE_REPL_ISNAN +#define DUK_USE_REPL_ISINF +#define DUK_FPCLASSIFY duk_repl_fpclassify +#define DUK_SIGNBIT duk_repl_signbit +#define DUK_ISFINITE duk_repl_isfinite +#define DUK_ISNAN duk_repl_isnan +#define DUK_ISINF duk_repl_isinf +#define DUK_FP_NAN 0 +#define DUK_FP_INFINITE 1 +#define DUK_FP_ZERO 2 +#define DUK_FP_SUBNORMAL 3 +#define DUK_FP_NORMAL 4 +#else +#define DUK_FPCLASSIFY fpclassify +#define DUK_SIGNBIT signbit +#define DUK_ISFINITE isfinite +#define DUK_ISNAN isnan +#define DUK_ISINF isinf +#define DUK_FP_NAN FP_NAN +#define DUK_FP_INFINITE FP_INFINITE +#define DUK_FP_ZERO FP_ZERO +#define DUK_FP_SUBNORMAL FP_SUBNORMAL +#define DUK_FP_NORMAL FP_NORMAL +#endif + +#if defined(DUK_F_USE_REPL_ALL) +#undef DUK_F_USE_REPL_ALL +#endif + +/* These functions don't currently need replacement but are wrapped for + * completeness. Because these are used as function pointers, they need + * to be defined as concrete C functions (not macros). + */ +#if !defined(DUK_FABS) +#define DUK_FABS fabs +#endif +#if !defined(DUK_FLOOR) +#define DUK_FLOOR floor +#endif +#if !defined(DUK_CEIL) +#define DUK_CEIL ceil +#endif +#if !defined(DUK_FMOD) +#define DUK_FMOD fmod +#endif +#if !defined(DUK_POW) +#define DUK_POW pow +#endif +#if !defined(DUK_ACOS) +#define DUK_ACOS acos +#endif +#if !defined(DUK_ASIN) +#define DUK_ASIN asin +#endif +#if !defined(DUK_ATAN) +#define DUK_ATAN atan +#endif +#if !defined(DUK_ATAN2) +#define DUK_ATAN2 atan2 +#endif +#if !defined(DUK_SIN) +#define DUK_SIN sin +#endif +#if !defined(DUK_COS) +#define DUK_COS cos +#endif +#if !defined(DUK_TAN) +#define DUK_TAN tan +#endif +#if !defined(DUK_EXP) +#define DUK_EXP exp +#endif +#if !defined(DUK_LOG) +#define DUK_LOG log +#endif +#if !defined(DUK_SQRT) +#define DUK_SQRT sqrt +#endif + +/* The functions below exist only in C99/C++11 or later and need a workaround + * for platforms that don't include them. MSVC isn't detected as C99, but + * these functions also exist in MSVC 2013 and later so include a clause for + * that too. Android doesn't have log2; disable all of these for Android. + */ +#if (defined(DUK_F_C99) || defined(DUK_F_CPP11) || (defined(_MSC_VER) && (_MSC_VER >= 1800))) && \ + !defined(DUK_F_ANDROID) && !defined(DUK_F_MINT) +#if !defined(DUK_CBRT) +#define DUK_CBRT cbrt +#endif +#if !defined(DUK_LOG2) +#define DUK_LOG2 log2 +#endif +#if !defined(DUK_LOG10) +#define DUK_LOG10 log10 +#endif +#if !defined(DUK_TRUNC) +#define DUK_TRUNC trunc +#endif +#endif /* DUK_F_C99 etc */ + +/* NetBSD 6.0 x86 (at least) has a few problems with pow() semantics, + * see test-bug-netbsd-math-pow.js. MinGW has similar (but different) + * issues, see test-bug-mingw-math-issues.js. Enable pow() workarounds + * for these targets. + */ +#undef DUK_USE_POW_WORKAROUNDS +#if defined(DUK_F_NETBSD) || defined(DUK_F_MINGW) +#define DUK_USE_POW_WORKAROUNDS +#endif + +/* Similar workarounds for atan2() semantics issues. MinGW issues are + * documented in test-bug-mingw-math-issues.js. + */ +#undef DUK_USE_ATAN2_WORKAROUNDS +#if defined(DUK_F_MINGW) +#define DUK_USE_ATAN2_WORKAROUNDS +#endif + +/* Rely as little as possible on compiler behavior for NaN comparison, + * signed zero handling, etc. Currently never activated but may be needed + * for broken compilers. + */ +#undef DUK_USE_PARANOID_MATH + +/* There was a curious bug where test-bi-date-canceling.js would fail e.g. + * on 64-bit Ubuntu, gcc-4.8.1, -m32, and no -std=c99. Some date computations + * using doubles would be optimized which then broke some corner case tests. + * The problem goes away by adding 'volatile' to the datetime computations. + * Not sure what the actual triggering conditions are, but using this on + * non-C99 systems solves the known issues and has relatively little cost + * on other platforms. + */ +#undef DUK_USE_PARANOID_DATE_COMPUTATION +#if !defined(DUK_F_C99) +#define DUK_USE_PARANOID_DATE_COMPUTATION +#endif + +/* + * Byte order and double memory layout detection + * + * Endianness detection is a major portability hassle because the macros + * and headers are not standardized. There's even variance across UNIX + * platforms. Even with "standard" headers, details like underscore count + * varies between platforms, e.g. both __BYTE_ORDER and _BYTE_ORDER are used + * (Crossbridge has a single underscore, for instance). + * + * The checks below are structured with this in mind: several approaches are + * used, and at the end we check if any of them worked. This allows generic + * approaches to be tried first, and platform/compiler specific hacks tried + * last. As a last resort, the user can force a specific endianness, as it's + * not likely that automatic detection will work on the most exotic platforms. + * + * Duktape supports little and big endian machines. There's also support + * for a hybrid used by some ARM machines where integers are little endian + * but IEEE double values use a mixed order (12345678 -> 43218765). This + * byte order for doubles is referred to as "mixed endian". + */ + +/* GCC and Clang provide endianness defines as built-in predefines, with + * leading and trailing double underscores (e.g. __BYTE_ORDER__). See + * output of "make gccpredefs" and "make clangpredefs". Clang doesn't + * seem to provide __FLOAT_WORD_ORDER__; assume not mixed endian for clang. + * http://gcc.gnu.org/onlinedocs/cpp/Common-Predefined-Macros.html + */ +#if !defined(DUK_USE_BYTEORDER) && defined(__BYTE_ORDER__) +#if defined(__ORDER_LITTLE_ENDIAN__) && (__BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__) +#if defined(__FLOAT_WORD_ORDER__) && defined(__ORDER_LITTLE_ENDIAN__) && (__FLOAT_WORD_ORDER__ == __ORDER_LITTLE_ENDIAN__) +#define DUK_USE_BYTEORDER 1 +#elif defined(__FLOAT_WORD_ORDER__) && defined(__ORDER_BIG_ENDIAN__) && (__FLOAT_WORD_ORDER__ == __ORDER_BIG_ENDIAN__) +#define DUK_USE_BYTEORDER 2 +#elif !defined(__FLOAT_WORD_ORDER__) +/* Float word order not known, assume not a hybrid. */ +#define DUK_USE_BYTEORDER 1 +#else +/* Byte order is little endian but cannot determine IEEE double word order. */ +#endif /* float word order */ +#elif defined(__ORDER_BIG_ENDIAN__) && (__BYTE_ORDER__ == __ORDER_BIG_ENDIAN__) +#if defined(__FLOAT_WORD_ORDER__) && defined(__ORDER_BIG_ENDIAN__) && (__FLOAT_WORD_ORDER__ == __ORDER_BIG_ENDIAN__) +#define DUK_USE_BYTEORDER 3 +#elif !defined(__FLOAT_WORD_ORDER__) +/* Float word order not known, assume not a hybrid. */ +#define DUK_USE_BYTEORDER 3 +#else +/* Byte order is big endian but cannot determine IEEE double word order. */ +#endif /* float word order */ +#else +/* Cannot determine byte order; __ORDER_PDP_ENDIAN__ is related to 32-bit + * integer ordering and is not relevant. + */ +#endif /* integer byte order */ +#endif /* !defined(DUK_USE_BYTEORDER) && defined(__BYTE_ORDER__) */ + +/* More or less standard endianness predefines provided by header files. + * The ARM hybrid case is detected by assuming that __FLOAT_WORD_ORDER + * will be big endian, see: http://lists.mysql.com/internals/443. + * On some platforms some defines may be present with an empty value which + * causes comparisons to fail: https://github.com/svaarala/duktape/issues/453. + */ +#if !defined(DUK_USE_BYTEORDER) +#if defined(__BYTE_ORDER) && defined(__LITTLE_ENDIAN) && (__BYTE_ORDER == __LITTLE_ENDIAN) || \ + defined(_BYTE_ORDER) && defined(_LITTLE_ENDIAN) && (_BYTE_ORDER == _LITTLE_ENDIAN) || \ + defined(__LITTLE_ENDIAN__) +#if defined(__FLOAT_WORD_ORDER) && defined(__LITTLE_ENDIAN) && (__FLOAT_WORD_ORDER == __LITTLE_ENDIAN) || \ + defined(_FLOAT_WORD_ORDER) && defined(_LITTLE_ENDIAN) && (_FLOAT_WORD_ORDER == _LITTLE_ENDIAN) +#define DUK_USE_BYTEORDER 1 +#elif defined(__FLOAT_WORD_ORDER) && defined(__BIG_ENDIAN) && (__FLOAT_WORD_ORDER == __BIG_ENDIAN) || \ + defined(_FLOAT_WORD_ORDER) && defined(_BIG_ENDIAN) && (_FLOAT_WORD_ORDER == _BIG_ENDIAN) +#define DUK_USE_BYTEORDER 2 +#elif !defined(__FLOAT_WORD_ORDER) && !defined(_FLOAT_WORD_ORDER) +/* Float word order not known, assume not a hybrid. */ +#define DUK_USE_BYTEORDER 1 +#else +/* Byte order is little endian but cannot determine IEEE double word order. */ +#endif /* float word order */ +#elif defined(__BYTE_ORDER) && defined(__BIG_ENDIAN) && (__BYTE_ORDER == __BIG_ENDIAN) || \ + defined(_BYTE_ORDER) && defined(_BIG_ENDIAN) && (_BYTE_ORDER == _BIG_ENDIAN) || \ + defined(__BIG_ENDIAN__) +#if defined(__FLOAT_WORD_ORDER) && defined(__BIG_ENDIAN) && (__FLOAT_WORD_ORDER == __BIG_ENDIAN) || \ + defined(_FLOAT_WORD_ORDER) && defined(_BIG_ENDIAN) && (_FLOAT_WORD_ORDER == _BIG_ENDIAN) +#define DUK_USE_BYTEORDER 3 +#elif !defined(__FLOAT_WORD_ORDER) && !defined(_FLOAT_WORD_ORDER) +/* Float word order not known, assume not a hybrid. */ +#define DUK_USE_BYTEORDER 3 +#else +/* Byte order is big endian but cannot determine IEEE double word order. */ +#endif /* float word order */ +#else +/* Cannot determine byte order. */ +#endif /* integer byte order */ +#endif /* !defined(DUK_USE_BYTEORDER) */ + +/* QNX gcc cross compiler seems to define e.g. __LITTLEENDIAN__ or __BIGENDIAN__: + * $ /opt/qnx650/host/linux/x86/usr/bin/i486-pc-nto-qnx6.5.0-gcc -dM -E - > 56U) | \ + ((((duk_uint64_t) (x)) >> 40U) & DUK_U64_CONSTANT(0xff00)) | \ + ((((duk_uint64_t) (x)) >> 24U) & DUK_U64_CONSTANT(0xff0000)) | \ + ((((duk_uint64_t) (x)) >> 8U) & DUK_U64_CONSTANT(0xff000000)) | \ + ((((duk_uint64_t) (x)) << 8U) & DUK_U64_CONSTANT(0xff00000000)) | \ + ((((duk_uint64_t) (x)) << 24U) & DUK_U64_CONSTANT(0xff0000000000)) | \ + ((((duk_uint64_t) (x)) << 40U) & DUK_U64_CONSTANT(0xff000000000000)) | \ + (((duk_uint64_t) (x)) << 56U)) +#endif +#endif +#if !defined(DUK_BSWAP32) +#define DUK_BSWAP32(x) \ + ((((duk_uint32_t) (x)) >> 24U) | \ + ((((duk_uint32_t) (x)) >> 8U) & 0xff00UL) | \ + ((((duk_uint32_t) (x)) << 8U) & 0xff0000UL) | \ + (((duk_uint32_t) (x)) << 24U)) +#endif +#if !defined(DUK_BSWAP16) +#define DUK_BSWAP16(x) \ + ((duk_uint16_t) (x) >> 8U) | \ + ((duk_uint16_t) (x) << 8U) +#endif + +/* DUK_USE_VARIADIC_MACROS: required from compilers, so no fill-in. */ +/* DUK_USE_UNION_INITIALIZERS: required from compilers, so no fill-in. */ + +#if !(defined(DUK_USE_FLEX_C99) || defined(DUK_USE_FLEX_ZEROSIZE) || defined(DUK_USE_FLEX_ONESIZE)) +#if defined(DUK_F_C99) +#define DUK_USE_FLEX_C99 +#else +#define DUK_USE_FLEX_ZEROSIZE /* Not standard but common enough */ +#endif +#endif + +#if !(defined(DUK_USE_PACK_GCC_ATTR) || defined(DUK_USE_PACK_CLANG_ATTR) || \ + defined(DUK_USE_PACK_MSVC_PRAGMA) || defined(DUK_USE_PACK_DUMMY_MEMBER)) +#define DUK_USE_PACK_DUMMY_MEMBER +#endif + +#if 0 /* not defined by default */ +#undef DUK_USE_GCC_PRAGMAS +#endif + +/* Workaround for GH-323: avoid inlining control when compiling from + * multiple sources, as it causes compiler portability trouble. + */ +#if !defined(DUK_SINGLE_FILE) +#undef DUK_NOINLINE +#undef DUK_INLINE +#undef DUK_ALWAYS_INLINE +#define DUK_NOINLINE /*nop*/ +#define DUK_INLINE /*nop*/ +#define DUK_ALWAYS_INLINE /*nop*/ +#endif + +/* + * Check whether or not a packed duk_tval representation is possible. + * What's basically required is that pointers are 32-bit values + * (sizeof(void *) == 4). Best effort check, not always accurate. + * If guess goes wrong, crashes may result; self tests also verify + * the guess. + */ + +/* Explicit marker needed; may be 'defined', 'undefined, 'or 'not provided'. */ +#if !defined(DUK_F_PACKED_TVAL_PROVIDED) +#undef DUK_F_PACKED_TVAL_POSSIBLE + +/* Strict C99 case: DUK_UINTPTR_MAX (= UINTPTR_MAX) should be very reliable */ +#if !defined(DUK_F_PACKED_TVAL_POSSIBLE) && defined(DUK_UINTPTR_MAX) +#if (DUK_UINTPTR_MAX <= 0xffffffffUL) +#define DUK_F_PACKED_TVAL_POSSIBLE +#endif +#endif + +/* Non-C99 case, still relying on DUK_UINTPTR_MAX, as long as it is not a computed value */ +#if !defined(DUK_F_PACKED_TVAL_POSSIBLE) && defined(DUK_UINTPTR_MAX) && !defined(DUK_UINTPTR_MAX_COMPUTED) +#if (DUK_UINTPTR_MAX <= 0xffffffffUL) +#define DUK_F_PACKED_TVAL_POSSIBLE +#endif +#endif + +/* DUK_SIZE_MAX (= SIZE_MAX) is often reliable */ +#if !defined(DUK_F_PACKED_TVAL_POSSIBLE) && defined(DUK_SIZE_MAX) && !defined(DUK_SIZE_MAX_COMPUTED) +#if (DUK_SIZE_MAX <= 0xffffffffUL) +#define DUK_F_PACKED_TVAL_POSSIBLE +#endif +#endif + +#undef DUK_USE_PACKED_TVAL +#if defined(DUK_F_PACKED_TVAL_POSSIBLE) +#define DUK_USE_PACKED_TVAL +#endif +#undef DUK_F_PACKED_TVAL_POSSIBLE + +#endif /* DUK_F_PACKED_TVAL_PROVIDED */ +/* Object property allocation layout has implications for memory and code + * footprint and generated code size/speed. The best layout also depends + * on whether the platform has alignment requirements or benefits from + * having mostly aligned accesses. + */ +#undef DUK_USE_HOBJECT_LAYOUT_1 +#undef DUK_USE_HOBJECT_LAYOUT_2 +#undef DUK_USE_HOBJECT_LAYOUT_3 +#if (DUK_USE_ALIGN_BY == 1) +/* On platforms without any alignment issues, layout 1 is preferable + * because it compiles to slightly less code and provides direct access + * to property keys. + */ +#define DUK_USE_HOBJECT_LAYOUT_1 +#else +/* On other platforms use layout 2, which requires some padding but + * is a bit more natural than layout 3 in ordering the entries. Layout + * 3 is currently not used. + */ +#define DUK_USE_HOBJECT_LAYOUT_2 +#endif + +/* GCC/clang inaccurate math would break compliance and probably duk_tval, + * so refuse to compile. Relax this if -ffast-math is tested to work. + */ +#if defined(__FAST_MATH__) +#error __FAST_MATH__ defined, refusing to compile +#endif + +/* + * Autogenerated defaults + */ + +#undef DUK_USE_ALLOW_UNDEFINED_BEHAVIOR +#define DUK_USE_ARRAY_BUILTIN +#define DUK_USE_ARRAY_FASTPATH +#define DUK_USE_ARRAY_PROP_FASTPATH +#undef DUK_USE_ASSERTIONS +#define DUK_USE_AUGMENT_ERROR_CREATE +#define DUK_USE_AUGMENT_ERROR_THROW +#define DUK_USE_AVOID_PLATFORM_FUNCPTRS +#define DUK_USE_BASE64_FASTPATH +#define DUK_USE_BASE64_SUPPORT +#define DUK_USE_BOOLEAN_BUILTIN +#define DUK_USE_BUFFEROBJECT_SUPPORT +#undef DUK_USE_BUFLEN16 +#define DUK_USE_BYTECODE_DUMP_SUPPORT +#define DUK_USE_CACHE_ACTIVATION +#define DUK_USE_CACHE_CATCHER +#define DUK_USE_CALLSTACK_LIMIT 10000 +#define DUK_USE_CBOR_BUILTIN +#define DUK_USE_CBOR_DEC_RECLIMIT 1000 +#define DUK_USE_CBOR_ENC_RECLIMIT 1000 +#define DUK_USE_CBOR_SUPPORT +#define DUK_USE_COMPILER_RECLIMIT 2500 +#define DUK_USE_COROUTINE_SUPPORT +#undef DUK_USE_CPP_EXCEPTIONS +#undef DUK_USE_DATAPTR16 +#undef DUK_USE_DATAPTR_DEC16 +#undef DUK_USE_DATAPTR_ENC16 +#define DUK_USE_DATE_BUILTIN +#undef DUK_USE_DATE_FORMAT_STRING +#undef DUK_USE_DATE_GET_LOCAL_TZOFFSET +#undef DUK_USE_DATE_GET_NOW +#undef DUK_USE_DATE_PARSE_STRING +#undef DUK_USE_DATE_PRS_GETDATE +#undef DUK_USE_DEBUG +#undef DUK_USE_DEBUGGER_DUMPHEAP +#undef DUK_USE_DEBUGGER_INSPECT +#undef DUK_USE_DEBUGGER_PAUSE_UNCAUGHT +#undef DUK_USE_DEBUGGER_SUPPORT +#define DUK_USE_DEBUGGER_THROW_NOTIFY +#undef DUK_USE_DEBUGGER_TRANSPORT_TORTURE +#define DUK_USE_DEBUG_BUFSIZE 65536L +#define DUK_USE_DEBUG_LEVEL 0 +#undef DUK_USE_DEBUG_WRITE +#define DUK_USE_DOUBLE_LINKED_HEAP +#define DUK_USE_DUKTAPE_BUILTIN +#define DUK_USE_ENCODING_BUILTINS +#define DUK_USE_ERRCREATE +#define DUK_USE_ERRTHROW +#define DUK_USE_ES6 +#define DUK_USE_ES6_OBJECT_PROTO_PROPERTY +#define DUK_USE_ES6_OBJECT_SETPROTOTYPEOF +#define DUK_USE_ES6_PROXY +#define DUK_USE_ES6_REGEXP_SYNTAX +#define DUK_USE_ES6_UNICODE_ESCAPE +#define DUK_USE_ES7 +#define DUK_USE_ES7_EXP_OPERATOR +#define DUK_USE_ES8 +#define DUK_USE_ES9 +#define DUK_USE_ESBC_LIMITS +#define DUK_USE_ESBC_MAX_BYTES 2147418112L +#define DUK_USE_ESBC_MAX_LINENUMBER 2147418112L +#undef DUK_USE_EXEC_FUN_LOCAL +#undef DUK_USE_EXEC_INDIRECT_BOUND_CHECK +#undef DUK_USE_EXEC_PREFER_SIZE +#define DUK_USE_EXEC_REGCONST_OPTIMIZE +#undef DUK_USE_EXEC_TIMEOUT_CHECK +#undef DUK_USE_EXPLICIT_NULL_INIT +#undef DUK_USE_EXTSTR_FREE +#undef DUK_USE_EXTSTR_INTERN_CHECK +#undef DUK_USE_FASTINT +#define DUK_USE_FAST_REFCOUNT_DEFAULT +#undef DUK_USE_FATAL_HANDLER +#define DUK_USE_FATAL_MAXLEN 128 +#define DUK_USE_FINALIZER_SUPPORT +#undef DUK_USE_FINALIZER_TORTURE +#undef DUK_USE_FUNCPTR16 +#undef DUK_USE_FUNCPTR_DEC16 +#undef DUK_USE_FUNCPTR_ENC16 +#define DUK_USE_FUNCTION_BUILTIN +#define DUK_USE_FUNC_FILENAME_PROPERTY +#define DUK_USE_FUNC_NAME_PROPERTY +#undef DUK_USE_GC_TORTURE +#undef DUK_USE_GET_MONOTONIC_TIME +#undef DUK_USE_GET_RANDOM_DOUBLE +#define DUK_USE_GLOBAL_BINDING +#define DUK_USE_GLOBAL_BUILTIN +#undef DUK_USE_HEAPPTR16 +#undef DUK_USE_HEAPPTR_DEC16 +#undef DUK_USE_HEAPPTR_ENC16 +#define DUK_USE_HEX_FASTPATH +#define DUK_USE_HEX_SUPPORT +#define DUK_USE_HOBJECT_ARRAY_ABANDON_LIMIT 2 +#define DUK_USE_HOBJECT_ARRAY_ABANDON_MINSIZE 257 +#define DUK_USE_HOBJECT_ARRAY_FAST_RESIZE_LIMIT 9 +#define DUK_USE_HOBJECT_ARRAY_MINGROW_ADD 16 +#define DUK_USE_HOBJECT_ARRAY_MINGROW_DIVISOR 8 +#define DUK_USE_HOBJECT_ENTRY_MINGROW_ADD 16 +#define DUK_USE_HOBJECT_ENTRY_MINGROW_DIVISOR 8 +#define DUK_USE_HOBJECT_HASH_PART +#define DUK_USE_HOBJECT_HASH_PROP_LIMIT 8 +#define DUK_USE_HSTRING_ARRIDX +#define DUK_USE_HSTRING_CLEN +#undef DUK_USE_HSTRING_EXTDATA +#define DUK_USE_HSTRING_LAZY_CLEN +#define DUK_USE_HTML_COMMENTS +#define DUK_USE_IDCHAR_FASTPATH +#undef DUK_USE_INJECT_HEAP_ALLOC_ERROR +#undef DUK_USE_INTERRUPT_COUNTER +#undef DUK_USE_INTERRUPT_DEBUG_FIXUP +#define DUK_USE_JC +#define DUK_USE_JSON_BUILTIN +#define DUK_USE_JSON_DECNUMBER_FASTPATH +#define DUK_USE_JSON_DECSTRING_FASTPATH +#define DUK_USE_JSON_DEC_RECLIMIT 1000 +#define DUK_USE_JSON_EATWHITE_FASTPATH +#define DUK_USE_JSON_ENC_RECLIMIT 1000 +#define DUK_USE_JSON_QUOTESTRING_FASTPATH +#undef DUK_USE_JSON_STRINGIFY_FASTPATH +#define DUK_USE_JSON_SUPPORT +#define DUK_USE_JX +#define DUK_USE_LEXER_SLIDING_WINDOW +#undef DUK_USE_LIGHTFUNC_BUILTINS +#define DUK_USE_LITCACHE_SIZE 256 +#define DUK_USE_MARK_AND_SWEEP_RECLIMIT 256 +#define DUK_USE_MATH_BUILTIN +#define DUK_USE_NATIVE_CALL_RECLIMIT 1000 +#undef DUK_USE_NATIVE_STACK_CHECK +#define DUK_USE_NONSTD_ARRAY_SPLICE_DELCOUNT +#undef DUK_USE_NONSTD_FUNC_CALLER_PROPERTY +#undef DUK_USE_NONSTD_FUNC_SOURCE_PROPERTY +#define DUK_USE_NONSTD_FUNC_STMT +#define DUK_USE_NONSTD_GETTER_KEY_ARGUMENT +#define DUK_USE_NONSTD_JSON_ESC_U2028_U2029 +#define DUK_USE_NONSTD_SETTER_KEY_ARGUMENT +#define DUK_USE_NONSTD_STRING_FROMCHARCODE_32BIT +#define DUK_USE_NUMBER_BUILTIN +#define DUK_USE_OBJECT_BUILTIN +#undef DUK_USE_OBJSIZES16 +#undef DUK_USE_PARANOID_ERRORS +#define DUK_USE_PC2LINE +#define DUK_USE_PERFORMANCE_BUILTIN +#undef DUK_USE_PREFER_SIZE +#undef DUK_USE_PROMISE_BUILTIN +#define DUK_USE_PROVIDE_DEFAULT_ALLOC_FUNCTIONS +#undef DUK_USE_REFCOUNT16 +#define DUK_USE_REFCOUNT32 +#define DUK_USE_REFERENCE_COUNTING +#define DUK_USE_REFLECT_BUILTIN +#define DUK_USE_REGEXP_CANON_BITMAP +#undef DUK_USE_REGEXP_CANON_WORKAROUND +#define DUK_USE_REGEXP_COMPILER_RECLIMIT 10000 +#define DUK_USE_REGEXP_EXECUTOR_RECLIMIT 10000 +#define DUK_USE_REGEXP_SUPPORT +#undef DUK_USE_ROM_GLOBAL_CLONE +#undef DUK_USE_ROM_GLOBAL_INHERIT +#undef DUK_USE_ROM_OBJECTS +#define DUK_USE_ROM_PTRCOMP_FIRST 63488L +#undef DUK_USE_ROM_STRINGS +#define DUK_USE_SECTION_B +#undef DUK_USE_SELF_TESTS +#define DUK_USE_SHEBANG_COMMENTS +#undef DUK_USE_SHUFFLE_TORTURE +#define DUK_USE_SOURCE_NONBMP +#undef DUK_USE_STRHASH16 +#undef DUK_USE_STRHASH_DENSE +#define DUK_USE_STRHASH_SKIP_SHIFT 5 +#define DUK_USE_STRICT_DECL +#undef DUK_USE_STRICT_UTF8_SOURCE +#define DUK_USE_STRING_BUILTIN +#undef DUK_USE_STRLEN16 +#define DUK_USE_STRTAB_GROW_LIMIT 17 +#define DUK_USE_STRTAB_MAXSIZE 268435456L +#define DUK_USE_STRTAB_MINSIZE 1024 +#undef DUK_USE_STRTAB_PTRCOMP +#define DUK_USE_STRTAB_RESIZE_CHECK_MASK 255 +#define DUK_USE_STRTAB_SHRINK_LIMIT 6 +#undef DUK_USE_STRTAB_TORTURE +#define DUK_USE_SYMBOL_BUILTIN +#define DUK_USE_TAILCALL +#define DUK_USE_TARGET_INFO "unknown" +#define DUK_USE_TRACEBACKS +#define DUK_USE_TRACEBACK_DEPTH 10 +#define DUK_USE_VALSTACK_GROW_SHIFT 2 +#define DUK_USE_VALSTACK_LIMIT 1000000L +#define DUK_USE_VALSTACK_SHRINK_CHECK_SHIFT 2 +#define DUK_USE_VALSTACK_SHRINK_SLACK_SHIFT 4 +#undef DUK_USE_VALSTACK_UNSAFE +#define DUK_USE_VERBOSE_ERRORS +#define DUK_USE_VERBOSE_EXECUTOR_ERRORS +#define DUK_USE_VOLUNTARY_GC +#define DUK_USE_ZERO_BUFFER_DATA + +/* + * You may add overriding #define/#undef directives below for + * customization. You of course cannot un-#include or un-typedef + * anything; these require direct changes above. + */ + +/* __OVERRIDE_DEFINES__ */ + +/* + * Conditional includes + */ + +#if defined(DUK_F_CPP) && defined(DUK_USE_CPP_EXCEPTIONS) +#include /* std::exception */ +#include /* std::runtime_error */ +#endif + +/* + * Date provider selection + * + * User may define DUK_USE_DATE_GET_NOW() etc directly, in which case we'll + * rely on an external provider. If this is not done, revert to previous + * behavior and use Unix/Windows built-in provider. + */ + +#if defined(DUK_COMPILING_DUKTAPE) + +#if defined(DUK_USE_DATE_GET_NOW) +/* External provider already defined. */ +#elif defined(DUK_USE_DATE_NOW_GETTIMEOFDAY) +#define DUK_USE_DATE_GET_NOW(ctx) duk_bi_date_get_now_gettimeofday() +#elif defined(DUK_USE_DATE_NOW_TIME) +#define DUK_USE_DATE_GET_NOW(ctx) duk_bi_date_get_now_time() +#elif defined(DUK_USE_DATE_NOW_WINDOWS) +#define DUK_USE_DATE_GET_NOW(ctx) duk_bi_date_get_now_windows() +#elif defined(DUK_USE_DATE_NOW_WINDOWS_SUBMS) +#define DUK_USE_DATE_GET_NOW(ctx) duk_bi_date_get_now_windows_subms() +#else +#error no provider for DUK_USE_DATE_GET_NOW() +#endif + +#if defined(DUK_USE_DATE_GET_LOCAL_TZOFFSET) +/* External provider already defined. */ +#elif defined(DUK_USE_DATE_TZO_GMTIME_R) || defined(DUK_USE_DATE_TZO_GMTIME_S) || defined(DUK_USE_DATE_TZO_GMTIME) +#define DUK_USE_DATE_GET_LOCAL_TZOFFSET(d) duk_bi_date_get_local_tzoffset_gmtime((d)) +#elif defined(DUK_USE_DATE_TZO_WINDOWS) +#define DUK_USE_DATE_GET_LOCAL_TZOFFSET(d) duk_bi_date_get_local_tzoffset_windows((d)) +#elif defined(DUK_USE_DATE_TZO_WINDOWS_NO_DST) +#define DUK_USE_DATE_GET_LOCAL_TZOFFSET(d) duk_bi_date_get_local_tzoffset_windows_no_dst((d)) +#else +#error no provider for DUK_USE_DATE_GET_LOCAL_TZOFFSET() +#endif + +#if defined(DUK_USE_DATE_PARSE_STRING) +/* External provider already defined. */ +#elif defined(DUK_USE_DATE_PRS_STRPTIME) +#define DUK_USE_DATE_PARSE_STRING(ctx,str) duk_bi_date_parse_string_strptime((ctx), (str)) +#elif defined(DUK_USE_DATE_PRS_GETDATE) +#define DUK_USE_DATE_PARSE_STRING(ctx,str) duk_bi_date_parse_string_getdate((ctx), (str)) +#else +/* No provider for DUK_USE_DATE_PARSE_STRING(), fall back to ISO 8601 only. */ +#endif + +#if defined(DUK_USE_DATE_FORMAT_STRING) +/* External provider already defined. */ +#elif defined(DUK_USE_DATE_FMT_STRFTIME) +#define DUK_USE_DATE_FORMAT_STRING(ctx,parts,tzoffset,flags) \ + duk_bi_date_format_parts_strftime((ctx), (parts), (tzoffset), (flags)) +#else +/* No provider for DUK_USE_DATE_FORMAT_STRING(), fall back to ISO 8601 only. */ +#endif + +#if defined(DUK_USE_GET_MONOTONIC_TIME) +/* External provider already defined. */ +#elif defined(DUK_USE_GET_MONOTONIC_TIME_CLOCK_GETTIME) +#define DUK_USE_GET_MONOTONIC_TIME(ctx) duk_bi_date_get_monotonic_time_clock_gettime() +#elif defined(DUK_USE_GET_MONOTONIC_TIME_WINDOWS_QPC) +#define DUK_USE_GET_MONOTONIC_TIME(ctx) duk_bi_date_get_monotonic_time_windows_qpc() +#else +/* No provider for DUK_USE_GET_MONOTONIC_TIME(), fall back to DUK_USE_DATE_GET_NOW(). */ +#endif + +#endif /* DUK_COMPILING_DUKTAPE */ + +/* + * Checks for legacy feature options (DUK_OPT_xxx) + */ + +#if defined(DUK_OPT_ASSERTIONS) +#error unsupported legacy feature option DUK_OPT_ASSERTIONS used +#endif +#if defined(DUK_OPT_BUFFEROBJECT_SUPPORT) +#error unsupported legacy feature option DUK_OPT_BUFFEROBJECT_SUPPORT used +#endif +#if defined(DUK_OPT_BUFLEN16) +#error unsupported legacy feature option DUK_OPT_BUFLEN16 used +#endif +#if defined(DUK_OPT_DATAPTR16) +#error unsupported legacy feature option DUK_OPT_DATAPTR16 used +#endif +#if defined(DUK_OPT_DATAPTR_DEC16) +#error unsupported legacy feature option DUK_OPT_DATAPTR_DEC16 used +#endif +#if defined(DUK_OPT_DATAPTR_ENC16) +#error unsupported legacy feature option DUK_OPT_DATAPTR_ENC16 used +#endif +#if defined(DUK_OPT_DDDPRINT) +#error unsupported legacy feature option DUK_OPT_DDDPRINT used +#endif +#if defined(DUK_OPT_DDPRINT) +#error unsupported legacy feature option DUK_OPT_DDPRINT used +#endif +#if defined(DUK_OPT_DEBUG) +#error unsupported legacy feature option DUK_OPT_DEBUG used +#endif +#if defined(DUK_OPT_DEBUGGER_DUMPHEAP) +#error unsupported legacy feature option DUK_OPT_DEBUGGER_DUMPHEAP used +#endif +#if defined(DUK_OPT_DEBUGGER_FWD_LOGGING) +#error unsupported legacy feature option DUK_OPT_DEBUGGER_FWD_LOGGING used +#endif +#if defined(DUK_OPT_DEBUGGER_FWD_PRINTALERT) +#error unsupported legacy feature option DUK_OPT_DEBUGGER_FWD_PRINTALERT used +#endif +#if defined(DUK_OPT_DEBUGGER_SUPPORT) +#error unsupported legacy feature option DUK_OPT_DEBUGGER_SUPPORT used +#endif +#if defined(DUK_OPT_DEBUGGER_TRANSPORT_TORTURE) +#error unsupported legacy feature option DUK_OPT_DEBUGGER_TRANSPORT_TORTURE used +#endif +#if defined(DUK_OPT_DEBUG_BUFSIZE) +#error unsupported legacy feature option DUK_OPT_DEBUG_BUFSIZE used +#endif +#if defined(DUK_OPT_DECLARE) +#error unsupported legacy feature option DUK_OPT_DECLARE used +#endif +#if defined(DUK_OPT_DEEP_C_STACK) +#error unsupported legacy feature option DUK_OPT_DEEP_C_STACK used +#endif +#if defined(DUK_OPT_DLL_BUILD) +#error unsupported legacy feature option DUK_OPT_DLL_BUILD used +#endif +#if defined(DUK_OPT_DPRINT) +#error unsupported legacy feature option DUK_OPT_DPRINT used +#endif +#if defined(DUK_OPT_DPRINT_COLORS) +#error unsupported legacy feature option DUK_OPT_DPRINT_COLORS used +#endif +#if defined(DUK_OPT_DPRINT_RDTSC) +#error unsupported legacy feature option DUK_OPT_DPRINT_RDTSC used +#endif +#if defined(DUK_OPT_EXEC_TIMEOUT_CHECK) +#error unsupported legacy feature option DUK_OPT_EXEC_TIMEOUT_CHECK used +#endif +#if defined(DUK_OPT_EXTERNAL_STRINGS) +#error unsupported legacy feature option DUK_OPT_EXTERNAL_STRINGS used +#endif +#if defined(DUK_OPT_EXTSTR_FREE) +#error unsupported legacy feature option DUK_OPT_EXTSTR_FREE used +#endif +#if defined(DUK_OPT_EXTSTR_INTERN_CHECK) +#error unsupported legacy feature option DUK_OPT_EXTSTR_INTERN_CHECK used +#endif +#if defined(DUK_OPT_FASTINT) +#error unsupported legacy feature option DUK_OPT_FASTINT used +#endif +#if defined(DUK_OPT_FORCE_ALIGN) +#error unsupported legacy feature option DUK_OPT_FORCE_ALIGN used +#endif +#if defined(DUK_OPT_FORCE_BYTEORDER) +#error unsupported legacy feature option DUK_OPT_FORCE_BYTEORDER used +#endif +#if defined(DUK_OPT_FUNCPTR16) +#error unsupported legacy feature option DUK_OPT_FUNCPTR16 used +#endif +#if defined(DUK_OPT_FUNCPTR_DEC16) +#error unsupported legacy feature option DUK_OPT_FUNCPTR_DEC16 used +#endif +#if defined(DUK_OPT_FUNCPTR_ENC16) +#error unsupported legacy feature option DUK_OPT_FUNCPTR_ENC16 used +#endif +#if defined(DUK_OPT_FUNC_NONSTD_CALLER_PROPERTY) +#error unsupported legacy feature option DUK_OPT_FUNC_NONSTD_CALLER_PROPERTY used +#endif +#if defined(DUK_OPT_FUNC_NONSTD_SOURCE_PROPERTY) +#error unsupported legacy feature option DUK_OPT_FUNC_NONSTD_SOURCE_PROPERTY used +#endif +#if defined(DUK_OPT_GC_TORTURE) +#error unsupported legacy feature option DUK_OPT_GC_TORTURE used +#endif +#if defined(DUK_OPT_HAVE_CUSTOM_H) +#error unsupported legacy feature option DUK_OPT_HAVE_CUSTOM_H used +#endif +#if defined(DUK_OPT_HEAPPTR16) +#error unsupported legacy feature option DUK_OPT_HEAPPTR16 used +#endif +#if defined(DUK_OPT_HEAPPTR_DEC16) +#error unsupported legacy feature option DUK_OPT_HEAPPTR_DEC16 used +#endif +#if defined(DUK_OPT_HEAPPTR_ENC16) +#error unsupported legacy feature option DUK_OPT_HEAPPTR_ENC16 used +#endif +#if defined(DUK_OPT_INTERRUPT_COUNTER) +#error unsupported legacy feature option DUK_OPT_INTERRUPT_COUNTER used +#endif +#if defined(DUK_OPT_JSON_STRINGIFY_FASTPATH) +#error unsupported legacy feature option DUK_OPT_JSON_STRINGIFY_FASTPATH used +#endif +#if defined(DUK_OPT_LIGHTFUNC_BUILTINS) +#error unsupported legacy feature option DUK_OPT_LIGHTFUNC_BUILTINS used +#endif +#if defined(DUK_OPT_NONSTD_FUNC_CALLER_PROPERTY) +#error unsupported legacy feature option DUK_OPT_NONSTD_FUNC_CALLER_PROPERTY used +#endif +#if defined(DUK_OPT_NONSTD_FUNC_SOURCE_PROPERTY) +#error unsupported legacy feature option DUK_OPT_NONSTD_FUNC_SOURCE_PROPERTY used +#endif +#if defined(DUK_OPT_NO_ARRAY_SPLICE_NONSTD_DELCOUNT) +#error unsupported legacy feature option DUK_OPT_NO_ARRAY_SPLICE_NONSTD_DELCOUNT used +#endif +#if defined(DUK_OPT_NO_AUGMENT_ERRORS) +#error unsupported legacy feature option DUK_OPT_NO_AUGMENT_ERRORS used +#endif +#if defined(DUK_OPT_NO_BROWSER_LIKE) +#error unsupported legacy feature option DUK_OPT_NO_BROWSER_LIKE used +#endif +#if defined(DUK_OPT_NO_BUFFEROBJECT_SUPPORT) +#error unsupported legacy feature option DUK_OPT_NO_BUFFEROBJECT_SUPPORT used +#endif +#if defined(DUK_OPT_NO_BYTECODE_DUMP_SUPPORT) +#error unsupported legacy feature option DUK_OPT_NO_BYTECODE_DUMP_SUPPORT used +#endif +#if defined(DUK_OPT_NO_COMMONJS_MODULES) +#error unsupported legacy feature option DUK_OPT_NO_COMMONJS_MODULES used +#endif +#if defined(DUK_OPT_NO_ES6_OBJECT_PROTO_PROPERTY) +#error unsupported legacy feature option DUK_OPT_NO_ES6_OBJECT_PROTO_PROPERTY used +#endif +#if defined(DUK_OPT_NO_ES6_OBJECT_SETPROTOTYPEOF) +#error unsupported legacy feature option DUK_OPT_NO_ES6_OBJECT_SETPROTOTYPEOF used +#endif +#if defined(DUK_OPT_NO_ES6_PROXY) +#error unsupported legacy feature option DUK_OPT_NO_ES6_PROXY used +#endif +#if defined(DUK_OPT_NO_FILE_IO) +#error unsupported legacy feature option DUK_OPT_NO_FILE_IO used +#endif +#if defined(DUK_OPT_NO_FUNC_STMT) +#error unsupported legacy feature option DUK_OPT_NO_FUNC_STMT used +#endif +#if defined(DUK_OPT_NO_JC) +#error unsupported legacy feature option DUK_OPT_NO_JC used +#endif +#if defined(DUK_OPT_NO_JSONC) +#error unsupported legacy feature option DUK_OPT_NO_JSONC used +#endif +#if defined(DUK_OPT_NO_JSONX) +#error unsupported legacy feature option DUK_OPT_NO_JSONX used +#endif +#if defined(DUK_OPT_NO_JX) +#error unsupported legacy feature option DUK_OPT_NO_JX used +#endif +#if defined(DUK_OPT_NO_MARK_AND_SWEEP) +#error unsupported legacy feature option DUK_OPT_NO_MARK_AND_SWEEP used +#endif +#if defined(DUK_OPT_NO_MS_STRINGTABLE_RESIZE) +#error unsupported legacy feature option DUK_OPT_NO_MS_STRINGTABLE_RESIZE used +#endif +#if defined(DUK_OPT_NO_NONSTD_ACCESSOR_KEY_ARGUMENT) +#error unsupported legacy feature option DUK_OPT_NO_NONSTD_ACCESSOR_KEY_ARGUMENT used +#endif +#if defined(DUK_OPT_NO_NONSTD_ARRAY_CONCAT_TRAILER) +#error unsupported legacy feature option DUK_OPT_NO_NONSTD_ARRAY_CONCAT_TRAILER used +#endif +#if defined(DUK_OPT_NO_NONSTD_ARRAY_MAP_TRAILER) +#error unsupported legacy feature option DUK_OPT_NO_NONSTD_ARRAY_MAP_TRAILER used +#endif +#if defined(DUK_OPT_NO_NONSTD_ARRAY_SPLICE_DELCOUNT) +#error unsupported legacy feature option DUK_OPT_NO_NONSTD_ARRAY_SPLICE_DELCOUNT used +#endif +#if defined(DUK_OPT_NO_NONSTD_FUNC_STMT) +#error unsupported legacy feature option DUK_OPT_NO_NONSTD_FUNC_STMT used +#endif +#if defined(DUK_OPT_NO_NONSTD_JSON_ESC_U2028_U2029) +#error unsupported legacy feature option DUK_OPT_NO_NONSTD_JSON_ESC_U2028_U2029 used +#endif +#if defined(DUK_OPT_NO_NONSTD_STRING_FROMCHARCODE_32BIT) +#error unsupported legacy feature option DUK_OPT_NO_NONSTD_STRING_FROMCHARCODE_32BIT used +#endif +#if defined(DUK_OPT_NO_OBJECT_ES6_PROTO_PROPERTY) +#error unsupported legacy feature option DUK_OPT_NO_OBJECT_ES6_PROTO_PROPERTY used +#endif +#if defined(DUK_OPT_NO_OBJECT_ES6_SETPROTOTYPEOF) +#error unsupported legacy feature option DUK_OPT_NO_OBJECT_ES6_SETPROTOTYPEOF used +#endif +#if defined(DUK_OPT_NO_OCTAL_SUPPORT) +#error unsupported legacy feature option DUK_OPT_NO_OCTAL_SUPPORT used +#endif +#if defined(DUK_OPT_NO_PACKED_TVAL) +#error unsupported legacy feature option DUK_OPT_NO_PACKED_TVAL used +#endif +#if defined(DUK_OPT_NO_PC2LINE) +#error unsupported legacy feature option DUK_OPT_NO_PC2LINE used +#endif +#if defined(DUK_OPT_NO_REFERENCE_COUNTING) +#error unsupported legacy feature option DUK_OPT_NO_REFERENCE_COUNTING used +#endif +#if defined(DUK_OPT_NO_REGEXP_SUPPORT) +#error unsupported legacy feature option DUK_OPT_NO_REGEXP_SUPPORT used +#endif +#if defined(DUK_OPT_NO_SECTION_B) +#error unsupported legacy feature option DUK_OPT_NO_SECTION_B used +#endif +#if defined(DUK_OPT_NO_SOURCE_NONBMP) +#error unsupported legacy feature option DUK_OPT_NO_SOURCE_NONBMP used +#endif +#if defined(DUK_OPT_NO_STRICT_DECL) +#error unsupported legacy feature option DUK_OPT_NO_STRICT_DECL used +#endif +#if defined(DUK_OPT_NO_TRACEBACKS) +#error unsupported legacy feature option DUK_OPT_NO_TRACEBACKS used +#endif +#if defined(DUK_OPT_NO_VERBOSE_ERRORS) +#error unsupported legacy feature option DUK_OPT_NO_VERBOSE_ERRORS used +#endif +#if defined(DUK_OPT_NO_VOLUNTARY_GC) +#error unsupported legacy feature option DUK_OPT_NO_VOLUNTARY_GC used +#endif +#if defined(DUK_OPT_NO_ZERO_BUFFER_DATA) +#error unsupported legacy feature option DUK_OPT_NO_ZERO_BUFFER_DATA used +#endif +#if defined(DUK_OPT_OBJSIZES16) +#error unsupported legacy feature option DUK_OPT_OBJSIZES16 used +#endif +#if defined(DUK_OPT_PANIC_HANDLER) +#error unsupported legacy feature option DUK_OPT_PANIC_HANDLER used +#endif +#if defined(DUK_OPT_REFCOUNT16) +#error unsupported legacy feature option DUK_OPT_REFCOUNT16 used +#endif +#if defined(DUK_OPT_SEGFAULT_ON_PANIC) +#error unsupported legacy feature option DUK_OPT_SEGFAULT_ON_PANIC used +#endif +#if defined(DUK_OPT_SELF_TESTS) +#error unsupported legacy feature option DUK_OPT_SELF_TESTS used +#endif +#if defined(DUK_OPT_SETJMP) +#error unsupported legacy feature option DUK_OPT_SETJMP used +#endif +#if defined(DUK_OPT_SHUFFLE_TORTURE) +#error unsupported legacy feature option DUK_OPT_SHUFFLE_TORTURE used +#endif +#if defined(DUK_OPT_SIGSETJMP) +#error unsupported legacy feature option DUK_OPT_SIGSETJMP used +#endif +#if defined(DUK_OPT_STRHASH16) +#error unsupported legacy feature option DUK_OPT_STRHASH16 used +#endif +#if defined(DUK_OPT_STRICT_UTF8_SOURCE) +#error unsupported legacy feature option DUK_OPT_STRICT_UTF8_SOURCE used +#endif +#if defined(DUK_OPT_STRLEN16) +#error unsupported legacy feature option DUK_OPT_STRLEN16 used +#endif +#if defined(DUK_OPT_STRTAB_CHAIN) +#error unsupported legacy feature option DUK_OPT_STRTAB_CHAIN used +#endif +#if defined(DUK_OPT_STRTAB_CHAIN_SIZE) +#error unsupported legacy feature option DUK_OPT_STRTAB_CHAIN_SIZE used +#endif +#if defined(DUK_OPT_TARGET_INFO) +#error unsupported legacy feature option DUK_OPT_TARGET_INFO used +#endif +#if defined(DUK_OPT_TRACEBACK_DEPTH) +#error unsupported legacy feature option DUK_OPT_TRACEBACK_DEPTH used +#endif +#if defined(DUK_OPT_UNDERSCORE_SETJMP) +#error unsupported legacy feature option DUK_OPT_UNDERSCORE_SETJMP used +#endif +#if defined(DUK_OPT_USER_INITJS) +#error unsupported legacy feature option DUK_OPT_USER_INITJS used +#endif + +/* + * Checks for config option consistency (DUK_USE_xxx) + */ + +#if defined(DUK_USE_32BIT_PTRS) +#error unsupported config option used (option has been removed): DUK_USE_32BIT_PTRS +#endif +#if defined(DUK_USE_ALIGN_4) +#error unsupported config option used (option has been removed): DUK_USE_ALIGN_4 +#endif +#if defined(DUK_USE_ALIGN_8) +#error unsupported config option used (option has been removed): DUK_USE_ALIGN_8 +#endif +#if defined(DUK_USE_BROWSER_LIKE) +#error unsupported config option used (option has been removed): DUK_USE_BROWSER_LIKE +#endif +#if defined(DUK_USE_BUILTIN_INITJS) +#error unsupported config option used (option has been removed): DUK_USE_BUILTIN_INITJS +#endif +#if defined(DUK_USE_BYTEORDER_FORCED) +#error unsupported config option used (option has been removed): DUK_USE_BYTEORDER_FORCED +#endif +#if defined(DUK_USE_COMMONJS_MODULES) +#error unsupported config option used (option has been removed): DUK_USE_COMMONJS_MODULES +#endif +#if defined(DUK_USE_DATAPTR_DEC16) && !defined(DUK_USE_DATAPTR16) +#error config option DUK_USE_DATAPTR_DEC16 requires option DUK_USE_DATAPTR16 (which is missing) +#endif +#if defined(DUK_USE_DATAPTR_ENC16) && !defined(DUK_USE_DATAPTR16) +#error config option DUK_USE_DATAPTR_ENC16 requires option DUK_USE_DATAPTR16 (which is missing) +#endif +#if defined(DUK_USE_DDDPRINT) +#error unsupported config option used (option has been removed): DUK_USE_DDDPRINT +#endif +#if defined(DUK_USE_DDPRINT) +#error unsupported config option used (option has been removed): DUK_USE_DDPRINT +#endif +#if defined(DUK_USE_DEBUGGER_FWD_LOGGING) +#error unsupported config option used (option has been removed): DUK_USE_DEBUGGER_FWD_LOGGING +#endif +#if defined(DUK_USE_DEBUGGER_FWD_PRINTALERT) +#error unsupported config option used (option has been removed): DUK_USE_DEBUGGER_FWD_PRINTALERT +#endif +#if defined(DUK_USE_DEBUGGER_SUPPORT) && !defined(DUK_USE_INTERRUPT_COUNTER) +#error config option DUK_USE_DEBUGGER_SUPPORT requires option DUK_USE_INTERRUPT_COUNTER (which is missing) +#endif +#if defined(DUK_USE_DEEP_C_STACK) +#error unsupported config option used (option has been removed): DUK_USE_DEEP_C_STACK +#endif +#if defined(DUK_USE_DOUBLE_BE) +#error unsupported config option used (option has been removed): DUK_USE_DOUBLE_BE +#endif +#if defined(DUK_USE_DOUBLE_BE) && defined(DUK_USE_DOUBLE_LE) +#error config option DUK_USE_DOUBLE_BE conflicts with option DUK_USE_DOUBLE_LE (which is also defined) +#endif +#if defined(DUK_USE_DOUBLE_BE) && defined(DUK_USE_DOUBLE_ME) +#error config option DUK_USE_DOUBLE_BE conflicts with option DUK_USE_DOUBLE_ME (which is also defined) +#endif +#if defined(DUK_USE_DOUBLE_LE) +#error unsupported config option used (option has been removed): DUK_USE_DOUBLE_LE +#endif +#if defined(DUK_USE_DOUBLE_LE) && defined(DUK_USE_DOUBLE_BE) +#error config option DUK_USE_DOUBLE_LE conflicts with option DUK_USE_DOUBLE_BE (which is also defined) +#endif +#if defined(DUK_USE_DOUBLE_LE) && defined(DUK_USE_DOUBLE_ME) +#error config option DUK_USE_DOUBLE_LE conflicts with option DUK_USE_DOUBLE_ME (which is also defined) +#endif +#if defined(DUK_USE_DOUBLE_ME) +#error unsupported config option used (option has been removed): DUK_USE_DOUBLE_ME +#endif +#if defined(DUK_USE_DOUBLE_ME) && defined(DUK_USE_DOUBLE_LE) +#error config option DUK_USE_DOUBLE_ME conflicts with option DUK_USE_DOUBLE_LE (which is also defined) +#endif +#if defined(DUK_USE_DOUBLE_ME) && defined(DUK_USE_DOUBLE_BE) +#error config option DUK_USE_DOUBLE_ME conflicts with option DUK_USE_DOUBLE_BE (which is also defined) +#endif +#if defined(DUK_USE_DPRINT) +#error unsupported config option used (option has been removed): DUK_USE_DPRINT +#endif +#if defined(DUK_USE_DPRINT) && !defined(DUK_USE_DEBUG) +#error config option DUK_USE_DPRINT requires option DUK_USE_DEBUG (which is missing) +#endif +#if defined(DUK_USE_DPRINT_COLORS) +#error unsupported config option used (option has been removed): DUK_USE_DPRINT_COLORS +#endif +#if defined(DUK_USE_DPRINT_RDTSC) +#error unsupported config option used (option has been removed): DUK_USE_DPRINT_RDTSC +#endif +#if defined(DUK_USE_ES6_REGEXP_BRACES) +#error unsupported config option used (option has been removed): DUK_USE_ES6_REGEXP_BRACES +#endif +#if defined(DUK_USE_ESBC_MAX_BYTES) && !defined(DUK_USE_ESBC_LIMITS) +#error config option DUK_USE_ESBC_MAX_BYTES requires option DUK_USE_ESBC_LIMITS (which is missing) +#endif +#if defined(DUK_USE_ESBC_MAX_LINENUMBER) && !defined(DUK_USE_ESBC_LIMITS) +#error config option DUK_USE_ESBC_MAX_LINENUMBER requires option DUK_USE_ESBC_LIMITS (which is missing) +#endif +#if defined(DUK_USE_EXEC_TIMEOUT_CHECK) && !defined(DUK_USE_INTERRUPT_COUNTER) +#error config option DUK_USE_EXEC_TIMEOUT_CHECK requires option DUK_USE_INTERRUPT_COUNTER (which is missing) +#endif +#if defined(DUK_USE_EXTSTR_FREE) && !defined(DUK_USE_HSTRING_EXTDATA) +#error config option DUK_USE_EXTSTR_FREE requires option DUK_USE_HSTRING_EXTDATA (which is missing) +#endif +#if defined(DUK_USE_EXTSTR_INTERN_CHECK) && !defined(DUK_USE_HSTRING_EXTDATA) +#error config option DUK_USE_EXTSTR_INTERN_CHECK requires option DUK_USE_HSTRING_EXTDATA (which is missing) +#endif +#if defined(DUK_USE_FASTINT) && !defined(DUK_USE_64BIT_OPS) +#error config option DUK_USE_FASTINT requires option DUK_USE_64BIT_OPS (which is missing) +#endif +#if defined(DUK_USE_FILE_IO) +#error unsupported config option used (option has been removed): DUK_USE_FILE_IO +#endif +#if defined(DUK_USE_FULL_TVAL) +#error unsupported config option used (option has been removed): DUK_USE_FULL_TVAL +#endif +#if defined(DUK_USE_FUNCPTR_DEC16) && !defined(DUK_USE_FUNCPTR16) +#error config option DUK_USE_FUNCPTR_DEC16 requires option DUK_USE_FUNCPTR16 (which is missing) +#endif +#if defined(DUK_USE_FUNCPTR_ENC16) && !defined(DUK_USE_FUNCPTR16) +#error config option DUK_USE_FUNCPTR_ENC16 requires option DUK_USE_FUNCPTR16 (which is missing) +#endif +#if defined(DUK_USE_HASHBYTES_UNALIGNED_U32_ACCESS) +#error unsupported config option used (option has been removed): DUK_USE_HASHBYTES_UNALIGNED_U32_ACCESS +#endif +#if defined(DUK_USE_HEAPPTR16) && defined(DUK_USE_DEBUG) +#error config option DUK_USE_HEAPPTR16 conflicts with option DUK_USE_DEBUG (which is also defined) +#endif +#if defined(DUK_USE_HEAPPTR_DEC16) && !defined(DUK_USE_HEAPPTR16) +#error config option DUK_USE_HEAPPTR_DEC16 requires option DUK_USE_HEAPPTR16 (which is missing) +#endif +#if defined(DUK_USE_HEAPPTR_ENC16) && !defined(DUK_USE_HEAPPTR16) +#error config option DUK_USE_HEAPPTR_ENC16 requires option DUK_USE_HEAPPTR16 (which is missing) +#endif +#if defined(DUK_USE_INTEGER_BE) +#error unsupported config option used (option has been removed): DUK_USE_INTEGER_BE +#endif +#if defined(DUK_USE_INTEGER_BE) && defined(DUK_USE_INTEGER_LE) +#error config option DUK_USE_INTEGER_BE conflicts with option DUK_USE_INTEGER_LE (which is also defined) +#endif +#if defined(DUK_USE_INTEGER_BE) && defined(DUK_USE_INTEGER_ME) +#error config option DUK_USE_INTEGER_BE conflicts with option DUK_USE_INTEGER_ME (which is also defined) +#endif +#if defined(DUK_USE_INTEGER_LE) +#error unsupported config option used (option has been removed): DUK_USE_INTEGER_LE +#endif +#if defined(DUK_USE_INTEGER_LE) && defined(DUK_USE_INTEGER_BE) +#error config option DUK_USE_INTEGER_LE conflicts with option DUK_USE_INTEGER_BE (which is also defined) +#endif +#if defined(DUK_USE_INTEGER_LE) && defined(DUK_USE_INTEGER_ME) +#error config option DUK_USE_INTEGER_LE conflicts with option DUK_USE_INTEGER_ME (which is also defined) +#endif +#if defined(DUK_USE_INTEGER_ME) +#error unsupported config option used (option has been removed): DUK_USE_INTEGER_ME +#endif +#if defined(DUK_USE_INTEGER_ME) && defined(DUK_USE_INTEGER_LE) +#error config option DUK_USE_INTEGER_ME conflicts with option DUK_USE_INTEGER_LE (which is also defined) +#endif +#if defined(DUK_USE_INTEGER_ME) && defined(DUK_USE_INTEGER_BE) +#error config option DUK_USE_INTEGER_ME conflicts with option DUK_USE_INTEGER_BE (which is also defined) +#endif +#if defined(DUK_USE_MARKANDSWEEP_FINALIZER_TORTURE) +#error unsupported config option used (option has been removed): DUK_USE_MARKANDSWEEP_FINALIZER_TORTURE +#endif +#if defined(DUK_USE_MARK_AND_SWEEP) +#error unsupported config option used (option has been removed): DUK_USE_MARK_AND_SWEEP +#endif +#if defined(DUK_USE_MATH_FMAX) +#error unsupported config option used (option has been removed): DUK_USE_MATH_FMAX +#endif +#if defined(DUK_USE_MATH_FMIN) +#error unsupported config option used (option has been removed): DUK_USE_MATH_FMIN +#endif +#if defined(DUK_USE_MATH_ROUND) +#error unsupported config option used (option has been removed): DUK_USE_MATH_ROUND +#endif +#if defined(DUK_USE_MS_STRINGTABLE_RESIZE) +#error unsupported config option used (option has been removed): DUK_USE_MS_STRINGTABLE_RESIZE +#endif +#if defined(DUK_USE_NONSTD_ARRAY_CONCAT_TRAILER) +#error unsupported config option used (option has been removed): DUK_USE_NONSTD_ARRAY_CONCAT_TRAILER +#endif +#if defined(DUK_USE_NONSTD_ARRAY_MAP_TRAILER) +#error unsupported config option used (option has been removed): DUK_USE_NONSTD_ARRAY_MAP_TRAILER +#endif +#if defined(DUK_USE_NONSTD_REGEXP_DOLLAR_ESCAPE) +#error unsupported config option used (option has been removed): DUK_USE_NONSTD_REGEXP_DOLLAR_ESCAPE +#endif +#if defined(DUK_USE_NO_DOUBLE_ALIASING_SELFTEST) +#error unsupported config option used (option has been removed): DUK_USE_NO_DOUBLE_ALIASING_SELFTEST +#endif +#if defined(DUK_USE_OCTAL_SUPPORT) +#error unsupported config option used (option has been removed): DUK_USE_OCTAL_SUPPORT +#endif +#if defined(DUK_USE_PACKED_TVAL_POSSIBLE) +#error unsupported config option used (option has been removed): DUK_USE_PACKED_TVAL_POSSIBLE +#endif +#if defined(DUK_USE_PANIC_ABORT) +#error unsupported config option used (option has been removed): DUK_USE_PANIC_ABORT +#endif +#if defined(DUK_USE_PANIC_EXIT) +#error unsupported config option used (option has been removed): DUK_USE_PANIC_EXIT +#endif +#if defined(DUK_USE_PANIC_HANDLER) +#error unsupported config option used (option has been removed): DUK_USE_PANIC_HANDLER +#endif +#if defined(DUK_USE_PANIC_SEGFAULT) +#error unsupported config option used (option has been removed): DUK_USE_PANIC_SEGFAULT +#endif +#if defined(DUK_USE_POW_NETBSD_WORKAROUND) +#error unsupported config option used (option has been removed): DUK_USE_POW_NETBSD_WORKAROUND +#endif +#if defined(DUK_USE_RDTSC) +#error unsupported config option used (option has been removed): DUK_USE_RDTSC +#endif +#if defined(DUK_USE_REFZERO_FINALIZER_TORTURE) +#error unsupported config option used (option has been removed): DUK_USE_REFZERO_FINALIZER_TORTURE +#endif +#if defined(DUK_USE_ROM_GLOBAL_CLONE) && !defined(DUK_USE_ROM_STRINGS) +#error config option DUK_USE_ROM_GLOBAL_CLONE requires option DUK_USE_ROM_STRINGS (which is missing) +#endif +#if defined(DUK_USE_ROM_GLOBAL_CLONE) && !defined(DUK_USE_ROM_OBJECTS) +#error config option DUK_USE_ROM_GLOBAL_CLONE requires option DUK_USE_ROM_OBJECTS (which is missing) +#endif +#if defined(DUK_USE_ROM_GLOBAL_CLONE) && defined(DUK_USE_ROM_GLOBAL_INHERIT) +#error config option DUK_USE_ROM_GLOBAL_CLONE conflicts with option DUK_USE_ROM_GLOBAL_INHERIT (which is also defined) +#endif +#if defined(DUK_USE_ROM_GLOBAL_INHERIT) && !defined(DUK_USE_ROM_STRINGS) +#error config option DUK_USE_ROM_GLOBAL_INHERIT requires option DUK_USE_ROM_STRINGS (which is missing) +#endif +#if defined(DUK_USE_ROM_GLOBAL_INHERIT) && !defined(DUK_USE_ROM_OBJECTS) +#error config option DUK_USE_ROM_GLOBAL_INHERIT requires option DUK_USE_ROM_OBJECTS (which is missing) +#endif +#if defined(DUK_USE_ROM_GLOBAL_INHERIT) && defined(DUK_USE_ROM_GLOBAL_CLONE) +#error config option DUK_USE_ROM_GLOBAL_INHERIT conflicts with option DUK_USE_ROM_GLOBAL_CLONE (which is also defined) +#endif +#if defined(DUK_USE_ROM_OBJECTS) && !defined(DUK_USE_ROM_STRINGS) +#error config option DUK_USE_ROM_OBJECTS requires option DUK_USE_ROM_STRINGS (which is missing) +#endif +#if defined(DUK_USE_ROM_STRINGS) && !defined(DUK_USE_ROM_OBJECTS) +#error config option DUK_USE_ROM_STRINGS requires option DUK_USE_ROM_OBJECTS (which is missing) +#endif +#if defined(DUK_USE_SETJMP) +#error unsupported config option used (option has been removed): DUK_USE_SETJMP +#endif +#if defined(DUK_USE_SIGSETJMP) +#error unsupported config option used (option has been removed): DUK_USE_SIGSETJMP +#endif +#if defined(DUK_USE_STRTAB_CHAIN) +#error unsupported config option used (option has been removed): DUK_USE_STRTAB_CHAIN +#endif +#if defined(DUK_USE_STRTAB_CHAIN_SIZE) +#error unsupported config option used (option has been removed): DUK_USE_STRTAB_CHAIN_SIZE +#endif +#if defined(DUK_USE_STRTAB_CHAIN_SIZE) && !defined(DUK_USE_STRTAB_CHAIN) +#error config option DUK_USE_STRTAB_CHAIN_SIZE requires option DUK_USE_STRTAB_CHAIN (which is missing) +#endif +#if defined(DUK_USE_STRTAB_PROBE) +#error unsupported config option used (option has been removed): DUK_USE_STRTAB_PROBE +#endif +#if defined(DUK_USE_STRTAB_PTRCOMP) && !defined(DUK_USE_HEAPPTR16) +#error config option DUK_USE_STRTAB_PTRCOMP requires option DUK_USE_HEAPPTR16 (which is missing) +#endif +#if defined(DUK_USE_TAILCALL) && defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) +#error config option DUK_USE_TAILCALL conflicts with option DUK_USE_NONSTD_FUNC_CALLER_PROPERTY (which is also defined) +#endif +#if defined(DUK_USE_UNALIGNED_ACCESSES_POSSIBLE) +#error unsupported config option used (option has been removed): DUK_USE_UNALIGNED_ACCESSES_POSSIBLE +#endif +#if defined(DUK_USE_UNDERSCORE_SETJMP) +#error unsupported config option used (option has been removed): DUK_USE_UNDERSCORE_SETJMP +#endif +#if defined(DUK_USE_USER_DECLARE) +#error unsupported config option used (option has been removed): DUK_USE_USER_DECLARE +#endif +#if defined(DUK_USE_USER_INITJS) +#error unsupported config option used (option has been removed): DUK_USE_USER_INITJS +#endif + +#if defined(DUK_USE_CPP_EXCEPTIONS) && !defined(__cplusplus) +#error DUK_USE_CPP_EXCEPTIONS enabled but not compiling with a C++ compiler +#endif + +/* + * Convert DUK_USE_BYTEORDER, from whatever source, into currently used + * internal defines. If detection failed, #error out. + */ + +#if defined(DUK_USE_BYTEORDER) +#if (DUK_USE_BYTEORDER == 1) +#define DUK_USE_INTEGER_LE +#define DUK_USE_DOUBLE_LE +#elif (DUK_USE_BYTEORDER == 2) +#define DUK_USE_INTEGER_LE /* integer endianness is little on purpose */ +#define DUK_USE_DOUBLE_ME +#elif (DUK_USE_BYTEORDER == 3) +#define DUK_USE_INTEGER_BE +#define DUK_USE_DOUBLE_BE +#else +#error unsupported: byte order invalid +#endif /* byte order */ +#else +#error unsupported: byte order detection failed +#endif /* defined(DUK_USE_BYTEORDER) */ + +#endif /* DUK_CONFIG_H_INCLUDED */ diff --git a/kernel/src/lib/duktape.c b/kernel/src/lib/duktape.c new file mode 100644 index 000000000..573e70c2b --- /dev/null +++ b/kernel/src/lib/duktape.c @@ -0,0 +1,101351 @@ +/* + * Single source autogenerated distributable for Duktape 2.7.0. + * + * Git commit 03d4d728f8365021de6955c649e6dcd05dcca99f (03d4d72-dirty). + * Git branch HEAD. + * + * See Duktape AUTHORS.rst and LICENSE.txt for copyright and + * licensing information. + */ + +/* LICENSE.txt */ +/* +* =============== +* Duktape license +* =============== +* +* (http://opensource.org/licenses/MIT) +* +* Copyright (c) 2013-present by Duktape authors (see AUTHORS.rst) +* +* Permission is hereby granted, free of charge, to any person obtaining a copy +* of this software and associated documentation files (the "Software"), to deal +* in the Software without restriction, including without limitation the rights +* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell +* copies of the Software, and to permit persons to whom the Software is +* furnished to do so, subject to the following conditions: +* +* The above copyright notice and this permission notice shall be included in +* all copies or substantial portions of the Software. +* +* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN +* THE SOFTWARE. +*/ + +/* AUTHORS.rst */ +/* +* =============== +* Duktape authors +* =============== +* +* Copyright +* ========= +* +* Duktape copyrights are held by its authors. Each author has a copyright +* to their contribution, and agrees to irrevocably license the contribution +* under the Duktape ``LICENSE.txt``. +* +* Authors +* ======= +* +* Please include an e-mail address, a link to your GitHub profile, or something +* similar to allow your contribution to be identified accurately. +* +* The following people have contributed code, website contents, or Wiki contents, +* and agreed to irrevocably license their contributions under the Duktape +* ``LICENSE.txt`` (in order of appearance): +* +* * Sami Vaarala +* * Niki Dobrev +* * Andreas \u00d6man +* * L\u00e1szl\u00f3 Lang\u00f3 +* * Legimet +* * Karl Skomski +* * Bruce Pascoe +* * Ren\u00e9 Hollander +* * Julien Hamaide (https://github.com/crazyjul) +* * Sebastian G\u00f6tte (https://github.com/jaseg) +* * Tomasz Magulski (https://github.com/magul) +* * \D. Bohdan (https://github.com/dbohdan) +* * Ond\u0159ej Jirman (https://github.com/megous) +* * Sa\u00fal Ibarra Corretg\u00e9 +* * Jeremy HU +* * Ole Andr\u00e9 Vadla Ravn\u00e5s (https://github.com/oleavr) +* * Harold Brenes (https://github.com/harold-b) +* * Oliver Crow (https://github.com/ocrow) +* * Jakub Ch\u0142api\u0144ski (https://github.com/jchlapinski) +* * Brett Vickers (https://github.com/beevik) +* * Dominik Okwieka (https://github.com/okitec) +* * Remko Tron\u00e7on (https://el-tramo.be) +* * Romero Malaquias (rbsm@ic.ufal.br) +* * Michael Drake +* * Steven Don (https://github.com/shdon) +* * Simon Stone (https://github.com/sstone1) +* * \J. McC. (https://github.com/jmhmccr) +* * Jakub Nowakowski (https://github.com/jimvonmoon) +* * Tommy Nguyen (https://github.com/tn0502) +* * Fabrice Fontaine (https://github.com/ffontaine) +* * Christopher Hiller (https://github.com/boneskull) +* * Gonzalo Diethelm (https://github.com/gonzus) +* * Michal Kasperek (https://github.com/michalkas) +* * Andrew Janke (https://github.com/apjanke) +* * Steve Fan (https://github.com/stevefan1999) +* * Edward Betts (https://github.com/edwardbetts) +* * Ozhan Duz (https://github.com/webfolderio) +* * Akos Kiss (https://github.com/akosthekiss) +* * TheBrokenRail (https://github.com/TheBrokenRail) +* * Jesse Doyle (https://github.com/jessedoyle) +* * Gero Kuehn (https://github.com/dc6jgk) +* * James Swift (https://github.com/phraemer) +* * Luis de Bethencourt (https://github.com/luisbg) +* * Ian Whyman (https://github.com/v00d00) +* * Rick Sayre (https://github.com/whorfin) +* * Craig Leres (https://github.com/leres) +* * Maurici Abad (https://github.com/mauriciabad) +* * Nancy Li (https://github.com/NancyLi1013) +* * William Parks (https://github.com/WilliamParks) +* * Sam Hellawell (https://github.com/samhellawell) +* * Vladislavs Sokurenko (https://github.com/sokurenko) +* +* Other contributions +* =================== +* +* The following people have contributed something other than code (e.g. reported +* bugs, provided ideas, etc; roughly in order of appearance): +* +* * Greg Burns +* * Anthony Rabine +* * Carlos Costa +* * Aur\u00e9lien Bouilland +* * Preet Desai (Pris Matic) +* * judofyr (http://www.reddit.com/user/judofyr) +* * Jason Woofenden +* * Micha\u0142 Przyby\u015b +* * Anthony Howe +* * Conrad Pankoff +* * Jim Schimpf +* * Rajaran Gaunker (https://github.com/zimbabao) +* * Andreas \u00d6man +* * Doug Sanden +* * Josh Engebretson (https://github.com/JoshEngebretson) +* * Remo Eichenberger (https://github.com/remoe) +* * Mamod Mehyar (https://github.com/mamod) +* * David Demelier (https://github.com/markand) +* * Tim Caswell (https://github.com/creationix) +* * Mitchell Blank Jr (https://github.com/mitchblank) +* * https://github.com/yushli +* * Seo Sanghyeon (https://github.com/sanxiyn) +* * Han ChoongWoo (https://github.com/tunz) +* * Joshua Peek (https://github.com/josh) +* * Bruce E. Pascoe (https://github.com/fatcerberus) +* * https://github.com/Kelledin +* * https://github.com/sstruchtrup +* * Michael Drake (https://github.com/tlsa) +* * https://github.com/chris-y +* * Laurent Zubiaur (https://github.com/lzubiaur) +* * Neil Kolban (https://github.com/nkolban) +* * Wilhelm Wanecek (https://github.com/wanecek) +* * Andrew Janke (https://github.com/apjanke) +* * Unamer (https://github.com/unamer) +* * Karl Dahlke (eklhad@gmail.com) +* +* If you are accidentally missing from this list, send me an e-mail +* (``sami.vaarala@iki.fi``) and I'll fix the omission. +*/ + +#line 1 "duk_replacements.c" +/* + * Replacements for missing platform functions. + * + * Unlike the originals, fpclassify() and signbit() replacements don't + * work on any floating point types, only doubles. The C typing here + * mimics the standard prototypes. + */ + +/* #include duk_internal.h */ +#line 1 "duk_internal.h" +/* + * Top-level include file to be used for all (internal) source files. + * + * Source files should not include individual header files, as they + * have not been designed to be individually included. + */ + +#if !defined(DUK_INTERNAL_H_INCLUDED) +#define DUK_INTERNAL_H_INCLUDED + +/* + * The 'duktape.h' header provides the public API, but also handles all + * compiler and platform specific feature detection, Duktape feature + * resolution, inclusion of system headers, etc. These have been merged + * because the public API is also dependent on e.g. detecting appropriate + * C types which is quite platform/compiler specific especially for a non-C99 + * build. The public API is also dependent on the resolved feature set. + * + * Some actions taken by the merged header (such as including system headers) + * are not appropriate for building a user application. The define + * DUK_COMPILING_DUKTAPE allows the merged header to skip/include some + * sections depending on what is being built. + */ + +#define DUK_COMPILING_DUKTAPE +#include "duktape.h" + +/* + * Duktape includes (other than duk_features.h) + * + * The header files expect to be included in an order which satisfies header + * dependencies correctly (the headers themselves don't include any other + * includes). Forward declarations are used to break circular struct/typedef + * dependencies. + */ + +/* #include duk_dblunion.h */ +#line 1 "duk_dblunion.h" +/* + * Union to access IEEE double memory representation, indexes for double + * memory representation, and some macros for double manipulation. + * + * Also used by packed duk_tval. Use a union for bit manipulation to + * minimize aliasing issues in practice. The C99 standard does not + * guarantee that this should work, but it's a very widely supported + * practice for low level manipulation. + * + * IEEE double format summary: + * + * seeeeeee eeeeffff ffffffff ffffffff ffffffff ffffffff ffffffff ffffffff + * A B C D E F G H + * + * s sign bit + * eee... exponent field + * fff... fraction + * + * See http://en.wikipedia.org/wiki/Double_precision_floating-point_format. + * + * NaNs are represented as exponent 0x7ff and mantissa != 0. The NaN is a + * signaling NaN when the highest bit of the mantissa is zero, and a quiet + * NaN when the highest bit is set. + * + * At least three memory layouts are relevant here: + * + * A B C D E F G H Big endian (e.g. 68k) DUK_USE_DOUBLE_BE + * H G F E D C B A Little endian (e.g. x86) DUK_USE_DOUBLE_LE + * D C B A H G F E Mixed endian (e.g. ARM FPA) DUK_USE_DOUBLE_ME + * + * Legacy ARM (FPA) is a special case: ARM double values are in mixed + * endian format while ARM duk_uint64_t values are in standard little endian + * format (H G F E D C B A). When a double is read as a duk_uint64_t + * from memory, the register will contain the (logical) value + * E F G H A B C D. This requires some special handling below. + * See http://infocenter.arm.com/help/index.jsp?topic=/com.arm.doc.dui0056d/Bcfhgcgd.html. + * + * Indexes of various types (8-bit, 16-bit, 32-bit) in memory relative to + * the logical (big endian) order: + * + * byte order duk_uint8_t duk_uint16_t duk_uint32_t + * BE 01234567 0123 01 + * LE 76543210 3210 10 + * ME (ARM) 32107654 1032 01 + * + * Some processors may alter NaN values in a floating point load+store. + * For instance, on X86 a FLD + FSTP may convert a signaling NaN to a + * quiet one. This is catastrophic when NaN space is used in packed + * duk_tval values. See: misc/clang_aliasing.c. + */ + +#if !defined(DUK_DBLUNION_H_INCLUDED) +#define DUK_DBLUNION_H_INCLUDED + +/* + * Union for accessing double parts, also serves as packed duk_tval + */ + +union duk_double_union { + double d; + float f[2]; +#if defined(DUK_USE_64BIT_OPS) + duk_uint64_t ull[1]; +#endif + duk_uint32_t ui[2]; + duk_uint16_t us[4]; + duk_uint8_t uc[8]; +#if defined(DUK_USE_PACKED_TVAL) + void *vp[2]; /* used by packed duk_tval, assumes sizeof(void *) == 4 */ +#endif +}; + +typedef union duk_double_union duk_double_union; + +/* + * Indexes of various types with respect to big endian (logical) layout + */ + +#if defined(DUK_USE_DOUBLE_LE) +#if defined(DUK_USE_64BIT_OPS) +#define DUK_DBL_IDX_ULL0 0 +#endif +#define DUK_DBL_IDX_UI0 1 +#define DUK_DBL_IDX_UI1 0 +#define DUK_DBL_IDX_US0 3 +#define DUK_DBL_IDX_US1 2 +#define DUK_DBL_IDX_US2 1 +#define DUK_DBL_IDX_US3 0 +#define DUK_DBL_IDX_UC0 7 +#define DUK_DBL_IDX_UC1 6 +#define DUK_DBL_IDX_UC2 5 +#define DUK_DBL_IDX_UC3 4 +#define DUK_DBL_IDX_UC4 3 +#define DUK_DBL_IDX_UC5 2 +#define DUK_DBL_IDX_UC6 1 +#define DUK_DBL_IDX_UC7 0 +#define DUK_DBL_IDX_VP0 DUK_DBL_IDX_UI0 /* packed tval */ +#define DUK_DBL_IDX_VP1 DUK_DBL_IDX_UI1 /* packed tval */ +#elif defined(DUK_USE_DOUBLE_BE) +#if defined(DUK_USE_64BIT_OPS) +#define DUK_DBL_IDX_ULL0 0 +#endif +#define DUK_DBL_IDX_UI0 0 +#define DUK_DBL_IDX_UI1 1 +#define DUK_DBL_IDX_US0 0 +#define DUK_DBL_IDX_US1 1 +#define DUK_DBL_IDX_US2 2 +#define DUK_DBL_IDX_US3 3 +#define DUK_DBL_IDX_UC0 0 +#define DUK_DBL_IDX_UC1 1 +#define DUK_DBL_IDX_UC2 2 +#define DUK_DBL_IDX_UC3 3 +#define DUK_DBL_IDX_UC4 4 +#define DUK_DBL_IDX_UC5 5 +#define DUK_DBL_IDX_UC6 6 +#define DUK_DBL_IDX_UC7 7 +#define DUK_DBL_IDX_VP0 DUK_DBL_IDX_UI0 /* packed tval */ +#define DUK_DBL_IDX_VP1 DUK_DBL_IDX_UI1 /* packed tval */ +#elif defined(DUK_USE_DOUBLE_ME) +#if defined(DUK_USE_64BIT_OPS) +#define DUK_DBL_IDX_ULL0 0 /* not directly applicable, byte order differs from a double */ +#endif +#define DUK_DBL_IDX_UI0 0 +#define DUK_DBL_IDX_UI1 1 +#define DUK_DBL_IDX_US0 1 +#define DUK_DBL_IDX_US1 0 +#define DUK_DBL_IDX_US2 3 +#define DUK_DBL_IDX_US3 2 +#define DUK_DBL_IDX_UC0 3 +#define DUK_DBL_IDX_UC1 2 +#define DUK_DBL_IDX_UC2 1 +#define DUK_DBL_IDX_UC3 0 +#define DUK_DBL_IDX_UC4 7 +#define DUK_DBL_IDX_UC5 6 +#define DUK_DBL_IDX_UC6 5 +#define DUK_DBL_IDX_UC7 4 +#define DUK_DBL_IDX_VP0 DUK_DBL_IDX_UI0 /* packed tval */ +#define DUK_DBL_IDX_VP1 DUK_DBL_IDX_UI1 /* packed tval */ +#else +#error internal error +#endif + +/* + * Helper macros for reading/writing memory representation parts, used + * by duk_numconv.c and duk_tval.h. + */ + +#define DUK_DBLUNION_SET_DOUBLE(u, v) \ + do { \ + (u)->d = (v); \ + } while (0) + +#define DUK_DBLUNION_SET_HIGH32(u, v) \ + do { \ + (u)->ui[DUK_DBL_IDX_UI0] = (duk_uint32_t) (v); \ + } while (0) + +#if defined(DUK_USE_64BIT_OPS) +#if defined(DUK_USE_DOUBLE_ME) +#define DUK_DBLUNION_SET_HIGH32_ZERO_LOW32(u, v) \ + do { \ + (u)->ull[DUK_DBL_IDX_ULL0] = (duk_uint64_t) (v); \ + } while (0) +#else +#define DUK_DBLUNION_SET_HIGH32_ZERO_LOW32(u, v) \ + do { \ + (u)->ull[DUK_DBL_IDX_ULL0] = ((duk_uint64_t) (v)) << 32; \ + } while (0) +#endif +#else /* DUK_USE_64BIT_OPS */ +#define DUK_DBLUNION_SET_HIGH32_ZERO_LOW32(u, v) \ + do { \ + (u)->ui[DUK_DBL_IDX_UI0] = (duk_uint32_t) (v); \ + (u)->ui[DUK_DBL_IDX_UI1] = (duk_uint32_t) 0; \ + } while (0) +#endif /* DUK_USE_64BIT_OPS */ + +#define DUK_DBLUNION_SET_LOW32(u, v) \ + do { \ + (u)->ui[DUK_DBL_IDX_UI1] = (duk_uint32_t) (v); \ + } while (0) + +#define DUK_DBLUNION_GET_DOUBLE(u) ((u)->d) +#define DUK_DBLUNION_GET_HIGH32(u) ((u)->ui[DUK_DBL_IDX_UI0]) +#define DUK_DBLUNION_GET_LOW32(u) ((u)->ui[DUK_DBL_IDX_UI1]) + +#if defined(DUK_USE_64BIT_OPS) +#if defined(DUK_USE_DOUBLE_ME) +#define DUK_DBLUNION_SET_UINT64(u, v) \ + do { \ + (u)->ui[DUK_DBL_IDX_UI0] = (duk_uint32_t) ((v) >> 32); \ + (u)->ui[DUK_DBL_IDX_UI1] = (duk_uint32_t) (v); \ + } while (0) +#define DUK_DBLUNION_GET_UINT64(u) ((((duk_uint64_t) (u)->ui[DUK_DBL_IDX_UI0]) << 32) | ((duk_uint64_t) (u)->ui[DUK_DBL_IDX_UI1])) +#else +#define DUK_DBLUNION_SET_UINT64(u, v) \ + do { \ + (u)->ull[DUK_DBL_IDX_ULL0] = (duk_uint64_t) (v); \ + } while (0) +#define DUK_DBLUNION_GET_UINT64(u) ((u)->ull[DUK_DBL_IDX_ULL0]) +#endif +#define DUK_DBLUNION_SET_INT64(u, v) DUK_DBLUNION_SET_UINT64((u), (duk_uint64_t) (v)) +#define DUK_DBLUNION_GET_INT64(u) ((duk_int64_t) DUK_DBLUNION_GET_UINT64((u))) +#endif /* DUK_USE_64BIT_OPS */ + +/* + * Double NaN manipulation macros related to NaN normalization needed when + * using the packed duk_tval representation. NaN normalization is necessary + * to keep double values compatible with the duk_tval format. + * + * When packed duk_tval is used, the NaN space is used to store pointers + * and other tagged values in addition to NaNs. Actual NaNs are normalized + * to a specific quiet NaN. The macros below are used by the implementation + * to check and normalize NaN values when they might be created. The macros + * are essentially NOPs when the non-packed duk_tval representation is used. + * + * A FULL check is exact and checks all bits. A NOTFULL check is used by + * the packed duk_tval and works correctly for all NaNs except those that + * begin with 0x7ff0. Since the 'normalized NaN' values used with packed + * duk_tval begin with 0x7ff8, the partial check is reliable when packed + * duk_tval is used. The 0x7ff8 prefix means the normalized NaN will be a + * quiet NaN regardless of its remaining lower bits. + * + * The ME variant below is specifically for ARM byte order, which has the + * feature that while doubles have a mixed byte order (32107654), unsigned + * long long values has a little endian byte order (76543210). When writing + * a logical double value through a ULL pointer, the 32-bit words need to be + * swapped; hence the #if defined()s below for ULL writes with DUK_USE_DOUBLE_ME. + * This is not full ARM support but suffices for some environments. + */ + +#if defined(DUK_USE_64BIT_OPS) +#if defined(DUK_USE_DOUBLE_ME) +/* Macros for 64-bit ops + mixed endian doubles. */ +#define DUK__DBLUNION_SET_NAN_FULL(u) \ + do { \ + (u)->ull[DUK_DBL_IDX_ULL0] = DUK_U64_CONSTANT(0x000000007ff80000); \ + } while (0) +#define DUK__DBLUNION_IS_NAN_FULL(u) \ + ((((u)->ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x000000007ff00000)) == DUK_U64_CONSTANT(0x000000007ff00000)) && \ + ((((u)->ull[DUK_DBL_IDX_ULL0]) & DUK_U64_CONSTANT(0xffffffff000fffff)) != 0)) +#define DUK__DBLUNION_IS_NORMALIZED_NAN_FULL(u) ((u)->ull[DUK_DBL_IDX_ULL0] == DUK_U64_CONSTANT(0x000000007ff80000)) +#define DUK__DBLUNION_IS_ANYINF(u) \ + (((u)->ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0xffffffff7fffffff)) == DUK_U64_CONSTANT(0x000000007ff00000)) +#define DUK__DBLUNION_IS_POSINF(u) ((u)->ull[DUK_DBL_IDX_ULL0] == DUK_U64_CONSTANT(0x000000007ff00000)) +#define DUK__DBLUNION_IS_NEGINF(u) ((u)->ull[DUK_DBL_IDX_ULL0] == DUK_U64_CONSTANT(0x00000000fff00000)) +#define DUK__DBLUNION_IS_ANYZERO(u) \ + (((u)->ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0xffffffff7fffffff)) == DUK_U64_CONSTANT(0x0000000000000000)) +#define DUK__DBLUNION_IS_POSZERO(u) ((u)->ull[DUK_DBL_IDX_ULL0] == DUK_U64_CONSTANT(0x0000000000000000)) +#define DUK__DBLUNION_IS_NEGZERO(u) ((u)->ull[DUK_DBL_IDX_ULL0] == DUK_U64_CONSTANT(0x0000000080000000)) +#else +/* Macros for 64-bit ops + big/little endian doubles. */ +#define DUK__DBLUNION_SET_NAN_FULL(u) \ + do { \ + (u)->ull[DUK_DBL_IDX_ULL0] = DUK_U64_CONSTANT(0x7ff8000000000000); \ + } while (0) +#define DUK__DBLUNION_IS_NAN_FULL(u) \ + ((((u)->ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x7ff0000000000000)) == DUK_U64_CONSTANT(0x7ff0000000000000)) && \ + ((((u)->ull[DUK_DBL_IDX_ULL0]) & DUK_U64_CONSTANT(0x000fffffffffffff)) != 0)) +#define DUK__DBLUNION_IS_NORMALIZED_NAN_FULL(u) ((u)->ull[DUK_DBL_IDX_ULL0] == DUK_U64_CONSTANT(0x7ff8000000000000)) +#define DUK__DBLUNION_IS_ANYINF(u) \ + (((u)->ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x7fffffffffffffff)) == DUK_U64_CONSTANT(0x7ff0000000000000)) +#define DUK__DBLUNION_IS_POSINF(u) ((u)->ull[DUK_DBL_IDX_ULL0] == DUK_U64_CONSTANT(0x7ff0000000000000)) +#define DUK__DBLUNION_IS_NEGINF(u) ((u)->ull[DUK_DBL_IDX_ULL0] == DUK_U64_CONSTANT(0xfff0000000000000)) +#define DUK__DBLUNION_IS_ANYZERO(u) \ + (((u)->ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x7fffffffffffffff)) == DUK_U64_CONSTANT(0x0000000000000000)) +#define DUK__DBLUNION_IS_POSZERO(u) ((u)->ull[DUK_DBL_IDX_ULL0] == DUK_U64_CONSTANT(0x0000000000000000)) +#define DUK__DBLUNION_IS_NEGZERO(u) ((u)->ull[DUK_DBL_IDX_ULL0] == DUK_U64_CONSTANT(0x8000000000000000)) +#endif +#else /* DUK_USE_64BIT_OPS */ +/* Macros for no 64-bit ops, any endianness. */ +#define DUK__DBLUNION_SET_NAN_FULL(u) \ + do { \ + (u)->ui[DUK_DBL_IDX_UI0] = (duk_uint32_t) 0x7ff80000UL; \ + (u)->ui[DUK_DBL_IDX_UI1] = (duk_uint32_t) 0x00000000UL; \ + } while (0) +#define DUK__DBLUNION_IS_NAN_FULL(u) \ + ((((u)->ui[DUK_DBL_IDX_UI0] & 0x7ff00000UL) == 0x7ff00000UL) && \ + (((u)->ui[DUK_DBL_IDX_UI0] & 0x000fffffUL) != 0 || (u)->ui[DUK_DBL_IDX_UI1] != 0)) +#define DUK__DBLUNION_IS_NORMALIZED_NAN_FULL(u) \ + (((u)->ui[DUK_DBL_IDX_UI0] == 0x7ff80000UL) && ((u)->ui[DUK_DBL_IDX_UI1] == 0x00000000UL)) +#define DUK__DBLUNION_IS_ANYINF(u) \ + ((((u)->ui[DUK_DBL_IDX_UI0] & 0x7fffffffUL) == 0x7ff00000UL) && ((u)->ui[DUK_DBL_IDX_UI1] == 0x00000000UL)) +#define DUK__DBLUNION_IS_POSINF(u) (((u)->ui[DUK_DBL_IDX_UI0] == 0x7ff00000UL) && ((u)->ui[DUK_DBL_IDX_UI1] == 0x00000000UL)) +#define DUK__DBLUNION_IS_NEGINF(u) (((u)->ui[DUK_DBL_IDX_UI0] == 0xfff00000UL) && ((u)->ui[DUK_DBL_IDX_UI1] == 0x00000000UL)) +#define DUK__DBLUNION_IS_ANYZERO(u) \ + ((((u)->ui[DUK_DBL_IDX_UI0] & 0x7fffffffUL) == 0x00000000UL) && ((u)->ui[DUK_DBL_IDX_UI1] == 0x00000000UL)) +#define DUK__DBLUNION_IS_POSZERO(u) (((u)->ui[DUK_DBL_IDX_UI0] == 0x00000000UL) && ((u)->ui[DUK_DBL_IDX_UI1] == 0x00000000UL)) +#define DUK__DBLUNION_IS_NEGZERO(u) (((u)->ui[DUK_DBL_IDX_UI0] == 0x80000000UL) && ((u)->ui[DUK_DBL_IDX_UI1] == 0x00000000UL)) +#endif /* DUK_USE_64BIT_OPS */ + +#define DUK__DBLUNION_SET_NAN_NOTFULL(u) \ + do { \ + (u)->us[DUK_DBL_IDX_US0] = 0x7ff8UL; \ + } while (0) + +#define DUK__DBLUNION_IS_NAN_NOTFULL(u) \ + /* E == 0x7ff, topmost four bits of F != 0 => assume NaN */ \ + ((((u)->us[DUK_DBL_IDX_US0] & 0x7ff0UL) == 0x7ff0UL) && (((u)->us[DUK_DBL_IDX_US0] & 0x000fUL) != 0x0000UL)) + +#define DUK__DBLUNION_IS_NORMALIZED_NAN_NOTFULL(u) \ + /* E == 0x7ff, F == 8 => normalized NaN */ \ + ((u)->us[DUK_DBL_IDX_US0] == 0x7ff8UL) + +#define DUK__DBLUNION_NORMALIZE_NAN_CHECK_FULL(u) \ + do { \ + if (DUK__DBLUNION_IS_NAN_FULL((u))) { \ + DUK__DBLUNION_SET_NAN_FULL((u)); \ + } \ + } while (0) + +#define DUK__DBLUNION_NORMALIZE_NAN_CHECK_NOTFULL(u) \ + do { \ + /* Check must be full. */ \ + if (DUK__DBLUNION_IS_NAN_FULL((u))) { \ + DUK__DBLUNION_SET_NAN_NOTFULL((u)); \ + } \ + } while (0) + +/* Concrete macros for NaN handling used by the implementation internals. + * Chosen so that they match the duk_tval representation: with a packed + * duk_tval, ensure NaNs are properly normalized; with a non-packed duk_tval + * these are essentially NOPs. + */ + +#if defined(DUK_USE_PACKED_TVAL) +#define DUK_DBLUNION_NORMALIZE_NAN_CHECK(u) DUK__DBLUNION_NORMALIZE_NAN_CHECK_FULL((u)) +#define DUK_DBLUNION_IS_NAN(u) DUK__DBLUNION_IS_NAN_FULL((u)) +#define DUK_DBLUNION_IS_NORMALIZED_NAN(u) DUK__DBLUNION_IS_NORMALIZED_NAN_FULL((u)) +#define DUK_DBLUNION_SET_NAN(d) DUK__DBLUNION_SET_NAN_FULL((d)) +#if 0 +#define DUK_DBLUNION_NORMALIZE_NAN_CHECK(u) DUK__DBLUNION_NORMALIZE_NAN_CHECK_NOTFULL((u)) +#define DUK_DBLUNION_IS_NAN(u) DUK__DBLUNION_IS_NAN_NOTFULL((u)) +#define DUK_DBLUNION_IS_NORMALIZED_NAN(u) DUK__DBLUNION_IS_NORMALIZED_NAN_NOTFULL((u)) +#define DUK_DBLUNION_SET_NAN(d) DUK__DBLUNION_SET_NAN_NOTFULL((d)) +#endif +#define DUK_DBLUNION_IS_NORMALIZED(u) \ + (!DUK_DBLUNION_IS_NAN((u)) || /* either not a NaN */ \ + DUK_DBLUNION_IS_NORMALIZED_NAN((u))) /* or is a normalized NaN */ +#else /* DUK_USE_PACKED_TVAL */ +#define DUK_DBLUNION_NORMALIZE_NAN_CHECK(u) /* nop: no need to normalize */ +#define DUK_DBLUNION_IS_NAN(u) DUK__DBLUNION_IS_NAN_FULL((u)) /* (DUK_ISNAN((u)->d)) */ +#define DUK_DBLUNION_IS_NORMALIZED_NAN(u) DUK__DBLUNION_IS_NAN_FULL((u)) /* (DUK_ISNAN((u)->d)) */ +#define DUK_DBLUNION_IS_NORMALIZED(u) 1 /* all doubles are considered normalized */ +#define DUK_DBLUNION_SET_NAN(u) \ + do { \ + /* in non-packed representation we don't care about which NaN is used */ \ + (u)->d = DUK_DOUBLE_NAN; \ + } while (0) +#endif /* DUK_USE_PACKED_TVAL */ + +#define DUK_DBLUNION_IS_ANYINF(u) DUK__DBLUNION_IS_ANYINF((u)) +#define DUK_DBLUNION_IS_POSINF(u) DUK__DBLUNION_IS_POSINF((u)) +#define DUK_DBLUNION_IS_NEGINF(u) DUK__DBLUNION_IS_NEGINF((u)) + +#define DUK_DBLUNION_IS_ANYZERO(u) DUK__DBLUNION_IS_ANYZERO((u)) +#define DUK_DBLUNION_IS_POSZERO(u) DUK__DBLUNION_IS_POSZERO((u)) +#define DUK_DBLUNION_IS_NEGZERO(u) DUK__DBLUNION_IS_NEGZERO((u)) + +/* XXX: native 64-bit byteswaps when available */ + +/* 64-bit byteswap, same operation independent of target endianness. */ +#define DUK_DBLUNION_BSWAP64(u) \ + do { \ + duk_uint32_t duk__bswaptmp1, duk__bswaptmp2; \ + duk__bswaptmp1 = (u)->ui[0]; \ + duk__bswaptmp2 = (u)->ui[1]; \ + duk__bswaptmp1 = DUK_BSWAP32(duk__bswaptmp1); \ + duk__bswaptmp2 = DUK_BSWAP32(duk__bswaptmp2); \ + (u)->ui[0] = duk__bswaptmp2; \ + (u)->ui[1] = duk__bswaptmp1; \ + } while (0) + +/* Byteswap an IEEE double in the duk_double_union from host to network + * order. For a big endian target this is a no-op. + */ +#if defined(DUK_USE_DOUBLE_LE) +#define DUK_DBLUNION_DOUBLE_HTON(u) \ + do { \ + duk_uint32_t duk__bswaptmp1, duk__bswaptmp2; \ + duk__bswaptmp1 = (u)->ui[0]; \ + duk__bswaptmp2 = (u)->ui[1]; \ + duk__bswaptmp1 = DUK_BSWAP32(duk__bswaptmp1); \ + duk__bswaptmp2 = DUK_BSWAP32(duk__bswaptmp2); \ + (u)->ui[0] = duk__bswaptmp2; \ + (u)->ui[1] = duk__bswaptmp1; \ + } while (0) +#elif defined(DUK_USE_DOUBLE_ME) +#define DUK_DBLUNION_DOUBLE_HTON(u) \ + do { \ + duk_uint32_t duk__bswaptmp1, duk__bswaptmp2; \ + duk__bswaptmp1 = (u)->ui[0]; \ + duk__bswaptmp2 = (u)->ui[1]; \ + duk__bswaptmp1 = DUK_BSWAP32(duk__bswaptmp1); \ + duk__bswaptmp2 = DUK_BSWAP32(duk__bswaptmp2); \ + (u)->ui[0] = duk__bswaptmp1; \ + (u)->ui[1] = duk__bswaptmp2; \ + } while (0) +#elif defined(DUK_USE_DOUBLE_BE) +#define DUK_DBLUNION_DOUBLE_HTON(u) \ + do { \ + } while (0) +#else +#error internal error, double endianness insane +#endif + +/* Reverse operation is the same. */ +#define DUK_DBLUNION_DOUBLE_NTOH(u) DUK_DBLUNION_DOUBLE_HTON((u)) + +/* Some sign bit helpers. */ +#if defined(DUK_USE_64BIT_OPS) +#define DUK_DBLUNION_HAS_SIGNBIT(u) (((u)->ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x8000000000000000)) != 0) +#define DUK_DBLUNION_GET_SIGNBIT(u) (((u)->ull[DUK_DBL_IDX_ULL0] >> 63U)) +#else +#define DUK_DBLUNION_HAS_SIGNBIT(u) (((u)->ui[DUK_DBL_IDX_UI0] & 0x80000000UL) != 0) +#define DUK_DBLUNION_GET_SIGNBIT(u) (((u)->ui[DUK_DBL_IDX_UI0] >> 31U)) +#endif + +#endif /* DUK_DBLUNION_H_INCLUDED */ +/* #include duk_fltunion.h */ +#line 1 "duk_fltunion.h" +/* + * Union to access IEEE float memory representation. + */ + +#if !defined(DUK_FLTUNION_H_INCLUDED) +#define DUK_FLTUNION_H_INCLUDED + +/* #include duk_internal.h -> already included */ + +union duk_float_union { + float f; + duk_uint32_t ui[1]; + duk_uint16_t us[2]; + duk_uint8_t uc[4]; +}; + +typedef union duk_float_union duk_float_union; + +#if defined(DUK_USE_DOUBLE_LE) || defined(DUK_USE_DOUBLE_ME) +#define DUK_FLT_IDX_UI0 0 +#define DUK_FLT_IDX_US0 1 +#define DUK_FLT_IDX_US1 0 +#define DUK_FLT_IDX_UC0 3 +#define DUK_FLT_IDX_UC1 2 +#define DUK_FLT_IDX_UC2 1 +#define DUK_FLT_IDX_UC3 0 +#elif defined(DUK_USE_DOUBLE_BE) +#define DUK_FLT_IDX_UI0 0 +#define DUK_FLT_IDX_US0 0 +#define DUK_FLT_IDX_US1 1 +#define DUK_FLT_IDX_UC0 0 +#define DUK_FLT_IDX_UC1 1 +#define DUK_FLT_IDX_UC2 2 +#define DUK_FLT_IDX_UC3 3 +#else +#error internal error +#endif + +#endif /* DUK_FLTUNION_H_INCLUDED */ +/* #include duk_replacements.h */ +#line 1 "duk_replacements.h" +#if !defined(DUK_REPLACEMENTS_H_INCLUDED) +#define DUK_REPLACEMENTS_H_INCLUDED + +#if !defined(DUK_SINGLE_FILE) +#if defined(DUK_USE_COMPUTED_INFINITY) +DUK_INTERNAL_DECL double duk_computed_infinity; +#endif +#if defined(DUK_USE_COMPUTED_NAN) +DUK_INTERNAL_DECL double duk_computed_nan; +#endif +#endif /* !DUK_SINGLE_FILE */ + +#if defined(DUK_USE_REPL_FPCLASSIFY) +DUK_INTERNAL_DECL int duk_repl_fpclassify(double x); +#endif +#if defined(DUK_USE_REPL_SIGNBIT) +DUK_INTERNAL_DECL int duk_repl_signbit(double x); +#endif +#if defined(DUK_USE_REPL_ISFINITE) +DUK_INTERNAL_DECL int duk_repl_isfinite(double x); +#endif +#if defined(DUK_USE_REPL_ISNAN) +DUK_INTERNAL_DECL int duk_repl_isnan(double x); +#endif +#if defined(DUK_USE_REPL_ISINF) +DUK_INTERNAL_DECL int duk_repl_isinf(double x); +#endif + +#endif /* DUK_REPLACEMENTS_H_INCLUDED */ +/* #include duk_jmpbuf.h */ +#line 1 "duk_jmpbuf.h" +/* + * Wrapper for jmp_buf. + * + * This is used because jmp_buf is an array type for backward compatibility. + * Wrapping jmp_buf in a struct makes pointer references, sizeof, etc, + * behave more intuitively. + * + * http://en.wikipedia.org/wiki/Setjmp.h#Member_types + */ + +#if !defined(DUK_JMPBUF_H_INCLUDED) +#define DUK_JMPBUF_H_INCLUDED + +#if defined(DUK_USE_CPP_EXCEPTIONS) +struct duk_jmpbuf { + duk_small_int_t dummy; /* unused */ +}; +#else +struct duk_jmpbuf { + DUK_JMPBUF_TYPE jb; +}; +#endif + +#endif /* DUK_JMPBUF_H_INCLUDED */ +/* #include duk_exception.h */ +#line 1 "duk_exception.h" +/* + * Exceptions for Duktape internal throws when C++ exceptions are used + * for long control transfers. + */ + +#if !defined(DUK_EXCEPTION_H_INCLUDED) +#define DUK_EXCEPTION_H_INCLUDED + +#if defined(DUK_USE_CPP_EXCEPTIONS) +/* Internal exception used as a setjmp-longjmp replacement. User code should + * NEVER see or catch this exception, so it doesn't inherit from any base + * class which should minimize the chance of user code accidentally catching + * the exception. + */ +class duk_internal_exception { + /* intentionally empty */ +}; + +/* Fatal error, thrown as a specific C++ exception with C++ exceptions + * enabled. It is unsafe to continue; doing so may cause crashes or memory + * leaks. This is intended to be either uncaught, or caught by user code + * aware of the "unsafe to continue" semantics. + */ +class duk_fatal_exception : public virtual std::runtime_error { + public: + duk_fatal_exception(const char *message) : std::runtime_error(message) { + } +}; +#endif + +#endif /* DUK_EXCEPTION_H_INCLUDED */ +/* #include duk_forwdecl.h */ +#line 1 "duk_forwdecl.h" +/* + * Forward declarations for all Duktape structures. + */ + +#if !defined(DUK_FORWDECL_H_INCLUDED) +#define DUK_FORWDECL_H_INCLUDED + +/* + * Forward declarations + */ + +#if defined(DUK_USE_CPP_EXCEPTIONS) +class duk_internal_exception; +#else +struct duk_jmpbuf; +#endif + +/* duk_tval intentionally skipped */ +struct duk_heaphdr; +struct duk_heaphdr_string; +struct duk_harray; +struct duk_hstring; +struct duk_hstring_external; +struct duk_hobject; +struct duk_hcompfunc; +struct duk_hnatfunc; +struct duk_hboundfunc; +struct duk_hthread; +struct duk_hbufobj; +struct duk_hdecenv; +struct duk_hobjenv; +struct duk_hproxy; +struct duk_hbuffer; +struct duk_hbuffer_fixed; +struct duk_hbuffer_dynamic; +struct duk_hbuffer_external; + +struct duk_propaccessor; +union duk_propvalue; +struct duk_propdesc; + +struct duk_heap; +struct duk_breakpoint; + +struct duk_activation; +struct duk_catcher; +struct duk_ljstate; +struct duk_strcache_entry; +struct duk_litcache_entry; +struct duk_strtab_entry; + +#if defined(DUK_USE_DEBUG) +struct duk_fixedbuffer; +#endif + +struct duk_bitdecoder_ctx; +struct duk_bitencoder_ctx; +struct duk_bufwriter_ctx; + +struct duk_token; +struct duk_re_token; +struct duk_lexer_point; +struct duk_lexer_ctx; +struct duk_lexer_codepoint; + +struct duk_compiler_instr; +struct duk_compiler_func; +struct duk_compiler_ctx; + +struct duk_re_matcher_ctx; +struct duk_re_compiler_ctx; + +#if defined(DUK_USE_CPP_EXCEPTIONS) +/* no typedef */ +#else +typedef struct duk_jmpbuf duk_jmpbuf; +#endif + +/* duk_tval intentionally skipped */ +typedef struct duk_heaphdr duk_heaphdr; +typedef struct duk_heaphdr_string duk_heaphdr_string; +typedef struct duk_harray duk_harray; +typedef struct duk_hstring duk_hstring; +typedef struct duk_hstring_external duk_hstring_external; +typedef struct duk_hobject duk_hobject; +typedef struct duk_hcompfunc duk_hcompfunc; +typedef struct duk_hnatfunc duk_hnatfunc; +typedef struct duk_hboundfunc duk_hboundfunc; +typedef struct duk_hthread duk_hthread; +typedef struct duk_hbufobj duk_hbufobj; +typedef struct duk_hdecenv duk_hdecenv; +typedef struct duk_hobjenv duk_hobjenv; +typedef struct duk_hproxy duk_hproxy; +typedef struct duk_hbuffer duk_hbuffer; +typedef struct duk_hbuffer_fixed duk_hbuffer_fixed; +typedef struct duk_hbuffer_dynamic duk_hbuffer_dynamic; +typedef struct duk_hbuffer_external duk_hbuffer_external; + +typedef struct duk_propaccessor duk_propaccessor; +typedef union duk_propvalue duk_propvalue; +typedef struct duk_propdesc duk_propdesc; + +typedef struct duk_heap duk_heap; +typedef struct duk_breakpoint duk_breakpoint; + +typedef struct duk_activation duk_activation; +typedef struct duk_catcher duk_catcher; +typedef struct duk_ljstate duk_ljstate; +typedef struct duk_strcache_entry duk_strcache_entry; +typedef struct duk_litcache_entry duk_litcache_entry; +typedef struct duk_strtab_entry duk_strtab_entry; + +#if defined(DUK_USE_DEBUG) +typedef struct duk_fixedbuffer duk_fixedbuffer; +#endif + +typedef struct duk_bitdecoder_ctx duk_bitdecoder_ctx; +typedef struct duk_bitencoder_ctx duk_bitencoder_ctx; +typedef struct duk_bufwriter_ctx duk_bufwriter_ctx; + +typedef struct duk_token duk_token; +typedef struct duk_re_token duk_re_token; +typedef struct duk_lexer_point duk_lexer_point; +typedef struct duk_lexer_ctx duk_lexer_ctx; +typedef struct duk_lexer_codepoint duk_lexer_codepoint; + +typedef struct duk_compiler_instr duk_compiler_instr; +typedef struct duk_compiler_func duk_compiler_func; +typedef struct duk_compiler_ctx duk_compiler_ctx; + +typedef struct duk_re_matcher_ctx duk_re_matcher_ctx; +typedef struct duk_re_compiler_ctx duk_re_compiler_ctx; + +#endif /* DUK_FORWDECL_H_INCLUDED */ +/* #include duk_tval.h */ +#line 1 "duk_tval.h" +/* + * Tagged type definition (duk_tval) and accessor macros. + * + * Access all fields through the accessor macros, as the representation + * is quite tricky. + * + * There are two packed type alternatives: an 8-byte representation + * based on an IEEE double (preferred for compactness), and a 12-byte + * representation (portability). The latter is needed also in e.g. + * 64-bit environments (it usually pads to 16 bytes per value). + * + * Selecting the tagged type format involves many trade-offs (memory + * use, size and performance of generated code, portability, etc). + * + * NB: because macro arguments are often expressions, macros should + * avoid evaluating their argument more than once. + */ + +#if !defined(DUK_TVAL_H_INCLUDED) +#define DUK_TVAL_H_INCLUDED + +/* sanity */ +#if !defined(DUK_USE_DOUBLE_LE) && !defined(DUK_USE_DOUBLE_ME) && !defined(DUK_USE_DOUBLE_BE) +#error unsupported: cannot determine byte order variant +#endif + +#if defined(DUK_USE_PACKED_TVAL) +/* ======================================================================== */ + +/* + * Packed 8-byte representation + */ + +/* use duk_double_union as duk_tval directly */ +typedef union duk_double_union duk_tval; +typedef struct { + duk_uint16_t a; + duk_uint16_t b; + duk_uint16_t c; + duk_uint16_t d; +} duk_tval_unused; + +/* tags */ +#define DUK_TAG_NORMALIZED_NAN 0x7ff8UL /* the NaN variant we use */ +/* avoid tag 0xfff0, no risk of confusion with negative infinity */ +#define DUK_TAG_MIN 0xfff1UL +#if defined(DUK_USE_FASTINT) +#define DUK_TAG_FASTINT 0xfff1UL /* embed: integer value */ +#endif +#define DUK_TAG_UNUSED 0xfff2UL /* marker; not actual tagged value */ +#define DUK_TAG_UNDEFINED 0xfff3UL /* embed: nothing */ +#define DUK_TAG_NULL 0xfff4UL /* embed: nothing */ +#define DUK_TAG_BOOLEAN 0xfff5UL /* embed: 0 or 1 (false or true) */ +/* DUK_TAG_NUMBER would logically go here, but it has multiple 'tags' */ +#define DUK_TAG_POINTER 0xfff6UL /* embed: void ptr */ +#define DUK_TAG_LIGHTFUNC 0xfff7UL /* embed: func ptr */ +#define DUK_TAG_STRING 0xfff8UL /* embed: duk_hstring ptr */ +#define DUK_TAG_OBJECT 0xfff9UL /* embed: duk_hobject ptr */ +#define DUK_TAG_BUFFER 0xfffaUL /* embed: duk_hbuffer ptr */ +#define DUK_TAG_MAX 0xfffaUL + +/* for convenience */ +#define DUK_XTAG_BOOLEAN_FALSE 0xfff50000UL +#define DUK_XTAG_BOOLEAN_TRUE 0xfff50001UL + +#define DUK_TVAL_IS_VALID_TAG(tv) (DUK_TVAL_GET_TAG((tv)) - DUK_TAG_MIN <= DUK_TAG_MAX - DUK_TAG_MIN) + +/* DUK_TVAL_UNUSED initializer for duk_tval_unused, works for any endianness. */ +#define DUK_TVAL_UNUSED_INITIALIZER() \ + { DUK_TAG_UNUSED, DUK_TAG_UNUSED, DUK_TAG_UNUSED, DUK_TAG_UNUSED } + +/* two casts to avoid gcc warning: "warning: cast from pointer to integer of different size [-Wpointer-to-int-cast]" */ +#if defined(DUK_USE_64BIT_OPS) +#if defined(DUK_USE_DOUBLE_ME) +#define DUK__TVAL_SET_TAGGEDPOINTER(tv, h, tag) \ + do { \ + (tv)->ull[DUK_DBL_IDX_ULL0] = (((duk_uint64_t) (tag)) << 16) | (((duk_uint64_t) (duk_uint32_t) (h)) << 32); \ + } while (0) +#else +#define DUK__TVAL_SET_TAGGEDPOINTER(tv, h, tag) \ + do { \ + (tv)->ull[DUK_DBL_IDX_ULL0] = (((duk_uint64_t) (tag)) << 48) | ((duk_uint64_t) (duk_uint32_t) (h)); \ + } while (0) +#endif +#else /* DUK_USE_64BIT_OPS */ +#define DUK__TVAL_SET_TAGGEDPOINTER(tv, h, tag) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->ui[DUK_DBL_IDX_UI0] = ((duk_uint32_t) (tag)) << 16; \ + duk__tv->ui[DUK_DBL_IDX_UI1] = (duk_uint32_t) (h); \ + } while (0) +#endif /* DUK_USE_64BIT_OPS */ + +#if defined(DUK_USE_64BIT_OPS) +/* Double casting for pointer to avoid gcc warning (cast from pointer to integer of different size) */ +#if defined(DUK_USE_DOUBLE_ME) +#define DUK__TVAL_SET_LIGHTFUNC(tv, fp, flags) \ + do { \ + (tv)->ull[DUK_DBL_IDX_ULL0] = (((duk_uint64_t) DUK_TAG_LIGHTFUNC) << 16) | ((duk_uint64_t) (flags)) | \ + (((duk_uint64_t) (duk_uint32_t) (fp)) << 32); \ + } while (0) +#else +#define DUK__TVAL_SET_LIGHTFUNC(tv, fp, flags) \ + do { \ + (tv)->ull[DUK_DBL_IDX_ULL0] = (((duk_uint64_t) DUK_TAG_LIGHTFUNC) << 48) | (((duk_uint64_t) (flags)) << 32) | \ + ((duk_uint64_t) (duk_uint32_t) (fp)); \ + } while (0) +#endif +#else /* DUK_USE_64BIT_OPS */ +#define DUK__TVAL_SET_LIGHTFUNC(tv, fp, flags) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->ui[DUK_DBL_IDX_UI0] = (((duk_uint32_t) DUK_TAG_LIGHTFUNC) << 16) | ((duk_uint32_t) (flags)); \ + duk__tv->ui[DUK_DBL_IDX_UI1] = (duk_uint32_t) (fp); \ + } while (0) +#endif /* DUK_USE_64BIT_OPS */ + +#if defined(DUK_USE_FASTINT) +/* Note: masking is done for 'i' to deal with negative numbers correctly */ +#if defined(DUK_USE_DOUBLE_ME) +#define DUK__TVAL_SET_I48(tv, i) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->ui[DUK_DBL_IDX_UI0] = \ + ((duk_uint32_t) DUK_TAG_FASTINT) << 16 | (((duk_uint32_t) ((i) >> 32)) & 0x0000ffffUL); \ + duk__tv->ui[DUK_DBL_IDX_UI1] = (duk_uint32_t) (i); \ + } while (0) +#define DUK__TVAL_SET_U32(tv, i) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->ui[DUK_DBL_IDX_UI0] = ((duk_uint32_t) DUK_TAG_FASTINT) << 16; \ + duk__tv->ui[DUK_DBL_IDX_UI1] = (duk_uint32_t) (i); \ + } while (0) +#else +#define DUK__TVAL_SET_I48(tv, i) \ + do { \ + (tv)->ull[DUK_DBL_IDX_ULL0] = \ + (((duk_uint64_t) DUK_TAG_FASTINT) << 48) | (((duk_uint64_t) (i)) & DUK_U64_CONSTANT(0x0000ffffffffffff)); \ + } while (0) +#define DUK__TVAL_SET_U32(tv, i) \ + do { \ + (tv)->ull[DUK_DBL_IDX_ULL0] = (((duk_uint64_t) DUK_TAG_FASTINT) << 48) | (duk_uint64_t) (i); \ + } while (0) +#endif + +/* This needs to go through a cast because sign extension is needed. */ +#define DUK__TVAL_SET_I32(tv, i) \ + do { \ + duk_int64_t duk__tmp = (duk_int64_t) (i); \ + DUK_TVAL_SET_I48((tv), duk__tmp); \ + } while (0) + +/* XXX: Clumsy sign extend and masking of 16 topmost bits. */ +#if defined(DUK_USE_DOUBLE_ME) +#define DUK__TVAL_GET_FASTINT(tv) \ + (((duk_int64_t) ((((duk_uint64_t) (tv)->ui[DUK_DBL_IDX_UI0]) << 32) | ((duk_uint64_t) (tv)->ui[DUK_DBL_IDX_UI1]))) \ + << 16 >> \ + 16) +#else +#define DUK__TVAL_GET_FASTINT(tv) ((((duk_int64_t) (tv)->ull[DUK_DBL_IDX_ULL0]) << 16) >> 16) +#endif +#define DUK__TVAL_GET_FASTINT_U32(tv) ((tv)->ui[DUK_DBL_IDX_UI1]) +#define DUK__TVAL_GET_FASTINT_I32(tv) ((duk_int32_t) (tv)->ui[DUK_DBL_IDX_UI1]) +#endif /* DUK_USE_FASTINT */ + +#define DUK_TVAL_SET_UNDEFINED(tv) \ + do { \ + (tv)->us[DUK_DBL_IDX_US0] = (duk_uint16_t) DUK_TAG_UNDEFINED; \ + } while (0) +#define DUK_TVAL_SET_UNUSED(tv) \ + do { \ + (tv)->us[DUK_DBL_IDX_US0] = (duk_uint16_t) DUK_TAG_UNUSED; \ + } while (0) +#define DUK_TVAL_SET_NULL(tv) \ + do { \ + (tv)->us[DUK_DBL_IDX_US0] = (duk_uint16_t) DUK_TAG_NULL; \ + } while (0) + +#define DUK_TVAL_SET_BOOLEAN(tv, val) \ + DUK_DBLUNION_SET_HIGH32((tv), (((duk_uint32_t) DUK_TAG_BOOLEAN) << 16) | ((duk_uint32_t) (val))) + +#define DUK_TVAL_SET_NAN(tv) DUK_DBLUNION_SET_NAN_FULL((tv)) + +/* Assumes that caller has normalized NaNs, otherwise trouble ahead. */ +#if defined(DUK_USE_FASTINT) +#define DUK_TVAL_SET_DOUBLE(tv, d) \ + do { \ + duk_double_t duk__dblval; \ + duk__dblval = (d); \ + DUK_ASSERT_DOUBLE_IS_NORMALIZED(duk__dblval); \ + DUK_DBLUNION_SET_DOUBLE((tv), duk__dblval); \ + } while (0) +#define DUK_TVAL_SET_I48(tv, i) DUK__TVAL_SET_I48((tv), (i)) +#define DUK_TVAL_SET_I32(tv, i) DUK__TVAL_SET_I32((tv), (i)) +#define DUK_TVAL_SET_U32(tv, i) DUK__TVAL_SET_U32((tv), (i)) +#define DUK_TVAL_SET_NUMBER_CHKFAST_FAST(tv, d) duk_tval_set_number_chkfast_fast((tv), (d)) +#define DUK_TVAL_SET_NUMBER_CHKFAST_SLOW(tv, d) duk_tval_set_number_chkfast_slow((tv), (d)) +#define DUK_TVAL_SET_NUMBER(tv, d) DUK_TVAL_SET_DOUBLE((tv), (d)) +#define DUK_TVAL_CHKFAST_INPLACE_FAST(tv) \ + do { \ + duk_tval *duk__tv; \ + duk_double_t duk__d; \ + duk__tv = (tv); \ + if (DUK_TVAL_IS_DOUBLE(duk__tv)) { \ + duk__d = DUK_TVAL_GET_DOUBLE(duk__tv); \ + DUK_TVAL_SET_NUMBER_CHKFAST_FAST(duk__tv, duk__d); \ + } \ + } while (0) +#define DUK_TVAL_CHKFAST_INPLACE_SLOW(tv) \ + do { \ + duk_tval *duk__tv; \ + duk_double_t duk__d; \ + duk__tv = (tv); \ + if (DUK_TVAL_IS_DOUBLE(duk__tv)) { \ + duk__d = DUK_TVAL_GET_DOUBLE(duk__tv); \ + DUK_TVAL_SET_NUMBER_CHKFAST_SLOW(duk__tv, duk__d); \ + } \ + } while (0) +#else /* DUK_USE_FASTINT */ +#define DUK_TVAL_SET_DOUBLE(tv, d) \ + do { \ + duk_double_t duk__dblval; \ + duk__dblval = (d); \ + DUK_ASSERT_DOUBLE_IS_NORMALIZED(duk__dblval); \ + DUK_DBLUNION_SET_DOUBLE((tv), duk__dblval); \ + } while (0) +#define DUK_TVAL_SET_I48(tv, i) DUK_TVAL_SET_DOUBLE((tv), (duk_double_t) (i)) /* XXX: fast int-to-double */ +#define DUK_TVAL_SET_I32(tv, i) DUK_TVAL_SET_DOUBLE((tv), (duk_double_t) (i)) +#define DUK_TVAL_SET_U32(tv, i) DUK_TVAL_SET_DOUBLE((tv), (duk_double_t) (i)) +#define DUK_TVAL_SET_NUMBER_CHKFAST_FAST(tv, d) DUK_TVAL_SET_DOUBLE((tv), (d)) +#define DUK_TVAL_SET_NUMBER_CHKFAST_SLOW(tv, d) DUK_TVAL_SET_DOUBLE((tv), (d)) +#define DUK_TVAL_SET_NUMBER(tv, d) DUK_TVAL_SET_DOUBLE((tv), (d)) +#define DUK_TVAL_CHKFAST_INPLACE_FAST(tv) \ + do { \ + } while (0) +#define DUK_TVAL_CHKFAST_INPLACE_SLOW(tv) \ + do { \ + } while (0) +#endif /* DUK_USE_FASTINT */ + +#define DUK_TVAL_SET_FASTINT(tv, i) DUK_TVAL_SET_I48((tv), (i)) /* alias */ + +#define DUK_TVAL_SET_LIGHTFUNC(tv, fp, flags) DUK__TVAL_SET_LIGHTFUNC((tv), (fp), (flags)) +#define DUK_TVAL_SET_STRING(tv, h) DUK__TVAL_SET_TAGGEDPOINTER((tv), (h), DUK_TAG_STRING) +#define DUK_TVAL_SET_OBJECT(tv, h) DUK__TVAL_SET_TAGGEDPOINTER((tv), (h), DUK_TAG_OBJECT) +#define DUK_TVAL_SET_BUFFER(tv, h) DUK__TVAL_SET_TAGGEDPOINTER((tv), (h), DUK_TAG_BUFFER) +#define DUK_TVAL_SET_POINTER(tv, p) DUK__TVAL_SET_TAGGEDPOINTER((tv), (p), DUK_TAG_POINTER) + +#define DUK_TVAL_SET_TVAL(tv, x) \ + do { \ + *(tv) = *(x); \ + } while (0) + +/* getters */ +#define DUK_TVAL_GET_BOOLEAN(tv) ((duk_small_uint_t) (tv)->us[DUK_DBL_IDX_US1]) +#if defined(DUK_USE_FASTINT) +#define DUK_TVAL_GET_DOUBLE(tv) ((tv)->d) +#define DUK_TVAL_GET_FASTINT(tv) DUK__TVAL_GET_FASTINT((tv)) +#define DUK_TVAL_GET_FASTINT_U32(tv) DUK__TVAL_GET_FASTINT_U32((tv)) +#define DUK_TVAL_GET_FASTINT_I32(tv) DUK__TVAL_GET_FASTINT_I32((tv)) +#define DUK_TVAL_GET_NUMBER(tv) duk_tval_get_number_packed((tv)) +#else +#define DUK_TVAL_GET_NUMBER(tv) ((tv)->d) +#define DUK_TVAL_GET_DOUBLE(tv) ((tv)->d) +#endif +#define DUK_TVAL_GET_LIGHTFUNC(tv, out_fp, out_flags) \ + do { \ + (out_flags) = (tv)->ui[DUK_DBL_IDX_UI0] & 0xffffUL; \ + (out_fp) = (duk_c_function) (tv)->ui[DUK_DBL_IDX_UI1]; \ + } while (0) +#define DUK_TVAL_GET_LIGHTFUNC_FUNCPTR(tv) ((duk_c_function) ((tv)->ui[DUK_DBL_IDX_UI1])) +#define DUK_TVAL_GET_LIGHTFUNC_FLAGS(tv) (((duk_small_uint_t) (tv)->ui[DUK_DBL_IDX_UI0]) & 0xffffUL) +#define DUK_TVAL_GET_STRING(tv) ((duk_hstring *) (tv)->vp[DUK_DBL_IDX_VP1]) +#define DUK_TVAL_GET_OBJECT(tv) ((duk_hobject *) (tv)->vp[DUK_DBL_IDX_VP1]) +#define DUK_TVAL_GET_BUFFER(tv) ((duk_hbuffer *) (tv)->vp[DUK_DBL_IDX_VP1]) +#define DUK_TVAL_GET_POINTER(tv) ((void *) (tv)->vp[DUK_DBL_IDX_VP1]) +#define DUK_TVAL_GET_HEAPHDR(tv) ((duk_heaphdr *) (tv)->vp[DUK_DBL_IDX_VP1]) + +/* decoding */ +#define DUK_TVAL_GET_TAG(tv) ((duk_small_uint_t) (tv)->us[DUK_DBL_IDX_US0]) + +#define DUK_TVAL_IS_UNDEFINED(tv) (DUK_TVAL_GET_TAG((tv)) == DUK_TAG_UNDEFINED) +#define DUK_TVAL_IS_UNUSED(tv) (DUK_TVAL_GET_TAG((tv)) == DUK_TAG_UNUSED) +#define DUK_TVAL_IS_NULL(tv) (DUK_TVAL_GET_TAG((tv)) == DUK_TAG_NULL) +#define DUK_TVAL_IS_BOOLEAN(tv) (DUK_TVAL_GET_TAG((tv)) == DUK_TAG_BOOLEAN) +#define DUK_TVAL_IS_BOOLEAN_TRUE(tv) ((tv)->ui[DUK_DBL_IDX_UI0] == DUK_XTAG_BOOLEAN_TRUE) +#define DUK_TVAL_IS_BOOLEAN_FALSE(tv) ((tv)->ui[DUK_DBL_IDX_UI0] == DUK_XTAG_BOOLEAN_FALSE) +#define DUK_TVAL_IS_LIGHTFUNC(tv) (DUK_TVAL_GET_TAG((tv)) == DUK_TAG_LIGHTFUNC) +#define DUK_TVAL_IS_STRING(tv) (DUK_TVAL_GET_TAG((tv)) == DUK_TAG_STRING) +#define DUK_TVAL_IS_OBJECT(tv) (DUK_TVAL_GET_TAG((tv)) == DUK_TAG_OBJECT) +#define DUK_TVAL_IS_BUFFER(tv) (DUK_TVAL_GET_TAG((tv)) == DUK_TAG_BUFFER) +#define DUK_TVAL_IS_POINTER(tv) (DUK_TVAL_GET_TAG((tv)) == DUK_TAG_POINTER) +#if defined(DUK_USE_FASTINT) +/* 0xfff0 is -Infinity */ +#define DUK_TVAL_IS_DOUBLE(tv) (DUK_TVAL_GET_TAG((tv)) <= 0xfff0UL) +#define DUK_TVAL_IS_FASTINT(tv) (DUK_TVAL_GET_TAG((tv)) == DUK_TAG_FASTINT) +#define DUK_TVAL_IS_NUMBER(tv) (DUK_TVAL_GET_TAG((tv)) <= 0xfff1UL) +#else +#define DUK_TVAL_IS_NUMBER(tv) (DUK_TVAL_GET_TAG((tv)) <= 0xfff0UL) +#define DUK_TVAL_IS_DOUBLE(tv) DUK_TVAL_IS_NUMBER((tv)) +#endif + +/* This is performance critical because it appears in every DECREF. */ +#define DUK_TVAL_IS_HEAP_ALLOCATED(tv) (DUK_TVAL_GET_TAG((tv)) >= DUK_TAG_STRING) + +#if defined(DUK_USE_FASTINT) +DUK_INTERNAL_DECL duk_double_t duk_tval_get_number_packed(duk_tval *tv); +#endif + +#else /* DUK_USE_PACKED_TVAL */ +/* ======================================================================== */ + +/* + * Portable 12-byte representation + */ + +/* Note: not initializing all bytes is normally not an issue: Duktape won't + * read or use the uninitialized bytes so valgrind won't issue warnings. + * In some special cases a harmless valgrind warning may be issued though. + * For example, the DumpHeap debugger command writes out a compiled function's + * 'data' area as is, including any uninitialized bytes, which causes a + * valgrind warning. + */ + +typedef struct duk_tval_struct duk_tval; + +struct duk_tval_struct { + duk_small_uint_t t; + duk_small_uint_t v_extra; + union { + duk_double_t d; + duk_small_int_t i; +#if defined(DUK_USE_FASTINT) + duk_int64_t fi; /* if present, forces 16-byte duk_tval */ +#endif + void *voidptr; + duk_hstring *hstring; + duk_hobject *hobject; + duk_hcompfunc *hcompfunc; + duk_hnatfunc *hnatfunc; + duk_hthread *hthread; + duk_hbuffer *hbuffer; + duk_heaphdr *heaphdr; + duk_c_function lightfunc; + } v; +}; + +typedef struct { + duk_small_uint_t t; + duk_small_uint_t v_extra; + /* The rest of the fields don't matter except for debug dumps and such + * for which a partial initializer may trigger out-ot-bounds memory + * reads. Include a double field which is usually as large or larger + * than pointers (not always however). + */ + duk_double_t d; +} duk_tval_unused; + +#define DUK_TVAL_UNUSED_INITIALIZER() \ + { DUK_TAG_UNUSED, 0, 0.0 } + +#define DUK_TAG_MIN 0 +#define DUK_TAG_NUMBER 0 /* DUK_TAG_NUMBER only defined for non-packed duk_tval */ +#if defined(DUK_USE_FASTINT) +#define DUK_TAG_FASTINT 1 +#endif +#define DUK_TAG_UNDEFINED 2 +#define DUK_TAG_NULL 3 +#define DUK_TAG_BOOLEAN 4 +#define DUK_TAG_POINTER 5 +#define DUK_TAG_LIGHTFUNC 6 +#define DUK_TAG_UNUSED 7 /* marker; not actual tagged type */ +#define DUK_TAG_STRING 8 /* first heap allocated, match bit boundary */ +#define DUK_TAG_OBJECT 9 +#define DUK_TAG_BUFFER 10 +#define DUK_TAG_MAX 10 + +#define DUK_TVAL_IS_VALID_TAG(tv) (DUK_TVAL_GET_TAG((tv)) - DUK_TAG_MIN <= DUK_TAG_MAX - DUK_TAG_MIN) + +/* DUK_TAG_NUMBER is intentionally first, as it is the default clause in code + * to support the 8-byte representation. Further, it is a non-heap-allocated + * type so it should come before DUK_TAG_STRING. Finally, it should not break + * the tag value ranges covered by case-clauses in a switch-case. + */ + +/* setters */ +#define DUK_TVAL_SET_UNDEFINED(tv) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_UNDEFINED; \ + } while (0) + +#define DUK_TVAL_SET_UNUSED(tv) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_UNUSED; \ + } while (0) + +#define DUK_TVAL_SET_NULL(tv) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_NULL; \ + } while (0) + +#define DUK_TVAL_SET_BOOLEAN(tv, val) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_BOOLEAN; \ + duk__tv->v.i = (duk_small_int_t) (val); \ + } while (0) + +#if defined(DUK_USE_FASTINT) +#define DUK_TVAL_SET_DOUBLE(tv, val) \ + do { \ + duk_tval *duk__tv; \ + duk_double_t duk__dblval; \ + duk__dblval = (val); \ + DUK_ASSERT_DOUBLE_IS_NORMALIZED(duk__dblval); /* nop for unpacked duk_tval */ \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_NUMBER; \ + duk__tv->v.d = duk__dblval; \ + } while (0) +#define DUK_TVAL_SET_I48(tv, val) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_FASTINT; \ + duk__tv->v.fi = (val); \ + } while (0) +#define DUK_TVAL_SET_U32(tv, val) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_FASTINT; \ + duk__tv->v.fi = (duk_int64_t) (val); \ + } while (0) +#define DUK_TVAL_SET_I32(tv, val) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_FASTINT; \ + duk__tv->v.fi = (duk_int64_t) (val); \ + } while (0) +#define DUK_TVAL_SET_NUMBER_CHKFAST_FAST(tv, d) duk_tval_set_number_chkfast_fast((tv), (d)) +#define DUK_TVAL_SET_NUMBER_CHKFAST_SLOW(tv, d) duk_tval_set_number_chkfast_slow((tv), (d)) +#define DUK_TVAL_SET_NUMBER(tv, val) DUK_TVAL_SET_DOUBLE((tv), (val)) +#define DUK_TVAL_CHKFAST_INPLACE_FAST(tv) \ + do { \ + duk_tval *duk__tv; \ + duk_double_t duk__d; \ + duk__tv = (tv); \ + if (DUK_TVAL_IS_DOUBLE(duk__tv)) { \ + duk__d = DUK_TVAL_GET_DOUBLE(duk__tv); \ + DUK_TVAL_SET_NUMBER_CHKFAST_FAST(duk__tv, duk__d); \ + } \ + } while (0) +#define DUK_TVAL_CHKFAST_INPLACE_SLOW(tv) \ + do { \ + duk_tval *duk__tv; \ + duk_double_t duk__d; \ + duk__tv = (tv); \ + if (DUK_TVAL_IS_DOUBLE(duk__tv)) { \ + duk__d = DUK_TVAL_GET_DOUBLE(duk__tv); \ + DUK_TVAL_SET_NUMBER_CHKFAST_SLOW(duk__tv, duk__d); \ + } \ + } while (0) +#else /* DUK_USE_FASTINT */ +#define DUK_TVAL_SET_DOUBLE(tv, d) DUK_TVAL_SET_NUMBER((tv), (d)) +#define DUK_TVAL_SET_I48(tv, val) DUK_TVAL_SET_NUMBER((tv), (duk_double_t) (val)) /* XXX: fast int-to-double */ +#define DUK_TVAL_SET_U32(tv, val) DUK_TVAL_SET_NUMBER((tv), (duk_double_t) (val)) +#define DUK_TVAL_SET_I32(tv, val) DUK_TVAL_SET_NUMBER((tv), (duk_double_t) (val)) +#define DUK_TVAL_SET_NUMBER(tv, val) \ + do { \ + duk_tval *duk__tv; \ + duk_double_t duk__dblval; \ + duk__dblval = (val); \ + DUK_ASSERT_DOUBLE_IS_NORMALIZED(duk__dblval); /* nop for unpacked duk_tval */ \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_NUMBER; \ + duk__tv->v.d = duk__dblval; \ + } while (0) +#define DUK_TVAL_SET_NUMBER_CHKFAST_FAST(tv, d) DUK_TVAL_SET_NUMBER((tv), (d)) +#define DUK_TVAL_SET_NUMBER_CHKFAST_SLOW(tv, d) DUK_TVAL_SET_NUMBER((tv), (d)) +#define DUK_TVAL_CHKFAST_INPLACE_FAST(tv) \ + do { \ + } while (0) +#define DUK_TVAL_CHKFAST_INPLACE_SLOW(tv) \ + do { \ + } while (0) +#endif /* DUK_USE_FASTINT */ + +#define DUK_TVAL_SET_FASTINT(tv, i) DUK_TVAL_SET_I48((tv), (i)) /* alias */ + +#define DUK_TVAL_SET_POINTER(tv, hptr) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_POINTER; \ + duk__tv->v.voidptr = (hptr); \ + } while (0) + +#define DUK_TVAL_SET_LIGHTFUNC(tv, fp, flags) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_LIGHTFUNC; \ + duk__tv->v_extra = (flags); \ + duk__tv->v.lightfunc = (duk_c_function) (fp); \ + } while (0) + +#define DUK_TVAL_SET_STRING(tv, hptr) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_STRING; \ + duk__tv->v.hstring = (hptr); \ + } while (0) + +#define DUK_TVAL_SET_OBJECT(tv, hptr) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_OBJECT; \ + duk__tv->v.hobject = (hptr); \ + } while (0) + +#define DUK_TVAL_SET_BUFFER(tv, hptr) \ + do { \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_BUFFER; \ + duk__tv->v.hbuffer = (hptr); \ + } while (0) + +#define DUK_TVAL_SET_NAN(tv) \ + do { \ + /* in non-packed representation we don't care about which NaN is used */ \ + duk_tval *duk__tv; \ + duk__tv = (tv); \ + duk__tv->t = DUK_TAG_NUMBER; \ + duk__tv->v.d = DUK_DOUBLE_NAN; \ + } while (0) + +#define DUK_TVAL_SET_TVAL(tv, x) \ + do { \ + *(tv) = *(x); \ + } while (0) + +/* getters */ +#define DUK_TVAL_GET_BOOLEAN(tv) ((duk_small_uint_t) (tv)->v.i) +#if defined(DUK_USE_FASTINT) +#define DUK_TVAL_GET_DOUBLE(tv) ((tv)->v.d) +#define DUK_TVAL_GET_FASTINT(tv) ((tv)->v.fi) +#define DUK_TVAL_GET_FASTINT_U32(tv) ((duk_uint32_t) ((tv)->v.fi)) +#define DUK_TVAL_GET_FASTINT_I32(tv) ((duk_int32_t) ((tv)->v.fi)) +#if 0 +#define DUK_TVAL_GET_NUMBER(tv) (DUK_TVAL_IS_FASTINT((tv)) ? (duk_double_t) DUK_TVAL_GET_FASTINT((tv)) : DUK_TVAL_GET_DOUBLE((tv))) +#define DUK_TVAL_GET_NUMBER(tv) duk_tval_get_number_unpacked((tv)) +#else +/* This seems reasonable overall. */ +#define DUK_TVAL_GET_NUMBER(tv) (DUK_TVAL_IS_FASTINT((tv)) ? duk_tval_get_number_unpacked_fastint((tv)) : DUK_TVAL_GET_DOUBLE((tv))) +#endif +#else +#define DUK_TVAL_GET_NUMBER(tv) ((tv)->v.d) +#define DUK_TVAL_GET_DOUBLE(tv) ((tv)->v.d) +#endif /* DUK_USE_FASTINT */ +#define DUK_TVAL_GET_POINTER(tv) ((tv)->v.voidptr) +#define DUK_TVAL_GET_LIGHTFUNC(tv, out_fp, out_flags) \ + do { \ + (out_flags) = (duk_uint32_t) (tv)->v_extra; \ + (out_fp) = (tv)->v.lightfunc; \ + } while (0) +#define DUK_TVAL_GET_LIGHTFUNC_FUNCPTR(tv) ((tv)->v.lightfunc) +#define DUK_TVAL_GET_LIGHTFUNC_FLAGS(tv) ((duk_small_uint_t) ((tv)->v_extra)) +#define DUK_TVAL_GET_STRING(tv) ((tv)->v.hstring) +#define DUK_TVAL_GET_OBJECT(tv) ((tv)->v.hobject) +#define DUK_TVAL_GET_BUFFER(tv) ((tv)->v.hbuffer) +#define DUK_TVAL_GET_HEAPHDR(tv) ((tv)->v.heaphdr) + +/* decoding */ +#define DUK_TVAL_GET_TAG(tv) ((tv)->t) +#define DUK_TVAL_IS_UNDEFINED(tv) ((tv)->t == DUK_TAG_UNDEFINED) +#define DUK_TVAL_IS_UNUSED(tv) ((tv)->t == DUK_TAG_UNUSED) +#define DUK_TVAL_IS_NULL(tv) ((tv)->t == DUK_TAG_NULL) +#define DUK_TVAL_IS_BOOLEAN(tv) ((tv)->t == DUK_TAG_BOOLEAN) +#define DUK_TVAL_IS_BOOLEAN_TRUE(tv) (((tv)->t == DUK_TAG_BOOLEAN) && ((tv)->v.i != 0)) +#define DUK_TVAL_IS_BOOLEAN_FALSE(tv) (((tv)->t == DUK_TAG_BOOLEAN) && ((tv)->v.i == 0)) +#if defined(DUK_USE_FASTINT) +#define DUK_TVAL_IS_DOUBLE(tv) ((tv)->t == DUK_TAG_NUMBER) +#define DUK_TVAL_IS_FASTINT(tv) ((tv)->t == DUK_TAG_FASTINT) +#define DUK_TVAL_IS_NUMBER(tv) ((tv)->t == DUK_TAG_NUMBER || (tv)->t == DUK_TAG_FASTINT) +#else +#define DUK_TVAL_IS_NUMBER(tv) ((tv)->t == DUK_TAG_NUMBER) +#define DUK_TVAL_IS_DOUBLE(tv) DUK_TVAL_IS_NUMBER((tv)) +#endif /* DUK_USE_FASTINT */ +#define DUK_TVAL_IS_POINTER(tv) ((tv)->t == DUK_TAG_POINTER) +#define DUK_TVAL_IS_LIGHTFUNC(tv) ((tv)->t == DUK_TAG_LIGHTFUNC) +#define DUK_TVAL_IS_STRING(tv) ((tv)->t == DUK_TAG_STRING) +#define DUK_TVAL_IS_OBJECT(tv) ((tv)->t == DUK_TAG_OBJECT) +#define DUK_TVAL_IS_BUFFER(tv) ((tv)->t == DUK_TAG_BUFFER) + +/* This is performance critical because it's needed for every DECREF. + * Take advantage of the fact that the first heap allocated tag is 8, + * so that bit 3 is set for all heap allocated tags (and never set for + * non-heap-allocated tags). + */ +#if 0 +#define DUK_TVAL_IS_HEAP_ALLOCATED(tv) ((tv)->t >= DUK_TAG_STRING) +#endif +#define DUK_TVAL_IS_HEAP_ALLOCATED(tv) ((tv)->t & 0x08) + +#if defined(DUK_USE_FASTINT) +#if 0 +DUK_INTERNAL_DECL duk_double_t duk_tval_get_number_unpacked(duk_tval *tv); +#endif +DUK_INTERNAL_DECL duk_double_t duk_tval_get_number_unpacked_fastint(duk_tval *tv); +#endif + +#endif /* DUK_USE_PACKED_TVAL */ + +/* + * Convenience (independent of representation) + */ + +#define DUK_TVAL_SET_BOOLEAN_TRUE(tv) DUK_TVAL_SET_BOOLEAN((tv), 1) +#define DUK_TVAL_SET_BOOLEAN_FALSE(tv) DUK_TVAL_SET_BOOLEAN((tv), 0) + +#define DUK_TVAL_STRING_IS_SYMBOL(tv) DUK_HSTRING_HAS_SYMBOL(DUK_TVAL_GET_STRING((tv))) + +/* Lightfunc flags packing and unpacking. */ +/* Sign extend: 0x0000##00 -> 0x##000000 -> sign extend to 0xssssss##. + * Avoid signed shifts due to portability limitations. + */ +#define DUK_LFUNC_FLAGS_GET_MAGIC(lf_flags) ((duk_int32_t) (duk_int8_t) (((duk_uint16_t) (lf_flags)) >> 8)) +#define DUK_LFUNC_FLAGS_GET_LENGTH(lf_flags) (((lf_flags) >> 4) & 0x0fU) +#define DUK_LFUNC_FLAGS_GET_NARGS(lf_flags) ((lf_flags) &0x0fU) +#define DUK_LFUNC_FLAGS_PACK(magic, length, nargs) ((((duk_small_uint_t) (magic)) & 0xffU) << 8) | ((length) << 4) | (nargs) + +#define DUK_LFUNC_NARGS_VARARGS 0x0f /* varargs marker */ +#define DUK_LFUNC_NARGS_MIN 0x00 +#define DUK_LFUNC_NARGS_MAX 0x0e /* max, excl. varargs marker */ +#define DUK_LFUNC_LENGTH_MIN 0x00 +#define DUK_LFUNC_LENGTH_MAX 0x0f +#define DUK_LFUNC_MAGIC_MIN (-0x80) +#define DUK_LFUNC_MAGIC_MAX 0x7f + +/* fastint constants etc */ +#if defined(DUK_USE_FASTINT) +#define DUK_FASTINT_MIN (DUK_I64_CONSTANT(-0x800000000000)) +#define DUK_FASTINT_MAX (DUK_I64_CONSTANT(0x7fffffffffff)) +#define DUK_FASTINT_BITS 48 + +DUK_INTERNAL_DECL void duk_tval_set_number_chkfast_fast(duk_tval *tv, duk_double_t x); +DUK_INTERNAL_DECL void duk_tval_set_number_chkfast_slow(duk_tval *tv, duk_double_t x); +#endif + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_tval_assert_valid(duk_tval *tv); +#define DUK_TVAL_ASSERT_VALID(tv) \ + do { \ + duk_tval_assert_valid((tv)); \ + } while (0) +#else +#define DUK_TVAL_ASSERT_VALID(tv) \ + do { \ + } while (0) +#endif + +#endif /* DUK_TVAL_H_INCLUDED */ +/* #include duk_builtins.h */ +#line 1 "duk_builtins.h" +/* + * Automatically generated by genbuiltins.py, do not edit! + */ + +#if !defined(DUK_BUILTINS_H_INCLUDED) +#define DUK_BUILTINS_H_INCLUDED + +#if defined(DUK_USE_ROM_STRINGS) +#error ROM support not enabled, rerun configure.py with --rom-support +#else /* DUK_USE_ROM_STRINGS */ +#define DUK_STRIDX_UC_UNDEFINED 0 /* 'Undefined' */ +#define DUK_HEAP_STRING_UC_UNDEFINED(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_UNDEFINED) +#define DUK_HTHREAD_STRING_UC_UNDEFINED(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_UNDEFINED) +#define DUK_STRIDX_UC_NULL 1 /* 'Null' */ +#define DUK_HEAP_STRING_UC_NULL(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_NULL) +#define DUK_HTHREAD_STRING_UC_NULL(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_NULL) +#define DUK_STRIDX_UC_SYMBOL 2 /* 'Symbol' */ +#define DUK_HEAP_STRING_UC_SYMBOL(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_SYMBOL) +#define DUK_HTHREAD_STRING_UC_SYMBOL(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_SYMBOL) +#define DUK_STRIDX_UC_ARGUMENTS 3 /* 'Arguments' */ +#define DUK_HEAP_STRING_UC_ARGUMENTS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_ARGUMENTS) +#define DUK_HTHREAD_STRING_UC_ARGUMENTS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_ARGUMENTS) +#define DUK_STRIDX_UC_OBJECT 4 /* 'Object' */ +#define DUK_HEAP_STRING_UC_OBJECT(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_OBJECT) +#define DUK_HTHREAD_STRING_UC_OBJECT(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_OBJECT) +#define DUK_STRIDX_UC_FUNCTION 5 /* 'Function' */ +#define DUK_HEAP_STRING_UC_FUNCTION(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_FUNCTION) +#define DUK_HTHREAD_STRING_UC_FUNCTION(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_FUNCTION) +#define DUK_STRIDX_UC_ARRAY 6 /* 'Array' */ +#define DUK_HEAP_STRING_UC_ARRAY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_ARRAY) +#define DUK_HTHREAD_STRING_UC_ARRAY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_ARRAY) +#define DUK_STRIDX_UC_STRING 7 /* 'String' */ +#define DUK_HEAP_STRING_UC_STRING(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_STRING) +#define DUK_HTHREAD_STRING_UC_STRING(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_STRING) +#define DUK_STRIDX_UC_BOOLEAN 8 /* 'Boolean' */ +#define DUK_HEAP_STRING_UC_BOOLEAN(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_BOOLEAN) +#define DUK_HTHREAD_STRING_UC_BOOLEAN(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_BOOLEAN) +#define DUK_STRIDX_UC_NUMBER 9 /* 'Number' */ +#define DUK_HEAP_STRING_UC_NUMBER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_NUMBER) +#define DUK_HTHREAD_STRING_UC_NUMBER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_NUMBER) +#define DUK_STRIDX_UC_DATE 10 /* 'Date' */ +#define DUK_HEAP_STRING_UC_DATE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_DATE) +#define DUK_HTHREAD_STRING_UC_DATE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_DATE) +#define DUK_STRIDX_REG_EXP 11 /* 'RegExp' */ +#define DUK_HEAP_STRING_REG_EXP(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_REG_EXP) +#define DUK_HTHREAD_STRING_REG_EXP(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_REG_EXP) +#define DUK_STRIDX_UC_ERROR 12 /* 'Error' */ +#define DUK_HEAP_STRING_UC_ERROR(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_ERROR) +#define DUK_HTHREAD_STRING_UC_ERROR(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_ERROR) +#define DUK_STRIDX_MATH 13 /* 'Math' */ +#define DUK_HEAP_STRING_MATH(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_MATH) +#define DUK_HTHREAD_STRING_MATH(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_MATH) +#define DUK_STRIDX_JSON 14 /* 'JSON' */ +#define DUK_HEAP_STRING_JSON(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_JSON) +#define DUK_HTHREAD_STRING_JSON(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_JSON) +#define DUK_STRIDX_EMPTY_STRING 15 /* '' */ +#define DUK_HEAP_STRING_EMPTY_STRING(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_EMPTY_STRING) +#define DUK_HTHREAD_STRING_EMPTY_STRING(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_EMPTY_STRING) +#define DUK_STRIDX_ARRAY_BUFFER 16 /* 'ArrayBuffer' */ +#define DUK_HEAP_STRING_ARRAY_BUFFER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_ARRAY_BUFFER) +#define DUK_HTHREAD_STRING_ARRAY_BUFFER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_ARRAY_BUFFER) +#define DUK_STRIDX_DATA_VIEW 17 /* 'DataView' */ +#define DUK_HEAP_STRING_DATA_VIEW(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_DATA_VIEW) +#define DUK_HTHREAD_STRING_DATA_VIEW(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_DATA_VIEW) +#define DUK_STRIDX_INT8_ARRAY 18 /* 'Int8Array' */ +#define DUK_HEAP_STRING_INT8_ARRAY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT8_ARRAY) +#define DUK_HTHREAD_STRING_INT8_ARRAY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT8_ARRAY) +#define DUK_STRIDX_UINT8_ARRAY 19 /* 'Uint8Array' */ +#define DUK_HEAP_STRING_UINT8_ARRAY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UINT8_ARRAY) +#define DUK_HTHREAD_STRING_UINT8_ARRAY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UINT8_ARRAY) +#define DUK_STRIDX_UINT8_CLAMPED_ARRAY 20 /* 'Uint8ClampedArray' */ +#define DUK_HEAP_STRING_UINT8_CLAMPED_ARRAY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UINT8_CLAMPED_ARRAY) +#define DUK_HTHREAD_STRING_UINT8_CLAMPED_ARRAY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UINT8_CLAMPED_ARRAY) +#define DUK_STRIDX_INT16_ARRAY 21 /* 'Int16Array' */ +#define DUK_HEAP_STRING_INT16_ARRAY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT16_ARRAY) +#define DUK_HTHREAD_STRING_INT16_ARRAY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT16_ARRAY) +#define DUK_STRIDX_UINT16_ARRAY 22 /* 'Uint16Array' */ +#define DUK_HEAP_STRING_UINT16_ARRAY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UINT16_ARRAY) +#define DUK_HTHREAD_STRING_UINT16_ARRAY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UINT16_ARRAY) +#define DUK_STRIDX_INT32_ARRAY 23 /* 'Int32Array' */ +#define DUK_HEAP_STRING_INT32_ARRAY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT32_ARRAY) +#define DUK_HTHREAD_STRING_INT32_ARRAY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT32_ARRAY) +#define DUK_STRIDX_UINT32_ARRAY 24 /* 'Uint32Array' */ +#define DUK_HEAP_STRING_UINT32_ARRAY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UINT32_ARRAY) +#define DUK_HTHREAD_STRING_UINT32_ARRAY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UINT32_ARRAY) +#define DUK_STRIDX_FLOAT32_ARRAY 25 /* 'Float32Array' */ +#define DUK_HEAP_STRING_FLOAT32_ARRAY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_FLOAT32_ARRAY) +#define DUK_HTHREAD_STRING_FLOAT32_ARRAY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_FLOAT32_ARRAY) +#define DUK_STRIDX_FLOAT64_ARRAY 26 /* 'Float64Array' */ +#define DUK_HEAP_STRING_FLOAT64_ARRAY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_FLOAT64_ARRAY) +#define DUK_HTHREAD_STRING_FLOAT64_ARRAY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_FLOAT64_ARRAY) +#define DUK_STRIDX_GLOBAL 27 /* 'global' */ +#define DUK_HEAP_STRING_GLOBAL(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_GLOBAL) +#define DUK_HTHREAD_STRING_GLOBAL(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_GLOBAL) +#define DUK_STRIDX_OBJ_ENV 28 /* 'ObjEnv' */ +#define DUK_HEAP_STRING_OBJ_ENV(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_OBJ_ENV) +#define DUK_HTHREAD_STRING_OBJ_ENV(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_OBJ_ENV) +#define DUK_STRIDX_DEC_ENV 29 /* 'DecEnv' */ +#define DUK_HEAP_STRING_DEC_ENV(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_DEC_ENV) +#define DUK_HTHREAD_STRING_DEC_ENV(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_DEC_ENV) +#define DUK_STRIDX_UC_BUFFER 30 /* 'Buffer' */ +#define DUK_HEAP_STRING_UC_BUFFER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_BUFFER) +#define DUK_HTHREAD_STRING_UC_BUFFER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_BUFFER) +#define DUK_STRIDX_UC_POINTER 31 /* 'Pointer' */ +#define DUK_HEAP_STRING_UC_POINTER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_POINTER) +#define DUK_HTHREAD_STRING_UC_POINTER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_POINTER) +#define DUK_STRIDX_UC_THREAD 32 /* 'Thread' */ +#define DUK_HEAP_STRING_UC_THREAD(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_UC_THREAD) +#define DUK_HTHREAD_STRING_UC_THREAD(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_UC_THREAD) +#define DUK_STRIDX_EVAL 33 /* 'eval' */ +#define DUK_HEAP_STRING_EVAL(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_EVAL) +#define DUK_HTHREAD_STRING_EVAL(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_EVAL) +#define DUK_STRIDX_VALUE 34 /* 'value' */ +#define DUK_HEAP_STRING_VALUE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_VALUE) +#define DUK_HTHREAD_STRING_VALUE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_VALUE) +#define DUK_STRIDX_WRITABLE 35 /* 'writable' */ +#define DUK_HEAP_STRING_WRITABLE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_WRITABLE) +#define DUK_HTHREAD_STRING_WRITABLE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_WRITABLE) +#define DUK_STRIDX_CONFIGURABLE 36 /* 'configurable' */ +#define DUK_HEAP_STRING_CONFIGURABLE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_CONFIGURABLE) +#define DUK_HTHREAD_STRING_CONFIGURABLE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_CONFIGURABLE) +#define DUK_STRIDX_ENUMERABLE 37 /* 'enumerable' */ +#define DUK_HEAP_STRING_ENUMERABLE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_ENUMERABLE) +#define DUK_HTHREAD_STRING_ENUMERABLE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_ENUMERABLE) +#define DUK_STRIDX_JOIN 38 /* 'join' */ +#define DUK_HEAP_STRING_JOIN(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_JOIN) +#define DUK_HTHREAD_STRING_JOIN(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_JOIN) +#define DUK_STRIDX_TO_LOCALE_STRING 39 /* 'toLocaleString' */ +#define DUK_HEAP_STRING_TO_LOCALE_STRING(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_TO_LOCALE_STRING) +#define DUK_HTHREAD_STRING_TO_LOCALE_STRING(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_TO_LOCALE_STRING) +#define DUK_STRIDX_VALUE_OF 40 /* 'valueOf' */ +#define DUK_HEAP_STRING_VALUE_OF(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_VALUE_OF) +#define DUK_HTHREAD_STRING_VALUE_OF(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_VALUE_OF) +#define DUK_STRIDX_TO_UTC_STRING 41 /* 'toUTCString' */ +#define DUK_HEAP_STRING_TO_UTC_STRING(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_TO_UTC_STRING) +#define DUK_HTHREAD_STRING_TO_UTC_STRING(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_TO_UTC_STRING) +#define DUK_STRIDX_TO_ISO_STRING 42 /* 'toISOString' */ +#define DUK_HEAP_STRING_TO_ISO_STRING(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_TO_ISO_STRING) +#define DUK_HTHREAD_STRING_TO_ISO_STRING(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_TO_ISO_STRING) +#define DUK_STRIDX_TO_GMT_STRING 43 /* 'toGMTString' */ +#define DUK_HEAP_STRING_TO_GMT_STRING(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_TO_GMT_STRING) +#define DUK_HTHREAD_STRING_TO_GMT_STRING(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_TO_GMT_STRING) +#define DUK_STRIDX_SOURCE 44 /* 'source' */ +#define DUK_HEAP_STRING_SOURCE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_SOURCE) +#define DUK_HTHREAD_STRING_SOURCE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_SOURCE) +#define DUK_STRIDX_IGNORE_CASE 45 /* 'ignoreCase' */ +#define DUK_HEAP_STRING_IGNORE_CASE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_IGNORE_CASE) +#define DUK_HTHREAD_STRING_IGNORE_CASE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_IGNORE_CASE) +#define DUK_STRIDX_MULTILINE 46 /* 'multiline' */ +#define DUK_HEAP_STRING_MULTILINE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_MULTILINE) +#define DUK_HTHREAD_STRING_MULTILINE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_MULTILINE) +#define DUK_STRIDX_LAST_INDEX 47 /* 'lastIndex' */ +#define DUK_HEAP_STRING_LAST_INDEX(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LAST_INDEX) +#define DUK_HTHREAD_STRING_LAST_INDEX(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LAST_INDEX) +#define DUK_STRIDX_FLAGS 48 /* 'flags' */ +#define DUK_HEAP_STRING_FLAGS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_FLAGS) +#define DUK_HTHREAD_STRING_FLAGS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_FLAGS) +#define DUK_STRIDX_INDEX 49 /* 'index' */ +#define DUK_HEAP_STRING_INDEX(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INDEX) +#define DUK_HTHREAD_STRING_INDEX(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INDEX) +#define DUK_STRIDX_PROTOTYPE 50 /* 'prototype' */ +#define DUK_HEAP_STRING_PROTOTYPE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_PROTOTYPE) +#define DUK_HTHREAD_STRING_PROTOTYPE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_PROTOTYPE) +#define DUK_STRIDX_CONSTRUCTOR 51 /* 'constructor' */ +#define DUK_HEAP_STRING_CONSTRUCTOR(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_CONSTRUCTOR) +#define DUK_HTHREAD_STRING_CONSTRUCTOR(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_CONSTRUCTOR) +#define DUK_STRIDX_MESSAGE 52 /* 'message' */ +#define DUK_HEAP_STRING_MESSAGE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_MESSAGE) +#define DUK_HTHREAD_STRING_MESSAGE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_MESSAGE) +#define DUK_STRIDX_LC_BOOLEAN 53 /* 'boolean' */ +#define DUK_HEAP_STRING_LC_BOOLEAN(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_BOOLEAN) +#define DUK_HTHREAD_STRING_LC_BOOLEAN(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_BOOLEAN) +#define DUK_STRIDX_LC_NUMBER 54 /* 'number' */ +#define DUK_HEAP_STRING_LC_NUMBER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_NUMBER) +#define DUK_HTHREAD_STRING_LC_NUMBER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_NUMBER) +#define DUK_STRIDX_LC_STRING 55 /* 'string' */ +#define DUK_HEAP_STRING_LC_STRING(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_STRING) +#define DUK_HTHREAD_STRING_LC_STRING(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_STRING) +#define DUK_STRIDX_LC_SYMBOL 56 /* 'symbol' */ +#define DUK_HEAP_STRING_LC_SYMBOL(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_SYMBOL) +#define DUK_HTHREAD_STRING_LC_SYMBOL(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_SYMBOL) +#define DUK_STRIDX_LC_OBJECT 57 /* 'object' */ +#define DUK_HEAP_STRING_LC_OBJECT(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_OBJECT) +#define DUK_HTHREAD_STRING_LC_OBJECT(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_OBJECT) +#define DUK_STRIDX_LC_UNDEFINED 58 /* 'undefined' */ +#define DUK_HEAP_STRING_LC_UNDEFINED(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_UNDEFINED) +#define DUK_HTHREAD_STRING_LC_UNDEFINED(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_UNDEFINED) +#define DUK_STRIDX_NAN 59 /* 'NaN' */ +#define DUK_HEAP_STRING_NAN(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_NAN) +#define DUK_HTHREAD_STRING_NAN(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_NAN) +#define DUK_STRIDX_INFINITY 60 /* 'Infinity' */ +#define DUK_HEAP_STRING_INFINITY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INFINITY) +#define DUK_HTHREAD_STRING_INFINITY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INFINITY) +#define DUK_STRIDX_MINUS_INFINITY 61 /* '-Infinity' */ +#define DUK_HEAP_STRING_MINUS_INFINITY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_MINUS_INFINITY) +#define DUK_HTHREAD_STRING_MINUS_INFINITY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_MINUS_INFINITY) +#define DUK_STRIDX_MINUS_ZERO 62 /* '-0' */ +#define DUK_HEAP_STRING_MINUS_ZERO(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_MINUS_ZERO) +#define DUK_HTHREAD_STRING_MINUS_ZERO(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_MINUS_ZERO) +#define DUK_STRIDX_COMMA 63 /* ',' */ +#define DUK_HEAP_STRING_COMMA(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_COMMA) +#define DUK_HTHREAD_STRING_COMMA(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_COMMA) +#define DUK_STRIDX_NEWLINE_4SPACE 64 /* '\n ' */ +#define DUK_HEAP_STRING_NEWLINE_4SPACE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_NEWLINE_4SPACE) +#define DUK_HTHREAD_STRING_NEWLINE_4SPACE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_NEWLINE_4SPACE) +#define DUK_STRIDX_BRACKETED_ELLIPSIS 65 /* '[...]' */ +#define DUK_HEAP_STRING_BRACKETED_ELLIPSIS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_BRACKETED_ELLIPSIS) +#define DUK_HTHREAD_STRING_BRACKETED_ELLIPSIS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_BRACKETED_ELLIPSIS) +#define DUK_STRIDX_INVALID_DATE 66 /* 'Invalid Date' */ +#define DUK_HEAP_STRING_INVALID_DATE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INVALID_DATE) +#define DUK_HTHREAD_STRING_INVALID_DATE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INVALID_DATE) +#define DUK_STRIDX_LC_ARGUMENTS 67 /* 'arguments' */ +#define DUK_HEAP_STRING_LC_ARGUMENTS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_ARGUMENTS) +#define DUK_HTHREAD_STRING_LC_ARGUMENTS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_ARGUMENTS) +#define DUK_STRIDX_CALLEE 68 /* 'callee' */ +#define DUK_HEAP_STRING_CALLEE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_CALLEE) +#define DUK_HTHREAD_STRING_CALLEE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_CALLEE) +#define DUK_STRIDX_CALLER 69 /* 'caller' */ +#define DUK_HEAP_STRING_CALLER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_CALLER) +#define DUK_HTHREAD_STRING_CALLER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_CALLER) +#define DUK_STRIDX_APPLY 70 /* 'apply' */ +#define DUK_HEAP_STRING_APPLY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_APPLY) +#define DUK_HTHREAD_STRING_APPLY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_APPLY) +#define DUK_STRIDX_CONSTRUCT 71 /* 'construct' */ +#define DUK_HEAP_STRING_CONSTRUCT(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_CONSTRUCT) +#define DUK_HTHREAD_STRING_CONSTRUCT(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_CONSTRUCT) +#define DUK_STRIDX_DELETE_PROPERTY 72 /* 'deleteProperty' */ +#define DUK_HEAP_STRING_DELETE_PROPERTY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_DELETE_PROPERTY) +#define DUK_HTHREAD_STRING_DELETE_PROPERTY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_DELETE_PROPERTY) +#define DUK_STRIDX_GET 73 /* 'get' */ +#define DUK_HEAP_STRING_GET(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_GET) +#define DUK_HTHREAD_STRING_GET(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_GET) +#define DUK_STRIDX_HAS 74 /* 'has' */ +#define DUK_HEAP_STRING_HAS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_HAS) +#define DUK_HTHREAD_STRING_HAS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_HAS) +#define DUK_STRIDX_OWN_KEYS 75 /* 'ownKeys' */ +#define DUK_HEAP_STRING_OWN_KEYS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_OWN_KEYS) +#define DUK_HTHREAD_STRING_OWN_KEYS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_OWN_KEYS) +#define DUK_STRIDX_WELLKNOWN_SYMBOL_TO_PRIMITIVE 76 /* '\x81Symbol.toPrimitive\xff' */ +#define DUK_HEAP_STRING_WELLKNOWN_SYMBOL_TO_PRIMITIVE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_WELLKNOWN_SYMBOL_TO_PRIMITIVE) +#define DUK_HTHREAD_STRING_WELLKNOWN_SYMBOL_TO_PRIMITIVE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_WELLKNOWN_SYMBOL_TO_PRIMITIVE) +#define DUK_STRIDX_WELLKNOWN_SYMBOL_HAS_INSTANCE 77 /* '\x81Symbol.hasInstance\xff' */ +#define DUK_HEAP_STRING_WELLKNOWN_SYMBOL_HAS_INSTANCE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_WELLKNOWN_SYMBOL_HAS_INSTANCE) +#define DUK_HTHREAD_STRING_WELLKNOWN_SYMBOL_HAS_INSTANCE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_WELLKNOWN_SYMBOL_HAS_INSTANCE) +#define DUK_STRIDX_WELLKNOWN_SYMBOL_TO_STRING_TAG 78 /* '\x81Symbol.toStringTag\xff' */ +#define DUK_HEAP_STRING_WELLKNOWN_SYMBOL_TO_STRING_TAG(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_WELLKNOWN_SYMBOL_TO_STRING_TAG) +#define DUK_HTHREAD_STRING_WELLKNOWN_SYMBOL_TO_STRING_TAG(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_WELLKNOWN_SYMBOL_TO_STRING_TAG) +#define DUK_STRIDX_WELLKNOWN_SYMBOL_IS_CONCAT_SPREADABLE 79 /* '\x81Symbol.isConcatSpreadable\xff' */ +#define DUK_HEAP_STRING_WELLKNOWN_SYMBOL_IS_CONCAT_SPREADABLE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_WELLKNOWN_SYMBOL_IS_CONCAT_SPREADABLE) +#define DUK_HTHREAD_STRING_WELLKNOWN_SYMBOL_IS_CONCAT_SPREADABLE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_WELLKNOWN_SYMBOL_IS_CONCAT_SPREADABLE) +#define DUK_STRIDX_SET_PROTOTYPE_OF 80 /* 'setPrototypeOf' */ +#define DUK_HEAP_STRING_SET_PROTOTYPE_OF(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_SET_PROTOTYPE_OF) +#define DUK_HTHREAD_STRING_SET_PROTOTYPE_OF(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_SET_PROTOTYPE_OF) +#define DUK_STRIDX___PROTO__ 81 /* '__proto__' */ +#define DUK_HEAP_STRING___PROTO__(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX___PROTO__) +#define DUK_HTHREAD_STRING___PROTO__(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX___PROTO__) +#define DUK_STRIDX_TO_STRING 82 /* 'toString' */ +#define DUK_HEAP_STRING_TO_STRING(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_TO_STRING) +#define DUK_HTHREAD_STRING_TO_STRING(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_TO_STRING) +#define DUK_STRIDX_TO_JSON 83 /* 'toJSON' */ +#define DUK_HEAP_STRING_TO_JSON(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_TO_JSON) +#define DUK_HTHREAD_STRING_TO_JSON(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_TO_JSON) +#define DUK_STRIDX_TYPE 84 /* 'type' */ +#define DUK_HEAP_STRING_TYPE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_TYPE) +#define DUK_HTHREAD_STRING_TYPE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_TYPE) +#define DUK_STRIDX_DATA 85 /* 'data' */ +#define DUK_HEAP_STRING_DATA(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_DATA) +#define DUK_HTHREAD_STRING_DATA(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_DATA) +#define DUK_STRIDX_LC_BUFFER 86 /* 'buffer' */ +#define DUK_HEAP_STRING_LC_BUFFER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_BUFFER) +#define DUK_HTHREAD_STRING_LC_BUFFER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_BUFFER) +#define DUK_STRIDX_LENGTH 87 /* 'length' */ +#define DUK_HEAP_STRING_LENGTH(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LENGTH) +#define DUK_HTHREAD_STRING_LENGTH(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LENGTH) +#define DUK_STRIDX_SET 88 /* 'set' */ +#define DUK_HEAP_STRING_SET(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_SET) +#define DUK_HTHREAD_STRING_SET(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_SET) +#define DUK_STRIDX_STACK 89 /* 'stack' */ +#define DUK_HEAP_STRING_STACK(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_STACK) +#define DUK_HTHREAD_STRING_STACK(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_STACK) +#define DUK_STRIDX_PC 90 /* 'pc' */ +#define DUK_HEAP_STRING_PC(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_PC) +#define DUK_HTHREAD_STRING_PC(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_PC) +#define DUK_STRIDX_LINE_NUMBER 91 /* 'lineNumber' */ +#define DUK_HEAP_STRING_LINE_NUMBER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LINE_NUMBER) +#define DUK_HTHREAD_STRING_LINE_NUMBER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LINE_NUMBER) +#define DUK_STRIDX_INT_TRACEDATA 92 /* '\x82Tracedata' */ +#define DUK_HEAP_STRING_INT_TRACEDATA(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_TRACEDATA) +#define DUK_HTHREAD_STRING_INT_TRACEDATA(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_TRACEDATA) +#define DUK_STRIDX_NAME 93 /* 'name' */ +#define DUK_HEAP_STRING_NAME(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_NAME) +#define DUK_HTHREAD_STRING_NAME(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_NAME) +#define DUK_STRIDX_FILE_NAME 94 /* 'fileName' */ +#define DUK_HEAP_STRING_FILE_NAME(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_FILE_NAME) +#define DUK_HTHREAD_STRING_FILE_NAME(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_FILE_NAME) +#define DUK_STRIDX_LC_POINTER 95 /* 'pointer' */ +#define DUK_HEAP_STRING_LC_POINTER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_POINTER) +#define DUK_HTHREAD_STRING_LC_POINTER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_POINTER) +#define DUK_STRIDX_INT_TARGET 96 /* '\x82Target' */ +#define DUK_HEAP_STRING_INT_TARGET(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_TARGET) +#define DUK_HTHREAD_STRING_INT_TARGET(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_TARGET) +#define DUK_STRIDX_INT_NEXT 97 /* '\x82Next' */ +#define DUK_HEAP_STRING_INT_NEXT(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_NEXT) +#define DUK_HTHREAD_STRING_INT_NEXT(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_NEXT) +#define DUK_STRIDX_INT_BYTECODE 98 /* '\x82Bytecode' */ +#define DUK_HEAP_STRING_INT_BYTECODE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_BYTECODE) +#define DUK_HTHREAD_STRING_INT_BYTECODE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_BYTECODE) +#define DUK_STRIDX_INT_FORMALS 99 /* '\x82Formals' */ +#define DUK_HEAP_STRING_INT_FORMALS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_FORMALS) +#define DUK_HTHREAD_STRING_INT_FORMALS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_FORMALS) +#define DUK_STRIDX_INT_VARMAP 100 /* '\x82Varmap' */ +#define DUK_HEAP_STRING_INT_VARMAP(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_VARMAP) +#define DUK_HTHREAD_STRING_INT_VARMAP(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_VARMAP) +#define DUK_STRIDX_INT_SOURCE 101 /* '\x82Source' */ +#define DUK_HEAP_STRING_INT_SOURCE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_SOURCE) +#define DUK_HTHREAD_STRING_INT_SOURCE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_SOURCE) +#define DUK_STRIDX_INT_PC2LINE 102 /* '\x82Pc2line' */ +#define DUK_HEAP_STRING_INT_PC2LINE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_PC2LINE) +#define DUK_HTHREAD_STRING_INT_PC2LINE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_PC2LINE) +#define DUK_STRIDX_INT_MAP 103 /* '\x82Map' */ +#define DUK_HEAP_STRING_INT_MAP(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_MAP) +#define DUK_HTHREAD_STRING_INT_MAP(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_MAP) +#define DUK_STRIDX_INT_VARENV 104 /* '\x82Varenv' */ +#define DUK_HEAP_STRING_INT_VARENV(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_VARENV) +#define DUK_HTHREAD_STRING_INT_VARENV(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_VARENV) +#define DUK_STRIDX_INT_FINALIZER 105 /* '\x82Finalizer' */ +#define DUK_HEAP_STRING_INT_FINALIZER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_FINALIZER) +#define DUK_HTHREAD_STRING_INT_FINALIZER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_FINALIZER) +#define DUK_STRIDX_INT_VALUE 106 /* '\x82Value' */ +#define DUK_HEAP_STRING_INT_VALUE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INT_VALUE) +#define DUK_HTHREAD_STRING_INT_VALUE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INT_VALUE) +#define DUK_STRIDX_COMPILE 107 /* 'compile' */ +#define DUK_HEAP_STRING_COMPILE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_COMPILE) +#define DUK_HTHREAD_STRING_COMPILE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_COMPILE) +#define DUK_STRIDX_INPUT 108 /* 'input' */ +#define DUK_HEAP_STRING_INPUT(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INPUT) +#define DUK_HTHREAD_STRING_INPUT(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INPUT) +#define DUK_STRIDX_ERR_CREATE 109 /* 'errCreate' */ +#define DUK_HEAP_STRING_ERR_CREATE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_ERR_CREATE) +#define DUK_HTHREAD_STRING_ERR_CREATE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_ERR_CREATE) +#define DUK_STRIDX_ERR_THROW 110 /* 'errThrow' */ +#define DUK_HEAP_STRING_ERR_THROW(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_ERR_THROW) +#define DUK_HTHREAD_STRING_ERR_THROW(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_ERR_THROW) +#define DUK_STRIDX_ENV 111 /* 'env' */ +#define DUK_HEAP_STRING_ENV(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_ENV) +#define DUK_HTHREAD_STRING_ENV(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_ENV) +#define DUK_STRIDX_HEX 112 /* 'hex' */ +#define DUK_HEAP_STRING_HEX(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_HEX) +#define DUK_HTHREAD_STRING_HEX(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_HEX) +#define DUK_STRIDX_BASE64 113 /* 'base64' */ +#define DUK_HEAP_STRING_BASE64(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_BASE64) +#define DUK_HTHREAD_STRING_BASE64(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_BASE64) +#define DUK_STRIDX_JX 114 /* 'jx' */ +#define DUK_HEAP_STRING_JX(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_JX) +#define DUK_HTHREAD_STRING_JX(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_JX) +#define DUK_STRIDX_JC 115 /* 'jc' */ +#define DUK_HEAP_STRING_JC(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_JC) +#define DUK_HTHREAD_STRING_JC(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_JC) +#define DUK_STRIDX_JSON_EXT_UNDEFINED 116 /* '{"_undef":true}' */ +#define DUK_HEAP_STRING_JSON_EXT_UNDEFINED(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_JSON_EXT_UNDEFINED) +#define DUK_HTHREAD_STRING_JSON_EXT_UNDEFINED(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_JSON_EXT_UNDEFINED) +#define DUK_STRIDX_JSON_EXT_NAN 117 /* '{"_nan":true}' */ +#define DUK_HEAP_STRING_JSON_EXT_NAN(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_JSON_EXT_NAN) +#define DUK_HTHREAD_STRING_JSON_EXT_NAN(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_JSON_EXT_NAN) +#define DUK_STRIDX_JSON_EXT_POSINF 118 /* '{"_inf":true}' */ +#define DUK_HEAP_STRING_JSON_EXT_POSINF(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_JSON_EXT_POSINF) +#define DUK_HTHREAD_STRING_JSON_EXT_POSINF(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_JSON_EXT_POSINF) +#define DUK_STRIDX_JSON_EXT_NEGINF 119 /* '{"_ninf":true}' */ +#define DUK_HEAP_STRING_JSON_EXT_NEGINF(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_JSON_EXT_NEGINF) +#define DUK_HTHREAD_STRING_JSON_EXT_NEGINF(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_JSON_EXT_NEGINF) +#define DUK_STRIDX_JSON_EXT_FUNCTION1 120 /* '{"_func":true}' */ +#define DUK_HEAP_STRING_JSON_EXT_FUNCTION1(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_JSON_EXT_FUNCTION1) +#define DUK_HTHREAD_STRING_JSON_EXT_FUNCTION1(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_JSON_EXT_FUNCTION1) +#define DUK_STRIDX_JSON_EXT_FUNCTION2 121 /* '{_func:true}' */ +#define DUK_HEAP_STRING_JSON_EXT_FUNCTION2(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_JSON_EXT_FUNCTION2) +#define DUK_HTHREAD_STRING_JSON_EXT_FUNCTION2(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_JSON_EXT_FUNCTION2) +#define DUK_STRIDX_BREAK 122 /* 'break' */ +#define DUK_HEAP_STRING_BREAK(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_BREAK) +#define DUK_HTHREAD_STRING_BREAK(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_BREAK) +#define DUK_STRIDX_CASE 123 /* 'case' */ +#define DUK_HEAP_STRING_CASE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_CASE) +#define DUK_HTHREAD_STRING_CASE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_CASE) +#define DUK_STRIDX_CATCH 124 /* 'catch' */ +#define DUK_HEAP_STRING_CATCH(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_CATCH) +#define DUK_HTHREAD_STRING_CATCH(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_CATCH) +#define DUK_STRIDX_CONTINUE 125 /* 'continue' */ +#define DUK_HEAP_STRING_CONTINUE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_CONTINUE) +#define DUK_HTHREAD_STRING_CONTINUE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_CONTINUE) +#define DUK_STRIDX_DEBUGGER 126 /* 'debugger' */ +#define DUK_HEAP_STRING_DEBUGGER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_DEBUGGER) +#define DUK_HTHREAD_STRING_DEBUGGER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_DEBUGGER) +#define DUK_STRIDX_DEFAULT 127 /* 'default' */ +#define DUK_HEAP_STRING_DEFAULT(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_DEFAULT) +#define DUK_HTHREAD_STRING_DEFAULT(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_DEFAULT) +#define DUK_STRIDX_DELETE 128 /* 'delete' */ +#define DUK_HEAP_STRING_DELETE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_DELETE) +#define DUK_HTHREAD_STRING_DELETE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_DELETE) +#define DUK_STRIDX_DO 129 /* 'do' */ +#define DUK_HEAP_STRING_DO(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_DO) +#define DUK_HTHREAD_STRING_DO(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_DO) +#define DUK_STRIDX_ELSE 130 /* 'else' */ +#define DUK_HEAP_STRING_ELSE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_ELSE) +#define DUK_HTHREAD_STRING_ELSE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_ELSE) +#define DUK_STRIDX_FINALLY 131 /* 'finally' */ +#define DUK_HEAP_STRING_FINALLY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_FINALLY) +#define DUK_HTHREAD_STRING_FINALLY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_FINALLY) +#define DUK_STRIDX_FOR 132 /* 'for' */ +#define DUK_HEAP_STRING_FOR(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_FOR) +#define DUK_HTHREAD_STRING_FOR(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_FOR) +#define DUK_STRIDX_LC_FUNCTION 133 /* 'function' */ +#define DUK_HEAP_STRING_LC_FUNCTION(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_FUNCTION) +#define DUK_HTHREAD_STRING_LC_FUNCTION(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_FUNCTION) +#define DUK_STRIDX_IF 134 /* 'if' */ +#define DUK_HEAP_STRING_IF(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_IF) +#define DUK_HTHREAD_STRING_IF(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_IF) +#define DUK_STRIDX_IN 135 /* 'in' */ +#define DUK_HEAP_STRING_IN(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_IN) +#define DUK_HTHREAD_STRING_IN(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_IN) +#define DUK_STRIDX_INSTANCEOF 136 /* 'instanceof' */ +#define DUK_HEAP_STRING_INSTANCEOF(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INSTANCEOF) +#define DUK_HTHREAD_STRING_INSTANCEOF(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INSTANCEOF) +#define DUK_STRIDX_NEW 137 /* 'new' */ +#define DUK_HEAP_STRING_NEW(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_NEW) +#define DUK_HTHREAD_STRING_NEW(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_NEW) +#define DUK_STRIDX_RETURN 138 /* 'return' */ +#define DUK_HEAP_STRING_RETURN(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_RETURN) +#define DUK_HTHREAD_STRING_RETURN(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_RETURN) +#define DUK_STRIDX_SWITCH 139 /* 'switch' */ +#define DUK_HEAP_STRING_SWITCH(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_SWITCH) +#define DUK_HTHREAD_STRING_SWITCH(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_SWITCH) +#define DUK_STRIDX_THIS 140 /* 'this' */ +#define DUK_HEAP_STRING_THIS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_THIS) +#define DUK_HTHREAD_STRING_THIS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_THIS) +#define DUK_STRIDX_THROW 141 /* 'throw' */ +#define DUK_HEAP_STRING_THROW(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_THROW) +#define DUK_HTHREAD_STRING_THROW(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_THROW) +#define DUK_STRIDX_TRY 142 /* 'try' */ +#define DUK_HEAP_STRING_TRY(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_TRY) +#define DUK_HTHREAD_STRING_TRY(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_TRY) +#define DUK_STRIDX_TYPEOF 143 /* 'typeof' */ +#define DUK_HEAP_STRING_TYPEOF(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_TYPEOF) +#define DUK_HTHREAD_STRING_TYPEOF(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_TYPEOF) +#define DUK_STRIDX_VAR 144 /* 'var' */ +#define DUK_HEAP_STRING_VAR(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_VAR) +#define DUK_HTHREAD_STRING_VAR(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_VAR) +#define DUK_STRIDX_CONST 145 /* 'const' */ +#define DUK_HEAP_STRING_CONST(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_CONST) +#define DUK_HTHREAD_STRING_CONST(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_CONST) +#define DUK_STRIDX_VOID 146 /* 'void' */ +#define DUK_HEAP_STRING_VOID(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_VOID) +#define DUK_HTHREAD_STRING_VOID(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_VOID) +#define DUK_STRIDX_WHILE 147 /* 'while' */ +#define DUK_HEAP_STRING_WHILE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_WHILE) +#define DUK_HTHREAD_STRING_WHILE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_WHILE) +#define DUK_STRIDX_WITH 148 /* 'with' */ +#define DUK_HEAP_STRING_WITH(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_WITH) +#define DUK_HTHREAD_STRING_WITH(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_WITH) +#define DUK_STRIDX_CLASS 149 /* 'class' */ +#define DUK_HEAP_STRING_CLASS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_CLASS) +#define DUK_HTHREAD_STRING_CLASS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_CLASS) +#define DUK_STRIDX_ENUM 150 /* 'enum' */ +#define DUK_HEAP_STRING_ENUM(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_ENUM) +#define DUK_HTHREAD_STRING_ENUM(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_ENUM) +#define DUK_STRIDX_EXPORT 151 /* 'export' */ +#define DUK_HEAP_STRING_EXPORT(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_EXPORT) +#define DUK_HTHREAD_STRING_EXPORT(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_EXPORT) +#define DUK_STRIDX_EXTENDS 152 /* 'extends' */ +#define DUK_HEAP_STRING_EXTENDS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_EXTENDS) +#define DUK_HTHREAD_STRING_EXTENDS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_EXTENDS) +#define DUK_STRIDX_IMPORT 153 /* 'import' */ +#define DUK_HEAP_STRING_IMPORT(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_IMPORT) +#define DUK_HTHREAD_STRING_IMPORT(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_IMPORT) +#define DUK_STRIDX_SUPER 154 /* 'super' */ +#define DUK_HEAP_STRING_SUPER(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_SUPER) +#define DUK_HTHREAD_STRING_SUPER(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_SUPER) +#define DUK_STRIDX_LC_NULL 155 /* 'null' */ +#define DUK_HEAP_STRING_LC_NULL(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LC_NULL) +#define DUK_HTHREAD_STRING_LC_NULL(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LC_NULL) +#define DUK_STRIDX_TRUE 156 /* 'true' */ +#define DUK_HEAP_STRING_TRUE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_TRUE) +#define DUK_HTHREAD_STRING_TRUE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_TRUE) +#define DUK_STRIDX_FALSE 157 /* 'false' */ +#define DUK_HEAP_STRING_FALSE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_FALSE) +#define DUK_HTHREAD_STRING_FALSE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_FALSE) +#define DUK_STRIDX_IMPLEMENTS 158 /* 'implements' */ +#define DUK_HEAP_STRING_IMPLEMENTS(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_IMPLEMENTS) +#define DUK_HTHREAD_STRING_IMPLEMENTS(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_IMPLEMENTS) +#define DUK_STRIDX_INTERFACE 159 /* 'interface' */ +#define DUK_HEAP_STRING_INTERFACE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_INTERFACE) +#define DUK_HTHREAD_STRING_INTERFACE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_INTERFACE) +#define DUK_STRIDX_LET 160 /* 'let' */ +#define DUK_HEAP_STRING_LET(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_LET) +#define DUK_HTHREAD_STRING_LET(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_LET) +#define DUK_STRIDX_PACKAGE 161 /* 'package' */ +#define DUK_HEAP_STRING_PACKAGE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_PACKAGE) +#define DUK_HTHREAD_STRING_PACKAGE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_PACKAGE) +#define DUK_STRIDX_PRIVATE 162 /* 'private' */ +#define DUK_HEAP_STRING_PRIVATE(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_PRIVATE) +#define DUK_HTHREAD_STRING_PRIVATE(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_PRIVATE) +#define DUK_STRIDX_PROTECTED 163 /* 'protected' */ +#define DUK_HEAP_STRING_PROTECTED(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_PROTECTED) +#define DUK_HTHREAD_STRING_PROTECTED(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_PROTECTED) +#define DUK_STRIDX_PUBLIC 164 /* 'public' */ +#define DUK_HEAP_STRING_PUBLIC(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_PUBLIC) +#define DUK_HTHREAD_STRING_PUBLIC(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_PUBLIC) +#define DUK_STRIDX_STATIC 165 /* 'static' */ +#define DUK_HEAP_STRING_STATIC(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_STATIC) +#define DUK_HTHREAD_STRING_STATIC(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_STATIC) +#define DUK_STRIDX_YIELD 166 /* 'yield' */ +#define DUK_HEAP_STRING_YIELD(heap) DUK_HEAP_GET_STRING((heap),DUK_STRIDX_YIELD) +#define DUK_HTHREAD_STRING_YIELD(thr) DUK_HTHREAD_GET_STRING((thr),DUK_STRIDX_YIELD) + +#define DUK_HEAP_NUM_STRINGS 167 +#define DUK_STRIDX_START_RESERVED 122 +#define DUK_STRIDX_START_STRICT_RESERVED 158 +#define DUK_STRIDX_END_RESERVED 167 /* exclusive endpoint */ + +/* To convert a heap stridx to a token number, subtract + * DUK_STRIDX_START_RESERVED and add DUK_TOK_START_RESERVED. + */ +#if !defined(DUK_SINGLE_FILE) +DUK_INTERNAL_DECL const duk_uint8_t duk_strings_data[972]; +#endif /* !DUK_SINGLE_FILE */ +#define DUK_STRDATA_MAX_STRLEN 27 +#define DUK_STRDATA_DATA_LENGTH 972 +#endif /* DUK_USE_ROM_STRINGS */ + +#if defined(DUK_USE_ROM_OBJECTS) +#error RAM support not enabled, rerun configure.py with --ram-support +#else /* DUK_USE_ROM_OBJECTS */ +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_function_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_function_prototype(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_boolean_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_number_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_regexp_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_error_constructor_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_type_error_thrower(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_parse_int(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_parse_float(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_thread_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_pointer_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_proxy_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_symbol_constructor_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_arraybuffer_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_dataview_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_typedarray_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_nodejs_buffer_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_textencoder_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_textdecoder_constructor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_eval(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_is_nan(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_is_finite(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_decode_uri(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_decode_uri_component(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_encode_uri(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_encode_uri_component(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_escape(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_global_object_unescape(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_getprototype_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_setprototype_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_get_own_property_descriptor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_keys_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_assign(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_create(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_define_property(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_define_properties(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_seal_freeze_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_prevent_extensions(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_is_sealed_frozen_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_is_extensible(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_constructor_is(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_prototype_to_string(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_prototype_to_locale_string(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_prototype_value_of(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_prototype_has_own_property(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_prototype_is_prototype_of(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_prototype_property_is_enumerable(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_prototype_defineaccessor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_prototype_lookupaccessor(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_function_prototype_to_string(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_function_prototype_apply(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_function_prototype_call(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_function_prototype_bind(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_function_prototype_hasinstance(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_native_function_length(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_native_function_name(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_constructor_is_array(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_to_string(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_join_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_concat(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_pop(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_push(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_reverse(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_shift(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_slice(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_sort(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_splice(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_unshift(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_indexof_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_iter_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_array_prototype_reduce_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_constructor_from_char_code(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_constructor_from_code_point(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_to_string(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_char_at(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_char_code_at(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_concat(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_indexof_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_locale_compare(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_match(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_replace(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_search(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_slice(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_split(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_substring(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_caseconv_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_trim(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_repeat(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_startswith_endswith(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_includes(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_string_prototype_substr(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_boolean_prototype_tostring_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_number_check_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_number_prototype_to_string(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_number_prototype_to_locale_string(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_number_prototype_value_of(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_number_prototype_to_fixed(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_number_prototype_to_exponential(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_number_prototype_to_precision(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_constructor_parse(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_constructor_utc(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_constructor_now(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_prototype_tostring_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_prototype_to_json(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_prototype_value_of(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_prototype_get_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_prototype_get_timezone_offset(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_prototype_set_time(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_prototype_set_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_date_prototype_toprimitive(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_regexp_prototype_exec(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_regexp_prototype_test(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_regexp_prototype_tostring(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_regexp_prototype_flags(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_regexp_prototype_shared_getter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_error_prototype_stack_getter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_error_prototype_stack_setter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_error_prototype_filename_getter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_error_prototype_filename_setter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_error_prototype_linenumber_getter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_error_prototype_linenumber_setter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_error_prototype_to_string(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_math_object_onearg_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_math_object_twoarg_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_math_object_clz32(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_math_object_hypot(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_math_object_imul(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_math_object_max(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_math_object_min(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_math_object_random(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_math_object_sign(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_json_object_parse(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_json_object_stringify(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_duktape_object_info(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_duktape_object_act(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_duktape_object_gc(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_duktape_object_fin(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_duktape_object_enc(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_duktape_object_dec(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_duktape_object_compact(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_thread_yield(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_thread_resume(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_thread_current(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_pointer_prototype_tostring_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_reflect_apply(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_reflect_construct(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_reflect_object_delete_property(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_reflect_object_get(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_reflect_object_has(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_reflect_object_set(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_symbol_key_for(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_symbol_tostring_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_symbol_toprimitive(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_arraybuffer_isview(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_typedarray_bytelength_getter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_buffer_slice_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_typedarray_byteoffset_getter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_typedarray_buffer_getter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_buffer_readfield(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_buffer_writefield(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_typedarray_set(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_uint8array_allocplain(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_uint8array_plainof(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_nodejs_buffer_concat(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_nodejs_buffer_is_encoding(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_nodejs_buffer_is_buffer(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_nodejs_buffer_byte_length(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_buffer_compare_shared(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_nodejs_buffer_tostring(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_nodejs_buffer_tojson(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_nodejs_buffer_fill(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_nodejs_buffer_copy(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_nodejs_buffer_write(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_cbor_encode(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_cbor_decode(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_textencoder_prototype_encoding_getter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_textencoder_prototype_encode(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_textdecoder_prototype_shared_getter(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_textdecoder_prototype_decode(duk_context *ctx); +DUK_INTERNAL_DECL duk_ret_t duk_bi_performance_now(duk_context *ctx); +#if !defined(DUK_SINGLE_FILE) +DUK_INTERNAL_DECL const duk_c_function duk_bi_native_functions[185]; +#endif /* !DUK_SINGLE_FILE */ +#define DUK_BIDX_GLOBAL 0 +#define DUK_BIDX_GLOBAL_ENV 1 +#define DUK_BIDX_OBJECT_CONSTRUCTOR 2 +#define DUK_BIDX_OBJECT_PROTOTYPE 3 +#define DUK_BIDX_FUNCTION_CONSTRUCTOR 4 +#define DUK_BIDX_FUNCTION_PROTOTYPE 5 +#define DUK_BIDX_NATIVE_FUNCTION_PROTOTYPE 6 +#define DUK_BIDX_ARRAY_CONSTRUCTOR 7 +#define DUK_BIDX_ARRAY_PROTOTYPE 8 +#define DUK_BIDX_STRING_CONSTRUCTOR 9 +#define DUK_BIDX_STRING_PROTOTYPE 10 +#define DUK_BIDX_BOOLEAN_CONSTRUCTOR 11 +#define DUK_BIDX_BOOLEAN_PROTOTYPE 12 +#define DUK_BIDX_NUMBER_CONSTRUCTOR 13 +#define DUK_BIDX_NUMBER_PROTOTYPE 14 +#define DUK_BIDX_DATE_CONSTRUCTOR 15 +#define DUK_BIDX_DATE_PROTOTYPE 16 +#define DUK_BIDX_REGEXP_CONSTRUCTOR 17 +#define DUK_BIDX_REGEXP_PROTOTYPE 18 +#define DUK_BIDX_ERROR_CONSTRUCTOR 19 +#define DUK_BIDX_ERROR_PROTOTYPE 20 +#define DUK_BIDX_EVAL_ERROR_CONSTRUCTOR 21 +#define DUK_BIDX_EVAL_ERROR_PROTOTYPE 22 +#define DUK_BIDX_RANGE_ERROR_CONSTRUCTOR 23 +#define DUK_BIDX_RANGE_ERROR_PROTOTYPE 24 +#define DUK_BIDX_REFERENCE_ERROR_CONSTRUCTOR 25 +#define DUK_BIDX_REFERENCE_ERROR_PROTOTYPE 26 +#define DUK_BIDX_SYNTAX_ERROR_CONSTRUCTOR 27 +#define DUK_BIDX_SYNTAX_ERROR_PROTOTYPE 28 +#define DUK_BIDX_TYPE_ERROR_CONSTRUCTOR 29 +#define DUK_BIDX_TYPE_ERROR_PROTOTYPE 30 +#define DUK_BIDX_URI_ERROR_CONSTRUCTOR 31 +#define DUK_BIDX_URI_ERROR_PROTOTYPE 32 +#define DUK_BIDX_TYPE_ERROR_THROWER 33 +#define DUK_BIDX_DUKTAPE 34 +#define DUK_BIDX_THREAD_PROTOTYPE 35 +#define DUK_BIDX_POINTER_PROTOTYPE 36 +#define DUK_BIDX_DOUBLE_ERROR 37 +#define DUK_BIDX_SYMBOL_PROTOTYPE 38 +#define DUK_BIDX_ARRAYBUFFER_PROTOTYPE 39 +#define DUK_BIDX_DATAVIEW_PROTOTYPE 40 +#define DUK_BIDX_INT8ARRAY_PROTOTYPE 41 +#define DUK_BIDX_UINT8ARRAY_PROTOTYPE 42 +#define DUK_BIDX_UINT8CLAMPEDARRAY_PROTOTYPE 43 +#define DUK_BIDX_INT16ARRAY_PROTOTYPE 44 +#define DUK_BIDX_UINT16ARRAY_PROTOTYPE 45 +#define DUK_BIDX_INT32ARRAY_PROTOTYPE 46 +#define DUK_BIDX_UINT32ARRAY_PROTOTYPE 47 +#define DUK_BIDX_FLOAT32ARRAY_PROTOTYPE 48 +#define DUK_BIDX_FLOAT64ARRAY_PROTOTYPE 49 +#define DUK_BIDX_NODEJS_BUFFER_PROTOTYPE 50 +#define DUK_NUM_BUILTINS 51 +#define DUK_NUM_BIDX_BUILTINS 51 +#define DUK_NUM_ALL_BUILTINS 80 +#if defined(DUK_USE_DOUBLE_LE) +#if !defined(DUK_SINGLE_FILE) +DUK_INTERNAL_DECL const duk_uint8_t duk_builtins_data[4281]; +#endif /* !DUK_SINGLE_FILE */ +#define DUK_BUILTINS_DATA_LENGTH 4281 +#elif defined(DUK_USE_DOUBLE_BE) +#if !defined(DUK_SINGLE_FILE) +DUK_INTERNAL_DECL const duk_uint8_t duk_builtins_data[4281]; +#endif /* !DUK_SINGLE_FILE */ +#define DUK_BUILTINS_DATA_LENGTH 4281 +#elif defined(DUK_USE_DOUBLE_ME) +#if !defined(DUK_SINGLE_FILE) +DUK_INTERNAL_DECL const duk_uint8_t duk_builtins_data[4281]; +#endif /* !DUK_SINGLE_FILE */ +#define DUK_BUILTINS_DATA_LENGTH 4281 +#else +#error invalid endianness defines +#endif +#endif /* DUK_USE_ROM_OBJECTS */ +#endif /* DUK_BUILTINS_H_INCLUDED */ +#line 45 "duk_internal.h" + +/* #include duk_util.h */ +#line 1 "duk_util.h" +/* + * Utilities + */ + +#if !defined(DUK_UTIL_H_INCLUDED) +#define DUK_UTIL_H_INCLUDED + +/* + * Some useful constants + */ + +#define DUK_DOUBLE_2TO32 4294967296.0 +#define DUK_DOUBLE_2TO31 2147483648.0 +#define DUK_DOUBLE_LOG2E 1.4426950408889634 +#define DUK_DOUBLE_LOG10E 0.4342944819032518 + +/* + * Endian conversion + */ + +#if defined(DUK_USE_INTEGER_LE) +#define DUK_HTON32(x) DUK_BSWAP32((x)) +#define DUK_NTOH32(x) DUK_BSWAP32((x)) +#define DUK_HTON16(x) DUK_BSWAP16((x)) +#define DUK_NTOH16(x) DUK_BSWAP16((x)) +#elif defined(DUK_USE_INTEGER_BE) +#define DUK_HTON32(x) (x) +#define DUK_NTOH32(x) (x) +#define DUK_HTON16(x) (x) +#define DUK_NTOH16(x) (x) +#else +#error internal error, endianness defines broken +#endif + +/* + * Bitstream decoder + */ + +struct duk_bitdecoder_ctx { + const duk_uint8_t *data; + duk_size_t offset; + duk_size_t length; + duk_uint32_t currval; + duk_small_int_t currbits; +}; + +#define DUK_BD_BITPACKED_STRING_MAXLEN 256 + +/* + * Bitstream encoder + */ + +struct duk_bitencoder_ctx { + duk_uint8_t *data; + duk_size_t offset; + duk_size_t length; + duk_uint32_t currval; + duk_small_int_t currbits; + duk_small_int_t truncated; +}; + +/* + * Raw write/read macros for big endian, unaligned basic values. + * Caller ensures there's enough space. The INC macro variants + * update the pointer argument automatically. + */ + +#define DUK_RAW_WRITE_U8(ptr, val) \ + do { \ + *(ptr) = (duk_uint8_t) (val); \ + } while (0) +#define DUK_RAW_WRITE_U16_BE(ptr, val) duk_raw_write_u16_be((ptr), (duk_uint16_t) (val)) +#define DUK_RAW_WRITE_U32_BE(ptr, val) duk_raw_write_u32_be((ptr), (duk_uint32_t) (val)) +#define DUK_RAW_WRITE_FLOAT_BE(ptr, val) duk_raw_write_float_be((ptr), (duk_float_t) (val)) +#define DUK_RAW_WRITE_DOUBLE_BE(ptr, val) duk_raw_write_double_be((ptr), (duk_double_t) (val)) +#define DUK_RAW_WRITE_XUTF8(ptr, val) duk_raw_write_xutf8((ptr), (duk_ucodepoint_t) (val)) + +#define DUK_RAW_WRITEINC_U8(ptr, val) \ + do { \ + *(ptr)++ = (duk_uint8_t) (val); \ + } while (0) +#define DUK_RAW_WRITEINC_U16_BE(ptr, val) duk_raw_writeinc_u16_be(&(ptr), (duk_uint16_t) (val)) +#define DUK_RAW_WRITEINC_U32_BE(ptr, val) duk_raw_writeinc_u32_be(&(ptr), (duk_uint32_t) (val)) +#define DUK_RAW_WRITEINC_FLOAT_BE(ptr, val) duk_raw_writeinc_float_be(&(ptr), (duk_float_t) (val)) +#define DUK_RAW_WRITEINC_DOUBLE_BE(ptr, val) duk_raw_writeinc_double_be(&(ptr), (duk_double_t) (val)) +#define DUK_RAW_WRITEINC_XUTF8(ptr, val) duk_raw_writeinc_xutf8(&(ptr), (duk_ucodepoint_t) (val)) +#define DUK_RAW_WRITEINC_CESU8(ptr, val) duk_raw_writeinc_cesu8(&(ptr), (duk_ucodepoint_t) (val)) + +#define DUK_RAW_READ_U8(ptr) ((duk_uint8_t) (*(ptr))) +#define DUK_RAW_READ_U16_BE(ptr) duk_raw_read_u16_be((ptr)); +#define DUK_RAW_READ_U32_BE(ptr) duk_raw_read_u32_be((ptr)); +#define DUK_RAW_READ_DOUBLE_BE(ptr) duk_raw_read_double_be((ptr)); + +#define DUK_RAW_READINC_U8(ptr) ((duk_uint8_t) (*(ptr)++)) +#define DUK_RAW_READINC_U16_BE(ptr) duk_raw_readinc_u16_be(&(ptr)); +#define DUK_RAW_READINC_U32_BE(ptr) duk_raw_readinc_u32_be(&(ptr)); +#define DUK_RAW_READINC_DOUBLE_BE(ptr) duk_raw_readinc_double_be(&(ptr)); + +/* + * Double and float byte order operations. + */ + +DUK_INTERNAL_DECL void duk_dblunion_host_to_little(duk_double_union *u); +DUK_INTERNAL_DECL void duk_dblunion_little_to_host(duk_double_union *u); +DUK_INTERNAL_DECL void duk_dblunion_host_to_big(duk_double_union *u); +DUK_INTERNAL_DECL void duk_dblunion_big_to_host(duk_double_union *u); +DUK_INTERNAL_DECL void duk_fltunion_host_to_big(duk_float_union *u); +DUK_INTERNAL_DECL void duk_fltunion_big_to_host(duk_float_union *u); + +/* + * Buffer writer (dynamic buffer only) + * + * Helper for writing to a dynamic buffer with a concept of a "slack" area + * to reduce resizes. You can ensure there is enough space beforehand and + * then write for a while without further checks, relying on a stable data + * pointer. Slack handling is automatic so call sites only indicate how + * much data they need right now. + * + * There are several ways to write using bufwriter. The best approach + * depends mainly on how much performance matters over code footprint. + * The key issues are (1) ensuring there is space and (2) keeping the + * pointers consistent. Fast code should ensure space for multiple writes + * with one ensure call. Fastest inner loop code can temporarily borrow + * the 'p' pointer but must write it back eventually. + * + * Be careful to ensure all macro arguments (other than static pointers like + * 'thr' and 'bw_ctx') are evaluated exactly once, using temporaries if + * necessary (if that's not possible, there should be a note near the macro). + * Buffer write arguments often contain arithmetic etc so this is + * particularly important here. + */ + +/* XXX: Migrate bufwriter and other read/write helpers to its own header? */ + +struct duk_bufwriter_ctx { + duk_uint8_t *p; + duk_uint8_t *p_base; + duk_uint8_t *p_limit; + duk_hbuffer_dynamic *buf; +}; + +#if defined(DUK_USE_PREFER_SIZE) +#define DUK_BW_SLACK_ADD 64 +#define DUK_BW_SLACK_SHIFT 4 /* 2^4 -> 1/16 = 6.25% slack */ +#else +#define DUK_BW_SLACK_ADD 64 +#define DUK_BW_SLACK_SHIFT 2 /* 2^2 -> 1/4 = 25% slack */ +#endif + +/* Initialization and finalization (compaction), converting to other types. */ + +#define DUK_BW_INIT_PUSHBUF(thr, bw_ctx, sz) \ + do { \ + duk_bw_init_pushbuf((thr), (bw_ctx), (sz)); \ + } while (0) +#define DUK_BW_INIT_WITHBUF(thr, bw_ctx, buf) \ + do { \ + duk_bw_init((thr), (bw_ctx), (buf)); \ + } while (0) +#define DUK_BW_COMPACT(thr, bw_ctx) \ + do { \ + /* Make underlying buffer compact to match DUK_BW_GET_SIZE(). */ \ + duk_bw_compact((thr), (bw_ctx)); \ + } while (0) +#define DUK_BW_PUSH_AS_STRING(thr, bw_ctx) \ + do { \ + duk_push_lstring((thr), (const char *) (bw_ctx)->p_base, (duk_size_t) ((bw_ctx)->p - (bw_ctx)->p_base)); \ + } while (0) + +/* Pointers may be NULL for a while when 'buf' size is zero and before any + * ENSURE calls have been made. Once an ENSURE has been made, the pointers + * are required to be non-NULL so that it's always valid to use memcpy() and + * memmove(), even for zero size. + */ +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_bw_assert_valid(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx); +#define DUK_BW_ASSERT_VALID_EXPR(thr, bw_ctx) (duk_bw_assert_valid((thr), (bw_ctx))) +#define DUK_BW_ASSERT_VALID(thr, bw_ctx) \ + do { \ + duk_bw_assert_valid((thr), (bw_ctx)); \ + } while (0) +#else +#define DUK_BW_ASSERT_VALID_EXPR(thr, bw_ctx) DUK_ASSERT_EXPR(1) +#define DUK_BW_ASSERT_VALID(thr, bw_ctx) \ + do { \ + } while (0) +#endif + +/* Working with the pointer and current size. */ + +#define DUK_BW_GET_PTR(thr, bw_ctx) ((bw_ctx)->p) +#define DUK_BW_SET_PTR(thr, bw_ctx, ptr) \ + do { \ + (bw_ctx)->p = (ptr); \ + } while (0) +#define DUK_BW_ADD_PTR(thr, bw_ctx, delta) \ + do { \ + (bw_ctx)->p += (delta); \ + } while (0) +#define DUK_BW_GET_BASEPTR(thr, bw_ctx) ((bw_ctx)->p_base) +#define DUK_BW_GET_LIMITPTR(thr, bw_ctx) ((bw_ctx)->p_limit) +#define DUK_BW_GET_SIZE(thr, bw_ctx) ((duk_size_t) ((bw_ctx)->p - (bw_ctx)->p_base)) +#define DUK_BW_SET_SIZE(thr, bw_ctx, sz) \ + do { \ + DUK_ASSERT((duk_size_t) (sz) <= (duk_size_t) ((bw_ctx)->p - (bw_ctx)->p_base)); \ + (bw_ctx)->p = (bw_ctx)->p_base + (sz); \ + } while (0) +#define DUK_BW_RESET_SIZE(thr, bw_ctx) \ + do { \ + /* Reset to zero size, keep current limit. */ \ + (bw_ctx)->p = (bw_ctx)->p_base; \ + } while (0) +#define DUK_BW_GET_BUFFER(thr, bw_ctx) ((bw_ctx)->buf) + +/* Ensuring (reserving) space. */ + +#define DUK_BW_ENSURE(thr, bw_ctx, sz) \ + do { \ + duk_size_t duk__sz, duk__space; \ + DUK_BW_ASSERT_VALID((thr), (bw_ctx)); \ + duk__sz = (sz); \ + duk__space = (duk_size_t) ((bw_ctx)->p_limit - (bw_ctx)->p); \ + if (duk__space < duk__sz) { \ + (void) duk_bw_resize((thr), (bw_ctx), duk__sz); \ + } \ + } while (0) +/* NOTE: Multiple evaluation of 'ptr' in this macro. */ +/* XXX: Rework to use an always-inline function? */ +#define DUK_BW_ENSURE_RAW(thr, bw_ctx, sz, ptr) \ + (((duk_size_t) ((bw_ctx)->p_limit - (ptr)) >= (sz)) ? (ptr) : ((bw_ctx)->p = (ptr), duk_bw_resize((thr), (bw_ctx), (sz)))) +#define DUK_BW_ENSURE_GETPTR(thr, bw_ctx, sz) DUK_BW_ENSURE_RAW((thr), (bw_ctx), (sz), (bw_ctx)->p) +#define DUK_BW_ASSERT_SPACE_EXPR(thr, bw_ctx, sz) \ + (DUK_BW_ASSERT_VALID_EXPR((thr), (bw_ctx)), \ + DUK_ASSERT_EXPR((duk_size_t) ((bw_ctx)->p_limit - (bw_ctx)->p) >= (duk_size_t) (sz))) +#define DUK_BW_ASSERT_SPACE(thr, bw_ctx, sz) \ + do { \ + DUK_BW_ASSERT_SPACE_EXPR((thr), (bw_ctx), (sz)); \ + } while (0) + +/* Miscellaneous. */ + +#define DUK_BW_SETPTR_AND_COMPACT(thr, bw_ctx, ptr) \ + do { \ + (bw_ctx)->p = (ptr); \ + duk_bw_compact((thr), (bw_ctx)); \ + } while (0) + +/* Fast write calls which assume you control the slack beforehand. + * Multibyte write variants exist and use a temporary write pointer + * because byte writes alias with anything: with a stored pointer + * explicit pointer load/stores get generated (e.g. gcc -Os). + */ + +#define DUK_BW_WRITE_RAW_U8(thr, bw_ctx, val) \ + do { \ + DUK_BW_ASSERT_SPACE((thr), (bw_ctx), 1); \ + *(bw_ctx)->p++ = (duk_uint8_t) (val); \ + } while (0) +#define DUK_BW_WRITE_RAW_U8_2(thr, bw_ctx, val1, val2) \ + do { \ + duk_uint8_t *duk__p; \ + DUK_BW_ASSERT_SPACE((thr), (bw_ctx), 2); \ + duk__p = (bw_ctx)->p; \ + *duk__p++ = (duk_uint8_t) (val1); \ + *duk__p++ = (duk_uint8_t) (val2); \ + (bw_ctx)->p = duk__p; \ + } while (0) +#define DUK_BW_WRITE_RAW_U8_3(thr, bw_ctx, val1, val2, val3) \ + do { \ + duk_uint8_t *duk__p; \ + DUK_BW_ASSERT_SPACE((thr), (bw_ctx), 3); \ + duk__p = (bw_ctx)->p; \ + *duk__p++ = (duk_uint8_t) (val1); \ + *duk__p++ = (duk_uint8_t) (val2); \ + *duk__p++ = (duk_uint8_t) (val3); \ + (bw_ctx)->p = duk__p; \ + } while (0) +#define DUK_BW_WRITE_RAW_U8_4(thr, bw_ctx, val1, val2, val3, val4) \ + do { \ + duk_uint8_t *duk__p; \ + DUK_BW_ASSERT_SPACE((thr), (bw_ctx), 4); \ + duk__p = (bw_ctx)->p; \ + *duk__p++ = (duk_uint8_t) (val1); \ + *duk__p++ = (duk_uint8_t) (val2); \ + *duk__p++ = (duk_uint8_t) (val3); \ + *duk__p++ = (duk_uint8_t) (val4); \ + (bw_ctx)->p = duk__p; \ + } while (0) +#define DUK_BW_WRITE_RAW_U8_5(thr, bw_ctx, val1, val2, val3, val4, val5) \ + do { \ + duk_uint8_t *duk__p; \ + DUK_BW_ASSERT_SPACE((thr), (bw_ctx), 5); \ + duk__p = (bw_ctx)->p; \ + *duk__p++ = (duk_uint8_t) (val1); \ + *duk__p++ = (duk_uint8_t) (val2); \ + *duk__p++ = (duk_uint8_t) (val3); \ + *duk__p++ = (duk_uint8_t) (val4); \ + *duk__p++ = (duk_uint8_t) (val5); \ + (bw_ctx)->p = duk__p; \ + } while (0) +#define DUK_BW_WRITE_RAW_U8_6(thr, bw_ctx, val1, val2, val3, val4, val5, val6) \ + do { \ + duk_uint8_t *duk__p; \ + DUK_BW_ASSERT_SPACE((thr), (bw_ctx), 6); \ + duk__p = (bw_ctx)->p; \ + *duk__p++ = (duk_uint8_t) (val1); \ + *duk__p++ = (duk_uint8_t) (val2); \ + *duk__p++ = (duk_uint8_t) (val3); \ + *duk__p++ = (duk_uint8_t) (val4); \ + *duk__p++ = (duk_uint8_t) (val5); \ + *duk__p++ = (duk_uint8_t) (val6); \ + (bw_ctx)->p = duk__p; \ + } while (0) +#define DUK_BW_WRITE_RAW_XUTF8(thr, bw_ctx, cp) \ + do { \ + duk_ucodepoint_t duk__cp; \ + duk_small_int_t duk__enc_len; \ + duk__cp = (duk_ucodepoint_t) (cp); \ + DUK_BW_ASSERT_SPACE((thr), (bw_ctx), duk_unicode_get_xutf8_length(duk__cp)); \ + duk__enc_len = duk_unicode_encode_xutf8(duk__cp, (bw_ctx)->p); \ + (bw_ctx)->p += duk__enc_len; \ + } while (0) +#define DUK_BW_WRITE_RAW_CESU8(thr, bw_ctx, cp) \ + do { \ + duk_ucodepoint_t duk__cp; \ + duk_small_int_t duk__enc_len; \ + duk__cp = (duk_ucodepoint_t) (cp); \ + DUK_BW_ASSERT_SPACE((thr), (bw_ctx), duk_unicode_get_cesu8_length(duk__cp)); \ + duk__enc_len = duk_unicode_encode_cesu8(duk__cp, (bw_ctx)->p); \ + (bw_ctx)->p += duk__enc_len; \ + } while (0) +/* XXX: add temporary duk__p pointer here too; sharing */ +/* XXX: avoid unsafe variants */ +#define DUK_BW_WRITE_RAW_BYTES(thr, bw_ctx, valptr, valsz) \ + do { \ + const void *duk__valptr; \ + duk_size_t duk__valsz; \ + duk__valptr = (const void *) (valptr); \ + duk__valsz = (duk_size_t) (valsz); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), duk__valptr, duk__valsz); \ + (bw_ctx)->p += duk__valsz; \ + } while (0) +#define DUK_BW_WRITE_RAW_CSTRING(thr, bw_ctx, val) \ + do { \ + const duk_uint8_t *duk__val; \ + duk_size_t duk__val_len; \ + duk__val = (const duk_uint8_t *) (val); \ + duk__val_len = DUK_STRLEN((const char *) duk__val); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), (const void *) duk__val, duk__val_len); \ + (bw_ctx)->p += duk__val_len; \ + } while (0) +#define DUK_BW_WRITE_RAW_HSTRING(thr, bw_ctx, val) \ + do { \ + duk_size_t duk__val_len; \ + duk__val_len = DUK_HSTRING_GET_BYTELEN((val)); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), (const void *) DUK_HSTRING_GET_DATA((val)), duk__val_len); \ + (bw_ctx)->p += duk__val_len; \ + } while (0) +#define DUK_BW_WRITE_RAW_HBUFFER(thr, bw_ctx, val) \ + do { \ + duk_size_t duk__val_len; \ + duk__val_len = DUK_HBUFFER_GET_SIZE((val)); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), \ + (const void *) DUK_HBUFFER_GET_DATA_PTR((thr)->heap, (val)), \ + duk__val_len); \ + (bw_ctx)->p += duk__val_len; \ + } while (0) +#define DUK_BW_WRITE_RAW_HBUFFER_FIXED(thr, bw_ctx, val) \ + do { \ + duk_size_t duk__val_len; \ + duk__val_len = DUK_HBUFFER_FIXED_GET_SIZE((val)); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), \ + (const void *) DUK_HBUFFER_FIXED_GET_DATA_PTR((thr)->heap, (val)), \ + duk__val_len); \ + (bw_ctx)->p += duk__val_len; \ + } while (0) +#define DUK_BW_WRITE_RAW_HBUFFER_DYNAMIC(thr, bw_ctx, val) \ + do { \ + duk_size_t duk__val_len; \ + duk__val_len = DUK_HBUFFER_DYNAMIC_GET_SIZE((val)); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), \ + (const void *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR((thr)->heap, (val)), \ + duk__val_len); \ + (bw_ctx)->p += duk__val_len; \ + } while (0) + +/* Append bytes from a slice already in the buffer. */ +#define DUK_BW_WRITE_RAW_SLICE(thr, bw, dst_off, dst_len) duk_bw_write_raw_slice((thr), (bw), (dst_off), (dst_len)) + +/* Insert bytes in the middle of the buffer from an external buffer. */ +#define DUK_BW_INSERT_RAW_BYTES(thr, bw, dst_off, buf, len) duk_bw_insert_raw_bytes((thr), (bw), (dst_off), (buf), (len)) + +/* Insert bytes in the middle of the buffer from a slice already + * in the buffer. Source offset is interpreted "before" the operation. + */ +#define DUK_BW_INSERT_RAW_SLICE(thr, bw, dst_off, src_off, len) duk_bw_insert_raw_slice((thr), (bw), (dst_off), (src_off), (len)) + +/* Insert a reserved area somewhere in the buffer; caller fills it. + * Evaluates to a (duk_uint_t *) pointing to the start of the reserved + * area for convenience. + */ +#define DUK_BW_INSERT_RAW_AREA(thr, bw, off, len) duk_bw_insert_raw_area((thr), (bw), (off), (len)) + +/* Remove a slice from inside buffer. */ +#define DUK_BW_REMOVE_RAW_SLICE(thr, bw, off, len) duk_bw_remove_raw_slice((thr), (bw), (off), (len)) + +/* Safe write calls which will ensure space first. */ + +#define DUK_BW_WRITE_ENSURE_U8(thr, bw_ctx, val) \ + do { \ + DUK_BW_ENSURE((thr), (bw_ctx), 1); \ + DUK_BW_WRITE_RAW_U8((thr), (bw_ctx), (val)); \ + } while (0) +#define DUK_BW_WRITE_ENSURE_U8_2(thr, bw_ctx, val1, val2) \ + do { \ + DUK_BW_ENSURE((thr), (bw_ctx), 2); \ + DUK_BW_WRITE_RAW_U8_2((thr), (bw_ctx), (val1), (val2)); \ + } while (0) +#define DUK_BW_WRITE_ENSURE_U8_3(thr, bw_ctx, val1, val2, val3) \ + do { \ + DUK_BW_ENSURE((thr), (bw_ctx), 3); \ + DUK_BW_WRITE_RAW_U8_3((thr), (bw_ctx), (val1), (val2), (val3)); \ + } while (0) +#define DUK_BW_WRITE_ENSURE_U8_4(thr, bw_ctx, val1, val2, val3, val4) \ + do { \ + DUK_BW_ENSURE((thr), (bw_ctx), 4); \ + DUK_BW_WRITE_RAW_U8_4((thr), (bw_ctx), (val1), (val2), (val3), (val4)); \ + } while (0) +#define DUK_BW_WRITE_ENSURE_U8_5(thr, bw_ctx, val1, val2, val3, val4, val5) \ + do { \ + DUK_BW_ENSURE((thr), (bw_ctx), 5); \ + DUK_BW_WRITE_RAW_U8_5((thr), (bw_ctx), (val1), (val2), (val3), (val4), (val5)); \ + } while (0) +#define DUK_BW_WRITE_ENSURE_U8_6(thr, bw_ctx, val1, val2, val3, val4, val5, val6) \ + do { \ + DUK_BW_ENSURE((thr), (bw_ctx), 6); \ + DUK_BW_WRITE_RAW_U8_6((thr), (bw_ctx), (val1), (val2), (val3), (val4), (val5), (val6)); \ + } while (0) +#define DUK_BW_WRITE_ENSURE_XUTF8(thr, bw_ctx, cp) \ + do { \ + DUK_BW_ENSURE((thr), (bw_ctx), DUK_UNICODE_MAX_XUTF8_LENGTH); \ + DUK_BW_WRITE_RAW_XUTF8((thr), (bw_ctx), (cp)); \ + } while (0) +#define DUK_BW_WRITE_ENSURE_CESU8(thr, bw_ctx, cp) \ + do { \ + DUK_BW_ENSURE((thr), (bw_ctx), DUK_UNICODE_MAX_CESU8_LENGTH); \ + DUK_BW_WRITE_RAW_CESU8((thr), (bw_ctx), (cp)); \ + } while (0) +/* XXX: add temporary duk__p pointer here too; sharing */ +/* XXX: avoid unsafe */ +#define DUK_BW_WRITE_ENSURE_BYTES(thr, bw_ctx, valptr, valsz) \ + do { \ + const void *duk__valptr; \ + duk_size_t duk__valsz; \ + duk__valptr = (const void *) (valptr); \ + duk__valsz = (duk_size_t) (valsz); \ + DUK_BW_ENSURE((thr), (bw_ctx), duk__valsz); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), duk__valptr, duk__valsz); \ + (bw_ctx)->p += duk__valsz; \ + } while (0) +#define DUK_BW_WRITE_ENSURE_CSTRING(thr, bw_ctx, val) \ + do { \ + const duk_uint8_t *duk__val; \ + duk_size_t duk__val_len; \ + duk__val = (const duk_uint8_t *) (val); \ + duk__val_len = DUK_STRLEN((const char *) duk__val); \ + DUK_BW_ENSURE((thr), (bw_ctx), duk__val_len); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), (const void *) duk__val, duk__val_len); \ + (bw_ctx)->p += duk__val_len; \ + } while (0) +#define DUK_BW_WRITE_ENSURE_HSTRING(thr, bw_ctx, val) \ + do { \ + duk_size_t duk__val_len; \ + duk__val_len = DUK_HSTRING_GET_BYTELEN((val)); \ + DUK_BW_ENSURE((thr), (bw_ctx), duk__val_len); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), (const void *) DUK_HSTRING_GET_DATA((val)), duk__val_len); \ + (bw_ctx)->p += duk__val_len; \ + } while (0) +#define DUK_BW_WRITE_ENSURE_HBUFFER(thr, bw_ctx, val) \ + do { \ + duk_size_t duk__val_len; \ + duk__val_len = DUK_HBUFFER_GET_SIZE((val)); \ + DUK_BW_ENSURE((thr), (bw_ctx), duk__val_len); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), \ + (const void *) DUK_HBUFFER_GET_DATA_PTR((thr)->heap, (val)), \ + duk__val_len); \ + (bw_ctx)->p += duk__val_len; \ + } while (0) +#define DUK_BW_WRITE_ENSURE_HBUFFER_FIXED(thr, bw_ctx, val) \ + do { \ + duk_size_t duk__val_len; \ + duk__val_len = DUK_HBUFFER_FIXED_GET_SIZE((val)); \ + DUK_BW_ENSURE((thr), (bw_ctx), duk__val_len); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), \ + (const void *) DUK_HBUFFER_FIXED_GET_DATA_PTR((thr)->heap, (val)), \ + duk__val_len); \ + (bw_ctx)->p += duk__val_len; \ + } while (0) +#define DUK_BW_WRITE_ENSURE_HBUFFER_DYNAMIC(thr, bw_ctx, val) \ + do { \ + duk_size_t duk__val_len; \ + duk__val_len = DUK_HBUFFER_DYNAMIC_GET_SIZE((val)); \ + DUK_BW_ENSURE((thr), (bw_ctx), duk__val_len); \ + duk_memcpy_unsafe((void *) ((bw_ctx)->p), \ + (const void *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR((thr)->heap, (val)), \ + duk__val_len); \ + (bw_ctx)->p += duk__val_len; \ + } while (0) + +#define DUK_BW_WRITE_ENSURE_SLICE(thr, bw, dst_off, dst_len) duk_bw_write_ensure_slice((thr), (bw), (dst_off), (dst_len)) +#define DUK_BW_INSERT_ENSURE_BYTES(thr, bw, dst_off, buf, len) duk_bw_insert_ensure_bytes((thr), (bw), (dst_off), (buf), (len)) +#define DUK_BW_INSERT_ENSURE_SLICE(thr, bw, dst_off, src_off, len) \ + duk_bw_insert_ensure_slice((thr), (bw), (dst_off), (src_off), (len)) +#define DUK_BW_INSERT_ENSURE_AREA(thr, bw, off, len) \ + /* Evaluates to (duk_uint8_t *) pointing to start of area. */ \ + duk_bw_insert_ensure_area((thr), (bw), (off), (len)) +#define DUK_BW_REMOVE_ENSURE_SLICE(thr, bw, off, len) \ + /* No difference between raw/ensure because the buffer shrinks. */ \ + DUK_BW_REMOVE_RAW_SLICE((thr), (bw), (off), (len)) + +/* + * Externs and prototypes + */ + +#if !defined(DUK_SINGLE_FILE) +DUK_INTERNAL_DECL const duk_uint8_t duk_lc_digits[36]; +DUK_INTERNAL_DECL const duk_uint8_t duk_uc_nybbles[16]; +DUK_INTERNAL_DECL const duk_int8_t duk_hex_dectab[256]; +#if defined(DUK_USE_HEX_FASTPATH) +DUK_INTERNAL_DECL const duk_int16_t duk_hex_dectab_shift4[256]; +DUK_INTERNAL_DECL const duk_uint16_t duk_hex_enctab[256]; +#endif +#endif /* !DUK_SINGLE_FILE */ + +/* Note: assumes that duk_util_probe_steps size is 32 */ +#if defined(DUK_USE_HOBJECT_HASH_PART) +#if !defined(DUK_SINGLE_FILE) +DUK_INTERNAL_DECL duk_uint8_t duk_util_probe_steps[32]; +#endif /* !DUK_SINGLE_FILE */ +#endif + +#if defined(DUK_USE_STRHASH_DENSE) +DUK_INTERNAL_DECL duk_uint32_t duk_util_hashbytes(const duk_uint8_t *data, duk_size_t len, duk_uint32_t seed); +#endif + +DUK_INTERNAL_DECL duk_uint32_t duk_bd_decode(duk_bitdecoder_ctx *ctx, duk_small_int_t bits); +DUK_INTERNAL_DECL duk_small_uint_t duk_bd_decode_flag(duk_bitdecoder_ctx *ctx); +DUK_INTERNAL_DECL duk_uint32_t duk_bd_decode_flagged(duk_bitdecoder_ctx *ctx, duk_small_int_t bits, duk_uint32_t def_value); +DUK_INTERNAL_DECL duk_int32_t duk_bd_decode_flagged_signed(duk_bitdecoder_ctx *ctx, duk_small_int_t bits, duk_int32_t def_value); +DUK_INTERNAL_DECL duk_uint32_t duk_bd_decode_varuint(duk_bitdecoder_ctx *ctx); +DUK_INTERNAL_DECL duk_small_uint_t duk_bd_decode_bitpacked_string(duk_bitdecoder_ctx *bd, duk_uint8_t *out); + +DUK_INTERNAL_DECL void duk_be_encode(duk_bitencoder_ctx *ctx, duk_uint32_t data, duk_small_int_t bits); +DUK_INTERNAL_DECL void duk_be_finish(duk_bitencoder_ctx *ctx); + +#if !defined(DUK_USE_GET_RANDOM_DOUBLE) +DUK_INTERNAL_DECL duk_double_t duk_util_tinyrandom_get_double(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_util_tinyrandom_prepare_seed(duk_hthread *thr); +#endif + +DUK_INTERNAL_DECL void duk_bw_init(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx, duk_hbuffer_dynamic *h_buf); +DUK_INTERNAL_DECL void duk_bw_init_pushbuf(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx, duk_size_t buf_size); +DUK_INTERNAL_DECL duk_uint8_t *duk_bw_resize(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx, duk_size_t sz); +DUK_INTERNAL_DECL void duk_bw_compact(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx); +DUK_INTERNAL_DECL void duk_bw_write_raw_slice(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_size_t src_off, duk_size_t len); +DUK_INTERNAL_DECL void duk_bw_write_ensure_slice(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_size_t src_off, duk_size_t len); +DUK_INTERNAL_DECL void duk_bw_insert_raw_bytes(duk_hthread *thr, + duk_bufwriter_ctx *bw, + duk_size_t dst_off, + const duk_uint8_t *buf, + duk_size_t len); +DUK_INTERNAL_DECL void duk_bw_insert_ensure_bytes(duk_hthread *thr, + duk_bufwriter_ctx *bw, + duk_size_t dst_off, + const duk_uint8_t *buf, + duk_size_t len); +DUK_INTERNAL_DECL void duk_bw_insert_raw_slice(duk_hthread *thr, + duk_bufwriter_ctx *bw, + duk_size_t dst_off, + duk_size_t src_off, + duk_size_t len); +DUK_INTERNAL_DECL void duk_bw_insert_ensure_slice(duk_hthread *thr, + duk_bufwriter_ctx *bw, + duk_size_t dst_off, + duk_size_t src_off, + duk_size_t len); +DUK_INTERNAL_DECL duk_uint8_t *duk_bw_insert_raw_area(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_size_t off, duk_size_t len); +DUK_INTERNAL_DECL duk_uint8_t *duk_bw_insert_ensure_area(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_size_t off, duk_size_t len); +DUK_INTERNAL_DECL void duk_bw_remove_raw_slice(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_size_t off, duk_size_t len); +/* No duk_bw_remove_ensure_slice(), functionality would be identical. */ + +DUK_INTERNAL_DECL duk_uint16_t duk_raw_read_u16_be(const duk_uint8_t *p); +DUK_INTERNAL_DECL duk_uint32_t duk_raw_read_u32_be(const duk_uint8_t *p); +DUK_INTERNAL_DECL duk_float_t duk_raw_read_float_be(const duk_uint8_t *p); +DUK_INTERNAL_DECL duk_double_t duk_raw_read_double_be(const duk_uint8_t *p); +DUK_INTERNAL_DECL duk_uint16_t duk_raw_readinc_u16_be(const duk_uint8_t **p); +DUK_INTERNAL_DECL duk_uint32_t duk_raw_readinc_u32_be(const duk_uint8_t **p); +DUK_INTERNAL_DECL duk_float_t duk_raw_readinc_float_be(const duk_uint8_t **p); +DUK_INTERNAL_DECL duk_double_t duk_raw_readinc_double_be(const duk_uint8_t **p); +DUK_INTERNAL_DECL void duk_raw_write_u16_be(duk_uint8_t *p, duk_uint16_t val); +DUK_INTERNAL_DECL void duk_raw_write_u32_be(duk_uint8_t *p, duk_uint32_t val); +DUK_INTERNAL_DECL void duk_raw_write_float_be(duk_uint8_t *p, duk_float_t val); +DUK_INTERNAL_DECL void duk_raw_write_double_be(duk_uint8_t *p, duk_double_t val); +DUK_INTERNAL_DECL duk_small_int_t duk_raw_write_xutf8(duk_uint8_t *p, duk_ucodepoint_t val); +DUK_INTERNAL_DECL duk_small_int_t duk_raw_write_cesu8(duk_uint8_t *p, duk_ucodepoint_t val); +DUK_INTERNAL_DECL void duk_raw_writeinc_u16_be(duk_uint8_t **p, duk_uint16_t val); +DUK_INTERNAL_DECL void duk_raw_writeinc_u32_be(duk_uint8_t **p, duk_uint32_t val); +DUK_INTERNAL_DECL void duk_raw_writeinc_float_be(duk_uint8_t **p, duk_float_t val); +DUK_INTERNAL_DECL void duk_raw_writeinc_double_be(duk_uint8_t **p, duk_double_t val); +DUK_INTERNAL_DECL void duk_raw_writeinc_xutf8(duk_uint8_t **p, duk_ucodepoint_t val); +DUK_INTERNAL_DECL void duk_raw_writeinc_cesu8(duk_uint8_t **p, duk_ucodepoint_t val); + +#if defined(DUK_USE_DEBUGGER_SUPPORT) /* For now only needed by the debugger. */ +DUK_INTERNAL_DECL void duk_byteswap_bytes(duk_uint8_t *p, duk_small_uint_t len); +#endif + +DUK_INTERNAL_DECL duk_double_t duk_util_get_random_double(duk_hthread *thr); + +/* memcpy(), memmove() etc wrappers. The plain variants like duk_memcpy() + * assume C99+ and 'src' and 'dst' pointers must be non-NULL even when the + * operation size is zero. The unsafe variants like duk_memcpy_safe() deal + * with the zero size case explicitly, and allow NULL pointers in that case + * (which is undefined behavior in C99+). For the majority of actual targets + * a NULL pointer with a zero length is fine in practice. These wrappers are + * macros to force inlining; because there are hundreds of call sites, even a + * few extra bytes per call site adds up to ~1kB footprint. + */ +#if defined(DUK_USE_ALLOW_UNDEFINED_BEHAVIOR) +#define duk_memcpy(dst, src, len) \ + do { \ + void *duk__dst = (dst); \ + const void *duk__src = (src); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL || duk__len == 0U); \ + DUK_ASSERT(duk__src != NULL || duk__len == 0U); \ + (void) DUK_MEMCPY(duk__dst, duk__src, (size_t) duk__len); \ + } while (0) +#define duk_memcpy_unsafe(dst, src, len) duk_memcpy((dst), (src), (len)) +#define duk_memmove(dst, src, len) \ + do { \ + void *duk__dst = (dst); \ + const void *duk__src = (src); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL || duk__len == 0U); \ + DUK_ASSERT(duk__src != NULL || duk__len == 0U); \ + (void) DUK_MEMMOVE(duk__dst, duk__src, (size_t) duk__len); \ + } while (0) +#define duk_memmove_unsafe(dst, src, len) duk_memmove((dst), (src), (len)) +#define duk_memset(dst, val, len) \ + do { \ + void *duk__dst = (dst); \ + duk_small_int_t duk__val = (val); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL || duk__len == 0U); \ + (void) DUK_MEMSET(duk__dst, duk__val, (size_t) duk__len); \ + } while (0) +#define duk_memset_unsafe(dst, val, len) duk_memset((dst), (val), (len)) +#define duk_memzero(dst, len) \ + do { \ + void *duk__dst = (dst); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL || duk__len == 0U); \ + (void) DUK_MEMZERO(duk__dst, (size_t) duk__len); \ + } while (0) +#define duk_memzero_unsafe(dst, len) duk_memzero((dst), (len)) +#else /* DUK_USE_ALLOW_UNDEFINED_BEHAVIOR */ +#define duk_memcpy(dst, src, len) \ + do { \ + void *duk__dst = (dst); \ + const void *duk__src = (src); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL); \ + DUK_ASSERT(duk__src != NULL); \ + (void) DUK_MEMCPY(duk__dst, duk__src, (size_t) duk__len); \ + } while (0) +#define duk_memcpy_unsafe(dst, src, len) \ + do { \ + void *duk__dst = (dst); \ + const void *duk__src = (src); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL || duk__len == 0U); \ + DUK_ASSERT(duk__src != NULL || duk__len == 0U); \ + if (DUK_LIKELY(duk__len > 0U)) { \ + DUK_ASSERT(duk__dst != NULL); \ + DUK_ASSERT(duk__src != NULL); \ + (void) DUK_MEMCPY(duk__dst, duk__src, (size_t) duk__len); \ + } \ + } while (0) +#define duk_memmove(dst, src, len) \ + do { \ + void *duk__dst = (dst); \ + const void *duk__src = (src); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL); \ + DUK_ASSERT(duk__src != NULL); \ + (void) DUK_MEMMOVE(duk__dst, duk__src, (size_t) duk__len); \ + } while (0) +#define duk_memmove_unsafe(dst, src, len) \ + do { \ + void *duk__dst = (dst); \ + const void *duk__src = (src); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL || duk__len == 0U); \ + DUK_ASSERT(duk__src != NULL || duk__len == 0U); \ + if (DUK_LIKELY(duk__len > 0U)) { \ + DUK_ASSERT(duk__dst != NULL); \ + DUK_ASSERT(duk__src != NULL); \ + (void) DUK_MEMMOVE(duk__dst, duk__src, (size_t) duk__len); \ + } \ + } while (0) +#define duk_memset(dst, val, len) \ + do { \ + void *duk__dst = (dst); \ + duk_small_int_t duk__val = (val); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL); \ + (void) DUK_MEMSET(duk__dst, duk__val, (size_t) duk__len); \ + } while (0) +#define duk_memset_unsafe(dst, val, len) \ + do { \ + void *duk__dst = (dst); \ + duk_small_int_t duk__val = (val); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL || duk__len == 0U); \ + if (DUK_LIKELY(duk__len > 0U)) { \ + DUK_ASSERT(duk__dst != NULL); \ + (void) DUK_MEMSET(duk__dst, duk__val, (size_t) duk__len); \ + } \ + } while (0) +#define duk_memzero(dst, len) \ + do { \ + void *duk__dst = (dst); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL); \ + (void) DUK_MEMZERO(duk__dst, (size_t) duk__len); \ + } while (0) +#define duk_memzero_unsafe(dst, len) \ + do { \ + void *duk__dst = (dst); \ + duk_size_t duk__len = (len); \ + DUK_ASSERT(duk__dst != NULL || duk__len == 0U); \ + if (DUK_LIKELY(duk__len > 0U)) { \ + DUK_ASSERT(duk__dst != NULL); \ + (void) DUK_MEMZERO(duk__dst, (size_t) duk__len); \ + } \ + } while (0) +#endif /* DUK_USE_ALLOW_UNDEFINED_BEHAVIOR */ + +DUK_INTERNAL_DECL duk_small_int_t duk_memcmp(const void *s1, const void *s2, duk_size_t len); +DUK_INTERNAL_DECL duk_small_int_t duk_memcmp_unsafe(const void *s1, const void *s2, duk_size_t len); + +DUK_INTERNAL_DECL duk_bool_t duk_is_whole_get_int32_nonegzero(duk_double_t x, duk_int32_t *ival); +DUK_INTERNAL_DECL duk_bool_t duk_is_whole_get_int32(duk_double_t x, duk_int32_t *ival); +DUK_INTERNAL_DECL duk_bool_t duk_double_is_anyinf(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_double_is_posinf(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_double_is_neginf(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_double_is_nan(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_double_is_nan_or_zero(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_double_is_nan_or_inf(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_double_is_nan_zero_inf(duk_double_t x); +DUK_INTERNAL_DECL duk_small_uint_t duk_double_signbit(duk_double_t x); +DUK_INTERNAL_DECL duk_double_t duk_double_trunc_towards_zero(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_double_same_sign(duk_double_t x, duk_double_t y); +DUK_INTERNAL_DECL duk_double_t duk_double_fmin(duk_double_t x, duk_double_t y); +DUK_INTERNAL_DECL duk_double_t duk_double_fmax(duk_double_t x, duk_double_t y); +DUK_INTERNAL_DECL duk_bool_t duk_double_is_finite(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_double_is_integer(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_double_is_safe_integer(duk_double_t x); + +DUK_INTERNAL_DECL duk_double_t duk_double_div(duk_double_t x, duk_double_t y); +DUK_INTERNAL_DECL duk_int_t duk_double_to_int_t(duk_double_t x); +DUK_INTERNAL_DECL duk_uint_t duk_double_to_uint_t(duk_double_t x); +DUK_INTERNAL_DECL duk_int32_t duk_double_to_int32_t(duk_double_t x); +DUK_INTERNAL_DECL duk_uint32_t duk_double_to_uint32_t(duk_double_t x); +DUK_INTERNAL_DECL duk_float_t duk_double_to_float_t(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_double_equals(duk_double_t x, duk_double_t y); +DUK_INTERNAL_DECL duk_bool_t duk_float_equals(duk_float_t x, duk_float_t y); + +/* + * Miscellaneous + */ + +/* Example: x = 0x10 = 0b00010000 + * x - 1 = 0x0f = 0b00001111 + * x & (x - 1) == 0 + * + * x = 0x07 = 0b00000111 + * x - 1 = 0x06 = 0b00000110 + * x & (x - 1) != 0 + * + * However, incorrectly true for x == 0 so check for that explicitly. + */ +#define DUK_IS_POWER_OF_TWO(x) ((x) != 0U && ((x) & ((x) -1U)) == 0U) + +#endif /* DUK_UTIL_H_INCLUDED */ +/* #include duk_strings.h */ +#line 1 "duk_strings.h" +/* + * Shared string macros. + * + * Using shared macros helps minimize strings data size because it's easy + * to check if an existing string could be used. String constants don't + * need to be all defined here; defining a string here makes sense if there's + * a high chance the string could be reused. Also, using macros allows + * a call site express the exact string needed, but the macro may map to an + * approximate string to reduce unique string count. Macros can also be + * more easily tuned for low memory targets than #if defined()s throughout + * the code base. + * + * Because format strings behave differently in the call site (they need to + * be followed by format arguments), they use a special prefix DUK_STR_FMT_. + * + * On some compilers using explicit shared strings is preferable; on others + * it may be better to use straight literals because the compiler will combine + * them anyway, and such strings won't end up unnecessarily in a symbol table. + */ + +#if !defined(DUK_ERRMSG_H_INCLUDED) +#define DUK_ERRMSG_H_INCLUDED + +/* Mostly API and built-in method related */ +#define DUK_STR_INTERNAL_ERROR "internal error" +#define DUK_STR_UNSUPPORTED "unsupported" +#define DUK_STR_INVALID_COUNT "invalid count" +#define DUK_STR_INVALID_ARGS "invalid args" +#define DUK_STR_INVALID_STATE "invalid state" +#define DUK_STR_INVALID_INPUT "invalid input" +#define DUK_STR_INVALID_LENGTH "invalid length" +#define DUK_STR_NOT_CONSTRUCTABLE "not constructable" +#define DUK_STR_CONSTRUCT_ONLY "constructor requires 'new'" +#define DUK_STR_NOT_CALLABLE "not callable" +#define DUK_STR_NOT_EXTENSIBLE "not extensible" +#define DUK_STR_NOT_WRITABLE "not writable" +#define DUK_STR_NOT_CONFIGURABLE "not configurable" +#define DUK_STR_INVALID_CONTEXT "invalid context" +#define DUK_STR_INVALID_INDEX "invalid args" +#define DUK_STR_PUSH_BEYOND_ALLOC_STACK "cannot push beyond allocated stack" +#define DUK_STR_NOT_UNDEFINED "unexpected type" +#define DUK_STR_NOT_NULL "unexpected type" +#define DUK_STR_NOT_BOOLEAN "unexpected type" +#define DUK_STR_NOT_NUMBER "unexpected type" +#define DUK_STR_NOT_STRING "unexpected type" +#define DUK_STR_NOT_OBJECT "unexpected type" +#define DUK_STR_NOT_POINTER "unexpected type" +#define DUK_STR_NOT_BUFFER "not buffer" /* still in use with verbose messages */ +#define DUK_STR_UNEXPECTED_TYPE "unexpected type" +#define DUK_STR_NOT_THREAD "unexpected type" +#define DUK_STR_NOT_COMPFUNC "unexpected type" +#define DUK_STR_NOT_NATFUNC "unexpected type" +#define DUK_STR_NOT_C_FUNCTION "unexpected type" +#define DUK_STR_NOT_FUNCTION "unexpected type" +#define DUK_STR_NOT_REGEXP "unexpected type" +#define DUK_STR_TOPRIMITIVE_FAILED "coercion to primitive failed" +#define DUK_STR_NUMBER_OUTSIDE_RANGE "number outside range" +#define DUK_STR_NOT_OBJECT_COERCIBLE "not object coercible" +#define DUK_STR_CANNOT_NUMBER_COERCE_SYMBOL "cannot number coerce Symbol" +#define DUK_STR_CANNOT_STRING_COERCE_SYMBOL "cannot string coerce Symbol" +#define DUK_STR_STRING_TOO_LONG "string too long" +#define DUK_STR_BUFFER_TOO_LONG "buffer too long" +#define DUK_STR_ALLOC_FAILED "alloc failed" +#define DUK_STR_WRONG_BUFFER_TYPE "wrong buffer type" +#define DUK_STR_BASE64_ENCODE_FAILED "base64 encode failed" +#define DUK_STR_SOURCE_DECODE_FAILED "source decode failed" +#define DUK_STR_UTF8_DECODE_FAILED "utf-8 decode failed" +#define DUK_STR_BASE64_DECODE_FAILED "base64 decode failed" +#define DUK_STR_HEX_DECODE_FAILED "hex decode failed" +#define DUK_STR_INVALID_BYTECODE "invalid bytecode" +#define DUK_STR_NO_SOURCECODE "no sourcecode" +#define DUK_STR_RESULT_TOO_LONG "result too long" +#define DUK_STR_INVALID_CFUNC_RC "invalid C function rc" +#define DUK_STR_INVALID_INSTANCEOF_RVAL "invalid instanceof rval" +#define DUK_STR_INVALID_INSTANCEOF_RVAL_NOPROTO "instanceof rval has no .prototype" + +/* JSON */ +#define DUK_STR_FMT_PTR "%p" +#define DUK_STR_FMT_INVALID_JSON "invalid json (at offset %ld)" +#define DUK_STR_CYCLIC_INPUT "cyclic input" + +/* Generic codec */ +#define DUK_STR_DEC_RECLIMIT "decode recursion limit" +#define DUK_STR_ENC_RECLIMIT "encode recursion limit" + +/* Object property access */ +#define DUK_STR_INVALID_BASE "invalid base value" +#define DUK_STR_STRICT_CALLER_READ "cannot read strict 'caller'" +#define DUK_STR_PROXY_REJECTED "proxy rejected" +#define DUK_STR_INVALID_ARRAY_LENGTH "invalid array length" +#define DUK_STR_SETTER_UNDEFINED "setter undefined" +#define DUK_STR_INVALID_DESCRIPTOR "invalid descriptor" + +/* Proxy */ +#define DUK_STR_PROXY_REVOKED "proxy revoked" +#define DUK_STR_INVALID_TRAP_RESULT "invalid trap result" + +/* Variables */ + +/* Lexer */ +#define DUK_STR_INVALID_ESCAPE "invalid escape" +#define DUK_STR_UNTERMINATED_STRING "unterminated string" +#define DUK_STR_UNTERMINATED_COMMENT "unterminated comment" +#define DUK_STR_UNTERMINATED_REGEXP "unterminated regexp" +#define DUK_STR_TOKEN_LIMIT "token limit" +#define DUK_STR_REGEXP_SUPPORT_DISABLED "regexp support disabled" +#define DUK_STR_INVALID_NUMBER_LITERAL "invalid number literal" +#define DUK_STR_INVALID_TOKEN "invalid token" + +/* Compiler */ +#define DUK_STR_PARSE_ERROR "parse error" +#define DUK_STR_DUPLICATE_LABEL "duplicate label" +#define DUK_STR_INVALID_LABEL "invalid label" +#define DUK_STR_INVALID_ARRAY_LITERAL "invalid array literal" +#define DUK_STR_INVALID_OBJECT_LITERAL "invalid object literal" +#define DUK_STR_INVALID_VAR_DECLARATION "invalid variable declaration" +#define DUK_STR_CANNOT_DELETE_IDENTIFIER "cannot delete identifier" +#define DUK_STR_INVALID_EXPRESSION "invalid expression" +#define DUK_STR_INVALID_LVALUE "invalid lvalue" +#define DUK_STR_INVALID_NEWTARGET "invalid new.target" +#define DUK_STR_EXPECTED_IDENTIFIER "expected identifier" +#define DUK_STR_EMPTY_EXPR_NOT_ALLOWED "empty expression not allowed" +#define DUK_STR_INVALID_FOR "invalid for statement" +#define DUK_STR_INVALID_SWITCH "invalid switch statement" +#define DUK_STR_INVALID_BREAK_CONT_LABEL "invalid break/continue label" +#define DUK_STR_INVALID_RETURN "invalid return" +#define DUK_STR_INVALID_TRY "invalid try" +#define DUK_STR_INVALID_THROW "invalid throw" +#define DUK_STR_WITH_IN_STRICT_MODE "with in strict mode" +#define DUK_STR_FUNC_STMT_NOT_ALLOWED "function statement not allowed" +#define DUK_STR_UNTERMINATED_STMT "unterminated statement" +#define DUK_STR_INVALID_ARG_NAME "invalid argument name" +#define DUK_STR_INVALID_FUNC_NAME "invalid function name" +#define DUK_STR_INVALID_GETSET_NAME "invalid getter/setter name" +#define DUK_STR_FUNC_NAME_REQUIRED "function name required" + +/* RegExp */ +#define DUK_STR_INVALID_QUANTIFIER "invalid regexp quantifier" +#define DUK_STR_INVALID_QUANTIFIER_NO_ATOM "quantifier without preceding atom" +#define DUK_STR_INVALID_QUANTIFIER_VALUES "quantifier values invalid (qmin > qmax)" +#define DUK_STR_QUANTIFIER_TOO_MANY_COPIES "quantifier requires too many atom copies" +#define DUK_STR_UNEXPECTED_CLOSING_PAREN "unexpected closing parenthesis" +#define DUK_STR_UNEXPECTED_END_OF_PATTERN "unexpected end of pattern" +#define DUK_STR_UNEXPECTED_REGEXP_TOKEN "unexpected token in regexp" +#define DUK_STR_INVALID_REGEXP_FLAGS "invalid regexp flags" +#define DUK_STR_INVALID_REGEXP_ESCAPE "invalid regexp escape" +#define DUK_STR_INVALID_BACKREFS "invalid backreference(s)" +#define DUK_STR_INVALID_REGEXP_CHARACTER "invalid regexp character" +#define DUK_STR_INVALID_REGEXP_GROUP "invalid regexp group" +#define DUK_STR_UNTERMINATED_CHARCLASS "unterminated character class" +#define DUK_STR_INVALID_RANGE "invalid range" + +/* Limits */ +#define DUK_STR_VALSTACK_LIMIT "valstack limit" +#define DUK_STR_CALLSTACK_LIMIT "callstack limit" +#define DUK_STR_PROTOTYPE_CHAIN_LIMIT "prototype chain limit" +#define DUK_STR_BOUND_CHAIN_LIMIT "function call bound chain limit" +#define DUK_STR_NATIVE_STACK_LIMIT "C stack depth limit" +#define DUK_STR_COMPILER_RECURSION_LIMIT "compiler recursion limit" +#define DUK_STR_BYTECODE_LIMIT "bytecode limit" +#define DUK_STR_REG_LIMIT "register limit" +#define DUK_STR_TEMP_LIMIT "temp limit" +#define DUK_STR_CONST_LIMIT "const limit" +#define DUK_STR_FUNC_LIMIT "function limit" +#define DUK_STR_REGEXP_COMPILER_RECURSION_LIMIT "regexp compiler recursion limit" +#define DUK_STR_REGEXP_EXECUTOR_RECURSION_LIMIT "regexp executor recursion limit" +#define DUK_STR_REGEXP_EXECUTOR_STEP_LIMIT "regexp step limit" + +#endif /* DUK_ERRMSG_H_INCLUDED */ +/* #include duk_js_bytecode.h */ +#line 1 "duk_js_bytecode.h" +/* + * ECMAScript bytecode + */ + +#if !defined(DUK_JS_BYTECODE_H_INCLUDED) +#define DUK_JS_BYTECODE_H_INCLUDED + +/* + * Bytecode instruction layout + * =========================== + * + * Instructions are unsigned 32-bit integers divided as follows: + * + * !3!3!2!2!2!2!2!2!2!2!2!2!1!1!1!1!1!1!1!1!1!1! ! ! ! ! ! ! ! ! ! ! + * !1!0!9!8!7!6!5!4!3!2!1!0!9!8!7!6!5!4!3!2!1!0!9!8!7!6!5!4!3!2!1!0! + * +-----------------------------------------------+---------------+ + * ! C ! B ! A ! OP ! + * +-----------------------------------------------+---------------+ + * + * OP (8 bits): opcode (DUK_OP_*), access should be fastest + * consecutive opcodes allocated when opcode needs flags + * A (8 bits): typically a target register number + * B (8 bits): typically first source register/constant number + * C (8 bits): typically second source register/constant number + * + * Some instructions combine BC or ABC together for larger parameter values. + * Signed integers (e.g. jump offsets) are encoded as unsigned, with an + * opcode specific bias. + * + * Some opcodes have flags which are handled by allocating consecutive + * opcodes to make space for 1-N flags. Flags can also be e.g. in the 'A' + * field when there's room for the specific opcode. + * + * For example, if three flags were needed, they could be allocated from + * the opcode field as follows: + * + * !3!3!2!2!2!2!2!2!2!2!2!2!1!1!1!1!1!1!1!1!1!1! ! ! ! ! ! ! ! ! ! ! + * !1!0!9!8!7!6!5!4!3!2!1!0!9!8!7!6!5!4!3!2!1!0!9!8!7!6!5!4!3!2!1!0! + * +-----------------------------------------------+---------------+ + * ! C ! B ! A ! OP !Z!Y!X! + * +-----------------------------------------------+---------------+ + * + * Some opcodes accept a reg/const argument which is handled by allocating + * flags in the OP field, see DUK_BC_ISREG() and DUK_BC_ISCONST(). The + * following convention is shared by most opcodes, so that the compiler + * can handle reg/const flagging without opcode specific code paths: + * + * !3!3!2!2!2!2!2!2!2!2!2!2!1!1!1!1!1!1!1!1!1!1! ! ! ! ! ! ! ! ! ! ! + * !1!0!9!8!7!6!5!4!3!2!1!0!9!8!7!6!5!4!3!2!1!0!9!8!7!6!5!4!3!2!1!0! + * +-----------------------------------------------+---------------+ + * ! C ! B ! A ! OP !Y!X! + * +-----------------------------------------------+---------------+ + * + * X 1=B is const, 0=B is reg + * Y 1=C is const, 0=C is reg + * + * In effect OP, OP + 1, OP + 2, and OP + 3 are allocated from the + * 8-bit opcode space for a single logical opcode. The base opcode + * number should be divisible by 4. If the opcode is called 'FOO' + * the following opcode constants would be defined: + * + * DUK_OP_FOO 100 // base opcode number + * DUK_OP_FOO_RR 100 // FOO, B=reg, C=reg + * DUK_OP_FOO_CR 101 // FOO, B=const, C=reg + * DUK_OP_FOO_RC 102 // FOO, B=reg, C=const + * DUK_OP_FOO_CC 103 // FOO, B=const, C=const + * + * If only B or C is a reg/const, the unused opcode combinations can be + * used for other opcodes (which take no reg/const argument). However, + * such opcode values are initially reserved, at least while opcode space + * is available. For example, if 'BAR' uses B for a register field and + * C is a reg/const: + * + * DUK_OP_BAR 116 // base opcode number + * DUK_OP_BAR_RR 116 // BAR, B=reg, C=reg + * DUK_OP_BAR_CR_UNUSED 117 // unused, could be repurposed + * DUK_OP_BAR_RC 118 // BAR, B=reg, C=const + * DUK_OP_BAR_CC_UNUSED 119 // unused, could be repurposed + * + * Macro naming is a bit misleading, e.g. "ABC" in macro name but the + * field layout is concretely "CBA" in the register. + */ + +typedef duk_uint32_t duk_instr_t; + +#define DUK_BC_SHIFT_OP 0 +#define DUK_BC_SHIFT_A 8 +#define DUK_BC_SHIFT_B 16 +#define DUK_BC_SHIFT_C 24 +#define DUK_BC_SHIFT_BC DUK_BC_SHIFT_B +#define DUK_BC_SHIFT_ABC DUK_BC_SHIFT_A + +#define DUK_BC_UNSHIFTED_MASK_OP 0xffUL +#define DUK_BC_UNSHIFTED_MASK_A 0xffUL +#define DUK_BC_UNSHIFTED_MASK_B 0xffUL +#define DUK_BC_UNSHIFTED_MASK_C 0xffUL +#define DUK_BC_UNSHIFTED_MASK_BC 0xffffUL +#define DUK_BC_UNSHIFTED_MASK_ABC 0xffffffUL + +#define DUK_BC_SHIFTED_MASK_OP (DUK_BC_UNSHIFTED_MASK_OP << DUK_BC_SHIFT_OP) +#define DUK_BC_SHIFTED_MASK_A (DUK_BC_UNSHIFTED_MASK_A << DUK_BC_SHIFT_A) +#define DUK_BC_SHIFTED_MASK_B (DUK_BC_UNSHIFTED_MASK_B << DUK_BC_SHIFT_B) +#define DUK_BC_SHIFTED_MASK_C (DUK_BC_UNSHIFTED_MASK_C << DUK_BC_SHIFT_C) +#define DUK_BC_SHIFTED_MASK_BC (DUK_BC_UNSHIFTED_MASK_BC << DUK_BC_SHIFT_BC) +#define DUK_BC_SHIFTED_MASK_ABC (DUK_BC_UNSHIFTED_MASK_ABC << DUK_BC_SHIFT_ABC) + +#define DUK_DEC_OP(x) ((x) &0xffUL) +#define DUK_DEC_A(x) (((x) >> 8) & 0xffUL) +#define DUK_DEC_B(x) (((x) >> 16) & 0xffUL) +#define DUK_DEC_C(x) (((x) >> 24) & 0xffUL) +#define DUK_DEC_BC(x) (((x) >> 16) & 0xffffUL) +#define DUK_DEC_ABC(x) (((x) >> 8) & 0xffffffUL) + +#define DUK_ENC_OP(op) ((duk_instr_t) (op)) +#define DUK_ENC_OP_ABC(op, abc) ((duk_instr_t) ((((duk_instr_t) (abc)) << 8) | ((duk_instr_t) (op)))) +#define DUK_ENC_OP_A_BC(op, a, bc) \ + ((duk_instr_t) ((((duk_instr_t) (bc)) << 16) | (((duk_instr_t) (a)) << 8) | ((duk_instr_t) (op)))) +#define DUK_ENC_OP_A_B_C(op, a, b, c) \ + ((duk_instr_t) ((((duk_instr_t) (c)) << 24) | (((duk_instr_t) (b)) << 16) | (((duk_instr_t) (a)) << 8) | \ + ((duk_instr_t) (op)))) +#define DUK_ENC_OP_A_B(op, a, b) DUK_ENC_OP_A_B_C((op), (a), (b), 0) +#define DUK_ENC_OP_A(op, a) DUK_ENC_OP_A_B_C((op), (a), 0, 0) +#define DUK_ENC_OP_BC(op, bc) DUK_ENC_OP_A_BC((op), 0, (bc)) + +/* Get opcode base value with B/C reg/const flags cleared. */ +#define DUK_BC_NOREGCONST_OP(op) ((op) &0xfc) + +/* Constants should be signed so that signed arithmetic involving them + * won't cause values to be coerced accidentally to unsigned. + */ +#define DUK_BC_OP_MIN 0 +#define DUK_BC_OP_MAX 0xffL +#define DUK_BC_A_MIN 0 +#define DUK_BC_A_MAX 0xffL +#define DUK_BC_B_MIN 0 +#define DUK_BC_B_MAX 0xffL +#define DUK_BC_C_MIN 0 +#define DUK_BC_C_MAX 0xffL +#define DUK_BC_BC_MIN 0 +#define DUK_BC_BC_MAX 0xffffL +#define DUK_BC_ABC_MIN 0 +#define DUK_BC_ABC_MAX 0xffffffL + +/* Masks for B/C reg/const indicator in opcode field. */ +#define DUK_BC_REGCONST_B (0x01UL) +#define DUK_BC_REGCONST_C (0x02UL) + +/* Misc. masks for opcode field. */ +#define DUK_BC_INCDECP_FLAG_DEC (0x04UL) +#define DUK_BC_INCDECP_FLAG_POST (0x08UL) + +/* Opcodes. */ +#define DUK_OP_LDREG 0 +#define DUK_OP_STREG 1 +#define DUK_OP_JUMP 2 +#define DUK_OP_LDCONST 3 +#define DUK_OP_LDINT 4 +#define DUK_OP_LDINTX 5 +#define DUK_OP_LDTHIS 6 +#define DUK_OP_LDUNDEF 7 +#define DUK_OP_LDNULL 8 +#define DUK_OP_LDTRUE 9 +#define DUK_OP_LDFALSE 10 +#define DUK_OP_GETVAR 11 +#define DUK_OP_BNOT 12 +#define DUK_OP_LNOT 13 +#define DUK_OP_UNM 14 +#define DUK_OP_UNP 15 +#define DUK_OP_EQ 16 +#define DUK_OP_EQ_RR 16 +#define DUK_OP_EQ_CR 17 +#define DUK_OP_EQ_RC 18 +#define DUK_OP_EQ_CC 19 +#define DUK_OP_NEQ 20 +#define DUK_OP_NEQ_RR 20 +#define DUK_OP_NEQ_CR 21 +#define DUK_OP_NEQ_RC 22 +#define DUK_OP_NEQ_CC 23 +#define DUK_OP_SEQ 24 +#define DUK_OP_SEQ_RR 24 +#define DUK_OP_SEQ_CR 25 +#define DUK_OP_SEQ_RC 26 +#define DUK_OP_SEQ_CC 27 +#define DUK_OP_SNEQ 28 +#define DUK_OP_SNEQ_RR 28 +#define DUK_OP_SNEQ_CR 29 +#define DUK_OP_SNEQ_RC 30 +#define DUK_OP_SNEQ_CC 31 +#define DUK_OP_GT 32 +#define DUK_OP_GT_RR 32 +#define DUK_OP_GT_CR 33 +#define DUK_OP_GT_RC 34 +#define DUK_OP_GT_CC 35 +#define DUK_OP_GE 36 +#define DUK_OP_GE_RR 36 +#define DUK_OP_GE_CR 37 +#define DUK_OP_GE_RC 38 +#define DUK_OP_GE_CC 39 +#define DUK_OP_LT 40 +#define DUK_OP_LT_RR 40 +#define DUK_OP_LT_CR 41 +#define DUK_OP_LT_RC 42 +#define DUK_OP_LT_CC 43 +#define DUK_OP_LE 44 +#define DUK_OP_LE_RR 44 +#define DUK_OP_LE_CR 45 +#define DUK_OP_LE_RC 46 +#define DUK_OP_LE_CC 47 +#define DUK_OP_IFTRUE 48 +#define DUK_OP_IFTRUE_R 48 +#define DUK_OP_IFTRUE_C 49 +#define DUK_OP_IFFALSE 50 +#define DUK_OP_IFFALSE_R 50 +#define DUK_OP_IFFALSE_C 51 +#define DUK_OP_ADD 52 +#define DUK_OP_ADD_RR 52 +#define DUK_OP_ADD_CR 53 +#define DUK_OP_ADD_RC 54 +#define DUK_OP_ADD_CC 55 +#define DUK_OP_SUB 56 +#define DUK_OP_SUB_RR 56 +#define DUK_OP_SUB_CR 57 +#define DUK_OP_SUB_RC 58 +#define DUK_OP_SUB_CC 59 +#define DUK_OP_MUL 60 +#define DUK_OP_MUL_RR 60 +#define DUK_OP_MUL_CR 61 +#define DUK_OP_MUL_RC 62 +#define DUK_OP_MUL_CC 63 +#define DUK_OP_DIV 64 +#define DUK_OP_DIV_RR 64 +#define DUK_OP_DIV_CR 65 +#define DUK_OP_DIV_RC 66 +#define DUK_OP_DIV_CC 67 +#define DUK_OP_MOD 68 +#define DUK_OP_MOD_RR 68 +#define DUK_OP_MOD_CR 69 +#define DUK_OP_MOD_RC 70 +#define DUK_OP_MOD_CC 71 +#define DUK_OP_EXP 72 +#define DUK_OP_EXP_RR 72 +#define DUK_OP_EXP_CR 73 +#define DUK_OP_EXP_RC 74 +#define DUK_OP_EXP_CC 75 +#define DUK_OP_BAND 76 +#define DUK_OP_BAND_RR 76 +#define DUK_OP_BAND_CR 77 +#define DUK_OP_BAND_RC 78 +#define DUK_OP_BAND_CC 79 +#define DUK_OP_BOR 80 +#define DUK_OP_BOR_RR 80 +#define DUK_OP_BOR_CR 81 +#define DUK_OP_BOR_RC 82 +#define DUK_OP_BOR_CC 83 +#define DUK_OP_BXOR 84 +#define DUK_OP_BXOR_RR 84 +#define DUK_OP_BXOR_CR 85 +#define DUK_OP_BXOR_RC 86 +#define DUK_OP_BXOR_CC 87 +#define DUK_OP_BASL 88 +#define DUK_OP_BASL_RR 88 +#define DUK_OP_BASL_CR 89 +#define DUK_OP_BASL_RC 90 +#define DUK_OP_BASL_CC 91 +#define DUK_OP_BLSR 92 +#define DUK_OP_BLSR_RR 92 +#define DUK_OP_BLSR_CR 93 +#define DUK_OP_BLSR_RC 94 +#define DUK_OP_BLSR_CC 95 +#define DUK_OP_BASR 96 +#define DUK_OP_BASR_RR 96 +#define DUK_OP_BASR_CR 97 +#define DUK_OP_BASR_RC 98 +#define DUK_OP_BASR_CC 99 +#define DUK_OP_INSTOF 100 +#define DUK_OP_INSTOF_RR 100 +#define DUK_OP_INSTOF_CR 101 +#define DUK_OP_INSTOF_RC 102 +#define DUK_OP_INSTOF_CC 103 +#define DUK_OP_IN 104 +#define DUK_OP_IN_RR 104 +#define DUK_OP_IN_CR 105 +#define DUK_OP_IN_RC 106 +#define DUK_OP_IN_CC 107 +#define DUK_OP_GETPROP 108 +#define DUK_OP_GETPROP_RR 108 +#define DUK_OP_GETPROP_CR 109 +#define DUK_OP_GETPROP_RC 110 +#define DUK_OP_GETPROP_CC 111 +#define DUK_OP_PUTPROP 112 +#define DUK_OP_PUTPROP_RR 112 +#define DUK_OP_PUTPROP_CR 113 +#define DUK_OP_PUTPROP_RC 114 +#define DUK_OP_PUTPROP_CC 115 +#define DUK_OP_DELPROP 116 +#define DUK_OP_DELPROP_RR 116 +#define DUK_OP_DELPROP_CR_UNUSED 117 /* unused now */ +#define DUK_OP_DELPROP_RC 118 +#define DUK_OP_DELPROP_CC_UNUSED 119 /* unused now */ +#define DUK_OP_PREINCR 120 /* pre/post opcode values have constraints, */ +#define DUK_OP_PREDECR 121 /* see duk_js_executor.c and duk_js_compiler.c. */ +#define DUK_OP_POSTINCR 122 +#define DUK_OP_POSTDECR 123 +#define DUK_OP_PREINCV 124 +#define DUK_OP_PREDECV 125 +#define DUK_OP_POSTINCV 126 +#define DUK_OP_POSTDECV 127 +#define DUK_OP_PREINCP 128 /* pre/post inc/dec prop opcodes have constraints */ +#define DUK_OP_PREINCP_RR 128 +#define DUK_OP_PREINCP_CR 129 +#define DUK_OP_PREINCP_RC 130 +#define DUK_OP_PREINCP_CC 131 +#define DUK_OP_PREDECP 132 +#define DUK_OP_PREDECP_RR 132 +#define DUK_OP_PREDECP_CR 133 +#define DUK_OP_PREDECP_RC 134 +#define DUK_OP_PREDECP_CC 135 +#define DUK_OP_POSTINCP 136 +#define DUK_OP_POSTINCP_RR 136 +#define DUK_OP_POSTINCP_CR 137 +#define DUK_OP_POSTINCP_RC 138 +#define DUK_OP_POSTINCP_CC 139 +#define DUK_OP_POSTDECP 140 +#define DUK_OP_POSTDECP_RR 140 +#define DUK_OP_POSTDECP_CR 141 +#define DUK_OP_POSTDECP_RC 142 +#define DUK_OP_POSTDECP_CC 143 +#define DUK_OP_DECLVAR 144 +#define DUK_OP_DECLVAR_RR 144 +#define DUK_OP_DECLVAR_CR 145 +#define DUK_OP_DECLVAR_RC 146 +#define DUK_OP_DECLVAR_CC 147 +#define DUK_OP_REGEXP 148 +#define DUK_OP_REGEXP_RR 148 +#define DUK_OP_REGEXP_CR 149 +#define DUK_OP_REGEXP_RC 150 +#define DUK_OP_REGEXP_CC 151 +#define DUK_OP_CLOSURE 152 +#define DUK_OP_TYPEOF 153 +#define DUK_OP_TYPEOFID 154 +#define DUK_OP_PUTVAR 155 +#define DUK_OP_DELVAR 156 +#define DUK_OP_RETREG 157 +#define DUK_OP_RETUNDEF 158 +#define DUK_OP_RETCONST 159 +#define DUK_OP_RETCONSTN 160 /* return const without incref (e.g. number) */ +#define DUK_OP_LABEL 161 +#define DUK_OP_ENDLABEL 162 +#define DUK_OP_BREAK 163 +#define DUK_OP_CONTINUE 164 +#define DUK_OP_TRYCATCH 165 +#define DUK_OP_ENDTRY 166 +#define DUK_OP_ENDCATCH 167 +#define DUK_OP_ENDFIN 168 +#define DUK_OP_THROW 169 +#define DUK_OP_INVLHS 170 +#define DUK_OP_CSREG 171 +#define DUK_OP_CSVAR 172 +#define DUK_OP_CSVAR_RR 172 +#define DUK_OP_CSVAR_CR 173 +#define DUK_OP_CSVAR_RC 174 +#define DUK_OP_CSVAR_CC 175 +#define DUK_OP_CALL0 176 /* DUK_OP_CALL0 & 0x0F must be zero. */ +#define DUK_OP_CALL1 177 +#define DUK_OP_CALL2 178 +#define DUK_OP_CALL3 179 +#define DUK_OP_CALL4 180 +#define DUK_OP_CALL5 181 +#define DUK_OP_CALL6 182 +#define DUK_OP_CALL7 183 +#define DUK_OP_CALL8 184 +#define DUK_OP_CALL9 185 +#define DUK_OP_CALL10 186 +#define DUK_OP_CALL11 187 +#define DUK_OP_CALL12 188 +#define DUK_OP_CALL13 189 +#define DUK_OP_CALL14 190 +#define DUK_OP_CALL15 191 +#define DUK_OP_NEWOBJ 192 +#define DUK_OP_NEWARR 193 +#define DUK_OP_MPUTOBJ 194 +#define DUK_OP_MPUTOBJI 195 +#define DUK_OP_INITSET 196 +#define DUK_OP_INITGET 197 +#define DUK_OP_MPUTARR 198 +#define DUK_OP_MPUTARRI 199 +#define DUK_OP_SETALEN 200 +#define DUK_OP_INITENUM 201 +#define DUK_OP_NEXTENUM 202 +#define DUK_OP_NEWTARGET 203 +#define DUK_OP_DEBUGGER 204 +#define DUK_OP_NOP 205 +#define DUK_OP_INVALID 206 +#define DUK_OP_UNUSED207 207 +#define DUK_OP_GETPROPC 208 +#define DUK_OP_GETPROPC_RR 208 +#define DUK_OP_GETPROPC_CR 209 +#define DUK_OP_GETPROPC_RC 210 +#define DUK_OP_GETPROPC_CC 211 +#define DUK_OP_UNUSED212 212 +#define DUK_OP_UNUSED213 213 +#define DUK_OP_UNUSED214 214 +#define DUK_OP_UNUSED215 215 +#define DUK_OP_UNUSED216 216 +#define DUK_OP_UNUSED217 217 +#define DUK_OP_UNUSED218 218 +#define DUK_OP_UNUSED219 219 +#define DUK_OP_UNUSED220 220 +#define DUK_OP_UNUSED221 221 +#define DUK_OP_UNUSED222 222 +#define DUK_OP_UNUSED223 223 +#define DUK_OP_UNUSED224 224 +#define DUK_OP_UNUSED225 225 +#define DUK_OP_UNUSED226 226 +#define DUK_OP_UNUSED227 227 +#define DUK_OP_UNUSED228 228 +#define DUK_OP_UNUSED229 229 +#define DUK_OP_UNUSED230 230 +#define DUK_OP_UNUSED231 231 +#define DUK_OP_UNUSED232 232 +#define DUK_OP_UNUSED233 233 +#define DUK_OP_UNUSED234 234 +#define DUK_OP_UNUSED235 235 +#define DUK_OP_UNUSED236 236 +#define DUK_OP_UNUSED237 237 +#define DUK_OP_UNUSED238 238 +#define DUK_OP_UNUSED239 239 +#define DUK_OP_UNUSED240 240 +#define DUK_OP_UNUSED241 241 +#define DUK_OP_UNUSED242 242 +#define DUK_OP_UNUSED243 243 +#define DUK_OP_UNUSED244 244 +#define DUK_OP_UNUSED245 245 +#define DUK_OP_UNUSED246 246 +#define DUK_OP_UNUSED247 247 +#define DUK_OP_UNUSED248 248 +#define DUK_OP_UNUSED249 249 +#define DUK_OP_UNUSED250 250 +#define DUK_OP_UNUSED251 251 +#define DUK_OP_UNUSED252 252 +#define DUK_OP_UNUSED253 253 +#define DUK_OP_UNUSED254 254 +#define DUK_OP_UNUSED255 255 +#define DUK_OP_NONE 256 /* dummy value used as marker (doesn't fit in 8-bit field) */ + +/* XXX: Allocate flags from opcode field? Would take 16 opcode slots + * but avoids shuffling in more cases. Maybe not worth it. + */ +/* DUK_OP_TRYCATCH flags in A. */ +#define DUK_BC_TRYCATCH_FLAG_HAVE_CATCH (1U << 0) +#define DUK_BC_TRYCATCH_FLAG_HAVE_FINALLY (1U << 1) +#define DUK_BC_TRYCATCH_FLAG_CATCH_BINDING (1U << 2) +#define DUK_BC_TRYCATCH_FLAG_WITH_BINDING (1U << 3) + +/* DUK_OP_DECLVAR flags in A; bottom bits are reserved for propdesc flags + * (DUK_PROPDESC_FLAG_XXX). + */ +#define DUK_BC_DECLVAR_FLAG_FUNC_DECL (1U << 4) /* function declaration */ + +/* DUK_OP_CALLn flags, part of opcode field. Three lowest bits must match + * DUK_CALL_FLAG_xxx directly. + */ +#define DUK_BC_CALL_FLAG_TAILCALL (1U << 0) +#define DUK_BC_CALL_FLAG_CONSTRUCT (1U << 1) +#define DUK_BC_CALL_FLAG_CALLED_AS_EVAL (1U << 2) +#define DUK_BC_CALL_FLAG_INDIRECT (1U << 3) + +/* Misc constants and helper macros. */ +#define DUK_BC_LDINT_BIAS (1L << 15) +#define DUK_BC_LDINTX_SHIFT 16 +#define DUK_BC_JUMP_BIAS (1L << 23) + +#endif /* DUK_JS_BYTECODE_H_INCLUDED */ +/* #include duk_lexer.h */ +#line 1 "duk_lexer.h" +/* + * Lexer defines. + */ + +#if !defined(DUK_LEXER_H_INCLUDED) +#define DUK_LEXER_H_INCLUDED + +typedef void (*duk_re_range_callback)(void *user, duk_codepoint_t r1, duk_codepoint_t r2, duk_bool_t direct); + +/* + * A token is interpreted as any possible production of InputElementDiv + * and InputElementRegExp, see E5 Section 7 in its entirety. Note that + * the E5 "Token" production does not cover all actual tokens of the + * language (which is explicitly stated in the specification, Section 7.5). + * Null and boolean literals are defined as part of both ReservedWord + * (E5 Section 7.6.1) and Literal (E5 Section 7.8) productions. Here, + * null and boolean values have literal tokens, and are not reserved + * words. + * + * Decimal literal negative/positive sign is -not- part of DUK_TOK_NUMBER. + * The number tokens always have a non-negative value. The unary minus + * operator in "-1.0" is optimized during compilation to yield a single + * negative constant. + * + * Token numbering is free except that reserved words are required to be + * in a continuous range and in a particular order. See genstrings.py. + */ + +#define DUK_LEXER_INITCTX(ctx) duk_lexer_initctx((ctx)) + +#define DUK_LEXER_SETPOINT(ctx, pt) duk_lexer_setpoint((ctx), (pt)) + +#define DUK_LEXER_GETPOINT(ctx, pt) duk_lexer_getpoint((ctx), (pt)) + +/* Currently 6 characters of lookup are actually needed (duk_lexer.c). */ +#define DUK_LEXER_WINDOW_SIZE 6 +#if defined(DUK_USE_LEXER_SLIDING_WINDOW) +#define DUK_LEXER_BUFFER_SIZE 64 +#endif + +#define DUK_TOK_MINVAL 0 + +/* returned after EOF (infinite amount) */ +#define DUK_TOK_EOF 0 + +/* identifier names (E5 Section 7.6) */ +#define DUK_TOK_IDENTIFIER 1 + +/* reserved words: keywords */ +#define DUK_TOK_START_RESERVED 2 +#define DUK_TOK_BREAK 2 +#define DUK_TOK_CASE 3 +#define DUK_TOK_CATCH 4 +#define DUK_TOK_CONTINUE 5 +#define DUK_TOK_DEBUGGER 6 +#define DUK_TOK_DEFAULT 7 +#define DUK_TOK_DELETE 8 +#define DUK_TOK_DO 9 +#define DUK_TOK_ELSE 10 +#define DUK_TOK_FINALLY 11 +#define DUK_TOK_FOR 12 +#define DUK_TOK_FUNCTION 13 +#define DUK_TOK_IF 14 +#define DUK_TOK_IN 15 +#define DUK_TOK_INSTANCEOF 16 +#define DUK_TOK_NEW 17 +#define DUK_TOK_RETURN 18 +#define DUK_TOK_SWITCH 19 +#define DUK_TOK_THIS 20 +#define DUK_TOK_THROW 21 +#define DUK_TOK_TRY 22 +#define DUK_TOK_TYPEOF 23 +#define DUK_TOK_VAR 24 +#define DUK_TOK_CONST 25 +#define DUK_TOK_VOID 26 +#define DUK_TOK_WHILE 27 +#define DUK_TOK_WITH 28 + +/* reserved words: future reserved words */ +#define DUK_TOK_CLASS 29 +#define DUK_TOK_ENUM 30 +#define DUK_TOK_EXPORT 31 +#define DUK_TOK_EXTENDS 32 +#define DUK_TOK_IMPORT 33 +#define DUK_TOK_SUPER 34 + +/* "null", "true", and "false" are always reserved words. + * Note that "get" and "set" are not! + */ +#define DUK_TOK_NULL 35 +#define DUK_TOK_TRUE 36 +#define DUK_TOK_FALSE 37 + +/* reserved words: additional future reserved words in strict mode */ +#define DUK_TOK_START_STRICT_RESERVED 38 /* inclusive */ +#define DUK_TOK_IMPLEMENTS 38 +#define DUK_TOK_INTERFACE 39 +#define DUK_TOK_LET 40 +#define DUK_TOK_PACKAGE 41 +#define DUK_TOK_PRIVATE 42 +#define DUK_TOK_PROTECTED 43 +#define DUK_TOK_PUBLIC 44 +#define DUK_TOK_STATIC 45 +#define DUK_TOK_YIELD 46 + +#define DUK_TOK_END_RESERVED 47 /* exclusive */ + +/* "get" and "set" are tokens but NOT ReservedWords. They are currently + * parsed and identifiers and these defines are actually now unused. + */ +#define DUK_TOK_GET 47 +#define DUK_TOK_SET 48 + +/* punctuators (unlike the spec, also includes "/" and "/=") */ +#define DUK_TOK_LCURLY 49 +#define DUK_TOK_RCURLY 50 +#define DUK_TOK_LBRACKET 51 +#define DUK_TOK_RBRACKET 52 +#define DUK_TOK_LPAREN 53 +#define DUK_TOK_RPAREN 54 +#define DUK_TOK_PERIOD 55 +#define DUK_TOK_SEMICOLON 56 +#define DUK_TOK_COMMA 57 +#define DUK_TOK_LT 58 +#define DUK_TOK_GT 59 +#define DUK_TOK_LE 60 +#define DUK_TOK_GE 61 +#define DUK_TOK_EQ 62 +#define DUK_TOK_NEQ 63 +#define DUK_TOK_SEQ 64 +#define DUK_TOK_SNEQ 65 +#define DUK_TOK_ADD 66 +#define DUK_TOK_SUB 67 +#define DUK_TOK_MUL 68 +#define DUK_TOK_DIV 69 +#define DUK_TOK_MOD 70 +#define DUK_TOK_EXP 71 +#define DUK_TOK_INCREMENT 72 +#define DUK_TOK_DECREMENT 73 +#define DUK_TOK_ALSHIFT 74 /* named "arithmetic" because result is signed */ +#define DUK_TOK_ARSHIFT 75 +#define DUK_TOK_RSHIFT 76 +#define DUK_TOK_BAND 77 +#define DUK_TOK_BOR 78 +#define DUK_TOK_BXOR 79 +#define DUK_TOK_LNOT 80 +#define DUK_TOK_BNOT 81 +#define DUK_TOK_LAND 82 +#define DUK_TOK_LOR 83 +#define DUK_TOK_QUESTION 84 +#define DUK_TOK_COLON 85 +#define DUK_TOK_EQUALSIGN 86 +#define DUK_TOK_ADD_EQ 87 +#define DUK_TOK_SUB_EQ 88 +#define DUK_TOK_MUL_EQ 89 +#define DUK_TOK_DIV_EQ 90 +#define DUK_TOK_MOD_EQ 91 +#define DUK_TOK_EXP_EQ 92 +#define DUK_TOK_ALSHIFT_EQ 93 +#define DUK_TOK_ARSHIFT_EQ 94 +#define DUK_TOK_RSHIFT_EQ 95 +#define DUK_TOK_BAND_EQ 96 +#define DUK_TOK_BOR_EQ 97 +#define DUK_TOK_BXOR_EQ 98 + +/* literals (E5 Section 7.8), except null, true, false, which are treated + * like reserved words (above). + */ +#define DUK_TOK_NUMBER 99 +#define DUK_TOK_STRING 100 +#define DUK_TOK_REGEXP 101 + +#define DUK_TOK_MAXVAL 101 /* inclusive */ + +#define DUK_TOK_INVALID DUK_SMALL_UINT_MAX + +/* Convert heap string index to a token (reserved words) */ +#define DUK_STRIDX_TO_TOK(x) ((x) -DUK_STRIDX_START_RESERVED + DUK_TOK_START_RESERVED) + +/* Sanity check */ +#if (DUK_TOK_MAXVAL > 255) +#error DUK_TOK_MAXVAL too large, code assumes it fits into 8 bits +#endif + +/* Sanity checks for string and token defines */ +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_BREAK) != DUK_TOK_BREAK) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_CASE) != DUK_TOK_CASE) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_CATCH) != DUK_TOK_CATCH) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_CONTINUE) != DUK_TOK_CONTINUE) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_DEBUGGER) != DUK_TOK_DEBUGGER) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_DEFAULT) != DUK_TOK_DEFAULT) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_DELETE) != DUK_TOK_DELETE) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_DO) != DUK_TOK_DO) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_ELSE) != DUK_TOK_ELSE) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_FINALLY) != DUK_TOK_FINALLY) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_FOR) != DUK_TOK_FOR) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_LC_FUNCTION) != DUK_TOK_FUNCTION) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_IF) != DUK_TOK_IF) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_IN) != DUK_TOK_IN) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_INSTANCEOF) != DUK_TOK_INSTANCEOF) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_NEW) != DUK_TOK_NEW) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_RETURN) != DUK_TOK_RETURN) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_SWITCH) != DUK_TOK_SWITCH) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_THIS) != DUK_TOK_THIS) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_THROW) != DUK_TOK_THROW) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_TRY) != DUK_TOK_TRY) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_TYPEOF) != DUK_TOK_TYPEOF) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_VAR) != DUK_TOK_VAR) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_VOID) != DUK_TOK_VOID) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_WHILE) != DUK_TOK_WHILE) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_WITH) != DUK_TOK_WITH) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_CLASS) != DUK_TOK_CLASS) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_CONST) != DUK_TOK_CONST) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_ENUM) != DUK_TOK_ENUM) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_EXPORT) != DUK_TOK_EXPORT) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_EXTENDS) != DUK_TOK_EXTENDS) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_IMPORT) != DUK_TOK_IMPORT) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_SUPER) != DUK_TOK_SUPER) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_LC_NULL) != DUK_TOK_NULL) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_TRUE) != DUK_TOK_TRUE) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_FALSE) != DUK_TOK_FALSE) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_IMPLEMENTS) != DUK_TOK_IMPLEMENTS) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_INTERFACE) != DUK_TOK_INTERFACE) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_LET) != DUK_TOK_LET) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_PACKAGE) != DUK_TOK_PACKAGE) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_PRIVATE) != DUK_TOK_PRIVATE) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_PROTECTED) != DUK_TOK_PROTECTED) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_PUBLIC) != DUK_TOK_PUBLIC) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_STATIC) != DUK_TOK_STATIC) +#error mismatch in token defines +#endif +#if (DUK_STRIDX_TO_TOK(DUK_STRIDX_YIELD) != DUK_TOK_YIELD) +#error mismatch in token defines +#endif + +/* Regexp tokens */ +#define DUK_RETOK_EOF 0 +#define DUK_RETOK_DISJUNCTION 1 +#define DUK_RETOK_QUANTIFIER 2 +#define DUK_RETOK_ASSERT_START 3 +#define DUK_RETOK_ASSERT_END 4 +#define DUK_RETOK_ASSERT_WORD_BOUNDARY 5 +#define DUK_RETOK_ASSERT_NOT_WORD_BOUNDARY 6 +#define DUK_RETOK_ASSERT_START_POS_LOOKAHEAD 7 +#define DUK_RETOK_ASSERT_START_NEG_LOOKAHEAD 8 +#define DUK_RETOK_ATOM_PERIOD 9 +#define DUK_RETOK_ATOM_CHAR 10 +#define DUK_RETOK_ATOM_DIGIT 11 /* assumptions in regexp compiler */ +#define DUK_RETOK_ATOM_NOT_DIGIT 12 /* -""- */ +#define DUK_RETOK_ATOM_WHITE 13 /* -""- */ +#define DUK_RETOK_ATOM_NOT_WHITE 14 /* -""- */ +#define DUK_RETOK_ATOM_WORD_CHAR 15 /* -""- */ +#define DUK_RETOK_ATOM_NOT_WORD_CHAR 16 /* -""- */ +#define DUK_RETOK_ATOM_BACKREFERENCE 17 +#define DUK_RETOK_ATOM_START_CAPTURE_GROUP 18 +#define DUK_RETOK_ATOM_START_NONCAPTURE_GROUP 19 +#define DUK_RETOK_ATOM_START_CHARCLASS 20 +#define DUK_RETOK_ATOM_START_CHARCLASS_INVERTED 21 +#define DUK_RETOK_ATOM_END_GROUP 22 + +/* Constants for duk_lexer_ctx.buf. */ +#define DUK_LEXER_TEMP_BUF_LIMIT 256 + +/* A token value. Can be memcpy()'d, but note that slot1/slot2 values are on the valstack. + * Some fields (like num, str1, str2) are only valid for specific token types and may have + * stale values otherwise. + */ +struct duk_token { + duk_small_uint_t t; /* token type (with reserved word identification) */ + duk_small_uint_t t_nores; /* token type (with reserved words as DUK_TOK_IDENTIFER) */ + duk_double_t num; /* numeric value of token */ + duk_hstring *str1; /* string 1 of token (borrowed, stored to ctx->slot1_idx) */ + duk_hstring *str2; /* string 2 of token (borrowed, stored to ctx->slot2_idx) */ + duk_size_t start_offset; /* start byte offset of token in lexer input */ + duk_int_t start_line; /* start line of token (first char) */ + duk_int_t num_escapes; /* number of escapes and line continuations (for directive prologue) */ + duk_bool_t lineterm; /* token was preceded by a lineterm */ + duk_bool_t allow_auto_semi; /* token allows automatic semicolon insertion (eof or preceded by newline) */ +}; + +#define DUK_RE_QUANTIFIER_INFINITE ((duk_uint32_t) 0xffffffffUL) + +/* A regexp token value. */ +struct duk_re_token { + duk_small_uint_t t; /* token type */ + duk_small_uint_t greedy; + duk_uint32_t num; /* numeric value (character, count) */ + duk_uint32_t qmin; + duk_uint32_t qmax; +}; + +/* A structure for 'snapshotting' a point for rewinding */ +struct duk_lexer_point { + duk_size_t offset; + duk_int_t line; +}; + +/* Lexer codepoint with additional info like offset/line number */ +struct duk_lexer_codepoint { + duk_codepoint_t codepoint; + duk_size_t offset; + duk_int_t line; +}; + +/* Lexer context. Same context is used for ECMAScript and Regexp parsing. */ +struct duk_lexer_ctx { +#if defined(DUK_USE_LEXER_SLIDING_WINDOW) + duk_lexer_codepoint *window; /* unicode code points, window[0] is always next, points to 'buffer' */ + duk_lexer_codepoint buffer[DUK_LEXER_BUFFER_SIZE]; +#else + duk_lexer_codepoint window[DUK_LEXER_WINDOW_SIZE]; /* unicode code points, window[0] is always next */ +#endif + + duk_hthread *thr; /* thread; minimizes argument passing */ + + const duk_uint8_t *input; /* input string (may be a user pointer) */ + duk_size_t input_length; /* input byte length */ + duk_size_t input_offset; /* input offset for window leading edge (not window[0]) */ + duk_int_t input_line; /* input linenumber at input_offset (not window[0]), init to 1 */ + + duk_idx_t slot1_idx; /* valstack slot for 1st token value */ + duk_idx_t slot2_idx; /* valstack slot for 2nd token value */ + duk_idx_t buf_idx; /* valstack slot for temp buffer */ + duk_hbuffer_dynamic *buf; /* temp accumulation buffer */ + duk_bufwriter_ctx bw; /* bufwriter for temp accumulation */ + + duk_int_t token_count; /* number of tokens parsed */ + duk_int_t token_limit; /* maximum token count before error (sanity backstop) */ + + duk_small_uint_t flags; /* lexer flags, use compiler flag defines for now */ +}; + +/* + * Prototypes + */ + +DUK_INTERNAL_DECL void duk_lexer_initctx(duk_lexer_ctx *lex_ctx); + +DUK_INTERNAL_DECL void duk_lexer_getpoint(duk_lexer_ctx *lex_ctx, duk_lexer_point *pt); +DUK_INTERNAL_DECL void duk_lexer_setpoint(duk_lexer_ctx *lex_ctx, duk_lexer_point *pt); + +DUK_INTERNAL_DECL +void duk_lexer_parse_js_input_element(duk_lexer_ctx *lex_ctx, duk_token *out_token, duk_bool_t strict_mode, duk_bool_t regexp_mode); +#if defined(DUK_USE_REGEXP_SUPPORT) +DUK_INTERNAL_DECL void duk_lexer_parse_re_token(duk_lexer_ctx *lex_ctx, duk_re_token *out_token); +DUK_INTERNAL_DECL void duk_lexer_parse_re_ranges(duk_lexer_ctx *lex_ctx, duk_re_range_callback gen_range, void *userdata); +#endif /* DUK_USE_REGEXP_SUPPORT */ + +#endif /* DUK_LEXER_H_INCLUDED */ +/* #include duk_js_compiler.h */ +#line 1 "duk_js_compiler.h" +/* + * ECMAScript compiler. + */ + +#if !defined(DUK_JS_COMPILER_H_INCLUDED) +#define DUK_JS_COMPILER_H_INCLUDED + +/* ECMAScript compiler limits */ +#define DUK_COMPILER_TOKEN_LIMIT 100000000L /* 1e8: protects against deeply nested inner functions */ + +/* maximum loopcount for peephole optimization */ +#define DUK_COMPILER_PEEPHOLE_MAXITER 3 + +/* maximum bytecode length in instructions */ +#define DUK_COMPILER_MAX_BYTECODE_LENGTH (256L * 1024L * 1024L) /* 1 GB */ + +/* + * Compiler intermediate values + * + * Intermediate values describe either plain values (e.g. strings or + * numbers) or binary operations which have not yet been coerced into + * either a left-hand-side or right-hand-side role (e.g. object property). + */ + +#define DUK_IVAL_NONE 0 /* no value */ +#define DUK_IVAL_PLAIN 1 /* register, constant, or value */ +#define DUK_IVAL_ARITH 2 /* binary arithmetic; DUK_OP_ADD, DUK_OP_EQ, other binary ops */ +#define DUK_IVAL_PROP 3 /* property access */ +#define DUK_IVAL_VAR 4 /* variable access */ + +#define DUK_ISPEC_NONE 0 /* no value */ +#define DUK_ISPEC_VALUE 1 /* value resides in 'valstack_idx' */ +#define DUK_ISPEC_REGCONST 2 /* value resides in a register or constant */ + +/* Bit mask which indicates that a regconst is a constant instead of a register. + * Chosen so that when a regconst is cast to duk_int32_t, all consts are + * negative values. + */ +#define DUK_REGCONST_CONST_MARKER DUK_INT32_MIN /* = -0x80000000 */ + +/* Type to represent a reg/const reference during compilation, with <0 + * indicating a constant. Some call sites also use -1 to indicate 'none'. + */ +typedef duk_int32_t duk_regconst_t; + +typedef struct { + duk_small_uint_t t; /* DUK_ISPEC_XXX */ + duk_regconst_t regconst; + duk_idx_t valstack_idx; /* always set; points to a reserved valstack slot */ +} duk_ispec; + +typedef struct { + /* + * PLAIN: x1 + * ARITH: x1 x2 + * PROP: x1.x2 + * VAR: x1 (name) + */ + + /* XXX: can be optimized for smaller footprint esp. on 32-bit environments */ + duk_small_uint_t t; /* DUK_IVAL_XXX */ + duk_small_uint_t op; /* bytecode opcode for binary ops */ + duk_ispec x1; + duk_ispec x2; +} duk_ivalue; + +/* + * Bytecode instruction representation during compilation + * + * Contains the actual instruction and (optionally) debug info. + */ + +struct duk_compiler_instr { + duk_instr_t ins; +#if defined(DUK_USE_PC2LINE) + duk_uint32_t line; +#endif +}; + +/* + * Compiler state + */ + +#define DUK_LABEL_FLAG_ALLOW_BREAK (1U << 0) +#define DUK_LABEL_FLAG_ALLOW_CONTINUE (1U << 1) + +#define DUK_DECL_TYPE_VAR 0 +#define DUK_DECL_TYPE_FUNC 1 + +/* XXX: optimize to 16 bytes */ +typedef struct { + duk_small_uint_t flags; + duk_int_t label_id; /* numeric label_id (-1 reserved as marker) */ + duk_hstring *h_label; /* borrowed label name */ + duk_int_t catch_depth; /* catch depth at point of definition */ + duk_int_t pc_label; /* pc of label statement: + * pc+1: break jump site + * pc+2: continue jump site + */ + + /* Fast jumps (which avoid longjmp) jump directly to the jump sites + * which are always known even while the iteration/switch statement + * is still being parsed. A final peephole pass "straightens out" + * the jumps. + */ +} duk_labelinfo; + +/* Compiling state of one function, eventually converted to duk_hcompfunc */ +struct duk_compiler_func { + /* These pointers are at the start of the struct so that they pack + * nicely. Mixing pointers and integer values is bad on some + * platforms (e.g. if int is 32 bits and pointers are 64 bits). + */ + + duk_bufwriter_ctx bw_code; /* bufwriter for code */ + + duk_hstring *h_name; /* function name (borrowed reference), ends up in _name */ + /* h_code: held in bw_code */ + duk_hobject *h_consts; /* array */ + duk_hobject *h_funcs; /* array of function templates: [func1, offset1, line1, func2, offset2, line2] + * offset/line points to closing brace to allow skipping on pass 2 + */ + duk_hobject *h_decls; /* array of declarations: [ name1, val1, name2, val2, ... ] + * valN = (typeN) | (fnum << 8), where fnum is inner func number (0 for vars) + * record function and variable declarations in pass 1 + */ + duk_hobject *h_labelnames; /* array of active label names */ + duk_hbuffer_dynamic *h_labelinfos; /* C array of duk_labelinfo */ + duk_hobject *h_argnames; /* array of formal argument names (-> _Formals) */ + duk_hobject *h_varmap; /* variable map for pass 2 (identifier -> register number or null (unmapped)) */ + + /* Value stack indices for tracking objects. */ + /* code_idx: not needed */ + duk_idx_t consts_idx; + duk_idx_t funcs_idx; + duk_idx_t decls_idx; + duk_idx_t labelnames_idx; + duk_idx_t labelinfos_idx; + duk_idx_t argnames_idx; + duk_idx_t varmap_idx; + + /* Temp reg handling. */ + duk_regconst_t temp_first; /* first register that is a temporary (below: variables) */ + duk_regconst_t temp_next; /* next temporary register to allocate */ + duk_regconst_t temp_max; /* highest value of temp_reg (temp_max - 1 is highest used reg) */ + + /* Shuffle registers if large number of regs/consts. */ + duk_regconst_t shuffle1; + duk_regconst_t shuffle2; + duk_regconst_t shuffle3; + + /* Stats for current expression being parsed. */ + duk_int_t nud_count; + duk_int_t led_count; + duk_int_t paren_level; /* parenthesis count, 0 = top level */ + duk_bool_t expr_lhs; /* expression is left-hand-side compatible */ + duk_bool_t allow_in; /* current paren level allows 'in' token */ + + /* Misc. */ + duk_int_t stmt_next; /* statement id allocation (running counter) */ + duk_int_t label_next; /* label id allocation (running counter) */ + duk_int_t catch_depth; /* catch stack depth */ + duk_int_t with_depth; /* with stack depth (affects identifier lookups) */ + duk_int_t fnum_next; /* inner function numbering */ + duk_int_t num_formals; /* number of formal arguments */ + duk_regconst_t + reg_stmt_value; /* register for writing value of 'non-empty' statements (global or eval code), -1 is marker */ +#if defined(DUK_USE_DEBUGGER_SUPPORT) + duk_int_t min_line; /* XXX: typing (duk_hcompfunc has duk_uint32_t) */ + duk_int_t max_line; +#endif + + /* Status booleans. */ + duk_uint8_t is_function; /* is an actual function (not global/eval code) */ + duk_uint8_t is_eval; /* is eval code */ + duk_uint8_t is_global; /* is global code */ + duk_uint8_t is_namebinding; /* needs a name binding */ + duk_uint8_t is_constructable; /* result is constructable */ + duk_uint8_t is_setget; /* is a setter/getter */ + duk_uint8_t is_strict; /* function is strict */ + duk_uint8_t is_notail; /* function must not be tail called */ + duk_uint8_t in_directive_prologue; /* parsing in "directive prologue", recognize directives */ + duk_uint8_t in_scanning; /* parsing in "scanning" phase (first pass) */ + duk_uint8_t may_direct_eval; /* function may call direct eval */ + duk_uint8_t id_access_arguments; /* function refers to 'arguments' identifier */ + duk_uint8_t id_access_slow; /* function makes one or more slow path accesses that won't match own static variables */ + duk_uint8_t id_access_slow_own; /* function makes one or more slow path accesses that may match own static variables */ + duk_uint8_t is_arguments_shadowed; /* argument/function declaration shadows 'arguments' */ + duk_uint8_t needs_shuffle; /* function needs shuffle registers */ + duk_uint8_t + reject_regexp_in_adv; /* reject RegExp literal on next advance() call; needed for handling IdentifierName productions */ + duk_uint8_t allow_regexp_in_adv; /* allow RegExp literal on next advance() call */ +}; + +struct duk_compiler_ctx { + duk_hthread *thr; + + /* filename being compiled (ends up in functions' '_filename' property) */ + duk_hstring *h_filename; /* borrowed reference */ + + /* lexing (tokenization) state (contains two valstack slot indices) */ + duk_lexer_ctx lex; + + /* current and previous token for parsing */ + duk_token prev_token; + duk_token curr_token; + duk_idx_t tok11_idx; /* curr_token slot1 (matches 'lex' slot1_idx) */ + duk_idx_t tok12_idx; /* curr_token slot2 (matches 'lex' slot2_idx) */ + duk_idx_t tok21_idx; /* prev_token slot1 */ + duk_idx_t tok22_idx; /* prev_token slot2 */ + + /* recursion limit */ + duk_int_t recursion_depth; + duk_int_t recursion_limit; + + /* code emission temporary */ + duk_int_t emit_jumpslot_pc; + + /* current function being compiled (embedded instead of pointer for more compact access) */ + duk_compiler_func curr_func; +}; + +/* + * Prototypes + */ + +DUK_INTERNAL_DECL void duk_js_compile(duk_hthread *thr, + const duk_uint8_t *src_buffer, + duk_size_t src_length, + duk_small_uint_t flags); + +#endif /* DUK_JS_COMPILER_H_INCLUDED */ +/* #include duk_regexp.h */ +#line 1 "duk_regexp.h" +/* + * Regular expression structs, constants, and bytecode defines. + */ + +#if !defined(DUK_REGEXP_H_INCLUDED) +#define DUK_REGEXP_H_INCLUDED + +/* maximum bytecode copies for {n,m} quantifiers */ +#define DUK_RE_MAX_ATOM_COPIES 1000 + +/* regexp compilation limits */ +#define DUK_RE_COMPILE_TOKEN_LIMIT 100000000L /* 1e8 */ + +/* regexp execution limits */ +#define DUK_RE_EXECUTE_STEPS_LIMIT 1000000000L /* 1e9 */ + +/* regexp opcodes */ +#define DUK_REOP_MATCH 1 +#define DUK_REOP_CHAR 2 +#define DUK_REOP_PERIOD 3 +#define DUK_REOP_RANGES 4 +#define DUK_REOP_INVRANGES 5 +#define DUK_REOP_JUMP 6 +#define DUK_REOP_SPLIT1 7 +#define DUK_REOP_SPLIT2 8 +#define DUK_REOP_SQMINIMAL 9 +#define DUK_REOP_SQGREEDY 10 +#define DUK_REOP_SAVE 11 +#define DUK_REOP_WIPERANGE 12 +#define DUK_REOP_LOOKPOS 13 +#define DUK_REOP_LOOKNEG 14 +#define DUK_REOP_BACKREFERENCE 15 +#define DUK_REOP_ASSERT_START 16 +#define DUK_REOP_ASSERT_END 17 +#define DUK_REOP_ASSERT_WORD_BOUNDARY 18 +#define DUK_REOP_ASSERT_NOT_WORD_BOUNDARY 19 + +/* flags */ +#define DUK_RE_FLAG_GLOBAL (1U << 0) +#define DUK_RE_FLAG_IGNORE_CASE (1U << 1) +#define DUK_RE_FLAG_MULTILINE (1U << 2) + +struct duk_re_matcher_ctx { + duk_hthread *thr; + + duk_uint32_t re_flags; + const duk_uint8_t *input; + const duk_uint8_t *input_end; + const duk_uint8_t *bytecode; + const duk_uint8_t *bytecode_end; + const duk_uint8_t **saved; /* allocated from valstack (fixed buffer) */ + duk_uint32_t nsaved; + duk_uint32_t recursion_depth; + duk_uint32_t recursion_limit; + duk_uint32_t steps_count; + duk_uint32_t steps_limit; +}; + +struct duk_re_compiler_ctx { + duk_hthread *thr; + + duk_uint32_t re_flags; + duk_lexer_ctx lex; + duk_re_token curr_token; + duk_bufwriter_ctx bw; + duk_uint32_t captures; /* highest capture number emitted so far (used as: ++captures) */ + duk_uint32_t highest_backref; + duk_uint32_t recursion_depth; + duk_uint32_t recursion_limit; + duk_uint32_t nranges; /* internal temporary value, used for char classes */ +}; + +/* + * Prototypes + */ + +#if defined(DUK_USE_REGEXP_SUPPORT) +DUK_INTERNAL_DECL void duk_regexp_compile(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_regexp_create_instance(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_regexp_match(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_regexp_match_force_global(duk_hthread *thr); /* hacky helper for String.prototype.split() */ +#endif + +#endif /* DUK_REGEXP_H_INCLUDED */ +/* #include duk_heaphdr.h */ +#line 1 "duk_heaphdr.h" +/* + * Heap header definition and assorted macros, including ref counting. + * Access all fields through the accessor macros. + */ + +#if !defined(DUK_HEAPHDR_H_INCLUDED) +#define DUK_HEAPHDR_H_INCLUDED + +/* + * Common heap header + * + * All heap objects share the same flags and refcount fields. Objects other + * than strings also need to have a single or double linked list pointers + * for insertion into the "heap allocated" list. Strings have single linked + * list pointers for string table chaining. + * + * Technically, 'h_refcount' must be wide enough to guarantee that it cannot + * wrap; otherwise objects might be freed incorrectly after wrapping. The + * default refcount field is 32 bits even on 64-bit systems: while that's in + * theory incorrect, the Duktape heap needs to be larger than 64GB for the + * count to actually wrap (assuming 16-byte duk_tvals). This is very unlikely + * to ever be an issue, but if it is, disabling DUK_USE_REFCOUNT32 causes + * Duktape to use size_t for refcounts which should always be safe. + * + * Heap header size on 32-bit platforms: 8 bytes without reference counting, + * 16 bytes with reference counting. + * + * Note that 'raw' macros such as DUK_HEAPHDR_GET_REFCOUNT() are not + * defined without DUK_USE_REFERENCE_COUNTING, so caller must #if defined() + * around them. + */ + +/* XXX: macro for shared header fields (avoids some padding issues) */ + +struct duk_heaphdr { + duk_uint32_t h_flags; + +#if defined(DUK_USE_REFERENCE_COUNTING) +#if defined(DUK_USE_ASSERTIONS) + /* When assertions enabled, used by mark-and-sweep for refcount + * validation. Largest reasonable type; also detects overflows. + */ + duk_size_t h_assert_refcount; +#endif +#if defined(DUK_USE_REFCOUNT16) + duk_uint16_t h_refcount; +#elif defined(DUK_USE_REFCOUNT32) + duk_uint32_t h_refcount; +#else + duk_size_t h_refcount; +#endif +#endif /* DUK_USE_REFERENCE_COUNTING */ + +#if defined(DUK_USE_HEAPPTR16) + duk_uint16_t h_next16; +#else + duk_heaphdr *h_next; +#endif + +#if defined(DUK_USE_DOUBLE_LINKED_HEAP) + /* refcounting requires direct heap frees, which in turn requires a dual linked heap */ +#if defined(DUK_USE_HEAPPTR16) + duk_uint16_t h_prev16; +#else + duk_heaphdr *h_prev; +#endif +#endif + + /* When DUK_USE_HEAPPTR16 (and DUK_USE_REFCOUNT16) is in use, the + * struct won't align nicely to 4 bytes. This 16-bit extra field + * is added to make the alignment clean; the field can be used by + * heap objects when 16-bit packing is used. This field is now + * conditional to DUK_USE_HEAPPTR16 only, but it is intended to be + * used with DUK_USE_REFCOUNT16 and DUK_USE_DOUBLE_LINKED_HEAP; + * this only matter to low memory environments anyway. + */ +#if defined(DUK_USE_HEAPPTR16) + duk_uint16_t h_extra16; +#endif +}; + +struct duk_heaphdr_string { + /* 16 bits would be enough for shared heaphdr flags and duk_hstring + * flags. The initial parts of duk_heaphdr_string and duk_heaphdr + * must match so changing the flags field size here would be quite + * awkward. However, to minimize struct size, we can pack at least + * 16 bits of duk_hstring data into the flags field. + */ + duk_uint32_t h_flags; + +#if defined(DUK_USE_REFERENCE_COUNTING) +#if defined(DUK_USE_ASSERTIONS) + /* When assertions enabled, used by mark-and-sweep for refcount + * validation. Largest reasonable type; also detects overflows. + */ + duk_size_t h_assert_refcount; +#endif +#if defined(DUK_USE_REFCOUNT16) + duk_uint16_t h_refcount; + duk_uint16_t h_strextra16; /* round out to 8 bytes */ +#elif defined(DUK_USE_REFCOUNT32) + duk_uint32_t h_refcount; +#else + duk_size_t h_refcount; +#endif +#else + duk_uint16_t h_strextra16; +#endif /* DUK_USE_REFERENCE_COUNTING */ + + duk_hstring *h_next; + /* No 'h_prev' pointer for strings. */ +}; + +#define DUK_HEAPHDR_FLAGS_TYPE_MASK 0x00000003UL +#define DUK_HEAPHDR_FLAGS_FLAG_MASK (~DUK_HEAPHDR_FLAGS_TYPE_MASK) + +/* 2 bits for heap type */ +#define DUK_HEAPHDR_FLAGS_HEAP_START 2 /* 5 heap flags */ +#define DUK_HEAPHDR_FLAGS_USER_START 7 /* 25 user flags */ + +#define DUK_HEAPHDR_HEAP_FLAG_NUMBER(n) (DUK_HEAPHDR_FLAGS_HEAP_START + (n)) +#define DUK_HEAPHDR_USER_FLAG_NUMBER(n) (DUK_HEAPHDR_FLAGS_USER_START + (n)) +#define DUK_HEAPHDR_HEAP_FLAG(n) (1UL << (DUK_HEAPHDR_FLAGS_HEAP_START + (n))) +#define DUK_HEAPHDR_USER_FLAG(n) (1UL << (DUK_HEAPHDR_FLAGS_USER_START + (n))) + +#define DUK_HEAPHDR_FLAG_REACHABLE DUK_HEAPHDR_HEAP_FLAG(0) /* mark-and-sweep: reachable */ +#define DUK_HEAPHDR_FLAG_TEMPROOT DUK_HEAPHDR_HEAP_FLAG(1) /* mark-and-sweep: children not processed */ +#define DUK_HEAPHDR_FLAG_FINALIZABLE DUK_HEAPHDR_HEAP_FLAG(2) /* mark-and-sweep: finalizable (on current pass) */ +#define DUK_HEAPHDR_FLAG_FINALIZED DUK_HEAPHDR_HEAP_FLAG(3) /* mark-and-sweep: finalized (on previous pass) */ +#define DUK_HEAPHDR_FLAG_READONLY DUK_HEAPHDR_HEAP_FLAG(4) /* read-only object, in code section */ + +#define DUK_HTYPE_MIN 0 +#define DUK_HTYPE_STRING 0 +#define DUK_HTYPE_OBJECT 1 +#define DUK_HTYPE_BUFFER 2 +#define DUK_HTYPE_MAX 2 + +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HEAPHDR_GET_NEXT(heap, h) ((duk_heaphdr *) DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, (h)->h_next16)) +#define DUK_HEAPHDR_SET_NEXT(heap, h, val) \ + do { \ + (h)->h_next16 = DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (void *) val); \ + } while (0) +#else +#define DUK_HEAPHDR_GET_NEXT(heap, h) ((h)->h_next) +#define DUK_HEAPHDR_SET_NEXT(heap, h, val) \ + do { \ + (h)->h_next = (val); \ + } while (0) +#endif + +#if defined(DUK_USE_DOUBLE_LINKED_HEAP) +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HEAPHDR_GET_PREV(heap, h) ((duk_heaphdr *) DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, (h)->h_prev16)) +#define DUK_HEAPHDR_SET_PREV(heap, h, val) \ + do { \ + (h)->h_prev16 = DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (void *) (val)); \ + } while (0) +#else +#define DUK_HEAPHDR_GET_PREV(heap, h) ((h)->h_prev) +#define DUK_HEAPHDR_SET_PREV(heap, h, val) \ + do { \ + (h)->h_prev = (val); \ + } while (0) +#endif +#endif + +#if defined(DUK_USE_REFERENCE_COUNTING) +#define DUK_HEAPHDR_GET_REFCOUNT(h) ((h)->h_refcount) +#define DUK_HEAPHDR_SET_REFCOUNT(h, val) \ + do { \ + (h)->h_refcount = (val); \ + DUK_ASSERT((h)->h_refcount == (val)); /* No truncation. */ \ + } while (0) +#define DUK_HEAPHDR_PREINC_REFCOUNT(h) (++(h)->h_refcount) /* result: updated refcount */ +#define DUK_HEAPHDR_PREDEC_REFCOUNT(h) (--(h)->h_refcount) /* result: updated refcount */ +#else +/* refcount macros not defined without refcounting, caller must #if defined() now */ +#endif /* DUK_USE_REFERENCE_COUNTING */ + +/* + * Note: type is treated as a field separate from flags, so some masking is + * involved in the macros below. + */ + +#define DUK_HEAPHDR_GET_FLAGS_RAW(h) ((h)->h_flags) +#define DUK_HEAPHDR_SET_FLAGS_RAW(h, val) \ + do { \ + (h)->h_flags = (val); \ + } \ + } +#define DUK_HEAPHDR_GET_FLAGS(h) ((h)->h_flags & DUK_HEAPHDR_FLAGS_FLAG_MASK) +#define DUK_HEAPHDR_SET_FLAGS(h, val) \ + do { \ + (h)->h_flags = ((h)->h_flags & ~(DUK_HEAPHDR_FLAGS_FLAG_MASK)) | (val); \ + } while (0) +#define DUK_HEAPHDR_GET_TYPE(h) ((h)->h_flags & DUK_HEAPHDR_FLAGS_TYPE_MASK) +#define DUK_HEAPHDR_SET_TYPE(h, val) \ + do { \ + (h)->h_flags = ((h)->h_flags & ~(DUK_HEAPHDR_FLAGS_TYPE_MASK)) | (val); \ + } while (0) + +/* Comparison for type >= DUK_HTYPE_MIN skipped; because DUK_HTYPE_MIN is zero + * and the comparison is unsigned, it's always true and generates warnings. + */ +#define DUK_HEAPHDR_HTYPE_VALID(h) (DUK_HEAPHDR_GET_TYPE((h)) <= DUK_HTYPE_MAX) + +#define DUK_HEAPHDR_SET_TYPE_AND_FLAGS(h, tval, fval) \ + do { \ + (h)->h_flags = ((tval) &DUK_HEAPHDR_FLAGS_TYPE_MASK) | ((fval) &DUK_HEAPHDR_FLAGS_FLAG_MASK); \ + } while (0) + +#define DUK_HEAPHDR_SET_FLAG_BITS(h, bits) \ + do { \ + DUK_ASSERT(((bits) & ~(DUK_HEAPHDR_FLAGS_FLAG_MASK)) == 0); \ + (h)->h_flags |= (bits); \ + } while (0) + +#define DUK_HEAPHDR_CLEAR_FLAG_BITS(h, bits) \ + do { \ + DUK_ASSERT(((bits) & ~(DUK_HEAPHDR_FLAGS_FLAG_MASK)) == 0); \ + (h)->h_flags &= ~((bits)); \ + } while (0) + +#define DUK_HEAPHDR_CHECK_FLAG_BITS(h, bits) (((h)->h_flags & (bits)) != 0) + +#define DUK_HEAPHDR_SET_REACHABLE(h) DUK_HEAPHDR_SET_FLAG_BITS((h), DUK_HEAPHDR_FLAG_REACHABLE) +#define DUK_HEAPHDR_CLEAR_REACHABLE(h) DUK_HEAPHDR_CLEAR_FLAG_BITS((h), DUK_HEAPHDR_FLAG_REACHABLE) +#define DUK_HEAPHDR_HAS_REACHABLE(h) DUK_HEAPHDR_CHECK_FLAG_BITS((h), DUK_HEAPHDR_FLAG_REACHABLE) + +#define DUK_HEAPHDR_SET_TEMPROOT(h) DUK_HEAPHDR_SET_FLAG_BITS((h), DUK_HEAPHDR_FLAG_TEMPROOT) +#define DUK_HEAPHDR_CLEAR_TEMPROOT(h) DUK_HEAPHDR_CLEAR_FLAG_BITS((h), DUK_HEAPHDR_FLAG_TEMPROOT) +#define DUK_HEAPHDR_HAS_TEMPROOT(h) DUK_HEAPHDR_CHECK_FLAG_BITS((h), DUK_HEAPHDR_FLAG_TEMPROOT) + +#define DUK_HEAPHDR_SET_FINALIZABLE(h) DUK_HEAPHDR_SET_FLAG_BITS((h), DUK_HEAPHDR_FLAG_FINALIZABLE) +#define DUK_HEAPHDR_CLEAR_FINALIZABLE(h) DUK_HEAPHDR_CLEAR_FLAG_BITS((h), DUK_HEAPHDR_FLAG_FINALIZABLE) +#define DUK_HEAPHDR_HAS_FINALIZABLE(h) DUK_HEAPHDR_CHECK_FLAG_BITS((h), DUK_HEAPHDR_FLAG_FINALIZABLE) + +#define DUK_HEAPHDR_SET_FINALIZED(h) DUK_HEAPHDR_SET_FLAG_BITS((h), DUK_HEAPHDR_FLAG_FINALIZED) +#define DUK_HEAPHDR_CLEAR_FINALIZED(h) DUK_HEAPHDR_CLEAR_FLAG_BITS((h), DUK_HEAPHDR_FLAG_FINALIZED) +#define DUK_HEAPHDR_HAS_FINALIZED(h) DUK_HEAPHDR_CHECK_FLAG_BITS((h), DUK_HEAPHDR_FLAG_FINALIZED) + +#define DUK_HEAPHDR_SET_READONLY(h) DUK_HEAPHDR_SET_FLAG_BITS((h), DUK_HEAPHDR_FLAG_READONLY) +#define DUK_HEAPHDR_CLEAR_READONLY(h) DUK_HEAPHDR_CLEAR_FLAG_BITS((h), DUK_HEAPHDR_FLAG_READONLY) +#define DUK_HEAPHDR_HAS_READONLY(h) DUK_HEAPHDR_CHECK_FLAG_BITS((h), DUK_HEAPHDR_FLAG_READONLY) + +/* get or set a range of flags; m=first bit number, n=number of bits */ +#define DUK_HEAPHDR_GET_FLAG_RANGE(h, m, n) (((h)->h_flags >> (m)) & ((1UL << (n)) - 1UL)) + +#define DUK_HEAPHDR_SET_FLAG_RANGE(h, m, n, v) \ + do { \ + (h)->h_flags = ((h)->h_flags & (~(((1UL << (n)) - 1UL) << (m)))) | ((v) << (m)); \ + } while (0) + +/* init pointer fields to null */ +#if defined(DUK_USE_DOUBLE_LINKED_HEAP) +#define DUK_HEAPHDR_INIT_NULLS(h) \ + do { \ + DUK_HEAPHDR_SET_NEXT((h), (void *) NULL); \ + DUK_HEAPHDR_SET_PREV((h), (void *) NULL); \ + } while (0) +#else +#define DUK_HEAPHDR_INIT_NULLS(h) \ + do { \ + DUK_HEAPHDR_SET_NEXT((h), (void *) NULL); \ + } while (0) +#endif + +#define DUK_HEAPHDR_STRING_INIT_NULLS(h) \ + do { \ + (h)->h_next = NULL; \ + } while (0) + +/* + * Type tests + */ + +/* Take advantage of the fact that for DUK_HTYPE_xxx numbers the lowest bit + * is only set for DUK_HTYPE_OBJECT (= 1). + */ +#if 0 +#define DUK_HEAPHDR_IS_OBJECT(h) (DUK_HEAPHDR_GET_TYPE((h)) == DUK_HTYPE_OBJECT) +#endif +#define DUK_HEAPHDR_IS_OBJECT(h) ((h)->h_flags & 0x01UL) +#define DUK_HEAPHDR_IS_STRING(h) (DUK_HEAPHDR_GET_TYPE((h)) == DUK_HTYPE_STRING) +#define DUK_HEAPHDR_IS_BUFFER(h) (DUK_HEAPHDR_GET_TYPE((h)) == DUK_HTYPE_BUFFER) + +/* + * Assert helpers + */ + +/* Check that prev/next links are consistent: if e.g. h->prev is != NULL, + * h->prev->next should point back to h. + */ +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_heaphdr_assert_valid_subclassed(duk_heaphdr *h); +DUK_INTERNAL_DECL void duk_heaphdr_assert_links(duk_heap *heap, duk_heaphdr *h); +DUK_INTERNAL_DECL void duk_heaphdr_assert_valid(duk_heaphdr *h); +#define DUK_HEAPHDR_ASSERT_LINKS(heap, h) \ + do { \ + duk_heaphdr_assert_links((heap), (h)); \ + } while (0) +#define DUK_HEAPHDR_ASSERT_VALID(h) \ + do { \ + duk_heaphdr_assert_valid((h)); \ + } while (0) +#else +#define DUK_HEAPHDR_ASSERT_LINKS(heap, h) \ + do { \ + } while (0) +#define DUK_HEAPHDR_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +#endif /* DUK_HEAPHDR_H_INCLUDED */ +/* #include duk_refcount.h */ +#line 1 "duk_refcount.h" +/* + * Reference counting helper macros. The macros take a thread argument + * and must thus always be executed in a specific thread context. The + * thread argument is not really needed anymore: DECREF can operate with + * a heap pointer only, and INCREF needs neither. + */ + +#if !defined(DUK_REFCOUNT_H_INCLUDED) +#define DUK_REFCOUNT_H_INCLUDED + +#if defined(DUK_USE_REFERENCE_COUNTING) + +#if defined(DUK_USE_ROM_OBJECTS) +/* With ROM objects "needs refcount update" is true when the value is + * heap allocated and is not a ROM object. + */ +/* XXX: double evaluation for 'tv' argument. */ +#define DUK_TVAL_NEEDS_REFCOUNT_UPDATE(tv) \ + (DUK_TVAL_IS_HEAP_ALLOCATED((tv)) && !DUK_HEAPHDR_HAS_READONLY(DUK_TVAL_GET_HEAPHDR((tv)))) +#define DUK_HEAPHDR_NEEDS_REFCOUNT_UPDATE(h) (!DUK_HEAPHDR_HAS_READONLY((h))) +#else /* DUK_USE_ROM_OBJECTS */ +/* Without ROM objects "needs refcount update" == is heap allocated. */ +#define DUK_TVAL_NEEDS_REFCOUNT_UPDATE(tv) DUK_TVAL_IS_HEAP_ALLOCATED((tv)) +#define DUK_HEAPHDR_NEEDS_REFCOUNT_UPDATE(h) 1 +#endif /* DUK_USE_ROM_OBJECTS */ + +/* Fast variants, inline refcount operations except for refzero handling. + * Can be used explicitly when speed is always more important than size. + * For a good compiler and a single file build, these are basically the + * same as a forced inline. + */ +#define DUK_TVAL_INCREF_FAST(thr, tv) \ + do { \ + duk_tval *duk__tv = (tv); \ + DUK_ASSERT(duk__tv != NULL); \ + if (DUK_TVAL_NEEDS_REFCOUNT_UPDATE(duk__tv)) { \ + duk_heaphdr *duk__h = DUK_TVAL_GET_HEAPHDR(duk__tv); \ + DUK_ASSERT(duk__h != NULL); \ + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(duk__h)); \ + DUK_HEAPHDR_PREINC_REFCOUNT(duk__h); \ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(duk__h) != 0); /* No wrapping. */ \ + } \ + } while (0) +#define DUK_TVAL_DECREF_FAST(thr, tv) \ + do { \ + duk_tval *duk__tv = (tv); \ + DUK_ASSERT(duk__tv != NULL); \ + if (DUK_TVAL_NEEDS_REFCOUNT_UPDATE(duk__tv)) { \ + duk_heaphdr *duk__h = DUK_TVAL_GET_HEAPHDR(duk__tv); \ + DUK_ASSERT(duk__h != NULL); \ + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(duk__h)); \ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(duk__h) > 0); \ + if (DUK_HEAPHDR_PREDEC_REFCOUNT(duk__h) == 0) { \ + duk_heaphdr_refzero((thr), duk__h); \ + } \ + } \ + } while (0) +#define DUK_TVAL_DECREF_NORZ_FAST(thr, tv) \ + do { \ + duk_tval *duk__tv = (tv); \ + DUK_ASSERT(duk__tv != NULL); \ + if (DUK_TVAL_NEEDS_REFCOUNT_UPDATE(duk__tv)) { \ + duk_heaphdr *duk__h = DUK_TVAL_GET_HEAPHDR(duk__tv); \ + DUK_ASSERT(duk__h != NULL); \ + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(duk__h)); \ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(duk__h) > 0); \ + if (DUK_HEAPHDR_PREDEC_REFCOUNT(duk__h) == 0) { \ + duk_heaphdr_refzero_norz((thr), duk__h); \ + } \ + } \ + } while (0) +#define DUK_HEAPHDR_INCREF_FAST(thr, h) \ + do { \ + duk_heaphdr *duk__h = (duk_heaphdr *) (h); \ + DUK_ASSERT(duk__h != NULL); \ + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(duk__h)); \ + if (DUK_HEAPHDR_NEEDS_REFCOUNT_UPDATE(duk__h)) { \ + DUK_HEAPHDR_PREINC_REFCOUNT(duk__h); \ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(duk__h) != 0); /* No wrapping. */ \ + } \ + } while (0) +#define DUK_HEAPHDR_DECREF_FAST_RAW(thr, h, rzcall, rzcast) \ + do { \ + duk_heaphdr *duk__h = (duk_heaphdr *) (h); \ + DUK_ASSERT(duk__h != NULL); \ + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(duk__h)); \ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(duk__h) > 0); \ + if (DUK_HEAPHDR_NEEDS_REFCOUNT_UPDATE(duk__h)) { \ + if (DUK_HEAPHDR_PREDEC_REFCOUNT(duk__h) == 0) { \ + (rzcall)((thr), (rzcast) duk__h); \ + } \ + } \ + } while (0) +#define DUK_HEAPHDR_DECREF_FAST(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_heaphdr_refzero, duk_heaphdr *) +#define DUK_HEAPHDR_DECREF_NORZ_FAST(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_heaphdr_refzero_norz, duk_heaphdr *) + +/* Slow variants, call to a helper to reduce code size. + * Can be used explicitly when size is always more important than speed. + */ +#define DUK_TVAL_INCREF_SLOW(thr, tv) \ + do { \ + duk_tval_incref((tv)); \ + } while (0) +#define DUK_TVAL_DECREF_SLOW(thr, tv) \ + do { \ + duk_tval_decref((thr), (tv)); \ + } while (0) +#define DUK_TVAL_DECREF_NORZ_SLOW(thr, tv) \ + do { \ + duk_tval_decref_norz((thr), (tv)); \ + } while (0) +#define DUK_HEAPHDR_INCREF_SLOW(thr, h) \ + do { \ + duk_heaphdr_incref((duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HEAPHDR_DECREF_SLOW(thr, h) \ + do { \ + duk_heaphdr_decref((thr), (duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HEAPHDR_DECREF_NORZ_SLOW(thr, h) \ + do { \ + duk_heaphdr_decref_norz((thr), (duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HSTRING_INCREF_SLOW(thr, h) \ + do { \ + duk_heaphdr_incref((duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HSTRING_DECREF_SLOW(thr, h) \ + do { \ + duk_heaphdr_decref((thr), (duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HSTRING_DECREF_NORZ_SLOW(thr, h) \ + do { \ + duk_heaphdr_decref_norz((thr), (duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HBUFFER_INCREF_SLOW(thr, h) \ + do { \ + duk_heaphdr_incref((duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HBUFFER_DECREF_SLOW(thr, h) \ + do { \ + duk_heaphdr_decref((thr), (duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HBUFFER_DECREF_NORZ_SLOW(thr, h) \ + do { \ + duk_heaphdr_decref_norz((thr), (duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HOBJECT_INCREF_SLOW(thr, h) \ + do { \ + duk_heaphdr_incref((duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HOBJECT_DECREF_SLOW(thr, h) \ + do { \ + duk_heaphdr_decref((thr), (duk_heaphdr *) (h)); \ + } while (0) +#define DUK_HOBJECT_DECREF_NORZ_SLOW(thr, h) \ + do { \ + duk_heaphdr_decref_norz((thr), (duk_heaphdr *) (h)); \ + } while (0) + +/* Default variants. Selection depends on speed/size preference. + * Concretely: with gcc 4.8.1 -Os x64 the difference in final binary + * is about +1kB for _FAST variants. + */ +#if defined(DUK_USE_FAST_REFCOUNT_DEFAULT) +/* XXX: It would be nice to specialize for specific duk_hobject subtypes + * but current refzero queue handling prevents that. + */ +#define DUK_TVAL_INCREF(thr, tv) DUK_TVAL_INCREF_FAST((thr), (tv)) +#define DUK_TVAL_DECREF(thr, tv) DUK_TVAL_DECREF_FAST((thr), (tv)) +#define DUK_TVAL_DECREF_NORZ(thr, tv) DUK_TVAL_DECREF_NORZ_FAST((thr), (tv)) +#define DUK_HEAPHDR_INCREF(thr, h) DUK_HEAPHDR_INCREF_FAST((thr), (h)) +#define DUK_HEAPHDR_DECREF(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_heaphdr_refzero, duk_heaphdr *) +#define DUK_HEAPHDR_DECREF_NORZ(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_heaphdr_refzero_norz, duk_heaphdr *) +#define DUK_HSTRING_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) (h)) +#define DUK_HSTRING_DECREF(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hstring_refzero, duk_hstring *) +#define DUK_HSTRING_DECREF_NORZ(thr, h) \ + DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hstring_refzero, duk_hstring *) /* no 'norz' variant */ +#define DUK_HOBJECT_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) (h)) +#define DUK_HOBJECT_DECREF(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hobject_refzero, duk_hobject *) +#define DUK_HOBJECT_DECREF_NORZ(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hobject_refzero_norz, duk_hobject *) +#define DUK_HBUFFER_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) (h)) +#define DUK_HBUFFER_DECREF(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hbuffer_refzero, duk_hbuffer *) +#define DUK_HBUFFER_DECREF_NORZ(thr, h) \ + DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hbuffer_refzero, duk_hbuffer *) /* no 'norz' variant */ +#define DUK_HCOMPFUNC_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) &(h)->obj) +#define DUK_HCOMPFUNC_DECREF(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hobject_refzero, duk_hobject *) +#define DUK_HCOMPFUNC_DECREF_NORZ(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hobject_refzero_norz, duk_hobject *) +#define DUK_HNATFUNC_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) &(h)->obj) +#define DUK_HNATFUNC_DECREF(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hobject_refzero, duk_hobject *) +#define DUK_HNATFUNC_DECREF_NORZ(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hobject_refzero_norz, duk_hobject *) +#define DUK_HBUFOBJ_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) &(h)->obj) +#define DUK_HBUFOBJ_DECREF(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hobject_refzero, duk_hobject *) +#define DUK_HBUFOBJ_DECREF_NORZ(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hobject_refzero_norz, duk_hobject *) +#define DUK_HTHREAD_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) &(h)->obj) +#define DUK_HTHREAD_DECREF(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hobject_refzero, duk_hobject *) +#define DUK_HTHREAD_DECREF_NORZ(thr, h) DUK_HEAPHDR_DECREF_FAST_RAW((thr), (h), duk_hobject_refzero_norz, duk_hobject *) +#else +#define DUK_TVAL_INCREF(thr, tv) DUK_TVAL_INCREF_SLOW((thr), (tv)) +#define DUK_TVAL_DECREF(thr, tv) DUK_TVAL_DECREF_SLOW((thr), (tv)) +#define DUK_TVAL_DECREF_NORZ(thr, tv) DUK_TVAL_DECREF_NORZ_SLOW((thr), (tv)) +#define DUK_HEAPHDR_INCREF(thr, h) DUK_HEAPHDR_INCREF_SLOW((thr), (h)) +#define DUK_HEAPHDR_DECREF(thr, h) DUK_HEAPHDR_DECREF_SLOW((thr), (h)) +#define DUK_HEAPHDR_DECREF_NORZ(thr, h) DUK_HEAPHDR_DECREF_NORZ_SLOW((thr), (h)) +#define DUK_HSTRING_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) (h)) +#define DUK_HSTRING_DECREF(thr, h) DUK_HSTRING_DECREF_SLOW((thr), (h)) +#define DUK_HSTRING_DECREF_NORZ(thr, h) DUK_HSTRING_DECREF_NORZ_SLOW((thr), (h)) +#define DUK_HOBJECT_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) (h)) +#define DUK_HOBJECT_DECREF(thr, h) DUK_HOBJECT_DECREF_SLOW((thr), (h)) +#define DUK_HOBJECT_DECREF_NORZ(thr, h) DUK_HOBJECT_DECREF_NORZ_SLOW((thr), (h)) +#define DUK_HBUFFER_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) (h)) +#define DUK_HBUFFER_DECREF(thr, h) DUK_HBUFFER_DECREF_SLOW((thr), (h)) +#define DUK_HBUFFER_DECREF_NORZ(thr, h) DUK_HBUFFER_DECREF_NORZ_SLOW((thr), (h)) +#define DUK_HCOMPFUNC_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) &(h)->obj) +#define DUK_HCOMPFUNC_DECREF(thr, h) DUK_HOBJECT_DECREF_SLOW((thr), (duk_hobject *) &(h)->obj) +#define DUK_HCOMPFUNC_DECREF_NORZ(thr, h) DUK_HOBJECT_DECREF_NORZ_SLOW((thr), (duk_hobject *) &(h)->obj) +#define DUK_HNATFUNC_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) &(h)->obj) +#define DUK_HNATFUNC_DECREF(thr, h) DUK_HOBJECT_DECREF_SLOW((thr), (duk_hobject *) &(h)->obj) +#define DUK_HNATFUNC_DECREF_NORZ(thr, h) DUK_HOBJECT_DECREF_NORZ_SLOW((thr), (duk_hobject *) &(h)->obj) +#define DUK_HBUFOBJ_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) &(h)->obj) +#define DUK_HBUFOBJ_DECREF(thr, h) DUK_HOBJECT_DECREF_SLOW((thr), (duk_hobject *) &(h)->obj) +#define DUK_HBUFOB_DECREF_NORZ(thr, h) DUK_HOBJECT_DECREF_NORZ_SLOW((thr), (duk_hobject *) &(h)->obj) +#define DUK_HTHREAD_INCREF(thr, h) DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) &(h)->obj) +#define DUK_HTHREAD_DECREF(thr, h) DUK_HOBJECT_DECREF_SLOW((thr), (duk_hobject *) &(h)->obj) +#define DUK_HTHREAD_DECREF_NORZ(thr, h) DUK_HOBJECT_DECREF_NORZ_SLOW((thr), (duk_hobject *) &(h)->obj) +#endif + +/* Convenience for some situations; the above macros don't allow NULLs + * for performance reasons. Macros cover only actually needed cases. + */ +#define DUK_HEAPHDR_INCREF_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HEAPHDR_INCREF((thr), (duk_heaphdr *) (h)); \ + } \ + } while (0) +#define DUK_HEAPHDR_DECREF_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HEAPHDR_DECREF((thr), (duk_heaphdr *) (h)); \ + } \ + } while (0) +#define DUK_HEAPHDR_DECREF_NORZ_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HEAPHDR_DECREF_NORZ((thr), (duk_heaphdr *) (h)); \ + } \ + } while (0) +#define DUK_HOBJECT_INCREF_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HOBJECT_INCREF((thr), (h)); \ + } \ + } while (0) +#define DUK_HOBJECT_DECREF_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HOBJECT_DECREF((thr), (h)); \ + } \ + } while (0) +#define DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HOBJECT_DECREF_NORZ((thr), (h)); \ + } \ + } while (0) +#define DUK_HBUFFER_INCREF_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HBUFFER_INCREF((thr), (h)); \ + } \ + } while (0) +#define DUK_HBUFFER_DECREF_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HBUFFER_DECREF((thr), (h)); \ + } \ + } while (0) +#define DUK_HBUFFER_DECREF_NORZ_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HBUFFER_DECREF_NORZ((thr), (h)); \ + } \ + } while (0) +#define DUK_HTHREAD_INCREF_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HTHREAD_INCREF((thr), (h)); \ + } \ + } while (0) +#define DUK_HTHREAD_DECREF_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HTHREAD_DECREF((thr), (h)); \ + } \ + } while (0) +#define DUK_HTHREAD_DECREF_NORZ_ALLOWNULL(thr, h) \ + do { \ + if ((h) != NULL) { \ + DUK_HTHREAD_DECREF_NORZ((thr), (h)); \ + } \ + } while (0) + +/* Called after one or more DECREF NORZ calls to handle pending side effects. + * At present DECREF NORZ does freeing inline but doesn't execute finalizers, + * so these macros check for pending finalizers and execute them. The FAST + * variant is performance critical. + */ +#if defined(DUK_USE_FINALIZER_SUPPORT) +#define DUK_REFZERO_CHECK_FAST(thr) \ + do { \ + duk_refzero_check_fast((thr)); \ + } while (0) +#define DUK_REFZERO_CHECK_SLOW(thr) \ + do { \ + duk_refzero_check_slow((thr)); \ + } while (0) +#else /* DUK_USE_FINALIZER_SUPPORT */ +#define DUK_REFZERO_CHECK_FAST(thr) \ + do { \ + } while (0) +#define DUK_REFZERO_CHECK_SLOW(thr) \ + do { \ + } while (0) +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +/* + * Macros to set a duk_tval and update refcount of the target (decref the + * old value and incref the new value if necessary). This is both performance + * and footprint critical; any changes made should be measured for size/speed. + */ + +#define DUK_TVAL_SET_UNDEFINED_UPDREF_ALT0(thr, tvptr_dst) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_UNDEFINED(tv__dst); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) + +#define DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ_ALT0(thr, tvptr_dst) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_UNDEFINED(tv__dst); \ + DUK_TVAL_DECREF_NORZ((thr), &tv__tmp); \ + } while (0) + +#define DUK_TVAL_SET_UNUSED_UPDREF_ALT0(thr, tvptr_dst) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_UNUSED(tv__dst); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) + +#define DUK_TVAL_SET_NULL_UPDREF_ALT0(thr, tvptr_dst) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_NULL(tv__dst); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) + +#define DUK_TVAL_SET_BOOLEAN_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_BOOLEAN(tv__dst, (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) + +#define DUK_TVAL_SET_NUMBER_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_NUMBER(tv__dst, (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) +#define DUK_TVAL_SET_NUMBER_CHKFAST_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_NUMBER_CHKFAST_FAST(tv__dst, (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) +#define DUK_TVAL_SET_DOUBLE_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_DOUBLE(tv__dst, (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) +#define DUK_TVAL_SET_NAN_UPDREF_ALT0(thr, tvptr_dst) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_NAN(tv__dst); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) +#if defined(DUK_USE_FASTINT) +#define DUK_TVAL_SET_I48_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_I48(tv__dst, (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) +#define DUK_TVAL_SET_I32_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_I32(tv__dst, (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) +#define DUK_TVAL_SET_U32_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_U32(tv__dst, (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) +#else +#define DUK_TVAL_SET_DOUBLE_CAST_UPDREF(thr, tvptr_dst, newval) \ + DUK_TVAL_SET_DOUBLE_UPDREF((thr), (tvptr_dst), (duk_double_t) (newval)) +#endif /* DUK_USE_FASTINT */ + +#define DUK_TVAL_SET_LIGHTFUNC_UPDREF_ALT0(thr, tvptr_dst, lf_v, lf_fp, lf_flags) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_LIGHTFUNC(tv__dst, (lf_v), (lf_fp), (lf_flags)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) + +#define DUK_TVAL_SET_STRING_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_STRING(tv__dst, (newval)); \ + DUK_HSTRING_INCREF((thr), (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) + +#define DUK_TVAL_SET_OBJECT_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_OBJECT(tv__dst, (newval)); \ + DUK_HOBJECT_INCREF((thr), (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) + +#define DUK_TVAL_SET_BUFFER_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_BUFFER(tv__dst, (newval)); \ + DUK_HBUFFER_INCREF((thr), (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) + +#define DUK_TVAL_SET_POINTER_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_POINTER(tv__dst, (newval)); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) + +/* DUK_TVAL_SET_TVAL_UPDREF() is used a lot in executor, property lookups, + * etc, so it's very important for performance. Measure when changing. + * + * NOTE: the source and destination duk_tval pointers may be the same, and + * the macros MUST deal with that correctly. + */ + +/* Original idiom used, minimal code size. */ +#define DUK_TVAL_SET_TVAL_UPDREF_ALT0(thr, tvptr_dst, tvptr_src) \ + do { \ + duk_tval *tv__dst, *tv__src; \ + duk_tval tv__tmp; \ + tv__dst = (tvptr_dst); \ + tv__src = (tvptr_src); \ + DUK_TVAL_SET_TVAL(&tv__tmp, tv__dst); \ + DUK_TVAL_SET_TVAL(tv__dst, tv__src); \ + DUK_TVAL_INCREF((thr), tv__src); \ + DUK_TVAL_DECREF((thr), &tv__tmp); /* side effects */ \ + } while (0) + +/* Faster alternative: avoid making a temporary copy of tvptr_dst and use + * fast incref/decref macros. + */ +#define DUK_TVAL_SET_TVAL_UPDREF_ALT1(thr, tvptr_dst, tvptr_src) \ + do { \ + duk_tval *tv__dst, *tv__src; \ + duk_heaphdr *h__obj; \ + tv__dst = (tvptr_dst); \ + tv__src = (tvptr_src); \ + DUK_TVAL_INCREF_FAST((thr), tv__src); \ + if (DUK_TVAL_NEEDS_REFCOUNT_UPDATE(tv__dst)) { \ + h__obj = DUK_TVAL_GET_HEAPHDR(tv__dst); \ + DUK_ASSERT(h__obj != NULL); \ + DUK_TVAL_SET_TVAL(tv__dst, tv__src); \ + DUK_HEAPHDR_DECREF_FAST((thr), h__obj); /* side effects */ \ + } else { \ + DUK_TVAL_SET_TVAL(tv__dst, tv__src); \ + } \ + } while (0) + +/* XXX: no optimized variants yet */ +#define DUK_TVAL_SET_UNDEFINED_UPDREF DUK_TVAL_SET_UNDEFINED_UPDREF_ALT0 +#define DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ_ALT0 +#define DUK_TVAL_SET_UNUSED_UPDREF DUK_TVAL_SET_UNUSED_UPDREF_ALT0 +#define DUK_TVAL_SET_NULL_UPDREF DUK_TVAL_SET_NULL_UPDREF_ALT0 +#define DUK_TVAL_SET_BOOLEAN_UPDREF DUK_TVAL_SET_BOOLEAN_UPDREF_ALT0 +#define DUK_TVAL_SET_NUMBER_UPDREF DUK_TVAL_SET_NUMBER_UPDREF_ALT0 +#define DUK_TVAL_SET_NUMBER_CHKFAST_UPDREF DUK_TVAL_SET_NUMBER_CHKFAST_UPDREF_ALT0 +#define DUK_TVAL_SET_DOUBLE_UPDREF DUK_TVAL_SET_DOUBLE_UPDREF_ALT0 +#define DUK_TVAL_SET_NAN_UPDREF DUK_TVAL_SET_NAN_UPDREF_ALT0 +#if defined(DUK_USE_FASTINT) +#define DUK_TVAL_SET_I48_UPDREF DUK_TVAL_SET_I48_UPDREF_ALT0 +#define DUK_TVAL_SET_I32_UPDREF DUK_TVAL_SET_I32_UPDREF_ALT0 +#define DUK_TVAL_SET_U32_UPDREF DUK_TVAL_SET_U32_UPDREF_ALT0 +#else +#define DUK_TVAL_SET_I48_UPDREF DUK_TVAL_SET_DOUBLE_CAST_UPDREF /* XXX: fast int-to-double */ +#define DUK_TVAL_SET_I32_UPDREF DUK_TVAL_SET_DOUBLE_CAST_UPDREF +#define DUK_TVAL_SET_U32_UPDREF DUK_TVAL_SET_DOUBLE_CAST_UPDREF +#endif /* DUK_USE_FASTINT */ +#define DUK_TVAL_SET_FASTINT_UPDREF DUK_TVAL_SET_I48_UPDREF /* convenience */ +#define DUK_TVAL_SET_LIGHTFUNC_UPDREF DUK_TVAL_SET_LIGHTFUNC_UPDREF_ALT0 +#define DUK_TVAL_SET_STRING_UPDREF DUK_TVAL_SET_STRING_UPDREF_ALT0 +#define DUK_TVAL_SET_OBJECT_UPDREF DUK_TVAL_SET_OBJECT_UPDREF_ALT0 +#define DUK_TVAL_SET_BUFFER_UPDREF DUK_TVAL_SET_BUFFER_UPDREF_ALT0 +#define DUK_TVAL_SET_POINTER_UPDREF DUK_TVAL_SET_POINTER_UPDREF_ALT0 + +#if defined(DUK_USE_FAST_REFCOUNT_DEFAULT) +/* Optimized for speed. */ +#define DUK_TVAL_SET_TVAL_UPDREF DUK_TVAL_SET_TVAL_UPDREF_ALT1 +#define DUK_TVAL_SET_TVAL_UPDREF_FAST DUK_TVAL_SET_TVAL_UPDREF_ALT1 +#define DUK_TVAL_SET_TVAL_UPDREF_SLOW DUK_TVAL_SET_TVAL_UPDREF_ALT0 +#else +/* Optimized for size. */ +#define DUK_TVAL_SET_TVAL_UPDREF DUK_TVAL_SET_TVAL_UPDREF_ALT0 +#define DUK_TVAL_SET_TVAL_UPDREF_FAST DUK_TVAL_SET_TVAL_UPDREF_ALT0 +#define DUK_TVAL_SET_TVAL_UPDREF_SLOW DUK_TVAL_SET_TVAL_UPDREF_ALT0 +#endif + +#else /* DUK_USE_REFERENCE_COUNTING */ + +#define DUK_TVAL_NEEDS_REFCOUNT_UPDATE(tv) 0 +#define DUK_HEAPHDR_NEEDS_REFCOUNT_UPDATE(h) 0 + +#define DUK_TVAL_INCREF_FAST(thr, v) \ + do { \ + } while (0) /* nop */ +#define DUK_TVAL_DECREF_FAST(thr, v) \ + do { \ + } while (0) /* nop */ +#define DUK_TVAL_DECREF_NORZ_FAST(thr, v) \ + do { \ + } while (0) /* nop */ +#define DUK_TVAL_INCREF_SLOW(thr, v) \ + do { \ + } while (0) /* nop */ +#define DUK_TVAL_DECREF_SLOW(thr, v) \ + do { \ + } while (0) /* nop */ +#define DUK_TVAL_DECREF_NORZ_SLOW(thr, v) \ + do { \ + } while (0) /* nop */ +#define DUK_TVAL_INCREF(thr, v) \ + do { \ + } while (0) /* nop */ +#define DUK_TVAL_DECREF(thr, v) \ + do { \ + } while (0) /* nop */ +#define DUK_TVAL_DECREF_NORZ(thr, v) \ + do { \ + } while (0) /* nop */ +#define DUK_HEAPHDR_INCREF_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HEAPHDR_DECREF_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HEAPHDR_DECREF_NORZ_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HEAPHDR_INCREF_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HEAPHDR_DECREF_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HEAPHDR_DECREF_NORZ_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HEAPHDR_INCREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HEAPHDR_DECREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HEAPHDR_DECREF_NORZ(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HSTRING_INCREF_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HSTRING_DECREF_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HSTRING_DECREF_NORZ_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HSTRING_INCREF_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HSTRING_DECREF_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HSTRING_DECREF_NORZ_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HSTRING_INCREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HSTRING_DECREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HSTRING_DECREF_NORZ(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_INCREF_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_DECREF_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_DECREF_NORZ_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_INCREF_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_DECREF_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_DECREF_NORZ_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_INCREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_DECREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_DECREF_NORZ(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_INCREF_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_DECREF_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_DECREF_NORZ_FAST(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_INCREF_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_DECREF_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_DECREF_NORZ_SLOW(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_INCREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_DECREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_DECREF_NORZ(thr, h) \ + do { \ + } while (0) /* nop */ + +#define DUK_HCOMPFUNC_INCREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HCOMPFUNC_DECREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HCOMPFUNC_DECREF_NORZ(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HNATFUNC_INCREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HNATFUNC_DECREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HNATFUNC_DECREF_NORZ(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFOBJ_INCREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFOBJ_DECREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFOBJ_DECREF_NORZ(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HTHREAD_INCREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HTHREAD_DECREF(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HTHREAD_DECREF_NORZ(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_INCREF_ALLOWNULL(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_DECREF_ALLOWNULL(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_INCREF_ALLOWNULL(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_DECREF_ALLOWNULL(thr, h) \ + do { \ + } while (0) /* nop */ +#define DUK_HBUFFER_DECREF_NORZ_ALLOWNULL(thr, h) \ + do { \ + } while (0) /* nop */ + +#define DUK_REFZERO_CHECK_FAST(thr) \ + do { \ + } while (0) /* nop */ +#define DUK_REFZERO_CHECK_SLOW(thr) \ + do { \ + } while (0) /* nop */ + +#define DUK_TVAL_SET_UNDEFINED_UPDREF_ALT0(thr, tvptr_dst) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_UNDEFINED(tv__dst); \ + DUK_UNREF((thr)); \ + } while (0) + +#define DUK_TVAL_SET_UNUSED_UPDREF_ALT0(thr, tvptr_dst) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_UNUSED(tv__dst); \ + DUK_UNREF((thr)); \ + } while (0) + +#define DUK_TVAL_SET_NULL_UPDREF_ALT0(thr, tvptr_dst) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_NULL(tv__dst); \ + DUK_UNREF((thr)); \ + } while (0) + +#define DUK_TVAL_SET_BOOLEAN_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_BOOLEAN(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) + +#define DUK_TVAL_SET_NUMBER_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_NUMBER(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) +#define DUK_TVAL_SET_NUMBER_CHKFAST_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_NUMBER_CHKFAST_FAST(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) +#define DUK_TVAL_SET_DOUBLE_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_DOUBLE(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) +#define DUK_TVAL_SET_NAN_UPDREF_ALT0(thr, tvptr_dst) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_NAN(tv__dst); \ + DUK_UNREF((thr)); \ + } while (0) +#if defined(DUK_USE_FASTINT) +#define DUK_TVAL_SET_I48_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_I48(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) +#define DUK_TVAL_SET_I32_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_I32(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) +#define DUK_TVAL_SET_U32_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_U32(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) +#else +#define DUK_TVAL_SET_DOUBLE_CAST_UPDREF(thr, tvptr_dst, newval) \ + DUK_TVAL_SET_DOUBLE_UPDREF((thr), (tvptr_dst), (duk_double_t) (newval)) +#endif /* DUK_USE_FASTINT */ + +#define DUK_TVAL_SET_LIGHTFUNC_UPDREF_ALT0(thr, tvptr_dst, lf_v, lf_fp, lf_flags) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_LIGHTFUNC(tv__dst, (lf_v), (lf_fp), (lf_flags)); \ + DUK_UNREF((thr)); \ + } while (0) + +#define DUK_TVAL_SET_STRING_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_STRING(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) + +#define DUK_TVAL_SET_OBJECT_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_OBJECT(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) + +#define DUK_TVAL_SET_BUFFER_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_BUFFER(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) + +#define DUK_TVAL_SET_POINTER_UPDREF_ALT0(thr, tvptr_dst, newval) \ + do { \ + duk_tval *tv__dst; \ + tv__dst = (tvptr_dst); \ + DUK_TVAL_SET_POINTER(tv__dst, (newval)); \ + DUK_UNREF((thr)); \ + } while (0) + +#define DUK_TVAL_SET_TVAL_UPDREF_ALT0(thr, tvptr_dst, tvptr_src) \ + do { \ + duk_tval *tv__dst, *tv__src; \ + tv__dst = (tvptr_dst); \ + tv__src = (tvptr_src); \ + DUK_TVAL_SET_TVAL(tv__dst, tv__src); \ + DUK_UNREF((thr)); \ + } while (0) + +#define DUK_TVAL_SET_UNDEFINED_UPDREF DUK_TVAL_SET_UNDEFINED_UPDREF_ALT0 +#define DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ DUK_TVAL_SET_UNDEFINED_UPDREF_ALT0 +#define DUK_TVAL_SET_UNUSED_UPDREF DUK_TVAL_SET_UNUSED_UPDREF_ALT0 +#define DUK_TVAL_SET_NULL_UPDREF DUK_TVAL_SET_NULL_UPDREF_ALT0 +#define DUK_TVAL_SET_BOOLEAN_UPDREF DUK_TVAL_SET_BOOLEAN_UPDREF_ALT0 +#define DUK_TVAL_SET_NUMBER_UPDREF DUK_TVAL_SET_NUMBER_UPDREF_ALT0 +#define DUK_TVAL_SET_NUMBER_CHKFAST_UPDREF DUK_TVAL_SET_NUMBER_CHKFAST_UPDREF_ALT0 +#define DUK_TVAL_SET_DOUBLE_UPDREF DUK_TVAL_SET_DOUBLE_UPDREF_ALT0 +#define DUK_TVAL_SET_NAN_UPDREF DUK_TVAL_SET_NAN_UPDREF_ALT0 +#if defined(DUK_USE_FASTINT) +#define DUK_TVAL_SET_I48_UPDREF DUK_TVAL_SET_I48_UPDREF_ALT0 +#define DUK_TVAL_SET_I32_UPDREF DUK_TVAL_SET_I32_UPDREF_ALT0 +#define DUK_TVAL_SET_U32_UPDREF DUK_TVAL_SET_U32_UPDREF_ALT0 +#else +#define DUK_TVAL_SET_I48_UPDREF DUK_TVAL_SET_DOUBLE_CAST_UPDREF /* XXX: fast-int-to-double */ +#define DUK_TVAL_SET_I32_UPDREF DUK_TVAL_SET_DOUBLE_CAST_UPDREF +#define DUK_TVAL_SET_U32_UPDREF DUK_TVAL_SET_DOUBLE_CAST_UPDREF +#endif /* DUK_USE_FASTINT */ +#define DUK_TVAL_SET_FASTINT_UPDREF DUK_TVAL_SET_I48_UPDREF /* convenience */ +#define DUK_TVAL_SET_LIGHTFUNC_UPDREF DUK_TVAL_SET_LIGHTFUNC_UPDREF_ALT0 +#define DUK_TVAL_SET_STRING_UPDREF DUK_TVAL_SET_STRING_UPDREF_ALT0 +#define DUK_TVAL_SET_OBJECT_UPDREF DUK_TVAL_SET_OBJECT_UPDREF_ALT0 +#define DUK_TVAL_SET_BUFFER_UPDREF DUK_TVAL_SET_BUFFER_UPDREF_ALT0 +#define DUK_TVAL_SET_POINTER_UPDREF DUK_TVAL_SET_POINTER_UPDREF_ALT0 + +#define DUK_TVAL_SET_TVAL_UPDREF DUK_TVAL_SET_TVAL_UPDREF_ALT0 +#define DUK_TVAL_SET_TVAL_UPDREF_FAST DUK_TVAL_SET_TVAL_UPDREF_ALT0 +#define DUK_TVAL_SET_TVAL_UPDREF_SLOW DUK_TVAL_SET_TVAL_UPDREF_ALT0 + +#endif /* DUK_USE_REFERENCE_COUNTING */ + +/* + * Some convenience macros that don't have optimized implementations now. + */ + +#define DUK_TVAL_SET_TVAL_UPDREF_NORZ(thr, tv_dst, tv_src) \ + do { \ + duk_hthread *duk__thr = (thr); \ + duk_tval *duk__dst = (tv_dst); \ + duk_tval *duk__src = (tv_src); \ + DUK_UNREF(duk__thr); \ + DUK_TVAL_DECREF_NORZ(thr, duk__dst); \ + DUK_TVAL_SET_TVAL(duk__dst, duk__src); \ + DUK_TVAL_INCREF(thr, duk__dst); \ + } while (0) + +#define DUK_TVAL_SET_U32_UPDREF_NORZ(thr, tv_dst, val) \ + do { \ + duk_hthread *duk__thr = (thr); \ + duk_tval *duk__dst = (tv_dst); \ + duk_uint32_t duk__val = (duk_uint32_t) (val); \ + DUK_UNREF(duk__thr); \ + DUK_TVAL_DECREF_NORZ(thr, duk__dst); \ + DUK_TVAL_SET_U32(duk__dst, duk__val); \ + } while (0) + +/* + * Prototypes + */ + +#if defined(DUK_USE_REFERENCE_COUNTING) +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_INTERNAL_DECL void duk_refzero_check_slow(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_refzero_check_fast(duk_hthread *thr); +#endif +DUK_INTERNAL_DECL void duk_heaphdr_refcount_finalize_norz(duk_heap *heap, duk_heaphdr *hdr); +DUK_INTERNAL_DECL void duk_hobject_refcount_finalize_norz(duk_heap *heap, duk_hobject *h); +#if 0 /* Not needed: fast path handles inline; slow path uses duk_heaphdr_decref() which is needed anyway. */ +DUK_INTERNAL_DECL void duk_hstring_decref(duk_hthread *thr, duk_hstring *h); +DUK_INTERNAL_DECL void duk_hstring_decref_norz(duk_hthread *thr, duk_hstring *h); +DUK_INTERNAL_DECL void duk_hbuffer_decref(duk_hthread *thr, duk_hbuffer *h); +DUK_INTERNAL_DECL void duk_hbuffer_decref_norz(duk_hthread *thr, duk_hbuffer *h); +DUK_INTERNAL_DECL void duk_hobject_decref(duk_hthread *thr, duk_hobject *h); +DUK_INTERNAL_DECL void duk_hobject_decref_norz(duk_hthread *thr, duk_hobject *h); +#endif +DUK_INTERNAL_DECL void duk_heaphdr_refzero(duk_hthread *thr, duk_heaphdr *h); +DUK_INTERNAL_DECL void duk_heaphdr_refzero_norz(duk_hthread *thr, duk_heaphdr *h); +#if defined(DUK_USE_FAST_REFCOUNT_DEFAULT) +DUK_INTERNAL_DECL void duk_hstring_refzero(duk_hthread *thr, duk_hstring *h); /* no 'norz' variant */ +DUK_INTERNAL_DECL void duk_hbuffer_refzero(duk_hthread *thr, duk_hbuffer *h); /* no 'norz' variant */ +DUK_INTERNAL_DECL void duk_hobject_refzero(duk_hthread *thr, duk_hobject *h); +DUK_INTERNAL_DECL void duk_hobject_refzero_norz(duk_hthread *thr, duk_hobject *h); +#else +DUK_INTERNAL_DECL void duk_tval_incref(duk_tval *tv); +DUK_INTERNAL_DECL void duk_tval_decref(duk_hthread *thr, duk_tval *tv); +DUK_INTERNAL_DECL void duk_tval_decref_norz(duk_hthread *thr, duk_tval *tv); +DUK_INTERNAL_DECL void duk_heaphdr_incref(duk_heaphdr *h); +DUK_INTERNAL_DECL void duk_heaphdr_decref(duk_hthread *thr, duk_heaphdr *h); +DUK_INTERNAL_DECL void duk_heaphdr_decref_norz(duk_hthread *thr, duk_heaphdr *h); +#endif +#else /* DUK_USE_REFERENCE_COUNTING */ +/* no refcounting */ +#endif /* DUK_USE_REFERENCE_COUNTING */ + +#endif /* DUK_REFCOUNT_H_INCLUDED */ +/* #include duk_api_internal.h */ +#line 1 "duk_api_internal.h" +/* + * Internal API calls which have (stack and other) semantics similar + * to the public API. + */ + +#if !defined(DUK_API_INTERNAL_H_INCLUDED) +#define DUK_API_INTERNAL_H_INCLUDED + +/* Inline macro helpers. */ +#if defined(DUK_USE_PREFER_SIZE) +#define DUK_INLINE_PERF +#define DUK_ALWAYS_INLINE_PERF +#define DUK_NOINLINE_PERF +#else +#define DUK_INLINE_PERF DUK_INLINE +#define DUK_ALWAYS_INLINE_PERF DUK_ALWAYS_INLINE +#define DUK_NOINLINE_PERF DUK_NOINLINE +#endif + +/* Inline macro helpers, for bytecode executor. */ +#if defined(DUK_USE_EXEC_PREFER_SIZE) +#define DUK_EXEC_INLINE_PERF +#define DUK_EXEC_ALWAYS_INLINE_PERF +#define DUK_EXEC_NOINLINE_PERF +#else +#define DUK_EXEC_INLINE_PERF DUK_INLINE +#define DUK_EXEC_ALWAYS_INLINE_PERF DUK_ALWAYS_INLINE +#define DUK_EXEC_NOINLINE_PERF DUK_NOINLINE +#endif + +/* duk_push_sprintf constants */ +#define DUK_PUSH_SPRINTF_INITIAL_SIZE 256L +#define DUK_PUSH_SPRINTF_SANITY_LIMIT (1L * 1024L * 1024L * 1024L) + +/* Flag ORed to err_code to indicate __FILE__ / __LINE__ is not + * blamed as source of error for error fileName / lineNumber. + */ +#define DUK_ERRCODE_FLAG_NOBLAME_FILELINE (1L << 24) + +/* Current convention is to use duk_size_t for value stack sizes and global indices, + * and duk_idx_t for local frame indices. + */ +DUK_INTERNAL_DECL void duk_valstack_grow_check_throw(duk_hthread *thr, duk_size_t min_bytes); +DUK_INTERNAL_DECL duk_bool_t duk_valstack_grow_check_nothrow(duk_hthread *thr, duk_size_t min_bytes); +DUK_INTERNAL_DECL void duk_valstack_shrink_check_nothrow(duk_hthread *thr, duk_bool_t snug); + +DUK_INTERNAL_DECL void duk_copy_tvals_incref(duk_hthread *thr, duk_tval *tv_dst, duk_tval *tv_src, duk_size_t count); + +DUK_INTERNAL_DECL duk_tval *duk_reserve_gap(duk_hthread *thr, duk_idx_t idx_base, duk_idx_t count); + +DUK_INTERNAL_DECL void duk_set_top_unsafe(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL void duk_set_top_and_wipe(duk_hthread *thr, duk_idx_t top, duk_idx_t idx_wipe_start); + +DUK_INTERNAL_DECL void duk_dup_0(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_dup_1(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_dup_2(duk_hthread *thr); +/* duk_dup_m1() would be same as duk_dup_top() */ +DUK_INTERNAL_DECL void duk_dup_m2(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_dup_m3(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_dup_m4(duk_hthread *thr); + +DUK_INTERNAL_DECL void duk_remove_unsafe(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL void duk_remove_m2(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_remove_n(duk_hthread *thr, duk_idx_t idx, duk_idx_t count); +DUK_INTERNAL_DECL void duk_remove_n_unsafe(duk_hthread *thr, duk_idx_t idx, duk_idx_t count); + +DUK_INTERNAL_DECL duk_int_t duk_get_type_tval(duk_tval *tv); +DUK_INTERNAL_DECL duk_uint_t duk_get_type_mask_tval(duk_tval *tv); + +#if defined(DUK_USE_VERBOSE_ERRORS) && defined(DUK_USE_PARANOID_ERRORS) +DUK_INTERNAL_DECL const char *duk_get_type_name(duk_hthread *thr, duk_idx_t idx); +#endif +DUK_INTERNAL_DECL duk_small_uint_t duk_get_class_number(duk_hthread *thr, duk_idx_t idx); + +DUK_INTERNAL_DECL duk_tval *duk_get_tval(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_tval *duk_get_tval_or_unused(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_tval *duk_require_tval(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL void duk_push_tval(duk_hthread *thr, duk_tval *tv); + +/* Push the current 'this' binding; throw TypeError if binding is not object + * coercible (CheckObjectCoercible). + */ +DUK_INTERNAL_DECL void duk_push_this_check_object_coercible(duk_hthread *thr); + +/* duk_push_this() + CheckObjectCoercible() + duk_to_object() */ +DUK_INTERNAL_DECL duk_hobject *duk_push_this_coercible_to_object(duk_hthread *thr); + +/* duk_push_this() + CheckObjectCoercible() + duk_to_string() */ +DUK_INTERNAL_DECL duk_hstring *duk_push_this_coercible_to_string(duk_hthread *thr); + +DUK_INTERNAL_DECL duk_hstring *duk_push_uint_to_hstring(duk_hthread *thr, duk_uint_t i); + +/* Get a borrowed duk_tval pointer to the current 'this' binding. Caller must + * make sure there's an active callstack entry. Note that the returned pointer + * is unstable with regards to side effects. + */ +DUK_INTERNAL_DECL duk_tval *duk_get_borrowed_this_tval(duk_hthread *thr); + +/* XXX: add fastint support? */ +#define duk_push_u64(thr, val) duk_push_number((thr), (duk_double_t) (val)) +#define duk_push_i64(thr, val) duk_push_number((thr), (duk_double_t) (val)) + +/* duk_push_(u)int() is guaranteed to support at least (un)signed 32-bit range */ +#define duk_push_u32(thr, val) duk_push_uint((thr), (duk_uint_t) (val)) +#define duk_push_i32(thr, val) duk_push_int((thr), (duk_int_t) (val)) + +/* sometimes stack and array indices need to go on the stack */ +#define duk_push_idx(thr, val) duk_push_int((thr), (duk_int_t) (val)) +#define duk_push_uarridx(thr, val) duk_push_uint((thr), (duk_uint_t) (val)) +#define duk_push_size_t(thr, val) duk_push_uint((thr), (duk_uint_t) (val)) /* XXX: assumed to fit for now */ + +DUK_INTERNAL_DECL duk_bool_t duk_is_string_notsymbol(duk_hthread *thr, duk_idx_t idx); + +DUK_INTERNAL_DECL duk_bool_t duk_is_callable_tval(duk_hthread *thr, duk_tval *tv); + +DUK_INTERNAL_DECL duk_bool_t duk_is_bare_object(duk_hthread *thr, duk_idx_t idx); + +DUK_INTERNAL_DECL duk_hstring *duk_get_hstring(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hstring *duk_get_hstring_notsymbol(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL const char *duk_get_string_notsymbol(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hobject *duk_get_hobject(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hbuffer *duk_get_hbuffer(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hthread *duk_get_hthread(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hcompfunc *duk_get_hcompfunc(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hnatfunc *duk_get_hnatfunc(duk_hthread *thr, duk_idx_t idx); + +DUK_INTERNAL_DECL void *duk_get_buffer_data_raw(duk_hthread *thr, + duk_idx_t idx, + duk_size_t *out_size, + void *def_ptr, + duk_size_t def_len, + duk_bool_t throw_flag, + duk_bool_t *out_isbuffer); + +DUK_INTERNAL_DECL duk_hobject *duk_get_hobject_with_class(duk_hthread *thr, duk_idx_t idx, duk_small_uint_t classnum); + +DUK_INTERNAL_DECL duk_hobject *duk_get_hobject_promote_mask(duk_hthread *thr, duk_idx_t idx, duk_uint_t type_mask); +DUK_INTERNAL_DECL duk_hobject *duk_require_hobject_promote_mask(duk_hthread *thr, duk_idx_t idx, duk_uint_t type_mask); +DUK_INTERNAL_DECL duk_hobject *duk_require_hobject_accept_mask(duk_hthread *thr, duk_idx_t idx, duk_uint_t type_mask); +#define duk_require_hobject_promote_lfunc(thr, idx) duk_require_hobject_promote_mask((thr), (idx), DUK_TYPE_MASK_LIGHTFUNC) +#define duk_get_hobject_promote_lfunc(thr, idx) duk_get_hobject_promote_mask((thr), (idx), DUK_TYPE_MASK_LIGHTFUNC) + +#if 0 /*unused*/ +DUK_INTERNAL_DECL void *duk_get_voidptr(duk_hthread *thr, duk_idx_t idx); +#endif + +DUK_INTERNAL_DECL duk_hstring *duk_known_hstring(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hobject *duk_known_hobject(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hbuffer *duk_known_hbuffer(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hcompfunc *duk_known_hcompfunc(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hnatfunc *duk_known_hnatfunc(duk_hthread *thr, duk_idx_t idx); + +DUK_INTERNAL_DECL duk_double_t duk_to_number_tval(duk_hthread *thr, duk_tval *tv); + +DUK_INTERNAL_DECL duk_hstring *duk_to_hstring(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hstring *duk_to_hstring_m1(duk_hthread *thr); +DUK_INTERNAL_DECL duk_hstring *duk_to_hstring_acceptsymbol(duk_hthread *thr, duk_idx_t idx); + +DUK_INTERNAL_DECL duk_hobject *duk_to_hobject(duk_hthread *thr, duk_idx_t idx); + +DUK_INTERNAL_DECL duk_double_t duk_to_number_m1(duk_hthread *thr); +DUK_INTERNAL_DECL duk_double_t duk_to_number_m2(duk_hthread *thr); + +DUK_INTERNAL_DECL duk_bool_t duk_to_boolean_top_pop(duk_hthread *thr); + +#if defined(DUK_USE_DEBUGGER_SUPPORT) /* only needed by debugger for now */ +DUK_INTERNAL_DECL duk_hstring *duk_safe_to_hstring(duk_hthread *thr, duk_idx_t idx); +#endif +DUK_INTERNAL_DECL void duk_push_class_string_tval(duk_hthread *thr, duk_tval *tv, duk_bool_t avoid_side_effects); + +DUK_INTERNAL_DECL duk_int_t duk_to_int_clamped_raw(duk_hthread *thr, + duk_idx_t idx, + duk_int_t minval, + duk_int_t maxval, + duk_bool_t *out_clamped); /* out_clamped=NULL, RangeError if outside range */ +DUK_INTERNAL_DECL duk_int_t duk_to_int_clamped(duk_hthread *thr, duk_idx_t idx, duk_int_t minval, duk_int_t maxval); +DUK_INTERNAL_DECL duk_int_t duk_to_int_check_range(duk_hthread *thr, duk_idx_t idx, duk_int_t minval, duk_int_t maxval); +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL_DECL duk_uint8_t duk_to_uint8clamped(duk_hthread *thr, duk_idx_t idx); +#endif +DUK_INTERNAL_DECL duk_hstring *duk_to_property_key_hstring(duk_hthread *thr, duk_idx_t idx); + +DUK_INTERNAL_DECL duk_hstring *duk_require_hstring(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hstring *duk_require_hstring_notsymbol(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL const char *duk_require_lstring_notsymbol(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_len); +DUK_INTERNAL_DECL const char *duk_require_string_notsymbol(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hobject *duk_require_hobject(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hbuffer *duk_require_hbuffer(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hthread *duk_require_hthread(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hcompfunc *duk_require_hcompfunc(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL duk_hnatfunc *duk_require_hnatfunc(duk_hthread *thr, duk_idx_t idx); + +DUK_INTERNAL_DECL duk_hobject *duk_require_hobject_with_class(duk_hthread *thr, duk_idx_t idx, duk_small_uint_t classnum); + +DUK_INTERNAL_DECL void duk_push_hstring(duk_hthread *thr, duk_hstring *h); +DUK_INTERNAL_DECL void duk_push_hstring_stridx(duk_hthread *thr, duk_small_uint_t stridx); +DUK_INTERNAL_DECL void duk_push_hstring_empty(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_push_hobject(duk_hthread *thr, duk_hobject *h); +DUK_INTERNAL_DECL void duk_push_hbuffer(duk_hthread *thr, duk_hbuffer *h); +#define duk_push_hthread(thr, h) duk_push_hobject((thr), (duk_hobject *) (h)) +#define duk_push_hnatfunc(thr, h) duk_push_hobject((thr), (duk_hobject *) (h)) +DUK_INTERNAL_DECL void duk_push_hobject_bidx(duk_hthread *thr, duk_small_int_t builtin_idx); +DUK_INTERNAL_DECL duk_hobject *duk_push_object_helper(duk_hthread *thr, + duk_uint_t hobject_flags_and_class, + duk_small_int_t prototype_bidx); +DUK_INTERNAL_DECL duk_hobject *duk_push_object_helper_proto(duk_hthread *thr, + duk_uint_t hobject_flags_and_class, + duk_hobject *proto); +DUK_INTERNAL_DECL duk_hcompfunc *duk_push_hcompfunc(duk_hthread *thr); +DUK_INTERNAL_DECL duk_hboundfunc *duk_push_hboundfunc(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_push_c_function_builtin(duk_hthread *thr, duk_c_function func, duk_int_t nargs); +DUK_INTERNAL_DECL void duk_push_c_function_builtin_noconstruct(duk_hthread *thr, duk_c_function func, duk_int_t nargs); + +/* XXX: duk_push_harray() and duk_push_hcompfunc() are inconsistent with + * duk_push_hobject() etc which don't create a new value. + */ +DUK_INTERNAL_DECL duk_harray *duk_push_harray(duk_hthread *thr); +DUK_INTERNAL_DECL duk_harray *duk_push_harray_with_size(duk_hthread *thr, duk_uint32_t size); +DUK_INTERNAL_DECL duk_tval *duk_push_harray_with_size_outptr(duk_hthread *thr, duk_uint32_t size); + +DUK_INTERNAL_DECL void duk_push_string_funcptr(duk_hthread *thr, duk_uint8_t *ptr, duk_size_t sz); +DUK_INTERNAL_DECL void duk_push_lightfunc_name_raw(duk_hthread *thr, duk_c_function func, duk_small_uint_t lf_flags); +DUK_INTERNAL_DECL void duk_push_lightfunc_name(duk_hthread *thr, duk_tval *tv); +DUK_INTERNAL_DECL void duk_push_lightfunc_tostring(duk_hthread *thr, duk_tval *tv); +#if 0 /* not used yet */ +DUK_INTERNAL_DECL void duk_push_hnatfunc_name(duk_hthread *thr, duk_hnatfunc *h); +#endif +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL_DECL duk_hbufobj *duk_push_bufobj_raw(duk_hthread *thr, + duk_uint_t hobject_flags_and_class, + duk_small_int_t prototype_bidx); +#endif + +DUK_INTERNAL_DECL void *duk_push_fixed_buffer_nozero(duk_hthread *thr, duk_size_t len); +DUK_INTERNAL_DECL void *duk_push_fixed_buffer_zero(duk_hthread *thr, duk_size_t len); + +DUK_INTERNAL_DECL const char *duk_push_string_readable(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL const char *duk_push_string_tval_readable(duk_hthread *thr, duk_tval *tv); +DUK_INTERNAL_DECL const char *duk_push_string_tval_readable_error(duk_hthread *thr, duk_tval *tv); + +/* The duk_xxx_prop_stridx_short() variants expect their arguments to be short + * enough to be packed into a single 32-bit integer argument. Argument limits + * vary per call; typically 16 bits are assigned to the signed value stack index + * and the stridx. In practice these work well for footprint with constant + * arguments and such call sites are also easiest to verify to be correct. + */ + +DUK_INTERNAL_DECL duk_bool_t duk_get_prop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx); /* [] -> [val] */ +DUK_INTERNAL_DECL duk_bool_t duk_get_prop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args); +#define duk_get_prop_stridx_short(thr, obj_idx, stridx) \ + (DUK_ASSERT_EXPR((duk_int_t) (obj_idx) >= -0x8000L && (duk_int_t) (obj_idx) <= 0x7fffL), \ + DUK_ASSERT_EXPR((duk_int_t) (stridx) >= 0 && (duk_int_t) (stridx) <= 0xffffL), \ + duk_get_prop_stridx_short_raw((thr), (((duk_uint_t) (obj_idx)) << 16) + ((duk_uint_t) (stridx)))) +DUK_INTERNAL_DECL duk_bool_t duk_get_prop_stridx_boolean(duk_hthread *thr, + duk_idx_t obj_idx, + duk_small_uint_t stridx, + duk_bool_t *out_has_prop); /* [] -> [] */ + +DUK_INTERNAL_DECL duk_bool_t duk_xget_owndataprop(duk_hthread *thr, duk_idx_t obj_idx); +DUK_INTERNAL_DECL duk_bool_t duk_xget_owndataprop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx); +DUK_INTERNAL_DECL duk_bool_t duk_xget_owndataprop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args); +#define duk_xget_owndataprop_stridx_short(thr, obj_idx, stridx) \ + (DUK_ASSERT_EXPR((duk_int_t) (obj_idx) >= -0x8000L && (duk_int_t) (obj_idx) <= 0x7fffL), \ + DUK_ASSERT_EXPR((duk_int_t) (stridx) >= 0 && (duk_int_t) (stridx) <= 0xffffL), \ + duk_xget_owndataprop_stridx_short_raw((thr), (((duk_uint_t) (obj_idx)) << 16) + ((duk_uint_t) (stridx)))) + +DUK_INTERNAL_DECL duk_bool_t duk_put_prop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx); /* [val] -> [] */ +DUK_INTERNAL_DECL duk_bool_t duk_put_prop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args); +#define duk_put_prop_stridx_short(thr, obj_idx, stridx) \ + (DUK_ASSERT_EXPR((duk_int_t) (obj_idx) >= -0x8000L && (duk_int_t) (obj_idx) <= 0x7fffL), \ + DUK_ASSERT_EXPR((duk_int_t) (stridx) >= 0 && (duk_int_t) (stridx) <= 0xffffL), \ + duk_put_prop_stridx_short_raw((thr), (((duk_uint_t) (obj_idx)) << 16) + ((duk_uint_t) (stridx)))) + +DUK_INTERNAL_DECL duk_bool_t duk_del_prop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx); /* [] -> [] */ +#if 0 /* Too few call sites to be useful. */ +DUK_INTERNAL_DECL duk_bool_t duk_del_prop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args); +#define duk_del_prop_stridx_short(thr, obj_idx, stridx) \ + (DUK_ASSERT_EXPR((obj_idx) >= -0x8000L && (obj_idx) <= 0x7fffL), \ + DUK_ASSERT_EXPR((stridx) >= 0 && (stridx) <= 0xffffL), \ + duk_del_prop_stridx_short_raw((thr), (((duk_uint_t) (obj_idx)) << 16) + ((duk_uint_t) (stridx)))) +#endif +#define duk_del_prop_stridx_short(thr, obj_idx, stridx) duk_del_prop_stridx((thr), (obj_idx), (stridx)) + +DUK_INTERNAL_DECL duk_bool_t duk_has_prop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx); /* [] -> [] */ +#if 0 /* Too few call sites to be useful. */ +DUK_INTERNAL_DECL duk_bool_t duk_has_prop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args); +#define duk_has_prop_stridx_short(thr, obj_idx, stridx) \ + (DUK_ASSERT_EXPR((obj_idx) >= -0x8000L && (obj_idx) <= 0x7fffL), \ + DUK_ASSERT_EXPR((stridx) >= 0 && (stridx) <= 0xffffL), \ + duk_has_prop_stridx_short_raw((thr), (((duk_uint_t) (obj_idx)) << 16) + ((duk_uint_t) (stridx)))) +#endif +#define duk_has_prop_stridx_short(thr, obj_idx, stridx) duk_has_prop_stridx((thr), (obj_idx), (stridx)) + +DUK_INTERNAL_DECL void duk_xdef_prop(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t desc_flags); /* [key val] -> [] */ + +DUK_INTERNAL_DECL void duk_xdef_prop_index(duk_hthread *thr, + duk_idx_t obj_idx, + duk_uarridx_t arr_idx, + duk_small_uint_t desc_flags); /* [val] -> [] */ + +/* XXX: Because stridx and desc_flags have a limited range, this call could + * always pack stridx and desc_flags into a single argument. + */ +DUK_INTERNAL_DECL void duk_xdef_prop_stridx(duk_hthread *thr, + duk_idx_t obj_idx, + duk_small_uint_t stridx, + duk_small_uint_t desc_flags); /* [val] -> [] */ +DUK_INTERNAL_DECL void duk_xdef_prop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args); +#define duk_xdef_prop_stridx_short(thr, obj_idx, stridx, desc_flags) \ + (DUK_ASSERT_EXPR((duk_int_t) (obj_idx) >= -0x80L && (duk_int_t) (obj_idx) <= 0x7fL), \ + DUK_ASSERT_EXPR((duk_int_t) (stridx) >= 0 && (duk_int_t) (stridx) <= 0xffffL), \ + DUK_ASSERT_EXPR((duk_int_t) (desc_flags) >= 0 && (duk_int_t) (desc_flags) <= 0xffL), \ + duk_xdef_prop_stridx_short_raw((thr), \ + (((duk_uint_t) (obj_idx)) << 24) + (((duk_uint_t) (stridx)) << 8) + \ + (duk_uint_t) (desc_flags))) + +#define duk_xdef_prop_wec(thr, obj_idx) duk_xdef_prop((thr), (obj_idx), DUK_PROPDESC_FLAGS_WEC) +#define duk_xdef_prop_index_wec(thr, obj_idx, arr_idx) duk_xdef_prop_index((thr), (obj_idx), (arr_idx), DUK_PROPDESC_FLAGS_WEC) +#define duk_xdef_prop_stridx_wec(thr, obj_idx, stridx) duk_xdef_prop_stridx((thr), (obj_idx), (stridx), DUK_PROPDESC_FLAGS_WEC) +#define duk_xdef_prop_stridx_short_wec(thr, obj_idx, stridx) \ + duk_xdef_prop_stridx_short((thr), (obj_idx), (stridx), DUK_PROPDESC_FLAGS_WEC) + +#if 0 /*unused*/ +DUK_INTERNAL_DECL void duk_xdef_prop_stridx_builtin(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx, duk_small_int_t builtin_idx, duk_small_uint_t desc_flags); /* [] -> [] */ +#endif + +DUK_INTERNAL_DECL void duk_xdef_prop_stridx_thrower(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx); /* [] -> [] */ + +DUK_INTERNAL_DECL duk_bool_t duk_get_method_stridx(duk_hthread *thr, duk_idx_t idx, duk_small_uint_t stridx); + +DUK_INTERNAL_DECL void duk_pack(duk_hthread *thr, duk_idx_t count); +DUK_INTERNAL_DECL duk_idx_t duk_unpack_array_like(duk_hthread *thr, duk_idx_t idx); +#if 0 +DUK_INTERNAL_DECL void duk_unpack(duk_hthread *thr); +#endif + +DUK_INTERNAL_DECL void duk_push_symbol_descriptive_string(duk_hthread *thr, duk_hstring *h); + +DUK_INTERNAL_DECL void duk_resolve_nonbound_function(duk_hthread *thr); + +DUK_INTERNAL_DECL duk_idx_t duk_get_top_require_min(duk_hthread *thr, duk_idx_t min_top); +DUK_INTERNAL_DECL duk_idx_t duk_get_top_index_unsafe(duk_hthread *thr); + +DUK_INTERNAL_DECL void duk_pop_n_unsafe(duk_hthread *thr, duk_idx_t count); +DUK_INTERNAL_DECL void duk_pop_unsafe(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_pop_2_unsafe(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_pop_3_unsafe(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_pop_n_nodecref_unsafe(duk_hthread *thr, duk_idx_t count); +DUK_INTERNAL_DECL void duk_pop_nodecref_unsafe(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_pop_2_nodecref_unsafe(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_pop_3_nodecref_unsafe(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_pop_undefined(duk_hthread *thr); + +DUK_INTERNAL_DECL void duk_compact_m1(duk_hthread *thr); + +DUK_INTERNAL_DECL void duk_seal_freeze_raw(duk_hthread *thr, duk_idx_t obj_idx, duk_bool_t is_freeze); + +DUK_INTERNAL_DECL void duk_insert_undefined(duk_hthread *thr, duk_idx_t idx); +DUK_INTERNAL_DECL void duk_insert_undefined_n(duk_hthread *thr, duk_idx_t idx, duk_idx_t count); + +DUK_INTERNAL_DECL void duk_concat_2(duk_hthread *thr); + +DUK_INTERNAL_DECL duk_int_t duk_pcall_method_flags(duk_hthread *thr, duk_idx_t nargs, duk_small_uint_t call_flags); + +#if defined(DUK_USE_SYMBOL_BUILTIN) +DUK_INTERNAL_DECL void duk_to_primitive_ordinary(duk_hthread *thr, duk_idx_t idx, duk_int_t hint); +#endif + +DUK_INTERNAL_DECL void duk_clear_prototype(duk_hthread *thr, duk_idx_t idx); + +/* Raw internal valstack access macros: access is unsafe so call site + * must have a guarantee that the index is valid. When that is the case, + * using these macro results in faster and smaller code than duk_get_tval(). + * Both 'ctx' and 'idx' are evaluted multiple times, but only for asserts. + */ +#define DUK_ASSERT_VALID_NEGIDX(thr, idx) \ + (DUK_ASSERT_EXPR((duk_int_t) (idx) < 0), DUK_ASSERT_EXPR(duk_is_valid_index((thr), (idx)))) +#define DUK_ASSERT_VALID_POSIDX(thr, idx) \ + (DUK_ASSERT_EXPR((duk_int_t) (idx) >= 0), DUK_ASSERT_EXPR(duk_is_valid_index((thr), (idx)))) +#define DUK_GET_TVAL_NEGIDX(thr, idx) (DUK_ASSERT_VALID_NEGIDX((thr), (idx)), ((duk_hthread *) (thr))->valstack_top + (idx)) +#define DUK_GET_TVAL_POSIDX(thr, idx) (DUK_ASSERT_VALID_POSIDX((thr), (idx)), ((duk_hthread *) (thr))->valstack_bottom + (idx)) +#define DUK_GET_HOBJECT_NEGIDX(thr, idx) \ + (DUK_ASSERT_VALID_NEGIDX((thr), (idx)), DUK_TVAL_GET_OBJECT(((duk_hthread *) (thr))->valstack_top + (idx))) +#define DUK_GET_HOBJECT_POSIDX(thr, idx) \ + (DUK_ASSERT_VALID_POSIDX((thr), (idx)), DUK_TVAL_GET_OBJECT(((duk_hthread *) (thr))->valstack_bottom + (idx))) + +#define DUK_GET_THIS_TVAL_PTR(thr) (DUK_ASSERT_EXPR((thr)->valstack_bottom > (thr)->valstack), (thr)->valstack_bottom - 1) + +DUK_INTERNAL_DECL duk_double_t duk_time_get_ecmascript_time(duk_hthread *thr); +DUK_INTERNAL_DECL duk_double_t duk_time_get_ecmascript_time_nofrac(duk_hthread *thr); +DUK_INTERNAL_DECL duk_double_t duk_time_get_monotonic_time(duk_hthread *thr); + +#endif /* DUK_API_INTERNAL_H_INCLUDED */ +/* #include duk_hstring.h */ +#line 1 "duk_hstring.h" +/* + * Heap string representation. + * + * Strings are byte sequences ordinarily stored in extended UTF-8 format, + * allowing values larger than the official UTF-8 range (used internally) + * and also allowing UTF-8 encoding of surrogate pairs (CESU-8 format). + * Strings may also be invalid UTF-8 altogether which is the case e.g. with + * strings used as internal property names and raw buffers converted to + * strings. In such cases the 'clen' field contains an inaccurate value. + * + * ECMAScript requires support for 32-bit long strings. However, since each + * 16-bit codepoint can take 3 bytes in CESU-8, this representation can only + * support about 1.4G codepoint long strings in extreme cases. This is not + * really a practical issue. + */ + +#if !defined(DUK_HSTRING_H_INCLUDED) +#define DUK_HSTRING_H_INCLUDED + +/* Impose a maximum string length for now. Restricted artificially to + * ensure adding a heap header length won't overflow size_t. The limit + * should be synchronized with DUK_HBUFFER_MAX_BYTELEN. + * + * E5.1 makes provisions to support strings longer than 4G characters. + * This limit should be eliminated on 64-bit platforms (and increased + * closer to maximum support on 32-bit platforms). + */ + +#if defined(DUK_USE_STRLEN16) +#define DUK_HSTRING_MAX_BYTELEN (0x0000ffffUL) +#else +#define DUK_HSTRING_MAX_BYTELEN (0x7fffffffUL) +#endif + +/* XXX: could add flags for "is valid CESU-8" (ECMAScript compatible strings), + * "is valid UTF-8", "is valid extended UTF-8" (internal strings are not, + * regexp bytecode is), and "contains non-BMP characters". These are not + * needed right now. + */ + +/* With lowmem builds the high 16 bits of duk_heaphdr are used for other + * purposes, so this leaves 7 duk_heaphdr flags and 9 duk_hstring flags. + */ +#define DUK_HSTRING_FLAG_ASCII DUK_HEAPHDR_USER_FLAG(0) /* string is ASCII, clen == blen */ +#define DUK_HSTRING_FLAG_ARRIDX DUK_HEAPHDR_USER_FLAG(1) /* string is a valid array index */ +#define DUK_HSTRING_FLAG_SYMBOL DUK_HEAPHDR_USER_FLAG(2) /* string is a symbol (invalid utf-8) */ +#define DUK_HSTRING_FLAG_HIDDEN \ + DUK_HEAPHDR_USER_FLAG(3) /* string is a hidden symbol (implies symbol, Duktape 1.x internal string) */ +#define DUK_HSTRING_FLAG_RESERVED_WORD DUK_HEAPHDR_USER_FLAG(4) /* string is a reserved word (non-strict) */ +#define DUK_HSTRING_FLAG_STRICT_RESERVED_WORD DUK_HEAPHDR_USER_FLAG(5) /* string is a reserved word (strict) */ +#define DUK_HSTRING_FLAG_EVAL_OR_ARGUMENTS DUK_HEAPHDR_USER_FLAG(6) /* string is 'eval' or 'arguments' */ +#define DUK_HSTRING_FLAG_EXTDATA DUK_HEAPHDR_USER_FLAG(7) /* string data is external (duk_hstring_external) */ +#define DUK_HSTRING_FLAG_PINNED_LITERAL DUK_HEAPHDR_USER_FLAG(8) /* string is a literal, and pinned */ + +#define DUK_HSTRING_HAS_ASCII(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_ASCII) +#define DUK_HSTRING_HAS_ARRIDX(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_ARRIDX) +#define DUK_HSTRING_HAS_SYMBOL(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_SYMBOL) +#define DUK_HSTRING_HAS_HIDDEN(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_HIDDEN) +#define DUK_HSTRING_HAS_RESERVED_WORD(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_RESERVED_WORD) +#define DUK_HSTRING_HAS_STRICT_RESERVED_WORD(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_STRICT_RESERVED_WORD) +#define DUK_HSTRING_HAS_EVAL_OR_ARGUMENTS(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_EVAL_OR_ARGUMENTS) +#define DUK_HSTRING_HAS_EXTDATA(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_EXTDATA) +#define DUK_HSTRING_HAS_PINNED_LITERAL(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_PINNED_LITERAL) + +#define DUK_HSTRING_SET_ASCII(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_ASCII) +#define DUK_HSTRING_SET_ARRIDX(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_ARRIDX) +#define DUK_HSTRING_SET_SYMBOL(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_SYMBOL) +#define DUK_HSTRING_SET_HIDDEN(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_HIDDEN) +#define DUK_HSTRING_SET_RESERVED_WORD(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_RESERVED_WORD) +#define DUK_HSTRING_SET_STRICT_RESERVED_WORD(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_STRICT_RESERVED_WORD) +#define DUK_HSTRING_SET_EVAL_OR_ARGUMENTS(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_EVAL_OR_ARGUMENTS) +#define DUK_HSTRING_SET_EXTDATA(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_EXTDATA) +#define DUK_HSTRING_SET_PINNED_LITERAL(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_PINNED_LITERAL) + +#define DUK_HSTRING_CLEAR_ASCII(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_ASCII) +#define DUK_HSTRING_CLEAR_ARRIDX(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_ARRIDX) +#define DUK_HSTRING_CLEAR_SYMBOL(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_SYMBOL) +#define DUK_HSTRING_CLEAR_HIDDEN(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_HIDDEN) +#define DUK_HSTRING_CLEAR_RESERVED_WORD(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_RESERVED_WORD) +#define DUK_HSTRING_CLEAR_STRICT_RESERVED_WORD(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_STRICT_RESERVED_WORD) +#define DUK_HSTRING_CLEAR_EVAL_OR_ARGUMENTS(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_EVAL_OR_ARGUMENTS) +#define DUK_HSTRING_CLEAR_EXTDATA(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_EXTDATA) +#define DUK_HSTRING_CLEAR_PINNED_LITERAL(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HSTRING_FLAG_PINNED_LITERAL) + +#if 0 /* Slightly smaller code without explicit flag, but explicit flag \ + * is very useful when 'clen' is dropped. \ + */ +#define DUK_HSTRING_IS_ASCII(x) (DUK_HSTRING_GET_BYTELEN((x)) == DUK_HSTRING_GET_CHARLEN((x))) +#endif +#define DUK_HSTRING_IS_ASCII(x) DUK_HSTRING_HAS_ASCII((x)) /* lazily set! */ +#define DUK_HSTRING_IS_EMPTY(x) (DUK_HSTRING_GET_BYTELEN((x)) == 0) + +#if defined(DUK_USE_STRHASH16) +#define DUK_HSTRING_GET_HASH(x) ((x)->hdr.h_flags >> 16) +#define DUK_HSTRING_SET_HASH(x, v) \ + do { \ + (x)->hdr.h_flags = ((x)->hdr.h_flags & 0x0000ffffUL) | ((v) << 16); \ + } while (0) +#else +#define DUK_HSTRING_GET_HASH(x) ((x)->hash) +#define DUK_HSTRING_SET_HASH(x, v) \ + do { \ + (x)->hash = (v); \ + } while (0) +#endif + +#if defined(DUK_USE_STRLEN16) +#define DUK_HSTRING_GET_BYTELEN(x) ((x)->hdr.h_strextra16) +#define DUK_HSTRING_SET_BYTELEN(x, v) \ + do { \ + (x)->hdr.h_strextra16 = (v); \ + } while (0) +#if defined(DUK_USE_HSTRING_CLEN) +#define DUK_HSTRING_GET_CHARLEN(x) duk_hstring_get_charlen((x)) +#define DUK_HSTRING_SET_CHARLEN(x, v) \ + do { \ + (x)->clen16 = (v); \ + } while (0) +#else +#define DUK_HSTRING_GET_CHARLEN(x) duk_hstring_get_charlen((x)) +#define DUK_HSTRING_SET_CHARLEN(x, v) \ + do { \ + DUK_ASSERT(0); /* should never be called */ \ + } while (0) +#endif +#else +#define DUK_HSTRING_GET_BYTELEN(x) ((x)->blen) +#define DUK_HSTRING_SET_BYTELEN(x, v) \ + do { \ + (x)->blen = (v); \ + } while (0) +#define DUK_HSTRING_GET_CHARLEN(x) duk_hstring_get_charlen((x)) +#define DUK_HSTRING_SET_CHARLEN(x, v) \ + do { \ + (x)->clen = (v); \ + } while (0) +#endif + +#if defined(DUK_USE_HSTRING_EXTDATA) +#define DUK_HSTRING_GET_EXTDATA(x) ((x)->extdata) +#define DUK_HSTRING_GET_DATA(x) \ + (DUK_HSTRING_HAS_EXTDATA((x)) ? DUK_HSTRING_GET_EXTDATA((const duk_hstring_external *) (x)) : \ + ((const duk_uint8_t *) ((x) + 1))) +#else +#define DUK_HSTRING_GET_DATA(x) ((const duk_uint8_t *) ((x) + 1)) +#endif + +#define DUK_HSTRING_GET_DATA_END(x) (DUK_HSTRING_GET_DATA((x)) + (x)->blen) + +/* Marker value; in E5 2^32-1 is not a valid array index (2^32-2 is highest + * valid). + */ +#define DUK_HSTRING_NO_ARRAY_INDEX (0xffffffffUL) + +#if defined(DUK_USE_HSTRING_ARRIDX) +#define DUK_HSTRING_GET_ARRIDX_FAST(h) ((h)->arridx) +#define DUK_HSTRING_GET_ARRIDX_SLOW(h) ((h)->arridx) +#else +/* Get array index related to string (or return DUK_HSTRING_NO_ARRAY_INDEX); + * avoids helper call if string has no array index value. + */ +#define DUK_HSTRING_GET_ARRIDX_FAST(h) \ + (DUK_HSTRING_HAS_ARRIDX((h)) ? duk_js_to_arrayindex_hstring_fast_known((h)) : DUK_HSTRING_NO_ARRAY_INDEX) + +/* Slower but more compact variant. */ +#define DUK_HSTRING_GET_ARRIDX_SLOW(h) (duk_js_to_arrayindex_hstring_fast((h))) +#endif + +/* XXX: these actually fit into duk_hstring */ +#define DUK_SYMBOL_TYPE_HIDDEN 0 +#define DUK_SYMBOL_TYPE_GLOBAL 1 +#define DUK_SYMBOL_TYPE_LOCAL 2 +#define DUK_SYMBOL_TYPE_WELLKNOWN 3 + +/* Assertion for duk_hstring validity. */ +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_hstring_assert_valid(duk_hstring *h); +#define DUK_HSTRING_ASSERT_VALID(h) \ + do { \ + duk_hstring_assert_valid((h)); \ + } while (0) +#else +#define DUK_HSTRING_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +/* + * Misc + */ + +struct duk_hstring { + /* Smaller heaphdr than for other objects, because strings are held + * in string intern table which requires no link pointers. Much of + * the 32-bit flags field is unused by flags, so we can stuff a 16-bit + * field in there. + */ + duk_heaphdr_string hdr; + + /* String hash. */ +#if defined(DUK_USE_STRHASH16) + /* If 16-bit hash is in use, stuff it into duk_heaphdr_string flags. */ +#else + duk_uint32_t hash; +#endif + + /* Precomputed array index (or DUK_HSTRING_NO_ARRAY_INDEX). */ +#if defined(DUK_USE_HSTRING_ARRIDX) + duk_uarridx_t arridx; +#endif + + /* Length in bytes (not counting NUL term). */ +#if defined(DUK_USE_STRLEN16) + /* placed in duk_heaphdr_string */ +#else + duk_uint32_t blen; +#endif + + /* Length in codepoints (must be E5 compatible). */ +#if defined(DUK_USE_STRLEN16) +#if defined(DUK_USE_HSTRING_CLEN) + duk_uint16_t clen16; +#else + /* computed live */ +#endif +#else + duk_uint32_t clen; +#endif + + /* + * String data of 'blen+1' bytes follows (+1 for NUL termination + * convenience for C API). No alignment needs to be guaranteed + * for strings, but fields above should guarantee alignment-by-4 + * (but not alignment-by-8). + */ +}; + +/* The external string struct is defined even when the feature is inactive. */ +struct duk_hstring_external { + duk_hstring str; + + /* + * For an external string, the NUL-terminated string data is stored + * externally. The user must guarantee that data behind this pointer + * doesn't change while it's used. + */ + + const duk_uint8_t *extdata; +}; + +/* + * Prototypes + */ + +DUK_INTERNAL_DECL duk_ucodepoint_t duk_hstring_char_code_at_raw(duk_hthread *thr, + duk_hstring *h, + duk_uint_t pos, + duk_bool_t surrogate_aware); +DUK_INTERNAL_DECL duk_bool_t duk_hstring_equals_ascii_cstring(duk_hstring *h, const char *cstr); +DUK_INTERNAL_DECL duk_size_t duk_hstring_get_charlen(duk_hstring *h); +#if !defined(DUK_USE_HSTRING_LAZY_CLEN) +DUK_INTERNAL_DECL void duk_hstring_init_charlen(duk_hstring *h); +#endif + +#endif /* DUK_HSTRING_H_INCLUDED */ +/* #include duk_hobject.h */ +#line 1 "duk_hobject.h" +/* + * Heap object representation. + * + * Heap objects are used for ECMAScript objects, arrays, and functions, + * but also for internal control like declarative and object environment + * records. Compiled functions, native functions, and threads are also + * objects but with an extended C struct. + * + * Objects provide the required ECMAScript semantics and exotic behaviors + * especially for property access. + * + * Properties are stored in three conceptual parts: + * + * 1. A linear 'entry part' contains ordered key-value-attributes triples + * and is the main method of string properties. + * + * 2. An optional linear 'array part' is used for array objects to store a + * (dense) range of [0,N[ array indexed entries with default attributes + * (writable, enumerable, configurable). If the array part would become + * sparse or non-default attributes are required, the array part is + * abandoned and moved to the 'entry part'. + * + * 3. An optional 'hash part' is used to optimize lookups of the entry + * part; it is used only for objects with sufficiently many properties + * and can be abandoned without loss of information. + * + * These three conceptual parts are stored in a single memory allocated area. + * This minimizes memory allocation overhead but also means that all three + * parts are resized together, and makes property access a bit complicated. + */ + +#if !defined(DUK_HOBJECT_H_INCLUDED) +#define DUK_HOBJECT_H_INCLUDED + +/* Object flags. Make sure this stays in sync with debugger object + * inspection code. + */ + +/* XXX: some flags are object subtype specific (e.g. common to all function + * subtypes, duk_harray, etc) and could be reused for different subtypes. + */ +#define DUK_HOBJECT_FLAG_EXTENSIBLE DUK_HEAPHDR_USER_FLAG(0) /* object is extensible */ +#define DUK_HOBJECT_FLAG_CONSTRUCTABLE DUK_HEAPHDR_USER_FLAG(1) /* object is constructable */ +#define DUK_HOBJECT_FLAG_CALLABLE DUK_HEAPHDR_USER_FLAG(2) /* object is callable */ +#define DUK_HOBJECT_FLAG_BOUNDFUNC DUK_HEAPHDR_USER_FLAG(3) /* object established using Function.prototype.bind() */ +#define DUK_HOBJECT_FLAG_COMPFUNC DUK_HEAPHDR_USER_FLAG(4) /* object is a compiled function (duk_hcompfunc) */ +#define DUK_HOBJECT_FLAG_NATFUNC DUK_HEAPHDR_USER_FLAG(5) /* object is a native function (duk_hnatfunc) */ +#define DUK_HOBJECT_FLAG_BUFOBJ DUK_HEAPHDR_USER_FLAG(6) /* object is a buffer object (duk_hbufobj) (always exotic) */ +#define DUK_HOBJECT_FLAG_FASTREFS \ + DUK_HEAPHDR_USER_FLAG(7) /* object has no fields needing DECREF/marking beyond base duk_hobject header */ +#define DUK_HOBJECT_FLAG_ARRAY_PART DUK_HEAPHDR_USER_FLAG(8) /* object has an array part (a_size may still be 0) */ +#define DUK_HOBJECT_FLAG_STRICT DUK_HEAPHDR_USER_FLAG(9) /* function: function object is strict */ +#define DUK_HOBJECT_FLAG_NOTAIL DUK_HEAPHDR_USER_FLAG(10) /* function: function must not be tail called */ +#define DUK_HOBJECT_FLAG_NEWENV DUK_HEAPHDR_USER_FLAG(11) /* function: create new environment when called (see duk_hcompfunc) */ +#define DUK_HOBJECT_FLAG_NAMEBINDING \ + DUK_HEAPHDR_USER_FLAG( \ + 12) /* function: create binding for func name (function templates only, used for named function expressions) */ +#define DUK_HOBJECT_FLAG_CREATEARGS DUK_HEAPHDR_USER_FLAG(13) /* function: create an arguments object on function call */ +#define DUK_HOBJECT_FLAG_HAVE_FINALIZER DUK_HEAPHDR_USER_FLAG(14) /* object has a callable (own) finalizer property */ +#define DUK_HOBJECT_FLAG_EXOTIC_ARRAY DUK_HEAPHDR_USER_FLAG(15) /* 'Array' object, array length and index exotic behavior */ +#define DUK_HOBJECT_FLAG_EXOTIC_STRINGOBJ DUK_HEAPHDR_USER_FLAG(16) /* 'String' object, array index exotic behavior */ +#define DUK_HOBJECT_FLAG_EXOTIC_ARGUMENTS \ + DUK_HEAPHDR_USER_FLAG(17) /* 'Arguments' object and has arguments exotic behavior (non-strict callee) */ +#define DUK_HOBJECT_FLAG_EXOTIC_PROXYOBJ DUK_HEAPHDR_USER_FLAG(18) /* 'Proxy' object */ +#define DUK_HOBJECT_FLAG_SPECIAL_CALL DUK_HEAPHDR_USER_FLAG(19) /* special casing in call behavior, for .call(), .apply(), etc. */ + +#define DUK_HOBJECT_FLAG_CLASS_BASE DUK_HEAPHDR_USER_FLAG_NUMBER(20) +#define DUK_HOBJECT_FLAG_CLASS_BITS 5 + +#define DUK_HOBJECT_GET_CLASS_NUMBER(h) \ + DUK_HEAPHDR_GET_FLAG_RANGE(&(h)->hdr, DUK_HOBJECT_FLAG_CLASS_BASE, DUK_HOBJECT_FLAG_CLASS_BITS) +#define DUK_HOBJECT_SET_CLASS_NUMBER(h, v) \ + DUK_HEAPHDR_SET_FLAG_RANGE(&(h)->hdr, DUK_HOBJECT_FLAG_CLASS_BASE, DUK_HOBJECT_FLAG_CLASS_BITS, (v)) + +#define DUK_HOBJECT_GET_CLASS_MASK(h) \ + (1UL << DUK_HEAPHDR_GET_FLAG_RANGE(&(h)->hdr, DUK_HOBJECT_FLAG_CLASS_BASE, DUK_HOBJECT_FLAG_CLASS_BITS)) + +/* Macro for creating flag initializer from a class number. + * Unsigned type cast is needed to avoid warnings about coercing + * a signed integer to an unsigned one; the largest class values + * have the highest bit (bit 31) set which causes this. + */ +#define DUK_HOBJECT_CLASS_AS_FLAGS(v) (((duk_uint_t) (v)) << DUK_HOBJECT_FLAG_CLASS_BASE) + +/* E5 Section 8.6.2 + custom classes */ +#define DUK_HOBJECT_CLASS_NONE 0 +#define DUK_HOBJECT_CLASS_OBJECT 1 +#define DUK_HOBJECT_CLASS_ARRAY 2 +#define DUK_HOBJECT_CLASS_FUNCTION 3 +#define DUK_HOBJECT_CLASS_ARGUMENTS 4 +#define DUK_HOBJECT_CLASS_BOOLEAN 5 +#define DUK_HOBJECT_CLASS_DATE 6 +#define DUK_HOBJECT_CLASS_ERROR 7 +#define DUK_HOBJECT_CLASS_JSON 8 +#define DUK_HOBJECT_CLASS_MATH 9 +#define DUK_HOBJECT_CLASS_NUMBER 10 +#define DUK_HOBJECT_CLASS_REGEXP 11 +#define DUK_HOBJECT_CLASS_STRING 12 +#define DUK_HOBJECT_CLASS_GLOBAL 13 +#define DUK_HOBJECT_CLASS_SYMBOL 14 +#define DUK_HOBJECT_CLASS_OBJENV 15 /* custom */ +#define DUK_HOBJECT_CLASS_DECENV 16 /* custom */ +#define DUK_HOBJECT_CLASS_POINTER 17 /* custom */ +#define DUK_HOBJECT_CLASS_THREAD 18 /* custom; implies DUK_HOBJECT_IS_THREAD */ +#define DUK_HOBJECT_CLASS_BUFOBJ_MIN 19 +#define DUK_HOBJECT_CLASS_ARRAYBUFFER 19 /* implies DUK_HOBJECT_IS_BUFOBJ */ +#define DUK_HOBJECT_CLASS_DATAVIEW 20 +#define DUK_HOBJECT_CLASS_INT8ARRAY 21 +#define DUK_HOBJECT_CLASS_UINT8ARRAY 22 +#define DUK_HOBJECT_CLASS_UINT8CLAMPEDARRAY 23 +#define DUK_HOBJECT_CLASS_INT16ARRAY 24 +#define DUK_HOBJECT_CLASS_UINT16ARRAY 25 +#define DUK_HOBJECT_CLASS_INT32ARRAY 26 +#define DUK_HOBJECT_CLASS_UINT32ARRAY 27 +#define DUK_HOBJECT_CLASS_FLOAT32ARRAY 28 +#define DUK_HOBJECT_CLASS_FLOAT64ARRAY 29 +#define DUK_HOBJECT_CLASS_BUFOBJ_MAX 29 +#define DUK_HOBJECT_CLASS_MAX 29 + +/* Class masks. */ +#define DUK_HOBJECT_CMASK_ALL ((1UL << (DUK_HOBJECT_CLASS_MAX + 1)) - 1UL) +#define DUK_HOBJECT_CMASK_NONE (1UL << DUK_HOBJECT_CLASS_NONE) +#define DUK_HOBJECT_CMASK_ARGUMENTS (1UL << DUK_HOBJECT_CLASS_ARGUMENTS) +#define DUK_HOBJECT_CMASK_ARRAY (1UL << DUK_HOBJECT_CLASS_ARRAY) +#define DUK_HOBJECT_CMASK_BOOLEAN (1UL << DUK_HOBJECT_CLASS_BOOLEAN) +#define DUK_HOBJECT_CMASK_DATE (1UL << DUK_HOBJECT_CLASS_DATE) +#define DUK_HOBJECT_CMASK_ERROR (1UL << DUK_HOBJECT_CLASS_ERROR) +#define DUK_HOBJECT_CMASK_FUNCTION (1UL << DUK_HOBJECT_CLASS_FUNCTION) +#define DUK_HOBJECT_CMASK_JSON (1UL << DUK_HOBJECT_CLASS_JSON) +#define DUK_HOBJECT_CMASK_MATH (1UL << DUK_HOBJECT_CLASS_MATH) +#define DUK_HOBJECT_CMASK_NUMBER (1UL << DUK_HOBJECT_CLASS_NUMBER) +#define DUK_HOBJECT_CMASK_OBJECT (1UL << DUK_HOBJECT_CLASS_OBJECT) +#define DUK_HOBJECT_CMASK_REGEXP (1UL << DUK_HOBJECT_CLASS_REGEXP) +#define DUK_HOBJECT_CMASK_STRING (1UL << DUK_HOBJECT_CLASS_STRING) +#define DUK_HOBJECT_CMASK_GLOBAL (1UL << DUK_HOBJECT_CLASS_GLOBAL) +#define DUK_HOBJECT_CMASK_SYMBOL (1UL << DUK_HOBJECT_CLASS_SYMBOL) +#define DUK_HOBJECT_CMASK_OBJENV (1UL << DUK_HOBJECT_CLASS_OBJENV) +#define DUK_HOBJECT_CMASK_DECENV (1UL << DUK_HOBJECT_CLASS_DECENV) +#define DUK_HOBJECT_CMASK_POINTER (1UL << DUK_HOBJECT_CLASS_POINTER) +#define DUK_HOBJECT_CMASK_ARRAYBUFFER (1UL << DUK_HOBJECT_CLASS_ARRAYBUFFER) +#define DUK_HOBJECT_CMASK_DATAVIEW (1UL << DUK_HOBJECT_CLASS_DATAVIEW) +#define DUK_HOBJECT_CMASK_INT8ARRAY (1UL << DUK_HOBJECT_CLASS_INT8ARRAY) +#define DUK_HOBJECT_CMASK_UINT8ARRAY (1UL << DUK_HOBJECT_CLASS_UINT8ARRAY) +#define DUK_HOBJECT_CMASK_UINT8CLAMPEDARRAY (1UL << DUK_HOBJECT_CLASS_UINT8CLAMPEDARRAY) +#define DUK_HOBJECT_CMASK_INT16ARRAY (1UL << DUK_HOBJECT_CLASS_INT16ARRAY) +#define DUK_HOBJECT_CMASK_UINT16ARRAY (1UL << DUK_HOBJECT_CLASS_UINT16ARRAY) +#define DUK_HOBJECT_CMASK_INT32ARRAY (1UL << DUK_HOBJECT_CLASS_INT32ARRAY) +#define DUK_HOBJECT_CMASK_UINT32ARRAY (1UL << DUK_HOBJECT_CLASS_UINT32ARRAY) +#define DUK_HOBJECT_CMASK_FLOAT32ARRAY (1UL << DUK_HOBJECT_CLASS_FLOAT32ARRAY) +#define DUK_HOBJECT_CMASK_FLOAT64ARRAY (1UL << DUK_HOBJECT_CLASS_FLOAT64ARRAY) + +#define DUK_HOBJECT_CMASK_ALL_BUFOBJS \ + (DUK_HOBJECT_CMASK_ARRAYBUFFER | DUK_HOBJECT_CMASK_DATAVIEW | DUK_HOBJECT_CMASK_INT8ARRAY | DUK_HOBJECT_CMASK_UINT8ARRAY | \ + DUK_HOBJECT_CMASK_UINT8CLAMPEDARRAY | DUK_HOBJECT_CMASK_INT16ARRAY | DUK_HOBJECT_CMASK_UINT16ARRAY | \ + DUK_HOBJECT_CMASK_INT32ARRAY | DUK_HOBJECT_CMASK_UINT32ARRAY | DUK_HOBJECT_CMASK_FLOAT32ARRAY | \ + DUK_HOBJECT_CMASK_FLOAT64ARRAY) + +#define DUK_HOBJECT_IS_OBJENV(h) (DUK_HOBJECT_GET_CLASS_NUMBER((h)) == DUK_HOBJECT_CLASS_OBJENV) +#define DUK_HOBJECT_IS_DECENV(h) (DUK_HOBJECT_GET_CLASS_NUMBER((h)) == DUK_HOBJECT_CLASS_DECENV) +#define DUK_HOBJECT_IS_ENV(h) (DUK_HOBJECT_IS_OBJENV((h)) || DUK_HOBJECT_IS_DECENV((h))) +#define DUK_HOBJECT_IS_ARRAY(h) DUK_HOBJECT_HAS_EXOTIC_ARRAY((h)) /* Rely on class Array <=> exotic Array */ +#define DUK_HOBJECT_IS_BOUNDFUNC(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_BOUNDFUNC) +#define DUK_HOBJECT_IS_COMPFUNC(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_COMPFUNC) +#define DUK_HOBJECT_IS_NATFUNC(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NATFUNC) +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +#define DUK_HOBJECT_IS_BUFOBJ(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_BUFOBJ) +#else +#define DUK_HOBJECT_IS_BUFOBJ(h) 0 +#endif +#define DUK_HOBJECT_IS_THREAD(h) (DUK_HOBJECT_GET_CLASS_NUMBER((h)) == DUK_HOBJECT_CLASS_THREAD) +#if defined(DUK_USE_ES6_PROXY) +#define DUK_HOBJECT_IS_PROXY(h) DUK_HOBJECT_HAS_EXOTIC_PROXYOBJ((h)) +#else +#define DUK_HOBJECT_IS_PROXY(h) 0 +#endif + +#define DUK_HOBJECT_IS_NONBOUND_FUNCTION(h) \ + DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_COMPFUNC | DUK_HOBJECT_FLAG_NATFUNC) + +#define DUK_HOBJECT_IS_FUNCTION(h) \ + DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_BOUNDFUNC | DUK_HOBJECT_FLAG_COMPFUNC | DUK_HOBJECT_FLAG_NATFUNC) + +#define DUK_HOBJECT_IS_CALLABLE(h) DUK_HOBJECT_HAS_CALLABLE((h)) + +/* Object has any exotic behavior(s). */ +#define DUK_HOBJECT_EXOTIC_BEHAVIOR_FLAGS \ + (DUK_HOBJECT_FLAG_EXOTIC_ARRAY | DUK_HOBJECT_FLAG_EXOTIC_ARGUMENTS | DUK_HOBJECT_FLAG_EXOTIC_STRINGOBJ | \ + DUK_HOBJECT_FLAG_BUFOBJ | DUK_HOBJECT_FLAG_EXOTIC_PROXYOBJ) +#define DUK_HOBJECT_HAS_EXOTIC_BEHAVIOR(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_EXOTIC_BEHAVIOR_FLAGS) + +/* Object has any virtual properties (not counting Proxy behavior). */ +#define DUK_HOBJECT_VIRTUAL_PROPERTY_FLAGS \ + (DUK_HOBJECT_FLAG_EXOTIC_ARRAY | DUK_HOBJECT_FLAG_EXOTIC_STRINGOBJ | DUK_HOBJECT_FLAG_BUFOBJ) +#define DUK_HOBJECT_HAS_VIRTUAL_PROPERTIES(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_VIRTUAL_PROPERTY_FLAGS) + +#define DUK_HOBJECT_HAS_EXTENSIBLE(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXTENSIBLE) +#define DUK_HOBJECT_HAS_CONSTRUCTABLE(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_CONSTRUCTABLE) +#define DUK_HOBJECT_HAS_CALLABLE(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_CALLABLE) +#define DUK_HOBJECT_HAS_BOUNDFUNC(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_BOUNDFUNC) +#define DUK_HOBJECT_HAS_COMPFUNC(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_COMPFUNC) +#define DUK_HOBJECT_HAS_NATFUNC(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NATFUNC) +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +#define DUK_HOBJECT_HAS_BUFOBJ(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_BUFOBJ) +#else +#define DUK_HOBJECT_HAS_BUFOBJ(h) 0 +#endif +#define DUK_HOBJECT_HAS_FASTREFS(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_FASTREFS) +#define DUK_HOBJECT_HAS_ARRAY_PART(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_ARRAY_PART) +#define DUK_HOBJECT_HAS_STRICT(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_STRICT) +#define DUK_HOBJECT_HAS_NOTAIL(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NOTAIL) +#define DUK_HOBJECT_HAS_NEWENV(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NEWENV) +#define DUK_HOBJECT_HAS_NAMEBINDING(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NAMEBINDING) +#define DUK_HOBJECT_HAS_CREATEARGS(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_CREATEARGS) +#define DUK_HOBJECT_HAS_HAVE_FINALIZER(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_HAVE_FINALIZER) +#define DUK_HOBJECT_HAS_EXOTIC_ARRAY(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_ARRAY) +#define DUK_HOBJECT_HAS_EXOTIC_STRINGOBJ(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_STRINGOBJ) +#define DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_ARGUMENTS) +#if defined(DUK_USE_ES6_PROXY) +#define DUK_HOBJECT_HAS_EXOTIC_PROXYOBJ(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_PROXYOBJ) +#else +#define DUK_HOBJECT_HAS_EXOTIC_PROXYOBJ(h) 0 +#endif +#define DUK_HOBJECT_HAS_SPECIAL_CALL(h) DUK_HEAPHDR_CHECK_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_SPECIAL_CALL) + +#define DUK_HOBJECT_SET_EXTENSIBLE(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXTENSIBLE) +#define DUK_HOBJECT_SET_CONSTRUCTABLE(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_CONSTRUCTABLE) +#define DUK_HOBJECT_SET_CALLABLE(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_CALLABLE) +#define DUK_HOBJECT_SET_BOUNDFUNC(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_BOUNDFUNC) +#define DUK_HOBJECT_SET_COMPFUNC(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_COMPFUNC) +#define DUK_HOBJECT_SET_NATFUNC(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NATFUNC) +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +#define DUK_HOBJECT_SET_BUFOBJ(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_BUFOBJ) +#endif +#define DUK_HOBJECT_SET_FASTREFS(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_FASTREFS) +#define DUK_HOBJECT_SET_ARRAY_PART(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_ARRAY_PART) +#define DUK_HOBJECT_SET_STRICT(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_STRICT) +#define DUK_HOBJECT_SET_NOTAIL(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NOTAIL) +#define DUK_HOBJECT_SET_NEWENV(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NEWENV) +#define DUK_HOBJECT_SET_NAMEBINDING(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NAMEBINDING) +#define DUK_HOBJECT_SET_CREATEARGS(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_CREATEARGS) +#define DUK_HOBJECT_SET_HAVE_FINALIZER(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_HAVE_FINALIZER) +#define DUK_HOBJECT_SET_EXOTIC_ARRAY(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_ARRAY) +#define DUK_HOBJECT_SET_EXOTIC_STRINGOBJ(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_STRINGOBJ) +#define DUK_HOBJECT_SET_EXOTIC_ARGUMENTS(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_ARGUMENTS) +#if defined(DUK_USE_ES6_PROXY) +#define DUK_HOBJECT_SET_EXOTIC_PROXYOBJ(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_PROXYOBJ) +#endif +#define DUK_HOBJECT_SET_SPECIAL_CALL(h) DUK_HEAPHDR_SET_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_SPECIAL_CALL) + +#define DUK_HOBJECT_CLEAR_EXTENSIBLE(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXTENSIBLE) +#define DUK_HOBJECT_CLEAR_CONSTRUCTABLE(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_CONSTRUCTABLE) +#define DUK_HOBJECT_CLEAR_CALLABLE(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_CALLABLE) +#define DUK_HOBJECT_CLEAR_BOUNDFUNC(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_BOUNDFUNC) +#define DUK_HOBJECT_CLEAR_COMPFUNC(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_COMPFUNC) +#define DUK_HOBJECT_CLEAR_NATFUNC(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NATFUNC) +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +#define DUK_HOBJECT_CLEAR_BUFOBJ(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_BUFOBJ) +#endif +#define DUK_HOBJECT_CLEAR_FASTREFS(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_FASTREFS) +#define DUK_HOBJECT_CLEAR_ARRAY_PART(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_ARRAY_PART) +#define DUK_HOBJECT_CLEAR_STRICT(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_STRICT) +#define DUK_HOBJECT_CLEAR_NOTAIL(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NOTAIL) +#define DUK_HOBJECT_CLEAR_NEWENV(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NEWENV) +#define DUK_HOBJECT_CLEAR_NAMEBINDING(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_NAMEBINDING) +#define DUK_HOBJECT_CLEAR_CREATEARGS(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_CREATEARGS) +#define DUK_HOBJECT_CLEAR_HAVE_FINALIZER(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_HAVE_FINALIZER) +#define DUK_HOBJECT_CLEAR_EXOTIC_ARRAY(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_ARRAY) +#define DUK_HOBJECT_CLEAR_EXOTIC_STRINGOBJ(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_STRINGOBJ) +#define DUK_HOBJECT_CLEAR_EXOTIC_ARGUMENTS(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_ARGUMENTS) +#if defined(DUK_USE_ES6_PROXY) +#define DUK_HOBJECT_CLEAR_EXOTIC_PROXYOBJ(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_EXOTIC_PROXYOBJ) +#endif +#define DUK_HOBJECT_CLEAR_SPECIAL_CALL(h) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(h)->hdr, DUK_HOBJECT_FLAG_SPECIAL_CALL) + +/* Object can/cannot use FASTREFS, i.e. has no strong reference fields beyond + * duk_hobject base header. This is used just for asserts so doesn't need to + * be optimized. + */ +#define DUK_HOBJECT_PROHIBITS_FASTREFS(h) \ + (DUK_HOBJECT_IS_COMPFUNC((h)) || DUK_HOBJECT_IS_DECENV((h)) || DUK_HOBJECT_IS_OBJENV((h)) || DUK_HOBJECT_IS_BUFOBJ((h)) || \ + DUK_HOBJECT_IS_THREAD((h)) || DUK_HOBJECT_IS_PROXY((h)) || DUK_HOBJECT_IS_BOUNDFUNC((h))) +#define DUK_HOBJECT_ALLOWS_FASTREFS(h) (!DUK_HOBJECT_PROHIBITS_FASTREFS((h))) + +/* Flags used for property attributes in duk_propdesc and packed flags. + * Must fit into 8 bits. + */ +#define DUK_PROPDESC_FLAG_WRITABLE (1U << 0) /* E5 Section 8.6.1 */ +#define DUK_PROPDESC_FLAG_ENUMERABLE (1U << 1) /* E5 Section 8.6.1 */ +#define DUK_PROPDESC_FLAG_CONFIGURABLE (1U << 2) /* E5 Section 8.6.1 */ +#define DUK_PROPDESC_FLAG_ACCESSOR (1U << 3) /* accessor */ +#define DUK_PROPDESC_FLAG_VIRTUAL \ + (1U << 4) /* property is virtual: used in duk_propdesc, never stored \ + * (used by e.g. buffer virtual properties) \ + */ +#define DUK_PROPDESC_FLAGS_MASK \ + (DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_ENUMERABLE | DUK_PROPDESC_FLAG_CONFIGURABLE | DUK_PROPDESC_FLAG_ACCESSOR) + +/* Additional flags which are passed in the same flags argument as property + * flags but are not stored in object properties. + */ +#define DUK_PROPDESC_FLAG_NO_OVERWRITE (1U << 4) /* internal define property: skip write silently if exists */ + +/* Convenience defines for property attributes. */ +#define DUK_PROPDESC_FLAGS_NONE 0 +#define DUK_PROPDESC_FLAGS_W (DUK_PROPDESC_FLAG_WRITABLE) +#define DUK_PROPDESC_FLAGS_E (DUK_PROPDESC_FLAG_ENUMERABLE) +#define DUK_PROPDESC_FLAGS_C (DUK_PROPDESC_FLAG_CONFIGURABLE) +#define DUK_PROPDESC_FLAGS_WE (DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_ENUMERABLE) +#define DUK_PROPDESC_FLAGS_WC (DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_CONFIGURABLE) +#define DUK_PROPDESC_FLAGS_EC (DUK_PROPDESC_FLAG_ENUMERABLE | DUK_PROPDESC_FLAG_CONFIGURABLE) +#define DUK_PROPDESC_FLAGS_WEC (DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_ENUMERABLE | DUK_PROPDESC_FLAG_CONFIGURABLE) + +/* Flags for duk_hobject_get_own_propdesc() and variants. */ +#define DUK_GETDESC_FLAG_PUSH_VALUE (1U << 0) /* push value to stack */ +#define DUK_GETDESC_FLAG_IGNORE_PROTOLOOP (1U << 1) /* don't throw for prototype loop */ + +/* + * Macro for object validity check + * + * Assert for currently guaranteed relations between flags, for instance. + */ + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_hobject_assert_valid(duk_hobject *h); +#define DUK_HOBJECT_ASSERT_VALID(h) \ + do { \ + duk_hobject_assert_valid((h)); \ + } while (0) +#else +#define DUK_HOBJECT_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +/* + * Macros to access the 'props' allocation. + */ + +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HOBJECT_GET_PROPS(heap, h) ((duk_uint8_t *) DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, ((duk_heaphdr *) (h))->h_extra16)) +#define DUK_HOBJECT_SET_PROPS(heap, h, x) \ + do { \ + ((duk_heaphdr *) (h))->h_extra16 = DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (void *) (x)); \ + } while (0) +#else +#define DUK_HOBJECT_GET_PROPS(heap, h) ((h)->props) +#define DUK_HOBJECT_SET_PROPS(heap, h, x) \ + do { \ + (h)->props = (duk_uint8_t *) (x); \ + } while (0) +#endif + +#if defined(DUK_USE_HOBJECT_LAYOUT_1) +/* LAYOUT 1 */ +#define DUK_HOBJECT_E_GET_KEY_BASE(heap, h) ((duk_hstring **) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)))) +#define DUK_HOBJECT_E_GET_VALUE_BASE(heap, h) \ + ((duk_propvalue *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + DUK_HOBJECT_GET_ESIZE((h)) * sizeof(duk_hstring *))) +#define DUK_HOBJECT_E_GET_FLAGS_BASE(heap, h) \ + ((duk_uint8_t *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + \ + DUK_HOBJECT_GET_ESIZE((h)) * (sizeof(duk_hstring *) + sizeof(duk_propvalue)))) +#define DUK_HOBJECT_A_GET_BASE(heap, h) \ + ((duk_tval *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + \ + DUK_HOBJECT_GET_ESIZE((h)) * \ + (sizeof(duk_hstring *) + sizeof(duk_propvalue) + sizeof(duk_uint8_t)))) +#define DUK_HOBJECT_H_GET_BASE(heap, h) \ + ((duk_uint32_t *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + \ + DUK_HOBJECT_GET_ESIZE((h)) * \ + (sizeof(duk_hstring *) + sizeof(duk_propvalue) + sizeof(duk_uint8_t)) + \ + DUK_HOBJECT_GET_ASIZE((h)) * sizeof(duk_tval))) +#define DUK_HOBJECT_P_COMPUTE_SIZE(n_ent, n_arr, n_hash) \ + ((n_ent) * (sizeof(duk_hstring *) + sizeof(duk_propvalue) + sizeof(duk_uint8_t)) + (n_arr) * sizeof(duk_tval) + \ + (n_hash) * sizeof(duk_uint32_t)) +#define DUK_HOBJECT_P_SET_REALLOC_PTRS(p_base, set_e_k, set_e_pv, set_e_f, set_a, set_h, n_ent, n_arr, n_hash) \ + do { \ + (set_e_k) = (duk_hstring **) (void *) (p_base); \ + (set_e_pv) = (duk_propvalue *) (void *) ((set_e_k) + (n_ent)); \ + (set_e_f) = (duk_uint8_t *) (void *) ((set_e_pv) + (n_ent)); \ + (set_a) = (duk_tval *) (void *) ((set_e_f) + (n_ent)); \ + (set_h) = (duk_uint32_t *) (void *) ((set_a) + (n_arr)); \ + } while (0) +#elif defined(DUK_USE_HOBJECT_LAYOUT_2) +/* LAYOUT 2 */ +#if (DUK_USE_ALIGN_BY == 4) +#define DUK_HOBJECT_E_FLAG_PADDING(e_sz) ((4 - (e_sz)) & 0x03) +#elif (DUK_USE_ALIGN_BY == 8) +#define DUK_HOBJECT_E_FLAG_PADDING(e_sz) ((8 - (e_sz)) & 0x07) +#elif (DUK_USE_ALIGN_BY == 1) +#define DUK_HOBJECT_E_FLAG_PADDING(e_sz) 0 +#else +#error invalid DUK_USE_ALIGN_BY +#endif +#define DUK_HOBJECT_E_GET_KEY_BASE(heap, h) \ + ((duk_hstring **) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + DUK_HOBJECT_GET_ESIZE((h)) * sizeof(duk_propvalue))) +#define DUK_HOBJECT_E_GET_VALUE_BASE(heap, h) ((duk_propvalue *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)))) +#define DUK_HOBJECT_E_GET_FLAGS_BASE(heap, h) \ + ((duk_uint8_t *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + \ + DUK_HOBJECT_GET_ESIZE((h)) * (sizeof(duk_hstring *) + sizeof(duk_propvalue)))) +#define DUK_HOBJECT_A_GET_BASE(heap, h) \ + ((duk_tval *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + \ + DUK_HOBJECT_GET_ESIZE((h)) * \ + (sizeof(duk_hstring *) + sizeof(duk_propvalue) + sizeof(duk_uint8_t)) + \ + DUK_HOBJECT_E_FLAG_PADDING(DUK_HOBJECT_GET_ESIZE((h))))) +#define DUK_HOBJECT_H_GET_BASE(heap, h) \ + ((duk_uint32_t *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + \ + DUK_HOBJECT_GET_ESIZE((h)) * \ + (sizeof(duk_hstring *) + sizeof(duk_propvalue) + sizeof(duk_uint8_t)) + \ + DUK_HOBJECT_E_FLAG_PADDING(DUK_HOBJECT_GET_ESIZE((h))) + \ + DUK_HOBJECT_GET_ASIZE((h)) * sizeof(duk_tval))) +#define DUK_HOBJECT_P_COMPUTE_SIZE(n_ent, n_arr, n_hash) \ + ((n_ent) * (sizeof(duk_hstring *) + sizeof(duk_propvalue) + sizeof(duk_uint8_t)) + DUK_HOBJECT_E_FLAG_PADDING((n_ent)) + \ + (n_arr) * sizeof(duk_tval) + (n_hash) * sizeof(duk_uint32_t)) +#define DUK_HOBJECT_P_SET_REALLOC_PTRS(p_base, set_e_k, set_e_pv, set_e_f, set_a, set_h, n_ent, n_arr, n_hash) \ + do { \ + (set_e_pv) = (duk_propvalue *) (void *) (p_base); \ + (set_e_k) = (duk_hstring **) (void *) ((set_e_pv) + (n_ent)); \ + (set_e_f) = (duk_uint8_t *) (void *) ((set_e_k) + (n_ent)); \ + (set_a) = (duk_tval *) (void *) (((duk_uint8_t *) (set_e_f)) + sizeof(duk_uint8_t) * (n_ent) + \ + DUK_HOBJECT_E_FLAG_PADDING((n_ent))); \ + (set_h) = (duk_uint32_t *) (void *) ((set_a) + (n_arr)); \ + } while (0) +#elif defined(DUK_USE_HOBJECT_LAYOUT_3) +/* LAYOUT 3 */ +#define DUK_HOBJECT_E_GET_KEY_BASE(heap, h) \ + ((duk_hstring **) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + DUK_HOBJECT_GET_ESIZE((h)) * sizeof(duk_propvalue) + \ + DUK_HOBJECT_GET_ASIZE((h)) * sizeof(duk_tval))) +#define DUK_HOBJECT_E_GET_VALUE_BASE(heap, h) ((duk_propvalue *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)))) +#define DUK_HOBJECT_E_GET_FLAGS_BASE(heap, h) \ + ((duk_uint8_t *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + \ + DUK_HOBJECT_GET_ESIZE((h)) * (sizeof(duk_propvalue) + sizeof(duk_hstring *)) + \ + DUK_HOBJECT_GET_ASIZE((h)) * sizeof(duk_tval) + \ + DUK_HOBJECT_GET_HSIZE((h)) * sizeof(duk_uint32_t))) +#define DUK_HOBJECT_A_GET_BASE(heap, h) \ + ((duk_tval *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + DUK_HOBJECT_GET_ESIZE((h)) * sizeof(duk_propvalue))) +#define DUK_HOBJECT_H_GET_BASE(heap, h) \ + ((duk_uint32_t *) (void *) (DUK_HOBJECT_GET_PROPS((heap), (h)) + \ + DUK_HOBJECT_GET_ESIZE((h)) * (sizeof(duk_propvalue) + sizeof(duk_hstring *)) + \ + DUK_HOBJECT_GET_ASIZE((h)) * sizeof(duk_tval))) +#define DUK_HOBJECT_P_COMPUTE_SIZE(n_ent, n_arr, n_hash) \ + ((n_ent) * (sizeof(duk_propvalue) + sizeof(duk_hstring *) + sizeof(duk_uint8_t)) + (n_arr) * sizeof(duk_tval) + \ + (n_hash) * sizeof(duk_uint32_t)) +#define DUK_HOBJECT_P_SET_REALLOC_PTRS(p_base, set_e_k, set_e_pv, set_e_f, set_a, set_h, n_ent, n_arr, n_hash) \ + do { \ + (set_e_pv) = (duk_propvalue *) (void *) (p_base); \ + (set_a) = (duk_tval *) (void *) ((set_e_pv) + (n_ent)); \ + (set_e_k) = (duk_hstring **) (void *) ((set_a) + (n_arr)); \ + (set_h) = (duk_uint32_t *) (void *) ((set_e_k) + (n_ent)); \ + (set_e_f) = (duk_uint8_t *) (void *) ((set_h) + (n_hash)); \ + } while (0) +#else +#error invalid hobject layout defines +#endif /* hobject property layout */ + +#define DUK_HOBJECT_P_ALLOC_SIZE(h) \ + DUK_HOBJECT_P_COMPUTE_SIZE(DUK_HOBJECT_GET_ESIZE((h)), DUK_HOBJECT_GET_ASIZE((h)), DUK_HOBJECT_GET_HSIZE((h))) + +#define DUK_HOBJECT_E_GET_KEY(heap, h, i) (DUK_HOBJECT_E_GET_KEY_BASE((heap), (h))[(i)]) +#define DUK_HOBJECT_E_GET_KEY_PTR(heap, h, i) (&DUK_HOBJECT_E_GET_KEY_BASE((heap), (h))[(i)]) +#define DUK_HOBJECT_E_GET_VALUE(heap, h, i) (DUK_HOBJECT_E_GET_VALUE_BASE((heap), (h))[(i)]) +#define DUK_HOBJECT_E_GET_VALUE_PTR(heap, h, i) (&DUK_HOBJECT_E_GET_VALUE_BASE((heap), (h))[(i)]) +#define DUK_HOBJECT_E_GET_VALUE_TVAL(heap, h, i) (DUK_HOBJECT_E_GET_VALUE((heap), (h), (i)).v) +#define DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(heap, h, i) (&DUK_HOBJECT_E_GET_VALUE((heap), (h), (i)).v) +#define DUK_HOBJECT_E_GET_VALUE_GETTER(heap, h, i) (DUK_HOBJECT_E_GET_VALUE((heap), (h), (i)).a.get) +#define DUK_HOBJECT_E_GET_VALUE_GETTER_PTR(heap, h, i) (&DUK_HOBJECT_E_GET_VALUE((heap), (h), (i)).a.get) +#define DUK_HOBJECT_E_GET_VALUE_SETTER(heap, h, i) (DUK_HOBJECT_E_GET_VALUE((heap), (h), (i)).a.set) +#define DUK_HOBJECT_E_GET_VALUE_SETTER_PTR(heap, h, i) (&DUK_HOBJECT_E_GET_VALUE((heap), (h), (i)).a.set) +#define DUK_HOBJECT_E_GET_FLAGS(heap, h, i) (DUK_HOBJECT_E_GET_FLAGS_BASE((heap), (h))[(i)]) +#define DUK_HOBJECT_E_GET_FLAGS_PTR(heap, h, i) (&DUK_HOBJECT_E_GET_FLAGS_BASE((heap), (h))[(i)]) +#define DUK_HOBJECT_A_GET_VALUE(heap, h, i) (DUK_HOBJECT_A_GET_BASE((heap), (h))[(i)]) +#define DUK_HOBJECT_A_GET_VALUE_PTR(heap, h, i) (&DUK_HOBJECT_A_GET_BASE((heap), (h))[(i)]) +#define DUK_HOBJECT_H_GET_INDEX(heap, h, i) (DUK_HOBJECT_H_GET_BASE((heap), (h))[(i)]) +#define DUK_HOBJECT_H_GET_INDEX_PTR(heap, h, i) (&DUK_HOBJECT_H_GET_BASE((heap), (h))[(i)]) + +#define DUK_HOBJECT_E_SET_KEY(heap, h, i, k) \ + do { \ + DUK_HOBJECT_E_GET_KEY((heap), (h), (i)) = (k); \ + } while (0) +#define DUK_HOBJECT_E_SET_VALUE(heap, h, i, v) \ + do { \ + DUK_HOBJECT_E_GET_VALUE((heap), (h), (i)) = (v); \ + } while (0) +#define DUK_HOBJECT_E_SET_VALUE_TVAL(heap, h, i, v) \ + do { \ + DUK_HOBJECT_E_GET_VALUE((heap), (h), (i)).v = (v); \ + } while (0) +#define DUK_HOBJECT_E_SET_VALUE_GETTER(heap, h, i, v) \ + do { \ + DUK_HOBJECT_E_GET_VALUE((heap), (h), (i)).a.get = (v); \ + } while (0) +#define DUK_HOBJECT_E_SET_VALUE_SETTER(heap, h, i, v) \ + do { \ + DUK_HOBJECT_E_GET_VALUE((heap), (h), (i)).a.set = (v); \ + } while (0) +#define DUK_HOBJECT_E_SET_FLAGS(heap, h, i, f) \ + do { \ + DUK_HOBJECT_E_GET_FLAGS((heap), (h), (i)) = (duk_uint8_t) (f); \ + } while (0) +#define DUK_HOBJECT_A_SET_VALUE(heap, h, i, v) \ + do { \ + DUK_HOBJECT_A_GET_VALUE((heap), (h), (i)) = (v); \ + } while (0) +#define DUK_HOBJECT_A_SET_VALUE_TVAL(heap, h, i, v) DUK_HOBJECT_A_SET_VALUE((heap), (h), (i), (v)) /* alias for above */ +#define DUK_HOBJECT_H_SET_INDEX(heap, h, i, v) \ + do { \ + DUK_HOBJECT_H_GET_INDEX((heap), (h), (i)) = (v); \ + } while (0) + +#define DUK_HOBJECT_E_SET_FLAG_BITS(heap, h, i, mask) \ + do { \ + DUK_HOBJECT_E_GET_FLAGS_BASE((heap), (h))[(i)] |= (mask); \ + } while (0) + +#define DUK_HOBJECT_E_CLEAR_FLAG_BITS(heap, h, i, mask) \ + do { \ + DUK_HOBJECT_E_GET_FLAGS_BASE((heap), (h))[(i)] &= ~(mask); \ + } while (0) + +#define DUK_HOBJECT_E_SLOT_IS_WRITABLE(heap, h, i) ((DUK_HOBJECT_E_GET_FLAGS((heap), (h), (i)) & DUK_PROPDESC_FLAG_WRITABLE) != 0) +#define DUK_HOBJECT_E_SLOT_IS_ENUMERABLE(heap, h, i) \ + ((DUK_HOBJECT_E_GET_FLAGS((heap), (h), (i)) & DUK_PROPDESC_FLAG_ENUMERABLE) != 0) +#define DUK_HOBJECT_E_SLOT_IS_CONFIGURABLE(heap, h, i) \ + ((DUK_HOBJECT_E_GET_FLAGS((heap), (h), (i)) & DUK_PROPDESC_FLAG_CONFIGURABLE) != 0) +#define DUK_HOBJECT_E_SLOT_IS_ACCESSOR(heap, h, i) ((DUK_HOBJECT_E_GET_FLAGS((heap), (h), (i)) & DUK_PROPDESC_FLAG_ACCESSOR) != 0) + +#define DUK_HOBJECT_E_SLOT_SET_WRITABLE(heap, h, i) DUK_HOBJECT_E_SET_FLAG_BITS((heap), (h), (i), DUK_PROPDESC_FLAG_WRITABLE) +#define DUK_HOBJECT_E_SLOT_SET_ENUMERABLE(heap, h, i) DUK_HOBJECT_E_SET_FLAG_BITS((heap), (h), (i), DUK_PROPDESC_FLAG_ENUMERABLE) +#define DUK_HOBJECT_E_SLOT_SET_CONFIGURABLE(heap, h, i) \ + DUK_HOBJECT_E_SET_FLAG_BITS((heap), (h), (i), DUK_PROPDESC_FLAG_CONFIGURABLE) +#define DUK_HOBJECT_E_SLOT_SET_ACCESSOR(heap, h, i) DUK_HOBJECT_E_SET_FLAG_BITS((heap), (h), (i), DUK_PROPDESC_FLAG_ACCESSOR) + +#define DUK_HOBJECT_E_SLOT_CLEAR_WRITABLE(heap, h, i) DUK_HOBJECT_E_CLEAR_FLAG_BITS((heap), (h), (i), DUK_PROPDESC_FLAG_WRITABLE) +#define DUK_HOBJECT_E_SLOT_CLEAR_ENUMERABLE(heap, h, i) \ + DUK_HOBJECT_E_CLEAR_FLAG_BITS((heap), (h), (i), DUK_PROPDESC_FLAG_ENUMERABLE) +#define DUK_HOBJECT_E_SLOT_CLEAR_CONFIGURABLE(heap, h, i) \ + DUK_HOBJECT_E_CLEAR_FLAG_BITS((heap), (h), (i), DUK_PROPDESC_FLAG_CONFIGURABLE) +#define DUK_HOBJECT_E_SLOT_CLEAR_ACCESSOR(heap, h, i) DUK_HOBJECT_E_CLEAR_FLAG_BITS((heap), (h), (i), DUK_PROPDESC_FLAG_ACCESSOR) + +#define DUK_PROPDESC_IS_WRITABLE(p) (((p)->flags & DUK_PROPDESC_FLAG_WRITABLE) != 0) +#define DUK_PROPDESC_IS_ENUMERABLE(p) (((p)->flags & DUK_PROPDESC_FLAG_ENUMERABLE) != 0) +#define DUK_PROPDESC_IS_CONFIGURABLE(p) (((p)->flags & DUK_PROPDESC_FLAG_CONFIGURABLE) != 0) +#define DUK_PROPDESC_IS_ACCESSOR(p) (((p)->flags & DUK_PROPDESC_FLAG_ACCESSOR) != 0) + +#define DUK_HOBJECT_HASHIDX_UNUSED 0xffffffffUL +#define DUK_HOBJECT_HASHIDX_DELETED 0xfffffffeUL + +/* + * Macros for accessing size fields + */ + +#if defined(DUK_USE_OBJSIZES16) +#define DUK_HOBJECT_GET_ESIZE(h) ((h)->e_size16) +#define DUK_HOBJECT_SET_ESIZE(h, v) \ + do { \ + (h)->e_size16 = (v); \ + } while (0) +#define DUK_HOBJECT_GET_ENEXT(h) ((h)->e_next16) +#define DUK_HOBJECT_SET_ENEXT(h, v) \ + do { \ + (h)->e_next16 = (v); \ + } while (0) +#define DUK_HOBJECT_POSTINC_ENEXT(h) ((h)->e_next16++) +#define DUK_HOBJECT_GET_ASIZE(h) ((h)->a_size16) +#define DUK_HOBJECT_SET_ASIZE(h, v) \ + do { \ + (h)->a_size16 = (v); \ + } while (0) +#if defined(DUK_USE_HOBJECT_HASH_PART) +#define DUK_HOBJECT_GET_HSIZE(h) ((h)->h_size16) +#define DUK_HOBJECT_SET_HSIZE(h, v) \ + do { \ + (h)->h_size16 = (v); \ + } while (0) +#else +#define DUK_HOBJECT_GET_HSIZE(h) 0 +#define DUK_HOBJECT_SET_HSIZE(h, v) \ + do { \ + DUK_ASSERT((v) == 0); \ + } while (0) +#endif +#else +#define DUK_HOBJECT_GET_ESIZE(h) ((h)->e_size) +#define DUK_HOBJECT_SET_ESIZE(h, v) \ + do { \ + (h)->e_size = (v); \ + } while (0) +#define DUK_HOBJECT_GET_ENEXT(h) ((h)->e_next) +#define DUK_HOBJECT_SET_ENEXT(h, v) \ + do { \ + (h)->e_next = (v); \ + } while (0) +#define DUK_HOBJECT_POSTINC_ENEXT(h) ((h)->e_next++) +#define DUK_HOBJECT_GET_ASIZE(h) ((h)->a_size) +#define DUK_HOBJECT_SET_ASIZE(h, v) \ + do { \ + (h)->a_size = (v); \ + } while (0) +#if defined(DUK_USE_HOBJECT_HASH_PART) +#define DUK_HOBJECT_GET_HSIZE(h) ((h)->h_size) +#define DUK_HOBJECT_SET_HSIZE(h, v) \ + do { \ + (h)->h_size = (v); \ + } while (0) +#else +#define DUK_HOBJECT_GET_HSIZE(h) 0 +#define DUK_HOBJECT_SET_HSIZE(h, v) \ + do { \ + DUK_ASSERT((v) == 0); \ + } while (0) +#endif +#endif + +/* + * Misc + */ + +/* Maximum prototype traversal depth. Sanity limit which handles e.g. + * prototype loops (even complex ones like 1->2->3->4->2->3->4->2->3->4). + */ +#define DUK_HOBJECT_PROTOTYPE_CHAIN_SANITY 10000L + +/* + * ECMAScript [[Class]] + */ + +/* range check not necessary because all 4-bit values are mapped */ +#define DUK_HOBJECT_CLASS_NUMBER_TO_STRIDX(n) duk_class_number_to_stridx[(n)] + +#define DUK_HOBJECT_GET_CLASS_STRING(heap, h) \ + DUK_HEAP_GET_STRING((heap), DUK_HOBJECT_CLASS_NUMBER_TO_STRIDX(DUK_HOBJECT_GET_CLASS_NUMBER((h)))) + +/* + * Macros for property handling + */ + +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HOBJECT_GET_PROTOTYPE(heap, h) ((duk_hobject *) DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, (h)->prototype16)) +#define DUK_HOBJECT_SET_PROTOTYPE(heap, h, x) \ + do { \ + (h)->prototype16 = DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (void *) (x)); \ + } while (0) +#else +#define DUK_HOBJECT_GET_PROTOTYPE(heap, h) ((h)->prototype) +#define DUK_HOBJECT_SET_PROTOTYPE(heap, h, x) \ + do { \ + (h)->prototype = (x); \ + } while (0) +#endif + +/* Set prototype, DECREF earlier value, INCREF new value (tolerating NULLs). */ +#define DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, h, p) duk_hobject_set_prototype_updref((thr), (h), (p)) + +/* Set initial prototype, assume NULL previous prototype, INCREF new value, + * tolerate NULL. + */ +#define DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, h, proto) \ + do { \ + duk_hthread *duk__thr = (thr); \ + duk_hobject *duk__obj = (h); \ + duk_hobject *duk__proto = (proto); \ + DUK_UNREF(duk__thr); \ + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(duk__thr->heap, duk__obj) == NULL); \ + DUK_HOBJECT_SET_PROTOTYPE(duk__thr->heap, duk__obj, duk__proto); \ + DUK_HOBJECT_INCREF_ALLOWNULL(duk__thr, duk__proto); \ + } while (0) + +/* + * Finalizer check + */ + +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HOBJECT_HAS_FINALIZER_FAST(heap, h) duk_hobject_has_finalizer_fast_raw((heap), (h)) +#else +#define DUK_HOBJECT_HAS_FINALIZER_FAST(heap, h) duk_hobject_has_finalizer_fast_raw((h)) +#endif + +/* + * Resizing and hash behavior + */ + +/* Sanity limit on max number of properties (allocated, not necessarily used). + * This is somewhat arbitrary, but if we're close to 2**32 properties some + * algorithms will fail (e.g. hash size selection, next prime selection). + * Also, we use negative array/entry table indices to indicate 'not found', + * so anything above 0x80000000 will cause trouble now. + */ +#if defined(DUK_USE_OBJSIZES16) +#define DUK_HOBJECT_MAX_PROPERTIES 0x0000ffffUL +#else +#define DUK_HOBJECT_MAX_PROPERTIES 0x3fffffffUL /* 2**30-1 ~= 1G properties */ +#endif + +/* internal align target for props allocation, must be 2*n for some n */ +#if (DUK_USE_ALIGN_BY == 4) +#define DUK_HOBJECT_ALIGN_TARGET 4 +#elif (DUK_USE_ALIGN_BY == 8) +#define DUK_HOBJECT_ALIGN_TARGET 8 +#elif (DUK_USE_ALIGN_BY == 1) +#define DUK_HOBJECT_ALIGN_TARGET 1 +#else +#error invalid DUK_USE_ALIGN_BY +#endif + +/* + * PC-to-line constants + */ + +#define DUK_PC2LINE_SKIP 64 + +/* maximum length for a SKIP-1 diffstream: 35 bits per entry, rounded up to bytes */ +#define DUK_PC2LINE_MAX_DIFF_LENGTH (((DUK_PC2LINE_SKIP - 1) * 35 + 7) / 8) + +/* + * Struct defs + */ + +struct duk_propaccessor { + duk_hobject *get; + duk_hobject *set; +}; + +union duk_propvalue { + /* The get/set pointers could be 16-bit pointer compressed but it + * would make no difference on 32-bit platforms because duk_tval is + * 8 bytes or more anyway. + */ + duk_tval v; + duk_propaccessor a; +}; + +struct duk_propdesc { + /* read-only values 'lifted' for ease of use */ + duk_small_uint_t flags; + duk_hobject *get; + duk_hobject *set; + + /* for updating (all are set to < 0 for virtual properties) */ + duk_int_t e_idx; /* prop index in 'entry part', < 0 if not there */ + duk_int_t h_idx; /* prop index in 'hash part', < 0 if not there */ + duk_int_t a_idx; /* prop index in 'array part', < 0 if not there */ +}; + +struct duk_hobject { + duk_heaphdr hdr; + + /* + * 'props' contains {key,value,flags} entries, optional array entries, and + * an optional hash lookup table for non-array entries in a single 'sliced' + * allocation. There are several layout options, which differ slightly in + * generated code size/speed and alignment/padding; duk_features.h selects + * the layout used. + * + * Layout 1 (DUK_USE_HOBJECT_LAYOUT_1): + * + * e_size * sizeof(duk_hstring *) bytes of entry keys (e_next gc reachable) + * e_size * sizeof(duk_propvalue) bytes of entry values (e_next gc reachable) + * e_size * sizeof(duk_uint8_t) bytes of entry flags (e_next gc reachable) + * a_size * sizeof(duk_tval) bytes of (opt) array values (plain only) (all gc reachable) + * h_size * sizeof(duk_uint32_t) bytes of (opt) hash indexes to entries (e_size), + * 0xffffffffUL = unused, 0xfffffffeUL = deleted + * + * Layout 2 (DUK_USE_HOBJECT_LAYOUT_2): + * + * e_size * sizeof(duk_propvalue) bytes of entry values (e_next gc reachable) + * e_size * sizeof(duk_hstring *) bytes of entry keys (e_next gc reachable) + * e_size * sizeof(duk_uint8_t) + pad bytes of entry flags (e_next gc reachable) + * a_size * sizeof(duk_tval) bytes of (opt) array values (plain only) (all gc reachable) + * h_size * sizeof(duk_uint32_t) bytes of (opt) hash indexes to entries (e_size), + * 0xffffffffUL = unused, 0xfffffffeUL = deleted + * + * Layout 3 (DUK_USE_HOBJECT_LAYOUT_3): + * + * e_size * sizeof(duk_propvalue) bytes of entry values (e_next gc reachable) + * a_size * sizeof(duk_tval) bytes of (opt) array values (plain only) (all gc reachable) + * e_size * sizeof(duk_hstring *) bytes of entry keys (e_next gc reachable) + * h_size * sizeof(duk_uint32_t) bytes of (opt) hash indexes to entries (e_size), + * 0xffffffffUL = unused, 0xfffffffeUL = deleted + * e_size * sizeof(duk_uint8_t) bytes of entry flags (e_next gc reachable) + * + * In layout 1, the 'e_next' count is rounded to 4 or 8 on platforms + * requiring 4 or 8 byte alignment. This ensures proper alignment + * for the entries, at the cost of memory footprint. However, it's + * probably preferable to use another layout on such platforms instead. + * + * In layout 2, the key and value parts are swapped to avoid padding + * the key array on platforms requiring alignment by 8. The flags part + * is padded to get alignment for array entries. The 'e_next' count does + * not need to be rounded as in layout 1. + * + * In layout 3, entry values and array values are always aligned properly, + * and assuming pointers are at most 8 bytes, so are the entry keys. Hash + * indices will be properly aligned (assuming pointers are at least 4 bytes). + * Finally, flags don't need additional alignment. This layout provides + * compact allocations without padding (even on platforms with alignment + * requirements) at the cost of a bit slower lookups. + * + * Objects with few keys don't have a hash index; keys are looked up linearly, + * which is cache efficient because the keys are consecutive. Larger objects + * have a hash index part which contains integer indexes to the entries part. + * + * A single allocation reduces memory allocation overhead but requires more + * work when any part needs to be resized. A sliced allocation for entries + * makes linear key matching faster on most platforms (more locality) and + * skimps on flags size (which would be followed by 3 bytes of padding in + * most architectures if entries were placed in a struct). + * + * 'props' also contains internal properties distinguished with a non-BMP + * prefix. Often used properties should be placed early in 'props' whenever + * possible to make accessing them as fast a possible. + */ + +#if defined(DUK_USE_HEAPPTR16) + /* Located in duk_heaphdr h_extra16. Subclasses of duk_hobject (like + * duk_hcompfunc) are not free to use h_extra16 for this reason. + */ +#else + duk_uint8_t *props; +#endif + + /* prototype: the only internal property lifted outside 'e' as it is so central */ +#if defined(DUK_USE_HEAPPTR16) + duk_uint16_t prototype16; +#else + duk_hobject *prototype; +#endif + +#if defined(DUK_USE_OBJSIZES16) + duk_uint16_t e_size16; + duk_uint16_t e_next16; + duk_uint16_t a_size16; +#if defined(DUK_USE_HOBJECT_HASH_PART) + duk_uint16_t h_size16; +#endif +#else + duk_uint32_t e_size; /* entry part size */ + duk_uint32_t e_next; /* index for next new key ([0,e_next[ are gc reachable) */ + duk_uint32_t a_size; /* array part size (entirely gc reachable) */ +#if defined(DUK_USE_HOBJECT_HASH_PART) + duk_uint32_t h_size; /* hash part size or 0 if unused */ +#endif +#endif +}; + +/* + * Exposed data + */ + +#if !defined(DUK_SINGLE_FILE) +DUK_INTERNAL_DECL duk_uint8_t duk_class_number_to_stridx[32]; +#endif /* !DUK_SINGLE_FILE */ + +/* + * Prototypes + */ + +/* alloc and init */ +DUK_INTERNAL_DECL duk_hobject *duk_hobject_alloc_unchecked(duk_heap *heap, duk_uint_t hobject_flags); +DUK_INTERNAL_DECL duk_hobject *duk_hobject_alloc(duk_hthread *thr, duk_uint_t hobject_flags); +DUK_INTERNAL_DECL duk_harray *duk_harray_alloc(duk_hthread *thr, duk_uint_t hobject_flags); +DUK_INTERNAL_DECL duk_hcompfunc *duk_hcompfunc_alloc(duk_hthread *thr, duk_uint_t hobject_flags); +DUK_INTERNAL_DECL duk_hnatfunc *duk_hnatfunc_alloc(duk_hthread *thr, duk_uint_t hobject_flags); +DUK_INTERNAL_DECL duk_hboundfunc *duk_hboundfunc_alloc(duk_heap *heap, duk_uint_t hobject_flags); +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL_DECL duk_hbufobj *duk_hbufobj_alloc(duk_hthread *thr, duk_uint_t hobject_flags); +#endif +DUK_INTERNAL_DECL duk_hthread *duk_hthread_alloc_unchecked(duk_heap *heap, duk_uint_t hobject_flags); +DUK_INTERNAL_DECL duk_hthread *duk_hthread_alloc(duk_hthread *thr, duk_uint_t hobject_flags); +DUK_INTERNAL_DECL duk_hdecenv *duk_hdecenv_alloc(duk_hthread *thr, duk_uint_t hobject_flags); +DUK_INTERNAL_DECL duk_hobjenv *duk_hobjenv_alloc(duk_hthread *thr, duk_uint_t hobject_flags); +DUK_INTERNAL_DECL duk_hproxy *duk_hproxy_alloc(duk_hthread *thr, duk_uint_t hobject_flags); + +/* resize */ +DUK_INTERNAL_DECL void duk_hobject_realloc_props(duk_hthread *thr, + duk_hobject *obj, + duk_uint32_t new_e_size, + duk_uint32_t new_a_size, + duk_uint32_t new_h_size, + duk_bool_t abandon_array); +DUK_INTERNAL_DECL void duk_hobject_resize_entrypart(duk_hthread *thr, duk_hobject *obj, duk_uint32_t new_e_size); +#if 0 /*unused*/ +DUK_INTERNAL_DECL void duk_hobject_resize_arraypart(duk_hthread *thr, + duk_hobject *obj, + duk_uint32_t new_a_size); +#endif + +/* low-level property functions */ +DUK_INTERNAL_DECL duk_bool_t +duk_hobject_find_entry(duk_heap *heap, duk_hobject *obj, duk_hstring *key, duk_int_t *e_idx, duk_int_t *h_idx); +DUK_INTERNAL_DECL duk_tval *duk_hobject_find_entry_tval_ptr(duk_heap *heap, duk_hobject *obj, duk_hstring *key); +DUK_INTERNAL_DECL duk_tval *duk_hobject_find_entry_tval_ptr_stridx(duk_heap *heap, duk_hobject *obj, duk_small_uint_t stridx); +DUK_INTERNAL_DECL duk_tval *duk_hobject_find_entry_tval_ptr_and_attrs(duk_heap *heap, + duk_hobject *obj, + duk_hstring *key, + duk_uint_t *out_attrs); +DUK_INTERNAL_DECL duk_tval *duk_hobject_find_array_entry_tval_ptr(duk_heap *heap, duk_hobject *obj, duk_uarridx_t i); +DUK_INTERNAL_DECL duk_bool_t +duk_hobject_get_own_propdesc(duk_hthread *thr, duk_hobject *obj, duk_hstring *key, duk_propdesc *out_desc, duk_small_uint_t flags); + +/* core property functions */ +DUK_INTERNAL_DECL duk_bool_t duk_hobject_getprop(duk_hthread *thr, duk_tval *tv_obj, duk_tval *tv_key); +DUK_INTERNAL_DECL duk_bool_t +duk_hobject_putprop(duk_hthread *thr, duk_tval *tv_obj, duk_tval *tv_key, duk_tval *tv_val, duk_bool_t throw_flag); +DUK_INTERNAL_DECL duk_bool_t duk_hobject_delprop(duk_hthread *thr, duk_tval *tv_obj, duk_tval *tv_key, duk_bool_t throw_flag); +DUK_INTERNAL_DECL duk_bool_t duk_hobject_hasprop(duk_hthread *thr, duk_tval *tv_obj, duk_tval *tv_key); + +/* internal property functions */ +#define DUK_DELPROP_FLAG_THROW (1U << 0) +#define DUK_DELPROP_FLAG_FORCE (1U << 1) +DUK_INTERNAL_DECL duk_bool_t duk_hobject_delprop_raw(duk_hthread *thr, duk_hobject *obj, duk_hstring *key, duk_small_uint_t flags); +DUK_INTERNAL_DECL duk_bool_t duk_hobject_hasprop_raw(duk_hthread *thr, duk_hobject *obj, duk_hstring *key); +DUK_INTERNAL_DECL void duk_hobject_define_property_internal(duk_hthread *thr, + duk_hobject *obj, + duk_hstring *key, + duk_small_uint_t flags); +DUK_INTERNAL_DECL void duk_hobject_define_property_internal_arridx(duk_hthread *thr, + duk_hobject *obj, + duk_uarridx_t arr_idx, + duk_small_uint_t flags); +DUK_INTERNAL_DECL duk_size_t duk_hobject_get_length(duk_hthread *thr, duk_hobject *obj); +#if defined(DUK_USE_HEAPPTR16) +DUK_INTERNAL_DECL duk_bool_t duk_hobject_has_finalizer_fast_raw(duk_heap *heap, duk_hobject *obj); +#else +DUK_INTERNAL_DECL duk_bool_t duk_hobject_has_finalizer_fast_raw(duk_hobject *obj); +#endif + +/* helpers for defineProperty() and defineProperties() */ +DUK_INTERNAL_DECL void duk_hobject_prepare_property_descriptor(duk_hthread *thr, + duk_idx_t idx_in, + duk_uint_t *out_defprop_flags, + duk_idx_t *out_idx_value, + duk_hobject **out_getter, + duk_hobject **out_setter); +DUK_INTERNAL_DECL duk_bool_t duk_hobject_define_property_helper(duk_hthread *thr, + duk_uint_t defprop_flags, + duk_hobject *obj, + duk_hstring *key, + duk_idx_t idx_value, + duk_hobject *get, + duk_hobject *set, + duk_bool_t throw_flag); + +/* Object built-in methods */ +DUK_INTERNAL_DECL void duk_hobject_object_get_own_property_descriptor(duk_hthread *thr, duk_idx_t obj_idx); +DUK_INTERNAL_DECL void duk_hobject_object_seal_freeze_helper(duk_hthread *thr, duk_hobject *obj, duk_bool_t is_freeze); +DUK_INTERNAL_DECL duk_bool_t duk_hobject_object_is_sealed_frozen_helper(duk_hthread *thr, duk_hobject *obj, duk_bool_t is_frozen); +DUK_INTERNAL_DECL duk_bool_t duk_hobject_object_ownprop_helper(duk_hthread *thr, duk_small_uint_t required_desc_flags); + +/* internal properties */ +DUK_INTERNAL_DECL duk_tval *duk_hobject_get_internal_value_tval_ptr(duk_heap *heap, duk_hobject *obj); +DUK_INTERNAL_DECL duk_hstring *duk_hobject_get_internal_value_string(duk_heap *heap, duk_hobject *obj); +DUK_INTERNAL_DECL duk_harray *duk_hobject_get_formals(duk_hthread *thr, duk_hobject *obj); +DUK_INTERNAL_DECL duk_hobject *duk_hobject_get_varmap(duk_hthread *thr, duk_hobject *obj); + +/* hobject management functions */ +DUK_INTERNAL_DECL void duk_hobject_compact_props(duk_hthread *thr, duk_hobject *obj); + +/* ES2015 proxy */ +#if defined(DUK_USE_ES6_PROXY) +DUK_INTERNAL_DECL duk_bool_t duk_hobject_proxy_check(duk_hobject *obj, duk_hobject **out_target, duk_hobject **out_handler); +DUK_INTERNAL_DECL duk_hobject *duk_hobject_resolve_proxy_target(duk_hobject *obj); +#endif + +/* enumeration */ +DUK_INTERNAL_DECL void duk_hobject_enumerator_create(duk_hthread *thr, duk_small_uint_t enum_flags); +DUK_INTERNAL_DECL duk_ret_t duk_hobject_get_enumerated_keys(duk_hthread *thr, duk_small_uint_t enum_flags); +DUK_INTERNAL_DECL duk_bool_t duk_hobject_enumerator_next(duk_hthread *thr, duk_bool_t get_value); + +/* macros */ +DUK_INTERNAL_DECL void duk_hobject_set_prototype_updref(duk_hthread *thr, duk_hobject *h, duk_hobject *p); + +/* pc2line */ +#if defined(DUK_USE_PC2LINE) +DUK_INTERNAL_DECL void duk_hobject_pc2line_pack(duk_hthread *thr, duk_compiler_instr *instrs, duk_uint_fast32_t length); +DUK_INTERNAL_DECL duk_uint_fast32_t duk_hobject_pc2line_query(duk_hthread *thr, duk_idx_t idx_func, duk_uint_fast32_t pc); +#endif + +/* misc */ +DUK_INTERNAL_DECL duk_bool_t duk_hobject_prototype_chain_contains(duk_hthread *thr, + duk_hobject *h, + duk_hobject *p, + duk_bool_t ignore_loop); + +#if !defined(DUK_USE_OBJECT_BUILTIN) +/* These declarations are needed when related built-in is disabled and + * genbuiltins.py won't automatically emit the declerations. + */ +DUK_INTERNAL_DECL duk_ret_t duk_bi_object_prototype_to_string(duk_hthread *thr); +DUK_INTERNAL_DECL duk_ret_t duk_bi_function_prototype(duk_hthread *thr); +#endif + +#endif /* DUK_HOBJECT_H_INCLUDED */ +/* #include duk_hcompfunc.h */ +#line 1 "duk_hcompfunc.h" +/* + * Heap compiled function (ECMAScript function) representation. + * + * There is a single data buffer containing the ECMAScript function's + * bytecode, constants, and inner functions. + */ + +#if !defined(DUK_HCOMPFUNC_H_INCLUDED) +#define DUK_HCOMPFUNC_H_INCLUDED + +/* + * Field accessor macros + */ + +/* XXX: casts could be improved, especially for GET/SET DATA */ + +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HCOMPFUNC_GET_DATA(heap, h) ((duk_hbuffer_fixed *) (void *) DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, (h)->data16)) +#define DUK_HCOMPFUNC_SET_DATA(heap, h, v) \ + do { \ + (h)->data16 = DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (void *) (v)); \ + } while (0) +#define DUK_HCOMPFUNC_GET_FUNCS(heap, h) ((duk_hobject **) (void *) (DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, (h)->funcs16))) +#define DUK_HCOMPFUNC_SET_FUNCS(heap, h, v) \ + do { \ + (h)->funcs16 = DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (void *) (v)); \ + } while (0) +#define DUK_HCOMPFUNC_GET_BYTECODE(heap, h) ((duk_instr_t *) (void *) (DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, (h)->bytecode16))) +#define DUK_HCOMPFUNC_SET_BYTECODE(heap, h, v) \ + do { \ + (h)->bytecode16 = DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (void *) (v)); \ + } while (0) +#define DUK_HCOMPFUNC_GET_LEXENV(heap, h) ((duk_hobject *) (void *) (DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, (h)->lex_env16))) +#define DUK_HCOMPFUNC_SET_LEXENV(heap, h, v) \ + do { \ + (h)->lex_env16 = DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (void *) (v)); \ + } while (0) +#define DUK_HCOMPFUNC_GET_VARENV(heap, h) ((duk_hobject *) (void *) (DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, (h)->var_env16))) +#define DUK_HCOMPFUNC_SET_VARENV(heap, h, v) \ + do { \ + (h)->var_env16 = DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (void *) (v)); \ + } while (0) +#else +#define DUK_HCOMPFUNC_GET_DATA(heap, h) ((duk_hbuffer_fixed *) (void *) (h)->data) +#define DUK_HCOMPFUNC_SET_DATA(heap, h, v) \ + do { \ + (h)->data = (duk_hbuffer *) (v); \ + } while (0) +#define DUK_HCOMPFUNC_GET_FUNCS(heap, h) ((h)->funcs) +#define DUK_HCOMPFUNC_SET_FUNCS(heap, h, v) \ + do { \ + (h)->funcs = (v); \ + } while (0) +#define DUK_HCOMPFUNC_GET_BYTECODE(heap, h) ((h)->bytecode) +#define DUK_HCOMPFUNC_SET_BYTECODE(heap, h, v) \ + do { \ + (h)->bytecode = (v); \ + } while (0) +#define DUK_HCOMPFUNC_GET_LEXENV(heap, h) ((h)->lex_env) +#define DUK_HCOMPFUNC_SET_LEXENV(heap, h, v) \ + do { \ + (h)->lex_env = (v); \ + } while (0) +#define DUK_HCOMPFUNC_GET_VARENV(heap, h) ((h)->var_env) +#define DUK_HCOMPFUNC_SET_VARENV(heap, h, v) \ + do { \ + (h)->var_env = (v); \ + } while (0) +#endif + +/* + * Accessor macros for function specific data areas + */ + +/* Note: assumes 'data' is always a fixed buffer */ +#define DUK_HCOMPFUNC_GET_BUFFER_BASE(heap, h) DUK_HBUFFER_FIXED_GET_DATA_PTR((heap), DUK_HCOMPFUNC_GET_DATA((heap), (h))) + +#define DUK_HCOMPFUNC_GET_CONSTS_BASE(heap, h) ((duk_tval *) (void *) DUK_HCOMPFUNC_GET_BUFFER_BASE((heap), (h))) + +#define DUK_HCOMPFUNC_GET_FUNCS_BASE(heap, h) DUK_HCOMPFUNC_GET_FUNCS((heap), (h)) + +#define DUK_HCOMPFUNC_GET_CODE_BASE(heap, h) DUK_HCOMPFUNC_GET_BYTECODE((heap), (h)) + +#define DUK_HCOMPFUNC_GET_CONSTS_END(heap, h) ((duk_tval *) (void *) DUK_HCOMPFUNC_GET_FUNCS((heap), (h))) + +#define DUK_HCOMPFUNC_GET_FUNCS_END(heap, h) ((duk_hobject **) (void *) DUK_HCOMPFUNC_GET_BYTECODE((heap), (h))) + +/* XXX: double evaluation of DUK_HCOMPFUNC_GET_DATA() */ +#define DUK_HCOMPFUNC_GET_CODE_END(heap, h) \ + ((duk_instr_t *) (void *) (DUK_HBUFFER_FIXED_GET_DATA_PTR((heap), DUK_HCOMPFUNC_GET_DATA((heap), (h))) + \ + DUK_HBUFFER_GET_SIZE((duk_hbuffer *) DUK_HCOMPFUNC_GET_DATA((heap), h)))) + +#define DUK_HCOMPFUNC_GET_CONSTS_SIZE(heap, h) \ + ((duk_size_t) (((const duk_uint8_t *) DUK_HCOMPFUNC_GET_CONSTS_END((heap), (h))) - \ + ((const duk_uint8_t *) DUK_HCOMPFUNC_GET_CONSTS_BASE((heap), (h))))) + +#define DUK_HCOMPFUNC_GET_FUNCS_SIZE(heap, h) \ + ((duk_size_t) (((const duk_uint8_t *) DUK_HCOMPFUNC_GET_FUNCS_END((heap), (h))) - \ + ((const duk_uint8_t *) DUK_HCOMPFUNC_GET_FUNCS_BASE((heap), (h))))) + +#define DUK_HCOMPFUNC_GET_CODE_SIZE(heap, h) \ + ((duk_size_t) (((const duk_uint8_t *) DUK_HCOMPFUNC_GET_CODE_END((heap), (h))) - \ + ((const duk_uint8_t *) DUK_HCOMPFUNC_GET_CODE_BASE((heap), (h))))) + +#define DUK_HCOMPFUNC_GET_CONSTS_COUNT(heap, h) ((duk_size_t) (DUK_HCOMPFUNC_GET_CONSTS_SIZE((heap), (h)) / sizeof(duk_tval))) + +#define DUK_HCOMPFUNC_GET_FUNCS_COUNT(heap, h) ((duk_size_t) (DUK_HCOMPFUNC_GET_FUNCS_SIZE((heap), (h)) / sizeof(duk_hobject *))) + +#define DUK_HCOMPFUNC_GET_CODE_COUNT(heap, h) ((duk_size_t) (DUK_HCOMPFUNC_GET_CODE_SIZE((heap), (h)) / sizeof(duk_instr_t))) + +/* + * Validity assert + */ + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_hcompfunc_assert_valid(duk_hcompfunc *h); +#define DUK_HCOMPFUNC_ASSERT_VALID(h) \ + do { \ + duk_hcompfunc_assert_valid((h)); \ + } while (0) +#else +#define DUK_HCOMPFUNC_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +/* + * Main struct + */ + +struct duk_hcompfunc { + /* shared object part */ + duk_hobject obj; + + /* + * Pointers to function data area for faster access. Function + * data is a buffer shared between all closures of the same + * "template" function. The data buffer is always fixed (non- + * dynamic, hence stable), with a layout as follows: + * + * constants (duk_tval) + * inner functions (duk_hobject *) + * bytecode (duk_instr_t) + * + * Note: bytecode end address can be computed from 'data' buffer + * size. It is not strictly necessary functionally, assuming + * bytecode never jumps outside its allocated area. However, + * it's a safety/robustness feature for avoiding the chance of + * executing random data as bytecode due to a compiler error. + * + * Note: values in the data buffer must be incref'd (they will + * be decref'd on release) for every compiledfunction referring + * to the 'data' element. + */ + + /* Data area, fixed allocation, stable data ptrs. */ +#if defined(DUK_USE_HEAPPTR16) + duk_uint16_t data16; +#else + duk_hbuffer *data; +#endif + + /* No need for constants pointer (= same as data). + * + * When using 16-bit packing alignment to 4 is nice. 'funcs' will be + * 4-byte aligned because 'constants' are duk_tvals. For now the + * inner function pointers are not compressed, so that 'bytecode' will + * also be 4-byte aligned. + */ +#if defined(DUK_USE_HEAPPTR16) + duk_uint16_t funcs16; + duk_uint16_t bytecode16; +#else + duk_hobject **funcs; + duk_instr_t *bytecode; +#endif + + /* Lexenv: lexical environment of closure, NULL for templates. + * Varenv: variable environment of closure, NULL for templates. + */ +#if defined(DUK_USE_HEAPPTR16) + duk_uint16_t lex_env16; + duk_uint16_t var_env16; +#else + duk_hobject *lex_env; + duk_hobject *var_env; +#endif + + /* + * 'nregs' registers are allocated on function entry, at most 'nargs' + * are initialized to arguments, and the rest to undefined. Arguments + * above 'nregs' are not mapped to registers. All registers in the + * active stack range must be initialized because they are GC reachable. + * 'nargs' is needed so that if the function is given more than 'nargs' + * arguments, the additional arguments do not 'clobber' registers + * beyond 'nregs' which must be consistently initialized to undefined. + * + * Usually there is no need to know which registers are mapped to + * local variables. Registers may be allocated to variable in any + * way (even including gaps). However, a register-variable mapping + * must be the same for the duration of the function execution and + * the register cannot be used for anything else. + * + * When looking up variables by name, the '_Varmap' map is used. + * When an activation closes, registers mapped to arguments are + * copied into the environment record based on the same map. The + * reverse map (from register to variable) is not currently needed + * at run time, except for debugging, so it is not maintained. + */ + + duk_uint16_t nregs; /* regs to allocate */ + duk_uint16_t nargs; /* number of arguments allocated to regs */ + + /* + * Additional control information is placed into the object itself + * as internal properties to avoid unnecessary fields for the + * majority of functions. The compiler tries to omit internal + * control fields when possible. + * + * Function templates: + * + * { + * name: "func", // declaration, named function expressions + * fileName: + * _Varmap: { "arg1": 0, "arg2": 1, "varname": 2 }, + * _Formals: [ "arg1", "arg2" ], + * _Source: "function func(arg1, arg2) { ... }", + * _Pc2line: , + * } + * + * Function instances: + * + * { + * length: 2, + * prototype: { constructor: }, + * caller: , + * arguments: , + * name: "func", // declaration, named function expressions + * fileName: + * _Varmap: { "arg1": 0, "arg2": 1, "varname": 2 }, + * _Formals: [ "arg1", "arg2" ], + * _Source: "function func(arg1, arg2) { ... }", + * _Pc2line: , + * } + * + * More detailed description of these properties can be found + * in the documentation. + */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + /* Line number range for function. Needed during debugging to + * determine active breakpoints. + */ + duk_uint32_t start_line; + duk_uint32_t end_line; +#endif +}; + +#endif /* DUK_HCOMPFUNC_H_INCLUDED */ +/* #include duk_hnatfunc.h */ +#line 1 "duk_hnatfunc.h" +/* + * Heap native function representation. + */ + +#if !defined(DUK_HNATFUNC_H_INCLUDED) +#define DUK_HNATFUNC_H_INCLUDED + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_hnatfunc_assert_valid(duk_hnatfunc *h); +#define DUK_HNATFUNC_ASSERT_VALID(h) \ + do { \ + duk_hnatfunc_assert_valid((h)); \ + } while (0) +#else +#define DUK_HNATFUNC_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +#define DUK_HNATFUNC_NARGS_VARARGS ((duk_int16_t) -1) +#define DUK_HNATFUNC_NARGS_MAX ((duk_int16_t) 0x7fff) + +struct duk_hnatfunc { + /* shared object part */ + duk_hobject obj; + + duk_c_function func; + duk_int16_t nargs; + duk_int16_t magic; + + /* The 'magic' field allows an opaque 16-bit field to be accessed by the + * Duktape/C function. This allows, for instance, the same native function + * to be used for a set of very similar functions, with the 'magic' field + * providing the necessary non-argument flags / values to guide the behavior + * of the native function. The value is signed on purpose: it is easier to + * convert a signed value to unsigned (simply AND with 0xffff) than vice + * versa. + * + * Note: cannot place nargs/magic into the heaphdr flags, because + * duk_hobject takes almost all flags already. + */ +}; + +#endif /* DUK_HNATFUNC_H_INCLUDED */ +/* #include duk_hboundfunc.h */ +#line 1 "duk_hboundfunc.h" +/* + * Bound function representation. + */ + +#if !defined(DUK_HBOUNDFUNC_H_INCLUDED) +#define DUK_HBOUNDFUNC_H_INCLUDED + +/* Artificial limit for args length. Ensures arithmetic won't overflow + * 32 bits when combining bound functions. + */ +#define DUK_HBOUNDFUNC_MAX_ARGS 0x20000000UL + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_hboundfunc_assert_valid(duk_hboundfunc *h); +#define DUK_HBOUNDFUNC_ASSERT_VALID(h) \ + do { \ + duk_hboundfunc_assert_valid((h)); \ + } while (0) +#else +#define DUK_HBOUNDFUNC_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +struct duk_hboundfunc { + /* Shared object part. */ + duk_hobject obj; + + /* Final target function, stored as duk_tval so that lightfunc can be + * represented too. + */ + duk_tval target; + + /* This binding. */ + duk_tval this_binding; + + /* Arguments to prepend. */ + duk_tval *args; /* Separate allocation. */ + duk_idx_t nargs; +}; + +#endif /* DUK_HBOUNDFUNC_H_INCLUDED */ +/* #include duk_hbufobj.h */ +#line 1 "duk_hbufobj.h" +/* + * Heap Buffer object representation. Used for all Buffer variants. + */ + +#if !defined(DUK_HBUFOBJ_H_INCLUDED) +#define DUK_HBUFOBJ_H_INCLUDED + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + +/* All element accessors are host endian now (driven by TypedArray spec). */ +#define DUK_HBUFOBJ_ELEM_UINT8 0 +#define DUK_HBUFOBJ_ELEM_UINT8CLAMPED 1 +#define DUK_HBUFOBJ_ELEM_INT8 2 +#define DUK_HBUFOBJ_ELEM_UINT16 3 +#define DUK_HBUFOBJ_ELEM_INT16 4 +#define DUK_HBUFOBJ_ELEM_UINT32 5 +#define DUK_HBUFOBJ_ELEM_INT32 6 +#define DUK_HBUFOBJ_ELEM_FLOAT32 7 +#define DUK_HBUFOBJ_ELEM_FLOAT64 8 +#define DUK_HBUFOBJ_ELEM_MAX 8 + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_hbufobj_assert_valid(duk_hbufobj *h); +#define DUK_HBUFOBJ_ASSERT_VALID(h) \ + do { \ + duk_hbufobj_assert_valid((h)); \ + } while (0) +#else +#define DUK_HBUFOBJ_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +/* Get the current data pointer (caller must ensure buf != NULL) as a + * duk_uint8_t ptr. Note that the result may be NULL if the underlying + * buffer has zero size and is not a fixed buffer. + */ +#define DUK_HBUFOBJ_GET_SLICE_BASE(heap, h) \ + (DUK_ASSERT_EXPR((h) != NULL), \ + DUK_ASSERT_EXPR((h)->buf != NULL), \ + (((duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR((heap), (h)->buf)) + (h)->offset)) + +/* True if slice is full, i.e. offset is zero and length covers the entire + * buffer. This status may change independently of the duk_hbufobj if + * the underlying buffer is dynamic and changes without the hbufobj + * being changed. + */ +#define DUK_HBUFOBJ_FULL_SLICE(h) \ + (DUK_ASSERT_EXPR((h) != NULL), \ + DUK_ASSERT_EXPR((h)->buf != NULL), \ + ((h)->offset == 0 && (h)->length == DUK_HBUFFER_GET_SIZE((h)->buf))) + +/* Validate that the whole slice [0,length[ is contained in the underlying + * buffer. Caller must ensure 'buf' != NULL. + */ +#define DUK_HBUFOBJ_VALID_SLICE(h) \ + (DUK_ASSERT_EXPR((h) != NULL), \ + DUK_ASSERT_EXPR((h)->buf != NULL), \ + ((h)->offset + (h)->length <= DUK_HBUFFER_GET_SIZE((h)->buf))) + +/* Validate byte read/write for virtual 'offset', i.e. check that the + * offset, taking into account h->offset, is within the underlying + * buffer size. This is a safety check which is needed to ensure + * that even a misconfigured duk_hbufobj never causes memory unsafe + * behavior (e.g. if an underlying dynamic buffer changes after being + * setup). Caller must ensure 'buf' != NULL. + */ +#define DUK_HBUFOBJ_VALID_BYTEOFFSET_INCL(h, off) \ + (DUK_ASSERT_EXPR((h) != NULL), DUK_ASSERT_EXPR((h)->buf != NULL), ((h)->offset + (off) < DUK_HBUFFER_GET_SIZE((h)->buf))) + +#define DUK_HBUFOBJ_VALID_BYTEOFFSET_EXCL(h, off) \ + (DUK_ASSERT_EXPR((h) != NULL), DUK_ASSERT_EXPR((h)->buf != NULL), ((h)->offset + (off) <= DUK_HBUFFER_GET_SIZE((h)->buf))) + +/* Clamp an input byte length (already assumed to be within the nominal + * duk_hbufobj 'length') to the current dynamic buffer limits to yield + * a byte length limit that's safe for memory accesses. This value can + * be invalidated by any side effect because it may trigger a user + * callback that resizes the underlying buffer. + */ +#define DUK_HBUFOBJ_CLAMP_BYTELENGTH(h, len) (DUK_ASSERT_EXPR((h) != NULL), duk_hbufobj_clamp_bytelength((h), (len))) + +/* Typed arrays have virtual indices, ArrayBuffer and DataView do not. */ +#define DUK_HBUFOBJ_HAS_VIRTUAL_INDICES(h) ((h)->is_typedarray) + +struct duk_hbufobj { + /* Shared object part. */ + duk_hobject obj; + + /* Underlying buffer (refcounted), may be NULL. */ + duk_hbuffer *buf; + + /* .buffer reference to an ArrayBuffer, may be NULL. */ + duk_hobject *buf_prop; + + /* Slice and accessor information. + * + * Because the underlying buffer may be dynamic, these may be + * invalidated by the buffer being modified so that both offset + * and length should be validated before every access. Behavior + * when the underlying buffer has changed doesn't need to be clean: + * virtual 'length' doesn't need to be affected, reads can return + * zero/NaN, and writes can be ignored. + * + * Note that a data pointer cannot be precomputed because 'buf' may + * be dynamic and its pointer unstable. + */ + + duk_uint_t offset; /* byte offset to buf */ + duk_uint_t length; /* byte index limit for element access, exclusive */ + duk_uint8_t shift; /* element size shift: + * 0 = u8/i8 + * 1 = u16/i16 + * 2 = u32/i32/float + * 3 = double + */ + duk_uint8_t elem_type; /* element type */ + duk_uint8_t is_typedarray; +}; + +DUK_INTERNAL_DECL duk_uint_t duk_hbufobj_clamp_bytelength(duk_hbufobj *h_bufobj, duk_uint_t len); +DUK_INTERNAL_DECL void duk_hbufobj_push_uint8array_from_plain(duk_hthread *thr, duk_hbuffer *h_buf); +DUK_INTERNAL_DECL void duk_hbufobj_push_validated_read(duk_hthread *thr, + duk_hbufobj *h_bufobj, + duk_uint8_t *p, + duk_small_uint_t elem_size); +DUK_INTERNAL_DECL void duk_hbufobj_validated_write(duk_hthread *thr, + duk_hbufobj *h_bufobj, + duk_uint8_t *p, + duk_small_uint_t elem_size); +DUK_INTERNAL_DECL void duk_hbufobj_promote_plain(duk_hthread *thr, duk_idx_t idx); + +#else /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* nothing */ + +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ +#endif /* DUK_HBUFOBJ_H_INCLUDED */ +/* #include duk_hthread.h */ +#line 1 "duk_hthread.h" +/* + * Heap thread object representation. + * + * duk_hthread is also the 'context' for public API functions via a + * different typedef. Most API calls operate on the topmost frame + * of the value stack only. + */ + +#if !defined(DUK_HTHREAD_H_INCLUDED) +#define DUK_HTHREAD_H_INCLUDED + +/* + * Stack constants + */ + +/* Initial valstack size, roughly 0.7kiB. */ +#define DUK_VALSTACK_INITIAL_SIZE 96U + +/* Internal extra elements assumed on function entry, always added to + * user-defined 'extra' for e.g. the duk_check_stack() call. + */ +#define DUK_VALSTACK_INTERNAL_EXTRA 32U + +/* Number of elements guaranteed to be user accessible (in addition to call + * arguments) on Duktape/C function entry. This is the major public API + * commitment. + */ +#define DUK_VALSTACK_API_ENTRY_MINIMUM DUK_API_ENTRY_STACK + +/* + * Activation defines + */ + +#define DUK_ACT_FLAG_STRICT (1U << 0) /* function executes in strict mode */ +#define DUK_ACT_FLAG_TAILCALLED (1U << 1) /* activation has tail called one or more times */ +#define DUK_ACT_FLAG_CONSTRUCT (1U << 2) /* function executes as a constructor (called via "new") */ +#define DUK_ACT_FLAG_PREVENT_YIELD (1U << 3) /* activation prevents yield (native call or "new") */ +#define DUK_ACT_FLAG_DIRECT_EVAL (1U << 4) /* activation is a direct eval call */ +#define DUK_ACT_FLAG_CONSTRUCT_PROXY (1U << 5) /* activation is for Proxy 'construct' call, special return value handling */ +#define DUK_ACT_FLAG_BREAKPOINT_ACTIVE (1U << 6) /* activation has active breakpoint(s) */ + +#define DUK_ACT_GET_FUNC(act) ((act)->func) + +/* + * Flags for __FILE__ / __LINE__ registered into tracedata + */ + +#define DUK_TB_FLAG_NOBLAME_FILELINE (1U << 0) /* don't report __FILE__ / __LINE__ as fileName/lineNumber */ + +/* + * Catcher defines + */ + +/* XXX: remove catcher type entirely */ + +/* flags field: LLLLLLFT, L = label (24 bits), F = flags (4 bits), T = type (4 bits) */ +#define DUK_CAT_TYPE_MASK 0x0000000fUL +#define DUK_CAT_TYPE_BITS 4 +#define DUK_CAT_LABEL_MASK 0xffffff00UL +#define DUK_CAT_LABEL_BITS 24 +#define DUK_CAT_LABEL_SHIFT 8 + +#define DUK_CAT_FLAG_CATCH_ENABLED (1U << 4) /* catch part will catch */ +#define DUK_CAT_FLAG_FINALLY_ENABLED (1U << 5) /* finally part will catch */ +#define DUK_CAT_FLAG_CATCH_BINDING_ENABLED (1U << 6) /* request to create catch binding */ +#define DUK_CAT_FLAG_LEXENV_ACTIVE (1U << 7) /* catch or with binding is currently active */ + +#define DUK_CAT_TYPE_UNKNOWN 0 +#define DUK_CAT_TYPE_TCF 1 +#define DUK_CAT_TYPE_LABEL 2 + +#define DUK_CAT_GET_TYPE(c) ((c)->flags & DUK_CAT_TYPE_MASK) +#define DUK_CAT_GET_LABEL(c) (((c)->flags & DUK_CAT_LABEL_MASK) >> DUK_CAT_LABEL_SHIFT) + +#define DUK_CAT_HAS_CATCH_ENABLED(c) ((c)->flags & DUK_CAT_FLAG_CATCH_ENABLED) +#define DUK_CAT_HAS_FINALLY_ENABLED(c) ((c)->flags & DUK_CAT_FLAG_FINALLY_ENABLED) +#define DUK_CAT_HAS_CATCH_BINDING_ENABLED(c) ((c)->flags & DUK_CAT_FLAG_CATCH_BINDING_ENABLED) +#define DUK_CAT_HAS_LEXENV_ACTIVE(c) ((c)->flags & DUK_CAT_FLAG_LEXENV_ACTIVE) + +#define DUK_CAT_SET_CATCH_ENABLED(c) \ + do { \ + (c)->flags |= DUK_CAT_FLAG_CATCH_ENABLED; \ + } while (0) +#define DUK_CAT_SET_FINALLY_ENABLED(c) \ + do { \ + (c)->flags |= DUK_CAT_FLAG_FINALLY_ENABLED; \ + } while (0) +#define DUK_CAT_SET_CATCH_BINDING_ENABLED(c) \ + do { \ + (c)->flags |= DUK_CAT_FLAG_CATCH_BINDING_ENABLED; \ + } while (0) +#define DUK_CAT_SET_LEXENV_ACTIVE(c) \ + do { \ + (c)->flags |= DUK_CAT_FLAG_LEXENV_ACTIVE; \ + } while (0) + +#define DUK_CAT_CLEAR_CATCH_ENABLED(c) \ + do { \ + (c)->flags &= ~DUK_CAT_FLAG_CATCH_ENABLED; \ + } while (0) +#define DUK_CAT_CLEAR_FINALLY_ENABLED(c) \ + do { \ + (c)->flags &= ~DUK_CAT_FLAG_FINALLY_ENABLED; \ + } while (0) +#define DUK_CAT_CLEAR_CATCH_BINDING_ENABLED(c) \ + do { \ + (c)->flags &= ~DUK_CAT_FLAG_CATCH_BINDING_ENABLED; \ + } while (0) +#define DUK_CAT_CLEAR_LEXENV_ACTIVE(c) \ + do { \ + (c)->flags &= ~DUK_CAT_FLAG_LEXENV_ACTIVE; \ + } while (0) + +/* + * Thread defines + */ + +#if defined(DUK_USE_ROM_STRINGS) +#define DUK_HTHREAD_GET_STRING(thr, idx) ((duk_hstring *) DUK_LOSE_CONST(duk_rom_strings_stridx[(idx)])) +#else /* DUK_USE_ROM_STRINGS */ +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HTHREAD_GET_STRING(thr, idx) ((duk_hstring *) DUK_USE_HEAPPTR_DEC16((thr)->heap->heap_udata, (thr)->strs16[(idx)])) +#else +#define DUK_HTHREAD_GET_STRING(thr, idx) ((thr)->strs[(idx)]) +#endif +#endif /* DUK_USE_ROM_STRINGS */ + +/* values for the state field */ +#define DUK_HTHREAD_STATE_INACTIVE 1 /* thread not currently running */ +#define DUK_HTHREAD_STATE_RUNNING 2 /* thread currently running (only one at a time) */ +#define DUK_HTHREAD_STATE_RESUMED 3 /* thread resumed another thread (active but not running) */ +#define DUK_HTHREAD_STATE_YIELDED 4 /* thread has yielded */ +#define DUK_HTHREAD_STATE_TERMINATED 5 /* thread has terminated */ + +/* Executor interrupt default interval when nothing else requires a + * smaller value. The default interval must be small enough to allow + * for reasonable execution timeout checking but large enough to keep + * impact on execution performance low. + */ +#if defined(DUK_USE_INTERRUPT_COUNTER) +#define DUK_HTHREAD_INTCTR_DEFAULT (256L * 1024L) +#endif + +/* + * Assert context is valid: non-NULL pointer, fields look sane. + * + * This is used by public API call entrypoints to catch invalid 'ctx' pointers + * as early as possible; invalid 'ctx' pointers cause very odd and difficult to + * diagnose behavior so it's worth checking even when the check is not 100%. + */ + +#if defined(DUK_USE_ASSERTIONS) +/* Assertions for internals. */ +DUK_INTERNAL_DECL void duk_hthread_assert_valid(duk_hthread *thr); +#define DUK_HTHREAD_ASSERT_VALID(thr) \ + do { \ + duk_hthread_assert_valid((thr)); \ + } while (0) + +/* Assertions for public API calls; a bit stronger. */ +DUK_INTERNAL_DECL void duk_ctx_assert_valid(duk_hthread *thr); +#define DUK_CTX_ASSERT_VALID(thr) \ + do { \ + duk_ctx_assert_valid((thr)); \ + } while (0) +#else +#define DUK_HTHREAD_ASSERT_VALID(thr) \ + do { \ + } while (0) +#define DUK_CTX_ASSERT_VALID(thr) \ + do { \ + } while (0) +#endif + +/* Assertions for API call entry specifically. Checks 'ctx' but also may + * check internal state (e.g. not in a debugger transport callback). + */ +#define DUK_ASSERT_API_ENTRY(thr) \ + do { \ + DUK_CTX_ASSERT_VALID((thr)); \ + DUK_ASSERT((thr)->heap != NULL); \ + DUK_ASSERT((thr)->heap->dbg_calling_transport == 0); \ + } while (0) + +/* + * Assertion helpers. + */ + +#define DUK_ASSERT_STRIDX_VALID(val) DUK_ASSERT((duk_uint_t) (val) < DUK_HEAP_NUM_STRINGS) + +#define DUK_ASSERT_BIDX_VALID(val) DUK_ASSERT((duk_uint_t) (val) < DUK_NUM_BUILTINS) + +/* + * Misc + */ + +/* Fast access to 'this' binding. Assumes there's a call in progress. */ +#define DUK_HTHREAD_THIS_PTR(thr) \ + (DUK_ASSERT_EXPR((thr) != NULL), DUK_ASSERT_EXPR((thr)->valstack_bottom > (thr)->valstack), (thr)->valstack_bottom - 1) + +/* + * Struct defines + */ + +/* Fields are ordered for alignment/packing. */ +struct duk_activation { + duk_tval tv_func; /* borrowed: full duk_tval for function being executed; for lightfuncs */ + duk_hobject *func; /* borrowed: function being executed; for bound function calls, this is the final, real function, NULL + for lightfuncs */ + duk_activation *parent; /* previous (parent) activation (or NULL if none) */ + duk_hobject *var_env; /* current variable environment (may be NULL if delayed) */ + duk_hobject *lex_env; /* current lexical environment (may be NULL if delayed) */ + duk_catcher *cat; /* current catcher (or NULL) */ + +#if defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) + /* Previous value of 'func' caller, restored when unwound. Only in use + * when 'func' is non-strict. + */ + duk_hobject *prev_caller; +#endif + + duk_instr_t *curr_pc; /* next instruction to execute (points to 'func' bytecode, stable pointer), NULL for native calls */ + + /* bottom_byteoff and retval_byteoff are only used for book-keeping + * of ECMAScript-initiated calls, to allow returning to an ECMAScript + * function properly. + */ + + /* Bottom of valstack for this activation, used to reset + * valstack_bottom on return; offset is absolute. There's + * no need to track 'top' because native call handling deals + * with that using locals, and for ECMAScript returns 'nregs' + * indicates the necessary top. + */ + duk_size_t bottom_byteoff; + + /* Return value when returning to this activation (points to caller + * reg, not callee reg); offset is absolute (only set if activation is + * not topmost). + * + * Note: bottom_byteoff is always set, while retval_byteoff is only + * applicable for activations below the topmost one. Currently + * retval_byteoff for the topmost activation is considered garbage + * (and it not initialized on entry or cleared on return; may contain + * previous or garbage values). + */ + duk_size_t retval_byteoff; + + /* Current 'this' binding is the value just below bottom. + * Previously, 'this' binding was handled with an index to the + * (calling) valstack. This works for everything except tail + * calls, which must not "accumulate" valstack temps. + */ + + /* Value stack reserve (valstack_end) byte offset to be restored + * when returning to this activation. Only used by the bytecode + * executor. + */ + duk_size_t reserve_byteoff; + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + duk_uint32_t prev_line; /* needed for stepping */ +#endif + + duk_small_uint_t flags; +}; + +struct duk_catcher { + duk_catcher *parent; /* previous (parent) catcher (or NULL if none) */ + duk_hstring *h_varname; /* borrowed reference to catch variable name (or NULL if none) */ + /* (reference is valid as long activation exists) */ + duk_instr_t *pc_base; /* resume execution from pc_base or pc_base+1 (points to 'func' bytecode, stable pointer) */ + duk_size_t idx_base; /* idx_base and idx_base+1 get completion value and type */ + duk_uint32_t flags; /* type and control flags, label number */ + /* XXX: could pack 'flags' and 'idx_base' to same value in practice, + * on 32-bit targets this would make duk_catcher 16 bytes. + */ +}; + +struct duk_hthread { + /* Shared object part */ + duk_hobject obj; + + /* Pointer to bytecode executor's 'curr_pc' variable. Used to copy + * the current PC back into the topmost activation when activation + * state is about to change (or "syncing" is otherwise needed). This + * is rather awkward but important for performance, see execution.rst. + */ + duk_instr_t **ptr_curr_pc; + + /* Backpointers. */ + duk_heap *heap; + + /* Current strictness flag: affects API calls. */ + duk_uint8_t strict; + + /* Thread state. */ + duk_uint8_t state; + duk_uint8_t unused1; + duk_uint8_t unused2; + + /* XXX: Valstack and callstack are currently assumed to have non-NULL + * pointers. Relaxing this would not lead to big benefits (except + * perhaps for terminated threads). + */ + + /* Value stack: these are expressed as pointers for faster stack + * manipulation. [valstack,valstack_top[ is GC-reachable, + * [valstack_top,valstack_alloc_end[ is not GC-reachable but kept + * initialized as 'undefined'. [valstack,valstack_end[ is the + * guaranteed/reserved space and the valstack cannot be resized to + * a smaller size. [valstack_end,valstack_alloc_end[ is currently + * allocated slack that can be used to grow the current guaranteed + * space but may be shrunk away without notice. + * + * + * <----------------------- guaranteed ---> + * <---- slack ---> + * <--- frame ---> + * .-------------+=============+----------+--------------. + * |xxxxxxxxxxxxx|yyyyyyyyyyyyy|uuuuuuuuuu|uuuuuuuuuuuuuu| + * `-------------+=============+----------+--------------' + * + * ^ ^ ^ ^ ^ + * | | | | | + * valstack bottom top end alloc_end + * + * xxx = arbitrary values, below current frame + * yyy = arbitrary values, inside current frame + * uuu = outside active value stack, initialized to 'undefined' + */ + duk_tval *valstack; /* start of valstack allocation */ + duk_tval *valstack_end; /* end of valstack reservation/guarantee (exclusive) */ + duk_tval *valstack_alloc_end; /* end of valstack allocation */ + duk_tval *valstack_bottom; /* bottom of current frame */ + duk_tval *valstack_top; /* top of current frame (exclusive) */ + + /* Call stack, represented as a linked list starting from the current + * activation (or NULL if nothing is active). + */ + duk_activation *callstack_curr; /* current activation (or NULL if none) */ + duk_size_t callstack_top; /* number of activation records in callstack (0 if none) */ + duk_size_t callstack_preventcount; /* number of activation records in callstack preventing a yield */ + + /* Yield/resume book-keeping. */ + duk_hthread *resumer; /* who resumed us (if any) */ + + /* Current compiler state (if any), used for augmenting SyntaxErrors. */ + duk_compiler_ctx *compile_ctx; + +#if defined(DUK_USE_INTERRUPT_COUNTER) + /* Interrupt counter for triggering a slow path check for execution + * timeout, debugger interaction such as breakpoints, etc. The value + * is valid for the current running thread, and both the init and + * counter values are copied whenever a thread switch occurs. It's + * important for the counter to be conveniently accessible for the + * bytecode executor inner loop for performance reasons. + */ + duk_int_t interrupt_counter; /* countdown state */ + duk_int_t interrupt_init; /* start value for current countdown */ +#endif + + /* Builtin-objects; may or may not be shared with other threads, + * threads existing in different "compartments" will have different + * built-ins. Must be stored on a per-thread basis because there + * is no intermediate structure for a thread group / compartment. + * This takes quite a lot of space, currently 43x4 = 172 bytes on + * 32-bit platforms. + * + * In some cases the builtins array could be ROM based, but it's + * sometimes edited (e.g. for sandboxing) so it's better to keep + * this array in RAM. + */ + duk_hobject *builtins[DUK_NUM_BUILTINS]; + + /* Convenience copies from heap/vm for faster access. */ +#if defined(DUK_USE_ROM_STRINGS) + /* No field needed when strings are in ROM. */ +#else +#if defined(DUK_USE_HEAPPTR16) + duk_uint16_t *strs16; +#else + duk_hstring **strs; +#endif +#endif +}; + +/* + * Prototypes + */ + +DUK_INTERNAL_DECL void duk_hthread_copy_builtin_objects(duk_hthread *thr_from, duk_hthread *thr_to); +DUK_INTERNAL_DECL void duk_hthread_create_builtin_objects(duk_hthread *thr); +DUK_INTERNAL_DECL duk_bool_t duk_hthread_init_stacks(duk_heap *heap, duk_hthread *thr); +DUK_INTERNAL_DECL void duk_hthread_terminate(duk_hthread *thr); + +DUK_INTERNAL_DECL duk_activation *duk_hthread_activation_alloc(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_hthread_activation_free(duk_hthread *thr, duk_activation *act); +DUK_INTERNAL_DECL void duk_hthread_activation_unwind_norz(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_hthread_activation_unwind_reuse_norz(duk_hthread *thr); +DUK_INTERNAL_DECL duk_activation *duk_hthread_get_activation_for_level(duk_hthread *thr, duk_int_t level); + +DUK_INTERNAL_DECL duk_catcher *duk_hthread_catcher_alloc(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_hthread_catcher_free(duk_hthread *thr, duk_catcher *cat); +DUK_INTERNAL_DECL void duk_hthread_catcher_unwind_norz(duk_hthread *thr, duk_activation *act); +DUK_INTERNAL_DECL void duk_hthread_catcher_unwind_nolexenv_norz(duk_hthread *thr, duk_activation *act); + +#if defined(DUK_USE_FINALIZER_TORTURE) +DUK_INTERNAL_DECL void duk_hthread_valstack_torture_realloc(duk_hthread *thr); +#endif + +DUK_INTERNAL_DECL void *duk_hthread_get_valstack_ptr(duk_heap *heap, void *ud); /* indirect allocs */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) +DUK_INTERNAL_DECL duk_uint_fast32_t duk_hthread_get_act_curr_pc(duk_hthread *thr, duk_activation *act); +#endif +DUK_INTERNAL_DECL duk_uint_fast32_t duk_hthread_get_act_prev_pc(duk_hthread *thr, duk_activation *act); +DUK_INTERNAL_DECL void duk_hthread_sync_currpc(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_hthread_sync_and_null_currpc(duk_hthread *thr); + +#endif /* DUK_HTHREAD_H_INCLUDED */ +/* #include duk_harray.h */ +#line 1 "duk_harray.h" +/* + * Array object representation, used for actual Array instances. + * + * All objects with the exotic array behavior (which must coincide with having + * internal class array) MUST be duk_harrays. No other object can be a + * duk_harray. However, duk_harrays may not always have an array part. + */ + +#if !defined(DUK_HARRAY_H_INCLUDED) +#define DUK_HARRAY_H_INCLUDED + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_harray_assert_valid(duk_harray *h); +#define DUK_HARRAY_ASSERT_VALID(h) \ + do { \ + duk_harray_assert_valid((h)); \ + } while (0) +#else +#define DUK_HARRAY_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +#define DUK_HARRAY_LENGTH_WRITABLE(h) (!(h)->length_nonwritable) +#define DUK_HARRAY_LENGTH_NONWRITABLE(h) ((h)->length_nonwritable) +#define DUK_HARRAY_SET_LENGTH_WRITABLE(h) \ + do { \ + (h)->length_nonwritable = 0; \ + } while (0) +#define DUK_HARRAY_SET_LENGTH_NONWRITABLE(h) \ + do { \ + (h)->length_nonwritable = 1; \ + } while (0) + +struct duk_harray { + /* Shared object part. */ + duk_hobject obj; + + /* Array .length. + * + * At present Array .length may be smaller, equal, or even larger + * than the allocated underlying array part. Fast path code must + * always take this into account carefully. + */ + duk_uint32_t length; + + /* Array .length property attributes. The property is always + * non-enumerable and non-configurable. It's initially writable + * but per Object.defineProperty() rules it can be made non-writable + * even if it is non-configurable. Thus we need to track the + * writability explicitly. + * + * XXX: this field to be eliminated and moved into duk_hobject + * flags field to save space. + */ + duk_bool_t length_nonwritable; +}; + +#endif /* DUK_HARRAY_H_INCLUDED */ +/* #include duk_henv.h */ +#line 1 "duk_henv.h" +/* + * Environment object representation. + */ + +#if !defined(DUK_HENV_H_INCLUDED) +#define DUK_HENV_H_INCLUDED + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_hdecenv_assert_valid(duk_hdecenv *h); +DUK_INTERNAL_DECL void duk_hobjenv_assert_valid(duk_hobjenv *h); +#define DUK_HDECENV_ASSERT_VALID(h) \ + do { \ + duk_hdecenv_assert_valid((h)); \ + } while (0) +#define DUK_HOBJENV_ASSERT_VALID(h) \ + do { \ + duk_hobjenv_assert_valid((h)); \ + } while (0) +#else +#define DUK_HDECENV_ASSERT_VALID(h) \ + do { \ + } while (0) +#define DUK_HOBJENV_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +struct duk_hdecenv { + /* Shared object part. */ + duk_hobject obj; + + /* These control variables provide enough information to access live + * variables for a closure that is still open. If thread == NULL, + * the record is closed and the identifiers are in the property table. + */ + duk_hthread *thread; + duk_hobject *varmap; + duk_size_t regbase_byteoff; +}; + +struct duk_hobjenv { + /* Shared object part. */ + duk_hobject obj; + + /* Target object and 'this' binding for object binding. */ + duk_hobject *target; + + /* The 'target' object is used as a this binding in only some object + * environments. For example, the global environment does not provide + * a this binding, but a with statement does. + */ + duk_bool_t has_this; +}; + +#endif /* DUK_HENV_H_INCLUDED */ +/* #include duk_hbuffer.h */ +#line 1 "duk_hbuffer.h" +/* + * Heap buffer representation. + * + * Heap allocated user data buffer which is either: + * + * 1. A fixed size buffer (data follows header statically) + * 2. A dynamic size buffer (data pointer follows header) + * + * The data pointer for a variable size buffer of zero size may be NULL. + */ + +#if !defined(DUK_HBUFFER_H_INCLUDED) +#define DUK_HBUFFER_H_INCLUDED + +/* + * Flags + * + * Fixed buffer: 0 + * Dynamic buffer: DUK_HBUFFER_FLAG_DYNAMIC + * External buffer: DUK_HBUFFER_FLAG_DYNAMIC | DUK_HBUFFER_FLAG_EXTERNAL + */ + +#define DUK_HBUFFER_FLAG_DYNAMIC DUK_HEAPHDR_USER_FLAG(0) /* buffer is behind a pointer, dynamic or external */ +#define DUK_HBUFFER_FLAG_EXTERNAL DUK_HEAPHDR_USER_FLAG(1) /* buffer pointer is to an externally allocated buffer */ + +#define DUK_HBUFFER_HAS_DYNAMIC(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HBUFFER_FLAG_DYNAMIC) +#define DUK_HBUFFER_HAS_EXTERNAL(x) DUK_HEAPHDR_CHECK_FLAG_BITS(&(x)->hdr, DUK_HBUFFER_FLAG_EXTERNAL) + +#define DUK_HBUFFER_SET_DYNAMIC(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HBUFFER_FLAG_DYNAMIC) +#define DUK_HBUFFER_SET_EXTERNAL(x) DUK_HEAPHDR_SET_FLAG_BITS(&(x)->hdr, DUK_HBUFFER_FLAG_EXTERNAL) + +#define DUK_HBUFFER_CLEAR_DYNAMIC(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HBUFFER_FLAG_DYNAMIC) +#define DUK_HBUFFER_CLEAR_EXTERNAL(x) DUK_HEAPHDR_CLEAR_FLAG_BITS(&(x)->hdr, DUK_HBUFFER_FLAG_EXTERNAL) + +/* + * Misc defines + */ + +/* Impose a maximum buffer length for now. Restricted artificially to + * ensure resize computations or adding a heap header length won't + * overflow size_t and that a signed duk_int_t can hold a buffer + * length. The limit should be synchronized with DUK_HSTRING_MAX_BYTELEN. + */ + +#if defined(DUK_USE_BUFLEN16) +#define DUK_HBUFFER_MAX_BYTELEN (0x0000ffffUL) +#else +/* Intentionally not 0x7fffffffUL; at least JSON code expects that + * 2*len + 2 fits in 32 bits. + */ +#define DUK_HBUFFER_MAX_BYTELEN (0x7ffffffeUL) +#endif + +/* + * Field access + */ + +#if defined(DUK_USE_BUFLEN16) +/* size stored in duk_heaphdr unused flag bits */ +#define DUK_HBUFFER_GET_SIZE(x) ((x)->hdr.h_flags >> 16) +#define DUK_HBUFFER_SET_SIZE(x, v) \ + do { \ + duk_size_t duk__v; \ + duk__v = (v); \ + DUK_ASSERT(duk__v <= 0xffffUL); \ + (x)->hdr.h_flags = ((x)->hdr.h_flags & 0x0000ffffUL) | (((duk_uint32_t) duk__v) << 16); \ + } while (0) +#define DUK_HBUFFER_ADD_SIZE(x, dv) \ + do { \ + (x)->hdr.h_flags += ((dv) << 16); \ + } while (0) +#define DUK_HBUFFER_SUB_SIZE(x, dv) \ + do { \ + (x)->hdr.h_flags -= ((dv) << 16); \ + } while (0) +#else +#define DUK_HBUFFER_GET_SIZE(x) (((duk_hbuffer *) (x))->size) +#define DUK_HBUFFER_SET_SIZE(x, v) \ + do { \ + ((duk_hbuffer *) (x))->size = (v); \ + } while (0) +#define DUK_HBUFFER_ADD_SIZE(x, dv) \ + do { \ + (x)->size += (dv); \ + } while (0) +#define DUK_HBUFFER_SUB_SIZE(x, dv) \ + do { \ + (x)->size -= (dv); \ + } while (0) +#endif + +#define DUK_HBUFFER_FIXED_GET_SIZE(x) DUK_HBUFFER_GET_SIZE((duk_hbuffer *) (x)) +#define DUK_HBUFFER_FIXED_SET_SIZE(x, v) DUK_HBUFFER_SET_SIZE((duk_hbuffer *) (x)) + +#define DUK_HBUFFER_DYNAMIC_GET_SIZE(x) DUK_HBUFFER_GET_SIZE((duk_hbuffer *) (x)) +#define DUK_HBUFFER_DYNAMIC_SET_SIZE(x, v) DUK_HBUFFER_SET_SIZE((duk_hbuffer *) (x), (v)) +#define DUK_HBUFFER_DYNAMIC_ADD_SIZE(x, dv) DUK_HBUFFER_ADD_SIZE((duk_hbuffer *) (x), (dv)) +#define DUK_HBUFFER_DYNAMIC_SUB_SIZE(x, dv) DUK_HBUFFER_SUB_SIZE((duk_hbuffer *) (x), (dv)) + +#define DUK_HBUFFER_EXTERNAL_GET_SIZE(x) DUK_HBUFFER_GET_SIZE((duk_hbuffer *) (x)) +#define DUK_HBUFFER_EXTERNAL_SET_SIZE(x, v) DUK_HBUFFER_SET_SIZE((duk_hbuffer *) (x), (v)) + +#define DUK_HBUFFER_FIXED_GET_DATA_PTR(heap, x) ((duk_uint8_t *) (((duk_hbuffer_fixed *) (void *) (x)) + 1)) + +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(heap, x) \ + ((void *) DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, ((duk_heaphdr *) (x))->h_extra16)) +#define DUK_HBUFFER_DYNAMIC_SET_DATA_PTR(heap, x, v) \ + do { \ + ((duk_heaphdr *) (x))->h_extra16 = DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (void *) (v)); \ + } while (0) +#define DUK_HBUFFER_DYNAMIC_SET_DATA_PTR_NULL(heap, x) \ + do { \ + ((duk_heaphdr *) (x))->h_extra16 = 0; /* assume 0 <=> NULL */ \ + } while (0) +#else +#define DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(heap, x) ((x)->curr_alloc) +#define DUK_HBUFFER_DYNAMIC_SET_DATA_PTR(heap, x, v) \ + do { \ + (x)->curr_alloc = (void *) (v); \ + } while (0) +#define DUK_HBUFFER_DYNAMIC_SET_DATA_PTR_NULL(heap, x) \ + do { \ + (x)->curr_alloc = (void *) NULL; \ + } while (0) +#endif + +/* No pointer compression because pointer is potentially outside of + * Duktape heap. + */ +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HBUFFER_EXTERNAL_GET_DATA_PTR(heap, x) ((void *) (x)->curr_alloc) +#define DUK_HBUFFER_EXTERNAL_SET_DATA_PTR(heap, x, v) \ + do { \ + (x)->curr_alloc = (void *) (v); \ + } while (0) +#define DUK_HBUFFER_EXTERNAL_SET_DATA_PTR_NULL(heap, x) \ + do { \ + (x)->curr_alloc = (void *) NULL; \ + } while (0) +#else +#define DUK_HBUFFER_EXTERNAL_GET_DATA_PTR(heap, x) ((void *) (x)->curr_alloc) +#define DUK_HBUFFER_EXTERNAL_SET_DATA_PTR(heap, x, v) \ + do { \ + (x)->curr_alloc = (void *) (v); \ + } while (0) +#define DUK_HBUFFER_EXTERNAL_SET_DATA_PTR_NULL(heap, x) \ + do { \ + (x)->curr_alloc = (void *) NULL; \ + } while (0) +#endif + +/* Get a pointer to the current buffer contents (matching current allocation + * size). May be NULL for zero size dynamic/external buffer. + */ +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HBUFFER_GET_DATA_PTR(heap, x) \ + (DUK_HBUFFER_HAS_DYNAMIC((x)) ? \ + (DUK_HBUFFER_HAS_EXTERNAL((x)) ? DUK_HBUFFER_EXTERNAL_GET_DATA_PTR((heap), (duk_hbuffer_external *) (x)) : \ + DUK_HBUFFER_DYNAMIC_GET_DATA_PTR((heap), (duk_hbuffer_dynamic *) (x))) : \ + DUK_HBUFFER_FIXED_GET_DATA_PTR((heap), (duk_hbuffer_fixed *) (void *) (x))) +#else +/* Without heap pointer compression duk_hbuffer_dynamic and duk_hbuffer_external + * have the same layout so checking for fixed vs. dynamic (or external) is enough. + */ +#define DUK_HBUFFER_GET_DATA_PTR(heap, x) \ + (DUK_HBUFFER_HAS_DYNAMIC((x)) ? DUK_HBUFFER_DYNAMIC_GET_DATA_PTR((heap), (duk_hbuffer_dynamic *) (x)) : \ + DUK_HBUFFER_FIXED_GET_DATA_PTR((heap), (duk_hbuffer_fixed *) (void *) (x))) +#endif + +/* Validity assert. */ +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_hbuffer_assert_valid(duk_hbuffer *h); +#define DUK_HBUFFER_ASSERT_VALID(h) \ + do { \ + duk_hbuffer_assert_valid((h)); \ + } while (0) +#else +#define DUK_HBUFFER_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +/* + * Structs + */ + +/* Shared prefix for all buffer types. */ +struct duk_hbuffer { + duk_heaphdr hdr; + + /* It's not strictly necessary to track the current size, but + * it is useful for writing robust native code. + */ + + /* Current size. */ +#if defined(DUK_USE_BUFLEN16) + /* Stored in duk_heaphdr unused flags. */ +#else + duk_size_t size; +#endif + + /* + * Data following the header depends on the DUK_HBUFFER_FLAG_DYNAMIC + * flag. + * + * If the flag is clear (the buffer is a fixed size one), the buffer + * data follows the header directly, consisting of 'size' bytes. + * + * If the flag is set, the actual buffer is allocated separately, and + * a few control fields follow the header. Specifically: + * + * - a "void *" pointing to the current allocation + * - a duk_size_t indicating the full allocated size (always >= 'size') + * + * If DUK_HBUFFER_FLAG_EXTERNAL is set, the buffer has been allocated + * by user code, so that Duktape won't be able to resize it and won't + * free it. This allows buffers to point to e.g. an externally + * allocated structure such as a frame buffer. + * + * Unlike strings, no terminator byte (NUL) is guaranteed after the + * data. This would be convenient, but would pad aligned user buffers + * unnecessarily upwards in size. For instance, if user code requested + * a 64-byte dynamic buffer, 65 bytes would actually be allocated which + * would then potentially round upwards to perhaps 68 or 72 bytes. + */ +}; + +/* Fixed buffer; data follows struct, with proper alignment guaranteed by + * struct size. + */ +#if (DUK_USE_ALIGN_BY == 8) && defined(DUK_USE_PACK_MSVC_PRAGMA) +#pragma pack(push, 8) +#endif +struct duk_hbuffer_fixed { + /* A union is used here as a portable struct size / alignment trick: + * by adding a 32-bit or a 64-bit (unused) union member, the size of + * the struct is effectively forced to be a multiple of 4 or 8 bytes + * (respectively) without increasing the size of the struct unless + * necessary. + */ + union { + struct { + duk_heaphdr hdr; +#if defined(DUK_USE_BUFLEN16) + /* Stored in duk_heaphdr unused flags. */ +#else + duk_size_t size; +#endif + } s; +#if (DUK_USE_ALIGN_BY == 4) + duk_uint32_t dummy_for_align4; +#elif (DUK_USE_ALIGN_BY == 8) + duk_double_t dummy_for_align8_1; +#if defined(DUK_USE_64BIT_OPS) + duk_uint64_t dummy_for_align8_2; +#endif +#elif (DUK_USE_ALIGN_BY == 1) + /* no extra padding */ +#else +#error invalid DUK_USE_ALIGN_BY +#endif + } u; + + /* + * Data follows the struct header. The struct size is padded by the + * compiler based on the struct members. This guarantees that the + * buffer data will be aligned-by-4 but not necessarily aligned-by-8. + * + * On platforms where alignment does not matter, the struct padding + * could be removed (if there is any). On platforms where alignment + * by 8 is required, the struct size must be forced to be a multiple + * of 8 by some means. Without it, some user code may break, and also + * Duktape itself breaks (e.g. the compiler stores duk_tvals in a + * dynamic buffer). + */ +} +#if (DUK_USE_ALIGN_BY == 8) && defined(DUK_USE_PACK_GCC_ATTR) +__attribute__((aligned(8))) +#elif (DUK_USE_ALIGN_BY == 8) && defined(DUK_USE_PACK_CLANG_ATTR) +__attribute__((aligned(8))) +#endif +; +#if (DUK_USE_ALIGN_BY == 8) && defined(DUK_USE_PACK_MSVC_PRAGMA) +#pragma pack(pop) +#endif + +/* Dynamic buffer with 'curr_alloc' pointing to a dynamic area allocated using + * heap allocation primitives. Also used for external buffers when low memory + * options are not used. + */ +struct duk_hbuffer_dynamic { + duk_heaphdr hdr; + +#if defined(DUK_USE_BUFLEN16) + /* Stored in duk_heaphdr unused flags. */ +#else + duk_size_t size; +#endif + +#if defined(DUK_USE_HEAPPTR16) + /* Stored in duk_heaphdr h_extra16. */ +#else + void *curr_alloc; /* may be NULL if alloc_size == 0 */ +#endif + + /* + * Allocation size for 'curr_alloc' is alloc_size. There is no + * automatic NUL terminator for buffers (see above for rationale). + * + * 'curr_alloc' is explicitly allocated with heap allocation + * primitives and will thus always have alignment suitable for + * e.g. duk_tval and an IEEE double. + */ +}; + +/* External buffer with 'curr_alloc' managed by user code and pointing to an + * arbitrary address. When heap pointer compression is not used, this struct + * has the same layout as duk_hbuffer_dynamic. + */ +struct duk_hbuffer_external { + duk_heaphdr hdr; + +#if defined(DUK_USE_BUFLEN16) + /* Stored in duk_heaphdr unused flags. */ +#else + duk_size_t size; +#endif + + /* Cannot be compressed as a heap pointer because may point to + * an arbitrary address. + */ + void *curr_alloc; /* may be NULL if alloc_size == 0 */ +}; + +/* + * Prototypes + */ + +DUK_INTERNAL_DECL duk_hbuffer *duk_hbuffer_alloc(duk_heap *heap, duk_size_t size, duk_small_uint_t flags, void **out_bufdata); +DUK_INTERNAL_DECL void *duk_hbuffer_get_dynalloc_ptr(duk_heap *heap, void *ud); /* indirect allocs */ + +/* dynamic buffer ops */ +DUK_INTERNAL_DECL void duk_hbuffer_resize(duk_hthread *thr, duk_hbuffer_dynamic *buf, duk_size_t new_size); +DUK_INTERNAL_DECL void duk_hbuffer_reset(duk_hthread *thr, duk_hbuffer_dynamic *buf); + +#endif /* DUK_HBUFFER_H_INCLUDED */ +/* #include duk_hproxy.h */ +#line 1 "duk_hproxy.h" +/* + * Proxy object representation. + */ + +#if !defined(DUK_HPROXY_H_INCLUDED) +#define DUK_HPROXY_H_INCLUDED + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_hproxy_assert_valid(duk_hproxy *h); +#define DUK_HPROXY_ASSERT_VALID(h) \ + do { \ + duk_hproxy_assert_valid((h)); \ + } while (0) +#else +#define DUK_HPROXY_ASSERT_VALID(h) \ + do { \ + } while (0) +#endif + +struct duk_hproxy { + /* Shared object part. */ + duk_hobject obj; + + /* Proxy target object. */ + duk_hobject *target; + + /* Proxy handlers (traps). */ + duk_hobject *handler; +}; + +#endif /* DUK_HPROXY_H_INCLUDED */ +/* #include duk_heap.h */ +#line 1 "duk_heap.h" +/* + * Heap structure. + * + * Heap contains allocated heap objects, interned strings, and built-in + * strings for one or more threads. + */ + +#if !defined(DUK_HEAP_H_INCLUDED) +#define DUK_HEAP_H_INCLUDED + +/* alloc function typedefs in duktape.h */ + +/* + * Heap flags + */ + +#define DUK_HEAP_FLAG_MARKANDSWEEP_RECLIMIT_REACHED \ + (1U << 0) /* mark-and-sweep marking reached a recursion limit and must use multi-pass marking */ +#define DUK_HEAP_FLAG_INTERRUPT_RUNNING (1U << 1) /* executor interrupt running (used to avoid nested interrupts) */ +#define DUK_HEAP_FLAG_FINALIZER_NORESCUE (1U << 2) /* heap destruction ongoing, finalizer rescue no longer possible */ +#define DUK_HEAP_FLAG_DEBUGGER_PAUSED (1U << 3) /* debugger is paused: talk with debug client until step/resume */ + +#define DUK__HEAP_HAS_FLAGS(heap, bits) ((heap)->flags & (bits)) +#define DUK__HEAP_SET_FLAGS(heap, bits) \ + do { \ + (heap)->flags |= (bits); \ + } while (0) +#define DUK__HEAP_CLEAR_FLAGS(heap, bits) \ + do { \ + (heap)->flags &= ~(bits); \ + } while (0) + +#define DUK_HEAP_HAS_MARKANDSWEEP_RECLIMIT_REACHED(heap) DUK__HEAP_HAS_FLAGS((heap), DUK_HEAP_FLAG_MARKANDSWEEP_RECLIMIT_REACHED) +#define DUK_HEAP_HAS_INTERRUPT_RUNNING(heap) DUK__HEAP_HAS_FLAGS((heap), DUK_HEAP_FLAG_INTERRUPT_RUNNING) +#define DUK_HEAP_HAS_FINALIZER_NORESCUE(heap) DUK__HEAP_HAS_FLAGS((heap), DUK_HEAP_FLAG_FINALIZER_NORESCUE) +#define DUK_HEAP_HAS_DEBUGGER_PAUSED(heap) DUK__HEAP_HAS_FLAGS((heap), DUK_HEAP_FLAG_DEBUGGER_PAUSED) + +#define DUK_HEAP_SET_MARKANDSWEEP_RECLIMIT_REACHED(heap) DUK__HEAP_SET_FLAGS((heap), DUK_HEAP_FLAG_MARKANDSWEEP_RECLIMIT_REACHED) +#define DUK_HEAP_SET_INTERRUPT_RUNNING(heap) DUK__HEAP_SET_FLAGS((heap), DUK_HEAP_FLAG_INTERRUPT_RUNNING) +#define DUK_HEAP_SET_FINALIZER_NORESCUE(heap) DUK__HEAP_SET_FLAGS((heap), DUK_HEAP_FLAG_FINALIZER_NORESCUE) +#define DUK_HEAP_SET_DEBUGGER_PAUSED(heap) DUK__HEAP_SET_FLAGS((heap), DUK_HEAP_FLAG_DEBUGGER_PAUSED) + +#define DUK_HEAP_CLEAR_MARKANDSWEEP_RECLIMIT_REACHED(heap) \ + DUK__HEAP_CLEAR_FLAGS((heap), DUK_HEAP_FLAG_MARKANDSWEEP_RECLIMIT_REACHED) +#define DUK_HEAP_CLEAR_INTERRUPT_RUNNING(heap) DUK__HEAP_CLEAR_FLAGS((heap), DUK_HEAP_FLAG_INTERRUPT_RUNNING) +#define DUK_HEAP_CLEAR_FINALIZER_NORESCUE(heap) DUK__HEAP_CLEAR_FLAGS((heap), DUK_HEAP_FLAG_FINALIZER_NORESCUE) +#define DUK_HEAP_CLEAR_DEBUGGER_PAUSED(heap) DUK__HEAP_CLEAR_FLAGS((heap), DUK_HEAP_FLAG_DEBUGGER_PAUSED) + +/* + * Longjmp types, also double as identifying continuation type for a rethrow (in 'finally') + */ + +#define DUK_LJ_TYPE_UNKNOWN 0 /* unused */ +#define DUK_LJ_TYPE_THROW 1 /* value1 -> error object */ +#define DUK_LJ_TYPE_YIELD 2 /* value1 -> yield value, iserror -> error / normal */ +#define DUK_LJ_TYPE_RESUME 3 /* value1 -> resume value, value2 -> resumee thread, iserror -> error/normal */ +#define DUK_LJ_TYPE_BREAK 4 /* value1 -> label number, pseudo-type to indicate a break continuation (for ENDFIN) */ +#define DUK_LJ_TYPE_CONTINUE 5 /* value1 -> label number, pseudo-type to indicate a continue continuation (for ENDFIN) */ +#define DUK_LJ_TYPE_RETURN 6 /* value1 -> return value, pseudo-type to indicate a return continuation (for ENDFIN) */ +#define DUK_LJ_TYPE_NORMAL 7 /* no value, pseudo-type to indicate a normal continuation (for ENDFIN) */ + +/* + * Mark-and-sweep flags + * + * These are separate from heap level flags now but could be merged. + * The heap structure only contains a 'base mark-and-sweep flags' + * field and the GC caller can impose further flags. + */ + +/* Emergency mark-and-sweep: try extra hard, even at the cost of + * performance. + */ +#define DUK_MS_FLAG_EMERGENCY (1U << 0) + +/* Postpone rescue decisions for reachable objects with FINALIZED set. + * Used during finalize_list processing to avoid incorrect rescue + * decisions due to finalize_list being a reachability root. + */ +#define DUK_MS_FLAG_POSTPONE_RESCUE (1U << 1) + +/* Don't compact objects; needed during object property table resize + * to prevent a recursive resize. It would suffice to protect only the + * current object being resized, but this is not yet implemented. + */ +#define DUK_MS_FLAG_NO_OBJECT_COMPACTION (1U << 2) + +/* + * Thread switching + * + * To switch heap->curr_thread, use the macro below so that interrupt counters + * get updated correctly. The macro allows a NULL target thread because that + * happens e.g. in call handling. + */ + +#if defined(DUK_USE_INTERRUPT_COUNTER) +#define DUK_HEAP_SWITCH_THREAD(heap, newthr) duk_heap_switch_thread((heap), (newthr)) +#else +#define DUK_HEAP_SWITCH_THREAD(heap, newthr) \ + do { \ + (heap)->curr_thread = (newthr); \ + } while (0) +#endif + +/* + * Stats + */ + +#if defined(DUK_USE_DEBUG) +#define DUK_STATS_INC(heap, fieldname) \ + do { \ + (heap)->fieldname += 1; \ + } while (0) +#else +#define DUK_STATS_INC(heap, fieldname) \ + do { \ + } while (0) +#endif + +/* + * Other heap related defines + */ + +/* Mark-and-sweep interval is relative to combined count of objects and + * strings kept in the heap during the latest mark-and-sweep pass. + * Fixed point .8 multiplier and .0 adder. Trigger count (interval) is + * decreased by each (re)allocation attempt (regardless of size), and each + * refzero processed object. + * + * 'SKIP' indicates how many (re)allocations to wait until a retry if + * GC is skipped because there is no thread do it with yet (happens + * only during init phases). + */ +#if defined(DUK_USE_REFERENCE_COUNTING) +#define DUK_HEAP_MARK_AND_SWEEP_TRIGGER_MULT 12800L /* 50x heap size */ +#define DUK_HEAP_MARK_AND_SWEEP_TRIGGER_ADD 1024L +#define DUK_HEAP_MARK_AND_SWEEP_TRIGGER_SKIP 256L +#else +#define DUK_HEAP_MARK_AND_SWEEP_TRIGGER_MULT 256L /* 1x heap size */ +#define DUK_HEAP_MARK_AND_SWEEP_TRIGGER_ADD 1024L +#define DUK_HEAP_MARK_AND_SWEEP_TRIGGER_SKIP 256L +#endif + +/* GC torture. */ +#if defined(DUK_USE_GC_TORTURE) +#define DUK_GC_TORTURE(heap) \ + do { \ + duk_heap_mark_and_sweep((heap), 0); \ + } while (0) +#else +#define DUK_GC_TORTURE(heap) \ + do { \ + } while (0) +#endif + +/* Stringcache is used for speeding up char-offset-to-byte-offset + * translations for non-ASCII strings. + */ +#define DUK_HEAP_STRCACHE_SIZE 4 +#define DUK_HEAP_STRINGCACHE_NOCACHE_LIMIT 16 /* strings up to the this length are not cached */ + +/* Some list management macros. */ +#define DUK_HEAP_INSERT_INTO_HEAP_ALLOCATED(heap, hdr) duk_heap_insert_into_heap_allocated((heap), (hdr)) +#if defined(DUK_USE_REFERENCE_COUNTING) +#define DUK_HEAP_REMOVE_FROM_HEAP_ALLOCATED(heap, hdr) duk_heap_remove_from_heap_allocated((heap), (hdr)) +#endif +#if defined(DUK_USE_FINALIZER_SUPPORT) +#define DUK_HEAP_INSERT_INTO_FINALIZE_LIST(heap, hdr) duk_heap_insert_into_finalize_list((heap), (hdr)) +#define DUK_HEAP_REMOVE_FROM_FINALIZE_LIST(heap, hdr) duk_heap_remove_from_finalize_list((heap), (hdr)) +#endif + +/* + * Built-in strings + */ + +/* heap string indices are autogenerated in duk_strings.h */ +#if defined(DUK_USE_ROM_STRINGS) +#define DUK_HEAP_GET_STRING(heap, idx) ((duk_hstring *) DUK_LOSE_CONST(duk_rom_strings_stridx[(idx)])) +#else /* DUK_USE_ROM_STRINGS */ +#if defined(DUK_USE_HEAPPTR16) +#define DUK_HEAP_GET_STRING(heap, idx) ((duk_hstring *) DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, (heap)->strs16[(idx)])) +#else +#define DUK_HEAP_GET_STRING(heap, idx) ((heap)->strs[(idx)]) +#endif +#endif /* DUK_USE_ROM_STRINGS */ + +/* + * Raw memory calls: relative to heap, but no GC interaction + */ + +#define DUK_ALLOC_RAW(heap, size) ((heap)->alloc_func((heap)->heap_udata, (size))) + +#define DUK_REALLOC_RAW(heap, ptr, newsize) ((heap)->realloc_func((heap)->heap_udata, (void *) (ptr), (newsize))) + +#define DUK_FREE_RAW(heap, ptr) ((heap)->free_func((heap)->heap_udata, (void *) (ptr))) + +/* + * Memory calls: relative to heap, GC interaction, but no error throwing. + * + * XXX: Currently a mark-and-sweep triggered by memory allocation will run + * using the heap->heap_thread. This thread is also used for running + * mark-and-sweep finalization; this is not ideal because it breaks the + * isolation between multiple global environments. + * + * Notes: + * + * - DUK_FREE() is required to ignore NULL and any other possible return + * value of a zero-sized alloc/realloc (same as ANSI C free()). + * + * - There is no DUK_REALLOC_ZEROED because we don't assume to know the + * old size. Caller must zero the reallocated memory. + * + * - DUK_REALLOC_INDIRECT() must be used when a mark-and-sweep triggered + * by an allocation failure might invalidate the original 'ptr', thus + * causing a realloc retry to use an invalid pointer. Example: we're + * reallocating the value stack and a finalizer resizes the same value + * stack during mark-and-sweep. The indirect variant requests for the + * current location of the pointer being reallocated using a callback + * right before every realloc attempt; this circuitous approach is used + * to avoid strict aliasing issues in a more straightforward indirect + * pointer (void **) approach. Note: the pointer in the storage + * location is read but is NOT updated; the caller must do that. + */ + +/* callback for indirect reallocs, request for current pointer */ +typedef void *(*duk_mem_getptr)(duk_heap *heap, void *ud); + +#define DUK_ALLOC(heap, size) duk_heap_mem_alloc((heap), (size)) +#define DUK_ALLOC_ZEROED(heap, size) duk_heap_mem_alloc_zeroed((heap), (size)) +#define DUK_REALLOC(heap, ptr, newsize) duk_heap_mem_realloc((heap), (ptr), (newsize)) +#define DUK_REALLOC_INDIRECT(heap, cb, ud, newsize) duk_heap_mem_realloc_indirect((heap), (cb), (ud), (newsize)) +#define DUK_FREE(heap, ptr) duk_heap_mem_free((heap), (ptr)) + +/* + * Checked allocation, relative to a thread + * + * DUK_FREE_CHECKED() doesn't actually throw, but accepts a 'thr' argument + * for convenience. + */ + +#define DUK_ALLOC_CHECKED(thr, size) duk_heap_mem_alloc_checked((thr), (size)) +#define DUK_ALLOC_CHECKED_ZEROED(thr, size) duk_heap_mem_alloc_checked_zeroed((thr), (size)) +#define DUK_FREE_CHECKED(thr, ptr) duk_heap_mem_free((thr)->heap, (ptr)) + +/* + * Memory constants + */ + +#define DUK_HEAP_ALLOC_FAIL_MARKANDSWEEP_LIMIT \ + 10 /* Retry allocation after mark-and-sweep for this \ + * many times. A single mark-and-sweep round is \ + * not guaranteed to free all unreferenced memory \ + * because of finalization (in fact, ANY number of \ + * rounds is strictly not enough). \ + */ + +#define DUK_HEAP_ALLOC_FAIL_MARKANDSWEEP_EMERGENCY_LIMIT \ + 3 /* Starting from this round, use emergency mode \ + * for mark-and-sweep. \ + */ + +/* + * Debugger support + */ + +/* Maximum number of breakpoints. Only breakpoints that are set are + * consulted so increasing this has no performance impact. + */ +#define DUK_HEAP_MAX_BREAKPOINTS 16 + +/* Opcode interval for a Date-based status/peek rate limit check. Only + * relevant when debugger is attached. Requesting a timestamp may be a + * slow operation on some platforms so this shouldn't be too low. On the + * other hand a high value makes Duktape react to a pause request slowly. + */ +#define DUK_HEAP_DBG_RATELIMIT_OPCODES 4000 + +/* Milliseconds between status notify and transport peeks. */ +#define DUK_HEAP_DBG_RATELIMIT_MILLISECS 200 + +/* Debugger pause flags. */ +#define DUK_PAUSE_FLAG_ONE_OPCODE (1U << 0) /* pause when a single opcode has been executed */ +#define DUK_PAUSE_FLAG_ONE_OPCODE_ACTIVE (1U << 1) /* one opcode pause actually active; artifact of current implementation */ +#define DUK_PAUSE_FLAG_LINE_CHANGE (1U << 2) /* pause when current line number changes */ +#define DUK_PAUSE_FLAG_FUNC_ENTRY (1U << 3) /* pause when entering a function */ +#define DUK_PAUSE_FLAG_FUNC_EXIT (1U << 4) /* pause when exiting current function */ +#define DUK_PAUSE_FLAG_CAUGHT_ERROR (1U << 5) /* pause when about to throw an error that is caught */ +#define DUK_PAUSE_FLAG_UNCAUGHT_ERROR (1U << 6) /* pause when about to throw an error that won't be caught */ + +struct duk_breakpoint { + duk_hstring *filename; + duk_uint32_t line; +}; + +/* + * String cache should ideally be at duk_hthread level, but that would + * cause string finalization to slow down relative to the number of + * threads; string finalization must check the string cache for "weak" + * references to the string being finalized to avoid dead pointers. + * + * Thus, string caches are now at the heap level now. + */ + +struct duk_strcache_entry { + duk_hstring *h; + duk_uint32_t bidx; + duk_uint32_t cidx; +}; + +/* + * Longjmp state, contains the information needed to perform a longjmp. + * Longjmp related values are written to value1, value2, and iserror. + */ + +struct duk_ljstate { + duk_jmpbuf *jmpbuf_ptr; /* current setjmp() catchpoint */ + duk_small_uint_t type; /* longjmp type */ + duk_bool_t iserror; /* isError flag for yield */ + duk_tval value1; /* 1st related value (type specific) */ + duk_tval value2; /* 2nd related value (type specific) */ +}; + +#define DUK_ASSERT_LJSTATE_UNSET(heap) \ + do { \ + DUK_ASSERT(heap != NULL); \ + DUK_ASSERT(heap->lj.type == DUK_LJ_TYPE_UNKNOWN); \ + DUK_ASSERT(heap->lj.iserror == 0); \ + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(&heap->lj.value1)); \ + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(&heap->lj.value2)); \ + } while (0) +#define DUK_ASSERT_LJSTATE_SET(heap) \ + do { \ + DUK_ASSERT(heap != NULL); \ + DUK_ASSERT(heap->lj.type != DUK_LJ_TYPE_UNKNOWN); \ + } while (0) + +/* + * Literal intern cache + */ + +struct duk_litcache_entry { + const duk_uint8_t *addr; + duk_hstring *h; +}; + +/* + * Main heap structure + */ + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL void duk_heap_assert_valid(duk_heap *heap); +#define DUK_HEAP_ASSERT_VALID(heap) \ + do { \ + duk_heap_assert_valid((heap)); \ + } while (0) +#else +#define DUK_HEAP_ASSERT_VALID(heap) \ + do { \ + } while (0) +#endif + +struct duk_heap { + duk_small_uint_t flags; + + /* Allocator functions. */ + duk_alloc_function alloc_func; + duk_realloc_function realloc_func; + duk_free_function free_func; + + /* Heap udata, used for allocator functions but also for other heap + * level callbacks like fatal function, pointer compression, etc. + */ + void *heap_udata; + + /* Fatal error handling, called e.g. when a longjmp() is needed but + * lj.jmpbuf_ptr is NULL. fatal_func must never return; it's not + * declared as "noreturn" because doing that for typedefs is a bit + * challenging portability-wise. + */ + duk_fatal_function fatal_func; + + /* Main list of allocated heap objects. Objects are either here, + * in finalize_list waiting for processing, or in refzero_list + * temporarily while a DECREF refzero cascade finishes. + */ + duk_heaphdr *heap_allocated; + + /* Temporary work list for freeing a cascade of objects when a DECREF + * (or DECREF_NORZ) encounters a zero refcount. Using a work list + * allows fixed C stack size when refcounts go to zero for a chain of + * objects. Outside of DECREF this is always a NULL because DECREF is + * processed without side effects (only memory free calls). + */ +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_heaphdr *refzero_list; +#endif + +#if defined(DUK_USE_FINALIZER_SUPPORT) + /* Work list for objects to be finalized. */ + duk_heaphdr *finalize_list; +#if defined(DUK_USE_ASSERTIONS) + /* Object whose finalizer is executing right now (no nesting). */ + duk_heaphdr *currently_finalizing; +#endif +#endif + + /* Freelist for duk_activations and duk_catchers. */ +#if defined(DUK_USE_CACHE_ACTIVATION) + duk_activation *activation_free; +#endif +#if defined(DUK_USE_CACHE_CATCHER) + duk_catcher *catcher_free; +#endif + + /* Voluntary mark-and-sweep trigger counter. Intentionally signed + * because we continue decreasing the value when voluntary GC cannot + * run. + */ +#if defined(DUK_USE_VOLUNTARY_GC) + duk_int_t ms_trigger_counter; +#endif + + /* Mark-and-sweep recursion control: too deep recursion causes + * multi-pass processing to avoid growing C stack without bound. + */ + duk_uint_t ms_recursion_depth; + + /* Mark-and-sweep flags automatically active (used for critical sections). */ + duk_small_uint_t ms_base_flags; + + /* Mark-and-sweep running flag. Prevents re-entry, and also causes + * refzero events to be ignored (= objects won't be queued to refzero_list). + * + * 0: mark-and-sweep not running + * 1: mark-and-sweep is running + * 2: heap destruction active or debugger active, prevent mark-and-sweep + * and refzero processing (but mark-and-sweep not itself running) + */ + duk_uint_t ms_running; + + /* Mark-and-sweep prevent count, stacking. Used to avoid M&S side + * effects (besides finalizers which are controlled separately) such + * as compacting the string table or object property tables. This + * is also bumped when ms_running is set to prevent recursive re-entry. + * Can also be bumped when mark-and-sweep is not running. + */ + duk_uint_t ms_prevent_count; + + /* Finalizer processing prevent count, stacking. Bumped when finalizers + * are processed to prevent recursive finalizer processing (first call site + * processing finalizers handles all finalizers until the list is empty). + * Can also be bumped explicitly to prevent finalizer execution. + */ + duk_uint_t pf_prevent_count; + + /* When processing finalize_list, don't actually run finalizers but + * queue finalizable objects back to heap_allocated as is. This is + * used during heap destruction to deal with finalizers that keep + * on creating more finalizable garbage. + */ + duk_uint_t pf_skip_finalizers; + +#if defined(DUK_USE_ASSERTIONS) + /* Set when we're in a critical path where an error throw would cause + * e.g. sandboxing/protected call violations or state corruption. This + * is just used for asserts. + */ + duk_bool_t error_not_allowed; +#endif + +#if defined(DUK_USE_ASSERTIONS) + /* Set when heap is still being initialized, helps with writing + * some assertions. + */ + duk_bool_t heap_initializing; +#endif + + /* Marker for detecting internal "double faults", errors thrown when + * we're trying to create an error object, see duk_error_throw.c. + */ + duk_bool_t creating_error; + + /* Marker for indicating we're calling a user error augmentation + * (errCreate/errThrow) function. Errors created/thrown during + * such a call are not augmented. + */ +#if defined(DUK_USE_AUGMENT_ERROR_THROW) || defined(DUK_USE_AUGMENT_ERROR_CREATE) + duk_bool_t augmenting_error; +#endif + + /* Longjmp state. */ + duk_ljstate lj; + + /* Heap thread, used internally and for finalization. */ + duk_hthread *heap_thread; + + /* Current running thread. */ + duk_hthread *curr_thread; + + /* Heap level "stash" object (e.g., various reachability roots). */ + duk_hobject *heap_object; + + /* duk_handle_call / duk_handle_safe_call recursion depth limiting */ + duk_int_t call_recursion_depth; + duk_int_t call_recursion_limit; + + /* Mix-in value for computing string hashes; should be reasonably unpredictable. */ + duk_uint32_t hash_seed; + + /* Random number state for duk_util_tinyrandom.c. */ +#if !defined(DUK_USE_GET_RANDOM_DOUBLE) +#if defined(DUK_USE_PREFER_SIZE) || !defined(DUK_USE_64BIT_OPS) + duk_uint32_t rnd_state; /* State for Shamir's three-op algorithm */ +#else + duk_uint64_t rnd_state[2]; /* State for xoroshiro128+ */ +#endif +#endif + + /* Counter for unique local symbol creation. */ + /* XXX: When 64-bit types are available, it would be more efficient to + * use a duk_uint64_t at least for incrementing but maybe also for + * string formatting in the Symbol constructor. + */ + duk_uint32_t sym_counter[2]; + + /* For manual debugging: instruction count based on executor and + * interrupt counter book-keeping. Inspect debug logs to see how + * they match up. + */ +#if defined(DUK_USE_INTERRUPT_COUNTER) && defined(DUK_USE_DEBUG) + duk_int_t inst_count_exec; + duk_int_t inst_count_interrupt; +#endif + + /* Debugger state. */ +#if defined(DUK_USE_DEBUGGER_SUPPORT) + /* Callbacks and udata; dbg_read_cb != NULL is used to indicate attached state. */ + duk_debug_read_function dbg_read_cb; /* required, NULL implies detached */ + duk_debug_write_function dbg_write_cb; /* required */ + duk_debug_peek_function dbg_peek_cb; + duk_debug_read_flush_function dbg_read_flush_cb; + duk_debug_write_flush_function dbg_write_flush_cb; + duk_debug_request_function dbg_request_cb; + duk_debug_detached_function dbg_detached_cb; + void *dbg_udata; + + /* The following are only relevant when debugger is attached. */ + duk_bool_t dbg_processing; /* currently processing messages or breakpoints: don't enter message processing recursively (e.g. + no breakpoints when processing debugger eval) */ + duk_bool_t dbg_state_dirty; /* resend state next time executor is about to run */ + duk_bool_t + dbg_force_restart; /* force executor restart to recheck breakpoints; used to handle function returns (see GH-303) */ + duk_bool_t dbg_detaching; /* debugger detaching; used to avoid calling detach handler recursively */ + duk_small_uint_t dbg_pause_flags; /* flags for automatic pause behavior */ + duk_activation *dbg_pause_act; /* activation related to pause behavior (pause on line change, function entry/exit) */ + duk_uint32_t dbg_pause_startline; /* starting line number for line change related pause behavior */ + duk_breakpoint dbg_breakpoints[DUK_HEAP_MAX_BREAKPOINTS]; /* breakpoints: [0,breakpoint_count[ gc reachable */ + duk_small_uint_t dbg_breakpoint_count; + duk_breakpoint + *dbg_breakpoints_active[DUK_HEAP_MAX_BREAKPOINTS + 1]; /* currently active breakpoints: NULL term, borrowed pointers */ + /* XXX: make active breakpoints actual copies instead of pointers? */ + + /* These are for rate limiting Status notifications and transport peeking. */ + duk_uint_t dbg_exec_counter; /* cumulative opcode execution count (overflows are OK) */ + duk_uint_t dbg_last_counter; /* value of dbg_exec_counter when we last did a Date-based check */ + duk_double_t dbg_last_time; /* time when status/peek was last done (Date-based rate limit) */ + + /* Used to support single-byte stream lookahead. */ + duk_bool_t dbg_have_next_byte; + duk_uint8_t dbg_next_byte; +#endif /* DUK_USE_DEBUGGER_SUPPORT */ +#if defined(DUK_USE_ASSERTIONS) + duk_bool_t dbg_calling_transport; /* transport call in progress, calling into Duktape forbidden */ +#endif + + /* String intern table (weak refs). */ +#if defined(DUK_USE_STRTAB_PTRCOMP) + duk_uint16_t *strtable16; +#else + duk_hstring **strtable; +#endif + duk_uint32_t st_mask; /* mask for lookup, st_size - 1 */ + duk_uint32_t st_size; /* stringtable size */ +#if (DUK_USE_STRTAB_MINSIZE != DUK_USE_STRTAB_MAXSIZE) + duk_uint32_t st_count; /* string count for resize load factor checks */ +#endif + duk_bool_t st_resizing; /* string table is being resized; avoid recursive resize */ + + /* String access cache (codepoint offset -> byte offset) for fast string + * character looping; 'weak' reference which needs special handling in GC. + */ + duk_strcache_entry strcache[DUK_HEAP_STRCACHE_SIZE]; + +#if defined(DUK_USE_LITCACHE_SIZE) + /* Literal intern cache. When enabled, strings interned as literals + * (e.g. duk_push_literal()) will be pinned and cached for the lifetime + * of the heap. + */ + duk_litcache_entry litcache[DUK_USE_LITCACHE_SIZE]; +#endif + + /* Built-in strings. */ +#if defined(DUK_USE_ROM_STRINGS) + /* No field needed when strings are in ROM. */ +#else +#if defined(DUK_USE_HEAPPTR16) + duk_uint16_t strs16[DUK_HEAP_NUM_STRINGS]; +#else + duk_hstring *strs[DUK_HEAP_NUM_STRINGS]; +#endif +#endif + + /* Stats. */ +#if defined(DUK_USE_DEBUG) + duk_int_t stats_exec_opcodes; + duk_int_t stats_exec_interrupt; + duk_int_t stats_exec_throw; + duk_int_t stats_call_all; + duk_int_t stats_call_tailcall; + duk_int_t stats_call_ecmatoecma; + duk_int_t stats_safecall_all; + duk_int_t stats_safecall_nothrow; + duk_int_t stats_safecall_throw; + duk_int_t stats_ms_try_count; + duk_int_t stats_ms_skip_count; + duk_int_t stats_ms_emergency_count; + duk_int_t stats_strtab_intern_hit; + duk_int_t stats_strtab_intern_miss; + duk_int_t stats_strtab_resize_check; + duk_int_t stats_strtab_resize_grow; + duk_int_t stats_strtab_resize_shrink; + duk_int_t stats_strtab_litcache_hit; + duk_int_t stats_strtab_litcache_miss; + duk_int_t stats_strtab_litcache_pin; + duk_int_t stats_object_realloc_props; + duk_int_t stats_object_abandon_array; + duk_int_t stats_getownpropdesc_count; + duk_int_t stats_getownpropdesc_hit; + duk_int_t stats_getownpropdesc_miss; + duk_int_t stats_getpropdesc_count; + duk_int_t stats_getpropdesc_hit; + duk_int_t stats_getpropdesc_miss; + duk_int_t stats_getprop_all; + duk_int_t stats_getprop_arrayidx; + duk_int_t stats_getprop_bufobjidx; + duk_int_t stats_getprop_bufferidx; + duk_int_t stats_getprop_bufferlen; + duk_int_t stats_getprop_stringidx; + duk_int_t stats_getprop_stringlen; + duk_int_t stats_getprop_proxy; + duk_int_t stats_getprop_arguments; + duk_int_t stats_putprop_all; + duk_int_t stats_putprop_arrayidx; + duk_int_t stats_putprop_bufobjidx; + duk_int_t stats_putprop_bufferidx; + duk_int_t stats_putprop_proxy; + duk_int_t stats_getvar_all; + duk_int_t stats_putvar_all; + duk_int_t stats_envrec_delayedcreate; + duk_int_t stats_envrec_create; + duk_int_t stats_envrec_newenv; + duk_int_t stats_envrec_oldenv; + duk_int_t stats_envrec_pushclosure; +#endif +}; + +/* + * Prototypes + */ + +DUK_INTERNAL_DECL +duk_heap *duk_heap_alloc(duk_alloc_function alloc_func, + duk_realloc_function realloc_func, + duk_free_function free_func, + void *heap_udata, + duk_fatal_function fatal_func); +DUK_INTERNAL_DECL void duk_heap_free(duk_heap *heap); +DUK_INTERNAL_DECL void duk_free_hobject(duk_heap *heap, duk_hobject *h); +DUK_INTERNAL_DECL void duk_free_hbuffer(duk_heap *heap, duk_hbuffer *h); +DUK_INTERNAL_DECL void duk_free_hstring(duk_heap *heap, duk_hstring *h); +DUK_INTERNAL_DECL void duk_heap_free_heaphdr_raw(duk_heap *heap, duk_heaphdr *hdr); + +DUK_INTERNAL_DECL void duk_heap_insert_into_heap_allocated(duk_heap *heap, duk_heaphdr *hdr); +#if defined(DUK_USE_REFERENCE_COUNTING) +DUK_INTERNAL_DECL void duk_heap_remove_from_heap_allocated(duk_heap *heap, duk_heaphdr *hdr); +#endif +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_INTERNAL_DECL void duk_heap_insert_into_finalize_list(duk_heap *heap, duk_heaphdr *hdr); +DUK_INTERNAL_DECL void duk_heap_remove_from_finalize_list(duk_heap *heap, duk_heaphdr *hdr); +#endif +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL duk_bool_t duk_heap_in_heap_allocated(duk_heap *heap, duk_heaphdr *ptr); +#endif +#if defined(DUK_USE_INTERRUPT_COUNTER) +DUK_INTERNAL_DECL void duk_heap_switch_thread(duk_heap *heap, duk_hthread *new_thr); +#endif + +DUK_INTERNAL_DECL duk_hstring *duk_heap_strtable_intern(duk_heap *heap, const duk_uint8_t *str, duk_uint32_t blen); +DUK_INTERNAL_DECL duk_hstring *duk_heap_strtable_intern_checked(duk_hthread *thr, const duk_uint8_t *str, duk_uint32_t len); +#if defined(DUK_USE_LITCACHE_SIZE) +DUK_INTERNAL_DECL duk_hstring *duk_heap_strtable_intern_literal_checked(duk_hthread *thr, + const duk_uint8_t *str, + duk_uint32_t blen); +#endif +DUK_INTERNAL_DECL duk_hstring *duk_heap_strtable_intern_u32(duk_heap *heap, duk_uint32_t val); +DUK_INTERNAL_DECL duk_hstring *duk_heap_strtable_intern_u32_checked(duk_hthread *thr, duk_uint32_t val); +#if defined(DUK_USE_REFERENCE_COUNTING) +DUK_INTERNAL_DECL void duk_heap_strtable_unlink(duk_heap *heap, duk_hstring *h); +#endif +DUK_INTERNAL_DECL void duk_heap_strtable_unlink_prev(duk_heap *heap, duk_hstring *h, duk_hstring *prev); +DUK_INTERNAL_DECL void duk_heap_strtable_force_resize(duk_heap *heap); +DUK_INTERNAL void duk_heap_strtable_free(duk_heap *heap); +#if defined(DUK_USE_DEBUG) +DUK_INTERNAL void duk_heap_strtable_dump(duk_heap *heap); +#endif + +DUK_INTERNAL_DECL void duk_heap_strcache_string_remove(duk_heap *heap, duk_hstring *h); +DUK_INTERNAL_DECL duk_uint_fast32_t duk_heap_strcache_offset_char2byte(duk_hthread *thr, + duk_hstring *h, + duk_uint_fast32_t char_offset); + +#if defined(DUK_USE_PROVIDE_DEFAULT_ALLOC_FUNCTIONS) +DUK_INTERNAL_DECL void *duk_default_alloc_function(void *udata, duk_size_t size); +DUK_INTERNAL_DECL void *duk_default_realloc_function(void *udata, void *ptr, duk_size_t newsize); +DUK_INTERNAL_DECL void duk_default_free_function(void *udata, void *ptr); +#endif + +DUK_INTERNAL_DECL void *duk_heap_mem_alloc(duk_heap *heap, duk_size_t size); +DUK_INTERNAL_DECL void *duk_heap_mem_alloc_zeroed(duk_heap *heap, duk_size_t size); +DUK_INTERNAL_DECL void *duk_heap_mem_alloc_checked(duk_hthread *thr, duk_size_t size); +DUK_INTERNAL_DECL void *duk_heap_mem_alloc_checked_zeroed(duk_hthread *thr, duk_size_t size); +DUK_INTERNAL_DECL void *duk_heap_mem_realloc(duk_heap *heap, void *ptr, duk_size_t newsize); +DUK_INTERNAL_DECL void *duk_heap_mem_realloc_indirect(duk_heap *heap, duk_mem_getptr cb, void *ud, duk_size_t newsize); +DUK_INTERNAL_DECL void duk_heap_mem_free(duk_heap *heap, void *ptr); + +DUK_INTERNAL_DECL void duk_heap_free_freelists(duk_heap *heap); + +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_INTERNAL_DECL void duk_heap_run_finalizer(duk_heap *heap, duk_hobject *obj); +DUK_INTERNAL_DECL void duk_heap_process_finalize_list(duk_heap *heap); +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +DUK_INTERNAL_DECL void duk_heap_mark_and_sweep(duk_heap *heap, duk_small_uint_t flags); + +DUK_INTERNAL_DECL duk_uint32_t duk_heap_hashstring(duk_heap *heap, const duk_uint8_t *str, duk_size_t len); + +#endif /* DUK_HEAP_H_INCLUDED */ +/* #include duk_debugger.h */ +#line 1 "duk_debugger.h" +#if !defined(DUK_DEBUGGER_H_INCLUDED) +#define DUK_DEBUGGER_H_INCLUDED + +/* Debugger protocol version is defined in the public API header. */ + +/* Initial bytes for markers. */ +#define DUK_DBG_IB_EOM 0x00 +#define DUK_DBG_IB_REQUEST 0x01 +#define DUK_DBG_IB_REPLY 0x02 +#define DUK_DBG_IB_ERROR 0x03 +#define DUK_DBG_IB_NOTIFY 0x04 + +/* Other initial bytes. */ +#define DUK_DBG_IB_INT4 0x10 +#define DUK_DBG_IB_STR4 0x11 +#define DUK_DBG_IB_STR2 0x12 +#define DUK_DBG_IB_BUF4 0x13 +#define DUK_DBG_IB_BUF2 0x14 +#define DUK_DBG_IB_UNUSED 0x15 +#define DUK_DBG_IB_UNDEFINED 0x16 +#define DUK_DBG_IB_NULL 0x17 +#define DUK_DBG_IB_TRUE 0x18 +#define DUK_DBG_IB_FALSE 0x19 +#define DUK_DBG_IB_NUMBER 0x1a +#define DUK_DBG_IB_OBJECT 0x1b +#define DUK_DBG_IB_POINTER 0x1c +#define DUK_DBG_IB_LIGHTFUNC 0x1d +#define DUK_DBG_IB_HEAPPTR 0x1e +/* The short string/integer initial bytes starting from 0x60 don't have + * defines now. + */ + +/* Error codes. */ +#define DUK_DBG_ERR_UNKNOWN 0x00 +#define DUK_DBG_ERR_UNSUPPORTED 0x01 +#define DUK_DBG_ERR_TOOMANY 0x02 +#define DUK_DBG_ERR_NOTFOUND 0x03 +#define DUK_DBG_ERR_APPLICATION 0x04 + +/* Commands and notifys initiated by Duktape. */ +#define DUK_DBG_CMD_STATUS 0x01 +#define DUK_DBG_CMD_UNUSED_2 0x02 /* Duktape 1.x: print notify */ +#define DUK_DBG_CMD_UNUSED_3 0x03 /* Duktape 1.x: alert notify */ +#define DUK_DBG_CMD_UNUSED_4 0x04 /* Duktape 1.x: log notify */ +#define DUK_DBG_CMD_THROW 0x05 +#define DUK_DBG_CMD_DETACHING 0x06 +#define DUK_DBG_CMD_APPNOTIFY 0x07 + +/* Commands initiated by debug client. */ +#define DUK_DBG_CMD_BASICINFO 0x10 +#define DUK_DBG_CMD_TRIGGERSTATUS 0x11 +#define DUK_DBG_CMD_PAUSE 0x12 +#define DUK_DBG_CMD_RESUME 0x13 +#define DUK_DBG_CMD_STEPINTO 0x14 +#define DUK_DBG_CMD_STEPOVER 0x15 +#define DUK_DBG_CMD_STEPOUT 0x16 +#define DUK_DBG_CMD_LISTBREAK 0x17 +#define DUK_DBG_CMD_ADDBREAK 0x18 +#define DUK_DBG_CMD_DELBREAK 0x19 +#define DUK_DBG_CMD_GETVAR 0x1a +#define DUK_DBG_CMD_PUTVAR 0x1b +#define DUK_DBG_CMD_GETCALLSTACK 0x1c +#define DUK_DBG_CMD_GETLOCALS 0x1d +#define DUK_DBG_CMD_EVAL 0x1e +#define DUK_DBG_CMD_DETACH 0x1f +#define DUK_DBG_CMD_DUMPHEAP 0x20 +#define DUK_DBG_CMD_GETBYTECODE 0x21 +#define DUK_DBG_CMD_APPREQUEST 0x22 +#define DUK_DBG_CMD_GETHEAPOBJINFO 0x23 +#define DUK_DBG_CMD_GETOBJPROPDESC 0x24 +#define DUK_DBG_CMD_GETOBJPROPDESCRANGE 0x25 + +/* The low 8 bits map directly to duk_hobject.h DUK_PROPDESC_FLAG_xxx. + * The remaining flags are specific to the debugger. + */ +#define DUK_DBG_PROPFLAG_SYMBOL (1U << 8) +#define DUK_DBG_PROPFLAG_HIDDEN (1U << 9) + +#if defined(DUK_USE_DEBUGGER_SUPPORT) +DUK_INTERNAL_DECL void duk_debug_do_detach(duk_heap *heap); + +DUK_INTERNAL_DECL duk_bool_t duk_debug_read_peek(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_debug_write_flush(duk_hthread *thr); + +DUK_INTERNAL_DECL void duk_debug_skip_bytes(duk_hthread *thr, duk_size_t length); +DUK_INTERNAL_DECL void duk_debug_skip_byte(duk_hthread *thr); + +DUK_INTERNAL_DECL void duk_debug_read_bytes(duk_hthread *thr, duk_uint8_t *data, duk_size_t length); +DUK_INTERNAL_DECL duk_uint8_t duk_debug_read_byte(duk_hthread *thr); +DUK_INTERNAL_DECL duk_int32_t duk_debug_read_int(duk_hthread *thr); +DUK_INTERNAL_DECL duk_hstring *duk_debug_read_hstring(duk_hthread *thr); +/* XXX: exposed duk_debug_read_pointer */ +/* XXX: exposed duk_debug_read_buffer */ +/* XXX: exposed duk_debug_read_hbuffer */ +#if 0 +DUK_INTERNAL_DECL duk_heaphdr *duk_debug_read_heapptr(duk_hthread *thr); +#endif +#if defined(DUK_USE_DEBUGGER_INSPECT) +DUK_INTERNAL_DECL duk_heaphdr *duk_debug_read_any_ptr(duk_hthread *thr); +#endif +DUK_INTERNAL_DECL duk_tval *duk_debug_read_tval(duk_hthread *thr); + +DUK_INTERNAL_DECL void duk_debug_write_bytes(duk_hthread *thr, const duk_uint8_t *data, duk_size_t length); +DUK_INTERNAL_DECL void duk_debug_write_byte(duk_hthread *thr, duk_uint8_t x); +DUK_INTERNAL_DECL void duk_debug_write_unused(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_debug_write_undefined(duk_hthread *thr); +#if defined(DUK_USE_DEBUGGER_INSPECT) +DUK_INTERNAL_DECL void duk_debug_write_null(duk_hthread *thr); +#endif +DUK_INTERNAL_DECL void duk_debug_write_boolean(duk_hthread *thr, duk_uint_t val); +DUK_INTERNAL_DECL void duk_debug_write_int(duk_hthread *thr, duk_int32_t x); +DUK_INTERNAL_DECL void duk_debug_write_uint(duk_hthread *thr, duk_uint32_t x); +DUK_INTERNAL_DECL void duk_debug_write_string(duk_hthread *thr, const char *data, duk_size_t length); +DUK_INTERNAL_DECL void duk_debug_write_cstring(duk_hthread *thr, const char *data); +DUK_INTERNAL_DECL void duk_debug_write_hstring(duk_hthread *thr, duk_hstring *h); +DUK_INTERNAL_DECL void duk_debug_write_buffer(duk_hthread *thr, const char *data, duk_size_t length); +DUK_INTERNAL_DECL void duk_debug_write_hbuffer(duk_hthread *thr, duk_hbuffer *h); +DUK_INTERNAL_DECL void duk_debug_write_pointer(duk_hthread *thr, void *ptr); +#if defined(DUK_USE_DEBUGGER_DUMPHEAP) || defined(DUK_USE_DEBUGGER_INSPECT) +DUK_INTERNAL_DECL void duk_debug_write_heapptr(duk_hthread *thr, duk_heaphdr *h); +#endif +DUK_INTERNAL_DECL void duk_debug_write_hobject(duk_hthread *thr, duk_hobject *obj); +DUK_INTERNAL_DECL void duk_debug_write_tval(duk_hthread *thr, duk_tval *tv); +#if 0 /* unused */ +DUK_INTERNAL_DECL void duk_debug_write_request(duk_hthread *thr, duk_small_uint_t command); +#endif +DUK_INTERNAL_DECL void duk_debug_write_reply(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_debug_write_error_eom(duk_hthread *thr, duk_small_uint_t err_code, const char *msg); +DUK_INTERNAL_DECL void duk_debug_write_notify(duk_hthread *thr, duk_small_uint_t command); +DUK_INTERNAL_DECL void duk_debug_write_eom(duk_hthread *thr); + +DUK_INTERNAL_DECL duk_uint_fast32_t duk_debug_curr_line(duk_hthread *thr); +DUK_INTERNAL_DECL void duk_debug_send_status(duk_hthread *thr); +#if defined(DUK_USE_DEBUGGER_THROW_NOTIFY) +DUK_INTERNAL_DECL void duk_debug_send_throw(duk_hthread *thr, duk_bool_t fatal); +#endif + +DUK_INTERNAL_DECL void duk_debug_halt_execution(duk_hthread *thr, duk_bool_t use_prev_pc); +DUK_INTERNAL_DECL duk_bool_t duk_debug_process_messages(duk_hthread *thr, duk_bool_t no_block); + +DUK_INTERNAL_DECL duk_small_int_t duk_debug_add_breakpoint(duk_hthread *thr, duk_hstring *filename, duk_uint32_t line); +DUK_INTERNAL_DECL duk_bool_t duk_debug_remove_breakpoint(duk_hthread *thr, duk_small_uint_t breakpoint_index); + +DUK_INTERNAL_DECL duk_bool_t duk_debug_is_attached(duk_heap *heap); +DUK_INTERNAL_DECL duk_bool_t duk_debug_is_paused(duk_heap *heap); +DUK_INTERNAL_DECL void duk_debug_set_paused(duk_heap *heap); +DUK_INTERNAL_DECL void duk_debug_clear_paused(duk_heap *heap); +DUK_INTERNAL_DECL void duk_debug_clear_pause_state(duk_heap *heap); +#endif /* DUK_USE_DEBUGGER_SUPPORT */ + +#endif /* DUK_DEBUGGER_H_INCLUDED */ +/* #include duk_debug.h */ +#line 1 "duk_debug.h" +/* + * Debugging macros, DUK_DPRINT() and its variants in particular. + * + * DUK_DPRINT() allows formatted debug prints, and supports standard + * and Duktape specific formatters. See duk_debug_vsnprintf.c for details. + * + * DUK_D(x), DUK_DD(x), and DUK_DDD(x) are used together with log macros + * for technical reasons. They are concretely used to hide 'x' from the + * compiler when the corresponding log level is disabled. This allows + * clean builds on non-C99 compilers, at the cost of more verbose code. + * Examples: + * + * DUK_D(DUK_DPRINT("foo")); + * DUK_DD(DUK_DDPRINT("foo")); + * DUK_DDD(DUK_DDDPRINT("foo")); + * + * This approach is preferable to the old "double parentheses" hack because + * double parentheses make the C99 solution worse: __FILE__ and __LINE__ can + * no longer be added transparently without going through globals, which + * works poorly with threading. + */ + +#if !defined(DUK_DEBUG_H_INCLUDED) +#define DUK_DEBUG_H_INCLUDED + +#if defined(DUK_USE_DEBUG) + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 0) +#define DUK_D(x) x +#else +#define DUK_D(x) \ + do { \ + } while (0) /* omit */ +#endif + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 1) +#define DUK_DD(x) x +#else +#define DUK_DD(x) \ + do { \ + } while (0) /* omit */ +#endif + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) +#define DUK_DDD(x) x +#else +#define DUK_DDD(x) \ + do { \ + } while (0) /* omit */ +#endif + +/* + * Exposed debug macros: debugging enabled + */ + +#if defined(DUK_USE_VARIADIC_MACROS) + +/* Note: combining __FILE__, __LINE__, and __func__ into fmt would be + * possible compile time, but waste some space with shared function names. + */ +#define DUK__DEBUG_LOG(lev, ...) \ + duk_debug_log((duk_int_t) (lev), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO, DUK_FUNC_MACRO, __VA_ARGS__); + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 0) +#define DUK_DPRINT(...) DUK__DEBUG_LOG(DUK_LEVEL_DEBUG, __VA_ARGS__) +#else +#define DUK_DPRINT(...) +#endif + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 1) +#define DUK_DDPRINT(...) DUK__DEBUG_LOG(DUK_LEVEL_DDEBUG, __VA_ARGS__) +#else +#define DUK_DDPRINT(...) +#endif + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) +#define DUK_DDDPRINT(...) DUK__DEBUG_LOG(DUK_LEVEL_DDDEBUG, __VA_ARGS__) +#else +#define DUK_DDDPRINT(...) +#endif + +#else /* DUK_USE_VARIADIC_MACROS */ + +#define DUK__DEBUG_STASH(lev) \ + (void) DUK_SNPRINTF(duk_debug_file_stash, DUK_DEBUG_STASH_SIZE, "%s", (const char *) DUK_FILE_MACRO), \ + (void) (duk_debug_file_stash[DUK_DEBUG_STASH_SIZE - 1] = (char) 0), \ + (void) (duk_debug_line_stash = (duk_int_t) DUK_LINE_MACRO), \ + (void) DUK_SNPRINTF(duk_debug_func_stash, DUK_DEBUG_STASH_SIZE, "%s", (const char *) DUK_FUNC_MACRO), \ + (void) (duk_debug_func_stash[DUK_DEBUG_STASH_SIZE - 1] = (char) 0), (void) (duk_debug_level_stash = (lev)) + +/* Without variadic macros resort to comma expression trickery to handle debug + * prints. This generates a lot of harmless warnings. These hacks are not + * needed normally because DUK_D() and friends will hide the entire debug log + * statement from the compiler. + */ + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 0) +#define DUK_DPRINT DUK__DEBUG_STASH(DUK_LEVEL_DEBUG), (void) duk_debug_log /* args go here in parens */ +#else +#define DUK_DPRINT 0 && /* args go here as a comma expression in parens */ +#endif + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 1) +#define DUK_DDPRINT DUK__DEBUG_STASH(DUK_LEVEL_DDEBUG), (void) duk_debug_log /* args go here in parens */ +#else +#define DUK_DDPRINT 0 && /* args */ +#endif + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) +#define DUK_DDDPRINT DUK__DEBUG_STASH(DUK_LEVEL_DDDEBUG), (void) duk_debug_log /* args go here in parens */ +#else +#define DUK_DDDPRINT 0 && /* args */ +#endif + +#endif /* DUK_USE_VARIADIC_MACROS */ + +#else /* DUK_USE_DEBUG */ + +/* + * Exposed debug macros: debugging disabled + */ + +#define DUK_D(x) \ + do { \ + } while (0) /* omit */ +#define DUK_DD(x) \ + do { \ + } while (0) /* omit */ +#define DUK_DDD(x) \ + do { \ + } while (0) /* omit */ + +#if defined(DUK_USE_VARIADIC_MACROS) + +#define DUK_DPRINT(...) +#define DUK_DDPRINT(...) +#define DUK_DDDPRINT(...) + +#else /* DUK_USE_VARIADIC_MACROS */ + +#define DUK_DPRINT 0 && /* args go here as a comma expression in parens */ +#define DUK_DDPRINT 0 && /* args */ +#define DUK_DDDPRINT 0 && /* args */ + +#endif /* DUK_USE_VARIADIC_MACROS */ + +#endif /* DUK_USE_DEBUG */ + +/* + * Structs + */ + +#if defined(DUK_USE_DEBUG) +struct duk_fixedbuffer { + duk_uint8_t *buffer; + duk_size_t length; + duk_size_t offset; + duk_bool_t truncated; +}; +#endif + +/* + * Prototypes + */ + +#if defined(DUK_USE_DEBUG) +DUK_INTERNAL_DECL duk_int_t duk_debug_vsnprintf(char *str, duk_size_t size, const char *format, va_list ap); +#if 0 /*unused*/ +DUK_INTERNAL_DECL duk_int_t duk_debug_snprintf(char *str, duk_size_t size, const char *format, ...); +#endif +DUK_INTERNAL_DECL void duk_debug_format_funcptr(char *buf, duk_size_t buf_size, duk_uint8_t *fptr, duk_size_t fptr_size); + +#if defined(DUK_USE_VARIADIC_MACROS) +DUK_INTERNAL_DECL void duk_debug_log(duk_int_t level, const char *file, duk_int_t line, const char *func, const char *fmt, ...); +#else /* DUK_USE_VARIADIC_MACROS */ +/* parameter passing, not thread safe */ +#define DUK_DEBUG_STASH_SIZE 128 +#if !defined(DUK_SINGLE_FILE) +DUK_INTERNAL_DECL char duk_debug_file_stash[DUK_DEBUG_STASH_SIZE]; +DUK_INTERNAL_DECL duk_int_t duk_debug_line_stash; +DUK_INTERNAL_DECL char duk_debug_func_stash[DUK_DEBUG_STASH_SIZE]; +DUK_INTERNAL_DECL duk_int_t duk_debug_level_stash; +#endif +DUK_INTERNAL_DECL void duk_debug_log(const char *fmt, ...); +#endif /* DUK_USE_VARIADIC_MACROS */ + +DUK_INTERNAL_DECL void duk_fb_put_bytes(duk_fixedbuffer *fb, const duk_uint8_t *buffer, duk_size_t length); +DUK_INTERNAL_DECL void duk_fb_put_byte(duk_fixedbuffer *fb, duk_uint8_t x); +DUK_INTERNAL_DECL void duk_fb_put_cstring(duk_fixedbuffer *fb, const char *x); +DUK_INTERNAL_DECL void duk_fb_sprintf(duk_fixedbuffer *fb, const char *fmt, ...); +DUK_INTERNAL_DECL void duk_fb_put_funcptr(duk_fixedbuffer *fb, duk_uint8_t *fptr, duk_size_t fptr_size); +DUK_INTERNAL_DECL duk_bool_t duk_fb_is_full(duk_fixedbuffer *fb); + +#endif /* DUK_USE_DEBUG */ + +#endif /* DUK_DEBUG_H_INCLUDED */ +/* #include duk_error.h */ +#line 1 "duk_error.h" +/* + * Error handling macros, assertion macro, error codes. + * + * There are three types of 'errors': + * + * 1. Ordinary errors relative to a thread, cause a longjmp, catchable. + * 2. Fatal errors relative to a heap, cause fatal handler to be called. + * 3. Fatal errors without context, cause the default (not heap specific) + * fatal handler to be called. + * + * Fatal errors without context are used by debug code such as assertions. + * By providing a fatal error handler for a Duktape heap, user code can + * avoid fatal errors without context in non-debug builds. + */ + +#if !defined(DUK_ERROR_H_INCLUDED) +#define DUK_ERROR_H_INCLUDED + +/* + * Error codes: defined in duktape.h + * + * Error codes are used as a shorthand to throw exceptions from inside + * the implementation. The appropriate ECMAScript object is constructed + * based on the code. ECMAScript code throws objects directly. The error + * codes are defined in the public API header because they are also used + * by calling code. + */ + +/* + * Normal error + * + * Normal error is thrown with a longjmp() through the current setjmp() + * catchpoint record in the duk_heap. The 'curr_thread' of the duk_heap + * identifies the throwing thread. + * + * Error formatting is usually unnecessary. The error macros provide a + * zero argument version (no formatting) and separate macros for small + * argument counts. Variadic macros are not used to avoid portability + * issues and avoid the need for stash-based workarounds when they're not + * available. Vararg calls are avoided for non-formatted error calls + * because vararg call sites are larger than normal, and there are a lot + * of call sites with no formatting. + * + * Note that special formatting provided by debug macros is NOT available. + * + * The _RAW variants allow the caller to specify file and line. This makes + * it easier to write checked calls which want to use the call site of the + * checked function, not the error macro call inside the checked function. + */ + +#if defined(DUK_USE_VERBOSE_ERRORS) + +/* Because there are quite many call sites, pack error code (require at most + * 8-bit) into a single argument. + */ +#define DUK_ERROR(thr, err, msg) \ + do { \ + duk_errcode_t duk__err = (err); \ + duk_int_t duk__line = (duk_int_t) DUK_LINE_MACRO; \ + DUK_ASSERT(duk__err >= 0 && duk__err <= 0xff); \ + DUK_ASSERT(duk__line >= 0 && duk__line <= 0x00ffffffL); \ + duk_err_handle_error((thr), DUK_FILE_MACRO, (((duk_uint_t) duk__err) << 24) | ((duk_uint_t) duk__line), (msg)); \ + } while (0) +#define DUK_ERROR_RAW(thr, file, line, err, msg) \ + do { \ + duk_errcode_t duk__err = (err); \ + duk_int_t duk__line = (duk_int_t) (line); \ + DUK_ASSERT(duk__err >= 0 && duk__err <= 0xff); \ + DUK_ASSERT(duk__line >= 0 && duk__line <= 0x00ffffffL); \ + duk_err_handle_error((thr), (file), (((duk_uint_t) duk__err) << 24) | ((duk_uint_t) duk__line), (msg)); \ + } while (0) + +#define DUK_ERROR_FMT1(thr, err, fmt, arg1) \ + do { \ + duk_errcode_t duk__err = (err); \ + duk_int_t duk__line = (duk_int_t) DUK_LINE_MACRO; \ + DUK_ASSERT(duk__err >= 0 && duk__err <= 0xff); \ + DUK_ASSERT(duk__line >= 0 && duk__line <= 0x00ffffffL); \ + duk_err_handle_error_fmt((thr), \ + DUK_FILE_MACRO, \ + (((duk_uint_t) duk__err) << 24) | ((duk_uint_t) duk__line), \ + (fmt), \ + (arg1)); \ + } while (0) +#define DUK_ERROR_RAW_FMT1(thr, file, line, err, fmt, arg1) \ + do { \ + duk_errcode_t duk__err = (err); \ + duk_int_t duk__line = (duk_int_t) (line); \ + DUK_ASSERT(duk__err >= 0 && duk__err <= 0xff); \ + DUK_ASSERT(duk__line >= 0 && duk__line <= 0x00ffffffL); \ + duk_err_handle_error_fmt((thr), \ + (file), \ + (((duk_uint_t) duk__err) << 24) | ((duk_uint_t) duk__line), \ + (fmt), \ + (arg1)); \ + } while (0) + +#define DUK_ERROR_FMT2(thr, err, fmt, arg1, arg2) \ + do { \ + duk_errcode_t duk__err = (err); \ + duk_int_t duk__line = (duk_int_t) DUK_LINE_MACRO; \ + DUK_ASSERT(duk__err >= 0 && duk__err <= 0xff); \ + DUK_ASSERT(duk__line >= 0 && duk__line <= 0x00ffffffL); \ + duk_err_handle_error_fmt((thr), \ + DUK_FILE_MACRO, \ + (((duk_uint_t) duk__err) << 24) | ((duk_uint_t) duk__line), \ + (fmt), \ + (arg1), \ + (arg2)); \ + } while (0) +#define DUK_ERROR_RAW_FMT2(thr, file, line, err, fmt, arg1, arg2) \ + do { \ + duk_errcode_t duk__err = (err); \ + duk_int_t duk__line = (duk_int_t) (line); \ + DUK_ASSERT(duk__err >= 0 && duk__err <= 0xff); \ + DUK_ASSERT(duk__line >= 0 && duk__line <= 0x00ffffffL); \ + duk_err_handle_error_fmt((thr), \ + (file), \ + (((duk_uint_t) duk__err) << 24) | ((duk_uint_t) duk__line), \ + (fmt), \ + (arg1), \ + (arg2)); \ + } while (0) + +#define DUK_ERROR_FMT3(thr, err, fmt, arg1, arg2, arg3) \ + do { \ + duk_errcode_t duk__err = (err); \ + duk_int_t duk__line = (duk_int_t) DUK_LINE_MACRO; \ + DUK_ASSERT(duk__err >= 0 && duk__err <= 0xff); \ + DUK_ASSERT(duk__line >= 0 && duk__line <= 0x00ffffffL); \ + duk_err_handle_error_fmt((thr), \ + DUK_FILE_MACRO, \ + (((duk_uint_t) duk__err) << 24) | ((duk_uint_t) duk__line), \ + (fmt), \ + (arg1), \ + (arg2), \ + (arg3)); \ + } while (0) +#define DUK_ERROR_RAW_FMT3(thr, file, line, err, fmt, arg1, arg2, arg3) \ + do { \ + duk_errcode_t duk__err = (err); \ + duk_int_t duk__line = (duk_int_t) (line); \ + DUK_ASSERT(duk__err >= 0 && duk__err <= 0xff); \ + DUK_ASSERT(duk__line >= 0 && duk__line <= 0x00ffffffL); \ + duk_err_handle_error_fmt((thr), \ + (file), \ + (((duk_uint_t) duk__err) << 24) | ((duk_uint_t) duk__line), \ + (fmt), \ + (arg1), \ + (arg2), \ + (arg3)); \ + } while (0) + +#define DUK_ERROR_FMT4(thr, err, fmt, arg1, arg2, arg3, arg4) \ + do { \ + duk_errcode_t duk__err = (err); \ + duk_int_t duk__line = (duk_int_t) DUK_LINE_MACRO; \ + DUK_ASSERT(duk__err >= 0 && duk__err <= 0xff); \ + DUK_ASSERT(duk__line >= 0 && duk__line <= 0x00ffffffL); \ + duk_err_handle_error_fmt((thr), \ + DUK_FILE_MACRO, \ + (((duk_uint_t) duk__err) << 24) | ((duk_uint_t) duk__line), \ + (fmt), \ + (arg1), \ + (arg2), \ + (arg3), \ + (arg4)); \ + } while (0) +#define DUK_ERROR_RAW_FMT4(thr, file, line, err, fmt, arg1, arg2, arg3, arg4) \ + do { \ + duk_errcode_t duk__err = (err); \ + duk_int_t duk__line = (duk_int_t) (line); \ + DUK_ASSERT(duk__err >= 0 && duk__err <= 0xff); \ + DUK_ASSERT(duk__line >= 0 && duk__line <= 0x00ffffffL); \ + duk_err_handle_error_fmt((thr), \ + (file), \ + (((duk_uint_t) duk__err) << 24) | ((duk_uint_t) duk__line), \ + (fmt), \ + (arg1), \ + (arg2), \ + (arg3), \ + (arg4)); \ + } while (0) + +#else /* DUK_USE_VERBOSE_ERRORS */ + +#define DUK_ERROR(thr, err, msg) duk_err_handle_error((thr), (err)) +#define DUK_ERROR_RAW(thr, file, line, err, msg) duk_err_handle_error((thr), (err)) + +#define DUK_ERROR_FMT1(thr, err, fmt, arg1) DUK_ERROR((thr), (err), (fmt)) +#define DUK_ERROR_RAW_FMT1(thr, file, line, err, fmt, arg1) DUK_ERROR_RAW((thr), (file), (line), (err), (fmt)) + +#define DUK_ERROR_FMT2(thr, err, fmt, arg1, arg2) DUK_ERROR((thr), (err), (fmt)) +#define DUK_ERROR_RAW_FMT2(thr, file, line, err, fmt, arg1, arg2) DUK_ERROR_RAW((thr), (file), (line), (err), (fmt)) + +#define DUK_ERROR_FMT3(thr, err, fmt, arg1, arg2, arg3) DUK_ERROR((thr), (err), (fmt)) +#define DUK_ERROR_RAW_FMT3(thr, file, line, err, fmt, arg1, arg2, arg3) DUK_ERROR_RAW((thr), (file), (line), (err), (fmt)) + +#define DUK_ERROR_FMT4(thr, err, fmt, arg1, arg2, arg3, arg4) DUK_ERROR((thr), (err), (fmt)) +#define DUK_ERROR_RAW_FMT4(thr, file, line, err, fmt, arg1, arg2, arg3, arg4) DUK_ERROR_RAW((thr), (file), (line), (err), (fmt)) + +#endif /* DUK_USE_VERBOSE_ERRORS */ + +/* + * Fatal error without context + * + * The macro is an expression to make it compatible with DUK_ASSERT_EXPR(). + */ + +#define DUK_FATAL_WITHOUT_CONTEXT(msg) duk_default_fatal_handler(NULL, (msg)) + +/* + * Error throwing helpers + * + * The goal is to provide verbose and configurable error messages. Call + * sites should be clean in source code and compile to a small footprint. + * Small footprint is also useful for performance because small cold paths + * reduce code cache pressure. Adding macros here only makes sense if there + * are enough call sites to get concrete benefits. + * + * DUK_ERROR_xxx() macros are generic and can be used anywhere. + * + * DUK_DCERROR_xxx() macros can only be used in Duktape/C functions where + * the "return DUK_RET_xxx;" shorthand is available for low memory targets. + * The DUK_DCERROR_xxx() macros always either throw or perform a + * 'return DUK_RET_xxx' from the calling function. + */ + +#if defined(DUK_USE_VERBOSE_ERRORS) +/* Verbose errors with key/value summaries (non-paranoid) or without key/value + * summaries (paranoid, for some security sensitive environments), the paranoid + * vs. non-paranoid distinction affects only a few specific errors. + */ +#if defined(DUK_USE_PARANOID_ERRORS) +#define DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, expectname, lowmemstr) \ + do { \ + duk_err_require_type_index((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO, (idx), (expectname)); \ + } while (0) +#else /* DUK_USE_PARANOID_ERRORS */ +#define DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, expectname, lowmemstr) \ + do { \ + duk_err_require_type_index((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO, (idx), (expectname)); \ + } while (0) +#endif /* DUK_USE_PARANOID_ERRORS */ + +#define DUK_ERROR_INTERNAL(thr) \ + do { \ + duk_err_error_internal((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO); \ + } while (0) +#define DUK_DCERROR_INTERNAL(thr) \ + do { \ + DUK_ERROR_INTERNAL((thr)); \ + return 0; \ + } while (0) +#define DUK_ERROR_ALLOC_FAILED(thr) \ + do { \ + duk_err_error_alloc_failed((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO); \ + } while (0) +#define DUK_ERROR_UNSUPPORTED(thr) \ + do { \ + DUK_ERROR((thr), DUK_ERR_ERROR, DUK_STR_UNSUPPORTED); \ + } while (0) +#define DUK_DCERROR_UNSUPPORTED(thr) \ + do { \ + DUK_ERROR_UNSUPPORTED((thr)); \ + return 0; \ + } while (0) +#define DUK_ERROR_ERROR(thr, msg) \ + do { \ + duk_err_error((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO, (msg)); \ + } while (0) +#define DUK_ERROR_RANGE_INDEX(thr, idx) \ + do { \ + duk_err_range_index((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO, (idx)); \ + } while (0) +#define DUK_ERROR_RANGE_PUSH_BEYOND(thr) \ + do { \ + duk_err_range_push_beyond((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO); \ + } while (0) +#define DUK_ERROR_RANGE_INVALID_ARGS(thr) \ + do { \ + DUK_ERROR_RANGE((thr), DUK_STR_INVALID_ARGS); \ + } while (0) +#define DUK_DCERROR_RANGE_INVALID_ARGS(thr) \ + do { \ + DUK_ERROR_RANGE_INVALID_ARGS((thr)); \ + return 0; \ + } while (0) +#define DUK_ERROR_RANGE_INVALID_COUNT(thr) \ + do { \ + DUK_ERROR_RANGE((thr), DUK_STR_INVALID_COUNT); \ + } while (0) +#define DUK_DCERROR_RANGE_INVALID_COUNT(thr) \ + do { \ + DUK_ERROR_RANGE_INVALID_COUNT((thr)); \ + return 0; \ + } while (0) +#define DUK_ERROR_RANGE_INVALID_LENGTH(thr) \ + do { \ + DUK_ERROR_RANGE((thr), DUK_STR_INVALID_LENGTH); \ + } while (0) +#define DUK_DCERROR_RANGE_INVALID_LENGTH(thr) \ + do { \ + DUK_ERROR_RANGE_INVALID_LENGTH((thr)); \ + return 0; \ + } while (0) +#define DUK_ERROR_RANGE(thr, msg) \ + do { \ + duk_err_range((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO, (msg)); \ + } while (0) +#define DUK_ERROR_EVAL(thr, msg) \ + do { \ + DUK_ERROR((thr), DUK_ERR_EVAL_ERROR, (msg)); \ + } while (0) +#define DUK_ERROR_REFERENCE(thr, msg) \ + do { \ + DUK_ERROR((thr), DUK_ERR_REFERENCE_ERROR, (msg)); \ + } while (0) +#define DUK_ERROR_SYNTAX(thr, msg) \ + do { \ + DUK_ERROR((thr), DUK_ERR_SYNTAX_ERROR, (msg)); \ + } while (0) +#define DUK_ERROR_TYPE_INVALID_ARGS(thr) \ + do { \ + duk_err_type_invalid_args((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO); \ + } while (0) +#define DUK_DCERROR_TYPE_INVALID_ARGS(thr) \ + do { \ + DUK_ERROR_TYPE_INVALID_ARGS((thr)); \ + return 0; \ + } while (0) +#define DUK_ERROR_TYPE_INVALID_STATE(thr) \ + do { \ + duk_err_type_invalid_state((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO); \ + } while (0) +#define DUK_DCERROR_TYPE_INVALID_STATE(thr) \ + do { \ + DUK_ERROR_TYPE_INVALID_STATE((thr)); \ + return 0; \ + } while (0) +#define DUK_ERROR_TYPE_INVALID_TRAP_RESULT(thr) \ + do { \ + duk_err_type_invalid_trap_result((thr), DUK_FILE_MACRO, (duk_int_t) DUK_LINE_MACRO); \ + } while (0) +#define DUK_DCERROR_TYPE_INVALID_TRAP_RESULT(thr) \ + do { \ + DUK_ERROR_TYPE((thr), DUK_STR_INVALID_TRAP_RESULT); \ + } while (0) +#define DUK_ERROR_TYPE(thr, msg) \ + do { \ + DUK_ERROR((thr), DUK_ERR_TYPE_ERROR, (msg)); \ + } while (0) +#define DUK_ERROR_URI(thr, msg) \ + do { \ + DUK_ERROR((thr), DUK_ERR_URI_ERROR, (msg)); \ + } while (0) +#else /* DUK_USE_VERBOSE_ERRORS */ +/* Non-verbose errors for low memory targets: no file, line, or message. */ + +#define DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, expectname, lowmemstr) \ + do { \ + duk_err_type((thr)); \ + } while (0) + +#define DUK_ERROR_INTERNAL(thr) \ + do { \ + duk_err_error((thr)); \ + } while (0) +#define DUK_DCERROR_INTERNAL(thr) \ + do { \ + DUK_UNREF((thr)); \ + return DUK_RET_ERROR; \ + } while (0) +#define DUK_ERROR_ALLOC_FAILED(thr) \ + do { \ + duk_err_error((thr)); \ + } while (0) +#define DUK_ERROR_UNSUPPORTED(thr) \ + do { \ + duk_err_error((thr)); \ + } while (0) +#define DUK_DCERROR_UNSUPPORTED(thr) \ + do { \ + DUK_UNREF((thr)); \ + return DUK_RET_ERROR; \ + } while (0) +#define DUK_ERROR_ERROR(thr, msg) \ + do { \ + duk_err_error((thr)); \ + } while (0) +#define DUK_ERROR_RANGE_INDEX(thr, idx) \ + do { \ + duk_err_range((thr)); \ + } while (0) +#define DUK_ERROR_RANGE_PUSH_BEYOND(thr) \ + do { \ + duk_err_range((thr)); \ + } while (0) +#define DUK_ERROR_RANGE_INVALID_ARGS(thr) \ + do { \ + duk_err_range((thr)); \ + } while (0) +#define DUK_DCERROR_RANGE_INVALID_ARGS(thr) \ + do { \ + DUK_UNREF((thr)); \ + return DUK_RET_RANGE_ERROR; \ + } while (0) +#define DUK_ERROR_RANGE_INVALID_COUNT(thr) \ + do { \ + duk_err_range((thr)); \ + } while (0) +#define DUK_DCERROR_RANGE_INVALID_COUNT(thr) \ + do { \ + DUK_UNREF((thr)); \ + return DUK_RET_RANGE_ERROR; \ + } while (0) +#define DUK_ERROR_RANGE_INVALID_LENGTH(thr) \ + do { \ + duk_err_range((thr)); \ + } while (0) +#define DUK_DCERROR_RANGE_INVALID_LENGTH(thr) \ + do { \ + DUK_UNREF((thr)); \ + return DUK_RET_RANGE_ERROR; \ + } while (0) +#define DUK_ERROR_RANGE(thr, msg) \ + do { \ + duk_err_range((thr)); \ + } while (0) +#define DUK_ERROR_EVAL(thr, msg) \ + do { \ + duk_err_eval((thr)); \ + } while (0) +#define DUK_ERROR_REFERENCE(thr, msg) \ + do { \ + duk_err_reference((thr)); \ + } while (0) +#define DUK_ERROR_SYNTAX(thr, msg) \ + do { \ + duk_err_syntax((thr)); \ + } while (0) +#define DUK_ERROR_TYPE_INVALID_ARGS(thr) \ + do { \ + duk_err_type((thr)); \ + } while (0) +#define DUK_DCERROR_TYPE_INVALID_ARGS(thr) \ + do { \ + DUK_UNREF((thr)); \ + return DUK_RET_TYPE_ERROR; \ + } while (0) +#define DUK_ERROR_TYPE_INVALID_STATE(thr) \ + do { \ + duk_err_type((thr)); \ + } while (0) +#define DUK_DCERROR_TYPE_INVALID_STATE(thr) \ + do { \ + duk_err_type((thr)); \ + } while (0) +#define DUK_ERROR_TYPE_INVALID_TRAP_RESULT(thr) \ + do { \ + duk_err_type((thr)); \ + } while (0) +#define DUK_DCERROR_TYPE_INVALID_TRAP_RESULT(thr) \ + do { \ + DUK_UNREF((thr)); \ + return DUK_RET_TYPE_ERROR; \ + } while (0) +#define DUK_ERROR_TYPE_INVALID_TRAP_RESULT(thr) \ + do { \ + duk_err_type((thr)); \ + } while (0) +#define DUK_ERROR_TYPE(thr, msg) \ + do { \ + duk_err_type((thr)); \ + } while (0) +#define DUK_ERROR_URI(thr, msg) \ + do { \ + duk_err_uri((thr)); \ + } while (0) +#endif /* DUK_USE_VERBOSE_ERRORS */ + +/* + * Assert macro: failure causes a fatal error. + * + * NOTE: since the assert macro doesn't take a heap/context argument, there's + * no way to look up a heap/context specific fatal error handler which may have + * been given by the application. Instead, assertion failures always use the + * internal default fatal error handler; it can be replaced via duk_config.h + * and then applies to all Duktape heaps. + */ + +#if defined(DUK_USE_ASSERTIONS) + +/* The message should be a compile time constant without formatting (less risk); + * we don't care about assertion text size because they're not used in production + * builds. + */ +#define DUK_ASSERT(x) \ + do { \ + if (!(x)) { \ + DUK_FATAL_WITHOUT_CONTEXT("assertion failed: " #x " (" DUK_FILE_MACRO \ + ":" DUK_MACRO_STRINGIFY(DUK_LINE_MACRO) ")"); \ + } \ + } while (0) + +/* Assertion compatible inside a comma expression, evaluates to void. */ +#define DUK_ASSERT_EXPR(x) \ + ((void) ((x) ? 0 : \ + (DUK_FATAL_WITHOUT_CONTEXT("assertion failed: " #x " (" DUK_FILE_MACRO \ + ":" DUK_MACRO_STRINGIFY(DUK_LINE_MACRO) ")"), \ + 0))) + +#else /* DUK_USE_ASSERTIONS */ + +#define DUK_ASSERT(x) \ + do { /* assertion omitted */ \ + } while (0) + +#define DUK_ASSERT_EXPR(x) ((void) 0) + +#endif /* DUK_USE_ASSERTIONS */ + +/* this variant is used when an assert would generate a compile warning by + * being always true (e.g. >= 0 comparison for an unsigned value + */ +#define DUK_ASSERT_DISABLE(x) \ + do { /* assertion disabled */ \ + } while (0) + +/* + * Assertion helpers + */ + +#if defined(DUK_USE_ASSERTIONS) && defined(DUK_USE_REFERENCE_COUNTING) +#define DUK_ASSERT_REFCOUNT_NONZERO_HEAPHDR(h) \ + do { \ + DUK_ASSERT((h) == NULL || DUK_HEAPHDR_GET_REFCOUNT((duk_heaphdr *) (h)) > 0); \ + } while (0) +#define DUK_ASSERT_REFCOUNT_NONZERO_TVAL(tv) \ + do { \ + if ((tv) != NULL && DUK_TVAL_IS_HEAP_ALLOCATED((tv))) { \ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(DUK_TVAL_GET_HEAPHDR((tv))) > 0); \ + } \ + } while (0) +#else +#define DUK_ASSERT_REFCOUNT_NONZERO_HEAPHDR(h) /* no refcount check */ +#define DUK_ASSERT_REFCOUNT_NONZERO_TVAL(tv) /* no refcount check */ +#endif + +#define DUK_ASSERT_TOP(ctx, n) DUK_ASSERT((duk_idx_t) duk_get_top((ctx)) == (duk_idx_t) (n)) + +#if defined(DUK_USE_ASSERTIONS) && defined(DUK_USE_PACKED_TVAL) +#define DUK_ASSERT_DOUBLE_IS_NORMALIZED(dval) \ + do { \ + duk_double_union duk__assert_tmp_du; \ + duk__assert_tmp_du.d = (dval); \ + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&duk__assert_tmp_du)); \ + } while (0) +#else +#define DUK_ASSERT_DOUBLE_IS_NORMALIZED(dval) /* nop */ +#endif + +#define DUK_ASSERT_VS_SPACE(thr) DUK_ASSERT(thr->valstack_top < thr->valstack_end) + +/* + * Helper to initialize a memory area (e.g. struct) with garbage when + * assertions enabled. + */ + +#if defined(DUK_USE_ASSERTIONS) +#define DUK_ASSERT_SET_GARBAGE(ptr, size) \ + do { \ + duk_memset_unsafe((void *) (ptr), 0x5a, size); \ + } while (0) +#else +#define DUK_ASSERT_SET_GARBAGE(ptr, size) \ + do { \ + } while (0) +#endif + +/* + * Helper for valstack space + * + * Caller of DUK_ASSERT_VALSTACK_SPACE() estimates the number of free stack entries + * required for its own use, and any child calls which are not (a) Duktape API calls + * or (b) Duktape calls which involve extending the valstack (e.g. getter call). + */ + +#define DUK_VALSTACK_ASSERT_EXTRA \ + 5 /* this is added to checks to allow for Duktape \ + * API calls in addition to function's own use \ + */ +#if defined(DUK_USE_ASSERTIONS) +#define DUK_ASSERT_VALSTACK_SPACE(thr, n) \ + do { \ + DUK_ASSERT((thr) != NULL); \ + DUK_ASSERT((thr)->valstack_end - (thr)->valstack_top >= (n) + DUK_VALSTACK_ASSERT_EXTRA); \ + } while (0) +#else +#define DUK_ASSERT_VALSTACK_SPACE(thr, n) /* no valstack space check */ +#endif + +/* + * Prototypes + */ + +#if defined(DUK_USE_VERBOSE_ERRORS) +DUK_NORETURN( + DUK_INTERNAL_DECL void duk_err_handle_error(duk_hthread *thr, const char *filename, duk_uint_t line_and_code, const char *msg)); +DUK_NORETURN(DUK_INTERNAL_DECL void + duk_err_handle_error_fmt(duk_hthread *thr, const char *filename, duk_uint_t line_and_code, const char *fmt, ...)); +#else /* DUK_USE_VERBOSE_ERRORS */ +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_handle_error(duk_hthread *thr, duk_errcode_t code)); +#endif /* DUK_USE_VERBOSE_ERRORS */ + +#if defined(DUK_USE_VERBOSE_ERRORS) +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_create_and_throw(duk_hthread *thr, + duk_errcode_t code, + const char *msg, + const char *filename, + duk_int_t line)); +#else +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_create_and_throw(duk_hthread *thr, duk_errcode_t code)); +#endif + +DUK_NORETURN(DUK_INTERNAL_DECL void duk_error_throw_from_negative_rc(duk_hthread *thr, duk_ret_t rc)); + +#define DUK_AUGMENT_FLAG_NOBLAME_FILELINE (1U << 0) /* if set, don't blame C file/line for .fileName and .lineNumber */ +#define DUK_AUGMENT_FLAG_SKIP_ONE (1U << 1) /* if set, skip topmost activation in traceback construction */ + +#if defined(DUK_USE_AUGMENT_ERROR_CREATE) +DUK_INTERNAL_DECL void duk_err_augment_error_create(duk_hthread *thr, + duk_hthread *thr_callstack, + const char *filename, + duk_int_t line, + duk_small_uint_t flags); +#endif +#if defined(DUK_USE_AUGMENT_ERROR_THROW) +DUK_INTERNAL_DECL void duk_err_augment_error_throw(duk_hthread *thr); +#endif + +#if defined(DUK_USE_VERBOSE_ERRORS) +#if defined(DUK_USE_PARANOID_ERRORS) +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_require_type_index(duk_hthread *thr, + const char *filename, + duk_int_t linenumber, + duk_idx_t idx, + const char *expect_name)); +#else +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_require_type_index(duk_hthread *thr, + const char *filename, + duk_int_t linenumber, + duk_idx_t idx, + const char *expect_name)); +#endif +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_error_internal(duk_hthread *thr, const char *filename, duk_int_t linenumber)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_error_alloc_failed(duk_hthread *thr, const char *filename, duk_int_t linenumber)); +DUK_NORETURN( + DUK_INTERNAL_DECL void duk_err_error(duk_hthread *thr, const char *filename, duk_int_t linenumber, const char *message)); +DUK_NORETURN( + DUK_INTERNAL_DECL void duk_err_range_index(duk_hthread *thr, const char *filename, duk_int_t linenumber, duk_idx_t idx)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_range_push_beyond(duk_hthread *thr, const char *filename, duk_int_t linenumber)); +DUK_NORETURN( + DUK_INTERNAL_DECL void duk_err_range(duk_hthread *thr, const char *filename, duk_int_t linenumber, const char *message)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_type_invalid_args(duk_hthread *thr, const char *filename, duk_int_t linenumber)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_type_invalid_state(duk_hthread *thr, const char *filename, duk_int_t linenumber)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_type_invalid_trap_result(duk_hthread *thr, const char *filename, duk_int_t linenumber)); +#else /* DUK_VERBOSE_ERRORS */ +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_error(duk_hthread *thr)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_range(duk_hthread *thr)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_eval(duk_hthread *thr)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_reference(duk_hthread *thr)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_syntax(duk_hthread *thr)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_type(duk_hthread *thr)); +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_uri(duk_hthread *thr)); +#endif /* DUK_VERBOSE_ERRORS */ + +DUK_NORETURN(DUK_INTERNAL_DECL void duk_err_longjmp(duk_hthread *thr)); + +DUK_NORETURN(DUK_INTERNAL_DECL void duk_default_fatal_handler(void *udata, const char *msg)); + +DUK_INTERNAL_DECL void duk_err_setup_ljstate1(duk_hthread *thr, duk_small_uint_t lj_type, duk_tval *tv_val); +#if defined(DUK_USE_DEBUGGER_SUPPORT) +DUK_INTERNAL_DECL void duk_err_check_debugger_integration(duk_hthread *thr); +#endif + +DUK_INTERNAL_DECL duk_hobject *duk_error_prototype_from_code(duk_hthread *thr, duk_errcode_t err_code); + +#endif /* DUK_ERROR_H_INCLUDED */ +/* #include duk_unicode.h */ +#line 1 "duk_unicode.h" +/* + * Unicode helpers + */ + +#if !defined(DUK_UNICODE_H_INCLUDED) +#define DUK_UNICODE_H_INCLUDED + +/* + * UTF-8 / XUTF-8 / CESU-8 constants + */ + +#define DUK_UNICODE_MAX_XUTF8_LENGTH 7 /* up to 36 bit codepoints */ +#define DUK_UNICODE_MAX_XUTF8_BMP_LENGTH 3 /* all codepoints up to U+FFFF */ +#define DUK_UNICODE_MAX_CESU8_LENGTH 6 /* all codepoints up to U+10FFFF */ +#define DUK_UNICODE_MAX_CESU8_BMP_LENGTH 3 /* all codepoints up to U+FFFF */ + +/* + * Useful Unicode codepoints + * + * Integer constants must be signed to avoid unexpected coercions + * in comparisons. + */ + +#define DUK_UNICODE_CP_ZWNJ 0x200cL /* zero-width non-joiner */ +#define DUK_UNICODE_CP_ZWJ 0x200dL /* zero-width joiner */ +#define DUK_UNICODE_CP_REPLACEMENT_CHARACTER \ + 0xfffdL /* http://en.wikipedia.org/wiki/Replacement_character#Replacement_character \ + */ + +/* + * ASCII character constants + * + * C character literals like 'x' have a platform specific value and do + * not match ASCII (UTF-8) values on e.g. EBCDIC platforms. So, use + * these (admittedly awkward) constants instead. These constants must + * also have signed values to avoid unexpected coercions in comparisons. + * + * http://en.wikipedia.org/wiki/ASCII + */ + +#define DUK_ASC_NUL 0x00 +#define DUK_ASC_SOH 0x01 +#define DUK_ASC_STX 0x02 +#define DUK_ASC_ETX 0x03 +#define DUK_ASC_EOT 0x04 +#define DUK_ASC_ENQ 0x05 +#define DUK_ASC_ACK 0x06 +#define DUK_ASC_BEL 0x07 +#define DUK_ASC_BS 0x08 +#define DUK_ASC_HT 0x09 +#define DUK_ASC_LF 0x0a +#define DUK_ASC_VT 0x0b +#define DUK_ASC_FF 0x0c +#define DUK_ASC_CR 0x0d +#define DUK_ASC_SO 0x0e +#define DUK_ASC_SI 0x0f +#define DUK_ASC_DLE 0x10 +#define DUK_ASC_DC1 0x11 +#define DUK_ASC_DC2 0x12 +#define DUK_ASC_DC3 0x13 +#define DUK_ASC_DC4 0x14 +#define DUK_ASC_NAK 0x15 +#define DUK_ASC_SYN 0x16 +#define DUK_ASC_ETB 0x17 +#define DUK_ASC_CAN 0x18 +#define DUK_ASC_EM 0x19 +#define DUK_ASC_SUB 0x1a +#define DUK_ASC_ESC 0x1b +#define DUK_ASC_FS 0x1c +#define DUK_ASC_GS 0x1d +#define DUK_ASC_RS 0x1e +#define DUK_ASC_US 0x1f +#define DUK_ASC_SPACE 0x20 +#define DUK_ASC_EXCLAMATION 0x21 +#define DUK_ASC_DOUBLEQUOTE 0x22 +#define DUK_ASC_HASH 0x23 +#define DUK_ASC_DOLLAR 0x24 +#define DUK_ASC_PERCENT 0x25 +#define DUK_ASC_AMP 0x26 +#define DUK_ASC_SINGLEQUOTE 0x27 +#define DUK_ASC_LPAREN 0x28 +#define DUK_ASC_RPAREN 0x29 +#define DUK_ASC_STAR 0x2a +#define DUK_ASC_PLUS 0x2b +#define DUK_ASC_COMMA 0x2c +#define DUK_ASC_MINUS 0x2d +#define DUK_ASC_PERIOD 0x2e +#define DUK_ASC_SLASH 0x2f +#define DUK_ASC_0 0x30 +#define DUK_ASC_1 0x31 +#define DUK_ASC_2 0x32 +#define DUK_ASC_3 0x33 +#define DUK_ASC_4 0x34 +#define DUK_ASC_5 0x35 +#define DUK_ASC_6 0x36 +#define DUK_ASC_7 0x37 +#define DUK_ASC_8 0x38 +#define DUK_ASC_9 0x39 +#define DUK_ASC_COLON 0x3a +#define DUK_ASC_SEMICOLON 0x3b +#define DUK_ASC_LANGLE 0x3c +#define DUK_ASC_EQUALS 0x3d +#define DUK_ASC_RANGLE 0x3e +#define DUK_ASC_QUESTION 0x3f +#define DUK_ASC_ATSIGN 0x40 +#define DUK_ASC_UC_A 0x41 +#define DUK_ASC_UC_B 0x42 +#define DUK_ASC_UC_C 0x43 +#define DUK_ASC_UC_D 0x44 +#define DUK_ASC_UC_E 0x45 +#define DUK_ASC_UC_F 0x46 +#define DUK_ASC_UC_G 0x47 +#define DUK_ASC_UC_H 0x48 +#define DUK_ASC_UC_I 0x49 +#define DUK_ASC_UC_J 0x4a +#define DUK_ASC_UC_K 0x4b +#define DUK_ASC_UC_L 0x4c +#define DUK_ASC_UC_M 0x4d +#define DUK_ASC_UC_N 0x4e +#define DUK_ASC_UC_O 0x4f +#define DUK_ASC_UC_P 0x50 +#define DUK_ASC_UC_Q 0x51 +#define DUK_ASC_UC_R 0x52 +#define DUK_ASC_UC_S 0x53 +#define DUK_ASC_UC_T 0x54 +#define DUK_ASC_UC_U 0x55 +#define DUK_ASC_UC_V 0x56 +#define DUK_ASC_UC_W 0x57 +#define DUK_ASC_UC_X 0x58 +#define DUK_ASC_UC_Y 0x59 +#define DUK_ASC_UC_Z 0x5a +#define DUK_ASC_LBRACKET 0x5b +#define DUK_ASC_BACKSLASH 0x5c +#define DUK_ASC_RBRACKET 0x5d +#define DUK_ASC_CARET 0x5e +#define DUK_ASC_UNDERSCORE 0x5f +#define DUK_ASC_GRAVE 0x60 +#define DUK_ASC_LC_A 0x61 +#define DUK_ASC_LC_B 0x62 +#define DUK_ASC_LC_C 0x63 +#define DUK_ASC_LC_D 0x64 +#define DUK_ASC_LC_E 0x65 +#define DUK_ASC_LC_F 0x66 +#define DUK_ASC_LC_G 0x67 +#define DUK_ASC_LC_H 0x68 +#define DUK_ASC_LC_I 0x69 +#define DUK_ASC_LC_J 0x6a +#define DUK_ASC_LC_K 0x6b +#define DUK_ASC_LC_L 0x6c +#define DUK_ASC_LC_M 0x6d +#define DUK_ASC_LC_N 0x6e +#define DUK_ASC_LC_O 0x6f +#define DUK_ASC_LC_P 0x70 +#define DUK_ASC_LC_Q 0x71 +#define DUK_ASC_LC_R 0x72 +#define DUK_ASC_LC_S 0x73 +#define DUK_ASC_LC_T 0x74 +#define DUK_ASC_LC_U 0x75 +#define DUK_ASC_LC_V 0x76 +#define DUK_ASC_LC_W 0x77 +#define DUK_ASC_LC_X 0x78 +#define DUK_ASC_LC_Y 0x79 +#define DUK_ASC_LC_Z 0x7a +#define DUK_ASC_LCURLY 0x7b +#define DUK_ASC_PIPE 0x7c +#define DUK_ASC_RCURLY 0x7d +#define DUK_ASC_TILDE 0x7e +#define DUK_ASC_DEL 0x7f + +/* + * Miscellaneous + */ + +/* Uppercase A is 0x41, lowercase a is 0x61; OR 0x20 to convert uppercase + * to lowercase. + */ +#define DUK_LOWERCASE_CHAR_ASCII(x) ((x) | 0x20) + +/* + * Unicode tables + */ + +#if defined(DUK_USE_SOURCE_NONBMP) +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +extern const duk_uint8_t duk_unicode_ids_noa[1116]; +#else +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +extern const duk_uint8_t duk_unicode_ids_noabmp[625]; +#endif + +#if defined(DUK_USE_SOURCE_NONBMP) +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +extern const duk_uint8_t duk_unicode_ids_m_let_noa[42]; +#else +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +extern const duk_uint8_t duk_unicode_ids_m_let_noabmp[24]; +#endif + +#if defined(DUK_USE_SOURCE_NONBMP) +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +extern const duk_uint8_t duk_unicode_idp_m_ids_noa[576]; +#else +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +extern const duk_uint8_t duk_unicode_idp_m_ids_noabmp[358]; +#endif + +/* + * Automatically generated by extract_caseconv.py, do not edit! + */ + +extern const duk_uint8_t duk_unicode_caseconv_uc[1411]; +extern const duk_uint8_t duk_unicode_caseconv_lc[706]; + +#if defined(DUK_USE_REGEXP_CANON_WORKAROUND) +/* + * Automatically generated by extract_caseconv.py, do not edit! + */ + +extern const duk_uint16_t duk_unicode_re_canon_lookup[65536]; +#endif + +#if defined(DUK_USE_REGEXP_CANON_BITMAP) +/* + * Automatically generated by extract_caseconv.py, do not edit! + */ + +#define DUK_CANON_BITMAP_BLKSIZE 32 +#define DUK_CANON_BITMAP_BLKSHIFT 5 +#define DUK_CANON_BITMAP_BLKMASK 31 +extern const duk_uint8_t duk_unicode_re_canon_bitmap[256]; +#endif + +/* + * Extern + */ + +/* duk_unicode_support.c */ +#if !defined(DUK_SINGLE_FILE) +DUK_INTERNAL_DECL const duk_uint8_t duk_unicode_xutf8_markers[7]; +DUK_INTERNAL_DECL const duk_uint16_t duk_unicode_re_ranges_digit[2]; +DUK_INTERNAL_DECL const duk_uint16_t duk_unicode_re_ranges_white[22]; +DUK_INTERNAL_DECL const duk_uint16_t duk_unicode_re_ranges_wordchar[8]; +DUK_INTERNAL_DECL const duk_uint16_t duk_unicode_re_ranges_not_digit[4]; +DUK_INTERNAL_DECL const duk_uint16_t duk_unicode_re_ranges_not_white[24]; +DUK_INTERNAL_DECL const duk_uint16_t duk_unicode_re_ranges_not_wordchar[10]; +DUK_INTERNAL_DECL const duk_int8_t duk_is_idchar_tab[128]; +#endif /* !DUK_SINGLE_FILE */ + +/* + * Prototypes + */ + +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_get_xutf8_length(duk_ucodepoint_t cp); +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_get_cesu8_length(duk_ucodepoint_t cp); +#endif +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_encode_xutf8(duk_ucodepoint_t cp, duk_uint8_t *out); +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_encode_cesu8(duk_ucodepoint_t cp, duk_uint8_t *out); +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_decode_xutf8(duk_hthread *thr, + const duk_uint8_t **ptr, + const duk_uint8_t *ptr_start, + const duk_uint8_t *ptr_end, + duk_ucodepoint_t *out_cp); +DUK_INTERNAL_DECL duk_ucodepoint_t duk_unicode_decode_xutf8_checked(duk_hthread *thr, + const duk_uint8_t **ptr, + const duk_uint8_t *ptr_start, + const duk_uint8_t *ptr_end); +DUK_INTERNAL_DECL duk_size_t duk_unicode_unvalidated_utf8_length(const duk_uint8_t *data, duk_size_t blen); +DUK_INTERNAL_DECL duk_bool_t duk_unicode_is_utf8_compatible(const duk_uint8_t *buf, duk_size_t len); +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_is_whitespace(duk_codepoint_t cp); +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_is_line_terminator(duk_codepoint_t cp); +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_is_identifier_start(duk_codepoint_t cp); +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_is_identifier_part(duk_codepoint_t cp); +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_is_letter(duk_codepoint_t cp); +DUK_INTERNAL_DECL void duk_unicode_case_convert_string(duk_hthread *thr, duk_bool_t uppercase); +#if defined(DUK_USE_REGEXP_SUPPORT) +DUK_INTERNAL_DECL duk_codepoint_t duk_unicode_re_canonicalize_char(duk_hthread *thr, duk_codepoint_t cp); +DUK_INTERNAL_DECL duk_small_int_t duk_unicode_re_is_wordchar(duk_codepoint_t cp); +#endif + +#endif /* DUK_UNICODE_H_INCLUDED */ +/* #include duk_json.h */ +#line 1 "duk_json.h" +/* + * Defines for JSON, especially duk_bi_json.c. + */ + +#if !defined(DUK_JSON_H_INCLUDED) +#define DUK_JSON_H_INCLUDED + +/* Encoding/decoding flags */ +#define DUK_JSON_FLAG_ASCII_ONLY (1U << 0) /* escape any non-ASCII characters */ +#define DUK_JSON_FLAG_AVOID_KEY_QUOTES (1U << 1) /* avoid key quotes when key is an ASCII Identifier */ +#define DUK_JSON_FLAG_EXT_CUSTOM (1U << 2) /* extended types: custom encoding */ +#define DUK_JSON_FLAG_EXT_COMPATIBLE (1U << 3) /* extended types: compatible encoding */ + +/* How much stack to require on entry to object/array encode */ +#define DUK_JSON_ENC_REQSTACK 32 + +/* How much stack to require on entry to object/array decode */ +#define DUK_JSON_DEC_REQSTACK 32 + +/* How large a loop detection stack to use */ +#define DUK_JSON_ENC_LOOPARRAY 64 + +/* Encoding state. Heap object references are all borrowed. */ +typedef struct { + duk_hthread *thr; + duk_bufwriter_ctx bw; /* output bufwriter */ + duk_hobject *h_replacer; /* replacer function */ + duk_hstring *h_gap; /* gap (if empty string, NULL) */ + duk_idx_t idx_proplist; /* explicit PropertyList */ + duk_idx_t idx_loop; /* valstack index of loop detection object */ + duk_small_uint_t flags; + duk_small_uint_t flag_ascii_only; + duk_small_uint_t flag_avoid_key_quotes; +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + duk_small_uint_t flag_ext_custom; + duk_small_uint_t flag_ext_compatible; + duk_small_uint_t flag_ext_custom_or_compatible; +#endif + duk_uint_t recursion_depth; + duk_uint_t recursion_limit; + duk_uint_t mask_for_undefined; /* type bit mask: types which certainly produce 'undefined' */ +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + duk_small_uint_t stridx_custom_undefined; + duk_small_uint_t stridx_custom_nan; + duk_small_uint_t stridx_custom_neginf; + duk_small_uint_t stridx_custom_posinf; + duk_small_uint_t stridx_custom_function; +#endif + duk_hobject *visiting[DUK_JSON_ENC_LOOPARRAY]; /* indexed by recursion_depth */ +} duk_json_enc_ctx; + +typedef struct { + duk_hthread *thr; + const duk_uint8_t *p; + const duk_uint8_t *p_start; + const duk_uint8_t *p_end; + duk_idx_t idx_reviver; + duk_small_uint_t flags; +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + duk_small_uint_t flag_ext_custom; + duk_small_uint_t flag_ext_compatible; + duk_small_uint_t flag_ext_custom_or_compatible; +#endif + duk_int_t recursion_depth; + duk_int_t recursion_limit; +} duk_json_dec_ctx; + +#endif /* DUK_JSON_H_INCLUDED */ +/* #include duk_js.h */ +#line 1 "duk_js.h" +/* + * ECMAScript execution, support primitives. + */ + +#if !defined(DUK_JS_H_INCLUDED) +#define DUK_JS_H_INCLUDED + +/* Flags for call handling. Lowest flags must match bytecode DUK_BC_CALL_FLAG_xxx 1:1. */ +#define DUK_CALL_FLAG_TAILCALL (1U << 0) /* setup for a tail call */ +#define DUK_CALL_FLAG_CONSTRUCT (1U << 1) /* constructor call (i.e. called as 'new Foo()') */ +#define DUK_CALL_FLAG_CALLED_AS_EVAL (1U << 2) /* call was made using the identifier 'eval' */ +#define DUK_CALL_FLAG_ALLOW_ECMATOECMA (1U << 3) /* ecma-to-ecma call with executor reuse is possible */ +#define DUK_CALL_FLAG_DIRECT_EVAL (1U << 4) /* call is a direct eval call */ +#define DUK_CALL_FLAG_CONSTRUCT_PROXY (1U << 5) /* handled via 'construct' proxy trap, check return value invariant(s) */ +#define DUK_CALL_FLAG_DEFAULT_INSTANCE_UPDATED \ + (1U << 6) /* prototype of 'default instance' updated, temporary flag in call handling */ + +/* Flags for duk_js_equals_helper(). */ +#define DUK_EQUALS_FLAG_SAMEVALUE (1U << 0) /* use SameValue instead of non-strict equality */ +#define DUK_EQUALS_FLAG_STRICT (1U << 1) /* use strict equality instead of non-strict equality */ + +/* Flags for duk_js_compare_helper(). */ +#define DUK_COMPARE_FLAG_NEGATE (1U << 0) /* negate result */ +#define DUK_COMPARE_FLAG_EVAL_LEFT_FIRST (1U << 1) /* eval left argument first */ + +/* conversions, coercions, comparison, etc */ +DUK_INTERNAL_DECL duk_bool_t duk_js_toboolean(duk_tval *tv); +DUK_INTERNAL_DECL duk_double_t duk_js_tonumber(duk_hthread *thr, duk_tval *tv); +DUK_INTERNAL_DECL duk_double_t duk_js_tointeger_number(duk_double_t x); +DUK_INTERNAL_DECL duk_double_t duk_js_tointeger(duk_hthread *thr, duk_tval *tv); +DUK_INTERNAL_DECL duk_uint32_t duk_js_touint32(duk_hthread *thr, duk_tval *tv); +DUK_INTERNAL_DECL duk_int32_t duk_js_toint32(duk_hthread *thr, duk_tval *tv); +DUK_INTERNAL_DECL duk_uint16_t duk_js_touint16(duk_hthread *thr, duk_tval *tv); +DUK_INTERNAL_DECL duk_uarridx_t duk_js_to_arrayindex_string(const duk_uint8_t *str, duk_uint32_t blen); +#if !defined(DUK_USE_HSTRING_ARRIDX) +DUK_INTERNAL_DECL duk_uarridx_t duk_js_to_arrayindex_hstring_fast_known(duk_hstring *h); +DUK_INTERNAL_DECL duk_uarridx_t duk_js_to_arrayindex_hstring_fast(duk_hstring *h); +#endif +DUK_INTERNAL_DECL duk_bool_t duk_js_equals_helper(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y, duk_small_uint_t flags); +DUK_INTERNAL_DECL duk_small_int_t duk_js_data_compare(const duk_uint8_t *buf1, + const duk_uint8_t *buf2, + duk_size_t len1, + duk_size_t len2); +DUK_INTERNAL_DECL duk_small_int_t duk_js_string_compare(duk_hstring *h1, duk_hstring *h2); +#if 0 /* unused */ +DUK_INTERNAL_DECL duk_small_int_t duk_js_buffer_compare(duk_heap *heap, duk_hbuffer *h1, duk_hbuffer *h2); +#endif +DUK_INTERNAL_DECL duk_bool_t duk_js_compare_helper(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y, duk_small_uint_t flags); +DUK_INTERNAL_DECL duk_bool_t duk_js_instanceof(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y); +#if defined(DUK_USE_SYMBOL_BUILTIN) +DUK_INTERNAL_DECL duk_bool_t duk_js_instanceof_ordinary(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y); +#endif +DUK_INTERNAL_DECL duk_bool_t duk_js_in(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y); +DUK_INTERNAL_DECL duk_small_uint_t duk_js_typeof_stridx(duk_tval *tv_x); +DUK_INTERNAL_DECL duk_bool_t duk_js_isarray_hobject(duk_hobject *h); +DUK_INTERNAL_DECL duk_bool_t duk_js_isarray(duk_tval *tv); + +/* arithmetic */ +DUK_INTERNAL_DECL double duk_js_arith_pow(double x, double y); +DUK_INTERNAL_DECL double duk_js_arith_mod(double x, double y); + +#define duk_js_equals(thr, tv_x, tv_y) duk_js_equals_helper((thr), (tv_x), (tv_y), 0) +#define duk_js_strict_equals(tv_x, tv_y) duk_js_equals_helper(NULL, (tv_x), (tv_y), DUK_EQUALS_FLAG_STRICT) +#define duk_js_samevalue(tv_x, tv_y) duk_js_equals_helper(NULL, (tv_x), (tv_y), DUK_EQUALS_FLAG_SAMEVALUE) + +/* E5 Sections 11.8.1, 11.8.5; x < y */ +#define duk_js_lessthan(thr, tv_x, tv_y) duk_js_compare_helper((thr), (tv_x), (tv_Y), DUK_COMPARE_FLAG_EVAL_LEFT_FIRST) + +/* E5 Sections 11.8.2, 11.8.5; x > y --> y < x */ +#define duk_js_greaterthan(thr, tv_x, tv_y) duk_js_compare_helper((thr), (tv_y), (tv_x), 0) + +/* E5 Sections 11.8.3, 11.8.5; x <= y --> not (x > y) --> not (y < x) */ +#define duk_js_lessthanorequal(thr, tv_x, tv_y) duk_js_compare_helper((thr), (tv_y), (tv_x), DUK_COMPARE_FLAG_NEGATE) + +/* E5 Sections 11.8.4, 11.8.5; x >= y --> not (x < y) */ +#define duk_js_greaterthanorequal(thr, tv_x, tv_y) \ + duk_js_compare_helper((thr), (tv_x), (tv_y), DUK_COMPARE_FLAG_EVAL_LEFT_FIRST | DUK_COMPARE_FLAG_NEGATE) + +/* identifiers and environment handling */ +#if 0 /*unused*/ +DUK_INTERNAL duk_bool_t duk_js_hasvar_envrec(duk_hthread *thr, duk_hobject *env, duk_hstring *name); +#endif +DUK_INTERNAL_DECL duk_bool_t duk_js_getvar_envrec(duk_hthread *thr, duk_hobject *env, duk_hstring *name, duk_bool_t throw_flag); +DUK_INTERNAL_DECL duk_bool_t duk_js_getvar_activation(duk_hthread *thr, + duk_activation *act, + duk_hstring *name, + duk_bool_t throw_flag); +DUK_INTERNAL_DECL void duk_js_putvar_envrec(duk_hthread *thr, + duk_hobject *env, + duk_hstring *name, + duk_tval *val, + duk_bool_t strict); +DUK_INTERNAL_DECL void duk_js_putvar_activation(duk_hthread *thr, + duk_activation *act, + duk_hstring *name, + duk_tval *val, + duk_bool_t strict); +#if 0 /*unused*/ +DUK_INTERNAL_DECL duk_bool_t duk_js_delvar_envrec(duk_hthread *thr, duk_hobject *env, duk_hstring *name); +#endif +DUK_INTERNAL_DECL duk_bool_t duk_js_delvar_activation(duk_hthread *thr, duk_activation *act, duk_hstring *name); +DUK_INTERNAL_DECL duk_bool_t duk_js_declvar_activation(duk_hthread *thr, + duk_activation *act, + duk_hstring *name, + duk_tval *val, + duk_small_uint_t prop_flags, + duk_bool_t is_func_decl); +DUK_INTERNAL_DECL void duk_js_init_activation_environment_records_delayed(duk_hthread *thr, duk_activation *act); +DUK_INTERNAL_DECL void duk_js_close_environment_record(duk_hthread *thr, duk_hobject *env); +DUK_INTERNAL_DECL duk_hobject *duk_create_activation_environment_record(duk_hthread *thr, + duk_hobject *func, + duk_size_t bottom_byteoff); +DUK_INTERNAL_DECL void duk_js_push_closure(duk_hthread *thr, + duk_hcompfunc *fun_temp, + duk_hobject *outer_var_env, + duk_hobject *outer_lex_env, + duk_bool_t add_auto_proto); + +/* call handling */ +DUK_INTERNAL_DECL void duk_native_stack_check(duk_hthread *thr); +DUK_INTERNAL_DECL duk_int_t duk_handle_call_unprotected(duk_hthread *thr, duk_idx_t idx_func, duk_small_uint_t call_flags); +DUK_INTERNAL_DECL duk_int_t duk_handle_call_unprotected_nargs(duk_hthread *thr, duk_idx_t nargs, duk_small_uint_t call_flags); +DUK_INTERNAL_DECL duk_int_t +duk_handle_safe_call(duk_hthread *thr, duk_safe_call_function func, void *udata, duk_idx_t num_stack_args, duk_idx_t num_stack_res); +DUK_INTERNAL_DECL void duk_call_construct_postprocess(duk_hthread *thr, duk_small_uint_t proxy_invariant); +#if defined(DUK_USE_VERBOSE_ERRORS) +DUK_INTERNAL_DECL void duk_call_setup_propcall_error(duk_hthread *thr, duk_tval *tv_base, duk_tval *tv_key); +#endif + +/* bytecode execution */ +DUK_INTERNAL_DECL void duk_js_execute_bytecode(duk_hthread *exec_thr); + +#endif /* DUK_JS_H_INCLUDED */ +/* #include duk_numconv.h */ +#line 1 "duk_numconv.h" +/* + * Number-to-string conversion. The semantics of these is very tightly + * bound with the ECMAScript semantics required for call sites. + */ + +#if !defined(DUK_NUMCONV_H_INCLUDED) +#define DUK_NUMCONV_H_INCLUDED + +/* Output a specified number of digits instead of using the shortest + * form. Used for toPrecision() and toFixed(). + */ +#define DUK_N2S_FLAG_FIXED_FORMAT (1U << 0) + +/* Force exponential format. Used for toExponential(). */ +#define DUK_N2S_FLAG_FORCE_EXP (1U << 1) + +/* If number would need zero padding (for whole number part), use + * exponential format instead. E.g. if input number is 12300, 3 + * digits are generated ("123"), output "1.23e+4" instead of "12300". + * Used for toPrecision(). + */ +#define DUK_N2S_FLAG_NO_ZERO_PAD (1U << 2) + +/* Digit count indicates number of fractions (i.e. an absolute + * digit index instead of a relative one). Used together with + * DUK_N2S_FLAG_FIXED_FORMAT for toFixed(). + */ +#define DUK_N2S_FLAG_FRACTION_DIGITS (1U << 3) + +/* + * String-to-number conversion + */ + +/* Maximum exponent value when parsing numbers. This is not strictly + * compliant as there should be no upper limit, but as we parse the + * exponent without a bigint, impose some limit. The limit should be + * small enough that multiplying it (or limit-1 to be precise) won't + * overflow signed 32-bit integer range. Exponent is only parsed with + * radix 10, but with maximum radix (36) a safe limit is: + * (10000000*36).toString(16) -> '15752a00' + */ +#define DUK_S2N_MAX_EXPONENT 10000000L + +/* Trim white space (= allow leading and trailing whitespace) */ +#define DUK_S2N_FLAG_TRIM_WHITE (1U << 0) + +/* Allow exponent */ +#define DUK_S2N_FLAG_ALLOW_EXP (1U << 1) + +/* Allow trailing garbage (e.g. treat "123foo" as "123) */ +#define DUK_S2N_FLAG_ALLOW_GARBAGE (1U << 2) + +/* Allow leading plus sign */ +#define DUK_S2N_FLAG_ALLOW_PLUS (1U << 3) + +/* Allow leading minus sign */ +#define DUK_S2N_FLAG_ALLOW_MINUS (1U << 4) + +/* Allow 'Infinity' */ +#define DUK_S2N_FLAG_ALLOW_INF (1U << 5) + +/* Allow fraction part */ +#define DUK_S2N_FLAG_ALLOW_FRAC (1U << 6) + +/* Allow naked fraction (e.g. ".123") */ +#define DUK_S2N_FLAG_ALLOW_NAKED_FRAC (1U << 7) + +/* Allow empty fraction (e.g. "123.") */ +#define DUK_S2N_FLAG_ALLOW_EMPTY_FRAC (1U << 8) + +/* Allow empty string to be interpreted as 0 */ +#define DUK_S2N_FLAG_ALLOW_EMPTY_AS_ZERO (1U << 9) + +/* Allow leading zeroes (e.g. "0123" -> "123") */ +#define DUK_S2N_FLAG_ALLOW_LEADING_ZERO (1U << 10) + +/* Allow automatic detection of hex base ("0x" or "0X" prefix), + * overrides radix argument and forces integer mode. + */ +#define DUK_S2N_FLAG_ALLOW_AUTO_HEX_INT (1U << 11) + +/* Allow automatic detection of legacy octal base ("0n"), + * overrides radix argument and forces integer mode. + */ +#define DUK_S2N_FLAG_ALLOW_AUTO_LEGACY_OCT_INT (1U << 12) + +/* Allow automatic detection of ES2015 octal base ("0o123"), + * overrides radix argument and forces integer mode. + */ +#define DUK_S2N_FLAG_ALLOW_AUTO_OCT_INT (1U << 13) + +/* Allow automatic detection of ES2015 binary base ("0b10001"), + * overrides radix argument and forces integer mode. + */ +#define DUK_S2N_FLAG_ALLOW_AUTO_BIN_INT (1U << 14) + +/* + * Prototypes + */ + +DUK_INTERNAL_DECL void duk_numconv_stringify(duk_hthread *thr, + duk_small_int_t radix, + duk_small_int_t digits, + duk_small_uint_t flags); +DUK_INTERNAL_DECL void duk_numconv_parse(duk_hthread *thr, duk_small_int_t radix, duk_small_uint_t flags); + +#endif /* DUK_NUMCONV_H_INCLUDED */ +/* #include duk_bi_protos.h */ +#line 1 "duk_bi_protos.h" +/* + * Prototypes for built-in functions not automatically covered by the + * header declarations emitted by genbuiltins.py. + */ + +#if !defined(DUK_BUILTIN_PROTOS_H_INCLUDED) +#define DUK_BUILTIN_PROTOS_H_INCLUDED + +/* Buffer size needed for ISO 8601 formatting. + * Accurate value is 32 + 1 for NUL termination: + * >>> len('+123456-01-23T12:34:56.123+12:34') + * 32 + * Include additional space to be safe. + */ +#define DUK_BI_DATE_ISO8601_BUFSIZE 40 + +/* Helpers exposed for internal use */ +DUK_INTERNAL_DECL void duk_bi_date_timeval_to_parts(duk_double_t d, duk_int_t *parts, duk_double_t *dparts, duk_small_uint_t flags); +DUK_INTERNAL_DECL duk_double_t duk_bi_date_get_timeval_from_dparts(duk_double_t *dparts, duk_small_uint_t flags); +DUK_INTERNAL_DECL duk_bool_t duk_bi_date_is_leap_year(duk_int_t year); +DUK_INTERNAL_DECL duk_bool_t duk_bi_date_timeval_in_valid_range(duk_double_t x); +DUK_INTERNAL_DECL duk_bool_t duk_bi_date_year_in_valid_range(duk_double_t year); +DUK_INTERNAL_DECL duk_bool_t duk_bi_date_timeval_in_leeway_range(duk_double_t x); +/* Built-in providers */ +#if defined(DUK_USE_DATE_NOW_GETTIMEOFDAY) +DUK_INTERNAL_DECL duk_double_t duk_bi_date_get_now_gettimeofday(void); +#endif +#if defined(DUK_USE_DATE_NOW_TIME) +DUK_INTERNAL_DECL duk_double_t duk_bi_date_get_now_time(void); +#endif +#if defined(DUK_USE_DATE_NOW_WINDOWS) +DUK_INTERNAL_DECL duk_double_t duk_bi_date_get_now_windows(void); +#endif +#if defined(DUK_USE_DATE_NOW_WINDOWS_SUBMS) +DUK_INTERNAL_DECL duk_double_t duk_bi_date_get_now_windows_subms(void); +#endif +#if defined(DUK_USE_DATE_TZO_GMTIME_R) || defined(DUK_USE_DATE_TZO_GMTIME_S) || defined(DUK_USE_DATE_TZO_GMTIME) +DUK_INTERNAL_DECL duk_int_t duk_bi_date_get_local_tzoffset_gmtime(duk_double_t d); +#endif +#if defined(DUK_USE_DATE_TZO_WINDOWS) +DUK_INTERNAL_DECL duk_int_t duk_bi_date_get_local_tzoffset_windows(duk_double_t d); +#endif +#if defined(DUK_USE_DATE_TZO_WINDOWS_NO_DST) +DUK_INTERNAL_DECL duk_int_t duk_bi_date_get_local_tzoffset_windows_no_dst(duk_double_t d); +#endif +#if defined(DUK_USE_DATE_PRS_STRPTIME) +DUK_INTERNAL_DECL duk_bool_t duk_bi_date_parse_string_strptime(duk_hthread *thr, const char *str); +#endif +#if defined(DUK_USE_DATE_PRS_GETDATE) +DUK_INTERNAL_DECL duk_bool_t duk_bi_date_parse_string_getdate(duk_hthread *thr, const char *str); +#endif +#if defined(DUK_USE_DATE_FMT_STRFTIME) +DUK_INTERNAL_DECL duk_bool_t duk_bi_date_format_parts_strftime(duk_hthread *thr, + duk_int_t *parts, + duk_int_t tzoffset, + duk_small_uint_t flags); +#endif + +#if defined(DUK_USE_GET_MONOTONIC_TIME_CLOCK_GETTIME) +DUK_INTERNAL_DECL duk_double_t duk_bi_date_get_monotonic_time_clock_gettime(void); +#endif +#if defined(DUK_USE_GET_MONOTONIC_TIME_WINDOWS_QPC) +DUK_INTERNAL_DECL duk_double_t duk_bi_date_get_monotonic_time_windows_qpc(void); +#endif + +DUK_INTERNAL_DECL +void duk_bi_json_parse_helper(duk_hthread *thr, duk_idx_t idx_value, duk_idx_t idx_reviver, duk_small_uint_t flags); +DUK_INTERNAL_DECL +void duk_bi_json_stringify_helper(duk_hthread *thr, + duk_idx_t idx_value, + duk_idx_t idx_replacer, + duk_idx_t idx_space, + duk_small_uint_t flags); + +DUK_INTERNAL_DECL duk_ret_t duk_textdecoder_decode_utf8_nodejs(duk_hthread *thr); + +#if defined(DUK_USE_ES6_PROXY) +DUK_INTERNAL_DECL void duk_proxy_ownkeys_postprocess(duk_hthread *thr, duk_hobject *h_proxy_target, duk_uint_t flags); +#endif + +#endif /* DUK_BUILTIN_PROTOS_H_INCLUDED */ +/* #include duk_selftest.h */ +#line 1 "duk_selftest.h" +/* + * Selftest code + */ + +#if !defined(DUK_SELFTEST_H_INCLUDED) +#define DUK_SELFTEST_H_INCLUDED + +#if defined(DUK_USE_SELF_TESTS) +DUK_INTERNAL_DECL duk_uint_t duk_selftest_run_tests(duk_alloc_function alloc_func, + duk_realloc_function realloc_func, + duk_free_function free_func, + void *udata); +#endif + +#endif /* DUK_SELFTEST_H_INCLUDED */ +#line 76 "duk_internal.h" + +#endif /* DUK_INTERNAL_H_INCLUDED */ +#line 10 "duk_replacements.c" + +#if defined(DUK_USE_COMPUTED_NAN) +DUK_INTERNAL double duk_computed_nan; +#endif + +#if defined(DUK_USE_COMPUTED_INFINITY) +DUK_INTERNAL double duk_computed_infinity; +#endif + +#if defined(DUK_USE_REPL_FPCLASSIFY) +DUK_INTERNAL int duk_repl_fpclassify(double x) { + duk_double_union u; + duk_uint_fast16_t expt; + duk_small_int_t mzero; + + u.d = x; + expt = (duk_uint_fast16_t) (u.us[DUK_DBL_IDX_US0] & 0x7ff0UL); + if (expt > 0x0000UL && expt < 0x7ff0UL) { + /* expt values [0x001,0x7fe] = normal */ + return DUK_FP_NORMAL; + } + + mzero = (u.ui[DUK_DBL_IDX_UI1] == 0 && (u.ui[DUK_DBL_IDX_UI0] & 0x000fffffUL) == 0); + if (expt == 0x0000UL) { + /* expt 0x000 is zero/subnormal */ + if (mzero) { + return DUK_FP_ZERO; + } else { + return DUK_FP_SUBNORMAL; + } + } else { + /* expt 0xfff is infinite/nan */ + if (mzero) { + return DUK_FP_INFINITE; + } else { + return DUK_FP_NAN; + } + } +} +#endif + +#if defined(DUK_USE_REPL_SIGNBIT) +DUK_INTERNAL int duk_repl_signbit(double x) { + duk_double_union u; + u.d = x; + return (int) (u.uc[DUK_DBL_IDX_UC0] & 0x80UL); +} +#endif + +#if defined(DUK_USE_REPL_ISFINITE) +DUK_INTERNAL int duk_repl_isfinite(double x) { + int c = DUK_FPCLASSIFY(x); + if (c == DUK_FP_NAN || c == DUK_FP_INFINITE) { + return 0; + } else { + return 1; + } +} +#endif + +#if defined(DUK_USE_REPL_ISNAN) +DUK_INTERNAL int duk_repl_isnan(double x) { + int c = DUK_FPCLASSIFY(x); + return (c == DUK_FP_NAN); +} +#endif + +#if defined(DUK_USE_REPL_ISINF) +DUK_INTERNAL int duk_repl_isinf(double x) { + int c = DUK_FPCLASSIFY(x); + return (c == DUK_FP_INFINITE); +} +#endif +#line 1 "duk_debug_macros.c" +/* + * Debugging macro calls. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_DEBUG) + +/* + * Debugging enabled + */ + +#include +#include +#include + +#if !defined(DUK_USE_DEBUG_WRITE) +#error debugging enabled (DUK_USE_DEBUG) but DUK_USE_DEBUG_WRITE not defined +#endif + +#define DUK__DEBUG_BUFSIZE DUK_USE_DEBUG_BUFSIZE + +#if defined(DUK_USE_VARIADIC_MACROS) + +DUK_INTERNAL void duk_debug_log(duk_int_t level, const char *file, duk_int_t line, const char *func, const char *fmt, ...) { + va_list ap; + long arg_level; + const char *arg_file; + long arg_line; + const char *arg_func; + const char *arg_msg; + char buf[DUK__DEBUG_BUFSIZE]; + + va_start(ap, fmt); + + duk_memzero((void *) buf, (size_t) DUK__DEBUG_BUFSIZE); + duk_debug_vsnprintf(buf, DUK__DEBUG_BUFSIZE - 1, fmt, ap); + + arg_level = (long) level; + arg_file = (const char *) file; + arg_line = (long) line; + arg_func = (const char *) func; + arg_msg = (const char *) buf; + DUK_USE_DEBUG_WRITE(arg_level, arg_file, arg_line, arg_func, arg_msg); + + va_end(ap); +} + +#else /* DUK_USE_VARIADIC_MACROS */ + +DUK_INTERNAL char duk_debug_file_stash[DUK_DEBUG_STASH_SIZE]; +DUK_INTERNAL duk_int_t duk_debug_line_stash; +DUK_INTERNAL char duk_debug_func_stash[DUK_DEBUG_STASH_SIZE]; +DUK_INTERNAL duk_int_t duk_debug_level_stash; + +DUK_INTERNAL void duk_debug_log(const char *fmt, ...) { + va_list ap; + long arg_level; + const char *arg_file; + long arg_line; + const char *arg_func; + const char *arg_msg; + char buf[DUK__DEBUG_BUFSIZE]; + + va_start(ap, fmt); + + duk_memzero((void *) buf, (size_t) DUK__DEBUG_BUFSIZE); + duk_debug_vsnprintf(buf, DUK__DEBUG_BUFSIZE - 1, fmt, ap); + + arg_level = (long) duk_debug_level_stash; + arg_file = (const char *) duk_debug_file_stash; + arg_line = (long) duk_debug_line_stash; + arg_func = (const char *) duk_debug_func_stash; + arg_msg = (const char *) buf; + DUK_USE_DEBUG_WRITE(arg_level, arg_file, arg_line, arg_func, arg_msg); + + va_end(ap); +} + +#endif /* DUK_USE_VARIADIC_MACROS */ + +#else /* DUK_USE_DEBUG */ + +/* + * Debugging disabled + */ + +#endif /* DUK_USE_DEBUG */ + +/* automatic undefs */ +#undef DUK__DEBUG_BUFSIZE +#line 1 "duk_builtins.c" +/* + * Automatically generated by genbuiltins.py, do not edit! + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_ASSERTIONS) +#define DUK__REFCINIT(refc) 0 /*h_assert_refcount*/, (refc) /*actual*/ +#else +#define DUK__REFCINIT(refc) (refc) /*actual*/ +#endif + +#if defined(DUK_USE_ROM_STRINGS) +#error ROM support not enabled, rerun configure.py with --rom-support +#else /* DUK_USE_ROM_STRINGS */ +DUK_INTERNAL const duk_uint8_t duk_strings_data[972] = { +79,40,209,144,168,105,6,78,54,139,89,185,44,48,46,90,120,8,154,140,35,103, +35,113,193,73,5,52,112,180,104,166,135,52,188,4,98,12,27,146,156,80,211,31, +129,115,150,64,52,220,109,24,18,68,156,24,38,67,114,36,55,9,119,151,132, +140,93,18,113,128,153,201,212,201,205,2,248,8,196,24,224,104,82,146,40,224, +193,48,114,168,37,147,196,54,123,28,4,98,12,43,148,67,103,177,192,70,32, +196,121,68,54,123,28,18,192,199,144,124,4,98,12,43,136,108,244,117,184,8, +196,24,95,40,134,207,71,91,128,140,65,133,113,13,158,158,151,1,24,131,11, +229,16,217,233,233,112,17,136,48,206,21,110,4,244,244,184,8,196,24,103,10, +183,2,122,218,156,4,98,12,24,203,112,64,179,113,193,79,8,218,155,131,32, +184,70,212,220,13,10,82,68,252,123,144,217,146,38,228,207,18,0,100,37,64, +178,212,11,161,17,104,162,96,10,200,193,57,165,65,169,16,5,100,81,27,70,18, +32,10,200,68,185,13,116,221,197,184,64,89,57,41,197,13,49,234,5,208,156, +113,87,55,118,147,20,187,56,161,166,92,221,212,73,210,236,226,134,153,115, +119,76,201,203,179,138,26,99,73,212,136,136,164,25,174,137,56,32,72,137, +101,23,52,45,13,34,86,9,79,136,104,201,114,149,96,52,138,134,140,151,75, +226,233,186,120,121,22,39,54,83,141,5,55,68,236,36,164,3,16,225,115,150,64, +52,205,163,2,72,154,83,138,26,99,75,12,11,150,103,5,36,20,211,70,140,133, +67,72,49,241,160,227,81,196,52,168,106,39,132,252,183,136,105,80,212,79,2, +249,110,128,126,88,95,133,109,237,237,237,151,235,127,46,249,119,203,190, +186,206,33,181,2,208,61,190,12,19,34,65,19,81,132,108,228,97,1,107,33,12, +32,45,100,137,64,247,175,9,19,155,41,198,130,155,134,69,146,100,227,226, +231,146,51,192,204,73,140,224,145,221,102,241,68,196,169,248,30,75,12,11, +151,242,233,187,143,138,24,137,162,164,255,253,63,3,201,97,129,114,254,92, +112,75,136,108,166,6,136,159,255,167,224,121,44,48,46,95,203,166,238,74, +113,67,77,201,128,223,255,223,224,121,44,48,46,95,203,145,46,9,205,16,39, +201,62,36,0,192,21,147,255,238,145,39,199,197,211,116,240,242,113,197,78, +214,211,226,233,187,107,105,19,119,37,56,161,166,52,221,212,201,205,36,240, +242,16,96,152,12,26,20,164,137,150,70,154,103,28,137,50,202,96,18,132,241, +41,104,105,56,218,48,36,138,183,57,56,128,68,24,38,2,52,12,34,10,133,147, +141,3,8,119,185,13,153,34,125,206,76,17,49,38,93,206,52,151,154,119,56,28, +76,130,112,200,141,206,21,209,96,23,35,238,114,160,139,0,243,238,114,78, +164,68,68,110,113,226,210,90,26,66,110,113,128,121,247,57,80,68,141,170, +183,56,84,52,11,70,73,19,110,114,160,93,8,113,57,143,66,200,84,53,244,154, +73,24,240,81,32,38,68,18,49,228,207,23,88,100,109,70,114,92,193,4,137,173, +168,36,220,73,19,247,247,182,168,209,144,187,223,58,156,104,79,190,183,127, +123,105,160,110,247,206,167,26,19,239,173,223,222,218,67,75,189,243,169, +198,132,251,235,183,247,182,154,134,151,123,231,83,141,9,247,215,111,239, +109,22,141,22,247,206,167,26,19,239,172,223,218,45,26,47,157,78,52,39,223, +74,24,144,10,32,129,34,20,64,152,142,129,57,179,67,104,68,12,129,161,140, +72,156,100,40,40,185,152,100,89,38,65,13,196,34,228,67,149,13,2,215,129, +149,209,65,104,209,77,14,104,144,81,33,170,67,101,48,52,68,113,70,210,88, +209,36,233,22,154,86,68,196,114,76,232,145,102,120,186,195,156,112,105,225, +228,113,71,80,68,162,115,101,50,85,200,25,108,116,44,132,178,38,114,137,96, +148,136,70,209,134,37,222,232,204,228,188,200,209,200,200,99,221,25,150,84, +121,34,70,209,107,36,227,66,20,160,92,136,164,49,235,35,8,217,201,40,108, +201,18,128,68,26,201,51,188,2,80,12,67,190,40,168,38,68,190,46,153,5,50,12, +207,160,86,129,26,83,4,208,34,225,4,88,192, +}; +#endif /* DUK_USE_ROM_STRINGS */ + +#if defined(DUK_USE_ROM_OBJECTS) +#error ROM support not enabled, rerun configure.py with --rom-support +#else /* DUK_USE_ROM_OBJECTS */ +/* native functions: 185 */ +DUK_INTERNAL const duk_c_function duk_bi_native_functions[185] = { + NULL, + duk_bi_array_constructor, + duk_bi_array_constructor_is_array, + duk_bi_array_prototype_concat, + duk_bi_array_prototype_indexof_shared, + duk_bi_array_prototype_iter_shared, + duk_bi_array_prototype_join_shared, + duk_bi_array_prototype_pop, + duk_bi_array_prototype_push, + duk_bi_array_prototype_reduce_shared, + duk_bi_array_prototype_reverse, + duk_bi_array_prototype_shift, + duk_bi_array_prototype_slice, + duk_bi_array_prototype_sort, + duk_bi_array_prototype_splice, + duk_bi_array_prototype_to_string, + duk_bi_array_prototype_unshift, + duk_bi_arraybuffer_constructor, + duk_bi_arraybuffer_isview, + duk_bi_boolean_constructor, + duk_bi_boolean_prototype_tostring_shared, + duk_bi_buffer_compare_shared, + duk_bi_buffer_readfield, + duk_bi_buffer_slice_shared, + duk_bi_buffer_writefield, + duk_bi_cbor_decode, + duk_bi_cbor_encode, + duk_bi_dataview_constructor, + duk_bi_date_constructor, + duk_bi_date_constructor_now, + duk_bi_date_constructor_parse, + duk_bi_date_constructor_utc, + duk_bi_date_prototype_get_shared, + duk_bi_date_prototype_get_timezone_offset, + duk_bi_date_prototype_set_shared, + duk_bi_date_prototype_set_time, + duk_bi_date_prototype_to_json, + duk_bi_date_prototype_toprimitive, + duk_bi_date_prototype_tostring_shared, + duk_bi_date_prototype_value_of, + duk_bi_duktape_object_act, + duk_bi_duktape_object_compact, + duk_bi_duktape_object_dec, + duk_bi_duktape_object_enc, + duk_bi_duktape_object_fin, + duk_bi_duktape_object_gc, + duk_bi_duktape_object_info, + duk_bi_error_constructor_shared, + duk_bi_error_prototype_filename_getter, + duk_bi_error_prototype_filename_setter, + duk_bi_error_prototype_linenumber_getter, + duk_bi_error_prototype_linenumber_setter, + duk_bi_error_prototype_stack_getter, + duk_bi_error_prototype_stack_setter, + duk_bi_error_prototype_to_string, + duk_bi_function_constructor, + duk_bi_function_prototype, + duk_bi_function_prototype_apply, + duk_bi_function_prototype_bind, + duk_bi_function_prototype_call, + duk_bi_function_prototype_hasinstance, + duk_bi_function_prototype_to_string, + duk_bi_global_object_decode_uri, + duk_bi_global_object_decode_uri_component, + duk_bi_global_object_encode_uri, + duk_bi_global_object_encode_uri_component, + duk_bi_global_object_escape, + duk_bi_global_object_eval, + duk_bi_global_object_is_finite, + duk_bi_global_object_is_nan, + duk_bi_global_object_parse_float, + duk_bi_global_object_parse_int, + duk_bi_global_object_unescape, + duk_bi_json_object_parse, + duk_bi_json_object_stringify, + duk_bi_math_object_clz32, + duk_bi_math_object_hypot, + duk_bi_math_object_imul, + duk_bi_math_object_max, + duk_bi_math_object_min, + duk_bi_math_object_onearg_shared, + duk_bi_math_object_random, + duk_bi_math_object_sign, + duk_bi_math_object_twoarg_shared, + duk_bi_native_function_length, + duk_bi_native_function_name, + duk_bi_nodejs_buffer_byte_length, + duk_bi_nodejs_buffer_concat, + duk_bi_nodejs_buffer_constructor, + duk_bi_nodejs_buffer_copy, + duk_bi_nodejs_buffer_fill, + duk_bi_nodejs_buffer_is_buffer, + duk_bi_nodejs_buffer_is_encoding, + duk_bi_nodejs_buffer_tojson, + duk_bi_nodejs_buffer_tostring, + duk_bi_nodejs_buffer_write, + duk_bi_number_check_shared, + duk_bi_number_constructor, + duk_bi_number_prototype_to_exponential, + duk_bi_number_prototype_to_fixed, + duk_bi_number_prototype_to_locale_string, + duk_bi_number_prototype_to_precision, + duk_bi_number_prototype_to_string, + duk_bi_number_prototype_value_of, + duk_bi_object_constructor, + duk_bi_object_constructor_assign, + duk_bi_object_constructor_create, + duk_bi_object_constructor_define_properties, + duk_bi_object_constructor_define_property, + duk_bi_object_constructor_get_own_property_descriptor, + duk_bi_object_constructor_is, + duk_bi_object_constructor_is_extensible, + duk_bi_object_constructor_is_sealed_frozen_shared, + duk_bi_object_constructor_keys_shared, + duk_bi_object_constructor_prevent_extensions, + duk_bi_object_constructor_seal_freeze_shared, + duk_bi_object_getprototype_shared, + duk_bi_object_prototype_defineaccessor, + duk_bi_object_prototype_has_own_property, + duk_bi_object_prototype_is_prototype_of, + duk_bi_object_prototype_lookupaccessor, + duk_bi_object_prototype_property_is_enumerable, + duk_bi_object_prototype_to_locale_string, + duk_bi_object_prototype_to_string, + duk_bi_object_prototype_value_of, + duk_bi_object_setprototype_shared, + duk_bi_performance_now, + duk_bi_pointer_constructor, + duk_bi_pointer_prototype_tostring_shared, + duk_bi_proxy_constructor, + duk_bi_reflect_apply, + duk_bi_reflect_construct, + duk_bi_reflect_object_delete_property, + duk_bi_reflect_object_get, + duk_bi_reflect_object_has, + duk_bi_reflect_object_set, + duk_bi_regexp_constructor, + duk_bi_regexp_prototype_exec, + duk_bi_regexp_prototype_flags, + duk_bi_regexp_prototype_shared_getter, + duk_bi_regexp_prototype_test, + duk_bi_regexp_prototype_tostring, + duk_bi_string_constructor, + duk_bi_string_constructor_from_char_code, + duk_bi_string_constructor_from_code_point, + duk_bi_string_prototype_caseconv_shared, + duk_bi_string_prototype_char_at, + duk_bi_string_prototype_char_code_at, + duk_bi_string_prototype_concat, + duk_bi_string_prototype_includes, + duk_bi_string_prototype_indexof_shared, + duk_bi_string_prototype_locale_compare, + duk_bi_string_prototype_match, + duk_bi_string_prototype_repeat, + duk_bi_string_prototype_replace, + duk_bi_string_prototype_search, + duk_bi_string_prototype_slice, + duk_bi_string_prototype_split, + duk_bi_string_prototype_startswith_endswith, + duk_bi_string_prototype_substr, + duk_bi_string_prototype_substring, + duk_bi_string_prototype_to_string, + duk_bi_string_prototype_trim, + duk_bi_symbol_constructor_shared, + duk_bi_symbol_key_for, + duk_bi_symbol_toprimitive, + duk_bi_symbol_tostring_shared, + duk_bi_textdecoder_constructor, + duk_bi_textdecoder_prototype_decode, + duk_bi_textdecoder_prototype_shared_getter, + duk_bi_textencoder_constructor, + duk_bi_textencoder_prototype_encode, + duk_bi_textencoder_prototype_encoding_getter, + duk_bi_thread_constructor, + duk_bi_thread_current, + duk_bi_thread_resume, + duk_bi_thread_yield, + duk_bi_type_error_thrower, + duk_bi_typedarray_buffer_getter, + duk_bi_typedarray_bytelength_getter, + duk_bi_typedarray_byteoffset_getter, + duk_bi_typedarray_constructor, + duk_bi_typedarray_set, + duk_bi_uint8array_allocplain, + duk_bi_uint8array_plainof, +}; +#if defined(DUK_USE_DOUBLE_LE) +DUK_INTERNAL const duk_uint8_t duk_builtins_data[4281] = { +144,148,105,226,32,68,52,228,254,12,104,202,37,132,52,167,194,138,105,245, +124,57,28,211,57,18,64,52,239,126,44,138,111,175,241,164,19,87,145,30,33, +167,22,145,159,8,211,139,9,225,42,5,240,145,139,163,163,8,211,139,10,228, +64,211,19,132,140,93,29,56,70,156,88,119,34,66,146,36,104,137,194,70,46, +142,172,35,78,44,47,146,195,102,11,240,145,139,163,175,8,211,139,9,228,240, +242,112,145,139,163,179,8,211,139,8,237,34,130,118,49,116,118,225,26,48,0, +1,98,29,201,158,46,183,39,135,147,132,140,93,16,132,76,66,33,8,66,16,132, +33,8,66,26,180,105,97,167,68,150,34,33,154,112,0,1,91,247,35,79,111,237, +198,174,232,47,31,23,95,17,13,31,249,96,211,49,50,53,214,77,141,24,0,0,181, +10,228,240,242,15,128,140,65,128,134,188,0,0,90,167,97,181,224,0,2,213,62, +53,224,0,2,213,66,237,120,0,0,181,81,204,107,192,0,5,170,150,67,94,0,0,45, +84,245,90,240,0,1,106,169,162,215,128,0,11,85,93,150,188,0,0,90,171,111,53, +109,22,162,26,48,0,1,84,23,201,146,243,225,26,39,12,145,136,104,192,0,5,61, +11,228,201,121,240,100,19,134,72,196,33,195,14,40,203,112,64,190,76,232, +145,153,136,0,0,0,0,0,0,31,15,249,152,0,0,0,0,0,0,30,15,249,120,144,13,96, +155,194,56,80,206,36,67,141,20,228,70,57,81,206,100,131,156,39,132,168,23, +194,70,46,137,208,21,200,129,166,39,9,24,186,39,72,119,34,66,146,36,104, +137,194,70,46,137,212,23,201,97,179,5,248,72,197,209,58,194,121,60,60,156, +36,98,232,157,129,29,164,80,78,198,46,137,218,146,121,25,71,146,9,209,5, +209,61,48,126,14,138,152,30,67,186,23,143,139,175,131,202,135,228,72,85, +144,83,60,179,30,94,209,233,102,30,98,105,230,103,30,114,121,231,104,30, +122,137,231,233,30,130,153,232,106,30,138,169,232,235,30,144,67,193,25,19, +136,108,207,30,41,224,140,137,194,173,192,153,228,5,242,100,188,248,70,137, +195,36,79,78,47,147,37,231,193,144,78,25,34,122,145,111,36,74,232,176,13, +17,61,234,226,93,207,148,160,84,75,141,7,27,161,32,33,18,225,80,212,76,154, +2,2,70,65,56,100,237,34,140,209,2,67,32,156,50,118,145,64,186,230,61,205, +35,103,155,32,36,141,19,134,78,210,40,206,16,36,70,137,195,39,105,20,11, +174,99,220,210,54,121,210,1,137,33,1,228,207,16,17,70,146,66,3,201,164,32, +0,65,112,152,56,196,159,31,23,77,211,195,201,199,23,160,72,214,246,81,6,12, +73,241,214,111,31,23,60,145,158,56,50,72,81,67,230,232,242,80,19,49,39,199, +89,188,124,92,242,70,120,227,64,194,75,154,72,12,9,73,6,111,21,120,12,40, +144,19,39,25,0,225,144,168,105,56,248,185,228,140,241,200,96,64,100,42,26, +78,62,46,121,35,52,18,92,116,1,36,64,47,158,64,49,98,66,100,156,242,65,23, +196,149,35,103,194,94,100,108,144,230,203,156,64,66,37,201,16,11,32,249, +132,4,34,92,44,93,146,55,152,72,24,137,112,151,153,27,36,5,100,229,144,8, +162,98,92,210,5,76,73,241,214,111,31,23,60,145,158,57,44,48,46,92,185,164, +160,72,151,41,0,50,107,179,244,59,36,93,127,92,6,19,172,3,11,216,0,56,224, +151,29,102,241,241,115,201,25,227,164,64,106,37,199,197,211,116,240,242, +113,197,233,144,40,248,185,228,140,241,196,75,132,109,24,72,128,43,39,84, +129,13,173,161,144,168,105,56,98,78,100,142,214,215,69,1,13,173,161,144, +168,105,57,34,78,100,142,214,215,69,16,67,107,105,110,114,168,254,24,147, +153,35,181,181,212,32,67,107,105,110,114,168,254,72,147,153,35,181,181,212, +36,65,130,3,144,8,26,252,200,13,30,85,16,16,64,90,242,231,192,64,161,163, +203,31,26,172,193,17,4,23,105,159,96,27,172,251,16,32,196,4,14,137,112,17, +136,48,164,28,134,80,215,202,1,132,130,8,12,39,52,64,155,31,24,56,36,1,189, +207,132,0,35,233,35,195,62,3,196,149,36,100,72,160,2,200,232,44,227,0,11, +37,160,68,142,128,36,157,25,200,32,26,79,90,4,73,43,192,122,54,71,65,103, +44,248,14,134,140,151,227,138,231,208,45,96,148,248,134,140,151,227,138, +231,240,1,255,254,10,74,146,56,128,104,4,147,152,72,6,144,28,174,143,8,1, +30,1,165,3,96,31,0,211,3,21,11,153,35,0,211,131,68,131,160,137,16,250,5, +196,131,160,137,200,160,199,156,67,248,0,255,255,65,140,10,48,177,115,56, +35,130,60,19,134,79,89,240,52,177,115,56,39,12,156,123,144,217,251,15,135, +34,167,30,20,170,154,255,232,12,47,244,0,97,28,17,224,39,238,32,40,71,4, +120,39,12,156,4,253,228,5,137,195,39,30,228,54,124,4,253,228,128,194,115, +68,9,252,15,128,232,104,201,126,56,191,35,64,90,193,41,241,13,25,47,199,23, +228,105,3,86,225,1,100,224,156,199,130,36,249,144,10,192,76,71,250,16,15, +18,61,96,17,62,200,3,72,128,136,143,247,32,22,75,64,137,248,64,22,79,90,39, +249,64,38,84,12,167,20,52,223,196,2,230,238,45,214,36,120,32,72,158,208,4, +102,238,45,194,2,201,197,186,196,143,4,9,19,218,0,92,221,202,61,228,143,4, +9,19,218,8,35,55,113,110,16,22,78,81,239,36,120,32,72,158,208,64,73,197,12, +255,0,13,18,60,128,159,212,128,169,76,17,156,185,100,76,255,163,64,65,26, +57,114,200,153,255,70,144,33,13,18,232,50,75,226,104,6,149,3,41,199,246, +130,12,128,28,142,156,120,203,175,158,8,194,207,1,6,81,20,79,88,11,237,84, +11,161,32,127,255,255,255,255,255,247,191,137,235,16,221,170,129,116,36,0, +16,0,0,0,0,0,0,12,196,0,0,0,0,0,0,15,135,242,61,123,164,137,162,164,218,67, +74,134,162,120,128,0,0,0,0,0,1,224,254,71,173,33,129,52,84,155,72,105,80, +212,79,16,0,0,0,0,0,0,60,63,195,244,143,146,22,230,192,0,0,0,0,0,0,176,60, +33,214,2,251,82,1,73,180,134,204,134,36,96,127,255,255,255,255,255,159,161, +144,235,16,221,169,0,164,218,67,102,67,18,48,63,255,255,255,255,255,207, +240,196,60,17,145,56,134,204,241,226,158,8,200,156,42,220,9,158,65,196,34, +92,42,26,137,147,120,64,74,37,196,54,100,49,35,188,36,5,68,184,208,113,187, +194,80,212,75,146,1,73,196,54,100,49,35,188,38,57,37,56,240,0,0,0,0,0,0,0, +0,32,235,248,68,48,156,2,24,94,24,0,243,119,10,139,144,123,242,3,102,238, +18,239,115,72,217,160,11,223,16,23,55,113,241,32,145,36,57,188,18,16,102,3, +5,120,35,34,89,32,15,180,152,173,127,0,218,235,88,0,228,180,227,200,0,0,0, +0,0,0,248,127,197,107,240,64,6,77,220,24,38,78,74,113,67,77,130,4,12,155, +185,52,48,156,148,226,134,155,4,10,194,96,129,132,166,238,45,194,2,201,193, +130,100,228,167,20,52,216,32,113,41,187,139,112,128,178,114,104,97,57,41, +197,13,54,8,32,48,216,32,130,195,224,130,19,97,124,134,23,6,0,57,137,62,77, +12,38,12,0,179,18,124,45,22,190,96,128,141,176,134,28,98,79,180,152,139, +218,45,124,193,1,27,97,16,32,196,159,24,230,204,246,194,40,89,137,62,210, +98,103,92,217,158,216,70,7,49,39,193,130,100,182,17,194,140,73,246,147,16, +250,9,146,216,72,6,49,39,193,131,22,194,72,73,137,62,210,98,31,65,139,97, +40,32,196,159,14,234,70,86,194,88,89,137,62,210,98,63,93,72,202,216,76,10, +49,39,198,33,180,153,37,108,38,134,152,147,237,38,38,117,13,164,201,43,97, +56,40,196,159,36,65,57,163,149,176,158,26,98,79,180,152,165,210,9,205,28, +173,133,0,243,18,124,98,22,180,72,130,115,71,43,97,68,72,196,159,105,49,51, +168,90,209,34,9,205,28,173,133,33,19,18,124,154,24,76,185,164,227,138,89, +18,119,0,7,145,39,201,161,132,188,64,124,137,62,49,11,90,36,65,57,163,149, +210,166,37,34,79,180,152,153,212,45,104,145,4,230,142,87,74,160,84,137,62, +72,130,115,71,43,171,234,134,200,147,237,38,41,116,130,115,71,43,171,235,5, +72,147,227,16,218,76,146,186,254,184,108,137,62,210,98,103,80,218,76,146, +186,254,192,68,137,62,29,212,140,174,207,178,23,34,79,180,152,143,215,82, +50,187,62,208,60,137,62,12,19,37,210,182,21,34,79,180,152,135,208,76,151, +74,224,68,137,62,49,205,153,238,175,186,23,34,79,180,152,153,215,54,103, +186,190,240,92,137,62,22,139,95,48,64,70,235,251,225,210,36,251,73,136,189, +162,215,204,16,17,186,255,2,14,98,79,152,32,35,108,48,64,242,36,249,130,2, +55,75,6,212,224,72,200,51,128,114,108,28,100,128,0,0,0,0,0,0,0,12,110,127, +48,98,115,249,201,117,243,249,195,21,159,206,38,47,63,156,86,8,75,144,94, +82,1,38,73,79,208,67,95,233,1,6,128,14,79,129,186,40,249,18,149,182,207, +144,200,155,188,248,204,105,184,207,142,199,137,175,201,0,159,72,10,5,21, +221,10,120,74,129,124,36,98,232,228,74,81,62,160,20,10,107,186,21,114,32, +105,137,194,70,46,142,68,165,19,235,1,64,170,187,161,119,34,66,146,36,104, +137,194,70,46,142,68,165,19,236,1,64,174,187,161,95,37,134,204,23,225,35, +23,71,34,82,137,246,128,160,89,93,208,167,147,195,201,194,70,46,142,68,165, +19,238,1,64,182,187,161,71,105,20,19,177,139,163,145,41,68,16,7,6,15,82,70, +72,115,96,0,0,0,0,0,27,234,32,91,60,165,195,201,194,8,134,149,216,162,0, +192,41,225,8,2,48,177,36,1,149,13,196,15,0,200,209,97,199,128,99,32,176, +195,192,113,57,143,0,167,133,32,230,80,28,202,139,175,238,2,48,189,192,20, +1,119,80,87,193,186,129,89,56,72,197,209,200,193,185,35,23,71,109,13,219, +36,98,232,237,156,13,26,208,211,14,102,19,87,137,91,95,128,0,10,96,24,92,0, +0,83,2,53,56,0,0,165,3,28,204,160,160,226,100,226,200,211,76,241,240,0,1, +102,8,22,75,64,137,73,20,230,105,133,7,19,39,22,70,154,103,143,128,0,11,48, +20,28,76,156,113,75,34,78,62,0,0,45,3,103,31,0,0,22,65,44,57,137,62,33,179, +216,162,152,192,131,18,124,162,27,61,138,41,108,32,196,159,16,217,232,235, +81,76,104,73,137,62,81,13,158,142,181,20,184,16,98,79,136,108,244,244,168, +166,56,36,196,159,40,134,207,79,74,138,93,10,49,39,194,173,192,158,158,149, +20,188,20,98,79,133,91,129,61,109,74,41,124,30,68,159,16,217,236,83,108,96, +68,137,62,81,13,158,197,54,182,17,34,79,136,108,244,117,169,182,52,38,68, +159,40,134,207,71,90,155,92,8,145,39,196,54,122,122,84,219,28,19,34,79,148, +67,103,167,165,77,174,133,72,147,225,86,224,79,79,74,155,94,10,145,39,194, +173,192,158,182,165,54,190,206,25,212,35,208,226,100,150,211,201,29,162,44, +140,35,103,0,0,0,0,0,0,3,192,252,206,25,228,35,208,226,100,150,211,201,29, +162,44,140,35,103,0,0,0,0,0,0,3,192,252,206,25,244,35,208,226,100,150,211, +201,29,162,44,140,35,103,0,0,0,0,0,0,3,192,252,206,26,4,35,208,226,100,150, +211,201,29,162,44,140,35,103,0,0,0,0,0,0,0,1,0,206,26,20,35,208,226,100, +150,211,201,29,162,44,140,35,103,0,0,0,0,0,0,0,1,0,206,26,36,35,208,226, +100,150,211,201,29,162,44,140,35,103,0,0,0,0,0,0,0,65,0,206,26,52,35,208, +226,100,150,211,201,29,162,44,140,35,103,0,0,0,0,0,0,0,65,0,206,26,68,35, +208,226,100,150,211,201,29,162,44,140,35,103,0,0,0,0,0,0,0,65,0,206,26,84, +35,208,226,100,150,211,201,29,162,44,140,35,103,0,0,0,0,0,0,0,129,0,195, +154,99,16,38,36,0,251,68,117,179,216,162,128,68,72,1,241,13,158,197,20,150, +25,18,0,125,162,58,217,232,235,117,100,162,136,25,18,0,125,162,58,217,232, +235,116,36,162,145,2,226,64,15,136,108,244,117,186,178,81,73,129,113,32,7, +196,54,122,58,221,9,40,165,64,200,144,3,237,17,214,207,79,75,171,37,20,80, +200,144,3,237,17,214,207,79,75,161,37,20,138,23,18,0,124,67,103,167,165, +213,146,138,77,11,137,0,62,33,179,211,210,232,73,69,42,133,196,128,31,10, +183,2,125,89,40,163,5,196,128,31,10,183,2,125,9,40,164,96,200,144,3,224, +221,64,172,157,89,40,163,134,68,128,31,6,234,5,100,232,73,69,35,133,68,128, +31,104,142,182,125,89,40,180,0,168,144,3,237,17,214,207,161,37,22,144,19, +18,0,124,67,103,213,146,139,80,9,137,0,62,33,179,232,73,69,172,5,90,40,153, +59,68,117,179,216,166,192,77,162,137,147,136,108,246,41,180,176,219,69,19, +39,104,142,182,122,58,221,89,41,178,6,218,40,153,59,68,117,179,209,214,232, +73,77,162,6,90,40,153,56,134,207,71,91,171,37,54,152,25,104,162,100,226,27, +61,29,110,132,148,218,160,109,162,137,147,180,71,91,61,61,46,172,148,217, +67,109,20,76,157,162,58,217,233,233,116,36,166,209,67,45,20,76,156,67,103, +167,165,213,146,155,77,12,180,81,50,113,13,158,158,151,66,74,109,84,50,209, +68,201,194,173,192,159,86,74,108,193,150,138,38,78,21,110,4,250,18,83,104, +193,182,138,38,78,13,212,10,201,213,146,155,56,109,162,137,147,131,117,2, +178,116,36,166,209,194,237,20,76,157,162,58,217,245,100,167,16,2,237,20,76, +157,162,58,217,244,36,167,18,2,173,20,76,156,67,103,213,146,156,80,10,180, +81,50,113,13,159,66,74,113,97,175,221,48,216,110,64,4,42,22,189,179,0,196, +133,0,185,80,32,28,78,99,193,18,80,36,4,19,159,141,172,0,178,90,4,74,73,0, +22,209,68,201,187,129,4,2,8,3,132,64,60,36,6,149,113,72,176,171,240,84,0, +157,91,116,116,32,11,42,218,221,216,181,129,32,3,234,219,165,3,188,231,235, +249,8,187,152,252,47,86,227,105,18,7,244,17,91,42,56,175,185,248,110,173, +198,209,208,36,0,238,82,97,87,188,189,179,240,93,122,32,12,22,162,42,125, +144,132,160,7,236,161,25,232,237,105,64,205,59,127,102,158,160,230,63,11, +217,66,51,210,129,154,118,254,205,61,65,236,127,171,197,34,168,48,6,90,194, +1,0,39,75,88,72,8,9,33,186,194,80,64,76,13,214,19,2,130,96,110,150,189,0, +65,6,51,214,20,128,65,17,11,214,19,130,137,121,211,210,211,144,6,39,75,88, +80,0,201,119,235,10,8,41,86,231,71,88,80,129,79,135,186,122,133,224,34,25, +69,234,80,3,91,141,172,40,96,139,113,180,181,133,36,21,110,54,142,134,176, +165,1,176,23,213,47,0,216,134,234,215,128,111,117,181,232,128,209,3,70,230, +107,64,5,139,168,209,235,10,32,36,144,102,235,136,3,146,27,172,40,160,146, +132,103,172,40,192,115,3,117,133,28,22,113,163,69,172,41,103,1,66,188,17, +145,52,168,4,202,113,67,76,130,227,76,194,13,240,108,0,0,83,224,0,2,193,0, +104,146,84,97,48,0,1,94,192,56,169,24,145,179,192,0,5,112,8,56,16,32,128, +56,18,52,125,230,86,147,190,140,28,50,21,13,39,31,23,60,145,158,57,12,141, +47,129,6,155,194,188,24,49,39,199,89,188,124,92,242,70,120,224,201,33,69, +15,155,163,201,68,14,49,39,199,197,211,116,240,242,113,197,232,18,180,254, +36,3,17,46,18,243,35,100,128,172,156,178,70,163,154,76,34,248,146,164,108, +248,75,204,141,146,28,217,115,137,27,95,27,241,173,236,162,160,224,200,2, +206,9,113,13,148,192,209,18,22,164,146,37,193,57,162,4,249,39,196,128,24,2, +178,66,213,136,68,201,16,77,209,131,31,192,242,88,96,92,191,151,34,100,136, +38,232,255,252,92,221,199,197,12,68,209,82,66,212,11,155,185,41,197,13,55, +38,3,66,213,47,135,254,72,12,162,99,133,116,112,0,1,72,66,14,16,16,50,37, +202,160,150,154,66,14,20,8,57,192,28,24,80,113,50,113,100,105,166,120,248, +0,0,179,1,65,196,201,199,20,178,36,227,224,0,2,208,54,113,240,0,1,100,11, +181,192,0,5,178,1,18,160,65,24,131,20,145,25,188,48,132,122,28,76,146,218, +121,35,180,69,145,132,108,224,0,0,0,0,0,0,120,31,153,188,56,132,122,28,76, +146,218,121,35,180,69,145,132,108,224,0,0,0,0,0,0,120,31,168,160,45,110,23, +30,176,33,184,0,0,183,32,29,235,2,27,199,23,0,0,23,4,51,120,129,8,244,56, +153,37,180,242,71,104,139,35,8,217,192,0,0,0,0,0,0,240,63,51,120,145,8,244, +56,153,37,180,242,71,104,139,35,8,217,192,0,0,0,0,0,0,0,64,51,120,161,8, +244,56,153,37,180,242,71,104,139,35,8,217,192,0,0,0,0,0,0,0,64,51,120,177, +8,244,56,153,37,180,242,71,104,139,35,8,217,192,0,0,0,0,0,0,16,64,51,120, +193,8,244,56,153,37,180,242,71,104,139,35,8,217,192,0,0,0,0,0,0,16,64,51, +120,209,8,244,56,153,37,180,242,71,104,139,35,8,217,192,0,0,0,0,0,0,16,64, +51,120,225,8,244,56,153,37,180,242,71,104,139,35,8,217,192,0,0,0,0,0,0,32, +64,32,227,194,0,97,57,162,4,246,104,5,34,92,35,68,225,161,166,220,16,16, +137,112,52,41,73,29,185,1,65,196,201,197,145,166,153,246,72,3,137,204,120, +34,74,8,199,1,67,17,162,112,201,84,128,97,144,78,25,42,16,131,169,1,205,66, +8,35,68,225,161,166,239,128,0,10,192,64,196,104,156,50,96,0,2,172,73,240, +117,96,57,170,97,4,104,156,52,52,221,240,0,1,82,1,74,9,129,125,240,0,1,82, +32,148,25,174,137,58,23,51,190,0,0,42,69,64,195,32,156,50,96,0,2,160,81, +238,2,3,107,173,218,3,192, +}; +#elif defined(DUK_USE_DOUBLE_BE) +DUK_INTERNAL const duk_uint8_t duk_builtins_data[4281] = { +144,148,105,226,32,68,52,228,254,12,104,202,37,132,52,167,194,138,105,245, +124,57,28,211,57,18,64,52,239,126,44,138,111,175,241,164,19,87,145,30,33, +167,22,145,159,8,211,139,9,225,42,5,240,145,139,163,163,8,211,139,10,228, +64,211,19,132,140,93,29,56,70,156,88,119,34,66,146,36,104,137,194,70,46, +142,172,35,78,44,47,146,195,102,11,240,145,139,163,175,8,211,139,9,228,240, +242,112,145,139,163,179,8,211,139,8,237,34,130,118,49,116,118,225,26,48,0, +1,98,29,201,158,46,183,39,135,147,132,140,93,16,132,76,66,33,8,66,16,132, +33,8,66,26,180,105,97,167,68,150,34,33,154,112,0,1,91,247,35,79,111,237, +198,174,232,47,31,23,95,17,13,31,249,96,211,49,50,53,214,77,141,24,0,0,181, +10,228,240,242,15,128,140,65,128,134,188,0,0,90,167,97,181,224,0,2,213,62, +53,224,0,2,213,66,237,120,0,0,181,81,204,107,192,0,5,170,150,67,94,0,0,45, +84,245,90,240,0,1,106,169,162,215,128,0,11,85,93,150,188,0,0,90,171,111,53, +109,22,162,26,48,0,1,84,23,201,146,243,225,26,39,12,145,136,104,192,0,5,61, +11,228,201,121,240,100,19,134,72,196,33,195,14,40,203,112,64,190,76,232, +145,153,136,15,255,0,0,0,0,0,0,25,152,15,254,0,0,0,0,0,0,25,120,144,13,96, +155,194,56,80,206,36,67,141,20,228,70,57,81,206,100,131,156,39,132,168,23, +194,70,46,137,208,21,200,129,166,39,9,24,186,39,72,119,34,66,146,36,104, +137,194,70,46,137,212,23,201,97,179,5,248,72,197,209,58,194,121,60,60,156, +36,98,232,157,129,29,164,80,78,198,46,137,218,146,121,25,71,146,9,209,5, +209,61,48,126,14,138,152,30,67,186,23,143,139,175,131,202,135,228,72,85, +144,83,60,179,30,94,209,233,102,30,98,105,230,103,30,114,121,231,104,30, +122,137,231,233,30,130,153,232,106,30,138,169,232,235,30,144,67,193,25,19, +136,108,207,30,41,224,140,137,194,173,192,153,228,5,242,100,188,248,70,137, +195,36,79,78,47,147,37,231,193,144,78,25,34,122,145,111,36,74,232,176,13, +17,61,234,226,93,207,148,160,84,75,141,7,27,161,32,33,18,225,80,212,76,154, +2,2,70,65,56,100,237,34,140,209,2,67,32,156,50,118,145,64,186,230,61,205, +35,103,155,32,36,141,19,134,78,210,40,206,16,36,70,137,195,39,105,20,11, +174,99,220,210,54,121,210,1,137,33,1,228,207,16,17,70,146,66,3,201,164,32, +0,65,112,152,56,196,159,31,23,77,211,195,201,199,23,160,72,214,246,81,6,12, +73,241,214,111,31,23,60,145,158,56,50,72,81,67,230,232,242,80,19,49,39,199, +89,188,124,92,242,70,120,227,64,194,75,154,72,12,9,73,6,111,21,120,12,40, +144,19,39,25,0,225,144,168,105,56,248,185,228,140,241,200,96,64,100,42,26, +78,62,46,121,35,52,18,92,116,1,36,64,47,158,64,49,98,66,100,156,242,65,23, +196,149,35,103,194,94,100,108,144,230,203,156,64,66,37,201,16,11,32,249, +132,4,34,92,44,93,146,55,152,72,24,137,112,151,153,27,36,5,100,229,144,8, +162,98,92,210,5,76,73,241,214,111,31,23,60,145,158,57,44,48,46,92,185,164, +160,72,151,41,0,50,107,179,244,59,36,93,127,92,6,19,172,3,11,216,0,56,224, +151,29,102,241,241,115,201,25,227,164,64,106,37,199,197,211,116,240,242, +113,197,233,144,40,248,185,228,140,241,196,75,132,109,24,72,128,43,39,84, +129,13,173,161,144,168,105,56,98,78,100,142,214,215,69,1,13,173,161,144, +168,105,57,34,78,100,142,214,215,69,16,67,107,105,110,114,168,254,24,147, +153,35,181,181,212,32,67,107,105,110,114,168,254,72,147,153,35,181,181,212, +36,65,130,3,144,8,26,252,200,13,30,85,16,16,64,90,242,231,192,64,161,163, +203,31,26,172,193,17,4,23,105,159,96,27,172,251,16,32,196,4,14,137,112,17, +136,48,164,28,134,80,215,202,1,132,130,8,12,39,52,64,155,31,24,56,36,1,189, +207,132,0,35,233,35,195,62,3,196,149,36,100,72,160,2,200,232,44,227,0,11, +37,160,68,142,128,36,157,25,200,32,26,79,90,4,73,43,192,122,54,71,65,103, +44,248,14,134,140,151,227,138,231,208,45,96,148,248,134,140,151,227,138, +231,240,1,255,254,10,74,146,56,128,104,4,147,152,72,6,144,28,174,143,8,1, +30,1,165,3,96,31,0,211,3,21,11,153,35,0,211,131,68,131,160,137,16,250,5, +196,131,160,137,200,160,199,156,67,248,0,255,255,65,140,10,48,177,115,56, +35,130,60,19,134,79,89,240,52,177,115,56,39,12,156,123,144,217,251,15,135, +34,167,30,20,170,154,255,232,12,47,244,0,97,28,17,224,39,238,32,40,71,4, +120,39,12,156,4,253,228,5,137,195,39,30,228,54,124,4,253,228,128,194,115, +68,9,252,15,128,232,104,201,126,56,191,35,64,90,193,41,241,13,25,47,199,23, +228,105,3,86,225,1,100,224,156,199,130,36,249,144,10,192,76,71,250,16,15, +18,61,96,17,62,200,3,72,128,136,143,247,32,22,75,64,137,248,64,22,79,90,39, +249,64,38,84,12,167,20,52,223,196,2,230,238,45,214,36,120,32,72,158,208,4, +102,238,45,194,2,201,197,186,196,143,4,9,19,218,0,92,221,202,61,228,143,4, +9,19,218,8,35,55,113,110,16,22,78,81,239,36,120,32,72,158,208,64,73,197,12, +255,0,13,18,60,128,159,212,128,169,76,17,156,185,100,76,255,163,64,65,26, +57,114,200,153,255,70,144,33,13,18,232,50,75,226,104,6,149,3,41,199,246, +130,12,128,28,142,156,120,203,175,158,8,194,207,1,6,81,20,79,88,11,237,84, +11,161,32,63,247,255,255,255,255,255,255,137,235,16,221,170,129,116,36,0,0, +0,0,0,0,0,0,28,196,7,255,128,0,0,0,0,0,2,61,123,164,137,162,164,218,67,74, +134,162,120,128,255,224,0,0,0,0,0,0,71,173,33,129,52,84,155,72,105,80,212, +79,16,63,252,0,0,0,0,0,0,3,244,143,146,22,230,192,60,176,0,0,0,0,0,0,33, +214,2,251,82,1,73,180,134,204,134,36,96,33,159,255,255,255,255,255,255,144, +235,16,221,169,0,164,218,67,102,67,18,48,48,207,255,255,255,255,255,255, +196,60,17,145,56,134,204,241,226,158,8,200,156,42,220,9,158,65,196,34,92, +42,26,137,147,120,64,74,37,196,54,100,49,35,188,36,5,68,184,208,113,187, +194,80,212,75,146,1,73,196,54,100,49,35,188,38,57,37,56,240,0,0,0,0,0,0,0, +0,32,235,248,68,48,156,2,24,94,24,0,243,119,10,139,144,123,242,3,102,238, +18,239,115,72,217,160,11,223,16,23,55,113,241,32,145,36,57,188,18,16,102,3, +5,120,35,34,89,32,15,180,152,173,127,0,218,235,88,0,228,180,227,200,127, +248,0,0,0,0,0,0,197,107,240,64,6,77,220,24,38,78,74,113,67,77,130,4,12,155, +185,52,48,156,148,226,134,155,4,10,194,96,129,132,166,238,45,194,2,201,193, +130,100,228,167,20,52,216,32,113,41,187,139,112,128,178,114,104,97,57,41, +197,13,54,8,32,48,216,32,130,195,224,130,19,97,124,134,23,6,0,57,137,62,77, +12,38,12,0,179,18,124,45,22,190,96,128,141,176,134,28,98,79,180,152,139, +218,45,124,193,1,27,97,16,32,196,159,24,230,204,246,194,40,89,137,62,210, +98,103,92,217,158,216,70,7,49,39,193,130,100,182,17,194,140,73,246,147,16, +250,9,146,216,72,6,49,39,193,131,22,194,72,73,137,62,210,98,31,65,139,97, +40,32,196,159,14,234,70,86,194,88,89,137,62,210,98,63,93,72,202,216,76,10, +49,39,198,33,180,153,37,108,38,134,152,147,237,38,38,117,13,164,201,43,97, +56,40,196,159,36,65,57,163,149,176,158,26,98,79,180,152,165,210,9,205,28, +173,133,0,243,18,124,98,22,180,72,130,115,71,43,97,68,72,196,159,105,49,51, +168,90,209,34,9,205,28,173,133,33,19,18,124,154,24,76,185,164,227,138,89, +18,119,0,7,145,39,201,161,132,188,64,124,137,62,49,11,90,36,65,57,163,149, +210,166,37,34,79,180,152,153,212,45,104,145,4,230,142,87,74,160,84,137,62, +72,130,115,71,43,171,234,134,200,147,237,38,41,116,130,115,71,43,171,235,5, +72,147,227,16,218,76,146,186,254,184,108,137,62,210,98,103,80,218,76,146, +186,254,192,68,137,62,29,212,140,174,207,178,23,34,79,180,152,143,215,82, +50,187,62,208,60,137,62,12,19,37,210,182,21,34,79,180,152,135,208,76,151, +74,224,68,137,62,49,205,153,238,175,186,23,34,79,180,152,153,215,54,103, +186,190,240,92,137,62,22,139,95,48,64,70,235,251,225,210,36,251,73,136,189, +162,215,204,16,17,186,255,2,14,98,79,152,32,35,108,48,64,242,36,249,130,2, +55,75,6,212,224,72,200,51,128,114,108,28,100,128,0,0,0,0,0,0,0,12,110,127, +48,98,115,249,201,117,243,249,195,21,159,206,38,47,63,156,86,8,75,144,94, +82,1,38,73,79,208,67,95,233,1,6,128,14,79,129,186,40,249,18,149,182,207, +144,200,155,188,248,204,105,184,207,142,199,137,175,201,0,159,72,10,5,21, +221,10,120,74,129,124,36,98,232,228,74,81,62,160,20,10,107,186,21,114,32, +105,137,194,70,46,142,68,165,19,235,1,64,170,187,161,119,34,66,146,36,104, +137,194,70,46,142,68,165,19,236,1,64,174,187,161,95,37,134,204,23,225,35, +23,71,34,82,137,246,128,160,89,93,208,167,147,195,201,194,70,46,142,68,165, +19,238,1,64,182,187,161,71,105,20,19,177,139,163,145,41,68,16,7,6,15,82,70, +72,115,96,32,106,27,128,0,0,0,0,91,60,165,195,201,194,8,134,149,216,162,0, +192,41,225,8,2,48,177,36,1,149,13,196,15,0,200,209,97,199,128,99,32,176, +195,192,113,57,143,0,167,133,32,230,80,28,202,139,175,238,2,48,189,192,20, +1,119,80,87,193,186,129,89,56,72,197,209,200,193,185,35,23,71,109,13,219, +36,98,232,237,156,13,26,208,211,14,102,19,87,137,91,95,128,0,10,96,24,92,0, +0,83,2,53,56,0,0,165,3,28,204,160,160,226,100,226,200,211,76,241,240,0,1, +102,8,22,75,64,137,73,20,230,105,133,7,19,39,22,70,154,103,143,128,0,11,48, +20,28,76,156,113,75,34,78,62,0,0,45,3,103,31,0,0,22,65,44,57,137,62,33,179, +216,162,152,192,131,18,124,162,27,61,138,41,108,32,196,159,16,217,232,235, +81,76,104,73,137,62,81,13,158,142,181,20,184,16,98,79,136,108,244,244,168, +166,56,36,196,159,40,134,207,79,74,138,93,10,49,39,194,173,192,158,158,149, +20,188,20,98,79,133,91,129,61,109,74,41,124,30,68,159,16,217,236,83,108,96, +68,137,62,81,13,158,197,54,182,17,34,79,136,108,244,117,169,182,52,38,68, +159,40,134,207,71,90,155,92,8,145,39,196,54,122,122,84,219,28,19,34,79,148, +67,103,167,165,77,174,133,72,147,225,86,224,79,79,74,155,94,10,145,39,194, +173,192,158,182,165,54,190,206,25,212,35,208,226,100,150,211,201,29,162,44, +140,35,103,0,255,192,0,0,0,0,0,0,206,25,228,35,208,226,100,150,211,201,29, +162,44,140,35,103,0,255,192,0,0,0,0,0,0,206,25,244,35,208,226,100,150,211, +201,29,162,44,140,35,103,0,255,192,0,0,0,0,0,0,206,26,4,35,208,226,100,150, +211,201,29,162,44,140,35,103,1,0,0,0,0,0,0,0,0,206,26,20,35,208,226,100, +150,211,201,29,162,44,140,35,103,1,0,0,0,0,0,0,0,0,206,26,36,35,208,226, +100,150,211,201,29,162,44,140,35,103,1,0,64,0,0,0,0,0,0,206,26,52,35,208, +226,100,150,211,201,29,162,44,140,35,103,1,0,64,0,0,0,0,0,0,206,26,68,35, +208,226,100,150,211,201,29,162,44,140,35,103,1,0,64,0,0,0,0,0,0,206,26,84, +35,208,226,100,150,211,201,29,162,44,140,35,103,1,0,128,0,0,0,0,0,0,195, +154,99,16,38,36,0,251,68,117,179,216,162,128,68,72,1,241,13,158,197,20,150, +25,18,0,125,162,58,217,232,235,117,100,162,136,25,18,0,125,162,58,217,232, +235,116,36,162,145,2,226,64,15,136,108,244,117,186,178,81,73,129,113,32,7, +196,54,122,58,221,9,40,165,64,200,144,3,237,17,214,207,79,75,171,37,20,80, +200,144,3,237,17,214,207,79,75,161,37,20,138,23,18,0,124,67,103,167,165, +213,146,138,77,11,137,0,62,33,179,211,210,232,73,69,42,133,196,128,31,10, +183,2,125,89,40,163,5,196,128,31,10,183,2,125,9,40,164,96,200,144,3,224, +221,64,172,157,89,40,163,134,68,128,31,6,234,5,100,232,73,69,35,133,68,128, +31,104,142,182,125,89,40,180,0,168,144,3,237,17,214,207,161,37,22,144,19, +18,0,124,67,103,213,146,139,80,9,137,0,62,33,179,232,73,69,172,5,90,40,153, +59,68,117,179,216,166,192,77,162,137,147,136,108,246,41,180,176,219,69,19, +39,104,142,182,122,58,221,89,41,178,6,218,40,153,59,68,117,179,209,214,232, +73,77,162,6,90,40,153,56,134,207,71,91,171,37,54,152,25,104,162,100,226,27, +61,29,110,132,148,218,160,109,162,137,147,180,71,91,61,61,46,172,148,217, +67,109,20,76,157,162,58,217,233,233,116,36,166,209,67,45,20,76,156,67,103, +167,165,213,146,155,77,12,180,81,50,113,13,158,158,151,66,74,109,84,50,209, +68,201,194,173,192,159,86,74,108,193,150,138,38,78,21,110,4,250,18,83,104, +193,182,138,38,78,13,212,10,201,213,146,155,56,109,162,137,147,131,117,2, +178,116,36,166,209,194,237,20,76,157,162,58,217,245,100,167,16,2,237,20,76, +157,162,58,217,244,36,167,18,2,173,20,76,156,67,103,213,146,156,80,10,180, +81,50,113,13,159,66,74,113,97,175,221,48,216,110,64,4,42,22,189,179,0,196, +133,0,185,80,32,28,78,99,193,18,80,36,4,19,159,141,172,0,178,90,4,74,73,0, +22,209,68,201,187,129,4,2,8,3,132,64,60,36,4,0,91,240,168,177,69,118,144, +157,91,116,116,32,32,1,53,216,221,218,170,139,3,234,219,165,0,255,152,185, +11,251,232,231,188,47,86,227,105,18,1,255,184,170,59,41,92,23,240,110,173, +198,209,208,36,3,253,188,183,177,82,110,80,224,93,122,32,32,4,144,253,170, +34,22,140,7,236,161,25,232,237,105,64,63,230,160,158,102,127,59,205,11,217, +66,51,210,128,127,237,65,60,204,254,119,155,171,197,34,168,48,6,90,194,1,0, +39,75,88,72,8,9,33,186,194,80,64,76,13,214,19,2,130,96,110,150,189,0,65,6, +51,214,20,128,65,17,11,214,19,130,137,121,211,210,211,144,6,39,75,88,80,0, +201,119,235,10,8,41,86,231,71,88,80,129,79,135,186,122,133,224,34,25,69, +234,80,3,91,141,172,40,96,139,113,180,181,133,36,21,110,54,142,134,176,165, +1,176,23,213,47,0,216,134,234,215,128,111,117,181,232,128,209,3,70,230,107, +64,5,139,168,209,235,10,32,36,144,102,235,136,3,146,27,172,40,160,146,132, +103,172,40,192,115,3,117,133,28,22,113,163,69,172,41,103,1,66,188,17,145, +52,168,4,202,113,67,76,130,227,76,194,13,240,108,0,0,83,224,0,2,193,0,104, +146,84,97,48,0,1,94,192,56,169,24,145,179,192,0,5,112,8,56,16,32,128,56,18, +52,125,230,86,147,190,140,28,50,21,13,39,31,23,60,145,158,57,12,141,47,129, +6,155,194,188,24,49,39,199,89,188,124,92,242,70,120,224,201,33,69,15,155, +163,201,68,14,49,39,199,197,211,116,240,242,113,197,232,18,180,254,36,3,17, +46,18,243,35,100,128,172,156,178,70,163,154,76,34,248,146,164,108,248,75, +204,141,146,28,217,115,137,27,95,27,241,173,236,162,160,224,200,2,206,9, +113,13,148,192,209,18,22,164,146,37,193,57,162,4,249,39,196,128,24,2,178, +66,213,136,68,201,16,77,209,131,31,192,242,88,96,92,191,151,34,100,136,38, +232,255,252,92,221,199,197,12,68,209,82,66,212,11,155,185,41,197,13,55,38, +3,66,213,47,135,254,72,12,162,99,133,116,112,0,1,72,66,14,16,16,50,37,202, +160,150,154,66,14,20,8,57,192,28,24,80,113,50,113,100,105,166,120,248,0,0, +179,1,65,196,201,199,20,178,36,227,224,0,2,208,54,113,240,0,1,100,11,181, +192,0,5,178,1,18,160,65,24,131,20,145,25,188,48,132,122,28,76,146,218,121, +35,180,69,145,132,108,224,31,248,0,0,0,0,0,0,25,188,56,132,122,28,76,146, +218,121,35,180,69,145,132,108,224,31,248,0,0,0,0,0,0,40,160,45,110,23,30, +176,33,184,0,0,183,32,29,235,2,27,199,23,0,0,23,4,51,120,129,8,244,56,153, +37,180,242,71,104,139,35,8,217,192,63,240,0,0,0,0,0,0,51,120,145,8,244,56, +153,37,180,242,71,104,139,35,8,217,192,64,0,0,0,0,0,0,0,51,120,161,8,244, +56,153,37,180,242,71,104,139,35,8,217,192,64,0,0,0,0,0,0,0,51,120,177,8, +244,56,153,37,180,242,71,104,139,35,8,217,192,64,16,0,0,0,0,0,0,51,120,193, +8,244,56,153,37,180,242,71,104,139,35,8,217,192,64,16,0,0,0,0,0,0,51,120, +209,8,244,56,153,37,180,242,71,104,139,35,8,217,192,64,16,0,0,0,0,0,0,51, +120,225,8,244,56,153,37,180,242,71,104,139,35,8,217,192,64,32,0,0,0,0,0,0, +32,227,194,0,97,57,162,4,246,104,5,34,92,35,68,225,161,166,220,16,16,137, +112,52,41,73,29,185,1,65,196,201,197,145,166,153,246,72,3,137,204,120,34, +74,8,199,1,67,17,162,112,201,84,128,97,144,78,25,42,16,131,169,1,205,66,8, +35,68,225,161,166,239,128,0,10,192,64,196,104,156,50,96,0,2,172,73,240,117, +96,57,170,97,4,104,156,52,52,221,240,0,1,82,1,74,9,129,125,240,0,1,82,32, +148,25,174,137,58,23,51,190,0,0,42,69,64,195,32,156,50,96,0,2,160,81,238,2, +3,107,173,218,3,192, +}; +#elif defined(DUK_USE_DOUBLE_ME) +DUK_INTERNAL const duk_uint8_t duk_builtins_data[4281] = { +144,148,105,226,32,68,52,228,254,12,104,202,37,132,52,167,194,138,105,245, +124,57,28,211,57,18,64,52,239,126,44,138,111,175,241,164,19,87,145,30,33, +167,22,145,159,8,211,139,9,225,42,5,240,145,139,163,163,8,211,139,10,228, +64,211,19,132,140,93,29,56,70,156,88,119,34,66,146,36,104,137,194,70,46, +142,172,35,78,44,47,146,195,102,11,240,145,139,163,175,8,211,139,9,228,240, +242,112,145,139,163,179,8,211,139,8,237,34,130,118,49,116,118,225,26,48,0, +1,98,29,201,158,46,183,39,135,147,132,140,93,16,132,76,66,33,8,66,16,132, +33,8,66,26,180,105,97,167,68,150,34,33,154,112,0,1,91,247,35,79,111,237, +198,174,232,47,31,23,95,17,13,31,249,96,211,49,50,53,214,77,141,24,0,0,181, +10,228,240,242,15,128,140,65,128,134,188,0,0,90,167,97,181,224,0,2,213,62, +53,224,0,2,213,66,237,120,0,0,181,81,204,107,192,0,5,170,150,67,94,0,0,45, +84,245,90,240,0,1,106,169,162,215,128,0,11,85,93,150,188,0,0,90,171,111,53, +109,22,162,26,48,0,1,84,23,201,146,243,225,26,39,12,145,136,104,192,0,5,61, +11,228,201,121,240,100,19,134,72,196,33,195,14,40,203,112,64,190,76,232, +145,153,136,0,0,31,15,224,0,0,0,25,152,0,0,30,15,224,0,0,0,25,120,144,13, +96,155,194,56,80,206,36,67,141,20,228,70,57,81,206,100,131,156,39,132,168, +23,194,70,46,137,208,21,200,129,166,39,9,24,186,39,72,119,34,66,146,36,104, +137,194,70,46,137,212,23,201,97,179,5,248,72,197,209,58,194,121,60,60,156, +36,98,232,157,129,29,164,80,78,198,46,137,218,146,121,25,71,146,9,209,5, +209,61,48,126,14,138,152,30,67,186,23,143,139,175,131,202,135,228,72,85, +144,83,60,179,30,94,209,233,102,30,98,105,230,103,30,114,121,231,104,30, +122,137,231,233,30,130,153,232,106,30,138,169,232,235,30,144,67,193,25,19, +136,108,207,30,41,224,140,137,194,173,192,153,228,5,242,100,188,248,70,137, +195,36,79,78,47,147,37,231,193,144,78,25,34,122,145,111,36,74,232,176,13, +17,61,234,226,93,207,148,160,84,75,141,7,27,161,32,33,18,225,80,212,76,154, +2,2,70,65,56,100,237,34,140,209,2,67,32,156,50,118,145,64,186,230,61,205, +35,103,155,32,36,141,19,134,78,210,40,206,16,36,70,137,195,39,105,20,11, +174,99,220,210,54,121,210,1,137,33,1,228,207,16,17,70,146,66,3,201,164,32, +0,65,112,152,56,196,159,31,23,77,211,195,201,199,23,160,72,214,246,81,6,12, +73,241,214,111,31,23,60,145,158,56,50,72,81,67,230,232,242,80,19,49,39,199, +89,188,124,92,242,70,120,227,64,194,75,154,72,12,9,73,6,111,21,120,12,40, +144,19,39,25,0,225,144,168,105,56,248,185,228,140,241,200,96,64,100,42,26, +78,62,46,121,35,52,18,92,116,1,36,64,47,158,64,49,98,66,100,156,242,65,23, +196,149,35,103,194,94,100,108,144,230,203,156,64,66,37,201,16,11,32,249, +132,4,34,92,44,93,146,55,152,72,24,137,112,151,153,27,36,5,100,229,144,8, +162,98,92,210,5,76,73,241,214,111,31,23,60,145,158,57,44,48,46,92,185,164, +160,72,151,41,0,50,107,179,244,59,36,93,127,92,6,19,172,3,11,216,0,56,224, +151,29,102,241,241,115,201,25,227,164,64,106,37,199,197,211,116,240,242, +113,197,233,144,40,248,185,228,140,241,196,75,132,109,24,72,128,43,39,84, +129,13,173,161,144,168,105,56,98,78,100,142,214,215,69,1,13,173,161,144, +168,105,57,34,78,100,142,214,215,69,16,67,107,105,110,114,168,254,24,147, +153,35,181,181,212,32,67,107,105,110,114,168,254,72,147,153,35,181,181,212, +36,65,130,3,144,8,26,252,200,13,30,85,16,16,64,90,242,231,192,64,161,163, +203,31,26,172,193,17,4,23,105,159,96,27,172,251,16,32,196,4,14,137,112,17, +136,48,164,28,134,80,215,202,1,132,130,8,12,39,52,64,155,31,24,56,36,1,189, +207,132,0,35,233,35,195,62,3,196,149,36,100,72,160,2,200,232,44,227,0,11, +37,160,68,142,128,36,157,25,200,32,26,79,90,4,73,43,192,122,54,71,65,103, +44,248,14,134,140,151,227,138,231,208,45,96,148,248,134,140,151,227,138, +231,240,1,255,254,10,74,146,56,128,104,4,147,152,72,6,144,28,174,143,8,1, +30,1,165,3,96,31,0,211,3,21,11,153,35,0,211,131,68,131,160,137,16,250,5, +196,131,160,137,200,160,199,156,67,248,0,255,255,65,140,10,48,177,115,56, +35,130,60,19,134,79,89,240,52,177,115,56,39,12,156,123,144,217,251,15,135, +34,167,30,20,170,154,255,232,12,47,244,0,97,28,17,224,39,238,32,40,71,4, +120,39,12,156,4,253,228,5,137,195,39,30,228,54,124,4,253,228,128,194,115, +68,9,252,15,128,232,104,201,126,56,191,35,64,90,193,41,241,13,25,47,199,23, +228,105,3,86,225,1,100,224,156,199,130,36,249,144,10,192,76,71,250,16,15, +18,61,96,17,62,200,3,72,128,136,143,247,32,22,75,64,137,248,64,22,79,90,39, +249,64,38,84,12,167,20,52,223,196,2,230,238,45,214,36,120,32,72,158,208,4, +102,238,45,194,2,201,197,186,196,143,4,9,19,218,0,92,221,202,61,228,143,4, +9,19,218,8,35,55,113,110,16,22,78,81,239,36,120,32,72,158,208,64,73,197,12, +255,0,13,18,60,128,159,212,128,169,76,17,156,185,100,76,255,163,64,65,26, +57,114,200,153,255,70,144,33,13,18,232,50,75,226,104,6,149,3,41,199,246, +130,12,128,28,142,156,120,203,175,158,8,194,207,1,6,81,20,79,88,11,237,84, +11,161,32,127,255,247,191,255,255,255,255,137,235,16,221,170,129,116,36,0, +0,0,0,0,16,0,0,12,196,0,0,15,135,240,0,0,0,2,61,123,164,137,162,164,218,67, +74,134,162,120,128,0,1,224,254,0,0,0,0,71,173,33,129,52,84,155,72,105,80, +212,79,16,0,0,60,63,192,0,0,0,3,244,143,146,22,230,192,0,0,176,60,0,0,0,0, +33,214,2,251,82,1,73,180,134,204,134,36,96,127,255,159,161,255,255,255,255, +144,235,16,221,169,0,164,218,67,102,67,18,48,63,255,207,240,255,255,255, +255,196,60,17,145,56,134,204,241,226,158,8,200,156,42,220,9,158,65,196,34, +92,42,26,137,147,120,64,74,37,196,54,100,49,35,188,36,5,68,184,208,113,187, +194,80,212,75,146,1,73,196,54,100,49,35,188,38,57,37,56,240,0,0,0,0,0,0,0, +0,32,235,248,68,48,156,2,24,94,24,0,243,119,10,139,144,123,242,3,102,238, +18,239,115,72,217,160,11,223,16,23,55,113,241,32,145,36,57,188,18,16,102,3, +5,120,35,34,89,32,15,180,152,173,127,0,218,235,88,0,228,180,227,200,0,0, +248,127,0,0,0,0,197,107,240,64,6,77,220,24,38,78,74,113,67,77,130,4,12,155, +185,52,48,156,148,226,134,155,4,10,194,96,129,132,166,238,45,194,2,201,193, +130,100,228,167,20,52,216,32,113,41,187,139,112,128,178,114,104,97,57,41, +197,13,54,8,32,48,216,32,130,195,224,130,19,97,124,134,23,6,0,57,137,62,77, +12,38,12,0,179,18,124,45,22,190,96,128,141,176,134,28,98,79,180,152,139, +218,45,124,193,1,27,97,16,32,196,159,24,230,204,246,194,40,89,137,62,210, +98,103,92,217,158,216,70,7,49,39,193,130,100,182,17,194,140,73,246,147,16, +250,9,146,216,72,6,49,39,193,131,22,194,72,73,137,62,210,98,31,65,139,97, +40,32,196,159,14,234,70,86,194,88,89,137,62,210,98,63,93,72,202,216,76,10, +49,39,198,33,180,153,37,108,38,134,152,147,237,38,38,117,13,164,201,43,97, +56,40,196,159,36,65,57,163,149,176,158,26,98,79,180,152,165,210,9,205,28, +173,133,0,243,18,124,98,22,180,72,130,115,71,43,97,68,72,196,159,105,49,51, +168,90,209,34,9,205,28,173,133,33,19,18,124,154,24,76,185,164,227,138,89, +18,119,0,7,145,39,201,161,132,188,64,124,137,62,49,11,90,36,65,57,163,149, +210,166,37,34,79,180,152,153,212,45,104,145,4,230,142,87,74,160,84,137,62, +72,130,115,71,43,171,234,134,200,147,237,38,41,116,130,115,71,43,171,235,5, +72,147,227,16,218,76,146,186,254,184,108,137,62,210,98,103,80,218,76,146, +186,254,192,68,137,62,29,212,140,174,207,178,23,34,79,180,152,143,215,82, +50,187,62,208,60,137,62,12,19,37,210,182,21,34,79,180,152,135,208,76,151, +74,224,68,137,62,49,205,153,238,175,186,23,34,79,180,152,153,215,54,103, +186,190,240,92,137,62,22,139,95,48,64,70,235,251,225,210,36,251,73,136,189, +162,215,204,16,17,186,255,2,14,98,79,152,32,35,108,48,64,242,36,249,130,2, +55,75,6,212,224,72,200,51,128,114,108,28,100,128,0,0,0,0,0,0,0,12,110,127, +48,98,115,249,201,117,243,249,195,21,159,206,38,47,63,156,86,8,75,144,94, +82,1,38,73,79,208,67,95,233,1,6,128,14,79,129,186,40,249,18,149,182,207, +144,200,155,188,248,204,105,184,207,142,199,137,175,201,0,159,72,10,5,21, +221,10,120,74,129,124,36,98,232,228,74,81,62,160,20,10,107,186,21,114,32, +105,137,194,70,46,142,68,165,19,235,1,64,170,187,161,119,34,66,146,36,104, +137,194,70,46,142,68,165,19,236,1,64,174,187,161,95,37,134,204,23,225,35, +23,71,34,82,137,246,128,160,89,93,208,167,147,195,201,194,70,46,142,68,165, +19,238,1,64,182,187,161,71,105,20,19,177,139,163,145,41,68,16,7,6,15,82,70, +72,115,96,0,27,234,32,0,0,0,0,91,60,165,195,201,194,8,134,149,216,162,0, +192,41,225,8,2,48,177,36,1,149,13,196,15,0,200,209,97,199,128,99,32,176, +195,192,113,57,143,0,167,133,32,230,80,28,202,139,175,238,2,48,189,192,20, +1,119,80,87,193,186,129,89,56,72,197,209,200,193,185,35,23,71,109,13,219, +36,98,232,237,156,13,26,208,211,14,102,19,87,137,91,95,128,0,10,96,24,92,0, +0,83,2,53,56,0,0,165,3,28,204,160,160,226,100,226,200,211,76,241,240,0,1, +102,8,22,75,64,137,73,20,230,105,133,7,19,39,22,70,154,103,143,128,0,11,48, +20,28,76,156,113,75,34,78,62,0,0,45,3,103,31,0,0,22,65,44,57,137,62,33,179, +216,162,152,192,131,18,124,162,27,61,138,41,108,32,196,159,16,217,232,235, +81,76,104,73,137,62,81,13,158,142,181,20,184,16,98,79,136,108,244,244,168, +166,56,36,196,159,40,134,207,79,74,138,93,10,49,39,194,173,192,158,158,149, +20,188,20,98,79,133,91,129,61,109,74,41,124,30,68,159,16,217,236,83,108,96, +68,137,62,81,13,158,197,54,182,17,34,79,136,108,244,117,169,182,52,38,68, +159,40,134,207,71,90,155,92,8,145,39,196,54,122,122,84,219,28,19,34,79,148, +67,103,167,165,77,174,133,72,147,225,86,224,79,79,74,155,94,10,145,39,194, +173,192,158,182,165,54,190,206,25,212,35,208,226,100,150,211,201,29,162,44, +140,35,103,0,0,3,192,252,0,0,0,0,206,25,228,35,208,226,100,150,211,201,29, +162,44,140,35,103,0,0,3,192,252,0,0,0,0,206,25,244,35,208,226,100,150,211, +201,29,162,44,140,35,103,0,0,3,192,252,0,0,0,0,206,26,4,35,208,226,100,150, +211,201,29,162,44,140,35,103,0,0,0,1,0,0,0,0,0,206,26,20,35,208,226,100, +150,211,201,29,162,44,140,35,103,0,0,0,1,0,0,0,0,0,206,26,36,35,208,226, +100,150,211,201,29,162,44,140,35,103,0,0,0,65,0,0,0,0,0,206,26,52,35,208, +226,100,150,211,201,29,162,44,140,35,103,0,0,0,65,0,0,0,0,0,206,26,68,35, +208,226,100,150,211,201,29,162,44,140,35,103,0,0,0,65,0,0,0,0,0,206,26,84, +35,208,226,100,150,211,201,29,162,44,140,35,103,0,0,0,129,0,0,0,0,0,195, +154,99,16,38,36,0,251,68,117,179,216,162,128,68,72,1,241,13,158,197,20,150, +25,18,0,125,162,58,217,232,235,117,100,162,136,25,18,0,125,162,58,217,232, +235,116,36,162,145,2,226,64,15,136,108,244,117,186,178,81,73,129,113,32,7, +196,54,122,58,221,9,40,165,64,200,144,3,237,17,214,207,79,75,171,37,20,80, +200,144,3,237,17,214,207,79,75,161,37,20,138,23,18,0,124,67,103,167,165, +213,146,138,77,11,137,0,62,33,179,211,210,232,73,69,42,133,196,128,31,10, +183,2,125,89,40,163,5,196,128,31,10,183,2,125,9,40,164,96,200,144,3,224, +221,64,172,157,89,40,163,134,68,128,31,6,234,5,100,232,73,69,35,133,68,128, +31,104,142,182,125,89,40,180,0,168,144,3,237,17,214,207,161,37,22,144,19, +18,0,124,67,103,213,146,139,80,9,137,0,62,33,179,232,73,69,172,5,90,40,153, +59,68,117,179,216,166,192,77,162,137,147,136,108,246,41,180,176,219,69,19, +39,104,142,182,122,58,221,89,41,178,6,218,40,153,59,68,117,179,209,214,232, +73,77,162,6,90,40,153,56,134,207,71,91,171,37,54,152,25,104,162,100,226,27, +61,29,110,132,148,218,160,109,162,137,147,180,71,91,61,61,46,172,148,217, +67,109,20,76,157,162,58,217,233,233,116,36,166,209,67,45,20,76,156,67,103, +167,165,213,146,155,77,12,180,81,50,113,13,158,158,151,66,74,109,84,50,209, +68,201,194,173,192,159,86,74,108,193,150,138,38,78,21,110,4,250,18,83,104, +193,182,138,38,78,13,212,10,201,213,146,155,56,109,162,137,147,131,117,2, +178,116,36,166,209,194,237,20,76,157,162,58,217,245,100,167,16,2,237,20,76, +157,162,58,217,244,36,167,18,2,173,20,76,156,67,103,213,146,156,80,10,180, +81,50,113,13,159,66,74,113,97,175,221,48,216,110,64,4,42,22,189,179,0,196, +133,0,185,80,32,28,78,99,193,18,80,36,4,19,159,141,172,0,178,90,4,74,73,0, +22,209,68,201,187,129,4,2,8,3,132,64,60,36,0,171,240,84,6,149,113,72,176, +157,91,116,116,32,88,181,129,32,11,42,218,221,131,234,219,165,1,8,187,152, +255,188,231,235,248,47,86,227,105,18,2,56,175,185,255,244,17,91,40,110,173, +198,209,208,36,7,188,189,179,240,238,82,97,80,93,122,32,125,144,132,160,12, +22,162,42,7,236,161,25,232,237,105,64,158,160,230,63,205,59,127,102,11,217, +66,51,210,129,61,65,236,127,154,118,254,205,171,197,34,168,48,6,90,194,1,0, +39,75,88,72,8,9,33,186,194,80,64,76,13,214,19,2,130,96,110,150,189,0,65,6, +51,214,20,128,65,17,11,214,19,130,137,121,211,210,211,144,6,39,75,88,80,0, +201,119,235,10,8,41,86,231,71,88,80,129,79,135,186,122,133,224,34,25,69, +234,80,3,91,141,172,40,96,139,113,180,181,133,36,21,110,54,142,134,176,165, +1,176,23,213,47,0,216,134,234,215,128,111,117,181,232,128,209,3,70,230,107, +64,5,139,168,209,235,10,32,36,144,102,235,136,3,146,27,172,40,160,146,132, +103,172,40,192,115,3,117,133,28,22,113,163,69,172,41,103,1,66,188,17,145, +52,168,4,202,113,67,76,130,227,76,194,13,240,108,0,0,83,224,0,2,193,0,104, +146,84,97,48,0,1,94,192,56,169,24,145,179,192,0,5,112,8,56,16,32,128,56,18, +52,125,230,86,147,190,140,28,50,21,13,39,31,23,60,145,158,57,12,141,47,129, +6,155,194,188,24,49,39,199,89,188,124,92,242,70,120,224,201,33,69,15,155, +163,201,68,14,49,39,199,197,211,116,240,242,113,197,232,18,180,254,36,3,17, +46,18,243,35,100,128,172,156,178,70,163,154,76,34,248,146,164,108,248,75, +204,141,146,28,217,115,137,27,95,27,241,173,236,162,160,224,200,2,206,9, +113,13,148,192,209,18,22,164,146,37,193,57,162,4,249,39,196,128,24,2,178, +66,213,136,68,201,16,77,209,131,31,192,242,88,96,92,191,151,34,100,136,38, +232,255,252,92,221,199,197,12,68,209,82,66,212,11,155,185,41,197,13,55,38, +3,66,213,47,135,254,72,12,162,99,133,116,112,0,1,72,66,14,16,16,50,37,202, +160,150,154,66,14,20,8,57,192,28,24,80,113,50,113,100,105,166,120,248,0,0, +179,1,65,196,201,199,20,178,36,227,224,0,2,208,54,113,240,0,1,100,11,181, +192,0,5,178,1,18,160,65,24,131,20,145,25,188,48,132,122,28,76,146,218,121, +35,180,69,145,132,108,224,0,0,120,31,128,0,0,0,25,188,56,132,122,28,76,146, +218,121,35,180,69,145,132,108,224,0,0,120,31,128,0,0,0,40,160,45,110,23,30, +176,33,184,0,0,183,32,29,235,2,27,199,23,0,0,23,4,51,120,129,8,244,56,153, +37,180,242,71,104,139,35,8,217,192,0,0,240,63,0,0,0,0,51,120,145,8,244,56, +153,37,180,242,71,104,139,35,8,217,192,0,0,0,64,0,0,0,0,51,120,161,8,244, +56,153,37,180,242,71,104,139,35,8,217,192,0,0,0,64,0,0,0,0,51,120,177,8, +244,56,153,37,180,242,71,104,139,35,8,217,192,0,0,16,64,0,0,0,0,51,120,193, +8,244,56,153,37,180,242,71,104,139,35,8,217,192,0,0,16,64,0,0,0,0,51,120, +209,8,244,56,153,37,180,242,71,104,139,35,8,217,192,0,0,16,64,0,0,0,0,51, +120,225,8,244,56,153,37,180,242,71,104,139,35,8,217,192,0,0,32,64,0,0,0,0, +32,227,194,0,97,57,162,4,246,104,5,34,92,35,68,225,161,166,220,16,16,137, +112,52,41,73,29,185,1,65,196,201,197,145,166,153,246,72,3,137,204,120,34, +74,8,199,1,67,17,162,112,201,84,128,97,144,78,25,42,16,131,169,1,205,66,8, +35,68,225,161,166,239,128,0,10,192,64,196,104,156,50,96,0,2,172,73,240,117, +96,57,170,97,4,104,156,52,52,221,240,0,1,82,1,74,9,129,125,240,0,1,82,32, +148,25,174,137,58,23,51,190,0,0,42,69,64,195,32,156,50,96,0,2,160,81,238,2, +3,107,173,218,3,192, +}; +#else +#error invalid endianness defines +#endif +#endif /* DUK_USE_ROM_OBJECTS */ + +/* automatic undefs */ +#undef DUK__REFCINIT +#line 1 "duk_error_macros.c" +/* + * Error and fatal handling. + */ + +/* #include duk_internal.h -> already included */ + +#define DUK__ERRFMT_BUFSIZE 256 /* size for formatting buffers */ + +#if defined(DUK_USE_VERBOSE_ERRORS) + +DUK_INTERNAL DUK_COLD void duk_err_handle_error_fmt(duk_hthread *thr, + const char *filename, + duk_uint_t line_and_code, + const char *fmt, + ...) { + va_list ap; + char msg[DUK__ERRFMT_BUFSIZE]; + va_start(ap, fmt); + (void) DUK_VSNPRINTF(msg, sizeof(msg), fmt, ap); + msg[sizeof(msg) - 1] = (char) 0; + duk_err_create_and_throw(thr, + (duk_errcode_t) (line_and_code >> 24), + msg, + filename, + (duk_int_t) (line_and_code & 0x00ffffffL)); + va_end(ap); /* dead code, but ensures portability (see Linux man page notes) */ +} + +DUK_INTERNAL DUK_COLD void duk_err_handle_error(duk_hthread *thr, const char *filename, duk_uint_t line_and_code, const char *msg) { + duk_err_create_and_throw(thr, + (duk_errcode_t) (line_and_code >> 24), + msg, + filename, + (duk_int_t) (line_and_code & 0x00ffffffL)); +} + +#else /* DUK_USE_VERBOSE_ERRORS */ + +DUK_INTERNAL DUK_COLD void duk_err_handle_error(duk_hthread *thr, duk_errcode_t code) { + duk_err_create_and_throw(thr, code); +} + +#endif /* DUK_USE_VERBOSE_ERRORS */ + +/* + * Error throwing helpers + */ + +#if defined(DUK_USE_VERBOSE_ERRORS) +#if defined(DUK_USE_PARANOID_ERRORS) +DUK_INTERNAL DUK_COLD void duk_err_require_type_index(duk_hthread *thr, + const char *filename, + duk_int_t linenumber, + duk_idx_t idx, + const char *expect_name) { + DUK_ERROR_RAW_FMT3(thr, + filename, + linenumber, + DUK_ERR_TYPE_ERROR, + "%s required, found %s (stack index %ld)", + expect_name, + duk_get_type_name(thr, idx), + (long) idx); +} +#else +DUK_INTERNAL DUK_COLD void duk_err_require_type_index(duk_hthread *thr, + const char *filename, + duk_int_t linenumber, + duk_idx_t idx, + const char *expect_name) { + DUK_ERROR_RAW_FMT3(thr, + filename, + linenumber, + DUK_ERR_TYPE_ERROR, + "%s required, found %s (stack index %ld)", + expect_name, + duk_push_string_readable(thr, idx), + (long) idx); +} +#endif +DUK_INTERNAL DUK_COLD void duk_err_error_internal(duk_hthread *thr, const char *filename, duk_int_t linenumber) { + DUK_ERROR_RAW(thr, filename, linenumber, DUK_ERR_ERROR, DUK_STR_INTERNAL_ERROR); +} +DUK_INTERNAL DUK_COLD void duk_err_error_alloc_failed(duk_hthread *thr, const char *filename, duk_int_t linenumber) { + DUK_ERROR_RAW(thr, filename, linenumber, DUK_ERR_ERROR, DUK_STR_ALLOC_FAILED); +} +DUK_INTERNAL DUK_COLD void duk_err_error(duk_hthread *thr, const char *filename, duk_int_t linenumber, const char *message) { + DUK_ERROR_RAW(thr, filename, linenumber, DUK_ERR_ERROR, message); +} +DUK_INTERNAL DUK_COLD void duk_err_range(duk_hthread *thr, const char *filename, duk_int_t linenumber, const char *message) { + DUK_ERROR_RAW(thr, filename, linenumber, DUK_ERR_RANGE_ERROR, message); +} +DUK_INTERNAL DUK_COLD void duk_err_range_index(duk_hthread *thr, const char *filename, duk_int_t linenumber, duk_idx_t idx) { + DUK_ERROR_RAW_FMT1(thr, filename, linenumber, DUK_ERR_RANGE_ERROR, "invalid stack index %ld", (long) (idx)); +} +DUK_INTERNAL DUK_COLD void duk_err_range_push_beyond(duk_hthread *thr, const char *filename, duk_int_t linenumber) { + DUK_ERROR_RAW(thr, filename, linenumber, DUK_ERR_RANGE_ERROR, DUK_STR_PUSH_BEYOND_ALLOC_STACK); +} +DUK_INTERNAL DUK_COLD void duk_err_type_invalid_args(duk_hthread *thr, const char *filename, duk_int_t linenumber) { + DUK_ERROR_RAW(thr, filename, linenumber, DUK_ERR_TYPE_ERROR, DUK_STR_INVALID_ARGS); +} +DUK_INTERNAL DUK_COLD void duk_err_type_invalid_state(duk_hthread *thr, const char *filename, duk_int_t linenumber) { + DUK_ERROR_RAW(thr, filename, linenumber, DUK_ERR_TYPE_ERROR, DUK_STR_INVALID_STATE); +} +DUK_INTERNAL DUK_COLD void duk_err_type_invalid_trap_result(duk_hthread *thr, const char *filename, duk_int_t linenumber) { + DUK_ERROR_RAW(thr, filename, linenumber, DUK_ERR_TYPE_ERROR, DUK_STR_INVALID_TRAP_RESULT); +} +#else +/* The file/line arguments are NULL and 0, they're ignored by DUK_ERROR_RAW() + * when non-verbose errors are used. + */ + +DUK_NORETURN(DUK_LOCAL_DECL void duk__err_shared(duk_hthread *thr, duk_errcode_t code)); +DUK_LOCAL void duk__err_shared(duk_hthread *thr, duk_errcode_t code) { + DUK_ERROR_RAW(thr, NULL, 0, code, NULL); +} +DUK_INTERNAL DUK_COLD void duk_err_error(duk_hthread *thr) { + duk__err_shared(thr, DUK_ERR_ERROR); +} +DUK_INTERNAL DUK_COLD void duk_err_range(duk_hthread *thr) { + duk__err_shared(thr, DUK_ERR_RANGE_ERROR); +} +DUK_INTERNAL DUK_COLD void duk_err_eval(duk_hthread *thr) { + duk__err_shared(thr, DUK_ERR_EVAL_ERROR); +} +DUK_INTERNAL DUK_COLD void duk_err_reference(duk_hthread *thr) { + duk__err_shared(thr, DUK_ERR_REFERENCE_ERROR); +} +DUK_INTERNAL DUK_COLD void duk_err_syntax(duk_hthread *thr) { + duk__err_shared(thr, DUK_ERR_SYNTAX_ERROR); +} +DUK_INTERNAL DUK_COLD void duk_err_type(duk_hthread *thr) { + duk__err_shared(thr, DUK_ERR_TYPE_ERROR); +} +DUK_INTERNAL DUK_COLD void duk_err_uri(duk_hthread *thr) { + duk__err_shared(thr, DUK_ERR_URI_ERROR); +} +#endif + +/* + * Default fatal error handler + */ + +DUK_INTERNAL DUK_COLD void duk_default_fatal_handler(void *udata, const char *msg) { + DUK_UNREF(udata); + DUK_UNREF(msg); + + msg = msg ? msg : "NULL"; + +#if defined(DUK_USE_FATAL_HANDLER) + /* duk_config.h provided a custom default fatal handler. */ + DUK_D(DUK_DPRINT("custom default fatal error handler called: %s", msg)); + DUK_USE_FATAL_HANDLER(udata, msg); +#elif defined(DUK_USE_CPP_EXCEPTIONS) + /* With C++ use a duk_fatal_exception which user code can catch in + * a natural way. + */ + DUK_D(DUK_DPRINT("built-in default C++ fatal error handler called: %s", msg)); + throw duk_fatal_exception(msg); +#else + /* Default behavior is to abort() on error. There's no printout + * which makes this awkward, so it's always recommended to use an + * explicit fatal error handler. + * + * ==================================================================== + * NOTE: If you are seeing this, you are most likely dealing with an + * uncaught error. You should provide a fatal error handler in Duktape + * heap creation, and should consider using a protected call as your + * first call into an empty Duktape context to properly handle errors. + * See: + * - http://duktape.org/guide.html#error-handling + * - http://wiki.duktape.org/HowtoFatalErrors.html + * - http://duktape.org/api.html#taglist-protected + * ==================================================================== + */ + DUK_D(DUK_DPRINT("built-in default fatal error handler called: %s", msg)); + DUK_ABORT(); +#endif + + DUK_D(DUK_DPRINT("fatal error handler returned, enter forever loop")); + for (;;) { + /* Loop forever to ensure we don't return. */ + } +} + +/* automatic undefs */ +#undef DUK__ERRFMT_BUFSIZE +#line 1 "duk_unicode_support.c" +/* + * Various Unicode help functions for character classification predicates, + * case conversion, decoding, etc. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Fast path tables + */ + +#if defined(DUK_USE_IDCHAR_FASTPATH) +DUK_INTERNAL const duk_int8_t duk_is_idchar_tab[128] = { + /* 0: not IdentifierStart or IdentifierPart + * 1: IdentifierStart and IdentifierPart + * -1: IdentifierPart only + */ + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x00...0x0f */ + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x10...0x1f */ + 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0x20...0x2f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 0, 0, 0, 0, 0, 0, /* 0x30...0x3f */ + 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, /* 0x40...0x4f */ + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1, /* 0x50...0x5f */ + 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, /* 0x60...0x6f */ + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0 /* 0x70...0x7f */ +}; +#endif + +/* + * XUTF-8 and CESU-8 encoding/decoding + */ + +DUK_INTERNAL duk_small_int_t duk_unicode_get_xutf8_length(duk_ucodepoint_t cp) { + duk_uint_fast32_t x = (duk_uint_fast32_t) cp; + if (x < 0x80UL) { + /* 7 bits */ + return 1; + } else if (x < 0x800UL) { + /* 11 bits */ + return 2; + } else if (x < 0x10000UL) { + /* 16 bits */ + return 3; + } else if (x < 0x200000UL) { + /* 21 bits */ + return 4; + } else if (x < 0x4000000UL) { + /* 26 bits */ + return 5; + } else if (x < (duk_ucodepoint_t) 0x80000000UL) { + /* 31 bits */ + return 6; + } else { + /* 36 bits */ + return 7; + } +} + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL duk_small_int_t duk_unicode_get_cesu8_length(duk_ucodepoint_t cp) { + duk_uint_fast32_t x = (duk_uint_fast32_t) cp; + if (x < 0x80UL) { + /* 7 bits */ + return 1; + } else if (x < 0x800UL) { + /* 11 bits */ + return 2; + } else if (x < 0x10000UL) { + /* 16 bits */ + return 3; + } else { + /* Encoded as surrogate pair, each encoding to 3 bytes for + * 6 bytes total. Codepoints above U+10FFFF encode as 6 bytes + * too, see duk_unicode_encode_cesu8(). + */ + return 3 + 3; + } +} +#endif /* DUK_USE_ASSERTIONS */ + +DUK_INTERNAL const duk_uint8_t duk_unicode_xutf8_markers[7] = { 0x00, 0xc0, 0xe0, 0xf0, 0xf8, 0xfc, 0xfe }; + +/* Encode to extended UTF-8; 'out' must have space for at least + * DUK_UNICODE_MAX_XUTF8_LENGTH bytes. Allows encoding of any + * 32-bit (unsigned) codepoint. + */ +DUK_INTERNAL duk_small_int_t duk_unicode_encode_xutf8(duk_ucodepoint_t cp, duk_uint8_t *out) { + duk_uint_fast32_t x = (duk_uint_fast32_t) cp; + duk_small_int_t len; + duk_uint8_t marker; + duk_small_int_t i; + + len = duk_unicode_get_xutf8_length(cp); + DUK_ASSERT(len > 0); + + marker = duk_unicode_xutf8_markers[len - 1]; /* 64-bit OK because always >= 0 */ + + i = len; + DUK_ASSERT(i > 0); + do { + i--; + if (i > 0) { + out[i] = (duk_uint8_t) (0x80 + (x & 0x3f)); + x >>= 6; + } else { + /* Note: masking of 'x' is not necessary because of + * range check and shifting -> no bits overlapping + * the marker should be set. + */ + out[0] = (duk_uint8_t) (marker + x); + } + } while (i > 0); + + return len; +} + +/* Encode to CESU-8; 'out' must have space for at least + * DUK_UNICODE_MAX_CESU8_LENGTH bytes; codepoints above U+10FFFF + * will encode to garbage but won't overwrite the output buffer. + */ +DUK_INTERNAL duk_small_int_t duk_unicode_encode_cesu8(duk_ucodepoint_t cp, duk_uint8_t *out) { + duk_uint_fast32_t x = (duk_uint_fast32_t) cp; + duk_small_int_t len; + + if (x < 0x80UL) { + out[0] = (duk_uint8_t) x; + len = 1; + } else if (x < 0x800UL) { + out[0] = (duk_uint8_t) (0xc0 + ((x >> 6) & 0x1f)); + out[1] = (duk_uint8_t) (0x80 + (x & 0x3f)); + len = 2; + } else if (x < 0x10000UL) { + /* surrogate pairs get encoded here */ + out[0] = (duk_uint8_t) (0xe0 + ((x >> 12) & 0x0f)); + out[1] = (duk_uint8_t) (0x80 + ((x >> 6) & 0x3f)); + out[2] = (duk_uint8_t) (0x80 + (x & 0x3f)); + len = 3; + } else { + /* + * Unicode codepoints above U+FFFF are encoded as surrogate + * pairs here. This ensures that all CESU-8 codepoints are + * 16-bit values as expected in ECMAScript. The surrogate + * pairs always get a 3-byte encoding (each) in CESU-8. + * See: http://en.wikipedia.org/wiki/Surrogate_pair + * + * 20-bit codepoint, 10 bits (A and B) per surrogate pair: + * + * x = 0b00000000 0000AAAA AAAAAABB BBBBBBBB + * sp1 = 0b110110AA AAAAAAAA (0xd800 + ((x >> 10) & 0x3ff)) + * sp2 = 0b110111BB BBBBBBBB (0xdc00 + (x & 0x3ff)) + * + * Encoded into CESU-8: + * + * sp1 -> 0b11101101 (0xe0 + ((sp1 >> 12) & 0x0f)) + * -> 0b1010AAAA (0x80 + ((sp1 >> 6) & 0x3f)) + * -> 0b10AAAAAA (0x80 + (sp1 & 0x3f)) + * sp2 -> 0b11101101 (0xe0 + ((sp2 >> 12) & 0x0f)) + * -> 0b1011BBBB (0x80 + ((sp2 >> 6) & 0x3f)) + * -> 0b10BBBBBB (0x80 + (sp2 & 0x3f)) + * + * Note that 0x10000 must be subtracted first. The code below + * avoids the sp1, sp2 temporaries which saves around 20 bytes + * of code. + */ + + x -= 0x10000UL; + + out[0] = (duk_uint8_t) (0xed); + out[1] = (duk_uint8_t) (0xa0 + ((x >> 16) & 0x0f)); + out[2] = (duk_uint8_t) (0x80 + ((x >> 10) & 0x3f)); + out[3] = (duk_uint8_t) (0xed); + out[4] = (duk_uint8_t) (0xb0 + ((x >> 6) & 0x0f)); + out[5] = (duk_uint8_t) (0x80 + (x & 0x3f)); + len = 6; + } + + return len; +} + +/* Decode helper. Return zero on error. */ +DUK_INTERNAL duk_small_int_t duk_unicode_decode_xutf8(duk_hthread *thr, + const duk_uint8_t **ptr, + const duk_uint8_t *ptr_start, + const duk_uint8_t *ptr_end, + duk_ucodepoint_t *out_cp) { + const duk_uint8_t *p; + duk_uint32_t res; + duk_uint_fast8_t ch; + duk_small_int_t n; + + DUK_UNREF(thr); + + p = *ptr; + if (p < ptr_start || p >= ptr_end) { + goto fail; + } + + /* + * UTF-8 decoder which accepts longer than standard byte sequences. + * This allows full 32-bit code points to be used. + */ + + ch = (duk_uint_fast8_t) (*p++); + if (ch < 0x80) { + /* 0xxx xxxx [7 bits] */ + res = (duk_uint32_t) (ch & 0x7f); + n = 0; + } else if (ch < 0xc0) { + /* 10xx xxxx -> invalid */ + goto fail; + } else if (ch < 0xe0) { + /* 110x xxxx 10xx xxxx [11 bits] */ + res = (duk_uint32_t) (ch & 0x1f); + n = 1; + } else if (ch < 0xf0) { + /* 1110 xxxx 10xx xxxx 10xx xxxx [16 bits] */ + res = (duk_uint32_t) (ch & 0x0f); + n = 2; + } else if (ch < 0xf8) { + /* 1111 0xxx 10xx xxxx 10xx xxxx 10xx xxxx [21 bits] */ + res = (duk_uint32_t) (ch & 0x07); + n = 3; + } else if (ch < 0xfc) { + /* 1111 10xx 10xx xxxx 10xx xxxx 10xx xxxx 10xx xxxx [26 bits] */ + res = (duk_uint32_t) (ch & 0x03); + n = 4; + } else if (ch < 0xfe) { + /* 1111 110x 10xx xxxx 10xx xxxx 10xx xxxx 10xx xxxx 10xx xxxx [31 bits] */ + res = (duk_uint32_t) (ch & 0x01); + n = 5; + } else if (ch < 0xff) { + /* 1111 1110 10xx xxxx 10xx xxxx 10xx xxxx 10xx xxxx 10xx xxxx 10xx xxxx [36 bits] */ + res = (duk_uint32_t) (0); + n = 6; + } else { + /* 8-byte format could be: + * 1111 1111 10xx xxxx 10xx xxxx 10xx xxxx 10xx xxxx 10xx xxxx 10xx xxxx 10xx xxxx [41 bits] + * + * However, this format would not have a zero bit following the + * leading one bits and would not allow 0xFF to be used as an + * "invalid xutf-8" marker for internal keys. Further, 8-byte + * encodings (up to 41 bit code points) are not currently needed. + */ + goto fail; + } + + DUK_ASSERT(p >= ptr_start); /* verified at beginning */ + if (p + n > ptr_end) { + /* check pointer at end */ + goto fail; + } + + while (n > 0) { + DUK_ASSERT(p >= ptr_start && p < ptr_end); + ch = (duk_uint_fast8_t) (*p++); +#if 0 + if (ch & 0xc0 != 0x80) { + /* not a continuation byte */ + p--; + *ptr = p; + *out_cp = DUK_UNICODE_CP_REPLACEMENT_CHARACTER; + return 1; + } +#endif + res = (res << 6) + (duk_uint32_t) (ch & 0x3f); + n--; + } + + *ptr = p; + *out_cp = res; + return 1; + +fail: + return 0; +} + +/* used by e.g. duk_regexp_executor.c, string built-ins */ +DUK_INTERNAL duk_ucodepoint_t duk_unicode_decode_xutf8_checked(duk_hthread *thr, + const duk_uint8_t **ptr, + const duk_uint8_t *ptr_start, + const duk_uint8_t *ptr_end) { + duk_ucodepoint_t cp; + + if (duk_unicode_decode_xutf8(thr, ptr, ptr_start, ptr_end, &cp)) { + return cp; + } + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return 0;); +} + +/* Compute (extended) utf-8 length without codepoint encoding validation, + * used for string interning. + * + * NOTE: This algorithm is performance critical, more so than string hashing + * in some cases. It is needed when interning a string and needs to scan + * every byte of the string with no skipping. Having an ASCII fast path + * is useful if possible in the algorithm. The current algorithms were + * chosen from several variants, based on x64 gcc -O2 testing. See: + * https://github.com/svaarala/duktape/pull/422 + * + * NOTE: must match tools/dukutil.py:duk_unicode_unvalidated_utf8_length(). + */ + +#if defined(DUK_USE_PREFER_SIZE) +/* Small variant; roughly 150 bytes smaller than the fast variant. */ +DUK_INTERNAL duk_size_t duk_unicode_unvalidated_utf8_length(const duk_uint8_t *data, duk_size_t blen) { + const duk_uint8_t *p; + const duk_uint8_t *p_end; + duk_size_t ncont; + duk_size_t clen; + + p = data; + p_end = data + blen; + ncont = 0; + while (p != p_end) { + duk_uint8_t x; + x = *p++; + if (DUK_UNLIKELY(x >= 0x80 && x <= 0xbf)) { + ncont++; + } + } + + DUK_ASSERT(ncont <= blen); + clen = blen - ncont; + DUK_ASSERT(clen <= blen); + return clen; +} +#else /* DUK_USE_PREFER_SIZE */ +/* This seems like a good overall approach. Fast path for ASCII in 4 byte + * blocks. + */ +DUK_INTERNAL duk_size_t duk_unicode_unvalidated_utf8_length(const duk_uint8_t *data, duk_size_t blen) { + const duk_uint8_t *p; + const duk_uint8_t *p_end; + const duk_uint32_t *p32_end; + const duk_uint32_t *p32; + duk_size_t ncont; + duk_size_t clen; + + ncont = 0; /* number of continuation (non-initial) bytes in [0x80,0xbf] */ + p = data; + p_end = data + blen; + if (blen < 16) { + goto skip_fastpath; + } + + /* Align 'p' to 4; the input data may have arbitrary alignment. + * End of string check not needed because blen >= 16. + */ + while (((duk_size_t) (const void *) p) & 0x03U) { + duk_uint8_t x; + x = *p++; + if (DUK_UNLIKELY(x >= 0x80 && x <= 0xbf)) { + ncont++; + } + } + + /* Full, aligned 4-byte reads. */ + p32_end = (const duk_uint32_t *) (const void *) (p + ((duk_size_t) (p_end - p) & (duk_size_t) (~0x03))); + p32 = (const duk_uint32_t *) (const void *) p; + while (p32 != (const duk_uint32_t *) p32_end) { + duk_uint32_t x; + x = *p32++; + if (DUK_LIKELY((x & 0x80808080UL) == 0)) { + ; /* ASCII fast path */ + } else { + /* Flip highest bit of each byte which changes + * the bit pattern 10xxxxxx into 00xxxxxx which + * allows an easy bit mask test. + */ + x ^= 0x80808080UL; + if (DUK_UNLIKELY(!(x & 0xc0000000UL))) { + ncont++; + } + if (DUK_UNLIKELY(!(x & 0x00c00000UL))) { + ncont++; + } + if (DUK_UNLIKELY(!(x & 0x0000c000UL))) { + ncont++; + } + if (DUK_UNLIKELY(!(x & 0x000000c0UL))) { + ncont++; + } + } + } + p = (const duk_uint8_t *) p32; + /* Fall through to handle the rest. */ + +skip_fastpath: + while (p != p_end) { + duk_uint8_t x; + x = *p++; + if (DUK_UNLIKELY(x >= 0x80 && x <= 0xbf)) { + ncont++; + } + } + + DUK_ASSERT(ncont <= blen); + clen = blen - ncont; + DUK_ASSERT(clen <= blen); + return clen; +} +#endif /* DUK_USE_PREFER_SIZE */ + +/* Check whether a string is UTF-8 compatible or not. */ +DUK_INTERNAL duk_bool_t duk_unicode_is_utf8_compatible(const duk_uint8_t *buf, duk_size_t len) { + duk_size_t i = 0; +#if !defined(DUK_USE_PREFER_SIZE) + duk_size_t len_safe; +#endif + + /* Many practical strings are ASCII only, so use a fast path check + * to check chunks of bytes at once with minimal branch cost. + */ +#if !defined(DUK_USE_PREFER_SIZE) + len_safe = len & ~0x03UL; + for (; i < len_safe; i += 4) { + duk_uint8_t t = buf[i] | buf[i + 1] | buf[i + 2] | buf[i + 3]; + if (DUK_UNLIKELY((t & 0x80U) != 0U)) { + /* At least one byte was outside 0x00-0x7f, break + * out to slow path (and remain there). + * + * XXX: We could also deal with the problem character + * and resume fast path later. + */ + break; + } + } +#endif + + for (; i < len;) { + duk_uint8_t t; + duk_size_t left; + duk_size_t ncont; + duk_uint32_t cp; + duk_uint32_t mincp; + + t = buf[i++]; + if (DUK_LIKELY((t & 0x80U) == 0U)) { + /* Fast path, ASCII. */ + continue; + } + + /* Non-ASCII start byte, slow path. + * + * 10xx xxxx -> continuation byte + * 110x xxxx + 1*CONT -> [0x80, 0x7ff] + * 1110 xxxx + 2*CONT -> [0x800, 0xffff], must reject [0xd800,0xdfff] + * 1111 0xxx + 3*CONT -> [0x10000, 0x10ffff] + */ + left = len - i; + if (t <= 0xdfU) { /* 1101 1111 = 0xdf */ + if (t <= 0xbfU) { /* 1011 1111 = 0xbf */ + return 0; + } + ncont = 1; + mincp = 0x80UL; + cp = t & 0x1fU; + } else if (t <= 0xefU) { /* 1110 1111 = 0xef */ + ncont = 2; + mincp = 0x800UL; + cp = t & 0x0fU; + } else if (t <= 0xf7U) { /* 1111 0111 = 0xf7 */ + ncont = 3; + mincp = 0x10000UL; + cp = t & 0x07U; + } else { + return 0; + } + if (left < ncont) { + return 0; + } + while (ncont > 0U) { + t = buf[i++]; + if ((t & 0xc0U) != 0x80U) { /* 10xx xxxx */ + return 0; + } + cp = (cp << 6) + (t & 0x3fU); + ncont--; + } + if (cp < mincp || cp > 0x10ffffUL || (cp >= 0xd800UL && cp <= 0xdfffUL)) { + return 0; + } + } + + return 1; +} + +/* + * Unicode range matcher + * + * Matches a codepoint against a packed bitstream of character ranges. + * Used for slow path Unicode matching. + */ + +/* Must match tools/extract_chars.py, generate_match_table3(). */ +DUK_LOCAL duk_uint32_t duk__uni_decode_value(duk_bitdecoder_ctx *bd_ctx) { + duk_uint32_t t; + + t = (duk_uint32_t) duk_bd_decode(bd_ctx, 4); + if (t <= 0x0eU) { + return t; + } + t = (duk_uint32_t) duk_bd_decode(bd_ctx, 8); + if (t <= 0xfdU) { + return t + 0x0f; + } + if (t == 0xfeU) { + t = (duk_uint32_t) duk_bd_decode(bd_ctx, 12); + return t + 0x0fU + 0xfeU; + } else { + t = (duk_uint32_t) duk_bd_decode(bd_ctx, 24); + return t + 0x0fU + 0xfeU + 0x1000UL; + } +} + +DUK_LOCAL duk_small_int_t duk__uni_range_match(const duk_uint8_t *unitab, duk_size_t unilen, duk_codepoint_t cp) { + duk_bitdecoder_ctx bd_ctx; + duk_codepoint_t prev_re; + + duk_memzero(&bd_ctx, sizeof(bd_ctx)); + bd_ctx.data = (const duk_uint8_t *) unitab; + bd_ctx.length = (duk_size_t) unilen; + + prev_re = 0; + for (;;) { + duk_codepoint_t r1, r2; + r1 = (duk_codepoint_t) duk__uni_decode_value(&bd_ctx); + if (r1 == 0) { + break; + } + r2 = (duk_codepoint_t) duk__uni_decode_value(&bd_ctx); + + r1 = prev_re + r1; + r2 = r1 + r2; + prev_re = r2; + + /* [r1,r2] is the range */ + + DUK_DDD(DUK_DDDPRINT("duk__uni_range_match: cp=%06lx range=[0x%06lx,0x%06lx]", + (unsigned long) cp, + (unsigned long) r1, + (unsigned long) r2)); + if (cp >= r1 && cp <= r2) { + return 1; + } + } + + return 0; +} + +/* + * "WhiteSpace" production check. + */ + +DUK_INTERNAL duk_small_int_t duk_unicode_is_whitespace(duk_codepoint_t cp) { + /* + * E5 Section 7.2 specifies six characters specifically as + * white space: + * + * 0009;;Cc;0;S;;;;;N;CHARACTER TABULATION;;;; + * 000B;;Cc;0;S;;;;;N;LINE TABULATION;;;; + * 000C;;Cc;0;WS;;;;;N;FORM FEED (FF);;;; + * 0020;SPACE;Zs;0;WS;;;;;N;;;;; + * 00A0;NO-BREAK SPACE;Zs;0;CS; 0020;;;;N;NON-BREAKING SPACE;;;; + * FEFF;ZERO WIDTH NO-BREAK SPACE;Cf;0;BN;;;;;N;BYTE ORDER MARK;;;; + * + * It also specifies any Unicode category 'Zs' characters as white + * space. These can be extracted with the "tools/extract_chars.py" script. + * Current result: + * + * RAW OUTPUT: + * =========== + * 0020;SPACE;Zs;0;WS;;;;;N;;;;; + * 00A0;NO-BREAK SPACE;Zs;0;CS; 0020;;;;N;NON-BREAKING SPACE;;;; + * 1680;OGHAM SPACE MARK;Zs;0;WS;;;;;N;;;;; + * 180E;MONGOLIAN VOWEL SEPARATOR;Zs;0;WS;;;;;N;;;;; + * 2000;EN QUAD;Zs;0;WS;2002;;;;N;;;;; + * 2001;EM QUAD;Zs;0;WS;2003;;;;N;;;;; + * 2002;EN SPACE;Zs;0;WS; 0020;;;;N;;;;; + * 2003;EM SPACE;Zs;0;WS; 0020;;;;N;;;;; + * 2004;THREE-PER-EM SPACE;Zs;0;WS; 0020;;;;N;;;;; + * 2005;FOUR-PER-EM SPACE;Zs;0;WS; 0020;;;;N;;;;; + * 2006;SIX-PER-EM SPACE;Zs;0;WS; 0020;;;;N;;;;; + * 2007;FIGURE SPACE;Zs;0;WS; 0020;;;;N;;;;; + * 2008;PUNCTUATION SPACE;Zs;0;WS; 0020;;;;N;;;;; + * 2009;THIN SPACE;Zs;0;WS; 0020;;;;N;;;;; + * 200A;HAIR SPACE;Zs;0;WS; 0020;;;;N;;;;; + * 202F;NARROW NO-BREAK SPACE;Zs;0;CS; 0020;;;;N;;;;; + * 205F;MEDIUM MATHEMATICAL SPACE;Zs;0;WS; 0020;;;;N;;;;; + * 3000;IDEOGRAPHIC SPACE;Zs;0;WS; 0020;;;;N;;;;; + * + * RANGES: + * ======= + * 0x0020 + * 0x00a0 + * 0x1680 + * 0x180e + * 0x2000 ... 0x200a + * 0x202f + * 0x205f + * 0x3000 + * + * A manual decoder (below) is probably most compact for this. + */ + + duk_uint_fast8_t lo; + duk_uint_fast32_t hi; + + /* cp == -1 (EOF) never matches and causes return value 0 */ + + lo = (duk_uint_fast8_t) (cp & 0xff); + hi = (duk_uint_fast32_t) (cp >> 8); /* does not fit into an uchar */ + + if (hi == 0x0000UL) { + if (lo == 0x09U || lo == 0x0bU || lo == 0x0cU || lo == 0x20U || lo == 0xa0U) { + return 1; + } + } else if (hi == 0x0020UL) { + if (lo <= 0x0aU || lo == 0x2fU || lo == 0x5fU) { + return 1; + } + } else if (cp == 0x1680L || cp == 0x180eL || cp == 0x3000L || cp == 0xfeffL) { + return 1; + } + + return 0; +} + +/* + * "LineTerminator" production check. + */ + +DUK_INTERNAL duk_small_int_t duk_unicode_is_line_terminator(duk_codepoint_t cp) { + /* + * E5 Section 7.3 + * + * A LineTerminatorSequence essentially merges sequences + * into a single line terminator. This must be handled by the caller. + */ + + if (cp == 0x000aL || cp == 0x000dL || cp == 0x2028L || cp == 0x2029L) { + return 1; + } + + return 0; +} + +/* + * "IdentifierStart" production check. + */ + +DUK_INTERNAL duk_small_int_t duk_unicode_is_identifier_start(duk_codepoint_t cp) { + /* + * E5 Section 7.6: + * + * IdentifierStart: + * UnicodeLetter + * $ + * _ + * \ UnicodeEscapeSequence + * + * IdentifierStart production has one multi-character production: + * + * \ UnicodeEscapeSequence + * + * The '\' character is -not- matched by this function. Rather, the caller + * should decode the escape and then call this function to check whether the + * decoded character is acceptable (see discussion in E5 Section 7.6). + * + * The "UnicodeLetter" alternative of the production allows letters + * from various Unicode categories. These can be extracted with the + * "tools/extract_chars.py" script. + * + * Because the result has hundreds of Unicode codepoint ranges, matching + * for any values >= 0x80 are done using a very slow range-by-range scan + * and a packed range format. + * + * The ASCII portion (codepoints 0x00 ... 0x7f) is fast-pathed below because + * it matters the most. The ASCII related ranges of IdentifierStart are: + * + * 0x0041 ... 0x005a ['A' ... 'Z'] + * 0x0061 ... 0x007a ['a' ... 'z'] + * 0x0024 ['$'] + * 0x005f ['_'] + */ + + /* ASCII (and EOF) fast path -- quick accept and reject */ + if (cp <= 0x7fL) { +#if defined(DUK_USE_IDCHAR_FASTPATH) + return (cp >= 0) && (duk_is_idchar_tab[cp] > 0); +#else + if ((cp >= 'a' && cp <= 'z') || (cp >= 'A' && cp <= 'Z') || cp == '_' || cp == '$') { + return 1; + } + return 0; +#endif + } + + /* Non-ASCII slow path (range-by-range linear comparison), very slow */ + +#if defined(DUK_USE_SOURCE_NONBMP) + if (duk__uni_range_match(duk_unicode_ids_noa, (duk_size_t) sizeof(duk_unicode_ids_noa), (duk_codepoint_t) cp)) { + return 1; + } + return 0; +#else + if (cp < 0x10000L) { + if (duk__uni_range_match(duk_unicode_ids_noabmp, sizeof(duk_unicode_ids_noabmp), (duk_codepoint_t) cp)) { + return 1; + } + return 0; + } else { + /* without explicit non-BMP support, assume non-BMP characters + * are always accepted as identifier characters. + */ + return 1; + } +#endif +} + +/* + * "IdentifierPart" production check. + */ + +DUK_INTERNAL duk_small_int_t duk_unicode_is_identifier_part(duk_codepoint_t cp) { + /* + * E5 Section 7.6: + * + * IdentifierPart: + * IdentifierStart + * UnicodeCombiningMark + * UnicodeDigit + * UnicodeConnectorPunctuation + * [U+200C] + * [U+200D] + * + * IdentifierPart production has one multi-character production + * as part of its IdentifierStart alternative. The '\' character + * of an escape sequence is not matched here, see discussion in + * duk_unicode_is_identifier_start(). + * + * To match non-ASCII characters (codepoints >= 0x80), a very slow + * linear range-by-range scan is used. The codepoint is first compared + * to the IdentifierStart ranges, and if it doesn't match, then to a + * set consisting of code points in IdentifierPart but not in + * IdentifierStart. This is done to keep the unicode range data small, + * at the expense of speed. + * + * The ASCII fast path consists of: + * + * 0x0030 ... 0x0039 ['0' ... '9', UnicodeDigit] + * 0x0041 ... 0x005a ['A' ... 'Z', IdentifierStart] + * 0x0061 ... 0x007a ['a' ... 'z', IdentifierStart] + * 0x0024 ['$', IdentifierStart] + * 0x005f ['_', IdentifierStart and + * UnicodeConnectorPunctuation] + * + * UnicodeCombiningMark has no code points <= 0x7f. + * + * The matching code reuses the "identifier start" tables, and then + * consults a separate range set for characters in "identifier part" + * but not in "identifier start". These can be extracted with the + * "tools/extract_chars.py" script. + * + * UnicodeCombiningMark -> categories Mn, Mc + * UnicodeDigit -> categories Nd + * UnicodeConnectorPunctuation -> categories Pc + */ + + /* ASCII (and EOF) fast path -- quick accept and reject */ + if (cp <= 0x7fL) { +#if defined(DUK_USE_IDCHAR_FASTPATH) + return (cp >= 0) && (duk_is_idchar_tab[cp] != 0); +#else + if ((cp >= 'a' && cp <= 'z') || (cp >= 'A' && cp <= 'Z') || (cp >= '0' && cp <= '9') || cp == '_' || cp == '$') { + return 1; + } + return 0; +#endif + } + + /* Non-ASCII slow path (range-by-range linear comparison), very slow */ + +#if defined(DUK_USE_SOURCE_NONBMP) + if (duk__uni_range_match(duk_unicode_ids_noa, sizeof(duk_unicode_ids_noa), (duk_codepoint_t) cp) || + duk__uni_range_match(duk_unicode_idp_m_ids_noa, sizeof(duk_unicode_idp_m_ids_noa), (duk_codepoint_t) cp)) { + return 1; + } + return 0; +#else + if (cp < 0x10000L) { + if (duk__uni_range_match(duk_unicode_ids_noabmp, sizeof(duk_unicode_ids_noabmp), (duk_codepoint_t) cp) || + duk__uni_range_match(duk_unicode_idp_m_ids_noabmp, + sizeof(duk_unicode_idp_m_ids_noabmp), + (duk_codepoint_t) cp)) { + return 1; + } + return 0; + } else { + /* without explicit non-BMP support, assume non-BMP characters + * are always accepted as identifier characters. + */ + return 1; + } +#endif +} + +/* + * Unicode letter check. + */ + +DUK_INTERNAL duk_small_int_t duk_unicode_is_letter(duk_codepoint_t cp) { + /* + * Unicode letter is now taken to be the categories: + * + * Lu, Ll, Lt, Lm, Lo + * + * (Not sure if this is exactly correct.) + * + * The ASCII fast path consists of: + * + * 0x0041 ... 0x005a ['A' ... 'Z'] + * 0x0061 ... 0x007a ['a' ... 'z'] + */ + + /* ASCII (and EOF) fast path -- quick accept and reject */ + if (cp <= 0x7fL) { + if ((cp >= 'a' && cp <= 'z') || (cp >= 'A' && cp <= 'Z')) { + return 1; + } + return 0; + } + + /* Non-ASCII slow path (range-by-range linear comparison), very slow */ + +#if defined(DUK_USE_SOURCE_NONBMP) + if (duk__uni_range_match(duk_unicode_ids_noa, sizeof(duk_unicode_ids_noa), (duk_codepoint_t) cp) && + !duk__uni_range_match(duk_unicode_ids_m_let_noa, sizeof(duk_unicode_ids_m_let_noa), (duk_codepoint_t) cp)) { + return 1; + } + return 0; +#else + if (cp < 0x10000L) { + if (duk__uni_range_match(duk_unicode_ids_noabmp, sizeof(duk_unicode_ids_noabmp), (duk_codepoint_t) cp) && + !duk__uni_range_match(duk_unicode_ids_m_let_noabmp, + sizeof(duk_unicode_ids_m_let_noabmp), + (duk_codepoint_t) cp)) { + return 1; + } + return 0; + } else { + /* without explicit non-BMP support, assume non-BMP characters + * are always accepted as letters. + */ + return 1; + } +#endif +} + +/* + * Complex case conversion helper which decodes a bit-packed conversion + * control stream generated by tools/extract_caseconv.py. The conversion + * is very slow because it runs through the conversion data in a linear + * fashion to save space (which is why ASCII characters have a special + * fast path before arriving here). + * + * The particular bit counts etc have been determined experimentally to + * be small but still sufficient, and must match the Python script + * (tools/extract_caseconv.py). + * + * The return value is the case converted codepoint or -1 if the conversion + * results in multiple characters (this is useful for regexp Canonicalization + * operation). If 'buf' is not NULL, the result codepoint(s) are also + * appended to the hbuffer. + * + * Context and locale specific rules must be checked before consulting + * this function. + */ + +DUK_LOCAL +duk_codepoint_t duk__slow_case_conversion(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_codepoint_t cp, duk_bitdecoder_ctx *bd_ctx) { + duk_small_int_t skip = 0; + duk_small_int_t n; + duk_small_int_t t; + duk_small_int_t count; + duk_codepoint_t tmp_cp; + duk_codepoint_t start_i; + duk_codepoint_t start_o; + + DUK_ASSERT(bd_ctx != NULL); + DUK_UNREF(thr); + + DUK_DDD(DUK_DDDPRINT("slow case conversion for codepoint: %ld", (long) cp)); + + /* range conversion with a "skip" */ + DUK_DDD(DUK_DDDPRINT("checking ranges")); + for (;;) { + skip++; + n = (duk_small_int_t) duk_bd_decode(bd_ctx, 6); + if (n == 0x3f) { + /* end marker */ + break; + } + DUK_DDD(DUK_DDDPRINT("skip=%ld, n=%ld", (long) skip, (long) n)); + + while (n--) { + start_i = (duk_codepoint_t) duk_bd_decode(bd_ctx, 16); + start_o = (duk_codepoint_t) duk_bd_decode(bd_ctx, 16); + count = (duk_small_int_t) duk_bd_decode(bd_ctx, 7); + DUK_DDD(DUK_DDDPRINT("range: start_i=%ld, start_o=%ld, count=%ld, skip=%ld", + (long) start_i, + (long) start_o, + (long) count, + (long) skip)); + + if (cp >= start_i) { + tmp_cp = cp - start_i; /* always >= 0 */ + if (tmp_cp < (duk_codepoint_t) count * (duk_codepoint_t) skip && + (tmp_cp % (duk_codepoint_t) skip) == 0) { + DUK_DDD(DUK_DDDPRINT("range matches input codepoint")); + cp = start_o + tmp_cp; + goto single; + } + } + } + } + + /* 1:1 conversion */ + n = (duk_small_int_t) duk_bd_decode(bd_ctx, 7); + DUK_DDD(DUK_DDDPRINT("checking 1:1 conversions (count %ld)", (long) n)); + while (n--) { + start_i = (duk_codepoint_t) duk_bd_decode(bd_ctx, 16); + start_o = (duk_codepoint_t) duk_bd_decode(bd_ctx, 16); + DUK_DDD(DUK_DDDPRINT("1:1 conversion %ld -> %ld", (long) start_i, (long) start_o)); + if (cp == start_i) { + DUK_DDD(DUK_DDDPRINT("1:1 matches input codepoint")); + cp = start_o; + goto single; + } + } + + /* complex, multicharacter conversion */ + n = (duk_small_int_t) duk_bd_decode(bd_ctx, 7); + DUK_DDD(DUK_DDDPRINT("checking 1:n conversions (count %ld)", (long) n)); + while (n--) { + start_i = (duk_codepoint_t) duk_bd_decode(bd_ctx, 16); + t = (duk_small_int_t) duk_bd_decode(bd_ctx, 2); + DUK_DDD(DUK_DDDPRINT("1:n conversion %ld -> %ld chars", (long) start_i, (long) t)); + if (cp == start_i) { + DUK_DDD(DUK_DDDPRINT("1:n matches input codepoint")); + if (bw != NULL) { + while (t--) { + tmp_cp = (duk_codepoint_t) duk_bd_decode(bd_ctx, 16); + DUK_BW_WRITE_RAW_XUTF8(thr, bw, (duk_ucodepoint_t) tmp_cp); + } + } + return -1; + } else { + while (t--) { + (void) duk_bd_decode(bd_ctx, 16); + } + } + } + + /* default: no change */ + DUK_DDD(DUK_DDDPRINT("no rule matches, output is same as input")); + /* fall through */ + +single: + if (bw != NULL) { + DUK_BW_WRITE_RAW_XUTF8(thr, bw, (duk_ucodepoint_t) cp); + } + return cp; +} + +/* + * Case conversion helper, with context/local sensitivity. + * For proper case conversion, one needs to know the character + * and the preceding and following characters, as well as + * locale/language. + */ + +/* XXX: add 'language' argument when locale/language sensitive rule + * support added. + */ +DUK_LOCAL +duk_codepoint_t duk__case_transform_helper(duk_hthread *thr, + duk_bufwriter_ctx *bw, + duk_codepoint_t cp, + duk_codepoint_t prev, + duk_codepoint_t next, + duk_bool_t uppercase) { + duk_bitdecoder_ctx bd_ctx; + + /* fast path for ASCII */ + if (cp < 0x80L) { + /* XXX: there are language sensitive rules for the ASCII range. + * If/when language/locale support is implemented, they need to + * be implemented here for the fast path. There are no context + * sensitive rules for ASCII range. + */ + + if (uppercase) { + if (cp >= 'a' && cp <= 'z') { + cp = cp - 'a' + 'A'; + } + } else { + if (cp >= 'A' && cp <= 'Z') { + cp = cp - 'A' + 'a'; + } + } + + if (bw != NULL) { + DUK_BW_WRITE_RAW_U8(thr, bw, (duk_uint8_t) cp); + } + return cp; + } + + /* context and locale specific rules which cannot currently be represented + * in the caseconv bitstream: hardcoded rules in C + */ + if (uppercase) { + /* XXX: turkish / azeri */ + } else { + /* + * Final sigma context specific rule. This is a rather tricky + * rule and this handling is probably not 100% correct now. + * The rule is not locale/language specific so it is supported. + */ + + if (cp == 0x03a3L && /* U+03A3 = GREEK CAPITAL LETTER SIGMA */ + duk_unicode_is_letter(prev) && /* prev exists and is not a letter */ + !duk_unicode_is_letter(next)) { /* next does not exist or next is not a letter */ + /* Capital sigma occurred at "end of word", lowercase to + * U+03C2 = GREEK SMALL LETTER FINAL SIGMA. Otherwise + * fall through and let the normal rules lowercase it to + * U+03C3 = GREEK SMALL LETTER SIGMA. + */ + cp = 0x03c2L; + goto singlechar; + } + + /* XXX: lithuanian not implemented */ + /* XXX: lithuanian, explicit dot rules */ + /* XXX: turkish / azeri, lowercase rules */ + } + + /* 1:1 or special conversions, but not locale/context specific: script generated rules */ + duk_memzero(&bd_ctx, sizeof(bd_ctx)); + if (uppercase) { + bd_ctx.data = (const duk_uint8_t *) duk_unicode_caseconv_uc; + bd_ctx.length = (duk_size_t) sizeof(duk_unicode_caseconv_uc); + } else { + bd_ctx.data = (const duk_uint8_t *) duk_unicode_caseconv_lc; + bd_ctx.length = (duk_size_t) sizeof(duk_unicode_caseconv_lc); + } + return duk__slow_case_conversion(thr, bw, cp, &bd_ctx); + +singlechar: + if (bw != NULL) { + DUK_BW_WRITE_RAW_XUTF8(thr, bw, (duk_ucodepoint_t) cp); + } + return cp; + + /* unused now, not needed until Turkish/Azeri */ +#if 0 + nochar: + return -1; +#endif +} + +/* + * Replace valstack top with case converted version. + */ + +DUK_INTERNAL void duk_unicode_case_convert_string(duk_hthread *thr, duk_bool_t uppercase) { + duk_hstring *h_input; + duk_bufwriter_ctx bw_alloc; + duk_bufwriter_ctx *bw; + const duk_uint8_t *p, *p_start, *p_end; + duk_codepoint_t prev, curr, next; + + h_input = duk_require_hstring(thr, -1); /* Accept symbols. */ + DUK_ASSERT(h_input != NULL); + + bw = &bw_alloc; + DUK_BW_INIT_PUSHBUF(thr, bw, DUK_HSTRING_GET_BYTELEN(h_input)); + + /* [ ... input buffer ] */ + + p_start = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_input); + p_end = p_start + DUK_HSTRING_GET_BYTELEN(h_input); + p = p_start; + + prev = -1; + DUK_UNREF(prev); + curr = -1; + next = -1; + for (;;) { + prev = curr; + curr = next; + next = -1; + if (p < p_end) { + next = (duk_codepoint_t) duk_unicode_decode_xutf8_checked(thr, &p, p_start, p_end); + } else { + /* end of input and last char has been processed */ + if (curr < 0) { + break; + } + } + + /* on first round, skip */ + if (curr >= 0) { + /* XXX: could add a fast path to process chunks of input codepoints, + * but relative benefit would be quite small. + */ + + /* Ensure space for maximum multi-character result; estimate is overkill. */ + DUK_BW_ENSURE(thr, bw, 8 * DUK_UNICODE_MAX_XUTF8_LENGTH); + + duk__case_transform_helper(thr, bw, (duk_codepoint_t) curr, prev, next, uppercase); + } + } + + DUK_BW_COMPACT(thr, bw); + (void) duk_buffer_to_string(thr, -1); /* Safe, output is encoded. */ + /* invalidates h_buf pointer */ + duk_remove_m2(thr); +} + +#if defined(DUK_USE_REGEXP_SUPPORT) + +/* + * Canonicalize() abstract operation needed for canonicalization of individual + * codepoints during regexp compilation and execution, see E5 Section 15.10.2.8. + * Note that codepoints are canonicalized one character at a time, so no context + * specific rules can apply. Locale specific rules can apply, though. + */ + +DUK_INTERNAL duk_codepoint_t duk_unicode_re_canonicalize_char(duk_hthread *thr, duk_codepoint_t cp) { +#if defined(DUK_USE_REGEXP_CANON_WORKAROUND) + /* Fast canonicalization lookup at the cost of 128kB footprint. */ + DUK_ASSERT(cp >= 0); + DUK_UNREF(thr); + if (DUK_LIKELY(cp < 0x10000L)) { + return (duk_codepoint_t) duk_unicode_re_canon_lookup[cp]; + } + return cp; +#else /* DUK_USE_REGEXP_CANON_WORKAROUND */ + duk_codepoint_t y; + + y = duk__case_transform_helper(thr, + NULL, /* NULL is allowed, no output */ + cp, /* curr char */ + -1, /* prev char */ + -1, /* next char */ + 1); /* uppercase */ + + if ((y < 0) || (cp >= 0x80 && y < 0x80)) { + /* multiple codepoint conversion or non-ASCII mapped to ASCII + * --> leave as is. + */ + return cp; + } + + return y; +#endif /* DUK_USE_REGEXP_CANON_WORKAROUND */ +} + +/* + * E5 Section 15.10.2.6 "IsWordChar" abstract operation. Assume + * x < 0 for characters read outside the string. + */ + +DUK_INTERNAL duk_small_int_t duk_unicode_re_is_wordchar(duk_codepoint_t x) { + /* + * Note: the description in E5 Section 15.10.2.6 has a typo, it + * contains 'A' twice and lacks 'a'; the intent is [0-9a-zA-Z_]. + */ + if ((x >= '0' && x <= '9') || (x >= 'a' && x <= 'z') || (x >= 'A' && x <= 'Z') || (x == '_')) { + return 1; + } + return 0; +} + +/* + * Regexp range tables + */ + +/* exposed because lexer needs these too */ +DUK_INTERNAL const duk_uint16_t duk_unicode_re_ranges_digit[2] = { + (duk_uint16_t) 0x0030UL, + (duk_uint16_t) 0x0039UL, +}; +DUK_INTERNAL const duk_uint16_t duk_unicode_re_ranges_white[22] = { + (duk_uint16_t) 0x0009UL, (duk_uint16_t) 0x000DUL, (duk_uint16_t) 0x0020UL, (duk_uint16_t) 0x0020UL, (duk_uint16_t) 0x00A0UL, + (duk_uint16_t) 0x00A0UL, (duk_uint16_t) 0x1680UL, (duk_uint16_t) 0x1680UL, (duk_uint16_t) 0x180EUL, (duk_uint16_t) 0x180EUL, + (duk_uint16_t) 0x2000UL, (duk_uint16_t) 0x200AUL, (duk_uint16_t) 0x2028UL, (duk_uint16_t) 0x2029UL, (duk_uint16_t) 0x202FUL, + (duk_uint16_t) 0x202FUL, (duk_uint16_t) 0x205FUL, (duk_uint16_t) 0x205FUL, (duk_uint16_t) 0x3000UL, (duk_uint16_t) 0x3000UL, + (duk_uint16_t) 0xFEFFUL, (duk_uint16_t) 0xFEFFUL, +}; +DUK_INTERNAL const duk_uint16_t duk_unicode_re_ranges_wordchar[8] = { + (duk_uint16_t) 0x0030UL, (duk_uint16_t) 0x0039UL, (duk_uint16_t) 0x0041UL, (duk_uint16_t) 0x005AUL, + (duk_uint16_t) 0x005FUL, (duk_uint16_t) 0x005FUL, (duk_uint16_t) 0x0061UL, (duk_uint16_t) 0x007AUL, +}; +DUK_INTERNAL const duk_uint16_t duk_unicode_re_ranges_not_digit[4] = { + (duk_uint16_t) 0x0000UL, + (duk_uint16_t) 0x002FUL, + (duk_uint16_t) 0x003AUL, + (duk_uint16_t) 0xFFFFUL, +}; +DUK_INTERNAL const duk_uint16_t duk_unicode_re_ranges_not_white[24] = { + (duk_uint16_t) 0x0000UL, (duk_uint16_t) 0x0008UL, (duk_uint16_t) 0x000EUL, (duk_uint16_t) 0x001FUL, (duk_uint16_t) 0x0021UL, + (duk_uint16_t) 0x009FUL, (duk_uint16_t) 0x00A1UL, (duk_uint16_t) 0x167FUL, (duk_uint16_t) 0x1681UL, (duk_uint16_t) 0x180DUL, + (duk_uint16_t) 0x180FUL, (duk_uint16_t) 0x1FFFUL, (duk_uint16_t) 0x200BUL, (duk_uint16_t) 0x2027UL, (duk_uint16_t) 0x202AUL, + (duk_uint16_t) 0x202EUL, (duk_uint16_t) 0x2030UL, (duk_uint16_t) 0x205EUL, (duk_uint16_t) 0x2060UL, (duk_uint16_t) 0x2FFFUL, + (duk_uint16_t) 0x3001UL, (duk_uint16_t) 0xFEFEUL, (duk_uint16_t) 0xFF00UL, (duk_uint16_t) 0xFFFFUL, +}; +DUK_INTERNAL const duk_uint16_t duk_unicode_re_ranges_not_wordchar[10] = { + (duk_uint16_t) 0x0000UL, (duk_uint16_t) 0x002FUL, (duk_uint16_t) 0x003AUL, (duk_uint16_t) 0x0040UL, (duk_uint16_t) 0x005BUL, + (duk_uint16_t) 0x005EUL, (duk_uint16_t) 0x0060UL, (duk_uint16_t) 0x0060UL, (duk_uint16_t) 0x007BUL, (duk_uint16_t) 0xFFFFUL, +}; + +#endif /* DUK_USE_REGEXP_SUPPORT */ +#line 1 "duk_util_memrw.c" +/* + * Macro support functions for reading/writing raw data. + * + * These are done using memcpy to ensure they're valid even for unaligned + * reads/writes on platforms where alignment counts. On x86 at least gcc + * is able to compile these into a bswap+mov. "Always inline" is used to + * ensure these macros compile to minimal code. + */ + +/* #include duk_internal.h -> already included */ + +union duk__u16_union { + duk_uint8_t b[2]; + duk_uint16_t x; +}; +typedef union duk__u16_union duk__u16_union; + +union duk__u32_union { + duk_uint8_t b[4]; + duk_uint32_t x; +}; +typedef union duk__u32_union duk__u32_union; + +#if defined(DUK_USE_64BIT_OPS) +union duk__u64_union { + duk_uint8_t b[8]; + duk_uint64_t x; +}; +typedef union duk__u64_union duk__u64_union; +#endif + +DUK_INTERNAL DUK_ALWAYS_INLINE duk_uint16_t duk_raw_read_u16_be(const duk_uint8_t *p) { + duk__u16_union u; + duk_memcpy((void *) u.b, (const void *) p, (size_t) 2); + u.x = DUK_NTOH16(u.x); + return u.x; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE duk_uint32_t duk_raw_read_u32_be(const duk_uint8_t *p) { + duk__u32_union u; + duk_memcpy((void *) u.b, (const void *) p, (size_t) 4); + u.x = DUK_NTOH32(u.x); + return u.x; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE duk_float_t duk_raw_read_float_be(const duk_uint8_t *p) { + duk_float_union fu; + duk_memcpy((void *) fu.uc, (const void *) p, (size_t) 4); + duk_fltunion_big_to_host(&fu); + return fu.f; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE duk_double_t duk_raw_read_double_be(const duk_uint8_t *p) { + duk_double_union du; + duk_memcpy((void *) du.uc, (const void *) p, (size_t) 8); + duk_dblunion_big_to_host(&du); + return du.d; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE duk_uint16_t duk_raw_readinc_u16_be(const duk_uint8_t **p) { + duk_uint16_t res = duk_raw_read_u16_be(*p); + *p += 2; + return res; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE duk_uint32_t duk_raw_readinc_u32_be(const duk_uint8_t **p) { + duk_uint32_t res = duk_raw_read_u32_be(*p); + *p += 4; + return res; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE duk_float_t duk_raw_readinc_float_be(const duk_uint8_t **p) { + duk_float_t res = duk_raw_read_float_be(*p); + *p += 4; + return res; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE duk_double_t duk_raw_readinc_double_be(const duk_uint8_t **p) { + duk_double_t res = duk_raw_read_double_be(*p); + *p += 8; + return res; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE void duk_raw_write_u16_be(duk_uint8_t *p, duk_uint16_t val) { + duk__u16_union u; + u.x = DUK_HTON16(val); + duk_memcpy((void *) p, (const void *) u.b, (size_t) 2); +} + +DUK_INTERNAL DUK_ALWAYS_INLINE void duk_raw_write_u32_be(duk_uint8_t *p, duk_uint32_t val) { + duk__u32_union u; + u.x = DUK_HTON32(val); + duk_memcpy((void *) p, (const void *) u.b, (size_t) 4); +} + +DUK_INTERNAL DUK_ALWAYS_INLINE void duk_raw_write_float_be(duk_uint8_t *p, duk_float_t val) { + duk_float_union fu; + fu.f = val; + duk_fltunion_host_to_big(&fu); + duk_memcpy((void *) p, (const void *) fu.uc, (size_t) 4); +} + +DUK_INTERNAL DUK_ALWAYS_INLINE void duk_raw_write_double_be(duk_uint8_t *p, duk_double_t val) { + duk_double_union du; + du.d = val; + duk_dblunion_host_to_big(&du); + duk_memcpy((void *) p, (const void *) du.uc, (size_t) 8); +} + +DUK_INTERNAL duk_small_int_t duk_raw_write_xutf8(duk_uint8_t *p, duk_ucodepoint_t val) { + duk_small_int_t len = duk_unicode_encode_xutf8(val, p); + return len; +} + +DUK_INTERNAL duk_small_int_t duk_raw_write_cesu8(duk_uint8_t *p, duk_ucodepoint_t val) { + duk_small_int_t len = duk_unicode_encode_cesu8(val, p); + return len; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE void duk_raw_writeinc_u16_be(duk_uint8_t **p, duk_uint16_t val) { + duk_raw_write_u16_be(*p, val); + *p += 2; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE void duk_raw_writeinc_u32_be(duk_uint8_t **p, duk_uint32_t val) { + duk_raw_write_u32_be(*p, val); + *p += 4; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE void duk_raw_writeinc_float_be(duk_uint8_t **p, duk_float_t val) { + duk_raw_write_float_be(*p, val); + *p += 4; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE void duk_raw_writeinc_double_be(duk_uint8_t **p, duk_double_t val) { + duk_raw_write_double_be(*p, val); + *p += 8; +} + +DUK_INTERNAL void duk_raw_writeinc_xutf8(duk_uint8_t **p, duk_ucodepoint_t val) { + duk_small_int_t len = duk_unicode_encode_xutf8(val, *p); + *p += len; +} + +DUK_INTERNAL void duk_raw_writeinc_cesu8(duk_uint8_t **p, duk_ucodepoint_t val) { + duk_small_int_t len = duk_unicode_encode_cesu8(val, *p); + *p += len; +} +#line 1 "duk_util_misc.c" +/* + * Misc util stuff. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Lowercase digits for radix values 2 to 36. Also doubles as lowercase + * hex nybble table. + */ + +DUK_INTERNAL const duk_uint8_t duk_lc_digits[36] = { + DUK_ASC_0, DUK_ASC_1, DUK_ASC_2, DUK_ASC_3, DUK_ASC_4, DUK_ASC_5, DUK_ASC_6, DUK_ASC_7, + DUK_ASC_8, DUK_ASC_9, DUK_ASC_LC_A, DUK_ASC_LC_B, DUK_ASC_LC_C, DUK_ASC_LC_D, DUK_ASC_LC_E, DUK_ASC_LC_F, + DUK_ASC_LC_G, DUK_ASC_LC_H, DUK_ASC_LC_I, DUK_ASC_LC_J, DUK_ASC_LC_K, DUK_ASC_LC_L, DUK_ASC_LC_M, DUK_ASC_LC_N, + DUK_ASC_LC_O, DUK_ASC_LC_P, DUK_ASC_LC_Q, DUK_ASC_LC_R, DUK_ASC_LC_S, DUK_ASC_LC_T, DUK_ASC_LC_U, DUK_ASC_LC_V, + DUK_ASC_LC_W, DUK_ASC_LC_X, DUK_ASC_LC_Y, DUK_ASC_LC_Z +}; + +DUK_INTERNAL const duk_uint8_t duk_uc_nybbles[16] = { DUK_ASC_0, DUK_ASC_1, DUK_ASC_2, DUK_ASC_3, + DUK_ASC_4, DUK_ASC_5, DUK_ASC_6, DUK_ASC_7, + DUK_ASC_8, DUK_ASC_9, DUK_ASC_UC_A, DUK_ASC_UC_B, + DUK_ASC_UC_C, DUK_ASC_UC_D, DUK_ASC_UC_E, DUK_ASC_UC_F }; + +/* + * Table for hex decoding ASCII hex digits + */ + +DUK_INTERNAL const duk_int8_t duk_hex_dectab[256] = { + /* -1 if invalid */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x00-0x0f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x10-0x1f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x20-0x2f */ + 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, -1, -1, -1, -1, -1, -1, /* 0x30-0x3f */ + -1, 10, 11, 12, 13, 14, 15, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x40-0x4f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x50-0x5f */ + -1, 10, 11, 12, 13, 14, 15, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x60-0x6f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x70-0x7f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x80-0x8f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x90-0x9f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0xa0-0xaf */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0xb0-0xbf */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0xc0-0xcf */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0xd0-0xdf */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0xe0-0xef */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1 /* 0xf0-0xff */ +}; + +#if defined(DUK_USE_HEX_FASTPATH) +/* Preshifted << 4. Must use 16-bit entry to allow negative value signaling. */ +DUK_INTERNAL const duk_int16_t duk_hex_dectab_shift4[256] = { + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x00-0x0f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x10-0x1f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x20-0x2f */ + 0x00, 0x10, 0x20, 0x30, 0x40, 0x50, 0x60, 0x70, 0x80, 0x90, -1, -1, -1, -1, -1, -1, /* 0x30-0x3f */ + -1, 0xa0, 0xb0, 0xc0, 0xd0, 0xe0, 0xf0, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x40-0x4f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x50-0x5f */ + -1, 0xa0, 0xb0, 0xc0, 0xd0, 0xe0, 0xf0, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x60-0x6f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x70-0x7f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x80-0x8f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0x90-0x9f */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0xa0-0xaf */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0xb0-0xbf */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0xc0-0xcf */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0xd0-0xdf */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, /* 0xe0-0xef */ + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1 /* 0xf0-0xff */ +}; +#endif + +/* + * Table for hex encoding bytes + */ + +#if defined(DUK_USE_HEX_FASTPATH) +/* Lookup to encode one byte directly into 2 characters: + * + * def genhextab(bswap): + * for i in xrange(256): + * t = chr(i).encode('hex') + * if bswap: + * t = t[1] + t[0] + * print('0x' + t.encode('hex') + 'U') + * print('big endian'); genhextab(False) + * print('little endian'); genhextab(True) + */ +DUK_INTERNAL const duk_uint16_t duk_hex_enctab[256] = { +#if defined(DUK_USE_INTEGER_BE) + 0x3030U, 0x3031U, 0x3032U, 0x3033U, 0x3034U, 0x3035U, 0x3036U, 0x3037U, 0x3038U, 0x3039U, 0x3061U, 0x3062U, 0x3063U, + 0x3064U, 0x3065U, 0x3066U, 0x3130U, 0x3131U, 0x3132U, 0x3133U, 0x3134U, 0x3135U, 0x3136U, 0x3137U, 0x3138U, 0x3139U, + 0x3161U, 0x3162U, 0x3163U, 0x3164U, 0x3165U, 0x3166U, 0x3230U, 0x3231U, 0x3232U, 0x3233U, 0x3234U, 0x3235U, 0x3236U, + 0x3237U, 0x3238U, 0x3239U, 0x3261U, 0x3262U, 0x3263U, 0x3264U, 0x3265U, 0x3266U, 0x3330U, 0x3331U, 0x3332U, 0x3333U, + 0x3334U, 0x3335U, 0x3336U, 0x3337U, 0x3338U, 0x3339U, 0x3361U, 0x3362U, 0x3363U, 0x3364U, 0x3365U, 0x3366U, 0x3430U, + 0x3431U, 0x3432U, 0x3433U, 0x3434U, 0x3435U, 0x3436U, 0x3437U, 0x3438U, 0x3439U, 0x3461U, 0x3462U, 0x3463U, 0x3464U, + 0x3465U, 0x3466U, 0x3530U, 0x3531U, 0x3532U, 0x3533U, 0x3534U, 0x3535U, 0x3536U, 0x3537U, 0x3538U, 0x3539U, 0x3561U, + 0x3562U, 0x3563U, 0x3564U, 0x3565U, 0x3566U, 0x3630U, 0x3631U, 0x3632U, 0x3633U, 0x3634U, 0x3635U, 0x3636U, 0x3637U, + 0x3638U, 0x3639U, 0x3661U, 0x3662U, 0x3663U, 0x3664U, 0x3665U, 0x3666U, 0x3730U, 0x3731U, 0x3732U, 0x3733U, 0x3734U, + 0x3735U, 0x3736U, 0x3737U, 0x3738U, 0x3739U, 0x3761U, 0x3762U, 0x3763U, 0x3764U, 0x3765U, 0x3766U, 0x3830U, 0x3831U, + 0x3832U, 0x3833U, 0x3834U, 0x3835U, 0x3836U, 0x3837U, 0x3838U, 0x3839U, 0x3861U, 0x3862U, 0x3863U, 0x3864U, 0x3865U, + 0x3866U, 0x3930U, 0x3931U, 0x3932U, 0x3933U, 0x3934U, 0x3935U, 0x3936U, 0x3937U, 0x3938U, 0x3939U, 0x3961U, 0x3962U, + 0x3963U, 0x3964U, 0x3965U, 0x3966U, 0x6130U, 0x6131U, 0x6132U, 0x6133U, 0x6134U, 0x6135U, 0x6136U, 0x6137U, 0x6138U, + 0x6139U, 0x6161U, 0x6162U, 0x6163U, 0x6164U, 0x6165U, 0x6166U, 0x6230U, 0x6231U, 0x6232U, 0x6233U, 0x6234U, 0x6235U, + 0x6236U, 0x6237U, 0x6238U, 0x6239U, 0x6261U, 0x6262U, 0x6263U, 0x6264U, 0x6265U, 0x6266U, 0x6330U, 0x6331U, 0x6332U, + 0x6333U, 0x6334U, 0x6335U, 0x6336U, 0x6337U, 0x6338U, 0x6339U, 0x6361U, 0x6362U, 0x6363U, 0x6364U, 0x6365U, 0x6366U, + 0x6430U, 0x6431U, 0x6432U, 0x6433U, 0x6434U, 0x6435U, 0x6436U, 0x6437U, 0x6438U, 0x6439U, 0x6461U, 0x6462U, 0x6463U, + 0x6464U, 0x6465U, 0x6466U, 0x6530U, 0x6531U, 0x6532U, 0x6533U, 0x6534U, 0x6535U, 0x6536U, 0x6537U, 0x6538U, 0x6539U, + 0x6561U, 0x6562U, 0x6563U, 0x6564U, 0x6565U, 0x6566U, 0x6630U, 0x6631U, 0x6632U, 0x6633U, 0x6634U, 0x6635U, 0x6636U, + 0x6637U, 0x6638U, 0x6639U, 0x6661U, 0x6662U, 0x6663U, 0x6664U, 0x6665U, 0x6666U +#else /* DUK_USE_INTEGER_BE */ + 0x3030U, 0x3130U, 0x3230U, 0x3330U, 0x3430U, 0x3530U, 0x3630U, 0x3730U, 0x3830U, 0x3930U, 0x6130U, 0x6230U, 0x6330U, + 0x6430U, 0x6530U, 0x6630U, 0x3031U, 0x3131U, 0x3231U, 0x3331U, 0x3431U, 0x3531U, 0x3631U, 0x3731U, 0x3831U, 0x3931U, + 0x6131U, 0x6231U, 0x6331U, 0x6431U, 0x6531U, 0x6631U, 0x3032U, 0x3132U, 0x3232U, 0x3332U, 0x3432U, 0x3532U, 0x3632U, + 0x3732U, 0x3832U, 0x3932U, 0x6132U, 0x6232U, 0x6332U, 0x6432U, 0x6532U, 0x6632U, 0x3033U, 0x3133U, 0x3233U, 0x3333U, + 0x3433U, 0x3533U, 0x3633U, 0x3733U, 0x3833U, 0x3933U, 0x6133U, 0x6233U, 0x6333U, 0x6433U, 0x6533U, 0x6633U, 0x3034U, + 0x3134U, 0x3234U, 0x3334U, 0x3434U, 0x3534U, 0x3634U, 0x3734U, 0x3834U, 0x3934U, 0x6134U, 0x6234U, 0x6334U, 0x6434U, + 0x6534U, 0x6634U, 0x3035U, 0x3135U, 0x3235U, 0x3335U, 0x3435U, 0x3535U, 0x3635U, 0x3735U, 0x3835U, 0x3935U, 0x6135U, + 0x6235U, 0x6335U, 0x6435U, 0x6535U, 0x6635U, 0x3036U, 0x3136U, 0x3236U, 0x3336U, 0x3436U, 0x3536U, 0x3636U, 0x3736U, + 0x3836U, 0x3936U, 0x6136U, 0x6236U, 0x6336U, 0x6436U, 0x6536U, 0x6636U, 0x3037U, 0x3137U, 0x3237U, 0x3337U, 0x3437U, + 0x3537U, 0x3637U, 0x3737U, 0x3837U, 0x3937U, 0x6137U, 0x6237U, 0x6337U, 0x6437U, 0x6537U, 0x6637U, 0x3038U, 0x3138U, + 0x3238U, 0x3338U, 0x3438U, 0x3538U, 0x3638U, 0x3738U, 0x3838U, 0x3938U, 0x6138U, 0x6238U, 0x6338U, 0x6438U, 0x6538U, + 0x6638U, 0x3039U, 0x3139U, 0x3239U, 0x3339U, 0x3439U, 0x3539U, 0x3639U, 0x3739U, 0x3839U, 0x3939U, 0x6139U, 0x6239U, + 0x6339U, 0x6439U, 0x6539U, 0x6639U, 0x3061U, 0x3161U, 0x3261U, 0x3361U, 0x3461U, 0x3561U, 0x3661U, 0x3761U, 0x3861U, + 0x3961U, 0x6161U, 0x6261U, 0x6361U, 0x6461U, 0x6561U, 0x6661U, 0x3062U, 0x3162U, 0x3262U, 0x3362U, 0x3462U, 0x3562U, + 0x3662U, 0x3762U, 0x3862U, 0x3962U, 0x6162U, 0x6262U, 0x6362U, 0x6462U, 0x6562U, 0x6662U, 0x3063U, 0x3163U, 0x3263U, + 0x3363U, 0x3463U, 0x3563U, 0x3663U, 0x3763U, 0x3863U, 0x3963U, 0x6163U, 0x6263U, 0x6363U, 0x6463U, 0x6563U, 0x6663U, + 0x3064U, 0x3164U, 0x3264U, 0x3364U, 0x3464U, 0x3564U, 0x3664U, 0x3764U, 0x3864U, 0x3964U, 0x6164U, 0x6264U, 0x6364U, + 0x6464U, 0x6564U, 0x6664U, 0x3065U, 0x3165U, 0x3265U, 0x3365U, 0x3465U, 0x3565U, 0x3665U, 0x3765U, 0x3865U, 0x3965U, + 0x6165U, 0x6265U, 0x6365U, 0x6465U, 0x6565U, 0x6665U, 0x3066U, 0x3166U, 0x3266U, 0x3366U, 0x3466U, 0x3566U, 0x3666U, + 0x3766U, 0x3866U, 0x3966U, 0x6166U, 0x6266U, 0x6366U, 0x6466U, 0x6566U, 0x6666U +#endif /* DUK_USE_INTEGER_BE */ +}; +#endif /* DUK_USE_HEX_FASTPATH */ + +/* + * Arbitrary byteswap for potentially unaligned values + * + * Used to byteswap pointers e.g. in debugger code. + */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) /* For now only needed by the debugger. */ +DUK_INTERNAL void duk_byteswap_bytes(duk_uint8_t *p, duk_small_uint_t len) { + duk_uint8_t tmp; + duk_uint8_t *q = p + len - 1; + + while (p - q < 0) { + tmp = *p; + *p = *q; + *q = tmp; + p++; + q--; + } +} +#endif + +/* + * Random + */ + +DUK_INTERNAL duk_double_t duk_util_get_random_double(duk_hthread *thr) { +#if defined(DUK_USE_GET_RANDOM_DOUBLE) + return DUK_USE_GET_RANDOM_DOUBLE(thr->heap->heap_udata); +#else + return duk_util_tinyrandom_get_double(thr); +#endif +} +#line 1 "duk_hobject_class.c" +/* + * Hobject ECMAScript [[Class]]. + */ + +/* #include duk_internal.h -> already included */ + +#if (DUK_STRIDX_UC_ARGUMENTS > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UC_ARRAY > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UC_BOOLEAN > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UC_DATE > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UC_ERROR > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UC_FUNCTION > 255) +#error constant too large +#endif +#if (DUK_STRIDX_JSON > 255) +#error constant too large +#endif +#if (DUK_STRIDX_MATH > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UC_NUMBER > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UC_OBJECT > 255) +#error constant too large +#endif +#if (DUK_STRIDX_REG_EXP > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UC_STRING > 255) +#error constant too large +#endif +#if (DUK_STRIDX_GLOBAL > 255) +#error constant too large +#endif +#if (DUK_STRIDX_OBJ_ENV > 255) +#error constant too large +#endif +#if (DUK_STRIDX_DEC_ENV > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UC_POINTER > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UC_THREAD > 255) +#error constant too large +#endif +#if (DUK_STRIDX_ARRAY_BUFFER > 255) +#error constant too large +#endif +#if (DUK_STRIDX_DATA_VIEW > 255) +#error constant too large +#endif +#if (DUK_STRIDX_INT8_ARRAY > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UINT8_ARRAY > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UINT8_CLAMPED_ARRAY > 255) +#error constant too large +#endif +#if (DUK_STRIDX_INT16_ARRAY > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UINT16_ARRAY > 255) +#error constant too large +#endif +#if (DUK_STRIDX_INT32_ARRAY > 255) +#error constant too large +#endif +#if (DUK_STRIDX_UINT32_ARRAY > 255) +#error constant too large +#endif +#if (DUK_STRIDX_FLOAT32_ARRAY > 255) +#error constant too large +#endif +#if (DUK_STRIDX_FLOAT64_ARRAY > 255) +#error constant too large +#endif +#if (DUK_STRIDX_EMPTY_STRING > 255) +#error constant too large +#endif + +/* Note: assumes that these string indexes are 8-bit, genstrings.py must ensure that */ +DUK_INTERNAL duk_uint8_t duk_class_number_to_stridx[32] = { + DUK_STRIDX_EMPTY_STRING, /* NONE, intentionally empty */ + DUK_STRIDX_UC_OBJECT, + DUK_STRIDX_UC_ARRAY, + DUK_STRIDX_UC_FUNCTION, + DUK_STRIDX_UC_ARGUMENTS, + DUK_STRIDX_UC_BOOLEAN, + DUK_STRIDX_UC_DATE, + DUK_STRIDX_UC_ERROR, + DUK_STRIDX_JSON, + DUK_STRIDX_MATH, + DUK_STRIDX_UC_NUMBER, + DUK_STRIDX_REG_EXP, + DUK_STRIDX_UC_STRING, + DUK_STRIDX_GLOBAL, + DUK_STRIDX_UC_SYMBOL, + DUK_STRIDX_OBJ_ENV, + DUK_STRIDX_DEC_ENV, + DUK_STRIDX_UC_POINTER, + DUK_STRIDX_UC_THREAD, + DUK_STRIDX_ARRAY_BUFFER, + DUK_STRIDX_DATA_VIEW, + DUK_STRIDX_INT8_ARRAY, + DUK_STRIDX_UINT8_ARRAY, + DUK_STRIDX_UINT8_CLAMPED_ARRAY, + DUK_STRIDX_INT16_ARRAY, + DUK_STRIDX_UINT16_ARRAY, + DUK_STRIDX_INT32_ARRAY, + DUK_STRIDX_UINT32_ARRAY, + DUK_STRIDX_FLOAT32_ARRAY, + DUK_STRIDX_FLOAT64_ARRAY, + DUK_STRIDX_EMPTY_STRING, /* UNUSED, intentionally empty */ + DUK_STRIDX_EMPTY_STRING, /* UNUSED, intentionally empty */ +}; +#line 1 "duk_alloc_default.c" +/* + * Default allocation functions. + * + * Assumes behavior such as malloc allowing zero size, yielding + * a NULL or a unique pointer which is a no-op for free. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_PROVIDE_DEFAULT_ALLOC_FUNCTIONS) +DUK_INTERNAL void *duk_default_alloc_function(void *udata, duk_size_t size) { + void *res; + DUK_UNREF(udata); + res = DUK_ANSI_MALLOC(size); + DUK_DDD(DUK_DDDPRINT("default alloc function: %lu -> %p", (unsigned long) size, (void *) res)); + return res; +} + +DUK_INTERNAL void *duk_default_realloc_function(void *udata, void *ptr, duk_size_t newsize) { + void *res; + DUK_UNREF(udata); + res = DUK_ANSI_REALLOC(ptr, newsize); + DUK_DDD(DUK_DDDPRINT("default realloc function: %p %lu -> %p", (void *) ptr, (unsigned long) newsize, (void *) res)); + return res; +} + +DUK_INTERNAL void duk_default_free_function(void *udata, void *ptr) { + DUK_DDD(DUK_DDDPRINT("default free function: %p", (void *) ptr)); + DUK_UNREF(udata); + DUK_ANSI_FREE(ptr); +} +#endif /* DUK_USE_PROVIDE_DEFAULT_ALLOC_FUNCTIONS */ +#line 1 "duk_api_buffer.c" +/* + * Buffer + */ + +/* #include duk_internal.h -> already included */ + +DUK_EXTERNAL void *duk_resize_buffer(duk_hthread *thr, duk_idx_t idx, duk_size_t new_size) { + duk_hbuffer_dynamic *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hbuffer_dynamic *) duk_require_hbuffer(thr, idx); + DUK_ASSERT(h != NULL); + + if (!(DUK_HBUFFER_HAS_DYNAMIC(h) && !DUK_HBUFFER_HAS_EXTERNAL(h))) { + DUK_ERROR_TYPE(thr, DUK_STR_WRONG_BUFFER_TYPE); + DUK_WO_NORETURN(return NULL;); + } + + /* Maximum size check is handled by callee. */ + duk_hbuffer_resize(thr, h, new_size); + + return DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(thr->heap, h); +} + +DUK_EXTERNAL void *duk_steal_buffer(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_size) { + duk_hbuffer_dynamic *h; + void *ptr; + duk_size_t sz; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hbuffer_dynamic *) duk_require_hbuffer(thr, idx); + DUK_ASSERT(h != NULL); + + if (!(DUK_HBUFFER_HAS_DYNAMIC(h) && !DUK_HBUFFER_HAS_EXTERNAL(h))) { + DUK_ERROR_TYPE(thr, DUK_STR_WRONG_BUFFER_TYPE); + DUK_WO_NORETURN(return NULL;); + } + + /* Forget the previous allocation, setting size to 0 and alloc to + * NULL. Caller is responsible for freeing the previous allocation. + * Getting the allocation and clearing it is done in the same API + * call to avoid any chance of a realloc. + */ + ptr = DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(thr->heap, h); + sz = DUK_HBUFFER_DYNAMIC_GET_SIZE(h); + if (out_size) { + *out_size = sz; + } + DUK_HBUFFER_DYNAMIC_SET_DATA_PTR_NULL(thr->heap, h); + DUK_HBUFFER_DYNAMIC_SET_SIZE(h, 0); + + return ptr; +} + +DUK_EXTERNAL void duk_config_buffer(duk_hthread *thr, duk_idx_t idx, void *ptr, duk_size_t len) { + duk_hbuffer_external *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hbuffer_external *) duk_require_hbuffer(thr, idx); + DUK_ASSERT(h != NULL); + + if (!DUK_HBUFFER_HAS_EXTERNAL(h)) { + DUK_ERROR_TYPE(thr, DUK_STR_WRONG_BUFFER_TYPE); + DUK_WO_NORETURN(return;); + } + DUK_ASSERT(DUK_HBUFFER_HAS_DYNAMIC(h)); + + DUK_HBUFFER_EXTERNAL_SET_DATA_PTR(thr->heap, h, ptr); + DUK_HBUFFER_EXTERNAL_SET_SIZE(h, len); +} +#line 1 "duk_api_bytecode.c" +/* + * Bytecode dump/load + * + * The bytecode load primitive is more important performance-wise than the + * dump primitive. + * + * Unlike most Duktape API calls, bytecode dump/load is not guaranteed to be + * memory safe for invalid arguments - caller beware! There's little point + * in trying to achieve memory safety unless bytecode instructions are also + * validated which is not easy to do with indirect register references etc. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_BYTECODE_DUMP_SUPPORT) + +#define DUK__SER_MARKER 0xbf +#define DUK__SER_STRING 0x00 +#define DUK__SER_NUMBER 0x01 +#define DUK__BYTECODE_INITIAL_ALLOC 256 +#define DUK__NO_FORMALS 0xffffffffUL + +/* + * Dump/load helpers, xxx_raw() helpers do no buffer checks + */ + +DUK_LOCAL const duk_uint8_t *duk__load_string_raw(duk_hthread *thr, const duk_uint8_t *p) { + duk_uint32_t len; + + len = DUK_RAW_READINC_U32_BE(p); + duk_push_lstring(thr, (const char *) p, len); + p += len; + return p; +} + +DUK_LOCAL const duk_uint8_t *duk__load_buffer_raw(duk_hthread *thr, const duk_uint8_t *p) { + duk_uint32_t len; + duk_uint8_t *buf; + + len = DUK_RAW_READINC_U32_BE(p); + buf = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, (duk_size_t) len); + DUK_ASSERT(buf != NULL); + duk_memcpy((void *) buf, (const void *) p, (size_t) len); + p += len; + return p; +} + +DUK_LOCAL duk_uint8_t *duk__dump_hstring_raw(duk_uint8_t *p, duk_hstring *h) { + duk_size_t len; + duk_uint32_t tmp32; + + DUK_ASSERT(h != NULL); + + len = DUK_HSTRING_GET_BYTELEN(h); + DUK_ASSERT(len <= 0xffffffffUL); /* string limits */ + tmp32 = (duk_uint32_t) len; + DUK_RAW_WRITEINC_U32_BE(p, tmp32); + duk_memcpy((void *) p, (const void *) DUK_HSTRING_GET_DATA(h), len); + p += len; + return p; +} + +DUK_LOCAL duk_uint8_t *duk__dump_hbuffer_raw(duk_hthread *thr, duk_uint8_t *p, duk_hbuffer *h) { + duk_size_t len; + duk_uint32_t tmp32; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(h != NULL); + DUK_UNREF(thr); + + len = DUK_HBUFFER_GET_SIZE(h); + DUK_ASSERT(len <= 0xffffffffUL); /* buffer limits */ + tmp32 = (duk_uint32_t) len; + DUK_RAW_WRITEINC_U32_BE(p, tmp32); + /* When len == 0, buffer data pointer may be NULL. */ + duk_memcpy_unsafe((void *) p, (const void *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h), len); + p += len; + return p; +} + +DUK_LOCAL duk_uint8_t *duk__dump_string_prop(duk_hthread *thr, + duk_uint8_t *p, + duk_bufwriter_ctx *bw_ctx, + duk_hobject *func, + duk_small_uint_t stridx) { + duk_hstring *h_str; + duk_tval *tv; + + tv = duk_hobject_find_entry_tval_ptr_stridx(thr->heap, (duk_hobject *) func, stridx); + if (tv != NULL && DUK_TVAL_IS_STRING(tv)) { + h_str = DUK_TVAL_GET_STRING(tv); + DUK_ASSERT(h_str != NULL); + } else { + h_str = DUK_HTHREAD_STRING_EMPTY_STRING(thr); + DUK_ASSERT(h_str != NULL); + } + DUK_ASSERT(DUK_HSTRING_MAX_BYTELEN <= 0x7fffffffUL); /* ensures no overflow */ + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 4U + DUK_HSTRING_GET_BYTELEN(h_str), p); + p = duk__dump_hstring_raw(p, h_str); + return p; +} + +DUK_LOCAL duk_uint8_t *duk__dump_buffer_prop(duk_hthread *thr, + duk_uint8_t *p, + duk_bufwriter_ctx *bw_ctx, + duk_hobject *func, + duk_small_uint_t stridx) { + duk_tval *tv; + + tv = duk_hobject_find_entry_tval_ptr_stridx(thr->heap, (duk_hobject *) func, stridx); + if (tv != NULL && DUK_TVAL_IS_BUFFER(tv)) { + duk_hbuffer *h_buf; + h_buf = DUK_TVAL_GET_BUFFER(tv); + DUK_ASSERT(h_buf != NULL); + DUK_ASSERT(DUK_HBUFFER_MAX_BYTELEN <= 0x7fffffffUL); /* ensures no overflow */ + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 4U + DUK_HBUFFER_GET_SIZE(h_buf), p); + p = duk__dump_hbuffer_raw(thr, p, h_buf); + } else { + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 4U, p); + DUK_RAW_WRITEINC_U32_BE(p, 0); + } + return p; +} + +DUK_LOCAL duk_uint8_t *duk__dump_uint32_prop(duk_hthread *thr, + duk_uint8_t *p, + duk_bufwriter_ctx *bw_ctx, + duk_hobject *func, + duk_small_uint_t stridx, + duk_uint32_t def_value) { + duk_tval *tv; + duk_uint32_t val; + + tv = duk_hobject_find_entry_tval_ptr_stridx(thr->heap, (duk_hobject *) func, stridx); + if (tv != NULL && DUK_TVAL_IS_NUMBER(tv)) { + val = (duk_uint32_t) DUK_TVAL_GET_NUMBER(tv); + } else { + val = def_value; + } + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 4U, p); + DUK_RAW_WRITEINC_U32_BE(p, val); + return p; +} + +DUK_LOCAL duk_uint8_t *duk__dump_varmap(duk_hthread *thr, duk_uint8_t *p, duk_bufwriter_ctx *bw_ctx, duk_hobject *func) { + duk_hobject *h; + + h = duk_hobject_get_varmap(thr, (duk_hobject *) func); + if (h != NULL) { + duk_uint_fast32_t i; + + /* We know _Varmap only has own properties so walk property + * table directly. We also know _Varmap is dense and all + * values are numbers; assert for these. GC and finalizers + * shouldn't affect _Varmap so side effects should be fine. + */ + for (i = 0; i < (duk_uint_fast32_t) DUK_HOBJECT_GET_ENEXT(h); i++) { + duk_hstring *key; + duk_tval *tv_val; + duk_uint32_t val; + + key = DUK_HOBJECT_E_GET_KEY(thr->heap, h, i); + DUK_ASSERT(key != NULL); /* _Varmap is dense */ + DUK_ASSERT(!DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, h, i)); + tv_val = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, h, i); + DUK_ASSERT(tv_val != NULL); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv_val)); /* known to be number; in fact an integer */ +#if defined(DUK_USE_FASTINT) + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv_val)); + DUK_ASSERT(DUK_TVAL_GET_FASTINT(tv_val) == + (duk_int64_t) DUK_TVAL_GET_FASTINT_U32(tv_val)); /* known to be 32-bit */ + val = DUK_TVAL_GET_FASTINT_U32(tv_val); +#else + val = (duk_uint32_t) DUK_TVAL_GET_NUMBER(tv_val); +#endif + + DUK_ASSERT(DUK_HSTRING_MAX_BYTELEN <= 0x7fffffffUL); /* ensures no overflow */ + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 4U + DUK_HSTRING_GET_BYTELEN(key) + 4U, p); + p = duk__dump_hstring_raw(p, key); + DUK_RAW_WRITEINC_U32_BE(p, val); + } + } + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 4U, p); + DUK_RAW_WRITEINC_U32_BE(p, 0); /* end of _Varmap */ + return p; +} + +DUK_LOCAL duk_uint8_t *duk__dump_formals(duk_hthread *thr, duk_uint8_t *p, duk_bufwriter_ctx *bw_ctx, duk_hobject *func) { + duk_harray *h; + + h = duk_hobject_get_formals(thr, (duk_hobject *) func); + if (h != NULL) { + duk_uint32_t i; + + /* Here we rely on _Formals being a dense array containing + * strings. This should be the case unless _Formals has been + * tweaked by the application (which we don't support right + * now). + */ + + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 4U, p); + DUK_ASSERT(h->length != DUK__NO_FORMALS); /* limits */ + DUK_RAW_WRITEINC_U32_BE(p, h->length); + + for (i = 0; i < h->length; i++) { + duk_tval *tv_val; + duk_hstring *varname; + + tv_val = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, (duk_hobject *) h, i); + DUK_ASSERT(tv_val != NULL); + DUK_ASSERT(DUK_TVAL_IS_STRING(tv_val)); + + varname = DUK_TVAL_GET_STRING(tv_val); + DUK_ASSERT(varname != NULL); + DUK_ASSERT(DUK_HSTRING_GET_BYTELEN(varname) >= 1); + + DUK_ASSERT(DUK_HSTRING_MAX_BYTELEN <= 0x7fffffffUL); /* ensures no overflow */ + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 4U + DUK_HSTRING_GET_BYTELEN(varname), p); + p = duk__dump_hstring_raw(p, varname); + } + } else { + DUK_DD(DUK_DDPRINT("dumping function without _Formals, emit marker to indicate missing _Formals")); + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 4U, p); + DUK_RAW_WRITEINC_U32_BE(p, DUK__NO_FORMALS); /* marker: no formals */ + } + return p; +} + +static duk_uint8_t *duk__dump_func(duk_hthread *thr, duk_hcompfunc *func, duk_bufwriter_ctx *bw_ctx, duk_uint8_t *p) { + duk_tval *tv, *tv_end; + duk_instr_t *ins, *ins_end; + duk_hobject **fn, **fn_end; + duk_hstring *h_str; + duk_uint32_t count_instr; + duk_uint32_t tmp32; + duk_uint16_t tmp16; + duk_double_t d; + + DUK_DD(DUK_DDPRINT("dumping function %p to %p: " + "consts=[%p,%p[ (%ld bytes, %ld items), " + "funcs=[%p,%p[ (%ld bytes, %ld items), " + "code=[%p,%p[ (%ld bytes, %ld items)", + (void *) func, + (void *) p, + (void *) DUK_HCOMPFUNC_GET_CONSTS_BASE(thr->heap, func), + (void *) DUK_HCOMPFUNC_GET_CONSTS_END(thr->heap, func), + (long) DUK_HCOMPFUNC_GET_CONSTS_SIZE(thr->heap, func), + (long) DUK_HCOMPFUNC_GET_CONSTS_COUNT(thr->heap, func), + (void *) DUK_HCOMPFUNC_GET_FUNCS_BASE(thr->heap, func), + (void *) DUK_HCOMPFUNC_GET_FUNCS_END(thr->heap, func), + (long) DUK_HCOMPFUNC_GET_FUNCS_SIZE(thr->heap, func), + (long) DUK_HCOMPFUNC_GET_FUNCS_COUNT(thr->heap, func), + (void *) DUK_HCOMPFUNC_GET_CODE_BASE(thr->heap, func), + (void *) DUK_HCOMPFUNC_GET_CODE_END(thr->heap, func), + (long) DUK_HCOMPFUNC_GET_CODE_SIZE(thr->heap, func), + (long) DUK_HCOMPFUNC_GET_CODE_COUNT(thr->heap, func))); + + DUK_ASSERT(DUK_USE_ESBC_MAX_BYTES <= 0x7fffffffUL); /* ensures no overflow */ + count_instr = (duk_uint32_t) DUK_HCOMPFUNC_GET_CODE_COUNT(thr->heap, func); + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 3U * 4U + 2U * 2U + 3U * 4U + count_instr * 4U, p); + + /* Fixed header info. */ + tmp32 = count_instr; + DUK_RAW_WRITEINC_U32_BE(p, tmp32); + tmp32 = (duk_uint32_t) DUK_HCOMPFUNC_GET_CONSTS_COUNT(thr->heap, func); + DUK_RAW_WRITEINC_U32_BE(p, tmp32); + tmp32 = (duk_uint32_t) DUK_HCOMPFUNC_GET_FUNCS_COUNT(thr->heap, func); + DUK_RAW_WRITEINC_U32_BE(p, tmp32); + tmp16 = func->nregs; + DUK_RAW_WRITEINC_U16_BE(p, tmp16); + tmp16 = func->nargs; + DUK_RAW_WRITEINC_U16_BE(p, tmp16); +#if defined(DUK_USE_DEBUGGER_SUPPORT) + tmp32 = func->start_line; + DUK_RAW_WRITEINC_U32_BE(p, tmp32); + tmp32 = func->end_line; + DUK_RAW_WRITEINC_U32_BE(p, tmp32); +#else + DUK_RAW_WRITEINC_U32_BE(p, 0); + DUK_RAW_WRITEINC_U32_BE(p, 0); +#endif + tmp32 = DUK_HEAPHDR_GET_FLAGS((duk_heaphdr *) func); /* masks flags, only duk_hobject flags */ + tmp32 &= ~(DUK_HOBJECT_FLAG_HAVE_FINALIZER); /* finalizer flag is lost */ + DUK_RAW_WRITEINC_U32_BE(p, tmp32); + + /* Bytecode instructions: endian conversion needed unless + * platform is big endian. + */ + ins = DUK_HCOMPFUNC_GET_CODE_BASE(thr->heap, func); + ins_end = DUK_HCOMPFUNC_GET_CODE_END(thr->heap, func); + DUK_ASSERT((duk_size_t) (ins_end - ins) == (duk_size_t) count_instr); +#if defined(DUK_USE_INTEGER_BE) + duk_memcpy_unsafe((void *) p, (const void *) ins, count_instr * sizeof(duk_instr_t)); + p += count_instr * sizeof(duk_instr_t); + DUK_UNREF(ins_end); +#else + while (ins != ins_end) { + tmp32 = (duk_uint32_t) (*ins); + DUK_RAW_WRITEINC_U32_BE(p, tmp32); + ins++; + } +#endif + + /* Constants: variable size encoding. */ + tv = DUK_HCOMPFUNC_GET_CONSTS_BASE(thr->heap, func); + tv_end = DUK_HCOMPFUNC_GET_CONSTS_END(thr->heap, func); + while (tv != tv_end) { + /* constants are strings or numbers now */ + DUK_ASSERT(DUK_TVAL_IS_STRING(tv) || DUK_TVAL_IS_NUMBER(tv)); + + if (DUK_TVAL_IS_STRING(tv)) { + h_str = DUK_TVAL_GET_STRING(tv); + DUK_ASSERT(h_str != NULL); + DUK_ASSERT(DUK_HSTRING_MAX_BYTELEN <= 0x7fffffffUL); /* ensures no overflow */ + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 1U + 4U + DUK_HSTRING_GET_BYTELEN(h_str), p); + *p++ = DUK__SER_STRING; + p = duk__dump_hstring_raw(p, h_str); + } else { + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + p = DUK_BW_ENSURE_RAW(thr, bw_ctx, 1U + 8U, p); + *p++ = DUK__SER_NUMBER; + d = DUK_TVAL_GET_NUMBER(tv); + DUK_RAW_WRITEINC_DOUBLE_BE(p, d); + } + tv++; + } + + /* Inner functions recursively. */ + fn = (duk_hobject **) DUK_HCOMPFUNC_GET_FUNCS_BASE(thr->heap, func); + fn_end = (duk_hobject **) DUK_HCOMPFUNC_GET_FUNCS_END(thr->heap, func); + while (fn != fn_end) { + /* XXX: This causes recursion up to inner function depth + * which is normally not an issue, e.g. mark-and-sweep uses + * a recursion limiter to avoid C stack issues. Avoiding + * this would mean some sort of a work list or just refusing + * to serialize deep functions. + */ + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(*fn)); + p = duk__dump_func(thr, (duk_hcompfunc *) *fn, bw_ctx, p); + fn++; + } + + /* Lexenv and varenv are not dumped. */ + + /* Object extra properties. + * + * There are some difference between function templates and functions. + * For example, function templates don't have .length and nargs is + * normally used to instantiate the functions. + */ + + p = duk__dump_uint32_prop(thr, p, bw_ctx, (duk_hobject *) func, DUK_STRIDX_LENGTH, (duk_uint32_t) func->nargs); +#if defined(DUK_USE_FUNC_NAME_PROPERTY) + p = duk__dump_string_prop(thr, p, bw_ctx, (duk_hobject *) func, DUK_STRIDX_NAME); +#endif +#if defined(DUK_USE_FUNC_FILENAME_PROPERTY) + p = duk__dump_string_prop(thr, p, bw_ctx, (duk_hobject *) func, DUK_STRIDX_FILE_NAME); +#endif +#if defined(DUK_USE_PC2LINE) + p = duk__dump_buffer_prop(thr, p, bw_ctx, (duk_hobject *) func, DUK_STRIDX_INT_PC2LINE); +#endif + p = duk__dump_varmap(thr, p, bw_ctx, (duk_hobject *) func); + p = duk__dump_formals(thr, p, bw_ctx, (duk_hobject *) func); + + DUK_DD(DUK_DDPRINT("serialized function %p -> final pointer %p", (void *) func, (void *) p)); + + return p; +} + +/* Load a function from bytecode. The function object returned here must + * match what is created by duk_js_push_closure() with respect to its flags, + * properties, etc. + * + * NOTE: there are intentionally no input buffer length / bound checks. + * Adding them would be easy but wouldn't ensure memory safety as untrusted + * or broken bytecode is unsafe during execution unless the opcodes themselves + * are validated (which is quite complex, especially for indirect opcodes). + */ + +#define DUK__ASSERT_LEFT(n) \ + do { \ + DUK_ASSERT((duk_size_t) (p_end - p) >= (duk_size_t) (n)); \ + } while (0) + +static const duk_uint8_t *duk__load_func(duk_hthread *thr, const duk_uint8_t *p, const duk_uint8_t *p_end) { + duk_hcompfunc *h_fun; + duk_hbuffer *h_data; + duk_size_t data_size; + duk_uint32_t count_instr, count_const, count_funcs; + duk_uint32_t n; + duk_uint32_t tmp32; + duk_small_uint_t const_type; + duk_uint8_t *fun_data; + duk_uint8_t *q; + duk_idx_t idx_base; + duk_tval *tv1; + duk_uarridx_t arr_idx; + duk_uarridx_t arr_limit; + duk_hobject *func_env; + duk_bool_t need_pop; + + /* XXX: There's some overlap with duk_js_closure() here, but + * seems difficult to share code. Ensure that the final function + * looks the same as created by duk_js_closure(). + */ + + DUK_ASSERT(thr != NULL); + + DUK_DD(DUK_DDPRINT("loading function, p=%p, p_end=%p", (const void *) p, (const void *) p_end)); + + DUK__ASSERT_LEFT(3 * 4); + count_instr = DUK_RAW_READINC_U32_BE(p); + count_const = DUK_RAW_READINC_U32_BE(p); + count_funcs = DUK_RAW_READINC_U32_BE(p); + + data_size = sizeof(duk_tval) * count_const + sizeof(duk_hobject *) * count_funcs + sizeof(duk_instr_t) * count_instr; + + DUK_DD(DUK_DDPRINT("instr=%ld, const=%ld, funcs=%ld, data_size=%ld", + (long) count_instr, + (long) count_const, + (long) count_const, + (long) data_size)); + + /* Value stack is used to ensure reachability of constants and + * inner functions being loaded. Require enough space to handle + * large functions correctly. + */ + duk_require_stack(thr, (duk_idx_t) (2 + count_const + count_funcs)); + idx_base = duk_get_top(thr); + + /* Push function object, init flags etc. This must match + * duk_js_push_closure() quite carefully. + */ + h_fun = duk_push_hcompfunc(thr); + DUK_ASSERT(h_fun != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC((duk_hobject *) h_fun)); + DUK_ASSERT(DUK_HCOMPFUNC_GET_DATA(thr->heap, h_fun) == NULL); + DUK_ASSERT(DUK_HCOMPFUNC_GET_FUNCS(thr->heap, h_fun) == NULL); + DUK_ASSERT(DUK_HCOMPFUNC_GET_BYTECODE(thr->heap, h_fun) == NULL); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) h_fun) == thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]); + + h_fun->nregs = DUK_RAW_READINC_U16_BE(p); + h_fun->nargs = DUK_RAW_READINC_U16_BE(p); +#if defined(DUK_USE_DEBUGGER_SUPPORT) + h_fun->start_line = DUK_RAW_READINC_U32_BE(p); + h_fun->end_line = DUK_RAW_READINC_U32_BE(p); +#else + p += 8; /* skip line info */ +#endif + + /* duk_hcompfunc flags; quite version specific */ + tmp32 = DUK_RAW_READINC_U32_BE(p); + DUK_HEAPHDR_SET_FLAGS((duk_heaphdr *) h_fun, tmp32); /* masks flags to only change duk_hobject flags */ + + /* standard prototype (no need to set here, already set) */ + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) h_fun) == thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]); +#if 0 + DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, &h_fun->obj, thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]); +#endif + + /* assert just a few critical flags */ + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE((duk_heaphdr *) h_fun) == DUK_HTYPE_OBJECT); + DUK_ASSERT(!DUK_HOBJECT_HAS_BOUNDFUNC(&h_fun->obj)); + DUK_ASSERT(DUK_HOBJECT_HAS_COMPFUNC(&h_fun->obj)); + DUK_ASSERT(!DUK_HOBJECT_HAS_NATFUNC(&h_fun->obj)); + DUK_ASSERT(!DUK_HOBJECT_IS_THREAD(&h_fun->obj)); + DUK_ASSERT(!DUK_HOBJECT_IS_PROXY(&h_fun->obj)); + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARRAY(&h_fun->obj)); + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_STRINGOBJ(&h_fun->obj)); + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(&h_fun->obj)); + + /* Create function 'data' buffer but don't attach it yet. */ + fun_data = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, data_size); + DUK_ASSERT(fun_data != NULL); + + /* Load bytecode instructions. */ + DUK_ASSERT(sizeof(duk_instr_t) == 4); + DUK__ASSERT_LEFT(count_instr * sizeof(duk_instr_t)); +#if defined(DUK_USE_INTEGER_BE) + q = fun_data + sizeof(duk_tval) * count_const + sizeof(duk_hobject *) * count_funcs; + duk_memcpy((void *) q, (const void *) p, sizeof(duk_instr_t) * count_instr); + p += sizeof(duk_instr_t) * count_instr; +#else + q = fun_data + sizeof(duk_tval) * count_const + sizeof(duk_hobject *) * count_funcs; + for (n = count_instr; n > 0; n--) { + *((duk_instr_t *) (void *) q) = DUK_RAW_READINC_U32_BE(p); + q += sizeof(duk_instr_t); + } +#endif + + /* Load constants onto value stack but don't yet copy to buffer. */ + for (n = count_const; n > 0; n--) { + DUK__ASSERT_LEFT(1); + const_type = DUK_RAW_READINC_U8(p); + switch (const_type) { + case DUK__SER_STRING: { + p = duk__load_string_raw(thr, p); + break; + } + case DUK__SER_NUMBER: { + /* Important to do a fastint check so that constants are + * properly read back as fastints. + */ + duk_tval tv_tmp; + duk_double_t val; + DUK__ASSERT_LEFT(8); + val = DUK_RAW_READINC_DOUBLE_BE(p); + DUK_TVAL_SET_NUMBER_CHKFAST_SLOW(&tv_tmp, val); + duk_push_tval(thr, &tv_tmp); + break; + } + default: { + goto format_error; + } + } + } + + /* Load inner functions to value stack, but don't yet copy to buffer. */ + for (n = count_funcs; n > 0; n--) { + p = duk__load_func(thr, p, p_end); + if (p == NULL) { + goto format_error; + } + } + + /* With constants and inner functions on value stack, we can now + * atomically finish the function 'data' buffer, bump refcounts, + * etc. + * + * Here we take advantage of the value stack being just a duk_tval + * array: we can just memcpy() the constants as long as we incref + * them afterwards. + */ + + h_data = (duk_hbuffer *) duk_known_hbuffer(thr, idx_base + 1); + DUK_ASSERT(!DUK_HBUFFER_HAS_DYNAMIC(h_data)); + DUK_HCOMPFUNC_SET_DATA(thr->heap, h_fun, h_data); + DUK_HBUFFER_INCREF(thr, h_data); + + tv1 = duk_get_tval(thr, idx_base + 2); /* may be NULL if no constants or inner funcs */ + DUK_ASSERT((count_const == 0 && count_funcs == 0) || tv1 != NULL); + + q = fun_data; + duk_memcpy_unsafe((void *) q, (const void *) tv1, sizeof(duk_tval) * count_const); + for (n = count_const; n > 0; n--) { + DUK_TVAL_INCREF_FAST(thr, (duk_tval *) (void *) q); /* no side effects */ + q += sizeof(duk_tval); + } + tv1 += count_const; + + DUK_HCOMPFUNC_SET_FUNCS(thr->heap, h_fun, (duk_hobject **) (void *) q); + for (n = count_funcs; n > 0; n--) { + duk_hobject *h_obj; + + DUK_ASSERT(DUK_TVAL_IS_OBJECT(tv1)); + h_obj = DUK_TVAL_GET_OBJECT(tv1); + DUK_ASSERT(h_obj != NULL); + tv1++; + DUK_HOBJECT_INCREF(thr, h_obj); + + *((duk_hobject **) (void *) q) = h_obj; + q += sizeof(duk_hobject *); + } + + DUK_HCOMPFUNC_SET_BYTECODE(thr->heap, h_fun, (duk_instr_t *) (void *) q); + + /* The function object is now reachable and refcounts are fine, + * so we can pop off all the temporaries. + */ + DUK_DDD(DUK_DDDPRINT("function is reachable, reset top; func: %!iT", duk_get_tval(thr, idx_base))); + duk_set_top(thr, idx_base + 1); + + /* Setup function properties. */ + tmp32 = DUK_RAW_READINC_U32_BE(p); + duk_push_u32(thr, tmp32); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_C); + +#if defined(DUK_USE_FUNC_NAME_PROPERTY) + p = duk__load_string_raw(thr, p); /* -> [ func funcname ] */ + func_env = thr->builtins[DUK_BIDX_GLOBAL_ENV]; + DUK_ASSERT(func_env != NULL); + need_pop = 0; + if (DUK_HOBJECT_HAS_NAMEBINDING((duk_hobject *) h_fun)) { + /* Original function instance/template had NAMEBINDING. + * Must create a lexical environment on loading to allow + * recursive functions like 'function foo() { foo(); }'. + */ + duk_hdecenv *new_env; + + new_env = + duk_hdecenv_alloc(thr, DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_DECENV)); + DUK_ASSERT(new_env != NULL); + DUK_ASSERT(new_env->thread == NULL); /* Closed. */ + DUK_ASSERT(new_env->varmap == NULL); + DUK_ASSERT(new_env->regbase_byteoff == 0); + DUK_HDECENV_ASSERT_VALID(new_env); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) new_env) == NULL); + DUK_HOBJECT_SET_PROTOTYPE(thr->heap, (duk_hobject *) new_env, func_env); + DUK_HOBJECT_INCREF(thr, func_env); + + func_env = (duk_hobject *) new_env; + + duk_push_hobject(thr, (duk_hobject *) new_env); + + duk_dup_m2(thr); /* -> [ func funcname env funcname ] */ + duk_dup(thr, idx_base); /* -> [ func funcname env funcname func ] */ + duk_xdef_prop(thr, -3, DUK_PROPDESC_FLAGS_NONE); /* -> [ func funcname env ] */ + + need_pop = 1; /* Need to pop env, but -after- updating h_fun and increfs. */ + } + DUK_ASSERT(func_env != NULL); + DUK_HCOMPFUNC_SET_LEXENV(thr->heap, h_fun, func_env); + DUK_HCOMPFUNC_SET_VARENV(thr->heap, h_fun, func_env); + DUK_HOBJECT_INCREF(thr, func_env); + DUK_HOBJECT_INCREF(thr, func_env); + if (need_pop) { + duk_pop(thr); + } + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_NAME, DUK_PROPDESC_FLAGS_C); +#endif /* DUK_USE_FUNC_NAME_PROPERTY */ + +#if defined(DUK_USE_FUNC_FILENAME_PROPERTY) + p = duk__load_string_raw(thr, p); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_FILE_NAME, DUK_PROPDESC_FLAGS_C); +#endif /* DUK_USE_FUNC_FILENAME_PROPERTY */ + + if (DUK_HOBJECT_HAS_CONSTRUCTABLE((duk_hobject *) h_fun)) { + /* Restore empty external .prototype only for constructable + * functions. The prototype object should inherit from + * Object.prototype. + */ + duk_push_object(thr); + DUK_ASSERT(!duk_is_bare_object(thr, -1)); + duk_dup_m2(thr); + duk_xdef_prop_stridx_short(thr, + -2, + DUK_STRIDX_CONSTRUCTOR, + DUK_PROPDESC_FLAGS_WC); /* func.prototype.constructor = func */ + duk_compact_m1(thr); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_PROTOTYPE, DUK_PROPDESC_FLAGS_W); + } + +#if defined(DUK_USE_PC2LINE) + p = duk__load_buffer_raw(thr, p); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_PC2LINE, DUK_PROPDESC_FLAGS_WC); +#endif /* DUK_USE_PC2LINE */ + + duk_push_bare_object(thr); /* _Varmap */ + for (;;) { + /* XXX: awkward */ + p = duk__load_string_raw(thr, p); + if (duk_get_length(thr, -1) == 0) { + duk_pop(thr); + break; + } + tmp32 = DUK_RAW_READINC_U32_BE(p); + duk_push_u32(thr, tmp32); + duk_put_prop(thr, -3); + } + duk_compact_m1(thr); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_VARMAP, DUK_PROPDESC_FLAGS_NONE); + + /* _Formals may have been missing in the original function, which is + * handled using a marker length. + */ + arr_limit = DUK_RAW_READINC_U32_BE(p); + if (arr_limit != DUK__NO_FORMALS) { + duk_push_bare_array(thr); /* _Formals */ + for (arr_idx = 0; arr_idx < arr_limit; arr_idx++) { + p = duk__load_string_raw(thr, p); + duk_put_prop_index(thr, -2, arr_idx); + } + duk_compact_m1(thr); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_FORMALS, DUK_PROPDESC_FLAGS_NONE); + } else { + DUK_DD(DUK_DDPRINT("no _Formals in dumped function")); + } + + /* Return with final function pushed on stack top. */ + DUK_DD(DUK_DDPRINT("final loaded function: %!iT", duk_get_tval(thr, -1))); + DUK_ASSERT_TOP(thr, idx_base + 1); + return p; + +format_error: + return NULL; +} + +DUK_EXTERNAL void duk_dump_function(duk_hthread *thr) { + duk_hcompfunc *func; + duk_bufwriter_ctx bw_ctx_alloc; + duk_bufwriter_ctx *bw_ctx = &bw_ctx_alloc; + duk_uint8_t *p; + + DUK_ASSERT_API_ENTRY(thr); + + /* Bound functions don't have all properties so we'd either need to + * lookup the non-bound target function or reject bound functions. + * For now, bound functions are rejected with TypeError. + */ + func = duk_require_hcompfunc(thr, -1); + DUK_ASSERT(func != NULL); + DUK_ASSERT(!DUK_HOBJECT_HAS_BOUNDFUNC(&func->obj)); + + /* Estimating the result size beforehand would be costly, so + * start with a reasonable size and extend as needed. + */ + DUK_BW_INIT_PUSHBUF(thr, bw_ctx, DUK__BYTECODE_INITIAL_ALLOC); + p = DUK_BW_GET_PTR(thr, bw_ctx); + *p++ = DUK__SER_MARKER; + p = duk__dump_func(thr, func, bw_ctx, p); + DUK_BW_SET_PTR(thr, bw_ctx, p); + DUK_BW_COMPACT(thr, bw_ctx); + + DUK_DD(DUK_DDPRINT("serialized result: %!T", duk_get_tval(thr, -1))); + + duk_remove_m2(thr); /* [ ... func buf ] -> [ ... buf ] */ +} + +DUK_EXTERNAL void duk_load_function(duk_hthread *thr) { + const duk_uint8_t *p_buf, *p, *p_end; + duk_size_t sz; + + DUK_ASSERT_API_ENTRY(thr); + + p_buf = (duk_uint8_t *) duk_require_buffer(thr, -1, &sz); + DUK_ASSERT(p_buf != NULL); + + /* The caller is responsible for being sure that bytecode being loaded + * is valid and trusted. Invalid bytecode can cause memory unsafe + * behavior directly during loading or later during bytecode execution + * (instruction validation would be quite complex to implement). + * + * This signature check is the only sanity check for detecting + * accidental invalid inputs. The initial byte ensures no ordinary + * string or Symbol will be accepted by accident. + */ + p = p_buf; + p_end = p_buf + sz; + if (sz < 1 || p[0] != DUK__SER_MARKER) { + goto format_error; + } + p++; + + p = duk__load_func(thr, p, p_end); + if (p == NULL) { + goto format_error; + } + + duk_remove_m2(thr); /* [ ... buf func ] -> [ ... func ] */ + return; + +format_error: + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_BYTECODE); + DUK_WO_NORETURN(return;); +} + +#else /* DUK_USE_BYTECODE_DUMP_SUPPORT */ + +DUK_EXTERNAL void duk_dump_function(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return;); +} + +DUK_EXTERNAL void duk_load_function(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return;); +} + +#endif /* DUK_USE_BYTECODE_DUMP_SUPPORT */ + +/* automatic undefs */ +#undef DUK__ASSERT_LEFT +#undef DUK__BYTECODE_INITIAL_ALLOC +#undef DUK__NO_FORMALS +#undef DUK__SER_MARKER +#undef DUK__SER_NUMBER +#undef DUK__SER_STRING +#line 1 "duk_api_call.c" +/* + * Calls. + * + * Protected variants should avoid ever throwing an error. Must be careful + * to catch errors related to value stack manipulation and property lookup, + * not just the call itself. + * + * The only exception is when arguments are insane, e.g. nargs/nrets are out + * of bounds; in such cases an error is thrown for two reasons. First, we + * can't always respect the value stack input/output guarantees in such cases + * so the caller would end up with the value stack in an unexpected state. + * Second, an attempt to create an error might itself fail (although this + * could be avoided by pushing a preallocated object/string or a primitive + * value). + */ + +/* #include duk_internal.h -> already included */ + +/* + * Helpers + */ + +struct duk__pcall_prop_args { + duk_idx_t obj_idx; + duk_idx_t nargs; + duk_small_uint_t call_flags; +}; +typedef struct duk__pcall_prop_args duk__pcall_prop_args; + +struct duk__pcall_method_args { + duk_idx_t nargs; + duk_small_uint_t call_flags; +}; +typedef struct duk__pcall_method_args duk__pcall_method_args; + +struct duk__pcall_args { + duk_idx_t nargs; + duk_small_uint_t call_flags; +}; +typedef struct duk__pcall_args duk__pcall_args; + +/* Compute and validate idx_func for a certain 'nargs' and 'other' + * parameter count (1 or 2, depending on whether 'this' binding is + * present). + */ +DUK_LOCAL duk_idx_t duk__call_get_idx_func(duk_hthread *thr, duk_idx_t nargs, duk_idx_t other) { + duk_idx_t idx_func; + + /* XXX: byte arithmetic? */ + + DUK_ASSERT(other >= 0); + + idx_func = duk_get_top(thr) - nargs - other; + if (DUK_UNLIKELY((idx_func | nargs) < 0)) { /* idx_func < 0 || nargs < 0; OR sign bits */ + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return 0;); + } + DUK_ASSERT(duk_is_valid_index(thr, idx_func)); + return idx_func; +} + +/* Compute idx_func, assume index will be valid. This is a valid assumption + * for protected calls: nargs < 0 is checked explicitly and duk_safe_call() + * validates the argument count. + */ +DUK_LOCAL duk_idx_t duk__call_get_idx_func_unvalidated(duk_hthread *thr, duk_idx_t nargs, duk_idx_t other) { + duk_idx_t idx_func; + + /* XXX: byte arithmetic? */ + + DUK_ASSERT(nargs >= 0); + DUK_ASSERT(other >= 0); + + idx_func = duk_get_top(thr) - nargs - other; + DUK_ASSERT(idx_func >= 0); + DUK_ASSERT(duk_is_valid_index(thr, idx_func)); + return idx_func; +} + +/* Prepare value stack for a method call through an object property. + * May currently throw an error e.g. when getting the property. + */ +DUK_LOCAL void duk__call_prop_prep_stack(duk_hthread *thr, duk_idx_t normalized_obj_idx, duk_idx_t nargs) { + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(nargs >= 0); + + DUK_DDD(DUK_DDDPRINT("duk__call_prop_prep_stack, normalized_obj_idx=%ld, nargs=%ld, stacktop=%ld", + (long) normalized_obj_idx, + (long) nargs, + (long) duk_get_top(thr))); + + /* [... key arg1 ... argN] */ + + /* duplicate key */ + duk_dup(thr, -nargs - 1); /* Note: -nargs alone would fail for nargs == 0, this is OK */ + (void) duk_get_prop(thr, normalized_obj_idx); + + DUK_DDD(DUK_DDDPRINT("func: %!T", (duk_tval *) duk_get_tval(thr, -1))); + +#if defined(DUK_USE_VERBOSE_ERRORS) + if (DUK_UNLIKELY(!duk_is_callable(thr, -1))) { + duk_tval *tv_base; + duk_tval *tv_key; + + /* tv_targ is passed on stack top (at index -1). */ + tv_base = DUK_GET_TVAL_POSIDX(thr, normalized_obj_idx); + tv_key = DUK_GET_TVAL_NEGIDX(thr, -nargs - 2); + DUK_ASSERT(tv_base >= thr->valstack_bottom && tv_base < thr->valstack_top); + DUK_ASSERT(tv_key >= thr->valstack_bottom && tv_key < thr->valstack_top); + + duk_call_setup_propcall_error(thr, tv_base, tv_key); + } +#endif + + /* [... key arg1 ... argN func] */ + + duk_replace(thr, -nargs - 2); + + /* [... func arg1 ... argN] */ + + duk_dup(thr, normalized_obj_idx); + duk_insert(thr, -nargs - 1); + + /* [... func this arg1 ... argN] */ +} + +DUK_EXTERNAL void duk_call(duk_hthread *thr, duk_idx_t nargs) { + duk_small_uint_t call_flags; + duk_idx_t idx_func; + + DUK_ASSERT_API_ENTRY(thr); + + idx_func = duk__call_get_idx_func(thr, nargs, 1); + DUK_ASSERT(duk_is_valid_index(thr, idx_func)); + + duk_insert_undefined(thr, idx_func + 1); + + call_flags = 0; /* not protected, respect reclimit, not constructor */ + duk_handle_call_unprotected(thr, idx_func, call_flags); +} + +DUK_EXTERNAL void duk_call_method(duk_hthread *thr, duk_idx_t nargs) { + duk_small_uint_t call_flags; + duk_idx_t idx_func; + + DUK_ASSERT_API_ENTRY(thr); + + idx_func = duk__call_get_idx_func(thr, nargs, 2); + DUK_ASSERT(duk_is_valid_index(thr, idx_func)); + + call_flags = 0; /* not protected, respect reclimit, not constructor */ + duk_handle_call_unprotected(thr, idx_func, call_flags); +} + +DUK_EXTERNAL void duk_call_prop(duk_hthread *thr, duk_idx_t obj_idx, duk_idx_t nargs) { + /* + * XXX: if duk_handle_call() took values through indices, this could be + * made much more sensible. However, duk_handle_call() needs to fudge + * the 'this' and 'func' values to handle bound functions, which is now + * done "in-place", so this is not a trivial change. + */ + + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); /* make absolute */ + if (DUK_UNLIKELY(nargs < 0)) { + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return;); + } + + duk__call_prop_prep_stack(thr, obj_idx, nargs); + + duk_call_method(thr, nargs); +} + +DUK_LOCAL duk_ret_t duk__pcall_raw(duk_hthread *thr, void *udata) { + duk__pcall_args *args; + duk_idx_t idx_func; + duk_int_t ret; + + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(udata != NULL); + + args = (duk__pcall_args *) udata; + idx_func = duk__call_get_idx_func_unvalidated(thr, args->nargs, 1); + DUK_ASSERT(duk_is_valid_index(thr, idx_func)); + + duk_insert_undefined(thr, idx_func + 1); + + ret = duk_handle_call_unprotected(thr, idx_func, args->call_flags); + DUK_ASSERT(ret == 0); + DUK_UNREF(ret); + + return 1; +} + +DUK_EXTERNAL duk_int_t duk_pcall(duk_hthread *thr, duk_idx_t nargs) { + duk__pcall_args args; + + DUK_ASSERT_API_ENTRY(thr); + + args.nargs = nargs; + if (DUK_UNLIKELY(nargs < 0)) { + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return DUK_EXEC_ERROR;); + } + args.call_flags = 0; + + return duk_safe_call(thr, duk__pcall_raw, (void *) &args /*udata*/, nargs + 1 /*nargs*/, 1 /*nrets*/); +} + +DUK_LOCAL duk_ret_t duk__pcall_method_raw(duk_hthread *thr, void *udata) { + duk__pcall_method_args *args; + duk_idx_t idx_func; + duk_int_t ret; + + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(udata != NULL); + + args = (duk__pcall_method_args *) udata; + + idx_func = duk__call_get_idx_func_unvalidated(thr, args->nargs, 2); + DUK_ASSERT(duk_is_valid_index(thr, idx_func)); + + ret = duk_handle_call_unprotected(thr, idx_func, args->call_flags); + DUK_ASSERT(ret == 0); + DUK_UNREF(ret); + + return 1; +} + +DUK_INTERNAL duk_int_t duk_pcall_method_flags(duk_hthread *thr, duk_idx_t nargs, duk_small_uint_t call_flags) { + duk__pcall_method_args args; + + DUK_ASSERT_API_ENTRY(thr); + + args.nargs = nargs; + if (DUK_UNLIKELY(nargs < 0)) { + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return DUK_EXEC_ERROR;); + } + args.call_flags = call_flags; + + return duk_safe_call(thr, duk__pcall_method_raw, (void *) &args /*udata*/, nargs + 2 /*nargs*/, 1 /*nrets*/); +} + +DUK_EXTERNAL duk_int_t duk_pcall_method(duk_hthread *thr, duk_idx_t nargs) { + DUK_ASSERT_API_ENTRY(thr); + + return duk_pcall_method_flags(thr, nargs, 0); +} + +DUK_LOCAL duk_ret_t duk__pcall_prop_raw(duk_hthread *thr, void *udata) { + duk__pcall_prop_args *args; + duk_idx_t obj_idx; + duk_int_t ret; + + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(udata != NULL); + + args = (duk__pcall_prop_args *) udata; + + obj_idx = duk_require_normalize_index(thr, args->obj_idx); /* make absolute */ + duk__call_prop_prep_stack(thr, obj_idx, args->nargs); + + ret = duk_handle_call_unprotected_nargs(thr, args->nargs, args->call_flags); + DUK_ASSERT(ret == 0); + DUK_UNREF(ret); + return 1; +} + +DUK_EXTERNAL duk_int_t duk_pcall_prop(duk_hthread *thr, duk_idx_t obj_idx, duk_idx_t nargs) { + duk__pcall_prop_args args; + + DUK_ASSERT_API_ENTRY(thr); + + args.obj_idx = obj_idx; + args.nargs = nargs; + if (DUK_UNLIKELY(nargs < 0)) { + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return DUK_EXEC_ERROR;); + } + args.call_flags = 0; + + return duk_safe_call(thr, duk__pcall_prop_raw, (void *) &args /*udata*/, nargs + 1 /*nargs*/, 1 /*nrets*/); +} + +DUK_EXTERNAL duk_int_t duk_safe_call(duk_hthread *thr, duk_safe_call_function func, void *udata, duk_idx_t nargs, duk_idx_t nrets) { + duk_int_t rc; + + DUK_ASSERT_API_ENTRY(thr); + + /* nargs condition; fail if: top - bottom < nargs + * <=> top < bottom + nargs + * nrets condition; fail if: end - (top - nargs) < nrets + * <=> end - top + nargs < nrets + * <=> end + nargs < top + nrets + */ + /* XXX: check for any reserve? */ + + if (DUK_UNLIKELY((nargs | nrets) < 0 || /* nargs < 0 || nrets < 0; OR sign bits */ + thr->valstack_top < thr->valstack_bottom + nargs || /* nargs too large compared to top */ + thr->valstack_end + nargs < thr->valstack_top + nrets)) { /* nrets too large compared to reserve */ + DUK_D(DUK_DPRINT("not enough stack reserve for safe call or invalid arguments: " + "nargs=%ld < 0 (?), nrets=%ld < 0 (?), top=%ld < bottom=%ld + nargs=%ld (?), " + "end=%ld + nargs=%ld < top=%ld + nrets=%ld (?)", + (long) nargs, + (long) nrets, + (long) (thr->valstack_top - thr->valstack), + (long) (thr->valstack_bottom - thr->valstack), + (long) nargs, + (long) (thr->valstack_end - thr->valstack), + (long) nargs, + (long) (thr->valstack_top - thr->valstack), + (long) nrets)); + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return DUK_EXEC_ERROR;); + } + + rc = duk_handle_safe_call(thr, /* thread */ + func, /* func */ + udata, /* udata */ + nargs, /* num_stack_args */ + nrets); /* num_stack_res */ + + return rc; +} + +DUK_EXTERNAL void duk_new(duk_hthread *thr, duk_idx_t nargs) { + duk_idx_t idx_func; + + DUK_ASSERT_API_ENTRY(thr); + + idx_func = duk__call_get_idx_func(thr, nargs, 1); + DUK_ASSERT(duk_is_valid_index(thr, idx_func)); + + duk_push_object(thr); /* default instance; internal proto updated by call handling */ + duk_insert(thr, idx_func + 1); + + duk_handle_call_unprotected(thr, idx_func, DUK_CALL_FLAG_CONSTRUCT); +} + +DUK_LOCAL duk_ret_t duk__pnew_helper(duk_hthread *thr, void *udata) { + duk_idx_t nargs; + + DUK_ASSERT(udata != NULL); + nargs = *((duk_idx_t *) udata); + + duk_new(thr, nargs); + return 1; +} + +DUK_EXTERNAL duk_int_t duk_pnew(duk_hthread *thr, duk_idx_t nargs) { + duk_int_t rc; + + DUK_ASSERT_API_ENTRY(thr); + + /* For now, just use duk_safe_call() to wrap duk_new(). We can't + * simply use a protected duk_handle_call() because pushing the + * default instance might throw. + */ + + if (DUK_UNLIKELY(nargs < 0)) { + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return DUK_EXEC_ERROR;); + } + + rc = duk_safe_call(thr, duk__pnew_helper, (void *) &nargs /*udata*/, nargs + 1 /*nargs*/, 1 /*nrets*/); + return rc; +} + +DUK_EXTERNAL duk_bool_t duk_is_constructor_call(duk_hthread *thr) { + duk_activation *act; + + DUK_ASSERT_API_ENTRY(thr); + + act = thr->callstack_curr; + if (act != NULL) { + return ((act->flags & DUK_ACT_FLAG_CONSTRUCT) != 0 ? 1 : 0); + } + return 0; +} + +DUK_EXTERNAL void duk_require_constructor_call(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + if (!duk_is_constructor_call(thr)) { + DUK_ERROR_TYPE(thr, DUK_STR_CONSTRUCT_ONLY); + DUK_WO_NORETURN(return;); + } +} + +DUK_EXTERNAL duk_bool_t duk_is_strict_call(duk_hthread *thr) { + duk_activation *act; + + /* For user code this could just return 1 (strict) always + * because all Duktape/C functions are considered strict, + * and strict is also the default when nothing is running. + * However, Duktape may call this function internally when + * the current activation is an ECMAScript function, so + * this cannot be replaced by a 'return 1' without fixing + * the internal call sites. + */ + + DUK_ASSERT_API_ENTRY(thr); + + act = thr->callstack_curr; + if (act != NULL) { + return ((act->flags & DUK_ACT_FLAG_STRICT) != 0 ? 1 : 0); + } else { + /* Strict by default. */ + return 1; + } +} + +/* + * Duktape/C function magic + */ + +DUK_EXTERNAL duk_int_t duk_get_current_magic(duk_hthread *thr) { + duk_activation *act; + duk_hobject *func; + + DUK_ASSERT_API_ENTRY(thr); + + act = thr->callstack_curr; + if (act) { + func = DUK_ACT_GET_FUNC(act); + if (!func) { + duk_tval *tv = &act->tv_func; + duk_small_uint_t lf_flags; + lf_flags = DUK_TVAL_GET_LIGHTFUNC_FLAGS(tv); + return (duk_int_t) DUK_LFUNC_FLAGS_GET_MAGIC(lf_flags); + } + DUK_ASSERT(func != NULL); + + if (DUK_HOBJECT_IS_NATFUNC(func)) { + duk_hnatfunc *nf = (duk_hnatfunc *) func; + return (duk_int_t) nf->magic; + } + } + return 0; +} + +DUK_EXTERNAL duk_int_t duk_get_magic(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_require_tval(thr, idx); + if (DUK_TVAL_IS_OBJECT(tv)) { + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + if (!DUK_HOBJECT_HAS_NATFUNC(h)) { + goto type_error; + } + return (duk_int_t) ((duk_hnatfunc *) h)->magic; + } else if (DUK_TVAL_IS_LIGHTFUNC(tv)) { + duk_small_uint_t lf_flags = DUK_TVAL_GET_LIGHTFUNC_FLAGS(tv); + return (duk_int_t) DUK_LFUNC_FLAGS_GET_MAGIC(lf_flags); + } + + /* fall through */ +type_error: + DUK_ERROR_TYPE(thr, DUK_STR_UNEXPECTED_TYPE); + DUK_WO_NORETURN(return 0;); +} + +DUK_EXTERNAL void duk_set_magic(duk_hthread *thr, duk_idx_t idx, duk_int_t magic) { + duk_hnatfunc *nf; + + DUK_ASSERT_API_ENTRY(thr); + + nf = duk_require_hnatfunc(thr, idx); + DUK_ASSERT(nf != NULL); + nf->magic = (duk_int16_t) magic; +} + +/* + * Misc helpers + */ + +/* Resolve a bound function on value stack top to a non-bound target + * (leave other values as is). + */ +DUK_INTERNAL void duk_resolve_nonbound_function(duk_hthread *thr) { + duk_tval *tv; + + DUK_HTHREAD_ASSERT_VALID(thr); + + tv = DUK_GET_TVAL_NEGIDX(thr, -1); + if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *h; + + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + if (DUK_HOBJECT_HAS_BOUNDFUNC(h)) { + duk_push_tval(thr, &((duk_hboundfunc *) (void *) h)->target); + duk_replace(thr, -2); +#if 0 + DUK_TVAL_SET_TVAL(tv, &((duk_hboundfunc *) h)->target); + DUK_TVAL_INCREF(thr, tv); + DUK_HOBJECT_DECREF_NORZ(thr, h); +#endif + /* Rely on Function.prototype.bind() on never creating a bound + * function whose target is not proper. This is now safe + * because the target is not even an internal property but a + * struct member. + */ + DUK_ASSERT(duk_is_lightfunc(thr, -1) || duk_is_callable(thr, -1)); + } + } + + /* Lightfuncs cannot be bound but are always callable and + * constructable. + */ +} +#line 1 "duk_api_codec.c" +/* + * Encoding and decoding basic formats: hex, base64. + * + * These are in-place operations which may allow an optimized implementation. + * + * Base-64: https://tools.ietf.org/html/rfc4648#section-4 + */ + +/* #include duk_internal.h -> already included */ + +/* + * Misc helpers + */ + +/* Shared handling for encode/decode argument. Fast path handling for + * buffer and string values because they're the most common. In particular, + * avoid creating a temporary string or buffer when possible. Return value + * is guaranteed to be non-NULL, even for zero length input. + */ +DUK_LOCAL const duk_uint8_t *duk__prep_codec_arg(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_len) { + const void *def_ptr = (const void *) out_len; /* Any non-NULL pointer will do. */ + const void *ptr; + duk_bool_t isbuffer; + + DUK_ASSERT(out_len != NULL); + DUK_ASSERT(def_ptr != NULL); + DUK_ASSERT(duk_is_valid_index(thr, idx)); /* checked by caller */ + + ptr = (const void *) + duk_get_buffer_data_raw(thr, idx, out_len, NULL /*def_ptr*/, 0 /*def_size*/, 0 /*throw_flag*/, &isbuffer); + if (isbuffer) { + DUK_ASSERT(ptr != NULL || *out_len == 0U); + if (DUK_UNLIKELY(ptr == NULL)) { + ptr = def_ptr; + } + DUK_ASSERT(ptr != NULL); + } else { + /* For strings a non-NULL pointer is always guaranteed because + * at least a NUL will be present. + */ + ptr = (const void *) duk_to_lstring(thr, idx, out_len); + DUK_ASSERT(ptr != NULL); + } + DUK_ASSERT(ptr != NULL); + return (const duk_uint8_t *) ptr; +} + +/* + * Base64 + */ + +#if defined(DUK_USE_BASE64_SUPPORT) +/* Bytes emitted for number of padding characters in range [0,4]. */ +DUK_LOCAL const duk_int8_t duk__base64_decode_nequal_step[5] = { + 3, /* #### -> 24 bits, emit 3 bytes */ + 2, /* ###= -> 18 bits, emit 2 bytes */ + 1, /* ##== -> 12 bits, emit 1 byte */ + -1, /* #=== -> 6 bits, error */ + 0, /* ==== -> 0 bits, emit 0 bytes */ +}; + +#if defined(DUK_USE_BASE64_FASTPATH) +DUK_LOCAL const duk_uint8_t duk__base64_enctab_fast[64] = { + 0x41U, 0x42U, 0x43U, 0x44U, 0x45U, 0x46U, 0x47U, 0x48U, 0x49U, 0x4aU, 0x4bU, 0x4cU, 0x4dU, 0x4eU, 0x4fU, 0x50U, /* A...P */ + 0x51U, 0x52U, 0x53U, 0x54U, 0x55U, 0x56U, 0x57U, 0x58U, 0x59U, 0x5aU, 0x61U, 0x62U, 0x63U, 0x64U, 0x65U, 0x66U, /* Q...f */ + 0x67U, 0x68U, 0x69U, 0x6aU, 0x6bU, 0x6cU, 0x6dU, 0x6eU, 0x6fU, 0x70U, 0x71U, 0x72U, 0x73U, 0x74U, 0x75U, 0x76U, /* g...v */ + 0x77U, 0x78U, 0x79U, 0x7aU, 0x30U, 0x31U, 0x32U, 0x33U, 0x34U, 0x35U, 0x36U, 0x37U, 0x38U, 0x39U, 0x2bU, 0x2fU /* w.../ */ +}; +#endif /* DUK_USE_BASE64_FASTPATH */ + +#if defined(DUK_USE_BASE64_FASTPATH) +/* Decode table for one byte of input: + * -1 = allowed whitespace + * -2 = padding + * -3 = error + * 0...63 decoded bytes + */ +DUK_LOCAL const duk_int8_t duk__base64_dectab_fast[256] = { + -3, -3, -3, -3, -3, -3, -3, -3, -3, -1, -1, -3, -3, -1, -3, -3, /* 0x00...0x0f */ + -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, /* 0x10...0x1f */ + -1, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, 62, -3, -3, -3, 63, /* 0x20...0x2f */ + 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, -3, -3, -3, -2, -3, -3, /* 0x30...0x3f */ + -3, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, /* 0x40...0x4f */ + 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, -3, -3, -3, -3, -3, /* 0x50...0x5f */ + -3, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, /* 0x60...0x6f */ + 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, -3, -3, -3, -3, -3, /* 0x70...0x7f */ + -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, /* 0x80...0x8f */ + -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, /* 0x90...0x9f */ + -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, /* 0xa0...0xaf */ + -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, /* 0xb0...0xbf */ + -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, /* 0xc0...0xcf */ + -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, /* 0xd0...0xdf */ + -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, /* 0xe0...0xef */ + -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3 /* 0xf0...0xff */ +}; +#endif /* DUK_USE_BASE64_FASTPATH */ + +#if defined(DUK_USE_BASE64_FASTPATH) +DUK_LOCAL DUK_ALWAYS_INLINE void duk__base64_encode_fast_3(const duk_uint8_t *src, duk_uint8_t *dst) { + duk_uint_t t; + + t = (duk_uint_t) src[0]; + t = (t << 8) + (duk_uint_t) src[1]; + t = (t << 8) + (duk_uint_t) src[2]; + + dst[0] = duk__base64_enctab_fast[t >> 18]; + dst[1] = duk__base64_enctab_fast[(t >> 12) & 0x3fU]; + dst[2] = duk__base64_enctab_fast[(t >> 6) & 0x3fU]; + dst[3] = duk__base64_enctab_fast[t & 0x3fU]; + +#if 0 + /* Tested: not faster on x64, most likely due to aliasing between + * output and input index computation. + */ + /* aaaaaabb bbbbcccc ccdddddd */ + dst[0] = duk__base64_enctab_fast[(src[0] >> 2) & 0x3fU]; + dst[1] = duk__base64_enctab_fast[((src[0] << 4) & 0x30U) | ((src[1] >> 4) & 0x0fU)]; + dst[2] = duk__base64_enctab_fast[((src[1] << 2) & 0x3fU) | ((src[2] >> 6) & 0x03U)]; + dst[3] = duk__base64_enctab_fast[src[2] & 0x3fU]; +#endif +} + +DUK_LOCAL DUK_ALWAYS_INLINE void duk__base64_encode_fast_2(const duk_uint8_t *src, duk_uint8_t *dst) { + duk_uint_t t; + + t = (duk_uint_t) src[0]; + t = (t << 8) + (duk_uint_t) src[1]; + dst[0] = duk__base64_enctab_fast[t >> 10]; /* XXXXXX-- -------- */ + dst[1] = duk__base64_enctab_fast[(t >> 4) & 0x3fU]; /* ------XX XXXX---- */ + dst[2] = duk__base64_enctab_fast[(t << 2) & 0x3fU]; /* -------- ----XXXX */ + dst[3] = DUK_ASC_EQUALS; +} + +DUK_LOCAL DUK_ALWAYS_INLINE void duk__base64_encode_fast_1(const duk_uint8_t *src, duk_uint8_t *dst) { + duk_uint_t t; + + t = (duk_uint_t) src[0]; + dst[0] = duk__base64_enctab_fast[t >> 2]; /* XXXXXX-- */ + dst[1] = duk__base64_enctab_fast[(t << 4) & 0x3fU]; /* ------XX */ + dst[2] = DUK_ASC_EQUALS; + dst[3] = DUK_ASC_EQUALS; +} + +DUK_LOCAL void duk__base64_encode_helper(const duk_uint8_t *src, duk_size_t srclen, duk_uint8_t *dst) { + duk_size_t n; + const duk_uint8_t *p; + duk_uint8_t *q; + + n = srclen; + p = src; + q = dst; + + if (n >= 16U) { + /* Fast path, unrolled by 4, allows interleaving. Process + * 12-byte input chunks which encode to 16-char output chunks. + * Only enter when at least one block is emitted (avoids div+mul + * for short inputs too). + */ + const duk_uint8_t *p_end_fast; + + p_end_fast = p + ((n / 12U) * 12U); + DUK_ASSERT(p_end_fast >= p + 12); + do { + duk__base64_encode_fast_3(p, q); + duk__base64_encode_fast_3(p + 3, q + 4); + duk__base64_encode_fast_3(p + 6, q + 8); + duk__base64_encode_fast_3(p + 9, q + 12); + p += 12; + q += 16; + } while (DUK_LIKELY(p != p_end_fast)); + + DUK_ASSERT(src + srclen >= p); + n = (duk_size_t) (src + srclen - p); + DUK_ASSERT(n < 12U); + } + + /* Remainder. */ + while (n >= 3U) { + duk__base64_encode_fast_3(p, q); + p += 3; + q += 4; + n -= 3U; + } + DUK_ASSERT(n == 0U || n == 1U || n == 2U); + if (n == 1U) { + duk__base64_encode_fast_1(p, q); +#if 0 /* Unnecessary. */ + p += 1; + q += 4; + n -= 1U; +#endif + } else if (n == 2U) { + duk__base64_encode_fast_2(p, q); +#if 0 /* Unnecessary. */ + p += 2; + q += 4; + n -= 2U; +#endif + } else { + DUK_ASSERT(n == 0U); /* nothing to do */ + ; + } +} +#else /* DUK_USE_BASE64_FASTPATH */ +DUK_LOCAL void duk__base64_encode_helper(const duk_uint8_t *src, duk_size_t srclen, duk_uint8_t *dst) { + duk_small_uint_t i, npad; + duk_uint_t t, x, y; + const duk_uint8_t *p; + const duk_uint8_t *p_end; + duk_uint8_t *q; + + p = src; + p_end = src + srclen; + q = dst; + npad = 0U; + + while (p < p_end) { + /* Read 3 bytes into 't', padded by zero. */ + t = 0; + for (i = 0; i < 3; i++) { + t = t << 8; + if (p < p_end) { + t += (duk_uint_t) (*p++); + } else { + /* This only happens on the last loop and we're + * guaranteed to exit on the next loop. + */ + npad++; + } + } + DUK_ASSERT(npad <= 2U); + + /* Emit 4 encoded characters. If npad > 0, some of the + * chars will be incorrect (zero bits) but we fix up the + * padding after the loop. A straightforward 64-byte + * lookup would be faster and cleaner, but this is shorter. + */ + for (i = 0; i < 4; i++) { + x = ((t >> 18) & 0x3fU); + t = t << 6; + + if (x <= 51U) { + if (x <= 25) { + y = x + DUK_ASC_UC_A; + } else { + y = x - 26 + DUK_ASC_LC_A; + } + } else { + if (x <= 61U) { + y = x - 52 + DUK_ASC_0; + } else if (x == 62) { + y = DUK_ASC_PLUS; + } else { + DUK_ASSERT(x == 63); + y = DUK_ASC_SLASH; + } + } + + *q++ = (duk_uint8_t) y; + } + } + + /* Handle padding by rewriting 0-2 bogus characters at the end. + * + * Missing bytes npad base64 example + * 0 0 #### + * 1 1 ###= + * 2 2 ##== + */ + DUK_ASSERT(npad <= 2U); + while (npad > 0U) { + *(q - npad) = DUK_ASC_EQUALS; + npad--; + } +} +#endif /* DUK_USE_BASE64_FASTPATH */ + +#if defined(DUK_USE_BASE64_FASTPATH) +DUK_LOCAL duk_bool_t duk__base64_decode_helper(const duk_uint8_t *src, + duk_size_t srclen, + duk_uint8_t *dst, + duk_uint8_t **out_dst_final) { + duk_int_t x; + duk_uint_t t; + duk_small_uint_t n_equal; + duk_int8_t step; + const duk_uint8_t *p; + const duk_uint8_t *p_end; + const duk_uint8_t *p_end_safe; + duk_uint8_t *q; + + DUK_ASSERT(src != NULL); /* Required by pointer arithmetic below, which fails for NULL. */ + + p = src; + p_end = src + srclen; + p_end_safe = p_end - 8; /* If 'src <= src_end_safe', safe to read 8 bytes. */ + q = dst; + + /* Alternate between a fast path which processes clean groups with no + * padding or whitespace, and a slow path which processes one arbitrary + * group and then re-enters the fast path. This handles e.g. base64 + * with newlines reasonably well because the majority of a line is in + * the fast path. + */ + for (;;) { + /* Fast path, on each loop handle two 4-char input groups. + * If both are clean, emit 6 bytes and continue. If first + * is clean, emit 3 bytes and drop out; otherwise emit + * nothing and drop out. This approach could be extended to + * more groups per loop, but for inputs with e.g. periodic + * newlines (which are common) it might not be an improvement. + */ + while (DUK_LIKELY(p <= p_end_safe)) { + duk_int_t t1, t2; + + /* The lookup byte is intentionally sign extended to + * (at least) 32 bits and then ORed. This ensures + * that is at least 1 byte is negative, the highest + * bit of the accumulator will be set at the end and + * we don't need to check every byte. + * + * Read all input bytes first before writing output + * bytes to minimize aliasing. + */ + DUK_DDD(DUK_DDDPRINT("fast loop: p=%p, p_end_safe=%p, p_end=%p", + (const void *) p, + (const void *) p_end_safe, + (const void *) p_end)); + + t1 = (duk_int_t) duk__base64_dectab_fast[p[0]]; + t1 = (duk_int_t) ((duk_uint_t) t1 << 6) | (duk_int_t) duk__base64_dectab_fast[p[1]]; + t1 = (duk_int_t) ((duk_uint_t) t1 << 6) | (duk_int_t) duk__base64_dectab_fast[p[2]]; + t1 = (duk_int_t) ((duk_uint_t) t1 << 6) | (duk_int_t) duk__base64_dectab_fast[p[3]]; + + t2 = (duk_int_t) duk__base64_dectab_fast[p[4]]; + t2 = (duk_int_t) ((duk_uint_t) t2 << 6) | (duk_int_t) duk__base64_dectab_fast[p[5]]; + t2 = (duk_int_t) ((duk_uint_t) t2 << 6) | (duk_int_t) duk__base64_dectab_fast[p[6]]; + t2 = (duk_int_t) ((duk_uint_t) t2 << 6) | (duk_int_t) duk__base64_dectab_fast[p[7]]; + + q[0] = (duk_uint8_t) (((duk_uint_t) t1 >> 16) & 0xffU); + q[1] = (duk_uint8_t) (((duk_uint_t) t1 >> 8) & 0xffU); + q[2] = (duk_uint8_t) ((duk_uint_t) t1 & 0xffU); + + q[3] = (duk_uint8_t) (((duk_uint_t) t2 >> 16) & 0xffU); + q[4] = (duk_uint8_t) (((duk_uint_t) t2 >> 8) & 0xffU); + q[5] = (duk_uint8_t) ((duk_uint_t) t2 & 0xffU); + + /* Optimistic check using one branch. */ + if (DUK_LIKELY((t1 | t2) >= 0)) { + p += 8; + q += 6; + } else if (t1 >= 0) { + DUK_DDD( + DUK_DDDPRINT("fast loop first group was clean, second was not, process one slow path group")); + DUK_ASSERT(t2 < 0); + p += 4; + q += 3; + break; + } else { + DUK_DDD(DUK_DDDPRINT( + "fast loop first group was not clean, second does not matter, process one slow path group")); + DUK_ASSERT(t1 < 0); + break; + } + } /* fast path */ + + /* Slow path step 1: try to scan a 4-character encoded group, + * end-of-input, or start-of-padding. We exit with: + * 1. n_chars == 4: full group, no padding, no end-of-input. + * 2. n_chars < 4: partial group (may also be 0), encountered + * padding or end of input. + * + * The accumulator is initialized to 1; this allows us to detect + * a full group by comparing >= 0x1000000 without an extra + * counter variable. + */ + t = 1UL; + for (;;) { + DUK_DDD(DUK_DDDPRINT("slow loop: p=%p, p_end=%p, t=%lu", + (const void *) p, + (const void *) p_end, + (unsigned long) t)); + + if (DUK_LIKELY(p < p_end)) { + x = duk__base64_dectab_fast[*p++]; + if (DUK_LIKELY(x >= 0)) { + DUK_ASSERT(x >= 0 && x <= 63); + t = (t << 6) + (duk_uint_t) x; + if (t >= 0x1000000UL) { + break; + } + } else if (x == -1) { + continue; /* allowed ascii whitespace */ + } else if (x == -2) { + p--; + break; /* start of padding */ + } else { + DUK_ASSERT(x == -3); + goto decode_error; + } + } else { + break; /* end of input */ + } + } /* slow path step 1 */ + + /* Complete the padding by simulating pad characters, + * regardless of actual input padding chars. + */ + n_equal = 0; + while (t < 0x1000000UL) { + t = (t << 6) + 0U; + n_equal++; + } + + /* Slow path step 2: deal with full/partial group, padding, + * etc. Note that for num chars in [0,3] we intentionally emit + * 3 bytes but don't step forward that much, buffer space is + * guaranteed in setup. + * + * num chars: + * 0 #### no output (= step 0) + * 1 #=== reject, 6 bits of data + * 2 ##== 12 bits of data, output 1 byte (= step 1) + * 3 ###= 18 bits of data, output 2 bytes (= step 2) + * 4 #### 24 bits of data, output 3 bytes (= step 3) + */ + q[0] = (duk_uint8_t) ((t >> 16) & 0xffU); + q[1] = (duk_uint8_t) ((t >> 8) & 0xffU); + q[2] = (duk_uint8_t) (t & 0xffU); + + DUK_ASSERT(n_equal <= 4); + step = duk__base64_decode_nequal_step[n_equal]; + if (DUK_UNLIKELY(step < 0)) { + goto decode_error; + } + q += step; + + /* Slow path step 3: read and ignore padding and whitespace + * until (a) next non-padding and non-whitespace character + * after which we resume the fast path, or (b) end of input. + * This allows us to accept missing, partial, full, and extra + * padding cases uniformly. We also support concatenated + * base-64 documents because we resume scanning afterwards. + * + * Note that to support concatenated documents well, the '=' + * padding found inside the input must also allow for 'extra' + * padding. For example, 'Zm===' decodes to 'f' and has one + * extra padding char. So, 'Zm===Zm' should decode 'ff', even + * though the standard break-up would be 'Zm==' + '=Zm' which + * doesn't make sense. + * + * We also accept prepended padding like '==Zm9', because it + * is equivalent to an empty document with extra padding ('==') + * followed by a valid document. + */ + + for (;;) { + if (DUK_UNLIKELY(p >= p_end)) { + goto done; + } + x = duk__base64_dectab_fast[*p++]; + if (x == -1 || x == -2) { + ; /* padding or whitespace, keep eating */ + } else { + p--; + break; /* backtrack and go back to fast path, even for -1 */ + } + } /* slow path step 3 */ + } /* outer fast+slow path loop */ + +done: + DUK_DDD(DUK_DDDPRINT("done; p=%p, p_end=%p", (const void *) p, (const void *) p_end)); + + DUK_ASSERT(p == p_end); + + *out_dst_final = q; + return 1; + +decode_error: + return 0; +} +#else /* DUK_USE_BASE64_FASTPATH */ +DUK_LOCAL duk_bool_t duk__base64_decode_helper(const duk_uint8_t *src, + duk_size_t srclen, + duk_uint8_t *dst, + duk_uint8_t **out_dst_final) { + duk_uint_t t, x; + duk_int_t y; + duk_int8_t step; + const duk_uint8_t *p; + const duk_uint8_t *p_end; + duk_uint8_t *q; + /* 0x09, 0x0a, or 0x0d */ + duk_uint32_t mask_white = (1U << 9) | (1U << 10) | (1U << 13); + + /* 't' tracks progress of the decoded group: + * + * t == 1 no valid chars yet + * t >= 0x40 1x6 = 6 bits shifted in + * t >= 0x1000 2x6 = 12 bits shifted in + * t >= 0x40000 3x6 = 18 bits shifted in + * t >= 0x1000000 4x6 = 24 bits shifted in + * + * By initializing t=1 there's no need for a separate counter for + * the number of characters found so far. + */ + p = src; + p_end = src + srclen; + q = dst; + t = 1UL; + + for (;;) { + duk_small_uint_t n_equal; + + DUK_ASSERT(t >= 1U); + if (p >= p_end) { + /* End of input: if input exists, treat like + * start of padding, finish the block, then + * re-enter here to see we're done. + */ + if (t == 1U) { + break; + } else { + goto simulate_padding; + } + } + + x = *p++; + + if (x >= 0x41U) { + /* Valid: a-z and A-Z. */ + DUK_ASSERT(x >= 0x41U && x <= 0xffU); + if (x >= 0x61U && x <= 0x7aU) { + y = (duk_int_t) x - 0x61 + 26; + } else if (x <= 0x5aU) { + y = (duk_int_t) x - 0x41; + } else { + goto decode_error; + } + } else if (x >= 0x30U) { + /* Valid: 0-9 and =. */ + DUK_ASSERT(x >= 0x30U && x <= 0x40U); + if (x <= 0x39U) { + y = (duk_int_t) x - 0x30 + 52; + } else if (x == 0x3dU) { + /* Skip padding and whitespace unless we're in the + * middle of a block. Otherwise complete group by + * simulating shifting in the correct padding. + */ + if (t == 1U) { + continue; + } + goto simulate_padding; + } else { + goto decode_error; + } + } else if (x >= 0x20U) { + /* Valid: +, /, and 0x20 whitespace. */ + DUK_ASSERT(x >= 0x20U && x <= 0x2fU); + if (x == 0x2bU) { + y = 62; + } else if (x == 0x2fU) { + y = 63; + } else if (x == 0x20U) { + continue; + } else { + goto decode_error; + } + } else { + /* Valid: whitespace. */ + duk_uint32_t m; + DUK_ASSERT(x < 0x20U); /* 0x00 to 0x1f */ + m = (1U << x); + if (mask_white & m) { + /* Allow basic ASCII whitespace. */ + continue; + } else { + goto decode_error; + } + } + + DUK_ASSERT(y >= 0 && y <= 63); + t = (t << 6) + (duk_uint_t) y; + if (t < 0x1000000UL) { + continue; + } + /* fall through; no padding will be added */ + + simulate_padding: + n_equal = 0; + while (t < 0x1000000UL) { + t = (t << 6) + 0U; + n_equal++; + } + + /* Output 3 bytes from 't' and advance as needed. */ + q[0] = (duk_uint8_t) ((t >> 16) & 0xffU); + q[1] = (duk_uint8_t) ((t >> 8) & 0xffU); + q[2] = (duk_uint8_t) (t & 0xffU); + + DUK_ASSERT(n_equal <= 4U); + step = duk__base64_decode_nequal_step[n_equal]; + if (step < 0) { + goto decode_error; + } + q += step; + + /* Re-enter loop. The actual padding characters are skipped + * by the main loop. This handles cases like missing, partial, + * full, and extra padding, and allows parsing of concatenated + * documents (with extra padding) like: Zm===Zm. Also extra + * prepended padding is accepted: ===Zm9v. + */ + t = 1U; + } + DUK_ASSERT(t == 1UL); + + *out_dst_final = q; + return 1; + +decode_error: + return 0; +} +#endif /* DUK_USE_BASE64_FASTPATH */ + +DUK_EXTERNAL const char *duk_base64_encode(duk_hthread *thr, duk_idx_t idx) { + const duk_uint8_t *src; + duk_size_t srclen; + duk_size_t dstlen; + duk_uint8_t *dst; + const char *ret; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + src = duk__prep_codec_arg(thr, idx, &srclen); + DUK_ASSERT(src != NULL); + + /* Compute exact output length. Computation must not wrap; this + * limit works for 32-bit size_t: + * >>> srclen = 3221225469 + * >>> '%x' % ((srclen + 2) / 3 * 4) + * 'fffffffc' + */ + if (srclen > 3221225469UL) { + goto type_error; + } + dstlen = (srclen + 2U) / 3U * 4U; + dst = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, dstlen); + + duk__base64_encode_helper((const duk_uint8_t *) src, srclen, dst); + + ret = duk_buffer_to_string(thr, -1); /* Safe, result is ASCII. */ + duk_replace(thr, idx); + return ret; + +type_error: + DUK_ERROR_TYPE(thr, DUK_STR_BASE64_ENCODE_FAILED); + DUK_WO_NORETURN(return NULL;); +} + +DUK_EXTERNAL void duk_base64_decode(duk_hthread *thr, duk_idx_t idx) { + const duk_uint8_t *src; + duk_size_t srclen; + duk_size_t dstlen; + duk_uint8_t *dst; + duk_uint8_t *dst_final; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + src = duk__prep_codec_arg(thr, idx, &srclen); + DUK_ASSERT(src != NULL); + + /* Round up and add safety margin. Avoid addition before division to + * avoid possibility of wrapping. Margin includes +3 for rounding up, + * and +3 for one extra group: the decoder may emit and then backtrack + * a full group (3 bytes) from zero-sized input for technical reasons. + * Similarly, 'xx' may ecause 1+3 = bytes to be emitted and then + * backtracked. + */ + dstlen = (srclen / 4) * 3 + 6; /* upper limit, assuming no whitespace etc */ + dst = (duk_uint8_t *) duk_push_dynamic_buffer(thr, dstlen); + /* Note: for dstlen=0, dst may be NULL */ + + if (!duk__base64_decode_helper((const duk_uint8_t *) src, srclen, dst, &dst_final)) { + goto type_error; + } + + /* XXX: convert to fixed buffer? */ + (void) duk_resize_buffer(thr, -1, (duk_size_t) (dst_final - dst)); + duk_replace(thr, idx); + return; + +type_error: + DUK_ERROR_TYPE(thr, DUK_STR_BASE64_DECODE_FAILED); + DUK_WO_NORETURN(return;); +} +#else /* DUK_USE_BASE64_SUPPORT */ +DUK_EXTERNAL const char *duk_base64_encode(duk_hthread *thr, duk_idx_t idx) { + DUK_UNREF(idx); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return NULL;); +} + +DUK_EXTERNAL void duk_base64_decode(duk_hthread *thr, duk_idx_t idx) { + DUK_UNREF(idx); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return;); +} +#endif /* DUK_USE_BASE64_SUPPORT */ + +/* + * Hex + */ + +#if defined(DUK_USE_HEX_SUPPORT) +DUK_EXTERNAL const char *duk_hex_encode(duk_hthread *thr, duk_idx_t idx) { + const duk_uint8_t *inp; + duk_size_t len; + duk_size_t i; + duk_uint8_t *buf; + const char *ret; +#if defined(DUK_USE_HEX_FASTPATH) + duk_size_t len_safe; + duk_uint16_t *p16; +#endif + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + inp = duk__prep_codec_arg(thr, idx, &len); + DUK_ASSERT(inp != NULL); + + /* Fixed buffer, no zeroing because we'll fill all the data. */ + buf = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, len * 2); + DUK_ASSERT(buf != NULL); + +#if defined(DUK_USE_HEX_FASTPATH) + DUK_ASSERT((((duk_size_t) buf) & 0x01U) == 0); /* pointer is aligned, guaranteed for fixed buffer */ + p16 = (duk_uint16_t *) (void *) buf; + len_safe = len & ~0x03U; + for (i = 0; i < len_safe; i += 4) { + p16[0] = duk_hex_enctab[inp[i]]; + p16[1] = duk_hex_enctab[inp[i + 1]]; + p16[2] = duk_hex_enctab[inp[i + 2]]; + p16[3] = duk_hex_enctab[inp[i + 3]]; + p16 += 4; + } + for (; i < len; i++) { + *p16++ = duk_hex_enctab[inp[i]]; + } +#else /* DUK_USE_HEX_FASTPATH */ + for (i = 0; i < len; i++) { + duk_small_uint_t t; + t = (duk_small_uint_t) inp[i]; + buf[i * 2 + 0] = duk_lc_digits[t >> 4]; + buf[i * 2 + 1] = duk_lc_digits[t & 0x0f]; + } +#endif /* DUK_USE_HEX_FASTPATH */ + + /* XXX: Using a string return value forces a string intern which is + * not always necessary. As a rough performance measure, hex encode + * time for tests/perf/test-hex-encode.js dropped from ~35s to ~15s + * without string coercion. Change to returning a buffer and let the + * caller coerce to string if necessary? + */ + + ret = duk_buffer_to_string(thr, -1); /* Safe, result is ASCII. */ + duk_replace(thr, idx); + return ret; +} + +DUK_EXTERNAL void duk_hex_decode(duk_hthread *thr, duk_idx_t idx) { + const duk_uint8_t *inp; + duk_size_t len; + duk_size_t i; + duk_int_t t; + duk_uint8_t *buf; +#if defined(DUK_USE_HEX_FASTPATH) + duk_int_t chk; + duk_uint8_t *p; + duk_size_t len_safe; +#endif + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + inp = duk__prep_codec_arg(thr, idx, &len); + DUK_ASSERT(inp != NULL); + + if (len & 0x01) { + goto type_error; + } + + /* Fixed buffer, no zeroing because we'll fill all the data. */ + buf = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, len / 2); + DUK_ASSERT(buf != NULL); + +#if defined(DUK_USE_HEX_FASTPATH) + p = buf; + len_safe = len & ~0x07U; + for (i = 0; i < len_safe; i += 8) { + t = ((duk_int_t) duk_hex_dectab_shift4[inp[i]]) | ((duk_int_t) duk_hex_dectab[inp[i + 1]]); + chk = t; + p[0] = (duk_uint8_t) t; + t = ((duk_int_t) duk_hex_dectab_shift4[inp[i + 2]]) | ((duk_int_t) duk_hex_dectab[inp[i + 3]]); + chk |= t; + p[1] = (duk_uint8_t) t; + t = ((duk_int_t) duk_hex_dectab_shift4[inp[i + 4]]) | ((duk_int_t) duk_hex_dectab[inp[i + 5]]); + chk |= t; + p[2] = (duk_uint8_t) t; + t = ((duk_int_t) duk_hex_dectab_shift4[inp[i + 6]]) | ((duk_int_t) duk_hex_dectab[inp[i + 7]]); + chk |= t; + p[3] = (duk_uint8_t) t; + p += 4; + + /* Check if any lookup above had a negative result. */ + if (DUK_UNLIKELY(chk < 0)) { + goto type_error; + } + } + for (; i < len; i += 2) { + /* First cast to duk_int_t to sign extend, second cast to + * duk_uint_t to avoid signed left shift, and final cast to + * duk_int_t result type. + */ + t = (duk_int_t) ((((duk_uint_t) (duk_int_t) duk_hex_dectab[inp[i]]) << 4U) | + ((duk_uint_t) (duk_int_t) duk_hex_dectab[inp[i + 1]])); + if (DUK_UNLIKELY(t < 0)) { + goto type_error; + } + *p++ = (duk_uint8_t) t; + } +#else /* DUK_USE_HEX_FASTPATH */ + for (i = 0; i < len; i += 2) { + /* For invalid characters the value -1 gets extended to + * at least 16 bits. If either nybble is invalid, the + * resulting 't' will be < 0. + */ + t = (duk_int_t) ((((duk_uint_t) (duk_int_t) duk_hex_dectab[inp[i]]) << 4U) | + ((duk_uint_t) (duk_int_t) duk_hex_dectab[inp[i + 1]])); + if (DUK_UNLIKELY(t < 0)) { + goto type_error; + } + buf[i >> 1] = (duk_uint8_t) t; + } +#endif /* DUK_USE_HEX_FASTPATH */ + + duk_replace(thr, idx); + return; + +type_error: + DUK_ERROR_TYPE(thr, DUK_STR_HEX_DECODE_FAILED); + DUK_WO_NORETURN(return;); +} +#else /* DUK_USE_HEX_SUPPORT */ +DUK_EXTERNAL const char *duk_hex_encode(duk_hthread *thr, duk_idx_t idx) { + DUK_UNREF(idx); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return NULL;); +} +DUK_EXTERNAL void duk_hex_decode(duk_hthread *thr, duk_idx_t idx) { + DUK_UNREF(idx); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return;); +} +#endif /* DUK_USE_HEX_SUPPORT */ + +/* + * JSON + */ + +#if defined(DUK_USE_JSON_SUPPORT) +DUK_EXTERNAL const char *duk_json_encode(duk_hthread *thr, duk_idx_t idx) { +#if defined(DUK_USE_ASSERTIONS) + duk_idx_t top_at_entry; +#endif + const char *ret; + + DUK_ASSERT_API_ENTRY(thr); +#if defined(DUK_USE_ASSERTIONS) + top_at_entry = duk_get_top(thr); +#endif + + idx = duk_require_normalize_index(thr, idx); + duk_bi_json_stringify_helper(thr, + idx /*idx_value*/, + DUK_INVALID_INDEX /*idx_replacer*/, + DUK_INVALID_INDEX /*idx_space*/, + 0 /*flags*/); + DUK_ASSERT(duk_is_string(thr, -1)); + duk_replace(thr, idx); + ret = duk_get_string(thr, idx); + + DUK_ASSERT(duk_get_top(thr) == top_at_entry); + + return ret; +} + +DUK_EXTERNAL void duk_json_decode(duk_hthread *thr, duk_idx_t idx) { +#if defined(DUK_USE_ASSERTIONS) + duk_idx_t top_at_entry; +#endif + + DUK_ASSERT_API_ENTRY(thr); +#if defined(DUK_USE_ASSERTIONS) + top_at_entry = duk_get_top(thr); +#endif + + idx = duk_require_normalize_index(thr, idx); + duk_bi_json_parse_helper(thr, idx /*idx_value*/, DUK_INVALID_INDEX /*idx_reviver*/, 0 /*flags*/); + duk_replace(thr, idx); + + DUK_ASSERT(duk_get_top(thr) == top_at_entry); +} +#else /* DUK_USE_JSON_SUPPORT */ +DUK_EXTERNAL const char *duk_json_encode(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(idx); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return NULL;); +} + +DUK_EXTERNAL void duk_json_decode(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(idx); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return;); +} +#endif /* DUK_USE_JSON_SUPPORT */ +#line 1 "duk_api_compile.c" +/* + * Compilation and evaluation + */ + +/* #include duk_internal.h -> already included */ + +typedef struct duk__compile_raw_args duk__compile_raw_args; +struct duk__compile_raw_args { + duk_size_t src_length; /* should be first on 64-bit platforms */ + const duk_uint8_t *src_buffer; + duk_uint_t flags; +}; + +/* Eval is just a wrapper now. */ +DUK_EXTERNAL duk_int_t duk_eval_raw(duk_hthread *thr, const char *src_buffer, duk_size_t src_length, duk_uint_t flags) { + duk_int_t rc; + + DUK_ASSERT_API_ENTRY(thr); + + /* Note: strictness is *not* inherited from the current Duktape/C. + * This would be confusing because the current strictness state + * depends on whether we're running inside a Duktape/C activation + * (= strict mode) or outside of any activation (= non-strict mode). + * See tests/api/test-eval-strictness.c for more discussion. + */ + + /* [ ... source? filename? ] (depends on flags) */ + + rc = duk_compile_raw(thr, + src_buffer, + src_length, + flags | DUK_COMPILE_EVAL); /* may be safe, or non-safe depending on flags */ + + /* [ ... closure/error ] */ + + if (rc != DUK_EXEC_SUCCESS) { + rc = DUK_EXEC_ERROR; + goto got_rc; + } + + duk_push_global_object(thr); /* explicit 'this' binding, see GH-164 */ + + if (flags & DUK_COMPILE_SAFE) { + rc = duk_pcall_method(thr, 0); + } else { + duk_call_method(thr, 0); + rc = DUK_EXEC_SUCCESS; + } + + /* [ ... result/error ] */ + +got_rc: + if (flags & DUK_COMPILE_NORESULT) { + duk_pop(thr); + } + + return rc; +} + +/* Helper which can be called both directly and with duk_safe_call(). */ +DUK_LOCAL duk_ret_t duk__do_compile(duk_hthread *thr, void *udata) { + duk__compile_raw_args *comp_args; + duk_uint_t flags; + duk_hcompfunc *h_templ; + + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(udata != NULL); + + /* Note: strictness is not inherited from the current Duktape/C + * context. Otherwise it would not be possible to compile + * non-strict code inside a Duktape/C activation (which is + * always strict now). See tests/api/test-eval-strictness.c + * for discussion. + */ + + /* [ ... source? filename? ] (depends on flags) */ + + comp_args = (duk__compile_raw_args *) udata; + flags = comp_args->flags; + + if (flags & DUK_COMPILE_NOFILENAME) { + /* Automatic filename: 'eval' or 'input'. */ + duk_push_hstring_stridx(thr, (flags & DUK_COMPILE_EVAL) ? DUK_STRIDX_EVAL : DUK_STRIDX_INPUT); + } + + /* [ ... source? filename ] */ + + if (!comp_args->src_buffer) { + duk_hstring *h_sourcecode; + + h_sourcecode = duk_get_hstring(thr, -2); + if ((flags & DUK_COMPILE_NOSOURCE) || /* args incorrect */ + (h_sourcecode == NULL)) { /* e.g. duk_push_string_file_raw() pushed undefined */ + DUK_ERROR_TYPE(thr, DUK_STR_NO_SOURCECODE); + DUK_WO_NORETURN(return 0;); + } + DUK_ASSERT(h_sourcecode != NULL); + comp_args->src_buffer = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_sourcecode); + comp_args->src_length = (duk_size_t) DUK_HSTRING_GET_BYTELEN(h_sourcecode); + } + DUK_ASSERT(comp_args->src_buffer != NULL); + + if (flags & DUK_COMPILE_FUNCTION) { + flags |= DUK_COMPILE_EVAL | DUK_COMPILE_FUNCEXPR; + } + + /* [ ... source? filename ] */ + + duk_js_compile(thr, comp_args->src_buffer, comp_args->src_length, flags); + + /* [ ... source? func_template ] */ + + if (flags & DUK_COMPILE_NOSOURCE) { + ; + } else { + duk_remove_m2(thr); + } + + /* [ ... func_template ] */ + + h_templ = (duk_hcompfunc *) duk_known_hobject(thr, -1); + duk_js_push_closure(thr, + h_templ, + thr->builtins[DUK_BIDX_GLOBAL_ENV], + thr->builtins[DUK_BIDX_GLOBAL_ENV], + 1 /*add_auto_proto*/); + duk_remove_m2(thr); /* -> [ ... closure ] */ + + /* [ ... closure ] */ + + return 1; +} + +DUK_EXTERNAL duk_int_t duk_compile_raw(duk_hthread *thr, const char *src_buffer, duk_size_t src_length, duk_uint_t flags) { + duk__compile_raw_args comp_args_alloc; + duk__compile_raw_args *comp_args = &comp_args_alloc; + + DUK_ASSERT_API_ENTRY(thr); + + if ((flags & DUK_COMPILE_STRLEN) && (src_buffer != NULL)) { + /* String length is computed here to avoid multiple evaluation + * of a macro argument in the calling side. + */ + src_length = DUK_STRLEN(src_buffer); + } + + comp_args->src_buffer = (const duk_uint8_t *) src_buffer; + comp_args->src_length = src_length; + comp_args->flags = flags; + + /* [ ... source? filename? ] (depends on flags) */ + + if (flags & DUK_COMPILE_SAFE) { + duk_int_t rc; + duk_int_t nargs; + duk_int_t nrets = 1; + + /* Arguments can be: [ source? filename? &comp_args] so that + * nargs is 1 to 3. Call site encodes the correct nargs count + * directly into flags. + */ + nargs = flags & 0x07; + DUK_ASSERT(nargs == ((flags & DUK_COMPILE_NOSOURCE) ? 0 : 1) + ((flags & DUK_COMPILE_NOFILENAME) ? 0 : 1)); + rc = duk_safe_call(thr, duk__do_compile, (void *) comp_args, nargs, nrets); + + /* [ ... closure ] */ + return rc; + } + + (void) duk__do_compile(thr, (void *) comp_args); + + /* [ ... closure ] */ + return DUK_EXEC_SUCCESS; +} +#line 1 "duk_api_debug.c" +/* + * Debugging related API calls + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_JSON_SUPPORT) +DUK_EXTERNAL void duk_push_context_dump(duk_hthread *thr) { + duk_idx_t idx; + duk_idx_t top; + + DUK_ASSERT_API_ENTRY(thr); + + /* We don't duk_require_stack() here now, but rely on the caller having + * enough space. + */ + + top = duk_get_top(thr); + duk_push_bare_array(thr); + for (idx = 0; idx < top; idx++) { + duk_dup(thr, idx); + duk_put_prop_index(thr, -2, (duk_uarridx_t) idx); + } + + /* XXX: conversion errors should not propagate outwards. + * Perhaps values need to be coerced individually? + */ + duk_bi_json_stringify_helper(thr, + duk_get_top_index(thr), /*idx_value*/ + DUK_INVALID_INDEX, /*idx_replacer*/ + DUK_INVALID_INDEX, /*idx_space*/ + DUK_JSON_FLAG_EXT_CUSTOM | DUK_JSON_FLAG_ASCII_ONLY | + DUK_JSON_FLAG_AVOID_KEY_QUOTES /*flags*/); + + duk_push_sprintf(thr, "ctx: top=%ld, stack=%s", (long) top, (const char *) duk_safe_to_string(thr, -1)); + duk_replace(thr, -3); /* [ ... arr jsonx(arr) res ] -> [ ... res jsonx(arr) ] */ + duk_pop(thr); + DUK_ASSERT(duk_is_string(thr, -1)); +} +#else /* DUK_USE_JSON_SUPPORT */ +DUK_EXTERNAL void duk_push_context_dump(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return;); +} +#endif /* DUK_USE_JSON_SUPPORT */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + +DUK_EXTERNAL void duk_debugger_attach(duk_hthread *thr, + duk_debug_read_function read_cb, + duk_debug_write_function write_cb, + duk_debug_peek_function peek_cb, + duk_debug_read_flush_function read_flush_cb, + duk_debug_write_flush_function write_flush_cb, + duk_debug_request_function request_cb, + duk_debug_detached_function detached_cb, + void *udata) { + duk_heap *heap; + const char *str; + duk_size_t len; + + /* XXX: should there be an error or an automatic detach if + * already attached? + */ + + DUK_D(DUK_DPRINT("application called duk_debugger_attach()")); + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(read_cb != NULL); + DUK_ASSERT(write_cb != NULL); + /* Other callbacks are optional. */ + + heap = thr->heap; + heap->dbg_read_cb = read_cb; + heap->dbg_write_cb = write_cb; + heap->dbg_peek_cb = peek_cb; + heap->dbg_read_flush_cb = read_flush_cb; + heap->dbg_write_flush_cb = write_flush_cb; + heap->dbg_request_cb = request_cb; + heap->dbg_detached_cb = detached_cb; + heap->dbg_udata = udata; + heap->dbg_have_next_byte = 0; + + /* Start in paused state. */ + heap->dbg_processing = 0; + heap->dbg_state_dirty = 0; + heap->dbg_force_restart = 0; + heap->dbg_pause_flags = 0; + heap->dbg_pause_act = NULL; + heap->dbg_pause_startline = 0; + heap->dbg_exec_counter = 0; + heap->dbg_last_counter = 0; + heap->dbg_last_time = 0.0; + duk_debug_set_paused(heap); /* XXX: overlap with fields above */ + + /* Send version identification and flush right afterwards. Note that + * we must write raw, unframed bytes here. + */ + duk_push_sprintf(thr, + "%ld %ld %s %s\n", + (long) DUK_DEBUG_PROTOCOL_VERSION, + (long) DUK_VERSION, + (const char *) DUK_GIT_DESCRIBE, + (const char *) DUK_USE_TARGET_INFO); + str = duk_get_lstring(thr, -1, &len); + DUK_ASSERT(str != NULL); + duk_debug_write_bytes(thr, (const duk_uint8_t *) str, len); + duk_debug_write_flush(thr); + duk_pop(thr); +} + +DUK_EXTERNAL void duk_debugger_detach(duk_hthread *thr) { + DUK_D(DUK_DPRINT("application called duk_debugger_detach()")); + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->heap != NULL); + + /* Can be called multiple times with no harm. */ + duk_debug_do_detach(thr->heap); +} + +DUK_EXTERNAL void duk_debugger_cooperate(duk_hthread *thr) { + duk_bool_t processed_messages; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->heap != NULL); + + if (!duk_debug_is_attached(thr->heap)) { + return; + } + if (thr->callstack_curr != NULL || thr->heap->dbg_processing) { + /* Calling duk_debugger_cooperate() while Duktape is being + * called into is not supported. This is not a 100% check + * but prevents any damage in most cases. + */ + return; + } + + processed_messages = duk_debug_process_messages(thr, 1 /*no_block*/); + DUK_UNREF(processed_messages); +} + +DUK_EXTERNAL duk_bool_t duk_debugger_notify(duk_hthread *thr, duk_idx_t nvalues) { + duk_idx_t top; + duk_idx_t idx; + duk_bool_t ret = 0; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->heap != NULL); + + DUK_D(DUK_DPRINT("application called duk_debugger_notify() with nvalues=%ld", (long) nvalues)); + + top = duk_get_top(thr); + if (top < nvalues) { + DUK_ERROR_RANGE(thr, "not enough stack values for notify"); + DUK_WO_NORETURN(return 0;); + } + if (duk_debug_is_attached(thr->heap)) { + duk_debug_write_notify(thr, DUK_DBG_CMD_APPNOTIFY); + for (idx = top - nvalues; idx < top; idx++) { + duk_tval *tv = DUK_GET_TVAL_POSIDX(thr, idx); + duk_debug_write_tval(thr, tv); + } + duk_debug_write_eom(thr); + + /* Return non-zero (true) if we have a good reason to believe + * the notify was delivered; if we're still attached at least + * a transport error was not indicated by the transport write + * callback. This is not a 100% guarantee of course. + */ + if (duk_debug_is_attached(thr->heap)) { + ret = 1; + } + } + duk_pop_n(thr, nvalues); + return ret; +} + +DUK_EXTERNAL void duk_debugger_pause(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->heap != NULL); + + DUK_D(DUK_DPRINT("application called duk_debugger_pause()")); + + /* Treat like a debugger statement: ignore when not attached. */ + if (duk_debug_is_attached(thr->heap)) { + if (duk_debug_is_paused(thr->heap)) { + DUK_D(DUK_DPRINT("duk_debugger_pause() called when already paused; ignoring")); + } else { + duk_debug_set_paused(thr->heap); + + /* Pause on the next opcode executed. This is always safe to do even + * inside the debugger message loop: the interrupt counter will be reset + * to its proper value when the message loop exits. + */ + thr->interrupt_init = 1; + thr->interrupt_counter = 0; + } + } +} + +#else /* DUK_USE_DEBUGGER_SUPPORT */ + +DUK_EXTERNAL void duk_debugger_attach(duk_hthread *thr, + duk_debug_read_function read_cb, + duk_debug_write_function write_cb, + duk_debug_peek_function peek_cb, + duk_debug_read_flush_function read_flush_cb, + duk_debug_write_flush_function write_flush_cb, + duk_debug_request_function request_cb, + duk_debug_detached_function detached_cb, + void *udata) { + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(read_cb); + DUK_UNREF(write_cb); + DUK_UNREF(peek_cb); + DUK_UNREF(read_flush_cb); + DUK_UNREF(write_flush_cb); + DUK_UNREF(request_cb); + DUK_UNREF(detached_cb); + DUK_UNREF(udata); + DUK_ERROR_TYPE(thr, "no debugger support"); + DUK_WO_NORETURN(return;); +} + +DUK_EXTERNAL void duk_debugger_detach(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ERROR_TYPE(thr, "no debugger support"); + DUK_WO_NORETURN(return;); +} + +DUK_EXTERNAL void duk_debugger_cooperate(duk_hthread *thr) { + /* nop */ + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(thr); +} + +DUK_EXTERNAL duk_bool_t duk_debugger_notify(duk_hthread *thr, duk_idx_t nvalues) { + duk_idx_t top; + + DUK_ASSERT_API_ENTRY(thr); + + top = duk_get_top(thr); + if (top < nvalues) { + DUK_ERROR_RANGE_INVALID_COUNT(thr); + DUK_WO_NORETURN(return 0;); + } + + /* No debugger support, just pop values. */ + duk_pop_n(thr, nvalues); + return 0; +} + +DUK_EXTERNAL void duk_debugger_pause(duk_hthread *thr) { + /* Treat like debugger statement: nop */ + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(thr); +} + +#endif /* DUK_USE_DEBUGGER_SUPPORT */ +#line 1 "duk_api_heap.c" +/* + * Heap creation and destruction + */ + +/* #include duk_internal.h -> already included */ + +typedef struct duk_internal_thread_state duk_internal_thread_state; + +struct duk_internal_thread_state { + duk_ljstate lj; + duk_bool_t creating_error; + duk_hthread *curr_thread; + duk_uint8_t thread_state; + duk_int_t call_recursion_depth; +}; + +DUK_EXTERNAL duk_hthread *duk_create_heap(duk_alloc_function alloc_func, + duk_realloc_function realloc_func, + duk_free_function free_func, + void *heap_udata, + duk_fatal_function fatal_handler) { + duk_heap *heap = NULL; + duk_hthread *thr; + + /* Assume that either all memory funcs are NULL or non-NULL, mixed + * cases will now be unsafe. + */ + + /* XXX: just assert non-NULL values here and make caller arguments + * do the defaulting to the default implementations (smaller code)? + */ + + if (!alloc_func) { + DUK_ASSERT(realloc_func == NULL); + DUK_ASSERT(free_func == NULL); +#if defined(DUK_USE_PROVIDE_DEFAULT_ALLOC_FUNCTIONS) + alloc_func = duk_default_alloc_function; + realloc_func = duk_default_realloc_function; + free_func = duk_default_free_function; +#else + DUK_D(DUK_DPRINT("no allocation functions given and no default providers")); + return NULL; +#endif + } else { + DUK_ASSERT(realloc_func != NULL); + DUK_ASSERT(free_func != NULL); + } + + if (!fatal_handler) { + fatal_handler = duk_default_fatal_handler; + } + + DUK_ASSERT(alloc_func != NULL); + DUK_ASSERT(realloc_func != NULL); + DUK_ASSERT(free_func != NULL); + DUK_ASSERT(fatal_handler != NULL); + + heap = duk_heap_alloc(alloc_func, realloc_func, free_func, heap_udata, fatal_handler); + if (!heap) { + return NULL; + } + thr = heap->heap_thread; + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + return thr; +} + +DUK_EXTERNAL void duk_destroy_heap(duk_hthread *thr) { + duk_heap *heap; + + if (!thr) { + return; + } + DUK_ASSERT_API_ENTRY(thr); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + + duk_heap_free(heap); +} + +DUK_EXTERNAL void duk_suspend(duk_hthread *thr, duk_thread_state *state) { + duk_internal_thread_state *snapshot = (duk_internal_thread_state *) (void *) state; + duk_heap *heap; + duk_ljstate *lj; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(state != NULL); /* unvalidated */ + + /* Currently not supported when called from within a finalizer. + * If that is done, the finalizer will remain running indefinitely, + * preventing other finalizers from executing. The assert is a bit + * wider, checking that it would be OK to run pending finalizers. + */ + DUK_ASSERT(thr->heap->pf_prevent_count == 0); + + /* Currently not supported to duk_suspend() from an errCreate() + * call. + */ + DUK_ASSERT(thr->heap->creating_error == 0); + + heap = thr->heap; + lj = &heap->lj; + + duk_push_tval(thr, &lj->value1); + duk_push_tval(thr, &lj->value2); + + /* XXX: creating_error == 0 is asserted above, so no need to store. */ + duk_memcpy((void *) &snapshot->lj, (const void *) lj, sizeof(duk_ljstate)); + snapshot->creating_error = heap->creating_error; + snapshot->curr_thread = heap->curr_thread; + snapshot->thread_state = thr->state; + snapshot->call_recursion_depth = heap->call_recursion_depth; + + lj->jmpbuf_ptr = NULL; + lj->type = DUK_LJ_TYPE_UNKNOWN; + DUK_TVAL_SET_UNDEFINED(&lj->value1); + DUK_TVAL_SET_UNDEFINED(&lj->value2); + heap->creating_error = 0; + heap->curr_thread = NULL; + heap->call_recursion_depth = 0; + + thr->state = DUK_HTHREAD_STATE_INACTIVE; +} + +DUK_EXTERNAL void duk_resume(duk_hthread *thr, const duk_thread_state *state) { + const duk_internal_thread_state *snapshot = (const duk_internal_thread_state *) (const void *) state; + duk_heap *heap; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(state != NULL); /* unvalidated */ + + /* Shouldn't be necessary if duk_suspend() is called before + * duk_resume(), but assert in case API sequence is incorrect. + */ + DUK_ASSERT(thr->heap->pf_prevent_count == 0); + DUK_ASSERT(thr->heap->creating_error == 0); + + thr->state = snapshot->thread_state; + + heap = thr->heap; + + duk_memcpy((void *) &heap->lj, (const void *) &snapshot->lj, sizeof(duk_ljstate)); + heap->creating_error = snapshot->creating_error; + heap->curr_thread = snapshot->curr_thread; + heap->call_recursion_depth = snapshot->call_recursion_depth; + + duk_pop_2(thr); +} + +/* XXX: better place for this */ +DUK_EXTERNAL void duk_set_global_object(duk_hthread *thr) { + duk_hobject *h_glob; + duk_hobject *h_prev_glob; + duk_hobjenv *h_env; + duk_hobject *h_prev_env; + + DUK_ASSERT_API_ENTRY(thr); + + DUK_D(DUK_DPRINT("replace global object with: %!T", duk_get_tval(thr, -1))); + + h_glob = duk_require_hobject(thr, -1); + DUK_ASSERT(h_glob != NULL); + + /* + * Replace global object. + */ + + h_prev_glob = thr->builtins[DUK_BIDX_GLOBAL]; + DUK_UNREF(h_prev_glob); + thr->builtins[DUK_BIDX_GLOBAL] = h_glob; + DUK_HOBJECT_INCREF(thr, h_glob); + DUK_HOBJECT_DECREF_ALLOWNULL(thr, h_prev_glob); /* side effects, in theory (referenced by global env) */ + + /* + * Replace lexical environment for global scope + * + * Create a new object environment for the global lexical scope. + * We can't just reset the _Target property of the current one, + * because the lexical scope is shared by other threads with the + * same (initial) built-ins. + */ + + h_env = duk_hobjenv_alloc(thr, DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJENV)); + DUK_ASSERT(h_env != NULL); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) h_env) == NULL); + + DUK_ASSERT(h_env->target == NULL); + DUK_ASSERT(h_glob != NULL); + h_env->target = h_glob; + DUK_HOBJECT_INCREF(thr, h_glob); + DUK_ASSERT(h_env->has_this == 0); + + /* [ ... new_glob ] */ + + h_prev_env = thr->builtins[DUK_BIDX_GLOBAL_ENV]; + thr->builtins[DUK_BIDX_GLOBAL_ENV] = (duk_hobject *) h_env; + DUK_HOBJECT_INCREF(thr, (duk_hobject *) h_env); + DUK_HOBJECT_DECREF_ALLOWNULL(thr, h_prev_env); /* side effects */ + DUK_UNREF(h_env); /* without refcounts */ + DUK_UNREF(h_prev_env); + + /* [ ... new_glob ] */ + + duk_pop(thr); + + /* [ ... ] */ +} +#line 1 "duk_api_inspect.c" +/* + * Inspection + */ + +/* #include duk_internal.h -> already included */ + +/* For footprint efficient multiple value setting: arrays are much better than + * varargs, format string with parsing is often better than string pointer arrays. + */ +DUK_LOCAL void duk__inspect_multiple_uint(duk_hthread *thr, const char *fmt, duk_int_t *vals) { + duk_int_t val; + const char *p; + const char *p_curr; + duk_size_t len; + + for (p = fmt;;) { + len = DUK_STRLEN(p); + p_curr = p; + p += len + 1; + if (len == 0) { + /* Double NUL (= empty key) terminates. */ + break; + } + val = *vals++; + if (val >= 0) { + /* Negative values are markers to skip key. */ + duk_push_string(thr, p_curr); + duk_push_int(thr, val); + duk_put_prop(thr, -3); + } + } +} + +/* Raw helper to extract internal information / statistics about a value. + * The return value is an object with properties that are version specific. + * The properties must not expose anything that would lead to security + * issues (e.g. exposing compiled function 'data' buffer might be an issue). + * Currently only counts and sizes and such are given so there shouldn't + * be security implications. + */ + +#define DUK__IDX_TYPE 0 +#define DUK__IDX_ITAG 1 +#define DUK__IDX_REFC 2 +#define DUK__IDX_HBYTES 3 +#define DUK__IDX_CLASS 4 +#define DUK__IDX_PBYTES 5 +#define DUK__IDX_ESIZE 6 +#define DUK__IDX_ENEXT 7 +#define DUK__IDX_ASIZE 8 +#define DUK__IDX_HSIZE 9 +#define DUK__IDX_BCBYTES 10 +#define DUK__IDX_DBYTES 11 +#define DUK__IDX_TSTATE 12 +#define DUK__IDX_VARIANT 13 + +DUK_EXTERNAL void duk_inspect_value(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_heaphdr *h; + /* The temporary values should be in an array rather than individual + * variables which (in practice) ensures that the compiler won't map + * them to registers and emit a lot of unnecessary shuffling code. + */ + duk_int_t vals[14]; + + DUK_ASSERT_API_ENTRY(thr); + + /* Assume two's complement and set everything to -1. */ + duk_memset((void *) &vals, (int) 0xff, sizeof(vals)); + DUK_ASSERT(vals[DUK__IDX_TYPE] == -1); /* spot check one */ + + tv = duk_get_tval_or_unused(thr, idx); + h = (DUK_TVAL_IS_HEAP_ALLOCATED(tv) ? DUK_TVAL_GET_HEAPHDR(tv) : NULL); + + vals[DUK__IDX_TYPE] = duk_get_type_tval(tv); + vals[DUK__IDX_ITAG] = (duk_int_t) DUK_TVAL_GET_TAG(tv); + + duk_push_bare_object(thr); /* Invalidates 'tv'. */ + tv = NULL; + + if (h == NULL) { + goto finish; + } + duk_push_pointer(thr, (void *) h); + duk_put_prop_literal(thr, -2, "hptr"); + +#if 0 + /* Covers a lot of information, e.g. buffer and string variants. */ + duk_push_uint(thr, (duk_uint_t) DUK_HEAPHDR_GET_FLAGS(h)); + duk_put_prop_literal(thr, -2, "hflags"); +#endif + +#if defined(DUK_USE_REFERENCE_COUNTING) + vals[DUK__IDX_REFC] = (duk_int_t) DUK_HEAPHDR_GET_REFCOUNT(h); +#endif + vals[DUK__IDX_VARIANT] = 0; + + /* Heaphdr size and additional allocation size, followed by + * type specific stuff (with varying value count). + */ + switch ((duk_small_int_t) DUK_HEAPHDR_GET_TYPE(h)) { + case DUK_HTYPE_STRING: { + duk_hstring *h_str = (duk_hstring *) h; + vals[DUK__IDX_HBYTES] = (duk_int_t) (sizeof(duk_hstring) + DUK_HSTRING_GET_BYTELEN(h_str) + 1); +#if defined(DUK_USE_HSTRING_EXTDATA) + if (DUK_HSTRING_HAS_EXTDATA(h_str)) { + vals[DUK__IDX_VARIANT] = 1; + } +#endif + break; + } + case DUK_HTYPE_OBJECT: { + duk_hobject *h_obj = (duk_hobject *) h; + + /* XXX: variants here are maybe pointless; class is enough? */ + if (DUK_HOBJECT_IS_ARRAY(h_obj)) { + vals[DUK__IDX_HBYTES] = sizeof(duk_harray); + } else if (DUK_HOBJECT_IS_COMPFUNC(h_obj)) { + vals[DUK__IDX_HBYTES] = sizeof(duk_hcompfunc); + } else if (DUK_HOBJECT_IS_NATFUNC(h_obj)) { + vals[DUK__IDX_HBYTES] = sizeof(duk_hnatfunc); + } else if (DUK_HOBJECT_IS_THREAD(h_obj)) { + vals[DUK__IDX_HBYTES] = sizeof(duk_hthread); + vals[DUK__IDX_TSTATE] = ((duk_hthread *) h_obj)->state; +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + } else if (DUK_HOBJECT_IS_BUFOBJ(h_obj)) { + vals[DUK__IDX_HBYTES] = sizeof(duk_hbufobj); + /* XXX: some size information */ +#endif + } else { + vals[DUK__IDX_HBYTES] = (duk_small_uint_t) sizeof(duk_hobject); + } + + vals[DUK__IDX_CLASS] = (duk_int_t) DUK_HOBJECT_GET_CLASS_NUMBER(h_obj); + vals[DUK__IDX_PBYTES] = (duk_int_t) DUK_HOBJECT_P_ALLOC_SIZE(h_obj); + vals[DUK__IDX_ESIZE] = (duk_int_t) DUK_HOBJECT_GET_ESIZE(h_obj); + vals[DUK__IDX_ENEXT] = (duk_int_t) DUK_HOBJECT_GET_ENEXT(h_obj); + vals[DUK__IDX_ASIZE] = (duk_int_t) DUK_HOBJECT_GET_ASIZE(h_obj); + vals[DUK__IDX_HSIZE] = (duk_int_t) DUK_HOBJECT_GET_HSIZE(h_obj); + + /* Note: e_next indicates the number of gc-reachable entries + * in the entry part, and also indicates the index where the + * next new property would be inserted. It does *not* indicate + * the number of non-NULL keys present in the object. That + * value could be counted separately but requires a pass through + * the key list. + */ + + if (DUK_HOBJECT_IS_COMPFUNC(h_obj)) { + duk_hbuffer *h_data = (duk_hbuffer *) DUK_HCOMPFUNC_GET_DATA(thr->heap, (duk_hcompfunc *) h_obj); + vals[DUK__IDX_BCBYTES] = (duk_int_t) (h_data ? DUK_HBUFFER_GET_SIZE(h_data) : 0); + } + break; + } + case DUK_HTYPE_BUFFER: { + duk_hbuffer *h_buf = (duk_hbuffer *) h; + + if (DUK_HBUFFER_HAS_DYNAMIC(h_buf)) { + if (DUK_HBUFFER_HAS_EXTERNAL(h_buf)) { + vals[DUK__IDX_VARIANT] = 2; /* buffer variant 2: external */ + vals[DUK__IDX_HBYTES] = (duk_uint_t) (sizeof(duk_hbuffer_external)); + } else { + /* When alloc_size == 0 the second allocation may not + * actually exist. + */ + vals[DUK__IDX_VARIANT] = 1; /* buffer variant 1: dynamic */ + vals[DUK__IDX_HBYTES] = (duk_uint_t) (sizeof(duk_hbuffer_dynamic)); + } + vals[DUK__IDX_DBYTES] = (duk_int_t) (DUK_HBUFFER_GET_SIZE(h_buf)); + } else { + DUK_ASSERT(vals[DUK__IDX_VARIANT] == 0); /* buffer variant 0: fixed */ + vals[DUK__IDX_HBYTES] = (duk_int_t) (sizeof(duk_hbuffer_fixed) + DUK_HBUFFER_GET_SIZE(h_buf)); + } + break; + } + } + +finish: + duk__inspect_multiple_uint(thr, + "type" + "\x00" + "itag" + "\x00" + "refc" + "\x00" + "hbytes" + "\x00" + "class" + "\x00" + "pbytes" + "\x00" + "esize" + "\x00" + "enext" + "\x00" + "asize" + "\x00" + "hsize" + "\x00" + "bcbytes" + "\x00" + "dbytes" + "\x00" + "tstate" + "\x00" + "variant" + "\x00" + "\x00", + (duk_int_t *) &vals); +} + +DUK_EXTERNAL void duk_inspect_callstack_entry(duk_hthread *thr, duk_int_t level) { + duk_activation *act; + duk_uint_fast32_t pc; + duk_uint_fast32_t line; + + DUK_ASSERT_API_ENTRY(thr); + + /* -1 = top callstack entry + * -2 = caller of level -1 + * etc + */ + act = duk_hthread_get_activation_for_level(thr, level); + if (act == NULL) { + duk_push_undefined(thr); + return; + } + duk_push_bare_object(thr); + + /* Relevant PC is just before current one because PC is + * post-incremented. This should match what error augment + * code does. + */ + pc = duk_hthread_get_act_prev_pc(thr, act); + + duk_push_tval(thr, &act->tv_func); + + duk_push_uint(thr, (duk_uint_t) pc); + duk_put_prop_stridx_short(thr, -3, DUK_STRIDX_PC); + +#if defined(DUK_USE_PC2LINE) + line = duk_hobject_pc2line_query(thr, -1, pc); +#else + line = 0; +#endif + duk_push_uint(thr, (duk_uint_t) line); + duk_put_prop_stridx_short(thr, -3, DUK_STRIDX_LINE_NUMBER); + + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_LC_FUNCTION); + /* Providing access to e.g. act->lex_env would be dangerous: these + * internal structures must never be accessible to the application. + * Duktape relies on them having consistent data, and this consistency + * is only asserted for, not checked for. + */ +} + +/* automatic undefs */ +#undef DUK__IDX_ASIZE +#undef DUK__IDX_BCBYTES +#undef DUK__IDX_CLASS +#undef DUK__IDX_DBYTES +#undef DUK__IDX_ENEXT +#undef DUK__IDX_ESIZE +#undef DUK__IDX_HBYTES +#undef DUK__IDX_HSIZE +#undef DUK__IDX_ITAG +#undef DUK__IDX_PBYTES +#undef DUK__IDX_REFC +#undef DUK__IDX_TSTATE +#undef DUK__IDX_TYPE +#undef DUK__IDX_VARIANT +#line 1 "duk_api_memory.c" +/* + * Memory calls. + */ + +/* #include duk_internal.h -> already included */ + +DUK_EXTERNAL void *duk_alloc_raw(duk_hthread *thr, duk_size_t size) { + DUK_ASSERT_API_ENTRY(thr); + + return DUK_ALLOC_RAW(thr->heap, size); +} + +DUK_EXTERNAL void duk_free_raw(duk_hthread *thr, void *ptr) { + DUK_ASSERT_API_ENTRY(thr); + + DUK_FREE_RAW(thr->heap, ptr); +} + +DUK_EXTERNAL void *duk_realloc_raw(duk_hthread *thr, void *ptr, duk_size_t size) { + DUK_ASSERT_API_ENTRY(thr); + + return DUK_REALLOC_RAW(thr->heap, ptr, size); +} + +DUK_EXTERNAL void *duk_alloc(duk_hthread *thr, duk_size_t size) { + DUK_ASSERT_API_ENTRY(thr); + + return DUK_ALLOC(thr->heap, size); +} + +DUK_EXTERNAL void duk_free(duk_hthread *thr, void *ptr) { + DUK_ASSERT_API_ENTRY(thr); + + DUK_FREE_CHECKED(thr, ptr); +} + +DUK_EXTERNAL void *duk_realloc(duk_hthread *thr, void *ptr, duk_size_t size) { + DUK_ASSERT_API_ENTRY(thr); + + /* + * Note: since this is an exposed API call, there should be + * no way a mark-and-sweep could have a side effect on the + * memory allocation behind 'ptr'; the pointer should never + * be something that Duktape wants to change. + * + * Thus, no need to use DUK_REALLOC_INDIRECT (and we don't + * have the storage location here anyway). + */ + + return DUK_REALLOC(thr->heap, ptr, size); +} + +DUK_EXTERNAL void duk_get_memory_functions(duk_hthread *thr, duk_memory_functions *out_funcs) { + duk_heap *heap; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(out_funcs != NULL); + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + + heap = thr->heap; + out_funcs->alloc_func = heap->alloc_func; + out_funcs->realloc_func = heap->realloc_func; + out_funcs->free_func = heap->free_func; + out_funcs->udata = heap->heap_udata; +} + +DUK_EXTERNAL void duk_gc(duk_hthread *thr, duk_uint_t flags) { + duk_heap *heap; + duk_small_uint_t ms_flags; + + DUK_ASSERT_API_ENTRY(thr); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + + DUK_D(DUK_DPRINT("mark-and-sweep requested by application")); + DUK_ASSERT(DUK_GC_COMPACT == DUK_MS_FLAG_EMERGENCY); /* Compact flag is 1:1 with emergency flag which forces compaction. */ + ms_flags = (duk_small_uint_t) flags; + duk_heap_mark_and_sweep(heap, ms_flags); +} +#line 1 "duk_api_object.c" +/* + * Object handling: property access and other support functions. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Property handling + * + * The API exposes only the most common property handling functions. + * The caller can invoke ECMAScript built-ins for full control (e.g. + * defineProperty, getOwnPropertyDescriptor). + */ + +DUK_EXTERNAL duk_bool_t duk_get_prop(duk_hthread *thr, duk_idx_t obj_idx) { + duk_tval *tv_obj; + duk_tval *tv_key; + duk_bool_t rc; + + DUK_ASSERT_API_ENTRY(thr); + + /* Note: copying tv_obj and tv_key to locals to shield against a valstack + * resize is not necessary for a property get right now. + */ + + tv_obj = duk_require_tval(thr, obj_idx); + tv_key = duk_require_tval(thr, -1); + + rc = duk_hobject_getprop(thr, tv_obj, tv_key); + DUK_ASSERT(rc == 0 || rc == 1); + /* a value is left on stack regardless of rc */ + + duk_remove_m2(thr); /* remove key */ + DUK_ASSERT(duk_is_undefined(thr, -1) || rc == 1); + return rc; /* 1 if property found, 0 otherwise */ +} + +DUK_EXTERNAL duk_bool_t duk_get_prop_string(duk_hthread *thr, duk_idx_t obj_idx, const char *key) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_string(thr, key); + return duk_get_prop(thr, obj_idx); +} + +DUK_EXTERNAL duk_bool_t duk_get_prop_lstring(duk_hthread *thr, duk_idx_t obj_idx, const char *key, duk_size_t key_len) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_lstring(thr, key, key_len); + return duk_get_prop(thr, obj_idx); +} + +#if !defined(DUK_USE_PREFER_SIZE) +DUK_EXTERNAL duk_bool_t duk_get_prop_literal_raw(duk_hthread *thr, duk_idx_t obj_idx, const char *key, duk_size_t key_len) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + DUK_ASSERT(key[key_len] == (char) 0); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_literal_raw(thr, key, key_len); + return duk_get_prop(thr, obj_idx); +} +#endif + +DUK_EXTERNAL duk_bool_t duk_get_prop_index(duk_hthread *thr, duk_idx_t obj_idx, duk_uarridx_t arr_idx) { + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + duk_push_uarridx(thr, arr_idx); + return duk_get_prop(thr, obj_idx); +} + +DUK_EXTERNAL duk_bool_t duk_get_prop_heapptr(duk_hthread *thr, duk_idx_t obj_idx, void *ptr) { + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_heapptr(thr, ptr); /* NULL -> 'undefined' */ + return duk_get_prop(thr, obj_idx); +} + +DUK_INTERNAL duk_bool_t duk_get_prop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_STRIDX_VALID(stridx); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_hstring(thr, DUK_HTHREAD_GET_STRING(thr, stridx)); + return duk_get_prop(thr, obj_idx); +} + +DUK_INTERNAL duk_bool_t duk_get_prop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args) { + return duk_get_prop_stridx(thr, (duk_idx_t) (duk_int16_t) (packed_args >> 16), (duk_small_uint_t) (packed_args & 0xffffUL)); +} + +DUK_INTERNAL duk_bool_t duk_get_prop_stridx_boolean(duk_hthread *thr, + duk_idx_t obj_idx, + duk_small_uint_t stridx, + duk_bool_t *out_has_prop) { + duk_bool_t rc; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_STRIDX_VALID(stridx); + + rc = duk_get_prop_stridx(thr, obj_idx, stridx); + if (out_has_prop) { + *out_has_prop = rc; + } + return duk_to_boolean_top_pop(thr); +} + +/* This get variant is for internal use, it differs from standard + * duk_get_prop() in that: + * - Object argument must be an object (primitive values not supported). + * - Key argument must be a string (no coercion). + * - Only own properties are checked (no inheritance). Only "entry part" + * properties are checked (not array index properties). + * - Property must be a plain data property, not a getter. + * - Proxy traps are not triggered. + */ +DUK_INTERNAL duk_bool_t duk_xget_owndataprop(duk_hthread *thr, duk_idx_t obj_idx) { + duk_hobject *h_obj; + duk_hstring *h_key; + duk_tval *tv_val; + + DUK_ASSERT_API_ENTRY(thr); + + /* Note: copying tv_obj and tv_key to locals to shield against a valstack + * resize is not necessary for a property get right now. + */ + + h_obj = duk_get_hobject(thr, obj_idx); + if (h_obj == NULL) { + return 0; + } + h_key = duk_require_hstring(thr, -1); + + tv_val = duk_hobject_find_entry_tval_ptr(thr->heap, h_obj, h_key); + if (tv_val == NULL) { + return 0; + } + + duk_push_tval(thr, tv_val); + duk_remove_m2(thr); /* remove key */ + + return 1; +} + +DUK_INTERNAL duk_bool_t duk_xget_owndataprop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_STRIDX_VALID(stridx); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_hstring(thr, DUK_HTHREAD_GET_STRING(thr, stridx)); + return duk_xget_owndataprop(thr, obj_idx); +} + +DUK_INTERNAL duk_bool_t duk_xget_owndataprop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args) { + return duk_xget_owndataprop_stridx(thr, + (duk_idx_t) (duk_int16_t) (packed_args >> 16), + (duk_small_uint_t) (packed_args & 0xffffUL)); +} + +DUK_LOCAL duk_bool_t duk__put_prop_shared(duk_hthread *thr, duk_idx_t obj_idx, duk_idx_t idx_key) { + duk_tval *tv_obj; + duk_tval *tv_key; + duk_tval *tv_val; + duk_bool_t throw_flag; + duk_bool_t rc; + + /* Note: copying tv_obj and tv_key to locals to shield against a valstack + * resize is not necessary for a property put right now (putprop protects + * against it internally). + */ + + /* Key and value indices are either (-2, -1) or (-1, -2). Given idx_key, + * idx_val is always (idx_key ^ 0x01). + */ + DUK_ASSERT((idx_key == -2 && (idx_key ^ 1) == -1) || (idx_key == -1 && (idx_key ^ 1) == -2)); + /* XXX: Direct access; faster validation. */ + tv_obj = duk_require_tval(thr, obj_idx); + tv_key = duk_require_tval(thr, idx_key); + tv_val = duk_require_tval(thr, idx_key ^ 1); + throw_flag = duk_is_strict_call(thr); + + rc = duk_hobject_putprop(thr, tv_obj, tv_key, tv_val, throw_flag); + DUK_ASSERT(rc == 0 || rc == 1); + + duk_pop_2(thr); /* remove key and value */ + return rc; /* 1 if property found, 0 otherwise */ +} + +DUK_EXTERNAL duk_bool_t duk_put_prop(duk_hthread *thr, duk_idx_t obj_idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__put_prop_shared(thr, obj_idx, -2); +} + +DUK_EXTERNAL duk_bool_t duk_put_prop_string(duk_hthread *thr, duk_idx_t obj_idx, const char *key) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + + /* Careful here and with other duk_put_prop_xxx() helpers: the + * target object and the property value may be in the same value + * stack slot (unusual, but still conceptually clear). + */ + obj_idx = duk_normalize_index(thr, obj_idx); + (void) duk_push_string(thr, key); + return duk__put_prop_shared(thr, obj_idx, -1); +} + +DUK_EXTERNAL duk_bool_t duk_put_prop_lstring(duk_hthread *thr, duk_idx_t obj_idx, const char *key, duk_size_t key_len) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + + obj_idx = duk_normalize_index(thr, obj_idx); + (void) duk_push_lstring(thr, key, key_len); + return duk__put_prop_shared(thr, obj_idx, -1); +} + +#if !defined(DUK_USE_PREFER_SIZE) +DUK_EXTERNAL duk_bool_t duk_put_prop_literal_raw(duk_hthread *thr, duk_idx_t obj_idx, const char *key, duk_size_t key_len) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + DUK_ASSERT(key[key_len] == (char) 0); + + obj_idx = duk_normalize_index(thr, obj_idx); + (void) duk_push_literal_raw(thr, key, key_len); + return duk__put_prop_shared(thr, obj_idx, -1); +} +#endif + +DUK_EXTERNAL duk_bool_t duk_put_prop_index(duk_hthread *thr, duk_idx_t obj_idx, duk_uarridx_t arr_idx) { + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + duk_push_uarridx(thr, arr_idx); + return duk__put_prop_shared(thr, obj_idx, -1); +} + +DUK_EXTERNAL duk_bool_t duk_put_prop_heapptr(duk_hthread *thr, duk_idx_t obj_idx, void *ptr) { + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_heapptr(thr, ptr); /* NULL -> 'undefined' */ + return duk__put_prop_shared(thr, obj_idx, -1); +} + +DUK_INTERNAL duk_bool_t duk_put_prop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_STRIDX_VALID(stridx); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + duk_push_hstring(thr, DUK_HTHREAD_GET_STRING(thr, stridx)); + return duk__put_prop_shared(thr, obj_idx, -1); +} + +DUK_INTERNAL duk_bool_t duk_put_prop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args) { + return duk_put_prop_stridx(thr, (duk_idx_t) (duk_int16_t) (packed_args >> 16), (duk_small_uint_t) (packed_args & 0xffffUL)); +} + +DUK_EXTERNAL duk_bool_t duk_del_prop(duk_hthread *thr, duk_idx_t obj_idx) { + duk_tval *tv_obj; + duk_tval *tv_key; + duk_bool_t throw_flag; + duk_bool_t rc; + + DUK_ASSERT_API_ENTRY(thr); + + /* Note: copying tv_obj and tv_key to locals to shield against a valstack + * resize is not necessary for a property delete right now. + */ + + tv_obj = duk_require_tval(thr, obj_idx); + tv_key = duk_require_tval(thr, -1); + throw_flag = duk_is_strict_call(thr); + + rc = duk_hobject_delprop(thr, tv_obj, tv_key, throw_flag); + DUK_ASSERT(rc == 0 || rc == 1); + + duk_pop(thr); /* remove key */ + return rc; +} + +DUK_EXTERNAL duk_bool_t duk_del_prop_string(duk_hthread *thr, duk_idx_t obj_idx, const char *key) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_string(thr, key); + return duk_del_prop(thr, obj_idx); +} + +DUK_EXTERNAL duk_bool_t duk_del_prop_lstring(duk_hthread *thr, duk_idx_t obj_idx, const char *key, duk_size_t key_len) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_lstring(thr, key, key_len); + return duk_del_prop(thr, obj_idx); +} + +#if !defined(DUK_USE_PREFER_SIZE) +DUK_EXTERNAL duk_bool_t duk_del_prop_literal_raw(duk_hthread *thr, duk_idx_t obj_idx, const char *key, duk_size_t key_len) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + DUK_ASSERT(key[key_len] == (char) 0); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_literal_raw(thr, key, key_len); + return duk_del_prop(thr, obj_idx); +} +#endif + +DUK_EXTERNAL duk_bool_t duk_del_prop_index(duk_hthread *thr, duk_idx_t obj_idx, duk_uarridx_t arr_idx) { + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + duk_push_uarridx(thr, arr_idx); + return duk_del_prop(thr, obj_idx); +} + +DUK_EXTERNAL duk_bool_t duk_del_prop_heapptr(duk_hthread *thr, duk_idx_t obj_idx, void *ptr) { + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_heapptr(thr, ptr); /* NULL -> 'undefined' */ + return duk_del_prop(thr, obj_idx); +} + +DUK_INTERNAL duk_bool_t duk_del_prop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_STRIDX_VALID(stridx); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + duk_push_hstring(thr, DUK_HTHREAD_GET_STRING(thr, stridx)); + return duk_del_prop(thr, obj_idx); +} + +#if 0 +DUK_INTERNAL duk_bool_t duk_del_prop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args) { + return duk_del_prop_stridx(thr, (duk_idx_t) (duk_int16_t) (packed_args >> 16), + (duk_small_uint_t) (packed_args & 0xffffUL)); +} +#endif + +DUK_EXTERNAL duk_bool_t duk_has_prop(duk_hthread *thr, duk_idx_t obj_idx) { + duk_tval *tv_obj; + duk_tval *tv_key; + duk_bool_t rc; + + DUK_ASSERT_API_ENTRY(thr); + + /* Note: copying tv_obj and tv_key to locals to shield against a valstack + * resize is not necessary for a property existence check right now. + */ + + tv_obj = duk_require_tval(thr, obj_idx); + tv_key = duk_require_tval(thr, -1); + + rc = duk_hobject_hasprop(thr, tv_obj, tv_key); + DUK_ASSERT(rc == 0 || rc == 1); + + duk_pop(thr); /* remove key */ + return rc; /* 1 if property found, 0 otherwise */ +} + +DUK_EXTERNAL duk_bool_t duk_has_prop_string(duk_hthread *thr, duk_idx_t obj_idx, const char *key) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_string(thr, key); + return duk_has_prop(thr, obj_idx); +} + +DUK_EXTERNAL duk_bool_t duk_has_prop_lstring(duk_hthread *thr, duk_idx_t obj_idx, const char *key, duk_size_t key_len) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_lstring(thr, key, key_len); + return duk_has_prop(thr, obj_idx); +} + +#if !defined(DUK_USE_PREFER_SIZE) +DUK_EXTERNAL duk_bool_t duk_has_prop_literal_raw(duk_hthread *thr, duk_idx_t obj_idx, const char *key, duk_size_t key_len) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(key != NULL); + DUK_ASSERT(key[key_len] == (char) 0); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_literal_raw(thr, key, key_len); + return duk_has_prop(thr, obj_idx); +} +#endif + +DUK_EXTERNAL duk_bool_t duk_has_prop_index(duk_hthread *thr, duk_idx_t obj_idx, duk_uarridx_t arr_idx) { + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + duk_push_uarridx(thr, arr_idx); + return duk_has_prop(thr, obj_idx); +} + +DUK_EXTERNAL duk_bool_t duk_has_prop_heapptr(duk_hthread *thr, duk_idx_t obj_idx, void *ptr) { + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + (void) duk_push_heapptr(thr, ptr); /* NULL -> 'undefined' */ + return duk_has_prop(thr, obj_idx); +} + +DUK_INTERNAL duk_bool_t duk_has_prop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_STRIDX_VALID(stridx); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + duk_push_hstring(thr, DUK_HTHREAD_GET_STRING(thr, stridx)); + return duk_has_prop(thr, obj_idx); +} + +#if 0 +DUK_INTERNAL duk_bool_t duk_has_prop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args) { + return duk_has_prop_stridx(thr, (duk_idx_t) (duk_int16_t) (packed_args >> 16), + (duk_small_uint_t) (packed_args & 0xffffUL)); +} +#endif + +/* Define own property without inheritance lookups and such. This differs from + * [[DefineOwnProperty]] because special behaviors (like Array 'length') are + * not invoked by this method. The caller must be careful to invoke any such + * behaviors if necessary. + */ +DUK_INTERNAL void duk_xdef_prop(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t desc_flags) { + duk_hobject *obj; + duk_hstring *key; + + DUK_ASSERT_API_ENTRY(thr); + + obj = duk_require_hobject(thr, obj_idx); + DUK_ASSERT(obj != NULL); + key = duk_to_property_key_hstring(thr, -2); + DUK_ASSERT(key != NULL); + DUK_ASSERT(duk_require_tval(thr, -1) != NULL); + + duk_hobject_define_property_internal(thr, obj, key, desc_flags); + + duk_pop(thr); /* pop key */ +} + +DUK_INTERNAL void duk_xdef_prop_index(duk_hthread *thr, duk_idx_t obj_idx, duk_uarridx_t arr_idx, duk_small_uint_t desc_flags) { + duk_hobject *obj; + + DUK_ASSERT_API_ENTRY(thr); + + obj = duk_require_hobject(thr, obj_idx); + DUK_ASSERT(obj != NULL); + + duk_hobject_define_property_internal_arridx(thr, obj, arr_idx, desc_flags); + /* value popped by call */ +} + +DUK_INTERNAL void duk_xdef_prop_stridx(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx, duk_small_uint_t desc_flags) { + duk_hobject *obj; + duk_hstring *key; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_STRIDX_VALID(stridx); + + obj = duk_require_hobject(thr, obj_idx); + DUK_ASSERT(obj != NULL); + key = DUK_HTHREAD_GET_STRING(thr, stridx); + DUK_ASSERT(key != NULL); + DUK_ASSERT(duk_require_tval(thr, -1) != NULL); + + duk_hobject_define_property_internal(thr, obj, key, desc_flags); + /* value popped by call */ +} + +DUK_INTERNAL void duk_xdef_prop_stridx_short_raw(duk_hthread *thr, duk_uint_t packed_args) { + duk_xdef_prop_stridx(thr, + (duk_idx_t) (duk_int8_t) (packed_args >> 24), + (duk_small_uint_t) (packed_args >> 8) & 0xffffUL, + (duk_small_uint_t) (packed_args & 0xffL)); +} + +#if 0 /*unused*/ +DUK_INTERNAL void duk_xdef_prop_stridx_builtin(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx, duk_small_int_t builtin_idx, duk_small_uint_t desc_flags) { + duk_hobject *obj; + duk_hstring *key; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_STRIDX_VALID(stridx); + DUK_ASSERT_BIDX_VALID(builtin_idx); + + obj = duk_require_hobject(thr, obj_idx); + DUK_ASSERT(obj != NULL); + key = DUK_HTHREAD_GET_STRING(thr, stridx); + DUK_ASSERT(key != NULL); + + duk_push_hobject(thr, thr->builtins[builtin_idx]); + duk_hobject_define_property_internal(thr, obj, key, desc_flags); + /* value popped by call */ +} +#endif + +/* This is a rare property helper; it sets the global thrower (E5 Section 13.2.3) + * setter/getter into an object property. This is needed by the 'arguments' + * object creation code, function instance creation code, and Function.prototype.bind(). + */ + +DUK_INTERNAL void duk_xdef_prop_stridx_thrower(duk_hthread *thr, duk_idx_t obj_idx, duk_small_uint_t stridx) { + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + duk_push_hstring_stridx(thr, stridx); + duk_push_hobject_bidx(thr, DUK_BIDX_TYPE_ERROR_THROWER); + duk_dup_top(thr); + duk_def_prop(thr, obj_idx, DUK_DEFPROP_HAVE_SETTER | DUK_DEFPROP_HAVE_GETTER | DUK_DEFPROP_FORCE); /* attributes always 0 */ +} + +/* Object.getOwnPropertyDescriptor() equivalent C binding. */ +DUK_EXTERNAL void duk_get_prop_desc(duk_hthread *thr, duk_idx_t obj_idx, duk_uint_t flags) { + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(flags); /* no flags defined yet */ + + duk_hobject_object_get_own_property_descriptor(thr, obj_idx); /* [ ... key ] -> [ ... desc ] */ +} + +/* Object.defineProperty() equivalent C binding. */ +DUK_EXTERNAL void duk_def_prop(duk_hthread *thr, duk_idx_t obj_idx, duk_uint_t flags) { + duk_idx_t idx_base; + duk_hobject *obj; + duk_hstring *key; + duk_idx_t idx_value; + duk_hobject *get; + duk_hobject *set; + duk_uint_t is_data_desc; + duk_uint_t is_acc_desc; + + DUK_ASSERT_API_ENTRY(thr); + + obj = duk_require_hobject(thr, obj_idx); + + is_data_desc = flags & (DUK_DEFPROP_HAVE_VALUE | DUK_DEFPROP_HAVE_WRITABLE); + is_acc_desc = flags & (DUK_DEFPROP_HAVE_GETTER | DUK_DEFPROP_HAVE_SETTER); + if (is_data_desc && is_acc_desc) { + /* "Have" flags must not be conflicting so that they would + * apply to both a plain property and an accessor at the same + * time. + */ + goto fail_invalid_desc; + } + + idx_base = duk_get_top_index(thr); + if (flags & DUK_DEFPROP_HAVE_SETTER) { + duk_require_type_mask(thr, idx_base, DUK_TYPE_MASK_UNDEFINED | DUK_TYPE_MASK_OBJECT | DUK_TYPE_MASK_LIGHTFUNC); + set = duk_get_hobject_promote_lfunc(thr, idx_base); + if (set != NULL && !DUK_HOBJECT_IS_CALLABLE(set)) { + goto fail_not_callable; + } + idx_base--; + } else { + set = NULL; + } + if (flags & DUK_DEFPROP_HAVE_GETTER) { + duk_require_type_mask(thr, idx_base, DUK_TYPE_MASK_UNDEFINED | DUK_TYPE_MASK_OBJECT | DUK_TYPE_MASK_LIGHTFUNC); + get = duk_get_hobject_promote_lfunc(thr, idx_base); + if (get != NULL && !DUK_HOBJECT_IS_CALLABLE(get)) { + goto fail_not_callable; + } + idx_base--; + } else { + get = NULL; + } + if (flags & DUK_DEFPROP_HAVE_VALUE) { + idx_value = idx_base; + idx_base--; + } else { + idx_value = (duk_idx_t) -1; + } + key = duk_to_property_key_hstring(thr, idx_base); + DUK_ASSERT(key != NULL); + + duk_require_valid_index(thr, idx_base); + + duk_hobject_define_property_helper(thr, flags /*defprop_flags*/, obj, key, idx_value, get, set, 1 /*throw_flag*/); + + /* Clean up stack */ + + duk_set_top(thr, idx_base); + + /* [ ... obj ... ] */ + + return; + +fail_invalid_desc: + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_DESCRIPTOR); + DUK_WO_NORETURN(return;); + +fail_not_callable: + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CALLABLE); + DUK_WO_NORETURN(return;); +} + +/* + * Object related + */ + +DUK_EXTERNAL void duk_compact(duk_hthread *thr, duk_idx_t obj_idx) { + duk_hobject *obj; + + DUK_ASSERT_API_ENTRY(thr); + + obj = duk_get_hobject(thr, obj_idx); + if (obj) { + /* Note: this may fail, caller should protect the call if necessary */ + duk_hobject_compact_props(thr, obj); + } +} + +DUK_INTERNAL void duk_compact_m1(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + duk_compact(thr, -1); +} + +/* XXX: the duk_hobject_enum.c stack APIs should be reworked */ + +DUK_EXTERNAL void duk_enum(duk_hthread *thr, duk_idx_t obj_idx, duk_uint_t enum_flags) { + DUK_ASSERT_API_ENTRY(thr); + + duk_dup(thr, obj_idx); + duk_require_hobject_promote_mask(thr, -1, DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + duk_hobject_enumerator_create(thr, enum_flags); /* [target] -> [enum] */ +} + +DUK_EXTERNAL duk_bool_t duk_next(duk_hthread *thr, duk_idx_t enum_index, duk_bool_t get_value) { + DUK_ASSERT_API_ENTRY(thr); + + duk_require_hobject(thr, enum_index); + duk_dup(thr, enum_index); + return duk_hobject_enumerator_next(thr, get_value); +} + +DUK_INTERNAL void duk_seal_freeze_raw(duk_hthread *thr, duk_idx_t obj_idx, duk_bool_t is_freeze) { + duk_tval *tv; + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_require_tval(thr, obj_idx); + DUK_ASSERT(tv != NULL); + + /* Seal/freeze are quite rare in practice so it'd be nice to get the + * correct behavior simply via automatic promotion (at the cost of some + * memory churn). However, the promoted objects don't behave the same, + * e.g. promoted lightfuncs are extensible. + */ + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_BUFFER: + /* Plain buffer: already sealed, but not frozen (and can't be frozen + * because index properties can't be made non-writable. + */ + if (is_freeze) { + goto fail_cannot_freeze; + } + break; + case DUK_TAG_LIGHTFUNC: + /* Lightfunc: already sealed and frozen, success. */ + break; + case DUK_TAG_OBJECT: + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + if (is_freeze && DUK_HOBJECT_IS_BUFOBJ(h)) { + /* Buffer objects cannot be frozen because there's no internal + * support for making virtual array indices non-writable. + */ + DUK_DD(DUK_DDPRINT("cannot freeze a buffer object")); + goto fail_cannot_freeze; + } + duk_hobject_object_seal_freeze_helper(thr, h, is_freeze); + + /* Sealed and frozen objects cannot gain any more properties, + * so this is a good time to compact them. + */ + duk_hobject_compact_props(thr, h); + break; + default: + /* ES2015 Sections 19.1.2.5, 19.1.2.17 */ + break; + } + return; + +fail_cannot_freeze: + DUK_ERROR_TYPE_INVALID_ARGS(thr); /* XXX: proper error message */ + DUK_WO_NORETURN(return;); +} + +DUK_EXTERNAL void duk_seal(duk_hthread *thr, duk_idx_t obj_idx) { + DUK_ASSERT_API_ENTRY(thr); + + duk_seal_freeze_raw(thr, obj_idx, 0 /*is_freeze*/); +} + +DUK_EXTERNAL void duk_freeze(duk_hthread *thr, duk_idx_t obj_idx) { + DUK_ASSERT_API_ENTRY(thr); + + duk_seal_freeze_raw(thr, obj_idx, 1 /*is_freeze*/); +} + +/* + * Helpers for writing multiple properties + */ + +DUK_EXTERNAL void duk_put_function_list(duk_hthread *thr, duk_idx_t obj_idx, const duk_function_list_entry *funcs) { + const duk_function_list_entry *ent = funcs; + + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + if (ent != NULL) { + while (ent->key != NULL) { + duk_push_c_function(thr, ent->value, ent->nargs); + duk_put_prop_string(thr, obj_idx, ent->key); + ent++; + } + } +} + +DUK_EXTERNAL void duk_put_number_list(duk_hthread *thr, duk_idx_t obj_idx, const duk_number_list_entry *numbers) { + const duk_number_list_entry *ent = numbers; + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + obj_idx = duk_require_normalize_index(thr, obj_idx); + if (ent != NULL) { + while (ent->key != NULL) { + tv = thr->valstack_top++; + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(tv)); /* value stack init policy */ + DUK_TVAL_SET_NUMBER_CHKFAST_SLOW(tv, ent->value); /* no need for decref/incref */ + duk_put_prop_string(thr, obj_idx, ent->key); + ent++; + } + } +} + +/* + * Shortcut for accessing global object properties + */ + +DUK_EXTERNAL duk_bool_t duk_get_global_string(duk_hthread *thr, const char *key) { + duk_bool_t ret; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL] != NULL); + + /* XXX: direct implementation */ + + duk_push_hobject(thr, thr->builtins[DUK_BIDX_GLOBAL]); + ret = duk_get_prop_string(thr, -1, key); + duk_remove_m2(thr); + return ret; +} + +DUK_EXTERNAL duk_bool_t duk_get_global_lstring(duk_hthread *thr, const char *key, duk_size_t key_len) { + duk_bool_t ret; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL] != NULL); + + /* XXX: direct implementation */ + + duk_push_hobject(thr, thr->builtins[DUK_BIDX_GLOBAL]); + ret = duk_get_prop_lstring(thr, -1, key, key_len); + duk_remove_m2(thr); + return ret; +} + +#if !defined(DUK_USE_PREFER_SIZE) +DUK_EXTERNAL duk_bool_t duk_get_global_literal_raw(duk_hthread *thr, const char *key, duk_size_t key_len) { + duk_bool_t ret; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL] != NULL); + DUK_ASSERT(key[key_len] == (char) 0); + + /* XXX: direct implementation */ + + duk_push_hobject(thr, thr->builtins[DUK_BIDX_GLOBAL]); + ret = duk_get_prop_literal_raw(thr, -1, key, key_len); + duk_remove_m2(thr); + return ret; +} +#endif + +DUK_EXTERNAL duk_bool_t duk_get_global_heapptr(duk_hthread *thr, void *ptr) { + duk_bool_t ret; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL] != NULL); + + /* XXX: direct implementation */ + + duk_push_hobject(thr, thr->builtins[DUK_BIDX_GLOBAL]); + ret = duk_get_prop_heapptr(thr, -1, ptr); + duk_remove_m2(thr); + return ret; +} + +DUK_EXTERNAL duk_bool_t duk_put_global_string(duk_hthread *thr, const char *key) { + duk_bool_t ret; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL] != NULL); + + /* XXX: direct implementation */ + + duk_push_hobject(thr, thr->builtins[DUK_BIDX_GLOBAL]); + duk_insert(thr, -2); + ret = duk_put_prop_string(thr, -2, key); /* [ ... global val ] -> [ ... global ] */ + duk_pop(thr); + return ret; +} + +DUK_EXTERNAL duk_bool_t duk_put_global_lstring(duk_hthread *thr, const char *key, duk_size_t key_len) { + duk_bool_t ret; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL] != NULL); + + /* XXX: direct implementation */ + + duk_push_hobject(thr, thr->builtins[DUK_BIDX_GLOBAL]); + duk_insert(thr, -2); + ret = duk_put_prop_lstring(thr, -2, key, key_len); /* [ ... global val ] -> [ ... global ] */ + duk_pop(thr); + return ret; +} + +#if !defined(DUK_USE_PREFER_SIZE) +DUK_EXTERNAL duk_bool_t duk_put_global_literal_raw(duk_hthread *thr, const char *key, duk_size_t key_len) { + duk_bool_t ret; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL] != NULL); + DUK_ASSERT(key[key_len] == (char) 0); + + /* XXX: direct implementation */ + + duk_push_hobject(thr, thr->builtins[DUK_BIDX_GLOBAL]); + duk_insert(thr, -2); + ret = duk_put_prop_literal_raw(thr, -2, key, key_len); /* [ ... global val ] -> [ ... global ] */ + duk_pop(thr); + return ret; +} +#endif + +DUK_EXTERNAL duk_bool_t duk_put_global_heapptr(duk_hthread *thr, void *ptr) { + duk_bool_t ret; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL] != NULL); + + /* XXX: direct implementation */ + + duk_push_hobject(thr, thr->builtins[DUK_BIDX_GLOBAL]); + duk_insert(thr, -2); + ret = duk_put_prop_heapptr(thr, -2, ptr); /* [ ... global val ] -> [ ... global ] */ + duk_pop(thr); + return ret; +} + +/* + * ES2015 GetMethod() + */ + +DUK_INTERNAL duk_bool_t duk_get_method_stridx(duk_hthread *thr, duk_idx_t idx, duk_small_uint_t stridx) { + (void) duk_get_prop_stridx(thr, idx, stridx); + if (duk_is_null_or_undefined(thr, -1)) { + duk_pop_nodecref_unsafe(thr); + return 0; + } + if (!duk_is_callable(thr, -1)) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CALLABLE); + DUK_WO_NORETURN(return 0;); + } + return 1; +} + +/* + * Object prototype + */ + +DUK_EXTERNAL void duk_get_prototype(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *obj; + duk_hobject *proto; + + DUK_ASSERT_API_ENTRY(thr); + + obj = duk_require_hobject(thr, idx); + DUK_ASSERT(obj != NULL); + + /* XXX: shared helper for duk_push_hobject_or_undefined()? */ + proto = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, obj); + if (proto) { + duk_push_hobject(thr, proto); + } else { + duk_push_undefined(thr); + } +} + +DUK_EXTERNAL void duk_set_prototype(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *obj; + duk_hobject *proto; + + DUK_ASSERT_API_ENTRY(thr); + + obj = duk_require_hobject(thr, idx); + DUK_ASSERT(obj != NULL); + duk_require_type_mask(thr, -1, DUK_TYPE_MASK_UNDEFINED | DUK_TYPE_MASK_OBJECT); + proto = duk_get_hobject(thr, -1); + /* proto can also be NULL here (allowed explicitly) */ + +#if defined(DUK_USE_ROM_OBJECTS) + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CONFIGURABLE); /* XXX: "read only object"? */ + DUK_WO_NORETURN(return;); + } +#endif + + DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, obj, proto); + + duk_pop(thr); +} + +DUK_INTERNAL void duk_clear_prototype(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *obj; + + DUK_ASSERT_API_ENTRY(thr); + + obj = duk_require_hobject(thr, idx); + DUK_ASSERT(obj != NULL); + +#if defined(DUK_USE_ROM_OBJECTS) + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CONFIGURABLE); /* XXX: "read only object"? */ + DUK_WO_NORETURN(return;); + } +#endif + + DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, obj, NULL); +} + +DUK_INTERNAL duk_bool_t duk_is_bare_object(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *obj; + duk_hobject *proto; + + DUK_ASSERT_API_ENTRY(thr); + + obj = duk_require_hobject(thr, idx); + DUK_ASSERT(obj != NULL); + + proto = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, obj); + return (proto == NULL); +} + +/* + * Object finalizer + */ + +#if defined(DUK_USE_FINALIZER_SUPPORT) +/* XXX: these could be implemented as macros calling an internal function + * directly. + * XXX: same issue as with Duktape.fin: there's no way to delete the property + * now (just set it to undefined). + */ +DUK_EXTERNAL void duk_get_finalizer(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + /* This get intentionally walks the inheritance chain at present, + * which matches how the effective finalizer property is also + * looked up in GC. + */ + duk_get_prop_stridx(thr, idx, DUK_STRIDX_INT_FINALIZER); +} + +DUK_EXTERNAL void duk_set_finalizer(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *h; + duk_bool_t callable; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_require_hobject(thr, idx); /* Get before 'put' so that 'idx' is correct. */ + callable = duk_is_callable(thr, -1); + + /* At present finalizer is stored as a hidden Symbol, with normal + * inheritance and access control. As a result, finalizer cannot + * currently be set on a non-extensible (sealed or frozen) object. + * It might be useful to allow it. + */ + duk_put_prop_stridx(thr, idx, DUK_STRIDX_INT_FINALIZER); + + /* In addition to setting the finalizer property, keep a "have + * finalizer" flag in duk_hobject in sync so that refzero can do + * a very quick finalizer check by walking the prototype chain + * and checking the flag alone. (Note that this means that just + * setting _Finalizer on an object won't affect finalizer checks.) + * + * NOTE: if the argument is a Proxy object, this flag will be set + * on the Proxy, not the target. As a result, the target won't get + * a finalizer flag and the Proxy also won't be finalized as there's + * an explicit Proxy check in finalization now. + */ + if (callable) { + DUK_HOBJECT_SET_HAVE_FINALIZER(h); + } else { + DUK_HOBJECT_CLEAR_HAVE_FINALIZER(h); + } +} +#else /* DUK_USE_FINALIZER_SUPPORT */ +DUK_EXTERNAL void duk_get_finalizer(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(idx); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return;); +} + +DUK_EXTERNAL void duk_set_finalizer(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(idx); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return;); +} +#endif /* DUK_USE_FINALIZER_SUPPORT */ +#line 1 "duk_api_random.c" +/* + * Random numbers + */ + +/* #include duk_internal.h -> already included */ + +DUK_EXTERNAL duk_double_t duk_random(duk_hthread *thr) { + return (duk_double_t) duk_util_get_random_double(thr); +} +#line 1 "duk_api_stack.c" +/* + * API calls related to general value stack manipulation: resizing the value + * stack, pushing and popping values, type checking and reading values, + * coercing values, etc. + * + * Also contains internal functions (such as duk_get_tval()), defined + * in duk_api_internal.h, with semantics similar to the public API. + */ + +/* XXX: repetition of stack pre-checks -> helper or macro or inline */ +/* XXX: shared api error strings, and perhaps even throw code for rare cases? */ + +/* #include duk_internal.h -> already included */ + +/* + * Forward declarations + */ + +DUK_LOCAL_DECL duk_idx_t +duk__push_c_function_raw(duk_hthread *thr, duk_c_function func, duk_idx_t nargs, duk_uint_t flags, duk_small_uint_t proto_bidx); + +/* + * Global state for working around missing variadic macros + */ + +#if !defined(DUK_USE_VARIADIC_MACROS) +DUK_EXTERNAL const char *duk_api_global_filename = NULL; +DUK_EXTERNAL duk_int_t duk_api_global_line = 0; +#endif + +/* + * Misc helpers + */ + +DUK_LOCAL const char * const duk__symbol_type_strings[4] = { "hidden", "global", "local", "wellknown" }; + +#if !defined(DUK_USE_PACKED_TVAL) +DUK_LOCAL const duk_uint_t duk__type_from_tag[] = { + DUK_TYPE_NUMBER, DUK_TYPE_NUMBER, /* fastint */ + DUK_TYPE_UNDEFINED, DUK_TYPE_NULL, DUK_TYPE_BOOLEAN, DUK_TYPE_POINTER, DUK_TYPE_LIGHTFUNC, + DUK_TYPE_NONE, DUK_TYPE_STRING, DUK_TYPE_OBJECT, DUK_TYPE_BUFFER, +}; +DUK_LOCAL const duk_uint_t duk__type_mask_from_tag[] = { + DUK_TYPE_MASK_NUMBER, DUK_TYPE_MASK_NUMBER, /* fastint */ + DUK_TYPE_MASK_UNDEFINED, DUK_TYPE_MASK_NULL, DUK_TYPE_MASK_BOOLEAN, DUK_TYPE_MASK_POINTER, DUK_TYPE_MASK_LIGHTFUNC, + DUK_TYPE_MASK_NONE, DUK_TYPE_MASK_STRING, DUK_TYPE_MASK_OBJECT, DUK_TYPE_MASK_BUFFER, +}; +#endif /* !DUK_USE_PACKED_TVAL */ + +/* Assert that there's room for one value. */ +#define DUK__ASSERT_SPACE() \ + do { \ + DUK_ASSERT(!(thr->valstack_top >= thr->valstack_end)); \ + } while (0) + +/* Check that there's room to push one value. */ +#if defined(DUK_USE_VALSTACK_UNSAFE) +/* Faster but value stack overruns are memory unsafe. */ +#define DUK__CHECK_SPACE() DUK__ASSERT_SPACE() +#else +#define DUK__CHECK_SPACE() \ + do { \ + if (DUK_UNLIKELY(thr->valstack_top >= thr->valstack_end)) { \ + DUK_ERROR_RANGE_PUSH_BEYOND(thr); \ + } \ + } while (0) +#endif + +DUK_LOCAL duk_small_uint_t duk__get_symbol_type(duk_hstring *h) { + const duk_uint8_t *data; + duk_size_t len; + + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HSTRING_HAS_SYMBOL(h)); + DUK_ASSERT(DUK_HSTRING_GET_BYTELEN(h) >= 1); /* always true, symbol prefix */ + + data = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h); + len = DUK_HSTRING_GET_BYTELEN(h); + DUK_ASSERT(len >= 1); + + /* XXX: differentiate between 0x82 and 0xff (hidden vs. internal?)? */ + + if (data[0] == 0xffU) { + return DUK_SYMBOL_TYPE_HIDDEN; + } else if (data[0] == 0x82U) { + return DUK_SYMBOL_TYPE_HIDDEN; + } else if (data[0] == 0x80U) { + return DUK_SYMBOL_TYPE_GLOBAL; + } else if (data[len - 1] != 0xffU) { + return DUK_SYMBOL_TYPE_LOCAL; + } else { + return DUK_SYMBOL_TYPE_WELLKNOWN; + } +} + +DUK_LOCAL const char *duk__get_symbol_type_string(duk_hstring *h) { + duk_small_uint_t idx; + idx = duk__get_symbol_type(h); + DUK_ASSERT(idx < sizeof(duk__symbol_type_strings)); + return duk__symbol_type_strings[idx]; +} + +DUK_LOCAL_DECL duk_heaphdr *duk__get_tagged_heaphdr_raw(duk_hthread *thr, duk_idx_t idx, duk_uint_t tag); + +DUK_LOCAL duk_int_t duk__api_coerce_d2i(duk_hthread *thr, duk_idx_t idx, duk_int_t def_value, duk_bool_t require) { + duk_tval *tv; + duk_small_int_t c; + duk_double_t d; + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + + /* + * Special cases like NaN and +/- Infinity are handled explicitly + * because a plain C coercion from double to int handles these cases + * in undesirable ways. For instance, NaN may coerce to INT_MIN + * (not zero), and INT_MAX + 1 may coerce to INT_MIN (not INT_MAX). + * + * This double-to-int coercion differs from ToInteger() because it + * has a finite range (ToInteger() allows e.g. +/- Infinity). It + * also differs from ToInt32() because the INT_MIN/INT_MAX clamping + * depends on the size of the int type on the platform. In particular, + * on platforms with a 64-bit int type, the full range is allowed. + */ + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv)) { + duk_int64_t t = DUK_TVAL_GET_FASTINT(tv); +#if (DUK_INT_MAX <= 0x7fffffffL) + /* Clamping only necessary for 32-bit ints. */ + if (t < DUK_INT_MIN) { + t = DUK_INT_MIN; + } else if (t > DUK_INT_MAX) { + t = DUK_INT_MAX; + } +#endif + return (duk_int_t) t; + } +#endif + + if (DUK_TVAL_IS_NUMBER(tv)) { + d = DUK_TVAL_GET_NUMBER(tv); + c = (duk_small_int_t) DUK_FPCLASSIFY(d); + if (c == DUK_FP_NAN) { + return 0; + } else if (d < (duk_double_t) DUK_INT_MIN) { + /* covers -Infinity */ + return DUK_INT_MIN; + } else if (d > (duk_double_t) DUK_INT_MAX) { + /* covers +Infinity */ + return DUK_INT_MAX; + } else { + /* coerce towards zero */ + return (duk_int_t) d; + } + } + + if (require) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "number", DUK_STR_NOT_NUMBER); + DUK_WO_NORETURN(return 0;); + } + + return def_value; +} + +DUK_LOCAL duk_uint_t duk__api_coerce_d2ui(duk_hthread *thr, duk_idx_t idx, duk_uint_t def_value, duk_bool_t require) { + duk_tval *tv; + duk_small_int_t c; + duk_double_t d; + + /* Same as above but for unsigned int range. */ + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv)) { + duk_int64_t t = DUK_TVAL_GET_FASTINT(tv); + if (t < 0) { + t = 0; + } +#if (DUK_UINT_MAX <= 0xffffffffUL) + /* Clamping only necessary for 32-bit ints. */ + else if (t > DUK_UINT_MAX) { + t = DUK_UINT_MAX; + } +#endif + return (duk_uint_t) t; + } +#endif + + if (DUK_TVAL_IS_NUMBER(tv)) { + d = DUK_TVAL_GET_NUMBER(tv); + c = (duk_small_int_t) DUK_FPCLASSIFY(d); + if (c == DUK_FP_NAN) { + return 0; + } else if (d < 0.0) { + /* covers -Infinity */ + return (duk_uint_t) 0; + } else if (d > (duk_double_t) DUK_UINT_MAX) { + /* covers +Infinity */ + return (duk_uint_t) DUK_UINT_MAX; + } else { + /* coerce towards zero */ + return (duk_uint_t) d; + } + } + + if (require) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "number", DUK_STR_NOT_NUMBER); + DUK_WO_NORETURN(return 0;); + } + + return def_value; +} + +/* + * Stack index validation/normalization and getting a stack duk_tval ptr. + * + * These are called by many API entrypoints so the implementations must be + * fast and "inlined". + * + * There's some repetition because of this; keep the functions in sync. + */ + +DUK_EXTERNAL duk_idx_t duk_normalize_index(duk_hthread *thr, duk_idx_t idx) { + duk_uidx_t vs_size; + duk_uidx_t uidx; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(DUK_INVALID_INDEX < 0); + + /* Care must be taken to avoid pointer wrapping in the index + * validation. For instance, on a 32-bit platform with 8-byte + * duk_tval the index 0x20000000UL would wrap the memory space + * once. + */ + + /* Assume value stack sizes (in elements) fits into duk_idx_t. */ + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + vs_size = (duk_uidx_t) (thr->valstack_top - thr->valstack_bottom); + DUK_ASSERT_DISABLE(vs_size >= 0); /* unsigned */ + + if (idx < 0) { + uidx = vs_size + (duk_uidx_t) idx; + } else { + /* since index non-negative */ + DUK_ASSERT(idx != DUK_INVALID_INDEX); + uidx = (duk_uidx_t) idx; + } + + /* DUK_INVALID_INDEX won't be accepted as a valid index. */ + DUK_ASSERT(vs_size + (duk_uidx_t) DUK_INVALID_INDEX >= vs_size); + + if (DUK_LIKELY(uidx < vs_size)) { + return (duk_idx_t) uidx; + } + return DUK_INVALID_INDEX; +} + +DUK_EXTERNAL duk_idx_t duk_require_normalize_index(duk_hthread *thr, duk_idx_t idx) { + duk_uidx_t vs_size; + duk_uidx_t uidx; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(DUK_INVALID_INDEX < 0); + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + vs_size = (duk_uidx_t) (thr->valstack_top - thr->valstack_bottom); + DUK_ASSERT_DISABLE(vs_size >= 0); /* unsigned */ + + if (idx < 0) { + uidx = vs_size + (duk_uidx_t) idx; + } else { + DUK_ASSERT(idx != DUK_INVALID_INDEX); + uidx = (duk_uidx_t) idx; + } + + /* DUK_INVALID_INDEX won't be accepted as a valid index. */ + DUK_ASSERT(vs_size + (duk_uidx_t) DUK_INVALID_INDEX >= vs_size); + + if (DUK_LIKELY(uidx < vs_size)) { + return (duk_idx_t) uidx; + } + DUK_ERROR_RANGE_INDEX(thr, idx); + DUK_WO_NORETURN(return 0;); +} + +DUK_INTERNAL duk_tval *duk_get_tval(duk_hthread *thr, duk_idx_t idx) { + duk_uidx_t vs_size; + duk_uidx_t uidx; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(DUK_INVALID_INDEX < 0); + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + vs_size = (duk_uidx_t) (thr->valstack_top - thr->valstack_bottom); + DUK_ASSERT_DISABLE(vs_size >= 0); /* unsigned */ + + if (idx < 0) { + uidx = vs_size + (duk_uidx_t) idx; + } else { + DUK_ASSERT(idx != DUK_INVALID_INDEX); + uidx = (duk_uidx_t) idx; + } + + /* DUK_INVALID_INDEX won't be accepted as a valid index. */ + DUK_ASSERT(vs_size + (duk_uidx_t) DUK_INVALID_INDEX >= vs_size); + + if (DUK_LIKELY(uidx < vs_size)) { + return thr->valstack_bottom + uidx; + } + return NULL; +} + +/* Variant of duk_get_tval() which is guaranteed to return a valid duk_tval + * pointer. When duk_get_tval() would return NULL, this variant returns a + * pointer to a duk_tval with tag DUK_TAG_UNUSED. This allows the call site + * to avoid an unnecessary NULL check which sometimes leads to better code. + * The return duk_tval is read only (at least for the UNUSED value). + */ +DUK_LOCAL const duk_tval_unused duk__const_tval_unused = DUK_TVAL_UNUSED_INITIALIZER(); + +DUK_INTERNAL duk_tval *duk_get_tval_or_unused(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval(thr, idx); + if (tv != NULL) { + return tv; + } + return (duk_tval *) DUK_LOSE_CONST(&duk__const_tval_unused); +} + +DUK_INTERNAL duk_tval *duk_require_tval(duk_hthread *thr, duk_idx_t idx) { + duk_uidx_t vs_size; + duk_uidx_t uidx; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(DUK_INVALID_INDEX < 0); + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + vs_size = (duk_uidx_t) (thr->valstack_top - thr->valstack_bottom); + DUK_ASSERT_DISABLE(vs_size >= 0); /* unsigned */ + + /* Use unsigned arithmetic to optimize comparison. */ + if (idx < 0) { + uidx = vs_size + (duk_uidx_t) idx; + } else { + DUK_ASSERT(idx != DUK_INVALID_INDEX); + uidx = (duk_uidx_t) idx; + } + + /* DUK_INVALID_INDEX won't be accepted as a valid index. */ + DUK_ASSERT(vs_size + (duk_uidx_t) DUK_INVALID_INDEX >= vs_size); + + if (DUK_LIKELY(uidx < vs_size)) { + return thr->valstack_bottom + uidx; + } + DUK_ERROR_RANGE_INDEX(thr, idx); + DUK_WO_NORETURN(return NULL;); +} + +/* Non-critical. */ +DUK_EXTERNAL duk_bool_t duk_is_valid_index(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(DUK_INVALID_INDEX < 0); + + return (duk_normalize_index(thr, idx) >= 0); +} + +/* Non-critical. */ +DUK_EXTERNAL void duk_require_valid_index(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(DUK_INVALID_INDEX < 0); + + if (DUK_UNLIKELY(duk_normalize_index(thr, idx) < 0)) { + DUK_ERROR_RANGE_INDEX(thr, idx); + DUK_WO_NORETURN(return;); + } +} + +/* + * Value stack top handling + */ + +DUK_EXTERNAL duk_idx_t duk_get_top(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + return (duk_idx_t) (thr->valstack_top - thr->valstack_bottom); +} + +/* Internal helper to get current top but to require a minimum top value + * (TypeError if not met). + */ +DUK_INTERNAL duk_idx_t duk_get_top_require_min(duk_hthread *thr, duk_idx_t min_top) { + duk_idx_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + ret = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom); + if (DUK_UNLIKELY(ret < min_top)) { + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return 0;); + } + return ret; +} + +/* Set stack top within currently allocated range, but don't reallocate. + * This is performance critical especially for call handling, so whenever + * changing, profile and look at generated code. + */ +DUK_EXTERNAL void duk_set_top(duk_hthread *thr, duk_idx_t idx) { + duk_uidx_t vs_size; + duk_uidx_t vs_limit; + duk_uidx_t uidx; + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(DUK_INVALID_INDEX < 0); + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT(thr->valstack_end >= thr->valstack_bottom); + vs_size = (duk_uidx_t) (thr->valstack_top - thr->valstack_bottom); + vs_limit = (duk_uidx_t) (thr->valstack_end - thr->valstack_bottom); + + if (idx < 0) { + /* Negative indices are always within allocated stack but + * must not go below zero index. + */ + uidx = vs_size + (duk_uidx_t) idx; + } else { + /* Positive index can be higher than valstack top but must + * not go above allocated stack (equality is OK). + */ + uidx = (duk_uidx_t) idx; + } + + /* DUK_INVALID_INDEX won't be accepted as a valid index. */ + DUK_ASSERT(vs_size + (duk_uidx_t) DUK_INVALID_INDEX >= vs_size); + DUK_ASSERT(vs_size + (duk_uidx_t) DUK_INVALID_INDEX >= vs_limit); + +#if defined(DUK_USE_VALSTACK_UNSAFE) + DUK_ASSERT(uidx <= vs_limit); + DUK_UNREF(vs_limit); +#else + if (DUK_UNLIKELY(uidx > vs_limit)) { + DUK_ERROR_RANGE_INDEX(thr, idx); + DUK_WO_NORETURN(return;); + } +#endif + DUK_ASSERT(uidx <= vs_limit); + + /* Handle change in value stack top. Respect value stack + * initialization policy: 'undefined' above top. Note that + * DECREF may cause a side effect that reallocates valstack, + * so must relookup after DECREF. + */ + + if (uidx >= vs_size) { + /* Stack size increases or stays the same. */ +#if defined(DUK_USE_ASSERTIONS) + duk_uidx_t count; + + count = uidx - vs_size; + while (count != 0) { + count--; + tv = thr->valstack_top + count; + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(tv)); + } +#endif + thr->valstack_top = thr->valstack_bottom + uidx; + } else { + /* Stack size decreases. */ +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_uidx_t count; + duk_tval *tv_end; + + count = vs_size - uidx; + DUK_ASSERT(count > 0); + tv = thr->valstack_top; + tv_end = tv - count; + DUK_ASSERT(tv > tv_end); /* Because count > 0. */ + do { + tv--; + DUK_ASSERT(tv >= thr->valstack_bottom); + DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ(thr, tv); + } while (tv != tv_end); + thr->valstack_top = tv_end; + DUK_REFZERO_CHECK_FAST(thr); +#else /* DUK_USE_REFERENCE_COUNTING */ + duk_uidx_t count; + duk_tval *tv_end; + + count = vs_size - uidx; + tv = thr->valstack_top; + tv_end = tv - count; + DUK_ASSERT(tv > tv_end); + do { + tv--; + DUK_TVAL_SET_UNDEFINED(tv); + } while (tv != tv_end); + thr->valstack_top = tv_end; +#endif /* DUK_USE_REFERENCE_COUNTING */ + } +} + +/* Internal variant with a non-negative index and no runtime size checks. */ +#if defined(DUK_USE_PREFER_SIZE) +DUK_INTERNAL void duk_set_top_unsafe(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + duk_set_top(thr, idx); +} +#else /* DUK_USE_PREFER_SIZE */ +DUK_INTERNAL void duk_set_top_unsafe(duk_hthread *thr, duk_idx_t idx) { + duk_uidx_t uidx; + duk_uidx_t vs_size; + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT(thr->valstack_end >= thr->valstack_bottom); + DUK_ASSERT(idx >= 0); + DUK_ASSERT(idx <= (duk_idx_t) (thr->valstack_end - thr->valstack_bottom)); + + /* XXX: byte arithmetic */ + uidx = (duk_uidx_t) idx; + vs_size = (duk_uidx_t) (thr->valstack_top - thr->valstack_bottom); + + if (uidx >= vs_size) { + /* Stack size increases or stays the same. */ +#if defined(DUK_USE_ASSERTIONS) + duk_uidx_t count; + + count = uidx - vs_size; + while (count != 0) { + count--; + tv = thr->valstack_top + count; + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(tv)); + } +#endif + thr->valstack_top = thr->valstack_bottom + uidx; + } else { + /* Stack size decreases. */ +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_uidx_t count; + duk_tval *tv_end; + + count = vs_size - uidx; + DUK_ASSERT(count > 0); + tv = thr->valstack_top; + tv_end = tv - count; + DUK_ASSERT(tv > tv_end); /* Because count > 0. */ + do { + tv--; + DUK_ASSERT(tv >= thr->valstack_bottom); + DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ(thr, tv); + } while (tv != tv_end); + thr->valstack_top = tv_end; + DUK_REFZERO_CHECK_FAST(thr); +#else /* DUK_USE_REFERENCE_COUNTING */ + duk_uidx_t count; + duk_tval *tv_end; + + count = vs_size - uidx; + tv = thr->valstack_top; + tv_end = tv - count; + DUK_ASSERT(tv > tv_end); + do { + tv--; + DUK_TVAL_SET_UNDEFINED(tv); + } while (tv != tv_end); + thr->valstack_top = tv_end; +#endif /* DUK_USE_REFERENCE_COUNTING */ + } +} +#endif /* DUK_USE_PREFER_SIZE */ + +/* Internal helper: set top to 'top', and set [idx_wipe_start,top[ to + * 'undefined' (doing nothing if idx_wipe_start == top). Indices are + * positive and within value stack reserve. This is used by call handling. + */ +DUK_INTERNAL void duk_set_top_and_wipe(duk_hthread *thr, duk_idx_t top, duk_idx_t idx_wipe_start) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(top >= 0); + DUK_ASSERT(idx_wipe_start >= 0); + DUK_ASSERT(idx_wipe_start <= top); + DUK_ASSERT(thr->valstack_bottom + top <= thr->valstack_end); + DUK_ASSERT(thr->valstack_bottom + idx_wipe_start <= thr->valstack_end); + + duk_set_top_unsafe(thr, idx_wipe_start); + duk_set_top_unsafe(thr, top); +} + +DUK_EXTERNAL duk_idx_t duk_get_top_index(duk_hthread *thr) { + duk_idx_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + ret = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom) - 1; + if (DUK_UNLIKELY(ret < 0)) { + /* Return invalid index; if caller uses this without checking + * in another API call, the index won't map to a valid stack + * entry. + */ + return DUK_INVALID_INDEX; + } + return ret; +} + +/* Internal variant: call assumes there is at least one element on the value + * stack frame; this is only asserted for. + */ +DUK_INTERNAL duk_idx_t duk_get_top_index_unsafe(duk_hthread *thr) { + duk_idx_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + ret = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom) - 1; + return ret; +} + +DUK_EXTERNAL duk_idx_t duk_require_top_index(duk_hthread *thr) { + duk_idx_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + ret = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom) - 1; + if (DUK_UNLIKELY(ret < 0)) { + DUK_ERROR_RANGE_INDEX(thr, -1); + DUK_WO_NORETURN(return 0;); + } + return ret; +} + +/* + * Value stack resizing. + * + * This resizing happens above the current "top": the value stack can be + * grown or shrunk, but the "top" is not affected. The value stack cannot + * be resized to a size below the current reserve. + * + * The low level reallocation primitive must carefully recompute all value + * stack pointers, and must also work if ALL pointers are NULL. The resize + * is quite tricky because the valstack realloc may cause a mark-and-sweep, + * which may run finalizers. Running finalizers may resize the valstack + * recursively (the same value stack we're working on). So, after realloc + * returns, we know that the valstack bottom, top, and reserve should still + * be the same (there should not be live values above the "top"), but its + * underlying size, alloc_end, and base pointer may have changed. + * + * 'new_size' is known to be <= DUK_USE_VALSTACK_LIMIT, which ensures that + * size_t and pointer arithmetic won't wrap in duk__resize_valstack(). + */ + +/* Low level valstack resize primitive, used for both grow and shrink. All + * adjustments for slack etc have already been done. Doesn't throw but does + * have allocation side effects. + */ +DUK_LOCAL DUK_COLD DUK_NOINLINE duk_bool_t duk__resize_valstack(duk_hthread *thr, duk_size_t new_size) { + duk_tval *pre_valstack; + duk_tval *pre_bottom; + duk_tval *pre_top; + duk_tval *pre_end; + duk_tval *pre_alloc_end; + duk_ptrdiff_t ptr_diff; + duk_tval *new_valstack; + duk_size_t new_alloc_size; + duk_tval *tv_prev_alloc_end; + duk_tval *p; + + DUK_HTHREAD_ASSERT_VALID(thr); + DUK_ASSERT(thr->valstack_bottom >= thr->valstack); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT(thr->valstack_end >= thr->valstack_top); + DUK_ASSERT(thr->valstack_alloc_end >= thr->valstack_end); + DUK_ASSERT((duk_size_t) (thr->valstack_top - thr->valstack) <= new_size); /* can't resize below 'top' */ + DUK_ASSERT(new_size <= DUK_USE_VALSTACK_LIMIT); /* valstack limit caller has check, prevents wrapping */ + DUK_ASSERT(new_size <= DUK_SIZE_MAX / sizeof(duk_tval)); /* specific assert for wrapping */ + + /* Pre-realloc pointer copies for asserts and debug logs. */ + pre_valstack = thr->valstack; + pre_bottom = thr->valstack_bottom; + pre_top = thr->valstack_top; + pre_end = thr->valstack_end; + pre_alloc_end = thr->valstack_alloc_end; + + DUK_UNREF(pre_valstack); + DUK_UNREF(pre_bottom); + DUK_UNREF(pre_top); + DUK_UNREF(pre_end); + DUK_UNREF(pre_alloc_end); + + /* If finalizer torture enabled, force base pointer change every time + * when it would be allowed. + */ +#if defined(DUK_USE_FINALIZER_TORTURE) + if (thr->heap->pf_prevent_count == 0) { + duk_hthread_valstack_torture_realloc(thr); + } +#endif + + /* Allocate a new valstack using DUK_REALLOC_DIRECT() to deal with + * a side effect changing the base pointer. + */ + new_alloc_size = sizeof(duk_tval) * new_size; + new_valstack = (duk_tval *) DUK_REALLOC_INDIRECT(thr->heap, duk_hthread_get_valstack_ptr, (void *) thr, new_alloc_size); + if (DUK_UNLIKELY(new_valstack == NULL)) { + /* Because new_size != 0, if condition doesn't need to be + * (new_valstack != NULL || new_size == 0). + */ + DUK_ASSERT(new_size != 0); + DUK_D(DUK_DPRINT("failed to resize valstack to %lu entries (%lu bytes)", + (unsigned long) new_size, + (unsigned long) new_alloc_size)); + return 0; + } + + /* Debug log any changes in pointer(s) by side effects. These don't + * necessarily imply any incorrect behavior, but should be rare in + * practice. + */ +#if defined(DUK_USE_DEBUG) + if (thr->valstack != pre_valstack) { + DUK_D(DUK_DPRINT("valstack base pointer changed during valstack resize: %p -> %p", + (void *) pre_valstack, + (void *) thr->valstack)); + } + if (thr->valstack_bottom != pre_bottom) { + DUK_D(DUK_DPRINT("valstack bottom pointer changed during valstack resize: %p -> %p", + (void *) pre_bottom, + (void *) thr->valstack_bottom)); + } + if (thr->valstack_top != pre_top) { + DUK_D(DUK_DPRINT("valstack top pointer changed during valstack resize: %p -> %p", + (void *) pre_top, + (void *) thr->valstack_top)); + } + if (thr->valstack_end != pre_end) { + DUK_D(DUK_DPRINT("valstack end pointer changed during valstack resize: %p -> %p", + (void *) pre_end, + (void *) thr->valstack_end)); + } + if (thr->valstack_alloc_end != pre_alloc_end) { + DUK_D(DUK_DPRINT("valstack alloc_end pointer changed during valstack resize: %p -> %p", + (void *) pre_alloc_end, + (void *) thr->valstack_alloc_end)); + } +#endif + + /* Assertions: offsets for bottom, top, and end (reserve) must not + * have changed even with side effects because they are always + * restored in unwind. For alloc_end there's no guarantee: it may + * have grown or shrunk (but remain above 'end'). + */ + DUK_ASSERT(thr->valstack_bottom - thr->valstack == pre_bottom - pre_valstack); + DUK_ASSERT(thr->valstack_top - thr->valstack == pre_top - pre_valstack); + DUK_ASSERT(thr->valstack_end - thr->valstack == pre_end - pre_valstack); + DUK_ASSERT(thr->valstack_alloc_end >= thr->valstack_end); + + /* Write new pointers. Most pointers can be handled as a pointer + * difference. + */ + ptr_diff = (duk_ptrdiff_t) ((duk_uint8_t *) new_valstack - (duk_uint8_t *) thr->valstack); + tv_prev_alloc_end = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack_alloc_end + ptr_diff); + thr->valstack = new_valstack; + thr->valstack_bottom = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack_bottom + ptr_diff); + thr->valstack_top = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack_top + ptr_diff); + thr->valstack_end = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack_end + ptr_diff); + thr->valstack_alloc_end = (duk_tval *) (void *) ((duk_uint8_t *) new_valstack + new_alloc_size); + + /* Assertions: pointer sanity after pointer updates. */ + DUK_ASSERT(thr->valstack_bottom >= thr->valstack); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT(thr->valstack_end >= thr->valstack_top); + DUK_ASSERT(thr->valstack_alloc_end >= thr->valstack_end); + + DUK_D(DUK_DPRINT("resized valstack %lu -> %lu elements (%lu -> %lu bytes): " + "base=%p -> %p, bottom=%p -> %p (%ld), top=%p -> %p (%ld), " + "end=%p -> %p (%ld), alloc_end=%p -> %p (%ld);" + " tv_prev_alloc_end=%p (-> %ld inits; <0 means shrink)", + (unsigned long) (pre_alloc_end - pre_valstack), + (unsigned long) new_size, + (unsigned long) ((duk_uint8_t *) pre_alloc_end - (duk_uint8_t *) pre_valstack), + (unsigned long) new_alloc_size, + (void *) pre_valstack, + (void *) thr->valstack, + (void *) pre_bottom, + (void *) thr->valstack_bottom, + (long) (thr->valstack_bottom - thr->valstack), + (void *) pre_top, + (void *) thr->valstack_top, + (long) (thr->valstack_top - thr->valstack), + (void *) pre_end, + (void *) thr->valstack_end, + (long) (thr->valstack_end - thr->valstack), + (void *) pre_alloc_end, + (void *) thr->valstack_alloc_end, + (long) (thr->valstack_alloc_end - thr->valstack), + (void *) tv_prev_alloc_end, + (long) (thr->valstack_alloc_end - tv_prev_alloc_end))); + + /* If allocation grew, init any new slots to 'undefined'. */ + p = tv_prev_alloc_end; + while (p < thr->valstack_alloc_end) { + /* Never executed if new size is smaller. */ + DUK_TVAL_SET_UNDEFINED(p); + p++; + } + + /* Assert for value stack initialization policy. */ +#if defined(DUK_USE_ASSERTIONS) + p = thr->valstack_top; + while (p < thr->valstack_alloc_end) { + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(p)); + p++; + } +#endif + + return 1; +} + +DUK_LOCAL DUK_COLD DUK_NOINLINE duk_bool_t duk__valstack_grow(duk_hthread *thr, duk_size_t min_bytes, duk_bool_t throw_on_error) { + duk_size_t min_size; + duk_size_t new_size; + + DUK_ASSERT(min_bytes / sizeof(duk_tval) * sizeof(duk_tval) == min_bytes); + min_size = min_bytes / sizeof(duk_tval); /* from bytes to slots */ + +#if defined(DUK_USE_VALSTACK_GROW_SHIFT) + /* New size is minimum size plus a proportional slack, e.g. shift of + * 2 means a 25% slack. + */ + new_size = min_size + (min_size >> DUK_USE_VALSTACK_GROW_SHIFT); +#else + /* New size is tight with no slack. This is sometimes preferred in + * low memory environments. + */ + new_size = min_size; +#endif + + if (DUK_UNLIKELY(new_size > DUK_USE_VALSTACK_LIMIT || new_size < min_size /*wrap*/)) { + /* Note: may be triggered even if minimal new_size would not reach the limit, + * plan limit accordingly. + */ + if (throw_on_error) { + DUK_ERROR_RANGE(thr, DUK_STR_VALSTACK_LIMIT); + DUK_WO_NORETURN(return 0;); + } + return 0; + } + + if (duk__resize_valstack(thr, new_size) == 0) { + if (throw_on_error) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return 0;); + } + return 0; + } + + thr->valstack_end = thr->valstack + min_size; + DUK_ASSERT(thr->valstack_alloc_end >= thr->valstack_end); + + return 1; +} + +/* Hot, inlined value stack grow check. Because value stack almost never + * grows, the actual resize call is in a NOINLINE helper. + */ +DUK_INTERNAL DUK_INLINE void duk_valstack_grow_check_throw(duk_hthread *thr, duk_size_t min_bytes) { + duk_tval *tv; + + tv = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + min_bytes); + if (DUK_LIKELY(thr->valstack_end >= tv)) { + return; + } + if (DUK_LIKELY(thr->valstack_alloc_end >= tv)) { + /* Values in [valstack_top,valstack_alloc_end[ are initialized + * to 'undefined' so we can just move the end pointer. + */ + thr->valstack_end = tv; + return; + } + (void) duk__valstack_grow(thr, min_bytes, 1 /*throw_on_error*/); +} + +/* Hot, inlined value stack grow check which doesn't throw. */ +DUK_INTERNAL DUK_INLINE duk_bool_t duk_valstack_grow_check_nothrow(duk_hthread *thr, duk_size_t min_bytes) { + duk_tval *tv; + + tv = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + min_bytes); + if (DUK_LIKELY(thr->valstack_end >= tv)) { + return 1; + } + if (DUK_LIKELY(thr->valstack_alloc_end >= tv)) { + thr->valstack_end = tv; + return 1; + } + return duk__valstack_grow(thr, min_bytes, 0 /*throw_on_error*/); +} + +/* Value stack shrink check, called from mark-and-sweep. */ +DUK_INTERNAL void duk_valstack_shrink_check_nothrow(duk_hthread *thr, duk_bool_t snug) { + duk_size_t alloc_bytes; + duk_size_t reserve_bytes; + duk_size_t shrink_bytes; + + alloc_bytes = (duk_size_t) ((duk_uint8_t *) thr->valstack_alloc_end - (duk_uint8_t *) thr->valstack); + reserve_bytes = (duk_size_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack); + DUK_ASSERT(alloc_bytes >= reserve_bytes); + + /* We're free to shrink the value stack allocation down to + * reserve_bytes but not more. If 'snug' (emergency GC) + * shrink whatever we can. Otherwise only shrink if the new + * size would be considerably smaller. + */ + +#if defined(DUK_USE_VALSTACK_SHRINK_CHECK_SHIFT) + if (snug) { + shrink_bytes = reserve_bytes; + } else { + duk_size_t proportion, slack; + + /* Require that value stack shrinks by at least X% of its + * current size. For example, shift of 2 means at least + * 25%. The proportion is computed as bytes and may not + * be a multiple of sizeof(duk_tval); that's OK here. + */ + proportion = alloc_bytes >> DUK_USE_VALSTACK_SHRINK_CHECK_SHIFT; + if (alloc_bytes - reserve_bytes < proportion) { + /* Too little would be freed, do nothing. */ + return; + } + + /* Keep a slack after shrinking. The slack is again a + * proportion of the current size (the proportion should + * of course be smaller than the check proportion above). + */ +#if defined(DUK_USE_VALSTACK_SHRINK_SLACK_SHIFT) + DUK_ASSERT(DUK_USE_VALSTACK_SHRINK_SLACK_SHIFT > DUK_USE_VALSTACK_SHRINK_CHECK_SHIFT); + slack = alloc_bytes >> DUK_USE_VALSTACK_SHRINK_SLACK_SHIFT; +#else + slack = 0; +#endif + shrink_bytes = reserve_bytes + slack / sizeof(duk_tval) * sizeof(duk_tval); /* multiple of duk_tval */ + } +#else /* DUK_USE_VALSTACK_SHRINK_CHECK_SHIFT */ + /* Always snug, useful in some low memory environments. */ + DUK_UNREF(snug); + shrink_bytes = reserve_bytes; +#endif /* DUK_USE_VALSTACK_SHRINK_CHECK_SHIFT */ + + DUK_D(DUK_DPRINT("valstack shrink check: alloc_bytes=%ld, reserve_bytes=%ld, shrink_bytes=%ld (unvalidated)", + (long) alloc_bytes, + (long) reserve_bytes, + (long) shrink_bytes)); + DUK_ASSERT(shrink_bytes >= reserve_bytes); + if (shrink_bytes >= alloc_bytes) { + /* Skip if shrink target is same as current one (or higher, + * though that shouldn't happen in practice). + */ + return; + } + DUK_ASSERT(shrink_bytes / sizeof(duk_tval) * sizeof(duk_tval) == shrink_bytes); + + DUK_D(DUK_DPRINT("valstack shrink check: decided to shrink, snug: %ld", (long) snug)); + + duk__resize_valstack(thr, shrink_bytes / sizeof(duk_tval)); +} + +DUK_EXTERNAL duk_bool_t duk_check_stack(duk_hthread *thr, duk_idx_t extra) { + duk_size_t min_new_bytes; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr != NULL); + + if (DUK_UNLIKELY(extra < 0 || extra > DUK_USE_VALSTACK_LIMIT)) { + if (extra < 0) { + /* Clamping to zero makes the API more robust to calling code + * calculation errors. + */ + extra = 0; + } else { + /* Cause grow check to fail without wrapping arithmetic. */ + extra = DUK_USE_VALSTACK_LIMIT; + } + } + + min_new_bytes = (duk_size_t) ((duk_uint8_t *) thr->valstack_top - (duk_uint8_t *) thr->valstack) + + sizeof(duk_tval) * ((duk_size_t) extra + DUK_VALSTACK_INTERNAL_EXTRA); + return duk_valstack_grow_check_nothrow(thr, min_new_bytes); +} + +DUK_EXTERNAL void duk_require_stack(duk_hthread *thr, duk_idx_t extra) { + duk_size_t min_new_bytes; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr != NULL); + + if (DUK_UNLIKELY(extra < 0 || extra > DUK_USE_VALSTACK_LIMIT)) { + if (extra < 0) { + /* Clamping to zero makes the API more robust to calling code + * calculation errors. + */ + extra = 0; + } else { + /* Cause grow check to fail without wrapping arithmetic. */ + extra = DUK_USE_VALSTACK_LIMIT; + } + } + + min_new_bytes = (duk_size_t) ((duk_uint8_t *) thr->valstack_top - (duk_uint8_t *) thr->valstack) + + sizeof(duk_tval) * ((duk_size_t) extra + DUK_VALSTACK_INTERNAL_EXTRA); + duk_valstack_grow_check_throw(thr, min_new_bytes); +} + +DUK_EXTERNAL duk_bool_t duk_check_stack_top(duk_hthread *thr, duk_idx_t top) { + duk_size_t min_new_bytes; + + DUK_ASSERT_API_ENTRY(thr); + + if (DUK_UNLIKELY(top < 0 || top > DUK_USE_VALSTACK_LIMIT)) { + if (top < 0) { + /* Clamping to zero makes the API more robust to calling code + * calculation errors. + */ + top = 0; + } else { + /* Cause grow check to fail without wrapping arithmetic. */ + top = DUK_USE_VALSTACK_LIMIT; + } + } + + DUK_ASSERT(top >= 0); + min_new_bytes = (duk_size_t) ((duk_uint8_t *) thr->valstack_bottom - (duk_uint8_t *) thr->valstack) + + sizeof(duk_tval) * ((duk_size_t) top + DUK_VALSTACK_INTERNAL_EXTRA); + return duk_valstack_grow_check_nothrow(thr, min_new_bytes); +} + +DUK_EXTERNAL void duk_require_stack_top(duk_hthread *thr, duk_idx_t top) { + duk_size_t min_new_bytes; + + DUK_ASSERT_API_ENTRY(thr); + + if (DUK_UNLIKELY(top < 0 || top > DUK_USE_VALSTACK_LIMIT)) { + if (top < 0) { + /* Clamping to zero makes the API more robust to calling code + * calculation errors. + */ + top = 0; + } else { + /* Cause grow check to fail without wrapping arithmetic. */ + top = DUK_USE_VALSTACK_LIMIT; + } + } + + DUK_ASSERT(top >= 0); + min_new_bytes = (duk_size_t) ((duk_uint8_t *) thr->valstack_bottom - (duk_uint8_t *) thr->valstack) + + sizeof(duk_tval) * ((duk_size_t) top + DUK_VALSTACK_INTERNAL_EXTRA); + duk_valstack_grow_check_throw(thr, min_new_bytes); +} + +/* + * Basic stack manipulation: swap, dup, insert, replace, etc + */ + +DUK_EXTERNAL void duk_swap(duk_hthread *thr, duk_idx_t idx1, duk_idx_t idx2) { + duk_tval *tv1; + duk_tval *tv2; + duk_tval tv_tmp; + + DUK_ASSERT_API_ENTRY(thr); + + tv1 = duk_require_tval(thr, idx1); + DUK_ASSERT(tv1 != NULL); + tv2 = duk_require_tval(thr, idx2); + DUK_ASSERT(tv2 != NULL); + + /* If tv1==tv2 this is a NOP, no check is needed */ + DUK_TVAL_SET_TVAL(&tv_tmp, tv1); + DUK_TVAL_SET_TVAL(tv1, tv2); + DUK_TVAL_SET_TVAL(tv2, &tv_tmp); +} + +DUK_EXTERNAL void duk_swap_top(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + duk_swap(thr, idx, -1); +} + +DUK_EXTERNAL void duk_dup(duk_hthread *thr, duk_idx_t from_idx) { + duk_tval *tv_from; + duk_tval *tv_to; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + + tv_from = duk_require_tval(thr, from_idx); + tv_to = thr->valstack_top++; + DUK_ASSERT(tv_from != NULL); + DUK_ASSERT(tv_to != NULL); + DUK_TVAL_SET_TVAL(tv_to, tv_from); + DUK_TVAL_INCREF(thr, tv_to); /* no side effects */ +} + +DUK_EXTERNAL void duk_dup_top(duk_hthread *thr) { +#if defined(DUK_USE_PREFER_SIZE) + duk_dup(thr, -1); +#else + duk_tval *tv_from; + duk_tval *tv_to; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + + if (DUK_UNLIKELY(thr->valstack_top - thr->valstack_bottom <= 0)) { + DUK_ERROR_RANGE_INDEX(thr, -1); + DUK_WO_NORETURN(return;); + } + tv_from = thr->valstack_top - 1; + tv_to = thr->valstack_top++; + DUK_ASSERT(tv_from != NULL); + DUK_ASSERT(tv_to != NULL); + DUK_TVAL_SET_TVAL(tv_to, tv_from); + DUK_TVAL_INCREF(thr, tv_to); /* no side effects */ +#endif +} + +DUK_INTERNAL void duk_dup_0(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_dup(thr, 0); +} +DUK_INTERNAL void duk_dup_1(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_dup(thr, 1); +} +DUK_INTERNAL void duk_dup_2(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_dup(thr, 2); +} +DUK_INTERNAL void duk_dup_m2(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_dup(thr, -2); +} +DUK_INTERNAL void duk_dup_m3(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_dup(thr, -3); +} +DUK_INTERNAL void duk_dup_m4(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_dup(thr, -4); +} + +DUK_EXTERNAL void duk_insert(duk_hthread *thr, duk_idx_t to_idx) { + duk_tval *p; + duk_tval *q; + duk_tval tv_tmp; + duk_size_t nbytes; + + DUK_ASSERT_API_ENTRY(thr); + + p = duk_require_tval(thr, to_idx); + DUK_ASSERT(p != NULL); + q = duk_require_tval(thr, -1); + DUK_ASSERT(q != NULL); + + DUK_ASSERT(q >= p); + + /* nbytes + * <---------> + * [ ... | p | x | x | q ] + * => [ ... | q | p | x | x ] + */ + + nbytes = (duk_size_t) (((duk_uint8_t *) q) - ((duk_uint8_t *) p)); + + DUK_DDD(DUK_DDDPRINT("duk_insert: to_idx=%ld, p=%p, q=%p, nbytes=%lu", + (long) to_idx, + (void *) p, + (void *) q, + (unsigned long) nbytes)); + + /* No net refcount changes. No need to special case nbytes == 0 + * (p == q). + */ + DUK_TVAL_SET_TVAL(&tv_tmp, q); + duk_memmove((void *) (p + 1), (const void *) p, (size_t) nbytes); + DUK_TVAL_SET_TVAL(p, &tv_tmp); +} + +DUK_INTERNAL void duk_insert_undefined(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(idx >= 0); /* Doesn't support negative indices. */ + + duk_push_undefined(thr); + duk_insert(thr, idx); +} + +DUK_INTERNAL void duk_insert_undefined_n(duk_hthread *thr, duk_idx_t idx, duk_idx_t count) { + duk_tval *tv, *tv_end; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(idx >= 0); /* Doesn't support negative indices or count. */ + DUK_ASSERT(count >= 0); + + tv = duk_reserve_gap(thr, idx, count); + tv_end = tv + count; + while (tv != tv_end) { + DUK_TVAL_SET_UNDEFINED(tv); + tv++; + } +} + +DUK_EXTERNAL void duk_pull(duk_hthread *thr, duk_idx_t from_idx) { + duk_tval *p; + duk_tval *q; + duk_tval tv_tmp; + duk_size_t nbytes; + + DUK_ASSERT_API_ENTRY(thr); + + /* nbytes + * <---------> + * [ ... | x | x | p | y | y | q ] + * => [ ... | x | x | y | y | q | p ] + */ + + p = duk_require_tval(thr, from_idx); + DUK_ASSERT(p != NULL); + q = duk_require_tval(thr, -1); + DUK_ASSERT(q != NULL); + + DUK_ASSERT(q >= p); + + nbytes = (duk_size_t) (((duk_uint8_t *) q) - ((duk_uint8_t *) p)); + + DUK_DDD(DUK_DDDPRINT("duk_pull: from_idx=%ld, p=%p, q=%p, nbytes=%lu", + (long) from_idx, + (void *) p, + (void *) q, + (unsigned long) nbytes)); + + /* No net refcount changes. No need to special case nbytes == 0 + * (p == q). + */ + DUK_TVAL_SET_TVAL(&tv_tmp, p); + duk_memmove((void *) p, (const void *) (p + 1), (size_t) nbytes); + DUK_TVAL_SET_TVAL(q, &tv_tmp); +} + +DUK_EXTERNAL void duk_replace(duk_hthread *thr, duk_idx_t to_idx) { + duk_tval *tv1; + duk_tval *tv2; + duk_tval tv_tmp; + + DUK_ASSERT_API_ENTRY(thr); + + tv1 = duk_require_tval(thr, -1); + DUK_ASSERT(tv1 != NULL); + tv2 = duk_require_tval(thr, to_idx); + DUK_ASSERT(tv2 != NULL); + + /* For tv1 == tv2, both pointing to stack top, the end result + * is same as duk_pop(thr). + */ + DUK_TVAL_SET_TVAL(&tv_tmp, tv2); + DUK_TVAL_SET_TVAL(tv2, tv1); + DUK_TVAL_SET_UNDEFINED(tv1); + thr->valstack_top--; + DUK_TVAL_DECREF(thr, &tv_tmp); /* side effects */ +} + +DUK_EXTERNAL void duk_copy(duk_hthread *thr, duk_idx_t from_idx, duk_idx_t to_idx) { + duk_tval *tv1; + duk_tval *tv2; + + DUK_ASSERT_API_ENTRY(thr); + + tv1 = duk_require_tval(thr, from_idx); + DUK_ASSERT(tv1 != NULL); + tv2 = duk_require_tval(thr, to_idx); + DUK_ASSERT(tv2 != NULL); + + /* For tv1 == tv2, this is a no-op (no explicit check needed). */ + DUK_TVAL_SET_TVAL_UPDREF(thr, tv2, tv1); /* side effects */ +} + +DUK_EXTERNAL void duk_remove(duk_hthread *thr, duk_idx_t idx) { + duk_tval *p; + duk_tval *q; +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_tval tv_tmp; +#endif + duk_size_t nbytes; + + DUK_ASSERT_API_ENTRY(thr); + + p = duk_require_tval(thr, idx); + DUK_ASSERT(p != NULL); + q = duk_require_tval(thr, -1); + DUK_ASSERT(q != NULL); + + DUK_ASSERT(q >= p); + + /* nbytes zero size case + * <---------> + * [ ... | p | x | x | q ] [ ... | p==q ] + * => [ ... | x | x | q ] [ ... ] + */ + +#if defined(DUK_USE_REFERENCE_COUNTING) + /* use a temp: decref only when valstack reachable values are correct */ + DUK_TVAL_SET_TVAL(&tv_tmp, p); +#endif + + nbytes = (duk_size_t) (((duk_uint8_t *) q) - ((duk_uint8_t *) p)); /* Note: 'q' is top-1 */ + duk_memmove((void *) p, (const void *) (p + 1), (size_t) nbytes); + + DUK_TVAL_SET_UNDEFINED(q); + thr->valstack_top--; + +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_TVAL_DECREF(thr, &tv_tmp); /* side effects */ +#endif +} + +DUK_INTERNAL void duk_remove_unsafe(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + duk_remove(thr, idx); /* XXX: no optimization for now */ +} + +DUK_INTERNAL void duk_remove_m2(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + duk_remove(thr, -2); +} + +DUK_INTERNAL void duk_remove_n(duk_hthread *thr, duk_idx_t idx, duk_idx_t count) { +#if defined(DUK_USE_PREFER_SIZE) + /* XXX: maybe too slow even when preferring size? */ + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(count >= 0); + DUK_ASSERT(idx >= 0); + + while (count-- > 0) { + duk_remove(thr, idx); + } +#else /* DUK_USE_PREFER_SIZE */ + duk_tval *tv_src; + duk_tval *tv_dst; + duk_tval *tv_newtop; + duk_tval *tv; + duk_size_t bytes; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(count >= 0); + DUK_ASSERT(idx >= 0); + + tv_dst = thr->valstack_bottom + idx; + DUK_ASSERT(tv_dst <= thr->valstack_top); + tv_src = tv_dst + count; + DUK_ASSERT(tv_src <= thr->valstack_top); + bytes = (duk_size_t) ((duk_uint8_t *) thr->valstack_top - (duk_uint8_t *) tv_src); + + for (tv = tv_dst; tv < tv_src; tv++) { + DUK_TVAL_DECREF_NORZ(thr, tv); + } + + duk_memmove((void *) tv_dst, (const void *) tv_src, bytes); + + tv_newtop = thr->valstack_top - count; + for (tv = tv_newtop; tv < thr->valstack_top; tv++) { + DUK_TVAL_SET_UNDEFINED(tv); + } + thr->valstack_top = tv_newtop; + + /* When not preferring size, only NORZ macros are used; caller + * is expected to DUK_REFZERO_CHECK(). + */ +#endif /* DUK_USE_PREFER_SIZE */ +} + +DUK_INTERNAL void duk_remove_n_unsafe(duk_hthread *thr, duk_idx_t idx, duk_idx_t count) { + DUK_ASSERT_API_ENTRY(thr); + + duk_remove_n(thr, idx, count); /* XXX: no optimization for now */ +} + +/* + * Stack slice primitives + */ + +DUK_EXTERNAL void duk_xcopymove_raw(duk_hthread *to_thr, duk_hthread *from_thr, duk_idx_t count, duk_bool_t is_copy) { + void *src; + duk_size_t nbytes; + duk_tval *p; + duk_tval *q; + + /* XXX: several pointer comparison issues here */ + + DUK_ASSERT_API_ENTRY(to_thr); + DUK_CTX_ASSERT_VALID(to_thr); + DUK_CTX_ASSERT_VALID(from_thr); + DUK_ASSERT(to_thr->heap == from_thr->heap); + + if (DUK_UNLIKELY(to_thr == from_thr)) { + DUK_ERROR_TYPE(to_thr, DUK_STR_INVALID_CONTEXT); + DUK_WO_NORETURN(return;); + } + if (DUK_UNLIKELY((duk_uidx_t) count > (duk_uidx_t) DUK_USE_VALSTACK_LIMIT)) { + /* Maximum value check ensures 'nbytes' won't wrap below. + * Also handles negative count. + */ + DUK_ERROR_RANGE_INVALID_COUNT(to_thr); + DUK_WO_NORETURN(return;); + } + DUK_ASSERT(count >= 0); + + nbytes = sizeof(duk_tval) * (duk_size_t) count; + if (DUK_UNLIKELY(nbytes == 0)) { + return; + } + DUK_ASSERT(to_thr->valstack_top <= to_thr->valstack_end); + if (DUK_UNLIKELY((duk_size_t) ((duk_uint8_t *) to_thr->valstack_end - (duk_uint8_t *) to_thr->valstack_top) < nbytes)) { + DUK_ERROR_RANGE_PUSH_BEYOND(to_thr); + DUK_WO_NORETURN(return;); + } + src = (void *) ((duk_uint8_t *) from_thr->valstack_top - nbytes); + if (DUK_UNLIKELY(src < (void *) from_thr->valstack_bottom)) { + DUK_ERROR_RANGE_INVALID_COUNT(to_thr); + DUK_WO_NORETURN(return;); + } + + /* Copy values (no overlap even if to_thr == from_thr; that's not + * allowed now anyway). + */ + DUK_ASSERT(nbytes > 0); + duk_memcpy((void *) to_thr->valstack_top, (const void *) src, (size_t) nbytes); + + p = to_thr->valstack_top; + to_thr->valstack_top = (duk_tval *) (void *) (((duk_uint8_t *) p) + nbytes); + + if (is_copy) { + /* Incref copies, keep originals. */ + q = to_thr->valstack_top; + while (p < q) { + DUK_TVAL_INCREF(to_thr, p); /* no side effects */ + p++; + } + } else { + /* No net refcount change. */ + p = from_thr->valstack_top; + q = (duk_tval *) (void *) (((duk_uint8_t *) p) - nbytes); + from_thr->valstack_top = q; + + while (p > q) { + p--; + DUK_TVAL_SET_UNDEFINED(p); + /* XXX: fast primitive to set a bunch of values to UNDEFINED */ + } + } +} + +/* Internal helper: reserve a gap of 'count' elements at 'idx_base' and return a + * pointer to the gap. Values in the gap are garbage and MUST be initialized by + * the caller before any side effects may occur. The caller must ensure there's + * enough stack reserve for 'count' values. + */ +DUK_INTERNAL duk_tval *duk_reserve_gap(duk_hthread *thr, duk_idx_t idx_base, duk_idx_t count) { + duk_tval *tv_src; + duk_tval *tv_dst; + duk_size_t gap_bytes; + duk_size_t copy_bytes; + + /* Caller is responsible for ensuring there's enough preallocated + * value stack. + */ + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(count >= 0); + DUK_ASSERT((duk_size_t) (thr->valstack_end - thr->valstack_top) >= (duk_size_t) count); + + tv_src = thr->valstack_bottom + idx_base; + gap_bytes = (duk_size_t) count * sizeof(duk_tval); + tv_dst = (duk_tval *) (void *) ((duk_uint8_t *) tv_src + gap_bytes); + copy_bytes = (duk_size_t) ((duk_uint8_t *) thr->valstack_top - (duk_uint8_t *) tv_src); + thr->valstack_top = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack_top + gap_bytes); + duk_memmove((void *) tv_dst, (const void *) tv_src, copy_bytes); + + /* Values in the gap are left as garbage: caller must fill them in + * and INCREF them before any side effects. + */ + return tv_src; +} + +/* + * Get/opt/require + */ + +DUK_EXTERNAL void duk_require_undefined(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_UNLIKELY(!DUK_TVAL_IS_UNDEFINED(tv))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "undefined", DUK_STR_NOT_UNDEFINED); + DUK_WO_NORETURN(return;); + } +} + +DUK_EXTERNAL void duk_require_null(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_UNLIKELY(!DUK_TVAL_IS_NULL(tv))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "null", DUK_STR_NOT_NULL); + DUK_WO_NORETURN(return;); + } +} + +DUK_LOCAL DUK_ALWAYS_INLINE duk_bool_t duk__get_boolean_raw(duk_hthread *thr, duk_idx_t idx, duk_bool_t def_value) { + duk_bool_t ret; + duk_tval *tv; + + DUK_CTX_ASSERT_VALID(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_TVAL_IS_BOOLEAN(tv)) { + ret = DUK_TVAL_GET_BOOLEAN(tv); + DUK_ASSERT(ret == 0 || ret == 1); + } else { + ret = def_value; + /* Not guaranteed to be 0 or 1. */ + } + + return ret; +} + +DUK_EXTERNAL duk_bool_t duk_get_boolean(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + return duk__get_boolean_raw(thr, idx, 0); /* default: false */ +} + +DUK_EXTERNAL duk_bool_t duk_get_boolean_default(duk_hthread *thr, duk_idx_t idx, duk_bool_t def_value) { + DUK_ASSERT_API_ENTRY(thr); + + return duk__get_boolean_raw(thr, idx, def_value); +} + +DUK_EXTERNAL duk_bool_t duk_require_boolean(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_bool_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_LIKELY(DUK_TVAL_IS_BOOLEAN(tv))) { + ret = DUK_TVAL_GET_BOOLEAN(tv); + DUK_ASSERT(ret == 0 || ret == 1); + return ret; + } else { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "boolean", DUK_STR_NOT_BOOLEAN); + DUK_WO_NORETURN(return 0;); + } +} + +DUK_EXTERNAL duk_bool_t duk_opt_boolean(duk_hthread *thr, duk_idx_t idx, duk_bool_t def_value) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + return def_value; + } + return duk_require_boolean(thr, idx); +} + +DUK_LOCAL DUK_ALWAYS_INLINE duk_double_t duk__get_number_raw(duk_hthread *thr, duk_idx_t idx, duk_double_t def_value) { + duk_double_union ret; + duk_tval *tv; + + DUK_CTX_ASSERT_VALID(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv)) { + ret.d = (duk_double_t) DUK_TVAL_GET_FASTINT(tv); /* XXX: cast trick */ + } else +#endif + if (DUK_TVAL_IS_DOUBLE(tv)) { + /* When using packed duk_tval, number must be in NaN-normalized form + * for it to be a duk_tval, so no need to normalize. NOP for unpacked + * duk_tval. + */ + ret.d = DUK_TVAL_GET_DOUBLE(tv); + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&ret)); + } else { + ret.d = def_value; + /* Default value (including NaN) may not be normalized. */ + } + + return ret.d; +} + +DUK_EXTERNAL duk_double_t duk_get_number(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__get_number_raw(thr, idx, DUK_DOUBLE_NAN); /* default: NaN */ +} + +DUK_EXTERNAL duk_double_t duk_get_number_default(duk_hthread *thr, duk_idx_t idx, duk_double_t def_value) { + DUK_ASSERT_API_ENTRY(thr); + return duk__get_number_raw(thr, idx, def_value); +} + +DUK_EXTERNAL duk_double_t duk_require_number(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_double_union ret; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_UNLIKELY(!DUK_TVAL_IS_NUMBER(tv))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "number", DUK_STR_NOT_NUMBER); + DUK_WO_NORETURN(return 0.0;); + } + + ret.d = DUK_TVAL_GET_NUMBER(tv); + + /* When using packed duk_tval, number must be in NaN-normalized form + * for it to be a duk_tval, so no need to normalize. NOP for unpacked + * duk_tval. + */ + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&ret)); + return ret.d; +} + +DUK_EXTERNAL duk_double_t duk_opt_number(duk_hthread *thr, duk_idx_t idx, duk_double_t def_value) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + /* User provided default is not NaN normalized. */ + return def_value; + } + return duk_require_number(thr, idx); +} + +DUK_EXTERNAL duk_int_t duk_get_int(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + return (duk_int_t) duk__api_coerce_d2i(thr, idx, 0 /*def_value*/, 0 /*require*/); +} + +DUK_EXTERNAL duk_uint_t duk_get_uint(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + return (duk_uint_t) duk__api_coerce_d2ui(thr, idx, 0 /*def_value*/, 0 /*require*/); +} + +DUK_EXTERNAL duk_int_t duk_get_int_default(duk_hthread *thr, duk_idx_t idx, duk_int_t def_value) { + DUK_ASSERT_API_ENTRY(thr); + + return (duk_int_t) duk__api_coerce_d2i(thr, idx, def_value, 0 /*require*/); +} + +DUK_EXTERNAL duk_uint_t duk_get_uint_default(duk_hthread *thr, duk_idx_t idx, duk_uint_t def_value) { + DUK_ASSERT_API_ENTRY(thr); + + return (duk_uint_t) duk__api_coerce_d2ui(thr, idx, def_value, 0 /*require*/); +} + +DUK_EXTERNAL duk_int_t duk_require_int(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + return (duk_int_t) duk__api_coerce_d2i(thr, idx, 0 /*def_value*/, 1 /*require*/); +} + +DUK_EXTERNAL duk_uint_t duk_require_uint(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + return (duk_uint_t) duk__api_coerce_d2ui(thr, idx, 0 /*def_value*/, 1 /*require*/); +} + +DUK_EXTERNAL duk_int_t duk_opt_int(duk_hthread *thr, duk_idx_t idx, duk_int_t def_value) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + return def_value; + } + return duk_require_int(thr, idx); +} + +DUK_EXTERNAL duk_uint_t duk_opt_uint(duk_hthread *thr, duk_idx_t idx, duk_uint_t def_value) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + return def_value; + } + return duk_require_uint(thr, idx); +} + +DUK_EXTERNAL const char *duk_get_lstring(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_len) { + duk_hstring *h; + const char *ret; + duk_size_t len; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_get_hstring(thr, idx); + if (h != NULL) { + len = DUK_HSTRING_GET_BYTELEN(h); + ret = (const char *) DUK_HSTRING_GET_DATA(h); + } else { + len = 0; + ret = NULL; + } + + if (out_len != NULL) { + *out_len = len; + } + return ret; +} + +DUK_EXTERNAL const char *duk_require_lstring(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_len) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_require_hstring(thr, idx); + DUK_ASSERT(h != NULL); + if (out_len) { + *out_len = DUK_HSTRING_GET_BYTELEN(h); + } + return (const char *) DUK_HSTRING_GET_DATA(h); +} + +DUK_INTERNAL const char *duk_require_lstring_notsymbol(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_len) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_require_hstring_notsymbol(thr, idx); + DUK_ASSERT(h != NULL); + if (out_len) { + *out_len = DUK_HSTRING_GET_BYTELEN(h); + } + return (const char *) DUK_HSTRING_GET_DATA(h); +} + +DUK_EXTERNAL const char *duk_get_string(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_get_hstring(thr, idx); + if (h != NULL) { + return (const char *) DUK_HSTRING_GET_DATA(h); + } else { + return NULL; + } +} + +DUK_EXTERNAL const char *duk_opt_lstring(duk_hthread *thr, + duk_idx_t idx, + duk_size_t *out_len, + const char *def_ptr, + duk_size_t def_len) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + if (out_len != NULL) { + *out_len = def_len; + } + return def_ptr; + } + return duk_require_lstring(thr, idx, out_len); +} + +DUK_EXTERNAL const char *duk_opt_string(duk_hthread *thr, duk_idx_t idx, const char *def_ptr) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + return def_ptr; + } + return duk_require_string(thr, idx); +} + +DUK_EXTERNAL const char *duk_get_lstring_default(duk_hthread *thr, + duk_idx_t idx, + duk_size_t *out_len, + const char *def_ptr, + duk_size_t def_len) { + duk_hstring *h; + const char *ret; + duk_size_t len; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_get_hstring(thr, idx); + if (h != NULL) { + len = DUK_HSTRING_GET_BYTELEN(h); + ret = (const char *) DUK_HSTRING_GET_DATA(h); + } else { + len = def_len; + ret = def_ptr; + } + + if (out_len != NULL) { + *out_len = len; + } + return ret; +} + +DUK_EXTERNAL const char *duk_get_string_default(duk_hthread *thr, duk_idx_t idx, const char *def_value) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_get_hstring(thr, idx); + if (h != NULL) { + return (const char *) DUK_HSTRING_GET_DATA(h); + } else { + return def_value; + } +} + +DUK_INTERNAL const char *duk_get_string_notsymbol(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_get_hstring_notsymbol(thr, idx); + if (h) { + return (const char *) DUK_HSTRING_GET_DATA(h); + } else { + return NULL; + } +} + +DUK_EXTERNAL const char *duk_require_string(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + return duk_require_lstring(thr, idx, NULL); +} + +DUK_INTERNAL const char *duk_require_string_notsymbol(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_require_hstring_notsymbol(thr, idx); + DUK_ASSERT(h != NULL); + return (const char *) DUK_HSTRING_GET_DATA(h); +} + +DUK_EXTERNAL void duk_require_object(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_UNLIKELY(!DUK_TVAL_IS_OBJECT(tv))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "object", DUK_STR_NOT_OBJECT); + DUK_WO_NORETURN(return;); + } +} + +DUK_LOCAL void *duk__get_pointer_raw(duk_hthread *thr, duk_idx_t idx, void *def_value) { + duk_tval *tv; + void *p; + + DUK_CTX_ASSERT_VALID(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (!DUK_TVAL_IS_POINTER(tv)) { + return def_value; + } + + p = DUK_TVAL_GET_POINTER(tv); /* may be NULL */ + return p; +} + +DUK_EXTERNAL void *duk_get_pointer(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__get_pointer_raw(thr, idx, NULL /*def_value*/); +} + +DUK_EXTERNAL void *duk_opt_pointer(duk_hthread *thr, duk_idx_t idx, void *def_value) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + return def_value; + } + return duk_require_pointer(thr, idx); +} + +DUK_EXTERNAL void *duk_get_pointer_default(duk_hthread *thr, duk_idx_t idx, void *def_value) { + DUK_ASSERT_API_ENTRY(thr); + return duk__get_pointer_raw(thr, idx, def_value); +} + +DUK_EXTERNAL void *duk_require_pointer(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + void *p; + + DUK_ASSERT_API_ENTRY(thr); + + /* Note: here we must be wary of the fact that a pointer may be + * valid and be a NULL. + */ + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_UNLIKELY(!DUK_TVAL_IS_POINTER(tv))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "pointer", DUK_STR_NOT_POINTER); + DUK_WO_NORETURN(return NULL;); + } + p = DUK_TVAL_GET_POINTER(tv); /* may be NULL */ + return p; +} + +#if 0 /*unused*/ +DUK_INTERNAL void *duk_get_voidptr(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_heaphdr *h; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (!DUK_TVAL_IS_HEAP_ALLOCATED(tv)) { + return NULL; + } + + h = DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(h != NULL); + return (void *) h; +} +#endif + +DUK_LOCAL void *duk__get_buffer_helper(duk_hthread *thr, + duk_idx_t idx, + duk_size_t *out_size, + void *def_ptr, + duk_size_t def_size, + duk_bool_t throw_flag) { + duk_hbuffer *h; + void *ret; + duk_size_t len; + duk_tval *tv; + + DUK_CTX_ASSERT_VALID(thr); + + if (out_size != NULL) { + *out_size = 0; + } + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_LIKELY(DUK_TVAL_IS_BUFFER(tv))) { + h = DUK_TVAL_GET_BUFFER(tv); + DUK_ASSERT(h != NULL); + + len = DUK_HBUFFER_GET_SIZE(h); + ret = DUK_HBUFFER_GET_DATA_PTR(thr->heap, h); + } else { + if (throw_flag) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "buffer", DUK_STR_NOT_BUFFER); + DUK_WO_NORETURN(return NULL;); + } + len = def_size; + ret = def_ptr; + } + + if (out_size != NULL) { + *out_size = len; + } + return ret; +} + +DUK_EXTERNAL void *duk_get_buffer(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_size) { + DUK_ASSERT_API_ENTRY(thr); + + return duk__get_buffer_helper(thr, idx, out_size, NULL /*def_ptr*/, 0 /*def_size*/, 0 /*throw_flag*/); +} + +DUK_EXTERNAL void *duk_opt_buffer(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_size, void *def_ptr, duk_size_t def_size) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + if (out_size != NULL) { + *out_size = def_size; + } + return def_ptr; + } + return duk_require_buffer(thr, idx, out_size); +} + +DUK_EXTERNAL void *duk_get_buffer_default(duk_hthread *thr, + duk_idx_t idx, + duk_size_t *out_size, + void *def_ptr, + duk_size_t def_len) { + DUK_ASSERT_API_ENTRY(thr); + + return duk__get_buffer_helper(thr, idx, out_size, def_ptr, def_len, 0 /*throw_flag*/); +} + +DUK_EXTERNAL void *duk_require_buffer(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_size) { + DUK_ASSERT_API_ENTRY(thr); + + return duk__get_buffer_helper(thr, idx, out_size, NULL /*def_ptr*/, 0 /*def_size*/, 1 /*throw_flag*/); +} + +/* Get the active buffer data area for a plain buffer or a buffer object. + * Return NULL if the the value is not a buffer. Note that a buffer may + * have a NULL data pointer when its size is zero, the optional 'out_isbuffer' + * argument allows caller to detect this reliably. + */ +DUK_INTERNAL void *duk_get_buffer_data_raw(duk_hthread *thr, + duk_idx_t idx, + duk_size_t *out_size, + void *def_ptr, + duk_size_t def_size, + duk_bool_t throw_flag, + duk_bool_t *out_isbuffer) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + if (out_isbuffer != NULL) { + *out_isbuffer = 0; + } + if (out_size != NULL) { + *out_size = def_size; + } + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_IS_BUFFER(tv)) { + duk_hbuffer *h = DUK_TVAL_GET_BUFFER(tv); + DUK_ASSERT(h != NULL); + if (out_size != NULL) { + *out_size = DUK_HBUFFER_GET_SIZE(h); + } + if (out_isbuffer != NULL) { + *out_isbuffer = 1; + } + return (void *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h); /* may be NULL (but only if size is 0) */ + } +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + else if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + if (DUK_HOBJECT_IS_BUFOBJ(h)) { + /* XXX: this is probably a useful shared helper: for a + * duk_hbufobj, get a validated buffer pointer/length. + */ + duk_hbufobj *h_bufobj = (duk_hbufobj *) h; + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + + if (h_bufobj->buf != NULL && DUK_HBUFOBJ_VALID_SLICE(h_bufobj)) { + duk_uint8_t *p; + + p = (duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h_bufobj->buf); + if (out_size != NULL) { + *out_size = (duk_size_t) h_bufobj->length; + } + if (out_isbuffer != NULL) { + *out_isbuffer = 1; + } + return (void *) (p + h_bufobj->offset); + } + /* if slice not fully valid, treat as error */ + } + } +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + + if (throw_flag) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "buffer", DUK_STR_NOT_BUFFER); + DUK_WO_NORETURN(return NULL;); + } + return def_ptr; +} + +DUK_EXTERNAL void *duk_get_buffer_data(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_size) { + DUK_ASSERT_API_ENTRY(thr); + return duk_get_buffer_data_raw(thr, idx, out_size, NULL /*def_ptr*/, 0 /*def_size*/, 0 /*throw_flag*/, NULL); +} + +DUK_EXTERNAL void *duk_get_buffer_data_default(duk_hthread *thr, + duk_idx_t idx, + duk_size_t *out_size, + void *def_ptr, + duk_size_t def_size) { + DUK_ASSERT_API_ENTRY(thr); + return duk_get_buffer_data_raw(thr, idx, out_size, def_ptr, def_size, 0 /*throw_flag*/, NULL); +} + +DUK_EXTERNAL void *duk_opt_buffer_data(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_size, void *def_ptr, duk_size_t def_size) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + if (out_size != NULL) { + *out_size = def_size; + } + return def_ptr; + } + return duk_require_buffer_data(thr, idx, out_size); +} + +DUK_EXTERNAL void *duk_require_buffer_data(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_size) { + DUK_ASSERT_API_ENTRY(thr); + return duk_get_buffer_data_raw(thr, idx, out_size, NULL /*def_ptr*/, 0 /*def_size*/, 1 /*throw_flag*/, NULL); +} + +/* Raw helper for getting a value from the stack, checking its tag. + * The tag cannot be a number because numbers don't have an internal + * tag in the packed representation. + */ + +DUK_LOCAL duk_heaphdr *duk__get_tagged_heaphdr_raw(duk_hthread *thr, duk_idx_t idx, duk_uint_t tag) { + duk_tval *tv; + duk_heaphdr *ret; + + DUK_CTX_ASSERT_VALID(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_TVAL_GET_TAG(tv) != tag) { + return (duk_heaphdr *) NULL; + } + + ret = DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(ret != NULL); /* tagged null pointers should never occur */ + return ret; +} + +DUK_INTERNAL duk_hstring *duk_get_hstring(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return (duk_hstring *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_STRING); +} + +DUK_INTERNAL duk_hstring *duk_get_hstring_notsymbol(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hstring *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_STRING); + if (DUK_UNLIKELY(h && DUK_HSTRING_HAS_SYMBOL(h))) { + return NULL; + } + return h; +} + +DUK_INTERNAL duk_hstring *duk_require_hstring(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hstring *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_STRING); + if (DUK_UNLIKELY(h == NULL)) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "string", DUK_STR_NOT_STRING); + DUK_WO_NORETURN(return NULL;); + } + return h; +} + +DUK_INTERNAL duk_hstring *duk_require_hstring_notsymbol(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hstring *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_STRING); + if (DUK_UNLIKELY(h == NULL || DUK_HSTRING_HAS_SYMBOL(h))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "string", DUK_STR_NOT_STRING); + DUK_WO_NORETURN(return NULL;); + } + return h; +} + +DUK_INTERNAL duk_hobject *duk_get_hobject(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return (duk_hobject *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_OBJECT); +} + +DUK_INTERNAL duk_hobject *duk_require_hobject(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hobject *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_OBJECT); + if (DUK_UNLIKELY(h == NULL)) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "object", DUK_STR_NOT_OBJECT); + DUK_WO_NORETURN(return NULL;); + } + return h; +} + +DUK_INTERNAL duk_hbuffer *duk_get_hbuffer(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return (duk_hbuffer *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_BUFFER); +} + +DUK_INTERNAL duk_hbuffer *duk_require_hbuffer(duk_hthread *thr, duk_idx_t idx) { + duk_hbuffer *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hbuffer *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_BUFFER); + if (DUK_UNLIKELY(h == NULL)) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "buffer", DUK_STR_NOT_BUFFER); + DUK_WO_NORETURN(return NULL;); + } + return h; +} + +DUK_INTERNAL duk_hthread *duk_get_hthread(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hobject *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_OBJECT); + if (DUK_UNLIKELY(h != NULL && !DUK_HOBJECT_IS_THREAD(h))) { + h = NULL; + } + return (duk_hthread *) h; +} + +DUK_INTERNAL duk_hthread *duk_require_hthread(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hobject *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_OBJECT); + if (DUK_UNLIKELY(!(h != NULL && DUK_HOBJECT_IS_THREAD(h)))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "thread", DUK_STR_NOT_THREAD); + DUK_WO_NORETURN(return NULL;); + } + return (duk_hthread *) h; +} + +DUK_INTERNAL duk_hcompfunc *duk_get_hcompfunc(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hobject *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_OBJECT); + if (DUK_UNLIKELY(h != NULL && !DUK_HOBJECT_IS_COMPFUNC(h))) { + h = NULL; + } + return (duk_hcompfunc *) h; +} + +DUK_INTERNAL duk_hcompfunc *duk_require_hcompfunc(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hobject *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_OBJECT); + if (DUK_UNLIKELY(!(h != NULL && DUK_HOBJECT_IS_COMPFUNC(h)))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "compiledfunction", DUK_STR_NOT_COMPFUNC); + DUK_WO_NORETURN(return NULL;); + } + return (duk_hcompfunc *) h; +} + +DUK_INTERNAL duk_hnatfunc *duk_get_hnatfunc(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hobject *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_OBJECT); + if (DUK_UNLIKELY(h != NULL && !DUK_HOBJECT_IS_NATFUNC(h))) { + h = NULL; + } + return (duk_hnatfunc *) h; +} + +DUK_INTERNAL duk_hnatfunc *duk_require_hnatfunc(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = (duk_hobject *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_OBJECT); + if (DUK_UNLIKELY(!(h != NULL && DUK_HOBJECT_IS_NATFUNC(h)))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "nativefunction", DUK_STR_NOT_NATFUNC); + DUK_WO_NORETURN(return NULL;); + } + return (duk_hnatfunc *) h; +} + +DUK_EXTERNAL duk_c_function duk_get_c_function(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_hobject *h; + duk_hnatfunc *f; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_UNLIKELY(!DUK_TVAL_IS_OBJECT(tv))) { + return NULL; + } + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + + if (DUK_UNLIKELY(!DUK_HOBJECT_IS_NATFUNC(h))) { + return NULL; + } + DUK_ASSERT(DUK_HOBJECT_HAS_NATFUNC(h)); + f = (duk_hnatfunc *) h; + + return f->func; +} + +DUK_EXTERNAL duk_c_function duk_opt_c_function(duk_hthread *thr, duk_idx_t idx, duk_c_function def_value) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + return def_value; + } + return duk_require_c_function(thr, idx); +} + +DUK_EXTERNAL duk_c_function duk_get_c_function_default(duk_hthread *thr, duk_idx_t idx, duk_c_function def_value) { + duk_c_function ret; + + DUK_ASSERT_API_ENTRY(thr); + + ret = duk_get_c_function(thr, idx); + if (ret != NULL) { + return ret; + } + + return def_value; +} + +DUK_EXTERNAL duk_c_function duk_require_c_function(duk_hthread *thr, duk_idx_t idx) { + duk_c_function ret; + + DUK_ASSERT_API_ENTRY(thr); + + ret = duk_get_c_function(thr, idx); + if (DUK_UNLIKELY(!ret)) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "nativefunction", DUK_STR_NOT_NATFUNC); + DUK_WO_NORETURN(return ret;); + } + return ret; +} + +DUK_EXTERNAL void duk_require_function(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + if (DUK_UNLIKELY(!duk_is_function(thr, idx))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "function", DUK_STR_NOT_FUNCTION); + DUK_WO_NORETURN(return;); + } +} + +DUK_EXTERNAL void duk_require_constructable(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_require_hobject_accept_mask(thr, idx, DUK_TYPE_MASK_LIGHTFUNC); + if (DUK_UNLIKELY(h != NULL && !DUK_HOBJECT_HAS_CONSTRUCTABLE(h))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "constructable", DUK_STR_NOT_CONSTRUCTABLE); + DUK_WO_NORETURN(return;); + } + /* Lightfuncs (h == NULL) are constructable. */ +} + +DUK_EXTERNAL duk_hthread *duk_get_context(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + return duk_get_hthread(thr, idx); +} + +DUK_EXTERNAL duk_hthread *duk_require_context(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + return duk_require_hthread(thr, idx); +} + +DUK_EXTERNAL duk_hthread *duk_opt_context(duk_hthread *thr, duk_idx_t idx, duk_hthread *def_value) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + return def_value; + } + return duk_require_context(thr, idx); +} + +DUK_EXTERNAL duk_hthread *duk_get_context_default(duk_hthread *thr, duk_idx_t idx, duk_hthread *def_value) { + duk_hthread *ret; + + DUK_ASSERT_API_ENTRY(thr); + + ret = duk_get_context(thr, idx); + if (ret != NULL) { + return ret; + } + + return def_value; +} + +DUK_EXTERNAL void *duk_get_heapptr(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + void *ret; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_UNLIKELY(!DUK_TVAL_IS_HEAP_ALLOCATED(tv))) { + return (void *) NULL; + } + + ret = (void *) DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(ret != NULL); + return ret; +} + +DUK_EXTERNAL void *duk_opt_heapptr(duk_hthread *thr, duk_idx_t idx, void *def_value) { + DUK_ASSERT_API_ENTRY(thr); + + if (duk_check_type_mask(thr, idx, DUK_TYPE_MASK_NONE | DUK_TYPE_MASK_UNDEFINED)) { + return def_value; + } + return duk_require_heapptr(thr, idx); +} + +DUK_EXTERNAL void *duk_get_heapptr_default(duk_hthread *thr, duk_idx_t idx, void *def_value) { + void *ret; + + DUK_ASSERT_API_ENTRY(thr); + + ret = duk_get_heapptr(thr, idx); + if (ret != NULL) { + return ret; + } + + return def_value; +} + +DUK_EXTERNAL void *duk_require_heapptr(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + void *ret; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_UNLIKELY(!DUK_TVAL_IS_HEAP_ALLOCATED(tv))) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "heapobject", DUK_STR_UNEXPECTED_TYPE); + DUK_WO_NORETURN(return NULL;); + } + + ret = (void *) DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(ret != NULL); + return ret; +} + +/* Internal helper for getting/requiring a duk_hobject with possible promotion. */ +DUK_LOCAL duk_hobject *duk__get_hobject_promote_mask_raw(duk_hthread *thr, duk_idx_t idx, duk_uint_t type_mask) { + duk_uint_t val_mask; + duk_hobject *res; + + DUK_CTX_ASSERT_VALID(thr); + + res = duk_get_hobject(thr, idx); /* common case, not promoted */ + if (DUK_LIKELY(res != NULL)) { + DUK_ASSERT(res != NULL); + return res; + } + + val_mask = duk_get_type_mask(thr, idx); + if (val_mask & type_mask) { + if (type_mask & DUK_TYPE_MASK_PROMOTE) { + res = duk_to_hobject(thr, idx); + DUK_ASSERT(res != NULL); + return res; + } else { + return NULL; /* accept without promoting */ + } + } + + if (type_mask & DUK_TYPE_MASK_THROW) { + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, "object", DUK_STR_NOT_OBJECT); + DUK_WO_NORETURN(return NULL;); + } + return NULL; +} + +/* Get a duk_hobject * at 'idx'; if the value is not an object but matches the + * supplied 'type_mask', promote it to an object and return the duk_hobject *. + * This is useful for call sites which want an object but also accept a plain + * buffer and/or a lightfunc which gets automatically promoted to an object. + * Return value is NULL if value is neither an object nor a plain type allowed + * by the mask. + */ +DUK_INTERNAL duk_hobject *duk_get_hobject_promote_mask(duk_hthread *thr, duk_idx_t idx, duk_uint_t type_mask) { + DUK_ASSERT_API_ENTRY(thr); + return duk__get_hobject_promote_mask_raw(thr, idx, type_mask | DUK_TYPE_MASK_PROMOTE); +} + +/* Like duk_get_hobject_promote_mask() but throw a TypeError instead of + * returning a NULL. + */ +DUK_INTERNAL duk_hobject *duk_require_hobject_promote_mask(duk_hthread *thr, duk_idx_t idx, duk_uint_t type_mask) { + DUK_ASSERT_API_ENTRY(thr); + return duk__get_hobject_promote_mask_raw(thr, idx, type_mask | DUK_TYPE_MASK_THROW | DUK_TYPE_MASK_PROMOTE); +} + +/* Require a duk_hobject * at 'idx'; if the value is not an object but matches the + * supplied 'type_mask', return a NULL instead. Otherwise throw a TypeError. + */ +DUK_INTERNAL duk_hobject *duk_require_hobject_accept_mask(duk_hthread *thr, duk_idx_t idx, duk_uint_t type_mask) { + DUK_ASSERT_API_ENTRY(thr); + return duk__get_hobject_promote_mask_raw(thr, idx, type_mask | DUK_TYPE_MASK_THROW); +} + +DUK_INTERNAL duk_hobject *duk_get_hobject_with_class(duk_hthread *thr, duk_idx_t idx, duk_small_uint_t classnum) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_DISABLE(classnum >= 0); /* unsigned */ + DUK_ASSERT(classnum <= DUK_HOBJECT_CLASS_MAX); + + h = (duk_hobject *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_OBJECT); + if (DUK_UNLIKELY(h != NULL && DUK_HOBJECT_GET_CLASS_NUMBER(h) != classnum)) { + h = NULL; + } + return h; +} + +DUK_INTERNAL duk_hobject *duk_require_hobject_with_class(duk_hthread *thr, duk_idx_t idx, duk_small_uint_t classnum) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_DISABLE(classnum >= 0); /* unsigned */ + DUK_ASSERT(classnum <= DUK_HOBJECT_CLASS_MAX); + + h = (duk_hobject *) duk__get_tagged_heaphdr_raw(thr, idx, DUK_TAG_OBJECT); + if (DUK_UNLIKELY(!(h != NULL && DUK_HOBJECT_GET_CLASS_NUMBER(h) == classnum))) { + duk_hstring *h_class; + h_class = DUK_HTHREAD_GET_STRING(thr, DUK_HOBJECT_CLASS_NUMBER_TO_STRIDX(classnum)); + DUK_UNREF(h_class); + + DUK_ERROR_REQUIRE_TYPE_INDEX(thr, idx, (const char *) DUK_HSTRING_GET_DATA(h_class), DUK_STR_UNEXPECTED_TYPE); + DUK_WO_NORETURN(return NULL;); + } + return h; +} + +DUK_EXTERNAL duk_size_t duk_get_length(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNDEFINED: + case DUK_TAG_NULL: + case DUK_TAG_BOOLEAN: + case DUK_TAG_POINTER: + return 0; +#if defined(DUK_USE_PREFER_SIZE) + /* String and buffer have a virtual non-configurable .length property + * which is within size_t range so it can be looked up without specific + * type checks. Lightfuncs inherit from %NativeFunctionPrototype% + * which provides an inherited .length accessor; it could be overwritten + * to produce unexpected types or values, but just number convert and + * duk_size_t cast for now. + */ + case DUK_TAG_STRING: + case DUK_TAG_BUFFER: + case DUK_TAG_LIGHTFUNC: { + duk_size_t ret; + duk_get_prop_stridx(thr, idx, DUK_STRIDX_LENGTH); + ret = (duk_size_t) duk_to_number_m1(thr); + duk_pop_unsafe(thr); + return ret; + } +#else /* DUK_USE_PREFER_SIZE */ + case DUK_TAG_STRING: { + duk_hstring *h = DUK_TVAL_GET_STRING(tv); + DUK_ASSERT(h != NULL); + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h))) { + return 0; + } + return (duk_size_t) DUK_HSTRING_GET_CHARLEN(h); + } + case DUK_TAG_BUFFER: { + duk_hbuffer *h = DUK_TVAL_GET_BUFFER(tv); + DUK_ASSERT(h != NULL); + return (duk_size_t) DUK_HBUFFER_GET_SIZE(h); + } + case DUK_TAG_LIGHTFUNC: { + /* We could look up the length from the lightfunc duk_tval, + * but since Duktape 2.2 lightfunc .length comes from + * %NativeFunctionPrototype% which can be overridden, so + * look up the property explicitly. + */ + duk_size_t ret; + duk_get_prop_stridx(thr, idx, DUK_STRIDX_LENGTH); + ret = (duk_size_t) duk_to_number_m1(thr); + duk_pop_unsafe(thr); + return ret; + } +#endif /* DUK_USE_PREFER_SIZE */ + case DUK_TAG_OBJECT: { + duk_hobject *h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + return (duk_size_t) duk_hobject_get_length(thr, h); + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: + /* number or 'unused' */ + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv) || DUK_TVAL_IS_UNUSED(tv)); + return 0; + } + + DUK_UNREACHABLE(); +} + +/* + * duk_known_xxx() helpers + * + * Used internally when we're 100% sure that a certain index is valid and + * contains an object of a certain type. For example, if we duk_push_object() + * we can then safely duk_known_hobject(thr, -1). These helpers just assert + * for the index and type, and if the assumptions are not valid, memory unsafe + * behavior happens. + */ + +DUK_LOCAL duk_heaphdr *duk__known_heaphdr(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_heaphdr *h; + + DUK_CTX_ASSERT_VALID(thr); + if (idx < 0) { + tv = thr->valstack_top + idx; + } else { + tv = thr->valstack_bottom + idx; + } + DUK_ASSERT(tv >= thr->valstack_bottom); + DUK_ASSERT(tv < thr->valstack_top); + h = DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(h != NULL); + return h; +} + +DUK_INTERNAL duk_hstring *duk_known_hstring(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(duk_get_hstring(thr, idx) != NULL); + return (duk_hstring *) duk__known_heaphdr(thr, idx); +} + +DUK_INTERNAL duk_hobject *duk_known_hobject(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(duk_get_hobject(thr, idx) != NULL); + return (duk_hobject *) duk__known_heaphdr(thr, idx); +} + +DUK_INTERNAL duk_hbuffer *duk_known_hbuffer(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(duk_get_hbuffer(thr, idx) != NULL); + return (duk_hbuffer *) duk__known_heaphdr(thr, idx); +} + +DUK_INTERNAL duk_hcompfunc *duk_known_hcompfunc(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(duk_get_hcompfunc(thr, idx) != NULL); + return (duk_hcompfunc *) duk__known_heaphdr(thr, idx); +} + +DUK_INTERNAL duk_hnatfunc *duk_known_hnatfunc(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(duk_get_hnatfunc(thr, idx) != NULL); + return (duk_hnatfunc *) duk__known_heaphdr(thr, idx); +} + +DUK_EXTERNAL void duk_set_length(duk_hthread *thr, duk_idx_t idx, duk_size_t len) { + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_normalize_index(thr, idx); + duk_push_uint(thr, (duk_uint_t) len); + duk_put_prop_stridx(thr, idx, DUK_STRIDX_LENGTH); +} + +/* + * Conversions and coercions + * + * The conversion/coercions are in-place operations on the value stack. + * Some operations are implemented here directly, while others call a + * helper in duk_js_ops.c after validating arguments. + */ + +/* E5 Section 8.12.8 */ + +DUK_LOCAL duk_bool_t duk__defaultvalue_coerce_attempt(duk_hthread *thr, duk_idx_t idx, duk_small_uint_t func_stridx) { + if (duk_get_prop_stridx(thr, idx, func_stridx)) { + /* [ ... func ] */ + if (duk_is_callable(thr, -1)) { + duk_dup(thr, idx); /* -> [ ... func this ] */ + duk_call_method(thr, 0); /* -> [ ... retval ] */ + if (duk_is_primitive(thr, -1)) { + duk_replace(thr, idx); + return 1; + } + /* [ ... retval ]; popped below */ + } + } + duk_pop_unsafe(thr); /* [ ... func/retval ] -> [ ... ] */ + return 0; +} + +DUK_EXTERNAL void duk_to_undefined(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_require_tval(thr, idx); + DUK_ASSERT(tv != NULL); + DUK_TVAL_SET_UNDEFINED_UPDREF(thr, tv); /* side effects */ +} + +DUK_EXTERNAL void duk_to_null(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_require_tval(thr, idx); + DUK_ASSERT(tv != NULL); + DUK_TVAL_SET_NULL_UPDREF(thr, tv); /* side effects */ +} + +/* E5 Section 9.1 */ +DUK_LOCAL const char * const duk__toprim_hint_strings[3] = { "default", "string", "number" }; +DUK_LOCAL void duk__to_primitive_helper(duk_hthread *thr, duk_idx_t idx, duk_int_t hint, duk_bool_t check_symbol) { + /* Inline initializer for coercers[] is not allowed by old compilers like BCC. */ + duk_small_uint_t coercers[2]; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(hint == DUK_HINT_NONE || hint == DUK_HINT_NUMBER || hint == DUK_HINT_STRING); + + idx = duk_require_normalize_index(thr, idx); + + /* If already primitive, return as is. */ + if (!duk_check_type_mask(thr, idx, DUK_TYPE_MASK_OBJECT | DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER)) { + DUK_ASSERT(!duk_is_buffer(thr, idx)); /* duk_to_string() relies on this behavior */ + return; + } + + /* @@toPrimitive lookup. Also do for plain buffers and lightfuncs + * which mimic objects. + */ + if (check_symbol && duk_get_method_stridx(thr, idx, DUK_STRIDX_WELLKNOWN_SYMBOL_TO_PRIMITIVE)) { + DUK_ASSERT(hint >= 0 && (duk_size_t) hint < sizeof(duk__toprim_hint_strings) / sizeof(const char *)); + duk_dup(thr, idx); + duk_push_string(thr, duk__toprim_hint_strings[hint]); + duk_call_method(thr, 1); /* [ ... method value hint ] -> [ ... res] */ + if (duk_check_type_mask(thr, -1, DUK_TYPE_MASK_OBJECT | DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER)) { + goto fail; + } + duk_replace(thr, idx); + return; + } + + /* Objects are coerced based on E5 specification. + * Lightfuncs are coerced because they behave like + * objects even if they're internally a primitive + * type. Same applies to plain buffers, which behave + * like ArrayBuffer objects since Duktape 2.x. + */ + + /* Hint magic for Date is unnecessary in ES2015 because of + * Date.prototype[@@toPrimitive]. However, it is needed if + * symbol support is not enabled. + */ +#if defined(DUK_USE_SYMBOL_BUILTIN) + if (hint == DUK_HINT_NONE) { + hint = DUK_HINT_NUMBER; + } +#else /* DUK_USE_SYMBOL_BUILTIN */ + if (hint == DUK_HINT_NONE) { + duk_small_uint_t class_number; + + class_number = duk_get_class_number(thr, idx); + if (class_number == DUK_HOBJECT_CLASS_DATE) { + hint = DUK_HINT_STRING; + } else { + hint = DUK_HINT_NUMBER; + } + } +#endif /* DUK_USE_SYMBOL_BUILTIN */ + + coercers[0] = DUK_STRIDX_VALUE_OF; + coercers[1] = DUK_STRIDX_TO_STRING; + if (hint == DUK_HINT_STRING) { + coercers[0] = DUK_STRIDX_TO_STRING; + coercers[1] = DUK_STRIDX_VALUE_OF; + } + + if (duk__defaultvalue_coerce_attempt(thr, idx, coercers[0])) { + DUK_ASSERT(!duk_is_buffer(thr, idx)); /* duk_to_string() relies on this behavior */ + return; + } + + if (duk__defaultvalue_coerce_attempt(thr, idx, coercers[1])) { + DUK_ASSERT(!duk_is_buffer(thr, idx)); /* duk_to_string() relies on this behavior */ + return; + } + +fail: + DUK_ERROR_TYPE(thr, DUK_STR_TOPRIMITIVE_FAILED); + DUK_WO_NORETURN(return;); +} + +DUK_EXTERNAL void duk_to_primitive(duk_hthread *thr, duk_idx_t idx, duk_int_t hint) { + duk__to_primitive_helper(thr, idx, hint, 1 /*check_symbol*/); +} + +#if defined(DUK_USE_SYMBOL_BUILTIN) +DUK_INTERNAL void duk_to_primitive_ordinary(duk_hthread *thr, duk_idx_t idx, duk_int_t hint) { + duk__to_primitive_helper(thr, idx, hint, 0 /*check_symbol*/); +} +#endif + +/* E5 Section 9.2 */ +DUK_EXTERNAL duk_bool_t duk_to_boolean(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_bool_t val; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + tv = DUK_GET_TVAL_POSIDX(thr, idx); + DUK_ASSERT(tv != NULL); + + val = duk_js_toboolean(tv); + DUK_ASSERT(val == 0 || val == 1); + + /* Note: no need to re-lookup tv, conversion is side effect free. */ + DUK_ASSERT(tv != NULL); + DUK_TVAL_SET_BOOLEAN_UPDREF(thr, tv, val); /* side effects */ + return val; +} + +DUK_INTERNAL duk_bool_t duk_to_boolean_top_pop(duk_hthread *thr) { + duk_tval *tv; + duk_bool_t val; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_require_tval(thr, -1); + DUK_ASSERT(tv != NULL); + + val = duk_js_toboolean(tv); + DUK_ASSERT(val == 0 || val == 1); + + duk_pop_unsafe(thr); + return val; +} + +DUK_EXTERNAL duk_double_t duk_to_number(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_double_t d; + + DUK_ASSERT_API_ENTRY(thr); + + /* XXX: No need to normalize; the whole operation could be inlined here to + * avoid 'tv' re-lookup. + */ + idx = duk_require_normalize_index(thr, idx); + tv = DUK_GET_TVAL_POSIDX(thr, idx); + DUK_ASSERT(tv != NULL); + d = duk_js_tonumber(thr, tv); /* XXX: fastint coercion? now result will always be a non-fastint */ + + /* ToNumber() may have side effects so must relookup 'tv'. */ + tv = DUK_GET_TVAL_POSIDX(thr, idx); + DUK_TVAL_SET_NUMBER_UPDREF(thr, tv, d); /* side effects */ + return d; +} + +DUK_INTERNAL duk_double_t duk_to_number_m1(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + return duk_to_number(thr, -1); +} +DUK_INTERNAL duk_double_t duk_to_number_m2(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + return duk_to_number(thr, -2); +} + +DUK_INTERNAL duk_double_t duk_to_number_tval(duk_hthread *thr, duk_tval *tv) { +#if defined(DUK_USE_PREFER_SIZE) + duk_double_t res; + + DUK_ASSERT_API_ENTRY(thr); + + duk_push_tval(thr, tv); + res = duk_to_number_m1(thr); + duk_pop_unsafe(thr); + return res; +#else + duk_double_t res; + duk_tval *tv_dst; + + DUK_ASSERT_API_ENTRY(thr); + DUK__ASSERT_SPACE(); + + tv_dst = thr->valstack_top++; + DUK_TVAL_SET_TVAL(tv_dst, tv); + DUK_TVAL_INCREF(thr, tv_dst); /* decref not necessary */ + res = duk_to_number_m1(thr); /* invalidates tv_dst */ + + tv_dst = --thr->valstack_top; + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv_dst)); + DUK_ASSERT(!DUK_TVAL_NEEDS_REFCOUNT_UPDATE(tv_dst)); /* plain number */ + DUK_TVAL_SET_UNDEFINED(tv_dst); /* valstack init policy */ + + return res; +#endif +} + +/* XXX: combine all the integer conversions: they share everything + * but the helper function for coercion. + */ + +typedef duk_double_t (*duk__toint_coercer)(duk_hthread *thr, duk_tval *tv); + +DUK_LOCAL duk_double_t duk__to_int_uint_helper(duk_hthread *thr, duk_idx_t idx, duk__toint_coercer coerce_func) { + duk_tval *tv; + duk_double_t d; + + DUK_CTX_ASSERT_VALID(thr); + + tv = duk_require_tval(thr, idx); + DUK_ASSERT(tv != NULL); + +#if defined(DUK_USE_FASTINT) + /* If argument is a fastint, guarantee that it remains one. + * There's no downgrade check for other cases. + */ + if (DUK_TVAL_IS_FASTINT(tv)) { + /* XXX: Unnecessary conversion back and forth. */ + return (duk_double_t) DUK_TVAL_GET_FASTINT(tv); + } +#endif + d = coerce_func(thr, tv); + + /* XXX: fastint? */ + + /* Relookup in case coerce_func() has side effects, e.g. ends up coercing an object */ + tv = duk_require_tval(thr, idx); + DUK_TVAL_SET_NUMBER_UPDREF(thr, tv, d); /* side effects */ + return d; +} + +DUK_EXTERNAL duk_int_t duk_to_int(duk_hthread *thr, duk_idx_t idx) { + /* Value coercion (in stack): ToInteger(), E5 Section 9.4, + * API return value coercion: custom. + */ + DUK_ASSERT_API_ENTRY(thr); + (void) duk__to_int_uint_helper(thr, idx, duk_js_tointeger); + return (duk_int_t) duk__api_coerce_d2i(thr, idx, 0 /*def_value*/, 0 /*require*/); +} + +DUK_EXTERNAL duk_uint_t duk_to_uint(duk_hthread *thr, duk_idx_t idx) { + /* Value coercion (in stack): ToInteger(), E5 Section 9.4, + * API return value coercion: custom. + */ + DUK_ASSERT_API_ENTRY(thr); + (void) duk__to_int_uint_helper(thr, idx, duk_js_tointeger); + return (duk_uint_t) duk__api_coerce_d2ui(thr, idx, 0 /*def_value*/, 0 /*require*/); +} + +DUK_EXTERNAL duk_int32_t duk_to_int32(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_int32_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_require_tval(thr, idx); + DUK_ASSERT(tv != NULL); + ret = duk_js_toint32(thr, tv); + + /* Relookup in case coerce_func() has side effects, e.g. ends up coercing an object */ + tv = duk_require_tval(thr, idx); + DUK_TVAL_SET_I32_UPDREF(thr, tv, ret); /* side effects */ + return ret; +} + +DUK_EXTERNAL duk_uint32_t duk_to_uint32(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_uint32_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_require_tval(thr, idx); + DUK_ASSERT(tv != NULL); + ret = duk_js_touint32(thr, tv); + + /* Relookup in case coerce_func() has side effects, e.g. ends up coercing an object */ + tv = duk_require_tval(thr, idx); + DUK_TVAL_SET_U32_UPDREF(thr, tv, ret); /* side effects */ + return ret; +} + +DUK_EXTERNAL duk_uint16_t duk_to_uint16(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_uint16_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_require_tval(thr, idx); + DUK_ASSERT(tv != NULL); + ret = duk_js_touint16(thr, tv); + + /* Relookup in case coerce_func() has side effects, e.g. ends up coercing an object */ + tv = duk_require_tval(thr, idx); + DUK_TVAL_SET_U32_UPDREF(thr, tv, ret); /* side effects */ + return ret; +} + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +/* Special coercion for Uint8ClampedArray. */ +DUK_INTERNAL duk_uint8_t duk_to_uint8clamped(duk_hthread *thr, duk_idx_t idx) { + duk_double_t d; + duk_double_t t; + duk_uint8_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + /* XXX: Simplify this algorithm, should be possible to come up with + * a shorter and faster algorithm by inspecting IEEE representation + * directly. + */ + + d = duk_to_number(thr, idx); + if (d <= 0.0) { + return 0; + } else if (d >= 255) { + return 255; + } else if (DUK_ISNAN(d)) { + /* Avoid NaN-to-integer coercion as it is compiler specific. */ + return 0; + } + + t = d - DUK_FLOOR(d); + if (duk_double_equals(t, 0.5)) { + /* Exact halfway, round to even. */ + ret = (duk_uint8_t) d; + ret = (ret + 1) & 0xfe; /* Example: d=3.5, t=0.5 -> ret = (3 + 1) & 0xfe = 4 & 0xfe = 4 + * Example: d=4.5, t=0.5 -> ret = (4 + 1) & 0xfe = 5 & 0xfe = 4 + */ + } else { + /* Not halfway, round to nearest. */ + ret = (duk_uint8_t) (d + 0.5); + } + return ret; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +DUK_EXTERNAL const char *duk_to_lstring(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_len) { + DUK_ASSERT_API_ENTRY(thr); + + (void) duk_to_string(thr, idx); + DUK_ASSERT(duk_is_string(thr, idx)); + return duk_require_lstring(thr, idx, out_len); +} + +DUK_LOCAL duk_ret_t duk__safe_to_string_raw(duk_hthread *thr, void *udata) { + DUK_CTX_ASSERT_VALID(thr); + DUK_UNREF(udata); + + (void) duk_to_string(thr, -1); + return 1; +} + +DUK_EXTERNAL const char *duk_safe_to_lstring(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_len) { + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + + /* We intentionally ignore the duk_safe_call() return value and only + * check the output type. This way we don't also need to check that + * the returned value is indeed a string in the success case. + */ + + duk_dup(thr, idx); + (void) duk_safe_call(thr, duk__safe_to_string_raw, NULL /*udata*/, 1 /*nargs*/, 1 /*nrets*/); + if (!duk_is_string(thr, -1)) { + /* Error: try coercing error to string once. */ + (void) duk_safe_call(thr, duk__safe_to_string_raw, NULL /*udata*/, 1 /*nargs*/, 1 /*nrets*/); + if (!duk_is_string(thr, -1)) { + /* Double error */ + duk_pop_unsafe(thr); + duk_push_hstring_stridx(thr, DUK_STRIDX_UC_ERROR); + } else { + ; + } + } else { + /* String; may be a symbol, accepted. */ + ; + } + DUK_ASSERT(duk_is_string(thr, -1)); + + duk_replace(thr, idx); + DUK_ASSERT(duk_get_string(thr, idx) != NULL); + return duk_get_lstring(thr, idx, out_len); +} + +DUK_EXTERNAL const char *duk_to_stacktrace(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + idx = duk_require_normalize_index(thr, idx); + + /* The expected argument to the call is an Error object. The stack + * trace is extracted without an inheritance-based instanceof check + * so that one can also extract the stack trace of a foreign error + * created in another Realm. Accept only a string .stack property. + */ + if (duk_is_object(thr, idx)) { + (void) duk_get_prop_string(thr, idx, "stack"); + if (duk_is_string(thr, -1)) { + duk_replace(thr, idx); + } else { + duk_pop(thr); + } + } + + return duk_to_string(thr, idx); +} + +DUK_LOCAL duk_ret_t duk__safe_to_stacktrace_raw(duk_hthread *thr, void *udata) { + DUK_CTX_ASSERT_VALID(thr); + DUK_UNREF(udata); + + (void) duk_to_stacktrace(thr, -1); + + return 1; +} + +DUK_EXTERNAL const char *duk_safe_to_stacktrace(duk_hthread *thr, duk_idx_t idx) { + duk_int_t rc; + + DUK_ASSERT_API_ENTRY(thr); + idx = duk_require_normalize_index(thr, idx); + + duk_dup(thr, idx); + rc = duk_safe_call(thr, duk__safe_to_stacktrace_raw, NULL /*udata*/, 1 /*nargs*/, 1 /*nrets*/); + if (rc != 0) { + /* Coercion failed. Try to coerce the coercion itself error + * to a stack trace once. If that also fails, return a fixed, + * preallocated 'Error' string to avoid potential infinite loop. + */ + rc = duk_safe_call(thr, duk__safe_to_stacktrace_raw, NULL /*udata*/, 1 /*nargs*/, 1 /*nrets*/); + if (rc != 0) { + duk_pop_unsafe(thr); + duk_push_hstring_stridx(thr, DUK_STRIDX_UC_ERROR); + } + } + duk_replace(thr, idx); + + return duk_get_string(thr, idx); +} + +DUK_INTERNAL duk_hstring *duk_to_property_key_hstring(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + + duk_to_primitive(thr, idx, DUK_HINT_STRING); /* needed for e.g. Symbol objects */ + h = duk_get_hstring(thr, idx); + if (h == NULL) { + /* The "is string?" check may seem unnecessary, but as things + * are duk_to_hstring() invokes ToString() which fails for + * symbols. But since symbols are already strings for Duktape + * C API, we check for that before doing the coercion. + */ + h = duk_to_hstring(thr, idx); + } + DUK_ASSERT(h != NULL); + return h; +} + +#if defined(DUK_USE_DEBUGGER_SUPPORT) /* only needed by debugger for now */ +DUK_INTERNAL duk_hstring *duk_safe_to_hstring(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + (void) duk_safe_to_string(thr, idx); + DUK_ASSERT(duk_is_string(thr, idx)); + DUK_ASSERT(duk_get_hstring(thr, idx) != NULL); + return duk_known_hstring(thr, idx); +} +#endif + +/* Push Object.prototype.toString() output for 'tv'. */ +DUK_INTERNAL void duk_push_class_string_tval(duk_hthread *thr, duk_tval *tv, duk_bool_t avoid_side_effects) { + duk_hobject *h_obj; + duk_small_uint_t classnum; + duk_small_uint_t stridx; + duk_tval tv_tmp; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(tv != NULL); + + /* Stabilize 'tv', duk_push_literal() may trigger side effects. */ + DUK_TVAL_SET_TVAL(&tv_tmp, tv); + tv = &tv_tmp; + + /* Conceptually for any non-undefined/null value we should do a + * ToObject() coercion and look up @@toStringTag (from the object + * prototype) to see if a custom result should be used, with the + * exception of Arrays which are handled specially first. + * + * We'd like to avoid the actual conversion, but even for primitive + * types the prototype may have @@toStringTag. What's worse, the + * @@toStringTag property may be a getter that must get the object + * coerced value (not the prototype) as its 'this' binding. + * + * For now, do an actual object coercion. This could be avoided by + * doing a side effect free lookup to see if a getter would be invoked. + * If not, the value can be read directly and the object coercion could + * be avoided. This may not be worth it in practice, because + * Object.prototype.toString() is usually not performance critical. + */ + + duk_push_literal(thr, "[object "); /* -> [ ... "[object" ] */ + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNUSED: /* Treat like 'undefined', shouldn't happen. */ + case DUK_TAG_UNDEFINED: { + duk_push_hstring_stridx(thr, DUK_STRIDX_UC_UNDEFINED); + goto finish; + } + case DUK_TAG_NULL: { + duk_push_hstring_stridx(thr, DUK_STRIDX_UC_NULL); + goto finish; + } + } + + duk_push_tval(thr, tv); + tv = NULL; /* Invalidated by ToObject(). */ + h_obj = duk_to_hobject(thr, -1); + DUK_ASSERT(h_obj != NULL); + if (duk_js_isarray_hobject(h_obj)) { + stridx = DUK_STRIDX_UC_ARRAY; + } else { + /* [ ... "[object" obj ] */ + +#if defined(DUK_USE_SYMBOL_BUILTIN) + /* XXX: better handling with avoid_side_effects == 1; lookup tval + * without Proxy or getter side effects, and use it in sanitized + * form if it's a string. + */ + if (!avoid_side_effects) { + (void) duk_get_prop_stridx(thr, -1, DUK_STRIDX_WELLKNOWN_SYMBOL_TO_STRING_TAG); + if (duk_is_string_notsymbol(thr, -1)) { + duk_remove_m2(thr); + goto finish; + } + duk_pop_unsafe(thr); + } +#else + DUK_UNREF(avoid_side_effects); +#endif + + classnum = DUK_HOBJECT_GET_CLASS_NUMBER(h_obj); + stridx = DUK_HOBJECT_CLASS_NUMBER_TO_STRIDX(classnum); + } + duk_pop_unsafe(thr); + duk_push_hstring_stridx(thr, stridx); + +finish: + /* [ ... "[object" tag ] */ + duk_push_literal(thr, "]"); + duk_concat(thr, 3); /* [ ... "[object" tag "]" ] -> [ ... res ] */ +} + +/* XXX: other variants like uint, u32 etc */ +DUK_INTERNAL duk_int_t +duk_to_int_clamped_raw(duk_hthread *thr, duk_idx_t idx, duk_int_t minval, duk_int_t maxval, duk_bool_t *out_clamped) { + duk_tval *tv; + duk_tval tv_tmp; + duk_double_t d, dmin, dmax; + duk_int_t res; + duk_bool_t clamped = 0; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_require_tval(thr, idx); + DUK_ASSERT(tv != NULL); + d = duk_js_tointeger(thr, tv); /* E5 Section 9.4, ToInteger() */ + + dmin = (duk_double_t) minval; + dmax = (duk_double_t) maxval; + + if (d < dmin) { + clamped = 1; + res = minval; + d = dmin; + } else if (d > dmax) { + clamped = 1; + res = maxval; + d = dmax; + } else { + res = (duk_int_t) d; + } + DUK_UNREF(d); /* SCANBUILD: with suitable dmin/dmax limits 'd' is unused */ + /* 'd' and 'res' agree here */ + + /* Relookup in case duk_js_tointeger() ends up e.g. coercing an object. */ + tv = duk_get_tval(thr, idx); + DUK_ASSERT(tv != NULL); /* not popped by side effect */ + DUK_TVAL_SET_TVAL(&tv_tmp, tv); +#if defined(DUK_USE_FASTINT) +#if (DUK_INT_MAX <= 0x7fffffffL) + DUK_TVAL_SET_I32(tv, res); +#else + /* Clamping needed if duk_int_t is 64 bits. */ + if (res >= DUK_FASTINT_MIN && res <= DUK_FASTINT_MAX) { + DUK_TVAL_SET_FASTINT(tv, res); + } else { + DUK_TVAL_SET_NUMBER(tv, d); + } +#endif +#else + DUK_TVAL_SET_NUMBER(tv, d); /* no need to incref */ +#endif + DUK_TVAL_DECREF(thr, &tv_tmp); /* side effects */ + + if (out_clamped) { + *out_clamped = clamped; + } else { + /* coerced value is updated to value stack even when RangeError thrown */ + if (clamped) { + DUK_ERROR_RANGE(thr, DUK_STR_NUMBER_OUTSIDE_RANGE); + DUK_WO_NORETURN(return 0;); + } + } + + return res; +} + +DUK_INTERNAL duk_int_t duk_to_int_clamped(duk_hthread *thr, duk_idx_t idx, duk_idx_t minval, duk_idx_t maxval) { + duk_bool_t dummy; + + DUK_ASSERT_API_ENTRY(thr); + + return duk_to_int_clamped_raw(thr, idx, minval, maxval, &dummy); +} + +DUK_INTERNAL duk_int_t duk_to_int_check_range(duk_hthread *thr, duk_idx_t idx, duk_int_t minval, duk_int_t maxval) { + DUK_ASSERT_API_ENTRY(thr); + return duk_to_int_clamped_raw(thr, idx, minval, maxval, NULL); /* out_clamped==NULL -> RangeError if outside range */ +} + +DUK_EXTERNAL const char *duk_to_string(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + tv = DUK_GET_TVAL_POSIDX(thr, idx); + DUK_ASSERT(tv != NULL); + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNDEFINED: { + duk_push_hstring_stridx(thr, DUK_STRIDX_LC_UNDEFINED); + break; + } + case DUK_TAG_NULL: { + duk_push_hstring_stridx(thr, DUK_STRIDX_LC_NULL); + break; + } + case DUK_TAG_BOOLEAN: { + if (DUK_TVAL_GET_BOOLEAN(tv)) { + duk_push_hstring_stridx(thr, DUK_STRIDX_TRUE); + } else { + duk_push_hstring_stridx(thr, DUK_STRIDX_FALSE); + } + break; + } + case DUK_TAG_STRING: { + /* Nop for actual strings, TypeError for Symbols. + * Because various internals rely on ToString() coercion of + * internal strings, -allow- (NOP) string coercion for hidden + * symbols. + */ +#if 1 + duk_hstring *h; + h = DUK_TVAL_GET_STRING(tv); + DUK_ASSERT(h != NULL); + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h))) { + DUK_ERROR_TYPE(thr, DUK_STR_CANNOT_STRING_COERCE_SYMBOL); + DUK_WO_NORETURN(goto skip_replace;); + } else { + goto skip_replace; + } +#else + goto skip_replace; +#endif + break; + } + case DUK_TAG_BUFFER: /* Go through Uint8Array.prototype.toString() for coercion. */ + case DUK_TAG_OBJECT: { + /* Plain buffers: go through ArrayBuffer.prototype.toString() + * for coercion. + * + * Symbol objects: duk_to_primitive() results in a plain symbol + * value, and duk_to_string() then causes a TypeError. + */ + duk_to_primitive(thr, idx, DUK_HINT_STRING); + DUK_ASSERT(!duk_is_buffer(thr, idx)); /* ToPrimitive() must guarantee */ + DUK_ASSERT(!duk_is_object(thr, idx)); + return duk_to_string(thr, idx); /* Note: recursive call */ + } + case DUK_TAG_POINTER: { + void *ptr = DUK_TVAL_GET_POINTER(tv); + if (ptr != NULL) { + duk_push_sprintf(thr, DUK_STR_FMT_PTR, (void *) ptr); + } else { + /* Represent a null pointer as 'null' to be consistent with + * the JX format variant. Native '%p' format for a NULL + * pointer may be e.g. '(nil)'. + */ + duk_push_hstring_stridx(thr, DUK_STRIDX_LC_NULL); + } + break; + } + case DUK_TAG_LIGHTFUNC: { + /* Should match Function.prototype.toString() */ + duk_push_lightfunc_tostring(thr, tv); + break; + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: { + /* number */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + duk_push_tval(thr, tv); + duk_numconv_stringify(thr, 10 /*radix*/, 0 /*precision:shortest*/, 0 /*force_exponential*/); + break; + } + } + + duk_replace(thr, idx); + +skip_replace: + DUK_ASSERT(duk_is_string(thr, idx)); + return duk_require_string(thr, idx); +} + +DUK_INTERNAL duk_hstring *duk_to_hstring(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *ret; + + DUK_ASSERT_API_ENTRY(thr); + + duk_to_string(thr, idx); + ret = duk_get_hstring(thr, idx); + DUK_ASSERT(ret != NULL); + return ret; +} + +DUK_INTERNAL duk_hstring *duk_to_hstring_m1(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + return duk_to_hstring(thr, -1); +} + +DUK_INTERNAL duk_hstring *duk_to_hstring_acceptsymbol(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *ret; + + DUK_ASSERT_API_ENTRY(thr); + + ret = duk_get_hstring(thr, idx); + if (DUK_UNLIKELY(ret && DUK_HSTRING_HAS_SYMBOL(ret))) { + return ret; + } + return duk_to_hstring(thr, idx); +} + +/* Convert a plain buffer or any buffer object into a string, using the buffer + * bytes 1:1 in the internal string representation. For views the active byte + * slice (not element slice interpreted as an initializer) is used. This is + * necessary in Duktape 2.x because ToString(plainBuffer) no longer creates a + * string with the same bytes as in the buffer but rather (usually) + * '[object ArrayBuffer]'. + */ +DUK_EXTERNAL const char *duk_buffer_to_string(duk_hthread *thr, duk_idx_t idx) { + void *ptr_src; + duk_size_t len; + const char *res; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + + ptr_src = duk_require_buffer_data(thr, idx, &len); + DUK_ASSERT(ptr_src != NULL || len == 0); + + res = duk_push_lstring(thr, (const char *) ptr_src, len); + duk_replace(thr, idx); + return res; +} + +DUK_EXTERNAL void *duk_to_buffer_raw(duk_hthread *thr, duk_idx_t idx, duk_size_t *out_size, duk_uint_t mode) { + duk_hbuffer *h_buf; + const duk_uint8_t *src_data; + duk_size_t src_size; + duk_uint8_t *dst_data; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + + h_buf = duk_get_hbuffer(thr, idx); + if (h_buf != NULL) { + /* Buffer is kept as is, with the fixed/dynamic nature of the + * buffer only changed if requested. An external buffer + * is converted into a non-external dynamic buffer in a + * duk_to_dynamic_buffer() call. + */ + duk_uint_t tmp; + duk_uint8_t *tmp_ptr; + + tmp_ptr = (duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h_buf); + src_data = (const duk_uint8_t *) tmp_ptr; + src_size = DUK_HBUFFER_GET_SIZE(h_buf); + + tmp = (DUK_HBUFFER_HAS_DYNAMIC(h_buf) ? DUK_BUF_MODE_DYNAMIC : DUK_BUF_MODE_FIXED); + if ((tmp == mode && !DUK_HBUFFER_HAS_EXTERNAL(h_buf)) || mode == DUK_BUF_MODE_DONTCARE) { + /* Note: src_data may be NULL if input is a zero-size + * dynamic buffer. + */ + dst_data = tmp_ptr; + goto skip_copy; + } + } else { + /* Non-buffer value is first ToString() coerced, then converted + * to a buffer (fixed buffer is used unless a dynamic buffer is + * explicitly requested). Symbols are rejected with a TypeError. + * XXX: C API could maybe allow symbol-to-buffer coercion? + */ + src_data = (const duk_uint8_t *) duk_to_lstring(thr, idx, &src_size); + } + + dst_data = (duk_uint8_t *) duk_push_buffer(thr, src_size, (mode == DUK_BUF_MODE_DYNAMIC) /*dynamic*/); + /* dst_data may be NULL if size is zero. */ + duk_memcpy_unsafe((void *) dst_data, (const void *) src_data, (size_t) src_size); + + duk_replace(thr, idx); +skip_copy: + + if (out_size) { + *out_size = src_size; + } + return dst_data; +} + +DUK_EXTERNAL void *duk_to_pointer(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + void *res; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + tv = DUK_GET_TVAL_POSIDX(thr, idx); + DUK_ASSERT(tv != NULL); + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNDEFINED: + case DUK_TAG_NULL: + case DUK_TAG_BOOLEAN: + res = NULL; + break; + case DUK_TAG_POINTER: + res = DUK_TVAL_GET_POINTER(tv); + break; + case DUK_TAG_STRING: + case DUK_TAG_OBJECT: + case DUK_TAG_BUFFER: + /* Heap allocated: return heap pointer which is NOT useful + * for the caller, except for debugging. + */ + res = (void *) DUK_TVAL_GET_HEAPHDR(tv); + break; + case DUK_TAG_LIGHTFUNC: + /* Function pointers do not always cast correctly to void * + * (depends on memory and segmentation model for instance), + * so they coerce to NULL. + */ + res = NULL; + break; +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: + /* number */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + res = NULL; + break; + } + + duk_push_pointer(thr, res); + duk_replace(thr, idx); + return res; +} + +DUK_LOCAL void duk__push_func_from_lightfunc(duk_hthread *thr, duk_c_function func, duk_small_uint_t lf_flags) { + duk_idx_t nargs; + duk_uint_t flags = 0; /* shared flags for a subset of types */ + duk_small_uint_t lf_len; + duk_hnatfunc *nf; + + nargs = (duk_idx_t) DUK_LFUNC_FLAGS_GET_NARGS(lf_flags); + if (nargs == DUK_LFUNC_NARGS_VARARGS) { + nargs = (duk_idx_t) DUK_VARARGS; + } + + flags = DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_CONSTRUCTABLE | DUK_HOBJECT_FLAG_CALLABLE | + DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_FLAG_NATFUNC | DUK_HOBJECT_FLAG_NEWENV | DUK_HOBJECT_FLAG_STRICT | + DUK_HOBJECT_FLAG_NOTAIL | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_FUNCTION); + (void) duk__push_c_function_raw(thr, func, nargs, flags, DUK_BIDX_NATIVE_FUNCTION_PROTOTYPE); + + lf_len = DUK_LFUNC_FLAGS_GET_LENGTH(lf_flags); + if ((duk_idx_t) lf_len != nargs) { + /* Explicit length is only needed if it differs from 'nargs'. */ + duk_push_int(thr, (duk_int_t) lf_len); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_NONE); + } + +#if defined(DUK_USE_FUNC_NAME_PROPERTY) + duk_push_lightfunc_name_raw(thr, func, lf_flags); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_NAME, DUK_PROPDESC_FLAGS_C); +#endif + + nf = duk_known_hnatfunc(thr, -1); + nf->magic = (duk_int16_t) DUK_LFUNC_FLAGS_GET_MAGIC(lf_flags); +} + +DUK_EXTERNAL void duk_to_object(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_uint_t flags = 0; /* shared flags for a subset of types */ + duk_small_int_t proto = 0; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); + tv = DUK_GET_TVAL_POSIDX(thr, idx); + DUK_ASSERT(tv != NULL); + + switch (DUK_TVAL_GET_TAG(tv)) { +#if !defined(DUK_USE_BUFFEROBJECT_SUPPORT) + case DUK_TAG_BUFFER: /* With no bufferobject support, don't object coerce. */ +#endif + case DUK_TAG_UNDEFINED: + case DUK_TAG_NULL: { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_OBJECT_COERCIBLE); + DUK_WO_NORETURN(return;); + break; + } + case DUK_TAG_BOOLEAN: { + flags = + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_BOOLEAN); + proto = DUK_BIDX_BOOLEAN_PROTOTYPE; + goto create_object; + } + case DUK_TAG_STRING: { + duk_hstring *h; + h = DUK_TVAL_GET_STRING(tv); + DUK_ASSERT(h != NULL); + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h))) { + flags = DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_SYMBOL); + proto = DUK_BIDX_SYMBOL_PROTOTYPE; + } else { + flags = DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_FLAG_EXOTIC_STRINGOBJ | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_STRING); + proto = DUK_BIDX_STRING_PROTOTYPE; + } + goto create_object; + } + case DUK_TAG_OBJECT: { + /* nop */ + break; + } +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + case DUK_TAG_BUFFER: { + /* A plain buffer object coerces to a full ArrayBuffer which + * is not fully transparent behavior (ToObject() should be a + * nop for an object). This behavior matches lightfuncs which + * also coerce to an equivalent Function object. There are + * also downsides to defining ToObject(plainBuffer) as a no-op; + * for example duk_to_hobject() could result in a NULL pointer. + */ + duk_hbuffer *h_buf; + + h_buf = DUK_TVAL_GET_BUFFER(tv); + DUK_ASSERT(h_buf != NULL); + duk_hbufobj_push_uint8array_from_plain(thr, h_buf); + goto replace_value; + } +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + case DUK_TAG_POINTER: { + flags = + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_POINTER); + proto = DUK_BIDX_POINTER_PROTOTYPE; + goto create_object; + } + case DUK_TAG_LIGHTFUNC: { + /* Lightfunc coerces to a Function instance with concrete + * properties. Since 'length' is virtual for Duktape/C + * functions, don't need to define that. The result is made + * extensible to mimic what happens to strings in object + * coercion: + * + * > Object.isExtensible(Object('foo')) + * true + */ + duk_small_uint_t lf_flags; + duk_c_function func; + + DUK_TVAL_GET_LIGHTFUNC(tv, func, lf_flags); + duk__push_func_from_lightfunc(thr, func, lf_flags); + goto replace_value; + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: { + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + flags = + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_NUMBER); + proto = DUK_BIDX_NUMBER_PROTOTYPE; + goto create_object; + } + } + DUK_ASSERT(duk_is_object(thr, idx)); + return; + +create_object: + (void) duk_push_object_helper(thr, flags, proto); + + /* Note: Boolean prototype's internal value property is not writable, + * but duk_xdef_prop_stridx() disregards the write protection. Boolean + * instances are immutable. + * + * String and buffer special behaviors are already enabled which is not + * ideal, but a write to the internal value is not affected by them. + */ + duk_dup(thr, idx); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_VALUE, DUK_PROPDESC_FLAGS_NONE); + +replace_value: + duk_replace(thr, idx); + DUK_ASSERT(duk_is_object(thr, idx)); +} + +DUK_INTERNAL duk_hobject *duk_to_hobject(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *ret; + + DUK_ASSERT_API_ENTRY(thr); + + duk_to_object(thr, idx); + ret = duk_known_hobject(thr, idx); + return ret; +} + +/* + * Type checking + */ + +DUK_LOCAL duk_bool_t duk__tag_check(duk_hthread *thr, duk_idx_t idx, duk_small_uint_t tag) { + duk_tval *tv; + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + return (DUK_TVAL_GET_TAG(tv) == tag); +} + +DUK_LOCAL duk_bool_t duk__obj_flag_any_default_false(duk_hthread *thr, duk_idx_t idx, duk_uint_t flag_mask) { + duk_hobject *obj; + + DUK_ASSERT_API_ENTRY(thr); + + obj = duk_get_hobject(thr, idx); + if (obj) { + return (DUK_HEAPHDR_CHECK_FLAG_BITS((duk_heaphdr *) obj, flag_mask) ? 1 : 0); + } + return 0; +} + +DUK_INTERNAL duk_int_t duk_get_type_tval(duk_tval *tv) { + DUK_ASSERT(tv != NULL); + +#if defined(DUK_USE_PACKED_TVAL) + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNUSED: + return DUK_TYPE_NONE; + case DUK_TAG_UNDEFINED: + return DUK_TYPE_UNDEFINED; + case DUK_TAG_NULL: + return DUK_TYPE_NULL; + case DUK_TAG_BOOLEAN: + return DUK_TYPE_BOOLEAN; + case DUK_TAG_STRING: + return DUK_TYPE_STRING; + case DUK_TAG_OBJECT: + return DUK_TYPE_OBJECT; + case DUK_TAG_BUFFER: + return DUK_TYPE_BUFFER; + case DUK_TAG_POINTER: + return DUK_TYPE_POINTER; + case DUK_TAG_LIGHTFUNC: + return DUK_TYPE_LIGHTFUNC; +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: + /* Note: number has no explicit tag (in 8-byte representation) */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + return DUK_TYPE_NUMBER; + } +#else /* DUK_USE_PACKED_TVAL */ + DUK_ASSERT(DUK_TVAL_IS_VALID_TAG(tv)); + DUK_ASSERT(sizeof(duk__type_from_tag) / sizeof(duk_uint_t) == DUK_TAG_MAX - DUK_TAG_MIN + 1); + return (duk_int_t) duk__type_from_tag[DUK_TVAL_GET_TAG(tv) - DUK_TAG_MIN]; +#endif /* DUK_USE_PACKED_TVAL */ +} + +DUK_EXTERNAL duk_int_t duk_get_type(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + + return duk_get_type_tval(tv); +} + +#if defined(DUK_USE_VERBOSE_ERRORS) && defined(DUK_USE_PARANOID_ERRORS) +DUK_LOCAL const char * const duk__type_names[] = { "none", "undefined", "null", "boolean", "number", + "string", "object", "buffer", "pointer", "lightfunc" }; + +DUK_INTERNAL const char *duk_get_type_name(duk_hthread *thr, duk_idx_t idx) { + duk_int_t type_tag; + + DUK_ASSERT_API_ENTRY(thr); + + type_tag = duk_get_type(thr, idx); + DUK_ASSERT(type_tag >= DUK_TYPE_MIN && type_tag <= DUK_TYPE_MAX); + DUK_ASSERT(DUK_TYPE_MIN == 0 && sizeof(duk__type_names) / sizeof(const char *) == DUK_TYPE_MAX + 1); + + return duk__type_names[type_tag]; +} +#endif /* DUK_USE_VERBOSE_ERRORS && DUK_USE_PARANOID_ERRORS */ + +DUK_INTERNAL duk_small_uint_t duk_get_class_number(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_hobject *obj; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_OBJECT: + obj = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(obj != NULL); + return DUK_HOBJECT_GET_CLASS_NUMBER(obj); + case DUK_TAG_BUFFER: + /* Buffers behave like Uint8Array objects. */ + return DUK_HOBJECT_CLASS_UINT8ARRAY; + case DUK_TAG_LIGHTFUNC: + /* Lightfuncs behave like Function objects. */ + return DUK_HOBJECT_CLASS_FUNCTION; + default: + /* Primitive or UNUSED, no class number. */ + return DUK_HOBJECT_CLASS_NONE; + } +} + +DUK_EXTERNAL duk_bool_t duk_check_type(duk_hthread *thr, duk_idx_t idx, duk_int_t type) { + DUK_ASSERT_API_ENTRY(thr); + + return (duk_get_type(thr, idx) == type) ? 1 : 0; +} + +DUK_INTERNAL duk_uint_t duk_get_type_mask_tval(duk_tval *tv) { + DUK_ASSERT(tv != NULL); + +#if defined(DUK_USE_PACKED_TVAL) + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNUSED: + return DUK_TYPE_MASK_NONE; + case DUK_TAG_UNDEFINED: + return DUK_TYPE_MASK_UNDEFINED; + case DUK_TAG_NULL: + return DUK_TYPE_MASK_NULL; + case DUK_TAG_BOOLEAN: + return DUK_TYPE_MASK_BOOLEAN; + case DUK_TAG_STRING: + return DUK_TYPE_MASK_STRING; + case DUK_TAG_OBJECT: + return DUK_TYPE_MASK_OBJECT; + case DUK_TAG_BUFFER: + return DUK_TYPE_MASK_BUFFER; + case DUK_TAG_POINTER: + return DUK_TYPE_MASK_POINTER; + case DUK_TAG_LIGHTFUNC: + return DUK_TYPE_MASK_LIGHTFUNC; +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: + /* Note: number has no explicit tag (in 8-byte representation) */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + return DUK_TYPE_MASK_NUMBER; + } +#else /* DUK_USE_PACKED_TVAL */ + DUK_ASSERT(DUK_TVAL_IS_VALID_TAG(tv)); + DUK_ASSERT(sizeof(duk__type_mask_from_tag) / sizeof(duk_uint_t) == DUK_TAG_MAX - DUK_TAG_MIN + 1); + return duk__type_mask_from_tag[DUK_TVAL_GET_TAG(tv) - DUK_TAG_MIN]; +#endif /* DUK_USE_PACKED_TVAL */ +} + +DUK_EXTERNAL duk_uint_t duk_get_type_mask(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + + return duk_get_type_mask_tval(tv); +} + +DUK_EXTERNAL duk_bool_t duk_check_type_mask(duk_hthread *thr, duk_idx_t idx, duk_uint_t mask) { + DUK_ASSERT_API_ENTRY(thr); + + if (DUK_LIKELY((duk_get_type_mask(thr, idx) & mask) != 0U)) { + return 1; + } + if (mask & DUK_TYPE_MASK_THROW) { + DUK_ERROR_TYPE(thr, DUK_STR_UNEXPECTED_TYPE); + DUK_WO_NORETURN(return 0;); + } + return 0; +} + +DUK_EXTERNAL duk_bool_t duk_is_undefined(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__tag_check(thr, idx, DUK_TAG_UNDEFINED); +} + +DUK_EXTERNAL duk_bool_t duk_is_null(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__tag_check(thr, idx, DUK_TAG_NULL); +} + +DUK_EXTERNAL duk_bool_t duk_is_boolean(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__tag_check(thr, idx, DUK_TAG_BOOLEAN); +} + +DUK_EXTERNAL duk_bool_t duk_is_number(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + /* + * Number is special because it doesn't have a specific + * tag in the 8-byte representation. + */ + + /* XXX: shorter version for unpacked representation? */ + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + return DUK_TVAL_IS_NUMBER(tv); +} + +DUK_EXTERNAL duk_bool_t duk_is_nan(duk_hthread *thr, duk_idx_t idx) { + /* XXX: This will now return false for non-numbers, even though they would + * coerce to NaN (as a general rule). In particular, duk_get_number() + * returns a NaN for non-numbers, so should this function also return + * true for non-numbers? + */ + + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + + /* XXX: for packed duk_tval an explicit "is number" check is unnecessary */ + if (!DUK_TVAL_IS_NUMBER(tv)) { + return 0; + } + return (duk_bool_t) DUK_ISNAN(DUK_TVAL_GET_NUMBER(tv)); +} + +DUK_EXTERNAL duk_bool_t duk_is_string(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__tag_check(thr, idx, DUK_TAG_STRING); +} + +DUK_INTERNAL duk_bool_t duk_is_string_notsymbol(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk_get_hstring_notsymbol(thr, idx) != NULL; +} + +DUK_EXTERNAL duk_bool_t duk_is_object(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__tag_check(thr, idx, DUK_TAG_OBJECT); +} + +DUK_EXTERNAL duk_bool_t duk_is_buffer(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__tag_check(thr, idx, DUK_TAG_BUFFER); +} + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_EXTERNAL duk_bool_t duk_is_buffer_data(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_TVAL_IS_BUFFER(tv)) { + return 1; + } else if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + if (DUK_HOBJECT_IS_BUFOBJ(h)) { + return 1; + } + } + return 0; +} +#else /* DUK_USE_BUFFEROBJECT_SUPPORT */ +DUK_EXTERNAL duk_bool_t duk_is_buffer_data(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + + return duk_is_buffer(thr, idx); +} + +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +DUK_EXTERNAL duk_bool_t duk_is_pointer(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__tag_check(thr, idx, DUK_TAG_POINTER); +} + +DUK_EXTERNAL duk_bool_t duk_is_lightfunc(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__tag_check(thr, idx, DUK_TAG_LIGHTFUNC); +} + +DUK_EXTERNAL duk_bool_t duk_is_symbol(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *h; + + DUK_ASSERT_API_ENTRY(thr); + h = duk_get_hstring(thr, idx); + /* Use DUK_LIKELY() here because caller may be more likely to type + * check an expected symbol than not. + */ + if (DUK_LIKELY(h != NULL && DUK_HSTRING_HAS_SYMBOL(h))) { + return 1; + } + return 0; +} + +/* IsArray(), returns true for Array instance or Proxy of Array instance. */ +DUK_EXTERNAL duk_bool_t duk_is_array(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval(thr, idx); + if (tv) { + return duk_js_isarray(tv); + } + return 0; +} + +DUK_EXTERNAL duk_bool_t duk_is_function(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *h; + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + return DUK_HOBJECT_HAS_CALLABLE(h) ? 1 : 0; + } + if (DUK_TVAL_IS_LIGHTFUNC(tv)) { + return 1; + } + return 0; +} + +DUK_INTERNAL duk_bool_t duk_is_callable_tval(duk_hthread *thr, duk_tval *tv) { + DUK_ASSERT_API_ENTRY(thr); + + DUK_UNREF(thr); + + if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *h; + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + return DUK_HOBJECT_HAS_CALLABLE(h) ? 1 : 0; + } + if (DUK_TVAL_IS_LIGHTFUNC(tv)) { + return 1; + } + return 0; +} + +DUK_EXTERNAL duk_bool_t duk_is_constructable(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *h; + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + return DUK_HOBJECT_HAS_CONSTRUCTABLE(h) ? 1 : 0; + } + if (DUK_TVAL_IS_LIGHTFUNC(tv)) { + return 1; + } + return 0; +} + +DUK_EXTERNAL duk_bool_t duk_is_c_function(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__obj_flag_any_default_false(thr, idx, DUK_HOBJECT_FLAG_NATFUNC); +} + +DUK_EXTERNAL duk_bool_t duk_is_ecmascript_function(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__obj_flag_any_default_false(thr, idx, DUK_HOBJECT_FLAG_COMPFUNC); +} + +DUK_EXTERNAL duk_bool_t duk_is_bound_function(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk__obj_flag_any_default_false(thr, idx, DUK_HOBJECT_FLAG_BOUNDFUNC); +} + +DUK_EXTERNAL duk_bool_t duk_is_thread(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *obj; + + DUK_ASSERT_API_ENTRY(thr); + + obj = duk_get_hobject(thr, idx); + if (obj) { + return (DUK_HOBJECT_GET_CLASS_NUMBER(obj) == DUK_HOBJECT_CLASS_THREAD ? 1 : 0); + } + return 0; +} + +DUK_EXTERNAL duk_bool_t duk_is_fixed_buffer(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_TVAL_IS_BUFFER(tv)) { + duk_hbuffer *h = DUK_TVAL_GET_BUFFER(tv); + DUK_ASSERT(h != NULL); + return (DUK_HBUFFER_HAS_DYNAMIC(h) ? 0 : 1); + } + return 0; +} + +DUK_EXTERNAL duk_bool_t duk_is_dynamic_buffer(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_TVAL_IS_BUFFER(tv)) { + duk_hbuffer *h = DUK_TVAL_GET_BUFFER(tv); + DUK_ASSERT(h != NULL); + return (DUK_HBUFFER_HAS_DYNAMIC(h) && !DUK_HBUFFER_HAS_EXTERNAL(h) ? 1 : 0); + } + return 0; +} + +DUK_EXTERNAL duk_bool_t duk_is_external_buffer(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_get_tval_or_unused(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_TVAL_IS_BUFFER(tv)) { + duk_hbuffer *h = DUK_TVAL_GET_BUFFER(tv); + DUK_ASSERT(h != NULL); + return (DUK_HBUFFER_HAS_DYNAMIC(h) && DUK_HBUFFER_HAS_EXTERNAL(h) ? 1 : 0); + } + return 0; +} + +DUK_EXTERNAL duk_errcode_t duk_get_error_code(duk_hthread *thr, duk_idx_t idx) { + duk_hobject *h; + duk_uint_t sanity; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_get_hobject(thr, idx); + + sanity = DUK_HOBJECT_PROTOTYPE_CHAIN_SANITY; + do { + if (!h) { + return DUK_ERR_NONE; + } + + /* XXX: something more convenient? */ + + if (h == thr->builtins[DUK_BIDX_EVAL_ERROR_PROTOTYPE]) { + return DUK_ERR_EVAL_ERROR; + } + if (h == thr->builtins[DUK_BIDX_RANGE_ERROR_PROTOTYPE]) { + return DUK_ERR_RANGE_ERROR; + } + if (h == thr->builtins[DUK_BIDX_REFERENCE_ERROR_PROTOTYPE]) { + return DUK_ERR_REFERENCE_ERROR; + } + if (h == thr->builtins[DUK_BIDX_SYNTAX_ERROR_PROTOTYPE]) { + return DUK_ERR_SYNTAX_ERROR; + } + if (h == thr->builtins[DUK_BIDX_TYPE_ERROR_PROTOTYPE]) { + return DUK_ERR_TYPE_ERROR; + } + if (h == thr->builtins[DUK_BIDX_URI_ERROR_PROTOTYPE]) { + return DUK_ERR_URI_ERROR; + } + if (h == thr->builtins[DUK_BIDX_ERROR_PROTOTYPE]) { + return DUK_ERR_ERROR; + } + + h = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h); + } while (--sanity > 0); + + return DUK_ERR_NONE; +} + +/* + * Pushers + */ + +DUK_INTERNAL void duk_push_tval(duk_hthread *thr, duk_tval *tv) { + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(tv != NULL); + + DUK__CHECK_SPACE(); + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_TVAL(tv_slot, tv); + DUK_TVAL_INCREF(thr, tv); /* no side effects */ +} + +DUK_EXTERNAL void duk_push_undefined(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + DUK__CHECK_SPACE(); + + /* Because value stack init policy is 'undefined above top', + * we don't need to write, just assert. + */ + thr->valstack_top++; + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top - 1)); +} + +DUK_EXTERNAL void duk_push_null(duk_hthread *thr) { + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_NULL(tv_slot); +} + +DUK_EXTERNAL void duk_push_boolean(duk_hthread *thr, duk_bool_t val) { + duk_tval *tv_slot; + duk_small_int_t b; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + b = (val ? 1 : 0); /* ensure value is 1 or 0 (not other non-zero) */ + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_BOOLEAN(tv_slot, b); +} + +DUK_EXTERNAL void duk_push_true(duk_hthread *thr) { + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_BOOLEAN_TRUE(tv_slot); +} + +DUK_EXTERNAL void duk_push_false(duk_hthread *thr) { + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_BOOLEAN_FALSE(tv_slot); +} + +/* normalize NaN which may not match our canonical internal NaN */ +DUK_EXTERNAL void duk_push_number(duk_hthread *thr, duk_double_t val) { + duk_tval *tv_slot; + duk_double_union du; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + du.d = val; + DUK_DBLUNION_NORMALIZE_NAN_CHECK(&du); + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_NUMBER(tv_slot, du.d); +} + +DUK_EXTERNAL void duk_push_int(duk_hthread *thr, duk_int_t val) { +#if defined(DUK_USE_FASTINT) + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + tv_slot = thr->valstack_top++; +#if DUK_INT_MAX <= 0x7fffffffL + DUK_TVAL_SET_I32(tv_slot, (duk_int32_t) val); +#else + if (val >= DUK_FASTINT_MIN && val <= DUK_FASTINT_MAX) { + DUK_TVAL_SET_FASTINT(tv_slot, (duk_int64_t) val); + } else { + duk_double_t = (duk_double_t) val; + DUK_TVAL_SET_NUMBER(tv_slot, d); + } +#endif +#else /* DUK_USE_FASTINT */ + duk_tval *tv_slot; + duk_double_t d; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + d = (duk_double_t) val; + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_NUMBER(tv_slot, d); +#endif /* DUK_USE_FASTINT */ +} + +DUK_EXTERNAL void duk_push_uint(duk_hthread *thr, duk_uint_t val) { +#if defined(DUK_USE_FASTINT) + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + tv_slot = thr->valstack_top++; +#if DUK_UINT_MAX <= 0xffffffffUL + DUK_TVAL_SET_U32(tv_slot, (duk_uint32_t) val); +#else + if (val <= DUK_FASTINT_MAX) { /* val is unsigned so >= 0 */ + /* XXX: take advantage of val being unsigned, no need to mask */ + DUK_TVAL_SET_FASTINT(tv_slot, (duk_int64_t) val); + } else { + duk_double_t = (duk_double_t) val; + DUK_TVAL_SET_NUMBER(tv_slot, d); + } +#endif +#else /* DUK_USE_FASTINT */ + duk_tval *tv_slot; + duk_double_t d; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + d = (duk_double_t) val; + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_NUMBER(tv_slot, d); +#endif /* DUK_USE_FASTINT */ +} + +DUK_EXTERNAL void duk_push_nan(duk_hthread *thr) { + duk_tval *tv_slot; + duk_double_union du; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + DUK_DBLUNION_SET_NAN(&du); + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&du)); + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_NUMBER(tv_slot, du.d); +} + +DUK_EXTERNAL const char *duk_push_lstring(duk_hthread *thr, const char *str, duk_size_t len) { + duk_hstring *h; + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + + /* Check stack before interning (avoid hanging temp). */ + DUK__CHECK_SPACE(); + + /* NULL with zero length represents an empty string; NULL with higher + * length is also now treated like an empty string although it is + * a bit dubious. This is unlike duk_push_string() which pushes a + * 'null' if the input string is a NULL. + */ + if (DUK_UNLIKELY(str == NULL)) { + len = 0U; + } + + /* Check for maximum string length. */ + if (DUK_UNLIKELY(len > DUK_HSTRING_MAX_BYTELEN)) { + DUK_ERROR_RANGE(thr, DUK_STR_STRING_TOO_LONG); + DUK_WO_NORETURN(return NULL;); + } + + h = duk_heap_strtable_intern_checked(thr, (const duk_uint8_t *) str, (duk_uint32_t) len); + DUK_ASSERT(h != NULL); + + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_STRING(tv_slot, h); + DUK_HSTRING_INCREF(thr, h); /* no side effects */ + + return (const char *) DUK_HSTRING_GET_DATA(h); +} + +DUK_EXTERNAL const char *duk_push_string(duk_hthread *thr, const char *str) { + DUK_ASSERT_API_ENTRY(thr); + + if (str) { + return duk_push_lstring(thr, str, DUK_STRLEN(str)); + } else { + duk_push_null(thr); + return NULL; + } +} + +#if !defined(DUK_USE_PREFER_SIZE) +#if defined(DUK_USE_LITCACHE_SIZE) +DUK_EXTERNAL const char *duk_push_literal_raw(duk_hthread *thr, const char *str, duk_size_t len) { + duk_hstring *h; + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(str != NULL); + DUK_ASSERT(str[len] == (char) 0); + + /* Check for maximum string length. */ + if (DUK_UNLIKELY(len > DUK_HSTRING_MAX_BYTELEN)) { + DUK_ERROR_RANGE(thr, DUK_STR_STRING_TOO_LONG); + DUK_WO_NORETURN(return NULL;); + } + + h = duk_heap_strtable_intern_literal_checked(thr, (const duk_uint8_t *) str, (duk_uint32_t) len); + DUK_ASSERT(h != NULL); + + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_STRING(tv_slot, h); + DUK_HSTRING_INCREF(thr, h); /* no side effects */ + + return (const char *) DUK_HSTRING_GET_DATA(h); +} +#else /* DUK_USE_LITCACHE_SIZE */ +DUK_EXTERNAL const char *duk_push_literal_raw(duk_hthread *thr, const char *str, duk_size_t len) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(str != NULL); + DUK_ASSERT(str[len] == (char) 0); + + return duk_push_lstring(thr, str, len); +} +#endif /* DUK_USE_LITCACHE_SIZE */ +#endif /* !DUK_USE_PREFER_SIZE */ + +DUK_EXTERNAL void duk_push_pointer(duk_hthread *thr, void *val) { + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + DUK__CHECK_SPACE(); + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_POINTER(tv_slot, val); +} + +DUK_INTERNAL duk_hstring *duk_push_uint_to_hstring(duk_hthread *thr, duk_uint_t i) { + duk_hstring *h_tmp; + + DUK_ASSERT_API_ENTRY(thr); + + /* XXX: this could be a direct DUK_SPRINTF to a buffer followed by duk_push_string() */ + duk_push_uint(thr, (duk_uint_t) i); + h_tmp = duk_to_hstring_m1(thr); + DUK_ASSERT(h_tmp != NULL); + return h_tmp; +} + +DUK_LOCAL void duk__push_this_helper(duk_hthread *thr, duk_small_uint_t check_object_coercible) { + duk_tval *tv_slot; + + DUK__CHECK_SPACE(); + + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top)); /* because of valstack init policy */ + tv_slot = thr->valstack_top++; + + if (DUK_UNLIKELY(thr->callstack_curr == NULL)) { + if (check_object_coercible) { + goto type_error; + } + /* 'undefined' already on stack top */ + } else { + duk_tval *tv; + + /* 'this' binding is just before current activation's bottom */ + DUK_ASSERT(thr->valstack_bottom > thr->valstack); + tv = thr->valstack_bottom - 1; + if (check_object_coercible && (DUK_TVAL_IS_UNDEFINED(tv) || DUK_TVAL_IS_NULL(tv))) { + /* XXX: better macro for DUK_TVAL_IS_UNDEFINED_OR_NULL(tv) */ + goto type_error; + } + + DUK_TVAL_SET_TVAL(tv_slot, tv); + DUK_TVAL_INCREF(thr, tv); + } + return; + +type_error: + DUK_ERROR_TYPE(thr, DUK_STR_NOT_OBJECT_COERCIBLE); + DUK_WO_NORETURN(return;); +} + +DUK_EXTERNAL void duk_push_this(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + duk__push_this_helper(thr, 0 /*check_object_coercible*/); +} + +DUK_INTERNAL void duk_push_this_check_object_coercible(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + duk__push_this_helper(thr, 1 /*check_object_coercible*/); +} + +DUK_INTERNAL duk_hobject *duk_push_this_coercible_to_object(duk_hthread *thr) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + duk__push_this_helper(thr, 1 /*check_object_coercible*/); + h = duk_to_hobject(thr, -1); + DUK_ASSERT(h != NULL); + return h; +} + +DUK_INTERNAL duk_hstring *duk_push_this_coercible_to_string(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + duk__push_this_helper(thr, 1 /*check_object_coercible*/); + return duk_to_hstring_m1(thr); /* This will reject all Symbol values; accepts Symbol objects. */ +} + +DUK_INTERNAL duk_tval *duk_get_borrowed_this_tval(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + DUK_ASSERT(thr->callstack_top > 0); /* caller required to know */ + DUK_ASSERT(thr->callstack_curr != NULL); /* caller required to know */ + DUK_ASSERT(thr->valstack_bottom > thr->valstack); /* consequence of above */ + DUK_ASSERT(thr->valstack_bottom - 1 >= thr->valstack); /* 'this' binding exists */ + + return thr->valstack_bottom - 1; +} + +DUK_EXTERNAL void duk_push_new_target(duk_hthread *thr) { + duk_activation *act; + + DUK_ASSERT_API_ENTRY(thr); + + /* https://www.ecma-international.org/ecma-262/6.0/#sec-meta-properties-runtime-semantics-evaluation + * https://www.ecma-international.org/ecma-262/6.0/#sec-getnewtarget + * + * No newTarget support now, so as a first approximation + * use the resolved (non-bound) target function. + * + * Check CONSTRUCT flag from current function, or if running + * direct eval, from a non-direct-eval parent (with possibly + * more than one nested direct eval). An alternative to this + * would be to store [[NewTarget]] as a hidden symbol of the + * lexical scope, and then just look up that variable. + * + * Calls from the application will either be for an empty + * call stack, or a Duktape/C function as the top activation. + */ + + act = thr->callstack_curr; + for (;;) { + if (act == NULL) { + break; + } + + if (act->flags & DUK_ACT_FLAG_CONSTRUCT) { + duk_push_tval(thr, &act->tv_func); + return; + } else if (act->flags & DUK_ACT_FLAG_DIRECT_EVAL) { + act = act->parent; + } else { + break; + } + } + + duk_push_undefined(thr); +} + +DUK_EXTERNAL void duk_push_current_function(duk_hthread *thr) { + duk_activation *act; + + DUK_ASSERT_API_ENTRY(thr); + + act = thr->callstack_curr; + if (act != NULL) { + duk_push_tval(thr, &act->tv_func); + } else { + duk_push_undefined(thr); + } +} + +DUK_EXTERNAL void duk_push_current_thread(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + if (thr->heap->curr_thread) { + duk_push_hobject(thr, (duk_hobject *) thr->heap->curr_thread); + } else { + duk_push_undefined(thr); + } +} + +DUK_EXTERNAL void duk_push_global_object(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + duk_push_hobject_bidx(thr, DUK_BIDX_GLOBAL); +} + +/* XXX: size optimize */ +DUK_LOCAL void duk__push_stash(duk_hthread *thr) { + if (!duk_xget_owndataprop_stridx_short(thr, -1, DUK_STRIDX_INT_VALUE)) { + DUK_DDD(DUK_DDDPRINT("creating heap/global/thread stash on first use")); + duk_pop_unsafe(thr); + duk_push_bare_object(thr); + duk_dup_top(thr); + duk_xdef_prop_stridx_short(thr, + -3, + DUK_STRIDX_INT_VALUE, + DUK_PROPDESC_FLAGS_C); /* [ ... parent stash stash ] -> [ ... parent stash ] */ + } + duk_remove_m2(thr); +} + +DUK_EXTERNAL void duk_push_heap_stash(duk_hthread *thr) { + duk_heap *heap; + DUK_ASSERT_API_ENTRY(thr); + heap = thr->heap; + DUK_ASSERT(heap->heap_object != NULL); + duk_push_hobject(thr, heap->heap_object); + duk__push_stash(thr); +} + +DUK_EXTERNAL void duk_push_global_stash(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_push_global_object(thr); + duk__push_stash(thr); +} + +DUK_EXTERNAL void duk_push_thread_stash(duk_hthread *thr, duk_hthread *target_thr) { + DUK_ASSERT_API_ENTRY(thr); + if (DUK_UNLIKELY(target_thr == NULL)) { + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return;); + } + duk_push_hobject(thr, (duk_hobject *) target_thr); + duk__push_stash(thr); +} + +/* XXX: duk_ssize_t would be useful here */ +DUK_LOCAL duk_int_t duk__try_push_vsprintf(duk_hthread *thr, void *buf, duk_size_t sz, const char *fmt, va_list ap) { + duk_int_t len; + + DUK_CTX_ASSERT_VALID(thr); + DUK_UNREF(thr); + + /* NUL terminator handling doesn't matter here */ + len = DUK_VSNPRINTF((char *) buf, sz, fmt, ap); + if (len < (duk_int_t) sz) { + /* Return value of 'sz' or more indicates output was (potentially) + * truncated. + */ + return (duk_int_t) len; + } + return -1; +} + +DUK_EXTERNAL const char *duk_push_vsprintf(duk_hthread *thr, const char *fmt, va_list ap) { + duk_uint8_t stack_buf[DUK_PUSH_SPRINTF_INITIAL_SIZE]; + duk_size_t sz = DUK_PUSH_SPRINTF_INITIAL_SIZE; + duk_bool_t pushed_buf = 0; + void *buf; + duk_int_t len; /* XXX: duk_ssize_t */ + const char *res; + + DUK_ASSERT_API_ENTRY(thr); + + /* special handling of fmt==NULL */ + if (!fmt) { + duk_hstring *h_str; + duk_push_hstring_empty(thr); + h_str = duk_known_hstring(thr, -1); + return (const char *) DUK_HSTRING_GET_DATA(h_str); + } + + /* initial estimate based on format string */ + sz = DUK_STRLEN(fmt) + 16; /* format plus something to avoid just missing */ + if (sz < DUK_PUSH_SPRINTF_INITIAL_SIZE) { + sz = DUK_PUSH_SPRINTF_INITIAL_SIZE; + } + DUK_ASSERT(sz > 0); + + /* Try to make do with a stack buffer to avoid allocating a temporary buffer. + * This works 99% of the time which is quite nice. + */ + for (;;) { + va_list ap_copy; /* copied so that 'ap' can be reused */ + + if (sz <= sizeof(stack_buf)) { + buf = stack_buf; + } else if (!pushed_buf) { + pushed_buf = 1; + buf = duk_push_dynamic_buffer(thr, sz); + } else { + buf = duk_resize_buffer(thr, -1, sz); + } + DUK_ASSERT(buf != NULL); + + DUK_VA_COPY(ap_copy, ap); + len = duk__try_push_vsprintf(thr, buf, sz, fmt, ap_copy); + va_end(ap_copy); + if (len >= 0) { + break; + } + + /* failed, resize and try again */ + sz = sz * 2; + if (DUK_UNLIKELY(sz >= DUK_PUSH_SPRINTF_SANITY_LIMIT)) { + DUK_ERROR_RANGE(thr, DUK_STR_RESULT_TOO_LONG); + DUK_WO_NORETURN(return NULL;); + } + } + + /* Cannot use duk_buffer_to_string() on the buffer because it is + * usually larger than 'len'; 'buf' is also usually a stack buffer. + */ + res = duk_push_lstring(thr, (const char *) buf, (duk_size_t) len); /* [ buf? res ] */ + if (pushed_buf) { + duk_remove_m2(thr); + } + return res; +} + +DUK_EXTERNAL const char *duk_push_sprintf(duk_hthread *thr, const char *fmt, ...) { + va_list ap; + const char *ret; + + DUK_ASSERT_API_ENTRY(thr); + + /* allow fmt==NULL */ + va_start(ap, fmt); + ret = duk_push_vsprintf(thr, fmt, ap); + va_end(ap); + + return ret; +} + +DUK_INTERNAL duk_hobject *duk_push_object_helper(duk_hthread *thr, + duk_uint_t hobject_flags_and_class, + duk_small_int_t prototype_bidx) { + duk_tval *tv_slot; + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(prototype_bidx == -1 || (prototype_bidx >= 0 && prototype_bidx < DUK_NUM_BUILTINS)); + + DUK__CHECK_SPACE(); + + h = duk_hobject_alloc(thr, hobject_flags_and_class); + DUK_ASSERT(h != NULL); + + DUK_DDD(DUK_DDDPRINT("created object with flags: 0x%08lx", (unsigned long) h->hdr.h_flags)); + + tv_slot = thr->valstack_top; + DUK_TVAL_SET_OBJECT(tv_slot, h); + DUK_HOBJECT_INCREF(thr, h); /* no side effects */ + thr->valstack_top++; + + /* object is now reachable */ + + if (prototype_bidx >= 0) { + DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, h, thr->builtins[prototype_bidx]); + } else { + DUK_ASSERT(prototype_bidx == -1); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h) == NULL); + } + + return h; +} + +DUK_INTERNAL duk_hobject *duk_push_object_helper_proto(duk_hthread *thr, duk_uint_t hobject_flags_and_class, duk_hobject *proto) { + duk_hobject *h; + + DUK_ASSERT_API_ENTRY(thr); + + h = duk_push_object_helper(thr, hobject_flags_and_class, -1); + DUK_ASSERT(h != NULL); + DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, h, proto); + return h; +} + +DUK_EXTERNAL duk_idx_t duk_push_object(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + (void) duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJECT), + DUK_BIDX_OBJECT_PROTOTYPE); + return duk_get_top_index_unsafe(thr); +} + +DUK_EXTERNAL duk_idx_t duk_push_array(duk_hthread *thr) { + duk_uint_t flags; + duk_harray *obj; + duk_idx_t ret; + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + + flags = DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_FLAG_ARRAY_PART | + DUK_HOBJECT_FLAG_EXOTIC_ARRAY | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_ARRAY); + + obj = duk_harray_alloc(thr, flags); + DUK_ASSERT(obj != NULL); + + DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, (duk_hobject *) obj, thr->builtins[DUK_BIDX_ARRAY_PROTOTYPE]); + + tv_slot = thr->valstack_top; + DUK_TVAL_SET_OBJECT(tv_slot, (duk_hobject *) obj); + DUK_HOBJECT_INCREF(thr, obj); /* XXX: could preallocate with refcount = 1 */ + ret = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom); + thr->valstack_top++; + + DUK_ASSERT(obj->length == 0); /* Array .length starts at zero. */ + return ret; +} + +DUK_EXTERNAL duk_idx_t duk_push_bare_array(duk_hthread *thr) { + duk_uint_t flags; + duk_harray *obj; + duk_idx_t ret; + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + + flags = DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_FLAG_ARRAY_PART | + DUK_HOBJECT_FLAG_EXOTIC_ARRAY | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_ARRAY); + + obj = duk_harray_alloc(thr, flags); + DUK_ASSERT(obj != NULL); + + tv_slot = thr->valstack_top; + DUK_TVAL_SET_OBJECT(tv_slot, (duk_hobject *) obj); + DUK_HOBJECT_INCREF(thr, obj); /* XXX: could preallocate with refcount = 1 */ + ret = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom); + thr->valstack_top++; + + DUK_ASSERT(obj->length == 0); /* Array .length starts at zero. */ + return ret; +} + +DUK_INTERNAL duk_harray *duk_push_harray(duk_hthread *thr) { + /* XXX: API call could do this directly, cast to void in API macro. */ + duk_harray *a; + + DUK_ASSERT_API_ENTRY(thr); + + (void) duk_push_array(thr); + DUK_ASSERT(DUK_TVAL_IS_OBJECT(thr->valstack_top - 1)); + a = (duk_harray *) DUK_TVAL_GET_OBJECT(thr->valstack_top - 1); + DUK_ASSERT(a != NULL); + return a; +} + +/* Push a duk_harray with preallocated size (.length also set to match size). + * Caller may then populate array part of the duk_harray directly. + */ +DUK_INTERNAL duk_harray *duk_push_harray_with_size(duk_hthread *thr, duk_uint32_t size) { + duk_harray *a; + + DUK_ASSERT_API_ENTRY(thr); + + a = duk_push_harray(thr); + + duk_hobject_realloc_props(thr, (duk_hobject *) a, 0, size, 0, 0); + a->length = size; + return a; +} + +DUK_INTERNAL duk_tval *duk_push_harray_with_size_outptr(duk_hthread *thr, duk_uint32_t size) { + duk_harray *a; + + DUK_ASSERT_API_ENTRY(thr); + + a = duk_push_harray_with_size(thr, size); + DUK_ASSERT(a != NULL); + return DUK_HOBJECT_A_GET_BASE(thr->heap, (duk_hobject *) a); +} + +DUK_EXTERNAL duk_idx_t duk_push_thread_raw(duk_hthread *thr, duk_uint_t flags) { + duk_hthread *obj; + duk_idx_t ret; + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + + DUK__CHECK_SPACE(); + + obj = duk_hthread_alloc(thr, DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_THREAD)); + DUK_ASSERT(obj != NULL); + obj->state = DUK_HTHREAD_STATE_INACTIVE; +#if defined(DUK_USE_ROM_STRINGS) + /* Nothing to initialize, strs[] is in ROM. */ +#else +#if defined(DUK_USE_HEAPPTR16) + obj->strs16 = thr->strs16; +#else + obj->strs = thr->strs; +#endif +#endif + DUK_DDD(DUK_DDDPRINT("created thread object with flags: 0x%08lx", (unsigned long) obj->obj.hdr.h_flags)); + + /* make the new thread reachable */ + tv_slot = thr->valstack_top; + DUK_TVAL_SET_OBJECT(tv_slot, (duk_hobject *) obj); + DUK_HTHREAD_INCREF(thr, obj); + ret = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom); + thr->valstack_top++; + + /* important to do this *after* pushing, to make the thread reachable for gc */ + if (DUK_UNLIKELY(!duk_hthread_init_stacks(thr->heap, obj))) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return 0;); + } + + /* initialize built-ins - either by copying or creating new ones */ + if (flags & DUK_THREAD_NEW_GLOBAL_ENV) { + duk_hthread_create_builtin_objects(obj); + } else { + duk_hthread_copy_builtin_objects(thr, obj); + } + + /* default prototype */ + DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, (duk_hobject *) obj, obj->builtins[DUK_BIDX_THREAD_PROTOTYPE]); + + /* Initial stack size satisfies the stack slack constraints so there + * is no need to require stack here. + */ + DUK_ASSERT(DUK_VALSTACK_INITIAL_SIZE >= DUK_VALSTACK_API_ENTRY_MINIMUM + DUK_VALSTACK_INTERNAL_EXTRA); + + return ret; +} + +DUK_INTERNAL duk_hcompfunc *duk_push_hcompfunc(duk_hthread *thr) { + duk_hcompfunc *obj; + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + + DUK__CHECK_SPACE(); + + /* Template functions are not strictly constructable (they don't + * have a "prototype" property for instance), so leave the + * DUK_HOBJECT_FLAG_CONSRUCTABLE flag cleared here. + */ + + obj = duk_hcompfunc_alloc(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_CALLABLE | DUK_HOBJECT_FLAG_COMPFUNC | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_FUNCTION)); + if (DUK_UNLIKELY(obj == NULL)) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return NULL;); + } + + DUK_DDD(DUK_DDDPRINT("created compiled function object with flags: 0x%08lx", (unsigned long) obj->obj.hdr.h_flags)); + + tv_slot = thr->valstack_top; + DUK_TVAL_SET_OBJECT(tv_slot, (duk_hobject *) obj); + DUK_HOBJECT_INCREF(thr, obj); + thr->valstack_top++; + + /* default prototype */ + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) obj) == NULL); + DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, (duk_hobject *) obj, thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]); + + return obj; +} + +DUK_INTERNAL duk_hboundfunc *duk_push_hboundfunc(duk_hthread *thr) { + duk_hboundfunc *obj; + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + + DUK__CHECK_SPACE(); + obj = duk_hboundfunc_alloc(thr->heap, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_BOUNDFUNC | DUK_HOBJECT_FLAG_CONSTRUCTABLE | + DUK_HOBJECT_FLAG_CALLABLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_FUNCTION)); + if (!obj) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return NULL;); + } + + tv_slot = thr->valstack_top++; + DUK_TVAL_SET_OBJECT(tv_slot, (duk_hobject *) obj); + DUK_HOBJECT_INCREF(thr, obj); + + /* Prototype is left as NULL because the caller always sets it (and + * it depends on the target function). + */ + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) obj) == NULL); + + return obj; +} + +DUK_LOCAL duk_idx_t +duk__push_c_function_raw(duk_hthread *thr, duk_c_function func, duk_idx_t nargs, duk_uint_t flags, duk_small_uint_t proto_bidx) { + duk_hnatfunc *obj; + duk_idx_t ret; + duk_tval *tv_slot; + duk_int16_t func_nargs; + + DUK_CTX_ASSERT_VALID(thr); + + DUK__CHECK_SPACE(); + + if (DUK_UNLIKELY(func == NULL)) { + goto api_error; + } + if (nargs >= 0 && nargs < DUK_HNATFUNC_NARGS_MAX) { + func_nargs = (duk_int16_t) nargs; + } else if (nargs == DUK_VARARGS) { + func_nargs = DUK_HNATFUNC_NARGS_VARARGS; + } else { + goto api_error; + } + + obj = duk_hnatfunc_alloc(thr, flags); + DUK_ASSERT(obj != NULL); + + obj->func = func; + obj->nargs = func_nargs; + + DUK_DDD(DUK_DDDPRINT("created native function object with flags: 0x%08lx, nargs=%ld", + (unsigned long) obj->obj.hdr.h_flags, + (long) obj->nargs)); + + tv_slot = thr->valstack_top; + DUK_TVAL_SET_OBJECT(tv_slot, (duk_hobject *) obj); + DUK_HOBJECT_INCREF(thr, obj); + ret = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom); + thr->valstack_top++; + + DUK_ASSERT_BIDX_VALID(proto_bidx); + DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, (duk_hobject *) obj, thr->builtins[proto_bidx]); + return ret; + +api_error: + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return 0;); +} + +DUK_EXTERNAL duk_idx_t duk_push_c_function(duk_hthread *thr, duk_c_function func, duk_int_t nargs) { + duk_uint_t flags; + + DUK_ASSERT_API_ENTRY(thr); + + flags = DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_CONSTRUCTABLE | DUK_HOBJECT_FLAG_CALLABLE | + DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_FLAG_NATFUNC | DUK_HOBJECT_FLAG_NEWENV | DUK_HOBJECT_FLAG_STRICT | + DUK_HOBJECT_FLAG_NOTAIL | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_FUNCTION); + + /* Default prototype is a Duktape specific %NativeFunctionPrototype% + * which provides .length and .name getters. + */ + return duk__push_c_function_raw(thr, func, nargs, flags, DUK_BIDX_NATIVE_FUNCTION_PROTOTYPE); +} + +DUK_INTERNAL void duk_push_c_function_builtin(duk_hthread *thr, duk_c_function func, duk_int_t nargs) { + duk_uint_t flags; + + DUK_ASSERT_API_ENTRY(thr); + + flags = DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_CONSTRUCTABLE | DUK_HOBJECT_FLAG_CALLABLE | + DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_FLAG_NATFUNC | DUK_HOBJECT_FLAG_NEWENV | DUK_HOBJECT_FLAG_STRICT | + DUK_HOBJECT_FLAG_NOTAIL | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_FUNCTION); + + /* Must use Function.prototype for standard built-in functions. */ + (void) duk__push_c_function_raw(thr, func, nargs, flags, DUK_BIDX_FUNCTION_PROTOTYPE); +} + +DUK_INTERNAL void duk_push_c_function_builtin_noconstruct(duk_hthread *thr, duk_c_function func, duk_int_t nargs) { + duk_uint_t flags; + + DUK_ASSERT_API_ENTRY(thr); + + flags = DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_CALLABLE | DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_FLAG_NATFUNC | + DUK_HOBJECT_FLAG_NEWENV | DUK_HOBJECT_FLAG_STRICT | DUK_HOBJECT_FLAG_NOTAIL | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_FUNCTION); + + /* Must use Function.prototype for standard built-in functions. */ + (void) duk__push_c_function_raw(thr, func, nargs, flags, DUK_BIDX_FUNCTION_PROTOTYPE); +} + +DUK_EXTERNAL duk_idx_t +duk_push_c_lightfunc(duk_hthread *thr, duk_c_function func, duk_idx_t nargs, duk_idx_t length, duk_int_t magic) { + duk_small_uint_t lf_flags; + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + + DUK__CHECK_SPACE(); + + if (nargs >= DUK_LFUNC_NARGS_MIN && nargs <= DUK_LFUNC_NARGS_MAX) { + /* as is */ + } else if (nargs == DUK_VARARGS) { + nargs = DUK_LFUNC_NARGS_VARARGS; + } else { + goto api_error; + } + if (DUK_UNLIKELY(!(length >= DUK_LFUNC_LENGTH_MIN && length <= DUK_LFUNC_LENGTH_MAX))) { + goto api_error; + } + if (DUK_UNLIKELY(!(magic >= DUK_LFUNC_MAGIC_MIN && magic <= DUK_LFUNC_MAGIC_MAX))) { + goto api_error; + } + + lf_flags = DUK_LFUNC_FLAGS_PACK((duk_small_int_t) magic, (duk_small_uint_t) length, (duk_small_uint_t) nargs); + tv_slot = thr->valstack_top++; + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(tv_slot)); + DUK_TVAL_SET_LIGHTFUNC(tv_slot, func, lf_flags); + DUK_ASSERT(tv_slot >= thr->valstack_bottom); + return (duk_idx_t) (tv_slot - thr->valstack_bottom); + +api_error: + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return 0;); +} + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_hbufobj *duk_push_bufobj_raw(duk_hthread *thr, + duk_uint_t hobject_flags_and_class, + duk_small_int_t prototype_bidx) { + duk_hbufobj *obj; + duk_tval *tv_slot; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(prototype_bidx >= 0); + + DUK__CHECK_SPACE(); + + obj = duk_hbufobj_alloc(thr, hobject_flags_and_class); + DUK_ASSERT(obj != NULL); + + DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, (duk_hobject *) obj, thr->builtins[prototype_bidx]); + DUK_HBUFOBJ_ASSERT_VALID(obj); + + tv_slot = thr->valstack_top; + DUK_TVAL_SET_OBJECT(tv_slot, (duk_hobject *) obj); + DUK_HOBJECT_INCREF(thr, obj); + thr->valstack_top++; + + return obj; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* XXX: There's quite a bit of overlap with buffer creation handling in + * duk_bi_buffer.c. Look for overlap and refactor. + */ +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +#define DUK__PACK_ARGS(classnum, protobidx, elemtype, elemshift, istypedarray) \ + (((classnum) << 24) | ((protobidx) << 16) | ((elemtype) << 8) | ((elemshift) << 4) | (istypedarray)) + +static const duk_uint32_t duk__bufobj_flags_lookup[] = { + /* Node.js Buffers are Uint8Array instances which inherit from Buffer.prototype. */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_ARRAYBUFFER, + DUK_BIDX_ARRAYBUFFER_PROTOTYPE, + DUK_HBUFOBJ_ELEM_UINT8, + 0, + 0), /* DUK_BUFOBJ_ARRAYBUFFER */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_UINT8ARRAY, + DUK_BIDX_NODEJS_BUFFER_PROTOTYPE, + DUK_HBUFOBJ_ELEM_UINT8, + 0, + 1), /* DUK_BUFOBJ_NODEJS_BUFFER */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_DATAVIEW, + DUK_BIDX_DATAVIEW_PROTOTYPE, + DUK_HBUFOBJ_ELEM_UINT8, + 0, + 0), /* DUK_BUFOBJ_DATAVIEW */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_INT8ARRAY, + DUK_BIDX_INT8ARRAY_PROTOTYPE, + DUK_HBUFOBJ_ELEM_INT8, + 0, + 1), /* DUK_BUFOBJ_INT8ARRAY */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_UINT8ARRAY, + DUK_BIDX_UINT8ARRAY_PROTOTYPE, + DUK_HBUFOBJ_ELEM_UINT8, + 0, + 1), /* DUK_BUFOBJ_UINT8ARRAY */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_UINT8CLAMPEDARRAY, + DUK_BIDX_UINT8CLAMPEDARRAY_PROTOTYPE, + DUK_HBUFOBJ_ELEM_UINT8CLAMPED, + 0, + 1), /* DUK_BUFOBJ_UINT8CLAMPEDARRAY */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_INT16ARRAY, + DUK_BIDX_INT16ARRAY_PROTOTYPE, + DUK_HBUFOBJ_ELEM_INT16, + 1, + 1), /* DUK_BUFOBJ_INT16ARRAY */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_UINT16ARRAY, + DUK_BIDX_UINT16ARRAY_PROTOTYPE, + DUK_HBUFOBJ_ELEM_UINT16, + 1, + 1), /* DUK_BUFOBJ_UINT16ARRAY */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_INT32ARRAY, + DUK_BIDX_INT32ARRAY_PROTOTYPE, + DUK_HBUFOBJ_ELEM_INT32, + 2, + 1), /* DUK_BUFOBJ_INT32ARRAY */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_UINT32ARRAY, + DUK_BIDX_UINT32ARRAY_PROTOTYPE, + DUK_HBUFOBJ_ELEM_UINT32, + 2, + 1), /* DUK_BUFOBJ_UINT32ARRAY */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_FLOAT32ARRAY, + DUK_BIDX_FLOAT32ARRAY_PROTOTYPE, + DUK_HBUFOBJ_ELEM_FLOAT32, + 2, + 1), /* DUK_BUFOBJ_FLOAT32ARRAY */ + DUK__PACK_ARGS(DUK_HOBJECT_CLASS_FLOAT64ARRAY, + DUK_BIDX_FLOAT64ARRAY_PROTOTYPE, + DUK_HBUFOBJ_ELEM_FLOAT64, + 3, + 1) /* DUK_BUFOBJ_FLOAT64ARRAY */ +}; +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_EXTERNAL void duk_push_buffer_object(duk_hthread *thr, + duk_idx_t idx_buffer, + duk_size_t byte_offset, + duk_size_t byte_length, + duk_uint_t flags) { + duk_hbufobj *h_bufobj; + duk_hbuffer *h_val; + duk_hobject *h_arraybuf; + duk_uint32_t tmp; + duk_uint_t classnum; + duk_uint_t protobidx; + duk_uint_t lookupidx; + duk_uint_t uint_offset, uint_length, uint_added; + + DUK_ASSERT_API_ENTRY(thr); + + /* The underlying types for offset/length in duk_hbufobj is + * duk_uint_t; make sure argument values fit. + */ + uint_offset = (duk_uint_t) byte_offset; + uint_length = (duk_uint_t) byte_length; + if (sizeof(duk_size_t) != sizeof(duk_uint_t)) { + if (DUK_UNLIKELY((duk_size_t) uint_offset != byte_offset || (duk_size_t) uint_length != byte_length)) { + goto range_error; + } + } + + DUK_ASSERT_DISABLE(flags >= 0); /* flags is unsigned */ + lookupidx = flags; + if (DUK_UNLIKELY(lookupidx >= sizeof(duk__bufobj_flags_lookup) / sizeof(duk_uint32_t))) { + goto arg_error; + } + tmp = duk__bufobj_flags_lookup[lookupidx]; + classnum = tmp >> 24; + protobidx = (tmp >> 16) & 0xff; + + h_arraybuf = duk_get_hobject(thr, idx_buffer); + if (h_arraybuf != NULL && /* argument is an object */ + flags != DUK_BUFOBJ_ARRAYBUFFER && /* creating a view */ + DUK_HOBJECT_GET_CLASS_NUMBER(h_arraybuf) == DUK_HOBJECT_CLASS_ARRAYBUFFER /* argument is ArrayBuffer */) { + duk_uint_t tmp_offset; + + DUK_HBUFOBJ_ASSERT_VALID((duk_hbufobj *) h_arraybuf); + h_val = ((duk_hbufobj *) h_arraybuf)->buf; + if (DUK_UNLIKELY(h_val == NULL)) { + goto arg_error; + } + + tmp_offset = uint_offset + ((duk_hbufobj *) h_arraybuf)->offset; + if (DUK_UNLIKELY(tmp_offset < uint_offset)) { + goto range_error; + } + uint_offset = tmp_offset; + + /* Note intentional difference to new TypedArray(): we allow + * caller to create an uncovered typed array (which is memory + * safe); new TypedArray() rejects it. + */ + } else { + /* Handle unexpected object arguments here too, for nice error + * messages. + */ + h_arraybuf = NULL; + h_val = duk_require_hbuffer(thr, idx_buffer); + } + + /* Wrap check for offset+length. */ + uint_added = uint_offset + uint_length; + if (DUK_UNLIKELY(uint_added < uint_offset)) { + goto range_error; + } + DUK_ASSERT(uint_added >= uint_offset && uint_added >= uint_length); + + DUK_ASSERT(h_val != NULL); + + h_bufobj = duk_push_bufobj_raw(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_BUFOBJ | DUK_HOBJECT_CLASS_AS_FLAGS(classnum), + (duk_small_int_t) protobidx); + DUK_ASSERT(h_bufobj != NULL); + + h_bufobj->buf = h_val; + DUK_HBUFFER_INCREF(thr, h_val); + h_bufobj->buf_prop = h_arraybuf; + DUK_HOBJECT_INCREF_ALLOWNULL(thr, h_arraybuf); + h_bufobj->offset = uint_offset; + h_bufobj->length = uint_length; + h_bufobj->shift = (tmp >> 4) & 0x0f; + h_bufobj->elem_type = (tmp >> 8) & 0xff; + h_bufobj->is_typedarray = tmp & 0x0f; + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + + /* TypedArray views need an automatic ArrayBuffer which must be + * provided as .buffer property of the view. The ArrayBuffer is + * referenced via duk_hbufobj->buf_prop and an inherited .buffer + * accessor returns it. The ArrayBuffer is created lazily on first + * access if necessary so we don't need to do anything more here. + */ + return; + +range_error: + DUK_ERROR_RANGE(thr, DUK_STR_INVALID_ARGS); + DUK_WO_NORETURN(return;); + +arg_error: + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_ARGS); + DUK_WO_NORETURN(return;); +} +#else /* DUK_USE_BUFFEROBJECT_SUPPORT */ +DUK_EXTERNAL void duk_push_buffer_object(duk_hthread *thr, + duk_idx_t idx_buffer, + duk_size_t byte_offset, + duk_size_t byte_length, + duk_uint_t flags) { + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(idx_buffer); + DUK_UNREF(byte_offset); + DUK_UNREF(byte_length); + DUK_UNREF(flags); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return;); +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +DUK_EXTERNAL duk_idx_t duk_push_error_object_va_raw(duk_hthread *thr, + duk_errcode_t err_code, + const char *filename, + duk_int_t line, + const char *fmt, + va_list ap) { + duk_hobject *proto; +#if defined(DUK_USE_AUGMENT_ERROR_CREATE) + duk_small_uint_t augment_flags; +#endif + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr != NULL); + DUK_UNREF(filename); + DUK_UNREF(line); + + /* Error code also packs a tracedata related flag. */ +#if defined(DUK_USE_AUGMENT_ERROR_CREATE) + augment_flags = 0; + if (err_code & DUK_ERRCODE_FLAG_NOBLAME_FILELINE) { + augment_flags = DUK_AUGMENT_FLAG_NOBLAME_FILELINE; + } +#endif + err_code = err_code & (~DUK_ERRCODE_FLAG_NOBLAME_FILELINE); + + /* error gets its 'name' from the prototype */ + proto = duk_error_prototype_from_code(thr, err_code); + (void) duk_push_object_helper_proto(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_ERROR), + proto); + + /* ... and its 'message' from an instance property */ + if (fmt) { + duk_push_vsprintf(thr, fmt, ap); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_MESSAGE, DUK_PROPDESC_FLAGS_WC); + } else { + /* If no explicit message given, put error code into message field + * (as a number). This is not fully in keeping with the ECMAScript + * error model because messages are supposed to be strings (Error + * constructors use ToString() on their argument). However, it's + * probably more useful than having a separate 'code' property. + */ + duk_push_int(thr, err_code); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_MESSAGE, DUK_PROPDESC_FLAGS_WC); + } + + /* XXX: .code = err_code disabled, not sure if useful */ + + /* Creation time error augmentation */ +#if defined(DUK_USE_AUGMENT_ERROR_CREATE) + /* filename may be NULL in which case file/line is not recorded */ + duk_err_augment_error_create(thr, thr, filename, line, augment_flags); /* may throw an error */ +#endif + + return duk_get_top_index_unsafe(thr); +} + +DUK_EXTERNAL duk_idx_t +duk_push_error_object_raw(duk_hthread *thr, duk_errcode_t err_code, const char *filename, duk_int_t line, const char *fmt, ...) { + va_list ap; + duk_idx_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + va_start(ap, fmt); + ret = duk_push_error_object_va_raw(thr, err_code, filename, line, fmt, ap); + va_end(ap); + return ret; +} + +#if !defined(DUK_USE_VARIADIC_MACROS) +DUK_EXTERNAL duk_idx_t duk_push_error_object_stash(duk_hthread *thr, duk_errcode_t err_code, const char *fmt, ...) { + const char *filename = duk_api_global_filename; + duk_int_t line = duk_api_global_line; + va_list ap; + duk_idx_t ret; + + DUK_ASSERT_API_ENTRY(thr); + + duk_api_global_filename = NULL; + duk_api_global_line = 0; + va_start(ap, fmt); + ret = duk_push_error_object_va_raw(thr, err_code, filename, line, fmt, ap); + va_end(ap); + return ret; +} +#endif /* DUK_USE_VARIADIC_MACROS */ + +DUK_EXTERNAL void *duk_push_buffer_raw(duk_hthread *thr, duk_size_t size, duk_small_uint_t flags) { + duk_tval *tv_slot; + duk_hbuffer *h; + void *buf_data; + + DUK_ASSERT_API_ENTRY(thr); + + DUK__CHECK_SPACE(); + + /* Check for maximum buffer length. */ + if (DUK_UNLIKELY(size > DUK_HBUFFER_MAX_BYTELEN)) { + DUK_ERROR_RANGE(thr, DUK_STR_BUFFER_TOO_LONG); + DUK_WO_NORETURN(return NULL;); + } + + h = duk_hbuffer_alloc(thr->heap, size, flags, &buf_data); + if (DUK_UNLIKELY(h == NULL)) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return NULL;); + } + + tv_slot = thr->valstack_top; + DUK_TVAL_SET_BUFFER(tv_slot, h); + DUK_HBUFFER_INCREF(thr, h); + thr->valstack_top++; + + return (void *) buf_data; +} + +DUK_INTERNAL void *duk_push_fixed_buffer_nozero(duk_hthread *thr, duk_size_t len) { + DUK_ASSERT_API_ENTRY(thr); + return duk_push_buffer_raw(thr, len, DUK_BUF_FLAG_NOZERO); +} + +DUK_INTERNAL void *duk_push_fixed_buffer_zero(duk_hthread *thr, duk_size_t len) { + void *ptr; + + DUK_ASSERT_API_ENTRY(thr); + + ptr = duk_push_buffer_raw(thr, len, 0); + DUK_ASSERT(ptr != NULL); +#if !defined(DUK_USE_ZERO_BUFFER_DATA) + /* ES2015 requires zeroing even when DUK_USE_ZERO_BUFFER_DATA + * is not set. + */ + duk_memzero((void *) ptr, (size_t) len); +#endif + return ptr; +} + +#if defined(DUK_USE_ES6_PROXY) +DUK_EXTERNAL duk_idx_t duk_push_proxy(duk_hthread *thr, duk_uint_t proxy_flags) { + duk_hobject *h_target; + duk_hobject *h_handler; + duk_hproxy *h_proxy; + duk_tval *tv_slot; + duk_uint_t flags; + + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(proxy_flags); + + /* DUK__CHECK_SPACE() unnecessary because the Proxy is written to + * value stack in-place. + */ +#if 0 + DUK__CHECK_SPACE(); +#endif + + /* Reject a proxy object as the target because it would need + * special handling in property lookups. (ES2015 has no such + * restriction.) + */ + h_target = duk_require_hobject_promote_mask(thr, -2, DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + DUK_ASSERT(h_target != NULL); + if (DUK_HOBJECT_IS_PROXY(h_target)) { + goto fail_args; + } + + /* Reject a proxy object as the handler because it would cause + * potentially unbounded recursion. (ES2015 has no such + * restriction.) + * + * There's little practical reason to use a lightfunc or a plain + * buffer as the handler table: one could only provide traps via + * their prototype objects (Function.prototype and ArrayBuffer.prototype). + * Even so, as lightfuncs and plain buffers mimic their object + * counterparts, they're promoted and accepted here. + */ + h_handler = duk_require_hobject_promote_mask(thr, -1, DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + DUK_ASSERT(h_handler != NULL); + if (DUK_HOBJECT_IS_PROXY(h_handler)) { + goto fail_args; + } + + /* XXX: Proxy object currently has no prototype, so ToPrimitive() + * coercion fails which is a bit confusing. + */ + + /* CALLABLE and CONSTRUCTABLE flags are copied from the (initial) + * target, see ES2015 Sections 9.5.15 and 9.5.13. + */ + flags = DUK_HEAPHDR_GET_FLAGS((duk_heaphdr *) h_target) & (DUK_HOBJECT_FLAG_CALLABLE | DUK_HOBJECT_FLAG_CONSTRUCTABLE); + flags |= DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_EXOTIC_PROXYOBJ; + if (flags & DUK_HOBJECT_FLAG_CALLABLE) { + flags |= DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_FUNCTION) | DUK_HOBJECT_FLAG_SPECIAL_CALL; + } else { + flags |= DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJECT); + } + + h_proxy = duk_hproxy_alloc(thr, flags); + DUK_ASSERT(h_proxy != NULL); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) h_proxy) == NULL); + + /* Initialize Proxy target and handler references; avoid INCREF + * by stealing the value stack refcounts via direct value stack + * manipulation. INCREF is needed for the Proxy itself however. + */ + DUK_ASSERT(h_target != NULL); + h_proxy->target = h_target; + DUK_ASSERT(h_handler != NULL); + h_proxy->handler = h_handler; + DUK_HPROXY_ASSERT_VALID(h_proxy); + + DUK_ASSERT(duk_get_hobject(thr, -2) == h_target); + DUK_ASSERT(duk_get_hobject(thr, -1) == h_handler); + tv_slot = thr->valstack_top - 2; + DUK_ASSERT(tv_slot >= thr->valstack_bottom); + DUK_TVAL_SET_OBJECT(tv_slot, (duk_hobject *) h_proxy); + DUK_HOBJECT_INCREF(thr, (duk_hobject *) h_proxy); + tv_slot++; + DUK_TVAL_SET_UNDEFINED(tv_slot); /* [ ... target handler ] -> [ ... proxy undefined ] */ + thr->valstack_top = tv_slot; /* -> [ ... proxy ] */ + + DUK_DD(DUK_DDPRINT("created Proxy: %!iT", duk_get_tval(thr, -1))); + + return (duk_idx_t) (thr->valstack_top - thr->valstack_bottom - 1); + +fail_args: + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return 0;); +} +#else /* DUK_USE_ES6_PROXY */ +DUK_EXTERNAL duk_idx_t duk_push_proxy(duk_hthread *thr, duk_uint_t proxy_flags) { + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(proxy_flags); + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return 0;); +} +#endif /* DUK_USE_ES6_PROXY */ + +#if defined(DUK_USE_ASSERTIONS) +DUK_LOCAL void duk__validate_push_heapptr(duk_hthread *thr, void *ptr) { + duk_heaphdr *h; + duk_heaphdr *curr; + duk_bool_t found = 0; + + h = (duk_heaphdr *) ptr; + if (h == NULL) { + /* Allowed. */ + return; + } + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(h)); + + /* One particular problem case is where an object has been + * queued for finalization but the finalizer hasn't yet been + * executed. + * + * Corner case: we're running in a finalizer for object X, and + * user code calls duk_push_heapptr() for X itself. In this + * case X will be in finalize_list, and we can detect the case + * by seeing that X's FINALIZED flag is set (which is done before + * the finalizer starts executing). + */ +#if defined(DUK_USE_FINALIZER_SUPPORT) + for (curr = thr->heap->finalize_list; curr != NULL; curr = DUK_HEAPHDR_GET_NEXT(thr->heap, curr)) { + /* FINALIZABLE is set for all objects on finalize_list + * except for an object being finalized right now. So + * can't assert here. + */ +#if 0 + DUK_ASSERT(DUK_HEAPHDR_HAS_FINALIZABLE(curr)); +#endif + + if (curr == h) { + if (DUK_HEAPHDR_HAS_FINALIZED((duk_heaphdr *) h)) { + /* Object is currently being finalized. */ + DUK_ASSERT(found == 0); /* Would indicate corrupted lists. */ + found = 1; + } else { + /* Not being finalized but on finalize_list, + * allowed since Duktape 2.1. + */ + DUK_ASSERT(found == 0); /* Would indicate corrupted lists. */ + found = 1; + } + } + } +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +#if defined(DUK_USE_REFERENCE_COUNTING) + /* Because refzero_list is now processed to completion inline with + * no side effects, it's always empty here. + */ + DUK_ASSERT(thr->heap->refzero_list == NULL); +#endif + + /* If not present in finalize_list (or refzero_list), it + * must be either in heap_allocated or the string table. + */ + if (DUK_HEAPHDR_IS_STRING(h)) { + duk_uint32_t i; + duk_hstring *str; + duk_heap *heap = thr->heap; + + DUK_ASSERT(found == 0); + for (i = 0; i < heap->st_size; i++) { +#if defined(DUK_USE_STRTAB_PTRCOMP) + str = DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, heap->strtable16[i]); +#else + str = heap->strtable[i]; +#endif + while (str != NULL) { + if (str == (duk_hstring *) h) { + DUK_ASSERT(found == 0); /* Would indicate corrupted lists. */ + found = 1; + break; + } + str = str->hdr.h_next; + } + } + DUK_ASSERT(found != 0); + } else { + for (curr = thr->heap->heap_allocated; curr != NULL; curr = DUK_HEAPHDR_GET_NEXT(thr->heap, curr)) { + if (curr == h) { + DUK_ASSERT(found == 0); /* Would indicate corrupted lists. */ + found = 1; + } + } + DUK_ASSERT(found != 0); + } +} +#endif /* DUK_USE_ASSERTIONS */ + +DUK_EXTERNAL duk_idx_t duk_push_heapptr(duk_hthread *thr, void *ptr) { + duk_idx_t ret; + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + /* Reviving an object using a heap pointer is a dangerous API + * operation: if the application doesn't guarantee that the + * pointer target is always reachable, difficult-to-diagnose + * problems may ensue. Try to validate the 'ptr' argument to + * the extent possible. + */ + +#if defined(DUK_USE_ASSERTIONS) + duk__validate_push_heapptr(thr, ptr); +#endif + + DUK__CHECK_SPACE(); + + ret = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom); + tv = thr->valstack_top++; + + if (ptr == NULL) { + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(tv)); + return ret; + } + + DUK_HEAPHDR_ASSERT_VALID((duk_heaphdr *) ptr); + + /* If the argument is on finalize_list it has technically been + * unreachable before duk_push_heapptr() but it's still safe to + * push it. Starting from Duktape 2.1 allow application code to + * do so. There are two main cases: + * + * (1) The object is on the finalize_list and we're called by + * the finalizer for the object being finalized. In this + * case do nothing: finalize_list handling will deal with + * the object queueing. This is detected by the object not + * having a FINALIZABLE flag despite being on the finalize_list; + * the flag is cleared for the object being finalized only. + * + * (2) The object is on the finalize_list but is not currently + * being processed. In this case the object can be queued + * back to heap_allocated with a few flags cleared, in effect + * cancelling the finalizer. + */ + if (DUK_UNLIKELY(DUK_HEAPHDR_HAS_FINALIZABLE((duk_heaphdr *) ptr))) { + duk_heaphdr *curr; + + DUK_D(DUK_DPRINT("duk_push_heapptr() with a pointer on finalize_list, autorescue")); + + curr = (duk_heaphdr *) ptr; + DUK_HEAPHDR_CLEAR_FINALIZABLE(curr); + + /* Because FINALIZED is set prior to finalizer call, it will + * be set for the object being currently finalized, but not + * for other objects on finalize_list. + */ + DUK_HEAPHDR_CLEAR_FINALIZED(curr); + + /* Dequeue object from finalize_list and queue it back to + * heap_allocated. + */ +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(curr) >= 1); /* Preincremented on finalize_list insert. */ + DUK_HEAPHDR_PREDEC_REFCOUNT(curr); +#endif + DUK_HEAP_REMOVE_FROM_FINALIZE_LIST(thr->heap, curr); + DUK_HEAP_INSERT_INTO_HEAP_ALLOCATED(thr->heap, curr); + + /* Continue with the rest. */ + } + + switch (DUK_HEAPHDR_GET_TYPE((duk_heaphdr *) ptr)) { + case DUK_HTYPE_STRING: + DUK_TVAL_SET_STRING(tv, (duk_hstring *) ptr); + break; + case DUK_HTYPE_OBJECT: + DUK_TVAL_SET_OBJECT(tv, (duk_hobject *) ptr); + break; + default: + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE((duk_heaphdr *) ptr) == DUK_HTYPE_BUFFER); + DUK_TVAL_SET_BUFFER(tv, (duk_hbuffer *) ptr); + break; + } + + DUK_HEAPHDR_INCREF(thr, (duk_heaphdr *) ptr); + + return ret; +} + +/* Push object with no prototype, i.e. a "bare" object. */ +DUK_EXTERNAL duk_idx_t duk_push_bare_object(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + (void) duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJECT), + -1); /* no prototype */ + return duk_get_top_index_unsafe(thr); +} + +DUK_INTERNAL void duk_push_hstring(duk_hthread *thr, duk_hstring *h) { + duk_tval tv; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(h != NULL); + + DUK_TVAL_SET_STRING(&tv, h); + duk_push_tval(thr, &tv); +} + +DUK_INTERNAL void duk_push_hstring_stridx(duk_hthread *thr, duk_small_uint_t stridx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT_STRIDX_VALID(stridx); + duk_push_hstring(thr, DUK_HTHREAD_GET_STRING(thr, stridx)); +} + +DUK_INTERNAL void duk_push_hstring_empty(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_push_hstring(thr, DUK_HTHREAD_GET_STRING(thr, DUK_STRIDX_EMPTY_STRING)); +} + +DUK_INTERNAL void duk_push_hobject(duk_hthread *thr, duk_hobject *h) { + duk_tval tv; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(h != NULL); + + DUK_TVAL_SET_OBJECT(&tv, h); + duk_push_tval(thr, &tv); +} + +DUK_INTERNAL void duk_push_hbuffer(duk_hthread *thr, duk_hbuffer *h) { + duk_tval tv; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(h != NULL); + + DUK_TVAL_SET_BUFFER(&tv, h); + duk_push_tval(thr, &tv); +} + +DUK_INTERNAL void duk_push_hobject_bidx(duk_hthread *thr, duk_small_int_t builtin_idx) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(builtin_idx >= 0 && builtin_idx < DUK_NUM_BUILTINS); + DUK_ASSERT(thr->builtins[builtin_idx] != NULL); + + duk_push_hobject(thr, thr->builtins[builtin_idx]); +} + +/* + * Poppers + */ + +DUK_LOCAL DUK_ALWAYS_INLINE void duk__pop_n_unsafe_raw(duk_hthread *thr, duk_idx_t count) { + duk_tval *tv; +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_tval *tv_end; +#endif + + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(count >= 0); + DUK_ASSERT((duk_size_t) (thr->valstack_top - thr->valstack_bottom) >= (duk_size_t) count); + +#if defined(DUK_USE_REFERENCE_COUNTING) + tv = thr->valstack_top; + tv_end = tv - count; + while (tv != tv_end) { + tv--; + DUK_ASSERT(tv >= thr->valstack_bottom); + DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ(thr, tv); + } + thr->valstack_top = tv; + DUK_REFZERO_CHECK_FAST(thr); +#else + tv = thr->valstack_top; + while (count > 0) { + count--; + tv--; + DUK_ASSERT(tv >= thr->valstack_bottom); + DUK_TVAL_SET_UNDEFINED(tv); + } + thr->valstack_top = tv; +#endif + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); +} + +DUK_EXTERNAL void duk_pop_n(duk_hthread *thr, duk_idx_t count) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + + if (DUK_UNLIKELY((duk_uidx_t) (thr->valstack_top - thr->valstack_bottom) < (duk_uidx_t) count)) { + DUK_ERROR_RANGE_INVALID_COUNT(thr); + DUK_WO_NORETURN(return;); + } + DUK_ASSERT(count >= 0); + + duk__pop_n_unsafe_raw(thr, count); +} + +#if defined(DUK_USE_PREFER_SIZE) +DUK_INTERNAL void duk_pop_n_unsafe(duk_hthread *thr, duk_idx_t count) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n(thr, count); +} +#else /* DUK_USE_PREFER_SIZE */ +DUK_INTERNAL void duk_pop_n_unsafe(duk_hthread *thr, duk_idx_t count) { + DUK_ASSERT_API_ENTRY(thr); + duk__pop_n_unsafe_raw(thr, count); +} +#endif /* DUK_USE_PREFER_SIZE */ + +/* Pop N elements without DECREF (in effect "stealing" any actual refcounts). */ +#if defined(DUK_USE_REFERENCE_COUNTING) +DUK_INTERNAL void duk_pop_n_nodecref_unsafe(duk_hthread *thr, duk_idx_t count) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(count >= 0); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT((duk_size_t) (thr->valstack_top - thr->valstack_bottom) >= (duk_size_t) count); + + tv = thr->valstack_top; + while (count > 0) { + count--; + tv--; + DUK_ASSERT(tv >= thr->valstack_bottom); + DUK_TVAL_SET_UNDEFINED(tv); + } + thr->valstack_top = tv; + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); +} +#else /* DUK_USE_REFERENCE_COUNTING */ +DUK_INTERNAL void duk_pop_n_nodecref_unsafe(duk_hthread *thr, duk_idx_t count) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n_unsafe(thr, count); +} +#endif /* DUK_USE_REFERENCE_COUNTING */ + +/* Popping one element is called so often that when footprint is not an issue, + * compile a specialized function for it. + */ +#if defined(DUK_USE_PREFER_SIZE) +DUK_EXTERNAL void duk_pop(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n(thr, 1); +} +DUK_INTERNAL void duk_pop_unsafe(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n_unsafe(thr, 1); +} +DUK_INTERNAL void duk_pop_nodecref_unsafe(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n_nodecref_unsafe(thr, 1); +} +#else /* DUK_USE_PREFER_SIZE */ +DUK_LOCAL DUK_ALWAYS_INLINE void duk__pop_unsafe_raw(duk_hthread *thr) { + duk_tval *tv; + + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(thr->valstack_top != thr->valstack_bottom); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT((duk_size_t) (thr->valstack_top - thr->valstack_bottom) >= (duk_size_t) 1); + + tv = --thr->valstack_top; + DUK_ASSERT(tv >= thr->valstack_bottom); +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_TVAL_SET_UNDEFINED_UPDREF(thr, tv); /* side effects */ +#else + DUK_TVAL_SET_UNDEFINED(tv); +#endif + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); +} +DUK_EXTERNAL void duk_pop(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + if (DUK_UNLIKELY(thr->valstack_top == thr->valstack_bottom)) { + DUK_ERROR_RANGE_INVALID_COUNT(thr); + DUK_WO_NORETURN(return;); + } + + duk__pop_unsafe_raw(thr); +} +DUK_INTERNAL void duk_pop_unsafe(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk__pop_unsafe_raw(thr); +} +DUK_INTERNAL void duk_pop_nodecref_unsafe(duk_hthread *thr) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->valstack_top != thr->valstack_bottom); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT((duk_size_t) (thr->valstack_top - thr->valstack_bottom) >= (duk_size_t) 1); + + tv = --thr->valstack_top; + DUK_ASSERT(tv >= thr->valstack_bottom); + DUK_TVAL_SET_UNDEFINED(tv); + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); +} +#endif /* !DUK_USE_PREFER_SIZE */ + +#if defined(DUK_USE_PREFER_SIZE) +DUK_INTERNAL void duk_pop_undefined(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_nodecref_unsafe(thr); +} +#else /* DUK_USE_PREFER_SIZE */ +DUK_INTERNAL void duk_pop_undefined(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->valstack_top != thr->valstack_bottom); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT((duk_size_t) (thr->valstack_top - thr->valstack_bottom) >= (duk_size_t) 1); + + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top - 1)); + thr->valstack_top--; + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); +} +#endif /* !DUK_USE_PREFER_SIZE */ + +#if defined(DUK_USE_PREFER_SIZE) +DUK_EXTERNAL void duk_pop_2(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n(thr, 2); +} +DUK_INTERNAL void duk_pop_2_unsafe(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n_unsafe(thr, 2); +} +DUK_INTERNAL void duk_pop_2_nodecref_unsafe(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n_nodecref_unsafe(thr, 2); +} +#else +DUK_LOCAL DUK_ALWAYS_INLINE void duk__pop_2_unsafe_raw(duk_hthread *thr) { + duk_tval *tv; + + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(thr->valstack_top != thr->valstack_bottom); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT((duk_size_t) (thr->valstack_top - thr->valstack_bottom) >= (duk_size_t) 2); + + tv = --thr->valstack_top; + DUK_ASSERT(tv >= thr->valstack_bottom); +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_TVAL_SET_UNDEFINED_UPDREF(thr, tv); /* side effects */ +#else + DUK_TVAL_SET_UNDEFINED(tv); +#endif + tv = --thr->valstack_top; + DUK_ASSERT(tv >= thr->valstack_bottom); +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_TVAL_SET_UNDEFINED_UPDREF(thr, tv); /* side effects */ +#else + DUK_TVAL_SET_UNDEFINED(tv); +#endif + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); +} +DUK_EXTERNAL void duk_pop_2(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + if (DUK_UNLIKELY(thr->valstack_top - 2 < thr->valstack_bottom)) { + DUK_ERROR_RANGE_INVALID_COUNT(thr); + DUK_WO_NORETURN(return;); + } + + duk__pop_2_unsafe_raw(thr); +} +DUK_INTERNAL void duk_pop_2_unsafe(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk__pop_2_unsafe_raw(thr); +} +DUK_INTERNAL void duk_pop_2_nodecref_unsafe(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->valstack_top != thr->valstack_bottom); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT((duk_size_t) (thr->valstack_top - thr->valstack_bottom) >= (duk_size_t) 2); + + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top - 1)); + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top - 2)); + thr->valstack_top -= 2; + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); +} +#endif /* !DUK_USE_PREFER_SIZE */ + +DUK_EXTERNAL void duk_pop_3(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n(thr, 3); +} + +DUK_INTERNAL void duk_pop_3_unsafe(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n_unsafe(thr, 3); +} + +DUK_INTERNAL void duk_pop_3_nodecref_unsafe(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_pop_n_nodecref_unsafe(thr, 3); +} + +/* + * Pack and unpack (pack value stack entries into an array and vice versa) + */ + +/* XXX: pack index range? array index offset? */ +/* XXX: need ability to pack into a bare array? */ +DUK_INTERNAL void duk_pack(duk_hthread *thr, duk_idx_t count) { + duk_tval *tv_src; + duk_tval *tv_dst; + duk_tval *tv_curr; + duk_tval *tv_limit; + duk_idx_t top; + + DUK_ASSERT_API_ENTRY(thr); + + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + top = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom); + DUK_ASSERT(top >= 0); + if (DUK_UNLIKELY((duk_uidx_t) count > (duk_uidx_t) top)) { + /* Also handles negative count. */ + DUK_ERROR_RANGE_INVALID_COUNT(thr); + DUK_WO_NORETURN(return;); + } + DUK_ASSERT(count >= 0); + + /* Wrapping is controlled by the check above: value stack top can be + * at most DUK_USE_VALSTACK_LIMIT which is low enough so that + * multiplying with sizeof(duk_tval) won't wrap. + */ + DUK_ASSERT(count >= 0 && count <= (duk_idx_t) DUK_USE_VALSTACK_LIMIT); + DUK_ASSERT((duk_size_t) count <= DUK_SIZE_MAX / sizeof(duk_tval)); /* no wrapping */ + + tv_dst = duk_push_harray_with_size_outptr(thr, (duk_uint32_t) count); /* XXX: uninitialized would be OK */ + DUK_ASSERT(count == 0 || tv_dst != NULL); + DUK_ASSERT(!duk_is_bare_object(thr, -1)); + + /* Copy value stack values directly to the array part without + * any refcount updates: net refcount changes are zero. + */ + tv_src = thr->valstack_top - count - 1; + duk_memcpy_unsafe((void *) tv_dst, (const void *) tv_src, (size_t) count * sizeof(duk_tval)); + + /* Overwrite result array to final value stack location and wipe + * the rest; no refcount operations needed. + */ + + tv_dst = tv_src; /* when count == 0, same as tv_src (OK) */ + tv_src = thr->valstack_top - 1; + DUK_TVAL_SET_TVAL(tv_dst, tv_src); + + /* XXX: internal helper to wipe a value stack segment? */ + tv_curr = tv_dst + 1; + tv_limit = thr->valstack_top; + while (tv_curr != tv_limit) { + /* Wipe policy: keep as 'undefined'. */ + DUK_TVAL_SET_UNDEFINED(tv_curr); + tv_curr++; + } + thr->valstack_top = tv_dst + 1; +} + +DUK_INTERNAL duk_idx_t duk_unpack_array_like(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + + tv = duk_require_tval(thr, idx); + if (DUK_LIKELY(DUK_TVAL_IS_OBJECT(tv))) { + duk_hobject *h; + duk_uint32_t len; + duk_uint32_t i; + + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + DUK_UNREF(h); + +#if defined(DUK_USE_ARRAY_FASTPATH) /* close enough */ + if (DUK_LIKELY(DUK_HOBJECT_IS_ARRAY(h) && ((duk_harray *) h)->length <= DUK_HOBJECT_GET_ASIZE(h))) { + duk_harray *h_arr; + duk_tval *tv_src; + duk_tval *tv_dst; + + h_arr = (duk_harray *) h; + len = h_arr->length; + if (DUK_UNLIKELY(len >= 0x80000000UL)) { + goto fail_over_2g; + } + duk_require_stack(thr, (duk_idx_t) len); + + /* The potential allocation in duk_require_stack() may + * run a finalizer which modifies the argArray so that + * e.g. becomes sparse. So, we need to recheck that the + * array didn't change size and that there's still a + * valid backing array part. + * + * XXX: alternatively, could prevent finalizers for the + * duration. + */ + if (DUK_UNLIKELY(len != h_arr->length || h_arr->length > DUK_HOBJECT_GET_ASIZE((duk_hobject *) h_arr))) { + goto skip_fast; + } + + /* Main fast path: arguments array is almost always + * an actual array (though it might also be an arguments + * object). + */ + + DUK_DDD(DUK_DDDPRINT("fast path for %ld elements", (long) h_arr->length)); + tv_src = DUK_HOBJECT_A_GET_BASE(thr->heap, h); + tv_dst = thr->valstack_top; + while (len-- > 0) { + DUK_ASSERT(tv_dst < thr->valstack_end); + if (DUK_UNLIKELY(DUK_TVAL_IS_UNUSED(tv_src))) { + /* Gaps are very unlikely. Skip over them, + * without an ancestor lookup (technically + * not compliant). + */ + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(tv_dst)); /* valstack policy */ + } else { + DUK_TVAL_SET_TVAL(tv_dst, tv_src); + DUK_TVAL_INCREF(thr, tv_dst); + } + tv_src++; + tv_dst++; + } + DUK_ASSERT(tv_dst <= thr->valstack_end); + thr->valstack_top = tv_dst; + return (duk_idx_t) h_arr->length; + } + skip_fast: +#endif /* DUK_USE_ARRAY_FASTPATH */ + + /* Slow path: actual lookups. The initial 'length' lookup + * decides the output length, regardless of side effects that + * may resize or change the argArray while we read the + * indices. + */ + idx = duk_normalize_index(thr, idx); + duk_get_prop_stridx(thr, idx, DUK_STRIDX_LENGTH); + len = duk_to_uint32(thr, -1); /* ToUint32() coercion required */ + if (DUK_UNLIKELY(len >= 0x80000000UL)) { + goto fail_over_2g; + } + duk_pop_unsafe(thr); + DUK_DDD(DUK_DDDPRINT("slow path for %ld elements", (long) len)); + + duk_require_stack(thr, (duk_idx_t) len); + for (i = 0; i < len; i++) { + duk_get_prop_index(thr, idx, (duk_uarridx_t) i); + } + return (duk_idx_t) len; + } else if (DUK_TVAL_IS_UNDEFINED(tv) || DUK_TVAL_IS_NULL(tv)) { + return 0; + } + + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return 0;); + +fail_over_2g: + DUK_ERROR_RANGE_INVALID_LENGTH(thr); + DUK_WO_NORETURN(return 0;); +} + +/* + * Error throwing + */ + +#if defined(DUK_USE_GCC_PRAGMAS) +#pragma GCC diagnostic push +#pragma GCC diagnostic ignored "-Wsuggest-attribute=noreturn" +#elif defined(DUK_USE_CLANG_PRAGMAS) +#pragma clang diagnostic push +#endif + +DUK_EXTERNAL void duk_throw_raw(duk_hthread *thr) { + duk_tval *tv_val; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr->valstack_bottom >= thr->valstack); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT(thr->valstack_end >= thr->valstack_top); + + if (DUK_UNLIKELY(thr->valstack_top == thr->valstack_bottom)) { + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return;); + } + + /* Errors are augmented when they are created, not when they are + * thrown or re-thrown. The current error handler, however, runs + * just before an error is thrown. + */ + + /* Sync so that augmentation sees up-to-date activations, NULL + * thr->ptr_curr_pc so that it's not used if side effects occur + * in augmentation or longjmp handling. + */ + duk_hthread_sync_and_null_currpc(thr); + +#if defined(DUK_USE_AUGMENT_ERROR_THROW) + DUK_DDD(DUK_DDDPRINT("THROW ERROR (API): %!dT (before throw augment)", (duk_tval *) duk_get_tval(thr, -1))); + duk_err_augment_error_throw(thr); +#endif + DUK_DDD(DUK_DDDPRINT("THROW ERROR (API): %!dT (after throw augment)", (duk_tval *) duk_get_tval(thr, -1))); + + tv_val = DUK_GET_TVAL_NEGIDX(thr, -1); + duk_err_setup_ljstate1(thr, DUK_LJ_TYPE_THROW, tv_val); +#if defined(DUK_USE_DEBUGGER_SUPPORT) + duk_err_check_debugger_integration(thr); +#endif + + /* thr->heap->lj.jmpbuf_ptr is checked by duk_err_longjmp() so we don't + * need to check that here. If the value is NULL, a fatal error occurs + * because we can't return. + */ + + duk_err_longjmp(thr); + DUK_UNREACHABLE(); +} + +DUK_EXTERNAL void duk_fatal_raw(duk_hthread *thr, const char *err_msg) { + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(thr->heap->fatal_func != NULL); + + DUK_D(DUK_DPRINT("fatal error occurred: %s", err_msg ? err_msg : "NULL")); + + /* fatal_func should be noreturn, but noreturn declarations on function + * pointers has a very spotty support apparently so it's not currently + * done. + */ + thr->heap->fatal_func(thr->heap->heap_udata, err_msg); + + /* If the fatal handler returns, all bets are off. It'd be nice to + * print something here but since we don't want to depend on stdio, + * there's no way to do so portably. + */ + DUK_D(DUK_DPRINT("fatal error handler returned, all bets are off!")); + for (;;) { + /* loop forever, don't return (function marked noreturn) */ + } +} + +DUK_EXTERNAL void duk_error_va_raw(duk_hthread *thr, + duk_errcode_t err_code, + const char *filename, + duk_int_t line, + const char *fmt, + va_list ap) { + DUK_ASSERT_API_ENTRY(thr); + + duk_push_error_object_va_raw(thr, err_code, filename, line, fmt, ap); + (void) duk_throw(thr); + DUK_WO_NORETURN(return;); +} + +DUK_EXTERNAL void duk_error_raw(duk_hthread *thr, + duk_errcode_t err_code, + const char *filename, + duk_int_t line, + const char *fmt, + ...) { + va_list ap; + + DUK_ASSERT_API_ENTRY(thr); + + va_start(ap, fmt); + duk_push_error_object_va_raw(thr, err_code, filename, line, fmt, ap); + va_end(ap); + (void) duk_throw(thr); + DUK_WO_NORETURN(return;); +} + +#if defined(DUK_USE_GCC_PRAGMAS) +#pragma GCC diagnostic pop +#elif defined(DUK_USE_CLANG_PRAGMAS) +#pragma clang diagnostic pop +#endif + +#if !defined(DUK_USE_VARIADIC_MACROS) +DUK_NORETURN( + DUK_LOCAL_DECL void duk__throw_error_from_stash(duk_hthread *thr, duk_errcode_t err_code, const char *fmt, va_list ap)); + +DUK_LOCAL void duk__throw_error_from_stash(duk_hthread *thr, duk_errcode_t err_code, const char *fmt, va_list ap) { + const char *filename; + duk_int_t line; + + DUK_CTX_ASSERT_VALID(thr); + + filename = duk_api_global_filename; + line = duk_api_global_line; + duk_api_global_filename = NULL; + duk_api_global_line = 0; + + duk_push_error_object_va_raw(thr, err_code, filename, line, fmt, ap); + (void) duk_throw(thr); + DUK_WO_NORETURN(return;); +} + +#define DUK__ERROR_STASH_SHARED(code) \ + do { \ + va_list ap; \ + va_start(ap, fmt); \ + duk__throw_error_from_stash(thr, (code), fmt, ap); \ + va_end(ap); \ + DUK_WO_NORETURN(return 0;); \ + } while (0) + +DUK_EXTERNAL duk_ret_t duk_error_stash(duk_hthread *thr, duk_errcode_t err_code, const char *fmt, ...) { + DUK_ASSERT_API_ENTRY(thr); + DUK__ERROR_STASH_SHARED(err_code); +} +DUK_EXTERNAL duk_ret_t duk_generic_error_stash(duk_hthread *thr, const char *fmt, ...) { + DUK_ASSERT_API_ENTRY(thr); + DUK__ERROR_STASH_SHARED(DUK_ERR_ERROR); +} +DUK_EXTERNAL duk_ret_t duk_eval_error_stash(duk_hthread *thr, const char *fmt, ...) { + DUK_ASSERT_API_ENTRY(thr); + DUK__ERROR_STASH_SHARED(DUK_ERR_EVAL_ERROR); +} +DUK_EXTERNAL duk_ret_t duk_range_error_stash(duk_hthread *thr, const char *fmt, ...) { + DUK_ASSERT_API_ENTRY(thr); + DUK__ERROR_STASH_SHARED(DUK_ERR_RANGE_ERROR); +} +DUK_EXTERNAL duk_ret_t duk_reference_error_stash(duk_hthread *thr, const char *fmt, ...) { + DUK_ASSERT_API_ENTRY(thr); + DUK__ERROR_STASH_SHARED(DUK_ERR_REFERENCE_ERROR); +} +DUK_EXTERNAL duk_ret_t duk_syntax_error_stash(duk_hthread *thr, const char *fmt, ...) { + DUK_ASSERT_API_ENTRY(thr); + DUK__ERROR_STASH_SHARED(DUK_ERR_SYNTAX_ERROR); +} +DUK_EXTERNAL duk_ret_t duk_type_error_stash(duk_hthread *thr, const char *fmt, ...) { + DUK_ASSERT_API_ENTRY(thr); + DUK__ERROR_STASH_SHARED(DUK_ERR_TYPE_ERROR); +} +DUK_EXTERNAL duk_ret_t duk_uri_error_stash(duk_hthread *thr, const char *fmt, ...) { + DUK_ASSERT_API_ENTRY(thr); + DUK__ERROR_STASH_SHARED(DUK_ERR_URI_ERROR); +} +#endif /* DUK_USE_VARIADIC_MACROS */ + +/* + * Comparison + */ + +DUK_EXTERNAL duk_bool_t duk_equals(duk_hthread *thr, duk_idx_t idx1, duk_idx_t idx2) { + duk_tval *tv1, *tv2; + + DUK_ASSERT_API_ENTRY(thr); + + tv1 = duk_get_tval(thr, idx1); + tv2 = duk_get_tval(thr, idx2); + if ((tv1 == NULL) || (tv2 == NULL)) { + return 0; + } + + /* Coercion may be needed, the helper handles that by pushing the + * tagged values to the stack. + */ + return duk_js_equals(thr, tv1, tv2); +} + +DUK_EXTERNAL duk_bool_t duk_strict_equals(duk_hthread *thr, duk_idx_t idx1, duk_idx_t idx2) { + duk_tval *tv1, *tv2; + + DUK_ASSERT_API_ENTRY(thr); + + tv1 = duk_get_tval(thr, idx1); + tv2 = duk_get_tval(thr, idx2); + if ((tv1 == NULL) || (tv2 == NULL)) { + return 0; + } + + /* No coercions or other side effects, so safe */ + return duk_js_strict_equals(tv1, tv2); +} + +DUK_EXTERNAL duk_bool_t duk_samevalue(duk_hthread *thr, duk_idx_t idx1, duk_idx_t idx2) { + duk_tval *tv1, *tv2; + + DUK_ASSERT_API_ENTRY(thr); + + tv1 = duk_get_tval(thr, idx1); + tv2 = duk_get_tval(thr, idx2); + if ((tv1 == NULL) || (tv2 == NULL)) { + return 0; + } + + /* No coercions or other side effects, so safe */ + return duk_js_samevalue(tv1, tv2); +} + +/* + * instanceof + */ + +DUK_EXTERNAL duk_bool_t duk_instanceof(duk_hthread *thr, duk_idx_t idx1, duk_idx_t idx2) { + duk_tval *tv1, *tv2; + + DUK_ASSERT_API_ENTRY(thr); + + /* Index validation is strict, which differs from duk_equals(). + * The strict behavior mimics how instanceof itself works, e.g. + * it is a TypeError if rval is not a -callable- object. It would + * be somewhat inconsistent if rval would be allowed to be + * non-existent without a TypeError. + */ + tv1 = duk_require_tval(thr, idx1); + DUK_ASSERT(tv1 != NULL); + tv2 = duk_require_tval(thr, idx2); + DUK_ASSERT(tv2 != NULL); + + return duk_js_instanceof(thr, tv1, tv2); +} + +/* + * Lightfunc + */ + +DUK_INTERNAL void duk_push_lightfunc_name_raw(duk_hthread *thr, duk_c_function func, duk_small_uint_t lf_flags) { + /* Lightfunc name, includes Duktape/C native function pointer, which + * can often be used to locate the function from a symbol table. + * The name also includes the 16-bit duk_tval flags field because it + * includes the magic value. Because a single native function often + * provides different functionality depending on the magic value, it + * seems reasonably to include it in the name. + * + * On the other hand, a complicated name increases string table + * pressure in low memory environments (but only when function name + * is accessed). + */ + + DUK_ASSERT_API_ENTRY(thr); + + duk_push_literal(thr, "light_"); + duk_push_string_funcptr(thr, (duk_uint8_t *) &func, sizeof(func)); + duk_push_sprintf(thr, "_%04x", (unsigned int) lf_flags); + duk_concat(thr, 3); +} + +DUK_INTERNAL void duk_push_lightfunc_name(duk_hthread *thr, duk_tval *tv) { + duk_c_function func; + duk_small_uint_t lf_flags; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(DUK_TVAL_IS_LIGHTFUNC(tv)); + + DUK_TVAL_GET_LIGHTFUNC(tv, func, lf_flags); + duk_push_lightfunc_name_raw(thr, func, lf_flags); +} + +DUK_INTERNAL void duk_push_lightfunc_tostring(duk_hthread *thr, duk_tval *tv) { + duk_c_function func; + duk_small_uint_t lf_flags; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(DUK_TVAL_IS_LIGHTFUNC(tv)); + + DUK_TVAL_GET_LIGHTFUNC(tv, func, lf_flags); /* read before 'tv' potentially invalidated */ + duk_push_literal(thr, "function "); + duk_push_lightfunc_name_raw(thr, func, lf_flags); + duk_push_literal(thr, "() { [lightfunc code] }"); + duk_concat(thr, 3); +} + +/* + * Function pointers + * + * Printing function pointers is non-portable, so we do that by hex printing + * bytes from memory. + */ + +DUK_INTERNAL void duk_push_string_funcptr(duk_hthread *thr, duk_uint8_t *ptr, duk_size_t sz) { + duk_uint8_t buf[32 * 2]; + duk_uint8_t *p, *q; + duk_small_uint_t i; + duk_small_uint_t t; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(sz <= 32); /* sanity limit for function pointer size */ + + p = buf; +#if defined(DUK_USE_INTEGER_LE) + q = ptr + sz; +#else + q = ptr; +#endif + for (i = 0; i < sz; i++) { +#if defined(DUK_USE_INTEGER_LE) + t = *(--q); +#else + t = *(q++); +#endif + *p++ = duk_lc_digits[t >> 4]; + *p++ = duk_lc_digits[t & 0x0f]; + } + + duk_push_lstring(thr, (const char *) buf, sz * 2); +} + +/* + * Push readable string summarizing duk_tval. The operation is side effect + * free and will only throw from internal errors (e.g. out of memory). + * This is used by e.g. property access code to summarize a key/base safely, + * and is not intended to be fast (but small and safe). + */ + +/* String limits for summary strings. */ +#define DUK__READABLE_SUMMARY_MAXCHARS 96 /* maximum supported by helper */ +#define DUK__READABLE_STRING_MAXCHARS 32 /* for strings/symbols */ +#define DUK__READABLE_ERRMSG_MAXCHARS 96 /* for error messages */ + +/* String sanitizer which escapes ASCII control characters and a few other + * ASCII characters, passes Unicode as is, and replaces invalid UTF-8 with + * question marks. No errors are thrown for any input string, except in out + * of memory situations. + */ +DUK_LOCAL void duk__push_hstring_readable_unicode(duk_hthread *thr, duk_hstring *h_input, duk_small_uint_t maxchars) { + const duk_uint8_t *p, *p_start, *p_end; + duk_uint8_t buf[DUK_UNICODE_MAX_XUTF8_LENGTH * DUK__READABLE_SUMMARY_MAXCHARS + 2 /*quotes*/ + 3 /*periods*/]; + duk_uint8_t *q; + duk_ucodepoint_t cp; + duk_small_uint_t nchars; + + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(h_input != NULL); + DUK_ASSERT(maxchars <= DUK__READABLE_SUMMARY_MAXCHARS); + + p_start = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_input); + p_end = p_start + DUK_HSTRING_GET_BYTELEN(h_input); + p = p_start; + q = buf; + + nchars = 0; + *q++ = (duk_uint8_t) DUK_ASC_SINGLEQUOTE; + for (;;) { + if (p >= p_end) { + break; + } + if (nchars == maxchars) { + *q++ = (duk_uint8_t) DUK_ASC_PERIOD; + *q++ = (duk_uint8_t) DUK_ASC_PERIOD; + *q++ = (duk_uint8_t) DUK_ASC_PERIOD; + break; + } + if (duk_unicode_decode_xutf8(thr, &p, p_start, p_end, &cp)) { + if (cp < 0x20 || cp == 0x7f || cp == DUK_ASC_SINGLEQUOTE || cp == DUK_ASC_BACKSLASH) { + DUK_ASSERT(DUK_UNICODE_MAX_XUTF8_LENGTH >= 4); /* estimate is valid */ + DUK_ASSERT((cp >> 4) <= 0x0f); + *q++ = (duk_uint8_t) DUK_ASC_BACKSLASH; + *q++ = (duk_uint8_t) DUK_ASC_LC_X; + *q++ = (duk_uint8_t) duk_lc_digits[cp >> 4]; + *q++ = (duk_uint8_t) duk_lc_digits[cp & 0x0f]; + } else { + q += duk_unicode_encode_xutf8(cp, q); + } + } else { + p++; /* advance manually */ + *q++ = (duk_uint8_t) DUK_ASC_QUESTION; + } + nchars++; + } + *q++ = (duk_uint8_t) DUK_ASC_SINGLEQUOTE; + + duk_push_lstring(thr, (const char *) buf, (duk_size_t) (q - buf)); +} + +DUK_LOCAL const char *duk__push_string_tval_readable(duk_hthread *thr, duk_tval *tv, duk_bool_t error_aware) { + DUK_CTX_ASSERT_VALID(thr); + /* 'tv' may be NULL */ + + if (tv == NULL) { + duk_push_literal(thr, "none"); + } else { + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_STRING: { + duk_hstring *h = DUK_TVAL_GET_STRING(tv); + if (DUK_HSTRING_HAS_SYMBOL(h)) { + /* XXX: string summary produces question marks + * so this is not very ideal. + */ + duk_push_literal(thr, "[Symbol "); + duk_push_string(thr, duk__get_symbol_type_string(h)); + duk_push_literal(thr, " "); + duk__push_hstring_readable_unicode(thr, h, DUK__READABLE_STRING_MAXCHARS); + duk_push_literal(thr, "]"); + duk_concat(thr, 5); + break; + } + duk__push_hstring_readable_unicode(thr, h, DUK__READABLE_STRING_MAXCHARS); + break; + } + case DUK_TAG_OBJECT: { + duk_hobject *h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + + if (error_aware && duk_hobject_prototype_chain_contains(thr, + h, + thr->builtins[DUK_BIDX_ERROR_PROTOTYPE], + 1 /*ignore_loop*/)) { + /* Get error message in a side effect free way if + * possible; if not, summarize as a generic object. + * Error message currently gets quoted. + */ + /* XXX: better internal getprop call; get without side effects + * but traverse inheritance chain. + */ + duk_tval *tv_msg; + tv_msg = duk_hobject_find_entry_tval_ptr_stridx(thr->heap, h, DUK_STRIDX_MESSAGE); + if (tv_msg != NULL && DUK_TVAL_IS_STRING(tv_msg)) { + /* It's critical to avoid recursion so + * only summarize a string .message. + */ + duk__push_hstring_readable_unicode(thr, + DUK_TVAL_GET_STRING(tv_msg), + DUK__READABLE_ERRMSG_MAXCHARS); + break; + } + } + duk_push_class_string_tval(thr, tv, 1 /*avoid_side_effects*/); + break; + } + case DUK_TAG_BUFFER: { + /* While plain buffers mimic Uint8Arrays, they summarize differently. + * This is useful so that the summarized string accurately reflects the + * internal type which may matter for figuring out bugs etc. + */ + /* XXX: Hex encoded, length limited buffer summary here? */ + duk_hbuffer *h = DUK_TVAL_GET_BUFFER(tv); + DUK_ASSERT(h != NULL); + duk_push_sprintf(thr, "[buffer:%ld]", (long) DUK_HBUFFER_GET_SIZE(h)); + break; + } + case DUK_TAG_POINTER: { + /* Surround with parentheses like in JX, ensures NULL pointer + * is distinguishable from null value ("(null)" vs "null"). + */ + duk_push_tval(thr, tv); + duk_push_sprintf(thr, "(%s)", duk_to_string(thr, -1)); + duk_remove_m2(thr); + break; + } + default: { + duk_push_tval(thr, tv); + break; + } + } + } + + return duk_to_string(thr, -1); +} +DUK_INTERNAL const char *duk_push_string_tval_readable(duk_hthread *thr, duk_tval *tv) { + DUK_ASSERT_API_ENTRY(thr); + return duk__push_string_tval_readable(thr, tv, 0 /*error_aware*/); +} + +DUK_INTERNAL const char *duk_push_string_readable(duk_hthread *thr, duk_idx_t idx) { + DUK_ASSERT_API_ENTRY(thr); + return duk_push_string_tval_readable(thr, duk_get_tval(thr, idx)); +} + +DUK_INTERNAL const char *duk_push_string_tval_readable_error(duk_hthread *thr, duk_tval *tv) { + DUK_ASSERT_API_ENTRY(thr); + return duk__push_string_tval_readable(thr, tv, 1 /*error_aware*/); +} + +DUK_INTERNAL void duk_push_symbol_descriptive_string(duk_hthread *thr, duk_hstring *h) { + const duk_uint8_t *p; + const duk_uint8_t *p_end; + const duk_uint8_t *q; + + DUK_ASSERT_API_ENTRY(thr); + + /* .toString() */ + duk_push_literal(thr, "Symbol("); + p = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h); + p_end = p + DUK_HSTRING_GET_BYTELEN(h); + DUK_ASSERT(p[0] == 0xff || (p[0] & 0xc0) == 0x80); + p++; + for (q = p; q < p_end; q++) { + if (*q == 0xffU) { + /* Terminate either at end-of-string (but NUL MUST + * be accepted without terminating description) or + * 0xFF, which is used to mark start of unique trailer + * (and cannot occur in CESU-8 / extended UTF-8). + */ + break; + } + } + duk_push_lstring(thr, (const char *) p, (duk_size_t) (q - p)); + duk_push_literal(thr, ")"); + duk_concat(thr, 3); +} + +/* + * Functions + */ + +#if 0 /* not used yet */ +DUK_INTERNAL void duk_push_hnatfunc_name(duk_hthread *thr, duk_hnatfunc *h) { + duk_c_function func; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_NATFUNC((duk_hobject *) h)); + + duk_push_sprintf(thr, "native_"); + func = h->func; + duk_push_string_funcptr(thr, (duk_uint8_t *) &func, sizeof(func)); + duk_push_sprintf(thr, "_%04x_%04x", + (unsigned int) (duk_uint16_t) h->nargs, + (unsigned int) (duk_uint16_t) h->magic); + duk_concat(thr, 3); +} +#endif + +/* + * duk_tval slice copy + */ + +DUK_INTERNAL void duk_copy_tvals_incref(duk_hthread *thr, duk_tval *tv_dst, duk_tval *tv_src, duk_size_t count) { + duk_tval *tv; + + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(thr); + DUK_ASSERT(count * sizeof(duk_tval) >= count); /* no wrap */ + + duk_memcpy_unsafe((void *) tv_dst, (const void *) tv_src, count * sizeof(duk_tval)); + + tv = tv_dst; + while (count-- > 0) { + DUK_TVAL_INCREF(thr, tv); + tv++; + } +} + +/* automatic undefs */ +#undef DUK__ASSERT_SPACE +#undef DUK__CHECK_SPACE +#undef DUK__ERROR_STASH_SHARED +#undef DUK__PACK_ARGS +#undef DUK__READABLE_ERRMSG_MAXCHARS +#undef DUK__READABLE_STRING_MAXCHARS +#undef DUK__READABLE_SUMMARY_MAXCHARS +#line 1 "duk_api_string.c" +/* + * String manipulation + */ + +/* #include duk_internal.h -> already included */ + +DUK_LOCAL void duk__concat_and_join_helper(duk_hthread *thr, duk_idx_t count_in, duk_bool_t is_join) { + duk_uint_t count; + duk_uint_t i; + duk_size_t idx; + duk_size_t len; + duk_hstring *h; + duk_uint8_t *buf; + + DUK_CTX_ASSERT_VALID(thr); + + if (DUK_UNLIKELY(count_in <= 0)) { + if (count_in < 0) { + DUK_ERROR_RANGE_INVALID_COUNT(thr); + DUK_WO_NORETURN(return;); + } + DUK_ASSERT(count_in == 0); + duk_push_hstring_empty(thr); + return; + } + count = (duk_uint_t) count_in; + + if (is_join) { + duk_size_t t1, t2, limit; + h = duk_to_hstring(thr, -((duk_idx_t) count) - 1); + DUK_ASSERT(h != NULL); + + /* A bit tricky overflow test, see doc/code-issues.rst. */ + t1 = (duk_size_t) DUK_HSTRING_GET_BYTELEN(h); + t2 = (duk_size_t) (count - 1); + limit = (duk_size_t) DUK_HSTRING_MAX_BYTELEN; + if (DUK_UNLIKELY(t2 != 0 && t1 > limit / t2)) { + /* Combined size of separators already overflows. */ + goto error_overflow; + } + len = (duk_size_t) (t1 * t2); + } else { + len = (duk_size_t) 0; + } + + for (i = count; i >= 1; i--) { + duk_size_t new_len; + h = duk_to_hstring(thr, -((duk_idx_t) i)); + new_len = len + (duk_size_t) DUK_HSTRING_GET_BYTELEN(h); + + /* Impose a string maximum length, need to handle overflow + * correctly. + */ + if (new_len < len || /* wrapped */ + new_len > (duk_size_t) DUK_HSTRING_MAX_BYTELEN) { + goto error_overflow; + } + len = new_len; + } + + DUK_DDD(DUK_DDDPRINT("join/concat %lu strings, total length %lu bytes", (unsigned long) count, (unsigned long) len)); + + /* Use stack allocated buffer to ensure reachability in errors + * (e.g. intern error). + */ + buf = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, len); + DUK_ASSERT(buf != NULL); + + /* [ ... (sep) str1 str2 ... strN buf ] */ + + idx = 0; + for (i = count; i >= 1; i--) { + if (is_join && i != count) { + h = duk_require_hstring(thr, -((duk_idx_t) count) - 2); /* extra -1 for buffer */ + duk_memcpy(buf + idx, DUK_HSTRING_GET_DATA(h), DUK_HSTRING_GET_BYTELEN(h)); + idx += DUK_HSTRING_GET_BYTELEN(h); + } + h = duk_require_hstring(thr, -((duk_idx_t) i) - 1); /* extra -1 for buffer */ + duk_memcpy(buf + idx, DUK_HSTRING_GET_DATA(h), DUK_HSTRING_GET_BYTELEN(h)); + idx += DUK_HSTRING_GET_BYTELEN(h); + } + + DUK_ASSERT(idx == len); + + /* [ ... (sep) str1 str2 ... strN buf ] */ + + /* Get rid of the strings early to minimize memory use before intern. */ + + if (is_join) { + duk_replace(thr, -((duk_idx_t) count) - 2); /* overwrite sep */ + duk_pop_n(thr, (duk_idx_t) count); + } else { + duk_replace(thr, -((duk_idx_t) count) - 1); /* overwrite str1 */ + duk_pop_n(thr, (duk_idx_t) (count - 1)); + } + + /* [ ... buf ] */ + + (void) duk_buffer_to_string(thr, -1); /* Safe if inputs are safe. */ + + /* [ ... res ] */ + return; + +error_overflow: + DUK_ERROR_RANGE(thr, DUK_STR_RESULT_TOO_LONG); + DUK_WO_NORETURN(return;); +} + +DUK_EXTERNAL void duk_concat(duk_hthread *thr, duk_idx_t count) { + DUK_ASSERT_API_ENTRY(thr); + + duk__concat_and_join_helper(thr, count, 0 /*is_join*/); +} + +#if defined(DUK_USE_PREFER_SIZE) +DUK_INTERNAL void duk_concat_2(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + duk_concat(thr, 2); +} +#else /* DUK_USE_PREFER_SIZE */ +DUK_INTERNAL void duk_concat_2(duk_hthread *thr) { + duk_hstring *h1; + duk_hstring *h2; + duk_uint8_t *buf; + duk_size_t len1; + duk_size_t len2; + duk_size_t len; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(duk_get_top(thr) >= 2); /* Trusted caller. */ + + h1 = duk_to_hstring(thr, -2); + h2 = duk_to_hstring(thr, -1); + len1 = (duk_size_t) DUK_HSTRING_GET_BYTELEN(h1); + len2 = (duk_size_t) DUK_HSTRING_GET_BYTELEN(h2); + len = len1 + len2; + if (DUK_UNLIKELY(len < len1 || /* wrapped */ + len > (duk_size_t) DUK_HSTRING_MAX_BYTELEN)) { + goto error_overflow; + } + buf = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, len); + DUK_ASSERT(buf != NULL); + + duk_memcpy((void *) buf, (const void *) DUK_HSTRING_GET_DATA(h1), (size_t) len1); + duk_memcpy((void *) (buf + len1), (const void *) DUK_HSTRING_GET_DATA(h2), (size_t) len2); + (void) duk_buffer_to_string(thr, -1); /* Safe if inputs are safe. */ + + /* [ ... str1 str2 buf ] */ + + duk_replace(thr, -3); + duk_pop_unsafe(thr); + return; + +error_overflow: + DUK_ERROR_RANGE(thr, DUK_STR_RESULT_TOO_LONG); + DUK_WO_NORETURN(return;); +} +#endif /* DUK_USE_PREFER_SIZE */ + +DUK_EXTERNAL void duk_join(duk_hthread *thr, duk_idx_t count) { + DUK_ASSERT_API_ENTRY(thr); + + duk__concat_and_join_helper(thr, count, 1 /*is_join*/); +} + +/* XXX: could map/decode be unified with duk_unicode_support.c code? + * Case conversion needs also the character surroundings though. + */ + +DUK_EXTERNAL void duk_decode_string(duk_hthread *thr, duk_idx_t idx, duk_decode_char_function callback, void *udata) { + duk_hstring *h_input; + const duk_uint8_t *p, *p_start, *p_end; + duk_codepoint_t cp; + + DUK_ASSERT_API_ENTRY(thr); + + h_input = duk_require_hstring(thr, idx); /* Accept symbols. */ + DUK_ASSERT(h_input != NULL); + + p_start = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_input); + p_end = p_start + DUK_HSTRING_GET_BYTELEN(h_input); + p = p_start; + + for (;;) { + if (p >= p_end) { + break; + } + cp = (duk_codepoint_t) duk_unicode_decode_xutf8_checked(thr, &p, p_start, p_end); + callback(udata, cp); + } +} + +DUK_EXTERNAL void duk_map_string(duk_hthread *thr, duk_idx_t idx, duk_map_char_function callback, void *udata) { + duk_hstring *h_input; + duk_bufwriter_ctx bw_alloc; + duk_bufwriter_ctx *bw; + const duk_uint8_t *p, *p_start, *p_end; + duk_codepoint_t cp; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_normalize_index(thr, idx); + + h_input = duk_require_hstring(thr, idx); /* Accept symbols. */ + DUK_ASSERT(h_input != NULL); + + bw = &bw_alloc; + DUK_BW_INIT_PUSHBUF(thr, bw, DUK_HSTRING_GET_BYTELEN(h_input)); /* Reasonable output estimate. */ + + p_start = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_input); + p_end = p_start + DUK_HSTRING_GET_BYTELEN(h_input); + p = p_start; + + for (;;) { + /* XXX: could write output in chunks with fewer ensure calls, + * but relative benefit would be small here. + */ + + if (p >= p_end) { + break; + } + cp = (duk_codepoint_t) duk_unicode_decode_xutf8_checked(thr, &p, p_start, p_end); + cp = callback(udata, cp); + + DUK_BW_WRITE_ENSURE_XUTF8(thr, bw, cp); + } + + DUK_BW_COMPACT(thr, bw); + (void) duk_buffer_to_string(thr, -1); /* Safe, extended UTF-8 encoded. */ + duk_replace(thr, idx); +} + +DUK_EXTERNAL void duk_substring(duk_hthread *thr, duk_idx_t idx, duk_size_t start_offset, duk_size_t end_offset) { + duk_hstring *h; + duk_hstring *res; + duk_size_t start_byte_offset; + duk_size_t end_byte_offset; + duk_size_t charlen; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); /* Accept symbols. */ + h = duk_require_hstring(thr, idx); + DUK_ASSERT(h != NULL); + + charlen = DUK_HSTRING_GET_CHARLEN(h); + if (end_offset >= charlen) { + end_offset = charlen; + } + if (start_offset > end_offset) { + start_offset = end_offset; + } + + DUK_ASSERT_DISABLE(start_offset >= 0); + DUK_ASSERT(start_offset <= end_offset && start_offset <= DUK_HSTRING_GET_CHARLEN(h)); + DUK_ASSERT_DISABLE(end_offset >= 0); + DUK_ASSERT(end_offset >= start_offset && end_offset <= DUK_HSTRING_GET_CHARLEN(h)); + + /* Guaranteed by string limits. */ + DUK_ASSERT(start_offset <= DUK_UINT32_MAX); + DUK_ASSERT(end_offset <= DUK_UINT32_MAX); + + start_byte_offset = (duk_size_t) duk_heap_strcache_offset_char2byte(thr, h, (duk_uint_fast32_t) start_offset); + end_byte_offset = (duk_size_t) duk_heap_strcache_offset_char2byte(thr, h, (duk_uint_fast32_t) end_offset); + + DUK_ASSERT(end_byte_offset >= start_byte_offset); + DUK_ASSERT(end_byte_offset - start_byte_offset <= DUK_UINT32_MAX); /* Guaranteed by string limits. */ + + /* No size check is necessary. */ + res = duk_heap_strtable_intern_checked(thr, + DUK_HSTRING_GET_DATA(h) + start_byte_offset, + (duk_uint32_t) (end_byte_offset - start_byte_offset)); + + duk_push_hstring(thr, res); + duk_replace(thr, idx); +} + +/* XXX: this is quite clunky. Add Unicode helpers to scan backwards and + * forwards with a callback to process codepoints? + */ +DUK_EXTERNAL void duk_trim(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *h; + const duk_uint8_t *p, *p_start, *p_end, *p_tmp1, *p_tmp2; /* pointers for scanning */ + const duk_uint8_t *q_start, *q_end; /* start (incl) and end (excl) of trimmed part */ + duk_codepoint_t cp; + + DUK_ASSERT_API_ENTRY(thr); + + idx = duk_require_normalize_index(thr, idx); /* Accept symbols. */ + h = duk_require_hstring(thr, idx); + DUK_ASSERT(h != NULL); + + p_start = DUK_HSTRING_GET_DATA(h); + p_end = p_start + DUK_HSTRING_GET_BYTELEN(h); + + p = p_start; + while (p < p_end) { + p_tmp1 = p; + cp = (duk_codepoint_t) duk_unicode_decode_xutf8_checked(thr, &p_tmp1, p_start, p_end); + if (!(duk_unicode_is_whitespace(cp) || duk_unicode_is_line_terminator(cp))) { + break; + } + p = p_tmp1; + } + q_start = p; + if (p == p_end) { + /* Entire string is whitespace. */ + q_end = p; + goto scan_done; + } + + p = p_end; + while (p > p_start) { + p_tmp1 = p; + while (p > p_start) { + p--; + if (((*p) & 0xc0) != 0x80) { + break; + } + } + p_tmp2 = p; + + cp = (duk_codepoint_t) duk_unicode_decode_xutf8_checked(thr, &p_tmp2, p_start, p_end); + if (!(duk_unicode_is_whitespace(cp) || duk_unicode_is_line_terminator(cp))) { + p = p_tmp1; + break; + } + } + q_end = p; + +scan_done: + /* This may happen when forward and backward scanning disagree + * (possible for non-extended-UTF-8 strings). + */ + if (q_end < q_start) { + q_end = q_start; + } + + DUK_ASSERT(q_start >= p_start && q_start <= p_end); + DUK_ASSERT(q_end >= p_start && q_end <= p_end); + DUK_ASSERT(q_end >= q_start); + + DUK_DDD(DUK_DDDPRINT("trim: p_start=%p, p_end=%p, q_start=%p, q_end=%p", + (const void *) p_start, + (const void *) p_end, + (const void *) q_start, + (const void *) q_end)); + + if (q_start == p_start && q_end == p_end) { + DUK_DDD(DUK_DDDPRINT("nothing was trimmed: avoid interning (hashing etc)")); + return; + } + + duk_push_lstring(thr, (const char *) q_start, (duk_size_t) (q_end - q_start)); + duk_replace(thr, idx); +} + +DUK_EXTERNAL duk_codepoint_t duk_char_code_at(duk_hthread *thr, duk_idx_t idx, duk_size_t char_offset) { + duk_hstring *h; + duk_ucodepoint_t cp; + + DUK_ASSERT_API_ENTRY(thr); + + /* XXX: Share code with String.prototype.charCodeAt? Main difference + * is handling of clamped offsets. + */ + + h = duk_require_hstring(thr, idx); /* Accept symbols. */ + DUK_ASSERT(h != NULL); + + DUK_ASSERT_DISABLE(char_offset >= 0); /* Always true, arg is unsigned. */ + if (char_offset >= DUK_HSTRING_GET_CHARLEN(h)) { + return 0; + } + + DUK_ASSERT(char_offset <= DUK_UINT_MAX); /* Guaranteed by string limits. */ + cp = duk_hstring_char_code_at_raw(thr, h, (duk_uint_t) char_offset, 0 /*surrogate_aware*/); + return (duk_codepoint_t) cp; +} +#line 1 "duk_api_time.c" +/* + * Date/time. + */ + +/* #include duk_internal.h -> already included */ + +DUK_INTERNAL duk_double_t duk_time_get_ecmascript_time(duk_hthread *thr) { + /* ECMAScript time, with millisecond fractions. Exposed via + * duk_get_now() for example. + */ + DUK_UNREF(thr); + return (duk_double_t) DUK_USE_DATE_GET_NOW(thr); +} + +DUK_INTERNAL duk_double_t duk_time_get_ecmascript_time_nofrac(duk_hthread *thr) { + /* ECMAScript time without millisecond fractions. Exposed via + * the Date built-in which doesn't allow fractions. + */ + DUK_UNREF(thr); + return (duk_double_t) DUK_FLOOR(DUK_USE_DATE_GET_NOW(thr)); +} + +DUK_INTERNAL duk_double_t duk_time_get_monotonic_time(duk_hthread *thr) { + DUK_UNREF(thr); +#if defined(DUK_USE_GET_MONOTONIC_TIME) + return (duk_double_t) DUK_USE_GET_MONOTONIC_TIME(thr); +#else + return (duk_double_t) DUK_USE_DATE_GET_NOW(thr); +#endif +} + +DUK_EXTERNAL duk_double_t duk_get_now(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(thr); + + /* This API intentionally allows millisecond fractions. */ + return duk_time_get_ecmascript_time(thr); +} + +#if 0 /* XXX: worth exposing? */ +DUK_EXTERNAL duk_double_t duk_get_monotonic_time(duk_hthread *thr) { + DUK_ASSERT_API_ENTRY(thr); + DUK_UNREF(thr); + + return duk_time_get_monotonic_time(thr); +} +#endif + +DUK_EXTERNAL void duk_time_to_components(duk_hthread *thr, duk_double_t timeval, duk_time_components *comp) { + duk_int_t parts[DUK_DATE_IDX_NUM_PARTS]; + duk_double_t dparts[DUK_DATE_IDX_NUM_PARTS]; + duk_uint_t flags; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(comp != NULL); /* XXX: or check? */ + DUK_UNREF(thr); + + /* Convert as one-based, but change month to zero-based to match the + * ECMAScript Date built-in behavior 1:1. + */ + flags = DUK_DATE_FLAG_ONEBASED | DUK_DATE_FLAG_NAN_TO_ZERO; + + duk_bi_date_timeval_to_parts(timeval, parts, dparts, flags); + + /* XXX: sub-millisecond accuracy for the API */ + + DUK_ASSERT(dparts[DUK_DATE_IDX_MONTH] >= 1.0 && dparts[DUK_DATE_IDX_MONTH] <= 12.0); + comp->year = dparts[DUK_DATE_IDX_YEAR]; + comp->month = dparts[DUK_DATE_IDX_MONTH] - 1.0; + comp->day = dparts[DUK_DATE_IDX_DAY]; + comp->hours = dparts[DUK_DATE_IDX_HOUR]; + comp->minutes = dparts[DUK_DATE_IDX_MINUTE]; + comp->seconds = dparts[DUK_DATE_IDX_SECOND]; + comp->milliseconds = dparts[DUK_DATE_IDX_MILLISECOND]; + comp->weekday = dparts[DUK_DATE_IDX_WEEKDAY]; +} + +DUK_EXTERNAL duk_double_t duk_components_to_time(duk_hthread *thr, duk_time_components *comp) { + duk_double_t d; + duk_double_t dparts[DUK_DATE_IDX_NUM_PARTS]; + duk_uint_t flags; + + DUK_ASSERT_API_ENTRY(thr); + DUK_ASSERT(comp != NULL); /* XXX: or check? */ + DUK_UNREF(thr); + + /* Match Date constructor behavior (with UTC time). Month is given + * as zero-based. Day-of-month is given as one-based so normalize + * it to zero-based as the internal conversion helpers expects all + * components to be zero-based. + */ + flags = 0; + + /* XXX: expensive conversion; use array format in API instead, or unify + * time provider and time API to use same struct? + */ + + dparts[DUK_DATE_IDX_YEAR] = comp->year; + dparts[DUK_DATE_IDX_MONTH] = comp->month; + dparts[DUK_DATE_IDX_DAY] = comp->day - 1.0; + dparts[DUK_DATE_IDX_HOUR] = comp->hours; + dparts[DUK_DATE_IDX_MINUTE] = comp->minutes; + dparts[DUK_DATE_IDX_SECOND] = comp->seconds; + dparts[DUK_DATE_IDX_MILLISECOND] = comp->milliseconds; + dparts[DUK_DATE_IDX_WEEKDAY] = 0; /* ignored */ + + d = duk_bi_date_get_timeval_from_dparts(dparts, flags); + + return d; +} +#line 1 "duk_bi_array.c" +/* + * Array built-ins + * + * Most Array built-ins are intentionally generic in ECMAScript, and are + * intended to work even when the 'this' binding is not an Array instance. + * This ECMAScript feature is also used by much real world code. For this + * reason the implementations here don't assume exotic Array behavior or + * e.g. presence of a .length property. However, some algorithms have a + * fast path for duk_harray backed actual Array instances, enabled when + * footprint is not a concern. + * + * XXX: the "Throw" flag should be set for (almost?) all [[Put]] and + * [[Delete]] operations, but it's currently false throughout. Go through + * all put/delete cases and check throw flag use. Need a new API primitive + * which allows throws flag to be specified. + * + * XXX: array lengths above 2G won't work reliably. There are many places + * where one needs a full signed 32-bit range ([-0xffffffff, 0xffffffff], + * i.e. -33- bits). Although array 'length' cannot be written to be outside + * the unsigned 32-bit range (E5.1 Section 15.4.5.1 throws a RangeError if so) + * some intermediate values may be above 0xffffffff and this may not be always + * correctly handled now (duk_uint32_t is not enough for all algorithms). + * For instance, push() can legitimately write entries beyond length 0xffffffff + * and cause a RangeError only at the end. To do this properly, the current + * push() implementation tracks the array index using a 'double' instead of a + * duk_uint32_t (which is somewhat awkward). See test-bi-array-push-maxlen.js. + * + * On using "put" vs. "def" prop + * ============================= + * + * Code below must be careful to use the appropriate primitive as it matters + * for compliance. When using "put" there may be inherited properties in + * Array.prototype which cause side effects when values are written. When + * using "define" there are no such side effects, and many test262 test cases + * check for this (for real world code, such side effects are very rare). + * Both "put" and "define" are used in the E5.1 specification; as a rule, + * "put" is used when modifying an existing array (or a non-array 'this' + * binding) and "define" for setting values into a fresh result array. + */ + +/* #include duk_internal.h -> already included */ + +/* Perform an intermediate join when this many elements have been pushed + * on the value stack. + */ +#define DUK__ARRAY_MID_JOIN_LIMIT 4096 + +#if defined(DUK_USE_ARRAY_BUILTIN) + +/* + * Shared helpers. + */ + +/* Shared entry code for many Array built-ins: the 'this' binding is pushed + * on the value stack and object coerced, and the current .length is returned. + * Note that length is left on stack (it could be popped, but that's not + * usually necessary because call handling will clean it up automatically). + */ +DUK_LOCAL duk_uint32_t duk__push_this_obj_len_u32(duk_hthread *thr) { + duk_uint32_t len; + + /* XXX: push more directly? */ + (void) duk_push_this_coercible_to_object(thr); + DUK_HOBJECT_ASSERT_VALID(duk_get_hobject(thr, -1)); + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_LENGTH); + len = duk_to_uint32(thr, -1); + + /* -> [ ... ToObject(this) ToUint32(length) ] */ + return len; +} + +DUK_LOCAL duk_uint32_t duk__push_this_obj_len_u32_limited(duk_hthread *thr) { + /* Range limited to [0, 0x7fffffff] range, i.e. range that can be + * represented with duk_int32_t. Use this when the method doesn't + * handle the full 32-bit unsigned range correctly. + */ + duk_uint32_t ret = duk__push_this_obj_len_u32(thr); + if (DUK_UNLIKELY(ret >= 0x80000000UL)) { + DUK_ERROR_RANGE_INVALID_LENGTH(thr); + DUK_WO_NORETURN(return 0U;); + } + return ret; +} + +#if defined(DUK_USE_ARRAY_FASTPATH) +/* Check if 'this' binding is an Array instance (duk_harray) which satisfies + * a few other guarantees for fast path operation. The fast path doesn't + * need to handle all operations, even for duk_harrays, but must handle a + * significant fraction to improve performance. Return a non-NULL duk_harray + * pointer when all fast path criteria are met, NULL otherwise. + */ +DUK_LOCAL duk_harray *duk__arraypart_fastpath_this(duk_hthread *thr) { + duk_tval *tv; + duk_hobject *h; + duk_uint_t flags_mask, flags_bits, flags_value; + + DUK_ASSERT(thr->valstack_bottom > thr->valstack); /* because call in progress */ + tv = DUK_GET_THIS_TVAL_PTR(thr); + + /* Fast path requires that 'this' is a duk_harray. Read only arrays + * (ROM backed) are also rejected for simplicity. + */ + if (!DUK_TVAL_IS_OBJECT(tv)) { + DUK_DD(DUK_DDPRINT("reject array fast path: not an object")); + return NULL; + } + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + flags_mask = DUK_HOBJECT_FLAG_ARRAY_PART | DUK_HOBJECT_FLAG_EXOTIC_ARRAY | DUK_HEAPHDR_FLAG_READONLY; + flags_bits = DUK_HOBJECT_FLAG_ARRAY_PART | DUK_HOBJECT_FLAG_EXOTIC_ARRAY; + flags_value = DUK_HEAPHDR_GET_FLAGS_RAW((duk_heaphdr *) h); + if ((flags_value & flags_mask) != flags_bits) { + DUK_DD(DUK_DDPRINT("reject array fast path: object flag check failed")); + return NULL; + } + + /* In some cases a duk_harray's 'length' may be larger than the + * current array part allocation. Avoid the fast path in these + * cases, so that all fast path code can safely assume that all + * items in the range [0,length[ are backed by the current array + * part allocation. + */ + if (((duk_harray *) h)->length > DUK_HOBJECT_GET_ASIZE(h)) { + DUK_DD(DUK_DDPRINT("reject array fast path: length > array part size")); + return NULL; + } + + /* Guarantees for fast path. */ + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HOBJECT_GET_ASIZE(h) == 0 || DUK_HOBJECT_A_GET_BASE(thr->heap, h) != NULL); + DUK_ASSERT(((duk_harray *) h)->length <= DUK_HOBJECT_GET_ASIZE(h)); + + DUK_DD(DUK_DDPRINT("array fast path allowed for: %!O", (duk_heaphdr *) h)); + return (duk_harray *) h; +} +#endif /* DUK_USE_ARRAY_FASTPATH */ + +/* + * Constructor + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_constructor(duk_hthread *thr) { + duk_idx_t nargs; + duk_harray *a; + duk_double_t d; + duk_uint32_t len; + duk_uint32_t len_prealloc; + + nargs = duk_get_top(thr); + + if (nargs == 1 && duk_is_number(thr, 0)) { + /* XXX: expensive check (also shared elsewhere - so add a shared internal API call?) */ + d = duk_get_number(thr, 0); + len = duk_to_uint32(thr, 0); + if (!duk_double_equals((duk_double_t) len, d)) { + DUK_DCERROR_RANGE_INVALID_LENGTH(thr); + } + + /* For small lengths create a dense preallocated array. + * For large arrays preallocate an initial part. + */ + len_prealloc = len < 64 ? len : 64; + a = duk_push_harray_with_size(thr, len_prealloc); + DUK_ASSERT(a != NULL); + DUK_ASSERT(!duk_is_bare_object(thr, -1)); + a->length = len; + return 1; + } + + duk_pack(thr, nargs); + return 1; +} + +/* + * isArray() + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_constructor_is_array(duk_hthread *thr) { + DUK_ASSERT_TOP(thr, 1); + duk_push_boolean(thr, duk_js_isarray(DUK_GET_TVAL_POSIDX(thr, 0))); + return 1; +} + +/* + * toString() + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_to_string(duk_hthread *thr) { + (void) duk_push_this_coercible_to_object(thr); + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_JOIN); + + /* [ ... this func ] */ + if (!duk_is_callable(thr, -1)) { + /* Fall back to the initial (original) Object.toString(). We don't + * currently have pointers to the built-in functions, only the top + * level global objects (like "Array") so this is now done in a bit + * of a hacky manner. It would be cleaner to push the (original) + * function and use duk_call_method(). + */ + + /* XXX: 'this' will be ToObject() coerced twice, which is incorrect + * but should have no visible side effects. + */ + DUK_DDD(DUK_DDDPRINT("this.join is not callable, fall back to (original) Object.toString")); + duk_set_top(thr, 0); + return duk_bi_object_prototype_to_string(thr); /* has access to 'this' binding */ + } + + /* [ ... this func ] */ + + duk_insert(thr, -2); + + /* [ ... func this ] */ + + DUK_DDD( + DUK_DDDPRINT("calling: func=%!iT, this=%!iT", (duk_tval *) duk_get_tval(thr, -2), (duk_tval *) duk_get_tval(thr, -1))); + duk_call_method(thr, 0); + + return 1; +} + +/* + * concat() + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_concat(duk_hthread *thr) { + duk_idx_t i, n; + duk_uint32_t j, idx, len; + duk_hobject *h; + duk_size_t tmp_len; + + /* XXX: In ES2015 Array .length can be up to 2^53-1. The current + * implementation is limited to 2^32-1. + */ + + /* XXX: Fast path for array 'this' and array element. */ + + /* XXX: The insert here is a bit expensive if there are a lot of items. + * It could also be special cased in the outermost for loop quite easily + * (as the element is dup()'d anyway). + */ + + (void) duk_push_this_coercible_to_object(thr); + duk_insert(thr, 0); + n = duk_get_top(thr); + duk_push_array(thr); /* -> [ ToObject(this) item1 ... itemN arr ] */ + + /* NOTE: The Array special behaviors are NOT invoked by duk_xdef_prop_index() + * (which differs from the official algorithm). If no error is thrown, this + * doesn't matter as the length is updated at the end. However, if an error + * is thrown, the length will be unset. That shouldn't matter because the + * caller won't get a reference to the intermediate value. + */ + + idx = 0; + for (i = 0; i < n; i++) { + duk_bool_t spreadable; + duk_bool_t need_has_check; + + DUK_ASSERT_TOP(thr, n + 1); + + /* [ ToObject(this) item1 ... itemN arr ] */ + + h = duk_get_hobject(thr, i); + + if (h == NULL) { + spreadable = 0; + } else { +#if defined(DUK_USE_SYMBOL_BUILTIN) + duk_get_prop_stridx(thr, i, DUK_STRIDX_WELLKNOWN_SYMBOL_IS_CONCAT_SPREADABLE); + if (duk_is_undefined(thr, -1)) { + spreadable = duk_js_isarray_hobject(h); + } else { + spreadable = duk_to_boolean(thr, -1); + } + duk_pop_nodecref_unsafe(thr); +#else + spreadable = duk_js_isarray_hobject(h); +#endif + } + + if (!spreadable) { + duk_dup(thr, i); + duk_xdef_prop_index_wec(thr, -2, idx); + idx++; + if (DUK_UNLIKELY(idx == 0U)) { + /* Index after update is 0, and index written + * was 0xffffffffUL which is no longer a valid + * array index. + */ + goto fail_wrap; + } + continue; + } + + DUK_ASSERT(duk_is_object(thr, i)); + need_has_check = (DUK_HOBJECT_IS_PROXY(h) != 0); /* Always 0 w/o Proxy support. */ + + /* [ ToObject(this) item1 ... itemN arr ] */ + + tmp_len = duk_get_length(thr, i); + len = (duk_uint32_t) tmp_len; + if (DUK_UNLIKELY(tmp_len != (duk_size_t) len)) { + goto fail_wrap; + } + if (DUK_UNLIKELY(idx + len < idx)) { + /* Result length must be at most 0xffffffffUL to be + * a valid 32-bit array index. + */ + goto fail_wrap; + } + for (j = 0; j < len; j++) { + /* For a Proxy element, an explicit 'has' check is + * needed to allow the Proxy to present gaps. + */ + if (need_has_check) { + if (duk_has_prop_index(thr, i, j)) { + duk_get_prop_index(thr, i, j); + duk_xdef_prop_index_wec(thr, -2, idx); + } + } else { + if (duk_get_prop_index(thr, i, j)) { + duk_xdef_prop_index_wec(thr, -2, idx); + } else { + duk_pop_undefined(thr); + } + } + idx++; + DUK_ASSERT(idx != 0U); /* Wrap check above. */ + } + } + + /* ES5.1 has a specification "bug" in that nonexistent trailing + * elements don't affect the result .length. Test262 and other + * engines disagree, and the specification bug was fixed in ES2015 + * (see NOTE 1 in https://www.ecma-international.org/ecma-262/6.0/#sec-array.prototype.concat). + */ + duk_push_uarridx(thr, idx); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_W); + + DUK_ASSERT_TOP(thr, n + 1); + return 1; + +fail_wrap: + DUK_ERROR_RANGE_INVALID_LENGTH(thr); + DUK_WO_NORETURN(return 0;); +} + +/* + * join(), toLocaleString() + * + * Note: checking valstack is necessary, but only in the per-element loop. + * + * Note: the trivial approach of pushing all the elements on the value stack + * and then calling duk_join() fails when the array contains a large number + * of elements. This problem can't be offloaded to duk_join() because the + * elements to join must be handled here and have special handling. Current + * approach is to do intermediate joins with very large number of elements. + * There is no fancy handling; the prefix gets re-joined multiple times. + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_join_shared(duk_hthread *thr) { + duk_uint32_t len, count; + duk_uint32_t idx; + duk_small_int_t to_locale_string = duk_get_current_magic(thr); + duk_idx_t valstack_required; + + /* For join(), nargs is 1. For toLocaleString(), nargs is 0 and + * setting the top essentially pushes an undefined to the stack, + * thus defaulting to a comma separator. + */ + duk_set_top(thr, 1); + if (duk_is_undefined(thr, 0)) { + duk_pop_undefined(thr); + duk_push_hstring_stridx(thr, DUK_STRIDX_COMMA); + } else { + duk_to_string(thr, 0); + } + + len = duk__push_this_obj_len_u32(thr); + + /* [ sep ToObject(this) len ] */ + + DUK_DDD(DUK_DDDPRINT("sep=%!T, this=%!T, len=%lu", + (duk_tval *) duk_get_tval(thr, 0), + (duk_tval *) duk_get_tval(thr, 1), + (unsigned long) len)); + + /* The extra (+4) is tight. */ + valstack_required = (duk_idx_t) ((len >= DUK__ARRAY_MID_JOIN_LIMIT ? DUK__ARRAY_MID_JOIN_LIMIT : len) + 4); + duk_require_stack(thr, valstack_required); + + duk_dup_0(thr); + + /* [ sep ToObject(this) len sep ] */ + + count = 0; + idx = 0; + for (;;) { + DUK_DDD(DUK_DDDPRINT("join idx=%ld", (long) idx)); + if (count >= DUK__ARRAY_MID_JOIN_LIMIT || /* intermediate join to avoid valstack overflow */ + idx >= len) { /* end of loop (careful with len==0) */ + /* [ sep ToObject(this) len sep str0 ... str(count-1) ] */ + DUK_DDD(DUK_DDDPRINT("mid/final join, count=%ld, idx=%ld, len=%ld", (long) count, (long) idx, (long) len)); + duk_join(thr, (duk_idx_t) count); /* -> [ sep ToObject(this) len str ] */ + duk_dup_0(thr); /* -> [ sep ToObject(this) len str sep ] */ + duk_insert(thr, -2); /* -> [ sep ToObject(this) len sep str ] */ + count = 1; + } + if (idx >= len) { + /* if true, the stack already contains the final result */ + break; + } + + duk_get_prop_index(thr, 1, (duk_uarridx_t) idx); + if (duk_is_null_or_undefined(thr, -1)) { + duk_pop_nodecref_unsafe(thr); + duk_push_hstring_empty(thr); + } else { + if (to_locale_string) { + duk_to_object(thr, -1); + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_TO_LOCALE_STRING); + duk_insert(thr, -2); /* -> [ ... toLocaleString ToObject(val) ] */ + duk_call_method(thr, 0); + } + duk_to_string(thr, -1); + } + + count++; + idx++; + } + + /* [ sep ToObject(this) len sep result ] */ + + return 1; +} + +/* + * pop(), push() + */ + +#if defined(DUK_USE_ARRAY_FASTPATH) +DUK_LOCAL duk_ret_t duk__array_pop_fastpath(duk_hthread *thr, duk_harray *h_arr) { + duk_tval *tv_arraypart; + duk_tval *tv_val; + duk_uint32_t len; + + tv_arraypart = DUK_HOBJECT_A_GET_BASE(thr->heap, (duk_hobject *) h_arr); + len = h_arr->length; + if (len <= 0) { + /* nop, return undefined */ + return 0; + } + + len--; + h_arr->length = len; + + /* Fast path doesn't check for an index property inherited from + * Array.prototype. This is quite often acceptable; if not, + * disable fast path. + */ + DUK_ASSERT_VS_SPACE(thr); + tv_val = tv_arraypart + len; + if (DUK_TVAL_IS_UNUSED(tv_val)) { + /* No net refcount change. Value stack already has + * 'undefined' based on value stack init policy. + */ + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top)); + DUK_ASSERT(DUK_TVAL_IS_UNUSED(tv_val)); + } else { + /* No net refcount change. */ + DUK_TVAL_SET_TVAL(thr->valstack_top, tv_val); + DUK_TVAL_SET_UNUSED(tv_val); + } + thr->valstack_top++; + + /* XXX: there's no shrink check in the fast path now */ + + return 1; +} +#endif /* DUK_USE_ARRAY_FASTPATH */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_pop(duk_hthread *thr) { + duk_uint32_t len; + duk_uint32_t idx; +#if defined(DUK_USE_ARRAY_FASTPATH) + duk_harray *h_arr; +#endif + + DUK_ASSERT_TOP(thr, 0); + +#if defined(DUK_USE_ARRAY_FASTPATH) + h_arr = duk__arraypart_fastpath_this(thr); + if (h_arr) { + return duk__array_pop_fastpath(thr, h_arr); + } +#endif + + /* XXX: Merge fastpath check into a related call (push this, coerce length, etc)? */ + + len = duk__push_this_obj_len_u32(thr); + if (len == 0) { + duk_push_int(thr, 0); + duk_put_prop_stridx_short(thr, 0, DUK_STRIDX_LENGTH); + return 0; + } + idx = len - 1; + + duk_get_prop_index(thr, 0, (duk_uarridx_t) idx); + duk_del_prop_index(thr, 0, (duk_uarridx_t) idx); + duk_push_u32(thr, idx); + duk_put_prop_stridx_short(thr, 0, DUK_STRIDX_LENGTH); + return 1; +} + +#if defined(DUK_USE_ARRAY_FASTPATH) +DUK_LOCAL duk_ret_t duk__array_push_fastpath(duk_hthread *thr, duk_harray *h_arr) { + duk_tval *tv_arraypart; + duk_tval *tv_src; + duk_tval *tv_dst; + duk_uint32_t len; + duk_idx_t i, n; + + len = h_arr->length; + tv_arraypart = DUK_HOBJECT_A_GET_BASE(thr->heap, (duk_hobject *) h_arr); + + n = (duk_idx_t) (thr->valstack_top - thr->valstack_bottom); + DUK_ASSERT(n >= 0); + DUK_ASSERT((duk_uint32_t) n <= DUK_UINT32_MAX); + if (DUK_UNLIKELY(len + (duk_uint32_t) n < len)) { + DUK_D(DUK_DPRINT("Array.prototype.push() would go beyond 32-bit length, throw")); + DUK_DCERROR_RANGE_INVALID_LENGTH(thr); /* != 0 return value returned as is by caller */ + } + if (len + (duk_uint32_t) n > DUK_HOBJECT_GET_ASIZE((duk_hobject *) h_arr)) { + /* Array part would need to be extended. Rely on slow path + * for now. + * + * XXX: Rework hobject code a bit and add extend support. + */ + return 0; + } + + tv_src = thr->valstack_bottom; + tv_dst = tv_arraypart + len; + for (i = 0; i < n; i++) { + /* No net refcount change; reset value stack values to + * undefined to satisfy value stack init policy. + */ + DUK_TVAL_SET_TVAL(tv_dst, tv_src); + DUK_TVAL_SET_UNDEFINED(tv_src); + tv_src++; + tv_dst++; + } + thr->valstack_top = thr->valstack_bottom; + len += (duk_uint32_t) n; + h_arr->length = len; + + DUK_ASSERT((duk_uint_t) len == len); + duk_push_uint(thr, (duk_uint_t) len); + return 1; +} +#endif /* DUK_USE_ARRAY_FASTPATH */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_push(duk_hthread *thr) { + /* Note: 'this' is not necessarily an Array object. The push() + * algorithm is supposed to work for other kinds of objects too, + * so the algorithm has e.g. an explicit update for the 'length' + * property which is normally "magical" in arrays. + */ + + duk_uint32_t len; + duk_idx_t i, n; +#if defined(DUK_USE_ARRAY_FASTPATH) + duk_harray *h_arr; +#endif + +#if defined(DUK_USE_ARRAY_FASTPATH) + h_arr = duk__arraypart_fastpath_this(thr); + if (h_arr) { + duk_ret_t rc; + rc = duk__array_push_fastpath(thr, h_arr); + if (rc != 0) { + return rc; + } + DUK_DD(DUK_DDPRINT("array push() fast path exited, resize case")); + } +#endif + + n = duk_get_top(thr); + len = duk__push_this_obj_len_u32(thr); + + /* [ arg1 ... argN obj length ] */ + + /* Technically Array.prototype.push() can create an Array with length + * longer than 2^32-1, i.e. outside the 32-bit range. The final length + * is *not* wrapped to 32 bits in the specification. + * + * This implementation tracks length with a uint32 because it's much + * more practical. + * + * See: test-bi-array-push-maxlen.js. + */ + + if (len + (duk_uint32_t) n < len) { + DUK_D(DUK_DPRINT("Array.prototype.push() would go beyond 32-bit length, throw")); + DUK_DCERROR_RANGE_INVALID_LENGTH(thr); + } + + for (i = 0; i < n; i++) { + duk_dup(thr, i); + duk_put_prop_index(thr, -3, (duk_uarridx_t) (len + (duk_uint32_t) i)); + } + len += (duk_uint32_t) n; + + duk_push_u32(thr, len); + duk_dup_top(thr); + duk_put_prop_stridx_short(thr, -4, DUK_STRIDX_LENGTH); + + /* [ arg1 ... argN obj length new_length ] */ + return 1; +} + +/* + * sort() + * + * Currently qsort with random pivot. This is now really, really slow, + * because there is no fast path for array parts. + * + * Signed indices are used because qsort() leaves and degenerate cases + * may use a negative offset. + */ + +DUK_LOCAL duk_small_int_t duk__array_sort_compare(duk_hthread *thr, duk_int_t idx1, duk_int_t idx2) { + duk_bool_t have1, have2; + duk_bool_t undef1, undef2; + duk_small_int_t ret; + duk_idx_t idx_obj = 1; /* fixed offsets in valstack */ + duk_idx_t idx_fn = 0; + duk_hstring *h1, *h2; + + /* Fast exit if indices are identical. This is valid for a non-existent property, + * for an undefined value, and almost always for ToString() coerced comparison of + * arbitrary values (corner cases where this is not the case include e.g. a an + * object with varying ToString() coercion). + * + * The specification does not prohibit "caching" of values read from the array, so + * assuming equality for comparing an index with itself falls into the category of + * "caching". + * + * Also, compareFn may be inconsistent, so skipping a call to compareFn here may + * have an effect on the final result. The specification does not require any + * specific behavior for inconsistent compare functions, so again, this fast path + * is OK. + */ + + if (idx1 == idx2) { + DUK_DDD(DUK_DDDPRINT("duk__array_sort_compare: idx1=%ld, idx2=%ld -> indices identical, quick exit", + (long) idx1, + (long) idx2)); + return 0; + } + + have1 = duk_get_prop_index(thr, idx_obj, (duk_uarridx_t) idx1); + have2 = duk_get_prop_index(thr, idx_obj, (duk_uarridx_t) idx2); + + DUK_DDD(DUK_DDDPRINT("duk__array_sort_compare: idx1=%ld, idx2=%ld, have1=%ld, have2=%ld, val1=%!T, val2=%!T", + (long) idx1, + (long) idx2, + (long) have1, + (long) have2, + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + + if (have1) { + if (have2) { + ; + } else { + ret = -1; + goto pop_ret; + } + } else { + if (have2) { + ret = 1; + goto pop_ret; + } else { + ret = 0; + goto pop_ret; + } + } + + undef1 = duk_is_undefined(thr, -2); + undef2 = duk_is_undefined(thr, -1); + if (undef1) { + if (undef2) { + ret = 0; + goto pop_ret; + } else { + ret = 1; + goto pop_ret; + } + } else { + if (undef2) { + ret = -1; + goto pop_ret; + } else { + ; + } + } + + if (!duk_is_undefined(thr, idx_fn)) { + duk_double_t d; + + /* No need to check callable; duk_call() will do that. */ + duk_dup(thr, idx_fn); /* -> [ ... x y fn ] */ + duk_insert(thr, -3); /* -> [ ... fn x y ] */ + duk_call(thr, 2); /* -> [ ... res ] */ + + /* ES5 is a bit vague about what to do if the return value is + * not a number. ES2015 provides a concrete description: + * http://www.ecma-international.org/ecma-262/6.0/#sec-sortcompare. + */ + + d = duk_to_number_m1(thr); + if (d < 0.0) { + ret = -1; + } else if (d > 0.0) { + ret = 1; + } else { + /* Because NaN compares to false, NaN is handled here + * without an explicit check above. + */ + ret = 0; + } + + duk_pop_nodecref_unsafe(thr); + DUK_DDD(DUK_DDDPRINT("-> result %ld (from comparefn, after coercion)", (long) ret)); + return ret; + } + + /* string compare is the default (a bit oddly) */ + + /* XXX: any special handling for plain array; causes repeated coercion now? */ + h1 = duk_to_hstring(thr, -2); + h2 = duk_to_hstring_m1(thr); + DUK_ASSERT(h1 != NULL); + DUK_ASSERT(h2 != NULL); + + ret = duk_js_string_compare(h1, h2); /* retval is directly usable */ + goto pop_ret; + +pop_ret: + duk_pop_2_unsafe(thr); + DUK_DDD(DUK_DDDPRINT("-> result %ld", (long) ret)); + return ret; +} + +DUK_LOCAL void duk__array_sort_swap(duk_hthread *thr, duk_int_t l, duk_int_t r) { + duk_bool_t have_l, have_r; + duk_idx_t idx_obj = 1; /* fixed offset in valstack */ + + if (l == r) { + return; + } + + /* swap elements; deal with non-existent elements correctly */ + have_l = duk_get_prop_index(thr, idx_obj, (duk_uarridx_t) l); + have_r = duk_get_prop_index(thr, idx_obj, (duk_uarridx_t) r); + + if (have_r) { + /* right exists, [[Put]] regardless whether or not left exists */ + duk_put_prop_index(thr, idx_obj, (duk_uarridx_t) l); + } else { + duk_del_prop_index(thr, idx_obj, (duk_uarridx_t) l); + duk_pop_undefined(thr); + } + + if (have_l) { + duk_put_prop_index(thr, idx_obj, (duk_uarridx_t) r); + } else { + duk_del_prop_index(thr, idx_obj, (duk_uarridx_t) r); + duk_pop_undefined(thr); + } +} + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) +/* Debug print which visualizes the qsort partitioning process. */ +DUK_LOCAL void duk__debuglog_qsort_state(duk_hthread *thr, duk_int_t lo, duk_int_t hi, duk_int_t pivot) { + char buf[4096]; + char *ptr = buf; + duk_int_t i, n; + n = (duk_int_t) duk_get_length(thr, 1); + if (n > 4000) { + n = 4000; + } + *ptr++ = '['; + for (i = 0; i < n; i++) { + if (i == pivot) { + *ptr++ = '|'; + } else if (i == lo) { + *ptr++ = '<'; + } else if (i == hi) { + *ptr++ = '>'; + } else if (i >= lo && i <= hi) { + *ptr++ = '-'; + } else { + *ptr++ = ' '; + } + } + *ptr++ = ']'; + *ptr++ = '\0'; + + DUK_DDD(DUK_DDDPRINT("%s (lo=%ld, hi=%ld, pivot=%ld)", (const char *) buf, (long) lo, (long) hi, (long) pivot)); +} +#endif + +DUK_LOCAL void duk__array_qsort(duk_hthread *thr, duk_int_t lo, duk_int_t hi) { + duk_int_t p, l, r; + + /* The lo/hi indices may be crossed and hi < 0 is possible at entry. */ + + DUK_DDD(DUK_DDDPRINT("duk__array_qsort: lo=%ld, hi=%ld, obj=%!T", (long) lo, (long) hi, (duk_tval *) duk_get_tval(thr, 1))); + + DUK_ASSERT_TOP(thr, 3); + + /* In some cases it may be that lo > hi, or hi < 0; these + * degenerate cases happen e.g. for empty arrays, and in + * recursion leaves. + */ + + /* trivial cases */ + if (hi - lo < 1) { + DUK_DDD(DUK_DDDPRINT("degenerate case, return immediately")); + return; + } + DUK_ASSERT(hi > lo); + DUK_ASSERT(hi - lo + 1 >= 2); + + /* randomized pivot selection */ + p = lo + (duk_int_t) (duk_util_get_random_double(thr) * (duk_double_t) (hi - lo + 1)); + DUK_ASSERT(p >= lo && p <= hi); + DUK_DDD(DUK_DDDPRINT("lo=%ld, hi=%ld, chose pivot p=%ld", (long) lo, (long) hi, (long) p)); + + /* move pivot out of the way */ + duk__array_sort_swap(thr, p, lo); + p = lo; + DUK_DDD(DUK_DDDPRINT("pivot moved out of the way: %!T", (duk_tval *) duk_get_tval(thr, 1))); + + l = lo + 1; + r = hi; + for (;;) { + /* find elements to swap */ + for (;;) { + DUK_DDD(DUK_DDDPRINT("left scan: l=%ld, r=%ld, p=%ld", (long) l, (long) r, (long) p)); + if (l >= hi) { + break; + } + if (duk__array_sort_compare(thr, l, p) >= 0) { /* !(l < p) */ + break; + } + l++; + } + for (;;) { + DUK_DDD(DUK_DDDPRINT("right scan: l=%ld, r=%ld, p=%ld", (long) l, (long) r, (long) p)); + if (r <= lo) { + break; + } + if (duk__array_sort_compare(thr, p, r) >= 0) { /* !(p < r) */ + break; + } + r--; + } + if (l >= r) { + goto done; + } + DUK_ASSERT(l < r); + + DUK_DDD(DUK_DDDPRINT("swap %ld and %ld", (long) l, (long) r)); + + duk__array_sort_swap(thr, l, r); + + DUK_DDD(DUK_DDDPRINT("after swap: %!T", (duk_tval *) duk_get_tval(thr, 1))); + l++; + r--; + } +done: + /* Note that 'l' and 'r' may cross, i.e. r < l */ + DUK_ASSERT(l >= lo && l <= hi); + DUK_ASSERT(r >= lo && r <= hi); + + /* XXX: there's no explicit recursion bound here now. For the average + * qsort recursion depth O(log n) that's not really necessary: e.g. for + * 2**32 recursion depth would be about 32 which is OK. However, qsort + * worst case recursion depth is O(n) which may be a problem. + */ + + /* move pivot to its final place */ + DUK_DDD(DUK_DDDPRINT("before final pivot swap: %!T", (duk_tval *) duk_get_tval(thr, 1))); + duk__array_sort_swap(thr, lo, r); + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) + duk__debuglog_qsort_state(thr, lo, hi, r); +#endif + + DUK_DDD(DUK_DDDPRINT("recurse: pivot=%ld, obj=%!T", (long) r, (duk_tval *) duk_get_tval(thr, 1))); + duk__array_qsort(thr, lo, r - 1); + duk__array_qsort(thr, r + 1, hi); +} + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_sort(duk_hthread *thr) { + duk_uint32_t len; + + /* XXX: len >= 0x80000000 won't work below because a signed type + * is needed by qsort. + */ + len = duk__push_this_obj_len_u32_limited(thr); + + /* stack[0] = compareFn + * stack[1] = ToObject(this) + * stack[2] = ToUint32(length) + */ + + if (len > 0) { + /* avoid degenerate cases, so that (len - 1) won't underflow */ + duk__array_qsort(thr, (duk_int_t) 0, (duk_int_t) (len - 1)); + } + + DUK_ASSERT_TOP(thr, 3); + duk_pop_nodecref_unsafe(thr); + return 1; /* return ToObject(this) */ +} + +/* + * splice() + */ + +/* XXX: this compiles to over 500 bytes now, even without special handling + * for an array part. Uses signed ints so does not handle full array range correctly. + */ + +/* XXX: can shift() / unshift() use the same helper? + * shift() is (close to?) <--> splice(0, 1) + * unshift is (close to?) <--> splice(0, 0, [items])? + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_splice(duk_hthread *thr) { + duk_idx_t nargs; + duk_uint32_t len_u32; + duk_int_t len; + duk_bool_t have_delcount; + duk_int_t item_count; + duk_int_t act_start; + duk_int_t del_count; + duk_int_t i, n; + + DUK_UNREF(have_delcount); + + nargs = duk_get_top(thr); + if (nargs < 2) { + duk_set_top(thr, 2); + nargs = 2; + have_delcount = 0; + } else { + have_delcount = 1; + } + + /* XXX: len >= 0x80000000 won't work below because we need to be + * able to represent -len. + */ + len_u32 = duk__push_this_obj_len_u32_limited(thr); + len = (duk_int_t) len_u32; + DUK_ASSERT(len >= 0); + + act_start = duk_to_int_clamped(thr, 0, -len, len); + if (act_start < 0) { + act_start = len + act_start; + } + DUK_ASSERT(act_start >= 0 && act_start <= len); + +#if defined(DUK_USE_NONSTD_ARRAY_SPLICE_DELCOUNT) + if (have_delcount) { +#endif + del_count = duk_to_int_clamped(thr, 1, 0, len - act_start); +#if defined(DUK_USE_NONSTD_ARRAY_SPLICE_DELCOUNT) + } else { + /* E5.1 standard behavior when deleteCount is not given would be + * to treat it just like if 'undefined' was given, which coerces + * ultimately to 0. Real world behavior is to splice to the end + * of array, see test-bi-array-proto-splice-no-delcount.js. + */ + del_count = len - act_start; + } +#endif + + DUK_ASSERT(nargs >= 2); + item_count = (duk_int_t) (nargs - 2); + + DUK_ASSERT(del_count >= 0 && del_count <= len - act_start); + DUK_ASSERT(del_count + act_start <= len); + + /* For now, restrict result array into 32-bit length range. */ + if (((duk_double_t) len) - ((duk_double_t) del_count) + ((duk_double_t) item_count) > (duk_double_t) DUK_UINT32_MAX) { + DUK_D(DUK_DPRINT("Array.prototype.splice() would go beyond 32-bit length, throw")); + DUK_DCERROR_RANGE_INVALID_LENGTH(thr); + } + + duk_push_array(thr); + + /* stack[0] = start + * stack[1] = deleteCount + * stack[2...nargs-1] = items + * stack[nargs] = ToObject(this) -3 + * stack[nargs+1] = ToUint32(length) -2 + * stack[nargs+2] = result array -1 + */ + + DUK_ASSERT_TOP(thr, nargs + 3); + + /* Step 9: copy elements-to-be-deleted into the result array */ + + for (i = 0; i < del_count; i++) { + if (duk_get_prop_index(thr, -3, (duk_uarridx_t) (act_start + i))) { + duk_xdef_prop_index_wec(thr, -2, (duk_uarridx_t) i); /* throw flag irrelevant (false in std alg) */ + } else { + duk_pop_undefined(thr); + } + } + duk_push_u32(thr, (duk_uint32_t) del_count); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_W); + + /* Steps 12 and 13: reorganize elements to make room for itemCount elements */ + + if (item_count < del_count) { + /* [ A B C D E F G H ] rel_index = 2, del_count 3, item count 1 + * -> [ A B F G H ] (conceptual intermediate step) + * -> [ A B . F G H ] (placeholder marked) + * [ A B C F G H ] (actual result at this point, C will be replaced) + */ + + DUK_ASSERT_TOP(thr, nargs + 3); + + n = len - del_count; + for (i = act_start; i < n; i++) { + if (duk_get_prop_index(thr, -3, (duk_uarridx_t) (i + del_count))) { + duk_put_prop_index(thr, -4, (duk_uarridx_t) (i + item_count)); + } else { + duk_pop_undefined(thr); + duk_del_prop_index(thr, -3, (duk_uarridx_t) (i + item_count)); + } + } + + DUK_ASSERT_TOP(thr, nargs + 3); + + /* loop iterator init and limit changed from standard algorithm */ + n = len - del_count + item_count; + for (i = len - 1; i >= n; i--) { + duk_del_prop_index(thr, -3, (duk_uarridx_t) i); + } + + DUK_ASSERT_TOP(thr, nargs + 3); + } else if (item_count > del_count) { + /* [ A B C D E F G H ] rel_index = 2, del_count 3, item count 4 + * -> [ A B F G H ] (conceptual intermediate step) + * -> [ A B . . . . F G H ] (placeholder marked) + * [ A B C D E F F G H ] (actual result at this point) + */ + + DUK_ASSERT_TOP(thr, nargs + 3); + + /* loop iterator init and limit changed from standard algorithm */ + for (i = len - del_count - 1; i >= act_start; i--) { + if (duk_get_prop_index(thr, -3, (duk_uarridx_t) (i + del_count))) { + duk_put_prop_index(thr, -4, (duk_uarridx_t) (i + item_count)); + } else { + duk_pop_undefined(thr); + duk_del_prop_index(thr, -3, (duk_uarridx_t) (i + item_count)); + } + } + + DUK_ASSERT_TOP(thr, nargs + 3); + } else { + /* [ A B C D E F G H ] rel_index = 2, del_count 3, item count 3 + * -> [ A B F G H ] (conceptual intermediate step) + * -> [ A B . . . F G H ] (placeholder marked) + * [ A B C D E F G H ] (actual result at this point) + */ + } + DUK_ASSERT_TOP(thr, nargs + 3); + + /* Step 15: insert itemCount elements into the hole made above */ + + for (i = 0; i < item_count; i++) { + duk_dup(thr, i + 2); /* args start at index 2 */ + duk_put_prop_index(thr, -4, (duk_uarridx_t) (act_start + i)); + } + + /* Step 16: update length; note that the final length may be above 32 bit range + * (but we checked above that this isn't the case here) + */ + + duk_push_u32(thr, (duk_uint32_t) (len - del_count + item_count)); + duk_put_prop_stridx_short(thr, -4, DUK_STRIDX_LENGTH); + + /* result array is already at the top of stack */ + DUK_ASSERT_TOP(thr, nargs + 3); + return 1; +} + +/* + * reverse() + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_reverse(duk_hthread *thr) { + duk_uint32_t len; + duk_uint32_t middle; + duk_uint32_t lower, upper; + duk_bool_t have_lower, have_upper; + + len = duk__push_this_obj_len_u32(thr); + middle = len / 2; + + /* If len <= 1, middle will be 0 and for-loop bails out + * immediately (0 < 0 -> false). + */ + + for (lower = 0; lower < middle; lower++) { + DUK_ASSERT(len >= 2); + DUK_ASSERT_TOP(thr, 2); + + DUK_ASSERT(len >= lower + 1); + upper = len - lower - 1; + + have_lower = duk_get_prop_index(thr, -2, (duk_uarridx_t) lower); + have_upper = duk_get_prop_index(thr, -3, (duk_uarridx_t) upper); + + /* [ ToObject(this) ToUint32(length) lowerValue upperValue ] */ + + if (have_upper) { + duk_put_prop_index(thr, -4, (duk_uarridx_t) lower); + } else { + duk_del_prop_index(thr, -4, (duk_uarridx_t) lower); + duk_pop_undefined(thr); + } + + if (have_lower) { + duk_put_prop_index(thr, -3, (duk_uarridx_t) upper); + } else { + duk_del_prop_index(thr, -3, (duk_uarridx_t) upper); + duk_pop_undefined(thr); + } + + DUK_ASSERT_TOP(thr, 2); + } + + DUK_ASSERT_TOP(thr, 2); + duk_pop_unsafe(thr); /* -> [ ToObject(this) ] */ + return 1; +} + +/* + * slice() + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_slice(duk_hthread *thr) { + duk_uint32_t len_u32; + duk_int_t len; + duk_int_t start, end; + duk_int_t i; + duk_uarridx_t idx; + duk_uint32_t res_length = 0; + + /* XXX: len >= 0x80000000 won't work below because we need to be + * able to represent -len. + */ + len_u32 = duk__push_this_obj_len_u32_limited(thr); + len = (duk_int_t) len_u32; + DUK_ASSERT(len >= 0); + + duk_push_array(thr); + + /* stack[0] = start + * stack[1] = end + * stack[2] = ToObject(this) + * stack[3] = ToUint32(length) + * stack[4] = result array + */ + + start = duk_to_int_clamped(thr, 0, -len, len); + if (start < 0) { + start = len + start; + } + /* XXX: could duk_is_undefined() provide defaulting undefined to 'len' + * (the upper limit)? + */ + if (duk_is_undefined(thr, 1)) { + end = len; + } else { + end = duk_to_int_clamped(thr, 1, -len, len); + if (end < 0) { + end = len + end; + } + } + DUK_ASSERT(start >= 0 && start <= len); + DUK_ASSERT(end >= 0 && end <= len); + + idx = 0; + for (i = start; i < end; i++) { + DUK_ASSERT_TOP(thr, 5); + if (duk_get_prop_index(thr, 2, (duk_uarridx_t) i)) { + duk_xdef_prop_index_wec(thr, 4, idx); + res_length = idx + 1; + } else { + duk_pop_undefined(thr); + } + idx++; + DUK_ASSERT_TOP(thr, 5); + } + + duk_push_u32(thr, res_length); + duk_xdef_prop_stridx_short(thr, 4, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_W); + + DUK_ASSERT_TOP(thr, 5); + return 1; +} + +/* + * shift() + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_shift(duk_hthread *thr) { + duk_uint32_t len; + duk_uint32_t i; + + len = duk__push_this_obj_len_u32(thr); + if (len == 0) { + duk_push_int(thr, 0); + duk_put_prop_stridx_short(thr, 0, DUK_STRIDX_LENGTH); + return 0; + } + + duk_get_prop_index(thr, 0, 0); + + /* stack[0] = object (this) + * stack[1] = ToUint32(length) + * stack[2] = elem at index 0 (retval) + */ + + for (i = 1; i < len; i++) { + DUK_ASSERT_TOP(thr, 3); + if (duk_get_prop_index(thr, 0, (duk_uarridx_t) i)) { + /* fromPresent = true */ + duk_put_prop_index(thr, 0, (duk_uarridx_t) (i - 1)); + } else { + /* fromPresent = false */ + duk_del_prop_index(thr, 0, (duk_uarridx_t) (i - 1)); + duk_pop_undefined(thr); + } + } + duk_del_prop_index(thr, 0, (duk_uarridx_t) (len - 1)); + + duk_push_u32(thr, (duk_uint32_t) (len - 1)); + duk_put_prop_stridx_short(thr, 0, DUK_STRIDX_LENGTH); + + DUK_ASSERT_TOP(thr, 3); + return 1; +} + +/* + * unshift() + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_unshift(duk_hthread *thr) { + duk_idx_t nargs; + duk_uint32_t len; + duk_uint32_t i; + + nargs = duk_get_top(thr); + len = duk__push_this_obj_len_u32(thr); + + /* stack[0...nargs-1] = unshift args (vararg) + * stack[nargs] = ToObject(this) + * stack[nargs+1] = ToUint32(length) + */ + + DUK_ASSERT_TOP(thr, nargs + 2); + + /* Note: unshift() may operate on indices above unsigned 32-bit range + * and the final length may be >= 2**32. However, we restrict the + * final result to 32-bit range for practicality. + */ + + if (len + (duk_uint32_t) nargs < len) { + DUK_D(DUK_DPRINT("Array.prototype.unshift() would go beyond 32-bit length, throw")); + DUK_DCERROR_RANGE_INVALID_LENGTH(thr); + } + + i = len; + while (i > 0) { + DUK_ASSERT_TOP(thr, nargs + 2); + i--; + /* k+argCount-1; note that may be above 32-bit range */ + + if (duk_get_prop_index(thr, -2, (duk_uarridx_t) i)) { + /* fromPresent = true */ + /* [ ... ToObject(this) ToUint32(length) val ] */ + duk_put_prop_index( + thr, + -3, + (duk_uarridx_t) (i + (duk_uint32_t) nargs)); /* -> [ ... ToObject(this) ToUint32(length) ] */ + } else { + /* fromPresent = false */ + /* [ ... ToObject(this) ToUint32(length) val ] */ + duk_pop_undefined(thr); + duk_del_prop_index( + thr, + -2, + (duk_uarridx_t) (i + (duk_uint32_t) nargs)); /* -> [ ... ToObject(this) ToUint32(length) ] */ + } + DUK_ASSERT_TOP(thr, nargs + 2); + } + + for (i = 0; i < (duk_uint32_t) nargs; i++) { + DUK_ASSERT_TOP(thr, nargs + 2); + duk_dup(thr, (duk_idx_t) i); /* -> [ ... ToObject(this) ToUint32(length) arg[i] ] */ + duk_put_prop_index(thr, -3, (duk_uarridx_t) i); + DUK_ASSERT_TOP(thr, nargs + 2); + } + + DUK_ASSERT_TOP(thr, nargs + 2); + duk_push_u32(thr, len + (duk_uint32_t) nargs); + duk_dup_top(thr); /* -> [ ... ToObject(this) ToUint32(length) final_len final_len ] */ + duk_put_prop_stridx_short(thr, -4, DUK_STRIDX_LENGTH); + return 1; +} + +/* + * indexOf(), lastIndexOf() + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_indexof_shared(duk_hthread *thr) { + duk_idx_t nargs; + duk_int_t i, len; + duk_int_t from_idx; + duk_small_int_t idx_step = duk_get_current_magic(thr); /* idx_step is +1 for indexOf, -1 for lastIndexOf */ + + /* lastIndexOf() needs to be a vararg function because we must distinguish + * between an undefined fromIndex and a "not given" fromIndex; indexOf() is + * made vararg for symmetry although it doesn't strictly need to be. + */ + + nargs = duk_get_top(thr); + duk_set_top(thr, 2); + + /* XXX: must be able to represent -len */ + len = (duk_int_t) duk__push_this_obj_len_u32_limited(thr); + if (len == 0) { + goto not_found; + } + + /* Index clamping is a bit tricky, we must ensure that we'll only iterate + * through elements that exist and that the specific requirements from E5.1 + * Sections 15.4.4.14 and 15.4.4.15 are fulfilled; especially: + * + * - indexOf: clamp to [-len,len], negative handling -> [0,len], + * if clamped result is len, for-loop bails out immediately + * + * - lastIndexOf: clamp to [-len-1, len-1], negative handling -> [-1, len-1], + * if clamped result is -1, for-loop bails out immediately + * + * If fromIndex is not given, ToInteger(undefined) = 0, which is correct + * for indexOf() but incorrect for lastIndexOf(). Hence special handling, + * and why lastIndexOf() needs to be a vararg function. + */ + + if (nargs >= 2) { + /* indexOf: clamp fromIndex to [-len, len] + * (if fromIndex == len, for-loop terminates directly) + * + * lastIndexOf: clamp fromIndex to [-len - 1, len - 1] + * (if clamped to -len-1 -> fromIndex becomes -1, terminates for-loop directly) + */ + from_idx = duk_to_int_clamped(thr, 1, (idx_step > 0 ? -len : -len - 1), (idx_step > 0 ? len : len - 1)); + if (from_idx < 0) { + /* for lastIndexOf, result may be -1 (mark immediate termination) */ + from_idx = len + from_idx; + } + } else { + /* for indexOf, ToInteger(undefined) would be 0, i.e. correct, but + * handle both indexOf and lastIndexOf specially here. + */ + if (idx_step > 0) { + from_idx = 0; + } else { + from_idx = len - 1; + } + } + + /* stack[0] = searchElement + * stack[1] = fromIndex + * stack[2] = object + * stack[3] = length (not needed, but not popped above) + */ + + for (i = from_idx; i >= 0 && i < len; i += idx_step) { + DUK_ASSERT_TOP(thr, 4); + + if (duk_get_prop_index(thr, 2, (duk_uarridx_t) i)) { + DUK_ASSERT_TOP(thr, 5); + if (duk_strict_equals(thr, 0, 4)) { + duk_push_int(thr, i); + return 1; + } + } + + duk_pop_unsafe(thr); + } + +not_found: + duk_push_int(thr, -1); + return 1; +} + +/* + * every(), some(), forEach(), map(), filter() + */ + +#define DUK__ITER_EVERY 0 +#define DUK__ITER_SOME 1 +#define DUK__ITER_FOREACH 2 +#define DUK__ITER_MAP 3 +#define DUK__ITER_FILTER 4 + +/* XXX: This helper is a bit awkward because the handling for the different iteration + * callers is quite different. This now compiles to a bit less than 500 bytes, so with + * 5 callers the net result is about 100 bytes / caller. + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_iter_shared(duk_hthread *thr) { + duk_uint32_t len; + duk_uint32_t i; + duk_uarridx_t k; + duk_bool_t bval; + duk_small_int_t iter_type = duk_get_current_magic(thr); + duk_uint32_t res_length = 0; + + /* each call this helper serves has nargs==2 */ + DUK_ASSERT_TOP(thr, 2); + + len = duk__push_this_obj_len_u32(thr); + duk_require_callable(thr, 0); + /* if thisArg not supplied, behave as if undefined was supplied */ + + if (iter_type == DUK__ITER_MAP || iter_type == DUK__ITER_FILTER) { + duk_push_array(thr); + } else { + duk_push_undefined(thr); + } + + /* stack[0] = callback + * stack[1] = thisArg + * stack[2] = object + * stack[3] = ToUint32(length) (unused, but avoid unnecessary pop) + * stack[4] = result array (or undefined) + */ + + k = 0; /* result index for filter() */ + for (i = 0; i < len; i++) { + DUK_ASSERT_TOP(thr, 5); + + if (!duk_get_prop_index(thr, 2, (duk_uarridx_t) i)) { + /* For 'map' trailing missing elements don't invoke the + * callback but count towards the result length. + */ + if (iter_type == DUK__ITER_MAP) { + res_length = i + 1; + } + duk_pop_undefined(thr); + continue; + } + + /* The original value needs to be preserved for filter(), hence + * this funny order. We can't re-get the value because of side + * effects. + */ + + duk_dup_0(thr); + duk_dup_1(thr); + duk_dup_m3(thr); + duk_push_u32(thr, i); + duk_dup_2(thr); /* [ ... val callback thisArg val i obj ] */ + duk_call_method(thr, 3); /* -> [ ... val retval ] */ + + switch (iter_type) { + case DUK__ITER_EVERY: + bval = duk_to_boolean(thr, -1); + if (!bval) { + /* stack top contains 'false' */ + return 1; + } + break; + case DUK__ITER_SOME: + bval = duk_to_boolean(thr, -1); + if (bval) { + /* stack top contains 'true' */ + return 1; + } + break; + case DUK__ITER_FOREACH: + /* nop */ + break; + case DUK__ITER_MAP: + duk_dup_top(thr); + duk_xdef_prop_index_wec(thr, 4, (duk_uarridx_t) i); /* retval to result[i] */ + res_length = i + 1; + break; + case DUK__ITER_FILTER: + bval = duk_to_boolean(thr, -1); + if (bval) { + duk_dup_m2(thr); /* orig value */ + duk_xdef_prop_index_wec(thr, 4, (duk_uarridx_t) k); + k++; + res_length = k; + } + break; + default: + DUK_UNREACHABLE(); + break; + } + duk_pop_2_unsafe(thr); + + DUK_ASSERT_TOP(thr, 5); + } + + switch (iter_type) { + case DUK__ITER_EVERY: + duk_push_true(thr); + break; + case DUK__ITER_SOME: + duk_push_false(thr); + break; + case DUK__ITER_FOREACH: + duk_push_undefined(thr); + break; + case DUK__ITER_MAP: + case DUK__ITER_FILTER: + DUK_ASSERT_TOP(thr, 5); + DUK_ASSERT(duk_is_array(thr, -1)); /* topmost element is the result array already */ + duk_push_u32(thr, res_length); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_W); + break; + default: + DUK_UNREACHABLE(); + break; + } + + return 1; +} + +/* + * reduce(), reduceRight() + */ + +DUK_INTERNAL duk_ret_t duk_bi_array_prototype_reduce_shared(duk_hthread *thr) { + duk_idx_t nargs; + duk_bool_t have_acc; + duk_uint32_t i, len; + duk_small_int_t idx_step = duk_get_current_magic(thr); /* idx_step is +1 for reduce, -1 for reduceRight */ + + /* We're a varargs function because we need to detect whether + * initialValue was given or not. + */ + nargs = duk_get_top(thr); + DUK_DDD(DUK_DDDPRINT("nargs=%ld", (long) nargs)); + + duk_set_top(thr, 2); + len = duk__push_this_obj_len_u32(thr); + duk_require_callable(thr, 0); + + /* stack[0] = callback fn + * stack[1] = initialValue + * stack[2] = object (coerced this) + * stack[3] = length (not needed, but not popped above) + * stack[4] = accumulator + */ + + have_acc = 0; + if (nargs >= 2) { + duk_dup_1(thr); + have_acc = 1; + } + DUK_DDD(DUK_DDDPRINT("have_acc=%ld, acc=%!T", (long) have_acc, (duk_tval *) duk_get_tval(thr, 3))); + + /* For len == 0, i is initialized to len - 1 which underflows. + * The condition (i < len) will then exit the for-loop on the + * first round which is correct. Similarly, loop termination + * happens by i underflowing. + */ + + for (i = (idx_step >= 0 ? 0 : len - 1); i < len; /* i >= 0 would always be true */ + i += (duk_uint32_t) idx_step) { + DUK_DDD(DUK_DDDPRINT("i=%ld, len=%ld, have_acc=%ld, top=%ld, acc=%!T", + (long) i, + (long) len, + (long) have_acc, + (long) duk_get_top(thr), + (duk_tval *) duk_get_tval(thr, 4))); + + DUK_ASSERT((have_acc && duk_get_top(thr) == 5) || (!have_acc && duk_get_top(thr) == 4)); + + if (!duk_has_prop_index(thr, 2, (duk_uarridx_t) i)) { + continue; + } + + if (!have_acc) { + DUK_ASSERT_TOP(thr, 4); + duk_get_prop_index(thr, 2, (duk_uarridx_t) i); + have_acc = 1; + DUK_ASSERT_TOP(thr, 5); + } else { + DUK_ASSERT_TOP(thr, 5); + duk_dup_0(thr); + duk_dup(thr, 4); + duk_get_prop_index(thr, 2, (duk_uarridx_t) i); + duk_push_u32(thr, i); + duk_dup_2(thr); + DUK_DDD(DUK_DDDPRINT("calling reduce function: func=%!T, prev=%!T, curr=%!T, idx=%!T, obj=%!T", + (duk_tval *) duk_get_tval(thr, -5), + (duk_tval *) duk_get_tval(thr, -4), + (duk_tval *) duk_get_tval(thr, -3), + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + duk_call(thr, 4); + DUK_DDD(DUK_DDDPRINT("-> result: %!T", (duk_tval *) duk_get_tval(thr, -1))); + duk_replace(thr, 4); + DUK_ASSERT_TOP(thr, 5); + } + } + + if (!have_acc) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + + DUK_ASSERT_TOP(thr, 5); + return 1; +} + +#endif /* DUK_USE_ARRAY_BUILTIN */ + +/* automatic undefs */ +#undef DUK__ARRAY_MID_JOIN_LIMIT +#undef DUK__ITER_EVERY +#undef DUK__ITER_FILTER +#undef DUK__ITER_FOREACH +#undef DUK__ITER_MAP +#undef DUK__ITER_SOME +#line 1 "duk_bi_boolean.c" +/* + * Boolean built-ins + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_BOOLEAN_BUILTIN) + +/* Shared helper to provide toString() and valueOf(). Checks 'this', gets + * the primitive value to stack top, and optionally coerces with ToString(). + */ +DUK_INTERNAL duk_ret_t duk_bi_boolean_prototype_tostring_shared(duk_hthread *thr) { + duk_tval *tv; + duk_hobject *h; + duk_small_int_t coerce_tostring = duk_get_current_magic(thr); + + /* XXX: there is room to use a shared helper here, many built-ins + * check the 'this' type, and if it's an object, check its class, + * then get its internal value, etc. + */ + + duk_push_this(thr); + tv = duk_get_tval(thr, -1); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_IS_BOOLEAN(tv)) { + goto type_ok; + } else if (DUK_TVAL_IS_OBJECT(tv)) { + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + + if (DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_BOOLEAN) { + duk_xget_owndataprop_stridx_short(thr, -1, DUK_STRIDX_INT_VALUE); + DUK_ASSERT(duk_is_boolean(thr, -1)); + goto type_ok; + } + } + + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + /* never here */ + +type_ok: + if (coerce_tostring) { + duk_to_string(thr, -1); + } + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_boolean_constructor(duk_hthread *thr) { + duk_hobject *h_this; + + duk_to_boolean(thr, 0); + + if (duk_is_constructor_call(thr)) { + /* XXX: helper; rely on Boolean.prototype as being non-writable, non-configurable */ + duk_push_this(thr); + h_this = duk_known_hobject(thr, -1); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h_this) == thr->builtins[DUK_BIDX_BOOLEAN_PROTOTYPE]); + + DUK_HOBJECT_SET_CLASS_NUMBER(h_this, DUK_HOBJECT_CLASS_BOOLEAN); + + duk_dup_0(thr); /* -> [ val obj val ] */ + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_VALUE, DUK_PROPDESC_FLAGS_NONE); /* XXX: proper flags? */ + } /* unbalanced stack */ + + return 1; +} + +#endif /* DUK_USE_BOOLEAN_BUILTIN */ +#line 1 "duk_bi_buffer.c" +/* + * ES2015 TypedArray and Node.js Buffer built-ins + */ + +/* #include duk_internal.h -> already included */ + +/* + * Helpers for buffer handling, enabled with DUK_USE_BUFFEROBJECT_SUPPORT. + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +/* Map class number (minus DUK_HOBJECT_CLASS_BUFOBJ_MIN) to a bidx for the + * default internal prototype. + */ +static const duk_uint8_t duk__buffer_proto_from_classnum[] = { + DUK_BIDX_ARRAYBUFFER_PROTOTYPE, DUK_BIDX_DATAVIEW_PROTOTYPE, DUK_BIDX_INT8ARRAY_PROTOTYPE, + DUK_BIDX_UINT8ARRAY_PROTOTYPE, DUK_BIDX_UINT8CLAMPEDARRAY_PROTOTYPE, DUK_BIDX_INT16ARRAY_PROTOTYPE, + DUK_BIDX_UINT16ARRAY_PROTOTYPE, DUK_BIDX_INT32ARRAY_PROTOTYPE, DUK_BIDX_UINT32ARRAY_PROTOTYPE, + DUK_BIDX_FLOAT32ARRAY_PROTOTYPE, DUK_BIDX_FLOAT64ARRAY_PROTOTYPE +}; + +/* Map DUK_HBUFOBJ_ELEM_xxx to duk_hobject class number. + * Sync with duk_hbufobj.h and duk_hobject.h. + */ +static const duk_uint8_t duk__buffer_class_from_elemtype[9] = { DUK_HOBJECT_CLASS_UINT8ARRAY, DUK_HOBJECT_CLASS_UINT8CLAMPEDARRAY, + DUK_HOBJECT_CLASS_INT8ARRAY, DUK_HOBJECT_CLASS_UINT16ARRAY, + DUK_HOBJECT_CLASS_INT16ARRAY, DUK_HOBJECT_CLASS_UINT32ARRAY, + DUK_HOBJECT_CLASS_INT32ARRAY, DUK_HOBJECT_CLASS_FLOAT32ARRAY, + DUK_HOBJECT_CLASS_FLOAT64ARRAY }; + +/* Map DUK_HBUFOBJ_ELEM_xxx to prototype object built-in index. + * Sync with duk_hbufobj.h. + */ +static const duk_uint8_t duk__buffer_proto_from_elemtype[9] = { + DUK_BIDX_UINT8ARRAY_PROTOTYPE, DUK_BIDX_UINT8CLAMPEDARRAY_PROTOTYPE, DUK_BIDX_INT8ARRAY_PROTOTYPE, + DUK_BIDX_UINT16ARRAY_PROTOTYPE, DUK_BIDX_INT16ARRAY_PROTOTYPE, DUK_BIDX_UINT32ARRAY_PROTOTYPE, + DUK_BIDX_INT32ARRAY_PROTOTYPE, DUK_BIDX_FLOAT32ARRAY_PROTOTYPE, DUK_BIDX_FLOAT64ARRAY_PROTOTYPE +}; + +/* Map DUK__FLD_xxx to byte size. */ +static const duk_uint8_t duk__buffer_nbytes_from_fldtype[6] = { + 1, /* DUK__FLD_8BIT */ + 2, /* DUK__FLD_16BIT */ + 4, /* DUK__FLD_32BIT */ + 4, /* DUK__FLD_FLOAT */ + 8, /* DUK__FLD_DOUBLE */ + 0 /* DUK__FLD_VARINT; not relevant here */ +}; + +/* Bitfield for each DUK_HBUFOBJ_ELEM_xxx indicating which element types + * are compatible with a blind byte copy for the TypedArray set() method (also + * used for TypedArray constructor). Array index is target buffer elem type, + * bitfield indicates compatible source types. The types must have same byte + * size and they must be coercion compatible. + */ +#if !defined(DUK_USE_PREFER_SIZE) +static duk_uint16_t duk__buffer_elemtype_copy_compatible[9] = { + /* xxx -> DUK_HBUFOBJ_ELEM_UINT8 */ + (1U << DUK_HBUFOBJ_ELEM_UINT8) | (1U << DUK_HBUFOBJ_ELEM_UINT8CLAMPED) | (1U << DUK_HBUFOBJ_ELEM_INT8), + + /* xxx -> DUK_HBUFOBJ_ELEM_UINT8CLAMPED + * Note: INT8 is -not- copy compatible, e.g. -1 would coerce to 0x00. + */ + (1U << DUK_HBUFOBJ_ELEM_UINT8) | (1U << DUK_HBUFOBJ_ELEM_UINT8CLAMPED), + + /* xxx -> DUK_HBUFOBJ_ELEM_INT8 */ + (1U << DUK_HBUFOBJ_ELEM_UINT8) | (1U << DUK_HBUFOBJ_ELEM_UINT8CLAMPED) | (1U << DUK_HBUFOBJ_ELEM_INT8), + + /* xxx -> DUK_HBUFOBJ_ELEM_UINT16 */ + (1U << DUK_HBUFOBJ_ELEM_UINT16) | (1U << DUK_HBUFOBJ_ELEM_INT16), + + /* xxx -> DUK_HBUFOBJ_ELEM_INT16 */ + (1U << DUK_HBUFOBJ_ELEM_UINT16) | (1U << DUK_HBUFOBJ_ELEM_INT16), + + /* xxx -> DUK_HBUFOBJ_ELEM_UINT32 */ + (1U << DUK_HBUFOBJ_ELEM_UINT32) | (1U << DUK_HBUFOBJ_ELEM_INT32), + + /* xxx -> DUK_HBUFOBJ_ELEM_INT32 */ + (1U << DUK_HBUFOBJ_ELEM_UINT32) | (1U << DUK_HBUFOBJ_ELEM_INT32), + + /* xxx -> DUK_HBUFOBJ_ELEM_FLOAT32 */ + (1U << DUK_HBUFOBJ_ELEM_FLOAT32), + + /* xxx -> DUK_HBUFOBJ_ELEM_FLOAT64 */ + (1U << DUK_HBUFOBJ_ELEM_FLOAT64) +}; +#endif /* !DUK_USE_PREFER_SIZE */ + +DUK_LOCAL duk_hbufobj *duk__hbufobj_promote_this(duk_hthread *thr) { + duk_tval *tv_dst; + duk_hbufobj *res; + + duk_push_this(thr); + DUK_ASSERT(duk_is_buffer(thr, -1)); + res = (duk_hbufobj *) duk_to_hobject(thr, -1); + DUK_HBUFOBJ_ASSERT_VALID(res); + DUK_DD(DUK_DDPRINT("promoted 'this' automatically to an ArrayBuffer: %!iT", duk_get_tval(thr, -1))); + + tv_dst = duk_get_borrowed_this_tval(thr); + DUK_TVAL_SET_OBJECT_UPDREF(thr, tv_dst, (duk_hobject *) res); + duk_pop(thr); + + return res; +} + +#define DUK__BUFOBJ_FLAG_THROW (1 << 0) +#define DUK__BUFOBJ_FLAG_PROMOTE (1 << 1) + +/* Shared helper. When DUK__BUFOBJ_FLAG_PROMOTE is given, the return value is + * always a duk_hbufobj *. Without the flag the return value can also be a + * plain buffer, and the caller must check for it using DUK_HEAPHDR_IS_BUFFER(). + */ +DUK_LOCAL duk_heaphdr *duk__getrequire_bufobj_this(duk_hthread *thr, duk_small_uint_t flags) { + duk_tval *tv; + duk_hbufobj *h_this; + + DUK_ASSERT(thr != NULL); + + tv = duk_get_borrowed_this_tval(thr); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_IS_OBJECT(tv)) { + h_this = (duk_hbufobj *) DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h_this != NULL); + if (DUK_HOBJECT_IS_BUFOBJ((duk_hobject *) h_this)) { + DUK_HBUFOBJ_ASSERT_VALID(h_this); + return (duk_heaphdr *) h_this; + } + } else if (DUK_TVAL_IS_BUFFER(tv)) { + if (flags & DUK__BUFOBJ_FLAG_PROMOTE) { + /* Promote a plain buffer to a Uint8Array. This is very + * inefficient but allows plain buffer to be used wherever an + * Uint8Array is used with very small cost; hot path functions + * like index read/write calls should provide direct buffer + * support to avoid promotion. + */ + /* XXX: make this conditional to a flag if call sites need it? */ + h_this = duk__hbufobj_promote_this(thr); + DUK_ASSERT(h_this != NULL); + DUK_HBUFOBJ_ASSERT_VALID(h_this); + return (duk_heaphdr *) h_this; + } else { + /* XXX: ugly, share return pointer for duk_hbuffer. */ + return (duk_heaphdr *) DUK_TVAL_GET_BUFFER(tv); + } + } + + if (flags & DUK__BUFOBJ_FLAG_THROW) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_BUFFER); + DUK_WO_NORETURN(return NULL;); + } + return NULL; +} + +/* Check that 'this' is a duk_hbufobj and return a pointer to it. */ +DUK_LOCAL duk_hbufobj *duk__get_bufobj_this(duk_hthread *thr) { + return (duk_hbufobj *) duk__getrequire_bufobj_this(thr, DUK__BUFOBJ_FLAG_PROMOTE); +} + +/* Check that 'this' is a duk_hbufobj and return a pointer to it + * (NULL if not). + */ +DUK_LOCAL duk_hbufobj *duk__require_bufobj_this(duk_hthread *thr) { + return (duk_hbufobj *) duk__getrequire_bufobj_this(thr, DUK__BUFOBJ_FLAG_THROW | DUK__BUFOBJ_FLAG_PROMOTE); +} + +/* Check that value is a duk_hbufobj and return a pointer to it. */ +DUK_LOCAL duk_hbufobj *duk__require_bufobj_value(duk_hthread *thr, duk_idx_t idx) { + duk_tval *tv; + duk_hbufobj *h_obj; + + /* Don't accept relative indices now. */ + DUK_ASSERT(idx >= 0); + + tv = duk_require_tval(thr, idx); + DUK_ASSERT(tv != NULL); + if (DUK_TVAL_IS_OBJECT(tv)) { + h_obj = (duk_hbufobj *) DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h_obj != NULL); + if (DUK_HOBJECT_IS_BUFOBJ((duk_hobject *) h_obj)) { + DUK_HBUFOBJ_ASSERT_VALID(h_obj); + return h_obj; + } + } else if (DUK_TVAL_IS_BUFFER(tv)) { + h_obj = (duk_hbufobj *) duk_to_hobject(thr, idx); + DUK_ASSERT(h_obj != NULL); + DUK_HBUFOBJ_ASSERT_VALID(h_obj); + return h_obj; + } + + DUK_ERROR_TYPE(thr, DUK_STR_NOT_BUFFER); + DUK_WO_NORETURN(return NULL;); +} + +DUK_LOCAL void duk__set_bufobj_buffer(duk_hthread *thr, duk_hbufobj *h_bufobj, duk_hbuffer *h_val) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(h_bufobj != NULL); + DUK_ASSERT(h_bufobj->buf == NULL); /* no need to decref */ + DUK_ASSERT(h_val != NULL); + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + DUK_UNREF(thr); + + h_bufobj->buf = h_val; + DUK_HBUFFER_INCREF(thr, h_val); + h_bufobj->length = (duk_uint_t) DUK_HBUFFER_GET_SIZE(h_val); + DUK_ASSERT(h_bufobj->shift == 0); + DUK_ASSERT(h_bufobj->elem_type == DUK_HBUFOBJ_ELEM_UINT8); + DUK_ASSERT(h_bufobj->is_typedarray == 0); + + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); +} + +/* Shared offset/length coercion helper. */ +DUK_LOCAL void duk__resolve_offset_opt_length(duk_hthread *thr, + duk_hbufobj *h_bufarg, + duk_idx_t idx_offset, + duk_idx_t idx_length, + duk_uint_t *out_offset, + duk_uint_t *out_length, + duk_bool_t throw_flag) { + duk_int_t offset_signed; + duk_int_t length_signed; + duk_uint_t offset; + duk_uint_t length; + + offset_signed = duk_to_int(thr, idx_offset); + if (offset_signed < 0) { + goto fail_range; + } + offset = (duk_uint_t) offset_signed; + if (offset > h_bufarg->length) { + goto fail_range; + } + DUK_ASSERT_DISABLE(offset >= 0); /* unsigned */ + DUK_ASSERT(offset <= h_bufarg->length); + + if (duk_is_undefined(thr, idx_length)) { + DUK_ASSERT(h_bufarg->length >= offset); + length = h_bufarg->length - offset; /* >= 0 */ + } else { + length_signed = duk_to_int(thr, idx_length); + if (length_signed < 0) { + goto fail_range; + } + length = (duk_uint_t) length_signed; + DUK_ASSERT(h_bufarg->length >= offset); + if (length > h_bufarg->length - offset) { + /* Unlike for negative arguments, some call sites + * want length to be clamped if it's positive. + */ + if (throw_flag) { + goto fail_range; + } else { + length = h_bufarg->length - offset; + } + } + } + DUK_ASSERT_DISABLE(length >= 0); /* unsigned */ + DUK_ASSERT(offset + length <= h_bufarg->length); + + *out_offset = offset; + *out_length = length; + return; + +fail_range: + DUK_ERROR_RANGE(thr, DUK_STR_INVALID_ARGS); + DUK_WO_NORETURN(return;); +} + +/* Shared lenient buffer length clamping helper. No negative indices, no + * element/byte shifting. + */ +DUK_LOCAL void duk__clamp_startend_nonegidx_noshift(duk_hthread *thr, + duk_int_t buffer_length, + duk_idx_t idx_start, + duk_idx_t idx_end, + duk_int_t *out_start_offset, + duk_int_t *out_end_offset) { + duk_int_t start_offset; + duk_int_t end_offset; + + DUK_ASSERT(out_start_offset != NULL); + DUK_ASSERT(out_end_offset != NULL); + + /* undefined coerces to zero which is correct */ + start_offset = duk_to_int_clamped(thr, idx_start, 0, buffer_length); + if (duk_is_undefined(thr, idx_end)) { + end_offset = buffer_length; + } else { + end_offset = duk_to_int_clamped(thr, idx_end, start_offset, buffer_length); + } + + DUK_ASSERT(start_offset >= 0); + DUK_ASSERT(start_offset <= buffer_length); + DUK_ASSERT(end_offset >= 0); + DUK_ASSERT(end_offset <= buffer_length); + DUK_ASSERT(start_offset <= end_offset); + + *out_start_offset = start_offset; + *out_end_offset = end_offset; +} + +/* Shared lenient buffer length clamping helper. Indices are treated as + * element indices (though output values are byte offsets) which only + * really matters for TypedArray views as other buffer object have a zero + * shift. Negative indices are counted from end of input slice; crossed + * indices are clamped to zero length; and final indices are clamped + * against input slice. Used for e.g. ArrayBuffer slice(). + */ +DUK_LOCAL void duk__clamp_startend_negidx_shifted(duk_hthread *thr, + duk_int_t buffer_length, + duk_uint8_t buffer_shift, + duk_idx_t idx_start, + duk_idx_t idx_end, + duk_int_t *out_start_offset, + duk_int_t *out_end_offset) { + duk_int_t start_offset; + duk_int_t end_offset; + + DUK_ASSERT(out_start_offset != NULL); + DUK_ASSERT(out_end_offset != NULL); + + buffer_length >>= buffer_shift; /* as (full) elements */ + + /* Resolve start/end offset as element indices first; arguments + * at idx_start/idx_end are element offsets. Working with element + * indices first also avoids potential for wrapping. + */ + + start_offset = duk_to_int(thr, idx_start); + if (start_offset < 0) { + start_offset = buffer_length + start_offset; + } + if (duk_is_undefined(thr, idx_end)) { + end_offset = buffer_length; + } else { + end_offset = duk_to_int(thr, idx_end); + if (end_offset < 0) { + end_offset = buffer_length + end_offset; + } + } + /* Note: start_offset/end_offset can still be < 0 here. */ + + if (start_offset < 0) { + start_offset = 0; + } else if (start_offset > buffer_length) { + start_offset = buffer_length; + } + if (end_offset < start_offset) { + end_offset = start_offset; + } else if (end_offset > buffer_length) { + end_offset = buffer_length; + } + DUK_ASSERT(start_offset >= 0); + DUK_ASSERT(start_offset <= buffer_length); + DUK_ASSERT(end_offset >= 0); + DUK_ASSERT(end_offset <= buffer_length); + DUK_ASSERT(start_offset <= end_offset); + + /* Convert indices to byte offsets. */ + start_offset <<= buffer_shift; + end_offset <<= buffer_shift; + + *out_start_offset = start_offset; + *out_end_offset = end_offset; +} + +DUK_INTERNAL void duk_hbufobj_promote_plain(duk_hthread *thr, duk_idx_t idx) { + if (duk_is_buffer(thr, idx)) { + duk_to_object(thr, idx); + } +} + +DUK_INTERNAL void duk_hbufobj_push_uint8array_from_plain(duk_hthread *thr, duk_hbuffer *h_buf) { + /* Push Uint8Array which will share the same underlying buffer as + * the plain buffer argument. Also create an ArrayBuffer with the + * same backing for the result .buffer property. + */ + + duk_push_hbuffer(thr, h_buf); + duk_push_buffer_object(thr, -1, 0, (duk_size_t) DUK_HBUFFER_GET_SIZE(h_buf), DUK_BUFOBJ_UINT8ARRAY); + duk_remove_m2(thr); + +#if 0 + /* More verbose equivalent; maybe useful if e.g. .buffer is omitted. */ + h_bufobj = duk_push_bufobj_raw(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | + DUK_HOBJECT_FLAG_BUFOBJ | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_UINT8ARRAY), + DUK_BIDX_UINT8ARRAY_PROTOTYPE); + DUK_ASSERT(h_bufobj != NULL); + duk__set_bufobj_buffer(thr, h_bufobj, h_buf); + h_bufobj->is_typedarray = 1; + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + + h_arrbuf = duk_push_bufobj_raw(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | + DUK_HOBJECT_FLAG_BUFOBJ | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_ARRAYBUFFER), + DUK_BIDX_ARRAYBUFFER_PROTOTYPE); + DUK_ASSERT(h_arrbuf != NULL); + duk__set_bufobj_buffer(thr, h_arrbuf, h_buf); + DUK_ASSERT(h_arrbuf->is_typedarray == 0); + DUK_HBUFOBJ_ASSERT_VALID(h_arrbuf); + + DUK_ASSERT(h_bufobj->buf_prop == NULL); + h_bufobj->buf_prop = (duk_hobject *) h_arrbuf; + DUK_ASSERT(h_arrbuf != NULL); + DUK_HBUFOBJ_INCREF(thr, h_arrbuf); + duk_pop(thr); +#endif +} + +/* Indexed read helper for buffer objects, also called from outside this file. */ +DUK_INTERNAL void duk_hbufobj_push_validated_read(duk_hthread *thr, + duk_hbufobj *h_bufobj, + duk_uint8_t *p, + duk_small_uint_t elem_size) { + duk_double_union du; + + DUK_ASSERT(elem_size > 0); + duk_memcpy((void *) du.uc, (const void *) p, (size_t) elem_size); + + switch (h_bufobj->elem_type) { + case DUK_HBUFOBJ_ELEM_UINT8: + case DUK_HBUFOBJ_ELEM_UINT8CLAMPED: + duk_push_uint(thr, (duk_uint_t) du.uc[0]); + break; + case DUK_HBUFOBJ_ELEM_INT8: + duk_push_int(thr, (duk_int_t) (duk_int8_t) du.uc[0]); + break; + case DUK_HBUFOBJ_ELEM_UINT16: + duk_push_uint(thr, (duk_uint_t) du.us[0]); + break; + case DUK_HBUFOBJ_ELEM_INT16: + duk_push_int(thr, (duk_int_t) (duk_int16_t) du.us[0]); + break; + case DUK_HBUFOBJ_ELEM_UINT32: + duk_push_uint(thr, (duk_uint_t) du.ui[0]); + break; + case DUK_HBUFOBJ_ELEM_INT32: + duk_push_int(thr, (duk_int_t) (duk_int32_t) du.ui[0]); + break; + case DUK_HBUFOBJ_ELEM_FLOAT32: + duk_push_number(thr, (duk_double_t) du.f[0]); + break; + case DUK_HBUFOBJ_ELEM_FLOAT64: + duk_push_number(thr, (duk_double_t) du.d); + break; + default: + DUK_UNREACHABLE(); + } +} + +/* Indexed write helper for buffer objects, also called from outside this file. */ +DUK_INTERNAL void duk_hbufobj_validated_write(duk_hthread *thr, duk_hbufobj *h_bufobj, duk_uint8_t *p, duk_small_uint_t elem_size) { + duk_double_union du; + + /* NOTE! Caller must ensure that any side effects from the + * coercions below are safe. If that cannot be guaranteed + * (which is normally the case), caller must coerce the + * argument using duk_to_number() before any pointer + * validations; the result of duk_to_number() always coerces + * without side effects here. + */ + + switch (h_bufobj->elem_type) { + case DUK_HBUFOBJ_ELEM_UINT8: + du.uc[0] = (duk_uint8_t) duk_to_uint32(thr, -1); + break; + case DUK_HBUFOBJ_ELEM_UINT8CLAMPED: + du.uc[0] = (duk_uint8_t) duk_to_uint8clamped(thr, -1); + break; + case DUK_HBUFOBJ_ELEM_INT8: + du.uc[0] = (duk_uint8_t) duk_to_int32(thr, -1); + break; + case DUK_HBUFOBJ_ELEM_UINT16: + du.us[0] = (duk_uint16_t) duk_to_uint32(thr, -1); + break; + case DUK_HBUFOBJ_ELEM_INT16: + du.us[0] = (duk_uint16_t) duk_to_int32(thr, -1); + break; + case DUK_HBUFOBJ_ELEM_UINT32: + du.ui[0] = (duk_uint32_t) duk_to_uint32(thr, -1); + break; + case DUK_HBUFOBJ_ELEM_INT32: + du.ui[0] = (duk_uint32_t) duk_to_int32(thr, -1); + break; + case DUK_HBUFOBJ_ELEM_FLOAT32: + /* A double-to-float cast is undefined behavior in C99 if + * the cast is out-of-range, so use a helper. Example: + * runtime error: value -1e+100 is outside the range of representable values of type 'float' + */ + du.f[0] = duk_double_to_float_t(duk_to_number_m1(thr)); + break; + case DUK_HBUFOBJ_ELEM_FLOAT64: + du.d = (duk_double_t) duk_to_number_m1(thr); + break; + default: + DUK_UNREACHABLE(); + } + + DUK_ASSERT(elem_size > 0); + duk_memcpy((void *) p, (const void *) du.uc, (size_t) elem_size); +} + +/* Helper to create a fixed buffer from argument value at index 0. + * Node.js and allocPlain() compatible. + */ +DUK_LOCAL duk_hbuffer *duk__hbufobj_fixed_from_argvalue(duk_hthread *thr) { + duk_int_t len; + duk_int_t i; + duk_size_t buf_size; + duk_uint8_t *buf; + + switch (duk_get_type(thr, 0)) { + case DUK_TYPE_NUMBER: { + len = duk_to_int_clamped(thr, 0, 0, DUK_INT_MAX); + (void) duk_push_fixed_buffer_zero(thr, (duk_size_t) len); + break; + } + case DUK_TYPE_BUFFER: { /* Treat like Uint8Array. */ + goto slow_copy; + } + case DUK_TYPE_OBJECT: { + duk_hobject *h; + duk_hbufobj *h_bufobj; + + /* For Node.js Buffers "Passing an ArrayBuffer returns a Buffer + * that shares allocated memory with the given ArrayBuffer." + * https://nodejs.org/api/buffer.html#buffer_buffer_from_buffer_alloc_and_buffer_allocunsafe + */ + + h = duk_known_hobject(thr, 0); + if (DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_ARRAYBUFFER) { + DUK_ASSERT(DUK_HOBJECT_IS_BUFOBJ(h)); + h_bufobj = (duk_hbufobj *) h; + if (DUK_UNLIKELY(h_bufobj->buf == NULL)) { + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return NULL;); + } + if (DUK_UNLIKELY(h_bufobj->offset != 0 || h_bufobj->length != DUK_HBUFFER_GET_SIZE(h_bufobj->buf))) { + /* No support for ArrayBuffers with slice + * offset/length. + */ + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return NULL;); + } + duk_push_hbuffer(thr, h_bufobj->buf); + return h_bufobj->buf; + } + goto slow_copy; + } + case DUK_TYPE_STRING: { + /* ignore encoding for now */ + duk_require_hstring_notsymbol(thr, 0); + duk_dup_0(thr); + (void) duk_to_buffer(thr, -1, &buf_size); + break; + } + default: + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return NULL;); + } + +done: + DUK_ASSERT(duk_is_buffer(thr, -1)); + return duk_known_hbuffer(thr, -1); + +slow_copy: + /* XXX: fast path for typed arrays and other buffer objects? */ + + (void) duk_get_prop_stridx_short(thr, 0, DUK_STRIDX_LENGTH); + len = duk_to_int_clamped(thr, -1, 0, DUK_INT_MAX); + duk_pop(thr); + buf = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, (duk_size_t) len); /* no zeroing, all indices get initialized */ + for (i = 0; i < len; i++) { + /* XXX: fast path for array or buffer arguments? */ + duk_get_prop_index(thr, 0, (duk_uarridx_t) i); + buf[i] = (duk_uint8_t) (duk_to_uint32(thr, -1) & 0xffU); + duk_pop(thr); + } + goto done; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer constructor + * + * Node.js Buffers are just Uint8Arrays with internal prototype set to + * Buffer.prototype so they're handled otherwise the same as Uint8Array. + * However, the constructor arguments are very different so a separate + * constructor entry point is used. + */ +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_nodejs_buffer_constructor(duk_hthread *thr) { + duk_hbuffer *h_buf; + + h_buf = duk__hbufobj_fixed_from_argvalue(thr); + DUK_ASSERT(h_buf != NULL); + + duk_push_buffer_object(thr, -1, 0, DUK_HBUFFER_FIXED_GET_SIZE((duk_hbuffer_fixed *) (void *) h_buf), DUK_BUFOBJ_UINT8ARRAY); + duk_push_hobject_bidx(thr, DUK_BIDX_NODEJS_BUFFER_PROTOTYPE); + duk_set_prototype(thr, -2); + + /* XXX: a more direct implementation */ + + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * ArrayBuffer, DataView, and TypedArray constructors + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_arraybuffer_constructor(duk_hthread *thr) { + duk_hbufobj *h_bufobj; + duk_hbuffer *h_val; + duk_int_t len; + + DUK_CTX_ASSERT_VALID(thr); + + duk_require_constructor_call(thr); + + len = duk_to_int(thr, 0); + if (len < 0) { + goto fail_length; + } + (void) duk_push_fixed_buffer_zero(thr, (duk_size_t) len); + h_val = (duk_hbuffer *) duk_known_hbuffer(thr, -1); + + h_bufobj = duk_push_bufobj_raw(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_BUFOBJ | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_ARRAYBUFFER), + DUK_BIDX_ARRAYBUFFER_PROTOTYPE); + DUK_ASSERT(h_bufobj != NULL); + + duk__set_bufobj_buffer(thr, h_bufobj, h_val); + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + + return 1; + +fail_length: + DUK_DCERROR_RANGE_INVALID_LENGTH(thr); +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* Format of magic, bits: + * 0...1: elem size shift (0-3) + * 2...5: elem type (DUK_HBUFOBJ_ELEM_xxx) + * + * XXX: add prototype bidx explicitly to magic instead of using a mapping? + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_typedarray_constructor(duk_hthread *thr) { + duk_tval *tv; + duk_hobject *h_obj; + duk_hbufobj *h_bufobj = NULL; + duk_hbufobj *h_bufarg = NULL; + duk_hbuffer *h_val; + duk_small_uint_t magic; + duk_small_uint_t shift; + duk_small_uint_t elem_type; + duk_small_uint_t elem_size; + duk_small_uint_t class_num; + duk_small_uint_t proto_bidx; + duk_uint_t align_mask; + duk_uint_t elem_length; + duk_int_t elem_length_signed; + duk_uint_t byte_length; + duk_small_uint_t copy_mode; + + /* XXX: The same copy helpers could be shared with at least some + * buffer functions. + */ + + duk_require_constructor_call(thr); + + /* We could fit built-in index into magic but that'd make the magic + * number dependent on built-in numbering (genbuiltins.py doesn't + * handle that yet). So map both class and prototype from the + * element type. + */ + magic = (duk_small_uint_t) duk_get_current_magic(thr); + shift = magic & 0x03U; /* bits 0...1: shift */ + elem_type = (magic >> 2) & 0x0fU; /* bits 2...5: type */ + elem_size = 1U << shift; + align_mask = elem_size - 1; + DUK_ASSERT(elem_type < sizeof(duk__buffer_proto_from_elemtype) / sizeof(duk_uint8_t)); + proto_bidx = duk__buffer_proto_from_elemtype[elem_type]; + DUK_ASSERT(proto_bidx < DUK_NUM_BUILTINS); + DUK_ASSERT(elem_type < sizeof(duk__buffer_class_from_elemtype) / sizeof(duk_uint8_t)); + class_num = duk__buffer_class_from_elemtype[elem_type]; + + DUK_DD(DUK_DDPRINT("typedarray constructor, magic=%d, shift=%d, elem_type=%d, " + "elem_size=%d, proto_bidx=%d, class_num=%d", + (int) magic, + (int) shift, + (int) elem_type, + (int) elem_size, + (int) proto_bidx, + (int) class_num)); + + /* Argument variants. When the argument is an ArrayBuffer a view to + * the same buffer is created; otherwise a new ArrayBuffer is always + * created. + */ + + /* XXX: initial iteration to treat a plain buffer like an ArrayBuffer: + * coerce to an ArrayBuffer object and use that as .buffer. The underlying + * buffer will be the same but result .buffer !== inputPlainBuffer. + */ + duk_hbufobj_promote_plain(thr, 0); + + tv = duk_get_tval(thr, 0); + DUK_ASSERT(tv != NULL); /* arg count */ + if (DUK_TVAL_IS_OBJECT(tv)) { + h_obj = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h_obj != NULL); + + if (DUK_HOBJECT_GET_CLASS_NUMBER(h_obj) == DUK_HOBJECT_CLASS_ARRAYBUFFER) { + /* ArrayBuffer: unlike any other argument variant, create + * a view into the existing buffer. + */ + + duk_int_t byte_offset_signed; + duk_uint_t byte_offset; + + h_bufarg = (duk_hbufobj *) h_obj; + + byte_offset_signed = duk_to_int(thr, 1); + if (byte_offset_signed < 0) { + goto fail_arguments; + } + byte_offset = (duk_uint_t) byte_offset_signed; + if (byte_offset > h_bufarg->length || (byte_offset & align_mask) != 0) { + /* Must be >= 0 and multiple of element size. */ + goto fail_arguments; + } + if (duk_is_undefined(thr, 2)) { + DUK_ASSERT(h_bufarg->length >= byte_offset); + byte_length = h_bufarg->length - byte_offset; + if ((byte_length & align_mask) != 0) { + /* Must be element size multiple from + * start offset to end of buffer. + */ + goto fail_arguments; + } + elem_length = (byte_length >> shift); + } else { + elem_length_signed = duk_to_int(thr, 2); + if (elem_length_signed < 0) { + goto fail_arguments; + } + elem_length = (duk_uint_t) elem_length_signed; + byte_length = elem_length << shift; + if ((byte_length >> shift) != elem_length) { + /* Byte length would overflow. */ + /* XXX: easier check with less code? */ + goto fail_arguments; + } + DUK_ASSERT(h_bufarg->length >= byte_offset); + if (byte_length > h_bufarg->length - byte_offset) { + /* Not enough data. */ + goto fail_arguments; + } + } + DUK_UNREF(elem_length); + DUK_ASSERT_DISABLE(byte_offset >= 0); + DUK_ASSERT(byte_offset <= h_bufarg->length); + DUK_ASSERT_DISABLE(byte_length >= 0); + DUK_ASSERT(byte_offset + byte_length <= h_bufarg->length); + DUK_ASSERT((elem_length << shift) == byte_length); + + h_bufobj = duk_push_bufobj_raw(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_BUFOBJ | + DUK_HOBJECT_CLASS_AS_FLAGS(class_num), + (duk_small_int_t) proto_bidx); + h_val = h_bufarg->buf; + if (h_val == NULL) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + h_bufobj->buf = h_val; + DUK_HBUFFER_INCREF(thr, h_val); + h_bufobj->offset = h_bufarg->offset + byte_offset; + h_bufobj->length = byte_length; + h_bufobj->shift = (duk_uint8_t) shift; + h_bufobj->elem_type = (duk_uint8_t) elem_type; + h_bufobj->is_typedarray = 1; + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + + /* Set .buffer to the argument ArrayBuffer. */ + DUK_ASSERT(h_bufobj->buf_prop == NULL); + h_bufobj->buf_prop = (duk_hobject *) h_bufarg; + DUK_ASSERT(h_bufarg != NULL); + DUK_HBUFOBJ_INCREF(thr, h_bufarg); + return 1; + } else if (DUK_HOBJECT_IS_BUFOBJ(h_obj)) { + /* TypedArray (or other non-ArrayBuffer duk_hbufobj). + * Conceptually same behavior as for an Array-like argument, + * with a few fast paths. + */ + + h_bufarg = (duk_hbufobj *) h_obj; + DUK_HBUFOBJ_ASSERT_VALID(h_bufarg); + elem_length_signed = (duk_int_t) (h_bufarg->length >> h_bufarg->shift); + if (h_bufarg->buf == NULL) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + + /* Select copy mode. Must take into account element + * compatibility and validity of the underlying source + * buffer. + */ + + DUK_DDD(DUK_DDDPRINT("selecting copy mode for bufobj arg, " + "src byte_length=%ld, src shift=%d, " + "src/dst elem_length=%ld; " + "dst shift=%d -> dst byte_length=%ld", + (long) h_bufarg->length, + (int) h_bufarg->shift, + (long) elem_length_signed, + (int) shift, + (long) (elem_length_signed << shift))); + + copy_mode = 2; /* default is explicit index read/write copy */ +#if !defined(DUK_USE_PREFER_SIZE) + /* With a size optimized build copy_mode 2 is enough. + * Modes 0 and 1 are faster but conceptually the same. + */ + DUK_ASSERT(elem_type < sizeof(duk__buffer_elemtype_copy_compatible) / sizeof(duk_uint16_t)); + if (DUK_HBUFOBJ_VALID_SLICE(h_bufarg)) { + if ((duk__buffer_elemtype_copy_compatible[elem_type] & (1 << h_bufarg->elem_type)) != 0) { + DUK_DDD(DUK_DDDPRINT("source/target are copy compatible, memcpy")); + DUK_ASSERT(shift == h_bufarg->shift); /* byte sizes will match */ + copy_mode = 0; + } else { + DUK_DDD(DUK_DDDPRINT("source/target not copy compatible but valid, fast copy")); + copy_mode = 1; + } + } +#endif /* !DUK_USE_PREFER_SIZE */ + } else { + /* Array or Array-like */ + elem_length_signed = (duk_int_t) duk_get_length(thr, 0); + copy_mode = 2; + } + } else { + /* Non-object argument is simply int coerced, matches + * V8 behavior (except for "null", which we coerce to + * 0 but V8 TypeErrors). + */ + elem_length_signed = duk_to_int(thr, 0); + copy_mode = 3; + } + if (elem_length_signed < 0) { + goto fail_arguments; + } + elem_length = (duk_uint_t) elem_length_signed; + byte_length = (duk_uint_t) (elem_length << shift); + if ((byte_length >> shift) != elem_length) { + /* Byte length would overflow. */ + /* XXX: easier check with less code? */ + goto fail_arguments; + } + + DUK_DDD(DUK_DDDPRINT("elem_length=%ld, byte_length=%ld", (long) elem_length, (long) byte_length)); + + /* ArrayBuffer argument is handled specially above; the rest of the + * argument variants are handled by shared code below. + * + * ArrayBuffer in h_bufobj->buf_prop is intentionally left unset. + * It will be automatically created by the .buffer accessor on + * first access. + */ + + /* Push the resulting view object on top of a plain fixed buffer. */ + (void) duk_push_fixed_buffer(thr, byte_length); + h_val = duk_known_hbuffer(thr, -1); + DUK_ASSERT(h_val != NULL); + + h_bufobj = + duk_push_bufobj_raw(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_BUFOBJ | DUK_HOBJECT_CLASS_AS_FLAGS(class_num), + (duk_small_int_t) proto_bidx); + + h_bufobj->buf = h_val; + DUK_HBUFFER_INCREF(thr, h_val); + DUK_ASSERT(h_bufobj->offset == 0); + h_bufobj->length = byte_length; + h_bufobj->shift = (duk_uint8_t) shift; + h_bufobj->elem_type = (duk_uint8_t) elem_type; + h_bufobj->is_typedarray = 1; + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + + /* Copy values, the copy method depends on the arguments. + * + * Copy mode decision may depend on the validity of the underlying + * buffer of the source argument; there must be no harmful side effects + * from there to here for copy_mode to still be valid. + */ + DUK_DDD(DUK_DDDPRINT("copy mode: %d", (int) copy_mode)); + switch (copy_mode) { + /* Copy modes 0 and 1 can be omitted in size optimized build, + * copy mode 2 handles them (but more slowly). + */ +#if !defined(DUK_USE_PREFER_SIZE) + case 0: { + /* Use byte copy. */ + + duk_uint8_t *p_src; + duk_uint8_t *p_dst; + + DUK_ASSERT(h_bufobj != NULL); + DUK_ASSERT(h_bufobj->buf != NULL); + DUK_ASSERT(DUK_HBUFOBJ_VALID_SLICE(h_bufobj)); + DUK_ASSERT(h_bufarg != NULL); + DUK_ASSERT(h_bufarg->buf != NULL); + DUK_ASSERT(DUK_HBUFOBJ_VALID_SLICE(h_bufarg)); + + p_dst = DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_bufobj); + p_src = DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_bufarg); + + DUK_DDD(DUK_DDDPRINT("using memcpy: p_src=%p, p_dst=%p, byte_length=%ld", + (void *) p_src, + (void *) p_dst, + (long) byte_length)); + + duk_memcpy_unsafe((void *) p_dst, (const void *) p_src, (size_t) byte_length); + break; + } + case 1: { + /* Copy values through direct validated reads and writes. */ + + duk_small_uint_t src_elem_size; + duk_small_uint_t dst_elem_size; + duk_uint8_t *p_src; + duk_uint8_t *p_src_end; + duk_uint8_t *p_dst; + + DUK_ASSERT(h_bufobj != NULL); + DUK_ASSERT(h_bufobj->buf != NULL); + DUK_ASSERT(DUK_HBUFOBJ_VALID_SLICE(h_bufobj)); + DUK_ASSERT(h_bufarg != NULL); + DUK_ASSERT(h_bufarg->buf != NULL); + DUK_ASSERT(DUK_HBUFOBJ_VALID_SLICE(h_bufarg)); + + src_elem_size = (duk_small_uint_t) (1U << h_bufarg->shift); + dst_elem_size = elem_size; + + p_src = DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_bufarg); + p_dst = DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_bufobj); + p_src_end = p_src + h_bufarg->length; + + DUK_DDD(DUK_DDDPRINT("using fast copy: p_src=%p, p_src_end=%p, p_dst=%p, " + "src_elem_size=%d, dst_elem_size=%d", + (void *) p_src, + (void *) p_src_end, + (void *) p_dst, + (int) src_elem_size, + (int) dst_elem_size)); + + while (p_src != p_src_end) { + DUK_DDD(DUK_DDDPRINT("fast path per element copy loop: " + "p_src=%p, p_src_end=%p, p_dst=%p", + (void *) p_src, + (void *) p_src_end, + (void *) p_dst)); + /* A validated read() is always a number, so it's write coercion + * is always side effect free an won't invalidate pointers etc. + */ + duk_hbufobj_push_validated_read(thr, h_bufarg, p_src, src_elem_size); + duk_hbufobj_validated_write(thr, h_bufobj, p_dst, dst_elem_size); + duk_pop(thr); + p_src += src_elem_size; + p_dst += dst_elem_size; + } + break; + } +#endif /* !DUK_USE_PREFER_SIZE */ + case 2: { + /* Copy values by index reads and writes. Let virtual + * property handling take care of coercion. + */ + duk_uint_t i; + + DUK_DDD(DUK_DDDPRINT("using slow copy")); + + for (i = 0; i < elem_length; i++) { + duk_get_prop_index(thr, 0, (duk_uarridx_t) i); + duk_put_prop_index(thr, -2, (duk_uarridx_t) i); + } + break; + } + default: + case 3: { + /* No copy, leave zero bytes in the buffer. There's no + * ambiguity with Float32/Float64 because zero bytes also + * represent 0.0. + */ + + DUK_DDD(DUK_DDDPRINT("using no copy")); + break; + } + } + + return 1; + +fail_arguments: + DUK_DCERROR_RANGE_INVALID_ARGS(thr); +} +#else /* DUK_USE_BUFFEROBJECT_SUPPORT */ +/* When bufferobject support is disabled, new Uint8Array() could still be + * supported to create a plain fixed buffer. Disabled for now. + */ +#if 0 +DUK_INTERNAL duk_ret_t duk_bi_typedarray_constructor(duk_hthread *thr) { + duk_int_t elem_length_signed; + duk_uint_t byte_length; + + /* XXX: The same copy helpers could be shared with at least some + * buffer functions. + */ + + duk_require_constructor_call(thr); + + elem_length_signed = duk_require_int(thr, 0); + if (elem_length_signed < 0) { + goto fail_arguments; + } + byte_length = (duk_uint_t) elem_length_signed; + + (void) duk_push_fixed_buffer_zero(thr, (duk_size_t) byte_length); + return 1; + + fail_arguments: + DUK_DCERROR_RANGE_INVALID_ARGS(thr); +} +#endif /* 0 */ +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_dataview_constructor(duk_hthread *thr) { + duk_hbufobj *h_bufarg; + duk_hbufobj *h_bufobj; + duk_hbuffer *h_val; + duk_uint_t offset; + duk_uint_t length; + + duk_require_constructor_call(thr); + + h_bufarg = duk__require_bufobj_value(thr, 0); + DUK_ASSERT(h_bufarg != NULL); + if (DUK_HOBJECT_GET_CLASS_NUMBER((duk_hobject *) h_bufarg) != DUK_HOBJECT_CLASS_ARRAYBUFFER) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + + duk__resolve_offset_opt_length(thr, h_bufarg, 1, 2, &offset, &length, 1 /*throw_flag*/); + DUK_ASSERT(offset <= h_bufarg->length); + DUK_ASSERT(offset + length <= h_bufarg->length); + + h_bufobj = duk_push_bufobj_raw(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_BUFOBJ | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_DATAVIEW), + DUK_BIDX_DATAVIEW_PROTOTYPE); + + h_val = h_bufarg->buf; + if (h_val == NULL) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + h_bufobj->buf = h_val; + DUK_HBUFFER_INCREF(thr, h_val); + h_bufobj->offset = h_bufarg->offset + offset; + h_bufobj->length = length; + DUK_ASSERT(h_bufobj->shift == 0); + DUK_ASSERT(h_bufobj->elem_type == DUK_HBUFOBJ_ELEM_UINT8); + DUK_ASSERT(h_bufobj->is_typedarray == 0); + + DUK_ASSERT(h_bufobj->buf_prop == NULL); + h_bufobj->buf_prop = (duk_hobject *) h_bufarg; + DUK_ASSERT(h_bufarg != NULL); + DUK_HBUFOBJ_INCREF(thr, h_bufarg); + + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * ArrayBuffer.isView() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_arraybuffer_isview(duk_hthread *thr) { + duk_hobject *h_obj; + duk_bool_t ret = 0; + + if (duk_is_buffer(thr, 0)) { + ret = 1; + } else { + h_obj = duk_get_hobject(thr, 0); + if (h_obj != NULL && DUK_HOBJECT_IS_BUFOBJ(h_obj)) { + /* DataView needs special casing: ArrayBuffer.isView() is + * true, but ->is_typedarray is 0. + */ + ret = ((duk_hbufobj *) h_obj)->is_typedarray || + (DUK_HOBJECT_GET_CLASS_NUMBER(h_obj) == DUK_HOBJECT_CLASS_DATAVIEW); + } + } + duk_push_boolean(thr, ret); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Uint8Array.allocPlain() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_uint8array_allocplain(duk_hthread *thr) { + duk__hbufobj_fixed_from_argvalue(thr); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Uint8Array.plainOf() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_uint8array_plainof(duk_hthread *thr) { + duk_hbufobj *h_bufobj; + +#if !defined(DUK_USE_PREFER_SIZE) + /* Avoid churn if argument is already a plain buffer. */ + if (duk_is_buffer(thr, 0)) { + return 1; + } +#endif + + /* Promotes plain buffers to ArrayBuffers, so for a plain buffer + * argument we'll create a pointless temporary (but still work + * correctly). + */ + h_bufobj = duk__require_bufobj_value(thr, 0); + if (h_bufobj->buf == NULL) { + duk_push_undefined(thr); + } else { + duk_push_hbuffer(thr, h_bufobj->buf); + } + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer: toString([encoding], [start], [end]) + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_nodejs_buffer_tostring(duk_hthread *thr) { + duk_hbufobj *h_this; + duk_int_t start_offset, end_offset; + duk_uint8_t *buf_slice; + duk_size_t slice_length; + + h_this = duk__get_bufobj_this(thr); + if (h_this == NULL) { + /* XXX: happens e.g. when evaluating: String(Buffer.prototype). */ + duk_push_literal(thr, "[object Object]"); + return 1; + } + DUK_HBUFOBJ_ASSERT_VALID(h_this); + + /* Ignore encoding for now. */ + + duk__clamp_startend_nonegidx_noshift(thr, + (duk_int_t) h_this->length, + 1 /*idx_start*/, + 2 /*idx_end*/, + &start_offset, + &end_offset); + + slice_length = (duk_size_t) (end_offset - start_offset); + buf_slice = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, slice_length); /* all bytes initialized below */ + DUK_ASSERT(buf_slice != NULL); + + /* Neutered or uncovered, TypeError. */ + if (h_this->buf == NULL || !DUK_HBUFOBJ_VALID_BYTEOFFSET_EXCL(h_this, (duk_size_t) start_offset + slice_length)) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + + /* XXX: ideally we wouldn't make a copy but a view into the buffer for the + * decoding process. Or the decoding helper could be changed to accept + * the slice info (a buffer pointer is NOT a good approach because guaranteeing + * its stability is difficult). + */ + + DUK_ASSERT(DUK_HBUFOBJ_VALID_BYTEOFFSET_EXCL(h_this, (duk_size_t) start_offset + slice_length)); + duk_memcpy_unsafe((void *) buf_slice, + (const void *) (DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_this) + start_offset), + (size_t) slice_length); + + /* Use the equivalent of: new TextEncoder().encode(this) to convert the + * string. Result will be valid UTF-8; non-CESU-8 inputs are currently + * interpreted loosely. Value stack convention is a bit odd for now. + */ + duk_replace(thr, 0); + duk_set_top(thr, 1); + return duk_textdecoder_decode_utf8_nodejs(thr); +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer.prototype: toJSON() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_nodejs_buffer_tojson(duk_hthread *thr) { + duk_hbufobj *h_this; + duk_uint8_t *buf; + duk_uint_t i, n; + duk_tval *tv; + + h_this = duk__require_bufobj_this(thr); + DUK_ASSERT(h_this != NULL); + + if (h_this->buf == NULL || !DUK_HBUFOBJ_VALID_SLICE(h_this)) { + /* Serialize uncovered backing buffer as a null; doesn't + * really matter as long we're memory safe. + */ + duk_push_null(thr); + return 1; + } + + duk_push_object(thr); + duk_push_hstring_stridx(thr, DUK_STRIDX_UC_BUFFER); + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_TYPE); + + /* XXX: uninitialized would be OK */ + DUK_ASSERT_DISABLE((duk_size_t) h_this->length <= (duk_size_t) DUK_UINT32_MAX); + tv = duk_push_harray_with_size_outptr(thr, (duk_uint32_t) h_this->length); /* XXX: needs revision with >4G buffers */ + DUK_ASSERT(!duk_is_bare_object(thr, -1)); + + DUK_ASSERT(h_this->buf != NULL); + buf = DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_this); + for (i = 0, n = h_this->length; i < n; i++) { + DUK_TVAL_SET_U32(tv + i, (duk_uint32_t) buf[i]); /* no need for decref or incref */ + } + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_DATA); + + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer.prototype.equals() + * Node.js Buffer.prototype.compare() + * Node.js Buffer.compare() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_buffer_compare_shared(duk_hthread *thr) { + duk_small_uint_t magic; + duk_hbufobj *h_bufarg1; + duk_hbufobj *h_bufarg2; + duk_small_int_t comp_res; + + /* XXX: keep support for plain buffers and non-Node.js buffers? */ + + magic = (duk_small_uint_t) duk_get_current_magic(thr); + if (magic & 0x02U) { + /* Static call style. */ + h_bufarg1 = duk__require_bufobj_value(thr, 0); + h_bufarg2 = duk__require_bufobj_value(thr, 1); + } else { + h_bufarg1 = duk__require_bufobj_this(thr); + h_bufarg2 = duk__require_bufobj_value(thr, 0); + } + DUK_ASSERT(h_bufarg1 != NULL); + DUK_ASSERT(h_bufarg2 != NULL); + + /* We want to compare the slice/view areas of the arguments. + * If either slice/view is invalid (underlying buffer is shorter) + * ensure equals() is false, but otherwise the only thing that + * matters is to be memory safe. + */ + + if (DUK_HBUFOBJ_VALID_SLICE(h_bufarg1) && DUK_HBUFOBJ_VALID_SLICE(h_bufarg2)) { + comp_res = duk_js_data_compare( + (const duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h_bufarg1->buf) + h_bufarg1->offset, + (const duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h_bufarg2->buf) + h_bufarg2->offset, + (duk_size_t) h_bufarg1->length, + (duk_size_t) h_bufarg2->length); + } else { + comp_res = -1; /* either nonzero value is ok */ + } + + if (magic & 0x01U) { + /* compare: similar to string comparison but for buffer data. */ + duk_push_int(thr, comp_res); + } else { + /* equals */ + duk_push_boolean(thr, (comp_res == 0)); + } + + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer.prototype.fill() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_nodejs_buffer_fill(duk_hthread *thr) { + duk_hbufobj *h_this; + const duk_uint8_t *fill_str_ptr; + duk_size_t fill_str_len; + duk_uint8_t fill_value; + duk_int_t fill_offset; + duk_int_t fill_end; + duk_size_t fill_length; + duk_uint8_t *p; + + h_this = duk__require_bufobj_this(thr); + DUK_ASSERT(h_this != NULL); + if (h_this->buf == NULL) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + + /* [ value offset end ] */ + + if (duk_is_string_notsymbol(thr, 0)) { + fill_str_ptr = (const duk_uint8_t *) duk_get_lstring(thr, 0, &fill_str_len); + DUK_ASSERT(fill_str_ptr != NULL); + } else { + /* Symbols get ToNumber() coerced and cause TypeError. */ + fill_value = (duk_uint8_t) duk_to_uint32(thr, 0); + fill_str_ptr = (const duk_uint8_t *) &fill_value; + fill_str_len = 1; + } + + /* Fill offset handling is more lenient than in Node.js. */ + + duk__clamp_startend_nonegidx_noshift(thr, + (duk_int_t) h_this->length, + 1 /*idx_start*/, + 2 /*idx_end*/, + &fill_offset, + &fill_end); + + DUK_DDD(DUK_DDDPRINT("fill: fill_value=%02x, fill_offset=%ld, fill_end=%ld, view length=%ld", + (unsigned int) fill_value, + (long) fill_offset, + (long) fill_end, + (long) h_this->length)); + + DUK_ASSERT(fill_end - fill_offset >= 0); + DUK_ASSERT(h_this->buf != NULL); + + p = (DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_this) + fill_offset); + fill_length = (duk_size_t) (fill_end - fill_offset); + if (fill_str_len == 1) { + /* Handle single character fills as memset() even when + * the fill data comes from a one-char argument. + */ + duk_memset_unsafe((void *) p, (int) fill_str_ptr[0], (size_t) fill_length); + } else if (fill_str_len > 1) { + duk_size_t i, n, t; + + for (i = 0, n = (duk_size_t) (fill_end - fill_offset), t = 0; i < n; i++) { + p[i] = fill_str_ptr[t++]; + if (t >= fill_str_len) { + t = 0; + } + } + } else { + DUK_DDD(DUK_DDDPRINT("zero size fill pattern, ignore silently")); + } + + /* Return the Buffer to allow chaining: b.fill(0x11).fill(0x22, 3, 5).toString() */ + duk_push_this(thr); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer.prototype.write(string, [offset], [length], [encoding]) + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_nodejs_buffer_write(duk_hthread *thr) { + duk_hbufobj *h_this; + duk_uint_t offset; + duk_uint_t length; + const duk_uint8_t *str_data; + duk_size_t str_len; + + /* XXX: very inefficient support for plain buffers */ + h_this = duk__require_bufobj_this(thr); + DUK_ASSERT(h_this != NULL); + + /* Argument must be a string, e.g. a buffer is not allowed. */ + str_data = (const duk_uint8_t *) duk_require_lstring_notsymbol(thr, 0, &str_len); + + duk__resolve_offset_opt_length(thr, h_this, 1, 2, &offset, &length, 0 /*throw_flag*/); + DUK_ASSERT(offset <= h_this->length); + DUK_ASSERT(offset + length <= h_this->length); + + /* XXX: encoding is ignored now. */ + + if (length > str_len) { + length = (duk_uint_t) str_len; + } + + if (DUK_HBUFOBJ_VALID_SLICE(h_this)) { + /* Cannot overlap. */ + duk_memcpy_unsafe((void *) (DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_this) + offset), + (const void *) str_data, + (size_t) length); + } else { + DUK_DDD(DUK_DDDPRINT("write() target buffer is not covered, silent ignore")); + } + + duk_push_uint(thr, length); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer.prototype.copy() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_nodejs_buffer_copy(duk_hthread *thr) { + duk_hbufobj *h_this; + duk_hbufobj *h_bufarg; + duk_int_t source_length; + duk_int_t target_length; + duk_int_t target_start, source_start, source_end; + duk_uint_t target_ustart, source_ustart, source_uend; + duk_uint_t copy_size = 0; + + /* [ targetBuffer targetStart sourceStart sourceEnd ] */ + + h_this = duk__require_bufobj_this(thr); + h_bufarg = duk__require_bufobj_value(thr, 0); + DUK_ASSERT(h_this != NULL); + DUK_ASSERT(h_bufarg != NULL); + source_length = (duk_int_t) h_this->length; + target_length = (duk_int_t) h_bufarg->length; + + target_start = duk_to_int(thr, 1); + source_start = duk_to_int(thr, 2); + if (duk_is_undefined(thr, 3)) { + source_end = source_length; + } else { + source_end = duk_to_int(thr, 3); + } + + DUK_DDD(DUK_DDDPRINT("checking copy args: target_start=%ld, target_length=%ld, " + "source_start=%ld, source_end=%ld, source_length=%ld", + (long) target_start, + (long) h_bufarg->length, + (long) source_start, + (long) source_end, + (long) source_length)); + + /* This behavior mostly mimics Node.js now. */ + + if (source_start < 0 || source_end < 0 || target_start < 0) { + /* Negative offsets cause a RangeError. */ + goto fail_bounds; + } + source_ustart = (duk_uint_t) source_start; + source_uend = (duk_uint_t) source_end; + target_ustart = (duk_uint_t) target_start; + if (source_ustart >= source_uend || /* crossed offsets or zero size */ + source_ustart >= (duk_uint_t) source_length || /* source out-of-bounds (but positive) */ + target_ustart >= (duk_uint_t) target_length) { /* target out-of-bounds (but positive) */ + goto silent_ignore; + } + if (source_uend >= (duk_uint_t) source_length) { + /* Source end clamped silently to available length. */ + source_uend = (duk_uint_t) source_length; + } + copy_size = source_uend - source_ustart; + if (target_ustart + copy_size > (duk_uint_t) target_length) { + /* Clamp to target's end if too long. + * + * NOTE: there's no overflow possibility in the comparison; + * both target_ustart and copy_size are >= 0 and based on + * values in duk_int_t range. Adding them as duk_uint_t + * values is then guaranteed not to overflow. + */ + DUK_ASSERT(target_ustart + copy_size >= target_ustart); /* no overflow */ + DUK_ASSERT(target_ustart + copy_size >= copy_size); /* no overflow */ + copy_size = (duk_uint_t) target_length - target_ustart; + } + + DUK_DDD(DUK_DDDPRINT("making copy: target_ustart=%lu source_ustart=%lu copy_size=%lu", + (unsigned long) target_ustart, + (unsigned long) source_ustart, + (unsigned long) copy_size)); + + DUK_ASSERT(copy_size >= 1); + DUK_ASSERT(source_ustart <= (duk_uint_t) source_length); + DUK_ASSERT(source_ustart + copy_size <= (duk_uint_t) source_length); + DUK_ASSERT(target_ustart <= (duk_uint_t) target_length); + DUK_ASSERT(target_ustart + copy_size <= (duk_uint_t) target_length); + + /* Ensure copy is covered by underlying buffers. */ + DUK_ASSERT(h_bufarg->buf != NULL); /* length check */ + DUK_ASSERT(h_this->buf != NULL); /* length check */ + if (DUK_HBUFOBJ_VALID_BYTEOFFSET_EXCL(h_bufarg, target_ustart + copy_size) && + DUK_HBUFOBJ_VALID_BYTEOFFSET_EXCL(h_this, source_ustart + copy_size)) { + /* Must use memmove() because copy area may overlap (source and target + * buffer may be the same, or from different slices. + */ + duk_memmove_unsafe((void *) (DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_bufarg) + target_ustart), + (const void *) (DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_this) + source_ustart), + (size_t) copy_size); + } else { + DUK_DDD(DUK_DDDPRINT("buffer copy not covered by underlying buffer(s), ignoring")); + } + +silent_ignore: + /* Return value is like write(), number of bytes written. + * The return value matters because of code like: + * "off += buf.copy(...)". + */ + duk_push_uint(thr, copy_size); + return 1; + +fail_bounds: + DUK_DCERROR_RANGE_INVALID_ARGS(thr); +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * TypedArray.prototype.set() + * + * TypedArray set() is pretty interesting to implement because: + * + * - The source argument may be a plain array or a typedarray. If the + * source is a TypedArray, values are decoded and re-encoded into the + * target (not as a plain byte copy). This may happen even when the + * element byte size is the same, e.g. integer values may be re-encoded + * into floats. + * + * - Source and target may refer to the same underlying buffer, so that + * the set() operation may overlap. The specification requires that this + * must work as if a copy was made before the operation. Note that this + * is NOT a simple memmove() situation because the source and target + * byte sizes may be different -- e.g. a 4-byte source (Int8Array) may + * expand to a 16-byte target (Uint32Array) so that the target overlaps + * the source both from beginning and the end (unlike in typical memmove). + * + * - Even if 'buf' pointers of the source and target differ, there's no + * guarantee that their memory areas don't overlap. This may be the + * case with external buffers. + * + * Even so, it is nice to optimize for the common case: + * + * - Source and target separate buffers or non-overlapping. + * + * - Source and target have a compatible type so that a plain byte copy + * is possible. Note that while e.g. uint8 and int8 are compatible + * (coercion one way or another doesn't change the byte representation), + * e.g. int8 and uint8clamped are NOT compatible when writing int8 + * values into uint8clamped typedarray (-1 would clamp to 0 for instance). + * + * See test-bi-typedarray-proto-set.js. + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_typedarray_set(duk_hthread *thr) { + duk_hbufobj *h_this; + duk_hobject *h_obj; + duk_uarridx_t i, n; + duk_int_t offset_signed; + duk_uint_t offset_elems; + duk_uint_t offset_bytes; + + h_this = duk__require_bufobj_this(thr); + DUK_ASSERT(h_this != NULL); + DUK_HBUFOBJ_ASSERT_VALID(h_this); + + if (h_this->buf == NULL) { + DUK_DDD(DUK_DDDPRINT("source neutered, skip copy")); + return 0; + } + + duk_hbufobj_promote_plain(thr, 0); + h_obj = duk_require_hobject(thr, 0); + + /* XXX: V8 throws a TypeError for negative values. Would it + * be more useful to interpret negative offsets here from the + * end of the buffer too? + */ + offset_signed = duk_to_int(thr, 1); + if (offset_signed < 0) { + /* For some reason this is a TypeError (at least in V8). */ + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + offset_elems = (duk_uint_t) offset_signed; + offset_bytes = offset_elems << h_this->shift; + if ((offset_bytes >> h_this->shift) != offset_elems) { + /* Byte length would overflow. */ + /* XXX: easier check with less code? */ + goto fail_args; + } + if (offset_bytes > h_this->length) { + /* Equality may be OK but >length not. Checking + * this explicitly avoids some overflow cases + * below. + */ + goto fail_args; + } + DUK_ASSERT(offset_bytes <= h_this->length); + + /* Fast path: source is a TypedArray (or any bufobj). */ + + if (DUK_HOBJECT_IS_BUFOBJ(h_obj)) { + duk_hbufobj *h_bufarg; +#if !defined(DUK_USE_PREFER_SIZE) + duk_uint16_t comp_mask; +#endif + duk_small_int_t no_overlap = 0; + duk_uint_t src_length; + duk_uint_t dst_length; + duk_uint_t dst_length_elems; + duk_uint8_t *p_src_base; + duk_uint8_t *p_src_end; + duk_uint8_t *p_src; + duk_uint8_t *p_dst_base; + duk_uint8_t *p_dst; + duk_small_uint_t src_elem_size; + duk_small_uint_t dst_elem_size; + + h_bufarg = (duk_hbufobj *) h_obj; + DUK_HBUFOBJ_ASSERT_VALID(h_bufarg); + + if (h_bufarg->buf == NULL) { + DUK_DDD(DUK_DDDPRINT("target neutered, skip copy")); + return 0; + } + + /* Nominal size check. */ + src_length = h_bufarg->length; /* bytes in source */ + dst_length_elems = (src_length >> h_bufarg->shift); /* elems in source and dest */ + dst_length = dst_length_elems << h_this->shift; /* bytes in dest */ + if ((dst_length >> h_this->shift) != dst_length_elems) { + /* Byte length would overflow. */ + /* XXX: easier check with less code? */ + goto fail_args; + } + DUK_DDD(DUK_DDDPRINT("nominal size check: src_length=%ld, dst_length=%ld", (long) src_length, (long) dst_length)); + DUK_ASSERT(offset_bytes <= h_this->length); + if (dst_length > h_this->length - offset_bytes) { + /* Overflow not an issue because subtraction is used on the right + * side and guaranteed to be >= 0. + */ + DUK_DDD(DUK_DDDPRINT("copy exceeds target buffer nominal length")); + goto fail_args; + } + if (!DUK_HBUFOBJ_VALID_BYTEOFFSET_EXCL(h_this, offset_bytes + dst_length)) { + DUK_DDD(DUK_DDDPRINT("copy not covered by underlying target buffer, ignore")); + return 0; + } + + p_src_base = DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_bufarg); + p_dst_base = DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_this) + offset_bytes; + + /* Check actual underlying buffers for validity and that they + * cover the copy. No side effects are allowed after the check + * so that the validity status doesn't change. + */ + if (!DUK_HBUFOBJ_VALID_SLICE(h_this) || !DUK_HBUFOBJ_VALID_SLICE(h_bufarg)) { + /* The condition could be more narrow and check for the + * copy area only, but there's no need for fine grained + * behavior when the underlying buffer is misconfigured. + */ + DUK_DDD(DUK_DDDPRINT("source and/or target not covered by underlying buffer, skip copy")); + return 0; + } + + /* We want to do a straight memory copy if possible: this is + * an important operation because .set() is the TypedArray + * way to copy chunks of memory. However, because set() + * conceptually works in terms of elements, not all views are + * compatible with direct byte copying. + * + * If we do manage a direct copy, the "overlap issue" handled + * below can just be solved using memmove() because the source + * and destination element sizes are necessarily equal. + */ + +#if !defined(DUK_USE_PREFER_SIZE) + DUK_ASSERT(h_this->elem_type < sizeof(duk__buffer_elemtype_copy_compatible) / sizeof(duk_uint16_t)); + comp_mask = duk__buffer_elemtype_copy_compatible[h_this->elem_type]; + if (comp_mask & (1 << h_bufarg->elem_type)) { + DUK_ASSERT(src_length == dst_length); + + DUK_DDD(DUK_DDDPRINT("fast path: able to use memmove() because views are compatible")); + duk_memmove_unsafe((void *) p_dst_base, (const void *) p_src_base, (size_t) dst_length); + return 0; + } + DUK_DDD(DUK_DDDPRINT("fast path: views are not compatible with a byte copy, copy by item")); +#endif /* !DUK_USE_PREFER_SIZE */ + + /* We want to avoid making a copy to process set() but that's + * not always possible: the source and the target may overlap + * and because element sizes are different, the overlap cannot + * always be handled with a memmove() or choosing the copy + * direction in a certain way. For example, if source type is + * uint8 and target type is uint32, the target area may exceed + * the source area from both ends! + * + * Note that because external buffers may point to the same + * memory areas, we must ultimately make this check using + * pointers. + * + * NOTE: careful with side effects: any side effect may cause + * a buffer resize (or external buffer pointer/length update)! + */ + + DUK_DDD(DUK_DDDPRINT("overlap check: p_src_base=%p, src_length=%ld, " + "p_dst_base=%p, dst_length=%ld", + (void *) p_src_base, + (long) src_length, + (void *) p_dst_base, + (long) dst_length)); + + if (p_src_base >= p_dst_base + dst_length || /* source starts after dest ends */ + p_src_base + src_length <= p_dst_base) { /* source ends before dest starts */ + no_overlap = 1; + } + + if (!no_overlap) { + /* There's overlap: the desired end result is that + * conceptually a copy is made to avoid "trampling" + * of source data by destination writes. We make + * an actual temporary copy to handle this case. + */ + duk_uint8_t *p_src_copy; + + DUK_DDD(DUK_DDDPRINT("there is overlap, make a copy of the source")); + p_src_copy = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, src_length); + DUK_ASSERT(p_src_copy != NULL); + duk_memcpy_unsafe((void *) p_src_copy, (const void *) p_src_base, (size_t) src_length); + + p_src_base = p_src_copy; /* use p_src_base from now on */ + } + /* Value stack intentionally mixed size here. */ + + DUK_DDD(DUK_DDDPRINT("after overlap check: p_src_base=%p, src_length=%ld, " + "p_dst_base=%p, dst_length=%ld, valstack top=%ld", + (void *) p_src_base, + (long) src_length, + (void *) p_dst_base, + (long) dst_length, + (long) duk_get_top(thr))); + + /* Ready to make the copy. We must proceed element by element + * and must avoid any side effects that might cause the buffer + * validity check above to become invalid. + * + * Although we work through the value stack here, only plain + * numbers are handled which should be side effect safe. + */ + + src_elem_size = (duk_small_uint_t) (1U << h_bufarg->shift); + dst_elem_size = (duk_small_uint_t) (1U << h_this->shift); + p_src = p_src_base; + p_dst = p_dst_base; + p_src_end = p_src_base + src_length; + + while (p_src != p_src_end) { + DUK_DDD(DUK_DDDPRINT("fast path per element copy loop: " + "p_src=%p, p_src_end=%p, p_dst=%p", + (void *) p_src, + (void *) p_src_end, + (void *) p_dst)); + /* A validated read() is always a number, so it's write coercion + * is always side effect free an won't invalidate pointers etc. + */ + duk_hbufobj_push_validated_read(thr, h_bufarg, p_src, src_elem_size); + duk_hbufobj_validated_write(thr, h_this, p_dst, dst_elem_size); + duk_pop(thr); + p_src += src_elem_size; + p_dst += dst_elem_size; + } + + return 0; + } else { + /* Slow path: quite slow, but we save space by using the property code + * to write coerce target values. We don't need to worry about overlap + * here because the source is not a TypedArray. + * + * We could use the bufobj write coercion helper but since the + * property read may have arbitrary side effects, full validity checks + * would be needed for every element anyway. + */ + + n = (duk_uarridx_t) duk_get_length(thr, 0); + DUK_ASSERT(offset_bytes <= h_this->length); + if ((n << h_this->shift) > h_this->length - offset_bytes) { + /* Overflow not an issue because subtraction is used on the right + * side and guaranteed to be >= 0. + */ + DUK_DDD(DUK_DDDPRINT("copy exceeds target buffer nominal length")); + goto fail_args; + } + + /* There's no need to check for buffer validity status for the + * target here: the property access code will do that for each + * element. Moreover, if we did check the validity here, side + * effects from reading the source argument might invalidate + * the results anyway. + */ + + DUK_ASSERT_TOP(thr, 2); + duk_push_this(thr); + + for (i = 0; i < n; i++) { + duk_get_prop_index(thr, 0, i); + duk_put_prop_index(thr, 2, offset_elems + i); + } + } + + return 0; + +fail_args: + DUK_DCERROR_RANGE_INVALID_ARGS(thr); +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer.prototype.slice([start], [end]) + * ArrayBuffer.prototype.slice(begin, [end]) + * TypedArray.prototype.subarray(begin, [end]) + * + * The API calls are almost identical; negative indices are counted from end + * of buffer, and final indices are clamped (allowing crossed indices). Main + * differences: + * + * - Copy/view behavior; Node.js .slice() and TypedArray .subarray() create + * views, ArrayBuffer .slice() creates a copy + * + * - Resulting object has a different class and prototype depending on the + * call (or 'this' argument) + * + * - TypedArray .subarray() arguments are element indices, not byte offsets + * + * - Plain buffer argument creates a plain buffer slice + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_LOCAL void duk__arraybuffer_plain_slice(duk_hthread *thr, duk_hbuffer *h_val) { + duk_int_t start_offset, end_offset; + duk_uint_t slice_length; + duk_uint8_t *p_copy; + duk_size_t copy_length; + + duk__clamp_startend_negidx_shifted(thr, + (duk_int_t) DUK_HBUFFER_GET_SIZE(h_val), + 0 /*buffer_shift*/, + 0 /*idx_start*/, + 1 /*idx_end*/, + &start_offset, + &end_offset); + DUK_ASSERT(end_offset <= (duk_int_t) DUK_HBUFFER_GET_SIZE(h_val)); + DUK_ASSERT(start_offset >= 0); + DUK_ASSERT(end_offset >= start_offset); + slice_length = (duk_uint_t) (end_offset - start_offset); + + p_copy = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, (duk_size_t) slice_length); + DUK_ASSERT(p_copy != NULL); + copy_length = slice_length; + + duk_memcpy_unsafe((void *) p_copy, + (const void *) ((duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h_val) + start_offset), + copy_length); +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +/* Shared helper for slice/subarray operation. + * Magic: 0x01=isView, 0x02=copy, 0x04=Node.js Buffer special handling. + */ +DUK_INTERNAL duk_ret_t duk_bi_buffer_slice_shared(duk_hthread *thr) { + duk_small_int_t magic; + duk_small_uint_t res_class_num; + duk_small_int_t res_proto_bidx; + duk_hbufobj *h_this; + duk_hbufobj *h_bufobj; + duk_hbuffer *h_val; + duk_int_t start_offset, end_offset; + duk_uint_t slice_length; + duk_tval *tv; + + /* [ start end ] */ + + magic = duk_get_current_magic(thr); + + tv = duk_get_borrowed_this_tval(thr); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_IS_BUFFER(tv)) { + /* For plain buffers return a plain buffer slice. */ + h_val = DUK_TVAL_GET_BUFFER(tv); + DUK_ASSERT(h_val != NULL); + + if (magic & 0x02) { + /* Make copy: ArrayBuffer.prototype.slice() uses this. */ + duk__arraybuffer_plain_slice(thr, h_val); + return 1; + } else { + /* View into existing buffer: cannot be done if the + * result is a plain buffer because there's no slice + * info. So return an ArrayBuffer instance; coerce + * the 'this' binding into an object and behave as if + * the original call was for an Object-coerced plain + * buffer (handled automatically by duk__require_bufobj_this()). + */ + + DUK_DDD(DUK_DDDPRINT("slice() doesn't handle view into plain buffer, coerce 'this' to ArrayBuffer object")); + /* fall through */ + } + } + tv = NULL; /* No longer valid nor needed. */ + + h_this = duk__require_bufobj_this(thr); + + /* Slice offsets are element (not byte) offsets, which only matters + * for TypedArray views, Node.js Buffer and ArrayBuffer have shift + * zero so byte and element offsets are the same. Negative indices + * are counted from end of slice, crossed indices are allowed (and + * result in zero length result), and final values are clamped + * against the current slice. There's intentionally no check + * against the underlying buffer here. + */ + + duk__clamp_startend_negidx_shifted(thr, + (duk_int_t) h_this->length, + (duk_uint8_t) h_this->shift, + 0 /*idx_start*/, + 1 /*idx_end*/, + &start_offset, + &end_offset); + DUK_ASSERT(end_offset >= start_offset); + DUK_ASSERT(start_offset >= 0); + DUK_ASSERT(end_offset >= 0); + slice_length = (duk_uint_t) (end_offset - start_offset); + + /* The resulting buffer object gets the same class and prototype as + * the buffer in 'this', e.g. if the input is a Uint8Array the + * result is a Uint8Array; if the input is a Float32Array, the + * result is a Float32Array. The result internal prototype should + * be the default prototype for the class (e.g. initial value of + * Uint8Array.prototype), not copied from the argument (Duktape 1.x + * did that). + * + * Node.js Buffers have special handling: they're Uint8Arrays as far + * as the internal class is concerned, so the new Buffer should also + * be an Uint8Array but inherit from Buffer.prototype. + */ + res_class_num = DUK_HOBJECT_GET_CLASS_NUMBER((duk_hobject *) h_this); + DUK_ASSERT(res_class_num >= DUK_HOBJECT_CLASS_BUFOBJ_MIN); /* type check guarantees */ + DUK_ASSERT(res_class_num <= DUK_HOBJECT_CLASS_BUFOBJ_MAX); + res_proto_bidx = duk__buffer_proto_from_classnum[res_class_num - DUK_HOBJECT_CLASS_BUFOBJ_MIN]; + if (magic & 0x04) { + res_proto_bidx = DUK_BIDX_NODEJS_BUFFER_PROTOTYPE; + } + h_bufobj = + duk_push_bufobj_raw(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_BUFOBJ | DUK_HOBJECT_CLASS_AS_FLAGS(res_class_num), + res_proto_bidx); + DUK_ASSERT(h_bufobj != NULL); + + DUK_ASSERT(h_bufobj->length == 0); + h_bufobj->shift = h_this->shift; /* inherit */ + h_bufobj->elem_type = h_this->elem_type; /* inherit */ + h_bufobj->is_typedarray = magic & 0x01; + DUK_ASSERT(h_bufobj->is_typedarray == 0 || h_bufobj->is_typedarray == 1); + + h_val = h_this->buf; + if (h_val == NULL) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + + if (magic & 0x02) { + /* non-zero: make copy */ + duk_uint8_t *p_copy; + duk_size_t copy_length; + + p_copy = (duk_uint8_t *) duk_push_fixed_buffer_zero( + thr, + (duk_size_t) slice_length); /* must be zeroed, not all bytes always copied */ + DUK_ASSERT(p_copy != NULL); + + /* Copy slice, respecting underlying buffer limits; remainder + * is left as zero. + */ + copy_length = DUK_HBUFOBJ_CLAMP_BYTELENGTH(h_this, slice_length); + duk_memcpy_unsafe((void *) p_copy, + (const void *) (DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_this) + start_offset), + copy_length); + + h_val = duk_known_hbuffer(thr, -1); + + h_bufobj->buf = h_val; + DUK_HBUFFER_INCREF(thr, h_val); + h_bufobj->length = slice_length; + DUK_ASSERT(h_bufobj->offset == 0); + + duk_pop(thr); /* reachable so pop OK */ + } else { + h_bufobj->buf = h_val; + DUK_HBUFFER_INCREF(thr, h_val); + h_bufobj->length = slice_length; + h_bufobj->offset = h_this->offset + (duk_uint_t) start_offset; + + /* Copy the .buffer property, needed for TypedArray.prototype.subarray(). + * + * XXX: limit copy only for TypedArray classes specifically? + */ + + DUK_ASSERT(h_bufobj->buf_prop == NULL); + h_bufobj->buf_prop = h_this->buf_prop; /* may be NULL */ + DUK_HOBJECT_INCREF_ALLOWNULL(thr, (duk_hobject *) h_bufobj->buf_prop); + } + /* unbalanced stack on purpose */ + + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer.isEncoding() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_nodejs_buffer_is_encoding(duk_hthread *thr) { + const char *encoding; + + /* only accept lowercase 'utf8' now. */ + + encoding = duk_to_string(thr, 0); + DUK_ASSERT(duk_is_string(thr, 0)); /* guaranteed by duk_to_string() */ + duk_push_boolean(thr, DUK_STRCMP(encoding, "utf8") == 0); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer.isBuffer() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_nodejs_buffer_is_buffer(duk_hthread *thr) { + duk_hobject *h; + duk_hobject *h_proto; + duk_bool_t ret = 0; + + DUK_ASSERT(duk_get_top(thr) >= 1); /* nargs */ + h = duk_get_hobject(thr, 0); + if (h != NULL) { + h_proto = thr->builtins[DUK_BIDX_NODEJS_BUFFER_PROTOTYPE]; + DUK_ASSERT(h_proto != NULL); + + h = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h); + if (h != NULL) { + ret = duk_hobject_prototype_chain_contains(thr, h, h_proto, 0 /*ignore_loop*/); + } + } + + duk_push_boolean(thr, ret); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer.byteLength() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_nodejs_buffer_byte_length(duk_hthread *thr) { + const char *str; + duk_size_t len; + + /* At the moment Buffer() will just use the string bytes as + * is (ignoring encoding), so we return the string length here + * unconditionally. + */ + + /* XXX: to be revised; Old Node.js behavior just coerces any buffer + * values to string: + * $ node + * > Buffer.byteLength(new Uint32Array(10)) + * 20 + * > Buffer.byteLength(new Uint32Array(100)) + * 20 + * (The 20 comes from '[object Uint32Array]'.length + */ + + str = duk_to_lstring(thr, 0, &len); + DUK_UNREF(str); + duk_push_size_t(thr, len); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Node.js Buffer.concat() + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_nodejs_buffer_concat(duk_hthread *thr) { + duk_hobject *h_arg; + duk_uint_t total_length; + duk_hbufobj *h_bufobj; + duk_hbufobj *h_bufres; + duk_hbuffer *h_val; + duk_uint_t i, n; + duk_uint8_t *p; + duk_size_t space_left; + duk_size_t copy_size; + + /* Node.js accepts only actual Arrays. */ + h_arg = duk_require_hobject(thr, 0); + if (DUK_HOBJECT_GET_CLASS_NUMBER(h_arg) != DUK_HOBJECT_CLASS_ARRAY) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + + /* Compute result length and validate argument buffers. */ + n = (duk_uint_t) duk_get_length(thr, 0); + total_length = 0; + for (i = 0; i < n; i++) { + /* Neutered checks not necessary here: neutered buffers have + * zero 'length' so we'll effectively skip them. + */ + DUK_ASSERT_TOP(thr, 2); /* [ array totalLength ] */ + duk_get_prop_index(thr, 0, (duk_uarridx_t) i); /* -> [ array totalLength buf ] */ + h_bufobj = duk__require_bufobj_value(thr, 2); + DUK_ASSERT(h_bufobj != NULL); + total_length += h_bufobj->length; + if (DUK_UNLIKELY(total_length < h_bufobj->length)) { + DUK_DCERROR_RANGE_INVALID_ARGS(thr); /* Wrapped. */ + } + duk_pop(thr); + } + /* In Node.js v0.12.1 a 1-element array is special and won't create a + * copy, this was fixed later so an explicit check no longer needed. + */ + + /* User totalLength overrides a computed length, but we'll check + * every copy in the copy loop. Note that duk_to_int() can + * technically have arbitrary side effects so we need to recheck + * the buffers in the copy loop. + */ + if (!duk_is_undefined(thr, 1) && n > 0) { + /* For n == 0, Node.js ignores totalLength argument and + * returns a zero length buffer. + */ + duk_int_t total_length_signed; + total_length_signed = duk_to_int(thr, 1); + if (total_length_signed < 0) { + DUK_DCERROR_RANGE_INVALID_ARGS(thr); + } + total_length = (duk_uint_t) total_length_signed; + } + + h_bufres = duk_push_bufobj_raw(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_BUFOBJ | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_UINT8ARRAY), + DUK_BIDX_NODEJS_BUFFER_PROTOTYPE); + DUK_ASSERT(h_bufres != NULL); + + p = (duk_uint8_t *) duk_push_fixed_buffer_zero(thr, + total_length); /* must be zeroed, all bytes not necessarily written over */ + DUK_ASSERT(p != NULL); + space_left = (duk_size_t) total_length; + + for (i = 0; i < n; i++) { + DUK_ASSERT_TOP(thr, 4); /* [ array totalLength bufres buf ] */ + + duk_get_prop_index(thr, 0, (duk_uarridx_t) i); + h_bufobj = duk__require_bufobj_value(thr, 4); + DUK_ASSERT(h_bufobj != NULL); + + copy_size = h_bufobj->length; + if (copy_size > space_left) { + copy_size = space_left; + } + + if (h_bufobj->buf != NULL && DUK_HBUFOBJ_VALID_SLICE(h_bufobj)) { + duk_memcpy_unsafe((void *) p, (const void *) DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_bufobj), copy_size); + } else { + /* Just skip, leaving zeroes in the result. */ + ; + } + p += copy_size; + space_left -= copy_size; + + duk_pop(thr); + } + + h_val = duk_known_hbuffer(thr, -1); + + duk__set_bufobj_buffer(thr, h_bufres, h_val); + h_bufres->is_typedarray = 1; + DUK_HBUFOBJ_ASSERT_VALID(h_bufres); + + duk_pop(thr); /* pop plain buffer, now reachable through h_bufres */ + + return 1; /* return h_bufres */ +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Shared readfield and writefield methods + * + * The readfield/writefield methods need support for endianness and field + * types. All offsets are byte based so no offset shifting is needed. + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +/* Format of magic, bits: + * 0...1: field type; 0=uint8, 1=uint16, 2=uint32, 3=float, 4=double, 5=unused, 6=unused, 7=unused + * 3: endianness: 0=little, 1=big + * 4: signed: 1=yes, 0=no + * 5: typedarray: 1=yes, 0=no + */ +#define DUK__FLD_8BIT 0 +#define DUK__FLD_16BIT 1 +#define DUK__FLD_32BIT 2 +#define DUK__FLD_FLOAT 3 +#define DUK__FLD_DOUBLE 4 +#define DUK__FLD_VARINT 5 +#define DUK__FLD_BIGENDIAN (1 << 3) +#define DUK__FLD_SIGNED (1 << 4) +#define DUK__FLD_TYPEDARRAY (1 << 5) + +/* XXX: split into separate functions for each field type? */ +DUK_INTERNAL duk_ret_t duk_bi_buffer_readfield(duk_hthread *thr) { + duk_small_uint_t magic = (duk_small_uint_t) duk_get_current_magic(thr); + duk_small_uint_t magic_ftype; + duk_small_uint_t magic_bigendian; + duk_small_uint_t magic_signed; + duk_small_uint_t magic_typedarray; + duk_small_uint_t endswap; + duk_hbufobj *h_this; + duk_bool_t no_assert; + duk_int_t offset_signed; + duk_uint_t offset; + duk_uint_t buffer_length; + duk_uint_t check_length; + duk_uint8_t *buf; + duk_double_union du; + + magic_ftype = magic & 0x0007U; + magic_bigendian = magic & 0x0008U; + magic_signed = magic & 0x0010U; + magic_typedarray = magic & 0x0020U; + + h_this = duk__require_bufobj_this(thr); /* XXX: very inefficient for plain buffers */ + DUK_ASSERT(h_this != NULL); + buffer_length = h_this->length; + + /* [ offset noAssert ], when ftype != DUK__FLD_VARINT */ + /* [ offset fieldByteLength noAssert ], when ftype == DUK__FLD_VARINT */ + /* [ offset littleEndian ], when DUK__FLD_TYPEDARRAY (regardless of ftype) */ + + /* Handle TypedArray vs. Node.js Buffer arg differences */ + if (magic_typedarray) { + no_assert = 0; +#if defined(DUK_USE_INTEGER_LE) + endswap = !duk_to_boolean(thr, 1); /* 1=little endian */ +#else + endswap = duk_to_boolean(thr, 1); /* 1=little endian */ +#endif + } else { + no_assert = duk_to_boolean(thr, (magic_ftype == DUK__FLD_VARINT) ? 2 : 1); +#if defined(DUK_USE_INTEGER_LE) + endswap = magic_bigendian; +#else + endswap = !magic_bigendian; +#endif + } + + /* Offset is coerced first to signed integer range and then to unsigned. + * This ensures we can add a small byte length (1-8) to the offset in + * bound checks and not wrap. + */ + offset_signed = duk_to_int(thr, 0); + offset = (duk_uint_t) offset_signed; + if (offset_signed < 0) { + goto fail_bounds; + } + + DUK_DDD(DUK_DDDPRINT("readfield, buffer_length=%ld, offset=%ld, no_assert=%d, " + "magic=%04x, magic_fieldtype=%d, magic_bigendian=%d, magic_signed=%d, " + "endswap=%u", + (long) buffer_length, + (long) offset, + (int) no_assert, + (unsigned int) magic, + (int) magic_ftype, + (int) (magic_bigendian >> 3), + (int) (magic_signed >> 4), + (int) endswap)); + + /* Update 'buffer_length' to be the effective, safe limit which + * takes into account the underlying buffer. This value will be + * potentially invalidated by any side effect. + */ + check_length = DUK_HBUFOBJ_CLAMP_BYTELENGTH(h_this, buffer_length); + DUK_DDD(DUK_DDDPRINT("buffer_length=%ld, check_length=%ld", (long) buffer_length, (long) check_length)); + + if (h_this->buf) { + buf = DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_this); + } else { + /* Neutered. We could go into the switch-case safely with + * buf == NULL because check_length == 0. To avoid scanbuild + * warnings, fail directly instead. + */ + DUK_ASSERT(check_length == 0); + goto fail_neutered; + } + DUK_ASSERT(buf != NULL); + + switch (magic_ftype) { + case DUK__FLD_8BIT: { + duk_uint8_t tmp; + if (offset + 1U > check_length) { + goto fail_bounds; + } + tmp = buf[offset]; + if (magic_signed) { + duk_push_int(thr, (duk_int_t) ((duk_int8_t) tmp)); + } else { + duk_push_uint(thr, (duk_uint_t) tmp); + } + break; + } + case DUK__FLD_16BIT: { + duk_uint16_t tmp; + if (offset + 2U > check_length) { + goto fail_bounds; + } + duk_memcpy((void *) du.uc, (const void *) (buf + offset), 2); + tmp = du.us[0]; + if (endswap) { + tmp = DUK_BSWAP16(tmp); + } + if (magic_signed) { + duk_push_int(thr, (duk_int_t) ((duk_int16_t) tmp)); + } else { + duk_push_uint(thr, (duk_uint_t) tmp); + } + break; + } + case DUK__FLD_32BIT: { + duk_uint32_t tmp; + if (offset + 4U > check_length) { + goto fail_bounds; + } + duk_memcpy((void *) du.uc, (const void *) (buf + offset), 4); + tmp = du.ui[0]; + if (endswap) { + tmp = DUK_BSWAP32(tmp); + } + if (magic_signed) { + duk_push_int(thr, (duk_int_t) ((duk_int32_t) tmp)); + } else { + duk_push_uint(thr, (duk_uint_t) tmp); + } + break; + } + case DUK__FLD_FLOAT: { + duk_uint32_t tmp; + if (offset + 4U > check_length) { + goto fail_bounds; + } + duk_memcpy((void *) du.uc, (const void *) (buf + offset), 4); + if (endswap) { + tmp = du.ui[0]; + tmp = DUK_BSWAP32(tmp); + du.ui[0] = tmp; + } + duk_push_number(thr, (duk_double_t) du.f[0]); + break; + } + case DUK__FLD_DOUBLE: { + if (offset + 8U > check_length) { + goto fail_bounds; + } + duk_memcpy((void *) du.uc, (const void *) (buf + offset), 8); + if (endswap) { + DUK_DBLUNION_BSWAP64(&du); + } + duk_push_number(thr, (duk_double_t) du.d); + break; + } + case DUK__FLD_VARINT: { + /* Node.js Buffer variable width integer field. We don't really + * care about speed here, so aim for shortest algorithm. + */ + duk_int_t field_bytelen; + duk_int_t i, i_step, i_end; +#if defined(DUK_USE_64BIT_OPS) + duk_int64_t tmp; + duk_small_uint_t shift_tmp; +#else + duk_double_t tmp; + duk_small_int_t highbyte; +#endif + const duk_uint8_t *p; + + field_bytelen = duk_get_int(thr, 1); /* avoid side effects! */ + if (field_bytelen < 1 || field_bytelen > 6) { + goto fail_field_length; + } + if (offset + (duk_uint_t) field_bytelen > check_length) { + goto fail_bounds; + } + p = (const duk_uint8_t *) (buf + offset); + + /* Slow gathering of value using either 64-bit arithmetic + * or IEEE doubles if 64-bit types not available. Handling + * of negative numbers is a bit non-obvious in both cases. + */ + + if (magic_bigendian) { + /* Gather in big endian */ + i = 0; + i_step = 1; + i_end = field_bytelen; /* one i_step over */ + } else { + /* Gather in little endian */ + i = field_bytelen - 1; + i_step = -1; + i_end = -1; /* one i_step over */ + } + +#if defined(DUK_USE_64BIT_OPS) + tmp = 0; + do { + DUK_ASSERT(i >= 0 && i < field_bytelen); + tmp = (tmp << 8) + (duk_int64_t) p[i]; + i += i_step; + } while (i != i_end); + + if (magic_signed) { + /* Shift to sign extend. Left shift must be unsigned + * to avoid undefined behavior; right shift must be + * signed to sign extend properly. + */ + shift_tmp = (duk_small_uint_t) (64U - (duk_small_uint_t) field_bytelen * 8U); + tmp = (duk_int64_t) ((duk_uint64_t) tmp << shift_tmp) >> shift_tmp; + } + + duk_push_i64(thr, tmp); +#else + highbyte = p[i]; + if (magic_signed && (highbyte & 0x80) != 0) { + /* 0xff => 255 - 256 = -1; 0x80 => 128 - 256 = -128 */ + tmp = (duk_double_t) (highbyte - 256); + } else { + tmp = (duk_double_t) highbyte; + } + for (;;) { + i += i_step; + if (i == i_end) { + break; + } + DUK_ASSERT(i >= 0 && i < field_bytelen); + tmp = (tmp * 256.0) + (duk_double_t) p[i]; + } + + duk_push_number(thr, tmp); +#endif + break; + } + default: { /* should never happen but default here */ + goto fail_bounds; + } + } + + return 1; + +fail_neutered: +fail_field_length: +fail_bounds: + if (no_assert) { + /* Node.js return value for noAssert out-of-bounds reads is + * usually (but not always) NaN. Return NaN consistently. + */ + duk_push_nan(thr); + return 1; + } + DUK_DCERROR_RANGE_INVALID_ARGS(thr); +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +/* XXX: split into separate functions for each field type? */ +DUK_INTERNAL duk_ret_t duk_bi_buffer_writefield(duk_hthread *thr) { + duk_small_uint_t magic = (duk_small_uint_t) duk_get_current_magic(thr); + duk_small_uint_t magic_ftype; + duk_small_uint_t magic_bigendian; + duk_small_uint_t magic_signed; + duk_small_uint_t magic_typedarray; + duk_small_uint_t endswap; + duk_hbufobj *h_this; + duk_bool_t no_assert; + duk_int_t offset_signed; + duk_uint_t offset; + duk_uint_t buffer_length; + duk_uint_t check_length; + duk_uint8_t *buf; + duk_double_union du; + duk_int_t nbytes = 0; + + magic_ftype = magic & 0x0007U; + magic_bigendian = magic & 0x0008U; + magic_signed = magic & 0x0010U; + magic_typedarray = magic & 0x0020U; + DUK_UNREF(magic_signed); + + h_this = duk__require_bufobj_this(thr); /* XXX: very inefficient for plain buffers */ + DUK_ASSERT(h_this != NULL); + buffer_length = h_this->length; + + /* [ value offset noAssert ], when ftype != DUK__FLD_VARINT */ + /* [ value offset fieldByteLength noAssert ], when ftype == DUK__FLD_VARINT */ + /* [ offset value littleEndian ], when DUK__FLD_TYPEDARRAY (regardless of ftype) */ + + /* Handle TypedArray vs. Node.js Buffer arg differences */ + if (magic_typedarray) { + no_assert = 0; +#if defined(DUK_USE_INTEGER_LE) + endswap = !duk_to_boolean(thr, 2); /* 1=little endian */ +#else + endswap = duk_to_boolean(thr, 2); /* 1=little endian */ +#endif + duk_swap(thr, 0, 1); /* offset/value order different from Node.js */ + } else { + no_assert = duk_to_boolean(thr, (magic_ftype == DUK__FLD_VARINT) ? 3 : 2); +#if defined(DUK_USE_INTEGER_LE) + endswap = magic_bigendian; +#else + endswap = !magic_bigendian; +#endif + } + + /* Offset is coerced first to signed integer range and then to unsigned. + * This ensures we can add a small byte length (1-8) to the offset in + * bound checks and not wrap. + */ + offset_signed = duk_to_int(thr, 1); + offset = (duk_uint_t) offset_signed; + + /* We need 'nbytes' even for a failed offset; return value must be + * (offset + nbytes) even when write fails due to invalid offset. + */ + if (magic_ftype != DUK__FLD_VARINT) { + DUK_ASSERT(magic_ftype < (duk_small_uint_t) (sizeof(duk__buffer_nbytes_from_fldtype) / sizeof(duk_uint8_t))); + nbytes = duk__buffer_nbytes_from_fldtype[magic_ftype]; + } else { + nbytes = duk_get_int(thr, 2); + if (nbytes < 1 || nbytes > 6) { + goto fail_field_length; + } + } + DUK_ASSERT(nbytes >= 1 && nbytes <= 8); + + /* Now we can check offset validity. */ + if (offset_signed < 0) { + goto fail_bounds; + } + + DUK_DDD(DUK_DDDPRINT("writefield, value=%!T, buffer_length=%ld, offset=%ld, no_assert=%d, " + "magic=%04x, magic_fieldtype=%d, magic_bigendian=%d, magic_signed=%d, " + "endswap=%u", + duk_get_tval(thr, 0), + (long) buffer_length, + (long) offset, + (int) no_assert, + (unsigned int) magic, + (int) magic_ftype, + (int) (magic_bigendian >> 3), + (int) (magic_signed >> 4), + (int) endswap)); + + /* Coerce value to a number before computing check_length, so that + * the field type specific coercion below can't have side effects + * that would invalidate check_length. + */ + duk_to_number(thr, 0); + + /* Update 'buffer_length' to be the effective, safe limit which + * takes into account the underlying buffer. This value will be + * potentially invalidated by any side effect. + */ + check_length = DUK_HBUFOBJ_CLAMP_BYTELENGTH(h_this, buffer_length); + DUK_DDD(DUK_DDDPRINT("buffer_length=%ld, check_length=%ld", (long) buffer_length, (long) check_length)); + + if (h_this->buf) { + buf = DUK_HBUFOBJ_GET_SLICE_BASE(thr->heap, h_this); + } else { + /* Neutered. We could go into the switch-case safely with + * buf == NULL because check_length == 0. To avoid scanbuild + * warnings, fail directly instead. + */ + DUK_ASSERT(check_length == 0); + goto fail_neutered; + } + DUK_ASSERT(buf != NULL); + + switch (magic_ftype) { + case DUK__FLD_8BIT: { + if (offset + 1U > check_length) { + goto fail_bounds; + } + /* sign doesn't matter when writing */ + buf[offset] = (duk_uint8_t) duk_to_uint32(thr, 0); + break; + } + case DUK__FLD_16BIT: { + duk_uint16_t tmp; + if (offset + 2U > check_length) { + goto fail_bounds; + } + tmp = (duk_uint16_t) duk_to_uint32(thr, 0); + if (endswap) { + tmp = DUK_BSWAP16(tmp); + } + du.us[0] = tmp; + /* sign doesn't matter when writing */ + duk_memcpy((void *) (buf + offset), (const void *) du.uc, 2); + break; + } + case DUK__FLD_32BIT: { + duk_uint32_t tmp; + if (offset + 4U > check_length) { + goto fail_bounds; + } + tmp = (duk_uint32_t) duk_to_uint32(thr, 0); + if (endswap) { + tmp = DUK_BSWAP32(tmp); + } + du.ui[0] = tmp; + /* sign doesn't matter when writing */ + duk_memcpy((void *) (buf + offset), (const void *) du.uc, 4); + break; + } + case DUK__FLD_FLOAT: { + duk_uint32_t tmp; + if (offset + 4U > check_length) { + goto fail_bounds; + } + du.f[0] = (duk_float_t) duk_to_number(thr, 0); + if (endswap) { + tmp = du.ui[0]; + tmp = DUK_BSWAP32(tmp); + du.ui[0] = tmp; + } + /* sign doesn't matter when writing */ + duk_memcpy((void *) (buf + offset), (const void *) du.uc, 4); + break; + } + case DUK__FLD_DOUBLE: { + if (offset + 8U > check_length) { + goto fail_bounds; + } + du.d = (duk_double_t) duk_to_number(thr, 0); + if (endswap) { + DUK_DBLUNION_BSWAP64(&du); + } + /* sign doesn't matter when writing */ + duk_memcpy((void *) (buf + offset), (const void *) du.uc, 8); + break; + } + case DUK__FLD_VARINT: { + /* Node.js Buffer variable width integer field. We don't really + * care about speed here, so aim for shortest algorithm. + */ + duk_int_t field_bytelen; + duk_int_t i, i_step, i_end; +#if defined(DUK_USE_64BIT_OPS) + duk_int64_t tmp; +#else + duk_double_t tmp; +#endif + duk_uint8_t *p; + + field_bytelen = (duk_int_t) nbytes; + if (offset + (duk_uint_t) field_bytelen > check_length) { + goto fail_bounds; + } + + /* Slow writing of value using either 64-bit arithmetic + * or IEEE doubles if 64-bit types not available. There's + * no special sign handling when writing varints. + */ + + if (magic_bigendian) { + /* Write in big endian */ + i = field_bytelen; /* one i_step added at top of loop */ + i_step = -1; + i_end = 0; + } else { + /* Write in little endian */ + i = -1; /* one i_step added at top of loop */ + i_step = 1; + i_end = field_bytelen - 1; + } + + /* XXX: The duk_to_number() cast followed by integer coercion + * is platform specific so NaN, +/- Infinity, and out-of-bounds + * values result in platform specific output now. + * See: test-bi-nodejs-buffer-proto-varint-special.js + */ + +#if defined(DUK_USE_64BIT_OPS) + tmp = (duk_int64_t) duk_to_number(thr, 0); + p = (duk_uint8_t *) (buf + offset); + do { + i += i_step; + DUK_ASSERT(i >= 0 && i < field_bytelen); + p[i] = (duk_uint8_t) (tmp & 0xff); + tmp = tmp >> 8; /* unnecessary shift for last byte */ + } while (i != i_end); +#else + tmp = duk_to_number(thr, 0); + p = (duk_uint8_t *) (buf + offset); + do { + i += i_step; + tmp = DUK_FLOOR(tmp); + DUK_ASSERT(i >= 0 && i < field_bytelen); + p[i] = (duk_uint8_t) (DUK_FMOD(tmp, 256.0)); + tmp = tmp / 256.0; /* unnecessary div for last byte */ + } while (i != i_end); +#endif + break; + } + default: { /* should never happen but default here */ + goto fail_bounds; + } + } + + /* Node.js Buffer: return offset + #bytes written (i.e. next + * write offset). + */ + if (magic_typedarray) { + /* For TypedArrays 'undefined' return value is specified + * by ES2015 (matches V8). + */ + return 0; + } + duk_push_uint(thr, offset + (duk_uint_t) nbytes); + return 1; + +fail_neutered: +fail_field_length: +fail_bounds: + if (no_assert) { + /* Node.js return value for failed writes is offset + #bytes + * that would have been written. + */ + /* XXX: for negative input offsets, 'offset' will be a large + * positive value so the result here is confusing. + */ + if (magic_typedarray) { + return 0; + } + duk_push_uint(thr, offset + (duk_uint_t) nbytes); + return 1; + } + DUK_DCERROR_RANGE_INVALID_ARGS(thr); +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * Accessors for .buffer, .byteLength, .byteOffset + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_LOCAL duk_hbufobj *duk__autospawn_arraybuffer(duk_hthread *thr, duk_hbuffer *h_buf) { + duk_hbufobj *h_res; + + h_res = duk_push_bufobj_raw(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_BUFOBJ | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_ARRAYBUFFER), + DUK_BIDX_ARRAYBUFFER_PROTOTYPE); + DUK_ASSERT(h_res != NULL); + DUK_UNREF(h_res); + + duk__set_bufobj_buffer(thr, h_res, h_buf); + DUK_HBUFOBJ_ASSERT_VALID(h_res); + DUK_ASSERT(h_res->buf_prop == NULL); + return h_res; +} + +DUK_INTERNAL duk_ret_t duk_bi_typedarray_buffer_getter(duk_hthread *thr) { + duk_hbufobj *h_bufobj; + + h_bufobj = (duk_hbufobj *) duk__getrequire_bufobj_this(thr, DUK__BUFOBJ_FLAG_THROW /*flags*/); + DUK_ASSERT(h_bufobj != NULL); + if (DUK_HEAPHDR_IS_BUFFER((duk_heaphdr *) h_bufobj)) { + DUK_DD(DUK_DDPRINT("autospawn ArrayBuffer for plain buffer")); + (void) duk__autospawn_arraybuffer(thr, (duk_hbuffer *) h_bufobj); + return 1; + } else { + if (h_bufobj->buf_prop == NULL && + DUK_HOBJECT_GET_CLASS_NUMBER((duk_hobject *) h_bufobj) != DUK_HOBJECT_CLASS_ARRAYBUFFER && + h_bufobj->buf != NULL) { + duk_hbufobj *h_arrbuf; + + DUK_DD(DUK_DDPRINT("autospawn ArrayBuffer for typed array or DataView")); + h_arrbuf = duk__autospawn_arraybuffer(thr, h_bufobj->buf); + + if (h_bufobj->buf_prop == NULL) { + /* Must recheck buf_prop, in case ArrayBuffer + * alloc had a side effect which already filled + * it! + */ + + /* Set ArrayBuffer's .byteOffset and .byteLength based + * on the view so that Arraybuffer[view.byteOffset] + * matches view[0]. + */ + h_arrbuf->offset = 0; + DUK_ASSERT(h_bufobj->offset + h_bufobj->length >= h_bufobj->offset); /* Wrap check on creation. */ + h_arrbuf->length = h_bufobj->offset + h_bufobj->length; + DUK_ASSERT(h_arrbuf->buf_prop == NULL); + + DUK_ASSERT(h_bufobj->buf_prop == NULL); + h_bufobj->buf_prop = (duk_hobject *) h_arrbuf; + DUK_HBUFOBJ_INCREF(thr, h_arrbuf); /* Now reachable and accounted for. */ + } + + /* Left on stack; pushed for the second time below (OK). */ + } + if (h_bufobj->buf_prop) { + duk_push_hobject(thr, h_bufobj->buf_prop); + return 1; + } + } + return 0; +} + +DUK_INTERNAL duk_ret_t duk_bi_typedarray_byteoffset_getter(duk_hthread *thr) { + duk_hbufobj *h_bufobj; + + h_bufobj = (duk_hbufobj *) duk__getrequire_bufobj_this(thr, DUK__BUFOBJ_FLAG_THROW /*flags*/); + DUK_ASSERT(h_bufobj != NULL); + if (DUK_HEAPHDR_IS_BUFFER((duk_heaphdr *) h_bufobj)) { + duk_push_uint(thr, 0); + } else { + /* If neutered must return 0; offset is zeroed during + * neutering. + */ + duk_push_uint(thr, h_bufobj->offset); + } + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_typedarray_bytelength_getter(duk_hthread *thr) { + duk_hbufobj *h_bufobj; + + h_bufobj = (duk_hbufobj *) duk__getrequire_bufobj_this(thr, DUK__BUFOBJ_FLAG_THROW /*flags*/); + DUK_ASSERT(h_bufobj != NULL); + if (DUK_HEAPHDR_IS_BUFFER((duk_heaphdr *) h_bufobj)) { + duk_hbuffer *h_buf; + + h_buf = (duk_hbuffer *) h_bufobj; + DUK_ASSERT(DUK_HBUFFER_GET_SIZE(h_buf) <= DUK_UINT_MAX); /* Buffer limits. */ + duk_push_uint(thr, (duk_uint_t) DUK_HBUFFER_GET_SIZE(h_buf)); + } else { + /* If neutered must return 0; length is zeroed during + * neutering. + */ + duk_push_uint(thr, h_bufobj->length); + } + return 1; +} +#else /* DUK_USE_BUFFEROBJECT_SUPPORT */ +/* No .buffer getter without ArrayBuffer support. */ +#if 0 +DUK_INTERNAL duk_ret_t duk_bi_typedarray_buffer_getter(duk_hthread *thr) { + return 0; +} +#endif + +DUK_INTERNAL duk_ret_t duk_bi_typedarray_byteoffset_getter(duk_hthread *thr) { + duk_push_uint(thr, 0); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_typedarray_bytelength_getter(duk_hthread *thr) { + duk_hbuffer *h_buf; + + /* XXX: helper? */ + duk_push_this(thr); + h_buf = duk_require_hbuffer(thr, -1); + duk_push_uint(thr, DUK_HBUFFER_GET_SIZE(h_buf)); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* automatic undefs */ +#undef DUK__BUFOBJ_FLAG_PROMOTE +#undef DUK__BUFOBJ_FLAG_THROW +#undef DUK__FLD_16BIT +#undef DUK__FLD_32BIT +#undef DUK__FLD_8BIT +#undef DUK__FLD_BIGENDIAN +#undef DUK__FLD_DOUBLE +#undef DUK__FLD_FLOAT +#undef DUK__FLD_SIGNED +#undef DUK__FLD_TYPEDARRAY +#undef DUK__FLD_VARINT +#line 1 "duk_bi_cbor.c" +/* + * CBOR bindings. + * + * http://cbor.io/ + * https://tools.ietf.org/html/rfc7049 + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_CBOR_SUPPORT) + +/* #define DUK_CBOR_STRESS */ + +/* Default behavior for encoding strings: use CBOR text string if string + * is UTF-8 compatible, otherwise use CBOR byte string. These defines + * can be used to force either type for all strings. Using text strings + * for non-UTF-8 data is technically invalid CBOR. + */ +/* #define DUK_CBOR_TEXT_STRINGS */ +/* #define DUK_CBOR_BYTE_STRINGS */ + +/* Misc. defines. */ +/* #define DUK_CBOR_PREFER_SIZE */ +/* #define DUK_CBOR_DOUBLE_AS_IS */ +/* #define DUK_CBOR_DECODE_FASTPATH */ + +typedef struct { + duk_hthread *thr; + duk_uint8_t *ptr; + duk_uint8_t *buf; + duk_uint8_t *buf_end; + duk_size_t len; + duk_idx_t idx_buf; + duk_uint_t recursion_depth; + duk_uint_t recursion_limit; +} duk_cbor_encode_context; + +typedef struct { + duk_hthread *thr; + const duk_uint8_t *buf; + duk_size_t off; + duk_size_t len; + duk_uint_t recursion_depth; + duk_uint_t recursion_limit; +} duk_cbor_decode_context; + +DUK_LOCAL void duk__cbor_encode_value(duk_cbor_encode_context *enc_ctx); +DUK_LOCAL void duk__cbor_decode_value(duk_cbor_decode_context *dec_ctx); + +/* + * Misc + */ + +DUK_LOCAL duk_uint32_t duk__cbor_double_to_uint32(double d) { + /* Out of range casts are undefined behavior, so caller must avoid. */ + DUK_ASSERT(d >= 0.0 && d <= 4294967295.0); + return (duk_uint32_t) d; +} + +/* + * Encoding + */ + +DUK_LOCAL void duk__cbor_encode_error(duk_cbor_encode_context *enc_ctx) { + (void) duk_type_error(enc_ctx->thr, "cbor encode error"); +} + +DUK_LOCAL void duk__cbor_encode_req_stack(duk_cbor_encode_context *enc_ctx) { + duk_require_stack(enc_ctx->thr, 4); +} + +DUK_LOCAL void duk__cbor_encode_objarr_entry(duk_cbor_encode_context *enc_ctx) { + duk_hthread *thr = enc_ctx->thr; + + /* Native stack check in object/array recursion. */ + duk_native_stack_check(thr); + + /* When working with deeply recursive structures, this is important + * to ensure there's no effective depth limit. + */ + duk__cbor_encode_req_stack(enc_ctx); + + DUK_ASSERT(enc_ctx->recursion_depth <= enc_ctx->recursion_limit); + if (enc_ctx->recursion_depth >= enc_ctx->recursion_limit) { + DUK_ERROR_RANGE(thr, DUK_STR_ENC_RECLIMIT); + DUK_WO_NORETURN(return;); + } + enc_ctx->recursion_depth++; +} + +DUK_LOCAL void duk__cbor_encode_objarr_exit(duk_cbor_encode_context *enc_ctx) { + DUK_ASSERT(enc_ctx->recursion_depth > 0); + enc_ctx->recursion_depth--; +} + +/* Check that a size_t is in uint32 range to avoid out-of-range casts. */ +DUK_LOCAL void duk__cbor_encode_sizet_uint32_check(duk_cbor_encode_context *enc_ctx, duk_size_t len) { + if (DUK_UNLIKELY(sizeof(duk_size_t) > sizeof(duk_uint32_t) && len > (duk_size_t) DUK_UINT32_MAX)) { + duk__cbor_encode_error(enc_ctx); + } +} + +DUK_LOCAL DUK_NOINLINE void duk__cbor_encode_ensure_slowpath(duk_cbor_encode_context *enc_ctx, duk_size_t len) { + duk_size_t oldlen; + duk_size_t minlen; + duk_size_t newlen; + duk_uint8_t *p_new; + duk_size_t old_data_len; + + DUK_ASSERT(enc_ctx->ptr >= enc_ctx->buf); + DUK_ASSERT(enc_ctx->buf_end >= enc_ctx->ptr); + DUK_ASSERT(enc_ctx->buf_end >= enc_ctx->buf); + + /* Overflow check. + * + * Limit example: 0xffffffffUL / 2U = 0x7fffffffUL, we reject >= 0x80000000UL. + */ + oldlen = enc_ctx->len; + minlen = oldlen + len; + if (DUK_UNLIKELY(oldlen > DUK_SIZE_MAX / 2U || minlen < oldlen)) { + duk__cbor_encode_error(enc_ctx); + } + +#if defined(DUK_CBOR_STRESS) + newlen = oldlen + 1U; +#else + newlen = oldlen * 2U; +#endif + DUK_ASSERT(newlen >= oldlen); + + if (minlen > newlen) { + newlen = minlen; + } + DUK_ASSERT(newlen >= oldlen); + DUK_ASSERT(newlen >= minlen); + DUK_ASSERT(newlen > 0U); + + DUK_DD(DUK_DDPRINT("cbor encode buffer resized to %ld", (long) newlen)); + + p_new = (duk_uint8_t *) duk_resize_buffer(enc_ctx->thr, enc_ctx->idx_buf, newlen); + DUK_ASSERT(p_new != NULL); + old_data_len = (duk_size_t) (enc_ctx->ptr - enc_ctx->buf); + enc_ctx->buf = p_new; + enc_ctx->buf_end = p_new + newlen; + enc_ctx->ptr = p_new + old_data_len; + enc_ctx->len = newlen; +} + +DUK_LOCAL DUK_INLINE void duk__cbor_encode_ensure(duk_cbor_encode_context *enc_ctx, duk_size_t len) { + if (DUK_LIKELY((duk_size_t) (enc_ctx->buf_end - enc_ctx->ptr) >= len)) { + return; + } + duk__cbor_encode_ensure_slowpath(enc_ctx, len); +} + +DUK_LOCAL duk_size_t duk__cbor_get_reserve(duk_cbor_encode_context *enc_ctx) { + DUK_ASSERT(enc_ctx->ptr >= enc_ctx->buf); + DUK_ASSERT(enc_ctx->ptr <= enc_ctx->buf_end); + return (duk_size_t) (enc_ctx->buf_end - enc_ctx->ptr); +} + +DUK_LOCAL void duk__cbor_encode_uint32(duk_cbor_encode_context *enc_ctx, duk_uint32_t u, duk_uint8_t base) { + duk_uint8_t *p; + + /* Caller must ensure space. */ + DUK_ASSERT(duk__cbor_get_reserve(enc_ctx) >= 1 + 4); + + p = enc_ctx->ptr; + if (DUK_LIKELY(u <= 23U)) { + *p++ = (duk_uint8_t) (base + (duk_uint8_t) u); + } else if (u <= 0xffUL) { + *p++ = base + 0x18U; + *p++ = (duk_uint8_t) u; + } else if (u <= 0xffffUL) { + *p++ = base + 0x19U; + DUK_RAW_WRITEINC_U16_BE(p, (duk_uint16_t) u); + } else { + *p++ = base + 0x1aU; + DUK_RAW_WRITEINC_U32_BE(p, u); + } + enc_ctx->ptr = p; +} + +#if defined(DUK_CBOR_DOUBLE_AS_IS) +DUK_LOCAL void duk__cbor_encode_double(duk_cbor_encode_context *enc_ctx, double d) { + duk_uint8_t *p; + + /* Caller must ensure space. */ + DUK_ASSERT(duk__cbor_get_reserve(enc_ctx) >= 1 + 8); + + p = enc_ctx->ptr; + *p++ = 0xfbU; + DUK_RAW_WRITEINC_DOUBLE_BE(p, d); + p += 8; + enc_ctx->ptr = p; +} +#else /* DUK_CBOR_DOUBLE_AS_IS */ +DUK_LOCAL void duk__cbor_encode_double_fp(duk_cbor_encode_context *enc_ctx, double d) { + duk_double_union u; + duk_uint16_t u16; + duk_int16_t expt; + duk_uint8_t *p; + + DUK_ASSERT(DUK_FPCLASSIFY(d) != DUK_FP_ZERO); + + /* Caller must ensure space. */ + DUK_ASSERT(duk__cbor_get_reserve(enc_ctx) >= 1 + 8); + + /* Organize into little endian (no-op if platform is little endian). */ + u.d = d; + duk_dblunion_host_to_little(&u); + + /* Check if 'd' can represented as a normal half-float. + * Denormal half-floats could also be used, but that check + * isn't done now (denormal half-floats are decoded of course). + * So just check exponent range and that at most 10 significant + * bits (excluding implicit leading 1) are used in 'd'. + */ + u16 = (((duk_uint16_t) u.uc[7]) << 8) | ((duk_uint16_t) u.uc[6]); + expt = (duk_int16_t) ((u16 & 0x7ff0U) >> 4) - 1023; + + if (expt >= -14 && expt <= 15) { + /* Half-float normal exponents (excl. denormals). + * + * 7 6 5 4 3 2 1 0 (LE index) + * double: seeeeeee eeeemmmm mmmmmmmm mmmmmmmm mmmmmmmm mmmmmmmm mmmmmmmm mmmmmmmm + * half: seeeee mmmm mmmmmm00 00000000 00000000 00000000 00000000 00000000 + */ + duk_bool_t use_half_float; + + use_half_float = + (u.uc[0] == 0 && u.uc[1] == 0 && u.uc[2] == 0 && u.uc[3] == 0 && u.uc[4] == 0 && (u.uc[5] & 0x03U) == 0); + + if (use_half_float) { + duk_uint32_t t; + + expt += 15; + t = (duk_uint32_t) (u.uc[7] & 0x80U) << 8; + t += (duk_uint32_t) expt << 10; + t += ((duk_uint32_t) u.uc[6] & 0x0fU) << 6; + t += ((duk_uint32_t) u.uc[5]) >> 2; + + /* seeeeemm mmmmmmmm */ + p = enc_ctx->ptr; + *p++ = 0xf9U; + DUK_RAW_WRITEINC_U16_BE(p, (duk_uint16_t) t); + enc_ctx->ptr = p; + return; + } + } + + /* Same check for plain float. Also no denormal support here. */ + if (expt >= -126 && expt <= 127) { + /* Float normal exponents (excl. denormals). + * + * double: seeeeeee eeeemmmm mmmmmmmm mmmmmmmm mmmmmmmm mmmmmmmm mmmmmmmm mmmmmmmm + * float: seeee eeeemmmm mmmmmmmm mmmmmmmm mmm00000 00000000 00000000 00000000 + */ + duk_bool_t use_float; + duk_float_t d_float; + + /* We could do this explicit mantissa check, but doing + * a double-float-double cast is fine because we've + * already verified that the exponent is in range so + * that the narrower cast is not undefined behavior. + */ +#if 0 + use_float = + (u.uc[0] == 0 && u.uc[1] == 0 && u.uc[2] == 0 && (u.uc[3] & 0xe0U) == 0); +#endif + d_float = (duk_float_t) d; + use_float = duk_double_equals((duk_double_t) d_float, d); + if (use_float) { + p = enc_ctx->ptr; + *p++ = 0xfaU; + DUK_RAW_WRITEINC_FLOAT_BE(p, d_float); + enc_ctx->ptr = p; + return; + } + } + + /* Special handling for NaN and Inf which we want to encode as + * half-floats. They share the same (maximum) exponent. + */ + if (expt == 1024) { + DUK_ASSERT(DUK_ISNAN(d) || DUK_ISINF(d)); + p = enc_ctx->ptr; + *p++ = 0xf9U; + if (DUK_ISNAN(d)) { + /* Shortest NaN encoding is using a half-float. Lose the + * exact NaN bits in the process. IEEE double would be + * 7ff8 0000 0000 0000, i.e. a quiet NaN in most architectures + * (https://en.wikipedia.org/wiki/NaN#Encoding). The + * equivalent half float is 7e00. + */ + *p++ = 0x7eU; + } else { + /* Shortest +/- Infinity encoding is using a half-float. */ + if (DUK_SIGNBIT(d)) { + *p++ = 0xfcU; + } else { + *p++ = 0x7cU; + } + } + *p++ = 0x00U; + enc_ctx->ptr = p; + return; + } + + /* Cannot use half-float or float, encode as full IEEE double. */ + p = enc_ctx->ptr; + *p++ = 0xfbU; + DUK_RAW_WRITEINC_DOUBLE_BE(p, d); + enc_ctx->ptr = p; +} + +DUK_LOCAL void duk__cbor_encode_double(duk_cbor_encode_context *enc_ctx, double d) { + duk_uint8_t *p; + double d_floor; + + /* Integers and floating point values of all types are conceptually + * equivalent in CBOR. Try to always choose the shortest encoding + * which is not always immediately obvious. For example, NaN and Inf + * can be most compactly represented as a half-float (assuming NaN + * bits are not preserved), and 0x1'0000'0000 as a single precision + * float. Shortest forms in preference order (prefer integer over + * float when equal length): + * + * uint 1 byte [0,23] (not -0) + * sint 1 byte [-24,-1] + * uint+1 2 bytes [24,255] + * sint+1 2 bytes [-256,-25] + * uint+2 3 bytes [256,65535] + * sint+2 3 bytes [-65536,-257] + * half-float 3 bytes -0, NaN, +/- Infinity, range [-65504,65504] + * uint+4 5 bytes [65536,4294967295] + * sint+4 5 bytes [-4294967296,-258] + * float 5 bytes range [-(1 - 2^(-24)) * 2^128, (1 - 2^(-24)) * 2^128] + * uint+8 9 bytes [4294967296,18446744073709551615] + * sint+8 9 bytes [-18446744073709551616,-4294967297] + * double 9 bytes + * + * For whole numbers (compatible with integers): + * - 1-byte or 2-byte uint/sint representation is preferred for + * [-256,255]. + * - 3-byte uint/sint is preferred for [-65536,65535]. Half floats + * are never preferred because they have the same length. + * - 5-byte uint/sint is preferred for [-4294967296,4294967295]. + * Single precision floats are never preferred, and half-floats + * don't reach above the 3-byte uint/sint range so they're never + * preferred. + * - So, for all integers up to signed/unsigned 32-bit range the + * preferred encoding is always an integer uint/sint. + * - For integers above 32 bits the situation is more complicated. + * Half-floats are never useful for them because of their limited + * range, but IEEE single precision floats (5 bytes encoded) can + * represent some integers between the 32-bit and 64-bit ranges + * which require 9 bytes as a uint/sint. + * + * For floating point values not compatible with integers, the + * preferred encoding is quite clear: + * - For +Inf/-Inf use half-float. + * - For NaN use a half-float, assuming NaN bits ("payload") is + * not worth preserving. Duktape doesn't in general guarantee + * preservation of the NaN payload so using a half-float seems + * consistent with that. + * - For remaining values, prefer the shortest form which doesn't + * lose any precision. For normal half-floats and single precision + * floats this is simple: just check exponent and mantissa bits + * using a fixed mask. For denormal half-floats and single + * precision floats the check is a bit more complicated: a normal + * IEEE double can sometimes be represented as a denormal + * half-float or single precision float. + * + * https://en.wikipedia.org/wiki/Half-precision_floating-point_format#IEEE_754_half-precision_binary_floating-point_format:_binary16 + */ + + /* Caller must ensure space. */ + DUK_ASSERT(duk__cbor_get_reserve(enc_ctx) >= 1 + 8); + + /* Most important path is integers. The floor() test will be true + * for Inf too (but not NaN). + */ + d_floor = DUK_FLOOR(d); /* identity if d is +/- 0.0, NaN, or +/- Infinity */ + if (DUK_LIKELY(duk_double_equals(d_floor, d) != 0)) { + DUK_ASSERT(!DUK_ISNAN(d)); /* NaN == NaN compares false. */ + if (DUK_SIGNBIT(d)) { + if (d >= -4294967296.0) { + d = -1.0 - d; + if (d >= 0.0) { + DUK_ASSERT(d >= 0.0); + duk__cbor_encode_uint32(enc_ctx, duk__cbor_double_to_uint32(d), 0x20U); + return; + } + + /* Input was negative zero, d == -1.0 < 0.0. + * Shortest -0 is using half-float. + */ + p = enc_ctx->ptr; + *p++ = 0xf9U; + *p++ = 0x80U; + *p++ = 0x00U; + enc_ctx->ptr = p; + return; + } + } else { + if (d <= 4294967295.0) { + /* Positive zero needs no special handling. */ + DUK_ASSERT(d >= 0.0); + duk__cbor_encode_uint32(enc_ctx, duk__cbor_double_to_uint32(d), 0x00U); + return; + } + } + } + + /* 64-bit integers are not supported at present. So + * we also don't need to deal with choosing between a + * 64-bit uint/sint representation vs. IEEE double or + * float. + */ + + DUK_ASSERT(DUK_FPCLASSIFY(d) != DUK_FP_ZERO); + duk__cbor_encode_double_fp(enc_ctx, d); +} +#endif /* DUK_CBOR_DOUBLE_AS_IS */ + +DUK_LOCAL void duk__cbor_encode_string_top(duk_cbor_encode_context *enc_ctx) { + const duk_uint8_t *str; + duk_size_t len; + duk_uint8_t *p; + + /* CBOR differentiates between UTF-8 text strings and byte strings. + * Text strings MUST be valid UTF-8, so not all Duktape strings can + * be encoded as valid CBOR text strings. Possible behaviors: + * + * 1. Use text string when input is valid UTF-8, otherwise use + * byte string (maybe tagged to indicate it was an extended + * UTF-8 string). + * 2. Always use text strings, but sanitize input string so that + * invalid UTF-8 is replaced with U+FFFD for example. Combine + * surrogates whenever possible. + * 3. Always use byte strings. This is simple and produces valid + * CBOR, but isn't ideal for interoperability. + * 4. Always use text strings, even for invalid UTF-8 such as + * codepoints in the surrogate pair range. This is simple but + * produces technically invalid CBOR for non-UTF-8 strings which + * may affect interoperability. + * + * Current default is 1; can be changed with defines. + */ + + /* Caller must ensure space. */ + DUK_ASSERT(duk__cbor_get_reserve(enc_ctx) >= 1 + 8); + + str = (const duk_uint8_t *) duk_require_lstring(enc_ctx->thr, -1, &len); + if (duk_is_symbol(enc_ctx->thr, -1)) { + /* Symbols, encode as an empty table for now. This matches + * the behavior of cbor-js. + * + * XXX: Maybe encode String() coercion with a tag? + * XXX: Option to keep enough information to recover + * Symbols when decoding (this is not always desirable). + */ + p = enc_ctx->ptr; + *p++ = 0xa0U; + enc_ctx->ptr = p; + return; + } + + duk__cbor_encode_sizet_uint32_check(enc_ctx, len); +#if defined(DUK_CBOR_TEXT_STRINGS) + duk__cbor_encode_uint32(enc_ctx, (duk_uint32_t) len, 0x60U); +#elif defined(DUK_CBOR_BYTE_STRINGS) + duk__cbor_encode_uint32(enc_ctx, (duk_uint32_t) len, 0x40U); +#else + duk__cbor_encode_uint32(enc_ctx, + (duk_uint32_t) len, + (DUK_LIKELY(duk_unicode_is_utf8_compatible(str, len) != 0) ? 0x60U : 0x40U)); +#endif + duk__cbor_encode_ensure(enc_ctx, len); + p = enc_ctx->ptr; + duk_memcpy((void *) p, (const void *) str, len); + p += len; + enc_ctx->ptr = p; +} + +DUK_LOCAL void duk__cbor_encode_object(duk_cbor_encode_context *enc_ctx) { + duk_uint8_t *buf; + duk_size_t len; + duk_uint8_t *p; + duk_size_t i; + duk_size_t off_ib; + duk_uint32_t count; + + /* Caller must ensure space. */ + DUK_ASSERT(duk__cbor_get_reserve(enc_ctx) >= 1 + 8); + + duk__cbor_encode_objarr_entry(enc_ctx); + + /* XXX: Support for specific built-ins like Date and RegExp. */ + if (duk_is_array(enc_ctx->thr, -1)) { + /* Shortest encoding for arrays >= 256 in length is actually + * the indefinite length one (3 or more bytes vs. 2 bytes). + * We still use the definite length version because it is + * more decoding friendly. + */ + len = duk_get_length(enc_ctx->thr, -1); + duk__cbor_encode_sizet_uint32_check(enc_ctx, len); + duk__cbor_encode_uint32(enc_ctx, (duk_uint32_t) len, 0x80U); + for (i = 0; i < len; i++) { + duk_get_prop_index(enc_ctx->thr, -1, (duk_uarridx_t) i); + duk__cbor_encode_value(enc_ctx); + } + } else if (duk_is_buffer_data(enc_ctx->thr, -1)) { + /* XXX: Tag buffer data? + * XXX: Encode typed arrays as integer arrays rather + * than buffer data as is? + */ + buf = (duk_uint8_t *) duk_require_buffer_data(enc_ctx->thr, -1, &len); + duk__cbor_encode_sizet_uint32_check(enc_ctx, len); + duk__cbor_encode_uint32(enc_ctx, (duk_uint32_t) len, 0x40U); + duk__cbor_encode_ensure(enc_ctx, len); + p = enc_ctx->ptr; + duk_memcpy_unsafe((void *) p, (const void *) buf, len); + p += len; + enc_ctx->ptr = p; + } else { + /* We don't know the number of properties in advance + * but would still like to encode at least small + * objects without indefinite length. Emit an + * indefinite length byte initially, and if the final + * property count is small enough to also fit in one + * byte, backpatch it later. Otherwise keep the + * indefinite length. This works well up to 23 + * properties which is practical and good enough. + */ + off_ib = (duk_size_t) (enc_ctx->ptr - enc_ctx->buf); /* XXX: get_offset? */ + count = 0U; + p = enc_ctx->ptr; + *p++ = 0xa0U + 0x1fU; /* indefinite length */ + enc_ctx->ptr = p; + duk_enum(enc_ctx->thr, -1, DUK_ENUM_OWN_PROPERTIES_ONLY); + while (duk_next(enc_ctx->thr, -1, 1 /*get_value*/)) { + duk_insert(enc_ctx->thr, -2); /* [ ... key value ] -> [ ... value key ] */ + duk__cbor_encode_value(enc_ctx); + duk__cbor_encode_value(enc_ctx); + count++; + if (count == 0U) { + duk__cbor_encode_error(enc_ctx); + } + } + duk_pop(enc_ctx->thr); + if (count <= 0x17U) { + DUK_ASSERT(off_ib < enc_ctx->len); + enc_ctx->buf[off_ib] = 0xa0U + (duk_uint8_t) count; + } else { + duk__cbor_encode_ensure(enc_ctx, 1); + p = enc_ctx->ptr; + *p++ = 0xffU; /* break */ + enc_ctx->ptr = p; + } + } + + duk__cbor_encode_objarr_exit(enc_ctx); +} + +DUK_LOCAL void duk__cbor_encode_buffer(duk_cbor_encode_context *enc_ctx) { + duk_uint8_t *buf; + duk_size_t len; + duk_uint8_t *p; + + /* Caller must ensure space. */ + DUK_ASSERT(duk__cbor_get_reserve(enc_ctx) >= 1 + 8); + + /* Tag buffer data? */ + buf = (duk_uint8_t *) duk_require_buffer(enc_ctx->thr, -1, &len); + duk__cbor_encode_sizet_uint32_check(enc_ctx, len); + duk__cbor_encode_uint32(enc_ctx, (duk_uint32_t) len, 0x40U); + duk__cbor_encode_ensure(enc_ctx, len); + p = enc_ctx->ptr; + duk_memcpy_unsafe((void *) p, (const void *) buf, len); + p += len; + enc_ctx->ptr = p; +} + +DUK_LOCAL void duk__cbor_encode_pointer(duk_cbor_encode_context *enc_ctx) { + /* Pointers (void *) are challenging to encode. They can't + * be relied to be even 64-bit integer compatible (there are + * pointer models larger than that), nor can floats encode + * them. They could be encoded as strings (%p format) but + * that's not portable. They could be encoded as direct memory + * representations. Recovering pointers is non-portable in any + * case but it would be nice to be able to detect and recover + * compatible pointers. + * + * For now, encode as "(%p)" string, matching JX. There doesn't + * seem to be an appropriate tag, so pointers don't currently + * survive a CBOR encode/decode roundtrip intact. + */ + const char *ptr; + + ptr = duk_to_string(enc_ctx->thr, -1); + DUK_ASSERT(ptr != NULL); + duk_push_sprintf(enc_ctx->thr, "(%s)", ptr); + duk_remove(enc_ctx->thr, -2); + duk__cbor_encode_string_top(enc_ctx); +} + +DUK_LOCAL void duk__cbor_encode_lightfunc(duk_cbor_encode_context *enc_ctx) { + duk_uint8_t *p; + + /* Caller must ensure space. */ + DUK_ASSERT(duk__cbor_get_reserve(enc_ctx) >= 1 + 8); + + /* For now encode as an empty object. */ + p = enc_ctx->ptr; + *p++ = 0xa0U; + enc_ctx->ptr = p; +} + +DUK_LOCAL void duk__cbor_encode_value(duk_cbor_encode_context *enc_ctx) { + duk_uint8_t *p; + + /* Encode/decode cycle currently loses some type information. + * This can be improved by registering custom tags with IANA. + */ + + /* Reserve space for up to 64-bit types (1 initial byte + 8 + * followup bytes). This allows encoding of integers, floats, + * string/buffer length fields, etc without separate checks + * in each code path. + */ + duk__cbor_encode_ensure(enc_ctx, 1 + 8); + + switch (duk_get_type(enc_ctx->thr, -1)) { + case DUK_TYPE_UNDEFINED: { + p = enc_ctx->ptr; + *p++ = 0xf7; + enc_ctx->ptr = p; + break; + } + case DUK_TYPE_NULL: { + p = enc_ctx->ptr; + *p++ = 0xf6; + enc_ctx->ptr = p; + break; + } + case DUK_TYPE_BOOLEAN: { + duk_uint8_t u8 = duk_get_boolean(enc_ctx->thr, -1) ? 0xf5U : 0xf4U; + p = enc_ctx->ptr; + *p++ = u8; + enc_ctx->ptr = p; + break; + } + case DUK_TYPE_NUMBER: { + duk__cbor_encode_double(enc_ctx, duk_get_number(enc_ctx->thr, -1)); + break; + } + case DUK_TYPE_STRING: { + duk__cbor_encode_string_top(enc_ctx); + break; + } + case DUK_TYPE_OBJECT: { + duk__cbor_encode_object(enc_ctx); + break; + } + case DUK_TYPE_BUFFER: { + duk__cbor_encode_buffer(enc_ctx); + break; + } + case DUK_TYPE_POINTER: { + duk__cbor_encode_pointer(enc_ctx); + break; + } + case DUK_TYPE_LIGHTFUNC: { + duk__cbor_encode_lightfunc(enc_ctx); + break; + } + case DUK_TYPE_NONE: + default: + goto fail; + } + + duk_pop(enc_ctx->thr); + return; + +fail: + duk__cbor_encode_error(enc_ctx); +} + +/* + * Decoding + */ + +DUK_LOCAL void duk__cbor_decode_error(duk_cbor_decode_context *dec_ctx) { + (void) duk_type_error(dec_ctx->thr, "cbor decode error"); +} + +DUK_LOCAL void duk__cbor_decode_req_stack(duk_cbor_decode_context *dec_ctx) { + duk_require_stack(dec_ctx->thr, 4); +} + +DUK_LOCAL void duk__cbor_decode_objarr_entry(duk_cbor_decode_context *dec_ctx) { + duk_hthread *thr = dec_ctx->thr; + + /* Native stack check in object/array recursion. */ + duk_native_stack_check(thr); + + duk__cbor_decode_req_stack(dec_ctx); + + DUK_ASSERT(dec_ctx->recursion_depth <= dec_ctx->recursion_limit); + if (dec_ctx->recursion_depth >= dec_ctx->recursion_limit) { + DUK_ERROR_RANGE(thr, DUK_STR_DEC_RECLIMIT); + DUK_WO_NORETURN(return;); + } + dec_ctx->recursion_depth++; +} + +DUK_LOCAL void duk__cbor_decode_objarr_exit(duk_cbor_decode_context *dec_ctx) { + DUK_ASSERT(dec_ctx->recursion_depth > 0); + dec_ctx->recursion_depth--; +} + +DUK_LOCAL duk_uint8_t duk__cbor_decode_readbyte(duk_cbor_decode_context *dec_ctx) { + DUK_ASSERT(dec_ctx->off <= dec_ctx->len); + if (DUK_UNLIKELY(dec_ctx->len - dec_ctx->off < 1U)) { + duk__cbor_decode_error(dec_ctx); + } + return dec_ctx->buf[dec_ctx->off++]; +} + +DUK_LOCAL duk_uint16_t duk__cbor_decode_read_u16(duk_cbor_decode_context *dec_ctx) { + duk_uint16_t res; + + DUK_ASSERT(dec_ctx->off <= dec_ctx->len); + if (DUK_UNLIKELY(dec_ctx->len - dec_ctx->off < 2U)) { + duk__cbor_decode_error(dec_ctx); + } + res = DUK_RAW_READ_U16_BE(dec_ctx->buf + dec_ctx->off); + dec_ctx->off += 2; + return res; +} + +DUK_LOCAL duk_uint32_t duk__cbor_decode_read_u32(duk_cbor_decode_context *dec_ctx) { + duk_uint32_t res; + + DUK_ASSERT(dec_ctx->off <= dec_ctx->len); + if (DUK_UNLIKELY(dec_ctx->len - dec_ctx->off < 4U)) { + duk__cbor_decode_error(dec_ctx); + } + res = DUK_RAW_READ_U32_BE(dec_ctx->buf + dec_ctx->off); + dec_ctx->off += 4; + return res; +} + +DUK_LOCAL duk_uint8_t duk__cbor_decode_peekbyte(duk_cbor_decode_context *dec_ctx) { + if (DUK_UNLIKELY(dec_ctx->off >= dec_ctx->len)) { + duk__cbor_decode_error(dec_ctx); + } + return dec_ctx->buf[dec_ctx->off]; +} + +DUK_LOCAL void duk__cbor_decode_rewind(duk_cbor_decode_context *dec_ctx, duk_size_t len) { + DUK_ASSERT(len <= dec_ctx->off); /* Caller must ensure. */ + dec_ctx->off -= len; +} + +#if 0 +DUK_LOCAL void duk__cbor_decode_ensure(duk_cbor_decode_context *dec_ctx, duk_size_t len) { + if (dec_ctx->off + len > dec_ctx->len) { + duk__cbor_decode_error(dec_ctx); + } +} +#endif + +DUK_LOCAL const duk_uint8_t *duk__cbor_decode_consume(duk_cbor_decode_context *dec_ctx, duk_size_t len) { + DUK_ASSERT(dec_ctx->off <= dec_ctx->len); + if (DUK_LIKELY(dec_ctx->len - dec_ctx->off >= len)) { + const duk_uint8_t *res = dec_ctx->buf + dec_ctx->off; + dec_ctx->off += len; + return res; + } + + duk__cbor_decode_error(dec_ctx); /* Not enough input. */ + return NULL; +} + +DUK_LOCAL int duk__cbor_decode_checkbreak(duk_cbor_decode_context *dec_ctx) { + if (duk__cbor_decode_peekbyte(dec_ctx) == 0xffU) { + DUK_ASSERT(dec_ctx->off < dec_ctx->len); + dec_ctx->off++; +#if 0 + (void) duk__cbor_decode_readbyte(dec_ctx); +#endif + return 1; + } + return 0; +} + +DUK_LOCAL void duk__cbor_decode_push_aival_int(duk_cbor_decode_context *dec_ctx, duk_uint8_t ib, duk_bool_t negative) { + duk_uint8_t ai; + duk_uint32_t t, t1, t2; +#if 0 + duk_uint64_t t3; +#endif + duk_double_t d1, d2; + duk_double_t d; + + ai = ib & 0x1fU; + if (ai <= 0x17U) { + t = ai; + goto shared_exit; + } + + switch (ai) { + case 0x18U: /* 1 byte */ + t = (duk_uint32_t) duk__cbor_decode_readbyte(dec_ctx); + goto shared_exit; + case 0x19U: /* 2 byte */ + t = (duk_uint32_t) duk__cbor_decode_read_u16(dec_ctx); + goto shared_exit; + case 0x1aU: /* 4 byte */ + t = (duk_uint32_t) duk__cbor_decode_read_u32(dec_ctx); + goto shared_exit; + case 0x1bU: /* 8 byte */ + /* For uint64 it's important to handle the -1.0 part before + * casting to double: otherwise the adjustment might be lost + * in the cast. Uses: -1.0 - d <=> -(d + 1.0). + */ + t = (duk_uint32_t) duk__cbor_decode_read_u32(dec_ctx); + t2 = t; + t = (duk_uint32_t) duk__cbor_decode_read_u32(dec_ctx); + t1 = t; +#if 0 + t3 = (duk_uint64_t) t2 * DUK_U64_CONSTANT(0x100000000) + (duk_uint64_t) t1; + if (negative) { + if (t3 == DUK_UINT64_MAX) { + /* -(0xffff'ffff'ffff'ffffULL + 1) = + * -0x1'0000'0000'0000'0000 + * + * >>> -0x10000000000000000 + * -18446744073709551616L + */ + return -18446744073709551616.0; + } else { + return -((duk_double_t) (t3 + DUK_U64_CONSTANT(1))); + } + } else { + return (duk_double_t) t3; /* XXX: cast helper */ + } +#endif +#if 0 + t3 = (duk_uint64_t) t2 * DUK_U64_CONSTANT(0x100000000) + (duk_uint64_t) t1; + if (negative) { + /* Simpler version: take advantage of the fact that + * 0xffff'ffff'ffff'ffff and 0x1'0000'0000'0000'0000 + * both round to 0x1'0000'0000'0000'0000: + * > (0xffffffffffffffff).toString(16) + * '10000000000000000' + * > (0x10000000000000000).toString(16) + * '10000000000000000' + * + * For the DUK_UINT64_MAX case we just skip the +1 + * increment to avoid wrapping; the result still + * comes out right for an IEEE double cast. + */ + if (t3 != DUK_UINT64_MAX) { + t3++; + } + return -((duk_double_t) t3); + } else { + return (duk_double_t) t3; /* XXX: cast helper */ + } +#endif +#if 1 + /* Use two double parts, avoids dependency on 64-bit type. + * Avoid precision loss carefully, especially when dealing + * with the required +1 for negative values. + * + * No fastint check for this path at present. + */ + d1 = (duk_double_t) t1; /* XXX: cast helpers */ + d2 = (duk_double_t) t2 * 4294967296.0; + if (negative) { + d1 += 1.0; + } + d = d2 + d1; + if (negative) { + d = -d; + } +#endif + /* XXX: a push and check for fastint API would be nice */ + duk_push_number(dec_ctx->thr, d); + return; + } + + duk__cbor_decode_error(dec_ctx); + return; + +shared_exit: + if (negative) { + /* XXX: a push and check for fastint API would be nice */ + if ((duk_uint_t) t <= (duk_uint_t) - (DUK_INT_MIN + 1)) { + duk_push_int(dec_ctx->thr, -1 - ((duk_int_t) t)); + } else { + duk_push_number(dec_ctx->thr, -1.0 - (duk_double_t) t); + } + } else { + duk_push_uint(dec_ctx->thr, (duk_uint_t) t); + } +} + +DUK_LOCAL void duk__cbor_decode_skip_aival_int(duk_cbor_decode_context *dec_ctx, duk_uint8_t ib) { + const duk_int8_t skips[32] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 4, 8, -1, -1, -1, -1 }; + duk_uint8_t ai; + duk_int8_t skip; + + ai = ib & 0x1fU; + skip = skips[ai]; + if (DUK_UNLIKELY(skip < 0)) { + duk__cbor_decode_error(dec_ctx); + } + duk__cbor_decode_consume(dec_ctx, (duk_size_t) skip); + return; +} + +DUK_LOCAL duk_uint32_t duk__cbor_decode_aival_uint32(duk_cbor_decode_context *dec_ctx, duk_uint8_t ib) { + duk_uint8_t ai; + duk_uint32_t t; + + ai = ib & 0x1fU; + if (ai <= 0x17U) { + return (duk_uint32_t) ai; + } + + switch (ai) { + case 0x18U: /* 1 byte */ + t = (duk_uint32_t) duk__cbor_decode_readbyte(dec_ctx); + return t; + case 0x19U: /* 2 byte */ + t = (duk_uint32_t) duk__cbor_decode_read_u16(dec_ctx); + return t; + case 0x1aU: /* 4 byte */ + t = (duk_uint32_t) duk__cbor_decode_read_u32(dec_ctx); + return t; + case 0x1bU: /* 8 byte */ + t = (duk_uint32_t) duk__cbor_decode_read_u32(dec_ctx); + if (t != 0U) { + break; + } + t = (duk_uint32_t) duk__cbor_decode_read_u32(dec_ctx); + return t; + } + + duk__cbor_decode_error(dec_ctx); + return 0U; +} + +DUK_LOCAL void duk__cbor_decode_buffer(duk_cbor_decode_context *dec_ctx, duk_uint8_t expected_base) { + duk_uint32_t len; + duk_uint8_t *buf; + const duk_uint8_t *inp; + duk_uint8_t ib; + + ib = duk__cbor_decode_readbyte(dec_ctx); + if ((ib & 0xe0U) != expected_base) { + duk__cbor_decode_error(dec_ctx); + } + /* Indefinite format is rejected by the following on purpose. */ + len = duk__cbor_decode_aival_uint32(dec_ctx, ib); + inp = duk__cbor_decode_consume(dec_ctx, len); + /* XXX: duk_push_fixed_buffer_with_data() would be a nice API addition. */ + buf = (duk_uint8_t *) duk_push_fixed_buffer(dec_ctx->thr, (duk_size_t) len); + duk_memcpy((void *) buf, (const void *) inp, (size_t) len); +} + +DUK_LOCAL void duk__cbor_decode_join_buffers(duk_cbor_decode_context *dec_ctx, duk_idx_t count) { + duk_size_t total_size = 0; + duk_idx_t top = duk_get_top(dec_ctx->thr); + duk_idx_t base = top - count; /* count is >= 1 */ + duk_idx_t idx; + duk_uint8_t *p = NULL; + + DUK_ASSERT(count >= 1); + DUK_ASSERT(top >= count); + + for (;;) { + /* First round: compute total size. + * Second round: copy into place. + */ + for (idx = base; idx < top; idx++) { + duk_uint8_t *buf_data; + duk_size_t buf_size; + + buf_data = (duk_uint8_t *) duk_require_buffer(dec_ctx->thr, idx, &buf_size); + if (p != NULL) { + duk_memcpy_unsafe((void *) p, (const void *) buf_data, buf_size); + p += buf_size; + } else { + total_size += buf_size; + if (DUK_UNLIKELY(total_size < buf_size)) { /* Wrap check. */ + duk__cbor_decode_error(dec_ctx); + } + } + } + + if (p != NULL) { + break; + } else { + p = (duk_uint8_t *) duk_push_fixed_buffer(dec_ctx->thr, total_size); + DUK_ASSERT(p != NULL); + } + } + + duk_replace(dec_ctx->thr, base); + duk_pop_n(dec_ctx->thr, count - 1); +} + +DUK_LOCAL void duk__cbor_decode_and_join_strbuf(duk_cbor_decode_context *dec_ctx, duk_uint8_t expected_base) { + duk_idx_t count = 0; + for (;;) { + if (duk__cbor_decode_checkbreak(dec_ctx)) { + break; + } + duk_require_stack(dec_ctx->thr, 1); + duk__cbor_decode_buffer(dec_ctx, expected_base); + count++; + if (DUK_UNLIKELY(count <= 0)) { /* Wrap check. */ + duk__cbor_decode_error(dec_ctx); + } + } + if (count == 0) { + (void) duk_push_fixed_buffer(dec_ctx->thr, 0); + } else if (count > 1) { + duk__cbor_decode_join_buffers(dec_ctx, count); + } +} + +DUK_LOCAL duk_double_t duk__cbor_decode_half_float(duk_cbor_decode_context *dec_ctx) { + duk_double_union u; + const duk_uint8_t *inp; + duk_int_t expt; + duk_uint_t u16; + duk_uint_t tmp; + duk_double_t res; + + inp = duk__cbor_decode_consume(dec_ctx, 2); + u16 = ((duk_uint_t) inp[0] << 8) + (duk_uint_t) inp[1]; + expt = (duk_int_t) ((u16 >> 10) & 0x1fU) - 15; + + /* Reconstruct IEEE double into little endian order first, then convert + * to host order. + */ + + duk_memzero((void *) &u, sizeof(u)); + + if (expt == -15) { + /* Zero or denormal; but note that half float + * denormals become double normals. + */ + if ((u16 & 0x03ffU) == 0) { + u.uc[7] = inp[0] & 0x80U; + } else { + /* Create denormal by first creating a double that + * contains the denormal bits and a leading implicit + * 1-bit. Then subtract away the implicit 1-bit. + * + * 0.mmmmmmmmmm * 2^-14 + * 1.mmmmmmmmmm 0.... * 2^-14 + * -1.0000000000 0.... * 2^-14 + * + * Double exponent: -14 + 1023 = 0x3f1 + */ + u.uc[7] = 0x3fU; + u.uc[6] = 0x10U + (duk_uint8_t) ((u16 >> 6) & 0x0fU); + u.uc[5] = (duk_uint8_t) ((u16 << 2) & 0xffU); /* Mask is really 0xfcU */ + + duk_dblunion_little_to_host(&u); + res = u.d - 0.00006103515625; /* 2^(-14) */ + if (u16 & 0x8000U) { + res = -res; + } + return res; + } + } else if (expt == 16) { + /* +/- Inf or NaN. */ + if ((u16 & 0x03ffU) == 0) { + u.uc[7] = (inp[0] & 0x80U) + 0x7fU; + u.uc[6] = 0xf0U; + } else { + /* Create a 'quiet NaN' with highest + * bit set (there are some platforms + * where the NaN payload convention is + * the opposite). Keep sign. + */ + u.uc[7] = (inp[0] & 0x80U) + 0x7fU; + u.uc[6] = 0xf8U; + } + } else { + /* Normal. */ + tmp = (inp[0] & 0x80U) ? 0x80000000UL : 0UL; + tmp += (duk_uint_t) (expt + 1023) << 20; + tmp += (duk_uint_t) (inp[0] & 0x03U) << 18; + tmp += (duk_uint_t) (inp[1] & 0xffU) << 10; + u.uc[7] = (tmp >> 24) & 0xffU; + u.uc[6] = (tmp >> 16) & 0xffU; + u.uc[5] = (tmp >> 8) & 0xffU; + u.uc[4] = (tmp >> 0) & 0xffU; + } + + duk_dblunion_little_to_host(&u); + return u.d; +} + +DUK_LOCAL void duk__cbor_decode_string(duk_cbor_decode_context *dec_ctx, duk_uint8_t ib, duk_uint8_t ai) { + /* If the CBOR string data is not valid UTF-8 it is technically + * invalid CBOR. Possible behaviors at least: + * + * 1. Reject the input, i.e. throw TypeError. + * + * 2. Accept the input, but sanitize non-UTF-8 data into UTF-8 + * using U+FFFD replacements. Also it might make sense to + * decode non-BMP codepoints into surrogates for better + * ECMAScript compatibility. + * + * 3. Accept the input as a Duktape string (which are not always + * valid UTF-8), but reject any input that would create a + * Symbol representation. + * + * Current behavior is 3. + */ + + if (ai == 0x1fU) { + duk_uint8_t *buf_data; + duk_size_t buf_size; + + duk__cbor_decode_and_join_strbuf(dec_ctx, 0x60U); + buf_data = (duk_uint8_t *) duk_require_buffer(dec_ctx->thr, -1, &buf_size); + (void) duk_push_lstring(dec_ctx->thr, (const char *) buf_data, buf_size); + duk_remove(dec_ctx->thr, -2); + } else { + duk_uint32_t len; + const duk_uint8_t *inp; + + len = duk__cbor_decode_aival_uint32(dec_ctx, ib); + inp = duk__cbor_decode_consume(dec_ctx, len); + (void) duk_push_lstring(dec_ctx->thr, (const char *) inp, (duk_size_t) len); + } + if (duk_is_symbol(dec_ctx->thr, -1)) { + /* Refuse to create Symbols when decoding. */ + duk__cbor_decode_error(dec_ctx); + } + + /* XXX: Here a Duktape API call to convert input -> utf-8 with + * replacements would be nice. + */ +} + +DUK_LOCAL duk_bool_t duk__cbor_decode_array(duk_cbor_decode_context *dec_ctx, duk_uint8_t ib, duk_uint8_t ai) { + duk_uint32_t idx, len; + + duk__cbor_decode_objarr_entry(dec_ctx); + + /* Support arrays up to 0xfffffffeU in length. 0xffffffff is + * used as an indefinite length marker. + */ + if (ai == 0x1fU) { + len = 0xffffffffUL; + } else { + len = duk__cbor_decode_aival_uint32(dec_ctx, ib); + if (len == 0xffffffffUL) { + goto failure; + } + } + + /* XXX: use bare array? */ + duk_push_array(dec_ctx->thr); + for (idx = 0U;;) { + if (len == 0xffffffffUL && duk__cbor_decode_checkbreak(dec_ctx)) { + break; + } + if (idx == len) { + if (ai == 0x1fU) { + goto failure; + } + break; + } + duk__cbor_decode_value(dec_ctx); + duk_put_prop_index(dec_ctx->thr, -2, (duk_uarridx_t) idx); + idx++; + if (idx == 0U) { + goto failure; /* wrapped */ + } + } + +#if 0 + success: +#endif + duk__cbor_decode_objarr_exit(dec_ctx); + return 1; + +failure: + /* No need to unwind recursion checks, caller will throw. */ + return 0; +} + +DUK_LOCAL duk_bool_t duk__cbor_decode_map(duk_cbor_decode_context *dec_ctx, duk_uint8_t ib, duk_uint8_t ai) { + duk_uint32_t count; + + duk__cbor_decode_objarr_entry(dec_ctx); + + if (ai == 0x1fU) { + count = 0xffffffffUL; + } else { + count = duk__cbor_decode_aival_uint32(dec_ctx, ib); + if (count == 0xffffffffUL) { + goto failure; + } + } + + /* XXX: use bare object? */ + duk_push_object(dec_ctx->thr); + for (;;) { + if (count == 0xffffffffUL) { + if (duk__cbor_decode_checkbreak(dec_ctx)) { + break; + } + } else { + if (count == 0UL) { + break; + } + count--; + } + + /* Non-string keys are coerced to strings, + * possibly leading to overwriting previous + * keys. Last key of a certain coerced name + * wins. If key is an object, it will coerce + * to '[object Object]' which is consistent + * but potentially misleading. One alternative + * would be to skip non-string keys. + */ + duk__cbor_decode_value(dec_ctx); + duk__cbor_decode_value(dec_ctx); + duk_put_prop(dec_ctx->thr, -3); + } + +#if 0 + success: +#endif + duk__cbor_decode_objarr_exit(dec_ctx); + return 1; + +failure: + /* No need to unwind recursion checks, caller will throw. */ + return 0; +} + +DUK_LOCAL duk_double_t duk__cbor_decode_float(duk_cbor_decode_context *dec_ctx) { + duk_float_union u; + const duk_uint8_t *inp; + inp = duk__cbor_decode_consume(dec_ctx, 4); + duk_memcpy((void *) u.uc, (const void *) inp, 4); + duk_fltunion_big_to_host(&u); + return (duk_double_t) u.f; +} + +DUK_LOCAL duk_double_t duk__cbor_decode_double(duk_cbor_decode_context *dec_ctx) { + duk_double_union u; + const duk_uint8_t *inp; + inp = duk__cbor_decode_consume(dec_ctx, 8); + duk_memcpy((void *) u.uc, (const void *) inp, 8); + duk_dblunion_big_to_host(&u); + return u.d; +} + +#if defined(DUK_CBOR_DECODE_FASTPATH) +#define DUK__CBOR_AI (ib & 0x1fU) + +DUK_LOCAL void duk__cbor_decode_value(duk_cbor_decode_context *dec_ctx) { + duk_uint8_t ib; + + /* Any paths potentially recursing back to duk__cbor_decode_value() + * must perform a Duktape value stack growth check. Avoid the check + * here for simple paths like primitive values. + */ + +reread_initial_byte: + DUK_DDD(DUK_DDDPRINT("cbor decode off=%ld len=%ld", (long) dec_ctx->off, (long) dec_ctx->len)); + + ib = duk__cbor_decode_readbyte(dec_ctx); + + /* Full initial byte switch, footprint cost over baseline is ~+1kB. */ + /* XXX: Force full switch with no range check. */ + + switch (ib) { + case 0x00U: + case 0x01U: + case 0x02U: + case 0x03U: + case 0x04U: + case 0x05U: + case 0x06U: + case 0x07U: + case 0x08U: + case 0x09U: + case 0x0aU: + case 0x0bU: + case 0x0cU: + case 0x0dU: + case 0x0eU: + case 0x0fU: + case 0x10U: + case 0x11U: + case 0x12U: + case 0x13U: + case 0x14U: + case 0x15U: + case 0x16U: + case 0x17U: + duk_push_uint(dec_ctx->thr, ib); + break; + case 0x18U: + case 0x19U: + case 0x1aU: + case 0x1bU: + duk__cbor_decode_push_aival_int(dec_ctx, ib, 0 /*negative*/); + break; + case 0x1cU: + case 0x1dU: + case 0x1eU: + case 0x1fU: + goto format_error; + case 0x20U: + case 0x21U: + case 0x22U: + case 0x23U: + case 0x24U: + case 0x25U: + case 0x26U: + case 0x27U: + case 0x28U: + case 0x29U: + case 0x2aU: + case 0x2bU: + case 0x2cU: + case 0x2dU: + case 0x2eU: + case 0x2fU: + case 0x30U: + case 0x31U: + case 0x32U: + case 0x33U: + case 0x34U: + case 0x35U: + case 0x36U: + case 0x37U: + duk_push_int(dec_ctx->thr, -((duk_int_t) ((ib - 0x20U) + 1U))); + break; + case 0x38U: + case 0x39U: + case 0x3aU: + case 0x3bU: + duk__cbor_decode_push_aival_int(dec_ctx, ib, 1 /*negative*/); + break; + case 0x3cU: + case 0x3dU: + case 0x3eU: + case 0x3fU: + goto format_error; + case 0x40U: + case 0x41U: + case 0x42U: + case 0x43U: + case 0x44U: + case 0x45U: + case 0x46U: + case 0x47U: + case 0x48U: + case 0x49U: + case 0x4aU: + case 0x4bU: + case 0x4cU: + case 0x4dU: + case 0x4eU: + case 0x4fU: + case 0x50U: + case 0x51U: + case 0x52U: + case 0x53U: + case 0x54U: + case 0x55U: + case 0x56U: + case 0x57U: + /* XXX: Avoid rewind, we know the length already. */ + DUK_ASSERT(dec_ctx->off > 0U); + dec_ctx->off--; + duk__cbor_decode_buffer(dec_ctx, 0x40U); + break; + case 0x58U: + case 0x59U: + case 0x5aU: + case 0x5bU: + /* XXX: Avoid rewind, decode length inline. */ + DUK_ASSERT(dec_ctx->off > 0U); + dec_ctx->off--; + duk__cbor_decode_buffer(dec_ctx, 0x40U); + break; + case 0x5cU: + case 0x5dU: + case 0x5eU: + goto format_error; + case 0x5fU: + duk__cbor_decode_and_join_strbuf(dec_ctx, 0x40U); + break; + case 0x60U: + case 0x61U: + case 0x62U: + case 0x63U: + case 0x64U: + case 0x65U: + case 0x66U: + case 0x67U: + case 0x68U: + case 0x69U: + case 0x6aU: + case 0x6bU: + case 0x6cU: + case 0x6dU: + case 0x6eU: + case 0x6fU: + case 0x70U: + case 0x71U: + case 0x72U: + case 0x73U: + case 0x74U: + case 0x75U: + case 0x76U: + case 0x77U: + /* XXX: Avoid double decode of length. */ + duk__cbor_decode_string(dec_ctx, ib, DUK__CBOR_AI); + break; + case 0x78U: + case 0x79U: + case 0x7aU: + case 0x7bU: + /* XXX: Avoid double decode of length. */ + duk__cbor_decode_string(dec_ctx, ib, DUK__CBOR_AI); + break; + case 0x7cU: + case 0x7dU: + case 0x7eU: + goto format_error; + case 0x7fU: + duk__cbor_decode_string(dec_ctx, ib, DUK__CBOR_AI); + break; + case 0x80U: + case 0x81U: + case 0x82U: + case 0x83U: + case 0x84U: + case 0x85U: + case 0x86U: + case 0x87U: + case 0x88U: + case 0x89U: + case 0x8aU: + case 0x8bU: + case 0x8cU: + case 0x8dU: + case 0x8eU: + case 0x8fU: + case 0x90U: + case 0x91U: + case 0x92U: + case 0x93U: + case 0x94U: + case 0x95U: + case 0x96U: + case 0x97U: + if (DUK_UNLIKELY(duk__cbor_decode_array(dec_ctx, ib, DUK__CBOR_AI) == 0)) { + goto format_error; + } + break; + case 0x98U: + case 0x99U: + case 0x9aU: + case 0x9bU: + if (DUK_UNLIKELY(duk__cbor_decode_array(dec_ctx, ib, DUK__CBOR_AI) == 0)) { + goto format_error; + } + break; + case 0x9cU: + case 0x9dU: + case 0x9eU: + goto format_error; + case 0x9fU: + if (DUK_UNLIKELY(duk__cbor_decode_array(dec_ctx, ib, DUK__CBOR_AI) == 0)) { + goto format_error; + } + break; + case 0xa0U: + case 0xa1U: + case 0xa2U: + case 0xa3U: + case 0xa4U: + case 0xa5U: + case 0xa6U: + case 0xa7U: + case 0xa8U: + case 0xa9U: + case 0xaaU: + case 0xabU: + case 0xacU: + case 0xadU: + case 0xaeU: + case 0xafU: + case 0xb0U: + case 0xb1U: + case 0xb2U: + case 0xb3U: + case 0xb4U: + case 0xb5U: + case 0xb6U: + case 0xb7U: + if (DUK_UNLIKELY(duk__cbor_decode_map(dec_ctx, ib, DUK__CBOR_AI) == 0)) { + goto format_error; + } + break; + case 0xb8U: + case 0xb9U: + case 0xbaU: + case 0xbbU: + if (DUK_UNLIKELY(duk__cbor_decode_map(dec_ctx, ib, DUK__CBOR_AI) == 0)) { + goto format_error; + } + break; + case 0xbcU: + case 0xbdU: + case 0xbeU: + goto format_error; + case 0xbfU: + if (DUK_UNLIKELY(duk__cbor_decode_map(dec_ctx, ib, DUK__CBOR_AI) == 0)) { + goto format_error; + } + break; + case 0xc0U: + case 0xc1U: + case 0xc2U: + case 0xc3U: + case 0xc4U: + case 0xc5U: + case 0xc6U: + case 0xc7U: + case 0xc8U: + case 0xc9U: + case 0xcaU: + case 0xcbU: + case 0xccU: + case 0xcdU: + case 0xceU: + case 0xcfU: + case 0xd0U: + case 0xd1U: + case 0xd2U: + case 0xd3U: + case 0xd4U: + case 0xd5U: + case 0xd6U: + case 0xd7U: + /* Tag 0-23: drop. */ + goto reread_initial_byte; + case 0xd8U: + case 0xd9U: + case 0xdaU: + case 0xdbU: + duk__cbor_decode_skip_aival_int(dec_ctx, ib); + goto reread_initial_byte; + case 0xdcU: + case 0xddU: + case 0xdeU: + case 0xdfU: + goto format_error; + case 0xe0U: + goto format_error; + case 0xe1U: + goto format_error; + case 0xe2U: + goto format_error; + case 0xe3U: + goto format_error; + case 0xe4U: + goto format_error; + case 0xe5U: + goto format_error; + case 0xe6U: + goto format_error; + case 0xe7U: + goto format_error; + case 0xe8U: + goto format_error; + case 0xe9U: + goto format_error; + case 0xeaU: + goto format_error; + case 0xebU: + goto format_error; + case 0xecU: + goto format_error; + case 0xedU: + goto format_error; + case 0xeeU: + goto format_error; + case 0xefU: + goto format_error; + case 0xf0U: + goto format_error; + case 0xf1U: + goto format_error; + case 0xf2U: + goto format_error; + case 0xf3U: + goto format_error; + case 0xf4U: + duk_push_false(dec_ctx->thr); + break; + case 0xf5U: + duk_push_true(dec_ctx->thr); + break; + case 0xf6U: + duk_push_null(dec_ctx->thr); + break; + case 0xf7U: + duk_push_undefined(dec_ctx->thr); + break; + case 0xf8U: + /* Simple value 32-255, nothing defined yet, so reject. */ + goto format_error; + case 0xf9U: { + duk_double_t d; + d = duk__cbor_decode_half_float(dec_ctx); + duk_push_number(dec_ctx->thr, d); + break; + } + case 0xfaU: { + duk_double_t d; + d = duk__cbor_decode_float(dec_ctx); + duk_push_number(dec_ctx->thr, d); + break; + } + case 0xfbU: { + duk_double_t d; + d = duk__cbor_decode_double(dec_ctx); + duk_push_number(dec_ctx->thr, d); + break; + } + case 0xfcU: + case 0xfdU: + case 0xfeU: + case 0xffU: + goto format_error; + } /* end switch */ + + return; + +format_error: + duk__cbor_decode_error(dec_ctx); +} +#else /* DUK_CBOR_DECODE_FASTPATH */ +DUK_LOCAL void duk__cbor_decode_value(duk_cbor_decode_context *dec_ctx) { + duk_uint8_t ib, mt, ai; + + /* Any paths potentially recursing back to duk__cbor_decode_value() + * must perform a Duktape value stack growth check. Avoid the check + * here for simple paths like primitive values. + */ + +reread_initial_byte: + DUK_DDD(DUK_DDDPRINT("cbor decode off=%ld len=%ld", (long) dec_ctx->off, (long) dec_ctx->len)); + + ib = duk__cbor_decode_readbyte(dec_ctx); + mt = ib >> 5U; + ai = ib & 0x1fU; + + /* Additional information in [24,27] = [0x18,0x1b] has relatively + * uniform handling for all major types: read 1/2/4/8 additional + * bytes. For major type 7 the 1-byte value is a 'simple type', and + * 2/4/8-byte values are floats. For other major types the 1/2/4/8 + * byte values are integers. The lengths are uniform, but the typing + * is not. + */ + + switch (mt) { + case 0U: { /* unsigned integer */ + duk__cbor_decode_push_aival_int(dec_ctx, ib, 0 /*negative*/); + break; + } + case 1U: { /* negative integer */ + duk__cbor_decode_push_aival_int(dec_ctx, ib, 1 /*negative*/); + break; + } + case 2U: { /* byte string */ + if (ai == 0x1fU) { + duk__cbor_decode_and_join_strbuf(dec_ctx, 0x40U); + } else { + duk__cbor_decode_rewind(dec_ctx, 1U); + duk__cbor_decode_buffer(dec_ctx, 0x40U); + } + break; + } + case 3U: { /* text string */ + duk__cbor_decode_string(dec_ctx, ib, ai); + break; + } + case 4U: { /* array of data items */ + if (DUK_UNLIKELY(duk__cbor_decode_array(dec_ctx, ib, ai) == 0)) { + goto format_error; + } + break; + } + case 5U: { /* map of pairs of data items */ + if (DUK_UNLIKELY(duk__cbor_decode_map(dec_ctx, ib, ai) == 0)) { + goto format_error; + } + break; + } + case 6U: { /* semantic tagging */ + /* Tags are ignored now, re-read initial byte. A tagged + * value may itself be tagged (an unlimited number of times) + * so keep on peeling away tags. + */ + duk__cbor_decode_skip_aival_int(dec_ctx, ib); + goto reread_initial_byte; + } + case 7U: { /* floating point numbers, simple data types, break; other */ + switch (ai) { + case 0x14U: { + duk_push_false(dec_ctx->thr); + break; + } + case 0x15U: { + duk_push_true(dec_ctx->thr); + break; + } + case 0x16U: { + duk_push_null(dec_ctx->thr); + break; + } + case 0x17U: { + duk_push_undefined(dec_ctx->thr); + break; + } + case 0x18U: { /* more simple values (1 byte) */ + /* Simple value encoded in additional byte (none + * are defined so far). RFC 7049 states that the + * follow-up byte must be 32-255 to minimize + * confusion. So, a non-shortest encoding like + * f815 (= true, shortest encoding f5) must be + * rejected. cbor.me tester rejects f815, but + * e.g. Python CBOR binding decodes it as true. + */ + goto format_error; + } + case 0x19U: { /* half-float (2 bytes) */ + duk_double_t d; + d = duk__cbor_decode_half_float(dec_ctx); + duk_push_number(dec_ctx->thr, d); + break; + } + case 0x1aU: { /* float (4 bytes) */ + duk_double_t d; + d = duk__cbor_decode_float(dec_ctx); + duk_push_number(dec_ctx->thr, d); + break; + } + case 0x1bU: { /* double (8 bytes) */ + duk_double_t d; + d = duk__cbor_decode_double(dec_ctx); + duk_push_number(dec_ctx->thr, d); + break; + } + case 0xffU: /* unexpected break */ + default: { + goto format_error; + } + } /* end switch */ + break; + } + default: { + goto format_error; /* will never actually occur */ + } + } /* end switch */ + + return; + +format_error: + duk__cbor_decode_error(dec_ctx); +} +#endif /* DUK_CBOR_DECODE_FASTPATH */ + +DUK_LOCAL void duk__cbor_encode(duk_hthread *thr, duk_idx_t idx, duk_uint_t encode_flags) { + duk_cbor_encode_context enc_ctx; + duk_uint8_t *buf; + + DUK_UNREF(encode_flags); + + idx = duk_require_normalize_index(thr, idx); + + enc_ctx.thr = thr; + enc_ctx.idx_buf = duk_get_top(thr); + + enc_ctx.len = 64; + buf = (duk_uint8_t *) duk_push_dynamic_buffer(thr, enc_ctx.len); + enc_ctx.ptr = buf; + enc_ctx.buf = buf; + enc_ctx.buf_end = buf + enc_ctx.len; + + enc_ctx.recursion_depth = 0; + enc_ctx.recursion_limit = DUK_USE_CBOR_ENC_RECLIMIT; + + duk_dup(thr, idx); + duk__cbor_encode_req_stack(&enc_ctx); + duk__cbor_encode_value(&enc_ctx); + DUK_ASSERT(enc_ctx.recursion_depth == 0); + duk_resize_buffer(enc_ctx.thr, enc_ctx.idx_buf, (duk_size_t) (enc_ctx.ptr - enc_ctx.buf)); + duk_replace(thr, idx); +} + +DUK_LOCAL void duk__cbor_decode(duk_hthread *thr, duk_idx_t idx, duk_uint_t decode_flags) { + duk_cbor_decode_context dec_ctx; + + DUK_UNREF(decode_flags); + + /* Suppress compile warnings for functions only needed with e.g. + * asserts enabled. + */ + DUK_UNREF(duk__cbor_get_reserve); + + idx = duk_require_normalize_index(thr, idx); + + dec_ctx.thr = thr; + dec_ctx.buf = (const duk_uint8_t *) duk_require_buffer_data(thr, idx, &dec_ctx.len); + dec_ctx.off = 0; + /* dec_ctx.len: set above */ + + dec_ctx.recursion_depth = 0; + dec_ctx.recursion_limit = DUK_USE_CBOR_DEC_RECLIMIT; + + duk__cbor_decode_req_stack(&dec_ctx); + duk__cbor_decode_value(&dec_ctx); + DUK_ASSERT(dec_ctx.recursion_depth == 0); + if (dec_ctx.off != dec_ctx.len) { + (void) duk_type_error(thr, "trailing garbage"); + } + + duk_replace(thr, idx); +} + +#else /* DUK_USE_CBOR_SUPPORT */ + +DUK_LOCAL void duk__cbor_encode(duk_hthread *thr, duk_idx_t idx, duk_uint_t encode_flags) { + DUK_UNREF(idx); + DUK_UNREF(encode_flags); + DUK_ERROR_UNSUPPORTED(thr); +} + +DUK_LOCAL void duk__cbor_decode(duk_hthread *thr, duk_idx_t idx, duk_uint_t decode_flags) { + DUK_UNREF(idx); + DUK_UNREF(decode_flags); + DUK_ERROR_UNSUPPORTED(thr); +} + +#endif /* DUK_USE_CBOR_SUPPORT */ + +/* + * Public APIs + */ + +DUK_EXTERNAL void duk_cbor_encode(duk_hthread *thr, duk_idx_t idx, duk_uint_t encode_flags) { + DUK_ASSERT_API_ENTRY(thr); + duk__cbor_encode(thr, idx, encode_flags); +} +DUK_EXTERNAL void duk_cbor_decode(duk_hthread *thr, duk_idx_t idx, duk_uint_t decode_flags) { + DUK_ASSERT_API_ENTRY(thr); + duk__cbor_decode(thr, idx, decode_flags); +} + +#if defined(DUK_USE_CBOR_BUILTIN) +#if defined(DUK_USE_CBOR_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_cbor_encode(duk_hthread *thr) { + DUK_ASSERT_TOP(thr, 1); + + duk__cbor_encode(thr, -1, 0 /*flags*/); + + /* Produce an ArrayBuffer by first decoding into a plain buffer which + * mimics a Uint8Array and gettings its .buffer property. + */ + /* XXX: shortcut */ + (void) duk_get_prop_stridx(thr, -1, DUK_STRIDX_LC_BUFFER); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_cbor_decode(duk_hthread *thr) { + DUK_ASSERT_TOP(thr, 1); + + duk__cbor_decode(thr, -1, 0 /*flags*/); + return 1; +} +#else /* DUK_USE_CBOR_SUPPORT */ +DUK_INTERNAL duk_ret_t duk_bi_cbor_encode(duk_hthread *thr) { + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return 0;); +} +DUK_INTERNAL duk_ret_t duk_bi_cbor_decode(duk_hthread *thr) { + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return 0;); +} +#endif /* DUK_USE_CBOR_SUPPORT */ +#endif /* DUK_USE_CBOR_BUILTIN */ + +/* automatic undefs */ +#undef DUK__CBOR_AI +#line 1 "duk_bi_date.c" +/* + * Date built-ins + * + * Unlike most built-ins, Date has some platform dependencies for getting + * UTC time, converting between UTC and local time, and parsing and + * formatting time values. These are all abstracted behind DUK_USE_xxx + * config options. There are built-in platform specific providers for + * POSIX and Windows, but external providers can also be used. + * + * See doc/datetime.rst. + * + */ + +/* #include duk_internal.h -> already included */ + +/* XXX: currently defines unnecessary symbols when DUK_USE_DATE_BUILTIN is disabled. */ + +/* + * Forward declarations + */ + +DUK_LOCAL_DECL duk_double_t duk__push_this_get_timeval_tzoffset(duk_hthread *thr, duk_small_uint_t flags, duk_int_t *out_tzoffset); +DUK_LOCAL_DECL duk_double_t duk__push_this_get_timeval(duk_hthread *thr, duk_small_uint_t flags); +DUK_LOCAL_DECL void duk__twodigit_year_fixup(duk_hthread *thr, duk_idx_t idx_val); +DUK_LOCAL_DECL duk_ret_t duk__set_this_timeval_from_dparts(duk_hthread *thr, duk_double_t *dparts, duk_small_uint_t flags); + +/* + * Other file level defines + */ + +/* Debug macro to print all parts and dparts (used manually because of debug level). */ +#define DUK__DPRINT_PARTS_AND_DPARTS(parts, dparts) \ + do { \ + DUK_D(DUK_DPRINT("parts: %ld %ld %ld %ld %ld %ld %ld %ld, dparts: %lf %lf %lf %lf %lf %lf %lf %lf", \ + (long) (parts)[0], \ + (long) (parts)[1], \ + (long) (parts)[2], \ + (long) (parts)[3], \ + (long) (parts)[4], \ + (long) (parts)[5], \ + (long) (parts)[6], \ + (long) (parts)[7], \ + (double) (dparts)[0], \ + (double) (dparts)[1], \ + (double) (dparts)[2], \ + (double) (dparts)[3], \ + (double) (dparts)[4], \ + (double) (dparts)[5], \ + (double) (dparts)[6], \ + (double) (dparts)[7])); \ + } while (0) +#define DUK__DPRINT_PARTS(parts) \ + do { \ + DUK_D(DUK_DPRINT("parts: %ld %ld %ld %ld %ld %ld %ld %ld", \ + (long) (parts)[0], \ + (long) (parts)[1], \ + (long) (parts)[2], \ + (long) (parts)[3], \ + (long) (parts)[4], \ + (long) (parts)[5], \ + (long) (parts)[6], \ + (long) (parts)[7])); \ + } while (0) +#define DUK__DPRINT_DPARTS(dparts) \ + do { \ + DUK_D(DUK_DPRINT("dparts: %lf %lf %lf %lf %lf %lf %lf %lf", \ + (double) (dparts)[0], \ + (double) (dparts)[1], \ + (double) (dparts)[2], \ + (double) (dparts)[3], \ + (double) (dparts)[4], \ + (double) (dparts)[5], \ + (double) (dparts)[6], \ + (double) (dparts)[7])); \ + } while (0) + +/* Equivalent year for DST calculations outside [1970,2038[ range, see + * E5 Section 15.9.1.8. Equivalent year has the same leap-year-ness and + * starts with the same weekday on Jan 1. + * https://bugzilla.mozilla.org/show_bug.cgi?id=351066 + */ +#define DUK__YEAR(x) ((duk_uint8_t) ((x) -1970)) +DUK_LOCAL duk_uint8_t duk__date_equivyear[14] = { +#if 1 + /* This is based on V8 EquivalentYear() algorithm (see util/genequivyear.py): + * http://code.google.com/p/v8/source/browse/trunk/src/date.h#146 + */ + + /* non-leap year: sunday, monday, ... */ + DUK__YEAR(2023), + DUK__YEAR(2035), + DUK__YEAR(2019), + DUK__YEAR(2031), + DUK__YEAR(2015), + DUK__YEAR(2027), + DUK__YEAR(2011), + + /* leap year: sunday, monday, ... */ + DUK__YEAR(2012), + DUK__YEAR(2024), + DUK__YEAR(2008), + DUK__YEAR(2020), + DUK__YEAR(2032), + DUK__YEAR(2016), + DUK__YEAR(2028) +#endif + +#if 0 + /* This is based on Rhino EquivalentYear() algorithm: + * https://github.com/mozilla/rhino/blob/f99cc11d616f0cdda2c42bde72b3484df6182947/src/org/mozilla/javascript/NativeDate.java + */ + + /* non-leap year: sunday, monday, ... */ + DUK__YEAR(1978), DUK__YEAR(1973), DUK__YEAR(1985), DUK__YEAR(1986), + DUK__YEAR(1981), DUK__YEAR(1971), DUK__YEAR(1977), + + /* leap year: sunday, monday, ... */ + DUK__YEAR(1984), DUK__YEAR(1996), DUK__YEAR(1980), DUK__YEAR(1992), + DUK__YEAR(1976), DUK__YEAR(1988), DUK__YEAR(1972) +#endif +}; + +/* + * ISO 8601 subset parser. + */ + +/* Parser part count. */ +#define DUK__NUM_ISO8601_PARSER_PARTS 9 + +/* Parser part indices. */ +#define DUK__PI_YEAR 0 +#define DUK__PI_MONTH 1 +#define DUK__PI_DAY 2 +#define DUK__PI_HOUR 3 +#define DUK__PI_MINUTE 4 +#define DUK__PI_SECOND 5 +#define DUK__PI_MILLISECOND 6 +#define DUK__PI_TZHOUR 7 +#define DUK__PI_TZMINUTE 8 + +/* Parser part masks. */ +#define DUK__PM_YEAR (1 << DUK__PI_YEAR) +#define DUK__PM_MONTH (1 << DUK__PI_MONTH) +#define DUK__PM_DAY (1 << DUK__PI_DAY) +#define DUK__PM_HOUR (1 << DUK__PI_HOUR) +#define DUK__PM_MINUTE (1 << DUK__PI_MINUTE) +#define DUK__PM_SECOND (1 << DUK__PI_SECOND) +#define DUK__PM_MILLISECOND (1 << DUK__PI_MILLISECOND) +#define DUK__PM_TZHOUR (1 << DUK__PI_TZHOUR) +#define DUK__PM_TZMINUTE (1 << DUK__PI_TZMINUTE) + +/* Parser separator indices. */ +#define DUK__SI_PLUS 0 +#define DUK__SI_MINUS 1 +#define DUK__SI_T 2 +#define DUK__SI_SPACE 3 +#define DUK__SI_COLON 4 +#define DUK__SI_PERIOD 5 +#define DUK__SI_Z 6 +#define DUK__SI_NUL 7 + +/* Parser separator masks. */ +#define DUK__SM_PLUS (1 << DUK__SI_PLUS) +#define DUK__SM_MINUS (1 << DUK__SI_MINUS) +#define DUK__SM_T (1 << DUK__SI_T) +#define DUK__SM_SPACE (1 << DUK__SI_SPACE) +#define DUK__SM_COLON (1 << DUK__SI_COLON) +#define DUK__SM_PERIOD (1 << DUK__SI_PERIOD) +#define DUK__SM_Z (1 << DUK__SI_Z) +#define DUK__SM_NUL (1 << DUK__SI_NUL) + +/* Rule control flags. */ +#define DUK__CF_NEG (1 << 0) /* continue matching, set neg_tzoffset flag */ +#define DUK__CF_ACCEPT (1 << 1) /* accept string */ +#define DUK__CF_ACCEPT_NUL (1 << 2) /* accept string if next char is NUL (otherwise reject) */ + +#define DUK__PACK_RULE(partmask, sepmask, nextpart, flags) \ + ((duk_uint32_t) (partmask) + (((duk_uint32_t) (sepmask)) << 9) + (((duk_uint32_t) (nextpart)) << 17) + \ + (((duk_uint32_t) (flags)) << 21)) + +#define DUK__UNPACK_RULE(rule, var_nextidx, var_flags) \ + do { \ + (var_nextidx) = (duk_small_uint_t) (((rule) >> 17) & 0x0f); \ + (var_flags) = (duk_small_uint_t) ((rule) >> 21); \ + } while (0) + +#define DUK__RULE_MASK_PART_SEP 0x1ffffUL + +/* Matching separator index is used in the control table */ +DUK_LOCAL const duk_uint8_t duk__parse_iso8601_seps[] = { + DUK_ASC_PLUS /*0*/, DUK_ASC_MINUS /*1*/, DUK_ASC_UC_T /*2*/, DUK_ASC_SPACE /*3*/, + DUK_ASC_COLON /*4*/, DUK_ASC_PERIOD /*5*/, DUK_ASC_UC_Z /*6*/, DUK_ASC_NUL /*7*/ +}; + +/* Rule table: first matching rule is used to determine what to do next. */ +DUK_LOCAL const duk_uint32_t duk__parse_iso8601_control[] = { + DUK__PACK_RULE(DUK__PM_YEAR, DUK__SM_MINUS, DUK__PI_MONTH, 0), + DUK__PACK_RULE(DUK__PM_MONTH, DUK__SM_MINUS, DUK__PI_DAY, 0), + DUK__PACK_RULE(DUK__PM_YEAR | DUK__PM_MONTH | DUK__PM_DAY, DUK__SM_T | DUK__SM_SPACE, DUK__PI_HOUR, 0), + DUK__PACK_RULE(DUK__PM_HOUR, DUK__SM_COLON, DUK__PI_MINUTE, 0), + DUK__PACK_RULE(DUK__PM_MINUTE, DUK__SM_COLON, DUK__PI_SECOND, 0), + DUK__PACK_RULE(DUK__PM_SECOND, DUK__SM_PERIOD, DUK__PI_MILLISECOND, 0), + DUK__PACK_RULE(DUK__PM_TZHOUR, DUK__SM_COLON, DUK__PI_TZMINUTE, 0), + DUK__PACK_RULE(DUK__PM_YEAR | DUK__PM_MONTH | DUK__PM_DAY | DUK__PM_HOUR /*Note1*/ | DUK__PM_MINUTE | DUK__PM_SECOND | + DUK__PM_MILLISECOND, + DUK__SM_PLUS, + DUK__PI_TZHOUR, + 0), + DUK__PACK_RULE(DUK__PM_YEAR | DUK__PM_MONTH | DUK__PM_DAY | DUK__PM_HOUR /*Note1*/ | DUK__PM_MINUTE | DUK__PM_SECOND | + DUK__PM_MILLISECOND, + DUK__SM_MINUS, + DUK__PI_TZHOUR, + DUK__CF_NEG), + DUK__PACK_RULE(DUK__PM_YEAR | DUK__PM_MONTH | DUK__PM_DAY | DUK__PM_HOUR /*Note1*/ | DUK__PM_MINUTE | DUK__PM_SECOND | + DUK__PM_MILLISECOND, + DUK__SM_Z, + 0, + DUK__CF_ACCEPT_NUL), + DUK__PACK_RULE(DUK__PM_YEAR | DUK__PM_MONTH | DUK__PM_DAY | DUK__PM_HOUR /*Note1*/ | DUK__PM_MINUTE | DUK__PM_SECOND | + DUK__PM_MILLISECOND | DUK__PM_TZHOUR /*Note2*/ | DUK__PM_TZMINUTE, + DUK__SM_NUL, + 0, + DUK__CF_ACCEPT) + + /* Note1: the specification doesn't require matching a time form with + * just hours ("HH"), but we accept it here, e.g. "2012-01-02T12Z". + * + * Note2: the specification doesn't require matching a timezone offset + * with just hours ("HH"), but accept it here, e.g. "2012-01-02T03:04:05+02" + */ +}; + +DUK_LOCAL duk_bool_t duk__parse_string_iso8601_subset(duk_hthread *thr, const char *str) { + duk_int_t parts[DUK__NUM_ISO8601_PARSER_PARTS]; + duk_double_t dparts[DUK_DATE_IDX_NUM_PARTS]; + duk_double_t d; + const duk_uint8_t *p; + duk_small_uint_t part_idx = 0; + duk_int_t accum = 0; + duk_small_uint_t ndigits = 0; + duk_bool_t neg_year = 0; + duk_bool_t neg_tzoffset = 0; + duk_uint_fast8_t ch; + duk_small_uint_t i; + + /* During parsing, month and day are one-based; set defaults here. */ + duk_memzero(parts, sizeof(parts)); + DUK_ASSERT(parts[DUK_DATE_IDX_YEAR] == 0); /* don't care value, year is mandatory */ + parts[DUK_DATE_IDX_MONTH] = 1; + parts[DUK_DATE_IDX_DAY] = 1; + + /* Special handling for year sign. */ + p = (const duk_uint8_t *) str; + ch = p[0]; + if (ch == DUK_ASC_PLUS) { + p++; + } else if (ch == DUK_ASC_MINUS) { + neg_year = 1; + p++; + } + + for (;;) { + ch = *p++; + DUK_DDD(DUK_DDDPRINT("parsing, part_idx=%ld, char=%ld ('%c')", + (long) part_idx, + (long) ch, + (int) ((ch >= 0x20 && ch <= 0x7e) ? ch : DUK_ASC_QUESTION))); + + if (ch >= DUK_ASC_0 && ch <= DUK_ASC_9) { + if (ndigits >= 9) { + DUK_DDD(DUK_DDDPRINT("too many digits -> reject")); + goto reject; + } + if (part_idx == DUK__PI_MILLISECOND && ndigits >= 3) { + /* ignore millisecond fractions after 3 */ + } else { + accum = accum * 10 + ((duk_int_t) ch) - ((duk_int_t) DUK_ASC_0) + 0x00; + ndigits++; + } + } else { + duk_uint_fast32_t match_val; + duk_small_uint_t sep_idx; + + if (ndigits <= 0) { + goto reject; + } + if (part_idx == DUK__PI_MILLISECOND) { + /* complete the millisecond field */ + while (ndigits < 3) { + accum *= 10; + ndigits++; + } + } + parts[part_idx] = accum; + DUK_DDD(DUK_DDDPRINT("wrote part %ld -> value %ld", (long) part_idx, (long) accum)); + + accum = 0; + ndigits = 0; + + for (i = 0; i < (duk_small_uint_t) (sizeof(duk__parse_iso8601_seps) / sizeof(duk_uint8_t)); i++) { + if (duk__parse_iso8601_seps[i] == ch) { + break; + } + } + if (i == (duk_small_uint_t) (sizeof(duk__parse_iso8601_seps) / sizeof(duk_uint8_t))) { + DUK_DDD(DUK_DDDPRINT("separator character doesn't match -> reject")); + goto reject; + } + + sep_idx = i; + match_val = (1UL << part_idx) + (1UL << (sep_idx + 9)); /* match against rule part/sep bits */ + + for (i = 0; i < (duk_small_uint_t) (sizeof(duk__parse_iso8601_control) / sizeof(duk_uint32_t)); i++) { + duk_uint_fast32_t rule = duk__parse_iso8601_control[i]; + duk_small_uint_t nextpart; + duk_small_uint_t cflags; + + DUK_DDD(DUK_DDDPRINT("part_idx=%ld, sep_idx=%ld, match_val=0x%08lx, considering rule=0x%08lx", + (long) part_idx, + (long) sep_idx, + (unsigned long) match_val, + (unsigned long) rule)); + + if ((rule & match_val) != match_val) { + continue; + } + + DUK__UNPACK_RULE(rule, nextpart, cflags); + + DUK_DDD(DUK_DDDPRINT("rule match -> part_idx=%ld, sep_idx=%ld, match_val=0x%08lx, " + "rule=0x%08lx -> nextpart=%ld, cflags=0x%02lx", + (long) part_idx, + (long) sep_idx, + (unsigned long) match_val, + (unsigned long) rule, + (long) nextpart, + (unsigned long) cflags)); + + if (cflags & DUK__CF_NEG) { + neg_tzoffset = 1; + } + + if (cflags & DUK__CF_ACCEPT) { + goto accept; + } + + if (cflags & DUK__CF_ACCEPT_NUL) { + DUK_ASSERT(*(p - 1) != (char) 0); + if (*p == DUK_ASC_NUL) { + goto accept; + } + goto reject; + } + + part_idx = nextpart; + break; + } /* rule match */ + + if (i == (duk_small_uint_t) (sizeof(duk__parse_iso8601_control) / sizeof(duk_uint32_t))) { + DUK_DDD(DUK_DDDPRINT("no rule matches -> reject")); + goto reject; + } + + if (ch == 0) { + /* This shouldn't be necessary, but check just in case + * to avoid any chance of overruns. + */ + DUK_DDD(DUK_DDDPRINT("NUL after rule matching (should not happen) -> reject")); + goto reject; + } + } /* if-digit-else-ctrl */ + } /* char loop */ + + /* We should never exit the loop above. */ + DUK_UNREACHABLE(); + +reject: + DUK_DDD(DUK_DDDPRINT("reject")); + return 0; + +accept: + DUK_DDD(DUK_DDDPRINT("accept")); + + /* Apply timezone offset to get the main parts in UTC */ + if (neg_year) { + parts[DUK__PI_YEAR] = -parts[DUK__PI_YEAR]; + } + if (neg_tzoffset) { + parts[DUK__PI_HOUR] += parts[DUK__PI_TZHOUR]; + parts[DUK__PI_MINUTE] += parts[DUK__PI_TZMINUTE]; + } else { + parts[DUK__PI_HOUR] -= parts[DUK__PI_TZHOUR]; + parts[DUK__PI_MINUTE] -= parts[DUK__PI_TZMINUTE]; + } + parts[DUK__PI_MONTH] -= 1; /* zero-based month */ + parts[DUK__PI_DAY] -= 1; /* zero-based day */ + + /* Use double parts, they tolerate unnormalized time. + * + * Note: DUK_DATE_IDX_WEEKDAY is initialized with a bogus value (DUK__PI_TZHOUR) + * on purpose. It won't be actually used by duk_bi_date_get_timeval_from_dparts(), + * but will make the value initialized just in case, and avoid any + * potential for Valgrind issues. + */ + for (i = 0; i < DUK_DATE_IDX_NUM_PARTS; i++) { + DUK_DDD(DUK_DDDPRINT("part[%ld] = %ld", (long) i, (long) parts[i])); + dparts[i] = parts[i]; + } + + d = duk_bi_date_get_timeval_from_dparts(dparts, 0 /*flags*/); + duk_push_number(thr, d); + return 1; +} + +/* + * Date/time parsing helper. + * + * Parse a datetime string into a time value. We must first try to parse + * the input according to the standard format in E5.1 Section 15.9.1.15. + * If that fails, we can try to parse using custom parsing, which can + * either be platform neutral (custom code) or platform specific (using + * existing platform API calls). + * + * Note in particular that we must parse whatever toString(), toUTCString(), + * and toISOString() can produce; see E5.1 Section 15.9.4.2. + * + * Returns 1 to allow tail calling. + * + * There is much room for improvement here with respect to supporting + * alternative datetime formats. For instance, V8 parses '2012-01-01' as + * UTC and '2012/01/01' as local time. + */ + +DUK_LOCAL duk_ret_t duk__parse_string(duk_hthread *thr, const char *str) { + /* XXX: there is a small risk here: because the ISO 8601 parser is + * very loose, it may end up parsing some datetime values which + * would be better parsed with a platform specific parser. + */ + + DUK_ASSERT(str != NULL); + DUK_DDD(DUK_DDDPRINT("parse datetime from string '%s'", (const char *) str)); + + if (duk__parse_string_iso8601_subset(thr, str) != 0) { + return 1; + } + +#if defined(DUK_USE_DATE_PARSE_STRING) + /* Contract, either: + * - Push value on stack and return 1 + * - Don't push anything on stack and return 0 + */ + + if (DUK_USE_DATE_PARSE_STRING(thr, str) != 0) { + return 1; + } +#else + /* No platform-specific parsing, this is not an error. */ +#endif + + duk_push_nan(thr); + return 1; +} + +/* + * Calendar helpers + * + * Some helpers are used for getters and can operate on normalized values + * which can be represented with 32-bit signed integers. Other helpers are + * needed by setters and operate on un-normalized double values, must watch + * out for non-finite numbers etc. + */ + +DUK_LOCAL duk_uint8_t duk__days_in_month[12] = { (duk_uint8_t) 31, (duk_uint8_t) 28, (duk_uint8_t) 31, (duk_uint8_t) 30, + (duk_uint8_t) 31, (duk_uint8_t) 30, (duk_uint8_t) 31, (duk_uint8_t) 31, + (duk_uint8_t) 30, (duk_uint8_t) 31, (duk_uint8_t) 30, (duk_uint8_t) 31 }; + +/* Maximum iteration count for computing UTC-to-local time offset when + * creating an ECMAScript time value from local parts. + */ +#define DUK__LOCAL_TZOFFSET_MAXITER 4 + +/* Because 'day since epoch' can be negative and is used to compute weekday + * using a modulo operation, add this multiple of 7 to avoid negative values + * when year is below 1970 epoch. ECMAScript time values are restricted to + * +/- 100 million days from epoch, so this adder fits nicely into 32 bits. + * Round to a multiple of 7 (= floor(100000000 / 7) * 7) and add margin. + */ +#define DUK__WEEKDAY_MOD_ADDER (20000000 * 7) /* 0x08583b00 */ + +DUK_INTERNAL duk_bool_t duk_bi_date_is_leap_year(duk_int_t year) { + if ((year % 4) != 0) { + return 0; + } + if ((year % 100) != 0) { + return 1; + } + if ((year % 400) != 0) { + return 0; + } + return 1; +} + +DUK_INTERNAL duk_bool_t duk_bi_date_timeval_in_valid_range(duk_double_t x) { + return (x >= -DUK_DATE_MSEC_100M_DAYS && x <= DUK_DATE_MSEC_100M_DAYS); +} + +DUK_INTERNAL duk_bool_t duk_bi_date_timeval_in_leeway_range(duk_double_t x) { + return (x >= -DUK_DATE_MSEC_100M_DAYS_LEEWAY && x <= DUK_DATE_MSEC_100M_DAYS_LEEWAY); +} + +DUK_INTERNAL duk_bool_t duk_bi_date_year_in_valid_range(duk_double_t x) { + return (x >= DUK_DATE_MIN_ECMA_YEAR && x <= DUK_DATE_MAX_ECMA_YEAR); +} + +DUK_LOCAL duk_double_t duk__timeclip(duk_double_t x) { + if (!DUK_ISFINITE(x)) { + return DUK_DOUBLE_NAN; + } + + if (!duk_bi_date_timeval_in_valid_range(x)) { + return DUK_DOUBLE_NAN; + } + + x = duk_js_tointeger_number(x); + + /* Here we'd have the option to normalize -0 to +0. */ + return x; +} + +/* Integer division which floors also negative values correctly. */ +DUK_LOCAL duk_int_t duk__div_floor(duk_int_t a, duk_int_t b) { + DUK_ASSERT(b > 0); + if (a >= 0) { + return a / b; + } else { + /* e.g. a = -4, b = 5 --> -4 - 5 + 1 / 5 --> -8 / 5 --> -1 + * a = -5, b = 5 --> -5 - 5 + 1 / 5 --> -9 / 5 --> -1 + * a = -6, b = 5 --> -6 - 5 + 1 / 5 --> -10 / 5 --> -2 + */ + return (a - b + 1) / b; + } +} + +/* Compute day number of the first day of a given year. */ +DUK_LOCAL duk_int_t duk__day_from_year(duk_int_t year) { + /* Note: in integer arithmetic, (x / 4) is same as floor(x / 4) for non-negative + * values, but is incorrect for negative ones. + */ + return 365 * (year - 1970) + duk__div_floor(year - 1969, 4) - duk__div_floor(year - 1901, 100) + + duk__div_floor(year - 1601, 400); +} + +/* Given a day number, determine year and day-within-year. */ +DUK_LOCAL duk_int_t duk__year_from_day(duk_int_t day, duk_small_int_t *out_day_within_year) { + duk_int_t year; + duk_int_t diff_days; + + /* estimate year upwards (towards positive infinity), then back down; + * two iterations should be enough + */ + + if (day >= 0) { + year = 1970 + day / 365; + } else { + year = 1970 + day / 366; + } + + for (;;) { + diff_days = duk__day_from_year(year) - day; + DUK_DDD(DUK_DDDPRINT("year=%ld day=%ld, diff_days=%ld", (long) year, (long) day, (long) diff_days)); + if (diff_days <= 0) { + DUK_ASSERT(-diff_days < 366); /* fits into duk_small_int_t */ + *out_day_within_year = -diff_days; + DUK_DDD(DUK_DDDPRINT("--> year=%ld, day-within-year=%ld", (long) year, (long) *out_day_within_year)); + DUK_ASSERT(*out_day_within_year >= 0); + DUK_ASSERT(*out_day_within_year < (duk_bi_date_is_leap_year(year) ? 366 : 365)); + return year; + } + + /* Note: this is very tricky; we must never 'overshoot' the + * correction downwards. + */ + year -= 1 + (diff_days - 1) / 366; /* conservative */ + } +} + +/* Given a (year, month, day-within-month) triple, compute day number. + * The input triple is un-normalized and may contain non-finite values. + */ +DUK_LOCAL duk_double_t duk__make_day(duk_double_t year, duk_double_t month, duk_double_t day) { + duk_int_t day_num; + duk_bool_t is_leap; + duk_small_int_t i, n; + + /* Assume that year, month, day are all coerced to whole numbers. + * They may also be NaN or infinity, in which case this function + * must return NaN or infinity to ensure time value becomes NaN. + * If 'day' is NaN, the final return will end up returning a NaN, + * so it doesn't need to be checked here. + */ + + if (!DUK_ISFINITE(year) || !DUK_ISFINITE(month)) { + return DUK_DOUBLE_NAN; + } + + year += DUK_FLOOR(month / 12.0); + + month = DUK_FMOD(month, 12.0); + if (month < 0.0) { + /* handle negative values */ + month += 12.0; + } + + /* The algorithm in E5.1 Section 15.9.1.12 normalizes month, but + * does not normalize the day-of-month (nor check whether or not + * it is finite) because it's not necessary for finding the day + * number which matches the (year,month) pair. + * + * We assume that duk__day_from_year() is exact here. + * + * Without an explicit infinity / NaN check in the beginning, + * day_num would be a bogus integer here. + * + * It's possible for 'year' to be out of integer range here. + * If so, we need to return NaN without integer overflow. + * This fixes test-bug-setyear-overflow.js. + */ + + if (!duk_bi_date_year_in_valid_range(year)) { + DUK_DD(DUK_DDPRINT("year not in ecmascript valid range, avoid integer overflow: %lf", (double) year)); + return DUK_DOUBLE_NAN; + } + day_num = duk__day_from_year((duk_int_t) year); + is_leap = duk_bi_date_is_leap_year((duk_int_t) year); + + n = (duk_small_int_t) month; + for (i = 0; i < n; i++) { + day_num += duk__days_in_month[i]; + if (i == 1 && is_leap) { + day_num++; + } + } + + /* If 'day' is NaN, returns NaN. */ + return (duk_double_t) day_num + day; +} + +/* Split time value into parts. The time value may contain fractions (it may + * come from duk_time_to_components() API call) which are truncated. Possible + * local time adjustment has already been applied when reading the time value. + */ +DUK_INTERNAL void duk_bi_date_timeval_to_parts(duk_double_t d, duk_int_t *parts, duk_double_t *dparts, duk_small_uint_t flags) { + duk_double_t d1, d2; + duk_int_t t1, t2; + duk_int_t day_since_epoch; + duk_int_t year; /* does not fit into 16 bits */ + duk_small_int_t day_in_year; + duk_small_int_t month; + duk_small_int_t day; + duk_small_int_t dim; + duk_int_t jan1_since_epoch; + duk_small_int_t jan1_weekday; + duk_int_t equiv_year; + duk_small_uint_t i; + duk_bool_t is_leap; + duk_small_int_t arridx; + + DUK_ASSERT(DUK_ISFINITE(d)); /* caller checks */ + d = DUK_FLOOR(d); /* remove fractions if present */ + DUK_ASSERT(duk_double_equals(DUK_FLOOR(d), d)); + + /* The timevalue must be in valid ECMAScript range, but since a local + * time offset can be applied, we need to allow a +/- 24h leeway to + * the value. In other words, although the UTC time is within the + * ECMAScript range, the local part values can be just outside of it. + */ + DUK_UNREF(duk_bi_date_timeval_in_leeway_range); + DUK_ASSERT(duk_bi_date_timeval_in_leeway_range(d)); + + /* These computations are guaranteed to be exact for the valid + * E5 time value range, assuming milliseconds without fractions. + */ + d1 = (duk_double_t) DUK_FMOD(d, (double) DUK_DATE_MSEC_DAY); + if (d1 < 0.0) { + /* deal with negative values */ + d1 += (duk_double_t) DUK_DATE_MSEC_DAY; + } + d2 = DUK_FLOOR((double) (d / (duk_double_t) DUK_DATE_MSEC_DAY)); + DUK_ASSERT(duk_double_equals(d2 * ((duk_double_t) DUK_DATE_MSEC_DAY) + d1, d)); + /* now expected to fit into a 32-bit integer */ + t1 = (duk_int_t) d1; + t2 = (duk_int_t) d2; + day_since_epoch = t2; + DUK_ASSERT(duk_double_equals((duk_double_t) t1, d1)); + DUK_ASSERT(duk_double_equals((duk_double_t) t2, d2)); + + /* t1 = milliseconds within day (fits 32 bit) + * t2 = day number from epoch (fits 32 bit, may be negative) + */ + + parts[DUK_DATE_IDX_MILLISECOND] = t1 % 1000; + t1 /= 1000; + parts[DUK_DATE_IDX_SECOND] = t1 % 60; + t1 /= 60; + parts[DUK_DATE_IDX_MINUTE] = t1 % 60; + t1 /= 60; + parts[DUK_DATE_IDX_HOUR] = t1; + DUK_ASSERT(parts[DUK_DATE_IDX_MILLISECOND] >= 0 && parts[DUK_DATE_IDX_MILLISECOND] <= 999); + DUK_ASSERT(parts[DUK_DATE_IDX_SECOND] >= 0 && parts[DUK_DATE_IDX_SECOND] <= 59); + DUK_ASSERT(parts[DUK_DATE_IDX_MINUTE] >= 0 && parts[DUK_DATE_IDX_MINUTE] <= 59); + DUK_ASSERT(parts[DUK_DATE_IDX_HOUR] >= 0 && parts[DUK_DATE_IDX_HOUR] <= 23); + + DUK_DDD(DUK_DDDPRINT("d=%lf, d1=%lf, d2=%lf, t1=%ld, t2=%ld, parts: hour=%ld min=%ld sec=%ld msec=%ld", + (double) d, + (double) d1, + (double) d2, + (long) t1, + (long) t2, + (long) parts[DUK_DATE_IDX_HOUR], + (long) parts[DUK_DATE_IDX_MINUTE], + (long) parts[DUK_DATE_IDX_SECOND], + (long) parts[DUK_DATE_IDX_MILLISECOND])); + + /* This assert depends on the input parts representing time inside + * the ECMAScript range. + */ + DUK_ASSERT(t2 + DUK__WEEKDAY_MOD_ADDER >= 0); + parts[DUK_DATE_IDX_WEEKDAY] = (t2 + 4 + DUK__WEEKDAY_MOD_ADDER) % 7; /* E5.1 Section 15.9.1.6 */ + DUK_ASSERT(parts[DUK_DATE_IDX_WEEKDAY] >= 0 && parts[DUK_DATE_IDX_WEEKDAY] <= 6); + + year = duk__year_from_day(t2, &day_in_year); + day = day_in_year; + is_leap = duk_bi_date_is_leap_year(year); + for (month = 0; month < 12; month++) { + dim = duk__days_in_month[month]; + if (month == 1 && is_leap) { + dim++; + } + DUK_DDD(DUK_DDDPRINT("month=%ld, dim=%ld, day=%ld", (long) month, (long) dim, (long) day)); + if (day < dim) { + break; + } + day -= dim; + } + DUK_DDD(DUK_DDDPRINT("final month=%ld", (long) month)); + DUK_ASSERT(month >= 0 && month <= 11); + DUK_ASSERT(day >= 0 && day <= 31); + + /* Equivalent year mapping, used to avoid DST trouble when platform + * may fail to provide reasonable DST answers for dates outside the + * ordinary range (e.g. 1970-2038). An equivalent year has the same + * leap-year-ness as the original year and begins on the same weekday + * (Jan 1). + * + * The year 2038 is avoided because there seem to be problems with it + * on some platforms. The year 1970 is also avoided as there were + * practical problems with it; an equivalent year is used for it too, + * which breaks some DST computations for 1970 right now, see e.g. + * test-bi-date-tzoffset-brute-fi.js. + */ + if ((flags & DUK_DATE_FLAG_EQUIVYEAR) && (year < 1971 || year > 2037)) { + DUK_ASSERT(is_leap == 0 || is_leap == 1); + + jan1_since_epoch = day_since_epoch - day_in_year; /* day number for Jan 1 since epoch */ + DUK_ASSERT(jan1_since_epoch + DUK__WEEKDAY_MOD_ADDER >= 0); + jan1_weekday = (jan1_since_epoch + 4 + DUK__WEEKDAY_MOD_ADDER) % 7; /* E5.1 Section 15.9.1.6 */ + DUK_ASSERT(jan1_weekday >= 0 && jan1_weekday <= 6); + arridx = jan1_weekday; + if (is_leap) { + arridx += 7; + } + DUK_ASSERT(arridx >= 0 && arridx < (duk_small_int_t) (sizeof(duk__date_equivyear) / sizeof(duk_uint8_t))); + + equiv_year = (duk_int_t) duk__date_equivyear[arridx] + 1970; + year = equiv_year; + DUK_DDD(DUK_DDDPRINT("equiv year mapping, year=%ld, day_in_year=%ld, day_since_epoch=%ld, " + "jan1_since_epoch=%ld, jan1_weekday=%ld -> equiv year %ld", + (long) year, + (long) day_in_year, + (long) day_since_epoch, + (long) jan1_since_epoch, + (long) jan1_weekday, + (long) equiv_year)); + } + + parts[DUK_DATE_IDX_YEAR] = year; + parts[DUK_DATE_IDX_MONTH] = month; + parts[DUK_DATE_IDX_DAY] = day; + + if (flags & DUK_DATE_FLAG_ONEBASED) { + parts[DUK_DATE_IDX_MONTH]++; /* zero-based -> one-based */ + parts[DUK_DATE_IDX_DAY]++; /* -""- */ + } + + if (dparts != NULL) { + for (i = 0; i < DUK_DATE_IDX_NUM_PARTS; i++) { + dparts[i] = (duk_double_t) parts[i]; + } + } +} + +/* Compute time value from (double) parts. The parts can be either UTC + * or local time; if local, they need to be (conceptually) converted into + * UTC time. The parts may represent valid or invalid time, and may be + * wildly out of range (but may cancel each other and still come out in + * the valid Date range). + */ +DUK_INTERNAL duk_double_t duk_bi_date_get_timeval_from_dparts(duk_double_t *dparts, duk_small_uint_t flags) { +#if defined(DUK_USE_PARANOID_DATE_COMPUTATION) + /* See comments below on MakeTime why these are volatile. */ + volatile duk_double_t tmp_time; + volatile duk_double_t tmp_day; + volatile duk_double_t d; +#else + duk_double_t tmp_time; + duk_double_t tmp_day; + duk_double_t d; +#endif + duk_small_uint_t i; + duk_int_t tzoff, tzoffprev1, tzoffprev2; + + /* Expects 'this' at top of stack on entry. */ + + /* Coerce all finite parts with ToInteger(). ToInteger() must not + * be called for NaN/Infinity because it will convert e.g. NaN to + * zero. If ToInteger() has already been called, this has no side + * effects and is idempotent. + * + * Don't read dparts[DUK_DATE_IDX_WEEKDAY]; it will cause Valgrind + * issues if the value is uninitialized. + */ + for (i = 0; i <= DUK_DATE_IDX_MILLISECOND; i++) { + /* SCANBUILD: scan-build complains here about assigned value + * being garbage or undefined. This is correct but operating + * on undefined values has no ill effect and is ignored by the + * caller in the case where this happens. + */ + d = dparts[i]; + if (DUK_ISFINITE(d)) { + dparts[i] = duk_js_tointeger_number(d); + } + } + + /* Use explicit steps in computation to try to ensure that + * computation happens with intermediate results coerced to + * double values (instead of using something more accurate). + * E.g. E5.1 Section 15.9.1.11 requires use of IEEE 754 + * rules (= ECMAScript '+' and '*' operators). + * + * Without 'volatile' even this approach fails on some platform + * and compiler combinations. For instance, gcc 4.8.1 on Ubuntu + * 64-bit, with -m32 and without -std=c99, test-bi-date-canceling.js + * would fail because of some optimizations when computing tmp_time + * (MakeTime below). Adding 'volatile' to tmp_time solved this + * particular problem (annoyingly, also adding debug prints or + * running the executable under valgrind hides it). + */ + + /* MakeTime */ + tmp_time = 0.0; + tmp_time += dparts[DUK_DATE_IDX_HOUR] * ((duk_double_t) DUK_DATE_MSEC_HOUR); + tmp_time += dparts[DUK_DATE_IDX_MINUTE] * ((duk_double_t) DUK_DATE_MSEC_MINUTE); + tmp_time += dparts[DUK_DATE_IDX_SECOND] * ((duk_double_t) DUK_DATE_MSEC_SECOND); + tmp_time += dparts[DUK_DATE_IDX_MILLISECOND]; + + /* MakeDay */ + tmp_day = duk__make_day(dparts[DUK_DATE_IDX_YEAR], dparts[DUK_DATE_IDX_MONTH], dparts[DUK_DATE_IDX_DAY]); + + /* MakeDate */ + d = tmp_day * ((duk_double_t) DUK_DATE_MSEC_DAY) + tmp_time; + + DUK_DDD(DUK_DDDPRINT("time=%lf day=%lf --> timeval=%lf", (double) tmp_time, (double) tmp_day, (double) d)); + + /* Optional UTC conversion. */ + if (flags & DUK_DATE_FLAG_LOCALTIME) { + /* DUK_USE_DATE_GET_LOCAL_TZOFFSET() needs to be called with a + * time value computed from UTC parts. At this point we only + * have 'd' which is a time value computed from local parts, so + * it is off by the UTC-to-local time offset which we don't know + * yet. The current solution for computing the UTC-to-local + * time offset is to iterate a few times and detect a fixed + * point or a two-cycle loop (or a sanity iteration limit), + * see test-bi-date-local-parts.js and test-bi-date-tzoffset-basic-fi.js. + * + * E5.1 Section 15.9.1.9: + * UTC(t) = t - LocalTZA - DaylightSavingTA(t - LocalTZA) + * + * For NaN/inf, DUK_USE_DATE_GET_LOCAL_TZOFFSET() returns 0. + */ + +#if 0 + /* Old solution: don't iterate, incorrect */ + tzoff = DUK_USE_DATE_GET_LOCAL_TZOFFSET(d); + DUK_DDD(DUK_DDDPRINT("tzoffset w/o iteration, tzoff=%ld", (long) tzoff)); + d -= tzoff * 1000L; + DUK_UNREF(tzoffprev1); + DUK_UNREF(tzoffprev2); +#endif + + /* Iteration solution */ + tzoff = 0; + tzoffprev1 = 999999999L; /* invalid value which never matches */ + for (i = 0; i < DUK__LOCAL_TZOFFSET_MAXITER; i++) { + tzoffprev2 = tzoffprev1; + tzoffprev1 = tzoff; + tzoff = DUK_USE_DATE_GET_LOCAL_TZOFFSET(d - tzoff * 1000L); + DUK_DDD(DUK_DDDPRINT("tzoffset iteration, i=%d, tzoff=%ld, tzoffprev1=%ld tzoffprev2=%ld", + (int) i, + (long) tzoff, + (long) tzoffprev1, + (long) tzoffprev2)); + if (tzoff == tzoffprev1) { + DUK_DDD(DUK_DDDPRINT("tzoffset iteration finished, i=%d, tzoff=%ld, tzoffprev1=%ld, tzoffprev2=%ld", + (int) i, + (long) tzoff, + (long) tzoffprev1, + (long) tzoffprev2)); + break; + } else if (tzoff == tzoffprev2) { + /* Two value cycle, see e.g. test-bi-date-tzoffset-basic-fi.js. + * In these cases, favor a higher tzoffset to get a consistent + * result which is independent of iteration count. Not sure if + * this is a generically correct solution. + */ + DUK_DDD(DUK_DDDPRINT( + "tzoffset iteration two-value cycle, i=%d, tzoff=%ld, tzoffprev1=%ld, tzoffprev2=%ld", + (int) i, + (long) tzoff, + (long) tzoffprev1, + (long) tzoffprev2)); + if (tzoffprev1 > tzoff) { + tzoff = tzoffprev1; + } + break; + } + } + DUK_DDD(DUK_DDDPRINT("tzoffset iteration, tzoff=%ld", (long) tzoff)); + d -= tzoff * 1000L; + } + + /* TimeClip(), which also handles Infinity -> NaN conversion */ + d = duk__timeclip(d); + + return d; +} + +/* + * API oriented helpers + */ + +/* Push 'this' binding, check that it is a Date object; then push the + * internal time value. At the end, stack is: [ ... this timeval ]. + * Returns the time value. Local time adjustment is done if requested. + */ +DUK_LOCAL duk_double_t duk__push_this_get_timeval_tzoffset(duk_hthread *thr, duk_small_uint_t flags, duk_int_t *out_tzoffset) { + duk_hobject *h; + duk_double_t d; + duk_int_t tzoffset = 0; + + duk_push_this(thr); + h = duk_get_hobject(thr, -1); /* XXX: getter with class check, useful in built-ins */ + if (h == NULL || DUK_HOBJECT_GET_CLASS_NUMBER(h) != DUK_HOBJECT_CLASS_DATE) { + DUK_ERROR_TYPE(thr, "expected Date"); + DUK_WO_NORETURN(return 0.0;); + } + + duk_xget_owndataprop_stridx_short(thr, -1, DUK_STRIDX_INT_VALUE); + d = duk_to_number_m1(thr); + duk_pop(thr); + + if (DUK_ISNAN(d)) { + if (flags & DUK_DATE_FLAG_NAN_TO_ZERO) { + d = 0.0; + } + if (flags & DUK_DATE_FLAG_NAN_TO_RANGE_ERROR) { + DUK_ERROR_RANGE(thr, "Invalid Date"); + DUK_WO_NORETURN(return 0.0;); + } + } + /* if no NaN handling flag, may still be NaN here, but not Inf */ + DUK_ASSERT(!DUK_ISINF(d)); + + if (flags & DUK_DATE_FLAG_LOCALTIME) { + /* Note: DST adjustment is determined using UTC time. + * If 'd' is NaN, tzoffset will be 0. + */ + tzoffset = DUK_USE_DATE_GET_LOCAL_TZOFFSET(d); /* seconds */ + d += tzoffset * 1000L; + } + if (out_tzoffset) { + *out_tzoffset = tzoffset; + } + + /* [ ... this ] */ + return d; +} + +DUK_LOCAL duk_double_t duk__push_this_get_timeval(duk_hthread *thr, duk_small_uint_t flags) { + return duk__push_this_get_timeval_tzoffset(thr, flags, NULL); +} + +/* Set timeval to 'this' from dparts, push the new time value onto the + * value stack and return 1 (caller can then tail call us). Expects + * the value stack to contain 'this' on the stack top. + */ +DUK_LOCAL duk_ret_t duk__set_this_timeval_from_dparts(duk_hthread *thr, duk_double_t *dparts, duk_small_uint_t flags) { + duk_double_t d; + + /* [ ... this ] */ + + d = duk_bi_date_get_timeval_from_dparts(dparts, flags); + duk_push_number(thr, d); /* -> [ ... this timeval_new ] */ + duk_dup_top(thr); /* -> [ ... this timeval_new timeval_new ] */ + + /* Must force write because e.g. .setYear() must work even when + * the Date instance is frozen. + */ + duk_xdef_prop_stridx_short(thr, -3, DUK_STRIDX_INT_VALUE, DUK_PROPDESC_FLAGS_W); + + /* Stack top: new time value, return 1 to allow tail calls. */ + return 1; +} + +/* 'out_buf' must be at least DUK_BI_DATE_ISO8601_BUFSIZE long. */ +DUK_LOCAL void duk__format_parts_iso8601(duk_int_t *parts, duk_int_t tzoffset, duk_small_uint_t flags, duk_uint8_t *out_buf) { + char yearstr[8]; /* "-123456\0" */ + char tzstr[8]; /* "+11:22\0" */ + char sep = (flags & DUK_DATE_FLAG_SEP_T) ? DUK_ASC_UC_T : DUK_ASC_SPACE; + + DUK_ASSERT(parts[DUK_DATE_IDX_MONTH] >= 1 && parts[DUK_DATE_IDX_MONTH] <= 12); + DUK_ASSERT(parts[DUK_DATE_IDX_DAY] >= 1 && parts[DUK_DATE_IDX_DAY] <= 31); + DUK_ASSERT(parts[DUK_DATE_IDX_YEAR] >= -999999 && parts[DUK_DATE_IDX_YEAR] <= 999999); + + /* Note: %06d for positive value, %07d for negative value to include + * sign and 6 digits. + */ + DUK_SNPRINTF(yearstr, + sizeof(yearstr), + (parts[DUK_DATE_IDX_YEAR] >= 0 && parts[DUK_DATE_IDX_YEAR] <= 9999) ? + "%04ld" : + ((parts[DUK_DATE_IDX_YEAR] >= 0) ? "+%06ld" : "%07ld"), + (long) parts[DUK_DATE_IDX_YEAR]); + yearstr[sizeof(yearstr) - 1] = (char) 0; + + if (flags & DUK_DATE_FLAG_LOCALTIME) { + /* tzoffset seconds are dropped; 16 bits suffice for + * time offset in minutes + */ + const char *fmt; + duk_small_int_t tmp, arg_hours, arg_minutes; + + if (tzoffset >= 0) { + tmp = tzoffset; + fmt = "+%02d:%02d"; + } else { + tmp = -tzoffset; + fmt = "-%02d:%02d"; + } + tmp = tmp / 60; + arg_hours = tmp / 60; + arg_minutes = tmp % 60; + DUK_ASSERT(arg_hours <= 24); /* Even less is actually guaranteed for a valid tzoffset. */ + arg_hours = arg_hours & 0x3f; /* For [0,24] this is a no-op, but fixes GCC 7 warning, see + https://github.com/svaarala/duktape/issues/1602. */ + + DUK_SNPRINTF(tzstr, sizeof(tzstr), fmt, (int) arg_hours, (int) arg_minutes); + tzstr[sizeof(tzstr) - 1] = (char) 0; + } else { + tzstr[0] = DUK_ASC_UC_Z; + tzstr[1] = (char) 0; + } + + /* Unlike year, the other parts fit into 16 bits so %d format + * is portable. + */ + if ((flags & DUK_DATE_FLAG_TOSTRING_DATE) && (flags & DUK_DATE_FLAG_TOSTRING_TIME)) { + DUK_SPRINTF((char *) out_buf, + "%s-%02d-%02d%c%02d:%02d:%02d.%03d%s", + (const char *) yearstr, + (int) parts[DUK_DATE_IDX_MONTH], + (int) parts[DUK_DATE_IDX_DAY], + (int) sep, + (int) parts[DUK_DATE_IDX_HOUR], + (int) parts[DUK_DATE_IDX_MINUTE], + (int) parts[DUK_DATE_IDX_SECOND], + (int) parts[DUK_DATE_IDX_MILLISECOND], + (const char *) tzstr); + } else if (flags & DUK_DATE_FLAG_TOSTRING_DATE) { + DUK_SPRINTF((char *) out_buf, + "%s-%02d-%02d", + (const char *) yearstr, + (int) parts[DUK_DATE_IDX_MONTH], + (int) parts[DUK_DATE_IDX_DAY]); + } else { + DUK_ASSERT(flags & DUK_DATE_FLAG_TOSTRING_TIME); + DUK_SPRINTF((char *) out_buf, + "%02d:%02d:%02d.%03d%s", + (int) parts[DUK_DATE_IDX_HOUR], + (int) parts[DUK_DATE_IDX_MINUTE], + (int) parts[DUK_DATE_IDX_SECOND], + (int) parts[DUK_DATE_IDX_MILLISECOND], + (const char *) tzstr); + } +} + +/* Helper for string conversion calls: check 'this' binding, get the + * internal time value, and format date and/or time in a few formats. + * Return value allows tail calls. + */ +DUK_LOCAL duk_ret_t duk__to_string_helper(duk_hthread *thr, duk_small_uint_t flags) { + duk_double_t d; + duk_int_t parts[DUK_DATE_IDX_NUM_PARTS]; + duk_int_t tzoffset; /* seconds, doesn't fit into 16 bits */ + duk_bool_t rc; + duk_uint8_t buf[DUK_BI_DATE_ISO8601_BUFSIZE]; + + DUK_UNREF(rc); /* unreferenced with some options */ + + d = duk__push_this_get_timeval_tzoffset(thr, flags, &tzoffset); + if (DUK_ISNAN(d)) { + duk_push_hstring_stridx(thr, DUK_STRIDX_INVALID_DATE); + return 1; + } + DUK_ASSERT(DUK_ISFINITE(d)); + + /* formatters always get one-based month/day-of-month */ + duk_bi_date_timeval_to_parts(d, parts, NULL, DUK_DATE_FLAG_ONEBASED); + DUK_ASSERT(parts[DUK_DATE_IDX_MONTH] >= 1 && parts[DUK_DATE_IDX_MONTH] <= 12); + DUK_ASSERT(parts[DUK_DATE_IDX_DAY] >= 1 && parts[DUK_DATE_IDX_DAY] <= 31); + + if (flags & DUK_DATE_FLAG_TOSTRING_LOCALE) { + /* try locale specific formatter; if it refuses to format the + * string, fall back to an ISO 8601 formatted value in local + * time. + */ +#if defined(DUK_USE_DATE_FORMAT_STRING) + /* Contract, either: + * - Push string to value stack and return 1 + * - Don't push anything and return 0 + */ + + rc = DUK_USE_DATE_FORMAT_STRING(thr, parts, tzoffset, flags); + if (rc != 0) { + return 1; + } +#else + /* No locale specific formatter; this is OK, we fall back + * to ISO 8601. + */ +#endif + } + + /* Different calling convention than above used because the helper + * is shared. + */ + duk__format_parts_iso8601(parts, tzoffset, flags, buf); + duk_push_string(thr, (const char *) buf); + return 1; +} + +/* Helper for component getter calls: check 'this' binding, get the + * internal time value, split it into parts (either as UTC time or + * local time), push a specified component as a return value to the + * value stack and return 1 (caller can then tail call us). + */ +DUK_LOCAL duk_ret_t duk__get_part_helper(duk_hthread *thr, duk_small_uint_t flags_and_idx) { + duk_double_t d; + duk_int_t parts[DUK_DATE_IDX_NUM_PARTS]; + duk_small_uint_t idx_part = (duk_small_uint_t) (flags_and_idx >> DUK_DATE_FLAG_VALUE_SHIFT); /* unpack args */ + + DUK_ASSERT_DISABLE(idx_part >= 0); /* unsigned */ + DUK_ASSERT(idx_part < DUK_DATE_IDX_NUM_PARTS); + + d = duk__push_this_get_timeval(thr, flags_and_idx); + if (DUK_ISNAN(d)) { + duk_push_nan(thr); + return 1; + } + DUK_ASSERT(DUK_ISFINITE(d)); + + duk_bi_date_timeval_to_parts(d, parts, NULL, flags_and_idx); /* no need to mask idx portion */ + + /* Setter APIs detect special year numbers (0...99) and apply a +1900 + * only in certain cases. The legacy getYear() getter applies -1900 + * unconditionally. + */ + duk_push_int(thr, (flags_and_idx & DUK_DATE_FLAG_SUB1900) ? parts[idx_part] - 1900 : parts[idx_part]); + return 1; +} + +/* Helper for component setter calls: check 'this' binding, get the + * internal time value, split it into parts (either as UTC time or + * local time), modify one or more components as specified, recompute + * the time value, set it as the internal value. Finally, push the + * new time value as a return value to the value stack and return 1 + * (caller can then tail call us). + */ +DUK_LOCAL duk_ret_t duk__set_part_helper(duk_hthread *thr, duk_small_uint_t flags_and_maxnargs) { + duk_double_t d; + duk_int_t parts[DUK_DATE_IDX_NUM_PARTS]; + duk_double_t dparts[DUK_DATE_IDX_NUM_PARTS]; + duk_idx_t nargs; + duk_small_uint_t maxnargs = (duk_small_uint_t) (flags_and_maxnargs >> DUK_DATE_FLAG_VALUE_SHIFT); /* unpack args */ + duk_small_uint_t idx_first, idx; + duk_small_uint_t i; + + nargs = duk_get_top(thr); + d = duk__push_this_get_timeval(thr, flags_and_maxnargs); + DUK_ASSERT(DUK_ISFINITE(d) || DUK_ISNAN(d)); + + if (DUK_ISFINITE(d)) { + duk_bi_date_timeval_to_parts(d, parts, dparts, flags_and_maxnargs); + } else { + /* NaN timevalue: we need to coerce the arguments, but + * the resulting internal timestamp needs to remain NaN. + * This works but is not pretty: parts and dparts will + * be partially uninitialized, but we only write to them. + */ + } + + /* + * Determining which datetime components to overwrite based on + * stack arguments is a bit complicated, but important to factor + * out from setters themselves for compactness. + * + * If DUK_DATE_FLAG_TIMESETTER, maxnargs indicates setter type: + * + * 1 -> millisecond + * 2 -> second, [millisecond] + * 3 -> minute, [second], [millisecond] + * 4 -> hour, [minute], [second], [millisecond] + * + * Else: + * + * 1 -> date + * 2 -> month, [date] + * 3 -> year, [month], [date] + * + * By comparing nargs and maxnargs (and flags) we know which + * components to override. We rely on part index ordering. + */ + + if (flags_and_maxnargs & DUK_DATE_FLAG_TIMESETTER) { + DUK_ASSERT(maxnargs >= 1 && maxnargs <= 4); + idx_first = DUK_DATE_IDX_MILLISECOND - (maxnargs - 1); + } else { + DUK_ASSERT(maxnargs >= 1 && maxnargs <= 3); + idx_first = DUK_DATE_IDX_DAY - (maxnargs - 1); + } + DUK_ASSERT_DISABLE(idx_first >= 0); /* unsigned */ + DUK_ASSERT(idx_first < DUK_DATE_IDX_NUM_PARTS); + + for (i = 0; i < maxnargs; i++) { + if ((duk_idx_t) i >= nargs) { + /* no argument given -> leave components untouched */ + break; + } + idx = idx_first + i; + DUK_ASSERT_DISABLE(idx >= 0); /* unsigned */ + DUK_ASSERT(idx < DUK_DATE_IDX_NUM_PARTS); + + if (idx == DUK_DATE_IDX_YEAR && (flags_and_maxnargs & DUK_DATE_FLAG_YEAR_FIXUP)) { + duk__twodigit_year_fixup(thr, (duk_idx_t) i); + } + + dparts[idx] = duk_to_number(thr, (duk_idx_t) i); + + if (idx == DUK_DATE_IDX_DAY) { + /* Day-of-month is one-based in the API, but zero-based + * internally, so fix here. Note that month is zero-based + * both in the API and internally. + */ + /* SCANBUILD: complains about use of uninitialized values. + * The complaint is correct, but operating in undefined + * values here is intentional in some cases and the caller + * ignores the results. + */ + dparts[idx] -= 1.0; + } + } + + /* Leaves new timevalue on stack top and returns 1, which is correct + * for part setters. + */ + if (DUK_ISFINITE(d)) { + return duk__set_this_timeval_from_dparts(thr, dparts, flags_and_maxnargs); + } else { + /* Internal timevalue is already NaN, so don't touch it. */ + duk_push_nan(thr); + return 1; + } +} + +/* Apply ToNumber() to specified index; if ToInteger(val) in [0,99], add + * 1900 and replace value at idx_val. + */ +DUK_LOCAL void duk__twodigit_year_fixup(duk_hthread *thr, duk_idx_t idx_val) { + duk_double_t d; + + /* XXX: idx_val would fit into 16 bits, but using duk_small_uint_t + * might not generate better code due to casting. + */ + + /* E5 Sections 15.9.3.1, B.2.4, B.2.5 */ + duk_to_number(thr, idx_val); + if (duk_is_nan(thr, idx_val)) { + return; + } + duk_dup(thr, idx_val); + duk_to_int(thr, -1); + d = duk_get_number(thr, -1); /* get as double to handle huge numbers correctly */ + if (d >= 0.0 && d <= 99.0) { + d += 1900.0; + duk_push_number(thr, d); + duk_replace(thr, idx_val); + } + duk_pop(thr); +} + +/* Set datetime parts from stack arguments, defaulting any missing values. + * Day-of-week is not set; it is not required when setting the time value. + */ +DUK_LOCAL void duk__set_parts_from_args(duk_hthread *thr, duk_double_t *dparts, duk_idx_t nargs) { + duk_double_t d; + duk_small_uint_t i; + duk_small_uint_t idx; + + /* Causes a ToNumber() coercion, but doesn't break coercion order since + * year is coerced first anyway. + */ + duk__twodigit_year_fixup(thr, 0); + + /* There are at most 7 args, but we use 8 here so that also + * DUK_DATE_IDX_WEEKDAY gets initialized (to zero) to avoid the potential + * for any Valgrind gripes later. + */ + for (i = 0; i < 8; i++) { + /* Note: rely on index ordering */ + idx = DUK_DATE_IDX_YEAR + i; + if ((duk_idx_t) i < nargs) { + d = duk_to_number(thr, (duk_idx_t) i); + if (idx == DUK_DATE_IDX_DAY) { + /* Convert day from one-based to zero-based (internal). This may + * cause the day part to be negative, which is OK. + */ + d -= 1.0; + } + } else { + /* All components default to 0 except day-of-month which defaults + * to 1. However, because our internal day-of-month is zero-based, + * it also defaults to zero here. + */ + d = 0.0; + } + dparts[idx] = d; + } + + DUK_DDD(DUK_DDDPRINT("parts from args -> %lf %lf %lf %lf %lf %lf %lf %lf", + (double) dparts[0], + (double) dparts[1], + (double) dparts[2], + (double) dparts[3], + (double) dparts[4], + (double) dparts[5], + (double) dparts[6], + (double) dparts[7])); +} + +/* + * Indirect magic value lookup for Date methods. + * + * Date methods don't put their control flags into the function magic value + * because they wouldn't fit into a LIGHTFUNC's magic field. Instead, the + * magic value is set to an index pointing to the array of control flags + * below. + * + * This must be kept in strict sync with genbuiltins.py! + */ + +static duk_uint16_t duk__date_magics[] = { + /* 0: toString */ + DUK_DATE_FLAG_TOSTRING_DATE + DUK_DATE_FLAG_TOSTRING_TIME + DUK_DATE_FLAG_LOCALTIME, + + /* 1: toDateString */ + DUK_DATE_FLAG_TOSTRING_DATE + DUK_DATE_FLAG_LOCALTIME, + + /* 2: toTimeString */ + DUK_DATE_FLAG_TOSTRING_TIME + DUK_DATE_FLAG_LOCALTIME, + + /* 3: toLocaleString */ + DUK_DATE_FLAG_TOSTRING_DATE + DUK_DATE_FLAG_TOSTRING_TIME + DUK_DATE_FLAG_TOSTRING_LOCALE + DUK_DATE_FLAG_LOCALTIME, + + /* 4: toLocaleDateString */ + DUK_DATE_FLAG_TOSTRING_DATE + DUK_DATE_FLAG_TOSTRING_LOCALE + DUK_DATE_FLAG_LOCALTIME, + + /* 5: toLocaleTimeString */ + DUK_DATE_FLAG_TOSTRING_TIME + DUK_DATE_FLAG_TOSTRING_LOCALE + DUK_DATE_FLAG_LOCALTIME, + + /* 6: toUTCString */ + DUK_DATE_FLAG_TOSTRING_DATE + DUK_DATE_FLAG_TOSTRING_TIME, + + /* 7: toISOString */ + DUK_DATE_FLAG_TOSTRING_DATE + DUK_DATE_FLAG_TOSTRING_TIME + DUK_DATE_FLAG_NAN_TO_RANGE_ERROR + DUK_DATE_FLAG_SEP_T, + + /* 8: getFullYear */ + DUK_DATE_FLAG_LOCALTIME + (DUK_DATE_IDX_YEAR << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 9: getUTCFullYear */ + 0 + (DUK_DATE_IDX_YEAR << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 10: getMonth */ + DUK_DATE_FLAG_LOCALTIME + (DUK_DATE_IDX_MONTH << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 11: getUTCMonth */ + 0 + (DUK_DATE_IDX_MONTH << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 12: getDate */ + DUK_DATE_FLAG_ONEBASED + DUK_DATE_FLAG_LOCALTIME + (DUK_DATE_IDX_DAY << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 13: getUTCDate */ + DUK_DATE_FLAG_ONEBASED + (DUK_DATE_IDX_DAY << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 14: getDay */ + DUK_DATE_FLAG_LOCALTIME + (DUK_DATE_IDX_WEEKDAY << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 15: getUTCDay */ + 0 + (DUK_DATE_IDX_WEEKDAY << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 16: getHours */ + DUK_DATE_FLAG_LOCALTIME + (DUK_DATE_IDX_HOUR << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 17: getUTCHours */ + 0 + (DUK_DATE_IDX_HOUR << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 18: getMinutes */ + DUK_DATE_FLAG_LOCALTIME + (DUK_DATE_IDX_MINUTE << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 19: getUTCMinutes */ + 0 + (DUK_DATE_IDX_MINUTE << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 20: getSeconds */ + DUK_DATE_FLAG_LOCALTIME + (DUK_DATE_IDX_SECOND << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 21: getUTCSeconds */ + 0 + (DUK_DATE_IDX_SECOND << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 22: getMilliseconds */ + DUK_DATE_FLAG_LOCALTIME + (DUK_DATE_IDX_MILLISECOND << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 23: getUTCMilliseconds */ + 0 + (DUK_DATE_IDX_MILLISECOND << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 24: setMilliseconds */ + DUK_DATE_FLAG_TIMESETTER + DUK_DATE_FLAG_LOCALTIME + (1 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 25: setUTCMilliseconds */ + DUK_DATE_FLAG_TIMESETTER + (1 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 26: setSeconds */ + DUK_DATE_FLAG_TIMESETTER + DUK_DATE_FLAG_LOCALTIME + (2 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 27: setUTCSeconds */ + DUK_DATE_FLAG_TIMESETTER + (2 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 28: setMinutes */ + DUK_DATE_FLAG_TIMESETTER + DUK_DATE_FLAG_LOCALTIME + (3 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 29: setUTCMinutes */ + DUK_DATE_FLAG_TIMESETTER + (3 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 30: setHours */ + DUK_DATE_FLAG_TIMESETTER + DUK_DATE_FLAG_LOCALTIME + (4 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 31: setUTCHours */ + DUK_DATE_FLAG_TIMESETTER + (4 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 32: setDate */ + DUK_DATE_FLAG_LOCALTIME + (1 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 33: setUTCDate */ + 0 + (1 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 34: setMonth */ + DUK_DATE_FLAG_LOCALTIME + (2 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 35: setUTCMonth */ + 0 + (2 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 36: setFullYear */ + DUK_DATE_FLAG_NAN_TO_ZERO + DUK_DATE_FLAG_LOCALTIME + (3 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 37: setUTCFullYear */ + DUK_DATE_FLAG_NAN_TO_ZERO + (3 << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 38: getYear */ + DUK_DATE_FLAG_LOCALTIME + DUK_DATE_FLAG_SUB1900 + (DUK_DATE_IDX_YEAR << DUK_DATE_FLAG_VALUE_SHIFT), + + /* 39: setYear */ + DUK_DATE_FLAG_NAN_TO_ZERO + DUK_DATE_FLAG_YEAR_FIXUP + (3 << DUK_DATE_FLAG_VALUE_SHIFT), +}; + +DUK_LOCAL duk_small_uint_t duk__date_get_indirect_magic(duk_hthread *thr) { + duk_small_uint_t magicidx = (duk_small_uint_t) duk_get_current_magic(thr); + DUK_ASSERT(magicidx < (duk_small_int_t) (sizeof(duk__date_magics) / sizeof(duk_uint16_t))); + return (duk_small_uint_t) duk__date_magics[magicidx]; +} + +#if defined(DUK_USE_DATE_BUILTIN) +/* + * Constructor calls + */ + +DUK_INTERNAL duk_ret_t duk_bi_date_constructor(duk_hthread *thr) { + duk_idx_t nargs = duk_get_top(thr); + duk_bool_t is_cons = duk_is_constructor_call(thr); + duk_double_t dparts[DUK_DATE_IDX_NUM_PARTS]; + duk_double_t d; + + DUK_DDD(DUK_DDDPRINT("Date constructor, nargs=%ld, is_cons=%ld", (long) nargs, (long) is_cons)); + + (void) duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_DATE), + DUK_BIDX_DATE_PROTOTYPE); + + /* Unlike most built-ins, the internal [[PrimitiveValue]] of a Date + * is mutable. + */ + + if (nargs == 0 || !is_cons) { + d = duk__timeclip(duk_time_get_ecmascript_time_nofrac(thr)); + duk_push_number(thr, d); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_VALUE, DUK_PROPDESC_FLAGS_W); + if (!is_cons) { + /* called as a normal function: return new Date().toString() */ + duk_to_string(thr, -1); + } + return 1; + } else if (nargs == 1) { + const char *str; + duk_to_primitive(thr, 0, DUK_HINT_NONE); + str = duk_get_string_notsymbol(thr, 0); + if (str) { + duk__parse_string(thr, str); + duk_replace(thr, 0); /* may be NaN */ + } + d = duk__timeclip(duk_to_number(thr, 0)); /* symbols fail here */ + duk_push_number(thr, d); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_VALUE, DUK_PROPDESC_FLAGS_W); + return 1; + } + + duk__set_parts_from_args(thr, dparts, nargs); + + /* Parts are in local time, convert when setting. */ + + (void) duk__set_this_timeval_from_dparts(thr, dparts, DUK_DATE_FLAG_LOCALTIME /*flags*/); /* -> [ ... this timeval ] */ + duk_pop(thr); /* -> [ ... this ] */ + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_date_constructor_parse(duk_hthread *thr) { + return duk__parse_string(thr, duk_to_string(thr, 0)); +} + +DUK_INTERNAL duk_ret_t duk_bi_date_constructor_utc(duk_hthread *thr) { + duk_idx_t nargs = duk_get_top(thr); + duk_double_t dparts[DUK_DATE_IDX_NUM_PARTS]; + duk_double_t d; + + /* Behavior for nargs < 2 is implementation dependent: currently we'll + * set a NaN time value (matching V8 behavior) in this case. + */ + + if (nargs < 2) { + duk_push_nan(thr); + } else { + duk__set_parts_from_args(thr, dparts, nargs); + d = duk_bi_date_get_timeval_from_dparts(dparts, 0 /*flags*/); + duk_push_number(thr, d); + } + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_date_constructor_now(duk_hthread *thr) { + duk_double_t d; + + d = duk_time_get_ecmascript_time_nofrac(thr); + DUK_ASSERT(duk_double_equals(duk__timeclip(d), d)); /* TimeClip() should never be necessary */ + duk_push_number(thr, d); + return 1; +} + +/* + * String/JSON conversions + * + * Human readable conversions are now basically ISO 8601 with a space + * (instead of 'T') as the date/time separator. This is a good baseline + * and is platform independent. + * + * A shared native helper to provide many conversions. Magic value contains + * a set of flags. The helper provides: + * + * toString() + * toDateString() + * toTimeString() + * toLocaleString() + * toLocaleDateString() + * toLocaleTimeString() + * toUTCString() + * toISOString() + * + * Notes: + * + * - Date.prototype.toGMTString() and Date.prototype.toUTCString() are + * required to be the same ECMAScript function object (!), so it is + * omitted from here. + * + * - Date.prototype.toUTCString(): E5.1 specification does not require a + * specific format, but result should be human readable. The + * specification suggests using ISO 8601 format with a space (instead + * of 'T') separator if a more human readable format is not available. + * + * - Date.prototype.toISOString(): unlike other conversion functions, + * toISOString() requires a RangeError for invalid date values. + */ + +DUK_INTERNAL duk_ret_t duk_bi_date_prototype_tostring_shared(duk_hthread *thr) { + duk_small_uint_t flags = duk__date_get_indirect_magic(thr); + return duk__to_string_helper(thr, flags); +} + +DUK_INTERNAL duk_ret_t duk_bi_date_prototype_value_of(duk_hthread *thr) { + /* This native function is also used for Date.prototype.getTime() + * as their behavior is identical. + */ + + duk_double_t d = duk__push_this_get_timeval(thr, 0 /*flags*/); /* -> [ this ] */ + DUK_ASSERT(DUK_ISFINITE(d) || DUK_ISNAN(d)); + duk_push_number(thr, d); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_date_prototype_to_json(duk_hthread *thr) { + /* Note: toJSON() is a generic function which works even if 'this' + * is not a Date. The sole argument is ignored. + */ + + duk_push_this(thr); + duk_to_object(thr, -1); + + duk_dup_top(thr); + duk_to_primitive(thr, -1, DUK_HINT_NUMBER); + if (duk_is_number(thr, -1)) { + duk_double_t d = duk_get_number(thr, -1); + if (!DUK_ISFINITE(d)) { + duk_push_null(thr); + return 1; + } + } + duk_pop(thr); + + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_TO_ISO_STRING); + duk_dup_m2(thr); /* -> [ O toIsoString O ] */ + duk_call_method(thr, 0); + return 1; +} + +/* + * Getters. + * + * Implementing getters is quite easy. The internal time value is either + * NaN, or represents milliseconds (without fractions) from Jan 1, 1970. + * The internal time value can be converted to integer parts, and each + * part will be normalized and will fit into a 32-bit signed integer. + * + * A shared native helper to provide all getters. Magic value contains + * a set of flags and also packs the date component index argument. The + * helper provides: + * + * getFullYear() + * getUTCFullYear() + * getMonth() + * getUTCMonth() + * getDate() + * getUTCDate() + * getDay() + * getUTCDay() + * getHours() + * getUTCHours() + * getMinutes() + * getUTCMinutes() + * getSeconds() + * getUTCSeconds() + * getMilliseconds() + * getUTCMilliseconds() + * getYear() + * + * Notes: + * + * - Date.prototype.getDate(): 'date' means day-of-month, and is + * zero-based in internal calculations but public API expects it to + * be one-based. + * + * - Date.prototype.getTime() and Date.prototype.valueOf() have identical + * behavior. They have separate function objects, but share the same C + * function (duk_bi_date_prototype_value_of). + */ + +DUK_INTERNAL duk_ret_t duk_bi_date_prototype_get_shared(duk_hthread *thr) { + duk_small_uint_t flags_and_idx = duk__date_get_indirect_magic(thr); + return duk__get_part_helper(thr, flags_and_idx); +} + +DUK_INTERNAL duk_ret_t duk_bi_date_prototype_get_timezone_offset(duk_hthread *thr) { + /* + * Return (t - LocalTime(t)) in minutes: + * + * t - LocalTime(t) = t - (t + LocalTZA + DaylightSavingTA(t)) + * = -(LocalTZA + DaylightSavingTA(t)) + * + * where DaylightSavingTA() is checked for time 't'. + * + * Note that the sign of the result is opposite to common usage, + * e.g. for EE(S)T which normally is +2h or +3h from UTC, this + * function returns -120 or -180. + * + */ + + duk_double_t d; + duk_int_t tzoffset; + + /* Note: DST adjustment is determined using UTC time. */ + d = duk__push_this_get_timeval(thr, 0 /*flags*/); + DUK_ASSERT(DUK_ISFINITE(d) || DUK_ISNAN(d)); + if (DUK_ISNAN(d)) { + duk_push_nan(thr); + } else { + DUK_ASSERT(DUK_ISFINITE(d)); + tzoffset = DUK_USE_DATE_GET_LOCAL_TZOFFSET(d); + duk_push_int(thr, -tzoffset / 60); + } + return 1; +} + +/* + * Setters. + * + * Setters are a bit more complicated than getters. Component setters + * break down the current time value into its (normalized) component + * parts, replace one or more components with -unnormalized- new values, + * and the components are then converted back into a time value. As an + * example of using unnormalized values: + * + * var d = new Date(1234567890); + * + * is equivalent to: + * + * var d = new Date(0); + * d.setUTCMilliseconds(1234567890); + * + * A shared native helper to provide almost all setters. Magic value + * contains a set of flags and also packs the "maxnargs" argument. The + * helper provides: + * + * setMilliseconds() + * setUTCMilliseconds() + * setSeconds() + * setUTCSeconds() + * setMinutes() + * setUTCMinutes() + * setHours() + * setUTCHours() + * setDate() + * setUTCDate() + * setMonth() + * setUTCMonth() + * setFullYear() + * setUTCFullYear() + * setYear() + * + * Notes: + * + * - Date.prototype.setYear() (Section B addition): special year check + * is omitted. NaN / Infinity will just flow through and ultimately + * result in a NaN internal time value. + * + * - Date.prototype.setYear() does not have optional arguments for + * setting month and day-in-month (like setFullYear()), but we indicate + * 'maxnargs' to be 3 to get the year written to the correct component + * index in duk__set_part_helper(). The function has nargs == 1, so only + * the year will be set regardless of actual argument count. + */ + +DUK_INTERNAL duk_ret_t duk_bi_date_prototype_set_shared(duk_hthread *thr) { + duk_small_uint_t flags_and_maxnargs = duk__date_get_indirect_magic(thr); + return duk__set_part_helper(thr, flags_and_maxnargs); +} + +DUK_INTERNAL duk_ret_t duk_bi_date_prototype_set_time(duk_hthread *thr) { + duk_double_t d; + + (void) duk__push_this_get_timeval(thr, 0 /*flags*/); /* -> [ timeval this ] */ + d = duk__timeclip(duk_to_number(thr, 0)); + duk_push_number(thr, d); + duk_dup_top(thr); + /* Must force write because .setTime() must work even when + * the Date instance is frozen. + */ + duk_xdef_prop_stridx_short(thr, -3, DUK_STRIDX_INT_VALUE, DUK_PROPDESC_FLAGS_W); + /* -> [ timeval this timeval ] */ + + return 1; +} + +/* + * Misc. + */ + +#if defined(DUK_USE_SYMBOL_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_date_prototype_toprimitive(duk_hthread *thr) { + duk_size_t hintlen; + const char *hintstr; + duk_int_t hint; + + /* Invokes OrdinaryToPrimitive() with suitable hint. Note that the + * method is generic, and works on non-Date arguments too. + * + * https://www.ecma-international.org/ecma-262/6.0/#sec-date.prototype-@@toprimitive + */ + + duk_push_this(thr); + duk_require_object(thr, -1); + DUK_ASSERT_TOP(thr, 2); + + hintstr = duk_require_lstring(thr, 0, &hintlen); + if ((hintlen == 6 && DUK_STRCMP(hintstr, "string") == 0) || (hintlen == 7 && DUK_STRCMP(hintstr, "default") == 0)) { + hint = DUK_HINT_STRING; + } else if (hintlen == 6 && DUK_STRCMP(hintstr, "number") == 0) { + hint = DUK_HINT_NUMBER; + } else { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + + duk_to_primitive_ordinary(thr, -1, hint); + return 1; +} +#endif /* DUK_USE_SYMBOL_BUILTIN */ + +#endif /* DUK_USE_DATE_BUILTIN */ + +/* automatic undefs */ +#undef DUK__CF_ACCEPT +#undef DUK__CF_ACCEPT_NUL +#undef DUK__CF_NEG +#undef DUK__DPRINT_DPARTS +#undef DUK__DPRINT_PARTS +#undef DUK__DPRINT_PARTS_AND_DPARTS +#undef DUK__LOCAL_TZOFFSET_MAXITER +#undef DUK__NUM_ISO8601_PARSER_PARTS +#undef DUK__PACK_RULE +#undef DUK__PI_DAY +#undef DUK__PI_HOUR +#undef DUK__PI_MILLISECOND +#undef DUK__PI_MINUTE +#undef DUK__PI_MONTH +#undef DUK__PI_SECOND +#undef DUK__PI_TZHOUR +#undef DUK__PI_TZMINUTE +#undef DUK__PI_YEAR +#undef DUK__PM_DAY +#undef DUK__PM_HOUR +#undef DUK__PM_MILLISECOND +#undef DUK__PM_MINUTE +#undef DUK__PM_MONTH +#undef DUK__PM_SECOND +#undef DUK__PM_TZHOUR +#undef DUK__PM_TZMINUTE +#undef DUK__PM_YEAR +#undef DUK__RULE_MASK_PART_SEP +#undef DUK__SI_COLON +#undef DUK__SI_MINUS +#undef DUK__SI_NUL +#undef DUK__SI_PERIOD +#undef DUK__SI_PLUS +#undef DUK__SI_SPACE +#undef DUK__SI_T +#undef DUK__SI_Z +#undef DUK__SM_COLON +#undef DUK__SM_MINUS +#undef DUK__SM_NUL +#undef DUK__SM_PERIOD +#undef DUK__SM_PLUS +#undef DUK__SM_SPACE +#undef DUK__SM_T +#undef DUK__SM_Z +#undef DUK__UNPACK_RULE +#undef DUK__WEEKDAY_MOD_ADDER +#undef DUK__YEAR +#line 1 "duk_bi_date_unix.c" +/* + * Unix-like Date providers + * + * Generally useful Unix / POSIX / ANSI Date providers. + */ + +/* #include duk_internal.h -> already included */ + +/* The necessary #includes are in place in duk_config.h. */ + +/* Buffer sizes for some UNIX calls. Larger than strictly necessary + * to avoid Valgrind errors. + */ +#define DUK__STRPTIME_BUF_SIZE 64 +#define DUK__STRFTIME_BUF_SIZE 64 + +#if defined(DUK_USE_DATE_NOW_GETTIMEOFDAY) +/* Get current ECMAScript time (= UNIX/Posix time, but in milliseconds). */ +DUK_INTERNAL duk_double_t duk_bi_date_get_now_gettimeofday(void) { + struct timeval tv; + duk_double_t d; + + if (gettimeofday(&tv, NULL) != 0) { + DUK_D(DUK_DPRINT("gettimeofday() failed")); + return 0.0; + } + + /* As of Duktape 2.2.0 allow fractions. */ + d = ((duk_double_t) tv.tv_sec) * 1000.0 + ((duk_double_t) tv.tv_usec) / 1000.0; + + return d; +} +#endif /* DUK_USE_DATE_NOW_GETTIMEOFDAY */ + +#if defined(DUK_USE_DATE_NOW_TIME) +/* Not a very good provider: only full seconds are available. */ +DUK_INTERNAL duk_double_t duk_bi_date_get_now_time(void) { + time_t t; + + t = time(NULL); + if (t == (time_t) -1) { + DUK_D(DUK_DPRINT("time() failed")); + return 0.0; + } + return ((duk_double_t) t) * 1000.0; +} +#endif /* DUK_USE_DATE_NOW_TIME */ + +#if defined(DUK_USE_DATE_TZO_GMTIME) || defined(DUK_USE_DATE_TZO_GMTIME_R) || defined(DUK_USE_DATE_TZO_GMTIME_S) +/* Get local time offset (in seconds) for a certain (UTC) instant 'd'. */ +DUK_INTERNAL duk_int_t duk_bi_date_get_local_tzoffset_gmtime(duk_double_t d) { + time_t t, t1, t2; + duk_int_t parts[DUK_DATE_IDX_NUM_PARTS]; + duk_double_t dparts[DUK_DATE_IDX_NUM_PARTS]; + struct tm tms[2]; +#if defined(DUK_USE_DATE_TZO_GMTIME) + struct tm *tm_ptr; +#endif + + /* For NaN/inf, the return value doesn't matter. */ + if (!DUK_ISFINITE(d)) { + return 0; + } + + /* If not within ECMAScript range, some integer time calculations + * won't work correctly (and some asserts will fail), so bail out + * if so. This fixes test-bug-date-insane-setyear.js. There is + * a +/- 24h leeway in this range check to avoid a test262 corner + * case documented in test-bug-date-timeval-edges.js. + */ + if (!duk_bi_date_timeval_in_leeway_range(d)) { + DUK_DD(DUK_DDPRINT("timeval not within valid range, skip tzoffset computation to avoid integer overflows")); + return 0; + } + + /* + * This is a bit tricky to implement portably. The result depends + * on the timestamp (specifically, DST depends on the timestamp). + * If e.g. UNIX APIs are used, they'll have portability issues with + * very small and very large years. + * + * Current approach: + * + * - Stay within portable UNIX limits by using equivalent year mapping. + * Avoid year 1970 and 2038 as some conversions start to fail, at + * least on some platforms. Avoiding 1970 means that there are + * currently DST discrepancies for 1970. + * + * - Create a UTC and local time breakdowns from 't'. Then create + * a time_t using gmtime() and localtime() and compute the time + * difference between the two. + * + * Equivalent year mapping (E5 Section 15.9.1.8): + * + * If the host environment provides functionality for determining + * daylight saving time, the implementation of ECMAScript is free + * to map the year in question to an equivalent year (same + * leap-year-ness and same starting week day for the year) for which + * the host environment provides daylight saving time information. + * The only restriction is that all equivalent years should produce + * the same result. + * + * This approach is quite reasonable but not entirely correct, e.g. + * the specification also states (E5 Section 15.9.1.8): + * + * The implementation of ECMAScript should not try to determine + * whether the exact time was subject to daylight saving time, but + * just whether daylight saving time would have been in effect if + * the _current daylight saving time algorithm_ had been used at the + * time. This avoids complications such as taking into account the + * years that the locale observed daylight saving time year round. + * + * Since we rely on the platform APIs for conversions between local + * time and UTC, we can't guarantee the above. Rather, if the platform + * has historical DST rules they will be applied. This seems to be the + * general preferred direction in ECMAScript standardization (or at least + * implementations) anyway, and even the equivalent year mapping should + * be disabled if the platform is known to handle DST properly for the + * full ECMAScript range. + * + * The following has useful discussion and links: + * + * https://bugzilla.mozilla.org/show_bug.cgi?id=351066 + */ + + duk_bi_date_timeval_to_parts(d, parts, dparts, DUK_DATE_FLAG_EQUIVYEAR /*flags*/); + DUK_ASSERT(parts[DUK_DATE_IDX_YEAR] >= 1970 && parts[DUK_DATE_IDX_YEAR] <= 2038); + + d = duk_bi_date_get_timeval_from_dparts(dparts, 0 /*flags*/); + DUK_ASSERT(d >= 0 && d < 2147483648.0 * 1000.0); /* unsigned 31-bit range */ + t = (time_t) (d / 1000.0); + DUK_DDD(DUK_DDDPRINT("timeval: %lf -> time_t %ld", (double) d, (long) t)); + + duk_memzero((void *) tms, sizeof(struct tm) * 2); + +#if defined(DUK_USE_DATE_TZO_GMTIME_R) + (void) gmtime_r(&t, &tms[0]); + (void) localtime_r(&t, &tms[1]); +#elif defined(DUK_USE_DATE_TZO_GMTIME_S) + (void) gmtime_s(&t, &tms[0]); + (void) localtime_s(&t, &tms[1]); +#elif defined(DUK_USE_DATE_TZO_GMTIME) + tm_ptr = gmtime(&t); + duk_memcpy((void *) &tms[0], tm_ptr, sizeof(struct tm)); + tm_ptr = localtime(&t); + duk_memcpy((void *) &tms[1], tm_ptr, sizeof(struct tm)); +#else +#error internal error +#endif + DUK_DDD(DUK_DDDPRINT("gmtime result: tm={sec:%ld,min:%ld,hour:%ld,mday:%ld,mon:%ld,year:%ld," + "wday:%ld,yday:%ld,isdst:%ld}", + (long) tms[0].tm_sec, + (long) tms[0].tm_min, + (long) tms[0].tm_hour, + (long) tms[0].tm_mday, + (long) tms[0].tm_mon, + (long) tms[0].tm_year, + (long) tms[0].tm_wday, + (long) tms[0].tm_yday, + (long) tms[0].tm_isdst)); + DUK_DDD(DUK_DDDPRINT("localtime result: tm={sec:%ld,min:%ld,hour:%ld,mday:%ld,mon:%ld,year:%ld," + "wday:%ld,yday:%ld,isdst:%ld}", + (long) tms[1].tm_sec, + (long) tms[1].tm_min, + (long) tms[1].tm_hour, + (long) tms[1].tm_mday, + (long) tms[1].tm_mon, + (long) tms[1].tm_year, + (long) tms[1].tm_wday, + (long) tms[1].tm_yday, + (long) tms[1].tm_isdst)); + + /* tm_isdst is both an input and an output to mktime(), use 0 to + * avoid DST handling in mktime(): + * - https://github.com/svaarala/duktape/issues/406 + * - http://stackoverflow.com/questions/8558919/mktime-and-tm-isdst + */ + tms[0].tm_isdst = 0; + tms[1].tm_isdst = 0; + t1 = mktime(&tms[0]); /* UTC */ + t2 = mktime(&tms[1]); /* local */ + if (t1 == (time_t) -1 || t2 == (time_t) -1) { + /* This check used to be for (t < 0) but on some platforms + * time_t is unsigned and apparently the proper way to detect + * an mktime() error return is the cast above. See e.g.: + * http://pubs.opengroup.org/onlinepubs/009695299/functions/mktime.html + */ + goto mktime_error; + } + DUK_DDD(DUK_DDDPRINT("t1=%ld (utc), t2=%ld (local)", (long) t1, (long) t2)); + + /* Compute final offset in seconds, positive if local time ahead of + * UTC (returned value is UTC-to-local offset). + * + * difftime() returns a double, so coercion to int generates quite + * a lot of code. Direct subtraction is not portable, however. + * XXX: allow direct subtraction on known platforms. + */ +#if 0 + return (duk_int_t) (t2 - t1); +#endif + return (duk_int_t) difftime(t2, t1); + +mktime_error: + /* XXX: return something more useful, so that caller can throw? */ + DUK_D(DUK_DPRINT("mktime() failed, d=%lf", (double) d)); + return 0; +} +#endif /* DUK_USE_DATE_TZO_GMTIME */ + +#if defined(DUK_USE_DATE_PRS_STRPTIME) +DUK_INTERNAL duk_bool_t duk_bi_date_parse_string_strptime(duk_hthread *thr, const char *str) { + struct tm tm; + time_t t; + char buf[DUK__STRPTIME_BUF_SIZE]; + + /* Copy to buffer with slack to avoid Valgrind gripes from strptime. */ + DUK_ASSERT(str != NULL); + duk_memzero(buf, sizeof(buf)); /* valgrind whine without this */ + DUK_SNPRINTF(buf, sizeof(buf), "%s", (const char *) str); + buf[sizeof(buf) - 1] = (char) 0; + + DUK_DDD(DUK_DDDPRINT("parsing: '%s'", (const char *) buf)); + + duk_memzero(&tm, sizeof(tm)); + if (strptime((const char *) buf, "%c", &tm) != NULL) { + DUK_DDD(DUK_DDDPRINT("before mktime: tm={sec:%ld,min:%ld,hour:%ld,mday:%ld,mon:%ld,year:%ld," + "wday:%ld,yday:%ld,isdst:%ld}", + (long) tm.tm_sec, + (long) tm.tm_min, + (long) tm.tm_hour, + (long) tm.tm_mday, + (long) tm.tm_mon, + (long) tm.tm_year, + (long) tm.tm_wday, + (long) tm.tm_yday, + (long) tm.tm_isdst)); + tm.tm_isdst = -1; /* negative: dst info not available */ + + t = mktime(&tm); + DUK_DDD(DUK_DDDPRINT("mktime() -> %ld", (long) t)); + if (t >= 0) { + duk_push_number(thr, ((duk_double_t) t) * 1000.0); + return 1; + } + } + + return 0; +} +#endif /* DUK_USE_DATE_PRS_STRPTIME */ + +#if defined(DUK_USE_DATE_PRS_GETDATE) +DUK_INTERNAL duk_bool_t duk_bi_date_parse_string_getdate(duk_hthread *thr, const char *str) { + struct tm tm; + duk_small_int_t rc; + time_t t; + + /* For this to work, DATEMSK must be set, so this is not very + * convenient for an embeddable interpreter. + */ + + duk_memzero(&tm, sizeof(struct tm)); + rc = (duk_small_int_t) getdate_r(str, &tm); + DUK_DDD(DUK_DDDPRINT("getdate_r() -> %ld", (long) rc)); + + if (rc == 0) { + t = mktime(&tm); + DUK_DDD(DUK_DDDPRINT("mktime() -> %ld", (long) t)); + if (t >= 0) { + duk_push_number(thr, (duk_double_t) t); + return 1; + } + } + + return 0; +} +#endif /* DUK_USE_DATE_PRS_GETDATE */ + +#if defined(DUK_USE_DATE_FMT_STRFTIME) +DUK_INTERNAL duk_bool_t duk_bi_date_format_parts_strftime(duk_hthread *thr, + duk_int_t *parts, + duk_int_t tzoffset, + duk_small_uint_t flags) { + char buf[DUK__STRFTIME_BUF_SIZE]; + struct tm tm; + const char *fmt; + + DUK_UNREF(tzoffset); + + /* If the platform doesn't support the entire ECMAScript range, we need + * to return 0 so that the caller can fall back to the default formatter. + * + * For now, assume that if time_t is 8 bytes or more, the whole ECMAScript + * range is supported. For smaller time_t values (4 bytes in practice), + * assumes that the signed 32-bit range is supported. + * + * XXX: detect this more correctly per platform. The size of time_t is + * probably not an accurate guarantee of strftime() supporting or not + * supporting a large time range (the full ECMAScript range). + */ + if (sizeof(time_t) < 8 && (parts[DUK_DATE_IDX_YEAR] < 1970 || parts[DUK_DATE_IDX_YEAR] > 2037)) { + /* be paranoid for 32-bit time values (even avoiding negative ones) */ + return 0; + } + + duk_memzero(&tm, sizeof(tm)); + tm.tm_sec = parts[DUK_DATE_IDX_SECOND]; + tm.tm_min = parts[DUK_DATE_IDX_MINUTE]; + tm.tm_hour = parts[DUK_DATE_IDX_HOUR]; + tm.tm_mday = parts[DUK_DATE_IDX_DAY]; /* already one-based */ + tm.tm_mon = parts[DUK_DATE_IDX_MONTH] - 1; /* one-based -> zero-based */ + tm.tm_year = parts[DUK_DATE_IDX_YEAR] - 1900; + tm.tm_wday = parts[DUK_DATE_IDX_WEEKDAY]; + tm.tm_isdst = 0; + + duk_memzero(buf, sizeof(buf)); + if ((flags & DUK_DATE_FLAG_TOSTRING_DATE) && (flags & DUK_DATE_FLAG_TOSTRING_TIME)) { + fmt = "%c"; + } else if (flags & DUK_DATE_FLAG_TOSTRING_DATE) { + fmt = "%x"; + } else { + DUK_ASSERT(flags & DUK_DATE_FLAG_TOSTRING_TIME); + fmt = "%X"; + } + (void) strftime(buf, sizeof(buf) - 1, fmt, &tm); + DUK_ASSERT(buf[sizeof(buf) - 1] == 0); + + duk_push_string(thr, buf); + return 1; +} +#endif /* DUK_USE_DATE_FMT_STRFTIME */ + +#if defined(DUK_USE_GET_MONOTONIC_TIME_CLOCK_GETTIME) +DUK_INTERNAL duk_double_t duk_bi_date_get_monotonic_time_clock_gettime(void) { + struct timespec ts; + + if (clock_gettime(CLOCK_MONOTONIC, &ts) == 0) { + return (duk_double_t) ts.tv_sec * 1000.0 + (duk_double_t) ts.tv_nsec / 1000000.0; + } else { + DUK_D(DUK_DPRINT("clock_gettime(CLOCK_MONOTONIC) failed")); + return 0.0; + } +} +#endif + +/* automatic undefs */ +#undef DUK__STRFTIME_BUF_SIZE +#undef DUK__STRPTIME_BUF_SIZE +#line 1 "duk_bi_date_windows.c" +/* + * Windows Date providers + * + * Platform specific links: + * + * - http://msdn.microsoft.com/en-us/library/windows/desktop/ms725473(v=vs.85).aspx + */ + +/* #include duk_internal.h -> already included */ + +/* The necessary #includes are in place in duk_config.h. */ + +#if defined(DUK_USE_DATE_NOW_WINDOWS) || defined(DUK_USE_DATE_TZO_WINDOWS) +/* Shared Windows helpers. */ +DUK_LOCAL void duk__convert_systime_to_ularge(const SYSTEMTIME *st, ULARGE_INTEGER *res) { + FILETIME ft; + if (SystemTimeToFileTime(st, &ft) == 0) { + DUK_D(DUK_DPRINT("SystemTimeToFileTime() failed, returning 0")); + res->QuadPart = 0; + } else { + res->LowPart = ft.dwLowDateTime; + res->HighPart = ft.dwHighDateTime; + } +} + +#if defined(DUK_USE_DATE_NOW_WINDOWS_SUBMS) +DUK_LOCAL void duk__convert_filetime_to_ularge(const FILETIME *ft, ULARGE_INTEGER *res) { + res->LowPart = ft->dwLowDateTime; + res->HighPart = ft->dwHighDateTime; +} +#endif /* DUK_USE_DATE_NOW_WINDOWS_SUBMS */ + +DUK_LOCAL void duk__set_systime_jan1970(SYSTEMTIME *st) { + duk_memzero((void *) st, sizeof(*st)); + st->wYear = 1970; + st->wMonth = 1; + st->wDayOfWeek = 4; /* not sure whether or not needed; Thursday */ + st->wDay = 1; + DUK_ASSERT(st->wHour == 0); + DUK_ASSERT(st->wMinute == 0); + DUK_ASSERT(st->wSecond == 0); + DUK_ASSERT(st->wMilliseconds == 0); +} +#endif /* defined(DUK_USE_DATE_NOW_WINDOWS) || defined(DUK_USE_DATE_TZO_WINDOWS) */ + +#if defined(DUK_USE_DATE_NOW_WINDOWS) +DUK_INTERNAL duk_double_t duk_bi_date_get_now_windows(void) { + /* Suggested step-by-step method from documentation of RtlTimeToSecondsSince1970: + * http://msdn.microsoft.com/en-us/library/windows/desktop/ms724928(v=vs.85).aspx + */ + SYSTEMTIME st1, st2; + ULARGE_INTEGER tmp1, tmp2; + + GetSystemTime(&st1); + duk__convert_systime_to_ularge((const SYSTEMTIME *) &st1, &tmp1); + + duk__set_systime_jan1970(&st2); + duk__convert_systime_to_ularge((const SYSTEMTIME *) &st2, &tmp2); + + /* Difference is in 100ns units, convert to milliseconds, keeping + * fractions since Duktape 2.2.0. This is only theoretical because + * SYSTEMTIME is limited to milliseconds. + */ + return (duk_double_t) ((LONGLONG) tmp1.QuadPart - (LONGLONG) tmp2.QuadPart) / 10000.0; +} +#endif /* DUK_USE_DATE_NOW_WINDOWS */ + +#if defined(DUK_USE_DATE_NOW_WINDOWS_SUBMS) +DUK_INTERNAL duk_double_t duk_bi_date_get_now_windows_subms(void) { + /* Variant of the basic algorithm using GetSystemTimePreciseAsFileTime() + * for more accuracy. + */ + FILETIME ft1; + SYSTEMTIME st2; + ULARGE_INTEGER tmp1, tmp2; + + GetSystemTimePreciseAsFileTime(&ft1); + duk__convert_filetime_to_ularge((const FILETIME *) &ft1, &tmp1); + + duk__set_systime_jan1970(&st2); + duk__convert_systime_to_ularge((const SYSTEMTIME *) &st2, &tmp2); + + /* Difference is in 100ns units, convert to milliseconds, keeping + * fractions since Duktape 2.2.0. + */ + return (duk_double_t) ((LONGLONG) tmp1.QuadPart - (LONGLONG) tmp2.QuadPart) / 10000.0; +} +#endif /* DUK_USE_DATE_NOW_WINDOWS */ + +#if defined(DUK_USE_DATE_TZO_WINDOWS) +DUK_INTERNAL duk_int_t duk_bi_date_get_local_tzoffset_windows(duk_double_t d) { + SYSTEMTIME st1; + SYSTEMTIME st2; + SYSTEMTIME st3; + ULARGE_INTEGER tmp1; + ULARGE_INTEGER tmp2; + ULARGE_INTEGER tmp3; + FILETIME ft1; + + /* XXX: handling of timestamps outside Windows supported range. + * How does Windows deal with dates before 1600? Does windows + * support all ECMAScript years (like -200000 and +200000)? + * Should equivalent year mapping be used here too? If so, use + * a shared helper (currently integrated into timeval-to-parts). + */ + + /* Use the approach described in "Remarks" of FileTimeToLocalFileTime: + * http://msdn.microsoft.com/en-us/library/windows/desktop/ms724277(v=vs.85).aspx + */ + + duk__set_systime_jan1970(&st1); + duk__convert_systime_to_ularge((const SYSTEMTIME *) &st1, &tmp1); + tmp2.QuadPart = (ULONGLONG) (d * 10000.0); /* millisec -> 100ns units since jan 1, 1970 */ + tmp2.QuadPart += tmp1.QuadPart; /* input 'd' in Windows UTC, 100ns units */ + + ft1.dwLowDateTime = tmp2.LowPart; + ft1.dwHighDateTime = tmp2.HighPart; + if (FileTimeToSystemTime((const FILETIME *) &ft1, &st2) == 0) { + DUK_D(DUK_DPRINT("FileTimeToSystemTime() failed, return tzoffset 0")); + return 0; + } + if (SystemTimeToTzSpecificLocalTime((LPTIME_ZONE_INFORMATION) NULL, &st2, &st3) == 0) { + DUK_D(DUK_DPRINT("SystemTimeToTzSpecificLocalTime() failed, return tzoffset 0")); + return 0; + } + duk__convert_systime_to_ularge((const SYSTEMTIME *) &st3, &tmp3); + + /* Positive if local time ahead of UTC. */ + return (duk_int_t) (((LONGLONG) tmp3.QuadPart - (LONGLONG) tmp2.QuadPart) / DUK_I64_CONSTANT(10000000)); /* seconds */ +} +#endif /* DUK_USE_DATE_TZO_WINDOWS */ + +#if defined(DUK_USE_DATE_TZO_WINDOWS_NO_DST) +DUK_INTERNAL duk_int_t duk_bi_date_get_local_tzoffset_windows_no_dst(duk_double_t d) { + SYSTEMTIME st1; + SYSTEMTIME st2; + FILETIME ft1; + FILETIME ft2; + ULARGE_INTEGER tmp1; + ULARGE_INTEGER tmp2; + + /* Do a similar computation to duk_bi_date_get_local_tzoffset_windows + * but without accounting for daylight savings time. Use this on + * Windows platforms (like Durango) that don't support the + * SystemTimeToTzSpecificLocalTime() call. + */ + + /* current time not needed for this computation */ + DUK_UNREF(d); + + duk__set_systime_jan1970(&st1); + duk__convert_systime_to_ularge((const SYSTEMTIME *) &st1, &tmp1); + + ft1.dwLowDateTime = tmp1.LowPart; + ft1.dwHighDateTime = tmp1.HighPart; + if (FileTimeToLocalFileTime((const FILETIME *) &ft1, &ft2) == 0) { + DUK_D(DUK_DPRINT("FileTimeToLocalFileTime() failed, return tzoffset 0")); + return 0; + } + if (FileTimeToSystemTime((const FILETIME *) &ft2, &st2) == 0) { + DUK_D(DUK_DPRINT("FileTimeToSystemTime() failed, return tzoffset 0")); + return 0; + } + duk__convert_systime_to_ularge((const SYSTEMTIME *) &st2, &tmp2); + + return (duk_int_t) (((LONGLONG) tmp2.QuadPart - (LONGLONG) tmp1.QuadPart) / DUK_I64_CONSTANT(10000000)); /* seconds */ +} +#endif /* DUK_USE_DATE_TZO_WINDOWS_NO_DST */ + +#if defined(DUK_USE_GET_MONOTONIC_TIME_WINDOWS_QPC) +DUK_INTERNAL duk_double_t duk_bi_date_get_monotonic_time_windows_qpc(void) { + LARGE_INTEGER count, freq; + + /* There are legacy issues with QueryPerformanceCounter(): + * - Potential jumps: + * https://support.microsoft.com/en-us/help/274323/performance-counter-value-may-unexpectedly-leap-forward + * - Differences between cores (XP): + * https://msdn.microsoft.com/en-us/library/windows/desktop/dn553408(v=vs.85).aspx#qpc_support_in_windows_versions + * + * We avoid these by enabling QPC by default only for Vista or later. + */ + + if (QueryPerformanceCounter(&count) && QueryPerformanceFrequency(&freq)) { + /* XXX: QueryPerformanceFrequency() can be cached */ + return (duk_double_t) count.QuadPart / (duk_double_t) freq.QuadPart * 1000.0; + } else { + /* MSDN: "On systems that run Windows XP or later, the function + * will always succeed and will thus never return zero." + * Provide minimal error path just in case user enables this + * feature in pre-XP Windows. + */ + return 0.0; + } +} +#endif /* DUK_USE_GET_MONOTONIC_TIME_WINDOWS_QPC */ +#line 1 "duk_bi_duktape.c" +/* + * Duktape built-ins + * + * Size optimization note: it might seem that vararg multipurpose functions + * like fin(), enc(), and dec() are not very size optimal, but using a single + * user-visible ECMAScript function saves a lot of run-time footprint; each + * Function instance takes >100 bytes. Using a shared native helper and a + * 'magic' value won't save much if there are multiple Function instances + * anyway. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_DUKTAPE_BUILTIN) + +DUK_INTERNAL duk_ret_t duk_bi_duktape_object_info(duk_hthread *thr) { + duk_inspect_value(thr, -1); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_duktape_object_act(duk_hthread *thr) { + duk_int_t level; + + level = duk_to_int(thr, 0); + duk_inspect_callstack_entry(thr, level); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_duktape_object_gc(duk_hthread *thr) { + duk_small_uint_t flags; + + flags = (duk_small_uint_t) duk_get_uint(thr, 0); + duk_heap_mark_and_sweep(thr->heap, flags); + + /* XXX: Not sure what the best return value would be in the API. + * Return true for now. + */ + duk_push_true(thr); + return 1; +} + +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_duktape_object_fin(duk_hthread *thr) { + (void) duk_require_hobject(thr, 0); + if (duk_get_top(thr) >= 2) { + /* Set: currently a finalizer is disabled by setting it to + * undefined; this does not remove the property at the moment. + * The value could be type checked to be either a function + * or something else; if something else, the property could + * be deleted. Must use duk_set_finalizer() to keep + * DUK_HOBJECT_FLAG_HAVE_FINALIZER in sync. + */ + duk_set_top(thr, 2); + duk_set_finalizer(thr, 0); + return 0; + } else { + /* Get. */ + DUK_ASSERT(duk_get_top(thr) == 1); + duk_get_finalizer(thr, 0); + return 1; + } +} +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +DUK_INTERNAL duk_ret_t duk_bi_duktape_object_enc(duk_hthread *thr) { + duk_hstring *h_str; + + /* Vararg function: must be careful to check/require arguments. + * The JSON helpers accept invalid indices and treat them like + * non-existent optional parameters. + */ + + h_str = duk_require_hstring(thr, 0); /* Could reject symbols, but no point: won't match comparisons. */ + duk_require_valid_index(thr, 1); + + if (h_str == DUK_HTHREAD_STRING_HEX(thr)) { + duk_set_top(thr, 2); + duk_hex_encode(thr, 1); + DUK_ASSERT_TOP(thr, 2); + } else if (h_str == DUK_HTHREAD_STRING_BASE64(thr)) { + duk_set_top(thr, 2); + duk_base64_encode(thr, 1); + DUK_ASSERT_TOP(thr, 2); +#if defined(DUK_USE_JSON_SUPPORT) && defined(DUK_USE_JX) + } else if (h_str == DUK_HTHREAD_STRING_JX(thr)) { + duk_bi_json_stringify_helper(thr, + 1 /*idx_value*/, + 2 /*idx_replacer*/, + 3 /*idx_space*/, + DUK_JSON_FLAG_EXT_CUSTOM | DUK_JSON_FLAG_ASCII_ONLY | + DUK_JSON_FLAG_AVOID_KEY_QUOTES /*flags*/); +#endif +#if defined(DUK_USE_JSON_SUPPORT) && defined(DUK_USE_JC) + } else if (h_str == DUK_HTHREAD_STRING_JC(thr)) { + duk_bi_json_stringify_helper(thr, + 1 /*idx_value*/, + 2 /*idx_replacer*/, + 3 /*idx_space*/, + DUK_JSON_FLAG_EXT_COMPATIBLE | DUK_JSON_FLAG_ASCII_ONLY /*flags*/); +#endif + } else { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_duktape_object_dec(duk_hthread *thr) { + duk_hstring *h_str; + + /* Vararg function: must be careful to check/require arguments. + * The JSON helpers accept invalid indices and treat them like + * non-existent optional parameters. + */ + + h_str = duk_require_hstring(thr, 0); /* Could reject symbols, but no point: won't match comparisons */ + duk_require_valid_index(thr, 1); + + if (h_str == DUK_HTHREAD_STRING_HEX(thr)) { + duk_set_top(thr, 2); + duk_hex_decode(thr, 1); + DUK_ASSERT_TOP(thr, 2); + } else if (h_str == DUK_HTHREAD_STRING_BASE64(thr)) { + duk_set_top(thr, 2); + duk_base64_decode(thr, 1); + DUK_ASSERT_TOP(thr, 2); +#if defined(DUK_USE_JSON_SUPPORT) && defined(DUK_USE_JX) + } else if (h_str == DUK_HTHREAD_STRING_JX(thr)) { + duk_bi_json_parse_helper(thr, 1 /*idx_value*/, 2 /*idx_replacer*/, DUK_JSON_FLAG_EXT_CUSTOM /*flags*/); +#endif +#if defined(DUK_USE_JSON_SUPPORT) && defined(DUK_USE_JC) + } else if (h_str == DUK_HTHREAD_STRING_JC(thr)) { + duk_bi_json_parse_helper(thr, 1 /*idx_value*/, 2 /*idx_replacer*/, DUK_JSON_FLAG_EXT_COMPATIBLE /*flags*/); +#endif + } else { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + return 1; +} + +/* + * Compact an object + */ + +DUK_INTERNAL duk_ret_t duk_bi_duktape_object_compact(duk_hthread *thr) { + DUK_ASSERT_TOP(thr, 1); + duk_compact(thr, 0); + return 1; /* return the argument object */ +} + +#endif /* DUK_USE_DUKTAPE_BUILTIN */ +#line 1 "duk_bi_encoding.c" +/* + * WHATWG Encoding API built-ins + * + * API specification: https://encoding.spec.whatwg.org/#api + * Web IDL: https://www.w3.org/TR/WebIDL/ + */ + +/* #include duk_internal.h -> already included */ + +/* + * Data structures for encoding/decoding + */ + +typedef struct { + duk_uint8_t *out; /* where to write next byte(s) */ + duk_codepoint_t lead; /* lead surrogate */ +} duk__encode_context; + +typedef struct { + /* UTF-8 decoding state */ + duk_codepoint_t codepoint; /* built up incrementally */ + duk_uint8_t upper; /* max value of next byte (decode error otherwise) */ + duk_uint8_t lower; /* min value of next byte (ditto) */ + duk_uint8_t needed; /* how many more bytes we need */ + duk_uint8_t bom_handled; /* BOM seen or no longer expected */ + + /* Decoder configuration */ + duk_uint8_t fatal; + duk_uint8_t ignore_bom; +} duk__decode_context; + +/* The signed duk_codepoint_t type is used to signal a decoded codepoint + * (>= 0) or various other states using negative values. + */ +#define DUK__CP_CONTINUE (-1) /* continue to next byte, no completed codepoint */ +#define DUK__CP_ERROR (-2) /* decoding error */ +#define DUK__CP_RETRY (-3) /* decoding error; retry last byte */ + +/* + * Raw helpers for encoding/decoding + */ + +/* Emit UTF-8 (= CESU-8) encoded U+FFFD (replacement char), i.e. ef bf bd. */ +DUK_LOCAL duk_uint8_t *duk__utf8_emit_repl(duk_uint8_t *ptr) { + *ptr++ = 0xef; + *ptr++ = 0xbf; + *ptr++ = 0xbd; + return ptr; +} + +DUK_LOCAL void duk__utf8_decode_init(duk__decode_context *dec_ctx) { + /* (Re)init the decoding state of 'dec_ctx' but leave decoder + * configuration fields untouched. + */ + dec_ctx->codepoint = 0x0000L; + dec_ctx->upper = 0xbf; + dec_ctx->lower = 0x80; + dec_ctx->needed = 0; + dec_ctx->bom_handled = 0; +} + +DUK_LOCAL duk_codepoint_t duk__utf8_decode_next(duk__decode_context *dec_ctx, duk_uint8_t x) { + /* + * UTF-8 algorithm based on the Encoding specification: + * https://encoding.spec.whatwg.org/#utf-8-decoder + * + * Two main states: decoding initial byte vs. decoding continuation + * bytes. Shortest length encoding is validated by restricting the + * allowed range of first continuation byte using 'lower' and 'upper'. + */ + + if (dec_ctx->needed == 0) { + /* process initial byte */ + if (x <= 0x7f) { + /* U+0000-U+007F, 1 byte (ASCII) */ + return (duk_codepoint_t) x; + } else if (x >= 0xc2 && x <= 0xdf) { + /* U+0080-U+07FF, 2 bytes */ + dec_ctx->needed = 1; + dec_ctx->codepoint = x & 0x1f; + DUK_ASSERT(dec_ctx->lower == 0x80); + DUK_ASSERT(dec_ctx->upper == 0xbf); + return DUK__CP_CONTINUE; + } else if (x >= 0xe0 && x <= 0xef) { + /* U+0800-U+FFFF, 3 bytes */ + if (x == 0xe0) { + dec_ctx->lower = 0xa0; + DUK_ASSERT(dec_ctx->upper == 0xbf); + } else if (x == 0xed) { + DUK_ASSERT(dec_ctx->lower == 0x80); + dec_ctx->upper = 0x9f; + } + dec_ctx->needed = 2; + dec_ctx->codepoint = x & 0x0f; + return DUK__CP_CONTINUE; + } else if (x >= 0xf0 && x <= 0xf4) { + /* U+010000-U+10FFFF, 4 bytes */ + if (x == 0xf0) { + dec_ctx->lower = 0x90; + DUK_ASSERT(dec_ctx->upper == 0xbf); + } else if (x == 0xf4) { + DUK_ASSERT(dec_ctx->lower == 0x80); + dec_ctx->upper = 0x8f; + } + dec_ctx->needed = 3; + dec_ctx->codepoint = x & 0x07; + return DUK__CP_CONTINUE; + } else { + /* not a legal initial byte */ + return DUK__CP_ERROR; + } + } else { + /* process continuation byte */ + if (x >= dec_ctx->lower && x <= dec_ctx->upper) { + dec_ctx->lower = 0x80; + dec_ctx->upper = 0xbf; + dec_ctx->codepoint = (dec_ctx->codepoint << 6) | (x & 0x3f); + if (--dec_ctx->needed > 0) { + /* need more bytes */ + return DUK__CP_CONTINUE; + } else { + /* got a codepoint */ + duk_codepoint_t ret; + DUK_ASSERT(dec_ctx->codepoint <= 0x10ffffL); /* Decoding rules guarantee. */ + ret = dec_ctx->codepoint; + dec_ctx->codepoint = 0x0000L; + dec_ctx->needed = 0; + return ret; + } + } else { + /* We just encountered an illegal UTF-8 continuation byte. This might + * be the initial byte of the next character; if we return a plain + * error status and the decoder is in replacement mode, the character + * will be masked. We still need to alert the caller to the error + * though. + */ + dec_ctx->codepoint = 0x0000L; + dec_ctx->needed = 0; + dec_ctx->lower = 0x80; + dec_ctx->upper = 0xbf; + return DUK__CP_RETRY; + } + } +} + +#if defined(DUK_USE_ENCODING_BUILTINS) +DUK_LOCAL void duk__utf8_encode_char(void *udata, duk_codepoint_t codepoint) { + duk__encode_context *enc_ctx; + + DUK_ASSERT(codepoint >= 0); + enc_ctx = (duk__encode_context *) udata; + DUK_ASSERT(enc_ctx != NULL); + +#if !defined(DUK_USE_PREFER_SIZE) + if (codepoint <= 0x7f && enc_ctx->lead == 0x0000L) { + /* Fast path for ASCII. */ + *enc_ctx->out++ = (duk_uint8_t) codepoint; + return; + } +#endif + + if (DUK_UNLIKELY(codepoint > 0x10ffffL)) { + /* cannot legally encode in UTF-8 */ + codepoint = DUK_UNICODE_CP_REPLACEMENT_CHARACTER; + } else if (codepoint >= 0xd800L && codepoint <= 0xdfffL) { + if (codepoint <= 0xdbffL) { + /* high surrogate */ + duk_codepoint_t prev_lead = enc_ctx->lead; + enc_ctx->lead = codepoint; + if (prev_lead == 0x0000L) { + /* high surrogate, no output */ + return; + } else { + /* consecutive high surrogates, consider first one unpaired */ + codepoint = DUK_UNICODE_CP_REPLACEMENT_CHARACTER; + } + } else { + /* low surrogate */ + if (enc_ctx->lead != 0x0000L) { + codepoint = + (duk_codepoint_t) (0x010000L + ((enc_ctx->lead - 0xd800L) << 10) + (codepoint - 0xdc00L)); + enc_ctx->lead = 0x0000L; + } else { + /* unpaired low surrogate */ + DUK_ASSERT(enc_ctx->lead == 0x0000L); + codepoint = DUK_UNICODE_CP_REPLACEMENT_CHARACTER; + } + } + } else { + if (enc_ctx->lead != 0x0000L) { + /* unpaired high surrogate: emit replacement character and the input codepoint */ + enc_ctx->lead = 0x0000L; + enc_ctx->out = duk__utf8_emit_repl(enc_ctx->out); + } + } + + /* Codepoint may be original input, a decoded surrogate pair, or may + * have been replaced with U+FFFD. + */ + enc_ctx->out += duk_unicode_encode_xutf8((duk_ucodepoint_t) codepoint, enc_ctx->out); +} +#endif /* DUK_USE_ENCODING_BUILTINS */ + +/* Shared helper for buffer-to-string using a TextDecoder() compatible UTF-8 + * decoder. + */ +DUK_LOCAL duk_ret_t duk__decode_helper(duk_hthread *thr, duk__decode_context *dec_ctx) { + const duk_uint8_t *input; + duk_size_t len = 0; + duk_size_t len_tmp; + duk_bool_t stream = 0; + duk_codepoint_t codepoint; + duk_uint8_t *output; + const duk_uint8_t *in; + duk_uint8_t *out; + + DUK_ASSERT(dec_ctx != NULL); + + /* Careful with input buffer pointer: any side effects involving + * code execution (e.g. getters, coercion calls, and finalizers) + * may cause a resize and invalidate a pointer we've read. This + * is why the pointer is actually looked up at the last minute. + * Argument validation must still happen first to match WHATWG + * required side effect order. + */ + + if (duk_is_undefined(thr, 0)) { + duk_push_fixed_buffer_nozero(thr, 0); + duk_replace(thr, 0); + } + (void) duk_require_buffer_data(thr, 0, &len); /* Need 'len', avoid pointer. */ + + if (duk_check_type_mask(thr, 1, DUK_TYPE_MASK_UNDEFINED | DUK_TYPE_MASK_NULL | DUK_TYPE_MASK_NONE)) { + /* Use defaults, treat missing value like undefined. */ + } else { + duk_require_type_mask(thr, + 1, + DUK_TYPE_MASK_UNDEFINED | DUK_TYPE_MASK_NULL | DUK_TYPE_MASK_LIGHTFUNC | + DUK_TYPE_MASK_BUFFER | DUK_TYPE_MASK_OBJECT); + if (duk_get_prop_literal(thr, 1, "stream")) { + stream = duk_to_boolean(thr, -1); + } + } + + /* Allowance is 3*len in the general case because all bytes may potentially + * become U+FFFD. If the first byte completes a non-BMP codepoint it will + * decode to a CESU-8 surrogate pair (6 bytes) so we allow 3 extra bytes to + * compensate: (1*3)+3 = 6. Non-BMP codepoints are safe otherwise because + * the 4->6 expansion is well under the 3x allowance. + * + * XXX: As with TextEncoder, need a better buffer allocation strategy here. + */ + if (len >= (DUK_HBUFFER_MAX_BYTELEN / 3) - 3) { + DUK_ERROR_TYPE(thr, DUK_STR_RESULT_TOO_LONG); + DUK_WO_NORETURN(return 0;); + } + output = + (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, 3 + (3 * len)); /* used parts will be always manually written over */ + + input = (const duk_uint8_t *) duk_get_buffer_data(thr, 0, &len_tmp); + DUK_ASSERT(input != NULL || len == 0); + if (DUK_UNLIKELY(len != len_tmp)) { + /* Very unlikely but possible: source buffer was resized by + * a side effect when fixed buffer was pushed. Output buffer + * may not be large enough to hold output, so just fail if + * length has changed. + */ + DUK_D(DUK_DPRINT("input buffer resized by side effect, fail")); + goto fail_type; + } + + /* From this point onwards it's critical that no side effect occur + * which may disturb 'input': finalizer execution, property accesses, + * active coercions, etc. Even an allocation related mark-and-sweep + * may affect the pointer because it may trigger a pending finalizer. + */ + + in = input; + out = output; + while (in < input + len) { + codepoint = duk__utf8_decode_next(dec_ctx, *in++); + if (codepoint < 0) { + if (codepoint == DUK__CP_CONTINUE) { + continue; + } + + /* Decoding error with or without retry. */ + DUK_ASSERT(codepoint == DUK__CP_ERROR || codepoint == DUK__CP_RETRY); + if (codepoint == DUK__CP_RETRY) { + --in; /* retry last byte */ + } + /* replacement mode: replace with U+FFFD */ + codepoint = DUK_UNICODE_CP_REPLACEMENT_CHARACTER; + if (dec_ctx->fatal) { + /* fatal mode: throw a TypeError */ + goto fail_type; + } + /* Continue with 'codepoint', Unicode replacement. */ + } + DUK_ASSERT(codepoint >= 0x0000L && codepoint <= 0x10ffffL); + + if (!dec_ctx->bom_handled) { + dec_ctx->bom_handled = 1; + if (codepoint == 0xfeffL && !dec_ctx->ignore_bom) { + continue; + } + } + + out += duk_unicode_encode_cesu8((duk_ucodepoint_t) codepoint, out); + DUK_ASSERT(out <= output + (3 + (3 * len))); + } + + if (!stream) { + if (dec_ctx->needed != 0) { + /* truncated sequence at end of buffer */ + if (dec_ctx->fatal) { + goto fail_type; + } else { + out += duk_unicode_encode_cesu8(DUK_UNICODE_CP_REPLACEMENT_CHARACTER, out); + DUK_ASSERT(out <= output + (3 + (3 * len))); + } + } + duk__utf8_decode_init(dec_ctx); /* Initialize decoding state for potential reuse. */ + } + + /* Output buffer is fixed and thus stable even if there had been + * side effects (which there shouldn't be). + */ + duk_push_lstring(thr, (const char *) output, (duk_size_t) (out - output)); + return 1; + +fail_type: + DUK_ERROR_TYPE(thr, DUK_STR_UTF8_DECODE_FAILED); + DUK_WO_NORETURN(return 0;); +} + +/* + * Built-in bindings + */ + +#if defined(DUK_USE_ENCODING_BUILTINS) +DUK_INTERNAL duk_ret_t duk_bi_textencoder_constructor(duk_hthread *thr) { + /* TextEncoder currently requires no persistent state, so the constructor + * does nothing on purpose. + */ + + duk_require_constructor_call(thr); + return 0; +} + +DUK_INTERNAL duk_ret_t duk_bi_textencoder_prototype_encoding_getter(duk_hthread *thr) { + duk_push_literal(thr, "utf-8"); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_textencoder_prototype_encode(duk_hthread *thr) { + duk__encode_context enc_ctx; + duk_size_t len; + duk_size_t final_len; + duk_uint8_t *output; + + DUK_ASSERT_TOP(thr, 1); + if (duk_is_undefined(thr, 0)) { + len = 0; + } else { + duk_hstring *h_input; + + h_input = duk_to_hstring(thr, 0); + DUK_ASSERT(h_input != NULL); + + len = (duk_size_t) DUK_HSTRING_GET_CHARLEN(h_input); + if (len >= DUK_HBUFFER_MAX_BYTELEN / 3) { + DUK_ERROR_TYPE(thr, DUK_STR_RESULT_TOO_LONG); + DUK_WO_NORETURN(return 0;); + } + } + + /* Allowance is 3*len because all bytes can potentially be replaced with + * U+FFFD -- which rather inconveniently encodes to 3 bytes in UTF-8. + * Rely on dynamic buffer data pointer stability: no other code has + * access to the data pointer. + * + * XXX: The buffer allocation strategy used here is rather inefficient. + * Maybe switch to a chunk-based strategy, or preprocess the string to + * figure out the space needed ahead of time? + */ + DUK_ASSERT(3 * len >= len); + output = (duk_uint8_t *) duk_push_dynamic_buffer(thr, 3 * len); + + if (len > 0) { + DUK_ASSERT(duk_is_string(thr, 0)); /* True if len > 0. */ + + /* XXX: duk_decode_string() is used to process the input + * string. For standard ECMAScript strings, represented + * internally as CESU-8, this is fine. However, behavior + * beyond CESU-8 is not very strict: codepoints using an + * extended form of UTF-8 are also accepted, and invalid + * codepoint sequences (which are allowed in Duktape strings) + * are not handled as well as they could (e.g. invalid + * continuation bytes may mask following codepoints). + * This is how ECMAScript code would also see such strings. + * Maybe replace duk_decode_string() with an explicit strict + * CESU-8 decoder here? + */ + enc_ctx.lead = 0x0000L; + enc_ctx.out = output; + duk_decode_string(thr, 0, duk__utf8_encode_char, (void *) &enc_ctx); + if (enc_ctx.lead != 0x0000L) { + /* unpaired high surrogate at end of string */ + enc_ctx.out = duk__utf8_emit_repl(enc_ctx.out); + DUK_ASSERT(enc_ctx.out <= output + (3 * len)); + } + + /* The output buffer is usually very much oversized, so shrink it to + * actually needed size. Pointer stability assumed up to this point. + */ + DUK_ASSERT_TOP(thr, 2); + DUK_ASSERT(output == (duk_uint8_t *) duk_get_buffer_data(thr, -1, NULL)); + + final_len = (duk_size_t) (enc_ctx.out - output); + duk_resize_buffer(thr, -1, final_len); + /* 'output' and 'enc_ctx.out' are potentially invalidated by the resize. */ + } else { + final_len = 0; + } + + /* Standard WHATWG output is a Uint8Array. Here the Uint8Array will + * be backed by a dynamic buffer which differs from e.g. Uint8Arrays + * created as 'new Uint8Array(N)'. ECMAScript code won't see the + * difference but C code will. When bufferobjects are not supported, + * returns a plain dynamic buffer. + */ +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + duk_push_buffer_object(thr, -1, 0, final_len, DUK_BUFOBJ_UINT8ARRAY); +#endif + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_textdecoder_constructor(duk_hthread *thr) { + duk__decode_context *dec_ctx; + duk_bool_t fatal = 0; + duk_bool_t ignore_bom = 0; + + DUK_ASSERT_TOP(thr, 2); + duk_require_constructor_call(thr); + if (!duk_is_undefined(thr, 0)) { + /* XXX: For now ignore 'label' (encoding identifier). */ + duk_to_string(thr, 0); + } + if (!duk_is_null_or_undefined(thr, 1)) { + if (duk_get_prop_literal(thr, 1, "fatal")) { + fatal = duk_to_boolean(thr, -1); + } + if (duk_get_prop_literal(thr, 1, "ignoreBOM")) { + ignore_bom = duk_to_boolean(thr, -1); + } + } + + duk_push_this(thr); + + /* The decode context is not assumed to be zeroed; all fields are + * initialized explicitly. + */ + dec_ctx = (duk__decode_context *) duk_push_fixed_buffer(thr, sizeof(duk__decode_context)); + dec_ctx->fatal = (duk_uint8_t) fatal; + dec_ctx->ignore_bom = (duk_uint8_t) ignore_bom; + duk__utf8_decode_init(dec_ctx); /* Initializes remaining fields. */ + + duk_put_prop_literal(thr, -2, DUK_INTERNAL_SYMBOL("Context")); + return 0; +} + +/* Get TextDecoder context from 'this'; leaves garbage on stack. */ +DUK_LOCAL duk__decode_context *duk__get_textdecoder_context(duk_hthread *thr) { + duk__decode_context *dec_ctx; + duk_push_this(thr); + duk_get_prop_literal(thr, -1, DUK_INTERNAL_SYMBOL("Context")); + dec_ctx = (duk__decode_context *) duk_require_buffer(thr, -1, NULL); + DUK_ASSERT(dec_ctx != NULL); + return dec_ctx; +} + +DUK_INTERNAL duk_ret_t duk_bi_textdecoder_prototype_shared_getter(duk_hthread *thr) { + duk__decode_context *dec_ctx; + duk_int_t magic; + + dec_ctx = duk__get_textdecoder_context(thr); + magic = duk_get_current_magic(thr); + switch (magic) { + case 0: + /* Encoding is now fixed, so _Context lookup is only needed to + * validate the 'this' binding (TypeError if not TextDecoder-like). + */ + duk_push_literal(thr, "utf-8"); + break; + case 1: + duk_push_boolean(thr, dec_ctx->fatal); + break; + default: + duk_push_boolean(thr, dec_ctx->ignore_bom); + break; + } + + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_textdecoder_prototype_decode(duk_hthread *thr) { + duk__decode_context *dec_ctx; + + dec_ctx = duk__get_textdecoder_context(thr); + return duk__decode_helper(thr, dec_ctx); +} +#endif /* DUK_USE_ENCODING_BUILTINS */ + +/* + * Internal helper for Node.js Buffer + */ + +/* Internal helper used for Node.js Buffer .toString(). Value stack convention + * is currently odd: it mimics TextDecoder .decode() so that argument must be at + * index 0, and decode options (not present for Buffer) at index 1. Return value + * is a Duktape/C function return value. + */ +DUK_INTERNAL duk_ret_t duk_textdecoder_decode_utf8_nodejs(duk_hthread *thr) { + duk__decode_context dec_ctx; + + dec_ctx.fatal = 0; /* use replacement chars */ + dec_ctx.ignore_bom = 1; /* ignore BOMs (matches Node.js Buffer .toString()) */ + duk__utf8_decode_init(&dec_ctx); + + return duk__decode_helper(thr, &dec_ctx); +} + +/* automatic undefs */ +#undef DUK__CP_CONTINUE +#undef DUK__CP_ERROR +#undef DUK__CP_RETRY +#line 1 "duk_bi_error.c" +/* + * Error built-ins + */ + +/* #include duk_internal.h -> already included */ + +DUK_INTERNAL duk_ret_t duk_bi_error_constructor_shared(duk_hthread *thr) { + /* Behavior for constructor and non-constructor call is + * the same except for augmenting the created error. When + * called as a constructor, the caller (duk_new()) will handle + * augmentation; when called as normal function, we need to do + * it here. + */ + + duk_small_int_t bidx_prototype = duk_get_current_magic(thr); + + /* same for both error and each subclass like TypeError */ + duk_uint_t flags_and_class = + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_ERROR); + + (void) duk_push_object_helper(thr, flags_and_class, bidx_prototype); + + /* If message is undefined, the own property 'message' is not set at + * all to save property space. An empty message is inherited anyway. + */ + if (!duk_is_undefined(thr, 0)) { + duk_to_string(thr, 0); + duk_dup_0(thr); /* [ message error message ] */ + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_MESSAGE, DUK_PROPDESC_FLAGS_WC); + } + + /* Augment the error if called as a normal function. __FILE__ and __LINE__ + * are not desirable in this case. + */ + +#if defined(DUK_USE_AUGMENT_ERROR_CREATE) + if (!duk_is_constructor_call(thr)) { + duk_err_augment_error_create(thr, thr, NULL, 0, DUK_AUGMENT_FLAG_NOBLAME_FILELINE); + } +#endif + + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_error_prototype_to_string(duk_hthread *thr) { + /* XXX: optimize with more direct internal access */ + + duk_push_this(thr); + (void) duk_require_hobject_promote_mask(thr, -1, DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + + /* [ ... this ] */ + + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_NAME); + if (duk_is_undefined(thr, -1)) { + duk_pop(thr); + duk_push_literal(thr, "Error"); + } else { + duk_to_string(thr, -1); + } + + /* [ ... this name ] */ + + /* XXX: Are steps 6 and 7 in E5 Section 15.11.4.4 duplicated by + * accident or are they actually needed? The first ToString() + * could conceivably return 'undefined'. + */ + duk_get_prop_stridx_short(thr, -2, DUK_STRIDX_MESSAGE); + if (duk_is_undefined(thr, -1)) { + duk_pop(thr); + duk_push_hstring_empty(thr); + } else { + duk_to_string(thr, -1); + } + + /* [ ... this name message ] */ + + if (duk_get_length(thr, -2) == 0) { + /* name is empty -> return message */ + return 1; + } + if (duk_get_length(thr, -1) == 0) { + /* message is empty -> return name */ + duk_pop(thr); + return 1; + } + duk_push_literal(thr, ": "); + duk_insert(thr, -2); /* ... name ': ' message */ + duk_concat(thr, 3); + + return 1; +} + +#if defined(DUK_USE_TRACEBACKS) + +/* + * Traceback handling + * + * The unified helper decodes the traceback and produces various requested + * outputs. It should be optimized for size, and may leave garbage on stack, + * only the topmost return value matters. For instance, traceback separator + * and decoded strings are pushed even when looking for filename only. + * + * NOTE: although _Tracedata is an internal property, user code can currently + * write to the array (or replace it with something other than an array). + * The code below must tolerate arbitrary _Tracedata. It can throw errors + * etc, but cannot cause a segfault or memory unsafe behavior. + */ + +/* constants arbitrary, chosen for small loads */ +#define DUK__OUTPUT_TYPE_TRACEBACK (-1) +#define DUK__OUTPUT_TYPE_FILENAME 0 +#define DUK__OUTPUT_TYPE_LINENUMBER 1 + +DUK_LOCAL duk_ret_t duk__error_getter_helper(duk_hthread *thr, duk_small_int_t output_type) { + duk_idx_t idx_td; + duk_small_int_t i; /* traceback depth fits into 16 bits */ + duk_small_int_t t; /* stack type fits into 16 bits */ + duk_small_int_t count_func = 0; /* traceback depth ensures fits into 16 bits */ + const char *str_tailcall = " tailcall"; + const char *str_strict = " strict"; + const char *str_construct = " construct"; + const char *str_prevyield = " preventsyield"; + const char *str_directeval = " directeval"; + const char *str_empty = ""; + + DUK_ASSERT_TOP(thr, 0); /* fixed arg count */ + + duk_push_this(thr); + duk_xget_owndataprop_stridx_short(thr, -1, DUK_STRIDX_INT_TRACEDATA); + idx_td = duk_get_top_index(thr); + + duk_push_hstring_stridx(thr, DUK_STRIDX_NEWLINE_4SPACE); + duk_push_this(thr); + + /* [ ... this tracedata sep this ] */ + + /* XXX: skip null filename? */ + + if (duk_check_type(thr, idx_td, DUK_TYPE_OBJECT)) { + /* Current tracedata contains 2 entries per callstack entry. */ + for (i = 0;; i += 2) { + duk_int_t pc; + duk_uint_t line; + duk_uint_t flags; + duk_double_t d; + const char *funcname; + const char *filename; + duk_hobject *h_func; + duk_hstring *h_name; + + duk_require_stack(thr, 5); + duk_get_prop_index(thr, idx_td, (duk_uarridx_t) i); + duk_get_prop_index(thr, idx_td, (duk_uarridx_t) (i + 1)); + d = duk_to_number_m1(thr); + pc = duk_double_to_int_t(DUK_FMOD(d, DUK_DOUBLE_2TO32)); + flags = duk_double_to_uint_t(DUK_FLOOR(d / DUK_DOUBLE_2TO32)); + t = (duk_small_int_t) duk_get_type(thr, -2); + + if (t == DUK_TYPE_OBJECT || t == DUK_TYPE_LIGHTFUNC) { + /* + * ECMAScript/native function call or lightfunc call + */ + + count_func++; + + /* [ ... v1(func) v2(pc+flags) ] */ + + /* These may be systematically omitted by Duktape + * with certain config options, but allow user to + * set them on a case-by-case basis. + */ + duk_get_prop_stridx_short(thr, -2, DUK_STRIDX_NAME); + duk_get_prop_stridx_short(thr, -3, DUK_STRIDX_FILE_NAME); + +#if defined(DUK_USE_PC2LINE) + line = (duk_uint_t) duk_hobject_pc2line_query(thr, -4, (duk_uint_fast32_t) pc); +#else + line = 0; +#endif + + /* [ ... v1 v2 name filename ] */ + + /* When looking for .fileName/.lineNumber, blame first + * function which has a .fileName. + */ + if (duk_is_string_notsymbol(thr, -1)) { + if (output_type == DUK__OUTPUT_TYPE_FILENAME) { + return 1; + } else if (output_type == DUK__OUTPUT_TYPE_LINENUMBER) { + duk_push_uint(thr, line); + return 1; + } + } + + /* XXX: Change 'anon' handling here too, to use empty string for anonymous functions? */ + /* XXX: Could be improved by coercing to a readable duk_tval (especially string escaping) */ + h_name = duk_get_hstring_notsymbol(thr, -2); /* may be NULL */ + funcname = (h_name == NULL || h_name == DUK_HTHREAD_STRING_EMPTY_STRING(thr)) ? + "[anon]" : + (const char *) DUK_HSTRING_GET_DATA(h_name); + filename = duk_get_string_notsymbol(thr, -1); + filename = filename ? filename : ""; + DUK_ASSERT(funcname != NULL); + DUK_ASSERT(filename != NULL); + + h_func = duk_get_hobject(thr, -4); /* NULL for lightfunc */ + + if (h_func == NULL) { + duk_push_sprintf( + thr, + "at %s light%s%s%s%s%s", + (const char *) funcname, + (const char *) ((flags & DUK_ACT_FLAG_STRICT) ? str_strict : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_TAILCALLED) ? str_tailcall : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_CONSTRUCT) ? str_construct : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_DIRECT_EVAL) ? str_directeval : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_PREVENT_YIELD) ? str_prevyield : str_empty)); + } else if (DUK_HOBJECT_HAS_NATFUNC(h_func)) { + duk_push_sprintf( + thr, + "at %s (%s) native%s%s%s%s%s", + (const char *) funcname, + (const char *) filename, + (const char *) ((flags & DUK_ACT_FLAG_STRICT) ? str_strict : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_TAILCALLED) ? str_tailcall : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_CONSTRUCT) ? str_construct : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_DIRECT_EVAL) ? str_directeval : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_PREVENT_YIELD) ? str_prevyield : str_empty)); + } else { + duk_push_sprintf( + thr, + "at %s (%s:%lu)%s%s%s%s%s", + (const char *) funcname, + (const char *) filename, + (unsigned long) line, + (const char *) ((flags & DUK_ACT_FLAG_STRICT) ? str_strict : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_TAILCALLED) ? str_tailcall : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_CONSTRUCT) ? str_construct : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_DIRECT_EVAL) ? str_directeval : str_empty), + (const char *) ((flags & DUK_ACT_FLAG_PREVENT_YIELD) ? str_prevyield : str_empty)); + } + duk_replace(thr, -5); /* [ ... v1 v2 name filename str ] -> [ ... str v2 name filename ] */ + duk_pop_3(thr); /* -> [ ... str ] */ + } else if (t == DUK_TYPE_STRING) { + const char *str_file; + + /* + * __FILE__ / __LINE__ entry, here 'pc' is line number directly. + * Sometimes __FILE__ / __LINE__ is reported as the source for + * the error (fileName, lineNumber), sometimes not. + */ + + /* [ ... v1(filename) v2(line+flags) ] */ + + /* When looking for .fileName/.lineNumber, blame compilation + * or C call site unless flagged not to do so. + */ + if (!(flags & DUK_TB_FLAG_NOBLAME_FILELINE)) { + if (output_type == DUK__OUTPUT_TYPE_FILENAME) { + duk_pop(thr); + return 1; + } else if (output_type == DUK__OUTPUT_TYPE_LINENUMBER) { + duk_push_int(thr, pc); + return 1; + } + } + + /* Tracedata is trusted but avoid any risk of using a NULL + * for %s format because it has undefined behavior. Symbols + * don't need to be explicitly rejected as they pose no memory + * safety issues. + */ + str_file = (const char *) duk_get_string(thr, -2); + duk_push_sprintf(thr, + "at [anon] (%s:%ld) internal", + (const char *) (str_file ? str_file : "null"), + (long) pc); + duk_replace(thr, -3); /* [ ... v1 v2 str ] -> [ ... str v2 ] */ + duk_pop(thr); /* -> [ ... str ] */ + } else { + /* unknown, ignore */ + duk_pop_2(thr); + break; + } + } + + if (count_func >= DUK_USE_TRACEBACK_DEPTH) { + /* Possibly truncated; there is no explicit truncation + * marker so this is the best we can do. + */ + + duk_push_hstring_stridx(thr, DUK_STRIDX_BRACKETED_ELLIPSIS); + } + } + + /* [ ... this tracedata sep this str1 ... strN ] */ + + if (output_type != DUK__OUTPUT_TYPE_TRACEBACK) { + return 0; + } else { + /* The 'this' after 'sep' will get ToString() coerced by + * duk_join() automatically. We don't want to do that + * coercion when providing .fileName or .lineNumber (GH-254). + */ + duk_join(thr, duk_get_top(thr) - (idx_td + 2) /*count, not including sep*/); + return 1; + } +} + +/* XXX: Output type could be encoded into native function 'magic' value to + * save space. For setters the stridx could be encoded into 'magic'. + */ + +DUK_INTERNAL duk_ret_t duk_bi_error_prototype_stack_getter(duk_hthread *thr) { + return duk__error_getter_helper(thr, DUK__OUTPUT_TYPE_TRACEBACK); +} + +DUK_INTERNAL duk_ret_t duk_bi_error_prototype_filename_getter(duk_hthread *thr) { + return duk__error_getter_helper(thr, DUK__OUTPUT_TYPE_FILENAME); +} + +DUK_INTERNAL duk_ret_t duk_bi_error_prototype_linenumber_getter(duk_hthread *thr) { + return duk__error_getter_helper(thr, DUK__OUTPUT_TYPE_LINENUMBER); +} + +#else /* DUK_USE_TRACEBACKS */ + +/* + * Traceback handling when tracebacks disabled. + * + * The fileName / lineNumber stubs are now necessary because built-in + * data will include the accessor properties in Error.prototype. If those + * are removed for builds without tracebacks, these can also be removed. + * 'stack' should still be present and produce a ToString() equivalent: + * this is useful for user code which prints a stacktrace and expects to + * see something useful. A normal stacktrace also begins with a ToString() + * of the error so this makes sense. + */ + +DUK_INTERNAL duk_ret_t duk_bi_error_prototype_stack_getter(duk_hthread *thr) { + /* XXX: remove this native function and map 'stack' accessor + * to the toString() implementation directly. + */ + return duk_bi_error_prototype_to_string(thr); +} + +DUK_INTERNAL duk_ret_t duk_bi_error_prototype_filename_getter(duk_hthread *thr) { + DUK_UNREF(thr); + return 0; +} + +DUK_INTERNAL duk_ret_t duk_bi_error_prototype_linenumber_getter(duk_hthread *thr) { + DUK_UNREF(thr); + return 0; +} + +#endif /* DUK_USE_TRACEBACKS */ + +DUK_LOCAL duk_ret_t duk__error_setter_helper(duk_hthread *thr, duk_small_uint_t stridx_key) { + /* Attempt to write 'stack', 'fileName', 'lineNumber' works as if + * user code called Object.defineProperty() to create an overriding + * own property. This allows user code to overwrite .fileName etc + * intuitively as e.g. "err.fileName = 'dummy'" as one might expect. + * See https://github.com/svaarala/duktape/issues/387. + */ + + DUK_ASSERT_TOP(thr, 1); /* fixed arg count: value */ + + duk_push_this(thr); + duk_push_hstring_stridx(thr, stridx_key); + duk_dup_0(thr); + + /* [ ... obj key value ] */ + + DUK_DD(DUK_DDPRINT("error setter: %!T %!T %!T", duk_get_tval(thr, -3), duk_get_tval(thr, -2), duk_get_tval(thr, -1))); + + duk_def_prop(thr, + -3, + DUK_DEFPROP_HAVE_VALUE | DUK_DEFPROP_HAVE_WRITABLE | DUK_DEFPROP_WRITABLE | + DUK_DEFPROP_HAVE_ENUMERABLE | /*not enumerable*/ + DUK_DEFPROP_HAVE_CONFIGURABLE | DUK_DEFPROP_CONFIGURABLE); + return 0; +} + +DUK_INTERNAL duk_ret_t duk_bi_error_prototype_stack_setter(duk_hthread *thr) { + return duk__error_setter_helper(thr, DUK_STRIDX_STACK); +} + +DUK_INTERNAL duk_ret_t duk_bi_error_prototype_filename_setter(duk_hthread *thr) { + return duk__error_setter_helper(thr, DUK_STRIDX_FILE_NAME); +} + +DUK_INTERNAL duk_ret_t duk_bi_error_prototype_linenumber_setter(duk_hthread *thr) { + return duk__error_setter_helper(thr, DUK_STRIDX_LINE_NUMBER); +} + +/* automatic undefs */ +#undef DUK__OUTPUT_TYPE_FILENAME +#undef DUK__OUTPUT_TYPE_LINENUMBER +#undef DUK__OUTPUT_TYPE_TRACEBACK +#line 1 "duk_bi_function.c" +/* + * Function built-ins + */ + +/* #include duk_internal.h -> already included */ + +/* Needed even when Function built-in is disabled. */ +DUK_INTERNAL duk_ret_t duk_bi_function_prototype(duk_hthread *thr) { + /* ignore arguments, return undefined (E5 Section 15.3.4) */ + DUK_UNREF(thr); + return 0; +} + +#if defined(DUK_USE_FUNCTION_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_function_constructor(duk_hthread *thr) { + duk_hstring *h_sourcecode; + duk_idx_t nargs; + duk_idx_t i; + duk_small_uint_t comp_flags; + duk_hcompfunc *func; + duk_hobject *outer_lex_env; + duk_hobject *outer_var_env; + + /* normal and constructor calls have identical semantics */ + + nargs = duk_get_top(thr); + for (i = 0; i < nargs; i++) { + duk_to_string(thr, i); /* Rejects Symbols during coercion. */ + } + + if (nargs == 0) { + duk_push_hstring_empty(thr); + duk_push_hstring_empty(thr); + } else if (nargs == 1) { + /* XXX: cover this with the generic >1 case? */ + duk_push_hstring_empty(thr); + } else { + duk_insert(thr, 0); /* [ arg1 ... argN-1 body] -> [body arg1 ... argN-1] */ + duk_push_literal(thr, ","); + duk_insert(thr, 1); + duk_join(thr, nargs - 1); + } + + /* [ body formals ], formals is comma separated list that needs to be parsed */ + + DUK_ASSERT_TOP(thr, 2); + + /* XXX: this placeholder is not always correct, but use for now. + * It will fail in corner cases; see test-dev-func-cons-args.js. + */ + duk_push_literal(thr, "function("); + duk_dup_1(thr); + duk_push_literal(thr, "){"); + duk_dup_0(thr); + duk_push_literal(thr, "\n}"); /* Newline is important to handle trailing // comment. */ + duk_concat(thr, 5); + + /* [ body formals source ] */ + + DUK_ASSERT_TOP(thr, 3); + + /* strictness is not inherited, intentional */ + comp_flags = DUK_COMPILE_FUNCEXPR; + + duk_push_hstring_stridx(thr, DUK_STRIDX_COMPILE); /* XXX: copy from caller? */ /* XXX: ignored now */ + h_sourcecode = duk_require_hstring(thr, -2); /* no symbol check needed; -2 is concat'd code */ + duk_js_compile(thr, + (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_sourcecode), + (duk_size_t) DUK_HSTRING_GET_BYTELEN(h_sourcecode), + comp_flags); + + /* Force .name to 'anonymous' (ES2015). */ + duk_push_literal(thr, "anonymous"); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_NAME, DUK_PROPDESC_FLAGS_C); + + func = (duk_hcompfunc *) duk_known_hobject(thr, -1); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC((duk_hobject *) func)); + DUK_ASSERT(DUK_HOBJECT_HAS_CONSTRUCTABLE((duk_hobject *) func)); + + /* [ body formals source template ] */ + + /* only outer_lex_env matters, as functions always get a new + * variable declaration environment. + */ + + outer_lex_env = thr->builtins[DUK_BIDX_GLOBAL_ENV]; + outer_var_env = thr->builtins[DUK_BIDX_GLOBAL_ENV]; + + duk_js_push_closure(thr, func, outer_var_env, outer_lex_env, 1 /*add_auto_proto*/); + + /* [ body formals source template closure ] */ + + return 1; +} +#endif /* DUK_USE_FUNCTION_BUILTIN */ + +#if defined(DUK_USE_FUNCTION_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_function_prototype_to_string(duk_hthread *thr) { + duk_tval *tv; + + /* + * E5 Section 15.3.4.2 places few requirements on the output of + * this function: the result is implementation dependent, must + * follow FunctionDeclaration syntax (in particular, must have a + * name even for anonymous functions or functions with empty name). + * The output does NOT need to compile into anything useful. + * + * E6 Section 19.2.3.5 changes the requirements completely: the + * result must either eval() to a functionally equivalent object + * OR eval() to a SyntaxError. + * + * We opt for the SyntaxError approach for now, with a syntax that + * mimics V8's native function syntax: + * + * 'function cos() { [native code] }' + * + * but extended with [ecmascript code], [bound code], and + * [lightfunc code]. + */ + + duk_push_this(thr); + tv = DUK_GET_TVAL_NEGIDX(thr, -1); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *obj = DUK_TVAL_GET_OBJECT(tv); + const char *func_name; + + /* Function name: missing/undefined is mapped to empty string, + * otherwise coerce to string. No handling for invalid identifier + * characters or e.g. '{' in the function name. This doesn't + * really matter as long as a SyntaxError results. Technically + * if the name contained a suitable prefix followed by '//' it + * might cause the result to parse without error. + */ + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_NAME); + if (duk_is_undefined(thr, -1)) { + func_name = ""; + } else { + func_name = duk_to_string(thr, -1); + DUK_ASSERT(func_name != NULL); + } + + if (DUK_HOBJECT_IS_COMPFUNC(obj)) { + duk_push_sprintf(thr, "function %s() { [ecmascript code] }", (const char *) func_name); + } else if (DUK_HOBJECT_IS_NATFUNC(obj)) { + duk_push_sprintf(thr, "function %s() { [native code] }", (const char *) func_name); + } else if (DUK_HOBJECT_IS_BOUNDFUNC(obj)) { + duk_push_sprintf(thr, "function %s() { [bound code] }", (const char *) func_name); + } else { + goto type_error; + } + } else if (DUK_TVAL_IS_LIGHTFUNC(tv)) { + duk_push_lightfunc_tostring(thr, tv); + } else { + goto type_error; + } + + return 1; + +type_error: + DUK_DCERROR_TYPE_INVALID_ARGS(thr); +} +#endif + +/* Always present because the native function pointer is needed in call + * handling. + */ +DUK_INTERNAL duk_ret_t duk_bi_function_prototype_call(duk_hthread *thr) { + /* .call() is dealt with in call handling by simulating its + * effects so this function is actually never called. + */ + DUK_UNREF(thr); + return DUK_RET_TYPE_ERROR; +} + +DUK_INTERNAL duk_ret_t duk_bi_function_prototype_apply(duk_hthread *thr) { + /* Like .call(), never actually called. */ + DUK_UNREF(thr); + return DUK_RET_TYPE_ERROR; +} + +DUK_INTERNAL duk_ret_t duk_bi_reflect_apply(duk_hthread *thr) { + /* Like .call(), never actually called. */ + DUK_UNREF(thr); + return DUK_RET_TYPE_ERROR; +} + +DUK_INTERNAL duk_ret_t duk_bi_reflect_construct(duk_hthread *thr) { + /* Like .call(), never actually called. */ + DUK_UNREF(thr); + return DUK_RET_TYPE_ERROR; +} + +#if defined(DUK_USE_FUNCTION_BUILTIN) +/* Create a bound function which points to a target function which may + * be bound or non-bound. If the target is bound, the argument lists + * and 'this' binding of the functions are merged and the resulting + * function points directly to the non-bound target. + */ +DUK_INTERNAL duk_ret_t duk_bi_function_prototype_bind(duk_hthread *thr) { + duk_hboundfunc *h_bound; + duk_idx_t nargs; /* bound args, not counting 'this' binding */ + duk_idx_t bound_nargs; + duk_int_t bound_len; + duk_tval *tv_prevbound; + duk_idx_t n_prevbound; + duk_tval *tv_res; + duk_tval *tv_tmp; + + /* XXX: C API call, e.g. duk_push_bound_function(thr, target_idx, nargs); */ + + /* Vararg function, careful arg handling, e.g. thisArg may not + * be present. + */ + nargs = duk_get_top(thr) - 1; /* actual args, not counting 'this' binding */ + if (nargs < 0) { + nargs++; + duk_push_undefined(thr); + } + DUK_ASSERT(nargs >= 0); + + /* Limit 'nargs' for bound functions to guarantee arithmetic + * below will never wrap. + */ + if (nargs > (duk_idx_t) DUK_HBOUNDFUNC_MAX_ARGS) { + DUK_DCERROR_RANGE_INVALID_COUNT(thr); + } + + duk_push_this(thr); + duk_require_callable(thr, -1); + + /* [ thisArg arg1 ... argN func ] (thisArg+args == nargs+1 total) */ + DUK_ASSERT_TOP(thr, nargs + 2); + + /* Create bound function object. */ + h_bound = duk_push_hboundfunc(thr); + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(&h_bound->target)); + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(&h_bound->this_binding)); + DUK_ASSERT(h_bound->args == NULL); + DUK_ASSERT(h_bound->nargs == 0); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) h_bound) == NULL); + + /* [ thisArg arg1 ... argN func boundFunc ] */ + + /* If the target is a bound function, argument lists must be + * merged. The 'this' binding closest to the target function + * wins because in call handling the 'this' gets replaced over + * and over again until we call the non-bound function. + */ + tv_prevbound = NULL; + n_prevbound = 0; + tv_tmp = DUK_GET_TVAL_POSIDX(thr, 0); + DUK_TVAL_SET_TVAL(&h_bound->this_binding, tv_tmp); + tv_tmp = DUK_GET_TVAL_NEGIDX(thr, -2); + DUK_TVAL_SET_TVAL(&h_bound->target, tv_tmp); + + if (DUK_TVAL_IS_OBJECT(tv_tmp)) { + duk_hobject *h_target; + duk_hobject *bound_proto; + + h_target = DUK_TVAL_GET_OBJECT(tv_tmp); + DUK_ASSERT(DUK_HOBJECT_IS_CALLABLE(h_target)); + + /* Internal prototype must be copied from the target. + * For lightfuncs Function.prototype is used and is already + * in place. + */ + bound_proto = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h_target); + DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, (duk_hobject *) h_bound, bound_proto); + + /* The 'strict' flag is copied to get the special [[Get]] of E5.1 + * Section 15.3.5.4 to apply when a 'caller' value is a strict bound + * function. Not sure if this is correct, because the specification + * is a bit ambiguous on this point but it would make sense. + */ + /* Strictness is inherited from target. */ + if (DUK_HOBJECT_HAS_STRICT(h_target)) { + DUK_HOBJECT_SET_STRICT((duk_hobject *) h_bound); + } + + if (DUK_HOBJECT_HAS_BOUNDFUNC(h_target)) { + duk_hboundfunc *h_boundtarget; + + h_boundtarget = (duk_hboundfunc *) (void *) h_target; + + /* The final function should always be non-bound, unless + * there's a bug in the internals. Assert for it. + */ + DUK_ASSERT(DUK_TVAL_IS_LIGHTFUNC(&h_boundtarget->target) || + (DUK_TVAL_IS_OBJECT(&h_boundtarget->target) && + DUK_HOBJECT_IS_CALLABLE(DUK_TVAL_GET_OBJECT(&h_boundtarget->target)) && + !DUK_HOBJECT_IS_BOUNDFUNC(DUK_TVAL_GET_OBJECT(&h_boundtarget->target)))); + + DUK_TVAL_SET_TVAL(&h_bound->target, &h_boundtarget->target); + DUK_TVAL_SET_TVAL(&h_bound->this_binding, &h_boundtarget->this_binding); + + tv_prevbound = h_boundtarget->args; + n_prevbound = h_boundtarget->nargs; + } + } else { + /* Lightfuncs are always strict. */ + duk_hobject *bound_proto; + + DUK_ASSERT(DUK_TVAL_IS_LIGHTFUNC(tv_tmp)); + DUK_HOBJECT_SET_STRICT((duk_hobject *) h_bound); + bound_proto = thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]; + DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, (duk_hobject *) h_bound, bound_proto); + } + + DUK_TVAL_INCREF(thr, &h_bound->target); /* old values undefined, no decref needed */ + DUK_TVAL_INCREF(thr, &h_bound->this_binding); + + bound_nargs = n_prevbound + nargs; + if (bound_nargs > (duk_idx_t) DUK_HBOUNDFUNC_MAX_ARGS) { + DUK_DCERROR_RANGE_INVALID_COUNT(thr); + } + tv_res = (duk_tval *) DUK_ALLOC_CHECKED(thr, ((duk_size_t) bound_nargs) * sizeof(duk_tval)); + DUK_ASSERT(tv_res != NULL || bound_nargs == 0); + DUK_ASSERT(h_bound->args == NULL); + DUK_ASSERT(h_bound->nargs == 0); + h_bound->args = tv_res; + h_bound->nargs = bound_nargs; + + DUK_ASSERT(n_prevbound >= 0); + duk_copy_tvals_incref(thr, tv_res, tv_prevbound, (duk_size_t) n_prevbound); + DUK_ASSERT(nargs >= 0); + duk_copy_tvals_incref(thr, tv_res + n_prevbound, DUK_GET_TVAL_POSIDX(thr, 1), (duk_size_t) nargs); + + /* [ thisArg arg1 ... argN func boundFunc ] */ + + /* Bound function 'length' property is interesting. + * For lightfuncs, simply read the virtual property. + */ + duk_get_prop_stridx_short(thr, -2, DUK_STRIDX_LENGTH); + bound_len = duk_get_int(thr, -1); /* ES2015: no coercion */ + if (bound_len < nargs) { + bound_len = 0; + } else { + bound_len -= nargs; + } + if (sizeof(duk_int_t) > 4 && bound_len > (duk_int_t) DUK_UINT32_MAX) { + bound_len = (duk_int_t) DUK_UINT32_MAX; + } + duk_pop(thr); + DUK_ASSERT(bound_len >= 0); + tv_tmp = thr->valstack_top++; + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(tv_tmp)); + DUK_ASSERT(!DUK_TVAL_NEEDS_REFCOUNT_UPDATE(tv_tmp)); + DUK_TVAL_SET_U32(tv_tmp, (duk_uint32_t) bound_len); /* in-place update, fastint */ + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_C); /* attrs in E6 Section 9.2.4 */ + + /* XXX: could these be virtual? */ + /* Caller and arguments must use the same thrower, [[ThrowTypeError]]. */ + duk_xdef_prop_stridx_thrower(thr, -1, DUK_STRIDX_CALLER); + duk_xdef_prop_stridx_thrower(thr, -1, DUK_STRIDX_LC_ARGUMENTS); + + /* Function name and fileName (non-standard). */ + duk_push_literal(thr, "bound "); /* ES2015 19.2.3.2. */ + duk_get_prop_stridx(thr, -3, DUK_STRIDX_NAME); + if (!duk_is_string_notsymbol(thr, -1)) { + /* ES2015 has requirement to check that .name of target is a string + * (also must check for Symbol); if not, targetName should be the + * empty string. ES2015 19.2.3.2. + */ + duk_pop(thr); + duk_push_hstring_empty(thr); + } + duk_concat(thr, 2); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_NAME, DUK_PROPDESC_FLAGS_C); +#if defined(DUK_USE_FUNC_FILENAME_PROPERTY) + duk_get_prop_stridx_short(thr, -2, DUK_STRIDX_FILE_NAME); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_FILE_NAME, DUK_PROPDESC_FLAGS_C); +#endif + + DUK_DDD(DUK_DDDPRINT("created bound function: %!iT", (duk_tval *) duk_get_tval(thr, -1))); + + return 1; +} +#endif /* DUK_USE_FUNCTION_BUILTIN */ + +/* %NativeFunctionPrototype% .length getter. */ +DUK_INTERNAL duk_ret_t duk_bi_native_function_length(duk_hthread *thr) { + duk_tval *tv; + duk_hnatfunc *h; + duk_int16_t func_nargs; + + tv = duk_get_borrowed_this_tval(thr); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_IS_OBJECT(tv)) { + h = (duk_hnatfunc *) DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + if (!DUK_HOBJECT_IS_NATFUNC((duk_hobject *) h)) { + goto fail_type; + } + func_nargs = h->nargs; + duk_push_int(thr, func_nargs == DUK_HNATFUNC_NARGS_VARARGS ? 0 : func_nargs); + } else if (DUK_TVAL_IS_LIGHTFUNC(tv)) { + duk_small_uint_t lf_flags; + duk_small_uint_t lf_len; + + lf_flags = DUK_TVAL_GET_LIGHTFUNC_FLAGS(tv); + lf_len = DUK_LFUNC_FLAGS_GET_LENGTH(lf_flags); + duk_push_uint(thr, lf_len); + } else { + goto fail_type; + } + return 1; + +fail_type: + DUK_DCERROR_TYPE_INVALID_ARGS(thr); +} + +/* %NativeFunctionPrototype% .name getter. */ +DUK_INTERNAL duk_ret_t duk_bi_native_function_name(duk_hthread *thr) { + duk_tval *tv; + duk_hnatfunc *h; + + tv = duk_get_borrowed_this_tval(thr); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_IS_OBJECT(tv)) { + h = (duk_hnatfunc *) DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + if (!DUK_HOBJECT_IS_NATFUNC((duk_hobject *) h)) { + goto fail_type; + } +#if 0 + duk_push_hnatfunc_name(thr, h); +#endif + duk_push_hstring_empty(thr); + } else if (DUK_TVAL_IS_LIGHTFUNC(tv)) { + duk_push_lightfunc_name(thr, tv); + } else { + goto fail_type; + } + return 1; + +fail_type: + DUK_DCERROR_TYPE_INVALID_ARGS(thr); +} + +#if defined(DUK_USE_SYMBOL_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_function_prototype_hasinstance(duk_hthread *thr) { + /* This binding: RHS, stack index 0: LHS. */ + duk_bool_t ret; + + ret = duk_js_instanceof_ordinary(thr, DUK_GET_TVAL_POSIDX(thr, 0), DUK_GET_THIS_TVAL_PTR(thr)); + duk_push_boolean(thr, ret); + return 1; +} +#endif /* DUK_USE_SYMBOL_BUILTIN */ +#line 1 "duk_bi_global.c" +/* + * Global object built-ins + */ + +/* #include duk_internal.h -> already included */ + +/* + * Encoding/decoding helpers + */ + +/* XXX: Could add fast path (for each transform callback) with direct byte + * lookups (no shifting) and no explicit check for x < 0x80 before table + * lookup. + */ + +/* Macros for creating and checking bitmasks for character encoding. + * Bit number is a bit counterintuitive, but minimizes code size. + */ +#define DUK__MKBITS(a, b, c, d, e, f, g, h) \ + ((duk_uint8_t) (((a) << 0) | ((b) << 1) | ((c) << 2) | ((d) << 3) | ((e) << 4) | ((f) << 5) | ((g) << 6) | ((h) << 7))) +#define DUK__CHECK_BITMASK(table, cp) ((table)[(cp) >> 3] & (1 << ((cp) &0x07))) + +/* E5.1 Section 15.1.3.3: uriReserved + uriUnescaped + '#' */ +DUK_LOCAL const duk_uint8_t duk__encode_uriunescaped_table[16] = { + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x00-0x0f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x10-0x1f */ + DUK__MKBITS(0, 1, 0, 1, 1, 0, 1, 1), DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), /* 0x20-0x2f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 1, 0, 1, 0, 1), /* 0x30-0x3f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), /* 0x40-0x4f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 0, 0, 0, 0, 1), /* 0x50-0x5f */ + DUK__MKBITS(0, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), /* 0x60-0x6f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 0, 0, 0, 1, 0), /* 0x70-0x7f */ +}; + +/* E5.1 Section 15.1.3.4: uriUnescaped */ +DUK_LOCAL const duk_uint8_t duk__encode_uricomponent_unescaped_table[16] = { + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x00-0x0f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x10-0x1f */ + DUK__MKBITS(0, 1, 0, 0, 0, 0, 0, 1), DUK__MKBITS(1, 1, 1, 0, 0, 1, 1, 0), /* 0x20-0x2f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 0, 0, 0, 0, 0, 0), /* 0x30-0x3f */ + DUK__MKBITS(0, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), /* 0x40-0x4f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 0, 0, 0, 0, 1), /* 0x50-0x5f */ + DUK__MKBITS(0, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), /* 0x60-0x6f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 0, 0, 0, 1, 0), /* 0x70-0x7f */ +}; + +/* E5.1 Section 15.1.3.1: uriReserved + '#' */ +DUK_LOCAL const duk_uint8_t duk__decode_uri_reserved_table[16] = { + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x00-0x0f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x10-0x1f */ + DUK__MKBITS(0, 0, 0, 1, 1, 0, 1, 0), DUK__MKBITS(0, 0, 0, 1, 1, 0, 0, 1), /* 0x20-0x2f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 1, 1, 0, 1, 0, 1), /* 0x30-0x3f */ + DUK__MKBITS(1, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x40-0x4f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x50-0x5f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x60-0x6f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x70-0x7f */ +}; + +/* E5.1 Section 15.1.3.2: empty */ +DUK_LOCAL const duk_uint8_t duk__decode_uri_component_reserved_table[16] = { + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x00-0x0f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x10-0x1f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x20-0x2f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x30-0x3f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x40-0x4f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x50-0x5f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x60-0x6f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x70-0x7f */ +}; + +#if defined(DUK_USE_SECTION_B) +/* E5.1 Section B.2.2, step 7. */ +DUK_LOCAL const duk_uint8_t duk__escape_unescaped_table[16] = { + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x00-0x0f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), /* 0x10-0x1f */ + DUK__MKBITS(0, 0, 0, 0, 0, 0, 0, 0), DUK__MKBITS(0, 0, 1, 1, 0, 1, 1, 1), /* 0x20-0x2f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 0, 0, 0, 0, 0, 0), /* 0x30-0x3f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), /* 0x40-0x4f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 0, 0, 0, 0, 1), /* 0x50-0x5f */ + DUK__MKBITS(0, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), /* 0x60-0x6f */ + DUK__MKBITS(1, 1, 1, 1, 1, 1, 1, 1), DUK__MKBITS(1, 1, 1, 0, 0, 0, 0, 0) /* 0x70-0x7f */ +}; +#endif /* DUK_USE_SECTION_B */ + +typedef struct { + duk_hthread *thr; + duk_hstring *h_str; + duk_bufwriter_ctx bw; + const duk_uint8_t *p; + const duk_uint8_t *p_start; + const duk_uint8_t *p_end; +} duk__transform_context; + +typedef void (*duk__transform_callback)(duk__transform_context *tfm_ctx, const void *udata, duk_codepoint_t cp); + +/* XXX: refactor and share with other code */ +DUK_LOCAL duk_small_int_t duk__decode_hex_escape(const duk_uint8_t *p, duk_small_int_t n) { + duk_small_int_t ch; + duk_small_int_t t = 0; + + while (n > 0) { + t = t * 16; + ch = (duk_small_int_t) duk_hex_dectab[*p++]; + if (DUK_LIKELY(ch >= 0)) { + t += ch; + } else { + return -1; + } + n--; + } + return t; +} + +DUK_LOCAL int duk__transform_helper(duk_hthread *thr, duk__transform_callback callback, const void *udata) { + duk__transform_context tfm_ctx_alloc; + duk__transform_context *tfm_ctx = &tfm_ctx_alloc; + duk_codepoint_t cp; + + tfm_ctx->thr = thr; + + tfm_ctx->h_str = duk_to_hstring(thr, 0); + DUK_ASSERT(tfm_ctx->h_str != NULL); + + DUK_BW_INIT_PUSHBUF(thr, &tfm_ctx->bw, DUK_HSTRING_GET_BYTELEN(tfm_ctx->h_str)); /* initial size guess */ + + tfm_ctx->p_start = DUK_HSTRING_GET_DATA(tfm_ctx->h_str); + tfm_ctx->p_end = tfm_ctx->p_start + DUK_HSTRING_GET_BYTELEN(tfm_ctx->h_str); + tfm_ctx->p = tfm_ctx->p_start; + + while (tfm_ctx->p < tfm_ctx->p_end) { + cp = (duk_codepoint_t) duk_unicode_decode_xutf8_checked(thr, &tfm_ctx->p, tfm_ctx->p_start, tfm_ctx->p_end); + callback(tfm_ctx, udata, cp); + } + + DUK_BW_COMPACT(thr, &tfm_ctx->bw); + + (void) duk_buffer_to_string(thr, -1); /* Safe if transform is safe. */ + return 1; +} + +DUK_LOCAL void duk__transform_callback_encode_uri(duk__transform_context *tfm_ctx, const void *udata, duk_codepoint_t cp) { + duk_uint8_t xutf8_buf[DUK_UNICODE_MAX_XUTF8_LENGTH]; + duk_small_int_t len; + duk_codepoint_t cp1, cp2; + duk_small_int_t i, t; + const duk_uint8_t *unescaped_table = (const duk_uint8_t *) udata; + + /* UTF-8 encoded bytes escaped as %xx%xx%xx... -> 3 * nbytes. + * Codepoint range is restricted so this is a slightly too large + * but doesn't matter. + */ + DUK_BW_ENSURE(tfm_ctx->thr, &tfm_ctx->bw, 3 * DUK_UNICODE_MAX_XUTF8_LENGTH); + + if (cp < 0) { + goto uri_error; + } else if ((cp < 0x80L) && DUK__CHECK_BITMASK(unescaped_table, cp)) { + DUK_BW_WRITE_RAW_U8(tfm_ctx->thr, &tfm_ctx->bw, (duk_uint8_t) cp); + return; + } else if (cp >= 0xdc00L && cp <= 0xdfffL) { + goto uri_error; + } else if (cp >= 0xd800L && cp <= 0xdbffL) { + /* Needs lookahead */ + if (duk_unicode_decode_xutf8(tfm_ctx->thr, + &tfm_ctx->p, + tfm_ctx->p_start, + tfm_ctx->p_end, + (duk_ucodepoint_t *) &cp2) == 0) { + goto uri_error; + } + if (!(cp2 >= 0xdc00L && cp2 <= 0xdfffL)) { + goto uri_error; + } + cp1 = cp; + cp = (duk_codepoint_t) (((cp1 - 0xd800L) << 10) + (cp2 - 0xdc00L) + 0x10000L); + } else if (cp > 0x10ffffL) { + /* Although we can allow non-BMP characters (they'll decode + * back into surrogate pairs), we don't allow extended UTF-8 + * characters; they would encode to URIs which won't decode + * back because of strict UTF-8 checks in URI decoding. + * (However, we could just as well allow them here.) + */ + goto uri_error; + } else { + /* Non-BMP characters within valid UTF-8 range: encode as is. + * They'll decode back into surrogate pairs if the escaped + * output is decoded. + */ + ; + } + + len = duk_unicode_encode_xutf8((duk_ucodepoint_t) cp, xutf8_buf); + for (i = 0; i < len; i++) { + t = (duk_small_int_t) xutf8_buf[i]; + DUK_BW_WRITE_RAW_U8_3(tfm_ctx->thr, + &tfm_ctx->bw, + DUK_ASC_PERCENT, + (duk_uint8_t) duk_uc_nybbles[t >> 4], + (duk_uint8_t) duk_uc_nybbles[t & 0x0f]); + } + + return; + +uri_error: + DUK_ERROR_URI(tfm_ctx->thr, DUK_STR_INVALID_INPUT); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL void duk__transform_callback_decode_uri(duk__transform_context *tfm_ctx, const void *udata, duk_codepoint_t cp) { + const duk_uint8_t *reserved_table = (const duk_uint8_t *) udata; + duk_small_uint_t utf8_blen; + duk_codepoint_t min_cp; + duk_small_int_t t; /* must be signed */ + duk_small_uint_t i; + + /* Maximum write size: XUTF8 path writes max DUK_UNICODE_MAX_XUTF8_LENGTH, + * percent escape path writes max two times CESU-8 encoded BMP length. + */ + DUK_BW_ENSURE(tfm_ctx->thr, + &tfm_ctx->bw, + (DUK_UNICODE_MAX_XUTF8_LENGTH >= 2 * DUK_UNICODE_MAX_CESU8_BMP_LENGTH ? DUK_UNICODE_MAX_XUTF8_LENGTH : + DUK_UNICODE_MAX_CESU8_BMP_LENGTH)); + + if (cp == (duk_codepoint_t) '%') { + const duk_uint8_t *p = tfm_ctx->p; + duk_size_t left = (duk_size_t) (tfm_ctx->p_end - p); /* bytes left */ + + DUK_DDD(DUK_DDDPRINT("percent encoding, left=%ld", (long) left)); + + if (left < 2) { + goto uri_error; + } + + t = duk__decode_hex_escape(p, 2); + DUK_DDD(DUK_DDDPRINT("first byte: %ld", (long) t)); + if (t < 0) { + goto uri_error; + } + + if (t < 0x80) { + if (DUK__CHECK_BITMASK(reserved_table, t)) { + /* decode '%xx' to '%xx' if decoded char in reserved set */ + DUK_ASSERT(tfm_ctx->p - 1 >= tfm_ctx->p_start); + DUK_BW_WRITE_RAW_U8_3(tfm_ctx->thr, &tfm_ctx->bw, DUK_ASC_PERCENT, p[0], p[1]); + } else { + DUK_BW_WRITE_RAW_U8(tfm_ctx->thr, &tfm_ctx->bw, (duk_uint8_t) t); + } + tfm_ctx->p += 2; + return; + } + + /* Decode UTF-8 codepoint from a sequence of hex escapes. The + * first byte of the sequence has been decoded to 't'. + * + * Note that UTF-8 validation must be strict according to the + * specification: E5.1 Section 15.1.3, decode algorithm step + * 4.d.vii.8. URIError from non-shortest encodings is also + * specifically noted in the spec. + */ + + DUK_ASSERT(t >= 0x80); + if (t < 0xc0) { + /* continuation byte */ + goto uri_error; + } else if (t < 0xe0) { + /* 110x xxxx; 2 bytes */ + utf8_blen = 2; + min_cp = 0x80L; + cp = t & 0x1f; + } else if (t < 0xf0) { + /* 1110 xxxx; 3 bytes */ + utf8_blen = 3; + min_cp = 0x800L; + cp = t & 0x0f; + } else if (t < 0xf8) { + /* 1111 0xxx; 4 bytes */ + utf8_blen = 4; + min_cp = 0x10000L; + cp = t & 0x07; + } else { + /* extended utf-8 not allowed for URIs */ + goto uri_error; + } + + if (left < utf8_blen * 3 - 1) { + /* '%xx%xx...%xx', p points to char after first '%' */ + goto uri_error; + } + + p += 3; + for (i = 1; i < utf8_blen; i++) { + /* p points to digit part ('%xy', p points to 'x') */ + t = duk__decode_hex_escape(p, 2); + DUK_DDD(DUK_DDDPRINT("i=%ld utf8_blen=%ld cp=%ld t=0x%02lx", + (long) i, + (long) utf8_blen, + (long) cp, + (unsigned long) t)); + if (t < 0) { + goto uri_error; + } + if ((t & 0xc0) != 0x80) { + goto uri_error; + } + cp = (cp << 6) + (t & 0x3f); + p += 3; + } + p--; /* p overshoots */ + tfm_ctx->p = p; + + DUK_DDD(DUK_DDDPRINT("final cp=%ld, min_cp=%ld", (long) cp, (long) min_cp)); + + if (cp < min_cp || cp > 0x10ffffL || (cp >= 0xd800L && cp <= 0xdfffL)) { + goto uri_error; + } + + /* The E5.1 algorithm checks whether or not a decoded codepoint + * is below 0x80 and perhaps may be in the "reserved" set. + * This seems pointless because the single byte UTF-8 case is + * handled separately, and non-shortest encodings are rejected. + * So, 'cp' cannot be below 0x80 here, and thus cannot be in + * the reserved set. + */ + + /* utf-8 validation ensures these */ + DUK_ASSERT(cp >= 0x80L && cp <= 0x10ffffL); + + if (cp >= 0x10000L) { + cp -= 0x10000L; + DUK_ASSERT(cp < 0x100000L); + + DUK_BW_WRITE_RAW_XUTF8(tfm_ctx->thr, &tfm_ctx->bw, ((cp >> 10) + 0xd800L)); + DUK_BW_WRITE_RAW_XUTF8(tfm_ctx->thr, &tfm_ctx->bw, ((cp & 0x03ffL) + 0xdc00L)); + } else { + DUK_BW_WRITE_RAW_XUTF8(tfm_ctx->thr, &tfm_ctx->bw, cp); + } + } else { + DUK_BW_WRITE_RAW_XUTF8(tfm_ctx->thr, &tfm_ctx->bw, cp); + } + return; + +uri_error: + DUK_ERROR_URI(tfm_ctx->thr, DUK_STR_INVALID_INPUT); + DUK_WO_NORETURN(return;); +} + +#if defined(DUK_USE_SECTION_B) +DUK_LOCAL void duk__transform_callback_escape(duk__transform_context *tfm_ctx, const void *udata, duk_codepoint_t cp) { + DUK_UNREF(udata); + + DUK_BW_ENSURE(tfm_ctx->thr, &tfm_ctx->bw, 6); + + if (cp < 0) { + goto esc_error; + } else if ((cp < 0x80L) && DUK__CHECK_BITMASK(duk__escape_unescaped_table, cp)) { + DUK_BW_WRITE_RAW_U8(tfm_ctx->thr, &tfm_ctx->bw, (duk_uint8_t) cp); + } else if (cp < 0x100L) { + DUK_BW_WRITE_RAW_U8_3(tfm_ctx->thr, + &tfm_ctx->bw, + (duk_uint8_t) DUK_ASC_PERCENT, + (duk_uint8_t) duk_uc_nybbles[cp >> 4], + (duk_uint8_t) duk_uc_nybbles[cp & 0x0f]); + } else if (cp < 0x10000L) { + DUK_BW_WRITE_RAW_U8_6(tfm_ctx->thr, + &tfm_ctx->bw, + (duk_uint8_t) DUK_ASC_PERCENT, + (duk_uint8_t) DUK_ASC_LC_U, + (duk_uint8_t) duk_uc_nybbles[cp >> 12], + (duk_uint8_t) duk_uc_nybbles[(cp >> 8) & 0x0f], + (duk_uint8_t) duk_uc_nybbles[(cp >> 4) & 0x0f], + (duk_uint8_t) duk_uc_nybbles[cp & 0x0f]); + } else { + /* Characters outside BMP cannot be escape()'d. We could + * encode them as surrogate pairs (for codepoints inside + * valid UTF-8 range, but not extended UTF-8). Because + * escape() and unescape() are legacy functions, we don't. + */ + goto esc_error; + } + + return; + +esc_error: + DUK_ERROR_TYPE(tfm_ctx->thr, DUK_STR_INVALID_INPUT); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL void duk__transform_callback_unescape(duk__transform_context *tfm_ctx, const void *udata, duk_codepoint_t cp) { + duk_small_int_t t; + + DUK_UNREF(udata); + + if (cp == (duk_codepoint_t) '%') { + const duk_uint8_t *p = tfm_ctx->p; + duk_size_t left = (duk_size_t) (tfm_ctx->p_end - p); /* bytes left */ + + if (left >= 5 && p[0] == 'u' && ((t = duk__decode_hex_escape(p + 1, 4)) >= 0)) { + cp = (duk_codepoint_t) t; + tfm_ctx->p += 5; + } else if (left >= 2 && ((t = duk__decode_hex_escape(p, 2)) >= 0)) { + cp = (duk_codepoint_t) t; + tfm_ctx->p += 2; + } + } + + DUK_BW_WRITE_ENSURE_XUTF8(tfm_ctx->thr, &tfm_ctx->bw, cp); +} +#endif /* DUK_USE_SECTION_B */ + +/* + * Eval + * + * Eval needs to handle both a "direct eval" and an "indirect eval". + * Direct eval handling needs access to the caller's activation so that its + * lexical environment can be accessed. A direct eval is only possible from + * ECMAScript code; an indirect eval call is possible also from C code. + * When an indirect eval call is made from C code, there may not be a + * calling activation at all which needs careful handling. + */ + +DUK_INTERNAL duk_ret_t duk_bi_global_object_eval(duk_hthread *thr) { + duk_hstring *h; + duk_activation *act_caller; + duk_activation *act_eval; + duk_hcompfunc *func; + duk_hobject *outer_lex_env; + duk_hobject *outer_var_env; + duk_bool_t this_to_global = 1; + duk_small_uint_t comp_flags; + duk_int_t level = -2; + duk_small_uint_t call_flags; + + DUK_ASSERT(duk_get_top(thr) == 1 || duk_get_top(thr) == 2); /* 2 when called by debugger */ + DUK_ASSERT(thr->callstack_top >= 1); /* at least this function exists */ + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT((thr->callstack_curr->flags & DUK_ACT_FLAG_DIRECT_EVAL) == 0 || /* indirect eval */ + (thr->callstack_top >= 2)); /* if direct eval, calling activation must exist */ + + /* + * callstack_top - 1 --> this function + * callstack_top - 2 --> caller (may not exist) + * + * If called directly from C, callstack_top might be 1. If calling + * activation doesn't exist, call must be indirect. + */ + + h = duk_get_hstring_notsymbol(thr, 0); + if (!h) { + /* Symbol must be returned as is, like any non-string values. */ + return 1; /* return arg as-is */ + } + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + /* NOTE: level is used only by the debugger and should never be present + * for an ECMAScript eval(). + */ + DUK_ASSERT(level == -2); /* by default, use caller's environment */ + if (duk_get_top(thr) >= 2 && duk_is_number(thr, 1)) { + level = duk_get_int(thr, 1); + } + DUK_ASSERT(level <= -2); /* This is guaranteed by debugger code. */ +#endif + + /* [ source ] */ + + comp_flags = DUK_COMPILE_EVAL; + act_eval = thr->callstack_curr; /* this function */ + DUK_ASSERT(act_eval != NULL); + act_caller = duk_hthread_get_activation_for_level(thr, level); + if (act_caller != NULL) { + /* Have a calling activation, check for direct eval (otherwise + * assume indirect eval. + */ + if ((act_caller->flags & DUK_ACT_FLAG_STRICT) && (act_eval->flags & DUK_ACT_FLAG_DIRECT_EVAL)) { + /* Only direct eval inherits strictness from calling code + * (E5.1 Section 10.1.1). + */ + comp_flags |= DUK_COMPILE_STRICT; + } + } else { + DUK_ASSERT((act_eval->flags & DUK_ACT_FLAG_DIRECT_EVAL) == 0); + } + + duk_push_hstring_stridx(thr, DUK_STRIDX_INPUT); /* XXX: copy from caller? */ + duk_js_compile(thr, (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h), (duk_size_t) DUK_HSTRING_GET_BYTELEN(h), comp_flags); + func = (duk_hcompfunc *) duk_known_hobject(thr, -1); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC((duk_hobject *) func)); + + /* [ source template ] */ + + /* E5 Section 10.4.2 */ + + if (act_eval->flags & DUK_ACT_FLAG_DIRECT_EVAL) { + DUK_ASSERT(thr->callstack_top >= 2); + DUK_ASSERT(act_caller != NULL); + if (act_caller->lex_env == NULL) { + DUK_ASSERT(act_caller->var_env == NULL); + DUK_DDD(DUK_DDDPRINT("delayed environment initialization")); + + /* this may have side effects, so re-lookup act */ + duk_js_init_activation_environment_records_delayed(thr, act_caller); + } + DUK_ASSERT(act_caller->lex_env != NULL); + DUK_ASSERT(act_caller->var_env != NULL); + + this_to_global = 0; + + if (DUK_HOBJECT_HAS_STRICT((duk_hobject *) func)) { + duk_hdecenv *new_env; + duk_hobject *act_lex_env; + + DUK_DDD(DUK_DDDPRINT("direct eval call to a strict function -> " + "var_env and lex_env to a fresh env, " + "this_binding to caller's this_binding")); + + act_lex_env = act_caller->lex_env; + + new_env = + duk_hdecenv_alloc(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_DECENV)); + DUK_ASSERT(new_env != NULL); + duk_push_hobject(thr, (duk_hobject *) new_env); + + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) new_env) == NULL); + DUK_HOBJECT_SET_PROTOTYPE(thr->heap, (duk_hobject *) new_env, act_lex_env); + DUK_HOBJECT_INCREF_ALLOWNULL(thr, act_lex_env); + DUK_DDD(DUK_DDDPRINT("new_env allocated: %!iO", (duk_heaphdr *) new_env)); + + outer_lex_env = (duk_hobject *) new_env; + outer_var_env = (duk_hobject *) new_env; + + duk_insert(thr, 0); /* stash to bottom of value stack to keep new_env reachable for duration of eval */ + + /* compiler's responsibility */ + DUK_ASSERT(DUK_HOBJECT_HAS_NEWENV((duk_hobject *) func)); + } else { + DUK_DDD(DUK_DDDPRINT("direct eval call to a non-strict function -> " + "var_env and lex_env to caller's envs, " + "this_binding to caller's this_binding")); + + outer_lex_env = act_caller->lex_env; + outer_var_env = act_caller->var_env; + + /* compiler's responsibility */ + DUK_ASSERT(!DUK_HOBJECT_HAS_NEWENV((duk_hobject *) func)); + } + } else { + DUK_DDD(DUK_DDDPRINT("indirect eval call -> var_env and lex_env to " + "global object, this_binding to global object")); + + this_to_global = 1; + outer_lex_env = thr->builtins[DUK_BIDX_GLOBAL_ENV]; + outer_var_env = thr->builtins[DUK_BIDX_GLOBAL_ENV]; + } + + /* Eval code doesn't need an automatic .prototype object. */ + duk_js_push_closure(thr, func, outer_var_env, outer_lex_env, 0 /*add_auto_proto*/); + + /* [ env? source template closure ] */ + + if (this_to_global) { + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL] != NULL); + duk_push_hobject_bidx(thr, DUK_BIDX_GLOBAL); + } else { + duk_tval *tv; + DUK_ASSERT(thr->callstack_top >= 2); + DUK_ASSERT(act_caller != NULL); + tv = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + act_caller->bottom_byteoff - + sizeof(duk_tval)); /* this is just beneath bottom */ + DUK_ASSERT(tv >= thr->valstack); + duk_push_tval(thr, tv); + } + + DUK_DDD(DUK_DDDPRINT("eval -> lex_env=%!iO, var_env=%!iO, this_binding=%!T", + (duk_heaphdr *) outer_lex_env, + (duk_heaphdr *) outer_var_env, + duk_get_tval(thr, -1))); + + /* [ env? source template closure this ] */ + + call_flags = 0; + if (act_eval->flags & DUK_ACT_FLAG_DIRECT_EVAL) { + /* Set DIRECT_EVAL flag for the call; it's not strictly + * needed for the 'inner' eval call (the eval body) but + * current new.target implementation expects to find it + * so it can traverse direct eval chains up to the real + * calling function. + */ + call_flags |= DUK_CALL_FLAG_DIRECT_EVAL; + } + duk_handle_call_unprotected_nargs(thr, 0, call_flags); + + /* [ env? source template result ] */ + + return 1; +} + +/* + * Parsing of ints and floats + */ + +#if defined(DUK_USE_GLOBAL_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_global_object_parse_int(duk_hthread *thr) { + duk_int32_t radix; + duk_small_uint_t s2n_flags; + + DUK_ASSERT_TOP(thr, 2); + duk_to_string(thr, 0); /* Reject symbols. */ + + radix = duk_to_int32(thr, 1); + + /* While parseInt() recognizes 0xdeadbeef, it doesn't recognize + * ES2015 0o123 or 0b10001. + */ + s2n_flags = DUK_S2N_FLAG_TRIM_WHITE | DUK_S2N_FLAG_ALLOW_GARBAGE | DUK_S2N_FLAG_ALLOW_PLUS | DUK_S2N_FLAG_ALLOW_MINUS | + DUK_S2N_FLAG_ALLOW_LEADING_ZERO | DUK_S2N_FLAG_ALLOW_AUTO_HEX_INT; + + /* Specification stripPrefix maps to DUK_S2N_FLAG_ALLOW_AUTO_HEX_INT. + * + * Don't autodetect octals (from leading zeroes), require user code to + * provide an explicit radix 8 for parsing octal. See write-up from Mozilla: + * https://developer.mozilla.org/en-US/docs/Web/JavaScript/Reference/Global_Objects/parseInt#ECMAScript_5_Removes_Octal_Interpretation + */ + + if (radix != 0) { + if (radix < 2 || radix > 36) { + goto ret_nan; + } + if (radix != 16) { + s2n_flags &= ~DUK_S2N_FLAG_ALLOW_AUTO_HEX_INT; + } + } else { + radix = 10; + } + + duk_dup_0(thr); + duk_numconv_parse(thr, (duk_small_int_t) radix, s2n_flags); + return 1; + +ret_nan: + duk_push_nan(thr); + return 1; +} +#endif /* DUK_USE_GLOBAL_BUILTIN */ + +#if defined(DUK_USE_GLOBAL_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_global_object_parse_float(duk_hthread *thr) { + duk_small_uint_t s2n_flags; + + DUK_ASSERT_TOP(thr, 1); + duk_to_string(thr, 0); /* Reject symbols. */ + + /* XXX: check flags */ + s2n_flags = DUK_S2N_FLAG_TRIM_WHITE | DUK_S2N_FLAG_ALLOW_EXP | DUK_S2N_FLAG_ALLOW_GARBAGE | DUK_S2N_FLAG_ALLOW_PLUS | + DUK_S2N_FLAG_ALLOW_MINUS | DUK_S2N_FLAG_ALLOW_INF | DUK_S2N_FLAG_ALLOW_FRAC | DUK_S2N_FLAG_ALLOW_NAKED_FRAC | + DUK_S2N_FLAG_ALLOW_EMPTY_FRAC | DUK_S2N_FLAG_ALLOW_LEADING_ZERO; + + duk_numconv_parse(thr, 10 /*radix*/, s2n_flags); + return 1; +} +#endif /* DUK_USE_GLOBAL_BUILTIN */ + +/* + * Number checkers + */ + +#if defined(DUK_USE_GLOBAL_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_global_object_is_nan(duk_hthread *thr) { + duk_double_t d = duk_to_number(thr, 0); + duk_push_boolean(thr, (duk_bool_t) DUK_ISNAN(d)); + return 1; +} +#endif /* DUK_USE_GLOBAL_BUILTIN */ + +#if defined(DUK_USE_GLOBAL_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_global_object_is_finite(duk_hthread *thr) { + duk_double_t d = duk_to_number(thr, 0); + duk_push_boolean(thr, (duk_bool_t) DUK_ISFINITE(d)); + return 1; +} +#endif /* DUK_USE_GLOBAL_BUILTIN */ + +/* + * URI handling + */ + +#if defined(DUK_USE_GLOBAL_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_global_object_decode_uri(duk_hthread *thr) { + return duk__transform_helper(thr, duk__transform_callback_decode_uri, (const void *) duk__decode_uri_reserved_table); +} + +DUK_INTERNAL duk_ret_t duk_bi_global_object_decode_uri_component(duk_hthread *thr) { + return duk__transform_helper(thr, + duk__transform_callback_decode_uri, + (const void *) duk__decode_uri_component_reserved_table); +} + +DUK_INTERNAL duk_ret_t duk_bi_global_object_encode_uri(duk_hthread *thr) { + return duk__transform_helper(thr, duk__transform_callback_encode_uri, (const void *) duk__encode_uriunescaped_table); +} + +DUK_INTERNAL duk_ret_t duk_bi_global_object_encode_uri_component(duk_hthread *thr) { + return duk__transform_helper(thr, + duk__transform_callback_encode_uri, + (const void *) duk__encode_uricomponent_unescaped_table); +} + +#if defined(DUK_USE_SECTION_B) +DUK_INTERNAL duk_ret_t duk_bi_global_object_escape(duk_hthread *thr) { + return duk__transform_helper(thr, duk__transform_callback_escape, (const void *) NULL); +} + +DUK_INTERNAL duk_ret_t duk_bi_global_object_unescape(duk_hthread *thr) { + return duk__transform_helper(thr, duk__transform_callback_unescape, (const void *) NULL); +} +#endif /* DUK_USE_SECTION_B */ +#endif /* DUK_USE_GLOBAL_BUILTIN */ + +/* automatic undefs */ +#undef DUK__CHECK_BITMASK +#undef DUK__MKBITS +#line 1 "duk_bi_json.c" +/* + * JSON built-ins. + * + * See doc/json.rst. + * + * Codepoints are handled as duk_uint_fast32_t to ensure that the full + * unsigned 32-bit range is supported. This matters to e.g. JX. + * + * Input parsing doesn't do an explicit end-of-input check at all. This is + * safe: input string data is always NUL-terminated (0x00) and valid JSON + * inputs never contain plain NUL characters, so that as long as syntax checks + * are correct, we'll never read past the NUL. This approach reduces code size + * and improves parsing performance, but it's critical that syntax checks are + * indeed correct! + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_JSON_SUPPORT) + +/* + * Local defines and forward declarations. + */ + +#define DUK__JSON_DECSTR_BUFSIZE 128 +#define DUK__JSON_DECSTR_CHUNKSIZE 64 +#define DUK__JSON_ENCSTR_CHUNKSIZE 64 +#define DUK__JSON_STRINGIFY_BUFSIZE 128 +#define DUK__JSON_MAX_ESC_LEN 10 /* '\Udeadbeef' */ + +DUK_LOCAL_DECL void duk__json_dec_syntax_error(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL void duk__json_dec_eat_white(duk_json_dec_ctx *js_ctx); +#if defined(DUK_USE_JX) +DUK_LOCAL_DECL duk_uint8_t duk__json_dec_peek(duk_json_dec_ctx *js_ctx); +#endif +DUK_LOCAL_DECL duk_uint8_t duk__json_dec_get(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL duk_uint8_t duk__json_dec_get_nonwhite(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL duk_uint_fast32_t duk__json_dec_decode_hex_escape(duk_json_dec_ctx *js_ctx, duk_small_uint_t n); +DUK_LOCAL_DECL void duk__json_dec_req_stridx(duk_json_dec_ctx *js_ctx, duk_small_uint_t stridx); +DUK_LOCAL_DECL void duk__json_dec_string(duk_json_dec_ctx *js_ctx); +#if defined(DUK_USE_JX) +DUK_LOCAL_DECL void duk__json_dec_plain_string(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL void duk__json_dec_pointer(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL void duk__json_dec_buffer(duk_json_dec_ctx *js_ctx); +#endif +DUK_LOCAL_DECL void duk__json_dec_number(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL void duk__json_dec_objarr_entry(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL void duk__json_dec_objarr_exit(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL void duk__json_dec_object(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL void duk__json_dec_array(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL void duk__json_dec_value(duk_json_dec_ctx *js_ctx); +DUK_LOCAL_DECL void duk__json_dec_reviver_walk(duk_json_dec_ctx *js_ctx); + +DUK_LOCAL_DECL void duk__emit_1(duk_json_enc_ctx *js_ctx, duk_uint_fast8_t ch); +DUK_LOCAL_DECL void duk__emit_2(duk_json_enc_ctx *js_ctx, duk_uint_fast8_t ch1, duk_uint_fast8_t ch2); +DUK_LOCAL_DECL void duk__unemit_1(duk_json_enc_ctx *js_ctx); +DUK_LOCAL_DECL void duk__emit_hstring(duk_json_enc_ctx *js_ctx, duk_hstring *h); +#if defined(DUK_USE_FASTINT) +DUK_LOCAL_DECL void duk__emit_cstring(duk_json_enc_ctx *js_ctx, const char *p); +#endif +DUK_LOCAL_DECL void duk__emit_stridx(duk_json_enc_ctx *js_ctx, duk_small_uint_t stridx); +DUK_LOCAL_DECL duk_uint8_t *duk__emit_esc_auto_fast(duk_json_enc_ctx *js_ctx, duk_uint_fast32_t cp, duk_uint8_t *q); +DUK_LOCAL_DECL void duk__json_enc_key_autoquote(duk_json_enc_ctx *js_ctx, duk_hstring *k); +DUK_LOCAL_DECL void duk__json_enc_quote_string(duk_json_enc_ctx *js_ctx, duk_hstring *h_str); +DUK_LOCAL_DECL void duk__json_enc_objarr_entry(duk_json_enc_ctx *js_ctx, duk_idx_t *entry_top); +DUK_LOCAL_DECL void duk__json_enc_objarr_exit(duk_json_enc_ctx *js_ctx, duk_idx_t *entry_top); +DUK_LOCAL_DECL void duk__json_enc_object(duk_json_enc_ctx *js_ctx); +DUK_LOCAL_DECL void duk__json_enc_array(duk_json_enc_ctx *js_ctx); +DUK_LOCAL_DECL duk_bool_t duk__json_enc_value(duk_json_enc_ctx *js_ctx, duk_idx_t idx_holder); +DUK_LOCAL_DECL duk_bool_t duk__json_enc_allow_into_proplist(duk_tval *tv); +DUK_LOCAL_DECL void duk__json_enc_double(duk_json_enc_ctx *js_ctx); +#if defined(DUK_USE_FASTINT) +DUK_LOCAL_DECL void duk__json_enc_fastint_tval(duk_json_enc_ctx *js_ctx, duk_tval *tv); +#endif +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) +DUK_LOCAL_DECL void duk__json_enc_buffer_jx_jc(duk_json_enc_ctx *js_ctx, duk_hbuffer *h); +DUK_LOCAL_DECL void duk__json_enc_pointer(duk_json_enc_ctx *js_ctx, void *ptr); +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_LOCAL_DECL void duk__json_enc_bufobj(duk_json_enc_ctx *js_ctx, duk_hbufobj *h_bufobj); +#endif +#endif +#if defined(DUK_USE_JSON_STRINGIFY_FASTPATH) +DUK_LOCAL_DECL void duk__json_enc_buffer_json_fastpath(duk_json_enc_ctx *js_ctx, duk_hbuffer *h); +#endif +DUK_LOCAL_DECL void duk__json_enc_newline_indent(duk_json_enc_ctx *js_ctx, duk_uint_t depth); + +/* + * Helper tables + */ + +#if defined(DUK_USE_JSON_QUOTESTRING_FASTPATH) +DUK_LOCAL const duk_uint8_t duk__json_quotestr_lookup[256] = { + /* 0x00 ... 0x7f: as is + * 0x80: escape generically + * 0x81: slow path + * 0xa0 ... 0xff: backslash + one char + */ + + 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0xe2, 0xf4, 0xee, 0x80, 0xe6, 0xf2, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, + 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x20, 0x21, 0xa2, 0x23, 0x24, 0x25, 0x26, 0x27, + 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, + 0x3c, 0x3d, 0x3e, 0x3f, 0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, + 0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a, 0x5b, 0xdc, 0x5d, 0x5e, 0x5f, 0x60, 0x61, 0x62, 0x63, + 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, + 0x78, 0x79, 0x7a, 0x7b, 0x7c, 0x7d, 0x7e, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, + 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, + 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, + 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, + 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, + 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, + 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81 +}; +#else /* DUK_USE_JSON_QUOTESTRING_FASTPATH */ +DUK_LOCAL const duk_uint8_t duk__json_quotestr_esc[14] = { DUK_ASC_NUL, DUK_ASC_NUL, DUK_ASC_NUL, DUK_ASC_NUL, DUK_ASC_NUL, + DUK_ASC_NUL, DUK_ASC_NUL, DUK_ASC_NUL, DUK_ASC_LC_B, DUK_ASC_LC_T, + DUK_ASC_LC_N, DUK_ASC_NUL, DUK_ASC_LC_F, DUK_ASC_LC_R }; +#endif /* DUK_USE_JSON_QUOTESTRING_FASTPATH */ + +#if defined(DUK_USE_JSON_DECSTRING_FASTPATH) +DUK_LOCAL const duk_uint8_t duk__json_decstr_lookup[256] = { + /* 0x00: slow path + * other: as is + */ + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x20, 0x21, 0x00, 0x23, 0x24, 0x25, 0x26, 0x27, + 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, + 0x3c, 0x3d, 0x3e, 0x3f, 0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, + 0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a, 0x5b, 0x00, 0x5d, 0x5e, 0x5f, 0x60, 0x61, 0x62, 0x63, + 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, + 0x78, 0x79, 0x7a, 0x7b, 0x7c, 0x7d, 0x7e, 0x7f, 0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89, 0x8a, 0x8b, + 0x8c, 0x8d, 0x8e, 0x8f, 0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98, 0x99, 0x9a, 0x9b, 0x9c, 0x9d, 0x9e, 0x9f, + 0xa0, 0xa1, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 0xa7, 0xa8, 0xa9, 0xaa, 0xab, 0xac, 0xad, 0xae, 0xaf, 0xb0, 0xb1, 0xb2, 0xb3, + 0xb4, 0xb5, 0xb6, 0xb7, 0xb8, 0xb9, 0xba, 0xbb, 0xbc, 0xbd, 0xbe, 0xbf, 0xc0, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, + 0xc8, 0xc9, 0xca, 0xcb, 0xcc, 0xcd, 0xce, 0xcf, 0xd0, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0xd7, 0xd8, 0xd9, 0xda, 0xdb, + 0xdc, 0xdd, 0xde, 0xdf, 0xe0, 0xe1, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9, 0xea, 0xeb, 0xec, 0xed, 0xee, 0xef, + 0xf0, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 0xf8, 0xf9, 0xfa, 0xfb, 0xfc, 0xfd, 0xfe, 0xff +}; +#endif /* DUK_USE_JSON_DECSTRING_FASTPATH */ + +#if defined(DUK_USE_JSON_EATWHITE_FASTPATH) +DUK_LOCAL const duk_uint8_t duk__json_eatwhite_lookup[256] = { + /* 0x00: finish (non-white) + * 0x01: continue + */ + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0x01, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 +}; +#endif /* DUK_USE_JSON_EATWHITE_FASTPATH */ + +#if defined(DUK_USE_JSON_DECNUMBER_FASTPATH) +DUK_LOCAL const duk_uint8_t duk__json_decnumber_lookup[256] = { + /* 0x00: finish (not part of number) + * 0x01: continue + */ + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x01, 0x00, 0x01, 0x01, 0x00, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 +}; +#endif /* DUK_USE_JSON_DECNUMBER_FASTPATH */ + +/* + * Parsing implementation. + * + * JSON lexer is now separate from duk_lexer.c because there are numerous + * small differences making it difficult to share the lexer. + * + * The parser here works with raw bytes directly; this works because all + * JSON delimiters are ASCII characters. Invalid xUTF-8 encoded values + * inside strings will be passed on without normalization; this is not a + * compliance concern because compliant inputs will always be valid + * CESU-8 encodings. + */ + +DUK_LOCAL void duk__json_dec_syntax_error(duk_json_dec_ctx *js_ctx) { + /* Shared handler to minimize parser size. Cause will be + * hidden, unfortunately, but we'll have an offset which + * is often quite enough. + */ + DUK_ERROR_FMT1(js_ctx->thr, DUK_ERR_SYNTAX_ERROR, DUK_STR_FMT_INVALID_JSON, (long) (js_ctx->p - js_ctx->p_start)); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL void duk__json_dec_eat_white(duk_json_dec_ctx *js_ctx) { + const duk_uint8_t *p; + duk_uint8_t t; + + p = js_ctx->p; + for (;;) { + DUK_ASSERT(p <= js_ctx->p_end); + t = *p; + +#if defined(DUK_USE_JSON_EATWHITE_FASTPATH) + /* This fast path is pretty marginal in practice. + * XXX: candidate for removal. + */ + DUK_ASSERT(duk__json_eatwhite_lookup[0x00] == 0x00); /* end-of-input breaks */ + if (duk__json_eatwhite_lookup[t] == 0) { + break; + } +#else /* DUK_USE_JSON_EATWHITE_FASTPATH */ + if (!(t == 0x20 || t == 0x0a || t == 0x0d || t == 0x09)) { + /* NUL also comes here. Comparison order matters, 0x20 + * is most common whitespace. + */ + break; + } +#endif /* DUK_USE_JSON_EATWHITE_FASTPATH */ + p++; + } + js_ctx->p = p; +} + +#if defined(DUK_USE_JX) +DUK_LOCAL duk_uint8_t duk__json_dec_peek(duk_json_dec_ctx *js_ctx) { + DUK_ASSERT(js_ctx->p <= js_ctx->p_end); + return *js_ctx->p; +} +#endif + +DUK_LOCAL duk_uint8_t duk__json_dec_get(duk_json_dec_ctx *js_ctx) { + DUK_ASSERT(js_ctx->p <= js_ctx->p_end); + return *js_ctx->p++; +} + +DUK_LOCAL duk_uint8_t duk__json_dec_get_nonwhite(duk_json_dec_ctx *js_ctx) { + duk__json_dec_eat_white(js_ctx); + return duk__json_dec_get(js_ctx); +} + +/* For JX, expressing the whole unsigned 32-bit range matters. */ +DUK_LOCAL duk_uint_fast32_t duk__json_dec_decode_hex_escape(duk_json_dec_ctx *js_ctx, duk_small_uint_t n) { + duk_small_uint_t i; + duk_uint_fast32_t res = 0; + duk_uint8_t x; + duk_small_int_t t; + + for (i = 0; i < n; i++) { + /* XXX: share helper from lexer; duk_lexer.c / hexval(). */ + + x = duk__json_dec_get(js_ctx); + DUK_DDD(DUK_DDDPRINT("decode_hex_escape: i=%ld, n=%ld, res=%ld, x=%ld", (long) i, (long) n, (long) res, (long) x)); + + /* x == 0x00 (EOF) causes syntax_error */ + DUK_ASSERT(duk_hex_dectab[0] == -1); + t = duk_hex_dectab[x & 0xff]; + if (DUK_LIKELY(t >= 0)) { + res = (res * 16) + (duk_uint_fast32_t) t; + } else { + /* catches EOF and invalid digits */ + goto syntax_error; + } + } + + DUK_DDD(DUK_DDDPRINT("final hex decoded value: %ld", (long) res)); + return res; + +syntax_error: + duk__json_dec_syntax_error(js_ctx); + DUK_UNREACHABLE(); + return 0; +} + +DUK_LOCAL void duk__json_dec_req_stridx(duk_json_dec_ctx *js_ctx, duk_small_uint_t stridx) { + duk_hstring *h; + const duk_uint8_t *p; + duk_uint8_t x, y; + + /* First character has already been eaten and checked by the caller. + * We can scan until a NUL in stridx string because no built-in strings + * have internal NULs. + */ + + DUK_ASSERT_STRIDX_VALID(stridx); + h = DUK_HTHREAD_GET_STRING(js_ctx->thr, stridx); + DUK_ASSERT(h != NULL); + + p = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h) + 1; + DUK_ASSERT(*(js_ctx->p - 1) == *(p - 1)); /* first character has been matched */ + + for (;;) { + x = *p; + if (x == 0) { + break; + } + y = duk__json_dec_get(js_ctx); + if (x != y) { + /* Catches EOF of JSON input. */ + goto syntax_error; + } + p++; + } + + return; + +syntax_error: + duk__json_dec_syntax_error(js_ctx); + DUK_UNREACHABLE(); +} + +DUK_LOCAL duk_small_int_t duk__json_dec_string_escape(duk_json_dec_ctx *js_ctx, duk_uint8_t **ext_p) { + duk_uint_fast32_t cp; + + /* EOF (-1) will be cast to an unsigned value first + * and then re-cast for the switch. In any case, it + * will match the default case (syntax error). + */ + cp = (duk_uint_fast32_t) duk__json_dec_get(js_ctx); + switch (cp) { + case DUK_ASC_BACKSLASH: + break; + case DUK_ASC_DOUBLEQUOTE: + break; + case DUK_ASC_SLASH: + break; + case DUK_ASC_LC_T: + cp = 0x09; + break; + case DUK_ASC_LC_N: + cp = 0x0a; + break; + case DUK_ASC_LC_R: + cp = 0x0d; + break; + case DUK_ASC_LC_F: + cp = 0x0c; + break; + case DUK_ASC_LC_B: + cp = 0x08; + break; + case DUK_ASC_LC_U: { + cp = duk__json_dec_decode_hex_escape(js_ctx, 4); + break; + } +#if defined(DUK_USE_JX) + case DUK_ASC_UC_U: { + if (js_ctx->flag_ext_custom) { + cp = duk__json_dec_decode_hex_escape(js_ctx, 8); + } else { + return 1; /* syntax error */ + } + break; + } + case DUK_ASC_LC_X: { + if (js_ctx->flag_ext_custom) { + cp = duk__json_dec_decode_hex_escape(js_ctx, 2); + } else { + return 1; /* syntax error */ + } + break; + } +#endif /* DUK_USE_JX */ + default: + /* catches EOF (0x00) */ + return 1; /* syntax error */ + } + + DUK_RAW_WRITEINC_XUTF8(*ext_p, cp); + + return 0; +} + +DUK_LOCAL void duk__json_dec_string(duk_json_dec_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + duk_bufwriter_ctx bw_alloc; + duk_bufwriter_ctx *bw; + duk_uint8_t *q; + + /* '"' was eaten by caller */ + + /* Note that we currently parse -bytes-, not codepoints. + * All non-ASCII extended UTF-8 will encode to bytes >= 0x80, + * so they'll simply pass through (valid UTF-8 or not). + */ + + bw = &bw_alloc; + DUK_BW_INIT_PUSHBUF(js_ctx->thr, bw, DUK__JSON_DECSTR_BUFSIZE); + q = DUK_BW_GET_PTR(js_ctx->thr, bw); + +#if defined(DUK_USE_JSON_DECSTRING_FASTPATH) + for (;;) { + duk_small_uint_t safe; + duk_uint8_t b, x; + const duk_uint8_t *p; + + /* Select a safe loop count where no output checks are + * needed assuming we won't encounter escapes. Input + * bound checks are not necessary as a NUL (guaranteed) + * will cause a SyntaxError before we read out of bounds. + */ + + safe = DUK__JSON_DECSTR_CHUNKSIZE; + + /* Ensure space for 1:1 output plus one escape. */ + q = DUK_BW_ENSURE_RAW(js_ctx->thr, bw, safe + DUK_UNICODE_MAX_XUTF8_LENGTH, q); + + p = js_ctx->p; /* temp copy, write back for next loop */ + for (;;) { + if (safe == 0) { + js_ctx->p = p; + break; + } + safe--; + + /* End of input (NUL) goes through slow path and causes SyntaxError. */ + DUK_ASSERT(duk__json_decstr_lookup[0] == 0x00); + + b = *p++; + x = (duk_small_int_t) duk__json_decstr_lookup[b]; + if (DUK_LIKELY(x != 0)) { + /* Fast path, decode as is. */ + *q++ = b; + } else if (b == DUK_ASC_DOUBLEQUOTE) { + js_ctx->p = p; + goto found_quote; + } else if (b == DUK_ASC_BACKSLASH) { + /* We've ensured space for one escaped input; then + * bail out and recheck (this makes escape handling + * quite slow but it's uncommon). + */ + js_ctx->p = p; + if (duk__json_dec_string_escape(js_ctx, &q) != 0) { + goto syntax_error; + } + break; + } else { + js_ctx->p = p; + goto syntax_error; + } + } + } +found_quote: +#else /* DUK_USE_JSON_DECSTRING_FASTPATH */ + for (;;) { + duk_uint8_t x; + + q = DUK_BW_ENSURE_RAW(js_ctx->thr, bw, DUK_UNICODE_MAX_XUTF8_LENGTH, q); + + x = duk__json_dec_get(js_ctx); + + if (x == DUK_ASC_DOUBLEQUOTE) { + break; + } else if (x == DUK_ASC_BACKSLASH) { + if (duk__json_dec_string_escape(js_ctx, &q) != 0) { + goto syntax_error; + } + } else if (x < 0x20) { + /* catches EOF (NUL) */ + goto syntax_error; + } else { + *q++ = (duk_uint8_t) x; + } + } +#endif /* DUK_USE_JSON_DECSTRING_FASTPATH */ + + DUK_BW_SETPTR_AND_COMPACT(js_ctx->thr, bw, q); + (void) duk_buffer_to_string(thr, -1); /* Safe if input string is safe. */ + + /* [ ... str ] */ + + return; + +syntax_error: + duk__json_dec_syntax_error(js_ctx); + DUK_UNREACHABLE(); +} + +#if defined(DUK_USE_JX) +/* Decode a plain string consisting entirely of identifier characters. + * Used to parse plain keys (e.g. "foo: 123"). + */ +DUK_LOCAL void duk__json_dec_plain_string(duk_json_dec_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + const duk_uint8_t *p; + duk_small_int_t x; + + /* Caller has already eaten the first char so backtrack one byte. */ + + js_ctx->p--; /* safe */ + p = js_ctx->p; + + /* Here again we parse bytes, and non-ASCII UTF-8 will cause end of + * parsing (which is correct except if there are non-shortest encodings). + * There is also no need to check explicitly for end of input buffer as + * the input is NUL padded and NUL will exit the parsing loop. + * + * Because no unescaping takes place, we can just scan to the end of the + * plain string and intern from the input buffer. + */ + + for (;;) { + x = *p; + + /* There is no need to check the first character specially here + * (i.e. reject digits): the caller only accepts valid initial + * characters and won't call us if the first character is a digit. + * This also ensures that the plain string won't be empty. + */ + + if (!duk_unicode_is_identifier_part((duk_codepoint_t) x)) { + break; + } + p++; + } + + duk_push_lstring(thr, (const char *) js_ctx->p, (duk_size_t) (p - js_ctx->p)); + js_ctx->p = p; + + /* [ ... str ] */ +} +#endif /* DUK_USE_JX */ + +#if defined(DUK_USE_JX) +DUK_LOCAL void duk__json_dec_pointer(duk_json_dec_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + const duk_uint8_t *p; + duk_small_int_t x; + void *voidptr; + + /* Caller has already eaten the first character ('(') which we don't need. */ + + p = js_ctx->p; + + for (;;) { + x = *p; + + /* Assume that the native representation never contains a closing + * parenthesis. + */ + + if (x == DUK_ASC_RPAREN) { + break; + } else if (x <= 0) { + /* NUL term or -1 (EOF), NUL check would suffice */ + goto syntax_error; + } + p++; + } + + /* There is no need to NUL delimit the sscanf() call: trailing garbage is + * ignored and there is always a NUL terminator which will force an error + * if no error is encountered before it. It's possible that the scan + * would scan further than between [js_ctx->p,p[ though and we'd advance + * by less than the scanned value. + * + * Because pointers are platform specific, a failure to scan a pointer + * results in a null pointer which is a better placeholder than a missing + * value or an error. + */ + + voidptr = NULL; + (void) DUK_SSCANF((const char *) js_ctx->p, DUK_STR_FMT_PTR, &voidptr); + duk_push_pointer(thr, voidptr); + js_ctx->p = p + 1; /* skip ')' */ + + /* [ ... ptr ] */ + + return; + +syntax_error: + duk__json_dec_syntax_error(js_ctx); + DUK_UNREACHABLE(); +} +#endif /* DUK_USE_JX */ + +#if defined(DUK_USE_JX) +DUK_LOCAL void duk__json_dec_buffer(duk_json_dec_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + const duk_uint8_t *p; + duk_uint8_t *buf; + duk_size_t src_len; + duk_small_int_t x; + + /* Caller has already eaten the first character ('|') which we don't need. */ + + p = js_ctx->p; + + /* XXX: Would be nice to share the fast path loop from duk_hex_decode() + * and avoid creating a temporary buffer. However, there are some + * differences which prevent trivial sharing: + * + * - Pipe char detection + * - EOF detection + * - Unknown length of input and output + * + * The best approach here would be a bufwriter and a reasonaly sized + * safe inner loop (e.g. 64 output bytes at a time). + */ + + for (;;) { + x = *p; + + /* This loop intentionally does not ensure characters are valid + * ([0-9a-fA-F]) because the hex decode call below will do that. + */ + if (x == DUK_ASC_PIPE) { + break; + } else if (x <= 0) { + /* NUL term or -1 (EOF), NUL check would suffice */ + goto syntax_error; + } + p++; + } + + /* XXX: this is not very nice; unnecessary copy is made. */ + src_len = (duk_size_t) (p - js_ctx->p); + buf = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, src_len); + DUK_ASSERT(buf != NULL); + duk_memcpy((void *) buf, (const void *) js_ctx->p, src_len); + duk_hex_decode(thr, -1); + + js_ctx->p = p + 1; /* skip '|' */ + + /* [ ... buf ] */ + + return; + +syntax_error: + duk__json_dec_syntax_error(js_ctx); + DUK_UNREACHABLE(); +} +#endif /* DUK_USE_JX */ + +/* Parse a number, other than NaN or +/- Infinity */ +DUK_LOCAL void duk__json_dec_number(duk_json_dec_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + const duk_uint8_t *p_start; + const duk_uint8_t *p; + duk_uint8_t x; + duk_small_uint_t s2n_flags; + + DUK_DDD(DUK_DDDPRINT("parse_number")); + + p_start = js_ctx->p; + + /* First pass parse is very lenient (e.g. allows '1.2.3') and extracts a + * string for strict number parsing. + */ + + p = js_ctx->p; + for (;;) { + x = *p; + + DUK_DDD(DUK_DDDPRINT("parse_number: p_start=%p, p=%p, p_end=%p, x=%ld", + (const void *) p_start, + (const void *) p, + (const void *) js_ctx->p_end, + (long) x)); + +#if defined(DUK_USE_JSON_DECNUMBER_FASTPATH) + /* This fast path is pretty marginal in practice. + * XXX: candidate for removal. + */ + DUK_ASSERT(duk__json_decnumber_lookup[0x00] == 0x00); /* end-of-input breaks */ + if (duk__json_decnumber_lookup[x] == 0) { + break; + } +#else /* DUK_USE_JSON_DECNUMBER_FASTPATH */ + if (!((x >= DUK_ASC_0 && x <= DUK_ASC_9) || + (x == DUK_ASC_PERIOD || x == DUK_ASC_LC_E || x == DUK_ASC_UC_E || x == DUK_ASC_MINUS || x == DUK_ASC_PLUS))) { + /* Plus sign must be accepted for positive exponents + * (e.g. '1.5e+2'). This clause catches NULs. + */ + break; + } +#endif /* DUK_USE_JSON_DECNUMBER_FASTPATH */ + p++; /* safe, because matched (NUL causes a break) */ + } + js_ctx->p = p; + + DUK_ASSERT(js_ctx->p > p_start); + duk_push_lstring(thr, (const char *) p_start, (duk_size_t) (p - p_start)); + + s2n_flags = DUK_S2N_FLAG_ALLOW_EXP | DUK_S2N_FLAG_ALLOW_MINUS | /* but don't allow leading plus */ + DUK_S2N_FLAG_ALLOW_FRAC; + + DUK_DDD(DUK_DDDPRINT("parse_number: string before parsing: %!T", (duk_tval *) duk_get_tval(thr, -1))); + duk_numconv_parse(thr, 10 /*radix*/, s2n_flags); + if (duk_is_nan(thr, -1)) { + duk__json_dec_syntax_error(js_ctx); + } + DUK_ASSERT(duk_is_number(thr, -1)); + DUK_DDD(DUK_DDDPRINT("parse_number: final number: %!T", (duk_tval *) duk_get_tval(thr, -1))); + + /* [ ... num ] */ +} + +DUK_LOCAL void duk__json_dec_objarr_entry(duk_json_dec_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + duk_require_stack(thr, DUK_JSON_DEC_REQSTACK); + + /* c recursion check */ + + duk_native_stack_check(thr); + + DUK_ASSERT_DISABLE(js_ctx->recursion_depth >= 0); /* unsigned */ + DUK_ASSERT(js_ctx->recursion_depth <= js_ctx->recursion_limit); + if (js_ctx->recursion_depth >= js_ctx->recursion_limit) { + DUK_ERROR_RANGE(thr, DUK_STR_DEC_RECLIMIT); + DUK_WO_NORETURN(return;); + } + js_ctx->recursion_depth++; +} + +DUK_LOCAL void duk__json_dec_objarr_exit(duk_json_dec_ctx *js_ctx) { + /* c recursion check */ + + DUK_ASSERT(js_ctx->recursion_depth > 0); + DUK_ASSERT(js_ctx->recursion_depth <= js_ctx->recursion_limit); + js_ctx->recursion_depth--; +} + +DUK_LOCAL void duk__json_dec_object(duk_json_dec_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + duk_int_t key_count; /* XXX: a "first" flag would suffice */ + duk_uint8_t x; + + DUK_DDD(DUK_DDDPRINT("parse_object")); + + duk__json_dec_objarr_entry(js_ctx); + + duk_push_object(thr); + + /* Initial '{' has been checked and eaten by caller. */ + + key_count = 0; + for (;;) { + x = duk__json_dec_get_nonwhite(js_ctx); + + DUK_DDD(DUK_DDDPRINT("parse_object: obj=%!T, x=%ld, key_count=%ld", + (duk_tval *) duk_get_tval(thr, -1), + (long) x, + (long) key_count)); + + /* handle comma and closing brace */ + + if (x == DUK_ASC_COMMA && key_count > 0) { + /* accept comma, expect new value */ + x = duk__json_dec_get_nonwhite(js_ctx); + } else if (x == DUK_ASC_RCURLY) { + /* eat closing brace */ + break; + } else if (key_count == 0) { + /* accept anything, expect first value (EOF will be + * caught by key parsing below. + */ + ; + } else { + /* catches EOF (NUL) and initial comma */ + goto syntax_error; + } + + /* parse key and value */ + + if (x == DUK_ASC_DOUBLEQUOTE) { + duk__json_dec_string(js_ctx); +#if defined(DUK_USE_JX) + } else if (js_ctx->flag_ext_custom && duk_unicode_is_identifier_start((duk_codepoint_t) x)) { + duk__json_dec_plain_string(js_ctx); +#endif + } else { + goto syntax_error; + } + + /* [ ... obj key ] */ + + x = duk__json_dec_get_nonwhite(js_ctx); + if (x != DUK_ASC_COLON) { + goto syntax_error; + } + + duk__json_dec_value(js_ctx); + + /* [ ... obj key val ] */ + + duk_xdef_prop_wec(thr, -3); + + /* [ ... obj ] */ + + key_count++; + } + + /* [ ... obj ] */ + + DUK_DDD(DUK_DDDPRINT("parse_object: final object is %!T", (duk_tval *) duk_get_tval(thr, -1))); + + duk__json_dec_objarr_exit(js_ctx); + return; + +syntax_error: + duk__json_dec_syntax_error(js_ctx); + DUK_UNREACHABLE(); +} + +DUK_LOCAL void duk__json_dec_array(duk_json_dec_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + duk_uarridx_t arr_idx; + duk_uint8_t x; + + DUK_DDD(DUK_DDDPRINT("parse_array")); + + duk__json_dec_objarr_entry(js_ctx); + + duk_push_array(thr); + + /* Initial '[' has been checked and eaten by caller. */ + + arr_idx = 0; + for (;;) { + x = duk__json_dec_get_nonwhite(js_ctx); + + DUK_DDD(DUK_DDDPRINT("parse_array: arr=%!T, x=%ld, arr_idx=%ld", + (duk_tval *) duk_get_tval(thr, -1), + (long) x, + (long) arr_idx)); + + /* handle comma and closing bracket */ + + if ((x == DUK_ASC_COMMA) && (arr_idx != 0)) { + /* accept comma, expect new value */ + ; + } else if (x == DUK_ASC_RBRACKET) { + /* eat closing bracket */ + break; + } else if (arr_idx == 0) { + /* accept anything, expect first value (EOF will be + * caught by duk__json_dec_value() below. + */ + js_ctx->p--; /* backtrack (safe) */ + } else { + /* catches EOF (NUL) and initial comma */ + goto syntax_error; + } + + /* parse value */ + + duk__json_dec_value(js_ctx); + + /* [ ... arr val ] */ + + duk_xdef_prop_index_wec(thr, -2, arr_idx); + arr_idx++; + } + + /* Must set 'length' explicitly when using duk_xdef_prop_xxx() to + * set the values. + */ + + duk_set_length(thr, -1, arr_idx); + + /* [ ... arr ] */ + + DUK_DDD(DUK_DDDPRINT("parse_array: final array is %!T", (duk_tval *) duk_get_tval(thr, -1))); + + duk__json_dec_objarr_exit(js_ctx); + return; + +syntax_error: + duk__json_dec_syntax_error(js_ctx); + DUK_UNREACHABLE(); +} + +DUK_LOCAL void duk__json_dec_value(duk_json_dec_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + duk_uint8_t x; + + x = duk__json_dec_get_nonwhite(js_ctx); + + DUK_DDD(DUK_DDDPRINT("parse_value: initial x=%ld", (long) x)); + + /* Note: duk__json_dec_req_stridx() backtracks one char */ + + if (x == DUK_ASC_DOUBLEQUOTE) { + duk__json_dec_string(js_ctx); + } else if ((x >= DUK_ASC_0 && x <= DUK_ASC_9) || (x == DUK_ASC_MINUS)) { +#if defined(DUK_USE_JX) + if (js_ctx->flag_ext_custom && x == DUK_ASC_MINUS && duk__json_dec_peek(js_ctx) == DUK_ASC_UC_I) { + duk__json_dec_req_stridx(js_ctx, DUK_STRIDX_MINUS_INFINITY); /* "-Infinity", '-' has been eaten */ + duk_push_number(thr, -DUK_DOUBLE_INFINITY); + } else { +#else + { /* unconditional block */ +#endif + /* We already ate 'x', so backup one byte. */ + js_ctx->p--; /* safe */ + duk__json_dec_number(js_ctx); + } + } else if (x == DUK_ASC_LC_T) { + duk__json_dec_req_stridx(js_ctx, DUK_STRIDX_TRUE); + duk_push_true(thr); + } else if (x == DUK_ASC_LC_F) { + duk__json_dec_req_stridx(js_ctx, DUK_STRIDX_FALSE); + duk_push_false(thr); + } else if (x == DUK_ASC_LC_N) { + duk__json_dec_req_stridx(js_ctx, DUK_STRIDX_LC_NULL); + duk_push_null(thr); +#if defined(DUK_USE_JX) + } else if (js_ctx->flag_ext_custom && x == DUK_ASC_LC_U) { + duk__json_dec_req_stridx(js_ctx, DUK_STRIDX_LC_UNDEFINED); + duk_push_undefined(thr); + } else if (js_ctx->flag_ext_custom && x == DUK_ASC_UC_N) { + duk__json_dec_req_stridx(js_ctx, DUK_STRIDX_NAN); + duk_push_nan(thr); + } else if (js_ctx->flag_ext_custom && x == DUK_ASC_UC_I) { + duk__json_dec_req_stridx(js_ctx, DUK_STRIDX_INFINITY); + duk_push_number(thr, DUK_DOUBLE_INFINITY); + } else if (js_ctx->flag_ext_custom && x == DUK_ASC_LPAREN) { + duk__json_dec_pointer(js_ctx); + } else if (js_ctx->flag_ext_custom && x == DUK_ASC_PIPE) { + duk__json_dec_buffer(js_ctx); +#endif + } else if (x == DUK_ASC_LCURLY) { + duk__json_dec_object(js_ctx); + } else if (x == DUK_ASC_LBRACKET) { + duk__json_dec_array(js_ctx); + } else { + /* catches EOF (NUL) */ + goto syntax_error; + } + + duk__json_dec_eat_white(js_ctx); + + /* [ ... val ] */ + return; + +syntax_error: + duk__json_dec_syntax_error(js_ctx); + DUK_UNREACHABLE(); +} + +/* Recursive value reviver, implements the Walk() algorithm. The parsing + * step ensures there is a reasonable depth limit to the input. However, + * the reviver may create more depth by editing object or array entries, so + * we have both C recursion limit and native stack checks here. + */ +DUK_LOCAL void duk__json_dec_reviver_walk(duk_json_dec_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + duk_hobject *h; + duk_uarridx_t i, arr_len; + + duk__json_dec_objarr_entry(js_ctx); + + DUK_DDD(DUK_DDDPRINT("walk: top=%ld, holder=%!T, name=%!T", + (long) duk_get_top(thr), + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + + duk_dup_top(thr); + duk_get_prop(thr, -3); /* -> [ ... holder name val ] */ + + h = duk_get_hobject(thr, -1); + if (h != NULL) { + if (duk_js_isarray_hobject(h)) { + arr_len = (duk_uarridx_t) duk_get_length(thr, -1); + for (i = 0; i < arr_len; i++) { + /* [ ... holder name val ] */ + + DUK_DDD(DUK_DDDPRINT("walk: array, top=%ld, i=%ld, arr_len=%ld, holder=%!T, name=%!T, val=%!T", + (long) duk_get_top(thr), + (long) i, + (long) arr_len, + (duk_tval *) duk_get_tval(thr, -3), + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + + duk_dup_top(thr); + (void) duk_push_uint_to_hstring(thr, + (duk_uint_t) i); /* -> [ ... holder name val val ToString(i) ] */ + duk__json_dec_reviver_walk(js_ctx); /* -> [ ... holder name val new_elem ] */ + + if (duk_is_undefined(thr, -1)) { + duk_pop(thr); + duk_del_prop_index(thr, -1, i); + } else { + /* XXX: duk_xdef_prop_index_wec() would be more appropriate + * here but it currently makes some assumptions that might + * not hold (e.g. that previous property is not an accessor). + */ + duk_put_prop_index(thr, -2, i); + } + } + } else { + /* [ ... holder name val ] */ + duk_enum(thr, -1, DUK_ENUM_OWN_PROPERTIES_ONLY /*flags*/); + while (duk_next(thr, -1 /*enum_index*/, 0 /*get_value*/)) { + DUK_DDD(DUK_DDDPRINT("walk: object, top=%ld, holder=%!T, name=%!T, val=%!T, enum=%!iT, obj_key=%!T", + (long) duk_get_top(thr), + (duk_tval *) duk_get_tval(thr, -5), + (duk_tval *) duk_get_tval(thr, -4), + (duk_tval *) duk_get_tval(thr, -3), + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + + /* [ ... holder name val enum obj_key ] */ + duk_dup_m3(thr); + duk_dup_m2(thr); + + /* [ ... holder name val enum obj_key val obj_key ] */ + duk__json_dec_reviver_walk(js_ctx); + + /* [ ... holder name val enum obj_key new_elem ] */ + if (duk_is_undefined(thr, -1)) { + duk_pop(thr); + duk_del_prop(thr, -3); + } else { + /* XXX: duk_xdef_prop_index_wec() would be more appropriate + * here but it currently makes some assumptions that might + * not hold (e.g. that previous property is not an accessor). + * + * Using duk_put_prop() works incorrectly with '__proto__' + * if the own property with that name has been deleted. This + * does not happen normally, but a clever reviver can trigger + * that, see complex reviver case in: test-bug-json-parse-__proto__.js. + */ + duk_put_prop(thr, -4); + } + } + duk_pop(thr); /* pop enum */ + } + } + + /* [ ... holder name val ] */ + + duk_dup(thr, js_ctx->idx_reviver); + duk_insert(thr, -4); /* -> [ ... reviver holder name val ] */ + duk_call_method(thr, 2); /* -> [ ... res ] */ + + duk__json_dec_objarr_exit(js_ctx); + + DUK_DDD(DUK_DDDPRINT("walk: top=%ld, result=%!T", (long) duk_get_top(thr), (duk_tval *) duk_get_tval(thr, -1))); +} + +/* + * Stringify implementation. + */ + +#define DUK__EMIT_1(js_ctx, ch) duk__emit_1((js_ctx), (duk_uint_fast8_t) (ch)) +#define DUK__EMIT_2(js_ctx, ch1, ch2) duk__emit_2((js_ctx), (duk_uint_fast8_t) (ch1), (duk_uint_fast8_t) (ch2)) +#define DUK__EMIT_HSTR(js_ctx, h) duk__emit_hstring((js_ctx), (h)) +#if defined(DUK_USE_FASTINT) || defined(DUK_USE_JX) || defined(DUK_USE_JC) +#define DUK__EMIT_CSTR(js_ctx, p) duk__emit_cstring((js_ctx), (p)) +#endif +#define DUK__EMIT_STRIDX(js_ctx, i) duk__emit_stridx((js_ctx), (i)) +#define DUK__UNEMIT_1(js_ctx) duk__unemit_1((js_ctx)) + +DUK_LOCAL void duk__emit_1(duk_json_enc_ctx *js_ctx, duk_uint_fast8_t ch) { + DUK_BW_WRITE_ENSURE_U8(js_ctx->thr, &js_ctx->bw, ch); +} + +DUK_LOCAL void duk__emit_2(duk_json_enc_ctx *js_ctx, duk_uint_fast8_t ch1, duk_uint_fast8_t ch2) { + DUK_BW_WRITE_ENSURE_U8_2(js_ctx->thr, &js_ctx->bw, ch1, ch2); +} + +DUK_LOCAL void duk__emit_hstring(duk_json_enc_ctx *js_ctx, duk_hstring *h) { + DUK_BW_WRITE_ENSURE_HSTRING(js_ctx->thr, &js_ctx->bw, h); +} + +#if defined(DUK_USE_FASTINT) || defined(DUK_USE_JX) || defined(DUK_USE_JC) +DUK_LOCAL void duk__emit_cstring(duk_json_enc_ctx *js_ctx, const char *str) { + DUK_BW_WRITE_ENSURE_CSTRING(js_ctx->thr, &js_ctx->bw, str); +} +#endif + +DUK_LOCAL void duk__emit_stridx(duk_json_enc_ctx *js_ctx, duk_small_uint_t stridx) { + duk_hstring *h; + + DUK_ASSERT_STRIDX_VALID(stridx); + h = DUK_HTHREAD_GET_STRING(js_ctx->thr, stridx); + DUK_ASSERT(h != NULL); + + DUK_BW_WRITE_ENSURE_HSTRING(js_ctx->thr, &js_ctx->bw, h); +} + +DUK_LOCAL void duk__unemit_1(duk_json_enc_ctx *js_ctx) { + DUK_ASSERT(DUK_BW_GET_SIZE(js_ctx->thr, &js_ctx->bw) >= 1); + DUK_BW_ADD_PTR(js_ctx->thr, &js_ctx->bw, -1); +} + +#define DUK__MKESC(nybbles, esc1, esc2) \ + (((duk_uint_fast32_t) (nybbles)) << 16) | (((duk_uint_fast32_t) (esc1)) << 8) | ((duk_uint_fast32_t) (esc2)) + +DUK_LOCAL duk_uint8_t *duk__emit_esc_auto_fast(duk_json_enc_ctx *js_ctx, duk_uint_fast32_t cp, duk_uint8_t *q) { + duk_uint_fast32_t tmp; + duk_small_uint_t dig; + + DUK_UNREF(js_ctx); + + /* Caller ensures space for at least DUK__JSON_MAX_ESC_LEN. */ + + /* Select appropriate escape format automatically, and set 'tmp' to a + * value encoding both the escape format character and the nybble count: + * + * (nybble_count << 16) | (escape_char1) | (escape_char2) + */ + +#if defined(DUK_USE_JX) + if (DUK_LIKELY(cp < 0x100UL)) { + if (DUK_UNLIKELY(js_ctx->flag_ext_custom != 0U)) { + tmp = DUK__MKESC(2, DUK_ASC_BACKSLASH, DUK_ASC_LC_X); + } else { + tmp = DUK__MKESC(4, DUK_ASC_BACKSLASH, DUK_ASC_LC_U); + } + } else +#endif + if (DUK_LIKELY(cp < 0x10000UL)) { + tmp = DUK__MKESC(4, DUK_ASC_BACKSLASH, DUK_ASC_LC_U); + } else { +#if defined(DUK_USE_JX) + if (DUK_LIKELY(js_ctx->flag_ext_custom != 0U)) { + tmp = DUK__MKESC(8, DUK_ASC_BACKSLASH, DUK_ASC_UC_U); + } else +#endif + { + /* In compatible mode and standard JSON mode, output + * something useful for non-BMP characters. This won't + * roundtrip but will still be more or less readable and + * more useful than an error. + */ + tmp = DUK__MKESC(8, DUK_ASC_UC_U, DUK_ASC_PLUS); + } + } + + *q++ = (duk_uint8_t) ((tmp >> 8) & 0xff); + *q++ = (duk_uint8_t) (tmp & 0xff); + + tmp = tmp >> 16; + while (tmp > 0) { + tmp--; + dig = (duk_small_uint_t) ((cp >> (4 * tmp)) & 0x0f); + *q++ = duk_lc_digits[dig]; + } + + return q; +} + +DUK_LOCAL void duk__json_enc_key_autoquote(duk_json_enc_ctx *js_ctx, duk_hstring *k) { + const duk_int8_t *p, *p_start, *p_end; /* Note: intentionally signed. */ + duk_size_t k_len; + duk_codepoint_t cp; + + DUK_ASSERT(k != NULL); + + /* Accept ASCII strings which conform to identifier requirements + * as being emitted without key quotes. Since we only accept ASCII + * there's no need for actual decoding: 'p' is intentionally signed + * so that bytes >= 0x80 extend to negative values and are rejected + * as invalid identifier codepoints. + */ + + if (js_ctx->flag_avoid_key_quotes) { + k_len = DUK_HSTRING_GET_BYTELEN(k); + p_start = (const duk_int8_t *) DUK_HSTRING_GET_DATA(k); + p_end = p_start + k_len; + p = p_start; + + if (p == p_end) { + /* Zero length string is not accepted without quotes */ + goto quote_normally; + } + cp = (duk_codepoint_t) (*p++); + if (DUK_UNLIKELY(!duk_unicode_is_identifier_start(cp))) { + goto quote_normally; + } + while (p < p_end) { + cp = (duk_codepoint_t) (*p++); + if (DUK_UNLIKELY(!duk_unicode_is_identifier_part(cp))) { + goto quote_normally; + } + } + + /* This seems faster than emitting bytes one at a time and + * then potentially rewinding. + */ + DUK__EMIT_HSTR(js_ctx, k); + return; + } + +quote_normally: + duk__json_enc_quote_string(js_ctx, k); +} + +/* The Quote(value) operation: quote a string. + * + * Stack policy: [ ] -> [ ]. + */ + +DUK_LOCAL void duk__json_enc_quote_string(duk_json_enc_ctx *js_ctx, duk_hstring *h_str) { + duk_hthread *thr = js_ctx->thr; + const duk_uint8_t *p, *p_start, *p_end, *p_now, *p_tmp; + duk_uint8_t *q; + duk_ucodepoint_t cp; /* typed for duk_unicode_decode_xutf8() */ + + DUK_DDD(DUK_DDDPRINT("duk__json_enc_quote_string: h_str=%!O", (duk_heaphdr *) h_str)); + + DUK_ASSERT(h_str != NULL); + p_start = DUK_HSTRING_GET_DATA(h_str); + p_end = p_start + DUK_HSTRING_GET_BYTELEN(h_str); + p = p_start; + + DUK__EMIT_1(js_ctx, DUK_ASC_DOUBLEQUOTE); + + /* Encode string in small chunks, estimating the maximum expansion so that + * there's no need to ensure space while processing the chunk. + */ + + while (p < p_end) { + duk_size_t left, now, space; + + left = (duk_size_t) (p_end - p); + now = (left > DUK__JSON_ENCSTR_CHUNKSIZE ? DUK__JSON_ENCSTR_CHUNKSIZE : left); + + /* Maximum expansion per input byte is 6: + * - invalid UTF-8 byte causes "\uXXXX" to be emitted (6/1 = 6). + * - 2-byte UTF-8 encodes as "\uXXXX" (6/2 = 3). + * - 4-byte UTF-8 encodes as "\Uxxxxxxxx" (10/4 = 2.5). + */ + space = now * 6; + q = DUK_BW_ENSURE_GETPTR(thr, &js_ctx->bw, space); + + p_now = p + now; + + while (p < p_now) { +#if defined(DUK_USE_JSON_QUOTESTRING_FASTPATH) + duk_uint8_t b; + + b = duk__json_quotestr_lookup[*p++]; + if (DUK_LIKELY(b < 0x80)) { + /* Most input bytes go through here. */ + *q++ = b; + } else if (b >= 0xa0) { + *q++ = DUK_ASC_BACKSLASH; + *q++ = (duk_uint8_t) (b - 0x80); + } else if (b == 0x80) { + cp = (duk_ucodepoint_t) (*(p - 1)); + q = duk__emit_esc_auto_fast(js_ctx, cp, q); + } else if (b == 0x7f && js_ctx->flag_ascii_only) { + /* 0x7F is special */ + DUK_ASSERT(b == 0x81); + cp = (duk_ucodepoint_t) 0x7f; + q = duk__emit_esc_auto_fast(js_ctx, cp, q); + } else { + DUK_ASSERT(b == 0x81); + p--; + + /* slow path is shared */ +#else /* DUK_USE_JSON_QUOTESTRING_FASTPATH */ + cp = *p; + + if (DUK_LIKELY(cp <= 0x7f)) { + /* ascii fast path: avoid decoding utf-8 */ + p++; + if (cp == 0x22 || cp == 0x5c) { + /* double quote or backslash */ + *q++ = DUK_ASC_BACKSLASH; + *q++ = (duk_uint8_t) cp; + } else if (cp < 0x20) { + duk_uint_fast8_t esc_char; + + /* This approach is a bit shorter than a straight + * if-else-ladder and also a bit faster. + */ + if (cp < (sizeof(duk__json_quotestr_esc) / sizeof(duk_uint8_t)) && + (esc_char = duk__json_quotestr_esc[cp]) != 0) { + *q++ = DUK_ASC_BACKSLASH; + *q++ = (duk_uint8_t) esc_char; + } else { + q = duk__emit_esc_auto_fast(js_ctx, cp, q); + } + } else if (cp == 0x7f && js_ctx->flag_ascii_only) { + q = duk__emit_esc_auto_fast(js_ctx, cp, q); + } else { + /* any other printable -> as is */ + *q++ = (duk_uint8_t) cp; + } + } else { + /* slow path is shared */ +#endif /* DUK_USE_JSON_QUOTESTRING_FASTPATH */ + + /* slow path decode */ + + /* If XUTF-8 decoding fails, treat the offending byte as a codepoint directly + * and go forward one byte. This is of course very lossy, but allows some kind + * of output to be produced even for internal strings which don't conform to + * XUTF-8. All standard ECMAScript strings are always CESU-8, so this behavior + * does not violate the ECMAScript specification. The behavior is applied to + * all modes, including ECMAScript standard JSON. Because the current XUTF-8 + * decoding is not very strict, this behavior only really affects initial bytes + * and truncated codepoints. + * + * Another alternative would be to scan forwards to start of next codepoint + * (or end of input) and emit just one replacement codepoint. + */ + + p_tmp = p; + if (!duk_unicode_decode_xutf8(thr, &p, p_start, p_end, &cp)) { + /* Decode failed. */ + cp = *p_tmp; + p = p_tmp + 1; + } + +#if defined(DUK_USE_NONSTD_JSON_ESC_U2028_U2029) + if (js_ctx->flag_ascii_only || cp == 0x2028 || cp == 0x2029) { +#else + if (js_ctx->flag_ascii_only) { +#endif + q = duk__emit_esc_auto_fast(js_ctx, cp, q); + } else { + /* as is */ + DUK_RAW_WRITEINC_XUTF8(q, cp); + } + } + } + + DUK_BW_SET_PTR(thr, &js_ctx->bw, q); + } + + DUK__EMIT_1(js_ctx, DUK_ASC_DOUBLEQUOTE); +} + +/* Encode a double (checked by caller) from stack top. Stack top may be + * replaced by serialized string but is not popped (caller does that). + */ +DUK_LOCAL void duk__json_enc_double(duk_json_enc_ctx *js_ctx) { + duk_hthread *thr; + duk_tval *tv; + duk_double_t d; + duk_small_int_t c; + duk_small_int_t s; + duk_small_uint_t stridx; + duk_small_uint_t n2s_flags; + duk_hstring *h_str; + + DUK_ASSERT(js_ctx != NULL); + thr = js_ctx->thr; + DUK_ASSERT(thr != NULL); + + /* Caller must ensure 'tv' is indeed a double and not a fastint! */ + tv = DUK_GET_TVAL_NEGIDX(thr, -1); + DUK_ASSERT(DUK_TVAL_IS_DOUBLE(tv)); + d = DUK_TVAL_GET_DOUBLE(tv); + + c = (duk_small_int_t) DUK_FPCLASSIFY(d); + s = (duk_small_int_t) DUK_SIGNBIT(d); + DUK_UNREF(s); + + if (DUK_LIKELY(!(c == DUK_FP_INFINITE || c == DUK_FP_NAN))) { + DUK_ASSERT(DUK_ISFINITE(d)); + +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + /* Negative zero needs special handling in JX/JC because + * it would otherwise serialize to '0', not '-0'. + */ + if (DUK_UNLIKELY(c == DUK_FP_ZERO && s != 0 && (js_ctx->flag_ext_custom_or_compatible))) { + duk_push_hstring_stridx(thr, DUK_STRIDX_MINUS_ZERO); /* '-0' */ + } else +#endif /* DUK_USE_JX || DUK_USE_JC */ + { + n2s_flags = 0; + /* [ ... number ] -> [ ... string ] */ + duk_numconv_stringify(thr, 10 /*radix*/, 0 /*digits*/, n2s_flags); + } + h_str = duk_known_hstring(thr, -1); + DUK__EMIT_HSTR(js_ctx, h_str); + return; + } + +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + if (!(js_ctx->flags & (DUK_JSON_FLAG_EXT_CUSTOM | DUK_JSON_FLAG_EXT_COMPATIBLE))) { + stridx = DUK_STRIDX_LC_NULL; + } else if (c == DUK_FP_NAN) { + stridx = js_ctx->stridx_custom_nan; + } else if (s == 0) { + stridx = js_ctx->stridx_custom_posinf; + } else { + stridx = js_ctx->stridx_custom_neginf; + } +#else + stridx = DUK_STRIDX_LC_NULL; +#endif + DUK__EMIT_STRIDX(js_ctx, stridx); +} + +#if defined(DUK_USE_FASTINT) +/* Encode a fastint from duk_tval ptr, no value stack effects. */ +DUK_LOCAL void duk__json_enc_fastint_tval(duk_json_enc_ctx *js_ctx, duk_tval *tv) { + duk_int64_t v; + + /* Fastint range is signed 48-bit so longest value is -2^47 = -140737488355328 + * (16 chars long), longest signed 64-bit value is -2^63 = -9223372036854775808 + * (20 chars long). Alloc space for 64-bit range to be safe. + */ + duk_uint8_t buf[20 + 1]; + + /* Caller must ensure 'tv' is indeed a fastint! */ + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv)); + v = DUK_TVAL_GET_FASTINT(tv); + + /* XXX: There are no format strings in duk_config.h yet, could add + * one for formatting duk_int64_t. For now, assumes "%lld" and that + * "long long" type exists. Could also rely on C99 directly but that + * won't work for older MSVC. + */ + DUK_SPRINTF((char *) buf, "%lld", (long long) v); + DUK__EMIT_CSTR(js_ctx, (const char *) buf); +} +#endif + +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) +#if defined(DUK_USE_HEX_FASTPATH) +DUK_LOCAL duk_uint8_t *duk__json_enc_buffer_data_hex(const duk_uint8_t *src, duk_size_t src_len, duk_uint8_t *dst) { + duk_uint8_t *q; + duk_uint16_t *q16; + duk_small_uint_t x; + duk_size_t i, len_safe; +#if !defined(DUK_USE_UNALIGNED_ACCESSES_POSSIBLE) + duk_bool_t shift_dst; +#endif + + /* Unlike in duk_hex_encode() 'dst' is not necessarily aligned by 2. + * For platforms where unaligned accesses are not allowed, shift 'dst' + * ahead by 1 byte to get alignment and then duk_memmove() the result + * in place. The faster encoding loop makes up the difference. + * There's always space for one extra byte because a terminator always + * follows the hex data and that's been accounted for by the caller. + */ + +#if defined(DUK_USE_UNALIGNED_ACCESSES_POSSIBLE) + q16 = (duk_uint16_t *) (void *) dst; +#else + shift_dst = (duk_bool_t) (((duk_size_t) dst) & 0x01U); + if (shift_dst) { + DUK_DD(DUK_DDPRINT("unaligned accesses not possible, dst not aligned -> step to dst + 1")); + q16 = (duk_uint16_t *) (void *) (dst + 1); + } else { + DUK_DD(DUK_DDPRINT("unaligned accesses not possible, dst is aligned")); + q16 = (duk_uint16_t *) (void *) dst; + } + DUK_ASSERT((((duk_size_t) q16) & 0x01U) == 0); +#endif + + len_safe = src_len & ~0x03U; + for (i = 0; i < len_safe; i += 4) { + q16[0] = duk_hex_enctab[src[i]]; + q16[1] = duk_hex_enctab[src[i + 1]]; + q16[2] = duk_hex_enctab[src[i + 2]]; + q16[3] = duk_hex_enctab[src[i + 3]]; + q16 += 4; + } + q = (duk_uint8_t *) q16; + +#if !defined(DUK_USE_UNALIGNED_ACCESSES_POSSIBLE) + if (shift_dst) { + q--; + duk_memmove((void *) dst, (const void *) (dst + 1), 2 * len_safe); + DUK_ASSERT(dst + 2 * len_safe == q); + } +#endif + + for (; i < src_len; i++) { + x = src[i]; + *q++ = duk_lc_digits[x >> 4]; + *q++ = duk_lc_digits[x & 0x0f]; + } + + return q; +} +#else /* DUK_USE_HEX_FASTPATH */ +DUK_LOCAL duk_uint8_t *duk__json_enc_buffer_data_hex(const duk_uint8_t *src, duk_size_t src_len, duk_uint8_t *dst) { + const duk_uint8_t *p; + const duk_uint8_t *p_end; + duk_uint8_t *q; + duk_small_uint_t x; + + p = src; + p_end = src + src_len; + q = dst; + while (p != p_end) { + x = *p++; + *q++ = duk_lc_digits[x >> 4]; + *q++ = duk_lc_digits[x & 0x0f]; + } + + return q; +} +#endif /* DUK_USE_HEX_FASTPATH */ + +DUK_LOCAL void duk__json_enc_buffer_data(duk_json_enc_ctx *js_ctx, duk_uint8_t *buf_data, duk_size_t buf_len) { + duk_hthread *thr; + duk_uint8_t *q; + duk_size_t space; + + thr = js_ctx->thr; + + DUK_ASSERT(js_ctx->flag_ext_custom || js_ctx->flag_ext_compatible); /* caller checks */ + DUK_ASSERT(js_ctx->flag_ext_custom_or_compatible); + + /* Buffer values are encoded in (lowercase) hex to make the + * binary data readable. Base64 or similar would be more + * compact but less readable, and the point of JX/JC + * variants is to be as useful to a programmer as possible. + */ + + /* The #if defined() clutter here needs to handle the three + * cases: (1) JX+JC, (2) JX only, (3) JC only. + */ + + /* Note: space must cater for both JX and JC. */ + space = 9 + buf_len * 2 + 2; + DUK_ASSERT(DUK_HBUFFER_MAX_BYTELEN <= 0x7ffffffeUL); + DUK_ASSERT((space - 2) / 2 >= buf_len); /* overflow not possible, buffer limits */ + q = DUK_BW_ENSURE_GETPTR(thr, &js_ctx->bw, space); + +#if defined(DUK_USE_JX) && defined(DUK_USE_JC) + if (js_ctx->flag_ext_custom) +#endif +#if defined(DUK_USE_JX) + { + *q++ = DUK_ASC_PIPE; + q = duk__json_enc_buffer_data_hex(buf_data, buf_len, q); + *q++ = DUK_ASC_PIPE; + + } +#endif +#if defined(DUK_USE_JX) && defined(DUK_USE_JC) + else +#endif +#if defined(DUK_USE_JC) + { + DUK_ASSERT(js_ctx->flag_ext_compatible); + duk_memcpy((void *) q, (const void *) "{\"_buf\":\"", 9); /* len: 9 */ + q += 9; + q = duk__json_enc_buffer_data_hex(buf_data, buf_len, q); + *q++ = DUK_ASC_DOUBLEQUOTE; + *q++ = DUK_ASC_RCURLY; + } +#endif + + DUK_BW_SET_PTR(thr, &js_ctx->bw, q); +} + +DUK_LOCAL void duk__json_enc_buffer_jx_jc(duk_json_enc_ctx *js_ctx, duk_hbuffer *h) { + duk__json_enc_buffer_data(js_ctx, + (duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(js_ctx->thr->heap, h), + (duk_size_t) DUK_HBUFFER_GET_SIZE(h)); +} +#endif /* DUK_USE_JX || DUK_USE_JC */ + +#if defined(DUK_USE_JSON_STRINGIFY_FASTPATH) +DUK_LOCAL void duk__json_enc_buffer_json_fastpath(duk_json_enc_ctx *js_ctx, duk_hbuffer *h) { + duk_size_t i, n; + const duk_uint8_t *buf; + duk_uint8_t *q; + + n = DUK_HBUFFER_GET_SIZE(h); + if (n == 0) { + DUK__EMIT_2(js_ctx, DUK_ASC_LCURLY, DUK_ASC_RCURLY); + return; + } + + DUK__EMIT_1(js_ctx, DUK_ASC_LCURLY); + + /* Maximum encoded length with 32-bit index: 1 + 10 + 2 + 3 + 1 + 1 = 18, + * with 64-bit index: 1 + 20 + 2 + 3 + 1 + 1 = 28. 32 has some slack. + * + * Note that because the output buffer is reallocated from time to time, + * side effects (such as finalizers) affecting the buffer 'h' must be + * disabled. This is the case in the JSON.stringify() fast path. + */ + + buf = (const duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(js_ctx->thr->heap, h); + if (DUK_UNLIKELY(js_ctx->h_gap != NULL)) { + for (i = 0; i < n; i++) { + duk__json_enc_newline_indent(js_ctx, js_ctx->recursion_depth + 1); + q = DUK_BW_ENSURE_GETPTR(js_ctx->thr, &js_ctx->bw, 32); + q += DUK_SPRINTF((char *) q, "\"%lu\": %u,", (unsigned long) i, (unsigned int) buf[i]); + DUK_BW_SET_PTR(js_ctx->thr, &js_ctx->bw, q); + } + } else { + q = DUK_BW_GET_PTR(js_ctx->thr, &js_ctx->bw); + for (i = 0; i < n; i++) { + q = DUK_BW_ENSURE_RAW(js_ctx->thr, &js_ctx->bw, 32, q); + q += DUK_SPRINTF((char *) q, "\"%lu\":%u,", (unsigned long) i, (unsigned int) buf[i]); + } + DUK_BW_SET_PTR(js_ctx->thr, &js_ctx->bw, q); + } + DUK__UNEMIT_1(js_ctx); /* eat trailing comma */ + + if (DUK_UNLIKELY(js_ctx->h_gap != NULL)) { + duk__json_enc_newline_indent(js_ctx, js_ctx->recursion_depth); + } + DUK__EMIT_1(js_ctx, DUK_ASC_RCURLY); +} +#endif /* DUK_USE_JSON_STRINGIFY_FASTPATH */ + +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) +DUK_LOCAL void duk__json_enc_pointer(duk_json_enc_ctx *js_ctx, void *ptr) { + char buf[64]; /* XXX: how to figure correct size? */ + const char *fmt; + + DUK_ASSERT(js_ctx->flag_ext_custom || js_ctx->flag_ext_compatible); /* caller checks */ + DUK_ASSERT(js_ctx->flag_ext_custom_or_compatible); + + duk_memzero(buf, sizeof(buf)); + + /* The #if defined() clutter here needs to handle the three + * cases: (1) JX+JC, (2) JX only, (3) JC only. + */ +#if defined(DUK_USE_JX) && defined(DUK_USE_JC) + if (js_ctx->flag_ext_custom) +#endif +#if defined(DUK_USE_JX) + { + fmt = ptr ? "(%p)" : "(null)"; + } +#endif +#if defined(DUK_USE_JX) && defined(DUK_USE_JC) + else +#endif +#if defined(DUK_USE_JC) + { + DUK_ASSERT(js_ctx->flag_ext_compatible); + fmt = ptr ? "{\"_ptr\":\"%p\"}" : "{\"_ptr\":\"null\"}"; + } +#endif + + /* When ptr == NULL, the format argument is unused. */ + DUK_SNPRINTF(buf, sizeof(buf) - 1, fmt, ptr); /* must not truncate */ + DUK__EMIT_CSTR(js_ctx, buf); +} +#endif /* DUK_USE_JX || DUK_USE_JC */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) +DUK_LOCAL void duk__json_enc_bufobj(duk_json_enc_ctx *js_ctx, duk_hbufobj *h_bufobj) { + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + + if (h_bufobj->buf == NULL || !DUK_HBUFOBJ_VALID_SLICE(h_bufobj)) { + DUK__EMIT_STRIDX(js_ctx, DUK_STRIDX_LC_NULL); + } else { + /* Handle both full and partial slice (as long as covered). */ + duk__json_enc_buffer_data(js_ctx, + (duk_uint8_t *) DUK_HBUFOBJ_GET_SLICE_BASE(js_ctx->thr->heap, h_bufobj), + (duk_size_t) h_bufobj->length); + } +} +#endif /* DUK_USE_JX || DUK_USE_JC */ +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* Indent helper. Calling code relies on js_ctx->recursion_depth also being + * directly related to indent depth. + */ +#if defined(DUK_USE_PREFER_SIZE) +DUK_LOCAL void duk__json_enc_newline_indent(duk_json_enc_ctx *js_ctx, duk_uint_t depth) { + DUK_ASSERT(js_ctx->h_gap != NULL); + DUK_ASSERT(DUK_HSTRING_GET_BYTELEN(js_ctx->h_gap) > 0); /* caller guarantees */ + + DUK__EMIT_1(js_ctx, 0x0a); + while (depth-- > 0) { + DUK__EMIT_HSTR(js_ctx, js_ctx->h_gap); + } +} +#else /* DUK_USE_PREFER_SIZE */ +DUK_LOCAL void duk__json_enc_newline_indent(duk_json_enc_ctx *js_ctx, duk_uint_t depth) { + const duk_uint8_t *gap_data; + duk_size_t gap_len; + duk_size_t avail_bytes; /* bytes of indent available for copying */ + duk_size_t need_bytes; /* bytes of indent still needed */ + duk_uint8_t *p_start; + duk_uint8_t *p; + + DUK_ASSERT(js_ctx->h_gap != NULL); + DUK_ASSERT(DUK_HSTRING_GET_BYTELEN(js_ctx->h_gap) > 0); /* caller guarantees */ + + DUK__EMIT_1(js_ctx, 0x0a); + if (DUK_UNLIKELY(depth == 0)) { + return; + } + + /* To handle deeper indents efficiently, make use of copies we've + * already emitted. In effect we can emit a sequence of 1, 2, 4, + * 8, etc copies, and then finish the last run. Byte counters + * avoid multiply with gap_len on every loop. + */ + + gap_data = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(js_ctx->h_gap); + gap_len = (duk_size_t) DUK_HSTRING_GET_BYTELEN(js_ctx->h_gap); + DUK_ASSERT(gap_len > 0); + + need_bytes = gap_len * depth; + p = DUK_BW_ENSURE_GETPTR(js_ctx->thr, &js_ctx->bw, need_bytes); + p_start = p; + + duk_memcpy((void *) p, (const void *) gap_data, (size_t) gap_len); + p += gap_len; + avail_bytes = gap_len; + DUK_ASSERT(need_bytes >= gap_len); + need_bytes -= gap_len; + + while (need_bytes >= avail_bytes) { + duk_memcpy((void *) p, (const void *) p_start, (size_t) avail_bytes); + p += avail_bytes; + need_bytes -= avail_bytes; + avail_bytes <<= 1; + } + + DUK_ASSERT(need_bytes < avail_bytes); /* need_bytes may be zero */ + duk_memcpy((void *) p, (const void *) p_start, (size_t) need_bytes); + p += need_bytes; + /*avail_bytes += need_bytes*/ + + DUK_BW_SET_PTR(js_ctx->thr, &js_ctx->bw, p); +} +#endif /* DUK_USE_PREFER_SIZE */ + +/* Shared entry handling for object/array serialization. */ +DUK_LOCAL void duk__json_enc_objarr_entry(duk_json_enc_ctx *js_ctx, duk_idx_t *entry_top) { + duk_hthread *thr = js_ctx->thr; + duk_hobject *h_target; + duk_uint_fast32_t i, n; + + *entry_top = duk_get_top(thr); + + duk_native_stack_check(thr); + duk_require_stack(thr, DUK_JSON_ENC_REQSTACK); + + /* Loop check using a hybrid approach: a fixed-size visited[] array + * with overflow in a loop check object. + */ + + h_target = duk_known_hobject(thr, -1); /* object or array */ + + n = js_ctx->recursion_depth; + if (DUK_UNLIKELY(n > DUK_JSON_ENC_LOOPARRAY)) { + n = DUK_JSON_ENC_LOOPARRAY; + } + for (i = 0; i < n; i++) { + if (DUK_UNLIKELY(js_ctx->visiting[i] == h_target)) { + DUK_DD(DUK_DDPRINT("slow path loop detect")); + DUK_ERROR_TYPE(thr, DUK_STR_CYCLIC_INPUT); + DUK_WO_NORETURN(return;); + } + } + if (js_ctx->recursion_depth < DUK_JSON_ENC_LOOPARRAY) { + js_ctx->visiting[js_ctx->recursion_depth] = h_target; + } else { + duk_push_sprintf(thr, DUK_STR_FMT_PTR, (void *) h_target); + duk_dup_top(thr); /* -> [ ... voidp voidp ] */ + if (duk_has_prop(thr, js_ctx->idx_loop)) { + DUK_ERROR_TYPE(thr, DUK_STR_CYCLIC_INPUT); + DUK_WO_NORETURN(return;); + } + duk_push_true(thr); /* -> [ ... voidp true ] */ + duk_put_prop(thr, js_ctx->idx_loop); /* -> [ ... ] */ + } + + /* C recursion check. */ + + DUK_ASSERT_DISABLE(js_ctx->recursion_depth >= 0); /* unsigned */ + DUK_ASSERT(js_ctx->recursion_depth <= js_ctx->recursion_limit); + if (js_ctx->recursion_depth >= js_ctx->recursion_limit) { + DUK_ERROR_RANGE(thr, DUK_STR_ENC_RECLIMIT); + DUK_WO_NORETURN(return;); + } + js_ctx->recursion_depth++; + + DUK_DDD(DUK_DDDPRINT("shared entry finished: top=%ld, loop=%!T", + (long) duk_get_top(thr), + (duk_tval *) duk_get_tval(thr, js_ctx->idx_loop))); +} + +/* Shared exit handling for object/array serialization. */ +DUK_LOCAL void duk__json_enc_objarr_exit(duk_json_enc_ctx *js_ctx, duk_idx_t *entry_top) { + duk_hthread *thr = js_ctx->thr; + duk_hobject *h_target; + + /* C recursion check. */ + + DUK_ASSERT(js_ctx->recursion_depth > 0); + DUK_ASSERT(js_ctx->recursion_depth <= js_ctx->recursion_limit); + js_ctx->recursion_depth--; + + /* Loop check. */ + + h_target = duk_known_hobject(thr, *entry_top - 1); /* original target at entry_top - 1 */ + + if (js_ctx->recursion_depth < DUK_JSON_ENC_LOOPARRAY) { + /* Previous entry was inside visited[], nothing to do. */ + } else { + duk_push_sprintf(thr, DUK_STR_FMT_PTR, (void *) h_target); + duk_del_prop(thr, js_ctx->idx_loop); /* -> [ ... ] */ + } + + /* Restore stack top after unbalanced code paths. */ + duk_set_top(thr, *entry_top); + + DUK_DDD(DUK_DDDPRINT("shared entry finished: top=%ld, loop=%!T", + (long) duk_get_top(thr), + (duk_tval *) duk_get_tval(thr, js_ctx->idx_loop))); +} + +/* The JO(value) operation: encode object. + * + * Stack policy: [ object ] -> [ object ]. + */ +DUK_LOCAL void duk__json_enc_object(duk_json_enc_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + duk_hstring *h_key; + duk_idx_t entry_top; + duk_idx_t idx_obj; + duk_idx_t idx_keys; + duk_bool_t emitted; + duk_uarridx_t arr_len, i; + duk_size_t prev_size; + + DUK_DDD(DUK_DDDPRINT("duk__json_enc_object: obj=%!T", (duk_tval *) duk_get_tval(thr, -1))); + + duk__json_enc_objarr_entry(js_ctx, &entry_top); + + idx_obj = entry_top - 1; + + if (js_ctx->idx_proplist >= 0) { + idx_keys = js_ctx->idx_proplist; + } else { + /* XXX: would be nice to enumerate an object at specified index */ + duk_dup(thr, idx_obj); + (void) duk_hobject_get_enumerated_keys( + thr, + DUK_ENUM_OWN_PROPERTIES_ONLY /*flags*/); /* [ ... target ] -> [ ... target keys ] */ + idx_keys = duk_require_normalize_index(thr, -1); + /* leave stack unbalanced on purpose */ + } + + DUK_DDD(DUK_DDDPRINT("idx_keys=%ld, h_keys=%!T", (long) idx_keys, (duk_tval *) duk_get_tval(thr, idx_keys))); + + /* Steps 8-10 have been merged to avoid a "partial" variable. */ + + DUK__EMIT_1(js_ctx, DUK_ASC_LCURLY); + + /* XXX: keys is an internal object with all keys to be processed + * in its (gapless) array part. Because nobody can touch the keys + * object, we could iterate its array part directly (keeping in mind + * that it can be reallocated). + */ + + arr_len = (duk_uarridx_t) duk_get_length(thr, idx_keys); + emitted = 0; + for (i = 0; i < arr_len; i++) { + duk_get_prop_index(thr, idx_keys, i); /* -> [ ... key ] */ + + DUK_DDD(DUK_DDDPRINT("object property loop: holder=%!T, key=%!T", + (duk_tval *) duk_get_tval(thr, idx_obj), + (duk_tval *) duk_get_tval(thr, -1))); + + h_key = duk_known_hstring(thr, -1); + DUK_ASSERT(h_key != NULL); + DUK_ASSERT(!DUK_HSTRING_HAS_SYMBOL(h_key)); /* proplist filtering; enum options */ + + prev_size = DUK_BW_GET_SIZE(js_ctx->thr, &js_ctx->bw); + if (DUK_UNLIKELY(js_ctx->h_gap != NULL)) { + duk__json_enc_newline_indent(js_ctx, js_ctx->recursion_depth); + duk__json_enc_key_autoquote(js_ctx, h_key); + DUK__EMIT_2(js_ctx, DUK_ASC_COLON, DUK_ASC_SPACE); + } else { + duk__json_enc_key_autoquote(js_ctx, h_key); + DUK__EMIT_1(js_ctx, DUK_ASC_COLON); + } + + /* [ ... key ] */ + + if (DUK_UNLIKELY(duk__json_enc_value(js_ctx, idx_obj) == 0)) { + /* Value would yield 'undefined', so skip key altogether. + * Side effects have already happened. + */ + DUK_BW_SET_SIZE(js_ctx->thr, &js_ctx->bw, prev_size); + } else { + DUK__EMIT_1(js_ctx, DUK_ASC_COMMA); + emitted = 1; + } + + /* [ ... ] */ + } + + if (emitted) { + DUK_ASSERT(*((duk_uint8_t *) DUK_BW_GET_PTR(js_ctx->thr, &js_ctx->bw) - 1) == DUK_ASC_COMMA); + DUK__UNEMIT_1(js_ctx); /* eat trailing comma */ + if (DUK_UNLIKELY(js_ctx->h_gap != NULL)) { + DUK_ASSERT(js_ctx->recursion_depth >= 1); + duk__json_enc_newline_indent(js_ctx, js_ctx->recursion_depth - 1U); + } + } + DUK__EMIT_1(js_ctx, DUK_ASC_RCURLY); + + duk__json_enc_objarr_exit(js_ctx, &entry_top); + + DUK_ASSERT_TOP(thr, entry_top); +} + +/* The JA(value) operation: encode array. + * + * Stack policy: [ array ] -> [ array ]. + */ +DUK_LOCAL void duk__json_enc_array(duk_json_enc_ctx *js_ctx) { + duk_hthread *thr = js_ctx->thr; + duk_idx_t entry_top; + duk_idx_t idx_arr; + duk_bool_t emitted; + duk_uarridx_t i, arr_len; + + DUK_DDD(DUK_DDDPRINT("duk__json_enc_array: array=%!T", (duk_tval *) duk_get_tval(thr, -1))); + + duk__json_enc_objarr_entry(js_ctx, &entry_top); + + idx_arr = entry_top - 1; + + /* Steps 8-10 have been merged to avoid a "partial" variable. */ + + DUK__EMIT_1(js_ctx, DUK_ASC_LBRACKET); + + arr_len = (duk_uarridx_t) duk_get_length(thr, idx_arr); + emitted = 0; + for (i = 0; i < arr_len; i++) { + DUK_DDD(DUK_DDDPRINT("array entry loop: array=%!T, index=%ld, arr_len=%ld", + (duk_tval *) duk_get_tval(thr, idx_arr), + (long) i, + (long) arr_len)); + + if (DUK_UNLIKELY(js_ctx->h_gap != NULL)) { + DUK_ASSERT(js_ctx->recursion_depth >= 1); + duk__json_enc_newline_indent(js_ctx, js_ctx->recursion_depth); + } + + (void) duk_push_uint_to_hstring(thr, (duk_uint_t) i); /* -> [ ... key ] */ + + /* [ ... key ] */ + + if (DUK_UNLIKELY(duk__json_enc_value(js_ctx, idx_arr) == 0)) { + /* Value would normally be omitted, replace with 'null'. */ + DUK__EMIT_STRIDX(js_ctx, DUK_STRIDX_LC_NULL); + } else { + ; + } + + /* [ ... ] */ + + DUK__EMIT_1(js_ctx, DUK_ASC_COMMA); + emitted = 1; + } + + if (emitted) { + DUK_ASSERT(*((duk_uint8_t *) DUK_BW_GET_PTR(js_ctx->thr, &js_ctx->bw) - 1) == DUK_ASC_COMMA); + DUK__UNEMIT_1(js_ctx); /* eat trailing comma */ + if (DUK_UNLIKELY(js_ctx->h_gap != NULL)) { + DUK_ASSERT(js_ctx->recursion_depth >= 1); + duk__json_enc_newline_indent(js_ctx, js_ctx->recursion_depth - 1U); + } + } + DUK__EMIT_1(js_ctx, DUK_ASC_RBRACKET); + + duk__json_enc_objarr_exit(js_ctx, &entry_top); + + DUK_ASSERT_TOP(thr, entry_top); +} + +/* The Str(key, holder) operation. + * + * Stack policy: [ ... key ] -> [ ... ] + */ +DUK_LOCAL duk_bool_t duk__json_enc_value(duk_json_enc_ctx *js_ctx, duk_idx_t idx_holder) { + duk_hthread *thr = js_ctx->thr; + duk_tval *tv; + duk_tval *tv_holder; + duk_tval *tv_key; + duk_small_int_t c; + + DUK_DDD(DUK_DDDPRINT("duk__json_enc_value: idx_holder=%ld, holder=%!T, key=%!T", + (long) idx_holder, + (duk_tval *) duk_get_tval(thr, idx_holder), + (duk_tval *) duk_get_tval(thr, -1))); + + tv_holder = DUK_GET_TVAL_POSIDX(thr, idx_holder); + DUK_ASSERT(DUK_TVAL_IS_OBJECT(tv_holder)); + tv_key = DUK_GET_TVAL_NEGIDX(thr, -1); + DUK_ASSERT(DUK_TVAL_IS_STRING(tv_key)); + DUK_ASSERT(!DUK_HSTRING_HAS_SYMBOL(DUK_TVAL_GET_STRING(tv_key))); /* Caller responsible. */ + (void) duk_hobject_getprop(thr, tv_holder, tv_key); + + /* -> [ ... key val ] */ + + DUK_DDD(DUK_DDDPRINT("value=%!T", (duk_tval *) duk_get_tval(thr, -1))); + + /* Standard JSON checks for .toJSON() only for actual objects; for + * example, setting Number.prototype.toJSON and then serializing a + * number won't invoke the .toJSON() method. However, lightfuncs and + * plain buffers mimic objects so we check for their .toJSON() method. + */ + if (duk_check_type_mask(thr, -1, DUK_TYPE_MASK_OBJECT | DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER)) { + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_TO_JSON); + if (duk_is_callable(thr, -1)) { /* toJSON() can also be a lightfunc */ + DUK_DDD(DUK_DDDPRINT("value is object, has callable toJSON() -> call it")); + /* XXX: duk_dup_unvalidated(thr, -2) etc. */ + duk_dup_m2(thr); /* -> [ ... key val toJSON val ] */ + duk_dup_m4(thr); /* -> [ ... key val toJSON val key ] */ + duk_call_method(thr, 1); /* -> [ ... key val val' ] */ + duk_remove_m2(thr); /* -> [ ... key val' ] */ + } else { + duk_pop(thr); /* -> [ ... key val ] */ + } + } + + /* [ ... key val ] */ + + DUK_DDD(DUK_DDDPRINT("value=%!T", (duk_tval *) duk_get_tval(thr, -1))); + + if (js_ctx->h_replacer) { + /* XXX: Here a "slice copy" would be useful. */ + DUK_DDD(DUK_DDDPRINT("replacer is set, call replacer")); + duk_push_hobject(thr, js_ctx->h_replacer); /* -> [ ... key val replacer ] */ + duk_dup(thr, idx_holder); /* -> [ ... key val replacer holder ] */ + duk_dup_m4(thr); /* -> [ ... key val replacer holder key ] */ + duk_dup_m4(thr); /* -> [ ... key val replacer holder key val ] */ + duk_call_method(thr, 2); /* -> [ ... key val val' ] */ + duk_remove_m2(thr); /* -> [ ... key val' ] */ + } + + /* [ ... key val ] */ + + DUK_DDD(DUK_DDDPRINT("value=%!T", (duk_tval *) duk_get_tval(thr, -1))); + + tv = DUK_GET_TVAL_NEGIDX(thr, -1); + if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *h; + + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + if (DUK_HOBJECT_IS_BUFOBJ(h) && js_ctx->flags & (DUK_JSON_FLAG_EXT_CUSTOM | DUK_JSON_FLAG_EXT_COMPATIBLE)) { + /* With JX/JC a bufferobject gets serialized specially. */ + duk_hbufobj *h_bufobj; + h_bufobj = (duk_hbufobj *) h; + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + duk__json_enc_bufobj(js_ctx, h_bufobj); + goto pop2_emitted; + } + /* Otherwise bufferobjects get serialized as normal objects. */ +#endif /* JX || JC */ +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + c = (duk_small_int_t) DUK_HOBJECT_GET_CLASS_NUMBER(h); + switch (c) { + case DUK_HOBJECT_CLASS_NUMBER: { + DUK_DDD(DUK_DDDPRINT("value is a Number object -> coerce with ToNumber()")); + duk_to_number_m1(thr); + /* The coercion potentially invokes user .valueOf() and .toString() + * but can't result in a function value because ToPrimitive() would + * reject such a result: test-dev-json-stringify-coercion-1.js. + */ + DUK_ASSERT(!duk_is_callable(thr, -1)); + break; + } + case DUK_HOBJECT_CLASS_STRING: { + DUK_DDD(DUK_DDDPRINT("value is a String object -> coerce with ToString()")); + duk_to_string(thr, -1); + /* Same coercion behavior as for Number. */ + DUK_ASSERT(!duk_is_callable(thr, -1)); + break; + } +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + case DUK_HOBJECT_CLASS_POINTER: +#endif + case DUK_HOBJECT_CLASS_BOOLEAN: { + DUK_DDD(DUK_DDDPRINT("value is a Boolean/Buffer/Pointer object -> get internal value")); + duk_xget_owndataprop_stridx_short(thr, -1, DUK_STRIDX_INT_VALUE); + duk_remove_m2(thr); + break; + } + default: { + /* Normal object which doesn't get automatically coerced to a + * primitive value. Functions are checked for specially. The + * primitive value coercions for Number, String, Pointer, and + * Boolean can't result in functions so suffices to check here. + * Symbol objects are handled like plain objects (their primitive + * value is NOT looked up like for e.g. String objects). + */ + DUK_ASSERT(h != NULL); + if (DUK_HOBJECT_IS_CALLABLE(h)) { +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + if (js_ctx->flags & (DUK_JSON_FLAG_EXT_CUSTOM | DUK_JSON_FLAG_EXT_COMPATIBLE)) { + /* We only get here when doing non-standard JSON encoding */ + DUK_DDD(DUK_DDDPRINT("-> function allowed, serialize to custom format")); + DUK_ASSERT(js_ctx->flag_ext_custom || js_ctx->flag_ext_compatible); + DUK__EMIT_STRIDX(js_ctx, js_ctx->stridx_custom_function); + goto pop2_emitted; + } else { + DUK_DDD(DUK_DDDPRINT("-> will result in undefined (function)")); + goto pop2_undef; + } +#else /* DUK_USE_JX || DUK_USE_JC */ + DUK_DDD(DUK_DDDPRINT("-> will result in undefined (function)")); + goto pop2_undef; +#endif /* DUK_USE_JX || DUK_USE_JC */ + } + } + } /* end switch */ + } + + /* [ ... key val ] */ + + DUK_DDD(DUK_DDDPRINT("value=%!T", (duk_tval *) duk_get_tval(thr, -1))); + + if (duk_check_type_mask(thr, -1, js_ctx->mask_for_undefined)) { + /* will result in undefined */ + DUK_DDD(DUK_DDDPRINT("-> will result in undefined (type mask check)")); + goto pop2_undef; + } + tv = DUK_GET_TVAL_NEGIDX(thr, -1); + + switch (DUK_TVAL_GET_TAG(tv)) { +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + /* When JX/JC not in use, the type mask above will avoid this case if needed. */ + case DUK_TAG_UNDEFINED: { + DUK__EMIT_STRIDX(js_ctx, js_ctx->stridx_custom_undefined); + break; + } +#endif + case DUK_TAG_NULL: { + DUK__EMIT_STRIDX(js_ctx, DUK_STRIDX_LC_NULL); + break; + } + case DUK_TAG_BOOLEAN: { + DUK__EMIT_STRIDX(js_ctx, DUK_TVAL_GET_BOOLEAN(tv) ? DUK_STRIDX_TRUE : DUK_STRIDX_FALSE); + break; + } +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + /* When JX/JC not in use, the type mask above will avoid this case if needed. */ + case DUK_TAG_POINTER: { + duk__json_enc_pointer(js_ctx, DUK_TVAL_GET_POINTER(tv)); + break; + } +#endif /* DUK_USE_JX || DUK_USE_JC */ + case DUK_TAG_STRING: { + duk_hstring *h = DUK_TVAL_GET_STRING(tv); + DUK_ASSERT(h != NULL); + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h))) { + goto pop2_undef; + } + duk__json_enc_quote_string(js_ctx, h); + break; + } + case DUK_TAG_OBJECT: { + duk_hobject *h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + + /* Function values are handled completely above (including + * coercion results): + */ + DUK_ASSERT(!DUK_HOBJECT_IS_CALLABLE(h)); + + if (duk_js_isarray_hobject(h)) { + duk__json_enc_array(js_ctx); + } else { + duk__json_enc_object(js_ctx); + } + break; + } + /* Because plain buffers mimics Uint8Array, they have enumerable + * index properties [0,byteLength[. Because JSON only serializes + * enumerable own properties, no properties can be serialized for + * plain buffers (all virtual properties are non-enumerable). However, + * there may be a .toJSON() method which was already handled above. + */ + case DUK_TAG_BUFFER: { +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + if (js_ctx->flag_ext_custom_or_compatible) { + duk__json_enc_buffer_jx_jc(js_ctx, DUK_TVAL_GET_BUFFER(tv)); + break; + } +#endif + + /* Could implement a fastpath, but the fast path would need + * to handle realloc side effects correctly. + */ + duk_to_object(thr, -1); + duk__json_enc_object(js_ctx); + break; + } + case DUK_TAG_LIGHTFUNC: { +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + /* We only get here when doing non-standard JSON encoding */ + DUK_ASSERT(js_ctx->flag_ext_custom || js_ctx->flag_ext_compatible); + DUK__EMIT_STRIDX(js_ctx, js_ctx->stridx_custom_function); +#else + /* Standard JSON omits functions */ + DUK_UNREACHABLE(); +#endif + break; + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: + /* Number serialization has a significant impact relative to + * other fast path code, so careful fast path for fastints. + */ + duk__json_enc_fastint_tval(js_ctx, tv); + break; +#endif + default: { + /* number */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + /* XXX: A fast path for usual integers would be useful when + * fastint support is not enabled. + */ + duk__json_enc_double(js_ctx); + break; + } + } + +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) +pop2_emitted: +#endif + duk_pop_2(thr); /* [ ... key val ] -> [ ... ] */ + return 1; /* emitted */ + +pop2_undef: + duk_pop_2(thr); /* [ ... key val ] -> [ ... ] */ + return 0; /* not emitted */ +} + +/* E5 Section 15.12.3, main algorithm, step 4.b.ii steps 1-4. */ +DUK_LOCAL duk_bool_t duk__json_enc_allow_into_proplist(duk_tval *tv) { + duk_small_int_t c; + + /* XXX: some kind of external internal type checker? + * - type mask; symbol flag; class mask + */ + DUK_ASSERT(tv != NULL); + if (DUK_TVAL_IS_STRING(tv)) { + duk_hstring *h; + h = DUK_TVAL_GET_STRING(tv); + DUK_ASSERT(h != NULL); + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h))) { + return 0; + } + return 1; + } else if (DUK_TVAL_IS_NUMBER(tv)) { + return 1; + } else if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *h; + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + c = (duk_small_int_t) DUK_HOBJECT_GET_CLASS_NUMBER(h); + if (c == DUK_HOBJECT_CLASS_STRING || c == DUK_HOBJECT_CLASS_NUMBER) { + return 1; + } + } + + return 0; +} + +/* + * JSON.stringify() fast path + * + * Otherwise supports full JSON, JX, and JC features, but bails out on any + * possible side effect which might change the value being serialized. The + * fast path can take advantage of the fact that the value being serialized + * is unchanged so that we can walk directly through property tables etc. + */ + +#if defined(DUK_USE_JSON_STRINGIFY_FASTPATH) +DUK_LOCAL duk_bool_t duk__json_stringify_fast_value(duk_json_enc_ctx *js_ctx, duk_tval *tv) { + duk_uint_fast32_t i, n; + + DUK_DDD(DUK_DDDPRINT("stringify fast: %!T", tv)); + + DUK_ASSERT(js_ctx != NULL); + DUK_ASSERT(js_ctx->thr != NULL); + +#if 0 /* disabled for now */ + restart_match: +#endif + + DUK_ASSERT(tv != NULL); + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNDEFINED: { +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + if (js_ctx->flag_ext_custom || js_ctx->flag_ext_compatible) { + DUK__EMIT_STRIDX(js_ctx, js_ctx->stridx_custom_undefined); + break; + } else { + goto emit_undefined; + } +#else + goto emit_undefined; +#endif + } + case DUK_TAG_NULL: { + DUK__EMIT_STRIDX(js_ctx, DUK_STRIDX_LC_NULL); + break; + } + case DUK_TAG_BOOLEAN: { + DUK__EMIT_STRIDX(js_ctx, DUK_TVAL_GET_BOOLEAN(tv) ? DUK_STRIDX_TRUE : DUK_STRIDX_FALSE); + break; + } + case DUK_TAG_STRING: { + duk_hstring *h; + h = DUK_TVAL_GET_STRING(tv); + DUK_ASSERT(h != NULL); + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h))) { + goto emit_undefined; + } + duk__json_enc_quote_string(js_ctx, h); + break; + } + case DUK_TAG_OBJECT: { + duk_hobject *obj; + duk_tval *tv_val; + duk_bool_t emitted = 0; + duk_uint32_t c_bit, c_all, c_array, c_unbox, c_undef, c_func, c_bufobj, c_object, c_abort; + + /* For objects JSON.stringify() only looks for own, enumerable + * properties which is nice for the fast path here. + * + * For arrays JSON.stringify() uses [[Get]] so it will actually + * inherit properties during serialization! This fast path + * supports gappy arrays as long as there's no actual inherited + * property (which might be a getter etc). + * + * Since recursion only happens for objects, we can have both + * recursion and loop checks here. We use a simple, depth-limited + * loop check in the fast path because the object-based tracking + * is very slow (when tested, it accounted for 50% of fast path + * execution time for input data with a lot of small objects!). + */ + + /* XXX: for real world code, could just ignore array inheritance + * and only look at array own properties. + */ + + /* We rely on a few object flag / class number relationships here, + * assert for them. + */ + + obj = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(obj != NULL); + DUK_HOBJECT_ASSERT_VALID(obj); + + /* Once recursion depth is increased, exit path must decrease + * it (though it's OK to abort the fast path). + */ + + DUK_ASSERT_DISABLE(js_ctx->recursion_depth >= 0); /* unsigned */ + DUK_ASSERT(js_ctx->recursion_depth <= js_ctx->recursion_limit); + if (js_ctx->recursion_depth >= js_ctx->recursion_limit) { + DUK_DD(DUK_DDPRINT("fast path recursion limit")); + DUK_ERROR_RANGE(js_ctx->thr, DUK_STR_DEC_RECLIMIT); + DUK_WO_NORETURN(return 0;); + } + + for (i = 0, n = (duk_uint_fast32_t) js_ctx->recursion_depth; i < n; i++) { + if (DUK_UNLIKELY(js_ctx->visiting[i] == obj)) { + DUK_DD(DUK_DDPRINT("fast path loop detect")); + DUK_ERROR_TYPE(js_ctx->thr, DUK_STR_CYCLIC_INPUT); + DUK_WO_NORETURN(return 0;); + } + } + + /* Guaranteed by recursion_limit setup so we don't have to + * check twice. + */ + DUK_ASSERT(js_ctx->recursion_depth < DUK_JSON_ENC_LOOPARRAY); + js_ctx->visiting[js_ctx->recursion_depth] = obj; + js_ctx->recursion_depth++; + + /* If object has a .toJSON() property, we can't be certain + * that it wouldn't mutate any value arbitrarily, so bail + * out of the fast path. + * + * If an object is a Proxy we also can't avoid side effects + * so abandon. + */ + /* XXX: non-callable .toJSON() doesn't need to cause an abort + * but does at the moment, probably not worth fixing. + */ + if (duk_hobject_hasprop_raw(js_ctx->thr, obj, DUK_HTHREAD_STRING_TO_JSON(js_ctx->thr)) || + DUK_HOBJECT_IS_PROXY(obj)) { + DUK_DD(DUK_DDPRINT("object has a .toJSON property or object is a Proxy, abort fast path")); + goto abort_fastpath; + } + + /* We could use a switch-case for the class number but it turns out + * a small if-else ladder on class masks is better. The if-ladder + * should be in order of relevancy. + */ + + /* XXX: move masks to js_ctx? they don't change during one + * fast path invocation. + */ + DUK_ASSERT(DUK_HOBJECT_CLASS_MAX <= 31); +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + if (js_ctx->flag_ext_custom_or_compatible) { + c_all = DUK_HOBJECT_CMASK_ALL; + c_array = DUK_HOBJECT_CMASK_ARRAY; + c_unbox = DUK_HOBJECT_CMASK_NUMBER | DUK_HOBJECT_CMASK_STRING | DUK_HOBJECT_CMASK_BOOLEAN | + DUK_HOBJECT_CMASK_POINTER; /* Symbols are not unboxed. */ + c_func = DUK_HOBJECT_CMASK_FUNCTION; + c_bufobj = DUK_HOBJECT_CMASK_ALL_BUFOBJS; + c_undef = 0; + c_abort = 0; + c_object = c_all & ~(c_array | c_unbox | c_func | c_bufobj | c_undef | c_abort); + } else +#endif + { + c_all = DUK_HOBJECT_CMASK_ALL; + c_array = DUK_HOBJECT_CMASK_ARRAY; + c_unbox = DUK_HOBJECT_CMASK_NUMBER | DUK_HOBJECT_CMASK_STRING | + DUK_HOBJECT_CMASK_BOOLEAN; /* Symbols are not unboxed. */ + c_func = 0; + c_bufobj = 0; + c_undef = DUK_HOBJECT_CMASK_FUNCTION | DUK_HOBJECT_CMASK_POINTER; + /* As the fast path doesn't currently properly support + * duk_hbufobj virtual properties, abort fast path if + * we encounter them in plain JSON mode. + */ + c_abort = DUK_HOBJECT_CMASK_ALL_BUFOBJS; + c_object = c_all & ~(c_array | c_unbox | c_func | c_bufobj | c_undef | c_abort); + } + + c_bit = (duk_uint32_t) DUK_HOBJECT_GET_CLASS_MASK(obj); + if (c_bit & c_object) { + /* All other object types. */ + DUK__EMIT_1(js_ctx, DUK_ASC_LCURLY); + + /* A non-Array object should not have an array part in practice. + * But since it is supported internally (and perhaps used at some + * point), check and abandon if that's the case. + */ + if (DUK_HOBJECT_HAS_ARRAY_PART(obj)) { + DUK_DD(DUK_DDPRINT("non-Array object has array part, abort fast path")); + goto abort_fastpath; + } + + for (i = 0; i < (duk_uint_fast32_t) DUK_HOBJECT_GET_ENEXT(obj); i++) { + duk_hstring *k; + duk_size_t prev_size; + + k = DUK_HOBJECT_E_GET_KEY(js_ctx->thr->heap, obj, i); + if (!k) { + continue; + } + if (DUK_HSTRING_HAS_ARRIDX(k)) { + /* If an object has array index keys we would need + * to sort them into the ES2015 enumeration order to + * be consistent with the slow path. Abort the fast + * path and handle in the slow path for now. + */ + DUK_DD(DUK_DDPRINT("property key is an array index, abort fast path")); + goto abort_fastpath; + } + if (!DUK_HOBJECT_E_SLOT_IS_ENUMERABLE(js_ctx->thr->heap, obj, i)) { + continue; + } + if (DUK_HOBJECT_E_SLOT_IS_ACCESSOR(js_ctx->thr->heap, obj, i)) { + /* Getter might have arbitrary side effects, + * so bail out. + */ + DUK_DD(DUK_DDPRINT("property is an accessor, abort fast path")); + goto abort_fastpath; + } + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(k))) { + continue; + } + + tv_val = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(js_ctx->thr->heap, obj, i); + + prev_size = DUK_BW_GET_SIZE(js_ctx->thr, &js_ctx->bw); + if (DUK_UNLIKELY(js_ctx->h_gap != NULL)) { + duk__json_enc_newline_indent(js_ctx, js_ctx->recursion_depth); + duk__json_enc_key_autoquote(js_ctx, k); + DUK__EMIT_2(js_ctx, DUK_ASC_COLON, DUK_ASC_SPACE); + } else { + duk__json_enc_key_autoquote(js_ctx, k); + DUK__EMIT_1(js_ctx, DUK_ASC_COLON); + } + + if (duk__json_stringify_fast_value(js_ctx, tv_val) == 0) { + DUK_DD(DUK_DDPRINT("prop value not supported, rewind key and colon")); + DUK_BW_SET_SIZE(js_ctx->thr, &js_ctx->bw, prev_size); + } else { + DUK__EMIT_1(js_ctx, DUK_ASC_COMMA); + emitted = 1; + } + } + + /* If any non-Array value had enumerable virtual own + * properties, they should be serialized here (actually, + * before the explicit properties). Standard types don't. + */ + + if (emitted) { + DUK_ASSERT(*((duk_uint8_t *) DUK_BW_GET_PTR(js_ctx->thr, &js_ctx->bw) - 1) == DUK_ASC_COMMA); + DUK__UNEMIT_1(js_ctx); /* eat trailing comma */ + if (DUK_UNLIKELY(js_ctx->h_gap != NULL)) { + DUK_ASSERT(js_ctx->recursion_depth >= 1); + duk__json_enc_newline_indent(js_ctx, js_ctx->recursion_depth - 1U); + } + } + DUK__EMIT_1(js_ctx, DUK_ASC_RCURLY); + } else if (c_bit & c_array) { + duk_uint_fast32_t arr_len; + duk_uint_fast32_t asize; + + DUK__EMIT_1(js_ctx, DUK_ASC_LBRACKET); + + /* Assume arrays are dense in the fast path. */ + if (!DUK_HOBJECT_HAS_ARRAY_PART(obj)) { + DUK_DD(DUK_DDPRINT("Array object is sparse, abort fast path")); + goto abort_fastpath; + } + + arr_len = (duk_uint_fast32_t) ((duk_harray *) obj)->length; + asize = (duk_uint_fast32_t) DUK_HOBJECT_GET_ASIZE(obj); + /* Array part may be larger than 'length'; if so, iterate + * only up to array 'length'. Array part may also be smaller + * than 'length' in some cases. + */ + for (i = 0; i < arr_len; i++) { + duk_tval *tv_arrval; + duk_hstring *h_tmp; + duk_bool_t has_inherited; + + if (DUK_UNLIKELY(js_ctx->h_gap != NULL)) { + duk__json_enc_newline_indent(js_ctx, js_ctx->recursion_depth); + } + + if (DUK_LIKELY(i < asize)) { + tv_arrval = DUK_HOBJECT_A_GET_VALUE_PTR(js_ctx->thr->heap, obj, i); + if (DUK_LIKELY(!DUK_TVAL_IS_UNUSED(tv_arrval))) { + /* Expected case: element is present. */ + if (duk__json_stringify_fast_value(js_ctx, tv_arrval) == 0) { + DUK__EMIT_STRIDX(js_ctx, DUK_STRIDX_LC_NULL); + } + goto elem_done; + } + } + + /* Gap in array; check for inherited property, + * bail out if one exists. This should be enough + * to support gappy arrays for all practical code. + */ + + h_tmp = duk_push_uint_to_hstring(js_ctx->thr, (duk_uint_t) i); + has_inherited = duk_hobject_hasprop_raw(js_ctx->thr, obj, h_tmp); + duk_pop(js_ctx->thr); + if (has_inherited) { + DUK_D(DUK_DPRINT("gap in array, conflicting inherited property, abort fast path")); + goto abort_fastpath; + } + + /* Ordinary gap, undefined encodes to 'null' in + * standard JSON, but JX/JC use their form for + * undefined to better preserve the typing. + */ + DUK_D(DUK_DPRINT("gap in array, no conflicting inherited property, remain on fast path")); +#if defined(DUK_USE_JX) + DUK__EMIT_STRIDX(js_ctx, js_ctx->stridx_custom_undefined); +#else + DUK__EMIT_STRIDX(js_ctx, DUK_STRIDX_LC_NULL); +#endif + /* fall through */ + + elem_done: + DUK__EMIT_1(js_ctx, DUK_ASC_COMMA); + emitted = 1; + } + + if (emitted) { + DUK_ASSERT(*((duk_uint8_t *) DUK_BW_GET_PTR(js_ctx->thr, &js_ctx->bw) - 1) == DUK_ASC_COMMA); + DUK__UNEMIT_1(js_ctx); /* eat trailing comma */ + if (DUK_UNLIKELY(js_ctx->h_gap != NULL)) { + DUK_ASSERT(js_ctx->recursion_depth >= 1); + duk__json_enc_newline_indent(js_ctx, js_ctx->recursion_depth - 1U); + } + } + DUK__EMIT_1(js_ctx, DUK_ASC_RBRACKET); + } else if (c_bit & c_unbox) { + /* Certain boxed types are required to go through + * automatic unboxing. Rely on internal value being + * sane (to avoid infinite recursion). + */ + DUK_ASSERT((c_bit & DUK_HOBJECT_CMASK_SYMBOL) == 0); /* Symbols are not unboxed. */ + +#if 1 + /* The code below is incorrect if .toString() or .valueOf() have + * have been overridden. The correct approach would be to look up + * the method(s) and if they resolve to the built-in function we + * can safely bypass it and look up the internal value directly. + * Unimplemented for now, abort fast path for boxed values. + */ + goto abort_fastpath; +#else /* disabled */ + /* Disabled until fixed, see above. */ + duk_tval *tv_internal; + + DUK_DD(DUK_DDPRINT("auto unboxing in fast path")); + + tv_internal = duk_hobject_get_internal_value_tval_ptr(js_ctx->thr->heap, obj); + DUK_ASSERT(tv_internal != NULL); + DUK_ASSERT(DUK_TVAL_IS_STRING(tv_internal) || DUK_TVAL_IS_NUMBER(tv_internal) || + DUK_TVAL_IS_BOOLEAN(tv_internal) || DUK_TVAL_IS_POINTER(tv_internal)); + + tv = tv_internal; + DUK_ASSERT(js_ctx->recursion_depth > 0); + js_ctx->recursion_depth--; /* required to keep recursion depth correct */ + goto restart_match; +#endif /* disabled */ +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + } else if (c_bit & c_func) { + DUK__EMIT_STRIDX(js_ctx, js_ctx->stridx_custom_function); +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + } else if (c_bit & c_bufobj) { + duk__json_enc_bufobj(js_ctx, (duk_hbufobj *) obj); +#endif +#endif + } else if (c_bit & c_abort) { + DUK_DD(DUK_DDPRINT("abort fast path for unsupported type")); + goto abort_fastpath; + } else { + DUK_ASSERT((c_bit & c_undef) != 0); + + /* Must decrease recursion depth before returning. */ + DUK_ASSERT(js_ctx->recursion_depth > 0); + DUK_ASSERT(js_ctx->recursion_depth <= js_ctx->recursion_limit); + js_ctx->recursion_depth--; + goto emit_undefined; + } + + DUK_ASSERT(js_ctx->recursion_depth > 0); + DUK_ASSERT(js_ctx->recursion_depth <= js_ctx->recursion_limit); + js_ctx->recursion_depth--; + break; + } + case DUK_TAG_BUFFER: { + /* Plain buffers are treated like Uint8Arrays: they have + * enumerable indices. Other virtual properties are not + * enumerable, and inherited properties are not serialized. + * However, there can be a replacer (not relevant here) or + * a .toJSON() method (which we need to check for explicitly). + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + if (duk_hobject_hasprop_raw(js_ctx->thr, + js_ctx->thr->builtins[DUK_BIDX_UINT8ARRAY_PROTOTYPE], + DUK_HTHREAD_STRING_TO_JSON(js_ctx->thr))) { + DUK_DD(DUK_DDPRINT("value is a plain buffer and there's an inherited .toJSON, abort fast path")); + goto abort_fastpath; + } +#endif + +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + if (js_ctx->flag_ext_custom_or_compatible) { + duk__json_enc_buffer_jx_jc(js_ctx, DUK_TVAL_GET_BUFFER(tv)); + break; + } +#endif + + /* Plain buffers mimic Uint8Arrays, and have enumerable index + * properties. + */ + duk__json_enc_buffer_json_fastpath(js_ctx, DUK_TVAL_GET_BUFFER(tv)); + break; + } + case DUK_TAG_POINTER: { +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + if (js_ctx->flag_ext_custom_or_compatible) { + duk__json_enc_pointer(js_ctx, DUK_TVAL_GET_POINTER(tv)); + break; + } else { + goto emit_undefined; + } +#else + goto emit_undefined; +#endif + } + case DUK_TAG_LIGHTFUNC: { + /* A lightfunc might also inherit a .toJSON() so just bail out. */ + /* XXX: Could just lookup .toJSON() and continue in fast path, + * as it would almost never be defined. + */ + DUK_DD(DUK_DDPRINT("value is a lightfunc, abort fast path")); + goto abort_fastpath; + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: { + /* Number serialization has a significant impact relative to + * other fast path code, so careful fast path for fastints. + */ + duk__json_enc_fastint_tval(js_ctx, tv); + break; + } +#endif + default: { + /* XXX: A fast path for usual integers would be useful when + * fastint support is not enabled. + */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + + /* XXX: Stack discipline is annoying, could be changed in numconv. */ + duk_push_tval(js_ctx->thr, tv); + duk__json_enc_double(js_ctx); + duk_pop(js_ctx->thr); + +#if 0 + /* Could also rely on native sprintf(), but it will handle + * values like NaN, Infinity, -0, exponent notation etc in + * a JSON-incompatible way. + */ + duk_double_t d; + char buf[64]; + + DUK_ASSERT(DUK_TVAL_IS_DOUBLE(tv)); + d = DUK_TVAL_GET_DOUBLE(tv); + DUK_SPRINTF(buf, "%lg", d); + DUK__EMIT_CSTR(js_ctx, buf); +#endif + } + } + return 1; /* not undefined */ + +emit_undefined: + return 0; /* value was undefined/unsupported */ + +abort_fastpath: + /* Error message doesn't matter: the error is ignored anyway. */ + DUK_DD(DUK_DDPRINT("aborting fast path")); + DUK_ERROR_INTERNAL(js_ctx->thr); + DUK_WO_NORETURN(return 0;); +} + +DUK_LOCAL duk_ret_t duk__json_stringify_fast(duk_hthread *thr, void *udata) { + duk_json_enc_ctx *js_ctx; + duk_tval *tv; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(udata != NULL); + + js_ctx = (duk_json_enc_ctx *) udata; + DUK_ASSERT(js_ctx != NULL); + + tv = DUK_GET_TVAL_NEGIDX(thr, -1); + if (duk__json_stringify_fast_value(js_ctx, tv) == 0) { + DUK_DD(DUK_DDPRINT("top level value not supported, fail fast path")); + DUK_DCERROR_TYPE_INVALID_ARGS(thr); /* Error message is ignored, so doesn't matter. */ + } + + return 0; +} +#endif /* DUK_USE_JSON_STRINGIFY_FASTPATH */ + +/* + * Top level wrappers + */ + +DUK_INTERNAL +void duk_bi_json_parse_helper(duk_hthread *thr, duk_idx_t idx_value, duk_idx_t idx_reviver, duk_small_uint_t flags) { + duk_json_dec_ctx js_ctx_alloc; + duk_json_dec_ctx *js_ctx = &js_ctx_alloc; + duk_hstring *h_text; +#if defined(DUK_USE_ASSERTIONS) + duk_idx_t entry_top = duk_get_top(thr); +#endif + + /* negative top-relative indices not allowed now */ + DUK_ASSERT(idx_value == DUK_INVALID_INDEX || idx_value >= 0); + DUK_ASSERT(idx_reviver == DUK_INVALID_INDEX || idx_reviver >= 0); + + DUK_DDD(DUK_DDDPRINT("JSON parse start: text=%!T, reviver=%!T, flags=0x%08lx, stack_top=%ld", + (duk_tval *) duk_get_tval(thr, idx_value), + (duk_tval *) duk_get_tval(thr, idx_reviver), + (unsigned long) flags, + (long) duk_get_top(thr))); + + duk_memzero(&js_ctx_alloc, sizeof(js_ctx_alloc)); + js_ctx->thr = thr; +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + /* nothing now */ +#endif + js_ctx->recursion_limit = DUK_USE_JSON_DEC_RECLIMIT; + DUK_ASSERT(js_ctx->recursion_depth == 0); + + /* Flag handling currently assumes that flags are consistent. This is OK + * because the call sites are now strictly controlled. + */ + + js_ctx->flags = flags; +#if defined(DUK_USE_JX) + js_ctx->flag_ext_custom = flags & DUK_JSON_FLAG_EXT_CUSTOM; +#endif +#if defined(DUK_USE_JC) + js_ctx->flag_ext_compatible = flags & DUK_JSON_FLAG_EXT_COMPATIBLE; +#endif +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + js_ctx->flag_ext_custom_or_compatible = flags & (DUK_JSON_FLAG_EXT_CUSTOM | DUK_JSON_FLAG_EXT_COMPATIBLE); +#endif + + h_text = duk_to_hstring(thr, idx_value); /* coerce in-place; rejects Symbols */ + DUK_ASSERT(h_text != NULL); + + /* JSON parsing code is allowed to read [p_start,p_end]: p_end is + * valid and points to the string NUL terminator (which is always + * guaranteed for duk_hstrings. + */ + js_ctx->p_start = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_text); + js_ctx->p = js_ctx->p_start; + js_ctx->p_end = ((const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_text)) + DUK_HSTRING_GET_BYTELEN(h_text); + DUK_ASSERT(*(js_ctx->p_end) == 0x00); + + duk__json_dec_value(js_ctx); /* -> [ ... value ] */ + DUK_ASSERT(js_ctx->recursion_depth == 0); + + /* Trailing whitespace has been eaten by duk__json_dec_value(), so if + * we're not at end of input here, it's a SyntaxError. + */ + + if (js_ctx->p != js_ctx->p_end) { + duk__json_dec_syntax_error(js_ctx); + } + + if (duk_is_callable(thr, idx_reviver)) { + DUK_DDD(DUK_DDDPRINT("applying reviver: %!T", (duk_tval *) duk_get_tval(thr, idx_reviver))); + + js_ctx->idx_reviver = idx_reviver; + + duk_push_object(thr); + duk_dup_m2(thr); /* -> [ ... val root val ] */ + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_EMPTY_STRING); /* default attrs ok */ + duk_push_hstring_stridx(thr, DUK_STRIDX_EMPTY_STRING); /* -> [ ... val root "" ] */ + + DUK_DDD(DUK_DDDPRINT("start reviver walk, root=%!T, name=%!T", + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + + DUK_ASSERT(js_ctx->recursion_depth == 0); + duk__json_dec_reviver_walk(js_ctx); /* [ ... val root "" ] -> [ ... val val' ] */ + DUK_ASSERT(js_ctx->recursion_depth == 0); + duk_remove_m2(thr); /* -> [ ... val' ] */ + } else { + DUK_DDD( + DUK_DDDPRINT("reviver does not exist or is not callable: %!T", (duk_tval *) duk_get_tval(thr, idx_reviver))); + } + + /* Final result is at stack top. */ + + DUK_DDD(DUK_DDDPRINT("JSON parse end: text=%!T, reviver=%!T, flags=0x%08lx, result=%!T, stack_top=%ld", + (duk_tval *) duk_get_tval(thr, idx_value), + (duk_tval *) duk_get_tval(thr, idx_reviver), + (unsigned long) flags, + (duk_tval *) duk_get_tval(thr, -1), + (long) duk_get_top(thr))); + + DUK_ASSERT(duk_get_top(thr) == entry_top + 1); +} + +DUK_INTERNAL +void duk_bi_json_stringify_helper(duk_hthread *thr, + duk_idx_t idx_value, + duk_idx_t idx_replacer, + duk_idx_t idx_space, + duk_small_uint_t flags) { + duk_json_enc_ctx js_ctx_alloc; + duk_json_enc_ctx *js_ctx = &js_ctx_alloc; + duk_hobject *h; + duk_idx_t idx_holder; + duk_idx_t entry_top; + + /* negative top-relative indices not allowed now */ + DUK_ASSERT(idx_value == DUK_INVALID_INDEX || idx_value >= 0); + DUK_ASSERT(idx_replacer == DUK_INVALID_INDEX || idx_replacer >= 0); + DUK_ASSERT(idx_space == DUK_INVALID_INDEX || idx_space >= 0); + + DUK_DDD(DUK_DDDPRINT("JSON stringify start: value=%!T, replacer=%!T, space=%!T, flags=0x%08lx, stack_top=%ld", + (duk_tval *) duk_get_tval(thr, idx_value), + (duk_tval *) duk_get_tval(thr, idx_replacer), + (duk_tval *) duk_get_tval(thr, idx_space), + (unsigned long) flags, + (long) duk_get_top(thr))); + + entry_top = duk_get_top(thr); + + /* + * Context init + */ + + duk_memzero(&js_ctx_alloc, sizeof(js_ctx_alloc)); + js_ctx->thr = thr; +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + js_ctx->h_replacer = NULL; + js_ctx->h_gap = NULL; +#endif + js_ctx->idx_proplist = -1; + + /* Flag handling currently assumes that flags are consistent. This is OK + * because the call sites are now strictly controlled. + */ + + js_ctx->flags = flags; + js_ctx->flag_ascii_only = flags & DUK_JSON_FLAG_ASCII_ONLY; + js_ctx->flag_avoid_key_quotes = flags & DUK_JSON_FLAG_AVOID_KEY_QUOTES; +#if defined(DUK_USE_JX) + js_ctx->flag_ext_custom = flags & DUK_JSON_FLAG_EXT_CUSTOM; +#endif +#if defined(DUK_USE_JC) + js_ctx->flag_ext_compatible = flags & DUK_JSON_FLAG_EXT_COMPATIBLE; +#endif +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + js_ctx->flag_ext_custom_or_compatible = flags & (DUK_JSON_FLAG_EXT_CUSTOM | DUK_JSON_FLAG_EXT_COMPATIBLE); +#endif + + /* The #if defined() clutter here handles the JX/JC enable/disable + * combinations properly. + */ +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + js_ctx->stridx_custom_undefined = DUK_STRIDX_LC_NULL; /* standard JSON; array gaps */ +#if defined(DUK_USE_JX) + if (flags & DUK_JSON_FLAG_EXT_CUSTOM) { + js_ctx->stridx_custom_undefined = DUK_STRIDX_LC_UNDEFINED; + js_ctx->stridx_custom_nan = DUK_STRIDX_NAN; + js_ctx->stridx_custom_neginf = DUK_STRIDX_MINUS_INFINITY; + js_ctx->stridx_custom_posinf = DUK_STRIDX_INFINITY; + js_ctx->stridx_custom_function = + (flags & DUK_JSON_FLAG_AVOID_KEY_QUOTES) ? DUK_STRIDX_JSON_EXT_FUNCTION2 : DUK_STRIDX_JSON_EXT_FUNCTION1; + } +#endif /* DUK_USE_JX */ +#if defined(DUK_USE_JX) && defined(DUK_USE_JC) + else +#endif /* DUK_USE_JX && DUK_USE_JC */ +#if defined(DUK_USE_JC) + if (js_ctx->flags & DUK_JSON_FLAG_EXT_COMPATIBLE) { + js_ctx->stridx_custom_undefined = DUK_STRIDX_JSON_EXT_UNDEFINED; + js_ctx->stridx_custom_nan = DUK_STRIDX_JSON_EXT_NAN; + js_ctx->stridx_custom_neginf = DUK_STRIDX_JSON_EXT_NEGINF; + js_ctx->stridx_custom_posinf = DUK_STRIDX_JSON_EXT_POSINF; + js_ctx->stridx_custom_function = DUK_STRIDX_JSON_EXT_FUNCTION1; + } +#endif /* DUK_USE_JC */ +#endif /* DUK_USE_JX || DUK_USE_JC */ + +#if defined(DUK_USE_JX) || defined(DUK_USE_JC) + if (js_ctx->flags & (DUK_JSON_FLAG_EXT_CUSTOM | DUK_JSON_FLAG_EXT_COMPATIBLE)) { + DUK_ASSERT(js_ctx->mask_for_undefined == 0); /* already zero */ + } else +#endif /* DUK_USE_JX || DUK_USE_JC */ + { + /* Plain buffer is treated like ArrayBuffer and serialized. + * Lightfuncs are treated like objects, but JSON explicitly + * skips serializing Function objects so we can just reject + * lightfuncs here. + */ + js_ctx->mask_for_undefined = DUK_TYPE_MASK_UNDEFINED | DUK_TYPE_MASK_POINTER | DUK_TYPE_MASK_LIGHTFUNC; + } + + DUK_BW_INIT_PUSHBUF(thr, &js_ctx->bw, DUK__JSON_STRINGIFY_BUFSIZE); + + js_ctx->idx_loop = duk_push_bare_object(thr); + DUK_ASSERT(js_ctx->idx_loop >= 0); + + /* [ ... buf loop ] */ + + /* + * Process replacer/proplist (2nd argument to JSON.stringify) + */ + + h = duk_get_hobject(thr, idx_replacer); + if (h != NULL) { + if (DUK_HOBJECT_IS_CALLABLE(h)) { + js_ctx->h_replacer = h; + } else if (duk_js_isarray_hobject(h)) { + /* Here the specification requires correct array index enumeration + * which is a bit tricky for sparse arrays (it is handled by the + * enum setup code). We now enumerate ancestors too, although the + * specification is not very clear on whether that is required. + */ + + duk_uarridx_t plist_idx = 0; + duk_small_uint_t enum_flags; + + js_ctx->idx_proplist = duk_push_bare_array(thr); + + enum_flags = DUK_ENUM_ARRAY_INDICES_ONLY | DUK_ENUM_SORT_ARRAY_INDICES; /* expensive flag */ + duk_enum(thr, idx_replacer, enum_flags); + while (duk_next(thr, -1 /*enum_index*/, 1 /*get_value*/)) { + /* [ ... proplist enum_obj key val ] */ + if (duk__json_enc_allow_into_proplist(duk_get_tval(thr, -1))) { + /* XXX: duplicates should be eliminated here */ + DUK_DDD(DUK_DDDPRINT("proplist enum: key=%!T, val=%!T --> accept", + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + duk_to_string(thr, -1); /* extra coercion of strings is OK */ + duk_put_prop_index(thr, -4, plist_idx); /* -> [ ... proplist enum_obj key ] */ + plist_idx++; + duk_pop(thr); + } else { + DUK_DDD(DUK_DDDPRINT("proplist enum: key=%!T, val=%!T --> reject", + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + duk_pop_2(thr); + } + } + duk_pop(thr); /* pop enum */ + + /* [ ... proplist ] */ + } + } + + /* [ ... buf loop (proplist) ] */ + + /* + * Process space (3rd argument to JSON.stringify) + */ + + h = duk_get_hobject(thr, idx_space); + if (h != NULL) { + duk_small_uint_t c = DUK_HOBJECT_GET_CLASS_NUMBER(h); + if (c == DUK_HOBJECT_CLASS_NUMBER) { + duk_to_number(thr, idx_space); + } else if (c == DUK_HOBJECT_CLASS_STRING) { + duk_to_string(thr, idx_space); + } + } + + if (duk_is_number(thr, idx_space)) { + duk_small_int_t nspace; + /* spaces[] must be static to allow initializer with old compilers like BCC */ + static const char spaces[10] = { + DUK_ASC_SPACE, DUK_ASC_SPACE, DUK_ASC_SPACE, DUK_ASC_SPACE, DUK_ASC_SPACE, + DUK_ASC_SPACE, DUK_ASC_SPACE, DUK_ASC_SPACE, DUK_ASC_SPACE, DUK_ASC_SPACE + }; /* XXX: helper */ + + /* ToInteger() coercion; NaN -> 0, infinities are clamped to 0 and 10 */ + nspace = (duk_small_int_t) duk_to_int_clamped(thr, idx_space, 0 /*minval*/, 10 /*maxval*/); + DUK_ASSERT(nspace >= 0 && nspace <= 10); + + duk_push_lstring(thr, spaces, (duk_size_t) nspace); + js_ctx->h_gap = duk_known_hstring(thr, -1); + DUK_ASSERT(js_ctx->h_gap != NULL); + } else if (duk_is_string_notsymbol(thr, idx_space)) { + duk_dup(thr, idx_space); + duk_substring(thr, -1, 0, 10); /* clamp to 10 chars */ + js_ctx->h_gap = duk_known_hstring(thr, -1); + } else { + /* nop */ + } + + if (js_ctx->h_gap != NULL) { + /* If gap is empty, behave as if not given at all. Check + * against byte length because character length is more + * expensive. + */ + if (DUK_HSTRING_GET_BYTELEN(js_ctx->h_gap) == 0) { + js_ctx->h_gap = NULL; + } + } + + /* [ ... buf loop (proplist) (gap) ] */ + + /* + * Fast path: assume no mutation, iterate object property tables + * directly; bail out if that assumption doesn't hold. + */ + +#if defined(DUK_USE_JSON_STRINGIFY_FASTPATH) + if (js_ctx->h_replacer == NULL && /* replacer is a mutation risk */ + js_ctx->idx_proplist == -1) { /* proplist is very rare */ + duk_int_t pcall_rc; + duk_small_uint_t prev_ms_base_flags; + + DUK_DD(DUK_DDPRINT("try JSON.stringify() fast path")); + + /* Use recursion_limit to ensure we don't overwrite js_ctx->visiting[] + * array so we don't need two counter checks in the fast path. The + * slow path has a much larger recursion limit which we'll use if + * necessary. + */ + DUK_ASSERT(DUK_USE_JSON_ENC_RECLIMIT >= DUK_JSON_ENC_LOOPARRAY); + js_ctx->recursion_limit = DUK_JSON_ENC_LOOPARRAY; + DUK_ASSERT(js_ctx->recursion_depth == 0); + + /* Execute the fast path in a protected call. If any error is thrown, + * fall back to the slow path. This includes e.g. recursion limit + * because the fast path has a smaller recursion limit (and simpler, + * limited loop detection). + */ + + duk_dup(thr, idx_value); + + /* Must prevent finalizers which may have arbitrary side effects. */ + prev_ms_base_flags = thr->heap->ms_base_flags; + thr->heap->ms_base_flags |= DUK_MS_FLAG_NO_OBJECT_COMPACTION; /* Avoid attempt to compact any objects. */ + thr->heap->pf_prevent_count++; /* Prevent finalizers. */ + DUK_ASSERT(thr->heap->pf_prevent_count != 0); /* Wrap. */ + + pcall_rc = duk_safe_call(thr, duk__json_stringify_fast, (void *) js_ctx /*udata*/, 1 /*nargs*/, 0 /*nret*/); + + DUK_ASSERT(thr->heap->pf_prevent_count > 0); + thr->heap->pf_prevent_count--; + thr->heap->ms_base_flags = prev_ms_base_flags; + + if (pcall_rc == DUK_EXEC_SUCCESS) { + DUK_DD(DUK_DDPRINT("fast path successful")); + DUK_BW_PUSH_AS_STRING(thr, &js_ctx->bw); + goto replace_finished; + } + + /* We come here for actual aborts (like encountering .toJSON()) + * but also for recursion/loop errors. Bufwriter size can be + * kept because we'll probably need at least as much as we've + * allocated so far. + */ + DUK_D(DUK_DPRINT("fast path failed, serialize using slow path instead")); + DUK_BW_RESET_SIZE(thr, &js_ctx->bw); + js_ctx->recursion_depth = 0; + } +#endif + + /* + * Create wrapper object and serialize + */ + + idx_holder = duk_push_object(thr); + duk_dup(thr, idx_value); + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_EMPTY_STRING); + + DUK_DDD(DUK_DDDPRINT("before: flags=0x%08lx, loop=%!T, replacer=%!O, " + "proplist=%!T, gap=%!O, holder=%!T", + (unsigned long) js_ctx->flags, + (duk_tval *) duk_get_tval(thr, js_ctx->idx_loop), + (duk_heaphdr *) js_ctx->h_replacer, + (duk_tval *) (js_ctx->idx_proplist >= 0 ? duk_get_tval(thr, js_ctx->idx_proplist) : NULL), + (duk_heaphdr *) js_ctx->h_gap, + (duk_tval *) duk_get_tval(thr, -1))); + + /* serialize the wrapper with empty string key */ + + duk_push_hstring_empty(thr); + + /* [ ... buf loop (proplist) (gap) holder "" ] */ + + js_ctx->recursion_limit = DUK_USE_JSON_ENC_RECLIMIT; + DUK_ASSERT(js_ctx->recursion_depth == 0); + + if (DUK_UNLIKELY(duk__json_enc_value(js_ctx, idx_holder) == 0)) { /* [ ... holder key ] -> [ ... holder ] */ + /* Result is undefined. */ + duk_push_undefined(thr); + } else { + /* Convert buffer to result string. */ + DUK_BW_PUSH_AS_STRING(thr, &js_ctx->bw); + } + + DUK_DDD(DUK_DDDPRINT("after: flags=0x%08lx, loop=%!T, replacer=%!O, " + "proplist=%!T, gap=%!O, holder=%!T", + (unsigned long) js_ctx->flags, + (duk_tval *) duk_get_tval(thr, js_ctx->idx_loop), + (duk_heaphdr *) js_ctx->h_replacer, + (duk_tval *) (js_ctx->idx_proplist >= 0 ? duk_get_tval(thr, js_ctx->idx_proplist) : NULL), + (duk_heaphdr *) js_ctx->h_gap, + (duk_tval *) duk_get_tval(thr, idx_holder))); + + /* The stack has a variable shape here, so force it to the + * desired one explicitly. + */ + +#if defined(DUK_USE_JSON_STRINGIFY_FASTPATH) +replace_finished: +#endif + duk_replace(thr, entry_top); + duk_set_top(thr, entry_top + 1); + + DUK_DDD(DUK_DDDPRINT("JSON stringify end: value=%!T, replacer=%!T, space=%!T, " + "flags=0x%08lx, result=%!T, stack_top=%ld", + (duk_tval *) duk_get_tval(thr, idx_value), + (duk_tval *) duk_get_tval(thr, idx_replacer), + (duk_tval *) duk_get_tval(thr, idx_space), + (unsigned long) flags, + (duk_tval *) duk_get_tval(thr, -1), + (long) duk_get_top(thr))); + + DUK_ASSERT(duk_get_top(thr) == entry_top + 1); +} + +#if defined(DUK_USE_JSON_BUILTIN) + +/* + * Entry points + */ + +DUK_INTERNAL duk_ret_t duk_bi_json_object_parse(duk_hthread *thr) { + duk_bi_json_parse_helper(thr, 0 /*idx_value*/, 1 /*idx_replacer*/, 0 /*flags*/); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_json_object_stringify(duk_hthread *thr) { + duk_bi_json_stringify_helper(thr, 0 /*idx_value*/, 1 /*idx_replacer*/, 2 /*idx_space*/, 0 /*flags*/); + return 1; +} + +#endif /* DUK_USE_JSON_BUILTIN */ + +#endif /* DUK_USE_JSON_SUPPORT */ + +/* automatic undefs */ +#undef DUK__EMIT_1 +#undef DUK__EMIT_2 +#undef DUK__EMIT_CSTR +#undef DUK__EMIT_HSTR +#undef DUK__EMIT_STRIDX +#undef DUK__JSON_DECSTR_BUFSIZE +#undef DUK__JSON_DECSTR_CHUNKSIZE +#undef DUK__JSON_ENCSTR_CHUNKSIZE +#undef DUK__JSON_MAX_ESC_LEN +#undef DUK__JSON_STRINGIFY_BUFSIZE +#undef DUK__MKESC +#undef DUK__UNEMIT_1 +#line 1 "duk_bi_math.c" +/* + * Math built-ins + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_MATH_BUILTIN) + +/* + * Use static helpers which can work with math.h functions matching + * the following signatures. This is not portable if any of these math + * functions is actually a macro. + * + * Typing here is intentionally 'double' wherever values interact with + * the standard library APIs. + */ + +typedef double (*duk__one_arg_func)(double); +typedef double (*duk__two_arg_func)(double, double); + +DUK_LOCAL duk_ret_t duk__math_minmax(duk_hthread *thr, duk_double_t initial, duk__two_arg_func min_max) { + duk_idx_t n = duk_get_top(thr); + duk_idx_t i; + duk_double_t res = initial; + duk_double_t t; + + /* + * Note: fmax() does not match the E5 semantics. E5 requires + * that if -any- input to Math.max() is a NaN, the result is a + * NaN. fmax() will return a NaN only if -both- inputs are NaN. + * Same applies to fmin(). + * + * Note: every input value must be coerced with ToNumber(), even + * if we know the result will be a NaN anyway: ToNumber() may have + * side effects for which even order of evaluation matters. + */ + + for (i = 0; i < n; i++) { + t = duk_to_number(thr, i); + if (DUK_FPCLASSIFY(t) == DUK_FP_NAN || DUK_FPCLASSIFY(res) == DUK_FP_NAN) { + /* Note: not normalized, but duk_push_number() will normalize */ + res = (duk_double_t) DUK_DOUBLE_NAN; + } else { + res = (duk_double_t) min_max(res, (double) t); + } + } + + duk_push_number(thr, res); + return 1; +} + +DUK_LOCAL double duk__fmin_fixed(double x, double y) { + /* fmin() with args -0 and +0 is not guaranteed to return + * -0 as ECMAScript requires. + */ + if (duk_double_equals(x, 0.0) && duk_double_equals(y, 0.0)) { + duk_double_union du1, du2; + du1.d = x; + du2.d = y; + + /* Already checked to be zero so these must hold, and allow us + * to check for "x is -0 or y is -0" by ORing the high parts + * for comparison. + */ + DUK_ASSERT(du1.ui[DUK_DBL_IDX_UI0] == 0 || du1.ui[DUK_DBL_IDX_UI0] == 0x80000000UL); + DUK_ASSERT(du2.ui[DUK_DBL_IDX_UI0] == 0 || du2.ui[DUK_DBL_IDX_UI0] == 0x80000000UL); + + /* XXX: what's the safest way of creating a negative zero? */ + if ((du1.ui[DUK_DBL_IDX_UI0] | du2.ui[DUK_DBL_IDX_UI0]) != 0) { + /* Enter here if either x or y (or both) is -0. */ + return -0.0; + } else { + return +0.0; + } + } + return duk_double_fmin(x, y); +} + +DUK_LOCAL double duk__fmax_fixed(double x, double y) { + /* fmax() with args -0 and +0 is not guaranteed to return + * +0 as ECMAScript requires. + */ + if (duk_double_equals(x, 0.0) && duk_double_equals(y, 0.0)) { + if (DUK_SIGNBIT(x) == 0 || DUK_SIGNBIT(y) == 0) { + return +0.0; + } else { + return -0.0; + } + } + return duk_double_fmax(x, y); +} + +#if defined(DUK_USE_ES6) +DUK_LOCAL double duk__cbrt(double x) { + /* cbrt() is C99. To avoid hassling embedders with the need to provide a + * cube root function, we can get by with pow(). The result is not + * identical, but that's OK: ES2015 says it's implementation-dependent. + */ + +#if defined(DUK_CBRT) + /* cbrt() matches ES2015 requirements. */ + return DUK_CBRT(x); +#else + duk_small_int_t c = (duk_small_int_t) DUK_FPCLASSIFY(x); + + /* pow() does not, however. */ + if (c == DUK_FP_NAN || c == DUK_FP_INFINITE || c == DUK_FP_ZERO) { + return x; + } + if (DUK_SIGNBIT(x)) { + return -DUK_POW(-x, 1.0 / 3.0); + } else { + return DUK_POW(x, 1.0 / 3.0); + } +#endif +} + +DUK_LOCAL double duk__log2(double x) { +#if defined(DUK_LOG2) + return DUK_LOG2(x); +#else + return DUK_LOG(x) * DUK_DOUBLE_LOG2E; +#endif +} + +DUK_LOCAL double duk__log10(double x) { +#if defined(DUK_LOG10) + return DUK_LOG10(x); +#else + return DUK_LOG(x) * DUK_DOUBLE_LOG10E; +#endif +} + +DUK_LOCAL double duk__trunc(double x) { +#if defined(DUK_TRUNC) + return DUK_TRUNC(x); +#else + /* Handles -0 correctly: -0.0 matches 'x >= 0.0' but floor() + * is required to return -0 when the argument is -0. + */ + return x >= 0.0 ? DUK_FLOOR(x) : DUK_CEIL(x); +#endif +} +#endif /* DUK_USE_ES6 */ + +DUK_LOCAL double duk__round_fixed(double x) { + /* Numbers half-way between integers must be rounded towards +Infinity, + * e.g. -3.5 must be rounded to -3 (not -4). When rounded to zero, zero + * sign must be set appropriately. E5.1 Section 15.8.2.15. + * + * Note that ANSI C round() is "round to nearest integer, away from zero", + * which is incorrect for negative values. Here we make do with floor(). + */ + + duk_small_int_t c = (duk_small_int_t) DUK_FPCLASSIFY(x); + if (c == DUK_FP_NAN || c == DUK_FP_INFINITE || c == DUK_FP_ZERO) { + return x; + } + + /* + * x is finite and non-zero + * + * -1.6 -> floor(-1.1) -> -2 + * -1.5 -> floor(-1.0) -> -1 (towards +Inf) + * -1.4 -> floor(-0.9) -> -1 + * -0.5 -> -0.0 (special case) + * -0.1 -> -0.0 (special case) + * +0.1 -> +0.0 (special case) + * +0.5 -> floor(+1.0) -> 1 (towards +Inf) + * +1.4 -> floor(+1.9) -> 1 + * +1.5 -> floor(+2.0) -> 2 (towards +Inf) + * +1.6 -> floor(+2.1) -> 2 + */ + + if (x >= -0.5 && x < 0.5) { + /* +0.5 is handled by floor, this is on purpose */ + if (x < 0.0) { + return -0.0; + } else { + return +0.0; + } + } + + return DUK_FLOOR(x + 0.5); +} + +/* Wrappers for calling standard math library methods. These may be required + * on platforms where one or more of the math built-ins are defined as macros + * or inline functions and are thus not suitable to be used as function pointers. + */ +#if defined(DUK_USE_AVOID_PLATFORM_FUNCPTRS) +DUK_LOCAL double duk__fabs(double x) { + return DUK_FABS(x); +} +DUK_LOCAL double duk__acos(double x) { + return DUK_ACOS(x); +} +DUK_LOCAL double duk__asin(double x) { + return DUK_ASIN(x); +} +DUK_LOCAL double duk__atan(double x) { + return DUK_ATAN(x); +} +DUK_LOCAL double duk__ceil(double x) { + return DUK_CEIL(x); +} +DUK_LOCAL double duk__cos(double x) { + return DUK_COS(x); +} +DUK_LOCAL double duk__exp(double x) { + return DUK_EXP(x); +} +DUK_LOCAL double duk__floor(double x) { + return DUK_FLOOR(x); +} +DUK_LOCAL double duk__log(double x) { + return DUK_LOG(x); +} +DUK_LOCAL double duk__sin(double x) { + return DUK_SIN(x); +} +DUK_LOCAL double duk__sqrt(double x) { + return DUK_SQRT(x); +} +DUK_LOCAL double duk__tan(double x) { + return DUK_TAN(x); +} +DUK_LOCAL double duk__atan2_fixed(double x, double y) { +#if defined(DUK_USE_ATAN2_WORKAROUNDS) + /* Specific fixes to common atan2() implementation issues: + * - test-bug-mingw-math-issues.js + */ + if (DUK_ISINF(x) && DUK_ISINF(y)) { + if (DUK_SIGNBIT(x)) { + if (DUK_SIGNBIT(y)) { + return -2.356194490192345; + } else { + return -0.7853981633974483; + } + } else { + if (DUK_SIGNBIT(y)) { + return 2.356194490192345; + } else { + return 0.7853981633974483; + } + } + } +#else + /* Some ISO C assumptions. */ + + DUK_ASSERT(duk_double_equals(DUK_ATAN2(DUK_DOUBLE_INFINITY, DUK_DOUBLE_INFINITY), 0.7853981633974483)); + DUK_ASSERT(duk_double_equals(DUK_ATAN2(-DUK_DOUBLE_INFINITY, DUK_DOUBLE_INFINITY), -0.7853981633974483)); + DUK_ASSERT(duk_double_equals(DUK_ATAN2(DUK_DOUBLE_INFINITY, -DUK_DOUBLE_INFINITY), 2.356194490192345)); + DUK_ASSERT(duk_double_equals(DUK_ATAN2(-DUK_DOUBLE_INFINITY, -DUK_DOUBLE_INFINITY), -2.356194490192345)); +#endif + + return DUK_ATAN2(x, y); +} +#endif /* DUK_USE_AVOID_PLATFORM_FUNCPTRS */ + +/* order must match constants in genbuiltins.py */ +DUK_LOCAL const duk__one_arg_func duk__one_arg_funcs[] = { +#if defined(DUK_USE_AVOID_PLATFORM_FUNCPTRS) + duk__fabs, duk__acos, duk__asin, duk__atan, duk__ceil, duk__cos, duk__exp, + duk__floor, duk__log, duk__round_fixed, duk__sin, duk__sqrt, duk__tan, +#if defined(DUK_USE_ES6) + duk__cbrt, duk__log2, duk__log10, duk__trunc +#endif +#else /* DUK_USE_AVOID_PLATFORM_FUNCPTRS */ + DUK_FABS, DUK_ACOS, DUK_ASIN, DUK_ATAN, DUK_CEIL, DUK_COS, DUK_EXP, + DUK_FLOOR, DUK_LOG, duk__round_fixed, DUK_SIN, DUK_SQRT, DUK_TAN, +#if defined(DUK_USE_ES6) + duk__cbrt, duk__log2, duk__log10, duk__trunc +#endif +#endif /* DUK_USE_AVOID_PLATFORM_FUNCPTRS */ +}; + +/* order must match constants in genbuiltins.py */ +DUK_LOCAL const duk__two_arg_func duk__two_arg_funcs[] = { +#if defined(DUK_USE_AVOID_PLATFORM_FUNCPTRS) + duk__atan2_fixed, + duk_js_arith_pow +#else + duk__atan2_fixed, + duk_js_arith_pow +#endif +}; + +DUK_INTERNAL duk_ret_t duk_bi_math_object_onearg_shared(duk_hthread *thr) { + duk_small_int_t fun_idx = duk_get_current_magic(thr); + duk__one_arg_func fun; + duk_double_t arg1; + + DUK_ASSERT(fun_idx >= 0); + DUK_ASSERT(fun_idx < (duk_small_int_t) (sizeof(duk__one_arg_funcs) / sizeof(duk__one_arg_func))); + arg1 = duk_to_number(thr, 0); + fun = duk__one_arg_funcs[fun_idx]; + duk_push_number(thr, (duk_double_t) fun((double) arg1)); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_math_object_twoarg_shared(duk_hthread *thr) { + duk_small_int_t fun_idx = duk_get_current_magic(thr); + duk__two_arg_func fun; + duk_double_t arg1; + duk_double_t arg2; + + DUK_ASSERT(fun_idx >= 0); + DUK_ASSERT(fun_idx < (duk_small_int_t) (sizeof(duk__two_arg_funcs) / sizeof(duk__two_arg_func))); + arg1 = duk_to_number(thr, 0); /* explicit ordered evaluation to match coercion semantics */ + arg2 = duk_to_number(thr, 1); + fun = duk__two_arg_funcs[fun_idx]; + duk_push_number(thr, (duk_double_t) fun((double) arg1, (double) arg2)); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_math_object_max(duk_hthread *thr) { + return duk__math_minmax(thr, -DUK_DOUBLE_INFINITY, duk__fmax_fixed); +} + +DUK_INTERNAL duk_ret_t duk_bi_math_object_min(duk_hthread *thr) { + return duk__math_minmax(thr, DUK_DOUBLE_INFINITY, duk__fmin_fixed); +} + +DUK_INTERNAL duk_ret_t duk_bi_math_object_random(duk_hthread *thr) { + duk_push_number(thr, (duk_double_t) duk_util_get_random_double(thr)); + return 1; +} + +#if defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_math_object_hypot(duk_hthread *thr) { + /* + * E6 Section 20.2.2.18: Math.hypot + * + * - If no arguments are passed, the result is +0. + * - If any argument is +inf, the result is +inf. + * - If any argument is -inf, the result is +inf. + * - If no argument is +inf or -inf, and any argument is NaN, the result is + * NaN. + * - If all arguments are either +0 or -0, the result is +0. + */ + + duk_idx_t nargs; + duk_idx_t i; + duk_bool_t found_nan; + duk_double_t max; + duk_double_t sum, summand; + duk_double_t comp, prelim; + duk_double_t t; + + nargs = duk_get_top(thr); + + /* Find the highest value. Also ToNumber() coerces. */ + max = 0.0; + found_nan = 0; + for (i = 0; i < nargs; i++) { + t = DUK_FABS(duk_to_number(thr, i)); + if (DUK_FPCLASSIFY(t) == DUK_FP_NAN) { + found_nan = 1; + } else { + max = duk_double_fmax(max, t); + } + } + + /* Early return cases. */ + if (duk_double_equals(max, DUK_DOUBLE_INFINITY)) { + duk_push_number(thr, DUK_DOUBLE_INFINITY); + return 1; + } else if (found_nan) { + duk_push_number(thr, DUK_DOUBLE_NAN); + return 1; + } else if (duk_double_equals(max, 0.0)) { + duk_push_number(thr, 0.0); + /* Otherwise we'd divide by zero. */ + return 1; + } + + /* Use Kahan summation and normalize to the highest value to minimize + * floating point rounding error and avoid overflow. + * + * https://en.wikipedia.org/wiki/Kahan_summation_algorithm + */ + sum = 0.0; + comp = 0.0; + for (i = 0; i < nargs; i++) { + t = DUK_FABS(duk_get_number(thr, i)) / max; + summand = (t * t) - comp; + prelim = sum + summand; + comp = (prelim - sum) - summand; + sum = prelim; + } + + duk_push_number(thr, (duk_double_t) DUK_SQRT(sum) * max); + return 1; +} +#endif /* DUK_USE_ES6 */ + +#if defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_math_object_sign(duk_hthread *thr) { + duk_double_t d; + + d = duk_to_number(thr, 0); + if (duk_double_is_nan(d)) { + DUK_ASSERT(duk_is_nan(thr, -1)); + return 1; /* NaN input -> return NaN */ + } + if (duk_double_equals(d, 0.0)) { + /* Zero sign kept, i.e. -0 -> -0, +0 -> +0. */ + return 1; + } + duk_push_int(thr, (d > 0.0 ? 1 : -1)); + return 1; +} +#endif /* DUK_USE_ES6 */ + +#if defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_math_object_clz32(duk_hthread *thr) { + duk_uint32_t x; + duk_small_uint_t i; + +#if defined(DUK_USE_PREFER_SIZE) + duk_uint32_t mask; + + x = duk_to_uint32(thr, 0); + for (i = 0, mask = 0x80000000UL; mask != 0; mask >>= 1) { + if (x & mask) { + break; + } + i++; + } + DUK_ASSERT(i <= 32); + duk_push_uint(thr, i); + return 1; +#else /* DUK_USE_PREFER_SIZE */ + i = 0; + x = duk_to_uint32(thr, 0); + if (x & 0xffff0000UL) { + x >>= 16; + } else { + i += 16; + } + if (x & 0x0000ff00UL) { + x >>= 8; + } else { + i += 8; + } + if (x & 0x000000f0UL) { + x >>= 4; + } else { + i += 4; + } + if (x & 0x0000000cUL) { + x >>= 2; + } else { + i += 2; + } + if (x & 0x00000002UL) { + x >>= 1; + } else { + i += 1; + } + if (x & 0x00000001UL) { + ; + } else { + i += 1; + } + DUK_ASSERT(i <= 32); + duk_push_uint(thr, i); + return 1; +#endif /* DUK_USE_PREFER_SIZE */ +} +#endif /* DUK_USE_ES6 */ + +#if defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_math_object_imul(duk_hthread *thr) { + duk_uint32_t x, y, z; + + x = duk_to_uint32(thr, 0); + y = duk_to_uint32(thr, 1); + z = x * y; + + /* While arguments are ToUint32() coerced and the multiplication + * is unsigned as such, the final result is curiously interpreted + * as a signed 32-bit value. + */ + duk_push_i32(thr, (duk_int32_t) z); + return 1; +} +#endif /* DUK_USE_ES6 */ + +#endif /* DUK_USE_MATH_BUILTIN */ +#line 1 "duk_bi_number.c" +/* + * Number built-ins + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_NUMBER_BUILTIN) + +DUK_LOCAL duk_double_t duk__push_this_number_plain(duk_hthread *thr) { + duk_hobject *h; + + /* Number built-in accepts a plain number or a Number object (whose + * internal value is operated on). Other types cause TypeError. + */ + + duk_push_this(thr); + if (duk_is_number(thr, -1)) { + DUK_DDD(DUK_DDDPRINT("plain number value: %!T", (duk_tval *) duk_get_tval(thr, -1))); + goto done; + } + h = duk_get_hobject(thr, -1); + if (!h || (DUK_HOBJECT_GET_CLASS_NUMBER(h) != DUK_HOBJECT_CLASS_NUMBER)) { + DUK_DDD(DUK_DDDPRINT("unacceptable this value: %!T", (duk_tval *) duk_get_tval(thr, -1))); + DUK_ERROR_TYPE(thr, "number expected"); + DUK_WO_NORETURN(return 0.0;); + } + duk_xget_owndataprop_stridx_short(thr, -1, DUK_STRIDX_INT_VALUE); + DUK_ASSERT(duk_is_number(thr, -1)); + DUK_DDD(DUK_DDDPRINT("number object: %!T, internal value: %!T", + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + duk_remove_m2(thr); + +done: + return duk_get_number(thr, -1); +} + +DUK_INTERNAL duk_ret_t duk_bi_number_constructor(duk_hthread *thr) { + duk_idx_t nargs; + duk_hobject *h_this; + + /* + * The Number constructor uses ToNumber(arg) for number coercion + * (coercing an undefined argument to NaN). However, if the + * argument is not given at all, +0 must be used instead. To do + * this, a vararg function is used. + */ + + nargs = duk_get_top(thr); + if (nargs == 0) { + duk_push_int(thr, 0); + } + duk_to_number(thr, 0); + duk_set_top(thr, 1); + DUK_ASSERT_TOP(thr, 1); + + if (!duk_is_constructor_call(thr)) { + return 1; + } + + /* + * E5 Section 15.7.2.1 requires that the constructed object + * must have the original Number.prototype as its internal + * prototype. However, since Number.prototype is non-writable + * and non-configurable, this doesn't have to be enforced here: + * The default object (bound to 'this') is OK, though we have + * to change its class. + * + * Internal value set to ToNumber(arg) or +0; if no arg given, + * ToNumber(undefined) = NaN, so special treatment is needed + * (above). String internal value is immutable. + */ + + /* XXX: helper */ + duk_push_this(thr); + h_this = duk_known_hobject(thr, -1); + DUK_HOBJECT_SET_CLASS_NUMBER(h_this, DUK_HOBJECT_CLASS_NUMBER); + + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h_this) == thr->builtins[DUK_BIDX_NUMBER_PROTOTYPE]); + DUK_ASSERT(DUK_HOBJECT_GET_CLASS_NUMBER(h_this) == DUK_HOBJECT_CLASS_NUMBER); + DUK_ASSERT(DUK_HOBJECT_HAS_EXTENSIBLE(h_this)); + + duk_dup_0(thr); /* -> [ val obj val ] */ + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_VALUE, DUK_PROPDESC_FLAGS_NONE); + return 0; /* no return value -> don't replace created value */ +} + +DUK_INTERNAL duk_ret_t duk_bi_number_prototype_value_of(duk_hthread *thr) { + (void) duk__push_this_number_plain(thr); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_number_prototype_to_string(duk_hthread *thr) { + duk_small_int_t radix; + duk_small_uint_t n2s_flags; + + (void) duk__push_this_number_plain(thr); + if (duk_is_undefined(thr, 0)) { + radix = 10; + } else { + radix = (duk_small_int_t) duk_to_int_check_range(thr, 0, 2, 36); + } + DUK_DDD(DUK_DDDPRINT("radix=%ld", (long) radix)); + + n2s_flags = 0; + + duk_numconv_stringify(thr, radix /*radix*/, 0 /*digits*/, n2s_flags /*flags*/); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_number_prototype_to_locale_string(duk_hthread *thr) { + /* XXX: just use toString() for now; permitted although not recommended. + * nargs==1, so radix is passed to toString(). + */ + return duk_bi_number_prototype_to_string(thr); +} + +/* + * toFixed(), toExponential(), toPrecision() + */ + +/* XXX: shared helper for toFixed(), toExponential(), toPrecision()? */ + +DUK_INTERNAL duk_ret_t duk_bi_number_prototype_to_fixed(duk_hthread *thr) { + duk_small_int_t frac_digits; + duk_double_t d; + duk_small_int_t c; + duk_small_uint_t n2s_flags; + + /* In ES5.1 frac_digits is coerced first; in ES2015 the 'this number + * value' check is done first. + */ + d = duk__push_this_number_plain(thr); + frac_digits = (duk_small_int_t) duk_to_int_check_range(thr, 0, 0, 20); + + c = (duk_small_int_t) DUK_FPCLASSIFY(d); + if (c == DUK_FP_NAN || c == DUK_FP_INFINITE) { + goto use_to_string; + } + + if (d >= 1.0e21 || d <= -1.0e21) { + goto use_to_string; + } + + n2s_flags = DUK_N2S_FLAG_FIXED_FORMAT | DUK_N2S_FLAG_FRACTION_DIGITS; + + duk_numconv_stringify(thr, 10 /*radix*/, frac_digits /*digits*/, n2s_flags /*flags*/); + return 1; + +use_to_string: + DUK_ASSERT_TOP(thr, 2); + duk_to_string(thr, -1); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_number_prototype_to_exponential(duk_hthread *thr) { + duk_bool_t frac_undefined; + duk_small_int_t frac_digits; + duk_double_t d; + duk_small_int_t c; + duk_small_uint_t n2s_flags; + + d = duk__push_this_number_plain(thr); + + frac_undefined = duk_is_undefined(thr, 0); + duk_to_int(thr, 0); /* for side effects */ + + c = (duk_small_int_t) DUK_FPCLASSIFY(d); + if (c == DUK_FP_NAN || c == DUK_FP_INFINITE) { + goto use_to_string; + } + + frac_digits = (duk_small_int_t) duk_to_int_check_range(thr, 0, 0, 20); + + n2s_flags = DUK_N2S_FLAG_FORCE_EXP | (frac_undefined ? 0 : DUK_N2S_FLAG_FIXED_FORMAT); + + duk_numconv_stringify(thr, 10 /*radix*/, frac_digits + 1 /*leading digit + fractions*/, n2s_flags /*flags*/); + return 1; + +use_to_string: + DUK_ASSERT_TOP(thr, 2); + duk_to_string(thr, -1); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_number_prototype_to_precision(duk_hthread *thr) { + /* The specification has quite awkward order of coercion and + * checks for toPrecision(). The operations below are a bit + * reordered, within constraints of observable side effects. + */ + + duk_double_t d; + duk_small_int_t prec; + duk_small_int_t c; + duk_small_uint_t n2s_flags; + + DUK_ASSERT_TOP(thr, 1); + + d = duk__push_this_number_plain(thr); + if (duk_is_undefined(thr, 0)) { + goto use_to_string; + } + DUK_ASSERT_TOP(thr, 2); + + duk_to_int(thr, 0); /* for side effects */ + + c = (duk_small_int_t) DUK_FPCLASSIFY(d); + if (c == DUK_FP_NAN || c == DUK_FP_INFINITE) { + goto use_to_string; + } + + prec = (duk_small_int_t) duk_to_int_check_range(thr, 0, 1, 21); + + n2s_flags = DUK_N2S_FLAG_FIXED_FORMAT | DUK_N2S_FLAG_NO_ZERO_PAD; + + duk_numconv_stringify(thr, 10 /*radix*/, prec /*digits*/, n2s_flags /*flags*/); + return 1; + +use_to_string: + /* Used when precision is undefined; also used for NaN (-> "NaN"), + * and +/- infinity (-> "Infinity", "-Infinity"). + */ + + DUK_ASSERT_TOP(thr, 2); + duk_to_string(thr, -1); + return 1; +} + +/* + * ES2015 isFinite() etc + */ + +#if defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_number_check_shared(duk_hthread *thr) { + duk_int_t magic; + duk_bool_t ret = 0; + + if (duk_is_number(thr, 0)) { + duk_double_t d; + + magic = duk_get_current_magic(thr); + d = duk_get_number(thr, 0); + + switch (magic) { + case 0: /* isFinite() */ + ret = duk_double_is_finite(d); + break; + case 1: /* isInteger() */ + ret = duk_double_is_integer(d); + break; + case 2: /* isNaN() */ + ret = duk_double_is_nan(d); + break; + default: /* isSafeInteger() */ + DUK_ASSERT(magic == 3); + ret = duk_double_is_safe_integer(d); + } + } + + duk_push_boolean(thr, ret); + return 1; +} +#endif /* DUK_USE_ES6 */ + +#endif /* DUK_USE_NUMBER_BUILTIN */ +#line 1 "duk_bi_object.c" +/* + * Object built-ins + */ + +/* #include duk_internal.h -> already included */ + +/* Needed even when Object built-in disabled. */ +DUK_INTERNAL duk_ret_t duk_bi_object_prototype_to_string(duk_hthread *thr) { + duk_tval *tv; + + tv = DUK_HTHREAD_THIS_PTR(thr); + duk_push_class_string_tval(thr, tv, 0 /*avoid_side_effects*/); + return 1; +} + +#if defined(DUK_USE_OBJECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor(duk_hthread *thr) { + duk_uint_t arg_mask; + + arg_mask = duk_get_type_mask(thr, 0); + + if (!duk_is_constructor_call(thr) && /* not a constructor call */ + ((arg_mask & (DUK_TYPE_MASK_NULL | DUK_TYPE_MASK_UNDEFINED)) == 0)) { /* and argument not null or undefined */ + duk_to_object(thr, 0); + return 1; + } + + /* Pointer and buffer primitive values are treated like other + * primitives values which have a fully fledged object counterpart: + * promote to an object value. Lightfuncs and plain buffers are + * coerced with ToObject() even they could also be returned as is. + */ + if (arg_mask & (DUK_TYPE_MASK_OBJECT | DUK_TYPE_MASK_STRING | DUK_TYPE_MASK_BOOLEAN | DUK_TYPE_MASK_NUMBER | + DUK_TYPE_MASK_POINTER | DUK_TYPE_MASK_BUFFER | DUK_TYPE_MASK_LIGHTFUNC)) { + /* For DUK_TYPE_OBJECT the coercion is a no-op and could + * be checked for explicitly, but Object(obj) calls are + * not very common so opt for minimal footprint. + */ + duk_to_object(thr, 0); + return 1; + } + + (void) duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJECT), + DUK_BIDX_OBJECT_PROTOTYPE); + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) && defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_assign(duk_hthread *thr) { + duk_idx_t nargs; + duk_int_t idx; + + nargs = duk_get_top_require_min(thr, 1 /*min_top*/); + + duk_to_object(thr, 0); + for (idx = 1; idx < nargs; idx++) { + /* E7 19.1.2.1 (step 4a) */ + if (duk_is_null_or_undefined(thr, idx)) { + continue; + } + + /* duk_enum() respects ES2015+ [[OwnPropertyKeys]] ordering, which is + * convenient here. + */ + duk_to_object(thr, idx); + duk_enum(thr, idx, DUK_ENUM_OWN_PROPERTIES_ONLY); + while (duk_next(thr, -1, 1 /*get_value*/)) { + /* [ target ... enum key value ] */ + duk_put_prop(thr, 0); + /* [ target ... enum ] */ + } + /* Could pop enumerator, but unnecessary because of duk_set_top() + * below. + */ + } + + duk_set_top(thr, 1); + return 1; +} +#endif + +#if defined(DUK_USE_OBJECT_BUILTIN) && defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_is(duk_hthread *thr) { + DUK_ASSERT_TOP(thr, 2); + duk_push_boolean(thr, duk_samevalue(thr, 0, 1)); + return 1; +} +#endif + +#if defined(DUK_USE_OBJECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_create(duk_hthread *thr) { + duk_hobject *proto; + + DUK_ASSERT_TOP(thr, 2); + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + duk_hbufobj_promote_plain(thr, 0); +#endif + proto = duk_require_hobject_accept_mask(thr, 0, DUK_TYPE_MASK_NULL); + DUK_ASSERT(proto != NULL || duk_is_null(thr, 0)); + + (void) duk_push_object_helper_proto(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJECT), + proto); + + if (!duk_is_undefined(thr, 1)) { + /* [ O Properties obj ] */ + + duk_replace(thr, 0); + + /* [ obj Properties ] */ + + /* Just call the "original" Object.defineProperties() to + * finish up. + */ + + return duk_bi_object_constructor_define_properties(thr); + } + + /* [ O Properties obj ] */ + + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_define_properties(duk_hthread *thr) { + duk_small_uint_t pass; + duk_uint_t defprop_flags; + duk_hobject *obj; + duk_idx_t idx_value; + duk_hobject *get; + duk_hobject *set; + + /* Lightfunc and plain buffer handling by ToObject() coercion. */ + obj = duk_require_hobject_promote_mask(thr, 0, DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + DUK_ASSERT(obj != NULL); + + duk_to_object(thr, 1); /* properties object */ + + DUK_DDD(DUK_DDDPRINT("target=%!iT, properties=%!iT", (duk_tval *) duk_get_tval(thr, 0), (duk_tval *) duk_get_tval(thr, 1))); + + /* + * Two pass approach to processing the property descriptors. + * On first pass validate and normalize all descriptors before + * any changes are made to the target object. On second pass + * make the actual modifications to the target object. + * + * Right now we'll just use the same normalize/validate helper + * on both passes, ignoring its outputs on the first pass. + */ + + for (pass = 0; pass < 2; pass++) { + duk_set_top(thr, 2); /* -> [ hobject props ] */ + duk_enum(thr, 1, DUK_ENUM_OWN_PROPERTIES_ONLY | DUK_ENUM_INCLUDE_SYMBOLS /*enum_flags*/); + + for (;;) { + duk_hstring *key; + + /* [ hobject props enum(props) ] */ + + duk_set_top(thr, 3); + + if (!duk_next(thr, 2, 1 /*get_value*/)) { + break; + } + + DUK_DDD(DUK_DDDPRINT("-> key=%!iT, desc=%!iT", + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + + /* [ hobject props enum(props) key desc ] */ + + duk_hobject_prepare_property_descriptor(thr, 4 /*idx_desc*/, &defprop_flags, &idx_value, &get, &set); + + /* [ hobject props enum(props) key desc [multiple values] ] */ + + if (pass == 0) { + continue; + } + + /* This allows symbols on purpose. */ + key = duk_known_hstring(thr, 3); + DUK_ASSERT(key != NULL); + + duk_hobject_define_property_helper(thr, defprop_flags, obj, key, idx_value, get, set, 1 /*throw_flag*/); + } + } + + /* + * Return target object + */ + + duk_dup_0(thr); + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_seal_freeze_shared(duk_hthread *thr) { + DUK_ASSERT_TOP(thr, 1); + + duk_seal_freeze_raw(thr, 0, (duk_bool_t) duk_get_current_magic(thr) /*is_freeze*/); + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_is_sealed_frozen_shared(duk_hthread *thr) { + duk_hobject *h; + duk_bool_t is_frozen; + duk_uint_t mask; + + is_frozen = (duk_bool_t) duk_get_current_magic(thr); + mask = duk_get_type_mask(thr, 0); + if (mask & (DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER)) { + DUK_ASSERT(is_frozen == 0 || is_frozen == 1); + duk_push_boolean(thr, + (mask & DUK_TYPE_MASK_LIGHTFUNC) ? 1 : /* lightfunc always frozen and sealed */ + (is_frozen ^ 1)); /* buffer sealed but not frozen (index props writable) */ + } else { + /* ES2015 Sections 19.1.2.12, 19.1.2.13: anything other than an object + * is considered to be already sealed and frozen. + */ + h = duk_get_hobject(thr, 0); + duk_push_boolean(thr, (h == NULL) || duk_hobject_object_is_sealed_frozen_helper(thr, h, is_frozen /*is_frozen*/)); + } + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_prototype_to_locale_string(duk_hthread *thr) { + DUK_ASSERT_TOP(thr, 0); + (void) duk_push_this_coercible_to_object(thr); + duk_get_prop_stridx_short(thr, 0, DUK_STRIDX_TO_STRING); +#if 0 /* This is mentioned explicitly in the E5.1 spec, but duk_call_method() checks for it in practice. */ + duk_require_callable(thr, 1); +#endif + duk_dup_0(thr); /* -> [ O toString O ] */ + duk_call_method(thr, 0); /* XXX: call method tail call? */ + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_prototype_value_of(duk_hthread *thr) { + /* For lightfuncs and plain buffers, returns Object() coerced. */ + (void) duk_push_this_coercible_to_object(thr); + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_prototype_is_prototype_of(duk_hthread *thr) { + duk_hobject *h_v; + duk_hobject *h_obj; + + DUK_ASSERT_TOP(thr, 1); + + h_v = duk_get_hobject(thr, 0); + if (!h_v) { + duk_push_false(thr); /* XXX: tail call: return duk_push_false(thr) */ + return 1; + } + + h_obj = duk_push_this_coercible_to_object(thr); + DUK_ASSERT(h_obj != NULL); + + /* E5.1 Section 15.2.4.6, step 3.a, lookup proto once before compare. + * Prototype loops should cause an error to be thrown. + */ + duk_push_boolean( + thr, + duk_hobject_prototype_chain_contains(thr, DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h_v), h_obj, 0 /*ignore_loop*/)); + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_prototype_has_own_property(duk_hthread *thr) { + return (duk_ret_t) duk_hobject_object_ownprop_helper(thr, 0 /*required_desc_flags*/); +} +#endif /* DUK_USE_OBJECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_prototype_property_is_enumerable(duk_hthread *thr) { + return (duk_ret_t) duk_hobject_object_ownprop_helper(thr, DUK_PROPDESC_FLAG_ENUMERABLE /*required_desc_flags*/); +} +#endif /* DUK_USE_OBJECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) || defined(DUK_USE_REFLECT_BUILTIN) +/* Shared helper to implement Object.getPrototypeOf, + * Object.prototype.__proto__ getter, and Reflect.getPrototypeOf. + * + * http://www.ecma-international.org/ecma-262/6.0/index.html#sec-get-object.prototype.__proto__ + */ +DUK_INTERNAL duk_ret_t duk_bi_object_getprototype_shared(duk_hthread *thr) { + /* + * magic = 0: __proto__ getter + * magic = 1: Object.getPrototypeOf() + * magic = 2: Reflect.getPrototypeOf() + */ + + duk_hobject *h; + duk_hobject *proto; + duk_tval *tv; + duk_int_t magic; + + magic = duk_get_current_magic(thr); + + if (magic == 0) { + DUK_ASSERT_TOP(thr, 0); + duk_push_this_coercible_to_object(thr); + } + DUK_ASSERT(duk_get_top(thr) >= 1); + if (magic < 2) { + /* ES2015 Section 19.1.2.9, step 1 */ + duk_to_object(thr, 0); + } + tv = DUK_GET_TVAL_POSIDX(thr, 0); + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_BUFFER: + proto = thr->builtins[DUK_BIDX_UINT8ARRAY_PROTOTYPE]; + break; + case DUK_TAG_LIGHTFUNC: + proto = thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]; + break; + case DUK_TAG_OBJECT: + h = DUK_TVAL_GET_OBJECT(tv); + proto = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h); + break; + default: + /* This implicitly handles CheckObjectCoercible() caused + * TypeError. + */ + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + if (proto != NULL) { + duk_push_hobject(thr, proto); + } else { + duk_push_null(thr); + } + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN || DUK_USE_REFLECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) || defined(DUK_USE_REFLECT_BUILTIN) +/* Shared helper to implement ES2015 Object.setPrototypeOf, + * Object.prototype.__proto__ setter, and Reflect.setPrototypeOf. + * + * http://www.ecma-international.org/ecma-262/6.0/index.html#sec-get-object.prototype.__proto__ + * http://www.ecma-international.org/ecma-262/6.0/index.html#sec-object.setprototypeof + */ +DUK_INTERNAL duk_ret_t duk_bi_object_setprototype_shared(duk_hthread *thr) { + /* + * magic = 0: __proto__ setter + * magic = 1: Object.setPrototypeOf() + * magic = 2: Reflect.setPrototypeOf() + */ + + duk_hobject *h_obj; + duk_hobject *h_new_proto; + duk_hobject *h_curr; + duk_ret_t ret_success = 1; /* retval for success path */ + duk_uint_t mask; + duk_int_t magic; + + /* Preliminaries for __proto__ and setPrototypeOf (E6 19.1.2.18 steps 1-4). */ + magic = duk_get_current_magic(thr); + if (magic == 0) { + duk_push_this_check_object_coercible(thr); + duk_insert(thr, 0); + if (!duk_check_type_mask(thr, 1, DUK_TYPE_MASK_NULL | DUK_TYPE_MASK_OBJECT)) { + return 0; + } + + /* __proto__ setter returns 'undefined' on success unlike the + * setPrototypeOf() call which returns the target object. + */ + ret_success = 0; + } else { + if (magic == 1) { + duk_require_object_coercible(thr, 0); + } else { + duk_require_hobject_accept_mask(thr, 0, DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + } + duk_require_type_mask(thr, 1, DUK_TYPE_MASK_NULL | DUK_TYPE_MASK_OBJECT); + } + + h_new_proto = duk_get_hobject(thr, 1); + /* h_new_proto may be NULL */ + + mask = duk_get_type_mask(thr, 0); + if (mask & (DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER)) { + duk_hobject *curr_proto; + curr_proto = + thr->builtins[(mask & DUK_TYPE_MASK_LIGHTFUNC) ? DUK_BIDX_FUNCTION_PROTOTYPE : DUK_BIDX_UINT8ARRAY_PROTOTYPE]; + if (h_new_proto == curr_proto) { + goto skip; + } + goto fail_nonextensible; + } + h_obj = duk_get_hobject(thr, 0); + if (h_obj == NULL) { + goto skip; + } + DUK_ASSERT(h_obj != NULL); + + /* [[SetPrototypeOf]] standard behavior, E6 9.1.2. */ + /* TODO: implement Proxy object support here */ + + if (h_new_proto == DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h_obj)) { + goto skip; + } + if (!DUK_HOBJECT_HAS_EXTENSIBLE(h_obj)) { + goto fail_nonextensible; + } + for (h_curr = h_new_proto; h_curr != NULL; h_curr = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h_curr)) { + /* Loop prevention. */ + if (h_curr == h_obj) { + goto fail_loop; + } + } + DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, h_obj, h_new_proto); + /* fall thru */ + +skip: + duk_set_top(thr, 1); + if (magic == 2) { + duk_push_true(thr); + } + return ret_success; + +fail_nonextensible: +fail_loop: + if (magic != 2) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } else { + duk_push_false(thr); + return 1; + } +} +#endif /* DUK_USE_OBJECT_BUILTIN || DUK_USE_REFLECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) || defined(DUK_USE_REFLECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_define_property(duk_hthread *thr) { + /* + * magic = 0: Object.defineProperty() + * magic = 1: Reflect.defineProperty() + */ + + duk_hobject *obj; + duk_hstring *key; + duk_hobject *get; + duk_hobject *set; + duk_idx_t idx_value; + duk_uint_t defprop_flags; + duk_small_uint_t magic; + duk_bool_t throw_flag; + duk_bool_t ret; + + DUK_ASSERT(thr != NULL); + + DUK_DDD(DUK_DDDPRINT("Object.defineProperty(): ctx=%p obj=%!T key=%!T desc=%!T", + (void *) thr, + (duk_tval *) duk_get_tval(thr, 0), + (duk_tval *) duk_get_tval(thr, 1), + (duk_tval *) duk_get_tval(thr, 2))); + + /* [ obj key desc ] */ + + magic = (duk_small_uint_t) duk_get_current_magic(thr); + + /* Lightfuncs are currently supported by coercing to a temporary + * Function object; changes will be allowed (the coerced value is + * extensible) but will be lost. Same for plain buffers. + */ + obj = duk_require_hobject_promote_mask(thr, 0, DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + DUK_ASSERT(obj != NULL); + key = duk_to_property_key_hstring(thr, 1); + (void) duk_require_hobject(thr, 2); + + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + DUK_ASSERT(duk_get_hobject(thr, 2) != NULL); + + /* + * Validate and convert argument property descriptor (an ECMAScript + * object) into a set of defprop_flags and possibly property value, + * getter, and/or setter values on the value stack. + * + * Lightfunc set/get values are coerced to full Functions. + */ + + duk_hobject_prepare_property_descriptor(thr, 2 /*idx_desc*/, &defprop_flags, &idx_value, &get, &set); + + /* + * Use Object.defineProperty() helper for the actual operation. + */ + + DUK_ASSERT(magic == 0U || magic == 1U); + throw_flag = magic ^ 1U; + ret = duk_hobject_define_property_helper(thr, defprop_flags, obj, key, idx_value, get, set, throw_flag); + + /* Ignore the normalize/validate helper outputs on the value stack, + * they're popped automatically. + */ + + if (magic == 0U) { + /* Object.defineProperty(): return target object. */ + duk_push_hobject(thr, obj); + } else { + /* Reflect.defineProperty(): return success/fail. */ + duk_push_boolean(thr, ret); + } + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN || DUK_USE_REFLECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) || defined(DUK_USE_REFLECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_get_own_property_descriptor(duk_hthread *thr) { + DUK_ASSERT_TOP(thr, 2); + + /* ES2015 Section 19.1.2.6, step 1 */ + if (duk_get_current_magic(thr) == 0) { + duk_to_object(thr, 0); + } + + /* [ obj key ] */ + + duk_hobject_object_get_own_property_descriptor(thr, -2); + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN || DUK_USE_REFLECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) || defined(DUK_USE_REFLECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_is_extensible(duk_hthread *thr) { + /* + * magic = 0: Object.isExtensible() + * magic = 1: Reflect.isExtensible() + */ + + duk_hobject *h; + + if (duk_get_current_magic(thr) == 0) { + h = duk_get_hobject(thr, 0); + } else { + /* Reflect.isExtensible(): throw if non-object, but we accept lightfuncs + * and plain buffers here because they pretend to be objects. + */ + h = duk_require_hobject_accept_mask(thr, 0, DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + } + + duk_push_boolean(thr, (h != NULL) && DUK_HOBJECT_HAS_EXTENSIBLE(h)); + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN || DUK_USE_REFLECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) || defined(DUK_USE_REFLECT_BUILTIN) +/* Shared helper for various key/symbol listings, magic: + * 0=Object.keys() + * 1=Object.getOwnPropertyNames(), + * 2=Object.getOwnPropertySymbols(), + * 3=Reflect.ownKeys() + */ +DUK_LOCAL const duk_small_uint_t duk__object_keys_enum_flags[4] = { + /* Object.keys() */ + DUK_ENUM_OWN_PROPERTIES_ONLY | DUK_ENUM_NO_PROXY_BEHAVIOR, + + /* Object.getOwnPropertyNames() */ + DUK_ENUM_INCLUDE_NONENUMERABLE | DUK_ENUM_OWN_PROPERTIES_ONLY | DUK_ENUM_NO_PROXY_BEHAVIOR, + + /* Object.getOwnPropertySymbols() */ + DUK_ENUM_INCLUDE_SYMBOLS | DUK_ENUM_OWN_PROPERTIES_ONLY | DUK_ENUM_EXCLUDE_STRINGS | DUK_ENUM_INCLUDE_NONENUMERABLE | + DUK_ENUM_NO_PROXY_BEHAVIOR, + + /* Reflect.ownKeys() */ + DUK_ENUM_INCLUDE_SYMBOLS | DUK_ENUM_OWN_PROPERTIES_ONLY | DUK_ENUM_INCLUDE_NONENUMERABLE | DUK_ENUM_NO_PROXY_BEHAVIOR +}; + +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_keys_shared(duk_hthread *thr) { + duk_hobject *obj; +#if defined(DUK_USE_ES6_PROXY) + duk_hobject *h_proxy_target; + duk_hobject *h_proxy_handler; + duk_hobject *h_trap_result; +#endif + duk_small_uint_t enum_flags; + duk_int_t magic; + + DUK_ASSERT_TOP(thr, 1); + + magic = duk_get_current_magic(thr); + if (magic == 3) { + /* ES2015 Section 26.1.11 requires a TypeError for non-objects. Lightfuncs + * and plain buffers pretend to be objects, so accept those too. + */ + obj = duk_require_hobject_promote_mask(thr, 0, DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + } else { + /* ES2015: ToObject coerce. */ + obj = duk_to_hobject(thr, 0); + } + DUK_ASSERT(obj != NULL); + DUK_UNREF(obj); + + /* XXX: proxy chains */ + +#if defined(DUK_USE_ES6_PROXY) + /* XXX: better sharing of code between proxy target call sites */ + if (DUK_LIKELY(!duk_hobject_proxy_check(obj, &h_proxy_target, &h_proxy_handler))) { + goto skip_proxy; + } + + duk_push_hobject(thr, h_proxy_handler); + if (!duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_OWN_KEYS)) { + /* Careful with reachability here: don't pop 'obj' before pushing + * proxy target. + */ + DUK_DDD(DUK_DDDPRINT("no ownKeys trap, get keys of target instead")); + duk_pop_2(thr); + duk_push_hobject(thr, h_proxy_target); + duk_replace(thr, 0); + DUK_ASSERT_TOP(thr, 1); + goto skip_proxy; + } + + /* [ obj handler trap ] */ + duk_insert(thr, -2); + duk_push_hobject(thr, h_proxy_target); /* -> [ obj trap handler target ] */ + duk_call_method(thr, 1 /*nargs*/); /* -> [ obj trap_result ] */ + h_trap_result = duk_require_hobject(thr, -1); + DUK_UNREF(h_trap_result); + + magic = duk_get_current_magic(thr); + DUK_ASSERT(magic >= 0 && magic < (duk_int_t) (sizeof(duk__object_keys_enum_flags) / sizeof(duk_small_uint_t))); + enum_flags = duk__object_keys_enum_flags[magic]; + + duk_proxy_ownkeys_postprocess(thr, h_proxy_target, enum_flags); + return 1; + +skip_proxy: +#endif /* DUK_USE_ES6_PROXY */ + + DUK_ASSERT_TOP(thr, 1); + magic = duk_get_current_magic(thr); + DUK_ASSERT(magic >= 0 && magic < (duk_int_t) (sizeof(duk__object_keys_enum_flags) / sizeof(duk_small_uint_t))); + enum_flags = duk__object_keys_enum_flags[magic]; + return duk_hobject_get_enumerated_keys(thr, enum_flags); +} +#endif /* DUK_USE_OBJECT_BUILTIN || DUK_USE_REFLECT_BUILTIN */ + +#if defined(DUK_USE_OBJECT_BUILTIN) || defined(DUK_USE_REFLECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_object_constructor_prevent_extensions(duk_hthread *thr) { + /* + * magic = 0: Object.preventExtensions() + * magic = 1: Reflect.preventExtensions() + */ + + duk_hobject *h; + duk_uint_t mask; + duk_int_t magic; + + magic = duk_get_current_magic(thr); + + /* Silent success for lightfuncs and plain buffers always. */ + mask = DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER; + + /* Object.preventExtensions() silent success for non-object. */ + if (magic == 0) { + mask |= DUK_TYPE_MASK_UNDEFINED | DUK_TYPE_MASK_NULL | DUK_TYPE_MASK_BOOLEAN | DUK_TYPE_MASK_NUMBER | + DUK_TYPE_MASK_STRING | DUK_TYPE_MASK_POINTER; + } + + if (duk_check_type_mask(thr, 0, mask)) { + /* Not an object, already non-extensible so always success. */ + goto done; + } + h = duk_require_hobject(thr, 0); + DUK_ASSERT(h != NULL); + + DUK_HOBJECT_CLEAR_EXTENSIBLE(h); + + /* A non-extensible object cannot gain any more properties, + * so this is a good time to compact. + */ + duk_hobject_compact_props(thr, h); + +done: + if (magic == 1) { + duk_push_true(thr); + } + return 1; +} +#endif /* DUK_USE_OBJECT_BUILTIN || DUK_USE_REFLECT_BUILTIN */ + +/* + * __defineGetter__, __defineSetter__, __lookupGetter__, __lookupSetter__ + */ + +#if defined(DUK_USE_ES8) +DUK_INTERNAL duk_ret_t duk_bi_object_prototype_defineaccessor(duk_hthread *thr) { + duk_push_this(thr); + duk_insert(thr, 0); + duk_to_object(thr, 0); + duk_require_callable(thr, 2); + + /* [ ToObject(this) key getter/setter ] */ + + /* ToPropertyKey() coercion is not needed, duk_def_prop() does it. */ + duk_def_prop(thr, + 0, + DUK_DEFPROP_SET_ENUMERABLE | DUK_DEFPROP_SET_CONFIGURABLE | + (duk_get_current_magic(thr) ? DUK_DEFPROP_HAVE_SETTER : DUK_DEFPROP_HAVE_GETTER)); + return 0; +} +DUK_INTERNAL duk_ret_t duk_bi_object_prototype_lookupaccessor(duk_hthread *thr) { + duk_uint_t sanity; + + duk_push_this(thr); + duk_to_object(thr, -1); + + /* XXX: Prototype walk (with sanity) should be a core property + * operation, could add a flag to e.g. duk_get_prop_desc(). + */ + + /* ToPropertyKey() coercion is not needed, duk_get_prop_desc() does it. */ + sanity = DUK_HOBJECT_PROTOTYPE_CHAIN_SANITY; + while (!duk_is_undefined(thr, -1)) { + /* [ key obj ] */ + duk_dup(thr, 0); + duk_get_prop_desc(thr, 1, 0 /*flags*/); + if (!duk_is_undefined(thr, -1)) { + duk_get_prop_stridx(thr, -1, (duk_get_current_magic(thr) != 0 ? DUK_STRIDX_SET : DUK_STRIDX_GET)); + return 1; + } + duk_pop(thr); + + if (DUK_UNLIKELY(sanity-- == 0)) { + DUK_ERROR_RANGE(thr, DUK_STR_PROTOTYPE_CHAIN_LIMIT); + DUK_WO_NORETURN(return 0;); + } + + duk_get_prototype(thr, -1); + duk_remove(thr, -2); + } + return 1; +} +#endif /* DUK_USE_ES8 */ +#line 1 "duk_bi_performance.c" +/* + * High resolution time API (performance.now() et al) + * + * API specification: https://encoding.spec.whatwg.org/#ap://www.w3.org/TR/hr-time/ + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_PERFORMANCE_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_performance_now(duk_hthread *thr) { + /* From API spec: + * The DOMHighResTimeStamp type is used to store a time value in + * milliseconds, measured relative from the time origin, global + * monotonic clock, or a time value that represents a duration + * between two DOMHighResTimeStamp's. + */ + duk_push_number(thr, duk_time_get_monotonic_time(thr)); + return 1; +} + +#if 0 /* Missing until semantics decided. */ +DUK_INTERNAL duk_ret_t duk_bi_performance_timeorigin_getter(duk_hthread *thr) { + /* No decision yet how to handle timeOrigins, e.g. should one be + * initialized per heap, or per global object set. See + * https://www.w3.org/TR/hr-time/#time-origin. + */ + duk_push_uint(thr, 0); + return 1; +} +#endif /* 0 */ +#endif /* DUK_USE_PERFORMANCE_BUILTIN */ +#line 1 "duk_bi_pointer.c" +/* + * Pointer built-ins + */ + +/* #include duk_internal.h -> already included */ + +/* + * Constructor + */ + +DUK_INTERNAL duk_ret_t duk_bi_pointer_constructor(duk_hthread *thr) { + /* XXX: this behavior is quite useless now; it would be nice to be able + * to create pointer values from e.g. numbers or strings. Numbers are + * problematic on 64-bit platforms though. Hex encoded strings? + */ + if (duk_get_top(thr) == 0) { + duk_push_pointer(thr, NULL); + } else { + duk_to_pointer(thr, 0); + } + DUK_ASSERT(duk_is_pointer(thr, 0)); + duk_set_top(thr, 1); + + if (duk_is_constructor_call(thr)) { + (void) duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_POINTER), + DUK_BIDX_POINTER_PROTOTYPE); + + /* Pointer object internal value is immutable. */ + duk_dup_0(thr); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_VALUE, DUK_PROPDESC_FLAGS_NONE); + } + /* Note: unbalanced stack on purpose */ + + return 1; +} + +/* + * toString(), valueOf() + */ + +DUK_INTERNAL duk_ret_t duk_bi_pointer_prototype_tostring_shared(duk_hthread *thr) { + duk_tval *tv; + duk_small_int_t to_string = duk_get_current_magic(thr); + + duk_push_this(thr); + tv = duk_require_tval(thr, -1); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_IS_POINTER(tv)) { + /* nop */ + } else if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + + /* Must be a "pointer object", i.e. class "Pointer" */ + if (DUK_HOBJECT_GET_CLASS_NUMBER(h) != DUK_HOBJECT_CLASS_POINTER) { + goto type_error; + } + + duk_xget_owndataprop_stridx_short(thr, -1, DUK_STRIDX_INT_VALUE); + } else { + goto type_error; + } + + if (to_string) { + duk_to_string(thr, -1); + } + return 1; + +type_error: + DUK_DCERROR_TYPE_INVALID_ARGS(thr); +} +#line 1 "duk_bi_promise.c" +/* + * Promise built-in + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_PROMISE_BUILTIN) + +DUK_INTERNAL duk_ret_t duk_bi_promise_constructor(duk_hthread *thr) { + DUK_ERROR_TYPE(thr, "unimplemented"); + DUK_WO_NORETURN(return 0;); +} + +DUK_INTERNAL duk_ret_t duk_bi_promise_all(duk_hthread *thr) { + DUK_ERROR_TYPE(thr, "unimplemented"); + DUK_WO_NORETURN(return 0;); +} + +DUK_INTERNAL duk_ret_t duk_bi_promise_race(duk_hthread *thr) { + DUK_ERROR_TYPE(thr, "unimplemented"); + DUK_WO_NORETURN(return 0;); +} + +DUK_INTERNAL duk_ret_t duk_bi_promise_reject(duk_hthread *thr) { + DUK_ERROR_TYPE(thr, "unimplemented"); + DUK_WO_NORETURN(return 0;); +} + +DUK_INTERNAL duk_ret_t duk_bi_promise_resolve(duk_hthread *thr) { + DUK_ERROR_TYPE(thr, "unimplemented"); + DUK_WO_NORETURN(return 0;); +} + +DUK_INTERNAL duk_ret_t duk_bi_promise_catch(duk_hthread *thr) { + DUK_ERROR_TYPE(thr, "unimplemented"); + DUK_WO_NORETURN(return 0;); +} + +DUK_INTERNAL duk_ret_t duk_bi_promise_then(duk_hthread *thr) { + DUK_ERROR_TYPE(thr, "unimplemented"); + DUK_WO_NORETURN(return 0;); +} + +#endif /* DUK_USE_PROMISE_BUILTIN */ +#line 1 "duk_bi_proxy.c" +/* + * Proxy built-in (ES2015) + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_ES6_PROXY) +/* Post-process a Proxy ownKeys() result at stack top. Push a cleaned up + * array of valid result keys (strings or symbols). TypeError for invalid + * values. Flags are shared with duk_enum(). + */ +DUK_INTERNAL void duk_proxy_ownkeys_postprocess(duk_hthread *thr, duk_hobject *h_proxy_target, duk_uint_t flags) { + duk_uarridx_t i, len, idx; + duk_propdesc desc; + + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(h_proxy_target != NULL); + + len = (duk_uarridx_t) duk_get_length(thr, -1); + idx = 0; + duk_push_array(thr); + /* XXX: preallocated dense array, fill in directly */ + for (i = 0; i < len; i++) { + duk_hstring *h; + + /* [ obj trap_result res_arr ] */ + (void) duk_get_prop_index(thr, -2, i); + h = duk_get_hstring(thr, -1); + if (h == NULL) { + DUK_ERROR_TYPE_INVALID_TRAP_RESULT(thr); + DUK_WO_NORETURN(return;); + } + + if (!(flags & DUK_ENUM_INCLUDE_NONENUMERABLE)) { + /* No support for 'getOwnPropertyDescriptor' trap yet, + * so check enumerability always from target object + * descriptor. + */ + if (duk_hobject_get_own_propdesc(thr, h_proxy_target, duk_known_hstring(thr, -1), &desc, 0 /*flags*/)) { + if ((desc.flags & DUK_PROPDESC_FLAG_ENUMERABLE) == 0) { + DUK_DDD(DUK_DDDPRINT("ignore non-enumerable property: %!T", duk_get_tval(thr, -1))); + goto skip_key; + } + } else { + DUK_DDD(DUK_DDDPRINT("ignore non-existent property: %!T", duk_get_tval(thr, -1))); + goto skip_key; + } + } + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h))) { + if (!(flags & DUK_ENUM_INCLUDE_SYMBOLS)) { + DUK_DDD(DUK_DDDPRINT("ignore symbol property: %!T", duk_get_tval(thr, -1))); + goto skip_key; + } + if (DUK_HSTRING_HAS_HIDDEN(h) && !(flags & DUK_ENUM_INCLUDE_HIDDEN)) { + DUK_DDD(DUK_DDDPRINT("ignore hidden symbol property: %!T", duk_get_tval(thr, -1))); + goto skip_key; + } + } else { + if (flags & DUK_ENUM_EXCLUDE_STRINGS) { + DUK_DDD(DUK_DDDPRINT("ignore string property: %!T", duk_get_tval(thr, -1))); + goto skip_key; + } + } + + /* [ obj trap_result res_arr propname ] */ + duk_push_uarridx(thr, idx++); + duk_insert(thr, -2); + duk_def_prop(thr, -3, DUK_DEFPROP_HAVE_VALUE | DUK_DEFPROP_SET_WEC); + continue; + + skip_key: + duk_pop(thr); + continue; + } + + /* XXX: Missing trap result validation for non-configurable target keys + * (must be present), for non-extensible target all target keys must be + * present and no extra keys can be present. + * http://www.ecma-international.org/ecma-262/6.0/#sec-proxy-object-internal-methods-and-internal-slots-ownpropertykeys + */ + + /* XXX: The key enumerability check should trigger the "getOwnPropertyDescriptor" + * trap which has not yet been implemented. In the absence of such a trap, + * the enumerability should be checked from the target object; this is + * handled above. + */ +} +#endif /* DUK_USE_ES6_PROXY */ + +#if defined(DUK_USE_ES6_PROXY) +DUK_INTERNAL duk_ret_t duk_bi_proxy_constructor(duk_hthread *thr) { + DUK_ASSERT_TOP(thr, 2); /* [ target handler ] */ + + duk_require_constructor_call(thr); + duk_push_proxy(thr, 0 /*flags*/); /* [ target handler ] -> [ proxy ] */ + return 1; /* replacement */ +} +#endif /* DUK_USE_ES6_PROXY */ +#line 1 "duk_bi_reflect.c" +/* + * 'Reflect' built-in (ES2016 Section 26.1) + * http://www.ecma-international.org/ecma-262/7.0/#sec-reflect-object + * + * Many Reflect built-in functions are provided by shared helpers in + * duk_bi_object.c or duk_bi_function.c. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_REFLECT_BUILTIN) +DUK_INTERNAL duk_ret_t duk_bi_reflect_object_delete_property(duk_hthread *thr) { + duk_tval *tv_obj; + duk_tval *tv_key; + duk_bool_t ret; + + DUK_ASSERT_TOP(thr, 2); + (void) duk_require_hobject(thr, 0); + (void) duk_to_string(thr, 1); + + /* [ target key ] */ + + DUK_ASSERT(thr != NULL); + tv_obj = DUK_GET_TVAL_POSIDX(thr, 0); + tv_key = DUK_GET_TVAL_POSIDX(thr, 1); + ret = duk_hobject_delprop(thr, tv_obj, tv_key, 0 /*throw_flag*/); + duk_push_boolean(thr, ret); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_reflect_object_get(duk_hthread *thr) { + duk_tval *tv_obj; + duk_tval *tv_key; + duk_idx_t nargs; + + DUK_ASSERT(thr != NULL); + nargs = duk_get_top_require_min(thr, 2 /*min_top*/); + (void) duk_require_hobject(thr, 0); + (void) duk_to_string(thr, 1); + if (nargs >= 3 && !duk_strict_equals(thr, 0, 2)) { + /* XXX: [[Get]] receiver currently unsupported */ + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return 0;); + } + + /* [ target key receiver? ...? ] */ + + tv_obj = DUK_GET_TVAL_POSIDX(thr, 0); + tv_key = DUK_GET_TVAL_POSIDX(thr, 1); + (void) duk_hobject_getprop(thr, tv_obj, tv_key); /* This could also be a duk_get_prop(). */ + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_reflect_object_has(duk_hthread *thr) { + duk_tval *tv_obj; + duk_tval *tv_key; + duk_bool_t ret; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT_TOP(thr, 2); + (void) duk_require_hobject(thr, 0); + (void) duk_to_string(thr, 1); + + /* [ target key ] */ + + tv_obj = DUK_GET_TVAL_POSIDX(thr, 0); + tv_key = DUK_GET_TVAL_POSIDX(thr, 1); + ret = duk_hobject_hasprop(thr, tv_obj, tv_key); + duk_push_boolean(thr, ret); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_reflect_object_set(duk_hthread *thr) { + duk_tval *tv_obj; + duk_tval *tv_key; + duk_tval *tv_val; + duk_idx_t nargs; + duk_bool_t ret; + + DUK_ASSERT(thr != NULL); + nargs = duk_get_top_require_min(thr, 3 /*min_top*/); + (void) duk_require_hobject(thr, 0); + (void) duk_to_string(thr, 1); + if (nargs >= 4 && !duk_strict_equals(thr, 0, 3)) { + /* XXX: [[Set]] receiver currently unsupported */ + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return 0;); + } + + /* [ target key value receiver? ...? ] */ + + tv_obj = DUK_GET_TVAL_POSIDX(thr, 0); + tv_key = DUK_GET_TVAL_POSIDX(thr, 1); + tv_val = DUK_GET_TVAL_POSIDX(thr, 2); + ret = duk_hobject_putprop(thr, tv_obj, tv_key, tv_val, 0 /*throw_flag*/); + duk_push_boolean(thr, ret); + return 1; +} +#endif /* DUK_USE_REFLECT_BUILTIN */ +#line 1 "duk_bi_regexp.c" +/* + * RegExp built-ins + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_REGEXP_SUPPORT) + +DUK_LOCAL void duk__get_this_regexp(duk_hthread *thr) { + duk_hobject *h; + + duk_push_this(thr); + h = duk_require_hobject_with_class(thr, -1, DUK_HOBJECT_CLASS_REGEXP); + DUK_ASSERT(h != NULL); + DUK_UNREF(h); + duk_insert(thr, 0); /* prepend regexp to valstack 0 index */ +} + +/* XXX: much to improve (code size) */ +DUK_INTERNAL duk_ret_t duk_bi_regexp_constructor(duk_hthread *thr) { + duk_hobject *h_pattern; + + DUK_ASSERT_TOP(thr, 2); + h_pattern = duk_get_hobject(thr, 0); + + if (!duk_is_constructor_call(thr) && h_pattern != NULL && + DUK_HOBJECT_GET_CLASS_NUMBER(h_pattern) == DUK_HOBJECT_CLASS_REGEXP && duk_is_undefined(thr, 1)) { + /* Called as a function, pattern has [[Class]] "RegExp" and + * flags is undefined -> return object as is. + */ + /* XXX: ES2015 has a NewTarget SameValue() check which is not + * yet implemented. + */ + duk_dup_0(thr); + return 1; + } + + /* Else functionality is identical for function call and constructor + * call. + */ + + if (h_pattern != NULL && DUK_HOBJECT_GET_CLASS_NUMBER(h_pattern) == DUK_HOBJECT_CLASS_REGEXP) { + duk_get_prop_stridx_short(thr, 0, DUK_STRIDX_SOURCE); + if (duk_is_undefined(thr, 1)) { + /* In ES5 one would need to read the flags individually; + * in ES2015 just read .flags. + */ + duk_get_prop_stridx(thr, 0, DUK_STRIDX_FLAGS); + } else { + /* In ES2015 allowed; overrides argument RegExp flags. */ + duk_dup_1(thr); + } + } else { + if (duk_is_undefined(thr, 0)) { + duk_push_hstring_empty(thr); + } else { + duk_dup_0(thr); + duk_to_string(thr, -1); /* Rejects Symbols. */ + } + if (duk_is_undefined(thr, 1)) { + duk_push_hstring_empty(thr); + } else { + duk_dup_1(thr); + duk_to_string(thr, -1); /* Rejects Symbols. */ + } + + /* [ ... pattern flags ] */ + } + + DUK_DDD(DUK_DDDPRINT("RegExp constructor/function call, pattern=%!T, flags=%!T", + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + + /* [ ... pattern flags ] (both uncoerced) */ + + duk_to_string(thr, -2); + duk_to_string(thr, -1); + duk_regexp_compile(thr); + + /* [ ... bytecode escaped_source ] */ + + duk_regexp_create_instance(thr); + + /* [ ... RegExp ] */ + + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_regexp_prototype_exec(duk_hthread *thr) { + duk__get_this_regexp(thr); + + /* [ regexp input ] */ + + duk_regexp_match(thr); + + /* [ result ] */ + + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_regexp_prototype_test(duk_hthread *thr) { + duk__get_this_regexp(thr); + + /* [ regexp input ] */ + + /* result object is created and discarded; wasteful but saves code space */ + duk_regexp_match(thr); + + /* [ result ] */ + + duk_push_boolean(thr, (duk_is_null(thr, -1) ? 0 : 1)); + + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_regexp_prototype_tostring(duk_hthread *thr) { + /* This must be generic in ES2015 and later. */ + DUK_ASSERT_TOP(thr, 0); + duk_push_this(thr); + duk_push_literal(thr, "/"); + duk_get_prop_stridx(thr, 0, DUK_STRIDX_SOURCE); + duk_dup_m2(thr); /* another "/" */ + duk_get_prop_stridx(thr, 0, DUK_STRIDX_FLAGS); + duk_concat(thr, 4); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_regexp_prototype_flags(duk_hthread *thr) { + /* .flags is ES2015 but present even when ES2015 bindings are + * disabled because the constructor relies on it. + */ + duk_uint8_t buf[8]; /* enough for all flags + NUL */ + duk_uint8_t *p = buf; + + /* .flags is generic and works on any object. */ + duk_push_this(thr); + (void) duk_require_hobject(thr, -1); + if (duk_get_prop_stridx_boolean(thr, 0, DUK_STRIDX_GLOBAL, NULL)) { + *p++ = DUK_ASC_LC_G; + } + if (duk_get_prop_stridx_boolean(thr, 0, DUK_STRIDX_IGNORE_CASE, NULL)) { + *p++ = DUK_ASC_LC_I; + } + if (duk_get_prop_stridx_boolean(thr, 0, DUK_STRIDX_MULTILINE, NULL)) { + *p++ = DUK_ASC_LC_M; + } + /* .unicode: to be added */ + /* .sticky: to be added */ + *p++ = DUK_ASC_NUL; + DUK_ASSERT((duk_size_t) (p - buf) <= sizeof(buf)); + + duk_push_string(thr, (const char *) buf); + return 1; +} + +/* Shared helper for providing .source, .global, .multiline, etc getters. */ +DUK_INTERNAL duk_ret_t duk_bi_regexp_prototype_shared_getter(duk_hthread *thr) { + duk_hstring *h_bc; + duk_small_uint_t re_flags; + duk_hobject *h; + duk_int_t magic; + + DUK_ASSERT_TOP(thr, 0); + + duk_push_this(thr); + h = duk_require_hobject(thr, -1); + magic = duk_get_current_magic(thr); + + if (DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_REGEXP) { + duk_xget_owndataprop_stridx_short(thr, 0, DUK_STRIDX_INT_SOURCE); + duk_xget_owndataprop_stridx_short(thr, 0, DUK_STRIDX_INT_BYTECODE); + h_bc = duk_require_hstring(thr, -1); + re_flags = (duk_small_uint_t) DUK_HSTRING_GET_DATA(h_bc)[0]; /* Safe even if h_bc length is 0 (= NUL) */ + duk_pop(thr); + } else if (h == thr->builtins[DUK_BIDX_REGEXP_PROTOTYPE]) { + /* In ES2015 and ES2016 a TypeError would be thrown here. + * However, this had real world issues so ES2017 draft + * allows RegExp.prototype specifically, returning '(?:)' + * for .source and undefined for all flags. + */ + if (magic != 16 /* .source */) { + return 0; + } + duk_push_literal(thr, "(?:)"); /* .source handled by switch-case */ + re_flags = 0; + } else { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); + } + + /* [ regexp source ] */ + + switch (magic) { + case 0: { /* global */ + duk_push_boolean(thr, (re_flags & DUK_RE_FLAG_GLOBAL)); + break; + } + case 1: { /* ignoreCase */ + duk_push_boolean(thr, (re_flags & DUK_RE_FLAG_IGNORE_CASE)); + break; + } + case 2: { /* multiline */ + duk_push_boolean(thr, (re_flags & DUK_RE_FLAG_MULTILINE)); + break; + } +#if 0 + /* Don't provide until implemented to avoid interfering with feature + * detection in user code. + */ + case 3: /* sticky */ + case 4: { /* unicode */ + duk_push_false(thr); + break; + } +#endif + default: { /* source */ + /* leave 'source' on top */ + break; + } + } + + return 1; +} + +#endif /* DUK_USE_REGEXP_SUPPORT */ +#line 1 "duk_bi_string.c" +/* + * String built-ins + * + * Most String built-ins must only accept strings (or String objects). + * Symbols, represented internally as strings, must be generally rejected. + * The duk_push_this_coercible_to_string() helper does this automatically. + */ + +/* XXX: There are several limitations in the current implementation for + * strings with >= 0x80000000UL characters. In some cases one would need + * to be able to represent the range [-0xffffffff,0xffffffff] and so on. + * Generally character and byte length are assumed to fit into signed 32 + * bits (< 0x80000000UL). Places with issues are not marked explicitly + * below in all cases, look for signed type usage (duk_int_t etc) for + * offsets/lengths. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_STRING_BUILTIN) + +/* + * Helpers + */ + +DUK_LOCAL duk_hstring *duk__str_tostring_notregexp(duk_hthread *thr, duk_idx_t idx) { + duk_hstring *h; + + if (duk_get_class_number(thr, idx) == DUK_HOBJECT_CLASS_REGEXP) { + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return NULL;); + } + h = duk_to_hstring(thr, idx); + DUK_ASSERT(h != NULL); + + return h; +} + +DUK_LOCAL duk_int_t +duk__str_search_shared(duk_hthread *thr, duk_hstring *h_this, duk_hstring *h_search, duk_int_t start_cpos, duk_bool_t backwards) { + duk_int_t cpos; + duk_int_t bpos; + const duk_uint8_t *p_start, *p_end, *p; + const duk_uint8_t *q_start; + duk_int_t q_blen; + duk_uint8_t firstbyte; + duk_uint8_t t; + + cpos = start_cpos; + + /* Empty searchstring always matches; cpos must be clamped here. + * (If q_blen were < 0 due to clamped coercion, it would also be + * caught here.) + */ + q_start = DUK_HSTRING_GET_DATA(h_search); + q_blen = (duk_int_t) DUK_HSTRING_GET_BYTELEN(h_search); + if (q_blen <= 0) { + return cpos; + } + DUK_ASSERT(q_blen > 0); + + bpos = (duk_int_t) duk_heap_strcache_offset_char2byte(thr, h_this, (duk_uint32_t) cpos); + + p_start = DUK_HSTRING_GET_DATA(h_this); + p_end = p_start + DUK_HSTRING_GET_BYTELEN(h_this); + p = p_start + bpos; + + /* This loop is optimized for size. For speed, there should be + * two separate loops, and we should ensure that memcmp() can be + * used without an extra "will searchstring fit" check. Doing + * the preconditioning for 'p' and 'p_end' is easy but cpos + * must be updated if 'p' is wound back (backward scanning). + */ + + firstbyte = q_start[0]; /* leading byte of match string */ + while (p <= p_end && p >= p_start) { + t = *p; + + /* For ECMAScript strings, this check can only match for + * initial UTF-8 bytes (not continuation bytes). For other + * strings all bets are off. + */ + + if ((t == firstbyte) && ((duk_size_t) (p_end - p) >= (duk_size_t) q_blen)) { + DUK_ASSERT(q_blen > 0); + if (duk_memcmp((const void *) p, (const void *) q_start, (size_t) q_blen) == 0) { + return cpos; + } + } + + /* track cpos while scanning */ + if (backwards) { + /* when going backwards, we decrement cpos 'early'; + * 'p' may point to a continuation byte of the char + * at offset 'cpos', but that's OK because we'll + * backtrack all the way to the initial byte. + */ + if ((t & 0xc0) != 0x80) { + cpos--; + } + p--; + } else { + if ((t & 0xc0) != 0x80) { + cpos++; + } + p++; + } + } + + /* Not found. Empty string case is handled specially above. */ + return -1; +} + +/* + * Constructor + */ + +DUK_INTERNAL duk_ret_t duk_bi_string_constructor(duk_hthread *thr) { + duk_hstring *h; + duk_uint_t flags; + + /* String constructor needs to distinguish between an argument not given at all + * vs. given as 'undefined'. We're a vararg function to handle this properly. + */ + + /* XXX: copy current activation flags to thr, including current magic, + * is_constructor_call etc. This takes a few bytes in duk_hthread but + * makes call sites smaller (there are >30 is_constructor_call and get + * current magic call sites. + */ + + if (duk_get_top(thr) == 0) { + duk_push_hstring_empty(thr); + } else { + h = duk_to_hstring_acceptsymbol(thr, 0); + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h) && !duk_is_constructor_call(thr))) { + duk_push_symbol_descriptive_string(thr, h); + duk_replace(thr, 0); + } + } + duk_to_string(thr, 0); /* catches symbol argument for constructor call */ + DUK_ASSERT(duk_is_string(thr, 0)); + duk_set_top(thr, 1); /* Top may be 1 or larger. */ + + if (duk_is_constructor_call(thr)) { + /* String object internal value is immutable */ + flags = DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_FLAG_EXOTIC_STRINGOBJ | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_STRING); + duk_push_object_helper(thr, flags, DUK_BIDX_STRING_PROTOTYPE); + duk_dup_0(thr); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_VALUE, DUK_PROPDESC_FLAGS_NONE); + } + /* Note: unbalanced stack on purpose */ + + return 1; +} + +DUK_LOCAL duk_ret_t duk__construct_from_codepoints(duk_hthread *thr, duk_bool_t nonbmp) { + duk_bufwriter_ctx bw_alloc; + duk_bufwriter_ctx *bw; + duk_idx_t i, n; + duk_ucodepoint_t cp; + + /* XXX: It would be nice to build the string directly but ToUint16() + * coercion is needed so a generic helper would not be very + * helpful (perhaps coerce the value stack first here and then + * build a string from a duk_tval number sequence in one go?). + */ + + n = duk_get_top(thr); + + bw = &bw_alloc; + DUK_BW_INIT_PUSHBUF(thr, bw, (duk_size_t) n); /* initial estimate for ASCII only codepoints */ + + for (i = 0; i < n; i++) { + /* XXX: could improve bufwriter handling to write multiple codepoints + * with one ensure call but the relative benefit would be quite small. + */ + + if (nonbmp) { + /* ES2015 requires that (1) SameValue(cp, ToInteger(cp)) and + * (2) cp >= 0 and cp <= 0x10ffff. This check does not + * implement the steps exactly but the outcome should be + * the same. + */ + duk_int32_t i32 = 0; + if (!duk_is_whole_get_int32(duk_to_number(thr, i), &i32) || i32 < 0 || i32 > 0x10ffffL) { + DUK_DCERROR_RANGE_INVALID_ARGS(thr); + } + DUK_ASSERT(i32 >= 0 && i32 <= 0x10ffffL); + cp = (duk_ucodepoint_t) i32; + DUK_BW_WRITE_ENSURE_CESU8(thr, bw, cp); + } else { +#if defined(DUK_USE_NONSTD_STRING_FROMCHARCODE_32BIT) + /* ToUint16() coercion is mandatory in the E5.1 specification, but + * this non-compliant behavior makes more sense because we support + * non-BMP codepoints. Don't use CESU-8 because that'd create + * surrogate pairs. + */ + cp = (duk_ucodepoint_t) duk_to_uint32(thr, i); + DUK_BW_WRITE_ENSURE_XUTF8(thr, bw, cp); +#else + cp = (duk_ucodepoint_t) duk_to_uint16(thr, i); + DUK_ASSERT(cp >= 0 && cp <= 0x10ffffL); + DUK_BW_WRITE_ENSURE_CESU8(thr, bw, cp); +#endif + } + } + + DUK_BW_COMPACT(thr, bw); + (void) duk_buffer_to_string(thr, -1); /* Safe, extended UTF-8 or CESU-8 encoded. */ + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_string_constructor_from_char_code(duk_hthread *thr) { + return duk__construct_from_codepoints(thr, 0 /*nonbmp*/); +} + +#if defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_string_constructor_from_code_point(duk_hthread *thr) { + return duk__construct_from_codepoints(thr, 1 /*nonbmp*/); +} +#endif + +/* + * toString(), valueOf() + */ + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_to_string(duk_hthread *thr) { + duk_tval *tv; + + duk_push_this(thr); + tv = duk_require_tval(thr, -1); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_IS_STRING(tv)) { + /* return as is */ + } else if (DUK_TVAL_IS_OBJECT(tv)) { + duk_hobject *h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + + /* Must be a "string object", i.e. class "String" */ + if (DUK_HOBJECT_GET_CLASS_NUMBER(h) != DUK_HOBJECT_CLASS_STRING) { + goto type_error; + } + + duk_xget_owndataprop_stridx_short(thr, -1, DUK_STRIDX_INT_VALUE); + DUK_ASSERT(duk_is_string(thr, -1)); + } else { + goto type_error; + } + + (void) duk_require_hstring_notsymbol(thr, -1); /* Reject symbols (and wrapped symbols). */ + return 1; + +type_error: + DUK_DCERROR_TYPE_INVALID_ARGS(thr); +} + +/* + * Character and charcode access + */ + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_char_at(duk_hthread *thr) { + duk_hstring *h; + duk_int_t pos; + + /* XXX: faster implementation */ + + h = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h != NULL); + + pos = duk_to_int(thr, 0); + + if (sizeof(duk_size_t) >= sizeof(duk_uint_t)) { + /* Cast to duk_size_t works in this case: + * - If pos < 0, (duk_size_t) pos will always be + * >= max_charlen, and result will be the empty string + * (see duk_substring()). + * - If pos >= 0, pos + 1 cannot wrap. + */ + DUK_ASSERT((duk_size_t) DUK_INT_MIN >= DUK_HSTRING_MAX_BYTELEN); + DUK_ASSERT((duk_size_t) DUK_INT_MAX + 1U > (duk_size_t) DUK_INT_MAX); + duk_substring(thr, -1, (duk_size_t) pos, (duk_size_t) pos + 1U); + } else { + /* If size_t is smaller than int, explicit bounds checks + * are needed because an int may wrap multiple times. + */ + if (DUK_UNLIKELY(pos < 0 || (duk_uint_t) pos >= (duk_uint_t) DUK_HSTRING_GET_CHARLEN(h))) { + duk_push_hstring_empty(thr); + } else { + duk_substring(thr, -1, (duk_size_t) pos, (duk_size_t) pos + 1U); + } + } + + return 1; +} + +/* Magic: 0=charCodeAt, 1=codePointAt */ +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_char_code_at(duk_hthread *thr) { + duk_int_t pos; + duk_hstring *h; + duk_bool_t clamped; + duk_uint32_t cp; + duk_int_t magic; + + /* XXX: faster implementation */ + + DUK_DDD(DUK_DDDPRINT("arg=%!T", (duk_tval *) duk_get_tval(thr, 0))); + + h = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h != NULL); + + pos = duk_to_int_clamped_raw(thr, + 0 /*index*/, + 0 /*min(incl)*/, + (duk_int_t) DUK_HSTRING_GET_CHARLEN(h) - 1 /*max(incl)*/, + &clamped /*out_clamped*/); +#if defined(DUK_USE_ES6) + magic = duk_get_current_magic(thr); +#else + DUK_ASSERT(duk_get_current_magic(thr) == 0); + magic = 0; +#endif + if (clamped) { + /* For out-of-bounds indices .charCodeAt() returns NaN and + * .codePointAt() returns undefined. + */ + if (magic != 0) { + return 0; + } + duk_push_nan(thr); + } else { + DUK_ASSERT(pos >= 0); + cp = (duk_uint32_t) duk_hstring_char_code_at_raw(thr, h, (duk_uint_t) pos, (duk_bool_t) magic /*surrogate_aware*/); + duk_push_u32(thr, cp); + } + return 1; +} + +/* + * substring(), substr(), slice() + */ + +/* XXX: any chance of merging these three similar but still slightly + * different algorithms so that footprint would be reduced? + */ + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_substring(duk_hthread *thr) { + duk_hstring *h; + duk_int_t start_pos, end_pos; + duk_int_t len; + + h = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h != NULL); + len = (duk_int_t) DUK_HSTRING_GET_CHARLEN(h); + + /* [ start end str ] */ + + start_pos = duk_to_int_clamped(thr, 0, 0, len); + if (duk_is_undefined(thr, 1)) { + end_pos = len; + } else { + end_pos = duk_to_int_clamped(thr, 1, 0, len); + } + DUK_ASSERT(start_pos >= 0 && start_pos <= len); + DUK_ASSERT(end_pos >= 0 && end_pos <= len); + + if (start_pos > end_pos) { + duk_int_t tmp = start_pos; + start_pos = end_pos; + end_pos = tmp; + } + + DUK_ASSERT(end_pos >= start_pos); + + duk_substring(thr, -1, (duk_size_t) start_pos, (duk_size_t) end_pos); + return 1; +} + +#if defined(DUK_USE_SECTION_B) +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_substr(duk_hthread *thr) { + duk_hstring *h; + duk_int_t start_pos, end_pos; + duk_int_t len; + + /* Unlike non-obsolete String calls, substr() algorithm in E5.1 + * specification will happily coerce undefined and null to strings + * ("undefined" and "null"). + */ + duk_push_this(thr); + h = duk_to_hstring_m1(thr); /* Reject Symbols. */ + DUK_ASSERT(h != NULL); + len = (duk_int_t) DUK_HSTRING_GET_CHARLEN(h); + + /* [ start length str ] */ + + /* The implementation for computing of start_pos and end_pos differs + * from the standard algorithm, but is intended to result in the exactly + * same behavior. This is not always obvious. + */ + + /* combines steps 2 and 5; -len ensures max() not needed for step 5 */ + start_pos = duk_to_int_clamped(thr, 0, -len, len); + if (start_pos < 0) { + start_pos = len + start_pos; + } + DUK_ASSERT(start_pos >= 0 && start_pos <= len); + + /* combines steps 3, 6; step 7 is not needed */ + if (duk_is_undefined(thr, 1)) { + end_pos = len; + } else { + DUK_ASSERT(start_pos <= len); + end_pos = start_pos + duk_to_int_clamped(thr, 1, 0, len - start_pos); + } + DUK_ASSERT(start_pos >= 0 && start_pos <= len); + DUK_ASSERT(end_pos >= 0 && end_pos <= len); + DUK_ASSERT(end_pos >= start_pos); + + duk_substring(thr, -1, (duk_size_t) start_pos, (duk_size_t) end_pos); + return 1; +} +#endif /* DUK_USE_SECTION_B */ + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_slice(duk_hthread *thr) { + duk_hstring *h; + duk_int_t start_pos, end_pos; + duk_int_t len; + + h = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h != NULL); + len = (duk_int_t) DUK_HSTRING_GET_CHARLEN(h); + + /* [ start end str ] */ + + start_pos = duk_to_int_clamped(thr, 0, -len, len); + if (start_pos < 0) { + start_pos = len + start_pos; + } + if (duk_is_undefined(thr, 1)) { + end_pos = len; + } else { + end_pos = duk_to_int_clamped(thr, 1, -len, len); + if (end_pos < 0) { + end_pos = len + end_pos; + } + } + DUK_ASSERT(start_pos >= 0 && start_pos <= len); + DUK_ASSERT(end_pos >= 0 && end_pos <= len); + + if (end_pos < start_pos) { + end_pos = start_pos; + } + + DUK_ASSERT(end_pos >= start_pos); + + duk_substring(thr, -1, (duk_size_t) start_pos, (duk_size_t) end_pos); + return 1; +} + +/* + * Case conversion + */ + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_caseconv_shared(duk_hthread *thr) { + duk_small_int_t uppercase = duk_get_current_magic(thr); + + (void) duk_push_this_coercible_to_string(thr); + duk_unicode_case_convert_string(thr, (duk_bool_t) uppercase); + return 1; +} + +/* + * indexOf() and lastIndexOf() + */ + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_indexof_shared(duk_hthread *thr) { + duk_hstring *h_this; + duk_hstring *h_search; + duk_int_t clen_this; + duk_int_t cpos; + duk_small_uint_t is_lastindexof = (duk_small_uint_t) duk_get_current_magic(thr); /* 0=indexOf, 1=lastIndexOf */ + + h_this = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h_this != NULL); + clen_this = (duk_int_t) DUK_HSTRING_GET_CHARLEN(h_this); + + h_search = duk_to_hstring(thr, 0); + DUK_ASSERT(h_search != NULL); + + duk_to_number(thr, 1); + if (duk_is_nan(thr, 1) && is_lastindexof) { + /* indexOf: NaN should cause pos to be zero. + * lastIndexOf: NaN should cause pos to be +Infinity + * (and later be clamped to len). + */ + cpos = clen_this; + } else { + cpos = duk_to_int_clamped(thr, 1, 0, clen_this); + } + + cpos = duk__str_search_shared(thr, h_this, h_search, cpos, is_lastindexof /*backwards*/); + duk_push_int(thr, cpos); + return 1; +} + +/* + * replace() + */ + +/* XXX: the current implementation works but is quite clunky; it compiles + * to almost 1,4kB of x86 code so it needs to be simplified (better approach, + * shared helpers, etc). Some ideas for refactoring: + * + * - a primitive to convert a string into a regexp matcher (reduces matching + * code at the cost of making matching much slower) + * - use replace() as a basic helper for match() and split(), which are both + * much simpler + * - API call to get_prop and to_boolean + */ + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_replace(duk_hthread *thr) { + duk_hstring *h_input; + duk_hstring *h_match; + duk_hstring *h_search; + duk_hobject *h_re; + duk_bufwriter_ctx bw_alloc; + duk_bufwriter_ctx *bw; +#if defined(DUK_USE_REGEXP_SUPPORT) + duk_bool_t is_regexp; + duk_bool_t is_global; +#endif + duk_bool_t is_repl_func; + duk_uint32_t match_start_coff, match_start_boff; +#if defined(DUK_USE_REGEXP_SUPPORT) + duk_int_t match_caps; +#endif + duk_uint32_t prev_match_end_boff; + const duk_uint8_t *r_start, *r_end, *r; /* repl string scan */ + duk_size_t tmp_sz; + + DUK_ASSERT_TOP(thr, 2); + h_input = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h_input != NULL); + + bw = &bw_alloc; + DUK_BW_INIT_PUSHBUF(thr, bw, DUK_HSTRING_GET_BYTELEN(h_input)); /* input size is good output starting point */ + + DUK_ASSERT_TOP(thr, 4); + + /* stack[0] = search value + * stack[1] = replace value + * stack[2] = input string + * stack[3] = result buffer + */ + + h_re = duk_get_hobject_with_class(thr, 0, DUK_HOBJECT_CLASS_REGEXP); + if (h_re) { +#if defined(DUK_USE_REGEXP_SUPPORT) + is_regexp = 1; + is_global = duk_get_prop_stridx_boolean(thr, 0, DUK_STRIDX_GLOBAL, NULL); + + if (is_global) { + /* start match from beginning */ + duk_push_int(thr, 0); + duk_put_prop_stridx_short(thr, 0, DUK_STRIDX_LAST_INDEX); + } +#else /* DUK_USE_REGEXP_SUPPORT */ + DUK_DCERROR_UNSUPPORTED(thr); +#endif /* DUK_USE_REGEXP_SUPPORT */ + } else { + duk_to_string(thr, 0); /* rejects symbols */ +#if defined(DUK_USE_REGEXP_SUPPORT) + is_regexp = 0; + is_global = 0; +#endif + } + + if (duk_is_function(thr, 1)) { + is_repl_func = 1; + r_start = NULL; + r_end = NULL; + } else { + duk_hstring *h_repl; + + is_repl_func = 0; + h_repl = duk_to_hstring(thr, 1); /* reject symbols */ + DUK_ASSERT(h_repl != NULL); + r_start = DUK_HSTRING_GET_DATA(h_repl); + r_end = r_start + DUK_HSTRING_GET_BYTELEN(h_repl); + } + + prev_match_end_boff = 0; + + for (;;) { + /* + * If matching with a regexp: + * - non-global RegExp: lastIndex not touched on a match, zeroed + * on a non-match + * - global RegExp: on match, lastIndex will be updated by regexp + * executor to point to next char after the matching part (so that + * characters in the matching part are not matched again) + * + * If matching with a string: + * - always non-global match, find first occurrence + * + * We need: + * - The character offset of start-of-match for the replacer function + * - The byte offsets for start-of-match and end-of-match to implement + * the replacement values $&, $`, and $', and to copy non-matching + * input string portions (including header and trailer) verbatim. + * + * NOTE: the E5.1 specification is a bit vague how the RegExp should + * behave in the replacement process; e.g. is matching done first for + * all matches (in the global RegExp case) before any replacer calls + * are made? See: test-bi-string-proto-replace.js for discussion. + */ + + DUK_ASSERT_TOP(thr, 4); + +#if defined(DUK_USE_REGEXP_SUPPORT) + if (is_regexp) { + duk_dup_0(thr); + duk_dup_2(thr); + duk_regexp_match(thr); /* [ ... regexp input ] -> [ res_obj ] */ + if (!duk_is_object(thr, -1)) { + duk_pop(thr); + break; + } + + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_INDEX); + DUK_ASSERT(duk_is_number(thr, -1)); + match_start_coff = duk_get_uint(thr, -1); + duk_pop(thr); + + duk_get_prop_index(thr, -1, 0); + DUK_ASSERT(duk_is_string(thr, -1)); + h_match = duk_known_hstring(thr, -1); + duk_pop(thr); /* h_match is borrowed, remains reachable through match_obj */ + + if (DUK_HSTRING_GET_BYTELEN(h_match) == 0) { + /* This should be equivalent to match() algorithm step 8.f.iii.2: + * detect an empty match and allow it, but don't allow it twice. + */ + duk_uint32_t last_index; + + duk_get_prop_stridx_short(thr, 0, DUK_STRIDX_LAST_INDEX); + last_index = (duk_uint32_t) duk_get_uint(thr, -1); + DUK_DDD(DUK_DDDPRINT("empty match, bump lastIndex: %ld -> %ld", + (long) last_index, + (long) (last_index + 1))); + duk_pop(thr); + duk_push_uint(thr, (duk_uint_t) (last_index + 1)); + duk_put_prop_stridx_short(thr, 0, DUK_STRIDX_LAST_INDEX); + } + + DUK_ASSERT(duk_get_length(thr, -1) <= DUK_INT_MAX); /* string limits */ + match_caps = (duk_int_t) duk_get_length(thr, -1); + } else { +#else /* DUK_USE_REGEXP_SUPPORT */ + { /* unconditionally */ +#endif /* DUK_USE_REGEXP_SUPPORT */ + const duk_uint8_t *p_start, *p_end, *p; /* input string scan */ + const duk_uint8_t *q_start; /* match string */ + duk_size_t p_blen; + duk_size_t q_blen; + +#if defined(DUK_USE_REGEXP_SUPPORT) + DUK_ASSERT(!is_global); /* single match always */ +#endif + + p_start = DUK_HSTRING_GET_DATA(h_input); + p_end = p_start + DUK_HSTRING_GET_BYTELEN(h_input); + p_blen = (duk_size_t) DUK_HSTRING_GET_BYTELEN(h_input); + p = p_start; + + h_search = duk_known_hstring(thr, 0); + q_start = DUK_HSTRING_GET_DATA(h_search); + q_blen = (duk_size_t) DUK_HSTRING_GET_BYTELEN(h_search); + + if (q_blen > p_blen) { + break; /* no match */ + } + + p_end -= q_blen; /* ensure full memcmp() fits in while */ + DUK_ASSERT(p_end >= p); + + match_start_coff = 0; + + while (p <= p_end) { + DUK_ASSERT(p + q_blen <= DUK_HSTRING_GET_DATA(h_input) + DUK_HSTRING_GET_BYTELEN(h_input)); + if (duk_memcmp((const void *) p, (const void *) q_start, (size_t) q_blen) == 0) { + duk_dup_0(thr); + h_match = duk_known_hstring(thr, -1); +#if defined(DUK_USE_REGEXP_SUPPORT) + match_caps = 0; +#endif + goto found; + } + + /* track utf-8 non-continuation bytes */ + if ((p[0] & 0xc0) != 0x80) { + match_start_coff++; + } + p++; + } + + /* not found */ + break; + } + found: + + /* stack[0] = search value + * stack[1] = replace value + * stack[2] = input string + * stack[3] = result buffer + * stack[4] = regexp match OR match string + */ + + match_start_boff = (duk_uint32_t) duk_heap_strcache_offset_char2byte(thr, h_input, match_start_coff); + + tmp_sz = (duk_size_t) (match_start_boff - prev_match_end_boff); + DUK_BW_WRITE_ENSURE_BYTES(thr, bw, DUK_HSTRING_GET_DATA(h_input) + prev_match_end_boff, tmp_sz); + + prev_match_end_boff = match_start_boff + DUK_HSTRING_GET_BYTELEN(h_match); + + if (is_repl_func) { + duk_idx_t idx_args; + duk_hstring *h_repl; + + /* regexp res_obj is at index 4 */ + + duk_dup_1(thr); + idx_args = duk_get_top(thr); + +#if defined(DUK_USE_REGEXP_SUPPORT) + if (is_regexp) { + duk_int_t idx; + duk_require_stack(thr, match_caps + 2); + for (idx = 0; idx < match_caps; idx++) { + /* match followed by capture(s) */ + duk_get_prop_index(thr, 4, (duk_uarridx_t) idx); + } + } else { +#else /* DUK_USE_REGEXP_SUPPORT */ + { /* unconditionally */ +#endif /* DUK_USE_REGEXP_SUPPORT */ + /* match == search string, by definition */ + duk_dup_0(thr); + } + duk_push_uint(thr, (duk_uint_t) match_start_coff); + duk_dup_2(thr); + + /* [ ... replacer match [captures] match_char_offset input ] */ + + duk_call(thr, duk_get_top(thr) - idx_args); + h_repl = duk_to_hstring_m1(thr); /* -> [ ... repl_value ] */ + DUK_ASSERT(h_repl != NULL); + + DUK_BW_WRITE_ENSURE_HSTRING(thr, bw, h_repl); + + duk_pop(thr); /* repl_value */ + } else { + r = r_start; + + while (r < r_end) { + duk_int_t ch1; + duk_int_t ch2; +#if defined(DUK_USE_REGEXP_SUPPORT) + duk_int_t ch3; +#endif + duk_size_t left; + + ch1 = *r++; + if (ch1 != DUK_ASC_DOLLAR) { + goto repl_write; + } + DUK_ASSERT(r <= r_end); + left = (duk_size_t) (r_end - r); + + if (left <= 0) { + goto repl_write; + } + + ch2 = r[0]; + switch (ch2) { + case DUK_ASC_DOLLAR: { + ch1 = (1 << 8) + DUK_ASC_DOLLAR; + goto repl_write; + } + case DUK_ASC_AMP: { + DUK_BW_WRITE_ENSURE_HSTRING(thr, bw, h_match); + r++; + continue; + } + case DUK_ASC_GRAVE: { + tmp_sz = (duk_size_t) match_start_boff; + DUK_BW_WRITE_ENSURE_BYTES(thr, bw, DUK_HSTRING_GET_DATA(h_input), tmp_sz); + r++; + continue; + } + case DUK_ASC_SINGLEQUOTE: { + duk_uint32_t match_end_boff; + + /* Use match charlen instead of bytelen, just in case the input and + * match codepoint encodings would have different lengths. + */ + /* XXX: charlen computed here, and also in char2byte helper. */ + match_end_boff = (duk_uint32_t) duk_heap_strcache_offset_char2byte( + thr, + h_input, + match_start_coff + (duk_uint_fast32_t) DUK_HSTRING_GET_CHARLEN(h_match)); + + tmp_sz = (duk_size_t) (DUK_HSTRING_GET_BYTELEN(h_input) - match_end_boff); + DUK_BW_WRITE_ENSURE_BYTES(thr, bw, DUK_HSTRING_GET_DATA(h_input) + match_end_boff, tmp_sz); + r++; + continue; + } + default: { +#if defined(DUK_USE_REGEXP_SUPPORT) + duk_int_t capnum, captmp, capadv; + /* XXX: optional check, match_caps is zero if no regexp, + * so dollar will be interpreted literally anyway. + */ + + if (!is_regexp) { + goto repl_write; + } + + if (!(ch2 >= DUK_ASC_0 && ch2 <= DUK_ASC_9)) { + goto repl_write; + } + capnum = ch2 - DUK_ASC_0; + capadv = 1; + + if (left >= 2) { + ch3 = r[1]; + if (ch3 >= DUK_ASC_0 && ch3 <= DUK_ASC_9) { + captmp = capnum * 10 + (ch3 - DUK_ASC_0); + if (captmp < match_caps) { + capnum = captmp; + capadv = 2; + } + } + } + + if (capnum > 0 && capnum < match_caps) { + DUK_ASSERT(is_regexp != 0); /* match_caps == 0 without regexps */ + + /* regexp res_obj is at offset 4 */ + duk_get_prop_index(thr, 4, (duk_uarridx_t) capnum); + if (duk_is_string(thr, -1)) { + duk_hstring *h_tmp_str; + + h_tmp_str = duk_known_hstring(thr, -1); + + DUK_BW_WRITE_ENSURE_HSTRING(thr, bw, h_tmp_str); + } else { + /* undefined -> skip (replaced with empty) */ + } + duk_pop(thr); + r += capadv; + continue; + } else { + goto repl_write; + } +#else /* DUK_USE_REGEXP_SUPPORT */ + goto repl_write; /* unconditionally */ +#endif /* DUK_USE_REGEXP_SUPPORT */ + } /* default case */ + } /* switch (ch2) */ + + repl_write: + /* ch1 = (r_increment << 8) + byte */ + + DUK_BW_WRITE_ENSURE_U8(thr, bw, (duk_uint8_t) (ch1 & 0xff)); + r += ch1 >> 8; + } /* while repl */ + } /* if (is_repl_func) */ + + duk_pop(thr); /* pop regexp res_obj or match string */ + +#if defined(DUK_USE_REGEXP_SUPPORT) + if (!is_global) { +#else + { /* unconditionally; is_global==0 */ +#endif + break; + } + } + + /* trailer */ + tmp_sz = (duk_size_t) (DUK_HSTRING_GET_BYTELEN(h_input) - prev_match_end_boff); + DUK_BW_WRITE_ENSURE_BYTES(thr, bw, DUK_HSTRING_GET_DATA(h_input) + prev_match_end_boff, tmp_sz); + + DUK_ASSERT_TOP(thr, 4); + DUK_BW_COMPACT(thr, bw); + (void) duk_buffer_to_string(thr, -1); /* Safe if inputs are safe. */ + return 1; +} + +/* + * split() + */ + +/* XXX: very messy now, but works; clean up, remove unused variables (nomimally + * used so compiler doesn't complain). + */ + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_split(duk_hthread *thr) { + duk_hstring *h_input; + duk_hstring *h_sep; + duk_uint32_t limit; + duk_uint32_t arr_idx; +#if defined(DUK_USE_REGEXP_SUPPORT) + duk_bool_t is_regexp; +#endif + duk_bool_t matched; /* set to 1 if any match exists (needed for empty input special case) */ + duk_uint32_t prev_match_end_coff, prev_match_end_boff; + duk_uint32_t match_start_boff, match_start_coff; + duk_uint32_t match_end_boff, match_end_coff; + + h_input = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h_input != NULL); + + duk_push_array(thr); + + if (duk_is_undefined(thr, 1)) { + limit = 0xffffffffUL; + } else { + limit = duk_to_uint32(thr, 1); + } + + if (limit == 0) { + return 1; + } + + /* If the separator is a RegExp, make a "clone" of it. The specification + * algorithm calls [[Match]] directly for specific indices; we emulate this + * by tweaking lastIndex and using a "force global" variant of duk_regexp_match() + * which will use global-style matching even when the RegExp itself is non-global. + */ + + if (duk_is_undefined(thr, 0)) { + /* The spec algorithm first does "R = ToString(separator)" before checking + * whether separator is undefined. Since this is side effect free, we can + * skip the ToString() here. + */ + duk_dup_2(thr); + duk_put_prop_index(thr, 3, 0); + return 1; + } else if (duk_get_hobject_with_class(thr, 0, DUK_HOBJECT_CLASS_REGEXP) != NULL) { +#if defined(DUK_USE_REGEXP_SUPPORT) + duk_push_hobject_bidx(thr, DUK_BIDX_REGEXP_CONSTRUCTOR); + duk_dup_0(thr); + duk_new(thr, 1); /* [ ... RegExp val ] -> [ ... res ] */ + duk_replace(thr, 0); + /* lastIndex is initialized to zero by new RegExp() */ + is_regexp = 1; +#else + DUK_DCERROR_UNSUPPORTED(thr); +#endif + } else { + duk_to_string(thr, 0); +#if defined(DUK_USE_REGEXP_SUPPORT) + is_regexp = 0; +#endif + } + + /* stack[0] = separator (string or regexp) + * stack[1] = limit + * stack[2] = input string + * stack[3] = result array + */ + + prev_match_end_boff = 0; + prev_match_end_coff = 0; + arr_idx = 0; + matched = 0; + + for (;;) { + /* + * The specification uses RegExp [[Match]] to attempt match at specific + * offsets. We don't have such a primitive, so we use an actual RegExp + * and tweak lastIndex. Since the RegExp may be non-global, we use a + * special variant which forces global-like behavior for matching. + */ + + DUK_ASSERT_TOP(thr, 4); + +#if defined(DUK_USE_REGEXP_SUPPORT) + if (is_regexp) { + duk_dup_0(thr); + duk_dup_2(thr); + duk_regexp_match_force_global(thr); /* [ ... regexp input ] -> [ res_obj ] */ + if (!duk_is_object(thr, -1)) { + duk_pop(thr); + break; + } + matched = 1; + + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_INDEX); + DUK_ASSERT(duk_is_number(thr, -1)); + match_start_coff = duk_get_uint(thr, -1); + match_start_boff = (duk_uint32_t) duk_heap_strcache_offset_char2byte(thr, h_input, match_start_coff); + duk_pop(thr); + + if (match_start_coff == DUK_HSTRING_GET_CHARLEN(h_input)) { + /* don't allow an empty match at the end of the string */ + duk_pop(thr); + break; + } + + duk_get_prop_stridx_short(thr, 0, DUK_STRIDX_LAST_INDEX); + DUK_ASSERT(duk_is_number(thr, -1)); + match_end_coff = duk_get_uint(thr, -1); + match_end_boff = (duk_uint32_t) duk_heap_strcache_offset_char2byte(thr, h_input, match_end_coff); + duk_pop(thr); + + /* empty match -> bump and continue */ + if (prev_match_end_boff == match_end_boff) { + duk_push_uint(thr, (duk_uint_t) (match_end_coff + 1)); + duk_put_prop_stridx_short(thr, 0, DUK_STRIDX_LAST_INDEX); + duk_pop(thr); + continue; + } + } else { +#else /* DUK_USE_REGEXP_SUPPORT */ + { /* unconditionally */ +#endif /* DUK_USE_REGEXP_SUPPORT */ + const duk_uint8_t *p_start, *p_end, *p; /* input string scan */ + const duk_uint8_t *q_start; /* match string */ + duk_size_t q_blen, q_clen; + + p_start = DUK_HSTRING_GET_DATA(h_input); + p_end = p_start + DUK_HSTRING_GET_BYTELEN(h_input); + p = p_start + prev_match_end_boff; + + h_sep = duk_known_hstring(thr, 0); /* symbol already rejected above */ + q_start = DUK_HSTRING_GET_DATA(h_sep); + q_blen = (duk_size_t) DUK_HSTRING_GET_BYTELEN(h_sep); + q_clen = (duk_size_t) DUK_HSTRING_GET_CHARLEN(h_sep); + + p_end -= q_blen; /* ensure full memcmp() fits in while */ + + match_start_coff = prev_match_end_coff; + + if (q_blen == 0) { + /* Handle empty separator case: it will always match, and always + * triggers the check in step 13.c.iii initially. Note that we + * must skip to either end of string or start of first codepoint, + * skipping over any continuation bytes! + * + * Don't allow an empty string to match at the end of the input. + */ + + matched = 1; /* empty separator can always match */ + + match_start_coff++; + p++; + while (p < p_end) { + if ((p[0] & 0xc0) != 0x80) { + goto found; + } + p++; + } + goto not_found; + } + + DUK_ASSERT(q_blen > 0 && q_clen > 0); + while (p <= p_end) { + DUK_ASSERT(p + q_blen <= DUK_HSTRING_GET_DATA(h_input) + DUK_HSTRING_GET_BYTELEN(h_input)); + DUK_ASSERT(q_blen > 0); /* no issues with empty memcmp() */ + if (duk_memcmp((const void *) p, (const void *) q_start, (size_t) q_blen) == 0) { + /* never an empty match, so step 13.c.iii can't be triggered */ + goto found; + } + + /* track utf-8 non-continuation bytes */ + if ((p[0] & 0xc0) != 0x80) { + match_start_coff++; + } + p++; + } + + not_found: + /* not found */ + break; + + found: + matched = 1; + match_start_boff = (duk_uint32_t) (p - p_start); + match_end_coff = (duk_uint32_t) (match_start_coff + q_clen); /* constrained by string length */ + match_end_boff = (duk_uint32_t) (match_start_boff + q_blen); /* ditto */ + + /* empty match (may happen with empty separator) -> bump and continue */ + if (prev_match_end_boff == match_end_boff) { + prev_match_end_boff++; + prev_match_end_coff++; + continue; + } + } /* if (is_regexp) */ + + /* stack[0] = separator (string or regexp) + * stack[1] = limit + * stack[2] = input string + * stack[3] = result array + * stack[4] = regexp res_obj (if is_regexp) + */ + + DUK_DDD(DUK_DDDPRINT("split; match_start b=%ld,c=%ld, match_end b=%ld,c=%ld, prev_end b=%ld,c=%ld", + (long) match_start_boff, + (long) match_start_coff, + (long) match_end_boff, + (long) match_end_coff, + (long) prev_match_end_boff, + (long) prev_match_end_coff)); + + duk_push_lstring(thr, + (const char *) (DUK_HSTRING_GET_DATA(h_input) + prev_match_end_boff), + (duk_size_t) (match_start_boff - prev_match_end_boff)); + duk_put_prop_index(thr, 3, arr_idx); + arr_idx++; + if (arr_idx >= limit) { + goto hit_limit; + } + +#if defined(DUK_USE_REGEXP_SUPPORT) + if (is_regexp) { + duk_size_t i, len; + + len = duk_get_length(thr, 4); + for (i = 1; i < len; i++) { + DUK_ASSERT(i <= DUK_UARRIDX_MAX); /* cannot have >4G captures */ + duk_get_prop_index(thr, 4, (duk_uarridx_t) i); + duk_put_prop_index(thr, 3, arr_idx); + arr_idx++; + if (arr_idx >= limit) { + goto hit_limit; + } + } + + duk_pop(thr); + /* lastIndex already set up for next match */ + } else { +#else /* DUK_USE_REGEXP_SUPPORT */ + { + /* unconditionally */ +#endif /* DUK_USE_REGEXP_SUPPORT */ + /* no action */ + } + + prev_match_end_boff = match_end_boff; + prev_match_end_coff = match_end_coff; + continue; + } /* for */ + + /* Combined step 11 (empty string special case) and 14-15. */ + + DUK_DDD(DUK_DDDPRINT("split trailer; prev_end b=%ld,c=%ld", (long) prev_match_end_boff, (long) prev_match_end_coff)); + + if (DUK_HSTRING_GET_BYTELEN(h_input) > 0 || !matched) { + /* Add trailer if: + * a) non-empty input + * b) empty input and no (zero size) match found (step 11) + */ + + duk_push_lstring(thr, + (const char *) DUK_HSTRING_GET_DATA(h_input) + prev_match_end_boff, + (duk_size_t) (DUK_HSTRING_GET_BYTELEN(h_input) - prev_match_end_boff)); + duk_put_prop_index(thr, 3, arr_idx); + /* No arr_idx update or limit check */ + } + + return 1; + +hit_limit: +#if defined(DUK_USE_REGEXP_SUPPORT) + if (is_regexp) { + duk_pop(thr); + } +#endif + + return 1; +} + +/* + * Various + */ + +#if defined(DUK_USE_REGEXP_SUPPORT) +DUK_LOCAL void duk__to_regexp_helper(duk_hthread *thr, duk_idx_t idx, duk_bool_t force_new) { + duk_hobject *h; + + /* Shared helper for match() steps 3-4, search() steps 3-4. */ + + DUK_ASSERT(idx >= 0); + + if (force_new) { + goto do_new; + } + + h = duk_get_hobject_with_class(thr, idx, DUK_HOBJECT_CLASS_REGEXP); + if (!h) { + goto do_new; + } + return; + +do_new: + duk_push_hobject_bidx(thr, DUK_BIDX_REGEXP_CONSTRUCTOR); + duk_dup(thr, idx); + duk_new(thr, 1); /* [ ... RegExp val ] -> [ ... res ] */ + duk_replace(thr, idx); +} +#endif /* DUK_USE_REGEXP_SUPPORT */ + +#if defined(DUK_USE_REGEXP_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_search(duk_hthread *thr) { + /* Easiest way to implement the search required by the specification + * is to do a RegExp test() with lastIndex forced to zero. To avoid + * side effects on the argument, "clone" the RegExp if a RegExp was + * given as input. + * + * The global flag of the RegExp should be ignored; setting lastIndex + * to zero (which happens when "cloning" the RegExp) should have an + * equivalent effect. + */ + + DUK_ASSERT_TOP(thr, 1); + (void) duk_push_this_coercible_to_string(thr); /* at index 1 */ + duk__to_regexp_helper(thr, 0 /*index*/, 1 /*force_new*/); + + /* stack[0] = regexp + * stack[1] = string + */ + + /* Avoid using RegExp.prototype methods, as they're writable and + * configurable and may have been changed. + */ + + duk_dup_0(thr); + duk_dup_1(thr); /* [ ... re_obj input ] */ + duk_regexp_match(thr); /* -> [ ... res_obj ] */ + + if (!duk_is_object(thr, -1)) { + duk_push_int(thr, -1); + return 1; + } + + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_INDEX); + DUK_ASSERT(duk_is_number(thr, -1)); + return 1; +} +#endif /* DUK_USE_REGEXP_SUPPORT */ + +#if defined(DUK_USE_REGEXP_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_match(duk_hthread *thr) { + duk_bool_t global; + duk_int_t prev_last_index; + duk_int_t this_index; + duk_int_t arr_idx; + + DUK_ASSERT_TOP(thr, 1); + (void) duk_push_this_coercible_to_string(thr); + duk__to_regexp_helper(thr, 0 /*index*/, 0 /*force_new*/); + global = duk_get_prop_stridx_boolean(thr, 0, DUK_STRIDX_GLOBAL, NULL); + DUK_ASSERT_TOP(thr, 2); + + /* stack[0] = regexp + * stack[1] = string + */ + + if (!global) { + duk_regexp_match(thr); /* -> [ res_obj ] */ + return 1; /* return 'res_obj' */ + } + + /* Global case is more complex. */ + + /* [ regexp string ] */ + + duk_push_int(thr, 0); + duk_put_prop_stridx_short(thr, 0, DUK_STRIDX_LAST_INDEX); + duk_push_array(thr); + + /* [ regexp string res_arr ] */ + + prev_last_index = 0; + arr_idx = 0; + + for (;;) { + DUK_ASSERT_TOP(thr, 3); + + duk_dup_0(thr); + duk_dup_1(thr); + duk_regexp_match(thr); /* -> [ ... regexp string ] -> [ ... res_obj ] */ + + if (!duk_is_object(thr, -1)) { + duk_pop(thr); + break; + } + + duk_get_prop_stridx_short(thr, 0, DUK_STRIDX_LAST_INDEX); + DUK_ASSERT(duk_is_number(thr, -1)); + this_index = duk_get_int(thr, -1); + duk_pop(thr); + + if (this_index == prev_last_index) { + this_index++; + duk_push_int(thr, this_index); + duk_put_prop_stridx_short(thr, 0, DUK_STRIDX_LAST_INDEX); + } + prev_last_index = this_index; + + duk_get_prop_index(thr, -1, 0); /* match string */ + duk_put_prop_index(thr, 2, (duk_uarridx_t) arr_idx); + arr_idx++; + duk_pop(thr); /* res_obj */ + } + + if (arr_idx == 0) { + duk_push_null(thr); + } + + return 1; /* return 'res_arr' or 'null' */ +} +#endif /* DUK_USE_REGEXP_SUPPORT */ + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_concat(duk_hthread *thr) { + /* duk_concat() coerces arguments with ToString() in correct order */ + (void) duk_push_this_coercible_to_string(thr); + duk_insert(thr, 0); /* this is relatively expensive */ + duk_concat(thr, duk_get_top(thr)); + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_trim(duk_hthread *thr) { + DUK_ASSERT_TOP(thr, 0); + (void) duk_push_this_coercible_to_string(thr); + duk_trim(thr, 0); + DUK_ASSERT_TOP(thr, 1); + return 1; +} + +#if defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_repeat(duk_hthread *thr) { + duk_hstring *h_input; + duk_size_t input_blen; + duk_size_t result_len; + duk_int_t count_signed; + duk_uint_t count; + const duk_uint8_t *src; + duk_uint8_t *buf; + duk_uint8_t *p; + duk_double_t d; +#if !defined(DUK_USE_PREFER_SIZE) + duk_size_t copy_size; + duk_uint8_t *p_end; +#endif + + DUK_ASSERT_TOP(thr, 1); + h_input = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h_input != NULL); + input_blen = DUK_HSTRING_GET_BYTELEN(h_input); + + /* Count is ToNumber() coerced; +Infinity must be always rejected + * (even if input string is zero length), as well as negative values + * and -Infinity. -Infinity doesn't require an explicit check + * because duk_get_int() clamps it to DUK_INT_MIN which gets rejected + * as a negative value (regardless of input string length). + */ + d = duk_to_number(thr, 0); + if (duk_double_is_posinf(d)) { + goto fail_range; + } + count_signed = duk_get_int(thr, 0); + if (count_signed < 0) { + goto fail_range; + } + count = (duk_uint_t) count_signed; + + /* Overflow check for result length. */ + result_len = count * input_blen; + if (count != 0 && result_len / count != input_blen) { + goto fail_range; + } + + /* Temporary fixed buffer, later converted to string. */ + buf = (duk_uint8_t *) duk_push_fixed_buffer_nozero(thr, result_len); + DUK_ASSERT(buf != NULL); + src = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_input); + DUK_ASSERT(src != NULL); + +#if defined(DUK_USE_PREFER_SIZE) + p = buf; + while (count-- > 0) { + duk_memcpy((void *) p, (const void *) src, input_blen); /* copy size may be zero, but pointers are valid */ + p += input_blen; + } +#else /* DUK_USE_PREFER_SIZE */ + /* Take advantage of already copied pieces to speed up the process + * especially for small repeated strings. + */ + p = buf; + p_end = p + result_len; + copy_size = input_blen; + for (;;) { + duk_size_t remain = (duk_size_t) (p_end - p); + DUK_DDD(DUK_DDDPRINT("remain=%ld, copy_size=%ld, input_blen=%ld, result_len=%ld", + (long) remain, + (long) copy_size, + (long) input_blen, + (long) result_len)); + if (remain <= copy_size) { + /* If result_len is zero, this case is taken and does + * a zero size copy (with valid pointers). + */ + duk_memcpy((void *) p, (const void *) src, remain); + break; + } else { + duk_memcpy((void *) p, (const void *) src, copy_size); + p += copy_size; + } + + src = (const duk_uint8_t *) buf; /* Use buf as source for larger copies. */ + copy_size = (duk_size_t) (p - buf); + } +#endif /* DUK_USE_PREFER_SIZE */ + + /* XXX: It would be useful to be able to create a duk_hstring with + * a certain byte size whose data area wasn't initialized and which + * wasn't in the string table yet. This would allow a string to be + * constructed directly without a buffer temporary and when it was + * finished, it could be injected into the string table. Currently + * this isn't possible because duk_hstrings are only tracked by the + * intern table (they are not in heap_allocated). + */ + + duk_buffer_to_string(thr, -1); /* Safe if input is safe. */ + return 1; + +fail_range: + DUK_DCERROR_RANGE_INVALID_ARGS(thr); +} +#endif /* DUK_USE_ES6 */ + +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_locale_compare(duk_hthread *thr) { + duk_hstring *h1; + duk_hstring *h2; + duk_size_t h1_len, h2_len, prefix_len; + duk_small_int_t ret = 0; + duk_small_int_t rc; + + /* The current implementation of localeCompare() is simply a codepoint + * by codepoint comparison, implemented with a simple string compare + * because UTF-8 should preserve codepoint ordering (assuming valid + * shortest UTF-8 encoding). + * + * The specification requires that the return value must be related + * to the sort order: e.g. negative means that 'this' comes before + * 'that' in sort order. We assume an ascending sort order. + */ + + /* XXX: could share code with duk_js_ops.c, duk_js_compare_helper */ + + h1 = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h1 != NULL); + + h2 = duk_to_hstring(thr, 0); + DUK_ASSERT(h2 != NULL); + + h1_len = (duk_size_t) DUK_HSTRING_GET_BYTELEN(h1); + h2_len = (duk_size_t) DUK_HSTRING_GET_BYTELEN(h2); + prefix_len = (h1_len <= h2_len ? h1_len : h2_len); + + rc = (duk_small_int_t) duk_memcmp((const void *) DUK_HSTRING_GET_DATA(h1), + (const void *) DUK_HSTRING_GET_DATA(h2), + (size_t) prefix_len); + + if (rc < 0) { + ret = -1; + goto done; + } else if (rc > 0) { + ret = 1; + goto done; + } + + /* prefix matches, lengths matter now */ + if (h1_len > h2_len) { + ret = 1; + goto done; + } else if (h1_len == h2_len) { + DUK_ASSERT(ret == 0); + goto done; + } + ret = -1; + goto done; + +done: + duk_push_int(thr, (duk_int_t) ret); + return 1; +} + +#if defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_startswith_endswith(duk_hthread *thr) { + duk_int_t magic; + duk_hstring *h_target; + duk_size_t blen_target; + duk_hstring *h_search; + duk_size_t blen_search; + duk_int_t off; + duk_bool_t result = 0; + duk_size_t blen_left; + + /* Because string byte lengths are in [0,DUK_INT_MAX] it's safe to + * subtract two string lengths without overflow. + */ + DUK_ASSERT(DUK_HSTRING_MAX_BYTELEN <= DUK_INT_MAX); + + h_target = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h_target != NULL); + + h_search = duk__str_tostring_notregexp(thr, 0); + DUK_ASSERT(h_search != NULL); + + magic = duk_get_current_magic(thr); + + /* Careful to avoid pointer overflows in the matching logic. */ + + blen_target = DUK_HSTRING_GET_BYTELEN(h_target); + blen_search = DUK_HSTRING_GET_BYTELEN(h_search); + +#if 0 + /* If search string is longer than the target string, we can + * never match. Could check explicitly, but should be handled + * correctly below. + */ + if (blen_search > blen_target) { + goto finish; + } +#endif + + off = 0; + if (duk_is_undefined(thr, 1)) { + if (magic) { + off = (duk_int_t) blen_target - (duk_int_t) blen_search; + } else { + DUK_ASSERT(off == 0); + } + } else { + duk_int_t len; + duk_int_t pos; + + DUK_ASSERT(DUK_HSTRING_MAX_BYTELEN <= DUK_INT_MAX); + len = (duk_int_t) DUK_HSTRING_GET_CHARLEN(h_target); + pos = duk_to_int_clamped(thr, 1, 0, len); + DUK_ASSERT(pos >= 0 && pos <= len); + + off = (duk_int_t) duk_heap_strcache_offset_char2byte(thr, h_target, (duk_uint_fast32_t) pos); + if (magic) { + off -= (duk_int_t) blen_search; + } + } + if (off < 0 || off > (duk_int_t) blen_target) { + goto finish; + } + + /* The main comparison can be done using a memcmp() rather than + * doing codepoint comparisons: for CESU-8 strings there is a + * canonical representation for every codepoint. But we do need + * to deal with the char/byte offset translation to find the + * comparison range. + */ + + DUK_ASSERT(off >= 0); + DUK_ASSERT((duk_size_t) off <= blen_target); + blen_left = blen_target - (duk_size_t) off; + if (blen_left >= blen_search) { + const duk_uint8_t *p_cmp_start = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_target) + off; + const duk_uint8_t *p_search = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_search); + if (duk_memcmp_unsafe((const void *) p_cmp_start, (const void *) p_search, (size_t) blen_search) == 0) { + result = 1; + } + } + +finish: + duk_push_boolean(thr, result); + return 1; +} +#endif /* DUK_USE_ES6 */ + +#if defined(DUK_USE_ES6) +DUK_INTERNAL duk_ret_t duk_bi_string_prototype_includes(duk_hthread *thr) { + duk_hstring *h; + duk_hstring *h_search; + duk_int_t len; + duk_int_t pos; + + h = duk_push_this_coercible_to_string(thr); + DUK_ASSERT(h != NULL); + + h_search = duk__str_tostring_notregexp(thr, 0); + DUK_ASSERT(h_search != NULL); + + len = (duk_int_t) DUK_HSTRING_GET_CHARLEN(h); + pos = duk_to_int_clamped(thr, 1, 0, len); + DUK_ASSERT(pos >= 0 && pos <= len); + + pos = duk__str_search_shared(thr, h, h_search, pos, 0 /*backwards*/); + duk_push_boolean(thr, pos >= 0); + return 1; +} +#endif /* DUK_USE_ES6 */ +#endif /* DUK_USE_STRING_BUILTIN */ +#line 1 "duk_bi_symbol.c" +/* + * Symbol built-in + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_SYMBOL_BUILTIN) + +/* + * Constructor + */ + +DUK_INTERNAL duk_ret_t duk_bi_symbol_constructor_shared(duk_hthread *thr) { + const duk_uint8_t *desc; + duk_size_t len; + duk_uint8_t *buf; + duk_uint8_t *p; + duk_int_t magic; + + magic = duk_get_current_magic(thr); + if (duk_is_undefined(thr, 0) && (magic == 0)) { + /* Symbol() accepts undefined and empty string, but they are + * treated differently. + */ + desc = NULL; + len = 0; + } else { + /* Symbol.for() coerces undefined to 'undefined' */ + desc = (const duk_uint8_t *) duk_to_lstring(thr, 0, &len); + } + + /* Maximum symbol data length: + * +1 initial byte (0x80 or 0x81) + * +len description + * +1 0xff after description, before unique suffix + * +17 autogenerated unique suffix: 'ffffffff-ffffffff' is longest + * +1 0xff after unique suffix for symbols with undefined description + */ + buf = (duk_uint8_t *) duk_push_fixed_buffer(thr, 1 + len + 1 + 17 + 1); + DUK_ASSERT(buf != NULL); + p = buf + 1; + DUK_ASSERT(desc != NULL || len == 0); /* may be NULL if len is 0 */ + duk_memcpy_unsafe((void *) p, (const void *) desc, len); + p += len; + if (magic == 0) { + /* Symbol(): create unique symbol. Use two 32-bit values + * to avoid dependency on 64-bit types and 64-bit integer + * formatting (at least for now). + */ + if (++thr->heap->sym_counter[0] == 0) { + thr->heap->sym_counter[1]++; + } + p += DUK_SPRINTF((char *) p, + "\xFF" + "%lx-%lx", + (unsigned long) thr->heap->sym_counter[1], + (unsigned long) thr->heap->sym_counter[0]); + if (desc == NULL) { + /* Special case for 'undefined' description, trailing + * 0xff distinguishes from empty string description, + * but needs minimal special case handling elsewhere. + */ + *p++ = 0xff; + } + buf[0] = 0x81; + } else { + /* Symbol.for(): create a global symbol */ + buf[0] = 0x80; + } + + duk_push_lstring(thr, (const char *) buf, (duk_size_t) (p - buf)); + DUK_DDD(DUK_DDDPRINT("created symbol: %!T", duk_get_tval(thr, -1))); + return 1; +} + +DUK_LOCAL duk_hstring *duk__auto_unbox_symbol(duk_hthread *thr, duk_tval *tv_arg) { + duk_tval *tv; + duk_hobject *h_obj; + duk_hstring *h_str; + + DUK_ASSERT(tv_arg != NULL); + + /* XXX: add internal helper: duk_auto_unbox_tval(thr, tv, mask); */ + /* XXX: add internal helper: duk_auto_unbox(thr, tv, idx); */ + + tv = tv_arg; + if (DUK_TVAL_IS_OBJECT(tv)) { + h_obj = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h_obj != NULL); + if (DUK_HOBJECT_GET_CLASS_NUMBER(h_obj) == DUK_HOBJECT_CLASS_SYMBOL) { + tv = duk_hobject_get_internal_value_tval_ptr(thr->heap, h_obj); + if (tv == NULL) { + return NULL; + } + } else { + return NULL; + } + } + + if (!DUK_TVAL_IS_STRING(tv)) { + return NULL; + } + h_str = DUK_TVAL_GET_STRING(tv); + DUK_ASSERT(h_str != NULL); + + /* Here symbol is more expected than not. */ + if (DUK_UNLIKELY(!DUK_HSTRING_HAS_SYMBOL(h_str))) { + return NULL; + } + + return h_str; +} + +DUK_INTERNAL duk_ret_t duk_bi_symbol_tostring_shared(duk_hthread *thr) { + duk_hstring *h_str; + + h_str = duk__auto_unbox_symbol(thr, DUK_HTHREAD_THIS_PTR(thr)); + if (h_str == NULL) { + return DUK_RET_TYPE_ERROR; + } + + if (duk_get_current_magic(thr) == 0) { + /* .toString() */ + duk_push_symbol_descriptive_string(thr, h_str); + } else { + /* .valueOf() */ + duk_push_hstring(thr, h_str); + } + return 1; +} + +DUK_INTERNAL duk_ret_t duk_bi_symbol_key_for(duk_hthread *thr) { + duk_hstring *h; + const duk_uint8_t *p; + + /* Argument must be a symbol but not checked here. The initial byte + * check will catch non-symbol strings. + */ + h = duk_require_hstring(thr, 0); + DUK_ASSERT(h != NULL); + + p = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h); + DUK_ASSERT(p != NULL); + + /* Even for zero length strings there's at least one NUL byte so + * we can safely check the initial byte. + */ + if (p[0] == 0x80) { + /* Global symbol, return its key (bytes just after the initial byte). */ + duk_push_lstring(thr, (const char *) (p + 1), (duk_size_t) (DUK_HSTRING_GET_BYTELEN(h) - 1)); + return 1; + } else if (p[0] == 0x81 || p[0] == 0x82 || p[0] == 0xff) { + /* Local symbol or hidden symbol, return undefined. */ + return 0; + } + + /* Covers normal strings and unknown initial bytes. */ + return DUK_RET_TYPE_ERROR; +} + +DUK_INTERNAL duk_ret_t duk_bi_symbol_toprimitive(duk_hthread *thr) { + duk_hstring *h_str; + + h_str = duk__auto_unbox_symbol(thr, DUK_HTHREAD_THIS_PTR(thr)); + if (h_str == NULL) { + return DUK_RET_TYPE_ERROR; + } + duk_push_hstring(thr, h_str); + return 1; +} + +#endif /* DUK_USE_SYMBOL_BUILTIN */ +#line 1 "duk_bi_thread.c" +/* + * Thread builtins + */ + +/* #include duk_internal.h -> already included */ + +/* + * Constructor + */ + +#if defined(DUK_USE_COROUTINE_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_thread_constructor(duk_hthread *thr) { + duk_hthread *new_thr; + duk_hobject *func; + + /* Check that the argument is callable; this is not 100% because we + * don't allow native functions to be a thread's initial function. + * Resume will reject such functions in any case. + */ + /* XXX: need a duk_require_func_promote_lfunc() */ + func = duk_require_hobject_promote_lfunc(thr, 0); + DUK_ASSERT(func != NULL); + duk_require_callable(thr, 0); + + duk_push_thread(thr); + new_thr = (duk_hthread *) duk_known_hobject(thr, -1); + new_thr->state = DUK_HTHREAD_STATE_INACTIVE; + + /* push initial function call to new thread stack; this is + * picked up by resume(). + */ + duk_push_hobject(new_thr, func); + + return 1; /* return thread */ +} +#endif + +/* + * Resume a thread. + * + * The thread must be in resumable state, either (a) new thread which hasn't + * yet started, or (b) a thread which has previously yielded. This method + * must be called from an ECMAScript function. + * + * Args: + * - thread + * - value + * - isError (defaults to false) + * + * Note: yield and resume handling is currently asymmetric. + */ + +#if defined(DUK_USE_COROUTINE_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_thread_resume(duk_hthread *ctx) { + duk_hthread *thr = (duk_hthread *) ctx; + duk_hthread *thr_resume; + duk_hobject *caller_func; + duk_small_uint_t is_error; + + DUK_DDD(DUK_DDDPRINT("Duktape.Thread.resume(): thread=%!T, value=%!T, is_error=%!T", + (duk_tval *) duk_get_tval(thr, 0), + (duk_tval *) duk_get_tval(thr, 1), + (duk_tval *) duk_get_tval(thr, 2))); + + DUK_ASSERT(thr->state == DUK_HTHREAD_STATE_RUNNING); + DUK_ASSERT(thr->heap->curr_thread == thr); + + thr_resume = duk_require_hthread(thr, 0); + DUK_ASSERT(duk_get_top(thr) == 3); + is_error = (duk_small_uint_t) duk_to_boolean_top_pop(thr); + DUK_ASSERT(duk_get_top(thr) == 2); + + /* [ thread value ] */ + + /* + * Thread state and calling context checks + */ + + if (thr->callstack_top < 2) { + DUK_DD(DUK_DDPRINT( + "resume state invalid: callstack should contain at least 2 entries (caller and Duktape.Thread.resume)")); + goto state_error; + } + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT(thr->callstack_curr->parent != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr) != NULL); /* us */ + DUK_ASSERT(DUK_HOBJECT_IS_NATFUNC(DUK_ACT_GET_FUNC(thr->callstack_curr))); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr->parent) != NULL); /* caller */ + + caller_func = DUK_ACT_GET_FUNC(thr->callstack_curr->parent); + if (!DUK_HOBJECT_IS_COMPFUNC(caller_func)) { + DUK_DD(DUK_DDPRINT("resume state invalid: caller must be ECMAScript code")); + goto state_error; + } + + /* Note: there is no requirement that: 'thr->callstack_preventcount == 1' + * like for yield. + */ + + if (thr_resume->state != DUK_HTHREAD_STATE_INACTIVE && thr_resume->state != DUK_HTHREAD_STATE_YIELDED) { + DUK_DD(DUK_DDPRINT("resume state invalid: target thread must be INACTIVE or YIELDED")); + goto state_error; + } + + DUK_ASSERT(thr_resume->state == DUK_HTHREAD_STATE_INACTIVE || thr_resume->state == DUK_HTHREAD_STATE_YIELDED); + + /* Further state-dependent pre-checks */ + + if (thr_resume->state == DUK_HTHREAD_STATE_YIELDED) { + /* no pre-checks now, assume a previous yield() has left things in + * tip-top shape (longjmp handler will assert for these). + */ + } else { + duk_hobject *h_fun; + + DUK_ASSERT(thr_resume->state == DUK_HTHREAD_STATE_INACTIVE); + + /* The initial function must be an ECMAScript function (but + * can be bound). We must make sure of that before we longjmp + * because an error in the RESUME handler call processing will + * not be handled very cleanly. + */ + if ((thr_resume->callstack_top != 0) || (thr_resume->valstack_top - thr_resume->valstack != 1)) { + goto state_error; + } + + duk_push_tval(thr, DUK_GET_TVAL_NEGIDX(thr_resume, -1)); + duk_resolve_nonbound_function(thr); + h_fun = duk_require_hobject(thr, -1); /* reject lightfuncs on purpose */ + if (!DUK_HOBJECT_IS_CALLABLE(h_fun) || !DUK_HOBJECT_IS_COMPFUNC(h_fun)) { + goto state_error; + } + duk_pop(thr); + } + +#if 0 + /* This check would prevent a heap destruction time finalizer from + * launching a coroutine, which would ensure that during finalization + * 'thr' would always equal heap_thread. Normal runtime finalizers + * run with ms_running == 0, i.e. outside mark-and-sweep. See GH-2030. + */ + if (thr->heap->ms_running) { + DUK_D(DUK_DPRINT("refuse Duktape.Thread.resume() when ms_running != 0")); + goto state_error; + } +#endif + + /* + * The error object has been augmented with a traceback and other + * info from its creation point -- usually another thread. The + * error handler is called here right before throwing, but it also + * runs in the resumer's thread. It might be nice to get a traceback + * from the resumee but this is not the case now. + */ + +#if defined(DUK_USE_AUGMENT_ERROR_THROW) + if (is_error) { + DUK_ASSERT_TOP(thr, 2); /* value (error) is at stack top */ + duk_err_augment_error_throw(thr); /* in resumer's context */ + } +#endif + +#if defined(DUK_USE_DEBUG) + if (is_error) { + DUK_DDD(DUK_DDDPRINT("RESUME ERROR: thread=%!T, value=%!T", + (duk_tval *) duk_get_tval(thr, 0), + (duk_tval *) duk_get_tval(thr, 1))); + } else if (thr_resume->state == DUK_HTHREAD_STATE_YIELDED) { + DUK_DDD(DUK_DDDPRINT("RESUME NORMAL: thread=%!T, value=%!T", + (duk_tval *) duk_get_tval(thr, 0), + (duk_tval *) duk_get_tval(thr, 1))); + } else { + DUK_DDD(DUK_DDDPRINT("RESUME INITIAL: thread=%!T, value=%!T", + (duk_tval *) duk_get_tval(thr, 0), + (duk_tval *) duk_get_tval(thr, 1))); + } +#endif + + thr->heap->lj.type = DUK_LJ_TYPE_RESUME; + + /* lj value2: thread */ + DUK_ASSERT(thr->valstack_bottom < thr->valstack_top); + DUK_TVAL_SET_TVAL_UPDREF(thr, &thr->heap->lj.value2, &thr->valstack_bottom[0]); /* side effects */ + + /* lj value1: value */ + DUK_ASSERT(thr->valstack_bottom + 1 < thr->valstack_top); + DUK_TVAL_SET_TVAL_UPDREF(thr, &thr->heap->lj.value1, &thr->valstack_bottom[1]); /* side effects */ + DUK_TVAL_CHKFAST_INPLACE_SLOW(&thr->heap->lj.value1); + + thr->heap->lj.iserror = is_error; + + DUK_ASSERT(thr->heap->lj.jmpbuf_ptr != NULL); /* call is from executor, so we know we have a jmpbuf */ + duk_err_longjmp(thr); /* execution resumes in bytecode executor */ + DUK_UNREACHABLE(); + /* Never here, fall through to error (from compiler point of view). */ + +state_error: + DUK_DCERROR_TYPE_INVALID_STATE(thr); +} +#endif + +/* + * Yield the current thread. + * + * The thread must be in yieldable state: it must have a resumer, and there + * must not be any yield-preventing calls (native calls and constructor calls, + * currently) in the thread's call stack (otherwise a resume would not be + * possible later). This method must be called from an ECMAScript function. + * + * Args: + * - value + * - isError (defaults to false) + * + * Note: yield and resume handling is currently asymmetric. + */ + +#if defined(DUK_USE_COROUTINE_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_thread_yield(duk_hthread *thr) { + duk_hobject *caller_func; + duk_small_uint_t is_error; + + DUK_DDD(DUK_DDDPRINT("Duktape.Thread.yield(): value=%!T, is_error=%!T", + (duk_tval *) duk_get_tval(thr, 0), + (duk_tval *) duk_get_tval(thr, 1))); + + DUK_ASSERT(thr->state == DUK_HTHREAD_STATE_RUNNING); + DUK_ASSERT(thr->heap->curr_thread == thr); + + DUK_ASSERT(duk_get_top(thr) == 2); + is_error = (duk_small_uint_t) duk_to_boolean_top_pop(thr); + DUK_ASSERT(duk_get_top(thr) == 1); + + /* [ value ] */ + + /* + * Thread state and calling context checks + */ + + if (!thr->resumer) { + DUK_DD(DUK_DDPRINT("yield state invalid: current thread must have a resumer")); + goto state_error; + } + DUK_ASSERT(thr->resumer->state == DUK_HTHREAD_STATE_RESUMED); + + if (thr->callstack_top < 2) { + DUK_DD(DUK_DDPRINT( + "yield state invalid: callstack should contain at least 2 entries (caller and Duktape.Thread.yield)")); + goto state_error; + } + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT(thr->callstack_curr->parent != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr) != NULL); /* us */ + DUK_ASSERT(DUK_HOBJECT_IS_NATFUNC(DUK_ACT_GET_FUNC(thr->callstack_curr))); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr->parent) != NULL); /* caller */ + + caller_func = DUK_ACT_GET_FUNC(thr->callstack_curr->parent); + if (!DUK_HOBJECT_IS_COMPFUNC(caller_func)) { + DUK_DD(DUK_DDPRINT("yield state invalid: caller must be ECMAScript code")); + goto state_error; + } + + DUK_ASSERT(thr->callstack_preventcount >= 1); /* should never be zero, because we (Duktape.Thread.yield) are on the stack */ + if (thr->callstack_preventcount != 1) { + /* Note: the only yield-preventing call is Duktape.Thread.yield(), hence check for 1, not 0 */ + DUK_DD(DUK_DDPRINT("yield state invalid: there must be no yield-preventing calls in current thread callstack " + "(preventcount is %ld)", + (long) thr->callstack_preventcount)); + goto state_error; + } + + /* + * The error object has been augmented with a traceback and other + * info from its creation point -- usually the current thread. + * The error handler, however, is called right before throwing + * and runs in the yielder's thread. + */ + +#if defined(DUK_USE_AUGMENT_ERROR_THROW) + if (is_error) { + DUK_ASSERT_TOP(thr, 1); /* value (error) is at stack top */ + duk_err_augment_error_throw(thr); /* in yielder's context */ + } +#endif + +#if defined(DUK_USE_DEBUG) + if (is_error) { + DUK_DDD(DUK_DDDPRINT("YIELD ERROR: value=%!T", (duk_tval *) duk_get_tval(thr, 0))); + } else { + DUK_DDD(DUK_DDDPRINT("YIELD NORMAL: value=%!T", (duk_tval *) duk_get_tval(thr, 0))); + } +#endif + + /* + * Process yield + * + * After longjmp(), processing continues in bytecode executor longjmp + * handler, which will e.g. update thr->resumer to NULL. + */ + + thr->heap->lj.type = DUK_LJ_TYPE_YIELD; + + /* lj value1: value */ + DUK_ASSERT(thr->valstack_bottom < thr->valstack_top); + DUK_TVAL_SET_TVAL_UPDREF(thr, &thr->heap->lj.value1, &thr->valstack_bottom[0]); /* side effects */ + DUK_TVAL_CHKFAST_INPLACE_SLOW(&thr->heap->lj.value1); + + thr->heap->lj.iserror = is_error; + + DUK_ASSERT(thr->heap->lj.jmpbuf_ptr != NULL); /* call is from executor, so we know we have a jmpbuf */ + duk_err_longjmp(thr); /* execution resumes in bytecode executor */ + DUK_UNREACHABLE(); + /* Never here, fall through to error (from compiler point of view). */ + +state_error: + DUK_DCERROR_TYPE_INVALID_STATE(thr); +} +#endif + +#if defined(DUK_USE_COROUTINE_SUPPORT) +DUK_INTERNAL duk_ret_t duk_bi_thread_current(duk_hthread *thr) { + duk_push_current_thread(thr); + return 1; +} +#endif +#line 1 "duk_bi_thrower.c" +/* + * Type error thrower, E5 Section 13.2.3. + */ + +/* #include duk_internal.h -> already included */ + +DUK_INTERNAL duk_ret_t duk_bi_type_error_thrower(duk_hthread *thr) { + DUK_DCERROR_TYPE_INVALID_ARGS(thr); +} +#line 1 "duk_debug_fixedbuffer.c" +/* + * Fixed buffer helper useful for debugging, requires no allocation + * which is critical for debugging. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_DEBUG) + +DUK_INTERNAL void duk_fb_put_bytes(duk_fixedbuffer *fb, const duk_uint8_t *buffer, duk_size_t length) { + duk_size_t avail; + duk_size_t copylen; + + avail = (fb->offset >= fb->length ? (duk_size_t) 0 : (duk_size_t) (fb->length - fb->offset)); + if (length > avail) { + copylen = avail; + fb->truncated = 1; + } else { + copylen = length; + } + duk_memcpy_unsafe(fb->buffer + fb->offset, buffer, copylen); + fb->offset += copylen; +} + +DUK_INTERNAL void duk_fb_put_byte(duk_fixedbuffer *fb, duk_uint8_t x) { + duk_fb_put_bytes(fb, (const duk_uint8_t *) &x, 1); +} + +DUK_INTERNAL void duk_fb_put_cstring(duk_fixedbuffer *fb, const char *x) { + duk_fb_put_bytes(fb, (const duk_uint8_t *) x, (duk_size_t) DUK_STRLEN(x)); +} + +DUK_INTERNAL void duk_fb_sprintf(duk_fixedbuffer *fb, const char *fmt, ...) { + duk_size_t avail; + va_list ap; + + va_start(ap, fmt); + avail = (fb->offset >= fb->length ? (duk_size_t) 0 : (duk_size_t) (fb->length - fb->offset)); + if (avail > 0) { + duk_int_t res = (duk_int_t) DUK_VSNPRINTF((char *) (fb->buffer + fb->offset), avail, fmt, ap); + if (res < 0) { + /* error */ + } else if ((duk_size_t) res >= avail) { + /* (maybe) truncated */ + fb->offset += avail; + if ((duk_size_t) res > avail) { + /* actual chars dropped (not just NUL term) */ + fb->truncated = 1; + } + } else { + /* normal */ + fb->offset += (duk_size_t) res; + } + } + va_end(ap); +} + +DUK_INTERNAL void duk_fb_put_funcptr(duk_fixedbuffer *fb, duk_uint8_t *fptr, duk_size_t fptr_size) { + char buf[64 + 1]; + duk_debug_format_funcptr(buf, sizeof(buf), fptr, fptr_size); + buf[sizeof(buf) - 1] = (char) 0; + duk_fb_put_cstring(fb, buf); +} + +DUK_INTERNAL duk_bool_t duk_fb_is_full(duk_fixedbuffer *fb) { + return (fb->offset >= fb->length); +} + +#endif /* DUK_USE_DEBUG */ +#line 1 "duk_debug_vsnprintf.c" +/* + * Custom formatter for debug printing, allowing Duktape specific data + * structures (such as tagged values and heap objects) to be printed with + * a nice format string. Because debug printing should not affect execution + * state, formatting here must be independent of execution (see implications + * below) and must not allocate memory. + * + * Custom format tags begin with a '%!' to safely distinguish them from + * standard format tags. The following conversions are supported: + * + * %!T tagged value (duk_tval *) + * %!O heap object (duk_heaphdr *) + * %!I decoded bytecode instruction + * %!X bytecode instruction opcode name (arg is long) + * %!C catcher (duk_catcher *) + * %!A activation (duk_activation *) + * + * Everything is serialized in a JSON-like manner. The default depth is one + * level, internal prototype is not followed, and internal properties are not + * serialized. The following modifiers change this behavior: + * + * @ print pointers + * # print binary representations (where applicable) + * d deep traversal of own properties (not prototype) + * p follow prototype chain (useless without 'd') + * i include internal properties (other than prototype) + * x hexdump buffers + * h heavy formatting + * + * For instance, the following serializes objects recursively, but does not + * follow the prototype chain nor print internal properties: "%!dO". + * + * Notes: + * + * * Standard snprintf return value semantics seem to vary. This + * implementation returns the number of bytes it actually wrote + * (excluding the null terminator). If retval == buffer size, + * output was truncated (except for corner cases). + * + * * Output format is intentionally different from ECMAScript + * formatting requirements, as formatting here serves debugging + * of internals. + * + * * Depth checking (and updating) is done in each type printer + * separately, to allow them to call each other freely. + * + * * Some pathological structures might take ages to print (e.g. + * self recursion with 100 properties pointing to the object + * itself). To guard against these, each printer also checks + * whether the output buffer is full; if so, early exit. + * + * * Reference loops are detected using a loop stack. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_DEBUG) + +/* #include stdio.h -> already included */ +/* #include stdarg.h -> already included */ +#include + +/* list of conversion specifiers that terminate a format tag; + * this is unfortunately guesswork. + */ +#define DUK__ALLOWED_STANDARD_SPECIFIERS "diouxXeEfFgGaAcsCSpnm" + +/* maximum length of standard format tag that we support */ +#define DUK__MAX_FORMAT_TAG_LENGTH 32 + +/* heapobj recursion depth when deep printing is selected */ +#define DUK__DEEP_DEPTH_LIMIT 8 + +/* maximum recursion depth for loop detection stacks */ +#define DUK__LOOP_STACK_DEPTH 256 + +/* must match bytecode defines now; build autogenerate? */ +DUK_LOCAL const char * const duk__bc_optab[256] = { + "LDREG", "STREG", "JUMP", "LDCONST", "LDINT", "LDINTX", "LDTHIS", "LDUNDEF", + "LDNULL", "LDTRUE", "LDFALSE", "GETVAR", "BNOT", "LNOT", "UNM", "UNP", + "EQ_RR", "EQ_CR", "EQ_RC", "EQ_CC", "NEQ_RR", "NEQ_CR", "NEQ_RC", "NEQ_CC", + "SEQ_RR", "SEQ_CR", "SEQ_RC", "SEQ_CC", "SNEQ_RR", "SNEQ_CR", "SNEQ_RC", "SNEQ_CC", + + "GT_RR", "GT_CR", "GT_RC", "GT_CC", "GE_RR", "GE_CR", "GE_RC", "GE_CC", + "LT_RR", "LT_CR", "LT_RC", "LT_CC", "LE_RR", "LE_CR", "LE_RC", "LE_CC", + "IFTRUE_R", "IFTRUE_C", "IFFALSE_R", "IFFALSE_C", "ADD_RR", "ADD_CR", "ADD_RC", "ADD_CC", + "SUB_RR", "SUB_CR", "SUB_RC", "SUB_CC", "MUL_RR", "MUL_CR", "MUL_RC", "MUL_CC", + + "DIV_RR", "DIV_CR", "DIV_RC", "DIV_CC", "MOD_RR", "MOD_CR", "MOD_RC", "MOD_CC", + "EXP_RR", "EXP_CR", "EXP_RC", "EXP_CC", "BAND_RR", "BAND_CR", "BAND_RC", "BAND_CC", + "BOR_RR", "BOR_CR", "BOR_RC", "BOR_CC", "BXOR_RR", "BXOR_CR", "BXOR_RC", "BXOR_CC", + "BASL_RR", "BASL_CR", "BASL_RC", "BASL_CC", "BLSR_RR", "BLSR_CR", "BLSR_RC", "BLSR_CC", + + "BASR_RR", "BASR_CR", "BASR_RC", "BASR_CC", "INSTOF_RR", "INSTOF_CR", "INSTOF_RC", "INSTOF_CC", + "IN_RR", "IN_CR", "IN_RC", "IN_CC", "GETPROP_RR", "GETPROP_CR", "GETPROP_RC", "GETPROP_CC", + "PUTPROP_RR", "PUTPROP_CR", "PUTPROP_RC", "PUTPROP_CC", "DELPROP_RR", "DELPROP_CR", "DELPROP_RC", "DELPROP_CC", + "PREINCR", "PREDECR", "POSTINCR", "POSTDECR", "PREINCV", "PREDECV", "POSTINCV", "POSTDECV", + + "PREINCP_RR", "PREINCP_CR", "PREINCP_RC", "PREINCP_CC", "PREDECP_RR", "PREDECP_CR", "PREDECP_RC", "PREDECP_CC", + "POSTINCP_RR", "POSTINCP_CR", "POSTINCP_RC", "POSTINCP_CC", "POSTDECP_RR", "POSTDECP_CR", "POSTDECP_RC", "POSTDECP_CC", + "DECLVAR_RR", "DECLVAR_CR", "DECLVAR_RC", "DECLVAR_CC", "REGEXP_RR", "REGEXP_RC", "REGEXP_CR", "REGEXP_CC", + "CLOSURE", "TYPEOF", "TYPEOFID", "PUTVAR", "DELVAR", "RETREG", "RETUNDEF", "RETCONST", + + "RETCONSTN", "LABEL", "ENDLABEL", "BREAK", "CONTINUE", "TRYCATCH", "ENDTRY", "ENDCATCH", + "ENDFIN", "THROW", "INVLHS", "CSREG", "CSVAR_RR", "CSVAR_CR", "CSVAR_RC", "CSVAR_CC", + "CALL0", "CALL1", "CALL2", "CALL3", "CALL4", "CALL5", "CALL6", "CALL7", + "CALL8", "CALL9", "CALL10", "CALL11", "CALL12", "CALL13", "CALL14", "CALL15", + + "NEWOBJ", "NEWARR", "MPUTOBJ", "MPUTOBJI", "INITSET", "INITGET", "MPUTARR", "MPUTARRI", + "SETALEN", "INITENUM", "NEXTENUM", "NEWTARGET", "DEBUGGER", "NOP", "INVALID", "UNUSED207", + "GETPROPC_RR", "GETPROPC_CR", "GETPROPC_RC", "GETPROPC_CC", "UNUSED212", "UNUSED213", "UNUSED214", "UNUSED215", + "UNUSED216", "UNUSED217", "UNUSED218", "UNUSED219", "UNUSED220", "UNUSED221", "UNUSED222", "UNUSED223", + + "UNUSED224", "UNUSED225", "UNUSED226", "UNUSED227", "UNUSED228", "UNUSED229", "UNUSED230", "UNUSED231", + "UNUSED232", "UNUSED233", "UNUSED234", "UNUSED235", "UNUSED236", "UNUSED237", "UNUSED238", "UNUSED239", + "UNUSED240", "UNUSED241", "UNUSED242", "UNUSED243", "UNUSED244", "UNUSED245", "UNUSED246", "UNUSED247", + "UNUSED248", "UNUSED249", "UNUSED250", "UNUSED251", "UNUSED252", "UNUSED253", "UNUSED254", "UNUSED255" +}; + +typedef struct duk__dprint_state duk__dprint_state; +struct duk__dprint_state { + duk_fixedbuffer *fb; + + /* loop_stack_index could be perhaps be replaced by 'depth', but it's nice + * to not couple these two mechanisms unnecessarily. + */ + duk_hobject *loop_stack[DUK__LOOP_STACK_DEPTH]; + duk_int_t loop_stack_index; + duk_int_t loop_stack_limit; + + duk_int_t depth; + duk_int_t depth_limit; + + duk_bool_t pointer; + duk_bool_t heavy; + duk_bool_t binary; + duk_bool_t follow_proto; + duk_bool_t internal; + duk_bool_t hexdump; +}; + +/* helpers */ +DUK_LOCAL_DECL void duk__print_hstring(duk__dprint_state *st, duk_hstring *k, duk_bool_t quotes); +DUK_LOCAL_DECL void duk__print_hobject(duk__dprint_state *st, duk_hobject *h); +DUK_LOCAL_DECL void duk__print_hbuffer(duk__dprint_state *st, duk_hbuffer *h); +DUK_LOCAL_DECL void duk__print_tval(duk__dprint_state *st, duk_tval *tv); +DUK_LOCAL_DECL void duk__print_instr(duk__dprint_state *st, duk_instr_t ins); +DUK_LOCAL_DECL void duk__print_heaphdr(duk__dprint_state *st, duk_heaphdr *h); +DUK_LOCAL_DECL void duk__print_shared_heaphdr(duk__dprint_state *st, duk_heaphdr *h); +DUK_LOCAL_DECL void duk__print_shared_heaphdr_string(duk__dprint_state *st, duk_heaphdr_string *h); + +DUK_LOCAL void duk__print_shared_heaphdr(duk__dprint_state *st, duk_heaphdr *h) { + duk_fixedbuffer *fb = st->fb; + + if (st->heavy) { + duk_fb_sprintf(fb, "(%p)", (void *) h); + } + + if (!h) { + return; + } + + if (st->binary) { + duk_size_t i; + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_LBRACKET); + for (i = 0; i < (duk_size_t) sizeof(*h); i++) { + duk_fb_sprintf(fb, "%02lx", (unsigned long) ((duk_uint8_t *) h)[i]); + } + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_RBRACKET); + } + +#if defined(DUK_USE_REFERENCE_COUNTING) /* currently implicitly also DUK_USE_DOUBLE_LINKED_HEAP */ + if (st->heavy) { + duk_fb_sprintf(fb, + "[h_next=%p,h_prev=%p,h_refcount=%lu,h_flags=%08lx,type=%ld," + "reachable=%ld,temproot=%ld,finalizable=%ld,finalized=%ld]", + (void *) DUK_HEAPHDR_GET_NEXT(NULL, h), + (void *) DUK_HEAPHDR_GET_PREV(NULL, h), + (unsigned long) DUK_HEAPHDR_GET_REFCOUNT(h), + (unsigned long) DUK_HEAPHDR_GET_FLAGS(h), + (long) DUK_HEAPHDR_GET_TYPE(h), + (long) (DUK_HEAPHDR_HAS_REACHABLE(h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_TEMPROOT(h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_FINALIZABLE(h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_FINALIZED(h) ? 1 : 0)); + } +#else + if (st->heavy) { + duk_fb_sprintf(fb, + "[h_next=%p,h_flags=%08lx,type=%ld,reachable=%ld,temproot=%ld,finalizable=%ld,finalized=%ld]", + (void *) DUK_HEAPHDR_GET_NEXT(NULL, h), + (unsigned long) DUK_HEAPHDR_GET_FLAGS(h), + (long) DUK_HEAPHDR_GET_TYPE(h), + (long) (DUK_HEAPHDR_HAS_REACHABLE(h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_TEMPROOT(h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_FINALIZABLE(h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_FINALIZED(h) ? 1 : 0)); + } +#endif +} + +DUK_LOCAL void duk__print_shared_heaphdr_string(duk__dprint_state *st, duk_heaphdr_string *h) { + duk_fixedbuffer *fb = st->fb; + + if (st->heavy) { + duk_fb_sprintf(fb, "(%p)", (void *) h); + } + + if (!h) { + return; + } + + if (st->binary) { + duk_size_t i; + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_LBRACKET); + for (i = 0; i < (duk_size_t) sizeof(*h); i++) { + duk_fb_sprintf(fb, "%02lx", (unsigned long) ((duk_uint8_t *) h)[i]); + } + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_RBRACKET); + } + +#if defined(DUK_USE_REFERENCE_COUNTING) + if (st->heavy) { + duk_fb_sprintf(fb, + "[h_refcount=%lu,h_flags=%08lx,type=%ld,reachable=%ld,temproot=%ld,finalizable=%ld,finalized=%ld]", + (unsigned long) DUK_HEAPHDR_GET_REFCOUNT((duk_heaphdr *) h), + (unsigned long) DUK_HEAPHDR_GET_FLAGS((duk_heaphdr *) h), + (long) DUK_HEAPHDR_GET_TYPE((duk_heaphdr *) h), + (long) (DUK_HEAPHDR_HAS_REACHABLE((duk_heaphdr *) h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_TEMPROOT((duk_heaphdr *) h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_FINALIZABLE((duk_heaphdr *) h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_FINALIZED((duk_heaphdr *) h) ? 1 : 0)); + } +#else + if (st->heavy) { + duk_fb_sprintf(fb, + "[h_flags=%08lx,type=%ld,reachable=%ld,temproot=%ld,finalizable=%ld,finalized=%ld]", + (unsigned long) DUK_HEAPHDR_GET_FLAGS((duk_heaphdr *) h), + (long) DUK_HEAPHDR_GET_TYPE((duk_heaphdr *) h), + (long) (DUK_HEAPHDR_HAS_REACHABLE((duk_heaphdr *) h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_TEMPROOT((duk_heaphdr *) h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_FINALIZABLE((duk_heaphdr *) h) ? 1 : 0), + (long) (DUK_HEAPHDR_HAS_FINALIZED((duk_heaphdr *) h) ? 1 : 0)); + } +#endif +} + +DUK_LOCAL void duk__print_hstring(duk__dprint_state *st, duk_hstring *h, duk_bool_t quotes) { + duk_fixedbuffer *fb = st->fb; + const duk_uint8_t *p; + const duk_uint8_t *p_end; + + /* terminal type: no depth check */ + + if (duk_fb_is_full(fb)) { + return; + } + + duk__print_shared_heaphdr_string(st, &h->hdr); + + if (!h) { + duk_fb_put_cstring(fb, "NULL"); + return; + } + + p = DUK_HSTRING_GET_DATA(h); + p_end = p + DUK_HSTRING_GET_BYTELEN(h); + + if (p_end > p && p[0] == DUK_ASC_UNDERSCORE) { + /* If property key begins with underscore, encode it with + * forced quotes (e.g. "_Foo") to distinguish it from encoded + * internal properties (e.g. \x82Bar -> _Bar). + */ + quotes = 1; + } + + if (quotes) { + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_DOUBLEQUOTE); + } + while (p < p_end) { + duk_uint8_t ch = *p++; + + /* two special escapes: '\' and '"', other printables as is */ + if (ch == '\\') { + duk_fb_sprintf(fb, "\\\\"); + } else if (ch == '"') { + duk_fb_sprintf(fb, "\\\""); + } else if (ch >= 0x20 && ch <= 0x7e) { + duk_fb_put_byte(fb, ch); + } else if (ch == 0x82 && !quotes) { + /* encode \x82Bar as _Bar if no quotes are + * applied, this is for readable internal keys. + */ + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_UNDERSCORE); + } else { + duk_fb_sprintf(fb, "\\x%02lx", (unsigned long) ch); + } + } + if (quotes) { + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_DOUBLEQUOTE); + } +#if defined(DUK_USE_REFERENCE_COUNTING) + /* XXX: limit to quoted strings only, to save keys from being cluttered? */ + duk_fb_sprintf(fb, "/%lu", (unsigned long) DUK_HEAPHDR_GET_REFCOUNT(&h->hdr)); +#endif +} + +#define DUK__COMMA() \ + do { \ + if (first) { \ + first = 0; \ + } else { \ + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_COMMA); \ + } \ + } while (0) + +DUK_LOCAL void duk__print_hobject(duk__dprint_state *st, duk_hobject *h) { + duk_fixedbuffer *fb = st->fb; + duk_uint_fast32_t i; + duk_tval *tv; + duk_hstring *key; + duk_bool_t first = 1; + const char *brace1 = "{"; + const char *brace2 = "}"; + duk_bool_t pushed_loopstack = 0; + + if (duk_fb_is_full(fb)) { + return; + } + + duk__print_shared_heaphdr(st, &h->hdr); + + if (h && DUK_HOBJECT_HAS_ARRAY_PART(h)) { + brace1 = "["; + brace2 = "]"; + } + + if (!h) { + duk_fb_put_cstring(fb, "NULL"); + goto finished; + } + + if (st->depth >= st->depth_limit) { + const char *subtype = "generic"; + + if (DUK_HOBJECT_IS_COMPFUNC(h)) { + subtype = "compfunc"; + } else if (DUK_HOBJECT_IS_NATFUNC(h)) { + subtype = "natfunc"; + } else if (DUK_HOBJECT_IS_THREAD(h)) { + subtype = "thread"; + } else if (DUK_HOBJECT_IS_BUFOBJ(h)) { + subtype = "bufobj"; + } else if (DUK_HOBJECT_IS_ARRAY(h)) { + subtype = "array"; + } + duk_fb_sprintf(fb, "%sobject/%s %p%s", (const char *) brace1, subtype, (void *) h, (const char *) brace2); + return; + } + + for (i = 0; i < (duk_uint_fast32_t) st->loop_stack_index; i++) { + if (st->loop_stack[i] == h) { + duk_fb_sprintf(fb, "%sLOOP:%p%s", (const char *) brace1, (void *) h, (const char *) brace2); + return; + } + } + + /* after this, return paths should 'goto finished' for decrement */ + st->depth++; + + if (st->loop_stack_index >= st->loop_stack_limit) { + duk_fb_sprintf(fb, "%sOUT-OF-LOOP-STACK%s", (const char *) brace1, (const char *) brace2); + goto finished; + } + st->loop_stack[st->loop_stack_index++] = h; + pushed_loopstack = 1; + + /* + * Notation: double underscore used for internal properties which are not + * stored in the property allocation (e.g. '__valstack'). + */ + + duk_fb_put_cstring(fb, brace1); + + if (DUK_HOBJECT_GET_PROPS(NULL, h)) { + duk_uint32_t a_limit; + + a_limit = DUK_HOBJECT_GET_ASIZE(h); + if (st->internal) { + /* dump all allocated entries, unused entries print as 'unused', + * note that these may extend beyond current 'length' and look + * a bit funny. + */ + } else { + /* leave out trailing 'unused' elements */ + while (a_limit > 0) { + tv = DUK_HOBJECT_A_GET_VALUE_PTR(NULL, h, a_limit - 1); + if (!DUK_TVAL_IS_UNUSED(tv)) { + break; + } + a_limit--; + } + } + + for (i = 0; i < a_limit; i++) { + tv = DUK_HOBJECT_A_GET_VALUE_PTR(NULL, h, i); + DUK__COMMA(); + duk__print_tval(st, tv); + } + for (i = 0; i < DUK_HOBJECT_GET_ENEXT(h); i++) { + key = DUK_HOBJECT_E_GET_KEY(NULL, h, i); + if (!key) { + continue; + } + if (!st->internal && DUK_HSTRING_HAS_HIDDEN(key)) { + continue; + } + DUK__COMMA(); + duk__print_hstring(st, key, 0); + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_COLON); + if (DUK_HOBJECT_E_SLOT_IS_ACCESSOR(NULL, h, i)) { + duk_fb_sprintf(fb, + "[get:%p,set:%p]", + (void *) DUK_HOBJECT_E_GET_VALUE(NULL, h, i).a.get, + (void *) DUK_HOBJECT_E_GET_VALUE(NULL, h, i).a.set); + } else { + tv = &DUK_HOBJECT_E_GET_VALUE(NULL, h, i).v; + duk__print_tval(st, tv); + } + if (st->heavy) { + duk_fb_sprintf(fb, "<%02lx>", (unsigned long) DUK_HOBJECT_E_GET_FLAGS(NULL, h, i)); + } + } + } + if (st->internal) { + if (DUK_HOBJECT_IS_ARRAY(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__array:true"); + } + if (DUK_HOBJECT_HAS_EXTENSIBLE(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__extensible:true"); + } + if (DUK_HOBJECT_HAS_CONSTRUCTABLE(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__constructable:true"); + } + if (DUK_HOBJECT_HAS_BOUNDFUNC(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__boundfunc:true"); + } + if (DUK_HOBJECT_HAS_COMPFUNC(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__compfunc:true"); + } + if (DUK_HOBJECT_HAS_NATFUNC(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__natfunc:true"); + } + if (DUK_HOBJECT_HAS_BUFOBJ(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__bufobj:true"); + } + if (DUK_HOBJECT_IS_THREAD(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__thread:true"); + } + if (DUK_HOBJECT_HAS_ARRAY_PART(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__array_part:true"); + } + if (DUK_HOBJECT_HAS_STRICT(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__strict:true"); + } + if (DUK_HOBJECT_HAS_NOTAIL(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__notail:true"); + } + if (DUK_HOBJECT_HAS_NEWENV(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__newenv:true"); + } + if (DUK_HOBJECT_HAS_NAMEBINDING(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__namebinding:true"); + } + if (DUK_HOBJECT_HAS_CREATEARGS(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__createargs:true"); + } + if (DUK_HOBJECT_HAS_EXOTIC_ARRAY(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__exotic_array:true"); + } + if (DUK_HOBJECT_HAS_EXOTIC_STRINGOBJ(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__exotic_stringobj:true"); + } + if (DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__exotic_arguments:true"); + } + if (DUK_HOBJECT_IS_BUFOBJ(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__exotic_bufobj:true"); + } + if (DUK_HOBJECT_HAS_EXOTIC_PROXYOBJ(h)) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__exotic_proxyobj:true"); + } + } + + if (st->internal && DUK_HOBJECT_IS_ARRAY(h)) { + duk_harray *a = (duk_harray *) h; + DUK__COMMA(); + duk_fb_sprintf(fb, "__length:%ld", (long) a->length); + DUK__COMMA(); + duk_fb_sprintf(fb, "__length_nonwritable:%ld", (long) a->length_nonwritable); + } else if (st->internal && DUK_HOBJECT_IS_COMPFUNC(h)) { + duk_hcompfunc *f = (duk_hcompfunc *) h; + DUK__COMMA(); + duk_fb_put_cstring(fb, "__data:"); + duk__print_hbuffer(st, (duk_hbuffer *) DUK_HCOMPFUNC_GET_DATA(NULL, f)); + DUK__COMMA(); + duk_fb_put_cstring(fb, "__lexenv:"); + duk__print_hobject(st, DUK_HCOMPFUNC_GET_LEXENV(NULL, f)); + DUK__COMMA(); + duk_fb_put_cstring(fb, "__varenv:"); + duk__print_hobject(st, DUK_HCOMPFUNC_GET_VARENV(NULL, f)); + DUK__COMMA(); + duk_fb_sprintf(fb, "__nregs:%ld", (long) f->nregs); + DUK__COMMA(); + duk_fb_sprintf(fb, "__nargs:%ld", (long) f->nargs); +#if defined(DUK_USE_DEBUGGER_SUPPORT) + DUK__COMMA(); + duk_fb_sprintf(fb, "__start_line:%ld", (long) f->start_line); + DUK__COMMA(); + duk_fb_sprintf(fb, "__end_line:%ld", (long) f->end_line); +#endif + DUK__COMMA(); + duk_fb_put_cstring(fb, "__data:"); + duk__print_hbuffer(st, (duk_hbuffer *) DUK_HCOMPFUNC_GET_DATA(NULL, f)); + } else if (st->internal && DUK_HOBJECT_IS_NATFUNC(h)) { + duk_hnatfunc *f = (duk_hnatfunc *) h; + DUK__COMMA(); + duk_fb_sprintf(fb, "__func:"); + duk_fb_put_funcptr(fb, (duk_uint8_t *) &f->func, sizeof(f->func)); + DUK__COMMA(); + duk_fb_sprintf(fb, "__nargs:%ld", (long) f->nargs); + DUK__COMMA(); + duk_fb_sprintf(fb, "__magic:%ld", (long) f->magic); + } else if (st->internal && DUK_HOBJECT_IS_DECENV(h)) { + duk_hdecenv *e = (duk_hdecenv *) h; + DUK__COMMA(); + duk_fb_sprintf(fb, "__thread:"); + duk__print_hobject(st, (duk_hobject *) e->thread); + DUK__COMMA(); + duk_fb_sprintf(fb, "__varmap:"); + duk__print_hobject(st, (duk_hobject *) e->varmap); + DUK__COMMA(); + duk_fb_sprintf(fb, "__regbase_byteoff:%ld", (long) e->regbase_byteoff); + } else if (st->internal && DUK_HOBJECT_IS_OBJENV(h)) { + duk_hobjenv *e = (duk_hobjenv *) h; + DUK__COMMA(); + duk_fb_sprintf(fb, "__target:"); + duk__print_hobject(st, (duk_hobject *) e->target); + DUK__COMMA(); + duk_fb_sprintf(fb, "__has_this:%ld", (long) e->has_this); +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + } else if (st->internal && DUK_HOBJECT_IS_BUFOBJ(h)) { + duk_hbufobj *b = (duk_hbufobj *) h; + DUK__COMMA(); + duk_fb_sprintf(fb, "__buf:"); + duk__print_hbuffer(st, (duk_hbuffer *) b->buf); + DUK__COMMA(); + duk_fb_sprintf(fb, "__buf_prop:"); + duk__print_hobject(st, (duk_hobject *) b->buf_prop); + DUK__COMMA(); + duk_fb_sprintf(fb, "__offset:%ld", (long) b->offset); + DUK__COMMA(); + duk_fb_sprintf(fb, "__length:%ld", (long) b->length); + DUK__COMMA(); + duk_fb_sprintf(fb, "__shift:%ld", (long) b->shift); + DUK__COMMA(); + duk_fb_sprintf(fb, "__elemtype:%ld", (long) b->elem_type); +#endif + } else if (st->internal && DUK_HOBJECT_IS_PROXY(h)) { + duk_hproxy *p = (duk_hproxy *) h; + DUK__COMMA(); + duk_fb_sprintf(fb, "__target:"); + duk__print_hobject(st, p->target); + DUK__COMMA(); + duk_fb_sprintf(fb, "__handler:"); + duk__print_hobject(st, p->handler); + } else if (st->internal && DUK_HOBJECT_IS_THREAD(h)) { + duk_hthread *t = (duk_hthread *) h; + DUK__COMMA(); + duk_fb_sprintf(fb, "__ptr_curr_pc:%p", (void *) t->ptr_curr_pc); + DUK__COMMA(); + duk_fb_sprintf(fb, "__heap:%p", (void *) t->heap); + DUK__COMMA(); + duk_fb_sprintf(fb, "__strict:%ld", (long) t->strict); + DUK__COMMA(); + duk_fb_sprintf(fb, "__state:%ld", (long) t->state); + DUK__COMMA(); + duk_fb_sprintf(fb, "__unused1:%ld", (long) t->unused1); + DUK__COMMA(); + duk_fb_sprintf(fb, "__unused2:%ld", (long) t->unused2); + DUK__COMMA(); + duk_fb_sprintf(fb, "__valstack:%p", (void *) t->valstack); + DUK__COMMA(); + duk_fb_sprintf(fb, "__valstack_end:%p/%ld", (void *) t->valstack_end, (long) (t->valstack_end - t->valstack)); + DUK__COMMA(); + duk_fb_sprintf(fb, + "__valstack_alloc_end:%p/%ld", + (void *) t->valstack_alloc_end, + (long) (t->valstack_alloc_end - t->valstack)); + DUK__COMMA(); + duk_fb_sprintf(fb, + "__valstack_bottom:%p/%ld", + (void *) t->valstack_bottom, + (long) (t->valstack_bottom - t->valstack)); + DUK__COMMA(); + duk_fb_sprintf(fb, "__valstack_top:%p/%ld", (void *) t->valstack_top, (long) (t->valstack_top - t->valstack)); + DUK__COMMA(); + duk_fb_sprintf(fb, "__callstack_curr:%p", (void *) t->callstack_curr); + DUK__COMMA(); + duk_fb_sprintf(fb, "__callstack_top:%ld", (long) t->callstack_top); + DUK__COMMA(); + duk_fb_sprintf(fb, "__callstack_preventcount:%ld", (long) t->callstack_preventcount); + DUK__COMMA(); + duk_fb_sprintf(fb, "__resumer:"); + duk__print_hobject(st, (duk_hobject *) t->resumer); + DUK__COMMA(); + duk_fb_sprintf(fb, "__compile_ctx:%p", (void *) t->compile_ctx); +#if defined(DUK_USE_INTERRUPT_COUNTER) + DUK__COMMA(); + duk_fb_sprintf(fb, "__interrupt_counter:%ld", (long) t->interrupt_counter); + DUK__COMMA(); + duk_fb_sprintf(fb, "__interrupt_init:%ld", (long) t->interrupt_init); +#endif + + /* XXX: print built-ins array? */ + } +#if defined(DUK_USE_REFERENCE_COUNTING) + if (st->internal) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__refcount:%lu", (unsigned long) DUK_HEAPHDR_GET_REFCOUNT((duk_heaphdr *) h)); + } +#endif + if (st->internal) { + DUK__COMMA(); + duk_fb_sprintf(fb, "__class:%ld", (long) DUK_HOBJECT_GET_CLASS_NUMBER(h)); + } + + DUK__COMMA(); + duk_fb_sprintf(fb, "__heapptr:%p", (void *) h); /* own pointer */ + + /* prototype should be last, for readability */ + if (DUK_HOBJECT_GET_PROTOTYPE(NULL, h)) { + if (st->follow_proto) { + DUK__COMMA(); + duk_fb_put_cstring(fb, "__prototype:"); + duk__print_hobject(st, DUK_HOBJECT_GET_PROTOTYPE(NULL, h)); + } else { + DUK__COMMA(); + duk_fb_sprintf(fb, "__prototype:%p", (void *) DUK_HOBJECT_GET_PROTOTYPE(NULL, h)); + } + } + + duk_fb_put_cstring(fb, brace2); + +#if defined(DUK_USE_HOBJECT_HASH_PART) + if (st->heavy && DUK_HOBJECT_GET_HSIZE(h) > 0) { + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_LANGLE); + for (i = 0; i < DUK_HOBJECT_GET_HSIZE(h); i++) { + duk_uint_t h_idx = DUK_HOBJECT_H_GET_INDEX(NULL, h, i); + if (i > 0) { + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_COMMA); + } + if (h_idx == DUK_HOBJECT_HASHIDX_UNUSED) { + duk_fb_sprintf(fb, "u"); + } else if (h_idx == DUK_HOBJECT_HASHIDX_DELETED) { + duk_fb_sprintf(fb, "d"); + } else { + duk_fb_sprintf(fb, "%ld", (long) h_idx); + } + } + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_RANGLE); + } +#endif + +finished: + st->depth--; + if (pushed_loopstack) { + st->loop_stack_index--; + st->loop_stack[st->loop_stack_index] = NULL; + } +} + +DUK_LOCAL void duk__print_hbuffer(duk__dprint_state *st, duk_hbuffer *h) { + duk_fixedbuffer *fb = st->fb; + duk_size_t i, n; + duk_uint8_t *p; + + if (duk_fb_is_full(fb)) { + return; + } + + /* terminal type: no depth check */ + + if (!h) { + duk_fb_put_cstring(fb, "NULL"); + return; + } + + if (DUK_HBUFFER_HAS_DYNAMIC(h)) { + if (DUK_HBUFFER_HAS_EXTERNAL(h)) { + duk_hbuffer_external *g = (duk_hbuffer_external *) h; + duk_fb_sprintf(fb, + "buffer:external:%p:%ld", + (void *) DUK_HBUFFER_EXTERNAL_GET_DATA_PTR(NULL, g), + (long) DUK_HBUFFER_EXTERNAL_GET_SIZE(g)); + } else { + duk_hbuffer_dynamic *g = (duk_hbuffer_dynamic *) h; + duk_fb_sprintf(fb, + "buffer:dynamic:%p:%ld", + (void *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(NULL, g), + (long) DUK_HBUFFER_DYNAMIC_GET_SIZE(g)); + } + } else { + duk_fb_sprintf(fb, "buffer:fixed:%ld", (long) DUK_HBUFFER_GET_SIZE(h)); + } + +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_fb_sprintf(fb, "/%lu", (unsigned long) DUK_HEAPHDR_GET_REFCOUNT(&h->hdr)); +#endif + + if (st->hexdump) { + duk_fb_sprintf(fb, "=["); + n = DUK_HBUFFER_GET_SIZE(h); + p = (duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(NULL, h); + for (i = 0; i < n; i++) { + duk_fb_sprintf(fb, "%02lx", (unsigned long) p[i]); + } + duk_fb_sprintf(fb, "]"); + } +} + +DUK_LOCAL void duk__print_heaphdr(duk__dprint_state *st, duk_heaphdr *h) { + duk_fixedbuffer *fb = st->fb; + + if (duk_fb_is_full(fb)) { + return; + } + + if (!h) { + duk_fb_put_cstring(fb, "NULL"); + return; + } + + switch (DUK_HEAPHDR_GET_TYPE(h)) { + case DUK_HTYPE_STRING: + duk__print_hstring(st, (duk_hstring *) h, 1); + break; + case DUK_HTYPE_OBJECT: + duk__print_hobject(st, (duk_hobject *) h); + break; + case DUK_HTYPE_BUFFER: + duk__print_hbuffer(st, (duk_hbuffer *) h); + break; + default: + duk_fb_sprintf(fb, "[unknown htype %ld]", (long) DUK_HEAPHDR_GET_TYPE(h)); + break; + } +} + +DUK_LOCAL void duk__print_tval(duk__dprint_state *st, duk_tval *tv) { + duk_fixedbuffer *fb = st->fb; + + if (duk_fb_is_full(fb)) { + return; + } + + /* depth check is done when printing an actual type */ + + if (st->heavy) { + duk_fb_sprintf(fb, "(%p)", (void *) tv); + } + + if (!tv) { + duk_fb_put_cstring(fb, "NULL"); + return; + } + + if (st->binary) { + duk_size_t i; + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_LBRACKET); + for (i = 0; i < (duk_size_t) sizeof(*tv); i++) { + duk_fb_sprintf(fb, "%02lx", (unsigned long) ((duk_uint8_t *) tv)[i]); + } + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_RBRACKET); + } + + if (st->heavy) { + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_LANGLE); + } + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNDEFINED: { + duk_fb_put_cstring(fb, "undefined"); + break; + } + case DUK_TAG_UNUSED: { + duk_fb_put_cstring(fb, "unused"); + break; + } + case DUK_TAG_NULL: { + duk_fb_put_cstring(fb, "null"); + break; + } + case DUK_TAG_BOOLEAN: { + duk_fb_put_cstring(fb, DUK_TVAL_GET_BOOLEAN(tv) ? "true" : "false"); + break; + } + case DUK_TAG_STRING: { + /* Note: string is a terminal heap object, so no depth check here */ + duk__print_hstring(st, DUK_TVAL_GET_STRING(tv), 1); + break; + } + case DUK_TAG_OBJECT: { + duk__print_hobject(st, DUK_TVAL_GET_OBJECT(tv)); + break; + } + case DUK_TAG_BUFFER: { + duk__print_hbuffer(st, DUK_TVAL_GET_BUFFER(tv)); + break; + } + case DUK_TAG_POINTER: { + duk_fb_sprintf(fb, "pointer:%p", (void *) DUK_TVAL_GET_POINTER(tv)); + break; + } + case DUK_TAG_LIGHTFUNC: { + duk_c_function func; + duk_small_uint_t lf_flags; + + DUK_TVAL_GET_LIGHTFUNC(tv, func, lf_flags); + duk_fb_sprintf(fb, "lightfunc:"); + duk_fb_put_funcptr(fb, (duk_uint8_t *) &func, sizeof(func)); + duk_fb_sprintf(fb, ":%04lx", (long) lf_flags); + break; + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + duk_fb_sprintf(fb, "%.18g_F", (double) DUK_TVAL_GET_NUMBER(tv)); + break; +#endif + default: { + /* IEEE double is approximately 16 decimal digits; print a couple extra */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + duk_fb_sprintf(fb, "%.18g", (double) DUK_TVAL_GET_NUMBER(tv)); + break; + } + } + if (st->heavy) { + duk_fb_put_byte(fb, (duk_uint8_t) DUK_ASC_RANGLE); + } +} + +DUK_LOCAL void duk__print_instr(duk__dprint_state *st, duk_instr_t ins) { + duk_fixedbuffer *fb = st->fb; + duk_small_int_t op; + const char *op_name; + + op = (duk_small_int_t) DUK_DEC_OP(ins); + op_name = duk__bc_optab[op]; + + /* XXX: option to fix opcode length so it lines up nicely */ + + if (op == DUK_OP_JUMP) { + duk_int_t diff1 = (duk_int_t) (DUK_DEC_ABC(ins) - DUK_BC_JUMP_BIAS); /* from next pc */ + duk_int_t diff2 = diff1 + 1; /* from curr pc */ + + duk_fb_sprintf(fb, + "%s %ld (to pc%c%ld)", + (const char *) op_name, + (long) diff1, + (int) (diff2 >= 0 ? '+' : '-'), /* char format: use int */ + (long) (diff2 >= 0 ? diff2 : -diff2)); + } else { + duk_fb_sprintf(fb, + "%s %ld, %ld, %ld", + (const char *) op_name, + (long) DUK_DEC_A(ins), + (long) DUK_DEC_B(ins), + (long) DUK_DEC_C(ins)); + } +} + +DUK_LOCAL void duk__print_opcode(duk__dprint_state *st, duk_small_int_t opcode) { + duk_fixedbuffer *fb = st->fb; + + if (opcode < DUK_BC_OP_MIN || opcode > DUK_BC_OP_MAX) { + duk_fb_sprintf(fb, "?(%ld)", (long) opcode); + } else { + duk_fb_sprintf(fb, "%s", (const char *) duk__bc_optab[opcode]); + } +} + +DUK_LOCAL void duk__print_catcher(duk__dprint_state *st, duk_catcher *cat) { + duk_fixedbuffer *fb = st->fb; + + if (duk_fb_is_full(fb)) { + return; + } + + if (!cat) { + duk_fb_put_cstring(fb, "NULL"); + return; + } + + duk_fb_sprintf(fb, + "[catcher ptr=%p parent=%p varname=%p pc_base=%p, idx_base=%ld, flags=0x%08lx]", + (void *) cat, + (void *) cat->parent, + (void *) cat->h_varname, + (void *) cat->pc_base, + (long) cat->idx_base, + (unsigned long) cat->flags); +} + +DUK_LOCAL void duk__print_activation(duk__dprint_state *st, duk_activation *act) { + duk_fixedbuffer *fb = st->fb; + + if (duk_fb_is_full(fb)) { + return; + } + + if (!act) { + duk_fb_put_cstring(fb, "NULL"); + return; + } + + /* prev_caller: conditional, omitted on purpose, it's rarely used. */ + /* prev_line: conditional, omitted on purpose (but would be nice). */ + duk_fb_sprintf(fb, + "[activation ptr=%p tv_func= func=%p parent=%p var_env=%p lex_env=%p cat=%p curr_pc=%p " + "bottom_byteoff=%ld retval_byteoff=%ld reserve_byteoff=%ld flags=%ld]", + (void *) act, + (void *) act->func, + (void *) act->parent, + (void *) act->var_env, + (void *) act->lex_env, + (void *) act->cat, + (void *) act->curr_pc, + (long) act->bottom_byteoff, + (long) act->retval_byteoff, + (long) act->reserve_byteoff, + (long) act->flags); +} + +DUK_INTERNAL duk_int_t duk_debug_vsnprintf(char *str, duk_size_t size, const char *format, va_list ap) { + duk_fixedbuffer fb; + const char *p = format; + const char *p_end = p + DUK_STRLEN(format); + duk_int_t retval; + + duk_memzero(&fb, sizeof(fb)); + fb.buffer = (duk_uint8_t *) str; + fb.length = size; + fb.offset = 0; + fb.truncated = 0; + + while (p < p_end) { + char ch = *p++; + const char *p_begfmt = NULL; + duk_bool_t got_exclamation = 0; + duk_bool_t got_long = 0; /* %lf, %ld etc */ + duk__dprint_state st; + + if (ch != DUK_ASC_PERCENT) { + duk_fb_put_byte(&fb, (duk_uint8_t) ch); + continue; + } + + /* + * Format tag parsing. Since we don't understand all the + * possible format tags allowed, we just scan for a terminating + * specifier and keep track of relevant modifiers that we do + * understand. See man 3 printf. + */ + + duk_memzero(&st, sizeof(st)); + st.fb = &fb; + st.depth = 0; + st.depth_limit = 1; + st.loop_stack_index = 0; + st.loop_stack_limit = DUK__LOOP_STACK_DEPTH; + + p_begfmt = p - 1; + while (p < p_end) { + ch = *p++; + + if (ch == DUK_ASC_STAR) { + /* unsupported: would consume multiple args */ + goto format_error; + } else if (ch == DUK_ASC_PERCENT) { + duk_fb_put_byte(&fb, (duk_uint8_t) DUK_ASC_PERCENT); + break; + } else if (ch == DUK_ASC_EXCLAMATION) { + got_exclamation = 1; + } else if (!got_exclamation && ch == DUK_ASC_LC_L) { + got_long = 1; + } else if (got_exclamation && ch == DUK_ASC_LC_D) { + st.depth_limit = DUK__DEEP_DEPTH_LIMIT; + } else if (got_exclamation && ch == DUK_ASC_LC_P) { + st.follow_proto = 1; + } else if (got_exclamation && ch == DUK_ASC_LC_I) { + st.internal = 1; + } else if (got_exclamation && ch == DUK_ASC_LC_X) { + st.hexdump = 1; + } else if (got_exclamation && ch == DUK_ASC_LC_H) { + st.heavy = 1; + } else if (got_exclamation && ch == DUK_ASC_ATSIGN) { + st.pointer = 1; + } else if (got_exclamation && ch == DUK_ASC_HASH) { + st.binary = 1; + } else if (got_exclamation && ch == DUK_ASC_UC_T) { + duk_tval *t = va_arg(ap, duk_tval *); + if (st.pointer && !st.heavy) { + duk_fb_sprintf(&fb, "(%p)", (void *) t); + } + duk__print_tval(&st, t); + break; + } else if (got_exclamation && ch == DUK_ASC_UC_O) { + duk_heaphdr *t = va_arg(ap, duk_heaphdr *); + if (st.pointer && !st.heavy) { + duk_fb_sprintf(&fb, "(%p)", (void *) t); + } + duk__print_heaphdr(&st, t); + break; + } else if (got_exclamation && ch == DUK_ASC_UC_I) { + duk_instr_t t = va_arg(ap, duk_instr_t); + duk__print_instr(&st, t); + break; + } else if (got_exclamation && ch == DUK_ASC_UC_X) { + long t = va_arg(ap, long); + duk__print_opcode(&st, (duk_small_int_t) t); + break; + } else if (got_exclamation && ch == DUK_ASC_UC_C) { + duk_catcher *t = va_arg(ap, duk_catcher *); + duk__print_catcher(&st, t); + break; + } else if (got_exclamation && ch == DUK_ASC_UC_A) { + duk_activation *t = va_arg(ap, duk_activation *); + duk__print_activation(&st, t); + break; + } else if (!got_exclamation && strchr(DUK__ALLOWED_STANDARD_SPECIFIERS, (int) ch)) { + char fmtbuf[DUK__MAX_FORMAT_TAG_LENGTH]; + duk_size_t fmtlen; + + DUK_ASSERT(p >= p_begfmt); + fmtlen = (duk_size_t) (p - p_begfmt); + if (fmtlen >= sizeof(fmtbuf)) { + /* format is too large, abort */ + goto format_error; + } + duk_memzero(fmtbuf, sizeof(fmtbuf)); + duk_memcpy(fmtbuf, p_begfmt, fmtlen); + + /* assume exactly 1 arg, which is why '*' is forbidden; arg size still + * depends on type though. + */ + + if (ch == DUK_ASC_LC_F || ch == DUK_ASC_LC_G || ch == DUK_ASC_LC_E) { + /* %f and %lf both consume a 'long' */ + double arg = va_arg(ap, double); + duk_fb_sprintf(&fb, fmtbuf, arg); + } else if (ch == DUK_ASC_LC_D && got_long) { + /* %ld */ + long arg = va_arg(ap, long); + duk_fb_sprintf(&fb, fmtbuf, arg); + } else if (ch == DUK_ASC_LC_D) { + /* %d; only 16 bits are guaranteed */ + int arg = va_arg(ap, int); + duk_fb_sprintf(&fb, fmtbuf, arg); + } else if (ch == DUK_ASC_LC_U && got_long) { + /* %lu */ + unsigned long arg = va_arg(ap, unsigned long); + duk_fb_sprintf(&fb, fmtbuf, arg); + } else if (ch == DUK_ASC_LC_U) { + /* %u; only 16 bits are guaranteed */ + unsigned int arg = va_arg(ap, unsigned int); + duk_fb_sprintf(&fb, fmtbuf, arg); + } else if (ch == DUK_ASC_LC_X && got_long) { + /* %lx */ + unsigned long arg = va_arg(ap, unsigned long); + duk_fb_sprintf(&fb, fmtbuf, arg); + } else if (ch == DUK_ASC_LC_X) { + /* %x; only 16 bits are guaranteed */ + unsigned int arg = va_arg(ap, unsigned int); + duk_fb_sprintf(&fb, fmtbuf, arg); + } else if (ch == DUK_ASC_LC_S) { + /* %s */ + const char *arg = va_arg(ap, const char *); + if (arg == NULL) { + /* '%s' and NULL is not portable, so special case + * it for debug printing. + */ + duk_fb_sprintf(&fb, "NULL"); + } else { + duk_fb_sprintf(&fb, fmtbuf, arg); + } + } else if (ch == DUK_ASC_LC_P) { + /* %p */ + void *arg = va_arg(ap, void *); + if (arg == NULL) { + /* '%p' and NULL is portable, but special case it + * anyway to get a standard NULL marker in logs. + */ + duk_fb_sprintf(&fb, "NULL"); + } else { + duk_fb_sprintf(&fb, fmtbuf, arg); + } + } else if (ch == DUK_ASC_LC_C) { + /* '%c', passed concretely as int */ + int arg = va_arg(ap, int); + duk_fb_sprintf(&fb, fmtbuf, arg); + } else { + /* Should not happen. */ + duk_fb_sprintf(&fb, "INVALID-FORMAT(%s)", (const char *) fmtbuf); + } + break; + } else { + /* ignore */ + } + } + } + goto done; + +format_error: + duk_fb_put_cstring(&fb, "FMTERR"); + /* fall through */ + +done: + retval = (duk_int_t) fb.offset; + duk_fb_put_byte(&fb, (duk_uint8_t) 0); + + /* return total chars written excluding terminator */ + return retval; +} + +#if 0 /*unused*/ +DUK_INTERNAL duk_int_t duk_debug_snprintf(char *str, duk_size_t size, const char *format, ...) { + duk_int_t retval; + va_list ap; + va_start(ap, format); + retval = duk_debug_vsnprintf(str, size, format, ap); + va_end(ap); + return retval; +} +#endif + +/* Formatting function pointers is tricky: there is no standard pointer for + * function pointers and the size of a function pointer may depend on the + * specific pointer type. This helper formats a function pointer based on + * its memory layout to get something useful on most platforms. + */ +DUK_INTERNAL void duk_debug_format_funcptr(char *buf, duk_size_t buf_size, duk_uint8_t *fptr, duk_size_t fptr_size) { + duk_size_t i; + duk_uint8_t *p = (duk_uint8_t *) buf; + duk_uint8_t *p_end = (duk_uint8_t *) (buf + buf_size - 1); + + DUK_ASSERT(buf != NULL); + duk_memzero(buf, buf_size); + + for (i = 0; i < fptr_size; i++) { + duk_int_t left = (duk_int_t) (p_end - p); + duk_uint8_t ch; + if (left <= 0) { + break; + } + + /* Quite approximate but should be useful for little and big endian. */ +#if defined(DUK_USE_INTEGER_BE) + ch = fptr[i]; +#else + ch = fptr[fptr_size - 1 - i]; +#endif + p += DUK_SNPRINTF((char *) p, (duk_size_t) left, "%02lx", (unsigned long) ch); + } +} + +#endif /* DUK_USE_DEBUG */ + +/* automatic undefs */ +#undef DUK__ALLOWED_STANDARD_SPECIFIERS +#undef DUK__COMMA +#undef DUK__DEEP_DEPTH_LIMIT +#undef DUK__LOOP_STACK_DEPTH +#undef DUK__MAX_FORMAT_TAG_LENGTH +#line 1 "duk_debugger.c" +/* + * Duktape debugger + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + +/* + * Assert helpers + */ + +#if defined(DUK_USE_ASSERTIONS) +#define DUK__DBG_TPORT_ENTER() \ + do { \ + DUK_ASSERT(heap->dbg_calling_transport == 0); \ + heap->dbg_calling_transport = 1; \ + } while (0) +#define DUK__DBG_TPORT_EXIT() \ + do { \ + DUK_ASSERT(heap->dbg_calling_transport == 1); \ + heap->dbg_calling_transport = 0; \ + } while (0) +#else +#define DUK__DBG_TPORT_ENTER() \ + do { \ + } while (0) +#define DUK__DBG_TPORT_EXIT() \ + do { \ + } while (0) +#endif + +/* + * Helper structs + */ + +typedef union { + void *p; + duk_uint_t b[1]; + /* Use b[] to access the size of the union, which is strictly not + * correct. Can't use fixed size unless there's feature detection + * for pointer byte size. + */ +} duk__ptr_union; + +/* + * Detach handling + */ + +#define DUK__SET_CONN_BROKEN(thr, reason) \ + do { \ + /* For now shared handler is fine. */ \ + duk__debug_do_detach1((thr)->heap, (reason)); \ + } while (0) + +DUK_LOCAL void duk__debug_do_detach1(duk_heap *heap, duk_int_t reason) { + /* Can be called multiple times with no harm. Mark the transport + * bad (dbg_read_cb == NULL) and clear state except for the detached + * callback and the udata field. The detached callback is delayed + * to the message loop so that it can be called between messages; + * this avoids corner cases related to immediate debugger reattach + * inside the detached callback. + */ + + if (heap->dbg_detaching) { + DUK_D(DUK_DPRINT("debugger already detaching, ignore detach1")); + return; + } + + DUK_D(DUK_DPRINT("debugger transport detaching, marking transport broken")); + + heap->dbg_detaching = 1; /* prevent multiple in-progress detaches */ + + if (heap->dbg_write_cb != NULL) { + duk_hthread *thr; + + thr = heap->heap_thread; + DUK_ASSERT(thr != NULL); + + duk_debug_write_notify(thr, DUK_DBG_CMD_DETACHING); + duk_debug_write_int(thr, reason); + duk_debug_write_eom(thr); + } + + heap->dbg_read_cb = NULL; + heap->dbg_write_cb = NULL; + heap->dbg_peek_cb = NULL; + heap->dbg_read_flush_cb = NULL; + heap->dbg_write_flush_cb = NULL; + heap->dbg_request_cb = NULL; + /* heap->dbg_detached_cb: keep */ + /* heap->dbg_udata: keep */ + /* heap->dbg_processing: keep on purpose to avoid debugger re-entry in detaching state */ + heap->dbg_state_dirty = 0; + heap->dbg_force_restart = 0; + heap->dbg_pause_flags = 0; + heap->dbg_pause_act = NULL; + heap->dbg_pause_startline = 0; + heap->dbg_have_next_byte = 0; + duk_debug_clear_paused(heap); /* XXX: some overlap with field inits above */ + heap->dbg_state_dirty = 0; /* XXX: clear_paused sets dirty; rework? */ + + /* Ensure there are no stale active breakpoint pointers. + * Breakpoint list is currently kept - we could empty it + * here but we'd need to handle refcounts correctly, and + * we'd need a 'thr' reference for that. + * + * XXX: clear breakpoint on either attach or detach? + */ + heap->dbg_breakpoints_active[0] = (duk_breakpoint *) NULL; +} + +DUK_LOCAL void duk__debug_do_detach2(duk_heap *heap) { + duk_debug_detached_function detached_cb; + void *detached_udata; + duk_hthread *thr; + + thr = heap->heap_thread; + if (thr == NULL) { + DUK_ASSERT(heap->dbg_detached_cb == NULL); + return; + } + + /* Safe to call multiple times. */ + + detached_cb = heap->dbg_detached_cb; + detached_udata = heap->dbg_udata; + heap->dbg_detached_cb = NULL; + heap->dbg_udata = NULL; + + if (detached_cb) { + /* Careful here: state must be wiped before the call + * so that we can cleanly handle a re-attach from + * inside the callback. + */ + DUK_D(DUK_DPRINT("detached during message loop, delayed call to detached_cb")); + detached_cb(thr, detached_udata); + } + + heap->dbg_detaching = 0; +} + +DUK_INTERNAL void duk_debug_do_detach(duk_heap *heap) { + duk__debug_do_detach1(heap, 0); + duk__debug_do_detach2(heap); +} + +/* Called on a read/write error: NULL all callbacks except the detached + * callback so that we never accidentally call them after a read/write + * error has been indicated. This is especially important for the transport + * I/O callbacks to fulfill guaranteed callback semantics. + */ +DUK_LOCAL void duk__debug_null_most_callbacks(duk_hthread *thr) { + duk_heap *heap; + + DUK_ASSERT(thr != NULL); + + heap = thr->heap; + DUK_D(DUK_DPRINT("transport read/write error, NULL all callbacks expected detached")); + heap->dbg_read_cb = NULL; + heap->dbg_write_cb = NULL; /* this is especially critical to avoid another write call in detach1() */ + heap->dbg_peek_cb = NULL; + heap->dbg_read_flush_cb = NULL; + heap->dbg_write_flush_cb = NULL; + heap->dbg_request_cb = NULL; + /* keep heap->dbg_detached_cb */ +} + +/* + * Pause handling + */ + +DUK_LOCAL void duk__debug_set_pause_state(duk_hthread *thr, duk_heap *heap, duk_small_uint_t pause_flags) { + duk_uint_fast32_t line; + + line = duk_debug_curr_line(thr); + if (line == 0) { + /* No line info for current function. */ + duk_small_uint_t updated_flags; + + updated_flags = pause_flags & ~(DUK_PAUSE_FLAG_LINE_CHANGE); + DUK_D(DUK_DPRINT("no line info for current activation, disable line-based pause flags: 0x%08lx -> 0x%08lx", + (long) pause_flags, + (long) updated_flags)); + pause_flags = updated_flags; + } + + heap->dbg_pause_flags = pause_flags; + heap->dbg_pause_act = thr->callstack_curr; + heap->dbg_pause_startline = (duk_uint32_t) line; + heap->dbg_state_dirty = 1; + + DUK_D(DUK_DPRINT("set state for automatic pause triggers, flags=0x%08lx, act=%p, startline=%ld", + (long) heap->dbg_pause_flags, + (void *) heap->dbg_pause_act, + (long) heap->dbg_pause_startline)); +} + +/* + * Debug connection peek and flush primitives + */ + +DUK_INTERNAL duk_bool_t duk_debug_read_peek(duk_hthread *thr) { + duk_heap *heap; + duk_bool_t ret; + + DUK_ASSERT(thr != NULL); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + + if (heap->dbg_read_cb == NULL) { + DUK_D(DUK_DPRINT("attempt to peek in detached state, return zero (= no data)")); + return 0; + } + if (heap->dbg_peek_cb == NULL) { + DUK_DD(DUK_DDPRINT("no peek callback, return zero (= no data)")); + return 0; + } + + DUK__DBG_TPORT_ENTER(); + ret = (duk_bool_t) (heap->dbg_peek_cb(heap->dbg_udata) > 0); + DUK__DBG_TPORT_EXIT(); + return ret; +} + +DUK_INTERNAL void duk_debug_read_flush(duk_hthread *thr) { + duk_heap *heap; + + DUK_ASSERT(thr != NULL); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + + if (heap->dbg_read_cb == NULL) { + DUK_D(DUK_DPRINT("attempt to read flush in detached state, ignore")); + return; + } + if (heap->dbg_read_flush_cb == NULL) { + DUK_DD(DUK_DDPRINT("no read flush callback, ignore")); + return; + } + + DUK__DBG_TPORT_ENTER(); + heap->dbg_read_flush_cb(heap->dbg_udata); + DUK__DBG_TPORT_EXIT(); +} + +DUK_INTERNAL void duk_debug_write_flush(duk_hthread *thr) { + duk_heap *heap; + + DUK_ASSERT(thr != NULL); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + + if (heap->dbg_read_cb == NULL) { + DUK_D(DUK_DPRINT("attempt to write flush in detached state, ignore")); + return; + } + if (heap->dbg_write_flush_cb == NULL) { + DUK_DD(DUK_DDPRINT("no write flush callback, ignore")); + return; + } + + DUK__DBG_TPORT_ENTER(); + heap->dbg_write_flush_cb(heap->dbg_udata); + DUK__DBG_TPORT_EXIT(); +} + +/* + * Debug connection skip primitives + */ + +/* Skip fully. */ +DUK_INTERNAL void duk_debug_skip_bytes(duk_hthread *thr, duk_size_t length) { + duk_uint8_t dummy[64]; + duk_size_t now; + + DUK_ASSERT(thr != NULL); + + while (length > 0) { + now = (length > sizeof(dummy) ? sizeof(dummy) : length); + duk_debug_read_bytes(thr, dummy, now); + length -= now; + } +} + +DUK_INTERNAL void duk_debug_skip_byte(duk_hthread *thr) { + DUK_ASSERT(thr != NULL); + + (void) duk_debug_read_byte(thr); +} + +/* + * Debug connection read primitives + */ + +/* Peek ahead in the stream one byte. */ +DUK_INTERNAL uint8_t duk_debug_peek_byte(duk_hthread *thr) { + /* It is important not to call this if the last byte read was an EOM. + * Reading ahead in this scenario would cause unnecessary blocking if + * another message is not available. + */ + + duk_uint8_t x; + + x = duk_debug_read_byte(thr); + thr->heap->dbg_have_next_byte = 1; + thr->heap->dbg_next_byte = x; + return x; +} + +/* Read fully. */ +DUK_INTERNAL void duk_debug_read_bytes(duk_hthread *thr, duk_uint8_t *data, duk_size_t length) { + duk_heap *heap; + duk_uint8_t *p; + duk_size_t left; + duk_size_t got; + + DUK_ASSERT(thr != NULL); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + DUK_ASSERT(data != NULL); + + if (heap->dbg_read_cb == NULL) { + DUK_D(DUK_DPRINT("attempt to read %ld bytes in detached state, return zero data", (long) length)); + goto fail; + } + + /* NOTE: length may be zero */ + p = data; + if (length >= 1 && heap->dbg_have_next_byte) { + heap->dbg_have_next_byte = 0; + *p++ = heap->dbg_next_byte; + } + for (;;) { + left = (duk_size_t) ((data + length) - p); + if (left == 0) { + break; + } + DUK_ASSERT(heap->dbg_read_cb != NULL); + DUK_ASSERT(left >= 1); +#if defined(DUK_USE_DEBUGGER_TRANSPORT_TORTURE) + left = 1; +#endif + DUK__DBG_TPORT_ENTER(); + got = heap->dbg_read_cb(heap->dbg_udata, (char *) p, left); + DUK__DBG_TPORT_EXIT(); + + if (got == 0 || got > left) { + DUK_D(DUK_DPRINT("connection error during read, return zero data")); + duk__debug_null_most_callbacks(thr); /* avoid calling write callback in detach1() */ + DUK__SET_CONN_BROKEN(thr, 1); + goto fail; + } + p += got; + } + return; + +fail: + duk_memzero((void *) data, (size_t) length); +} + +DUK_INTERNAL duk_uint8_t duk_debug_read_byte(duk_hthread *thr) { + duk_uint8_t x; + + x = 0; /* just in case callback is broken and won't write 'x' */ + duk_debug_read_bytes(thr, &x, 1); + return x; +} + +DUK_LOCAL duk_uint32_t duk__debug_read_uint32_raw(duk_hthread *thr) { + duk_uint8_t buf[4]; + + DUK_ASSERT(thr != NULL); + + duk_debug_read_bytes(thr, buf, 4); + return ((duk_uint32_t) buf[0] << 24) | ((duk_uint32_t) buf[1] << 16) | ((duk_uint32_t) buf[2] << 8) | (duk_uint32_t) buf[3]; +} + +DUK_LOCAL duk_int32_t duk__debug_read_int32_raw(duk_hthread *thr) { + return (duk_int32_t) duk__debug_read_uint32_raw(thr); +} + +DUK_LOCAL duk_uint16_t duk__debug_read_uint16_raw(duk_hthread *thr) { + duk_uint8_t buf[2]; + + DUK_ASSERT(thr != NULL); + + duk_debug_read_bytes(thr, buf, 2); + return ((duk_uint16_t) buf[0] << 8) | (duk_uint16_t) buf[1]; +} + +DUK_INTERNAL duk_int32_t duk_debug_read_int(duk_hthread *thr) { + duk_small_uint_t x; + duk_small_uint_t t; + + DUK_ASSERT(thr != NULL); + + x = duk_debug_read_byte(thr); + if (x >= 0xc0) { + t = duk_debug_read_byte(thr); + return (duk_int32_t) (((x - 0xc0) << 8) + t); + } else if (x >= 0x80) { + return (duk_int32_t) (x - 0x80); + } else if (x == DUK_DBG_IB_INT4) { + return (duk_int32_t) duk__debug_read_uint32_raw(thr); + } + + DUK_D(DUK_DPRINT("debug connection error: failed to decode int")); + DUK__SET_CONN_BROKEN(thr, 1); + return 0; +} + +DUK_LOCAL duk_hstring *duk__debug_read_hstring_raw(duk_hthread *thr, duk_uint32_t len) { + duk_uint8_t buf[31]; + duk_uint8_t *p; + + if (len <= sizeof(buf)) { + duk_debug_read_bytes(thr, buf, (duk_size_t) len); + duk_push_lstring(thr, (const char *) buf, (duk_size_t) len); + } else { + p = (duk_uint8_t *) duk_push_fixed_buffer(thr, (duk_size_t) len); /* zero for paranoia */ + DUK_ASSERT(p != NULL); + duk_debug_read_bytes(thr, p, (duk_size_t) len); + (void) duk_buffer_to_string(thr, -1); /* Safety relies on debug client, which is OK. */ + } + + return duk_require_hstring(thr, -1); +} + +DUK_INTERNAL duk_hstring *duk_debug_read_hstring(duk_hthread *thr) { + duk_small_uint_t x; + duk_uint32_t len; + + DUK_ASSERT(thr != NULL); + + x = duk_debug_read_byte(thr); + if (x >= 0x60 && x <= 0x7f) { + /* For short strings, use a fixed temp buffer. */ + len = (duk_uint32_t) (x - 0x60); + } else if (x == DUK_DBG_IB_STR2) { + len = (duk_uint32_t) duk__debug_read_uint16_raw(thr); + } else if (x == DUK_DBG_IB_STR4) { + len = (duk_uint32_t) duk__debug_read_uint32_raw(thr); + } else { + goto fail; + } + + return duk__debug_read_hstring_raw(thr, len); + +fail: + DUK_D(DUK_DPRINT("debug connection error: failed to decode int")); + DUK__SET_CONN_BROKEN(thr, 1); + duk_push_hstring_empty(thr); /* always push some string */ + return duk_require_hstring(thr, -1); +} + +DUK_LOCAL duk_hbuffer *duk__debug_read_hbuffer_raw(duk_hthread *thr, duk_uint32_t len) { + duk_uint8_t *p; + + p = (duk_uint8_t *) duk_push_fixed_buffer(thr, (duk_size_t) len); /* zero for paranoia */ + DUK_ASSERT(p != NULL); + duk_debug_read_bytes(thr, p, (duk_size_t) len); + + return duk_require_hbuffer(thr, -1); +} + +DUK_LOCAL void *duk__debug_read_pointer_raw(duk_hthread *thr) { + duk_small_uint_t x; + duk__ptr_union pu; + + DUK_ASSERT(thr != NULL); + + x = duk_debug_read_byte(thr); + if (x != sizeof(pu)) { + goto fail; + } + duk_debug_read_bytes(thr, (duk_uint8_t *) &pu.p, sizeof(pu)); +#if defined(DUK_USE_INTEGER_LE) + duk_byteswap_bytes((duk_uint8_t *) pu.b, sizeof(pu)); +#endif + return (void *) pu.p; + +fail: + DUK_D(DUK_DPRINT("debug connection error: failed to decode pointer")); + DUK__SET_CONN_BROKEN(thr, 1); + return (void *) NULL; +} + +DUK_LOCAL duk_double_t duk__debug_read_double_raw(duk_hthread *thr) { + duk_double_union du; + + DUK_ASSERT(sizeof(du.uc) == 8); + duk_debug_read_bytes(thr, (duk_uint8_t *) du.uc, sizeof(du.uc)); + DUK_DBLUNION_DOUBLE_NTOH(&du); + return du.d; +} + +#if 0 +DUK_INTERNAL duk_heaphdr *duk_debug_read_heapptr(duk_hthread *thr) { + duk_small_uint_t x; + + DUK_ASSERT(thr != NULL); + + x = duk_debug_read_byte(thr); + if (x != DUK_DBG_IB_HEAPPTR) { + goto fail; + } + + return (duk_heaphdr *) duk__debug_read_pointer_raw(thr); + + fail: + DUK_D(DUK_DPRINT("debug connection error: failed to decode heapptr")); + DUK__SET_CONN_BROKEN(thr, 1); + return NULL; +} +#endif + +DUK_INTERNAL duk_heaphdr *duk_debug_read_any_ptr(duk_hthread *thr) { + duk_small_uint_t x; + + DUK_ASSERT(thr != NULL); + + x = duk_debug_read_byte(thr); + switch (x) { + case DUK_DBG_IB_OBJECT: + case DUK_DBG_IB_POINTER: + case DUK_DBG_IB_HEAPPTR: + /* Accept any pointer-like value; for 'object' dvalue, read + * and ignore the class number. + */ + if (x == DUK_DBG_IB_OBJECT) { + duk_debug_skip_byte(thr); + } + break; + default: + goto fail; + } + + return (duk_heaphdr *) duk__debug_read_pointer_raw(thr); + +fail: + DUK_D(DUK_DPRINT("debug connection error: failed to decode any pointer (object, pointer, heapptr)")); + DUK__SET_CONN_BROKEN(thr, 1); + return NULL; +} + +DUK_INTERNAL duk_tval *duk_debug_read_tval(duk_hthread *thr) { + duk_uint8_t x; + duk_uint_t t; + duk_uint32_t len; + + DUK_ASSERT(thr != NULL); + + x = duk_debug_read_byte(thr); + + if (x >= 0xc0) { + t = (duk_uint_t) (x - 0xc0); + t = (t << 8) + duk_debug_read_byte(thr); + duk_push_uint(thr, (duk_uint_t) t); + goto return_ptr; + } + if (x >= 0x80) { + duk_push_uint(thr, (duk_uint_t) (x - 0x80)); + goto return_ptr; + } + if (x >= 0x60) { + len = (duk_uint32_t) (x - 0x60); + duk__debug_read_hstring_raw(thr, len); + goto return_ptr; + } + + switch (x) { + case DUK_DBG_IB_INT4: { + duk_int32_t i = duk__debug_read_int32_raw(thr); + duk_push_i32(thr, i); + break; + } + case DUK_DBG_IB_STR4: { + len = duk__debug_read_uint32_raw(thr); + duk__debug_read_hstring_raw(thr, len); + break; + } + case DUK_DBG_IB_STR2: { + len = duk__debug_read_uint16_raw(thr); + duk__debug_read_hstring_raw(thr, len); + break; + } + case DUK_DBG_IB_BUF4: { + len = duk__debug_read_uint32_raw(thr); + duk__debug_read_hbuffer_raw(thr, len); + break; + } + case DUK_DBG_IB_BUF2: { + len = duk__debug_read_uint16_raw(thr); + duk__debug_read_hbuffer_raw(thr, len); + break; + } + case DUK_DBG_IB_UNDEFINED: { + duk_push_undefined(thr); + break; + } + case DUK_DBG_IB_NULL: { + duk_push_null(thr); + break; + } + case DUK_DBG_IB_TRUE: { + duk_push_true(thr); + break; + } + case DUK_DBG_IB_FALSE: { + duk_push_false(thr); + break; + } + case DUK_DBG_IB_NUMBER: { + duk_double_t d; + d = duk__debug_read_double_raw(thr); + duk_push_number(thr, d); + break; + } + case DUK_DBG_IB_OBJECT: { + duk_heaphdr *h; + duk_debug_skip_byte(thr); + h = (duk_heaphdr *) duk__debug_read_pointer_raw(thr); + duk_push_heapptr(thr, (void *) h); + break; + } + case DUK_DBG_IB_POINTER: { + void *ptr; + ptr = duk__debug_read_pointer_raw(thr); + duk_push_pointer(thr, ptr); + break; + } + case DUK_DBG_IB_LIGHTFUNC: { + /* XXX: Not needed for now, so not implemented. Note that + * function pointers may have different size/layout than + * a void pointer. + */ + DUK_D(DUK_DPRINT("reading lightfunc values unimplemented")); + goto fail; + } + case DUK_DBG_IB_HEAPPTR: { + duk_heaphdr *h; + h = (duk_heaphdr *) duk__debug_read_pointer_raw(thr); + duk_push_heapptr(thr, (void *) h); + break; + } + case DUK_DBG_IB_UNUSED: /* unused: not accepted in inbound messages */ + default: + goto fail; + } + +return_ptr: + return DUK_GET_TVAL_NEGIDX(thr, -1); + +fail: + DUK_D(DUK_DPRINT("debug connection error: failed to decode tval")); + DUK__SET_CONN_BROKEN(thr, 1); + return NULL; +} + +/* + * Debug connection write primitives + */ + +/* Write fully. */ +DUK_INTERNAL void duk_debug_write_bytes(duk_hthread *thr, const duk_uint8_t *data, duk_size_t length) { + duk_heap *heap; + const duk_uint8_t *p; + duk_size_t left; + duk_size_t got; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(length == 0 || data != NULL); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + + if (heap->dbg_write_cb == NULL) { + DUK_D(DUK_DPRINT("attempt to write %ld bytes in detached state, ignore", (long) length)); + return; + } + if (length == 0) { + /* Avoid doing an actual write callback with length == 0, + * because that's reserved for a write flush. + */ + return; + } + DUK_ASSERT(data != NULL); + + p = data; + for (;;) { + left = (duk_size_t) ((data + length) - p); + if (left == 0) { + break; + } + DUK_ASSERT(heap->dbg_write_cb != NULL); + DUK_ASSERT(left >= 1); +#if defined(DUK_USE_DEBUGGER_TRANSPORT_TORTURE) + left = 1; +#endif + DUK__DBG_TPORT_ENTER(); + got = heap->dbg_write_cb(heap->dbg_udata, (const char *) p, left); + DUK__DBG_TPORT_EXIT(); + + if (got == 0 || got > left) { + duk__debug_null_most_callbacks(thr); /* avoid calling write callback in detach1() */ + DUK_D(DUK_DPRINT("connection error during write")); + DUK__SET_CONN_BROKEN(thr, 1); + return; + } + p += got; + } +} + +DUK_INTERNAL void duk_debug_write_byte(duk_hthread *thr, duk_uint8_t x) { + duk_debug_write_bytes(thr, (const duk_uint8_t *) &x, 1); +} + +DUK_INTERNAL void duk_debug_write_unused(duk_hthread *thr) { + duk_debug_write_byte(thr, DUK_DBG_IB_UNUSED); +} + +DUK_INTERNAL void duk_debug_write_undefined(duk_hthread *thr) { + duk_debug_write_byte(thr, DUK_DBG_IB_UNDEFINED); +} + +#if defined(DUK_USE_DEBUGGER_INSPECT) +DUK_INTERNAL void duk_debug_write_null(duk_hthread *thr) { + duk_debug_write_byte(thr, DUK_DBG_IB_NULL); +} +#endif + +DUK_INTERNAL void duk_debug_write_boolean(duk_hthread *thr, duk_uint_t val) { + duk_debug_write_byte(thr, val ? DUK_DBG_IB_TRUE : DUK_DBG_IB_FALSE); +} + +/* Write signed 32-bit integer. */ +DUK_INTERNAL void duk_debug_write_int(duk_hthread *thr, duk_int32_t x) { + duk_uint8_t buf[5]; + duk_size_t len; + + DUK_ASSERT(thr != NULL); + + if (x >= 0 && x <= 0x3fL) { + buf[0] = (duk_uint8_t) (0x80 + x); + len = 1; + } else if (x >= 0 && x <= 0x3fffL) { + buf[0] = (duk_uint8_t) (0xc0 + (x >> 8)); + buf[1] = (duk_uint8_t) (x & 0xff); + len = 2; + } else { + /* Signed integers always map to 4 bytes now. */ + buf[0] = (duk_uint8_t) DUK_DBG_IB_INT4; + buf[1] = (duk_uint8_t) ((x >> 24) & 0xff); + buf[2] = (duk_uint8_t) ((x >> 16) & 0xff); + buf[3] = (duk_uint8_t) ((x >> 8) & 0xff); + buf[4] = (duk_uint8_t) (x & 0xff); + len = 5; + } + duk_debug_write_bytes(thr, buf, len); +} + +/* Write unsigned 32-bit integer. */ +DUK_INTERNAL void duk_debug_write_uint(duk_hthread *thr, duk_uint32_t x) { + /* The debugger protocol doesn't support a plain integer encoding for + * the full 32-bit unsigned range (only 32-bit signed). For now, + * unsigned 32-bit values simply written as signed ones. This is not + * a concrete issue except for 32-bit heaphdr fields. Proper solutions + * would be to (a) write such integers as IEEE doubles or (b) add an + * unsigned 32-bit dvalue. + */ + if (x >= 0x80000000UL) { + DUK_D(DUK_DPRINT("writing unsigned integer 0x%08lx as signed integer", (long) x)); + } + duk_debug_write_int(thr, (duk_int32_t) x); +} + +DUK_INTERNAL void duk_debug_write_strbuf(duk_hthread *thr, const char *data, duk_size_t length, duk_uint8_t marker_base) { + duk_uint8_t buf[5]; + duk_size_t buflen; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(length == 0 || data != NULL); + + if (length <= 0x1fUL && marker_base == DUK_DBG_IB_STR4) { + /* For strings, special form for short lengths. */ + buf[0] = (duk_uint8_t) (0x60 + length); + buflen = 1; + } else if (length <= 0xffffUL) { + buf[0] = (duk_uint8_t) (marker_base + 1); + buf[1] = (duk_uint8_t) (length >> 8); + buf[2] = (duk_uint8_t) (length & 0xff); + buflen = 3; + } else { + buf[0] = (duk_uint8_t) marker_base; + buf[1] = (duk_uint8_t) (length >> 24); + buf[2] = (duk_uint8_t) ((length >> 16) & 0xff); + buf[3] = (duk_uint8_t) ((length >> 8) & 0xff); + buf[4] = (duk_uint8_t) (length & 0xff); + buflen = 5; + } + + duk_debug_write_bytes(thr, (const duk_uint8_t *) buf, buflen); + duk_debug_write_bytes(thr, (const duk_uint8_t *) data, length); +} + +DUK_INTERNAL void duk_debug_write_string(duk_hthread *thr, const char *data, duk_size_t length) { + duk_debug_write_strbuf(thr, data, length, DUK_DBG_IB_STR4); +} + +DUK_INTERNAL void duk_debug_write_cstring(duk_hthread *thr, const char *data) { + DUK_ASSERT(thr != NULL); + + duk_debug_write_string(thr, data, data ? DUK_STRLEN(data) : 0); +} + +DUK_INTERNAL void duk_debug_write_hstring(duk_hthread *thr, duk_hstring *h) { + DUK_ASSERT(thr != NULL); + + /* XXX: differentiate null pointer from empty string? */ + duk_debug_write_string(thr, + (h != NULL ? (const char *) DUK_HSTRING_GET_DATA(h) : NULL), + (h != NULL ? (duk_size_t) DUK_HSTRING_GET_BYTELEN(h) : 0)); +} + +DUK_LOCAL void duk__debug_write_hstring_safe_top(duk_hthread *thr) { + duk_debug_write_hstring(thr, duk_safe_to_hstring(thr, -1)); +} + +DUK_INTERNAL void duk_debug_write_buffer(duk_hthread *thr, const char *data, duk_size_t length) { + duk_debug_write_strbuf(thr, data, length, DUK_DBG_IB_BUF4); +} + +DUK_INTERNAL void duk_debug_write_hbuffer(duk_hthread *thr, duk_hbuffer *h) { + DUK_ASSERT(thr != NULL); + + duk_debug_write_buffer(thr, + (h != NULL ? (const char *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h) : NULL), + (h != NULL ? (duk_size_t) DUK_HBUFFER_GET_SIZE(h) : 0)); +} + +DUK_LOCAL void duk__debug_write_pointer_raw(duk_hthread *thr, void *ptr, duk_uint8_t ibyte) { + duk_uint8_t buf[2]; + duk__ptr_union pu; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(sizeof(ptr) >= 1 && sizeof(ptr) <= 16); + /* ptr may be NULL */ + + buf[0] = ibyte; + buf[1] = sizeof(pu); + duk_debug_write_bytes(thr, buf, 2); + pu.p = (void *) ptr; +#if defined(DUK_USE_INTEGER_LE) + duk_byteswap_bytes((duk_uint8_t *) pu.b, sizeof(pu)); +#endif + duk_debug_write_bytes(thr, (const duk_uint8_t *) &pu.p, (duk_size_t) sizeof(pu)); +} + +DUK_INTERNAL void duk_debug_write_pointer(duk_hthread *thr, void *ptr) { + duk__debug_write_pointer_raw(thr, ptr, DUK_DBG_IB_POINTER); +} + +#if defined(DUK_USE_DEBUGGER_DUMPHEAP) || defined(DUK_USE_DEBUGGER_INSPECT) +DUK_INTERNAL void duk_debug_write_heapptr(duk_hthread *thr, duk_heaphdr *h) { + duk__debug_write_pointer_raw(thr, (void *) h, DUK_DBG_IB_HEAPPTR); +} +#endif /* DUK_USE_DEBUGGER_DUMPHEAP || DUK_USE_DEBUGGER_INSPECT */ + +DUK_INTERNAL void duk_debug_write_hobject(duk_hthread *thr, duk_hobject *obj) { + duk_uint8_t buf[3]; + duk__ptr_union pu; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(sizeof(obj) >= 1 && sizeof(obj) <= 16); + DUK_ASSERT(obj != NULL); + + buf[0] = DUK_DBG_IB_OBJECT; + buf[1] = (duk_uint8_t) DUK_HOBJECT_GET_CLASS_NUMBER(obj); + buf[2] = sizeof(pu); + duk_debug_write_bytes(thr, buf, 3); + pu.p = (void *) obj; +#if defined(DUK_USE_INTEGER_LE) + duk_byteswap_bytes((duk_uint8_t *) pu.b, sizeof(pu)); +#endif + duk_debug_write_bytes(thr, (const duk_uint8_t *) &pu.p, (duk_size_t) sizeof(pu)); +} + +DUK_INTERNAL void duk_debug_write_tval(duk_hthread *thr, duk_tval *tv) { + duk_c_function lf_func; + duk_small_uint_t lf_flags; + duk_uint8_t buf[4]; + duk_double_union du1; + duk_double_union du2; + duk_int32_t i32; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(tv != NULL); + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNDEFINED: + duk_debug_write_byte(thr, DUK_DBG_IB_UNDEFINED); + break; + case DUK_TAG_UNUSED: + duk_debug_write_byte(thr, DUK_DBG_IB_UNUSED); + break; + case DUK_TAG_NULL: + duk_debug_write_byte(thr, DUK_DBG_IB_NULL); + break; + case DUK_TAG_BOOLEAN: + DUK_ASSERT(DUK_TVAL_GET_BOOLEAN(tv) == 0 || DUK_TVAL_GET_BOOLEAN(tv) == 1); + duk_debug_write_boolean(thr, DUK_TVAL_GET_BOOLEAN(tv)); + break; + case DUK_TAG_POINTER: + duk_debug_write_pointer(thr, (void *) DUK_TVAL_GET_POINTER(tv)); + break; + case DUK_TAG_LIGHTFUNC: + DUK_TVAL_GET_LIGHTFUNC(tv, lf_func, lf_flags); + buf[0] = DUK_DBG_IB_LIGHTFUNC; + buf[1] = (duk_uint8_t) (lf_flags >> 8); + buf[2] = (duk_uint8_t) (lf_flags & 0xff); + buf[3] = sizeof(lf_func); + duk_debug_write_bytes(thr, buf, 4); + duk_debug_write_bytes(thr, (const duk_uint8_t *) &lf_func, sizeof(lf_func)); + break; + case DUK_TAG_STRING: + duk_debug_write_hstring(thr, DUK_TVAL_GET_STRING(tv)); + break; + case DUK_TAG_OBJECT: + duk_debug_write_hobject(thr, DUK_TVAL_GET_OBJECT(tv)); + break; + case DUK_TAG_BUFFER: + duk_debug_write_hbuffer(thr, DUK_TVAL_GET_BUFFER(tv)); + break; +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: + /* Numbers are normalized to big (network) endian. We can + * (but are not required) to use integer dvalues when there's + * no loss of precision. + * + * XXX: share check with other code; this check is slow but + * reliable and doesn't require careful exponent/mantissa + * mask tricks as in the fastint downgrade code. + */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + du1.d = DUK_TVAL_GET_NUMBER(tv); + i32 = (duk_int32_t) du1.d; + du2.d = (duk_double_t) i32; + + DUK_DD(DUK_DDPRINT("i32=%ld du1=%02x%02x%02x%02x%02x%02x%02x%02x " + "du2=%02x%02x%02x%02x%02x%02x%02x%02x", + (long) i32, + (unsigned int) du1.uc[0], + (unsigned int) du1.uc[1], + (unsigned int) du1.uc[2], + (unsigned int) du1.uc[3], + (unsigned int) du1.uc[4], + (unsigned int) du1.uc[5], + (unsigned int) du1.uc[6], + (unsigned int) du1.uc[7], + (unsigned int) du2.uc[0], + (unsigned int) du2.uc[1], + (unsigned int) du2.uc[2], + (unsigned int) du2.uc[3], + (unsigned int) du2.uc[4], + (unsigned int) du2.uc[5], + (unsigned int) du2.uc[6], + (unsigned int) du2.uc[7])); + + if (duk_memcmp((const void *) du1.uc, (const void *) du2.uc, sizeof(du1.uc)) == 0) { + duk_debug_write_int(thr, i32); + } else { + DUK_DBLUNION_DOUBLE_HTON(&du1); + duk_debug_write_byte(thr, DUK_DBG_IB_NUMBER); + duk_debug_write_bytes(thr, (const duk_uint8_t *) du1.uc, sizeof(du1.uc)); + } + } +} + +#if defined(DUK_USE_DEBUGGER_DUMPHEAP) +/* Variant for writing duk_tvals so that any heap allocated values are + * written out as tagged heap pointers. + */ +DUK_LOCAL void duk__debug_write_tval_heapptr(duk_hthread *thr, duk_tval *tv) { + if (DUK_TVAL_IS_HEAP_ALLOCATED(tv)) { + duk_heaphdr *h = DUK_TVAL_GET_HEAPHDR(tv); + duk_debug_write_heapptr(thr, h); + } else { + duk_debug_write_tval(thr, tv); + } +} +#endif /* DUK_USE_DEBUGGER_DUMPHEAP */ + +/* + * Debug connection message write helpers + */ + +#if 0 /* unused */ +DUK_INTERNAL void duk_debug_write_request(duk_hthread *thr, duk_small_uint_t command) { + duk_debug_write_byte(thr, DUK_DBG_IB_REQUEST); + duk_debug_write_int(thr, command); +} +#endif + +DUK_INTERNAL void duk_debug_write_reply(duk_hthread *thr) { + duk_debug_write_byte(thr, DUK_DBG_IB_REPLY); +} + +DUK_INTERNAL void duk_debug_write_error_eom(duk_hthread *thr, duk_small_uint_t err_code, const char *msg) { + /* Allow NULL 'msg' */ + duk_debug_write_byte(thr, DUK_DBG_IB_ERROR); + duk_debug_write_int(thr, (duk_int32_t) err_code); + duk_debug_write_cstring(thr, msg); + duk_debug_write_eom(thr); +} + +DUK_INTERNAL void duk_debug_write_notify(duk_hthread *thr, duk_small_uint_t command) { + duk_debug_write_byte(thr, DUK_DBG_IB_NOTIFY); + duk_debug_write_int(thr, (duk_int32_t) command); +} + +DUK_INTERNAL void duk_debug_write_eom(duk_hthread *thr) { + duk_debug_write_byte(thr, DUK_DBG_IB_EOM); + + /* As an initial implementation, write flush after every EOM (and the + * version identifier). A better implementation would flush only when + * Duktape is finished processing messages so that a flush only happens + * after all outbound messages are finished on that occasion. + */ + duk_debug_write_flush(thr); +} + +/* + * Status message and helpers + */ + +DUK_INTERNAL duk_uint_fast32_t duk_debug_curr_line(duk_hthread *thr) { + duk_activation *act; + duk_uint_fast32_t line; + duk_uint_fast32_t pc; + + act = thr->callstack_curr; + if (act == NULL) { + return 0; + } + + /* We're conceptually between two opcodes; act->pc indicates the next + * instruction to be executed. This is usually the correct pc/line to + * indicate in Status. (For the 'debugger' statement this now reports + * the pc/line after the debugger statement because the debugger opcode + * has already been executed.) + */ + + pc = duk_hthread_get_act_curr_pc(thr, act); + + /* XXX: this should be optimized to be a raw query and avoid valstack + * operations if possible. + */ + duk_push_tval(thr, &act->tv_func); + line = duk_hobject_pc2line_query(thr, -1, pc); + duk_pop(thr); + return line; +} + +DUK_INTERNAL void duk_debug_send_status(duk_hthread *thr) { + duk_activation *act; + + duk_debug_write_notify(thr, DUK_DBG_CMD_STATUS); + duk_debug_write_int(thr, (DUK_HEAP_HAS_DEBUGGER_PAUSED(thr->heap) ? 1 : 0)); + + act = thr->callstack_curr; + if (act == NULL) { + duk_debug_write_undefined(thr); + duk_debug_write_undefined(thr); + duk_debug_write_int(thr, 0); + duk_debug_write_int(thr, 0); + } else { + duk_push_tval(thr, &act->tv_func); + duk_get_prop_literal(thr, -1, "fileName"); + duk__debug_write_hstring_safe_top(thr); + duk_get_prop_literal(thr, -2, "name"); + duk__debug_write_hstring_safe_top(thr); + duk_pop_3(thr); + /* Report next pc/line to be executed. */ + duk_debug_write_uint(thr, (duk_uint32_t) duk_debug_curr_line(thr)); + duk_debug_write_uint(thr, (duk_uint32_t) duk_hthread_get_act_curr_pc(thr, act)); + } + + duk_debug_write_eom(thr); +} + +#if defined(DUK_USE_DEBUGGER_THROW_NOTIFY) +DUK_INTERNAL void duk_debug_send_throw(duk_hthread *thr, duk_bool_t fatal) { + /* + * NFY EOM + */ + + duk_activation *act; + duk_uint32_t pc; + + DUK_ASSERT(thr->valstack_top > thr->valstack); /* At least: ... [err] */ + + duk_debug_write_notify(thr, DUK_DBG_CMD_THROW); + duk_debug_write_int(thr, (duk_int32_t) fatal); + + /* Report thrown value to client coerced to string */ + duk_dup_top(thr); + duk__debug_write_hstring_safe_top(thr); + duk_pop(thr); + + if (duk_is_error(thr, -1)) { + /* Error instance, use augmented error data directly */ + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_FILE_NAME); + duk__debug_write_hstring_safe_top(thr); + duk_get_prop_stridx_short(thr, -2, DUK_STRIDX_LINE_NUMBER); + duk_debug_write_uint(thr, duk_get_uint(thr, -1)); + duk_pop_2(thr); + } else { + /* For anything other than an Error instance, we calculate the + * error location directly from the current activation if one + * exists. + */ + act = thr->callstack_curr; + if (act != NULL) { + duk_push_tval(thr, &act->tv_func); + duk_get_prop_literal(thr, -1, "fileName"); + duk__debug_write_hstring_safe_top(thr); + pc = (duk_uint32_t) duk_hthread_get_act_prev_pc(thr, act); + duk_debug_write_uint(thr, (duk_uint32_t) duk_hobject_pc2line_query(thr, -2, pc)); + duk_pop_2(thr); + } else { + /* Can happen if duk_throw() is called on an empty + * callstack. + */ + duk_debug_write_cstring(thr, ""); + duk_debug_write_uint(thr, 0); + } + } + + duk_debug_write_eom(thr); +} +#endif /* DUK_USE_DEBUGGER_THROW_NOTIFY */ + +/* + * Debug message processing + */ + +/* Skip dvalue. */ +DUK_LOCAL duk_bool_t duk__debug_skip_dvalue(duk_hthread *thr) { + duk_uint8_t x; + duk_uint32_t len; + + x = duk_debug_read_byte(thr); + + if (x >= 0xc0) { + duk_debug_skip_byte(thr); + return 0; + } + if (x >= 0x80) { + return 0; + } + if (x >= 0x60) { + duk_debug_skip_bytes(thr, (duk_size_t) (x - 0x60)); + return 0; + } + switch (x) { + case DUK_DBG_IB_EOM: + return 1; /* Return 1: got EOM */ + case DUK_DBG_IB_REQUEST: + case DUK_DBG_IB_REPLY: + case DUK_DBG_IB_ERROR: + case DUK_DBG_IB_NOTIFY: + break; + case DUK_DBG_IB_INT4: + (void) duk__debug_read_uint32_raw(thr); + break; + case DUK_DBG_IB_STR4: + case DUK_DBG_IB_BUF4: + len = duk__debug_read_uint32_raw(thr); + duk_debug_skip_bytes(thr, len); + break; + case DUK_DBG_IB_STR2: + case DUK_DBG_IB_BUF2: + len = duk__debug_read_uint16_raw(thr); + duk_debug_skip_bytes(thr, len); + break; + case DUK_DBG_IB_UNUSED: + case DUK_DBG_IB_UNDEFINED: + case DUK_DBG_IB_NULL: + case DUK_DBG_IB_TRUE: + case DUK_DBG_IB_FALSE: + break; + case DUK_DBG_IB_NUMBER: + duk_debug_skip_bytes(thr, 8); + break; + case DUK_DBG_IB_OBJECT: + duk_debug_skip_byte(thr); + len = duk_debug_read_byte(thr); + duk_debug_skip_bytes(thr, len); + break; + case DUK_DBG_IB_POINTER: + case DUK_DBG_IB_HEAPPTR: + len = duk_debug_read_byte(thr); + duk_debug_skip_bytes(thr, len); + break; + case DUK_DBG_IB_LIGHTFUNC: + duk_debug_skip_bytes(thr, 2); + len = duk_debug_read_byte(thr); + duk_debug_skip_bytes(thr, len); + break; + default: + goto fail; + } + + return 0; + +fail: + DUK__SET_CONN_BROKEN(thr, 1); + return 1; /* Pretend like we got EOM */ +} + +/* Skip dvalues to EOM. */ +DUK_LOCAL void duk__debug_skip_to_eom(duk_hthread *thr) { + for (;;) { + if (duk__debug_skip_dvalue(thr)) { + break; + } + } +} + +/* Read and validate a call stack index. If index is invalid, write out an + * error message and return zero. + */ +DUK_LOCAL duk_int32_t duk__debug_read_validate_csindex(duk_hthread *thr) { + duk_int32_t level; + level = duk_debug_read_int(thr); + if (level >= 0 || -level > (duk_int32_t) thr->callstack_top) { + duk_debug_write_error_eom(thr, DUK_DBG_ERR_NOTFOUND, "invalid callstack index"); + return 0; /* zero indicates failure */ + } + return level; +} + +/* Read a call stack index and lookup the corresponding duk_activation. + * If index is invalid, write out an error message and return NULL. + */ +DUK_LOCAL duk_activation *duk__debug_read_level_get_activation(duk_hthread *thr) { + duk_activation *act; + duk_int32_t level; + + level = duk_debug_read_int(thr); + act = duk_hthread_get_activation_for_level(thr, level); + if (act == NULL) { + duk_debug_write_error_eom(thr, DUK_DBG_ERR_NOTFOUND, "invalid callstack index"); + } + return act; +} + +/* + * Simple commands + */ + +DUK_LOCAL void duk__debug_handle_basic_info(duk_hthread *thr, duk_heap *heap) { + DUK_UNREF(heap); + DUK_D(DUK_DPRINT("debug command Version")); + + duk_debug_write_reply(thr); + duk_debug_write_int(thr, DUK_VERSION); + duk_debug_write_cstring(thr, DUK_GIT_DESCRIBE); + duk_debug_write_cstring(thr, DUK_USE_TARGET_INFO); +#if defined(DUK_USE_DOUBLE_LE) + duk_debug_write_int(thr, 1); +#elif defined(DUK_USE_DOUBLE_ME) + duk_debug_write_int(thr, 2); +#elif defined(DUK_USE_DOUBLE_BE) + duk_debug_write_int(thr, 3); +#else + duk_debug_write_int(thr, 0); +#endif + duk_debug_write_int(thr, (duk_int_t) sizeof(void *)); + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_trigger_status(duk_hthread *thr, duk_heap *heap) { + DUK_UNREF(heap); + DUK_D(DUK_DPRINT("debug command TriggerStatus")); + + duk_debug_write_reply(thr); + duk_debug_write_eom(thr); + heap->dbg_state_dirty = 1; +} + +DUK_LOCAL void duk__debug_handle_pause(duk_hthread *thr, duk_heap *heap) { + DUK_D(DUK_DPRINT("debug command Pause")); + duk_debug_set_paused(heap); + duk_debug_write_reply(thr); + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_resume(duk_hthread *thr, duk_heap *heap) { + duk_small_uint_t pause_flags; + + DUK_D(DUK_DPRINT("debug command Resume")); + + duk_debug_clear_paused(heap); + + pause_flags = 0; +#if 0 /* manual testing */ + pause_flags |= DUK_PAUSE_FLAG_ONE_OPCODE; + pause_flags |= DUK_PAUSE_FLAG_CAUGHT_ERROR; + pause_flags |= DUK_PAUSE_FLAG_UNCAUGHT_ERROR; +#endif +#if defined(DUK_USE_DEBUGGER_PAUSE_UNCAUGHT) + pause_flags |= DUK_PAUSE_FLAG_UNCAUGHT_ERROR; +#endif + + duk__debug_set_pause_state(thr, heap, pause_flags); + + duk_debug_write_reply(thr); + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_step(duk_hthread *thr, duk_heap *heap, duk_int32_t cmd) { + duk_small_uint_t pause_flags; + + DUK_D(DUK_DPRINT("debug command StepInto/StepOver/StepOut: %d", (int) cmd)); + + if (cmd == DUK_DBG_CMD_STEPINTO) { + pause_flags = DUK_PAUSE_FLAG_LINE_CHANGE | DUK_PAUSE_FLAG_FUNC_ENTRY | DUK_PAUSE_FLAG_FUNC_EXIT; + } else if (cmd == DUK_DBG_CMD_STEPOVER) { + pause_flags = DUK_PAUSE_FLAG_LINE_CHANGE | DUK_PAUSE_FLAG_FUNC_EXIT; + } else { + DUK_ASSERT(cmd == DUK_DBG_CMD_STEPOUT); + pause_flags = DUK_PAUSE_FLAG_FUNC_EXIT; + } +#if defined(DUK_USE_DEBUGGER_PAUSE_UNCAUGHT) + pause_flags |= DUK_PAUSE_FLAG_UNCAUGHT_ERROR; +#endif + + /* If current activation doesn't have line information, line-based + * pause flags are automatically disabled. As a result, e.g. + * StepInto will then pause on (native) function entry or exit. + */ + duk_debug_clear_paused(heap); + duk__debug_set_pause_state(thr, heap, pause_flags); + + duk_debug_write_reply(thr); + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_list_break(duk_hthread *thr, duk_heap *heap) { + duk_small_int_t i; + + DUK_D(DUK_DPRINT("debug command ListBreak")); + duk_debug_write_reply(thr); + for (i = 0; i < (duk_small_int_t) heap->dbg_breakpoint_count; i++) { + duk_debug_write_hstring(thr, heap->dbg_breakpoints[i].filename); + duk_debug_write_uint(thr, (duk_uint32_t) heap->dbg_breakpoints[i].line); + } + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_add_break(duk_hthread *thr, duk_heap *heap) { + duk_hstring *filename; + duk_uint32_t linenumber; + duk_small_int_t idx; + + DUK_UNREF(heap); + + filename = duk_debug_read_hstring(thr); + linenumber = (duk_uint32_t) duk_debug_read_int(thr); + DUK_D(DUK_DPRINT("debug command AddBreak: %!O:%ld", (duk_hobject *) filename, (long) linenumber)); + idx = duk_debug_add_breakpoint(thr, filename, linenumber); + if (idx >= 0) { + duk_debug_write_reply(thr); + duk_debug_write_int(thr, (duk_int32_t) idx); + duk_debug_write_eom(thr); + } else { + duk_debug_write_error_eom(thr, DUK_DBG_ERR_TOOMANY, "no space for breakpoint"); + } +} + +DUK_LOCAL void duk__debug_handle_del_break(duk_hthread *thr, duk_heap *heap) { + duk_small_uint_t idx; + + DUK_UNREF(heap); + + DUK_D(DUK_DPRINT("debug command DelBreak")); + idx = (duk_small_uint_t) duk_debug_read_int(thr); + if (duk_debug_remove_breakpoint(thr, idx)) { + duk_debug_write_reply(thr); + duk_debug_write_eom(thr); + } else { + duk_debug_write_error_eom(thr, DUK_DBG_ERR_NOTFOUND, "invalid breakpoint index"); + } +} + +DUK_LOCAL void duk__debug_handle_get_var(duk_hthread *thr, duk_heap *heap) { + duk_activation *act; + duk_hstring *str; + duk_bool_t rc; + + DUK_UNREF(heap); + DUK_D(DUK_DPRINT("debug command GetVar")); + + act = duk__debug_read_level_get_activation(thr); + if (act == NULL) { + return; + } + str = duk_debug_read_hstring(thr); /* push to stack */ + DUK_ASSERT(str != NULL); + + rc = duk_js_getvar_activation(thr, act, str, 0); + + duk_debug_write_reply(thr); + if (rc) { + duk_debug_write_int(thr, 1); + DUK_ASSERT(duk_get_tval(thr, -2) != NULL); + duk_debug_write_tval(thr, duk_get_tval(thr, -2)); + } else { + duk_debug_write_int(thr, 0); + duk_debug_write_unused(thr); + } + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_put_var(duk_hthread *thr, duk_heap *heap) { + duk_activation *act; + duk_hstring *str; + duk_tval *tv; + + DUK_UNREF(heap); + DUK_D(DUK_DPRINT("debug command PutVar")); + + act = duk__debug_read_level_get_activation(thr); + if (act == NULL) { + return; + } + str = duk_debug_read_hstring(thr); /* push to stack */ + DUK_ASSERT(str != NULL); + tv = duk_debug_read_tval(thr); + if (tv == NULL) { + /* detached */ + return; + } + + duk_js_putvar_activation(thr, act, str, tv, 0); + + /* XXX: Current putvar implementation doesn't have a success flag, + * add one and send to debug client? + */ + duk_debug_write_reply(thr); + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_get_call_stack(duk_hthread *thr, duk_heap *heap) { + duk_hthread *curr_thr = thr; + duk_activation *curr_act; + duk_uint_fast32_t pc; + duk_uint_fast32_t line; + + DUK_ASSERT(thr != NULL); + DUK_UNREF(heap); + + duk_debug_write_reply(thr); + while (curr_thr != NULL) { + for (curr_act = curr_thr->callstack_curr; curr_act != NULL; curr_act = curr_act->parent) { + /* PC/line semantics here are: + * - For callstack top we're conceptually between two + * opcodes and current PC indicates next line to + * execute, so report that (matches Status). + * - For other activations we're conceptually still + * executing the instruction at PC-1, so report that + * (matches error stacktrace behavior). + * - See: https://github.com/svaarala/duktape/issues/281 + */ + + /* XXX: optimize to use direct reads, i.e. avoid + * value stack operations. + */ + duk_push_tval(thr, &curr_act->tv_func); + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_FILE_NAME); + duk__debug_write_hstring_safe_top(thr); + duk_get_prop_stridx_short(thr, -2, DUK_STRIDX_NAME); + duk__debug_write_hstring_safe_top(thr); + pc = duk_hthread_get_act_curr_pc(thr, curr_act); + if (curr_act != curr_thr->callstack_curr && pc > 0) { + pc--; + } + line = duk_hobject_pc2line_query(thr, -3, pc); + duk_debug_write_uint(thr, (duk_uint32_t) line); + duk_debug_write_uint(thr, (duk_uint32_t) pc); + duk_pop_3(thr); + } + curr_thr = curr_thr->resumer; + } + /* SCANBUILD: warning about 'thr' potentially being NULL here, + * warning is incorrect because thr != NULL always here. + */ + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_get_locals(duk_hthread *thr, duk_heap *heap) { + duk_activation *act; + duk_hstring *varname; + + DUK_UNREF(heap); + + act = duk__debug_read_level_get_activation(thr); + if (act == NULL) { + return; + } + + duk_debug_write_reply(thr); + + /* XXX: several nice-to-have improvements here: + * - Use direct reads avoiding value stack operations + * - Avoid triggering getters, indicate getter values to debug client + * - If side effects are possible, add error catching + */ + + if (DUK_TVAL_IS_OBJECT(&act->tv_func)) { + duk_hobject *h_func = DUK_TVAL_GET_OBJECT(&act->tv_func); + duk_hobject *h_varmap; + + h_varmap = duk_hobject_get_varmap(thr, h_func); + if (h_varmap != NULL) { + duk_push_hobject(thr, h_varmap); + duk_enum(thr, -1, 0 /*enum_flags*/); + while (duk_next(thr, -1 /*enum_index*/, 0 /*get_value*/)) { + varname = duk_known_hstring(thr, -1); + + duk_js_getvar_activation(thr, act, varname, 0 /*throw_flag*/); + /* [ ... func varmap enum key value this ] */ + duk_debug_write_hstring(thr, duk_get_hstring(thr, -3)); + duk_debug_write_tval(thr, duk_get_tval(thr, -2)); + duk_pop_3(thr); /* -> [ ... func varmap enum ] */ + } + } else { + DUK_D(DUK_DPRINT("varmap missing in GetLocals, ignore")); + } + } else { + DUK_D(DUK_DPRINT("varmap is not an object in GetLocals, ignore")); + } + + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_eval(duk_hthread *thr, duk_heap *heap) { + duk_small_uint_t call_flags; + duk_int_t call_ret; + duk_small_int_t eval_err; + duk_bool_t direct_eval; + duk_int32_t level; + duk_idx_t idx_func; + + DUK_UNREF(heap); + + DUK_D(DUK_DPRINT("debug command Eval")); + + /* The eval code is executed within the lexical environment of a specified + * activation. For now, use global object eval() function, with the eval + * considered a 'direct call to eval'. + * + * Callstack index for debug commands only affects scope -- the callstack + * as seen by, e.g. Duktape.act() will be the same regardless. + */ + + /* nargs == 2 so we can pass a callstack index to eval(). */ + idx_func = duk_get_top(thr); + duk_push_c_function(thr, duk_bi_global_object_eval, 2 /*nargs*/); + duk_push_undefined(thr); /* 'this' binding shouldn't matter here */ + + /* Read callstack index, if non-null. */ + if (duk_debug_peek_byte(thr) == DUK_DBG_IB_NULL) { + direct_eval = 0; + level = -1; /* Not needed, but silences warning. */ + (void) duk_debug_read_byte(thr); + } else { + direct_eval = 1; + level = duk__debug_read_validate_csindex(thr); + if (level == 0) { + return; + } + } + + DUK_ASSERT(!direct_eval || (level < 0 && -level <= (duk_int32_t) thr->callstack_top)); + + (void) duk_debug_read_hstring(thr); + if (direct_eval) { + duk_push_int(thr, level - 1); /* compensate for eval() call */ + } + + /* [ ... eval "eval" eval_input level? ] */ + + call_flags = 0; + if (direct_eval) { + duk_activation *act; + duk_hobject *fun; + + act = duk_hthread_get_activation_for_level(thr, level); + if (act != NULL) { + fun = DUK_ACT_GET_FUNC(act); + if (fun != NULL && DUK_HOBJECT_IS_COMPFUNC(fun)) { + /* Direct eval requires that there's a current + * activation and it is an ECMAScript function. + * When Eval is executed from e.g. cooperate API + * call we'll need to do an indirect eval instead. + */ + call_flags |= DUK_CALL_FLAG_DIRECT_EVAL; + } + } + } + + call_ret = duk_pcall_method_flags(thr, duk_get_top(thr) - (idx_func + 2), call_flags); + + if (call_ret == DUK_EXEC_SUCCESS) { + eval_err = 0; + /* Use result value as is. */ + } else { + /* For errors a string coerced result is most informative + * right now, as the debug client doesn't have the capability + * to traverse the error object. + */ + eval_err = 1; + duk_safe_to_string(thr, -1); + } + + /* [ ... result ] */ + + duk_debug_write_reply(thr); + duk_debug_write_int(thr, (duk_int32_t) eval_err); + DUK_ASSERT(duk_get_tval(thr, -1) != NULL); + duk_debug_write_tval(thr, duk_get_tval(thr, -1)); + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_detach(duk_hthread *thr, duk_heap *heap) { + DUK_UNREF(heap); + DUK_D(DUK_DPRINT("debug command Detach")); + + duk_debug_write_reply(thr); + duk_debug_write_eom(thr); + + DUK_D(DUK_DPRINT("debug connection detached, mark broken")); + DUK__SET_CONN_BROKEN(thr, 0); /* not an error */ +} + +DUK_LOCAL void duk__debug_handle_apprequest(duk_hthread *thr, duk_heap *heap) { + duk_idx_t old_top; + + DUK_D(DUK_DPRINT("debug command AppRequest")); + + old_top = duk_get_top(thr); /* save stack top */ + + if (heap->dbg_request_cb != NULL) { + duk_idx_t nrets; + duk_idx_t nvalues = 0; + duk_idx_t top, idx; + + /* Read tvals from the message and push them onto the valstack, + * then call the request callback to process the request. + */ + while (duk_debug_peek_byte(thr) != DUK_DBG_IB_EOM) { + duk_tval *tv; + if (!duk_check_stack(thr, 1)) { + DUK_D(DUK_DPRINT("failed to allocate space for request dvalue(s)")); + goto fail; + } + tv = duk_debug_read_tval(thr); /* push to stack */ + if (tv == NULL) { + /* detached */ + return; + } + nvalues++; + } + DUK_ASSERT(duk_get_top(thr) == old_top + nvalues); + + /* Request callback should push values for reply to client onto valstack */ + DUK_D(DUK_DPRINT("calling into AppRequest request_cb with nvalues=%ld, old_top=%ld, top=%ld", + (long) nvalues, + (long) old_top, + (long) duk_get_top(thr))); + nrets = heap->dbg_request_cb(thr, heap->dbg_udata, nvalues); + DUK_D(DUK_DPRINT("returned from AppRequest request_cb; nvalues=%ld -> nrets=%ld, old_top=%ld, top=%ld", + (long) nvalues, + (long) nrets, + (long) old_top, + (long) duk_get_top(thr))); + if (nrets >= 0) { + DUK_ASSERT(duk_get_top(thr) >= old_top + nrets); + if (duk_get_top(thr) < old_top + nrets) { + DUK_D(DUK_DPRINT("AppRequest callback doesn't match value stack configuration, " + "top=%ld < old_top=%ld + nrets=%ld; " + "this might mean it's unsafe to continue!", + (long) duk_get_top(thr), + (long) old_top, + (long) nrets)); + goto fail; + } + + /* Reply with tvals pushed by request callback */ + duk_debug_write_byte(thr, DUK_DBG_IB_REPLY); + top = duk_get_top(thr); + for (idx = top - nrets; idx < top; idx++) { + duk_debug_write_tval(thr, DUK_GET_TVAL_POSIDX(thr, idx)); + } + duk_debug_write_eom(thr); + } else { + DUK_ASSERT(duk_get_top(thr) >= old_top + 1); + if (duk_get_top(thr) < old_top + 1) { + DUK_D(DUK_DPRINT("request callback return value doesn't match value stack configuration")); + goto fail; + } + duk_debug_write_error_eom(thr, DUK_DBG_ERR_APPLICATION, duk_get_string(thr, -1)); + } + + duk_set_top(thr, old_top); /* restore stack top */ + } else { + DUK_D(DUK_DPRINT("no request callback, treat AppRequest as unsupported")); + duk_debug_write_error_eom(thr, DUK_DBG_ERR_UNSUPPORTED, "AppRequest unsupported by target"); + } + + return; + +fail: + duk_set_top(thr, old_top); /* restore stack top */ + DUK__SET_CONN_BROKEN(thr, 1); +} + +/* + * DumpHeap command + */ + +#if defined(DUK_USE_DEBUGGER_DUMPHEAP) +/* XXX: this has some overlap with object inspection; remove this and make + * DumpHeap return lists of heapptrs instead? + */ +DUK_LOCAL void duk__debug_dump_heaphdr(duk_hthread *thr, duk_heap *heap, duk_heaphdr *hdr) { + DUK_UNREF(heap); + + duk_debug_write_heapptr(thr, hdr); + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HEAPHDR_GET_TYPE(hdr)); + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HEAPHDR_GET_FLAGS_RAW(hdr)); +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HEAPHDR_GET_REFCOUNT(hdr)); +#else + duk_debug_write_int(thr, (duk_int32_t) -1); +#endif + + switch (DUK_HEAPHDR_GET_TYPE(hdr)) { + case DUK_HTYPE_STRING: { + duk_hstring *h = (duk_hstring *) hdr; + + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HSTRING_GET_BYTELEN(h)); + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HSTRING_GET_CHARLEN(h)); + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HSTRING_GET_HASH(h)); + duk_debug_write_hstring(thr, h); + break; + } + case DUK_HTYPE_OBJECT: { + duk_hobject *h = (duk_hobject *) hdr; + duk_hstring *k; + duk_uint_fast32_t i; + + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HOBJECT_GET_CLASS_NUMBER(h)); + duk_debug_write_heapptr(thr, (duk_heaphdr *) DUK_HOBJECT_GET_PROTOTYPE(heap, h)); + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HOBJECT_GET_ESIZE(h)); + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HOBJECT_GET_ENEXT(h)); + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HOBJECT_GET_ASIZE(h)); + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HOBJECT_GET_HSIZE(h)); + + for (i = 0; i < (duk_uint_fast32_t) DUK_HOBJECT_GET_ENEXT(h); i++) { + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HOBJECT_E_GET_FLAGS(heap, h, i)); + k = DUK_HOBJECT_E_GET_KEY(heap, h, i); + duk_debug_write_heapptr(thr, (duk_heaphdr *) k); + if (k == NULL) { + duk_debug_write_int(thr, 0); /* isAccessor */ + duk_debug_write_unused(thr); + continue; + } + if (DUK_HOBJECT_E_SLOT_IS_ACCESSOR(heap, h, i)) { + duk_debug_write_int(thr, 1); /* isAccessor */ + duk_debug_write_heapptr(thr, (duk_heaphdr *) DUK_HOBJECT_E_GET_VALUE_PTR(heap, h, i)->a.get); + duk_debug_write_heapptr(thr, (duk_heaphdr *) DUK_HOBJECT_E_GET_VALUE_PTR(heap, h, i)->a.set); + } else { + duk_debug_write_int(thr, 0); /* isAccessor */ + + duk__debug_write_tval_heapptr(thr, &DUK_HOBJECT_E_GET_VALUE_PTR(heap, h, i)->v); + } + } + + for (i = 0; i < (duk_uint_fast32_t) DUK_HOBJECT_GET_ASIZE(h); i++) { + /* Note: array dump will include elements beyond + * 'length'. + */ + duk__debug_write_tval_heapptr(thr, DUK_HOBJECT_A_GET_VALUE_PTR(heap, h, i)); + } + break; + } + case DUK_HTYPE_BUFFER: { + duk_hbuffer *h = (duk_hbuffer *) hdr; + + duk_debug_write_uint(thr, (duk_uint32_t) DUK_HBUFFER_GET_SIZE(h)); + duk_debug_write_buffer(thr, (const char *) DUK_HBUFFER_GET_DATA_PTR(heap, h), (duk_size_t) DUK_HBUFFER_GET_SIZE(h)); + break; + } + default: { + DUK_D(DUK_DPRINT("invalid htype: %d", (int) DUK_HEAPHDR_GET_TYPE(hdr))); + } + } +} + +DUK_LOCAL void duk__debug_dump_heap_allocated(duk_hthread *thr, duk_heap *heap) { + duk_heaphdr *hdr; + + hdr = heap->heap_allocated; + while (hdr != NULL) { + duk__debug_dump_heaphdr(thr, heap, hdr); + hdr = DUK_HEAPHDR_GET_NEXT(heap, hdr); + } +} + +DUK_LOCAL void duk__debug_dump_strtab(duk_hthread *thr, duk_heap *heap) { + duk_uint32_t i; + duk_hstring *h; + + for (i = 0; i < heap->st_size; i++) { +#if defined(DUK_USE_STRTAB_PTRCOMP) + h = DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, heap->strtable16[i]); +#else + h = heap->strtable[i]; +#endif + while (h != NULL) { + duk__debug_dump_heaphdr(thr, heap, (duk_heaphdr *) h); + h = h->hdr.h_next; + } + } +} + +DUK_LOCAL void duk__debug_handle_dump_heap(duk_hthread *thr, duk_heap *heap) { + DUK_D(DUK_DPRINT("debug command DumpHeap")); + + duk_debug_write_reply(thr); + duk__debug_dump_heap_allocated(thr, heap); + duk__debug_dump_strtab(thr, heap); + duk_debug_write_eom(thr); +} +#endif /* DUK_USE_DEBUGGER_DUMPHEAP */ + +DUK_LOCAL void duk__debug_handle_get_bytecode(duk_hthread *thr, duk_heap *heap) { + duk_activation *act; + duk_hcompfunc *fun = NULL; + duk_size_t i, n; + duk_tval *tv; + duk_hobject **fn; + duk_int32_t level = -1; + duk_uint8_t ibyte; + + DUK_UNREF(heap); + + DUK_D(DUK_DPRINT("debug command GetBytecode")); + + ibyte = duk_debug_peek_byte(thr); + if (ibyte != DUK_DBG_IB_EOM) { + tv = duk_debug_read_tval(thr); + if (tv == NULL) { + /* detached */ + return; + } + if (DUK_TVAL_IS_OBJECT(tv)) { + /* tentative, checked later */ + fun = (duk_hcompfunc *) DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(fun != NULL); + } else if (DUK_TVAL_IS_NUMBER(tv)) { + level = (duk_int32_t) DUK_TVAL_GET_NUMBER(tv); + } else { + DUK_D(DUK_DPRINT("invalid argument to GetBytecode: %!T", tv)); + goto fail_args; + } + } + + if (fun == NULL) { + act = duk_hthread_get_activation_for_level(thr, level); + if (act == NULL) { + goto fail_index; + } + fun = (duk_hcompfunc *) DUK_ACT_GET_FUNC(act); + } + + if (fun == NULL || !DUK_HOBJECT_IS_COMPFUNC((duk_hobject *) fun)) { + DUK_D(DUK_DPRINT("invalid argument to GetBytecode: %!O", fun)); + goto fail_args; + } + DUK_ASSERT(fun != NULL && DUK_HOBJECT_IS_COMPFUNC((duk_hobject *) fun)); + + duk_debug_write_reply(thr); + n = DUK_HCOMPFUNC_GET_CONSTS_COUNT(heap, fun); + duk_debug_write_int(thr, (duk_int32_t) n); + tv = DUK_HCOMPFUNC_GET_CONSTS_BASE(heap, fun); + for (i = 0; i < n; i++) { + duk_debug_write_tval(thr, tv); + tv++; + } + n = DUK_HCOMPFUNC_GET_FUNCS_COUNT(heap, fun); + duk_debug_write_int(thr, (duk_int32_t) n); + fn = DUK_HCOMPFUNC_GET_FUNCS_BASE(heap, fun); + for (i = 0; i < n; i++) { + duk_debug_write_hobject(thr, *fn); + fn++; + } + duk_debug_write_string(thr, + (const char *) DUK_HCOMPFUNC_GET_CODE_BASE(heap, fun), + (duk_size_t) DUK_HCOMPFUNC_GET_CODE_SIZE(heap, fun)); + duk_debug_write_eom(thr); + return; + +fail_args: + duk_debug_write_error_eom(thr, DUK_DBG_ERR_UNKNOWN, "invalid argument"); + return; + +fail_index: + duk_debug_write_error_eom(thr, DUK_DBG_ERR_NOTFOUND, "invalid callstack index"); + return; +} + +/* + * Object inspection commands: GetHeapObjInfo, GetObjPropDesc, + * GetObjPropDescRange + */ + +#if defined(DUK_USE_DEBUGGER_INSPECT) + +#if 0 /* pruned */ +DUK_LOCAL const char * const duk__debug_getinfo_heaphdr_keys[] = { + "reachable", + "temproot", + "finalizable", + "finalized", + "readonly" + /* NULL not needed here */ +}; +DUK_LOCAL duk_uint_t duk__debug_getinfo_heaphdr_masks[] = { + DUK_HEAPHDR_FLAG_REACHABLE, + DUK_HEAPHDR_FLAG_TEMPROOT, + DUK_HEAPHDR_FLAG_FINALIZABLE, + DUK_HEAPHDR_FLAG_FINALIZED, + DUK_HEAPHDR_FLAG_READONLY, + 0 /* terminator */ +}; +#endif +DUK_LOCAL const char * const duk__debug_getinfo_hstring_keys[] = { +#if 0 + "arridx", + "symbol", + "hidden", + "reserved_word", + "strict_reserved_word", + "eval_or_arguments", +#endif + "extdata" + /* NULL not needed here */ +}; +DUK_LOCAL duk_uint_t duk__debug_getinfo_hstring_masks[] = { +#if 0 + DUK_HSTRING_FLAG_ARRIDX, + DUK_HSTRING_FLAG_SYMBOL, + DUK_HSTRING_FLAG_HIDDEN, + DUK_HSTRING_FLAG_RESERVED_WORD, + DUK_HSTRING_FLAG_STRICT_RESERVED_WORD, + DUK_HSTRING_FLAG_EVAL_OR_ARGUMENTS, +#endif + DUK_HSTRING_FLAG_EXTDATA, + 0 /* terminator */ +}; +DUK_LOCAL const char * const duk__debug_getinfo_hobject_keys[] = { + "extensible", "constructable", "callable", "boundfunc", "compfunc", "natfunc", "bufobj", + "fastrefs", "array_part", "strict", "notail", "newenv", "namebinding", "createargs", + "have_finalizer", "exotic_array", "exotic_stringobj", "exotic_arguments", "exotic_proxyobj", "special_call" + /* NULL not needed here */ +}; +DUK_LOCAL duk_uint_t duk__debug_getinfo_hobject_masks[] = { + DUK_HOBJECT_FLAG_EXTENSIBLE, DUK_HOBJECT_FLAG_CONSTRUCTABLE, DUK_HOBJECT_FLAG_CALLABLE, + DUK_HOBJECT_FLAG_BOUNDFUNC, DUK_HOBJECT_FLAG_COMPFUNC, DUK_HOBJECT_FLAG_NATFUNC, + DUK_HOBJECT_FLAG_BUFOBJ, DUK_HOBJECT_FLAG_FASTREFS, DUK_HOBJECT_FLAG_ARRAY_PART, + DUK_HOBJECT_FLAG_STRICT, DUK_HOBJECT_FLAG_NOTAIL, DUK_HOBJECT_FLAG_NEWENV, + DUK_HOBJECT_FLAG_NAMEBINDING, DUK_HOBJECT_FLAG_CREATEARGS, DUK_HOBJECT_FLAG_HAVE_FINALIZER, + DUK_HOBJECT_FLAG_EXOTIC_ARRAY, DUK_HOBJECT_FLAG_EXOTIC_STRINGOBJ, DUK_HOBJECT_FLAG_EXOTIC_ARGUMENTS, + DUK_HOBJECT_FLAG_EXOTIC_PROXYOBJ, DUK_HOBJECT_FLAG_SPECIAL_CALL, 0 /* terminator */ +}; +DUK_LOCAL const char * const duk__debug_getinfo_hbuffer_keys[] = { + "dynamic", + "external" + /* NULL not needed here */ +}; +DUK_LOCAL duk_uint_t duk__debug_getinfo_hbuffer_masks[] = { + DUK_HBUFFER_FLAG_DYNAMIC, + DUK_HBUFFER_FLAG_EXTERNAL, + 0 /* terminator */ +}; + +DUK_LOCAL void duk__debug_getinfo_flags_key(duk_hthread *thr, const char *key) { + duk_debug_write_uint(thr, 0); + duk_debug_write_cstring(thr, key); +} + +DUK_LOCAL void duk__debug_getinfo_prop_uint(duk_hthread *thr, const char *key, duk_uint_t val) { + duk_debug_write_uint(thr, 0); + duk_debug_write_cstring(thr, key); + duk_debug_write_uint(thr, val); +} + +DUK_LOCAL void duk__debug_getinfo_prop_int(duk_hthread *thr, const char *key, duk_int_t val) { + duk_debug_write_uint(thr, 0); + duk_debug_write_cstring(thr, key); + duk_debug_write_int(thr, val); +} + +DUK_LOCAL void duk__debug_getinfo_prop_bool(duk_hthread *thr, const char *key, duk_bool_t val) { + duk_debug_write_uint(thr, 0); + duk_debug_write_cstring(thr, key); + duk_debug_write_boolean(thr, val); +} + +DUK_LOCAL void duk__debug_getinfo_bitmask(duk_hthread *thr, const char * const *keys, duk_uint_t *masks, duk_uint_t flags) { + const char *key; + duk_uint_t mask; + + for (;;) { + mask = *masks++; + if (mask == 0) { + break; + } + key = *keys++; + DUK_ASSERT(key != NULL); + + DUK_DD(DUK_DDPRINT("inspect bitmask: key=%s, mask=0x%08lx, flags=0x%08lx", + key, + (unsigned long) mask, + (unsigned long) flags)); + duk__debug_getinfo_prop_bool(thr, key, flags & mask); + } +} + +/* Inspect a property using a virtual index into a conceptual property list + * consisting of (1) all array part items from [0,a_size[ (even when above + * .length) and (2) all entry part items from [0,e_next[. Unused slots are + * indicated using dvalue 'unused'. + */ +DUK_LOCAL duk_bool_t duk__debug_getprop_index(duk_hthread *thr, duk_heap *heap, duk_hobject *h_obj, duk_uint_t idx) { + duk_uint_t a_size; + duk_tval *tv; + duk_hstring *h_key; + duk_hobject *h_getset; + duk_uint_t flags; + + DUK_UNREF(heap); + + a_size = DUK_HOBJECT_GET_ASIZE(h_obj); + if (idx < a_size) { + duk_debug_write_uint(thr, DUK_PROPDESC_FLAGS_WEC); + duk_debug_write_uint(thr, idx); + tv = DUK_HOBJECT_A_GET_VALUE_PTR(heap, h_obj, idx); + duk_debug_write_tval(thr, tv); + return 1; + } + + idx -= a_size; + if (idx >= DUK_HOBJECT_GET_ENEXT(h_obj)) { + return 0; + } + + h_key = DUK_HOBJECT_E_GET_KEY(heap, h_obj, idx); + if (h_key == NULL) { + duk_debug_write_uint(thr, 0); + duk_debug_write_null(thr); + duk_debug_write_unused(thr); + return 1; + } + + flags = DUK_HOBJECT_E_GET_FLAGS(heap, h_obj, idx); + if (DUK_HSTRING_HAS_SYMBOL(h_key)) { + flags |= DUK_DBG_PROPFLAG_SYMBOL; + } + if (DUK_HSTRING_HAS_HIDDEN(h_key)) { + flags |= DUK_DBG_PROPFLAG_HIDDEN; + } + duk_debug_write_uint(thr, flags); + duk_debug_write_hstring(thr, h_key); + if (flags & DUK_PROPDESC_FLAG_ACCESSOR) { + h_getset = DUK_HOBJECT_E_GET_VALUE_GETTER(heap, h_obj, idx); + if (h_getset) { + duk_debug_write_hobject(thr, h_getset); + } else { + duk_debug_write_null(thr); + } + h_getset = DUK_HOBJECT_E_GET_VALUE_SETTER(heap, h_obj, idx); + if (h_getset) { + duk_debug_write_hobject(thr, h_getset); + } else { + duk_debug_write_null(thr); + } + } else { + tv = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(heap, h_obj, idx); + duk_debug_write_tval(thr, tv); + } + return 1; +} + +DUK_LOCAL void duk__debug_handle_get_heap_obj_info(duk_hthread *thr, duk_heap *heap) { + duk_heaphdr *h; + + DUK_D(DUK_DPRINT("debug command GetHeapObjInfo")); + DUK_UNREF(heap); + + DUK_ASSERT(sizeof(duk__debug_getinfo_hstring_keys) / sizeof(const char *) == + sizeof(duk__debug_getinfo_hstring_masks) / sizeof(duk_uint_t) - 1); + DUK_ASSERT(sizeof(duk__debug_getinfo_hobject_keys) / sizeof(const char *) == + sizeof(duk__debug_getinfo_hobject_masks) / sizeof(duk_uint_t) - 1); + DUK_ASSERT(sizeof(duk__debug_getinfo_hbuffer_keys) / sizeof(const char *) == + sizeof(duk__debug_getinfo_hbuffer_masks) / sizeof(duk_uint_t) - 1); + + h = duk_debug_read_any_ptr(thr); + if (!h) { + duk_debug_write_error_eom(thr, DUK_DBG_ERR_UNKNOWN, "invalid target"); + return; + } + + duk_debug_write_reply(thr); + + /* As with all inspection code, we rely on the debug client providing + * a valid, non-stale pointer: there's no portable way to safely + * validate the pointer here. + */ + + duk__debug_getinfo_flags_key(thr, "heapptr"); + duk_debug_write_heapptr(thr, h); + + /* XXX: comes out as signed now */ + duk__debug_getinfo_prop_uint(thr, "heaphdr_flags", (duk_uint_t) DUK_HEAPHDR_GET_FLAGS(h)); + duk__debug_getinfo_prop_uint(thr, "heaphdr_type", (duk_uint_t) DUK_HEAPHDR_GET_TYPE(h)); +#if defined(DUK_USE_REFERENCE_COUNTING) + duk__debug_getinfo_prop_uint(thr, "refcount", (duk_uint_t) DUK_HEAPHDR_GET_REFCOUNT(h)); +#endif +#if 0 /* pruned */ + duk__debug_getinfo_bitmask(thr, + duk__debug_getinfo_heaphdr_keys, + duk__debug_getinfo_heaphdr_masks, + DUK_HEAPHDR_GET_FLAGS_RAW(h)); +#endif + + switch (DUK_HEAPHDR_GET_TYPE(h)) { + case DUK_HTYPE_STRING: { + duk_hstring *h_str; + + h_str = (duk_hstring *) h; + duk__debug_getinfo_bitmask(thr, + duk__debug_getinfo_hstring_keys, + duk__debug_getinfo_hstring_masks, + DUK_HEAPHDR_GET_FLAGS_RAW(h)); + duk__debug_getinfo_prop_uint(thr, "bytelen", (duk_uint_t) DUK_HSTRING_GET_BYTELEN(h_str)); + duk__debug_getinfo_prop_uint(thr, "charlen", (duk_uint_t) DUK_HSTRING_GET_CHARLEN(h_str)); + duk__debug_getinfo_prop_uint(thr, "hash", (duk_uint_t) DUK_HSTRING_GET_HASH(h_str)); + duk__debug_getinfo_flags_key(thr, "data"); + duk_debug_write_hstring(thr, h_str); + break; + } + case DUK_HTYPE_OBJECT: { + duk_hobject *h_obj; + duk_hobject *h_proto; + + h_obj = (duk_hobject *) h; + h_proto = DUK_HOBJECT_GET_PROTOTYPE(heap, h_obj); + + /* duk_hobject specific fields. */ + duk__debug_getinfo_bitmask(thr, + duk__debug_getinfo_hobject_keys, + duk__debug_getinfo_hobject_masks, + DUK_HEAPHDR_GET_FLAGS_RAW(h)); + duk__debug_getinfo_prop_uint(thr, "class_number", DUK_HOBJECT_GET_CLASS_NUMBER(h_obj)); + duk__debug_getinfo_flags_key(thr, "class_name"); + duk_debug_write_hstring(thr, DUK_HOBJECT_GET_CLASS_STRING(heap, h_obj)); + duk__debug_getinfo_flags_key(thr, "prototype"); + if (h_proto != NULL) { + duk_debug_write_hobject(thr, h_proto); + } else { + duk_debug_write_null(thr); + } + duk__debug_getinfo_flags_key(thr, "props"); + duk_debug_write_pointer(thr, (void *) DUK_HOBJECT_GET_PROPS(heap, h_obj)); + duk__debug_getinfo_prop_uint(thr, "e_size", (duk_uint_t) DUK_HOBJECT_GET_ESIZE(h_obj)); + duk__debug_getinfo_prop_uint(thr, "e_next", (duk_uint_t) DUK_HOBJECT_GET_ENEXT(h_obj)); + duk__debug_getinfo_prop_uint(thr, "a_size", (duk_uint_t) DUK_HOBJECT_GET_ASIZE(h_obj)); + duk__debug_getinfo_prop_uint(thr, "h_size", (duk_uint_t) DUK_HOBJECT_GET_HSIZE(h_obj)); + + if (DUK_HOBJECT_IS_ARRAY(h_obj)) { + duk_harray *h_arr; + h_arr = (duk_harray *) h_obj; + + duk__debug_getinfo_prop_uint(thr, "length", (duk_uint_t) h_arr->length); + duk__debug_getinfo_prop_bool(thr, "length_nonwritable", h_arr->length_nonwritable); + } + + if (DUK_HOBJECT_IS_NATFUNC(h_obj)) { + duk_hnatfunc *h_fun; + h_fun = (duk_hnatfunc *) h_obj; + + duk__debug_getinfo_prop_int(thr, "nargs", h_fun->nargs); + duk__debug_getinfo_prop_int(thr, "magic", h_fun->magic); + duk__debug_getinfo_prop_bool(thr, "varargs", h_fun->magic == DUK_HNATFUNC_NARGS_VARARGS); + /* Native function pointer may be different from a void pointer, + * and we serialize it from memory directly now (no byte swapping etc). + */ + duk__debug_getinfo_flags_key(thr, "funcptr"); + duk_debug_write_buffer(thr, (const char *) &h_fun->func, sizeof(h_fun->func)); + } + + if (DUK_HOBJECT_IS_COMPFUNC(h_obj)) { + duk_hcompfunc *h_fun; + duk_hbuffer *h_buf; + duk_hobject *h_lexenv; + duk_hobject *h_varenv; + h_fun = (duk_hcompfunc *) h_obj; + + duk__debug_getinfo_prop_int(thr, "nregs", h_fun->nregs); + duk__debug_getinfo_prop_int(thr, "nargs", h_fun->nargs); + + duk__debug_getinfo_flags_key(thr, "lex_env"); + h_lexenv = DUK_HCOMPFUNC_GET_LEXENV(thr->heap, h_fun); + if (h_lexenv != NULL) { + duk_debug_write_hobject(thr, h_lexenv); + } else { + duk_debug_write_null(thr); + } + duk__debug_getinfo_flags_key(thr, "var_env"); + h_varenv = DUK_HCOMPFUNC_GET_VARENV(thr->heap, h_fun); + if (h_varenv != NULL) { + duk_debug_write_hobject(thr, h_varenv); + } else { + duk_debug_write_null(thr); + } + + duk__debug_getinfo_prop_uint(thr, "start_line", h_fun->start_line); + duk__debug_getinfo_prop_uint(thr, "end_line", h_fun->end_line); + h_buf = (duk_hbuffer *) DUK_HCOMPFUNC_GET_DATA(thr->heap, h_fun); + if (h_buf != NULL) { + duk__debug_getinfo_flags_key(thr, "data"); + duk_debug_write_heapptr(thr, (duk_heaphdr *) h_buf); + } + } + + if (DUK_HOBJECT_IS_BOUNDFUNC(h_obj)) { + duk_hboundfunc *h_bfun; + h_bfun = (duk_hboundfunc *) (void *) h_obj; + + duk__debug_getinfo_flags_key(thr, "target"); + duk_debug_write_tval(thr, &h_bfun->target); + duk__debug_getinfo_flags_key(thr, "this_binding"); + duk_debug_write_tval(thr, &h_bfun->this_binding); + duk__debug_getinfo_flags_key(thr, "nargs"); + duk_debug_write_int(thr, h_bfun->nargs); + /* h_bfun->args not exposed now */ + } + + if (DUK_HOBJECT_IS_THREAD(h_obj)) { + /* XXX: Currently no inspection of threads, e.g. value stack, call + * stack, catch stack, etc. + */ + duk_hthread *h_thr; + h_thr = (duk_hthread *) h_obj; + DUK_UNREF(h_thr); + } + + if (DUK_HOBJECT_IS_DECENV(h_obj)) { + duk_hdecenv *h_env; + h_env = (duk_hdecenv *) h_obj; + + duk__debug_getinfo_flags_key(thr, "thread"); + duk_debug_write_heapptr(thr, (duk_heaphdr *) (h_env->thread)); + duk__debug_getinfo_flags_key(thr, "varmap"); + duk_debug_write_heapptr(thr, (duk_heaphdr *) (h_env->varmap)); + duk__debug_getinfo_prop_uint(thr, "regbase", (duk_uint_t) h_env->regbase_byteoff); + } + + if (DUK_HOBJECT_IS_OBJENV(h_obj)) { + duk_hobjenv *h_env; + h_env = (duk_hobjenv *) h_obj; + + duk__debug_getinfo_flags_key(thr, "target"); + duk_debug_write_heapptr(thr, (duk_heaphdr *) (h_env->target)); + duk__debug_getinfo_prop_bool(thr, "has_this", h_env->has_this); + } + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + if (DUK_HOBJECT_IS_BUFOBJ(h_obj)) { + duk_hbufobj *h_bufobj; + h_bufobj = (duk_hbufobj *) h_obj; + + duk__debug_getinfo_prop_uint(thr, "slice_offset", h_bufobj->offset); + duk__debug_getinfo_prop_uint(thr, "slice_length", h_bufobj->length); + duk__debug_getinfo_prop_uint(thr, "elem_shift", (duk_uint_t) h_bufobj->shift); + duk__debug_getinfo_prop_uint(thr, "elem_type", (duk_uint_t) h_bufobj->elem_type); + duk__debug_getinfo_prop_bool(thr, "is_typedarray", (duk_uint_t) h_bufobj->is_typedarray); + if (h_bufobj->buf != NULL) { + duk__debug_getinfo_flags_key(thr, "buffer"); + duk_debug_write_heapptr(thr, (duk_heaphdr *) h_bufobj->buf); + } + } +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + break; + } + case DUK_HTYPE_BUFFER: { + duk_hbuffer *h_buf; + + h_buf = (duk_hbuffer *) h; + duk__debug_getinfo_bitmask(thr, + duk__debug_getinfo_hbuffer_keys, + duk__debug_getinfo_hbuffer_masks, + DUK_HEAPHDR_GET_FLAGS_RAW(h)); + duk__debug_getinfo_prop_uint(thr, "size", (duk_uint_t) DUK_HBUFFER_GET_SIZE(h_buf)); + duk__debug_getinfo_flags_key(thr, "dataptr"); + duk_debug_write_pointer(thr, (void *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h_buf)); + duk__debug_getinfo_flags_key(thr, "data"); + duk_debug_write_hbuffer(thr, h_buf); /* tolerates NULL h_buf */ + break; + } + default: { + /* Since we already started writing the reply, just emit nothing. */ + DUK_D(DUK_DPRINT("inspect target pointer has invalid heaphdr type")); + } + } + + duk_debug_write_eom(thr); +} + +DUK_LOCAL void duk__debug_handle_get_obj_prop_desc(duk_hthread *thr, duk_heap *heap) { + duk_heaphdr *h; + duk_hobject *h_obj; + duk_hstring *h_key; + duk_propdesc desc; + + DUK_D(DUK_DPRINT("debug command GetObjPropDesc")); + DUK_UNREF(heap); + + h = duk_debug_read_any_ptr(thr); + if (!h) { + duk_debug_write_error_eom(thr, DUK_DBG_ERR_UNKNOWN, "invalid target"); + return; + } + h_key = duk_debug_read_hstring(thr); + if (h == NULL || DUK_HEAPHDR_GET_TYPE(h) != DUK_HTYPE_OBJECT || h_key == NULL) { + goto fail_args; + } + h_obj = (duk_hobject *) h; + + if (duk_hobject_get_own_propdesc(thr, h_obj, h_key, &desc, 0 /*flags*/)) { + duk_int_t virtual_idx; + duk_bool_t rc; + + /* To use the shared helper need the virtual index. */ + DUK_ASSERT(desc.e_idx >= 0 || desc.a_idx >= 0); + virtual_idx = (desc.a_idx >= 0 ? desc.a_idx : (duk_int_t) DUK_HOBJECT_GET_ASIZE(h_obj) + desc.e_idx); + + duk_debug_write_reply(thr); + rc = duk__debug_getprop_index(thr, heap, h_obj, (duk_uint_t) virtual_idx); + DUK_ASSERT(rc == 1); + DUK_UNREF(rc); + duk_debug_write_eom(thr); + } else { + duk_debug_write_error_eom(thr, DUK_DBG_ERR_NOTFOUND, "not found"); + } + return; + +fail_args: + duk_debug_write_error_eom(thr, DUK_DBG_ERR_UNKNOWN, "invalid args"); +} + +DUK_LOCAL void duk__debug_handle_get_obj_prop_desc_range(duk_hthread *thr, duk_heap *heap) { + duk_heaphdr *h; + duk_hobject *h_obj; + duk_uint_t idx, idx_start, idx_end; + + DUK_D(DUK_DPRINT("debug command GetObjPropDescRange")); + DUK_UNREF(heap); + + h = duk_debug_read_any_ptr(thr); + idx_start = (duk_uint_t) duk_debug_read_int(thr); + idx_end = (duk_uint_t) duk_debug_read_int(thr); + if (h == NULL || DUK_HEAPHDR_GET_TYPE(h) != DUK_HTYPE_OBJECT) { + goto fail_args; + } + h_obj = (duk_hobject *) h; + + /* The index range space is conceptually the array part followed by the + * entry part. Unlike normal enumeration all slots are exposed here as + * is and return 'unused' if the slots are not in active use. In particular + * the array part is included for the full a_size regardless of what the + * array .length is. + */ + + duk_debug_write_reply(thr); + for (idx = idx_start; idx < idx_end; idx++) { + if (!duk__debug_getprop_index(thr, heap, h_obj, idx)) { + break; + } + } + duk_debug_write_eom(thr); + return; + +fail_args: + duk_debug_write_error_eom(thr, DUK_DBG_ERR_UNKNOWN, "invalid args"); +} + +#endif /* DUK_USE_DEBUGGER_INSPECT */ + +/* + * Process incoming debug requests + * + * Individual request handlers can push temporaries on the value stack and + * rely on duk__debug_process_message() to restore the value stack top + * automatically. + */ + +/* Process one debug message. Automatically restore value stack top to its + * entry value, so that individual message handlers don't need exact value + * stack handling which is convenient. + */ +DUK_LOCAL void duk__debug_process_message(duk_hthread *thr) { + duk_heap *heap; + duk_uint8_t x; + duk_int32_t cmd; + duk_idx_t entry_top; + + DUK_ASSERT(thr != NULL); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + + entry_top = duk_get_top(thr); + + x = duk_debug_read_byte(thr); + switch (x) { + case DUK_DBG_IB_REQUEST: { + cmd = duk_debug_read_int(thr); + switch (cmd) { + case DUK_DBG_CMD_BASICINFO: { + duk__debug_handle_basic_info(thr, heap); + break; + } + case DUK_DBG_CMD_TRIGGERSTATUS: { + duk__debug_handle_trigger_status(thr, heap); + break; + } + case DUK_DBG_CMD_PAUSE: { + duk__debug_handle_pause(thr, heap); + break; + } + case DUK_DBG_CMD_RESUME: { + duk__debug_handle_resume(thr, heap); + break; + } + case DUK_DBG_CMD_STEPINTO: + case DUK_DBG_CMD_STEPOVER: + case DUK_DBG_CMD_STEPOUT: { + duk__debug_handle_step(thr, heap, cmd); + break; + } + case DUK_DBG_CMD_LISTBREAK: { + duk__debug_handle_list_break(thr, heap); + break; + } + case DUK_DBG_CMD_ADDBREAK: { + duk__debug_handle_add_break(thr, heap); + break; + } + case DUK_DBG_CMD_DELBREAK: { + duk__debug_handle_del_break(thr, heap); + break; + } + case DUK_DBG_CMD_GETVAR: { + duk__debug_handle_get_var(thr, heap); + break; + } + case DUK_DBG_CMD_PUTVAR: { + duk__debug_handle_put_var(thr, heap); + break; + } + case DUK_DBG_CMD_GETCALLSTACK: { + duk__debug_handle_get_call_stack(thr, heap); + break; + } + case DUK_DBG_CMD_GETLOCALS: { + duk__debug_handle_get_locals(thr, heap); + break; + } + case DUK_DBG_CMD_EVAL: { + duk__debug_handle_eval(thr, heap); + break; + } + case DUK_DBG_CMD_DETACH: { + /* The actual detached_cb call is postponed to message loop so + * we don't need any special precautions here (just skip to EOM + * on the already closed connection). + */ + duk__debug_handle_detach(thr, heap); + break; + } +#if defined(DUK_USE_DEBUGGER_DUMPHEAP) + case DUK_DBG_CMD_DUMPHEAP: { + duk__debug_handle_dump_heap(thr, heap); + break; + } +#endif /* DUK_USE_DEBUGGER_DUMPHEAP */ + case DUK_DBG_CMD_GETBYTECODE: { + duk__debug_handle_get_bytecode(thr, heap); + break; + } + case DUK_DBG_CMD_APPREQUEST: { + duk__debug_handle_apprequest(thr, heap); + break; + } +#if defined(DUK_USE_DEBUGGER_INSPECT) + case DUK_DBG_CMD_GETHEAPOBJINFO: { + duk__debug_handle_get_heap_obj_info(thr, heap); + break; + } + case DUK_DBG_CMD_GETOBJPROPDESC: { + duk__debug_handle_get_obj_prop_desc(thr, heap); + break; + } + case DUK_DBG_CMD_GETOBJPROPDESCRANGE: { + duk__debug_handle_get_obj_prop_desc_range(thr, heap); + break; + } +#endif /* DUK_USE_DEBUGGER_INSPECT */ + default: { + DUK_D(DUK_DPRINT("debug command unsupported: %d", (int) cmd)); + duk_debug_write_error_eom(thr, DUK_DBG_ERR_UNSUPPORTED, "unsupported command"); + } + } /* switch cmd */ + break; + } + case DUK_DBG_IB_REPLY: { + DUK_D(DUK_DPRINT("debug reply, skipping")); + break; + } + case DUK_DBG_IB_ERROR: { + DUK_D(DUK_DPRINT("debug error, skipping")); + break; + } + case DUK_DBG_IB_NOTIFY: { + DUK_D(DUK_DPRINT("debug notify, skipping")); + break; + } + default: { + DUK_D(DUK_DPRINT("invalid initial byte, drop connection: %d", (int) x)); + goto fail; + } + } /* switch initial byte */ + + DUK_ASSERT(duk_get_top(thr) >= entry_top); + duk_set_top(thr, entry_top); + duk__debug_skip_to_eom(thr); + return; + +fail: + DUK_ASSERT(duk_get_top(thr) >= entry_top); + duk_set_top(thr, entry_top); + DUK__SET_CONN_BROKEN(thr, 1); + return; +} + +DUK_LOCAL void duk__check_resend_status(duk_hthread *thr) { + if (thr->heap->dbg_read_cb != NULL && thr->heap->dbg_state_dirty) { + duk_debug_send_status(thr); + thr->heap->dbg_state_dirty = 0; + } +} + +DUK_INTERNAL duk_bool_t duk_debug_process_messages(duk_hthread *thr, duk_bool_t no_block) { +#if defined(DUK_USE_ASSERTIONS) + duk_idx_t entry_top; +#endif + duk_bool_t retval = 0; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); +#if defined(DUK_USE_ASSERTIONS) + entry_top = duk_get_top(thr); +#endif + + DUK_D(DUK_DPRINT("process debug messages: read_cb=%s, no_block=%ld, detaching=%ld, processing=%ld", + thr->heap->dbg_read_cb ? "not NULL" : "NULL", + (long) no_block, + (long) thr->heap->dbg_detaching, + (long) thr->heap->dbg_processing)); + DUK_DD(DUK_DDPRINT("top at entry: %ld", (long) duk_get_top(thr))); + + /* thr->heap->dbg_detaching may be != 0 if a debugger write outside + * the message loop caused a transport error and detach1() to run. + */ + DUK_ASSERT(thr->heap->dbg_detaching == 0 || thr->heap->dbg_detaching == 1); + DUK_ASSERT(thr->heap->dbg_processing == 0); + thr->heap->dbg_processing = 1; + + /* Ensure dirty state causes a Status even if never process any + * messages. This is expected by the bytecode executor when in + * the running state. + */ + duk__check_resend_status(thr); + + for (;;) { + /* Process messages until we're no longer paused or we peek + * and see there's nothing to read right now. + */ + DUK_DD(DUK_DDPRINT("top at loop top: %ld", (long) duk_get_top(thr))); + DUK_ASSERT(thr->heap->dbg_processing == 1); + + while (thr->heap->dbg_read_cb == NULL && thr->heap->dbg_detaching) { + /* Detach is pending; can be triggered from outside the + * debugger loop (e.g. Status notify write error) or by + * previous message handling. Call detached callback + * here, in a controlled state, to ensure a possible + * reattach inside the detached_cb is handled correctly. + * + * Recheck for detach in a while loop: an immediate + * reattach involves a call to duk_debugger_attach() + * which writes a debugger handshake line immediately + * inside the API call. If the transport write fails + * for that handshake, we can immediately end up in a + * "transport broken, detaching" case several times here. + * Loop back until we're either cleanly attached or + * fully detached. + * + * NOTE: Reset dbg_processing = 1 forcibly, in case we + * re-attached; duk_debugger_attach() sets dbg_processing + * to 0 at the moment. + */ + + DUK_D(DUK_DPRINT("detach pending (dbg_read_cb == NULL, dbg_detaching != 0), call detach2")); + + duk__debug_do_detach2(thr->heap); + thr->heap->dbg_processing = 1; /* may be set to 0 by duk_debugger_attach() inside callback */ + + DUK_D(DUK_DPRINT("after detach2 (and possible reattach): dbg_read_cb=%s, dbg_detaching=%ld", + thr->heap->dbg_read_cb ? "not NULL" : "NULL", + (long) thr->heap->dbg_detaching)); + } + DUK_ASSERT(thr->heap->dbg_detaching == 0); /* true even with reattach */ + DUK_ASSERT(thr->heap->dbg_processing == 1); /* even after a detach and possible reattach */ + + if (thr->heap->dbg_read_cb == NULL) { + DUK_D(DUK_DPRINT("debug connection broken (and not detaching), stop processing messages")); + break; + } + + if (!DUK_HEAP_HAS_DEBUGGER_PAUSED(thr->heap) || no_block) { + if (!duk_debug_read_peek(thr)) { + /* Note: peek cannot currently trigger a detach + * so the dbg_detaching == 0 assert outside the + * loop is correct. + */ + DUK_D(DUK_DPRINT("processing debug message, peek indicated no data, stop processing messages")); + break; + } + DUK_D(DUK_DPRINT("processing debug message, peek indicated there is data, handle it")); + } else { + DUK_D(DUK_DPRINT("paused, process debug message, blocking if necessary")); + } + + duk__check_resend_status(thr); + duk__debug_process_message(thr); + duk__check_resend_status(thr); + + retval = 1; /* processed one or more messages */ + } + + DUK_ASSERT(thr->heap->dbg_detaching == 0); + DUK_ASSERT(thr->heap->dbg_processing == 1); + thr->heap->dbg_processing = 0; + + /* As an initial implementation, read flush after exiting the message + * loop. If transport is broken, this is a no-op (with debug logs). + */ + duk_debug_read_flush(thr); /* this cannot initiate a detach */ + DUK_ASSERT(thr->heap->dbg_detaching == 0); + + DUK_DD(DUK_DDPRINT("top at exit: %ld", (long) duk_get_top(thr))); + +#if defined(DUK_USE_ASSERTIONS) + /* Easy to get wrong, so assert for it. */ + DUK_ASSERT(entry_top == duk_get_top(thr)); +#endif + + return retval; +} + +/* + * Halt execution helper + */ + +/* Halt execution and enter a debugger message loop until execution is resumed + * by the client. PC for the current activation may be temporarily decremented + * so that the "current" instruction will be shown by the client. This helper + * is callable from anywhere, also outside bytecode executor. + */ + +DUK_INTERNAL void duk_debug_halt_execution(duk_hthread *thr, duk_bool_t use_prev_pc) { + duk_activation *act; + duk_hcompfunc *fun; + duk_instr_t *old_pc = NULL; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(duk_debug_is_attached(thr->heap)); + DUK_ASSERT(thr->heap->dbg_processing == 0); + DUK_ASSERT(!duk_debug_is_paused(thr->heap)); + + duk_debug_set_paused(thr->heap); + + act = thr->callstack_curr; + + /* NOTE: act may be NULL if an error is thrown outside of any activation, + * which may happen in the case of, e.g. syntax errors. + */ + + /* Decrement PC if that was requested, this requires a PC sync. */ + if (act != NULL) { + duk_hthread_sync_currpc(thr); + old_pc = act->curr_pc; + fun = (duk_hcompfunc *) DUK_ACT_GET_FUNC(act); + + /* Short circuit if is safe: if act->curr_pc != NULL, 'fun' is + * guaranteed to be a non-NULL ECMAScript function. + */ + DUK_ASSERT(act->curr_pc == NULL || (fun != NULL && DUK_HOBJECT_IS_COMPFUNC((duk_hobject *) fun))); + if (use_prev_pc && act->curr_pc != NULL && act->curr_pc > DUK_HCOMPFUNC_GET_CODE_BASE(thr->heap, fun)) { + act->curr_pc--; + } + } + + /* Process debug messages until we are no longer paused. */ + + /* NOTE: This is a bit fragile. It's important to ensure that + * duk_debug_process_messages() never throws an error or + * act->curr_pc will never be reset. + */ + + thr->heap->dbg_state_dirty = 1; + while (DUK_HEAP_HAS_DEBUGGER_PAUSED(thr->heap)) { + DUK_ASSERT(duk_debug_is_attached(thr->heap)); + DUK_ASSERT(thr->heap->dbg_processing == 0); + duk_debug_process_messages(thr, 0 /*no_block*/); + } + + /* XXX: Decrementing and restoring act->curr_pc works now, but if the + * debugger message loop gains the ability to adjust the current PC + * (e.g. a forced jump) restoring the PC here will break. Another + * approach would be to use a state flag for the "decrement 1 from + * topmost activation's PC" and take it into account whenever dealing + * with PC values. + */ + if (act != NULL) { + act->curr_pc = old_pc; /* restore PC */ + } +} + +/* + * Breakpoint management + */ + +DUK_INTERNAL duk_small_int_t duk_debug_add_breakpoint(duk_hthread *thr, duk_hstring *filename, duk_uint32_t line) { + duk_heap *heap; + duk_breakpoint *b; + + /* Caller must trigger recomputation of active breakpoint list. To + * ensure stale values are not used if that doesn't happen, clear the + * active breakpoint list here. + */ + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(filename != NULL); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + + if (heap->dbg_breakpoint_count >= DUK_HEAP_MAX_BREAKPOINTS) { + DUK_D(DUK_DPRINT("failed to add breakpoint for %O:%ld, all breakpoint slots used", + (duk_heaphdr *) filename, + (long) line)); + return -1; + } + heap->dbg_breakpoints_active[0] = (duk_breakpoint *) NULL; + b = heap->dbg_breakpoints + (heap->dbg_breakpoint_count++); + b->filename = filename; + b->line = line; + DUK_HSTRING_INCREF(thr, filename); + + return (duk_small_int_t) (heap->dbg_breakpoint_count - 1); /* index */ +} + +DUK_INTERNAL duk_bool_t duk_debug_remove_breakpoint(duk_hthread *thr, duk_small_uint_t breakpoint_index) { + duk_heap *heap; + duk_hstring *h; + duk_breakpoint *b; + duk_size_t move_size; + + /* Caller must trigger recomputation of active breakpoint list. To + * ensure stale values are not used if that doesn't happen, clear the + * active breakpoint list here. + */ + + DUK_ASSERT(thr != NULL); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + DUK_ASSERT(duk_debug_is_attached(thr->heap)); + DUK_ASSERT_DISABLE(breakpoint_index >= 0); /* unsigned */ + + if (breakpoint_index >= heap->dbg_breakpoint_count) { + DUK_D(DUK_DPRINT("invalid breakpoint index: %ld", (long) breakpoint_index)); + return 0; + } + b = heap->dbg_breakpoints + breakpoint_index; + + h = b->filename; + DUK_ASSERT(h != NULL); + + move_size = sizeof(duk_breakpoint) * (heap->dbg_breakpoint_count - breakpoint_index - 1); + duk_memmove((void *) b, (const void *) (b + 1), (size_t) move_size); + + heap->dbg_breakpoint_count--; + heap->dbg_breakpoints_active[0] = (duk_breakpoint *) NULL; + + DUK_HSTRING_DECREF(thr, h); /* side effects */ + DUK_UNREF(h); /* w/o refcounting */ + + /* Breakpoint entries above the used area are left as garbage. */ + + return 1; +} + +/* + * Misc state management + */ + +DUK_INTERNAL duk_bool_t duk_debug_is_attached(duk_heap *heap) { + return (heap->dbg_read_cb != NULL); +} + +DUK_INTERNAL duk_bool_t duk_debug_is_paused(duk_heap *heap) { + return (DUK_HEAP_HAS_DEBUGGER_PAUSED(heap) != 0); +} + +DUK_INTERNAL void duk_debug_set_paused(duk_heap *heap) { + if (duk_debug_is_paused(heap)) { + DUK_D(DUK_DPRINT("trying to set paused state when already paused, ignoring")); + } else { + DUK_HEAP_SET_DEBUGGER_PAUSED(heap); + heap->dbg_state_dirty = 1; + duk_debug_clear_pause_state(heap); + DUK_ASSERT(heap->ms_running == 0); /* debugger can't be triggered within mark-and-sweep */ + heap->ms_running = 2; /* prevent mark-and-sweep, prevent refzero queueing */ + heap->ms_prevent_count++; + DUK_ASSERT(heap->ms_prevent_count != 0); /* Wrap. */ + DUK_ASSERT(heap->heap_thread != NULL); + } +} + +DUK_INTERNAL void duk_debug_clear_paused(duk_heap *heap) { + if (duk_debug_is_paused(heap)) { + DUK_HEAP_CLEAR_DEBUGGER_PAUSED(heap); + heap->dbg_state_dirty = 1; + duk_debug_clear_pause_state(heap); + DUK_ASSERT(heap->ms_running == 2); + DUK_ASSERT(heap->ms_prevent_count > 0); + heap->ms_prevent_count--; + heap->ms_running = 0; + DUK_ASSERT(heap->heap_thread != NULL); + } else { + DUK_D(DUK_DPRINT("trying to clear paused state when not paused, ignoring")); + } +} + +DUK_INTERNAL void duk_debug_clear_pause_state(duk_heap *heap) { + heap->dbg_pause_flags = 0; + heap->dbg_pause_act = NULL; + heap->dbg_pause_startline = 0; +} + +#else /* DUK_USE_DEBUGGER_SUPPORT */ + +/* No debugger support. */ + +#endif /* DUK_USE_DEBUGGER_SUPPORT */ + +/* automatic undefs */ +#undef DUK__DBG_TPORT_ENTER +#undef DUK__DBG_TPORT_EXIT +#undef DUK__SET_CONN_BROKEN +#line 1 "duk_error_augment.c" +/* + * Augmenting errors at their creation site and their throw site. + * + * When errors are created, traceback data is added by built-in code + * and a user error handler (if defined) can process or replace the + * error. Similarly, when errors are thrown, a user error handler + * (if defined) can process or replace the error. + * + * Augmentation and other processing at error creation time is nice + * because an error is only created once, but it may be thrown and + * rethrown multiple times. User error handler registered for processing + * an error at its throw site must be careful to handle rethrowing in + * a useful manner. + * + * Error augmentation may throw an internal error (e.g. alloc error). + * + * ECMAScript allows throwing any values, so all values cannot be + * augmented. Currently, the built-in augmentation at error creation + * only augments error values which are Error instances (= have the + * built-in Error.prototype in their prototype chain) and are also + * extensible. User error handlers have no limitations in this respect. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Helper for calling a user error handler. + * + * 'thr' must be the currently active thread; the error handler is called + * in its context. The valstack of 'thr' must have the error value on + * top, and will be replaced by another error value based on the return + * value of the error handler. + * + * The helper calls duk_handle_call() recursively in protected mode. + * Before that call happens, no longjmps should happen; as a consequence, + * we must assume that the valstack contains enough temporary space for + * arguments and such. + * + * While the error handler runs, any errors thrown will not trigger a + * recursive error handler call (this is implemented using a heap level + * flag which will "follow" through any coroutines resumed inside the + * error handler). If the error handler is not callable or throws an + * error, the resulting error replaces the original error (for Duktape + * internal errors, duk_error_throw.c further substitutes this error with + * a DoubleError which is not ideal). This would be easy to change and + * even signal to the caller. + * + * The user error handler is stored in 'Duktape.errCreate' or + * 'Duktape.errThrow' depending on whether we're augmenting the error at + * creation or throw time. There are several alternatives to this approach, + * see doc/error-objects.rst for discussion. + * + * Note: since further longjmp()s may occur while calling the error handler + * (for many reasons, e.g. a labeled 'break' inside the handler), the + * caller can make no assumptions on the thr->heap->lj state after the + * call (this affects especially duk_error_throw.c). This is not an issue + * as long as the caller writes to the lj state only after the error handler + * finishes. + */ + +#if defined(DUK_USE_ERRTHROW) || defined(DUK_USE_ERRCREATE) +DUK_LOCAL void duk__err_augment_user(duk_hthread *thr, duk_small_uint_t stridx_cb) { + duk_tval *tv_hnd; + duk_int_t rc; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT_STRIDX_VALID(stridx_cb); + + if (thr->heap->augmenting_error) { + DUK_D(DUK_DPRINT("recursive call to error augmentation, ignore")); + return; + } + + /* + * Check whether or not we have an error handler. + * + * We must be careful of not triggering an error when looking up the + * property. For instance, if the property is a getter, we don't want + * to call it, only plain values are allowed. The value, if it exists, + * is not checked. If the value is not a function, a TypeError happens + * when it is called and that error replaces the original one. + */ + + DUK_ASSERT_VALSTACK_SPACE(thr, 4); /* 3 entries actually needed below */ + + /* [ ... errval ] */ + + if (thr->builtins[DUK_BIDX_DUKTAPE] == NULL) { + /* When creating built-ins, some of the built-ins may not be set + * and we want to tolerate that when throwing errors. + */ + DUK_DD(DUK_DDPRINT("error occurred when DUK_BIDX_DUKTAPE is NULL, ignoring")); + return; + } + tv_hnd = duk_hobject_find_entry_tval_ptr_stridx(thr->heap, thr->builtins[DUK_BIDX_DUKTAPE], stridx_cb); + if (tv_hnd == NULL) { + DUK_DD(DUK_DDPRINT("error handler does not exist or is not a plain value: %!T", (duk_tval *) tv_hnd)); + return; + } + DUK_DDD(DUK_DDDPRINT("error handler dump (callability not checked): %!T", (duk_tval *) tv_hnd)); + duk_push_tval(thr, tv_hnd); + + /* [ ... errval errhandler ] */ + + duk_insert(thr, -2); /* -> [ ... errhandler errval ] */ + duk_push_undefined(thr); + duk_insert(thr, -2); /* -> [ ... errhandler undefined(= this) errval ] */ + + /* [ ... errhandler undefined errval ] */ + + /* + * heap->augmenting_error prevents recursive re-entry and also causes + * call handling to use a larger (but not unbounded) call stack limit + * for the duration of error augmentation. + * + * We ignore errors now: a success return and an error value both + * replace the original error value. (This would be easy to change.) + */ + + DUK_ASSERT(thr->heap->augmenting_error == 0); + thr->heap->augmenting_error = 1; + + rc = duk_pcall_method(thr, 1); + DUK_UNREF(rc); /* no need to check now: both success and error are OK */ + + DUK_ASSERT(thr->heap->augmenting_error == 1); + thr->heap->augmenting_error = 0; + + /* [ ... errval ] */ +} +#endif /* DUK_USE_ERRTHROW || DUK_USE_ERRCREATE */ + +/* + * Add ._Tracedata to an error on the stack top. + */ + +#if defined(DUK_USE_TRACEBACKS) +DUK_LOCAL void duk__add_traceback(duk_hthread *thr, + duk_hthread *thr_callstack, + const char *c_filename, + duk_int_t c_line, + duk_small_uint_t flags) { + duk_activation *act; + duk_int_t depth; + duk_int_t arr_size; + duk_tval *tv; + duk_hstring *s; + duk_uint32_t u32; + duk_double_t d; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr_callstack != NULL); + + /* [ ... error ] */ + + /* + * The traceback format is pretty arcane in an attempt to keep it compact + * and cheap to create. It may change arbitrarily from version to version. + * It should be decoded/accessed through version specific accessors only. + * + * See doc/error-objects.rst. + */ + + DUK_DDD(DUK_DDDPRINT("adding traceback to object: %!T", (duk_tval *) duk_get_tval(thr, -1))); + + /* Preallocate array to correct size, so that we can just write out + * the _Tracedata values into the array part. + */ + act = thr->callstack_curr; + depth = DUK_USE_TRACEBACK_DEPTH; + DUK_ASSERT(thr_callstack->callstack_top <= DUK_INT_MAX); /* callstack limits */ + if (depth > (duk_int_t) thr_callstack->callstack_top) { + depth = (duk_int_t) thr_callstack->callstack_top; + } + if (depth > 0) { + if (flags & DUK_AUGMENT_FLAG_SKIP_ONE) { + DUK_ASSERT(act != NULL); + act = act->parent; + depth--; + } + } + arr_size = depth * 2; + if (thr->compile_ctx != NULL && thr->compile_ctx->h_filename != NULL) { + arr_size += 2; + } + if (c_filename) { + /* We need the C filename to be interned before getting the + * array part pointer to avoid any GC interference while the + * array part is populated. + */ + duk_push_string(thr, c_filename); + arr_size += 2; + } + + /* XXX: Uninitialized would be OK. Maybe add internal primitive to + * push bare duk_harray with size? + */ + DUK_D(DUK_DPRINT("preallocated _Tracedata to %ld items", (long) arr_size)); + tv = duk_push_harray_with_size_outptr(thr, (duk_uint32_t) arr_size); + duk_clear_prototype(thr, -1); + DUK_ASSERT(duk_is_bare_object(thr, -1)); + DUK_ASSERT(arr_size == 0 || tv != NULL); + + /* Compiler SyntaxErrors (and other errors) come first, and are + * blamed by default (not flagged "noblame"). + */ + if (thr->compile_ctx != NULL && thr->compile_ctx->h_filename != NULL) { + s = thr->compile_ctx->h_filename; + DUK_TVAL_SET_STRING(tv, s); + DUK_HSTRING_INCREF(thr, s); + tv++; + + u32 = (duk_uint32_t) thr->compile_ctx->curr_token.start_line; /* (flags<<32) + (line), flags = 0 */ + DUK_TVAL_SET_U32(tv, u32); + tv++; + } + + /* Filename/line from C macros (__FILE__, __LINE__) are added as an + * entry with a special format: (string, number). The number contains + * the line and flags. + */ + + /* [ ... error c_filename? arr ] */ + + if (c_filename) { + DUK_ASSERT(DUK_TVAL_IS_STRING(thr->valstack_top - 2)); + s = DUK_TVAL_GET_STRING(thr->valstack_top - 2); /* interned c_filename */ + DUK_ASSERT(s != NULL); + DUK_TVAL_SET_STRING(tv, s); + DUK_HSTRING_INCREF(thr, s); + tv++; + + d = ((flags & DUK_AUGMENT_FLAG_NOBLAME_FILELINE) ? + ((duk_double_t) DUK_TB_FLAG_NOBLAME_FILELINE) * DUK_DOUBLE_2TO32 : + 0.0) + + (duk_double_t) c_line; + DUK_TVAL_SET_DOUBLE(tv, d); + tv++; + } + + /* Traceback depth doesn't take into account the filename/line + * special handling above (intentional). + */ + for (; depth-- > 0; act = act->parent) { + duk_uint32_t pc; + duk_tval *tv_src; + + /* [... arr] */ + + DUK_ASSERT(act != NULL); /* depth check above, assumes book-keeping is correct */ + DUK_ASSERT_DISABLE(act->pc >= 0); /* unsigned */ + + /* Add function object. */ + tv_src = &act->tv_func; /* object (function) or lightfunc */ + DUK_ASSERT(DUK_TVAL_IS_OBJECT(tv_src) || DUK_TVAL_IS_LIGHTFUNC(tv_src)); + DUK_TVAL_SET_TVAL(tv, tv_src); + DUK_TVAL_INCREF(thr, tv); + tv++; + + /* Add a number containing: pc, activation flags. + * + * PC points to next instruction, find offending PC. Note that + * PC == 0 for native code. + */ + pc = (duk_uint32_t) duk_hthread_get_act_prev_pc(thr_callstack, act); + DUK_ASSERT_DISABLE(pc >= 0); /* unsigned */ + DUK_ASSERT((duk_double_t) pc < DUK_DOUBLE_2TO32); /* assume PC is at most 32 bits and non-negative */ + d = ((duk_double_t) act->flags) * DUK_DOUBLE_2TO32 + (duk_double_t) pc; + DUK_TVAL_SET_DOUBLE(tv, d); + tv++; + } + +#if defined(DUK_USE_ASSERTIONS) + { + duk_harray *a; + a = (duk_harray *) duk_known_hobject(thr, -1); + DUK_ASSERT(a != NULL); + DUK_ASSERT((duk_uint32_t) (tv - DUK_HOBJECT_A_GET_BASE(thr->heap, (duk_hobject *) a)) == a->length); + DUK_ASSERT(a->length == (duk_uint32_t) arr_size); + DUK_ASSERT(duk_is_bare_object(thr, -1)); + } +#endif + + /* [ ... error c_filename? arr ] */ + + if (c_filename) { + duk_remove_m2(thr); + } + + /* [ ... error arr ] */ + + duk_xdef_prop_stridx_short_wec(thr, -2, DUK_STRIDX_INT_TRACEDATA); /* -> [ ... error ] */ +} +#endif /* DUK_USE_TRACEBACKS */ + +/* + * Add .fileName and .lineNumber to an error on the stack top. + */ + +#if defined(DUK_USE_AUGMENT_ERROR_CREATE) && !defined(DUK_USE_TRACEBACKS) +DUK_LOCAL void duk__add_fileline(duk_hthread *thr, + duk_hthread *thr_callstack, + const char *c_filename, + duk_int_t c_line, + duk_small_uint_t flags) { +#if defined(DUK_USE_ASSERTIONS) + duk_int_t entry_top; +#endif + +#if defined(DUK_USE_ASSERTIONS) + entry_top = duk_get_top(thr); +#endif + + /* + * If tracebacks are disabled, 'fileName' and 'lineNumber' are added + * as plain own properties. Since Error.prototype has accessors of + * the same name, we need to define own properties directly (cannot + * just use e.g. duk_put_prop_stridx). Existing properties are not + * overwritten in case they already exist. + */ + + if (thr->compile_ctx != NULL && thr->compile_ctx->h_filename != NULL) { + /* Compiler SyntaxError (or other error) gets the primary blame. + * Currently no flag to prevent blaming. + */ + duk_push_uint(thr, (duk_uint_t) thr->compile_ctx->curr_token.start_line); + duk_push_hstring(thr, thr->compile_ctx->h_filename); + } else if (c_filename && (flags & DUK_AUGMENT_FLAG_NOBLAME_FILELINE) == 0) { + /* C call site gets blamed next, unless flagged not to do so. + * XXX: file/line is disabled in minimal builds, so disable this + * too when appropriate. + */ + duk_push_int(thr, c_line); + duk_push_string(thr, c_filename); + } else { + /* Finally, blame the innermost callstack entry which has a + * .fileName property. + */ + duk_small_uint_t depth; + duk_uint32_t ecma_line; + duk_activation *act; + + DUK_ASSERT(thr_callstack->callstack_top <= DUK_INT_MAX); /* callstack limits */ + depth = DUK_USE_TRACEBACK_DEPTH; + if (depth > thr_callstack->callstack_top) { + depth = thr_callstack->callstack_top; + } + for (act = thr_callstack->callstack_curr; depth-- > 0; act = act->parent) { + duk_hobject *func; + duk_uint32_t pc; + + DUK_ASSERT(act != NULL); + func = DUK_ACT_GET_FUNC(act); + if (func == NULL) { + /* Lightfunc, not blamed now. */ + continue; + } + + /* PC points to next instruction, find offending PC, + * PC == 0 for native code. + */ + pc = duk_hthread_get_act_prev_pc( + thr, + act); /* thr argument only used for thr->heap, so specific thread doesn't matter */ + DUK_UNREF(pc); + DUK_ASSERT_DISABLE(pc >= 0); /* unsigned */ + DUK_ASSERT((duk_double_t) pc < DUK_DOUBLE_2TO32); /* assume PC is at most 32 bits and non-negative */ + + duk_push_hobject(thr, func); + + /* [ ... error func ] */ + + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_FILE_NAME); + if (!duk_is_string_notsymbol(thr, -1)) { + duk_pop_2(thr); + continue; + } + + /* [ ... error func fileName ] */ + + ecma_line = 0; +#if defined(DUK_USE_PC2LINE) + if (DUK_HOBJECT_IS_COMPFUNC(func)) { + ecma_line = duk_hobject_pc2line_query(thr, -2, (duk_uint_fast32_t) pc); + } else { + /* Native function, no relevant lineNumber. */ + } +#endif /* DUK_USE_PC2LINE */ + duk_push_u32(thr, ecma_line); + + /* [ ... error func fileName lineNumber ] */ + + duk_replace(thr, -3); + + /* [ ... error lineNumber fileName ] */ + goto define_props; + } + + /* No activation matches, use undefined for both .fileName and + * .lineNumber (matches what we do with a _Tracedata based + * no-match lookup. + */ + duk_push_undefined(thr); + duk_push_undefined(thr); + } + +define_props: + /* [ ... error lineNumber fileName ] */ +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(duk_get_top(thr) == entry_top + 2); +#endif + duk_xdef_prop_stridx_short(thr, -3, DUK_STRIDX_FILE_NAME, DUK_PROPDESC_FLAGS_C | DUK_PROPDESC_FLAG_NO_OVERWRITE); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_LINE_NUMBER, DUK_PROPDESC_FLAGS_C | DUK_PROPDESC_FLAG_NO_OVERWRITE); +} +#endif /* DUK_USE_AUGMENT_ERROR_CREATE && !DUK_USE_TRACEBACKS */ + +/* + * Add line number to a compiler error. + */ + +#if defined(DUK_USE_AUGMENT_ERROR_CREATE) +DUK_LOCAL void duk__add_compiler_error_line(duk_hthread *thr) { + /* Append a "(line NNN)" to the "message" property of any error + * thrown during compilation. Usually compilation errors are + * SyntaxErrors but they can also be out-of-memory errors and + * the like. + */ + + /* [ ... error ] */ + + DUK_ASSERT(duk_is_object(thr, -1)); + + if (!(thr->compile_ctx != NULL && thr->compile_ctx->h_filename != NULL)) { + return; + } + + DUK_DDD(DUK_DDDPRINT("compile error, before adding line info: %!T", (duk_tval *) duk_get_tval(thr, -1))); + + if (duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_MESSAGE)) { + duk_bool_t at_end; + + /* Best guesstimate that error occurred at end of input, token + * truncated by end of input, etc. + */ +#if 0 + at_end = (thr->compile_ctx->curr_token.start_offset + 1 >= thr->compile_ctx->lex.input_length); + at_end = (thr->compile_ctx->lex.window[0].codepoint < 0 || thr->compile_ctx->lex.window[1].codepoint < 0); +#endif + at_end = (thr->compile_ctx->lex.window[0].codepoint < 0); + + DUK_D(DUK_DPRINT("syntax error, determined at_end=%ld; curr_token.start_offset=%ld, " + "lex.input_length=%ld, window[0].codepoint=%ld, window[1].codepoint=%ld", + (long) at_end, + (long) thr->compile_ctx->curr_token.start_offset, + (long) thr->compile_ctx->lex.input_length, + (long) thr->compile_ctx->lex.window[0].codepoint, + (long) thr->compile_ctx->lex.window[1].codepoint)); + + duk_push_sprintf(thr, + " (line %ld%s)", + (long) thr->compile_ctx->curr_token.start_line, + at_end ? ", end of input" : ""); + duk_concat(thr, 2); + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_MESSAGE); + } else { + duk_pop(thr); + } + + DUK_DDD(DUK_DDDPRINT("compile error, after adding line info: %!T", (duk_tval *) duk_get_tval(thr, -1))); +} +#endif /* DUK_USE_AUGMENT_ERROR_CREATE */ + +/* + * Augment an error being created using Duktape specific properties + * like _Tracedata or .fileName/.lineNumber. + */ + +#if defined(DUK_USE_AUGMENT_ERROR_CREATE) +DUK_LOCAL void duk__err_augment_builtin_create(duk_hthread *thr, + duk_hthread *thr_callstack, + const char *c_filename, + duk_int_t c_line, + duk_hobject *obj, + duk_small_uint_t flags) { +#if defined(DUK_USE_ASSERTIONS) + duk_int_t entry_top; +#endif + +#if defined(DUK_USE_ASSERTIONS) + entry_top = duk_get_top(thr); +#endif + DUK_ASSERT(obj != NULL); + + DUK_UNREF(obj); /* unreferenced w/o tracebacks */ + + duk__add_compiler_error_line(thr); + +#if defined(DUK_USE_TRACEBACKS) + /* If tracebacks are enabled, the '_Tracedata' property is the only + * thing we need: 'fileName' and 'lineNumber' are virtual properties + * which use '_Tracedata'. (Check _Tracedata only as own property.) + */ + if (duk_hobject_find_entry_tval_ptr_stridx(thr->heap, obj, DUK_STRIDX_INT_TRACEDATA) != NULL) { + DUK_DDD(DUK_DDDPRINT("error value already has a '_Tracedata' property, not modifying it")); + } else { + duk__add_traceback(thr, thr_callstack, c_filename, c_line, flags); + } +#else + /* Without tracebacks the concrete .fileName and .lineNumber need + * to be added directly. + */ + duk__add_fileline(thr, thr_callstack, c_filename, c_line, flags); +#endif + +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(duk_get_top(thr) == entry_top); +#endif +} +#endif /* DUK_USE_AUGMENT_ERROR_CREATE */ + +/* + * Augment an error at creation time with _Tracedata/fileName/lineNumber + * and allow a user error handler (if defined) to process/replace the error. + * The error to be augmented is at the stack top. + * + * thr: thread containing the error value + * thr_callstack: thread which should be used for generating callstack etc. + * c_filename: C __FILE__ related to the error + * c_line: C __LINE__ related to the error + * flags & DUK_AUGMENT_FLAG_NOBLAME_FILELINE: + * if true, don't fileName/line as error source, otherwise use traceback + * (needed because user code filename/line are reported but internal ones + * are not) + */ + +#if defined(DUK_USE_AUGMENT_ERROR_CREATE) +DUK_INTERNAL void duk_err_augment_error_create(duk_hthread *thr, + duk_hthread *thr_callstack, + const char *c_filename, + duk_int_t c_line, + duk_small_uint_t flags) { + duk_hobject *obj; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr_callstack != NULL); + + /* [ ... error ] */ + + /* + * Criteria for augmenting: + * + * - augmentation enabled in build (naturally) + * - error value internal prototype chain contains the built-in + * Error prototype object (i.e. 'val instanceof Error') + * + * Additional criteria for built-in augmenting: + * + * - error value is an extensible object + */ + + obj = duk_get_hobject(thr, -1); + if (!obj) { + DUK_DDD(DUK_DDDPRINT("value is not an object, skip both built-in and user augment")); + return; + } + if (!duk_hobject_prototype_chain_contains(thr, obj, thr->builtins[DUK_BIDX_ERROR_PROTOTYPE], 1 /*ignore_loop*/)) { + /* If the value has a prototype loop, it's critical not to + * throw here. Instead, assume the value is not to be + * augmented. + */ + DUK_DDD(DUK_DDDPRINT("value is not an error instance, skip both built-in and user augment")); + return; + } + if (DUK_HOBJECT_HAS_EXTENSIBLE(obj)) { + DUK_DDD(DUK_DDDPRINT("error meets criteria, built-in augment")); + duk__err_augment_builtin_create(thr, thr_callstack, c_filename, c_line, obj, flags); + } else { + DUK_DDD(DUK_DDDPRINT("error does not meet criteria, no built-in augment")); + } + + /* [ ... error ] */ + +#if defined(DUK_USE_ERRCREATE) + duk__err_augment_user(thr, DUK_STRIDX_ERR_CREATE); +#endif +} +#endif /* DUK_USE_AUGMENT_ERROR_CREATE */ + +/* + * Augment an error at throw time; allow a user error handler (if defined) + * to process/replace the error. The error to be augmented is at the + * stack top. + */ + +#if defined(DUK_USE_AUGMENT_ERROR_THROW) +DUK_INTERNAL void duk_err_augment_error_throw(duk_hthread *thr) { +#if defined(DUK_USE_ERRTHROW) + duk__err_augment_user(thr, DUK_STRIDX_ERR_THROW); +#endif /* DUK_USE_ERRTHROW */ +} +#endif /* DUK_USE_AUGMENT_ERROR_THROW */ +#line 1 "duk_error_longjmp.c" +/* + * Do a longjmp call, calling the fatal error handler if no + * catchpoint exists. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_PREFER_SIZE) +DUK_NORETURN(DUK_LOCAL_DECL void duk__uncaught_minimal(duk_hthread *thr)); +DUK_LOCAL void duk__uncaught_minimal(duk_hthread *thr) { + (void) duk_fatal(thr, "uncaught error"); + DUK_WO_NORETURN(return;); +} +#endif + +#if 0 +DUK_NORETURN(DUK_LOCAL_DECL void duk__uncaught_readable(duk_hthread *thr)); +DUK_LOCAL void duk__uncaught_readable(duk_hthread *thr) { + const char *summary; + char buf[DUK_USE_FATAL_MAXLEN]; + + summary = duk_push_string_tval_readable(thr, &thr->heap->lj.value1); + DUK_SNPRINTF(buf, sizeof(buf), "uncaught: %s", summary); + buf[sizeof(buf) - 1] = (char) 0; + (void) duk_fatal(thr, (const char *) buf); + DUK_WO_NORETURN(return;); +} +#endif + +#if !defined(DUK_USE_PREFER_SIZE) +DUK_NORETURN(DUK_LOCAL_DECL void duk__uncaught_error_aware(duk_hthread *thr)); +DUK_LOCAL void duk__uncaught_error_aware(duk_hthread *thr) { + const char *summary; + char buf[DUK_USE_FATAL_MAXLEN]; + + summary = duk_push_string_tval_readable_error(thr, &thr->heap->lj.value1); + DUK_ASSERT(summary != NULL); + DUK_SNPRINTF(buf, sizeof(buf), "uncaught: %s", summary); + buf[sizeof(buf) - 1] = (char) 0; + (void) duk_fatal(thr, (const char *) buf); + DUK_WO_NORETURN(return;); +} +#endif + +DUK_INTERNAL void duk_err_longjmp(duk_hthread *thr) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + + DUK_DD(DUK_DDPRINT("longjmp error: type=%d iserror=%d value1=%!T value2=%!T", + (int) thr->heap->lj.type, + (int) thr->heap->lj.iserror, + &thr->heap->lj.value1, + &thr->heap->lj.value2)); + + /* Prevent finalizer execution during error handling. All error + * handling sites will process pending finalizers once error handling + * is complete and we're ready for the side effects. Does not prevent + * refzero freeing or mark-and-sweep during error handling. + * + * NOTE: when we come here some calling code may have used DECREF + * NORZ macros without an explicit DUK_REFZERO_CHECK_xxx() call. + * We don't want to do it here because it would just check for + * pending finalizers and we prevent that explicitly. Instead, + * the error catcher will run the finalizers once error handling + * is complete. + */ + + DUK_ASSERT_LJSTATE_SET(thr->heap); + + thr->heap->pf_prevent_count++; + DUK_ASSERT(thr->heap->pf_prevent_count != 0); /* Wrap. */ + +#if defined(DUK_USE_ASSERTIONS) + /* XXX: set this immediately when longjmp state is set */ + DUK_ASSERT(thr->heap->error_not_allowed == 0); /* Detect error within critical section. */ + thr->heap->error_not_allowed = 1; +#endif + + DUK_DD(DUK_DDPRINT("about to longjmp, pf_prevent_count=%ld", (long) thr->heap->pf_prevent_count)); + + /* If we don't have a jmpbuf_ptr, there is little we can do except + * cause a fatal error. The caller's expectation is that we never + * return. + */ + if (!thr->heap->lj.jmpbuf_ptr) { + DUK_D(DUK_DPRINT("uncaught error: type=%d iserror=%d value1=%!T value2=%!T", + (int) thr->heap->lj.type, + (int) thr->heap->lj.iserror, + &thr->heap->lj.value1, + &thr->heap->lj.value2)); + +#if defined(DUK_USE_PREFER_SIZE) + duk__uncaught_minimal(thr); +#else + duk__uncaught_error_aware(thr); +#endif + DUK_UNREACHABLE(); + } + +#if defined(DUK_USE_CPP_EXCEPTIONS) + throw duk_internal_exception(); /* dummy */ +#else + DUK_LONGJMP(thr->heap->lj.jmpbuf_ptr->jb); +#endif + + DUK_UNREACHABLE(); +} +#line 1 "duk_error_misc.c" +/* + * Error helpers + */ + +/* #include duk_internal.h -> already included */ + +/* + * Helper to walk the thread chain and see if there is an active error + * catcher. Protected calls or finally blocks aren't considered catching. + */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) +DUK_LOCAL duk_bool_t duk__have_active_catcher(duk_hthread *thr) { + /* As noted above, a protected API call won't be counted as a + * catcher. This is usually convenient, e.g. in the case of a top- + * level duk_pcall(), but may not always be desirable. Perhaps add + * an argument to treat them as catchers? + */ + + duk_activation *act; + duk_catcher *cat; + + DUK_ASSERT(thr != NULL); + + for (; thr != NULL; thr = thr->resumer) { + for (act = thr->callstack_curr; act != NULL; act = act->parent) { + for (cat = act->cat; cat != NULL; cat = cat->parent) { + if (DUK_CAT_HAS_CATCH_ENABLED(cat)) { + return 1; /* all we need to know */ + } + } + } + } + return 0; +} +#endif /* DUK_USE_DEBUGGER_SUPPORT */ + +/* + * Get prototype object for an integer error code. + */ + +DUK_INTERNAL duk_hobject *duk_error_prototype_from_code(duk_hthread *thr, duk_errcode_t code) { + switch (code) { + case DUK_ERR_EVAL_ERROR: + return thr->builtins[DUK_BIDX_EVAL_ERROR_PROTOTYPE]; + case DUK_ERR_RANGE_ERROR: + return thr->builtins[DUK_BIDX_RANGE_ERROR_PROTOTYPE]; + case DUK_ERR_REFERENCE_ERROR: + return thr->builtins[DUK_BIDX_REFERENCE_ERROR_PROTOTYPE]; + case DUK_ERR_SYNTAX_ERROR: + return thr->builtins[DUK_BIDX_SYNTAX_ERROR_PROTOTYPE]; + case DUK_ERR_TYPE_ERROR: + return thr->builtins[DUK_BIDX_TYPE_ERROR_PROTOTYPE]; + case DUK_ERR_URI_ERROR: + return thr->builtins[DUK_BIDX_URI_ERROR_PROTOTYPE]; + case DUK_ERR_ERROR: + default: + return thr->builtins[DUK_BIDX_ERROR_PROTOTYPE]; + } +} + +/* + * Helper for debugger throw notify and pause-on-uncaught integration. + */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) +DUK_INTERNAL void duk_err_check_debugger_integration(duk_hthread *thr) { + duk_bool_t uncaught; + duk_tval *tv_obj; + + /* If something is thrown with the debugger attached and nobody will + * catch it, execution is paused before the longjmp, turning over + * control to the debug client. This allows local state to be examined + * before the stack is unwound. Errors are not intercepted when debug + * message loop is active (e.g. for Eval). + */ + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + + /* XXX: Allow customizing the pause and notify behavior at runtime + * using debugger runtime flags. For now the behavior is fixed using + * config options. + */ + + if (!duk_debug_is_attached(thr->heap) || thr->heap->dbg_processing || thr->heap->lj.type != DUK_LJ_TYPE_THROW || + thr->heap->creating_error) { + DUK_D(DUK_DPRINT("skip debugger error integration; not attached, debugger processing, not THROW, or error thrown " + "while creating error")); + return; + } + + /* Don't intercept a DoubleError, we may have caused the initial double + * fault and attempting to intercept it will cause us to be called + * recursively and exhaust the C stack. (This should no longer happen + * for the initial throw because DoubleError path doesn't do a debugger + * integration check, but it might happen for rethrows.) + */ + tv_obj = &thr->heap->lj.value1; + if (DUK_TVAL_IS_OBJECT(tv_obj) && DUK_TVAL_GET_OBJECT(tv_obj) == thr->builtins[DUK_BIDX_DOUBLE_ERROR]) { + DUK_D(DUK_DPRINT("built-in DoubleError instance (re)thrown, not intercepting")); + return; + } + + uncaught = !duk__have_active_catcher(thr); + + /* Debugger code expects the value at stack top. This also serves + * as a backup: we need to store/restore the longjmp state because + * when the debugger is paused Eval commands may be executed and + * they can arbitrarily clobber the longjmp state. + */ + duk_push_tval(thr, tv_obj); + + /* Store and reset longjmp state. */ + DUK_ASSERT_LJSTATE_SET(thr->heap); + DUK_TVAL_DECREF_NORZ(thr, tv_obj); + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(&thr->heap->lj.value2)); /* Always for THROW type. */ + DUK_TVAL_SET_UNDEFINED(tv_obj); + thr->heap->lj.type = DUK_LJ_TYPE_UNKNOWN; + DUK_ASSERT_LJSTATE_UNSET(thr->heap); + +#if defined(DUK_USE_DEBUGGER_THROW_NOTIFY) + /* Report it to the debug client */ + DUK_D(DUK_DPRINT("throw with debugger attached, report to client")); + duk_debug_send_throw(thr, uncaught); +#endif + + if (uncaught) { + if (thr->heap->dbg_pause_flags & DUK_PAUSE_FLAG_UNCAUGHT_ERROR) { + DUK_D(DUK_DPRINT("PAUSE TRIGGERED by uncaught error")); + duk_debug_halt_execution(thr, 1 /*use_prev_pc*/); + } + } else { + if (thr->heap->dbg_pause_flags & DUK_PAUSE_FLAG_CAUGHT_ERROR) { + DUK_D(DUK_DPRINT("PAUSE TRIGGERED by caught error")); + duk_debug_halt_execution(thr, 1 /*use_prev_pc*/); + } + } + + /* Restore longjmp state. */ + DUK_ASSERT_LJSTATE_UNSET(thr->heap); + thr->heap->lj.type = DUK_LJ_TYPE_THROW; + tv_obj = DUK_GET_TVAL_NEGIDX(thr, -1); + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(&thr->heap->lj.value1)); + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(&thr->heap->lj.value2)); + DUK_TVAL_SET_TVAL(&thr->heap->lj.value1, tv_obj); + DUK_TVAL_INCREF(thr, tv_obj); + DUK_ASSERT_LJSTATE_SET(thr->heap); + + duk_pop(thr); +} +#endif /* DUK_USE_DEBUGGER_SUPPORT */ + +/* + * Helpers for setting up heap longjmp state. + */ + +DUK_INTERNAL void duk_err_setup_ljstate1(duk_hthread *thr, duk_small_uint_t lj_type, duk_tval *tv_val) { + duk_heap *heap; + + DUK_ASSERT(thr != NULL); + heap = thr->heap; + DUK_ASSERT(heap != NULL); + DUK_ASSERT(tv_val != NULL); + + DUK_ASSERT_LJSTATE_UNSET(heap); + + heap->lj.type = lj_type; + DUK_TVAL_SET_TVAL(&heap->lj.value1, tv_val); + DUK_TVAL_INCREF(thr, tv_val); + + DUK_ASSERT_LJSTATE_SET(heap); +} +#line 1 "duk_error_throw.c" +/* + * Create and throw an ECMAScript error object based on a code and a message. + * + * Used when we throw errors internally. ECMAScript generated error objects + * are created by ECMAScript code, and the throwing is handled by the bytecode + * executor. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Create and throw an error (originating from Duktape internally) + * + * Push an error object on top of the stack, possibly throw augmenting + * the error, and finally longjmp. + * + * If an error occurs while we're dealing with the current error, we might + * enter an infinite recursion loop. This is prevented by detecting a + * "double fault" through the heap->creating_error flag; the recursion + * then stops at the second level. + */ + +#if defined(DUK_USE_VERBOSE_ERRORS) +DUK_INTERNAL void duk_err_create_and_throw(duk_hthread *thr, + duk_errcode_t code, + const char *msg, + const char *filename, + duk_int_t line) { +#else +DUK_INTERNAL void duk_err_create_and_throw(duk_hthread *thr, duk_errcode_t code) { +#endif +#if defined(DUK_USE_VERBOSE_ERRORS) + DUK_DD(DUK_DDPRINT("duk_err_create_and_throw(): code=%ld, msg=%s, filename=%s, line=%ld", + (long) code, + (const char *) msg, + (const char *) filename, + (long) line)); +#else + DUK_DD(DUK_DDPRINT("duk_err_create_and_throw(): code=%ld", (long) code)); +#endif + + DUK_ASSERT(thr != NULL); + + /* Even though nested call is possible because we throw an error when + * trying to create an error, the potential errors must happen before + * the longjmp state is configured. + */ + DUK_ASSERT_LJSTATE_UNSET(thr->heap); + + /* Sync so that augmentation sees up-to-date activations, NULL + * thr->ptr_curr_pc so that it's not used if side effects occur + * in augmentation or longjmp handling. + */ + duk_hthread_sync_and_null_currpc(thr); + + /* + * Create and push an error object onto the top of stack. + * The error is potentially augmented before throwing. + * + * If a "double error" occurs, use a fixed error instance + * to avoid further trouble. + */ + + if (thr->heap->creating_error) { + duk_tval tv_val; + duk_hobject *h_err; + + thr->heap->creating_error = 0; + + h_err = thr->builtins[DUK_BIDX_DOUBLE_ERROR]; + if (h_err != NULL) { + DUK_D(DUK_DPRINT("double fault detected -> use built-in fixed 'double error' instance")); + DUK_TVAL_SET_OBJECT(&tv_val, h_err); + } else { + DUK_D(DUK_DPRINT("double fault detected; there is no built-in fixed 'double error' instance " + "-> use the error code as a number")); + DUK_TVAL_SET_I32(&tv_val, (duk_int32_t) code); + } + + duk_err_setup_ljstate1(thr, DUK_LJ_TYPE_THROW, &tv_val); + + /* No augmentation to avoid any allocations or side effects. */ + } else { + /* Prevent infinite recursion. Extra call stack and C + * recursion headroom (see GH-191) is added for augmentation. + * That is now signalled by heap->augmenting error and taken + * into account in call handling without an explicit limit bump. + */ + thr->heap->creating_error = 1; + + duk_require_stack(thr, 1); + + /* XXX: usually unnecessary '%s' formatting here, but cannot + * use 'msg' as a format string directly. + */ +#if defined(DUK_USE_VERBOSE_ERRORS) + duk_push_error_object_raw(thr, code | DUK_ERRCODE_FLAG_NOBLAME_FILELINE, filename, line, "%s", (const char *) msg); +#else + duk_push_error_object_raw(thr, code | DUK_ERRCODE_FLAG_NOBLAME_FILELINE, NULL, 0, NULL); +#endif + + /* Note that an alloc error may happen during error augmentation. + * This may happen both when the original error is an alloc error + * and when it's something else. Because any error in augmentation + * must be handled correctly anyway, there's no special check for + * avoiding it for alloc errors (this differs from Duktape 1.x). + */ +#if defined(DUK_USE_AUGMENT_ERROR_THROW) + DUK_DDD(DUK_DDDPRINT("THROW ERROR (INTERNAL): %!iT (before throw augment)", (duk_tval *) duk_get_tval(thr, -1))); + duk_err_augment_error_throw(thr); +#endif + + duk_err_setup_ljstate1(thr, DUK_LJ_TYPE_THROW, DUK_GET_TVAL_NEGIDX(thr, -1)); + thr->heap->creating_error = 0; + + /* Error is now created and we assume no errors can occur any + * more. Check for debugger Throw integration only when the + * error is complete. If we enter debugger message loop, + * creating_error must be 0 so that errors can be thrown in + * the paused state, e.g. in Eval commands. + */ +#if defined(DUK_USE_DEBUGGER_SUPPORT) + duk_err_check_debugger_integration(thr); +#endif + } + + /* + * Finally, longjmp + */ + + DUK_DDD(DUK_DDDPRINT("THROW ERROR (INTERNAL): %!iT, %!iT (after throw augment)", + (duk_tval *) &thr->heap->lj.value1, + (duk_tval *) &thr->heap->lj.value2)); + + duk_err_longjmp(thr); + DUK_UNREACHABLE(); +} + +/* + * Helper for C function call negative return values. + */ + +DUK_INTERNAL void duk_error_throw_from_negative_rc(duk_hthread *thr, duk_ret_t rc) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(rc < 0); + + /* + * The __FILE__ and __LINE__ information is intentionally not used in the + * creation of the error object, as it isn't useful in the tracedata. The + * tracedata still contains the function which returned the negative return + * code, and having the file/line of this function isn't very useful. + * + * The error messages for DUK_RET_xxx shorthand are intentionally very + * minimal: they're only really useful for low memory targets. + */ + + duk_error_raw(thr, -rc, NULL, 0, "error (rc %ld)", (long) rc); + DUK_WO_NORETURN(return;); +} +#line 1 "duk_hbuffer_alloc.c" +/* + * duk_hbuffer allocation and freeing. + */ + +/* #include duk_internal.h -> already included */ + +/* Allocate a new duk_hbuffer of a certain type and return a pointer to it + * (NULL on error). Write buffer data pointer to 'out_bufdata' (only if + * allocation successful). + */ +DUK_INTERNAL duk_hbuffer *duk_hbuffer_alloc(duk_heap *heap, duk_size_t size, duk_small_uint_t flags, void **out_bufdata) { + duk_hbuffer *res = NULL; + duk_size_t header_size; + duk_size_t alloc_size; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(out_bufdata != NULL); + + DUK_DDD(DUK_DDDPRINT("allocate hbuffer")); + + /* Size sanity check. Should not be necessary because caller is + * required to check this, but we don't want to cause a segfault + * if the size wraps either in duk_size_t computation or when + * storing the size in a 16-bit field. + */ + if (size > DUK_HBUFFER_MAX_BYTELEN) { + DUK_D(DUK_DPRINT("hbuffer alloc failed: size too large: %ld", (long) size)); + return NULL; /* no need to write 'out_bufdata' */ + } + + if (flags & DUK_BUF_FLAG_EXTERNAL) { + header_size = sizeof(duk_hbuffer_external); + alloc_size = sizeof(duk_hbuffer_external); + } else if (flags & DUK_BUF_FLAG_DYNAMIC) { + header_size = sizeof(duk_hbuffer_dynamic); + alloc_size = sizeof(duk_hbuffer_dynamic); + } else { + header_size = sizeof(duk_hbuffer_fixed); + alloc_size = sizeof(duk_hbuffer_fixed) + size; + DUK_ASSERT(alloc_size >= sizeof(duk_hbuffer_fixed)); /* no wrapping */ + } + + res = (duk_hbuffer *) DUK_ALLOC(heap, alloc_size); + if (DUK_UNLIKELY(res == NULL)) { + goto alloc_error; + } + + /* zero everything unless requested not to do so */ +#if defined(DUK_USE_ZERO_BUFFER_DATA) + duk_memzero((void *) res, (flags & DUK_BUF_FLAG_NOZERO) ? header_size : alloc_size); +#else + duk_memzero((void *) res, header_size); +#endif + + if (flags & DUK_BUF_FLAG_EXTERNAL) { + duk_hbuffer_external *h; + h = (duk_hbuffer_external *) res; + DUK_UNREF(h); + *out_bufdata = NULL; +#if defined(DUK_USE_EXPLICIT_NULL_INIT) +#if defined(DUK_USE_HEAPPTR16) +/* the compressed pointer is zeroed which maps to NULL, so nothing to do. */ +#else + DUK_HBUFFER_EXTERNAL_SET_DATA_PTR(heap, h, NULL); +#endif +#endif + DUK_ASSERT(DUK_HBUFFER_EXTERNAL_GET_DATA_PTR(heap, h) == NULL); + } else if (flags & DUK_BUF_FLAG_DYNAMIC) { + duk_hbuffer_dynamic *h = (duk_hbuffer_dynamic *) res; + void *ptr; + + if (size > 0) { + DUK_ASSERT(!(flags & DUK_BUF_FLAG_EXTERNAL)); /* alloc external with size zero */ + DUK_DDD(DUK_DDDPRINT("dynamic buffer with nonzero size, alloc actual buffer")); +#if defined(DUK_USE_ZERO_BUFFER_DATA) + ptr = DUK_ALLOC_ZEROED(heap, size); +#else + ptr = DUK_ALLOC(heap, size); +#endif + if (DUK_UNLIKELY(ptr == NULL)) { + /* Because size > 0, NULL check is correct */ + goto alloc_error; + } + *out_bufdata = ptr; + + DUK_HBUFFER_DYNAMIC_SET_DATA_PTR(heap, h, ptr); + } else { + *out_bufdata = NULL; +#if defined(DUK_USE_EXPLICIT_NULL_INIT) +#if defined(DUK_USE_HEAPPTR16) +/* the compressed pointer is zeroed which maps to NULL, so nothing to do. */ +#else + DUK_HBUFFER_DYNAMIC_SET_DATA_PTR(heap, h, NULL); +#endif +#endif + DUK_ASSERT(DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(heap, h) == NULL); + } + } else { + *out_bufdata = (void *) ((duk_hbuffer_fixed *) (void *) res + 1); + } + + DUK_HBUFFER_SET_SIZE(res, size); + + DUK_HEAPHDR_SET_TYPE(&res->hdr, DUK_HTYPE_BUFFER); + if (flags & DUK_BUF_FLAG_DYNAMIC) { + DUK_HBUFFER_SET_DYNAMIC(res); + if (flags & DUK_BUF_FLAG_EXTERNAL) { + DUK_HBUFFER_SET_EXTERNAL(res); + } + } else { + DUK_ASSERT(!(flags & DUK_BUF_FLAG_EXTERNAL)); + } + DUK_HEAP_INSERT_INTO_HEAP_ALLOCATED(heap, &res->hdr); + + DUK_DDD(DUK_DDDPRINT("allocated hbuffer: %p", (void *) res)); + return res; + +alloc_error: + DUK_DD(DUK_DDPRINT("hbuffer allocation failed")); + + DUK_FREE(heap, res); + return NULL; /* no need to write 'out_bufdata' */ +} + +/* For indirect allocs. */ + +DUK_INTERNAL void *duk_hbuffer_get_dynalloc_ptr(duk_heap *heap, void *ud) { + duk_hbuffer_dynamic *buf = (duk_hbuffer_dynamic *) ud; + DUK_UNREF(heap); + return (void *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(heap, buf); +} +#line 1 "duk_hbuffer_assert.c" +/* + * duk_hbuffer assertion helpers + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_ASSERTIONS) + +DUK_INTERNAL void duk_hbuffer_assert_valid(duk_hbuffer *h) { + DUK_ASSERT(h != NULL); +} + +#endif /* DUK_USE_ASSERTIONS */ +#line 1 "duk_hbuffer_ops.c" +/* + * duk_hbuffer operations such as resizing and inserting/appending data to + * a dynamic buffer. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Resizing + */ + +DUK_INTERNAL void duk_hbuffer_resize(duk_hthread *thr, duk_hbuffer_dynamic *buf, duk_size_t new_size) { + void *res; + duk_size_t prev_size; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(buf != NULL); + DUK_ASSERT(DUK_HBUFFER_HAS_DYNAMIC(buf)); + DUK_ASSERT(!DUK_HBUFFER_HAS_EXTERNAL(buf)); + + /* + * Maximum size check + */ + + if (new_size > DUK_HBUFFER_MAX_BYTELEN) { + DUK_ERROR_RANGE(thr, "buffer too long"); + DUK_WO_NORETURN(return;); + } + + /* + * Note: use indirect realloc variant just in case mark-and-sweep + * (finalizers) might resize this same buffer during garbage + * collection. + */ + + res = DUK_REALLOC_INDIRECT(thr->heap, duk_hbuffer_get_dynalloc_ptr, (void *) buf, new_size); + if (DUK_LIKELY(res != NULL || new_size == 0)) { + /* 'res' may be NULL if new allocation size is 0. */ + + DUK_DDD(DUK_DDDPRINT("resized dynamic buffer %p:%ld -> %p:%ld", + (void *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(thr->heap, buf), + (long) DUK_HBUFFER_DYNAMIC_GET_SIZE(buf), + (void *) res, + (long) new_size)); + + /* + * The entire allocated buffer area, regardless of actual used + * size, is kept zeroed in resizes for simplicity. If the buffer + * is grown, zero the new part. + */ + + prev_size = DUK_HBUFFER_DYNAMIC_GET_SIZE(buf); + if (new_size > prev_size) { + DUK_ASSERT(new_size - prev_size > 0); +#if defined(DUK_USE_ZERO_BUFFER_DATA) + duk_memzero((void *) ((char *) res + prev_size), (duk_size_t) (new_size - prev_size)); +#endif + } + + DUK_HBUFFER_DYNAMIC_SET_SIZE(buf, new_size); + DUK_HBUFFER_DYNAMIC_SET_DATA_PTR(thr->heap, buf, res); + } else { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return;); + } + + DUK_ASSERT(res != NULL || new_size == 0); +} + +DUK_INTERNAL void duk_hbuffer_reset(duk_hthread *thr, duk_hbuffer_dynamic *buf) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(buf != NULL); + DUK_ASSERT(DUK_HBUFFER_HAS_DYNAMIC(buf)); + DUK_ASSERT(!DUK_HBUFFER_HAS_EXTERNAL(buf)); + + duk_hbuffer_resize(thr, buf, 0); +} +/* #include duk_internal.h -> already included */ +#line 2 "duk_hbufobj_misc.c" + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_uint_t duk_hbufobj_clamp_bytelength(duk_hbufobj *h_bufobj, duk_uint_t len) { + duk_uint_t buf_size; + duk_uint_t buf_avail; + + DUK_ASSERT(h_bufobj != NULL); + DUK_ASSERT(h_bufobj->buf != NULL); + + buf_size = (duk_uint_t) DUK_HBUFFER_GET_SIZE(h_bufobj->buf); + if (h_bufobj->offset > buf_size) { + /* Slice starting point is beyond current length. */ + return 0; + } + buf_avail = buf_size - h_bufobj->offset; + + return buf_avail >= len ? len : buf_avail; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ +#line 1 "duk_heap_alloc.c" +/* + * duk_heap allocation and freeing. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_ROM_STRINGS) +/* Fixed seed value used with ROM strings. */ +#define DUK__FIXED_HASH_SEED 0xabcd1234 +#endif + +/* + * Free a heap object. + * + * Free heap object and its internal (non-heap) pointers. Assumes that + * caller has removed the object from heap allocated list or the string + * intern table, and any weak references (which strings may have) have + * been already dealt with. + */ + +DUK_INTERNAL void duk_free_hobject(duk_heap *heap, duk_hobject *h) { + DUK_ASSERT(heap != NULL); + DUK_ASSERT(h != NULL); + + DUK_FREE(heap, DUK_HOBJECT_GET_PROPS(heap, h)); + + if (DUK_HOBJECT_IS_COMPFUNC(h)) { + duk_hcompfunc *f = (duk_hcompfunc *) h; + DUK_UNREF(f); + /* Currently nothing to free; 'data' is a heap object */ + } else if (DUK_HOBJECT_IS_NATFUNC(h)) { + duk_hnatfunc *f = (duk_hnatfunc *) h; + DUK_UNREF(f); + /* Currently nothing to free */ + } else if (DUK_HOBJECT_IS_THREAD(h)) { + duk_hthread *t = (duk_hthread *) h; + duk_activation *act; + + DUK_FREE(heap, t->valstack); + + /* Don't free h->resumer because it exists in the heap. + * Callstack entries also contain function pointers which + * are not freed for the same reason. They are decref + * finalized and the targets are freed if necessary based + * on their refcount (or reachability). + */ + for (act = t->callstack_curr; act != NULL;) { + duk_activation *act_next; + duk_catcher *cat; + + for (cat = act->cat; cat != NULL;) { + duk_catcher *cat_next; + + cat_next = cat->parent; + DUK_FREE(heap, (void *) cat); + cat = cat_next; + } + + act_next = act->parent; + DUK_FREE(heap, (void *) act); + act = act_next; + } + + /* XXX: with 'caller' property the callstack would need + * to be unwound to update the 'caller' properties of + * functions in the callstack. + */ + } else if (DUK_HOBJECT_IS_BOUNDFUNC(h)) { + duk_hboundfunc *f = (duk_hboundfunc *) (void *) h; + + DUK_FREE(heap, f->args); + } + + DUK_FREE(heap, (void *) h); +} + +DUK_INTERNAL void duk_free_hbuffer(duk_heap *heap, duk_hbuffer *h) { + DUK_ASSERT(heap != NULL); + DUK_ASSERT(h != NULL); + + if (DUK_HBUFFER_HAS_DYNAMIC(h) && !DUK_HBUFFER_HAS_EXTERNAL(h)) { + duk_hbuffer_dynamic *g = (duk_hbuffer_dynamic *) h; + DUK_DDD(DUK_DDDPRINT("free dynamic buffer %p", (void *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(heap, g))); + DUK_FREE(heap, DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(heap, g)); + } + DUK_FREE(heap, (void *) h); +} + +DUK_INTERNAL void duk_free_hstring(duk_heap *heap, duk_hstring *h) { + DUK_ASSERT(heap != NULL); + DUK_ASSERT(h != NULL); + + DUK_UNREF(heap); + DUK_UNREF(h); + +#if defined(DUK_USE_HSTRING_EXTDATA) && defined(DUK_USE_EXTSTR_FREE) + if (DUK_HSTRING_HAS_EXTDATA(h)) { + DUK_DDD( + DUK_DDDPRINT("free extstr: hstring %!O, extdata: %p", h, DUK_HSTRING_GET_EXTDATA((duk_hstring_external *) h))); + DUK_USE_EXTSTR_FREE(heap->heap_udata, (const void *) DUK_HSTRING_GET_EXTDATA((duk_hstring_external *) h)); + } +#endif + DUK_FREE(heap, (void *) h); +} + +DUK_INTERNAL void duk_heap_free_heaphdr_raw(duk_heap *heap, duk_heaphdr *hdr) { + DUK_ASSERT(heap); + DUK_ASSERT(hdr); + + DUK_DDD(DUK_DDDPRINT("free heaphdr %p, htype %ld", (void *) hdr, (long) DUK_HEAPHDR_GET_TYPE(hdr))); + + switch (DUK_HEAPHDR_GET_TYPE(hdr)) { + case DUK_HTYPE_STRING: + duk_free_hstring(heap, (duk_hstring *) hdr); + break; + case DUK_HTYPE_OBJECT: + duk_free_hobject(heap, (duk_hobject *) hdr); + break; + default: + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(hdr) == DUK_HTYPE_BUFFER); + duk_free_hbuffer(heap, (duk_hbuffer *) hdr); + } +} + +/* + * Free the heap. + * + * Frees heap-related non-heap-tracked allocations such as the + * string intern table; then frees the heap allocated objects; + * and finally frees the heap structure itself. Reference counts + * and GC markers are ignored (and not updated) in this process, + * and finalizers won't be called. + * + * The heap pointer and heap object pointers must not be used + * after this call. + */ + +#if defined(DUK_USE_CACHE_ACTIVATION) +DUK_LOCAL duk_size_t duk__heap_free_activation_freelist(duk_heap *heap) { + duk_activation *act; + duk_activation *act_next; + duk_size_t count_act = 0; + + for (act = heap->activation_free; act != NULL;) { + act_next = act->parent; + DUK_FREE(heap, (void *) act); + act = act_next; +#if defined(DUK_USE_DEBUG) + count_act++; +#endif + } + heap->activation_free = NULL; /* needed when called from mark-and-sweep */ + return count_act; +} +#endif /* DUK_USE_CACHE_ACTIVATION */ + +#if defined(DUK_USE_CACHE_CATCHER) +DUK_LOCAL duk_size_t duk__heap_free_catcher_freelist(duk_heap *heap) { + duk_catcher *cat; + duk_catcher *cat_next; + duk_size_t count_cat = 0; + + for (cat = heap->catcher_free; cat != NULL;) { + cat_next = cat->parent; + DUK_FREE(heap, (void *) cat); + cat = cat_next; +#if defined(DUK_USE_DEBUG) + count_cat++; +#endif + } + heap->catcher_free = NULL; /* needed when called from mark-and-sweep */ + + return count_cat; +} +#endif /* DUK_USE_CACHE_CATCHER */ + +DUK_INTERNAL void duk_heap_free_freelists(duk_heap *heap) { + duk_size_t count_act = 0; + duk_size_t count_cat = 0; + +#if defined(DUK_USE_CACHE_ACTIVATION) + count_act = duk__heap_free_activation_freelist(heap); +#endif +#if defined(DUK_USE_CACHE_CATCHER) + count_cat = duk__heap_free_catcher_freelist(heap); +#endif + DUK_UNREF(heap); + DUK_UNREF(count_act); + DUK_UNREF(count_cat); + + DUK_D( + DUK_DPRINT("freed %ld activation freelist entries, %ld catcher freelist entries", (long) count_act, (long) count_cat)); +} + +DUK_LOCAL void duk__free_allocated(duk_heap *heap) { + duk_heaphdr *curr; + duk_heaphdr *next; + + curr = heap->heap_allocated; + while (curr) { + /* We don't log or warn about freeing zero refcount objects + * because they may happen with finalizer processing. + */ + + DUK_DDD(DUK_DDDPRINT("FINALFREE (allocated): %!iO", (duk_heaphdr *) curr)); + next = DUK_HEAPHDR_GET_NEXT(heap, curr); + duk_heap_free_heaphdr_raw(heap, curr); + curr = next; + } +} + +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_LOCAL void duk__free_finalize_list(duk_heap *heap) { + duk_heaphdr *curr; + duk_heaphdr *next; + + curr = heap->finalize_list; + while (curr) { + DUK_DDD(DUK_DDDPRINT("FINALFREE (finalize_list): %!iO", (duk_heaphdr *) curr)); + next = DUK_HEAPHDR_GET_NEXT(heap, curr); + duk_heap_free_heaphdr_raw(heap, curr); + curr = next; + } +} +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +DUK_LOCAL void duk__free_stringtable(duk_heap *heap) { + /* strings are only tracked by stringtable */ + duk_heap_strtable_free(heap); +} + +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_LOCAL void duk__free_run_finalizers(duk_heap *heap) { + duk_heaphdr *curr; + duk_uint_t round_no; + duk_size_t count_all; + duk_size_t count_finalized; + duk_size_t curr_limit; + + DUK_ASSERT(heap != NULL); + +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_ASSERT(heap->refzero_list == NULL); /* refzero not running -> must be empty */ +#endif + DUK_ASSERT(heap->finalize_list == NULL); /* mark-and-sweep last pass */ + + if (heap->heap_thread == NULL) { + /* May happen when heap allocation fails right off. There + * cannot be any finalizable objects in this case. + */ + DUK_D(DUK_DPRINT("no heap_thread in heap destruct, assume no finalizable objects")); + return; + } + + /* Prevent finalize_list processing and mark-and-sweep entirely. + * Setting ms_running != 0 also prevents refzero handling from moving + * objects away from the heap_allocated list. The flag name is a bit + * misleading here. + * + * Use a distinct value for ms_running here (== 2) so that assertions + * can detect this situation separate from the normal runtime + * mark-and-sweep case. This allows better assertions (GH-2030). + */ + DUK_ASSERT(heap->pf_prevent_count == 0); + DUK_ASSERT(heap->ms_running == 0); + DUK_ASSERT(heap->ms_prevent_count == 0); + heap->pf_prevent_count = 1; + heap->ms_running = 2; /* Use distinguishable value. */ + heap->ms_prevent_count = 1; /* Bump, because mark-and-sweep assumes it's bumped when ms_running is set. */ + + curr_limit = 0; /* suppress warning, not used */ + for (round_no = 0;; round_no++) { + curr = heap->heap_allocated; + count_all = 0; + count_finalized = 0; + while (curr) { + count_all++; + if (DUK_HEAPHDR_IS_OBJECT(curr)) { + /* Only objects in heap_allocated may have finalizers. Check that + * the object itself has a _Finalizer property (own or inherited) + * so that we don't execute finalizers for e.g. Proxy objects. + */ + DUK_ASSERT(curr != NULL); + + if (DUK_HOBJECT_HAS_FINALIZER_FAST(heap, (duk_hobject *) curr)) { + if (!DUK_HEAPHDR_HAS_FINALIZED((duk_heaphdr *) curr)) { + DUK_ASSERT( + DUK_HEAP_HAS_FINALIZER_NORESCUE(heap)); /* maps to finalizer 2nd argument */ + duk_heap_run_finalizer(heap, (duk_hobject *) curr); + count_finalized++; + } + } + } + curr = DUK_HEAPHDR_GET_NEXT(heap, curr); + } + + /* Each round of finalizer execution may spawn new finalizable objects + * which is normal behavior for some applications. Allow multiple + * rounds of finalization, but use a shrinking limit based on the + * first round to detect the case where a runaway finalizer creates + * an unbounded amount of new finalizable objects. Finalizer rescue + * is not supported: the semantics are unclear because most of the + * objects being finalized here are already reachable. The finalizer + * is given a boolean to indicate that rescue is not possible. + * + * See discussion in: https://github.com/svaarala/duktape/pull/473 + */ + + if (round_no == 0) { + /* Cannot wrap: each object is at least 8 bytes so count is + * at most 1/8 of that. + */ + curr_limit = count_all * 2; + } else { + curr_limit = (curr_limit * 3) / 4; /* Decrease by 25% every round */ + } + DUK_D(DUK_DPRINT("finalizer round %ld complete, %ld objects, tried to execute %ld finalizers, current limit is %ld", + (long) round_no, + (long) count_all, + (long) count_finalized, + (long) curr_limit)); + + if (count_finalized == 0) { + DUK_D(DUK_DPRINT("no more finalizable objects, forced finalization finished")); + break; + } + if (count_finalized >= curr_limit) { + DUK_D(DUK_DPRINT("finalizer count above limit, potentially runaway finalizer; skip remaining finalizers")); + break; + } + } + + DUK_ASSERT(heap->ms_running == 2); + DUK_ASSERT(heap->pf_prevent_count == 1); + heap->ms_running = 0; + heap->pf_prevent_count = 0; +} +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +DUK_INTERNAL void duk_heap_free(duk_heap *heap) { + DUK_D(DUK_DPRINT("free heap: %p", (void *) heap)); + +#if defined(DUK_USE_DEBUG) + duk_heap_strtable_dump(heap); +#endif + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + /* Detach a debugger if attached (can be called multiple times) + * safely. + */ + /* XXX: Add a flag to reject an attempt to re-attach? Otherwise + * the detached callback may immediately reattach. + */ + duk_debug_do_detach(heap); +#endif + + /* Execute finalizers before freeing the heap, even for reachable + * objects. This gives finalizers the chance to free any native + * resources like file handles, allocations made outside Duktape, + * etc. This is quite tricky to get right, so that all finalizer + * guarantees are honored. + * + * Run mark-and-sweep a few times just in case (unreachable object + * finalizers run already here). The last round must rescue objects + * from the previous round without running any more finalizers. This + * ensures rescued objects get their FINALIZED flag cleared so that + * their finalizer is called once more in forced finalization to + * satisfy finalizer guarantees. However, we don't want to run any + * more finalizers because that'd required one more loop, and so on. + * + * XXX: this perhaps requires an execution time limit. + */ + DUK_D(DUK_DPRINT("execute finalizers before freeing heap")); + DUK_ASSERT(heap->pf_skip_finalizers == 0); + DUK_D(DUK_DPRINT("forced gc #1 in heap destruction")); + duk_heap_mark_and_sweep(heap, 0); + DUK_D(DUK_DPRINT("forced gc #2 in heap destruction")); + duk_heap_mark_and_sweep(heap, 0); + DUK_D(DUK_DPRINT("forced gc #3 in heap destruction (don't run finalizers)")); + heap->pf_skip_finalizers = 1; + duk_heap_mark_and_sweep(heap, 0); /* Skip finalizers; queue finalizable objects to heap_allocated. */ + + /* There are never objects in refzero_list at this point, or at any + * point beyond a DECREF (even a DECREF_NORZ). Since Duktape 2.1 + * refzero_list processing is side effect free, so it is always + * processed to completion by a DECREF initially triggering a zero + * refcount. + */ +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_ASSERT(heap->refzero_list == NULL); /* Always processed to completion inline. */ +#endif +#if defined(DUK_USE_FINALIZER_SUPPORT) + DUK_ASSERT(heap->finalize_list == NULL); /* Last mark-and-sweep with skip_finalizers. */ +#endif + +#if defined(DUK_USE_FINALIZER_SUPPORT) + DUK_D(DUK_DPRINT("run finalizers for remaining finalizable objects")); + DUK_HEAP_SET_FINALIZER_NORESCUE(heap); /* Rescue no longer supported. */ + duk__free_run_finalizers(heap); +#endif /* DUK_USE_FINALIZER_SUPPORT */ + + /* Note: heap->heap_thread, heap->curr_thread, and heap->heap_object + * are on the heap allocated list. + */ + + DUK_D(DUK_DPRINT("freeing temporary freelists")); + duk_heap_free_freelists(heap); + + DUK_D(DUK_DPRINT("freeing heap_allocated of heap: %p", (void *) heap)); + duk__free_allocated(heap); + +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_ASSERT(heap->refzero_list == NULL); /* Always processed to completion inline. */ +#endif + +#if defined(DUK_USE_FINALIZER_SUPPORT) + DUK_D(DUK_DPRINT("freeing finalize_list of heap: %p", (void *) heap)); + duk__free_finalize_list(heap); +#endif + + DUK_D(DUK_DPRINT("freeing string table of heap: %p", (void *) heap)); + duk__free_stringtable(heap); + + DUK_D(DUK_DPRINT("freeing heap structure: %p", (void *) heap)); + heap->free_func(heap->heap_udata, heap); +} + +/* + * Allocate a heap. + * + * String table is initialized with built-in strings from genbuiltins.py, + * either by dynamically creating the strings or by referring to ROM strings. + */ + +#if defined(DUK_USE_ROM_STRINGS) +DUK_LOCAL duk_bool_t duk__init_heap_strings(duk_heap *heap) { +#if defined(DUK_USE_ASSERTIONS) + duk_small_uint_t i; +#endif + + DUK_UNREF(heap); + + /* With ROM-based strings, heap->strs[] and thr->strs[] are omitted + * so nothing to initialize for strs[]. + */ + +#if defined(DUK_USE_ASSERTIONS) + for (i = 0; i < sizeof(duk_rom_strings_lookup) / sizeof(const duk_hstring *); i++) { + const duk_hstring *h; + duk_uint32_t hash; + + h = duk_rom_strings_lookup[i]; + while (h != NULL) { + hash = duk_heap_hashstring(heap, (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h), DUK_HSTRING_GET_BYTELEN(h)); + DUK_DD(DUK_DDPRINT("duk_rom_strings_lookup[%d] -> hash 0x%08lx, computed 0x%08lx", + (int) i, + (unsigned long) DUK_HSTRING_GET_HASH(h), + (unsigned long) hash)); + DUK_ASSERT(hash == (duk_uint32_t) DUK_HSTRING_GET_HASH(h)); + + h = (const duk_hstring *) h->hdr.h_next; + } + } +#endif + return 1; +} +#else /* DUK_USE_ROM_STRINGS */ + +DUK_LOCAL duk_bool_t duk__init_heap_strings(duk_heap *heap) { + duk_bitdecoder_ctx bd_ctx; + duk_bitdecoder_ctx *bd = &bd_ctx; /* convenience */ + duk_small_uint_t i; + + duk_memzero(&bd_ctx, sizeof(bd_ctx)); + bd->data = (const duk_uint8_t *) duk_strings_data; + bd->length = (duk_size_t) DUK_STRDATA_DATA_LENGTH; + + for (i = 0; i < DUK_HEAP_NUM_STRINGS; i++) { + duk_uint8_t tmp[DUK_STRDATA_MAX_STRLEN]; + duk_small_uint_t len; + duk_hstring *h; + + len = duk_bd_decode_bitpacked_string(bd, tmp); + + /* No need to length check string: it will never exceed even + * the 16-bit length maximum. + */ + DUK_ASSERT(len <= 0xffffUL); + DUK_DDD(DUK_DDDPRINT("intern built-in string %ld", (long) i)); + h = duk_heap_strtable_intern(heap, tmp, len); + if (!h) { + goto failed; + } + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) h)); + + /* Special flags checks. Since these strings are always + * reachable and a string cannot appear twice in the string + * table, there's no need to check/set these flags elsewhere. + * The 'internal' flag is set by string intern code. + */ + if (i == DUK_STRIDX_EVAL || i == DUK_STRIDX_LC_ARGUMENTS) { + DUK_HSTRING_SET_EVAL_OR_ARGUMENTS(h); + } + if (i >= DUK_STRIDX_START_RESERVED && i < DUK_STRIDX_END_RESERVED) { + DUK_HSTRING_SET_RESERVED_WORD(h); + if (i >= DUK_STRIDX_START_STRICT_RESERVED) { + DUK_HSTRING_SET_STRICT_RESERVED_WORD(h); + } + } + + DUK_DDD(DUK_DDDPRINT("interned: %!O", (duk_heaphdr *) h)); + + /* XXX: The incref macro takes a thread pointer but doesn't + * use it right now. + */ + DUK_HSTRING_INCREF(_never_referenced_, h); + +#if defined(DUK_USE_HEAPPTR16) + heap->strs16[i] = DUK_USE_HEAPPTR_ENC16(heap->heap_udata, (void *) h); +#else + heap->strs[i] = h; +#endif + } + + return 1; + +failed: + return 0; +} +#endif /* DUK_USE_ROM_STRINGS */ + +DUK_LOCAL duk_bool_t duk__init_heap_thread(duk_heap *heap) { + duk_hthread *thr; + + DUK_D(DUK_DPRINT("heap init: alloc heap thread")); + thr = duk_hthread_alloc_unchecked(heap, DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_THREAD)); + if (thr == NULL) { + DUK_D(DUK_DPRINT("failed to alloc heap_thread")); + return 0; + } + thr->state = DUK_HTHREAD_STATE_INACTIVE; +#if defined(DUK_USE_ROM_STRINGS) + /* No strs[] pointer. */ +#else /* DUK_USE_ROM_STRINGS */ +#if defined(DUK_USE_HEAPPTR16) + thr->strs16 = heap->strs16; +#else + thr->strs = heap->strs; +#endif +#endif /* DUK_USE_ROM_STRINGS */ + + heap->heap_thread = thr; + DUK_HTHREAD_INCREF(thr, thr); /* Note: first argument not really used */ + + /* 'thr' is now reachable */ + + DUK_D(DUK_DPRINT("heap init: init heap thread stacks")); + if (!duk_hthread_init_stacks(heap, thr)) { + return 0; + } + + /* XXX: this may now fail, and is not handled correctly */ + duk_hthread_create_builtin_objects(thr); + + /* default prototype */ + DUK_HOBJECT_SET_PROTOTYPE_INIT_INCREF(thr, (duk_hobject *) thr, thr->builtins[DUK_BIDX_THREAD_PROTOTYPE]); + + return 1; +} + +#if defined(DUK_USE_DEBUG) +#define DUK__DUMPSZ(t) \ + do { \ + DUK_D(DUK_DPRINT("" #t "=%ld", (long) sizeof(t))); \ + } while (0) + +/* These is not 100% because format would need to be non-portable "long long". + * Also print out as doubles to catch cases where the "long" type is not wide + * enough; the limits will then not be printed accurately but the magnitude + * will be correct. + */ +#define DUK__DUMPLM_SIGNED_RAW(t, a, b) \ + do { \ + DUK_D(DUK_DPRINT(t "=[%ld,%ld]=[%lf,%lf]", (long) (a), (long) (b), (double) (a), (double) (b))); \ + } while (0) +#define DUK__DUMPLM_UNSIGNED_RAW(t, a, b) \ + do { \ + DUK_D(DUK_DPRINT(t "=[%lu,%lu]=[%lf,%lf]", (unsigned long) (a), (unsigned long) (b), (double) (a), (double) (b))); \ + } while (0) +#define DUK__DUMPLM_SIGNED(t) \ + do { \ + DUK__DUMPLM_SIGNED_RAW("DUK_" #t "_{MIN,MAX}", DUK_##t##_MIN, DUK_##t##_MAX); \ + } while (0) +#define DUK__DUMPLM_UNSIGNED(t) \ + do { \ + DUK__DUMPLM_UNSIGNED_RAW("DUK_" #t "_{MIN,MAX}", DUK_##t##_MIN, DUK_##t##_MAX); \ + } while (0) + +DUK_LOCAL void duk__dump_type_sizes(void) { + DUK_D(DUK_DPRINT("sizeof()")); + + /* basic platform types */ + DUK__DUMPSZ(char); + DUK__DUMPSZ(short); + DUK__DUMPSZ(int); + DUK__DUMPSZ(long); + DUK__DUMPSZ(double); + DUK__DUMPSZ(void *); + DUK__DUMPSZ(size_t); + + /* basic types from duk_features.h */ + DUK__DUMPSZ(duk_uint8_t); + DUK__DUMPSZ(duk_int8_t); + DUK__DUMPSZ(duk_uint16_t); + DUK__DUMPSZ(duk_int16_t); + DUK__DUMPSZ(duk_uint32_t); + DUK__DUMPSZ(duk_int32_t); + DUK__DUMPSZ(duk_uint64_t); + DUK__DUMPSZ(duk_int64_t); + DUK__DUMPSZ(duk_uint_least8_t); + DUK__DUMPSZ(duk_int_least8_t); + DUK__DUMPSZ(duk_uint_least16_t); + DUK__DUMPSZ(duk_int_least16_t); + DUK__DUMPSZ(duk_uint_least32_t); + DUK__DUMPSZ(duk_int_least32_t); +#if defined(DUK_USE_64BIT_OPS) + DUK__DUMPSZ(duk_uint_least64_t); + DUK__DUMPSZ(duk_int_least64_t); +#endif + DUK__DUMPSZ(duk_uint_fast8_t); + DUK__DUMPSZ(duk_int_fast8_t); + DUK__DUMPSZ(duk_uint_fast16_t); + DUK__DUMPSZ(duk_int_fast16_t); + DUK__DUMPSZ(duk_uint_fast32_t); + DUK__DUMPSZ(duk_int_fast32_t); +#if defined(DUK_USE_64BIT_OPS) + DUK__DUMPSZ(duk_uint_fast64_t); + DUK__DUMPSZ(duk_int_fast64_t); +#endif + DUK__DUMPSZ(duk_uintptr_t); + DUK__DUMPSZ(duk_intptr_t); + DUK__DUMPSZ(duk_uintmax_t); + DUK__DUMPSZ(duk_intmax_t); + DUK__DUMPSZ(duk_double_t); + + /* important chosen base types */ + DUK__DUMPSZ(duk_int_t); + DUK__DUMPSZ(duk_uint_t); + DUK__DUMPSZ(duk_int_fast_t); + DUK__DUMPSZ(duk_uint_fast_t); + DUK__DUMPSZ(duk_small_int_t); + DUK__DUMPSZ(duk_small_uint_t); + DUK__DUMPSZ(duk_small_int_fast_t); + DUK__DUMPSZ(duk_small_uint_fast_t); + + /* some derived types */ + DUK__DUMPSZ(duk_codepoint_t); + DUK__DUMPSZ(duk_ucodepoint_t); + DUK__DUMPSZ(duk_idx_t); + DUK__DUMPSZ(duk_errcode_t); + DUK__DUMPSZ(duk_uarridx_t); + + /* tval */ + DUK__DUMPSZ(duk_double_union); + DUK__DUMPSZ(duk_tval); + + /* structs from duk_forwdecl.h */ + DUK__DUMPSZ(duk_jmpbuf); /* just one 'int' for C++ exceptions */ + DUK__DUMPSZ(duk_heaphdr); + DUK__DUMPSZ(duk_heaphdr_string); + DUK__DUMPSZ(duk_hstring); + DUK__DUMPSZ(duk_hstring_external); + DUK__DUMPSZ(duk_hobject); + DUK__DUMPSZ(duk_harray); + DUK__DUMPSZ(duk_hcompfunc); + DUK__DUMPSZ(duk_hnatfunc); + DUK__DUMPSZ(duk_hdecenv); + DUK__DUMPSZ(duk_hobjenv); + DUK__DUMPSZ(duk_hthread); +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + DUK__DUMPSZ(duk_hbufobj); +#endif + DUK__DUMPSZ(duk_hproxy); + DUK__DUMPSZ(duk_hbuffer); + DUK__DUMPSZ(duk_hbuffer_fixed); + DUK__DUMPSZ(duk_hbuffer_dynamic); + DUK__DUMPSZ(duk_hbuffer_external); + DUK__DUMPSZ(duk_propaccessor); + DUK__DUMPSZ(duk_propvalue); + DUK__DUMPSZ(duk_propdesc); + DUK__DUMPSZ(duk_heap); + DUK__DUMPSZ(duk_activation); + DUK__DUMPSZ(duk_catcher); + DUK__DUMPSZ(duk_strcache_entry); + DUK__DUMPSZ(duk_litcache_entry); + DUK__DUMPSZ(duk_ljstate); + DUK__DUMPSZ(duk_fixedbuffer); + DUK__DUMPSZ(duk_bitdecoder_ctx); + DUK__DUMPSZ(duk_bitencoder_ctx); + DUK__DUMPSZ(duk_token); + DUK__DUMPSZ(duk_re_token); + DUK__DUMPSZ(duk_lexer_point); + DUK__DUMPSZ(duk_lexer_ctx); + DUK__DUMPSZ(duk_compiler_instr); + DUK__DUMPSZ(duk_compiler_func); + DUK__DUMPSZ(duk_compiler_ctx); + DUK__DUMPSZ(duk_re_matcher_ctx); + DUK__DUMPSZ(duk_re_compiler_ctx); +} +DUK_LOCAL void duk__dump_type_limits(void) { + DUK_D(DUK_DPRINT("limits")); + + /* basic types */ + DUK__DUMPLM_SIGNED(INT8); + DUK__DUMPLM_UNSIGNED(UINT8); + DUK__DUMPLM_SIGNED(INT_FAST8); + DUK__DUMPLM_UNSIGNED(UINT_FAST8); + DUK__DUMPLM_SIGNED(INT_LEAST8); + DUK__DUMPLM_UNSIGNED(UINT_LEAST8); + DUK__DUMPLM_SIGNED(INT16); + DUK__DUMPLM_UNSIGNED(UINT16); + DUK__DUMPLM_SIGNED(INT_FAST16); + DUK__DUMPLM_UNSIGNED(UINT_FAST16); + DUK__DUMPLM_SIGNED(INT_LEAST16); + DUK__DUMPLM_UNSIGNED(UINT_LEAST16); + DUK__DUMPLM_SIGNED(INT32); + DUK__DUMPLM_UNSIGNED(UINT32); + DUK__DUMPLM_SIGNED(INT_FAST32); + DUK__DUMPLM_UNSIGNED(UINT_FAST32); + DUK__DUMPLM_SIGNED(INT_LEAST32); + DUK__DUMPLM_UNSIGNED(UINT_LEAST32); +#if defined(DUK_USE_64BIT_OPS) + DUK__DUMPLM_SIGNED(INT64); + DUK__DUMPLM_UNSIGNED(UINT64); + DUK__DUMPLM_SIGNED(INT_FAST64); + DUK__DUMPLM_UNSIGNED(UINT_FAST64); + DUK__DUMPLM_SIGNED(INT_LEAST64); + DUK__DUMPLM_UNSIGNED(UINT_LEAST64); +#endif + DUK__DUMPLM_SIGNED(INTPTR); + DUK__DUMPLM_UNSIGNED(UINTPTR); + DUK__DUMPLM_SIGNED(INTMAX); + DUK__DUMPLM_UNSIGNED(UINTMAX); + + /* derived types */ + DUK__DUMPLM_SIGNED(INT); + DUK__DUMPLM_UNSIGNED(UINT); + DUK__DUMPLM_SIGNED(INT_FAST); + DUK__DUMPLM_UNSIGNED(UINT_FAST); + DUK__DUMPLM_SIGNED(SMALL_INT); + DUK__DUMPLM_UNSIGNED(SMALL_UINT); + DUK__DUMPLM_SIGNED(SMALL_INT_FAST); + DUK__DUMPLM_UNSIGNED(SMALL_UINT_FAST); +} + +DUK_LOCAL void duk__dump_misc_options(void) { + DUK_D(DUK_DPRINT("DUK_VERSION: %ld", (long) DUK_VERSION)); + DUK_D(DUK_DPRINT("DUK_GIT_DESCRIBE: %s", DUK_GIT_DESCRIBE)); + DUK_D(DUK_DPRINT("OS string: %s", DUK_USE_OS_STRING)); + DUK_D(DUK_DPRINT("architecture string: %s", DUK_USE_ARCH_STRING)); + DUK_D(DUK_DPRINT("compiler string: %s", DUK_USE_COMPILER_STRING)); + DUK_D(DUK_DPRINT("debug level: %ld", (long) DUK_USE_DEBUG_LEVEL)); +#if defined(DUK_USE_PACKED_TVAL) + DUK_D(DUK_DPRINT("DUK_USE_PACKED_TVAL: yes")); +#else + DUK_D(DUK_DPRINT("DUK_USE_PACKED_TVAL: no")); +#endif +#if defined(DUK_USE_VARIADIC_MACROS) + DUK_D(DUK_DPRINT("DUK_USE_VARIADIC_MACROS: yes")); +#else + DUK_D(DUK_DPRINT("DUK_USE_VARIADIC_MACROS: no")); +#endif +#if defined(DUK_USE_INTEGER_LE) + DUK_D(DUK_DPRINT("integer endianness: little")); +#elif defined(DUK_USE_INTEGER_ME) + DUK_D(DUK_DPRINT("integer endianness: mixed")); +#elif defined(DUK_USE_INTEGER_BE) + DUK_D(DUK_DPRINT("integer endianness: big")); +#else + DUK_D(DUK_DPRINT("integer endianness: ???")); +#endif +#if defined(DUK_USE_DOUBLE_LE) + DUK_D(DUK_DPRINT("IEEE double endianness: little")); +#elif defined(DUK_USE_DOUBLE_ME) + DUK_D(DUK_DPRINT("IEEE double endianness: mixed")); +#elif defined(DUK_USE_DOUBLE_BE) + DUK_D(DUK_DPRINT("IEEE double endianness: big")); +#else + DUK_D(DUK_DPRINT("IEEE double endianness: ???")); +#endif +} +#endif /* DUK_USE_DEBUG */ + +DUK_INTERNAL +duk_heap *duk_heap_alloc(duk_alloc_function alloc_func, + duk_realloc_function realloc_func, + duk_free_function free_func, + void *heap_udata, + duk_fatal_function fatal_func) { + duk_heap *res = NULL; + duk_uint32_t st_initsize; + + DUK_D(DUK_DPRINT("allocate heap")); + + /* + * Random config sanity asserts + */ + + DUK_ASSERT(DUK_USE_STRTAB_MINSIZE >= 64); + + DUK_ASSERT((DUK_HTYPE_STRING & 0x01U) == 0); + DUK_ASSERT((DUK_HTYPE_BUFFER & 0x01U) == 0); + DUK_ASSERT((DUK_HTYPE_OBJECT & 0x01U) == 1); /* DUK_HEAPHDR_IS_OBJECT() relies ont his. */ + + /* + * Debug dump type sizes + */ + +#if defined(DUK_USE_DEBUG) + duk__dump_misc_options(); + duk__dump_type_sizes(); + duk__dump_type_limits(); +#endif + + /* + * If selftests enabled, run them as early as possible. + */ + +#if defined(DUK_USE_SELF_TESTS) + DUK_D(DUK_DPRINT("run self tests")); + if (duk_selftest_run_tests(alloc_func, realloc_func, free_func, heap_udata) > 0) { + fatal_func(heap_udata, "self test(s) failed"); + } + DUK_D(DUK_DPRINT("self tests passed")); +#endif + + /* + * Important assert-like checks that should be enabled even + * when assertions are otherwise not enabled. + */ + +#if defined(DUK_USE_EXEC_REGCONST_OPTIMIZE) + /* Can't check sizeof() using preprocessor so explicit check. + * This will be optimized away in practice; unfortunately a + * warning is generated on some compilers as a result. + */ +#if defined(DUK_USE_PACKED_TVAL) + if (sizeof(duk_tval) != 8) { +#else + if (sizeof(duk_tval) != 16) { +#endif + fatal_func(heap_udata, "sizeof(duk_tval) not 8 or 16, cannot use DUK_USE_EXEC_REGCONST_OPTIMIZE option"); + } +#endif /* DUK_USE_EXEC_REGCONST_OPTIMIZE */ + + /* + * Computed values (e.g. INFINITY) + */ + +#if defined(DUK_USE_COMPUTED_NAN) + do { + /* Workaround for some exotic platforms where NAN is missing + * and the expression (0.0 / 0.0) does NOT result in a NaN. + * Such platforms use the global 'duk_computed_nan' which must + * be initialized at runtime. Use 'volatile' to ensure that + * the compiler will actually do the computation and not try + * to do constant folding which might result in the original + * problem. + */ + volatile double dbl1 = 0.0; + volatile double dbl2 = 0.0; + duk_computed_nan = dbl1 / dbl2; + } while (0); +#endif + +#if defined(DUK_USE_COMPUTED_INFINITY) + do { + /* Similar workaround for INFINITY. */ + volatile double dbl1 = 1.0; + volatile double dbl2 = 0.0; + duk_computed_infinity = dbl1 / dbl2; + } while (0); +#endif + + /* + * Allocate heap struct + * + * Use a raw call, all macros expect the heap to be initialized + */ + +#if defined(DUK_USE_INJECT_HEAP_ALLOC_ERROR) && (DUK_USE_INJECT_HEAP_ALLOC_ERROR == 1) + goto failed; +#endif + DUK_D(DUK_DPRINT("alloc duk_heap object")); + res = (duk_heap *) alloc_func(heap_udata, sizeof(duk_heap)); + if (!res) { + goto failed; + } + + /* + * Zero the struct, and start initializing roughly in order + */ + + duk_memzero(res, sizeof(*res)); +#if defined(DUK_USE_ASSERTIONS) + res->heap_initializing = 1; +#endif + + /* explicit NULL inits */ +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + res->heap_udata = NULL; + res->heap_allocated = NULL; +#if defined(DUK_USE_REFERENCE_COUNTING) + res->refzero_list = NULL; +#endif +#if defined(DUK_USE_FINALIZER_SUPPORT) + res->finalize_list = NULL; +#if defined(DUK_USE_ASSERTIONS) + res->currently_finalizing = NULL; +#endif +#endif +#if defined(DUK_USE_CACHE_ACTIVATION) + res->activation_free = NULL; +#endif +#if defined(DUK_USE_CACHE_CATCHER) + res->catcher_free = NULL; +#endif + res->heap_thread = NULL; + res->curr_thread = NULL; + res->heap_object = NULL; +#if defined(DUK_USE_STRTAB_PTRCOMP) + res->strtable16 = NULL; +#else + res->strtable = NULL; +#endif +#if defined(DUK_USE_ROM_STRINGS) + /* no res->strs[] */ +#else /* DUK_USE_ROM_STRINGS */ +#if defined(DUK_USE_HEAPPTR16) + /* res->strs16[] is zeroed and zero decodes to NULL, so no NULL inits. */ +#else + { + duk_small_uint_t i; + for (i = 0; i < DUK_HEAP_NUM_STRINGS; i++) { + res->strs[i] = NULL; + } + } +#endif +#endif /* DUK_USE_ROM_STRINGS */ +#if defined(DUK_USE_DEBUGGER_SUPPORT) + res->dbg_read_cb = NULL; + res->dbg_write_cb = NULL; + res->dbg_peek_cb = NULL; + res->dbg_read_flush_cb = NULL; + res->dbg_write_flush_cb = NULL; + res->dbg_request_cb = NULL; + res->dbg_udata = NULL; + res->dbg_pause_act = NULL; +#endif +#endif /* DUK_USE_EXPLICIT_NULL_INIT */ + + res->alloc_func = alloc_func; + res->realloc_func = realloc_func; + res->free_func = free_func; + res->heap_udata = heap_udata; + res->fatal_func = fatal_func; + + /* XXX: for now there's a pointer packing zero assumption, i.e. + * NULL <=> compressed pointer 0. If this is removed, may need + * to precompute e.g. null16 here. + */ + + /* res->ms_trigger_counter == 0 -> now causes immediate GC; which is OK */ + + /* Prevent mark-and-sweep and finalizer execution until heap is completely + * initialized. + */ + DUK_ASSERT(res->ms_prevent_count == 0); + DUK_ASSERT(res->pf_prevent_count == 0); + res->ms_prevent_count = 1; + res->pf_prevent_count = 1; + DUK_ASSERT(res->ms_running == 0); + + res->call_recursion_depth = 0; + res->call_recursion_limit = DUK_USE_NATIVE_CALL_RECLIMIT; + + /* XXX: use the pointer as a seed for now: mix in time at least */ + + /* The casts through duk_uintptr_t is to avoid the following GCC warning: + * + * warning: cast from pointer to integer of different size [-Wpointer-to-int-cast] + * + * This still generates a /Wp64 warning on VS2010 when compiling for x86. + */ +#if defined(DUK_USE_ROM_STRINGS) + /* XXX: make a common DUK_USE_ option, and allow custom fixed seed? */ + DUK_D(DUK_DPRINT("using rom strings, force heap hash_seed to fixed value 0x%08lx", (long) DUK__FIXED_HASH_SEED)); + res->hash_seed = (duk_uint32_t) DUK__FIXED_HASH_SEED; +#else /* DUK_USE_ROM_STRINGS */ + res->hash_seed = (duk_uint32_t) (duk_uintptr_t) res; +#if !defined(DUK_USE_STRHASH_DENSE) + res->hash_seed ^= 5381; /* Bernstein hash init value is normally 5381; XOR it in in case pointer low bits are 0 */ +#endif +#endif /* DUK_USE_ROM_STRINGS */ + +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + res->lj.jmpbuf_ptr = NULL; +#endif + DUK_ASSERT(res->lj.type == DUK_LJ_TYPE_UNKNOWN); /* zero */ + DUK_ASSERT(res->lj.iserror == 0); + DUK_TVAL_SET_UNDEFINED(&res->lj.value1); + DUK_TVAL_SET_UNDEFINED(&res->lj.value2); + + DUK_ASSERT_LJSTATE_UNSET(res); + + /* + * Init stringtable: fixed variant + */ + + st_initsize = DUK_USE_STRTAB_MINSIZE; +#if defined(DUK_USE_STRTAB_PTRCOMP) + res->strtable16 = (duk_uint16_t *) alloc_func(heap_udata, sizeof(duk_uint16_t) * st_initsize); + if (res->strtable16 == NULL) { + goto failed; + } +#else + res->strtable = (duk_hstring **) alloc_func(heap_udata, sizeof(duk_hstring *) * st_initsize); + if (res->strtable == NULL) { + goto failed; + } +#endif + res->st_size = st_initsize; + res->st_mask = st_initsize - 1; +#if (DUK_USE_STRTAB_MINSIZE != DUK_USE_STRTAB_MAXSIZE) + DUK_ASSERT(res->st_count == 0); +#endif + +#if defined(DUK_USE_STRTAB_PTRCOMP) + /* zero assumption */ + duk_memzero(res->strtable16, sizeof(duk_uint16_t) * st_initsize); +#else +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + { + duk_uint32_t i; + for (i = 0; i < st_initsize; i++) { + res->strtable[i] = NULL; + } + } +#else + duk_memzero(res->strtable, sizeof(duk_hstring *) * st_initsize); +#endif /* DUK_USE_EXPLICIT_NULL_INIT */ +#endif /* DUK_USE_STRTAB_PTRCOMP */ + + /* + * Init stringcache + */ + +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + { + duk_uint_t i; + for (i = 0; i < DUK_HEAP_STRCACHE_SIZE; i++) { + res->strcache[i].h = NULL; + } + } +#endif + + /* + * Init litcache + */ +#if defined(DUK_USE_LITCACHE_SIZE) + DUK_ASSERT(DUK_USE_LITCACHE_SIZE > 0); + DUK_ASSERT(DUK_IS_POWER_OF_TWO((duk_uint_t) DUK_USE_LITCACHE_SIZE)); +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + { + duk_uint_t i; + for (i = 0; i < DUK_USE_LITCACHE_SIZE; i++) { + res->litcache[i].addr = NULL; + res->litcache[i].h = NULL; + } + } +#endif +#endif /* DUK_USE_LITCACHE_SIZE */ + + /* XXX: error handling is incomplete. It would be cleanest if + * there was a setjmp catchpoint, so that all init code could + * freely throw errors. If that were the case, the return code + * passing here could be removed. + */ + + /* + * Init built-in strings + */ + +#if defined(DUK_USE_INJECT_HEAP_ALLOC_ERROR) && (DUK_USE_INJECT_HEAP_ALLOC_ERROR == 2) + goto failed; +#endif + DUK_D(DUK_DPRINT("heap init: initialize heap strings")); + if (!duk__init_heap_strings(res)) { + goto failed; + } + + /* + * Init the heap thread + */ + +#if defined(DUK_USE_INJECT_HEAP_ALLOC_ERROR) && (DUK_USE_INJECT_HEAP_ALLOC_ERROR == 3) + goto failed; +#endif + DUK_D(DUK_DPRINT("heap init: initialize heap thread")); + if (!duk__init_heap_thread(res)) { + goto failed; + } + + /* + * Init the heap object + */ + +#if defined(DUK_USE_INJECT_HEAP_ALLOC_ERROR) && (DUK_USE_INJECT_HEAP_ALLOC_ERROR == 4) + goto failed; +#endif + DUK_D(DUK_DPRINT("heap init: initialize heap object")); + DUK_ASSERT(res->heap_thread != NULL); + res->heap_object = duk_hobject_alloc_unchecked(res, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJECT)); + if (res->heap_object == NULL) { + goto failed; + } + DUK_HOBJECT_INCREF(res->heap_thread, res->heap_object); + + /* + * Odds and ends depending on the heap thread + */ + +#if !defined(DUK_USE_GET_RANDOM_DOUBLE) +#if defined(DUK_USE_PREFER_SIZE) || !defined(DUK_USE_64BIT_OPS) + res->rnd_state = (duk_uint32_t) duk_time_get_ecmascript_time(res->heap_thread); + duk_util_tinyrandom_prepare_seed(res->heap_thread); +#else + res->rnd_state[0] = (duk_uint64_t) duk_time_get_ecmascript_time(res->heap_thread); + DUK_ASSERT(res->rnd_state[1] == 0); /* Not filled here, filled in by seed preparation. */ +#if 0 /* Manual test values matching misc/xoroshiro128plus_test.c. */ + res->rnd_state[0] = DUK_U64_CONSTANT(0xdeadbeef12345678); + res->rnd_state[1] = DUK_U64_CONSTANT(0xcafed00d12345678); +#endif + duk_util_tinyrandom_prepare_seed(res->heap_thread); + /* Mix in heap pointer: this ensures that if two Duktape heaps are + * created on the same millisecond, they get a different PRNG + * sequence (unless e.g. virtual memory addresses cause also the + * heap object pointer to be the same). + */ + { + duk_uint64_t tmp_u64; + tmp_u64 = 0; + duk_memcpy((void *) &tmp_u64, + (const void *) &res, + (size_t) (sizeof(void *) >= sizeof(duk_uint64_t) ? sizeof(duk_uint64_t) : sizeof(void *))); + res->rnd_state[1] ^= tmp_u64; + } + do { + duk_small_uint_t i; + for (i = 0; i < 10; i++) { + /* Throw away a few initial random numbers just in + * case. Probably unnecessary due to SplitMix64 + * preparation. + */ + (void) duk_util_tinyrandom_get_double(res->heap_thread); + } + } while (0); +#endif +#endif + + /* + * Allow finalizer and mark-and-sweep processing. + */ + + DUK_D(DUK_DPRINT("heap init: allow finalizer/mark-and-sweep processing")); + DUK_ASSERT(res->ms_prevent_count == 1); + DUK_ASSERT(res->pf_prevent_count == 1); + res->ms_prevent_count = 0; + res->pf_prevent_count = 0; + DUK_ASSERT(res->ms_running == 0); +#if defined(DUK_USE_ASSERTIONS) + res->heap_initializing = 0; +#endif + + /* + * All done. + */ + + DUK_D(DUK_DPRINT("allocated heap: %p", (void *) res)); + return res; + +failed: + DUK_D(DUK_DPRINT("heap allocation failed")); + + if (res != NULL) { + /* Assumes that allocated pointers and alloc funcs are valid + * if res exists. + */ + DUK_ASSERT(res->ms_prevent_count == 1); + DUK_ASSERT(res->pf_prevent_count == 1); + DUK_ASSERT(res->ms_running == 0); + if (res->heap_thread != NULL) { + res->ms_prevent_count = 0; + res->pf_prevent_count = 0; + } +#if defined(DUK_USE_ASSERTIONS) + res->heap_initializing = 0; +#endif + + DUK_ASSERT(res->alloc_func != NULL); + DUK_ASSERT(res->realloc_func != NULL); + DUK_ASSERT(res->free_func != NULL); + duk_heap_free(res); + } + + return NULL; +} + +/* automatic undefs */ +#undef DUK__DUMPLM_SIGNED +#undef DUK__DUMPLM_SIGNED_RAW +#undef DUK__DUMPLM_UNSIGNED +#undef DUK__DUMPLM_UNSIGNED_RAW +#undef DUK__DUMPSZ +#undef DUK__FIXED_HASH_SEED +#line 1 "duk_heap_finalize.c" +/* + * Finalizer handling. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_FINALIZER_SUPPORT) + +/* + * Fake torture finalizer. + */ + +#if defined(DUK_USE_FINALIZER_TORTURE) +DUK_LOCAL duk_ret_t duk__fake_global_finalizer(duk_hthread *thr) { + DUK_DD(DUK_DDPRINT("fake global torture finalizer executed")); + + /* Require a lot of stack to force a value stack grow/shrink. */ + duk_require_stack(thr, 100000); + + /* Force a reallocation with pointer change for value stack + * to maximize side effects. + */ + duk_hthread_valstack_torture_realloc(thr); + + /* Inner function call, error throw. */ + duk_eval_string_noresult(thr, + "(function dummy() {\n" + " dummy.prototype = null; /* break reference loop */\n" + " try {\n" + " throw 'fake-finalizer-dummy-error';\n" + " } catch (e) {\n" + " void e;\n" + " }\n" + "})()"); + + /* The above creates garbage (e.g. a function instance). Because + * the function/prototype reference loop is broken, it gets collected + * immediately by DECREF. If Function.prototype has a _Finalizer + * property (happens in some test cases), the garbage gets queued to + * finalize_list. This still won't cause an infinite loop because + * the torture finalizer is called once per finalize_list run and + * the garbage gets handled in the same run. (If the garbage needs + * mark-and-sweep collection, an infinite loop might ensue.) + */ + return 0; +} + +DUK_LOCAL void duk__run_global_torture_finalizer(duk_hthread *thr) { + DUK_ASSERT(thr != NULL); + + /* Avoid fake finalization when callstack limit is near. Otherwise + * a callstack limit error will be created, then refzero'ed. The + * +5 headroom is conservative. + */ + if (thr->heap->call_recursion_depth + 5 >= thr->heap->call_recursion_limit || + thr->callstack_top + 5 >= DUK_USE_CALLSTACK_LIMIT) { + DUK_D(DUK_DPRINT("skip global torture finalizer, too little headroom for call recursion or call stack size")); + return; + } + + /* Run fake finalizer. Avoid creating unnecessary garbage. */ + duk_push_c_function(thr, duk__fake_global_finalizer, 0 /*nargs*/); + (void) duk_pcall(thr, 0 /*nargs*/); + duk_pop(thr); +} +#endif /* DUK_USE_FINALIZER_TORTURE */ + +/* + * Process the finalize_list to completion. + * + * An object may be placed on finalize_list by either refcounting or + * mark-and-sweep. The refcount of objects placed by refcounting will be + * zero; the refcount of objects placed by mark-and-sweep is > 0. In both + * cases the refcount is bumped by 1 artificially so that a REFZERO event + * can never happen while an object is waiting for finalization. Without + * this bump a REFZERO could now happen because user code may call + * duk_push_heapptr() and then pop a value even when it's on finalize_list. + * + * List processing assumes refcounts are kept up-to-date at all times, so + * that once the finalizer returns, a zero refcount is a reliable reason to + * free the object immediately rather than place it back to the heap. This + * is the case because we run outside of refzero_list processing so that + * DECREF cascades are handled fully inline. + * + * For mark-and-sweep queued objects (had_zero_refcount false) the object + * may be freed immediately if its refcount is zero after the finalizer call + * (i.e. finalizer removed the reference loop for the object). If not, the + * next mark-and-sweep will collect the object unless it has become reachable + * (i.e. rescued) by that time and its refcount hasn't fallen to zero before + * that. Mark-and-sweep detects these objects because their FINALIZED flag + * is set. + * + * There's an inherent limitation for mark-and-sweep finalizer rescuing: an + * object won't get refinalized if (1) it's rescued, but (2) becomes + * unreachable before mark-and-sweep has had time to notice it. The next + * mark-and-sweep round simply doesn't have any information of whether the + * object has been unreachable the whole time or not (the only way to get + * that information would be a mark-and-sweep pass for *every finalized + * object*). This is awkward for the application because the mark-and-sweep + * round is not generally visible or under full application control. + * + * For refcount queued objects (had_zero_refcount true) the object is either + * immediately freed or rescued, and waiting for a mark-and-sweep round is not + * necessary (or desirable); FINALIZED is cleared when a rescued object is + * queued back to heap_allocated. The object is eligible for finalization + * again (either via refcounting or mark-and-sweep) immediately after being + * rescued. If a refcount finalized object is placed into an unreachable + * reference loop by its finalizer, it will get collected by mark-and-sweep + * and currently the finalizer will execute again. + * + * There's a special case where: + * + * - Mark-and-sweep queues an object to finalize_list for finalization. + * - The finalizer is executed, FINALIZED is set, and object is queued + * back to heap_allocated, waiting for a new mark-and-sweep round. + * - The object's refcount drops to zero before mark-and-sweep has a + * chance to run another round and make a rescue/free decision. + * + * This is now handled by refzero code: if an object has a finalizer but + * FINALIZED is already set, the object is freed without finalizer processing. + * The outcome is the same as if mark-and-sweep was executed at that point; + * mark-and-sweep would also free the object without another finalizer run. + * This could also be changed so that the refzero-triggered finalizer *IS* + * executed: being refzero collected implies someone has operated on the + * object so it hasn't been totally unreachable the whole time. This would + * risk a finalizer loop however. + */ + +DUK_INTERNAL void duk_heap_process_finalize_list(duk_heap *heap) { + duk_heaphdr *curr; +#if defined(DUK_USE_DEBUG) + duk_size_t count = 0; +#endif + + DUK_DDD(DUK_DDDPRINT("duk_heap_process_finalize_list: %p", (void *) heap)); + + if (heap->pf_prevent_count != 0) { + DUK_DDD(DUK_DDDPRINT("skip finalize_list processing: pf_prevent_count != 0")); + return; + } + + /* Heap alloc prevents mark-and-sweep before heap_thread is ready. */ + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->heap_thread != NULL); + DUK_ASSERT(heap->heap_thread->valstack != NULL); +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_ASSERT(heap->refzero_list == NULL); +#endif + + DUK_ASSERT(heap->pf_prevent_count == 0); + heap->pf_prevent_count = 1; + + /* Mark-and-sweep no longer needs to be prevented when running + * finalizers: mark-and-sweep skips any rescue decisions if there + * are any objects in finalize_list when mark-and-sweep is entered. + * This protects finalized objects from incorrect rescue decisions + * caused by finalize_list being a reachability root and only + * partially processed. Freeing decisions are not postponed. + */ + + /* When finalizer torture is enabled, make a fake finalizer call with + * maximum side effects regardless of whether finalize_list is empty. + */ +#if defined(DUK_USE_FINALIZER_TORTURE) + duk__run_global_torture_finalizer(heap->heap_thread); +#endif + + /* Process finalize_list until it becomes empty. There's currently no + * protection against a finalizer always creating more garbage. + */ + while ((curr = heap->finalize_list) != NULL) { +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_bool_t queue_back; +#endif + + DUK_DD(DUK_DDPRINT("processing finalize_list entry: %p -> %!iO", (void *) curr, curr)); + + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(curr) == DUK_HTYPE_OBJECT); /* Only objects have finalizers. */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_REACHABLE(curr)); + DUK_ASSERT(!DUK_HEAPHDR_HAS_TEMPROOT(curr)); + DUK_ASSERT(DUK_HEAPHDR_HAS_FINALIZABLE( + curr)); /* All objects on finalize_list will have this flag (except object being finalized right now). */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_FINALIZED(curr)); /* Queueing code ensures. */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY(curr)); /* ROM objects never get freed (or finalized). */ + +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(heap->currently_finalizing == NULL); + heap->currently_finalizing = curr; +#endif + + /* Clear FINALIZABLE for object being finalized, so that + * duk_push_heapptr() can properly ignore the object. + */ + DUK_HEAPHDR_CLEAR_FINALIZABLE(curr); + + if (DUK_LIKELY(!heap->pf_skip_finalizers)) { + /* Run the finalizer, duk_heap_run_finalizer() sets + * and checks for FINALIZED to prevent the finalizer + * from executing multiple times per finalization cycle. + * (This safeguard shouldn't be actually needed anymore). + */ + +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_bool_t had_zero_refcount; +#endif + + /* The object's refcount is >0 throughout so it won't be + * refzero processed prematurely. + */ +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(curr) >= 1); + had_zero_refcount = (DUK_HEAPHDR_GET_REFCOUNT(curr) == 1); /* Preincremented on finalize_list insert. */ +#endif + + DUK_ASSERT(!DUK_HEAPHDR_HAS_FINALIZED(curr)); + duk_heap_run_finalizer(heap, (duk_hobject *) curr); /* must never longjmp */ + DUK_ASSERT(DUK_HEAPHDR_HAS_FINALIZED(curr)); + /* XXX: assert that object is still in finalize_list + * when duk_push_heapptr() allows automatic rescue. + */ + +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_DD(DUK_DDPRINT("refcount after finalizer (includes bump): %ld", (long) DUK_HEAPHDR_GET_REFCOUNT(curr))); + if (DUK_HEAPHDR_GET_REFCOUNT(curr) == 1) { /* Only artificial bump in refcount? */ +#if defined(DUK_USE_DEBUG) + if (had_zero_refcount) { + DUK_DD(DUK_DDPRINT( + "finalized object's refcount is zero -> free immediately (refcount queued)")); + } else { + DUK_DD(DUK_DDPRINT( + "finalized object's refcount is zero -> free immediately (mark-and-sweep queued)")); + } +#endif + queue_back = 0; + } else +#endif + { +#if defined(DUK_USE_REFERENCE_COUNTING) + queue_back = 1; + if (had_zero_refcount) { + /* When finalization is triggered + * by refzero and we queue the object + * back, clear FINALIZED right away + * so that the object can be refinalized + * immediately if necessary. + */ + DUK_HEAPHDR_CLEAR_FINALIZED(curr); + } +#endif + } + } else { + /* Used during heap destruction: don't actually run finalizers + * because we're heading into forced finalization. Instead, + * queue finalizable objects back to the heap_allocated list. + */ + DUK_D(DUK_DPRINT("skip finalizers flag set, queue object to heap_allocated without finalizing")); + DUK_ASSERT(!DUK_HEAPHDR_HAS_FINALIZED(curr)); +#if defined(DUK_USE_REFERENCE_COUNTING) + queue_back = 1; +#endif + } + + /* Dequeue object from finalize_list. Note that 'curr' may no + * longer be finalize_list head because new objects may have + * been queued to the list. As a result we can't optimize for + * the single-linked heap case and must scan the list for + * removal, typically the scan is very short however. + */ + DUK_HEAP_REMOVE_FROM_FINALIZE_LIST(heap, curr); + + /* Queue back to heap_allocated or free immediately. */ +#if defined(DUK_USE_REFERENCE_COUNTING) + if (queue_back) { + /* FINALIZED is only cleared if object originally + * queued for finalization by refcounting. For + * mark-and-sweep FINALIZED is left set, so that + * next mark-and-sweep round can make a rescue/free + * decision. + */ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(curr) >= 1); + DUK_HEAPHDR_PREDEC_REFCOUNT(curr); /* Remove artificial refcount bump. */ + DUK_HEAPHDR_CLEAR_FINALIZABLE(curr); + DUK_HEAP_INSERT_INTO_HEAP_ALLOCATED(heap, curr); + } else { + /* No need to remove the refcount bump here. */ + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(curr) == DUK_HTYPE_OBJECT); /* currently, always the case */ + DUK_DD(DUK_DDPRINT("refcount finalize after finalizer call: %!O", curr)); + duk_hobject_refcount_finalize_norz(heap, (duk_hobject *) curr); + duk_free_hobject(heap, (duk_hobject *) curr); + DUK_DD(DUK_DDPRINT("freed hobject after finalization: %p", (void *) curr)); + } +#else /* DUK_USE_REFERENCE_COUNTING */ + DUK_HEAPHDR_CLEAR_FINALIZABLE(curr); + DUK_HEAP_INSERT_INTO_HEAP_ALLOCATED(heap, curr); +#endif /* DUK_USE_REFERENCE_COUNTING */ + +#if defined(DUK_USE_DEBUG) + count++; +#endif + +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(heap->currently_finalizing != NULL); + heap->currently_finalizing = NULL; +#endif + } + + /* finalize_list will always be processed completely. */ + DUK_ASSERT(heap->finalize_list == NULL); + +#if 0 + /* While NORZ macros are used above, this is unnecessary because the + * only pending side effects are now finalizers, and finalize_list is + * empty. + */ + DUK_REFZERO_CHECK_SLOW(heap->heap_thread); +#endif + + /* Prevent count may be bumped while finalizers run, but should always + * be reliably unbumped by the time we get here. + */ + DUK_ASSERT(heap->pf_prevent_count == 1); + heap->pf_prevent_count = 0; + +#if defined(DUK_USE_DEBUG) + DUK_DD(DUK_DDPRINT("duk_heap_process_finalize_list: %ld finalizers called", (long) count)); +#endif +} + +/* + * Run an duk_hobject finalizer. Must never throw an uncaught error + * (but may throw caught errors). + * + * There is no return value. Any return value or error thrown by + * the finalizer is ignored (although errors are debug logged). + * + * Notes: + * + * - The finalizer thread 'top' assertions are there because it is + * critical that strict stack policy is observed (i.e. no cruft + * left on the finalizer stack). + */ + +DUK_LOCAL duk_ret_t duk__finalize_helper(duk_hthread *thr, void *udata) { + DUK_ASSERT(thr != NULL); + DUK_UNREF(udata); + + DUK_DDD(DUK_DDDPRINT("protected finalization helper running")); + + /* [... obj] */ + + /* _Finalizer property is read without checking if the value is + * callable or even exists. This is intentional, and handled + * by throwing an error which is caught by the safe call wrapper. + * + * XXX: Finalizer lookup should traverse the prototype chain (to allow + * inherited finalizers) but should not invoke accessors or proxy object + * behavior. At the moment this lookup will invoke proxy behavior, so + * caller must ensure that this function is not called if the target is + * a Proxy. + */ + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_INT_FINALIZER); /* -> [... obj finalizer] */ + duk_dup_m2(thr); + duk_push_boolean(thr, DUK_HEAP_HAS_FINALIZER_NORESCUE(thr->heap)); + DUK_DDD(DUK_DDDPRINT("calling finalizer")); + duk_call(thr, 2); /* [ ... obj finalizer obj heapDestruct ] -> [ ... obj retval ] */ + DUK_DDD(DUK_DDDPRINT("finalizer returned successfully")); + return 0; + + /* Note: we rely on duk_safe_call() to fix up the stack for the caller, + * so we don't need to pop stuff here. There is no return value; + * caller determines rescued status based on object refcount. + */ +} + +DUK_INTERNAL void duk_heap_run_finalizer(duk_heap *heap, duk_hobject *obj) { + duk_hthread *thr; + duk_ret_t rc; +#if defined(DUK_USE_ASSERTIONS) + duk_idx_t entry_top; +#endif + + DUK_DD(DUK_DDPRINT("running duk_hobject finalizer for object: %p", (void *) obj)); + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->heap_thread != NULL); + thr = heap->heap_thread; + DUK_ASSERT(obj != NULL); + DUK_ASSERT_VALSTACK_SPACE(heap->heap_thread, 1); + +#if defined(DUK_USE_ASSERTIONS) + entry_top = duk_get_top(thr); +#endif + /* + * Get and call the finalizer. All of this must be wrapped + * in a protected call, because even getting the finalizer + * may trigger an error (getter may throw one, for instance). + */ + + /* ROM objects could inherit a finalizer, but they are never deemed + * unreachable by mark-and-sweep, and their refcount never falls to 0. + */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)); + + /* Duktape 2.1: finalize_list never contains objects with FINALIZED + * set, so no need to check here. + */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_FINALIZED((duk_heaphdr *) obj)); +#if 0 + if (DUK_HEAPHDR_HAS_FINALIZED((duk_heaphdr *) obj)) { + DUK_D(DUK_DPRINT("object already finalized, avoid running finalizer twice: %!O", obj)); + return; + } +#endif + DUK_HEAPHDR_SET_FINALIZED((duk_heaphdr *) obj); /* ensure never re-entered until rescue cycle complete */ + +#if defined(DUK_USE_ES6_PROXY) + if (DUK_HOBJECT_IS_PROXY(obj)) { + /* This may happen if duk_set_finalizer() or Duktape.fin() is + * called for a Proxy object. In such cases the fast finalizer + * flag will be set on the Proxy, not the target, and neither + * will be finalized. + */ + DUK_D(DUK_DPRINT("object is a Proxy, skip finalizer call")); + return; + } +#endif /* DUK_USE_ES6_PROXY */ + + duk_push_hobject(thr, obj); /* this also increases refcount by one */ + rc = duk_safe_call(thr, duk__finalize_helper, NULL /*udata*/, 0 /*nargs*/, 1 /*nrets*/); /* -> [... obj retval/error] */ + DUK_ASSERT_TOP(thr, entry_top + 2); /* duk_safe_call discipline */ + + if (rc != DUK_EXEC_SUCCESS) { + /* Note: we ask for one return value from duk_safe_call to get this + * error debugging here. + */ + DUK_D(DUK_DPRINT("wrapped finalizer call failed for object %p (ignored); error: %!T", + (void *) obj, + (duk_tval *) duk_get_tval(thr, -1))); + } + duk_pop_2(thr); /* -> [...] */ + + DUK_ASSERT_TOP(thr, entry_top); +} + +#else /* DUK_USE_FINALIZER_SUPPORT */ + +/* nothing */ + +#endif /* DUK_USE_FINALIZER_SUPPORT */ +#line 1 "duk_heap_hashstring.c" +/* + * String hash computation (interning). + * + * String hashing is performance critical because a string hash is computed + * for all new strings which are candidates to be added to the string table. + * However, strings actually added to the string table go through a codepoint + * length calculation which dominates performance because it goes through + * every byte of the input string (but only for strings added). + * + * The string hash algorithm should be fast, but on the other hand provide + * good enough hashes to ensure both string table and object property table + * hash tables work reasonably well (i.e., there aren't too many collisions + * with real world inputs). Unless the hash is cryptographic, it's always + * possible to craft inputs with maximal hash collisions. + * + * NOTE: The hash algorithms must match tools/dukutil.py:duk_heap_hashstring() + * for ROM string support! + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_STRHASH_DENSE) +/* Constants for duk_hashstring(). */ +#define DUK__STRHASH_SHORTSTRING 4096L +#define DUK__STRHASH_MEDIUMSTRING (256L * 1024L) +#define DUK__STRHASH_BLOCKSIZE 256L + +DUK_INTERNAL duk_uint32_t duk_heap_hashstring(duk_heap *heap, const duk_uint8_t *str, duk_size_t len) { + duk_uint32_t hash; + + /* Use Murmurhash2 directly for short strings, and use "block skipping" + * for long strings: hash an initial part and then sample the rest of + * the string with reasonably sized chunks. An initial offset for the + * sampling is computed based on a hash of the initial part of the string; + * this is done to (usually) avoid the case where all long strings have + * certain offset ranges which are never sampled. + * + * Skip should depend on length and bound the total time to roughly + * logarithmic. With current values: + * + * 1M string => 256 * 241 = 61696 bytes (0.06M) of hashing + * 1G string => 256 * 16321 = 4178176 bytes (3.98M) of hashing + * + * XXX: It would be better to compute the skip offset more "smoothly" + * instead of having a few boundary values. + */ + + /* note: mixing len into seed improves hashing when skipping */ + duk_uint32_t str_seed = heap->hash_seed ^ ((duk_uint32_t) len); + + if (len <= DUK__STRHASH_SHORTSTRING) { + hash = duk_util_hashbytes(str, len, str_seed); + } else { + duk_size_t off; + duk_size_t skip; + + if (len <= DUK__STRHASH_MEDIUMSTRING) { + skip = (duk_size_t) (16 * DUK__STRHASH_BLOCKSIZE + DUK__STRHASH_BLOCKSIZE); + } else { + skip = (duk_size_t) (256 * DUK__STRHASH_BLOCKSIZE + DUK__STRHASH_BLOCKSIZE); + } + + hash = duk_util_hashbytes(str, (duk_size_t) DUK__STRHASH_SHORTSTRING, str_seed); + off = DUK__STRHASH_SHORTSTRING + (skip * (hash % 256)) / 256; + + /* XXX: inefficient loop */ + while (off < len) { + duk_size_t left = len - off; + duk_size_t now = (duk_size_t) (left > DUK__STRHASH_BLOCKSIZE ? DUK__STRHASH_BLOCKSIZE : left); + hash ^= duk_util_hashbytes(str + off, now, str_seed); + off += skip; + } + } + +#if defined(DUK_USE_STRHASH16) + /* Truncate to 16 bits here, so that a computed hash can be compared + * against a hash stored in a 16-bit field. + */ + hash &= 0x0000ffffUL; +#endif + return hash; +} +#else /* DUK_USE_STRHASH_DENSE */ +DUK_INTERNAL duk_uint32_t duk_heap_hashstring(duk_heap *heap, const duk_uint8_t *str, duk_size_t len) { + duk_uint32_t hash; + duk_size_t step; + duk_size_t off; + + /* Slightly modified "Bernstein hash" from: + * + * http://eternallyconfuzzled.com/tuts/algorithms/jsw_tut_hashing.aspx + * + * Modifications: string skipping and reverse direction similar to + * Lua 5.1.5, and different hash initializer. + * + * The reverse direction ensures last byte it always included in the + * hash which is a good default as changing parts of the string are + * more often in the suffix than in the prefix. + */ + + hash = heap->hash_seed ^ ((duk_uint32_t) len); /* Bernstein hash init value is normally 5381 */ + step = (len >> DUK_USE_STRHASH_SKIP_SHIFT) + 1; + for (off = len; off >= step; off -= step) { + DUK_ASSERT(off >= 1); /* off >= step, and step >= 1 */ + hash = (hash * 33) + str[off - 1]; + } + +#if defined(DUK_USE_STRHASH16) + /* Truncate to 16 bits here, so that a computed hash can be compared + * against a hash stored in a 16-bit field. + */ + hash &= 0x0000ffffUL; +#endif + return hash; +} +#endif /* DUK_USE_STRHASH_DENSE */ + +/* automatic undefs */ +#undef DUK__STRHASH_BLOCKSIZE +#undef DUK__STRHASH_MEDIUMSTRING +#undef DUK__STRHASH_SHORTSTRING +#line 1 "duk_heap_markandsweep.c" +/* + * Mark-and-sweep garbage collection. + */ + +/* #include duk_internal.h -> already included */ + +DUK_LOCAL_DECL void duk__mark_heaphdr(duk_heap *heap, duk_heaphdr *h); +DUK_LOCAL_DECL void duk__mark_heaphdr_nonnull(duk_heap *heap, duk_heaphdr *h); +DUK_LOCAL_DECL void duk__mark_tval(duk_heap *heap, duk_tval *tv); +DUK_LOCAL_DECL void duk__mark_tvals(duk_heap *heap, duk_tval *tv, duk_idx_t count); + +/* + * Marking functions for heap types: mark children recursively. + */ + +DUK_LOCAL void duk__mark_hstring(duk_heap *heap, duk_hstring *h) { + DUK_UNREF(heap); + DUK_UNREF(h); + + DUK_DDD(DUK_DDDPRINT("duk__mark_hstring: %p", (void *) h)); + DUK_ASSERT(h); + DUK_HSTRING_ASSERT_VALID(h); + + /* nothing to process */ +} + +DUK_LOCAL void duk__mark_hobject(duk_heap *heap, duk_hobject *h) { + duk_uint_fast32_t i; + + DUK_DDD(DUK_DDDPRINT("duk__mark_hobject: %p", (void *) h)); + + DUK_ASSERT(h); + DUK_HOBJECT_ASSERT_VALID(h); + + /* XXX: use advancing pointers instead of index macros -> faster and smaller? */ + + for (i = 0; i < (duk_uint_fast32_t) DUK_HOBJECT_GET_ENEXT(h); i++) { + duk_hstring *key = DUK_HOBJECT_E_GET_KEY(heap, h, i); + if (key == NULL) { + continue; + } + duk__mark_heaphdr_nonnull(heap, (duk_heaphdr *) key); + if (DUK_HOBJECT_E_SLOT_IS_ACCESSOR(heap, h, i)) { + duk__mark_heaphdr(heap, (duk_heaphdr *) DUK_HOBJECT_E_GET_VALUE_PTR(heap, h, i)->a.get); + duk__mark_heaphdr(heap, (duk_heaphdr *) DUK_HOBJECT_E_GET_VALUE_PTR(heap, h, i)->a.set); + } else { + duk__mark_tval(heap, &DUK_HOBJECT_E_GET_VALUE_PTR(heap, h, i)->v); + } + } + + for (i = 0; i < (duk_uint_fast32_t) DUK_HOBJECT_GET_ASIZE(h); i++) { + duk__mark_tval(heap, DUK_HOBJECT_A_GET_VALUE_PTR(heap, h, i)); + } + + /* Hash part is a 'weak reference' and does not contribute. */ + + duk__mark_heaphdr(heap, (duk_heaphdr *) DUK_HOBJECT_GET_PROTOTYPE(heap, h)); + + /* Fast path for objects which don't have a subclass struct, or have a + * subclass struct but nothing that needs marking in the subclass struct. + */ + if (DUK_HOBJECT_HAS_FASTREFS(h)) { + DUK_ASSERT(DUK_HOBJECT_ALLOWS_FASTREFS(h)); + return; + } + DUK_ASSERT(DUK_HOBJECT_PROHIBITS_FASTREFS(h)); + + /* XXX: reorg, more common first */ + if (DUK_HOBJECT_IS_COMPFUNC(h)) { + duk_hcompfunc *f = (duk_hcompfunc *) h; + duk_tval *tv, *tv_end; + duk_hobject **fn, **fn_end; + + DUK_HCOMPFUNC_ASSERT_VALID(f); + + /* 'data' is reachable through every compiled function which + * contains a reference. + */ + + duk__mark_heaphdr(heap, (duk_heaphdr *) DUK_HCOMPFUNC_GET_DATA(heap, f)); + duk__mark_heaphdr(heap, (duk_heaphdr *) DUK_HCOMPFUNC_GET_LEXENV(heap, f)); + duk__mark_heaphdr(heap, (duk_heaphdr *) DUK_HCOMPFUNC_GET_VARENV(heap, f)); + + if (DUK_HCOMPFUNC_GET_DATA(heap, f) != NULL) { + tv = DUK_HCOMPFUNC_GET_CONSTS_BASE(heap, f); + tv_end = DUK_HCOMPFUNC_GET_CONSTS_END(heap, f); + while (tv < tv_end) { + duk__mark_tval(heap, tv); + tv++; + } + + fn = DUK_HCOMPFUNC_GET_FUNCS_BASE(heap, f); + fn_end = DUK_HCOMPFUNC_GET_FUNCS_END(heap, f); + while (fn < fn_end) { + duk__mark_heaphdr_nonnull(heap, (duk_heaphdr *) *fn); + fn++; + } + } else { + /* May happen in some out-of-memory corner cases. */ + DUK_D(DUK_DPRINT("duk_hcompfunc 'data' is NULL, skipping marking")); + } + } else if (DUK_HOBJECT_IS_DECENV(h)) { + duk_hdecenv *e = (duk_hdecenv *) h; + DUK_HDECENV_ASSERT_VALID(e); + duk__mark_heaphdr(heap, (duk_heaphdr *) e->thread); + duk__mark_heaphdr(heap, (duk_heaphdr *) e->varmap); + } else if (DUK_HOBJECT_IS_OBJENV(h)) { + duk_hobjenv *e = (duk_hobjenv *) h; + DUK_HOBJENV_ASSERT_VALID(e); + duk__mark_heaphdr_nonnull(heap, (duk_heaphdr *) e->target); +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + } else if (DUK_HOBJECT_IS_BUFOBJ(h)) { + duk_hbufobj *b = (duk_hbufobj *) h; + DUK_HBUFOBJ_ASSERT_VALID(b); + duk__mark_heaphdr(heap, (duk_heaphdr *) b->buf); + duk__mark_heaphdr(heap, (duk_heaphdr *) b->buf_prop); +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + } else if (DUK_HOBJECT_IS_BOUNDFUNC(h)) { + duk_hboundfunc *f = (duk_hboundfunc *) (void *) h; + DUK_HBOUNDFUNC_ASSERT_VALID(f); + duk__mark_tval(heap, &f->target); + duk__mark_tval(heap, &f->this_binding); + duk__mark_tvals(heap, f->args, f->nargs); +#if defined(DUK_USE_ES6_PROXY) + } else if (DUK_HOBJECT_IS_PROXY(h)) { + duk_hproxy *p = (duk_hproxy *) h; + DUK_HPROXY_ASSERT_VALID(p); + duk__mark_heaphdr_nonnull(heap, (duk_heaphdr *) p->target); + duk__mark_heaphdr_nonnull(heap, (duk_heaphdr *) p->handler); +#endif /* DUK_USE_ES6_PROXY */ + } else if (DUK_HOBJECT_IS_THREAD(h)) { + duk_hthread *t = (duk_hthread *) h; + duk_activation *act; + duk_tval *tv; + + DUK_HTHREAD_ASSERT_VALID(t); + + tv = t->valstack; + while (tv < t->valstack_top) { + duk__mark_tval(heap, tv); + tv++; + } + + for (act = t->callstack_curr; act != NULL; act = act->parent) { + duk__mark_heaphdr(heap, (duk_heaphdr *) DUK_ACT_GET_FUNC(act)); + duk__mark_heaphdr(heap, (duk_heaphdr *) act->var_env); + duk__mark_heaphdr(heap, (duk_heaphdr *) act->lex_env); +#if defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) + duk__mark_heaphdr(heap, (duk_heaphdr *) act->prev_caller); +#endif +#if 0 /* nothing now */ + for (cat = act->cat; cat != NULL; cat = cat->parent) { + } +#endif + } + + duk__mark_heaphdr(heap, (duk_heaphdr *) t->resumer); + + for (i = 0; i < DUK_NUM_BUILTINS; i++) { + duk__mark_heaphdr(heap, (duk_heaphdr *) t->builtins[i]); + } + } else { + /* We may come here if the object should have a FASTREFS flag + * but it's missing for some reason. Assert for never getting + * here; however, other than performance, this is harmless. + */ + DUK_D(DUK_DPRINT("missing FASTREFS flag for: %!iO", h)); + DUK_ASSERT(0); + } +} + +/* Mark any duk_heaphdr type. Recursion tracking happens only here. */ +DUK_LOCAL void duk__mark_heaphdr(duk_heap *heap, duk_heaphdr *h) { + DUK_DDD( + DUK_DDDPRINT("duk__mark_heaphdr %p, type %ld", (void *) h, (h != NULL ? (long) DUK_HEAPHDR_GET_TYPE(h) : (long) -1))); + + /* XXX: add non-null variant? */ + if (h == NULL) { + return; + } + + DUK_HEAPHDR_ASSERT_VALID(h); + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY(h) || DUK_HEAPHDR_HAS_REACHABLE(h)); + +#if defined(DUK_USE_ASSERTIONS) && defined(DUK_USE_REFERENCE_COUNTING) + if (!DUK_HEAPHDR_HAS_READONLY(h)) { + h->h_assert_refcount++; /* Comparison refcount: bump even if already reachable. */ + } +#endif + if (DUK_HEAPHDR_HAS_REACHABLE(h)) { + DUK_DDD(DUK_DDDPRINT("already marked reachable, skip")); + return; + } +#if defined(DUK_USE_ROM_OBJECTS) + /* READONLY objects always have REACHABLE set, so the check above + * will prevent READONLY objects from being marked here. + */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY(h)); +#endif + + DUK_HEAPHDR_SET_REACHABLE(h); + + if (heap->ms_recursion_depth >= DUK_USE_MARK_AND_SWEEP_RECLIMIT) { + DUK_D(DUK_DPRINT("mark-and-sweep recursion limit reached, marking as temproot: %p", (void *) h)); + DUK_HEAP_SET_MARKANDSWEEP_RECLIMIT_REACHED(heap); + DUK_HEAPHDR_SET_TEMPROOT(h); + return; + } + + heap->ms_recursion_depth++; + DUK_ASSERT(heap->ms_recursion_depth != 0); /* Wrap. */ + + switch (DUK_HEAPHDR_GET_TYPE(h)) { + case DUK_HTYPE_STRING: + duk__mark_hstring(heap, (duk_hstring *) h); + break; + case DUK_HTYPE_OBJECT: + duk__mark_hobject(heap, (duk_hobject *) h); + break; + case DUK_HTYPE_BUFFER: + /* nothing to mark */ + break; + default: + DUK_D(DUK_DPRINT("attempt to mark heaphdr %p with invalid htype %ld", (void *) h, (long) DUK_HEAPHDR_GET_TYPE(h))); + DUK_UNREACHABLE(); + } + + DUK_ASSERT(heap->ms_recursion_depth > 0); + heap->ms_recursion_depth--; +} + +DUK_LOCAL void duk__mark_tval(duk_heap *heap, duk_tval *tv) { + DUK_DDD(DUK_DDDPRINT("duk__mark_tval %p", (void *) tv)); + if (tv == NULL) { + return; + } + DUK_TVAL_ASSERT_VALID(tv); + if (DUK_TVAL_IS_HEAP_ALLOCATED(tv)) { + duk_heaphdr *h; + h = DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(h != NULL); + duk__mark_heaphdr_nonnull(heap, h); + } +} + +DUK_LOCAL void duk__mark_tvals(duk_heap *heap, duk_tval *tv, duk_idx_t count) { + DUK_ASSERT(count == 0 || tv != NULL); + + while (count-- > 0) { + DUK_TVAL_ASSERT_VALID(tv); + if (DUK_TVAL_IS_HEAP_ALLOCATED(tv)) { + duk_heaphdr *h; + h = DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(h != NULL); + duk__mark_heaphdr_nonnull(heap, h); + } + tv++; + } +} + +/* Mark any duk_heaphdr type, caller guarantees a non-NULL pointer. */ +DUK_LOCAL void duk__mark_heaphdr_nonnull(duk_heap *heap, duk_heaphdr *h) { + /* For now, just call the generic handler. Change when call sites + * are changed too. + */ + duk__mark_heaphdr(heap, h); +} + +/* + * Mark the heap. + */ + +DUK_LOCAL void duk__mark_roots_heap(duk_heap *heap) { + duk_small_uint_t i; + + DUK_DD(DUK_DDPRINT("duk__mark_roots_heap: %p", (void *) heap)); + + duk__mark_heaphdr(heap, (duk_heaphdr *) heap->heap_thread); + duk__mark_heaphdr(heap, (duk_heaphdr *) heap->heap_object); + + for (i = 0; i < DUK_HEAP_NUM_STRINGS; i++) { + duk_hstring *h = DUK_HEAP_GET_STRING(heap, i); + duk__mark_heaphdr(heap, (duk_heaphdr *) h); + } + + duk__mark_tval(heap, &heap->lj.value1); + duk__mark_tval(heap, &heap->lj.value2); + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + for (i = 0; i < heap->dbg_breakpoint_count; i++) { + duk__mark_heaphdr(heap, (duk_heaphdr *) heap->dbg_breakpoints[i].filename); + } +#endif +} + +/* + * Mark unreachable, finalizable objects. + * + * Such objects will be moved aside and their finalizers run later. They + * have to be treated as reachability roots for their properties etc to + * remain allocated. This marking is only done for unreachable values which + * would be swept later. + * + * Objects are first marked FINALIZABLE and only then marked as reachability + * roots; otherwise circular references might be handled inconsistently. + */ + +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_LOCAL void duk__mark_finalizable(duk_heap *heap) { + duk_heaphdr *hdr; + duk_size_t count_finalizable = 0; + + DUK_DD(DUK_DDPRINT("duk__mark_finalizable: %p", (void *) heap)); + + DUK_ASSERT(heap->heap_thread != NULL); + + hdr = heap->heap_allocated; + while (hdr != NULL) { + /* A finalizer is looked up from the object and up its + * prototype chain (which allows inherited finalizers). + * The finalizer is checked for using a duk_hobject flag + * which is kept in sync with the presence and callability + * of a _Finalizer hidden symbol. + */ + + if (!DUK_HEAPHDR_HAS_REACHABLE(hdr) && DUK_HEAPHDR_IS_OBJECT(hdr) && !DUK_HEAPHDR_HAS_FINALIZED(hdr) && + DUK_HOBJECT_HAS_FINALIZER_FAST(heap, (duk_hobject *) hdr)) { + /* heaphdr: + * - is not reachable + * - is an object + * - is not a finalized object waiting for rescue/keep decision + * - has a finalizer + */ + + DUK_DD(DUK_DDPRINT("unreachable heap object will be " + "finalized -> mark as finalizable " + "and treat as a reachability root: %p", + (void *) hdr)); + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY(hdr)); + DUK_HEAPHDR_SET_FINALIZABLE(hdr); + count_finalizable++; + } + + hdr = DUK_HEAPHDR_GET_NEXT(heap, hdr); + } + + if (count_finalizable == 0) { + return; + } + + DUK_DD(DUK_DDPRINT("marked %ld heap objects as finalizable, now mark them reachable", (long) count_finalizable)); + + hdr = heap->heap_allocated; + while (hdr != NULL) { + if (DUK_HEAPHDR_HAS_FINALIZABLE(hdr)) { + duk__mark_heaphdr_nonnull(heap, hdr); + } + + hdr = DUK_HEAPHDR_GET_NEXT(heap, hdr); + } + + /* Caller will finish the marking process if we hit a recursion limit. */ +} +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +/* + * Mark objects on finalize_list. + */ + +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_LOCAL void duk__mark_finalize_list(duk_heap *heap) { + duk_heaphdr *hdr; +#if defined(DUK_USE_DEBUG) + duk_size_t count_finalize_list = 0; +#endif + + DUK_DD(DUK_DDPRINT("duk__mark_finalize_list: %p", (void *) heap)); + + hdr = heap->finalize_list; + while (hdr != NULL) { + duk__mark_heaphdr_nonnull(heap, hdr); + hdr = DUK_HEAPHDR_GET_NEXT(heap, hdr); +#if defined(DUK_USE_DEBUG) + count_finalize_list++; +#endif + } + +#if defined(DUK_USE_DEBUG) + if (count_finalize_list > 0) { + DUK_D(DUK_DPRINT("marked %ld objects on the finalize_list as reachable (previous finalizer run skipped)", + (long) count_finalize_list)); + } +#endif +} +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +/* + * Fallback marking handler if recursion limit is reached. + * + * Iterates 'temproots' until recursion limit is no longer hit. Temproots + * can be in heap_allocated or finalize_list; refzero_list is now always + * empty for mark-and-sweep. A temproot may occur in finalize_list now if + * there are objects on the finalize_list and user code creates a reference + * from an object in heap_allocated to the object in finalize_list (which is + * now allowed), and it happened to coincide with the recursion depth limit. + * + * This is a slow scan, but guarantees that we finish with a bounded C stack. + * + * Note that nodes may have been marked as temproots before this scan begun, + * OR they may have been marked during the scan (as we process nodes + * recursively also during the scan). This is intended behavior. + */ + +#if defined(DUK_USE_DEBUG) +DUK_LOCAL void duk__handle_temproot(duk_heap *heap, duk_heaphdr *hdr, duk_size_t *count) { +#else +DUK_LOCAL void duk__handle_temproot(duk_heap *heap, duk_heaphdr *hdr) { +#endif + DUK_ASSERT(hdr != NULL); + + if (!DUK_HEAPHDR_HAS_TEMPROOT(hdr)) { + DUK_DDD(DUK_DDDPRINT("not a temp root: %p", (void *) hdr)); + return; + } + + DUK_DDD(DUK_DDDPRINT("found a temp root: %p", (void *) hdr)); + DUK_HEAPHDR_CLEAR_TEMPROOT(hdr); + DUK_HEAPHDR_CLEAR_REACHABLE(hdr); /* Done so that duk__mark_heaphdr() works correctly. */ +#if defined(DUK_USE_ASSERTIONS) && defined(DUK_USE_REFERENCE_COUNTING) + hdr->h_assert_refcount--; /* Same node visited twice. */ +#endif + duk__mark_heaphdr_nonnull(heap, hdr); + +#if defined(DUK_USE_DEBUG) + (*count)++; +#endif +} + +DUK_LOCAL void duk__mark_temproots_by_heap_scan(duk_heap *heap) { + duk_heaphdr *hdr; +#if defined(DUK_USE_DEBUG) + duk_size_t count; +#endif + + DUK_DD(DUK_DDPRINT("duk__mark_temproots_by_heap_scan: %p", (void *) heap)); + + while (DUK_HEAP_HAS_MARKANDSWEEP_RECLIMIT_REACHED(heap)) { + DUK_DD(DUK_DDPRINT("recursion limit reached, doing heap scan to continue from temproots")); + +#if defined(DUK_USE_DEBUG) + count = 0; +#endif + DUK_HEAP_CLEAR_MARKANDSWEEP_RECLIMIT_REACHED(heap); + + hdr = heap->heap_allocated; + while (hdr) { +#if defined(DUK_USE_DEBUG) + duk__handle_temproot(heap, hdr, &count); +#else + duk__handle_temproot(heap, hdr); +#endif + hdr = DUK_HEAPHDR_GET_NEXT(heap, hdr); + } + +#if defined(DUK_USE_FINALIZER_SUPPORT) + hdr = heap->finalize_list; + while (hdr) { +#if defined(DUK_USE_DEBUG) + duk__handle_temproot(heap, hdr, &count); +#else + duk__handle_temproot(heap, hdr); +#endif + hdr = DUK_HEAPHDR_GET_NEXT(heap, hdr); + } +#endif + +#if defined(DUK_USE_DEBUG) + DUK_DD(DUK_DDPRINT("temproot mark heap scan processed %ld temp roots", (long) count)); +#endif + } +} + +/* + * Finalize refcounts for heap elements just about to be freed. + * This must be done for all objects before freeing to avoid any + * stale pointer dereferences. + * + * Note that this must deduce the set of objects to be freed + * identically to duk__sweep_heap(). + */ + +#if defined(DUK_USE_REFERENCE_COUNTING) +DUK_LOCAL void duk__finalize_refcounts(duk_heap *heap) { + duk_heaphdr *hdr; + + DUK_ASSERT(heap->heap_thread != NULL); + + DUK_DD(DUK_DDPRINT("duk__finalize_refcounts: heap=%p", (void *) heap)); + + hdr = heap->heap_allocated; + while (hdr) { + if (!DUK_HEAPHDR_HAS_REACHABLE(hdr)) { + /* + * Unreachable object about to be swept. Finalize target refcounts + * (objects which the unreachable object points to) without doing + * refzero processing. Recursive decrefs are also prevented when + * refzero processing is disabled. + * + * Value cannot be a finalizable object, as they have been made + * temporarily reachable for this round. + */ + + DUK_DDD(DUK_DDDPRINT("unreachable object, refcount finalize before sweeping: %p", (void *) hdr)); + + /* Finalize using heap->heap_thread; DECREF has a + * suppress check for mark-and-sweep which is based + * on heap->ms_running. + */ + duk_heaphdr_refcount_finalize_norz(heap, hdr); + } + + hdr = DUK_HEAPHDR_GET_NEXT(heap, hdr); + } +} +#endif /* DUK_USE_REFERENCE_COUNTING */ + +/* + * Clear (reachable) flags of finalize_list. + * + * We could mostly do in the sweep phase when we move objects from the + * heap into the finalize_list. However, if a finalizer run is skipped + * during a mark-and-sweep, the objects on the finalize_list will be marked + * reachable during the next mark-and-sweep. Since they're already on the + * finalize_list, no-one will be clearing their REACHABLE flag so we do it + * here. (This now overlaps with the sweep handling in a harmless way.) + */ + +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_LOCAL void duk__clear_finalize_list_flags(duk_heap *heap) { + duk_heaphdr *hdr; + + DUK_DD(DUK_DDPRINT("duk__clear_finalize_list_flags: %p", (void *) heap)); + + hdr = heap->finalize_list; + while (hdr) { + DUK_HEAPHDR_CLEAR_REACHABLE(hdr); +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(DUK_HEAPHDR_HAS_FINALIZABLE(hdr) || (heap->currently_finalizing == hdr)); +#endif + /* DUK_HEAPHDR_FLAG_FINALIZED may be set. */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_TEMPROOT(hdr)); + hdr = DUK_HEAPHDR_GET_NEXT(heap, hdr); + } +} +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +/* + * Sweep stringtable. + */ + +DUK_LOCAL void duk__sweep_stringtable(duk_heap *heap, duk_size_t *out_count_keep) { + duk_hstring *h; + duk_hstring *prev; + duk_uint32_t i; +#if defined(DUK_USE_DEBUG) + duk_size_t count_free = 0; +#endif + duk_size_t count_keep = 0; + + DUK_DD(DUK_DDPRINT("duk__sweep_stringtable: %p", (void *) heap)); + +#if defined(DUK_USE_STRTAB_PTRCOMP) + if (heap->strtable16 == NULL) { +#else + if (heap->strtable == NULL) { +#endif + goto done; + } + + for (i = 0; i < heap->st_size; i++) { +#if defined(DUK_USE_STRTAB_PTRCOMP) + h = DUK_USE_HEAPPTR_DEC16(heap->heap_udata, heap->strtable16[i]); +#else + h = heap->strtable[i]; +#endif + prev = NULL; + while (h != NULL) { + duk_hstring *next; + next = h->hdr.h_next; + + if (DUK_HEAPHDR_HAS_REACHABLE((duk_heaphdr *) h)) { + DUK_HEAPHDR_CLEAR_REACHABLE((duk_heaphdr *) h); + count_keep++; + prev = h; + } else { +#if defined(DUK_USE_DEBUG) + count_free++; +#endif + + /* For pinned strings the refcount has been + * bumped. We could unbump it here before + * freeing, but that's actually not necessary + * except for assertions. + */ +#if 0 + if (DUK_HSTRING_HAS_PINNED_LITERAL(h)) { + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT((duk_heaphdr *) h) > 0U); + DUK_HSTRING_DECREF_NORZ(heap->heap_thread, h); + DUK_HSTRING_CLEAR_PINNED_LITERAL(h); + } +#endif +#if defined(DUK_USE_REFERENCE_COUNTING) + /* Non-zero refcounts should not happen for unreachable strings, + * because we refcount finalize all unreachable objects which + * should have decreased unreachable string refcounts to zero + * (even for cycles). However, pinned strings have a +1 bump. + */ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT((duk_heaphdr *) h) == DUK_HSTRING_HAS_PINNED_LITERAL(h) ? 1U : + 0U); +#endif + + /* Deal with weak references first. */ + duk_heap_strcache_string_remove(heap, (duk_hstring *) h); + + /* Remove the string from the string table. */ + duk_heap_strtable_unlink_prev(heap, (duk_hstring *) h, (duk_hstring *) prev); + + /* Free inner references (these exist e.g. when external + * strings are enabled) and the struct itself. + */ + duk_free_hstring(heap, (duk_hstring *) h); + + /* Don't update 'prev'; it should be last string kept. */ + } + + h = next; + } + } + +done: +#if defined(DUK_USE_DEBUG) + DUK_D(DUK_DPRINT("mark-and-sweep sweep stringtable: %ld freed, %ld kept", (long) count_free, (long) count_keep)); +#endif + *out_count_keep = count_keep; +} + +/* + * Sweep heap. + */ + +DUK_LOCAL void duk__sweep_heap(duk_heap *heap, duk_small_uint_t flags, duk_size_t *out_count_keep) { + duk_heaphdr *prev; /* last element that was left in the heap */ + duk_heaphdr *curr; + duk_heaphdr *next; +#if defined(DUK_USE_DEBUG) + duk_size_t count_free = 0; + duk_size_t count_finalize = 0; + duk_size_t count_rescue = 0; +#endif + duk_size_t count_keep = 0; + + DUK_DD(DUK_DDPRINT("duk__sweep_heap: %p", (void *) heap)); + + prev = NULL; + curr = heap->heap_allocated; + heap->heap_allocated = NULL; + while (curr) { + /* Strings and ROM objects are never placed on the heap allocated list. */ + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(curr) != DUK_HTYPE_STRING); + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY(curr)); + + next = DUK_HEAPHDR_GET_NEXT(heap, curr); + + if (DUK_HEAPHDR_HAS_REACHABLE(curr)) { + /* + * Reachable object: + * - If FINALIZABLE -> actually unreachable (but marked + * artificially reachable), queue to finalize_list. + * - If !FINALIZABLE but FINALIZED -> rescued after + * finalizer execution. + * - Otherwise just a normal, reachable object. + * + * Objects which are kept are queued to heap_allocated + * tail (we're essentially filtering heap_allocated in + * practice). + */ + +#if defined(DUK_USE_FINALIZER_SUPPORT) + if (DUK_UNLIKELY(DUK_HEAPHDR_HAS_FINALIZABLE(curr))) { + DUK_ASSERT(!DUK_HEAPHDR_HAS_FINALIZED(curr)); + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(curr) == DUK_HTYPE_OBJECT); + DUK_DD(DUK_DDPRINT("sweep; reachable, finalizable --> move to finalize_list: %p", (void *) curr)); + +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_HEAPHDR_PREINC_REFCOUNT( + curr); /* Bump refcount so that refzero never occurs when pending a finalizer call. */ +#endif + DUK_HEAP_INSERT_INTO_FINALIZE_LIST(heap, curr); +#if defined(DUK_USE_DEBUG) + count_finalize++; +#endif + } else +#endif /* DUK_USE_FINALIZER_SUPPORT */ + { + if (DUK_UNLIKELY(DUK_HEAPHDR_HAS_FINALIZED(curr))) { + DUK_ASSERT(!DUK_HEAPHDR_HAS_FINALIZABLE(curr)); + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(curr) == DUK_HTYPE_OBJECT); + + if (flags & DUK_MS_FLAG_POSTPONE_RESCUE) { + DUK_DD(DUK_DDPRINT("sweep; reachable, finalized, but postponing rescue decisions " + "--> keep object (with FINALIZED set): %!iO", + curr)); + count_keep++; + } else { + DUK_DD(DUK_DDPRINT("sweep; reachable, finalized --> rescued after finalization: %p", + (void *) curr)); +#if defined(DUK_USE_FINALIZER_SUPPORT) + DUK_HEAPHDR_CLEAR_FINALIZED(curr); +#endif +#if defined(DUK_USE_DEBUG) + count_rescue++; +#endif + } + } else { + DUK_DD(DUK_DDPRINT("sweep; reachable --> keep: %!iO", curr)); + count_keep++; + } + + if (prev != NULL) { + DUK_ASSERT(heap->heap_allocated != NULL); + DUK_HEAPHDR_SET_NEXT(heap, prev, curr); + } else { + DUK_ASSERT(heap->heap_allocated == NULL); + heap->heap_allocated = curr; + } +#if defined(DUK_USE_DOUBLE_LINKED_HEAP) + DUK_HEAPHDR_SET_PREV(heap, curr, prev); +#endif + DUK_HEAPHDR_ASSERT_LINKS(heap, prev); + DUK_HEAPHDR_ASSERT_LINKS(heap, curr); + prev = curr; + } + + /* + * Shrink check for value stacks here. We're inside + * ms_prevent_count protection which prevents recursive + * mark-and-sweep and refzero finalizers, so there are + * no side effects that would affect the heap lists. + */ + if (DUK_HEAPHDR_IS_OBJECT(curr) && DUK_HOBJECT_IS_THREAD((duk_hobject *) curr)) { + duk_hthread *thr_curr = (duk_hthread *) curr; + DUK_DD(DUK_DDPRINT("value stack shrink check for thread: %!O", curr)); + duk_valstack_shrink_check_nothrow(thr_curr, flags & DUK_MS_FLAG_EMERGENCY /*snug*/); + } + + DUK_HEAPHDR_CLEAR_REACHABLE(curr); + /* Keep FINALIZED if set, used if rescue decisions are postponed. */ + /* Keep FINALIZABLE for objects on finalize_list. */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_REACHABLE(curr)); + } else { + /* + * Unreachable object: + * - If FINALIZED, object was finalized but not + * rescued. This doesn't affect freeing. + * - Otherwise normal unreachable object. + * + * There's no guard preventing a FINALIZED object + * from being freed while finalizers execute: the + * artificial finalize_list reachability roots can't + * cause an incorrect free decision (but can cause + * an incorrect rescue decision). + */ + +#if defined(DUK_USE_REFERENCE_COUNTING) + /* Non-zero refcounts should not happen because we refcount + * finalize all unreachable objects which should cancel out + * refcounts (even for cycles). + */ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(curr) == 0); +#endif + DUK_ASSERT(!DUK_HEAPHDR_HAS_FINALIZABLE(curr)); + +#if defined(DUK_USE_DEBUG) + if (DUK_HEAPHDR_HAS_FINALIZED(curr)) { + DUK_DD(DUK_DDPRINT("sweep; unreachable, finalized --> finalized object not rescued: %p", + (void *) curr)); + } else { + DUK_DD(DUK_DDPRINT("sweep; not reachable --> free: %p", (void *) curr)); + } + +#endif + + /* Note: object cannot be a finalizable unreachable object, as + * they have been marked temporarily reachable for this round, + * and are handled above. + */ + +#if defined(DUK_USE_DEBUG) + count_free++; +#endif + + /* Weak refs should be handled here, but no weak refs for + * any non-string objects exist right now. + */ + + /* Free object and all auxiliary (non-heap) allocs. */ + duk_heap_free_heaphdr_raw(heap, curr); + } + + curr = next; + } + + if (prev != NULL) { + DUK_HEAPHDR_SET_NEXT(heap, prev, NULL); + } + DUK_HEAPHDR_ASSERT_LINKS(heap, prev); + +#if defined(DUK_USE_DEBUG) + DUK_D(DUK_DPRINT("mark-and-sweep sweep objects (non-string): %ld freed, %ld kept, %ld rescued, %ld queued for finalization", + (long) count_free, + (long) count_keep, + (long) count_rescue, + (long) count_finalize)); +#endif + *out_count_keep = count_keep; +} + +/* + * Litcache helpers. + */ + +#if defined(DUK_USE_LITCACHE_SIZE) +DUK_LOCAL void duk__wipe_litcache(duk_heap *heap) { + duk_uint_t i; + duk_litcache_entry *e; + + e = heap->litcache; + for (i = 0; i < DUK_USE_LITCACHE_SIZE; i++) { + e->addr = NULL; + /* e->h does not need to be invalidated: when e->addr is + * NULL, e->h is considered garbage. + */ + e++; + } +} +#endif /* DUK_USE_LITCACHE_SIZE */ + +/* + * Object compaction. + * + * Compaction is assumed to never throw an error. + */ + +DUK_LOCAL int duk__protected_compact_object(duk_hthread *thr, void *udata) { + duk_hobject *obj; + /* XXX: for threads, compact stacks? */ + + DUK_UNREF(udata); + obj = duk_known_hobject(thr, -1); + duk_hobject_compact_props(thr, obj); + return 0; +} + +#if defined(DUK_USE_DEBUG) +DUK_LOCAL void duk__compact_object_list(duk_heap *heap, + duk_hthread *thr, + duk_heaphdr *start, + duk_size_t *p_count_check, + duk_size_t *p_count_compact, + duk_size_t *p_count_bytes_saved) { +#else +DUK_LOCAL void duk__compact_object_list(duk_heap *heap, duk_hthread *thr, duk_heaphdr *start) { +#endif + duk_heaphdr *curr; +#if defined(DUK_USE_DEBUG) + duk_size_t old_size, new_size; +#endif + duk_hobject *obj; + + DUK_UNREF(heap); + + curr = start; + while (curr) { + DUK_DDD(DUK_DDDPRINT("mark-and-sweep compact: %p", (void *) curr)); + + if (DUK_HEAPHDR_GET_TYPE(curr) != DUK_HTYPE_OBJECT) { + goto next; + } + obj = (duk_hobject *) curr; + +#if defined(DUK_USE_DEBUG) + old_size = + DUK_HOBJECT_P_COMPUTE_SIZE(DUK_HOBJECT_GET_ESIZE(obj), DUK_HOBJECT_GET_ASIZE(obj), DUK_HOBJECT_GET_HSIZE(obj)); +#endif + + DUK_DD(DUK_DDPRINT("compact object: %p", (void *) obj)); + duk_push_hobject(thr, obj); + /* XXX: disable error handlers for duration of compaction? */ + duk_safe_call(thr, duk__protected_compact_object, NULL, 1, 0); + +#if defined(DUK_USE_DEBUG) + new_size = + DUK_HOBJECT_P_COMPUTE_SIZE(DUK_HOBJECT_GET_ESIZE(obj), DUK_HOBJECT_GET_ASIZE(obj), DUK_HOBJECT_GET_HSIZE(obj)); +#endif + +#if defined(DUK_USE_DEBUG) + (*p_count_compact)++; + (*p_count_bytes_saved) += (duk_size_t) (old_size - new_size); +#endif + + next: + curr = DUK_HEAPHDR_GET_NEXT(heap, curr); +#if defined(DUK_USE_DEBUG) + (*p_count_check)++; +#endif + } +} + +DUK_LOCAL void duk__compact_objects(duk_heap *heap) { + /* XXX: which lists should participate? to be finalized? */ +#if defined(DUK_USE_DEBUG) + duk_size_t count_check = 0; + duk_size_t count_compact = 0; + duk_size_t count_bytes_saved = 0; +#endif + + DUK_DD(DUK_DDPRINT("duk__compact_objects: %p", (void *) heap)); + + DUK_ASSERT(heap->heap_thread != NULL); + +#if defined(DUK_USE_DEBUG) + duk__compact_object_list(heap, heap->heap_thread, heap->heap_allocated, &count_check, &count_compact, &count_bytes_saved); +#if defined(DUK_USE_FINALIZER_SUPPORT) + duk__compact_object_list(heap, heap->heap_thread, heap->finalize_list, &count_check, &count_compact, &count_bytes_saved); +#endif +#else + duk__compact_object_list(heap, heap->heap_thread, heap->heap_allocated); +#if defined(DUK_USE_FINALIZER_SUPPORT) + duk__compact_object_list(heap, heap->heap_thread, heap->finalize_list); +#endif +#endif +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_ASSERT(heap->refzero_list == NULL); /* Always handled to completion inline in DECREF. */ +#endif + +#if defined(DUK_USE_DEBUG) + DUK_D(DUK_DPRINT("mark-and-sweep compact objects: %ld checked, %ld compaction attempts, %ld bytes saved by compaction", + (long) count_check, + (long) count_compact, + (long) count_bytes_saved)); +#endif +} + +/* + * Assertion helpers. + */ + +#if defined(DUK_USE_ASSERTIONS) +typedef void (*duk__gc_heaphdr_assert)(duk_heap *heap, duk_heaphdr *h); +typedef void (*duk__gc_hstring_assert)(duk_heap *heap, duk_hstring *h); + +DUK_LOCAL void duk__assert_walk_list(duk_heap *heap, duk_heaphdr *start, duk__gc_heaphdr_assert func) { + duk_heaphdr *curr; + for (curr = start; curr != NULL; curr = DUK_HEAPHDR_GET_NEXT(heap, curr)) { + func(heap, curr); + } +} + +DUK_LOCAL void duk__assert_walk_strtable(duk_heap *heap, duk__gc_hstring_assert func) { + duk_uint32_t i; + + for (i = 0; i < heap->st_size; i++) { + duk_hstring *h; + +#if defined(DUK_USE_STRTAB_PTRCOMP) + h = DUK_USE_HEAPPTR_DEC16(heap->heap_udata, heap->strtable16[i]); +#else + h = heap->strtable[i]; +#endif + while (h != NULL) { + func(heap, h); + h = h->hdr.h_next; + } + } +} + +DUK_LOCAL void duk__assert_heaphdr_flags_cb(duk_heap *heap, duk_heaphdr *h) { + DUK_UNREF(heap); + DUK_ASSERT(!DUK_HEAPHDR_HAS_REACHABLE(h)); + DUK_ASSERT(!DUK_HEAPHDR_HAS_TEMPROOT(h)); + DUK_ASSERT(!DUK_HEAPHDR_HAS_FINALIZABLE(h)); + /* may have FINALIZED */ +} +DUK_LOCAL void duk__assert_heaphdr_flags(duk_heap *heap) { + duk__assert_walk_list(heap, heap->heap_allocated, duk__assert_heaphdr_flags_cb); +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_ASSERT(heap->refzero_list == NULL); /* Always handled to completion inline in DECREF. */ +#endif + /* XXX: Assertions for finalize_list? */ +} + +DUK_LOCAL void duk__assert_validity_cb1(duk_heap *heap, duk_heaphdr *h) { + DUK_UNREF(heap); + DUK_ASSERT(DUK_HEAPHDR_IS_OBJECT(h) || DUK_HEAPHDR_IS_BUFFER(h)); + duk_heaphdr_assert_valid_subclassed(h); +} +DUK_LOCAL void duk__assert_validity_cb2(duk_heap *heap, duk_hstring *h) { + DUK_UNREF(heap); + DUK_ASSERT(DUK_HEAPHDR_IS_STRING((duk_heaphdr *) h)); + duk_heaphdr_assert_valid_subclassed((duk_heaphdr *) h); +} +DUK_LOCAL void duk__assert_validity(duk_heap *heap) { + duk__assert_walk_list(heap, heap->heap_allocated, duk__assert_validity_cb1); +#if defined(DUK_USE_FINALIZER_SUPPORT) + duk__assert_walk_list(heap, heap->finalize_list, duk__assert_validity_cb1); +#endif +#if defined(DUK_USE_REFERENCE_COUNTING) + duk__assert_walk_list(heap, heap->refzero_list, duk__assert_validity_cb1); +#endif + duk__assert_walk_strtable(heap, duk__assert_validity_cb2); +} + +#if defined(DUK_USE_REFERENCE_COUNTING) +DUK_LOCAL void duk__assert_valid_refcounts_cb(duk_heap *heap, duk_heaphdr *h) { + /* Cannot really assert much w.r.t. refcounts now. */ + + DUK_UNREF(heap); + if (DUK_HEAPHDR_GET_REFCOUNT(h) == 0 && DUK_HEAPHDR_HAS_FINALIZED(h)) { + /* An object may be in heap_allocated list with a zero + * refcount if it has just been finalized and is waiting + * to be collected by the next cycle. + * (This doesn't currently happen however.) + */ + } else if (DUK_HEAPHDR_GET_REFCOUNT(h) == 0) { + /* An object may be in heap_allocated list with a zero + * refcount also if it is a temporary object created + * during debugger paused state. It will get collected + * by mark-and-sweep based on its reachability status + * (presumably not reachable because refcount is 0). + */ + } + DUK_ASSERT_DISABLE(DUK_HEAPHDR_GET_REFCOUNT(h) >= 0); /* Unsigned. */ +} +DUK_LOCAL void duk__assert_valid_refcounts(duk_heap *heap) { + duk__assert_walk_list(heap, heap->heap_allocated, duk__assert_valid_refcounts_cb); +} + +DUK_LOCAL void duk__clear_assert_refcounts_cb1(duk_heap *heap, duk_heaphdr *h) { + DUK_UNREF(heap); + h->h_assert_refcount = 0; +} +DUK_LOCAL void duk__clear_assert_refcounts_cb2(duk_heap *heap, duk_hstring *h) { + DUK_UNREF(heap); + ((duk_heaphdr *) h)->h_assert_refcount = 0; +} +DUK_LOCAL void duk__clear_assert_refcounts(duk_heap *heap) { + duk__assert_walk_list(heap, heap->heap_allocated, duk__clear_assert_refcounts_cb1); +#if defined(DUK_USE_FINALIZER_SUPPORT) + duk__assert_walk_list(heap, heap->finalize_list, duk__clear_assert_refcounts_cb1); +#endif +#if defined(DUK_USE_REFERENCE_COUNTING) + duk__assert_walk_list(heap, heap->refzero_list, duk__clear_assert_refcounts_cb1); +#endif + duk__assert_walk_strtable(heap, duk__clear_assert_refcounts_cb2); +} + +DUK_LOCAL void duk__check_refcount_heaphdr(duk_heaphdr *hdr) { + duk_bool_t count_ok; + duk_size_t expect_refc; + + /* The refcount check only makes sense for reachable objects on + * heap_allocated or string table, after the sweep phase. Prior to + * sweep phase refcounts will include references that are not visible + * via reachability roots. + * + * Because we're called after the sweep phase, all heap objects on + * heap_allocated are reachable. REACHABLE flags have already been + * cleared so we can't check them. + */ + + /* ROM objects have intentionally incorrect refcount (1), but we won't + * check them. + */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY(hdr)); + + expect_refc = hdr->h_assert_refcount; + if (DUK_HEAPHDR_IS_STRING(hdr) && DUK_HSTRING_HAS_PINNED_LITERAL((duk_hstring *) hdr)) { + expect_refc++; + } + count_ok = ((duk_size_t) DUK_HEAPHDR_GET_REFCOUNT(hdr) == expect_refc); + if (!count_ok) { + DUK_D(DUK_DPRINT("refcount mismatch for: %p: header=%ld counted=%ld --> %!iO", + (void *) hdr, + (long) DUK_HEAPHDR_GET_REFCOUNT(hdr), + (long) hdr->h_assert_refcount, + hdr)); + DUK_ASSERT(0); + } +} + +DUK_LOCAL void duk__check_assert_refcounts_cb1(duk_heap *heap, duk_heaphdr *h) { + DUK_UNREF(heap); + duk__check_refcount_heaphdr(h); +} +DUK_LOCAL void duk__check_assert_refcounts_cb2(duk_heap *heap, duk_hstring *h) { + DUK_UNREF(heap); + duk__check_refcount_heaphdr((duk_heaphdr *) h); +} +DUK_LOCAL void duk__check_assert_refcounts(duk_heap *heap) { + duk__assert_walk_list(heap, heap->heap_allocated, duk__check_assert_refcounts_cb1); +#if defined(DUK_USE_FINALIZER_SUPPORT) + duk__assert_walk_list(heap, heap->finalize_list, duk__check_assert_refcounts_cb1); +#endif + /* XXX: Assert anything for refzero_list? */ + duk__assert_walk_strtable(heap, duk__check_assert_refcounts_cb2); +} +#endif /* DUK_USE_REFERENCE_COUNTING */ + +#if defined(DUK_USE_LITCACHE_SIZE) +DUK_LOCAL void duk__assert_litcache_nulls(duk_heap *heap) { + duk_uint_t i; + duk_litcache_entry *e; + + e = heap->litcache; + for (i = 0; i < DUK_USE_LITCACHE_SIZE; i++) { + /* Entry addresses were NULLed before mark-and-sweep, check + * that they're still NULL afterwards to ensure no pointers + * were recorded through any side effects. + */ + DUK_ASSERT(e->addr == NULL); + } +} +#endif /* DUK_USE_LITCACHE_SIZE */ +#endif /* DUK_USE_ASSERTIONS */ + +/* + * Stats dump. + */ + +#if defined(DUK_USE_DEBUG) +DUK_LOCAL void duk__dump_stats(duk_heap *heap) { + DUK_D(DUK_DPRINT("stats executor: opcodes=%ld, interrupt=%ld, throw=%ld", + (long) heap->stats_exec_opcodes, + (long) heap->stats_exec_interrupt, + (long) heap->stats_exec_throw)); + DUK_D(DUK_DPRINT("stats call: all=%ld, tailcall=%ld, ecmatoecma=%ld", + (long) heap->stats_call_all, + (long) heap->stats_call_tailcall, + (long) heap->stats_call_ecmatoecma)); + DUK_D(DUK_DPRINT("stats safecall: all=%ld, nothrow=%ld, throw=%ld", + (long) heap->stats_safecall_all, + (long) heap->stats_safecall_nothrow, + (long) heap->stats_safecall_throw)); + DUK_D(DUK_DPRINT("stats mark-and-sweep: try_count=%ld, skip_count=%ld, emergency_count=%ld", + (long) heap->stats_ms_try_count, + (long) heap->stats_ms_skip_count, + (long) heap->stats_ms_emergency_count)); + DUK_D(DUK_DPRINT("stats stringtable: intern_hit=%ld, intern_miss=%ld, " + "resize_check=%ld, resize_grow=%ld, resize_shrink=%ld, " + "litcache_hit=%ld, litcache_miss=%ld, litcache_pin=%ld", + (long) heap->stats_strtab_intern_hit, + (long) heap->stats_strtab_intern_miss, + (long) heap->stats_strtab_resize_check, + (long) heap->stats_strtab_resize_grow, + (long) heap->stats_strtab_resize_shrink, + (long) heap->stats_strtab_litcache_hit, + (long) heap->stats_strtab_litcache_miss, + (long) heap->stats_strtab_litcache_pin)); + DUK_D(DUK_DPRINT("stats object: realloc_props=%ld, abandon_array=%ld", + (long) heap->stats_object_realloc_props, + (long) heap->stats_object_abandon_array)); + DUK_D(DUK_DPRINT("stats getownpropdesc: count=%ld, hit=%ld, miss=%ld", + (long) heap->stats_getownpropdesc_count, + (long) heap->stats_getownpropdesc_hit, + (long) heap->stats_getownpropdesc_miss)); + DUK_D(DUK_DPRINT("stats getpropdesc: count=%ld, hit=%ld, miss=%ld", + (long) heap->stats_getpropdesc_count, + (long) heap->stats_getpropdesc_hit, + (long) heap->stats_getpropdesc_miss)); + DUK_D(DUK_DPRINT("stats getprop: all=%ld, arrayidx=%ld, bufobjidx=%ld, " + "bufferidx=%ld, bufferlen=%ld, stringidx=%ld, stringlen=%ld, " + "proxy=%ld, arguments=%ld", + (long) heap->stats_getprop_all, + (long) heap->stats_getprop_arrayidx, + (long) heap->stats_getprop_bufobjidx, + (long) heap->stats_getprop_bufferidx, + (long) heap->stats_getprop_bufferlen, + (long) heap->stats_getprop_stringidx, + (long) heap->stats_getprop_stringlen, + (long) heap->stats_getprop_proxy, + (long) heap->stats_getprop_arguments)); + DUK_D(DUK_DPRINT("stats putprop: all=%ld, arrayidx=%ld, bufobjidx=%ld, " + "bufferidx=%ld, proxy=%ld", + (long) heap->stats_putprop_all, + (long) heap->stats_putprop_arrayidx, + (long) heap->stats_putprop_bufobjidx, + (long) heap->stats_putprop_bufferidx, + (long) heap->stats_putprop_proxy)); + DUK_D(DUK_DPRINT("stats getvar: all=%ld", (long) heap->stats_getvar_all)); + DUK_D(DUK_DPRINT("stats putvar: all=%ld", (long) heap->stats_putvar_all)); + DUK_D(DUK_DPRINT("stats envrec: delayedcreate=%ld, create=%ld, newenv=%ld, oldenv=%ld, pushclosure=%ld", + (long) heap->stats_envrec_delayedcreate, + (long) heap->stats_envrec_create, + (long) heap->stats_envrec_newenv, + (long) heap->stats_envrec_oldenv, + (long) heap->stats_envrec_pushclosure)); +} +#endif /* DUK_USE_DEBUG */ + +/* + * Main mark-and-sweep function. + * + * 'flags' represents the features requested by the caller. The current + * heap->ms_base_flags is ORed automatically into the flags; the base flags + * mask typically prevents certain mark-and-sweep operation to avoid trouble. + */ + +DUK_INTERNAL void duk_heap_mark_and_sweep(duk_heap *heap, duk_small_uint_t flags) { + duk_size_t count_keep_obj; + duk_size_t count_keep_str; +#if defined(DUK_USE_VOLUNTARY_GC) + duk_size_t tmp; +#endif + duk_bool_t entry_creating_error; + + DUK_STATS_INC(heap, stats_ms_try_count); +#if defined(DUK_USE_DEBUG) + if (flags & DUK_MS_FLAG_EMERGENCY) { + DUK_STATS_INC(heap, stats_ms_emergency_count); + } +#endif + + /* If debugger is paused, garbage collection is disabled by default. + * This is achieved by bumping ms_prevent_count when becoming paused. + */ + DUK_ASSERT(!DUK_HEAP_HAS_DEBUGGER_PAUSED(heap) || heap->ms_prevent_count > 0); + + /* Prevention/recursion check as soon as possible because we may + * be called a number of times when voluntary mark-and-sweep is + * pending. + */ + if (heap->ms_prevent_count != 0) { + DUK_DD(DUK_DDPRINT("reject recursive mark-and-sweep")); + DUK_STATS_INC(heap, stats_ms_skip_count); + return; + } + DUK_ASSERT(heap->ms_running == 0); /* ms_prevent_count is bumped when ms_running is set */ + + /* Heap_thread is used during mark-and-sweep for refcount finalization + * (it's also used for finalizer execution once mark-and-sweep is + * complete). Heap allocation code ensures heap_thread is set and + * properly initialized before setting ms_prevent_count to 0. + */ + DUK_ASSERT(heap->heap_thread != NULL); + DUK_ASSERT(heap->heap_thread->valstack != NULL); + + DUK_D(DUK_DPRINT("garbage collect (mark-and-sweep) starting, requested flags: 0x%08lx, effective flags: 0x%08lx", + (unsigned long) flags, + (unsigned long) (flags | heap->ms_base_flags))); + + flags |= heap->ms_base_flags; +#if defined(DUK_USE_FINALIZER_SUPPORT) + if (heap->finalize_list != NULL) { + flags |= DUK_MS_FLAG_POSTPONE_RESCUE; + } +#endif + + /* + * Assertions before + */ + +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(heap->ms_prevent_count == 0); + DUK_ASSERT(heap->ms_running == 0); + DUK_ASSERT(!DUK_HEAP_HAS_DEBUGGER_PAUSED(heap)); + DUK_ASSERT(!DUK_HEAP_HAS_MARKANDSWEEP_RECLIMIT_REACHED(heap)); + DUK_ASSERT(heap->ms_recursion_depth == 0); + duk__assert_heaphdr_flags(heap); + duk__assert_validity(heap); +#if defined(DUK_USE_REFERENCE_COUNTING) + /* Note: heap->refzero_free_running may be true; a refcount + * finalizer may trigger a mark-and-sweep. + */ + duk__assert_valid_refcounts(heap); +#endif /* DUK_USE_REFERENCE_COUNTING */ +#endif /* DUK_USE_ASSERTIONS */ + + /* + * Begin + */ + + DUK_ASSERT(heap->ms_prevent_count == 0); + DUK_ASSERT(heap->ms_running == 0); + heap->ms_prevent_count = 1; + heap->ms_running = 1; + entry_creating_error = heap->creating_error; + heap->creating_error = 0; + + /* + * Free activation/catcher freelists on every mark-and-sweep for now. + * This is an initial rough draft; ideally we'd keep count of the + * freelist size and free only excess entries. + */ + + DUK_D(DUK_DPRINT("freeing temporary freelists")); + duk_heap_free_freelists(heap); + + /* + * Mark roots, hoping that recursion limit is not normally hit. + * If recursion limit is hit, run additional reachability rounds + * starting from "temproots" until marking is complete. + * + * Marking happens in two phases: first we mark actual reachability + * roots (and run "temproots" to complete the process). Then we + * check which objects are unreachable and are finalizable; such + * objects are marked as FINALIZABLE and marked as reachability + * (and "temproots" is run again to complete the process). + * + * The heap finalize_list must also be marked as a reachability root. + * There may be objects on the list from a previous round if the + * previous run had finalizer skip flag. + */ + +#if defined(DUK_USE_ASSERTIONS) && defined(DUK_USE_REFERENCE_COUNTING) + duk__clear_assert_refcounts(heap); +#endif +#if defined(DUK_USE_LITCACHE_SIZE) + duk__wipe_litcache(heap); +#endif + duk__mark_roots_heap(heap); /* Mark main reachability roots. */ +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_ASSERT(heap->refzero_list == NULL); /* Always handled to completion inline in DECREF. */ +#endif + duk__mark_temproots_by_heap_scan(heap); /* Temproots. */ + +#if defined(DUK_USE_FINALIZER_SUPPORT) + duk__mark_finalizable(heap); /* Mark finalizable as reachability roots. */ + duk__mark_finalize_list(heap); /* Mark finalizer work list as reachability roots. */ +#endif + duk__mark_temproots_by_heap_scan(heap); /* Temproots. */ + + /* + * Sweep garbage and remove marking flags, and move objects with + * finalizers to the finalizer work list. + * + * Objects to be swept need to get their refcounts finalized before + * they are swept. In other words, their target object refcounts + * need to be decreased. This has to be done before freeing any + * objects to avoid decref'ing dangling pointers (which may happen + * even without bugs, e.g. with reference loops) + * + * Because strings don't point to other heap objects, similar + * finalization is not necessary for strings. + */ + + /* XXX: more emergency behavior, e.g. find smaller hash sizes etc */ + +#if defined(DUK_USE_REFERENCE_COUNTING) + duk__finalize_refcounts(heap); +#endif + duk__sweep_heap(heap, flags, &count_keep_obj); + duk__sweep_stringtable(heap, &count_keep_str); +#if defined(DUK_USE_ASSERTIONS) && defined(DUK_USE_REFERENCE_COUNTING) + duk__check_assert_refcounts(heap); +#endif +#if defined(DUK_USE_REFERENCE_COUNTING) + DUK_ASSERT(heap->refzero_list == NULL); /* Always handled to completion inline in DECREF. */ +#endif +#if defined(DUK_USE_FINALIZER_SUPPORT) + duk__clear_finalize_list_flags(heap); +#endif + + /* + * Object compaction (emergency only). + * + * Object compaction is a separate step after sweeping, as there is + * more free memory for it to work with. Also, currently compaction + * may insert new objects into the heap allocated list and the string + * table which we don't want to do during a sweep (the reachability + * flags of such objects would be incorrect). The objects inserted + * are currently: + * + * - a temporary duk_hbuffer for a new properties allocation + * - if array part is abandoned, string keys are interned + * + * The object insertions go to the front of the list, so they do not + * cause an infinite loop (they are not compacted). + * + * At present compaction is not allowed when mark-and-sweep runs + * during error handling because it involves a duk_safe_call() + * interfering with error state. + */ + + if ((flags & DUK_MS_FLAG_EMERGENCY) && !(flags & DUK_MS_FLAG_NO_OBJECT_COMPACTION)) { + if (heap->lj.type != DUK_LJ_TYPE_UNKNOWN) { + DUK_D(DUK_DPRINT("lj.type (%ld) not DUK_LJ_TYPE_UNKNOWN, skip object compaction", (long) heap->lj.type)); + } else { + DUK_D(DUK_DPRINT("object compaction")); + duk__compact_objects(heap); + } + } + + /* + * String table resize check. + * + * This is mainly useful in emergency GC: if the string table load + * factor is really low for some reason, we can shrink the string + * table to a smaller size and free some memory in the process. + * Only execute in emergency GC. String table has internal flags + * to protect against recursive resizing if this mark-and-sweep pass + * was triggered by a string table resize. + */ + + if (flags & DUK_MS_FLAG_EMERGENCY) { + DUK_D(DUK_DPRINT("stringtable resize check in emergency gc")); + duk_heap_strtable_force_resize(heap); + } + + /* + * Finish + */ + + DUK_ASSERT(heap->ms_prevent_count == 1); + DUK_ASSERT(heap->ms_running == 1); + heap->ms_prevent_count = 0; + heap->ms_running = 0; + heap->creating_error = entry_creating_error; /* for nested error handling, see GH-2278 */ + + /* + * Assertions after + */ + +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(heap->ms_prevent_count == 0); + DUK_ASSERT(!DUK_HEAP_HAS_MARKANDSWEEP_RECLIMIT_REACHED(heap)); + DUK_ASSERT(heap->ms_recursion_depth == 0); + duk__assert_heaphdr_flags(heap); + duk__assert_validity(heap); +#if defined(DUK_USE_REFERENCE_COUNTING) + /* Note: heap->refzero_free_running may be true; a refcount + * finalizer may trigger a mark-and-sweep. + */ + duk__assert_valid_refcounts(heap); +#endif /* DUK_USE_REFERENCE_COUNTING */ +#if defined(DUK_USE_LITCACHE_SIZE) + duk__assert_litcache_nulls(heap); +#endif /* DUK_USE_LITCACHE_SIZE */ +#endif /* DUK_USE_ASSERTIONS */ + + /* + * Reset trigger counter + */ + +#if defined(DUK_USE_VOLUNTARY_GC) + tmp = (count_keep_obj + count_keep_str) / 256; + heap->ms_trigger_counter = (duk_int_t) ((tmp * DUK_HEAP_MARK_AND_SWEEP_TRIGGER_MULT) + DUK_HEAP_MARK_AND_SWEEP_TRIGGER_ADD); + DUK_D(DUK_DPRINT("garbage collect (mark-and-sweep) finished: %ld objects kept, %ld strings kept, trigger reset to %ld", + (long) count_keep_obj, + (long) count_keep_str, + (long) heap->ms_trigger_counter)); +#else + DUK_D(DUK_DPRINT("garbage collect (mark-and-sweep) finished: %ld objects kept, %ld strings kept, no voluntary trigger", + (long) count_keep_obj, + (long) count_keep_str)); +#endif + + /* + * Stats dump + */ + +#if defined(DUK_USE_DEBUG) + duk__dump_stats(heap); +#endif + + /* + * Finalize objects in the finalization work list. Finalized + * objects are queued back to heap_allocated with FINALIZED set. + * + * Since finalizers may cause arbitrary side effects, they are + * prevented e.g. during string table and object property allocation + * resizing using heap->pf_prevent_count. In this case the objects + * remain in the finalization work list after mark-and-sweep exits + * and they may be finalized on the next pass or any DECREF checking + * for finalize_list. + * + * As of Duktape 2.1 finalization happens outside mark-and-sweep + * protection. Mark-and-sweep is allowed while the finalize_list + * is being processed, but no rescue decisions are done while the + * process is on-going. This avoids incorrect rescue decisions + * if an object is considered reachable (and thus rescued) because + * of a reference via finalize_list (which is considered a reachability + * root). When finalize_list is being processed, reachable objects + * with FINALIZED set will just keep their FINALIZED flag for later + * mark-and-sweep processing. + * + * This could also be handled (a bit better) by having a more refined + * notion of reachability for rescue/free decisions. + * + * XXX: avoid finalizer execution when doing emergency GC? + */ + +#if defined(DUK_USE_FINALIZER_SUPPORT) + /* Attempt to process finalize_list, pf_prevent_count check + * is inside the target. + */ + duk_heap_process_finalize_list(heap); +#endif /* DUK_USE_FINALIZER_SUPPORT */ +} +#line 1 "duk_heap_memory.c" +/* + * Memory allocation handling. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Allocate memory with garbage collection. + */ + +/* Slow path: voluntary GC triggered, first alloc attempt failed, or zero size. */ +DUK_LOCAL DUK_NOINLINE_PERF DUK_COLD void *duk__heap_mem_alloc_slowpath(duk_heap *heap, duk_size_t size) { + void *res; + duk_small_int_t i; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->alloc_func != NULL); + DUK_ASSERT_DISABLE(size >= 0); + + if (size == 0) { + DUK_D(DUK_DPRINT("zero size alloc in slow path, return NULL")); + return NULL; + } + + DUK_D(DUK_DPRINT("first alloc attempt failed or voluntary GC limit reached, attempt to gc and retry")); + +#if 0 + /* + * If GC is already running there is no point in attempting a GC + * because it will be skipped. This could be checked for explicitly, + * but it isn't actually needed: the loop below will eventually + * fail resulting in a NULL. + */ + + if (heap->ms_prevent_count != 0) { + DUK_D(DUK_DPRINT("duk_heap_mem_alloc() failed, gc in progress (gc skipped), alloc size %ld", (long) size)); + return NULL; + } +#endif + + /* + * Retry with several GC attempts. Initial attempts are made without + * emergency mode; later attempts use emergency mode which minimizes + * memory allocations forcibly. + */ + + for (i = 0; i < DUK_HEAP_ALLOC_FAIL_MARKANDSWEEP_LIMIT; i++) { + duk_small_uint_t flags; + + flags = 0; + if (i >= DUK_HEAP_ALLOC_FAIL_MARKANDSWEEP_EMERGENCY_LIMIT - 1) { + flags |= DUK_MS_FLAG_EMERGENCY; + } + + duk_heap_mark_and_sweep(heap, flags); + + DUK_ASSERT(size > 0); + res = heap->alloc_func(heap->heap_udata, size); + if (res != NULL) { + DUK_D(DUK_DPRINT("duk_heap_mem_alloc() succeeded after gc (pass %ld), alloc size %ld", + (long) (i + 1), + (long) size)); + return res; + } + } + + DUK_D(DUK_DPRINT("duk_heap_mem_alloc() failed even after gc, alloc size %ld", (long) size)); + return NULL; +} + +DUK_INTERNAL DUK_INLINE_PERF DUK_HOT void *duk_heap_mem_alloc(duk_heap *heap, duk_size_t size) { + void *res; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->alloc_func != NULL); + DUK_ASSERT_DISABLE(size >= 0); + +#if defined(DUK_USE_VOLUNTARY_GC) + /* Voluntary periodic GC (if enabled). */ + if (DUK_UNLIKELY(--(heap)->ms_trigger_counter < 0)) { + goto slowpath; + } +#endif + +#if defined(DUK_USE_GC_TORTURE) + /* Simulate alloc failure on every alloc, except when mark-and-sweep + * is running. + */ + if (heap->ms_prevent_count == 0) { + DUK_DDD(DUK_DDDPRINT("gc torture enabled, pretend that first alloc attempt fails")); + res = NULL; + DUK_UNREF(res); + goto slowpath; + } +#endif + + /* Zero-size allocation should happen very rarely (if at all), so + * don't check zero size on NULL; handle it in the slow path + * instead. This reduces size of inlined code. + */ + res = heap->alloc_func(heap->heap_udata, size); + if (DUK_LIKELY(res != NULL)) { + return res; + } + +slowpath: + + if (size == 0) { + DUK_D(DUK_DPRINT("first alloc attempt returned NULL for zero size alloc, use slow path to deal with it")); + } else { + DUK_D(DUK_DPRINT("first alloc attempt failed, attempt to gc and retry")); + } + return duk__heap_mem_alloc_slowpath(heap, size); +} + +DUK_INTERNAL DUK_INLINE_PERF DUK_HOT void *duk_heap_mem_alloc_zeroed(duk_heap *heap, duk_size_t size) { + void *res; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->alloc_func != NULL); + DUK_ASSERT_DISABLE(size >= 0); + + res = DUK_ALLOC(heap, size); + if (DUK_LIKELY(res != NULL)) { + duk_memzero(res, size); + } + return res; +} + +DUK_INTERNAL DUK_INLINE_PERF DUK_HOT void *duk_heap_mem_alloc_checked(duk_hthread *thr, duk_size_t size) { + void *res; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(thr->heap->alloc_func != NULL); + + res = duk_heap_mem_alloc(thr->heap, size); + if (DUK_LIKELY(res != NULL)) { + return res; + } else if (size == 0) { + DUK_ASSERT(res == NULL); + return res; + } + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return NULL;); +} + +DUK_INTERNAL DUK_INLINE_PERF DUK_HOT void *duk_heap_mem_alloc_checked_zeroed(duk_hthread *thr, duk_size_t size) { + void *res; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(thr->heap->alloc_func != NULL); + + res = duk_heap_mem_alloc(thr->heap, size); + if (DUK_LIKELY(res != NULL)) { + duk_memzero(res, size); + return res; + } else if (size == 0) { + DUK_ASSERT(res == NULL); + return res; + } + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return NULL;); +} + +/* + * Reallocate memory with garbage collection. + */ + +/* Slow path: voluntary GC triggered, first realloc attempt failed, or zero size. */ +DUK_LOCAL DUK_NOINLINE_PERF DUK_COLD void *duk__heap_mem_realloc_slowpath(duk_heap *heap, void *ptr, duk_size_t newsize) { + void *res; + duk_small_int_t i; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->realloc_func != NULL); + /* ptr may be NULL */ + DUK_ASSERT_DISABLE(newsize >= 0); + + /* Unlike for malloc(), zero size NULL result check happens at the call site. */ + + DUK_D(DUK_DPRINT("first realloc attempt failed, attempt to gc and retry")); + +#if 0 + /* + * Avoid a GC if GC is already running. See duk_heap_mem_alloc(). + */ + + if (heap->ms_prevent_count != 0) { + DUK_D(DUK_DPRINT("duk_heap_mem_realloc() failed, gc in progress (gc skipped), alloc size %ld", (long) newsize)); + return NULL; + } +#endif + + /* + * Retry with several GC attempts. Initial attempts are made without + * emergency mode; later attempts use emergency mode which minimizes + * memory allocations forcibly. + */ + + for (i = 0; i < DUK_HEAP_ALLOC_FAIL_MARKANDSWEEP_LIMIT; i++) { + duk_small_uint_t flags; + + flags = 0; + if (i >= DUK_HEAP_ALLOC_FAIL_MARKANDSWEEP_EMERGENCY_LIMIT - 1) { + flags |= DUK_MS_FLAG_EMERGENCY; + } + + duk_heap_mark_and_sweep(heap, flags); + + res = heap->realloc_func(heap->heap_udata, ptr, newsize); + if (res != NULL || newsize == 0) { + DUK_D(DUK_DPRINT("duk_heap_mem_realloc() succeeded after gc (pass %ld), alloc size %ld", + (long) (i + 1), + (long) newsize)); + return res; + } + } + + DUK_D(DUK_DPRINT("duk_heap_mem_realloc() failed even after gc, alloc size %ld", (long) newsize)); + return NULL; +} + +DUK_INTERNAL DUK_INLINE_PERF DUK_HOT void *duk_heap_mem_realloc(duk_heap *heap, void *ptr, duk_size_t newsize) { + void *res; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->realloc_func != NULL); + /* ptr may be NULL */ + DUK_ASSERT_DISABLE(newsize >= 0); + +#if defined(DUK_USE_VOLUNTARY_GC) + /* Voluntary periodic GC (if enabled). */ + if (DUK_UNLIKELY(--(heap)->ms_trigger_counter < 0)) { + goto gc_retry; + } +#endif + +#if defined(DUK_USE_GC_TORTURE) + /* Simulate alloc failure on every realloc, except when mark-and-sweep + * is running. + */ + if (heap->ms_prevent_count == 0) { + DUK_DDD(DUK_DDDPRINT("gc torture enabled, pretend that first realloc attempt fails")); + res = NULL; + DUK_UNREF(res); + goto gc_retry; + } +#endif + + res = heap->realloc_func(heap->heap_udata, ptr, newsize); + if (DUK_LIKELY(res != NULL) || newsize == 0) { + if (res != NULL && newsize == 0) { + DUK_DD(DUK_DDPRINT("first realloc attempt returned NULL for zero size realloc, accept and return NULL")); + } + return res; + } else { + goto gc_retry; + } + /* Never here. */ + +gc_retry: + return duk__heap_mem_realloc_slowpath(heap, ptr, newsize); +} + +/* + * Reallocate memory with garbage collection, using a callback to provide + * the current allocated pointer. This variant is used when a mark-and-sweep + * (e.g. finalizers) might change the original pointer. + */ + +/* Slow path: voluntary GC triggered, first realloc attempt failed, or zero size. */ +DUK_LOCAL DUK_NOINLINE_PERF DUK_COLD void *duk__heap_mem_realloc_indirect_slowpath(duk_heap *heap, + duk_mem_getptr cb, + void *ud, + duk_size_t newsize) { + void *res; + duk_small_int_t i; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->realloc_func != NULL); + DUK_ASSERT_DISABLE(newsize >= 0); + + /* Unlike for malloc(), zero size NULL result check happens at the call site. */ + + DUK_D(DUK_DPRINT("first indirect realloc attempt failed, attempt to gc and retry")); + +#if 0 + /* + * Avoid a GC if GC is already running. See duk_heap_mem_alloc(). + */ + + if (heap->ms_prevent_count != 0) { + DUK_D(DUK_DPRINT("duk_heap_mem_realloc_indirect() failed, gc in progress (gc skipped), alloc size %ld", (long) newsize)); + return NULL; + } +#endif + + /* + * Retry with several GC attempts. Initial attempts are made without + * emergency mode; later attempts use emergency mode which minimizes + * memory allocations forcibly. + */ + + for (i = 0; i < DUK_HEAP_ALLOC_FAIL_MARKANDSWEEP_LIMIT; i++) { + duk_small_uint_t flags; + +#if defined(DUK_USE_DEBUG) + void *ptr_pre; + void *ptr_post; +#endif + +#if defined(DUK_USE_DEBUG) + ptr_pre = cb(heap, ud); +#endif + flags = 0; + if (i >= DUK_HEAP_ALLOC_FAIL_MARKANDSWEEP_EMERGENCY_LIMIT - 1) { + flags |= DUK_MS_FLAG_EMERGENCY; + } + + duk_heap_mark_and_sweep(heap, flags); +#if defined(DUK_USE_DEBUG) + ptr_post = cb(heap, ud); + if (ptr_pre != ptr_post) { + DUK_DD(DUK_DDPRINT("realloc base pointer changed by mark-and-sweep: %p -> %p", + (void *) ptr_pre, + (void *) ptr_post)); + } +#endif + + /* Note: key issue here is to re-lookup the base pointer on every attempt. + * The pointer being reallocated may change after every mark-and-sweep. + */ + + res = heap->realloc_func(heap->heap_udata, cb(heap, ud), newsize); + if (res != NULL || newsize == 0) { + DUK_D(DUK_DPRINT("duk_heap_mem_realloc_indirect() succeeded after gc (pass %ld), alloc size %ld", + (long) (i + 1), + (long) newsize)); + return res; + } + } + + DUK_D(DUK_DPRINT("duk_heap_mem_realloc_indirect() failed even after gc, alloc size %ld", (long) newsize)); + return NULL; +} + +DUK_INTERNAL DUK_INLINE_PERF DUK_HOT void *duk_heap_mem_realloc_indirect(duk_heap *heap, + duk_mem_getptr cb, + void *ud, + duk_size_t newsize) { + void *res; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->realloc_func != NULL); + DUK_ASSERT_DISABLE(newsize >= 0); + +#if defined(DUK_USE_VOLUNTARY_GC) + /* Voluntary periodic GC (if enabled). */ + if (DUK_UNLIKELY(--(heap)->ms_trigger_counter < 0)) { + goto gc_retry; + } +#endif + +#if defined(DUK_USE_GC_TORTURE) + /* Simulate alloc failure on every realloc, except when mark-and-sweep + * is running. + */ + if (heap->ms_prevent_count == 0) { + DUK_DDD(DUK_DDDPRINT("gc torture enabled, pretend that first indirect realloc attempt fails")); + res = NULL; + DUK_UNREF(res); + goto gc_retry; + } +#endif + + res = heap->realloc_func(heap->heap_udata, cb(heap, ud), newsize); + if (DUK_LIKELY(res != NULL) || newsize == 0) { + if (res != NULL && newsize == 0) { + DUK_DD(DUK_DDPRINT( + "first indirect realloc attempt returned NULL for zero size realloc, accept and return NULL")); + } + return res; + } else { + goto gc_retry; + } + /* Never here. */ + +gc_retry: + return duk__heap_mem_realloc_indirect_slowpath(heap, cb, ud, newsize); +} + +/* + * Free memory + */ + +DUK_INTERNAL DUK_INLINE_PERF DUK_HOT void duk_heap_mem_free(duk_heap *heap, void *ptr) { + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->free_func != NULL); + /* ptr may be NULL */ + + /* Must behave like a no-op with NULL and any pointer returned from + * malloc/realloc with zero size. + */ + heap->free_func(heap->heap_udata, ptr); + + /* Never perform a GC (even voluntary) in a memory free, otherwise + * all call sites doing frees would need to deal with the side effects. + * No need to update voluntary GC counter either. + */ +} +#line 1 "duk_heap_misc.c" +/* + * Support functions for duk_heap. + */ + +/* #include duk_internal.h -> already included */ + +DUK_INTERNAL void duk_heap_insert_into_heap_allocated(duk_heap *heap, duk_heaphdr *hdr) { + duk_heaphdr *root; + + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(hdr) != DUK_HTYPE_STRING); + + root = heap->heap_allocated; +#if defined(DUK_USE_DOUBLE_LINKED_HEAP) + if (root != NULL) { + DUK_ASSERT(DUK_HEAPHDR_GET_PREV(heap, root) == NULL); + DUK_HEAPHDR_SET_PREV(heap, root, hdr); + } + DUK_HEAPHDR_SET_PREV(heap, hdr, NULL); +#endif + DUK_HEAPHDR_SET_NEXT(heap, hdr, root); + DUK_HEAPHDR_ASSERT_LINKS(heap, hdr); + DUK_HEAPHDR_ASSERT_LINKS(heap, root); + heap->heap_allocated = hdr; +} + +#if defined(DUK_USE_REFERENCE_COUNTING) +DUK_INTERNAL void duk_heap_remove_from_heap_allocated(duk_heap *heap, duk_heaphdr *hdr) { + duk_heaphdr *prev; + duk_heaphdr *next; + + /* Strings are in string table. */ + DUK_ASSERT(hdr != NULL); + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(hdr) != DUK_HTYPE_STRING); + + /* Target 'hdr' must be in heap_allocated (not e.g. finalize_list). + * If not, heap lists will become corrupted so assert early for it. + */ +#if defined(DUK_USE_ASSERTIONS) + { + duk_heaphdr *tmp; + for (tmp = heap->heap_allocated; tmp != NULL; tmp = DUK_HEAPHDR_GET_NEXT(heap, tmp)) { + if (tmp == hdr) { + break; + } + } + DUK_ASSERT(tmp == hdr); + } +#endif + + /* Read/write only once to minimize pointer compression calls. */ + prev = DUK_HEAPHDR_GET_PREV(heap, hdr); + next = DUK_HEAPHDR_GET_NEXT(heap, hdr); + + if (prev != NULL) { + DUK_ASSERT(heap->heap_allocated != hdr); + DUK_HEAPHDR_SET_NEXT(heap, prev, next); + } else { + DUK_ASSERT(heap->heap_allocated == hdr); + heap->heap_allocated = next; + } + if (next != NULL) { + DUK_HEAPHDR_SET_PREV(heap, next, prev); + } else { + ; + } +} +#endif /* DUK_USE_REFERENCE_COUNTING */ + +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_INTERNAL void duk_heap_insert_into_finalize_list(duk_heap *heap, duk_heaphdr *hdr) { + duk_heaphdr *root; + + root = heap->finalize_list; +#if defined(DUK_USE_DOUBLE_LINKED_HEAP) + DUK_HEAPHDR_SET_PREV(heap, hdr, NULL); + if (root != NULL) { + DUK_ASSERT(DUK_HEAPHDR_GET_PREV(heap, root) == NULL); + DUK_HEAPHDR_SET_PREV(heap, root, hdr); + } +#endif + DUK_HEAPHDR_SET_NEXT(heap, hdr, root); + DUK_HEAPHDR_ASSERT_LINKS(heap, hdr); + DUK_HEAPHDR_ASSERT_LINKS(heap, root); + heap->finalize_list = hdr; +} +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_INTERNAL void duk_heap_remove_from_finalize_list(duk_heap *heap, duk_heaphdr *hdr) { +#if defined(DUK_USE_DOUBLE_LINKED_HEAP) + duk_heaphdr *next; + duk_heaphdr *prev; + + next = DUK_HEAPHDR_GET_NEXT(heap, hdr); + prev = DUK_HEAPHDR_GET_PREV(heap, hdr); + if (next != NULL) { + DUK_ASSERT(DUK_HEAPHDR_GET_PREV(heap, next) == hdr); + DUK_HEAPHDR_SET_PREV(heap, next, prev); + } + if (prev == NULL) { + DUK_ASSERT(hdr == heap->finalize_list); + heap->finalize_list = next; + } else { + DUK_ASSERT(hdr != heap->finalize_list); + DUK_HEAPHDR_SET_NEXT(heap, prev, next); + } +#else + duk_heaphdr *next; + duk_heaphdr *curr; + + /* Random removal is expensive: we need to locate the previous element + * because we don't have a 'prev' pointer. + */ + curr = heap->finalize_list; + if (curr == hdr) { + heap->finalize_list = DUK_HEAPHDR_GET_NEXT(heap, curr); + } else { + DUK_ASSERT(hdr != heap->finalize_list); + for (;;) { + DUK_ASSERT(curr != NULL); /* Caller responsibility. */ + + next = DUK_HEAPHDR_GET_NEXT(heap, curr); + if (next == hdr) { + next = DUK_HEAPHDR_GET_NEXT(heap, hdr); + DUK_HEAPHDR_SET_NEXT(heap, curr, next); + break; + } + } + } +#endif +} +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL duk_bool_t duk_heap_in_heap_allocated(duk_heap *heap, duk_heaphdr *ptr) { + duk_heaphdr *curr; + DUK_ASSERT(heap != NULL); + + for (curr = heap->heap_allocated; curr != NULL; curr = DUK_HEAPHDR_GET_NEXT(heap, curr)) { + if (curr == ptr) { + return 1; + } + } + return 0; +} +#endif /* DUK_USE_ASSERTIONS */ + +#if defined(DUK_USE_INTERRUPT_COUNTER) +DUK_INTERNAL void duk_heap_switch_thread(duk_heap *heap, duk_hthread *new_thr) { + duk_hthread *curr_thr; + + DUK_ASSERT(heap != NULL); + + if (new_thr != NULL) { + curr_thr = heap->curr_thread; + if (curr_thr == NULL) { + /* For initial entry use default value; zero forces an + * interrupt before executing the first insturction. + */ + DUK_DD(DUK_DDPRINT("switch thread, initial entry, init default interrupt counter")); + new_thr->interrupt_counter = 0; + new_thr->interrupt_init = 0; + } else { + /* Copy interrupt counter/init value state to new thread (if any). + * It's OK for new_thr to be the same as curr_thr. + */ +#if defined(DUK_USE_DEBUG) + if (new_thr != curr_thr) { + DUK_DD(DUK_DDPRINT("switch thread, not initial entry, copy interrupt counter")); + } +#endif + new_thr->interrupt_counter = curr_thr->interrupt_counter; + new_thr->interrupt_init = curr_thr->interrupt_init; + } + } else { + DUK_DD(DUK_DDPRINT("switch thread, new thread is NULL, no interrupt counter changes")); + } + + heap->curr_thread = new_thr; /* may be NULL */ +} +#endif /* DUK_USE_INTERRUPT_COUNTER */ + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL void duk_heap_assert_valid(duk_heap *heap) { + DUK_ASSERT(heap != NULL); +} +#endif +#line 1 "duk_heap_refcount.c" +/* + * Reference counting implementation. + * + * INCREF/DECREF, finalization and freeing of objects whose refcount reaches + * zero (refzero). These operations are very performance sensitive, so + * various small tricks are used in an attempt to maximize speed. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_REFERENCE_COUNTING) + +#if !defined(DUK_USE_DOUBLE_LINKED_HEAP) +#error internal error, reference counting requires a double linked heap +#endif + +/* + * Heap object refcount finalization. + * + * When an object is about to be freed, all other objects it refers to must + * be decref'd. Refcount finalization does NOT free the object or its inner + * allocations (mark-and-sweep shares these helpers), it just manipulates + * the refcounts. + * + * Note that any of the DECREFs may cause a refcount to drop to zero. If so, + * the object won't be refzero processed inline, but will just be queued to + * refzero_list and processed by an earlier caller working on refzero_list, + * eliminating C recursion from even long refzero cascades. If refzero + * finalization is triggered by mark-and-sweep, refzero conditions are ignored + * (objects are not even queued to refzero_list) because mark-and-sweep deals + * with them; refcounts are still updated so that they remain in sync with + * actual references. + */ + +DUK_LOCAL void duk__decref_tvals_norz(duk_hthread *thr, duk_tval *tv, duk_idx_t count) { + DUK_ASSERT(count == 0 || tv != NULL); + + while (count-- > 0) { + DUK_TVAL_DECREF_NORZ(thr, tv); + tv++; + } +} + +DUK_INTERNAL void duk_hobject_refcount_finalize_norz(duk_heap *heap, duk_hobject *h) { + duk_hthread *thr; + duk_uint_fast32_t i; + duk_uint_fast32_t n; + duk_propvalue *p_val; + duk_tval *p_tv; + duk_hstring **p_key; + duk_uint8_t *p_flag; + duk_hobject *h_proto; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->heap_thread != NULL); + DUK_ASSERT(h); + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE((duk_heaphdr *) h) == DUK_HTYPE_OBJECT); + + thr = heap->heap_thread; + DUK_ASSERT(thr != NULL); + + p_key = DUK_HOBJECT_E_GET_KEY_BASE(heap, h); + p_val = DUK_HOBJECT_E_GET_VALUE_BASE(heap, h); + p_flag = DUK_HOBJECT_E_GET_FLAGS_BASE(heap, h); + n = DUK_HOBJECT_GET_ENEXT(h); + while (n-- > 0) { + duk_hstring *key; + + key = p_key[n]; + if (DUK_UNLIKELY(key == NULL)) { + continue; + } + DUK_HSTRING_DECREF_NORZ(thr, key); + if (DUK_UNLIKELY(p_flag[n] & DUK_PROPDESC_FLAG_ACCESSOR)) { + duk_hobject *h_getset; + h_getset = p_val[n].a.get; + DUK_ASSERT(h_getset == NULL || DUK_HEAPHDR_IS_OBJECT((duk_heaphdr *) h_getset)); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, h_getset); + h_getset = p_val[n].a.set; + DUK_ASSERT(h_getset == NULL || DUK_HEAPHDR_IS_OBJECT((duk_heaphdr *) h_getset)); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, h_getset); + } else { + duk_tval *tv_val; + tv_val = &p_val[n].v; + DUK_TVAL_DECREF_NORZ(thr, tv_val); + } + } + + p_tv = DUK_HOBJECT_A_GET_BASE(heap, h); + n = DUK_HOBJECT_GET_ASIZE(h); + while (n-- > 0) { + duk_tval *tv_val; + tv_val = p_tv + n; + DUK_TVAL_DECREF_NORZ(thr, tv_val); + } + + /* Hash part is a 'weak reference' and doesn't contribute to refcounts. */ + + h_proto = (duk_hobject *) DUK_HOBJECT_GET_PROTOTYPE(heap, h); + DUK_ASSERT(h_proto == NULL || DUK_HEAPHDR_IS_OBJECT((duk_heaphdr *) h_proto)); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, h_proto); + + /* XXX: Object subclass tests are quite awkward at present, ideally + * we should be able to switch-case here with a dense index (subtype + * number or something). For now, fast path plain objects and arrays + * and bit test the rest individually. + */ + + if (DUK_HOBJECT_HAS_FASTREFS(h)) { + /* Plain object or array, nothing more to do. While a + * duk_harray has additional fields, none of them need + * DECREF updates. + */ + DUK_ASSERT(DUK_HOBJECT_ALLOWS_FASTREFS(h)); + return; + } + DUK_ASSERT(DUK_HOBJECT_PROHIBITS_FASTREFS(h)); + + /* Slow path: special object, start bit checks from most likely. */ + + /* XXX: reorg, more common first */ + if (DUK_HOBJECT_IS_COMPFUNC(h)) { + duk_hcompfunc *f = (duk_hcompfunc *) h; + duk_tval *tv, *tv_end; + duk_hobject **funcs, **funcs_end; + + DUK_HCOMPFUNC_ASSERT_VALID(f); + + if (DUK_LIKELY(DUK_HCOMPFUNC_GET_DATA(heap, f) != NULL)) { + tv = DUK_HCOMPFUNC_GET_CONSTS_BASE(heap, f); + tv_end = DUK_HCOMPFUNC_GET_CONSTS_END(heap, f); + while (tv < tv_end) { + DUK_TVAL_DECREF_NORZ(thr, tv); + tv++; + } + + funcs = DUK_HCOMPFUNC_GET_FUNCS_BASE(heap, f); + funcs_end = DUK_HCOMPFUNC_GET_FUNCS_END(heap, f); + while (funcs < funcs_end) { + duk_hobject *h_func; + h_func = *funcs; + DUK_ASSERT(h_func != NULL); + DUK_ASSERT(DUK_HEAPHDR_IS_OBJECT((duk_heaphdr *) h_func)); + DUK_HCOMPFUNC_DECREF_NORZ(thr, (duk_hcompfunc *) h_func); + funcs++; + } + } else { + /* May happen in some out-of-memory corner cases. */ + DUK_D(DUK_DPRINT("duk_hcompfunc 'data' is NULL, skipping decref")); + } + + DUK_HEAPHDR_DECREF_ALLOWNULL(thr, (duk_heaphdr *) DUK_HCOMPFUNC_GET_LEXENV(heap, f)); + DUK_HEAPHDR_DECREF_ALLOWNULL(thr, (duk_heaphdr *) DUK_HCOMPFUNC_GET_VARENV(heap, f)); + DUK_HEAPHDR_DECREF_ALLOWNULL(thr, (duk_hbuffer *) DUK_HCOMPFUNC_GET_DATA(heap, f)); + } else if (DUK_HOBJECT_IS_DECENV(h)) { + duk_hdecenv *e = (duk_hdecenv *) h; + DUK_HDECENV_ASSERT_VALID(e); + DUK_HTHREAD_DECREF_NORZ_ALLOWNULL(thr, e->thread); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, e->varmap); + } else if (DUK_HOBJECT_IS_OBJENV(h)) { + duk_hobjenv *e = (duk_hobjenv *) h; + DUK_HOBJENV_ASSERT_VALID(e); + DUK_ASSERT(e->target != NULL); /* Required for object environments. */ + DUK_HOBJECT_DECREF_NORZ(thr, e->target); +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + } else if (DUK_HOBJECT_IS_BUFOBJ(h)) { + duk_hbufobj *b = (duk_hbufobj *) h; + DUK_HBUFOBJ_ASSERT_VALID(b); + DUK_HBUFFER_DECREF_NORZ_ALLOWNULL(thr, (duk_hbuffer *) b->buf); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, (duk_hobject *) b->buf_prop); +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + } else if (DUK_HOBJECT_IS_BOUNDFUNC(h)) { + duk_hboundfunc *f = (duk_hboundfunc *) (void *) h; + DUK_HBOUNDFUNC_ASSERT_VALID(f); + DUK_TVAL_DECREF_NORZ(thr, &f->target); + DUK_TVAL_DECREF_NORZ(thr, &f->this_binding); + duk__decref_tvals_norz(thr, f->args, f->nargs); +#if defined(DUK_USE_ES6_PROXY) + } else if (DUK_HOBJECT_IS_PROXY(h)) { + duk_hproxy *p = (duk_hproxy *) h; + DUK_HPROXY_ASSERT_VALID(p); + DUK_HOBJECT_DECREF_NORZ(thr, p->target); + DUK_HOBJECT_DECREF_NORZ(thr, p->handler); +#endif /* DUK_USE_ES6_PROXY */ + } else if (DUK_HOBJECT_IS_THREAD(h)) { + duk_hthread *t = (duk_hthread *) h; + duk_activation *act; + duk_tval *tv; + + DUK_HTHREAD_ASSERT_VALID(t); + + tv = t->valstack; + while (tv < t->valstack_top) { + DUK_TVAL_DECREF_NORZ(thr, tv); + tv++; + } + + for (act = t->callstack_curr; act != NULL; act = act->parent) { + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, (duk_hobject *) DUK_ACT_GET_FUNC(act)); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, (duk_hobject *) act->var_env); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, (duk_hobject *) act->lex_env); +#if defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, (duk_hobject *) act->prev_caller); +#endif +#if 0 /* nothing now */ + for (cat = act->cat; cat != NULL; cat = cat->parent) { + } +#endif + } + + for (i = 0; i < DUK_NUM_BUILTINS; i++) { + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, (duk_hobject *) t->builtins[i]); + } + + DUK_HTHREAD_DECREF_NORZ_ALLOWNULL(thr, (duk_hthread *) t->resumer); + } else { + /* We may come here if the object should have a FASTREFS flag + * but it's missing for some reason. Assert for never getting + * here; however, other than performance, this is harmless. + */ + DUK_D(DUK_DPRINT("missing FASTREFS flag for: %!iO", h)); + DUK_ASSERT(0); + } +} + +DUK_INTERNAL void duk_heaphdr_refcount_finalize_norz(duk_heap *heap, duk_heaphdr *hdr) { + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->heap_thread != NULL); + DUK_ASSERT(hdr != NULL); + + if (DUK_HEAPHDR_IS_OBJECT(hdr)) { + duk_hobject_refcount_finalize_norz(heap, (duk_hobject *) hdr); + } + /* DUK_HTYPE_BUFFER: nothing to finalize */ + /* DUK_HTYPE_STRING: nothing to finalize */ +} + +/* + * Refzero processing for duk_hobject: queue a refzero'ed object to either + * finalize_list or refzero_list and process the relevent list(s) if + * necessary. + * + * Refzero_list is single linked, with only 'prev' pointers set and valid. + * All 'next' pointers are intentionally left as garbage. This doesn't + * matter because refzero_list is processed to completion before any other + * code (like mark-and-sweep) might walk the list. + * + * In more detail: + * + * - On first insert refzero_list is NULL and the new object becomes the + * first and only element on the list; duk__refcount_free_pending() is + * called and it starts processing the list from the initial element, + * i.e. the list tail. + * + * - As each object is refcount finalized, new objects may be queued to + * refzero_list head. Their 'next' pointers are left as garbage, but + * 'prev' points are set correctly, with the element at refzero_list + * having a NULL 'prev' pointer. The fact that refzero_list is non-NULL + * is used to reject (1) recursive duk__refcount_free_pending() and + * (2) finalize_list processing calls. + * + * - When we're done with the current object, read its 'prev' pointer and + * free the object. If 'prev' is NULL, we've reached head of list and are + * done: set refzero_list to NULL and process pending finalizers. Otherwise + * continue processing the list. + * + * A refzero cascade is free of side effects because it only involves + * queueing more objects and freeing memory; finalizer execution is blocked + * in the code path queueing objects to finalize_list. As a result the + * initial refzero call (which triggers duk__refcount_free_pending()) must + * check finalize_list so that finalizers are executed snappily. + * + * If finalize_list processing starts first, refzero may occur while we're + * processing finalizers. That's fine: that particular refzero cascade is + * handled to completion without side effects. Once the cascade is complete, + * we'll run pending finalizers but notice that we're already doing that and + * return. + * + * This could be expanded to allow incremental freeing: just bail out + * early and resume at a future alloc/decref/refzero. However, if that + * were done, the list structure would need to be kept consistent at all + * times, mark-and-sweep would need to handle refzero_list, etc. + */ + +DUK_LOCAL void duk__refcount_free_pending(duk_heap *heap) { + duk_heaphdr *curr; +#if defined(DUK_USE_DEBUG) + duk_int_t count = 0; +#endif + + DUK_ASSERT(heap != NULL); + + curr = heap->refzero_list; + DUK_ASSERT(curr != NULL); + DUK_ASSERT(DUK_HEAPHDR_GET_PREV(heap, curr) == NULL); /* We're called on initial insert only. */ + /* curr->next is GARBAGE. */ + + do { + duk_heaphdr *prev; + + DUK_DDD(DUK_DDDPRINT("refzero processing %p: %!O", (void *) curr, (duk_heaphdr *) curr)); + +#if defined(DUK_USE_DEBUG) + count++; +#endif + + DUK_ASSERT(curr != NULL); + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(curr) == DUK_HTYPE_OBJECT); /* currently, always the case */ + /* FINALIZED may be set; don't care about flags here. */ + + /* Refcount finalize 'curr'. Refzero_list must be non-NULL + * here to prevent recursive entry to duk__refcount_free_pending(). + */ + DUK_ASSERT(heap->refzero_list != NULL); + duk_hobject_refcount_finalize_norz(heap, (duk_hobject *) curr); + + prev = DUK_HEAPHDR_GET_PREV(heap, curr); + DUK_ASSERT((prev == NULL && heap->refzero_list == curr) || (prev != NULL && heap->refzero_list != curr)); + /* prev->next is intentionally not updated and is garbage. */ + + duk_free_hobject(heap, (duk_hobject *) curr); /* Invalidates 'curr'. */ + + curr = prev; + } while (curr != NULL); + + heap->refzero_list = NULL; + + DUK_DD(DUK_DDPRINT("refzero processed %ld objects", (long) count)); +} + +DUK_LOCAL DUK_INLINE void duk__refcount_refzero_hobject(duk_heap *heap, duk_hobject *obj, duk_bool_t skip_free_pending) { + duk_heaphdr *hdr; + duk_heaphdr *root; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->heap_thread != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE((duk_heaphdr *) obj) == DUK_HTYPE_OBJECT); + + hdr = (duk_heaphdr *) obj; + + /* Refzero'd objects must be in heap_allocated. They can't be in + * finalize_list because all objects on finalize_list have an + * artificial +1 refcount bump. + */ +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(duk_heap_in_heap_allocated(heap, (duk_heaphdr *) obj)); +#endif + + DUK_HEAP_REMOVE_FROM_HEAP_ALLOCATED(heap, hdr); + +#if defined(DUK_USE_FINALIZER_SUPPORT) + /* This finalizer check MUST BE side effect free. It should also be + * as fast as possible because it's applied to every object freed. + */ + if (DUK_UNLIKELY(DUK_HOBJECT_HAS_FINALIZER_FAST(heap, (duk_hobject *) hdr) != 0U)) { + /* Special case: FINALIZED may be set if mark-and-sweep queued + * object for finalization, the finalizer was executed (and + * FINALIZED set), mark-and-sweep hasn't yet processed the + * object again, but its refcount drops to zero. Free without + * running the finalizer again. + */ + if (DUK_HEAPHDR_HAS_FINALIZED(hdr)) { + DUK_D(DUK_DPRINT("refzero'd object has finalizer and FINALIZED is set -> free")); + } else { + /* Set FINALIZABLE flag so that all objects on finalize_list + * will have it set and are thus detectable based on the + * flag alone. + */ + DUK_HEAPHDR_SET_FINALIZABLE(hdr); + DUK_ASSERT(!DUK_HEAPHDR_HAS_FINALIZED(hdr)); + +#if defined(DUK_USE_REFERENCE_COUNTING) + /* Bump refcount on finalize_list insert so that a + * refzero can never occur when an object is waiting + * for its finalizer call. Refzero might otherwise + * now happen because we allow duk_push_heapptr() for + * objects pending finalization. + */ + DUK_HEAPHDR_PREINC_REFCOUNT(hdr); +#endif + DUK_HEAP_INSERT_INTO_FINALIZE_LIST(heap, hdr); + + /* Process finalizers unless skipping is explicitly + * requested (NORZ) or refzero_list is being processed + * (avoids side effects during a refzero cascade). + * If refzero_list is processed, the initial refzero + * call will run pending finalizers when refzero_list + * is done. + */ + if (!skip_free_pending && heap->refzero_list == NULL) { + duk_heap_process_finalize_list(heap); + } + return; + } + } +#endif /* DUK_USE_FINALIZER_SUPPORT */ + + /* No need to finalize, free object via refzero_list. */ + + root = heap->refzero_list; + + DUK_HEAPHDR_SET_PREV(heap, hdr, NULL); + /* 'next' is left as GARBAGE. */ + heap->refzero_list = hdr; + + if (root == NULL) { + /* Object is now queued. Refzero_list was NULL so + * no-one is currently processing it; do it here. + * With refzero processing just doing a cascade of + * free calls, we can process it directly even when + * NORZ macros are used: there are no side effects. + */ + duk__refcount_free_pending(heap); + DUK_ASSERT(heap->refzero_list == NULL); + + /* Process finalizers only after the entire cascade + * is finished. In most cases there's nothing to + * finalize, so fast path check to avoid a call. + */ +#if defined(DUK_USE_FINALIZER_SUPPORT) + if (!skip_free_pending && DUK_UNLIKELY(heap->finalize_list != NULL)) { + duk_heap_process_finalize_list(heap); + } +#endif + } else { + DUK_ASSERT(DUK_HEAPHDR_GET_PREV(heap, root) == NULL); + DUK_HEAPHDR_SET_PREV(heap, root, hdr); + + /* Object is now queued. Because refzero_list was + * non-NULL, it's already being processed by someone + * in the C call stack, so we're done. + */ + } +} + +#if defined(DUK_USE_FINALIZER_SUPPORT) +DUK_INTERNAL DUK_ALWAYS_INLINE void duk_refzero_check_fast(duk_hthread *thr) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(thr->heap->refzero_list == NULL); /* Processed to completion inline. */ + + if (DUK_UNLIKELY(thr->heap->finalize_list != NULL)) { + duk_heap_process_finalize_list(thr->heap); + } +} + +DUK_INTERNAL void duk_refzero_check_slow(duk_hthread *thr) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(thr->heap->refzero_list == NULL); /* Processed to completion inline. */ + + if (DUK_UNLIKELY(thr->heap->finalize_list != NULL)) { + duk_heap_process_finalize_list(thr->heap); + } +} +#endif /* DUK_USE_FINALIZER_SUPPORT */ + +/* + * Refzero processing for duk_hstring. + */ + +DUK_LOCAL DUK_INLINE void duk__refcount_refzero_hstring(duk_heap *heap, duk_hstring *str) { + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->heap_thread != NULL); + DUK_ASSERT(str != NULL); + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE((duk_heaphdr *) str) == DUK_HTYPE_STRING); + + duk_heap_strcache_string_remove(heap, str); + duk_heap_strtable_unlink(heap, str); + duk_free_hstring(heap, str); +} + +/* + * Refzero processing for duk_hbuffer. + */ + +DUK_LOCAL DUK_INLINE void duk__refcount_refzero_hbuffer(duk_heap *heap, duk_hbuffer *buf) { + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->heap_thread != NULL); + DUK_ASSERT(buf != NULL); + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE((duk_heaphdr *) buf) == DUK_HTYPE_BUFFER); + + DUK_HEAP_REMOVE_FROM_HEAP_ALLOCATED(heap, (duk_heaphdr *) buf); + duk_free_hbuffer(heap, buf); +} + +/* + * Incref and decref functions. + * + * Decref may trigger immediate refzero handling, which may free and finalize + * an arbitrary number of objects (a "DECREF cascade"). + * + * Refzero handling is skipped entirely if (1) mark-and-sweep is running or + * (2) execution is paused in the debugger. The objects are left in the heap, + * and will be freed by mark-and-sweep or eventual heap destruction. + * + * This is necessary during mark-and-sweep because refcounts are also updated + * during the sweep phase (otherwise objects referenced by a swept object + * would have incorrect refcounts) which then calls here. This could be + * avoided by using separate decref macros in mark-and-sweep; however, + * mark-and-sweep also calls finalizers which would use the ordinary decref + * macros anyway. + * + * We can't process refzeros (= free objects) when the debugger is running + * as the debugger might make an object unreachable but still continue + * inspecting it (or even cause it to be pushed back). So we must rely on + * mark-and-sweep to collect them. + * + * The DUK__RZ_SUPPRESS_CHECK() condition is also used in heap destruction + * when running finalizers for remaining objects: the flag prevents objects + * from being moved around in heap linked lists while that's being done. + * + * The suppress condition is important to performance. + */ + +#define DUK__RZ_SUPPRESS_ASSERT1() \ + do { \ + DUK_ASSERT(thr != NULL); \ + DUK_ASSERT(thr->heap != NULL); \ + /* When mark-and-sweep runs, heap_thread must exist. */ \ + DUK_ASSERT(thr->heap->ms_running == 0 || thr->heap->heap_thread != NULL); \ + /* In normal operation finalizers are executed with ms_running == 0 \ + * so we should never see ms_running == 1 and thr != heap_thread. \ + * In heap destruction finalizers are executed with ms_running != 0 \ + * to e.g. prevent refzero; a special value ms_running == 2 is used \ + * in that case so it can be distinguished from the normal runtime \ + * case, and allows a stronger assertion here (GH-2030). \ + */ \ + DUK_ASSERT(!(thr->heap->ms_running == 1 && thr != thr->heap->heap_thread)); \ + /* We may be called when the heap is initializing and we process \ + * refzeros normally, but mark-and-sweep and finalizers are prevented \ + * if that's the case. \ + */ \ + DUK_ASSERT(thr->heap->heap_initializing == 0 || thr->heap->ms_prevent_count > 0); \ + DUK_ASSERT(thr->heap->heap_initializing == 0 || thr->heap->pf_prevent_count > 0); \ + } while (0) + +#if defined(DUK_USE_DEBUGGER_SUPPORT) +#define DUK__RZ_SUPPRESS_ASSERT2() \ + do { \ + /* When debugger is paused, ms_running is set. */ \ + DUK_ASSERT(!DUK_HEAP_HAS_DEBUGGER_PAUSED(thr->heap) || thr->heap->ms_running != 0); \ + } while (0) +#define DUK__RZ_SUPPRESS_COND() (heap->ms_running != 0) +#else +#define DUK__RZ_SUPPRESS_ASSERT2() \ + do { \ + } while (0) +#define DUK__RZ_SUPPRESS_COND() (heap->ms_running != 0) +#endif /* DUK_USE_DEBUGGER_SUPPORT */ + +#define DUK__RZ_SUPPRESS_CHECK() \ + do { \ + DUK__RZ_SUPPRESS_ASSERT1(); \ + DUK__RZ_SUPPRESS_ASSERT2(); \ + if (DUK_UNLIKELY(DUK__RZ_SUPPRESS_COND())) { \ + DUK_DDD( \ + DUK_DDDPRINT("refzero handling suppressed (not even queued) when mark-and-sweep running, object: %p", \ + (void *) h)); \ + return; \ + } \ + } while (0) + +#define DUK__RZ_STRING() \ + do { \ + duk__refcount_refzero_hstring(heap, (duk_hstring *) h); \ + } while (0) +#define DUK__RZ_BUFFER() \ + do { \ + duk__refcount_refzero_hbuffer(heap, (duk_hbuffer *) h); \ + } while (0) +#define DUK__RZ_OBJECT() \ + do { \ + duk__refcount_refzero_hobject(heap, (duk_hobject *) h, skip_free_pending); \ + } while (0) + +/* XXX: test the effect of inlining here vs. NOINLINE in refzero helpers */ +#if defined(DUK_USE_FAST_REFCOUNT_DEFAULT) +#define DUK__RZ_INLINE DUK_ALWAYS_INLINE +#else +#define DUK__RZ_INLINE /*nop*/ +#endif + +DUK_LOCAL DUK__RZ_INLINE void duk__hstring_refzero_helper(duk_hthread *thr, duk_hstring *h) { + duk_heap *heap; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(h != NULL); + heap = thr->heap; + + DUK__RZ_SUPPRESS_CHECK(); + DUK__RZ_STRING(); +} + +DUK_LOCAL DUK__RZ_INLINE void duk__hbuffer_refzero_helper(duk_hthread *thr, duk_hbuffer *h) { + duk_heap *heap; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(h != NULL); + heap = thr->heap; + + DUK__RZ_SUPPRESS_CHECK(); + DUK__RZ_BUFFER(); +} + +DUK_LOCAL DUK__RZ_INLINE void duk__hobject_refzero_helper(duk_hthread *thr, duk_hobject *h, duk_bool_t skip_free_pending) { + duk_heap *heap; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(h != NULL); + heap = thr->heap; + + DUK__RZ_SUPPRESS_CHECK(); + DUK__RZ_OBJECT(); +} + +DUK_LOCAL DUK__RZ_INLINE void duk__heaphdr_refzero_helper(duk_hthread *thr, duk_heaphdr *h, duk_bool_t skip_free_pending) { + duk_heap *heap; + duk_small_uint_t htype; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(h != NULL); + heap = thr->heap; + + htype = (duk_small_uint_t) DUK_HEAPHDR_GET_TYPE(h); + DUK_DDD(DUK_DDDPRINT("ms_running=%ld, heap_thread=%p", (long) thr->heap->ms_running, thr->heap->heap_thread)); + DUK__RZ_SUPPRESS_CHECK(); + + switch (htype) { + case DUK_HTYPE_STRING: + /* Strings have no internal references but do have "weak" + * references in the string cache. Also note that strings + * are not on the heap_allocated list like other heap + * elements. + */ + + DUK__RZ_STRING(); + break; + + case DUK_HTYPE_OBJECT: + /* Objects have internal references. Must finalize through + * the "refzero" work list. + */ + + DUK__RZ_OBJECT(); + break; + + default: + /* Buffers have no internal references. However, a dynamic + * buffer has a separate allocation for the buffer. This is + * freed by duk_heap_free_heaphdr_raw(). + */ + + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(h) == DUK_HTYPE_BUFFER); + DUK__RZ_BUFFER(); + break; + } +} + +DUK_INTERNAL DUK_NOINLINE void duk_heaphdr_refzero(duk_hthread *thr, duk_heaphdr *h) { + duk__heaphdr_refzero_helper(thr, h, 0 /*skip_free_pending*/); +} + +DUK_INTERNAL DUK_NOINLINE void duk_heaphdr_refzero_norz(duk_hthread *thr, duk_heaphdr *h) { + duk__heaphdr_refzero_helper(thr, h, 1 /*skip_free_pending*/); +} + +DUK_INTERNAL DUK_NOINLINE void duk_hstring_refzero(duk_hthread *thr, duk_hstring *h) { + duk__hstring_refzero_helper(thr, h); +} + +DUK_INTERNAL DUK_NOINLINE void duk_hbuffer_refzero(duk_hthread *thr, duk_hbuffer *h) { + duk__hbuffer_refzero_helper(thr, h); +} + +DUK_INTERNAL DUK_NOINLINE void duk_hobject_refzero(duk_hthread *thr, duk_hobject *h) { + duk__hobject_refzero_helper(thr, h, 0 /*skip_free_pending*/); +} + +DUK_INTERNAL DUK_NOINLINE void duk_hobject_refzero_norz(duk_hthread *thr, duk_hobject *h) { + duk__hobject_refzero_helper(thr, h, 1 /*skip_free_pending*/); +} + +#if !defined(DUK_USE_FAST_REFCOUNT_DEFAULT) +DUK_INTERNAL void duk_tval_incref(duk_tval *tv) { + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_NEEDS_REFCOUNT_UPDATE(tv)) { + duk_heaphdr *h = DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(h)); + DUK_ASSERT_DISABLE(h->h_refcount >= 0); + DUK_HEAPHDR_PREINC_REFCOUNT(h); + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(h) != 0); /* No wrapping. */ + } +} + +DUK_INTERNAL void duk_tval_decref(duk_hthread *thr, duk_tval *tv) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_NEEDS_REFCOUNT_UPDATE(tv)) { + duk_heaphdr *h = DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(h)); + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(h) >= 1); +#if 0 + if (DUK_HEAPHDR_PREDEC_REFCOUNT(h) != 0) { + return; + } + duk_heaphdr_refzero(thr, h); +#else + duk_heaphdr_decref(thr, h); +#endif + } +} + +DUK_INTERNAL void duk_tval_decref_norz(duk_hthread *thr, duk_tval *tv) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(tv != NULL); + + if (DUK_TVAL_NEEDS_REFCOUNT_UPDATE(tv)) { + duk_heaphdr *h = DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(h)); + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT(h) >= 1); +#if 0 + if (DUK_HEAPHDR_PREDEC_REFCOUNT(h) != 0) { + return; + } + duk_heaphdr_refzero_norz(thr, h); +#else + duk_heaphdr_decref_norz(thr, h); +#endif + } +} +#endif /* !DUK_USE_FAST_REFCOUNT_DEFAULT */ + +#define DUK__DECREF_ASSERTS() \ + do { \ + DUK_ASSERT(thr != NULL); \ + DUK_ASSERT(thr->heap != NULL); \ + DUK_ASSERT(h != NULL); \ + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID((duk_heaphdr *) h)); \ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT((duk_heaphdr *) h) >= 1); \ + } while (0) +#if defined(DUK_USE_ROM_OBJECTS) +#define DUK__INCREF_SHARED() \ + do { \ + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) h)) { \ + return; \ + } \ + DUK_HEAPHDR_PREINC_REFCOUNT((duk_heaphdr *) h); \ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT((duk_heaphdr *) h) != 0); /* No wrapping. */ \ + } while (0) +#define DUK__DECREF_SHARED() \ + do { \ + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) h)) { \ + return; \ + } \ + if (DUK_HEAPHDR_PREDEC_REFCOUNT((duk_heaphdr *) h) != 0) { \ + return; \ + } \ + } while (0) +#else +#define DUK__INCREF_SHARED() \ + do { \ + DUK_HEAPHDR_PREINC_REFCOUNT((duk_heaphdr *) h); \ + DUK_ASSERT(DUK_HEAPHDR_GET_REFCOUNT((duk_heaphdr *) h) != 0); /* No wrapping. */ \ + } while (0) +#define DUK__DECREF_SHARED() \ + do { \ + if (DUK_HEAPHDR_PREDEC_REFCOUNT((duk_heaphdr *) h) != 0) { \ + return; \ + } \ + } while (0) +#endif + +#if !defined(DUK_USE_FAST_REFCOUNT_DEFAULT) +/* This will in practice be inlined because it's just an INC instructions + * and a bit test + INC when ROM objects are enabled. + */ +DUK_INTERNAL void duk_heaphdr_incref(duk_heaphdr *h) { + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(h)); + DUK_ASSERT_DISABLE(DUK_HEAPHDR_GET_REFCOUNT(h) >= 0); + + DUK__INCREF_SHARED(); +} + +DUK_INTERNAL void duk_heaphdr_decref(duk_hthread *thr, duk_heaphdr *h) { + DUK__DECREF_ASSERTS(); + DUK__DECREF_SHARED(); + duk_heaphdr_refzero(thr, h); + + /* Forced mark-and-sweep when GC torture enabled; this could happen + * on any DECREF (but not DECREF_NORZ). + */ + DUK_GC_TORTURE(thr->heap); +} +DUK_INTERNAL void duk_heaphdr_decref_norz(duk_hthread *thr, duk_heaphdr *h) { + DUK__DECREF_ASSERTS(); + DUK__DECREF_SHARED(); + duk_heaphdr_refzero_norz(thr, h); +} +#endif /* !DUK_USE_FAST_REFCOUNT_DEFAULT */ + +#if 0 /* Not needed. */ +DUK_INTERNAL void duk_hstring_decref(duk_hthread *thr, duk_hstring *h) { + DUK__DECREF_ASSERTS(); + DUK__DECREF_SHARED(); + duk_hstring_refzero(thr, h); +} +DUK_INTERNAL void duk_hstring_decref_norz(duk_hthread *thr, duk_hstring *h) { + DUK__DECREF_ASSERTS(); + DUK__DECREF_SHARED(); + duk_hstring_refzero_norz(thr, h); +} +DUK_INTERNAL void duk_hbuffer_decref(duk_hthread *thr, duk_hbuffer *h) { + DUK__DECREF_ASSERTS(); + DUK__DECREF_SHARED(); + duk_hbuffer_refzero(thr, h); +} +DUK_INTERNAL void duk_hbuffer_decref_norz(duk_hthread *thr, duk_hbuffer *h) { + DUK__DECREF_ASSERTS(); + DUK__DECREF_SHARED(); + duk_hbuffer_refzero_norz(thr, h); +} +DUK_INTERNAL void duk_hobject_decref(duk_hthread *thr, duk_hobject *h) { + DUK__DECREF_ASSERTS(); + DUK__DECREF_SHARED(); + duk_hobject_refzero(thr, h); +} +DUK_INTERNAL void duk_hobject_decref_norz(duk_hthread *thr, duk_hobject *h) { + DUK__DECREF_ASSERTS(); + DUK__DECREF_SHARED(); + duk_hobject_refzero_norz(thr, h); +} +#endif + +#else /* DUK_USE_REFERENCE_COUNTING */ + +/* no refcounting */ + +#endif /* DUK_USE_REFERENCE_COUNTING */ + +/* automatic undefs */ +#undef DUK__DECREF_ASSERTS +#undef DUK__DECREF_SHARED +#undef DUK__INCREF_SHARED +#undef DUK__RZ_BUFFER +#undef DUK__RZ_INLINE +#undef DUK__RZ_OBJECT +#undef DUK__RZ_STRING +#undef DUK__RZ_SUPPRESS_ASSERT1 +#undef DUK__RZ_SUPPRESS_ASSERT2 +#undef DUK__RZ_SUPPRESS_CHECK +#undef DUK__RZ_SUPPRESS_COND +#line 1 "duk_heap_stringcache.c" +/* + * String cache. + * + * Provides a cache to optimize indexed string lookups. The cache keeps + * track of (byte offset, char offset) states for a fixed number of strings. + * Otherwise we'd need to scan from either end of the string, as we store + * strings in (extended) UTF-8. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Delete references to given hstring from the heap string cache. + * + * String cache references are 'weak': they are not counted towards + * reference counts, nor serve as roots for mark-and-sweep. When an + * object is about to be freed, such references need to be removed. + */ + +DUK_INTERNAL void duk_heap_strcache_string_remove(duk_heap *heap, duk_hstring *h) { + duk_uint_t i; + for (i = 0; i < DUK_HEAP_STRCACHE_SIZE; i++) { + duk_strcache_entry *c = heap->strcache + i; + if (c->h == h) { + DUK_DD( + DUK_DDPRINT("deleting weak strcache reference to hstring %p from heap %p", (void *) h, (void *) heap)); + c->h = NULL; + + /* XXX: the string shouldn't appear twice, but we now loop to the + * end anyway; if fixed, add a looping assertion to ensure there + * is no duplicate. + */ + } + } +} + +/* + * String scanning helpers + * + * All bytes other than UTF-8 continuation bytes ([0x80,0xbf]) are + * considered to contribute a character. This must match how string + * character length is computed. + */ + +DUK_LOCAL const duk_uint8_t *duk__scan_forwards(const duk_uint8_t *p, const duk_uint8_t *q, duk_uint_fast32_t n) { + while (n > 0) { + for (;;) { + p++; + if (p >= q) { + return NULL; + } + if ((*p & 0xc0) != 0x80) { + break; + } + } + n--; + } + return p; +} + +DUK_LOCAL const duk_uint8_t *duk__scan_backwards(const duk_uint8_t *p, const duk_uint8_t *q, duk_uint_fast32_t n) { + while (n > 0) { + for (;;) { + p--; + if (p < q) { + return NULL; + } + if ((*p & 0xc0) != 0x80) { + break; + } + } + n--; + } + return p; +} + +/* + * Convert char offset to byte offset + * + * Avoid using the string cache if possible: for ASCII strings byte and + * char offsets are equal and for short strings direct scanning may be + * better than using the string cache (which may evict a more important + * entry). + * + * Typing now assumes 32-bit string byte/char offsets (duk_uint_fast32_t). + * Better typing might be to use duk_size_t. + * + * Caller should ensure 'char_offset' is within the string bounds [0,charlen] + * (endpoint is inclusive). If this is not the case, no memory unsafe + * behavior will happen but an error will be thrown. + */ + +DUK_INTERNAL duk_uint_fast32_t duk_heap_strcache_offset_char2byte(duk_hthread *thr, duk_hstring *h, duk_uint_fast32_t char_offset) { + duk_heap *heap; + duk_strcache_entry *sce; + duk_uint_fast32_t byte_offset; + duk_uint_t i; + duk_bool_t use_cache; + duk_uint_fast32_t dist_start, dist_end, dist_sce; + duk_uint_fast32_t char_length; + const duk_uint8_t *p_start; + const duk_uint8_t *p_end; + const duk_uint8_t *p_found; + + /* + * For ASCII strings, the answer is simple. + */ + + if (DUK_LIKELY(DUK_HSTRING_IS_ASCII(h))) { + return char_offset; + } + + char_length = (duk_uint_fast32_t) DUK_HSTRING_GET_CHARLEN(h); + DUK_ASSERT(char_offset <= char_length); + + if (DUK_LIKELY(DUK_HSTRING_IS_ASCII(h))) { + /* Must recheck because the 'is ascii' flag may be set + * lazily. Alternatively, we could just compare charlen + * to bytelen. + */ + return char_offset; + } + + /* + * For non-ASCII strings, we need to scan forwards or backwards + * from some starting point. The starting point may be the start + * or end of the string, or some cached midpoint in the string + * cache. + * + * For "short" strings we simply scan without checking or updating + * the cache. For longer strings we check and update the cache as + * necessary, inserting a new cache entry if none exists. + */ + + DUK_DDD(DUK_DDDPRINT("non-ascii string %p, char_offset=%ld, clen=%ld, blen=%ld", + (void *) h, + (long) char_offset, + (long) DUK_HSTRING_GET_CHARLEN(h), + (long) DUK_HSTRING_GET_BYTELEN(h))); + + heap = thr->heap; + sce = NULL; + use_cache = (char_length > DUK_HEAP_STRINGCACHE_NOCACHE_LIMIT); + + if (use_cache) { +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) + DUK_DDD(DUK_DDDPRINT("stringcache before char2byte (using cache):")); + for (i = 0; i < DUK_HEAP_STRCACHE_SIZE; i++) { + duk_strcache_entry *c = heap->strcache + i; + DUK_DDD(DUK_DDDPRINT(" [%ld] -> h=%p, cidx=%ld, bidx=%ld", + (long) i, + (void *) c->h, + (long) c->cidx, + (long) c->bidx)); + } +#endif + + for (i = 0; i < DUK_HEAP_STRCACHE_SIZE; i++) { + duk_strcache_entry *c = heap->strcache + i; + + if (c->h == h) { + sce = c; + break; + } + } + } + + /* + * Scan from shortest distance: + * - start of string + * - end of string + * - cache entry (if exists) + */ + + DUK_ASSERT(DUK_HSTRING_GET_CHARLEN(h) >= char_offset); + dist_start = char_offset; + dist_end = char_length - char_offset; + dist_sce = 0; + DUK_UNREF(dist_sce); /* initialize for debug prints, needed if sce==NULL */ + + p_start = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h); + p_end = (const duk_uint8_t *) (p_start + DUK_HSTRING_GET_BYTELEN(h)); + p_found = NULL; + + if (sce) { + if (char_offset >= sce->cidx) { + dist_sce = char_offset - sce->cidx; + if ((dist_sce <= dist_start) && (dist_sce <= dist_end)) { + DUK_DDD(DUK_DDDPRINT("non-ascii string, use_cache=%ld, sce=%p:%ld:%ld, " + "dist_start=%ld, dist_end=%ld, dist_sce=%ld => " + "scan forwards from sce", + (long) use_cache, + (void *) (sce ? sce->h : NULL), + (sce ? (long) sce->cidx : (long) -1), + (sce ? (long) sce->bidx : (long) -1), + (long) dist_start, + (long) dist_end, + (long) dist_sce)); + + p_found = duk__scan_forwards(p_start + sce->bidx, p_end, dist_sce); + goto scan_done; + } + } else { + dist_sce = sce->cidx - char_offset; + if ((dist_sce <= dist_start) && (dist_sce <= dist_end)) { + DUK_DDD(DUK_DDDPRINT("non-ascii string, use_cache=%ld, sce=%p:%ld:%ld, " + "dist_start=%ld, dist_end=%ld, dist_sce=%ld => " + "scan backwards from sce", + (long) use_cache, + (void *) (sce ? sce->h : NULL), + (sce ? (long) sce->cidx : (long) -1), + (sce ? (long) sce->bidx : (long) -1), + (long) dist_start, + (long) dist_end, + (long) dist_sce)); + + p_found = duk__scan_backwards(p_start + sce->bidx, p_start, dist_sce); + goto scan_done; + } + } + } + + /* no sce, or sce scan not best */ + + if (dist_start <= dist_end) { + DUK_DDD(DUK_DDDPRINT("non-ascii string, use_cache=%ld, sce=%p:%ld:%ld, " + "dist_start=%ld, dist_end=%ld, dist_sce=%ld => " + "scan forwards from string start", + (long) use_cache, + (void *) (sce ? sce->h : NULL), + (sce ? (long) sce->cidx : (long) -1), + (sce ? (long) sce->bidx : (long) -1), + (long) dist_start, + (long) dist_end, + (long) dist_sce)); + + p_found = duk__scan_forwards(p_start, p_end, dist_start); + } else { + DUK_DDD(DUK_DDDPRINT("non-ascii string, use_cache=%ld, sce=%p:%ld:%ld, " + "dist_start=%ld, dist_end=%ld, dist_sce=%ld => " + "scan backwards from string end", + (long) use_cache, + (void *) (sce ? sce->h : NULL), + (sce ? (long) sce->cidx : (long) -1), + (sce ? (long) sce->bidx : (long) -1), + (long) dist_start, + (long) dist_end, + (long) dist_sce)); + + p_found = duk__scan_backwards(p_end, p_start, dist_end); + } + +scan_done: + + if (DUK_UNLIKELY(p_found == NULL)) { + /* Scan error: this shouldn't normally happen; it could happen if + * string is not valid UTF-8 data, and clen/blen are not consistent + * with the scanning algorithm. + */ + goto scan_error; + } + + DUK_ASSERT(p_found >= p_start); + DUK_ASSERT(p_found <= p_end); /* may be equal */ + byte_offset = (duk_uint32_t) (p_found - p_start); + + DUK_DDD(DUK_DDDPRINT("-> string %p, cidx %ld -> bidx %ld", (void *) h, (long) char_offset, (long) byte_offset)); + + /* + * Update cache entry (allocating if necessary), and move the + * cache entry to the first place (in an "LRU" policy). + */ + + if (use_cache) { + /* update entry, allocating if necessary */ + if (!sce) { + sce = heap->strcache + DUK_HEAP_STRCACHE_SIZE - 1; /* take last entry */ + sce->h = h; + } + DUK_ASSERT(sce != NULL); + sce->bidx = (duk_uint32_t) (p_found - p_start); + sce->cidx = (duk_uint32_t) char_offset; + + /* LRU: move our entry to first */ + if (sce > &heap->strcache[0]) { + /* + * A C + * B A + * C <- sce ==> B + * D D + */ + duk_strcache_entry tmp; + + tmp = *sce; + duk_memmove((void *) (&heap->strcache[1]), + (const void *) (&heap->strcache[0]), + (size_t) (((char *) sce) - ((char *) &heap->strcache[0]))); + heap->strcache[0] = tmp; + + /* 'sce' points to the wrong entry here, but is no longer used */ + } +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) + DUK_DDD(DUK_DDDPRINT("stringcache after char2byte (using cache):")); + for (i = 0; i < DUK_HEAP_STRCACHE_SIZE; i++) { + duk_strcache_entry *c = heap->strcache + i; + DUK_DDD(DUK_DDDPRINT(" [%ld] -> h=%p, cidx=%ld, bidx=%ld", + (long) i, + (void *) c->h, + (long) c->cidx, + (long) c->bidx)); + } +#endif + } + + return byte_offset; + +scan_error: + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return 0;); +} +#line 1 "duk_heap_stringtable.c" +/* + * Heap string table handling, string interning. + */ + +/* #include duk_internal.h -> already included */ + +/* Resize checks not needed if minsize == maxsize, typical for low memory + * targets. + */ +#define DUK__STRTAB_RESIZE_CHECK +#if (DUK_USE_STRTAB_MINSIZE == DUK_USE_STRTAB_MAXSIZE) +#undef DUK__STRTAB_RESIZE_CHECK +#endif + +#if defined(DUK_USE_STRTAB_PTRCOMP) +#define DUK__HEAPPTR_ENC16(heap, ptr) DUK_USE_HEAPPTR_ENC16((heap)->heap_udata, (ptr)) +#define DUK__HEAPPTR_DEC16(heap, val) DUK_USE_HEAPPTR_DEC16((heap)->heap_udata, (val)) +#define DUK__GET_STRTABLE(heap) ((heap)->strtable16) +#else +#define DUK__HEAPPTR_ENC16(heap, ptr) (ptr) +#define DUK__HEAPPTR_DEC16(heap, val) (val) +#define DUK__GET_STRTABLE(heap) ((heap)->strtable) +#endif + +#define DUK__STRTAB_U32_MAX_STRLEN 10 /* 4'294'967'295 */ + +/* + * Debug dump stringtable. + */ + +#if defined(DUK_USE_DEBUG) +DUK_INTERNAL void duk_heap_strtable_dump(duk_heap *heap) { +#if defined(DUK_USE_STRTAB_PTRCOMP) + duk_uint16_t *strtable; +#else + duk_hstring **strtable; +#endif + duk_uint32_t i; + duk_hstring *h; + duk_size_t count_total = 0; + duk_size_t count_chain; + duk_size_t count_chain_min = DUK_SIZE_MAX; + duk_size_t count_chain_max = 0; + duk_size_t count_len[8]; /* chain lengths from 0 to 7 */ + + if (heap == NULL) { + DUK_D(DUK_DPRINT("string table, heap=NULL")); + return; + } + + strtable = DUK__GET_STRTABLE(heap); + if (strtable == NULL) { + DUK_D(DUK_DPRINT("string table, strtab=NULL")); + return; + } + + duk_memzero((void *) count_len, sizeof(count_len)); + for (i = 0; i < heap->st_size; i++) { + h = DUK__HEAPPTR_DEC16(heap, strtable[i]); + count_chain = 0; + while (h != NULL) { + count_chain++; + h = h->hdr.h_next; + } + if (count_chain < sizeof(count_len) / sizeof(duk_size_t)) { + count_len[count_chain]++; + } + count_chain_max = (count_chain > count_chain_max ? count_chain : count_chain_max); + count_chain_min = (count_chain < count_chain_min ? count_chain : count_chain_min); + count_total += count_chain; + } + + DUK_D(DUK_DPRINT("string table, strtab=%p, count=%lu, chain min=%lu max=%lu avg=%lf: " + "counts: %lu %lu %lu %lu %lu %lu %lu %lu ...", + (void *) heap->strtable, + (unsigned long) count_total, + (unsigned long) count_chain_min, + (unsigned long) count_chain_max, + (double) count_total / (double) heap->st_size, + (unsigned long) count_len[0], + (unsigned long) count_len[1], + (unsigned long) count_len[2], + (unsigned long) count_len[3], + (unsigned long) count_len[4], + (unsigned long) count_len[5], + (unsigned long) count_len[6], + (unsigned long) count_len[7])); +} +#endif /* DUK_USE_DEBUG */ + +/* + * Assertion helper to ensure strtable is populated correctly. + */ + +#if defined(DUK_USE_ASSERTIONS) +DUK_LOCAL void duk__strtable_assert_checks(duk_heap *heap) { +#if defined(DUK_USE_STRTAB_PTRCOMP) + duk_uint16_t *strtable; +#else + duk_hstring **strtable; +#endif + duk_uint32_t i; + duk_hstring *h; + duk_size_t count = 0; + + DUK_ASSERT(heap != NULL); + + strtable = DUK__GET_STRTABLE(heap); + if (strtable != NULL) { + DUK_ASSERT(heap->st_size != 0); + DUK_ASSERT(heap->st_mask == heap->st_size - 1); + + for (i = 0; i < heap->st_size; i++) { + h = DUK__HEAPPTR_DEC16(heap, strtable[i]); + while (h != NULL) { + DUK_ASSERT((DUK_HSTRING_GET_HASH(h) & heap->st_mask) == i); + count++; + h = h->hdr.h_next; + } + } + } else { + DUK_ASSERT(heap->st_size == 0); + DUK_ASSERT(heap->st_mask == 0); + } + +#if defined(DUK__STRTAB_RESIZE_CHECK) + DUK_ASSERT(count == (duk_size_t) heap->st_count); +#endif +} +#endif /* DUK_USE_ASSERTIONS */ + +/* + * Allocate and initialize a duk_hstring. + * + * Returns a NULL if allocation or initialization fails for some reason. + * + * The string won't be inserted into the string table and isn't tracked in + * any way (link pointers will be NULL). The caller must place the string + * into the string table without any risk of a longjmp, otherwise the string + * is leaked. + */ + +DUK_LOCAL duk_hstring *duk__strtable_alloc_hstring(duk_heap *heap, + const duk_uint8_t *str, + duk_uint32_t blen, + duk_uint32_t strhash, + const duk_uint8_t *extdata) { + duk_hstring *res; + const duk_uint8_t *data; +#if !defined(DUK_USE_HSTRING_ARRIDX) + duk_uarridx_t dummy; +#endif + + DUK_ASSERT(heap != NULL); + DUK_UNREF(extdata); + +#if defined(DUK_USE_STRLEN16) + /* If blen <= 0xffffUL, clen is also guaranteed to be <= 0xffffUL. */ + if (blen > 0xffffUL) { + DUK_D(DUK_DPRINT("16-bit string blen/clen active and blen over 16 bits, reject intern")); + goto alloc_error; + } +#endif + + /* XXX: Memzeroing the allocated structure is not really necessary + * because we could just initialize all fields explicitly (almost + * all fields are initialized explicitly anyway). + */ +#if defined(DUK_USE_HSTRING_EXTDATA) && defined(DUK_USE_EXTSTR_INTERN_CHECK) + if (extdata) { + res = (duk_hstring *) DUK_ALLOC(heap, sizeof(duk_hstring_external)); + if (DUK_UNLIKELY(res == NULL)) { + goto alloc_error; + } + duk_memzero(res, sizeof(duk_hstring_external)); +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + DUK_HEAPHDR_STRING_INIT_NULLS(&res->hdr); +#endif + DUK_HEAPHDR_SET_TYPE_AND_FLAGS(&res->hdr, DUK_HTYPE_STRING, DUK_HSTRING_FLAG_EXTDATA); + + DUK_ASSERT(extdata[blen] == 0); /* Application responsibility. */ + data = extdata; + ((duk_hstring_external *) res)->extdata = extdata; + } else +#endif /* DUK_USE_HSTRING_EXTDATA && DUK_USE_EXTSTR_INTERN_CHECK */ + { + duk_uint8_t *data_tmp; + + /* NUL terminate for convenient C access */ + DUK_ASSERT(sizeof(duk_hstring) + blen + 1 > blen); /* No wrap, limits ensure. */ + res = (duk_hstring *) DUK_ALLOC(heap, sizeof(duk_hstring) + blen + 1); + if (DUK_UNLIKELY(res == NULL)) { + goto alloc_error; + } + duk_memzero(res, sizeof(duk_hstring)); +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + DUK_HEAPHDR_STRING_INIT_NULLS(&res->hdr); +#endif + DUK_HEAPHDR_SET_TYPE_AND_FLAGS(&res->hdr, DUK_HTYPE_STRING, 0); + + data_tmp = (duk_uint8_t *) (res + 1); + duk_memcpy(data_tmp, str, blen); + data_tmp[blen] = (duk_uint8_t) 0; + data = (const duk_uint8_t *) data_tmp; + } + + DUK_HSTRING_SET_BYTELEN(res, blen); + DUK_HSTRING_SET_HASH(res, strhash); + + DUK_ASSERT(!DUK_HSTRING_HAS_ARRIDX(res)); +#if defined(DUK_USE_HSTRING_ARRIDX) + res->arridx = duk_js_to_arrayindex_string(data, blen); + if (res->arridx != DUK_HSTRING_NO_ARRAY_INDEX) { +#else + dummy = duk_js_to_arrayindex_string(data, blen); + if (dummy != DUK_HSTRING_NO_ARRAY_INDEX) { +#endif + /* Array index strings cannot be symbol strings, + * and they're always pure ASCII so blen == clen. + */ + DUK_HSTRING_SET_ARRIDX(res); + DUK_HSTRING_SET_ASCII(res); + DUK_ASSERT(duk_unicode_unvalidated_utf8_length(data, (duk_size_t) blen) == blen); + } else { + /* Because 'data' is NUL-terminated, we don't need a + * blen > 0 check here. For NUL (0x00) the symbol + * checks will be false. + */ + if (DUK_UNLIKELY(data[0] >= 0x80U)) { + if (data[0] <= 0x81) { + DUK_HSTRING_SET_SYMBOL(res); + } else if (data[0] == 0x82U || data[0] == 0xffU) { + DUK_HSTRING_SET_HIDDEN(res); + DUK_HSTRING_SET_SYMBOL(res); + } + } + + /* Using an explicit 'ASCII' flag has larger footprint (one call site + * only) but is quite useful for the case when there's no explicit + * 'clen' in duk_hstring. + * + * The flag is set lazily for RAM strings. + */ + DUK_ASSERT(!DUK_HSTRING_HAS_ASCII(res)); + +#if defined(DUK_USE_HSTRING_LAZY_CLEN) + /* Charlen initialized to 0, updated on-the-fly. */ +#else + duk_hstring_init_charlen(res); /* Also sets ASCII flag. */ +#endif + } + + DUK_DDD(DUK_DDDPRINT("interned string, hash=0x%08lx, blen=%ld, has_arridx=%ld, has_extdata=%ld", + (unsigned long) DUK_HSTRING_GET_HASH(res), + (long) DUK_HSTRING_GET_BYTELEN(res), + (long) (DUK_HSTRING_HAS_ARRIDX(res) ? 1 : 0), + (long) (DUK_HSTRING_HAS_EXTDATA(res) ? 1 : 0))); + + DUK_ASSERT(res != NULL); + return res; + +alloc_error: + return NULL; +} + +/* + * Grow strtable allocation in-place. + */ + +#if defined(DUK__STRTAB_RESIZE_CHECK) +DUK_LOCAL void duk__strtable_grow_inplace(duk_heap *heap) { + duk_uint32_t new_st_size; + duk_uint32_t old_st_size; + duk_uint32_t i; + duk_hstring *h; + duk_hstring *next; + duk_hstring *prev; +#if defined(DUK_USE_STRTAB_PTRCOMP) + duk_uint16_t *new_ptr; + duk_uint16_t *new_ptr_high; +#else + duk_hstring **new_ptr; + duk_hstring **new_ptr_high; +#endif + + DUK_DD(DUK_DDPRINT("grow in-place: %lu -> %lu", (unsigned long) heap->st_size, (unsigned long) heap->st_size * 2)); + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->st_resizing == 1); + DUK_ASSERT(heap->st_size >= 2); + DUK_ASSERT((heap->st_size & (heap->st_size - 1)) == 0); /* 2^N */ + DUK_ASSERT(DUK__GET_STRTABLE(heap) != NULL); + + DUK_STATS_INC(heap, stats_strtab_resize_grow); + + new_st_size = heap->st_size << 1U; + DUK_ASSERT(new_st_size > heap->st_size); /* No overflow. */ + + /* Reallocate the strtable first and then work in-place to rehash + * strings. We don't need an indirect allocation here: even if GC + * is triggered to satisfy the allocation, recursive strtable resize + * is prevented by flags. This is also why we don't need to use + * DUK_REALLOC_INDIRECT(). + */ + +#if defined(DUK_USE_STRTAB_PTRCOMP) + new_ptr = (duk_uint16_t *) DUK_REALLOC(heap, heap->strtable16, sizeof(duk_uint16_t) * new_st_size); +#else + new_ptr = (duk_hstring **) DUK_REALLOC(heap, heap->strtable, sizeof(duk_hstring *) * new_st_size); +#endif + if (DUK_UNLIKELY(new_ptr == NULL)) { + /* If realloc fails we can continue normally: the string table + * won't "fill up" although chains will gradually get longer. + * When string insertions continue, we'll quite soon try again + * with no special handling. + */ + DUK_D(DUK_DPRINT("string table grow failed, ignoring")); + return; + } +#if defined(DUK_USE_STRTAB_PTRCOMP) + heap->strtable16 = new_ptr; +#else + heap->strtable = new_ptr; +#endif + + /* Rehash a single bucket into two separate ones. When we grow + * by x2 the highest 'new' bit determines whether a string remains + * in its old position (bit is 0) or goes to a new one (bit is 1). + */ + + old_st_size = heap->st_size; + new_ptr_high = new_ptr + old_st_size; + for (i = 0; i < old_st_size; i++) { + duk_hstring *new_root; + duk_hstring *new_root_high; + + h = DUK__HEAPPTR_DEC16(heap, new_ptr[i]); + new_root = h; + new_root_high = NULL; + + prev = NULL; + while (h != NULL) { + duk_uint32_t mask; + + DUK_ASSERT((DUK_HSTRING_GET_HASH(h) & heap->st_mask) == i); + next = h->hdr.h_next; + + /* Example: if previous size was 256, previous mask is 0xFF + * and size is 0x100 which corresponds to the new bit that + * comes into play. + */ + DUK_ASSERT(heap->st_mask == old_st_size - 1); + mask = old_st_size; + if (DUK_HSTRING_GET_HASH(h) & mask) { + if (prev != NULL) { + prev->hdr.h_next = h->hdr.h_next; + } else { + DUK_ASSERT(h == new_root); + new_root = h->hdr.h_next; + } + + h->hdr.h_next = new_root_high; + new_root_high = h; + } else { + prev = h; + } + h = next; + } + + new_ptr[i] = DUK__HEAPPTR_ENC16(heap, new_root); + new_ptr_high[i] = DUK__HEAPPTR_ENC16(heap, new_root_high); + } + + heap->st_size = new_st_size; + heap->st_mask = new_st_size - 1; + +#if defined(DUK_USE_ASSERTIONS) + duk__strtable_assert_checks(heap); +#endif +} +#endif /* DUK__STRTAB_RESIZE_CHECK */ + +/* + * Shrink strtable allocation in-place. + */ + +#if defined(DUK__STRTAB_RESIZE_CHECK) +DUK_LOCAL void duk__strtable_shrink_inplace(duk_heap *heap) { + duk_uint32_t new_st_size; + duk_uint32_t i; + duk_hstring *h; + duk_hstring *other; + duk_hstring *root; +#if defined(DUK_USE_STRTAB_PTRCOMP) + duk_uint16_t *old_ptr; + duk_uint16_t *old_ptr_high; + duk_uint16_t *new_ptr; +#else + duk_hstring **old_ptr; + duk_hstring **old_ptr_high; + duk_hstring **new_ptr; +#endif + + DUK_DD(DUK_DDPRINT("shrink in-place: %lu -> %lu", (unsigned long) heap->st_size, (unsigned long) heap->st_size / 2)); + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(heap->st_resizing == 1); + DUK_ASSERT(heap->st_size >= 2); + DUK_ASSERT((heap->st_size & (heap->st_size - 1)) == 0); /* 2^N */ + DUK_ASSERT(DUK__GET_STRTABLE(heap) != NULL); + + DUK_STATS_INC(heap, stats_strtab_resize_shrink); + + new_st_size = heap->st_size >> 1U; + + /* Combine two buckets into a single one. When we shrink, one hash + * bit (highest) disappears. + */ + old_ptr = DUK__GET_STRTABLE(heap); + old_ptr_high = old_ptr + new_st_size; + for (i = 0; i < new_st_size; i++) { + h = DUK__HEAPPTR_DEC16(heap, old_ptr[i]); + other = DUK__HEAPPTR_DEC16(heap, old_ptr_high[i]); + + if (h == NULL) { + /* First chain is empty, so use second one as is. */ + root = other; + } else { + /* Find end of first chain, and link in the second. */ + root = h; + while (h->hdr.h_next != NULL) { + h = h->hdr.h_next; + } + h->hdr.h_next = other; + } + + old_ptr[i] = DUK__HEAPPTR_ENC16(heap, root); + } + + heap->st_size = new_st_size; + heap->st_mask = new_st_size - 1; + + /* The strtable is now consistent and we can realloc safely. Even + * if side effects cause string interning or removal the strtable + * updates are safe. Recursive resize has been prevented by caller. + * This is also why we don't need to use DUK_REALLOC_INDIRECT(). + * + * We assume a realloc() to a smaller size is guaranteed to succeed. + * It would be relatively straightforward to handle the error by + * essentially performing a "grow" step to recover. + */ + +#if defined(DUK_USE_STRTAB_PTRCOMP) + new_ptr = (duk_uint16_t *) DUK_REALLOC(heap, heap->strtable16, sizeof(duk_uint16_t) * new_st_size); + DUK_ASSERT(new_ptr != NULL); + heap->strtable16 = new_ptr; +#else + new_ptr = (duk_hstring **) DUK_REALLOC(heap, heap->strtable, sizeof(duk_hstring *) * new_st_size); + DUK_ASSERT(new_ptr != NULL); + heap->strtable = new_ptr; +#endif + +#if defined(DUK_USE_ASSERTIONS) + duk__strtable_assert_checks(heap); +#endif +} +#endif /* DUK__STRTAB_RESIZE_CHECK */ + +/* + * Grow/shrink check. + */ + +#if defined(DUK__STRTAB_RESIZE_CHECK) +DUK_LOCAL DUK_COLD DUK_NOINLINE void duk__strtable_resize_check(duk_heap *heap) { + duk_uint32_t load_factor; /* fixed point */ + + DUK_ASSERT(heap != NULL); +#if defined(DUK_USE_STRTAB_PTRCOMP) + DUK_ASSERT(heap->strtable16 != NULL); +#else + DUK_ASSERT(heap->strtable != NULL); +#endif + + DUK_STATS_INC(heap, stats_strtab_resize_check); + + /* Prevent recursive resizing. */ + if (DUK_UNLIKELY(heap->st_resizing != 0U)) { + DUK_D(DUK_DPRINT("prevent recursive strtable resize")); + return; + } + + heap->st_resizing = 1; + + DUK_ASSERT(heap->st_size >= 16U); + DUK_ASSERT((heap->st_size >> 4U) >= 1); + load_factor = heap->st_count / (heap->st_size >> 4U); + + DUK_DD(DUK_DDPRINT("resize check string table: size=%lu, count=%lu, load_factor=%lu (fixed point .4; float %lf)", + (unsigned long) heap->st_size, + (unsigned long) heap->st_count, + (unsigned long) load_factor, + (double) heap->st_count / (double) heap->st_size)); + + if (load_factor >= DUK_USE_STRTAB_GROW_LIMIT) { + if (heap->st_size >= DUK_USE_STRTAB_MAXSIZE) { + DUK_DD(DUK_DDPRINT("want to grow strtable (based on load factor) but already maximum size")); + } else { + DUK_D(DUK_DPRINT("grow string table: %lu -> %lu", + (unsigned long) heap->st_size, + (unsigned long) heap->st_size * 2)); +#if defined(DUK_USE_DEBUG) + duk_heap_strtable_dump(heap); +#endif + duk__strtable_grow_inplace(heap); + } + } else if (load_factor <= DUK_USE_STRTAB_SHRINK_LIMIT) { + if (heap->st_size <= DUK_USE_STRTAB_MINSIZE) { + DUK_DD(DUK_DDPRINT("want to shrink strtable (based on load factor) but already minimum size")); + } else { + DUK_D(DUK_DPRINT("shrink string table: %lu -> %lu", + (unsigned long) heap->st_size, + (unsigned long) heap->st_size / 2)); +#if defined(DUK_USE_DEBUG) + duk_heap_strtable_dump(heap); +#endif + duk__strtable_shrink_inplace(heap); + } + } else { + DUK_DD(DUK_DDPRINT("no need for strtable resize")); + } + + heap->st_resizing = 0; +} +#endif /* DUK__STRTAB_RESIZE_CHECK */ + +/* + * Torture grow/shrink: unconditionally grow and shrink back. + */ + +#if defined(DUK_USE_STRTAB_TORTURE) && defined(DUK__STRTAB_RESIZE_CHECK) +DUK_LOCAL void duk__strtable_resize_torture(duk_heap *heap) { + duk_uint32_t old_st_size; + + DUK_ASSERT(heap != NULL); + + old_st_size = heap->st_size; + if (old_st_size >= DUK_USE_STRTAB_MAXSIZE) { + return; + } + + heap->st_resizing = 1; + duk__strtable_grow_inplace(heap); + if (heap->st_size > old_st_size) { + duk__strtable_shrink_inplace(heap); + } + heap->st_resizing = 0; +} +#endif /* DUK_USE_STRTAB_TORTURE && DUK__STRTAB_RESIZE_CHECK */ + +/* + * Raw intern; string already checked not to be present. + */ + +DUK_LOCAL duk_hstring *duk__strtable_do_intern(duk_heap *heap, const duk_uint8_t *str, duk_uint32_t blen, duk_uint32_t strhash) { + duk_hstring *res; + const duk_uint8_t *extdata; +#if defined(DUK_USE_STRTAB_PTRCOMP) + duk_uint16_t *slot; +#else + duk_hstring **slot; +#endif + + DUK_DDD(DUK_DDDPRINT("do_intern: heap=%p, str=%p, blen=%lu, strhash=%lx, st_size=%lu, st_count=%lu, load=%lf", + (void *) heap, + (const void *) str, + (unsigned long) blen, + (unsigned long) strhash, + (unsigned long) heap->st_size, + (unsigned long) heap->st_count, + (double) heap->st_count / (double) heap->st_size)); + + DUK_ASSERT(heap != NULL); + + /* Prevent any side effects on the string table and the caller provided + * str/blen arguments while interning is in progress. For example, if + * the caller provided str/blen from a dynamic buffer, a finalizer + * might resize or modify that dynamic buffer, invalidating the call + * arguments. + * + * While finalizers must be prevented, mark-and-sweep itself is fine. + * Recursive string table resize is prevented explicitly here. + */ + + heap->pf_prevent_count++; + DUK_ASSERT(heap->pf_prevent_count != 0); /* Wrap. */ + +#if defined(DUK_USE_STRTAB_TORTURE) && defined(DUK__STRTAB_RESIZE_CHECK) + duk__strtable_resize_torture(heap); +#endif + + /* String table grow/shrink check. Because of chaining (and no + * accumulation issues as with hash probe chains and DELETED + * markers) there's never a mandatory need to resize right now. + * Check for the resize only periodically, based on st_count + * bit pattern. Because string table removal doesn't do a shrink + * check, we do that also here. + * + * Do the resize and possible grow/shrink before the new duk_hstring + * has been allocated. Otherwise we may trigger a GC when the result + * duk_hstring is not yet strongly referenced. + */ + +#if defined(DUK__STRTAB_RESIZE_CHECK) + if (DUK_UNLIKELY((heap->st_count & DUK_USE_STRTAB_RESIZE_CHECK_MASK) == 0)) { + duk__strtable_resize_check(heap); + } +#endif + + /* External string check (low memory optimization). */ + +#if defined(DUK_USE_HSTRING_EXTDATA) && defined(DUK_USE_EXTSTR_INTERN_CHECK) + extdata = + (const duk_uint8_t *) DUK_USE_EXTSTR_INTERN_CHECK(heap->heap_udata, (void *) DUK_LOSE_CONST(str), (duk_size_t) blen); +#else + extdata = (const duk_uint8_t *) NULL; +#endif + + /* Allocate and initialize string, not yet linked. This may cause a + * GC which may cause other strings to be interned and inserted into + * the string table before we insert our string. Finalizer execution + * is disabled intentionally to avoid a finalizer from e.g. resizing + * a buffer used as a data area for 'str'. + */ + + res = duk__strtable_alloc_hstring(heap, str, blen, strhash, extdata); + + /* Allow side effects again: GC must be avoided until duk_hstring + * result (if successful) has been INCREF'd. + */ + DUK_ASSERT(heap->pf_prevent_count > 0); + heap->pf_prevent_count--; + + /* Alloc error handling. */ + + if (DUK_UNLIKELY(res == NULL)) { +#if defined(DUK_USE_HSTRING_EXTDATA) && defined(DUK_USE_EXTSTR_INTERN_CHECK) + if (extdata != NULL) { + DUK_USE_EXTSTR_FREE(heap->heap_udata, (const void *) extdata); + } +#endif + return NULL; + } + + /* Insert into string table. */ + +#if defined(DUK_USE_STRTAB_PTRCOMP) + slot = heap->strtable16 + (strhash & heap->st_mask); +#else + slot = heap->strtable + (strhash & heap->st_mask); +#endif + DUK_ASSERT(res->hdr.h_next == NULL); /* This is the case now, but unnecessary zeroing/NULLing. */ + res->hdr.h_next = DUK__HEAPPTR_DEC16(heap, *slot); + *slot = DUK__HEAPPTR_ENC16(heap, res); + + /* Update string count only for successful inserts. */ + +#if defined(DUK__STRTAB_RESIZE_CHECK) + heap->st_count++; +#endif + + /* The duk_hstring is in the string table but is not yet strongly + * reachable. Calling code MUST NOT make any allocations or other + * side effects before the duk_hstring has been INCREF'd and made + * reachable. + */ + + return res; +} + +/* + * Intern a string from str/blen, returning either an existing duk_hstring + * or adding a new one into the string table. The input string does -not- + * need to be NUL terminated. + * + * The input 'str' argument may point to a Duktape managed data area such as + * the data area of a dynamic buffer. It's crucial to avoid any side effects + * that might affect the data area (e.g. resize the dynamic buffer, or write + * to the buffer) before the string is fully interned. + */ + +#if defined(DUK_USE_ROM_STRINGS) +DUK_LOCAL duk_hstring *duk__strtab_romstring_lookup(duk_heap *heap, const duk_uint8_t *str, duk_size_t blen, duk_uint32_t strhash) { + duk_size_t lookup_hash; + duk_hstring *curr; + + DUK_ASSERT(heap != NULL); + DUK_UNREF(heap); + + lookup_hash = (blen << 4); + if (blen > 0) { + lookup_hash += str[0]; + } + lookup_hash &= 0xff; + + curr = (duk_hstring *) DUK_LOSE_CONST(duk_rom_strings_lookup[lookup_hash]); + while (curr != NULL) { + /* Unsafe memcmp() because for zero blen, str may be NULL. */ + if (strhash == DUK_HSTRING_GET_HASH(curr) && blen == DUK_HSTRING_GET_BYTELEN(curr) && + duk_memcmp_unsafe((const void *) str, (const void *) DUK_HSTRING_GET_DATA(curr), blen) == 0) { + DUK_DDD(DUK_DDDPRINT("intern check: rom string: %!O, computed hash 0x%08lx, rom hash 0x%08lx", + curr, + (unsigned long) strhash, + (unsigned long) DUK_HSTRING_GET_HASH(curr))); + return curr; + } + curr = curr->hdr.h_next; + } + + return NULL; +} +#endif /* DUK_USE_ROM_STRINGS */ + +DUK_INTERNAL duk_hstring *duk_heap_strtable_intern(duk_heap *heap, const duk_uint8_t *str, duk_uint32_t blen) { + duk_uint32_t strhash; + duk_hstring *h; + + DUK_DDD(DUK_DDDPRINT("intern check: heap=%p, str=%p, blen=%lu", (void *) heap, (const void *) str, (unsigned long) blen)); + + /* Preliminaries. */ + + /* XXX: maybe just require 'str != NULL' even for zero size? */ + DUK_ASSERT(heap != NULL); + DUK_ASSERT(blen == 0 || str != NULL); + DUK_ASSERT(blen <= DUK_HSTRING_MAX_BYTELEN); /* Caller is responsible for ensuring this. */ + strhash = duk_heap_hashstring(heap, str, (duk_size_t) blen); + + /* String table lookup. */ + + DUK_ASSERT(DUK__GET_STRTABLE(heap) != NULL); + DUK_ASSERT(heap->st_size > 0); + DUK_ASSERT(heap->st_size == heap->st_mask + 1); +#if defined(DUK_USE_STRTAB_PTRCOMP) + h = DUK__HEAPPTR_DEC16(heap, heap->strtable16[strhash & heap->st_mask]); +#else + h = heap->strtable[strhash & heap->st_mask]; +#endif + while (h != NULL) { + if (DUK_HSTRING_GET_HASH(h) == strhash && DUK_HSTRING_GET_BYTELEN(h) == blen && + duk_memcmp_unsafe((const void *) str, (const void *) DUK_HSTRING_GET_DATA(h), (size_t) blen) == 0) { + /* Found existing entry. */ + DUK_STATS_INC(heap, stats_strtab_intern_hit); + return h; + } + h = h->hdr.h_next; + } + + /* ROM table lookup. Because this lookup is slower, do it only after + * RAM lookup. This works because no ROM string is ever interned into + * the RAM string table. + */ + +#if defined(DUK_USE_ROM_STRINGS) + h = duk__strtab_romstring_lookup(heap, str, blen, strhash); + if (h != NULL) { + DUK_STATS_INC(heap, stats_strtab_intern_hit); + return h; + } +#endif + + /* Not found in string table; insert. */ + + DUK_STATS_INC(heap, stats_strtab_intern_miss); + h = duk__strtable_do_intern(heap, str, blen, strhash); + return h; /* may be NULL */ +} + +/* + * Intern a string from u32. + */ + +/* XXX: Could arrange some special handling because we know that the result + * will have an arridx flag and an ASCII flag, won't need a clen check, etc. + */ + +DUK_INTERNAL duk_hstring *duk_heap_strtable_intern_u32(duk_heap *heap, duk_uint32_t val) { + duk_uint8_t buf[DUK__STRTAB_U32_MAX_STRLEN]; + duk_uint8_t *p; + + DUK_ASSERT(heap != NULL); + + /* This is smaller and faster than a %lu sprintf. */ + p = buf + sizeof(buf); + do { + p--; + *p = duk_lc_digits[val % 10]; + val = val / 10; + } while (val != 0); /* For val == 0, emit exactly one '0'. */ + DUK_ASSERT(p >= buf); + + return duk_heap_strtable_intern(heap, (const duk_uint8_t *) p, (duk_uint32_t) ((buf + sizeof(buf)) - p)); +} + +/* + * Checked convenience variants. + * + * XXX: Because the main use case is for the checked variants, make them the + * main functionality and provide a safe variant separately (it is only needed + * during heap init). The problem with that is that longjmp state and error + * creation must already be possible to throw. + */ + +DUK_INTERNAL duk_hstring *duk_heap_strtable_intern_checked(duk_hthread *thr, const duk_uint8_t *str, duk_uint32_t blen) { + duk_hstring *res; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(blen == 0 || str != NULL); + + res = duk_heap_strtable_intern(thr->heap, str, blen); + if (DUK_UNLIKELY(res == NULL)) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return NULL;); + } + return res; +} + +#if defined(DUK_USE_LITCACHE_SIZE) +DUK_LOCAL duk_uint_t duk__strtable_litcache_key(const duk_uint8_t *str, duk_uint32_t blen) { + duk_uintptr_t key; + + DUK_ASSERT(DUK_USE_LITCACHE_SIZE > 0); + DUK_ASSERT(DUK_IS_POWER_OF_TWO((duk_uint_t) DUK_USE_LITCACHE_SIZE)); + + key = (duk_uintptr_t) blen ^ (duk_uintptr_t) str; + key &= (duk_uintptr_t) (DUK_USE_LITCACHE_SIZE - 1); /* Assumes size is power of 2. */ + /* Due to masking, cast is in 32-bit range. */ + DUK_ASSERT(key <= DUK_UINT_MAX); + return (duk_uint_t) key; +} + +DUK_INTERNAL duk_hstring *duk_heap_strtable_intern_literal_checked(duk_hthread *thr, const duk_uint8_t *str, duk_uint32_t blen) { + duk_uint_t key; + duk_litcache_entry *ent; + duk_hstring *h; + + /* Fast path check: literal exists in literal cache. */ + key = duk__strtable_litcache_key(str, blen); + ent = thr->heap->litcache + key; + if (ent->addr == str) { + DUK_DD(DUK_DDPRINT("intern check for cached, pinned literal: str=%p, blen=%ld -> duk_hstring %!O", + (const void *) str, + (long) blen, + (duk_heaphdr *) ent->h)); + DUK_ASSERT(ent->h != NULL); + DUK_ASSERT(DUK_HSTRING_HAS_PINNED_LITERAL(ent->h)); + DUK_STATS_INC(thr->heap, stats_strtab_litcache_hit); + return ent->h; + } + + /* Intern and update (overwrite) cache entry. */ + h = duk_heap_strtable_intern_checked(thr, str, blen); + ent->addr = str; + ent->h = h; + DUK_STATS_INC(thr->heap, stats_strtab_litcache_miss); + + /* Pin the duk_hstring until the next mark-and-sweep. This means + * litcache entries don't need to be invalidated until the next + * mark-and-sweep as their target duk_hstring is not freed before + * the mark-and-sweep happens. The pin remains even if the literal + * cache entry is overwritten, and is still useful to avoid string + * table traffic. + */ + if (!DUK_HSTRING_HAS_PINNED_LITERAL(h)) { + DUK_DD(DUK_DDPRINT("pin duk_hstring because it is a literal: %!O", (duk_heaphdr *) h)); + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) h)); + DUK_HSTRING_INCREF(thr, h); + DUK_HSTRING_SET_PINNED_LITERAL(h); + DUK_STATS_INC(thr->heap, stats_strtab_litcache_pin); + } + + return h; +} +#endif /* DUK_USE_LITCACHE_SIZE */ + +DUK_INTERNAL duk_hstring *duk_heap_strtable_intern_u32_checked(duk_hthread *thr, duk_uint32_t val) { + duk_hstring *res; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + + res = duk_heap_strtable_intern_u32(thr->heap, val); + if (DUK_UNLIKELY(res == NULL)) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return NULL;); + } + return res; +} + +/* + * Remove (unlink) a string from the string table. + * + * Just unlinks the duk_hstring, leaving link pointers as garbage. + * Caller must free the string itself. + */ + +#if defined(DUK_USE_REFERENCE_COUNTING) +/* Unlink without a 'prev' pointer. */ +DUK_INTERNAL void duk_heap_strtable_unlink(duk_heap *heap, duk_hstring *h) { +#if defined(DUK_USE_STRTAB_PTRCOMP) + duk_uint16_t *slot; +#else + duk_hstring **slot; +#endif + duk_hstring *other; + duk_hstring *prev; + + DUK_DDD(DUK_DDDPRINT("remove: heap=%p, h=%p, blen=%lu, strhash=%lx", + (void *) heap, + (void *) h, + (unsigned long) (h != NULL ? DUK_HSTRING_GET_BYTELEN(h) : 0), + (unsigned long) (h != NULL ? DUK_HSTRING_GET_HASH(h) : 0))); + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(h != NULL); + +#if defined(DUK__STRTAB_RESIZE_CHECK) + DUK_ASSERT(heap->st_count > 0); + heap->st_count--; +#endif + +#if defined(DUK_USE_STRTAB_PTRCOMP) + slot = heap->strtable16 + (DUK_HSTRING_GET_HASH(h) & heap->st_mask); +#else + slot = heap->strtable + (DUK_HSTRING_GET_HASH(h) & heap->st_mask); +#endif + other = DUK__HEAPPTR_DEC16(heap, *slot); + DUK_ASSERT(other != NULL); /* At least argument string is in the chain. */ + + prev = NULL; + while (other != h) { + prev = other; + other = other->hdr.h_next; + DUK_ASSERT(other != NULL); /* We'll eventually find 'h'. */ + } + if (prev != NULL) { + /* Middle of list. */ + prev->hdr.h_next = h->hdr.h_next; + } else { + /* Head of list. */ + *slot = DUK__HEAPPTR_ENC16(heap, h->hdr.h_next); + } + + /* There's no resize check on a string free. The next string + * intern will do one. + */ +} +#endif /* DUK_USE_REFERENCE_COUNTING */ + +/* Unlink with a 'prev' pointer. */ +DUK_INTERNAL void duk_heap_strtable_unlink_prev(duk_heap *heap, duk_hstring *h, duk_hstring *prev) { +#if defined(DUK_USE_STRTAB_PTRCOMP) + duk_uint16_t *slot; +#else + duk_hstring **slot; +#endif + + DUK_DDD(DUK_DDDPRINT("remove: heap=%p, prev=%p, h=%p, blen=%lu, strhash=%lx", + (void *) heap, + (void *) prev, + (void *) h, + (unsigned long) (h != NULL ? DUK_HSTRING_GET_BYTELEN(h) : 0), + (unsigned long) (h != NULL ? DUK_HSTRING_GET_HASH(h) : 0))); + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(h != NULL); + DUK_ASSERT(prev == NULL || prev->hdr.h_next == h); + +#if defined(DUK__STRTAB_RESIZE_CHECK) + DUK_ASSERT(heap->st_count > 0); + heap->st_count--; +#endif + + if (prev != NULL) { + /* Middle of list. */ + prev->hdr.h_next = h->hdr.h_next; + } else { + /* Head of list. */ +#if defined(DUK_USE_STRTAB_PTRCOMP) + slot = heap->strtable16 + (DUK_HSTRING_GET_HASH(h) & heap->st_mask); +#else + slot = heap->strtable + (DUK_HSTRING_GET_HASH(h) & heap->st_mask); +#endif + DUK_ASSERT(DUK__HEAPPTR_DEC16(heap, *slot) == h); + *slot = DUK__HEAPPTR_ENC16(heap, h->hdr.h_next); + } +} + +/* + * Force string table resize check in mark-and-sweep. + */ + +DUK_INTERNAL void duk_heap_strtable_force_resize(duk_heap *heap) { + /* Does only one grow/shrink step if needed. The heap->st_resizing + * flag protects against recursive resizing. + */ + + DUK_ASSERT(heap != NULL); + DUK_UNREF(heap); + +#if defined(DUK__STRTAB_RESIZE_CHECK) +#if defined(DUK_USE_STRTAB_PTRCOMP) + if (heap->strtable16 != NULL) { +#else + if (heap->strtable != NULL) { +#endif + duk__strtable_resize_check(heap); + } +#endif +} + +/* + * Free strings in the string table and the string table itself. + */ + +DUK_INTERNAL void duk_heap_strtable_free(duk_heap *heap) { +#if defined(DUK_USE_STRTAB_PTRCOMP) + duk_uint16_t *strtable; + duk_uint16_t *st; +#else + duk_hstring **strtable; + duk_hstring **st; +#endif + duk_hstring *h; + + DUK_ASSERT(heap != NULL); + +#if defined(DUK_USE_ASSERTIONS) + duk__strtable_assert_checks(heap); +#endif + + /* Strtable can be NULL if heap init fails. However, in that case + * heap->st_size is 0, so strtable == strtable_end and we skip the + * loop without a special check. + */ + strtable = DUK__GET_STRTABLE(heap); + st = strtable + heap->st_size; + DUK_ASSERT(strtable != NULL || heap->st_size == 0); + + while (strtable != st) { + --st; + h = DUK__HEAPPTR_DEC16(heap, *st); + while (h) { + duk_hstring *h_next; + h_next = h->hdr.h_next; + + /* Strings may have inner refs (extdata) in some cases. */ + duk_free_hstring(heap, h); + + h = h_next; + } + } + + DUK_FREE(heap, strtable); +} + +/* automatic undefs */ +#undef DUK__GET_STRTABLE +#undef DUK__HEAPPTR_DEC16 +#undef DUK__HEAPPTR_ENC16 +#undef DUK__STRTAB_U32_MAX_STRLEN +#line 1 "duk_heaphdr_assert.c" +/* + * duk_heaphdr assertion helpers + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_ASSERTIONS) + +#if defined(DUK_USE_DOUBLE_LINKED_HEAP) +DUK_INTERNAL void duk_heaphdr_assert_links(duk_heap *heap, duk_heaphdr *h) { + DUK_UNREF(heap); + if (h != NULL) { + duk_heaphdr *h_prev, *h_next; + h_prev = DUK_HEAPHDR_GET_PREV(heap, h); + h_next = DUK_HEAPHDR_GET_NEXT(heap, h); + DUK_ASSERT(h_prev == NULL || (DUK_HEAPHDR_GET_NEXT(heap, h_prev) == h)); + DUK_ASSERT(h_next == NULL || (DUK_HEAPHDR_GET_PREV(heap, h_next) == h)); + } +} +#else +DUK_INTERNAL void duk_heaphdr_assert_links(duk_heap *heap, duk_heaphdr *h) { + DUK_UNREF(heap); + DUK_UNREF(h); +} +#endif + +DUK_INTERNAL void duk_heaphdr_assert_valid(duk_heaphdr *h) { + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HEAPHDR_HTYPE_VALID(h)); +} + +/* Assert validity of a heaphdr, including all subclasses. */ +DUK_INTERNAL void duk_heaphdr_assert_valid_subclassed(duk_heaphdr *h) { + switch (DUK_HEAPHDR_GET_TYPE(h)) { + case DUK_HTYPE_OBJECT: { + duk_hobject *h_obj = (duk_hobject *) h; + DUK_HOBJECT_ASSERT_VALID(h_obj); + if (DUK_HOBJECT_IS_COMPFUNC(h_obj)) { + DUK_HCOMPFUNC_ASSERT_VALID((duk_hcompfunc *) h_obj); + } else if (DUK_HOBJECT_IS_NATFUNC(h_obj)) { + DUK_HNATFUNC_ASSERT_VALID((duk_hnatfunc *) h_obj); + } else if (DUK_HOBJECT_IS_DECENV(h_obj)) { + DUK_HDECENV_ASSERT_VALID((duk_hdecenv *) h_obj); + } else if (DUK_HOBJECT_IS_OBJENV(h_obj)) { + DUK_HOBJENV_ASSERT_VALID((duk_hobjenv *) h_obj); + } else if (DUK_HOBJECT_IS_BUFOBJ(h_obj)) { +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + DUK_HBUFOBJ_ASSERT_VALID((duk_hbufobj *) h_obj); +#endif + } else if (DUK_HOBJECT_IS_BOUNDFUNC(h_obj)) { + DUK_HBOUNDFUNC_ASSERT_VALID((duk_hboundfunc *) h_obj); + } else if (DUK_HOBJECT_IS_PROXY(h_obj)) { + DUK_HPROXY_ASSERT_VALID((duk_hproxy *) h_obj); + } else if (DUK_HOBJECT_IS_THREAD(h_obj)) { + DUK_HTHREAD_ASSERT_VALID((duk_hthread *) h_obj); + } else { + /* Just a plain object. */ + ; + } + break; + } + case DUK_HTYPE_STRING: { + duk_hstring *h_str = (duk_hstring *) h; + DUK_HSTRING_ASSERT_VALID(h_str); + break; + } + case DUK_HTYPE_BUFFER: { + duk_hbuffer *h_buf = (duk_hbuffer *) h; + DUK_HBUFFER_ASSERT_VALID(h_buf); + break; + } + default: { + DUK_ASSERT(0); + } + } +} + +#endif /* DUK_USE_ASSERTIONS */ +#line 1 "duk_hobject_alloc.c" +/* + * Hobject allocation. + * + * Provides primitive allocation functions for all object types (plain object, + * compiled function, native function, thread). The object return is not yet + * in "heap allocated" list and has a refcount of zero, so caller must careful. + */ + +/* XXX: In most cases there's no need for plain allocation without pushing + * to the value stack. Maybe rework contract? + */ + +/* #include duk_internal.h -> already included */ + +/* + * Helpers. + */ + +DUK_LOCAL void duk__init_object_parts(duk_heap *heap, duk_uint_t hobject_flags, duk_hobject *obj) { + DUK_ASSERT(obj != NULL); + /* Zeroed by caller. */ + + obj->hdr.h_flags = hobject_flags | DUK_HTYPE_OBJECT; + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE(&obj->hdr) == DUK_HTYPE_OBJECT); /* Assume zero shift. */ + +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + DUK_HOBJECT_SET_PROTOTYPE(heap, obj, NULL); + DUK_HOBJECT_SET_PROPS(heap, obj, NULL); +#endif +#if defined(DUK_USE_HEAPPTR16) + /* Zero encoded pointer is required to match NULL. */ + DUK_HEAPHDR_SET_NEXT(heap, &obj->hdr, NULL); +#if defined(DUK_USE_DOUBLE_LINKED_HEAP) + DUK_HEAPHDR_SET_PREV(heap, &obj->hdr, NULL); +#endif +#endif + DUK_HEAPHDR_ASSERT_LINKS(heap, &obj->hdr); + DUK_HEAP_INSERT_INTO_HEAP_ALLOCATED(heap, &obj->hdr); + + /* obj->props is intentionally left as NULL, and duk_hobject_props.c must deal + * with this properly. This is intentional: empty objects consume a minimum + * amount of memory. Further, an initial allocation might fail and cause + * 'obj' to "leak" (require a mark-and-sweep) since it is not reachable yet. + */ +} + +DUK_LOCAL void *duk__hobject_alloc_init(duk_hthread *thr, duk_uint_t hobject_flags, duk_size_t size) { + void *res; + + res = (void *) DUK_ALLOC_CHECKED_ZEROED(thr, size); + DUK_ASSERT(res != NULL); + duk__init_object_parts(thr->heap, hobject_flags, (duk_hobject *) res); + return res; +} + +/* + * Allocate an duk_hobject. + * + * The allocated object has no allocation for properties; the caller may + * want to force a resize if a desired size is known. + * + * The allocated object has zero reference count and is not reachable. + * The caller MUST make the object reachable and increase its reference + * count before invoking any operation that might require memory allocation. + */ + +DUK_INTERNAL duk_hobject *duk_hobject_alloc_unchecked(duk_heap *heap, duk_uint_t hobject_flags) { + duk_hobject *res; + + DUK_ASSERT(heap != NULL); + + /* different memory layout, alloc size, and init */ + DUK_ASSERT((hobject_flags & DUK_HOBJECT_FLAG_COMPFUNC) == 0); + DUK_ASSERT((hobject_flags & DUK_HOBJECT_FLAG_NATFUNC) == 0); + DUK_ASSERT((hobject_flags & DUK_HOBJECT_FLAG_BOUNDFUNC) == 0); + + res = (duk_hobject *) DUK_ALLOC_ZEROED(heap, sizeof(duk_hobject)); + if (DUK_UNLIKELY(res == NULL)) { + return NULL; + } + DUK_ASSERT(!DUK_HOBJECT_IS_THREAD(res)); + + duk__init_object_parts(heap, hobject_flags, res); + + DUK_ASSERT(!DUK_HOBJECT_IS_THREAD(res)); + return res; +} + +DUK_INTERNAL duk_hobject *duk_hobject_alloc(duk_hthread *thr, duk_uint_t hobject_flags) { + duk_hobject *res; + + res = (duk_hobject *) duk__hobject_alloc_init(thr, hobject_flags, sizeof(duk_hobject)); + return res; +} + +DUK_INTERNAL duk_hcompfunc *duk_hcompfunc_alloc(duk_hthread *thr, duk_uint_t hobject_flags) { + duk_hcompfunc *res; + + res = (duk_hcompfunc *) duk__hobject_alloc_init(thr, hobject_flags, sizeof(duk_hcompfunc)); +#if defined(DUK_USE_EXPLICIT_NULL_INIT) +#if defined(DUK_USE_HEAPPTR16) + /* NULL pointer is required to encode to zero, so memset is enough. */ +#else + res->data = NULL; + res->funcs = NULL; + res->bytecode = NULL; +#endif + res->lex_env = NULL; + res->var_env = NULL; +#endif + + return res; +} + +DUK_INTERNAL duk_hnatfunc *duk_hnatfunc_alloc(duk_hthread *thr, duk_uint_t hobject_flags) { + duk_hnatfunc *res; + + res = (duk_hnatfunc *) duk__hobject_alloc_init(thr, hobject_flags, sizeof(duk_hnatfunc)); +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + res->func = NULL; +#endif + + return res; +} + +DUK_INTERNAL duk_hboundfunc *duk_hboundfunc_alloc(duk_heap *heap, duk_uint_t hobject_flags) { + duk_hboundfunc *res; + + res = (duk_hboundfunc *) DUK_ALLOC(heap, sizeof(duk_hboundfunc)); + if (!res) { + return NULL; + } + duk_memzero(res, sizeof(duk_hboundfunc)); + + duk__init_object_parts(heap, hobject_flags, &res->obj); + + DUK_TVAL_SET_UNDEFINED(&res->target); + DUK_TVAL_SET_UNDEFINED(&res->this_binding); + +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + res->args = NULL; +#endif + + return res; +} + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL duk_hbufobj *duk_hbufobj_alloc(duk_hthread *thr, duk_uint_t hobject_flags) { + duk_hbufobj *res; + + res = (duk_hbufobj *) duk__hobject_alloc_init(thr, hobject_flags, sizeof(duk_hbufobj)); +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + res->buf = NULL; + res->buf_prop = NULL; +#endif + + DUK_HBUFOBJ_ASSERT_VALID(res); + return res; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* Allocate a new thread. + * + * Leaves the built-ins array uninitialized. The caller must either + * initialize a new global context or share existing built-ins from + * another thread. + */ +DUK_INTERNAL duk_hthread *duk_hthread_alloc_unchecked(duk_heap *heap, duk_uint_t hobject_flags) { + duk_hthread *res; + + res = (duk_hthread *) DUK_ALLOC(heap, sizeof(duk_hthread)); + if (DUK_UNLIKELY(res == NULL)) { + return NULL; + } + duk_memzero(res, sizeof(duk_hthread)); + + duk__init_object_parts(heap, hobject_flags, &res->obj); + +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + res->ptr_curr_pc = NULL; + res->heap = NULL; + res->valstack = NULL; + res->valstack_end = NULL; + res->valstack_alloc_end = NULL; + res->valstack_bottom = NULL; + res->valstack_top = NULL; + res->callstack_curr = NULL; + res->resumer = NULL; + res->compile_ctx = NULL, +#if defined(DUK_USE_HEAPPTR16) + res->strs16 = NULL; +#else + res->strs = NULL; +#endif + { + duk_small_uint_t i; + for (i = 0; i < DUK_NUM_BUILTINS; i++) { + res->builtins[i] = NULL; + } + } +#endif + /* When nothing is running, API calls are in non-strict mode. */ + DUK_ASSERT(res->strict == 0); + + res->heap = heap; + + /* XXX: Any reason not to merge duk_hthread_alloc.c here? */ + return res; +} + +DUK_INTERNAL duk_hthread *duk_hthread_alloc(duk_hthread *thr, duk_uint_t hobject_flags) { + duk_hthread *res; + + res = duk_hthread_alloc_unchecked(thr->heap, hobject_flags); + if (res == NULL) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return NULL;); + } + return res; +} + +DUK_INTERNAL duk_harray *duk_harray_alloc(duk_hthread *thr, duk_uint_t hobject_flags) { + duk_harray *res; + + res = (duk_harray *) duk__hobject_alloc_init(thr, hobject_flags, sizeof(duk_harray)); + + DUK_ASSERT(res->length == 0); + + return res; +} + +DUK_INTERNAL duk_hdecenv *duk_hdecenv_alloc(duk_hthread *thr, duk_uint_t hobject_flags) { + duk_hdecenv *res; + + res = (duk_hdecenv *) duk__hobject_alloc_init(thr, hobject_flags, sizeof(duk_hdecenv)); +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + res->thread = NULL; + res->varmap = NULL; +#endif + + DUK_ASSERT(res->thread == NULL); + DUK_ASSERT(res->varmap == NULL); + DUK_ASSERT(res->regbase_byteoff == 0); + + return res; +} + +DUK_INTERNAL duk_hobjenv *duk_hobjenv_alloc(duk_hthread *thr, duk_uint_t hobject_flags) { + duk_hobjenv *res; + + res = (duk_hobjenv *) duk__hobject_alloc_init(thr, hobject_flags, sizeof(duk_hobjenv)); +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + res->target = NULL; +#endif + + DUK_ASSERT(res->target == NULL); + + return res; +} + +DUK_INTERNAL duk_hproxy *duk_hproxy_alloc(duk_hthread *thr, duk_uint_t hobject_flags) { + duk_hproxy *res; + + res = (duk_hproxy *) duk__hobject_alloc_init(thr, hobject_flags, sizeof(duk_hproxy)); + + /* Leave ->target and ->handler uninitialized, as caller will always + * explicitly initialize them before any side effects are possible. + */ + + return res; +} +#line 1 "duk_hobject_assert.c" +/* + * duk_hobject and subclass assertion helpers + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_ASSERTIONS) + +DUK_INTERNAL void duk_hobject_assert_valid(duk_hobject *h) { + DUK_ASSERT(h != NULL); + DUK_ASSERT(!DUK_HOBJECT_IS_CALLABLE(h) || DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_FUNCTION); + DUK_ASSERT(!DUK_HOBJECT_IS_BUFOBJ(h) || (DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_ARRAYBUFFER || + DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_DATAVIEW || + DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_INT8ARRAY || + DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_UINT8ARRAY || + DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_UINT8CLAMPEDARRAY || + DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_INT16ARRAY || + DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_UINT16ARRAY || + DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_INT32ARRAY || + DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_UINT32ARRAY || + DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_FLOAT32ARRAY || + DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_FLOAT64ARRAY)); + /* Object is an Array <=> object has exotic array behavior */ + DUK_ASSERT((DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_ARRAY && DUK_HOBJECT_HAS_EXOTIC_ARRAY(h)) || + (DUK_HOBJECT_GET_CLASS_NUMBER(h) != DUK_HOBJECT_CLASS_ARRAY && !DUK_HOBJECT_HAS_EXOTIC_ARRAY(h))); +} + +DUK_INTERNAL void duk_harray_assert_valid(duk_harray *h) { + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_ARRAY((duk_hobject *) h)); + DUK_ASSERT(DUK_HOBJECT_HAS_EXOTIC_ARRAY((duk_hobject *) h)); +} + +DUK_INTERNAL void duk_hboundfunc_assert_valid(duk_hboundfunc *h) { + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_BOUNDFUNC((duk_hobject *) h)); + DUK_ASSERT(DUK_TVAL_IS_LIGHTFUNC(&h->target) || + (DUK_TVAL_IS_OBJECT(&h->target) && DUK_HOBJECT_IS_CALLABLE(DUK_TVAL_GET_OBJECT(&h->target)))); + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(&h->this_binding)); + DUK_ASSERT(h->nargs == 0 || h->args != NULL); +} + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_INTERNAL void duk_hbufobj_assert_valid(duk_hbufobj *h) { + DUK_ASSERT(h != NULL); + DUK_ASSERT(h->shift <= 3); + DUK_ASSERT(h->elem_type <= DUK_HBUFOBJ_ELEM_MAX); + DUK_ASSERT((h->shift == 0 && h->elem_type == DUK_HBUFOBJ_ELEM_UINT8) || + (h->shift == 0 && h->elem_type == DUK_HBUFOBJ_ELEM_UINT8CLAMPED) || + (h->shift == 0 && h->elem_type == DUK_HBUFOBJ_ELEM_INT8) || + (h->shift == 1 && h->elem_type == DUK_HBUFOBJ_ELEM_UINT16) || + (h->shift == 1 && h->elem_type == DUK_HBUFOBJ_ELEM_INT16) || + (h->shift == 2 && h->elem_type == DUK_HBUFOBJ_ELEM_UINT32) || + (h->shift == 2 && h->elem_type == DUK_HBUFOBJ_ELEM_INT32) || + (h->shift == 2 && h->elem_type == DUK_HBUFOBJ_ELEM_FLOAT32) || + (h->shift == 3 && h->elem_type == DUK_HBUFOBJ_ELEM_FLOAT64)); + DUK_ASSERT(h->is_typedarray == 0 || h->is_typedarray == 1); + DUK_ASSERT(DUK_HOBJECT_IS_BUFOBJ((duk_hobject *) h)); + if (h->buf == NULL) { + DUK_ASSERT(h->offset == 0); + DUK_ASSERT(h->length == 0); + } else { + /* No assertions for offset or length; in particular, + * it's OK for length to be longer than underlying + * buffer. Just ensure they don't wrap when added. + */ + DUK_ASSERT(h->offset + h->length >= h->offset); + } +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +DUK_INTERNAL void duk_hcompfunc_assert_valid(duk_hcompfunc *h) { + DUK_ASSERT(h != NULL); +} + +DUK_INTERNAL void duk_hnatfunc_assert_valid(duk_hnatfunc *h) { + DUK_ASSERT(h != NULL); +} + +DUK_INTERNAL void duk_hdecenv_assert_valid(duk_hdecenv *h) { + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_DECENV((duk_hobject *) h)); + DUK_ASSERT(h->thread == NULL || h->varmap != NULL); +} + +DUK_INTERNAL void duk_hobjenv_assert_valid(duk_hobjenv *h) { + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_OBJENV((duk_hobject *) h)); + DUK_ASSERT(h->target != NULL); + DUK_ASSERT(h->has_this == 0 || h->has_this == 1); +} + +DUK_INTERNAL void duk_hproxy_assert_valid(duk_hproxy *h) { + DUK_ASSERT(h != NULL); + DUK_ASSERT(h->target != NULL); + DUK_ASSERT(h->handler != NULL); + DUK_ASSERT(DUK_HOBJECT_HAS_EXOTIC_PROXYOBJ((duk_hobject *) h)); +} + +DUK_INTERNAL void duk_hthread_assert_valid(duk_hthread *thr) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(DUK_HEAPHDR_GET_TYPE((duk_heaphdr *) thr) == DUK_HTYPE_OBJECT); + DUK_ASSERT(DUK_HOBJECT_IS_THREAD((duk_hobject *) thr)); + DUK_ASSERT(thr->unused1 == 0); + DUK_ASSERT(thr->unused2 == 0); +} + +DUK_INTERNAL void duk_ctx_assert_valid(duk_hthread *thr) { + DUK_ASSERT(thr != NULL); + DUK_HTHREAD_ASSERT_VALID(thr); + DUK_ASSERT(thr->valstack != NULL); + DUK_ASSERT(thr->valstack_bottom != NULL); + DUK_ASSERT(thr->valstack_top != NULL); + DUK_ASSERT(thr->valstack_end != NULL); + DUK_ASSERT(thr->valstack_alloc_end != NULL); + DUK_ASSERT(thr->valstack_alloc_end >= thr->valstack); + DUK_ASSERT(thr->valstack_end >= thr->valstack); + DUK_ASSERT(thr->valstack_top >= thr->valstack); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT(thr->valstack_end >= thr->valstack_top); + DUK_ASSERT(thr->valstack_alloc_end >= thr->valstack_end); +} + +#endif /* DUK_USE_ASSERTIONS */ +#line 1 "duk_hobject_enum.c" +/* + * Object enumeration support. + * + * Creates an internal enumeration state object to be used e.g. with for-in + * enumeration. The state object contains a snapshot of target object keys + * and internal control state for enumeration. Enumerator flags allow caller + * to e.g. request internal/non-enumerable properties, and to enumerate only + * "own" properties. + * + * Also creates the result value for e.g. Object.keys() based on the same + * internal structure. + * + * This snapshot-based enumeration approach is used to simplify enumeration: + * non-snapshot-based approaches are difficult to reconcile with mutating + * the enumeration target, running multiple long-lived enumerators at the + * same time, garbage collection details, etc. The downside is that the + * enumerator object is memory inefficient especially for iterating arrays. + */ + +/* #include duk_internal.h -> already included */ + +/* XXX: identify enumeration target with an object index (not top of stack) */ + +/* First enumerated key index in enumerator object, must match exactly the + * number of control properties inserted to the enumerator. + */ +#define DUK__ENUM_START_INDEX 2 + +/* Current implementation suffices for ES2015 for now because there's no symbol + * sorting, so commented out for now. + */ + +/* + * Helper to sort enumeration keys using a callback for pairwise duk_hstring + * comparisons. The keys are in the enumeration object entry part, starting + * from DUK__ENUM_START_INDEX, and the entry part is dense. Entry part values + * are all "true", e.g. "1" -> true, "3" -> true, "foo" -> true, "2" -> true, + * so it suffices to just switch keys without switching values. + * + * ES2015 [[OwnPropertyKeys]] enumeration order for ordinary objects: + * (1) array indices in ascending order, + * (2) non-array-index keys in insertion order, and + * (3) symbols in insertion order. + * http://www.ecma-international.org/ecma-262/6.0/#sec-ordinary-object-internal-methods-and-internal-slots-ownpropertykeys. + * + * This rule is applied to "own properties" at each inheritance level; + * non-duplicate parent keys always follow child keys. For example, + * an inherited array index will enumerate -after- a symbol in the + * child. + * + * Insertion sort is used because (1) it's simple and compact, (2) works + * in-place, (3) minimizes operations if data is already nearly sorted, + * (4) doesn't reorder elements considered equal. + * http://en.wikipedia.org/wiki/Insertion_sort + */ + +/* Sort key, must hold array indices, "not array index" marker, and one more + * higher value for symbols. + */ +#if !defined(DUK_USE_SYMBOL_BUILTIN) +typedef duk_uint32_t duk__sort_key_t; +#elif defined(DUK_USE_64BIT_OPS) +typedef duk_uint64_t duk__sort_key_t; +#else +typedef duk_double_t duk__sort_key_t; +#endif + +/* Get sort key for a duk_hstring. */ +DUK_LOCAL duk__sort_key_t duk__hstring_sort_key(duk_hstring *x) { + duk__sort_key_t val; + + /* For array indices [0,0xfffffffe] use the array index as is. + * For strings, use 0xffffffff, the marker 'arridx' already in + * duk_hstring. For symbols, any value above 0xffffffff works, + * as long as it is the same for all symbols; currently just add + * the masked flag field into the arridx temporary. + */ + DUK_ASSERT(x != NULL); + DUK_ASSERT(!DUK_HSTRING_HAS_SYMBOL(x) || DUK_HSTRING_GET_ARRIDX_FAST(x) == DUK_HSTRING_NO_ARRAY_INDEX); + + val = (duk__sort_key_t) DUK_HSTRING_GET_ARRIDX_FAST(x); + +#if defined(DUK_USE_SYMBOL_BUILTIN) + val = val + (duk__sort_key_t) (DUK_HEAPHDR_GET_FLAGS_RAW((duk_heaphdr *) x) & DUK_HSTRING_FLAG_SYMBOL); +#endif + + return (duk__sort_key_t) val; +} + +/* Insert element 'b' after element 'a'? */ +DUK_LOCAL duk_bool_t duk__sort_compare_es6(duk_hstring *a, duk_hstring *b, duk__sort_key_t val_b) { + duk__sort_key_t val_a; + + DUK_ASSERT(a != NULL); + DUK_ASSERT(b != NULL); + DUK_UNREF(b); /* Not actually needed now, val_b suffices. */ + + val_a = duk__hstring_sort_key(a); + + if (val_a > val_b) { + return 0; + } else { + return 1; + } +} + +DUK_LOCAL void duk__sort_enum_keys_es6(duk_hthread *thr, duk_hobject *h_obj, duk_int_fast32_t idx_start, duk_int_fast32_t idx_end) { + duk_hstring **keys; + duk_int_fast32_t idx; + + DUK_ASSERT(h_obj != NULL); + DUK_ASSERT(idx_start >= DUK__ENUM_START_INDEX); + DUK_ASSERT(idx_end >= idx_start); + DUK_UNREF(thr); + + if (idx_end <= idx_start + 1) { + return; /* Zero or one element(s). */ + } + + keys = DUK_HOBJECT_E_GET_KEY_BASE(thr->heap, h_obj); + + for (idx = idx_start + 1; idx < idx_end; idx++) { + duk_hstring *h_curr; + duk_int_fast32_t idx_insert; + duk__sort_key_t val_curr; + + h_curr = keys[idx]; + DUK_ASSERT(h_curr != NULL); + + /* Scan backwards for insertion place. This works very well + * when the elements are nearly in order which is the common + * (and optimized for) case. + */ + + val_curr = duk__hstring_sort_key(h_curr); /* Remains same during scanning. */ + for (idx_insert = idx - 1; idx_insert >= idx_start; idx_insert--) { + duk_hstring *h_insert; + h_insert = keys[idx_insert]; + DUK_ASSERT(h_insert != NULL); + + if (duk__sort_compare_es6(h_insert, h_curr, val_curr)) { + break; + } + } + /* If we're out of indices, idx_insert == idx_start - 1 and idx_insert++ + * brings us back to idx_start. + */ + idx_insert++; + DUK_ASSERT(idx_insert >= 0 && idx_insert <= idx); + + /* .-- p_insert .-- p_curr + * v v + * | ... | insert | ... | curr + */ + + /* This could also done when the keys are in order, i.e. + * idx_insert == idx. The result would be an unnecessary + * memmove() but we use an explicit check because the keys + * are very often in order already. + */ + if (idx != idx_insert) { + duk_memmove((void *) (keys + idx_insert + 1), + (const void *) (keys + idx_insert), + ((size_t) (idx - idx_insert) * sizeof(duk_hstring *))); + keys[idx_insert] = h_curr; + } + } + + /* Entry part has been reordered now with no side effects. + * If the object has a hash part, it will now be incorrect + * and we need to rehash. Do that by forcing a resize to + * the current size. + */ + duk_hobject_resize_entrypart(thr, h_obj, DUK_HOBJECT_GET_ESIZE(h_obj)); +} + +/* + * Create an internal enumerator object E, which has its keys ordered + * to match desired enumeration ordering. Also initialize internal control + * properties for enumeration. + * + * Note: if an array was used to hold enumeration keys instead, an array + * scan would be needed to eliminate duplicates found in the prototype chain. + */ + +DUK_LOCAL void duk__add_enum_key(duk_hthread *thr, duk_hstring *k) { + /* 'k' may be unreachable on entry so must push without any + * potential for GC. + */ + duk_push_hstring(thr, k); + duk_push_true(thr); + duk_put_prop(thr, -3); +} + +DUK_LOCAL void duk__add_enum_key_stridx(duk_hthread *thr, duk_small_uint_t stridx) { + duk__add_enum_key(thr, DUK_HTHREAD_GET_STRING(thr, stridx)); +} + +DUK_INTERNAL void duk_hobject_enumerator_create(duk_hthread *thr, duk_small_uint_t enum_flags) { + duk_hobject *enum_target; + duk_hobject *curr; + duk_hobject *res; +#if defined(DUK_USE_ES6_PROXY) + duk_hobject *h_proxy_target; + duk_hobject *h_proxy_handler; + duk_hobject *h_trap_result; +#endif + duk_uint_fast32_t i, len; /* used for array, stack, and entry indices */ + duk_uint_fast32_t sort_start_index; + + DUK_ASSERT(thr != NULL); + + enum_target = duk_require_hobject(thr, -1); + DUK_ASSERT(enum_target != NULL); + + duk_push_bare_object(thr); + res = duk_known_hobject(thr, -1); + + /* [enum_target res] */ + + /* Target must be stored so that we can recheck whether or not + * keys still exist when we enumerate. This is not done if the + * enumeration result comes from a proxy trap as there is no + * real object to check against. + */ + duk_push_hobject(thr, enum_target); + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_INT_TARGET); /* Target is bare, plain put OK. */ + + /* Initialize index so that we skip internal control keys. */ + duk_push_int(thr, DUK__ENUM_START_INDEX); + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_INT_NEXT); /* Target is bare, plain put OK. */ + + /* + * Proxy object handling + */ + +#if defined(DUK_USE_ES6_PROXY) + if (DUK_LIKELY((enum_flags & DUK_ENUM_NO_PROXY_BEHAVIOR) != 0)) { + goto skip_proxy; + } + if (DUK_LIKELY(!duk_hobject_proxy_check(enum_target, &h_proxy_target, &h_proxy_handler))) { + goto skip_proxy; + } + + /* XXX: share code with Object.keys() Proxy handling */ + + /* In ES2015 for-in invoked the "enumerate" trap; in ES2016 "enumerate" + * has been obsoleted and "ownKeys" is used instead. + */ + DUK_DDD(DUK_DDDPRINT("proxy enumeration")); + duk_push_hobject(thr, h_proxy_handler); + if (!duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_OWN_KEYS)) { + /* No need to replace the 'enum_target' value in stack, only the + * enum_target reference. This also ensures that the original + * enum target is reachable, which keeps the proxy and the proxy + * target reachable. We do need to replace the internal _Target. + */ + DUK_DDD(DUK_DDDPRINT("no ownKeys trap, enumerate proxy target instead")); + DUK_DDD(DUK_DDDPRINT("h_proxy_target=%!O", (duk_heaphdr *) h_proxy_target)); + enum_target = h_proxy_target; + + duk_push_hobject(thr, enum_target); /* -> [ ... enum_target res handler undefined target ] */ + duk_put_prop_stridx_short(thr, -4, DUK_STRIDX_INT_TARGET); /* Target is bare, plain put OK. */ + + duk_pop_2(thr); /* -> [ ... enum_target res ] */ + goto skip_proxy; + } + + /* [ ... enum_target res handler trap ] */ + duk_insert(thr, -2); + duk_push_hobject(thr, h_proxy_target); /* -> [ ... enum_target res trap handler target ] */ + duk_call_method(thr, 1 /*nargs*/); /* -> [ ... enum_target res trap_result ] */ + h_trap_result = duk_require_hobject(thr, -1); + DUK_UNREF(h_trap_result); + + duk_proxy_ownkeys_postprocess(thr, h_proxy_target, enum_flags); + /* -> [ ... enum_target res trap_result keys_array ] */ + + /* Copy cleaned up trap result keys into the enumerator object. */ + /* XXX: result is a dense array; could make use of that. */ + DUK_ASSERT(duk_is_array(thr, -1)); + len = (duk_uint_fast32_t) duk_get_length(thr, -1); + for (i = 0; i < len; i++) { + (void) duk_get_prop_index(thr, -1, (duk_uarridx_t) i); + DUK_ASSERT(duk_is_string(thr, -1)); /* postprocess cleaned up */ + /* [ ... enum_target res trap_result keys_array val ] */ + duk_push_true(thr); + /* [ ... enum_target res trap_result keys_array val true ] */ + duk_put_prop(thr, -5); + } + /* [ ... enum_target res trap_result keys_array ] */ + duk_pop_2(thr); + duk_remove_m2(thr); + + /* [ ... res ] */ + + /* The internal _Target property is kept pointing to the original + * enumeration target (the proxy object), so that the enumerator + * 'next' operation can read property values if so requested. The + * fact that the _Target is a proxy disables key existence check + * during enumeration. + */ + DUK_DDD(DUK_DDDPRINT("proxy enumeration, final res: %!O", (duk_heaphdr *) res)); + goto compact_and_return; + +skip_proxy: +#endif /* DUK_USE_ES6_PROXY */ + + curr = enum_target; + sort_start_index = DUK__ENUM_START_INDEX; + DUK_ASSERT(DUK_HOBJECT_GET_ENEXT(res) == DUK__ENUM_START_INDEX); + while (curr) { + duk_uint_fast32_t sort_end_index; +#if !defined(DUK_USE_PREFER_SIZE) + duk_bool_t need_sort = 0; +#endif + duk_bool_t cond; + + /* Enumeration proceeds by inheritance level. Virtual + * properties need to be handled specially, followed by + * array part, and finally entry part. + * + * If there are array index keys in the entry part or any + * other risk of the ES2015 [[OwnPropertyKeys]] order being + * violated, need_sort is set and an explicit ES2015 sort is + * done for the inheritance level. + */ + + /* XXX: inheriting from proxy */ + + /* + * Virtual properties. + * + * String and buffer indices are virtual and always enumerable, + * 'length' is virtual and non-enumerable. Array and arguments + * object props have special behavior but are concrete. + * + * String and buffer objects don't have an array part so as long + * as virtual array index keys are enumerated first, we don't + * need to set need_sort. + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + cond = DUK_HOBJECT_HAS_EXOTIC_STRINGOBJ(curr) || DUK_HOBJECT_IS_BUFOBJ(curr); +#else + cond = DUK_HOBJECT_HAS_EXOTIC_STRINGOBJ(curr); +#endif + cond = cond && !(enum_flags & DUK_ENUM_EXCLUDE_STRINGS); + if (cond) { + duk_bool_t have_length = 1; + + /* String and buffer enumeration behavior is identical now, + * so use shared handler. + */ + if (DUK_HOBJECT_HAS_EXOTIC_STRINGOBJ(curr)) { + duk_hstring *h_val; + h_val = duk_hobject_get_internal_value_string(thr->heap, curr); + DUK_ASSERT(h_val != NULL); /* string objects must not created without internal value */ + len = (duk_uint_fast32_t) DUK_HSTRING_GET_CHARLEN(h_val); + } +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + else { + duk_hbufobj *h_bufobj; + DUK_ASSERT(DUK_HOBJECT_IS_BUFOBJ(curr)); + h_bufobj = (duk_hbufobj *) curr; + + if (h_bufobj == NULL || !h_bufobj->is_typedarray) { + /* Zero length seems like a good behavior for neutered buffers. + * ArrayBuffer (non-view) and DataView don't have index properties + * or .length property. + */ + len = 0; + have_length = 0; + } else { + /* There's intentionally no check for + * current underlying buffer length. + */ + len = (duk_uint_fast32_t) (h_bufobj->length >> h_bufobj->shift); + } + } +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + + for (i = 0; i < len; i++) { + duk_hstring *k; + + /* This is a bit fragile: the string is not + * reachable until it is pushed by the helper. + */ + k = duk_heap_strtable_intern_u32_checked(thr, (duk_uint32_t) i); + DUK_ASSERT(k); + + duk__add_enum_key(thr, k); + + /* [enum_target res] */ + } + + /* 'length' and other virtual properties are not + * enumerable, but are included if non-enumerable + * properties are requested. + */ + + if (have_length && (enum_flags & DUK_ENUM_INCLUDE_NONENUMERABLE)) { + duk__add_enum_key_stridx(thr, DUK_STRIDX_LENGTH); + } + } + + /* + * Array part + */ + + cond = !(enum_flags & DUK_ENUM_EXCLUDE_STRINGS); + if (cond) { + for (i = 0; i < (duk_uint_fast32_t) DUK_HOBJECT_GET_ASIZE(curr); i++) { + duk_hstring *k; + duk_tval *tv; + + tv = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, curr, i); + if (DUK_TVAL_IS_UNUSED(tv)) { + continue; + } + k = duk_heap_strtable_intern_u32_checked(thr, (duk_uint32_t) i); /* Fragile reachability. */ + DUK_ASSERT(k); + + duk__add_enum_key(thr, k); + + /* [enum_target res] */ + } + + if (DUK_HOBJECT_HAS_EXOTIC_ARRAY(curr)) { + /* Array .length comes after numeric indices. */ + if (enum_flags & DUK_ENUM_INCLUDE_NONENUMERABLE) { + duk__add_enum_key_stridx(thr, DUK_STRIDX_LENGTH); + } + } + } + + /* + * Entries part + */ + + for (i = 0; i < (duk_uint_fast32_t) DUK_HOBJECT_GET_ENEXT(curr); i++) { + duk_hstring *k; + + k = DUK_HOBJECT_E_GET_KEY(thr->heap, curr, i); + if (!k) { + continue; + } + if (!(enum_flags & DUK_ENUM_INCLUDE_NONENUMERABLE) && + !DUK_HOBJECT_E_SLOT_IS_ENUMERABLE(thr->heap, curr, i)) { + continue; + } + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(k))) { + if (!(enum_flags & DUK_ENUM_INCLUDE_HIDDEN) && DUK_HSTRING_HAS_HIDDEN(k)) { + continue; + } + if (!(enum_flags & DUK_ENUM_INCLUDE_SYMBOLS)) { + continue; + } +#if !defined(DUK_USE_PREFER_SIZE) + need_sort = 1; +#endif + } else { + DUK_ASSERT(!DUK_HSTRING_HAS_HIDDEN(k)); /* would also have symbol flag */ + if (enum_flags & DUK_ENUM_EXCLUDE_STRINGS) { + continue; + } + } + if (DUK_HSTRING_HAS_ARRIDX(k)) { + /* This in currently only possible if the + * object has no array part: the array part + * is exhaustive when it is present. + */ +#if !defined(DUK_USE_PREFER_SIZE) + need_sort = 1; +#endif + } else { + if (enum_flags & DUK_ENUM_ARRAY_INDICES_ONLY) { + continue; + } + } + + DUK_ASSERT(DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, curr, i) || + !DUK_TVAL_IS_UNUSED(&DUK_HOBJECT_E_GET_VALUE_PTR(thr->heap, curr, i)->v)); + + duk__add_enum_key(thr, k); + + /* [enum_target res] */ + } + + /* Sort enumerated keys according to ES2015 requirements for + * the "inheritance level" just processed. This is far from + * optimal, ES2015 semantics could be achieved more efficiently + * by handling array index string keys (and symbol keys) + * specially above in effect doing the sort inline. + * + * Skip the sort if array index sorting is requested because + * we must consider all keys, also inherited, so an explicit + * sort is done for the whole result after we're done with the + * prototype chain. + * + * Also skip the sort if need_sort == 0, i.e. we know for + * certain that the enumerated order is already correct. + */ + sort_end_index = DUK_HOBJECT_GET_ENEXT(res); + + if (!(enum_flags & DUK_ENUM_SORT_ARRAY_INDICES)) { +#if defined(DUK_USE_PREFER_SIZE) + duk__sort_enum_keys_es6(thr, res, (duk_int_fast32_t) sort_start_index, (duk_int_fast32_t) sort_end_index); +#else + if (need_sort) { + DUK_DDD(DUK_DDDPRINT("need to sort")); + duk__sort_enum_keys_es6(thr, + res, + (duk_int_fast32_t) sort_start_index, + (duk_int_fast32_t) sort_end_index); + } else { + DUK_DDD(DUK_DDDPRINT("no need to sort")); + } +#endif + } + + sort_start_index = sort_end_index; + + if (enum_flags & DUK_ENUM_OWN_PROPERTIES_ONLY) { + break; + } + + curr = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, curr); + } + + /* [enum_target res] */ + + duk_remove_m2(thr); + + /* [res] */ + + if (enum_flags & DUK_ENUM_SORT_ARRAY_INDICES) { + /* Some E5/E5.1 algorithms require that array indices are iterated + * in a strictly ascending order. This is the case for e.g. + * Array.prototype.forEach() and JSON.stringify() PropertyList + * handling. The caller can request an explicit sort in these + * cases. + */ + + /* Sort to ES2015 order which works for pure array incides but + * also for mixed keys. + */ + duk__sort_enum_keys_es6(thr, + res, + (duk_int_fast32_t) DUK__ENUM_START_INDEX, + (duk_int_fast32_t) DUK_HOBJECT_GET_ENEXT(res)); + } + +#if defined(DUK_USE_ES6_PROXY) +compact_and_return: +#endif + /* compact; no need to seal because object is internal */ + duk_hobject_compact_props(thr, res); + + DUK_DDD(DUK_DDDPRINT("created enumerator object: %!iT", (duk_tval *) duk_get_tval(thr, -1))); +} + +/* + * Returns non-zero if a key and/or value was enumerated, and: + * + * [enum] -> [key] (get_value == 0) + * [enum] -> [key value] (get_value == 1) + * + * Returns zero without pushing anything on the stack otherwise. + */ +DUK_INTERNAL duk_bool_t duk_hobject_enumerator_next(duk_hthread *thr, duk_bool_t get_value) { + duk_hobject *e; + duk_hobject *enum_target; + duk_hstring *res = NULL; + duk_uint_fast32_t idx; + duk_bool_t check_existence; + + DUK_ASSERT(thr != NULL); + + /* [... enum] */ + + e = duk_require_hobject(thr, -1); + + /* XXX use get tval ptr, more efficient */ + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_INT_NEXT); + idx = (duk_uint_fast32_t) duk_require_uint(thr, -1); + duk_pop(thr); + DUK_DDD(DUK_DDDPRINT("enumeration: index is: %ld", (long) idx)); + + /* Enumeration keys are checked against the enumeration target (to see + * that they still exist). In the proxy enumeration case _Target will + * be the proxy, and checking key existence against the proxy is not + * required (or sensible, as the keys may be fully virtual). + */ + duk_xget_owndataprop_stridx_short(thr, -1, DUK_STRIDX_INT_TARGET); + enum_target = duk_require_hobject(thr, -1); + DUK_ASSERT(enum_target != NULL); +#if defined(DUK_USE_ES6_PROXY) + check_existence = (!DUK_HOBJECT_IS_PROXY(enum_target)); +#else + check_existence = 1; +#endif + duk_pop(thr); /* still reachable */ + + DUK_DDD(DUK_DDDPRINT("getting next enum value, enum_target=%!iO, enumerator=%!iT", + (duk_heaphdr *) enum_target, + (duk_tval *) duk_get_tval(thr, -1))); + + /* no array part */ + for (;;) { + duk_hstring *k; + + if (idx >= DUK_HOBJECT_GET_ENEXT(e)) { + DUK_DDD(DUK_DDDPRINT("enumeration: ran out of elements")); + break; + } + + /* we know these because enum objects are internally created */ + k = DUK_HOBJECT_E_GET_KEY(thr->heap, e, idx); + DUK_ASSERT(k != NULL); + DUK_ASSERT(!DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, e, idx)); + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(&DUK_HOBJECT_E_GET_VALUE(thr->heap, e, idx).v)); + + idx++; + + /* recheck that the property still exists */ + if (check_existence && !duk_hobject_hasprop_raw(thr, enum_target, k)) { + DUK_DDD(DUK_DDDPRINT("property deleted during enumeration, skip")); + continue; + } + + DUK_DDD(DUK_DDDPRINT("enumeration: found element, key: %!O", (duk_heaphdr *) k)); + res = k; + break; + } + + DUK_DDD(DUK_DDDPRINT("enumeration: updating next index to %ld", (long) idx)); + + duk_push_u32(thr, (duk_uint32_t) idx); + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_INT_NEXT); + + /* [... enum] */ + + if (res) { + duk_push_hstring(thr, res); + if (get_value) { + duk_push_hobject(thr, enum_target); + duk_dup_m2(thr); /* -> [... enum key enum_target key] */ + duk_get_prop(thr, -2); /* -> [... enum key enum_target val] */ + duk_remove_m2(thr); /* -> [... enum key val] */ + duk_remove(thr, -3); /* -> [... key val] */ + } else { + duk_remove_m2(thr); /* -> [... key] */ + } + return 1; + } else { + duk_pop(thr); /* -> [...] */ + return 0; + } +} + +/* + * Get enumerated keys in an ECMAScript array. Matches Object.keys() behavior + * described in E5 Section 15.2.3.14. + */ + +DUK_INTERNAL duk_ret_t duk_hobject_get_enumerated_keys(duk_hthread *thr, duk_small_uint_t enum_flags) { + duk_hobject *e; + duk_hstring **keys; + duk_tval *tv; + duk_uint_fast32_t count; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(duk_get_hobject(thr, -1) != NULL); + + /* Create a temporary enumerator to get the (non-duplicated) key list; + * the enumerator state is initialized without being needed, but that + * has little impact. + */ + + duk_hobject_enumerator_create(thr, enum_flags); + e = duk_known_hobject(thr, -1); + + /* [enum_target enum res] */ + + /* Create dense result array to exact size. */ + DUK_ASSERT(DUK_HOBJECT_GET_ENEXT(e) >= DUK__ENUM_START_INDEX); + count = (duk_uint32_t) (DUK_HOBJECT_GET_ENEXT(e) - DUK__ENUM_START_INDEX); + + /* XXX: uninit would be OK */ + tv = duk_push_harray_with_size_outptr(thr, (duk_uint32_t) count); + DUK_ASSERT(count == 0 || tv != NULL); + DUK_ASSERT(!duk_is_bare_object(thr, -1)); + + /* Fill result array, no side effects. */ + + keys = DUK_HOBJECT_E_GET_KEY_BASE(thr->heap, e); + keys += DUK__ENUM_START_INDEX; + + while (count-- > 0) { + duk_hstring *k; + + k = *keys++; + DUK_ASSERT(k != NULL); /* enumerator must have no keys deleted */ + + DUK_TVAL_SET_STRING(tv, k); + tv++; + DUK_HSTRING_INCREF(thr, k); + } + + /* [enum_target enum res] */ + duk_remove_m2(thr); + + /* [enum_target res] */ + + return 1; /* return 1 to allow callers to tail call */ +} + +/* automatic undefs */ +#undef DUK__ENUM_START_INDEX +#line 1 "duk_hobject_misc.c" +/* + * Misc support functions + */ + +/* #include duk_internal.h -> already included */ + +DUK_INTERNAL duk_bool_t duk_hobject_prototype_chain_contains(duk_hthread *thr, + duk_hobject *h, + duk_hobject *p, + duk_bool_t ignore_loop) { + duk_uint_t sanity; + + DUK_ASSERT(thr != NULL); + + /* False if the object is NULL or the prototype 'p' is NULL. + * In particular, false if both are NULL (don't compare equal). + */ + if (h == NULL || p == NULL) { + return 0; + } + + sanity = DUK_HOBJECT_PROTOTYPE_CHAIN_SANITY; + do { + if (h == p) { + return 1; + } + + if (sanity-- == 0) { + if (ignore_loop) { + break; + } else { + DUK_ERROR_RANGE(thr, DUK_STR_PROTOTYPE_CHAIN_LIMIT); + DUK_WO_NORETURN(return 0;); + } + } + h = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h); + } while (h); + + return 0; +} + +DUK_INTERNAL void duk_hobject_set_prototype_updref(duk_hthread *thr, duk_hobject *h, duk_hobject *p) { +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_hobject *tmp; + + DUK_ASSERT(h); + tmp = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h); + DUK_HOBJECT_SET_PROTOTYPE(thr->heap, h, p); + DUK_HOBJECT_INCREF_ALLOWNULL(thr, p); /* avoid problems if p == h->prototype */ + DUK_HOBJECT_DECREF_ALLOWNULL(thr, tmp); +#else + DUK_ASSERT(h); + DUK_UNREF(thr); + DUK_HOBJECT_SET_PROTOTYPE(thr->heap, h, p); +#endif +} +#line 1 "duk_hobject_pc2line.c" +/* + * Helpers for creating and querying pc2line debug data, which + * converts a bytecode program counter to a source line number. + * + * The run-time pc2line data is bit-packed, and documented in: + * + * doc/function-objects.rst + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_PC2LINE) + +/* Generate pc2line data for an instruction sequence, leaving a buffer on stack top. */ +DUK_INTERNAL void duk_hobject_pc2line_pack(duk_hthread *thr, duk_compiler_instr *instrs, duk_uint_fast32_t length) { + duk_hbuffer_dynamic *h_buf; + duk_bitencoder_ctx be_ctx_alloc; + duk_bitencoder_ctx *be_ctx = &be_ctx_alloc; + duk_uint32_t *hdr; + duk_size_t new_size; + duk_uint_fast32_t num_header_entries; + duk_uint_fast32_t curr_offset; + duk_int_fast32_t curr_line, next_line, diff_line; + duk_uint_fast32_t curr_pc; + duk_uint_fast32_t hdr_index; + + DUK_ASSERT(length <= DUK_COMPILER_MAX_BYTECODE_LENGTH); + + num_header_entries = (length + DUK_PC2LINE_SKIP - 1) / DUK_PC2LINE_SKIP; + curr_offset = (duk_uint_fast32_t) (sizeof(duk_uint32_t) + num_header_entries * sizeof(duk_uint32_t) * 2); + + duk_push_dynamic_buffer(thr, (duk_size_t) curr_offset); + h_buf = (duk_hbuffer_dynamic *) duk_known_hbuffer(thr, -1); + DUK_ASSERT(DUK_HBUFFER_HAS_DYNAMIC(h_buf) && !DUK_HBUFFER_HAS_EXTERNAL(h_buf)); + + hdr = (duk_uint32_t *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(thr->heap, h_buf); + DUK_ASSERT(hdr != NULL); + hdr[0] = (duk_uint32_t) length; /* valid pc range is [0, length[ */ + + curr_pc = 0U; + while (curr_pc < length) { + new_size = (duk_size_t) (curr_offset + DUK_PC2LINE_MAX_DIFF_LENGTH); + duk_hbuffer_resize(thr, h_buf, new_size); + + hdr = (duk_uint32_t *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(thr->heap, h_buf); + DUK_ASSERT(hdr != NULL); + DUK_ASSERT(curr_pc < length); + hdr_index = 1 + (curr_pc / DUK_PC2LINE_SKIP) * 2; + curr_line = (duk_int_fast32_t) instrs[curr_pc].line; + hdr[hdr_index + 0] = (duk_uint32_t) curr_line; + hdr[hdr_index + 1] = (duk_uint32_t) curr_offset; + +#if 0 + DUK_DDD(DUK_DDDPRINT("hdr[%ld]: pc=%ld line=%ld offset=%ld", + (long) (curr_pc / DUK_PC2LINE_SKIP), + (long) curr_pc, + (long) hdr[hdr_index + 0], + (long) hdr[hdr_index + 1])); +#endif + + duk_memzero(be_ctx, sizeof(*be_ctx)); + be_ctx->data = ((duk_uint8_t *) hdr) + curr_offset; + be_ctx->length = (duk_size_t) DUK_PC2LINE_MAX_DIFF_LENGTH; + + for (;;) { + curr_pc++; + if (((curr_pc % DUK_PC2LINE_SKIP) == 0) || /* end of diff run */ + (curr_pc >= length)) { /* end of bytecode */ + break; + } + DUK_ASSERT(curr_pc < length); + next_line = (duk_int32_t) instrs[curr_pc].line; + diff_line = next_line - curr_line; + +#if 0 + DUK_DDD(DUK_DDDPRINT("curr_line=%ld, next_line=%ld -> diff_line=%ld", + (long) curr_line, (long) next_line, (long) diff_line)); +#endif + + if (diff_line == 0) { + /* 0 */ + duk_be_encode(be_ctx, 0, 1); + } else if (diff_line >= 1 && diff_line <= 4) { + /* 1 0 <2 bits> */ + duk_be_encode(be_ctx, (duk_uint32_t) ((0x02 << 2) + (diff_line - 1)), 4); + } else if (diff_line >= -0x80 && diff_line <= 0x7f) { + /* 1 1 0 <8 bits> */ + DUK_ASSERT(diff_line + 0x80 >= 0 && diff_line + 0x80 <= 0xff); + duk_be_encode(be_ctx, (duk_uint32_t) ((0x06 << 8) + (diff_line + 0x80)), 11); + } else { + /* 1 1 1 <32 bits> + * Encode in two parts to avoid bitencode 24-bit limitation + */ + duk_be_encode(be_ctx, (duk_uint32_t) ((0x07 << 16) + ((next_line >> 16) & 0xffff)), 19); + duk_be_encode(be_ctx, (duk_uint32_t) (next_line & 0xffff), 16); + } + + curr_line = next_line; + } + + duk_be_finish(be_ctx); + DUK_ASSERT(!be_ctx->truncated); + + /* be_ctx->offset == length of encoded bitstream */ + curr_offset += (duk_uint_fast32_t) be_ctx->offset; + } + + /* compact */ + new_size = (duk_size_t) curr_offset; + duk_hbuffer_resize(thr, h_buf, new_size); + + (void) duk_to_fixed_buffer(thr, -1, NULL); + + DUK_DDD(DUK_DDDPRINT("final pc2line data: pc_limit=%ld, length=%ld, %lf bits/opcode --> %!ixT", + (long) length, + (long) new_size, + (double) new_size * 8.0 / (double) length, + (duk_tval *) duk_get_tval(thr, -1))); +} + +/* PC is unsigned. If caller does PC arithmetic and gets a negative result, + * it will map to a large PC which is out of bounds and causes a zero to be + * returned. + */ +DUK_LOCAL duk_uint_fast32_t duk__hobject_pc2line_query_raw(duk_hthread *thr, duk_hbuffer_fixed *buf, duk_uint_fast32_t pc) { + duk_bitdecoder_ctx bd_ctx_alloc; + duk_bitdecoder_ctx *bd_ctx = &bd_ctx_alloc; + duk_uint32_t *hdr; + duk_uint_fast32_t start_offset; + duk_uint_fast32_t pc_limit; + duk_uint_fast32_t hdr_index; + duk_uint_fast32_t pc_base; + duk_uint_fast32_t n; + duk_uint_fast32_t curr_line; + + DUK_ASSERT(buf != NULL); + DUK_ASSERT(!DUK_HBUFFER_HAS_DYNAMIC((duk_hbuffer *) buf) && !DUK_HBUFFER_HAS_EXTERNAL((duk_hbuffer *) buf)); + DUK_UNREF(thr); + + /* + * Use the index in the header to find the right starting point + */ + + hdr_index = pc / DUK_PC2LINE_SKIP; + pc_base = hdr_index * DUK_PC2LINE_SKIP; + n = pc - pc_base; + + if (DUK_HBUFFER_FIXED_GET_SIZE(buf) <= sizeof(duk_uint32_t)) { + DUK_DD(DUK_DDPRINT("pc2line lookup failed: buffer is smaller than minimal header")); + goto pc2line_error; + } + + hdr = (duk_uint32_t *) (void *) DUK_HBUFFER_FIXED_GET_DATA_PTR(thr->heap, buf); + pc_limit = hdr[0]; + if (pc >= pc_limit) { + /* Note: pc is unsigned and cannot be negative */ + DUK_DD(DUK_DDPRINT("pc2line lookup failed: pc out of bounds (pc=%ld, limit=%ld)", (long) pc, (long) pc_limit)); + goto pc2line_error; + } + + curr_line = hdr[1 + hdr_index * 2]; + start_offset = hdr[1 + hdr_index * 2 + 1]; + if ((duk_size_t) start_offset > DUK_HBUFFER_FIXED_GET_SIZE(buf)) { + DUK_DD(DUK_DDPRINT("pc2line lookup failed: start_offset out of bounds (start_offset=%ld, buffer_size=%ld)", + (long) start_offset, + (long) DUK_HBUFFER_GET_SIZE((duk_hbuffer *) buf))); + goto pc2line_error; + } + + /* + * Iterate the bitstream (line diffs) until PC is reached + */ + + duk_memzero(bd_ctx, sizeof(*bd_ctx)); + bd_ctx->data = ((duk_uint8_t *) hdr) + start_offset; + bd_ctx->length = (duk_size_t) (DUK_HBUFFER_FIXED_GET_SIZE(buf) - start_offset); + +#if 0 + DUK_DDD(DUK_DDDPRINT("pc2line lookup: pc=%ld -> hdr_index=%ld, pc_base=%ld, n=%ld, start_offset=%ld", + (long) pc, (long) hdr_index, (long) pc_base, (long) n, (long) start_offset)); +#endif + + while (n > 0) { +#if 0 + DUK_DDD(DUK_DDDPRINT("lookup: n=%ld, curr_line=%ld", (long) n, (long) curr_line)); +#endif + + if (duk_bd_decode_flag(bd_ctx)) { + if (duk_bd_decode_flag(bd_ctx)) { + if (duk_bd_decode_flag(bd_ctx)) { + /* 1 1 1 <32 bits> */ + duk_uint_fast32_t t; + t = duk_bd_decode(bd_ctx, 16); /* workaround: max nbits = 24 now */ + t = (t << 16) + duk_bd_decode(bd_ctx, 16); + curr_line = t; + } else { + /* 1 1 0 <8 bits> */ + duk_uint_fast32_t t; + t = duk_bd_decode(bd_ctx, 8); + curr_line = curr_line + t - 0x80; + } + } else { + /* 1 0 <2 bits> */ + duk_uint_fast32_t t; + t = duk_bd_decode(bd_ctx, 2); + curr_line = curr_line + t + 1; + } + } else { + /* 0: no change */ + } + + n--; + } + + DUK_DDD(DUK_DDDPRINT("pc2line lookup result: pc %ld -> line %ld", (long) pc, (long) curr_line)); + return curr_line; + +pc2line_error: + DUK_D(DUK_DPRINT("pc2line conversion failed for pc=%ld", (long) pc)); + return 0; +} + +DUK_INTERNAL duk_uint_fast32_t duk_hobject_pc2line_query(duk_hthread *thr, duk_idx_t idx_func, duk_uint_fast32_t pc) { + duk_hbuffer_fixed *pc2line; + duk_uint_fast32_t line; + + /* XXX: now that pc2line is used by the debugger quite heavily in + * checked execution, this should be optimized to avoid value stack + * and perhaps also implement some form of pc2line caching (see + * future work in debugger.rst). + */ + + duk_xget_owndataprop_stridx_short(thr, idx_func, DUK_STRIDX_INT_PC2LINE); + pc2line = (duk_hbuffer_fixed *) (void *) duk_get_hbuffer(thr, -1); + if (pc2line != NULL) { + DUK_ASSERT(!DUK_HBUFFER_HAS_DYNAMIC((duk_hbuffer *) pc2line) && !DUK_HBUFFER_HAS_EXTERNAL((duk_hbuffer *) pc2line)); + line = duk__hobject_pc2line_query_raw(thr, pc2line, (duk_uint_fast32_t) pc); + } else { + line = 0; + } + duk_pop(thr); + + return line; +} + +#endif /* DUK_USE_PC2LINE */ +#line 1 "duk_hobject_props.c" +/* + * duk_hobject property access functionality. + * + * This is very central functionality for size, performance, and compliance. + * It is also rather intricate; see hobject-algorithms.rst for discussion on + * the algorithms and memory-management.rst for discussion on refcounts and + * side effect issues. + * + * Notes: + * + * - It might be tempting to assert "refcount nonzero" for objects + * being operated on, but that's not always correct: objects with + * a zero refcount may be operated on by the refcount implementation + * (finalization) for instance. Hence, no refcount assertions are made. + * + * - Many operations (memory allocation, identifier operations, etc) + * may cause arbitrary side effects (e.g. through GC and finalization). + * These side effects may invalidate duk_tval pointers which point to + * areas subject to reallocation (like value stack). Heap objects + * themselves have stable pointers. Holding heap object pointers or + * duk_tval copies is not problematic with respect to side effects; + * care must be taken when holding and using argument duk_tval pointers. + * + * - If a finalizer is executed, it may operate on the the same object + * we're currently dealing with. For instance, the finalizer might + * delete a certain property which has already been looked up and + * confirmed to exist. Ideally finalizers would be disabled if GC + * happens during property access. At the moment property table realloc + * disables finalizers, and all DECREFs may cause arbitrary changes so + * handle DECREF carefully. + * + * - The order of operations for a DECREF matters. When DECREF is executed, + * the entire object graph must be consistent; note that a refzero may + * lead to a mark-and-sweep through a refcount finalizer. Use NORZ macros + * and an explicit DUK_REFZERO_CHECK_xxx() if achieving correct order is hard. + */ + +/* + * XXX: array indices are mostly typed as duk_uint32_t here; duk_uarridx_t + * might be more appropriate. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Local defines + */ + +#define DUK__NO_ARRAY_INDEX DUK_HSTRING_NO_ARRAY_INDEX + +/* Marker values for hash part. */ +#define DUK__HASH_UNUSED DUK_HOBJECT_HASHIDX_UNUSED +#define DUK__HASH_DELETED DUK_HOBJECT_HASHIDX_DELETED + +/* Valstack space that suffices for all local calls, excluding any recursion + * into ECMAScript or Duktape/C calls (Proxy, getters, etc). + */ +#define DUK__VALSTACK_SPACE 10 + +/* Valstack space allocated especially for proxy lookup which does a + * recursive property lookup. + */ +#define DUK__VALSTACK_PROXY_LOOKUP 20 + +/* + * Local prototypes + */ + +DUK_LOCAL_DECL duk_bool_t duk__check_arguments_map_for_get(duk_hthread *thr, + duk_hobject *obj, + duk_hstring *key, + duk_propdesc *temp_desc); +DUK_LOCAL_DECL void duk__check_arguments_map_for_put(duk_hthread *thr, + duk_hobject *obj, + duk_hstring *key, + duk_propdesc *temp_desc, + duk_bool_t throw_flag); +DUK_LOCAL_DECL void duk__check_arguments_map_for_delete(duk_hthread *thr, + duk_hobject *obj, + duk_hstring *key, + duk_propdesc *temp_desc); + +DUK_LOCAL_DECL duk_bool_t duk__handle_put_array_length_smaller(duk_hthread *thr, + duk_hobject *obj, + duk_uint32_t old_len, + duk_uint32_t new_len, + duk_bool_t force_flag, + duk_uint32_t *out_result_len); +DUK_LOCAL_DECL duk_bool_t duk__handle_put_array_length(duk_hthread *thr, duk_hobject *obj); + +DUK_LOCAL_DECL duk_bool_t +duk__get_propdesc(duk_hthread *thr, duk_hobject *obj, duk_hstring *key, duk_propdesc *out_desc, duk_small_uint_t flags); +DUK_LOCAL_DECL duk_bool_t duk__get_own_propdesc_raw(duk_hthread *thr, + duk_hobject *obj, + duk_hstring *key, + duk_uint32_t arr_idx, + duk_propdesc *out_desc, + duk_small_uint_t flags); + +DUK_LOCAL_DECL void duk__abandon_array_part(duk_hthread *thr, duk_hobject *obj); +DUK_LOCAL_DECL void duk__grow_props_for_array_item(duk_hthread *thr, duk_hobject *obj, duk_uint32_t highest_arr_idx); + +/* + * Misc helpers + */ + +/* Convert a duk_tval number (caller checks) to a 32-bit index. Returns + * DUK__NO_ARRAY_INDEX if the number is not whole or not a valid array + * index. + */ +/* XXX: for fastints, could use a variant which assumes a double duk_tval + * (and doesn't need to check for fastint again). + */ +DUK_LOCAL duk_uint32_t duk__tval_number_to_arr_idx(duk_tval *tv) { + duk_double_t dbl; + duk_uint32_t idx; + + DUK_ASSERT(tv != NULL); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + + /* -0 is accepted here as index 0 because ToString(-0) == "0" which is + * in canonical form and thus an array index. + */ + dbl = DUK_TVAL_GET_NUMBER(tv); + idx = (duk_uint32_t) dbl; + if (duk_double_equals((duk_double_t) idx, dbl)) { + /* Is whole and within 32 bit range. If the value happens to be 0xFFFFFFFF, + * it's not a valid array index but will then match DUK__NO_ARRAY_INDEX. + */ + return idx; + } + return DUK__NO_ARRAY_INDEX; +} + +#if defined(DUK_USE_FASTINT) +/* Convert a duk_tval fastint (caller checks) to a 32-bit index. */ +DUK_LOCAL duk_uint32_t duk__tval_fastint_to_arr_idx(duk_tval *tv) { + duk_int64_t t; + + DUK_ASSERT(tv != NULL); + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv)); + + t = DUK_TVAL_GET_FASTINT(tv); + if (((duk_uint64_t) t & ~DUK_U64_CONSTANT(0xffffffff)) != 0) { + /* Catches >0x100000000 and negative values. */ + return DUK__NO_ARRAY_INDEX; + } + + /* If the value happens to be 0xFFFFFFFF, it's not a valid array index + * but will then match DUK__NO_ARRAY_INDEX. + */ + return (duk_uint32_t) t; +} +#endif /* DUK_USE_FASTINT */ + +/* Convert a duk_tval on the value stack (in a trusted index we don't validate) + * to a string or symbol using ES2015 ToPropertyKey(): + * http://www.ecma-international.org/ecma-262/6.0/#sec-topropertykey. + * + * Also check if it's a valid array index and return that (or DUK__NO_ARRAY_INDEX + * if not). + */ +DUK_LOCAL duk_uint32_t duk__to_property_key(duk_hthread *thr, duk_idx_t idx, duk_hstring **out_h) { + duk_uint32_t arr_idx; + duk_hstring *h; + duk_tval *tv_dst; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(out_h != NULL); + DUK_ASSERT(duk_is_valid_index(thr, idx)); + DUK_ASSERT(idx < 0); + + /* XXX: The revised ES2015 ToPropertyKey() handling (ES5.1 was just + * ToString()) involves a ToPrimitive(), a symbol check, and finally + * a ToString(). Figure out the best way to have a good fast path + * but still be compliant and share code. + */ + + tv_dst = DUK_GET_TVAL_NEGIDX(thr, idx); /* intentionally unvalidated */ + if (DUK_TVAL_IS_STRING(tv_dst)) { + /* Most important path: strings and plain symbols are used as + * is. For symbols the array index check below is unnecessary + * (they're never valid array indices) but checking that the + * string is a symbol would make the plain string path slower + * unnecessarily. + */ + h = DUK_TVAL_GET_STRING(tv_dst); + } else { + h = duk_to_property_key_hstring(thr, idx); + } + DUK_ASSERT(h != NULL); + *out_h = h; + + arr_idx = DUK_HSTRING_GET_ARRIDX_FAST(h); + return arr_idx; +} + +DUK_LOCAL duk_uint32_t duk__push_tval_to_property_key(duk_hthread *thr, duk_tval *tv_key, duk_hstring **out_h) { + duk_push_tval(thr, tv_key); /* XXX: could use an unsafe push here */ + return duk__to_property_key(thr, -1, out_h); +} + +/* String is an own (virtual) property of a plain buffer. */ +DUK_LOCAL duk_bool_t duk__key_is_plain_buf_ownprop(duk_hthread *thr, duk_hbuffer *buf, duk_hstring *key, duk_uint32_t arr_idx) { + DUK_UNREF(thr); + + /* Virtual index properties. Checking explicitly for + * 'arr_idx != DUK__NO_ARRAY_INDEX' is not necessary + * because DUK__NO_ARRAY_INDEXi is always larger than + * maximum allowed buffer size. + */ + DUK_ASSERT(DUK__NO_ARRAY_INDEX >= DUK_HBUFFER_GET_SIZE(buf)); + if (arr_idx < DUK_HBUFFER_GET_SIZE(buf)) { + return 1; + } + + /* Other virtual properties. */ + return (key == DUK_HTHREAD_STRING_LENGTH(thr)); +} + +/* + * Helpers for managing property storage size + */ + +/* Get default hash part size for a certain entry part size. */ +#if defined(DUK_USE_HOBJECT_HASH_PART) +DUK_LOCAL duk_uint32_t duk__get_default_h_size(duk_uint32_t e_size) { + DUK_ASSERT(e_size <= DUK_HOBJECT_MAX_PROPERTIES); + + if (e_size >= DUK_USE_HOBJECT_HASH_PROP_LIMIT) { + duk_uint32_t res; + duk_uint32_t tmp; + + /* Hash size should be 2^N where N is chosen so that 2^N is + * larger than e_size. Extra shifting is used to ensure hash + * is relatively sparse. + */ + tmp = e_size; + res = 2; /* Result will be 2 ** (N + 1). */ + while (tmp >= 0x40) { + tmp >>= 6; + res <<= 6; + } + while (tmp != 0) { + tmp >>= 1; + res <<= 1; + } + DUK_ASSERT((DUK_HOBJECT_MAX_PROPERTIES << 2U) > DUK_HOBJECT_MAX_PROPERTIES); /* Won't wrap, even shifted by 2. */ + DUK_ASSERT(res > e_size); + return res; + } else { + return 0; + } +} +#endif /* USE_PROP_HASH_PART */ + +/* Get minimum entry part growth for a certain size. */ +DUK_LOCAL duk_uint32_t duk__get_min_grow_e(duk_uint32_t e_size) { + duk_uint32_t res; + + res = (e_size + DUK_USE_HOBJECT_ENTRY_MINGROW_ADD) / DUK_USE_HOBJECT_ENTRY_MINGROW_DIVISOR; + DUK_ASSERT(res >= 1); /* important for callers */ + return res; +} + +/* Get minimum array part growth for a certain size. */ +DUK_LOCAL duk_uint32_t duk__get_min_grow_a(duk_uint32_t a_size) { + duk_uint32_t res; + + res = (a_size + DUK_USE_HOBJECT_ARRAY_MINGROW_ADD) / DUK_USE_HOBJECT_ARRAY_MINGROW_DIVISOR; + DUK_ASSERT(res >= 1); /* important for callers */ + return res; +} + +/* Count actually used entry part entries (non-NULL keys). */ +DUK_LOCAL duk_uint32_t duk__count_used_e_keys(duk_hthread *thr, duk_hobject *obj) { + duk_uint_fast32_t i; + duk_uint_fast32_t n = 0; + duk_hstring **e; + + DUK_ASSERT(obj != NULL); + DUK_UNREF(thr); + + e = DUK_HOBJECT_E_GET_KEY_BASE(thr->heap, obj); + for (i = 0; i < DUK_HOBJECT_GET_ENEXT(obj); i++) { + if (*e++) { + n++; + } + } + return (duk_uint32_t) n; +} + +/* Count actually used array part entries and array minimum size. + * NOTE: 'out_min_size' can be computed much faster by starting from the + * end and breaking out early when finding first used entry, but this is + * not needed now. + */ +DUK_LOCAL void duk__compute_a_stats(duk_hthread *thr, duk_hobject *obj, duk_uint32_t *out_used, duk_uint32_t *out_min_size) { + duk_uint_fast32_t i; + duk_uint_fast32_t used = 0; + duk_uint_fast32_t highest_idx = (duk_uint_fast32_t) -1; /* see below */ + duk_tval *a; + + DUK_ASSERT(obj != NULL); + DUK_ASSERT(out_used != NULL); + DUK_ASSERT(out_min_size != NULL); + DUK_UNREF(thr); + + a = DUK_HOBJECT_A_GET_BASE(thr->heap, obj); + for (i = 0; i < DUK_HOBJECT_GET_ASIZE(obj); i++) { + duk_tval *tv = a++; + if (!DUK_TVAL_IS_UNUSED(tv)) { + used++; + highest_idx = i; + } + } + + /* Initial value for highest_idx is -1 coerced to unsigned. This + * is a bit odd, but (highest_idx + 1) will then wrap to 0 below + * for out_min_size as intended. + */ + + *out_used = (duk_uint32_t) used; + *out_min_size = (duk_uint32_t) (highest_idx + 1); /* 0 if no used entries */ +} + +/* Check array density and indicate whether or not the array part should be abandoned. */ +DUK_LOCAL duk_bool_t duk__abandon_array_density_check(duk_uint32_t a_used, duk_uint32_t a_size) { + /* + * Array abandon check; abandon if: + * + * new_used / new_size < limit + * new_used < limit * new_size || limit is 3 bits fixed point + * new_used < limit' / 8 * new_size || *8 + * 8*new_used < limit' * new_size || :8 + * new_used < limit' * (new_size / 8) + * + * Here, new_used = a_used, new_size = a_size. + * + * Note: some callers use approximate values for a_used and/or a_size + * (e.g. dropping a '+1' term). This doesn't affect the usefulness + * of the check, but may confuse debugging. + */ + + return (a_used < DUK_USE_HOBJECT_ARRAY_ABANDON_LIMIT * (a_size >> 3)); +} + +/* Fast check for extending array: check whether or not a slow density check is required. */ +DUK_LOCAL duk_bool_t duk__abandon_array_slow_check_required(duk_uint32_t arr_idx, duk_uint32_t old_size) { + duk_uint32_t new_size_min; + + /* + * In a fast check we assume old_size equals old_used (i.e., existing + * array is fully dense). + * + * Slow check if: + * + * (new_size - old_size) / old_size > limit + * new_size - old_size > limit * old_size + * new_size > (1 + limit) * old_size || limit' is 3 bits fixed point + * new_size > (1 + (limit' / 8)) * old_size || * 8 + * 8 * new_size > (8 + limit') * old_size || : 8 + * new_size > (8 + limit') * (old_size / 8) + * new_size > limit'' * (old_size / 8) || limit'' = 9 -> max 25% increase + * arr_idx + 1 > limit'' * (old_size / 8) + * + * This check doesn't work well for small values, so old_size is rounded + * up for the check (and the '+ 1' of arr_idx can be ignored in practice): + * + * arr_idx > limit'' * ((old_size + 7) / 8) + */ + + new_size_min = arr_idx + 1; + return (new_size_min >= DUK_USE_HOBJECT_ARRAY_ABANDON_MINSIZE) && + (arr_idx > DUK_USE_HOBJECT_ARRAY_FAST_RESIZE_LIMIT * ((old_size + 7) >> 3)); +} + +DUK_LOCAL duk_bool_t duk__abandon_array_check(duk_hthread *thr, duk_uint32_t arr_idx, duk_hobject *obj) { + duk_uint32_t min_size; + duk_uint32_t old_used; + duk_uint32_t old_size; + + if (!duk__abandon_array_slow_check_required(arr_idx, DUK_HOBJECT_GET_ASIZE(obj))) { + DUK_DDD(DUK_DDDPRINT("=> fast resize is OK")); + return 0; + } + + duk__compute_a_stats(thr, obj, &old_used, &old_size); + + DUK_DDD(DUK_DDDPRINT("abandon check, array stats: old_used=%ld, old_size=%ld, arr_idx=%ld", + (long) old_used, + (long) old_size, + (long) arr_idx)); + + min_size = arr_idx + 1; +#if defined(DUK_USE_OBJSIZES16) + if (min_size > DUK_UINT16_MAX) { + goto do_abandon; + } +#endif + DUK_UNREF(min_size); + + /* Note: intentionally use approximations to shave a few instructions: + * a_used = old_used (accurate: old_used + 1) + * a_size = arr_idx (accurate: arr_idx + 1) + */ + if (duk__abandon_array_density_check(old_used, arr_idx)) { + DUK_DD(DUK_DDPRINT("write to new array entry beyond current length, " + "decided to abandon array part (would become too sparse)")); + + /* Abandoning requires a props allocation resize and + * 'rechecks' the valstack, invalidating any existing + * valstack value pointers. + */ + goto do_abandon; + } + + DUK_DDD(DUK_DDDPRINT("=> decided to keep array part")); + return 0; + +do_abandon: + duk__abandon_array_part(thr, obj); + DUK_ASSERT(!DUK_HOBJECT_HAS_ARRAY_PART(obj)); + return 1; +} + +DUK_LOCAL duk_tval *duk__obtain_arridx_slot_slowpath(duk_hthread *thr, duk_uint32_t arr_idx, duk_hobject *obj) { + /* + * Array needs to grow, but we don't want it becoming too sparse. + * If it were to become sparse, abandon array part, moving all + * array entries into the entries part (for good). + * + * Since we don't keep track of actual density (used vs. size) of + * the array part, we need to estimate somehow. The check is made + * in two parts: + * + * - Check whether the resize need is small compared to the + * current size (relatively); if so, resize without further + * checking (essentially we assume that the original part is + * "dense" so that the result would be dense enough). + * + * - Otherwise, compute the resize using an actual density + * measurement based on counting the used array entries. + */ + + DUK_DDD(DUK_DDDPRINT("write to new array requires array resize, decide whether to do a " + "fast resize without abandon check (arr_idx=%ld, old_size=%ld)", + (long) arr_idx, + (long) DUK_HOBJECT_GET_ASIZE(obj))); + + if (DUK_UNLIKELY(duk__abandon_array_check(thr, arr_idx, obj) != 0)) { + DUK_ASSERT(!DUK_HOBJECT_HAS_ARRAY_PART(obj)); + return NULL; + } + + DUK_DD(DUK_DDPRINT("write to new array entry beyond current length, " + "decided to extend current allocation")); + + /* In principle it's possible to run out of memory extending the + * array but with the allocation going through if we were to abandon + * the array part and try again. In practice this should be rare + * because abandoned arrays have a higher per-entry footprint. + */ + + duk__grow_props_for_array_item(thr, obj, arr_idx); + + DUK_ASSERT(DUK_HOBJECT_HAS_ARRAY_PART(obj)); + DUK_ASSERT(arr_idx < DUK_HOBJECT_GET_ASIZE(obj)); + return DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, arr_idx); +} + +DUK_LOCAL DUK_INLINE duk_tval *duk__obtain_arridx_slot(duk_hthread *thr, duk_uint32_t arr_idx, duk_hobject *obj) { + if (DUK_LIKELY(arr_idx < DUK_HOBJECT_GET_ASIZE(obj))) { + return DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, arr_idx); + } else { + return duk__obtain_arridx_slot_slowpath(thr, arr_idx, obj); + } +} + +/* + * Proxy helpers + */ + +#if defined(DUK_USE_ES6_PROXY) +DUK_INTERNAL duk_bool_t duk_hobject_proxy_check(duk_hobject *obj, duk_hobject **out_target, duk_hobject **out_handler) { + duk_hproxy *h_proxy; + + DUK_ASSERT(obj != NULL); + DUK_ASSERT(out_target != NULL); + DUK_ASSERT(out_handler != NULL); + + /* Caller doesn't need to check exotic proxy behavior (but does so for + * some fast paths). + */ + if (DUK_LIKELY(!DUK_HOBJECT_IS_PROXY(obj))) { + return 0; + } + h_proxy = (duk_hproxy *) obj; + DUK_HPROXY_ASSERT_VALID(h_proxy); + + DUK_ASSERT(h_proxy->handler != NULL); + DUK_ASSERT(h_proxy->target != NULL); + *out_handler = h_proxy->handler; + *out_target = h_proxy->target; + + return 1; +} +#endif /* DUK_USE_ES6_PROXY */ + +/* Get Proxy target object. If the argument is not a Proxy, return it as is. + * If a Proxy is revoked, an error is thrown. + */ +#if defined(DUK_USE_ES6_PROXY) +DUK_INTERNAL duk_hobject *duk_hobject_resolve_proxy_target(duk_hobject *obj) { + DUK_ASSERT(obj != NULL); + + /* Resolve Proxy targets until Proxy chain ends. No explicit check for + * a Proxy loop: user code cannot create such a loop (it would only be + * possible by editing duk_hproxy references directly). + */ + + while (DUK_HOBJECT_IS_PROXY(obj)) { + duk_hproxy *h_proxy; + + h_proxy = (duk_hproxy *) obj; + DUK_HPROXY_ASSERT_VALID(h_proxy); + obj = h_proxy->target; + DUK_ASSERT(obj != NULL); + } + + DUK_ASSERT(obj != NULL); + return obj; +} +#endif /* DUK_USE_ES6_PROXY */ + +#if defined(DUK_USE_ES6_PROXY) +DUK_LOCAL duk_bool_t duk__proxy_check_prop(duk_hthread *thr, + duk_hobject *obj, + duk_small_uint_t stridx_trap, + duk_tval *tv_key, + duk_hobject **out_target) { + duk_hobject *h_handler; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(tv_key != NULL); + DUK_ASSERT(out_target != NULL); + + if (!duk_hobject_proxy_check(obj, out_target, &h_handler)) { + return 0; + } + DUK_ASSERT(*out_target != NULL); + DUK_ASSERT(h_handler != NULL); + + /* XXX: At the moment Duktape accesses internal keys like _Finalizer using a + * normal property set/get which would allow a proxy handler to interfere with + * such behavior and to get access to internal key strings. This is not a problem + * as such because internal key strings can be created in other ways too (e.g. + * through buffers). The best fix is to change Duktape internal lookups to + * skip proxy behavior. Until that, internal property accesses bypass the + * proxy and are applied to the target (as if the handler did not exist). + * This has some side effects, see test-bi-proxy-internal-keys.js. + */ + + if (DUK_TVAL_IS_STRING(tv_key)) { + duk_hstring *h_key = (duk_hstring *) DUK_TVAL_GET_STRING(tv_key); + DUK_ASSERT(h_key != NULL); + if (DUK_HSTRING_HAS_HIDDEN(h_key)) { + /* Symbol accesses must go through proxy lookup in ES2015. + * Hidden symbols behave like Duktape 1.x internal keys + * and currently won't. + */ + DUK_DDD(DUK_DDDPRINT("hidden key, skip proxy handler and apply to target")); + return 0; + } + } + + /* The handler is looked up with a normal property lookup; it may be an + * accessor or the handler object itself may be a proxy object. If the + * handler is a proxy, we need to extend the valstack as we make a + * recursive proxy check without a function call in between (in fact + * there is no limit to the potential recursion here). + * + * (For sanity, proxy creation rejects another proxy object as either + * the handler or the target at the moment so recursive proxy cases + * are not realized now.) + */ + + /* XXX: C recursion limit if proxies are allowed as handler/target values */ + + duk_require_stack(thr, DUK__VALSTACK_PROXY_LOOKUP); + duk_push_hobject(thr, h_handler); + if (duk_get_prop_stridx_short(thr, -1, stridx_trap)) { + /* -> [ ... handler trap ] */ + duk_insert(thr, -2); /* -> [ ... trap handler ] */ + + /* stack prepped for func call: [ ... trap handler ] */ + return 1; + } else { + duk_pop_2_unsafe(thr); + return 0; + } +} +#endif /* DUK_USE_ES6_PROXY */ + +/* + * Reallocate property allocation, moving properties to the new allocation. + * + * Includes key compaction, rehashing, and can also optionally abandon + * the array part, 'migrating' array entries into the beginning of the + * new entry part. + * + * There is no support for in-place reallocation or just compacting keys + * without resizing the property allocation. This is intentional to keep + * code size minimal, but would be useful future work. + * + * The implementation is relatively straightforward, except for the array + * abandonment process. Array abandonment requires that new string keys + * are interned, which may trigger GC. All keys interned so far must be + * reachable for GC at all times and correctly refcounted for; valstack is + * used for that now. + * + * Also, a GC triggered during this reallocation process must not interfere + * with the object being resized. This is currently controlled by preventing + * finalizers (as they may affect ANY object) and object compaction in + * mark-and-sweep. It would suffice to protect only this particular object + * from compaction, however. DECREF refzero cascades are side effect free + * and OK. + * + * Note: because we need to potentially resize the valstack (as part + * of abandoning the array part), any tval pointers to the valstack + * will become invalid after this call. + */ + +DUK_INTERNAL void duk_hobject_realloc_props(duk_hthread *thr, + duk_hobject *obj, + duk_uint32_t new_e_size, + duk_uint32_t new_a_size, + duk_uint32_t new_h_size, + duk_bool_t abandon_array) { + duk_small_uint_t prev_ms_base_flags; + duk_uint32_t new_alloc_size; + duk_uint32_t new_e_size_adjusted; + duk_uint8_t *new_p; + duk_hstring **new_e_k; + duk_propvalue *new_e_pv; + duk_uint8_t *new_e_f; + duk_tval *new_a; + duk_uint32_t *new_h; + duk_uint32_t new_e_next; + duk_uint_fast32_t i; + duk_size_t array_copy_size; +#if defined(DUK_USE_ASSERTIONS) + duk_bool_t prev_error_not_allowed; +#endif + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(!abandon_array || new_a_size == 0); /* if abandon_array, new_a_size must be 0 */ + DUK_ASSERT(DUK_HOBJECT_GET_PROPS(thr->heap, obj) != NULL || + (DUK_HOBJECT_GET_ESIZE(obj) == 0 && DUK_HOBJECT_GET_ASIZE(obj) == 0)); + DUK_ASSERT(new_h_size == 0 || new_h_size >= new_e_size); /* required to guarantee success of rehashing, + * intentionally use unadjusted new_e_size + */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)); + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + DUK_STATS_INC(thr->heap, stats_object_realloc_props); + + /* + * Pre resize assertions. + */ + +#if defined(DUK_USE_ASSERTIONS) + /* XXX: pre-checks (such as no duplicate keys) */ +#endif + + /* + * For property layout 1, tweak e_size to ensure that the whole entry + * part (key + val + flags) is a suitable multiple for alignment + * (platform specific). + * + * Property layout 2 does not require this tweaking and is preferred + * on low RAM platforms requiring alignment. + */ + +#if defined(DUK_USE_HOBJECT_LAYOUT_2) || defined(DUK_USE_HOBJECT_LAYOUT_3) + DUK_DDD(DUK_DDDPRINT("using layout 2 or 3, no need to pad e_size: %ld", (long) new_e_size)); + new_e_size_adjusted = new_e_size; +#elif defined(DUK_USE_HOBJECT_LAYOUT_1) && (DUK_HOBJECT_ALIGN_TARGET == 1) + DUK_DDD(DUK_DDDPRINT("using layout 1, but no need to pad e_size: %ld", (long) new_e_size)); + new_e_size_adjusted = new_e_size; +#elif defined(DUK_USE_HOBJECT_LAYOUT_1) && ((DUK_HOBJECT_ALIGN_TARGET == 4) || (DUK_HOBJECT_ALIGN_TARGET == 8)) + new_e_size_adjusted = + (new_e_size + (duk_uint32_t) DUK_HOBJECT_ALIGN_TARGET - 1U) & (~((duk_uint32_t) DUK_HOBJECT_ALIGN_TARGET - 1U)); + DUK_DDD(DUK_DDDPRINT("using layout 1, and alignment target is %ld, adjusted e_size: %ld -> %ld", + (long) DUK_HOBJECT_ALIGN_TARGET, + (long) new_e_size, + (long) new_e_size_adjusted)); + DUK_ASSERT(new_e_size_adjusted >= new_e_size); +#else +#error invalid hobject layout defines +#endif + + /* + * Debug logging after adjustment. + */ + + DUK_DDD(DUK_DDDPRINT( + "attempt to resize hobject %p props (%ld -> %ld bytes), from {p=%p,e_size=%ld,e_next=%ld,a_size=%ld,h_size=%ld} to " + "{e_size=%ld,a_size=%ld,h_size=%ld}, abandon_array=%ld, unadjusted new_e_size=%ld", + (void *) obj, + (long) DUK_HOBJECT_P_COMPUTE_SIZE(DUK_HOBJECT_GET_ESIZE(obj), DUK_HOBJECT_GET_ASIZE(obj), DUK_HOBJECT_GET_HSIZE(obj)), + (long) DUK_HOBJECT_P_COMPUTE_SIZE(new_e_size_adjusted, new_a_size, new_h_size), + (void *) DUK_HOBJECT_GET_PROPS(thr->heap, obj), + (long) DUK_HOBJECT_GET_ESIZE(obj), + (long) DUK_HOBJECT_GET_ENEXT(obj), + (long) DUK_HOBJECT_GET_ASIZE(obj), + (long) DUK_HOBJECT_GET_HSIZE(obj), + (long) new_e_size_adjusted, + (long) new_a_size, + (long) new_h_size, + (long) abandon_array, + (long) new_e_size)); + + /* + * Property count check. This is the only point where we ensure that + * we don't get more (allocated) property space that we can handle. + * There aren't hard limits as such, but some algorithms may fail + * if we get too close to the 4G property limit. + * + * Since this works based on allocation size (not actually used size), + * the limit is a bit approximate but good enough in practice. + */ + + if (new_e_size_adjusted + new_a_size > DUK_HOBJECT_MAX_PROPERTIES) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return;); + } +#if defined(DUK_USE_OBJSIZES16) + if (new_e_size_adjusted > DUK_UINT16_MAX || new_a_size > DUK_UINT16_MAX) { + /* If caller gave us sizes larger than what we can store, + * fail memory safely with an internal error rather than + * truncating the sizes. + */ + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return;); + } +#endif + + /* + * Compute new alloc size and alloc new area. + * + * The new area is not tracked in the heap at all, so it's critical + * we get to free/keep it in a controlled manner. + */ + +#if defined(DUK_USE_ASSERTIONS) + /* Whole path must be error throw free, but we may be called from + * within error handling so can't assert for error_not_allowed == 0. + */ + prev_error_not_allowed = thr->heap->error_not_allowed; + thr->heap->error_not_allowed = 1; +#endif + prev_ms_base_flags = thr->heap->ms_base_flags; + thr->heap->ms_base_flags |= + DUK_MS_FLAG_NO_OBJECT_COMPACTION; /* Avoid attempt to compact the current object (all objects really). */ + thr->heap->pf_prevent_count++; /* Avoid finalizers. */ + DUK_ASSERT(thr->heap->pf_prevent_count != 0); /* Wrap. */ + + new_alloc_size = DUK_HOBJECT_P_COMPUTE_SIZE(new_e_size_adjusted, new_a_size, new_h_size); + DUK_DDD(DUK_DDDPRINT("new hobject allocation size is %ld", (long) new_alloc_size)); + if (new_alloc_size == 0) { + DUK_ASSERT(new_e_size_adjusted == 0); + DUK_ASSERT(new_a_size == 0); + DUK_ASSERT(new_h_size == 0); + new_p = NULL; + } else { + /* Alloc may trigger mark-and-sweep but no compaction, and + * cannot throw. + */ +#if 0 /* XXX: inject test */ + if (1) { + new_p = NULL; + goto alloc_failed; + } +#endif + new_p = (duk_uint8_t *) DUK_ALLOC(thr->heap, new_alloc_size); + if (new_p == NULL) { + /* NULL always indicates alloc failure because + * new_alloc_size > 0. + */ + goto alloc_failed; + } + } + + /* Set up pointers to the new property area: this is hidden behind a macro + * because it is memory layout specific. + */ + DUK_HOBJECT_P_SET_REALLOC_PTRS(new_p, + new_e_k, + new_e_pv, + new_e_f, + new_a, + new_h, + new_e_size_adjusted, + new_a_size, + new_h_size); + DUK_UNREF(new_h); /* happens when hash part dropped */ + new_e_next = 0; + + /* if new_p == NULL, all of these pointers are NULL */ + DUK_ASSERT((new_p != NULL) || (new_e_k == NULL && new_e_pv == NULL && new_e_f == NULL && new_a == NULL && new_h == NULL)); + + DUK_DDD(DUK_DDDPRINT("new alloc size %ld, new_e_k=%p, new_e_pv=%p, new_e_f=%p, new_a=%p, new_h=%p", + (long) new_alloc_size, + (void *) new_e_k, + (void *) new_e_pv, + (void *) new_e_f, + (void *) new_a, + (void *) new_h)); + + /* + * Migrate array part to start of entries if requested. + * + * Note: from an enumeration perspective the order of entry keys matters. + * Array keys should appear wherever they appeared before the array abandon + * operation. (This no longer matters much because keys are ES2015 sorted.) + */ + + if (abandon_array) { + /* Assuming new_a_size == 0, and that entry part contains + * no conflicting keys, refcounts do not need to be adjusted for + * the values, as they remain exactly the same. + * + * The keys, however, need to be interned, incref'd, and be + * reachable for GC. Any intern attempt may trigger a GC and + * claim any non-reachable strings, so every key must be reachable + * at all times. Refcounts must be correct to satisfy refcount + * assertions. + * + * A longjmp must not occur here, as the new_p allocation would + * leak. Refcounts would come out correctly as the interned + * strings are valstack tracked. + */ + DUK_ASSERT(new_a_size == 0); + + DUK_STATS_INC(thr->heap, stats_object_abandon_array); + + for (i = 0; i < DUK_HOBJECT_GET_ASIZE(obj); i++) { + duk_tval *tv1; + duk_tval *tv2; + duk_hstring *key; + + DUK_ASSERT(DUK_HOBJECT_GET_PROPS(thr->heap, obj) != NULL); + + tv1 = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, i); + if (DUK_TVAL_IS_UNUSED(tv1)) { + continue; + } + + DUK_ASSERT(new_p != NULL && new_e_k != NULL && new_e_pv != NULL && new_e_f != NULL); + + /* + * Intern key via the valstack to ensure reachability behaves + * properly. We must avoid longjmp's here so use non-checked + * primitives. + * + * Note: duk_check_stack() potentially reallocs the valstack, + * invalidating any duk_tval pointers to valstack. Callers + * must be careful. + */ + +#if 0 /* XXX: inject test */ + if (1) { + goto abandon_error; + } +#endif + /* Never shrinks; auto-adds DUK_VALSTACK_INTERNAL_EXTRA, which + * is generous. + */ + if (!duk_check_stack(thr, 1)) { + goto abandon_error; + } + DUK_ASSERT_VALSTACK_SPACE(thr, 1); + key = duk_heap_strtable_intern_u32(thr->heap, (duk_uint32_t) i); + if (key == NULL) { + goto abandon_error; + } + duk_push_hstring(thr, key); /* keep key reachable for GC etc; guaranteed not to fail */ + + /* Key is now reachable in the valstack, don't INCREF + * the new allocation yet (we'll steal the refcounts + * from the value stack once all keys are done). + */ + + new_e_k[new_e_next] = key; + tv2 = &new_e_pv[new_e_next].v; /* array entries are all plain values */ + DUK_TVAL_SET_TVAL(tv2, tv1); + new_e_f[new_e_next] = + DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_ENUMERABLE | DUK_PROPDESC_FLAG_CONFIGURABLE; + new_e_next++; + + /* Note: new_e_next matches pushed temp key count, and nothing can + * fail above between the push and this point. + */ + } + + /* Steal refcounts from value stack. */ + DUK_DDD(DUK_DDDPRINT("abandon array: pop %ld key temps from valstack", (long) new_e_next)); + duk_pop_n_nodecref_unsafe(thr, (duk_idx_t) new_e_next); + } + + /* + * Copy keys and values in the entry part (compacting them at the same time). + */ + + for (i = 0; i < DUK_HOBJECT_GET_ENEXT(obj); i++) { + duk_hstring *key; + + DUK_ASSERT(DUK_HOBJECT_GET_PROPS(thr->heap, obj) != NULL); + + key = DUK_HOBJECT_E_GET_KEY(thr->heap, obj, i); + if (key == NULL) { + continue; + } + + DUK_ASSERT(new_p != NULL && new_e_k != NULL && new_e_pv != NULL && new_e_f != NULL); + + new_e_k[new_e_next] = key; + new_e_pv[new_e_next] = DUK_HOBJECT_E_GET_VALUE(thr->heap, obj, i); + new_e_f[new_e_next] = DUK_HOBJECT_E_GET_FLAGS(thr->heap, obj, i); + new_e_next++; + } + /* the entries [new_e_next, new_e_size_adjusted[ are left uninitialized on purpose (ok, not gc reachable) */ + + /* + * Copy array elements to new array part. If the new array part is + * larger, initialize the unused entries as UNUSED because they are + * GC reachable. + */ + +#if defined(DUK_USE_ASSERTIONS) + /* Caller must have decref'd values above new_a_size (if that is necessary). */ + if (!abandon_array) { + for (i = new_a_size; i < DUK_HOBJECT_GET_ASIZE(obj); i++) { + duk_tval *tv; + tv = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, i); + DUK_ASSERT(DUK_TVAL_IS_UNUSED(tv)); + } + } +#endif + if (new_a_size > DUK_HOBJECT_GET_ASIZE(obj)) { + array_copy_size = sizeof(duk_tval) * DUK_HOBJECT_GET_ASIZE(obj); + } else { + array_copy_size = sizeof(duk_tval) * new_a_size; + } + + DUK_ASSERT(new_a != NULL || array_copy_size == 0U); + DUK_ASSERT(DUK_HOBJECT_GET_PROPS(thr->heap, obj) != NULL || array_copy_size == 0U); + DUK_ASSERT(DUK_HOBJECT_GET_ASIZE(obj) > 0 || array_copy_size == 0U); + duk_memcpy_unsafe((void *) new_a, (const void *) DUK_HOBJECT_A_GET_BASE(thr->heap, obj), array_copy_size); + + for (i = DUK_HOBJECT_GET_ASIZE(obj); i < new_a_size; i++) { + duk_tval *tv = &new_a[i]; + DUK_TVAL_SET_UNUSED(tv); + } + + /* + * Rebuild the hash part always from scratch (guaranteed to finish + * as long as caller gave consistent parameters). + * + * Any resize of hash part requires rehashing. In addition, by rehashing + * get rid of any elements marked deleted (DUK__HASH_DELETED) which is critical + * to ensuring the hash part never fills up. + */ + +#if defined(DUK_USE_HOBJECT_HASH_PART) + if (new_h_size == 0) { + DUK_DDD(DUK_DDDPRINT("no hash part, no rehash")); + } else { + duk_uint32_t mask; + + DUK_ASSERT(new_h != NULL); + + /* fill new_h with u32 0xff = UNUSED */ + DUK_ASSERT(new_h_size > 0); + duk_memset(new_h, 0xff, sizeof(duk_uint32_t) * new_h_size); + + DUK_ASSERT(new_e_next <= new_h_size); /* equality not actually possible */ + + mask = new_h_size - 1; + for (i = 0; i < new_e_next; i++) { + duk_hstring *key = new_e_k[i]; + duk_uint32_t j, step; + + DUK_ASSERT(key != NULL); + j = DUK_HSTRING_GET_HASH(key) & mask; + step = 1; /* Cache friendly but clustering prone. */ + + for (;;) { + DUK_ASSERT(new_h[j] != DUK__HASH_DELETED); /* should never happen */ + if (new_h[j] == DUK__HASH_UNUSED) { + DUK_DDD(DUK_DDDPRINT("rebuild hit %ld -> %ld", (long) j, (long) i)); + new_h[j] = (duk_uint32_t) i; + break; + } + DUK_DDD(DUK_DDDPRINT("rebuild miss %ld, step %ld", (long) j, (long) step)); + j = (j + step) & mask; + + /* Guaranteed to finish (hash is larger than #props). */ + } + } + } +#endif /* DUK_USE_HOBJECT_HASH_PART */ + + /* + * Nice debug log. + */ + + DUK_DD(DUK_DDPRINT( + "resized hobject %p props (%ld -> %ld bytes), from {p=%p,e_size=%ld,e_next=%ld,a_size=%ld,h_size=%ld} to " + "{p=%p,e_size=%ld,e_next=%ld,a_size=%ld,h_size=%ld}, abandon_array=%ld, unadjusted new_e_size=%ld", + (void *) obj, + (long) DUK_HOBJECT_P_COMPUTE_SIZE(DUK_HOBJECT_GET_ESIZE(obj), DUK_HOBJECT_GET_ASIZE(obj), DUK_HOBJECT_GET_HSIZE(obj)), + (long) new_alloc_size, + (void *) DUK_HOBJECT_GET_PROPS(thr->heap, obj), + (long) DUK_HOBJECT_GET_ESIZE(obj), + (long) DUK_HOBJECT_GET_ENEXT(obj), + (long) DUK_HOBJECT_GET_ASIZE(obj), + (long) DUK_HOBJECT_GET_HSIZE(obj), + (void *) new_p, + (long) new_e_size_adjusted, + (long) new_e_next, + (long) new_a_size, + (long) new_h_size, + (long) abandon_array, + (long) new_e_size)); + + /* + * All done, switch properties ('p') allocation to new one. + */ + + DUK_FREE_CHECKED(thr, DUK_HOBJECT_GET_PROPS(thr->heap, obj)); /* NULL obj->p is OK */ + DUK_HOBJECT_SET_PROPS(thr->heap, obj, new_p); + DUK_HOBJECT_SET_ESIZE(obj, new_e_size_adjusted); + DUK_HOBJECT_SET_ENEXT(obj, new_e_next); + DUK_HOBJECT_SET_ASIZE(obj, new_a_size); + DUK_HOBJECT_SET_HSIZE(obj, new_h_size); + + /* Clear array part flag only after switching. */ + if (abandon_array) { + DUK_HOBJECT_CLEAR_ARRAY_PART(obj); + } + + DUK_DDD(DUK_DDDPRINT("resize result: %!O", (duk_heaphdr *) obj)); + + DUK_ASSERT(thr->heap->pf_prevent_count > 0); + thr->heap->pf_prevent_count--; + thr->heap->ms_base_flags = prev_ms_base_flags; +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(thr->heap->error_not_allowed == 1); + thr->heap->error_not_allowed = prev_error_not_allowed; +#endif + + /* + * Post resize assertions. + */ + +#if defined(DUK_USE_ASSERTIONS) + /* XXX: post-checks (such as no duplicate keys) */ +#endif + return; + + /* + * Abandon array failed. We don't need to DECREF anything + * because the references in the new allocation are not + * INCREF'd until abandon is complete. The string interned + * keys are on the value stack and are handled normally by + * unwind. + */ + +abandon_error: +alloc_failed: + DUK_D(DUK_DPRINT("object property table resize failed")); + + DUK_FREE_CHECKED(thr, new_p); /* OK for NULL. */ + + thr->heap->pf_prevent_count--; + thr->heap->ms_base_flags = prev_ms_base_flags; +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(thr->heap->error_not_allowed == 1); + thr->heap->error_not_allowed = prev_error_not_allowed; +#endif + + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return;); +} + +/* + * Helpers to resize properties allocation on specific needs. + */ + +DUK_INTERNAL void duk_hobject_resize_entrypart(duk_hthread *thr, duk_hobject *obj, duk_uint32_t new_e_size) { + duk_uint32_t old_e_size; + duk_uint32_t new_a_size; + duk_uint32_t new_h_size; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + + old_e_size = DUK_HOBJECT_GET_ESIZE(obj); + if (old_e_size > new_e_size) { + new_e_size = old_e_size; + } +#if defined(DUK_USE_HOBJECT_HASH_PART) + new_h_size = duk__get_default_h_size(new_e_size); +#else + new_h_size = 0; +#endif + new_a_size = DUK_HOBJECT_GET_ASIZE(obj); + + duk_hobject_realloc_props(thr, obj, new_e_size, new_a_size, new_h_size, 0); +} + +/* Grow entry part allocation for one additional entry. */ +DUK_LOCAL void duk__grow_props_for_new_entry_item(duk_hthread *thr, duk_hobject *obj) { + duk_uint32_t old_e_used; /* actually used, non-NULL entries */ + duk_uint32_t new_e_size_minimum; + duk_uint32_t new_e_size; + duk_uint32_t new_a_size; + duk_uint32_t new_h_size; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + + /* Duktape 0.11.0 and prior tried to optimize the resize by not + * counting the number of actually used keys prior to the resize. + * This worked mostly well but also caused weird leak-like behavior + * as in: test-bug-object-prop-alloc-unbounded.js. So, now we count + * the keys explicitly to compute the new entry part size. + */ + + old_e_used = duk__count_used_e_keys(thr, obj); + new_e_size_minimum = old_e_used + 1; + new_e_size = old_e_used + duk__get_min_grow_e(old_e_used); +#if defined(DUK_USE_HOBJECT_HASH_PART) + new_h_size = duk__get_default_h_size(new_e_size); +#else + new_h_size = 0; +#endif + new_a_size = DUK_HOBJECT_GET_ASIZE(obj); + +#if defined(DUK_USE_OBJSIZES16) + if (new_e_size > DUK_UINT16_MAX) { + new_e_size = DUK_UINT16_MAX; + } + if (new_h_size > DUK_UINT16_MAX) { + new_h_size = DUK_UINT16_MAX; + } + if (new_a_size > DUK_UINT16_MAX) { + new_a_size = DUK_UINT16_MAX; + } +#endif + DUK_ASSERT(new_h_size == 0 || new_h_size >= new_e_size); + + if (!(new_e_size >= new_e_size_minimum)) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return;); + } + + duk_hobject_realloc_props(thr, obj, new_e_size, new_a_size, new_h_size, 0); +} + +/* Grow array part for a new highest array index. */ +DUK_LOCAL void duk__grow_props_for_array_item(duk_hthread *thr, duk_hobject *obj, duk_uint32_t highest_arr_idx) { + duk_uint32_t new_e_size; + duk_uint32_t new_a_size; + duk_uint32_t new_a_size_minimum; + duk_uint32_t new_h_size; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(highest_arr_idx >= DUK_HOBJECT_GET_ASIZE(obj)); + + new_e_size = DUK_HOBJECT_GET_ESIZE(obj); + new_h_size = DUK_HOBJECT_GET_HSIZE(obj); + new_a_size_minimum = highest_arr_idx + 1; + new_a_size = highest_arr_idx + duk__get_min_grow_a(highest_arr_idx); + DUK_ASSERT(new_a_size >= highest_arr_idx + 1); /* duk__get_min_grow_a() is always >= 1 */ + +#if defined(DUK_USE_OBJSIZES16) + if (new_e_size > DUK_UINT16_MAX) { + new_e_size = DUK_UINT16_MAX; + } + if (new_h_size > DUK_UINT16_MAX) { + new_h_size = DUK_UINT16_MAX; + } + if (new_a_size > DUK_UINT16_MAX) { + new_a_size = DUK_UINT16_MAX; + } +#endif + + if (!(new_a_size >= new_a_size_minimum)) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return;); + } + + duk_hobject_realloc_props(thr, obj, new_e_size, new_a_size, new_h_size, 0); +} + +/* Abandon array part, moving array entries into entries part. + * This requires a props resize, which is a heavy operation. + * We also compact the entries part while we're at it, although + * this is not strictly required. + */ +DUK_LOCAL void duk__abandon_array_part(duk_hthread *thr, duk_hobject *obj) { + duk_uint32_t new_e_size_minimum; + duk_uint32_t new_e_size; + duk_uint32_t new_a_size; + duk_uint32_t new_h_size; + duk_uint32_t e_used; /* actually used, non-NULL keys */ + duk_uint32_t a_used; + duk_uint32_t a_size; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + + e_used = duk__count_used_e_keys(thr, obj); + duk__compute_a_stats(thr, obj, &a_used, &a_size); + + /* + * Must guarantee all actually used array entries will fit into + * new entry part. Add one growth step to ensure we don't run out + * of space right away. + */ + + new_e_size_minimum = e_used + a_used; + new_e_size = new_e_size_minimum + duk__get_min_grow_e(new_e_size_minimum); + new_a_size = 0; +#if defined(DUK_USE_HOBJECT_HASH_PART) + new_h_size = duk__get_default_h_size(new_e_size); +#else + new_h_size = 0; +#endif + +#if defined(DUK_USE_OBJSIZES16) + if (new_e_size > DUK_UINT16_MAX) { + new_e_size = DUK_UINT16_MAX; + } + if (new_h_size > DUK_UINT16_MAX) { + new_h_size = DUK_UINT16_MAX; + } + if (new_a_size > DUK_UINT16_MAX) { + new_a_size = DUK_UINT16_MAX; + } +#endif + + if (!(new_e_size >= new_e_size_minimum)) { + DUK_ERROR_ALLOC_FAILED(thr); + DUK_WO_NORETURN(return;); + } + + DUK_DD(DUK_DDPRINT("abandon array part for hobject %p, " + "array stats before: e_used=%ld, a_used=%ld, a_size=%ld; " + "resize to e_size=%ld, a_size=%ld, h_size=%ld", + (void *) obj, + (long) e_used, + (long) a_used, + (long) a_size, + (long) new_e_size, + (long) new_a_size, + (long) new_h_size)); + + duk_hobject_realloc_props(thr, obj, new_e_size, new_a_size, new_h_size, 1); +} + +/* + * Compact an object. Minimizes allocation size for objects which are + * not likely to be extended. This is useful for internal and non- + * extensible objects, but can also be called for non-extensible objects. + * May abandon the array part if it is computed to be too sparse. + * + * This call is relatively expensive, as it needs to scan both the + * entries and the array part. + * + * The call may fail due to allocation error. + */ + +DUK_INTERNAL void duk_hobject_compact_props(duk_hthread *thr, duk_hobject *obj) { + duk_uint32_t e_size; /* currently used -> new size */ + duk_uint32_t a_size; /* currently required */ + duk_uint32_t a_used; /* actually used */ + duk_uint32_t h_size; + duk_bool_t abandon_array; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + +#if defined(DUK_USE_ROM_OBJECTS) + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)) { + DUK_DD(DUK_DDPRINT("ignore attempt to compact a rom object")); + return; + } +#endif + + e_size = duk__count_used_e_keys(thr, obj); + duk__compute_a_stats(thr, obj, &a_used, &a_size); + + DUK_DD(DUK_DDPRINT("compacting hobject, used e keys %ld, used a keys %ld, min a size %ld, " + "resized array density would be: %ld/%ld = %lf", + (long) e_size, + (long) a_used, + (long) a_size, + (long) a_used, + (long) a_size, + (double) a_used / (double) a_size)); + + if (duk__abandon_array_density_check(a_used, a_size)) { + DUK_DD(DUK_DDPRINT("decided to abandon array during compaction, a_used=%ld, a_size=%ld", + (long) a_used, + (long) a_size)); + abandon_array = 1; + e_size += a_used; + a_size = 0; + } else { + DUK_DD(DUK_DDPRINT("decided to keep array during compaction")); + abandon_array = 0; + } + +#if defined(DUK_USE_HOBJECT_HASH_PART) + if (e_size >= DUK_USE_HOBJECT_HASH_PROP_LIMIT) { + h_size = duk__get_default_h_size(e_size); + } else { + h_size = 0; + } +#else + h_size = 0; +#endif + + DUK_DD(DUK_DDPRINT("compacting hobject -> new e_size %ld, new a_size=%ld, new h_size=%ld, abandon_array=%ld", + (long) e_size, + (long) a_size, + (long) h_size, + (long) abandon_array)); + + duk_hobject_realloc_props(thr, obj, e_size, a_size, h_size, abandon_array); +} + +/* + * Find an existing key from entry part either by linear scan or by + * using the hash index (if it exists). + * + * Sets entry index (and possibly the hash index) to output variables, + * which allows the caller to update the entry and hash entries in-place. + * If entry is not found, both values are set to -1. If entry is found + * but there is no hash part, h_idx is set to -1. + */ + +DUK_INTERNAL duk_bool_t +duk_hobject_find_entry(duk_heap *heap, duk_hobject *obj, duk_hstring *key, duk_int_t *e_idx, duk_int_t *h_idx) { + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + DUK_ASSERT(e_idx != NULL); + DUK_ASSERT(h_idx != NULL); + DUK_UNREF(heap); + + if (DUK_LIKELY(DUK_HOBJECT_GET_HSIZE(obj) == 0)) { + /* Linear scan: more likely because most objects are small. + * This is an important fast path. + * + * XXX: this might be worth inlining for property lookups. + */ + duk_uint_fast32_t i; + duk_uint_fast32_t n; + duk_hstring **h_keys_base; + DUK_DDD(DUK_DDDPRINT("duk_hobject_find_entry() using linear scan for lookup")); + + h_keys_base = DUK_HOBJECT_E_GET_KEY_BASE(heap, obj); + n = DUK_HOBJECT_GET_ENEXT(obj); + for (i = 0; i < n; i++) { + if (h_keys_base[i] == key) { + *e_idx = (duk_int_t) i; + *h_idx = -1; + return 1; + } + } + } +#if defined(DUK_USE_HOBJECT_HASH_PART) + else { + /* hash lookup */ + duk_uint32_t n; + duk_uint32_t i, step; + duk_uint32_t *h_base; + duk_uint32_t mask; + + DUK_DDD(DUK_DDDPRINT("duk_hobject_find_entry() using hash part for lookup")); + + h_base = DUK_HOBJECT_H_GET_BASE(heap, obj); + n = DUK_HOBJECT_GET_HSIZE(obj); + mask = n - 1; + i = DUK_HSTRING_GET_HASH(key) & mask; + step = 1; /* Cache friendly but clustering prone. */ + + for (;;) { + duk_uint32_t t; + + DUK_ASSERT_DISABLE(i >= 0); /* unsigned */ + DUK_ASSERT(i < DUK_HOBJECT_GET_HSIZE(obj)); + t = h_base[i]; + DUK_ASSERT(t == DUK__HASH_UNUSED || t == DUK__HASH_DELETED || + (t < DUK_HOBJECT_GET_ESIZE(obj))); /* t >= 0 always true, unsigned */ + + if (t == DUK__HASH_UNUSED) { + break; + } else if (t == DUK__HASH_DELETED) { + DUK_DDD(DUK_DDDPRINT("lookup miss (deleted) i=%ld, t=%ld", (long) i, (long) t)); + } else { + DUK_ASSERT(t < DUK_HOBJECT_GET_ESIZE(obj)); + if (DUK_HOBJECT_E_GET_KEY(heap, obj, t) == key) { + DUK_DDD( + DUK_DDDPRINT("lookup hit i=%ld, t=%ld -> key %p", (long) i, (long) t, (void *) key)); + *e_idx = (duk_int_t) t; + *h_idx = (duk_int_t) i; + return 1; + } + DUK_DDD(DUK_DDDPRINT("lookup miss i=%ld, t=%ld", (long) i, (long) t)); + } + i = (i + step) & mask; + + /* Guaranteed to finish (hash is larger than #props). */ + } + } +#endif /* DUK_USE_HOBJECT_HASH_PART */ + + /* Not found, leave e_idx and h_idx unset. */ + return 0; +} + +/* For internal use: get non-accessor entry value */ +DUK_INTERNAL duk_tval *duk_hobject_find_entry_tval_ptr(duk_heap *heap, duk_hobject *obj, duk_hstring *key) { + duk_int_t e_idx; + duk_int_t h_idx; + + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + DUK_UNREF(heap); + + if (duk_hobject_find_entry(heap, obj, key, &e_idx, &h_idx)) { + DUK_ASSERT(e_idx >= 0); + if (!DUK_HOBJECT_E_SLOT_IS_ACCESSOR(heap, obj, e_idx)) { + return DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(heap, obj, e_idx); + } + } + return NULL; +} + +DUK_INTERNAL duk_tval *duk_hobject_find_entry_tval_ptr_stridx(duk_heap *heap, duk_hobject *obj, duk_small_uint_t stridx) { + return duk_hobject_find_entry_tval_ptr(heap, obj, DUK_HEAP_GET_STRING(heap, stridx)); +} + +/* For internal use: get non-accessor entry value and attributes */ +DUK_INTERNAL duk_tval *duk_hobject_find_entry_tval_ptr_and_attrs(duk_heap *heap, + duk_hobject *obj, + duk_hstring *key, + duk_uint_t *out_attrs) { + duk_int_t e_idx; + duk_int_t h_idx; + + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + DUK_ASSERT(out_attrs != NULL); + DUK_UNREF(heap); + + if (duk_hobject_find_entry(heap, obj, key, &e_idx, &h_idx)) { + DUK_ASSERT(e_idx >= 0); + if (!DUK_HOBJECT_E_SLOT_IS_ACCESSOR(heap, obj, e_idx)) { + *out_attrs = DUK_HOBJECT_E_GET_FLAGS(heap, obj, e_idx); + return DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(heap, obj, e_idx); + } + } + /* If not found, out_attrs is left unset. */ + return NULL; +} + +/* For internal use: get array part value */ +DUK_INTERNAL duk_tval *duk_hobject_find_array_entry_tval_ptr(duk_heap *heap, duk_hobject *obj, duk_uarridx_t i) { + duk_tval *tv; + + DUK_ASSERT(obj != NULL); + DUK_UNREF(heap); + + if (!DUK_HOBJECT_HAS_ARRAY_PART(obj)) { + return NULL; + } + if (i >= DUK_HOBJECT_GET_ASIZE(obj)) { + return NULL; + } + tv = DUK_HOBJECT_A_GET_VALUE_PTR(heap, obj, i); + return tv; +} + +/* + * Allocate and initialize a new entry, resizing the properties allocation + * if necessary. Returns entry index (e_idx) or throws an error if alloc fails. + * + * Sets the key of the entry (increasing the key's refcount), and updates + * the hash part if it exists. Caller must set value and flags, and update + * the entry value refcount. A decref for the previous value is not necessary. + */ + +DUK_LOCAL duk_int_t duk__hobject_alloc_entry_checked(duk_hthread *thr, duk_hobject *obj, duk_hstring *key) { + duk_uint32_t idx; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + DUK_ASSERT(DUK_HOBJECT_GET_ENEXT(obj) <= DUK_HOBJECT_GET_ESIZE(obj)); + +#if defined(DUK_USE_ASSERTIONS) + /* key must not already exist in entry part */ + { + duk_uint_fast32_t i; + for (i = 0; i < DUK_HOBJECT_GET_ENEXT(obj); i++) { + DUK_ASSERT(DUK_HOBJECT_E_GET_KEY(thr->heap, obj, i) != key); + } + } +#endif + + if (DUK_HOBJECT_GET_ENEXT(obj) >= DUK_HOBJECT_GET_ESIZE(obj)) { + /* only need to guarantee 1 more slot, but allocation growth is in chunks */ + DUK_DDD(DUK_DDDPRINT("entry part full, allocate space for one more entry")); + duk__grow_props_for_new_entry_item(thr, obj); + } + DUK_ASSERT(DUK_HOBJECT_GET_ENEXT(obj) < DUK_HOBJECT_GET_ESIZE(obj)); + idx = DUK_HOBJECT_POSTINC_ENEXT(obj); + + /* previous value is assumed to be garbage, so don't touch it */ + DUK_HOBJECT_E_SET_KEY(thr->heap, obj, idx, key); + DUK_HSTRING_INCREF(thr, key); + +#if defined(DUK_USE_HOBJECT_HASH_PART) + if (DUK_UNLIKELY(DUK_HOBJECT_GET_HSIZE(obj) > 0)) { + duk_uint32_t n, mask; + duk_uint32_t i, step; + duk_uint32_t *h_base = DUK_HOBJECT_H_GET_BASE(thr->heap, obj); + + n = DUK_HOBJECT_GET_HSIZE(obj); + mask = n - 1; + i = DUK_HSTRING_GET_HASH(key) & mask; + step = 1; /* Cache friendly but clustering prone. */ + + for (;;) { + duk_uint32_t t = h_base[i]; + if (t == DUK__HASH_UNUSED || t == DUK__HASH_DELETED) { + DUK_DDD(DUK_DDDPRINT("duk__hobject_alloc_entry_checked() inserted key into hash part, %ld -> %ld", + (long) i, + (long) idx)); + DUK_ASSERT_DISABLE(i >= 0); /* unsigned */ + DUK_ASSERT(i < DUK_HOBJECT_GET_HSIZE(obj)); + DUK_ASSERT_DISABLE(idx >= 0); + DUK_ASSERT(idx < DUK_HOBJECT_GET_ESIZE(obj)); + h_base[i] = idx; + break; + } + DUK_DDD(DUK_DDDPRINT("duk__hobject_alloc_entry_checked() miss %ld", (long) i)); + i = (i + step) & mask; + + /* Guaranteed to finish (hash is larger than #props). */ + } + } +#endif /* DUK_USE_HOBJECT_HASH_PART */ + + /* Note: we could return the hash index here too, but it's not + * needed right now. + */ + + DUK_ASSERT_DISABLE(idx >= 0); + DUK_ASSERT(idx < DUK_HOBJECT_GET_ESIZE(obj)); + DUK_ASSERT(idx < DUK_HOBJECT_GET_ENEXT(obj)); + return (duk_int_t) idx; +} + +/* + * Object internal value + * + * Returned value is guaranteed to be reachable / incref'd, caller does not need + * to incref OR decref. No proxies or accessors are invoked, no prototype walk. + */ + +DUK_INTERNAL duk_tval *duk_hobject_get_internal_value_tval_ptr(duk_heap *heap, duk_hobject *obj) { + return duk_hobject_find_entry_tval_ptr_stridx(heap, obj, DUK_STRIDX_INT_VALUE); +} + +DUK_LOCAL duk_heaphdr *duk_hobject_get_internal_value_heaphdr(duk_heap *heap, duk_hobject *obj) { + duk_tval *tv; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(obj != NULL); + + tv = duk_hobject_get_internal_value_tval_ptr(heap, obj); + if (tv != NULL) { + duk_heaphdr *h = DUK_TVAL_GET_HEAPHDR(tv); + DUK_ASSERT(h != NULL); + return h; + } + + return NULL; +} + +DUK_INTERNAL duk_hstring *duk_hobject_get_internal_value_string(duk_heap *heap, duk_hobject *obj) { + duk_hstring *h; + + h = (duk_hstring *) duk_hobject_get_internal_value_heaphdr(heap, obj); + if (h != NULL) { + DUK_ASSERT(DUK_HEAPHDR_IS_STRING((duk_heaphdr *) h)); + } + return h; +} + +DUK_LOCAL duk_hobject *duk__hobject_get_entry_object_stridx(duk_heap *heap, duk_hobject *obj, duk_small_uint_t stridx) { + duk_tval *tv; + duk_hobject *h; + + tv = duk_hobject_find_entry_tval_ptr_stridx(heap, obj, stridx); + if (tv != NULL && DUK_TVAL_IS_OBJECT(tv)) { + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + return h; + } + return NULL; +} + +DUK_INTERNAL duk_harray *duk_hobject_get_formals(duk_hthread *thr, duk_hobject *obj) { + duk_harray *h; + + h = (duk_harray *) duk__hobject_get_entry_object_stridx(thr->heap, obj, DUK_STRIDX_INT_FORMALS); + if (h != NULL) { + DUK_ASSERT(DUK_HOBJECT_IS_ARRAY((duk_hobject *) h)); + DUK_ASSERT(h->length <= DUK_HOBJECT_GET_ASIZE((duk_hobject *) h)); + } + return h; +} + +DUK_INTERNAL duk_hobject *duk_hobject_get_varmap(duk_hthread *thr, duk_hobject *obj) { + duk_hobject *h; + + h = duk__hobject_get_entry_object_stridx(thr->heap, obj, DUK_STRIDX_INT_VARMAP); + return h; +} + +/* + * Arguments handling helpers (argument map mainly). + * + * An arguments object has exotic behavior for some numeric indices. + * Accesses may translate to identifier operations which may have + * arbitrary side effects (potentially invalidating any duk_tval + * pointers). + */ + +/* Lookup 'key' from arguments internal 'map', perform a variable lookup + * if mapped, and leave the result on top of stack (and return non-zero). + * Used in E5 Section 10.6 algorithms [[Get]] and [[GetOwnProperty]]. + */ +DUK_LOCAL +duk_bool_t duk__lookup_arguments_map(duk_hthread *thr, + duk_hobject *obj, + duk_hstring *key, + duk_propdesc *temp_desc, + duk_hobject **out_map, + duk_hobject **out_varenv) { + duk_hobject *map; + duk_hobject *varenv; + duk_bool_t rc; + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + DUK_DDD(DUK_DDDPRINT("arguments map lookup: thr=%p, obj=%p, key=%p, temp_desc=%p " + "(obj -> %!O, key -> %!O)", + (void *) thr, + (void *) obj, + (void *) key, + (void *) temp_desc, + (duk_heaphdr *) obj, + (duk_heaphdr *) key)); + + if (!duk_hobject_get_own_propdesc(thr, obj, DUK_HTHREAD_STRING_INT_MAP(thr), temp_desc, DUK_GETDESC_FLAG_PUSH_VALUE)) { + DUK_DDD(DUK_DDDPRINT("-> no 'map'")); + return 0; + } + + map = duk_require_hobject(thr, -1); + DUK_ASSERT(map != NULL); + duk_pop_unsafe(thr); /* map is reachable through obj */ + + if (!duk_hobject_get_own_propdesc(thr, map, key, temp_desc, DUK_GETDESC_FLAG_PUSH_VALUE)) { + DUK_DDD(DUK_DDDPRINT("-> 'map' exists, but key not in map")); + return 0; + } + + /* [... varname] */ + DUK_DDD(DUK_DDDPRINT("-> 'map' exists, and contains key, key is mapped to argument/variable binding %!T", + (duk_tval *) duk_get_tval(thr, -1))); + DUK_ASSERT(duk_is_string(thr, -1)); /* guaranteed when building arguments */ + + /* get varenv for varname (callee's declarative lexical environment) */ + rc = duk_hobject_get_own_propdesc(thr, obj, DUK_HTHREAD_STRING_INT_VARENV(thr), temp_desc, DUK_GETDESC_FLAG_PUSH_VALUE); + DUK_UNREF(rc); + DUK_ASSERT(rc != 0); /* arguments MUST have an initialized lexical environment reference */ + varenv = duk_require_hobject(thr, -1); + DUK_ASSERT(varenv != NULL); + duk_pop_unsafe(thr); /* varenv remains reachable through 'obj' */ + + DUK_DDD(DUK_DDDPRINT("arguments varenv is: %!dO", (duk_heaphdr *) varenv)); + + /* success: leave varname in stack */ + *out_map = map; + *out_varenv = varenv; + return 1; /* [... varname] */ +} + +/* Lookup 'key' from arguments internal 'map', and leave replacement value + * on stack top if mapped (and return non-zero). + * Used in E5 Section 10.6 algorithm for [[GetOwnProperty]] (used by [[Get]]). + */ +DUK_LOCAL duk_bool_t duk__check_arguments_map_for_get(duk_hthread *thr, + duk_hobject *obj, + duk_hstring *key, + duk_propdesc *temp_desc) { + duk_hobject *map; + duk_hobject *varenv; + duk_hstring *varname; + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + if (!duk__lookup_arguments_map(thr, obj, key, temp_desc, &map, &varenv)) { + DUK_DDD(DUK_DDDPRINT("arguments: key not mapped, no exotic get behavior")); + return 0; + } + + /* [... varname] */ + + varname = duk_require_hstring(thr, -1); + DUK_ASSERT(varname != NULL); + duk_pop_unsafe(thr); /* varname is still reachable */ + + DUK_DDD(DUK_DDDPRINT("arguments object automatic getvar for a bound variable; " + "key=%!O, varname=%!O", + (duk_heaphdr *) key, + (duk_heaphdr *) varname)); + + (void) duk_js_getvar_envrec(thr, varenv, varname, 1 /*throw*/); + + /* [... value this_binding] */ + + duk_pop_unsafe(thr); + + /* leave result on stack top */ + return 1; +} + +/* Lookup 'key' from arguments internal 'map', perform a variable write if mapped. + * Used in E5 Section 10.6 algorithm for [[DefineOwnProperty]] (used by [[Put]]). + * Assumes stack top contains 'put' value (which is NOT popped). + */ +DUK_LOCAL void duk__check_arguments_map_for_put(duk_hthread *thr, + duk_hobject *obj, + duk_hstring *key, + duk_propdesc *temp_desc, + duk_bool_t throw_flag) { + duk_hobject *map; + duk_hobject *varenv; + duk_hstring *varname; + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + if (!duk__lookup_arguments_map(thr, obj, key, temp_desc, &map, &varenv)) { + DUK_DDD(DUK_DDDPRINT("arguments: key not mapped, no exotic put behavior")); + return; + } + + /* [... put_value varname] */ + + varname = duk_require_hstring(thr, -1); + DUK_ASSERT(varname != NULL); + duk_pop_unsafe(thr); /* varname is still reachable */ + + DUK_DDD(DUK_DDDPRINT("arguments object automatic putvar for a bound variable; " + "key=%!O, varname=%!O, value=%!T", + (duk_heaphdr *) key, + (duk_heaphdr *) varname, + (duk_tval *) duk_require_tval(thr, -1))); + + /* [... put_value] */ + + /* + * Note: although arguments object variable mappings are only established + * for non-strict functions (and a call to a non-strict function created + * the arguments object in question), an inner strict function may be doing + * the actual property write. Hence the throw_flag applied here comes from + * the property write call. + */ + + duk_js_putvar_envrec(thr, varenv, varname, duk_require_tval(thr, -1), throw_flag); + + /* [... put_value] */ +} + +/* Lookup 'key' from arguments internal 'map', delete mapping if found. + * Used in E5 Section 10.6 algorithm for [[Delete]]. Note that the + * variable/argument itself (where the map points) is not deleted. + */ +DUK_LOCAL void duk__check_arguments_map_for_delete(duk_hthread *thr, duk_hobject *obj, duk_hstring *key, duk_propdesc *temp_desc) { + duk_hobject *map; + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + if (!duk_hobject_get_own_propdesc(thr, obj, DUK_HTHREAD_STRING_INT_MAP(thr), temp_desc, DUK_GETDESC_FLAG_PUSH_VALUE)) { + DUK_DDD(DUK_DDDPRINT("arguments: key not mapped, no exotic delete behavior")); + return; + } + + map = duk_require_hobject(thr, -1); + DUK_ASSERT(map != NULL); + duk_pop_unsafe(thr); /* map is reachable through obj */ + + DUK_DDD(DUK_DDDPRINT("-> have 'map', delete key %!O from map (if exists)); ignore result", (duk_heaphdr *) key)); + + /* Note: no recursion issue, we can trust 'map' to behave */ + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_BEHAVIOR(map)); + DUK_DDD(DUK_DDDPRINT("map before deletion: %!O", (duk_heaphdr *) map)); + (void) duk_hobject_delprop_raw(thr, map, key, 0); /* ignore result */ + DUK_DDD(DUK_DDDPRINT("map after deletion: %!O", (duk_heaphdr *) map)); +} + +/* + * ECMAScript compliant [[GetOwnProperty]](P), for internal use only. + * + * If property is found: + * - Fills descriptor fields to 'out_desc' + * - If DUK_GETDESC_FLAG_PUSH_VALUE is set, pushes a value related to the + * property onto the stack ('undefined' for accessor properties). + * - Returns non-zero + * + * If property is not found: + * - 'out_desc' is left in untouched state (possibly garbage) + * - Nothing is pushed onto the stack (not even with DUK_GETDESC_FLAG_PUSH_VALUE + * set) + * - Returns zero + * + * Notes: + * + * - Getting a property descriptor may cause an allocation (and hence + * GC) to take place, hence reachability and refcount of all related + * values matter. Reallocation of value stack, properties, etc may + * invalidate many duk_tval pointers (concretely, those which reside + * in memory areas subject to reallocation). However, heap object + * pointers are never affected (heap objects have stable pointers). + * + * - The value of a plain property is always reachable and has a non-zero + * reference count. + * + * - The value of a virtual property is not necessarily reachable from + * elsewhere and may have a refcount of zero. Hence we push it onto + * the valstack for the caller, which ensures it remains reachable + * while it is needed. + * + * - There are no virtual accessor properties. Hence, all getters and + * setters are always related to concretely stored properties, which + * ensures that the get/set functions in the resulting descriptor are + * reachable and have non-zero refcounts. Should there be virtual + * accessor properties later, this would need to change. + */ + +DUK_LOCAL duk_bool_t duk__get_own_propdesc_raw(duk_hthread *thr, + duk_hobject *obj, + duk_hstring *key, + duk_uint32_t arr_idx, + duk_propdesc *out_desc, + duk_small_uint_t flags) { + duk_tval *tv; + + DUK_DDD(DUK_DDDPRINT("duk_hobject_get_own_propdesc: thr=%p, obj=%p, key=%p, out_desc=%p, flags=%lx, " + "arr_idx=%ld (obj -> %!O, key -> %!O)", + (void *) thr, + (void *) obj, + (void *) key, + (void *) out_desc, + (long) flags, + (long) arr_idx, + (duk_heaphdr *) obj, + (duk_heaphdr *) key)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + DUK_ASSERT(out_desc != NULL); + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + DUK_STATS_INC(thr->heap, stats_getownpropdesc_count); + + /* Each code path returning 1 (= found) must fill in all the output + * descriptor fields. We don't do it beforehand because it'd be + * unnecessary work if the property isn't found and would happen + * multiple times for an inheritance chain. + */ + DUK_ASSERT_SET_GARBAGE(out_desc, sizeof(*out_desc)); +#if 0 + out_desc->flags = 0; + out_desc->get = NULL; + out_desc->set = NULL; + out_desc->e_idx = -1; + out_desc->h_idx = -1; + out_desc->a_idx = -1; +#endif + + /* + * Try entries part first because it's the common case. + * + * Array part lookups are usually handled by the array fast path, and + * are not usually inherited. Array and entry parts never contain the + * same keys so the entry part vs. array part order doesn't matter. + */ + + if (duk_hobject_find_entry(thr->heap, obj, key, &out_desc->e_idx, &out_desc->h_idx)) { + duk_int_t e_idx = out_desc->e_idx; + DUK_ASSERT(out_desc->e_idx >= 0); + out_desc->a_idx = -1; + out_desc->flags = DUK_HOBJECT_E_GET_FLAGS(thr->heap, obj, e_idx); + out_desc->get = NULL; + out_desc->set = NULL; + if (DUK_UNLIKELY(out_desc->flags & DUK_PROPDESC_FLAG_ACCESSOR)) { + DUK_DDD(DUK_DDDPRINT("-> found accessor property in entry part")); + out_desc->get = DUK_HOBJECT_E_GET_VALUE_GETTER(thr->heap, obj, e_idx); + out_desc->set = DUK_HOBJECT_E_GET_VALUE_SETTER(thr->heap, obj, e_idx); + if (flags & DUK_GETDESC_FLAG_PUSH_VALUE) { + /* a dummy undefined value is pushed to make valstack + * behavior uniform for caller + */ + duk_push_undefined(thr); + } + } else { + DUK_DDD(DUK_DDDPRINT("-> found plain property in entry part")); + tv = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, obj, e_idx); + if (flags & DUK_GETDESC_FLAG_PUSH_VALUE) { + duk_push_tval(thr, tv); + } + } + goto prop_found; + } + + /* + * Try array part. + */ + + if (DUK_HOBJECT_HAS_ARRAY_PART(obj) && arr_idx != DUK__NO_ARRAY_INDEX) { + if (arr_idx < DUK_HOBJECT_GET_ASIZE(obj)) { + tv = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, arr_idx); + if (!DUK_TVAL_IS_UNUSED(tv)) { + DUK_DDD(DUK_DDDPRINT("-> found in array part")); + if (flags & DUK_GETDESC_FLAG_PUSH_VALUE) { + duk_push_tval(thr, tv); + } + /* implicit attributes */ + out_desc->flags = + DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_CONFIGURABLE | DUK_PROPDESC_FLAG_ENUMERABLE; + out_desc->get = NULL; + out_desc->set = NULL; + out_desc->e_idx = -1; + out_desc->h_idx = -1; + out_desc->a_idx = (duk_int_t) arr_idx; /* XXX: limit 2G due to being signed */ + goto prop_found; + } + } + } + + DUK_DDD(DUK_DDDPRINT("-> not found as a concrete property")); + + /* + * Not found as a concrete property, check for virtual properties. + */ + + if (!DUK_HOBJECT_HAS_VIRTUAL_PROPERTIES(obj)) { + /* Quick skip. */ + goto prop_not_found; + } + + if (DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj)) { + duk_harray *a; + + DUK_DDD(DUK_DDDPRINT("array object exotic property get for key: %!O, arr_idx: %ld", + (duk_heaphdr *) key, + (long) arr_idx)); + + a = (duk_harray *) obj; + DUK_HARRAY_ASSERT_VALID(a); + + if (key == DUK_HTHREAD_STRING_LENGTH(thr)) { + DUK_DDD(DUK_DDDPRINT("-> found, key is 'length', length exotic behavior")); + + if (flags & DUK_GETDESC_FLAG_PUSH_VALUE) { + duk_push_uint(thr, (duk_uint_t) a->length); + } + out_desc->flags = DUK_PROPDESC_FLAG_VIRTUAL; + if (DUK_HARRAY_LENGTH_WRITABLE(a)) { + out_desc->flags |= DUK_PROPDESC_FLAG_WRITABLE; + } + out_desc->get = NULL; + out_desc->set = NULL; + out_desc->e_idx = -1; + out_desc->h_idx = -1; + out_desc->a_idx = -1; + + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(obj)); + goto prop_found_noexotic; /* cannot be arguments exotic */ + } + } else if (DUK_HOBJECT_HAS_EXOTIC_STRINGOBJ(obj)) { + DUK_DDD(DUK_DDDPRINT("string object exotic property get for key: %!O, arr_idx: %ld", + (duk_heaphdr *) key, + (long) arr_idx)); + + /* XXX: charlen; avoid multiple lookups? */ + + if (arr_idx != DUK__NO_ARRAY_INDEX) { + duk_hstring *h_val; + + DUK_DDD(DUK_DDDPRINT("array index exists")); + + h_val = duk_hobject_get_internal_value_string(thr->heap, obj); + DUK_ASSERT(h_val); + if (arr_idx < DUK_HSTRING_GET_CHARLEN(h_val)) { + DUK_DDD(DUK_DDDPRINT("-> found, array index inside string")); + if (flags & DUK_GETDESC_FLAG_PUSH_VALUE) { + duk_push_hstring(thr, h_val); + duk_substring(thr, -1, arr_idx, arr_idx + 1); /* [str] -> [substr] */ + } + out_desc->flags = DUK_PROPDESC_FLAG_ENUMERABLE | /* E5 Section 15.5.5.2 */ + DUK_PROPDESC_FLAG_VIRTUAL; + out_desc->get = NULL; + out_desc->set = NULL; + out_desc->e_idx = -1; + out_desc->h_idx = -1; + out_desc->a_idx = -1; + + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(obj)); + goto prop_found_noexotic; /* cannot be arguments exotic */ + } else { + /* index is above internal string length -> property is fully normal */ + DUK_DDD(DUK_DDDPRINT("array index outside string -> normal property")); + } + } else if (key == DUK_HTHREAD_STRING_LENGTH(thr)) { + duk_hstring *h_val; + + DUK_DDD(DUK_DDDPRINT("-> found, key is 'length', length exotic behavior")); + + h_val = duk_hobject_get_internal_value_string(thr->heap, obj); + DUK_ASSERT(h_val != NULL); + if (flags & DUK_GETDESC_FLAG_PUSH_VALUE) { + duk_push_uint(thr, (duk_uint_t) DUK_HSTRING_GET_CHARLEN(h_val)); + } + out_desc->flags = DUK_PROPDESC_FLAG_VIRTUAL; /* E5 Section 15.5.5.1 */ + out_desc->get = NULL; + out_desc->set = NULL; + out_desc->e_idx = -1; + out_desc->h_idx = -1; + out_desc->a_idx = -1; + + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(obj)); + goto prop_found_noexotic; /* cannot be arguments exotic */ + } + } +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + else if (DUK_HOBJECT_IS_BUFOBJ(obj)) { + duk_hbufobj *h_bufobj; + duk_uint_t byte_off; + duk_small_uint_t elem_size; + + h_bufobj = (duk_hbufobj *) obj; + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + DUK_DDD(DUK_DDDPRINT("bufobj property get for key: %!O, arr_idx: %ld", (duk_heaphdr *) key, (long) arr_idx)); + + if (arr_idx != DUK__NO_ARRAY_INDEX && DUK_HBUFOBJ_HAS_VIRTUAL_INDICES(h_bufobj)) { + DUK_DDD(DUK_DDDPRINT("array index exists")); + + /* Careful with wrapping: arr_idx upshift may easily wrap, whereas + * length downshift won't. + */ + if (arr_idx < (h_bufobj->length >> h_bufobj->shift)) { + byte_off = arr_idx << h_bufobj->shift; /* no wrap assuming h_bufobj->length is valid */ + elem_size = (duk_small_uint_t) (1U << h_bufobj->shift); + if (flags & DUK_GETDESC_FLAG_PUSH_VALUE) { + duk_uint8_t *data; + + if (h_bufobj->buf != NULL && + DUK_HBUFOBJ_VALID_BYTEOFFSET_EXCL(h_bufobj, byte_off + elem_size)) { + data = (duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h_bufobj->buf) + + h_bufobj->offset + byte_off; + duk_hbufobj_push_validated_read(thr, h_bufobj, data, elem_size); + } else { + DUK_D(DUK_DPRINT("bufobj access out of underlying buffer, ignoring (read zero)")); + duk_push_uint(thr, 0); + } + } + out_desc->flags = DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_VIRTUAL; + if (DUK_HOBJECT_GET_CLASS_NUMBER(obj) != DUK_HOBJECT_CLASS_ARRAYBUFFER) { + /* ArrayBuffer indices are non-standard and are + * non-enumerable to avoid their serialization. + */ + out_desc->flags |= DUK_PROPDESC_FLAG_ENUMERABLE; + } + out_desc->get = NULL; + out_desc->set = NULL; + out_desc->e_idx = -1; + out_desc->h_idx = -1; + out_desc->a_idx = -1; + + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(obj)); + goto prop_found_noexotic; /* cannot be e.g. arguments exotic, since exotic 'traits' are mutually + exclusive */ + } else { + /* index is above internal buffer length -> property is fully normal */ + DUK_DDD(DUK_DDDPRINT("array index outside buffer -> normal property")); + } + } else if (key == DUK_HTHREAD_STRING_LENGTH(thr) && DUK_HBUFOBJ_HAS_VIRTUAL_INDICES(h_bufobj)) { + DUK_DDD(DUK_DDDPRINT("-> found, key is 'length', length exotic behavior")); + + if (flags & DUK_GETDESC_FLAG_PUSH_VALUE) { + /* Length in elements: take into account shift, but + * intentionally don't check the underlying buffer here. + */ + duk_push_uint(thr, h_bufobj->length >> h_bufobj->shift); + } + out_desc->flags = DUK_PROPDESC_FLAG_VIRTUAL; + out_desc->get = NULL; + out_desc->set = NULL; + out_desc->e_idx = -1; + out_desc->h_idx = -1; + out_desc->a_idx = -1; + + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(obj)); + goto prop_found_noexotic; /* cannot be arguments exotic */ + } + } +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + + /* Array properties have exotic behavior but they are concrete, + * so no special handling here. + * + * Arguments exotic behavior (E5 Section 10.6, [[GetOwnProperty]] + * is only relevant as a post-check implemented below; hence no + * check here. + */ + + /* + * Not found as concrete or virtual. + */ + +prop_not_found: + DUK_DDD(DUK_DDDPRINT("-> not found (virtual, entry part, or array part)")); + DUK_STATS_INC(thr->heap, stats_getownpropdesc_miss); + return 0; + + /* + * Found. + * + * Arguments object has exotic post-processing, see E5 Section 10.6, + * description of [[GetOwnProperty]] variant for arguments. + */ + +prop_found: + DUK_DDD(DUK_DDDPRINT("-> property found, checking for arguments exotic post-behavior")); + + /* Notes: + * - Only numbered indices are relevant, so arr_idx fast reject is good + * (this is valid unless there are more than 4**32-1 arguments). + * - Since variable lookup has no side effects, this can be skipped if + * DUK_GETDESC_FLAG_PUSH_VALUE is not set. + */ + + if (DUK_UNLIKELY(DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(obj) && arr_idx != DUK__NO_ARRAY_INDEX && + (flags & DUK_GETDESC_FLAG_PUSH_VALUE))) { + duk_propdesc temp_desc; + + /* Magically bound variable cannot be an accessor. However, + * there may be an accessor property (or a plain property) in + * place with magic behavior removed. This happens e.g. when + * a magic property is redefined with defineProperty(). + * Cannot assert for "not accessor" here. + */ + + /* replaces top of stack with new value if necessary */ + DUK_ASSERT((flags & DUK_GETDESC_FLAG_PUSH_VALUE) != 0); + + /* This can perform a variable lookup but only into a declarative + * environment which has no side effects. + */ + if (duk__check_arguments_map_for_get(thr, obj, key, &temp_desc)) { + DUK_DDD(DUK_DDDPRINT("-> arguments exotic behavior overrides result: %!T -> %!T", + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + /* [... old_result result] -> [... result] */ + duk_remove_m2(thr); + } + } + +prop_found_noexotic: + DUK_STATS_INC(thr->heap, stats_getownpropdesc_hit); + return 1; +} + +DUK_INTERNAL duk_bool_t +duk_hobject_get_own_propdesc(duk_hthread *thr, duk_hobject *obj, duk_hstring *key, duk_propdesc *out_desc, duk_small_uint_t flags) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + DUK_ASSERT(out_desc != NULL); + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + return duk__get_own_propdesc_raw(thr, obj, key, DUK_HSTRING_GET_ARRIDX_SLOW(key), out_desc, flags); +} + +/* + * ECMAScript compliant [[GetProperty]](P), for internal use only. + * + * If property is found: + * - Fills descriptor fields to 'out_desc' + * - If DUK_GETDESC_FLAG_PUSH_VALUE is set, pushes a value related to the + * property onto the stack ('undefined' for accessor properties). + * - Returns non-zero + * + * If property is not found: + * - 'out_desc' is left in untouched state (possibly garbage) + * - Nothing is pushed onto the stack (not even with DUK_GETDESC_FLAG_PUSH_VALUE + * set) + * - Returns zero + * + * May cause arbitrary side effects and invalidate (most) duk_tval + * pointers. + */ + +DUK_LOCAL duk_bool_t +duk__get_propdesc(duk_hthread *thr, duk_hobject *obj, duk_hstring *key, duk_propdesc *out_desc, duk_small_uint_t flags) { + duk_hobject *curr; + duk_uint32_t arr_idx; + duk_uint_t sanity; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + DUK_ASSERT(out_desc != NULL); + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + DUK_STATS_INC(thr->heap, stats_getpropdesc_count); + + arr_idx = DUK_HSTRING_GET_ARRIDX_FAST(key); + + DUK_DDD(DUK_DDDPRINT("duk__get_propdesc: thr=%p, obj=%p, key=%p, out_desc=%p, flags=%lx, " + "arr_idx=%ld (obj -> %!O, key -> %!O)", + (void *) thr, + (void *) obj, + (void *) key, + (void *) out_desc, + (long) flags, + (long) arr_idx, + (duk_heaphdr *) obj, + (duk_heaphdr *) key)); + + curr = obj; + DUK_ASSERT(curr != NULL); + sanity = DUK_HOBJECT_PROTOTYPE_CHAIN_SANITY; + do { + if (duk__get_own_propdesc_raw(thr, curr, key, arr_idx, out_desc, flags)) { + /* stack contains value (if requested), 'out_desc' is set */ + DUK_STATS_INC(thr->heap, stats_getpropdesc_hit); + return 1; + } + + /* not found in 'curr', next in prototype chain; impose max depth */ + if (DUK_UNLIKELY(sanity-- == 0)) { + if (flags & DUK_GETDESC_FLAG_IGNORE_PROTOLOOP) { + /* treat like property not found */ + break; + } else { + DUK_ERROR_RANGE(thr, DUK_STR_PROTOTYPE_CHAIN_LIMIT); + DUK_WO_NORETURN(return 0;); + } + } + curr = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, curr); + } while (curr != NULL); + + /* out_desc is left untouched (possibly garbage), caller must use return + * value to determine whether out_desc can be looked up + */ + + DUK_STATS_INC(thr->heap, stats_getpropdesc_miss); + return 0; +} + +/* + * Shallow fast path checks for accessing array elements with numeric + * indices. The goal is to try to avoid coercing an array index to an + * (interned) string for the most common lookups, in particular, for + * standard Array objects. + * + * Interning is avoided but only for a very narrow set of cases: + * - Object has array part, index is within array allocation, and + * value is not unused (= key exists) + * - Object has no interfering exotic behavior (e.g. arguments or + * string object exotic behaviors interfere, array exotic + * behavior does not). + * + * Current shortcoming: if key does not exist (even if it is within + * the array allocation range) a slow path lookup with interning is + * always required. This can probably be fixed so that there is a + * quick fast path for non-existent elements as well, at least for + * standard Array objects. + */ + +#if defined(DUK_USE_ARRAY_PROP_FASTPATH) +DUK_LOCAL duk_tval *duk__getprop_shallow_fastpath_array_tval(duk_hthread *thr, duk_hobject *obj, duk_tval *tv_key) { + duk_tval *tv; + duk_uint32_t idx; + + DUK_UNREF(thr); + + if (!(DUK_HOBJECT_HAS_ARRAY_PART(obj) && !DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(obj) && !DUK_HOBJECT_HAS_EXOTIC_STRINGOBJ(obj) && + !DUK_HOBJECT_IS_BUFOBJ(obj) && !DUK_HOBJECT_IS_PROXY(obj))) { + /* Must have array part and no conflicting exotic behaviors. + * Doesn't need to have array special behavior, e.g. Arguments + * object has array part. + */ + return NULL; + } + + /* Arrays never have other exotic behaviors. */ + + DUK_DDD(DUK_DDDPRINT("fast path attempt (no exotic string/arguments/buffer " + "behavior, object has array part)")); + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_key)) { + idx = duk__tval_fastint_to_arr_idx(tv_key); + } else +#endif + if (DUK_TVAL_IS_DOUBLE(tv_key)) { + idx = duk__tval_number_to_arr_idx(tv_key); + } else { + DUK_DDD(DUK_DDDPRINT("key is not a number")); + return NULL; + } + + /* If index is not valid, idx will be DUK__NO_ARRAY_INDEX which + * is 0xffffffffUL. We don't need to check for that explicitly + * because 0xffffffffUL will never be inside object 'a_size'. + */ + + if (idx >= DUK_HOBJECT_GET_ASIZE(obj)) { + DUK_DDD(DUK_DDDPRINT("key is not an array index or outside array part")); + return NULL; + } + DUK_ASSERT(idx != 0xffffffffUL); + DUK_ASSERT(idx != DUK__NO_ARRAY_INDEX); + + /* XXX: for array instances we could take a shortcut here and assume + * Array.prototype doesn't contain an array index property. + */ + + DUK_DDD(DUK_DDDPRINT("key is a valid array index and inside array part")); + tv = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, idx); + if (!DUK_TVAL_IS_UNUSED(tv)) { + DUK_DDD(DUK_DDDPRINT("-> fast path successful")); + return tv; + } + + DUK_DDD(DUK_DDDPRINT("fast path attempt failed, fall back to slow path")); + return NULL; +} + +DUK_LOCAL duk_bool_t duk__putprop_shallow_fastpath_array_tval(duk_hthread *thr, + duk_hobject *obj, + duk_tval *tv_key, + duk_tval *tv_val) { + duk_tval *tv; + duk_harray *a; + duk_uint32_t idx; + duk_uint32_t old_len, new_len; + + if (!(DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj) && DUK_HOBJECT_HAS_ARRAY_PART(obj) && DUK_HOBJECT_HAS_EXTENSIBLE(obj))) { + return 0; + } + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)); /* caller ensures */ + + a = (duk_harray *) obj; + DUK_HARRAY_ASSERT_VALID(a); + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_key)) { + idx = duk__tval_fastint_to_arr_idx(tv_key); + } else +#endif + if (DUK_TVAL_IS_DOUBLE(tv_key)) { + idx = duk__tval_number_to_arr_idx(tv_key); + } else { + DUK_DDD(DUK_DDDPRINT("key is not a number")); + return 0; + } + + /* If index is not valid, idx will be DUK__NO_ARRAY_INDEX which + * is 0xffffffffUL. We don't need to check for that explicitly + * because 0xffffffffUL will never be inside object 'a_size'. + */ + + if (idx >= DUK_HOBJECT_GET_ASIZE(obj)) { /* for resizing of array part, use slow path */ + return 0; + } + DUK_ASSERT(idx != 0xffffffffUL); + DUK_ASSERT(idx != DUK__NO_ARRAY_INDEX); + + old_len = a->length; + + if (idx >= old_len) { + DUK_DDD(DUK_DDDPRINT("write new array entry requires length update " + "(arr_idx=%ld, old_len=%ld)", + (long) idx, + (long) old_len)); + if (DUK_HARRAY_LENGTH_NONWRITABLE(a)) { + /* The correct behavior here is either a silent error + * or a TypeError, depending on strictness. Fall back + * to the slow path to handle the situation. + */ + return 0; + } + new_len = idx + 1; + + ((duk_harray *) obj)->length = new_len; + } + + tv = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, idx); + DUK_TVAL_SET_TVAL_UPDREF(thr, tv, tv_val); /* side effects */ + + DUK_DDD(DUK_DDDPRINT("array fast path success for index %ld", (long) idx)); + return 1; +} +#endif /* DUK_USE_ARRAY_PROP_FASTPATH */ + +/* + * Fast path for bufobj getprop/putprop + */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_LOCAL duk_bool_t duk__getprop_fastpath_bufobj_tval(duk_hthread *thr, duk_hobject *obj, duk_tval *tv_key) { + duk_uint32_t idx; + duk_hbufobj *h_bufobj; + duk_uint_t byte_off; + duk_small_uint_t elem_size; + duk_uint8_t *data; + + if (!DUK_HOBJECT_IS_BUFOBJ(obj)) { + return 0; + } + h_bufobj = (duk_hbufobj *) obj; + if (!DUK_HBUFOBJ_HAS_VIRTUAL_INDICES(h_bufobj)) { + return 0; + } + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_key)) { + idx = duk__tval_fastint_to_arr_idx(tv_key); + } else +#endif + if (DUK_TVAL_IS_DOUBLE(tv_key)) { + idx = duk__tval_number_to_arr_idx(tv_key); + } else { + return 0; + } + + /* If index is not valid, idx will be DUK__NO_ARRAY_INDEX which + * is 0xffffffffUL. We don't need to check for that explicitly + * because 0xffffffffUL will never be inside bufobj length. + */ + + /* Careful with wrapping (left shifting idx would be unsafe). */ + if (idx >= (h_bufobj->length >> h_bufobj->shift)) { + return 0; + } + DUK_ASSERT(idx != DUK__NO_ARRAY_INDEX); + + byte_off = idx << h_bufobj->shift; /* no wrap assuming h_bufobj->length is valid */ + elem_size = (duk_small_uint_t) (1U << h_bufobj->shift); + + if (h_bufobj->buf != NULL && DUK_HBUFOBJ_VALID_BYTEOFFSET_EXCL(h_bufobj, byte_off + elem_size)) { + data = (duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h_bufobj->buf) + h_bufobj->offset + byte_off; + duk_hbufobj_push_validated_read(thr, h_bufobj, data, elem_size); + } else { + DUK_D(DUK_DPRINT("bufobj access out of underlying buffer, ignoring (read zero)")); + duk_push_uint(thr, 0); + } + + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) +DUK_LOCAL duk_bool_t duk__putprop_fastpath_bufobj_tval(duk_hthread *thr, duk_hobject *obj, duk_tval *tv_key, duk_tval *tv_val) { + duk_uint32_t idx; + duk_hbufobj *h_bufobj; + duk_uint_t byte_off; + duk_small_uint_t elem_size; + duk_uint8_t *data; + + if (!(DUK_HOBJECT_IS_BUFOBJ(obj) && DUK_TVAL_IS_NUMBER(tv_val))) { + return 0; + } + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)); /* caller ensures; rom objects are never bufobjs now */ + + h_bufobj = (duk_hbufobj *) obj; + if (!DUK_HBUFOBJ_HAS_VIRTUAL_INDICES(h_bufobj)) { + return 0; + } + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_key)) { + idx = duk__tval_fastint_to_arr_idx(tv_key); + } else +#endif + if (DUK_TVAL_IS_DOUBLE(tv_key)) { + idx = duk__tval_number_to_arr_idx(tv_key); + } else { + return 0; + } + + /* If index is not valid, idx will be DUK__NO_ARRAY_INDEX which + * is 0xffffffffUL. We don't need to check for that explicitly + * because 0xffffffffUL will never be inside bufobj length. + */ + + /* Careful with wrapping (left shifting idx would be unsafe). */ + if (idx >= (h_bufobj->length >> h_bufobj->shift)) { + return 0; + } + DUK_ASSERT(idx != DUK__NO_ARRAY_INDEX); + + byte_off = idx << h_bufobj->shift; /* no wrap assuming h_bufobj->length is valid */ + elem_size = (duk_small_uint_t) (1U << h_bufobj->shift); + + /* Value is required to be a number in the fast path so there + * are no side effects in write coercion. + */ + duk_push_tval(thr, tv_val); + DUK_ASSERT(duk_is_number(thr, -1)); + + if (h_bufobj->buf != NULL && DUK_HBUFOBJ_VALID_BYTEOFFSET_EXCL(h_bufobj, byte_off + elem_size)) { + data = (duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h_bufobj->buf) + h_bufobj->offset + byte_off; + duk_hbufobj_validated_write(thr, h_bufobj, data, elem_size); + } else { + DUK_D(DUK_DPRINT("bufobj access out of underlying buffer, ignoring (write skipped)")); + } + + duk_pop_unsafe(thr); + return 1; +} +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + +/* + * GETPROP: ECMAScript property read. + */ + +DUK_INTERNAL duk_bool_t duk_hobject_getprop(duk_hthread *thr, duk_tval *tv_obj, duk_tval *tv_key) { + duk_tval tv_obj_copy; + duk_tval tv_key_copy; + duk_hobject *curr = NULL; + duk_hstring *key = NULL; + duk_uint32_t arr_idx = DUK__NO_ARRAY_INDEX; + duk_propdesc desc; + duk_uint_t sanity; + + DUK_DDD(DUK_DDDPRINT("getprop: thr=%p, obj=%p, key=%p (obj -> %!T, key -> %!T)", + (void *) thr, + (void *) tv_obj, + (void *) tv_key, + (duk_tval *) tv_obj, + (duk_tval *) tv_key)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(tv_obj != NULL); + DUK_ASSERT(tv_key != NULL); + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + DUK_STATS_INC(thr->heap, stats_getprop_all); + + /* + * Make a copy of tv_obj, tv_key, and tv_val to avoid any issues of + * them being invalidated by a valstack resize. + * + * XXX: this is now an overkill for many fast paths. Rework this + * to be faster (although switching to a valstack discipline might + * be a better solution overall). + */ + + DUK_TVAL_SET_TVAL(&tv_obj_copy, tv_obj); + DUK_TVAL_SET_TVAL(&tv_key_copy, tv_key); + tv_obj = &tv_obj_copy; + tv_key = &tv_key_copy; + + /* + * Coercion and fast path processing + */ + + switch (DUK_TVAL_GET_TAG(tv_obj)) { + case DUK_TAG_UNDEFINED: + case DUK_TAG_NULL: { + /* Note: unconditional throw */ + DUK_DDD(DUK_DDDPRINT("base object is undefined or null -> reject")); +#if defined(DUK_USE_PARANOID_ERRORS) + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_BASE); +#else + DUK_ERROR_FMT2(thr, + DUK_ERR_TYPE_ERROR, + "cannot read property %s of %s", + duk_push_string_tval_readable(thr, tv_key), + duk_push_string_tval_readable(thr, tv_obj)); +#endif + DUK_WO_NORETURN(return 0;); + break; + } + + case DUK_TAG_BOOLEAN: { + DUK_DDD(DUK_DDDPRINT("base object is a boolean, start lookup from boolean prototype")); + curr = thr->builtins[DUK_BIDX_BOOLEAN_PROTOTYPE]; + break; + } + + case DUK_TAG_STRING: { + duk_hstring *h = DUK_TVAL_GET_STRING(tv_obj); + duk_int_t pop_count; + + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h))) { + /* Symbols (ES2015 or hidden) don't have virtual properties. */ + DUK_DDD(DUK_DDDPRINT("base object is a symbol, start lookup from symbol prototype")); + curr = thr->builtins[DUK_BIDX_SYMBOL_PROTOTYPE]; + break; + } + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_key)) { + arr_idx = duk__tval_fastint_to_arr_idx(tv_key); + DUK_DDD(DUK_DDDPRINT("base object string, key is a fast-path fastint; arr_idx %ld", (long) arr_idx)); + pop_count = 0; + } else +#endif + if (DUK_TVAL_IS_NUMBER(tv_key)) { + arr_idx = duk__tval_number_to_arr_idx(tv_key); + DUK_DDD(DUK_DDDPRINT("base object string, key is a fast-path number; arr_idx %ld", (long) arr_idx)); + pop_count = 0; + } else { + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + DUK_DDD(DUK_DDDPRINT("base object string, key is a non-fast-path number; after " + "coercion key is %!T, arr_idx %ld", + (duk_tval *) duk_get_tval(thr, -1), + (long) arr_idx)); + pop_count = 1; + } + + if (arr_idx != DUK__NO_ARRAY_INDEX && arr_idx < DUK_HSTRING_GET_CHARLEN(h)) { + duk_pop_n_unsafe(thr, pop_count); + duk_push_hstring(thr, h); + duk_substring(thr, -1, arr_idx, arr_idx + 1); /* [str] -> [substr] */ + + DUK_STATS_INC(thr->heap, stats_getprop_stringidx); + DUK_DDD(DUK_DDDPRINT("-> %!T (base is string, key is an index inside string length " + "after coercion -> return char)", + (duk_tval *) duk_get_tval(thr, -1))); + return 1; + } + + if (pop_count == 0) { + /* This is a pretty awkward control flow, but we need to recheck the + * key coercion here. + */ + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + DUK_DDD(DUK_DDDPRINT("base object string, key is a non-fast-path number; after " + "coercion key is %!T, arr_idx %ld", + (duk_tval *) duk_get_tval(thr, -1), + (long) arr_idx)); + } + + if (key == DUK_HTHREAD_STRING_LENGTH(thr)) { + duk_pop_unsafe(thr); /* [key] -> [] */ + duk_push_uint(thr, (duk_uint_t) DUK_HSTRING_GET_CHARLEN(h)); /* [] -> [res] */ + + DUK_STATS_INC(thr->heap, stats_getprop_stringlen); + DUK_DDD(DUK_DDDPRINT("-> %!T (base is string, key is 'length' after coercion -> " + "return string length)", + (duk_tval *) duk_get_tval(thr, -1))); + return 1; + } + + DUK_DDD(DUK_DDDPRINT("base object is a string, start lookup from string prototype")); + curr = thr->builtins[DUK_BIDX_STRING_PROTOTYPE]; + goto lookup; /* avoid double coercion */ + } + + case DUK_TAG_OBJECT: { +#if defined(DUK_USE_ARRAY_PROP_FASTPATH) + duk_tval *tmp; +#endif + + curr = DUK_TVAL_GET_OBJECT(tv_obj); + DUK_ASSERT(curr != NULL); + + /* XXX: array .length fast path (important in e.g. loops)? */ + +#if defined(DUK_USE_ARRAY_PROP_FASTPATH) + tmp = duk__getprop_shallow_fastpath_array_tval(thr, curr, tv_key); + if (tmp) { + duk_push_tval(thr, tmp); + + DUK_DDD(DUK_DDDPRINT("-> %!T (base is object, key is a number, array part " + "fast path)", + (duk_tval *) duk_get_tval(thr, -1))); + DUK_STATS_INC(thr->heap, stats_getprop_arrayidx); + return 1; + } +#endif + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + if (duk__getprop_fastpath_bufobj_tval(thr, curr, tv_key) != 0) { + /* Read value pushed on stack. */ + DUK_DDD(DUK_DDDPRINT("-> %!T (base is bufobj, key is a number, bufobj " + "fast path)", + (duk_tval *) duk_get_tval(thr, -1))); + DUK_STATS_INC(thr->heap, stats_getprop_bufobjidx); + return 1; + } +#endif + +#if defined(DUK_USE_ES6_PROXY) + if (DUK_UNLIKELY(DUK_HOBJECT_IS_PROXY(curr))) { + duk_hobject *h_target; + + if (duk__proxy_check_prop(thr, curr, DUK_STRIDX_GET, tv_key, &h_target)) { + /* -> [ ... trap handler ] */ + DUK_DDD(DUK_DDDPRINT("-> proxy object 'get' for key %!T", (duk_tval *) tv_key)); + DUK_STATS_INC(thr->heap, stats_getprop_proxy); + duk_push_hobject(thr, h_target); /* target */ + duk_push_tval(thr, tv_key); /* P */ + duk_push_tval(thr, tv_obj); /* Receiver: Proxy object */ + duk_call_method(thr, 3 /*nargs*/); + + /* Target object must be checked for a conflicting + * non-configurable property. + */ + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + + if (duk__get_own_propdesc_raw(thr, h_target, key, arr_idx, &desc, DUK_GETDESC_FLAG_PUSH_VALUE)) { + duk_tval *tv_hook = duk_require_tval(thr, -3); /* value from hook */ + duk_tval *tv_targ = duk_require_tval(thr, -1); /* value from target */ + duk_bool_t datadesc_reject; + duk_bool_t accdesc_reject; + + DUK_DDD(DUK_DDDPRINT("proxy 'get': target has matching property %!O, check for " + "conflicting property; tv_hook=%!T, tv_targ=%!T, desc.flags=0x%08lx, " + "desc.get=%p, desc.set=%p", + (duk_heaphdr *) key, + (duk_tval *) tv_hook, + (duk_tval *) tv_targ, + (unsigned long) desc.flags, + (void *) desc.get, + (void *) desc.set)); + + datadesc_reject = !(desc.flags & DUK_PROPDESC_FLAG_ACCESSOR) && + !(desc.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) && + !(desc.flags & DUK_PROPDESC_FLAG_WRITABLE) && + !duk_js_samevalue(tv_hook, tv_targ); + accdesc_reject = (desc.flags & DUK_PROPDESC_FLAG_ACCESSOR) && + !(desc.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) && (desc.get == NULL) && + !DUK_TVAL_IS_UNDEFINED(tv_hook); + if (datadesc_reject || accdesc_reject) { + DUK_ERROR_TYPE(thr, DUK_STR_PROXY_REJECTED); + DUK_WO_NORETURN(return 0;); + } + + duk_pop_2_unsafe(thr); + } else { + duk_pop_unsafe(thr); + } + return 1; /* return value */ + } + + curr = h_target; /* resume lookup from target */ + DUK_TVAL_SET_OBJECT(tv_obj, curr); + } +#endif /* DUK_USE_ES6_PROXY */ + + if (DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(curr)) { + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + + DUK_STATS_INC(thr->heap, stats_getprop_arguments); + if (duk__check_arguments_map_for_get(thr, curr, key, &desc)) { + DUK_DDD(DUK_DDDPRINT("-> %!T (base is object with arguments exotic behavior, " + "key matches magically bound property -> skip standard " + "Get with replacement value)", + (duk_tval *) duk_get_tval(thr, -1))); + + /* no need for 'caller' post-check, because 'key' must be an array index */ + + duk_remove_m2(thr); /* [key result] -> [result] */ + return 1; + } + + goto lookup; /* avoid double coercion */ + } + break; + } + + /* Buffer has virtual properties similar to string, but indexed values + * are numbers, not 1-byte buffers/strings which would perform badly. + */ + case DUK_TAG_BUFFER: { + duk_hbuffer *h = DUK_TVAL_GET_BUFFER(tv_obj); + duk_int_t pop_count; + + /* + * Because buffer values are often looped over, a number fast path + * is important. + */ + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_key)) { + arr_idx = duk__tval_fastint_to_arr_idx(tv_key); + DUK_DDD(DUK_DDDPRINT("base object buffer, key is a fast-path fastint; arr_idx %ld", (long) arr_idx)); + pop_count = 0; + } else +#endif + if (DUK_TVAL_IS_NUMBER(tv_key)) { + arr_idx = duk__tval_number_to_arr_idx(tv_key); + DUK_DDD(DUK_DDDPRINT("base object buffer, key is a fast-path number; arr_idx %ld", (long) arr_idx)); + pop_count = 0; + } else { + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + DUK_DDD(DUK_DDDPRINT("base object buffer, key is a non-fast-path number; after " + "coercion key is %!T, arr_idx %ld", + (duk_tval *) duk_get_tval(thr, -1), + (long) arr_idx)); + pop_count = 1; + } + + if (arr_idx != DUK__NO_ARRAY_INDEX && arr_idx < DUK_HBUFFER_GET_SIZE(h)) { + duk_pop_n_unsafe(thr, pop_count); + duk_push_uint(thr, ((duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h))[arr_idx]); + DUK_STATS_INC(thr->heap, stats_getprop_bufferidx); + DUK_DDD(DUK_DDDPRINT("-> %!T (base is buffer, key is an index inside buffer length " + "after coercion -> return byte as number)", + (duk_tval *) duk_get_tval(thr, -1))); + return 1; + } + + if (pop_count == 0) { + /* This is a pretty awkward control flow, but we need to recheck the + * key coercion here. + */ + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + DUK_DDD(DUK_DDDPRINT("base object buffer, key is a non-fast-path number; after " + "coercion key is %!T, arr_idx %ld", + (duk_tval *) duk_get_tval(thr, -1), + (long) arr_idx)); + } + + if (key == DUK_HTHREAD_STRING_LENGTH(thr)) { + duk_pop_unsafe(thr); /* [key] -> [] */ + duk_push_uint(thr, (duk_uint_t) DUK_HBUFFER_GET_SIZE(h)); /* [] -> [res] */ + DUK_STATS_INC(thr->heap, stats_getprop_bufferlen); + + DUK_DDD(DUK_DDDPRINT("-> %!T (base is buffer, key is 'length' " + "after coercion -> return buffer length)", + (duk_tval *) duk_get_tval(thr, -1))); + return 1; + } + + DUK_DDD(DUK_DDDPRINT("base object is a buffer, start lookup from Uint8Array prototype")); + curr = thr->builtins[DUK_BIDX_UINT8ARRAY_PROTOTYPE]; + goto lookup; /* avoid double coercion */ + } + + case DUK_TAG_POINTER: { + DUK_DDD(DUK_DDDPRINT("base object is a pointer, start lookup from pointer prototype")); + curr = thr->builtins[DUK_BIDX_POINTER_PROTOTYPE]; + break; + } + + case DUK_TAG_LIGHTFUNC: { + /* Lightfuncs inherit getter .name and .length from %NativeFunctionPrototype%. */ + DUK_DDD(DUK_DDDPRINT("base object is a lightfunc, start lookup from function prototype")); + curr = thr->builtins[DUK_BIDX_NATIVE_FUNCTION_PROTOTYPE]; + break; + } + +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: { + /* number */ + DUK_DDD(DUK_DDDPRINT("base object is a number, start lookup from number prototype")); + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv_obj)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv_obj)); + curr = thr->builtins[DUK_BIDX_NUMBER_PROTOTYPE]; + break; + } + } + + /* key coercion (unless already coerced above) */ + DUK_ASSERT(key == NULL); + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + /* + * Property lookup + */ + +lookup: + /* [key] (coerced) */ + DUK_ASSERT(curr != NULL); + DUK_ASSERT(key != NULL); + + sanity = DUK_HOBJECT_PROTOTYPE_CHAIN_SANITY; + do { + if (!duk__get_own_propdesc_raw(thr, curr, key, arr_idx, &desc, DUK_GETDESC_FLAG_PUSH_VALUE)) { + goto next_in_chain; + } + + if (desc.get != NULL) { + /* accessor with defined getter */ + DUK_ASSERT((desc.flags & DUK_PROPDESC_FLAG_ACCESSOR) != 0); + + duk_pop_unsafe(thr); /* [key undefined] -> [key] */ + duk_push_hobject(thr, desc.get); + duk_push_tval(thr, tv_obj); /* note: original, uncoerced base */ +#if defined(DUK_USE_NONSTD_GETTER_KEY_ARGUMENT) + duk_dup_m3(thr); + duk_call_method(thr, 1); /* [key getter this key] -> [key retval] */ +#else + duk_call_method(thr, 0); /* [key getter this] -> [key retval] */ +#endif + } else { + /* [key value] or [key undefined] */ + + /* data property or accessor without getter */ + DUK_ASSERT(((desc.flags & DUK_PROPDESC_FLAG_ACCESSOR) == 0) || (desc.get == NULL)); + + /* if accessor without getter, return value is undefined */ + DUK_ASSERT(((desc.flags & DUK_PROPDESC_FLAG_ACCESSOR) == 0) || duk_is_undefined(thr, -1)); + + /* Note: for an accessor without getter, falling through to + * check for "caller" exotic behavior is unnecessary as + * "undefined" will never activate the behavior. But it does + * no harm, so we'll do it anyway. + */ + } + + goto found; /* [key result] */ + + next_in_chain: + /* XXX: option to pretend property doesn't exist if sanity limit is + * hit might be useful. + */ + if (DUK_UNLIKELY(sanity-- == 0)) { + DUK_ERROR_RANGE(thr, DUK_STR_PROTOTYPE_CHAIN_LIMIT); + DUK_WO_NORETURN(return 0;); + } + curr = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, curr); + } while (curr != NULL); + + /* + * Not found + */ + + duk_to_undefined(thr, -1); /* [key] -> [undefined] (default value) */ + + DUK_DDD(DUK_DDDPRINT("-> %!T (not found)", (duk_tval *) duk_get_tval(thr, -1))); + return 0; + + /* + * Found; post-processing (Function and arguments objects) + */ + +found: + /* [key result] */ + +#if !defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) + /* Special behavior for 'caller' property of (non-bound) function objects + * and non-strict Arguments objects: if 'caller' -value- (!) is a strict + * mode function, throw a TypeError (E5 Sections 15.3.5.4, 10.6). + * Quite interestingly, a non-strict function with no formal arguments + * will get an arguments object -without- special 'caller' behavior! + * + * The E5.1 spec is a bit ambiguous if this special behavior applies when + * a bound function is the base value (not the 'caller' value): Section + * 15.3.4.5 (describing bind()) states that [[Get]] for bound functions + * matches that of Section 15.3.5.4 ([[Get]] for Function instances). + * However, Section 13.3.5.4 has "NOTE: Function objects created using + * Function.prototype.bind use the default [[Get]] internal method." + * The current implementation assumes this means that bound functions + * should not have the special [[Get]] behavior. + * + * The E5.1 spec is also a bit unclear if the TypeError throwing is + * applied if the 'caller' value is a strict bound function. The + * current implementation will throw even for both strict non-bound + * and strict bound functions. + * + * See test-dev-strict-func-as-caller-prop-value.js for quite extensive + * tests. + * + * This exotic behavior is disabled when the non-standard 'caller' property + * is enabled, as it conflicts with the free use of 'caller'. + */ + if (key == DUK_HTHREAD_STRING_CALLER(thr) && DUK_TVAL_IS_OBJECT(tv_obj)) { + duk_hobject *orig = DUK_TVAL_GET_OBJECT(tv_obj); + DUK_ASSERT(orig != NULL); + + if (DUK_HOBJECT_IS_NONBOUND_FUNCTION(orig) || DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(orig)) { + duk_hobject *h; + + /* XXX: The TypeError is currently not applied to bound + * functions because the 'strict' flag is not copied by + * bind(). This may or may not be correct, the specification + * only refers to the value being a "strict mode Function + * object" which is ambiguous. + */ + DUK_ASSERT(!DUK_HOBJECT_HAS_BOUNDFUNC(orig)); + + h = duk_get_hobject(thr, -1); /* NULL if not an object */ + if (h && DUK_HOBJECT_IS_FUNCTION(h) && DUK_HOBJECT_HAS_STRICT(h)) { + /* XXX: sufficient to check 'strict', assert for 'is function' */ + DUK_ERROR_TYPE(thr, DUK_STR_STRICT_CALLER_READ); + DUK_WO_NORETURN(return 0;); + } + } + } +#endif /* !DUK_USE_NONSTD_FUNC_CALLER_PROPERTY */ + + duk_remove_m2(thr); /* [key result] -> [result] */ + + DUK_DDD(DUK_DDDPRINT("-> %!T (found)", (duk_tval *) duk_get_tval(thr, -1))); + return 1; +} + +/* + * HASPROP: ECMAScript property existence check ("in" operator). + * + * Interestingly, the 'in' operator does not do any coercion of + * the target object. + */ + +DUK_INTERNAL duk_bool_t duk_hobject_hasprop(duk_hthread *thr, duk_tval *tv_obj, duk_tval *tv_key) { + duk_tval tv_key_copy; + duk_hobject *obj; + duk_hstring *key; + duk_uint32_t arr_idx; + duk_bool_t rc; + duk_propdesc desc; + + DUK_DDD(DUK_DDDPRINT("hasprop: thr=%p, obj=%p, key=%p (obj -> %!T, key -> %!T)", + (void *) thr, + (void *) tv_obj, + (void *) tv_key, + (duk_tval *) tv_obj, + (duk_tval *) tv_key)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(tv_obj != NULL); + DUK_ASSERT(tv_key != NULL); + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + DUK_TVAL_SET_TVAL(&tv_key_copy, tv_key); + tv_key = &tv_key_copy; + + /* + * The 'in' operator requires an object as its right hand side, + * throwing a TypeError unconditionally if this is not the case. + * + * However, lightfuncs need to behave like fully fledged objects + * here to be maximally transparent, so we need to handle them + * here. Same goes for plain buffers which behave like ArrayBuffers. + */ + + /* XXX: Refactor key coercion so that it's only called once. It can't + * be trivially lifted here because the object must be type checked + * first. + */ + + if (DUK_TVAL_IS_OBJECT(tv_obj)) { + obj = DUK_TVAL_GET_OBJECT(tv_obj); + DUK_ASSERT(obj != NULL); + + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + } else if (DUK_TVAL_IS_BUFFER(tv_obj)) { + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + if (duk__key_is_plain_buf_ownprop(thr, DUK_TVAL_GET_BUFFER(tv_obj), key, arr_idx)) { + rc = 1; + goto pop_and_return; + } + obj = thr->builtins[DUK_BIDX_UINT8ARRAY_PROTOTYPE]; + } else if (DUK_TVAL_IS_LIGHTFUNC(tv_obj)) { + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + + /* If not found, resume existence check from %NativeFunctionPrototype%. + * We can just substitute the value in this case; nothing will + * need the original base value (as would be the case with e.g. + * setters/getters. + */ + obj = thr->builtins[DUK_BIDX_NATIVE_FUNCTION_PROTOTYPE]; + } else { + /* Note: unconditional throw */ + DUK_DDD(DUK_DDDPRINT("base object is not an object -> reject")); + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_BASE); + DUK_WO_NORETURN(return 0;); + } + + /* XXX: fast path for arrays? */ + + DUK_ASSERT(key != NULL); + DUK_ASSERT(obj != NULL); + DUK_UNREF(arr_idx); + +#if defined(DUK_USE_ES6_PROXY) + if (DUK_UNLIKELY(DUK_HOBJECT_IS_PROXY(obj))) { + duk_hobject *h_target; + duk_bool_t tmp_bool; + + /* XXX: the key in 'key in obj' is string coerced before we're called + * (which is the required behavior in E5/E5.1/E6) so the key is a string + * here already. + */ + + if (duk__proxy_check_prop(thr, obj, DUK_STRIDX_HAS, tv_key, &h_target)) { + /* [ ... key trap handler ] */ + DUK_DDD(DUK_DDDPRINT("-> proxy object 'has' for key %!T", (duk_tval *) tv_key)); + duk_push_hobject(thr, h_target); /* target */ + duk_push_tval(thr, tv_key); /* P */ + duk_call_method(thr, 2 /*nargs*/); + tmp_bool = duk_to_boolean_top_pop(thr); + if (!tmp_bool) { + /* Target object must be checked for a conflicting + * non-configurable property. + */ + + if (duk__get_own_propdesc_raw(thr, h_target, key, arr_idx, &desc, 0 /*flags*/)) { /* don't push + value */ + DUK_DDD(DUK_DDDPRINT("proxy 'has': target has matching property %!O, check for " + "conflicting property; desc.flags=0x%08lx, " + "desc.get=%p, desc.set=%p", + (duk_heaphdr *) key, + (unsigned long) desc.flags, + (void *) desc.get, + (void *) desc.set)); + /* XXX: Extensibility check for target uses IsExtensible(). If we + * implemented the isExtensible trap and didn't reject proxies as + * proxy targets, it should be respected here. + */ + if (!((desc.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) && /* property is configurable and */ + DUK_HOBJECT_HAS_EXTENSIBLE(h_target))) { /* ... target is extensible */ + DUK_ERROR_TYPE(thr, DUK_STR_PROXY_REJECTED); + DUK_WO_NORETURN(return 0;); + } + } + } + + duk_pop_unsafe(thr); /* [ key ] -> [] */ + return tmp_bool; + } + + obj = h_target; /* resume check from proxy target */ + } +#endif /* DUK_USE_ES6_PROXY */ + + /* XXX: inline into a prototype walking loop? */ + + rc = duk__get_propdesc(thr, obj, key, &desc, 0 /*flags*/); /* don't push value */ + /* fall through */ + +pop_and_return: + duk_pop_unsafe(thr); /* [ key ] -> [] */ + return rc; +} + +/* + * HASPROP variant used internally. + * + * This primitive must never throw an error, callers rely on this. + * In particular, don't throw an error for prototype loops; instead, + * pretend like the property doesn't exist if a prototype sanity limit + * is reached. + * + * Does not implement proxy behavior: if applied to a proxy object, + * returns key existence on the proxy object itself. + */ + +DUK_INTERNAL duk_bool_t duk_hobject_hasprop_raw(duk_hthread *thr, duk_hobject *obj, duk_hstring *key) { + duk_propdesc dummy; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + return duk__get_propdesc(thr, obj, key, &dummy, DUK_GETDESC_FLAG_IGNORE_PROTOLOOP); /* don't push value */ +} + +/* + * Helper: handle Array object 'length' write which automatically + * deletes properties, see E5 Section 15.4.5.1, step 3. This is + * quite tricky to get right. + * + * Used by duk_hobject_putprop(). + */ + +/* Coerce a new .length candidate to a number and check that it's a valid + * .length. + */ +DUK_LOCAL duk_uint32_t duk__to_new_array_length_checked(duk_hthread *thr, duk_tval *tv) { + duk_uint32_t res; + duk_double_t d; + +#if !defined(DUK_USE_PREFER_SIZE) +#if defined(DUK_USE_FASTINT) + /* When fastints are enabled, the most interesting case is assigning + * a fastint to .length (e.g. arr.length = 0). + */ + if (DUK_TVAL_IS_FASTINT(tv)) { + /* Very common case. */ + duk_int64_t fi; + fi = DUK_TVAL_GET_FASTINT(tv); + if (fi < 0 || fi > DUK_I64_CONSTANT(0xffffffff)) { + goto fail_range; + } + return (duk_uint32_t) fi; + } +#else /* DUK_USE_FASTINT */ + /* When fastints are not enabled, the most interesting case is any + * number. + */ + if (DUK_TVAL_IS_DOUBLE(tv)) { + d = DUK_TVAL_GET_NUMBER(tv); + } +#endif /* DUK_USE_FASTINT */ + else +#endif /* !DUK_USE_PREFER_SIZE */ + { + /* In all other cases, and when doing a size optimized build, + * fall back to the comprehensive handler. + */ + d = duk_js_tonumber(thr, tv); + } + + /* Refuse to update an Array's 'length' to a value outside the + * 32-bit range. Negative zero is accepted as zero. + */ + res = duk_double_to_uint32_t(d); + if (!duk_double_equals((duk_double_t) res, d)) { + goto fail_range; + } + + return res; + +fail_range: + DUK_ERROR_RANGE(thr, DUK_STR_INVALID_ARRAY_LENGTH); + DUK_WO_NORETURN(return 0;); +} + +/* Delete elements required by a smaller length, taking into account + * potentially non-configurable elements. Returns non-zero if all + * elements could be deleted, and zero if all or some elements could + * not be deleted. Also writes final "target length" to 'out_result_len'. + * This is the length value that should go into the 'length' property + * (must be set by the caller). Never throws an error. + */ +DUK_LOCAL +duk_bool_t duk__handle_put_array_length_smaller(duk_hthread *thr, + duk_hobject *obj, + duk_uint32_t old_len, + duk_uint32_t new_len, + duk_bool_t force_flag, + duk_uint32_t *out_result_len) { + duk_uint32_t target_len; + duk_uint_fast32_t i; + duk_uint32_t arr_idx; + duk_hstring *key; + duk_tval *tv; + duk_bool_t rc; + + DUK_DDD(DUK_DDDPRINT("new array length smaller than old (%ld -> %ld), " + "probably need to remove elements", + (long) old_len, + (long) new_len)); + + /* + * New length is smaller than old length, need to delete properties above + * the new length. + * + * If array part exists, this is straightforward: array entries cannot + * be non-configurable so this is guaranteed to work. + * + * If array part does not exist, array-indexed values are scattered + * in the entry part, and some may not be configurable (preventing length + * from becoming lower than their index + 1). To handle the algorithm + * in E5 Section 15.4.5.1, step l correctly, we scan the entire property + * set twice. + */ + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(new_len < old_len); + DUK_ASSERT(out_result_len != NULL); + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + DUK_ASSERT(DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj)); + DUK_ASSERT(DUK_HOBJECT_IS_ARRAY(obj)); + + if (DUK_HOBJECT_HAS_ARRAY_PART(obj)) { + /* + * All defined array-indexed properties are in the array part + * (we assume the array part is comprehensive), and all array + * entries are writable, configurable, and enumerable. Thus, + * nothing can prevent array entries from being deleted. + */ + + DUK_DDD(DUK_DDDPRINT("have array part, easy case")); + + if (old_len < DUK_HOBJECT_GET_ASIZE(obj)) { + /* XXX: assertion that entries >= old_len are already unused */ + i = old_len; + } else { + i = DUK_HOBJECT_GET_ASIZE(obj); + } + DUK_ASSERT(i <= DUK_HOBJECT_GET_ASIZE(obj)); + + while (i > new_len) { + i--; + tv = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, i); + DUK_TVAL_SET_UNUSED_UPDREF(thr, tv); /* side effects */ + } + + *out_result_len = new_len; + return 1; + } else { + /* + * Entries part is a bit more complex. + */ + + /* Stage 1: find highest preventing non-configurable entry (if any). + * When forcing, ignore non-configurability. + */ + + DUK_DDD(DUK_DDDPRINT("no array part, slow case")); + + DUK_DDD(DUK_DDDPRINT("array length write, no array part, stage 1: find target_len " + "(highest preventing non-configurable entry (if any))")); + + target_len = new_len; + if (force_flag) { + DUK_DDD(DUK_DDDPRINT("array length write, no array part; force flag -> skip stage 1")); + goto skip_stage1; + } + for (i = 0; i < DUK_HOBJECT_GET_ENEXT(obj); i++) { + key = DUK_HOBJECT_E_GET_KEY(thr->heap, obj, i); + if (!key) { + DUK_DDD(DUK_DDDPRINT("skip entry index %ld: null key", (long) i)); + continue; + } + if (!DUK_HSTRING_HAS_ARRIDX(key)) { + DUK_DDD(DUK_DDDPRINT("skip entry index %ld: key not an array index", (long) i)); + continue; + } + + DUK_ASSERT( + DUK_HSTRING_HAS_ARRIDX(key)); /* XXX: macro checks for array index flag, which is unnecessary here */ + arr_idx = DUK_HSTRING_GET_ARRIDX_SLOW(key); + DUK_ASSERT(arr_idx != DUK__NO_ARRAY_INDEX); + DUK_ASSERT(arr_idx < old_len); /* consistency requires this */ + + if (arr_idx < new_len) { + DUK_DDD(DUK_DDDPRINT("skip entry index %ld: key is array index %ld, below new_len", + (long) i, + (long) arr_idx)); + continue; + } + if (DUK_HOBJECT_E_SLOT_IS_CONFIGURABLE(thr->heap, obj, i)) { + DUK_DDD(DUK_DDDPRINT("skip entry index %ld: key is a relevant array index %ld, but configurable", + (long) i, + (long) arr_idx)); + continue; + } + + /* relevant array index is non-configurable, blocks write */ + if (arr_idx >= target_len) { + DUK_DDD(DUK_DDDPRINT("entry at index %ld has arr_idx %ld, is not configurable, " + "update target_len %ld -> %ld", + (long) i, + (long) arr_idx, + (long) target_len, + (long) (arr_idx + 1))); + target_len = arr_idx + 1; + } + } + skip_stage1: + + /* stage 2: delete configurable entries above target length */ + + DUK_DDD( + DUK_DDDPRINT("old_len=%ld, new_len=%ld, target_len=%ld", (long) old_len, (long) new_len, (long) target_len)); + + DUK_DDD(DUK_DDDPRINT("array length write, no array part, stage 2: remove " + "entries >= target_len")); + + for (i = 0; i < DUK_HOBJECT_GET_ENEXT(obj); i++) { + key = DUK_HOBJECT_E_GET_KEY(thr->heap, obj, i); + if (!key) { + DUK_DDD(DUK_DDDPRINT("skip entry index %ld: null key", (long) i)); + continue; + } + if (!DUK_HSTRING_HAS_ARRIDX(key)) { + DUK_DDD(DUK_DDDPRINT("skip entry index %ld: key not an array index", (long) i)); + continue; + } + + DUK_ASSERT( + DUK_HSTRING_HAS_ARRIDX(key)); /* XXX: macro checks for array index flag, which is unnecessary here */ + arr_idx = DUK_HSTRING_GET_ARRIDX_SLOW(key); + DUK_ASSERT(arr_idx != DUK__NO_ARRAY_INDEX); + DUK_ASSERT(arr_idx < old_len); /* consistency requires this */ + + if (arr_idx < target_len) { + DUK_DDD(DUK_DDDPRINT("skip entry index %ld: key is array index %ld, below target_len", + (long) i, + (long) arr_idx)); + continue; + } + DUK_ASSERT(force_flag || DUK_HOBJECT_E_SLOT_IS_CONFIGURABLE(thr->heap, obj, i)); /* stage 1 guarantees */ + + DUK_DDD(DUK_DDDPRINT("delete entry index %ld: key is array index %ld", (long) i, (long) arr_idx)); + + /* + * Slow delete, but we don't care as we're already in a very slow path. + * The delete always succeeds: key has no exotic behavior, property + * is configurable, and no resize occurs. + */ + rc = duk_hobject_delprop_raw(thr, obj, key, force_flag ? DUK_DELPROP_FLAG_FORCE : 0); + DUK_UNREF(rc); + DUK_ASSERT(rc != 0); + } + + /* stage 3: update length (done by caller), decide return code */ + + DUK_DDD(DUK_DDDPRINT("array length write, no array part, stage 3: update length (done by caller)")); + + *out_result_len = target_len; + + if (target_len == new_len) { + DUK_DDD(DUK_DDDPRINT("target_len matches new_len, return success")); + return 1; + } + DUK_DDD(DUK_DDDPRINT("target_len does not match new_len (some entry prevented " + "full length adjustment), return error")); + return 0; + } + + DUK_UNREACHABLE(); +} + +/* XXX: is valstack top best place for argument? */ +DUK_LOCAL duk_bool_t duk__handle_put_array_length(duk_hthread *thr, duk_hobject *obj) { + duk_harray *a; + duk_uint32_t old_len; + duk_uint32_t new_len; + duk_uint32_t result_len; + duk_bool_t rc; + + DUK_DDD(DUK_DDDPRINT("handling a put operation to array 'length' exotic property, " + "new val: %!T", + (duk_tval *) duk_get_tval(thr, -1))); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(obj != NULL); + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + DUK_ASSERT(DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj)); + DUK_ASSERT(DUK_HOBJECT_IS_ARRAY(obj)); + a = (duk_harray *) obj; + DUK_HARRAY_ASSERT_VALID(a); + + DUK_ASSERT(duk_is_valid_index(thr, -1)); + + /* + * Get old and new length + */ + + old_len = a->length; + new_len = duk__to_new_array_length_checked(thr, DUK_GET_TVAL_NEGIDX(thr, -1)); + DUK_DDD(DUK_DDDPRINT("old_len=%ld, new_len=%ld", (long) old_len, (long) new_len)); + + /* + * Writability check + */ + + if (DUK_HARRAY_LENGTH_NONWRITABLE(a)) { + DUK_DDD(DUK_DDDPRINT("length is not writable, fail")); + return 0; + } + + /* + * New length not lower than old length => no changes needed + * (not even array allocation). + */ + + if (new_len >= old_len) { + DUK_DDD(DUK_DDDPRINT("new length is same or higher than old length, just update length, no deletions")); + a->length = new_len; + return 1; + } + + DUK_DDD(DUK_DDDPRINT("new length is lower than old length, probably must delete entries")); + + /* + * New length lower than old length => delete elements, then + * update length. + * + * Note: even though a bunch of elements have been deleted, the 'desc' is + * still valid as properties haven't been resized (and entries compacted). + */ + + rc = duk__handle_put_array_length_smaller(thr, obj, old_len, new_len, 0 /*force_flag*/, &result_len); + DUK_ASSERT(result_len >= new_len && result_len <= old_len); + + a->length = result_len; + + /* XXX: shrink array allocation or entries compaction here? */ + + return rc; +} + +/* + * PUTPROP: ECMAScript property write. + * + * Unlike ECMAScript primitive which returns nothing, returns 1 to indicate + * success and 0 to indicate failure (assuming throw is not set). + * + * This is an extremely tricky function. Some examples: + * + * * Currently a decref may trigger a GC, which may compact an object's + * property allocation. Consequently, any entry indices (e_idx) will + * be potentially invalidated by a decref. + * + * * Exotic behaviors (strings, arrays, arguments object) require, + * among other things: + * + * - Preprocessing before and postprocessing after an actual property + * write. For example, array index write requires pre-checking the + * array 'length' property for access control, and may require an + * array 'length' update after the actual write has succeeded (but + * not if it fails). + * + * - Deletion of multiple entries, as a result of array 'length' write. + * + * * Input values are taken as pointers which may point to the valstack. + * If valstack is resized because of the put (this may happen at least + * when the array part is abandoned), the pointers can be invalidated. + * (We currently make a copy of all of the input values to avoid issues.) + */ + +DUK_INTERNAL duk_bool_t +duk_hobject_putprop(duk_hthread *thr, duk_tval *tv_obj, duk_tval *tv_key, duk_tval *tv_val, duk_bool_t throw_flag) { + duk_tval tv_obj_copy; + duk_tval tv_key_copy; + duk_tval tv_val_copy; + duk_hobject *orig = NULL; /* NULL if tv_obj is primitive */ + duk_hobject *curr; + duk_hstring *key = NULL; + duk_propdesc desc; + duk_tval *tv; + duk_uint32_t arr_idx; + duk_bool_t rc; + duk_int_t e_idx; + duk_uint_t sanity; + duk_uint32_t new_array_length = 0; /* 0 = no update */ + + DUK_DDD(DUK_DDDPRINT("putprop: thr=%p, obj=%p, key=%p, val=%p, throw=%ld " + "(obj -> %!T, key -> %!T, val -> %!T)", + (void *) thr, + (void *) tv_obj, + (void *) tv_key, + (void *) tv_val, + (long) throw_flag, + (duk_tval *) tv_obj, + (duk_tval *) tv_key, + (duk_tval *) tv_val)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(tv_obj != NULL); + DUK_ASSERT(tv_key != NULL); + DUK_ASSERT(tv_val != NULL); + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + DUK_STATS_INC(thr->heap, stats_putprop_all); + + /* + * Make a copy of tv_obj, tv_key, and tv_val to avoid any issues of + * them being invalidated by a valstack resize. + * + * XXX: this is an overkill for some paths, so optimize this later + * (or maybe switch to a stack arguments model entirely). + */ + + DUK_TVAL_SET_TVAL(&tv_obj_copy, tv_obj); + DUK_TVAL_SET_TVAL(&tv_key_copy, tv_key); + DUK_TVAL_SET_TVAL(&tv_val_copy, tv_val); + tv_obj = &tv_obj_copy; + tv_key = &tv_key_copy; + tv_val = &tv_val_copy; + + /* + * Coercion and fast path processing. + */ + + switch (DUK_TVAL_GET_TAG(tv_obj)) { + case DUK_TAG_UNDEFINED: + case DUK_TAG_NULL: { + /* Note: unconditional throw */ + DUK_DDD(DUK_DDDPRINT("base object is undefined or null -> reject (object=%!iT)", (duk_tval *) tv_obj)); +#if defined(DUK_USE_PARANOID_ERRORS) + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_BASE); +#else + DUK_ERROR_FMT2(thr, + DUK_ERR_TYPE_ERROR, + "cannot write property %s of %s", + duk_push_string_tval_readable(thr, tv_key), + duk_push_string_tval_readable(thr, tv_obj)); +#endif + DUK_WO_NORETURN(return 0;); + break; + } + + case DUK_TAG_BOOLEAN: { + DUK_DDD(DUK_DDDPRINT("base object is a boolean, start lookup from boolean prototype")); + curr = thr->builtins[DUK_BIDX_BOOLEAN_PROTOTYPE]; + break; + } + + case DUK_TAG_STRING: { + duk_hstring *h = DUK_TVAL_GET_STRING(tv_obj); + + /* + * Note: currently no fast path for array index writes. + * They won't be possible anyway as strings are immutable. + */ + + DUK_ASSERT(key == NULL); + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h))) { + /* Symbols (ES2015 or hidden) don't have virtual properties. */ + curr = thr->builtins[DUK_BIDX_SYMBOL_PROTOTYPE]; + goto lookup; + } + + if (key == DUK_HTHREAD_STRING_LENGTH(thr)) { + goto fail_not_writable; + } + + if (arr_idx != DUK__NO_ARRAY_INDEX && arr_idx < DUK_HSTRING_GET_CHARLEN(h)) { + goto fail_not_writable; + } + + DUK_DDD(DUK_DDDPRINT("base object is a string, start lookup from string prototype")); + curr = thr->builtins[DUK_BIDX_STRING_PROTOTYPE]; + goto lookup; /* avoid double coercion */ + } + + case DUK_TAG_OBJECT: { + orig = DUK_TVAL_GET_OBJECT(tv_obj); + DUK_ASSERT(orig != NULL); + +#if defined(DUK_USE_ROM_OBJECTS) + /* With this check in place fast paths won't need read-only + * object checks. This is technically incorrect if there are + * setters that cause no writes to ROM objects, but current + * built-ins don't have such setters. + */ + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) orig)) { + DUK_DD(DUK_DDPRINT("attempt to putprop on read-only target object")); + goto fail_not_writable_no_pop; /* Must avoid duk_pop() in exit path */ + } +#endif + + /* The fast path for array property put is not fully compliant: + * If one places conflicting number-indexed properties into + * Array.prototype (for example, a non-writable Array.prototype[7]) + * the fast path will incorrectly ignore them. + * + * This fast path could be made compliant by falling through + * to the slow path if the previous value was UNUSED. This would + * also remove the need to check for extensibility. Right now a + * non-extensible array is slower than an extensible one as far + * as writes are concerned. + * + * The fast path behavior is documented in more detail here: + * tests/ecmascript/test-misc-array-fast-write.js + */ + + /* XXX: array .length? */ + +#if defined(DUK_USE_ARRAY_PROP_FASTPATH) + if (duk__putprop_shallow_fastpath_array_tval(thr, orig, tv_key, tv_val) != 0) { + DUK_DDD(DUK_DDDPRINT("array fast path success")); + DUK_STATS_INC(thr->heap, stats_putprop_arrayidx); + return 1; + } +#endif + +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + if (duk__putprop_fastpath_bufobj_tval(thr, orig, tv_key, tv_val) != 0) { + DUK_DDD(DUK_DDDPRINT("base is bufobj, key is a number, bufobj fast path")); + DUK_STATS_INC(thr->heap, stats_putprop_bufobjidx); + return 1; + } +#endif + +#if defined(DUK_USE_ES6_PROXY) + if (DUK_UNLIKELY(DUK_HOBJECT_IS_PROXY(orig))) { + duk_hobject *h_target; + duk_bool_t tmp_bool; + + if (duk__proxy_check_prop(thr, orig, DUK_STRIDX_SET, tv_key, &h_target)) { + /* -> [ ... trap handler ] */ + DUK_DDD(DUK_DDDPRINT("-> proxy object 'set' for key %!T", (duk_tval *) tv_key)); + DUK_STATS_INC(thr->heap, stats_putprop_proxy); + duk_push_hobject(thr, h_target); /* target */ + duk_push_tval(thr, tv_key); /* P */ + duk_push_tval(thr, tv_val); /* V */ + duk_push_tval(thr, tv_obj); /* Receiver: Proxy object */ + duk_call_method(thr, 4 /*nargs*/); + tmp_bool = duk_to_boolean_top_pop(thr); + if (!tmp_bool) { + goto fail_proxy_rejected; + } + + /* Target object must be checked for a conflicting + * non-configurable property. + */ + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + + if (duk__get_own_propdesc_raw(thr, h_target, key, arr_idx, &desc, DUK_GETDESC_FLAG_PUSH_VALUE)) { + duk_tval *tv_targ = duk_require_tval(thr, -1); + duk_bool_t datadesc_reject; + duk_bool_t accdesc_reject; + + DUK_DDD(DUK_DDDPRINT("proxy 'set': target has matching property %!O, check for " + "conflicting property; tv_val=%!T, tv_targ=%!T, desc.flags=0x%08lx, " + "desc.get=%p, desc.set=%p", + (duk_heaphdr *) key, + (duk_tval *) tv_val, + (duk_tval *) tv_targ, + (unsigned long) desc.flags, + (void *) desc.get, + (void *) desc.set)); + + datadesc_reject = !(desc.flags & DUK_PROPDESC_FLAG_ACCESSOR) && + !(desc.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) && + !(desc.flags & DUK_PROPDESC_FLAG_WRITABLE) && + !duk_js_samevalue(tv_val, tv_targ); + accdesc_reject = (desc.flags & DUK_PROPDESC_FLAG_ACCESSOR) && + !(desc.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) && (desc.set == NULL); + if (datadesc_reject || accdesc_reject) { + DUK_ERROR_TYPE(thr, DUK_STR_PROXY_REJECTED); + DUK_WO_NORETURN(return 0;); + } + + duk_pop_2_unsafe(thr); + } else { + duk_pop_unsafe(thr); + } + return 1; /* success */ + } + + orig = h_target; /* resume write to target */ + DUK_TVAL_SET_OBJECT(tv_obj, orig); + } +#endif /* DUK_USE_ES6_PROXY */ + + curr = orig; + break; + } + + case DUK_TAG_BUFFER: { + duk_hbuffer *h = DUK_TVAL_GET_BUFFER(tv_obj); + duk_int_t pop_count = 0; + + /* + * Because buffer values may be looped over and read/written + * from, an array index fast path is important. + */ + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_key)) { + arr_idx = duk__tval_fastint_to_arr_idx(tv_key); + DUK_DDD(DUK_DDDPRINT("base object buffer, key is a fast-path fastint; arr_idx %ld", (long) arr_idx)); + pop_count = 0; + } else +#endif + if (DUK_TVAL_IS_NUMBER(tv_key)) { + arr_idx = duk__tval_number_to_arr_idx(tv_key); + DUK_DDD(DUK_DDDPRINT("base object buffer, key is a fast-path number; arr_idx %ld", (long) arr_idx)); + pop_count = 0; + } else { + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + DUK_DDD(DUK_DDDPRINT("base object buffer, key is a non-fast-path number; after " + "coercion key is %!T, arr_idx %ld", + (duk_tval *) duk_get_tval(thr, -1), + (long) arr_idx)); + pop_count = 1; + } + + if (arr_idx != DUK__NO_ARRAY_INDEX && arr_idx < DUK_HBUFFER_GET_SIZE(h)) { + duk_uint8_t *data; + DUK_DDD(DUK_DDDPRINT("writing to buffer data at index %ld", (long) arr_idx)); + data = (duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h); + + /* XXX: duk_to_int() ensures we'll get 8 lowest bits as + * as input is within duk_int_t range (capped outside it). + */ +#if defined(DUK_USE_FASTINT) + /* Buffer writes are often integers. */ + if (DUK_TVAL_IS_FASTINT(tv_val)) { + data[arr_idx] = (duk_uint8_t) DUK_TVAL_GET_FASTINT_U32(tv_val); + } else +#endif + { + duk_push_tval(thr, tv_val); + data[arr_idx] = (duk_uint8_t) duk_to_uint32(thr, -1); + pop_count++; + } + + duk_pop_n_unsafe(thr, pop_count); + DUK_DDD(DUK_DDDPRINT("result: success (buffer data write)")); + DUK_STATS_INC(thr->heap, stats_putprop_bufferidx); + return 1; + } + + if (pop_count == 0) { + /* This is a pretty awkward control flow, but we need to recheck the + * key coercion here. + */ + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + DUK_DDD(DUK_DDDPRINT("base object buffer, key is a non-fast-path number; after " + "coercion key is %!T, arr_idx %ld", + (duk_tval *) duk_get_tval(thr, -1), + (long) arr_idx)); + } + + if (key == DUK_HTHREAD_STRING_LENGTH(thr)) { + goto fail_not_writable; + } + + DUK_DDD(DUK_DDDPRINT("base object is a buffer, start lookup from Uint8Array prototype")); + curr = thr->builtins[DUK_BIDX_UINT8ARRAY_PROTOTYPE]; + goto lookup; /* avoid double coercion */ + } + + case DUK_TAG_POINTER: { + DUK_DDD(DUK_DDDPRINT("base object is a pointer, start lookup from pointer prototype")); + curr = thr->builtins[DUK_BIDX_POINTER_PROTOTYPE]; + break; + } + + case DUK_TAG_LIGHTFUNC: { + /* Lightfuncs have no own properties and are considered non-extensible. + * However, the write may be captured by an inherited setter which + * means we can't stop the lookup here. + */ + DUK_DDD(DUK_DDDPRINT("base object is a lightfunc, start lookup from function prototype")); + curr = thr->builtins[DUK_BIDX_NATIVE_FUNCTION_PROTOTYPE]; + break; + } + +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: { + /* number */ + DUK_DDD(DUK_DDDPRINT("base object is a number, start lookup from number prototype")); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv_obj)); + curr = thr->builtins[DUK_BIDX_NUMBER_PROTOTYPE]; + break; + } + } + + DUK_ASSERT(key == NULL); + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + +lookup: + + /* + * Check whether the property already exists in the prototype chain. + * Note that the actual write goes into the original base object + * (except if an accessor property captures the write). + */ + + /* [key] */ + + DUK_ASSERT(curr != NULL); + sanity = DUK_HOBJECT_PROTOTYPE_CHAIN_SANITY; + do { + if (!duk__get_own_propdesc_raw(thr, curr, key, arr_idx, &desc, 0 /*flags*/)) { /* don't push value */ + goto next_in_chain; + } + + if (desc.flags & DUK_PROPDESC_FLAG_ACCESSOR) { + /* + * Found existing accessor property (own or inherited). + * Call setter with 'this' set to orig, and value as the only argument. + * Setter calls are OK even for ROM objects. + * + * Note: no exotic arguments object behavior, because [[Put]] never + * calls [[DefineOwnProperty]] (E5 Section 8.12.5, step 5.b). + */ + + duk_hobject *setter; + + DUK_DD(DUK_DDPRINT("put to an own or inherited accessor, calling setter")); + + setter = DUK_HOBJECT_E_GET_VALUE_SETTER(thr->heap, curr, desc.e_idx); + if (!setter) { + goto fail_no_setter; + } + duk_push_hobject(thr, setter); + duk_push_tval(thr, tv_obj); /* note: original, uncoerced base */ + duk_push_tval(thr, tv_val); /* [key setter this val] */ +#if defined(DUK_USE_NONSTD_SETTER_KEY_ARGUMENT) + duk_dup_m4(thr); + duk_call_method(thr, 2); /* [key setter this val key] -> [key retval] */ +#else + duk_call_method(thr, 1); /* [key setter this val] -> [key retval] */ +#endif + duk_pop_unsafe(thr); /* ignore retval -> [key] */ + goto success_no_arguments_exotic; + } + + if (orig == NULL) { + /* + * Found existing own or inherited plain property, but original + * base is a primitive value. + */ + DUK_DD(DUK_DDPRINT("attempt to create a new property in a primitive base object")); + goto fail_base_primitive; + } + + if (curr != orig) { + /* + * Found existing inherited plain property. + * Do an access control check, and if OK, write + * new property to 'orig'. + */ + if (!DUK_HOBJECT_HAS_EXTENSIBLE(orig)) { + DUK_DD( + DUK_DDPRINT("found existing inherited plain property, but original object is not extensible")); + goto fail_not_extensible; + } + if (!(desc.flags & DUK_PROPDESC_FLAG_WRITABLE)) { + DUK_DD(DUK_DDPRINT("found existing inherited plain property, original object is extensible, but " + "inherited property is not writable")); + goto fail_not_writable; + } + DUK_DD(DUK_DDPRINT("put to new property, object extensible, inherited property found and is writable")); + goto create_new; + } else { + /* + * Found existing own (non-inherited) plain property. + * Do an access control check and update in place. + */ + + if (!(desc.flags & DUK_PROPDESC_FLAG_WRITABLE)) { + DUK_DD( + DUK_DDPRINT("found existing own (non-inherited) plain property, but property is not writable")); + goto fail_not_writable; + } + if (desc.flags & DUK_PROPDESC_FLAG_VIRTUAL) { + DUK_DD(DUK_DDPRINT("found existing own (non-inherited) virtual property, property is writable")); + + if (DUK_HOBJECT_IS_ARRAY(curr)) { + /* + * Write to 'length' of an array is a very complex case + * handled in a helper which updates both the array elements + * and writes the new 'length'. The write may result in an + * unconditional RangeError or a partial write (indicated + * by a return code). + * + * Note: the helper has an unnecessary writability check + * for 'length', we already know it is writable. + */ + DUK_ASSERT(key == DUK_HTHREAD_STRING_LENGTH(thr)); /* only virtual array property */ + + DUK_DDD(DUK_DDDPRINT( + "writing existing 'length' property to array exotic, invoke complex helper")); + + /* XXX: the helper currently assumes stack top contains new + * 'length' value and the whole calling convention is not very + * compatible with what we need. + */ + + duk_push_tval(thr, tv_val); /* [key val] */ + rc = duk__handle_put_array_length(thr, orig); + duk_pop_unsafe(thr); /* [key val] -> [key] */ + if (!rc) { + goto fail_array_length_partial; + } + + /* key is 'length', cannot match argument exotic behavior */ + goto success_no_arguments_exotic; + } +#if defined(DUK_USE_BUFFEROBJECT_SUPPORT) + else if (DUK_HOBJECT_IS_BUFOBJ(curr)) { + duk_hbufobj *h_bufobj; + duk_uint_t byte_off; + duk_small_uint_t elem_size; + + h_bufobj = (duk_hbufobj *) curr; + DUK_HBUFOBJ_ASSERT_VALID(h_bufobj); + + DUK_DD(DUK_DDPRINT("writable virtual property is in buffer object")); + + /* Careful with wrapping: arr_idx upshift may easily wrap, whereas + * length downshift won't. + */ + if (arr_idx < (h_bufobj->length >> h_bufobj->shift) && + DUK_HBUFOBJ_HAS_VIRTUAL_INDICES(h_bufobj)) { + duk_uint8_t *data; + DUK_DDD(DUK_DDDPRINT("writing to buffer data at index %ld", (long) arr_idx)); + + DUK_ASSERT(arr_idx != DUK__NO_ARRAY_INDEX); /* index/length check guarantees */ + byte_off = arr_idx + << h_bufobj->shift; /* no wrap assuming h_bufobj->length is valid */ + elem_size = (duk_small_uint_t) (1U << h_bufobj->shift); + + /* Coerce to number before validating pointers etc so that the + * number coercions in duk_hbufobj_validated_write() are + * guaranteed to be side effect free and not invalidate the + * pointer checks we do here. + */ + duk_push_tval(thr, tv_val); + (void) duk_to_number_m1(thr); + + if (h_bufobj->buf != NULL && + DUK_HBUFOBJ_VALID_BYTEOFFSET_EXCL(h_bufobj, byte_off + elem_size)) { + data = (duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(thr->heap, h_bufobj->buf) + + h_bufobj->offset + byte_off; + duk_hbufobj_validated_write(thr, h_bufobj, data, elem_size); + } else { + DUK_D(DUK_DPRINT( + "bufobj access out of underlying buffer, ignoring (write skipped)")); + } + duk_pop_unsafe(thr); + goto success_no_arguments_exotic; + } + } +#endif /* DUK_USE_BUFFEROBJECT_SUPPORT */ + + DUK_D(DUK_DPRINT("should not happen, key %!O", key)); + goto fail_internal; /* should not happen */ + } + DUK_DD(DUK_DDPRINT("put to existing own plain property, property is writable")); + goto update_old; + } + DUK_UNREACHABLE(); + + next_in_chain: + /* XXX: option to pretend property doesn't exist if sanity limit is + * hit might be useful. + */ + if (DUK_UNLIKELY(sanity-- == 0)) { + DUK_ERROR_RANGE(thr, DUK_STR_PROTOTYPE_CHAIN_LIMIT); + DUK_WO_NORETURN(return 0;); + } + curr = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, curr); + } while (curr != NULL); + + /* + * Property not found in prototype chain. + */ + + DUK_DDD(DUK_DDDPRINT("property not found in prototype chain")); + + if (orig == NULL) { + DUK_DD(DUK_DDPRINT("attempt to create a new property in a primitive base object")); + goto fail_base_primitive; + } + + if (!DUK_HOBJECT_HAS_EXTENSIBLE(orig)) { + DUK_DD(DUK_DDPRINT("put to a new property (not found in prototype chain), but original object not extensible")); + goto fail_not_extensible; + } + + goto create_new; + +update_old: + + /* + * Update an existing property of the base object. + */ + + /* [key] */ + + DUK_DDD(DUK_DDDPRINT("update an existing property of the original object")); + + DUK_ASSERT(orig != NULL); +#if defined(DUK_USE_ROM_OBJECTS) + /* This should not happen because DUK_TAG_OBJECT case checks + * for this already, but check just in case. + */ + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) orig)) { + goto fail_not_writable; + } +#endif + + /* Although there are writable virtual properties (e.g. plain buffer + * and buffer object number indices), they are handled before we come + * here. + */ + DUK_ASSERT((desc.flags & DUK_PROPDESC_FLAG_VIRTUAL) == 0); + DUK_ASSERT(desc.a_idx >= 0 || desc.e_idx >= 0); + + /* Array own property .length is handled above. */ + DUK_ASSERT(!(DUK_HOBJECT_IS_ARRAY(orig) && key == DUK_HTHREAD_STRING_LENGTH(thr))); + + if (desc.e_idx >= 0) { + tv = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, orig, desc.e_idx); + DUK_DDD(DUK_DDDPRINT("previous entry value: %!iT", (duk_tval *) tv)); + DUK_TVAL_SET_TVAL_UPDREF(thr, tv, tv_val); /* side effects; e_idx may be invalidated */ + /* don't touch property attributes or hash part */ + DUK_DD(DUK_DDPRINT("put to an existing entry at index %ld -> new value %!iT", (long) desc.e_idx, (duk_tval *) tv)); + } else { + /* Note: array entries are always writable, so the writability check + * above is pointless for them. The check could be avoided with some + * refactoring but is probably not worth it. + */ + + DUK_ASSERT(desc.a_idx >= 0); + tv = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, orig, desc.a_idx); + DUK_DDD(DUK_DDDPRINT("previous array value: %!iT", (duk_tval *) tv)); + DUK_TVAL_SET_TVAL_UPDREF(thr, tv, tv_val); /* side effects; a_idx may be invalidated */ + DUK_DD(DUK_DDPRINT("put to an existing array entry at index %ld -> new value %!iT", + (long) desc.a_idx, + (duk_tval *) tv)); + } + + /* Regardless of whether property is found in entry or array part, + * it may have arguments exotic behavior (array indices may reside + * in entry part for abandoned / non-existent array parts). + */ + goto success_with_arguments_exotic; + +create_new: + + /* + * Create a new property in the original object. + * + * Exotic properties need to be reconsidered here from a write + * perspective (not just property attributes perspective). + * However, the property does not exist in the object already, + * so this limits the kind of exotic properties that apply. + */ + + /* [key] */ + + DUK_DDD(DUK_DDDPRINT("create new property to original object")); + + DUK_ASSERT(orig != NULL); + + /* Array own property .length is handled above. */ + DUK_ASSERT(!(DUK_HOBJECT_IS_ARRAY(orig) && key == DUK_HTHREAD_STRING_LENGTH(thr))); + +#if defined(DUK_USE_ROM_OBJECTS) + /* This should not happen because DUK_TAG_OBJECT case checks + * for this already, but check just in case. + */ + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) orig)) { + goto fail_not_writable; + } +#endif + + /* Not possible because array object 'length' is present + * from its creation and cannot be deleted, and is thus + * caught as an existing property above. + */ + DUK_ASSERT(!(DUK_HOBJECT_HAS_EXOTIC_ARRAY(orig) && key == DUK_HTHREAD_STRING_LENGTH(thr))); + + if (DUK_HOBJECT_HAS_EXOTIC_ARRAY(orig) && arr_idx != DUK__NO_ARRAY_INDEX) { + /* automatic length update */ + duk_uint32_t old_len; + duk_harray *a; + + a = (duk_harray *) orig; + DUK_HARRAY_ASSERT_VALID(a); + + old_len = a->length; + + if (arr_idx >= old_len) { + DUK_DDD(DUK_DDDPRINT("write new array entry requires length update " + "(arr_idx=%ld, old_len=%ld)", + (long) arr_idx, + (long) old_len)); + + if (DUK_HARRAY_LENGTH_NONWRITABLE(a)) { + DUK_DD(DUK_DDPRINT("attempt to extend array, but array 'length' is not writable")); + goto fail_not_writable; + } + + /* Note: actual update happens once write has been completed + * without error below. The write should always succeed + * from a specification viewpoint, but we may e.g. run out + * of memory. It's safer in this order. + */ + + DUK_ASSERT(arr_idx != 0xffffffffUL); + new_array_length = arr_idx + 1; /* flag for later write */ + } else { + DUK_DDD(DUK_DDDPRINT("write new array entry does not require length update " + "(arr_idx=%ld, old_len=%ld)", + (long) arr_idx, + (long) old_len)); + } + } + + /* write_to_array_part: */ + + /* + * Write to array part? + * + * Note: array abandonding requires a property resize which uses + * 'rechecks' valstack for temporaries and may cause any existing + * valstack pointers to be invalidated. To protect against this, + * tv_obj, tv_key, and tv_val are copies of the original inputs. + */ + + if (arr_idx != DUK__NO_ARRAY_INDEX && DUK_HOBJECT_HAS_ARRAY_PART(orig)) { + tv = duk__obtain_arridx_slot(thr, arr_idx, orig); + if (tv == NULL) { + DUK_ASSERT(!DUK_HOBJECT_HAS_ARRAY_PART(orig)); + goto write_to_entry_part; + } + + /* prev value must be unused, no decref */ + DUK_ASSERT(DUK_TVAL_IS_UNUSED(tv)); + DUK_TVAL_SET_TVAL(tv, tv_val); + DUK_TVAL_INCREF(thr, tv); + DUK_DD(DUK_DDPRINT("put to new array entry: %ld -> %!T", (long) arr_idx, (duk_tval *) tv)); + + /* Note: array part values are [[Writable]], [[Enumerable]], + * and [[Configurable]] which matches the required attributes + * here. + */ + goto entry_updated; + } + +write_to_entry_part: + + /* + * Write to entry part + */ + + /* entry allocation updates hash part and increases the key + * refcount; may need a props allocation resize but doesn't + * 'recheck' the valstack. + */ + e_idx = duk__hobject_alloc_entry_checked(thr, orig, key); + DUK_ASSERT(e_idx >= 0); + + tv = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, orig, e_idx); + /* prev value can be garbage, no decref */ + DUK_TVAL_SET_TVAL(tv, tv_val); + DUK_TVAL_INCREF(thr, tv); + DUK_HOBJECT_E_SET_FLAGS(thr->heap, orig, e_idx, DUK_PROPDESC_FLAGS_WEC); + goto entry_updated; + +entry_updated: + + /* + * Possible pending array length update, which must only be done + * if the actual entry write succeeded. + */ + + if (new_array_length > 0) { + /* Note: zero works as a "no update" marker because the new length + * can never be zero after a new property is written. + */ + + DUK_ASSERT(DUK_HOBJECT_HAS_EXOTIC_ARRAY(orig)); + + DUK_DDD(DUK_DDDPRINT("write successful, pending array length update to: %ld", (long) new_array_length)); + + ((duk_harray *) orig)->length = new_array_length; + } + + /* + * Arguments exotic behavior not possible for new properties: all + * magically bound properties are initially present in the arguments + * object, and if they are deleted, the binding is also removed from + * parameter map. + */ + + goto success_no_arguments_exotic; + +success_with_arguments_exotic: + + /* + * Arguments objects have exotic [[DefineOwnProperty]] which updates + * the internal 'map' of arguments for writes to currently mapped + * arguments. More conretely, writes to mapped arguments generate + * a write to a bound variable. + * + * The [[Put]] algorithm invokes [[DefineOwnProperty]] for existing + * data properties and new properties, but not for existing accessors. + * Hence, in E5 Section 10.6 ([[DefinedOwnProperty]] algorithm), we + * have a Desc with 'Value' (and possibly other properties too), and + * we end up in step 5.b.i. + */ + + if (arr_idx != DUK__NO_ARRAY_INDEX && DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(orig)) { + /* Note: only numbered indices are relevant, so arr_idx fast reject + * is good (this is valid unless there are more than 4**32-1 arguments). + */ + + DUK_DDD(DUK_DDDPRINT("putprop successful, arguments exotic behavior needed")); + + /* Note: we can reuse 'desc' here */ + + /* XXX: top of stack must contain value, which helper doesn't touch, + * rework to use tv_val directly? + */ + + duk_push_tval(thr, tv_val); + (void) duk__check_arguments_map_for_put(thr, orig, key, &desc, throw_flag); + duk_pop_unsafe(thr); + } + /* fall thru */ + +success_no_arguments_exotic: + /* shared exit path now */ + DUK_DDD(DUK_DDDPRINT("result: success")); + duk_pop_unsafe(thr); /* remove key */ + return 1; + +#if defined(DUK_USE_ES6_PROXY) +fail_proxy_rejected: + DUK_DDD(DUK_DDDPRINT("result: error, proxy rejects")); + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_PROXY_REJECTED); + DUK_WO_NORETURN(return 0;); + } + /* Note: no key on stack */ + return 0; +#endif + +fail_base_primitive: + DUK_DDD(DUK_DDDPRINT("result: error, base primitive")); + if (throw_flag) { +#if defined(DUK_USE_PARANOID_ERRORS) + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_BASE); +#else + DUK_ERROR_FMT2(thr, + DUK_ERR_TYPE_ERROR, + "cannot write property %s of %s", + duk_push_string_tval_readable(thr, tv_key), + duk_push_string_tval_readable(thr, tv_obj)); +#endif + DUK_WO_NORETURN(return 0;); + } + duk_pop_unsafe(thr); /* remove key */ + return 0; + +fail_not_extensible: + DUK_DDD(DUK_DDDPRINT("result: error, not extensible")); + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_EXTENSIBLE); + DUK_WO_NORETURN(return 0;); + } + duk_pop_unsafe(thr); /* remove key */ + return 0; + +fail_not_writable: + DUK_DDD(DUK_DDDPRINT("result: error, not writable")); + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_WRITABLE); + DUK_WO_NORETURN(return 0;); + } + duk_pop_unsafe(thr); /* remove key */ + return 0; + +#if defined(DUK_USE_ROM_OBJECTS) +fail_not_writable_no_pop: + DUK_DDD(DUK_DDDPRINT("result: error, not writable")); + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_WRITABLE); + DUK_WO_NORETURN(return 0;); + } + return 0; +#endif + +fail_array_length_partial: + DUK_DD(DUK_DDPRINT("result: error, array length write only partially successful")); + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CONFIGURABLE); + DUK_WO_NORETURN(return 0;); + } + duk_pop_unsafe(thr); /* remove key */ + return 0; + +fail_no_setter: + DUK_DDD(DUK_DDDPRINT("result: error, accessor property without setter")); + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_SETTER_UNDEFINED); + DUK_WO_NORETURN(return 0;); + } + duk_pop_unsafe(thr); /* remove key */ + return 0; + +fail_internal: + DUK_DDD(DUK_DDDPRINT("result: error, internal")); + if (throw_flag) { + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return 0;); + } + duk_pop_unsafe(thr); /* remove key */ + return 0; +} + +/* + * ECMAScript compliant [[Delete]](P, Throw). + */ + +DUK_INTERNAL duk_bool_t duk_hobject_delprop_raw(duk_hthread *thr, duk_hobject *obj, duk_hstring *key, duk_small_uint_t flags) { + duk_propdesc desc; + duk_tval *tv; + duk_uint32_t arr_idx; + duk_bool_t throw_flag; + duk_bool_t force_flag; + + throw_flag = (flags & DUK_DELPROP_FLAG_THROW); + force_flag = (flags & DUK_DELPROP_FLAG_FORCE); + + DUK_DDD(DUK_DDDPRINT("delprop_raw: thr=%p, obj=%p, key=%p, throw=%ld, force=%ld (obj -> %!O, key -> %!O)", + (void *) thr, + (void *) obj, + (void *) key, + (long) throw_flag, + (long) force_flag, + (duk_heaphdr *) obj, + (duk_heaphdr *) key)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + arr_idx = DUK_HSTRING_GET_ARRIDX_FAST(key); + + /* 0 = don't push current value */ + if (!duk__get_own_propdesc_raw(thr, obj, key, arr_idx, &desc, 0 /*flags*/)) { /* don't push value */ + DUK_DDD(DUK_DDDPRINT("property not found, succeed always")); + goto success; + } + +#if defined(DUK_USE_ROM_OBJECTS) + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)) { + DUK_DD(DUK_DDPRINT("attempt to delprop on read-only target object")); + goto fail_not_configurable; + } +#endif + + if ((desc.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) == 0 && !force_flag) { + goto fail_not_configurable; + } + if (desc.a_idx < 0 && desc.e_idx < 0) { + /* Currently there are no deletable virtual properties, but + * with force_flag we might attempt to delete one. + */ + DUK_DD(DUK_DDPRINT("delete failed: property found, force flag, but virtual (and implicitly non-configurable)")); + goto fail_virtual; + } + + if (desc.a_idx >= 0) { + DUK_ASSERT(desc.e_idx < 0); + + tv = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, desc.a_idx); + DUK_TVAL_SET_UNUSED_UPDREF(thr, tv); /* side effects */ + goto success; + } else { + DUK_ASSERT(desc.a_idx < 0); + + /* remove hash entry (no decref) */ +#if defined(DUK_USE_HOBJECT_HASH_PART) + if (desc.h_idx >= 0) { + duk_uint32_t *h_base = DUK_HOBJECT_H_GET_BASE(thr->heap, obj); + + DUK_DDD(DUK_DDDPRINT("removing hash entry at h_idx %ld", (long) desc.h_idx)); + DUK_ASSERT(DUK_HOBJECT_GET_HSIZE(obj) > 0); + DUK_ASSERT((duk_uint32_t) desc.h_idx < DUK_HOBJECT_GET_HSIZE(obj)); + h_base[desc.h_idx] = DUK__HASH_DELETED; + } else { + DUK_ASSERT(DUK_HOBJECT_GET_HSIZE(obj) == 0); + } +#else + DUK_ASSERT(DUK_HOBJECT_GET_HSIZE(obj) == 0); +#endif + + /* Remove value. This requires multiple writes so avoid side + * effects via no-refzero macros so that e_idx is not + * invalidated. + */ + DUK_DDD(DUK_DDDPRINT("before removing value, e_idx %ld, key %p, key at slot %p", + (long) desc.e_idx, + (void *) key, + (void *) DUK_HOBJECT_E_GET_KEY(thr->heap, obj, desc.e_idx))); + DUK_DDD(DUK_DDDPRINT("removing value at e_idx %ld", (long) desc.e_idx)); + if (DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, obj, desc.e_idx)) { + duk_hobject *tmp; + + tmp = DUK_HOBJECT_E_GET_VALUE_GETTER(thr->heap, obj, desc.e_idx); + DUK_HOBJECT_E_SET_VALUE_GETTER(thr->heap, obj, desc.e_idx, NULL); + DUK_UNREF(tmp); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, tmp); + + tmp = DUK_HOBJECT_E_GET_VALUE_SETTER(thr->heap, obj, desc.e_idx); + DUK_HOBJECT_E_SET_VALUE_SETTER(thr->heap, obj, desc.e_idx, NULL); + DUK_UNREF(tmp); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, tmp); + } else { + tv = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, obj, desc.e_idx); + DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ(thr, tv); + } +#if 0 + /* Not strictly necessary because if key == NULL, flag MUST be ignored. */ + DUK_HOBJECT_E_SET_FLAGS(thr->heap, obj, desc.e_idx, 0); +#endif + + /* Remove key. */ + DUK_DDD(DUK_DDDPRINT("before removing key, e_idx %ld, key %p, key at slot %p", + (long) desc.e_idx, + (void *) key, + (void *) DUK_HOBJECT_E_GET_KEY(thr->heap, obj, desc.e_idx))); + DUK_DDD(DUK_DDDPRINT("removing key at e_idx %ld", (long) desc.e_idx)); + DUK_ASSERT(key == DUK_HOBJECT_E_GET_KEY(thr->heap, obj, desc.e_idx)); + DUK_HOBJECT_E_SET_KEY(thr->heap, obj, desc.e_idx, NULL); + DUK_HSTRING_DECREF_NORZ(thr, key); + + /* Trigger refzero side effects only when we're done as a + * finalizer might operate on the object and affect the + * e_idx we're supposed to use. + */ + DUK_REFZERO_CHECK_SLOW(thr); + goto success; + } + + DUK_UNREACHABLE(); + +success: + /* + * Argument exotic [[Delete]] behavior (E5 Section 10.6) is + * a post-check, keeping arguments internal 'map' in sync with + * any successful deletes (note that property does not need to + * exist for delete to 'succeed'). + * + * Delete key from 'map'. Since 'map' only contains array index + * keys, we can use arr_idx for a fast skip. + */ + + DUK_DDD(DUK_DDDPRINT("delete successful, check for arguments exotic behavior")); + + if (arr_idx != DUK__NO_ARRAY_INDEX && DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(obj)) { + /* Note: only numbered indices are relevant, so arr_idx fast reject + * is good (this is valid unless there are more than 4**32-1 arguments). + */ + + DUK_DDD(DUK_DDDPRINT("delete successful, arguments exotic behavior needed")); + + /* Note: we can reuse 'desc' here */ + (void) duk__check_arguments_map_for_delete(thr, obj, key, &desc); + } + + DUK_DDD(DUK_DDDPRINT("delete successful")); + return 1; + +fail_virtual: /* just use the same "not configurable" error message */ +fail_not_configurable: + DUK_DDD(DUK_DDDPRINT("delete failed: property found, not configurable")); + + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CONFIGURABLE); + DUK_WO_NORETURN(return 0;); + } + return 0; +} + +/* + * DELPROP: ECMAScript property deletion. + */ + +DUK_INTERNAL duk_bool_t duk_hobject_delprop(duk_hthread *thr, duk_tval *tv_obj, duk_tval *tv_key, duk_bool_t throw_flag) { + duk_hstring *key = NULL; +#if defined(DUK_USE_ES6_PROXY) + duk_propdesc desc; +#endif + duk_int_t entry_top; + duk_uint32_t arr_idx = DUK__NO_ARRAY_INDEX; + duk_bool_t rc; + + DUK_DDD(DUK_DDDPRINT("delprop: thr=%p, obj=%p, key=%p (obj -> %!T, key -> %!T)", + (void *) thr, + (void *) tv_obj, + (void *) tv_key, + (duk_tval *) tv_obj, + (duk_tval *) tv_key)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(tv_obj != NULL); + DUK_ASSERT(tv_key != NULL); + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + /* Storing the entry top is cheaper here to ensure stack is correct at exit, + * as there are several paths out. + */ + entry_top = duk_get_top(thr); + + if (DUK_TVAL_IS_UNDEFINED(tv_obj) || DUK_TVAL_IS_NULL(tv_obj)) { + DUK_DDD(DUK_DDDPRINT("base object is undefined or null -> reject")); + goto fail_invalid_base_uncond; + } + + duk_push_tval(thr, tv_obj); + duk_push_tval(thr, tv_key); + + tv_obj = DUK_GET_TVAL_NEGIDX(thr, -2); + if (DUK_TVAL_IS_OBJECT(tv_obj)) { + duk_hobject *obj = DUK_TVAL_GET_OBJECT(tv_obj); + DUK_ASSERT(obj != NULL); + +#if defined(DUK_USE_ES6_PROXY) + if (DUK_UNLIKELY(DUK_HOBJECT_IS_PROXY(obj))) { + duk_hobject *h_target; + duk_bool_t tmp_bool; + + /* Note: proxy handling must happen before key is string coerced. */ + + if (duk__proxy_check_prop(thr, obj, DUK_STRIDX_DELETE_PROPERTY, tv_key, &h_target)) { + /* -> [ ... obj key trap handler ] */ + DUK_DDD(DUK_DDDPRINT("-> proxy object 'deleteProperty' for key %!T", (duk_tval *) tv_key)); + duk_push_hobject(thr, h_target); /* target */ + duk_dup_m4(thr); /* P */ + duk_call_method(thr, 2 /*nargs*/); + tmp_bool = duk_to_boolean_top_pop(thr); + if (!tmp_bool) { + goto fail_proxy_rejected; /* retval indicates delete failed */ + } + + /* Target object must be checked for a conflicting + * non-configurable property. + */ + tv_key = DUK_GET_TVAL_NEGIDX(thr, -1); + arr_idx = duk__push_tval_to_property_key(thr, tv_key, &key); + DUK_ASSERT(key != NULL); + + if (duk__get_own_propdesc_raw(thr, h_target, key, arr_idx, &desc, 0 /*flags*/)) { /* don't push + value */ + duk_small_int_t desc_reject; + + DUK_DDD(DUK_DDDPRINT("proxy 'deleteProperty': target has matching property %!O, check for " + "conflicting property; desc.flags=0x%08lx, " + "desc.get=%p, desc.set=%p", + (duk_heaphdr *) key, + (unsigned long) desc.flags, + (void *) desc.get, + (void *) desc.set)); + + desc_reject = !(desc.flags & DUK_PROPDESC_FLAG_CONFIGURABLE); + if (desc_reject) { + /* unconditional */ + DUK_ERROR_TYPE(thr, DUK_STR_PROXY_REJECTED); + DUK_WO_NORETURN(return 0;); + } + } + rc = 1; /* success */ + goto done_rc; + } + + obj = h_target; /* resume delete to target */ + } +#endif /* DUK_USE_ES6_PROXY */ + + arr_idx = duk__to_property_key(thr, -1, &key); + DUK_ASSERT(key != NULL); + + rc = duk_hobject_delprop_raw(thr, obj, key, throw_flag ? DUK_DELPROP_FLAG_THROW : 0); + goto done_rc; + } else if (DUK_TVAL_IS_STRING(tv_obj)) { + /* String has .length and array index virtual properties + * which can't be deleted. No need for a symbol check; + * no offending virtual symbols exist. + */ + /* XXX: unnecessary string coercion for array indices, + * intentional to keep small. + */ + duk_hstring *h = DUK_TVAL_GET_STRING(tv_obj); + DUK_ASSERT(h != NULL); + + arr_idx = duk__to_property_key(thr, -1, &key); + DUK_ASSERT(key != NULL); + + if (key == DUK_HTHREAD_STRING_LENGTH(thr)) { + goto fail_not_configurable; + } + + if (arr_idx != DUK__NO_ARRAY_INDEX && arr_idx < DUK_HSTRING_GET_CHARLEN(h)) { + goto fail_not_configurable; + } + } else if (DUK_TVAL_IS_BUFFER(tv_obj)) { + /* XXX: unnecessary string coercion for array indices, + * intentional to keep small; some overlap with string + * handling. + */ + duk_hbuffer *h = DUK_TVAL_GET_BUFFER(tv_obj); + DUK_ASSERT(h != NULL); + + arr_idx = duk__to_property_key(thr, -1, &key); + DUK_ASSERT(key != NULL); + + if (key == DUK_HTHREAD_STRING_LENGTH(thr)) { + goto fail_not_configurable; + } + + if (arr_idx != DUK__NO_ARRAY_INDEX && arr_idx < DUK_HBUFFER_GET_SIZE(h)) { + goto fail_not_configurable; + } + } else if (DUK_TVAL_IS_LIGHTFUNC(tv_obj)) { + /* Lightfunc has no virtual properties since Duktape 2.2 + * so success. Still must coerce key for side effects. + */ + + arr_idx = duk__to_property_key(thr, -1, &key); + DUK_ASSERT(key != NULL); + DUK_UNREF(key); + } + + /* non-object base, no offending virtual property */ + rc = 1; + goto done_rc; + +done_rc: + duk_set_top_unsafe(thr, entry_top); + return rc; + +fail_invalid_base_uncond: + /* Note: unconditional throw */ + DUK_ASSERT(duk_get_top(thr) == entry_top); +#if defined(DUK_USE_PARANOID_ERRORS) + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_BASE); +#else + DUK_ERROR_FMT2(thr, + DUK_ERR_TYPE_ERROR, + "cannot delete property %s of %s", + duk_push_string_tval_readable(thr, tv_key), + duk_push_string_tval_readable(thr, tv_obj)); +#endif + DUK_WO_NORETURN(return 0;); + +#if defined(DUK_USE_ES6_PROXY) +fail_proxy_rejected: + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_PROXY_REJECTED); + DUK_WO_NORETURN(return 0;); + } + duk_set_top_unsafe(thr, entry_top); + return 0; +#endif + +fail_not_configurable: + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CONFIGURABLE); + DUK_WO_NORETURN(return 0;); + } + duk_set_top_unsafe(thr, entry_top); + return 0; +} + +/* + * Internal helper to define a property with specific flags, ignoring + * normal semantics such as extensibility, write protection etc. + * Overwrites any existing value and attributes unless caller requests + * that value only be updated if it doesn't already exists. + * + * Does not support: + * - virtual properties (error if write attempted) + * - getter/setter properties (error if write attempted) + * - non-default (!= WEC) attributes for array entries (error if attempted) + * - array abandoning: if array part exists, it is always extended + * - array 'length' updating + * + * Stack: [... in_val] -> [] + * + * Used for e.g. built-in initialization and environment record + * operations. + */ + +DUK_INTERNAL void duk_hobject_define_property_internal(duk_hthread *thr, + duk_hobject *obj, + duk_hstring *key, + duk_small_uint_t flags) { + duk_propdesc desc; + duk_uint32_t arr_idx; + duk_int_t e_idx; + duk_tval *tv1 = NULL; + duk_tval *tv2 = NULL; + duk_small_uint_t propflags = flags & DUK_PROPDESC_FLAGS_MASK; /* mask out flags not actually stored */ + + DUK_DDD(DUK_DDDPRINT("define new property (internal): thr=%p, obj=%!O, key=%!O, flags=0x%02lx, val=%!T", + (void *) thr, + (duk_heaphdr *) obj, + (duk_heaphdr *) key, + (unsigned long) flags, + (duk_tval *) duk_get_tval(thr, -1))); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)); + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + DUK_ASSERT(duk_is_valid_index(thr, -1)); /* contains value */ + + arr_idx = DUK_HSTRING_GET_ARRIDX_SLOW(key); + + if (duk__get_own_propdesc_raw(thr, obj, key, arr_idx, &desc, 0 /*flags*/)) { /* don't push value */ + if (desc.e_idx >= 0) { + if (flags & DUK_PROPDESC_FLAG_NO_OVERWRITE) { + DUK_DDD(DUK_DDDPRINT("property already exists in the entry part -> skip as requested")); + goto pop_exit; + } + DUK_DDD(DUK_DDDPRINT("property already exists in the entry part -> update value and attributes")); + if (DUK_UNLIKELY(DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, obj, desc.e_idx))) { + DUK_D(DUK_DPRINT("existing property is an accessor, not supported")); + goto error_internal; + } + + DUK_HOBJECT_E_SET_FLAGS(thr->heap, obj, desc.e_idx, propflags); + tv1 = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, obj, desc.e_idx); + } else if (desc.a_idx >= 0) { + if (flags & DUK_PROPDESC_FLAG_NO_OVERWRITE) { + DUK_DDD(DUK_DDDPRINT("property already exists in the array part -> skip as requested")); + goto pop_exit; + } + DUK_DDD(DUK_DDDPRINT("property already exists in the array part -> update value (assert attributes)")); + if (propflags != DUK_PROPDESC_FLAGS_WEC) { + DUK_D(DUK_DPRINT("existing property in array part, but propflags not WEC (0x%02lx)", + (unsigned long) propflags)); + goto error_internal; + } + + tv1 = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, desc.a_idx); + } else { + if (flags & DUK_PROPDESC_FLAG_NO_OVERWRITE) { + DUK_DDD(DUK_DDDPRINT("property already exists but is virtual -> skip as requested")); + goto pop_exit; + } + if (key == DUK_HTHREAD_STRING_LENGTH(thr) && DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj)) { + duk_uint32_t new_len; +#if defined(DUK_USE_DEBUG) + duk_uint32_t prev_len; + prev_len = ((duk_harray *) obj)->length; +#endif + new_len = duk__to_new_array_length_checked(thr, DUK_GET_TVAL_NEGIDX(thr, -1)); + ((duk_harray *) obj)->length = new_len; + DUK_DD(DUK_DDPRINT("internal define property for array .length: %ld -> %ld", + (long) prev_len, + (long) ((duk_harray *) obj)->length)); + goto pop_exit; + } + DUK_DD(DUK_DDPRINT("property already exists but is virtual -> failure")); + goto error_virtual; + } + + goto write_value; + } + + if (DUK_HOBJECT_HAS_ARRAY_PART(obj)) { + if (arr_idx != DUK__NO_ARRAY_INDEX) { + DUK_DDD(DUK_DDDPRINT("property does not exist, object has array part -> possibly extend array part and " + "write value (assert attributes)")); + DUK_ASSERT(propflags == DUK_PROPDESC_FLAGS_WEC); + + tv1 = duk__obtain_arridx_slot(thr, arr_idx, obj); + if (tv1 == NULL) { + DUK_ASSERT(!DUK_HOBJECT_HAS_ARRAY_PART(obj)); + goto write_to_entry_part; + } + + tv1 = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, arr_idx); + goto write_value; + } + } + +write_to_entry_part: + DUK_DDD(DUK_DDDPRINT( + "property does not exist, object belongs in entry part -> allocate new entry and write value and attributes")); + e_idx = duk__hobject_alloc_entry_checked(thr, obj, key); /* increases key refcount */ + DUK_ASSERT(e_idx >= 0); + DUK_HOBJECT_E_SET_FLAGS(thr->heap, obj, e_idx, propflags); + tv1 = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, obj, e_idx); + /* new entry: previous value is garbage; set to undefined to share write_value */ + DUK_TVAL_SET_UNDEFINED(tv1); + goto write_value; + +write_value: + /* tv1 points to value storage */ + + tv2 = duk_require_tval(thr, -1); /* late lookup, avoid side effects */ + DUK_DDD(DUK_DDDPRINT("writing/updating value: %!T -> %!T", (duk_tval *) tv1, (duk_tval *) tv2)); + + DUK_TVAL_SET_TVAL_UPDREF(thr, tv1, tv2); /* side effects */ + goto pop_exit; + +pop_exit: + duk_pop_unsafe(thr); /* remove in_val */ + return; + +error_virtual: /* share error message */ +error_internal: + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return;); +} + +/* + * Fast path for defining array indexed values without interning the key. + * This is used by e.g. code for Array prototype and traceback creation so + * must avoid interning. + */ + +DUK_INTERNAL void duk_hobject_define_property_internal_arridx(duk_hthread *thr, + duk_hobject *obj, + duk_uarridx_t arr_idx, + duk_small_uint_t flags) { + duk_hstring *key; + duk_tval *tv1, *tv2; + + DUK_DDD(DUK_DDDPRINT("define new property (internal) arr_idx fast path: thr=%p, obj=%!O, " + "arr_idx=%ld, flags=0x%02lx, val=%!T", + (void *) thr, + obj, + (long) arr_idx, + (unsigned long) flags, + (duk_tval *) duk_get_tval(thr, -1))); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)); + + if (DUK_HOBJECT_HAS_ARRAY_PART(obj) && arr_idx != DUK__NO_ARRAY_INDEX && flags == DUK_PROPDESC_FLAGS_WEC) { + DUK_ASSERT((flags & DUK_PROPDESC_FLAG_NO_OVERWRITE) == 0); /* covered by comparison */ + + DUK_DDD(DUK_DDDPRINT("define property to array part (property may or may not exist yet)")); + + tv1 = duk__obtain_arridx_slot(thr, arr_idx, obj); + if (tv1 == NULL) { + DUK_ASSERT(!DUK_HOBJECT_HAS_ARRAY_PART(obj)); + goto write_slow; + } + tv2 = duk_require_tval(thr, -1); + + DUK_TVAL_SET_TVAL_UPDREF(thr, tv1, tv2); /* side effects */ + + duk_pop_unsafe(thr); /* [ ...val ] -> [ ... ] */ + return; + } + +write_slow: + DUK_DDD(DUK_DDDPRINT("define property fast path didn't work, use slow path")); + + key = duk_push_uint_to_hstring(thr, (duk_uint_t) arr_idx); + DUK_ASSERT(key != NULL); + duk_insert(thr, -2); /* [ ... val key ] -> [ ... key val ] */ + + duk_hobject_define_property_internal(thr, obj, key, flags); + + duk_pop_unsafe(thr); /* [ ... key ] -> [ ... ] */ +} + +/* + * Internal helpers for managing object 'length' + */ + +DUK_INTERNAL duk_size_t duk_hobject_get_length(duk_hthread *thr, duk_hobject *obj) { + duk_double_t val; + + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(obj != NULL); + + /* Fast path for Arrays. */ + if (DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj)) { + return ((duk_harray *) obj)->length; + } + + /* Slow path, .length can be e.g. accessor, obj can be a Proxy, etc. */ + duk_push_hobject(thr, obj); + duk_push_hstring_stridx(thr, DUK_STRIDX_LENGTH); + (void) duk_hobject_getprop(thr, DUK_GET_TVAL_NEGIDX(thr, -2), DUK_GET_TVAL_NEGIDX(thr, -1)); + val = duk_to_number_m1(thr); + duk_pop_3_unsafe(thr); + + /* This isn't part of ECMAScript semantics; return a value within + * duk_size_t range, or 0 otherwise. + */ + if (val >= 0.0 && val <= (duk_double_t) DUK_SIZE_MAX) { + return (duk_size_t) val; + } + return 0; +} + +/* + * Fast finalizer check for an object. Walks the prototype chain, checking + * for finalizer presence using DUK_HOBJECT_FLAG_HAVE_FINALIZER which is kept + * in sync with the actual property when setting/removing the finalizer. + */ + +#if defined(DUK_USE_HEAPPTR16) +DUK_INTERNAL duk_bool_t duk_hobject_has_finalizer_fast_raw(duk_heap *heap, duk_hobject *obj) { +#else +DUK_INTERNAL duk_bool_t duk_hobject_has_finalizer_fast_raw(duk_hobject *obj) { +#endif + duk_uint_t sanity; + + DUK_ASSERT(obj != NULL); + + sanity = DUK_HOBJECT_PROTOTYPE_CHAIN_SANITY; + do { + if (DUK_UNLIKELY(DUK_HOBJECT_HAS_HAVE_FINALIZER(obj))) { + return 1; + } + if (DUK_UNLIKELY(sanity-- == 0)) { + DUK_D(DUK_DPRINT("prototype loop when checking for finalizer existence; returning false")); + return 0; + } +#if defined(DUK_USE_HEAPPTR16) + DUK_ASSERT(heap != NULL); + obj = DUK_HOBJECT_GET_PROTOTYPE(heap, obj); +#else + obj = DUK_HOBJECT_GET_PROTOTYPE(NULL, obj); /* 'heap' arg ignored */ +#endif + } while (obj != NULL); + + return 0; +} + +/* + * Object.getOwnPropertyDescriptor() (E5 Sections 15.2.3.3, 8.10.4) + * + * [ ... key ] -> [ ... desc/undefined ] + */ + +DUK_INTERNAL void duk_hobject_object_get_own_property_descriptor(duk_hthread *thr, duk_idx_t obj_idx) { + duk_hobject *obj; + duk_hstring *key; + duk_propdesc pd; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + + obj = duk_require_hobject_promote_mask(thr, obj_idx, DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + key = duk_to_property_key_hstring(thr, -1); + DUK_ASSERT(key != NULL); + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + if (!duk_hobject_get_own_propdesc(thr, obj, key, &pd, DUK_GETDESC_FLAG_PUSH_VALUE)) { + duk_push_undefined(thr); + duk_remove_m2(thr); + return; + } + + duk_push_object(thr); + + /* [ ... key value desc ] */ + + if (DUK_PROPDESC_IS_ACCESSOR(&pd)) { + /* If a setter/getter is missing (undefined), the descriptor must + * still have the property present with the value 'undefined'. + */ + if (pd.get) { + duk_push_hobject(thr, pd.get); + } else { + duk_push_undefined(thr); + } + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_GET); + if (pd.set) { + duk_push_hobject(thr, pd.set); + } else { + duk_push_undefined(thr); + } + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_SET); + } else { + duk_dup_m2(thr); + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_VALUE); + duk_push_boolean(thr, DUK_PROPDESC_IS_WRITABLE(&pd)); + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_WRITABLE); + } + duk_push_boolean(thr, DUK_PROPDESC_IS_ENUMERABLE(&pd)); + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_ENUMERABLE); + duk_push_boolean(thr, DUK_PROPDESC_IS_CONFIGURABLE(&pd)); + duk_put_prop_stridx_short(thr, -2, DUK_STRIDX_CONFIGURABLE); + + /* [ ... key value desc ] */ + + duk_replace(thr, -3); + duk_pop_unsafe(thr); /* -> [ ... desc ] */ +} + +/* + * NormalizePropertyDescriptor() related helper. + * + * Internal helper which validates and normalizes a property descriptor + * represented as an ECMAScript object (e.g. argument to defineProperty()). + * The output of this conversion is a set of defprop_flags and possibly + * some values pushed on the value stack to (1) ensure borrowed pointers + * remain valid, and (2) avoid unnecessary pops for footprint reasons. + * Caller must manage stack top carefully because the number of values + * pushed depends on the input property descriptor. + * + * The original descriptor object must not be altered in the process. + */ + +/* XXX: very basic optimization -> duk_get_prop_stridx_top */ + +DUK_INTERNAL +void duk_hobject_prepare_property_descriptor(duk_hthread *thr, + duk_idx_t idx_in, + duk_uint_t *out_defprop_flags, + duk_idx_t *out_idx_value, + duk_hobject **out_getter, + duk_hobject **out_setter) { + duk_idx_t idx_value = -1; + duk_hobject *getter = NULL; + duk_hobject *setter = NULL; + duk_bool_t is_data_desc = 0; + duk_bool_t is_acc_desc = 0; + duk_uint_t defprop_flags = 0; + + DUK_ASSERT(out_defprop_flags != NULL); + DUK_ASSERT(out_idx_value != NULL); + DUK_ASSERT(out_getter != NULL); + DUK_ASSERT(out_setter != NULL); + DUK_ASSERT(idx_in <= 0x7fffL); /* short variants would be OK, but not used to avoid shifts */ + + /* Must be an object, otherwise TypeError (E5.1 Section 8.10.5, step 1). */ + idx_in = duk_require_normalize_index(thr, idx_in); + (void) duk_require_hobject(thr, idx_in); + + /* The coercion order must match the ToPropertyDescriptor() algorithm + * so that side effects in coercion happen in the correct order. + * (This order also happens to be compatible with duk_def_prop(), + * although it doesn't matter in practice.) + */ + + if (duk_get_prop_stridx(thr, idx_in, DUK_STRIDX_VALUE)) { + is_data_desc = 1; + defprop_flags |= DUK_DEFPROP_HAVE_VALUE; + idx_value = duk_get_top_index(thr); + } + + if (duk_get_prop_stridx(thr, idx_in, DUK_STRIDX_WRITABLE)) { + is_data_desc = 1; + if (duk_to_boolean_top_pop(thr)) { + defprop_flags |= DUK_DEFPROP_HAVE_WRITABLE | DUK_DEFPROP_WRITABLE; + } else { + defprop_flags |= DUK_DEFPROP_HAVE_WRITABLE; + } + } + + if (duk_get_prop_stridx(thr, idx_in, DUK_STRIDX_GET)) { + duk_tval *tv = duk_require_tval(thr, -1); + duk_hobject *h_get; + + if (DUK_TVAL_IS_UNDEFINED(tv)) { + /* undefined is accepted */ + DUK_ASSERT(getter == NULL); + } else { + /* NOTE: lightfuncs are coerced to full functions because + * lightfuncs don't fit into a property value slot. This + * has some side effects, see test-dev-lightfunc-accessor.js. + */ + h_get = duk_get_hobject_promote_lfunc(thr, -1); + if (h_get == NULL || !DUK_HOBJECT_IS_CALLABLE(h_get)) { + goto type_error; + } + getter = h_get; + } + is_acc_desc = 1; + defprop_flags |= DUK_DEFPROP_HAVE_GETTER; + } + + if (duk_get_prop_stridx(thr, idx_in, DUK_STRIDX_SET)) { + duk_tval *tv = duk_require_tval(thr, -1); + duk_hobject *h_set; + + if (DUK_TVAL_IS_UNDEFINED(tv)) { + /* undefined is accepted */ + DUK_ASSERT(setter == NULL); + } else { + /* NOTE: lightfuncs are coerced to full functions because + * lightfuncs don't fit into a property value slot. This + * has some side effects, see test-dev-lightfunc-accessor.js. + */ + h_set = duk_get_hobject_promote_lfunc(thr, -1); + if (h_set == NULL || !DUK_HOBJECT_IS_CALLABLE(h_set)) { + goto type_error; + } + setter = h_set; + } + is_acc_desc = 1; + defprop_flags |= DUK_DEFPROP_HAVE_SETTER; + } + + if (duk_get_prop_stridx(thr, idx_in, DUK_STRIDX_ENUMERABLE)) { + if (duk_to_boolean_top_pop(thr)) { + defprop_flags |= DUK_DEFPROP_HAVE_ENUMERABLE | DUK_DEFPROP_ENUMERABLE; + } else { + defprop_flags |= DUK_DEFPROP_HAVE_ENUMERABLE; + } + } + + if (duk_get_prop_stridx(thr, idx_in, DUK_STRIDX_CONFIGURABLE)) { + if (duk_to_boolean_top_pop(thr)) { + defprop_flags |= DUK_DEFPROP_HAVE_CONFIGURABLE | DUK_DEFPROP_CONFIGURABLE; + } else { + defprop_flags |= DUK_DEFPROP_HAVE_CONFIGURABLE; + } + } + + if (is_data_desc && is_acc_desc) { + goto type_error; + } + + *out_defprop_flags = defprop_flags; + *out_idx_value = idx_value; + *out_getter = getter; + *out_setter = setter; + + /* [ ... [multiple values] ] */ + return; + +type_error: + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_DESCRIPTOR); + DUK_WO_NORETURN(return;); +} + +/* + * Object.defineProperty() related helper (E5 Section 15.2.3.6). + * Also handles ES2015 Reflect.defineProperty(). + * + * Inlines all [[DefineOwnProperty]] exotic behaviors. + * + * Note: ECMAScript compliant [[DefineOwnProperty]](P, Desc, Throw) is not + * implemented directly, but Object.defineProperty() serves its purpose. + * We don't need the [[DefineOwnProperty]] internally and we don't have a + * property descriptor with 'missing values' so it's easier to avoid it + * entirely. + * + * Note: this is only called for actual objects, not primitive values. + * This must support virtual properties for full objects (e.g. Strings) + * but not for plain values (e.g. strings). Lightfuncs, even though + * primitive in a sense, are treated like objects and accepted as target + * values. + */ + +/* XXX: this is a major target for size optimization */ +DUK_INTERNAL +duk_bool_t duk_hobject_define_property_helper(duk_hthread *thr, + duk_uint_t defprop_flags, + duk_hobject *obj, + duk_hstring *key, + duk_idx_t idx_value, + duk_hobject *get, + duk_hobject *set, + duk_bool_t throw_flag) { + duk_uint32_t arr_idx; + duk_tval tv; + duk_bool_t has_enumerable; + duk_bool_t has_configurable; + duk_bool_t has_writable; + duk_bool_t has_value; + duk_bool_t has_get; + duk_bool_t has_set; + duk_bool_t is_enumerable; + duk_bool_t is_configurable; + duk_bool_t is_writable; + duk_bool_t force_flag; + duk_small_uint_t new_flags; + duk_propdesc curr; + duk_uint32_t arridx_new_array_length; /* != 0 => post-update for array 'length' (used when key is an array index) */ + duk_uint32_t arrlen_old_len; + duk_uint32_t arrlen_new_len; + duk_bool_t pending_write_protect; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(obj != NULL); + DUK_ASSERT(key != NULL); + /* idx_value may be < 0 (no value), set and get may be NULL */ + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + + /* All the flags fit in 16 bits, so will fit into duk_bool_t. */ + + has_writable = (defprop_flags & DUK_DEFPROP_HAVE_WRITABLE); + has_enumerable = (defprop_flags & DUK_DEFPROP_HAVE_ENUMERABLE); + has_configurable = (defprop_flags & DUK_DEFPROP_HAVE_CONFIGURABLE); + has_value = (defprop_flags & DUK_DEFPROP_HAVE_VALUE); + has_get = (defprop_flags & DUK_DEFPROP_HAVE_GETTER); + has_set = (defprop_flags & DUK_DEFPROP_HAVE_SETTER); + is_writable = (defprop_flags & DUK_DEFPROP_WRITABLE); + is_enumerable = (defprop_flags & DUK_DEFPROP_ENUMERABLE); + is_configurable = (defprop_flags & DUK_DEFPROP_CONFIGURABLE); + force_flag = (defprop_flags & DUK_DEFPROP_FORCE); + + arr_idx = DUK_HSTRING_GET_ARRIDX_SLOW(key); + + arridx_new_array_length = 0; + pending_write_protect = 0; + arrlen_old_len = 0; + arrlen_new_len = 0; + + DUK_DDD(DUK_DDDPRINT("has_enumerable=%ld is_enumerable=%ld " + "has_configurable=%ld is_configurable=%ld " + "has_writable=%ld is_writable=%ld " + "has_value=%ld value=%!T " + "has_get=%ld get=%p=%!O " + "has_set=%ld set=%p=%!O " + "arr_idx=%ld throw_flag=!%ld", + (long) has_enumerable, + (long) is_enumerable, + (long) has_configurable, + (long) is_configurable, + (long) has_writable, + (long) is_writable, + (long) has_value, + (duk_tval *) (idx_value >= 0 ? duk_get_tval(thr, idx_value) : NULL), + (long) has_get, + (void *) get, + (duk_heaphdr *) get, + (long) has_set, + (void *) set, + (duk_heaphdr *) set, + (long) arr_idx, + (long) throw_flag)); + + /* + * Array exotic behaviors can be implemented at this point. The local variables + * are essentially a 'value copy' of the input descriptor (Desc), which is modified + * by the Array [[DefineOwnProperty]] (E5 Section 15.4.5.1). + */ + + if (!DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj)) { + goto skip_array_exotic; + } + + if (key == DUK_HTHREAD_STRING_LENGTH(thr)) { + duk_harray *a; + + /* E5 Section 15.4.5.1, step 3, steps a - i are implemented here, j - n at the end */ + if (!has_value) { + DUK_DDD(DUK_DDDPRINT("exotic array behavior for 'length', but no value in descriptor -> normal behavior")); + goto skip_array_exotic; + } + + DUK_DDD(DUK_DDDPRINT("exotic array behavior for 'length', value present in descriptor -> exotic behavior")); + + /* + * Get old and new length + */ + + a = (duk_harray *) obj; + DUK_HARRAY_ASSERT_VALID(a); + arrlen_old_len = a->length; + + DUK_ASSERT(idx_value >= 0); + arrlen_new_len = duk__to_new_array_length_checked(thr, DUK_GET_TVAL_POSIDX(thr, idx_value)); + duk_push_u32(thr, arrlen_new_len); + duk_replace(thr, idx_value); /* step 3.e: replace 'Desc.[[Value]]' */ + + DUK_DDD(DUK_DDDPRINT("old_len=%ld, new_len=%ld", (long) arrlen_old_len, (long) arrlen_new_len)); + + if (arrlen_new_len >= arrlen_old_len) { + /* standard behavior, step 3.f.i */ + DUK_DDD(DUK_DDDPRINT("new length is same or higher as previous => standard behavior")); + goto skip_array_exotic; + } + DUK_DDD(DUK_DDDPRINT("new length is smaller than previous => exotic post behavior")); + + /* XXX: consolidated algorithm step 15.f -> redundant? */ + if (DUK_HARRAY_LENGTH_NONWRITABLE(a) && !force_flag) { + /* Array .length is always non-configurable; if it's also + * non-writable, don't allow it to be written. + */ + goto fail_not_configurable; + } + + /* steps 3.h and 3.i */ + if (has_writable && !is_writable) { + DUK_DDD(DUK_DDDPRINT("desc writable is false, force it back to true, and flag pending write protect")); + is_writable = 1; + pending_write_protect = 1; + } + + /* remaining actual steps are carried out if standard DefineOwnProperty succeeds */ + } else if (arr_idx != DUK__NO_ARRAY_INDEX) { + /* XXX: any chance of unifying this with the 'length' key handling? */ + + /* E5 Section 15.4.5.1, step 4 */ + duk_uint32_t old_len; + duk_harray *a; + + a = (duk_harray *) obj; + DUK_HARRAY_ASSERT_VALID(a); + + old_len = a->length; + + if (arr_idx >= old_len) { + DUK_DDD(DUK_DDDPRINT("defineProperty requires array length update " + "(arr_idx=%ld, old_len=%ld)", + (long) arr_idx, + (long) old_len)); + + if (DUK_HARRAY_LENGTH_NONWRITABLE(a) && !force_flag) { + /* Array .length is always non-configurable, so + * if it's also non-writable, don't allow a value + * write. With force flag allow writing. + */ + goto fail_not_configurable; + } + + /* actual update happens once write has been completed without + * error below. + */ + DUK_ASSERT(arr_idx != 0xffffffffUL); + arridx_new_array_length = arr_idx + 1; + } else { + DUK_DDD(DUK_DDDPRINT("defineProperty does not require length update " + "(arr_idx=%ld, old_len=%ld) -> standard behavior", + (long) arr_idx, + (long) old_len)); + } + } +skip_array_exotic: + + /* XXX: There is currently no support for writing buffer object + * indexed elements here. Attempt to do so will succeed and + * write a concrete property into the buffer object. This should + * be fixed at some point but because buffers are a custom feature + * anyway, this is relatively unimportant. + */ + + /* + * Actual Object.defineProperty() default algorithm. + */ + + /* + * First check whether property exists; if not, simple case. This covers + * steps 1-4. + */ + + if (!duk__get_own_propdesc_raw(thr, obj, key, arr_idx, &curr, DUK_GETDESC_FLAG_PUSH_VALUE)) { + DUK_DDD(DUK_DDDPRINT("property does not exist")); + + if (!DUK_HOBJECT_HAS_EXTENSIBLE(obj) && !force_flag) { + goto fail_not_extensible; + } + +#if defined(DUK_USE_ROM_OBJECTS) + /* ROM objects are never extensible but force flag may + * allow us to come here anyway. + */ + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj) || !DUK_HOBJECT_HAS_EXTENSIBLE(obj)); + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)) { + DUK_D(DUK_DPRINT("attempt to define property on a read-only target object")); + goto fail_not_configurable; + } +#endif + + /* XXX: share final setting code for value and flags? difficult because + * refcount code is different. Share entry allocation? But can't allocate + * until array index checked. + */ + + /* steps 4.a and 4.b are tricky */ + if (has_set || has_get) { + duk_int_t e_idx; + + DUK_DDD(DUK_DDDPRINT("create new accessor property")); + + DUK_ASSERT(has_set || set == NULL); + DUK_ASSERT(has_get || get == NULL); + DUK_ASSERT(!has_value); + DUK_ASSERT(!has_writable); + + new_flags = DUK_PROPDESC_FLAG_ACCESSOR; /* defaults, E5 Section 8.6.1, Table 7 */ + if (has_enumerable && is_enumerable) { + new_flags |= DUK_PROPDESC_FLAG_ENUMERABLE; + } + if (has_configurable && is_configurable) { + new_flags |= DUK_PROPDESC_FLAG_CONFIGURABLE; + } + + if (arr_idx != DUK__NO_ARRAY_INDEX && DUK_HOBJECT_HAS_ARRAY_PART(obj)) { + DUK_DDD(DUK_DDDPRINT("accessor cannot go to array part, abandon array")); + duk__abandon_array_part(thr, obj); + } + + /* write to entry part */ + e_idx = duk__hobject_alloc_entry_checked(thr, obj, key); + DUK_ASSERT(e_idx >= 0); + + DUK_HOBJECT_E_SET_VALUE_GETTER(thr->heap, obj, e_idx, get); + DUK_HOBJECT_E_SET_VALUE_SETTER(thr->heap, obj, e_idx, set); + DUK_HOBJECT_INCREF_ALLOWNULL(thr, get); + DUK_HOBJECT_INCREF_ALLOWNULL(thr, set); + + DUK_HOBJECT_E_SET_FLAGS(thr->heap, obj, e_idx, new_flags); + goto success_exotics; + } else { + duk_int_t e_idx; + duk_tval *tv2; + + DUK_DDD(DUK_DDDPRINT("create new data property")); + + DUK_ASSERT(!has_set); + DUK_ASSERT(!has_get); + + new_flags = 0; /* defaults, E5 Section 8.6.1, Table 7 */ + if (has_writable && is_writable) { + new_flags |= DUK_PROPDESC_FLAG_WRITABLE; + } + if (has_enumerable && is_enumerable) { + new_flags |= DUK_PROPDESC_FLAG_ENUMERABLE; + } + if (has_configurable && is_configurable) { + new_flags |= DUK_PROPDESC_FLAG_CONFIGURABLE; + } + if (has_value) { + duk_tval *tv_tmp = duk_require_tval(thr, idx_value); + DUK_TVAL_SET_TVAL(&tv, tv_tmp); + } else { + DUK_TVAL_SET_UNDEFINED(&tv); /* default value */ + } + + if (arr_idx != DUK__NO_ARRAY_INDEX && DUK_HOBJECT_HAS_ARRAY_PART(obj)) { + if (new_flags == DUK_PROPDESC_FLAGS_WEC) { + DUK_DDD(DUK_DDDPRINT( + "new data property attributes match array defaults, attempt to write to array part")); + tv2 = duk__obtain_arridx_slot(thr, arr_idx, obj); + if (tv2 == NULL) { + DUK_DDD(DUK_DDDPRINT("failed writing to array part, abandoned array")); + } else { + DUK_DDD(DUK_DDDPRINT("success in writing to array part")); + DUK_ASSERT(DUK_HOBJECT_HAS_ARRAY_PART(obj)); + DUK_ASSERT(DUK_TVAL_IS_UNUSED(tv2)); + DUK_TVAL_SET_TVAL(tv2, &tv); + DUK_TVAL_INCREF(thr, tv2); + goto success_exotics; + } + } else { + DUK_DDD(DUK_DDDPRINT("new data property cannot go to array part, abandon array")); + duk__abandon_array_part(thr, obj); + } + /* fall through */ + } + + /* write to entry part */ + e_idx = duk__hobject_alloc_entry_checked(thr, obj, key); + DUK_ASSERT(e_idx >= 0); + tv2 = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, obj, e_idx); + DUK_TVAL_SET_TVAL(tv2, &tv); + DUK_TVAL_INCREF(thr, tv2); + + DUK_HOBJECT_E_SET_FLAGS(thr->heap, obj, e_idx, new_flags); + goto success_exotics; + } + DUK_UNREACHABLE(); + } + + /* we currently assume virtual properties are not configurable (as none of them are) */ + DUK_ASSERT((curr.e_idx >= 0 || curr.a_idx >= 0) || !(curr.flags & DUK_PROPDESC_FLAG_CONFIGURABLE)); + + /* [obj key desc value get set curr_value] */ + + /* + * Property already exists. Steps 5-6 detect whether any changes need + * to be made. + */ + + if (has_enumerable) { + if (is_enumerable) { + if (!(curr.flags & DUK_PROPDESC_FLAG_ENUMERABLE)) { + goto need_check; + } + } else { + if (curr.flags & DUK_PROPDESC_FLAG_ENUMERABLE) { + goto need_check; + } + } + } + if (has_configurable) { + if (is_configurable) { + if (!(curr.flags & DUK_PROPDESC_FLAG_CONFIGURABLE)) { + goto need_check; + } + } else { + if (curr.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) { + goto need_check; + } + } + } + if (has_value) { + duk_tval *tmp1; + duk_tval *tmp2; + + /* attempt to change from accessor to data property */ + if (curr.flags & DUK_PROPDESC_FLAG_ACCESSOR) { + goto need_check; + } + + tmp1 = duk_require_tval(thr, -1); /* curr value */ + tmp2 = duk_require_tval(thr, idx_value); /* new value */ + if (!duk_js_samevalue(tmp1, tmp2)) { + goto need_check; + } + } + if (has_writable) { + /* attempt to change from accessor to data property */ + if (curr.flags & DUK_PROPDESC_FLAG_ACCESSOR) { + goto need_check; + } + + if (is_writable) { + if (!(curr.flags & DUK_PROPDESC_FLAG_WRITABLE)) { + goto need_check; + } + } else { + if (curr.flags & DUK_PROPDESC_FLAG_WRITABLE) { + goto need_check; + } + } + } + if (has_set) { + if (curr.flags & DUK_PROPDESC_FLAG_ACCESSOR) { + if (set != curr.set) { + goto need_check; + } + } else { + goto need_check; + } + } + if (has_get) { + if (curr.flags & DUK_PROPDESC_FLAG_ACCESSOR) { + if (get != curr.get) { + goto need_check; + } + } else { + goto need_check; + } + } + + /* property exists, either 'desc' is empty, or all values + * match (SameValue) + */ + goto success_no_exotics; + +need_check: + + /* + * Some change(s) need to be made. Steps 7-11. + */ + + /* shared checks for all descriptor types */ + if (!(curr.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) && !force_flag) { + if (has_configurable && is_configurable) { + goto fail_not_configurable; + } + if (has_enumerable) { + if (curr.flags & DUK_PROPDESC_FLAG_ENUMERABLE) { + if (!is_enumerable) { + goto fail_not_configurable; + } + } else { + if (is_enumerable) { + goto fail_not_configurable; + } + } + } + } + + /* Virtual properties don't have backing so they can't mostly be + * edited. Some virtual properties are, however, writable: for + * example, virtual index properties of buffer objects and Array + * instance .length. These are not configurable so the checks + * above mostly cover attempts to change them, except when the + * duk_def_prop() call is used with DUK_DEFPROP_FORCE; even in + * that case we can't forcibly change the property attributes + * because they don't have concrete backing. + */ + + /* XXX: for ROM objects too it'd be best if value modify was + * allowed if the value matches SameValue. + */ + /* Reject attempt to change a read-only object. */ +#if defined(DUK_USE_ROM_OBJECTS) + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)) { + DUK_DD(DUK_DDPRINT("attempt to define property on read-only target object")); + goto fail_not_configurable; + } +#endif + + /* descriptor type specific checks */ + if (has_set || has_get) { + /* IsAccessorDescriptor(desc) == true */ + DUK_ASSERT(!has_writable); + DUK_ASSERT(!has_value); + + if (curr.flags & DUK_PROPDESC_FLAG_ACCESSOR) { + /* curr and desc are accessors */ + if (!(curr.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) && !force_flag) { + if (has_set && set != curr.set) { + goto fail_not_configurable; + } + if (has_get && get != curr.get) { + goto fail_not_configurable; + } + } + } else { + duk_bool_t rc; + duk_tval *tv1; + + /* curr is data, desc is accessor */ + if (!(curr.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) && !force_flag) { + goto fail_not_configurable; + } + + DUK_DDD(DUK_DDDPRINT("convert property to accessor property")); + if (curr.a_idx >= 0) { + DUK_DDD( + DUK_DDDPRINT("property to convert is stored in an array entry, abandon array and re-lookup")); + duk__abandon_array_part(thr, obj); + duk_pop_unsafe(thr); /* remove old value */ + rc = duk__get_own_propdesc_raw(thr, obj, key, arr_idx, &curr, DUK_GETDESC_FLAG_PUSH_VALUE); + DUK_UNREF(rc); + DUK_ASSERT(rc != 0); + DUK_ASSERT(curr.e_idx >= 0 && curr.a_idx < 0); + } + if (curr.e_idx < 0) { + DUK_ASSERT(curr.a_idx < 0 && curr.e_idx < 0); + goto fail_virtual; /* safeguard for virtual property */ + } + + DUK_ASSERT(curr.e_idx >= 0); + DUK_ASSERT(!DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, obj, curr.e_idx)); + + tv1 = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, obj, curr.e_idx); + DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ(thr, tv1); /* XXX: just decref */ + + DUK_HOBJECT_E_SET_VALUE_GETTER(thr->heap, obj, curr.e_idx, NULL); + DUK_HOBJECT_E_SET_VALUE_SETTER(thr->heap, obj, curr.e_idx, NULL); + DUK_HOBJECT_E_SLOT_CLEAR_WRITABLE(thr->heap, obj, curr.e_idx); + DUK_HOBJECT_E_SLOT_SET_ACCESSOR(thr->heap, obj, curr.e_idx); + + DUK_DDD(DUK_DDDPRINT("flags after data->accessor conversion: 0x%02lx", + (unsigned long) DUK_HOBJECT_E_GET_FLAGS(thr->heap, obj, curr.e_idx))); + /* Update curr.flags; faster than a re-lookup. */ + curr.flags &= ~DUK_PROPDESC_FLAG_WRITABLE; + curr.flags |= DUK_PROPDESC_FLAG_ACCESSOR; + } + } else if (has_value || has_writable) { + /* IsDataDescriptor(desc) == true */ + DUK_ASSERT(!has_set); + DUK_ASSERT(!has_get); + + if (curr.flags & DUK_PROPDESC_FLAG_ACCESSOR) { + duk_hobject *tmp; + + /* curr is accessor, desc is data */ + if (!(curr.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) && !force_flag) { + goto fail_not_configurable; + } + + /* curr is accessor -> cannot be in array part. */ + DUK_ASSERT(curr.a_idx < 0); + if (curr.e_idx < 0) { + goto fail_virtual; /* safeguard; no virtual accessors now */ + } + + DUK_DDD(DUK_DDDPRINT("convert property to data property")); + + DUK_ASSERT(DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, obj, curr.e_idx)); + tmp = DUK_HOBJECT_E_GET_VALUE_GETTER(thr->heap, obj, curr.e_idx); + DUK_UNREF(tmp); + DUK_HOBJECT_E_SET_VALUE_GETTER(thr->heap, obj, curr.e_idx, NULL); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, tmp); + tmp = DUK_HOBJECT_E_GET_VALUE_SETTER(thr->heap, obj, curr.e_idx); + DUK_UNREF(tmp); + DUK_HOBJECT_E_SET_VALUE_SETTER(thr->heap, obj, curr.e_idx, NULL); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, tmp); + + DUK_TVAL_SET_UNDEFINED(DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, obj, curr.e_idx)); + DUK_HOBJECT_E_SLOT_CLEAR_WRITABLE(thr->heap, obj, curr.e_idx); + DUK_HOBJECT_E_SLOT_CLEAR_ACCESSOR(thr->heap, obj, curr.e_idx); + + DUK_DDD(DUK_DDDPRINT("flags after accessor->data conversion: 0x%02lx", + (unsigned long) DUK_HOBJECT_E_GET_FLAGS(thr->heap, obj, curr.e_idx))); + + /* Update curr.flags; faster than a re-lookup. */ + curr.flags &= ~(DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_ACCESSOR); + } else { + /* curr and desc are data */ + if (!(curr.flags & DUK_PROPDESC_FLAG_CONFIGURABLE) && !force_flag) { + if (!(curr.flags & DUK_PROPDESC_FLAG_WRITABLE) && has_writable && is_writable) { + goto fail_not_configurable; + } + /* Note: changing from writable to non-writable is OK */ + if (!(curr.flags & DUK_PROPDESC_FLAG_WRITABLE) && has_value) { + duk_tval *tmp1 = duk_require_tval(thr, -1); /* curr value */ + duk_tval *tmp2 = duk_require_tval(thr, idx_value); /* new value */ + if (!duk_js_samevalue(tmp1, tmp2)) { + goto fail_not_configurable; + } + } + } + } + } else { + /* IsGenericDescriptor(desc) == true; this means in practice that 'desc' + * only has [[Enumerable]] or [[Configurable]] flag updates, which are + * allowed at this point. + */ + + DUK_ASSERT(!has_value && !has_writable && !has_get && !has_set); + } + + /* + * Start doing property attributes updates. Steps 12-13. + * + * Start by computing new attribute flags without writing yet. + * Property type conversion is done above if necessary. + */ + + new_flags = curr.flags; + + if (has_enumerable) { + if (is_enumerable) { + new_flags |= DUK_PROPDESC_FLAG_ENUMERABLE; + } else { + new_flags &= ~DUK_PROPDESC_FLAG_ENUMERABLE; + } + } + if (has_configurable) { + if (is_configurable) { + new_flags |= DUK_PROPDESC_FLAG_CONFIGURABLE; + } else { + new_flags &= ~DUK_PROPDESC_FLAG_CONFIGURABLE; + } + } + if (has_writable) { + if (is_writable) { + new_flags |= DUK_PROPDESC_FLAG_WRITABLE; + } else { + new_flags &= ~DUK_PROPDESC_FLAG_WRITABLE; + } + } + + /* XXX: write protect after flag? -> any chance of handling it here? */ + + DUK_DDD(DUK_DDDPRINT("new flags that we want to write: 0x%02lx", (unsigned long) new_flags)); + + /* + * Check whether we need to abandon an array part (if it exists) + */ + + if (curr.a_idx >= 0) { + duk_bool_t rc; + + DUK_ASSERT(curr.e_idx < 0); + + if (new_flags == DUK_PROPDESC_FLAGS_WEC) { + duk_tval *tv1, *tv2; + + DUK_DDD(DUK_DDDPRINT("array index, new property attributes match array defaults, update in-place")); + + DUK_ASSERT(curr.flags == DUK_PROPDESC_FLAGS_WEC); /* must have been, since in array part */ + DUK_ASSERT(!has_set); + DUK_ASSERT(!has_get); + DUK_ASSERT( + idx_value >= + 0); /* must be: if attributes match and we get here the value must differ (otherwise no change) */ + + tv2 = duk_require_tval(thr, idx_value); + tv1 = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, curr.a_idx); + DUK_TVAL_SET_TVAL_UPDREF(thr, tv1, tv2); /* side effects; may invalidate a_idx */ + goto success_exotics; + } + + DUK_DDD( + DUK_DDDPRINT("array index, new property attributes do not match array defaults, abandon array and re-lookup")); + duk__abandon_array_part(thr, obj); + duk_pop_unsafe(thr); /* remove old value */ + rc = duk__get_own_propdesc_raw(thr, obj, key, arr_idx, &curr, DUK_GETDESC_FLAG_PUSH_VALUE); + DUK_UNREF(rc); + DUK_ASSERT(rc != 0); + DUK_ASSERT(curr.e_idx >= 0 && curr.a_idx < 0); + } + + DUK_DDD(DUK_DDDPRINT("updating existing property in entry part")); + + /* Array case is handled comprehensively above: either in entry + * part or a virtual property. + */ + DUK_ASSERT(curr.a_idx < 0); + + DUK_DDD(DUK_DDDPRINT("update existing property attributes")); + if (curr.e_idx >= 0) { + DUK_HOBJECT_E_SET_FLAGS(thr->heap, obj, curr.e_idx, new_flags); + } else { + /* For Array .length the only allowed transition is for .length + * to become non-writable. + */ + if (key == DUK_HTHREAD_STRING_LENGTH(thr) && DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj)) { + duk_harray *a; + a = (duk_harray *) obj; + DUK_DD(DUK_DDPRINT("Object.defineProperty() attribute update for duk_harray .length -> %02lx", + (unsigned long) new_flags)); + DUK_HARRAY_ASSERT_VALID(a); + if ((new_flags & DUK_PROPDESC_FLAGS_EC) != (curr.flags & DUK_PROPDESC_FLAGS_EC)) { + DUK_D(DUK_DPRINT("Object.defineProperty() attempt to change virtual array .length enumerable or " + "configurable attribute, fail")); + goto fail_virtual; + } + if (new_flags & DUK_PROPDESC_FLAG_WRITABLE) { + DUK_HARRAY_SET_LENGTH_WRITABLE(a); + } else { + DUK_HARRAY_SET_LENGTH_NONWRITABLE(a); + } + } + } + + if (has_set) { + duk_hobject *tmp; + + /* Virtual properties are non-configurable but with a 'force' + * flag we might come here so check explicitly for virtual. + */ + if (curr.e_idx < 0) { + goto fail_virtual; + } + + DUK_DDD(DUK_DDDPRINT("update existing property setter")); + DUK_ASSERT(DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, obj, curr.e_idx)); + + tmp = DUK_HOBJECT_E_GET_VALUE_SETTER(thr->heap, obj, curr.e_idx); + DUK_UNREF(tmp); + DUK_HOBJECT_E_SET_VALUE_SETTER(thr->heap, obj, curr.e_idx, set); + DUK_HOBJECT_INCREF_ALLOWNULL(thr, set); + DUK_HOBJECT_DECREF_ALLOWNULL(thr, tmp); /* side effects; may invalidate e_idx */ + } + if (has_get) { + duk_hobject *tmp; + + if (curr.e_idx < 0) { + goto fail_virtual; + } + + DUK_DDD(DUK_DDDPRINT("update existing property getter")); + DUK_ASSERT(DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, obj, curr.e_idx)); + + tmp = DUK_HOBJECT_E_GET_VALUE_GETTER(thr->heap, obj, curr.e_idx); + DUK_UNREF(tmp); + DUK_HOBJECT_E_SET_VALUE_GETTER(thr->heap, obj, curr.e_idx, get); + DUK_HOBJECT_INCREF_ALLOWNULL(thr, get); + DUK_HOBJECT_DECREF_ALLOWNULL(thr, tmp); /* side effects; may invalidate e_idx */ + } + if (has_value) { + duk_tval *tv1, *tv2; + + DUK_DDD(DUK_DDDPRINT("update existing property value")); + + if (curr.e_idx >= 0) { + DUK_ASSERT(!DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, obj, curr.e_idx)); + tv2 = duk_require_tval(thr, idx_value); + tv1 = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, obj, curr.e_idx); + DUK_TVAL_SET_TVAL_UPDREF(thr, tv1, tv2); /* side effects; may invalidate e_idx */ + } else { + DUK_ASSERT(curr.a_idx < 0); /* array part case handled comprehensively previously */ + + DUK_DD(DUK_DDPRINT("Object.defineProperty(), value update for virtual property")); + /* XXX: Uint8Array and other typed array virtual writes not currently + * handled. + */ + if (key == DUK_HTHREAD_STRING_LENGTH(thr) && DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj)) { + duk_harray *a; + a = (duk_harray *) obj; + DUK_DD(DUK_DDPRINT("Object.defineProperty() value update for duk_harray .length -> %ld", + (long) arrlen_new_len)); + DUK_HARRAY_ASSERT_VALID(a); + a->length = arrlen_new_len; + } else { + goto fail_virtual; /* should not happen */ + } + } + } + + /* + * Standard algorithm succeeded without errors, check for exotic post-behaviors. + * + * Arguments exotic behavior in E5 Section 10.6 occurs after the standard + * [[DefineOwnProperty]] has completed successfully. + * + * Array exotic behavior in E5 Section 15.4.5.1 is implemented partly + * prior to the default [[DefineOwnProperty]], but: + * - for an array index key (e.g. "10") the final 'length' update occurs here + * - for 'length' key the element deletion and 'length' update occurs here + */ + +success_exotics: + + /* curr.a_idx or curr.e_idx may have been invalidated by side effects + * above. + */ + + /* [obj key desc value get set curr_value] */ + + if (DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj)) { + duk_harray *a; + + a = (duk_harray *) obj; + DUK_HARRAY_ASSERT_VALID(a); + + if (arridx_new_array_length > 0) { + /* + * Note: zero works as a "no update" marker because the new length + * can never be zero after a new property is written. + */ + + /* E5 Section 15.4.5.1, steps 4.e.i - 4.e.ii */ + + DUK_DDD(DUK_DDDPRINT("defineProperty successful, pending array length update to: %ld", + (long) arridx_new_array_length)); + + a->length = arridx_new_array_length; + } + + if (key == DUK_HTHREAD_STRING_LENGTH(thr) && arrlen_new_len < arrlen_old_len) { + /* + * E5 Section 15.4.5.1, steps 3.k - 3.n. The order at the end combines + * the error case 3.l.iii and the success case 3.m-3.n. + */ + + /* XXX: investigate whether write protect can be handled above, if we + * just update length here while ignoring its protected status + */ + + duk_uint32_t result_len; + duk_bool_t rc; + + DUK_DDD(DUK_DDDPRINT("defineProperty successful, key is 'length', exotic array behavior, " + "doing array element deletion and length update")); + + rc = + duk__handle_put_array_length_smaller(thr, obj, arrlen_old_len, arrlen_new_len, force_flag, &result_len); + + /* update length (curr points to length, and we assume it's still valid) */ + DUK_ASSERT(result_len >= arrlen_new_len && result_len <= arrlen_old_len); + + a->length = result_len; + + if (pending_write_protect) { + DUK_DDD(DUK_DDDPRINT("setting array length non-writable (pending writability update)")); + DUK_HARRAY_SET_LENGTH_NONWRITABLE(a); + } + + /* XXX: shrink array allocation or entries compaction here? */ + if (!rc) { + DUK_DD(DUK_DDPRINT("array length write only partially successful")); + goto fail_not_configurable; + } + } + } else if (arr_idx != DUK__NO_ARRAY_INDEX && DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(obj)) { + duk_hobject *map; + duk_hobject *varenv; + + DUK_ASSERT(arridx_new_array_length == 0); + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARRAY(obj)); /* traits are separate; in particular, arguments not an array */ + + map = NULL; + varenv = NULL; + if (!duk__lookup_arguments_map(thr, obj, key, &curr, &map, &varenv)) { + goto success_no_exotics; + } + DUK_ASSERT(map != NULL); + DUK_ASSERT(varenv != NULL); + + /* [obj key desc value get set curr_value varname] */ + + if (has_set || has_get) { + /* = IsAccessorDescriptor(Desc) */ + DUK_DDD(DUK_DDDPRINT("defineProperty successful, key mapped to arguments 'map' " + "changed to an accessor, delete arguments binding")); + + (void) duk_hobject_delprop_raw(thr, map, key, 0); /* ignore result */ + } else { + /* Note: this order matters (final value before deleting map entry must be done) */ + DUK_DDD(DUK_DDDPRINT("defineProperty successful, key mapped to arguments 'map', " + "check for value update / binding deletion")); + + if (has_value) { + duk_hstring *varname; + + DUK_DDD(DUK_DDDPRINT("defineProperty successful, key mapped to arguments 'map', " + "update bound value (variable/argument)")); + + varname = duk_require_hstring(thr, -1); + DUK_ASSERT(varname != NULL); + + DUK_DDD(DUK_DDDPRINT("arguments object automatic putvar for a bound variable; " + "key=%!O, varname=%!O, value=%!T", + (duk_heaphdr *) key, + (duk_heaphdr *) varname, + (duk_tval *) duk_require_tval(thr, idx_value))); + + /* strict flag for putvar comes from our caller (currently: fixed) */ + duk_js_putvar_envrec(thr, varenv, varname, duk_require_tval(thr, idx_value), 1 /*throw_flag*/); + } + if (has_writable && !is_writable) { + DUK_DDD(DUK_DDDPRINT("defineProperty successful, key mapped to arguments 'map', " + "changed to non-writable, delete arguments binding")); + + (void) duk_hobject_delprop_raw(thr, map, key, 0); /* ignore result */ + } + } + + /* 'varname' is in stack in this else branch, leaving an unbalanced stack below, + * but this doesn't matter now. + */ + } + +success_no_exotics: + /* Some code paths use NORZ macros for simplicity, ensure refzero + * handling is completed. + */ + DUK_REFZERO_CHECK_SLOW(thr); + return 1; + +fail_not_extensible: + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_EXTENSIBLE); + DUK_WO_NORETURN(return 0;); + } + return 0; + +fail_virtual: /* just use the same "not configurable" error message" */ +fail_not_configurable: + if (throw_flag) { + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CONFIGURABLE); + DUK_WO_NORETURN(return 0;); + } + return 0; +} + +/* + * Object.prototype.hasOwnProperty() and Object.prototype.propertyIsEnumerable(). + */ + +DUK_INTERNAL duk_bool_t duk_hobject_object_ownprop_helper(duk_hthread *thr, duk_small_uint_t required_desc_flags) { + duk_hstring *h_v; + duk_hobject *h_obj; + duk_propdesc desc; + duk_bool_t ret; + + /* coercion order matters */ + h_v = duk_to_hstring_acceptsymbol(thr, 0); + DUK_ASSERT(h_v != NULL); + + h_obj = duk_push_this_coercible_to_object(thr); + DUK_ASSERT(h_obj != NULL); + + ret = duk_hobject_get_own_propdesc(thr, h_obj, h_v, &desc, 0 /*flags*/); /* don't push value */ + + duk_push_boolean(thr, ret && ((desc.flags & required_desc_flags) == required_desc_flags)); + return 1; +} + +/* + * Object.seal() and Object.freeze() (E5 Sections 15.2.3.8 and 15.2.3.9) + * + * Since the algorithms are similar, a helper provides both functions. + * Freezing is essentially sealing + making plain properties non-writable. + * + * Note: virtual (non-concrete) properties which are non-configurable but + * writable would pose some problems, but such properties do not currently + * exist (all virtual properties are non-configurable and non-writable). + * If they did exist, the non-configurability does NOT prevent them from + * becoming non-writable. However, this change should be recorded somehow + * so that it would turn up (e.g. when getting the property descriptor), + * requiring some additional flags in the object. + */ + +DUK_INTERNAL void duk_hobject_object_seal_freeze_helper(duk_hthread *thr, duk_hobject *obj, duk_bool_t is_freeze) { + duk_uint_fast32_t i; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(obj != NULL); + + DUK_ASSERT_VALSTACK_SPACE(thr, DUK__VALSTACK_SPACE); + +#if defined(DUK_USE_ROM_OBJECTS) + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) obj)) { + DUK_DD(DUK_DDPRINT("attempt to seal/freeze a readonly object, reject")); + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CONFIGURABLE); + DUK_WO_NORETURN(return;); + } +#endif + + /* + * Abandon array part because all properties must become non-configurable. + * Note that this is now done regardless of whether this is always the case + * (skips check, but performance problem if caller would do this many times + * for the same object; not likely). + */ + + duk__abandon_array_part(thr, obj); + DUK_ASSERT(DUK_HOBJECT_GET_ASIZE(obj) == 0); + + for (i = 0; i < DUK_HOBJECT_GET_ENEXT(obj); i++) { + duk_uint8_t *fp; + + /* since duk__abandon_array_part() causes a resize, there should be no gaps in keys */ + DUK_ASSERT(DUK_HOBJECT_E_GET_KEY(thr->heap, obj, i) != NULL); + + /* avoid multiple computations of flags address; bypasses macros */ + fp = DUK_HOBJECT_E_GET_FLAGS_PTR(thr->heap, obj, i); + if (is_freeze && !((*fp) & DUK_PROPDESC_FLAG_ACCESSOR)) { + *fp &= ~(DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_CONFIGURABLE); + } else { + *fp &= ~DUK_PROPDESC_FLAG_CONFIGURABLE; + } + } + + DUK_HOBJECT_CLEAR_EXTENSIBLE(obj); + + /* no need to compact since we already did that in duk__abandon_array_part() + * (regardless of whether an array part existed or not. + */ + + return; +} + +/* + * Object.isSealed() and Object.isFrozen() (E5 Sections 15.2.3.11, 15.2.3.13) + * + * Since the algorithms are similar, a helper provides both functions. + * Freezing is essentially sealing + making plain properties non-writable. + * + * Note: all virtual (non-concrete) properties are currently non-configurable + * and non-writable (and there are no accessor virtual properties), so they don't + * need to be considered here now. + */ + +DUK_INTERNAL duk_bool_t duk_hobject_object_is_sealed_frozen_helper(duk_hthread *thr, duk_hobject *obj, duk_bool_t is_frozen) { + duk_uint_fast32_t i; + + DUK_ASSERT(obj != NULL); + DUK_UNREF(thr); + + /* Note: no allocation pressure, no need to check refcounts etc */ + + /* must not be extensible */ + if (DUK_HOBJECT_HAS_EXTENSIBLE(obj)) { + return 0; + } + + /* all virtual properties are non-configurable and non-writable */ + + /* entry part must not contain any configurable properties, or + * writable properties (if is_frozen). + */ + for (i = 0; i < DUK_HOBJECT_GET_ENEXT(obj); i++) { + duk_small_uint_t flags; + + if (!DUK_HOBJECT_E_GET_KEY(thr->heap, obj, i)) { + continue; + } + + /* avoid multiple computations of flags address; bypasses macros */ + flags = (duk_small_uint_t) DUK_HOBJECT_E_GET_FLAGS(thr->heap, obj, i); + + if (flags & DUK_PROPDESC_FLAG_CONFIGURABLE) { + return 0; + } + if (is_frozen && !(flags & DUK_PROPDESC_FLAG_ACCESSOR) && (flags & DUK_PROPDESC_FLAG_WRITABLE)) { + return 0; + } + } + + /* array part must not contain any non-unused properties, as they would + * be configurable and writable. + */ + for (i = 0; i < DUK_HOBJECT_GET_ASIZE(obj); i++) { + duk_tval *tv = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, obj, i); + if (!DUK_TVAL_IS_UNUSED(tv)) { + return 0; + } + } + + return 1; +} + +/* + * Object.preventExtensions() and Object.isExtensible() (E5 Sections 15.2.3.10, 15.2.3.13) + * + * Not needed, implemented by macros DUK_HOBJECT_{HAS,CLEAR,SET}_EXTENSIBLE + * and the Object built-in bindings. + */ + +/* automatic undefs */ +#undef DUK__HASH_DELETED +#undef DUK__HASH_UNUSED +#undef DUK__NO_ARRAY_INDEX +#undef DUK__VALSTACK_PROXY_LOOKUP +#undef DUK__VALSTACK_SPACE +#line 1 "duk_hstring_assert.c" +/* + * duk_hstring assertion helpers. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_ASSERTIONS) + +DUK_INTERNAL void duk_hstring_assert_valid(duk_hstring *h) { + DUK_ASSERT(h != NULL); +} + +#endif /* DUK_USE_ASSERTIONS */ +#line 1 "duk_hstring_misc.c" +/* + * Misc support functions + */ + +/* #include duk_internal.h -> already included */ + +/* + * duk_hstring charCodeAt, with and without surrogate awareness + */ + +DUK_INTERNAL duk_ucodepoint_t duk_hstring_char_code_at_raw(duk_hthread *thr, + duk_hstring *h, + duk_uint_t pos, + duk_bool_t surrogate_aware) { + duk_uint32_t boff; + const duk_uint8_t *p, *p_start, *p_end; + duk_ucodepoint_t cp1; + duk_ucodepoint_t cp2; + + /* Caller must check character offset to be inside the string. */ + DUK_ASSERT(thr != NULL); + DUK_ASSERT(h != NULL); + DUK_ASSERT_DISABLE(pos >= 0); /* unsigned */ + DUK_ASSERT(pos < (duk_uint_t) DUK_HSTRING_GET_CHARLEN(h)); + + boff = (duk_uint32_t) duk_heap_strcache_offset_char2byte(thr, h, (duk_uint32_t) pos); + DUK_DDD(DUK_DDDPRINT("charCodeAt: pos=%ld -> boff=%ld, str=%!O", (long) pos, (long) boff, (duk_heaphdr *) h)); + DUK_ASSERT_DISABLE(boff >= 0); + DUK_ASSERT(boff < DUK_HSTRING_GET_BYTELEN(h)); + + p_start = DUK_HSTRING_GET_DATA(h); + p_end = p_start + DUK_HSTRING_GET_BYTELEN(h); + p = p_start + boff; + DUK_DDD(DUK_DDDPRINT("p_start=%p, p_end=%p, p=%p", (const void *) p_start, (const void *) p_end, (const void *) p)); + + /* For invalid UTF-8 (never happens for standard ECMAScript strings) + * return U+FFFD replacement character. + */ + if (duk_unicode_decode_xutf8(thr, &p, p_start, p_end, &cp1)) { + if (surrogate_aware && cp1 >= 0xd800UL && cp1 <= 0xdbffUL) { + /* The decode helper is memory safe even if 'cp1' was + * decoded at the end of the string and 'p' is no longer + * within string memory range. + */ + cp2 = 0; /* If call fails, this is left untouched and won't match cp2 check. */ + (void) duk_unicode_decode_xutf8(thr, &p, p_start, p_end, &cp2); + if (cp2 >= 0xdc00UL && cp2 <= 0xdfffUL) { + cp1 = (duk_ucodepoint_t) (((cp1 - 0xd800UL) << 10) + (cp2 - 0xdc00UL) + 0x10000UL); + } + } + } else { + cp1 = DUK_UNICODE_CP_REPLACEMENT_CHARACTER; + } + + return cp1; +} + +/* + * duk_hstring charlen, when lazy charlen disabled + */ + +#if !defined(DUK_USE_HSTRING_LAZY_CLEN) +#if !defined(DUK_USE_HSTRING_CLEN) +#error non-lazy duk_hstring charlen but DUK_USE_HSTRING_CLEN not set +#endif +DUK_INTERNAL void duk_hstring_init_charlen(duk_hstring *h) { + duk_uint32_t clen; + + DUK_ASSERT(h != NULL); + DUK_ASSERT(!DUK_HSTRING_HAS_ASCII(h)); + DUK_ASSERT(!DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) h)); + + clen = duk_unicode_unvalidated_utf8_length(DUK_HSTRING_GET_DATA(h), DUK_HSTRING_GET_BYTELEN(h)); +#if defined(DUK_USE_STRLEN16) + DUK_ASSERT(clen <= 0xffffUL); /* Bytelength checked during interning. */ + h->clen16 = (duk_uint16_t) clen; +#else + h->clen = (duk_uint32_t) clen; +#endif + if (DUK_LIKELY(clen == DUK_HSTRING_GET_BYTELEN(h))) { + DUK_HSTRING_SET_ASCII(h); + } +} + +DUK_INTERNAL DUK_HOT duk_size_t duk_hstring_get_charlen(duk_hstring *h) { +#if defined(DUK_USE_STRLEN16) + return h->clen16; +#else + return h->clen; +#endif +} +#endif /* !DUK_USE_HSTRING_LAZY_CLEN */ + +/* + * duk_hstring charlen, when lazy charlen enabled + */ + +#if defined(DUK_USE_HSTRING_LAZY_CLEN) +#if defined(DUK_USE_HSTRING_CLEN) +DUK_LOCAL DUK_COLD duk_size_t duk__hstring_get_charlen_slowpath(duk_hstring *h) { + duk_size_t res; + + DUK_ASSERT(h->clen == 0); /* Checked by caller. */ + +#if defined(DUK_USE_ROM_STRINGS) + /* ROM strings have precomputed clen, but if the computed clen is zero + * we can still come here and can't write anything. + */ + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) h)) { + return 0; + } +#endif + + res = duk_unicode_unvalidated_utf8_length(DUK_HSTRING_GET_DATA(h), DUK_HSTRING_GET_BYTELEN(h)); +#if defined(DUK_USE_STRLEN16) + DUK_ASSERT(res <= 0xffffUL); /* Bytelength checked during interning. */ + h->clen16 = (duk_uint16_t) res; +#else + h->clen = (duk_uint32_t) res; +#endif + if (DUK_LIKELY(res == DUK_HSTRING_GET_BYTELEN(h))) { + DUK_HSTRING_SET_ASCII(h); + } + return res; +} +#else /* DUK_USE_HSTRING_CLEN */ +DUK_LOCAL duk_size_t duk__hstring_get_charlen_slowpath(duk_hstring *h) { + if (DUK_LIKELY(DUK_HSTRING_HAS_ASCII(h))) { + /* Most practical strings will go here. */ + return DUK_HSTRING_GET_BYTELEN(h); + } else { + /* ASCII flag is lazy, so set it here. */ + duk_size_t res; + + /* XXX: here we could use the strcache to speed up the + * computation (matters for 'i < str.length' loops). + */ + + res = duk_unicode_unvalidated_utf8_length(DUK_HSTRING_GET_DATA(h), DUK_HSTRING_GET_BYTELEN(h)); + +#if defined(DUK_USE_ROM_STRINGS) + if (DUK_HEAPHDR_HAS_READONLY((duk_heaphdr *) h)) { + /* For ROM strings, can't write anything; ASCII flag + * is preset so we don't need to update it. + */ + return res; + } +#endif + if (DUK_LIKELY(res == DUK_HSTRING_GET_BYTELEN(h))) { + DUK_HSTRING_SET_ASCII(h); + } + return res; + } +} +#endif /* DUK_USE_HSTRING_CLEN */ + +#if defined(DUK_USE_HSTRING_CLEN) +DUK_INTERNAL DUK_HOT duk_size_t duk_hstring_get_charlen(duk_hstring *h) { +#if defined(DUK_USE_STRLEN16) + if (DUK_LIKELY(h->clen16 != 0)) { + return h->clen16; + } +#else + if (DUK_LIKELY(h->clen != 0)) { + return h->clen; + } +#endif + return duk__hstring_get_charlen_slowpath(h); +} +#else /* DUK_USE_HSTRING_CLEN */ +DUK_INTERNAL DUK_HOT duk_size_t duk_hstring_get_charlen(duk_hstring *h) { + /* Always use slow path. */ + return duk__hstring_get_charlen_slowpath(h); +} +#endif /* DUK_USE_HSTRING_CLEN */ +#endif /* DUK_USE_HSTRING_LAZY_CLEN */ + +/* + * Compare duk_hstring to an ASCII cstring. + */ + +DUK_INTERNAL duk_bool_t duk_hstring_equals_ascii_cstring(duk_hstring *h, const char *cstr) { + duk_size_t len; + + DUK_ASSERT(h != NULL); + DUK_ASSERT(cstr != NULL); + + len = DUK_STRLEN(cstr); + if (len != DUK_HSTRING_GET_BYTELEN(h)) { + return 0; + } + if (duk_memcmp((const void *) cstr, (const void *) DUK_HSTRING_GET_DATA(h), len) == 0) { + return 1; + } + return 0; +} +#line 1 "duk_hthread_alloc.c" +/* + * duk_hthread allocation and freeing. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Allocate initial stacks for a thread. Note that 'thr' must be reachable + * as a garbage collection may be triggered by the allocation attempts. + * Returns zero (without leaking memory) if init fails. + */ + +DUK_INTERNAL duk_bool_t duk_hthread_init_stacks(duk_heap *heap, duk_hthread *thr) { + duk_size_t alloc_size; + duk_size_t i; + + DUK_ASSERT(heap != NULL); + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->valstack == NULL); + DUK_ASSERT(thr->valstack_end == NULL); + DUK_ASSERT(thr->valstack_alloc_end == NULL); + DUK_ASSERT(thr->valstack_bottom == NULL); + DUK_ASSERT(thr->valstack_top == NULL); + DUK_ASSERT(thr->callstack_curr == NULL); + + /* valstack */ + DUK_ASSERT(DUK_VALSTACK_API_ENTRY_MINIMUM <= DUK_VALSTACK_INITIAL_SIZE); + alloc_size = sizeof(duk_tval) * DUK_VALSTACK_INITIAL_SIZE; + thr->valstack = (duk_tval *) DUK_ALLOC(heap, alloc_size); + if (!thr->valstack) { + goto fail; + } + duk_memzero(thr->valstack, alloc_size); + thr->valstack_end = thr->valstack + DUK_VALSTACK_API_ENTRY_MINIMUM; + thr->valstack_alloc_end = thr->valstack + DUK_VALSTACK_INITIAL_SIZE; + thr->valstack_bottom = thr->valstack; + thr->valstack_top = thr->valstack; + + for (i = 0; i < DUK_VALSTACK_INITIAL_SIZE; i++) { + DUK_TVAL_SET_UNDEFINED(&thr->valstack[i]); + } + + return 1; + +fail: + DUK_FREE(heap, thr->valstack); + DUK_ASSERT(thr->callstack_curr == NULL); + + thr->valstack = NULL; + return 0; +} + +/* For indirect allocs. */ + +DUK_INTERNAL void *duk_hthread_get_valstack_ptr(duk_heap *heap, void *ud) { + duk_hthread *thr = (duk_hthread *) ud; + DUK_UNREF(heap); + return (void *) thr->valstack; +} +#line 1 "duk_hthread_builtins.c" +/* + * Initialize built-in objects. Current thread must have a valstack + * and initialization errors may longjmp, so a setjmp() catch point + * must exist. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Encoding constants, must match genbuiltins.py + */ + +#define DUK__PROP_FLAGS_BITS 3 +#define DUK__LENGTH_PROP_BITS 3 +#define DUK__NARGS_BITS 3 +#define DUK__PROP_TYPE_BITS 3 + +#define DUK__NARGS_VARARGS_MARKER 0x07 + +#define DUK__PROP_TYPE_DOUBLE 0 +#define DUK__PROP_TYPE_STRING 1 +#define DUK__PROP_TYPE_STRIDX 2 +#define DUK__PROP_TYPE_BUILTIN 3 +#define DUK__PROP_TYPE_UNDEFINED 4 +#define DUK__PROP_TYPE_BOOLEAN_TRUE 5 +#define DUK__PROP_TYPE_BOOLEAN_FALSE 6 +#define DUK__PROP_TYPE_ACCESSOR 7 + +/* + * Create built-in objects by parsing an init bitstream generated + * by genbuiltins.py. + */ + +#if defined(DUK_USE_ROM_OBJECTS) +#if defined(DUK_USE_ROM_GLOBAL_CLONE) || defined(DUK_USE_ROM_GLOBAL_INHERIT) +DUK_LOCAL void duk__duplicate_ram_global_object(duk_hthread *thr) { + duk_hobject *h_global; +#if defined(DUK_USE_ROM_GLOBAL_CLONE) + duk_hobject *h_oldglobal; + duk_uint8_t *props; + duk_size_t alloc_size; +#endif + duk_hobject *h_objenv; + + /* XXX: refactor into internal helper, duk_clone_hobject() */ + +#if defined(DUK_USE_ROM_GLOBAL_INHERIT) + /* Inherit from ROM-based global object: less RAM usage, less transparent. */ + h_global = duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_GLOBAL), + DUK_BIDX_GLOBAL); + DUK_ASSERT(h_global != NULL); +#elif defined(DUK_USE_ROM_GLOBAL_CLONE) + /* Clone the properties of the ROM-based global object to create a + * fully RAM-based global object. Uses more memory than the inherit + * model but more compliant. + */ + h_global = duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_GLOBAL), + DUK_BIDX_OBJECT_PROTOTYPE); + DUK_ASSERT(h_global != NULL); + h_oldglobal = thr->builtins[DUK_BIDX_GLOBAL]; + DUK_ASSERT(h_oldglobal != NULL); + + /* Copy the property table verbatim; this handles attributes etc. + * For ROM objects it's not necessary (or possible) to update + * refcounts so leave them as is. + */ + alloc_size = DUK_HOBJECT_P_ALLOC_SIZE(h_oldglobal); + DUK_ASSERT(alloc_size > 0); + props = DUK_ALLOC_CHECKED(thr, alloc_size); + DUK_ASSERT(props != NULL); + DUK_ASSERT(DUK_HOBJECT_GET_PROPS(thr->heap, h_oldglobal) != NULL); + duk_memcpy((void *) props, (const void *) DUK_HOBJECT_GET_PROPS(thr->heap, h_oldglobal), alloc_size); + + /* XXX: keep property attributes or tweak them here? + * Properties will now be non-configurable even when they're + * normally configurable for the global object. + */ + + DUK_ASSERT(DUK_HOBJECT_GET_PROPS(thr->heap, h_global) == NULL); + DUK_HOBJECT_SET_PROPS(thr->heap, h_global, props); + DUK_HOBJECT_SET_ESIZE(h_global, DUK_HOBJECT_GET_ESIZE(h_oldglobal)); + DUK_HOBJECT_SET_ENEXT(h_global, DUK_HOBJECT_GET_ENEXT(h_oldglobal)); + DUK_HOBJECT_SET_ASIZE(h_global, DUK_HOBJECT_GET_ASIZE(h_oldglobal)); + DUK_HOBJECT_SET_HSIZE(h_global, DUK_HOBJECT_GET_HSIZE(h_oldglobal)); +#else +#error internal error in config defines +#endif + + duk_hobject_compact_props(thr, h_global); + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL] != NULL); + DUK_ASSERT( + !DUK_HEAPHDR_NEEDS_REFCOUNT_UPDATE((duk_heaphdr *) thr->builtins[DUK_BIDX_GLOBAL])); /* no need to decref: ROM object */ + thr->builtins[DUK_BIDX_GLOBAL] = h_global; + DUK_HOBJECT_INCREF(thr, h_global); + DUK_D(DUK_DPRINT("duplicated global object: %!O", h_global)); + + /* Create a fresh object environment for the global scope. This is + * needed so that the global scope points to the newly created RAM-based + * global object. + */ + h_objenv = + (duk_hobject *) duk_hobjenv_alloc(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJENV)); + DUK_ASSERT(h_objenv != NULL); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, h_objenv) == NULL); + duk_push_hobject(thr, h_objenv); + + DUK_ASSERT(h_global != NULL); + ((duk_hobjenv *) h_objenv)->target = h_global; + DUK_HOBJECT_INCREF(thr, h_global); + DUK_ASSERT(((duk_hobjenv *) h_objenv)->has_this == 0); + + DUK_ASSERT(thr->builtins[DUK_BIDX_GLOBAL_ENV] != NULL); + DUK_ASSERT(!DUK_HEAPHDR_NEEDS_REFCOUNT_UPDATE( + (duk_heaphdr *) thr->builtins[DUK_BIDX_GLOBAL_ENV])); /* no need to decref: ROM object */ + thr->builtins[DUK_BIDX_GLOBAL_ENV] = h_objenv; + DUK_HOBJECT_INCREF(thr, h_objenv); + DUK_D(DUK_DPRINT("duplicated global env: %!O", h_objenv)); + + DUK_HOBJENV_ASSERT_VALID((duk_hobjenv *) h_objenv); + + duk_pop_2(thr); /* Pop global object and global env. */ +} +#endif /* DUK_USE_ROM_GLOBAL_CLONE || DUK_USE_ROM_GLOBAL_INHERIT */ + +DUK_INTERNAL void duk_hthread_create_builtin_objects(duk_hthread *thr) { + /* Setup builtins from ROM objects. All heaps/threads will share + * the same readonly objects. + */ + duk_small_uint_t i; + + for (i = 0; i < DUK_NUM_BUILTINS; i++) { + duk_hobject *h; + h = (duk_hobject *) DUK_LOSE_CONST(duk_rom_builtins_bidx[i]); + DUK_ASSERT(h != NULL); + thr->builtins[i] = h; + } + +#if defined(DUK_USE_ROM_GLOBAL_CLONE) || defined(DUK_USE_ROM_GLOBAL_INHERIT) + /* By default the global object is read-only which is often much + * more of an issue than having read-only built-in objects (like + * RegExp, Date, etc). Use a RAM-based copy of the global object + * and the global environment object for convenience. + */ + duk__duplicate_ram_global_object(thr); +#endif +} +#else /* DUK_USE_ROM_OBJECTS */ +DUK_LOCAL void duk__push_stridx(duk_hthread *thr, duk_bitdecoder_ctx *bd) { + duk_small_uint_t n; + + n = (duk_small_uint_t) duk_bd_decode_varuint(bd); + DUK_ASSERT_DISABLE(n >= 0); /* unsigned */ + DUK_ASSERT(n < DUK_HEAP_NUM_STRINGS); + duk_push_hstring_stridx(thr, n); +} +DUK_LOCAL void duk__push_string(duk_hthread *thr, duk_bitdecoder_ctx *bd) { + /* XXX: built-ins data could provide a maximum length that is + * actually needed; bitpacked max length is now 256 bytes. + */ + duk_uint8_t tmp[DUK_BD_BITPACKED_STRING_MAXLEN]; + duk_small_uint_t len; + + len = duk_bd_decode_bitpacked_string(bd, tmp); + duk_push_lstring(thr, (const char *) tmp, (duk_size_t) len); +} +DUK_LOCAL void duk__push_stridx_or_string(duk_hthread *thr, duk_bitdecoder_ctx *bd) { + duk_small_uint_t n; + + n = (duk_small_uint_t) duk_bd_decode_varuint(bd); + if (n == 0) { + duk__push_string(thr, bd); + } else { + n--; + DUK_ASSERT(n < DUK_HEAP_NUM_STRINGS); + duk_push_hstring_stridx(thr, n); + } +} +DUK_LOCAL void duk__push_double(duk_hthread *thr, duk_bitdecoder_ctx *bd) { + duk_double_union du; + duk_small_uint_t i; + + for (i = 0; i < 8; i++) { + /* Encoding endianness must match target memory layout, + * build scripts and genbuiltins.py must ensure this. + */ + du.uc[i] = (duk_uint8_t) duk_bd_decode(bd, 8); + } + + duk_push_number(thr, du.d); /* push operation normalizes NaNs */ +} + +DUK_INTERNAL void duk_hthread_create_builtin_objects(duk_hthread *thr) { + duk_bitdecoder_ctx bd_ctx; + duk_bitdecoder_ctx *bd = &bd_ctx; /* convenience */ + duk_hobject *h; + duk_small_uint_t i, j; + + DUK_D(DUK_DPRINT("INITBUILTINS BEGIN: DUK_NUM_BUILTINS=%d, DUK_NUM_BUILTINS_ALL=%d", + (int) DUK_NUM_BUILTINS, + (int) DUK_NUM_ALL_BUILTINS)); + + duk_memzero(&bd_ctx, sizeof(bd_ctx)); + bd->data = (const duk_uint8_t *) duk_builtins_data; + bd->length = (duk_size_t) DUK_BUILTINS_DATA_LENGTH; + + /* + * First create all built-in bare objects on the empty valstack. + * + * Built-ins in the index range [0,DUK_NUM_BUILTINS-1] have value + * stack indices matching their eventual thr->builtins[] index. + * + * Built-ins in the index range [DUK_NUM_BUILTINS,DUK_NUM_ALL_BUILTINS] + * will exist on the value stack during init but won't be placed + * into thr->builtins[]. These are objects referenced in some way + * from thr->builtins[] roots but which don't need to be indexed by + * Duktape through thr->builtins[] (e.g. user custom objects). + * + * Internal prototypes will be incorrect (NULL) at this stage. + */ + + duk_require_stack(thr, DUK_NUM_ALL_BUILTINS); + + DUK_DD(DUK_DDPRINT("create empty built-ins")); + DUK_ASSERT_TOP(thr, 0); + for (i = 0; i < DUK_NUM_ALL_BUILTINS; i++) { + duk_small_uint_t class_num; + duk_small_int_t len = -1; /* must be signed */ + + class_num = (duk_small_uint_t) duk_bd_decode_varuint(bd); + len = (duk_small_int_t) duk_bd_decode_flagged_signed(bd, DUK__LENGTH_PROP_BITS, (duk_int32_t) -1 /*def_value*/); + + if (class_num == DUK_HOBJECT_CLASS_FUNCTION) { + duk_small_uint_t natidx; + duk_small_int_t c_nargs; /* must hold DUK_VARARGS */ + duk_c_function c_func; + duk_int16_t magic; + + DUK_DDD(DUK_DDDPRINT("len=%ld", (long) len)); + DUK_ASSERT(len >= 0); + + natidx = (duk_small_uint_t) duk_bd_decode_varuint(bd); + DUK_ASSERT(natidx != 0); + c_func = duk_bi_native_functions[natidx]; + DUK_ASSERT(c_func != NULL); + + c_nargs = (duk_small_int_t) duk_bd_decode_flagged_signed(bd, DUK__NARGS_BITS, len /*def_value*/); + if (c_nargs == DUK__NARGS_VARARGS_MARKER) { + c_nargs = DUK_VARARGS; + } + + /* XXX: set magic directly here? (it could share the c_nargs arg) */ + (void) duk_push_c_function_builtin(thr, c_func, c_nargs); + h = duk_known_hobject(thr, -1); + + /* Currently all built-in native functions are strict. + * duk_push_c_function() now sets strict flag, so + * assert for it. + */ + DUK_ASSERT(DUK_HOBJECT_HAS_STRICT(h)); + + /* XXX: function properties */ + + duk__push_stridx_or_string(thr, bd); +#if defined(DUK_USE_FUNC_NAME_PROPERTY) + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_NAME, DUK_PROPDESC_FLAGS_C); +#else + duk_pop(thr); /* Not very ideal but good enough for now. */ +#endif + + /* Almost all global level Function objects are constructable + * but not all: Function.prototype is a non-constructable, + * callable Function. + */ + if (duk_bd_decode_flag(bd)) { + DUK_ASSERT(DUK_HOBJECT_HAS_CONSTRUCTABLE(h)); + } else { + DUK_HOBJECT_CLEAR_CONSTRUCTABLE(h); + } + + /* Cast converts magic to 16-bit signed value */ + magic = (duk_int16_t) duk_bd_decode_varuint(bd); + ((duk_hnatfunc *) h)->magic = magic; + } else if (class_num == DUK_HOBJECT_CLASS_ARRAY) { + duk_push_array(thr); + } else if (class_num == DUK_HOBJECT_CLASS_OBJENV) { + duk_hobjenv *env; + duk_hobject *global; + + DUK_ASSERT(i == DUK_BIDX_GLOBAL_ENV); + DUK_ASSERT(DUK_BIDX_GLOBAL_ENV > DUK_BIDX_GLOBAL); + + env = duk_hobjenv_alloc(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJENV)); + DUK_ASSERT(env->target == NULL); + duk_push_hobject(thr, (duk_hobject *) env); + + global = duk_known_hobject(thr, DUK_BIDX_GLOBAL); + DUK_ASSERT(global != NULL); + env->target = global; + DUK_HOBJECT_INCREF(thr, global); + DUK_ASSERT(env->has_this == 0); + + DUK_HOBJENV_ASSERT_VALID(env); + } else { + DUK_ASSERT(class_num != DUK_HOBJECT_CLASS_DECENV); + + (void) duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_FLAG_EXTENSIBLE, + -1); /* no prototype or class yet */ + } + + h = duk_known_hobject(thr, -1); + DUK_HOBJECT_SET_CLASS_NUMBER(h, class_num); + + if (i < DUK_NUM_BUILTINS) { + thr->builtins[i] = h; + DUK_HOBJECT_INCREF(thr, &h->hdr); + } + + if (len >= 0) { + /* In ES2015+ built-in function object .length property + * has property attributes C (configurable only): + * http://www.ecma-international.org/ecma-262/7.0/#sec-ecmascript-standard-built-in-objects + * + * Array.prototype remains an Array instance in ES2015+ + * and its length has attributes W (writable only). + * Because .length is now virtual for duk_harray, it is + * not encoded explicitly in init data. + */ + + DUK_ASSERT(class_num != DUK_HOBJECT_CLASS_ARRAY); /* .length is virtual */ + duk_push_int(thr, len); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_C); + } + + /* enable exotic behaviors last */ + + if (class_num == DUK_HOBJECT_CLASS_ARRAY) { + DUK_ASSERT(DUK_HOBJECT_HAS_EXOTIC_ARRAY(h)); /* set by duk_push_array() */ + } + if (class_num == DUK_HOBJECT_CLASS_STRING) { + DUK_HOBJECT_SET_EXOTIC_STRINGOBJ(h); + } + + /* some assertions */ + + DUK_ASSERT(DUK_HOBJECT_HAS_EXTENSIBLE(h)); + /* DUK_HOBJECT_FLAG_CONSTRUCTABLE varies */ + DUK_ASSERT(!DUK_HOBJECT_HAS_BOUNDFUNC(h)); + DUK_ASSERT(!DUK_HOBJECT_HAS_COMPFUNC(h)); + /* DUK_HOBJECT_FLAG_NATFUNC varies */ + DUK_ASSERT(!DUK_HOBJECT_IS_THREAD(h)); + DUK_ASSERT(!DUK_HOBJECT_IS_PROXY(h)); + DUK_ASSERT(!DUK_HOBJECT_HAS_ARRAY_PART(h) || class_num == DUK_HOBJECT_CLASS_ARRAY); + /* DUK_HOBJECT_FLAG_STRICT varies */ + DUK_ASSERT(!DUK_HOBJECT_HAS_NATFUNC(h) || /* all native functions have NEWENV */ + DUK_HOBJECT_HAS_NEWENV(h)); + DUK_ASSERT(!DUK_HOBJECT_HAS_NAMEBINDING(h)); + DUK_ASSERT(!DUK_HOBJECT_HAS_CREATEARGS(h)); + /* DUK_HOBJECT_FLAG_EXOTIC_ARRAY varies */ + /* DUK_HOBJECT_FLAG_EXOTIC_STRINGOBJ varies */ + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(h)); + + DUK_DDD(DUK_DDDPRINT("created built-in %ld, class=%ld, length=%ld", (long) i, (long) class_num, (long) len)); + } + + /* + * Then decode the builtins init data (see genbuiltins.py) to + * init objects. Internal prototypes are set at this stage, + * with thr->builtins[] populated. + */ + + DUK_DD(DUK_DDPRINT("initialize built-in object properties")); + for (i = 0; i < DUK_NUM_ALL_BUILTINS; i++) { + duk_small_uint_t t; + duk_small_uint_t num; + + DUK_DDD(DUK_DDDPRINT("initializing built-in object at index %ld", (long) i)); + h = duk_known_hobject(thr, (duk_idx_t) i); + + t = (duk_small_uint_t) duk_bd_decode_varuint(bd); + if (t > 0) { + t--; + DUK_DDD(DUK_DDDPRINT("set internal prototype: built-in %ld", (long) t)); + DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, h, duk_known_hobject(thr, (duk_idx_t) t)); + } else if (DUK_HOBJECT_IS_NATFUNC(h)) { + /* Standard native built-ins cannot inherit from + * %NativeFunctionPrototype%, they are required to + * inherit from Function.prototype directly. + */ + DUK_ASSERT(thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE] != NULL); + DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, h, thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]); + } + + t = (duk_small_uint_t) duk_bd_decode_varuint(bd); + if (t > 0) { + /* 'prototype' property for all built-in objects (which have it) has attributes: + * [[Writable]] = false, + * [[Enumerable]] = false, + * [[Configurable]] = false + */ + t--; + DUK_DDD(DUK_DDDPRINT("set external prototype: built-in %ld", (long) t)); + duk_dup(thr, (duk_idx_t) t); + duk_xdef_prop_stridx(thr, (duk_idx_t) i, DUK_STRIDX_PROTOTYPE, DUK_PROPDESC_FLAGS_NONE); + } + + t = (duk_small_uint_t) duk_bd_decode_varuint(bd); + if (t > 0) { + /* 'constructor' property for all built-in objects (which have it) has attributes: + * [[Writable]] = true, + * [[Enumerable]] = false, + * [[Configurable]] = true + */ + t--; + DUK_DDD(DUK_DDDPRINT("set external constructor: built-in %ld", (long) t)); + duk_dup(thr, (duk_idx_t) t); + duk_xdef_prop_stridx(thr, (duk_idx_t) i, DUK_STRIDX_CONSTRUCTOR, DUK_PROPDESC_FLAGS_WC); + } + + /* normal valued properties */ + num = (duk_small_uint_t) duk_bd_decode_varuint(bd); + DUK_DDD(DUK_DDDPRINT("built-in object %ld, %ld normal valued properties", (long) i, (long) num)); + for (j = 0; j < num; j++) { + duk_small_uint_t defprop_flags; + + duk__push_stridx_or_string(thr, bd); + + /* + * Property attribute defaults are defined in E5 Section 15 (first + * few pages); there is a default for all properties and a special + * default for 'length' properties. Variation from the defaults is + * signaled using a single flag bit in the bitstream. + */ + + defprop_flags = (duk_small_uint_t) duk_bd_decode_flagged(bd, + DUK__PROP_FLAGS_BITS, + (duk_uint32_t) DUK_PROPDESC_FLAGS_WC); + defprop_flags |= DUK_DEFPROP_FORCE | DUK_DEFPROP_HAVE_VALUE | DUK_DEFPROP_HAVE_WRITABLE | + DUK_DEFPROP_HAVE_ENUMERABLE | + DUK_DEFPROP_HAVE_CONFIGURABLE; /* Defaults for data properties. */ + + /* The writable, enumerable, configurable flags in prop_flags + * match both duk_def_prop() and internal property flags. + */ + DUK_ASSERT(DUK_PROPDESC_FLAG_WRITABLE == DUK_DEFPROP_WRITABLE); + DUK_ASSERT(DUK_PROPDESC_FLAG_ENUMERABLE == DUK_DEFPROP_ENUMERABLE); + DUK_ASSERT(DUK_PROPDESC_FLAG_CONFIGURABLE == DUK_DEFPROP_CONFIGURABLE); + + t = (duk_small_uint_t) duk_bd_decode(bd, DUK__PROP_TYPE_BITS); + + DUK_DDD(DUK_DDDPRINT("built-in %ld, normal-valued property %ld, key %!T, flags 0x%02lx, type %ld", + (long) i, + (long) j, + duk_get_tval(thr, -1), + (unsigned long) defprop_flags, + (long) t)); + + switch (t) { + case DUK__PROP_TYPE_DOUBLE: { + duk__push_double(thr, bd); + break; + } + case DUK__PROP_TYPE_STRING: { + duk__push_string(thr, bd); + break; + } + case DUK__PROP_TYPE_STRIDX: { + duk__push_stridx(thr, bd); + break; + } + case DUK__PROP_TYPE_BUILTIN: { + duk_small_uint_t bidx; + + bidx = (duk_small_uint_t) duk_bd_decode_varuint(bd); + duk_dup(thr, (duk_idx_t) bidx); + break; + } + case DUK__PROP_TYPE_UNDEFINED: { + duk_push_undefined(thr); + break; + } + case DUK__PROP_TYPE_BOOLEAN_TRUE: { + duk_push_true(thr); + break; + } + case DUK__PROP_TYPE_BOOLEAN_FALSE: { + duk_push_false(thr); + break; + } + case DUK__PROP_TYPE_ACCESSOR: { + duk_small_uint_t natidx_getter = (duk_small_uint_t) duk_bd_decode_varuint(bd); + duk_small_uint_t natidx_setter = (duk_small_uint_t) duk_bd_decode_varuint(bd); + duk_small_uint_t accessor_magic = (duk_small_uint_t) duk_bd_decode_varuint(bd); + duk_c_function c_func_getter; + duk_c_function c_func_setter; + + DUK_DDD(DUK_DDDPRINT( + "built-in accessor property: objidx=%ld, key=%!T, getteridx=%ld, setteridx=%ld, flags=0x%04lx", + (long) i, + duk_get_tval(thr, -1), + (long) natidx_getter, + (long) natidx_setter, + (unsigned long) defprop_flags)); + + c_func_getter = duk_bi_native_functions[natidx_getter]; + if (c_func_getter != NULL) { + duk_push_c_function_builtin_noconstruct(thr, c_func_getter, 0); /* always 0 args */ + duk_set_magic(thr, -1, (duk_int_t) accessor_magic); + defprop_flags |= DUK_DEFPROP_HAVE_GETTER; + } + c_func_setter = duk_bi_native_functions[natidx_setter]; + if (c_func_setter != NULL) { + duk_push_c_function_builtin_noconstruct(thr, c_func_setter, 1); /* always 1 arg */ + duk_set_magic(thr, -1, (duk_int_t) accessor_magic); + defprop_flags |= DUK_DEFPROP_HAVE_SETTER; + } + + /* Writable flag doesn't make sense for an accessor. */ + DUK_ASSERT((defprop_flags & DUK_PROPDESC_FLAG_WRITABLE) == 0); /* genbuiltins.py ensures */ + + defprop_flags &= ~(DUK_DEFPROP_HAVE_VALUE | DUK_DEFPROP_HAVE_WRITABLE); + defprop_flags |= DUK_DEFPROP_HAVE_ENUMERABLE | DUK_DEFPROP_HAVE_CONFIGURABLE; + break; + } + default: { + /* exhaustive */ + DUK_UNREACHABLE(); + } + } + + duk_def_prop(thr, (duk_idx_t) i, defprop_flags); + DUK_ASSERT_TOP(thr, DUK_NUM_ALL_BUILTINS); + } + + /* native function properties */ + num = (duk_small_uint_t) duk_bd_decode_varuint(bd); + DUK_DDD(DUK_DDDPRINT("built-in object %ld, %ld function valued properties", (long) i, (long) num)); + for (j = 0; j < num; j++) { + duk_hstring *h_key; + duk_small_uint_t natidx; + duk_int_t c_nargs; /* must hold DUK_VARARGS */ + duk_small_uint_t c_length; + duk_int16_t magic; + duk_c_function c_func; + duk_hnatfunc *h_func; +#if defined(DUK_USE_LIGHTFUNC_BUILTINS) + duk_small_int_t lightfunc_eligible; +#endif + duk_small_uint_t defprop_flags; + + duk__push_stridx_or_string(thr, bd); + h_key = duk_known_hstring(thr, -1); + DUK_UNREF(h_key); + natidx = (duk_small_uint_t) duk_bd_decode_varuint(bd); + + c_length = (duk_small_uint_t) duk_bd_decode(bd, DUK__LENGTH_PROP_BITS); + c_nargs = (duk_int_t) duk_bd_decode_flagged(bd, DUK__NARGS_BITS, (duk_uint32_t) c_length /*def_value*/); + if (c_nargs == DUK__NARGS_VARARGS_MARKER) { + c_nargs = DUK_VARARGS; + } + + c_func = duk_bi_native_functions[natidx]; + + DUK_DDD( + DUK_DDDPRINT("built-in %ld, function-valued property %ld, key %!O, natidx %ld, length %ld, nargs %ld", + (long) i, + (long) j, + (duk_heaphdr *) h_key, + (long) natidx, + (long) c_length, + (c_nargs == DUK_VARARGS ? (long) -1 : (long) c_nargs))); + + /* Cast converts magic to 16-bit signed value */ + magic = (duk_int16_t) duk_bd_decode_varuint(bd); + +#if defined(DUK_USE_LIGHTFUNC_BUILTINS) + lightfunc_eligible = + ((c_nargs >= DUK_LFUNC_NARGS_MIN && c_nargs <= DUK_LFUNC_NARGS_MAX) || (c_nargs == DUK_VARARGS)) && + (c_length <= DUK_LFUNC_LENGTH_MAX) && (magic >= DUK_LFUNC_MAGIC_MIN && magic <= DUK_LFUNC_MAGIC_MAX); + + /* These functions have trouble working as lightfuncs. + * Some of them have specific asserts and some may have + * additional properties (e.g. 'require.id' may be written). + */ + if (c_func == duk_bi_global_object_eval) { + lightfunc_eligible = 0; + } +#if defined(DUK_USE_COROUTINE_SUPPORT) + if (c_func == duk_bi_thread_yield || c_func == duk_bi_thread_resume) { + lightfunc_eligible = 0; + } +#endif + if (c_func == duk_bi_function_prototype_call || c_func == duk_bi_function_prototype_apply || + c_func == duk_bi_reflect_apply || c_func == duk_bi_reflect_construct) { + lightfunc_eligible = 0; + } + + if (lightfunc_eligible) { + duk_tval tv_lfunc; + duk_small_uint_t lf_nargs = + (duk_small_uint_t) (c_nargs == DUK_VARARGS ? DUK_LFUNC_NARGS_VARARGS : c_nargs); + duk_small_uint_t lf_flags = DUK_LFUNC_FLAGS_PACK(magic, c_length, lf_nargs); + DUK_TVAL_SET_LIGHTFUNC(&tv_lfunc, c_func, lf_flags); + duk_push_tval(thr, &tv_lfunc); + DUK_D(DUK_DPRINT("built-in function eligible as light function: i=%d, j=%d c_length=%ld, " + "c_nargs=%ld, magic=%ld -> %!iT", + (int) i, + (int) j, + (long) c_length, + (long) c_nargs, + (long) magic, + duk_get_tval(thr, -1))); + goto lightfunc_skip; + } + + DUK_D(DUK_DPRINT( + "built-in function NOT ELIGIBLE as light function: i=%d, j=%d c_length=%ld, c_nargs=%ld, magic=%ld", + (int) i, + (int) j, + (long) c_length, + (long) c_nargs, + (long) magic)); +#endif /* DUK_USE_LIGHTFUNC_BUILTINS */ + + /* [ (builtin objects) name ] */ + + duk_push_c_function_builtin_noconstruct(thr, c_func, c_nargs); + h_func = duk_known_hnatfunc(thr, -1); + DUK_UNREF(h_func); + + /* XXX: add into init data? */ + + /* Special call handling, not described in init data. */ + if (c_func == duk_bi_global_object_eval || c_func == duk_bi_function_prototype_call || + c_func == duk_bi_function_prototype_apply || c_func == duk_bi_reflect_apply || + c_func == duk_bi_reflect_construct) { + DUK_HOBJECT_SET_SPECIAL_CALL((duk_hobject *) h_func); + } + + /* Currently all built-in native functions are strict. + * This doesn't matter for many functions, but e.g. + * String.prototype.charAt (and other string functions) + * rely on being strict so that their 'this' binding is + * not automatically coerced. + */ + DUK_HOBJECT_SET_STRICT((duk_hobject *) h_func); + + /* No built-in functions are constructable except the top + * level ones (Number, etc). + */ + DUK_ASSERT(!DUK_HOBJECT_HAS_CONSTRUCTABLE((duk_hobject *) h_func)); + + /* XXX: any way to avoid decoding magic bit; there are quite + * many function properties and relatively few with magic values. + */ + h_func->magic = magic; + + /* [ (builtin objects) name func ] */ + + duk_push_uint(thr, c_length); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_C); + + duk_dup_m2(thr); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_NAME, DUK_PROPDESC_FLAGS_C); + + /* XXX: other properties of function instances; 'arguments', 'caller'. */ + + DUK_DD(DUK_DDPRINT("built-in object %ld, function property %ld -> %!T", + (long) i, + (long) j, + (duk_tval *) duk_get_tval(thr, -1))); + + /* [ (builtin objects) name func ] */ + + /* + * The default property attributes are correct for all + * function valued properties of built-in objects now. + */ + +#if defined(DUK_USE_LIGHTFUNC_BUILTINS) + lightfunc_skip: +#endif + + defprop_flags = (duk_small_uint_t) duk_bd_decode_flagged(bd, + DUK__PROP_FLAGS_BITS, + (duk_uint32_t) DUK_PROPDESC_FLAGS_WC); + defprop_flags |= DUK_DEFPROP_FORCE | DUK_DEFPROP_HAVE_VALUE | DUK_DEFPROP_HAVE_WRITABLE | + DUK_DEFPROP_HAVE_ENUMERABLE | DUK_DEFPROP_HAVE_CONFIGURABLE; + DUK_ASSERT(DUK_PROPDESC_FLAG_WRITABLE == DUK_DEFPROP_WRITABLE); + DUK_ASSERT(DUK_PROPDESC_FLAG_ENUMERABLE == DUK_DEFPROP_ENUMERABLE); + DUK_ASSERT(DUK_PROPDESC_FLAG_CONFIGURABLE == DUK_DEFPROP_CONFIGURABLE); + + duk_def_prop(thr, (duk_idx_t) i, defprop_flags); + + /* [ (builtin objects) ] */ + } + } + + /* + * Special post-tweaks, for cases not covered by the init data format. + * + * - Set Date.prototype.toGMTString to Date.prototype.toUTCString. + * toGMTString is required to have the same Function object as + * toUTCString in E5 Section B.2.6. Note that while Smjs respects + * this, V8 does not (the Function objects are distinct). + * + * - Make DoubleError non-extensible. + * + * - Add info about most important effective compile options to Duktape. + * + * - Possibly remove some properties (values or methods) which are not + * desirable with current feature options but are not currently + * conditional in init data. + */ + +#if defined(DUK_USE_DATE_BUILTIN) + duk_get_prop_stridx_short(thr, DUK_BIDX_DATE_PROTOTYPE, DUK_STRIDX_TO_UTC_STRING); + duk_xdef_prop_stridx_short(thr, DUK_BIDX_DATE_PROTOTYPE, DUK_STRIDX_TO_GMT_STRING, DUK_PROPDESC_FLAGS_WC); +#endif + + h = duk_known_hobject(thr, DUK_BIDX_DOUBLE_ERROR); + DUK_HOBJECT_CLEAR_EXTENSIBLE(h); + +#if !defined(DUK_USE_ES6_OBJECT_PROTO_PROPERTY) + DUK_DD(DUK_DDPRINT("delete Object.prototype.__proto__ built-in which is not enabled in features")); + (void) duk_hobject_delprop_raw(thr, + thr->builtins[DUK_BIDX_OBJECT_PROTOTYPE], + DUK_HTHREAD_STRING___PROTO__(thr), + DUK_DELPROP_FLAG_THROW); +#endif + +#if !defined(DUK_USE_ES6_OBJECT_SETPROTOTYPEOF) + DUK_DD(DUK_DDPRINT("delete Object.setPrototypeOf built-in which is not enabled in features")); + (void) duk_hobject_delprop_raw(thr, + thr->builtins[DUK_BIDX_OBJECT_CONSTRUCTOR], + DUK_HTHREAD_STRING_SET_PROTOTYPE_OF(thr), + DUK_DELPROP_FLAG_THROW); +#endif + + /* XXX: relocate */ + duk_push_string(thr, + /* Endianness indicator */ +#if defined(DUK_USE_INTEGER_LE) + "l" +#elif defined(DUK_USE_INTEGER_BE) + "b" +#elif defined(DUK_USE_INTEGER_ME) /* integer mixed endian not really used now */ + "m" +#else + "?" +#endif +#if defined(DUK_USE_DOUBLE_LE) + "l" +#elif defined(DUK_USE_DOUBLE_BE) + "b" +#elif defined(DUK_USE_DOUBLE_ME) + "m" +#else + "?" +#endif + " " + /* Packed or unpacked tval */ +#if defined(DUK_USE_PACKED_TVAL) + "p" +#else + "u" +#endif +#if defined(DUK_USE_FASTINT) + "f" +#endif + " " + /* Low memory/performance options */ +#if defined(DUK_USE_STRTAB_PTRCOMP) + "s" +#endif +#if !defined(DUK_USE_HEAPPTR16) && !defined(DUK_DATAPTR16) && !defined(DUK_FUNCPTR16) + "n" +#endif +#if defined(DUK_USE_HEAPPTR16) + "h" +#endif +#if defined(DUK_USE_DATAPTR16) + "d" +#endif +#if defined(DUK_USE_FUNCPTR16) + "f" +#endif +#if defined(DUK_USE_REFCOUNT16) + "R" +#endif +#if defined(DUK_USE_STRHASH16) + "H" +#endif +#if defined(DUK_USE_STRLEN16) + "S" +#endif +#if defined(DUK_USE_BUFLEN16) + "B" +#endif +#if defined(DUK_USE_OBJSIZES16) + "O" +#endif +#if defined(DUK_USE_LIGHTFUNC_BUILTINS) + "L" +#endif +#if defined(DUK_USE_ROM_STRINGS) || defined(DUK_USE_ROM_OBJECTS) + /* XXX: This won't be shown in practice now + * because this code is not run when builtins + * are in ROM. + */ + "Z" +#endif +#if defined(DUK_USE_LITCACHE_SIZE) + "l" +#endif + " " + /* Object property allocation layout */ +#if defined(DUK_USE_HOBJECT_LAYOUT_1) + "p1" +#elif defined(DUK_USE_HOBJECT_LAYOUT_2) + "p2" +#elif defined(DUK_USE_HOBJECT_LAYOUT_3) + "p3" +#else + "p?" +#endif + " " + /* Alignment guarantee */ +#if (DUK_USE_ALIGN_BY == 4) + "a4" +#elif (DUK_USE_ALIGN_BY == 8) + "a8" +#elif (DUK_USE_ALIGN_BY == 1) + "a1" +#else +#error invalid DUK_USE_ALIGN_BY +#endif + " " + /* Architecture, OS, and compiler strings */ + DUK_USE_ARCH_STRING " " DUK_USE_OS_STRING " " DUK_USE_COMPILER_STRING); + duk_xdef_prop_stridx_short(thr, DUK_BIDX_DUKTAPE, DUK_STRIDX_ENV, DUK_PROPDESC_FLAGS_WC); + + /* + * Since built-ins are not often extended, compact them. + */ + + DUK_DD(DUK_DDPRINT("compact built-ins")); + for (i = 0; i < DUK_NUM_ALL_BUILTINS; i++) { + duk_hobject_compact_props(thr, duk_known_hobject(thr, (duk_idx_t) i)); + } + + DUK_D(DUK_DPRINT("INITBUILTINS END")); + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 1) + for (i = 0; i < DUK_NUM_ALL_BUILTINS; i++) { + DUK_DD(DUK_DDPRINT("built-in object %ld after initialization and compacting: %!@iO", + (long) i, + (duk_heaphdr *) duk_require_hobject(thr, (duk_idx_t) i))); + } +#endif + + /* + * Pop built-ins from stack: they are now INCREF'd and + * reachable from the builtins[] array or indirectly + * through builtins[]. + */ + + duk_set_top(thr, 0); + DUK_ASSERT_TOP(thr, 0); +} +#endif /* DUK_USE_ROM_OBJECTS */ + +DUK_INTERNAL void duk_hthread_copy_builtin_objects(duk_hthread *thr_from, duk_hthread *thr_to) { + duk_small_uint_t i; + + for (i = 0; i < DUK_NUM_BUILTINS; i++) { + thr_to->builtins[i] = thr_from->builtins[i]; + DUK_HOBJECT_INCREF_ALLOWNULL(thr_to, thr_to->builtins[i]); /* side effect free */ + } +} + +/* automatic undefs */ +#undef DUK__LENGTH_PROP_BITS +#undef DUK__NARGS_BITS +#undef DUK__NARGS_VARARGS_MARKER +#undef DUK__PROP_FLAGS_BITS +#undef DUK__PROP_TYPE_ACCESSOR +#undef DUK__PROP_TYPE_BITS +#undef DUK__PROP_TYPE_BOOLEAN_FALSE +#undef DUK__PROP_TYPE_BOOLEAN_TRUE +#undef DUK__PROP_TYPE_BUILTIN +#undef DUK__PROP_TYPE_DOUBLE +#undef DUK__PROP_TYPE_STRIDX +#undef DUK__PROP_TYPE_STRING +#undef DUK__PROP_TYPE_UNDEFINED +#line 1 "duk_hthread_misc.c" +/* + * Thread support. + */ + +/* #include duk_internal.h -> already included */ + +DUK_INTERNAL void duk_hthread_terminate(duk_hthread *thr) { + DUK_ASSERT(thr != NULL); + + while (thr->callstack_curr != NULL) { + duk_hthread_activation_unwind_norz(thr); + } + + thr->valstack_bottom = thr->valstack; + duk_set_top(thr, 0); /* unwinds valstack, updating refcounts */ + + thr->state = DUK_HTHREAD_STATE_TERMINATED; + + /* Here we could remove references to built-ins, but it may not be + * worth the effort because built-ins are quite likely to be shared + * with another (unterminated) thread, and terminated threads are also + * usually garbage collected quite quickly. + * + * We could also shrink the value stack here, but that also may not + * be worth the effort for the same reason. + */ + + DUK_REFZERO_CHECK_SLOW(thr); +} + +#if defined(DUK_USE_DEBUGGER_SUPPORT) +DUK_INTERNAL duk_uint_fast32_t duk_hthread_get_act_curr_pc(duk_hthread *thr, duk_activation *act) { + duk_instr_t *bcode; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(act != NULL); + DUK_UNREF(thr); + + /* XXX: store 'bcode' pointer to activation for faster lookup? */ + if (act->func && DUK_HOBJECT_IS_COMPFUNC(act->func)) { + bcode = DUK_HCOMPFUNC_GET_CODE_BASE(thr->heap, (duk_hcompfunc *) (act->func)); + return (duk_uint_fast32_t) (act->curr_pc - bcode); + } + return 0; +} +#endif /* DUK_USE_DEBUGGER_SUPPORT */ + +DUK_INTERNAL duk_uint_fast32_t duk_hthread_get_act_prev_pc(duk_hthread *thr, duk_activation *act) { + duk_instr_t *bcode; + duk_uint_fast32_t ret; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(act != NULL); + DUK_UNREF(thr); + + if (act->func && DUK_HOBJECT_IS_COMPFUNC(act->func)) { + bcode = DUK_HCOMPFUNC_GET_CODE_BASE(thr->heap, (duk_hcompfunc *) (act->func)); + ret = (duk_uint_fast32_t) (act->curr_pc - bcode); + if (ret > 0) { + ret--; + } + return ret; + } + return 0; +} + +/* Write bytecode executor's curr_pc back to topmost activation (if any). */ +DUK_INTERNAL void duk_hthread_sync_currpc(duk_hthread *thr) { + duk_activation *act; + + DUK_ASSERT(thr != NULL); + + if (thr->ptr_curr_pc != NULL) { + /* ptr_curr_pc != NULL only when bytecode executor is active. */ + DUK_ASSERT(thr->callstack_top > 0); + DUK_ASSERT(thr->callstack_curr != NULL); + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + act->curr_pc = *thr->ptr_curr_pc; + } +} + +DUK_INTERNAL void duk_hthread_sync_and_null_currpc(duk_hthread *thr) { + duk_activation *act; + + DUK_ASSERT(thr != NULL); + + if (thr->ptr_curr_pc != NULL) { + /* ptr_curr_pc != NULL only when bytecode executor is active. */ + DUK_ASSERT(thr->callstack_top > 0); + DUK_ASSERT(thr->callstack_curr != NULL); + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + act->curr_pc = *thr->ptr_curr_pc; + thr->ptr_curr_pc = NULL; + } +} +#line 1 "duk_hthread_stacks.c" +/* + * Thread stack (mainly call stack) primitives: allocation of activations, + * unwinding catchers and activations, etc. + * + * Value stack handling is a part of the API implementation. + */ + +/* #include duk_internal.h -> already included */ + +/* Unwind the topmost catcher of the current activation (caller must check that + * both exist) without side effects. + */ +DUK_INTERNAL void duk_hthread_catcher_unwind_norz(duk_hthread *thr, duk_activation *act) { + duk_catcher *cat; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(act != NULL); + DUK_ASSERT(act->cat != NULL); /* caller must check */ + cat = act->cat; + DUK_ASSERT(cat != NULL); + + DUK_DDD(DUK_DDDPRINT("unwinding catch stack entry %p (lexenv check is done)", (void *) cat)); + + if (DUK_CAT_HAS_LEXENV_ACTIVE(cat)) { + duk_hobject *env; + + env = act->lex_env; /* current lex_env of the activation (created for catcher) */ + DUK_ASSERT(env != NULL); /* must be, since env was created when catcher was created */ + act->lex_env = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, env); /* prototype is lex_env before catcher created */ + DUK_HOBJECT_INCREF(thr, act->lex_env); + DUK_HOBJECT_DECREF_NORZ(thr, env); + + /* There is no need to decref anything else than 'env': if 'env' + * becomes unreachable, refzero will handle decref'ing its prototype. + */ + } + + act->cat = cat->parent; + duk_hthread_catcher_free(thr, cat); +} + +/* Same as above, but caller is certain no catcher-related lexenv may exist. */ +DUK_INTERNAL void duk_hthread_catcher_unwind_nolexenv_norz(duk_hthread *thr, duk_activation *act) { + duk_catcher *cat; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(act != NULL); + DUK_ASSERT(act->cat != NULL); /* caller must check */ + cat = act->cat; + DUK_ASSERT(cat != NULL); + + DUK_DDD(DUK_DDDPRINT("unwinding catch stack entry %p (lexenv check is not done)", (void *) cat)); + + DUK_ASSERT(!DUK_CAT_HAS_LEXENV_ACTIVE(cat)); + + act->cat = cat->parent; + duk_hthread_catcher_free(thr, cat); +} + +DUK_LOCAL +#if defined(DUK_USE_CACHE_CATCHER) +DUK_NOINLINE +#endif +duk_catcher *duk__hthread_catcher_alloc_slow(duk_hthread *thr) { + duk_catcher *cat; + + cat = (duk_catcher *) DUK_ALLOC_CHECKED(thr, sizeof(duk_catcher)); + DUK_ASSERT(cat != NULL); + return cat; +} + +#if defined(DUK_USE_CACHE_CATCHER) +DUK_INTERNAL DUK_INLINE duk_catcher *duk_hthread_catcher_alloc(duk_hthread *thr) { + duk_catcher *cat; + + DUK_ASSERT(thr != NULL); + + cat = thr->heap->catcher_free; + if (DUK_LIKELY(cat != NULL)) { + thr->heap->catcher_free = cat->parent; + return cat; + } + + return duk__hthread_catcher_alloc_slow(thr); +} +#else /* DUK_USE_CACHE_CATCHER */ +DUK_INTERNAL duk_catcher *duk_hthread_catcher_alloc(duk_hthread *thr) { + return duk__hthread_catcher_alloc_slow(thr); +} +#endif /* DUK_USE_CACHE_CATCHER */ + +DUK_INTERNAL void duk_hthread_catcher_free(duk_hthread *thr, duk_catcher *cat) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(cat != NULL); + +#if defined(DUK_USE_CACHE_CATCHER) + /* Unconditional caching for now; freed in mark-and-sweep. */ + cat->parent = thr->heap->catcher_free; + thr->heap->catcher_free = cat; +#else + DUK_FREE_CHECKED(thr, (void *) cat); +#endif +} + +DUK_LOCAL +#if defined(DUK_USE_CACHE_ACTIVATION) +DUK_NOINLINE +#endif +duk_activation *duk__hthread_activation_alloc_slow(duk_hthread *thr) { + duk_activation *act; + + act = (duk_activation *) DUK_ALLOC_CHECKED(thr, sizeof(duk_activation)); + DUK_ASSERT(act != NULL); + return act; +} + +#if defined(DUK_USE_CACHE_ACTIVATION) +DUK_INTERNAL DUK_INLINE duk_activation *duk_hthread_activation_alloc(duk_hthread *thr) { + duk_activation *act; + + DUK_ASSERT(thr != NULL); + + act = thr->heap->activation_free; + if (DUK_LIKELY(act != NULL)) { + thr->heap->activation_free = act->parent; + return act; + } + + return duk__hthread_activation_alloc_slow(thr); +} +#else /* DUK_USE_CACHE_ACTIVATION */ +DUK_INTERNAL duk_activation *duk_hthread_activation_alloc(duk_hthread *thr) { + return duk__hthread_activation_alloc_slow(thr); +} +#endif /* DUK_USE_CACHE_ACTIVATION */ + +DUK_INTERNAL void duk_hthread_activation_free(duk_hthread *thr, duk_activation *act) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(act != NULL); + +#if defined(DUK_USE_CACHE_ACTIVATION) + /* Unconditional caching for now; freed in mark-and-sweep. */ + act->parent = thr->heap->activation_free; + thr->heap->activation_free = act; +#else + DUK_FREE_CHECKED(thr, (void *) act); +#endif +} + +/* Internal helper: process the unwind for the topmost activation of a thread, + * but leave the duk_activation in place for possible tailcall reuse. + */ +DUK_LOCAL void duk__activation_unwind_nofree_norz(duk_hthread *thr) { +#if defined(DUK_USE_DEBUGGER_SUPPORT) + duk_heap *heap; +#endif + duk_activation *act; + duk_hobject *func; + duk_hobject *tmp; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->callstack_curr != NULL); /* caller must check */ + DUK_ASSERT(thr->callstack_top > 0); + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + /* With lightfuncs, act 'func' may be NULL. */ + + /* With duk_activation records allocated separately, 'act' is a stable + * pointer and not affected by side effects. + */ + +#if defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) + /* + * Restore 'caller' property for non-strict callee functions. + */ + + func = DUK_ACT_GET_FUNC(act); + if (func != NULL && !DUK_HOBJECT_HAS_STRICT(func)) { + duk_tval *tv_caller; + duk_tval tv_tmp; + duk_hobject *h_tmp; + + tv_caller = duk_hobject_find_entry_tval_ptr_stridx(thr->heap, func, DUK_STRIDX_CALLER); + + /* The act->prev_caller should only be set if the entry for 'caller' + * exists (as it is only set in that case, and the property is not + * configurable), but handle all the cases anyway. + */ + + if (tv_caller) { + DUK_TVAL_SET_TVAL(&tv_tmp, tv_caller); + if (act->prev_caller) { + /* Just transfer the refcount from act->prev_caller to tv_caller, + * so no need for a refcount update. This is the expected case. + */ + DUK_TVAL_SET_OBJECT(tv_caller, act->prev_caller); + act->prev_caller = NULL; + } else { + DUK_TVAL_SET_NULL(tv_caller); /* no incref needed */ + DUK_ASSERT(act->prev_caller == NULL); + } + DUK_TVAL_DECREF_NORZ(thr, &tv_tmp); + } else { + h_tmp = act->prev_caller; + if (h_tmp) { + act->prev_caller = NULL; + DUK_HOBJECT_DECREF_NORZ(thr, h_tmp); + } + } + DUK_ASSERT(act->prev_caller == NULL); + } +#endif + + /* + * Unwind debugger state. If we unwind while stepping + * (for any step type), pause execution. This is the + * only place explicitly handling a step out. + */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + heap = thr->heap; + if (heap->dbg_pause_act == thr->callstack_curr) { + if (heap->dbg_pause_flags & DUK_PAUSE_FLAG_FUNC_EXIT) { + DUK_D(DUK_DPRINT("PAUSE TRIGGERED by function exit")); + duk_debug_set_paused(heap); + } else { + DUK_D(DUK_DPRINT("unwound past dbg_pause_act, set to NULL")); + heap->dbg_pause_act = NULL; /* avoid stale pointers */ + } + DUK_ASSERT(heap->dbg_pause_act == NULL); + } +#endif + + /* + * Unwind catchers. + * + * Since there are no references in the catcher structure, + * unwinding is quite simple. The only thing we need to + * look out for is popping a possible lexical environment + * established for an active catch clause. + */ + + while (act->cat != NULL) { + duk_hthread_catcher_unwind_norz(thr, act); + } + + /* + * Close environment record(s) if they exist. + * + * Only variable environments are closed. If lex_env != var_env, it + * cannot currently contain any register bound declarations. + * + * Only environments created for a NEWENV function are closed. If an + * environment is created for e.g. an eval call, it must not be closed. + */ + + func = DUK_ACT_GET_FUNC(act); + if (func != NULL && !DUK_HOBJECT_HAS_NEWENV(func)) { + DUK_DDD(DUK_DDDPRINT("skip closing environments, envs not owned by this activation")); + goto skip_env_close; + } + /* func is NULL for lightfunc */ + + /* Catch sites are required to clean up their environments + * in FINALLY part before propagating, so this should + * always hold here. + */ + DUK_ASSERT(act->lex_env == act->var_env); + + /* XXX: Closing the environment record copies values from registers + * into the scope object. It's side effect free as such, but may + * currently run out of memory which causes an error throw. This is + * an actual sandboxing problem for error unwinds, and needs to be + * fixed e.g. by preallocating the scope property slots. + */ + if (act->var_env != NULL) { + DUK_DDD(DUK_DDDPRINT("closing var_env record %p -> %!O", (void *) act->var_env, (duk_heaphdr *) act->var_env)); + duk_js_close_environment_record(thr, act->var_env); + } + +skip_env_close: + + /* + * Update preventcount + */ + + if (act->flags & DUK_ACT_FLAG_PREVENT_YIELD) { + DUK_ASSERT(thr->callstack_preventcount >= 1); + thr->callstack_preventcount--; + } + + /* + * Reference count updates, using NORZ macros so we don't + * need to handle side effects. + * + * duk_activation pointers like act->var_env are intentionally + * left as garbage and not NULLed. Without side effects they + * can't be used when the values are dangling/garbage. + */ + + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, act->var_env); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, act->lex_env); + tmp = DUK_ACT_GET_FUNC(act); + DUK_HOBJECT_DECREF_NORZ_ALLOWNULL(thr, tmp); + DUK_UNREF(tmp); +} + +/* Unwind topmost duk_activation of a thread, caller must ensure that an + * activation exists. The call is side effect free, except that scope + * closure may currently throw an out-of-memory error. + */ +DUK_INTERNAL void duk_hthread_activation_unwind_norz(duk_hthread *thr) { + duk_activation *act; + + duk__activation_unwind_nofree_norz(thr); + + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT(thr->callstack_top > 0); + act = thr->callstack_curr; + thr->callstack_curr = act->parent; + thr->callstack_top--; + + /* Ideally we'd restore value stack reserve here to caller's value. + * This doesn't work for current unwind call sites however, because + * the current (unwound) value stack top may be above the reserve. + * Thus value stack reserve is restored by the call sites. + */ + + /* XXX: inline for performance builds? */ + duk_hthread_activation_free(thr, act); + + /* We could clear the book-keeping variables like retval_byteoff for + * the topmost activation, but don't do so now as it's not necessary. + */ +} + +DUK_INTERNAL void duk_hthread_activation_unwind_reuse_norz(duk_hthread *thr) { + duk__activation_unwind_nofree_norz(thr); +} + +/* Get duk_activation for given callstack level or NULL if level is invalid + * or deeper than the call stack. Level -1 refers to current activation, -2 + * to its caller, etc. Starting from Duktape 2.2 finding the activation is + * a linked list scan which gets more expensive the deeper the lookup is. + */ +DUK_INTERNAL duk_activation *duk_hthread_get_activation_for_level(duk_hthread *thr, duk_int_t level) { + duk_activation *act; + + if (level >= 0) { + return NULL; + } + act = thr->callstack_curr; + for (;;) { + if (act == NULL) { + return act; + } + if (level == -1) { + return act; + } + level++; + act = act->parent; + } + /* never here */ +} + +#if defined(DUK_USE_FINALIZER_TORTURE) +DUK_INTERNAL void duk_hthread_valstack_torture_realloc(duk_hthread *thr) { + duk_size_t alloc_size; + duk_tval *new_ptr; + duk_ptrdiff_t alloc_end_off; + duk_ptrdiff_t end_off; + duk_ptrdiff_t bottom_off; + duk_ptrdiff_t top_off; + + if (thr->valstack == NULL) { + DUK_D(DUK_DPRINT("skip valstack torture realloc, valstack is NULL")); + return; + } + + alloc_end_off = (duk_ptrdiff_t) ((duk_uint8_t *) thr->valstack_alloc_end - (duk_uint8_t *) thr->valstack); + end_off = (duk_ptrdiff_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack); + bottom_off = (duk_ptrdiff_t) ((duk_uint8_t *) thr->valstack_bottom - (duk_uint8_t *) thr->valstack); + top_off = (duk_ptrdiff_t) ((duk_uint8_t *) thr->valstack_top - (duk_uint8_t *) thr->valstack); + alloc_size = (duk_size_t) alloc_end_off; + if (alloc_size == 0) { + DUK_D(DUK_DPRINT("skip valstack torture realloc, alloc_size is zero")); + return; + } + + /* Use DUK_ALLOC_RAW() to avoid side effects. */ + new_ptr = (duk_tval *) DUK_ALLOC_RAW(thr->heap, alloc_size); + if (new_ptr != NULL) { + duk_memcpy((void *) new_ptr, (const void *) thr->valstack, alloc_size); + duk_memset((void *) thr->valstack, 0x55, alloc_size); + DUK_FREE_CHECKED(thr, (void *) thr->valstack); + thr->valstack = new_ptr; + thr->valstack_alloc_end = (duk_tval *) ((duk_uint8_t *) new_ptr + alloc_end_off); + thr->valstack_end = (duk_tval *) ((duk_uint8_t *) new_ptr + end_off); + thr->valstack_bottom = (duk_tval *) ((duk_uint8_t *) new_ptr + bottom_off); + thr->valstack_top = (duk_tval *) ((duk_uint8_t *) new_ptr + top_off); + } else { + DUK_D(DUK_DPRINT("failed to realloc valstack for torture, ignore")); + } +} +#endif /* DUK_USE_FINALIZER_TORTURE */ +#line 1 "duk_js_arith.c" +/* + * Shared helpers for arithmetic operations + */ + +/* #include duk_internal.h -> already included */ + +/* ECMAScript modulus ('%') does not match IEEE 754 "remainder" operation + * (implemented by remainder() in C99) but does seem to match ANSI C fmod(). + * Compare E5 Section 11.5.3 and "man fmod". + */ +DUK_INTERNAL double duk_js_arith_mod(double d1, double d2) { +#if defined(DUK_USE_POW_WORKAROUNDS) + /* Specific fixes to common fmod() implementation issues: + * - test-bug-mingw-math-issues.js + */ + if (DUK_ISINF(d2)) { + if (DUK_ISINF(d1)) { + return DUK_DOUBLE_NAN; + } else { + return d1; + } + } else if (duk_double_equals(d1, 0.0)) { + /* d1 +/-0 is returned as is (preserving sign) except when + * d2 is zero or NaN. + */ + if (duk_double_equals(d2, 0.0) || DUK_ISNAN(d2)) { + return DUK_DOUBLE_NAN; + } else { + return d1; + } + } +#else + /* Some ISO C assumptions. */ + DUK_ASSERT(duk_double_equals(DUK_FMOD(1.0, DUK_DOUBLE_INFINITY), 1.0)); + DUK_ASSERT(duk_double_equals(DUK_FMOD(-1.0, DUK_DOUBLE_INFINITY), -1.0)); + DUK_ASSERT(duk_double_equals(DUK_FMOD(1.0, -DUK_DOUBLE_INFINITY), 1.0)); + DUK_ASSERT(duk_double_equals(DUK_FMOD(-1.0, -DUK_DOUBLE_INFINITY), -1.0)); + DUK_ASSERT(DUK_ISNAN(DUK_FMOD(DUK_DOUBLE_INFINITY, DUK_DOUBLE_INFINITY))); + DUK_ASSERT(DUK_ISNAN(DUK_FMOD(DUK_DOUBLE_INFINITY, -DUK_DOUBLE_INFINITY))); + DUK_ASSERT(DUK_ISNAN(DUK_FMOD(-DUK_DOUBLE_INFINITY, DUK_DOUBLE_INFINITY))); + DUK_ASSERT(DUK_ISNAN(DUK_FMOD(-DUK_DOUBLE_INFINITY, -DUK_DOUBLE_INFINITY))); + DUK_ASSERT(duk_double_equals(DUK_FMOD(0.0, 1.0), 0.0) && DUK_SIGNBIT(DUK_FMOD(0.0, 1.0)) == 0); + DUK_ASSERT(duk_double_equals(DUK_FMOD(-0.0, 1.0), 0.0) && DUK_SIGNBIT(DUK_FMOD(-0.0, 1.0)) != 0); + DUK_ASSERT(duk_double_equals(DUK_FMOD(0.0, DUK_DOUBLE_INFINITY), 0.0) && + DUK_SIGNBIT(DUK_FMOD(0.0, DUK_DOUBLE_INFINITY)) == 0); + DUK_ASSERT(duk_double_equals(DUK_FMOD(-0.0, DUK_DOUBLE_INFINITY), 0.0) && + DUK_SIGNBIT(DUK_FMOD(-0.0, DUK_DOUBLE_INFINITY)) != 0); + DUK_ASSERT(duk_double_equals(DUK_FMOD(0.0, -DUK_DOUBLE_INFINITY), 0.0) && + DUK_SIGNBIT(DUK_FMOD(0.0, DUK_DOUBLE_INFINITY)) == 0); + DUK_ASSERT(duk_double_equals(DUK_FMOD(-0.0, -DUK_DOUBLE_INFINITY), 0.0) && + DUK_SIGNBIT(DUK_FMOD(-0.0, -DUK_DOUBLE_INFINITY)) != 0); + DUK_ASSERT(DUK_ISNAN(DUK_FMOD(0.0, 0.0))); + DUK_ASSERT(DUK_ISNAN(DUK_FMOD(-0.0, 0.0))); + DUK_ASSERT(DUK_ISNAN(DUK_FMOD(0.0, -0.0))); + DUK_ASSERT(DUK_ISNAN(DUK_FMOD(-0.0, -0.0))); + DUK_ASSERT(DUK_ISNAN(DUK_FMOD(0.0, DUK_DOUBLE_NAN))); + DUK_ASSERT(DUK_ISNAN(DUK_FMOD(-0.0, DUK_DOUBLE_NAN))); +#endif + + return (duk_double_t) DUK_FMOD((double) d1, (double) d2); +} + +/* Shared helper for Math.pow() and exponentiation operator. */ +DUK_INTERNAL double duk_js_arith_pow(double x, double y) { + /* The ANSI C pow() semantics differ from ECMAScript. + * + * E.g. when x==1 and y is +/- infinite, the ECMAScript required + * result is NaN, while at least Linux pow() returns 1. + */ + + duk_small_int_t cx, cy, sx; + + DUK_UNREF(cx); + DUK_UNREF(sx); + cy = (duk_small_int_t) DUK_FPCLASSIFY(y); + + if (cy == DUK_FP_NAN) { + goto ret_nan; + } + if (duk_double_equals(DUK_FABS(x), 1.0) && cy == DUK_FP_INFINITE) { + goto ret_nan; + } + +#if defined(DUK_USE_POW_WORKAROUNDS) + /* Specific fixes to common pow() implementation issues: + * - test-bug-netbsd-math-pow.js: NetBSD 6.0 on x86 (at least) + * - test-bug-mingw-math-issues.js + */ + cx = (duk_small_int_t) DUK_FPCLASSIFY(x); + if (cx == DUK_FP_ZERO && y < 0.0) { + sx = (duk_small_int_t) DUK_SIGNBIT(x); + if (sx == 0) { + /* Math.pow(+0,y) should be Infinity when y<0. NetBSD pow() + * returns -Infinity instead when y is <0 and finite. The + * if-clause also catches y == -Infinity (which works even + * without the fix). + */ + return DUK_DOUBLE_INFINITY; + } else { + /* Math.pow(-0,y) where y<0 should be: + * - -Infinity if y<0 and an odd integer + * - Infinity if y<0 but not an odd integer + * NetBSD pow() returns -Infinity for all finite y<0. The + * if-clause also catches y == -Infinity (which works even + * without the fix). + */ + + /* fmod() return value has same sign as input (negative) so + * the result here will be in the range ]-2,0], -1 indicates + * odd. If x is -Infinity, NaN is returned and the odd check + * always concludes "not odd" which results in desired outcome. + */ + double tmp = DUK_FMOD(y, 2); + if (tmp == -1.0) { + return -DUK_DOUBLE_INFINITY; + } else { + /* Not odd, or y == -Infinity */ + return DUK_DOUBLE_INFINITY; + } + } + } else if (cx == DUK_FP_NAN) { + if (duk_double_equals(y, 0.0)) { + /* NaN ** +/- 0 should always be 1, but is NaN on + * at least some Cygwin/MinGW versions. + */ + return 1.0; + } + } +#else + /* Some ISO C assumptions. */ + DUK_ASSERT(duk_double_equals(DUK_POW(DUK_DOUBLE_NAN, 0.0), 1.0)); + DUK_ASSERT(DUK_ISINF(DUK_POW(0.0, -1.0)) && DUK_SIGNBIT(DUK_POW(0.0, -1.0)) == 0); + DUK_ASSERT(DUK_ISINF(DUK_POW(-0.0, -2.0)) && DUK_SIGNBIT(DUK_POW(-0.0, -2.0)) == 0); + DUK_ASSERT(DUK_ISINF(DUK_POW(-0.0, -3.0)) && DUK_SIGNBIT(DUK_POW(-0.0, -3.0)) != 0); +#endif + + return DUK_POW(x, y); + +ret_nan: + return DUK_DOUBLE_NAN; +} +#line 1 "duk_js_call.c" +/* + * Call handling. + * + * duk_handle_call_unprotected(): + * + * - Unprotected call to ECMAScript or Duktape/C function, from native + * code or bytecode executor. + * + * - Also handles Ecma-to-Ecma calls which reuses a currently running + * executor instance to avoid native recursion. Call setup is done + * normally, but just before calling the bytecode executor a special + * return code is used to indicate that a calling executor is reused. + * + * - Also handles tailcalls, i.e. reuse of current duk_activation. + * + * - Also handles setup for initial Duktape.Thread.resume(). + * + * duk_handle_safe_call(): + * + * - Protected C call within current activation. + * + * setjmp() and local variables have a nasty interaction, see execution.rst; + * non-volatile locals modified after setjmp() call are not guaranteed to + * keep their value and can cause compiler or compiler version specific + * difficult to replicate issues. + * + * See 'execution.rst'. + */ + +/* #include duk_internal.h -> already included */ + +/* XXX: heap->error_not_allowed for success path too? */ + +/* + * Limit check helpers. + */ + +/* Check native stack space if DUK_USE_NATIVE_STACK_CHECK() defined. */ +DUK_INTERNAL void duk_native_stack_check(duk_hthread *thr) { +#if defined(DUK_USE_NATIVE_STACK_CHECK) + if (DUK_USE_NATIVE_STACK_CHECK() != 0) { + DUK_ERROR_RANGE(thr, DUK_STR_NATIVE_STACK_LIMIT); + } +#else + DUK_UNREF(thr); +#endif +} + +/* Allow headroom for calls during error augmentation (see GH-191). + * We allow space for 10 additional recursions, with one extra + * for, e.g. a print() call at the deepest level, and an extra + * +1 for protected call wrapping. + */ +#define DUK__AUGMENT_CALL_RELAX_COUNT (10 + 2) + +/* Stack space required by call handling entry. */ +#define DUK__CALL_HANDLING_REQUIRE_STACK 8 + +DUK_LOCAL DUK_NOINLINE void duk__call_c_recursion_limit_check_slowpath(duk_hthread *thr) { + /* When augmenting an error, the effective limit is a bit higher. + * Check for it only if the fast path check fails. + */ +#if defined(DUK_USE_AUGMENT_ERROR_THROW) || defined(DUK_USE_AUGMENT_ERROR_CREATE) + if (thr->heap->augmenting_error) { + if (thr->heap->call_recursion_depth < thr->heap->call_recursion_limit + DUK__AUGMENT_CALL_RELAX_COUNT) { + DUK_D(DUK_DPRINT("C recursion limit reached but augmenting error and within relaxed limit")); + return; + } + } +#endif + + DUK_D(DUK_DPRINT("call prevented because C recursion limit reached")); + DUK_ERROR_RANGE(thr, DUK_STR_NATIVE_STACK_LIMIT); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL DUK_ALWAYS_INLINE void duk__call_c_recursion_limit_check(duk_hthread *thr) { + DUK_ASSERT(thr->heap->call_recursion_depth >= 0); + DUK_ASSERT(thr->heap->call_recursion_depth <= thr->heap->call_recursion_limit); + + duk_native_stack_check(thr); + + /* This check is forcibly inlined because it's very cheap and almost + * always passes. The slow path is forcibly noinline. + */ + if (DUK_LIKELY(thr->heap->call_recursion_depth < thr->heap->call_recursion_limit)) { + return; + } + + duk__call_c_recursion_limit_check_slowpath(thr); +} + +DUK_LOCAL DUK_NOINLINE void duk__call_callstack_limit_check_slowpath(duk_hthread *thr) { + /* When augmenting an error, the effective limit is a bit higher. + * Check for it only if the fast path check fails. + */ +#if defined(DUK_USE_AUGMENT_ERROR_THROW) || defined(DUK_USE_AUGMENT_ERROR_CREATE) + if (thr->heap->augmenting_error) { + if (thr->callstack_top < DUK_USE_CALLSTACK_LIMIT + DUK__AUGMENT_CALL_RELAX_COUNT) { + DUK_D(DUK_DPRINT("call stack limit reached but augmenting error and within relaxed limit")); + return; + } + } +#endif + + /* XXX: error message is a bit misleading: we reached a recursion + * limit which is also essentially the same as a C callstack limit + * (except perhaps with some relaxed threading assumptions). + */ + DUK_D(DUK_DPRINT("call prevented because call stack limit reached")); + DUK_ERROR_RANGE(thr, DUK_STR_CALLSTACK_LIMIT); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL DUK_ALWAYS_INLINE void duk__call_callstack_limit_check(duk_hthread *thr) { + /* This check is forcibly inlined because it's very cheap and almost + * always passes. The slow path is forcibly noinline. + */ + if (DUK_LIKELY(thr->callstack_top < DUK_USE_CALLSTACK_LIMIT)) { + return; + } + + duk__call_callstack_limit_check_slowpath(thr); +} + +/* + * Interrupt counter fixup (for development only). + */ + +#if defined(DUK_USE_INTERRUPT_COUNTER) && defined(DUK_USE_DEBUG) +DUK_LOCAL void duk__interrupt_fixup(duk_hthread *thr, duk_hthread *entry_curr_thread) { + /* Currently the bytecode executor and executor interrupt + * instruction counts are off because we don't execute the + * interrupt handler when we're about to exit from the initial + * user call into Duktape. + * + * If we were to execute the interrupt handler here, the counts + * would match. You can enable this block manually to check + * that this is the case. + */ + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + +#if defined(DUK_USE_INTERRUPT_DEBUG_FIXUP) + if (entry_curr_thread == NULL) { + thr->interrupt_init = thr->interrupt_init - thr->interrupt_counter; + thr->heap->inst_count_interrupt += thr->interrupt_init; + DUK_DD(DUK_DDPRINT("debug test: updated interrupt count on exit to " + "user code, instruction counts: executor=%ld, interrupt=%ld", + (long) thr->heap->inst_count_exec, + (long) thr->heap->inst_count_interrupt)); + DUK_ASSERT(thr->heap->inst_count_exec == thr->heap->inst_count_interrupt); + } +#else + DUK_UNREF(thr); + DUK_UNREF(entry_curr_thread); +#endif +} +#endif + +/* + * Arguments object creation. + * + * Creating arguments objects involves many small details, see E5 Section + * 10.6 for the specific requirements. Much of the arguments object exotic + * behavior is implemented in duk_hobject_props.c, and is enabled by the + * object flag DUK_HOBJECT_FLAG_EXOTIC_ARGUMENTS. + */ + +DUK_LOCAL void duk__create_arguments_object(duk_hthread *thr, duk_hobject *func, duk_hobject *varenv, duk_idx_t idx_args) { + duk_hobject *arg; /* 'arguments' */ + duk_hobject *formals; /* formals for 'func' (may be NULL if func is a C function) */ + duk_idx_t i_arg; + duk_idx_t i_map; + duk_idx_t i_mappednames; + duk_idx_t i_formals; + duk_idx_t i_argbase; + duk_idx_t n_formals; + duk_idx_t idx; + duk_idx_t num_stack_args; + duk_bool_t need_map; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(func != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_NONBOUND_FUNCTION(func)); + DUK_ASSERT(varenv != NULL); + + /* [ ... func this arg1(@idx_args) ... argN envobj ] + * [ arg1(@idx_args) ... argN envobj ] (for tailcalls) + */ + + need_map = 0; + + i_argbase = idx_args; + num_stack_args = duk_get_top(thr) - i_argbase - 1; + DUK_ASSERT(i_argbase >= 0); + DUK_ASSERT(num_stack_args >= 0); + + formals = (duk_hobject *) duk_hobject_get_formals(thr, (duk_hobject *) func); + if (formals) { + n_formals = (duk_idx_t) ((duk_harray *) formals)->length; + duk_push_hobject(thr, formals); + } else { + /* This shouldn't happen without tampering of internal + * properties: if a function accesses 'arguments', _Formals + * is kept. Check for the case anyway in case internal + * properties have been modified manually. + */ + DUK_D(DUK_DPRINT("_Formals is undefined when creating arguments, use n_formals == 0")); + n_formals = 0; + duk_push_undefined(thr); + } + i_formals = duk_require_top_index(thr); + + DUK_ASSERT(n_formals >= 0); + DUK_ASSERT(formals != NULL || n_formals == 0); + + DUK_DDD( + DUK_DDDPRINT("func=%!O, formals=%!O, n_formals=%ld", (duk_heaphdr *) func, (duk_heaphdr *) formals, (long) n_formals)); + + /* [ ... formals ] */ + + /* + * Create required objects: + * - 'arguments' object: array-like, but not an array + * - 'map' object: internal object, tied to 'arguments' (bare) + * - 'mappedNames' object: temporary value used during construction (bare) + */ + + arg = duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | DUK_HOBJECT_FLAG_ARRAY_PART | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_ARGUMENTS), + DUK_BIDX_OBJECT_PROTOTYPE); + DUK_ASSERT(arg != NULL); + (void) duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJECT), + -1); /* no prototype */ + (void) duk_push_object_helper(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_FLAG_FASTREFS | + DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJECT), + -1); /* no prototype */ + i_arg = duk_get_top(thr) - 3; + i_map = i_arg + 1; + i_mappednames = i_arg + 2; + DUK_ASSERT(!duk_is_bare_object(thr, -3)); /* arguments */ + DUK_ASSERT(duk_is_bare_object(thr, -2)); /* map */ + DUK_ASSERT(duk_is_bare_object(thr, -1)); /* mappedNames */ + + /* [ ... formals arguments map mappedNames ] */ + + DUK_DDD(DUK_DDDPRINT("created arguments related objects: " + "arguments at index %ld -> %!O " + "map at index %ld -> %!O " + "mappednames at index %ld -> %!O", + (long) i_arg, + (duk_heaphdr *) duk_get_hobject(thr, i_arg), + (long) i_map, + (duk_heaphdr *) duk_get_hobject(thr, i_map), + (long) i_mappednames, + (duk_heaphdr *) duk_get_hobject(thr, i_mappednames))); + + /* + * Init arguments properties, map, etc. + */ + + duk_push_int(thr, num_stack_args); + duk_xdef_prop_stridx(thr, i_arg, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_WC); + + /* + * Init argument related properties. + */ + + /* step 11 */ + idx = num_stack_args - 1; + while (idx >= 0) { + DUK_DDD( + DUK_DDDPRINT("arg idx %ld, argbase=%ld, argidx=%ld", (long) idx, (long) i_argbase, (long) (i_argbase + idx))); + + DUK_DDD(DUK_DDDPRINT("define arguments[%ld]=arg", (long) idx)); + duk_dup(thr, i_argbase + idx); + duk_xdef_prop_index_wec(thr, i_arg, (duk_uarridx_t) idx); + DUK_DDD(DUK_DDDPRINT("defined arguments[%ld]=arg", (long) idx)); + + /* step 11.c is relevant only if non-strict (checked in 11.c.ii) */ + if (!DUK_HOBJECT_HAS_STRICT(func) && idx < n_formals) { + DUK_ASSERT(formals != NULL); + + DUK_DDD(DUK_DDDPRINT("strict function, index within formals (%ld < %ld)", (long) idx, (long) n_formals)); + + duk_get_prop_index(thr, i_formals, (duk_uarridx_t) idx); + DUK_ASSERT(duk_is_string(thr, -1)); + + duk_dup_top(thr); /* [ ... name name ] */ + + if (!duk_has_prop(thr, i_mappednames)) { + /* steps 11.c.ii.1 - 11.c.ii.4, but our internal book-keeping + * differs from the reference model + */ + + /* [ ... name ] */ + + need_map = 1; + + DUK_DDD( + DUK_DDDPRINT("set mappednames[%s]=%ld", (const char *) duk_get_string(thr, -1), (long) idx)); + duk_dup_top(thr); /* name */ + (void) duk_push_uint_to_hstring(thr, (duk_uint_t) idx); /* index */ + duk_xdef_prop_wec(thr, i_mappednames); /* out of spec, must be configurable */ + + DUK_DDD(DUK_DDDPRINT("set map[%ld]=%s", (long) idx, duk_get_string(thr, -1))); + duk_dup_top(thr); /* name */ + duk_xdef_prop_index_wec(thr, i_map, (duk_uarridx_t) idx); /* out of spec, must be configurable */ + } else { + /* duk_has_prop() popped the second 'name' */ + } + + /* [ ... name ] */ + duk_pop(thr); /* pop 'name' */ + } + + idx--; + } + + DUK_DDD(DUK_DDDPRINT("actual arguments processed")); + + /* step 12 */ + if (need_map) { + DUK_DDD(DUK_DDDPRINT("adding 'map' and 'varenv' to arguments object")); + + /* should never happen for a strict callee */ + DUK_ASSERT(!DUK_HOBJECT_HAS_STRICT(func)); + + duk_dup(thr, i_map); + duk_xdef_prop_stridx(thr, i_arg, DUK_STRIDX_INT_MAP, DUK_PROPDESC_FLAGS_NONE); /* out of spec, don't care */ + + /* The variable environment for magic variable bindings needs to be + * given by the caller and recorded in the arguments object. + * + * See E5 Section 10.6, the creation of setters/getters. + * + * The variable environment also provides access to the callee, so + * an explicit (internal) callee property is not needed. + */ + + duk_push_hobject(thr, varenv); + duk_xdef_prop_stridx(thr, i_arg, DUK_STRIDX_INT_VARENV, DUK_PROPDESC_FLAGS_NONE); /* out of spec, don't care */ + } + + /* steps 13-14 */ + if (DUK_HOBJECT_HAS_STRICT(func)) { + /* Callee/caller are throwers and are not deletable etc. They + * could be implemented as virtual properties, but currently + * there is no support for virtual properties which are accessors + * (only plain virtual properties). This would not be difficult + * to change in duk_hobject_props, but we can make the throwers + * normal, concrete properties just as easily. + * + * Note that the specification requires that the *same* thrower + * built-in object is used here! See E5 Section 10.6 main + * algoritm, step 14, and Section 13.2.3 which describes the + * thrower. See test case test-arguments-throwers.js. + */ + + DUK_DDD(DUK_DDDPRINT("strict function, setting caller/callee to throwers")); + + /* In ES2017 .caller is no longer set at all. */ + duk_xdef_prop_stridx_thrower(thr, i_arg, DUK_STRIDX_CALLEE); + } else { + DUK_DDD(DUK_DDDPRINT("non-strict function, setting callee to actual value")); + duk_push_hobject(thr, func); + duk_xdef_prop_stridx(thr, i_arg, DUK_STRIDX_CALLEE, DUK_PROPDESC_FLAGS_WC); + } + + /* set exotic behavior only after we're done */ + if (need_map) { + /* Exotic behaviors are only enabled for arguments objects + * which have a parameter map (see E5 Section 10.6 main + * algorithm, step 12). + * + * In particular, a non-strict arguments object with no + * mapped formals does *NOT* get exotic behavior, even + * for e.g. "caller" property. This seems counterintuitive + * but seems to be the case. + */ + + /* cannot be strict (never mapped variables) */ + DUK_ASSERT(!DUK_HOBJECT_HAS_STRICT(func)); + + DUK_DDD(DUK_DDDPRINT("enabling exotic behavior for arguments object")); + DUK_HOBJECT_SET_EXOTIC_ARGUMENTS(arg); + } else { + DUK_DDD(DUK_DDDPRINT("not enabling exotic behavior for arguments object")); + } + + DUK_DDD(DUK_DDDPRINT("final arguments related objects: " + "arguments at index %ld -> %!O " + "map at index %ld -> %!O " + "mappednames at index %ld -> %!O", + (long) i_arg, + (duk_heaphdr *) duk_get_hobject(thr, i_arg), + (long) i_map, + (duk_heaphdr *) duk_get_hobject(thr, i_map), + (long) i_mappednames, + (duk_heaphdr *) duk_get_hobject(thr, i_mappednames))); + + /* [ args(n) envobj formals arguments map mappednames ] */ + + duk_pop_2(thr); + duk_remove_m2(thr); + + /* [ args(n) envobj arguments ] */ +} + +/* Helper for creating the arguments object and adding it to the env record + * on top of the value stack. + */ +DUK_LOCAL void duk__handle_createargs_for_call(duk_hthread *thr, duk_hobject *func, duk_hobject *env, duk_idx_t idx_args) { + DUK_DDD(DUK_DDDPRINT("creating arguments object for function call")); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(func != NULL); + DUK_ASSERT(env != NULL); + DUK_ASSERT(DUK_HOBJECT_HAS_CREATEARGS(func)); + + /* [ ... arg1 ... argN envobj ] */ + + duk__create_arguments_object(thr, func, env, idx_args); + + /* [ ... arg1 ... argN envobj argobj ] */ + + duk_xdef_prop_stridx_short(thr, + -2, + DUK_STRIDX_LC_ARGUMENTS, + DUK_HOBJECT_HAS_STRICT(func) ? DUK_PROPDESC_FLAGS_E : /* strict: non-deletable, non-writable */ + DUK_PROPDESC_FLAGS_WE); /* non-strict: non-deletable, writable */ + /* [ ... arg1 ... argN envobj ] */ +} + +/* + * Helpers for constructor call handling. + * + * There are two [[Construct]] operations in the specification: + * + * - E5 Section 13.2.2: for Function objects + * - E5 Section 15.3.4.5.2: for "bound" Function objects + * + * The chain of bound functions is resolved in Section 15.3.4.5.2, + * with arguments "piling up" until the [[Construct]] internal + * method is called on the final, actual Function object. Note + * that the "prototype" property is looked up *only* from the + * final object, *before* calling the constructor. + * + * Since Duktape 2.2 bound functions are represented with the + * duk_hboundfunc internal type, and bound function chains are + * collapsed when a bound function is created. As a result, the + * direct target of a duk_hboundfunc is always non-bound and the + * this/argument lists have been resolved. + * + * When constructing new Array instances, an unnecessary object is + * created and discarded now: the standard [[Construct]] creates an + * object, and calls the Array constructor. The Array constructor + * returns an Array instance, which is used as the result value for + * the "new" operation; the object created before the Array constructor + * call is discarded. + * + * This would be easy to fix, e.g. by knowing that the Array constructor + * will always create a replacement object and skip creating the fallback + * object in that case. + */ + +/* Update default instance prototype for constructor call. */ +DUK_LOCAL void duk__update_default_instance_proto(duk_hthread *thr, duk_idx_t idx_func) { + duk_hobject *proto; + duk_hobject *fallback; + + DUK_ASSERT(duk_is_constructable(thr, idx_func)); + + duk_get_prop_stridx_short(thr, idx_func, DUK_STRIDX_PROTOTYPE); + proto = duk_get_hobject(thr, -1); + if (proto == NULL) { + DUK_DDD(DUK_DDDPRINT("constructor has no 'prototype' property, or value not an object " + "-> leave standard Object prototype as fallback prototype")); + } else { + DUK_DDD(DUK_DDDPRINT("constructor has 'prototype' property with object value " + "-> set fallback prototype to that value: %!iO", + (duk_heaphdr *) proto)); + /* Original fallback (default instance) is untouched when + * resolving bound functions etc. + */ + fallback = duk_known_hobject(thr, idx_func + 1); + DUK_ASSERT(fallback != NULL); + DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, fallback, proto); + } + duk_pop(thr); +} + +/* Postprocess: return value special handling, error augmentation. */ +DUK_INTERNAL void duk_call_construct_postprocess(duk_hthread *thr, duk_small_uint_t proxy_invariant) { + /* Use either fallback (default instance) or retval depending + * on retval type. Needs to be called before unwind because + * the default instance is read from the current (immutable) + * 'this' binding. + * + * For Proxy 'construct' calls the return value must be an + * Object (we accept object-like values like buffers and + * lightfuncs too). If not, TypeError. + */ + if (duk_check_type_mask(thr, -1, DUK_TYPE_MASK_OBJECT | DUK_TYPE_MASK_BUFFER | DUK_TYPE_MASK_LIGHTFUNC)) { + DUK_DDD(DUK_DDDPRINT("replacement value")); + } else { + if (DUK_UNLIKELY(proxy_invariant != 0U)) { + /* Proxy 'construct' return value invariant violated. */ + DUK_ERROR_TYPE_INVALID_TRAP_RESULT(thr); + DUK_WO_NORETURN(return;); + } + /* XXX: direct value stack access */ + duk_pop(thr); + duk_push_this(thr); + } + +#if defined(DUK_USE_AUGMENT_ERROR_CREATE) + /* Augment created errors upon creation, not when they are thrown or + * rethrown. __FILE__ and __LINE__ are not desirable here; the call + * stack reflects the caller which is correct. Skip topmost, unwound + * activation when creating a traceback. If thr->ptr_curr_pc was != + * NULL we'd need to sync the current PC so that the traceback comes + * out right; however it is always synced here so just assert for it. + */ + DUK_ASSERT(thr->ptr_curr_pc == NULL); + duk_err_augment_error_create(thr, thr, NULL, 0, DUK_AUGMENT_FLAG_NOBLAME_FILELINE | DUK_AUGMENT_FLAG_SKIP_ONE); +#endif +} + +/* + * Helper for handling a bound function when a call is being made. + * + * Assumes that bound function chains have been "collapsed" so that either + * the target is non-bound or there is one bound function that points to a + * nonbound target. + * + * Prepends the bound arguments to the value stack (at idx_func + 2). + * The 'this' binding is also updated if necessary (at idx_func + 1). + * Note that for constructor calls the 'this' binding is never updated by + * [[BoundThis]]. + */ + +DUK_LOCAL void duk__handle_bound_chain_for_call(duk_hthread *thr, duk_idx_t idx_func, duk_bool_t is_constructor_call) { + duk_tval *tv_func; + duk_hobject *func; + duk_idx_t len; + + DUK_ASSERT(thr != NULL); + + /* On entry, item at idx_func is a bound, non-lightweight function, + * but we don't rely on that below. + */ + + DUK_ASSERT(duk_get_top(thr) >= idx_func + 2); + + tv_func = duk_require_tval(thr, idx_func); + DUK_ASSERT(tv_func != NULL); + + if (DUK_TVAL_IS_OBJECT(tv_func)) { + func = DUK_TVAL_GET_OBJECT(tv_func); + + /* XXX: separate helper function, out of fast path? */ + if (DUK_HOBJECT_HAS_BOUNDFUNC(func)) { + duk_hboundfunc *h_bound; + duk_tval *tv_args; + duk_tval *tv_gap; + + h_bound = (duk_hboundfunc *) (void *) func; + tv_args = h_bound->args; + len = h_bound->nargs; + DUK_ASSERT(len == 0 || tv_args != NULL); + + DUK_DDD(DUK_DDDPRINT("bound function encountered, ptr=%p: %!T", + (void *) DUK_TVAL_GET_OBJECT(tv_func), + tv_func)); + + /* [ ... func this arg1 ... argN ] */ + + if (is_constructor_call) { + /* See: tests/ecmascript/test-spec-bound-constructor.js */ + DUK_DDD(DUK_DDDPRINT("constructor call: don't update this binding")); + } else { + /* XXX: duk_replace_tval */ + duk_push_tval(thr, &h_bound->this_binding); + duk_replace(thr, idx_func + 1); /* idx_this = idx_func + 1 */ + } + + /* [ ... func this arg1 ... argN ] */ + + duk_require_stack(thr, len); + + tv_gap = duk_reserve_gap(thr, idx_func + 2, len); + duk_copy_tvals_incref(thr, tv_gap, tv_args, (duk_size_t) len); + + /* [ ... func this arg1 ... argN ] */ + + duk_push_tval(thr, &h_bound->target); + duk_replace(thr, idx_func); /* replace in stack */ + + DUK_DDD(DUK_DDDPRINT("bound function handled, idx_func=%ld, curr func=%!T", + (long) idx_func, + duk_get_tval(thr, idx_func))); + } + } else if (DUK_TVAL_IS_LIGHTFUNC(tv_func)) { + /* Lightweight function: never bound, so terminate. */ + ; + } else { + /* Shouldn't happen, so ugly error is enough. */ + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return;); + } + + DUK_ASSERT(duk_get_top(thr) >= idx_func + 2); + + DUK_DDD(DUK_DDDPRINT("final non-bound function is: %!T", duk_get_tval(thr, idx_func))); + +#if defined(DUK_USE_ASSERTIONS) + tv_func = duk_require_tval(thr, idx_func); + DUK_ASSERT(DUK_TVAL_IS_LIGHTFUNC(tv_func) || DUK_TVAL_IS_OBJECT(tv_func)); + if (DUK_TVAL_IS_OBJECT(tv_func)) { + func = DUK_TVAL_GET_OBJECT(tv_func); + DUK_ASSERT(func != NULL); + DUK_ASSERT(!DUK_HOBJECT_HAS_BOUNDFUNC(func)); + DUK_ASSERT(DUK_HOBJECT_HAS_COMPFUNC(func) || DUK_HOBJECT_HAS_NATFUNC(func) || DUK_HOBJECT_IS_PROXY(func)); + } +#endif +} + +/* + * Helper for inline handling of .call(), .apply(), and .construct(). + */ + +DUK_LOCAL duk_bool_t duk__handle_specialfuncs_for_call(duk_hthread *thr, + duk_idx_t idx_func, + duk_hobject *func, + duk_small_uint_t *call_flags, + duk_bool_t first) { +#if defined(DUK_USE_ASSERTIONS) + duk_c_function natfunc; +#endif + duk_tval *tv_args; + + DUK_ASSERT(func != NULL); + DUK_ASSERT((*call_flags & DUK_CALL_FLAG_CONSTRUCT) == 0); /* Caller. */ + +#if defined(DUK_USE_ASSERTIONS) + natfunc = ((duk_hnatfunc *) func)->func; + DUK_ASSERT(natfunc != NULL); +#endif + + /* On every round of function resolution at least target function and + * 'this' binding are set. We can assume that here, and must guarantee + * it on exit. Value stack reserve is extended for bound function and + * .apply() unpacking so we don't need to extend it here when we need a + * few slots. + */ + DUK_ASSERT(duk_get_top(thr) >= idx_func + 2); + + /* Handle native 'eval' specially. A direct eval check is only made + * for the first resolution attempt; e.g. a bound eval call is -not- + * a direct eval call. + */ + if (DUK_UNLIKELY(((duk_hnatfunc *) func)->magic == 15)) { + /* For now no special handling except for direct eval + * detection. + */ + DUK_ASSERT(((duk_hnatfunc *) func)->func == duk_bi_global_object_eval); + if (first && (*call_flags & DUK_CALL_FLAG_CALLED_AS_EVAL)) { + *call_flags = (*call_flags & ~DUK_CALL_FLAG_CALLED_AS_EVAL) | DUK_CALL_FLAG_DIRECT_EVAL; + } + DUK_ASSERT(duk_get_top(thr) >= idx_func + 2); + return 1; /* stop resolving */ + } + + /* Handle special functions based on the DUK_HOBJECT_FLAG_SPECIAL_CALL + * flag; their magic value is used for switch-case. + * + * NOTE: duk_unpack_array_like() reserves value stack space + * for the result values (unlike most other value stack calls). + */ + switch (((duk_hnatfunc *) func)->magic) { + case 0: { /* 0=Function.prototype.call() */ + /* Value stack: + * idx_func + 0: Function.prototype.call() [removed] + * idx_func + 1: this binding for .call (target function) + * idx_func + 2: 1st argument to .call, desired 'this' binding + * idx_func + 3: 2nd argument to .call, desired 1st argument for ultimate target + * ... + * + * Remove idx_func + 0 to get: + * idx_func + 0: target function + * idx_func + 1: this binding + * idx_func + 2: call arguments + * ... + */ + DUK_ASSERT(natfunc == duk_bi_function_prototype_call); + duk_remove_unsafe(thr, idx_func); + tv_args = thr->valstack_bottom + idx_func + 2; + if (thr->valstack_top < tv_args) { + DUK_ASSERT(tv_args <= thr->valstack_end); + thr->valstack_top = tv_args; /* at least target function and 'this' binding present */ + } + break; + } + case 1: { /* 1=Function.prototype.apply() */ + /* Value stack: + * idx_func + 0: Function.prototype.apply() [removed] + * idx_func + 1: this binding for .apply (target function) + * idx_func + 2: 1st argument to .apply, desired 'this' binding + * idx_func + 3: 2nd argument to .apply, argArray + * [anything after this MUST be ignored] + * + * Remove idx_func + 0 and unpack the argArray to get: + * idx_func + 0: target function + * idx_func + 1: this binding + * idx_func + 2: call arguments + * ... + */ + DUK_ASSERT(natfunc == duk_bi_function_prototype_apply); + duk_remove_unsafe(thr, idx_func); + goto apply_shared; + } +#if defined(DUK_USE_REFLECT_BUILTIN) + case 2: { /* 2=Reflect.apply() */ + /* Value stack: + * idx_func + 0: Reflect.apply() [removed] + * idx_func + 1: this binding for .apply (ignored, usually Reflect) [removed] + * idx_func + 2: 1st argument to .apply, target function + * idx_func + 3: 2nd argument to .apply, desired 'this' binding + * idx_func + 4: 3rd argument to .apply, argArray + * [anything after this MUST be ignored] + * + * Remove idx_func + 0 and idx_func + 1, and unpack the argArray to get: + * idx_func + 0: target function + * idx_func + 1: this binding + * idx_func + 2: call arguments + * ... + */ + DUK_ASSERT(natfunc == duk_bi_reflect_apply); + duk_remove_n_unsafe(thr, idx_func, 2); + goto apply_shared; + } + case 3: { /* 3=Reflect.construct() */ + /* Value stack: + * idx_func + 0: Reflect.construct() [removed] + * idx_func + 1: this binding for .construct (ignored, usually Reflect) [removed] + * idx_func + 2: 1st argument to .construct, target function + * idx_func + 3: 2nd argument to .construct, argArray + * idx_func + 4: 3rd argument to .construct, newTarget + * [anything after this MUST be ignored] + * + * Remove idx_func + 0 and idx_func + 1, unpack the argArray, + * and insert default instance (prototype not yet updated), to get: + * idx_func + 0: target function + * idx_func + 1: this binding (default instance) + * idx_func + 2: constructor call arguments + * ... + * + * Call flags must be updated to reflect the fact that we're + * now dealing with a constructor call, and e.g. the 'this' + * binding cannot be overwritten if the target is bound. + * + * newTarget is checked but not yet passed onwards. + */ + + duk_idx_t top; + + DUK_ASSERT(natfunc == duk_bi_reflect_construct); + *call_flags |= DUK_CALL_FLAG_CONSTRUCT; + duk_remove_n_unsafe(thr, idx_func, 2); + top = duk_get_top(thr); + if (!duk_is_constructable(thr, idx_func)) { + /* Target constructability must be checked before + * unpacking argArray (which may cause side effects). + * Just return; caller will throw the error. + */ + duk_set_top_unsafe(thr, idx_func + 2); /* satisfy asserts */ + break; + } + duk_push_object(thr); + duk_insert(thr, idx_func + 1); /* default instance */ + + /* [ ... func default_instance argArray newTarget? ] */ + + top = duk_get_top(thr); + if (top < idx_func + 3) { + /* argArray is a mandatory argument for Reflect.construct(). */ + DUK_ERROR_TYPE_INVALID_ARGS(thr); + DUK_WO_NORETURN(return 0;); + } + if (top > idx_func + 3) { + if (!duk_strict_equals(thr, idx_func, idx_func + 3)) { + /* XXX: [[Construct]] newTarget currently unsupported */ + DUK_ERROR_UNSUPPORTED(thr); + DUK_WO_NORETURN(return 0;); + } + duk_set_top_unsafe(thr, idx_func + 3); /* remove any args beyond argArray */ + } + DUK_ASSERT(duk_get_top(thr) == idx_func + 3); + DUK_ASSERT(duk_is_valid_index(thr, idx_func + 2)); + (void) duk_unpack_array_like(thr, + idx_func + 2); /* XXX: should also remove target to be symmetric with duk_pack()? */ + duk_remove(thr, idx_func + 2); + DUK_ASSERT(duk_get_top(thr) >= idx_func + 2); + break; + } +#endif /* DUK_USE_REFLECT_BUILTIN */ + default: { + DUK_ASSERT(0); + DUK_UNREACHABLE(); + } + } + + DUK_ASSERT(duk_get_top(thr) >= idx_func + 2); + return 0; /* keep resolving */ + +apply_shared: + tv_args = thr->valstack_bottom + idx_func + 2; + if (thr->valstack_top <= tv_args) { + DUK_ASSERT(tv_args <= thr->valstack_end); + thr->valstack_top = tv_args; /* at least target func and 'this' binding present */ + /* No need to check for argArray. */ + } else { + DUK_ASSERT(duk_get_top(thr) >= idx_func + 3); /* idx_func + 2 covered above */ + if (thr->valstack_top > tv_args + 1) { + duk_set_top_unsafe(thr, idx_func + 3); /* remove any args beyond argArray */ + } + DUK_ASSERT(duk_is_valid_index(thr, idx_func + 2)); + if (!duk_is_callable(thr, idx_func)) { + /* Avoid unpack side effects if the target isn't callable. + * Calling code will throw the actual error. + */ + } else { + (void) duk_unpack_array_like(thr, idx_func + 2); + duk_remove(thr, idx_func + 2); + } + } + DUK_ASSERT(duk_get_top(thr) >= idx_func + 2); + return 0; /* keep resolving */ +} + +/* + * Helper for Proxy handling. + */ + +#if defined(DUK_USE_ES6_PROXY) +DUK_LOCAL void duk__handle_proxy_for_call(duk_hthread *thr, duk_idx_t idx_func, duk_hproxy *h_proxy, duk_small_uint_t *call_flags) { + duk_bool_t rc; + + /* Value stack: + * idx_func + 0: Proxy object + * idx_func + 1: this binding for call + * idx_func + 2: 1st argument for call + * idx_func + 3: 2nd argument for call + * ... + * + * If Proxy doesn't have a trap for the call ('apply' or 'construct'), + * replace Proxy object with target object. + * + * If we're dealing with a normal call and the Proxy has an 'apply' + * trap, manipulate value stack to: + * + * idx_func + 0: trap + * idx_func + 1: Proxy's handler + * idx_func + 2: Proxy's target + * idx_func + 3: this binding for call (from idx_func + 1) + * idx_func + 4: call arguments packed to an array + * + * If we're dealing with a constructor call and the Proxy has a + * 'construct' trap, manipulate value stack to: + * + * idx_func + 0: trap + * idx_func + 1: Proxy's handler + * idx_func + 2: Proxy's target + * idx_func + 3: call arguments packed to an array + * idx_func + 4: newTarget == Proxy object here + * + * As we don't yet have proper newTarget support, the newTarget at + * idx_func + 3 is just the original constructor being called, i.e. + * the Proxy object (not the target). Note that the default instance + * (original 'this' binding) is dropped and ignored. + */ + + duk_push_hobject(thr, h_proxy->handler); + rc = duk_get_prop_stridx_short(thr, -1, (*call_flags & DUK_CALL_FLAG_CONSTRUCT) ? DUK_STRIDX_CONSTRUCT : DUK_STRIDX_APPLY); + if (rc == 0) { + /* Not found, continue to target. If this is a construct + * call, update default instance prototype using the Proxy, + * not the target. + */ + if (*call_flags & DUK_CALL_FLAG_CONSTRUCT) { + if (!(*call_flags & DUK_CALL_FLAG_DEFAULT_INSTANCE_UPDATED)) { + *call_flags |= DUK_CALL_FLAG_DEFAULT_INSTANCE_UPDATED; + duk__update_default_instance_proto(thr, idx_func); + } + } + duk_pop_2(thr); + duk_push_hobject(thr, h_proxy->target); + duk_replace(thr, idx_func); + return; + } + + /* Here we must be careful not to replace idx_func while + * h_proxy is still needed, otherwise h_proxy may become + * dangling. This could be improved e.g. using a + * duk_pack_slice() with a freeform slice. + */ + + /* Here: + * idx_func + 0: Proxy object + * idx_func + 1: this binding for call + * idx_func + 2: 1st argument for call + * idx_func + 3: 2nd argument for call + * ... + * idx_func + N: handler + * idx_func + N + 1: trap + */ + + duk_insert(thr, idx_func + 1); + duk_insert(thr, idx_func + 2); + duk_push_hobject(thr, h_proxy->target); + duk_insert(thr, idx_func + 3); + duk_pack(thr, duk_get_top(thr) - (idx_func + 5)); + DUK_ASSERT(!duk_is_bare_object(thr, -1)); + + /* Here: + * idx_func + 0: Proxy object + * idx_func + 1: trap + * idx_func + 2: Proxy's handler + * idx_func + 3: Proxy's target + * idx_func + 4: this binding for call + * idx_func + 5: arguments array + */ + DUK_ASSERT(duk_get_top(thr) == idx_func + 6); + + if (*call_flags & DUK_CALL_FLAG_CONSTRUCT) { + *call_flags |= DUK_CALL_FLAG_CONSTRUCT_PROXY; /* Enable 'construct' trap return invariant check. */ + *call_flags &= ~(DUK_CALL_FLAG_CONSTRUCT); /* Resume as non-constructor call to the trap. */ + + /* 'apply' args: target, thisArg, argArray + * 'construct' args: target, argArray, newTarget + */ + duk_remove(thr, idx_func + 4); + duk_push_hobject(thr, (duk_hobject *) h_proxy); + } + + /* Finalize value stack layout by removing Proxy reference. */ + duk_remove(thr, idx_func); + h_proxy = NULL; /* invalidated */ + DUK_ASSERT(duk_get_top(thr) == idx_func + 5); +} +#endif /* DUK_USE_ES6_PROXY */ + +/* + * Helper for setting up var_env and lex_env of an activation, + * assuming it does NOT have the DUK_HOBJECT_FLAG_NEWENV flag. + */ + +DUK_LOCAL void duk__handle_oldenv_for_call(duk_hthread *thr, duk_hobject *func, duk_activation *act) { + duk_hcompfunc *f; + duk_hobject *h_lex; + duk_hobject *h_var; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(func != NULL); + DUK_ASSERT(act != NULL); + DUK_ASSERT(!DUK_HOBJECT_HAS_NEWENV(func)); + DUK_ASSERT(!DUK_HOBJECT_HAS_CREATEARGS(func)); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(func)); + DUK_UNREF(thr); + + f = (duk_hcompfunc *) func; + h_lex = DUK_HCOMPFUNC_GET_LEXENV(thr->heap, f); + h_var = DUK_HCOMPFUNC_GET_VARENV(thr->heap, f); + DUK_ASSERT(h_lex != NULL); /* Always true for closures (not for templates) */ + DUK_ASSERT(h_var != NULL); + act->lex_env = h_lex; + act->var_env = h_var; + DUK_HOBJECT_INCREF(thr, h_lex); + DUK_HOBJECT_INCREF(thr, h_var); +} + +/* + * Helper for updating callee 'caller' property. + */ + +#if defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) +DUK_LOCAL void duk__update_func_caller_prop(duk_hthread *thr, duk_hobject *func) { + duk_tval *tv_caller; + duk_hobject *h_tmp; + duk_activation *act_callee; + duk_activation *act_caller; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(func != NULL); + DUK_ASSERT(!DUK_HOBJECT_HAS_BOUNDFUNC(func)); /* bound chain resolved */ + DUK_ASSERT(thr->callstack_top >= 1); + + if (DUK_HOBJECT_HAS_STRICT(func)) { + /* Strict functions don't get their 'caller' updated. */ + return; + } + + DUK_ASSERT(thr->callstack_top > 0); + act_callee = thr->callstack_curr; + DUK_ASSERT(act_callee != NULL); + act_caller = (thr->callstack_top >= 2 ? act_callee->parent : NULL); + + /* XXX: check .caller writability? */ + + /* Backup 'caller' property and update its value. */ + tv_caller = duk_hobject_find_entry_tval_ptr_stridx(thr->heap, func, DUK_STRIDX_CALLER); + if (tv_caller) { + /* If caller is global/eval code, 'caller' should be set to + * 'null'. + * + * XXX: there is no exotic flag to infer this correctly now. + * The NEWENV flag is used now which works as intended for + * everything (global code, non-strict eval code, and functions) + * except strict eval code. Bound functions are never an issue + * because 'func' has been resolved to a non-bound function. + */ + + if (act_caller != NULL) { + /* act_caller->func may be NULL in some finalization cases, + * just treat like we don't know the caller. + */ + if (act_caller->func && !DUK_HOBJECT_HAS_NEWENV(act_caller->func)) { + /* Setting to NULL causes 'caller' to be set to + * 'null' as desired. + */ + act_caller = NULL; + } + } + + if (DUK_TVAL_IS_OBJECT(tv_caller)) { + h_tmp = DUK_TVAL_GET_OBJECT(tv_caller); + DUK_ASSERT(h_tmp != NULL); + act_callee->prev_caller = h_tmp; + + /* Previous value doesn't need refcount changes because its ownership + * is transferred to prev_caller. + */ + + if (act_caller != NULL) { + DUK_ASSERT(act_caller->func != NULL); + DUK_TVAL_SET_OBJECT(tv_caller, act_caller->func); + DUK_TVAL_INCREF(thr, tv_caller); + } else { + DUK_TVAL_SET_NULL(tv_caller); /* no incref */ + } + } else { + /* 'caller' must only take on 'null' or function value */ + DUK_ASSERT(!DUK_TVAL_IS_HEAP_ALLOCATED(tv_caller)); + DUK_ASSERT(act_callee->prev_caller == NULL); + if (act_caller != NULL && act_caller->func) { + /* Tolerate act_caller->func == NULL which happens in + * some finalization cases; treat like unknown caller. + */ + DUK_TVAL_SET_OBJECT(tv_caller, act_caller->func); + DUK_TVAL_INCREF(thr, tv_caller); + } else { + DUK_TVAL_SET_NULL(tv_caller); /* no incref */ + } + } + } +} +#endif /* DUK_USE_NONSTD_FUNC_CALLER_PROPERTY */ + +/* + * Shared helpers for resolving the final, non-bound target function of the + * call and the effective 'this' binding. Resolves bound functions and + * applies .call(), .apply(), and .construct() inline. + * + * Proxy traps are also handled inline so that if the target is a Proxy with + * a 'call' or 'construct' trap, the trap handler is called with a modified + * argument list. + * + * Once the bound function / .call() / .apply() / .construct() sequence has + * been resolved, the value at idx_func + 1 may need coercion described in + * E5 Section 10.4.3. + * + * A call that begins as a non-constructor call may be converted into a + * constructor call during the resolution process if Reflect.construct() + * is invoked. This is handled by updating the caller's call_flags. + * + * For global and eval code (E5 Sections 10.4.1 and 10.4.2), we assume + * that the caller has provided the correct 'this' binding explicitly + * when calling, i.e.: + * + * - global code: this=global object + * - direct eval: this=copy from eval() caller's this binding + * - other eval: this=global object + * + * The 'this' coercion may cause a recursive function call with arbitrary + * side effects, because ToObject() may be called. + */ + +DUK_LOCAL DUK_INLINE void duk__coerce_nonstrict_this_binding(duk_hthread *thr, duk_idx_t idx_this) { + duk_tval *tv_this; + duk_hobject *obj_global; + + tv_this = thr->valstack_bottom + idx_this; + switch (DUK_TVAL_GET_TAG(tv_this)) { + case DUK_TAG_OBJECT: + DUK_DDD(DUK_DDDPRINT("this binding: non-strict, object -> use directly")); + break; + case DUK_TAG_UNDEFINED: + case DUK_TAG_NULL: + DUK_DDD(DUK_DDDPRINT("this binding: non-strict, undefined/null -> use global object")); + obj_global = thr->builtins[DUK_BIDX_GLOBAL]; + /* XXX: avoid this check somehow */ + if (DUK_LIKELY(obj_global != NULL)) { + DUK_ASSERT(!DUK_TVAL_IS_HEAP_ALLOCATED(tv_this)); /* no need to decref previous value */ + DUK_TVAL_SET_OBJECT(tv_this, obj_global); + DUK_HOBJECT_INCREF(thr, obj_global); + } else { + /* This may only happen if built-ins are being "torn down". + * This behavior is out of specification scope. + */ + DUK_D(DUK_DPRINT("this binding: wanted to use global object, but it is NULL -> using undefined instead")); + DUK_ASSERT(!DUK_TVAL_IS_HEAP_ALLOCATED(tv_this)); /* no need to decref previous value */ + DUK_TVAL_SET_UNDEFINED(tv_this); /* nothing to incref */ + } + break; + default: + /* Plain buffers and lightfuncs are object coerced. Lightfuncs + * very rarely come here however, because the call target would + * need to be a non-strict non-lightfunc (lightfuncs are considered + * strict) with an explicit lightfunc 'this' binding. + */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv_this)); + DUK_DDD(DUK_DDDPRINT("this binding: non-strict, not object/undefined/null -> use ToObject(value)")); + duk_to_object(thr, idx_this); /* may have side effects */ + break; + } +} + +DUK_LOCAL DUK_ALWAYS_INLINE duk_bool_t duk__resolve_target_fastpath_check(duk_hthread *thr, + duk_idx_t idx_func, + duk_hobject **out_func, + duk_small_uint_t call_flags) { +#if defined(DUK_USE_PREFER_SIZE) + DUK_UNREF(thr); + DUK_UNREF(idx_func); + DUK_UNREF(out_func); + DUK_UNREF(call_flags); +#else /* DUK_USE_PREFER_SIZE */ + duk_tval *tv_func; + duk_hobject *func; + + if (DUK_UNLIKELY(call_flags & DUK_CALL_FLAG_CONSTRUCT)) { + return 0; + } + + tv_func = DUK_GET_TVAL_POSIDX(thr, idx_func); + DUK_ASSERT(tv_func != NULL); + + if (DUK_LIKELY(DUK_TVAL_IS_OBJECT(tv_func))) { + func = DUK_TVAL_GET_OBJECT(tv_func); + if (DUK_HOBJECT_IS_CALLABLE(func) && !DUK_HOBJECT_HAS_BOUNDFUNC(func) && !DUK_HOBJECT_HAS_SPECIAL_CALL(func)) { + *out_func = func; + + if (DUK_HOBJECT_HAS_STRICT(func)) { + /* Strict function: no 'this' coercion. */ + return 1; + } + + duk__coerce_nonstrict_this_binding(thr, idx_func + 1); + return 1; + } + } else if (DUK_TVAL_IS_LIGHTFUNC(tv_func)) { + *out_func = NULL; + + /* Lightfuncs are considered strict, so 'this' binding is + * used as is. They're never bound, always constructable, + * and never special functions. + */ + return 1; + } +#endif /* DUK_USE_PREFER_SIZE */ + return 0; /* let slow path deal with it */ +} + +DUK_LOCAL duk_hobject *duk__resolve_target_func_and_this_binding(duk_hthread *thr, + duk_idx_t idx_func, + duk_small_uint_t *call_flags) { + duk_tval *tv_func; + duk_hobject *func; + duk_bool_t first; + + DUK_ASSERT(duk_get_top(thr) >= idx_func + 2); + + for (first = 1;; first = 0) { + DUK_ASSERT(duk_get_top(thr) >= idx_func + 2); + + tv_func = DUK_GET_TVAL_POSIDX(thr, idx_func); + DUK_ASSERT(tv_func != NULL); + + DUK_DD(DUK_DDPRINT("target func: %!iT", tv_func)); + + if (DUK_TVAL_IS_OBJECT(tv_func)) { + func = DUK_TVAL_GET_OBJECT(tv_func); + + if (*call_flags & DUK_CALL_FLAG_CONSTRUCT) { + if (DUK_UNLIKELY(!DUK_HOBJECT_HAS_CONSTRUCTABLE(func))) { + goto not_constructable; + } + } else { + if (DUK_UNLIKELY(!DUK_HOBJECT_IS_CALLABLE(func))) { + goto not_callable; + } + } + + if (DUK_LIKELY(!DUK_HOBJECT_HAS_BOUNDFUNC(func) && !DUK_HOBJECT_HAS_SPECIAL_CALL(func) && + !DUK_HOBJECT_HAS_EXOTIC_PROXYOBJ(func))) { + /* Common case, so test for using a single bitfield test. + * Break out to handle this coercion etc. + */ + break; + } + + /* XXX: could set specialcall for boundfuncs too, simplify check above */ + + if (DUK_HOBJECT_HAS_BOUNDFUNC(func)) { + DUK_ASSERT(!DUK_HOBJECT_HAS_SPECIAL_CALL(func)); + DUK_ASSERT(!DUK_HOBJECT_IS_NATFUNC(func)); + + /* Callable/constructable flags are the same + * for the bound function and its target, so + * we don't need to check them here, we can + * check them from the target only. + */ + duk__handle_bound_chain_for_call(thr, idx_func, *call_flags & DUK_CALL_FLAG_CONSTRUCT); + + DUK_ASSERT(DUK_TVAL_IS_OBJECT(duk_require_tval(thr, idx_func)) || + DUK_TVAL_IS_LIGHTFUNC(duk_require_tval(thr, idx_func))); + } else { + DUK_ASSERT(DUK_HOBJECT_HAS_SPECIAL_CALL(func)); + +#if defined(DUK_USE_ES6_PROXY) + if (DUK_HOBJECT_HAS_EXOTIC_PROXYOBJ(func)) { + /* If no trap, resume processing from Proxy trap. + * If trap exists, helper converts call into a trap + * call; this may change a constructor call into a + * normal (non-constructor) trap call. We must + * continue processing even when a trap is found as + * the trap may be bound. + */ + duk__handle_proxy_for_call(thr, idx_func, (duk_hproxy *) func, call_flags); + } else +#endif + { + DUK_ASSERT(DUK_HOBJECT_IS_NATFUNC(func)); + DUK_ASSERT(DUK_HOBJECT_HAS_CALLABLE(func)); + DUK_ASSERT(!DUK_HOBJECT_HAS_CONSTRUCTABLE(func)); + /* Constructable check already done above. */ + + if (duk__handle_specialfuncs_for_call(thr, idx_func, func, call_flags, first) != 0) { + /* Encountered native eval call, normal call + * context. Break out, handle this coercion etc. + */ + break; + } + } + } + /* Retry loop. */ + } else if (DUK_TVAL_IS_LIGHTFUNC(tv_func)) { + /* Lightfuncs are: + * - Always strict, so no 'this' coercion. + * - Always callable. + * - Always constructable. + * - Never specialfuncs. + */ + func = NULL; + goto finished; + } else { + goto not_callable; + } + } + + DUK_ASSERT(func != NULL); + + if (!DUK_HOBJECT_HAS_STRICT(func)) { + /* Non-strict target needs 'this' coercion. + * This has potential side effects invalidating + * 'tv_func'. + */ + duk__coerce_nonstrict_this_binding(thr, idx_func + 1); + } + if (*call_flags & DUK_CALL_FLAG_CONSTRUCT) { + if (!(*call_flags & DUK_CALL_FLAG_DEFAULT_INSTANCE_UPDATED)) { + *call_flags |= DUK_CALL_FLAG_DEFAULT_INSTANCE_UPDATED; + duk__update_default_instance_proto(thr, idx_func); + } + } + +finished : +#if defined(DUK_USE_ASSERTIONS) +{ + duk_tval *tv_tmp; + + tv_tmp = duk_get_tval(thr, idx_func); + DUK_ASSERT(tv_tmp != NULL); + + DUK_ASSERT((DUK_TVAL_IS_OBJECT(tv_tmp) && DUK_HOBJECT_IS_CALLABLE(DUK_TVAL_GET_OBJECT(tv_tmp))) || + DUK_TVAL_IS_LIGHTFUNC(tv_tmp)); + DUK_ASSERT(func == NULL || !DUK_HOBJECT_HAS_BOUNDFUNC(func)); + DUK_ASSERT(func == NULL || (DUK_HOBJECT_IS_COMPFUNC(func) || DUK_HOBJECT_IS_NATFUNC(func))); + DUK_ASSERT(func == NULL || (DUK_HOBJECT_HAS_CONSTRUCTABLE(func) || (*call_flags & DUK_CALL_FLAG_CONSTRUCT) == 0)); +} +#endif + + return func; + +not_callable: + DUK_ASSERT(tv_func != NULL); + +#if defined(DUK_USE_VERBOSE_ERRORS) + /* GETPROPC delayed error handling: when target is not callable, + * GETPROPC replaces idx_func+0 with a non-callable wrapper object + * with a hidden Symbol to signify it's to be handled here. If + * found, unwrap the original Error and throw it as is here. The + * hidden Symbol is only checked as an own property, not inherited + * (which would be dangerous). + */ + if (DUK_TVAL_IS_OBJECT(tv_func)) { + duk_tval *tv_wrap = + duk_hobject_find_entry_tval_ptr_stridx(thr->heap, DUK_TVAL_GET_OBJECT(tv_func), DUK_STRIDX_INT_TARGET); + if (tv_wrap != NULL) { + DUK_DD(DUK_DDPRINT("delayed error from GETPROPC: %!T", tv_wrap)); + duk_push_tval(thr, tv_wrap); + (void) duk_throw(thr); + DUK_WO_NORETURN(return NULL;); + } + } +#endif + +#if defined(DUK_USE_VERBOSE_ERRORS) +#if defined(DUK_USE_PARANOID_ERRORS) + DUK_ERROR_FMT1(thr, DUK_ERR_TYPE_ERROR, "%s not callable", duk_get_type_name(thr, idx_func)); +#else + DUK_ERROR_FMT1(thr, DUK_ERR_TYPE_ERROR, "%s not callable", duk_push_string_tval_readable(thr, tv_func)); +#endif +#else + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CALLABLE); +#endif + DUK_WO_NORETURN(return NULL;); + +not_constructable: + /* For now GETPROPC delayed error not needed for constructor calls. */ +#if defined(DUK_USE_VERBOSE_ERRORS) +#if defined(DUK_USE_PARANOID_ERRORS) + DUK_ERROR_FMT1(thr, DUK_ERR_TYPE_ERROR, "%s not constructable", duk_get_type_name(thr, idx_func)); +#else + DUK_ERROR_FMT1(thr, DUK_ERR_TYPE_ERROR, "%s not constructable", duk_push_string_tval_readable(thr, tv_func)); +#endif +#else + DUK_ERROR_TYPE(thr, DUK_STR_NOT_CONSTRUCTABLE); +#endif + DUK_WO_NORETURN(return NULL;); +} + +/* + * Manipulate value stack so that exactly 'num_stack_rets' return + * values are at 'idx_retbase' in every case, assuming there are + * 'rc' return values on top of stack. + * + * This is a bit tricky, because the called C function operates in + * the same activation record and may have e.g. popped the stack + * empty (below idx_retbase). + */ + +DUK_LOCAL void duk__safe_call_adjust_valstack(duk_hthread *thr, + duk_idx_t idx_retbase, + duk_idx_t num_stack_rets, + duk_idx_t num_actual_rets) { + duk_idx_t idx_rcbase; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(idx_retbase >= 0); + DUK_ASSERT(num_stack_rets >= 0); + DUK_ASSERT(num_actual_rets >= 0); + + idx_rcbase = duk_get_top(thr) - num_actual_rets; /* base of known return values */ + if (DUK_UNLIKELY(idx_rcbase < 0)) { + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_CFUNC_RC); + DUK_WO_NORETURN(return;); + } + + DUK_DDD(DUK_DDDPRINT("adjust valstack after func call: " + "num_stack_rets=%ld, num_actual_rets=%ld, stack_top=%ld, idx_retbase=%ld, idx_rcbase=%ld", + (long) num_stack_rets, + (long) num_actual_rets, + (long) duk_get_top(thr), + (long) idx_retbase, + (long) idx_rcbase)); + + DUK_ASSERT(idx_rcbase >= 0); /* caller must check */ + + /* Space for num_stack_rets was reserved before the safe call. + * Because value stack reserve cannot shrink except in call returns, + * the reserve is still in place. Adjust valstack, carefully + * ensuring we don't overstep the reserve. + */ + + /* Match idx_rcbase with idx_retbase so that the return values + * start at the correct index. + */ + if (idx_rcbase > idx_retbase) { + duk_idx_t count = idx_rcbase - idx_retbase; + + DUK_DDD(DUK_DDDPRINT("elements at/after idx_retbase have enough to cover func retvals " + "(idx_retbase=%ld, idx_rcbase=%ld)", + (long) idx_retbase, + (long) idx_rcbase)); + + /* Remove values between irc_rcbase (start of intended return + * values) and idx_retbase to lower return values to idx_retbase. + */ + DUK_ASSERT(count > 0); + duk_remove_n(thr, idx_retbase, count); /* may be NORZ */ + } else { + duk_idx_t count = idx_retbase - idx_rcbase; + + DUK_DDD(DUK_DDDPRINT("not enough elements at/after idx_retbase to cover func retvals " + "(idx_retbase=%ld, idx_rcbase=%ld)", + (long) idx_retbase, + (long) idx_rcbase)); + + /* Insert 'undefined' at idx_rcbase (start of intended return + * values) to lift return values to idx_retbase. + */ + DUK_ASSERT(count >= 0); + DUK_ASSERT(thr->valstack_end - thr->valstack_top >= count); /* reserve cannot shrink */ + duk_insert_undefined_n(thr, idx_rcbase, count); + } + + /* Chop extra retvals away / extend with undefined. */ + duk_set_top_unsafe(thr, idx_retbase + num_stack_rets); +} + +/* + * Activation setup for tailcalls and non-tailcalls. + */ + +#if defined(DUK_USE_TAILCALL) +DUK_LOCAL duk_small_uint_t duk__call_setup_act_attempt_tailcall(duk_hthread *thr, + duk_small_uint_t call_flags, + duk_idx_t idx_func, + duk_hobject *func, + duk_size_t entry_valstack_bottom_byteoff, + duk_size_t entry_valstack_end_byteoff, + duk_idx_t *out_nargs, + duk_idx_t *out_nregs, + duk_size_t *out_vs_min_bytes, + duk_activation **out_act) { + duk_activation *act; + duk_tval *tv1, *tv2; + duk_idx_t idx_args; + duk_small_uint_t flags1, flags2; +#if defined(DUK_USE_DEBUGGER_SUPPORT) + duk_activation *prev_pause_act; +#endif + + DUK_UNREF(entry_valstack_end_byteoff); + + /* Tailcall cannot be flagged to resume calls, and a + * previous frame must exist. + */ + DUK_ASSERT(thr->callstack_top >= 1); + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + *out_act = act; + + if (func == NULL || !DUK_HOBJECT_IS_COMPFUNC(func)) { + DUK_DDD(DUK_DDDPRINT("tail call prevented by target not being ecma function")); + return 0; + } + if (act->flags & DUK_ACT_FLAG_PREVENT_YIELD) { + DUK_DDD(DUK_DDDPRINT("tail call prevented by current activation having DUK_ACT_FLAG_PREVENT_YIELD")); + return 0; + } + /* Tailcall is only allowed if current and candidate + * function have identical return value handling. There + * are three possible return value handling cases: + * 1. Normal function call, no special return value handling. + * 2. Constructor call, return value replacement object check. + * 3. Proxy 'construct' trap call, return value invariant check. + */ + flags1 = (duk_small_uint_t) ((act->flags & DUK_ACT_FLAG_CONSTRUCT) ? 1 : 0) +#if defined(DUK_USE_ES6_PROXY) + | (duk_small_uint_t) ((act->flags & DUK_ACT_FLAG_CONSTRUCT_PROXY) ? 2 : 0) +#endif + ; + flags2 = (duk_small_uint_t) ((call_flags & DUK_CALL_FLAG_CONSTRUCT) ? 1 : 0) +#if defined(DUK_USE_ES6_PROXY) + | (duk_small_uint_t) ((call_flags & DUK_CALL_FLAG_CONSTRUCT_PROXY) ? 2 : 0); +#endif + ; + if (flags1 != flags2) { + DUK_DDD(DUK_DDDPRINT("tail call prevented by incompatible return value handling")); + return 0; + } + DUK_ASSERT(((act->flags & DUK_ACT_FLAG_CONSTRUCT) && (call_flags & DUK_CALL_FLAG_CONSTRUCT)) || + (!(act->flags & DUK_ACT_FLAG_CONSTRUCT) && !(call_flags & DUK_CALL_FLAG_CONSTRUCT))); + DUK_ASSERT(((act->flags & DUK_ACT_FLAG_CONSTRUCT_PROXY) && (call_flags & DUK_CALL_FLAG_CONSTRUCT_PROXY)) || + (!(act->flags & DUK_ACT_FLAG_CONSTRUCT_PROXY) && !(call_flags & DUK_CALL_FLAG_CONSTRUCT_PROXY))); + if (DUK_HOBJECT_HAS_NOTAIL(func)) { + /* See: test-bug-tailcall-preventyield-assert.c. */ + DUK_DDD(DUK_DDDPRINT("tail call prevented by function having a notail flag")); + return 0; + } + + /* + * Tailcall handling + * + * Although the callstack entry is reused, we need to explicitly unwind + * the current activation (or simulate an unwind). In particular, the + * current activation must be closed, otherwise something like + * test-bug-reduce-judofyr.js results. Also catchers need to be unwound + * because there may be non-error-catching label entries in valid tail calls. + * + * Special attention is needed for debugger and pause behavior when + * reusing an activation. + * - Disable StepOut processing for the activation unwind because + * we reuse the activation, see: + * https://github.com/svaarala/duktape/issues/1684. + * - Disable line change pause flag permanently if act == dbg_pause_act + * (if set) because it would no longer be relevant, see: + * https://github.com/svaarala/duktape/issues/1726, + * https://github.com/svaarala/duktape/issues/1786. + * - Check for function entry (e.g. StepInto) pause flag here, because + * the executor pause check won't trigger due to shared activation, see: + * https://github.com/svaarala/duktape/issues/1726. + */ + + DUK_DDD(DUK_DDDPRINT("is tail call, reusing activation at callstack top, at index %ld", (long) (thr->callstack_top - 1))); + + DUK_ASSERT(!DUK_HOBJECT_HAS_BOUNDFUNC(func)); + DUK_ASSERT(!DUK_HOBJECT_HAS_NATFUNC(func)); + DUK_ASSERT(DUK_HOBJECT_HAS_COMPFUNC(func)); + DUK_ASSERT((act->flags & DUK_ACT_FLAG_PREVENT_YIELD) == 0); + DUK_ASSERT(call_flags & DUK_CALL_FLAG_ALLOW_ECMATOECMA); + + /* Unwind the topmost callstack entry before reusing it. This + * also unwinds the catchers related to the topmost entry. + */ + DUK_ASSERT(thr->callstack_top > 0); + DUK_ASSERT(thr->callstack_curr != NULL); +#if defined(DUK_USE_DEBUGGER_SUPPORT) + if (act == thr->heap->dbg_pause_act) { + thr->heap->dbg_pause_flags &= ~DUK_PAUSE_FLAG_LINE_CHANGE; + } + + prev_pause_act = thr->heap->dbg_pause_act; + thr->heap->dbg_pause_act = NULL; + if (thr->heap->dbg_pause_flags & DUK_PAUSE_FLAG_FUNC_ENTRY) { + DUK_D(DUK_DPRINT("PAUSE TRIGGERED by function entry (tailcall)")); + duk_debug_set_paused(thr->heap); + } +#endif + duk_hthread_activation_unwind_reuse_norz(thr); +#if defined(DUK_USE_DEBUGGER_SUPPORT) + thr->heap->dbg_pause_act = prev_pause_act; +#endif + DUK_ASSERT(act == thr->callstack_curr); + + /* XXX: We could restore the caller's value stack reserve + * here, as if we did an actual unwind-and-call. Without + * the restoration, value stack reserve may remain higher + * than would otherwise be possible until we return to a + * non-tailcall. + */ + + /* Then reuse the unwound activation. */ + act->cat = NULL; + act->var_env = NULL; + act->lex_env = NULL; + DUK_ASSERT(func != NULL); + DUK_ASSERT(DUK_HOBJECT_HAS_COMPFUNC(func)); + act->func = func; /* don't want an intermediate exposed state with func == NULL */ +#if defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) + act->prev_caller = NULL; +#endif + /* don't want an intermediate exposed state with invalid pc */ + act->curr_pc = DUK_HCOMPFUNC_GET_CODE_BASE(thr->heap, (duk_hcompfunc *) func); +#if defined(DUK_USE_DEBUGGER_SUPPORT) + act->prev_line = 0; +#endif + DUK_TVAL_SET_OBJECT(&act->tv_func, func); /* borrowed, no refcount */ + DUK_HOBJECT_INCREF(thr, func); + + act->flags = DUK_ACT_FLAG_TAILCALLED; + if (DUK_HOBJECT_HAS_STRICT(func)) { + act->flags |= DUK_ACT_FLAG_STRICT; + } + if (call_flags & DUK_CALL_FLAG_CONSTRUCT) { + act->flags |= DUK_ACT_FLAG_CONSTRUCT; + } +#if defined(DUK_USE_ES6_PROXY) + if (call_flags & DUK_CALL_FLAG_CONSTRUCT_PROXY) { + act->flags |= DUK_ACT_FLAG_CONSTRUCT_PROXY; + } +#endif + + DUK_ASSERT(DUK_ACT_GET_FUNC(act) == func); /* already updated */ + DUK_ASSERT(act->var_env == NULL); + DUK_ASSERT(act->lex_env == NULL); + act->bottom_byteoff = entry_valstack_bottom_byteoff; /* tail call -> reuse current "frame" */ +#if 0 + /* Topmost activation retval_byteoff is considered garbage, no need to init. */ + act->retval_byteoff = 0; +#endif + /* Filled in when final reserve is known, dummy value doesn't matter + * even in error unwind because reserve_byteoff is only used when + * returning to -this- activation. + */ + act->reserve_byteoff = 0; + + /* + * Manipulate valstack so that args are on the current bottom and the + * previous caller's 'this' binding (which is the value preceding the + * current bottom) is replaced with the new 'this' binding: + * + * [ ... this_old | (crud) func this_new arg1 ... argN ] + * --> [ ... this_new | arg1 ... argN ] + * + * For tail calling to work properly, the valstack bottom must not grow + * here; otherwise crud would accumulate on the valstack. + */ + + tv1 = thr->valstack_bottom - 1; + tv2 = thr->valstack_bottom + idx_func + 1; + DUK_ASSERT(tv1 >= thr->valstack && tv1 < thr->valstack_top); /* tv1 is -below- valstack_bottom */ + DUK_ASSERT(tv2 >= thr->valstack_bottom && tv2 < thr->valstack_top); + DUK_TVAL_SET_TVAL_UPDREF(thr, tv1, tv2); /* side effects */ + + idx_args = idx_func + 2; + duk_remove_n(thr, 0, idx_args); /* may be NORZ */ + + idx_func = 0; + DUK_UNREF(idx_func); /* really 'not applicable' anymore, should not be referenced after this */ + idx_args = 0; + + *out_nargs = ((duk_hcompfunc *) func)->nargs; + *out_nregs = ((duk_hcompfunc *) func)->nregs; + DUK_ASSERT(*out_nregs >= 0); + DUK_ASSERT(*out_nregs >= *out_nargs); + *out_vs_min_bytes = + entry_valstack_bottom_byteoff + sizeof(duk_tval) * ((duk_size_t) *out_nregs + DUK_VALSTACK_INTERNAL_EXTRA); + +#if defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) +#if defined(DUK_USE_TAILCALL) +#error incorrect options: tail calls enabled with function caller property +#endif + /* XXX: This doesn't actually work properly for tail calls, so + * tail calls are disabled when DUK_USE_NONSTD_FUNC_CALLER_PROPERTY + * is in use. + */ + duk__update_func_caller_prop(thr, func); +#endif + + /* [ ... this_new | arg1 ... argN ] */ + + return 1; +} +#endif /* DUK_USE_TAILCALL */ + +DUK_LOCAL void duk__call_setup_act_not_tailcall(duk_hthread *thr, + duk_small_uint_t call_flags, + duk_idx_t idx_func, + duk_hobject *func, + duk_size_t entry_valstack_bottom_byteoff, + duk_size_t entry_valstack_end_byteoff, + duk_idx_t *out_nargs, + duk_idx_t *out_nregs, + duk_size_t *out_vs_min_bytes, + duk_activation **out_act) { + duk_activation *act; + duk_activation *new_act; + + DUK_UNREF(entry_valstack_end_byteoff); + + DUK_DDD(DUK_DDDPRINT("not a tail call, pushing a new activation to callstack, to index %ld", (long) (thr->callstack_top))); + + duk__call_callstack_limit_check(thr); + new_act = duk_hthread_activation_alloc(thr); + DUK_ASSERT(new_act != NULL); + + act = thr->callstack_curr; + if (act != NULL) { + /* + * Update return value stack index of current activation (if any). + * + * Although it might seem this is not necessary (bytecode executor + * does this for ECMAScript-to-ECMAScript calls; other calls are + * handled here), this turns out to be necessary for handling yield + * and resume. For them, an ECMAScript-to-native call happens, and + * the ECMAScript call's retval_byteoff must be set for things to work. + */ + + act->retval_byteoff = entry_valstack_bottom_byteoff + (duk_size_t) idx_func * sizeof(duk_tval); + } + + new_act->parent = act; + thr->callstack_curr = new_act; + thr->callstack_top++; + act = new_act; + *out_act = act; + + DUK_ASSERT(thr->valstack_top > thr->valstack_bottom); /* at least effective 'this' */ + DUK_ASSERT(func == NULL || !DUK_HOBJECT_HAS_BOUNDFUNC(func)); + + act->cat = NULL; + + act->flags = 0; + if (call_flags & DUK_CALL_FLAG_CONSTRUCT) { + act->flags |= DUK_ACT_FLAG_CONSTRUCT; + } +#if defined(DUK_USE_ES6_PROXY) + if (call_flags & DUK_CALL_FLAG_CONSTRUCT_PROXY) { + act->flags |= DUK_ACT_FLAG_CONSTRUCT_PROXY; + } +#endif + if (call_flags & DUK_CALL_FLAG_DIRECT_EVAL) { + act->flags |= DUK_ACT_FLAG_DIRECT_EVAL; + } + + /* start of arguments: idx_func + 2. */ + act->func = func; /* NULL for lightfunc */ + if (DUK_LIKELY(func != NULL)) { + DUK_TVAL_SET_OBJECT(&act->tv_func, func); /* borrowed, no refcount */ + if (DUK_HOBJECT_HAS_STRICT(func)) { + act->flags |= DUK_ACT_FLAG_STRICT; + } + if (DUK_HOBJECT_IS_COMPFUNC(func)) { + *out_nargs = ((duk_hcompfunc *) func)->nargs; + *out_nregs = ((duk_hcompfunc *) func)->nregs; + DUK_ASSERT(*out_nregs >= 0); + DUK_ASSERT(*out_nregs >= *out_nargs); + *out_vs_min_bytes = + entry_valstack_bottom_byteoff + + sizeof(duk_tval) * ((duk_size_t) idx_func + 2U + (duk_size_t) *out_nregs + DUK_VALSTACK_INTERNAL_EXTRA); + } else { + /* True because of call target lookup checks. */ + DUK_ASSERT(DUK_HOBJECT_IS_NATFUNC(func)); + + *out_nargs = ((duk_hnatfunc *) func)->nargs; + *out_nregs = *out_nargs; + if (*out_nargs >= 0) { + *out_vs_min_bytes = + entry_valstack_bottom_byteoff + + sizeof(duk_tval) * ((duk_size_t) idx_func + 2U + (duk_size_t) *out_nregs + + DUK_VALSTACK_API_ENTRY_MINIMUM + DUK_VALSTACK_INTERNAL_EXTRA); + } else { + /* Vararg function. */ + duk_size_t valstack_top_byteoff = + (duk_size_t) ((duk_uint8_t *) thr->valstack_top - ((duk_uint8_t *) thr->valstack)); + *out_vs_min_bytes = valstack_top_byteoff + sizeof(duk_tval) * (DUK_VALSTACK_API_ENTRY_MINIMUM + + DUK_VALSTACK_INTERNAL_EXTRA); + } + } + } else { + duk_small_uint_t lf_flags; + duk_tval *tv_func; + + act->flags |= DUK_ACT_FLAG_STRICT; + + tv_func = DUK_GET_TVAL_POSIDX(thr, idx_func); + DUK_ASSERT(DUK_TVAL_IS_LIGHTFUNC(tv_func)); + DUK_TVAL_SET_TVAL(&act->tv_func, tv_func); /* borrowed, no refcount */ + + lf_flags = DUK_TVAL_GET_LIGHTFUNC_FLAGS(tv_func); + *out_nargs = DUK_LFUNC_FLAGS_GET_NARGS(lf_flags); + if (*out_nargs != DUK_LFUNC_NARGS_VARARGS) { + *out_vs_min_bytes = entry_valstack_bottom_byteoff + + sizeof(duk_tval) * ((duk_size_t) idx_func + 2U + (duk_size_t) *out_nargs + + DUK_VALSTACK_API_ENTRY_MINIMUM + DUK_VALSTACK_INTERNAL_EXTRA); + } else { + duk_size_t valstack_top_byteoff = + (duk_size_t) ((duk_uint8_t *) thr->valstack_top - ((duk_uint8_t *) thr->valstack)); + *out_vs_min_bytes = valstack_top_byteoff + + sizeof(duk_tval) * (DUK_VALSTACK_API_ENTRY_MINIMUM + DUK_VALSTACK_INTERNAL_EXTRA); + *out_nargs = -1; /* vararg */ + } + *out_nregs = *out_nargs; + } + + act->var_env = NULL; + act->lex_env = NULL; +#if defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) + act->prev_caller = NULL; +#endif + act->curr_pc = NULL; +#if defined(DUK_USE_DEBUGGER_SUPPORT) + act->prev_line = 0; +#endif + act->bottom_byteoff = entry_valstack_bottom_byteoff + sizeof(duk_tval) * ((duk_size_t) idx_func + 2U); +#if 0 + act->retval_byteoff = 0; /* topmost activation retval_byteoff is considered garbage, no need to init */ +#endif + /* Filled in when final reserve is known, dummy value doesn't matter + * even in error unwind because reserve_byteoff is only used when + * returning to -this- activation. + */ + act->reserve_byteoff = 0; /* filled in by caller */ + + /* XXX: Is this INCREF necessary? 'func' is always a borrowed + * reference reachable through the value stack? If changed, stack + * unwind code also needs to be fixed to match. + */ + DUK_HOBJECT_INCREF_ALLOWNULL(thr, func); /* act->func */ + +#if defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) + if (func) { + duk__update_func_caller_prop(thr, func); + } +#endif +} + +/* + * Environment setup. + */ + +DUK_LOCAL void duk__call_env_setup(duk_hthread *thr, duk_hobject *func, duk_activation *act, duk_idx_t idx_args) { + duk_hobject *env; + + DUK_ASSERT(func == NULL || !DUK_HOBJECT_HAS_BOUNDFUNC(func)); /* bound function has already been resolved */ + + if (DUK_LIKELY(func != NULL)) { + if (DUK_LIKELY(DUK_HOBJECT_HAS_NEWENV(func))) { + DUK_STATS_INC(thr->heap, stats_envrec_newenv); + if (DUK_LIKELY(!DUK_HOBJECT_HAS_CREATEARGS(func))) { + /* Use a new environment but there's no 'arguments' object; + * delayed environment initialization. This is the most + * common case. + */ + DUK_ASSERT(act->lex_env == NULL); + DUK_ASSERT(act->var_env == NULL); + } else { + /* Use a new environment and there's an 'arguments' object. + * We need to initialize it right now. + */ + + /* third arg: absolute index (to entire valstack) of bottom_byteoff of new activation */ + env = duk_create_activation_environment_record(thr, func, act->bottom_byteoff); + DUK_ASSERT(env != NULL); + + /* [ ... func this arg1 ... argN envobj ] */ + + DUK_ASSERT(DUK_HOBJECT_HAS_CREATEARGS(func)); + duk__handle_createargs_for_call(thr, func, env, idx_args); + + /* [ ... func this arg1 ... argN envobj ] */ + + act->lex_env = env; + act->var_env = env; + DUK_HOBJECT_INCREF(thr, env); + DUK_HOBJECT_INCREF(thr, env); /* XXX: incref by count (2) directly */ + duk_pop(thr); + } + } else { + /* Use existing env (e.g. for non-strict eval); cannot have + * an own 'arguments' object (but can refer to an existing one). + */ + + DUK_ASSERT(!DUK_HOBJECT_HAS_CREATEARGS(func)); + + DUK_STATS_INC(thr->heap, stats_envrec_oldenv); + duk__handle_oldenv_for_call(thr, func, act); + + DUK_ASSERT(act->lex_env != NULL); + DUK_ASSERT(act->var_env != NULL); + } + } else { + /* Lightfuncs are always native functions and have "newenv". */ + DUK_ASSERT(act->lex_env == NULL); + DUK_ASSERT(act->var_env == NULL); + DUK_STATS_INC(thr->heap, stats_envrec_newenv); + } +} + +/* + * Misc shared helpers. + */ + +/* Check thread state, update current thread. */ +DUK_LOCAL void duk__call_thread_state_update(duk_hthread *thr) { + DUK_ASSERT(thr != NULL); + + if (DUK_LIKELY(thr == thr->heap->curr_thread)) { + if (DUK_UNLIKELY(thr->state != DUK_HTHREAD_STATE_RUNNING)) { + /* Should actually never happen, but check anyway. */ + goto thread_state_error; + } + } else { + DUK_ASSERT(thr->heap->curr_thread == NULL || thr->heap->curr_thread->state == DUK_HTHREAD_STATE_RUNNING); + if (DUK_UNLIKELY(thr->state != DUK_HTHREAD_STATE_INACTIVE)) { + goto thread_state_error; + } + DUK_HEAP_SWITCH_THREAD(thr->heap, thr); + thr->state = DUK_HTHREAD_STATE_RUNNING; + + /* Multiple threads may be simultaneously in the RUNNING + * state, but not in the same "resume chain". + */ + } + DUK_ASSERT(thr->heap->curr_thread == thr); + DUK_ASSERT(thr->state == DUK_HTHREAD_STATE_RUNNING); + return; + +thread_state_error: + DUK_ERROR_FMT1(thr, DUK_ERR_TYPE_ERROR, "invalid thread state (%ld)", (long) thr->state); + DUK_WO_NORETURN(return;); +} + +/* + * Main unprotected call handler, handles: + * + * - All combinations of native/ECMAScript caller and native/ECMAScript + * target. + * + * - Optimized ECMAScript-to-ECMAScript call where call handling only + * sets up a new duk_activation but reuses an existing bytecode executor + * (the caller) without native recursion. + * + * - Tailcalls, where an activation is reused without increasing call + * stack (duk_activation) depth. + * + * - Setup for an initial Duktape.Thread.resume(). + * + * The call handler doesn't provide any protection guarantees, protected calls + * must be implemented e.g. by wrapping the call in a duk_safe_call(). + * Call setup may fail at any stage, even when the new activation is in + * place; the only guarantee is that the state is consistent for unwinding. + */ + +DUK_LOCAL duk_int_t duk__handle_call_raw(duk_hthread *thr, duk_idx_t idx_func, duk_small_uint_t call_flags) { +#if defined(DUK_USE_ASSERTIONS) + duk_activation *entry_act; + duk_size_t entry_callstack_top; +#endif + duk_size_t entry_valstack_bottom_byteoff; + duk_size_t entry_valstack_end_byteoff; + duk_int_t entry_call_recursion_depth; + duk_hthread *entry_curr_thread; + duk_uint_fast8_t entry_thread_state; + duk_instr_t **entry_ptr_curr_pc; + duk_idx_t idx_args; + duk_idx_t nargs; /* # argument registers target function wants (< 0 => "as is") */ + duk_idx_t nregs; /* # total registers target function wants on entry (< 0 => "as is") */ + duk_size_t vs_min_bytes; /* minimum value stack size (bytes) for handling call */ + duk_hobject *func; /* 'func' on stack (borrowed reference) */ + duk_activation *act; + duk_ret_t rc; + duk_small_uint_t use_tailcall; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + /* Asserts for heap->curr_thread omitted: it may be NULL, 'thr', or + * any other thread (e.g. when heap thread is used to run finalizers). + */ + DUK_CTX_ASSERT_VALID(thr); + DUK_ASSERT(duk_is_valid_index(thr, idx_func)); + DUK_ASSERT(idx_func >= 0); + + DUK_STATS_INC(thr->heap, stats_call_all); + + /* If a tail call: + * - an ECMAScript activation must be on top of the callstack + * - there cannot be any catch stack entries that would catch + * a return + */ +#if defined(DUK_USE_ASSERTIONS) + if (call_flags & DUK_CALL_FLAG_TAILCALL) { + duk_activation *tmp_act; + duk_catcher *tmp_cat; + + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr) != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(thr->callstack_curr))); + + /* No entry in the catch stack which would actually catch a + * throw can refer to the callstack entry being reused. + * There *can* be catch stack entries referring to the current + * callstack entry as long as they don't catch (e.g. label sites). + */ + + tmp_act = thr->callstack_curr; + for (tmp_cat = tmp_act->cat; tmp_cat != NULL; tmp_cat = tmp_cat->parent) { + DUK_ASSERT(DUK_CAT_GET_TYPE(tmp_cat) == DUK_CAT_TYPE_LABEL); /* a non-catching entry */ + } + } +#endif /* DUK_USE_ASSERTIONS */ + + /* + * Store entry state. + */ + +#if defined(DUK_USE_ASSERTIONS) + entry_act = thr->callstack_curr; + entry_callstack_top = thr->callstack_top; +#endif + entry_valstack_bottom_byteoff = (duk_size_t) ((duk_uint8_t *) thr->valstack_bottom - (duk_uint8_t *) thr->valstack); + entry_valstack_end_byteoff = (duk_size_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack); + entry_call_recursion_depth = thr->heap->call_recursion_depth; + entry_curr_thread = thr->heap->curr_thread; /* may be NULL if first call */ + entry_thread_state = thr->state; + entry_ptr_curr_pc = thr->ptr_curr_pc; /* may be NULL */ + + /* If thr->ptr_curr_pc is set, sync curr_pc to act->pc. Then NULL + * thr->ptr_curr_pc so that it's not accidentally used with an incorrect + * activation when side effects occur. + */ + duk_hthread_sync_and_null_currpc(thr); + DUK_ASSERT(thr->ptr_curr_pc == NULL); + + DUK_DD(DUK_DDPRINT("duk__handle_call_raw: thr=%p, idx_func=%ld, " + "call_flags=0x%08lx (constructor=%ld), " + "valstack_top=%ld, idx_func=%ld, idx_args=%ld, rec_depth=%ld/%ld, " + "entry_valstack_bottom_byteoff=%ld, entry_valstack_end_byteoff=%ld, " + "entry_call_recursion_depth=%ld, " + "entry_curr_thread=%p, entry_thread_state=%ld", + (void *) thr, + (long) idx_func, + (unsigned long) call_flags, + (long) ((call_flags & DUK_CALL_FLAG_CONSTRUCT) != 0 ? 1 : 0), + (long) duk_get_top(thr), + (long) idx_func, + (long) (idx_func + 2), + (long) thr->heap->call_recursion_depth, + (long) thr->heap->call_recursion_limit, + (long) entry_valstack_bottom_byteoff, + (long) entry_valstack_end_byteoff, + (long) entry_call_recursion_depth, + (void *) entry_curr_thread, + (long) entry_thread_state)); + + /* + * Thread state check and book-keeping. + */ + + duk__call_thread_state_update(thr); + + /* + * Increase call recursion depth as early as possible so that if we + * enter a recursive call for any reason there's a backstop to native + * recursion. This can happen e.g. for almost any property read + * because it may cause a getter call or a Proxy trap (GC and finalizers + * are not an issue because they are not recursive). If we end up + * doing an Ecma-to-Ecma call, revert the increase. (See GH-2032.) + * + * For similar reasons, ensure there is a known value stack spare + * even before we actually prepare the value stack for the target + * function. If this isn't done, early recursion may consume the + * value stack space. + * + * XXX: Should bump yield preventcount early, for the same reason. + */ + + duk__call_c_recursion_limit_check(thr); + thr->heap->call_recursion_depth++; + duk_require_stack(thr, DUK__CALL_HANDLING_REQUIRE_STACK); + + /* + * Resolve final target function; handle bound functions and special + * functions like .call() and .apply(). Also figure out the effective + * 'this' binding, which replaces the current value at idx_func + 1. + */ + + if (DUK_LIKELY(duk__resolve_target_fastpath_check(thr, idx_func, &func, call_flags) != 0U)) { + DUK_DDD(DUK_DDDPRINT("fast path target resolve")); + } else { + DUK_DDD(DUK_DDDPRINT("slow path target resolve")); + func = duk__resolve_target_func_and_this_binding(thr, idx_func, &call_flags); + } + DUK_ASSERT(duk_get_top(thr) - idx_func >= 2); /* at least func and this present */ + + DUK_ASSERT(func == NULL || !DUK_HOBJECT_HAS_BOUNDFUNC(func)); + DUK_ASSERT(func == NULL || (DUK_HOBJECT_IS_COMPFUNC(func) || DUK_HOBJECT_IS_NATFUNC(func))); + + /* [ ... func this arg1 ... argN ] */ + + /* + * Setup a preliminary activation and figure out nargs/nregs and + * value stack minimum size. + * + * Don't touch valstack_bottom or valstack_top yet so that Duktape API + * calls work normally. + * + * Because 'act' is not zeroed, all fields must be filled in. + */ + + /* Should not be necessary, but initialize to silence warnings. */ + act = NULL; + nargs = 0; + nregs = 0; + vs_min_bytes = 0; + +#if defined(DUK_USE_TAILCALL) + use_tailcall = (call_flags & DUK_CALL_FLAG_TAILCALL); + if (use_tailcall) { + use_tailcall = duk__call_setup_act_attempt_tailcall(thr, + call_flags, + idx_func, + func, + entry_valstack_bottom_byteoff, + entry_valstack_end_byteoff, + &nargs, + &nregs, + &vs_min_bytes, + &act); + } +#else + DUK_ASSERT((call_flags & DUK_CALL_FLAG_TAILCALL) == 0); /* compiler ensures this */ + use_tailcall = 0; +#endif + + if (use_tailcall) { + idx_args = 0; + DUK_STATS_INC(thr->heap, stats_call_tailcall); + } else { + duk__call_setup_act_not_tailcall(thr, + call_flags, + idx_func, + func, + entry_valstack_bottom_byteoff, + entry_valstack_end_byteoff, + &nargs, + &nregs, + &vs_min_bytes, + &act); + idx_args = idx_func + 2; + } + /* After this point idx_func is no longer valid for tailcalls. */ + + DUK_ASSERT(act != NULL); + + /* [ ... func this arg1 ... argN ] */ + + /* + * Grow value stack to required size before env setup. This + * must happen before env setup to handle some corner cases + * correctly, e.g. test-bug-scope-segv-gh2448.js. + */ + + duk_valstack_grow_check_throw(thr, vs_min_bytes); + act->reserve_byteoff = (duk_size_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack); + + /* + * Environment record creation and 'arguments' object creation. + * Named function expression name binding is handled by the + * compiler; the compiled function's parent env will contain + * the (immutable) binding already. + * + * This handling is now identical for C and ECMAScript functions. + * C functions always have the 'NEWENV' flag set, so their + * environment record initialization is delayed (which is good). + * + * Delayed creation (on demand) is handled in duk_js_var.c. + */ + + duk__call_env_setup(thr, func, act, idx_args); + + /* [ ... func this arg1 ... argN ] */ + + /* + * Setup value stack: clamp to 'nargs', fill up to 'nregs', + * ensure value stack size matches target requirements, and + * switch value stack bottom. Valstack top is kept. + */ + + if (use_tailcall) { + DUK_ASSERT(nregs >= 0); + DUK_ASSERT(nregs >= nargs); + duk_set_top_and_wipe(thr, nregs, nargs); + } else { + if (nregs >= 0) { + DUK_ASSERT(nregs >= nargs); + duk_set_top_and_wipe(thr, idx_func + 2 + nregs, idx_func + 2 + nargs); + } else { + ; + } + thr->valstack_bottom = thr->valstack_bottom + idx_func + 2; + } + DUK_ASSERT(thr->valstack_bottom >= thr->valstack); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT(thr->valstack_end >= thr->valstack_top); + + /* + * Make the actual call. For Ecma-to-Ecma calls detect that + * setup is complete, then return with a status code that allows + * the caller to reuse the running executor. + */ + + if (func != NULL && DUK_HOBJECT_IS_COMPFUNC(func)) { + /* + * ECMAScript call. + */ + + DUK_ASSERT(func != NULL); + DUK_ASSERT(DUK_HOBJECT_HAS_COMPFUNC(func)); + act->curr_pc = DUK_HCOMPFUNC_GET_CODE_BASE(thr->heap, (duk_hcompfunc *) func); + + if (call_flags & DUK_CALL_FLAG_ALLOW_ECMATOECMA) { + DUK_DD(DUK_DDPRINT("avoid native call, use existing executor")); + DUK_STATS_INC(thr->heap, stats_call_ecmatoecma); + DUK_ASSERT((act->flags & DUK_ACT_FLAG_PREVENT_YIELD) == 0); + DUK_REFZERO_CHECK_FAST(thr); + DUK_ASSERT(thr->ptr_curr_pc == NULL); + thr->heap->call_recursion_depth--; /* No recursion increase for this case. */ + return 1; /* 1=reuse executor */ + } + DUK_ASSERT(use_tailcall == 0); + + /* duk_hthread_activation_unwind_norz() will decrease this on unwind */ + DUK_ASSERT((act->flags & DUK_ACT_FLAG_PREVENT_YIELD) == 0); + act->flags |= DUK_ACT_FLAG_PREVENT_YIELD; + thr->callstack_preventcount++; + + /* [ ... func this | arg1 ... argN ] ('this' must precede new bottom) */ + + /* + * Bytecode executor call. + * + * Execute bytecode, handling any recursive function calls and + * thread resumptions. Returns when execution would return from + * the entry level activation. When the executor returns, a + * single return value is left on the stack top. + * + * The only possible longjmp() is an error (DUK_LJ_TYPE_THROW), + * other types are handled internally by the executor. + */ + + /* thr->ptr_curr_pc is set by bytecode executor early on entry */ + DUK_ASSERT(thr->ptr_curr_pc == NULL); + DUK_DDD(DUK_DDDPRINT("entering bytecode execution")); + duk_js_execute_bytecode(thr); + DUK_DDD(DUK_DDDPRINT("returned from bytecode execution")); + } else { + /* + * Native call. + */ + + DUK_ASSERT(func == NULL || ((duk_hnatfunc *) func)->func != NULL); + DUK_ASSERT(use_tailcall == 0); + + /* [ ... func this | arg1 ... argN ] ('this' must precede new bottom) */ + + /* duk_hthread_activation_unwind_norz() will decrease this on unwind */ + DUK_ASSERT((act->flags & DUK_ACT_FLAG_PREVENT_YIELD) == 0); + act->flags |= DUK_ACT_FLAG_PREVENT_YIELD; + thr->callstack_preventcount++; + + /* For native calls must be NULL so we don't sync back */ + DUK_ASSERT(thr->ptr_curr_pc == NULL); + + /* XXX: native funcptr could come out of call setup. */ + if (func) { + rc = ((duk_hnatfunc *) func)->func(thr); + } else { + duk_tval *tv_func; + duk_c_function funcptr; + + tv_func = &act->tv_func; + DUK_ASSERT(DUK_TVAL_IS_LIGHTFUNC(tv_func)); + funcptr = DUK_TVAL_GET_LIGHTFUNC_FUNCPTR(tv_func); + rc = funcptr(thr); + } + + /* Automatic error throwing, retval check. */ + + if (rc == 0) { + DUK_ASSERT(thr->valstack < thr->valstack_end); + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top)); + thr->valstack_top++; + } else if (rc == 1) { + ; + } else if (rc < 0) { + duk_error_throw_from_negative_rc(thr, rc); + DUK_WO_NORETURN(return 0;); + } else { + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_CFUNC_RC); + DUK_WO_NORETURN(return 0;); + } + } + DUK_ASSERT(thr->ptr_curr_pc == NULL); + DUK_ASSERT(use_tailcall == 0); + + /* + * Constructor call post processing. + */ + +#if defined(DUK_USE_ES6_PROXY) + if (call_flags & (DUK_CALL_FLAG_CONSTRUCT | DUK_CALL_FLAG_CONSTRUCT_PROXY)) { + duk_call_construct_postprocess(thr, call_flags & DUK_CALL_FLAG_CONSTRUCT_PROXY); + } +#else + if (call_flags & DUK_CALL_FLAG_CONSTRUCT) { + duk_call_construct_postprocess(thr, 0); + } +#endif + + /* + * Unwind, restore valstack bottom and other book-keeping. + */ + + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT(thr->callstack_curr->parent == entry_act); + DUK_ASSERT(thr->callstack_top == entry_callstack_top + 1); + duk_hthread_activation_unwind_norz(thr); + DUK_ASSERT(thr->callstack_curr == entry_act); + DUK_ASSERT(thr->callstack_top == entry_callstack_top); + + thr->valstack_bottom = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + entry_valstack_bottom_byteoff); + /* keep current valstack_top */ + DUK_ASSERT(thr->valstack_bottom >= thr->valstack); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT(thr->valstack_end >= thr->valstack_top); + DUK_ASSERT(thr->valstack_top - thr->valstack_bottom >= idx_func + 1); + + /* Return value handling. */ + + /* [ ... func this (crud) retval ] */ + + { + duk_tval *tv_ret; + duk_tval *tv_funret; + + tv_ret = thr->valstack_bottom + idx_func; + tv_funret = thr->valstack_top - 1; +#if defined(DUK_USE_FASTINT) + /* Explicit check for fastint downgrade. */ + DUK_TVAL_CHKFAST_INPLACE_FAST(tv_funret); +#endif + DUK_TVAL_SET_TVAL_UPDREF(thr, tv_ret, tv_funret); /* side effects */ + } + + duk_set_top_unsafe(thr, idx_func + 1); + + /* [ ... retval ] */ + + /* Restore caller's value stack reserve (cannot fail). */ + DUK_ASSERT((duk_uint8_t *) thr->valstack + entry_valstack_end_byteoff >= (duk_uint8_t *) thr->valstack_top); + DUK_ASSERT((duk_uint8_t *) thr->valstack + entry_valstack_end_byteoff <= (duk_uint8_t *) thr->valstack_alloc_end); + thr->valstack_end = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + entry_valstack_end_byteoff); + + /* XXX: Trial value stack shrink would be OK here, but we'd need + * to prevent side effects of the potential realloc. + */ + + /* Restore entry thread executor curr_pc stack frame pointer. */ + thr->ptr_curr_pc = entry_ptr_curr_pc; + + DUK_HEAP_SWITCH_THREAD(thr->heap, entry_curr_thread); /* may be NULL */ + thr->state = (duk_uint8_t) entry_thread_state; + + /* Disabled assert: triggered with some torture tests. */ +#if 0 + DUK_ASSERT((thr->state == DUK_HTHREAD_STATE_INACTIVE && thr->heap->curr_thread == NULL) || /* first call */ + (thr->state == DUK_HTHREAD_STATE_INACTIVE && thr->heap->curr_thread != NULL) || /* other call */ + (thr->state == DUK_HTHREAD_STATE_RUNNING && thr->heap->curr_thread == thr)); /* current thread */ +#endif + + thr->heap->call_recursion_depth = entry_call_recursion_depth; + + /* If the debugger is active we need to force an interrupt so that + * debugger breakpoints are rechecked. This is important for function + * calls caused by side effects (e.g. when doing a DUK_OP_GETPROP), see + * GH-303. Only needed for success path, error path always causes a + * breakpoint recheck in the executor. It would be enough to set this + * only when returning to an ECMAScript activation, but setting the flag + * on every return should have no ill effect. + */ +#if defined(DUK_USE_DEBUGGER_SUPPORT) + if (duk_debug_is_attached(thr->heap)) { + DUK_DD(DUK_DDPRINT("returning with debugger enabled, force interrupt")); + DUK_ASSERT(thr->interrupt_counter <= thr->interrupt_init); + thr->interrupt_init -= thr->interrupt_counter; + thr->interrupt_counter = 0; + thr->heap->dbg_force_restart = 1; + } +#endif + +#if defined(DUK_USE_INTERRUPT_COUNTER) && defined(DUK_USE_DEBUG) + duk__interrupt_fixup(thr, entry_curr_thread); +#endif + + /* Restored by success path. */ + DUK_ASSERT(thr->heap->call_recursion_depth == entry_call_recursion_depth); + DUK_ASSERT(thr->ptr_curr_pc == entry_ptr_curr_pc); + DUK_ASSERT_LJSTATE_UNSET(thr->heap); + + DUK_REFZERO_CHECK_FAST(thr); + + return 0; /* 0=call handled inline */ +} + +DUK_INTERNAL duk_int_t duk_handle_call_unprotected_nargs(duk_hthread *thr, duk_idx_t nargs, duk_small_uint_t call_flags) { + duk_idx_t idx_func; + DUK_ASSERT(duk_get_top(thr) >= nargs + 2); + idx_func = duk_get_top(thr) - (nargs + 2); + DUK_ASSERT(idx_func >= 0); + return duk_handle_call_unprotected(thr, idx_func, call_flags); +} + +DUK_INTERNAL duk_int_t duk_handle_call_unprotected(duk_hthread *thr, duk_idx_t idx_func, duk_small_uint_t call_flags) { + DUK_ASSERT(duk_is_valid_index(thr, idx_func)); + DUK_ASSERT(idx_func >= 0); + return duk__handle_call_raw(thr, idx_func, call_flags); +} + +/* + * duk_handle_safe_call(): make a "C protected call" within the + * current activation. + * + * The allowed thread states for making a call are the same as for + * duk_handle_call_protected(). + * + * Even though this call is protected, errors are thrown for insane arguments + * and may result in a fatal error unless there's another protected call which + * catches such errors. + * + * The error handling path should be error free, even for out-of-memory + * errors, to ensure safe sandboxing. (As of Duktape 2.2.0 this is not + * yet the case for environment closing which may run out of memory, see + * XXX notes below.) + */ + +DUK_LOCAL void duk__handle_safe_call_inner(duk_hthread *thr, + duk_safe_call_function func, + void *udata, +#if defined(DUK_USE_ASSERTIONS) + duk_size_t entry_valstack_bottom_byteoff, + duk_size_t entry_callstack_top, +#endif + duk_hthread *entry_curr_thread, + duk_uint_fast8_t entry_thread_state, + duk_idx_t idx_retbase, + duk_idx_t num_stack_rets) { + duk_ret_t rc; + + DUK_ASSERT(thr != NULL); + DUK_CTX_ASSERT_VALID(thr); + + /* + * Thread state check and book-keeping. + */ + + duk__call_thread_state_update(thr); + + /* + * Recursion limit check. + */ + + duk__call_c_recursion_limit_check(thr); + thr->heap->call_recursion_depth++; + + /* + * Make the C call. + */ + + rc = func(thr, udata); + + DUK_DDD(DUK_DDDPRINT("safe_call, func rc=%ld", (long) rc)); + + /* + * Valstack manipulation for results. + */ + + /* we're running inside the caller's activation, so no change in call/catch stack or valstack bottom */ + DUK_ASSERT(thr->callstack_top == entry_callstack_top); + DUK_ASSERT(thr->valstack_bottom >= thr->valstack); + DUK_ASSERT((duk_size_t) ((duk_uint8_t *) thr->valstack_bottom - (duk_uint8_t *) thr->valstack) == + entry_valstack_bottom_byteoff); + DUK_ASSERT(thr->valstack_top >= thr->valstack_bottom); + DUK_ASSERT(thr->valstack_end >= thr->valstack_top); + + if (DUK_UNLIKELY(rc < 0)) { + duk_error_throw_from_negative_rc(thr, rc); + DUK_WO_NORETURN(return;); + } + DUK_ASSERT(rc >= 0); + + duk__safe_call_adjust_valstack(thr, idx_retbase, num_stack_rets, rc); /* throws for insane rc */ + + DUK_HEAP_SWITCH_THREAD(thr->heap, entry_curr_thread); /* may be NULL */ + thr->state = (duk_uint8_t) entry_thread_state; +} + +DUK_LOCAL void duk__handle_safe_call_error(duk_hthread *thr, + duk_activation *entry_act, +#if defined(DUK_USE_ASSERTIONS) + duk_size_t entry_callstack_top, +#endif + duk_hthread *entry_curr_thread, + duk_uint_fast8_t entry_thread_state, + duk_idx_t idx_retbase, + duk_idx_t num_stack_rets, + duk_size_t entry_valstack_bottom_byteoff, + duk_jmpbuf *old_jmpbuf_ptr) { + DUK_ASSERT(thr != NULL); + DUK_CTX_ASSERT_VALID(thr); + + /* + * Error during call. The error value is at heap->lj.value1. + * + * The very first thing we do is restore the previous setjmp catcher. + * This means that any error in error handling will propagate outwards + * instead of causing a setjmp() re-entry above. + */ + + DUK_DDD(DUK_DDDPRINT("error caught during protected duk_handle_safe_call()")); + + /* Other longjmp types are handled by executor before propagating + * the error here. + */ + DUK_ASSERT(thr->heap->lj.type == DUK_LJ_TYPE_THROW); + DUK_ASSERT_LJSTATE_SET(thr->heap); + + /* Either pointer may be NULL (at entry), so don't assert. */ + thr->heap->lj.jmpbuf_ptr = old_jmpbuf_ptr; + + /* XXX: callstack unwind may now throw an error when closing + * scopes; this is a sandboxing issue, described in: + * https://github.com/svaarala/duktape/issues/476 + */ + /* XXX: "unwind to" primitive? */ + + DUK_ASSERT(thr->callstack_top >= entry_callstack_top); + while (thr->callstack_curr != entry_act) { + DUK_ASSERT(thr->callstack_curr != NULL); + duk_hthread_activation_unwind_norz(thr); + } + DUK_ASSERT(thr->callstack_top == entry_callstack_top); + + /* Switch active thread before any side effects to avoid a + * dangling curr_thread pointer. + */ + DUK_HEAP_SWITCH_THREAD(thr->heap, entry_curr_thread); /* may be NULL */ + thr->state = (duk_uint8_t) entry_thread_state; + + DUK_ASSERT(thr->heap->curr_thread == entry_curr_thread); + DUK_ASSERT(thr->state == entry_thread_state); + + /* Restore valstack bottom. */ + thr->valstack_bottom = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + entry_valstack_bottom_byteoff); + + /* [ ... | (crud) ] */ + + /* XXX: ensure space in valstack (now relies on internal reserve)? */ + duk_push_tval(thr, &thr->heap->lj.value1); + + /* [ ... | (crud) errobj ] */ + + DUK_ASSERT(duk_get_top(thr) >= 1); /* at least errobj must be on stack */ + + duk__safe_call_adjust_valstack(thr, idx_retbase, num_stack_rets, 1); /* 1 = num actual 'return values' */ + + /* [ ... | ] or [ ... | errobj (M * undefined)] where M = num_stack_rets - 1 */ + + /* Reset longjmp state. */ + thr->heap->lj.type = DUK_LJ_TYPE_UNKNOWN; + thr->heap->lj.iserror = 0; + DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ(thr, &thr->heap->lj.value1); + DUK_TVAL_SET_UNDEFINED_UPDREF_NORZ(thr, &thr->heap->lj.value2); + + /* Error handling complete, remove side effect protections. Caller + * will process pending finalizers. + */ +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(thr->heap->error_not_allowed == 1); + thr->heap->error_not_allowed = 0; +#endif + DUK_ASSERT(thr->heap->pf_prevent_count > 0); + thr->heap->pf_prevent_count--; + DUK_DD(DUK_DDPRINT("safe call error handled, pf_prevent_count updated to %ld", (long) thr->heap->pf_prevent_count)); + + /* thr->ptr_curr_pc is restored by + * duk__handle_safe_call_shared_unwind() which is also used for + * success path. + */ +} + +DUK_LOCAL void duk__handle_safe_call_shared_unwind(duk_hthread *thr, + duk_idx_t idx_retbase, + duk_idx_t num_stack_rets, +#if defined(DUK_USE_ASSERTIONS) + duk_size_t entry_callstack_top, +#endif + duk_int_t entry_call_recursion_depth, + duk_hthread *entry_curr_thread, + duk_instr_t **entry_ptr_curr_pc) { + DUK_ASSERT(thr != NULL); + DUK_CTX_ASSERT_VALID(thr); + DUK_UNREF(idx_retbase); + DUK_UNREF(num_stack_rets); + DUK_UNREF(entry_curr_thread); + + DUK_ASSERT(thr->callstack_top == entry_callstack_top); + + /* Restore entry thread executor curr_pc stack frame pointer. + * XXX: would be enough to do in error path only, should nest + * cleanly in success path. + */ + thr->ptr_curr_pc = entry_ptr_curr_pc; + + thr->heap->call_recursion_depth = entry_call_recursion_depth; + + /* stack discipline consistency check */ + DUK_ASSERT(duk_get_top(thr) == idx_retbase + num_stack_rets); + + /* A debugger forced interrupt check is not needed here, as + * problematic safe calls are not caused by side effects. + */ + +#if defined(DUK_USE_INTERRUPT_COUNTER) && defined(DUK_USE_DEBUG) + duk__interrupt_fixup(thr, entry_curr_thread); +#endif +} + +DUK_INTERNAL duk_int_t duk_handle_safe_call(duk_hthread *thr, + duk_safe_call_function func, + void *udata, + duk_idx_t num_stack_args, + duk_idx_t num_stack_rets) { + duk_activation *entry_act; + duk_size_t entry_valstack_bottom_byteoff; +#if defined(DUK_USE_ASSERTIONS) + duk_size_t entry_valstack_end_byteoff; + duk_size_t entry_callstack_top; + duk_size_t entry_callstack_preventcount; +#endif + duk_int_t entry_call_recursion_depth; + duk_hthread *entry_curr_thread; + duk_uint_fast8_t entry_thread_state; + duk_instr_t **entry_ptr_curr_pc; + duk_jmpbuf *old_jmpbuf_ptr = NULL; + duk_jmpbuf our_jmpbuf; + duk_idx_t idx_retbase; + duk_int_t retval; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(duk_get_top(thr) >= num_stack_args); /* Caller ensures. */ + + DUK_STATS_INC(thr->heap, stats_safecall_all); + + /* Value stack reserve handling: safe call assumes caller has reserved + * space for nrets (assuming optimal unwind processing). Value stack + * reserve is not stored/restored as for normal calls because a safe + * call conceptually happens in the same activation. + */ + + /* Careful with indices like '-x'; if 'x' is zero, it refers to bottom */ + entry_act = thr->callstack_curr; + entry_valstack_bottom_byteoff = (duk_size_t) ((duk_uint8_t *) thr->valstack_bottom - (duk_uint8_t *) thr->valstack); +#if defined(DUK_USE_ASSERTIONS) + entry_valstack_end_byteoff = (duk_size_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack); + entry_callstack_top = thr->callstack_top; + entry_callstack_preventcount = thr->callstack_preventcount; +#endif + entry_call_recursion_depth = thr->heap->call_recursion_depth; + entry_curr_thread = thr->heap->curr_thread; /* may be NULL if first call */ + entry_thread_state = thr->state; + entry_ptr_curr_pc = thr->ptr_curr_pc; /* may be NULL */ + idx_retbase = duk_get_top(thr) - num_stack_args; /* not a valid stack index if num_stack_args == 0 */ + DUK_ASSERT(idx_retbase >= 0); + + DUK_ASSERT((duk_idx_t) (thr->valstack_top - thr->valstack_bottom) >= num_stack_args); /* Caller ensures. */ + DUK_ASSERT((duk_idx_t) (thr->valstack_end - (thr->valstack_bottom + idx_retbase)) >= num_stack_rets); /* Caller ensures. */ + + /* Cannot portably debug print a function pointer, hence 'func' not printed! */ + DUK_DD(DUK_DDPRINT("duk_handle_safe_call: thr=%p, num_stack_args=%ld, num_stack_rets=%ld, " + "valstack_top=%ld, idx_retbase=%ld, rec_depth=%ld/%ld, " + "entry_act=%p, entry_valstack_bottom_byteoff=%ld, entry_call_recursion_depth=%ld, " + "entry_curr_thread=%p, entry_thread_state=%ld", + (void *) thr, + (long) num_stack_args, + (long) num_stack_rets, + (long) duk_get_top(thr), + (long) idx_retbase, + (long) thr->heap->call_recursion_depth, + (long) thr->heap->call_recursion_limit, + (void *) entry_act, + (long) entry_valstack_bottom_byteoff, + (long) entry_call_recursion_depth, + (void *) entry_curr_thread, + (long) entry_thread_state)); + + /* Setjmp catchpoint setup. */ + old_jmpbuf_ptr = thr->heap->lj.jmpbuf_ptr; + thr->heap->lj.jmpbuf_ptr = &our_jmpbuf; + + /* Prevent yields for the duration of the safe call. This only + * matters if the executor makes safe calls to functions that + * yield, this doesn't currently happen. + */ + thr->callstack_preventcount++; + +#if defined(DUK_USE_CPP_EXCEPTIONS) + try { +#else + DUK_ASSERT(thr->heap->lj.jmpbuf_ptr == &our_jmpbuf); + if (DUK_SETJMP(our_jmpbuf.jb) == 0) { + /* Success path. */ +#endif + DUK_DDD(DUK_DDDPRINT("safe_call setjmp catchpoint setup complete")); + + duk__handle_safe_call_inner(thr, + func, + udata, +#if defined(DUK_USE_ASSERTIONS) + entry_valstack_bottom_byteoff, + entry_callstack_top, +#endif + entry_curr_thread, + entry_thread_state, + idx_retbase, + num_stack_rets); + + DUK_STATS_INC(thr->heap, stats_safecall_nothrow); + + /* Either pointer may be NULL (at entry), so don't assert */ + thr->heap->lj.jmpbuf_ptr = old_jmpbuf_ptr; + + /* If calls happen inside the safe call, these are restored by + * whatever calls are made. Reserve cannot decrease. + */ + DUK_ASSERT(thr->callstack_curr == entry_act); + DUK_ASSERT((duk_size_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack) >= + entry_valstack_end_byteoff); + + retval = DUK_EXEC_SUCCESS; +#if defined(DUK_USE_CPP_EXCEPTIONS) + } catch (duk_internal_exception &exc) { + DUK_UNREF(exc); +#else + } else { + /* Error path. */ +#endif + DUK_ASSERT((duk_size_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack) >= + entry_valstack_end_byteoff); + + DUK_STATS_INC(thr->heap, stats_safecall_throw); + + duk__handle_safe_call_error(thr, + entry_act, +#if defined(DUK_USE_ASSERTIONS) + entry_callstack_top, +#endif + entry_curr_thread, + entry_thread_state, + idx_retbase, + num_stack_rets, + entry_valstack_bottom_byteoff, + old_jmpbuf_ptr); + + retval = DUK_EXEC_ERROR; + } +#if defined(DUK_USE_CPP_EXCEPTIONS) + catch (duk_fatal_exception &exc) { + DUK_D(DUK_DPRINT("rethrow duk_fatal_exception")); + DUK_UNREF(exc); + throw; + } catch (std::exception &exc) { + const char *what = exc.what(); + DUK_ASSERT((duk_size_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack) >= + entry_valstack_end_byteoff); + DUK_STATS_INC(thr->heap, stats_safecall_throw); + if (!what) { + what = "unknown"; + } + DUK_D(DUK_DPRINT("unexpected c++ std::exception (perhaps thrown by user code)")); + try { + DUK_ERROR_FMT1(thr, + DUK_ERR_TYPE_ERROR, + "caught invalid c++ std::exception '%s' (perhaps thrown by user code)", + what); + DUK_WO_NORETURN(return 0;); + } catch (duk_internal_exception exc) { + DUK_D(DUK_DPRINT("caught api error thrown from unexpected c++ std::exception")); + DUK_UNREF(exc); + duk__handle_safe_call_error(thr, + entry_act, +#if defined(DUK_USE_ASSERTIONS) + entry_callstack_top, +#endif + entry_curr_thread, + entry_thread_state, + idx_retbase, + num_stack_rets, + entry_valstack_bottom_byteoff, + old_jmpbuf_ptr); + retval = DUK_EXEC_ERROR; + } + } catch (...) { + DUK_D(DUK_DPRINT("unexpected c++ exception (perhaps thrown by user code)")); + DUK_ASSERT((duk_size_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack) >= + entry_valstack_end_byteoff); + DUK_STATS_INC(thr->heap, stats_safecall_throw); + try { + DUK_ERROR_TYPE(thr, "caught invalid c++ exception (perhaps thrown by user code)"); + DUK_WO_NORETURN(return 0;); + } catch (duk_internal_exception exc) { + DUK_D(DUK_DPRINT("caught api error thrown from unexpected c++ exception")); + DUK_UNREF(exc); + duk__handle_safe_call_error(thr, + entry_act, +#if defined(DUK_USE_ASSERTIONS) + entry_callstack_top, +#endif + entry_curr_thread, + entry_thread_state, + idx_retbase, + num_stack_rets, + entry_valstack_bottom_byteoff, + old_jmpbuf_ptr); + retval = DUK_EXEC_ERROR; + } + } +#endif + + DUK_ASSERT(thr->heap->lj.jmpbuf_ptr == old_jmpbuf_ptr); /* success/error path both do this */ + + DUK_ASSERT_LJSTATE_UNSET(thr->heap); + + DUK_ASSERT((duk_size_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack) >= entry_valstack_end_byteoff); + duk__handle_safe_call_shared_unwind(thr, + idx_retbase, + num_stack_rets, +#if defined(DUK_USE_ASSERTIONS) + entry_callstack_top, +#endif + entry_call_recursion_depth, + entry_curr_thread, + entry_ptr_curr_pc); + + /* Restore preventcount. */ + thr->callstack_preventcount--; + DUK_ASSERT(thr->callstack_preventcount == entry_callstack_preventcount); + + /* Final asserts. */ + DUK_ASSERT(thr->callstack_curr == entry_act); + DUK_ASSERT((duk_size_t) ((duk_uint8_t *) thr->valstack_bottom - (duk_uint8_t *) thr->valstack) == + entry_valstack_bottom_byteoff); + DUK_ASSERT((duk_size_t) ((duk_uint8_t *) thr->valstack_end - (duk_uint8_t *) thr->valstack) >= entry_valstack_end_byteoff); + DUK_ASSERT(thr->callstack_top == entry_callstack_top); + DUK_ASSERT(thr->heap->call_recursion_depth == entry_call_recursion_depth); + DUK_ASSERT(thr->heap->curr_thread == entry_curr_thread); + DUK_ASSERT(thr->state == entry_thread_state); + DUK_ASSERT(thr->ptr_curr_pc == entry_ptr_curr_pc); + DUK_ASSERT(duk_get_top(thr) == idx_retbase + num_stack_rets); + DUK_ASSERT_LJSTATE_UNSET(thr->heap); + + /* Pending side effects. */ + DUK_REFZERO_CHECK_FAST(thr); + + return retval; +} + +/* + * Property-based call (foo.noSuch()) error setup: replace target function + * on stack top with a hidden Symbol tagged non-callable wrapper object + * holding the error. The error gets thrown in call handling at the + * proper spot to follow ECMAScript semantics. + */ + +#if defined(DUK_USE_VERBOSE_ERRORS) +DUK_INTERNAL DUK_NOINLINE DUK_COLD void duk_call_setup_propcall_error(duk_hthread *thr, duk_tval *tv_base, duk_tval *tv_key) { + const char *str_targ, *str_key, *str_base; + duk_idx_t entry_top; + + entry_top = duk_get_top(thr); + + /* [ target ] */ + + /* Must stabilize pointers first. tv_targ is already on stack top. */ + duk_push_tval(thr, tv_base); + duk_push_tval(thr, tv_key); + + DUK_GC_TORTURE(thr->heap); + + duk_push_bare_object(thr); + + /* [ target base key {} ] */ + + /* We only push a wrapped error, replacing the call target (at + * idx_func) with the error to ensure side effects come out + * correctly: + * - Property read + * - Call argument evaluation + * - Callability check and error thrown + * + * A hidden Symbol on the wrapper object pushed above is used by + * call handling to figure out the error is to be thrown as is. + * It is CRITICAL that the hidden Symbol can never occur on a + * user visible object that may get thrown. + */ + +#if defined(DUK_USE_PARANOID_ERRORS) + str_targ = duk_get_type_name(thr, -4); + str_key = duk_get_type_name(thr, -2); + str_base = duk_get_type_name(thr, -3); + duk_push_error_object(thr, + DUK_ERR_TYPE_ERROR | DUK_ERRCODE_FLAG_NOBLAME_FILELINE, + "%s not callable (property %s of %s)", + str_targ, + str_key, + str_base); + duk_xdef_prop_stridx(thr, -2, DUK_STRIDX_INT_TARGET, DUK_PROPDESC_FLAGS_NONE); /* Marker property, reuse _Target. */ + /* [ target base key { _Target: error } ] */ + duk_replace(thr, entry_top - 1); +#else + str_targ = duk_push_string_readable(thr, -4); + str_key = duk_push_string_readable(thr, -3); + str_base = duk_push_string_readable(thr, -5); + duk_push_error_object(thr, + DUK_ERR_TYPE_ERROR | DUK_ERRCODE_FLAG_NOBLAME_FILELINE, + "%s not callable (property %s of %s)", + str_targ, + str_key, + str_base); + /* [ target base key {} str_targ str_key str_base error ] */ + duk_xdef_prop_stridx(thr, -5, DUK_STRIDX_INT_TARGET, DUK_PROPDESC_FLAGS_NONE); /* Marker property, reuse _Target. */ + /* [ target base key { _Target: error } str_targ str_key str_base ] */ + duk_swap(thr, -4, entry_top - 1); + /* [ { _Target: error } base key target str_targ str_key str_base ] */ +#endif + + /* [ { _Target: error } */ + duk_set_top(thr, entry_top); + + /* [ { _Target: error } */ + DUK_ASSERT(!duk_is_callable(thr, -1)); /* Critical so that call handling will throw the error. */ +} +#endif /* DUK_USE_VERBOSE_ERRORS */ + +/* automatic undefs */ +#undef DUK__AUGMENT_CALL_RELAX_COUNT +#undef DUK__CALL_HANDLING_REQUIRE_STACK +#line 1 "duk_js_compiler.c" +/* + * ECMAScript compiler. + * + * Parses an input string and generates a function template result. + * Compilation may happen in multiple contexts (global code, eval + * code, function code). + * + * The parser uses a traditional top-down recursive parsing for the + * statement level, and an operator precedence based top-down approach + * for the expression level. The attempt is to minimize the C stack + * depth. Bytecode is generated directly without an intermediate + * representation (tree), at the cost of needing two (and sometimes + * three) passes over each function. + * + * The top-down recursive parser functions are named "duk__parse_XXX". + * + * Recursion limits are in key functions to prevent arbitrary C recursion: + * function body parsing, statement parsing, and expression parsing. + * + * See doc/compiler.rst for discussion on the design. + * + * A few typing notes: + * + * - duk_regconst_t: signed, highest bit set (< 0) means constant, + * some call sites use -1 for "none" (equivalent to constant 0x7fffffff) + * - PC values: duk_int_t, negative values used as markers + */ + +/* #include duk_internal.h -> already included */ + +/* If highest bit of a register number is set, it refers to a constant instead. + * When interpreted as a signed value, this means const values are always + * negative (when interpreted as two's complement). For example DUK__ISREG_TEMP() + * uses this approach to avoid an explicit DUK__ISREG() check (the condition is + * logically "'x' is a register AND 'x' >= temp_first"). + */ +#define DUK__CONST_MARKER DUK_REGCONST_CONST_MARKER +#define DUK__REMOVECONST(x) ((x) & ~DUK__CONST_MARKER) +#define DUK__ISREG(x) ((x) >= 0) +#define DUK__ISCONST(x) ((x) < 0) +#define DUK__ISREG_TEMP(comp_ctx, x) \ + ((duk_int32_t) (x) >= \ + (duk_int32_t) ((comp_ctx)->curr_func.temp_first)) /* Check for x >= temp_first && x >= 0 by comparing as signed. */ +#define DUK__ISREG_NOTTEMP(comp_ctx, x) \ + ((duk_uint32_t) (x) < \ + (duk_uint32_t) ((comp_ctx)->curr_func.temp_first)) /* Check for x >= 0 && x < temp_first by interpreting as unsigned. */ +#define DUK__GETTEMP(comp_ctx) ((comp_ctx)->curr_func.temp_next) +#define DUK__SETTEMP(comp_ctx, x) ((comp_ctx)->curr_func.temp_next = (x)) /* dangerous: must only lower (temp_max not updated) */ +#define DUK__SETTEMP_CHECKMAX(comp_ctx, x) duk__settemp_checkmax((comp_ctx), (x)) +#define DUK__ALLOCTEMP(comp_ctx) duk__alloctemp((comp_ctx)) +#define DUK__ALLOCTEMPS(comp_ctx, count) duk__alloctemps((comp_ctx), (count)) + +/* Init value set size for array and object literals. */ +#define DUK__MAX_ARRAY_INIT_VALUES 20 +#define DUK__MAX_OBJECT_INIT_PAIRS 10 + +/* XXX: hack, remove when const lookup is not O(n) */ +#define DUK__GETCONST_MAX_CONSTS_CHECK 256 + +/* These limits are based on bytecode limits. Max temps is limited + * by duk_hcompfunc nargs/nregs fields being 16 bits. + */ +#define DUK__MAX_CONSTS DUK_BC_BC_MAX +#define DUK__MAX_FUNCS DUK_BC_BC_MAX +#define DUK__MAX_TEMPS 0xffffL + +/* Initial bytecode size allocation. */ +#if defined(DUK_USE_PREFER_SIZE) +#define DUK__BC_INITIAL_INSTS 16 +#else +#define DUK__BC_INITIAL_INSTS 256 +#endif + +#define DUK__RECURSION_INCREASE(comp_ctx, thr) \ + do { \ + DUK_DDD(DUK_DDDPRINT("RECURSION INCREASE: %s:%ld", (const char *) DUK_FILE_MACRO, (long) DUK_LINE_MACRO)); \ + duk__comp_recursion_increase((comp_ctx)); \ + } while (0) + +#define DUK__RECURSION_DECREASE(comp_ctx, thr) \ + do { \ + DUK_DDD(DUK_DDDPRINT("RECURSION DECREASE: %s:%ld", (const char *) DUK_FILE_MACRO, (long) DUK_LINE_MACRO)); \ + duk__comp_recursion_decrease((comp_ctx)); \ + } while (0) + +/* Value stack slot limits: these are quite approximate right now, and + * because they overlap in control flow, some could be eliminated. + */ +#define DUK__COMPILE_ENTRY_SLOTS 8 +#define DUK__FUNCTION_INIT_REQUIRE_SLOTS 16 +#define DUK__FUNCTION_BODY_REQUIRE_SLOTS 16 +#define DUK__PARSE_STATEMENTS_SLOTS 16 +#define DUK__PARSE_EXPR_SLOTS 16 + +/* Temporary structure used to pass a stack allocated region through + * duk_safe_call(). + */ +typedef struct { + duk_small_uint_t flags; + duk_compiler_ctx comp_ctx_alloc; + duk_lexer_point lex_pt_alloc; +} duk__compiler_stkstate; + +/* + * Prototypes + */ + +/* lexing */ +DUK_LOCAL_DECL void duk__advance_helper(duk_compiler_ctx *comp_ctx, duk_small_int_t expect); +DUK_LOCAL_DECL void duk__advance_expect(duk_compiler_ctx *comp_ctx, duk_small_int_t expect); +DUK_LOCAL_DECL void duk__advance(duk_compiler_ctx *ctx); + +/* function helpers */ +DUK_LOCAL_DECL void duk__init_func_valstack_slots(duk_compiler_ctx *comp_ctx); +DUK_LOCAL_DECL void duk__reset_func_for_pass2(duk_compiler_ctx *comp_ctx); +DUK_LOCAL_DECL void duk__init_varmap_and_prologue_for_pass2(duk_compiler_ctx *comp_ctx, duk_regconst_t *out_stmt_value_reg); +DUK_LOCAL_DECL void duk__convert_to_func_template(duk_compiler_ctx *comp_ctx); +DUK_LOCAL_DECL duk_int_t duk__cleanup_varmap(duk_compiler_ctx *comp_ctx); + +/* code emission */ +DUK_LOCAL_DECL duk_int_t duk__get_current_pc(duk_compiler_ctx *comp_ctx); +DUK_LOCAL_DECL duk_compiler_instr *duk__get_instr_ptr(duk_compiler_ctx *comp_ctx, duk_int_t pc); +DUK_LOCAL_DECL void duk__emit(duk_compiler_ctx *comp_ctx, duk_instr_t ins); +DUK_LOCAL_DECL void duk__emit_op_only(duk_compiler_ctx *comp_ctx, duk_small_uint_t op); +DUK_LOCAL_DECL void duk__emit_a_b_c(duk_compiler_ctx *comp_ctx, + duk_small_uint_t op_flags, + duk_regconst_t a, + duk_regconst_t b, + duk_regconst_t c); +DUK_LOCAL_DECL void duk__emit_a_b(duk_compiler_ctx *comp_ctx, duk_small_uint_t op_flags, duk_regconst_t a, duk_regconst_t b); +DUK_LOCAL_DECL void duk__emit_b_c(duk_compiler_ctx *comp_ctx, duk_small_uint_t op_flags, duk_regconst_t b, duk_regconst_t c); +#if 0 /* unused */ +DUK_LOCAL_DECL void duk__emit_a(duk_compiler_ctx *comp_ctx, duk_small_uint_t op_flags, duk_regconst_t a); +DUK_LOCAL_DECL void duk__emit_b(duk_compiler_ctx *comp_ctx, duk_small_uint_t op_flags, duk_regconst_t b); +#endif +DUK_LOCAL_DECL void duk__emit_a_bc(duk_compiler_ctx *comp_ctx, duk_small_uint_t op_flags, duk_regconst_t a, duk_regconst_t bc); +DUK_LOCAL_DECL void duk__emit_bc(duk_compiler_ctx *comp_ctx, duk_small_uint_t op, duk_regconst_t bc); +DUK_LOCAL_DECL void duk__emit_abc(duk_compiler_ctx *comp_ctx, duk_small_uint_t op, duk_regconst_t abc); +DUK_LOCAL_DECL void duk__emit_load_int32(duk_compiler_ctx *comp_ctx, duk_regconst_t reg, duk_int32_t val); +DUK_LOCAL_DECL void duk__emit_load_int32_noshuffle(duk_compiler_ctx *comp_ctx, duk_regconst_t reg, duk_int32_t val); +DUK_LOCAL_DECL void duk__emit_jump(duk_compiler_ctx *comp_ctx, duk_int_t target_pc); +DUK_LOCAL_DECL duk_int_t duk__emit_jump_empty(duk_compiler_ctx *comp_ctx); +DUK_LOCAL_DECL void duk__insert_jump_entry(duk_compiler_ctx *comp_ctx, duk_int_t jump_pc); +DUK_LOCAL_DECL void duk__patch_jump(duk_compiler_ctx *comp_ctx, duk_int_t jump_pc, duk_int_t target_pc); +DUK_LOCAL_DECL void duk__patch_jump_here(duk_compiler_ctx *comp_ctx, duk_int_t jump_pc); +DUK_LOCAL_DECL void duk__patch_trycatch(duk_compiler_ctx *comp_ctx, + duk_int_t ldconst_pc, + duk_int_t trycatch_pc, + duk_regconst_t reg_catch, + duk_regconst_t const_varname, + duk_small_uint_t flags); +DUK_LOCAL_DECL void duk__emit_if_false_skip(duk_compiler_ctx *comp_ctx, duk_regconst_t regconst); +DUK_LOCAL_DECL void duk__emit_if_true_skip(duk_compiler_ctx *comp_ctx, duk_regconst_t regconst); +DUK_LOCAL_DECL void duk__emit_invalid(duk_compiler_ctx *comp_ctx); + +/* ivalue/ispec helpers */ +DUK_LOCAL_DECL void duk__ivalue_regconst(duk_ivalue *x, duk_regconst_t regconst); +DUK_LOCAL_DECL void duk__ivalue_plain_fromstack(duk_compiler_ctx *comp_ctx, duk_ivalue *x); +DUK_LOCAL_DECL void duk__ivalue_var_fromstack(duk_compiler_ctx *comp_ctx, duk_ivalue *x); +DUK_LOCAL_DECL void duk__ivalue_var_hstring(duk_compiler_ctx *comp_ctx, duk_ivalue *x, duk_hstring *h); +DUK_LOCAL_DECL void duk__copy_ispec(duk_compiler_ctx *comp_ctx, duk_ispec *src, duk_ispec *dst); +DUK_LOCAL_DECL void duk__copy_ivalue(duk_compiler_ctx *comp_ctx, duk_ivalue *src, duk_ivalue *dst); +DUK_LOCAL_DECL duk_regconst_t duk__alloctemps(duk_compiler_ctx *comp_ctx, duk_small_int_t num); +DUK_LOCAL_DECL duk_regconst_t duk__alloctemp(duk_compiler_ctx *comp_ctx); +DUK_LOCAL_DECL void duk__settemp_checkmax(duk_compiler_ctx *comp_ctx, duk_regconst_t temp_next); +DUK_LOCAL_DECL duk_regconst_t duk__getconst(duk_compiler_ctx *comp_ctx); +DUK_LOCAL_DECL +duk_regconst_t duk__ispec_toregconst_raw(duk_compiler_ctx *comp_ctx, + duk_ispec *x, + duk_regconst_t forced_reg, + duk_small_uint_t flags); +DUK_LOCAL_DECL void duk__ispec_toforcedreg(duk_compiler_ctx *comp_ctx, duk_ispec *x, duk_regconst_t forced_reg); +DUK_LOCAL_DECL void duk__ivalue_toplain_raw(duk_compiler_ctx *comp_ctx, duk_ivalue *x, duk_regconst_t forced_reg); +DUK_LOCAL_DECL void duk__ivalue_toplain(duk_compiler_ctx *comp_ctx, duk_ivalue *x); +DUK_LOCAL_DECL void duk__ivalue_toplain_ignore(duk_compiler_ctx *comp_ctx, duk_ivalue *x); +DUK_LOCAL_DECL +duk_regconst_t duk__ivalue_toregconst_raw(duk_compiler_ctx *comp_ctx, + duk_ivalue *x, + duk_regconst_t forced_reg, + duk_small_uint_t flags); +DUK_LOCAL_DECL duk_regconst_t duk__ivalue_toreg(duk_compiler_ctx *comp_ctx, duk_ivalue *x); +#if 0 /* unused */ +DUK_LOCAL_DECL duk_regconst_t duk__ivalue_totemp(duk_compiler_ctx *comp_ctx, duk_ivalue *x); +#endif +DUK_LOCAL_DECL void duk__ivalue_toforcedreg(duk_compiler_ctx *comp_ctx, duk_ivalue *x, duk_int_t forced_reg); +DUK_LOCAL_DECL duk_regconst_t duk__ivalue_toregconst(duk_compiler_ctx *comp_ctx, duk_ivalue *x); +DUK_LOCAL_DECL duk_regconst_t duk__ivalue_totempconst(duk_compiler_ctx *comp_ctx, duk_ivalue *x); + +/* identifier handling */ +DUK_LOCAL_DECL duk_regconst_t duk__lookup_active_register_binding(duk_compiler_ctx *comp_ctx); +DUK_LOCAL_DECL duk_bool_t duk__lookup_lhs(duk_compiler_ctx *ctx, duk_regconst_t *out_reg_varbind, duk_regconst_t *out_rc_varname); + +/* label handling */ +DUK_LOCAL_DECL void duk__add_label(duk_compiler_ctx *comp_ctx, duk_hstring *h_label, duk_int_t pc_label, duk_int_t label_id); +DUK_LOCAL_DECL void duk__update_label_flags(duk_compiler_ctx *comp_ctx, duk_int_t label_id, duk_small_uint_t flags); +DUK_LOCAL_DECL void duk__lookup_active_label(duk_compiler_ctx *comp_ctx, + duk_hstring *h_label, + duk_bool_t is_break, + duk_int_t *out_label_id, + duk_int_t *out_label_catch_depth, + duk_int_t *out_label_pc, + duk_bool_t *out_is_closest); +DUK_LOCAL_DECL void duk__reset_labels_to_length(duk_compiler_ctx *comp_ctx, duk_size_t len); + +/* top-down expression parser */ +DUK_LOCAL_DECL void duk__expr_nud(duk_compiler_ctx *comp_ctx, duk_ivalue *res); +DUK_LOCAL_DECL void duk__expr_led(duk_compiler_ctx *comp_ctx, duk_ivalue *left, duk_ivalue *res); +DUK_LOCAL_DECL duk_small_uint_t duk__expr_lbp(duk_compiler_ctx *comp_ctx); +DUK_LOCAL_DECL duk_bool_t duk__expr_is_empty(duk_compiler_ctx *comp_ctx); + +/* exprtop is the top level variant which resets nud/led counts */ +DUK_LOCAL_DECL void duk__expr(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +DUK_LOCAL_DECL void duk__exprtop(duk_compiler_ctx *ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); + +/* convenience helpers */ +#if 0 /* unused */ +DUK_LOCAL_DECL duk_regconst_t duk__expr_toreg(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +#endif +#if 0 /* unused */ +DUK_LOCAL_DECL duk_regconst_t duk__expr_totemp(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +#endif +DUK_LOCAL_DECL void duk__expr_toforcedreg(duk_compiler_ctx *comp_ctx, + duk_ivalue *res, + duk_small_uint_t rbp_flags, + duk_regconst_t forced_reg); +DUK_LOCAL_DECL duk_regconst_t duk__expr_toregconst(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +#if 0 /* unused */ +DUK_LOCAL_DECL duk_regconst_t duk__expr_totempconst(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +#endif +DUK_LOCAL_DECL void duk__expr_toplain(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +DUK_LOCAL_DECL void duk__expr_toplain_ignore(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +DUK_LOCAL_DECL duk_regconst_t duk__exprtop_toreg(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +#if 0 /* unused */ +DUK_LOCAL_DECL duk_regconst_t duk__exprtop_totemp(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +#endif +DUK_LOCAL_DECL void duk__exprtop_toforcedreg(duk_compiler_ctx *comp_ctx, + duk_ivalue *res, + duk_small_uint_t rbp_flags, + duk_regconst_t forced_reg); +DUK_LOCAL_DECL duk_regconst_t duk__exprtop_toregconst(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +#if 0 /* unused */ +DUK_LOCAL_DECL void duk__exprtop_toplain_ignore(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags); +#endif + +/* expression parsing helpers */ +DUK_LOCAL_DECL duk_int_t duk__parse_arguments(duk_compiler_ctx *comp_ctx, duk_ivalue *res); +DUK_LOCAL_DECL void duk__nud_array_literal(duk_compiler_ctx *comp_ctx, duk_ivalue *res); +DUK_LOCAL_DECL void duk__nud_object_literal(duk_compiler_ctx *comp_ctx, duk_ivalue *res); + +/* statement parsing */ +DUK_LOCAL_DECL void duk__parse_var_decl(duk_compiler_ctx *comp_ctx, + duk_ivalue *res, + duk_small_uint_t expr_flags, + duk_regconst_t *out_reg_varbind, + duk_regconst_t *out_rc_varname); +DUK_LOCAL_DECL void duk__parse_var_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t expr_flags); +DUK_LOCAL_DECL void duk__parse_for_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_int_t pc_label_site); +DUK_LOCAL_DECL void duk__parse_switch_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_int_t pc_label_site); +DUK_LOCAL_DECL void duk__parse_if_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res); +DUK_LOCAL_DECL void duk__parse_do_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_int_t pc_label_site); +DUK_LOCAL_DECL void duk__parse_while_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_int_t pc_label_site); +DUK_LOCAL_DECL void duk__parse_break_or_continue_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res); +DUK_LOCAL_DECL void duk__parse_return_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res); +DUK_LOCAL_DECL void duk__parse_throw_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res); +DUK_LOCAL_DECL void duk__parse_try_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res); +DUK_LOCAL_DECL void duk__parse_with_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res); +DUK_LOCAL_DECL void duk__parse_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_bool_t allow_source_elem); +DUK_LOCAL_DECL duk_int_t duk__stmt_label_site(duk_compiler_ctx *comp_ctx, duk_int_t label_id); +DUK_LOCAL_DECL void duk__parse_stmts(duk_compiler_ctx *comp_ctx, + duk_bool_t allow_source_elem, + duk_bool_t expect_eof, + duk_bool_t regexp_after); + +DUK_LOCAL_DECL void duk__parse_func_body(duk_compiler_ctx *comp_ctx, + duk_bool_t expect_eof, + duk_bool_t implicit_return_value, + duk_bool_t regexp_after, + duk_small_int_t expect_token); +DUK_LOCAL_DECL void duk__parse_func_formals(duk_compiler_ctx *comp_ctx); +DUK_LOCAL_DECL void duk__parse_func_like_raw(duk_compiler_ctx *comp_ctx, duk_small_uint_t flags); +DUK_LOCAL_DECL duk_int_t duk__parse_func_like_fnum(duk_compiler_ctx *comp_ctx, duk_small_uint_t flags); + +#define DUK__FUNC_FLAG_DECL (1 << 0) /* Parsing a function declaration. */ +#define DUK__FUNC_FLAG_GETSET (1 << 1) /* Parsing an object literal getter/setter. */ +#define DUK__FUNC_FLAG_METDEF (1 << 2) /* Parsing an object literal method definition shorthand. */ +#define DUK__FUNC_FLAG_PUSHNAME_PASS1 (1 << 3) /* Push function name when creating template (first pass only). */ +#define DUK__FUNC_FLAG_USE_PREVTOKEN (1 << 4) /* Use prev_token to start function parsing (workaround for object literal). */ + +/* + * Parser control values for tokens. The token table is ordered by the + * DUK_TOK_XXX defines. + * + * The binding powers are for lbp() use (i.e. for use in led() context). + * Binding powers are positive for typing convenience, and bits at the + * top should be reserved for flags. Binding power step must be higher + * than 1 so that binding power "lbp - 1" can be used for right associative + * operators. Currently a step of 2 is used (which frees one more bit for + * flags). + */ + +/* XXX: actually single step levels would work just fine, clean up */ + +/* binding power "levels" (see doc/compiler.rst) */ +#define DUK__BP_INVALID 0 /* always terminates led() */ +#define DUK__BP_EOF 2 +#define DUK__BP_CLOSING 4 /* token closes expression, e.g. ')', ']' */ +#define DUK__BP_FOR_EXPR DUK__BP_CLOSING /* bp to use when parsing a top level Expression */ +#define DUK__BP_COMMA 6 +#define DUK__BP_ASSIGNMENT 8 +#define DUK__BP_CONDITIONAL 10 +#define DUK__BP_LOR 12 +#define DUK__BP_LAND 14 +#define DUK__BP_BOR 16 +#define DUK__BP_BXOR 18 +#define DUK__BP_BAND 20 +#define DUK__BP_EQUALITY 22 +#define DUK__BP_RELATIONAL 24 +#define DUK__BP_SHIFT 26 +#define DUK__BP_ADDITIVE 28 +#define DUK__BP_MULTIPLICATIVE 30 +#define DUK__BP_EXPONENTIATION 32 +#define DUK__BP_POSTFIX 34 +#define DUK__BP_CALL 36 +#define DUK__BP_MEMBER 38 + +#define DUK__TOKEN_LBP_BP_MASK 0x1f +#define DUK__TOKEN_LBP_FLAG_NO_REGEXP (1 << 5) /* regexp literal must not follow this token */ +#define DUK__TOKEN_LBP_FLAG_TERMINATES (1 << 6) /* terminates expression; e.g. post-increment/-decrement */ +#define DUK__TOKEN_LBP_FLAG_UNUSED (1 << 7) /* unused */ + +#define DUK__TOKEN_LBP_GET_BP(x) ((duk_small_uint_t) (((x) &DUK__TOKEN_LBP_BP_MASK) * 2)) + +#define DUK__MK_LBP(bp) ((bp) >> 1) /* bp is assumed to be even */ +#define DUK__MK_LBP_FLAGS(bp, flags) (((bp) >> 1) | (flags)) + +DUK_LOCAL const duk_uint8_t duk__token_lbp[] = { + DUK__MK_LBP(DUK__BP_EOF), /* DUK_TOK_EOF */ + DUK__MK_LBP_FLAGS(DUK__BP_INVALID, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_IDENTIFIER */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_BREAK */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_CASE */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_CATCH */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_CONTINUE */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_DEBUGGER */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_DEFAULT */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_DELETE */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_DO */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_ELSE */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_FINALLY */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_FOR */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_FUNCTION */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_IF */ + DUK__MK_LBP(DUK__BP_RELATIONAL), /* DUK_TOK_IN */ + DUK__MK_LBP(DUK__BP_RELATIONAL), /* DUK_TOK_INSTANCEOF */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_NEW */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_RETURN */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_SWITCH */ + DUK__MK_LBP_FLAGS(DUK__BP_INVALID, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_THIS */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_THROW */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_TRY */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_TYPEOF */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_VAR */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_CONST */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_VOID */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_WHILE */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_WITH */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_CLASS */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_ENUM */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_EXPORT */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_EXTENDS */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_IMPORT */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_SUPER */ + DUK__MK_LBP_FLAGS(DUK__BP_INVALID, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_NULL */ + DUK__MK_LBP_FLAGS(DUK__BP_INVALID, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_TRUE */ + DUK__MK_LBP_FLAGS(DUK__BP_INVALID, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_FALSE */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_GET */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_SET */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_IMPLEMENTS */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_INTERFACE */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_LET */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_PACKAGE */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_PRIVATE */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_PROTECTED */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_PUBLIC */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_STATIC */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_YIELD */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_LCURLY */ + DUK__MK_LBP_FLAGS(DUK__BP_INVALID, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_RCURLY */ + DUK__MK_LBP(DUK__BP_MEMBER), /* DUK_TOK_LBRACKET */ + DUK__MK_LBP_FLAGS(DUK__BP_CLOSING, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_RBRACKET */ + DUK__MK_LBP(DUK__BP_CALL), /* DUK_TOK_LPAREN */ + DUK__MK_LBP_FLAGS(DUK__BP_CLOSING, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_RPAREN */ + DUK__MK_LBP(DUK__BP_MEMBER), /* DUK_TOK_PERIOD */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_SEMICOLON */ + DUK__MK_LBP(DUK__BP_COMMA), /* DUK_TOK_COMMA */ + DUK__MK_LBP(DUK__BP_RELATIONAL), /* DUK_TOK_LT */ + DUK__MK_LBP(DUK__BP_RELATIONAL), /* DUK_TOK_GT */ + DUK__MK_LBP(DUK__BP_RELATIONAL), /* DUK_TOK_LE */ + DUK__MK_LBP(DUK__BP_RELATIONAL), /* DUK_TOK_GE */ + DUK__MK_LBP(DUK__BP_EQUALITY), /* DUK_TOK_EQ */ + DUK__MK_LBP(DUK__BP_EQUALITY), /* DUK_TOK_NEQ */ + DUK__MK_LBP(DUK__BP_EQUALITY), /* DUK_TOK_SEQ */ + DUK__MK_LBP(DUK__BP_EQUALITY), /* DUK_TOK_SNEQ */ + DUK__MK_LBP(DUK__BP_ADDITIVE), /* DUK_TOK_ADD */ + DUK__MK_LBP(DUK__BP_ADDITIVE), /* DUK_TOK_SUB */ + DUK__MK_LBP(DUK__BP_MULTIPLICATIVE), /* DUK_TOK_MUL */ + DUK__MK_LBP(DUK__BP_MULTIPLICATIVE), /* DUK_TOK_DIV */ + DUK__MK_LBP(DUK__BP_MULTIPLICATIVE), /* DUK_TOK_MOD */ + DUK__MK_LBP(DUK__BP_EXPONENTIATION), /* DUK_TOK_EXP */ + DUK__MK_LBP_FLAGS(DUK__BP_POSTFIX, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_INCREMENT */ + DUK__MK_LBP_FLAGS(DUK__BP_POSTFIX, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_DECREMENT */ + DUK__MK_LBP(DUK__BP_SHIFT), /* DUK_TOK_ALSHIFT */ + DUK__MK_LBP(DUK__BP_SHIFT), /* DUK_TOK_ARSHIFT */ + DUK__MK_LBP(DUK__BP_SHIFT), /* DUK_TOK_RSHIFT */ + DUK__MK_LBP(DUK__BP_BAND), /* DUK_TOK_BAND */ + DUK__MK_LBP(DUK__BP_BOR), /* DUK_TOK_BOR */ + DUK__MK_LBP(DUK__BP_BXOR), /* DUK_TOK_BXOR */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_LNOT */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_BNOT */ + DUK__MK_LBP(DUK__BP_LAND), /* DUK_TOK_LAND */ + DUK__MK_LBP(DUK__BP_LOR), /* DUK_TOK_LOR */ + DUK__MK_LBP(DUK__BP_CONDITIONAL), /* DUK_TOK_QUESTION */ + DUK__MK_LBP(DUK__BP_INVALID), /* DUK_TOK_COLON */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_EQUALSIGN */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_ADD_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_SUB_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_MUL_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_DIV_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_MOD_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_EXP_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_ALSHIFT_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_ARSHIFT_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_RSHIFT_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_BAND_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_BOR_EQ */ + DUK__MK_LBP(DUK__BP_ASSIGNMENT), /* DUK_TOK_BXOR_EQ */ + DUK__MK_LBP_FLAGS(DUK__BP_INVALID, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_NUMBER */ + DUK__MK_LBP_FLAGS(DUK__BP_INVALID, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_STRING */ + DUK__MK_LBP_FLAGS(DUK__BP_INVALID, DUK__TOKEN_LBP_FLAG_NO_REGEXP), /* DUK_TOK_REGEXP */ +}; + +/* + * Misc helpers + */ + +DUK_LOCAL void duk__comp_recursion_increase(duk_compiler_ctx *comp_ctx) { + DUK_ASSERT(comp_ctx != NULL); + DUK_ASSERT(comp_ctx->recursion_depth >= 0); + if (comp_ctx->recursion_depth >= comp_ctx->recursion_limit) { + DUK_ERROR_RANGE(comp_ctx->thr, DUK_STR_COMPILER_RECURSION_LIMIT); + DUK_WO_NORETURN(return;); + } + comp_ctx->recursion_depth++; +} + +DUK_LOCAL void duk__comp_recursion_decrease(duk_compiler_ctx *comp_ctx) { + DUK_ASSERT(comp_ctx != NULL); + DUK_ASSERT(comp_ctx->recursion_depth > 0); + comp_ctx->recursion_depth--; +} + +DUK_LOCAL duk_bool_t duk__hstring_is_eval_or_arguments(duk_compiler_ctx *comp_ctx, duk_hstring *h) { + DUK_UNREF(comp_ctx); + DUK_ASSERT(h != NULL); + return DUK_HSTRING_HAS_EVAL_OR_ARGUMENTS(h); +} + +DUK_LOCAL duk_bool_t duk__hstring_is_eval_or_arguments_in_strict_mode(duk_compiler_ctx *comp_ctx, duk_hstring *h) { + DUK_ASSERT(h != NULL); + return (comp_ctx->curr_func.is_strict && DUK_HSTRING_HAS_EVAL_OR_ARGUMENTS(h)); +} + +/* + * Parser duk__advance() token eating functions + */ + +/* XXX: valstack handling is awkward. Add a valstack helper which + * avoids dup():ing; valstack_copy(src, dst)? + */ + +DUK_LOCAL void duk__advance_helper(duk_compiler_ctx *comp_ctx, duk_small_int_t expect) { + duk_hthread *thr = comp_ctx->thr; + duk_bool_t regexp; + + DUK_ASSERT_DISABLE(comp_ctx->curr_token.t >= 0); /* unsigned */ + DUK_ASSERT(comp_ctx->curr_token.t <= DUK_TOK_MAXVAL); /* MAXVAL is inclusive */ + + /* + * Use current token to decide whether a RegExp can follow. + * + * We can use either 't' or 't_nores'; the latter would not + * recognize keywords. Some keywords can be followed by a + * RegExp (e.g. "return"), so using 't' is better. This is + * not trivial, see doc/compiler.rst. + */ + + regexp = 1; + if (duk__token_lbp[comp_ctx->curr_token.t] & DUK__TOKEN_LBP_FLAG_NO_REGEXP) { + regexp = 0; + } + if (comp_ctx->curr_func.reject_regexp_in_adv) { + comp_ctx->curr_func.reject_regexp_in_adv = 0; + regexp = 0; + } + if (comp_ctx->curr_func.allow_regexp_in_adv) { + comp_ctx->curr_func.allow_regexp_in_adv = 0; + regexp = 1; + } + + if (expect >= 0 && comp_ctx->curr_token.t != (duk_small_uint_t) expect) { + DUK_D(DUK_DPRINT("parse error: expect=%ld, got=%ld", (long) expect, (long) comp_ctx->curr_token.t)); + DUK_ERROR_SYNTAX(thr, DUK_STR_PARSE_ERROR); + DUK_WO_NORETURN(return;); + } + + /* make current token the previous; need to fiddle with valstack "backing store" */ + duk_memcpy(&comp_ctx->prev_token, &comp_ctx->curr_token, sizeof(duk_token)); + duk_copy(thr, comp_ctx->tok11_idx, comp_ctx->tok21_idx); + duk_copy(thr, comp_ctx->tok12_idx, comp_ctx->tok22_idx); + + /* parse new token */ + duk_lexer_parse_js_input_element(&comp_ctx->lex, &comp_ctx->curr_token, comp_ctx->curr_func.is_strict, regexp); + + DUK_DDD(DUK_DDDPRINT("advance: curr: tok=%ld/%ld,%ld,term=%ld,%!T,%!T " + "prev: tok=%ld/%ld,%ld,term=%ld,%!T,%!T", + (long) comp_ctx->curr_token.t, + (long) comp_ctx->curr_token.t_nores, + (long) comp_ctx->curr_token.start_line, + (long) comp_ctx->curr_token.lineterm, + (duk_tval *) duk_get_tval(thr, comp_ctx->tok11_idx), + (duk_tval *) duk_get_tval(thr, comp_ctx->tok12_idx), + (long) comp_ctx->prev_token.t, + (long) comp_ctx->prev_token.t_nores, + (long) comp_ctx->prev_token.start_line, + (long) comp_ctx->prev_token.lineterm, + (duk_tval *) duk_get_tval(thr, comp_ctx->tok21_idx), + (duk_tval *) duk_get_tval(thr, comp_ctx->tok22_idx))); +} + +/* advance, expecting current token to be a specific token; parse next token in regexp context */ +DUK_LOCAL void duk__advance_expect(duk_compiler_ctx *comp_ctx, duk_small_int_t expect) { + duk__advance_helper(comp_ctx, expect); +} + +/* advance, whatever the current token is; parse next token in regexp context */ +DUK_LOCAL void duk__advance(duk_compiler_ctx *comp_ctx) { + duk__advance_helper(comp_ctx, -1); +} + +/* + * Helpers for duk_compiler_func. + */ + +/* init function state: inits valstack allocations */ +DUK_LOCAL void duk__init_func_valstack_slots(duk_compiler_ctx *comp_ctx) { + duk_compiler_func *func = &comp_ctx->curr_func; + duk_hthread *thr = comp_ctx->thr; + duk_idx_t entry_top; + + entry_top = duk_get_top(thr); + + duk_memzero(func, sizeof(*func)); /* intentional overlap with earlier memzero */ +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + func->h_name = NULL; + func->h_consts = NULL; + func->h_funcs = NULL; + func->h_decls = NULL; + func->h_labelnames = NULL; + func->h_labelinfos = NULL; + func->h_argnames = NULL; + func->h_varmap = NULL; +#endif + + duk_require_stack(thr, DUK__FUNCTION_INIT_REQUIRE_SLOTS); + + DUK_BW_INIT_PUSHBUF(thr, &func->bw_code, DUK__BC_INITIAL_INSTS * sizeof(duk_compiler_instr)); + /* code_idx = entry_top + 0 */ + + duk_push_bare_array(thr); + func->consts_idx = entry_top + 1; + func->h_consts = DUK_GET_HOBJECT_POSIDX(thr, entry_top + 1); + DUK_ASSERT(func->h_consts != NULL); + + duk_push_bare_array(thr); + func->funcs_idx = entry_top + 2; + func->h_funcs = DUK_GET_HOBJECT_POSIDX(thr, entry_top + 2); + DUK_ASSERT(func->h_funcs != NULL); + DUK_ASSERT(func->fnum_next == 0); + + duk_push_bare_array(thr); + func->decls_idx = entry_top + 3; + func->h_decls = DUK_GET_HOBJECT_POSIDX(thr, entry_top + 3); + DUK_ASSERT(func->h_decls != NULL); + + duk_push_bare_array(thr); + func->labelnames_idx = entry_top + 4; + func->h_labelnames = DUK_GET_HOBJECT_POSIDX(thr, entry_top + 4); + DUK_ASSERT(func->h_labelnames != NULL); + + duk_push_dynamic_buffer(thr, 0); + func->labelinfos_idx = entry_top + 5; + func->h_labelinfos = (duk_hbuffer_dynamic *) duk_known_hbuffer(thr, entry_top + 5); + DUK_ASSERT(func->h_labelinfos != NULL); + DUK_ASSERT(DUK_HBUFFER_HAS_DYNAMIC(func->h_labelinfos) && !DUK_HBUFFER_HAS_EXTERNAL(func->h_labelinfos)); + + duk_push_bare_array(thr); + func->argnames_idx = entry_top + 6; + func->h_argnames = DUK_GET_HOBJECT_POSIDX(thr, entry_top + 6); + DUK_ASSERT(func->h_argnames != NULL); + + duk_push_bare_object(thr); + func->varmap_idx = entry_top + 7; + func->h_varmap = DUK_GET_HOBJECT_POSIDX(thr, entry_top + 7); + DUK_ASSERT(func->h_varmap != NULL); +} + +/* reset function state (prepare for pass 2) */ +DUK_LOCAL void duk__reset_func_for_pass2(duk_compiler_ctx *comp_ctx) { + duk_compiler_func *func = &comp_ctx->curr_func; + duk_hthread *thr = comp_ctx->thr; + + /* reset bytecode buffer but keep current size; pass 2 will + * require same amount or more. + */ + DUK_BW_RESET_SIZE(thr, &func->bw_code); + + duk_set_length(thr, func->consts_idx, 0); + /* keep func->h_funcs; inner functions are not reparsed to avoid O(depth^2) parsing */ + func->fnum_next = 0; + /* duk_set_length(thr, func->funcs_idx, 0); */ + duk_set_length(thr, func->labelnames_idx, 0); + duk_hbuffer_reset(thr, func->h_labelinfos); + /* keep func->h_argnames; it is fixed for all passes */ + + /* truncated in case pass 3 needed */ + duk_push_bare_object(thr); + duk_replace(thr, func->varmap_idx); + func->h_varmap = DUK_GET_HOBJECT_POSIDX(thr, func->varmap_idx); + DUK_ASSERT(func->h_varmap != NULL); +} + +/* cleanup varmap from any null entries, compact it, etc; returns number + * of final entries after cleanup. + */ +DUK_LOCAL duk_int_t duk__cleanup_varmap(duk_compiler_ctx *comp_ctx) { + duk_hthread *thr = comp_ctx->thr; + duk_hobject *h_varmap; + duk_hstring *h_key; + duk_tval *tv; + duk_uint32_t i, e_next; + duk_int_t ret; + + /* [ ... varmap ] */ + + h_varmap = DUK_GET_HOBJECT_NEGIDX(thr, -1); + DUK_ASSERT(h_varmap != NULL); + + ret = 0; + e_next = DUK_HOBJECT_GET_ENEXT(h_varmap); + for (i = 0; i < e_next; i++) { + h_key = DUK_HOBJECT_E_GET_KEY(thr->heap, h_varmap, i); + if (!h_key) { + continue; + } + + DUK_ASSERT(!DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, h_varmap, i)); + + /* The entries can either be register numbers or 'null' values. + * Thus, no need to DECREF them and get side effects. DECREF'ing + * the keys (strings) can cause memory to be freed but no side + * effects as strings don't have finalizers. This is why we can + * rely on the object properties not changing from underneath us. + */ + + tv = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, h_varmap, i); + if (!DUK_TVAL_IS_NUMBER(tv)) { + DUK_ASSERT(!DUK_TVAL_IS_HEAP_ALLOCATED(tv)); + DUK_HOBJECT_E_SET_KEY(thr->heap, h_varmap, i, NULL); + DUK_HSTRING_DECREF(thr, h_key); + /* when key is NULL, value is garbage so no need to set */ + } else { + ret++; + } + } + + duk_compact_m1(thr); + + return ret; +} + +/* Convert duk_compiler_func into a function template, leaving the result + * on top of stack. + */ +/* XXX: awkward and bloated asm -- use faster internal accesses */ +DUK_LOCAL void duk__convert_to_func_template(duk_compiler_ctx *comp_ctx) { + duk_compiler_func *func = &comp_ctx->curr_func; + duk_hthread *thr = comp_ctx->thr; + duk_hcompfunc *h_res; + duk_hbuffer_fixed *h_data; + duk_size_t consts_count; + duk_size_t funcs_count; + duk_size_t code_count; + duk_size_t code_size; + duk_size_t data_size; + duk_size_t i; + duk_tval *p_const; + duk_hobject **p_func; + duk_instr_t *p_instr; + duk_compiler_instr *q_instr; + duk_tval *tv; + duk_bool_t keep_varmap; + duk_bool_t keep_formals; +#if !defined(DUK_USE_DEBUGGER_SUPPORT) + duk_size_t formals_length; +#endif + + DUK_DDD(DUK_DDDPRINT("converting duk_compiler_func to function/template")); + + /* + * Push result object and init its flags + */ + + /* Valstack should suffice here, required on function valstack init */ + + h_res = duk_push_hcompfunc(thr); + DUK_ASSERT(h_res != NULL); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) h_res) == thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]); + DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, (duk_hobject *) h_res, NULL); /* Function templates are "bare objects". */ + + if (func->is_function) { + DUK_DDD(DUK_DDDPRINT("function -> set NEWENV")); + DUK_HOBJECT_SET_NEWENV((duk_hobject *) h_res); + + if (!func->is_arguments_shadowed) { + /* arguments object would be accessible; note that shadowing + * bindings are arguments or function declarations, neither + * of which are deletable, so this is safe. + */ + + if (func->id_access_arguments || func->may_direct_eval) { + DUK_DDD(DUK_DDDPRINT("function may access 'arguments' object directly or " + "indirectly -> set CREATEARGS")); + DUK_HOBJECT_SET_CREATEARGS((duk_hobject *) h_res); + } + } + } else if (func->is_eval && func->is_strict) { + DUK_DDD(DUK_DDDPRINT("strict eval code -> set NEWENV")); + DUK_HOBJECT_SET_NEWENV((duk_hobject *) h_res); + } else { + /* non-strict eval: env is caller's env or global env (direct vs. indirect call) + * global code: env is is global env + */ + DUK_DDD(DUK_DDDPRINT("non-strict eval code or global code -> no NEWENV")); + DUK_ASSERT(!DUK_HOBJECT_HAS_NEWENV((duk_hobject *) h_res)); + } + +#if defined(DUK_USE_FUNC_NAME_PROPERTY) + if (func->is_function && func->is_namebinding && func->h_name != NULL) { + /* Object literal set/get functions have a name (property + * name) but must not have a lexical name binding, see + * test-bug-getset-func-name.js. + */ + DUK_DDD(DUK_DDDPRINT("function expression with a name -> set NAMEBINDING")); + DUK_HOBJECT_SET_NAMEBINDING((duk_hobject *) h_res); + } +#endif + + if (func->is_strict) { + DUK_DDD(DUK_DDDPRINT("function is strict -> set STRICT")); + DUK_HOBJECT_SET_STRICT((duk_hobject *) h_res); + } + + if (func->is_notail) { + DUK_DDD(DUK_DDDPRINT("function is notail -> set NOTAIL")); + DUK_HOBJECT_SET_NOTAIL((duk_hobject *) h_res); + } + + if (func->is_constructable) { + DUK_DDD(DUK_DDDPRINT("function is constructable -> set CONSTRUCTABLE")); + DUK_HOBJECT_SET_CONSTRUCTABLE((duk_hobject *) h_res); + } + + /* + * Build function fixed size 'data' buffer, which contains bytecode, + * constants, and inner function references. + * + * During the building phase 'data' is reachable but incomplete. + * Only incref's occur during building (no refzero or GC happens), + * so the building process is atomic. + */ + + consts_count = duk_hobject_get_length(thr, func->h_consts); + funcs_count = duk_hobject_get_length(thr, func->h_funcs) / 3; + code_count = DUK_BW_GET_SIZE(thr, &func->bw_code) / sizeof(duk_compiler_instr); + code_size = code_count * sizeof(duk_instr_t); + + data_size = consts_count * sizeof(duk_tval) + funcs_count * sizeof(duk_hobject *) + code_size; + + DUK_DDD(DUK_DDDPRINT("consts_count=%ld, funcs_count=%ld, code_size=%ld -> " + "data_size=%ld*%ld + %ld*%ld + %ld = %ld", + (long) consts_count, + (long) funcs_count, + (long) code_size, + (long) consts_count, + (long) sizeof(duk_tval), + (long) funcs_count, + (long) sizeof(duk_hobject *), + (long) code_size, + (long) data_size)); + + duk_push_fixed_buffer_nozero(thr, data_size); + h_data = (duk_hbuffer_fixed *) (void *) duk_known_hbuffer(thr, -1); + + DUK_HCOMPFUNC_SET_DATA(thr->heap, h_res, (duk_hbuffer *) h_data); + DUK_HEAPHDR_INCREF(thr, h_data); + + p_const = (duk_tval *) (void *) DUK_HBUFFER_FIXED_GET_DATA_PTR(thr->heap, h_data); + for (i = 0; i < consts_count; i++) { + DUK_ASSERT(i <= DUK_UARRIDX_MAX); /* const limits */ + tv = duk_hobject_find_array_entry_tval_ptr(thr->heap, func->h_consts, (duk_uarridx_t) i); + DUK_ASSERT(tv != NULL); + DUK_TVAL_SET_TVAL(p_const, tv); + p_const++; + DUK_TVAL_INCREF(thr, tv); /* may be a string constant */ + + DUK_DDD(DUK_DDDPRINT("constant: %!T", (duk_tval *) tv)); + } + + p_func = (duk_hobject **) p_const; + DUK_HCOMPFUNC_SET_FUNCS(thr->heap, h_res, p_func); + for (i = 0; i < funcs_count; i++) { + duk_hobject *h; + DUK_ASSERT(i * 3 <= DUK_UARRIDX_MAX); /* func limits */ + tv = duk_hobject_find_array_entry_tval_ptr(thr->heap, func->h_funcs, (duk_uarridx_t) (i * 3)); + DUK_ASSERT(tv != NULL); + DUK_ASSERT(DUK_TVAL_IS_OBJECT(tv)); + h = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(h)); + *p_func++ = h; + DUK_HOBJECT_INCREF(thr, h); + + DUK_DDD(DUK_DDDPRINT("inner function: %p -> %!iO", (void *) h, (duk_heaphdr *) h)); + } + + p_instr = (duk_instr_t *) p_func; + DUK_HCOMPFUNC_SET_BYTECODE(thr->heap, h_res, p_instr); + + /* copy bytecode instructions one at a time */ + q_instr = (duk_compiler_instr *) (void *) DUK_BW_GET_BASEPTR(thr, &func->bw_code); + for (i = 0; i < code_count; i++) { + p_instr[i] = q_instr[i].ins; + } + /* Note: 'q_instr' is still used below */ + + DUK_ASSERT((duk_uint8_t *) (p_instr + code_count) == DUK_HBUFFER_FIXED_GET_DATA_PTR(thr->heap, h_data) + data_size); + + duk_pop(thr); /* 'data' (and everything in it) is reachable through h_res now */ + + /* + * Init non-property result fields + * + * 'nregs' controls how large a register frame is allocated. + * + * 'nargs' controls how many formal arguments are written to registers: + * r0, ... r(nargs-1). The remaining registers are initialized to + * undefined. + */ + + DUK_ASSERT(func->temp_max >= 0); + h_res->nregs = (duk_uint16_t) func->temp_max; + h_res->nargs = (duk_uint16_t) duk_hobject_get_length(thr, func->h_argnames); + DUK_ASSERT(h_res->nregs >= h_res->nargs); /* pass2 allocation handles this */ +#if defined(DUK_USE_DEBUGGER_SUPPORT) + h_res->start_line = (duk_uint32_t) func->min_line; + h_res->end_line = (duk_uint32_t) func->max_line; +#endif + + /* + * Init object properties + * + * Properties should be added in decreasing order of access frequency. + * (Not very critical for function templates.) + */ + + DUK_DDD(DUK_DDDPRINT("init function properties")); + + /* [ ... res ] */ + + /* _Varmap: omitted if function is guaranteed not to do a slow path + * identifier access that might be caught by locally declared variables. + * The varmap can also be omitted if it turns out empty of actual + * register mappings after a cleanup. When debugging is enabled, we + * always need the varmap to be able to lookup variables at any point. + */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + DUK_DD(DUK_DDPRINT("keeping _Varmap because debugger support is enabled")); + keep_varmap = 1; +#else + if (func->id_access_slow_own || /* directly uses slow accesses that may match own variables */ + func->id_access_arguments || /* accesses 'arguments' directly */ + func->may_direct_eval || /* may indirectly slow access through a direct eval */ + funcs_count > + 0) { /* has inner functions which may slow access (XXX: this can be optimized by looking at the inner functions) */ + DUK_DD(DUK_DDPRINT("keeping _Varmap because of direct eval, slow path access that may match local variables, or " + "presence of inner functions")); + keep_varmap = 1; + } else { + DUK_DD(DUK_DDPRINT("dropping _Varmap")); + keep_varmap = 0; + } +#endif + + if (keep_varmap) { + duk_int_t num_used; + duk_dup(thr, func->varmap_idx); + num_used = duk__cleanup_varmap(comp_ctx); + DUK_DDD(DUK_DDDPRINT("cleaned up varmap: %!T (num_used=%ld)", (duk_tval *) duk_get_tval(thr, -1), (long) num_used)); + + if (num_used > 0) { + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_VARMAP, DUK_PROPDESC_FLAGS_NONE); + } else { + DUK_DD(DUK_DDPRINT("varmap is empty after cleanup -> no need to add")); + duk_pop(thr); + } + } + + /* _Formals: omitted if function is guaranteed not to need a (non-strict) + * arguments object, and _Formals.length matches nargs exactly. + * + * Non-arrow functions can't see an outer function's 'argument' binding + * (because they have their own), but arrow functions can. When arrow + * functions are added, this condition would need to be added: + * inner_arrow_funcs_count > 0 inner arrow functions may access 'arguments' + */ +#if defined(DUK_USE_DEBUGGER_SUPPORT) + DUK_DD(DUK_DDPRINT("keeping _Formals because debugger support is enabled")); + keep_formals = 1; +#else + formals_length = duk_get_length(thr, func->argnames_idx); + if (formals_length != (duk_size_t) h_res->nargs) { + /* Nargs not enough for closure .length: keep _Formals regardless + * of its length. Shouldn't happen in practice at the moment. + */ + DUK_DD(DUK_DDPRINT("keeping _Formals because _Formals.length != nargs")); + keep_formals = 1; + } else if ((func->id_access_arguments || func->may_direct_eval) && (formals_length > 0)) { + /* Direct eval (may access 'arguments') or accesses 'arguments' + * explicitly: keep _Formals unless it is zero length. + */ + DUK_DD(DUK_DDPRINT( + "keeping _Formals because of direct eval or explicit access to 'arguments', and _Formals.length != 0")); + keep_formals = 1; + } else { + DUK_DD(DUK_DDPRINT("omitting _Formals, nargs matches _Formals.length, so no properties added")); + keep_formals = 0; + } +#endif + + if (keep_formals) { + duk_dup(thr, func->argnames_idx); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_FORMALS, DUK_PROPDESC_FLAGS_NONE); + } + + /* name */ +#if defined(DUK_USE_FUNC_NAME_PROPERTY) + if (func->h_name) { + duk_push_hstring(thr, func->h_name); + DUK_DD(DUK_DDPRINT("setting function template .name to %!T", duk_get_tval(thr, -1))); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_NAME, DUK_PROPDESC_FLAGS_NONE); + } +#endif /* DUK_USE_FUNC_NAME_PROPERTY */ + + /* _Source */ +#if defined(DUK_USE_NONSTD_FUNC_SOURCE_PROPERTY) + if (0) { + /* XXX: Currently function source code is not stored, as it is not + * required by the standard. Source code should not be stored by + * default (user should enable it explicitly), and the source should + * probably be compressed with a trivial text compressor; average + * compression of 20-30% is quite easy to achieve even with a trivial + * compressor (RLE + backwards lookup). + * + * Debugging needs source code to be useful: sometimes input code is + * not found in files as it may be generated and then eval()'d, given + * by dynamic C code, etc. + * + * Other issues: + * + * - Need tokenizer indices for start and end to substring + * - Always normalize function declaration part? + * - If we keep _Formals, only need to store body + */ + + /* + * For global or eval code this is straightforward. For functions + * created with the Function constructor we only get the source for + * the body and must manufacture the "function ..." part. + * + * For instance, for constructed functions (v8): + * + * > a = new Function("foo", "bar", "print(foo)"); + * [Function] + * > a.toString() + * 'function anonymous(foo,bar) {\nprint(foo)\n}' + * + * Similarly for e.g. getters (v8): + * + * > x = { get a(foo,bar) { print(foo); } } + * { a: [Getter] } + * > Object.getOwnPropertyDescriptor(x, 'a').get.toString() + * 'function a(foo,bar) { print(foo); }' + */ + +#if 0 + duk_push_literal(thr, "XXX"); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_SOURCE, DUK_PROPDESC_FLAGS_NONE); +#endif + } +#endif /* DUK_USE_NONSTD_FUNC_SOURCE_PROPERTY */ + + /* _Pc2line */ +#if defined(DUK_USE_PC2LINE) + if (1) { + /* + * Size-optimized pc->line mapping. + */ + + DUK_ASSERT(code_count <= DUK_COMPILER_MAX_BYTECODE_LENGTH); + duk_hobject_pc2line_pack(thr, q_instr, (duk_uint_fast32_t) code_count); /* -> pushes fixed buffer */ + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_PC2LINE, DUK_PROPDESC_FLAGS_NONE); + + /* XXX: if assertions enabled, walk through all valid PCs + * and check line mapping. + */ + } +#endif /* DUK_USE_PC2LINE */ + + /* fileName */ +#if defined(DUK_USE_FUNC_FILENAME_PROPERTY) + if (comp_ctx->h_filename) { + /* + * Source filename (or equivalent), for identifying thrown errors. + */ + + duk_push_hstring(thr, comp_ctx->h_filename); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_FILE_NAME, DUK_PROPDESC_FLAGS_NONE); + } +#endif + + DUK_DD(DUK_DDPRINT("converted function: %!ixT", (duk_tval *) duk_get_tval(thr, -1))); + + /* + * Compact the function template. + */ + + duk_compact_m1(thr); + + /* + * Debug dumping + */ + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) + { + duk_hcompfunc *h; + duk_instr_t *p, *p_start, *p_end; + + h = (duk_hcompfunc *) duk_get_hobject(thr, -1); + p_start = (duk_instr_t *) DUK_HCOMPFUNC_GET_CODE_BASE(thr->heap, h); + p_end = (duk_instr_t *) DUK_HCOMPFUNC_GET_CODE_END(thr->heap, h); + + p = p_start; + while (p < p_end) { + DUK_DDD(DUK_DDDPRINT("BC %04ld: %!I ; 0x%08lx op=%ld (%!X) a=%ld b=%ld c=%ld", + (long) (p - p_start), + (duk_instr_t) (*p), + (unsigned long) (*p), + (long) DUK_DEC_OP(*p), + (long) DUK_DEC_OP(*p), + (long) DUK_DEC_A(*p), + (long) DUK_DEC_B(*p), + (long) DUK_DEC_C(*p))); + p++; + } + } +#endif +} + +/* + * Code emission helpers + * + * Some emission helpers understand the range of target and source reg/const + * values and automatically emit shuffling code if necessary. This is the + * case when the slot in question (A, B, C) is used in the standard way and + * for opcodes the emission helpers explicitly understand (like DUK_OP_MPUTOBJ). + * + * The standard way is that: + * - slot A is a target register + * - slot B is a source register/constant + * - slot C is a source register/constant + * + * If a slot is used in a non-standard way the caller must indicate this + * somehow. If a slot is used as a target instead of a source (or vice + * versa), this can be indicated with a flag to trigger proper shuffling + * (e.g. DUK__EMIT_FLAG_B_IS_TARGET). If the value in the slot is not + * register/const related at all, the caller must ensure that the raw value + * fits into the corresponding slot so as to not trigger shuffling. The + * caller must set a "no shuffle" flag to ensure compilation fails if + * shuffling were to be triggered because of an internal error. + * + * For slots B and C the raw slot size is 9 bits but one bit is reserved for + * the reg/const indicator. To use the full 9-bit range for a raw value, + * shuffling must be disabled with the DUK__EMIT_FLAG_NO_SHUFFLE_{B,C} flag. + * Shuffling is only done for A, B, and C slots, not the larger BC or ABC slots. + * + * There is call handling specific understanding in the A-B-C emitter to + * convert call setup and call instructions into indirect ones if necessary. + */ + +/* Code emission flags, passed in the 'opcode' field. Opcode + flags + * fit into 16 bits for now, so use duk_small_uint_t. + */ +#define DUK__EMIT_FLAG_NO_SHUFFLE_A (1 << 8) +#define DUK__EMIT_FLAG_NO_SHUFFLE_B (1 << 9) +#define DUK__EMIT_FLAG_NO_SHUFFLE_C (1 << 10) +#define DUK__EMIT_FLAG_A_IS_SOURCE (1 << 11) /* slot A is a source (default: target) */ +#define DUK__EMIT_FLAG_B_IS_TARGET (1 << 12) /* slot B is a target (default: source) */ +#define DUK__EMIT_FLAG_C_IS_TARGET (1 << 13) /* slot C is a target (default: source) */ +#define DUK__EMIT_FLAG_BC_REGCONST (1 << 14) /* slots B and C are reg/const */ +#define DUK__EMIT_FLAG_RESERVE_JUMPSLOT (1 << 15) /* reserve a jumpslot after instr before target spilling, used for NEXTENUM */ + +/* XXX: macro smaller than call? */ +DUK_LOCAL duk_int_t duk__get_current_pc(duk_compiler_ctx *comp_ctx) { + duk_compiler_func *func; + func = &comp_ctx->curr_func; + return (duk_int_t) (DUK_BW_GET_SIZE(comp_ctx->thr, &func->bw_code) / sizeof(duk_compiler_instr)); +} + +DUK_LOCAL duk_compiler_instr *duk__get_instr_ptr(duk_compiler_ctx *comp_ctx, duk_int_t pc) { + DUK_ASSERT(pc >= 0); + DUK_ASSERT((duk_size_t) pc < + (duk_size_t) (DUK_BW_GET_SIZE(comp_ctx->thr, &comp_ctx->curr_func.bw_code) / sizeof(duk_compiler_instr))); + return ((duk_compiler_instr *) (void *) DUK_BW_GET_BASEPTR(comp_ctx->thr, &comp_ctx->curr_func.bw_code)) + pc; +} + +/* emit instruction; could return PC but that's not needed in the majority + * of cases. + */ +DUK_LOCAL void duk__emit(duk_compiler_ctx *comp_ctx, duk_instr_t ins) { +#if defined(DUK_USE_PC2LINE) + duk_int_t line; +#endif + duk_compiler_instr *instr; + + DUK_DDD(DUK_DDDPRINT("duk__emit: 0x%08lx curr_token.start_line=%ld prev_token.start_line=%ld pc=%ld --> %!I", + (unsigned long) ins, + (long) comp_ctx->curr_token.start_line, + (long) comp_ctx->prev_token.start_line, + (long) duk__get_current_pc(comp_ctx), + (duk_instr_t) ins)); + + instr = (duk_compiler_instr *) (void *) DUK_BW_ENSURE_GETPTR(comp_ctx->thr, + &comp_ctx->curr_func.bw_code, + sizeof(duk_compiler_instr)); + DUK_BW_ADD_PTR(comp_ctx->thr, &comp_ctx->curr_func.bw_code, sizeof(duk_compiler_instr)); + +#if defined(DUK_USE_PC2LINE) + /* The line number tracking is a bit inconsistent right now, which + * affects debugger accuracy. Mostly call sites emit opcodes when + * they have parsed a token (say a terminating semicolon) and called + * duk__advance(). In this case the line number of the previous + * token is the most accurate one (except in prologue where + * prev_token.start_line is 0). This is probably not 100% correct + * right now. + */ + /* approximation, close enough */ + line = comp_ctx->prev_token.start_line; + if (line == 0) { + line = comp_ctx->curr_token.start_line; + } +#endif + + instr->ins = ins; +#if defined(DUK_USE_PC2LINE) + instr->line = (duk_uint32_t) line; +#endif +#if defined(DUK_USE_DEBUGGER_SUPPORT) + if (line < comp_ctx->curr_func.min_line) { + comp_ctx->curr_func.min_line = line; + } + if (line > comp_ctx->curr_func.max_line) { + comp_ctx->curr_func.max_line = line; + } +#endif + + /* Limit checks for bytecode byte size and line number. */ + if (DUK_UNLIKELY(DUK_BW_GET_SIZE(comp_ctx->thr, &comp_ctx->curr_func.bw_code) > DUK_USE_ESBC_MAX_BYTES)) { + goto fail_bc_limit; + } +#if defined(DUK_USE_PC2LINE) && defined(DUK_USE_ESBC_LIMITS) +#if defined(DUK_USE_BUFLEN16) + /* Buffer length is bounded to 0xffff automatically, avoid compile warning. */ + if (DUK_UNLIKELY(line > DUK_USE_ESBC_MAX_LINENUMBER)) { + goto fail_bc_limit; + } +#else + if (DUK_UNLIKELY(line > DUK_USE_ESBC_MAX_LINENUMBER)) { + goto fail_bc_limit; + } +#endif +#endif + + return; + +fail_bc_limit: + DUK_ERROR_RANGE(comp_ctx->thr, DUK_STR_BYTECODE_LIMIT); + DUK_WO_NORETURN(return;); +} + +/* Update function min/max line from current token. Needed to improve + * function line range information for debugging, so that e.g. opening + * curly brace is covered by line range even when no opcodes are emitted + * for the line containing the brace. + */ +DUK_LOCAL void duk__update_lineinfo_currtoken(duk_compiler_ctx *comp_ctx) { +#if defined(DUK_USE_DEBUGGER_SUPPORT) + duk_int_t line; + + line = comp_ctx->curr_token.start_line; + if (line == 0) { + return; + } + if (line < comp_ctx->curr_func.min_line) { + comp_ctx->curr_func.min_line = line; + } + if (line > comp_ctx->curr_func.max_line) { + comp_ctx->curr_func.max_line = line; + } +#else + DUK_UNREF(comp_ctx); +#endif +} + +DUK_LOCAL void duk__emit_op_only(duk_compiler_ctx *comp_ctx, duk_small_uint_t op) { + duk__emit(comp_ctx, DUK_ENC_OP_ABC(op, 0)); +} + +/* Important main primitive. */ +DUK_LOCAL void duk__emit_a_b_c(duk_compiler_ctx *comp_ctx, + duk_small_uint_t op_flags, + duk_regconst_t a, + duk_regconst_t b, + duk_regconst_t c) { + duk_instr_t ins = 0; + duk_int_t a_out = -1; + duk_int_t b_out = -1; + duk_int_t c_out = -1; + duk_int_t tmp; + duk_small_uint_t op = op_flags & 0xffU; + + DUK_DDD(DUK_DDDPRINT("emit: op_flags=%04lx, a=%ld, b=%ld, c=%ld", (unsigned long) op_flags, (long) a, (long) b, (long) c)); + + /* We could rely on max temp/const checks: if they don't exceed BC + * limit, nothing here can either (just asserts would be enough). + * Currently we check for the limits, which provides additional + * protection against creating invalid bytecode due to compiler + * bugs. + */ + + DUK_ASSERT_DISABLE((op_flags & 0xff) >= DUK_BC_OP_MIN); /* unsigned */ + DUK_ASSERT((op_flags & 0xff) <= DUK_BC_OP_MAX); + DUK_ASSERT(DUK__ISREG(a)); + DUK_ASSERT(b != -1); /* Not 'none'. */ + DUK_ASSERT(c != -1); /* Not 'none'. */ + + /* Input shuffling happens before the actual operation, while output + * shuffling happens afterwards. Output shuffling decisions are still + * made at the same time to reduce branch clutter; output shuffle decisions + * are recorded into X_out variables. + */ + + /* Slot A: currently no support for reg/const. */ + +#if defined(DUK_USE_SHUFFLE_TORTURE) + if (a <= DUK_BC_A_MAX && (op_flags & DUK__EMIT_FLAG_NO_SHUFFLE_A)) { +#else + if (a <= DUK_BC_A_MAX) { +#endif + ; + } else if (op_flags & DUK__EMIT_FLAG_NO_SHUFFLE_A) { + DUK_D(DUK_DPRINT("out of regs: 'a' (reg) needs shuffling but shuffle prohibited, a: %ld", (long) a)); + goto error_outofregs; + } else if (a <= DUK_BC_BC_MAX) { + comp_ctx->curr_func.needs_shuffle = 1; + tmp = comp_ctx->curr_func.shuffle1; + if (op_flags & DUK__EMIT_FLAG_A_IS_SOURCE) { + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_LDREG, tmp, a)); + } else { + /* Output shuffle needed after main operation */ + a_out = a; + + /* The DUK_OP_CSVAR output shuffle assumes shuffle registers are + * consecutive. + */ + DUK_ASSERT((comp_ctx->curr_func.shuffle1 == 0 && comp_ctx->curr_func.shuffle2 == 0) || + (comp_ctx->curr_func.shuffle2 == comp_ctx->curr_func.shuffle1 + 1)); + if (op == DUK_OP_CSVAR) { + /* For CSVAR the limit is one smaller because output shuffle + * must be able to express 'a + 1' in BC. + */ + if (a + 1 > DUK_BC_BC_MAX) { + goto error_outofregs; + } + } + } + a = tmp; + } else { + DUK_D(DUK_DPRINT("out of regs: 'a' (reg) needs shuffling but does not fit into BC, a: %ld", (long) a)); + goto error_outofregs; + } + + /* Slot B: reg/const support, mapped to bit 0 of opcode. */ + + if ((b & DUK__CONST_MARKER) != 0) { + DUK_ASSERT((op_flags & DUK__EMIT_FLAG_NO_SHUFFLE_B) == 0); + DUK_ASSERT((op_flags & DUK__EMIT_FLAG_B_IS_TARGET) == 0); + b = b & ~DUK__CONST_MARKER; +#if defined(DUK_USE_SHUFFLE_TORTURE) + if (0) { +#else + if (b <= 0xff) { +#endif + if (op_flags & DUK__EMIT_FLAG_BC_REGCONST) { + /* Opcode follows B/C reg/const convention. */ + DUK_ASSERT((op & 0x01) == 0); + ins |= DUK_ENC_OP_A_B_C(0x01, 0, 0, 0); /* const flag for B */ + } else { + DUK_D(DUK_DPRINT("B is const, opcode is not B/C reg/const: %x", op_flags)); + } + } else if (b <= DUK_BC_BC_MAX) { + comp_ctx->curr_func.needs_shuffle = 1; + tmp = comp_ctx->curr_func.shuffle2; + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_LDCONST, tmp, b)); + b = tmp; + } else { + DUK_D(DUK_DPRINT("out of regs: 'b' (const) needs shuffling but does not fit into BC, b: %ld", (long) b)); + goto error_outofregs; + } + } else { +#if defined(DUK_USE_SHUFFLE_TORTURE) + if (b <= 0xff && (op_flags & DUK__EMIT_FLAG_NO_SHUFFLE_B)) { +#else + if (b <= 0xff) { +#endif + ; + } else if (op_flags & DUK__EMIT_FLAG_NO_SHUFFLE_B) { + if (b > DUK_BC_B_MAX) { + /* Note: 0xff != DUK_BC_B_MAX */ + DUK_D( + DUK_DPRINT("out of regs: 'b' (reg) needs shuffling but shuffle prohibited, b: %ld", (long) b)); + goto error_outofregs; + } + } else if (b <= DUK_BC_BC_MAX) { + comp_ctx->curr_func.needs_shuffle = 1; + tmp = comp_ctx->curr_func.shuffle2; + if (op_flags & DUK__EMIT_FLAG_B_IS_TARGET) { + /* Output shuffle needed after main operation */ + b_out = b; + } + if (!(op_flags & DUK__EMIT_FLAG_B_IS_TARGET)) { + if (op == DUK_OP_MPUTOBJ || op == DUK_OP_MPUTARR) { + /* Special handling for MPUTOBJ/MPUTARR shuffling. + * For each, slot B identifies the first register of a range + * of registers, so normal shuffling won't work. Instead, + * an indirect version of the opcode is used. + */ + DUK_ASSERT((op_flags & DUK__EMIT_FLAG_B_IS_TARGET) == 0); + duk__emit_load_int32_noshuffle(comp_ctx, tmp, b); + DUK_ASSERT(DUK_OP_MPUTOBJI == DUK_OP_MPUTOBJ + 1); + DUK_ASSERT(DUK_OP_MPUTARRI == DUK_OP_MPUTARR + 1); + op_flags++; /* indirect opcode follows direct */ + } else { + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_LDREG, tmp, b)); + } + } + b = tmp; + } else { + DUK_D(DUK_DPRINT("out of regs: 'b' (reg) needs shuffling but does not fit into BC, b: %ld", (long) b)); + goto error_outofregs; + } + } + + /* Slot C: reg/const support, mapped to bit 1 of opcode. */ + + if ((c & DUK__CONST_MARKER) != 0) { + DUK_ASSERT((op_flags & DUK__EMIT_FLAG_NO_SHUFFLE_C) == 0); + DUK_ASSERT((op_flags & DUK__EMIT_FLAG_C_IS_TARGET) == 0); + c = c & ~DUK__CONST_MARKER; +#if defined(DUK_USE_SHUFFLE_TORTURE) + if (0) { +#else + if (c <= 0xff) { +#endif + if (op_flags & DUK__EMIT_FLAG_BC_REGCONST) { + /* Opcode follows B/C reg/const convention. */ + DUK_ASSERT((op & 0x02) == 0); + ins |= DUK_ENC_OP_A_B_C(0x02, 0, 0, 0); /* const flag for C */ + } else { + DUK_D(DUK_DPRINT("C is const, opcode is not B/C reg/const: %x", op_flags)); + } + } else if (c <= DUK_BC_BC_MAX) { + comp_ctx->curr_func.needs_shuffle = 1; + tmp = comp_ctx->curr_func.shuffle3; + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_LDCONST, tmp, c)); + c = tmp; + } else { + DUK_D(DUK_DPRINT("out of regs: 'c' (const) needs shuffling but does not fit into BC, c: %ld", (long) c)); + goto error_outofregs; + } + } else { +#if defined(DUK_USE_SHUFFLE_TORTURE) + if (c <= 0xff && (op_flags & DUK__EMIT_FLAG_NO_SHUFFLE_C)) { +#else + if (c <= 0xff) { +#endif + ; + } else if (op_flags & DUK__EMIT_FLAG_NO_SHUFFLE_C) { + if (c > DUK_BC_C_MAX) { + /* Note: 0xff != DUK_BC_C_MAX */ + DUK_D( + DUK_DPRINT("out of regs: 'c' (reg) needs shuffling but shuffle prohibited, c: %ld", (long) c)); + goto error_outofregs; + } + } else if (c <= DUK_BC_BC_MAX) { + comp_ctx->curr_func.needs_shuffle = 1; + tmp = comp_ctx->curr_func.shuffle3; + if (op_flags & DUK__EMIT_FLAG_C_IS_TARGET) { + /* Output shuffle needed after main operation */ + c_out = c; + } else { + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_LDREG, tmp, c)); + } + c = tmp; + } else { + DUK_D(DUK_DPRINT("out of regs: 'c' (reg) needs shuffling but does not fit into BC, c: %ld", (long) c)); + goto error_outofregs; + } + } + + /* Main operation */ + + DUK_ASSERT(a >= DUK_BC_A_MIN); + DUK_ASSERT(a <= DUK_BC_A_MAX); + DUK_ASSERT(b >= DUK_BC_B_MIN); + DUK_ASSERT(b <= DUK_BC_B_MAX); + DUK_ASSERT(c >= DUK_BC_C_MIN); + DUK_ASSERT(c <= DUK_BC_C_MAX); + + ins |= DUK_ENC_OP_A_B_C(op_flags & 0xff, a, b, c); + duk__emit(comp_ctx, ins); + + /* NEXTENUM needs a jump slot right after the main instruction. + * When the JUMP is taken, output spilling is not needed so this + * workaround is possible. The jump slot PC is exceptionally + * plumbed through comp_ctx to minimize call sites. + */ + if (op_flags & DUK__EMIT_FLAG_RESERVE_JUMPSLOT) { + comp_ctx->emit_jumpslot_pc = duk__get_current_pc(comp_ctx); + duk__emit_abc(comp_ctx, DUK_OP_JUMP, 0); + } + + /* Output shuffling: only one output register is realistically possible. + * + * (Zero would normally be an OK marker value: if the target register + * was zero, it would never be shuffled. But with DUK_USE_SHUFFLE_TORTURE + * this is no longer true, so use -1 as a marker instead.) + */ + + if (a_out >= 0) { + DUK_ASSERT(b_out < 0); + DUK_ASSERT(c_out < 0); + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_STREG, a, a_out)); + + if (op == DUK_OP_CSVAR) { + /* Special handling for CSVAR shuffling. The variable lookup + * results in a pair in successive + * registers so use two shuffle registers and two output + * loads. (In practice this is dead code because temp/const + * limit is reached first.) + */ + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_STREG, a + 1, a_out + 1)); + } + } else if (b_out >= 0) { + DUK_ASSERT(a_out < 0); + DUK_ASSERT(c_out < 0); + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_STREG, b, b_out)); + } else if (c_out >= 0) { + DUK_ASSERT(b_out < 0); + DUK_ASSERT(c_out < 0); + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_STREG, c, c_out)); + } + + return; + +error_outofregs: + DUK_ERROR_RANGE(comp_ctx->thr, DUK_STR_REG_LIMIT); + DUK_WO_NORETURN(return;); +} + +/* For many of the helpers below it'd be technically correct to add + * "no shuffle" flags for parameters passed in as zero. For example, + * duk__emit_a_b() should call duk__emit_a_b_c() with C set to 0, and + * DUK__EMIT_FLAG_NO_SHUFFLE_C added to op_flags. However, since the + * C value is 0, it'll never get shuffled so adding the flag is just + * unnecessary additional code. This is unfortunately not true for + * "shuffle torture" mode which needs special handling. + */ + +DUK_LOCAL void duk__emit_a_b(duk_compiler_ctx *comp_ctx, duk_small_uint_t op_flags, duk_regconst_t a, duk_regconst_t b) { +#if defined(DUK_USE_SHUFFLE_TORTURE) + op_flags |= DUK__EMIT_FLAG_NO_SHUFFLE_C; +#endif + duk__emit_a_b_c(comp_ctx, op_flags, a, b, 0); +} + +DUK_LOCAL void duk__emit_b_c(duk_compiler_ctx *comp_ctx, duk_small_uint_t op_flags, duk_regconst_t b, duk_regconst_t c) { +#if defined(DUK_USE_SHUFFLE_TORTURE) + op_flags |= DUK__EMIT_FLAG_NO_SHUFFLE_A; +#endif + duk__emit_a_b_c(comp_ctx, op_flags, 0, b, c); +} + +#if 0 /* unused */ +DUK_LOCAL void duk__emit_a(duk_compiler_ctx *comp_ctx, int op_flags, int a) { +#if defined(DUK_USE_SHUFFLE_TORTURE) + op_flags |= DUK__EMIT_FLAG_NO_SHUFFLE_B | DUK__EMIT_FLAG_NO_SHUFFLE_C; +#endif + duk__emit_a_b_c(comp_ctx, op_flags, a, 0, 0); +} +#endif + +#if 0 /* unused */ +DUK_LOCAL void duk__emit_b(duk_compiler_ctx *comp_ctx, duk_small_uint_t op_flags, duk_regconst_t b) { +#if defined(DUK_USE_SHUFFLE_TORTURE) + op_flags |= DUK__EMIT_FLAG_NO_SHUFFLE_A | DUK__EMIT_FLAG_NO_SHUFFLE_C; +#endif + duk__emit_a_b_c(comp_ctx, op_flags, 0, b, 0); +} +#endif + +DUK_LOCAL void duk__emit_a_bc(duk_compiler_ctx *comp_ctx, duk_small_uint_t op_flags, duk_regconst_t a, duk_regconst_t bc) { + duk_instr_t ins; + duk_int_t tmp; + + /* allow caller to give a const number with the DUK__CONST_MARKER */ + DUK_ASSERT(bc != -1); /* Not 'none'. */ + bc = bc & (~DUK__CONST_MARKER); + + DUK_ASSERT_DISABLE((op_flags & 0xff) >= DUK_BC_OP_MIN); /* unsigned */ + DUK_ASSERT((op_flags & 0xff) <= DUK_BC_OP_MAX); + DUK_ASSERT(bc >= DUK_BC_BC_MIN); + DUK_ASSERT(bc <= DUK_BC_BC_MAX); + DUK_ASSERT((bc & DUK__CONST_MARKER) == 0); + + if (bc <= DUK_BC_BC_MAX) { + ; + } else { + /* No BC shuffling now. */ + goto error_outofregs; + } + +#if defined(DUK_USE_SHUFFLE_TORTURE) + if (a <= DUK_BC_A_MAX && (op_flags & DUK__EMIT_FLAG_NO_SHUFFLE_A)) { +#else + if (a <= DUK_BC_A_MAX) { +#endif + ins = DUK_ENC_OP_A_BC(op_flags & 0xff, a, bc); + duk__emit(comp_ctx, ins); + } else if (op_flags & DUK__EMIT_FLAG_NO_SHUFFLE_A) { + goto error_outofregs; + } else if ((op_flags & 0xf0U) == DUK_OP_CALL0) { + comp_ctx->curr_func.needs_shuffle = 1; + tmp = comp_ctx->curr_func.shuffle1; + duk__emit_load_int32_noshuffle(comp_ctx, tmp, a); + op_flags |= DUK_BC_CALL_FLAG_INDIRECT; + ins = DUK_ENC_OP_A_BC(op_flags & 0xff, tmp, bc); + duk__emit(comp_ctx, ins); + } else if (a <= DUK_BC_BC_MAX) { + comp_ctx->curr_func.needs_shuffle = 1; + tmp = comp_ctx->curr_func.shuffle1; + ins = DUK_ENC_OP_A_BC(op_flags & 0xff, tmp, bc); + if (op_flags & DUK__EMIT_FLAG_A_IS_SOURCE) { + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_LDREG, tmp, a)); + duk__emit(comp_ctx, ins); + } else { + duk__emit(comp_ctx, ins); + duk__emit(comp_ctx, DUK_ENC_OP_A_BC(DUK_OP_STREG, tmp, a)); + } + } else { + goto error_outofregs; + } + return; + +error_outofregs: + DUK_ERROR_RANGE(comp_ctx->thr, DUK_STR_REG_LIMIT); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL void duk__emit_bc(duk_compiler_ctx *comp_ctx, duk_small_uint_t op, duk_regconst_t bc) { +#if defined(DUK_USE_SHUFFLE_TORTURE) + op |= DUK__EMIT_FLAG_NO_SHUFFLE_A; +#endif + duk__emit_a_bc(comp_ctx, op, 0, bc); +} + +DUK_LOCAL void duk__emit_abc(duk_compiler_ctx *comp_ctx, duk_small_uint_t op, duk_regconst_t abc) { + duk_instr_t ins; + + DUK_ASSERT_DISABLE(op >= DUK_BC_OP_MIN); /* unsigned */ + DUK_ASSERT(op <= DUK_BC_OP_MAX); + DUK_ASSERT_DISABLE(abc >= DUK_BC_ABC_MIN); /* unsigned */ + DUK_ASSERT(abc <= DUK_BC_ABC_MAX); + DUK_ASSERT((abc & DUK__CONST_MARKER) == 0); + DUK_ASSERT(abc != -1); /* Not 'none'. */ + + if (abc <= DUK_BC_ABC_MAX) { + ; + } else { + goto error_outofregs; + } + ins = DUK_ENC_OP_ABC(op, abc); + DUK_DDD(DUK_DDDPRINT("duk__emit_abc: 0x%08lx line=%ld pc=%ld op=%ld (%!X) abc=%ld (%!I)", + (unsigned long) ins, + (long) comp_ctx->curr_token.start_line, + (long) duk__get_current_pc(comp_ctx), + (long) op, + (long) op, + (long) abc, + (duk_instr_t) ins)); + duk__emit(comp_ctx, ins); + return; + +error_outofregs: + DUK_ERROR_RANGE(comp_ctx->thr, DUK_STR_REG_LIMIT); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL void duk__emit_load_int32_raw(duk_compiler_ctx *comp_ctx, + duk_regconst_t reg, + duk_int32_t val, + duk_small_uint_t op_flags) { + /* XXX: Shuffling support could be implemented here so that LDINT+LDINTX + * would only shuffle once (instead of twice). The current code works + * though, and has a smaller compiler footprint. + */ + + if ((val >= (duk_int32_t) DUK_BC_BC_MIN - (duk_int32_t) DUK_BC_LDINT_BIAS) && + (val <= (duk_int32_t) DUK_BC_BC_MAX - (duk_int32_t) DUK_BC_LDINT_BIAS)) { + DUK_DDD(DUK_DDDPRINT("emit LDINT to reg %ld for %ld", (long) reg, (long) val)); + duk__emit_a_bc(comp_ctx, DUK_OP_LDINT | op_flags, reg, (duk_regconst_t) (val + (duk_int32_t) DUK_BC_LDINT_BIAS)); + } else { + duk_int32_t hi = val >> DUK_BC_LDINTX_SHIFT; + duk_int32_t lo = val & ((((duk_int32_t) 1) << DUK_BC_LDINTX_SHIFT) - 1); + DUK_ASSERT(lo >= 0); + DUK_DDD(DUK_DDDPRINT("emit LDINT+LDINTX to reg %ld for %ld -> hi %ld, lo %ld", + (long) reg, + (long) val, + (long) hi, + (long) lo)); + duk__emit_a_bc(comp_ctx, DUK_OP_LDINT | op_flags, reg, (duk_regconst_t) (hi + (duk_int32_t) DUK_BC_LDINT_BIAS)); + duk__emit_a_bc(comp_ctx, DUK_OP_LDINTX | op_flags, reg, (duk_regconst_t) lo); + } +} + +DUK_LOCAL void duk__emit_load_int32(duk_compiler_ctx *comp_ctx, duk_regconst_t reg, duk_int32_t val) { + duk__emit_load_int32_raw(comp_ctx, reg, val, 0 /*op_flags*/); +} + +#if defined(DUK_USE_SHUFFLE_TORTURE) +/* Used by duk__emit*() calls so that we don't shuffle the loadints that + * are needed to handle indirect opcodes. + */ +DUK_LOCAL void duk__emit_load_int32_noshuffle(duk_compiler_ctx *comp_ctx, duk_regconst_t reg, duk_int32_t val) { + duk__emit_load_int32_raw(comp_ctx, reg, val, DUK__EMIT_FLAG_NO_SHUFFLE_A /*op_flags*/); +} +#else +DUK_LOCAL void duk__emit_load_int32_noshuffle(duk_compiler_ctx *comp_ctx, duk_regconst_t reg, duk_int32_t val) { + /* When torture not enabled, can just use the same helper because + * 'reg' won't get spilled. + */ + DUK_ASSERT(reg <= DUK_BC_A_MAX); + duk__emit_load_int32(comp_ctx, reg, val); +} +#endif + +DUK_LOCAL void duk__emit_jump(duk_compiler_ctx *comp_ctx, duk_int_t target_pc) { + duk_int_t curr_pc; + duk_int_t offset; + + curr_pc = (duk_int_t) (DUK_BW_GET_SIZE(comp_ctx->thr, &comp_ctx->curr_func.bw_code) / sizeof(duk_compiler_instr)); + offset = (duk_int_t) target_pc - (duk_int_t) curr_pc - 1; + DUK_ASSERT(offset + DUK_BC_JUMP_BIAS >= DUK_BC_ABC_MIN); + DUK_ASSERT(offset + DUK_BC_JUMP_BIAS <= DUK_BC_ABC_MAX); + duk__emit_abc(comp_ctx, DUK_OP_JUMP, (duk_regconst_t) (offset + DUK_BC_JUMP_BIAS)); +} + +DUK_LOCAL duk_int_t duk__emit_jump_empty(duk_compiler_ctx *comp_ctx) { + duk_int_t ret; + + ret = duk__get_current_pc(comp_ctx); /* useful for patching jumps later */ + duk__emit_op_only(comp_ctx, DUK_OP_JUMP); + return ret; +} + +/* Insert an empty jump in the middle of code emitted earlier. This is + * currently needed for compiling for-in. + */ +DUK_LOCAL void duk__insert_jump_entry(duk_compiler_ctx *comp_ctx, duk_int_t jump_pc) { +#if defined(DUK_USE_PC2LINE) + duk_int_t line; +#endif + duk_compiler_instr *instr; + duk_size_t offset; + + DUK_ASSERT(jump_pc >= 0); + offset = (duk_size_t) jump_pc * sizeof(duk_compiler_instr); + instr = (duk_compiler_instr *) (void *) + DUK_BW_INSERT_ENSURE_AREA(comp_ctx->thr, &comp_ctx->curr_func.bw_code, offset, sizeof(duk_compiler_instr)); + +#if defined(DUK_USE_PC2LINE) + line = comp_ctx->curr_token.start_line; /* approximation, close enough */ +#endif + instr->ins = DUK_ENC_OP_ABC(DUK_OP_JUMP, 0); +#if defined(DUK_USE_PC2LINE) + instr->line = (duk_uint32_t) line; +#endif + + DUK_BW_ADD_PTR(comp_ctx->thr, &comp_ctx->curr_func.bw_code, sizeof(duk_compiler_instr)); + if (DUK_UNLIKELY(DUK_BW_GET_SIZE(comp_ctx->thr, &comp_ctx->curr_func.bw_code) > DUK_USE_ESBC_MAX_BYTES)) { + goto fail_bc_limit; + } + return; + +fail_bc_limit: + DUK_ERROR_RANGE(comp_ctx->thr, DUK_STR_BYTECODE_LIMIT); + DUK_WO_NORETURN(return;); +} + +/* Does not assume that jump_pc contains a DUK_OP_JUMP previously; this is intentional + * to allow e.g. an INVALID opcode be overwritten with a JUMP (label management uses this). + */ +DUK_LOCAL void duk__patch_jump(duk_compiler_ctx *comp_ctx, duk_int_t jump_pc, duk_int_t target_pc) { + duk_compiler_instr *instr; + duk_int_t offset; + + /* allow negative PCs, behave as a no-op */ + if (jump_pc < 0) { + DUK_DDD( + DUK_DDDPRINT("duk__patch_jump(): nop call, jump_pc=%ld (<0), target_pc=%ld", (long) jump_pc, (long) target_pc)); + return; + } + DUK_ASSERT(jump_pc >= 0); + + /* XXX: range assert */ + instr = duk__get_instr_ptr(comp_ctx, jump_pc); + DUK_ASSERT(instr != NULL); + + /* XXX: range assert */ + offset = target_pc - jump_pc - 1; + + instr->ins = DUK_ENC_OP_ABC(DUK_OP_JUMP, offset + DUK_BC_JUMP_BIAS); + DUK_DDD(DUK_DDDPRINT("duk__patch_jump(): jump_pc=%ld, target_pc=%ld, offset=%ld", + (long) jump_pc, + (long) target_pc, + (long) offset)); +} + +DUK_LOCAL void duk__patch_jump_here(duk_compiler_ctx *comp_ctx, duk_int_t jump_pc) { + duk__patch_jump(comp_ctx, jump_pc, duk__get_current_pc(comp_ctx)); +} + +DUK_LOCAL void duk__patch_trycatch(duk_compiler_ctx *comp_ctx, + duk_int_t ldconst_pc, + duk_int_t trycatch_pc, + duk_regconst_t reg_catch, + duk_regconst_t const_varname, + duk_small_uint_t flags) { + duk_compiler_instr *instr; + + DUK_ASSERT(DUK__ISREG(reg_catch)); + + instr = duk__get_instr_ptr(comp_ctx, ldconst_pc); + DUK_ASSERT(DUK_DEC_OP(instr->ins) == DUK_OP_LDCONST); + DUK_ASSERT(instr != NULL); + if (const_varname & DUK__CONST_MARKER) { + /* Have a catch variable. */ + const_varname = const_varname & (~DUK__CONST_MARKER); + if (reg_catch > DUK_BC_BC_MAX || const_varname > DUK_BC_BC_MAX) { + /* Catch attempts to use out-of-range reg/const. Without this + * check Duktape 0.12.0 could generate invalid code which caused + * an assert failure on execution. This error is triggered e.g. + * for functions with a lot of constants and a try-catch statement. + * Shuffling or opcode semantics change is needed to fix the issue. + * See: test-bug-trycatch-many-constants.js. + */ + DUK_D(DUK_DPRINT("failed to patch trycatch: flags=%ld, reg_catch=%ld, const_varname=%ld (0x%08lx)", + (long) flags, + (long) reg_catch, + (long) const_varname, + (long) const_varname)); + DUK_ERROR_RANGE(comp_ctx->thr, DUK_STR_REG_LIMIT); + DUK_WO_NORETURN(return;); + } + instr->ins |= DUK_ENC_OP_A_BC(0, 0, const_varname); + } else { + /* No catch variable, e.g. a try-finally; replace LDCONST with + * NOP to avoid a bogus LDCONST. + */ + instr->ins = DUK_ENC_OP(DUK_OP_NOP); + } + + instr = duk__get_instr_ptr(comp_ctx, trycatch_pc); + DUK_ASSERT(instr != NULL); + DUK_ASSERT_DISABLE(flags >= DUK_BC_A_MIN); + DUK_ASSERT(flags <= DUK_BC_A_MAX); + instr->ins = DUK_ENC_OP_A_BC(DUK_OP_TRYCATCH, flags, reg_catch); +} + +DUK_LOCAL void duk__emit_if_false_skip(duk_compiler_ctx *comp_ctx, duk_regconst_t regconst) { + duk_small_uint_t op; + + op = DUK__ISREG(regconst) ? DUK_OP_IFFALSE_R : DUK_OP_IFFALSE_C; + duk__emit_bc(comp_ctx, op, regconst); /* helper will remove const flag */ +} + +DUK_LOCAL void duk__emit_if_true_skip(duk_compiler_ctx *comp_ctx, duk_regconst_t regconst) { + duk_small_uint_t op; + + op = DUK__ISREG(regconst) ? DUK_OP_IFTRUE_R : DUK_OP_IFTRUE_C; + duk__emit_bc(comp_ctx, op, regconst); /* helper will remove const flag */ +} + +DUK_LOCAL void duk__emit_invalid(duk_compiler_ctx *comp_ctx) { + duk__emit_op_only(comp_ctx, DUK_OP_INVALID); +} + +/* + * Peephole optimizer for finished bytecode. + * + * Does not remove opcodes; currently only straightens out unconditional + * jump chains which are generated by several control structures. + */ + +DUK_LOCAL void duk__peephole_optimize_bytecode(duk_compiler_ctx *comp_ctx) { + duk_compiler_instr *bc; + duk_small_uint_t iter; + duk_int_t i, n; + duk_int_t count_opt; + + bc = (duk_compiler_instr *) (void *) DUK_BW_GET_BASEPTR(comp_ctx->thr, &comp_ctx->curr_func.bw_code); +#if defined(DUK_USE_BUFLEN16) + /* No need to assert, buffer size maximum is 0xffff. */ +#else + DUK_ASSERT((duk_size_t) DUK_BW_GET_SIZE(comp_ctx->thr, &comp_ctx->curr_func.bw_code) / sizeof(duk_compiler_instr) <= + (duk_size_t) DUK_INT_MAX); /* bytecode limits */ +#endif + n = (duk_int_t) (DUK_BW_GET_SIZE(comp_ctx->thr, &comp_ctx->curr_func.bw_code) / sizeof(duk_compiler_instr)); + + for (iter = 0; iter < DUK_COMPILER_PEEPHOLE_MAXITER; iter++) { + count_opt = 0; + + for (i = 0; i < n; i++) { + duk_instr_t ins; + duk_int_t target_pc1; + duk_int_t target_pc2; + + ins = bc[i].ins; + if (DUK_DEC_OP(ins) != DUK_OP_JUMP) { + continue; + } + + target_pc1 = i + 1 + (duk_int_t) DUK_DEC_ABC(ins) - (duk_int_t) DUK_BC_JUMP_BIAS; + DUK_DDD(DUK_DDDPRINT("consider jump at pc %ld; target_pc=%ld", (long) i, (long) target_pc1)); + DUK_ASSERT(target_pc1 >= 0); + DUK_ASSERT(target_pc1 < n); + + /* Note: if target_pc1 == i, we'll optimize a jump to itself. + * This does not need to be checked for explicitly; the case + * is rare and max iter breaks us out. + */ + + ins = bc[target_pc1].ins; + if (DUK_DEC_OP(ins) != DUK_OP_JUMP) { + continue; + } + + target_pc2 = target_pc1 + 1 + (duk_int_t) DUK_DEC_ABC(ins) - (duk_int_t) DUK_BC_JUMP_BIAS; + + DUK_DDD(DUK_DDDPRINT("optimizing jump at pc %ld; old target is %ld -> new target is %ld", + (long) i, + (long) target_pc1, + (long) target_pc2)); + + bc[i].ins = DUK_ENC_OP_ABC(DUK_OP_JUMP, target_pc2 - (i + 1) + DUK_BC_JUMP_BIAS); + + count_opt++; + } + + DUK_DD(DUK_DDPRINT("optimized %ld jumps on peephole round %ld", (long) count_opt, (long) (iter + 1))); + + if (count_opt == 0) { + break; + } + } +} + +/* + * Intermediate value helpers + */ + +/* Flags for intermediate value coercions. A flag for using a forced reg + * is not needed, the forced_reg argument suffices and generates better + * code (it is checked as it is used). + */ +/* XXX: DUK__IVAL_FLAG_REQUIRE_SHORT is passed but not currently implemented + * by ispec/ivalue operations. + */ +#define DUK__IVAL_FLAG_ALLOW_CONST (1 << 0) /* allow a constant to be returned */ +#define DUK__IVAL_FLAG_REQUIRE_TEMP (1 << 1) /* require a (mutable) temporary as a result (or a const if allowed) */ +#define DUK__IVAL_FLAG_REQUIRE_SHORT (1 << 2) /* require a short (8-bit) reg/const which fits into bytecode B/C slot */ + +/* XXX: some code might benefit from DUK__SETTEMP_IFTEMP(thr,x) */ + +#if 0 /* enable manually for dumping */ +#define DUK__DUMP_ISPEC(compctx, ispec) \ + do { \ + duk__dump_ispec((compctx), (ispec)); \ + } while (0) +#define DUK__DUMP_IVALUE(compctx, ivalue) \ + do { \ + duk__dump_ivalue((compctx), (ivalue)); \ + } while (0) + +DUK_LOCAL void duk__dump_ispec(duk_compiler_ctx *comp_ctx, duk_ispec *x) { + DUK_D(DUK_DPRINT("ispec dump: t=%ld regconst=0x%08lx, valstack_idx=%ld, value=%!T", + (long) x->t, (unsigned long) x->regconst, (long) x->valstack_idx, + duk_get_tval(comp_ctx->thr, x->valstack_idx))); +} +DUK_LOCAL void duk__dump_ivalue(duk_compiler_ctx *comp_ctx, duk_ivalue *x) { + DUK_D(DUK_DPRINT("ivalue dump: t=%ld op=%ld " + "x1={t=%ld regconst=0x%08lx valstack_idx=%ld value=%!T} " + "x2={t=%ld regconst=0x%08lx valstack_idx=%ld value=%!T}", + (long) x->t, (long) x->op, + (long) x->x1.t, (unsigned long) x->x1.regconst, (long) x->x1.valstack_idx, + duk_get_tval(comp_ctx->thr, x->x1.valstack_idx), + (long) x->x2.t, (unsigned long) x->x2.regconst, (long) x->x2.valstack_idx, + duk_get_tval(comp_ctx->thr, x->x2.valstack_idx))); +} +#else +#define DUK__DUMP_ISPEC(comp_ctx, x) \ + do { \ + } while (0) +#define DUK__DUMP_IVALUE(comp_ctx, x) \ + do { \ + } while (0) +#endif + +DUK_LOCAL void duk__ivalue_regconst(duk_ivalue *x, duk_regconst_t regconst) { + x->t = DUK_IVAL_PLAIN; + x->x1.t = DUK_ISPEC_REGCONST; + x->x1.regconst = regconst; +} + +DUK_LOCAL void duk__ivalue_plain_fromstack(duk_compiler_ctx *comp_ctx, duk_ivalue *x) { + x->t = DUK_IVAL_PLAIN; + x->x1.t = DUK_ISPEC_VALUE; + duk_replace(comp_ctx->thr, x->x1.valstack_idx); +} + +DUK_LOCAL void duk__ivalue_var_fromstack(duk_compiler_ctx *comp_ctx, duk_ivalue *x) { + x->t = DUK_IVAL_VAR; + x->x1.t = DUK_ISPEC_VALUE; + duk_replace(comp_ctx->thr, x->x1.valstack_idx); +} + +DUK_LOCAL_DECL void duk__ivalue_var_hstring(duk_compiler_ctx *comp_ctx, duk_ivalue *x, duk_hstring *h) { + DUK_ASSERT(h != NULL); + duk_push_hstring(comp_ctx->thr, h); + duk__ivalue_var_fromstack(comp_ctx, x); +} + +DUK_LOCAL void duk__copy_ispec(duk_compiler_ctx *comp_ctx, duk_ispec *src, duk_ispec *dst) { + dst->t = src->t; + dst->regconst = src->regconst; + duk_copy(comp_ctx->thr, src->valstack_idx, dst->valstack_idx); +} + +DUK_LOCAL void duk__copy_ivalue(duk_compiler_ctx *comp_ctx, duk_ivalue *src, duk_ivalue *dst) { + dst->t = src->t; + dst->op = src->op; + dst->x1.t = src->x1.t; + dst->x1.regconst = src->x1.regconst; + dst->x2.t = src->x2.t; + dst->x2.regconst = src->x2.regconst; + duk_copy(comp_ctx->thr, src->x1.valstack_idx, dst->x1.valstack_idx); + duk_copy(comp_ctx->thr, src->x2.valstack_idx, dst->x2.valstack_idx); +} + +DUK_LOCAL duk_regconst_t duk__alloctemps(duk_compiler_ctx *comp_ctx, duk_small_int_t num) { + duk_regconst_t res; + + res = comp_ctx->curr_func.temp_next; + comp_ctx->curr_func.temp_next += num; + + if (comp_ctx->curr_func.temp_next > DUK__MAX_TEMPS) { /* == DUK__MAX_TEMPS is OK */ + DUK_ERROR_RANGE(comp_ctx->thr, DUK_STR_TEMP_LIMIT); + DUK_WO_NORETURN(return 0;); + } + + /* maintain highest 'used' temporary, needed to figure out nregs of function */ + if (comp_ctx->curr_func.temp_next > comp_ctx->curr_func.temp_max) { + comp_ctx->curr_func.temp_max = comp_ctx->curr_func.temp_next; + } + + return res; +} + +DUK_LOCAL duk_regconst_t duk__alloctemp(duk_compiler_ctx *comp_ctx) { + return duk__alloctemps(comp_ctx, 1); +} + +DUK_LOCAL void duk__settemp_checkmax(duk_compiler_ctx *comp_ctx, duk_regconst_t temp_next) { + comp_ctx->curr_func.temp_next = temp_next; + if (temp_next > comp_ctx->curr_func.temp_max) { + comp_ctx->curr_func.temp_max = temp_next; + } +} + +/* get const for value at valstack top */ +DUK_LOCAL duk_regconst_t duk__getconst(duk_compiler_ctx *comp_ctx) { + duk_hthread *thr = comp_ctx->thr; + duk_compiler_func *f = &comp_ctx->curr_func; + duk_tval *tv1; + duk_int_t i, n, n_check; + + n = (duk_int_t) duk_get_length(thr, f->consts_idx); + + tv1 = DUK_GET_TVAL_NEGIDX(thr, -1); + DUK_ASSERT(tv1 != NULL); + +#if defined(DUK_USE_FASTINT) + /* Explicit check for fastint downgrade. */ + DUK_TVAL_CHKFAST_INPLACE_SLOW(tv1); +#endif + + /* Sanity workaround for handling functions with a large number of + * constants at least somewhat reasonably. Otherwise checking whether + * we already have the constant would grow very slow (as it is O(N^2)). + */ + n_check = (n > DUK__GETCONST_MAX_CONSTS_CHECK ? DUK__GETCONST_MAX_CONSTS_CHECK : n); + for (i = 0; i < n_check; i++) { + duk_tval *tv2 = DUK_HOBJECT_A_GET_VALUE_PTR(thr->heap, f->h_consts, i); + + /* Strict equality is NOT enough, because we cannot use the same + * constant for e.g. +0 and -0. + */ + if (duk_js_samevalue(tv1, tv2)) { + DUK_DDD(DUK_DDDPRINT("reused existing constant for %!T -> const index %ld", (duk_tval *) tv1, (long) i)); + duk_pop(thr); + return (duk_regconst_t) i | (duk_regconst_t) DUK__CONST_MARKER; + } + } + + if (n > DUK__MAX_CONSTS) { + DUK_ERROR_RANGE(comp_ctx->thr, DUK_STR_CONST_LIMIT); + DUK_WO_NORETURN(return 0;); + } + + DUK_DDD(DUK_DDDPRINT("allocating new constant for %!T -> const index %ld", (duk_tval *) tv1, (long) n)); + (void) duk_put_prop_index(thr, f->consts_idx, (duk_uarridx_t) n); /* invalidates tv1, tv2 */ + return (duk_regconst_t) n | (duk_regconst_t) DUK__CONST_MARKER; +} + +DUK_LOCAL duk_bool_t duk__const_needs_refcount(duk_compiler_ctx *comp_ctx, duk_regconst_t rc) { +#if defined(DUK_USE_REFERENCE_COUNTING) + duk_compiler_func *f = &comp_ctx->curr_func; + duk_bool_t ret; + + DUK_ASSERT((rc & DUK__CONST_MARKER) == 0); /* caller removes const marker */ + (void) duk_get_prop_index(comp_ctx->thr, f->consts_idx, (duk_uarridx_t) rc); + ret = !duk_is_number(comp_ctx->thr, -1); /* now only number/string, so conservative check */ + duk_pop(comp_ctx->thr); + return ret; +#else + DUK_UNREF(comp_ctx); + DUK_UNREF(rc); + DUK_ASSERT((rc & DUK__CONST_MARKER) == 0); /* caller removes const marker */ + return 0; +#endif +} + +/* Get the value represented by an duk_ispec to a register or constant. + * The caller can control the result by indicating whether or not: + * + * (1) a constant is allowed (sometimes the caller needs the result to + * be in a register) + * + * (2) a temporary register is required (usually when caller requires + * the register to be safely mutable; normally either a bound + * register or a temporary register are both OK) + * + * (3) a forced register target needs to be used + * + * Bytecode may be emitted to generate the necessary value. The return + * value is either a register or a constant. + */ + +DUK_LOCAL +duk_regconst_t duk__ispec_toregconst_raw(duk_compiler_ctx *comp_ctx, + duk_ispec *x, + duk_regconst_t forced_reg, + duk_small_uint_t flags) { + duk_hthread *thr = comp_ctx->thr; + + DUK_DDD(DUK_DDDPRINT("duk__ispec_toregconst_raw(): x={%ld:%ld:%!T}, " + "forced_reg=%ld, flags 0x%08lx: allow_const=%ld require_temp=%ld require_short=%ld", + (long) x->t, + (long) x->regconst, + (duk_tval *) duk_get_tval(thr, x->valstack_idx), + (long) forced_reg, + (unsigned long) flags, + (long) ((flags & DUK__IVAL_FLAG_ALLOW_CONST) ? 1 : 0), + (long) ((flags & DUK__IVAL_FLAG_REQUIRE_TEMP) ? 1 : 0), + (long) ((flags & DUK__IVAL_FLAG_REQUIRE_SHORT) ? 1 : 0))); + + switch (x->t) { + case DUK_ISPEC_VALUE: { + duk_tval *tv; + + tv = DUK_GET_TVAL_POSIDX(thr, x->valstack_idx); + DUK_ASSERT(tv != NULL); + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNDEFINED: { + /* Note: although there is no 'undefined' literal, undefined + * values can occur during compilation as a result of e.g. + * the 'void' operator. + */ + duk_regconst_t dest = (forced_reg >= 0 ? forced_reg : DUK__ALLOCTEMP(comp_ctx)); + duk__emit_bc(comp_ctx, DUK_OP_LDUNDEF, dest); + return dest; + } + case DUK_TAG_NULL: { + duk_regconst_t dest = (forced_reg >= 0 ? forced_reg : DUK__ALLOCTEMP(comp_ctx)); + duk__emit_bc(comp_ctx, DUK_OP_LDNULL, dest); + return dest; + } + case DUK_TAG_BOOLEAN: { + duk_regconst_t dest = (forced_reg >= 0 ? forced_reg : DUK__ALLOCTEMP(comp_ctx)); + duk__emit_bc(comp_ctx, (DUK_TVAL_GET_BOOLEAN(tv) ? DUK_OP_LDTRUE : DUK_OP_LDFALSE), dest); + return dest; + } + case DUK_TAG_POINTER: { + DUK_UNREACHABLE(); + break; + } + case DUK_TAG_STRING: { + duk_hstring *h; + duk_regconst_t dest; + duk_regconst_t constidx; + + h = DUK_TVAL_GET_STRING(tv); + DUK_UNREF(h); + DUK_ASSERT(h != NULL); + +#if 0 /* XXX: to be implemented? */ + /* Use special opcodes to load short strings */ + if (DUK_HSTRING_GET_BYTELEN(h) <= 2) { + /* Encode into a single opcode (18 bits can encode 1-2 bytes + length indicator) */ + } else if (DUK_HSTRING_GET_BYTELEN(h) <= 6) { + /* Encode into a double constant (53 bits can encode 6*8 = 48 bits + 3-bit length */ + } +#endif + duk_dup(thr, x->valstack_idx); + constidx = duk__getconst(comp_ctx); + + if (flags & DUK__IVAL_FLAG_ALLOW_CONST) { + return constidx; + } + + dest = (forced_reg >= 0 ? forced_reg : DUK__ALLOCTEMP(comp_ctx)); + duk__emit_a_bc(comp_ctx, DUK_OP_LDCONST, dest, constidx); + return dest; + } + case DUK_TAG_OBJECT: { + DUK_UNREACHABLE(); + break; + } + case DUK_TAG_BUFFER: { + DUK_UNREACHABLE(); + break; + } + case DUK_TAG_LIGHTFUNC: { + DUK_UNREACHABLE(); + break; + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: { + /* number */ + duk_regconst_t dest; + duk_regconst_t constidx; + duk_double_t dval; + duk_int32_t ival; + + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + dval = DUK_TVAL_GET_NUMBER(tv); + + if (!(flags & DUK__IVAL_FLAG_ALLOW_CONST)) { + /* A number can be loaded either through a constant, using + * LDINT, or using LDINT+LDINTX. LDINT is always a size win, + * LDINT+LDINTX is not if the constant is used multiple times. + * Currently always prefer LDINT+LDINTX over a double constant. + */ + + if (duk_is_whole_get_int32_nonegzero(dval, &ival)) { + dest = (forced_reg >= 0 ? forced_reg : DUK__ALLOCTEMP(comp_ctx)); + duk__emit_load_int32(comp_ctx, dest, ival); + return dest; + } + } + + duk_dup(thr, x->valstack_idx); + constidx = duk__getconst(comp_ctx); + + if (flags & DUK__IVAL_FLAG_ALLOW_CONST) { + return constidx; + } else { + dest = (forced_reg >= 0 ? forced_reg : DUK__ALLOCTEMP(comp_ctx)); + duk__emit_a_bc(comp_ctx, DUK_OP_LDCONST, dest, constidx); + return dest; + } + } + } /* end switch */ + goto fail_internal; /* never here */ + } + case DUK_ISPEC_REGCONST: { + if (forced_reg >= 0) { + if (DUK__ISCONST(x->regconst)) { + duk__emit_a_bc(comp_ctx, DUK_OP_LDCONST, forced_reg, x->regconst); + } else if (x->regconst != forced_reg) { + duk__emit_a_bc(comp_ctx, DUK_OP_LDREG, forced_reg, x->regconst); + } else { + ; /* already in correct reg */ + } + return forced_reg; + } + + DUK_ASSERT(forced_reg < 0); + if (DUK__ISCONST(x->regconst)) { + if (!(flags & DUK__IVAL_FLAG_ALLOW_CONST)) { + duk_regconst_t dest = DUK__ALLOCTEMP(comp_ctx); + duk__emit_a_bc(comp_ctx, DUK_OP_LDCONST, dest, x->regconst); + return dest; + } + return x->regconst; + } + + DUK_ASSERT(forced_reg < 0 && !DUK__ISCONST(x->regconst)); + if ((flags & DUK__IVAL_FLAG_REQUIRE_TEMP) && !DUK__ISREG_TEMP(comp_ctx, x->regconst)) { + duk_regconst_t dest = DUK__ALLOCTEMP(comp_ctx); + duk__emit_a_bc(comp_ctx, DUK_OP_LDREG, dest, x->regconst); + return dest; + } + return x->regconst; + } + default: { + break; /* never here */ + } + } + +fail_internal: + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return 0;); +} + +DUK_LOCAL void duk__ispec_toforcedreg(duk_compiler_ctx *comp_ctx, duk_ispec *x, duk_regconst_t forced_reg) { + DUK_ASSERT(forced_reg >= 0); + (void) duk__ispec_toregconst_raw(comp_ctx, x, forced_reg, 0 /*flags*/); +} + +/* Coerce an duk_ivalue to a 'plain' value by generating the necessary + * arithmetic operations, property access, or variable access bytecode. + * The duk_ivalue argument ('x') is converted into a plain value as a + * side effect. + */ +DUK_LOCAL void duk__ivalue_toplain_raw(duk_compiler_ctx *comp_ctx, duk_ivalue *x, duk_regconst_t forced_reg) { + duk_hthread *thr = comp_ctx->thr; + + DUK_DDD(DUK_DDDPRINT("duk__ivalue_toplain_raw(): x={t=%ld,op=%ld,x1={%ld:%ld:%!T},x2={%ld:%ld:%!T}}, " + "forced_reg=%ld", + (long) x->t, + (long) x->op, + (long) x->x1.t, + (long) x->x1.regconst, + (duk_tval *) duk_get_tval(thr, x->x1.valstack_idx), + (long) x->x2.t, + (long) x->x2.regconst, + (duk_tval *) duk_get_tval(thr, x->x2.valstack_idx), + (long) forced_reg)); + + switch (x->t) { + case DUK_IVAL_PLAIN: { + return; + } + /* XXX: support unary arithmetic ivalues (useful?) */ + case DUK_IVAL_ARITH: { + duk_regconst_t arg1; + duk_regconst_t arg2; + duk_regconst_t dest; + duk_tval *tv1; + duk_tval *tv2; + + DUK_DDD(DUK_DDDPRINT("arith to plain conversion")); + + /* inline arithmetic check for constant values */ + /* XXX: use the exactly same arithmetic function here as in executor */ + if (x->x1.t == DUK_ISPEC_VALUE && x->x2.t == DUK_ISPEC_VALUE && x->t == DUK_IVAL_ARITH) { + tv1 = DUK_GET_TVAL_POSIDX(thr, x->x1.valstack_idx); + tv2 = DUK_GET_TVAL_POSIDX(thr, x->x2.valstack_idx); + DUK_ASSERT(tv1 != NULL); + DUK_ASSERT(tv2 != NULL); + + DUK_DDD(DUK_DDDPRINT("arith: tv1=%!T, tv2=%!T", (duk_tval *) tv1, (duk_tval *) tv2)); + + if (DUK_TVAL_IS_NUMBER(tv1) && DUK_TVAL_IS_NUMBER(tv2)) { + duk_double_t d1 = DUK_TVAL_GET_NUMBER(tv1); + duk_double_t d2 = DUK_TVAL_GET_NUMBER(tv2); + duk_double_t d3; + duk_bool_t accept_fold = 1; + + DUK_DDD(DUK_DDDPRINT("arith inline check: d1=%lf, d2=%lf, op=%ld", + (double) d1, + (double) d2, + (long) x->op)); + switch (x->op) { + case DUK_OP_ADD: { + d3 = d1 + d2; + break; + } + case DUK_OP_SUB: { + d3 = d1 - d2; + break; + } + case DUK_OP_MUL: { + d3 = d1 * d2; + break; + } + case DUK_OP_DIV: { + /* Division-by-zero is undefined + * behavior, so rely on a helper. + */ + d3 = duk_double_div(d1, d2); + break; + } + case DUK_OP_EXP: { + d3 = (duk_double_t) duk_js_arith_pow((double) d1, (double) d2); + break; + } + default: { + d3 = 0.0; /* Won't be used, but silence MSVC /W4 warning. */ + accept_fold = 0; + break; + } + } + + if (accept_fold) { + duk_double_union du; + du.d = d3; + DUK_DBLUNION_NORMALIZE_NAN_CHECK(&du); + d3 = du.d; + + x->t = DUK_IVAL_PLAIN; + DUK_ASSERT(x->x1.t == DUK_ISPEC_VALUE); + DUK_TVAL_SET_NUMBER(tv1, d3); /* old value is number: no refcount */ + return; + } + } else if (x->op == DUK_OP_ADD && DUK_TVAL_IS_STRING(tv1) && DUK_TVAL_IS_STRING(tv2)) { + /* Inline string concatenation. No need to check for + * symbols, as all inputs are valid ECMAScript strings. + */ + duk_dup(thr, x->x1.valstack_idx); + duk_dup(thr, x->x2.valstack_idx); + duk_concat(thr, 2); + duk_replace(thr, x->x1.valstack_idx); + x->t = DUK_IVAL_PLAIN; + DUK_ASSERT(x->x1.t == DUK_ISPEC_VALUE); + return; + } + } + + arg1 = duk__ispec_toregconst_raw(comp_ctx, + &x->x1, + -1, + DUK__IVAL_FLAG_ALLOW_CONST | DUK__IVAL_FLAG_REQUIRE_SHORT /*flags*/); + arg2 = duk__ispec_toregconst_raw(comp_ctx, + &x->x2, + -1, + DUK__IVAL_FLAG_ALLOW_CONST | DUK__IVAL_FLAG_REQUIRE_SHORT /*flags*/); + + /* If forced reg, use it as destination. Otherwise try to + * use either coerced ispec if it is a temporary. + */ + if (forced_reg >= 0) { + dest = forced_reg; + } else if (DUK__ISREG_TEMP(comp_ctx, arg1)) { + dest = arg1; + } else if (DUK__ISREG_TEMP(comp_ctx, arg2)) { + dest = arg2; + } else { + dest = DUK__ALLOCTEMP(comp_ctx); + } + + DUK_ASSERT(DUK__ISREG(dest)); + duk__emit_a_b_c(comp_ctx, x->op | DUK__EMIT_FLAG_BC_REGCONST, dest, arg1, arg2); + + duk__ivalue_regconst(x, dest); + return; + } + case DUK_IVAL_PROP: { + /* XXX: very similar to DUK_IVAL_ARITH - merge? */ + duk_regconst_t arg1; + duk_regconst_t arg2; + duk_regconst_t dest; + + /* Need a short reg/const, does not have to be a mutable temp. */ + arg1 = duk__ispec_toregconst_raw(comp_ctx, + &x->x1, + -1, + DUK__IVAL_FLAG_ALLOW_CONST | DUK__IVAL_FLAG_REQUIRE_SHORT /*flags*/); + arg2 = duk__ispec_toregconst_raw(comp_ctx, + &x->x2, + -1, + DUK__IVAL_FLAG_ALLOW_CONST | DUK__IVAL_FLAG_REQUIRE_SHORT /*flags*/); + + /* Pick a destination register. If either base value or key + * happens to be a temp value, reuse it as the destination. + * + * XXX: The temp must be a "mutable" one, i.e. such that no + * other expression is using it anymore. Here this should be + * the case because the value of a property access expression + * is neither the base nor the key, but the lookup result. + */ + + if (forced_reg >= 0) { + dest = forced_reg; + } else if (DUK__ISREG_TEMP(comp_ctx, arg1)) { + dest = arg1; + } else if (DUK__ISREG_TEMP(comp_ctx, arg2)) { + dest = arg2; + } else { + dest = DUK__ALLOCTEMP(comp_ctx); + } + + duk__emit_a_b_c(comp_ctx, DUK_OP_GETPROP | DUK__EMIT_FLAG_BC_REGCONST, dest, arg1, arg2); + + duk__ivalue_regconst(x, dest); + return; + } + case DUK_IVAL_VAR: { + /* x1 must be a string */ + duk_regconst_t dest; + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + + DUK_ASSERT(x->x1.t == DUK_ISPEC_VALUE); + + duk_dup(thr, x->x1.valstack_idx); + if (duk__lookup_lhs(comp_ctx, ®_varbind, &rc_varname)) { + duk__ivalue_regconst(x, reg_varbind); + } else { + dest = (forced_reg >= 0 ? forced_reg : DUK__ALLOCTEMP(comp_ctx)); + duk__emit_a_bc(comp_ctx, DUK_OP_GETVAR, dest, rc_varname); + duk__ivalue_regconst(x, dest); + } + return; + } + case DUK_IVAL_NONE: + default: { + DUK_D(DUK_DPRINT("invalid ivalue type: %ld", (long) x->t)); + break; + } + } + + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return;); +} + +/* evaluate to plain value, no forced register (temp/bound reg both ok) */ +DUK_LOCAL void duk__ivalue_toplain(duk_compiler_ctx *comp_ctx, duk_ivalue *x) { + duk__ivalue_toplain_raw(comp_ctx, x, -1 /*forced_reg*/); +} + +/* evaluate to final form (e.g. coerce GETPROP to code), throw away temp */ +DUK_LOCAL void duk__ivalue_toplain_ignore(duk_compiler_ctx *comp_ctx, duk_ivalue *x) { + duk_regconst_t temp; + + /* If duk__ivalue_toplain_raw() allocates a temp, forget it and + * restore next temp state. + */ + temp = DUK__GETTEMP(comp_ctx); + duk__ivalue_toplain_raw(comp_ctx, x, -1 /*forced_reg*/); + DUK__SETTEMP(comp_ctx, temp); +} + +/* Coerce an duk_ivalue to a register or constant; result register may + * be a temp or a bound register. + * + * The duk_ivalue argument ('x') is converted into a regconst as a + * side effect. + */ +DUK_LOCAL +duk_regconst_t duk__ivalue_toregconst_raw(duk_compiler_ctx *comp_ctx, + duk_ivalue *x, + duk_regconst_t forced_reg, + duk_small_uint_t flags) { + duk_hthread *thr = comp_ctx->thr; + duk_regconst_t reg; + DUK_UNREF(thr); + + DUK_DDD(DUK_DDDPRINT("duk__ivalue_toregconst_raw(): x={t=%ld,op=%ld,x1={%ld:%ld:%!T},x2={%ld:%ld:%!T}}, " + "forced_reg=%ld, flags 0x%08lx: allow_const=%ld require_temp=%ld require_short=%ld", + (long) x->t, + (long) x->op, + (long) x->x1.t, + (long) x->x1.regconst, + (duk_tval *) duk_get_tval(thr, x->x1.valstack_idx), + (long) x->x2.t, + (long) x->x2.regconst, + (duk_tval *) duk_get_tval(thr, x->x2.valstack_idx), + (long) forced_reg, + (unsigned long) flags, + (long) ((flags & DUK__IVAL_FLAG_ALLOW_CONST) ? 1 : 0), + (long) ((flags & DUK__IVAL_FLAG_REQUIRE_TEMP) ? 1 : 0), + (long) ((flags & DUK__IVAL_FLAG_REQUIRE_SHORT) ? 1 : 0))); + + /* first coerce to a plain value */ + duk__ivalue_toplain_raw(comp_ctx, x, forced_reg); + DUK_ASSERT(x->t == DUK_IVAL_PLAIN); + + /* then to a register */ + reg = duk__ispec_toregconst_raw(comp_ctx, &x->x1, forced_reg, flags); + duk__ivalue_regconst(x, reg); + + return reg; +} + +DUK_LOCAL duk_regconst_t duk__ivalue_toreg(duk_compiler_ctx *comp_ctx, duk_ivalue *x) { + return duk__ivalue_toregconst_raw(comp_ctx, x, -1, 0 /*flags*/); +} + +#if 0 /* unused */ +DUK_LOCAL duk_regconst_t duk__ivalue_totemp(duk_compiler_ctx *comp_ctx, duk_ivalue *x) { + return duk__ivalue_toregconst_raw(comp_ctx, x, -1, DUK__IVAL_FLAG_REQUIRE_TEMP /*flags*/); +} +#endif + +DUK_LOCAL void duk__ivalue_toforcedreg(duk_compiler_ctx *comp_ctx, duk_ivalue *x, duk_int_t forced_reg) { + DUK_ASSERT(forced_reg >= 0); + (void) duk__ivalue_toregconst_raw(comp_ctx, x, forced_reg, 0 /*flags*/); +} + +DUK_LOCAL duk_regconst_t duk__ivalue_toregconst(duk_compiler_ctx *comp_ctx, duk_ivalue *x) { + return duk__ivalue_toregconst_raw(comp_ctx, x, -1, DUK__IVAL_FLAG_ALLOW_CONST /*flags*/); +} + +DUK_LOCAL duk_regconst_t duk__ivalue_totempconst(duk_compiler_ctx *comp_ctx, duk_ivalue *x) { + return duk__ivalue_toregconst_raw(comp_ctx, x, -1, DUK__IVAL_FLAG_ALLOW_CONST | DUK__IVAL_FLAG_REQUIRE_TEMP /*flags*/); +} + +/* The issues below can be solved with better flags */ + +/* XXX: many operations actually want toforcedtemp() -- brand new temp? */ +/* XXX: need a toplain_ignore() which will only coerce a value to a temp + * register if it might have a side effect. Side-effect free values do not + * need to be coerced. + */ + +/* + * Identifier handling + */ + +DUK_LOCAL duk_regconst_t duk__lookup_active_register_binding(duk_compiler_ctx *comp_ctx) { + duk_hthread *thr = comp_ctx->thr; + duk_hstring *h_varname; + duk_regconst_t ret; + + DUK_DDD(DUK_DDDPRINT("resolving identifier reference to '%!T'", (duk_tval *) duk_get_tval(thr, -1))); + + /* + * Special name handling + */ + + h_varname = duk_known_hstring(thr, -1); + + if (h_varname == DUK_HTHREAD_STRING_LC_ARGUMENTS(thr)) { + DUK_DDD(DUK_DDDPRINT("flagging function as accessing 'arguments'")); + comp_ctx->curr_func.id_access_arguments = 1; + } + + /* + * Inside one or more 'with' statements fall back to slow path always. + * (See e.g. test-stmt-with.js.) + */ + + if (comp_ctx->curr_func.with_depth > 0) { + DUK_DDD(DUK_DDDPRINT("identifier lookup inside a 'with' -> fall back to slow path")); + goto slow_path_own; + } + + /* + * Any catch bindings ("catch (e)") also affect identifier binding. + * + * Currently, the varmap is modified for the duration of the catch + * clause to ensure any identifier accesses with the catch variable + * name will use slow path. + */ + + duk_get_prop(thr, comp_ctx->curr_func.varmap_idx); + if (duk_is_number(thr, -1)) { + ret = duk_to_int(thr, -1); + duk_pop(thr); + } else { + duk_pop(thr); + if (comp_ctx->curr_func.catch_depth > 0 || comp_ctx->curr_func.with_depth > 0) { + DUK_DDD(DUK_DDDPRINT("slow path access from inside a try-catch or with needs _Varmap")); + goto slow_path_own; + } else { + /* In this case we're doing a variable lookup that doesn't + * match our own variables, so _Varmap won't be needed at + * run time. + */ + DUK_DDD(DUK_DDDPRINT("slow path access outside of try-catch and with, no need for _Varmap")); + goto slow_path_notown; + } + } + + DUK_DDD(DUK_DDDPRINT("identifier lookup -> reg %ld", (long) ret)); + return ret; + +slow_path_notown: + DUK_DDD(DUK_DDDPRINT("identifier lookup -> slow path, not own variable")); + + comp_ctx->curr_func.id_access_slow = 1; + return (duk_regconst_t) -1; + +slow_path_own: + DUK_DDD(DUK_DDDPRINT("identifier lookup -> slow path, may be own variable")); + + comp_ctx->curr_func.id_access_slow = 1; + comp_ctx->curr_func.id_access_slow_own = 1; + return (duk_regconst_t) -1; +} + +/* Lookup an identifier name in the current varmap, indicating whether the + * identifier is register-bound and if not, allocating a constant for the + * identifier name. Returns 1 if register-bound, 0 otherwise. Caller can + * also check (out_reg_varbind >= 0) to check whether or not identifier is + * register bound. The caller must NOT use out_rc_varname at all unless + * return code is 0 or out_reg_varbind is < 0; this is becuase out_rc_varname + * is unsigned and doesn't have a "unused" / none value. + */ +DUK_LOCAL duk_bool_t duk__lookup_lhs(duk_compiler_ctx *comp_ctx, duk_regconst_t *out_reg_varbind, duk_regconst_t *out_rc_varname) { + duk_hthread *thr = comp_ctx->thr; + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + + /* [ ... varname ] */ + + duk_dup_top(thr); + reg_varbind = duk__lookup_active_register_binding(comp_ctx); + + if (reg_varbind >= 0) { + *out_reg_varbind = reg_varbind; + *out_rc_varname = 0; /* duk_regconst_t is unsigned, so use 0 as dummy value (ignored by caller) */ + duk_pop(thr); + return 1; + } else { + rc_varname = duk__getconst(comp_ctx); + *out_reg_varbind = -1; + *out_rc_varname = rc_varname; + return 0; + } +} + +/* + * Label handling + * + * Labels are initially added with flags prohibiting both break and continue. + * When the statement type is finally uncovered (after potentially multiple + * labels), all the labels are updated to allow/prohibit break and continue. + */ + +DUK_LOCAL void duk__add_label(duk_compiler_ctx *comp_ctx, duk_hstring *h_label, duk_int_t pc_label, duk_int_t label_id) { + duk_hthread *thr = comp_ctx->thr; + duk_size_t n; + duk_size_t new_size; + duk_uint8_t *p; + duk_labelinfo *li_start, *li; + + /* Duplicate (shadowing) labels are not allowed, except for the empty + * labels (which are used as default labels for switch and iteration + * statements). + * + * We could also allow shadowing of non-empty pending labels without any + * other issues than breaking the required label shadowing requirements + * of the E5 specification, see Section 12.12. + */ + + p = (duk_uint8_t *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(thr->heap, comp_ctx->curr_func.h_labelinfos); + li_start = (duk_labelinfo *) (void *) p; + li = (duk_labelinfo *) (void *) (p + DUK_HBUFFER_GET_SIZE(comp_ctx->curr_func.h_labelinfos)); + n = (duk_size_t) (li - li_start); + + while (li > li_start) { + li--; + + if (li->h_label == h_label && h_label != DUK_HTHREAD_STRING_EMPTY_STRING(thr)) { + DUK_ERROR_SYNTAX(thr, DUK_STR_DUPLICATE_LABEL); + DUK_WO_NORETURN(return;); + } + } + + duk_push_hstring(thr, h_label); + DUK_ASSERT(n <= DUK_UARRIDX_MAX); /* label limits */ + (void) duk_put_prop_index(thr, comp_ctx->curr_func.labelnames_idx, (duk_uarridx_t) n); + + new_size = (n + 1) * sizeof(duk_labelinfo); + duk_hbuffer_resize(thr, comp_ctx->curr_func.h_labelinfos, new_size); + /* XXX: slack handling, slow now */ + + /* relookup after possible realloc */ + p = (duk_uint8_t *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(thr->heap, comp_ctx->curr_func.h_labelinfos); + li_start = (duk_labelinfo *) (void *) p; + DUK_UNREF(li_start); /* silence scan-build warning */ + li = (duk_labelinfo *) (void *) (p + DUK_HBUFFER_GET_SIZE(comp_ctx->curr_func.h_labelinfos)); + li--; + + /* Labels can be used for iteration statements but also for other statements, + * in particular a label can be used for a block statement. All cases of a + * named label accept a 'break' so that flag is set here. Iteration statements + * also allow 'continue', so that flag is updated when we figure out the + * statement type. + */ + + li->flags = DUK_LABEL_FLAG_ALLOW_BREAK; + li->label_id = label_id; + li->h_label = h_label; + li->catch_depth = comp_ctx->curr_func.catch_depth; /* catch depth from current func */ + li->pc_label = pc_label; + + DUK_DDD(DUK_DDDPRINT("registered label: flags=0x%08lx, id=%ld, name=%!O, catch_depth=%ld, pc_label=%ld", + (unsigned long) li->flags, + (long) li->label_id, + (duk_heaphdr *) li->h_label, + (long) li->catch_depth, + (long) li->pc_label)); +} + +/* Update all labels with matching label_id. */ +DUK_LOCAL void duk__update_label_flags(duk_compiler_ctx *comp_ctx, duk_int_t label_id, duk_small_uint_t flags) { + duk_uint8_t *p; + duk_labelinfo *li_start, *li; + + p = (duk_uint8_t *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(comp_ctx->thr->heap, comp_ctx->curr_func.h_labelinfos); + li_start = (duk_labelinfo *) (void *) p; + li = (duk_labelinfo *) (void *) (p + DUK_HBUFFER_GET_SIZE(comp_ctx->curr_func.h_labelinfos)); + + /* Match labels starting from latest; once label_id no longer matches, we can + * safely exit without checking the rest of the labels (only the topmost labels + * are ever updated). + */ + while (li > li_start) { + li--; + + if (li->label_id != label_id) { + break; + } + + DUK_DDD(DUK_DDDPRINT("updating (overwriting) label flags for li=%p, label_id=%ld, flags=%ld", + (void *) li, + (long) label_id, + (long) flags)); + + li->flags = flags; + } +} + +/* Lookup active label information. Break/continue distinction is necessary to handle switch + * statement related labels correctly: a switch will only catch a 'break', not a 'continue'. + * + * An explicit label cannot appear multiple times in the active set, but empty labels (unlabelled + * iteration and switch statements) can. A break will match the closest unlabelled or labelled + * statement. A continue will match the closest unlabelled or labelled iteration statement. It is + * a syntax error if a continue matches a labelled switch statement; because an explicit label cannot + * be duplicated, the continue cannot match any valid label outside the switch. + * + * A side effect of these rules is that a LABEL statement related to a switch should never actually + * catch a continue abrupt completion at run-time. Hence an INVALID opcode can be placed in the + * continue slot of the switch's LABEL statement. + */ + +/* XXX: awkward, especially the bunch of separate output values -> output struct? */ +DUK_LOCAL void duk__lookup_active_label(duk_compiler_ctx *comp_ctx, + duk_hstring *h_label, + duk_bool_t is_break, + duk_int_t *out_label_id, + duk_int_t *out_label_catch_depth, + duk_int_t *out_label_pc, + duk_bool_t *out_is_closest) { + duk_hthread *thr = comp_ctx->thr; + duk_uint8_t *p; + duk_labelinfo *li_start, *li_end, *li; + duk_bool_t match = 0; + + DUK_DDD(DUK_DDDPRINT("looking up active label: label='%!O', is_break=%ld", (duk_heaphdr *) h_label, (long) is_break)); + + DUK_UNREF(thr); + + p = (duk_uint8_t *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(thr->heap, comp_ctx->curr_func.h_labelinfos); + li_start = (duk_labelinfo *) (void *) p; + li_end = (duk_labelinfo *) (void *) (p + DUK_HBUFFER_GET_SIZE(comp_ctx->curr_func.h_labelinfos)); + li = li_end; + + /* Match labels starting from latest label because there can be duplicate empty + * labels in the label set. + */ + while (li > li_start) { + li--; + + if (li->h_label != h_label) { + DUK_DDD(DUK_DDDPRINT("labelinfo[%ld] ->'%!O' != %!O", + (long) (li - li_start), + (duk_heaphdr *) li->h_label, + (duk_heaphdr *) h_label)); + continue; + } + + DUK_DDD(DUK_DDDPRINT("labelinfo[%ld] -> '%!O' label name matches (still need to check type)", + (long) (li - li_start), + (duk_heaphdr *) h_label)); + + /* currently all labels accept a break, so no explicit check for it now */ + DUK_ASSERT(li->flags & DUK_LABEL_FLAG_ALLOW_BREAK); + + if (is_break) { + /* break matches always */ + match = 1; + break; + } else if (li->flags & DUK_LABEL_FLAG_ALLOW_CONTINUE) { + /* iteration statements allow continue */ + match = 1; + break; + } else { + /* continue matched this label -- we can only continue if this is the empty + * label, for which duplication is allowed, and thus there is hope of + * finding a match deeper in the label stack. + */ + if (h_label != DUK_HTHREAD_STRING_EMPTY_STRING(thr)) { + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_LABEL); + DUK_WO_NORETURN(return;); + } else { + DUK_DDD(DUK_DDDPRINT("continue matched an empty label which does not " + "allow a continue -> continue lookup deeper in label stack")); + } + } + } + /* XXX: match flag is awkward, rework */ + if (!match) { + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_LABEL); + DUK_WO_NORETURN(return;); + } + + DUK_DDD(DUK_DDDPRINT("label match: %!O -> label_id %ld, catch_depth=%ld, pc_label=%ld", + (duk_heaphdr *) h_label, + (long) li->label_id, + (long) li->catch_depth, + (long) li->pc_label)); + + *out_label_id = li->label_id; + *out_label_catch_depth = li->catch_depth; + *out_label_pc = li->pc_label; + *out_is_closest = (li == li_end - 1); +} + +DUK_LOCAL void duk__reset_labels_to_length(duk_compiler_ctx *comp_ctx, duk_size_t len) { + duk_hthread *thr = comp_ctx->thr; + + duk_set_length(thr, comp_ctx->curr_func.labelnames_idx, len); + duk_hbuffer_resize(thr, comp_ctx->curr_func.h_labelinfos, sizeof(duk_labelinfo) * len); +} + +/* + * Expression parsing: duk__expr_nud(), duk__expr_led(), duk__expr_lbp(), and helpers. + * + * - duk__expr_nud(): ("null denotation"): process prev_token as a "start" of an expression (e.g. literal) + * - duk__expr_led(): ("left denotation"): process prev_token in the "middle" of an expression (e.g. operator) + * - duk__expr_lbp(): ("left-binding power"): return left-binding power of curr_token + */ + +/* object literal key tracking flags */ +#define DUK__OBJ_LIT_KEY_PLAIN (1 << 0) /* key encountered as a plain property */ +#define DUK__OBJ_LIT_KEY_GET (1 << 1) /* key encountered as a getter */ +#define DUK__OBJ_LIT_KEY_SET (1 << 2) /* key encountered as a setter */ + +DUK_LOCAL void duk__nud_array_literal(duk_compiler_ctx *comp_ctx, duk_ivalue *res) { + duk_hthread *thr = comp_ctx->thr; + duk_regconst_t reg_obj; /* result reg */ + duk_regconst_t reg_temp; /* temp reg */ + duk_regconst_t temp_start; /* temp reg value for start of loop */ + duk_small_uint_t max_init_values; /* max # of values initialized in one MPUTARR set */ + duk_small_uint_t num_values; /* number of values in current MPUTARR set */ + duk_uarridx_t curr_idx; /* current (next) array index */ + duk_uarridx_t start_idx; /* start array index of current MPUTARR set */ + duk_uarridx_t init_idx; /* last array index explicitly initialized, +1 */ + duk_bool_t require_comma; /* next loop requires a comma */ +#if !defined(DUK_USE_PREFER_SIZE) + duk_int_t pc_newarr; + duk_compiler_instr *instr; +#endif + + /* DUK_TOK_LBRACKET already eaten, current token is right after that */ + DUK_ASSERT(comp_ctx->prev_token.t == DUK_TOK_LBRACKET); + + max_init_values = DUK__MAX_ARRAY_INIT_VALUES; /* XXX: depend on available temps? */ + + reg_obj = DUK__ALLOCTEMP(comp_ctx); +#if !defined(DUK_USE_PREFER_SIZE) + pc_newarr = duk__get_current_pc(comp_ctx); +#endif + duk__emit_bc(comp_ctx, DUK_OP_NEWARR, reg_obj); /* XXX: patch initial size hint afterwards? */ + temp_start = DUK__GETTEMP(comp_ctx); + + /* + * Emit initializers in sets of maximum max_init_values. + * Corner cases such as single value initializers do not have + * special handling now. + * + * Elided elements must not be emitted as 'undefined' values, + * because such values would be enumerable (which is incorrect). + * Also note that trailing elisions must be reflected in the + * length of the final array but cause no elements to be actually + * inserted. + */ + + curr_idx = 0; + init_idx = 0; /* tracks maximum initialized index + 1 */ + start_idx = 0; + require_comma = 0; + + for (;;) { + num_values = 0; + DUK__SETTEMP(comp_ctx, temp_start); + + if (comp_ctx->curr_token.t == DUK_TOK_RBRACKET) { + break; + } + + for (;;) { + if (comp_ctx->curr_token.t == DUK_TOK_RBRACKET) { + /* the outer loop will recheck and exit */ + break; + } + + /* comma check */ + if (require_comma) { + if (comp_ctx->curr_token.t == DUK_TOK_COMMA) { + /* comma after a value, expected */ + duk__advance(comp_ctx); + require_comma = 0; + continue; + } else { + goto syntax_error; + } + } else { + if (comp_ctx->curr_token.t == DUK_TOK_COMMA) { + /* elision - flush */ + curr_idx++; + duk__advance(comp_ctx); + /* if num_values > 0, MPUTARR emitted by outer loop after break */ + break; + } + } + /* else an array initializer element */ + + /* initial index */ + if (num_values == 0) { + start_idx = curr_idx; + reg_temp = DUK__ALLOCTEMP(comp_ctx); + duk__emit_load_int32(comp_ctx, reg_temp, (duk_int32_t) start_idx); + } + + reg_temp = DUK__ALLOCTEMP(comp_ctx); /* alloc temp just in case, to update max temp */ + DUK__SETTEMP(comp_ctx, reg_temp); + duk__expr_toforcedreg(comp_ctx, res, DUK__BP_COMMA /*rbp_flags*/, reg_temp /*forced_reg*/); + DUK__SETTEMP(comp_ctx, reg_temp + 1); + + num_values++; + curr_idx++; + require_comma = 1; + + if (num_values >= max_init_values) { + /* MPUTARR emitted by outer loop */ + break; + } + } + + if (num_values > 0) { + /* - A is a source register (it's not a write target, but used + * to identify the target object) but can be shuffled. + * - B cannot be shuffled normally because it identifies a range + * of registers, the emitter has special handling for this + * (the "no shuffle" flag must not be set). + * - C is a non-register number and cannot be shuffled, but + * never needs to be. + */ + duk__emit_a_b_c(comp_ctx, + DUK_OP_MPUTARR | DUK__EMIT_FLAG_NO_SHUFFLE_C | DUK__EMIT_FLAG_A_IS_SOURCE, + reg_obj, + temp_start, + (duk_regconst_t) (num_values + 1)); + init_idx = start_idx + num_values; + + /* num_values and temp_start reset at top of outer loop */ + } + } + + /* Update initil size for NEWARR, doesn't need to be exact and is + * capped at A field limit. + */ +#if !defined(DUK_USE_PREFER_SIZE) + instr = duk__get_instr_ptr(comp_ctx, pc_newarr); + instr->ins |= DUK_ENC_OP_A(0, curr_idx > DUK_BC_A_MAX ? DUK_BC_A_MAX : curr_idx); +#endif + + DUK_ASSERT(comp_ctx->curr_token.t == DUK_TOK_RBRACKET); + duk__advance(comp_ctx); + + DUK_DDD(DUK_DDDPRINT("array literal done, curridx=%ld, initidx=%ld", (long) curr_idx, (long) init_idx)); + + /* trailing elisions? */ + if (curr_idx > init_idx) { + /* yes, must set array length explicitly */ + DUK_DDD(DUK_DDDPRINT("array literal has trailing elisions which affect its length")); + reg_temp = DUK__ALLOCTEMP(comp_ctx); + duk__emit_load_int32(comp_ctx, reg_temp, (duk_int_t) curr_idx); + duk__emit_a_bc(comp_ctx, DUK_OP_SETALEN | DUK__EMIT_FLAG_A_IS_SOURCE, reg_obj, reg_temp); + } + + DUK__SETTEMP(comp_ctx, temp_start); + + duk__ivalue_regconst(res, reg_obj); + return; + +syntax_error: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_ARRAY_LITERAL); + DUK_WO_NORETURN(return;); +} + +typedef struct { + duk_regconst_t reg_obj; + duk_regconst_t temp_start; + duk_small_uint_t num_pairs; + duk_small_uint_t num_total_pairs; +} duk__objlit_state; + +DUK_LOCAL void duk__objlit_flush_keys(duk_compiler_ctx *comp_ctx, duk__objlit_state *st) { + if (st->num_pairs > 0) { + /* - A is a source register (it's not a write target, but used + * to identify the target object) but can be shuffled. + * - B cannot be shuffled normally because it identifies a range + * of registers, the emitter has special handling for this + * (the "no shuffle" flag must not be set). + * - C is a non-register number and cannot be shuffled, but + * never needs to be. + */ + DUK_ASSERT(st->num_pairs > 0); + duk__emit_a_b_c(comp_ctx, + DUK_OP_MPUTOBJ | DUK__EMIT_FLAG_NO_SHUFFLE_C | DUK__EMIT_FLAG_A_IS_SOURCE, + st->reg_obj, + st->temp_start, + (duk_regconst_t) (st->num_pairs * 2)); + st->num_total_pairs += st->num_pairs; + st->num_pairs = 0; + } + DUK__SETTEMP(comp_ctx, st->temp_start); +} + +DUK_LOCAL duk_bool_t duk__objlit_load_key(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_token *tok, duk_regconst_t reg_temp) { + if (tok->t_nores == DUK_TOK_IDENTIFIER || tok->t_nores == DUK_TOK_STRING) { + /* same handling for identifiers and strings */ + DUK_ASSERT(tok->str1 != NULL); + duk_push_hstring(comp_ctx->thr, tok->str1); + } else if (tok->t == DUK_TOK_NUMBER) { + /* numbers can be loaded as numbers and coerced on the fly */ + duk_push_number(comp_ctx->thr, tok->num); + } else { + return 1; /* error */ + } + + duk__ivalue_plain_fromstack(comp_ctx, res); + DUK__SETTEMP(comp_ctx, reg_temp + 1); + duk__ivalue_toforcedreg(comp_ctx, res, reg_temp); + DUK__SETTEMP(comp_ctx, reg_temp + 1); + return 0; +} + +DUK_LOCAL void duk__nud_object_literal(duk_compiler_ctx *comp_ctx, duk_ivalue *res) { + duk_hthread *thr = comp_ctx->thr; + duk__objlit_state st; + duk_regconst_t reg_temp; /* temp reg */ + duk_small_uint_t max_init_pairs; /* max # of key-value pairs initialized in one MPUTOBJ set */ + duk_bool_t first; /* first value: comma must not precede the value */ + duk_bool_t is_set, is_get; /* temps */ +#if !defined(DUK_USE_PREFER_SIZE) + duk_int_t pc_newobj; + duk_compiler_instr *instr; +#endif + + DUK_ASSERT(comp_ctx->prev_token.t == DUK_TOK_LCURLY); + + max_init_pairs = DUK__MAX_OBJECT_INIT_PAIRS; /* XXX: depend on available temps? */ + + st.reg_obj = DUK__ALLOCTEMP(comp_ctx); /* target object */ + st.temp_start = DUK__GETTEMP(comp_ctx); /* start of MPUTOBJ argument list */ + st.num_pairs = 0; /* number of key/value pairs emitted for current MPUTOBJ set */ + st.num_total_pairs = 0; /* number of key/value pairs emitted overall */ + +#if !defined(DUK_USE_PREFER_SIZE) + pc_newobj = duk__get_current_pc(comp_ctx); +#endif + duk__emit_bc(comp_ctx, DUK_OP_NEWOBJ, st.reg_obj); + + /* + * Emit initializers in sets of maximum max_init_pairs keys. + * Setter/getter is handled separately and terminates the + * current set of initializer values. Corner cases such as + * single value initializers do not have special handling now. + */ + + first = 1; + for (;;) { + /* + * ES5 and ES2015+ provide a lot of different PropertyDefinition + * formats, see http://www.ecma-international.org/ecma-262/6.0/#sec-object-initializer. + * + * PropertyName can be IdentifierName (includes reserved words), a string + * literal, or a number literal. Note that IdentifierName allows 'get' and + * 'set' too, so we need to look ahead to the next token to distinguish: + * + * { get : 1 } + * + * and + * + * { get foo() { return 1 } } + * { get get() { return 1 } } // 'get' as getter propertyname + * + * Finally, a trailing comma is allowed. + * + * Key name is coerced to string at compile time (and ends up as a + * a string constant) even for numeric keys (e.g. "{1:'foo'}"). + * These could be emitted using e.g. LDINT, but that seems hardly + * worth the effort and would increase code size. + */ + + DUK_DDD(DUK_DDDPRINT("object literal loop, curr_token->t = %ld", (long) comp_ctx->curr_token.t)); + + if (comp_ctx->curr_token.t == DUK_TOK_RCURLY) { + break; + } + + if (first) { + first = 0; + } else { + if (comp_ctx->curr_token.t != DUK_TOK_COMMA) { + goto syntax_error; + } + duk__advance(comp_ctx); + if (comp_ctx->curr_token.t == DUK_TOK_RCURLY) { + /* trailing comma followed by rcurly */ + break; + } + } + + /* Advance to get one step of lookup. */ + duk__advance(comp_ctx); + + /* Flush current MPUTOBJ if enough many pairs gathered. */ + if (st.num_pairs >= max_init_pairs) { + duk__objlit_flush_keys(comp_ctx, &st); + DUK_ASSERT(st.num_pairs == 0); + } + + /* Reset temp register state and reserve reg_temp and + * reg_temp + 1 for handling the current property. + */ + DUK__SETTEMP(comp_ctx, st.temp_start + 2 * (duk_regconst_t) st.num_pairs); + reg_temp = DUK__ALLOCTEMPS(comp_ctx, 2); + + /* NOTE: "get" and "set" are not officially ReservedWords and the lexer + * currently treats them always like ordinary identifiers (DUK_TOK_GET + * and DUK_TOK_SET are unused). They need to be detected based on the + * identifier string content. + */ + + is_get = (comp_ctx->prev_token.t == DUK_TOK_IDENTIFIER && comp_ctx->prev_token.str1 == DUK_HTHREAD_STRING_GET(thr)); + is_set = (comp_ctx->prev_token.t == DUK_TOK_IDENTIFIER && comp_ctx->prev_token.str1 == DUK_HTHREAD_STRING_SET(thr)); + if ((is_get || is_set) && comp_ctx->curr_token.t != DUK_TOK_COLON) { + /* getter/setter */ + duk_int_t fnum; + + duk__objlit_flush_keys(comp_ctx, &st); + DUK_ASSERT(DUK__GETTEMP(comp_ctx) == + st.temp_start); /* 2 regs are guaranteed to be allocated w.r.t. temp_max */ + reg_temp = DUK__ALLOCTEMPS(comp_ctx, 2); + + if (duk__objlit_load_key(comp_ctx, res, &comp_ctx->curr_token, reg_temp) != 0) { + goto syntax_error; + } + + /* curr_token = get/set name */ + fnum = duk__parse_func_like_fnum(comp_ctx, DUK__FUNC_FLAG_GETSET); + + duk__emit_a_bc(comp_ctx, DUK_OP_CLOSURE, st.temp_start + 1, (duk_regconst_t) fnum); + + /* Slot C is used in a non-standard fashion (range of regs), + * emitter code has special handling for it (must not set the + * "no shuffle" flag). + */ + duk__emit_a_bc(comp_ctx, + (is_get ? DUK_OP_INITGET : DUK_OP_INITSET) | DUK__EMIT_FLAG_A_IS_SOURCE, + st.reg_obj, + st.temp_start); /* temp_start+0 = key, temp_start+1 = closure */ + + DUK_ASSERT(st.num_pairs == 0); /* temp state is reset on next loop */ +#if defined(DUK_USE_ES6) + } else if (comp_ctx->prev_token.t == DUK_TOK_IDENTIFIER && + (comp_ctx->curr_token.t == DUK_TOK_COMMA || comp_ctx->curr_token.t == DUK_TOK_RCURLY)) { + duk_bool_t load_rc; + + load_rc = duk__objlit_load_key(comp_ctx, res, &comp_ctx->prev_token, reg_temp); + DUK_UNREF(load_rc); + DUK_ASSERT(load_rc == 0); /* always succeeds because token is identifier */ + + duk__ivalue_var_hstring(comp_ctx, res, comp_ctx->prev_token.str1); + DUK_ASSERT(DUK__GETTEMP(comp_ctx) == reg_temp + 1); + duk__ivalue_toforcedreg(comp_ctx, res, reg_temp + 1); + + st.num_pairs++; + } else if ((comp_ctx->prev_token.t == DUK_TOK_IDENTIFIER || comp_ctx->prev_token.t == DUK_TOK_STRING || + comp_ctx->prev_token.t == DUK_TOK_NUMBER) && + comp_ctx->curr_token.t == DUK_TOK_LPAREN) { + duk_int_t fnum; + + /* Parsing-wise there's a small hickup here: the token parsing + * state is one step too advanced for the function parse helper + * compared to other cases. The current solution is an extra + * flag to indicate whether function parsing should use the + * current or the previous token to starting parsing from. + */ + + if (duk__objlit_load_key(comp_ctx, res, &comp_ctx->prev_token, reg_temp) != 0) { + goto syntax_error; + } + + fnum = duk__parse_func_like_fnum(comp_ctx, DUK__FUNC_FLAG_USE_PREVTOKEN | DUK__FUNC_FLAG_METDEF); + + duk__emit_a_bc(comp_ctx, DUK_OP_CLOSURE, reg_temp + 1, (duk_regconst_t) fnum); + + st.num_pairs++; +#endif /* DUK_USE_ES6 */ + } else { +#if defined(DUK_USE_ES6) + if (comp_ctx->prev_token.t == DUK_TOK_LBRACKET) { + /* ES2015 computed property name. Executor ToPropertyKey() + * coerces the key at runtime. + */ + DUK__SETTEMP(comp_ctx, reg_temp); + duk__expr_toforcedreg(comp_ctx, res, DUK__BP_FOR_EXPR, reg_temp); + duk__advance_expect(comp_ctx, DUK_TOK_RBRACKET); + + /* XXX: If next token is '(' we're dealing with + * the method shorthand with a computed name, + * e.g. { [Symbol.for('foo')](a,b) {} }. This + * form is not yet supported and causes a + * SyntaxError on the DUK_TOK_COLON check below. + */ + } else +#endif /* DUK_USE_ES6 */ + { + if (duk__objlit_load_key(comp_ctx, res, &comp_ctx->prev_token, reg_temp) != 0) { + goto syntax_error; + } + } + + duk__advance_expect(comp_ctx, DUK_TOK_COLON); + + DUK__SETTEMP(comp_ctx, reg_temp + 1); + duk__expr_toforcedreg(comp_ctx, res, DUK__BP_COMMA /*rbp_flags*/, reg_temp + 1 /*forced_reg*/); + + st.num_pairs++; + } + } /* property loop */ + + /* Flush remaining properties. */ + duk__objlit_flush_keys(comp_ctx, &st); + DUK_ASSERT(st.num_pairs == 0); + DUK_ASSERT(DUK__GETTEMP(comp_ctx) == st.temp_start); + + /* Update initial size for NEWOBJ. The init size doesn't need to be + * exact as the purpose is just to avoid object resizes in common + * cases. The size is capped to field A limit, and will be too high + * if the object literal contains duplicate keys (this is harmless but + * increases memory traffic if the object is compacted later on). + */ +#if !defined(DUK_USE_PREFER_SIZE) + instr = duk__get_instr_ptr(comp_ctx, pc_newobj); + instr->ins |= DUK_ENC_OP_A(0, st.num_total_pairs > DUK_BC_A_MAX ? DUK_BC_A_MAX : st.num_total_pairs); +#endif + + DUK_ASSERT(comp_ctx->curr_token.t == DUK_TOK_RCURLY); + duk__advance(comp_ctx); /* No RegExp after object literal. */ + + duk__ivalue_regconst(res, st.reg_obj); + return; + +syntax_error: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_OBJECT_LITERAL); + DUK_WO_NORETURN(return;); +} + +/* Parse argument list. Arguments are written to temps starting from + * "next temp". Returns number of arguments parsed. Expects left paren + * to be already eaten, and eats the right paren before returning. + */ +DUK_LOCAL duk_int_t duk__parse_arguments(duk_compiler_ctx *comp_ctx, duk_ivalue *res) { + duk_int_t nargs = 0; + duk_regconst_t reg_temp; + + /* Note: expect that caller has already eaten the left paren */ + + DUK_DDD(DUK_DDDPRINT("start parsing arguments, prev_token.t=%ld, curr_token.t=%ld", + (long) comp_ctx->prev_token.t, + (long) comp_ctx->curr_token.t)); + + for (;;) { + if (comp_ctx->curr_token.t == DUK_TOK_RPAREN) { + break; + } + if (nargs > 0) { + duk__advance_expect(comp_ctx, DUK_TOK_COMMA); + } + + /* We want the argument expression value to go to "next temp" + * without additional moves. That should almost always be the + * case, but we double check after expression parsing. + * + * This is not the cleanest possible approach. + */ + + reg_temp = DUK__ALLOCTEMP(comp_ctx); /* bump up "allocated" reg count, just in case */ + DUK__SETTEMP(comp_ctx, reg_temp); + + /* binding power must be high enough to NOT allow comma expressions directly */ + duk__expr_toforcedreg(comp_ctx, + res, + DUK__BP_COMMA /*rbp_flags*/, + reg_temp); /* always allow 'in', coerce to 'tr' just in case */ + + DUK__SETTEMP(comp_ctx, reg_temp + 1); + nargs++; + + DUK_DDD(DUK_DDDPRINT("argument #%ld written into reg %ld", (long) nargs, (long) reg_temp)); + } + + /* eat the right paren */ + duk__advance_expect(comp_ctx, DUK_TOK_RPAREN); /* RegExp mode does not matter. */ + + DUK_DDD(DUK_DDDPRINT("end parsing arguments")); + + return nargs; +} + +DUK_LOCAL duk_bool_t duk__expr_is_empty(duk_compiler_ctx *comp_ctx) { + /* empty expressions can be detected conveniently with nud/led counts */ + return (comp_ctx->curr_func.nud_count == 0) && (comp_ctx->curr_func.led_count == 0); +} + +DUK_LOCAL void duk__expr_nud(duk_compiler_ctx *comp_ctx, duk_ivalue *res) { + duk_hthread *thr = comp_ctx->thr; + duk_token *tk; + duk_regconst_t temp_at_entry; + duk_small_uint_t tok; + duk_uint32_t args; /* temp variable to pass constants and flags to shared code */ + + /* + * ctx->prev_token token to process with duk__expr_nud() + * ctx->curr_token updated by caller + * + * Note: the token in the switch below has already been eaten. + */ + + temp_at_entry = DUK__GETTEMP(comp_ctx); + + comp_ctx->curr_func.nud_count++; + + tk = &comp_ctx->prev_token; + tok = tk->t; + res->t = DUK_IVAL_NONE; + + DUK_DDD(DUK_DDDPRINT("duk__expr_nud(), prev_token.t=%ld, allow_in=%ld, paren_level=%ld", + (long) tk->t, + (long) comp_ctx->curr_func.allow_in, + (long) comp_ctx->curr_func.paren_level)); + + switch (tok) { + /* PRIMARY EXPRESSIONS */ + + case DUK_TOK_THIS: { + duk_regconst_t reg_temp; + reg_temp = DUK__ALLOCTEMP(comp_ctx); + duk__emit_bc(comp_ctx, DUK_OP_LDTHIS, reg_temp); + duk__ivalue_regconst(res, reg_temp); + return; + } + case DUK_TOK_IDENTIFIER: { + duk__ivalue_var_hstring(comp_ctx, res, tk->str1); + return; + } + case DUK_TOK_NULL: { + duk_push_null(thr); + goto plain_value; + } + case DUK_TOK_TRUE: { + duk_push_true(thr); + goto plain_value; + } + case DUK_TOK_FALSE: { + duk_push_false(thr); + goto plain_value; + } + case DUK_TOK_NUMBER: { + duk_push_number(thr, tk->num); + goto plain_value; + } + case DUK_TOK_STRING: { + DUK_ASSERT(tk->str1 != NULL); + duk_push_hstring(thr, tk->str1); + goto plain_value; + } + case DUK_TOK_REGEXP: { +#if defined(DUK_USE_REGEXP_SUPPORT) + duk_regconst_t reg_temp; + duk_regconst_t rc_re_bytecode; /* const */ + duk_regconst_t rc_re_source; /* const */ + + DUK_ASSERT(tk->str1 != NULL); + DUK_ASSERT(tk->str2 != NULL); + + DUK_DDD(DUK_DDDPRINT("emitting regexp op, str1=%!O, str2=%!O", (duk_heaphdr *) tk->str1, (duk_heaphdr *) tk->str2)); + + reg_temp = DUK__ALLOCTEMP(comp_ctx); + duk_push_hstring(thr, tk->str1); + duk_push_hstring(thr, tk->str2); + + /* [ ... pattern flags ] */ + + duk_regexp_compile(thr); + + /* [ ... escaped_source bytecode ] */ + + rc_re_bytecode = duk__getconst(comp_ctx); + rc_re_source = duk__getconst(comp_ctx); + + duk__emit_a_b_c(comp_ctx, + DUK_OP_REGEXP | DUK__EMIT_FLAG_BC_REGCONST, + reg_temp /*a*/, + rc_re_bytecode /*b*/, + rc_re_source /*c*/); + + duk__ivalue_regconst(res, reg_temp); + return; +#else /* DUK_USE_REGEXP_SUPPORT */ + goto syntax_error; +#endif /* DUK_USE_REGEXP_SUPPORT */ + } + case DUK_TOK_LBRACKET: { + DUK_DDD(DUK_DDDPRINT("parsing array literal")); + duk__nud_array_literal(comp_ctx, res); + return; + } + case DUK_TOK_LCURLY: { + DUK_DDD(DUK_DDDPRINT("parsing object literal")); + duk__nud_object_literal(comp_ctx, res); + return; + } + case DUK_TOK_LPAREN: { + duk_bool_t prev_allow_in; + + comp_ctx->curr_func.paren_level++; + prev_allow_in = comp_ctx->curr_func.allow_in; + comp_ctx->curr_func.allow_in = 1; /* reset 'allow_in' for parenthesized expression */ + + duk__expr(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); /* Expression, terminates at a ')' */ + + duk__advance_expect(comp_ctx, DUK_TOK_RPAREN); /* No RegExp after parenthesized expression. */ + comp_ctx->curr_func.allow_in = prev_allow_in; + comp_ctx->curr_func.paren_level--; + return; + } + + /* MEMBER/NEW/CALL EXPRESSIONS */ + + case DUK_TOK_NEW: { + /* + * Parsing an expression starting with 'new' is tricky because + * there are multiple possible productions deriving from + * LeftHandSideExpression which begin with 'new'. + * + * We currently resort to one-token lookahead to distinguish the + * cases. Hopefully this is correct. The binding power must be + * such that parsing ends at an LPAREN (CallExpression) but not at + * a PERIOD or LBRACKET (MemberExpression). + * + * See doc/compiler.rst for discussion on the parsing approach, + * and testcases/test-dev-new.js for a bunch of documented tests. + */ + + duk_regconst_t reg_target; + duk_int_t nargs; + + DUK_DDD(DUK_DDDPRINT("begin parsing new expression")); + + reg_target = DUK__ALLOCTEMPS(comp_ctx, 2); + +#if defined(DUK_USE_ES6) + if (comp_ctx->curr_token.t == DUK_TOK_PERIOD) { + /* new.target */ + DUK_DDD(DUK_DDDPRINT("new.target")); + duk__advance(comp_ctx); + if (comp_ctx->curr_token.t_nores != DUK_TOK_IDENTIFIER || + !duk_hstring_equals_ascii_cstring(comp_ctx->curr_token.str1, "target")) { + goto syntax_error_newtarget; + } + if (comp_ctx->curr_func.is_global) { + goto syntax_error_newtarget; + } + duk__advance(comp_ctx); + duk__emit_bc(comp_ctx, DUK_OP_NEWTARGET, reg_target); + duk__ivalue_regconst(res, reg_target); + return; + } +#endif /* DUK_USE_ES6 */ + + duk__expr_toforcedreg(comp_ctx, res, DUK__BP_CALL /*rbp_flags*/, reg_target /*forced_reg*/); + duk__emit_bc(comp_ctx, DUK_OP_NEWOBJ, reg_target + 1); /* default instance */ + DUK__SETTEMP(comp_ctx, reg_target + 2); + + /* XXX: 'new obj.noSuch()' doesn't use GETPROPC now which + * makes the error message worse than for obj.noSuch(). + */ + + if (comp_ctx->curr_token.t == DUK_TOK_LPAREN) { + /* 'new' MemberExpression Arguments */ + DUK_DDD(DUK_DDDPRINT("new expression has argument list")); + duk__advance(comp_ctx); + nargs = duk__parse_arguments(comp_ctx, res); /* parse args starting from "next temp", reg_target + 1 */ + /* right paren eaten */ + } else { + /* 'new' MemberExpression */ + DUK_DDD(DUK_DDDPRINT("new expression has no argument list")); + nargs = 0; + } + + duk__emit_a_bc(comp_ctx, DUK_OP_CALL0 | DUK_BC_CALL_FLAG_CONSTRUCT, nargs /*num_args*/, reg_target /*target*/); + + DUK_DDD(DUK_DDDPRINT("end parsing new expression")); + + duk__ivalue_regconst(res, reg_target); + return; + } + + /* FUNCTION EXPRESSIONS */ + + case DUK_TOK_FUNCTION: { + /* Function expression. Note that any statement beginning with 'function' + * is handled by the statement parser as a function declaration, or a + * non-standard function expression/statement (or a SyntaxError). We only + * handle actual function expressions (occurring inside an expression) here. + * + * O(depth^2) parse count for inner functions is handled by recording a + * lexer offset on the first compilation pass, so that the function can + * be efficiently skipped on the second pass. This is encapsulated into + * duk__parse_func_like_fnum(). + */ + + duk_regconst_t reg_temp; + duk_int_t fnum; + + reg_temp = DUK__ALLOCTEMP(comp_ctx); + + /* curr_token follows 'function' */ + fnum = duk__parse_func_like_fnum(comp_ctx, 0 /*flags*/); + DUK_DDD(DUK_DDDPRINT("parsed inner function -> fnum %ld", (long) fnum)); + + duk__emit_a_bc(comp_ctx, DUK_OP_CLOSURE, reg_temp /*a*/, (duk_regconst_t) fnum /*bc*/); + + duk__ivalue_regconst(res, reg_temp); + return; + } + + /* UNARY EXPRESSIONS */ + + case DUK_TOK_DELETE: { + /* Delete semantics are a bit tricky. The description in E5 specification + * is kind of confusing, because it distinguishes between resolvability of + * a reference (which is only known at runtime) seemingly at compile time + * (= SyntaxError throwing). + */ + duk__expr(comp_ctx, res, DUK__BP_MULTIPLICATIVE /*rbp_flags*/); /* UnaryExpression */ + if (res->t == DUK_IVAL_VAR) { + /* not allowed in strict mode, regardless of whether resolves; + * in non-strict mode DELVAR handles both non-resolving and + * resolving cases (the specification description is a bit confusing). + */ + + duk_regconst_t reg_temp; + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + + if (comp_ctx->curr_func.is_strict) { + DUK_ERROR_SYNTAX(thr, DUK_STR_CANNOT_DELETE_IDENTIFIER); + DUK_WO_NORETURN(return;); + } + + DUK__SETTEMP(comp_ctx, temp_at_entry); + reg_temp = DUK__ALLOCTEMP(comp_ctx); + + duk_dup(thr, res->x1.valstack_idx); + if (duk__lookup_lhs(comp_ctx, ®_varbind, &rc_varname)) { + /* register bound variables are non-configurable -> always false */ + duk__emit_bc(comp_ctx, DUK_OP_LDFALSE, reg_temp); + } else { + duk_dup(thr, res->x1.valstack_idx); + rc_varname = duk__getconst(comp_ctx); + duk__emit_a_bc(comp_ctx, DUK_OP_DELVAR, reg_temp, rc_varname); + } + duk__ivalue_regconst(res, reg_temp); + } else if (res->t == DUK_IVAL_PROP) { + duk_regconst_t reg_temp; + duk_regconst_t reg_obj; + duk_regconst_t rc_key; + + DUK__SETTEMP(comp_ctx, temp_at_entry); + reg_temp = DUK__ALLOCTEMP(comp_ctx); + reg_obj = + duk__ispec_toregconst_raw(comp_ctx, &res->x1, -1 /*forced_reg*/, 0 /*flags*/); /* don't allow const */ + rc_key = + duk__ispec_toregconst_raw(comp_ctx, &res->x2, -1 /*forced_reg*/, DUK__IVAL_FLAG_ALLOW_CONST /*flags*/); + duk__emit_a_b_c(comp_ctx, DUK_OP_DELPROP | DUK__EMIT_FLAG_BC_REGCONST, reg_temp, reg_obj, rc_key); + + duk__ivalue_regconst(res, reg_temp); + } else { + /* non-Reference deletion is always 'true', even in strict mode */ + duk_push_true(thr); + goto plain_value; + } + return; + } + case DUK_TOK_VOID: { + duk__expr_toplain_ignore(comp_ctx, res, DUK__BP_MULTIPLICATIVE /*rbp_flags*/); /* UnaryExpression */ + duk_push_undefined(thr); + goto plain_value; + } + case DUK_TOK_TYPEOF: { + /* 'typeof' must handle unresolvable references without throwing + * a ReferenceError (E5 Section 11.4.3). Register mapped values + * will never be unresolvable so special handling is only required + * when an identifier is a "slow path" one. + */ + duk__expr(comp_ctx, res, DUK__BP_MULTIPLICATIVE /*rbp_flags*/); /* UnaryExpression */ + + if (res->t == DUK_IVAL_VAR) { + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + duk_regconst_t reg_temp; + + duk_dup(thr, res->x1.valstack_idx); + if (!duk__lookup_lhs(comp_ctx, ®_varbind, &rc_varname)) { + DUK_DDD(DUK_DDDPRINT("typeof for an identifier name which could not be resolved " + "at compile time, need to use special run-time handling")); + reg_temp = DUK__ALLOCTEMP(comp_ctx); + duk__emit_a_bc(comp_ctx, DUK_OP_TYPEOFID, reg_temp, rc_varname); + duk__ivalue_regconst(res, reg_temp); + return; + } + } + + args = DUK_OP_TYPEOF; + goto unary; + } + case DUK_TOK_INCREMENT: { + args = (DUK_OP_PREINCP << 8) + DUK_OP_PREINCR; + goto preincdec; + } + case DUK_TOK_DECREMENT: { + args = (DUK_OP_PREDECP << 8) + DUK_OP_PREDECR; + goto preincdec; + } + case DUK_TOK_ADD: { + /* unary plus */ + duk__expr(comp_ctx, res, DUK__BP_MULTIPLICATIVE /*rbp_flags*/); /* UnaryExpression */ + if (res->t == DUK_IVAL_PLAIN && res->x1.t == DUK_ISPEC_VALUE && duk_is_number(thr, res->x1.valstack_idx)) { + /* unary plus of a number is identity */ + return; + } + args = DUK_OP_UNP; + goto unary; + } + case DUK_TOK_SUB: { + /* unary minus */ + duk__expr(comp_ctx, res, DUK__BP_MULTIPLICATIVE /*rbp_flags*/); /* UnaryExpression */ + if (res->t == DUK_IVAL_PLAIN && res->x1.t == DUK_ISPEC_VALUE && duk_is_number(thr, res->x1.valstack_idx)) { + /* this optimization is important to handle negative literals + * (which are not directly provided by the lexical grammar) + */ + duk_tval *tv_num; + duk_double_union du; + + tv_num = DUK_GET_TVAL_POSIDX(thr, res->x1.valstack_idx); + DUK_ASSERT(tv_num != NULL); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv_num)); + du.d = DUK_TVAL_GET_NUMBER(tv_num); + du.d = -du.d; + DUK_DBLUNION_NORMALIZE_NAN_CHECK(&du); + DUK_TVAL_SET_NUMBER(tv_num, du.d); + return; + } + args = DUK_OP_UNM; + goto unary; + } + case DUK_TOK_BNOT: { + duk__expr(comp_ctx, res, DUK__BP_MULTIPLICATIVE /*rbp_flags*/); /* UnaryExpression */ + args = DUK_OP_BNOT; + goto unary; + } + case DUK_TOK_LNOT: { + duk__expr(comp_ctx, res, DUK__BP_MULTIPLICATIVE /*rbp_flags*/); /* UnaryExpression */ + if (res->t == DUK_IVAL_PLAIN && res->x1.t == DUK_ISPEC_VALUE) { + /* Very minimal inlining to handle common idioms '!0' and '!1', + * and also boolean arguments like '!false' and '!true'. + */ + duk_tval *tv_val; + + tv_val = DUK_GET_TVAL_POSIDX(thr, res->x1.valstack_idx); + DUK_ASSERT(tv_val != NULL); + if (DUK_TVAL_IS_NUMBER(tv_val)) { + duk_double_t d; + d = DUK_TVAL_GET_NUMBER(tv_val); + if (duk_double_equals(d, 0.0)) { + /* Matches both +0 and -0 on purpose. */ + DUK_DDD(DUK_DDDPRINT("inlined lnot: !0 -> true")); + DUK_TVAL_SET_BOOLEAN_TRUE(tv_val); + return; + } else if (duk_double_equals(d, 1.0)) { + DUK_DDD(DUK_DDDPRINT("inlined lnot: !1 -> false")); + DUK_TVAL_SET_BOOLEAN_FALSE(tv_val); + return; + } + } else if (DUK_TVAL_IS_BOOLEAN(tv_val)) { + duk_small_uint_t v; + v = DUK_TVAL_GET_BOOLEAN(tv_val); + DUK_DDD(DUK_DDDPRINT("inlined lnot boolean: %ld", (long) v)); + DUK_ASSERT(v == 0 || v == 1); + DUK_TVAL_SET_BOOLEAN(tv_val, v ^ 0x01); + return; + } + } + args = DUK_OP_LNOT; + goto unary; + } + + } /* end switch */ + + DUK_ERROR_SYNTAX(thr, DUK_STR_PARSE_ERROR); + DUK_WO_NORETURN(return;); + +unary : { + /* Unary opcodes use just the 'BC' register source because it + * matches current shuffle limits, and maps cleanly to 16 high + * bits of the opcode. + */ + + duk_regconst_t reg_src, reg_res; + + reg_src = duk__ivalue_toregconst_raw(comp_ctx, res, -1 /*forced_reg*/, 0 /*flags*/); + if (DUK__ISREG_TEMP(comp_ctx, reg_src)) { + reg_res = reg_src; + } else { + reg_res = DUK__ALLOCTEMP(comp_ctx); + } + duk__emit_a_bc(comp_ctx, args, reg_res, reg_src); + duk__ivalue_regconst(res, reg_res); + return; +} + +preincdec : { + /* preincrement and predecrement */ + duk_regconst_t reg_res; + duk_small_uint_t args_op1 = args & 0xff; /* DUK_OP_PREINCR/DUK_OP_PREDECR */ + duk_small_uint_t args_op2 = args >> 8; /* DUK_OP_PREINCP_RR/DUK_OP_PREDECP_RR */ + + /* Specific assumptions for opcode numbering. */ + DUK_ASSERT(DUK_OP_PREINCR + 4 == DUK_OP_PREINCV); + DUK_ASSERT(DUK_OP_PREDECR + 4 == DUK_OP_PREDECV); + + reg_res = DUK__ALLOCTEMP(comp_ctx); + + duk__expr(comp_ctx, res, DUK__BP_MULTIPLICATIVE /*rbp_flags*/); /* UnaryExpression */ + if (res->t == DUK_IVAL_VAR) { + duk_hstring *h_varname; + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + + h_varname = duk_known_hstring(thr, res->x1.valstack_idx); + + if (duk__hstring_is_eval_or_arguments_in_strict_mode(comp_ctx, h_varname)) { + goto syntax_error; + } + + duk_dup(thr, res->x1.valstack_idx); + if (duk__lookup_lhs(comp_ctx, ®_varbind, &rc_varname)) { + duk__emit_a_bc(comp_ctx, + args_op1, /* e.g. DUK_OP_PREINCR */ + reg_res, + reg_varbind); + } else { + duk__emit_a_bc(comp_ctx, + args_op1 + 4, /* e.g. DUK_OP_PREINCV */ + reg_res, + rc_varname); + } + + DUK_DDD(DUK_DDDPRINT("preincdec to '%!O' -> reg_varbind=%ld, rc_varname=%ld", + (duk_heaphdr *) h_varname, + (long) reg_varbind, + (long) rc_varname)); + } else if (res->t == DUK_IVAL_PROP) { + duk_regconst_t reg_obj; /* allocate to reg only (not const) */ + duk_regconst_t rc_key; + reg_obj = duk__ispec_toregconst_raw(comp_ctx, &res->x1, -1 /*forced_reg*/, 0 /*flags*/); /* don't allow const */ + rc_key = duk__ispec_toregconst_raw(comp_ctx, &res->x2, -1 /*forced_reg*/, DUK__IVAL_FLAG_ALLOW_CONST /*flags*/); + duk__emit_a_b_c(comp_ctx, + args_op2 | DUK__EMIT_FLAG_BC_REGCONST, /* e.g. DUK_OP_PREINCP */ + reg_res, + reg_obj, + rc_key); + } else { + /* Technically return value is not needed because INVLHS will + * unconditially throw a ReferenceError. Coercion is necessary + * for proper semantics (consider ToNumber() called for an object). + * Use DUK_OP_UNP with a dummy register to get ToNumber(). + */ + + duk__ivalue_toforcedreg(comp_ctx, res, reg_res); + duk__emit_bc(comp_ctx, DUK_OP_UNP, reg_res); /* for side effects, result ignored */ + duk__emit_op_only(comp_ctx, DUK_OP_INVLHS); + } + DUK__SETTEMP(comp_ctx, reg_res + 1); + duk__ivalue_regconst(res, reg_res); + return; +} + +plain_value : { + /* Stack top contains plain value */ + duk__ivalue_plain_fromstack(comp_ctx, res); + return; +} + +#if defined(DUK_USE_ES6) +syntax_error_newtarget: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_NEWTARGET); + DUK_WO_NORETURN(return;); +#endif + +syntax_error: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_EXPRESSION); + DUK_WO_NORETURN(return;); +} + +/* XXX: add flag to indicate whether caller cares about return value; this + * affects e.g. handling of assignment expressions. This change needs API + * changes elsewhere too. + */ +DUK_LOCAL void duk__expr_led(duk_compiler_ctx *comp_ctx, duk_ivalue *left, duk_ivalue *res) { + duk_hthread *thr = comp_ctx->thr; + duk_token *tk; + duk_small_uint_t tok; + duk_uint32_t args; /* temp variable to pass constants and flags to shared code */ + + /* + * ctx->prev_token token to process with duk__expr_led() + * ctx->curr_token updated by caller + */ + + comp_ctx->curr_func.led_count++; + + /* The token in the switch has already been eaten here */ + tk = &comp_ctx->prev_token; + tok = tk->t; + + DUK_DDD(DUK_DDDPRINT("duk__expr_led(), prev_token.t=%ld, allow_in=%ld, paren_level=%ld", + (long) tk->t, + (long) comp_ctx->curr_func.allow_in, + (long) comp_ctx->curr_func.paren_level)); + + /* XXX: default priority for infix operators is duk__expr_lbp(tok) -> get it here? */ + + switch (tok) { + /* PRIMARY EXPRESSIONS */ + + case DUK_TOK_PERIOD: { + /* Property access expressions are critical for correct LHS ordering, + * see comments in duk__expr()! + * + * A conservative approach would be to use duk__ivalue_totempconst() + * for 'left'. However, allowing a reg-bound variable seems safe here + * and is nice because "foo.bar" is a common expression. If the ivalue + * is used in an expression a GETPROP will occur before any changes to + * the base value can occur. If the ivalue is used as an assignment + * LHS, the assignment code will ensure the base value is safe from + * RHS mutation. + */ + + /* XXX: This now coerces an identifier into a GETVAR to a temp, which + * causes an extra LDREG in call setup. It's sufficient to coerce to a + * unary ivalue? + */ + duk__ivalue_toplain(comp_ctx, left); + + /* NB: must accept reserved words as property name */ + if (comp_ctx->curr_token.t_nores != DUK_TOK_IDENTIFIER) { + DUK_ERROR_SYNTAX(thr, DUK_STR_EXPECTED_IDENTIFIER); + DUK_WO_NORETURN(return;); + } + + res->t = DUK_IVAL_PROP; + duk__copy_ispec(comp_ctx, &left->x1, &res->x1); /* left.x1 -> res.x1 */ + DUK_ASSERT(comp_ctx->curr_token.str1 != NULL); + duk_push_hstring(thr, comp_ctx->curr_token.str1); + duk_replace(thr, res->x2.valstack_idx); + res->x2.t = DUK_ISPEC_VALUE; + + /* special RegExp literal handling after IdentifierName */ + comp_ctx->curr_func.reject_regexp_in_adv = 1; + + duk__advance(comp_ctx); + return; + } + case DUK_TOK_LBRACKET: { + /* Property access expressions are critical for correct LHS ordering, + * see comments in duk__expr()! + */ + + /* XXX: optimize temp reg use */ + /* XXX: similar coercion issue as in DUK_TOK_PERIOD */ + /* XXX: coerce to regs? it might be better for enumeration use, where the + * same PROP ivalue is used multiple times. Or perhaps coerce PROP further + * there? + */ + /* XXX: for simple cases like x['y'] an unnecessary LDREG is + * emitted for the base value; could avoid it if we knew that + * the key expression is safe (e.g. just a single literal). + */ + + /* The 'left' value must not be a register bound variable + * because it may be mutated during the rest of the expression + * and E5.1 Section 11.2.1 specifies the order of evaluation + * so that the base value is evaluated first. + * See: test-bug-nested-prop-mutate.js. + */ + duk__ivalue_totempconst(comp_ctx, left); + duk__expr_toplain(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); /* Expression, ']' terminates */ + duk__advance_expect(comp_ctx, DUK_TOK_RBRACKET); + + res->t = DUK_IVAL_PROP; + duk__copy_ispec(comp_ctx, &res->x1, &res->x2); /* res.x1 -> res.x2 */ + duk__copy_ispec(comp_ctx, &left->x1, &res->x1); /* left.x1 -> res.x1 */ + return; + } + case DUK_TOK_LPAREN: { + /* function call */ + duk_regconst_t reg_cs = DUK__ALLOCTEMPS(comp_ctx, 2); + duk_int_t nargs; + duk_small_uint_t call_op = DUK_OP_CALL0; + + /* XXX: attempt to get the call result to "next temp" whenever + * possible to avoid unnecessary register shuffles. + */ + + /* + * Setup call: target and 'this' binding. Three cases: + * + * 1. Identifier base (e.g. "foo()") + * 2. Property base (e.g. "foo.bar()") + * 3. Register base (e.g. "foo()()"; i.e. when a return value is a function) + */ + + if (left->t == DUK_IVAL_VAR) { + duk_hstring *h_varname; + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + + DUK_DDD(DUK_DDDPRINT("function call with identifier base")); + + h_varname = duk_known_hstring(thr, left->x1.valstack_idx); + if (h_varname == DUK_HTHREAD_STRING_EVAL(thr)) { + /* Potential direct eval call detected, flag the CALL + * so that a run-time "direct eval" check is made and + * special behavior may be triggered. Note that this + * does not prevent 'eval' from being register bound. + */ + DUK_DDD(DUK_DDDPRINT("function call with identifier 'eval' " + "-> using EVALCALL, marking function " + "as may_direct_eval")); + call_op |= DUK_BC_CALL_FLAG_CALLED_AS_EVAL; + comp_ctx->curr_func.may_direct_eval = 1; + } + + duk_dup(thr, left->x1.valstack_idx); + if (duk__lookup_lhs(comp_ctx, ®_varbind, &rc_varname)) { + duk__emit_a_bc(comp_ctx, DUK_OP_CSREG | DUK__EMIT_FLAG_A_IS_SOURCE, reg_varbind, reg_cs + 0); + } else { + /* XXX: expand target register or constant field to + * reduce shuffling. + */ + DUK_ASSERT(DUK__ISCONST(rc_varname)); + duk__emit_a_b(comp_ctx, DUK_OP_CSVAR | DUK__EMIT_FLAG_BC_REGCONST, reg_cs + 0, rc_varname); + } + } else if (left->t == DUK_IVAL_PROP) { + /* Call through a property lookup, E5 Section 11.2.3, step 6.a.i, + * E5 Section 10.4.3. There used to be a separate CSPROP opcode + * but a typical call setup took 3 opcodes (e.g. LDREG, LDCONST, + * CSPROP) and the same can be achieved with ordinary loads. + */ +#if defined(DUK_USE_VERBOSE_ERRORS) + duk_regconst_t reg_key; +#endif + + DUK_DDD(DUK_DDDPRINT("function call with property base")); + + /* XXX: For Math.sin() this generates: LDCONST + LDREG + + * GETPROPC + call. The LDREG is unnecessary because LDCONST + * could be loaded directly into reg_cs + 1. This doesn't + * happen now because a variable cannot be in left->x1 of a + * DUK_IVAL_PROP. We could notice that left->x1 is a temp + * and reuse, but it would still be in the wrong position + * (reg_cs + 0 rather than reg_cs + 1). + */ + duk__ispec_toforcedreg(comp_ctx, &left->x1, reg_cs + 1); /* base */ +#if defined(DUK_USE_VERBOSE_ERRORS) + reg_key = duk__ispec_toregconst_raw(comp_ctx, &left->x2, -1, DUK__IVAL_FLAG_ALLOW_CONST /*flags*/); + duk__emit_a_b_c(comp_ctx, DUK_OP_GETPROPC | DUK__EMIT_FLAG_BC_REGCONST, reg_cs + 0, reg_cs + 1, reg_key); +#else + duk__ivalue_toforcedreg(comp_ctx, left, reg_cs + 0); /* base[key] */ +#endif + } else { + DUK_DDD(DUK_DDDPRINT("function call with register base")); + + duk__ivalue_toforcedreg(comp_ctx, left, reg_cs + 0); +#if 0 + duk__emit_a_bc(comp_ctx, + DUK_OP_CSREG | DUK__EMIT_FLAG_A_IS_SOURCE, + reg_cs + 0, + reg_cs + 0); /* in-place setup */ +#endif + /* Because of in-place setup, REGCS is equivalent to + * just this LDUNDEF. + */ + duk__emit_bc(comp_ctx, DUK_OP_LDUNDEF, reg_cs + 1); + } + + DUK__SETTEMP(comp_ctx, reg_cs + 2); + nargs = duk__parse_arguments(comp_ctx, res); /* parse args starting from "next temp" */ + + /* Tailcalls are handled by back-patching the already emitted opcode + * later in return statement parser. + */ + + duk__emit_a_bc(comp_ctx, call_op, (duk_regconst_t) nargs /*numargs*/, reg_cs /*basereg*/); + DUK__SETTEMP(comp_ctx, reg_cs + 1); /* result in csreg */ + + duk__ivalue_regconst(res, reg_cs); + return; + } + + /* POSTFIX EXPRESSION */ + + case DUK_TOK_INCREMENT: { + args = (DUK_OP_POSTINCP_RR << 16) + (DUK_OP_POSTINCR << 8) + 0; + goto postincdec; + } + case DUK_TOK_DECREMENT: { + args = (DUK_OP_POSTDECP_RR << 16) + (DUK_OP_POSTDECR << 8) + 0; + goto postincdec; + } + + /* EXPONENTIATION EXPRESSION */ + +#if defined(DUK_USE_ES7_EXP_OPERATOR) + case DUK_TOK_EXP: { + args = (DUK_OP_EXP << 8) + DUK__BP_EXPONENTIATION - 1; /* UnaryExpression */ + goto binary; + } +#endif + + /* MULTIPLICATIVE EXPRESSION */ + + case DUK_TOK_MUL: { + args = (DUK_OP_MUL << 8) + DUK__BP_MULTIPLICATIVE; /* ExponentiationExpression */ + goto binary; + } + case DUK_TOK_DIV: { + args = (DUK_OP_DIV << 8) + DUK__BP_MULTIPLICATIVE; /* ExponentiationExpression */ + goto binary; + } + case DUK_TOK_MOD: { + args = (DUK_OP_MOD << 8) + DUK__BP_MULTIPLICATIVE; /* ExponentiationExpression */ + goto binary; + } + + /* ADDITIVE EXPRESSION */ + + case DUK_TOK_ADD: { + args = (DUK_OP_ADD << 8) + DUK__BP_ADDITIVE; /* MultiplicativeExpression */ + goto binary; + } + case DUK_TOK_SUB: { + args = (DUK_OP_SUB << 8) + DUK__BP_ADDITIVE; /* MultiplicativeExpression */ + goto binary; + } + + /* SHIFT EXPRESSION */ + + case DUK_TOK_ALSHIFT: { + /* << */ + args = (DUK_OP_BASL << 8) + DUK__BP_SHIFT; + goto binary; + } + case DUK_TOK_ARSHIFT: { + /* >> */ + args = (DUK_OP_BASR << 8) + DUK__BP_SHIFT; + goto binary; + } + case DUK_TOK_RSHIFT: { + /* >>> */ + args = (DUK_OP_BLSR << 8) + DUK__BP_SHIFT; + goto binary; + } + + /* RELATIONAL EXPRESSION */ + + case DUK_TOK_LT: { + /* < */ + args = (DUK_OP_LT << 8) + DUK__BP_RELATIONAL; + goto binary; + } + case DUK_TOK_GT: { + args = (DUK_OP_GT << 8) + DUK__BP_RELATIONAL; + goto binary; + } + case DUK_TOK_LE: { + args = (DUK_OP_LE << 8) + DUK__BP_RELATIONAL; + goto binary; + } + case DUK_TOK_GE: { + args = (DUK_OP_GE << 8) + DUK__BP_RELATIONAL; + goto binary; + } + case DUK_TOK_INSTANCEOF: { + args = (DUK_OP_INSTOF << 8) + DUK__BP_RELATIONAL; + goto binary; + } + case DUK_TOK_IN: { + args = (DUK_OP_IN << 8) + DUK__BP_RELATIONAL; + goto binary; + } + + /* EQUALITY EXPRESSION */ + + case DUK_TOK_EQ: { + args = (DUK_OP_EQ << 8) + DUK__BP_EQUALITY; + goto binary; + } + case DUK_TOK_NEQ: { + args = (DUK_OP_NEQ << 8) + DUK__BP_EQUALITY; + goto binary; + } + case DUK_TOK_SEQ: { + args = (DUK_OP_SEQ << 8) + DUK__BP_EQUALITY; + goto binary; + } + case DUK_TOK_SNEQ: { + args = (DUK_OP_SNEQ << 8) + DUK__BP_EQUALITY; + goto binary; + } + + /* BITWISE EXPRESSIONS */ + + case DUK_TOK_BAND: { + args = (DUK_OP_BAND << 8) + DUK__BP_BAND; + goto binary; + } + case DUK_TOK_BXOR: { + args = (DUK_OP_BXOR << 8) + DUK__BP_BXOR; + goto binary; + } + case DUK_TOK_BOR: { + args = (DUK_OP_BOR << 8) + DUK__BP_BOR; + goto binary; + } + + /* LOGICAL EXPRESSIONS */ + + case DUK_TOK_LAND: { + /* syntactically left-associative but parsed as right-associative */ + args = (1 << 8) + DUK__BP_LAND - 1; + goto binary_logical; + } + case DUK_TOK_LOR: { + /* syntactically left-associative but parsed as right-associative */ + args = (0 << 8) + DUK__BP_LOR - 1; + goto binary_logical; + } + + /* CONDITIONAL EXPRESSION */ + + case DUK_TOK_QUESTION: { + /* XXX: common reg allocation need is to reuse a sub-expression's temp reg, + * but only if it really is a temp. Nothing fancy here now. + */ + duk_regconst_t reg_temp; + duk_int_t pc_jump1; + duk_int_t pc_jump2; + + reg_temp = DUK__ALLOCTEMP(comp_ctx); + duk__ivalue_toforcedreg(comp_ctx, left, reg_temp); + duk__emit_if_true_skip(comp_ctx, reg_temp); + pc_jump1 = duk__emit_jump_empty(comp_ctx); /* jump to false */ + duk__expr_toforcedreg(comp_ctx, + res, + DUK__BP_COMMA /*rbp_flags*/, + reg_temp /*forced_reg*/); /* AssignmentExpression */ + duk__advance_expect(comp_ctx, DUK_TOK_COLON); + pc_jump2 = duk__emit_jump_empty(comp_ctx); /* jump to end */ + duk__patch_jump_here(comp_ctx, pc_jump1); + duk__expr_toforcedreg(comp_ctx, + res, + DUK__BP_COMMA /*rbp_flags*/, + reg_temp /*forced_reg*/); /* AssignmentExpression */ + duk__patch_jump_here(comp_ctx, pc_jump2); + + DUK__SETTEMP(comp_ctx, reg_temp + 1); + duk__ivalue_regconst(res, reg_temp); + return; + } + + /* ASSIGNMENT EXPRESSION */ + + case DUK_TOK_EQUALSIGN: { + /* + * Assignments are right associative, allows e.g. + * a = 5; + * a += b = 9; // same as a += (b = 9) + * -> expression value 14, a = 14, b = 9 + * + * Right associativiness is reflected in the BP for recursion, + * "-1" ensures assignment operations are allowed. + * + * XXX: just use DUK__BP_COMMA (i.e. no need for 2-step bp levels)? + */ + args = (DUK_OP_NONE << 8) + DUK__BP_ASSIGNMENT - 1; /* DUK_OP_NONE marks a 'plain' assignment */ + goto assign; + } + case DUK_TOK_ADD_EQ: { + /* right associative */ + args = (DUK_OP_ADD << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } + case DUK_TOK_SUB_EQ: { + /* right associative */ + args = (DUK_OP_SUB << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } + case DUK_TOK_MUL_EQ: { + /* right associative */ + args = (DUK_OP_MUL << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } + case DUK_TOK_DIV_EQ: { + /* right associative */ + args = (DUK_OP_DIV << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } + case DUK_TOK_MOD_EQ: { + /* right associative */ + args = (DUK_OP_MOD << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } +#if defined(DUK_USE_ES7_EXP_OPERATOR) + case DUK_TOK_EXP_EQ: { + /* right associative */ + args = (DUK_OP_EXP << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } +#endif + case DUK_TOK_ALSHIFT_EQ: { + /* right associative */ + args = (DUK_OP_BASL << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } + case DUK_TOK_ARSHIFT_EQ: { + /* right associative */ + args = (DUK_OP_BASR << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } + case DUK_TOK_RSHIFT_EQ: { + /* right associative */ + args = (DUK_OP_BLSR << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } + case DUK_TOK_BAND_EQ: { + /* right associative */ + args = (DUK_OP_BAND << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } + case DUK_TOK_BOR_EQ: { + /* right associative */ + args = (DUK_OP_BOR << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } + case DUK_TOK_BXOR_EQ: { + /* right associative */ + args = (DUK_OP_BXOR << 8) + DUK__BP_ASSIGNMENT - 1; + goto assign; + } + + /* COMMA */ + + case DUK_TOK_COMMA: { + /* right associative */ + + duk__ivalue_toplain_ignore(comp_ctx, left); /* need side effects, not value */ + duk__expr_toplain(comp_ctx, res, DUK__BP_COMMA - 1 /*rbp_flags*/); + + /* return 'res' (of right part) as our result */ + return; + } + + default: { + break; + } + } + + DUK_D(DUK_DPRINT("parse error: unexpected token: %ld", (long) tok)); + DUK_ERROR_SYNTAX(thr, DUK_STR_PARSE_ERROR); + DUK_WO_NORETURN(return;); + +#if 0 + /* XXX: shared handling for 'duk__expr_lhs'? */ + if (comp_ctx->curr_func.paren_level == 0 && XXX) { + comp_ctx->curr_func.duk__expr_lhs = 0; + } +#endif + +binary: + /* + * Shared handling of binary operations + * + * args = (opcode << 8) + rbp + */ + { + duk__ivalue_toplain(comp_ctx, left); + duk__expr_toplain(comp_ctx, res, args & 0xff /*rbp_flags*/); + + /* combine left->x1 and res->x1 (right->x1, really) -> (left->x1 OP res->x1) */ + DUK_ASSERT(left->t == DUK_IVAL_PLAIN); + DUK_ASSERT(res->t == DUK_IVAL_PLAIN); + + res->t = DUK_IVAL_ARITH; + res->op = (args >> 8) & 0xff; + + res->x2.t = res->x1.t; + res->x2.regconst = res->x1.regconst; + duk_copy(thr, res->x1.valstack_idx, res->x2.valstack_idx); + + res->x1.t = left->x1.t; + res->x1.regconst = left->x1.regconst; + duk_copy(thr, left->x1.valstack_idx, res->x1.valstack_idx); + + DUK_DDD(DUK_DDDPRINT("binary op, res: t=%ld, x1.t=%ld, x1.regconst=0x%08lx, x2.t=%ld, x2.regconst=0x%08lx", + (long) res->t, + (long) res->x1.t, + (unsigned long) res->x1.regconst, + (long) res->x2.t, + (unsigned long) res->x2.regconst)); + return; + } + +binary_logical: + /* + * Shared handling for logical AND and logical OR. + * + * args = (truthval << 8) + rbp + * + * Truthval determines when to skip right-hand-side. + * For logical AND truthval=1, for logical OR truthval=0. + * + * See doc/compiler.rst for discussion on compiling logical + * AND and OR expressions. The approach here is very simplistic, + * generating extra jumps and multiple evaluations of truth values, + * but generates code on-the-fly with only local back-patching. + * + * Both logical AND and OR are syntactically left-associated. + * However, logical ANDs are compiled as right associative + * expressions, i.e. "A && B && C" as "A && (B && C)", to allow + * skip jumps to skip over the entire tail. Similarly for logical OR. + */ + + { + duk_regconst_t reg_temp; + duk_int_t pc_jump; + duk_small_uint_t args_truthval = args >> 8; + duk_small_uint_t args_rbp = args & 0xff; + + /* XXX: unoptimal use of temps, resetting */ + + reg_temp = DUK__ALLOCTEMP(comp_ctx); + + duk__ivalue_toforcedreg(comp_ctx, left, reg_temp); + DUK_ASSERT(DUK__ISREG(reg_temp)); + duk__emit_bc(comp_ctx, + (args_truthval ? DUK_OP_IFTRUE_R : DUK_OP_IFFALSE_R), + reg_temp); /* skip jump conditionally */ + pc_jump = duk__emit_jump_empty(comp_ctx); + duk__expr_toforcedreg(comp_ctx, res, args_rbp /*rbp_flags*/, reg_temp /*forced_reg*/); + duk__patch_jump_here(comp_ctx, pc_jump); + + duk__ivalue_regconst(res, reg_temp); + return; + } + +assign: + /* + * Shared assignment expression handling + * + * args = (opcode << 8) + rbp + * + * If 'opcode' is DUK_OP_NONE, plain assignment without arithmetic. + * Syntactically valid left-hand-side forms which are not accepted as + * left-hand-side values (e.g. as in "f() = 1") must NOT cause a + * SyntaxError, but rather a run-time ReferenceError. + * + * When evaluating X = Y, the LHS (X) is conceptually evaluated + * to a temporary first. The RHS is then evaluated. Finally, the + * is applied to the initial value of RHS (not the value after + * RHS evaluation), and written to X. Doing so concretely generates + * inefficient code so we'd like to avoid the temporary when possible. + * See: https://github.com/svaarala/duktape/pull/992. + * + * The expression value (final LHS value, written to RHS) is + * conceptually copied into a fresh temporary so that it won't + * change even if the LHS/RHS values change in outer expressions. + * For example, it'd be generally incorrect for the expression value + * to be the RHS register binding, unless there's a guarantee that it + * won't change during further expression evaluation. Using the + * temporary concretely produces inefficient bytecode, so we try to + * avoid the extra temporary for some known-to-be-safe cases. + * Currently the only safe case we detect is a "top level assignment", + * for example "x = y + z;", where the assignment expression value is + * ignored. + * See: test-dev-assign-expr.js and test-bug-assign-mutate-gh381.js. + */ + + { + duk_small_uint_t args_op = args >> 8; + duk_small_uint_t args_rbp = args & 0xff; + duk_bool_t toplevel_assign; + + /* XXX: here we need to know if 'left' is left-hand-side compatible. + * That information is no longer available from current expr parsing + * state; it would need to be carried into the 'left' ivalue or by + * some other means. + */ + + /* A top-level assignment is e.g. "x = y;". For these it's safe + * to use the RHS as-is as the expression value, even if the RHS + * is a reg-bound identifier. The RHS ('res') is right associative + * so it has consumed all other assignment level operations; the + * only relevant lower binding power construct is comma operator + * which will ignore the expression value provided here. Usually + * the top level assignment expression value is ignored, but it + * is relevant for e.g. eval code. + */ + toplevel_assign = (comp_ctx->curr_func.nud_count == 1 && /* one token before */ + comp_ctx->curr_func.led_count == 1); /* one operator (= assign) */ + DUK_DDD(DUK_DDDPRINT("assignment: nud_count=%ld, led_count=%ld, toplevel_assign=%ld", + (long) comp_ctx->curr_func.nud_count, + (long) comp_ctx->curr_func.led_count, + (long) toplevel_assign)); + + if (left->t == DUK_IVAL_VAR) { + duk_hstring *h_varname; + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + + DUK_ASSERT(left->x1.t == DUK_ISPEC_VALUE); /* LHS is already side effect free */ + + h_varname = duk_known_hstring(thr, left->x1.valstack_idx); + if (duk__hstring_is_eval_or_arguments_in_strict_mode(comp_ctx, h_varname)) { + /* E5 Section 11.13.1 (and others for other assignments), step 4. */ + goto syntax_error_lvalue; + } + duk_dup(thr, left->x1.valstack_idx); + (void) duk__lookup_lhs(comp_ctx, ®_varbind, &rc_varname); + + if (args_op == DUK_OP_NONE) { + duk__expr(comp_ctx, res, args_rbp /*rbp_flags*/); + if (toplevel_assign) { + /* Any 'res' will do. */ + DUK_DDD(DUK_DDDPRINT("plain assignment, toplevel assign, use as is")); + } else { + /* 'res' must be a plain ivalue, and not register-bound variable. */ + DUK_DDD(DUK_DDDPRINT( + "plain assignment, not toplevel assign, ensure not a reg-bound identifier")); + if (res->t != DUK_IVAL_PLAIN || + (res->x1.t == DUK_ISPEC_REGCONST && DUK__ISREG_NOTTEMP(comp_ctx, res->x1.regconst))) { + duk__ivalue_totempconst(comp_ctx, res); + } + } + } else { + /* For X = Y we need to evaluate the pre-op + * value of X before evaluating the RHS: the RHS + * can change X, but when we do we must use + * the pre-op value. + */ + duk_regconst_t reg_temp; + + reg_temp = DUK__ALLOCTEMP(comp_ctx); + + if (reg_varbind >= 0) { + duk_regconst_t reg_res; + duk_regconst_t reg_src; + duk_int_t pc_temp_load; + duk_int_t pc_before_rhs; + duk_int_t pc_after_rhs; + + if (toplevel_assign) { + /* 'reg_varbind' is the operation result and can also + * become the expression value for top level assignments + * such as: "var x; x += y;". + */ + DUK_DD(DUK_DDPRINT("= expression is top level, write directly to reg_varbind")); + reg_res = reg_varbind; + } else { + /* Not safe to use 'reg_varbind' as assignment expression + * value, so go through a temp. + */ + DUK_DD(DUK_DDPRINT("= expression is not top level, write to reg_temp")); + reg_res = reg_temp; /* reg_res should be smallest possible */ + reg_temp = DUK__ALLOCTEMP(comp_ctx); + } + + /* Try to optimize X = Y for reg-bound + * variables. Detect side-effect free RHS + * narrowly by seeing whether it emits code. + * If not, rewind the code emitter and overwrite + * the unnecessary temp reg load. + */ + + pc_temp_load = duk__get_current_pc(comp_ctx); + duk__emit_a_bc(comp_ctx, DUK_OP_LDREG, reg_temp, reg_varbind); + + pc_before_rhs = duk__get_current_pc(comp_ctx); + duk__expr_toregconst(comp_ctx, res, args_rbp /*rbp_flags*/); + DUK_ASSERT(res->t == DUK_IVAL_PLAIN && res->x1.t == DUK_ISPEC_REGCONST); + pc_after_rhs = duk__get_current_pc(comp_ctx); + + DUK_DD(DUK_DDPRINT("pc_temp_load=%ld, pc_before_rhs=%ld, pc_after_rhs=%ld", + (long) pc_temp_load, + (long) pc_before_rhs, + (long) pc_after_rhs)); + + if (pc_after_rhs == pc_before_rhs) { + /* Note: if the reg_temp load generated shuffling + * instructions, we may need to rewind more than + * one instruction, so use explicit PC computation. + */ + DUK_DD(DUK_DDPRINT("rhs is side effect free, rewind and avoid unnecessary temp for " + "reg-based =")); + DUK_BW_ADD_PTR(comp_ctx->thr, + &comp_ctx->curr_func.bw_code, + (pc_temp_load - pc_before_rhs) * + (duk_int_t) sizeof(duk_compiler_instr)); + reg_src = reg_varbind; + } else { + DUK_DD(DUK_DDPRINT("rhs evaluation emitted code, not sure if rhs is side effect " + "free; use temp reg for LHS")); + reg_src = reg_temp; + } + + duk__emit_a_b_c(comp_ctx, + args_op | DUK__EMIT_FLAG_BC_REGCONST, + reg_res, + reg_src, + res->x1.regconst); + + res->x1.regconst = reg_res; + + /* Ensure compact use of temps. */ + if (DUK__ISREG_TEMP(comp_ctx, reg_res)) { + DUK__SETTEMP(comp_ctx, reg_res + 1); + } + } else { + /* When LHS is not register bound, always go through a + * temporary. No optimization for top level assignment. + */ + + duk__emit_a_bc(comp_ctx, DUK_OP_GETVAR, reg_temp, rc_varname); + + duk__expr_toregconst(comp_ctx, res, args_rbp /*rbp_flags*/); + DUK_ASSERT(res->t == DUK_IVAL_PLAIN && res->x1.t == DUK_ISPEC_REGCONST); + + duk__emit_a_b_c(comp_ctx, + args_op | DUK__EMIT_FLAG_BC_REGCONST, + reg_temp, + reg_temp, + res->x1.regconst); + res->x1.regconst = reg_temp; + } + + DUK_ASSERT(res->t == DUK_IVAL_PLAIN && res->x1.t == DUK_ISPEC_REGCONST); + } + + /* At this point 'res' holds the potential expression value. + * It can be basically any ivalue here, including a reg-bound + * identifier (if code above deems it safe) or a unary/binary + * operation. Operations must be resolved to a side effect free + * plain value, and the side effects must happen exactly once. + */ + + if (reg_varbind >= 0) { + if (res->t != DUK_IVAL_PLAIN) { + /* Resolve 'res' directly into the LHS binding, and use + * that as the expression value if safe. If not safe, + * resolve to a temp/const and copy to LHS. + */ + if (toplevel_assign) { + duk__ivalue_toforcedreg(comp_ctx, res, (duk_int_t) reg_varbind); + } else { + duk__ivalue_totempconst(comp_ctx, res); + duk__copy_ivalue(comp_ctx, res, left); /* use 'left' as a temp */ + duk__ivalue_toforcedreg(comp_ctx, left, (duk_int_t) reg_varbind); + } + } else { + /* Use 'res' as the expression value (it's side effect + * free and may be a plain value, a register, or a + * constant) and write it to the LHS binding too. + */ + duk__copy_ivalue(comp_ctx, res, left); /* use 'left' as a temp */ + duk__ivalue_toforcedreg(comp_ctx, left, (duk_int_t) reg_varbind); + } + } else { + /* Only a reg fits into 'A' so coerce 'res' into a register + * for PUTVAR. + * + * XXX: here the current A/B/C split is suboptimal: we could + * just use 9 bits for reg_res (and support constants) and 17 + * instead of 18 bits for the varname const index. + */ + + duk__ivalue_toreg(comp_ctx, res); + duk__emit_a_bc(comp_ctx, DUK_OP_PUTVAR | DUK__EMIT_FLAG_A_IS_SOURCE, res->x1.regconst, rc_varname); + } + + /* 'res' contains expression value */ + } else if (left->t == DUK_IVAL_PROP) { + /* E5 Section 11.13.1 (and others) step 4 never matches for prop writes -> no check */ + duk_regconst_t reg_obj; + duk_regconst_t rc_key; + duk_regconst_t rc_res; + duk_regconst_t reg_temp; + + /* Property access expressions ('a[b]') are critical to correct + * LHS evaluation ordering, see test-dev-assign-eval-order*.js. + * We must make sure that the LHS target slot (base object and + * key) don't change during RHS evaluation. The only concrete + * problem is a register reference to a variable-bound register + * (i.e., non-temp). Require temp regs for both key and base. + * + * Don't allow a constant for the object (even for a number + * etc), as it goes into the 'A' field of the opcode. + */ + + reg_obj = duk__ispec_toregconst_raw(comp_ctx, + &left->x1, + -1 /*forced_reg*/, + DUK__IVAL_FLAG_REQUIRE_TEMP /*flags*/); + + rc_key = duk__ispec_toregconst_raw(comp_ctx, + &left->x2, + -1 /*forced_reg*/, + DUK__IVAL_FLAG_REQUIRE_TEMP | DUK__IVAL_FLAG_ALLOW_CONST /*flags*/); + + /* Evaluate RHS only when LHS is safe. */ + + if (args_op == DUK_OP_NONE) { + duk__expr_toregconst(comp_ctx, res, args_rbp /*rbp_flags*/); + DUK_ASSERT(res->t == DUK_IVAL_PLAIN && res->x1.t == DUK_ISPEC_REGCONST); + rc_res = res->x1.regconst; + } else { + reg_temp = DUK__ALLOCTEMP(comp_ctx); + duk__emit_a_b_c(comp_ctx, DUK_OP_GETPROP | DUK__EMIT_FLAG_BC_REGCONST, reg_temp, reg_obj, rc_key); + + duk__expr_toregconst(comp_ctx, res, args_rbp /*rbp_flags*/); + DUK_ASSERT(res->t == DUK_IVAL_PLAIN && res->x1.t == DUK_ISPEC_REGCONST); + + duk__emit_a_b_c(comp_ctx, + args_op | DUK__EMIT_FLAG_BC_REGCONST, + reg_temp, + reg_temp, + res->x1.regconst); + rc_res = reg_temp; + } + + duk__emit_a_b_c(comp_ctx, + DUK_OP_PUTPROP | DUK__EMIT_FLAG_A_IS_SOURCE | DUK__EMIT_FLAG_BC_REGCONST, + reg_obj, + rc_key, + rc_res); + + duk__ivalue_regconst(res, rc_res); + } else { + /* No support for lvalues returned from new or function call expressions. + * However, these must NOT cause compile-time SyntaxErrors, but run-time + * ReferenceErrors. Both left and right sides of the assignment must be + * evaluated before throwing a ReferenceError. For instance: + * + * f() = g(); + * + * must result in f() being evaluated, then g() being evaluated, and + * finally, a ReferenceError being thrown. See E5 Section 11.13.1. + */ + + duk_regconst_t rc_res; + + /* First evaluate LHS fully to ensure all side effects are out. */ + duk__ivalue_toplain_ignore(comp_ctx, left); + + /* Then evaluate RHS fully (its value becomes the expression value too). + * Technically we'd need the side effect safety check here too, but because + * we always throw using INVLHS the result doesn't matter. + */ + rc_res = duk__expr_toregconst(comp_ctx, res, args_rbp /*rbp_flags*/); + + duk__emit_op_only(comp_ctx, DUK_OP_INVLHS); + + duk__ivalue_regconst(res, rc_res); + } + + return; + } + +postincdec : { + /* + * Post-increment/decrement will return the original value as its + * result value. However, even that value will be coerced using + * ToNumber() which is quite awkward. Specific bytecode opcodes + * are used to handle these semantics. + * + * Note that post increment/decrement has a "no LineTerminator here" + * restriction. This is handled by duk__expr_lbp(), which forcibly terminates + * the previous expression if a LineTerminator occurs before '++'/'--'. + */ + + duk_regconst_t reg_res; + duk_small_uint_t args_op1 = (args >> 8) & 0xff; /* DUK_OP_POSTINCR/DUK_OP_POSTDECR */ + duk_small_uint_t args_op2 = args >> 16; /* DUK_OP_POSTINCP_RR/DUK_OP_POSTDECP_RR */ + + /* Specific assumptions for opcode numbering. */ + DUK_ASSERT(DUK_OP_POSTINCR + 4 == DUK_OP_POSTINCV); + DUK_ASSERT(DUK_OP_POSTDECR + 4 == DUK_OP_POSTDECV); + + reg_res = DUK__ALLOCTEMP(comp_ctx); + + if (left->t == DUK_IVAL_VAR) { + duk_hstring *h_varname; + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + + h_varname = duk_known_hstring(thr, left->x1.valstack_idx); + + if (duk__hstring_is_eval_or_arguments_in_strict_mode(comp_ctx, h_varname)) { + goto syntax_error; + } + + duk_dup(thr, left->x1.valstack_idx); + if (duk__lookup_lhs(comp_ctx, ®_varbind, &rc_varname)) { + duk__emit_a_bc(comp_ctx, + args_op1, /* e.g. DUK_OP_POSTINCR */ + reg_res, + reg_varbind); + } else { + duk__emit_a_bc(comp_ctx, + args_op1 + 4, /* e.g. DUK_OP_POSTINCV */ + reg_res, + rc_varname); + } + + DUK_DDD(DUK_DDDPRINT("postincdec to '%!O' -> reg_varbind=%ld, rc_varname=%ld", + (duk_heaphdr *) h_varname, + (long) reg_varbind, + (long) rc_varname)); + } else if (left->t == DUK_IVAL_PROP) { + duk_regconst_t reg_obj; /* allocate to reg only (not const) */ + duk_regconst_t rc_key; + + reg_obj = duk__ispec_toregconst_raw(comp_ctx, &left->x1, -1 /*forced_reg*/, 0 /*flags*/); /* don't allow const */ + rc_key = duk__ispec_toregconst_raw(comp_ctx, &left->x2, -1 /*forced_reg*/, DUK__IVAL_FLAG_ALLOW_CONST /*flags*/); + duk__emit_a_b_c(comp_ctx, + args_op2 | DUK__EMIT_FLAG_BC_REGCONST, /* e.g. DUK_OP_POSTINCP */ + reg_res, + reg_obj, + rc_key); + } else { + /* Technically return value is not needed because INVLHS will + * unconditially throw a ReferenceError. Coercion is necessary + * for proper semantics (consider ToNumber() called for an object). + * Use DUK_OP_UNP with a dummy register to get ToNumber(). + */ + duk__ivalue_toforcedreg(comp_ctx, left, reg_res); + duk__emit_bc(comp_ctx, DUK_OP_UNP, reg_res); /* for side effects, result ignored */ + duk__emit_op_only(comp_ctx, DUK_OP_INVLHS); + } + + DUK__SETTEMP(comp_ctx, reg_res + 1); + duk__ivalue_regconst(res, reg_res); + return; +} + +syntax_error: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_EXPRESSION); + DUK_WO_NORETURN(return;); + +syntax_error_lvalue: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_LVALUE); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL duk_small_uint_t duk__expr_lbp(duk_compiler_ctx *comp_ctx) { + duk_small_uint_t tok = comp_ctx->curr_token.t; + + DUK_ASSERT_DISABLE(tok >= DUK_TOK_MINVAL); /* unsigned */ + DUK_ASSERT(tok <= DUK_TOK_MAXVAL); + DUK_ASSERT(sizeof(duk__token_lbp) == DUK_TOK_MAXVAL + 1); + + /* XXX: integrate support for this into led() instead? + * Similar issue as post-increment/post-decrement. + */ + + /* prevent duk__expr_led() by using a binding power less than anything valid */ + if (tok == DUK_TOK_IN && !comp_ctx->curr_func.allow_in) { + return 0; + } + + if ((tok == DUK_TOK_DECREMENT || tok == DUK_TOK_INCREMENT) && (comp_ctx->curr_token.lineterm)) { + /* '++' or '--' in a post-increment/decrement position, + * and a LineTerminator occurs between the operator and + * the preceding expression. Force the previous expr + * to terminate, in effect treating e.g. "a,b\n++" as + * "a,b;++" (= SyntaxError). + */ + return 0; + } + + return DUK__TOKEN_LBP_GET_BP(duk__token_lbp[tok]); /* format is bit packed */ +} + +/* + * Expression parsing. + * + * Upon entry to 'expr' and its variants, 'curr_tok' is assumed to be the + * first token of the expression. Upon exit, 'curr_tok' will be the first + * token not part of the expression (e.g. semicolon terminating an expression + * statement). + */ + +#define DUK__EXPR_RBP_MASK 0xff +#define DUK__EXPR_FLAG_REJECT_IN (1 << 8) /* reject 'in' token (used for for-in) */ +#define DUK__EXPR_FLAG_ALLOW_EMPTY (1 << 9) /* allow empty expression */ +#define DUK__EXPR_FLAG_REQUIRE_INIT (1 << 10) /* require initializer for var/const */ + +/* main expression parser function */ +DUK_LOCAL void duk__expr(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk_hthread *thr = comp_ctx->thr; + duk_ivalue tmp_alloc; /* 'res' is used for "left", and 'tmp' for "right" */ + duk_ivalue *tmp = &tmp_alloc; + duk_small_uint_t rbp; + + DUK__RECURSION_INCREASE(comp_ctx, thr); + + duk_require_stack(thr, DUK__PARSE_EXPR_SLOTS); + + /* filter out flags from exprtop rbp_flags here to save space */ + rbp = rbp_flags & DUK__EXPR_RBP_MASK; + + DUK_DDD(DUK_DDDPRINT("duk__expr(), rbp_flags=%ld, rbp=%ld, allow_in=%ld, paren_level=%ld", + (long) rbp_flags, + (long) rbp, + (long) comp_ctx->curr_func.allow_in, + (long) comp_ctx->curr_func.paren_level)); + + duk_memzero(&tmp_alloc, sizeof(tmp_alloc)); + tmp->x1.valstack_idx = duk_get_top(thr); + tmp->x2.valstack_idx = tmp->x1.valstack_idx + 1; + duk_push_undefined(thr); + duk_push_undefined(thr); + + /* XXX: where to release temp regs in intermediate expressions? + * e.g. 1+2+3 -> don't inflate temp register count when parsing this. + * that particular expression temp regs can be forced here. + */ + + /* XXX: increase ctx->expr_tokens here for every consumed token + * (this would be a nice statistic)? + */ + + if (comp_ctx->curr_token.t == DUK_TOK_SEMICOLON || comp_ctx->curr_token.t == DUK_TOK_RPAREN) { + /* XXX: possibly incorrect handling of empty expression */ + DUK_DDD(DUK_DDDPRINT("empty expression")); + if (!(rbp_flags & DUK__EXPR_FLAG_ALLOW_EMPTY)) { + DUK_ERROR_SYNTAX(thr, DUK_STR_EMPTY_EXPR_NOT_ALLOWED); + DUK_WO_NORETURN(return;); + } + duk_push_undefined(thr); + duk__ivalue_plain_fromstack(comp_ctx, res); + goto cleanup; + } + + duk__advance(comp_ctx); + duk__expr_nud(comp_ctx, res); /* reuse 'res' as 'left' */ + while (rbp < duk__expr_lbp(comp_ctx)) { + duk__advance(comp_ctx); + duk__expr_led(comp_ctx, res, tmp); + duk__copy_ivalue(comp_ctx, tmp, res); /* tmp -> res */ + } + +cleanup: + /* final result is already in 'res' */ + + duk_pop_2(thr); + + DUK__RECURSION_DECREASE(comp_ctx, thr); +} + +DUK_LOCAL void duk__exprtop(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk_hthread *thr = comp_ctx->thr; + + /* Note: these variables must reside in 'curr_func' instead of the global + * context: when parsing function expressions, expression parsing is nested. + */ + comp_ctx->curr_func.nud_count = 0; + comp_ctx->curr_func.led_count = 0; + comp_ctx->curr_func.paren_level = 0; + comp_ctx->curr_func.expr_lhs = 1; + comp_ctx->curr_func.allow_in = (rbp_flags & DUK__EXPR_FLAG_REJECT_IN ? 0 : 1); + + duk__expr(comp_ctx, res, rbp_flags); + + if (!(rbp_flags & DUK__EXPR_FLAG_ALLOW_EMPTY) && duk__expr_is_empty(comp_ctx)) { + DUK_ERROR_SYNTAX(thr, DUK_STR_EMPTY_EXPR_NOT_ALLOWED); + DUK_WO_NORETURN(return;); + } +} + +/* A bunch of helpers (for size optimization) that combine duk__expr()/duk__exprtop() + * and result conversions. + * + * Each helper needs at least 2-3 calls to make it worth while to wrap. + */ + +#if 0 /* unused */ +DUK_LOCAL duk_regconst_t duk__expr_toreg(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk__expr(comp_ctx, res, rbp_flags); + return duk__ivalue_toreg(comp_ctx, res); +} +#endif + +#if 0 /* unused */ +DUK_LOCAL duk_regconst_t duk__expr_totemp(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk__expr(comp_ctx, res, rbp_flags); + return duk__ivalue_totemp(comp_ctx, res); +} +#endif + +DUK_LOCAL void duk__expr_toforcedreg(duk_compiler_ctx *comp_ctx, + duk_ivalue *res, + duk_small_uint_t rbp_flags, + duk_regconst_t forced_reg) { + DUK_ASSERT(forced_reg >= 0); + duk__expr(comp_ctx, res, rbp_flags); + duk__ivalue_toforcedreg(comp_ctx, res, forced_reg); +} + +DUK_LOCAL duk_regconst_t duk__expr_toregconst(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk__expr(comp_ctx, res, rbp_flags); + return duk__ivalue_toregconst(comp_ctx, res); +} + +#if 0 /* unused */ +DUK_LOCAL duk_regconst_t duk__expr_totempconst(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk__expr(comp_ctx, res, rbp_flags); + return duk__ivalue_totempconst(comp_ctx, res); +} +#endif + +DUK_LOCAL void duk__expr_toplain(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk__expr(comp_ctx, res, rbp_flags); + duk__ivalue_toplain(comp_ctx, res); +} + +DUK_LOCAL void duk__expr_toplain_ignore(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk__expr(comp_ctx, res, rbp_flags); + duk__ivalue_toplain_ignore(comp_ctx, res); +} + +DUK_LOCAL duk_regconst_t duk__exprtop_toreg(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk__exprtop(comp_ctx, res, rbp_flags); + return duk__ivalue_toreg(comp_ctx, res); +} + +#if 0 /* unused */ +DUK_LOCAL duk_regconst_t duk__exprtop_totemp(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk__exprtop(comp_ctx, res, rbp_flags); + return duk__ivalue_totemp(comp_ctx, res); +} +#endif + +DUK_LOCAL void duk__exprtop_toforcedreg(duk_compiler_ctx *comp_ctx, + duk_ivalue *res, + duk_small_uint_t rbp_flags, + duk_regconst_t forced_reg) { + DUK_ASSERT(forced_reg >= 0); + duk__exprtop(comp_ctx, res, rbp_flags); + duk__ivalue_toforcedreg(comp_ctx, res, forced_reg); +} + +DUK_LOCAL duk_regconst_t duk__exprtop_toregconst(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t rbp_flags) { + duk__exprtop(comp_ctx, res, rbp_flags); + return duk__ivalue_toregconst(comp_ctx, res); +} + +#if 0 /* unused */ +DUK_LOCAL void duk__exprtop_toplain_ignore(duk_compiler_ctx *comp_ctx, duk_ivalue *res, int rbp_flags) { + duk__exprtop(comp_ctx, res, rbp_flags); + duk__ivalue_toplain_ignore(comp_ctx, res); +} +#endif + +/* + * Parse an individual source element (top level statement) or a statement. + * + * Handles labeled statements automatically (peeling away labels before + * parsing an expression that follows the label(s)). + * + * Upon entry, 'curr_tok' contains the first token of the statement (parsed + * in "allow regexp literal" mode). Upon exit, 'curr_tok' contains the first + * token following the statement (if the statement has a terminator, this is + * the token after the terminator). + */ + +#define DUK__HAS_VAL (1 << 0) /* stmt has non-empty value */ +#define DUK__HAS_TERM (1 << 1) /* stmt has explicit/implicit semicolon terminator */ +#define DUK__ALLOW_AUTO_SEMI_ALWAYS (1 << 2) /* allow automatic semicolon even without lineterm (compatibility) */ +#define DUK__STILL_PROLOGUE (1 << 3) /* statement does not terminate directive prologue */ +#define DUK__IS_TERMINAL (1 << 4) /* statement is guaranteed to be terminal (control doesn't flow to next statement) */ + +/* Parse a single variable declaration (e.g. "i" or "i=10"). A leading 'var' + * has already been eaten. These is no return value in 'res', it is used only + * as a temporary. + * + * When called from 'for-in' statement parser, the initializer expression must + * not allow the 'in' token. The caller supply additional expression parsing + * flags (like DUK__EXPR_FLAG_REJECT_IN) in 'expr_flags'. + * + * Finally, out_rc_varname and out_reg_varbind are updated to reflect where + * the identifier is bound: + * + * If register bound: out_reg_varbind >= 0, out_rc_varname == 0 (ignore) + * If not register bound: out_reg_varbind < 0, out_rc_varname >= 0 + * + * These allow the caller to use the variable for further assignment, e.g. + * as is done in 'for-in' parsing. + */ + +DUK_LOCAL void duk__parse_var_decl(duk_compiler_ctx *comp_ctx, + duk_ivalue *res, + duk_small_uint_t expr_flags, + duk_regconst_t *out_reg_varbind, + duk_regconst_t *out_rc_varname) { + duk_hthread *thr = comp_ctx->thr; + duk_hstring *h_varname; + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + + /* assume 'var' has been eaten */ + + /* Note: Identifier rejects reserved words */ + if (comp_ctx->curr_token.t != DUK_TOK_IDENTIFIER) { + goto syntax_error; + } + h_varname = comp_ctx->curr_token.str1; + + DUK_ASSERT(h_varname != NULL); + + /* strict mode restrictions (E5 Section 12.2.1) */ + if (duk__hstring_is_eval_or_arguments_in_strict_mode(comp_ctx, h_varname)) { + goto syntax_error; + } + + /* register declarations in first pass */ + if (comp_ctx->curr_func.in_scanning) { + duk_uarridx_t n; + DUK_DDD(DUK_DDDPRINT("register variable declaration %!O in pass 1", (duk_heaphdr *) h_varname)); + n = (duk_uarridx_t) duk_get_length(thr, comp_ctx->curr_func.decls_idx); + duk_push_hstring(thr, h_varname); + duk_put_prop_index(thr, comp_ctx->curr_func.decls_idx, n); + duk_push_int(thr, DUK_DECL_TYPE_VAR + (0 << 8)); + duk_put_prop_index(thr, comp_ctx->curr_func.decls_idx, n + 1); + } + + duk_push_hstring(thr, h_varname); /* push before advancing to keep reachable */ + + /* register binding lookup is based on varmap (even in first pass) */ + duk_dup_top(thr); + (void) duk__lookup_lhs(comp_ctx, ®_varbind, &rc_varname); + + duk__advance(comp_ctx); /* eat identifier */ + + if (comp_ctx->curr_token.t == DUK_TOK_EQUALSIGN) { + duk__advance(comp_ctx); + + DUK_DDD(DUK_DDDPRINT("vardecl, assign to '%!O' -> reg_varbind=%ld, rc_varname=%ld", + (duk_heaphdr *) h_varname, + (long) reg_varbind, + (long) rc_varname)); + + duk__exprtop(comp_ctx, res, DUK__BP_COMMA | expr_flags /*rbp_flags*/); /* AssignmentExpression */ + + if (reg_varbind >= 0) { + duk__ivalue_toforcedreg(comp_ctx, res, reg_varbind); + } else { + duk_regconst_t reg_val; + reg_val = duk__ivalue_toreg(comp_ctx, res); + duk__emit_a_bc(comp_ctx, DUK_OP_PUTVAR | DUK__EMIT_FLAG_A_IS_SOURCE, reg_val, rc_varname); + } + } else { + if (expr_flags & DUK__EXPR_FLAG_REQUIRE_INIT) { + /* Used for minimal 'const': initializer required. */ + goto syntax_error; + } + } + + duk_pop(thr); /* pop varname */ + + *out_rc_varname = rc_varname; + *out_reg_varbind = reg_varbind; + + return; + +syntax_error: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_VAR_DECLARATION); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL void duk__parse_var_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_small_uint_t expr_flags) { + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + + duk__advance(comp_ctx); /* eat 'var' */ + + for (;;) { + /* rc_varname and reg_varbind are ignored here */ + duk__parse_var_decl(comp_ctx, res, 0 | expr_flags, ®_varbind, &rc_varname); + + if (comp_ctx->curr_token.t != DUK_TOK_COMMA) { + break; + } + duk__advance(comp_ctx); + } +} + +DUK_LOCAL void duk__parse_for_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_int_t pc_label_site) { + duk_hthread *thr = comp_ctx->thr; + duk_int_t pc_v34_lhs; /* start variant 3/4 left-hand-side code (L1 in doc/compiler.rst example) */ + duk_regconst_t temp_reset; /* knock back "next temp" to this whenever possible */ + duk_regconst_t reg_temps; /* preallocated temporaries (2) for variants 3 and 4 */ + + DUK_DDD(DUK_DDDPRINT("start parsing a for/for-in statement")); + + /* Two temporaries are preallocated here for variants 3 and 4 which need + * registers which are never clobbered by expressions in the loop + * (concretely: for the enumerator object and the next enumerated value). + * Variants 1 and 2 "release" these temps. + */ + + reg_temps = DUK__ALLOCTEMPS(comp_ctx, 2); + + temp_reset = DUK__GETTEMP(comp_ctx); + + /* + * For/for-in main variants are: + * + * 1. for (ExpressionNoIn_opt; Expression_opt; Expression_opt) Statement + * 2. for (var VariableDeclarationNoIn; Expression_opt; Expression_opt) Statement + * 3. for (LeftHandSideExpression in Expression) Statement + * 4. for (var VariableDeclarationNoIn in Expression) Statement + * + * Parsing these without arbitrary lookahead or backtracking is relatively + * tricky but we manage to do so for now. + * + * See doc/compiler.rst for a detailed discussion of control flow + * issues, evaluation order issues, etc. + */ + + duk__advance(comp_ctx); /* eat 'for' */ + duk__advance_expect(comp_ctx, DUK_TOK_LPAREN); + + DUK_DDD(DUK_DDDPRINT("detecting for/for-in loop variant, pc=%ld", (long) duk__get_current_pc(comp_ctx))); + + /* a label site has been emitted by duk__parse_stmt() automatically + * (it will also emit the ENDLABEL). + */ + + if (comp_ctx->curr_token.t == DUK_TOK_VAR) { + /* + * Variant 2 or 4 + */ + + duk_regconst_t reg_varbind; /* variable binding register if register-bound (otherwise < 0) */ + duk_regconst_t rc_varname; /* variable name reg/const, if variable not register-bound */ + + duk__advance(comp_ctx); /* eat 'var' */ + duk__parse_var_decl(comp_ctx, res, DUK__EXPR_FLAG_REJECT_IN, ®_varbind, &rc_varname); + DUK__SETTEMP(comp_ctx, temp_reset); + + if (comp_ctx->curr_token.t == DUK_TOK_IN) { + /* + * Variant 4 + */ + + DUK_DDD(DUK_DDDPRINT("detected for variant 4: for (var VariableDeclarationNoIn in Expression) Statement")); + pc_v34_lhs = duk__get_current_pc(comp_ctx); /* jump is inserted here */ + if (reg_varbind >= 0) { + duk__emit_a_bc(comp_ctx, DUK_OP_LDREG, reg_varbind, reg_temps + 0); + } else { + duk__emit_a_bc(comp_ctx, DUK_OP_PUTVAR | DUK__EMIT_FLAG_A_IS_SOURCE, reg_temps + 0, rc_varname); + } + goto parse_3_or_4; + } else { + /* + * Variant 2 + */ + + DUK_DDD(DUK_DDDPRINT( + "detected for variant 2: for (var VariableDeclarationNoIn; Expression_opt; Expression_opt) Statement")); + for (;;) { + /* more initializers */ + if (comp_ctx->curr_token.t != DUK_TOK_COMMA) { + break; + } + DUK_DDD(DUK_DDDPRINT("variant 2 has another variable initializer")); + + duk__advance(comp_ctx); /* eat comma */ + duk__parse_var_decl(comp_ctx, res, DUK__EXPR_FLAG_REJECT_IN, ®_varbind, &rc_varname); + } + goto parse_1_or_2; + } + } else { + /* + * Variant 1 or 3 + */ + + pc_v34_lhs = duk__get_current_pc(comp_ctx); /* jump is inserted here (variant 3) */ + + /* Note that duk__exprtop() here can clobber any reg above current temp_next, + * so any loop variables (e.g. enumerator) must be "preallocated". + */ + + /* don't coerce yet to a plain value (variant 3 needs special handling) */ + duk__exprtop(comp_ctx, + res, + DUK__BP_FOR_EXPR | DUK__EXPR_FLAG_REJECT_IN | + DUK__EXPR_FLAG_ALLOW_EMPTY /*rbp_flags*/); /* Expression */ + if (comp_ctx->curr_token.t == DUK_TOK_IN) { + /* + * Variant 3 + */ + + /* XXX: need to determine LHS type, and check that it is LHS compatible */ + DUK_DDD(DUK_DDDPRINT("detected for variant 3: for (LeftHandSideExpression in Expression) Statement")); + if (duk__expr_is_empty(comp_ctx)) { + goto syntax_error; /* LeftHandSideExpression does not allow empty expression */ + } + + if (res->t == DUK_IVAL_VAR) { + duk_regconst_t reg_varbind; + duk_regconst_t rc_varname; + + duk_dup(thr, res->x1.valstack_idx); + if (duk__lookup_lhs(comp_ctx, ®_varbind, &rc_varname)) { + duk__emit_a_bc(comp_ctx, DUK_OP_LDREG, reg_varbind, reg_temps + 0); + } else { + duk__emit_a_bc(comp_ctx, + DUK_OP_PUTVAR | DUK__EMIT_FLAG_A_IS_SOURCE, + reg_temps + 0, + rc_varname); + } + } else if (res->t == DUK_IVAL_PROP) { + /* Don't allow a constant for the object (even for a number etc), as + * it goes into the 'A' field of the opcode. + */ + duk_regconst_t reg_obj; + duk_regconst_t rc_key; + reg_obj = duk__ispec_toregconst_raw(comp_ctx, + &res->x1, + -1 /*forced_reg*/, + 0 /*flags*/); /* don't allow const */ + rc_key = duk__ispec_toregconst_raw(comp_ctx, + &res->x2, + -1 /*forced_reg*/, + DUK__IVAL_FLAG_ALLOW_CONST /*flags*/); + duk__emit_a_b_c(comp_ctx, + DUK_OP_PUTPROP | DUK__EMIT_FLAG_A_IS_SOURCE | DUK__EMIT_FLAG_BC_REGCONST, + reg_obj, + rc_key, + reg_temps + 0); + } else { + duk__ivalue_toplain_ignore(comp_ctx, res); /* just in case */ + duk__emit_op_only(comp_ctx, DUK_OP_INVLHS); + } + goto parse_3_or_4; + } else { + /* + * Variant 1 + */ + + DUK_DDD(DUK_DDDPRINT( + "detected for variant 1: for (ExpressionNoIn_opt; Expression_opt; Expression_opt) Statement")); + duk__ivalue_toplain_ignore(comp_ctx, res); + goto parse_1_or_2; + } + } + +parse_1_or_2: + /* + * Parse variant 1 or 2. The first part expression (which differs + * in the variants) has already been parsed and its code emitted. + * + * reg_temps + 0: unused + * reg_temps + 1: unused + */ + { + duk_regconst_t rc_cond; + duk_int_t pc_l1, pc_l2, pc_l3, pc_l4; + duk_int_t pc_jumpto_l3, pc_jumpto_l4; + duk_bool_t expr_c_empty; + + DUK_DDD(DUK_DDDPRINT("shared code for parsing variants 1 and 2")); + + /* "release" preallocated temps since we won't need them */ + temp_reset = reg_temps + 0; + DUK__SETTEMP(comp_ctx, temp_reset); + + duk__advance_expect(comp_ctx, DUK_TOK_SEMICOLON); + + pc_l1 = duk__get_current_pc(comp_ctx); + duk__exprtop(comp_ctx, res, DUK__BP_FOR_EXPR | DUK__EXPR_FLAG_ALLOW_EMPTY /*rbp_flags*/); /* Expression_opt */ + if (duk__expr_is_empty(comp_ctx)) { + /* no need to coerce */ + pc_jumpto_l3 = duk__emit_jump_empty(comp_ctx); /* to body */ + pc_jumpto_l4 = -1; /* omitted */ + } else { + rc_cond = duk__ivalue_toregconst(comp_ctx, res); + duk__emit_if_false_skip(comp_ctx, rc_cond); + pc_jumpto_l3 = duk__emit_jump_empty(comp_ctx); /* to body */ + pc_jumpto_l4 = duk__emit_jump_empty(comp_ctx); /* to exit */ + } + DUK__SETTEMP(comp_ctx, temp_reset); + + duk__advance_expect(comp_ctx, DUK_TOK_SEMICOLON); + + pc_l2 = duk__get_current_pc(comp_ctx); + duk__exprtop(comp_ctx, res, DUK__BP_FOR_EXPR | DUK__EXPR_FLAG_ALLOW_EMPTY /*rbp_flags*/); /* Expression_opt */ + if (duk__expr_is_empty(comp_ctx)) { + /* no need to coerce */ + expr_c_empty = 1; + /* JUMP L1 omitted */ + } else { + duk__ivalue_toplain_ignore(comp_ctx, res); + expr_c_empty = 0; + duk__emit_jump(comp_ctx, pc_l1); + } + DUK__SETTEMP(comp_ctx, temp_reset); + + comp_ctx->curr_func.allow_regexp_in_adv = 1; + duk__advance_expect(comp_ctx, DUK_TOK_RPAREN); /* Allow RegExp as part of next stmt. */ + + pc_l3 = duk__get_current_pc(comp_ctx); + duk__parse_stmt(comp_ctx, res, 0 /*allow_source_elem*/); + if (expr_c_empty) { + duk__emit_jump(comp_ctx, pc_l1); + } else { + duk__emit_jump(comp_ctx, pc_l2); + } + /* temp reset is not necessary after duk__parse_stmt(), which already does it */ + + pc_l4 = duk__get_current_pc(comp_ctx); + + DUK_DDD(DUK_DDDPRINT("patching jumps: jumpto_l3: %ld->%ld, jumpto_l4: %ld->%ld, " + "break: %ld->%ld, continue: %ld->%ld", + (long) pc_jumpto_l3, + (long) pc_l3, + (long) pc_jumpto_l4, + (long) pc_l4, + (long) (pc_label_site + 1), + (long) pc_l4, + (long) (pc_label_site + 2), + (long) pc_l2)); + + duk__patch_jump(comp_ctx, pc_jumpto_l3, pc_l3); + duk__patch_jump(comp_ctx, pc_jumpto_l4, pc_l4); + duk__patch_jump(comp_ctx, pc_label_site + 1, pc_l4); /* break jump */ + duk__patch_jump(comp_ctx, pc_label_site + 2, expr_c_empty ? pc_l1 : pc_l2); /* continue jump */ + } + goto finished; + +parse_3_or_4: + /* + * Parse variant 3 or 4. + * + * For variant 3 (e.g. "for (A in C) D;") the code for A (except the + * final property/variable write) has already been emitted. The first + * instruction of that code is at pc_v34_lhs; a JUMP needs to be inserted + * there to satisfy control flow needs. + * + * For variant 4, if the variable declaration had an initializer + * (e.g. "for (var A = B in C) D;") the code for the assignment + * (B) has already been emitted. + * + * Variables set before entering here: + * + * pc_v34_lhs: insert a "JUMP L2" here (see doc/compiler.rst example). + * reg_temps + 0: iteration target value (written to LHS) + * reg_temps + 1: enumerator object + */ + { + duk_int_t pc_l1, pc_l2, pc_l3, pc_l4, pc_l5; + duk_int_t pc_jumpto_l2, pc_jumpto_l3, pc_jumpto_l4, pc_jumpto_l5; + duk_regconst_t reg_target; + + DUK_DDD(DUK_DDDPRINT("shared code for parsing variants 3 and 4, pc_v34_lhs=%ld", (long) pc_v34_lhs)); + + DUK__SETTEMP(comp_ctx, temp_reset); + + /* First we need to insert a jump in the middle of previously + * emitted code to get the control flow right. No jumps can + * cross the position where the jump is inserted. See doc/compiler.rst + * for discussion on the intricacies of control flow and side effects + * for variants 3 and 4. + */ + + duk__insert_jump_entry(comp_ctx, pc_v34_lhs); + pc_jumpto_l2 = pc_v34_lhs; /* inserted jump */ + pc_l1 = pc_v34_lhs + 1; /* +1, right after inserted jump */ + + /* The code for writing reg_temps + 0 to the left hand side has already + * been emitted. + */ + + pc_jumpto_l3 = duk__emit_jump_empty(comp_ctx); /* -> loop body */ + + duk__advance(comp_ctx); /* eat 'in' */ + + /* Parse enumeration target and initialize enumerator. For 'null' and 'undefined', + * INITENUM will creates a 'null' enumerator which works like an empty enumerator + * (E5 Section 12.6.4, step 3). Note that INITENUM requires the value to be in a + * register (constant not allowed). + */ + + pc_l2 = duk__get_current_pc(comp_ctx); + reg_target = duk__exprtop_toreg(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); /* Expression */ + duk__emit_b_c(comp_ctx, DUK_OP_INITENUM | DUK__EMIT_FLAG_B_IS_TARGET, reg_temps + 1, reg_target); + pc_jumpto_l4 = duk__emit_jump_empty(comp_ctx); + DUK__SETTEMP(comp_ctx, temp_reset); + + comp_ctx->curr_func.allow_regexp_in_adv = 1; + duk__advance_expect(comp_ctx, DUK_TOK_RPAREN); /* Allow RegExp as part of next stmt. */ + + pc_l3 = duk__get_current_pc(comp_ctx); + duk__parse_stmt(comp_ctx, res, 0 /*allow_source_elem*/); + /* temp reset is not necessary after duk__parse_stmt(), which already does it */ + + /* NEXTENUM needs a jump slot right after the main opcode. + * We need the code emitter to reserve the slot: if there's + * target shuffling, the target shuffle opcodes must happen + * after the jump slot (for NEXTENUM the shuffle opcodes are + * not needed if the enum is finished). + */ + pc_l4 = duk__get_current_pc(comp_ctx); + duk__emit_b_c(comp_ctx, + DUK_OP_NEXTENUM | DUK__EMIT_FLAG_B_IS_TARGET | DUK__EMIT_FLAG_RESERVE_JUMPSLOT, + reg_temps + 0, + reg_temps + 1); + pc_jumpto_l5 = comp_ctx->emit_jumpslot_pc; /* NEXTENUM jump slot: executed when enum finished */ + duk__emit_jump(comp_ctx, pc_l1); /* jump to next loop, using reg_v34_iter as iterated value */ + + pc_l5 = duk__get_current_pc(comp_ctx); + + /* XXX: since the enumerator may be a memory expensive object, + * perhaps clear it explicitly here? If so, break jump must + * go through this clearing operation. + */ + + DUK_DDD(DUK_DDDPRINT("patching jumps: jumpto_l2: %ld->%ld, jumpto_l3: %ld->%ld, " + "jumpto_l4: %ld->%ld, jumpto_l5: %ld->%ld, " + "break: %ld->%ld, continue: %ld->%ld", + (long) pc_jumpto_l2, + (long) pc_l2, + (long) pc_jumpto_l3, + (long) pc_l3, + (long) pc_jumpto_l4, + (long) pc_l4, + (long) pc_jumpto_l5, + (long) pc_l5, + (long) (pc_label_site + 1), + (long) pc_l5, + (long) (pc_label_site + 2), + (long) pc_l4)); + + duk__patch_jump(comp_ctx, pc_jumpto_l2, pc_l2); + duk__patch_jump(comp_ctx, pc_jumpto_l3, pc_l3); + duk__patch_jump(comp_ctx, pc_jumpto_l4, pc_l4); + duk__patch_jump(comp_ctx, pc_jumpto_l5, pc_l5); + duk__patch_jump(comp_ctx, pc_label_site + 1, pc_l5); /* break jump */ + duk__patch_jump(comp_ctx, pc_label_site + 2, pc_l4); /* continue jump */ + } + goto finished; + +finished: + DUK_DDD(DUK_DDDPRINT("end parsing a for/for-in statement")); + return; + +syntax_error: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_FOR); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL void duk__parse_switch_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_int_t pc_label_site) { + duk_hthread *thr = comp_ctx->thr; + duk_regconst_t temp_at_loop; + duk_regconst_t rc_switch; /* reg/const for switch value */ + duk_regconst_t rc_case; /* reg/const for case value */ + duk_regconst_t reg_temp; /* general temp register */ + duk_int_t pc_prevcase = -1; + duk_int_t pc_prevstmt = -1; + duk_int_t pc_default = -1; /* -1 == not set, -2 == pending (next statement list) */ + + /* Note: negative pc values are ignored when patching jumps, so no explicit checks needed */ + + /* + * Switch is pretty complicated because of several conflicting concerns: + * + * - Want to generate code without an intermediate representation, + * i.e., in one go + * + * - Case selectors are expressions, not values, and may thus e.g. throw + * exceptions (which causes evaluation order concerns) + * + * - Evaluation semantics of case selectors and default clause need to be + * carefully implemented to provide correct behavior even with case value + * side effects + * + * - Fall through case and default clauses; avoiding dead JUMPs if case + * ends with an unconditional jump (a break or a continue) + * + * - The same case value may occur multiple times, but evaluation rules + * only process the first match before switching to a "propagation" mode + * where case values are no longer evaluated + * + * See E5 Section 12.11. Also see doc/compiler.rst for compilation + * discussion. + */ + + duk__advance(comp_ctx); + duk__advance_expect(comp_ctx, DUK_TOK_LPAREN); + rc_switch = duk__exprtop_toregconst(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); + duk__advance_expect(comp_ctx, DUK_TOK_RPAREN); /* RegExp mode does not matter. */ + duk__advance_expect(comp_ctx, DUK_TOK_LCURLY); + + DUK_DDD(DUK_DDDPRINT("switch value in register %ld", (long) rc_switch)); + + temp_at_loop = DUK__GETTEMP(comp_ctx); + + for (;;) { + duk_int_t num_stmts; + duk_small_uint_t tok; + + /* sufficient for keeping temp reg numbers in check */ + DUK__SETTEMP(comp_ctx, temp_at_loop); + + if (comp_ctx->curr_token.t == DUK_TOK_RCURLY) { + break; + } + + /* + * Parse a case or default clause. + */ + + if (comp_ctx->curr_token.t == DUK_TOK_CASE) { + /* + * Case clause. + * + * Note: cannot use reg_case as a temp register (for SEQ target) + * because it may be a constant. + */ + + duk__patch_jump_here(comp_ctx, pc_prevcase); /* chain jumps for case + * evaluation and checking + */ + + duk__advance(comp_ctx); + rc_case = duk__exprtop_toregconst(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); + duk__advance_expect(comp_ctx, DUK_TOK_COLON); + + reg_temp = DUK__ALLOCTEMP(comp_ctx); + duk__emit_a_b_c(comp_ctx, DUK_OP_SEQ | DUK__EMIT_FLAG_BC_REGCONST, reg_temp, rc_switch, rc_case); + duk__emit_if_true_skip(comp_ctx, reg_temp); + + /* jump to next case clause */ + pc_prevcase = duk__emit_jump_empty(comp_ctx); /* no match, next case */ + + /* statements go here (if any) on next loop */ + } else if (comp_ctx->curr_token.t == DUK_TOK_DEFAULT) { + /* + * Default clause. + */ + + if (pc_default >= 0) { + goto syntax_error; + } + duk__advance(comp_ctx); + duk__advance_expect(comp_ctx, DUK_TOK_COLON); + + /* Fix for https://github.com/svaarala/duktape/issues/155: + * If 'default' is first clause (detected by pc_prevcase < 0) + * we need to ensure we stay in the matching chain. + */ + if (pc_prevcase < 0) { + DUK_DD(DUK_DDPRINT("default clause is first, emit prevcase jump")); + pc_prevcase = duk__emit_jump_empty(comp_ctx); + } + + /* default clause matches next statement list (if any) */ + pc_default = -2; + } else { + /* Code is not accepted before the first case/default clause */ + goto syntax_error; + } + + /* + * Parse code after the clause. Possible terminators are + * 'case', 'default', and '}'. + * + * Note that there may be no code at all, not even an empty statement, + * between case clauses. This must be handled just like an empty statement + * (omitting seemingly pointless JUMPs), to avoid situations like + * test-bug-case-fallthrough.js. + */ + + num_stmts = 0; + if (pc_default == -2) { + pc_default = duk__get_current_pc(comp_ctx); + } + + /* Note: this is correct even for default clause statements: + * they participate in 'fall-through' behavior even if the + * default clause is in the middle. + */ + duk__patch_jump_here(comp_ctx, pc_prevstmt); /* chain jumps for 'fall-through' + * after a case matches. + */ + + for (;;) { + tok = comp_ctx->curr_token.t; + if (tok == DUK_TOK_CASE || tok == DUK_TOK_DEFAULT || tok == DUK_TOK_RCURLY) { + break; + } + num_stmts++; + duk__parse_stmt(comp_ctx, res, 0 /*allow_source_elem*/); + } + + /* fall-through jump to next code of next case (backpatched) */ + pc_prevstmt = duk__emit_jump_empty(comp_ctx); + + /* XXX: would be nice to omit this jump when the jump is not + * reachable, at least in the obvious cases (such as the case + * ending with a 'break'. + * + * Perhaps duk__parse_stmt() could provide some info on whether + * the statement is a "dead end"? + * + * If implemented, just set pc_prevstmt to -1 when not needed. + */ + } + + DUK_ASSERT(comp_ctx->curr_token.t == DUK_TOK_RCURLY); + comp_ctx->curr_func.allow_regexp_in_adv = 1; + duk__advance(comp_ctx); /* Allow RegExp as part of next stmt. */ + + /* default case control flow patchup; note that if pc_prevcase < 0 + * (i.e. no case clauses), control enters default case automatically. + */ + if (pc_default >= 0) { + /* default case exists: go there if no case matches */ + duk__patch_jump(comp_ctx, pc_prevcase, pc_default); + } else { + /* default case does not exist, or no statements present + * after default case: finish case evaluation + */ + duk__patch_jump_here(comp_ctx, pc_prevcase); + } + + /* fall-through control flow patchup; note that pc_prevstmt may be + * < 0 (i.e. no case clauses), in which case this is a no-op. + */ + duk__patch_jump_here(comp_ctx, pc_prevstmt); + + /* continue jump not patched, an INVALID opcode remains there */ + duk__patch_jump_here(comp_ctx, pc_label_site + 1); /* break jump */ + + /* Note: 'fast' breaks will jump to pc_label_site + 1, which will + * then jump here. The double jump will be eliminated by a + * peephole pass, resulting in an optimal jump here. The label + * site jumps will remain in bytecode and will waste code size. + */ + + return; + +syntax_error: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_SWITCH); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL void duk__parse_if_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res) { + duk_regconst_t temp_reset; + duk_regconst_t rc_cond; + duk_int_t pc_jump_false; + + DUK_DDD(DUK_DDDPRINT("begin parsing if statement")); + + temp_reset = DUK__GETTEMP(comp_ctx); + + duk__advance(comp_ctx); /* eat 'if' */ + duk__advance_expect(comp_ctx, DUK_TOK_LPAREN); + + rc_cond = duk__exprtop_toregconst(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); + duk__emit_if_true_skip(comp_ctx, rc_cond); + pc_jump_false = duk__emit_jump_empty(comp_ctx); /* jump to end or else part */ + DUK__SETTEMP(comp_ctx, temp_reset); + + comp_ctx->curr_func.allow_regexp_in_adv = 1; + duk__advance_expect(comp_ctx, DUK_TOK_RPAREN); /* Allow RegExp as part of next stmt. */ + + duk__parse_stmt(comp_ctx, res, 0 /*allow_source_elem*/); + + /* The 'else' ambiguity is resolved by 'else' binding to the innermost + * construct, so greedy matching is correct here. + */ + + if (comp_ctx->curr_token.t == DUK_TOK_ELSE) { + duk_int_t pc_jump_end; + + DUK_DDD(DUK_DDDPRINT("if has else part")); + + duk__advance(comp_ctx); + + pc_jump_end = duk__emit_jump_empty(comp_ctx); /* jump from true part to end */ + duk__patch_jump_here(comp_ctx, pc_jump_false); + + duk__parse_stmt(comp_ctx, res, 0 /*allow_source_elem*/); + + duk__patch_jump_here(comp_ctx, pc_jump_end); + } else { + DUK_DDD(DUK_DDDPRINT("if does not have else part")); + + duk__patch_jump_here(comp_ctx, pc_jump_false); + } + + DUK_DDD(DUK_DDDPRINT("end parsing if statement")); +} + +DUK_LOCAL void duk__parse_do_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_int_t pc_label_site) { + duk_regconst_t rc_cond; + duk_int_t pc_start; + + DUK_DDD(DUK_DDDPRINT("begin parsing do statement")); + + duk__advance(comp_ctx); /* Eat 'do'; allow RegExp as part of next stmt. */ + + pc_start = duk__get_current_pc(comp_ctx); + duk__parse_stmt(comp_ctx, res, 0 /*allow_source_elem*/); + duk__patch_jump_here(comp_ctx, pc_label_site + 2); /* continue jump */ + + duk__advance_expect(comp_ctx, DUK_TOK_WHILE); + duk__advance_expect(comp_ctx, DUK_TOK_LPAREN); + + rc_cond = duk__exprtop_toregconst(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); + duk__emit_if_false_skip(comp_ctx, rc_cond); + duk__emit_jump(comp_ctx, pc_start); + /* no need to reset temps, as we're finished emitting code */ + + comp_ctx->curr_func.allow_regexp_in_adv = 1; /* Allow RegExp as part of next stmt. */ + duk__advance_expect(comp_ctx, DUK_TOK_RPAREN); + + duk__patch_jump_here(comp_ctx, pc_label_site + 1); /* break jump */ + + DUK_DDD(DUK_DDDPRINT("end parsing do statement")); +} + +DUK_LOCAL void duk__parse_while_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_int_t pc_label_site) { + duk_regconst_t temp_reset; + duk_regconst_t rc_cond; + duk_int_t pc_start; + duk_int_t pc_jump_false; + + DUK_DDD(DUK_DDDPRINT("begin parsing while statement")); + + temp_reset = DUK__GETTEMP(comp_ctx); + + duk__advance(comp_ctx); /* eat 'while' */ + + duk__advance_expect(comp_ctx, DUK_TOK_LPAREN); + + pc_start = duk__get_current_pc(comp_ctx); + duk__patch_jump_here(comp_ctx, pc_label_site + 2); /* continue jump */ + + rc_cond = duk__exprtop_toregconst(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); + duk__emit_if_true_skip(comp_ctx, rc_cond); + pc_jump_false = duk__emit_jump_empty(comp_ctx); + DUK__SETTEMP(comp_ctx, temp_reset); + + comp_ctx->curr_func.allow_regexp_in_adv = 1; + duk__advance_expect(comp_ctx, DUK_TOK_RPAREN); /* Allow RegExp as part of next stmt. */ + + duk__parse_stmt(comp_ctx, res, 0 /*allow_source_elem*/); + duk__emit_jump(comp_ctx, pc_start); + + duk__patch_jump_here(comp_ctx, pc_jump_false); + duk__patch_jump_here(comp_ctx, pc_label_site + 1); /* break jump */ + + DUK_DDD(DUK_DDDPRINT("end parsing while statement")); +} + +DUK_LOCAL void duk__parse_break_or_continue_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res) { + duk_hthread *thr = comp_ctx->thr; + duk_bool_t is_break = (comp_ctx->curr_token.t == DUK_TOK_BREAK); + duk_int_t label_id; + duk_int_t label_catch_depth; + duk_int_t label_pc; /* points to LABEL; pc+1 = jump site for break; pc+2 = jump site for continue */ + duk_bool_t label_is_closest; + + DUK_UNREF(res); + + duk__advance(comp_ctx); /* eat 'break' or 'continue' */ + + if (comp_ctx->curr_token.t == DUK_TOK_SEMICOLON || /* explicit semi follows */ + comp_ctx->curr_token.lineterm || /* automatic semi will be inserted */ + comp_ctx->curr_token.allow_auto_semi) { /* automatic semi will be inserted */ + /* break/continue without label */ + + duk__lookup_active_label(comp_ctx, + DUK_HTHREAD_STRING_EMPTY_STRING(thr), + is_break, + &label_id, + &label_catch_depth, + &label_pc, + &label_is_closest); + } else if (comp_ctx->curr_token.t == DUK_TOK_IDENTIFIER) { + /* break/continue with label (label cannot be a reserved word, production is 'Identifier' */ + DUK_ASSERT(comp_ctx->curr_token.str1 != NULL); + duk__lookup_active_label(comp_ctx, + comp_ctx->curr_token.str1, + is_break, + &label_id, + &label_catch_depth, + &label_pc, + &label_is_closest); + duk__advance(comp_ctx); + } else { + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_BREAK_CONT_LABEL); + DUK_WO_NORETURN(return;); + } + + /* Use a fast break/continue when possible. A fast break/continue is + * just a jump to the LABEL break/continue jump slot, which then jumps + * to an appropriate place (for break, going through ENDLABEL correctly). + * The peephole optimizer will optimize the jump to a direct one. + */ + + if (label_catch_depth == comp_ctx->curr_func.catch_depth && label_is_closest) { + DUK_DDD(DUK_DDDPRINT("break/continue: is_break=%ld, label_id=%ld, label_is_closest=%ld, " + "label_catch_depth=%ld, catch_depth=%ld " + "-> use fast variant (direct jump)", + (long) is_break, + (long) label_id, + (long) label_is_closest, + (long) label_catch_depth, + (long) comp_ctx->curr_func.catch_depth)); + + duk__emit_jump(comp_ctx, label_pc + (is_break ? 1 : 2)); + } else { + DUK_DDD(DUK_DDDPRINT("break/continue: is_break=%ld, label_id=%ld, label_is_closest=%ld, " + "label_catch_depth=%ld, catch_depth=%ld " + "-> use slow variant (longjmp)", + (long) is_break, + (long) label_id, + (long) label_is_closest, + (long) label_catch_depth, + (long) comp_ctx->curr_func.catch_depth)); + + duk__emit_bc(comp_ctx, is_break ? DUK_OP_BREAK : DUK_OP_CONTINUE, (duk_regconst_t) label_id); + } +} + +DUK_LOCAL void duk__parse_return_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res) { + duk_hthread *thr = comp_ctx->thr; + duk_regconst_t rc_val; + + duk__advance(comp_ctx); /* eat 'return' */ + + /* A 'return' statement is only allowed inside an actual function body, + * not as part of eval or global code. + */ + if (!comp_ctx->curr_func.is_function) { + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_RETURN); + DUK_WO_NORETURN(return;); + } + + if (comp_ctx->curr_token.t == DUK_TOK_SEMICOLON || /* explicit semi follows */ + comp_ctx->curr_token.lineterm || /* automatic semi will be inserted */ + comp_ctx->curr_token.allow_auto_semi) { /* automatic semi will be inserted */ + DUK_DDD(DUK_DDDPRINT("empty return value -> undefined")); + duk__emit_op_only(comp_ctx, DUK_OP_RETUNDEF); + } else { + duk_int_t pc_before_expr; + duk_int_t pc_after_expr; + + DUK_DDD(DUK_DDDPRINT("return with a value")); + + DUK_UNREF(pc_before_expr); + DUK_UNREF(pc_after_expr); + + pc_before_expr = duk__get_current_pc(comp_ctx); + rc_val = duk__exprtop_toregconst(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); + pc_after_expr = duk__get_current_pc(comp_ctx); + + /* Tail call check: if last opcode emitted was CALL, and + * the context allows it, add a tailcall flag to the CALL. + * This doesn't guarantee that a tail call will be allowed at + * runtime, so the RETURN must still be emitted. (Duktape + * 0.10.0 avoided this and simulated a RETURN if a tail call + * couldn't be used at runtime; but this didn't work + * correctly with a thread yield/resume, see + * test-bug-tailcall-thread-yield-resume.js for discussion.) + * + * In addition to the last opcode being CALL, we also need to + * be sure that 'rc_val' is the result register of the CALL. + * For instance, for the expression 'return 0, (function () + * { return 1; }), 2' the last opcode emitted is CALL (no + * bytecode is emitted for '2') but 'rc_val' indicates + * constant '2'. Similarly if '2' is replaced by a register + * bound variable, no opcodes are emitted but tail call would + * be incorrect. + * + * This is tricky and easy to get wrong. It would be best to + * track enough expression metadata to check that 'rc_val' came + * from that last CALL instruction. We don't have that metadata + * now, so we check that 'rc_val' is a temporary register result + * (not a constant or a register bound variable). There should + * be no way currently for 'rc_val' to be a temporary for an + * expression following the CALL instruction without emitting + * some opcodes following the CALL. This proxy check is used + * below. + * + * See: test-bug-comma-expr-gh131.js. + * + * The non-standard 'caller' property disables tail calls + * because they pose some special cases which haven't been + * fixed yet. + */ + +#if defined(DUK_USE_TAILCALL) + if (comp_ctx->curr_func.catch_depth == 0 && /* no catchers */ + pc_after_expr > pc_before_expr) { /* at least one opcode emitted */ + duk_compiler_instr *instr; + duk_instr_t ins; + duk_small_uint_t op; + + instr = duk__get_instr_ptr(comp_ctx, pc_after_expr - 1); + DUK_ASSERT(instr != NULL); + + ins = instr->ins; + op = (duk_small_uint_t) DUK_DEC_OP(ins); + if ((op & ~0x0fU) == DUK_OP_CALL0 && DUK__ISREG_TEMP(comp_ctx, rc_val) /* see above */) { + DUK_DDD(DUK_DDDPRINT("return statement detected a tail call opportunity: " + "catch depth is 0, duk__exprtop() emitted >= 1 instructions, " + "and last instruction is a CALL " + "-> change to TAILCALL")); + ins |= DUK_ENC_OP(DUK_BC_CALL_FLAG_TAILCALL); + instr->ins = ins; + } + } +#endif /* DUK_USE_TAILCALL */ + + if (DUK__ISREG(rc_val)) { + duk__emit_bc(comp_ctx, DUK_OP_RETREG, rc_val); + } else { + rc_val = DUK__REMOVECONST(rc_val); + if (duk__const_needs_refcount(comp_ctx, rc_val)) { + duk__emit_bc(comp_ctx, DUK_OP_RETCONST, rc_val); + } else { + duk__emit_bc(comp_ctx, DUK_OP_RETCONSTN, rc_val); + } + } + } +} + +DUK_LOCAL void duk__parse_throw_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res) { + duk_regconst_t reg_val; + + duk__advance(comp_ctx); /* eat 'throw' */ + + /* Unlike break/continue, throw statement does not allow an empty value. */ + + if (comp_ctx->curr_token.lineterm) { + DUK_ERROR_SYNTAX(comp_ctx->thr, DUK_STR_INVALID_THROW); + DUK_WO_NORETURN(return;); + } + + reg_val = duk__exprtop_toreg(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); + duk__emit_bc(comp_ctx, DUK_OP_THROW, reg_val); +} + +DUK_LOCAL void duk__parse_try_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res) { + duk_hthread *thr = comp_ctx->thr; + duk_regconst_t reg_catch; /* reg_catch+0 and reg_catch+1 are reserved for TRYCATCH */ + duk_regconst_t rc_varname = 0; + duk_small_uint_t trycatch_flags = 0; + duk_int_t pc_ldconst = -1; + duk_int_t pc_trycatch = -1; + duk_int_t pc_catch = -1; + duk_int_t pc_finally = -1; + + DUK_UNREF(res); + + /* + * See the following documentation for discussion: + * + * doc/execution.rst: control flow details + * + * Try, catch, and finally "parts" are Blocks, not Statements, so + * they must always be delimited by curly braces. This is unlike e.g. + * the if statement, which accepts any Statement. This eliminates any + * questions of matching parts of nested try statements. The Block + * parsing is implemented inline here (instead of calling out). + * + * Finally part has a 'let scoped' variable, which requires a few kinks + * here. + */ + + comp_ctx->curr_func.catch_depth++; + + duk__advance(comp_ctx); /* eat 'try' */ + + reg_catch = DUK__ALLOCTEMPS(comp_ctx, 2); + + /* The target for this LDCONST may need output shuffling, but we assume + * that 'pc_ldconst' will be the LDCONST that we can patch later. This + * should be the case because there's no input shuffling. (If there's + * no catch clause, this LDCONST will be replaced with a NOP.) + */ + pc_ldconst = duk__get_current_pc(comp_ctx); + duk__emit_a_bc(comp_ctx, DUK_OP_LDCONST, reg_catch, 0 /*patched later*/); + + pc_trycatch = duk__get_current_pc(comp_ctx); + duk__emit_invalid(comp_ctx); /* TRYCATCH, cannot emit now (not enough info) */ + duk__emit_invalid(comp_ctx); /* jump for 'catch' case */ + duk__emit_invalid(comp_ctx); /* jump for 'finally' case or end (if no finally) */ + + /* try part */ + duk__advance_expect(comp_ctx, DUK_TOK_LCURLY); + duk__parse_stmts(comp_ctx, 0 /*allow_source_elem*/, 0 /*expect_eof*/, 1 /*regexp_after*/); + /* the DUK_TOK_RCURLY is eaten by duk__parse_stmts() */ + duk__emit_op_only(comp_ctx, DUK_OP_ENDTRY); + + if (comp_ctx->curr_token.t == DUK_TOK_CATCH) { + /* + * The catch variable must be updated to reflect the new allocated + * register for the duration of the catch clause. We need to store + * and restore the original value for the varmap entry (if any). + */ + + /* + * Note: currently register bindings must be fixed for the entire + * function. So, even though the catch variable is in a register + * we know, we must use an explicit environment record and slow path + * accesses to read/write the catch binding to make closures created + * within the catch clause work correctly. This restriction should + * be fixable (at least in common cases) later. + * + * See: test-bug-catch-binding-2.js. + * + * XXX: improve to get fast path access to most catch clauses. + */ + + duk_hstring *h_var; + duk_int_t varmap_value; /* for storing/restoring the varmap binding for catch variable */ + + DUK_DDD(DUK_DDDPRINT("stack top at start of catch clause: %ld", (long) duk_get_top(thr))); + + trycatch_flags |= DUK_BC_TRYCATCH_FLAG_HAVE_CATCH; + + pc_catch = duk__get_current_pc(comp_ctx); + + duk__advance(comp_ctx); + duk__advance_expect(comp_ctx, DUK_TOK_LPAREN); + + if (comp_ctx->curr_token.t != DUK_TOK_IDENTIFIER) { + /* Identifier, i.e. don't allow reserved words */ + goto syntax_error; + } + h_var = comp_ctx->curr_token.str1; + DUK_ASSERT(h_var != NULL); + + duk_push_hstring(thr, h_var); /* keep in on valstack, use borrowed ref below */ + + if (comp_ctx->curr_func.is_strict && + ((h_var == DUK_HTHREAD_STRING_EVAL(thr)) || (h_var == DUK_HTHREAD_STRING_LC_ARGUMENTS(thr)))) { + DUK_DDD(DUK_DDDPRINT("catch identifier 'eval' or 'arguments' in strict mode -> SyntaxError")); + goto syntax_error; + } + + duk_dup_top(thr); + rc_varname = duk__getconst(comp_ctx); + DUK_DDD(DUK_DDDPRINT("catch clause, rc_varname=0x%08lx (%ld)", (unsigned long) rc_varname, (long) rc_varname)); + + duk__advance(comp_ctx); + duk__advance_expect(comp_ctx, DUK_TOK_RPAREN); + + duk__advance_expect(comp_ctx, DUK_TOK_LCURLY); + + DUK_DDD(DUK_DDDPRINT("varmap before modifying for catch clause: %!iT", + (duk_tval *) duk_get_tval(thr, comp_ctx->curr_func.varmap_idx))); + + duk_dup_top(thr); + duk_get_prop(thr, comp_ctx->curr_func.varmap_idx); + if (duk_is_undefined(thr, -1)) { + varmap_value = -2; + } else if (duk_is_null(thr, -1)) { + varmap_value = -1; + } else { + DUK_ASSERT(duk_is_number(thr, -1)); + varmap_value = duk_get_int(thr, -1); + DUK_ASSERT(varmap_value >= 0); + } + duk_pop(thr); + +#if 0 + /* It'd be nice to do something like this - but it doesn't + * work for closures created inside the catch clause. + */ + duk_dup_top(thr); + duk_push_int(thr, (duk_int_t) (reg_catch + 0)); + duk_put_prop(thr, comp_ctx->curr_func.varmap_idx); +#endif + duk_dup_top(thr); + duk_push_null(thr); + duk_put_prop(thr, comp_ctx->curr_func.varmap_idx); + + duk__emit_a_bc(comp_ctx, + DUK_OP_PUTVAR | DUK__EMIT_FLAG_A_IS_SOURCE, + reg_catch + 0 /*value*/, + rc_varname /*varname*/); + + DUK_DDD(DUK_DDDPRINT("varmap before parsing catch clause: %!iT", + (duk_tval *) duk_get_tval(thr, comp_ctx->curr_func.varmap_idx))); + + duk__parse_stmts(comp_ctx, 0 /*allow_source_elem*/, 0 /*expect_eof*/, 1 /*regexp_after*/); + /* the DUK_TOK_RCURLY is eaten by duk__parse_stmts() */ + + if (varmap_value == -2) { + /* not present */ + duk_del_prop(thr, comp_ctx->curr_func.varmap_idx); + } else { + if (varmap_value == -1) { + duk_push_null(thr); + } else { + DUK_ASSERT(varmap_value >= 0); + duk_push_int(thr, varmap_value); + } + duk_put_prop(thr, comp_ctx->curr_func.varmap_idx); + } + /* varname is popped by above code */ + + DUK_DDD(DUK_DDDPRINT("varmap after restore catch clause: %!iT", + (duk_tval *) duk_get_tval(thr, comp_ctx->curr_func.varmap_idx))); + + duk__emit_op_only(comp_ctx, DUK_OP_ENDCATCH); + + /* + * XXX: for now, indicate that an expensive catch binding + * declarative environment is always needed. If we don't + * need it, we don't need the const_varname either. + */ + + trycatch_flags |= DUK_BC_TRYCATCH_FLAG_CATCH_BINDING; + + DUK_DDD(DUK_DDDPRINT("stack top at end of catch clause: %ld", (long) duk_get_top(thr))); + } + + if (comp_ctx->curr_token.t == DUK_TOK_FINALLY) { + trycatch_flags |= DUK_BC_TRYCATCH_FLAG_HAVE_FINALLY; + + pc_finally = duk__get_current_pc(comp_ctx); + + duk__advance(comp_ctx); + + duk__advance_expect(comp_ctx, DUK_TOK_LCURLY); + duk__parse_stmts(comp_ctx, 0 /*allow_source_elem*/, 0 /*expect_eof*/, 1 /*regexp_after*/); + /* the DUK_TOK_RCURLY is eaten by duk__parse_stmts() */ + duk__emit_abc(comp_ctx, DUK_OP_ENDFIN, reg_catch); /* rethrow */ + } + + if (!(trycatch_flags & DUK_BC_TRYCATCH_FLAG_HAVE_CATCH) && !(trycatch_flags & DUK_BC_TRYCATCH_FLAG_HAVE_FINALLY)) { + /* must have catch and/or finally */ + goto syntax_error; + } + + /* If there's no catch block, rc_varname will be 0 and duk__patch_trycatch() + * will replace the LDCONST with a NOP. For any actual constant (including + * constant 0) the DUK__CONST_MARKER flag will be set in rc_varname. + */ + + duk__patch_trycatch(comp_ctx, pc_ldconst, pc_trycatch, reg_catch, rc_varname, trycatch_flags); + + if (trycatch_flags & DUK_BC_TRYCATCH_FLAG_HAVE_CATCH) { + DUK_ASSERT(pc_catch >= 0); + duk__patch_jump(comp_ctx, pc_trycatch + 1, pc_catch); + } + + if (trycatch_flags & DUK_BC_TRYCATCH_FLAG_HAVE_FINALLY) { + DUK_ASSERT(pc_finally >= 0); + duk__patch_jump(comp_ctx, pc_trycatch + 2, pc_finally); + } else { + /* without finally, the second jump slot is used to jump to end of stmt */ + duk__patch_jump_here(comp_ctx, pc_trycatch + 2); + } + + comp_ctx->curr_func.catch_depth--; + return; + +syntax_error: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_TRY); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL void duk__parse_with_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res) { + duk_int_t pc_trycatch; + duk_int_t pc_finished; + duk_regconst_t reg_catch; + duk_small_uint_t trycatch_flags; + + if (comp_ctx->curr_func.is_strict) { + DUK_ERROR_SYNTAX(comp_ctx->thr, DUK_STR_WITH_IN_STRICT_MODE); + DUK_WO_NORETURN(return;); + } + + comp_ctx->curr_func.catch_depth++; + + duk__advance(comp_ctx); /* eat 'with' */ + + reg_catch = DUK__ALLOCTEMPS(comp_ctx, 2); + + duk__advance_expect(comp_ctx, DUK_TOK_LPAREN); + duk__exprtop_toforcedreg(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/, reg_catch); + comp_ctx->curr_func.allow_regexp_in_adv = 1; + duk__advance_expect(comp_ctx, DUK_TOK_RPAREN); /* Allow RegExp as part of next stmt. */ + + pc_trycatch = duk__get_current_pc(comp_ctx); + trycatch_flags = DUK_BC_TRYCATCH_FLAG_WITH_BINDING; + duk__emit_a_bc(comp_ctx, + DUK_OP_TRYCATCH | DUK__EMIT_FLAG_NO_SHUFFLE_A, + (duk_regconst_t) trycatch_flags /*a*/, + reg_catch /*bc*/); + duk__emit_invalid(comp_ctx); /* catch jump */ + duk__emit_invalid(comp_ctx); /* finished jump */ + + duk__parse_stmt(comp_ctx, res, 0 /*allow_source_elem*/); + duk__emit_op_only(comp_ctx, DUK_OP_ENDTRY); + + pc_finished = duk__get_current_pc(comp_ctx); + + duk__patch_jump(comp_ctx, pc_trycatch + 2, pc_finished); + + comp_ctx->curr_func.catch_depth--; +} + +DUK_LOCAL duk_int_t duk__stmt_label_site(duk_compiler_ctx *comp_ctx, duk_int_t label_id) { + /* if a site already exists, nop: max one label site per statement */ + if (label_id >= 0) { + return label_id; + } + + label_id = comp_ctx->curr_func.label_next++; + DUK_DDD(DUK_DDDPRINT("allocated new label id for label site: %ld", (long) label_id)); + + duk__emit_bc(comp_ctx, DUK_OP_LABEL, (duk_regconst_t) label_id); + duk__emit_invalid(comp_ctx); + duk__emit_invalid(comp_ctx); + + return label_id; +} + +/* Parse a single statement. + * + * Creates a label site (with an empty label) automatically for iteration + * statements. Also "peels off" any label statements for explicit labels. + */ +DUK_LOCAL void duk__parse_stmt(duk_compiler_ctx *comp_ctx, duk_ivalue *res, duk_bool_t allow_source_elem) { + duk_hthread *thr = comp_ctx->thr; + duk_bool_t dir_prol_at_entry; /* directive prologue status at entry */ + duk_regconst_t temp_at_entry; + duk_size_t labels_len_at_entry; + duk_int_t pc_at_entry; /* assumed to also be PC of "LABEL" */ + duk_int_t stmt_id; + duk_small_uint_t stmt_flags = 0; + duk_int_t label_id = -1; + duk_small_uint_t tok; + duk_bool_t test_func_decl; + + DUK__RECURSION_INCREASE(comp_ctx, thr); + + temp_at_entry = DUK__GETTEMP(comp_ctx); + pc_at_entry = duk__get_current_pc(comp_ctx); + labels_len_at_entry = duk_get_length(thr, comp_ctx->curr_func.labelnames_idx); + stmt_id = comp_ctx->curr_func.stmt_next++; + dir_prol_at_entry = comp_ctx->curr_func.in_directive_prologue; + + DUK_UNREF(stmt_id); + + DUK_DDD(DUK_DDDPRINT("parsing a statement, stmt_id=%ld, temp_at_entry=%ld, labels_len_at_entry=%ld, " + "is_strict=%ld, in_directive_prologue=%ld, catch_depth=%ld", + (long) stmt_id, + (long) temp_at_entry, + (long) labels_len_at_entry, + (long) comp_ctx->curr_func.is_strict, + (long) comp_ctx->curr_func.in_directive_prologue, + (long) comp_ctx->curr_func.catch_depth)); + + /* The directive prologue flag is cleared by default so that it is + * unset for any recursive statement parsing. It is only "revived" + * if a directive is detected. (We could also make directives only + * allowed if 'allow_source_elem' was true.) + */ + comp_ctx->curr_func.in_directive_prologue = 0; + +retry_parse: + + DUK_DDD(DUK_DDDPRINT("try stmt parse, stmt_id=%ld, label_id=%ld, allow_source_elem=%ld, catch_depth=%ld", + (long) stmt_id, + (long) label_id, + (long) allow_source_elem, + (long) comp_ctx->curr_func.catch_depth)); + + /* + * Detect iteration statements; if encountered, establish an + * empty label. + */ + + tok = comp_ctx->curr_token.t; + if (tok == DUK_TOK_FOR || tok == DUK_TOK_DO || tok == DUK_TOK_WHILE || tok == DUK_TOK_SWITCH) { + DUK_DDD(DUK_DDDPRINT("iteration/switch statement -> add empty label")); + + label_id = duk__stmt_label_site(comp_ctx, label_id); + duk__add_label(comp_ctx, DUK_HTHREAD_STRING_EMPTY_STRING(thr), pc_at_entry /*pc_label*/, label_id); + } + + /* + * Main switch for statement / source element type. + */ + + switch (comp_ctx->curr_token.t) { + case DUK_TOK_FUNCTION: { + /* + * Function declaration, function expression, or (non-standard) + * function statement. + * + * The E5 specification only allows function declarations at + * the top level (in "source elements"). An ExpressionStatement + * is explicitly not allowed to begin with a "function" keyword + * (E5 Section 12.4). Hence any non-error semantics for such + * non-top-level statements are non-standard. Duktape semantics + * for function statements are modelled after V8, see + * test-dev-func-decl-outside-top.js. + */ + test_func_decl = allow_source_elem; +#if defined(DUK_USE_NONSTD_FUNC_STMT) + /* Lenient: allow function declarations outside top level in both + * strict and non-strict modes. However, don't allow labelled + * function declarations in strict mode. + */ + test_func_decl = test_func_decl || !comp_ctx->curr_func.is_strict || label_id < 0; +#endif /* DUK_USE_NONSTD_FUNC_STMT */ + /* Strict: never allow function declarations outside top level. */ + if (test_func_decl) { + /* FunctionDeclaration: not strictly a statement but handled as such. + * + * O(depth^2) parse count for inner functions is handled by recording a + * lexer offset on the first compilation pass, so that the function can + * be efficiently skipped on the second pass. This is encapsulated into + * duk__parse_func_like_fnum(). + */ + + duk_int_t fnum; +#if defined(DUK_USE_ASSERTIONS) + duk_idx_t top_before; +#endif + + DUK_DDD(DUK_DDDPRINT("function declaration statement")); + +#if defined(DUK_USE_ASSERTIONS) + top_before = duk_get_top(thr); +#endif + + duk__advance(comp_ctx); /* eat 'function' */ + fnum = duk__parse_func_like_fnum(comp_ctx, DUK__FUNC_FLAG_DECL | DUK__FUNC_FLAG_PUSHNAME_PASS1); + + /* The value stack convention here is a bit odd: the function + * name is only pushed on pass 1 (in_scanning), and is needed + * to process function declarations. + */ + if (comp_ctx->curr_func.in_scanning) { + duk_uarridx_t n; + +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(duk_get_top(thr) == top_before + 1); +#endif + DUK_DDD(DUK_DDDPRINT("register function declaration %!T in pass 1, fnum %ld", + duk_get_tval(thr, -1), + (long) fnum)); + n = (duk_uarridx_t) duk_get_length(thr, comp_ctx->curr_func.decls_idx); + /* funcname is at index -1 */ + duk_put_prop_index(thr, comp_ctx->curr_func.decls_idx, n); + duk_push_int(thr, (duk_int_t) (DUK_DECL_TYPE_FUNC + (fnum << 8))); + duk_put_prop_index(thr, comp_ctx->curr_func.decls_idx, n + 1); + } else { +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(duk_get_top(thr) == top_before); +#endif + } + + /* no statement value (unlike function expression) */ + stmt_flags = 0; + break; + } else { + DUK_ERROR_SYNTAX(thr, DUK_STR_FUNC_STMT_NOT_ALLOWED); + DUK_WO_NORETURN(return;); + } + break; + } + case DUK_TOK_LCURLY: { + DUK_DDD(DUK_DDDPRINT("block statement")); + duk__advance(comp_ctx); + duk__parse_stmts(comp_ctx, 0 /*allow_source_elem*/, 0 /*expect_eof*/, 1 /*regexp_after*/); + /* the DUK_TOK_RCURLY is eaten by duk__parse_stmts() */ + if (label_id >= 0) { + duk__patch_jump_here(comp_ctx, pc_at_entry + 1); /* break jump */ + } + stmt_flags = 0; + break; + } + case DUK_TOK_CONST: { + DUK_DDD(DUK_DDDPRINT("constant declaration statement")); + duk__parse_var_stmt(comp_ctx, res, DUK__EXPR_FLAG_REQUIRE_INIT /*expr_flags*/); + stmt_flags = DUK__HAS_TERM; + break; + } + case DUK_TOK_VAR: { + DUK_DDD(DUK_DDDPRINT("variable declaration statement")); + duk__parse_var_stmt(comp_ctx, res, 0 /*expr_flags*/); + stmt_flags = DUK__HAS_TERM; + break; + } + case DUK_TOK_SEMICOLON: { + /* empty statement with an explicit semicolon */ + DUK_DDD(DUK_DDDPRINT("empty statement")); + stmt_flags = DUK__HAS_TERM; + break; + } + case DUK_TOK_IF: { + DUK_DDD(DUK_DDDPRINT("if statement")); + duk__parse_if_stmt(comp_ctx, res); + if (label_id >= 0) { + duk__patch_jump_here(comp_ctx, pc_at_entry + 1); /* break jump */ + } + stmt_flags = 0; + break; + } + case DUK_TOK_DO: { + /* + * Do-while statement is mostly trivial, but there is special + * handling for automatic semicolon handling (triggered by the + * DUK__ALLOW_AUTO_SEMI_ALWAYS) flag related to a bug filed at: + * + * https://bugs.ecmascript.org/show_bug.cgi?id=8 + * + * See doc/compiler.rst for details. + */ + DUK_DDD(DUK_DDDPRINT("do statement")); + DUK_ASSERT(label_id >= 0); + duk__update_label_flags(comp_ctx, label_id, DUK_LABEL_FLAG_ALLOW_BREAK | DUK_LABEL_FLAG_ALLOW_CONTINUE); + duk__parse_do_stmt(comp_ctx, res, pc_at_entry); + stmt_flags = DUK__HAS_TERM | DUK__ALLOW_AUTO_SEMI_ALWAYS; /* DUK__ALLOW_AUTO_SEMI_ALWAYS workaround */ + break; + } + case DUK_TOK_WHILE: { + DUK_DDD(DUK_DDDPRINT("while statement")); + DUK_ASSERT(label_id >= 0); + duk__update_label_flags(comp_ctx, label_id, DUK_LABEL_FLAG_ALLOW_BREAK | DUK_LABEL_FLAG_ALLOW_CONTINUE); + duk__parse_while_stmt(comp_ctx, res, pc_at_entry); + stmt_flags = 0; + break; + } + case DUK_TOK_FOR: { + /* + * For/for-in statement is complicated to parse because + * determining the statement type (three-part for vs. a + * for-in) requires potential backtracking. + * + * See the helper for the messy stuff. + */ + DUK_DDD(DUK_DDDPRINT("for/for-in statement")); + DUK_ASSERT(label_id >= 0); + duk__update_label_flags(comp_ctx, label_id, DUK_LABEL_FLAG_ALLOW_BREAK | DUK_LABEL_FLAG_ALLOW_CONTINUE); + duk__parse_for_stmt(comp_ctx, res, pc_at_entry); + stmt_flags = 0; + break; + } + case DUK_TOK_CONTINUE: + case DUK_TOK_BREAK: { + DUK_DDD(DUK_DDDPRINT("break/continue statement")); + duk__parse_break_or_continue_stmt(comp_ctx, res); + stmt_flags = DUK__HAS_TERM | DUK__IS_TERMINAL; + break; + } + case DUK_TOK_RETURN: { + DUK_DDD(DUK_DDDPRINT("return statement")); + duk__parse_return_stmt(comp_ctx, res); + stmt_flags = DUK__HAS_TERM | DUK__IS_TERMINAL; + break; + } + case DUK_TOK_WITH: { + DUK_DDD(DUK_DDDPRINT("with statement")); + comp_ctx->curr_func.with_depth++; + duk__parse_with_stmt(comp_ctx, res); + if (label_id >= 0) { + duk__patch_jump_here(comp_ctx, pc_at_entry + 1); /* break jump */ + } + comp_ctx->curr_func.with_depth--; + stmt_flags = 0; + break; + } + case DUK_TOK_SWITCH: { + /* + * The switch statement is pretty messy to compile. + * See the helper for details. + */ + DUK_DDD(DUK_DDDPRINT("switch statement")); + DUK_ASSERT(label_id >= 0); + duk__update_label_flags(comp_ctx, label_id, DUK_LABEL_FLAG_ALLOW_BREAK); /* don't allow continue */ + duk__parse_switch_stmt(comp_ctx, res, pc_at_entry); + stmt_flags = 0; + break; + } + case DUK_TOK_THROW: { + DUK_DDD(DUK_DDDPRINT("throw statement")); + duk__parse_throw_stmt(comp_ctx, res); + stmt_flags = DUK__HAS_TERM | DUK__IS_TERMINAL; + break; + } + case DUK_TOK_TRY: { + DUK_DDD(DUK_DDDPRINT("try statement")); + duk__parse_try_stmt(comp_ctx, res); + stmt_flags = 0; + break; + } + case DUK_TOK_DEBUGGER: { + duk__advance(comp_ctx); +#if defined(DUK_USE_DEBUGGER_SUPPORT) + DUK_DDD(DUK_DDDPRINT("debugger statement: debugging enabled, emit debugger opcode")); + duk__emit_op_only(comp_ctx, DUK_OP_DEBUGGER); +#else + DUK_DDD(DUK_DDDPRINT("debugger statement: ignored")); +#endif + stmt_flags = DUK__HAS_TERM; + break; + } + default: { + /* + * Else, must be one of: + * - ExpressionStatement, possibly a directive (String) + * - LabelledStatement (Identifier followed by ':') + * + * Expressions beginning with 'function' keyword are covered by a case + * above (such expressions are not allowed in standard E5 anyway). + * Also expressions starting with '{' are interpreted as block + * statements. See E5 Section 12.4. + * + * Directive detection is tricky; see E5 Section 14.1 on directive + * prologue. A directive is an expression statement with a single + * string literal and an explicit or automatic semicolon. Escape + * characters are significant and no parens etc are allowed: + * + * 'use strict'; // valid 'use strict' directive + * 'use\u0020strict'; // valid directive, not a 'use strict' directive + * ('use strict'); // not a valid directive + * + * The expression is determined to consist of a single string literal + * based on duk__expr_nud() and duk__expr_led() call counts. The string literal + * of a 'use strict' directive is determined to lack any escapes based + * num_escapes count from the lexer. Note that other directives may be + * allowed to contain escapes, so a directive with escapes does not + * terminate a directive prologue. + * + * We rely on the fact that the expression parser will not emit any + * code for a single token expression. However, it will generate an + * intermediate value which we will then successfully ignore. + * + * A similar approach is used for labels. + */ + + duk_bool_t single_token; + + DUK_DDD(DUK_DDDPRINT("expression statement")); + duk__exprtop(comp_ctx, res, DUK__BP_FOR_EXPR /*rbp_flags*/); + + single_token = (comp_ctx->curr_func.nud_count == 1 && /* one token */ + comp_ctx->curr_func.led_count == 0); /* no operators */ + + if (single_token && comp_ctx->prev_token.t == DUK_TOK_IDENTIFIER && comp_ctx->curr_token.t == DUK_TOK_COLON) { + /* + * Detected label + */ + + duk_hstring *h_lab; + + /* expected ival */ + DUK_ASSERT(res->t == DUK_IVAL_VAR); + DUK_ASSERT(res->x1.t == DUK_ISPEC_VALUE); + DUK_ASSERT(DUK_TVAL_IS_STRING(duk_get_tval(thr, res->x1.valstack_idx))); + h_lab = comp_ctx->prev_token.str1; + DUK_ASSERT(h_lab != NULL); + + DUK_DDD(DUK_DDDPRINT("explicit label site for label '%!O'", (duk_heaphdr *) h_lab)); + + duk__advance(comp_ctx); /* eat colon */ + + label_id = duk__stmt_label_site(comp_ctx, label_id); + + duk__add_label(comp_ctx, h_lab, pc_at_entry /*pc_label*/, label_id); + + /* a statement following a label cannot be a source element + * (a function declaration). + */ + allow_source_elem = 0; + + DUK_DDD(DUK_DDDPRINT("label handled, retry statement parsing")); + goto retry_parse; + } + + stmt_flags = 0; + + if (dir_prol_at_entry && /* still in prologue */ + single_token && /* single string token */ + comp_ctx->prev_token.t == DUK_TOK_STRING) { + /* + * Detected a directive + */ + duk_hstring *h_dir; + + /* expected ival */ + DUK_ASSERT(res->t == DUK_IVAL_PLAIN); + DUK_ASSERT(res->x1.t == DUK_ISPEC_VALUE); + DUK_ASSERT(DUK_TVAL_IS_STRING(duk_get_tval(thr, res->x1.valstack_idx))); + h_dir = comp_ctx->prev_token.str1; + DUK_ASSERT(h_dir != NULL); + + DUK_DDD(DUK_DDDPRINT("potential directive: %!O", h_dir)); + + stmt_flags |= DUK__STILL_PROLOGUE; + + /* Note: escaped characters differentiate directives */ + + if (comp_ctx->prev_token.num_escapes > 0) { + DUK_DDD(DUK_DDDPRINT("directive contains escapes: valid directive " + "but we ignore such directives")); + } else { + /* + * The length comparisons are present to handle + * strings like "use strict\u0000foo" as required. + */ + + if (DUK_HSTRING_GET_BYTELEN(h_dir) == 10 && + DUK_STRCMP((const char *) DUK_HSTRING_GET_DATA(h_dir), "use strict") == 0) { +#if defined(DUK_USE_STRICT_DECL) + DUK_DDD(DUK_DDDPRINT("use strict directive detected: strict flag %ld -> %ld", + (long) comp_ctx->curr_func.is_strict, + (long) 1)); + comp_ctx->curr_func.is_strict = 1; +#else + DUK_DDD(DUK_DDDPRINT("use strict detected but strict declarations disabled, ignoring")); +#endif + } else if (DUK_HSTRING_GET_BYTELEN(h_dir) == 14 && + DUK_STRCMP((const char *) DUK_HSTRING_GET_DATA(h_dir), "use duk notail") == 0) { + DUK_DDD(DUK_DDDPRINT("use duk notail directive detected: notail flag %ld -> %ld", + (long) comp_ctx->curr_func.is_notail, + (long) 1)); + comp_ctx->curr_func.is_notail = 1; + } else { + DUK_DD(DUK_DDPRINT("unknown directive: '%!O', ignoring but not terminating " + "directive prologue", + (duk_hobject *) h_dir)); + } + } + } else { + DUK_DDD(DUK_DDDPRINT("non-directive expression statement or no longer in prologue; " + "prologue terminated if still active")); + } + + stmt_flags |= DUK__HAS_VAL | DUK__HAS_TERM; + } + } /* end switch (tok) */ + + /* + * Statement value handling. + * + * Global code and eval code has an implicit return value + * which comes from the last statement with a value + * (technically a non-"empty" continuation, which is + * different from an empty statement). + * + * Since we don't know whether a later statement will + * override the value of the current statement, we need + * to coerce the statement value to a register allocated + * for implicit return values. In other cases we need + * to coerce the statement value to a plain value to get + * any side effects out (consider e.g. "foo.bar;"). + */ + + /* XXX: what about statements which leave a half-cooked value in 'res' + * but have no stmt value? Any such statements? + */ + + if (stmt_flags & DUK__HAS_VAL) { + duk_regconst_t reg_stmt_value = comp_ctx->curr_func.reg_stmt_value; + if (reg_stmt_value >= 0) { + duk__ivalue_toforcedreg(comp_ctx, res, reg_stmt_value); + } else { + duk__ivalue_toplain_ignore(comp_ctx, res); + } + } else { + ; + } + + /* + * Statement terminator check, including automatic semicolon + * handling. After this step, 'curr_tok' should be the first + * token after a possible statement terminator. + */ + + if (stmt_flags & DUK__HAS_TERM) { + if (comp_ctx->curr_token.t == DUK_TOK_SEMICOLON) { + DUK_DDD(DUK_DDDPRINT("explicit semicolon terminates statement")); + duk__advance(comp_ctx); + } else { + if (comp_ctx->curr_token.allow_auto_semi) { + DUK_DDD(DUK_DDDPRINT("automatic semicolon terminates statement")); + } else if (stmt_flags & DUK__ALLOW_AUTO_SEMI_ALWAYS) { + /* XXX: make this lenience dependent on flags or strictness? */ + DUK_DDD(DUK_DDDPRINT("automatic semicolon terminates statement (allowed for compatibility " + "even though no lineterm present before next token)")); + } else { + DUK_ERROR_SYNTAX(thr, DUK_STR_UNTERMINATED_STMT); + DUK_WO_NORETURN(return;); + } + } + } else { + DUK_DDD(DUK_DDDPRINT("statement has no terminator")); + } + + /* + * Directive prologue tracking. + */ + + if (stmt_flags & DUK__STILL_PROLOGUE) { + DUK_DDD(DUK_DDDPRINT("setting in_directive_prologue")); + comp_ctx->curr_func.in_directive_prologue = 1; + } + + /* + * Cleanups (all statement parsing flows through here). + * + * Pop label site and reset labels. Reset 'next temp' to value at + * entry to reuse temps. + */ + + if (label_id >= 0) { + duk__emit_bc(comp_ctx, DUK_OP_ENDLABEL, (duk_regconst_t) label_id); + } + + DUK__SETTEMP(comp_ctx, temp_at_entry); + + duk__reset_labels_to_length(comp_ctx, labels_len_at_entry); + + /* XXX: return indication of "terminalness" (e.g. a 'throw' is terminal) */ + + DUK__RECURSION_DECREASE(comp_ctx, thr); +} + +/* + * Parse a statement list. + * + * Handles automatic semicolon insertion and implicit return value. + * + * Upon entry, 'curr_tok' should contain the first token of the first + * statement (parsed in the "allow regexp literal" mode). Upon exit, + * 'curr_tok' contains the token following the statement list terminator + * (EOF or closing brace). + */ + +DUK_LOCAL void duk__parse_stmts(duk_compiler_ctx *comp_ctx, + duk_bool_t allow_source_elem, + duk_bool_t expect_eof, + duk_bool_t regexp_after) { + duk_hthread *thr = comp_ctx->thr; + duk_ivalue res_alloc; + duk_ivalue *res = &res_alloc; + + /* Setup state. Initial ivalue is 'undefined'. */ + + duk_require_stack(thr, DUK__PARSE_STATEMENTS_SLOTS); + + /* XXX: 'res' setup can be moved to function body level; in fact, two 'res' + * intermediate values suffice for parsing of each function. Nesting is needed + * for nested functions (which may occur inside expressions). + */ + + duk_memzero(&res_alloc, sizeof(res_alloc)); + res->t = DUK_IVAL_PLAIN; + res->x1.t = DUK_ISPEC_VALUE; + res->x1.valstack_idx = duk_get_top(thr); + res->x2.valstack_idx = res->x1.valstack_idx + 1; + duk_push_undefined(thr); + duk_push_undefined(thr); + + /* Parse statements until a closing token (EOF or '}') is found. */ + + for (;;) { + /* Check whether statement list ends. */ + + if (expect_eof) { + if (comp_ctx->curr_token.t == DUK_TOK_EOF) { + break; + } + } else { + if (comp_ctx->curr_token.t == DUK_TOK_RCURLY) { + break; + } + } + + /* Check statement type based on the first token type. + * + * Note: expression parsing helpers expect 'curr_tok' to + * contain the first token of the expression upon entry. + */ + + DUK_DDD(DUK_DDDPRINT("TOKEN %ld (non-whitespace, non-comment)", (long) comp_ctx->curr_token.t)); + + duk__parse_stmt(comp_ctx, res, allow_source_elem); + } + + /* RegExp is allowed / not allowed depending on context. For function + * declarations RegExp is allowed because it follows a function + * declaration statement and may appear as part of the next statement. + * For function expressions RegExp is not allowed, and it's possible + * to do something like '(function () {} / 123)'. + */ + if (regexp_after) { + comp_ctx->curr_func.allow_regexp_in_adv = 1; + } + duk__advance(comp_ctx); + + /* Tear down state. */ + + duk_pop_2(thr); +} + +/* + * Declaration binding instantiation conceptually happens when calling a + * function; for us it essentially means that function prologue. The + * conceptual process is described in E5 Section 10.5. + * + * We need to keep track of all encountered identifiers to (1) create an + * identifier-to-register map ("varmap"); and (2) detect duplicate + * declarations. Identifiers which are not bound to registers still need + * to be tracked for detecting duplicates. Currently such identifiers + * are put into the varmap with a 'null' value, which is later cleaned up. + * + * To support functions with a large number of variable and function + * declarations, registers are not allocated beyond a certain limit; + * after that limit, variables and functions need slow path access. + * Arguments are currently always register bound, which imposes a hard + * (and relatively small) argument count limit. + * + * Some bindings in E5 are not configurable (= deletable) and almost all + * are mutable (writable). Exceptions are: + * + * - The 'arguments' binding, established only if no shadowing argument + * or function declaration exists. We handle 'arguments' creation + * and binding through an explicit slow path environment record. + * + * - The "name" binding for a named function expression. This is also + * handled through an explicit slow path environment record. + */ + +/* XXX: add support for variables to not be register bound always, to + * handle cases with a very large number of variables? + */ + +DUK_LOCAL void duk__init_varmap_and_prologue_for_pass2(duk_compiler_ctx *comp_ctx, duk_regconst_t *out_stmt_value_reg) { + duk_hthread *thr = comp_ctx->thr; + duk_hstring *h_name; + duk_bool_t configurable_bindings; + duk_uarridx_t num_args; + duk_uarridx_t num_decls; + duk_regconst_t rc_name; + duk_small_uint_t declvar_flags; + duk_uarridx_t i; +#if defined(DUK_USE_ASSERTIONS) + duk_idx_t entry_top; +#endif + +#if defined(DUK_USE_ASSERTIONS) + entry_top = duk_get_top(thr); +#endif + + /* + * Preliminaries + */ + + configurable_bindings = comp_ctx->curr_func.is_eval; + DUK_DDD(DUK_DDDPRINT("configurable_bindings=%ld", (long) configurable_bindings)); + + /* varmap is already in comp_ctx->curr_func.varmap_idx */ + + /* + * Function formal arguments, always bound to registers + * (there's no support for shuffling them now). + */ + + num_args = (duk_uarridx_t) duk_get_length(thr, comp_ctx->curr_func.argnames_idx); + DUK_DDD(DUK_DDDPRINT("num_args=%ld", (long) num_args)); + /* XXX: check num_args */ + + for (i = 0; i < num_args; i++) { + duk_get_prop_index(thr, comp_ctx->curr_func.argnames_idx, i); + h_name = duk_known_hstring(thr, -1); + + if (comp_ctx->curr_func.is_strict) { + if (duk__hstring_is_eval_or_arguments(comp_ctx, h_name)) { + DUK_DDD(DUK_DDDPRINT("arg named 'eval' or 'arguments' in strict mode -> SyntaxError")); + goto error_argname; + } + duk_dup_top(thr); + if (duk_has_prop(thr, comp_ctx->curr_func.varmap_idx)) { + DUK_DDD(DUK_DDDPRINT("duplicate arg name in strict mode -> SyntaxError")); + goto error_argname; + } + + /* Ensure argument name is not a reserved word in current + * (final) strictness. Formal argument parsing may not + * catch reserved names if strictness changes during + * parsing. + * + * We only need to do this in strict mode because non-strict + * keyword are always detected in formal argument parsing. + */ + + if (DUK_HSTRING_HAS_STRICT_RESERVED_WORD(h_name)) { + goto error_argname; + } + } + + /* overwrite any previous binding of the same name; the effect is + * that last argument of a certain name wins. + */ + + /* only functions can have arguments */ + DUK_ASSERT(comp_ctx->curr_func.is_function); + duk_push_uarridx(thr, i); /* -> [ ... name index ] */ + duk_put_prop(thr, comp_ctx->curr_func.varmap_idx); /* -> [ ... ] */ + + /* no code needs to be emitted, the regs already have values */ + } + + /* use temp_next for tracking register allocations */ + DUK__SETTEMP_CHECKMAX(comp_ctx, (duk_regconst_t) num_args); + + /* + * After arguments, allocate special registers (like shuffling temps) + */ + + if (out_stmt_value_reg) { + *out_stmt_value_reg = DUK__ALLOCTEMP(comp_ctx); + } + if (comp_ctx->curr_func.needs_shuffle) { + duk_regconst_t shuffle_base = DUK__ALLOCTEMPS(comp_ctx, 3); + comp_ctx->curr_func.shuffle1 = shuffle_base; + comp_ctx->curr_func.shuffle2 = shuffle_base + 1; + comp_ctx->curr_func.shuffle3 = shuffle_base + 2; + DUK_D(DUK_DPRINT("shuffle registers needed by function, allocated: %ld %ld %ld", + (long) comp_ctx->curr_func.shuffle1, + (long) comp_ctx->curr_func.shuffle2, + (long) comp_ctx->curr_func.shuffle3)); + } + if (comp_ctx->curr_func.temp_next > 0x100) { + DUK_D(DUK_DPRINT("not enough 8-bit regs: temp_next=%ld", (long) comp_ctx->curr_func.temp_next)); + goto error_outofregs; + } + + /* + * Function declarations + */ + + num_decls = (duk_uarridx_t) duk_get_length(thr, comp_ctx->curr_func.decls_idx); + DUK_DDD( + DUK_DDDPRINT("num_decls=%ld -> %!T", (long) num_decls, (duk_tval *) duk_get_tval(thr, comp_ctx->curr_func.decls_idx))); + for (i = 0; i < num_decls; i += 2) { + duk_int_t decl_type; + duk_int_t fnum; + + duk_get_prop_index(thr, comp_ctx->curr_func.decls_idx, i + 1); /* decl type */ + decl_type = duk_to_int(thr, -1); + fnum = decl_type >> 8; /* XXX: macros */ + decl_type = decl_type & 0xff; + duk_pop(thr); + + if (decl_type != DUK_DECL_TYPE_FUNC) { + continue; + } + + duk_get_prop_index(thr, comp_ctx->curr_func.decls_idx, i); /* decl name */ + + /* XXX: spilling */ + if (comp_ctx->curr_func.is_function) { + duk_regconst_t reg_bind; + duk_dup_top(thr); + if (duk_has_prop(thr, comp_ctx->curr_func.varmap_idx)) { + /* shadowed; update value */ + duk_dup_top(thr); + duk_get_prop(thr, comp_ctx->curr_func.varmap_idx); + reg_bind = duk_to_int(thr, -1); /* [ ... name reg_bind ] */ + duk__emit_a_bc(comp_ctx, DUK_OP_CLOSURE, reg_bind, (duk_regconst_t) fnum); + } else { + /* function: always register bound */ + reg_bind = DUK__ALLOCTEMP(comp_ctx); + duk__emit_a_bc(comp_ctx, DUK_OP_CLOSURE, reg_bind, (duk_regconst_t) fnum); + duk_push_int(thr, (duk_int_t) reg_bind); + } + } else { + /* Function declaration for global/eval code is emitted even + * for duplicates, because of E5 Section 10.5, step 5.e of + * E5.1 (special behavior for variable bound to global object). + * + * DECLVAR will not re-declare a variable as such, but will + * update the binding value. + */ + + duk_regconst_t reg_temp = DUK__ALLOCTEMP(comp_ctx); + duk_dup_top(thr); + rc_name = duk__getconst(comp_ctx); + duk_push_null(thr); + + duk__emit_a_bc(comp_ctx, DUK_OP_CLOSURE, reg_temp, (duk_regconst_t) fnum); + + declvar_flags = DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_ENUMERABLE | DUK_BC_DECLVAR_FLAG_FUNC_DECL; + + if (configurable_bindings) { + declvar_flags |= DUK_PROPDESC_FLAG_CONFIGURABLE; + } + + duk__emit_a_b_c(comp_ctx, + DUK_OP_DECLVAR | DUK__EMIT_FLAG_NO_SHUFFLE_A | DUK__EMIT_FLAG_BC_REGCONST, + (duk_regconst_t) declvar_flags /*flags*/, + rc_name /*name*/, + reg_temp /*value*/); + + DUK__SETTEMP(comp_ctx, reg_temp); /* forget temp */ + } + + DUK_DDD(DUK_DDDPRINT("function declaration to varmap: %!T -> %!T", + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + +#if defined(DUK_USE_FASTINT) + DUK_ASSERT(DUK_TVAL_IS_NULL(duk_get_tval(thr, -1)) || DUK_TVAL_IS_FASTINT(duk_get_tval(thr, -1))); +#endif + duk_put_prop(thr, comp_ctx->curr_func.varmap_idx); /* [ ... name reg/null ] -> [ ... ] */ + } + + /* + * 'arguments' binding is special; if a shadowing argument or + * function declaration exists, an arguments object will + * definitely not be needed, regardless of whether the identifier + * 'arguments' is referenced inside the function body. + */ + + if (duk_has_prop_stridx(thr, comp_ctx->curr_func.varmap_idx, DUK_STRIDX_LC_ARGUMENTS)) { + DUK_DDD(DUK_DDDPRINT("'arguments' is shadowed by argument or function declaration " + "-> arguments object creation can be skipped")); + comp_ctx->curr_func.is_arguments_shadowed = 1; + } + + /* + * Variable declarations. + * + * Unlike function declarations, variable declaration values don't get + * assigned on entry. If a binding of the same name already exists, just + * ignore it silently. + */ + + for (i = 0; i < num_decls; i += 2) { + duk_int_t decl_type; + + duk_get_prop_index(thr, comp_ctx->curr_func.decls_idx, i + 1); /* decl type */ + decl_type = duk_to_int(thr, -1); + decl_type = decl_type & 0xff; + duk_pop(thr); + + if (decl_type != DUK_DECL_TYPE_VAR) { + continue; + } + + duk_get_prop_index(thr, comp_ctx->curr_func.decls_idx, i); /* decl name */ + + if (duk_has_prop(thr, comp_ctx->curr_func.varmap_idx)) { + /* shadowed, ignore */ + } else { + duk_get_prop_index(thr, comp_ctx->curr_func.decls_idx, i); /* decl name */ + h_name = duk_known_hstring(thr, -1); + + if (h_name == DUK_HTHREAD_STRING_LC_ARGUMENTS(thr) && !comp_ctx->curr_func.is_arguments_shadowed) { + /* E5 Section steps 7-8 */ + DUK_DDD(DUK_DDDPRINT("'arguments' not shadowed by a function declaration, " + "but appears as a variable declaration -> treat as " + "a no-op for variable declaration purposes")); + duk_pop(thr); + continue; + } + + /* XXX: spilling */ + if (comp_ctx->curr_func.is_function) { + duk_regconst_t reg_bind = DUK__ALLOCTEMP(comp_ctx); + /* no need to init reg, it will be undefined on entry */ + duk_push_int(thr, (duk_int_t) reg_bind); + } else { + duk_dup_top(thr); + rc_name = duk__getconst(comp_ctx); + duk_push_null(thr); + + declvar_flags = DUK_PROPDESC_FLAG_WRITABLE | DUK_PROPDESC_FLAG_ENUMERABLE; + if (configurable_bindings) { + declvar_flags |= DUK_PROPDESC_FLAG_CONFIGURABLE; + } + + duk__emit_a_b_c(comp_ctx, + DUK_OP_DECLVAR | DUK__EMIT_FLAG_NO_SHUFFLE_A | DUK__EMIT_FLAG_BC_REGCONST, + (duk_regconst_t) declvar_flags /*flags*/, + rc_name /*name*/, + 0 /*value*/); + } + + duk_put_prop(thr, comp_ctx->curr_func.varmap_idx); /* [ ... name reg/null ] -> [ ... ] */ + } + } + + /* + * Wrap up + */ + + DUK_DDD(DUK_DDDPRINT("varmap: %!T, is_arguments_shadowed=%ld", + (duk_tval *) duk_get_tval(thr, comp_ctx->curr_func.varmap_idx), + (long) comp_ctx->curr_func.is_arguments_shadowed)); + + DUK_ASSERT_TOP(thr, entry_top); + return; + +error_outofregs: + DUK_ERROR_RANGE(thr, DUK_STR_REG_LIMIT); + DUK_WO_NORETURN(return;); + +error_argname: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_ARG_NAME); + DUK_WO_NORETURN(return;); +} + +/* + * Parse a function-body-like expression (FunctionBody or Program + * in E5 grammar) using a two-pass parse. The productions appear + * in the following contexts: + * + * - function expression + * - function statement + * - function declaration + * - getter in object literal + * - setter in object literal + * - global code + * - eval code + * - Function constructor body + * + * This function only parses the statement list of the body; the argument + * list and possible function name must be initialized by the caller. + * For instance, for Function constructor, the argument names are originally + * on the value stack. The parsing of statements ends either at an EOF or + * a closing brace; this is controlled by an input flag. + * + * Note that there are many differences affecting parsing and even code + * generation: + * + * - Global and eval code have an implicit return value generated + * by the last statement; function code does not + * + * - Global code, eval code, and Function constructor body end in + * an EOF, other bodies in a closing brace ('}') + * + * Upon entry, 'curr_tok' is ignored and the function will pull in the + * first token on its own. Upon exit, 'curr_tok' is the terminating + * token (EOF or closing brace). + */ + +DUK_LOCAL void duk__parse_func_body(duk_compiler_ctx *comp_ctx, + duk_bool_t expect_eof, + duk_bool_t implicit_return_value, + duk_bool_t regexp_after, + duk_small_int_t expect_token) { + duk_compiler_func *func; + duk_hthread *thr; + duk_regconst_t reg_stmt_value = -1; + duk_lexer_point lex_pt; + duk_regconst_t temp_first; + duk_small_int_t compile_round = 1; + + DUK_ASSERT(comp_ctx != NULL); + + thr = comp_ctx->thr; + DUK_ASSERT(thr != NULL); + + func = &comp_ctx->curr_func; + DUK_ASSERT(func != NULL); + + DUK__RECURSION_INCREASE(comp_ctx, thr); + + duk_require_stack(thr, DUK__FUNCTION_BODY_REQUIRE_SLOTS); + + /* + * Store lexer position for a later rewind + */ + + DUK_LEXER_GETPOINT(&comp_ctx->lex, &lex_pt); + + /* + * Program code (global and eval code) has an implicit return value + * from the last statement value (e.g. eval("1; 2+3;") returns 3). + * This is not the case with functions. If implicit statement return + * value is requested, all statements are coerced to a register + * allocated here, and used in the implicit return statement below. + */ + + /* XXX: this is pointless here because pass 1 is throw-away */ + if (implicit_return_value) { + reg_stmt_value = DUK__ALLOCTEMP(comp_ctx); + + /* If an implicit return value is needed by caller, it must be + * initialized to 'undefined' because we don't know whether any + * non-empty (where "empty" is a continuation type, and different + * from an empty statement) statements will be executed. + * + * However, since 1st pass is a throwaway one, no need to emit + * it here. + */ +#if 0 + duk__emit_bc(comp_ctx, + DUK_OP_LDUNDEF, + 0); +#endif + } + + /* + * First pass. + * + * Gather variable/function declarations needed for second pass. + * Code generated is dummy and discarded. + */ + + func->in_directive_prologue = 1; + func->in_scanning = 1; + func->may_direct_eval = 0; + func->id_access_arguments = 0; + func->id_access_slow = 0; + func->id_access_slow_own = 0; + func->reg_stmt_value = reg_stmt_value; +#if defined(DUK_USE_DEBUGGER_SUPPORT) + func->min_line = DUK_INT_MAX; + func->max_line = 0; +#endif + + /* duk__parse_stmts() expects curr_tok to be set; parse in "allow + * regexp literal" mode with current strictness. + */ + if (expect_token >= 0) { + /* Eating a left curly; regexp mode is allowed by left curly + * based on duk__token_lbp[] automatically. + */ + DUK_ASSERT(expect_token == DUK_TOK_LCURLY); + duk__update_lineinfo_currtoken(comp_ctx); + duk__advance_expect(comp_ctx, expect_token); + } else { + /* Need to set curr_token.t because lexing regexp mode depends on current + * token type. Zero value causes "allow regexp" mode. + */ + comp_ctx->curr_token.t = 0; + duk__advance(comp_ctx); + } + + DUK_DDD(DUK_DDDPRINT("begin 1st pass")); + duk__parse_stmts(comp_ctx, + 1, /* allow source elements */ + expect_eof, /* expect EOF instead of } */ + regexp_after); /* regexp after */ + DUK_DDD(DUK_DDDPRINT("end 1st pass")); + + /* + * Second (and possibly third) pass. + * + * Generate actual code. In most cases the need for shuffle + * registers is detected during pass 1, but in some corner cases + * we'll only detect it during pass 2 and a third pass is then + * needed (see GH-115). + */ + + for (;;) { + duk_bool_t needs_shuffle_before = comp_ctx->curr_func.needs_shuffle; + compile_round++; + + /* + * Rewind lexer. + * + * duk__parse_stmts() expects curr_tok to be set; parse in "allow regexp + * literal" mode with current strictness. + * + * curr_token line number info should be initialized for pass 2 before + * generating prologue, to ensure prologue bytecode gets nice line numbers. + */ + + DUK_DDD(DUK_DDDPRINT("rewind lexer")); + DUK_LEXER_SETPOINT(&comp_ctx->lex, &lex_pt); + comp_ctx->curr_token.t = 0; /* this is needed for regexp mode */ + comp_ctx->curr_token.start_line = 0; /* needed for line number tracking (becomes prev_token.start_line) */ + duk__advance(comp_ctx); + + /* + * Reset function state and perform register allocation, which creates + * 'varmap' for second pass. Function prologue for variable declarations, + * binding value initializations etc is emitted as a by-product. + * + * Strict mode restrictions for duplicate and invalid argument + * names are checked here now that we know whether the function + * is actually strict. See: test-dev-strict-mode-boundary.js. + * + * Inner functions are compiled during pass 1 and are not reset. + */ + + duk__reset_func_for_pass2(comp_ctx); + func->in_directive_prologue = 1; + func->in_scanning = 0; + + /* must be able to emit code, alloc consts, etc. */ + + duk__init_varmap_and_prologue_for_pass2(comp_ctx, (implicit_return_value ? ®_stmt_value : NULL)); + func->reg_stmt_value = reg_stmt_value; + + temp_first = DUK__GETTEMP(comp_ctx); + + func->temp_first = temp_first; + func->temp_next = temp_first; + func->stmt_next = 0; + func->label_next = 0; + + /* XXX: init or assert catch depth etc -- all values */ + func->id_access_arguments = 0; + func->id_access_slow = 0; + func->id_access_slow_own = 0; + + /* + * Check function name validity now that we know strictness. + * This only applies to function declarations and expressions, + * not setter/getter name. + * + * See: test-dev-strict-mode-boundary.js + */ + + if (func->is_function && !func->is_setget && func->h_name != NULL) { + if (func->is_strict) { + if (duk__hstring_is_eval_or_arguments(comp_ctx, func->h_name)) { + DUK_DDD(DUK_DDDPRINT("func name is 'eval' or 'arguments' in strict mode")); + goto error_funcname; + } + if (DUK_HSTRING_HAS_STRICT_RESERVED_WORD(func->h_name)) { + DUK_DDD(DUK_DDDPRINT("func name is a reserved word in strict mode")); + goto error_funcname; + } + } else { + if (DUK_HSTRING_HAS_RESERVED_WORD(func->h_name) && + !DUK_HSTRING_HAS_STRICT_RESERVED_WORD(func->h_name)) { + DUK_DDD(DUK_DDDPRINT("func name is a reserved word in non-strict mode")); + goto error_funcname; + } + } + } + + /* + * Second pass parsing. + */ + + if (implicit_return_value) { + /* Default implicit return value. */ + duk__emit_bc(comp_ctx, DUK_OP_LDUNDEF, 0); + } + + DUK_DDD(DUK_DDDPRINT("begin 2nd pass")); + duk__parse_stmts(comp_ctx, + 1, /* allow source elements */ + expect_eof, /* expect EOF instead of } */ + regexp_after); /* regexp after */ + DUK_DDD(DUK_DDDPRINT("end 2nd pass")); + + duk__update_lineinfo_currtoken(comp_ctx); + + if (needs_shuffle_before == comp_ctx->curr_func.needs_shuffle) { + /* Shuffle decision not changed. */ + break; + } + if (compile_round >= 3) { + /* Should never happen but avoid infinite loop just in case. */ + DUK_D(DUK_DPRINT("more than 3 compile passes needed, should never happen")); + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return;); + } + DUK_D(DUK_DPRINT("need additional round to compile function, round now %d", (int) compile_round)); + } + + /* + * Emit a final RETURN. + * + * It would be nice to avoid emitting an unnecessary "return" opcode + * if the current PC is not reachable. However, this cannot be reliably + * detected; even if the previous instruction is an unconditional jump, + * there may be a previous jump which jumps to current PC (which is the + * case for iteration and conditional statements, for instance). + */ + + /* XXX: request a "last statement is terminal" from duk__parse_stmt() and duk__parse_stmts(); + * we could avoid the last RETURN if we could ensure there is no way to get here + * (directly or via a jump) + */ + + DUK_ASSERT(comp_ctx->curr_func.catch_depth == 0); + if (reg_stmt_value >= 0) { + DUK_ASSERT(DUK__ISREG(reg_stmt_value)); + duk__emit_bc(comp_ctx, DUK_OP_RETREG, reg_stmt_value /*reg*/); + } else { + duk__emit_op_only(comp_ctx, DUK_OP_RETUNDEF); + } + + /* + * Peephole optimize JUMP chains. + */ + + duk__peephole_optimize_bytecode(comp_ctx); + + /* + * comp_ctx->curr_func is now ready to be converted into an actual + * function template. + */ + + DUK__RECURSION_DECREASE(comp_ctx, thr); + return; + +error_funcname: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_FUNC_NAME); + DUK_WO_NORETURN(return;); +} + +/* + * Parse a function-like expression: + * + * - function expression + * - function declaration + * - function statement (non-standard) + * - setter/getter + * + * Adds the function to comp_ctx->curr_func function table and returns the + * function number. + * + * On entry, curr_token points to: + * + * - the token after 'function' for function expression/declaration/statement + * - the token after 'set' or 'get' for setter/getter + */ + +/* Parse formals. */ +DUK_LOCAL void duk__parse_func_formals(duk_compiler_ctx *comp_ctx) { + duk_hthread *thr = comp_ctx->thr; + duk_bool_t first = 1; + duk_uarridx_t n; + + for (;;) { + if (comp_ctx->curr_token.t == DUK_TOK_RPAREN) { + break; + } + + if (first) { + /* no comma */ + first = 0; + } else { + duk__advance_expect(comp_ctx, DUK_TOK_COMMA); + } + + /* Note: when parsing a formal list in non-strict context, e.g. + * "implements" is parsed as an identifier. When the function is + * later detected to be strict, the argument list must be rechecked + * against a larger set of reserved words (that of strict mode). + * This is handled by duk__parse_func_body(). Here we recognize + * whatever tokens are considered reserved in current strictness + * (which is not always enough). + */ + + if (comp_ctx->curr_token.t != DUK_TOK_IDENTIFIER) { + DUK_ERROR_SYNTAX(thr, DUK_STR_EXPECTED_IDENTIFIER); + DUK_WO_NORETURN(return;); + } + DUK_ASSERT(comp_ctx->curr_token.t == DUK_TOK_IDENTIFIER); + DUK_ASSERT(comp_ctx->curr_token.str1 != NULL); + DUK_DDD(DUK_DDDPRINT("formal argument: %!O", (duk_heaphdr *) comp_ctx->curr_token.str1)); + + /* XXX: append primitive */ + duk_push_hstring(thr, comp_ctx->curr_token.str1); + n = (duk_uarridx_t) duk_get_length(thr, comp_ctx->curr_func.argnames_idx); + duk_put_prop_index(thr, comp_ctx->curr_func.argnames_idx, n); + + duk__advance(comp_ctx); /* eat identifier */ + } +} + +/* Parse a function-like expression, assuming that 'comp_ctx->curr_func' is + * correctly set up. Assumes that curr_token is just after 'function' (or + * 'set'/'get' etc). + */ +DUK_LOCAL void duk__parse_func_like_raw(duk_compiler_ctx *comp_ctx, duk_small_uint_t flags) { + duk_hthread *thr = comp_ctx->thr; + duk_token *tok; + duk_bool_t no_advance; + + DUK_ASSERT(comp_ctx->curr_func.num_formals == 0); + DUK_ASSERT(comp_ctx->curr_func.is_function == 1); + DUK_ASSERT(comp_ctx->curr_func.is_eval == 0); + DUK_ASSERT(comp_ctx->curr_func.is_global == 0); + DUK_ASSERT(comp_ctx->curr_func.is_setget == ((flags & DUK__FUNC_FLAG_GETSET) != 0)); + + duk__update_lineinfo_currtoken(comp_ctx); + + /* + * Function name (if any) + * + * We don't check for prohibited names here, because we don't + * yet know whether the function will be strict. Function body + * parsing handles this retroactively. + * + * For function expressions and declarations function name must + * be an Identifer (excludes reserved words). For setter/getter + * it is a PropertyName which allows reserved words and also + * strings and numbers (e.g. "{ get 1() { ... } }"). + * + * Function parsing may start either from prev_token or curr_token + * (object literal method definition uses prev_token for example). + * This is dealt with for the initial token. + */ + + no_advance = (flags & DUK__FUNC_FLAG_USE_PREVTOKEN); + if (no_advance) { + tok = &comp_ctx->prev_token; + } else { + tok = &comp_ctx->curr_token; + } + + if (flags & DUK__FUNC_FLAG_GETSET) { + /* PropertyName -> IdentifierName | StringLiteral | NumericLiteral */ + if (tok->t_nores == DUK_TOK_IDENTIFIER || tok->t == DUK_TOK_STRING) { + duk_push_hstring(thr, tok->str1); /* keep in valstack */ + } else if (tok->t == DUK_TOK_NUMBER) { + duk_push_number(thr, tok->num); + duk_to_string(thr, -1); + } else { + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_GETSET_NAME); + DUK_WO_NORETURN(return;); + } + comp_ctx->curr_func.h_name = duk_known_hstring(thr, -1); /* borrowed reference */ + } else { + /* Function name is an Identifier (not IdentifierName), but we get + * the raw name (not recognizing keywords) here and perform the name + * checks only after pass 1. + */ + if (tok->t_nores == DUK_TOK_IDENTIFIER) { + duk_push_hstring(thr, tok->str1); /* keep in valstack */ + comp_ctx->curr_func.h_name = duk_known_hstring(thr, -1); /* borrowed reference */ + } else { + /* valstack will be unbalanced, which is OK */ + DUK_ASSERT((flags & DUK__FUNC_FLAG_GETSET) == 0); + DUK_ASSERT(comp_ctx->curr_func.h_name == NULL); + no_advance = 1; + if (flags & DUK__FUNC_FLAG_DECL) { + DUK_ERROR_SYNTAX(thr, DUK_STR_FUNC_NAME_REQUIRED); + DUK_WO_NORETURN(return;); + } + } + } + + DUK_DD(DUK_DDPRINT("function name: %!O", (duk_heaphdr *) comp_ctx->curr_func.h_name)); + + if (!no_advance) { + duk__advance(comp_ctx); + } + + /* + * Formal argument list + * + * We don't check for prohibited names or for duplicate argument + * names here, becase we don't yet know whether the function will + * be strict. Function body parsing handles this retroactively. + */ + + duk__advance_expect(comp_ctx, DUK_TOK_LPAREN); + + duk__parse_func_formals(comp_ctx); + + DUK_ASSERT(comp_ctx->curr_token.t == DUK_TOK_RPAREN); + duk__advance(comp_ctx); + + /* + * Parse function body + */ + + duk__parse_func_body(comp_ctx, + 0, /* expect_eof */ + 0, /* implicit_return_value */ + flags & DUK__FUNC_FLAG_DECL, /* regexp_after */ + DUK_TOK_LCURLY); /* expect_token */ + + /* + * Convert duk_compiler_func to a function template and add it + * to the parent function table. + */ + + duk__convert_to_func_template(comp_ctx); /* -> [ ... func ] */ +} + +/* Parse an inner function, adding the function template to the current function's + * function table. Return a function number to be used by the outer function. + * + * Avoiding O(depth^2) inner function parsing is handled here. On the first pass, + * compile and register the function normally into the 'funcs' array, also recording + * a lexer point (offset/line) to the closing brace of the function. On the second + * pass, skip the function and return the same 'fnum' as on the first pass by using + * a running counter. + * + * An unfortunate side effect of this is that when parsing the inner function, almost + * nothing is known of the outer function, i.e. the inner function's scope. We don't + * need that information at the moment, but it would allow some optimizations if it + * were used. + */ +DUK_LOCAL duk_int_t duk__parse_func_like_fnum(duk_compiler_ctx *comp_ctx, duk_small_uint_t flags) { + duk_hthread *thr = comp_ctx->thr; + duk_compiler_func old_func; + duk_idx_t entry_top; + duk_int_t fnum; + + /* + * On second pass, skip the function. + */ + + if (!comp_ctx->curr_func.in_scanning) { + duk_lexer_point lex_pt; + + fnum = comp_ctx->curr_func.fnum_next++; + duk_get_prop_index(thr, comp_ctx->curr_func.funcs_idx, (duk_uarridx_t) (fnum * 3 + 1)); + lex_pt.offset = (duk_size_t) duk_to_uint(thr, -1); + duk_pop(thr); + duk_get_prop_index(thr, comp_ctx->curr_func.funcs_idx, (duk_uarridx_t) (fnum * 3 + 2)); + lex_pt.line = duk_to_int(thr, -1); + duk_pop(thr); + + DUK_DDD( + DUK_DDDPRINT("second pass of an inner func, skip the function, reparse closing brace; lex offset=%ld, line=%ld", + (long) lex_pt.offset, + (long) lex_pt.line)); + + DUK_LEXER_SETPOINT(&comp_ctx->lex, &lex_pt); + comp_ctx->curr_token.t = 0; /* this is needed for regexp mode */ + comp_ctx->curr_token.start_line = 0; /* needed for line number tracking (becomes prev_token.start_line) */ + duk__advance(comp_ctx); + + /* RegExp is not allowed after a function expression, e.g. in + * (function () {} / 123). A RegExp *is* allowed after a + * function declaration! + */ + if (flags & DUK__FUNC_FLAG_DECL) { + comp_ctx->curr_func.allow_regexp_in_adv = 1; + } + duk__advance_expect(comp_ctx, DUK_TOK_RCURLY); + + return fnum; + } + + /* + * On first pass, perform actual parsing. Remember valstack top on entry + * to restore it later, and switch to using a new function in comp_ctx. + */ + + entry_top = duk_get_top(thr); + DUK_DDD(DUK_DDDPRINT("before func: entry_top=%ld, curr_tok.start_offset=%ld", + (long) entry_top, + (long) comp_ctx->curr_token.start_offset)); + + duk_memcpy(&old_func, &comp_ctx->curr_func, sizeof(duk_compiler_func)); + + duk_memzero(&comp_ctx->curr_func, sizeof(duk_compiler_func)); + duk__init_func_valstack_slots(comp_ctx); + DUK_ASSERT(comp_ctx->curr_func.num_formals == 0); + + /* inherit initial strictness from parent */ + comp_ctx->curr_func.is_strict = old_func.is_strict; + + /* XXX: It might be better to just store the flags into the curr_func + * struct and use them as is without this flag interpretation step + * here. + */ + DUK_ASSERT(comp_ctx->curr_func.is_notail == 0); + comp_ctx->curr_func.is_function = 1; + DUK_ASSERT(comp_ctx->curr_func.is_eval == 0); + DUK_ASSERT(comp_ctx->curr_func.is_global == 0); + comp_ctx->curr_func.is_setget = ((flags & DUK__FUNC_FLAG_GETSET) != 0); + comp_ctx->curr_func.is_namebinding = + !(flags & (DUK__FUNC_FLAG_GETSET | DUK__FUNC_FLAG_METDEF | + DUK__FUNC_FLAG_DECL)); /* no name binding for: declarations, objlit getset, objlit method def */ + comp_ctx->curr_func.is_constructable = + !(flags & (DUK__FUNC_FLAG_GETSET | DUK__FUNC_FLAG_METDEF)); /* not constructable: objlit getset, objlit method def */ + + /* + * Parse inner function + */ + + duk__parse_func_like_raw(comp_ctx, flags); /* pushes function template */ + + /* prev_token.start_offset points to the closing brace here; when skipping + * we're going to reparse the closing brace to ensure semicolon insertion + * etc work as expected. + */ + DUK_DDD(DUK_DDDPRINT("after func: prev_tok.start_offset=%ld, curr_tok.start_offset=%ld", + (long) comp_ctx->prev_token.start_offset, + (long) comp_ctx->curr_token.start_offset)); + DUK_ASSERT(comp_ctx->lex.input[comp_ctx->prev_token.start_offset] == (duk_uint8_t) DUK_ASC_RCURLY); + + /* XXX: append primitive */ + DUK_ASSERT(duk_get_length(thr, old_func.funcs_idx) == (duk_size_t) (old_func.fnum_next * 3)); + fnum = old_func.fnum_next++; + + if (fnum > DUK__MAX_FUNCS) { + DUK_ERROR_RANGE(comp_ctx->thr, DUK_STR_FUNC_LIMIT); + DUK_WO_NORETURN(return 0;); + } + + /* array writes autoincrement length */ + (void) duk_put_prop_index(thr, old_func.funcs_idx, (duk_uarridx_t) (fnum * 3)); + duk_push_size_t(thr, comp_ctx->prev_token.start_offset); + (void) duk_put_prop_index(thr, old_func.funcs_idx, (duk_uarridx_t) (fnum * 3 + 1)); + duk_push_int(thr, comp_ctx->prev_token.start_line); + (void) duk_put_prop_index(thr, old_func.funcs_idx, (duk_uarridx_t) (fnum * 3 + 2)); + + /* + * Cleanup: restore original function, restore valstack state. + * + * Function declaration handling needs the function name to be pushed + * on the value stack. + */ + + if (flags & DUK__FUNC_FLAG_PUSHNAME_PASS1) { + DUK_ASSERT(comp_ctx->curr_func.h_name != NULL); + duk_push_hstring(thr, comp_ctx->curr_func.h_name); + duk_replace(thr, entry_top); + duk_set_top(thr, entry_top + 1); + } else { + duk_set_top(thr, entry_top); + } + duk_memcpy((void *) &comp_ctx->curr_func, (void *) &old_func, sizeof(duk_compiler_func)); + + return fnum; +} + +/* + * Compile input string into an executable function template without + * arguments. + * + * The string is parsed as the "Program" production of ECMAScript E5. + * Compilation context can be either global code or eval code (see E5 + * Sections 14 and 15.1.2.1). + * + * Input stack: [ ... filename ] + * Output stack: [ ... func_template ] + */ + +/* XXX: source code property */ + +DUK_LOCAL duk_ret_t duk__js_compile_raw(duk_hthread *thr, void *udata) { + duk_hstring *h_filename; + duk__compiler_stkstate *comp_stk; + duk_compiler_ctx *comp_ctx; + duk_lexer_point *lex_pt; + duk_compiler_func *func; + duk_idx_t entry_top; + duk_bool_t is_strict; + duk_bool_t is_eval; + duk_bool_t is_funcexpr; + duk_small_uint_t flags; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(udata != NULL); + + /* + * Arguments check + */ + + entry_top = duk_get_top(thr); + DUK_ASSERT(entry_top >= 1); + + comp_stk = (duk__compiler_stkstate *) udata; + comp_ctx = &comp_stk->comp_ctx_alloc; + lex_pt = &comp_stk->lex_pt_alloc; + DUK_ASSERT(comp_ctx != NULL); + DUK_ASSERT(lex_pt != NULL); + + flags = comp_stk->flags; + is_eval = (flags & DUK_COMPILE_EVAL ? 1 : 0); + is_strict = (flags & DUK_COMPILE_STRICT ? 1 : 0); + is_funcexpr = (flags & DUK_COMPILE_FUNCEXPR ? 1 : 0); + + h_filename = duk_get_hstring(thr, -1); /* may be undefined */ + + /* + * Init compiler and lexer contexts + */ + + func = &comp_ctx->curr_func; +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + comp_ctx->thr = NULL; + comp_ctx->h_filename = NULL; + comp_ctx->prev_token.str1 = NULL; + comp_ctx->prev_token.str2 = NULL; + comp_ctx->curr_token.str1 = NULL; + comp_ctx->curr_token.str2 = NULL; +#endif + + duk_require_stack(thr, DUK__COMPILE_ENTRY_SLOTS); + + duk_push_dynamic_buffer(thr, 0); /* entry_top + 0 */ + duk_push_undefined(thr); /* entry_top + 1 */ + duk_push_undefined(thr); /* entry_top + 2 */ + duk_push_undefined(thr); /* entry_top + 3 */ + duk_push_undefined(thr); /* entry_top + 4 */ + + comp_ctx->thr = thr; + comp_ctx->h_filename = h_filename; + comp_ctx->tok11_idx = entry_top + 1; + comp_ctx->tok12_idx = entry_top + 2; + comp_ctx->tok21_idx = entry_top + 3; + comp_ctx->tok22_idx = entry_top + 4; + comp_ctx->recursion_limit = DUK_USE_COMPILER_RECLIMIT; + + /* comp_ctx->lex has been pre-initialized by caller: it has been + * zeroed and input/input_length has been set. + */ + comp_ctx->lex.thr = thr; + /* comp_ctx->lex.input and comp_ctx->lex.input_length filled by caller */ + comp_ctx->lex.slot1_idx = comp_ctx->tok11_idx; + comp_ctx->lex.slot2_idx = comp_ctx->tok12_idx; + comp_ctx->lex.buf_idx = entry_top + 0; + comp_ctx->lex.buf = (duk_hbuffer_dynamic *) duk_known_hbuffer(thr, entry_top + 0); + DUK_ASSERT(DUK_HBUFFER_HAS_DYNAMIC(comp_ctx->lex.buf) && !DUK_HBUFFER_HAS_EXTERNAL(comp_ctx->lex.buf)); + comp_ctx->lex.token_limit = DUK_COMPILER_TOKEN_LIMIT; + + lex_pt->offset = 0; + lex_pt->line = 1; + DUK_LEXER_SETPOINT(&comp_ctx->lex, lex_pt); /* fills window */ + comp_ctx->curr_token.start_line = 0; /* needed for line number tracking (becomes prev_token.start_line) */ + + /* + * Initialize function state for a zero-argument function + */ + + duk__init_func_valstack_slots(comp_ctx); + DUK_ASSERT(func->num_formals == 0); + + if (is_funcexpr) { + /* Name will be filled from function expression, not by caller. + * This case is used by Function constructor and duk_compile() + * API with the DUK_COMPILE_FUNCTION option. + */ + DUK_ASSERT(func->h_name == NULL); + } else { + duk_push_hstring_stridx(thr, (is_eval ? DUK_STRIDX_EVAL : DUK_STRIDX_GLOBAL)); + func->h_name = duk_get_hstring(thr, -1); + } + + /* + * Parse a function body or a function-like expression, depending + * on flags. + */ + + DUK_ASSERT(func->is_setget == 0); + func->is_strict = (duk_uint8_t) is_strict; + DUK_ASSERT(func->is_notail == 0); + + if (is_funcexpr) { + func->is_function = 1; + DUK_ASSERT(func->is_eval == 0); + DUK_ASSERT(func->is_global == 0); + func->is_namebinding = 1; + func->is_constructable = 1; + + duk__advance(comp_ctx); /* init 'curr_token' */ + duk__advance_expect(comp_ctx, DUK_TOK_FUNCTION); + (void) duk__parse_func_like_raw(comp_ctx, 0 /*flags*/); + } else { + DUK_ASSERT(func->is_function == 0); + DUK_ASSERT(is_eval == 0 || is_eval == 1); + func->is_eval = (duk_uint8_t) is_eval; + func->is_global = (duk_uint8_t) !is_eval; + DUK_ASSERT(func->is_namebinding == 0); + DUK_ASSERT(func->is_constructable == 0); + + duk__parse_func_body(comp_ctx, + 1, /* expect_eof */ + 1, /* implicit_return_value */ + 1, /* regexp_after (does not matter) */ + -1); /* expect_token */ + } + + /* + * Convert duk_compiler_func to a function template + */ + + duk__convert_to_func_template(comp_ctx); + + /* + * Wrapping duk_safe_call() will mangle the stack, just return stack top + */ + + /* [ ... filename (temps) func ] */ + + return 1; +} + +DUK_INTERNAL void duk_js_compile(duk_hthread *thr, const duk_uint8_t *src_buffer, duk_size_t src_length, duk_small_uint_t flags) { + duk__compiler_stkstate comp_stk; + duk_compiler_ctx *prev_ctx; + duk_ret_t safe_rc; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(src_buffer != NULL); + + /* preinitialize lexer state partially */ + duk_memzero(&comp_stk, sizeof(comp_stk)); + comp_stk.flags = flags; + DUK_LEXER_INITCTX(&comp_stk.comp_ctx_alloc.lex); + comp_stk.comp_ctx_alloc.lex.input = src_buffer; + comp_stk.comp_ctx_alloc.lex.input_length = src_length; + comp_stk.comp_ctx_alloc.lex.flags = flags; /* Forward flags directly for now. */ + + /* [ ... filename ] */ + + prev_ctx = thr->compile_ctx; + thr->compile_ctx = &comp_stk.comp_ctx_alloc; /* for duk_error_augment.c */ + safe_rc = duk_safe_call(thr, duk__js_compile_raw, (void *) &comp_stk /*udata*/, 1 /*nargs*/, 1 /*nrets*/); + thr->compile_ctx = prev_ctx; /* must restore reliably before returning */ + + if (safe_rc != DUK_EXEC_SUCCESS) { + DUK_D(DUK_DPRINT("compilation failed: %!T", duk_get_tval(thr, -1))); + (void) duk_throw(thr); + DUK_WO_NORETURN(return;); + } + + /* [ ... template ] */ +} + +/* automatic undefs */ +#undef DUK__ALLOCTEMP +#undef DUK__ALLOCTEMPS +#undef DUK__ALLOW_AUTO_SEMI_ALWAYS +#undef DUK__BC_INITIAL_INSTS +#undef DUK__BP_ADDITIVE +#undef DUK__BP_ASSIGNMENT +#undef DUK__BP_BAND +#undef DUK__BP_BOR +#undef DUK__BP_BXOR +#undef DUK__BP_CALL +#undef DUK__BP_CLOSING +#undef DUK__BP_COMMA +#undef DUK__BP_CONDITIONAL +#undef DUK__BP_EOF +#undef DUK__BP_EQUALITY +#undef DUK__BP_EXPONENTIATION +#undef DUK__BP_FOR_EXPR +#undef DUK__BP_INVALID +#undef DUK__BP_LAND +#undef DUK__BP_LOR +#undef DUK__BP_MEMBER +#undef DUK__BP_MULTIPLICATIVE +#undef DUK__BP_POSTFIX +#undef DUK__BP_RELATIONAL +#undef DUK__BP_SHIFT +#undef DUK__COMPILE_ENTRY_SLOTS +#undef DUK__CONST_MARKER +#undef DUK__DUMP_ISPEC +#undef DUK__DUMP_IVALUE +#undef DUK__EMIT_FLAG_A_IS_SOURCE +#undef DUK__EMIT_FLAG_BC_REGCONST +#undef DUK__EMIT_FLAG_B_IS_TARGET +#undef DUK__EMIT_FLAG_C_IS_TARGET +#undef DUK__EMIT_FLAG_NO_SHUFFLE_A +#undef DUK__EMIT_FLAG_NO_SHUFFLE_B +#undef DUK__EMIT_FLAG_NO_SHUFFLE_C +#undef DUK__EMIT_FLAG_RESERVE_JUMPSLOT +#undef DUK__EXPR_FLAG_ALLOW_EMPTY +#undef DUK__EXPR_FLAG_REJECT_IN +#undef DUK__EXPR_FLAG_REQUIRE_INIT +#undef DUK__EXPR_RBP_MASK +#undef DUK__FUNCTION_BODY_REQUIRE_SLOTS +#undef DUK__FUNCTION_INIT_REQUIRE_SLOTS +#undef DUK__FUNC_FLAG_DECL +#undef DUK__FUNC_FLAG_GETSET +#undef DUK__FUNC_FLAG_METDEF +#undef DUK__FUNC_FLAG_PUSHNAME_PASS1 +#undef DUK__FUNC_FLAG_USE_PREVTOKEN +#undef DUK__GETCONST_MAX_CONSTS_CHECK +#undef DUK__GETTEMP +#undef DUK__HAS_TERM +#undef DUK__HAS_VAL +#undef DUK__ISCONST +#undef DUK__ISREG +#undef DUK__ISREG_NOTTEMP +#undef DUK__ISREG_TEMP +#undef DUK__IS_TERMINAL +#undef DUK__IVAL_FLAG_ALLOW_CONST +#undef DUK__IVAL_FLAG_REQUIRE_SHORT +#undef DUK__IVAL_FLAG_REQUIRE_TEMP +#undef DUK__MAX_ARRAY_INIT_VALUES +#undef DUK__MAX_CONSTS +#undef DUK__MAX_FUNCS +#undef DUK__MAX_OBJECT_INIT_PAIRS +#undef DUK__MAX_TEMPS +#undef DUK__MK_LBP +#undef DUK__MK_LBP_FLAGS +#undef DUK__OBJ_LIT_KEY_GET +#undef DUK__OBJ_LIT_KEY_PLAIN +#undef DUK__OBJ_LIT_KEY_SET +#undef DUK__PARSE_EXPR_SLOTS +#undef DUK__PARSE_STATEMENTS_SLOTS +#undef DUK__RECURSION_DECREASE +#undef DUK__RECURSION_INCREASE +#undef DUK__REMOVECONST +#undef DUK__SETTEMP +#undef DUK__SETTEMP_CHECKMAX +#undef DUK__STILL_PROLOGUE +#undef DUK__TOKEN_LBP_BP_MASK +#undef DUK__TOKEN_LBP_FLAG_NO_REGEXP +#undef DUK__TOKEN_LBP_FLAG_TERMINATES +#undef DUK__TOKEN_LBP_FLAG_UNUSED +#undef DUK__TOKEN_LBP_GET_BP +#line 1 "duk_js_executor.c" +/* + * ECMAScript bytecode executor. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Local declarations. + */ + +DUK_LOCAL_DECL void duk__js_execute_bytecode_inner(duk_hthread *entry_thread, duk_activation *entry_act); + +/* + * Misc helpers. + */ + +/* Replace value stack top to value at 'tv_ptr'. Optimize for + * performance by only applying the net refcount change. + */ +#define DUK__REPLACE_TO_TVPTR(thr, tv_ptr) \ + do { \ + duk_hthread *duk__thr; \ + duk_tval *duk__tvsrc; \ + duk_tval *duk__tvdst; \ + duk_tval duk__tvtmp; \ + duk__thr = (thr); \ + duk__tvsrc = DUK_GET_TVAL_NEGIDX(duk__thr, -1); \ + duk__tvdst = (tv_ptr); \ + DUK_TVAL_SET_TVAL(&duk__tvtmp, duk__tvdst); \ + DUK_TVAL_SET_TVAL(duk__tvdst, duk__tvsrc); \ + DUK_TVAL_SET_UNDEFINED(duk__tvsrc); /* value stack init policy */ \ + duk__thr->valstack_top = duk__tvsrc; \ + DUK_TVAL_DECREF(duk__thr, &duk__tvtmp); \ + } while (0) + +/* XXX: candidate of being an internal shared API call */ +#if 0 /* unused */ +DUK_LOCAL void duk__push_tvals_incref_only(duk_hthread *thr, duk_tval *tv_src, duk_small_uint_fast_t count) { + duk_tval *tv_dst; + duk_size_t copy_size; + duk_size_t i; + + tv_dst = thr->valstack_top; + copy_size = sizeof(duk_tval) * count; + duk_memcpy((void *) tv_dst, (const void *) tv_src, copy_size); + for (i = 0; i < count; i++) { + DUK_TVAL_INCREF(thr, tv_dst); + tv_dst++; + } + thr->valstack_top = tv_dst; +} +#endif + +/* + * Arithmetic, binary, and logical helpers. + * + * Note: there is no opcode for logical AND or logical OR; this is on + * purpose, because the evalution order semantics for them make such + * opcodes pretty pointless: short circuiting means they are most + * comfortably implemented as jumps. However, a logical NOT opcode + * is useful. + * + * Note: careful with duk_tval pointers here: they are potentially + * invalidated by any DECREF and almost any API call. It's still + * preferable to work without making a copy but that's not always + * possible. + */ + +DUK_LOCAL DUK_EXEC_ALWAYS_INLINE_PERF duk_double_t duk__compute_mod(duk_double_t d1, duk_double_t d2) { + return (duk_double_t) duk_js_arith_mod((double) d1, (double) d2); +} + +#if defined(DUK_USE_ES7_EXP_OPERATOR) +DUK_LOCAL DUK_EXEC_ALWAYS_INLINE_PERF duk_double_t duk__compute_exp(duk_double_t d1, duk_double_t d2) { + return (duk_double_t) duk_js_arith_pow((double) d1, (double) d2); +} +#endif + +DUK_LOCAL DUK_EXEC_ALWAYS_INLINE_PERF void duk__vm_arith_add(duk_hthread *thr, + duk_tval *tv_x, + duk_tval *tv_y, + duk_small_uint_fast_t idx_z) { + /* + * Addition operator is different from other arithmetic + * operations in that it also provides string concatenation. + * Hence it is implemented separately. + * + * There is a fast path for number addition. Other cases go + * through potentially multiple coercions as described in the + * E5 specification. It may be possible to reduce the number + * of coercions, but this must be done carefully to preserve + * the exact semantics. + * + * E5 Section 11.6.1. + * + * Custom types also have special behavior implemented here. + */ + + duk_double_union du; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(tv_x != NULL); /* may be reg or const */ + DUK_ASSERT(tv_y != NULL); /* may be reg or const */ + DUK_ASSERT_DISABLE(idx_z >= 0); /* unsigned */ + DUK_ASSERT((duk_uint_t) idx_z < (duk_uint_t) duk_get_top(thr)); + + /* + * Fast paths + */ + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_x) && DUK_TVAL_IS_FASTINT(tv_y)) { + duk_int64_t v1, v2, v3; + duk_int32_t v3_hi; + duk_tval *tv_z; + + /* Input values are signed 48-bit so we can detect overflow + * reliably from high bits or just a comparison. + */ + + v1 = DUK_TVAL_GET_FASTINT(tv_x); + v2 = DUK_TVAL_GET_FASTINT(tv_y); + v3 = v1 + v2; + v3_hi = (duk_int32_t) (v3 >> 32); + if (DUK_LIKELY(v3_hi >= DUK_I64_CONSTANT(-0x8000) && v3_hi <= DUK_I64_CONSTANT(0x7fff))) { + tv_z = thr->valstack_bottom + idx_z; + DUK_TVAL_SET_FASTINT_UPDREF(thr, tv_z, v3); /* side effects */ + return; + } else { + /* overflow, fall through */ + ; + } + } +#endif /* DUK_USE_FASTINT */ + + if (DUK_TVAL_IS_NUMBER(tv_x) && DUK_TVAL_IS_NUMBER(tv_y)) { +#if !defined(DUK_USE_EXEC_PREFER_SIZE) + duk_tval *tv_z; +#endif + + du.d = DUK_TVAL_GET_NUMBER(tv_x) + DUK_TVAL_GET_NUMBER(tv_y); +#if defined(DUK_USE_EXEC_PREFER_SIZE) + duk_push_number(thr, du.d); /* will NaN normalize result */ + duk_replace(thr, (duk_idx_t) idx_z); +#else /* DUK_USE_EXEC_PREFER_SIZE */ + DUK_DBLUNION_NORMALIZE_NAN_CHECK(&du); + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&du)); + tv_z = thr->valstack_bottom + idx_z; + DUK_TVAL_SET_NUMBER_UPDREF(thr, tv_z, du.d); /* side effects */ +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + return; + } + + /* + * Slow path: potentially requires function calls for coercion + */ + + duk_push_tval(thr, tv_x); + duk_push_tval(thr, tv_y); + duk_to_primitive(thr, -2, DUK_HINT_NONE); /* side effects -> don't use tv_x, tv_y after */ + duk_to_primitive(thr, -1, DUK_HINT_NONE); + + /* Since Duktape 2.x plain buffers are treated like ArrayBuffer. */ + if (duk_is_string(thr, -2) || duk_is_string(thr, -1)) { + /* Symbols shouldn't technically be handled here, but should + * go into the default ToNumber() coercion path instead and + * fail there with a TypeError. However, there's a ToString() + * in duk_concat_2() which also fails with TypeError so no + * explicit check is needed. + */ + duk_concat_2(thr); /* [... s1 s2] -> [... s1+s2] */ + } else { + duk_double_t d1, d2; + + d1 = duk_to_number_m2(thr); + d2 = duk_to_number_m1(thr); + DUK_ASSERT(duk_is_number(thr, -2)); + DUK_ASSERT(duk_is_number(thr, -1)); + DUK_ASSERT_DOUBLE_IS_NORMALIZED(d1); + DUK_ASSERT_DOUBLE_IS_NORMALIZED(d2); + + du.d = d1 + d2; + duk_pop_2_unsafe(thr); + duk_push_number(thr, du.d); /* will NaN normalize result */ + } + duk_replace(thr, (duk_idx_t) idx_z); /* side effects */ +} + +DUK_LOCAL DUK_EXEC_ALWAYS_INLINE_PERF void duk__vm_arith_binary_op(duk_hthread *thr, + duk_tval *tv_x, + duk_tval *tv_y, + duk_uint_fast_t idx_z, + duk_small_uint_fast_t opcode) { + /* + * Arithmetic operations other than '+' have number-only semantics + * and are implemented here. The separate switch-case here means a + * "double dispatch" of the arithmetic opcode, but saves code space. + * + * E5 Sections 11.5, 11.5.1, 11.5.2, 11.5.3, 11.6, 11.6.1, 11.6.2, 11.6.3. + */ + + duk_double_t d1, d2; + duk_double_union du; + duk_small_uint_fast_t opcode_shifted; +#if defined(DUK_USE_FASTINT) || !defined(DUK_USE_EXEC_PREFER_SIZE) + duk_tval *tv_z; +#endif + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(tv_x != NULL); /* may be reg or const */ + DUK_ASSERT(tv_y != NULL); /* may be reg or const */ + DUK_ASSERT_DISABLE(idx_z >= 0); /* unsigned */ + DUK_ASSERT((duk_uint_t) idx_z < (duk_uint_t) duk_get_top(thr)); + + opcode_shifted = opcode >> 2; /* Get base opcode without reg/const modifiers. */ + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_x) && DUK_TVAL_IS_FASTINT(tv_y)) { + duk_int64_t v1, v2, v3; + duk_int32_t v3_hi; + + v1 = DUK_TVAL_GET_FASTINT(tv_x); + v2 = DUK_TVAL_GET_FASTINT(tv_y); + + switch (opcode_shifted) { + case DUK_OP_SUB >> 2: { + v3 = v1 - v2; + break; + } + case DUK_OP_MUL >> 2: { + /* Must ensure result is 64-bit (no overflow); a + * simple and sufficient fast path is to allow only + * 32-bit inputs. Avoid zero inputs to avoid + * negative zero issues (-1 * 0 = -0, for instance). + */ + if (v1 >= DUK_I64_CONSTANT(-0x80000000) && v1 <= DUK_I64_CONSTANT(0x7fffffff) && v1 != 0 && + v2 >= DUK_I64_CONSTANT(-0x80000000) && v2 <= DUK_I64_CONSTANT(0x7fffffff) && v2 != 0) { + v3 = v1 * v2; + } else { + goto skip_fastint; + } + break; + } + case DUK_OP_DIV >> 2: { + /* Don't allow a zero divisor. Fast path check by + * "verifying" with multiplication. Also avoid zero + * dividend to avoid negative zero issues (0 / -1 = -0 + * for instance). + */ + if (v1 == 0 || v2 == 0) { + goto skip_fastint; + } + v3 = v1 / v2; + if (v3 * v2 != v1) { + goto skip_fastint; + } + break; + } + case DUK_OP_MOD >> 2: { + /* Don't allow a zero divisor. Restrict both v1 and + * v2 to positive values to avoid compiler specific + * behavior. + */ + if (v1 < 1 || v2 < 1) { + goto skip_fastint; + } + v3 = v1 % v2; + DUK_ASSERT(v3 >= 0); + DUK_ASSERT(v3 < v2); + DUK_ASSERT(v1 - (v1 / v2) * v2 == v3); + break; + } + default: { + /* Possible with DUK_OP_EXP. */ + goto skip_fastint; + } + } + + v3_hi = (duk_int32_t) (v3 >> 32); + if (DUK_LIKELY(v3_hi >= DUK_I64_CONSTANT(-0x8000) && v3_hi <= DUK_I64_CONSTANT(0x7fff))) { + tv_z = thr->valstack_bottom + idx_z; + DUK_TVAL_SET_FASTINT_UPDREF(thr, tv_z, v3); /* side effects */ + return; + } + /* fall through if overflow etc */ + } +skip_fastint: +#endif /* DUK_USE_FASTINT */ + + if (DUK_TVAL_IS_NUMBER(tv_x) && DUK_TVAL_IS_NUMBER(tv_y)) { + /* fast path */ + d1 = DUK_TVAL_GET_NUMBER(tv_x); + d2 = DUK_TVAL_GET_NUMBER(tv_y); + } else { + duk_push_tval(thr, tv_x); + duk_push_tval(thr, tv_y); + d1 = duk_to_number_m2(thr); /* side effects */ + d2 = duk_to_number_m1(thr); + DUK_ASSERT(duk_is_number(thr, -2)); + DUK_ASSERT(duk_is_number(thr, -1)); + DUK_ASSERT_DOUBLE_IS_NORMALIZED(d1); + DUK_ASSERT_DOUBLE_IS_NORMALIZED(d2); + duk_pop_2_unsafe(thr); + } + + switch (opcode_shifted) { + case DUK_OP_SUB >> 2: { + du.d = d1 - d2; + break; + } + case DUK_OP_MUL >> 2: { + du.d = d1 * d2; + break; + } + case DUK_OP_DIV >> 2: { + /* Division-by-zero is undefined behavior, so + * rely on a helper. + */ + du.d = duk_double_div(d1, d2); + break; + } + case DUK_OP_MOD >> 2: { + du.d = duk__compute_mod(d1, d2); + break; + } +#if defined(DUK_USE_ES7_EXP_OPERATOR) + case DUK_OP_EXP >> 2: { + du.d = duk__compute_exp(d1, d2); + break; + } +#endif + default: { + DUK_UNREACHABLE(); + du.d = DUK_DOUBLE_NAN; /* should not happen */ + break; + } + } + +#if defined(DUK_USE_EXEC_PREFER_SIZE) + duk_push_number(thr, du.d); /* will NaN normalize result */ + duk_replace(thr, (duk_idx_t) idx_z); +#else /* DUK_USE_EXEC_PREFER_SIZE */ + /* important to use normalized NaN with 8-byte tagged types */ + DUK_DBLUNION_NORMALIZE_NAN_CHECK(&du); + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&du)); + tv_z = thr->valstack_bottom + idx_z; + DUK_TVAL_SET_NUMBER_UPDREF(thr, tv_z, du.d); /* side effects */ +#endif /* DUK_USE_EXEC_PREFER_SIZE */ +} + +DUK_LOCAL DUK_EXEC_ALWAYS_INLINE_PERF void duk__vm_bitwise_binary_op(duk_hthread *thr, + duk_tval *tv_x, + duk_tval *tv_y, + duk_small_uint_fast_t idx_z, + duk_small_uint_fast_t opcode) { + /* + * Binary bitwise operations use different coercions (ToInt32, ToUint32) + * depending on the operation. We coerce the arguments first using + * ToInt32(), and then cast to an 32-bit value if necessary. Note that + * such casts must be correct even if there is no native 32-bit type + * (e.g., duk_int32_t and duk_uint32_t are 64-bit). + * + * E5 Sections 11.10, 11.7.1, 11.7.2, 11.7.3 + */ + + duk_int32_t i1, i2, i3; + duk_uint32_t u1, u2, u3; +#if defined(DUK_USE_FASTINT) + duk_int64_t fi3; +#else + duk_double_t d3; +#endif + duk_small_uint_fast_t opcode_shifted; +#if defined(DUK_USE_FASTINT) || !defined(DUK_USE_EXEC_PREFER_SIZE) + duk_tval *tv_z; +#endif + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(tv_x != NULL); /* may be reg or const */ + DUK_ASSERT(tv_y != NULL); /* may be reg or const */ + DUK_ASSERT_DISABLE(idx_z >= 0); /* unsigned */ + DUK_ASSERT((duk_uint_t) idx_z < (duk_uint_t) duk_get_top(thr)); + + opcode_shifted = opcode >> 2; /* Get base opcode without reg/const modifiers. */ + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_x) && DUK_TVAL_IS_FASTINT(tv_y)) { + i1 = (duk_int32_t) DUK_TVAL_GET_FASTINT_I32(tv_x); + i2 = (duk_int32_t) DUK_TVAL_GET_FASTINT_I32(tv_y); + } else +#endif /* DUK_USE_FASTINT */ + { + duk_push_tval(thr, tv_x); + duk_push_tval(thr, tv_y); + i1 = duk_to_int32(thr, -2); + i2 = duk_to_int32(thr, -1); + duk_pop_2_unsafe(thr); + } + + switch (opcode_shifted) { + case DUK_OP_BAND >> 2: { + i3 = i1 & i2; + break; + } + case DUK_OP_BOR >> 2: { + i3 = i1 | i2; + break; + } + case DUK_OP_BXOR >> 2: { + i3 = i1 ^ i2; + break; + } + case DUK_OP_BASL >> 2: { + /* Signed shift, named "arithmetic" (asl) because the result + * is signed, e.g. 4294967295 << 1 -> -2. Note that result + * must be masked. + */ + + u2 = ((duk_uint32_t) i2) & 0xffffffffUL; + i3 = (duk_int32_t) (((duk_uint32_t) i1) << (u2 & 0x1fUL)); /* E5 Section 11.7.1, steps 7 and 8 */ + i3 = i3 & ((duk_int32_t) 0xffffffffUL); /* Note: left shift, should mask */ + break; + } + case DUK_OP_BASR >> 2: { + /* signed shift */ + + u2 = ((duk_uint32_t) i2) & 0xffffffffUL; + i3 = i1 >> (u2 & 0x1fUL); /* E5 Section 11.7.2, steps 7 and 8 */ + break; + } + case DUK_OP_BLSR >> 2: { + /* unsigned shift */ + + u1 = ((duk_uint32_t) i1) & 0xffffffffUL; + u2 = ((duk_uint32_t) i2) & 0xffffffffUL; + + /* special result value handling */ + u3 = u1 >> (u2 & 0x1fUL); /* E5 Section 11.7.2, steps 7 and 8 */ +#if defined(DUK_USE_FASTINT) + fi3 = (duk_int64_t) u3; + goto fastint_result_set; +#else + d3 = (duk_double_t) u3; + goto result_set; +#endif + } + default: { + DUK_UNREACHABLE(); + i3 = 0; /* should not happen */ + break; + } + } + +#if defined(DUK_USE_FASTINT) + /* Result is always fastint compatible. */ + /* XXX: Set 32-bit result (but must then handle signed and + * unsigned results separately). + */ + fi3 = (duk_int64_t) i3; + +fastint_result_set: + tv_z = thr->valstack_bottom + idx_z; + DUK_TVAL_SET_FASTINT_UPDREF(thr, tv_z, fi3); /* side effects */ +#else /* DUK_USE_FASTINT */ + d3 = (duk_double_t) i3; + +result_set: + DUK_ASSERT(!DUK_ISNAN(d3)); /* 'd3' is never NaN, so no need to normalize */ + DUK_ASSERT_DOUBLE_IS_NORMALIZED(d3); /* always normalized */ + +#if defined(DUK_USE_EXEC_PREFER_SIZE) + duk_push_number(thr, d3); /* would NaN normalize result, but unnecessary */ + duk_replace(thr, (duk_idx_t) idx_z); +#else /* DUK_USE_EXEC_PREFER_SIZE */ + tv_z = thr->valstack_bottom + idx_z; + DUK_TVAL_SET_NUMBER_UPDREF(thr, tv_z, d3); /* side effects */ +#endif /* DUK_USE_EXEC_PREFER_SIZE */ +#endif /* DUK_USE_FASTINT */ +} + +/* In-place unary operation. */ +DUK_LOCAL DUK_EXEC_ALWAYS_INLINE_PERF void duk__vm_arith_unary_op(duk_hthread *thr, + duk_uint_fast_t idx_src, + duk_uint_fast_t idx_dst, + duk_small_uint_fast_t opcode) { + /* + * Arithmetic operations other than '+' have number-only semantics + * and are implemented here. The separate switch-case here means a + * "double dispatch" of the arithmetic opcode, but saves code space. + * + * E5 Sections 11.5, 11.5.1, 11.5.2, 11.5.3, 11.6, 11.6.1, 11.6.2, 11.6.3. + */ + + duk_tval *tv; + duk_double_t d1; + duk_double_union du; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(opcode == DUK_OP_UNM || opcode == DUK_OP_UNP); + DUK_ASSERT_DISABLE(idx_src >= 0); + DUK_ASSERT_DISABLE(idx_dst >= 0); + + tv = DUK_GET_TVAL_POSIDX(thr, (duk_idx_t) idx_src); + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv)) { + duk_int64_t v1, v2; + + v1 = DUK_TVAL_GET_FASTINT(tv); + if (opcode == DUK_OP_UNM) { + /* The smallest fastint is no longer 48-bit when + * negated. Positive zero becames negative zero + * (cannot be represented) when negated. + */ + if (DUK_LIKELY(v1 != DUK_FASTINT_MIN && v1 != 0)) { + v2 = -v1; + tv = DUK_GET_TVAL_POSIDX(thr, (duk_idx_t) idx_dst); + DUK_TVAL_SET_FASTINT_UPDREF(thr, tv, v2); + return; + } + } else { + /* ToNumber() for a fastint is a no-op. */ + DUK_ASSERT(opcode == DUK_OP_UNP); + v2 = v1; + tv = DUK_GET_TVAL_POSIDX(thr, (duk_idx_t) idx_dst); + DUK_TVAL_SET_FASTINT_UPDREF(thr, tv, v2); + return; + } + /* fall through if overflow etc */ + } +#endif /* DUK_USE_FASTINT */ + + if (DUK_TVAL_IS_NUMBER(tv)) { + d1 = DUK_TVAL_GET_NUMBER(tv); + } else { + d1 = duk_to_number_tval(thr, tv); /* side effects */ + } + + if (opcode == DUK_OP_UNP) { + /* ToNumber() for a double is a no-op, but unary plus is + * used to force a fastint check so do that here. + */ + du.d = d1; + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&du)); +#if defined(DUK_USE_FASTINT) + tv = DUK_GET_TVAL_POSIDX(thr, (duk_idx_t) idx_dst); + DUK_TVAL_SET_NUMBER_CHKFAST_UPDREF(thr, tv, du.d); /* always 'fast', i.e. inlined */ + return; +#endif + } else { + DUK_ASSERT(opcode == DUK_OP_UNM); + du.d = -d1; + DUK_DBLUNION_NORMALIZE_NAN_CHECK(&du); /* mandatory if du.d is a NaN */ + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&du)); + } + + /* XXX: size optimize: push+replace? */ + tv = DUK_GET_TVAL_POSIDX(thr, (duk_idx_t) idx_dst); + DUK_TVAL_SET_NUMBER_UPDREF(thr, tv, du.d); +} + +DUK_LOCAL DUK_EXEC_ALWAYS_INLINE_PERF void duk__vm_bitwise_not(duk_hthread *thr, duk_uint_fast_t idx_src, duk_uint_fast_t idx_dst) { + /* + * E5 Section 11.4.8 + */ + + duk_tval *tv; + duk_int32_t i1, i2; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT_DISABLE(idx_src >= 0); + DUK_ASSERT_DISABLE(idx_dst >= 0); + DUK_ASSERT((duk_uint_t) idx_src < (duk_uint_t) duk_get_top(thr)); + DUK_ASSERT((duk_uint_t) idx_dst < (duk_uint_t) duk_get_top(thr)); + + tv = DUK_GET_TVAL_POSIDX(thr, (duk_idx_t) idx_src); + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv)) { + i1 = (duk_int32_t) DUK_TVAL_GET_FASTINT_I32(tv); + } else +#endif /* DUK_USE_FASTINT */ + { + duk_push_tval(thr, tv); + i1 = duk_to_int32(thr, -1); /* side effects */ + duk_pop_unsafe(thr); + } + + /* Result is always fastint compatible. */ + i2 = ~i1; + tv = DUK_GET_TVAL_POSIDX(thr, (duk_idx_t) idx_dst); + DUK_TVAL_SET_I32_UPDREF(thr, tv, i2); /* side effects */ +} + +DUK_LOCAL DUK_EXEC_ALWAYS_INLINE_PERF void duk__vm_logical_not(duk_hthread *thr, duk_uint_fast_t idx_src, duk_uint_fast_t idx_dst) { + /* + * E5 Section 11.4.9 + */ + + duk_tval *tv; + duk_bool_t res; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT_DISABLE(idx_src >= 0); + DUK_ASSERT_DISABLE(idx_dst >= 0); + DUK_ASSERT((duk_uint_t) idx_src < (duk_uint_t) duk_get_top(thr)); + DUK_ASSERT((duk_uint_t) idx_dst < (duk_uint_t) duk_get_top(thr)); + + /* ToBoolean() does not require any operations with side effects so + * we can do it efficiently. For footprint it would be better to use + * duk_js_toboolean() and then push+replace to the result slot. + */ + tv = DUK_GET_TVAL_POSIDX(thr, (duk_idx_t) idx_src); + res = duk_js_toboolean(tv); /* does not modify 'tv' */ + DUK_ASSERT(res == 0 || res == 1); + res ^= 1; + tv = DUK_GET_TVAL_POSIDX(thr, (duk_idx_t) idx_dst); + /* XXX: size optimize: push+replace? */ + DUK_TVAL_SET_BOOLEAN_UPDREF(thr, tv, res); /* side effects */ +} + +/* XXX: size optimized variant */ +DUK_LOCAL DUK_EXEC_ALWAYS_INLINE_PERF void duk__prepost_incdec_reg_helper(duk_hthread *thr, + duk_tval *tv_dst, + duk_tval *tv_src, + duk_small_uint_t op) { + duk_double_t x, y, z; + + /* Two lowest bits of opcode are used to distinguish + * variants. Bit 0 = inc(0)/dec(1), bit 1 = pre(0)/post(1). + */ + DUK_ASSERT((DUK_OP_PREINCR & 0x03) == 0x00); + DUK_ASSERT((DUK_OP_PREDECR & 0x03) == 0x01); + DUK_ASSERT((DUK_OP_POSTINCR & 0x03) == 0x02); + DUK_ASSERT((DUK_OP_POSTDECR & 0x03) == 0x03); + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_src)) { + duk_int64_t x_fi, y_fi, z_fi; + x_fi = DUK_TVAL_GET_FASTINT(tv_src); + if (op & 0x01) { + if (DUK_UNLIKELY(x_fi == DUK_FASTINT_MIN)) { + goto skip_fastint; + } + y_fi = x_fi - 1; + } else { + if (DUK_UNLIKELY(x_fi == DUK_FASTINT_MAX)) { + goto skip_fastint; + } + y_fi = x_fi + 1; + } + + DUK_TVAL_SET_FASTINT(tv_src, y_fi); /* no need for refcount update */ + + z_fi = (op & 0x02) ? x_fi : y_fi; + DUK_TVAL_SET_FASTINT_UPDREF(thr, tv_dst, z_fi); /* side effects */ + return; + } +skip_fastint: +#endif + if (DUK_TVAL_IS_NUMBER(tv_src)) { + /* Fast path for the case where the register + * is a number (e.g. loop counter). + */ + + x = DUK_TVAL_GET_NUMBER(tv_src); + if (op & 0x01) { + y = x - 1.0; + } else { + y = x + 1.0; + } + + DUK_TVAL_SET_NUMBER(tv_src, y); /* no need for refcount update */ + } else { + /* Preserve duk_tval pointer(s) across a potential valstack + * resize by converting them into offsets temporarily. + */ + duk_idx_t bc; + duk_size_t off_dst; + + off_dst = (duk_size_t) ((duk_uint8_t *) tv_dst - (duk_uint8_t *) thr->valstack_bottom); + bc = (duk_idx_t) (tv_src - thr->valstack_bottom); /* XXX: pass index explicitly? */ + tv_src = NULL; /* no longer referenced */ + + x = duk_to_number(thr, bc); + if (op & 0x01) { + y = x - 1.0; + } else { + y = x + 1.0; + } + + duk_push_number(thr, y); + duk_replace(thr, bc); + + tv_dst = (duk_tval *) (void *) (((duk_uint8_t *) thr->valstack_bottom) + off_dst); + } + + z = (op & 0x02) ? x : y; + DUK_TVAL_SET_NUMBER_UPDREF(thr, tv_dst, z); /* side effects */ +} + +DUK_LOCAL DUK_EXEC_ALWAYS_INLINE_PERF void duk__prepost_incdec_var_helper(duk_hthread *thr, + duk_small_uint_t idx_dst, + duk_tval *tv_id, + duk_small_uint_t op, + duk_small_uint_t is_strict) { + duk_activation *act; + duk_double_t x, y; + duk_hstring *name; + + /* XXX: The pre/post inc/dec for an identifier lookup is + * missing the important fast path where the identifier + * has a storage location e.g. in a scope object so that + * it can be updated in-place. In particular, the case + * where the identifier has a storage location AND the + * previous value is a number should be optimized because + * it's side effect free. + */ + + /* Two lowest bits of opcode are used to distinguish + * variants. Bit 0 = inc(0)/dec(1), bit 1 = pre(0)/post(1). + */ + DUK_ASSERT((DUK_OP_PREINCV & 0x03) == 0x00); + DUK_ASSERT((DUK_OP_PREDECV & 0x03) == 0x01); + DUK_ASSERT((DUK_OP_POSTINCV & 0x03) == 0x02); + DUK_ASSERT((DUK_OP_POSTDECV & 0x03) == 0x03); + + DUK_ASSERT(DUK_TVAL_IS_STRING(tv_id)); + name = DUK_TVAL_GET_STRING(tv_id); + DUK_ASSERT(name != NULL); + act = thr->callstack_curr; + (void) duk_js_getvar_activation(thr, act, name, 1 /*throw*/); /* -> [ ... val this ] */ + + /* XXX: Fastint fast path would be useful here. Also fastints + * now lose their fastint status in current handling which is + * not intuitive. + */ + + x = duk_to_number_m2(thr); + if (op & 0x01) { + y = x - 1.0; + } else { + y = x + 1.0; + } + + /* [... x this] */ + + if (op & 0x02) { + duk_push_number(thr, y); /* -> [ ... x this y ] */ + DUK_ASSERT(act == thr->callstack_curr); + duk_js_putvar_activation(thr, act, name, DUK_GET_TVAL_NEGIDX(thr, -1), is_strict); + duk_pop_2_unsafe(thr); /* -> [ ... x ] */ + } else { + duk_pop_2_unsafe(thr); /* -> [ ... ] */ + duk_push_number(thr, y); /* -> [ ... y ] */ + DUK_ASSERT(act == thr->callstack_curr); + duk_js_putvar_activation(thr, act, name, DUK_GET_TVAL_NEGIDX(thr, -1), is_strict); + } + +#if defined(DUK_USE_EXEC_PREFER_SIZE) + duk_replace(thr, (duk_idx_t) idx_dst); +#else /* DUK_USE_EXEC_PREFER_SIZE */ + DUK__REPLACE_TO_TVPTR(thr, DUK_GET_TVAL_POSIDX(thr, (duk_idx_t) idx_dst)); +#endif /* DUK_USE_EXEC_PREFER_SIZE */ +} + +/* + * Longjmp and other control flow transfer for the bytecode executor. + * + * The longjmp handler can handle all longjmp types: error, yield, and + * resume (pseudotypes are never actually thrown). + * + * Error policy for longjmp: should not ordinarily throw errors; if errors + * occur (e.g. due to out-of-memory) they bubble outwards rather than being + * handled recursively. + */ + +#define DUK__LONGJMP_RESTART 0 /* state updated, restart bytecode execution */ +#define DUK__LONGJMP_RETHROW 1 /* exit bytecode executor by rethrowing an error to caller */ + +#define DUK__RETHAND_RESTART 0 /* state updated, restart bytecode execution */ +#define DUK__RETHAND_FINISHED 1 /* exit bytecode execution with return value */ + +/* XXX: optimize reconfig valstack operations so that resize, clamp, and setting + * top are combined into one pass. + */ + +/* Reconfigure value stack for return to an ECMAScript function at + * callstack top (caller unwinds). + */ +DUK_LOCAL void duk__reconfig_valstack_ecma_return(duk_hthread *thr) { + duk_activation *act; + duk_hcompfunc *h_func; + duk_idx_t clamp_top; + + DUK_ASSERT(thr != NULL); + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(act) != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(act))); + + /* Clamp so that values at 'clamp_top' and above are wiped and won't + * retain reachable garbage. Then extend to 'nregs' because we're + * returning to an ECMAScript function. + */ + + h_func = (duk_hcompfunc *) DUK_ACT_GET_FUNC(act); + + thr->valstack_bottom = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + act->bottom_byteoff); + DUK_ASSERT(act->retval_byteoff >= act->bottom_byteoff); + clamp_top = + (duk_idx_t) ((act->retval_byteoff - act->bottom_byteoff + sizeof(duk_tval)) / sizeof(duk_tval)); /* +1 = one retval */ + duk_set_top_and_wipe(thr, h_func->nregs, clamp_top); + + DUK_ASSERT((duk_uint8_t *) thr->valstack_end >= (duk_uint8_t *) thr->valstack + act->reserve_byteoff); + thr->valstack_end = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + act->reserve_byteoff); + + /* XXX: a best effort shrink check would be OK here */ +} + +/* Reconfigure value stack for an ECMAScript catcher. Use topmost catcher + * in 'act'. + */ +DUK_LOCAL void duk__reconfig_valstack_ecma_catcher(duk_hthread *thr, duk_activation *act) { + duk_catcher *cat; + duk_hcompfunc *h_func; + duk_size_t idx_bottom; + duk_idx_t clamp_top; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(act != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(act) != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(act))); + cat = act->cat; + DUK_ASSERT(cat != NULL); + + h_func = (duk_hcompfunc *) DUK_ACT_GET_FUNC(act); + + thr->valstack_bottom = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + act->bottom_byteoff); + idx_bottom = (duk_size_t) (thr->valstack_bottom - thr->valstack); + DUK_ASSERT(cat->idx_base >= idx_bottom); + clamp_top = (duk_idx_t) (cat->idx_base - idx_bottom + 2); /* +2 = catcher value, catcher lj_type */ + duk_set_top_and_wipe(thr, h_func->nregs, clamp_top); + + DUK_ASSERT((duk_uint8_t *) thr->valstack_end >= (duk_uint8_t *) thr->valstack + act->reserve_byteoff); + thr->valstack_end = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + act->reserve_byteoff); + + /* XXX: a best effort shrink check would be OK here */ +} + +/* Set catcher regs: idx_base+0 = value, idx_base+1 = lj_type. + * No side effects. + */ +DUK_LOCAL void duk__set_catcher_regs_norz(duk_hthread *thr, duk_catcher *cat, duk_tval *tv_val_unstable, duk_small_uint_t lj_type) { + duk_tval *tv1; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(tv_val_unstable != NULL); + + tv1 = thr->valstack + cat->idx_base; + DUK_ASSERT(tv1 < thr->valstack_top); + DUK_TVAL_SET_TVAL_UPDREF_NORZ(thr, tv1, tv_val_unstable); + + tv1++; + DUK_ASSERT(tv1 == thr->valstack + cat->idx_base + 1); + DUK_ASSERT(tv1 < thr->valstack_top); + DUK_TVAL_SET_U32_UPDREF_NORZ(thr, tv1, (duk_uint32_t) lj_type); +} + +DUK_LOCAL void duk__handle_catch_part1(duk_hthread *thr, + duk_tval *tv_val_unstable, + duk_small_uint_t lj_type, + volatile duk_bool_t *out_delayed_catch_setup) { + duk_activation *act; + duk_catcher *cat; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(tv_val_unstable != NULL); + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + DUK_DD(DUK_DDPRINT("handle catch, part 1; act=%!A, cat=%!C", act, act->cat)); + + DUK_ASSERT(act->cat != NULL); + DUK_ASSERT(DUK_CAT_GET_TYPE(act->cat) == DUK_CAT_TYPE_TCF); + + /* The part1/part2 split could also be made here at the very top + * of catch handling. Value stack would be reconfigured inside + * part2's protection. Value stack reconfiguration should be free + * of allocs, however. + */ + + duk__set_catcher_regs_norz(thr, act->cat, tv_val_unstable, lj_type); + + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr) != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(thr->callstack_curr))); + + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + duk__reconfig_valstack_ecma_catcher(thr, act); + + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + cat = act->cat; + DUK_ASSERT(cat != NULL); + + act->curr_pc = cat->pc_base + 0; /* +0 = catch */ + + /* + * If the catch block has an automatic catch variable binding, + * we need to create a lexical environment for it which requires + * allocations. Move out of "error handling state" before the + * allocations to avoid e.g. out-of-memory errors (leading to + * GH-2022 or similar). + */ + + if (DUK_CAT_HAS_CATCH_BINDING_ENABLED(cat)) { + DUK_DDD(DUK_DDDPRINT("catcher has an automatic catch binding, handle in part 2")); + *out_delayed_catch_setup = 1; + } else { + DUK_DDD(DUK_DDDPRINT("catcher has no catch binding")); + } + + DUK_CAT_CLEAR_CATCH_ENABLED(cat); +} + +DUK_LOCAL void duk__handle_catch_part2(duk_hthread *thr) { + duk_activation *act; + duk_catcher *cat; + duk_hdecenv *new_env; + + DUK_ASSERT(thr != NULL); + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + DUK_DD(DUK_DDPRINT("handle catch, part 2; act=%!A, cat=%!C", act, act->cat)); + + DUK_ASSERT(act->cat != NULL); + cat = act->cat; + DUK_ASSERT(cat != NULL); + DUK_ASSERT(DUK_CAT_GET_TYPE(cat) == DUK_CAT_TYPE_TCF); + DUK_ASSERT(DUK_CAT_HAS_CATCH_BINDING_ENABLED(cat)); + DUK_ASSERT(thr->valstack + cat->idx_base < thr->valstack_top); + + /* + * Create lexical environment for the catch clause, containing + * a binding for the caught value. + * + * The binding is mutable (= writable) but not deletable. + * Step 4 for the catch production in E5 Section 12.14; + * no value is given for CreateMutableBinding 'D' argument, + * which implies the binding is not deletable. + */ + + if (act->lex_env == NULL) { + DUK_ASSERT(act->var_env == NULL); + DUK_DDD(DUK_DDDPRINT("delayed environment initialization")); + + duk_js_init_activation_environment_records_delayed(thr, act); + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + } + DUK_ASSERT(act->lex_env != NULL); + DUK_ASSERT(act->var_env != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(act) != NULL); + + new_env = duk_hdecenv_alloc(thr, DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_DECENV)); + DUK_ASSERT(new_env != NULL); + duk_push_hobject(thr, (duk_hobject *) new_env); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) new_env) == NULL); + DUK_DDD(DUK_DDDPRINT("new_env allocated: %!iO", (duk_heaphdr *) new_env)); + + /* Note: currently the catch binding is handled without a register + * binding because we don't support dynamic register bindings (they + * must be fixed for an entire function). So, there is no need to + * record regbases etc. + */ + + /* [ ...env ] */ + + DUK_ASSERT(cat->h_varname != NULL); + duk_push_hstring(thr, cat->h_varname); + DUK_ASSERT(thr->valstack + cat->idx_base < thr->valstack_top); + duk_push_tval(thr, thr->valstack + cat->idx_base); + duk_xdef_prop(thr, -3, DUK_PROPDESC_FLAGS_W); /* writable, not configurable */ + + /* [ ... env ] */ + + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + DUK_HOBJECT_SET_PROTOTYPE(thr->heap, (duk_hobject *) new_env, act->lex_env); + act->lex_env = (duk_hobject *) new_env; + DUK_HOBJECT_INCREF(thr, (duk_hobject *) new_env); /* reachable through activation */ + /* Net refcount change to act->lex_env is 0: incref for new_env's + * prototype, decref for act->lex_env overwrite. + */ + + DUK_CAT_SET_LEXENV_ACTIVE(cat); + + duk_pop_unsafe(thr); + + DUK_DDD(DUK_DDDPRINT("new_env finished: %!iO", (duk_heaphdr *) new_env)); +} + +DUK_LOCAL void duk__handle_finally(duk_hthread *thr, duk_tval *tv_val_unstable, duk_small_uint_t lj_type) { + duk_activation *act; + duk_catcher *cat; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(tv_val_unstable != NULL); + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + DUK_ASSERT(act->cat != NULL); + DUK_ASSERT(DUK_CAT_GET_TYPE(act->cat) == DUK_CAT_TYPE_TCF); + + duk__set_catcher_regs_norz(thr, act->cat, tv_val_unstable, lj_type); + + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr) != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(thr->callstack_curr))); + + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + duk__reconfig_valstack_ecma_catcher(thr, act); + + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + cat = act->cat; + DUK_ASSERT(cat != NULL); + + act->curr_pc = cat->pc_base + 1; /* +1 = finally */ + + DUK_CAT_CLEAR_FINALLY_ENABLED(cat); +} + +DUK_LOCAL void duk__handle_label(duk_hthread *thr, duk_small_uint_t lj_type) { + duk_activation *act; + duk_catcher *cat; + + DUK_ASSERT(thr != NULL); + + DUK_ASSERT(thr->callstack_top >= 1); + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(act) != NULL); + DUK_ASSERT(DUK_HOBJECT_HAS_COMPFUNC(DUK_ACT_GET_FUNC(act))); + + /* +0 = break, +1 = continue */ + cat = act->cat; + DUK_ASSERT(cat != NULL); + DUK_ASSERT(DUK_CAT_GET_TYPE(cat) == DUK_CAT_TYPE_LABEL); + + act->curr_pc = cat->pc_base + (lj_type == DUK_LJ_TYPE_CONTINUE ? 1 : 0); + + /* valstack should not need changes */ +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + DUK_ASSERT((duk_size_t) (thr->valstack_top - thr->valstack_bottom) == + (duk_size_t) ((duk_hcompfunc *) DUK_ACT_GET_FUNC(act))->nregs); +#endif +} + +/* Called for handling both a longjmp() with type DUK_LJ_TYPE_YIELD and + * when a RETURN opcode terminates a thread and yields to the resumer. + * Caller unwinds so that top of callstack is the activation we return to. + */ +#if defined(DUK_USE_COROUTINE_SUPPORT) +DUK_LOCAL void duk__handle_yield(duk_hthread *thr, duk_hthread *resumer, duk_tval *tv_val_unstable) { + duk_activation *act_resumer; + duk_tval *tv1; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(resumer != NULL); + DUK_ASSERT(tv_val_unstable != NULL); + act_resumer = resumer->callstack_curr; + DUK_ASSERT(act_resumer != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(act_resumer) != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(act_resumer))); /* resume caller must be an ECMAScript func */ + + tv1 = (duk_tval *) (void *) ((duk_uint8_t *) resumer->valstack + + act_resumer->retval_byteoff); /* return value from Duktape.Thread.resume() */ + DUK_TVAL_SET_TVAL_UPDREF(thr, tv1, tv_val_unstable); /* side effects */ /* XXX: avoid side effects */ + + duk__reconfig_valstack_ecma_return(resumer); + + /* caller must change active thread, and set thr->resumer to NULL */ +} +#endif /* DUK_USE_COROUTINE_SUPPORT */ + +DUK_LOCAL duk_small_uint_t duk__handle_longjmp(duk_hthread *thr, + duk_activation *entry_act, + volatile duk_bool_t *out_delayed_catch_setup) { + duk_small_uint_t retval = DUK__LONGJMP_RESTART; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(entry_act != NULL); + + /* 'thr' is the current thread, as no-one resumes except us and we + * switch 'thr' in that case. + */ + DUK_ASSERT(thr == thr->heap->curr_thread); + + /* + * (Re)try handling the longjmp. + * + * A longjmp handler may convert the longjmp to a different type and + * "virtually" rethrow by goto'ing to 'check_longjmp'. Before the goto, + * the following must be updated: + * - the heap 'lj' state + * - 'thr' must reflect the "throwing" thread + */ + +check_longjmp: + + DUK_DD(DUK_DDPRINT("handling longjmp: type=%ld, value1=%!T, value2=%!T, iserror=%ld, top=%ld", + (long) thr->heap->lj.type, + (duk_tval *) &thr->heap->lj.value1, + (duk_tval *) &thr->heap->lj.value2, + (long) thr->heap->lj.iserror, + (long) duk_get_top(thr))); + + switch (thr->heap->lj.type) { +#if defined(DUK_USE_COROUTINE_SUPPORT) + case DUK_LJ_TYPE_RESUME: { + /* + * Note: lj.value1 is 'value', lj.value2 is 'resumee'. + * This differs from YIELD. + */ + + duk_tval *tv; + duk_tval *tv2; + duk_hthread *resumee; + + /* duk_bi_duk_object_yield() and duk_bi_duk_object_resume() ensure all of these are met */ + + DUK_ASSERT(thr->state == DUK_HTHREAD_STATE_RUNNING); /* unchanged by Duktape.Thread.resume() */ + DUK_ASSERT(thr->callstack_top >= 2); /* ECMAScript activation + Duktape.Thread.resume() activation */ + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT(thr->callstack_curr->parent != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr) != NULL && + DUK_HOBJECT_IS_NATFUNC(DUK_ACT_GET_FUNC(thr->callstack_curr)) && + ((duk_hnatfunc *) DUK_ACT_GET_FUNC(thr->callstack_curr))->func == duk_bi_thread_resume); + + tv = &thr->heap->lj.value2; /* resumee */ + DUK_ASSERT(DUK_TVAL_IS_OBJECT(tv)); + DUK_ASSERT(DUK_TVAL_GET_OBJECT(tv) != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_THREAD(DUK_TVAL_GET_OBJECT(tv))); + resumee = (duk_hthread *) DUK_TVAL_GET_OBJECT(tv); + + DUK_ASSERT(resumee != NULL); + DUK_ASSERT(resumee->resumer == NULL); + DUK_ASSERT(resumee->state == DUK_HTHREAD_STATE_INACTIVE || + resumee->state == DUK_HTHREAD_STATE_YIELDED); /* checked by Duktape.Thread.resume() */ + DUK_ASSERT(resumee->state != DUK_HTHREAD_STATE_YIELDED || + resumee->callstack_top >= 2); /* YIELDED: ECMAScript activation + Duktape.Thread.yield() activation */ + DUK_ASSERT(resumee->state != DUK_HTHREAD_STATE_YIELDED || + (DUK_ACT_GET_FUNC(resumee->callstack_curr) != NULL && + DUK_HOBJECT_IS_NATFUNC(DUK_ACT_GET_FUNC(resumee->callstack_curr)) && + ((duk_hnatfunc *) DUK_ACT_GET_FUNC(resumee->callstack_curr))->func == duk_bi_thread_yield)); + DUK_ASSERT(resumee->state != DUK_HTHREAD_STATE_INACTIVE || + resumee->callstack_top == 0); /* INACTIVE: no activation, single function value on valstack */ + + if (thr->heap->lj.iserror) { + /* + * Throw the error in the resumed thread's context; the + * error value is pushed onto the resumee valstack. + * + * Note: the callstack of the target may empty in this case + * too (i.e. the target thread has never been resumed). The + * value stack will contain the initial function in that case, + * which we simply ignore. + */ + + DUK_ASSERT(resumee->resumer == NULL); + resumee->resumer = thr; + DUK_HTHREAD_INCREF(thr, thr); + resumee->state = DUK_HTHREAD_STATE_RUNNING; + thr->state = DUK_HTHREAD_STATE_RESUMED; + DUK_HEAP_SWITCH_THREAD(thr->heap, resumee); + thr = resumee; + + thr->heap->lj.type = DUK_LJ_TYPE_THROW; + + /* thr->heap->lj.value1 is already the value to throw */ + /* thr->heap->lj.value2 is 'thread', will be wiped out at the end */ + + DUK_ASSERT(thr->heap->lj.iserror); /* already set */ + + DUK_DD(DUK_DDPRINT("-> resume with an error, converted to a throw in the resumee, propagate")); + goto check_longjmp; + } else if (resumee->state == DUK_HTHREAD_STATE_YIELDED) { + /* Unwind previous Duktape.Thread.yield() call. The + * activation remaining must always be an ECMAScript + * call now (yield() accepts calls from ECMAScript + * only). + */ + duk_activation *act_resumee; + + DUK_ASSERT(resumee->callstack_top >= 2); + act_resumee = resumee->callstack_curr; /* Duktape.Thread.yield() */ + DUK_ASSERT(act_resumee != NULL); + act_resumee = act_resumee->parent; /* ECMAScript call site for yield() */ + DUK_ASSERT(act_resumee != NULL); + + tv = (duk_tval *) (void *) ((duk_uint8_t *) resumee->valstack + + act_resumee->retval_byteoff); /* return value from Duktape.Thread.yield() */ + DUK_ASSERT(tv >= resumee->valstack && tv < resumee->valstack_top); + tv2 = &thr->heap->lj.value1; + DUK_TVAL_SET_TVAL_UPDREF(thr, tv, tv2); /* side effects */ /* XXX: avoid side effects */ + + duk_hthread_activation_unwind_norz(resumee); /* unwind to 'yield' caller */ + /* no need to unwind catch stack */ + + duk__reconfig_valstack_ecma_return(resumee); + + DUK_ASSERT(resumee->resumer == NULL); + resumee->resumer = thr; + DUK_HTHREAD_INCREF(thr, thr); + resumee->state = DUK_HTHREAD_STATE_RUNNING; + thr->state = DUK_HTHREAD_STATE_RESUMED; + DUK_HEAP_SWITCH_THREAD(thr->heap, resumee); +#if 0 + thr = resumee; /* not needed, as we exit right away */ +#endif + DUK_DD(DUK_DDPRINT("-> resume with a value, restart execution in resumee")); + retval = DUK__LONGJMP_RESTART; + goto wipe_and_return; + } else { + /* Initial resume call. */ + duk_small_uint_t call_flags; + duk_int_t setup_rc; + + /* resumee: [... initial_func] (currently actually: [initial_func]) */ + + duk_push_undefined(resumee); + tv = &thr->heap->lj.value1; + duk_push_tval(resumee, tv); + + /* resumee: [... initial_func undefined(= this) resume_value ] */ + + call_flags = DUK_CALL_FLAG_ALLOW_ECMATOECMA; /* not tailcall, ecma-to-ecma (assumed to succeed) */ + + setup_rc = duk_handle_call_unprotected_nargs(resumee, 1 /*nargs*/, call_flags); + if (setup_rc == 0) { + /* This shouldn't happen; Duktape.Thread.resume() + * should make sure of that. If it does happen + * this internal error will propagate out of the + * executor which can be quite misleading. + */ + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return 0;); + } + + DUK_ASSERT(resumee->resumer == NULL); + resumee->resumer = thr; + DUK_HTHREAD_INCREF(thr, thr); + resumee->state = DUK_HTHREAD_STATE_RUNNING; + thr->state = DUK_HTHREAD_STATE_RESUMED; + DUK_HEAP_SWITCH_THREAD(thr->heap, resumee); +#if 0 + thr = resumee; /* not needed, as we exit right away */ +#endif + DUK_DD(DUK_DDPRINT("-> resume with a value, restart execution in resumee")); + retval = DUK__LONGJMP_RESTART; + goto wipe_and_return; + } + DUK_UNREACHABLE(); + break; /* never here */ + } + + case DUK_LJ_TYPE_YIELD: { + /* + * Currently only allowed only if yielding thread has only + * ECMAScript activations (except for the Duktape.Thread.yield() + * call at the callstack top) and none of them constructor + * calls. + * + * This excludes the 'entry' thread which will always have + * a preventcount > 0. + */ + + duk_hthread *resumer; + + /* duk_bi_duk_object_yield() and duk_bi_duk_object_resume() ensure all of these are met */ + +#if 0 /* entry_thread not available for assert */ + DUK_ASSERT(thr != entry_thread); /* Duktape.Thread.yield() should prevent */ +#endif + DUK_ASSERT(thr->state == DUK_HTHREAD_STATE_RUNNING); /* unchanged from Duktape.Thread.yield() */ + DUK_ASSERT(thr->callstack_top >= 2); /* ECMAScript activation + Duktape.Thread.yield() activation */ + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT(thr->callstack_curr->parent != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr) != NULL && + DUK_HOBJECT_IS_NATFUNC(DUK_ACT_GET_FUNC(thr->callstack_curr)) && + ((duk_hnatfunc *) DUK_ACT_GET_FUNC(thr->callstack_curr))->func == duk_bi_thread_yield); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr->parent) != NULL && + DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(thr->callstack_curr->parent))); /* an ECMAScript function */ + + resumer = thr->resumer; + + DUK_ASSERT(resumer != NULL); + DUK_ASSERT(resumer->state == DUK_HTHREAD_STATE_RESUMED); /* written by a previous RESUME handling */ + DUK_ASSERT(resumer->callstack_top >= 2); /* ECMAScript activation + Duktape.Thread.resume() activation */ + DUK_ASSERT(resumer->callstack_curr != NULL); + DUK_ASSERT(resumer->callstack_curr->parent != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(resumer->callstack_curr) != NULL && + DUK_HOBJECT_IS_NATFUNC(DUK_ACT_GET_FUNC(resumer->callstack_curr)) && + ((duk_hnatfunc *) DUK_ACT_GET_FUNC(resumer->callstack_curr))->func == duk_bi_thread_resume); + DUK_ASSERT(DUK_ACT_GET_FUNC(resumer->callstack_curr->parent) != NULL && + DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(resumer->callstack_curr->parent))); /* an ECMAScript function */ + + if (thr->heap->lj.iserror) { + thr->state = DUK_HTHREAD_STATE_YIELDED; + thr->resumer = NULL; + DUK_HTHREAD_DECREF_NORZ(thr, resumer); + resumer->state = DUK_HTHREAD_STATE_RUNNING; + DUK_HEAP_SWITCH_THREAD(thr->heap, resumer); + thr = resumer; + + thr->heap->lj.type = DUK_LJ_TYPE_THROW; + /* lj.value1 is already set */ + DUK_ASSERT(thr->heap->lj.iserror); /* already set */ + + DUK_DD(DUK_DDPRINT("-> yield an error, converted to a throw in the resumer, propagate")); + goto check_longjmp; + } else { + /* When handling the yield, the last reference to + * 'thr' may disappear. + */ + + DUK_GC_TORTURE(resumer->heap); + duk_hthread_activation_unwind_norz(resumer); + DUK_GC_TORTURE(resumer->heap); + thr->state = DUK_HTHREAD_STATE_YIELDED; + thr->resumer = NULL; + DUK_HTHREAD_DECREF_NORZ(thr, resumer); + resumer->state = DUK_HTHREAD_STATE_RUNNING; + DUK_HEAP_SWITCH_THREAD(thr->heap, resumer); + duk__handle_yield(thr, resumer, &thr->heap->lj.value1); + thr = resumer; + DUK_GC_TORTURE(resumer->heap); + + DUK_DD(DUK_DDPRINT("-> yield a value, restart execution in resumer")); + retval = DUK__LONGJMP_RESTART; + goto wipe_and_return; + } + DUK_UNREACHABLE(); + break; /* never here */ + } +#endif /* DUK_USE_COROUTINE_SUPPORT */ + + case DUK_LJ_TYPE_THROW: { + /* + * Three possible outcomes: + * * A try or finally catcher is found => resume there. + * (or) + * * The error propagates to the bytecode executor entry + * level (and we're in the entry thread) => rethrow + * with a new longjmp(), after restoring the previous + * catchpoint. + * * The error is not caught in the current thread, so + * the thread finishes with an error. This works like + * a yielded error, except that the thread is finished + * and can no longer be resumed. (There is always a + * resumer in this case.) + * + * Note: until we hit the entry level, there can only be + * ECMAScript activations. + */ + + duk_activation *act; + duk_catcher *cat; + duk_hthread *resumer; + + for (;;) { + act = thr->callstack_curr; + if (act == NULL) { + break; + } + + for (;;) { + cat = act->cat; + if (cat == NULL) { + break; + } + + if (DUK_CAT_HAS_CATCH_ENABLED(cat)) { + DUK_ASSERT(DUK_CAT_GET_TYPE(cat) == DUK_CAT_TYPE_TCF); + + DUK_DDD(DUK_DDDPRINT("before catch part 1: thr=%p, act=%p, cat=%p", + (void *) thr, + (void *) act, + (void *) act->cat)); + duk__handle_catch_part1(thr, + &thr->heap->lj.value1, + DUK_LJ_TYPE_THROW, + out_delayed_catch_setup); + + DUK_DD(DUK_DDPRINT("-> throw caught by a 'catch' clause, restart execution")); + retval = DUK__LONGJMP_RESTART; + goto wipe_and_return; + } + + if (DUK_CAT_HAS_FINALLY_ENABLED(cat)) { + DUK_ASSERT(DUK_CAT_GET_TYPE(cat) == DUK_CAT_TYPE_TCF); + DUK_ASSERT(!DUK_CAT_HAS_CATCH_ENABLED(cat)); + + duk__handle_finally(thr, &thr->heap->lj.value1, DUK_LJ_TYPE_THROW); + + DUK_DD(DUK_DDPRINT("-> throw caught by a 'finally' clause, restart execution")); + retval = DUK__LONGJMP_RESTART; + goto wipe_and_return; + } + + duk_hthread_catcher_unwind_norz(thr, act); + } + + if (act == entry_act) { + /* Not caught by anything before entry level; rethrow and let the + * final catcher finish unwinding (esp. value stack). + */ + DUK_D(DUK_DPRINT("-> throw propagated up to entry level, rethrow and exit bytecode executor")); + retval = DUK__LONGJMP_RETHROW; + goto just_return; + } + + duk_hthread_activation_unwind_norz(thr); + } + + DUK_DD(DUK_DDPRINT("-> throw not caught by current thread, yield error to resumer and recheck longjmp")); + + /* Not caught by current thread, thread terminates (yield error to resumer); + * note that this may cause a cascade if the resumer terminates with an uncaught + * exception etc (this is OK, but needs careful testing). + */ + + DUK_ASSERT(thr->resumer != NULL); + DUK_ASSERT(thr->resumer->callstack_top >= 2); /* ECMAScript activation + Duktape.Thread.resume() activation */ + DUK_ASSERT(thr->resumer->callstack_curr != NULL); + DUK_ASSERT(thr->resumer->callstack_curr->parent != NULL); + DUK_ASSERT( + DUK_ACT_GET_FUNC(thr->resumer->callstack_curr->parent) != NULL && + DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(thr->resumer->callstack_curr->parent))); /* an ECMAScript function */ + + resumer = thr->resumer; + + /* reset longjmp */ + + DUK_ASSERT(thr->heap->lj.type == DUK_LJ_TYPE_THROW); /* already set */ + /* lj.value1 already set */ + + duk_hthread_terminate(thr); /* updates thread state, minimizes its allocations */ + DUK_ASSERT(thr->state == DUK_HTHREAD_STATE_TERMINATED); + + thr->resumer = NULL; + DUK_HTHREAD_DECREF_NORZ(thr, resumer); + resumer->state = DUK_HTHREAD_STATE_RUNNING; + DUK_HEAP_SWITCH_THREAD(thr->heap, resumer); + thr = resumer; + goto check_longjmp; + } + + case DUK_LJ_TYPE_BREAK: /* pseudotypes, not used in actual longjmps */ + case DUK_LJ_TYPE_CONTINUE: + case DUK_LJ_TYPE_RETURN: + case DUK_LJ_TYPE_NORMAL: + default: { + /* should never happen, but be robust */ + DUK_D(DUK_DPRINT("caught unknown longjmp type %ld, treat as internal error", (long) thr->heap->lj.type)); + goto convert_to_internal_error; + } + + } /* end switch */ + + DUK_UNREACHABLE(); + +wipe_and_return: + DUK_DD(DUK_DDPRINT("handling longjmp done, wipe-and-return, top=%ld", (long) duk_get_top(thr))); + thr->heap->lj.type = DUK_LJ_TYPE_UNKNOWN; + thr->heap->lj.iserror = 0; + + DUK_TVAL_SET_UNDEFINED_UPDREF(thr, &thr->heap->lj.value1); /* side effects */ + DUK_TVAL_SET_UNDEFINED_UPDREF(thr, &thr->heap->lj.value2); /* side effects */ + + DUK_GC_TORTURE(thr->heap); + +just_return: + return retval; + +convert_to_internal_error: + /* This could also be thrown internally (set the error, goto check_longjmp), + * but it's better for internal errors to bubble outwards so that we won't + * infinite loop in this catchpoint. + */ + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return 0;); +} + +/* Handle a BREAK/CONTINUE opcode. Avoid using longjmp() for BREAK/CONTINUE + * handling because it has a measurable performance impact in ordinary + * environments and an extreme impact in Emscripten (GH-342). + */ +DUK_LOCAL DUK_EXEC_NOINLINE_PERF void duk__handle_break_or_continue(duk_hthread *thr, + duk_uint_t label_id, + duk_small_uint_t lj_type) { + duk_activation *act; + duk_catcher *cat; + + DUK_ASSERT(thr != NULL); + + /* Find a matching label catcher or 'finally' catcher in + * the same function, unwinding catchers as we go. + * + * A label catcher must always exist and will match unless + * a 'finally' captures the break/continue first. It is the + * compiler's responsibility to ensure that labels are used + * correctly. + */ + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + + for (;;) { + cat = act->cat; + if (cat == NULL) { + break; + } + + DUK_DDD(DUK_DDDPRINT("considering catcher %p: type=%ld label=%ld", + (void *) cat, + (long) DUK_CAT_GET_TYPE(cat), + (long) DUK_CAT_GET_LABEL(cat))); + + /* XXX: bit mask test; FINALLY <-> TCF, single bit mask would suffice? */ + + if (DUK_CAT_GET_TYPE(cat) == DUK_CAT_TYPE_TCF && DUK_CAT_HAS_FINALLY_ENABLED(cat)) { + duk_tval tv_tmp; + + DUK_TVAL_SET_U32(&tv_tmp, (duk_uint32_t) label_id); + duk__handle_finally(thr, &tv_tmp, lj_type); + + DUK_DD(DUK_DDPRINT("-> break/continue caught by 'finally', restart execution")); + return; + } + if (DUK_CAT_GET_TYPE(cat) == DUK_CAT_TYPE_LABEL && (duk_uint_t) DUK_CAT_GET_LABEL(cat) == label_id) { + duk__handle_label(thr, lj_type); + + DUK_DD( + DUK_DDPRINT("-> break/continue caught by a label catcher (in the same function), restart execution")); + return; + } + + duk_hthread_catcher_unwind_norz(thr, act); + } + + /* Should never happen, but be robust. */ + DUK_D(DUK_DPRINT( + "-> break/continue not caught by anything in the current function (should never happen), throw internal error")); + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return;); +} + +/* Handle a RETURN opcode. Avoid using longjmp() for return handling because + * it has a measurable performance impact in ordinary environments and an extreme + * impact in Emscripten (GH-342). Return value is on value stack top. + */ +DUK_LOCAL duk_small_uint_t duk__handle_return(duk_hthread *thr, duk_activation *entry_act) { + duk_tval *tv1; + duk_tval *tv2; +#if defined(DUK_USE_COROUTINE_SUPPORT) + duk_hthread *resumer; +#endif + duk_activation *act; + duk_catcher *cat; + + /* We can directly access value stack here. */ + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(entry_act != NULL); + DUK_ASSERT(thr->valstack_top - 1 >= thr->valstack_bottom); + tv1 = thr->valstack_top - 1; + DUK_TVAL_CHKFAST_INPLACE_FAST(tv1); /* fastint downgrade check for return values */ + + /* + * Four possible outcomes: + * + * 1. A 'finally' in the same function catches the 'return'. + * It may continue to propagate when 'finally' is finished, + * or it may be neutralized by 'finally' (both handled by + * ENDFIN). + * + * 2. The return happens at the entry level of the bytecode + * executor, so return from the executor (in C stack). + * + * 3. There is a calling (ECMAScript) activation in the call + * stack => return to it, in the same executor instance. + * + * 4. There is no calling activation, and the thread is + * terminated. There is always a resumer in this case, + * which gets the return value similarly to a 'yield' + * (except that the current thread can no longer be + * resumed). + */ + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->callstack_top >= 1); + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + + for (;;) { + cat = act->cat; + if (cat == NULL) { + break; + } + + if (DUK_CAT_GET_TYPE(cat) == DUK_CAT_TYPE_TCF && DUK_CAT_HAS_FINALLY_ENABLED(cat)) { + DUK_ASSERT(thr->valstack_top - 1 >= thr->valstack_bottom); + duk__handle_finally(thr, thr->valstack_top - 1, DUK_LJ_TYPE_RETURN); + + DUK_DD(DUK_DDPRINT("-> return caught by 'finally', restart execution")); + return DUK__RETHAND_RESTART; + } + + duk_hthread_catcher_unwind_norz(thr, act); + } + + if (act == entry_act) { + /* Return to the bytecode executor caller who will unwind stacks + * and handle constructor post-processing. + * Return value is already on the stack top: [ ... retval ]. + */ + + DUK_DDD(DUK_DDDPRINT("-> return propagated up to entry level, exit bytecode executor")); + return DUK__RETHAND_FINISHED; + } + + if (thr->callstack_top >= 2) { + /* There is a caller; it MUST be an ECMAScript caller (otherwise it would + * match entry_act check). + */ + DUK_DDD(DUK_DDDPRINT("return to ECMAScript caller, retval_byteoff=%ld, lj_value1=%!T", + (long) (thr->callstack_curr->parent->retval_byteoff), + (duk_tval *) &thr->heap->lj.value1)); + + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT(thr->callstack_curr->parent != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(thr->callstack_curr->parent))); /* must be ECMAScript */ + +#if defined(DUK_USE_ES6_PROXY) + if (thr->callstack_curr->flags & (DUK_ACT_FLAG_CONSTRUCT | DUK_ACT_FLAG_CONSTRUCT_PROXY)) { + duk_call_construct_postprocess(thr, + thr->callstack_curr->flags & + DUK_ACT_FLAG_CONSTRUCT_PROXY); /* side effects */ + } +#else + if (thr->callstack_curr->flags & DUK_ACT_FLAG_CONSTRUCT) { + duk_call_construct_postprocess(thr, 0); /* side effects */ + } +#endif + + tv1 = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + thr->callstack_curr->parent->retval_byteoff); + DUK_ASSERT(thr->valstack_top - 1 >= thr->valstack_bottom); + tv2 = thr->valstack_top - 1; + DUK_TVAL_SET_TVAL_UPDREF(thr, tv1, tv2); /* side effects */ + + /* Catch stack unwind happens inline in callstack unwind. */ + duk_hthread_activation_unwind_norz(thr); + + duk__reconfig_valstack_ecma_return(thr); + + DUK_DD(DUK_DDPRINT("-> return not intercepted, restart execution in caller")); + return DUK__RETHAND_RESTART; + } + +#if defined(DUK_USE_COROUTINE_SUPPORT) + DUK_DD(DUK_DDPRINT("no calling activation, thread finishes (similar to yield)")); + + DUK_ASSERT(thr->resumer != NULL); + DUK_ASSERT(thr->resumer->callstack_top >= 2); /* ECMAScript activation + Duktape.Thread.resume() activation */ + DUK_ASSERT(thr->resumer->callstack_curr != NULL); + DUK_ASSERT(thr->resumer->callstack_curr->parent != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->resumer->callstack_curr) != NULL && + DUK_HOBJECT_IS_NATFUNC(DUK_ACT_GET_FUNC(thr->resumer->callstack_curr)) && + ((duk_hnatfunc *) DUK_ACT_GET_FUNC(thr->resumer->callstack_curr))->func == + duk_bi_thread_resume); /* Duktape.Thread.resume() */ + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->resumer->callstack_curr->parent) != NULL && + DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(thr->resumer->callstack_curr->parent))); /* an ECMAScript function */ + DUK_ASSERT(thr->state == DUK_HTHREAD_STATE_RUNNING); + DUK_ASSERT(thr->resumer->state == DUK_HTHREAD_STATE_RESUMED); + + resumer = thr->resumer; + + /* Share yield longjmp handler. + * + * This sequence of steps is a bit fragile (see GH-1845): + * - We need the return value from 'thr' (resumed thread) value stack. + * The termination unwinds its value stack, losing the value. + * - We need a refcounted reference for 'thr', which may only exist + * in the caller value stack. We can't unwind or reconfigure the + * caller's value stack without potentially freeing 'thr'. + * + * Current approach is to capture the 'thr' return value and store + * a reference to 'thr' in the caller value stack temporarily. This + * keeps 'thr' reachable until final yield/return handling which + * removes the references atomatically. + */ + + DUK_ASSERT(thr->valstack_top - 1 >= thr->valstack_bottom); + duk_hthread_activation_unwind_norz(resumer); /* May remove last reference to 'thr', but is NORZ. */ + duk_push_tval(resumer, thr->valstack_top - 1); /* Capture return value, side effect free. */ + duk_push_hthread(resumer, thr); /* Make 'thr' reachable again, before side effects. */ + + duk_hthread_terminate(thr); /* Updates thread state, minimizes its allocations. */ + thr->resumer = NULL; + DUK_HTHREAD_DECREF(thr, resumer); + DUK_ASSERT(thr->state == DUK_HTHREAD_STATE_TERMINATED); + + resumer->state = DUK_HTHREAD_STATE_RUNNING; + DUK_HEAP_SWITCH_THREAD(thr->heap, resumer); + + DUK_ASSERT(resumer->valstack_top - 2 >= resumer->valstack_bottom); + duk__handle_yield(thr, resumer, resumer->valstack_top - 2); + thr = NULL; /* 'thr' invalidated by call */ + +#if 0 + thr = resumer; /* not needed */ +#endif + + DUK_DD(DUK_DDPRINT("-> return not caught, thread terminated; handle like yield, restart execution in resumer")); + return DUK__RETHAND_RESTART; +#else + /* Without coroutine support this case should never happen. */ + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return 0;); +#endif +} + +/* + * Executor interrupt handling + * + * The handler is called whenever the interrupt countdown reaches zero + * (or below). The handler must perform whatever checks are activated, + * e.g. check for cumulative step count to impose an execution step + * limit or check for breakpoints or other debugger interaction. + * + * When the actions are done, the handler must reinit the interrupt + * init and counter values. The 'init' value must indicate how many + * bytecode instructions are executed before the next interrupt. The + * counter must interface with the bytecode executor loop. Concretely, + * the new init value is normally one higher than the new counter value. + * For instance, to execute exactly one bytecode instruction the init + * value is set to 1 and the counter to 0. If an error is thrown by the + * interrupt handler, the counters are set to the same value (e.g. both + * to 0 to cause an interrupt when the next bytecode instruction is about + * to be executed after error handling). + * + * Maintaining the init/counter value properly is important for accurate + * behavior. For instance, executor step limit needs a cumulative step + * count which is simply computed as a sum of 'init' values. This must + * work accurately even when single stepping. + */ + +#if defined(DUK_USE_INTERRUPT_COUNTER) + +#define DUK__INT_NOACTION 0 /* no specific action, resume normal execution */ +#define DUK__INT_RESTART 1 /* must "goto restart_execution", e.g. breakpoints changed */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) +DUK_LOCAL void duk__interrupt_handle_debugger(duk_hthread *thr, duk_bool_t *out_immediate, duk_small_uint_t *out_interrupt_retval) { + duk_activation *act; + duk_breakpoint *bp; + duk_breakpoint **bp_active; + duk_uint_fast32_t line = 0; + duk_bool_t process_messages; + duk_bool_t processed_messages = 0; + + DUK_ASSERT(thr->heap->dbg_processing == 0); /* don't re-enter e.g. during Eval */ + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + + /* It might seem that replacing 'thr->heap' with just 'heap' below + * might be a good idea, but it increases code size slightly + * (probably due to unnecessary spilling) at least on x64. + */ + + /* + * Single opcode step check + */ + + if (thr->heap->dbg_pause_flags & DUK_PAUSE_FLAG_ONE_OPCODE_ACTIVE) { + DUK_D(DUK_DPRINT("PAUSE TRIGGERED by one opcode step")); + duk_debug_set_paused(thr->heap); + } + + /* + * Breakpoint and step state checks + */ + + if (act->flags & DUK_ACT_FLAG_BREAKPOINT_ACTIVE || (thr->heap->dbg_pause_act == thr->callstack_curr)) { + line = duk_debug_curr_line(thr); + + if (act->prev_line != line) { + /* Stepped? Step out is handled by callstack unwind. */ + if ((thr->heap->dbg_pause_flags & DUK_PAUSE_FLAG_LINE_CHANGE) && + (thr->heap->dbg_pause_act == thr->callstack_curr) && (line != thr->heap->dbg_pause_startline)) { + DUK_D(DUK_DPRINT("PAUSE TRIGGERED by line change, at line %ld", (long) line)); + duk_debug_set_paused(thr->heap); + } + + /* Check for breakpoints only on line transition. + * Breakpoint is triggered when we enter the target + * line from a different line, and the previous line + * was within the same function. + * + * This condition is tricky: the condition used to be + * that transition to -or across- the breakpoint line + * triggered the breakpoint. This seems intuitively + * better because it handles breakpoints on lines with + * no emitted opcodes; but this leads to the issue + * described in: https://github.com/svaarala/duktape/issues/263. + */ + bp_active = thr->heap->dbg_breakpoints_active; + for (;;) { + bp = *bp_active++; + if (bp == NULL) { + break; + } + + DUK_ASSERT(bp->filename != NULL); + if (act->prev_line != bp->line && line == bp->line) { + DUK_D(DUK_DPRINT("PAUSE TRIGGERED by breakpoint at %!O:%ld", + (duk_heaphdr *) bp->filename, + (long) bp->line)); + duk_debug_set_paused(thr->heap); + } + } + } else { + ; + } + + act->prev_line = (duk_uint32_t) line; + } + + /* + * Rate limit check for sending status update or peeking into + * the debug transport. Both can be expensive operations that + * we don't want to do on every opcode. + * + * Making sure the interval remains reasonable on a wide variety + * of targets and bytecode is difficult without a timestamp, so + * we use a Date-provided timestamp for the rate limit check. + * But since it's also expensive to get a timestamp, a bytecode + * counter is used to rate limit getting timestamps. + */ + + process_messages = 0; + if (thr->heap->dbg_state_dirty || DUK_HEAP_HAS_DEBUGGER_PAUSED(thr->heap) || thr->heap->dbg_detaching) { + /* Enter message processing loop for sending Status notifys and + * to finish a pending detach. + */ + process_messages = 1; + } + + /* XXX: remove heap->dbg_exec_counter, use heap->inst_count_interrupt instead? */ + DUK_ASSERT(thr->interrupt_init >= 0); + thr->heap->dbg_exec_counter += (duk_uint_t) thr->interrupt_init; + if (thr->heap->dbg_exec_counter - thr->heap->dbg_last_counter >= DUK_HEAP_DBG_RATELIMIT_OPCODES) { + /* Overflow of the execution counter is fine and doesn't break + * anything here. + */ + + duk_double_t now, diff_last; + + thr->heap->dbg_last_counter = thr->heap->dbg_exec_counter; + now = duk_time_get_monotonic_time(thr); + + diff_last = now - thr->heap->dbg_last_time; + if (diff_last < 0.0 || diff_last >= (duk_double_t) DUK_HEAP_DBG_RATELIMIT_MILLISECS) { + /* Monotonic time should not experience time jumps, + * but the provider may be missing and we're actually + * using ECMAScript time. So, tolerate negative values + * so that a time jump works reasonably. + * + * Same interval is now used for status sending and + * peeking. + */ + + thr->heap->dbg_last_time = now; + thr->heap->dbg_state_dirty = 1; + process_messages = 1; + } + } + + /* + * Process messages and send status if necessary. + * + * If we're paused, we'll block for new messages. If we're not + * paused, we'll process anything we can peek but won't block + * for more. Detach (and re-attach) handling is all localized + * to duk_debug_process_messages() too. + * + * Debugger writes outside the message loop may cause debugger + * detach1 phase to run, after which dbg_read_cb == NULL and + * dbg_detaching != 0. The message loop will finish the detach + * by running detach2 phase, so enter the message loop also when + * detaching. + */ + + if (process_messages) { + DUK_ASSERT(thr->heap->dbg_processing == 0); + processed_messages = duk_debug_process_messages(thr, 0 /*no_block*/); + DUK_ASSERT(thr->heap->dbg_processing == 0); + } + + /* Continue checked execution if there are breakpoints or we're stepping. + * Also use checked execution if paused flag is active - it shouldn't be + * because the debug message loop shouldn't terminate if it was. Step out + * is handled by callstack unwind and doesn't need checked execution. + * Note that debugger may have detached due to error or explicit request + * above, so we must recheck attach status. + */ + + if (duk_debug_is_attached(thr->heap)) { + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + if (act->flags & DUK_ACT_FLAG_BREAKPOINT_ACTIVE || (thr->heap->dbg_pause_flags & DUK_PAUSE_FLAG_ONE_OPCODE) || + ((thr->heap->dbg_pause_flags & DUK_PAUSE_FLAG_LINE_CHANGE) && + thr->heap->dbg_pause_act == thr->callstack_curr) || + DUK_HEAP_HAS_DEBUGGER_PAUSED(thr->heap)) { + *out_immediate = 1; + } + + /* If we processed any debug messages breakpoints may have + * changed; restart execution to re-check active breakpoints. + */ + if (processed_messages) { + DUK_D(DUK_DPRINT("processed debug messages, restart execution to recheck possibly changed breakpoints")); + *out_interrupt_retval = DUK__INT_RESTART; + } else { + if (thr->heap->dbg_pause_flags & DUK_PAUSE_FLAG_ONE_OPCODE) { + /* Set 'pause after one opcode' active only when we're + * actually just about to execute code. + */ + thr->heap->dbg_pause_flags |= DUK_PAUSE_FLAG_ONE_OPCODE_ACTIVE; + } + } + } else { + DUK_D(DUK_DPRINT("debugger became detached, resume normal execution")); + } +} +#endif /* DUK_USE_DEBUGGER_SUPPORT */ + +DUK_LOCAL DUK_EXEC_NOINLINE_PERF DUK_COLD duk_small_uint_t duk__executor_interrupt(duk_hthread *thr) { + duk_int_t ctr; + duk_activation *act; + duk_hcompfunc *fun; + duk_bool_t immediate = 0; + duk_small_uint_t retval; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->heap != NULL); + DUK_ASSERT(thr->callstack_top > 0); + +#if defined(DUK_USE_DEBUG) + thr->heap->inst_count_interrupt += thr->interrupt_init; + DUK_DD(DUK_DDPRINT("execution interrupt, counter=%ld, init=%ld, " + "instruction counts: executor=%ld, interrupt=%ld", + (long) thr->interrupt_counter, + (long) thr->interrupt_init, + (long) thr->heap->inst_count_exec, + (long) thr->heap->inst_count_interrupt)); +#endif + + retval = DUK__INT_NOACTION; + ctr = DUK_HTHREAD_INTCTR_DEFAULT; + + /* + * Avoid nested calls. Concretely this happens during debugging, e.g. + * when we eval() an expression. + * + * Also don't interrupt if we're currently doing debug processing + * (which can be initiated outside the bytecode executor) as this + * may cause the debugger to be called recursively. Check required + * for correct operation of throw intercept and other "exotic" halting + * scenarios. + */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + if (DUK_HEAP_HAS_INTERRUPT_RUNNING(thr->heap) || thr->heap->dbg_processing) { +#else + if (DUK_HEAP_HAS_INTERRUPT_RUNNING(thr->heap)) { +#endif + DUK_DD(DUK_DDPRINT("nested executor interrupt, ignoring")); + + /* Set a high interrupt counter; the original executor + * interrupt invocation will rewrite before exiting. + */ + thr->interrupt_init = ctr; + thr->interrupt_counter = ctr - 1; + return DUK__INT_NOACTION; + } + DUK_HEAP_SET_INTERRUPT_RUNNING(thr->heap); + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + + fun = (duk_hcompfunc *) DUK_ACT_GET_FUNC(act); + DUK_ASSERT(DUK_HOBJECT_HAS_COMPFUNC((duk_hobject *) fun)); + + DUK_UNREF(fun); + +#if defined(DUK_USE_EXEC_TIMEOUT_CHECK) + /* + * Execution timeout check + */ + + if (DUK_USE_EXEC_TIMEOUT_CHECK(thr->heap->heap_udata)) { + /* Keep throwing an error whenever we get here. The unusual values + * are set this way because no instruction is ever executed, we just + * throw an error until all try/catch/finally and other catchpoints + * have been exhausted. Duktape/C code gets control at each protected + * call but whenever it enters back into Duktape the RangeError gets + * raised. User exec timeout check must consistently indicate a timeout + * until we've fully bubbled out of Duktape. + */ + DUK_D(DUK_DPRINT("execution timeout, throwing a RangeError")); + thr->interrupt_init = 0; + thr->interrupt_counter = 0; + DUK_HEAP_CLEAR_INTERRUPT_RUNNING(thr->heap); + DUK_ERROR_RANGE(thr, "execution timeout"); + DUK_WO_NORETURN(return 0;); + } +#endif /* DUK_USE_EXEC_TIMEOUT_CHECK */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + if (!thr->heap->dbg_processing && (thr->heap->dbg_read_cb != NULL || thr->heap->dbg_detaching)) { + /* Avoid recursive re-entry; enter when we're attached or + * detaching (to finish off the pending detach). + */ + duk__interrupt_handle_debugger(thr, &immediate, &retval); + DUK_ASSERT(act == thr->callstack_curr); + } +#endif /* DUK_USE_DEBUGGER_SUPPORT */ + + /* + * Update the interrupt counter + */ + + if (immediate) { + /* Cause an interrupt after executing one instruction. */ + ctr = 1; + } + + /* The counter value is one less than the init value: init value should + * indicate how many instructions are executed before interrupt. To + * execute 1 instruction (after interrupt handler return), counter must + * be 0. + */ + DUK_ASSERT(ctr >= 1); + thr->interrupt_init = ctr; + thr->interrupt_counter = ctr - 1; + DUK_HEAP_CLEAR_INTERRUPT_RUNNING(thr->heap); + + return retval; +} +#endif /* DUK_USE_INTERRUPT_COUNTER */ + +/* + * Debugger handling for executor restart + * + * Check for breakpoints, stepping, etc, and figure out if we should execute + * in checked or normal mode. Note that we can't do this when an activation + * is created, because breakpoint status (and stepping status) may change + * later, so we must recheck every time we're executing an activation. + * This primitive should be side effect free to avoid changes during check. + */ + +#if defined(DUK_USE_DEBUGGER_SUPPORT) +DUK_LOCAL void duk__executor_recheck_debugger(duk_hthread *thr, duk_activation *act, duk_hcompfunc *fun) { + duk_heap *heap; + duk_tval *tv_tmp; + duk_hstring *filename; + duk_small_uint_t bp_idx; + duk_breakpoint **bp_active; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(act != NULL); + DUK_ASSERT(fun != NULL); + + heap = thr->heap; + bp_active = heap->dbg_breakpoints_active; + act->flags &= ~DUK_ACT_FLAG_BREAKPOINT_ACTIVE; + + tv_tmp = duk_hobject_find_entry_tval_ptr_stridx(thr->heap, (duk_hobject *) fun, DUK_STRIDX_FILE_NAME); + if (tv_tmp && DUK_TVAL_IS_STRING(tv_tmp)) { + filename = DUK_TVAL_GET_STRING(tv_tmp); + + /* Figure out all active breakpoints. A breakpoint is + * considered active if the current function's fileName + * matches the breakpoint's fileName, AND there is no + * inner function that has matching line numbers + * (otherwise a breakpoint would be triggered both + * inside and outside of the inner function which would + * be confusing). Example: + * + * function foo() { + * print('foo'); + * function bar() { <-. breakpoints in these + * print('bar'); | lines should not affect + * } <-' foo() execution + * bar(); + * } + * + * We need a few things that are only available when + * debugger support is enabled: (1) a line range for + * each function, and (2) access to the function + * template to access the inner functions (and their + * line ranges). + * + * It's important to have a narrow match for active + * breakpoints so that we don't enter checked execution + * when that's not necessary. For instance, if we're + * running inside a certain function and there's + * breakpoint outside in (after the call site), we + * don't want to slow down execution of the function. + */ + + for (bp_idx = 0; bp_idx < heap->dbg_breakpoint_count; bp_idx++) { + duk_breakpoint *bp = heap->dbg_breakpoints + bp_idx; + duk_hobject **funcs, **funcs_end; + duk_hcompfunc *inner_fun; + duk_bool_t bp_match; + + if (bp->filename == filename && bp->line >= fun->start_line && bp->line <= fun->end_line) { + bp_match = 1; + DUK_DD(DUK_DDPRINT("breakpoint filename and line match: " + "%s:%ld vs. %s (line %ld vs. %ld-%ld)", + DUK_HSTRING_GET_DATA(bp->filename), + (long) bp->line, + DUK_HSTRING_GET_DATA(filename), + (long) bp->line, + (long) fun->start_line, + (long) fun->end_line)); + + funcs = DUK_HCOMPFUNC_GET_FUNCS_BASE(thr->heap, fun); + funcs_end = DUK_HCOMPFUNC_GET_FUNCS_END(thr->heap, fun); + while (funcs != funcs_end) { + inner_fun = (duk_hcompfunc *) *funcs; + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC((duk_hobject *) inner_fun)); + if (bp->line >= inner_fun->start_line && bp->line <= inner_fun->end_line) { + DUK_DD(DUK_DDPRINT("inner function masks ('captures') breakpoint")); + bp_match = 0; + break; + } + funcs++; + } + + if (bp_match) { + /* No need to check for size of bp_active list, + * it's always larger than maximum number of + * breakpoints. + */ + act->flags |= DUK_ACT_FLAG_BREAKPOINT_ACTIVE; + *bp_active = heap->dbg_breakpoints + bp_idx; + bp_active++; + } + } + } + } + + *bp_active = NULL; /* terminate */ + + DUK_DD(DUK_DDPRINT("ACTIVE BREAKPOINTS: %ld", (long) (bp_active - thr->heap->dbg_breakpoints_active))); + + /* Force pause if we were doing "step into" in another activation. */ + if ((thr->heap->dbg_pause_flags & DUK_PAUSE_FLAG_FUNC_ENTRY) && thr->heap->dbg_pause_act != thr->callstack_curr) { + DUK_D(DUK_DPRINT("PAUSE TRIGGERED by function entry")); + duk_debug_set_paused(thr->heap); + } + + /* Force interrupt right away if we're paused or in "checked mode". + * Step out is handled by callstack unwind. + */ + if ((act->flags & DUK_ACT_FLAG_BREAKPOINT_ACTIVE) || DUK_HEAP_HAS_DEBUGGER_PAUSED(thr->heap) || + ((thr->heap->dbg_pause_flags & DUK_PAUSE_FLAG_LINE_CHANGE) && thr->heap->dbg_pause_act == thr->callstack_curr)) { + /* We'll need to interrupt early so recompute the init + * counter to reflect the number of bytecode instructions + * executed so that step counts for e.g. debugger rate + * limiting are accurate. + */ + DUK_ASSERT(thr->interrupt_counter <= thr->interrupt_init); + thr->interrupt_init = thr->interrupt_init - thr->interrupt_counter; + thr->interrupt_counter = 0; + } +} +#endif /* DUK_USE_DEBUGGER_SUPPORT */ + +/* + * Opcode handlers for opcodes with a lot of code and which are relatively + * rare; NOINLINE to reduce amount of code in main bytecode dispatcher. + */ + +DUK_LOCAL DUK_EXEC_NOINLINE_PERF void duk__handle_op_initset_initget(duk_hthread *thr, duk_uint_fast32_t ins) { + duk_bool_t is_set = (DUK_DEC_OP(ins) == DUK_OP_INITSET); + duk_uint_fast_t idx; + duk_uint_t defprop_flags; + + /* A -> object register (acts as a source) + * BC -> BC+0 contains key, BC+1 closure (value) + */ + + /* INITSET/INITGET are only used to initialize object literal keys. + * There may be a previous propery in ES2015 because duplicate property + * names are allowed. + */ + + /* This could be made more optimal by accessing internals directly. */ + + idx = (duk_uint_fast_t) DUK_DEC_BC(ins); + duk_dup(thr, (duk_idx_t) (idx + 0)); /* key */ + duk_dup(thr, (duk_idx_t) (idx + 1)); /* getter/setter */ + if (is_set) { + defprop_flags = + DUK_DEFPROP_HAVE_SETTER | DUK_DEFPROP_FORCE | DUK_DEFPROP_SET_ENUMERABLE | DUK_DEFPROP_SET_CONFIGURABLE; + } else { + defprop_flags = + DUK_DEFPROP_HAVE_GETTER | DUK_DEFPROP_FORCE | DUK_DEFPROP_SET_ENUMERABLE | DUK_DEFPROP_SET_CONFIGURABLE; + } + duk_def_prop(thr, (duk_idx_t) DUK_DEC_A(ins), defprop_flags); +} + +DUK_LOCAL DUK_EXEC_NOINLINE_PERF void duk__handle_op_trycatch(duk_hthread *thr, duk_uint_fast32_t ins, duk_instr_t *curr_pc) { + duk_activation *act; + duk_catcher *cat; + duk_tval *tv1; + duk_small_uint_fast_t a; + duk_small_uint_fast_t bc; + + /* A -> flags + * BC -> reg_catch; base register for two registers used both during + * trycatch setup and when catch is triggered + * + * If DUK_BC_TRYCATCH_FLAG_CATCH_BINDING set: + * reg_catch + 0: catch binding variable name (string). + * Automatic declarative environment is established for + * the duration of the 'catch' clause. + * + * If DUK_BC_TRYCATCH_FLAG_WITH_BINDING set: + * reg_catch + 0: with 'target value', which is coerced to + * an object and then used as a bindind object for an + * environment record. The binding is initialized here, for + * the 'try' clause. + * + * Note that a TRYCATCH generated for a 'with' statement has no + * catch or finally parts. + */ + + /* XXX: TRYCATCH handling should be reworked to avoid creating + * an explicit scope unless it is actually needed (e.g. function + * instances or eval is executed inside the catch block). This + * rework is not trivial because the compiler doesn't have an + * intermediate representation. When the rework is done, the + * opcode format can also be made more straightforward. + */ + + /* XXX: side effect handling is quite awkward here */ + + DUK_DDD(DUK_DDDPRINT("TRYCATCH: reg_catch=%ld, have_catch=%ld, " + "have_finally=%ld, catch_binding=%ld, with_binding=%ld (flags=0x%02lx)", + (long) DUK_DEC_BC(ins), + (long) (DUK_DEC_A(ins) & DUK_BC_TRYCATCH_FLAG_HAVE_CATCH ? 1 : 0), + (long) (DUK_DEC_A(ins) & DUK_BC_TRYCATCH_FLAG_HAVE_FINALLY ? 1 : 0), + (long) (DUK_DEC_A(ins) & DUK_BC_TRYCATCH_FLAG_CATCH_BINDING ? 1 : 0), + (long) (DUK_DEC_A(ins) & DUK_BC_TRYCATCH_FLAG_WITH_BINDING ? 1 : 0), + (unsigned long) DUK_DEC_A(ins))); + + a = DUK_DEC_A(ins); + bc = DUK_DEC_BC(ins); + + /* Registers 'bc' and 'bc + 1' are written in longjmp handling + * and if their previous values (which are temporaries) become + * unreachable -and- have a finalizer, there'll be a function + * call during error handling which is not supported now (GH-287). + * Ensure that both 'bc' and 'bc + 1' have primitive values to + * guarantee no finalizer calls in error handling. Scrubbing also + * ensures finalizers for the previous values run here rather than + * later. Error handling related values are also written to 'bc' + * and 'bc + 1' but those values never become unreachable during + * error handling, so there's no side effect problem even if the + * error value has a finalizer. + */ + duk_dup(thr, (duk_idx_t) bc); /* Stabilize value. */ + duk_to_undefined(thr, (duk_idx_t) bc); + duk_to_undefined(thr, (duk_idx_t) (bc + 1)); + + /* Allocate catcher and populate it. Doesn't have to + * be fully atomic, but the catcher must be in a + * consistent state if side effects (such as finalizer + * calls) occur. + */ + + cat = duk_hthread_catcher_alloc(thr); + DUK_ASSERT(cat != NULL); + + cat->flags = DUK_CAT_TYPE_TCF; + cat->h_varname = NULL; + cat->pc_base = (duk_instr_t *) curr_pc; /* pre-incremented, points to first jump slot */ + cat->idx_base = (duk_size_t) (thr->valstack_bottom - thr->valstack) + bc; + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + cat->parent = act->cat; + act->cat = cat; + + if (a & DUK_BC_TRYCATCH_FLAG_HAVE_CATCH) { + cat->flags |= DUK_CAT_FLAG_CATCH_ENABLED; + } + if (a & DUK_BC_TRYCATCH_FLAG_HAVE_FINALLY) { + cat->flags |= DUK_CAT_FLAG_FINALLY_ENABLED; + } + if (a & DUK_BC_TRYCATCH_FLAG_CATCH_BINDING) { + DUK_DDD(DUK_DDDPRINT("catch binding flag set to catcher")); + cat->flags |= DUK_CAT_FLAG_CATCH_BINDING_ENABLED; + tv1 = DUK_GET_TVAL_NEGIDX(thr, -1); + DUK_ASSERT(DUK_TVAL_IS_STRING(tv1)); + + /* borrowed reference; although 'tv1' comes from a register, + * its value was loaded using LDCONST so the constant will + * also exist and be reachable. + */ + cat->h_varname = DUK_TVAL_GET_STRING(tv1); + } else if (a & DUK_BC_TRYCATCH_FLAG_WITH_BINDING) { + duk_hobjenv *env; + duk_hobject *target; + + /* Delayed env initialization for activation (if needed). */ + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + if (act->lex_env == NULL) { + DUK_DDD(DUK_DDDPRINT("delayed environment initialization")); + DUK_ASSERT(act->var_env == NULL); + + duk_js_init_activation_environment_records_delayed(thr, act); + DUK_ASSERT(act == thr->callstack_curr); + DUK_UNREF(act); /* 'act' is no longer accessed, scanbuild fix */ + } + DUK_ASSERT(act->lex_env != NULL); + DUK_ASSERT(act->var_env != NULL); + + /* Coerce 'with' target. */ + target = duk_to_hobject(thr, -1); + DUK_ASSERT(target != NULL); + + /* Create an object environment; it is not pushed + * so avoid side effects very carefully until it is + * referenced. + */ + env = duk_hobjenv_alloc(thr, DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_OBJENV)); + DUK_ASSERT(env != NULL); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) env) == NULL); + env->target = target; /* always provideThis=true */ + DUK_HOBJECT_INCREF(thr, target); + env->has_this = 1; + DUK_HOBJENV_ASSERT_VALID(env); + DUK_DDD(DUK_DDDPRINT("environment for with binding: %!iO", env)); + + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) env) == NULL); + DUK_ASSERT(act->lex_env != NULL); + DUK_HOBJECT_SET_PROTOTYPE(thr->heap, (duk_hobject *) env, act->lex_env); + act->lex_env = (duk_hobject *) env; /* Now reachable. */ + DUK_HOBJECT_INCREF(thr, (duk_hobject *) env); + /* Net refcount change to act->lex_env is 0: incref for env's + * prototype, decref for act->lex_env overwrite. + */ + + /* Set catcher lex_env active (affects unwind) + * only when the whole setup is complete. + */ + cat = act->cat; /* XXX: better to relookup? not mandatory because 'cat' is stable */ + cat->flags |= DUK_CAT_FLAG_LEXENV_ACTIVE; + } else { + ; + } + + DUK_DDD(DUK_DDDPRINT("TRYCATCH catcher: flags=0x%08lx, pc_base=%ld, " + "idx_base=%ld, h_varname=%!O", + (unsigned long) cat->flags, + (long) cat->pc_base, + (long) cat->idx_base, + (duk_heaphdr *) cat->h_varname)); + + duk_pop_unsafe(thr); +} + +DUK_LOCAL DUK_EXEC_NOINLINE_PERF duk_instr_t *duk__handle_op_endtry(duk_hthread *thr, duk_uint_fast32_t ins) { + duk_activation *act; + duk_catcher *cat; + duk_tval *tv1; + duk_instr_t *pc_base; + + DUK_UNREF(ins); + + DUK_ASSERT(thr->callstack_top >= 1); + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + cat = act->cat; + DUK_ASSERT(cat != NULL); + DUK_ASSERT(DUK_CAT_GET_TYPE(act->cat) == DUK_CAT_TYPE_TCF); + + DUK_DDD(DUK_DDDPRINT("ENDTRY: clearing catch active flag (regardless of whether it was set or not)")); + DUK_CAT_CLEAR_CATCH_ENABLED(cat); + + pc_base = cat->pc_base; + + if (DUK_CAT_HAS_FINALLY_ENABLED(cat)) { + DUK_DDD(DUK_DDDPRINT("ENDTRY: finally part is active, jump through 2nd jump slot with 'normal continuation'")); + + tv1 = thr->valstack + cat->idx_base; + DUK_ASSERT(tv1 >= thr->valstack && tv1 < thr->valstack_top); + DUK_TVAL_SET_UNDEFINED_UPDREF(thr, tv1); /* side effects */ + tv1 = NULL; + + tv1 = thr->valstack + cat->idx_base + 1; + DUK_ASSERT(tv1 >= thr->valstack && tv1 < thr->valstack_top); + DUK_TVAL_SET_U32_UPDREF(thr, tv1, (duk_uint32_t) DUK_LJ_TYPE_NORMAL); /* side effects */ + tv1 = NULL; + + DUK_CAT_CLEAR_FINALLY_ENABLED(cat); + } else { + DUK_DDD( + DUK_DDDPRINT("ENDTRY: no finally part, dismantle catcher, jump through 2nd jump slot (to end of statement)")); + + duk_hthread_catcher_unwind_norz(thr, act); /* lexenv may be set for 'with' binding */ + /* no need to unwind callstack */ + } + + return pc_base + 1; /* new curr_pc value */ +} + +DUK_LOCAL DUK_EXEC_NOINLINE_PERF duk_instr_t *duk__handle_op_endcatch(duk_hthread *thr, duk_uint_fast32_t ins) { + duk_activation *act; + duk_catcher *cat; + duk_tval *tv1; + duk_instr_t *pc_base; + + DUK_UNREF(ins); + + DUK_ASSERT(thr->callstack_top >= 1); + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + cat = act->cat; + DUK_ASSERT(cat != NULL); + DUK_ASSERT(!DUK_CAT_HAS_CATCH_ENABLED(cat)); /* cleared before entering catch part */ + + if (DUK_CAT_HAS_LEXENV_ACTIVE(cat)) { + duk_hobject *prev_env; + + /* 'with' binding has no catch clause, so can't be here unless a normal try-catch */ + DUK_ASSERT(DUK_CAT_HAS_CATCH_BINDING_ENABLED(cat)); + DUK_ASSERT(act->lex_env != NULL); + + DUK_DDD(DUK_DDDPRINT("ENDCATCH: popping catcher part lexical environment")); + + prev_env = act->lex_env; + DUK_ASSERT(prev_env != NULL); + act->lex_env = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, prev_env); + DUK_CAT_CLEAR_LEXENV_ACTIVE(cat); + DUK_HOBJECT_INCREF(thr, act->lex_env); + DUK_HOBJECT_DECREF(thr, prev_env); /* side effects */ + + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + } + + pc_base = cat->pc_base; + + if (DUK_CAT_HAS_FINALLY_ENABLED(cat)) { + DUK_DDD(DUK_DDDPRINT("ENDCATCH: finally part is active, jump through 2nd jump slot with 'normal continuation'")); + + tv1 = thr->valstack + cat->idx_base; + DUK_ASSERT(tv1 >= thr->valstack && tv1 < thr->valstack_top); + DUK_TVAL_SET_UNDEFINED_UPDREF(thr, tv1); /* side effects */ + tv1 = NULL; + + tv1 = thr->valstack + cat->idx_base + 1; + DUK_ASSERT(tv1 >= thr->valstack && tv1 < thr->valstack_top); + DUK_TVAL_SET_U32_UPDREF(thr, tv1, (duk_uint32_t) DUK_LJ_TYPE_NORMAL); /* side effects */ + tv1 = NULL; + + DUK_CAT_CLEAR_FINALLY_ENABLED(cat); + } else { + DUK_DDD( + DUK_DDDPRINT("ENDCATCH: no finally part, dismantle catcher, jump through 2nd jump slot (to end of statement)")); + + duk_hthread_catcher_unwind_norz(thr, act); + /* no need to unwind callstack */ + } + + return pc_base + 1; /* new curr_pc value */ +} + +DUK_LOCAL DUK_EXEC_NOINLINE_PERF duk_small_uint_t duk__handle_op_endfin(duk_hthread *thr, + duk_uint_fast32_t ins, + duk_activation *entry_act) { + duk_activation *act; + duk_tval *tv1; + duk_uint_t reg_catch; + duk_small_uint_t cont_type; + duk_small_uint_t ret_result; + + DUK_ASSERT(thr->ptr_curr_pc == NULL); + DUK_ASSERT(thr->callstack_top >= 1); + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + reg_catch = DUK_DEC_ABC(ins); + + /* CATCH flag may be enabled or disabled here; it may be enabled if + * the statement has a catch block but the try block does not throw + * an error. + */ + + DUK_DDD(DUK_DDDPRINT("ENDFIN: completion value=%!T, type=%!T", + (duk_tval *) (thr->valstack_bottom + reg_catch + 0), + (duk_tval *) (thr->valstack_bottom + reg_catch + 1))); + + tv1 = thr->valstack_bottom + reg_catch + 1; /* type */ + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv1)); +#if defined(DUK_USE_FASTINT) + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv1)); + cont_type = (duk_small_uint_t) DUK_TVAL_GET_FASTINT_U32(tv1); +#else + cont_type = (duk_small_uint_t) DUK_TVAL_GET_NUMBER(tv1); +#endif + + tv1--; /* value */ + + switch (cont_type) { + case DUK_LJ_TYPE_NORMAL: { + DUK_DDD(DUK_DDDPRINT("ENDFIN: finally part finishing with 'normal' (non-abrupt) completion -> " + "dismantle catcher, resume execution after ENDFIN")); + + duk_hthread_catcher_unwind_norz(thr, act); + /* no need to unwind callstack */ + return 0; /* restart execution */ + } + case DUK_LJ_TYPE_RETURN: { + DUK_DDD(DUK_DDDPRINT("ENDFIN: finally part finishing with 'return' complation -> dismantle " + "catcher, handle return, lj.value1=%!T", + tv1)); + + /* Not necessary to unwind catch stack: return handling will + * do it. The finally flag of 'cat' is no longer set. The + * catch flag may be set, but it's not checked by return handling. + */ + + duk_push_tval(thr, tv1); + ret_result = duk__handle_return(thr, entry_act); + if (ret_result == DUK__RETHAND_RESTART) { + return 0; /* restart execution */ + } + DUK_ASSERT(ret_result == DUK__RETHAND_FINISHED); + + DUK_DDD(DUK_DDDPRINT("exiting executor after ENDFIN and RETURN (pseudo) longjmp type")); + return 1; /* exit executor */ + } + case DUK_LJ_TYPE_BREAK: + case DUK_LJ_TYPE_CONTINUE: { + duk_uint_t label_id; + duk_small_uint_t lj_type; + + /* Not necessary to unwind catch stack: break/continue + * handling will do it. The finally flag of 'cat' is + * no longer set. The catch flag may be set, but it's + * not checked by break/continue handling. + */ + + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv1)); +#if defined(DUK_USE_FASTINT) + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv1)); + label_id = (duk_small_uint_t) DUK_TVAL_GET_FASTINT_U32(tv1); +#else + label_id = (duk_small_uint_t) DUK_TVAL_GET_NUMBER(tv1); +#endif + lj_type = cont_type; + duk__handle_break_or_continue(thr, label_id, lj_type); + return 0; /* restart execution */ + } + default: { + DUK_DDD(DUK_DDDPRINT("ENDFIN: finally part finishing with abrupt completion, lj_type=%ld -> " + "dismantle catcher, re-throw error", + (long) cont_type)); + + duk_err_setup_ljstate1(thr, (duk_small_uint_t) cont_type, tv1); + /* No debugger Throw notify check on purpose (rethrow). */ + + DUK_ASSERT(thr->heap->lj.jmpbuf_ptr != NULL); /* always in executor */ + duk_err_longjmp(thr); + DUK_UNREACHABLE(); + } + } + + DUK_UNREACHABLE(); + return 0; +} + +DUK_LOCAL DUK_EXEC_NOINLINE_PERF void duk__handle_op_initenum(duk_hthread *thr, duk_uint_fast32_t ins) { + duk_small_uint_t b; + duk_small_uint_t c; + + /* + * Enumeration semantics come from for-in statement, E5 Section 12.6.4. + * If called with 'null' or 'undefined', this opcode returns 'null' as + * the enumerator, which is special cased in NEXTENUM. This simplifies + * the compiler part + */ + + /* B -> register for writing enumerator object + * C -> value to be enumerated (register) + */ + b = DUK_DEC_B(ins); + c = DUK_DEC_C(ins); + + if (duk_is_null_or_undefined(thr, (duk_idx_t) c)) { + duk_push_null(thr); + duk_replace(thr, (duk_idx_t) b); + } else { + duk_dup(thr, (duk_idx_t) c); + duk_to_object(thr, -1); + duk_hobject_enumerator_create(thr, 0 /*enum_flags*/); /* [ ... val ] --> [ ... enum ] */ + duk_replace(thr, (duk_idx_t) b); + } +} + +DUK_LOCAL DUK_EXEC_NOINLINE_PERF duk_small_uint_t duk__handle_op_nextenum(duk_hthread *thr, duk_uint_fast32_t ins) { + duk_small_uint_t b; + duk_small_uint_t c; + duk_small_uint_t pc_skip = 0; + + /* + * NEXTENUM checks whether the enumerator still has unenumerated + * keys. If so, the next key is loaded to the target register + * and the next instruction is skipped. Otherwise the next instruction + * will be executed, jumping out of the enumeration loop. + */ + + /* B -> target register for next key + * C -> enum register + */ + b = DUK_DEC_B(ins); + c = DUK_DEC_C(ins); + + DUK_DDD(DUK_DDDPRINT("NEXTENUM: b->%!T, c->%!T", + (duk_tval *) duk_get_tval(thr, (duk_idx_t) b), + (duk_tval *) duk_get_tval(thr, (duk_idx_t) c))); + + if (duk_is_object(thr, (duk_idx_t) c)) { + /* XXX: assert 'c' is an enumerator */ + duk_dup(thr, (duk_idx_t) c); + if (duk_hobject_enumerator_next(thr, 0 /*get_value*/)) { + /* [ ... enum ] -> [ ... next_key ] */ + DUK_DDD(DUK_DDDPRINT("enum active, next key is %!T, skip jump slot ", (duk_tval *) duk_get_tval(thr, -1))); + pc_skip = 1; + } else { + /* [ ... enum ] -> [ ... ] */ + DUK_DDD(DUK_DDDPRINT("enum finished, execute jump slot")); + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top)); /* valstack policy */ + thr->valstack_top++; + } + duk_replace(thr, (duk_idx_t) b); + } else { + /* 'null' enumerator case -> behave as with an empty enumerator */ + DUK_ASSERT(duk_is_null(thr, (duk_idx_t) c)); + DUK_DDD(DUK_DDDPRINT("enum is null, execute jump slot")); + } + + return pc_skip; +} + +/* + * Call handling helpers. + */ + +DUK_LOCAL duk_bool_t duk__executor_handle_call(duk_hthread *thr, duk_idx_t idx, duk_idx_t nargs, duk_small_uint_t call_flags) { + duk_bool_t rc; + + duk_set_top_unsafe(thr, (duk_idx_t) (idx + nargs + 2)); /* [ ... func this arg1 ... argN ] */ + + /* Attempt an Ecma-to-Ecma call setup. If the call + * target is (directly or indirectly) Reflect.construct(), + * the call may change into a constructor call on the fly. + */ + rc = (duk_bool_t) duk_handle_call_unprotected(thr, idx, call_flags); + if (rc != 0) { + /* Ecma-to-ecma call possible, may or may not + * be a tail call. Avoid C recursion by + * reusing current executor instance. + */ + DUK_DDD(DUK_DDDPRINT("ecma-to-ecma call setup possible, restart execution")); + /* curr_pc synced by duk_handle_call_unprotected() */ + DUK_ASSERT(thr->ptr_curr_pc == NULL); + return rc; + } else { + /* Call was handled inline. */ + } + DUK_ASSERT(thr->ptr_curr_pc != NULL); + return rc; +} + +/* + * ECMAScript bytecode executor. + * + * Resume execution for the current thread from its current activation. + * Returns when execution would return from the entry level activation, + * leaving a single return value on top of the stack. Function calls + * and thread resumptions are handled internally. If an error occurs, + * a longjmp() with type DUK_LJ_TYPE_THROW is called on the entry level + * setjmp() jmpbuf. + * + * ECMAScript function calls and coroutine resumptions are handled + * internally (by the outer executor function) without recursive C calls. + * Other function calls are handled using duk_handle_call(), increasing + * C recursion depth. + * + * Abrupt completions (= long control tranfers) are handled either + * directly by reconfiguring relevant stacks and restarting execution, + * or via a longjmp. Longjmp-free handling is preferable for performance + * (especially Emscripten performance), and is used for: break, continue, + * and return. + * + * For more detailed notes, see doc/execution.rst. + * + * Also see doc/code-issues.rst for discussion of setjmp(), longjmp(), + * and volatile. + */ + +/* Presence of 'fun' is config based, there's a marginal performance + * difference and the best option is architecture dependent. + */ +#if defined(DUK_USE_EXEC_FUN_LOCAL) +#define DUK__FUN() fun +#else +#define DUK__FUN() ((duk_hcompfunc *) DUK_ACT_GET_FUNC((thr)->callstack_curr)) +#endif + +/* Strict flag. */ +#define DUK__STRICT() ((duk_small_uint_t) DUK_HOBJECT_HAS_STRICT((duk_hobject *) DUK__FUN())) + +/* Reg/const access macros: these are very footprint and performance sensitive + * so modify with care. Arguments are sometimes evaluated multiple times which + * is not ideal. + */ +#define DUK__REG(x) (*(thr->valstack_bottom + (x))) +#define DUK__REGP(x) (thr->valstack_bottom + (x)) +#define DUK__CONST(x) (*(consts + (x))) +#define DUK__CONSTP(x) (consts + (x)) + +/* Reg/const access macros which take the 32-bit instruction and avoid an + * explicit field decoding step by using shifts and masks. These must be + * kept in sync with duk_js_bytecode.h. The shift/mask values are chosen + * so that 'ins' can be shifted and masked and used as a -byte- offset + * instead of a duk_tval offset which needs further shifting (which is an + * issue on some, but not all, CPUs). + */ +#define DUK__RCBIT_B DUK_BC_REGCONST_B +#define DUK__RCBIT_C DUK_BC_REGCONST_C +#if defined(DUK_USE_EXEC_REGCONST_OPTIMIZE) +#if defined(DUK_USE_PACKED_TVAL) +#define DUK__TVAL_SHIFT 3 /* sizeof(duk_tval) == 8 */ +#else +#define DUK__TVAL_SHIFT 4 /* sizeof(duk_tval) == 16; not always the case so also asserted for */ +#endif +#define DUK__SHIFT_A (DUK_BC_SHIFT_A - DUK__TVAL_SHIFT) +#define DUK__SHIFT_B (DUK_BC_SHIFT_B - DUK__TVAL_SHIFT) +#define DUK__SHIFT_C (DUK_BC_SHIFT_C - DUK__TVAL_SHIFT) +#define DUK__SHIFT_BC (DUK_BC_SHIFT_BC - DUK__TVAL_SHIFT) +#define DUK__MASK_A (DUK_BC_UNSHIFTED_MASK_A << DUK__TVAL_SHIFT) +#define DUK__MASK_B (DUK_BC_UNSHIFTED_MASK_B << DUK__TVAL_SHIFT) +#define DUK__MASK_C (DUK_BC_UNSHIFTED_MASK_C << DUK__TVAL_SHIFT) +#define DUK__MASK_BC (DUK_BC_UNSHIFTED_MASK_BC << DUK__TVAL_SHIFT) +#define DUK__BYTEOFF_A(ins) (((ins) >> DUK__SHIFT_A) & DUK__MASK_A) +#define DUK__BYTEOFF_B(ins) (((ins) >> DUK__SHIFT_B) & DUK__MASK_B) +#define DUK__BYTEOFF_C(ins) (((ins) >> DUK__SHIFT_C) & DUK__MASK_C) +#define DUK__BYTEOFF_BC(ins) (((ins) >> DUK__SHIFT_BC) & DUK__MASK_BC) + +#define DUK__REGP_A(ins) ((duk_tval *) (void *) ((duk_uint8_t *) thr->valstack_bottom + DUK__BYTEOFF_A((ins)))) +#define DUK__REGP_B(ins) ((duk_tval *) (void *) ((duk_uint8_t *) thr->valstack_bottom + DUK__BYTEOFF_B((ins)))) +#define DUK__REGP_C(ins) ((duk_tval *) (void *) ((duk_uint8_t *) thr->valstack_bottom + DUK__BYTEOFF_C((ins)))) +#define DUK__REGP_BC(ins) ((duk_tval *) (void *) ((duk_uint8_t *) thr->valstack_bottom + DUK__BYTEOFF_BC((ins)))) +#define DUK__CONSTP_A(ins) ((duk_tval *) (void *) ((duk_uint8_t *) consts + DUK__BYTEOFF_A((ins)))) +#define DUK__CONSTP_B(ins) ((duk_tval *) (void *) ((duk_uint8_t *) consts + DUK__BYTEOFF_B((ins)))) +#define DUK__CONSTP_C(ins) ((duk_tval *) (void *) ((duk_uint8_t *) consts + DUK__BYTEOFF_C((ins)))) +#define DUK__CONSTP_BC(ins) ((duk_tval *) (void *) ((duk_uint8_t *) consts + DUK__BYTEOFF_BC((ins)))) +#define DUK__REGCONSTP_B(ins) \ + ((duk_tval *) (void *) ((duk_uint8_t *) (((ins) &DUK__RCBIT_B) ? consts : thr->valstack_bottom) + DUK__BYTEOFF_B((ins)))) +#define DUK__REGCONSTP_C(ins) \ + ((duk_tval *) (void *) ((duk_uint8_t *) (((ins) &DUK__RCBIT_C) ? consts : thr->valstack_bottom) + DUK__BYTEOFF_C((ins)))) +#else /* DUK_USE_EXEC_REGCONST_OPTIMIZE */ +/* Safe alternatives, no assumption about duk_tval size. */ +#define DUK__REGP_A(ins) DUK__REGP(DUK_DEC_A((ins))) +#define DUK__REGP_B(ins) DUK__REGP(DUK_DEC_B((ins))) +#define DUK__REGP_C(ins) DUK__REGP(DUK_DEC_C((ins))) +#define DUK__REGP_BC(ins) DUK__REGP(DUK_DEC_BC((ins))) +#define DUK__CONSTP_A(ins) DUK__CONSTP(DUK_DEC_A((ins))) +#define DUK__CONSTP_B(ins) DUK__CONSTP(DUK_DEC_B((ins))) +#define DUK__CONSTP_C(ins) DUK__CONSTP(DUK_DEC_C((ins))) +#define DUK__CONSTP_BC(ins) DUK__CONSTP(DUK_DEC_BC((ins))) +#define DUK__REGCONSTP_B(ins) ((((ins) &DUK__RCBIT_B) ? consts : thr->valstack_bottom) + DUK_DEC_B((ins))) +#define DUK__REGCONSTP_C(ins) ((((ins) &DUK__RCBIT_C) ? consts : thr->valstack_bottom) + DUK_DEC_C((ins))) +#endif /* DUK_USE_EXEC_REGCONST_OPTIMIZE */ + +#if defined(DUK_USE_VERBOSE_EXECUTOR_ERRORS) +#define DUK__INTERNAL_ERROR(msg) \ + do { \ + DUK_ERROR_ERROR(thr, (msg)); \ + DUK_WO_NORETURN(return;); \ + } while (0) +#else +#define DUK__INTERNAL_ERROR(msg) \ + do { \ + goto internal_error; \ + } while (0) +#endif + +#define DUK__SYNC_CURR_PC() \ + do { \ + duk_activation *duk__act; \ + duk__act = thr->callstack_curr; \ + duk__act->curr_pc = curr_pc; \ + } while (0) +#define DUK__SYNC_AND_NULL_CURR_PC() \ + do { \ + duk_activation *duk__act; \ + duk__act = thr->callstack_curr; \ + duk__act->curr_pc = curr_pc; \ + thr->ptr_curr_pc = NULL; \ + } while (0) + +#if defined(DUK_USE_EXEC_PREFER_SIZE) +#define DUK__LOOKUP_INDIRECT(idx) \ + do { \ + (idx) = (duk_uint_fast_t) duk_get_uint(thr, (duk_idx_t) (idx)); \ + } while (0) +#elif defined(DUK_USE_FASTINT) +#define DUK__LOOKUP_INDIRECT(idx) \ + do { \ + duk_tval *tv_ind; \ + tv_ind = DUK__REGP((idx)); \ + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv_ind)); \ + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv_ind)); /* compiler guarantees */ \ + (idx) = (duk_uint_fast_t) DUK_TVAL_GET_FASTINT_U32(tv_ind); \ + } while (0) +#else +#define DUK__LOOKUP_INDIRECT(idx) \ + do { \ + duk_tval *tv_ind; \ + tv_ind = DUK__REGP(idx); \ + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv_ind)); \ + idx = (duk_uint_fast_t) DUK_TVAL_GET_NUMBER(tv_ind); \ + } while (0) +#endif + +DUK_LOCAL void duk__handle_executor_error(duk_heap *heap, + duk_activation *entry_act, + duk_int_t entry_call_recursion_depth, + duk_jmpbuf *entry_jmpbuf_ptr, + volatile duk_bool_t *out_delayed_catch_setup) { + duk_small_uint_t lj_ret; + + /* Longjmp callers are required to sync-and-null thr->ptr_curr_pc + * before longjmp. + */ + DUK_ASSERT(heap->curr_thread != NULL); + DUK_ASSERT(heap->curr_thread->ptr_curr_pc == NULL); + + /* XXX: signalling the need to shrink check (only if unwound) */ + + /* Must be restored here to handle e.g. yields properly. */ + heap->call_recursion_depth = entry_call_recursion_depth; + + /* Switch to caller's setjmp() catcher so that if an error occurs + * during error handling, it is always propagated outwards instead + * of causing an infinite loop in our own handler. + */ + heap->lj.jmpbuf_ptr = (duk_jmpbuf *) entry_jmpbuf_ptr; + + lj_ret = duk__handle_longjmp(heap->curr_thread, entry_act, out_delayed_catch_setup); + + /* Error handling complete, remove side effect protections. + */ +#if defined(DUK_USE_ASSERTIONS) + DUK_ASSERT(heap->error_not_allowed == 1); + heap->error_not_allowed = 0; +#endif + DUK_ASSERT(heap->pf_prevent_count > 0); + heap->pf_prevent_count--; + DUK_DD(DUK_DDPRINT("executor error handled, pf_prevent_count updated to %ld", (long) heap->pf_prevent_count)); + + if (lj_ret == DUK__LONGJMP_RESTART) { + /* Restart bytecode execution, possibly with a changed thread. */ + DUK_REFZERO_CHECK_SLOW(heap->curr_thread); + } else { + /* If an error is propagated, don't run refzero checks here. + * The next catcher will deal with that. Pf_prevent_count + * will be re-bumped by the longjmp. + */ + + DUK_ASSERT(lj_ret == DUK__LONGJMP_RETHROW); /* Rethrow error to calling state. */ + DUK_ASSERT(heap->lj.jmpbuf_ptr == entry_jmpbuf_ptr); /* Longjmp handling has restored jmpbuf_ptr. */ + + /* Thread may have changed, e.g. YIELD converted to THROW. */ + duk_err_longjmp(heap->curr_thread); + DUK_UNREACHABLE(); + } +} + +/* Outer executor with setjmp/longjmp handling. */ +DUK_INTERNAL void duk_js_execute_bytecode(duk_hthread *exec_thr) { + /* Entry level info. */ + duk_hthread *entry_thread; + duk_activation *entry_act; + duk_int_t entry_call_recursion_depth; + duk_jmpbuf *entry_jmpbuf_ptr; + duk_jmpbuf our_jmpbuf; + duk_heap *heap; + volatile duk_bool_t delayed_catch_setup = 0; + + DUK_ASSERT(exec_thr != NULL); + DUK_ASSERT(exec_thr->heap != NULL); + DUK_ASSERT(exec_thr->heap->curr_thread != NULL); + DUK_ASSERT_REFCOUNT_NONZERO_HEAPHDR((duk_heaphdr *) exec_thr); + DUK_ASSERT(exec_thr->callstack_top >= 1); /* at least one activation, ours */ + DUK_ASSERT(exec_thr->callstack_curr != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(exec_thr->callstack_curr) != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(exec_thr->callstack_curr))); + + DUK_GC_TORTURE(exec_thr->heap); + + entry_thread = exec_thr; + heap = entry_thread->heap; + entry_act = entry_thread->callstack_curr; + DUK_ASSERT(entry_act != NULL); + entry_call_recursion_depth = entry_thread->heap->call_recursion_depth; + entry_jmpbuf_ptr = entry_thread->heap->lj.jmpbuf_ptr; + + /* + * Note: we currently assume that the setjmp() catchpoint is + * not re-entrant (longjmp() cannot be called more than once + * for a single setjmp()). + * + * See doc/code-issues.rst for notes on variable assignment + * before and after setjmp(). + */ + + for (;;) { + heap->lj.jmpbuf_ptr = &our_jmpbuf; + DUK_ASSERT(heap->lj.jmpbuf_ptr != NULL); + +#if defined(DUK_USE_CPP_EXCEPTIONS) + try { +#else + DUK_ASSERT(heap->lj.jmpbuf_ptr == &our_jmpbuf); + if (DUK_SETJMP(our_jmpbuf.jb) == 0) { +#endif + DUK_DDD(DUK_DDDPRINT("after setjmp, delayed catch setup: %ld\n", (long) delayed_catch_setup)); + + if (DUK_UNLIKELY(delayed_catch_setup != 0)) { + duk_hthread *thr = entry_thread->heap->curr_thread; + + delayed_catch_setup = 0; + duk__handle_catch_part2(thr); + DUK_ASSERT(delayed_catch_setup == 0); + DUK_DDD(DUK_DDDPRINT("top after delayed catch setup: %ld", (long) duk_get_top(entry_thread))); + } + + /* Execute bytecode until returned or longjmp(). */ + duk__js_execute_bytecode_inner(entry_thread, entry_act); + + /* Successful return: restore jmpbuf and return to caller. */ + heap->lj.jmpbuf_ptr = entry_jmpbuf_ptr; + + return; +#if defined(DUK_USE_CPP_EXCEPTIONS) + } catch (duk_internal_exception &exc) { +#else + } else { +#endif +#if defined(DUK_USE_CPP_EXCEPTIONS) + DUK_UNREF(exc); +#endif + DUK_DDD(DUK_DDDPRINT("longjmp caught by bytecode executor")); + DUK_STATS_INC(exec_thr->heap, stats_exec_throw); + + duk__handle_executor_error(heap, + entry_act, + entry_call_recursion_depth, + entry_jmpbuf_ptr, + &delayed_catch_setup); + } +#if defined(DUK_USE_CPP_EXCEPTIONS) + catch (duk_fatal_exception &exc) { + DUK_D(DUK_DPRINT("rethrow duk_fatal_exception")); + DUK_UNREF(exc); + throw; + } catch (std::exception &exc) { + const char *what = exc.what(); + if (!what) { + what = "unknown"; + } + DUK_D(DUK_DPRINT("unexpected c++ std::exception (perhaps thrown by user code)")); + DUK_STATS_INC(exec_thr->heap, stats_exec_throw); + try { + DUK_ASSERT(heap->curr_thread != NULL); + DUK_ERROR_FMT1(heap->curr_thread, + DUK_ERR_TYPE_ERROR, + "caught invalid c++ std::exception '%s' (perhaps thrown by user code)", + what); + DUK_WO_NORETURN(return;); + } catch (duk_internal_exception exc) { + DUK_D(DUK_DPRINT("caught api error thrown from unexpected c++ std::exception")); + DUK_UNREF(exc); + duk__handle_executor_error(heap, + entry_act, + entry_call_recursion_depth, + entry_jmpbuf_ptr, + &delayed_catch_setup); + } + } catch (...) { + DUK_D(DUK_DPRINT("unexpected c++ exception (perhaps thrown by user code)")); + DUK_STATS_INC(exec_thr->heap, stats_exec_throw); + try { + DUK_ASSERT(heap->curr_thread != NULL); + DUK_ERROR_TYPE(heap->curr_thread, "caught invalid c++ exception (perhaps thrown by user code)"); + DUK_WO_NORETURN(return;); + } catch (duk_internal_exception exc) { + DUK_D(DUK_DPRINT("caught api error thrown from unexpected c++ exception")); + DUK_UNREF(exc); + duk__handle_executor_error(heap, + entry_act, + entry_call_recursion_depth, + entry_jmpbuf_ptr, + &delayed_catch_setup); + } + } +#endif + } + + DUK_WO_NORETURN(return;); +} + +/* Inner executor, performance critical. */ +DUK_LOCAL DUK_NOINLINE DUK_HOT void duk__js_execute_bytecode_inner(duk_hthread *entry_thread, duk_activation *entry_act) { + /* Current PC, accessed by other functions through thr->ptr_to_curr_pc. + * Critical for performance. It would be safest to make this volatile, + * but that eliminates performance benefits; aliasing guarantees + * should be enough though. + */ + duk_instr_t *curr_pc; /* bytecode has a stable pointer */ + + /* Hot variables for interpretation. Critical for performance, + * but must add sparingly to minimize register shuffling. + */ + duk_hthread *thr; /* stable */ + duk_tval *consts; /* stable */ + duk_uint_fast32_t ins; + /* 'funcs' is quite rarely used, so no local for it */ +#if defined(DUK_USE_EXEC_FUN_LOCAL) + duk_hcompfunc *fun; +#else + /* 'fun' is quite rarely used, so no local for it */ +#endif + +#if defined(DUK_USE_INTERRUPT_COUNTER) + duk_int_t int_ctr; +#endif + +#if defined(DUK_USE_ASSERTIONS) + duk_size_t valstack_top_base; /* valstack top, should match before interpreting each op (no leftovers) */ +#endif + + /* Optimized reg/const access macros assume sizeof(duk_tval) to be + * either 8 or 16. Heap allocation checks this even without asserts + * enabled now because it can't be autodetected in duk_config.h. + */ +#if 1 +#if defined(DUK_USE_PACKED_TVAL) + DUK_ASSERT(sizeof(duk_tval) == 8); +#else + DUK_ASSERT(sizeof(duk_tval) == 16); +#endif +#endif + + DUK_GC_TORTURE(entry_thread->heap); + + /* + * Restart execution by reloading thread state. + * + * Note that 'thr' and any thread configuration may have changed, + * so all local variables are suspect and we need to reinitialize. + * + * The number of local variables should be kept to a minimum: if + * the variables are spilled, they will need to be loaded from + * memory anyway. + * + * Any 'goto restart_execution;' code path in opcode dispatch must + * ensure 'curr_pc' is synced back to act->curr_pc before the goto + * takes place. + * + * The interpreter must be very careful with memory pointers, as + * many pointers are not guaranteed to be 'stable' and may be + * reallocated and relocated on-the-fly quite easily (e.g. by a + * memory allocation or a property access). + * + * The following are assumed to have stable pointers: + * - the current thread + * - the current function + * - the bytecode, constant table, inner function table of the + * current function (as they are a part of the function allocation) + * + * The following are assumed to have semi-stable pointers: + * - the current activation entry: stable as long as callstack + * is not changed (reallocated by growing or shrinking), or + * by any garbage collection invocation (through finalizers) + * - Note in particular that ANY DECREF can invalidate the + * activation pointer, so for the most part a fresh lookup + * is required + * + * The following are not assumed to have stable pointers at all: + * - the value stack (registers) of the current thread + * + * See execution.rst for discussion. + */ + +restart_execution: + + /* Lookup current thread; use the stable 'entry_thread' for this to + * avoid clobber warnings. Any valid, reachable 'thr' value would be + * fine for this, so using 'entry_thread' is just to silence warnings. + */ + thr = entry_thread->heap->curr_thread; + DUK_ASSERT(thr != NULL); + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(thr->callstack_curr != NULL); + DUK_ASSERT(DUK_ACT_GET_FUNC(thr->callstack_curr) != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(DUK_ACT_GET_FUNC(thr->callstack_curr))); + + DUK_GC_TORTURE(thr->heap); + + thr->ptr_curr_pc = &curr_pc; + + /* Relookup and initialize dispatch loop variables. Debugger check. */ + { + duk_activation *act; +#if !defined(DUK_USE_EXEC_FUN_LOCAL) + duk_hcompfunc *fun; +#endif + + /* Assume interrupt init/counter are properly initialized here. */ + /* Assume that thr->valstack_bottom has been set-up before getting here. */ + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + fun = (duk_hcompfunc *) DUK_ACT_GET_FUNC(act); + DUK_ASSERT(fun != NULL); + DUK_ASSERT(thr->valstack_top - thr->valstack_bottom == fun->nregs); + consts = DUK_HCOMPFUNC_GET_CONSTS_BASE(thr->heap, fun); + DUK_ASSERT(consts != NULL); + +#if defined(DUK_USE_DEBUGGER_SUPPORT) + if (DUK_UNLIKELY(duk_debug_is_attached(thr->heap) && !thr->heap->dbg_processing)) { + duk__executor_recheck_debugger(thr, act, fun); + DUK_ASSERT(act == thr->callstack_curr); + DUK_ASSERT(act != NULL); + } +#endif /* DUK_USE_DEBUGGER_SUPPORT */ + +#if defined(DUK_USE_ASSERTIONS) + valstack_top_base = (duk_size_t) (thr->valstack_top - thr->valstack); +#endif + + /* Set up curr_pc for opcode dispatch. */ + curr_pc = act->curr_pc; + } + + DUK_DD(DUK_DDPRINT("restarting execution, thr %p, act idx %ld, fun %p," + "consts %p, funcs %p, lev %ld, regbot %ld, regtop %ld, " + "preventcount=%ld", + (void *) thr, + (long) (thr->callstack_top - 1), + (void *) DUK__FUN(), + (void *) DUK_HCOMPFUNC_GET_CONSTS_BASE(thr->heap, DUK__FUN()), + (void *) DUK_HCOMPFUNC_GET_FUNCS_BASE(thr->heap, DUK__FUN()), + (long) (thr->callstack_top - 1), + (long) (thr->valstack_bottom - thr->valstack), + (long) (thr->valstack_top - thr->valstack), + (long) thr->callstack_preventcount)); + + /* Dispatch loop. */ + + for (;;) { + duk_uint8_t op; + + DUK_ASSERT(thr->callstack_top >= 1); + DUK_ASSERT(thr->valstack_top - thr->valstack_bottom == DUK__FUN()->nregs); + DUK_ASSERT((duk_size_t) (thr->valstack_top - thr->valstack) == valstack_top_base); + + /* Executor interrupt counter check, used to implement breakpoints, + * debugging interface, execution timeouts, etc. The counter is heap + * specific but is maintained in the current thread to make the check + * as fast as possible. The counter is copied back to the heap struct + * whenever a thread switch occurs by the DUK_HEAP_SWITCH_THREAD() macro. + */ +#if defined(DUK_USE_INTERRUPT_COUNTER) + int_ctr = thr->interrupt_counter; + if (DUK_LIKELY(int_ctr > 0)) { + thr->interrupt_counter = int_ctr - 1; + } else { + /* Trigger at zero or below */ + duk_small_uint_t exec_int_ret; + + DUK_STATS_INC(thr->heap, stats_exec_interrupt); + + /* Write curr_pc back for the debugger. */ + { + duk_activation *act; + DUK_ASSERT(thr->callstack_top > 0); + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + act->curr_pc = (duk_instr_t *) curr_pc; + } + + /* Forced restart caused by a function return; must recheck + * debugger breakpoints before checking line transitions, + * see GH-303. Restart and then handle interrupt_counter + * zero again. + */ +#if defined(DUK_USE_DEBUGGER_SUPPORT) + if (thr->heap->dbg_force_restart) { + DUK_DD(DUK_DDPRINT("dbg_force_restart flag forced restart execution")); /* GH-303 */ + thr->heap->dbg_force_restart = 0; + goto restart_execution; + } +#endif + + exec_int_ret = duk__executor_interrupt(thr); + if (exec_int_ret == DUK__INT_RESTART) { + /* curr_pc synced back above */ + goto restart_execution; + } + } +#endif /* DUK_USE_INTERRUPT_COUNTER */ +#if defined(DUK_USE_INTERRUPT_COUNTER) && defined(DUK_USE_DEBUG) + /* For cross-checking during development: ensure dispatch count + * matches cumulative interrupt counter init value sums. + */ + thr->heap->inst_count_exec++; +#endif + +#if defined(DUK_USE_ASSERTIONS) || defined(DUK_USE_DEBUG) + { + duk_activation *act; + act = thr->callstack_curr; + DUK_ASSERT(curr_pc >= DUK_HCOMPFUNC_GET_CODE_BASE(thr->heap, DUK__FUN())); + DUK_ASSERT(curr_pc < DUK_HCOMPFUNC_GET_CODE_END(thr->heap, DUK__FUN())); + DUK_UNREF(act); /* if debugging disabled */ + + DUK_DDD(DUK_DDDPRINT( + "executing bytecode: pc=%ld, ins=0x%08lx, op=%ld, valstack_top=%ld/%ld, nregs=%ld --> %!I", + (long) (curr_pc - DUK_HCOMPFUNC_GET_CODE_BASE(thr->heap, DUK__FUN())), + (unsigned long) *curr_pc, + (long) DUK_DEC_OP(*curr_pc), + (long) (thr->valstack_top - thr->valstack), + (long) (thr->valstack_end - thr->valstack), + (long) (DUK__FUN() ? DUK__FUN()->nregs : -1), + (duk_instr_t) *curr_pc)); + } +#endif + +#if defined(DUK_USE_ASSERTIONS) + /* Quite heavy assert: check valstack policy. Improper + * shuffle instructions can write beyond valstack_top/end + * so this check catches them in the act. + */ + { + duk_tval *tv; + tv = thr->valstack_top; + while (tv != thr->valstack_end) { + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(tv)); + tv++; + } + } +#endif + + ins = *curr_pc++; + DUK_STATS_INC(thr->heap, stats_exec_opcodes); + + /* Typing: use duk_small_(u)int_fast_t when decoding small + * opcode fields (op, A, B, C, BC) which fit into 16 bits + * and duk_(u)int_fast_t when decoding larger fields (e.g. + * ABC). Use unsigned variant by default, signed when the + * value is used in signed arithmetic. Using variable names + * such as 'a', 'b', 'c', 'bc', etc makes it easier to spot + * typing mismatches. + */ + + /* Switch based on opcode. Cast to 8-bit unsigned value and + * use a fully populated case clauses so that the compiler + * will (at least usually) omit a bounds check. + */ + op = (duk_uint8_t) DUK_DEC_OP(ins); + switch (op) { + /* Some useful macros. These access inner executor variables + * directly so they only apply within the executor. + */ +#if defined(DUK_USE_EXEC_PREFER_SIZE) +#define DUK__REPLACE_TOP_A_BREAK() \ + { goto replace_top_a; } +#define DUK__REPLACE_TOP_BC_BREAK() \ + { goto replace_top_bc; } +#define DUK__REPLACE_BOOL_A_BREAK(bval) \ + { \ + duk_bool_t duk__bval; \ + duk__bval = (bval); \ + DUK_ASSERT(duk__bval == 0 || duk__bval == 1); \ + duk_push_boolean(thr, duk__bval); \ + DUK__REPLACE_TOP_A_BREAK(); \ + } +#else +#define DUK__REPLACE_TOP_A_BREAK() \ + { \ + DUK__REPLACE_TO_TVPTR(thr, DUK__REGP_A(ins)); \ + break; \ + } +#define DUK__REPLACE_TOP_BC_BREAK() \ + { \ + DUK__REPLACE_TO_TVPTR(thr, DUK__REGP_BC(ins)); \ + break; \ + } +#define DUK__REPLACE_BOOL_A_BREAK(bval) \ + { \ + duk_bool_t duk__bval; \ + duk_tval *duk__tvdst; \ + duk__bval = (bval); \ + DUK_ASSERT(duk__bval == 0 || duk__bval == 1); \ + duk__tvdst = DUK__REGP_A(ins); \ + DUK_TVAL_SET_BOOLEAN_UPDREF(thr, duk__tvdst, duk__bval); \ + break; \ + } +#endif + + /* XXX: 12 + 12 bit variant might make sense too, for both reg and + * const loads. + */ + + /* For LDREG, STREG, LDCONST footprint optimized variants would just + * duk_dup() + duk_replace(), but because they're used quite a lot + * they're currently intentionally not size optimized. + */ + case DUK_OP_LDREG: { + duk_tval *tv1, *tv2; + + tv1 = DUK__REGP_A(ins); + tv2 = DUK__REGP_BC(ins); + DUK_TVAL_SET_TVAL_UPDREF_FAST(thr, tv1, tv2); /* side effects */ + break; + } + + case DUK_OP_STREG: { + duk_tval *tv1, *tv2; + + tv1 = DUK__REGP_A(ins); + tv2 = DUK__REGP_BC(ins); + DUK_TVAL_SET_TVAL_UPDREF_FAST(thr, tv2, tv1); /* side effects */ + break; + } + + case DUK_OP_LDCONST: { + duk_tval *tv1, *tv2; + + tv1 = DUK__REGP_A(ins); + tv2 = DUK__CONSTP_BC(ins); + DUK_TVAL_SET_TVAL_UPDREF_FAST(thr, tv1, tv2); /* side effects */ + break; + } + + /* LDINT and LDINTX are intended to load an arbitrary signed + * 32-bit value. Only an LDINT+LDINTX sequence is supported. + * This also guarantees all values remain fastints. + */ +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_LDINT: { + duk_int32_t val; + + val = (duk_int32_t) DUK_DEC_BC(ins) - (duk_int32_t) DUK_BC_LDINT_BIAS; + duk_push_int(thr, val); + DUK__REPLACE_TOP_A_BREAK(); + } + case DUK_OP_LDINTX: { + duk_int32_t val; + + val = (duk_int32_t) duk_get_int(thr, DUK_DEC_A(ins)); + val = (val << DUK_BC_LDINTX_SHIFT) + (duk_int32_t) DUK_DEC_BC(ins); /* no bias */ + duk_push_int(thr, val); + DUK__REPLACE_TOP_A_BREAK(); + } +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_LDINT: { + duk_tval *tv1; + duk_int32_t val; + + val = (duk_int32_t) DUK_DEC_BC(ins) - (duk_int32_t) DUK_BC_LDINT_BIAS; + tv1 = DUK__REGP_A(ins); + DUK_TVAL_SET_I32_UPDREF(thr, tv1, val); /* side effects */ + break; + } + case DUK_OP_LDINTX: { + duk_tval *tv1; + duk_int32_t val; + + tv1 = DUK__REGP_A(ins); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv1)); +#if defined(DUK_USE_FASTINT) + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv1)); + val = DUK_TVAL_GET_FASTINT_I32(tv1); +#else + /* XXX: fast double-to-int conversion, we know number is integer in [-0x80000000,0xffffffff]. */ + val = (duk_int32_t) DUK_TVAL_GET_NUMBER(tv1); +#endif + val = + (duk_int32_t) ((duk_uint32_t) val << DUK_BC_LDINTX_SHIFT) + (duk_int32_t) DUK_DEC_BC(ins); /* no bias */ + DUK_TVAL_SET_I32_UPDREF(thr, tv1, val); /* side effects */ + break; + } +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_LDTHIS: { + duk_push_this(thr); + DUK__REPLACE_TOP_BC_BREAK(); + } + case DUK_OP_LDUNDEF: { + duk_to_undefined(thr, (duk_idx_t) DUK_DEC_BC(ins)); + break; + } + case DUK_OP_LDNULL: { + duk_to_null(thr, (duk_idx_t) DUK_DEC_BC(ins)); + break; + } + case DUK_OP_LDTRUE: { + duk_push_true(thr); + DUK__REPLACE_TOP_BC_BREAK(); + } + case DUK_OP_LDFALSE: { + duk_push_false(thr); + DUK__REPLACE_TOP_BC_BREAK(); + } +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_LDTHIS: { + /* Note: 'this' may be bound to any value, not just an object */ + duk_tval *tv1, *tv2; + + tv1 = DUK__REGP_BC(ins); + tv2 = thr->valstack_bottom - 1; /* 'this binding' is just under bottom */ + DUK_ASSERT(tv2 >= thr->valstack); + DUK_TVAL_SET_TVAL_UPDREF_FAST(thr, tv1, tv2); /* side effects */ + break; + } + case DUK_OP_LDUNDEF: { + duk_tval *tv1; + + tv1 = DUK__REGP_BC(ins); + DUK_TVAL_SET_UNDEFINED_UPDREF(thr, tv1); /* side effects */ + break; + } + case DUK_OP_LDNULL: { + duk_tval *tv1; + + tv1 = DUK__REGP_BC(ins); + DUK_TVAL_SET_NULL_UPDREF(thr, tv1); /* side effects */ + break; + } + case DUK_OP_LDTRUE: { + duk_tval *tv1; + + tv1 = DUK__REGP_BC(ins); + DUK_TVAL_SET_BOOLEAN_UPDREF(thr, tv1, 1); /* side effects */ + break; + } + case DUK_OP_LDFALSE: { + duk_tval *tv1; + + tv1 = DUK__REGP_BC(ins); + DUK_TVAL_SET_BOOLEAN_UPDREF(thr, tv1, 0); /* side effects */ + break; + } +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + + case DUK_OP_BNOT: { + duk__vm_bitwise_not(thr, DUK_DEC_BC(ins), DUK_DEC_A(ins)); + break; + } + + case DUK_OP_LNOT: { + duk__vm_logical_not(thr, DUK_DEC_BC(ins), DUK_DEC_A(ins)); + break; + } + +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_UNM: + case DUK_OP_UNP: { + duk__vm_arith_unary_op(thr, DUK_DEC_BC(ins), DUK_DEC_A(ins), op); + break; + } +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_UNM: { + duk__vm_arith_unary_op(thr, DUK_DEC_BC(ins), DUK_DEC_A(ins), DUK_OP_UNM); + break; + } + case DUK_OP_UNP: { + duk__vm_arith_unary_op(thr, DUK_DEC_BC(ins), DUK_DEC_A(ins), DUK_OP_UNP); + break; + } +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_TYPEOF: { + duk_small_uint_t stridx; + + stridx = duk_js_typeof_stridx(DUK__REGP_BC(ins)); + DUK_ASSERT_STRIDX_VALID(stridx); + duk_push_hstring_stridx(thr, stridx); + DUK__REPLACE_TOP_A_BREAK(); + } +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_TYPEOF: { + duk_tval *tv; + duk_small_uint_t stridx; + duk_hstring *h_str; + + tv = DUK__REGP_BC(ins); + stridx = duk_js_typeof_stridx(tv); + DUK_ASSERT_STRIDX_VALID(stridx); + h_str = DUK_HTHREAD_GET_STRING(thr, stridx); + tv = DUK__REGP_A(ins); + DUK_TVAL_SET_STRING_UPDREF(thr, tv, h_str); + break; + } +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + + case DUK_OP_TYPEOFID: { + duk_small_uint_t stridx; +#if !defined(DUK_USE_EXEC_PREFER_SIZE) + duk_hstring *h_str; +#endif + duk_activation *act; + duk_hstring *name; + duk_tval *tv; + + /* A -> target register + * BC -> constant index of identifier name + */ + + tv = DUK__CONSTP_BC(ins); + DUK_ASSERT(DUK_TVAL_IS_STRING(tv)); + name = DUK_TVAL_GET_STRING(tv); + tv = NULL; /* lookup has side effects */ + act = thr->callstack_curr; + if (duk_js_getvar_activation(thr, act, name, 0 /*throw*/)) { + /* -> [... val this] */ + tv = DUK_GET_TVAL_NEGIDX(thr, -2); + stridx = duk_js_typeof_stridx(tv); + tv = NULL; /* no longer needed */ + duk_pop_2_unsafe(thr); + } else { + /* unresolvable, no stack changes */ + stridx = DUK_STRIDX_LC_UNDEFINED; + } + DUK_ASSERT_STRIDX_VALID(stridx); +#if defined(DUK_USE_EXEC_PREFER_SIZE) + duk_push_hstring_stridx(thr, stridx); + DUK__REPLACE_TOP_A_BREAK(); +#else /* DUK_USE_EXEC_PREFER_SIZE */ + h_str = DUK_HTHREAD_GET_STRING(thr, stridx); + tv = DUK__REGP_A(ins); + DUK_TVAL_SET_STRING_UPDREF(thr, tv, h_str); + break; +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + } + + /* Equality: E5 Sections 11.9.1, 11.9.3 */ + +#define DUK__EQ_BODY(barg, carg) \ + { \ + duk_bool_t tmp; \ + tmp = duk_js_equals(thr, (barg), (carg)); \ + DUK_ASSERT(tmp == 0 || tmp == 1); \ + DUK__REPLACE_BOOL_A_BREAK(tmp); \ + } +#define DUK__NEQ_BODY(barg, carg) \ + { \ + duk_bool_t tmp; \ + tmp = duk_js_equals(thr, (barg), (carg)); \ + DUK_ASSERT(tmp == 0 || tmp == 1); \ + tmp ^= 1; \ + DUK__REPLACE_BOOL_A_BREAK(tmp); \ + } +#define DUK__SEQ_BODY(barg, carg) \ + { \ + duk_bool_t tmp; \ + tmp = duk_js_strict_equals((barg), (carg)); \ + DUK_ASSERT(tmp == 0 || tmp == 1); \ + DUK__REPLACE_BOOL_A_BREAK(tmp); \ + } +#define DUK__SNEQ_BODY(barg, carg) \ + { \ + duk_bool_t tmp; \ + tmp = duk_js_strict_equals((barg), (carg)); \ + DUK_ASSERT(tmp == 0 || tmp == 1); \ + tmp ^= 1; \ + DUK__REPLACE_BOOL_A_BREAK(tmp); \ + } +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_EQ_RR: + case DUK_OP_EQ_CR: + case DUK_OP_EQ_RC: + case DUK_OP_EQ_CC: + DUK__EQ_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); + case DUK_OP_NEQ_RR: + case DUK_OP_NEQ_CR: + case DUK_OP_NEQ_RC: + case DUK_OP_NEQ_CC: + DUK__NEQ_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); + case DUK_OP_SEQ_RR: + case DUK_OP_SEQ_CR: + case DUK_OP_SEQ_RC: + case DUK_OP_SEQ_CC: + DUK__SEQ_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); + case DUK_OP_SNEQ_RR: + case DUK_OP_SNEQ_CR: + case DUK_OP_SNEQ_RC: + case DUK_OP_SNEQ_CC: + DUK__SNEQ_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_EQ_RR: + DUK__EQ_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_EQ_CR: + DUK__EQ_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_EQ_RC: + DUK__EQ_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_EQ_CC: + DUK__EQ_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_NEQ_RR: + DUK__NEQ_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_NEQ_CR: + DUK__NEQ_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_NEQ_RC: + DUK__NEQ_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_NEQ_CC: + DUK__NEQ_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_SEQ_RR: + DUK__SEQ_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_SEQ_CR: + DUK__SEQ_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_SEQ_RC: + DUK__SEQ_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_SEQ_CC: + DUK__SEQ_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_SNEQ_RR: + DUK__SNEQ_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_SNEQ_CR: + DUK__SNEQ_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_SNEQ_RC: + DUK__SNEQ_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_SNEQ_CC: + DUK__SNEQ_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + +#define DUK__COMPARE_BODY(arg1, arg2, flags) \ + { \ + duk_bool_t tmp; \ + tmp = duk_js_compare_helper(thr, (arg1), (arg2), (flags)); \ + DUK_ASSERT(tmp == 0 || tmp == 1); \ + DUK__REPLACE_BOOL_A_BREAK(tmp); \ + } +#define DUK__GT_BODY(barg, carg) DUK__COMPARE_BODY((carg), (barg), 0) +#define DUK__GE_BODY(barg, carg) DUK__COMPARE_BODY((barg), (carg), DUK_COMPARE_FLAG_EVAL_LEFT_FIRST | DUK_COMPARE_FLAG_NEGATE) +#define DUK__LT_BODY(barg, carg) DUK__COMPARE_BODY((barg), (carg), DUK_COMPARE_FLAG_EVAL_LEFT_FIRST) +#define DUK__LE_BODY(barg, carg) DUK__COMPARE_BODY((carg), (barg), DUK_COMPARE_FLAG_NEGATE) +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_GT_RR: + case DUK_OP_GT_CR: + case DUK_OP_GT_RC: + case DUK_OP_GT_CC: + DUK__GT_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); + case DUK_OP_GE_RR: + case DUK_OP_GE_CR: + case DUK_OP_GE_RC: + case DUK_OP_GE_CC: + DUK__GE_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); + case DUK_OP_LT_RR: + case DUK_OP_LT_CR: + case DUK_OP_LT_RC: + case DUK_OP_LT_CC: + DUK__LT_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); + case DUK_OP_LE_RR: + case DUK_OP_LE_CR: + case DUK_OP_LE_RC: + case DUK_OP_LE_CC: + DUK__LE_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_GT_RR: + DUK__GT_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_GT_CR: + DUK__GT_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_GT_RC: + DUK__GT_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_GT_CC: + DUK__GT_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_GE_RR: + DUK__GE_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_GE_CR: + DUK__GE_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_GE_RC: + DUK__GE_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_GE_CC: + DUK__GE_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_LT_RR: + DUK__LT_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_LT_CR: + DUK__LT_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_LT_RC: + DUK__LT_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_LT_CC: + DUK__LT_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_LE_RR: + DUK__LE_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_LE_CR: + DUK__LE_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_LE_RC: + DUK__LE_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_LE_CC: + DUK__LE_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + + /* No size optimized variant at present for IF. */ + case DUK_OP_IFTRUE_R: { + if (duk_js_toboolean(DUK__REGP_BC(ins)) != 0) { + curr_pc++; + } + break; + } + case DUK_OP_IFTRUE_C: { + if (duk_js_toboolean(DUK__CONSTP_BC(ins)) != 0) { + curr_pc++; + } + break; + } + case DUK_OP_IFFALSE_R: { + if (duk_js_toboolean(DUK__REGP_BC(ins)) == 0) { + curr_pc++; + } + break; + } + case DUK_OP_IFFALSE_C: { + if (duk_js_toboolean(DUK__CONSTP_BC(ins)) == 0) { + curr_pc++; + } + break; + } + +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_ADD_RR: + case DUK_OP_ADD_CR: + case DUK_OP_ADD_RC: + case DUK_OP_ADD_CC: { + /* XXX: could leave value on stack top and goto replace_top_a; */ + duk__vm_arith_add(thr, DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins), DUK_DEC_A(ins)); + break; + } +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_ADD_RR: { + duk__vm_arith_add(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins)); + break; + } + case DUK_OP_ADD_CR: { + duk__vm_arith_add(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins)); + break; + } + case DUK_OP_ADD_RC: { + duk__vm_arith_add(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins)); + break; + } + case DUK_OP_ADD_CC: { + duk__vm_arith_add(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins)); + break; + } +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_SUB_RR: + case DUK_OP_SUB_CR: + case DUK_OP_SUB_RC: + case DUK_OP_SUB_CC: + case DUK_OP_MUL_RR: + case DUK_OP_MUL_CR: + case DUK_OP_MUL_RC: + case DUK_OP_MUL_CC: + case DUK_OP_DIV_RR: + case DUK_OP_DIV_CR: + case DUK_OP_DIV_RC: + case DUK_OP_DIV_CC: + case DUK_OP_MOD_RR: + case DUK_OP_MOD_CR: + case DUK_OP_MOD_RC: + case DUK_OP_MOD_CC: +#if defined(DUK_USE_ES7_EXP_OPERATOR) + case DUK_OP_EXP_RR: + case DUK_OP_EXP_CR: + case DUK_OP_EXP_RC: + case DUK_OP_EXP_CC: +#endif /* DUK_USE_ES7_EXP_OPERATOR */ + { + /* XXX: could leave value on stack top and goto replace_top_a; */ + duk__vm_arith_binary_op(thr, DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins), DUK_DEC_A(ins), op); + break; + } +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_SUB_RR: { + duk__vm_arith_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_SUB); + break; + } + case DUK_OP_SUB_CR: { + duk__vm_arith_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_SUB); + break; + } + case DUK_OP_SUB_RC: { + duk__vm_arith_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_SUB); + break; + } + case DUK_OP_SUB_CC: { + duk__vm_arith_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_SUB); + break; + } + case DUK_OP_MUL_RR: { + duk__vm_arith_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_MUL); + break; + } + case DUK_OP_MUL_CR: { + duk__vm_arith_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_MUL); + break; + } + case DUK_OP_MUL_RC: { + duk__vm_arith_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_MUL); + break; + } + case DUK_OP_MUL_CC: { + duk__vm_arith_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_MUL); + break; + } + case DUK_OP_DIV_RR: { + duk__vm_arith_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_DIV); + break; + } + case DUK_OP_DIV_CR: { + duk__vm_arith_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_DIV); + break; + } + case DUK_OP_DIV_RC: { + duk__vm_arith_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_DIV); + break; + } + case DUK_OP_DIV_CC: { + duk__vm_arith_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_DIV); + break; + } + case DUK_OP_MOD_RR: { + duk__vm_arith_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_MOD); + break; + } + case DUK_OP_MOD_CR: { + duk__vm_arith_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_MOD); + break; + } + case DUK_OP_MOD_RC: { + duk__vm_arith_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_MOD); + break; + } + case DUK_OP_MOD_CC: { + duk__vm_arith_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_MOD); + break; + } +#if defined(DUK_USE_ES7_EXP_OPERATOR) + case DUK_OP_EXP_RR: { + duk__vm_arith_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_EXP); + break; + } + case DUK_OP_EXP_CR: { + duk__vm_arith_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_EXP); + break; + } + case DUK_OP_EXP_RC: { + duk__vm_arith_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_EXP); + break; + } + case DUK_OP_EXP_CC: { + duk__vm_arith_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_EXP); + break; + } +#endif /* DUK_USE_ES7_EXP_OPERATOR */ +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_BAND_RR: + case DUK_OP_BAND_CR: + case DUK_OP_BAND_RC: + case DUK_OP_BAND_CC: + case DUK_OP_BOR_RR: + case DUK_OP_BOR_CR: + case DUK_OP_BOR_RC: + case DUK_OP_BOR_CC: + case DUK_OP_BXOR_RR: + case DUK_OP_BXOR_CR: + case DUK_OP_BXOR_RC: + case DUK_OP_BXOR_CC: + case DUK_OP_BASL_RR: + case DUK_OP_BASL_CR: + case DUK_OP_BASL_RC: + case DUK_OP_BASL_CC: + case DUK_OP_BLSR_RR: + case DUK_OP_BLSR_CR: + case DUK_OP_BLSR_RC: + case DUK_OP_BLSR_CC: + case DUK_OP_BASR_RR: + case DUK_OP_BASR_CR: + case DUK_OP_BASR_RC: + case DUK_OP_BASR_CC: { + /* XXX: could leave value on stack top and goto replace_top_a; */ + duk__vm_bitwise_binary_op(thr, DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins), DUK_DEC_A(ins), op); + break; + } +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_BAND_RR: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BAND); + break; + } + case DUK_OP_BAND_CR: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BAND); + break; + } + case DUK_OP_BAND_RC: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BAND); + break; + } + case DUK_OP_BAND_CC: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BAND); + break; + } + case DUK_OP_BOR_RR: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BOR); + break; + } + case DUK_OP_BOR_CR: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BOR); + break; + } + case DUK_OP_BOR_RC: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BOR); + break; + } + case DUK_OP_BOR_CC: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BOR); + break; + } + case DUK_OP_BXOR_RR: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BXOR); + break; + } + case DUK_OP_BXOR_CR: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BXOR); + break; + } + case DUK_OP_BXOR_RC: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BXOR); + break; + } + case DUK_OP_BXOR_CC: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BXOR); + break; + } + case DUK_OP_BASL_RR: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BASL); + break; + } + case DUK_OP_BASL_CR: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BASL); + break; + } + case DUK_OP_BASL_RC: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BASL); + break; + } + case DUK_OP_BASL_CC: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BASL); + break; + } + case DUK_OP_BLSR_RR: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BLSR); + break; + } + case DUK_OP_BLSR_CR: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BLSR); + break; + } + case DUK_OP_BLSR_RC: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BLSR); + break; + } + case DUK_OP_BLSR_CC: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BLSR); + break; + } + case DUK_OP_BASR_RR: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BASR); + break; + } + case DUK_OP_BASR_CR: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__REGP_C(ins), DUK_DEC_A(ins), DUK_OP_BASR); + break; + } + case DUK_OP_BASR_RC: { + duk__vm_bitwise_binary_op(thr, DUK__REGP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BASR); + break; + } + case DUK_OP_BASR_CC: { + duk__vm_bitwise_binary_op(thr, DUK__CONSTP_B(ins), DUK__CONSTP_C(ins), DUK_DEC_A(ins), DUK_OP_BASR); + break; + } +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + + /* For INSTOF and IN, B is always a register. */ +#define DUK__INSTOF_BODY(barg, carg) \ + { \ + duk_bool_t tmp; \ + tmp = duk_js_instanceof(thr, (barg), (carg)); \ + DUK_ASSERT(tmp == 0 || tmp == 1); \ + DUK__REPLACE_BOOL_A_BREAK(tmp); \ + } +#define DUK__IN_BODY(barg, carg) \ + { \ + duk_bool_t tmp; \ + tmp = duk_js_in(thr, (barg), (carg)); \ + DUK_ASSERT(tmp == 0 || tmp == 1); \ + DUK__REPLACE_BOOL_A_BREAK(tmp); \ + } +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_INSTOF_RR: + case DUK_OP_INSTOF_CR: + case DUK_OP_INSTOF_RC: + case DUK_OP_INSTOF_CC: + DUK__INSTOF_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); + case DUK_OP_IN_RR: + case DUK_OP_IN_CR: + case DUK_OP_IN_RC: + case DUK_OP_IN_CC: + DUK__IN_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_INSTOF_RR: + DUK__INSTOF_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_INSTOF_CR: + DUK__INSTOF_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_INSTOF_RC: + DUK__INSTOF_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_INSTOF_CC: + DUK__INSTOF_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_IN_RR: + DUK__IN_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_IN_CR: + DUK__IN_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_IN_RC: + DUK__IN_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_IN_CC: + DUK__IN_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + + /* Pre/post inc/dec for register variables, important for loops. */ +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_PREINCR: + case DUK_OP_PREDECR: + case DUK_OP_POSTINCR: + case DUK_OP_POSTDECR: { + duk__prepost_incdec_reg_helper(thr, DUK__REGP_A(ins), DUK__REGP_BC(ins), op); + break; + } + case DUK_OP_PREINCV: + case DUK_OP_PREDECV: + case DUK_OP_POSTINCV: + case DUK_OP_POSTDECV: { + duk__prepost_incdec_var_helper(thr, DUK_DEC_A(ins), DUK__CONSTP_BC(ins), op, DUK__STRICT()); + break; + } +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_PREINCR: { + duk__prepost_incdec_reg_helper(thr, DUK__REGP_A(ins), DUK__REGP_BC(ins), DUK_OP_PREINCR); + break; + } + case DUK_OP_PREDECR: { + duk__prepost_incdec_reg_helper(thr, DUK__REGP_A(ins), DUK__REGP_BC(ins), DUK_OP_PREDECR); + break; + } + case DUK_OP_POSTINCR: { + duk__prepost_incdec_reg_helper(thr, DUK__REGP_A(ins), DUK__REGP_BC(ins), DUK_OP_POSTINCR); + break; + } + case DUK_OP_POSTDECR: { + duk__prepost_incdec_reg_helper(thr, DUK__REGP_A(ins), DUK__REGP_BC(ins), DUK_OP_POSTDECR); + break; + } + case DUK_OP_PREINCV: { + duk__prepost_incdec_var_helper(thr, DUK_DEC_A(ins), DUK__CONSTP_BC(ins), DUK_OP_PREINCV, DUK__STRICT()); + break; + } + case DUK_OP_PREDECV: { + duk__prepost_incdec_var_helper(thr, DUK_DEC_A(ins), DUK__CONSTP_BC(ins), DUK_OP_PREDECV, DUK__STRICT()); + break; + } + case DUK_OP_POSTINCV: { + duk__prepost_incdec_var_helper(thr, DUK_DEC_A(ins), DUK__CONSTP_BC(ins), DUK_OP_POSTINCV, DUK__STRICT()); + break; + } + case DUK_OP_POSTDECV: { + duk__prepost_incdec_var_helper(thr, DUK_DEC_A(ins), DUK__CONSTP_BC(ins), DUK_OP_POSTDECV, DUK__STRICT()); + break; + } +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + + /* XXX: Move to separate helper, optimize for perf/size separately. */ + /* Preinc/predec for object properties. */ + case DUK_OP_PREINCP_RR: + case DUK_OP_PREINCP_CR: + case DUK_OP_PREINCP_RC: + case DUK_OP_PREINCP_CC: + case DUK_OP_PREDECP_RR: + case DUK_OP_PREDECP_CR: + case DUK_OP_PREDECP_RC: + case DUK_OP_PREDECP_CC: + case DUK_OP_POSTINCP_RR: + case DUK_OP_POSTINCP_CR: + case DUK_OP_POSTINCP_RC: + case DUK_OP_POSTINCP_CC: + case DUK_OP_POSTDECP_RR: + case DUK_OP_POSTDECP_CR: + case DUK_OP_POSTDECP_RC: + case DUK_OP_POSTDECP_CC: { + duk_tval *tv_obj; + duk_tval *tv_key; + duk_tval *tv_val; + duk_bool_t rc; + duk_double_t x, y, z; +#if !defined(DUK_USE_EXEC_PREFER_SIZE) + duk_tval *tv_dst; +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + + /* A -> target reg + * B -> object reg/const (may be const e.g. in "'foo'[1]") + * C -> key reg/const + */ + + /* Opcode bits 0-1 are used to distinguish reg/const variants. + * Opcode bits 2-3 are used to distinguish inc/dec variants: + * Bit 2 = inc(0)/dec(1), bit 3 = pre(0)/post(1). + */ + DUK_ASSERT((DUK_OP_PREINCP_RR & 0x0c) == 0x00); + DUK_ASSERT((DUK_OP_PREDECP_RR & 0x0c) == 0x04); + DUK_ASSERT((DUK_OP_POSTINCP_RR & 0x0c) == 0x08); + DUK_ASSERT((DUK_OP_POSTDECP_RR & 0x0c) == 0x0c); + + tv_obj = DUK__REGCONSTP_B(ins); + tv_key = DUK__REGCONSTP_C(ins); + rc = duk_hobject_getprop(thr, tv_obj, tv_key); /* -> [val] */ + DUK_UNREF(rc); /* ignore */ + tv_obj = NULL; /* invalidated */ + tv_key = NULL; /* invalidated */ + + /* XXX: Fastint fast path would be useful here. Also fastints + * now lose their fastint status in current handling which is + * not intuitive. + */ + + x = duk_to_number_m1(thr); + duk_pop_unsafe(thr); + if (ins & DUK_BC_INCDECP_FLAG_DEC) { + y = x - 1.0; + } else { + y = x + 1.0; + } + + duk_push_number(thr, y); + tv_val = DUK_GET_TVAL_NEGIDX(thr, -1); + DUK_ASSERT(tv_val != NULL); + tv_obj = DUK__REGCONSTP_B(ins); + tv_key = DUK__REGCONSTP_C(ins); + rc = duk_hobject_putprop(thr, tv_obj, tv_key, tv_val, DUK__STRICT()); + DUK_UNREF(rc); /* ignore */ + tv_obj = NULL; /* invalidated */ + tv_key = NULL; /* invalidated */ + duk_pop_unsafe(thr); + + z = (ins & DUK_BC_INCDECP_FLAG_POST) ? x : y; +#if defined(DUK_USE_EXEC_PREFER_SIZE) + duk_push_number(thr, z); + DUK__REPLACE_TOP_A_BREAK(); +#else + tv_dst = DUK__REGP_A(ins); + DUK_TVAL_SET_NUMBER_UPDREF(thr, tv_dst, z); + break; +#endif + } + + /* XXX: GETPROP where object is 'this', GETPROPT? + * Occurs relatively often in object oriented code. + */ + +#define DUK__GETPROP_BODY(barg, carg) \ + { \ + /* A -> target reg \ + * B -> object reg/const (may be const e.g. in "'foo'[1]") \ + * C -> key reg/const \ + */ \ + (void) duk_hobject_getprop(thr, (barg), (carg)); \ + DUK__REPLACE_TOP_A_BREAK(); \ + } +#define DUK__GETPROPC_BODY(barg, carg) \ + { \ + /* Same as GETPROP but callability check for property-based calls. */ \ + duk_tval *tv__targ; \ + (void) duk_hobject_getprop(thr, (barg), (carg)); \ + DUK_GC_TORTURE(thr->heap); \ + tv__targ = DUK_GET_TVAL_NEGIDX(thr, -1); \ + if (DUK_UNLIKELY(!duk_is_callable_tval(thr, tv__targ))) { \ + /* Here we intentionally re-evaluate the macro \ + * arguments to deal with potentially changed \ + * valstack base pointer! \ + */ \ + duk_call_setup_propcall_error(thr, (barg), (carg)); \ + } \ + DUK__REPLACE_TOP_A_BREAK(); \ + } +#define DUK__PUTPROP_BODY(aarg, barg, carg) \ + { \ + /* A -> object reg \ + * B -> key reg/const \ + * C -> value reg/const \ + * \ + * Note: intentional difference to register arrangement \ + * of e.g. GETPROP; 'A' must contain a register-only value. \ + */ \ + (void) duk_hobject_putprop(thr, (aarg), (barg), (carg), DUK__STRICT()); \ + break; \ + } +#define DUK__DELPROP_BODY(barg, carg) \ + { \ + /* A -> result reg \ + * B -> object reg \ + * C -> key reg/const \ + */ \ + duk_bool_t rc; \ + rc = duk_hobject_delprop(thr, (barg), (carg), DUK__STRICT()); \ + DUK_ASSERT(rc == 0 || rc == 1); \ + DUK__REPLACE_BOOL_A_BREAK(rc); \ + } +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_GETPROP_RR: + case DUK_OP_GETPROP_CR: + case DUK_OP_GETPROP_RC: + case DUK_OP_GETPROP_CC: + DUK__GETPROP_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); +#if defined(DUK_USE_VERBOSE_ERRORS) + case DUK_OP_GETPROPC_RR: + case DUK_OP_GETPROPC_CR: + case DUK_OP_GETPROPC_RC: + case DUK_OP_GETPROPC_CC: + DUK__GETPROPC_BODY(DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); +#endif + case DUK_OP_PUTPROP_RR: + case DUK_OP_PUTPROP_CR: + case DUK_OP_PUTPROP_RC: + case DUK_OP_PUTPROP_CC: + DUK__PUTPROP_BODY(DUK__REGP_A(ins), DUK__REGCONSTP_B(ins), DUK__REGCONSTP_C(ins)); + case DUK_OP_DELPROP_RR: + case DUK_OP_DELPROP_RC: /* B is always reg */ + DUK__DELPROP_BODY(DUK__REGP_B(ins), DUK__REGCONSTP_C(ins)); +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_GETPROP_RR: + DUK__GETPROP_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_GETPROP_CR: + DUK__GETPROP_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_GETPROP_RC: + DUK__GETPROP_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_GETPROP_CC: + DUK__GETPROP_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); +#if defined(DUK_USE_VERBOSE_ERRORS) + case DUK_OP_GETPROPC_RR: + DUK__GETPROPC_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_GETPROPC_CR: + DUK__GETPROPC_BODY(DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_GETPROPC_RC: + DUK__GETPROPC_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_GETPROPC_CC: + DUK__GETPROPC_BODY(DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); +#endif + case DUK_OP_PUTPROP_RR: + DUK__PUTPROP_BODY(DUK__REGP_A(ins), DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_PUTPROP_CR: + DUK__PUTPROP_BODY(DUK__REGP_A(ins), DUK__CONSTP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_PUTPROP_RC: + DUK__PUTPROP_BODY(DUK__REGP_A(ins), DUK__REGP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_PUTPROP_CC: + DUK__PUTPROP_BODY(DUK__REGP_A(ins), DUK__CONSTP_B(ins), DUK__CONSTP_C(ins)); + case DUK_OP_DELPROP_RR: /* B is always reg */ + DUK__DELPROP_BODY(DUK__REGP_B(ins), DUK__REGP_C(ins)); + case DUK_OP_DELPROP_RC: + DUK__DELPROP_BODY(DUK__REGP_B(ins), DUK__CONSTP_C(ins)); +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + + /* No fast path for DECLVAR now, it's quite a rare instruction. */ + case DUK_OP_DECLVAR_RR: + case DUK_OP_DECLVAR_CR: + case DUK_OP_DECLVAR_RC: + case DUK_OP_DECLVAR_CC: { + duk_activation *act; + duk_small_uint_fast_t a = DUK_DEC_A(ins); + duk_tval *tv1; + duk_hstring *name; + duk_small_uint_t prop_flags; + duk_bool_t is_func_decl; + + tv1 = DUK__REGCONSTP_B(ins); + DUK_ASSERT(DUK_TVAL_IS_STRING(tv1)); + name = DUK_TVAL_GET_STRING(tv1); + DUK_ASSERT(name != NULL); + + is_func_decl = ((a & DUK_BC_DECLVAR_FLAG_FUNC_DECL) != 0); + + /* XXX: declvar takes an duk_tval pointer, which is awkward and + * should be reworked. + */ + + /* Compiler is responsible for selecting property flags (configurability, + * writability, etc). + */ + prop_flags = a & DUK_PROPDESC_FLAGS_MASK; + + if (is_func_decl) { + duk_push_tval(thr, DUK__REGCONSTP_C(ins)); + } else { + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top)); /* valstack policy */ + thr->valstack_top++; + } + tv1 = DUK_GET_TVAL_NEGIDX(thr, -1); + + act = thr->callstack_curr; + if (duk_js_declvar_activation(thr, act, name, tv1, prop_flags, is_func_decl)) { + if (is_func_decl) { + /* Already declared, update value. */ + tv1 = DUK_GET_TVAL_NEGIDX(thr, -1); + duk_js_putvar_activation(thr, act, name, tv1, DUK__STRICT()); + } else { + /* Already declared but no initializer value + * (e.g. 'var xyz;'), no-op. + */ + } + } + + duk_pop_unsafe(thr); + break; + } + +#if defined(DUK_USE_REGEXP_SUPPORT) + /* The compiler should never emit DUK_OP_REGEXP if there is no + * regexp support. + */ + case DUK_OP_REGEXP_RR: + case DUK_OP_REGEXP_CR: + case DUK_OP_REGEXP_RC: + case DUK_OP_REGEXP_CC: { + /* A -> target register + * B -> bytecode (also contains flags) + * C -> escaped source + */ + + duk_push_tval(thr, DUK__REGCONSTP_C(ins)); + duk_push_tval(thr, DUK__REGCONSTP_B(ins)); /* -> [ ... escaped_source bytecode ] */ + duk_regexp_create_instance(thr); /* -> [ ... regexp_instance ] */ + DUK__REPLACE_TOP_A_BREAK(); + } +#endif /* DUK_USE_REGEXP_SUPPORT */ + + /* XXX: 'c' is unused, use whole BC, etc. */ + case DUK_OP_CSVAR_RR: + case DUK_OP_CSVAR_CR: + case DUK_OP_CSVAR_RC: + case DUK_OP_CSVAR_CC: { + /* The speciality of calling through a variable binding is that the + * 'this' value may be provided by the variable lookup: E5 Section 6.b.i. + * + * The only (standard) case where the 'this' binding is non-null is when + * (1) the variable is found in an object environment record, and + * (2) that object environment record is a 'with' block. + */ + + duk_activation *act; + duk_uint_fast_t idx; + duk_tval *tv1; + duk_hstring *name; + + /* A -> target registers (A, A + 1) for call setup + * B -> identifier name, usually constant but can be a register due to shuffling + */ + + tv1 = DUK__REGCONSTP_B(ins); + DUK_ASSERT(DUK_TVAL_IS_STRING(tv1)); + name = DUK_TVAL_GET_STRING(tv1); + DUK_ASSERT(name != NULL); + act = thr->callstack_curr; + (void) duk_js_getvar_activation(thr, act, name, 1 /*throw*/); /* -> [... val this] */ + + idx = (duk_uint_fast_t) DUK_DEC_A(ins); + + /* Could add direct value stack handling. */ + duk_replace(thr, (duk_idx_t) (idx + 1)); /* 'this' binding */ + duk_replace(thr, (duk_idx_t) idx); /* variable value (function, we hope, not checked here) */ + break; + } + + case DUK_OP_CLOSURE: { + duk_activation *act; + duk_hcompfunc *fun_act; + duk_small_uint_fast_t bc = DUK_DEC_BC(ins); + duk_hobject *fun_temp; + + /* A -> target reg + * BC -> inner function index + */ + + DUK_DDD(DUK_DDDPRINT("CLOSURE to target register %ld, fnum %ld (count %ld)", + (long) DUK_DEC_A(ins), + (long) DUK_DEC_BC(ins), + (long) DUK_HCOMPFUNC_GET_FUNCS_COUNT(thr->heap, DUK__FUN()))); + + DUK_ASSERT_DISABLE(bc >= 0); /* unsigned */ + DUK_ASSERT((duk_uint_t) bc < (duk_uint_t) DUK_HCOMPFUNC_GET_FUNCS_COUNT(thr->heap, DUK__FUN())); + + act = thr->callstack_curr; + fun_act = (duk_hcompfunc *) DUK_ACT_GET_FUNC(act); + fun_temp = DUK_HCOMPFUNC_GET_FUNCS_BASE(thr->heap, fun_act)[bc]; + DUK_ASSERT(fun_temp != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC(fun_temp)); + + DUK_DDD( + DUK_DDDPRINT("CLOSURE: function template is: %p -> %!O", (void *) fun_temp, (duk_heaphdr *) fun_temp)); + + if (act->lex_env == NULL) { + DUK_ASSERT(act->var_env == NULL); + duk_js_init_activation_environment_records_delayed(thr, act); + act = thr->callstack_curr; + } + DUK_ASSERT(act->lex_env != NULL); + DUK_ASSERT(act->var_env != NULL); + + /* functions always have a NEWENV flag, i.e. they get a + * new variable declaration environment, so only lex_env + * matters here. + */ + duk_js_push_closure(thr, (duk_hcompfunc *) fun_temp, act->var_env, act->lex_env, 1 /*add_auto_proto*/); + DUK__REPLACE_TOP_A_BREAK(); + } + + case DUK_OP_GETVAR: { + duk_activation *act; + duk_tval *tv1; + duk_hstring *name; + + tv1 = DUK__CONSTP_BC(ins); + DUK_ASSERT(DUK_TVAL_IS_STRING(tv1)); + name = DUK_TVAL_GET_STRING(tv1); + DUK_ASSERT(name != NULL); + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + (void) duk_js_getvar_activation(thr, act, name, 1 /*throw*/); /* -> [... val this] */ + duk_pop_unsafe(thr); /* 'this' binding is not needed here */ + DUK__REPLACE_TOP_A_BREAK(); + } + + case DUK_OP_PUTVAR: { + duk_activation *act; + duk_tval *tv1; + duk_hstring *name; + + tv1 = DUK__CONSTP_BC(ins); + DUK_ASSERT(DUK_TVAL_IS_STRING(tv1)); + name = DUK_TVAL_GET_STRING(tv1); + DUK_ASSERT(name != NULL); + + /* XXX: putvar takes a duk_tval pointer, which is awkward and + * should be reworked. + */ + + tv1 = DUK__REGP_A(ins); /* val */ + act = thr->callstack_curr; + duk_js_putvar_activation(thr, act, name, tv1, DUK__STRICT()); + break; + } + + case DUK_OP_DELVAR: { + duk_activation *act; + duk_tval *tv1; + duk_hstring *name; + duk_bool_t rc; + + tv1 = DUK__CONSTP_BC(ins); + DUK_ASSERT(DUK_TVAL_IS_STRING(tv1)); + name = DUK_TVAL_GET_STRING(tv1); + DUK_ASSERT(name != NULL); + act = thr->callstack_curr; + rc = duk_js_delvar_activation(thr, act, name); + DUK__REPLACE_BOOL_A_BREAK(rc); + } + + case DUK_OP_JUMP: { + /* Note: without explicit cast to signed, MSVC will + * apparently generate a large positive jump when the + * bias-corrected value would normally be negative. + */ + curr_pc += (duk_int_fast_t) DUK_DEC_ABC(ins) - (duk_int_fast_t) DUK_BC_JUMP_BIAS; + break; + } + +#define DUK__RETURN_SHARED() \ + do { \ + duk_small_uint_t ret_result; \ + /* duk__handle_return() is guaranteed never to throw, except \ + * for potential out-of-memory situations which will then \ + * propagate out of the executor longjmp handler. \ + */ \ + DUK_ASSERT(thr->ptr_curr_pc == NULL); \ + ret_result = duk__handle_return(thr, entry_act); \ + if (ret_result == DUK__RETHAND_RESTART) { \ + goto restart_execution; \ + } \ + DUK_ASSERT(ret_result == DUK__RETHAND_FINISHED); \ + return; \ + } while (0) +#if defined(DUK_USE_EXEC_PREFER_SIZE) + case DUK_OP_RETREG: + case DUK_OP_RETCONST: + case DUK_OP_RETCONSTN: + case DUK_OP_RETUNDEF: { + /* BC -> return value reg/const */ + + DUK__SYNC_AND_NULL_CURR_PC(); + + if (op == DUK_OP_RETREG) { + duk_push_tval(thr, DUK__REGP_BC(ins)); + } else if (op == DUK_OP_RETUNDEF) { + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top)); /* valstack policy */ + thr->valstack_top++; + } else { + DUK_ASSERT(op == DUK_OP_RETCONST || op == DUK_OP_RETCONSTN); + duk_push_tval(thr, DUK__CONSTP_BC(ins)); + } + + DUK__RETURN_SHARED(); + } +#else /* DUK_USE_EXEC_PREFER_SIZE */ + case DUK_OP_RETREG: { + duk_tval *tv; + + DUK__SYNC_AND_NULL_CURR_PC(); + tv = DUK__REGP_BC(ins); + DUK_TVAL_SET_TVAL(thr->valstack_top, tv); + DUK_TVAL_INCREF(thr, tv); + thr->valstack_top++; + DUK__RETURN_SHARED(); + } + /* This will be unused without refcounting. */ + case DUK_OP_RETCONST: { + duk_tval *tv; + + DUK__SYNC_AND_NULL_CURR_PC(); + tv = DUK__CONSTP_BC(ins); + DUK_TVAL_SET_TVAL(thr->valstack_top, tv); + DUK_TVAL_INCREF(thr, tv); + thr->valstack_top++; + DUK__RETURN_SHARED(); + } + case DUK_OP_RETCONSTN: { + duk_tval *tv; + + DUK__SYNC_AND_NULL_CURR_PC(); + tv = DUK__CONSTP_BC(ins); + DUK_TVAL_SET_TVAL(thr->valstack_top, tv); +#if defined(DUK_USE_REFERENCE_COUNTING) + /* Without refcounting only RETCONSTN is used. */ + DUK_ASSERT(!DUK_TVAL_IS_HEAP_ALLOCATED(tv)); /* no INCREF for this constant */ +#endif + thr->valstack_top++; + DUK__RETURN_SHARED(); + } + case DUK_OP_RETUNDEF: { + DUK__SYNC_AND_NULL_CURR_PC(); + thr->valstack_top++; /* value at valstack top is already undefined by valstack policy */ + DUK_ASSERT(DUK_TVAL_IS_UNDEFINED(thr->valstack_top)); + DUK__RETURN_SHARED(); + } +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + + case DUK_OP_LABEL: { + duk_activation *act; + duk_catcher *cat; + duk_small_uint_fast_t bc = DUK_DEC_BC(ins); + + /* Allocate catcher and populate it (must be atomic). */ + + cat = duk_hthread_catcher_alloc(thr); + DUK_ASSERT(cat != NULL); + + cat->flags = (duk_uint32_t) (DUK_CAT_TYPE_LABEL | (bc << DUK_CAT_LABEL_SHIFT)); + cat->pc_base = (duk_instr_t *) curr_pc; /* pre-incremented, points to first jump slot */ + cat->idx_base = 0; /* unused for label */ + cat->h_varname = NULL; + + act = thr->callstack_curr; + DUK_ASSERT(act != NULL); + cat->parent = act->cat; + act->cat = cat; + + DUK_DDD(DUK_DDDPRINT("LABEL catcher: flags=0x%08lx, pc_base=%ld, " + "idx_base=%ld, h_varname=%!O, label_id=%ld", + (long) cat->flags, + (long) cat->pc_base, + (long) cat->idx_base, + (duk_heaphdr *) cat->h_varname, + (long) DUK_CAT_GET_LABEL(cat))); + + curr_pc += 2; /* skip jump slots */ + break; + } + + case DUK_OP_ENDLABEL: { + duk_activation *act; +#if (defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2)) || defined(DUK_USE_ASSERTIONS) + duk_small_uint_fast_t bc = DUK_DEC_BC(ins); +#endif +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) + DUK_DDD(DUK_DDDPRINT("ENDLABEL %ld", (long) bc)); +#endif + + act = thr->callstack_curr; + DUK_ASSERT(act->cat != NULL); + DUK_ASSERT(DUK_CAT_GET_TYPE(act->cat) == DUK_CAT_TYPE_LABEL); + DUK_ASSERT((duk_uint_fast_t) DUK_CAT_GET_LABEL(act->cat) == bc); + duk_hthread_catcher_unwind_nolexenv_norz(thr, act); + + /* no need to unwind callstack */ + break; + } + + case DUK_OP_BREAK: { + duk_small_uint_fast_t bc = DUK_DEC_BC(ins); + + DUK__SYNC_AND_NULL_CURR_PC(); + duk__handle_break_or_continue(thr, (duk_uint_t) bc, DUK_LJ_TYPE_BREAK); + goto restart_execution; + } + + case DUK_OP_CONTINUE: { + duk_small_uint_fast_t bc = DUK_DEC_BC(ins); + + DUK__SYNC_AND_NULL_CURR_PC(); + duk__handle_break_or_continue(thr, (duk_uint_t) bc, DUK_LJ_TYPE_CONTINUE); + goto restart_execution; + } + + /* XXX: move to helper, too large to be inline here */ + case DUK_OP_TRYCATCH: { + duk__handle_op_trycatch(thr, ins, curr_pc); + curr_pc += 2; /* skip jump slots */ + break; + } + + case DUK_OP_ENDTRY: { + curr_pc = duk__handle_op_endtry(thr, ins); + break; + } + + case DUK_OP_ENDCATCH: { + duk__handle_op_endcatch(thr, ins); + break; + } + + case DUK_OP_ENDFIN: { + /* Sync and NULL early. */ + DUK__SYNC_AND_NULL_CURR_PC(); + + if (duk__handle_op_endfin(thr, ins, entry_act) != 0) { + return; + } + + /* Must restart because we NULLed out curr_pc. */ + goto restart_execution; + } + + case DUK_OP_THROW: { + duk_small_uint_fast_t bc = DUK_DEC_BC(ins); + + /* Note: errors are augmented when they are created, not + * when they are thrown. So, don't augment here, it would + * break re-throwing for instance. + */ + + /* Sync so that augmentation sees up-to-date activations, NULL + * thr->ptr_curr_pc so that it's not used if side effects occur + * in augmentation or longjmp handling. + */ + DUK__SYNC_AND_NULL_CURR_PC(); + + duk_dup(thr, (duk_idx_t) bc); + DUK_DDD(DUK_DDDPRINT("THROW ERROR (BYTECODE): %!dT (before throw augment)", + (duk_tval *) duk_get_tval(thr, -1))); +#if defined(DUK_USE_AUGMENT_ERROR_THROW) + duk_err_augment_error_throw(thr); + DUK_DDD( + DUK_DDDPRINT("THROW ERROR (BYTECODE): %!dT (after throw augment)", (duk_tval *) duk_get_tval(thr, -1))); +#endif + + duk_err_setup_ljstate1(thr, DUK_LJ_TYPE_THROW, DUK_GET_TVAL_NEGIDX(thr, -1)); +#if defined(DUK_USE_DEBUGGER_SUPPORT) + duk_err_check_debugger_integration(thr); +#endif + + DUK_ASSERT(thr->heap->lj.jmpbuf_ptr != NULL); /* always in executor */ + duk_err_longjmp(thr); + DUK_UNREACHABLE(); + break; + } + + case DUK_OP_CSREG: { + /* + * Assuming a register binds to a variable declared within this + * function (a declarative binding), the 'this' for the call + * setup is always 'undefined'. E5 Section 10.2.1.1.6. + */ + + duk_small_uint_fast_t a = DUK_DEC_A(ins); + duk_small_uint_fast_t bc = DUK_DEC_BC(ins); + + /* A -> register containing target function (not type checked here) + * BC -> target registers (BC, BC + 1) for call setup + */ + +#if defined(DUK_USE_PREFER_SIZE) + duk_dup(thr, (duk_idx_t) a); + duk_replace(thr, (duk_idx_t) bc); + duk_to_undefined(thr, (duk_idx_t) (bc + 1)); +#else + duk_tval *tv1; + duk_tval *tv2; + duk_tval *tv3; + duk_tval tv_tmp1; + duk_tval tv_tmp2; + + tv1 = DUK__REGP(bc); + tv2 = tv1 + 1; + DUK_TVAL_SET_TVAL(&tv_tmp1, tv1); + DUK_TVAL_SET_TVAL(&tv_tmp2, tv2); + tv3 = DUK__REGP(a); + DUK_TVAL_SET_TVAL(tv1, tv3); + DUK_TVAL_INCREF(thr, tv1); /* no side effects */ + DUK_TVAL_SET_UNDEFINED(tv2); /* no need for incref */ + DUK_TVAL_DECREF(thr, &tv_tmp1); + DUK_TVAL_DECREF(thr, &tv_tmp2); +#endif + break; + } + + /* XXX: in some cases it's faster NOT to reuse the value + * stack but rather copy the arguments on top of the stack + * (mainly when the calling value stack is large and the value + * stack resize would be large). + */ + + case DUK_OP_CALL0: + case DUK_OP_CALL1: + case DUK_OP_CALL2: + case DUK_OP_CALL3: + case DUK_OP_CALL4: + case DUK_OP_CALL5: + case DUK_OP_CALL6: + case DUK_OP_CALL7: { + /* Opcode packs 4 flag bits: 1 for indirect, 3 map + * 1:1 to three lowest call handling flags. + * + * A -> nargs or register with nargs (indirect) + * BC -> base register for call (base -> func, base+1 -> this, base+2 -> arg1 ... base+2+N-1 -> argN) + */ + + duk_idx_t nargs; + duk_idx_t idx; + duk_small_uint_t call_flags; +#if !defined(DUK_USE_EXEC_FUN_LOCAL) + duk_hcompfunc *fun; +#endif + + DUK_ASSERT((DUK_OP_CALL0 & 0x0fU) == 0); + DUK_ASSERT((ins & DUK_BC_CALL_FLAG_INDIRECT) == 0); + + nargs = (duk_idx_t) DUK_DEC_A(ins); + call_flags = (ins & 0x07U) | DUK_CALL_FLAG_ALLOW_ECMATOECMA; + idx = (duk_idx_t) DUK_DEC_BC(ins); + + if (duk__executor_handle_call(thr, idx, nargs, call_flags)) { + /* curr_pc synced by duk_handle_call_unprotected() */ + DUK_ASSERT(thr->ptr_curr_pc == NULL); + goto restart_execution; + } + DUK_ASSERT(thr->ptr_curr_pc != NULL); + + /* duk_js_call.c is required to restore the stack reserve + * so we only need to reset the top. + */ +#if !defined(DUK_USE_EXEC_FUN_LOCAL) + fun = DUK__FUN(); +#endif + duk_set_top_unsafe(thr, (duk_idx_t) fun->nregs); + + /* No need to reinit setjmp() catchpoint, as call handling + * will store and restore our state. + * + * When debugger is enabled, we need to recheck the activation + * status after returning. This is now handled by call handling + * and heap->dbg_force_restart. + */ + break; + } + + case DUK_OP_CALL8: + case DUK_OP_CALL9: + case DUK_OP_CALL10: + case DUK_OP_CALL11: + case DUK_OP_CALL12: + case DUK_OP_CALL13: + case DUK_OP_CALL14: + case DUK_OP_CALL15: { + /* Indirect variant. */ + duk_uint_fast_t nargs; + duk_idx_t idx; + duk_small_uint_t call_flags; +#if !defined(DUK_USE_EXEC_FUN_LOCAL) + duk_hcompfunc *fun; +#endif + + DUK_ASSERT((DUK_OP_CALL0 & 0x0fU) == 0); + DUK_ASSERT((ins & DUK_BC_CALL_FLAG_INDIRECT) != 0); + + nargs = (duk_uint_fast_t) DUK_DEC_A(ins); + DUK__LOOKUP_INDIRECT(nargs); + call_flags = (ins & 0x07U) | DUK_CALL_FLAG_ALLOW_ECMATOECMA; + idx = (duk_idx_t) DUK_DEC_BC(ins); + + if (duk__executor_handle_call(thr, idx, (duk_idx_t) nargs, call_flags)) { + DUK_ASSERT(thr->ptr_curr_pc == NULL); + goto restart_execution; + } + DUK_ASSERT(thr->ptr_curr_pc != NULL); + +#if !defined(DUK_USE_EXEC_FUN_LOCAL) + fun = DUK__FUN(); +#endif + duk_set_top_unsafe(thr, (duk_idx_t) fun->nregs); + break; + } + + case DUK_OP_NEWOBJ: { + duk_push_object(thr); +#if defined(DUK_USE_ASSERTIONS) + { + duk_hobject *h; + h = duk_require_hobject(thr, -1); + DUK_ASSERT(DUK_HOBJECT_GET_ESIZE(h) == 0); + DUK_ASSERT(DUK_HOBJECT_GET_ENEXT(h) == 0); + DUK_ASSERT(DUK_HOBJECT_GET_ASIZE(h) == 0); + DUK_ASSERT(DUK_HOBJECT_GET_HSIZE(h) == 0); + } +#endif +#if !defined(DUK_USE_PREFER_SIZE) + /* XXX: could do a direct props realloc, but need hash size */ + duk_hobject_resize_entrypart(thr, duk_known_hobject(thr, -1), DUK_DEC_A(ins)); +#endif + DUK__REPLACE_TOP_BC_BREAK(); + } + + case DUK_OP_NEWARR: { + duk_push_array(thr); +#if defined(DUK_USE_ASSERTIONS) + { + duk_hobject *h; + h = duk_require_hobject(thr, -1); + DUK_ASSERT(DUK_HOBJECT_GET_ESIZE(h) == 0); + DUK_ASSERT(DUK_HOBJECT_GET_ENEXT(h) == 0); + DUK_ASSERT(DUK_HOBJECT_GET_ASIZE(h) == 0); + DUK_ASSERT(DUK_HOBJECT_GET_HSIZE(h) == 0); + DUK_ASSERT(DUK_HOBJECT_HAS_ARRAY_PART(h)); + } +#endif +#if !defined(DUK_USE_PREFER_SIZE) + duk_hobject_realloc_props(thr, + duk_known_hobject(thr, -1), + 0 /*new_e_size*/, + DUK_DEC_A(ins) /*new_a_size*/, + 0 /*new_h_size*/, + 0 /*abandon_array*/); +#if 0 + duk_hobject_resize_arraypart(thr, duk_known_hobject(thr, -1), DUK_DEC_A(ins)); +#endif +#endif + DUK__REPLACE_TOP_BC_BREAK(); + } + + case DUK_OP_MPUTOBJ: + case DUK_OP_MPUTOBJI: { + duk_idx_t obj_idx; + duk_uint_fast_t idx, idx_end; + duk_small_uint_fast_t count; + + /* A -> register of target object + * B -> first register of key/value pair list + * or register containing first register number if indirect + * C -> number of key/value pairs * 2 + * (= number of value stack indices used starting from 'B') + */ + + obj_idx = DUK_DEC_A(ins); + DUK_ASSERT(duk_is_object(thr, obj_idx)); + + idx = (duk_uint_fast_t) DUK_DEC_B(ins); + if (DUK_DEC_OP(ins) == DUK_OP_MPUTOBJI) { + DUK__LOOKUP_INDIRECT(idx); + } + + count = (duk_small_uint_fast_t) DUK_DEC_C(ins); + DUK_ASSERT(count > 0); /* compiler guarantees */ + idx_end = idx + count; + +#if defined(DUK_USE_EXEC_INDIRECT_BOUND_CHECK) + if (DUK_UNLIKELY(idx_end > (duk_uint_fast_t) duk_get_top(thr))) { + /* XXX: use duk_is_valid_index() instead? */ + /* XXX: improve check; check against nregs, not against top */ + DUK__INTERNAL_ERROR("MPUTOBJ out of bounds"); + } +#endif + + /* Use 'force' flag to duk_def_prop() to ensure that any + * inherited properties don't prevent the operation. + * With ES2015 duplicate properties are allowed, so that we + * must overwrite any previous data or accessor property. + * + * With ES2015 computed property names the literal keys + * may be arbitrary values and need to be ToPropertyKey() + * coerced at runtime. + */ + do { + /* XXX: faster initialization (direct access or better primitives) */ + duk_dup(thr, (duk_idx_t) idx); + duk_dup(thr, (duk_idx_t) (idx + 1)); + duk_def_prop(thr, + obj_idx, + DUK_DEFPROP_HAVE_VALUE | DUK_DEFPROP_FORCE | DUK_DEFPROP_SET_WRITABLE | + DUK_DEFPROP_SET_ENUMERABLE | DUK_DEFPROP_SET_CONFIGURABLE); + idx += 2; + } while (idx < idx_end); + break; + } + + case DUK_OP_INITSET: + case DUK_OP_INITGET: { + duk__handle_op_initset_initget(thr, ins); + break; + } + + case DUK_OP_MPUTARR: + case DUK_OP_MPUTARRI: { + duk_idx_t obj_idx; + duk_uint_fast_t idx, idx_end; + duk_small_uint_fast_t count; + duk_tval *tv1; + duk_uint32_t arr_idx; + + /* A -> register of target object + * B -> first register of value data (start_index, value1, value2, ..., valueN) + * or register containing first register number if indirect + * C -> number of key/value pairs (N) + */ + + obj_idx = DUK_DEC_A(ins); + DUK_ASSERT(duk_is_object(thr, obj_idx)); + + idx = (duk_uint_fast_t) DUK_DEC_B(ins); + if (DUK_DEC_OP(ins) == DUK_OP_MPUTARRI) { + DUK__LOOKUP_INDIRECT(idx); + } + + count = (duk_small_uint_fast_t) DUK_DEC_C(ins); + DUK_ASSERT(count > 0 + 1); /* compiler guarantees */ + idx_end = idx + count; + +#if defined(DUK_USE_EXEC_INDIRECT_BOUND_CHECK) + if (idx_end > (duk_uint_fast_t) duk_get_top(thr)) { + /* XXX: use duk_is_valid_index() instead? */ + /* XXX: improve check; check against nregs, not against top */ + DUK__INTERNAL_ERROR("MPUTARR out of bounds"); + } +#endif + + tv1 = DUK__REGP(idx); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv1)); +#if defined(DUK_USE_FASTINT) + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv1)); + arr_idx = (duk_uint32_t) DUK_TVAL_GET_FASTINT_U32(tv1); +#else + arr_idx = (duk_uint32_t) DUK_TVAL_GET_NUMBER(tv1); +#endif + idx++; + + do { + /* duk_xdef_prop() will define an own property without any array + * special behaviors. We'll need to set the array length explicitly + * in the end. For arrays with elisions, the compiler will emit an + * explicit SETALEN which will update the length. + */ + + /* XXX: because we're dealing with 'own' properties of a fresh array, + * the array initializer should just ensure that the array has a large + * enough array part and write the values directly into array part, + * and finally set 'length' manually in the end (as already happens now). + */ + + duk_dup(thr, (duk_idx_t) idx); + duk_xdef_prop_index_wec(thr, obj_idx, arr_idx); + + idx++; + arr_idx++; + } while (idx < idx_end); + + /* XXX: E5.1 Section 11.1.4 coerces the final length through + * ToUint32() which is odd but happens now as a side effect of + * 'arr_idx' type. + */ + duk_set_length(thr, obj_idx, (duk_size_t) (duk_uarridx_t) arr_idx); + break; + } + + case DUK_OP_SETALEN: { + duk_tval *tv1; + duk_hobject *h; + duk_uint32_t len; + + tv1 = DUK__REGP_A(ins); + DUK_ASSERT(DUK_TVAL_IS_OBJECT(tv1)); + h = DUK_TVAL_GET_OBJECT(tv1); + DUK_ASSERT(DUK_HOBJECT_IS_ARRAY(h)); + + tv1 = DUK__REGP_BC(ins); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv1)); +#if defined(DUK_USE_FASTINT) + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv1)); + len = (duk_uint32_t) DUK_TVAL_GET_FASTINT_U32(tv1); +#else + len = (duk_uint32_t) DUK_TVAL_GET_NUMBER(tv1); +#endif + ((duk_harray *) h)->length = len; + break; + } + + case DUK_OP_INITENUM: { + duk__handle_op_initenum(thr, ins); + break; + } + + case DUK_OP_NEXTENUM: { + curr_pc += duk__handle_op_nextenum(thr, ins); + break; + } + + case DUK_OP_INVLHS: { + DUK_ERROR_REFERENCE(thr, DUK_STR_INVALID_LVALUE); + DUK_WO_NORETURN(return;); + break; + } + + case DUK_OP_DEBUGGER: { + /* Opcode only emitted by compiler when debugger + * support is enabled. Ignore it silently without + * debugger support, in case it has been loaded + * from precompiled bytecode. + */ +#if defined(DUK_USE_DEBUGGER_SUPPORT) + if (duk_debug_is_attached(thr->heap)) { + DUK_D(DUK_DPRINT("DEBUGGER statement encountered, halt execution")); + DUK__SYNC_AND_NULL_CURR_PC(); + duk_debug_halt_execution(thr, 1 /*use_prev_pc*/); + DUK_D(DUK_DPRINT("DEBUGGER statement finished, resume execution")); + goto restart_execution; + } else { + DUK_D(DUK_DPRINT("DEBUGGER statement ignored, debugger not attached")); + } +#else + DUK_D(DUK_DPRINT("DEBUGGER statement ignored, no debugger support")); +#endif + break; + } + + case DUK_OP_NOP: { + /* Nop, ignored, but ABC fields may carry a value e.g. + * for indirect opcode handling. + */ + break; + } + + case DUK_OP_INVALID: { + DUK_ERROR_FMT1(thr, DUK_ERR_ERROR, "INVALID opcode (%ld)", (long) DUK_DEC_ABC(ins)); + DUK_WO_NORETURN(return;); + break; + } + +#if defined(DUK_USE_ES6) + case DUK_OP_NEWTARGET: { + duk_push_new_target(thr); + DUK__REPLACE_TOP_BC_BREAK(); + } +#endif /* DUK_USE_ES6 */ + +#if !defined(DUK_USE_EXEC_PREFER_SIZE) +#if !defined(DUK_USE_ES7_EXP_OPERATOR) + case DUK_OP_EXP_RR: + case DUK_OP_EXP_CR: + case DUK_OP_EXP_RC: + case DUK_OP_EXP_CC: +#endif +#if !defined(DUK_USE_ES6) + case DUK_OP_NEWTARGET: +#endif +#if !defined(DUK_USE_VERBOSE_ERRORS) + case DUK_OP_GETPROPC_RR: + case DUK_OP_GETPROPC_CR: + case DUK_OP_GETPROPC_RC: + case DUK_OP_GETPROPC_CC: +#endif + case DUK_OP_UNUSED207: + case DUK_OP_UNUSED212: + case DUK_OP_UNUSED213: + case DUK_OP_UNUSED214: + case DUK_OP_UNUSED215: + case DUK_OP_UNUSED216: + case DUK_OP_UNUSED217: + case DUK_OP_UNUSED218: + case DUK_OP_UNUSED219: + case DUK_OP_UNUSED220: + case DUK_OP_UNUSED221: + case DUK_OP_UNUSED222: + case DUK_OP_UNUSED223: + case DUK_OP_UNUSED224: + case DUK_OP_UNUSED225: + case DUK_OP_UNUSED226: + case DUK_OP_UNUSED227: + case DUK_OP_UNUSED228: + case DUK_OP_UNUSED229: + case DUK_OP_UNUSED230: + case DUK_OP_UNUSED231: + case DUK_OP_UNUSED232: + case DUK_OP_UNUSED233: + case DUK_OP_UNUSED234: + case DUK_OP_UNUSED235: + case DUK_OP_UNUSED236: + case DUK_OP_UNUSED237: + case DUK_OP_UNUSED238: + case DUK_OP_UNUSED239: + case DUK_OP_UNUSED240: + case DUK_OP_UNUSED241: + case DUK_OP_UNUSED242: + case DUK_OP_UNUSED243: + case DUK_OP_UNUSED244: + case DUK_OP_UNUSED245: + case DUK_OP_UNUSED246: + case DUK_OP_UNUSED247: + case DUK_OP_UNUSED248: + case DUK_OP_UNUSED249: + case DUK_OP_UNUSED250: + case DUK_OP_UNUSED251: + case DUK_OP_UNUSED252: + case DUK_OP_UNUSED253: + case DUK_OP_UNUSED254: + case DUK_OP_UNUSED255: + /* Force all case clauses to map to an actual handler + * so that the compiler can emit a jump without a bounds + * check: the switch argument is a duk_uint8_t so that + * the compiler may be able to figure it out. This is + * a small detail and obviously compiler dependent. + */ + /* default: clause omitted on purpose */ +#else /* DUK_USE_EXEC_PREFER_SIZE */ + default: +#endif /* DUK_USE_EXEC_PREFER_SIZE */ + { + /* Default case catches invalid/unsupported opcodes. */ + DUK_D(DUK_DPRINT("invalid opcode: %ld - %!I", (long) op, ins)); + DUK__INTERNAL_ERROR("invalid opcode"); + break; + } + + } /* end switch */ + + continue; + + /* Some shared exit paths for opcode handling below. These + * are mostly useful to reduce code footprint when multiple + * opcodes have a similar epilogue (like replacing stack top + * with index 'a'). + */ + +#if defined(DUK_USE_EXEC_PREFER_SIZE) + replace_top_a: + DUK__REPLACE_TO_TVPTR(thr, DUK__REGP_A(ins)); + continue; + replace_top_bc: + DUK__REPLACE_TO_TVPTR(thr, DUK__REGP_BC(ins)); + continue; +#endif + } + DUK_WO_NORETURN(return;); + +#if !defined(DUK_USE_VERBOSE_EXECUTOR_ERRORS) +internal_error: + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return;); +#endif +} + +/* automatic undefs */ +#undef DUK__BYTEOFF_A +#undef DUK__BYTEOFF_B +#undef DUK__BYTEOFF_BC +#undef DUK__BYTEOFF_C +#undef DUK__COMPARE_BODY +#undef DUK__CONST +#undef DUK__CONSTP +#undef DUK__CONSTP_A +#undef DUK__CONSTP_B +#undef DUK__CONSTP_BC +#undef DUK__CONSTP_C +#undef DUK__DELPROP_BODY +#undef DUK__EQ_BODY +#undef DUK__FUN +#undef DUK__GETPROPC_BODY +#undef DUK__GETPROP_BODY +#undef DUK__GE_BODY +#undef DUK__GT_BODY +#undef DUK__INSTOF_BODY +#undef DUK__INTERNAL_ERROR +#undef DUK__INT_NOACTION +#undef DUK__INT_RESTART +#undef DUK__IN_BODY +#undef DUK__LE_BODY +#undef DUK__LONGJMP_RESTART +#undef DUK__LONGJMP_RETHROW +#undef DUK__LOOKUP_INDIRECT +#undef DUK__LT_BODY +#undef DUK__MASK_A +#undef DUK__MASK_B +#undef DUK__MASK_BC +#undef DUK__MASK_C +#undef DUK__NEQ_BODY +#undef DUK__PUTPROP_BODY +#undef DUK__RCBIT_B +#undef DUK__RCBIT_C +#undef DUK__REG +#undef DUK__REGCONSTP_B +#undef DUK__REGCONSTP_C +#undef DUK__REGP +#undef DUK__REGP_A +#undef DUK__REGP_B +#undef DUK__REGP_BC +#undef DUK__REGP_C +#undef DUK__REPLACE_BOOL_A_BREAK +#undef DUK__REPLACE_TOP_A_BREAK +#undef DUK__REPLACE_TOP_BC_BREAK +#undef DUK__REPLACE_TO_TVPTR +#undef DUK__RETHAND_FINISHED +#undef DUK__RETHAND_RESTART +#undef DUK__RETURN_SHARED +#undef DUK__SEQ_BODY +#undef DUK__SHIFT_A +#undef DUK__SHIFT_B +#undef DUK__SHIFT_BC +#undef DUK__SHIFT_C +#undef DUK__SNEQ_BODY +#undef DUK__STRICT +#undef DUK__SYNC_AND_NULL_CURR_PC +#undef DUK__SYNC_CURR_PC +#undef DUK__TVAL_SHIFT +#line 1 "duk_js_ops.c" +/* + * ECMAScript specification algorithm and conversion helpers. + * + * These helpers encapsulate the primitive ECMAScript operation semantics, + * and are used by the bytecode executor and the API (among other places). + * Some primitives are only implemented as part of the API and have no + * "internal" helper. This is the case when an internal helper would not + * really be useful; e.g. the operation is rare, uses value stack heavily, + * etc. + * + * The operation arguments depend on what is required to implement + * the operation: + * + * - If an operation is simple and stateless, and has no side + * effects, it won't take an duk_hthread argument and its + * arguments may be duk_tval pointers (which are safe as long + * as no side effects take place). + * + * - If complex coercions are required (e.g. a "ToNumber" coercion) + * or errors may be thrown, the operation takes an duk_hthread + * argument. This also implies that the operation may have + * arbitrary side effects, invalidating any duk_tval pointers. + * + * - For operations with potential side effects, arguments can be + * taken in several ways: + * + * a) as duk_tval pointers, which makes sense if the "common case" + * can be resolved without side effects (e.g. coercion); the + * arguments are pushed to the valstack for coercion if + * necessary + * + * b) as duk_tval values + * + * c) implicitly on value stack top + * + * d) as indices to the value stack + * + * Future work: + * + * - Argument styles may not be the most sensible in every case now. + * + * - In-place coercions might be useful for several operations, if + * in-place coercion is OK for the bytecode executor and the API. + */ + +/* #include duk_internal.h -> already included */ + +/* + * ToPrimitive() (E5 Section 9.1) + * + * ==> implemented in the API. + */ + +/* + * ToBoolean() (E5 Section 9.2) + */ + +DUK_INTERNAL duk_bool_t duk_js_toboolean(duk_tval *tv) { + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNDEFINED: + case DUK_TAG_NULL: + return 0; + case DUK_TAG_BOOLEAN: + DUK_ASSERT(DUK_TVAL_GET_BOOLEAN(tv) == 0 || DUK_TVAL_GET_BOOLEAN(tv) == 1); + return DUK_TVAL_GET_BOOLEAN(tv); + case DUK_TAG_STRING: { + /* Symbols ToBoolean() coerce to true, regardless of their + * description. This happens with no explicit check because + * of the symbol representation byte prefix. + */ + duk_hstring *h = DUK_TVAL_GET_STRING(tv); + DUK_ASSERT(h != NULL); + return (DUK_HSTRING_GET_BYTELEN(h) > 0 ? 1 : 0); + } + case DUK_TAG_OBJECT: { + return 1; + } + case DUK_TAG_BUFFER: { + /* Mimic Uint8Array semantics: objects coerce true, regardless + * of buffer length (zero or not) or context. + */ + return 1; + } + case DUK_TAG_POINTER: { + void *p = DUK_TVAL_GET_POINTER(tv); + return (p != NULL ? 1 : 0); + } + case DUK_TAG_LIGHTFUNC: { + return 1; + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: + if (DUK_TVAL_GET_FASTINT(tv) != 0) { + return 1; + } else { + return 0; + } +#endif + default: { + /* number */ + duk_double_t d; +#if defined(DUK_USE_PREFER_SIZE) + int c; +#endif + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_DOUBLE(tv)); + d = DUK_TVAL_GET_DOUBLE(tv); +#if defined(DUK_USE_PREFER_SIZE) + c = DUK_FPCLASSIFY((double) d); + if (c == DUK_FP_ZERO || c == DUK_FP_NAN) { + return 0; + } else { + return 1; + } +#else + DUK_ASSERT(duk_double_is_nan_or_zero(d) == 0 || duk_double_is_nan_or_zero(d) == 1); + return duk_double_is_nan_or_zero(d) ^ 1; +#endif + } + } + DUK_UNREACHABLE(); + DUK_WO_UNREACHABLE(return 0;); +} + +/* + * ToNumber() (E5 Section 9.3) + * + * Value to convert must be on stack top, and is popped before exit. + * + * See: http://www.cs.indiana.edu/~burger/FP-Printing-PLDI96.pdf + * http://www.cs.indiana.edu/~burger/fp/index.html + * + * Notes on the conversion: + * + * - There are specific requirements on the accuracy of the conversion + * through a "Mathematical Value" (MV), so this conversion is not + * trivial. + * + * - Quick rejects (e.g. based on first char) are difficult because + * the grammar allows leading and trailing white space. + * + * - Quick reject based on string length is difficult even after + * accounting for white space; there may be arbitrarily many + * decimal digits. + * + * - Standard grammar allows decimal values ("123"), hex values + * ("0x123") and infinities + * + * - Unlike source code literals, ToNumber() coerces empty strings + * and strings with only whitespace to zero (not NaN). However, + * while '' coerces to 0, '+' and '-' coerce to NaN. + */ + +/* E5 Section 9.3.1 */ +DUK_LOCAL duk_double_t duk__tonumber_string_raw(duk_hthread *thr) { + duk_small_uint_t s2n_flags; + duk_double_t d; + + DUK_ASSERT(duk_is_string(thr, -1)); + + /* Quite lenient, e.g. allow empty as zero, but don't allow trailing + * garbage. + */ + s2n_flags = DUK_S2N_FLAG_TRIM_WHITE | DUK_S2N_FLAG_ALLOW_EXP | DUK_S2N_FLAG_ALLOW_PLUS | DUK_S2N_FLAG_ALLOW_MINUS | + DUK_S2N_FLAG_ALLOW_INF | DUK_S2N_FLAG_ALLOW_FRAC | DUK_S2N_FLAG_ALLOW_NAKED_FRAC | + DUK_S2N_FLAG_ALLOW_EMPTY_FRAC | DUK_S2N_FLAG_ALLOW_EMPTY_AS_ZERO | DUK_S2N_FLAG_ALLOW_LEADING_ZERO | + DUK_S2N_FLAG_ALLOW_AUTO_HEX_INT | DUK_S2N_FLAG_ALLOW_AUTO_OCT_INT | DUK_S2N_FLAG_ALLOW_AUTO_BIN_INT; + + duk_numconv_parse(thr, 10 /*radix*/, s2n_flags); + +#if defined(DUK_USE_PREFER_SIZE) + d = duk_get_number(thr, -1); + duk_pop_unsafe(thr); +#else + thr->valstack_top--; + DUK_ASSERT(DUK_TVAL_IS_NUMBER(thr->valstack_top)); + DUK_ASSERT(DUK_TVAL_IS_DOUBLE(thr->valstack_top)); /* no fastint conversion in numconv now */ + DUK_ASSERT(!DUK_TVAL_NEEDS_REFCOUNT_UPDATE(thr->valstack_top)); + d = DUK_TVAL_GET_DOUBLE(thr->valstack_top); /* assumes not a fastint */ + DUK_TVAL_SET_UNDEFINED(thr->valstack_top); +#endif + + return d; +} + +DUK_INTERNAL duk_double_t duk_js_tonumber(duk_hthread *thr, duk_tval *tv) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(tv != NULL); + + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_UNDEFINED: { + /* return a specific NaN (although not strictly necessary) */ + duk_double_union du; + DUK_DBLUNION_SET_NAN(&du); + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&du)); + return du.d; + } + case DUK_TAG_NULL: { + /* +0.0 */ + return 0.0; + } + case DUK_TAG_BOOLEAN: { + if (DUK_TVAL_IS_BOOLEAN_TRUE(tv)) { + return 1.0; + } + return 0.0; + } + case DUK_TAG_STRING: { + /* For Symbols ToNumber() is always a TypeError. */ + duk_hstring *h = DUK_TVAL_GET_STRING(tv); + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(h))) { + DUK_ERROR_TYPE(thr, DUK_STR_CANNOT_NUMBER_COERCE_SYMBOL); + DUK_WO_NORETURN(return 0.0;); + } + duk_push_hstring(thr, h); + return duk__tonumber_string_raw(thr); + } + case DUK_TAG_BUFFER: /* plain buffer treated like object */ + case DUK_TAG_OBJECT: { + duk_double_t d; + duk_push_tval(thr, tv); + duk_to_primitive(thr, -1, DUK_HINT_NUMBER); /* 'tv' becomes invalid */ + + /* recursive call for a primitive value (guaranteed not to cause second + * recursion). + */ + DUK_ASSERT(duk_get_tval(thr, -1) != NULL); + d = duk_js_tonumber(thr, duk_get_tval(thr, -1)); + + duk_pop_unsafe(thr); + return d; + } + case DUK_TAG_POINTER: { + /* Coerce like boolean */ + void *p = DUK_TVAL_GET_POINTER(tv); + return (p != NULL ? 1.0 : 0.0); + } + case DUK_TAG_LIGHTFUNC: { + /* +(function(){}) -> NaN */ + return DUK_DOUBLE_NAN; + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: + return (duk_double_t) DUK_TVAL_GET_FASTINT(tv); +#endif + default: { + /* number */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv)); + DUK_ASSERT(DUK_TVAL_IS_DOUBLE(tv)); + return DUK_TVAL_GET_DOUBLE(tv); + } + } + + DUK_UNREACHABLE(); + DUK_WO_UNREACHABLE(return 0.0;); +} + +/* + * ToInteger() (E5 Section 9.4) + */ + +/* exposed, used by e.g. duk_bi_date.c */ +DUK_INTERNAL duk_double_t duk_js_tointeger_number(duk_double_t x) { +#if defined(DUK_USE_PREFER_SIZE) + duk_small_int_t c = (duk_small_int_t) DUK_FPCLASSIFY(x); + + if (DUK_UNLIKELY(c == DUK_FP_NAN)) { + return 0.0; + } else if (DUK_UNLIKELY(c == DUK_FP_INFINITE)) { + return x; + } else { + /* Finite, including neg/pos zero. Neg zero sign must be + * preserved. + */ + return duk_double_trunc_towards_zero(x); + } +#else /* DUK_USE_PREFER_SIZE */ + /* NaN and Infinity have the same exponent so it's a cheap + * initial check for the rare path. + */ + if (DUK_UNLIKELY(duk_double_is_nan_or_inf(x) != 0U)) { + if (duk_double_is_nan(x)) { + return 0.0; + } else { + return x; + } + } else { + return duk_double_trunc_towards_zero(x); + } +#endif /* DUK_USE_PREFER_SIZE */ +} + +DUK_INTERNAL duk_double_t duk_js_tointeger(duk_hthread *thr, duk_tval *tv) { + /* XXX: fastint */ + duk_double_t d = duk_js_tonumber(thr, tv); /* invalidates tv */ + return duk_js_tointeger_number(d); +} + +/* + * ToInt32(), ToUint32(), ToUint16() (E5 Sections 9.5, 9.6, 9.7) + */ + +/* combined algorithm matching E5 Sections 9.5 and 9.6 */ +DUK_LOCAL duk_double_t duk__toint32_touint32_helper(duk_double_t x, duk_bool_t is_toint32) { +#if defined(DUK_USE_PREFER_SIZE) + duk_small_int_t c; +#endif + +#if defined(DUK_USE_PREFER_SIZE) + c = (duk_small_int_t) DUK_FPCLASSIFY(x); + if (c == DUK_FP_NAN || c == DUK_FP_ZERO || c == DUK_FP_INFINITE) { + return 0.0; + } +#else + if (duk_double_is_nan_zero_inf(x)) { + return 0.0; + } +#endif + + /* x = sign(x) * floor(abs(x)), i.e. truncate towards zero, keep sign */ + x = duk_double_trunc_towards_zero(x); + + /* NOTE: fmod(x) result sign is same as sign of x, which + * differs from what Javascript wants (see Section 9.6). + */ + + x = DUK_FMOD(x, DUK_DOUBLE_2TO32); /* -> x in ]-2**32, 2**32[ */ + + if (x < 0.0) { + x += DUK_DOUBLE_2TO32; + } + DUK_ASSERT(x >= 0 && x < DUK_DOUBLE_2TO32); /* -> x in [0, 2**32[ */ + + if (is_toint32) { + if (x >= DUK_DOUBLE_2TO31) { + /* x in [2**31, 2**32[ */ + + x -= DUK_DOUBLE_2TO32; /* -> x in [-2**31,2**31[ */ + } + } + + return x; +} + +DUK_INTERNAL duk_int32_t duk_js_toint32(duk_hthread *thr, duk_tval *tv) { + duk_double_t d; + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv)) { + return DUK_TVAL_GET_FASTINT_I32(tv); + } +#endif + + d = duk_js_tonumber(thr, tv); /* invalidates tv */ + d = duk__toint32_touint32_helper(d, 1); + DUK_ASSERT(DUK_FPCLASSIFY(d) == DUK_FP_ZERO || DUK_FPCLASSIFY(d) == DUK_FP_NORMAL); + DUK_ASSERT(d >= -2147483648.0 && d <= 2147483647.0); /* [-0x80000000,0x7fffffff] */ + DUK_ASSERT(duk_double_equals(d, (duk_double_t) ((duk_int32_t) d))); /* whole, won't clip */ + return (duk_int32_t) d; +} + +DUK_INTERNAL duk_uint32_t duk_js_touint32(duk_hthread *thr, duk_tval *tv) { + duk_double_t d; + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv)) { + return DUK_TVAL_GET_FASTINT_U32(tv); + } +#endif + + d = duk_js_tonumber(thr, tv); /* invalidates tv */ + d = duk__toint32_touint32_helper(d, 0); + DUK_ASSERT(DUK_FPCLASSIFY(d) == DUK_FP_ZERO || DUK_FPCLASSIFY(d) == DUK_FP_NORMAL); + DUK_ASSERT(d >= 0.0 && d <= 4294967295.0); /* [0x00000000, 0xffffffff] */ + DUK_ASSERT(duk_double_equals(d, (duk_double_t) ((duk_uint32_t) d))); /* whole, won't clip */ + return (duk_uint32_t) d; +} + +DUK_INTERNAL duk_uint16_t duk_js_touint16(duk_hthread *thr, duk_tval *tv) { + /* should be a safe way to compute this */ + return (duk_uint16_t) (duk_js_touint32(thr, tv) & 0x0000ffffU); +} + +/* + * ToString() (E5 Section 9.8) + * ToObject() (E5 Section 9.9) + * CheckObjectCoercible() (E5 Section 9.10) + * IsCallable() (E5 Section 9.11) + * + * ==> implemented in the API. + */ + +/* + * Loose equality, strict equality, and SameValue (E5 Sections 11.9.1, 11.9.4, + * 9.12). These have much in common so they can share some helpers. + * + * Future work notes: + * + * - Current implementation (and spec definition) has recursion; this should + * be fixed if possible. + * + * - String-to-number coercion should be possible without going through the + * value stack (and be more compact) if a shared helper is invoked. + */ + +/* Note that this is the same operation for strict and loose equality: + * - E5 Section 11.9.3, step 1.c (loose) + * - E5 Section 11.9.6, step 4 (strict) + */ + +DUK_LOCAL duk_bool_t duk__js_equals_number(duk_double_t x, duk_double_t y) { +#if defined(DUK_USE_PARANOID_MATH) + /* Straightforward algorithm, makes fewer compiler assumptions. */ + duk_small_int_t cx = (duk_small_int_t) DUK_FPCLASSIFY(x); + duk_small_int_t cy = (duk_small_int_t) DUK_FPCLASSIFY(y); + if (cx == DUK_FP_NAN || cy == DUK_FP_NAN) { + return 0; + } + if (cx == DUK_FP_ZERO && cy == DUK_FP_ZERO) { + return 1; + } + if (x == y) { + return 1; + } + return 0; +#else /* DUK_USE_PARANOID_MATH */ + /* Better equivalent algorithm. If the compiler is compliant, C and + * ECMAScript semantics are identical for this particular comparison. + * In particular, NaNs must never compare equal and zeroes must compare + * equal regardless of sign. Could also use a macro, but this inlines + * already nicely (no difference on gcc, for instance). + */ + if (duk_double_equals(x, y)) { + /* IEEE requires that NaNs compare false */ + DUK_ASSERT(DUK_FPCLASSIFY(x) != DUK_FP_NAN); + DUK_ASSERT(DUK_FPCLASSIFY(y) != DUK_FP_NAN); + return 1; + } else { + /* IEEE requires that zeros compare the same regardless + * of their signed, so if both x and y are zeroes, they + * are caught above. + */ + DUK_ASSERT(!(DUK_FPCLASSIFY(x) == DUK_FP_ZERO && DUK_FPCLASSIFY(y) == DUK_FP_ZERO)); + return 0; + } +#endif /* DUK_USE_PARANOID_MATH */ +} + +DUK_LOCAL duk_bool_t duk__js_samevalue_number(duk_double_t x, duk_double_t y) { +#if defined(DUK_USE_PARANOID_MATH) + duk_small_int_t cx = (duk_small_int_t) DUK_FPCLASSIFY(x); + duk_small_int_t cy = (duk_small_int_t) DUK_FPCLASSIFY(y); + + if (cx == DUK_FP_NAN && cy == DUK_FP_NAN) { + /* SameValue(NaN, NaN) = true, regardless of NaN sign or extra bits */ + return 1; + } + if (cx == DUK_FP_ZERO && cy == DUK_FP_ZERO) { + /* Note: cannot assume that a non-zero return value of signbit() would + * always be the same -- hence cannot (portably) use something like: + * + * signbit(x) == signbit(y) + */ + duk_small_int_t sx = DUK_SIGNBIT(x) ? 1 : 0; + duk_small_int_t sy = DUK_SIGNBIT(y) ? 1 : 0; + return (sx == sy); + } + + /* normal comparison; known: + * - both x and y are not NaNs (but one of them can be) + * - both x and y are not zero (but one of them can be) + * - x and y may be denormal or infinite + */ + + return (x == y); +#else /* DUK_USE_PARANOID_MATH */ + duk_small_int_t cx = (duk_small_int_t) DUK_FPCLASSIFY(x); + duk_small_int_t cy = (duk_small_int_t) DUK_FPCLASSIFY(y); + + if (duk_double_equals(x, y)) { + /* IEEE requires that NaNs compare false */ + DUK_ASSERT(DUK_FPCLASSIFY(x) != DUK_FP_NAN); + DUK_ASSERT(DUK_FPCLASSIFY(y) != DUK_FP_NAN); + + /* Using classification has smaller footprint than direct comparison. */ + if (DUK_UNLIKELY(cx == DUK_FP_ZERO && cy == DUK_FP_ZERO)) { + /* Note: cannot assume that a non-zero return value of signbit() would + * always be the same -- hence cannot (portably) use something like: + * + * signbit(x) == signbit(y) + */ + return duk_double_same_sign(x, y); + } + return 1; + } else { + /* IEEE requires that zeros compare the same regardless + * of their sign, so if both x and y are zeroes, they + * are caught above. + */ + DUK_ASSERT(!(DUK_FPCLASSIFY(x) == DUK_FP_ZERO && DUK_FPCLASSIFY(y) == DUK_FP_ZERO)); + + /* Difference to non-strict/strict comparison is that NaNs compare + * equal and signed zero signs matter. + */ + if (DUK_UNLIKELY(cx == DUK_FP_NAN && cy == DUK_FP_NAN)) { + /* SameValue(NaN, NaN) = true, regardless of NaN sign or extra bits */ + return 1; + } + return 0; + } +#endif /* DUK_USE_PARANOID_MATH */ +} + +DUK_INTERNAL duk_bool_t duk_js_equals_helper(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y, duk_small_uint_t flags) { + duk_uint_t type_mask_x; + duk_uint_t type_mask_y; + + /* If flags != 0 (strict or SameValue), thr can be NULL. For loose + * equals comparison it must be != NULL. + */ + DUK_ASSERT(flags != 0 || thr != NULL); + + /* + * Same type? + * + * Note: since number values have no explicit tag in the 8-byte + * representation, need the awkward if + switch. + */ + +#if defined(DUK_USE_FASTINT) + if (DUK_TVAL_IS_FASTINT(tv_x) && DUK_TVAL_IS_FASTINT(tv_y)) { + if (DUK_TVAL_GET_FASTINT(tv_x) == DUK_TVAL_GET_FASTINT(tv_y)) { + return 1; + } else { + return 0; + } + } else +#endif + if (DUK_TVAL_IS_NUMBER(tv_x) && DUK_TVAL_IS_NUMBER(tv_y)) { + duk_double_t d1, d2; + + /* Catches both doubles and cases where only one argument is + * a fastint so can't assume a double. + */ + d1 = DUK_TVAL_GET_NUMBER(tv_x); + d2 = DUK_TVAL_GET_NUMBER(tv_y); + if (DUK_UNLIKELY((flags & DUK_EQUALS_FLAG_SAMEVALUE) != 0)) { + /* SameValue */ + return duk__js_samevalue_number(d1, d2); + } else { + /* equals and strict equals */ + return duk__js_equals_number(d1, d2); + } + } else if (DUK_TVAL_GET_TAG(tv_x) == DUK_TVAL_GET_TAG(tv_y)) { + switch (DUK_TVAL_GET_TAG(tv_x)) { + case DUK_TAG_UNDEFINED: + case DUK_TAG_NULL: { + return 1; + } + case DUK_TAG_BOOLEAN: { + return DUK_TVAL_GET_BOOLEAN(tv_x) == DUK_TVAL_GET_BOOLEAN(tv_y); + } + case DUK_TAG_POINTER: { + return DUK_TVAL_GET_POINTER(tv_x) == DUK_TVAL_GET_POINTER(tv_y); + } + case DUK_TAG_STRING: + case DUK_TAG_OBJECT: { + /* Heap pointer comparison suffices for strings and objects. + * Symbols compare equal if they have the same internal + * representation; again heap pointer comparison suffices. + */ + return DUK_TVAL_GET_HEAPHDR(tv_x) == DUK_TVAL_GET_HEAPHDR(tv_y); + } + case DUK_TAG_BUFFER: { + /* In Duktape 2.x plain buffers mimic Uint8Array objects + * so always compare by heap pointer. In Duktape 1.x + * strict comparison would compare heap pointers and + * non-strict would compare contents. + */ + return DUK_TVAL_GET_HEAPHDR(tv_x) == DUK_TVAL_GET_HEAPHDR(tv_y); + } + case DUK_TAG_LIGHTFUNC: { + /* At least 'magic' has a significant impact on function + * identity. + */ + duk_small_uint_t lf_flags_x; + duk_small_uint_t lf_flags_y; + duk_c_function func_x; + duk_c_function func_y; + + DUK_TVAL_GET_LIGHTFUNC(tv_x, func_x, lf_flags_x); + DUK_TVAL_GET_LIGHTFUNC(tv_y, func_y, lf_flags_y); + return ((func_x == func_y) && (lf_flags_x == lf_flags_y)) ? 1 : 0; + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: { + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv_x)); + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv_y)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv_x)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv_y)); + DUK_UNREACHABLE(); + DUK_WO_UNREACHABLE(return 0;); + } + } + } + + if ((flags & (DUK_EQUALS_FLAG_STRICT | DUK_EQUALS_FLAG_SAMEVALUE)) != 0) { + return 0; + } + + DUK_ASSERT(flags == 0); /* non-strict equality from here on */ + + /* + * Types are different; various cases for non-strict comparison + * + * Since comparison is symmetric, we use a "swap trick" to reduce + * code size. + */ + + type_mask_x = duk_get_type_mask_tval(tv_x); + type_mask_y = duk_get_type_mask_tval(tv_y); + + /* Undefined/null are considered equal (e.g. "null == undefined" -> true). */ + if ((type_mask_x & (DUK_TYPE_MASK_UNDEFINED | DUK_TYPE_MASK_NULL)) && + (type_mask_y & (DUK_TYPE_MASK_NULL | DUK_TYPE_MASK_UNDEFINED))) { + return 1; + } + + /* Number/string -> coerce string to number (e.g. "'1.5' == 1.5" -> true). */ + if ((type_mask_x & DUK_TYPE_MASK_NUMBER) && (type_mask_y & DUK_TYPE_MASK_STRING)) { + if (!DUK_TVAL_STRING_IS_SYMBOL(tv_y)) { + duk_double_t d1, d2; + d1 = DUK_TVAL_GET_NUMBER(tv_x); + d2 = duk_to_number_tval(thr, tv_y); + return duk__js_equals_number(d1, d2); + } + } + if ((type_mask_x & DUK_TYPE_MASK_STRING) && (type_mask_y & DUK_TYPE_MASK_NUMBER)) { + if (!DUK_TVAL_STRING_IS_SYMBOL(tv_x)) { + duk_double_t d1, d2; + d1 = DUK_TVAL_GET_NUMBER(tv_y); + d2 = duk_to_number_tval(thr, tv_x); + return duk__js_equals_number(d1, d2); + } + } + + /* Boolean/any -> coerce boolean to number and try again. If boolean is + * compared to a pointer, the final comparison after coercion now always + * yields false (as pointer vs. number compares to false), but this is + * not special cased. + * + * ToNumber(bool) is +1.0 or 0.0. Tagged boolean value is always 0 or 1. + */ + if (type_mask_x & DUK_TYPE_MASK_BOOLEAN) { + DUK_ASSERT(DUK_TVAL_GET_BOOLEAN(tv_x) == 0 || DUK_TVAL_GET_BOOLEAN(tv_x) == 1); + duk_push_uint(thr, DUK_TVAL_GET_BOOLEAN(tv_x)); + duk_push_tval(thr, tv_y); + goto recursive_call; + } + if (type_mask_y & DUK_TYPE_MASK_BOOLEAN) { + DUK_ASSERT(DUK_TVAL_GET_BOOLEAN(tv_y) == 0 || DUK_TVAL_GET_BOOLEAN(tv_y) == 1); + duk_push_tval(thr, tv_x); + duk_push_uint(thr, DUK_TVAL_GET_BOOLEAN(tv_y)); + goto recursive_call; + } + + /* String-number-symbol/object -> coerce object to primitive (apparently without hint), then try again. */ + if ((type_mask_x & (DUK_TYPE_MASK_STRING | DUK_TYPE_MASK_NUMBER)) && (type_mask_y & DUK_TYPE_MASK_OBJECT)) { + /* No symbol check needed because symbols and strings are accepted. */ + duk_push_tval(thr, tv_x); + duk_push_tval(thr, tv_y); + duk_to_primitive(thr, -1, DUK_HINT_NONE); /* apparently no hint? */ + goto recursive_call; + } + if ((type_mask_x & DUK_TYPE_MASK_OBJECT) && (type_mask_y & (DUK_TYPE_MASK_STRING | DUK_TYPE_MASK_NUMBER))) { + /* No symbol check needed because symbols and strings are accepted. */ + duk_push_tval(thr, tv_x); + duk_push_tval(thr, tv_y); + duk_to_primitive(thr, -2, DUK_HINT_NONE); /* apparently no hint? */ + goto recursive_call; + } + + /* Nothing worked -> not equal. */ + return 0; + +recursive_call: + /* Shared code path to call the helper again with arguments on stack top. */ + { + duk_bool_t rc; + rc = duk_js_equals_helper(thr, DUK_GET_TVAL_NEGIDX(thr, -2), DUK_GET_TVAL_NEGIDX(thr, -1), 0 /*flags:nonstrict*/); + duk_pop_2_unsafe(thr); + return rc; + } +} + +/* + * Comparisons (x >= y, x > y, x <= y, x < y) + * + * E5 Section 11.8.5: implement 'x < y' and then use negate and eval_left_first + * flags to get the rest. + */ + +/* XXX: this should probably just operate on the stack top, because it + * needs to push stuff on the stack anyway... + */ + +DUK_INTERNAL duk_small_int_t duk_js_data_compare(const duk_uint8_t *buf1, + const duk_uint8_t *buf2, + duk_size_t len1, + duk_size_t len2) { + duk_size_t prefix_len; + duk_small_int_t rc; + + prefix_len = (len1 <= len2 ? len1 : len2); + + /* duk_memcmp() is guaranteed to return zero (equal) for zero length + * inputs. + */ + rc = duk_memcmp_unsafe((const void *) buf1, (const void *) buf2, (size_t) prefix_len); + + if (rc < 0) { + return -1; + } else if (rc > 0) { + return 1; + } + + /* prefix matches, lengths matter now */ + if (len1 < len2) { + /* e.g. "x" < "xx" */ + return -1; + } else if (len1 > len2) { + return 1; + } + + return 0; +} + +DUK_INTERNAL duk_small_int_t duk_js_string_compare(duk_hstring *h1, duk_hstring *h2) { + /* + * String comparison (E5 Section 11.8.5, step 4), which + * needs to compare codepoint by codepoint. + * + * However, UTF-8 allows us to use strcmp directly: the shared + * prefix will be encoded identically (UTF-8 has unique encoding) + * and the first differing character can be compared with a simple + * unsigned byte comparison (which strcmp does). + * + * This will not work properly for non-xutf-8 strings, but this + * is not an issue for compliance. + */ + + DUK_ASSERT(h1 != NULL); + DUK_ASSERT(h2 != NULL); + + return duk_js_data_compare((const duk_uint8_t *) DUK_HSTRING_GET_DATA(h1), + (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h2), + (duk_size_t) DUK_HSTRING_GET_BYTELEN(h1), + (duk_size_t) DUK_HSTRING_GET_BYTELEN(h2)); +} + +#if 0 /* unused */ +DUK_INTERNAL duk_small_int_t duk_js_buffer_compare(duk_heap *heap, duk_hbuffer *h1, duk_hbuffer *h2) { + /* Similar to String comparison. */ + + DUK_ASSERT(h1 != NULL); + DUK_ASSERT(h2 != NULL); + DUK_UNREF(heap); + + return duk_js_data_compare((const duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(heap, h1), + (const duk_uint8_t *) DUK_HBUFFER_GET_DATA_PTR(heap, h2), + (duk_size_t) DUK_HBUFFER_GET_SIZE(h1), + (duk_size_t) DUK_HBUFFER_GET_SIZE(h2)); +} +#endif + +#if defined(DUK_USE_FASTINT) +DUK_LOCAL duk_bool_t duk__compare_fastint(duk_bool_t retval, duk_int64_t v1, duk_int64_t v2) { + DUK_ASSERT(retval == 0 || retval == 1); + if (v1 < v2) { + return retval ^ 1; + } else { + return retval; + } +} +#endif + +#if defined(DUK_USE_PARANOID_MATH) +DUK_LOCAL duk_bool_t duk__compare_number(duk_bool_t retval, duk_double_t d1, duk_double_t d2) { + duk_small_int_t c1, s1, c2, s2; + + DUK_ASSERT(retval == 0 || retval == 1); + c1 = (duk_small_int_t) DUK_FPCLASSIFY(d1); + s1 = (duk_small_int_t) DUK_SIGNBIT(d1); + c2 = (duk_small_int_t) DUK_FPCLASSIFY(d2); + s2 = (duk_small_int_t) DUK_SIGNBIT(d2); + + if (c1 == DUK_FP_NAN || c2 == DUK_FP_NAN) { + return 0; /* Always false, regardless of negation. */ + } + + if (c1 == DUK_FP_ZERO && c2 == DUK_FP_ZERO) { + /* For all combinations: +0 < +0, +0 < -0, -0 < +0, -0 < -0, + * steps e, f, and g. + */ + return retval; /* false */ + } + + if (d1 == d2) { + return retval; /* false */ + } + + if (c1 == DUK_FP_INFINITE && s1 == 0) { + /* x == +Infinity */ + return retval; /* false */ + } + + if (c2 == DUK_FP_INFINITE && s2 == 0) { + /* y == +Infinity */ + return retval ^ 1; /* true */ + } + + if (c2 == DUK_FP_INFINITE && s2 != 0) { + /* y == -Infinity */ + return retval; /* false */ + } + + if (c1 == DUK_FP_INFINITE && s1 != 0) { + /* x == -Infinity */ + return retval ^ 1; /* true */ + } + + if (d1 < d2) { + return retval ^ 1; /* true */ + } + + return retval; /* false */ +} +#else /* DUK_USE_PARANOID_MATH */ +DUK_LOCAL duk_bool_t duk__compare_number(duk_bool_t retval, duk_double_t d1, duk_double_t d2) { + /* This comparison tree relies doesn't match the exact steps in + * E5 Section 11.8.5 but should produce the same results. The + * steps rely on exact IEEE semantics for NaNs, etc. + */ + + DUK_ASSERT(retval == 0 || retval == 1); + if (d1 < d2) { + /* In no case should both (d1 < d2) and (d2 < d1) be true. + * It's possible that neither is true though, and that's + * handled below. + */ + DUK_ASSERT(!(d2 < d1)); + + /* - d1 < d2, both d1/d2 are normals (not Infinity, not NaN) + * - d2 is +Infinity, d1 != +Infinity and NaN + * - d1 is -Infinity, d2 != -Infinity and NaN + */ + return retval ^ 1; + } else { + if (d2 < d1) { + /* - !(d1 < d2), both d1/d2 are normals (not Infinity, not NaN) + * - d1 is +Infinity, d2 != +Infinity and NaN + * - d2 is -Infinity, d1 != -Infinity and NaN + */ + return retval; + } else { + /* - d1 and/or d2 is NaN + * - d1 and d2 are both +/- 0 + * - d1 == d2 (including infinities) + */ + if (duk_double_is_nan(d1) || duk_double_is_nan(d2)) { + /* Note: undefined from Section 11.8.5 always + * results in false return (see e.g. Section + * 11.8.3) - hence special treatment here. + */ + return 0; /* zero regardless of negation */ + } else { + return retval; + } + } + } +} +#endif /* DUK_USE_PARANOID_MATH */ + +DUK_INTERNAL duk_bool_t duk_js_compare_helper(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y, duk_small_uint_t flags) { + duk_double_t d1, d2; + duk_small_int_t rc; + duk_bool_t retval; + + DUK_ASSERT(DUK_COMPARE_FLAG_NEGATE == 1); /* Rely on this flag being lowest. */ + retval = flags & DUK_COMPARE_FLAG_NEGATE; + DUK_ASSERT(retval == 0 || retval == 1); + + /* Fast path for fastints */ +#if defined(DUK_USE_FASTINT) + if (DUK_LIKELY(DUK_TVAL_IS_FASTINT(tv_x) && DUK_TVAL_IS_FASTINT(tv_y))) { + return duk__compare_fastint(retval, DUK_TVAL_GET_FASTINT(tv_x), DUK_TVAL_GET_FASTINT(tv_y)); + } +#endif /* DUK_USE_FASTINT */ + + /* Fast path for numbers (one of which may be a fastint) */ +#if !defined(DUK_USE_PREFER_SIZE) + if (DUK_LIKELY(DUK_TVAL_IS_NUMBER(tv_x) && DUK_TVAL_IS_NUMBER(tv_y))) { + return duk__compare_number(retval, DUK_TVAL_GET_NUMBER(tv_x), DUK_TVAL_GET_NUMBER(tv_y)); + } +#endif + + /* Slow path */ + + duk_push_tval(thr, tv_x); + duk_push_tval(thr, tv_y); + + if (flags & DUK_COMPARE_FLAG_EVAL_LEFT_FIRST) { + duk_to_primitive(thr, -2, DUK_HINT_NUMBER); + duk_to_primitive(thr, -1, DUK_HINT_NUMBER); + } else { + duk_to_primitive(thr, -1, DUK_HINT_NUMBER); + duk_to_primitive(thr, -2, DUK_HINT_NUMBER); + } + + /* Note: reuse variables */ + tv_x = DUK_GET_TVAL_NEGIDX(thr, -2); + tv_y = DUK_GET_TVAL_NEGIDX(thr, -1); + + if (DUK_TVAL_IS_STRING(tv_x) && DUK_TVAL_IS_STRING(tv_y)) { + duk_hstring *h1 = DUK_TVAL_GET_STRING(tv_x); + duk_hstring *h2 = DUK_TVAL_GET_STRING(tv_y); + DUK_ASSERT(h1 != NULL); + DUK_ASSERT(h2 != NULL); + + if (DUK_LIKELY(!DUK_HSTRING_HAS_SYMBOL(h1) && !DUK_HSTRING_HAS_SYMBOL(h2))) { + rc = duk_js_string_compare(h1, h2); + duk_pop_2_unsafe(thr); + if (rc < 0) { + return retval ^ 1; + } else { + return retval; + } + } + + /* One or both are Symbols: fall through to handle in the + * generic path. Concretely, ToNumber() will fail. + */ + } + + /* Ordering should not matter (E5 Section 11.8.5, step 3.a). */ +#if 0 + if (flags & DUK_COMPARE_FLAG_EVAL_LEFT_FIRST) { + d1 = duk_to_number_m2(thr); + d2 = duk_to_number_m1(thr); + } else { + d2 = duk_to_number_m1(thr); + d1 = duk_to_number_m2(thr); + } +#endif + d1 = duk_to_number_m2(thr); + d2 = duk_to_number_m1(thr); + + /* We want to duk_pop_2_unsafe(thr); because the values are numbers + * no decref check is needed. + */ +#if defined(DUK_USE_PREFER_SIZE) + duk_pop_2_nodecref_unsafe(thr); +#else + DUK_ASSERT(!DUK_TVAL_NEEDS_REFCOUNT_UPDATE(duk_get_tval(thr, -2))); + DUK_ASSERT(!DUK_TVAL_NEEDS_REFCOUNT_UPDATE(duk_get_tval(thr, -1))); + DUK_ASSERT(duk_get_top(thr) >= 2); + thr->valstack_top -= 2; + tv_x = thr->valstack_top; + tv_y = tv_x + 1; + DUK_TVAL_SET_UNDEFINED(tv_x); /* Value stack policy */ + DUK_TVAL_SET_UNDEFINED(tv_y); +#endif + + return duk__compare_number(retval, d1, d2); +} + +/* + * instanceof + */ + +/* + * ES2015 Section 7.3.19 describes the OrdinaryHasInstance() algorithm + * which covers both bound and non-bound functions; in effect the algorithm + * includes E5 Sections 11.8.6, 15.3.5.3, and 15.3.4.5.3. + * + * ES2015 Section 12.9.4 describes the instanceof operator which first + * checks @@hasInstance well-known symbol and falls back to + * OrdinaryHasInstance(). + * + * Limited Proxy support: don't support 'getPrototypeOf' trap but + * continue lookup in Proxy target if the value is a Proxy. + */ + +DUK_LOCAL duk_bool_t duk__js_instanceof_helper(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y, duk_bool_t skip_sym_check) { + duk_hobject *func; + duk_hobject *val; + duk_hobject *proto; + duk_tval *tv; + duk_bool_t skip_first; + duk_uint_t sanity; + + /* + * Get the values onto the stack first. It would be possible to cover + * some normal cases without resorting to the value stack. + * + * The right hand side could be a light function (as they generally + * behave like objects). Light functions never have a 'prototype' + * property so E5.1 Section 15.3.5.3 step 3 always throws a TypeError. + * Using duk_require_hobject() is thus correct (except for error msg). + */ + + duk_push_tval(thr, tv_x); + duk_push_tval(thr, tv_y); + func = duk_require_hobject(thr, -1); + DUK_ASSERT(func != NULL); + +#if defined(DUK_USE_SYMBOL_BUILTIN) + /* + * @@hasInstance check, ES2015 Section 12.9.4, Steps 2-4. + */ + if (!skip_sym_check) { + if (duk_get_method_stridx(thr, -1, DUK_STRIDX_WELLKNOWN_SYMBOL_HAS_INSTANCE)) { + /* [ ... lhs rhs func ] */ + duk_insert(thr, -3); /* -> [ ... func lhs rhs ] */ + duk_swap_top(thr, -2); /* -> [ ... func rhs(this) lhs ] */ + duk_call_method(thr, 1); + return duk_to_boolean_top_pop(thr); + } + } +#else + DUK_UNREF(skip_sym_check); +#endif + + /* + * For bound objects, [[HasInstance]] just calls the target function + * [[HasInstance]]. If that is again a bound object, repeat until + * we find a non-bound Function object. + * + * The bound function chain is now "collapsed" so there can be only + * one bound function in the chain. + */ + + if (!DUK_HOBJECT_IS_CALLABLE(func)) { + /* + * Note: of native ECMAScript objects, only Function instances + * have a [[HasInstance]] internal property. Custom objects might + * also have it, but not in current implementation. + * + * XXX: add a separate flag, DUK_HOBJECT_FLAG_ALLOW_INSTANCEOF? + */ + goto error_invalid_rval; + } + + if (DUK_HOBJECT_HAS_BOUNDFUNC(func)) { + duk_push_tval(thr, &((duk_hboundfunc *) (void *) func)->target); + duk_replace(thr, -2); + func = duk_require_hobject(thr, -1); /* lightfunc throws */ + + /* Rely on Function.prototype.bind() never creating bound + * functions whose target is not proper. + */ + DUK_ASSERT(func != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_CALLABLE(func)); + } + + /* + * 'func' is now a non-bound object which supports [[HasInstance]] + * (which here just means DUK_HOBJECT_FLAG_CALLABLE). Move on + * to execute E5 Section 15.3.5.3. + */ + + DUK_ASSERT(func != NULL); + DUK_ASSERT(!DUK_HOBJECT_HAS_BOUNDFUNC(func)); + DUK_ASSERT(DUK_HOBJECT_IS_CALLABLE(func)); + + /* [ ... lval rval(func) ] */ + + /* For lightfuncs, buffers, and pointers start the comparison directly + * from the virtual prototype object. + */ + skip_first = 0; + tv = DUK_GET_TVAL_NEGIDX(thr, -2); + switch (DUK_TVAL_GET_TAG(tv)) { + case DUK_TAG_LIGHTFUNC: + val = thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]; + DUK_ASSERT(val != NULL); + break; + case DUK_TAG_BUFFER: + val = thr->builtins[DUK_BIDX_UINT8ARRAY_PROTOTYPE]; + DUK_ASSERT(val != NULL); + break; + case DUK_TAG_POINTER: + val = thr->builtins[DUK_BIDX_POINTER_PROTOTYPE]; + DUK_ASSERT(val != NULL); + break; + case DUK_TAG_OBJECT: + skip_first = 1; /* Ignore object itself on first round. */ + val = DUK_TVAL_GET_OBJECT(tv); + DUK_ASSERT(val != NULL); + break; + default: + goto pop2_and_false; + } + DUK_ASSERT(val != NULL); /* Loop doesn't actually rely on this. */ + + /* Look up .prototype of rval. Leave it on the value stack in case it + * has been virtualized (e.g. getter, Proxy trap). + */ + duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_PROTOTYPE); /* -> [ ... lval rval rval.prototype ] */ +#if defined(DUK_USE_VERBOSE_ERRORS) + proto = duk_get_hobject(thr, -1); + if (proto == NULL) { + goto error_invalid_rval_noproto; + } +#else + proto = duk_require_hobject(thr, -1); +#endif + + sanity = DUK_HOBJECT_PROTOTYPE_CHAIN_SANITY; + do { + /* + * Note: prototype chain is followed BEFORE first comparison. This + * means that the instanceof lval is never itself compared to the + * rval.prototype property. This is apparently intentional, see E5 + * Section 15.3.5.3, step 4.a. + * + * Also note: + * + * js> (function() {}) instanceof Function + * true + * js> Function instanceof Function + * true + * + * For the latter, h_proto will be Function.prototype, which is the + * built-in Function prototype. Because Function.[[Prototype]] is + * also the built-in Function prototype, the result is true. + */ + + if (!val) { + goto pop3_and_false; + } + + DUK_ASSERT(val != NULL); +#if defined(DUK_USE_ES6_PROXY) + val = duk_hobject_resolve_proxy_target(val); +#endif + + if (skip_first) { + skip_first = 0; + } else if (val == proto) { + goto pop3_and_true; + } + + DUK_ASSERT(val != NULL); + val = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, val); + } while (--sanity > 0); + + DUK_ASSERT(sanity == 0); + DUK_ERROR_RANGE(thr, DUK_STR_PROTOTYPE_CHAIN_LIMIT); + DUK_WO_NORETURN(return 0;); + +pop2_and_false: + duk_pop_2_unsafe(thr); + return 0; + +pop3_and_false: + duk_pop_3_unsafe(thr); + return 0; + +pop3_and_true: + duk_pop_3_unsafe(thr); + return 1; + +error_invalid_rval: + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_INSTANCEOF_RVAL); + DUK_WO_NORETURN(return 0;); + +#if defined(DUK_USE_VERBOSE_ERRORS) +error_invalid_rval_noproto: + DUK_ERROR_TYPE(thr, DUK_STR_INVALID_INSTANCEOF_RVAL_NOPROTO); + DUK_WO_NORETURN(return 0;); +#endif +} + +#if defined(DUK_USE_SYMBOL_BUILTIN) +DUK_INTERNAL duk_bool_t duk_js_instanceof_ordinary(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y) { + return duk__js_instanceof_helper(thr, tv_x, tv_y, 1 /*skip_sym_check*/); +} +#endif + +DUK_INTERNAL duk_bool_t duk_js_instanceof(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y) { + return duk__js_instanceof_helper(thr, tv_x, tv_y, 0 /*skip_sym_check*/); +} + +/* + * in + */ + +/* + * E5 Sections 11.8.7, 8.12.6. + * + * Basically just a property existence check using [[HasProperty]]. + */ + +DUK_INTERNAL duk_bool_t duk_js_in(duk_hthread *thr, duk_tval *tv_x, duk_tval *tv_y) { + duk_bool_t retval; + + /* + * Get the values onto the stack first. It would be possible to cover + * some normal cases without resorting to the value stack (e.g. if + * lval is already a string). + */ + + /* XXX: The ES5/5.1/6 specifications require that the key in 'key in obj' + * must be string coerced before the internal HasProperty() algorithm is + * invoked. A fast path skipping coercion could be safely implemented for + * numbers (as number-to-string coercion has no side effects). For ES2015 + * proxy behavior, the trap 'key' argument must be in a string coerced + * form (which is a shame). + */ + + /* TypeError if rval is not an object or object like (e.g. lightfunc + * or plain buffer). + */ + duk_push_tval(thr, tv_x); + duk_push_tval(thr, tv_y); + duk_require_type_mask(thr, -1, DUK_TYPE_MASK_OBJECT | DUK_TYPE_MASK_LIGHTFUNC | DUK_TYPE_MASK_BUFFER); + + (void) duk_to_property_key_hstring(thr, -2); + + retval = duk_hobject_hasprop(thr, DUK_GET_TVAL_NEGIDX(thr, -1), DUK_GET_TVAL_NEGIDX(thr, -2)); + + duk_pop_2_unsafe(thr); + return retval; +} + +/* + * typeof + * + * E5 Section 11.4.3. + * + * Very straightforward. The only question is what to return for our + * non-standard tag / object types. + * + * There is an unfortunate string constant define naming problem with + * typeof return values for e.g. "Object" and "object"; careful with + * the built-in string defines. The LC_XXX defines are used for the + * lowercase variants now. + */ + +DUK_INTERNAL duk_small_uint_t duk_js_typeof_stridx(duk_tval *tv_x) { + duk_small_uint_t stridx = 0; + + switch (DUK_TVAL_GET_TAG(tv_x)) { + case DUK_TAG_UNDEFINED: { + stridx = DUK_STRIDX_LC_UNDEFINED; + break; + } + case DUK_TAG_NULL: { + /* Note: not a typo, "object" is returned for a null value. */ + stridx = DUK_STRIDX_LC_OBJECT; + break; + } + case DUK_TAG_BOOLEAN: { + stridx = DUK_STRIDX_LC_BOOLEAN; + break; + } + case DUK_TAG_POINTER: { + /* Implementation specific. */ + stridx = DUK_STRIDX_LC_POINTER; + break; + } + case DUK_TAG_STRING: { + duk_hstring *str; + + /* All internal keys are identified as Symbols. */ + str = DUK_TVAL_GET_STRING(tv_x); + DUK_ASSERT(str != NULL); + if (DUK_UNLIKELY(DUK_HSTRING_HAS_SYMBOL(str))) { + stridx = DUK_STRIDX_LC_SYMBOL; + } else { + stridx = DUK_STRIDX_LC_STRING; + } + break; + } + case DUK_TAG_OBJECT: { + duk_hobject *obj = DUK_TVAL_GET_OBJECT(tv_x); + DUK_ASSERT(obj != NULL); + if (DUK_HOBJECT_IS_CALLABLE(obj)) { + stridx = DUK_STRIDX_LC_FUNCTION; + } else { + stridx = DUK_STRIDX_LC_OBJECT; + } + break; + } + case DUK_TAG_BUFFER: { + /* Implementation specific. In Duktape 1.x this would be + * 'buffer', in Duktape 2.x changed to 'object' because plain + * buffers now mimic Uint8Array objects. + */ + stridx = DUK_STRIDX_LC_OBJECT; + break; + } + case DUK_TAG_LIGHTFUNC: { + stridx = DUK_STRIDX_LC_FUNCTION; + break; + } +#if defined(DUK_USE_FASTINT) + case DUK_TAG_FASTINT: +#endif + default: { + /* number */ + DUK_ASSERT(!DUK_TVAL_IS_UNUSED(tv_x)); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv_x)); + stridx = DUK_STRIDX_LC_NUMBER; + break; + } + } + + DUK_ASSERT_STRIDX_VALID(stridx); + return stridx; +} + +/* + * IsArray() + */ + +DUK_INTERNAL duk_bool_t duk_js_isarray_hobject(duk_hobject *h) { + DUK_ASSERT(h != NULL); +#if defined(DUK_USE_ES6_PROXY) + h = duk_hobject_resolve_proxy_target(h); +#endif + return (DUK_HOBJECT_GET_CLASS_NUMBER(h) == DUK_HOBJECT_CLASS_ARRAY ? 1 : 0); +} + +DUK_INTERNAL duk_bool_t duk_js_isarray(duk_tval *tv) { + DUK_ASSERT(tv != NULL); + if (DUK_TVAL_IS_OBJECT(tv)) { + return duk_js_isarray_hobject(DUK_TVAL_GET_OBJECT(tv)); + } + return 0; +} + +/* + * Array index and length + * + * Array index: E5 Section 15.4 + * Array length: E5 Section 15.4.5.1 steps 3.c - 3.d (array length write) + */ + +/* Compure array index from string context, or return a "not array index" + * indicator. + */ +DUK_INTERNAL duk_uarridx_t duk_js_to_arrayindex_string(const duk_uint8_t *str, duk_uint32_t blen) { + duk_uarridx_t res; + + /* Only strings with byte length 1-10 can be 32-bit array indices. + * Leading zeroes (except '0' alone), plus/minus signs are not allowed. + * We could do a lot of prechecks here, but since most strings won't + * start with any digits, it's simpler to just parse the number and + * fail quickly. + */ + + res = 0; + if (blen == 0) { + goto parse_fail; + } + do { + duk_uarridx_t dig; + dig = (duk_uarridx_t) (*str++) - DUK_ASC_0; + + if (dig <= 9U) { + /* Careful overflow handling. When multiplying by 10: + * - 0x19999998 x 10 = 0xfffffff0: no overflow, and adding + * 0...9 is safe. + * - 0x19999999 x 10 = 0xfffffffa: no overflow, adding + * 0...5 is safe, 6...9 overflows. + * - 0x1999999a x 10 = 0x100000004: always overflow. + */ + if (DUK_UNLIKELY(res >= 0x19999999UL)) { + if (res >= 0x1999999aUL) { + /* Always overflow. */ + goto parse_fail; + } + DUK_ASSERT(res == 0x19999999UL); + if (dig >= 6U) { + goto parse_fail; + } + res = 0xfffffffaUL + dig; + DUK_ASSERT(res >= 0xfffffffaUL); + DUK_ASSERT_DISABLE(res <= 0xffffffffUL); /* range */ + } else { + res = res * 10U + dig; + if (DUK_UNLIKELY(res == 0)) { + /* If 'res' is 0, previous 'res' must + * have been 0 and we scanned in a zero. + * This is only allowed if blen == 1, + * i.e. the exact string '0'. + */ + if (blen == (duk_uint32_t) 1) { + return 0; + } + goto parse_fail; + } + } + } else { + /* Because 'dig' is unsigned, catches both values + * above '9' and below '0'. + */ + goto parse_fail; + } + } while (--blen > 0); + + return res; + +parse_fail: + return DUK_HSTRING_NO_ARRAY_INDEX; +} + +#if !defined(DUK_USE_HSTRING_ARRIDX) +/* Get array index for a string which is known to be an array index. This helper + * is needed when duk_hstring doesn't concretely store the array index, but strings + * are flagged as array indices at intern time. + */ +DUK_INTERNAL duk_uarridx_t duk_js_to_arrayindex_hstring_fast_known(duk_hstring *h) { + const duk_uint8_t *p; + duk_uarridx_t res; + duk_uint8_t t; + + DUK_ASSERT(h != NULL); + DUK_ASSERT(DUK_HSTRING_HAS_ARRIDX(h)); + + p = DUK_HSTRING_GET_DATA(h); + res = 0; + for (;;) { + t = *p++; + if (DUK_UNLIKELY(t == 0)) { + /* Scanning to NUL is always safe for interned strings. */ + break; + } + DUK_ASSERT(t >= (duk_uint8_t) DUK_ASC_0 && t <= (duk_uint8_t) DUK_ASC_9); + res = res * 10U + (duk_uarridx_t) t - (duk_uarridx_t) DUK_ASC_0; + } + return res; +} + +DUK_INTERNAL duk_uarridx_t duk_js_to_arrayindex_hstring_fast(duk_hstring *h) { + DUK_ASSERT(h != NULL); + if (!DUK_HSTRING_HAS_ARRIDX(h)) { + return DUK_HSTRING_NO_ARRAY_INDEX; + } + return duk_js_to_arrayindex_hstring_fast_known(h); +} +#endif /* DUK_USE_HSTRING_ARRIDX */ +#line 1 "duk_js_var.c" +/* + * Identifier access and function closure handling. + * + * Provides the primitives for slow path identifier accesses: GETVAR, + * PUTVAR, DELVAR, etc. The fast path, direct register accesses, should + * be used for most identifier accesses. Consequently, these slow path + * primitives should be optimized for maximum compactness. + * + * ECMAScript environment records (declarative and object) are represented + * as internal objects with control keys. Environment records have a + * parent record ("outer environment reference") which is represented by + * the implicit prototype for technical reasons (in other words, it is a + * convenient field). The prototype chain is not followed in the ordinary + * sense for variable lookups. + * + * See identifier-handling.rst for more details on the identifier algorithms + * and the internal representation. See function-objects.rst for details on + * what function templates and instances are expected to look like. + * + * Care must be taken to avoid duk_tval pointer invalidation caused by + * e.g. value stack or object resizing. + * + * TODO: properties for function instances could be initialized much more + * efficiently by creating a property allocation for a certain size and + * filling in keys and values directly (and INCREFing both with "bulk incref" + * primitives. + * + * XXX: duk_hobject_getprop() and duk_hobject_putprop() calls are a bit + * awkward (especially because they follow the prototype chain); rework + * if "raw" own property helpers are added. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Local result type for duk__get_identifier_reference() lookup. + */ + +typedef struct { + duk_hobject *env; + duk_hobject *holder; /* for object-bound identifiers */ + duk_tval *value; /* for register-bound and declarative env identifiers */ + duk_uint_t attrs; /* property attributes for identifier (relevant if value != NULL) */ + duk_bool_t has_this; /* for object-bound identifiers: provide 'this' binding */ +} duk__id_lookup_result; + +/* + * Create a new function object based on a "template function" which contains + * compiled bytecode, constants, etc, but lacks a lexical environment. + * + * ECMAScript requires that each created closure is a separate object, with + * its own set of editable properties. However, structured property values + * (such as the formal arguments list and the variable map) are shared. + * Also the bytecode, constants, and inner functions are shared. + * + * See E5 Section 13.2 for detailed requirements on the function objects; + * there are no similar requirements for function "templates" which are an + * implementation dependent internal feature. Also see function-objects.rst + * for a discussion on the function instance properties provided by this + * implementation. + * + * Notes: + * + * * Order of internal properties should match frequency of use, since the + * properties will be linearly scanned on lookup (functions usually don't + * have enough properties to warrant a hash part). + * + * * The created closure is independent of its template; they do share the + * same 'data' buffer object, but the template object itself can be freed + * even if the closure object remains reachable. + */ + +DUK_LOCAL void duk__inc_data_inner_refcounts(duk_hthread *thr, duk_hcompfunc *f) { + duk_tval *tv, *tv_end; + duk_hobject **funcs, **funcs_end; + + DUK_UNREF(thr); + + /* If function creation fails due to out-of-memory, the data buffer + * pointer may be NULL in some cases. That's actually possible for + * GC code, but shouldn't be possible here because the incomplete + * function will be unwound from the value stack and never instantiated. + */ + DUK_ASSERT(DUK_HCOMPFUNC_GET_DATA(thr->heap, f) != NULL); + + tv = DUK_HCOMPFUNC_GET_CONSTS_BASE(thr->heap, f); + tv_end = DUK_HCOMPFUNC_GET_CONSTS_END(thr->heap, f); + while (tv < tv_end) { + DUK_TVAL_INCREF(thr, tv); + tv++; + } + + funcs = DUK_HCOMPFUNC_GET_FUNCS_BASE(thr->heap, f); + funcs_end = DUK_HCOMPFUNC_GET_FUNCS_END(thr->heap, f); + while (funcs < funcs_end) { + DUK_HEAPHDR_INCREF(thr, (duk_heaphdr *) *funcs); + funcs++; + } +} + +/* Push a new closure on the stack. + * + * Note: if fun_temp has NEWENV, i.e. a new lexical and variable declaration + * is created when the function is called, only outer_lex_env matters + * (outer_var_env is ignored and may or may not be same as outer_lex_env). + */ + +DUK_LOCAL const duk_uint16_t duk__closure_copy_proplist[] = { + /* order: most frequent to least frequent */ + DUK_STRIDX_INT_VARMAP, + DUK_STRIDX_INT_FORMALS, +#if defined(DUK_USE_PC2LINE) + DUK_STRIDX_INT_PC2LINE, +#endif +#if defined(DUK_USE_FUNC_FILENAME_PROPERTY) + DUK_STRIDX_FILE_NAME, +#endif +#if defined(DUK_USE_NONSTD_FUNC_SOURCE_PROPERTY) + DUK_STRIDX_INT_SOURCE +#endif +}; + +DUK_INTERNAL +void duk_js_push_closure(duk_hthread *thr, + duk_hcompfunc *fun_temp, + duk_hobject *outer_var_env, + duk_hobject *outer_lex_env, + duk_bool_t add_auto_proto) { + duk_hcompfunc *fun_clos; + duk_harray *formals; + duk_small_uint_t i; + duk_uint_t len_value; + + DUK_ASSERT(fun_temp != NULL); + DUK_ASSERT(DUK_HCOMPFUNC_GET_DATA(thr->heap, fun_temp) != NULL); + DUK_ASSERT(DUK_HCOMPFUNC_GET_FUNCS(thr->heap, fun_temp) != NULL); + DUK_ASSERT(DUK_HCOMPFUNC_GET_BYTECODE(thr->heap, fun_temp) != NULL); + DUK_ASSERT(outer_var_env != NULL); + DUK_ASSERT(outer_lex_env != NULL); + DUK_UNREF(len_value); + + DUK_STATS_INC(thr->heap, stats_envrec_pushclosure); + + fun_clos = duk_push_hcompfunc(thr); + DUK_ASSERT(fun_clos != NULL); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) fun_clos) == thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]); + + duk_push_hobject(thr, &fun_temp->obj); /* -> [ ... closure template ] */ + + DUK_ASSERT(DUK_HOBJECT_IS_COMPFUNC((duk_hobject *) fun_clos)); + DUK_ASSERT(DUK_HCOMPFUNC_GET_DATA(thr->heap, fun_clos) == NULL); + DUK_ASSERT(DUK_HCOMPFUNC_GET_FUNCS(thr->heap, fun_clos) == NULL); + DUK_ASSERT(DUK_HCOMPFUNC_GET_BYTECODE(thr->heap, fun_clos) == NULL); + + DUK_HCOMPFUNC_SET_DATA(thr->heap, fun_clos, DUK_HCOMPFUNC_GET_DATA(thr->heap, fun_temp)); + DUK_HCOMPFUNC_SET_FUNCS(thr->heap, fun_clos, DUK_HCOMPFUNC_GET_FUNCS(thr->heap, fun_temp)); + DUK_HCOMPFUNC_SET_BYTECODE(thr->heap, fun_clos, DUK_HCOMPFUNC_GET_BYTECODE(thr->heap, fun_temp)); + + /* Note: all references inside 'data' need to get their refcounts + * upped too. This is the case because refcounts are decreased + * through every function referencing 'data' independently. + */ + + DUK_HBUFFER_INCREF(thr, DUK_HCOMPFUNC_GET_DATA(thr->heap, fun_clos)); + duk__inc_data_inner_refcounts(thr, fun_temp); + + fun_clos->nregs = fun_temp->nregs; + fun_clos->nargs = fun_temp->nargs; +#if defined(DUK_USE_DEBUGGER_SUPPORT) + fun_clos->start_line = fun_temp->start_line; + fun_clos->end_line = fun_temp->end_line; +#endif + + DUK_ASSERT(DUK_HCOMPFUNC_GET_DATA(thr->heap, fun_clos) != NULL); + DUK_ASSERT(DUK_HCOMPFUNC_GET_FUNCS(thr->heap, fun_clos) != NULL); + DUK_ASSERT(DUK_HCOMPFUNC_GET_BYTECODE(thr->heap, fun_clos) != NULL); + + /* XXX: Could also copy from template, but there's no way to have any + * other value here now (used code has no access to the template). + * Prototype is set by duk_push_hcompfunc(). + */ + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, &fun_clos->obj) == thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]); +#if 0 + DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, &fun_clos->obj, thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]); +#endif + + /* Copy duk_hobject flags as is from the template using a mask. + * Leave out duk_heaphdr owned flags just in case (e.g. if there's + * some GC flag or similar). Some flags can then be adjusted + * separately if necessary. + */ + + /* DUK_HEAPHDR_SET_FLAGS() masks changes to non-duk_heaphdr flags only. */ + DUK_HEAPHDR_SET_FLAGS((duk_heaphdr *) fun_clos, DUK_HEAPHDR_GET_FLAGS_RAW((duk_heaphdr *) fun_temp)); + DUK_DD(DUK_DDPRINT("fun_temp heaphdr flags: 0x%08lx, fun_clos heaphdr flags: 0x%08lx", + (unsigned long) DUK_HEAPHDR_GET_FLAGS_RAW((duk_heaphdr *) fun_temp), + (unsigned long) DUK_HEAPHDR_GET_FLAGS_RAW((duk_heaphdr *) fun_clos))); + + DUK_ASSERT(DUK_HOBJECT_HAS_EXTENSIBLE(&fun_clos->obj)); + DUK_ASSERT(!DUK_HOBJECT_HAS_BOUNDFUNC(&fun_clos->obj)); + DUK_ASSERT(DUK_HOBJECT_HAS_COMPFUNC(&fun_clos->obj)); + DUK_ASSERT(!DUK_HOBJECT_HAS_NATFUNC(&fun_clos->obj)); + DUK_ASSERT(!DUK_HOBJECT_IS_THREAD(&fun_clos->obj)); + /* DUK_HOBJECT_FLAG_ARRAY_PART: don't care */ + /* DUK_HOBJECT_FLAG_NEWENV: handled below */ + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARRAY(&fun_clos->obj)); + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_STRINGOBJ(&fun_clos->obj)); + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARGUMENTS(&fun_clos->obj)); + + if (!DUK_HOBJECT_HAS_CONSTRUCTABLE(&fun_clos->obj)) { + /* If the template is not constructable don't add an automatic + * .prototype property. This is the case for e.g. ES2015 object + * literal getters/setters and method definitions. + */ + add_auto_proto = 0; + } + + /* + * Setup environment record properties based on the template and + * its flags. + * + * If DUK_HOBJECT_HAS_NEWENV(fun_temp) is true, the environment + * records represent identifiers "outside" the function; the + * "inner" environment records are created on demand. Otherwise, + * the environment records are those that will be directly used + * (e.g. for declarations). + * + * _Lexenv is always set; _Varenv defaults to _Lexenv if missing, + * so _Varenv is only set if _Lexenv != _Varenv. + * + * This is relatively complex, see doc/identifier-handling.rst. + */ + + if (DUK_HOBJECT_HAS_NEWENV(&fun_clos->obj)) { +#if defined(DUK_USE_FUNC_NAME_PROPERTY) + if (DUK_HOBJECT_HAS_NAMEBINDING(&fun_clos->obj)) { + duk_hobject *proto; + duk_hdecenv *new_env; + + /* + * Named function expression, name needs to be bound + * in an intermediate environment record. The "outer" + * lexical/variable environment will thus be: + * + * a) { funcname: , __prototype: outer_lex_env } + * b) { funcname: , __prototype: } (if outer_lex_env missing) + */ + + if (outer_lex_env) { + proto = outer_lex_env; + } else { + proto = thr->builtins[DUK_BIDX_GLOBAL_ENV]; + } + + /* -> [ ... closure template env ] */ + new_env = + duk_hdecenv_alloc(thr, + DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_DECENV)); + DUK_ASSERT(new_env != NULL); + duk_push_hobject(thr, (duk_hobject *) new_env); + + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) new_env) == NULL); + DUK_HOBJECT_SET_PROTOTYPE(thr->heap, (duk_hobject *) new_env, proto); + DUK_HOBJECT_INCREF_ALLOWNULL(thr, proto); + + DUK_ASSERT(new_env->thread == NULL); /* Closed. */ + DUK_ASSERT(new_env->varmap == NULL); + + /* It's important that duk_xdef_prop() is a 'raw define' so that any + * properties in an ancestor are never an issue (they should never be + * e.g. non-writable, but just in case). + * + * Because template objects are not visible to user code, the case + * where .name is missing shouldn't happen in practice. It it does, + * the name 'undefined' gets bound and maps to the closure (which is + * a bit odd, but safe). + */ + (void) duk_get_prop_stridx_short(thr, -2, DUK_STRIDX_NAME); + /* -> [ ... closure template env funcname ] */ + duk_dup_m4(thr); /* -> [ ... closure template env funcname closure ] */ + duk_xdef_prop(thr, -3, DUK_PROPDESC_FLAGS_NONE); /* -> [ ... closure template env ] */ + /* env[funcname] = closure */ + + /* [ ... closure template env ] */ + + DUK_HCOMPFUNC_SET_LEXENV(thr->heap, fun_clos, (duk_hobject *) new_env); + DUK_HCOMPFUNC_SET_VARENV(thr->heap, fun_clos, (duk_hobject *) new_env); + DUK_HOBJECT_INCREF(thr, (duk_hobject *) new_env); + DUK_HOBJECT_INCREF(thr, (duk_hobject *) new_env); + duk_pop_unsafe(thr); + + /* [ ... closure template ] */ + } else +#endif /* DUK_USE_FUNC_NAME_PROPERTY */ + { + /* + * Other cases (function declaration, anonymous function expression, + * strict direct eval code). The "outer" environment will be whatever + * the caller gave us. + */ + + DUK_HCOMPFUNC_SET_LEXENV(thr->heap, fun_clos, outer_lex_env); + DUK_HCOMPFUNC_SET_VARENV(thr->heap, fun_clos, outer_lex_env); + DUK_HOBJECT_INCREF(thr, outer_lex_env); + DUK_HOBJECT_INCREF(thr, outer_lex_env); + + /* [ ... closure template ] */ + } + } else { + /* + * Function gets no new environment when called. This is the + * case for global code, indirect eval code, and non-strict + * direct eval code. There is no direct correspondence to the + * E5 specification, as global/eval code is not exposed as a + * function. + */ + + DUK_ASSERT(!DUK_HOBJECT_HAS_NAMEBINDING(&fun_temp->obj)); + + DUK_HCOMPFUNC_SET_LEXENV(thr->heap, fun_clos, outer_lex_env); + DUK_HCOMPFUNC_SET_VARENV(thr->heap, fun_clos, outer_var_env); + DUK_HOBJECT_INCREF(thr, outer_lex_env); /* NULLs not allowed; asserted on entry */ + DUK_HOBJECT_INCREF(thr, outer_var_env); + } + DUK_DDD(DUK_DDDPRINT("closure varenv -> %!ipO, lexenv -> %!ipO", + (duk_heaphdr *) fun_clos->var_env, + (duk_heaphdr *) fun_clos->lex_env)); + + /* Call handling assumes this for all callable closures. */ + DUK_ASSERT(DUK_HCOMPFUNC_GET_LEXENV(thr->heap, fun_clos) != NULL); + DUK_ASSERT(DUK_HCOMPFUNC_GET_VARENV(thr->heap, fun_clos) != NULL); + + /* + * Copy some internal properties directly + * + * The properties will be non-writable and non-enumerable, but + * configurable. + * + * Function templates are bare objects, so inheritance of internal + * Symbols is not an issue here even when using ordinary property + * reads. The function instance created is not bare, so internal + * Symbols must be defined without inheritance checks. + */ + + /* [ ... closure template ] */ + + DUK_DDD(DUK_DDDPRINT("copying properties: closure=%!iT, template=%!iT", + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + + for (i = 0; i < (duk_small_uint_t) (sizeof(duk__closure_copy_proplist) / sizeof(duk_uint16_t)); i++) { + duk_small_int_t stridx = (duk_small_int_t) duk__closure_copy_proplist[i]; + if (duk_xget_owndataprop_stridx_short(thr, -1, stridx)) { + /* [ ... closure template val ] */ + DUK_DDD(DUK_DDDPRINT("copying property, stridx=%ld -> found", (long) stridx)); + duk_xdef_prop_stridx_short(thr, -3, stridx, DUK_PROPDESC_FLAGS_C); + } else { + DUK_DDD(DUK_DDDPRINT("copying property, stridx=%ld -> not found", (long) stridx)); + duk_pop_unsafe(thr); + } + } + + /* + * "length" maps to number of formals (E5 Section 13.2) for function + * declarations/expressions (non-bound functions). Note that 'nargs' + * is NOT necessarily equal to the number of arguments. Use length + * of _Formals; if missing, assume nargs matches .length. + */ + + /* [ ... closure template ] */ + + formals = duk_hobject_get_formals(thr, (duk_hobject *) fun_temp); + if (formals) { + len_value = (duk_uint_t) formals->length; + DUK_DD(DUK_DDPRINT("closure length from _Formals -> %ld", (long) len_value)); + } else { + len_value = fun_temp->nargs; + DUK_DD(DUK_DDPRINT("closure length defaulted from nargs -> %ld", (long) len_value)); + } + + duk_push_uint(thr, len_value); /* [ ... closure template len_value ] */ + duk_xdef_prop_stridx_short(thr, -3, DUK_STRIDX_LENGTH, DUK_PROPDESC_FLAGS_C); + + /* + * "prototype" is, by default, a fresh object with the "constructor" + * property. + * + * Note that this creates a circular reference for every function + * instance (closure) which prevents refcount-based collection of + * function instances. + * + * XXX: Try to avoid creating the default prototype object, because + * many functions are not used as constructors and the default + * prototype is unnecessary. Perhaps it could be created on-demand + * when it is first accessed? + */ + + /* [ ... closure template ] */ + + if (add_auto_proto) { + duk_push_object(thr); /* -> [ ... closure template newobj ] */ + duk_dup_m3(thr); /* -> [ ... closure template newobj closure ] */ + duk_xdef_prop_stridx_short(thr, + -2, + DUK_STRIDX_CONSTRUCTOR, + DUK_PROPDESC_FLAGS_WC); /* -> [ ... closure template newobj ] */ + duk_compact(thr, -1); /* compact the prototype */ + duk_xdef_prop_stridx_short(thr, -3, DUK_STRIDX_PROTOTYPE, DUK_PROPDESC_FLAGS_W); /* -> [ ... closure template ] */ + } + + /* + * "arguments" and "caller" must be mapped to throwers for strict + * mode and bound functions (E5 Section 15.3.5). + * + * XXX: This is expensive to have for every strict function instance. + * Try to implement as virtual properties or on-demand created properties. + */ + + /* [ ... closure template ] */ + + if (DUK_HOBJECT_HAS_STRICT(&fun_clos->obj)) { + duk_xdef_prop_stridx_thrower(thr, -2, DUK_STRIDX_CALLER); + duk_xdef_prop_stridx_thrower(thr, -2, DUK_STRIDX_LC_ARGUMENTS); + } else { +#if defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) + DUK_DDD(DUK_DDDPRINT("function is non-strict and non-standard 'caller' property in use, add initial 'null' value")); + duk_push_null(thr); + duk_xdef_prop_stridx_short(thr, -3, DUK_STRIDX_CALLER, DUK_PROPDESC_FLAGS_NONE); +#else + DUK_DDD(DUK_DDDPRINT("function is non-strict and non-standard 'caller' property not used")); +#endif + } + + /* + * "name" used to be non-standard but is now defined by ES2015. + * In ES2015/ES2016 the .name property is configurable. + */ + + /* [ ... closure template ] */ + +#if defined(DUK_USE_FUNC_NAME_PROPERTY) + /* XXX: Look for own property only; doesn't matter much because + * templates are bare objects. + */ + if (duk_get_prop_stridx_short(thr, -1, DUK_STRIDX_NAME)) { + /* [ ... closure template name ] */ + DUK_ASSERT(duk_is_string(thr, -1)); + DUK_DD(DUK_DDPRINT("setting function instance name to %!T", duk_get_tval(thr, -1))); + duk_xdef_prop_stridx_short(thr, -3, DUK_STRIDX_NAME, DUK_PROPDESC_FLAGS_C); /* -> [ ... closure template ] */ + } else { + /* Anonymous functions don't have a .name in ES2015, so don't set + * it on the instance either. The instance will then inherit + * it from Function.prototype.name. + */ + DUK_DD(DUK_DDPRINT("not setting function instance .name")); + duk_pop_unsafe(thr); + } +#endif + + /* + * Compact the closure, in most cases no properties will be added later. + * Also, without this the closures end up having unused property slots + * (e.g. in Duktape 0.9.0, 8 slots would be allocated and only 7 used). + * A better future solution would be to allocate the closure directly + * to correct size (and setup the properties directly without going + * through the API). + */ + + duk_compact(thr, -2); + + /* + * Some assertions (E5 Section 13.2). + */ + + DUK_ASSERT(DUK_HOBJECT_GET_CLASS_NUMBER(&fun_clos->obj) == DUK_HOBJECT_CLASS_FUNCTION); + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, &fun_clos->obj) == thr->builtins[DUK_BIDX_FUNCTION_PROTOTYPE]); + DUK_ASSERT(DUK_HOBJECT_HAS_EXTENSIBLE(&fun_clos->obj)); + DUK_ASSERT(duk_has_prop_stridx(thr, -2, DUK_STRIDX_LENGTH) != 0); + DUK_ASSERT(add_auto_proto == 0 || duk_has_prop_stridx(thr, -2, DUK_STRIDX_PROTOTYPE) != 0); + /* May be missing .name */ + DUK_ASSERT(!DUK_HOBJECT_HAS_STRICT(&fun_clos->obj) || duk_has_prop_stridx(thr, -2, DUK_STRIDX_CALLER) != 0); + DUK_ASSERT(!DUK_HOBJECT_HAS_STRICT(&fun_clos->obj) || duk_has_prop_stridx(thr, -2, DUK_STRIDX_LC_ARGUMENTS) != 0); + + /* + * Finish + */ + + /* [ ... closure template ] */ + + DUK_DDD(DUK_DDDPRINT("created function instance: template=%!iT -> closure=%!iT", + (duk_tval *) duk_get_tval(thr, -1), + (duk_tval *) duk_get_tval(thr, -2))); + + duk_pop_unsafe(thr); + + /* [ ... closure ] */ +} + +/* + * Delayed activation environment record initialization (for functions + * with NEWENV). + * + * The non-delayed initialization is handled by duk_handle_call(). + */ + +DUK_LOCAL void duk__preallocate_env_entries(duk_hthread *thr, duk_hobject *varmap, duk_hobject *env) { + duk_uint_fast32_t i; + + for (i = 0; i < (duk_uint_fast32_t) DUK_HOBJECT_GET_ENEXT(varmap); i++) { + duk_hstring *key; + + key = DUK_HOBJECT_E_GET_KEY(thr->heap, varmap, i); + DUK_ASSERT(key != NULL); /* assume keys are compact in _Varmap */ + DUK_ASSERT(!DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, varmap, i)); /* assume plain values */ + + /* Predefine as 'undefined' to reserve a property slot. + * This makes the unwind process (where register values + * are copied to the env object) safe against throwing. + * + * XXX: This could be made much faster by creating the + * property table directly. + */ + duk_push_undefined(thr); + DUK_DDD(DUK_DDDPRINT("preallocate env entry for key %!O", key)); + duk_hobject_define_property_internal(thr, env, key, DUK_PROPDESC_FLAGS_WE); + } +} + +/* shared helper */ +DUK_INTERNAL +duk_hobject *duk_create_activation_environment_record(duk_hthread *thr, duk_hobject *func, duk_size_t bottom_byteoff) { + duk_hdecenv *env; + duk_hobject *parent; + duk_hcompfunc *f; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(func != NULL); + + DUK_STATS_INC(thr->heap, stats_envrec_create); + + f = (duk_hcompfunc *) func; + parent = DUK_HCOMPFUNC_GET_LEXENV(thr->heap, f); + if (!parent) { + parent = thr->builtins[DUK_BIDX_GLOBAL_ENV]; + } + + env = duk_hdecenv_alloc(thr, DUK_HOBJECT_FLAG_EXTENSIBLE | DUK_HOBJECT_CLASS_AS_FLAGS(DUK_HOBJECT_CLASS_DECENV)); + DUK_ASSERT(env != NULL); + duk_push_hobject(thr, (duk_hobject *) env); + + DUK_ASSERT(DUK_HOBJECT_GET_PROTOTYPE(thr->heap, (duk_hobject *) env) == NULL); + DUK_HOBJECT_SET_PROTOTYPE(thr->heap, (duk_hobject *) env, parent); + DUK_HOBJECT_INCREF_ALLOWNULL(thr, parent); /* parent env is the prototype */ + + /* open scope information, for compiled functions only */ + + DUK_ASSERT(env->thread == NULL); + DUK_ASSERT(env->varmap == NULL); + DUK_ASSERT(env->regbase_byteoff == 0); + if (DUK_HOBJECT_IS_COMPFUNC(func)) { + duk_hobject *varmap; + + varmap = duk_hobject_get_varmap(thr, func); + if (varmap != NULL) { + env->varmap = varmap; + DUK_HOBJECT_INCREF(thr, varmap); + env->thread = thr; + DUK_HTHREAD_INCREF(thr, thr); + env->regbase_byteoff = bottom_byteoff; + + /* Preallocate env property table to avoid potential + * for out-of-memory on unwind when the env is closed. + */ + duk__preallocate_env_entries(thr, varmap, (duk_hobject *) env); + } else { + /* If function has no _Varmap, leave the environment closed. */ + DUK_ASSERT(env->thread == NULL); + DUK_ASSERT(env->varmap == NULL); + DUK_ASSERT(env->regbase_byteoff == 0); + } + } + + return (duk_hobject *) env; +} + +DUK_INTERNAL +void duk_js_init_activation_environment_records_delayed(duk_hthread *thr, duk_activation *act) { + duk_hobject *func; + duk_hobject *env; + + DUK_ASSERT(thr != NULL); + func = DUK_ACT_GET_FUNC(act); + DUK_ASSERT(func != NULL); + DUK_ASSERT(!DUK_HOBJECT_HAS_BOUNDFUNC(func)); /* bound functions are never in act 'func' */ + + /* + * Delayed initialization only occurs for 'NEWENV' functions. + */ + + DUK_ASSERT(DUK_HOBJECT_HAS_NEWENV(func)); + DUK_ASSERT(act->lex_env == NULL); + DUK_ASSERT(act->var_env == NULL); + + DUK_STATS_INC(thr->heap, stats_envrec_delayedcreate); + + env = duk_create_activation_environment_record(thr, func, act->bottom_byteoff); + DUK_ASSERT(env != NULL); + /* 'act' is a stable pointer, so still OK. */ + + DUK_DDD(DUK_DDDPRINT("created delayed fresh env: %!ipO", (duk_heaphdr *) env)); +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) + { + duk_hobject *p = env; + while (p) { + DUK_DDD(DUK_DDDPRINT(" -> %!ipO", (duk_heaphdr *) p)); + p = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, p); + } + } +#endif + + act->lex_env = env; + act->var_env = env; + DUK_HOBJECT_INCREF(thr, env); /* XXX: incref by count (here 2 times) */ + DUK_HOBJECT_INCREF(thr, env); + + duk_pop_unsafe(thr); +} + +/* + * Closing environment records. + * + * The environment record MUST be closed with the thread where its activation + * is; i.e. if 'env' is open, 'thr' must match env->thread, and the regbase + * and varmap must still be valid. On entry, 'env' must be reachable. + */ + +DUK_INTERNAL void duk_js_close_environment_record(duk_hthread *thr, duk_hobject *env) { + duk_uint_fast32_t i; + duk_hobject *varmap; + duk_hstring *key; + duk_tval *tv; + duk_uint_t regnum; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(env != NULL); + + if (DUK_UNLIKELY(!DUK_HOBJECT_IS_DECENV(env))) { + DUK_DDD(DUK_DDDPRINT("env not a declarative record: %!iO", (duk_heaphdr *) env)); + return; + } + + varmap = ((duk_hdecenv *) env)->varmap; + if (varmap == NULL) { + DUK_DDD(DUK_DDDPRINT("env already closed: %!iO", (duk_heaphdr *) env)); + + return; + } + DUK_ASSERT(((duk_hdecenv *) env)->thread != NULL); + DUK_HDECENV_ASSERT_VALID((duk_hdecenv *) env); + + DUK_DDD(DUK_DDDPRINT("closing env: %!iO", (duk_heaphdr *) env)); + DUK_DDD(DUK_DDDPRINT("varmap: %!O", (duk_heaphdr *) varmap)); + + /* Env must be closed in the same thread as where it runs. */ + DUK_ASSERT(((duk_hdecenv *) env)->thread == thr); + + /* XXX: additional conditions when to close variables? we don't want to do it + * unless the environment may have "escaped" (referenced in a function closure). + * With delayed environments, the existence is probably good enough of a check. + */ + + /* Note: we rely on the _Varmap having a bunch of nice properties, like: + * - being compacted and unmodified during this process + * - not containing an array part + * - having correct value types + */ + + DUK_DDD(DUK_DDDPRINT("copying bound register values, %ld bound regs", (long) DUK_HOBJECT_GET_ENEXT(varmap))); + + /* Copy over current variable values from value stack to the + * environment record. The scope object is empty but may + * inherit from another scope which has conflicting names. + */ + + /* XXX: Do this using a once allocated entry area, no side effects. + * Hash part would need special treatment however (maybe copy, and + * then realloc with hash part if large enough). + */ + for (i = 0; i < (duk_uint_fast32_t) DUK_HOBJECT_GET_ENEXT(varmap); i++) { + duk_size_t regbase_byteoff; + + key = DUK_HOBJECT_E_GET_KEY(thr->heap, varmap, i); + DUK_ASSERT(key != NULL); /* assume keys are compact in _Varmap */ + DUK_ASSERT(!DUK_HOBJECT_E_SLOT_IS_ACCESSOR(thr->heap, varmap, i)); /* assume plain values */ + + tv = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, varmap, i); + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + DUK_ASSERT(DUK_TVAL_GET_NUMBER(tv) <= (duk_double_t) DUK_UINT32_MAX); /* limits */ +#if defined(DUK_USE_FASTINT) + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv)); + regnum = (duk_uint_t) DUK_TVAL_GET_FASTINT_U32(tv); +#else + regnum = (duk_uint_t) DUK_TVAL_GET_NUMBER(tv); +#endif + + regbase_byteoff = ((duk_hdecenv *) env)->regbase_byteoff; + DUK_ASSERT((duk_uint8_t *) thr->valstack + regbase_byteoff + sizeof(duk_tval) * regnum >= + (duk_uint8_t *) thr->valstack); + DUK_ASSERT((duk_uint8_t *) thr->valstack + regbase_byteoff + sizeof(duk_tval) * regnum < + (duk_uint8_t *) thr->valstack_top); + + /* Write register value into env as named properties. + * If property already exists, overwrites silently. + * Property is writable, but not deletable (not configurable + * in terms of property attributes). + * + * This property write must not throw because we're unwinding + * and unwind code is not allowed to throw at present. The + * call itself has no such guarantees, but we've preallocated + * entries for each property when the env was created, so no + * out-of-memory error should be possible. If this guarantee + * is not provided, problems like GH-476 may happen. + */ + duk_push_tval(thr, + (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + regbase_byteoff + sizeof(duk_tval) * regnum)); + DUK_DDD(DUK_DDDPRINT("closing identifier %!O -> reg %ld, value %!T", + (duk_heaphdr *) key, + (long) regnum, + (duk_tval *) duk_get_tval(thr, -1))); + duk_hobject_define_property_internal(thr, env, key, DUK_PROPDESC_FLAGS_WE); + } + + /* NULL atomically to avoid inconsistent state + side effects. */ + DUK_HOBJECT_DECREF_NORZ(thr, ((duk_hdecenv *) env)->thread); + DUK_HOBJECT_DECREF_NORZ(thr, ((duk_hdecenv *) env)->varmap); + ((duk_hdecenv *) env)->thread = NULL; + ((duk_hdecenv *) env)->varmap = NULL; + + DUK_DDD(DUK_DDDPRINT("env after closing: %!O", (duk_heaphdr *) env)); +} + +/* + * GETIDREF: a GetIdentifierReference-like helper. + * + * Provides a parent traversing lookup and a single level lookup + * (for HasBinding). + * + * Instead of returning the value, returns a bunch of values allowing + * the caller to read, write, or delete the binding. Value pointers + * are duk_tval pointers which can be mutated directly as long as + * refcounts are properly updated. Note that any operation which may + * reallocate valstacks or compact objects may invalidate the returned + * duk_tval (but not object) pointers, so caller must be very careful. + * + * If starting environment record 'env' is given, 'act' is ignored. + * However, if 'env' is NULL, the caller may identify, in 'act', an + * activation which hasn't had its declarative environment initialized + * yet. The activation registers are then looked up, and its parent + * traversed normally. + * + * The 'out' structure values are only valid if the function returns + * success (non-zero). + */ + +/* lookup name from an open declarative record's registers */ +DUK_LOCAL +duk_bool_t duk__getid_open_decl_env_regs(duk_hthread *thr, duk_hstring *name, duk_hdecenv *env, duk__id_lookup_result *out) { + duk_tval *tv; + duk_size_t reg_rel; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(name != NULL); + DUK_ASSERT(env != NULL); + DUK_ASSERT(out != NULL); + + DUK_ASSERT(DUK_HOBJECT_IS_DECENV((duk_hobject *) env)); + DUK_HDECENV_ASSERT_VALID(env); + + if (env->thread == NULL) { + /* already closed */ + return 0; + } + DUK_ASSERT(env->varmap != NULL); + + tv = duk_hobject_find_entry_tval_ptr(thr->heap, env->varmap, name); + if (DUK_UNLIKELY(tv == NULL)) { + return 0; + } + + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + DUK_ASSERT(DUK_TVAL_GET_NUMBER(tv) <= (duk_double_t) DUK_UINT32_MAX); /* limits */ +#if defined(DUK_USE_FASTINT) + DUK_ASSERT(DUK_TVAL_IS_FASTINT(tv)); + reg_rel = (duk_size_t) DUK_TVAL_GET_FASTINT_U32(tv); +#else + reg_rel = (duk_size_t) DUK_TVAL_GET_NUMBER(tv); +#endif + DUK_ASSERT_DISABLE(reg_rel >= 0); /* unsigned */ + + tv = (duk_tval *) (void *) ((duk_uint8_t *) env->thread->valstack + env->regbase_byteoff + sizeof(duk_tval) * reg_rel); + DUK_ASSERT(tv >= env->thread->valstack && tv < env->thread->valstack_end); /* XXX: more accurate? */ + + out->value = tv; + out->attrs = DUK_PROPDESC_FLAGS_W; /* registers are mutable, non-deletable */ + out->env = (duk_hobject *) env; + out->holder = NULL; + out->has_this = 0; + return 1; +} + +/* lookup name from current activation record's functions' registers */ +DUK_LOCAL +duk_bool_t duk__getid_activation_regs(duk_hthread *thr, duk_hstring *name, duk_activation *act, duk__id_lookup_result *out) { + duk_tval *tv; + duk_hobject *func; + duk_hobject *varmap; + duk_size_t reg_rel; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(name != NULL); + DUK_ASSERT(act != NULL); + DUK_ASSERT(out != NULL); + + func = DUK_ACT_GET_FUNC(act); + DUK_ASSERT(func != NULL); + DUK_ASSERT(DUK_HOBJECT_HAS_NEWENV(func)); + + if (!DUK_HOBJECT_IS_COMPFUNC(func)) { + return 0; + } + + /* XXX: move varmap to duk_hcompfunc struct field? */ + varmap = duk_hobject_get_varmap(thr, func); + if (!varmap) { + return 0; + } + + tv = duk_hobject_find_entry_tval_ptr(thr->heap, varmap, name); + if (!tv) { + return 0; + } + DUK_ASSERT(DUK_TVAL_IS_NUMBER(tv)); + reg_rel = (duk_size_t) DUK_TVAL_GET_NUMBER(tv); + DUK_ASSERT_DISABLE(reg_rel >= 0); + DUK_ASSERT(reg_rel < ((duk_hcompfunc *) func)->nregs); + + tv = (duk_tval *) (void *) ((duk_uint8_t *) thr->valstack + act->bottom_byteoff); + tv += reg_rel; + + out->value = tv; + out->attrs = DUK_PROPDESC_FLAGS_W; /* registers are mutable, non-deletable */ + out->env = NULL; + out->holder = NULL; + out->has_this = 0; + return 1; +} + +DUK_LOCAL +duk_bool_t duk__get_identifier_reference(duk_hthread *thr, + duk_hobject *env, + duk_hstring *name, + duk_activation *act, + duk_bool_t parents, + duk__id_lookup_result *out) { + duk_tval *tv; + duk_uint_t sanity; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(env != NULL || act != NULL); + DUK_ASSERT(name != NULL); + DUK_ASSERT(out != NULL); + + DUK_ASSERT(!env || DUK_HOBJECT_IS_ENV(env)); + DUK_ASSERT(!env || !DUK_HOBJECT_HAS_ARRAY_PART(env)); + + /* + * Conceptually, we look for the identifier binding by starting from + * 'env' and following to chain of environment records (represented + * by the prototype chain). + * + * If 'env' is NULL, the current activation does not yet have an + * allocated declarative environment record; this should be treated + * exactly as if the environment record existed but had no bindings + * other than register bindings. + * + * Note: we assume that with the DUK_HOBJECT_FLAG_NEWENV cleared + * the environment will always be initialized immediately; hence + * a NULL 'env' should only happen with the flag set. This is the + * case for: (1) function calls, and (2) strict, direct eval calls. + */ + + if (env == NULL && act != NULL) { + duk_hobject *func; + duk_hcompfunc *f; + + DUK_DDD(DUK_DDDPRINT("duk__get_identifier_reference: env is NULL, activation is non-NULL -> " + "delayed env case, look up activation regs first")); + + /* + * Try registers + */ + + if (duk__getid_activation_regs(thr, name, act, out)) { + DUK_DDD(DUK_DDDPRINT("duk__get_identifier_reference successful: " + "name=%!O -> value=%!T, attrs=%ld, has_this=%ld, env=%!O, holder=%!O " + "(found from register bindings when env=NULL)", + (duk_heaphdr *) name, + (duk_tval *) out->value, + (long) out->attrs, + (long) out->has_this, + (duk_heaphdr *) out->env, + (duk_heaphdr *) out->holder)); + return 1; + } + + DUK_DDD(DUK_DDDPRINT("not found in current activation regs")); + + /* + * Not found in registers, proceed to the parent record. + * Here we need to determine what the parent would be, + * if 'env' was not NULL (i.e. same logic as when initializing + * the record). + * + * Note that environment initialization is only deferred when + * DUK_HOBJECT_HAS_NEWENV is set, and this only happens for: + * - Function code + * - Strict eval code + * + * We only need to check _Lexenv here; _Varenv exists only if it + * differs from _Lexenv (and thus _Lexenv will also be present). + */ + + if (!parents) { + DUK_DDD(DUK_DDDPRINT("duk__get_identifier_reference failed, no parent traversal " + "(not found from register bindings when env=NULL)")); + goto fail_not_found; + } + + func = DUK_ACT_GET_FUNC(act); + DUK_ASSERT(func != NULL); + DUK_ASSERT(DUK_HOBJECT_HAS_NEWENV(func)); + f = (duk_hcompfunc *) func; + + env = DUK_HCOMPFUNC_GET_LEXENV(thr->heap, f); + if (!env) { + env = thr->builtins[DUK_BIDX_GLOBAL_ENV]; + } + + DUK_DDD(DUK_DDDPRINT("continue lookup from env: %!iO", (duk_heaphdr *) env)); + } + + /* + * Prototype walking starting from 'env'. + * + * ('act' is not needed anywhere here.) + */ + + sanity = DUK_HOBJECT_PROTOTYPE_CHAIN_SANITY; + while (env != NULL) { + duk_small_uint_t cl; + duk_uint_t attrs; + + DUK_DDD(DUK_DDDPRINT("duk__get_identifier_reference, name=%!O, considering env=%p -> %!iO", + (duk_heaphdr *) name, + (void *) env, + (duk_heaphdr *) env)); + + DUK_ASSERT(env != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_ENV(env)); + DUK_ASSERT(!DUK_HOBJECT_HAS_ARRAY_PART(env)); + + cl = DUK_HOBJECT_GET_CLASS_NUMBER(env); + DUK_ASSERT(cl == DUK_HOBJECT_CLASS_OBJENV || cl == DUK_HOBJECT_CLASS_DECENV); + if (cl == DUK_HOBJECT_CLASS_DECENV) { + /* + * Declarative environment record. + * + * Identifiers can never be stored in ancestors and are + * always plain values, so we can use an internal helper + * and access the value directly with an duk_tval ptr. + * + * A closed environment is only indicated by it missing + * the "book-keeping" properties required for accessing + * register-bound variables. + */ + + DUK_HDECENV_ASSERT_VALID((duk_hdecenv *) env); + if (duk__getid_open_decl_env_regs(thr, name, (duk_hdecenv *) env, out)) { + DUK_DDD(DUK_DDDPRINT("duk__get_identifier_reference successful: " + "name=%!O -> value=%!T, attrs=%ld, has_this=%ld, env=%!O, holder=%!O " + "(declarative environment record, scope open, found in regs)", + (duk_heaphdr *) name, + (duk_tval *) out->value, + (long) out->attrs, + (long) out->has_this, + (duk_heaphdr *) out->env, + (duk_heaphdr *) out->holder)); + return 1; + } + + tv = duk_hobject_find_entry_tval_ptr_and_attrs(thr->heap, env, name, &attrs); + if (tv) { + out->value = tv; + out->attrs = attrs; + out->env = env; + out->holder = env; + out->has_this = 0; + + DUK_DDD(DUK_DDDPRINT("duk__get_identifier_reference successful: " + "name=%!O -> value=%!T, attrs=%ld, has_this=%ld, env=%!O, holder=%!O " + "(declarative environment record, found in properties)", + (duk_heaphdr *) name, + (duk_tval *) out->value, + (long) out->attrs, + (long) out->has_this, + (duk_heaphdr *) out->env, + (duk_heaphdr *) out->holder)); + return 1; + } + } else { + /* + * Object environment record. + * + * Binding (target) object is an external, uncontrolled object. + * Identifier may be bound in an ancestor property, and may be + * an accessor. Target can also be a Proxy which we must support + * here. + */ + + /* XXX: we could save space by using _Target OR _This. If _Target, assume + * this binding is undefined. If _This, assumes this binding is _This, and + * target is also _This. One property would then be enough. + */ + + duk_hobject *target; + duk_bool_t found; + + DUK_ASSERT(cl == DUK_HOBJECT_CLASS_OBJENV); + DUK_HOBJENV_ASSERT_VALID((duk_hobjenv *) env); + + target = ((duk_hobjenv *) env)->target; + DUK_ASSERT(target != NULL); + + /* Target may be a Proxy or property may be an accessor, so we must + * use an actual, Proxy-aware hasprop check here. + * + * out->holder is NOT set to the actual duk_hobject where the + * property is found, but rather the object binding target object. + */ + +#if defined(DUK_USE_ES6_PROXY) + if (DUK_UNLIKELY(DUK_HOBJECT_IS_PROXY(target))) { + duk_tval tv_name; + duk_tval tv_target_tmp; + + DUK_ASSERT(name != NULL); + DUK_TVAL_SET_STRING(&tv_name, name); + DUK_TVAL_SET_OBJECT(&tv_target_tmp, target); + + found = duk_hobject_hasprop(thr, &tv_target_tmp, &tv_name); + } else +#endif /* DUK_USE_ES6_PROXY */ + { + /* XXX: duk_hobject_hasprop() would be correct for + * non-Proxy objects too, but it is about ~20-25% + * slower at present so separate code paths for + * Proxy and non-Proxy now. + */ + found = duk_hobject_hasprop_raw(thr, target, name); + } + + if (found) { + out->value = NULL; /* can't get value, may be accessor */ + out->attrs = 0; /* irrelevant when out->value == NULL */ + out->env = env; + out->holder = target; + out->has_this = ((duk_hobjenv *) env)->has_this; + + DUK_DDD(DUK_DDDPRINT("duk__get_identifier_reference successful: " + "name=%!O -> value=%!T, attrs=%ld, has_this=%ld, env=%!O, holder=%!O " + "(object environment record)", + (duk_heaphdr *) name, + (duk_tval *) out->value, + (long) out->attrs, + (long) out->has_this, + (duk_heaphdr *) out->env, + (duk_heaphdr *) out->holder)); + return 1; + } + } + + if (!parents) { + DUK_DDD(DUK_DDDPRINT("duk__get_identifier_reference failed, no parent traversal " + "(not found from first traversed env)")); + goto fail_not_found; + } + + if (DUK_UNLIKELY(sanity-- == 0)) { + DUK_ERROR_RANGE(thr, DUK_STR_PROTOTYPE_CHAIN_LIMIT); + DUK_WO_NORETURN(return 0;); + } + env = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, env); + } + + /* + * Not found (even in global object) + */ + +fail_not_found: + return 0; +} + +/* + * HASVAR: check identifier binding from a given environment record + * without traversing its parents. + * + * This primitive is not exposed to user code as such, but is used + * internally for e.g. declaration binding instantiation. + * + * See E5 Sections: + * 10.2.1.1.1 HasBinding(N) + * 10.2.1.2.1 HasBinding(N) + * + * Note: strictness has no bearing on this check. Hence we don't take + * a 'strict' parameter. + */ + +#if 0 /*unused*/ +DUK_INTERNAL +duk_bool_t duk_js_hasvar_envrec(duk_hthread *thr, + duk_hobject *env, + duk_hstring *name) { + duk__id_lookup_result ref; + duk_bool_t parents; + + DUK_DDD(DUK_DDDPRINT("hasvar: thr=%p, env=%p, name=%!O " + "(env -> %!dO)", + (void *) thr, (void *) env, (duk_heaphdr *) name, + (duk_heaphdr *) env)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(env != NULL); + DUK_ASSERT(name != NULL); + + DUK_ASSERT_REFCOUNT_NONZERO_HEAPHDR(env); + DUK_ASSERT_REFCOUNT_NONZERO_HEAPHDR(name); + + DUK_ASSERT(DUK_HOBJECT_IS_ENV(env)); + DUK_ASSERT(!DUK_HOBJECT_HAS_ARRAY_PART(env)); + + /* lookup results is ignored */ + parents = 0; + return duk__get_identifier_reference(thr, env, name, NULL, parents, &ref); +} +#endif + +/* + * GETVAR + * + * See E5 Sections: + * 11.1.2 Identifier Reference + * 10.3.1 Identifier Resolution + * 11.13.1 Simple Assignment [example of where the Reference is GetValue'd] + * 8.7.1 GetValue (V) + * 8.12.1 [[GetOwnProperty]] (P) + * 8.12.2 [[GetProperty]] (P) + * 8.12.3 [[Get]] (P) + * + * If 'throw' is true, always leaves two values on top of stack: [val this]. + * + * If 'throw' is false, returns 0 if identifier cannot be resolved, and the + * stack will be unaffected in this case. If identifier is resolved, returns + * 1 and leaves [val this] on top of stack. + * + * Note: the 'strict' flag of a reference returned by GetIdentifierReference + * is ignored by GetValue. Hence we don't take a 'strict' parameter. + * + * The 'throw' flag is needed for implementing 'typeof' for an unreferenced + * identifier. An unreference identifier in other contexts generates a + * ReferenceError. + */ + +DUK_LOCAL +duk_bool_t duk__getvar_helper(duk_hthread *thr, duk_hobject *env, duk_activation *act, duk_hstring *name, duk_bool_t throw_flag) { + duk__id_lookup_result ref; + duk_tval tv_tmp_obj; + duk_tval tv_tmp_key; + duk_bool_t parents; + + DUK_DDD(DUK_DDDPRINT("getvar: thr=%p, env=%p, act=%p, name=%!O " + "(env -> %!dO)", + (void *) thr, + (void *) env, + (void *) act, + (duk_heaphdr *) name, + (duk_heaphdr *) env)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(name != NULL); + /* env and act may be NULL */ + + DUK_STATS_INC(thr->heap, stats_getvar_all); + + DUK_ASSERT_REFCOUNT_NONZERO_HEAPHDR(env); + DUK_ASSERT_REFCOUNT_NONZERO_HEAPHDR(name); + + parents = 1; /* follow parent chain */ + if (duk__get_identifier_reference(thr, env, name, act, parents, &ref)) { + if (ref.value) { + duk_push_tval(thr, ref.value); + duk_push_undefined(thr); + } else { + DUK_ASSERT(ref.holder != NULL); + + /* ref.holder is safe across the getprop call (even + * with side effects) because 'env' is reachable and + * ref.holder is a direct heap pointer. + */ + + DUK_TVAL_SET_OBJECT(&tv_tmp_obj, ref.holder); + DUK_TVAL_SET_STRING(&tv_tmp_key, name); + (void) duk_hobject_getprop(thr, &tv_tmp_obj, &tv_tmp_key); /* [value] */ + + if (ref.has_this) { + duk_push_hobject(thr, ref.holder); + } else { + duk_push_undefined(thr); + } + + /* [value this] */ + } + + return 1; + } else { + if (throw_flag) { + DUK_ERROR_FMT1(thr, + DUK_ERR_REFERENCE_ERROR, + "identifier '%s' undefined", + (const char *) DUK_HSTRING_GET_DATA(name)); + DUK_WO_NORETURN(return 0;); + } + + return 0; + } +} + +DUK_INTERNAL +duk_bool_t duk_js_getvar_envrec(duk_hthread *thr, duk_hobject *env, duk_hstring *name, duk_bool_t throw_flag) { + return duk__getvar_helper(thr, env, NULL, name, throw_flag); +} + +DUK_INTERNAL +duk_bool_t duk_js_getvar_activation(duk_hthread *thr, duk_activation *act, duk_hstring *name, duk_bool_t throw_flag) { + DUK_ASSERT(act != NULL); + return duk__getvar_helper(thr, act->lex_env, act, name, throw_flag); +} + +/* + * PUTVAR + * + * See E5 Sections: + * 11.1.2 Identifier Reference + * 10.3.1 Identifier Resolution + * 11.13.1 Simple Assignment [example of where the Reference is PutValue'd] + * 8.7.2 PutValue (V,W) [see especially step 3.b, undefined -> automatic global in non-strict mode] + * 8.12.4 [[CanPut]] (P) + * 8.12.5 [[Put]] (P) + * + * Note: may invalidate any valstack (or object) duk_tval pointers because + * putting a value may reallocate any object or any valstack. Caller beware. + */ + +DUK_LOCAL +void duk__putvar_helper(duk_hthread *thr, + duk_hobject *env, + duk_activation *act, + duk_hstring *name, + duk_tval *val, + duk_bool_t strict) { + duk__id_lookup_result ref; + duk_tval tv_tmp_val; + duk_tval tv_tmp_obj; + duk_tval tv_tmp_key; + duk_bool_t parents; + + DUK_STATS_INC(thr->heap, stats_putvar_all); + + DUK_DDD(DUK_DDDPRINT("putvar: thr=%p, env=%p, act=%p, name=%!O, val=%p, strict=%ld " + "(env -> %!dO, val -> %!T)", + (void *) thr, + (void *) env, + (void *) act, + (duk_heaphdr *) name, + (void *) val, + (long) strict, + (duk_heaphdr *) env, + (duk_tval *) val)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(name != NULL); + DUK_ASSERT(val != NULL); + /* env and act may be NULL */ + + DUK_ASSERT_REFCOUNT_NONZERO_HEAPHDR(env); + DUK_ASSERT_REFCOUNT_NONZERO_HEAPHDR(name); + DUK_ASSERT_REFCOUNT_NONZERO_TVAL(val); + + DUK_TVAL_SET_TVAL(&tv_tmp_val, val); /* Stabilize. */ + val = NULL; + + /* + * In strict mode E5 protects 'eval' and 'arguments' from being + * assigned to (or even declared anywhere). Attempt to do so + * should result in a compile time SyntaxError. See the internal + * design documentation for details. + * + * Thus, we should never come here, run-time, for strict code, + * and name 'eval' or 'arguments'. + */ + + DUK_ASSERT(!strict || (name != DUK_HTHREAD_STRING_EVAL(thr) && name != DUK_HTHREAD_STRING_LC_ARGUMENTS(thr))); + + /* + * Lookup variable and update in-place if found. + */ + + parents = 1; /* follow parent chain */ + + if (duk__get_identifier_reference(thr, env, name, act, parents, &ref)) { + if (ref.value && (ref.attrs & DUK_PROPDESC_FLAG_WRITABLE)) { + /* Update duk_tval in-place if pointer provided and the + * property is writable. If the property is not writable + * (immutable binding), use duk_hobject_putprop() which + * will respect mutability. + */ + duk_tval *tv_val; + + tv_val = ref.value; + DUK_ASSERT(tv_val != NULL); + DUK_TVAL_SET_TVAL_UPDREF(thr, tv_val, &tv_tmp_val); /* side effects */ + + /* ref.value invalidated here */ + } else { + DUK_ASSERT(ref.holder != NULL); + + DUK_TVAL_SET_OBJECT(&tv_tmp_obj, ref.holder); + DUK_TVAL_SET_STRING(&tv_tmp_key, name); + (void) duk_hobject_putprop(thr, &tv_tmp_obj, &tv_tmp_key, &tv_tmp_val, strict); + + /* ref.value invalidated here */ + } + + return; + } + + /* + * Not found: write to global object (non-strict) or ReferenceError + * (strict); see E5 Section 8.7.2, step 3. + */ + + if (strict) { + DUK_DDD(DUK_DDDPRINT("identifier binding not found, strict => reference error")); + DUK_ERROR_FMT1(thr, + DUK_ERR_REFERENCE_ERROR, + "identifier '%s' undefined", + (const char *) DUK_HSTRING_GET_DATA(name)); + DUK_WO_NORETURN(return;); + } + + DUK_DDD(DUK_DDDPRINT("identifier binding not found, not strict => set to global")); + + DUK_TVAL_SET_OBJECT(&tv_tmp_obj, thr->builtins[DUK_BIDX_GLOBAL]); + DUK_TVAL_SET_STRING(&tv_tmp_key, name); + (void) duk_hobject_putprop(thr, &tv_tmp_obj, &tv_tmp_key, &tv_tmp_val, 0); /* 0 = no throw */ + + /* NB: 'val' may be invalidated here because put_value may realloc valstack, + * caller beware. + */ +} + +DUK_INTERNAL +void duk_js_putvar_envrec(duk_hthread *thr, duk_hobject *env, duk_hstring *name, duk_tval *val, duk_bool_t strict) { + duk__putvar_helper(thr, env, NULL, name, val, strict); +} + +DUK_INTERNAL +void duk_js_putvar_activation(duk_hthread *thr, duk_activation *act, duk_hstring *name, duk_tval *val, duk_bool_t strict) { + DUK_ASSERT(act != NULL); + duk__putvar_helper(thr, act->lex_env, act, name, val, strict); +} + +/* + * DELVAR + * + * See E5 Sections: + * 11.4.1 The delete operator + * 10.2.1.1.5 DeleteBinding (N) [declarative environment record] + * 10.2.1.2.5 DeleteBinding (N) [object environment record] + * + * Variable bindings established inside eval() are deletable (configurable), + * other bindings are not, including variables declared in global level. + * Registers are always non-deletable, and the deletion of other bindings + * is controlled by the configurable flag. + * + * For strict mode code, the 'delete' operator should fail with a compile + * time SyntaxError if applied to identifiers. Hence, no strict mode + * run-time deletion of identifiers should ever happen. This function + * should never be called from strict mode code! + */ + +DUK_LOCAL +duk_bool_t duk__delvar_helper(duk_hthread *thr, duk_hobject *env, duk_activation *act, duk_hstring *name) { + duk__id_lookup_result ref; + duk_bool_t parents; + + DUK_DDD(DUK_DDDPRINT("delvar: thr=%p, env=%p, act=%p, name=%!O " + "(env -> %!dO)", + (void *) thr, + (void *) env, + (void *) act, + (duk_heaphdr *) name, + (duk_heaphdr *) env)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(name != NULL); + /* env and act may be NULL */ + + DUK_ASSERT_REFCOUNT_NONZERO_HEAPHDR(name); + + parents = 1; /* follow parent chain */ + + if (duk__get_identifier_reference(thr, env, name, act, parents, &ref)) { + if (ref.value && !(ref.attrs & DUK_PROPDESC_FLAG_CONFIGURABLE)) { + /* Identifier found in registers (always non-deletable) + * or declarative environment record and non-configurable. + */ + return 0; + } + DUK_ASSERT(ref.holder != NULL); + + return duk_hobject_delprop_raw(thr, ref.holder, name, 0); + } + + /* + * Not found (even in global object). + * + * In non-strict mode this is a silent SUCCESS (!), see E5 Section 11.4.1, + * step 3.b. In strict mode this case is a compile time SyntaxError so + * we should not come here. + */ + + DUK_DDD(DUK_DDDPRINT("identifier to be deleted not found: name=%!O " + "(treated as silent success)", + (duk_heaphdr *) name)); + return 1; +} + +#if 0 /*unused*/ +DUK_INTERNAL +duk_bool_t duk_js_delvar_envrec(duk_hthread *thr, + duk_hobject *env, + duk_hstring *name) { + return duk__delvar_helper(thr, env, NULL, name); +} +#endif + +DUK_INTERNAL +duk_bool_t duk_js_delvar_activation(duk_hthread *thr, duk_activation *act, duk_hstring *name) { + DUK_ASSERT(act != NULL); + return duk__delvar_helper(thr, act->lex_env, act, name); +} + +/* + * DECLVAR + * + * See E5 Sections: + * 10.4.3 Entering Function Code + * 10.5 Declaration Binding Instantion + * 12.2 Variable Statement + * 11.1.2 Identifier Reference + * 10.3.1 Identifier Resolution + * + * Variable declaration behavior is mainly discussed in Section 10.5, + * and is not discussed in the execution semantics (Sections 11-13). + * + * Conceptually declarations happen when code (global, eval, function) + * is entered, before any user code is executed. In practice, register- + * bound identifiers are 'declared' automatically (by virtue of being + * allocated to registers with the initial value 'undefined'). Other + * identifiers are declared in the function prologue with this primitive. + * + * Since non-register bindings eventually back to an internal object's + * properties, the 'prop_flags' argument is used to specify binding + * type: + * + * - Immutable binding: set DUK_PROPDESC_FLAG_WRITABLE to false + * - Non-deletable binding: set DUK_PROPDESC_FLAG_CONFIGURABLE to false + * - The flag DUK_PROPDESC_FLAG_ENUMERABLE should be set, although it + * doesn't really matter for internal objects + * + * All bindings are non-deletable mutable bindings except: + * + * - Declarations in eval code (mutable, deletable) + * - 'arguments' binding in strict function code (immutable) + * - Function name binding of a function expression (immutable) + * + * Declarations may go to declarative environment records (always + * so for functions), but may also go to object environment records + * (e.g. global code). The global object environment has special + * behavior when re-declaring a function (but not a variable); see + * E5.1 specification, Section 10.5, step 5.e. + * + * Declarations always go to the 'top-most' environment record, i.e. + * we never check the record chain. It's not an error even if a + * property (even an immutable or non-deletable one) of the same name + * already exists. + * + * If a declared variable already exists, its value needs to be updated + * (if possible). Returns 1 if a PUTVAR needs to be done by the caller; + * otherwise returns 0. + */ + +DUK_LOCAL +duk_bool_t duk__declvar_helper(duk_hthread *thr, + duk_hobject *env, + duk_hstring *name, + duk_tval *val, + duk_small_uint_t prop_flags, + duk_bool_t is_func_decl) { + duk_hobject *holder; + duk_bool_t parents; + duk__id_lookup_result ref; + duk_tval *tv; + + DUK_DDD(DUK_DDDPRINT("declvar: thr=%p, env=%p, name=%!O, val=%!T, prop_flags=0x%08lx, is_func_decl=%ld " + "(env -> %!iO)", + (void *) thr, + (void *) env, + (duk_heaphdr *) name, + (duk_tval *) val, + (unsigned long) prop_flags, + (unsigned int) is_func_decl, + (duk_heaphdr *) env)); + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(env != NULL); + DUK_ASSERT(name != NULL); + DUK_ASSERT(val != NULL); + + /* Note: in strict mode the compiler should reject explicit + * declaration of 'eval' or 'arguments'. However, internal + * bytecode may declare 'arguments' in the function prologue. + * We don't bother checking (or asserting) for these now. + */ + + /* Note: val is a stable duk_tval pointer. The caller makes + * a value copy into its stack frame, so 'tv_val' is not subject + * to side effects here. + */ + + /* + * Check whether already declared. + * + * We need to check whether the binding exists in the environment + * without walking its parents. However, we still need to check + * register-bound identifiers and the prototype chain of an object + * environment target object. + */ + + parents = 0; /* just check 'env' */ + if (duk__get_identifier_reference(thr, env, name, NULL, parents, &ref)) { + duk_int_t e_idx; + duk_int_t h_idx; + duk_small_uint_t flags; + + /* + * Variable already declared, ignore re-declaration. + * The only exception is the updated behavior of E5.1 for + * global function declarations, E5.1 Section 10.5, step 5.e. + * This behavior does not apply to global variable declarations. + */ + + if (!(is_func_decl && env == thr->builtins[DUK_BIDX_GLOBAL_ENV])) { + DUK_DDD(DUK_DDDPRINT("re-declare a binding, ignoring")); + return 1; /* 1 -> needs a PUTVAR */ + } + + /* + * Special behavior in E5.1. + * + * Note that even though parents == 0, the conflicting property + * may be an inherited property (currently our global object's + * prototype is Object.prototype). Step 5.e first operates on + * the existing property (which is potentially in an ancestor) + * and then defines a new property in the global object (and + * never modifies the ancestor). + * + * Also note that this logic would become even more complicated + * if the conflicting property might be a virtual one. Object + * prototype has no virtual properties, though. + * + * XXX: this is now very awkward, rework. + */ + + DUK_DDD(DUK_DDDPRINT("re-declare a function binding in global object, " + "updated E5.1 processing")); + + DUK_ASSERT(ref.holder != NULL); + holder = ref.holder; + + /* holder will be set to the target object, not the actual object + * where the property was found (see duk__get_identifier_reference()). + */ + DUK_ASSERT(DUK_HOBJECT_GET_CLASS_NUMBER(holder) == DUK_HOBJECT_CLASS_GLOBAL); + DUK_ASSERT(!DUK_HOBJECT_HAS_EXOTIC_ARRAY(holder)); /* global object doesn't have array part */ + + /* XXX: use a helper for prototype traversal; no loop check here */ + /* must be found: was found earlier, and cannot be inherited */ + for (;;) { + DUK_ASSERT(holder != NULL); + if (duk_hobject_find_entry(thr->heap, holder, name, &e_idx, &h_idx)) { + DUK_ASSERT(e_idx >= 0); + break; + } + /* SCANBUILD: NULL pointer dereference, doesn't actually trigger, + * asserted above. + */ + holder = DUK_HOBJECT_GET_PROTOTYPE(thr->heap, holder); + } + DUK_ASSERT(holder != NULL); + DUK_ASSERT(e_idx >= 0); + /* SCANBUILD: scan-build produces a NULL pointer dereference warning + * below; it never actually triggers because holder is actually never + * NULL. + */ + + /* ref.holder is global object, holder is the object with the + * conflicting property. + */ + + flags = DUK_HOBJECT_E_GET_FLAGS(thr->heap, holder, e_idx); + if (!(flags & DUK_PROPDESC_FLAG_CONFIGURABLE)) { + if (flags & DUK_PROPDESC_FLAG_ACCESSOR) { + DUK_DDD(DUK_DDDPRINT("existing property is a non-configurable " + "accessor -> reject")); + goto fail_existing_attributes; + } + if (!((flags & DUK_PROPDESC_FLAG_WRITABLE) && (flags & DUK_PROPDESC_FLAG_ENUMERABLE))) { + DUK_DDD(DUK_DDDPRINT("existing property is a non-configurable " + "plain property which is not writable and " + "enumerable -> reject")); + goto fail_existing_attributes; + } + + DUK_DDD(DUK_DDDPRINT("existing property is not configurable but " + "is plain, enumerable, and writable -> " + "allow redeclaration")); + } + + if (holder == ref.holder) { + /* XXX: if duk_hobject_define_property_internal() was updated + * to handle a pre-existing accessor property, this would be + * a simple call (like for the ancestor case). + */ + DUK_DDD(DUK_DDDPRINT("redefine, offending property in global object itself")); + + if (flags & DUK_PROPDESC_FLAG_ACCESSOR) { + duk_hobject *tmp; + + tmp = DUK_HOBJECT_E_GET_VALUE_GETTER(thr->heap, holder, e_idx); + DUK_HOBJECT_E_SET_VALUE_GETTER(thr->heap, holder, e_idx, NULL); + DUK_HOBJECT_DECREF_ALLOWNULL(thr, tmp); + DUK_UNREF(tmp); + tmp = DUK_HOBJECT_E_GET_VALUE_SETTER(thr->heap, holder, e_idx); + DUK_HOBJECT_E_SET_VALUE_SETTER(thr->heap, holder, e_idx, NULL); + DUK_HOBJECT_DECREF_ALLOWNULL(thr, tmp); + DUK_UNREF(tmp); + } else { + tv = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, holder, e_idx); + DUK_TVAL_SET_UNDEFINED_UPDREF(thr, tv); + } + + /* Here val would be potentially invalid if we didn't make + * a value copy at the caller. + */ + + tv = DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, holder, e_idx); + DUK_TVAL_SET_TVAL(tv, val); + DUK_TVAL_INCREF(thr, tv); + DUK_HOBJECT_E_SET_FLAGS(thr->heap, holder, e_idx, prop_flags); + + DUK_DDD(DUK_DDDPRINT("updated global binding, final result: " + "value -> %!T, prop_flags=0x%08lx", + (duk_tval *) DUK_HOBJECT_E_GET_VALUE_TVAL_PTR(thr->heap, holder, e_idx), + (unsigned long) prop_flags)); + } else { + DUK_DDD(DUK_DDDPRINT("redefine, offending property in ancestor")); + + DUK_ASSERT(ref.holder == thr->builtins[DUK_BIDX_GLOBAL]); + duk_push_tval(thr, val); + duk_hobject_define_property_internal(thr, ref.holder, name, prop_flags); + } + + return 0; + } + + /* + * Not found (in registers or record objects). Declare + * to current variable environment. + */ + + /* + * Get holder object + */ + + if (DUK_HOBJECT_IS_DECENV(env)) { + DUK_HDECENV_ASSERT_VALID((duk_hdecenv *) env); + holder = env; + } else { + DUK_HOBJENV_ASSERT_VALID((duk_hobjenv *) env); + holder = ((duk_hobjenv *) env)->target; + DUK_ASSERT(holder != NULL); + } + + /* + * Define new property + * + * Note: this may fail if the holder is not extensible. + */ + + /* XXX: this is awkward as we use an internal method which doesn't handle + * extensibility etc correctly. Basically we'd want to do a [[DefineOwnProperty]] + * or Object.defineProperty() here. + */ + + if (!DUK_HOBJECT_HAS_EXTENSIBLE(holder)) { + goto fail_not_extensible; + } + + duk_push_hobject(thr, holder); + duk_push_hstring(thr, name); + duk_push_tval(thr, val); + duk_xdef_prop(thr, -3, prop_flags); /* [holder name val] -> [holder] */ + duk_pop_unsafe(thr); + + return 0; + +fail_existing_attributes: +fail_not_extensible: + DUK_ERROR_TYPE(thr, "declaration failed"); + DUK_WO_NORETURN(return 0;); +} + +DUK_INTERNAL +duk_bool_t duk_js_declvar_activation(duk_hthread *thr, + duk_activation *act, + duk_hstring *name, + duk_tval *val, + duk_small_uint_t prop_flags, + duk_bool_t is_func_decl) { + duk_hobject *env; + duk_tval tv_val_copy; + + DUK_ASSERT(act != NULL); + + /* + * Make a value copy of the input val. This ensures that + * side effects cannot invalidate the pointer. + */ + + DUK_TVAL_SET_TVAL(&tv_val_copy, val); + val = &tv_val_copy; + + /* + * Delayed env creation check + */ + + if (!act->var_env) { + DUK_ASSERT(act->lex_env == NULL); + duk_js_init_activation_environment_records_delayed(thr, act); + /* 'act' is a stable pointer, so still OK. */ + } + DUK_ASSERT(act->lex_env != NULL); + DUK_ASSERT(act->var_env != NULL); + + env = act->var_env; + DUK_ASSERT(env != NULL); + DUK_ASSERT(DUK_HOBJECT_IS_ENV(env)); + + return duk__declvar_helper(thr, env, name, val, prop_flags, is_func_decl); +} +#line 1 "duk_lexer.c" +/* + * Lexer for source files, ToNumber() string conversions, RegExp expressions, + * and JSON. + * + * Provides a stream of ECMAScript tokens from an UTF-8/CESU-8 buffer. The + * caller can also rewind the token stream into a certain position which is + * needed by the compiler part for multi-pass scanning. Tokens are + * represented as duk_token structures, and contain line number information. + * Token types are identified with DUK_TOK_* defines. + * + * Characters are decoded into a fixed size lookup window consisting of + * decoded Unicode code points, with window positions past the end of the + * input filled with an invalid codepoint (-1). The tokenizer can thus + * perform multiple character lookups efficiently and with few sanity + * checks (such as access outside the end of the input), which keeps the + * tokenization code small at the cost of performance. + * + * Character data in tokens, such as identifier names and string literals, + * is encoded into CESU-8 format on-the-fly while parsing the token in + * question. The string data is made reachable to garbage collection by + * placing the token-related values in value stack entries allocated for + * this purpose by the caller. The characters exist in Unicode code point + * form only in the fixed size lookup window, which keeps character data + * expansion (of especially ASCII data) low. + * + * Token parsing supports the full range of Unicode characters as described + * in the E5 specification. Parsing has been optimized for ASCII characters + * because ordinary ECMAScript code consists almost entirely of ASCII + * characters. Matching of complex Unicode codepoint sets (such as in the + * IdentifierStart and IdentifierPart productions) is optimized for size, + * and is done using a linear scan of a bit-packed list of ranges. This is + * very slow, but should never be entered unless the source code actually + * contains Unicode characters. + * + * ECMAScript tokenization is partially context sensitive. First, + * additional future reserved words are recognized in strict mode (see E5 + * Section 7.6.1.2). Second, a forward slash character ('/') can be + * recognized either as starting a RegExp literal or as a division operator, + * depending on context. The caller must provide necessary context flags + * when requesting a new token. + * + * Future work: + * + * * Make line number tracking optional, as it consumes space. + * + * * Add a feature flag for disabling UTF-8 decoding of input, as most + * source code is ASCII. Because of Unicode escapes written in ASCII, + * this does not allow Unicode support to be removed from e.g. + * duk_unicode_is_identifier_start() nor does it allow removal of CESU-8 + * encoding of e.g. string literals. + * + * * Add a feature flag for disabling Unicode compliance of e.g. identifier + * names. This allows for a build more than a kilobyte smaller, because + * Unicode ranges needed by duk_unicode_is_identifier_start() and + * duk_unicode_is_identifier_part() can be dropped. String literals + * should still be allowed to contain escaped Unicode, so this still does + * not allow removal of CESU-8 encoding of e.g. string literals. + * + * * Character lookup tables for codepoints above BMP could be stripped. + * + * * Strictly speaking, E5 specification requires that source code consists + * of 16-bit code units, and if not, must be conceptually converted to + * that format first. The current lexer processes Unicode code points + * and allows characters outside the BMP. These should be converted to + * surrogate pairs while reading the source characters into the window, + * not after tokens have been formed (as is done now). However, the fix + * is not trivial because two characters are decoded from one codepoint. + * + * * Optimize for speed as well as size. Large if-else ladders are (at + * least potentially) slow. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Various defines and file specific helper macros + */ + +#define DUK__MAX_RE_DECESC_DIGITS 9 +#define DUK__MAX_RE_QUANT_DIGITS 9 /* Does not allow e.g. 2**31-1, but one more would allow overflows of u32. */ + +/* whether to use macros or helper function depends on call count */ +#define DUK__ISDIGIT(x) ((x) >= DUK_ASC_0 && (x) <= DUK_ASC_9) +#define DUK__ISHEXDIGIT(x) duk__is_hex_digit((x)) +#define DUK__ISOCTDIGIT(x) ((x) >= DUK_ASC_0 && (x) <= DUK_ASC_7) +#define DUK__ISDIGIT03(x) ((x) >= DUK_ASC_0 && (x) <= DUK_ASC_3) +#define DUK__ISDIGIT47(x) ((x) >= DUK_ASC_4 && (x) <= DUK_ASC_7) + +/* lexer character window helpers */ +#define DUK__LOOKUP(lex_ctx, idx) ((lex_ctx)->window[(idx)].codepoint) +#define DUK__ADVANCECHARS(lex_ctx, count) duk__advance_chars((lex_ctx), (count)) +#define DUK__ADVANCEBYTES(lex_ctx, count) duk__advance_bytes((lex_ctx), (count)) +#define DUK__INITBUFFER(lex_ctx) duk__initbuffer((lex_ctx)) +#define DUK__APPENDBUFFER(lex_ctx, x) duk__appendbuffer((lex_ctx), (duk_codepoint_t) (x)) +#define DUK__APPENDBUFFER_ASCII(lex_ctx, x) duk__appendbuffer_ascii((lex_ctx), (duk_codepoint_t) (x)) + +/* lookup shorthands (note: assume context variable is named 'lex_ctx') */ +#define DUK__L0() DUK__LOOKUP(lex_ctx, 0) +#define DUK__L1() DUK__LOOKUP(lex_ctx, 1) +#define DUK__L2() DUK__LOOKUP(lex_ctx, 2) +#define DUK__L3() DUK__LOOKUP(lex_ctx, 3) +#define DUK__L4() DUK__LOOKUP(lex_ctx, 4) +#define DUK__L5() DUK__LOOKUP(lex_ctx, 5) + +/* packed advance/token number macro used by multiple functions */ +#define DUK__ADVTOK(advbytes, tok) ((((advbytes) * sizeof(duk_lexer_codepoint)) << 8) + (tok)) + +/* + * Advance lookup window by N characters, filling in new characters as + * necessary. After returning caller is guaranteed a character window of + * at least DUK_LEXER_WINDOW_SIZE characters. + * + * The main function duk__advance_bytes() is called at least once per every + * token so it has a major lexer/compiler performance impact. There are two + * variants for the main duk__advance_bytes() algorithm: a sliding window + * approach which is slightly faster at the cost of larger code footprint, + * and a simple copying one. + * + * Decoding directly from the source string would be another lexing option. + * But the lookup window based approach has the advantage of hiding the + * source string and its encoding effectively which gives more flexibility + * going forward to e.g. support chunked streaming of source from flash. + * + * Decodes UTF-8/CESU-8 leniently with support for code points from U+0000 to + * U+10FFFF, causing an error if the input is unparseable. Leniency means: + * + * * Unicode code point validation is intentionally not performed, + * except to check that the codepoint does not exceed 0x10ffff. + * + * * In particular, surrogate pairs are allowed and not combined, which + * allows source files to represent all SourceCharacters with CESU-8. + * Broken surrogate pairs are allowed, as ECMAScript does not mandate + * their validation. + * + * * Allow non-shortest UTF-8 encodings. + * + * Leniency here causes few security concerns because all character data is + * decoded into Unicode codepoints before lexer processing, and is then + * re-encoded into CESU-8. The source can be parsed as strict UTF-8 with + * a compiler option. However, ECMAScript source characters include -all- + * 16-bit unsigned integer codepoints, so leniency seems to be appropriate. + * + * Note that codepoints above the BMP are not strictly SourceCharacters, + * but the lexer still accepts them as such. Before ending up in a string + * or an identifier name, codepoints above BMP are converted into surrogate + * pairs and then CESU-8 encoded, resulting in 16-bit Unicode data as + * expected by ECMAScript. + * + * An alternative approach to dealing with invalid or partial sequences + * would be to skip them and replace them with e.g. the Unicode replacement + * character U+FFFD. This has limited utility because a replacement character + * will most likely cause a parse error, unless it occurs inside a string. + * Further, ECMAScript source is typically pure ASCII. + * + * See: + * + * http://en.wikipedia.org/wiki/UTF-8 + * http://en.wikipedia.org/wiki/CESU-8 + * http://tools.ietf.org/html/rfc3629 + * http://en.wikipedia.org/wiki/UTF-8#Invalid_byte_sequences + * + * Future work: + * + * * Reject other invalid Unicode sequences (see Wikipedia entry for examples) + * in strict UTF-8 mode. + * + * * Size optimize. An attempt to use a 16-byte lookup table for the first + * byte resulted in a code increase though. + * + * * Is checking against maximum 0x10ffff really useful? 4-byte encoding + * imposes a certain limit anyway. + * + * * Support chunked streaming of source code. Can be implemented either + * by streaming chunks of bytes or chunks of codepoints. + */ + +#if defined(DUK_USE_LEXER_SLIDING_WINDOW) +DUK_LOCAL void duk__fill_lexer_buffer(duk_lexer_ctx *lex_ctx, duk_small_uint_t start_offset_bytes) { + duk_lexer_codepoint *cp, *cp_end; + duk_ucodepoint_t x; + duk_small_uint_t contlen; + const duk_uint8_t *p, *p_end; +#if defined(DUK_USE_STRICT_UTF8_SOURCE) + duk_ucodepoint_t mincp; +#endif + duk_int_t input_line; + + /* Use temporaries and update lex_ctx only when finished. */ + input_line = lex_ctx->input_line; + p = lex_ctx->input + lex_ctx->input_offset; + p_end = lex_ctx->input + lex_ctx->input_length; + + cp = (duk_lexer_codepoint *) (void *) ((duk_uint8_t *) lex_ctx->buffer + start_offset_bytes); + cp_end = lex_ctx->buffer + DUK_LEXER_BUFFER_SIZE; + + for (; cp != cp_end; cp++) { + cp->offset = (duk_size_t) (p - lex_ctx->input); + cp->line = input_line; + + /* XXX: potential issue with signed pointers, p_end < p. */ + if (DUK_UNLIKELY(p >= p_end)) { + /* If input_offset were assigned a negative value, it would + * result in a large positive value. Most likely it would be + * larger than input_length and be caught here. In any case + * no memory unsafe behavior would happen. + */ + cp->codepoint = -1; + continue; + } + + x = (duk_ucodepoint_t) (*p++); + + /* Fast path. */ + + if (DUK_LIKELY(x < 0x80UL)) { + DUK_ASSERT(x != 0x2028UL && x != 0x2029UL); /* not LS/PS */ + if (DUK_UNLIKELY(x <= 0x000dUL)) { + if ((x == 0x000aUL) || ((x == 0x000dUL) && (p >= p_end || *p != 0x000aUL))) { + /* lookup for 0x000a above assumes shortest encoding now */ + + /* E5 Section 7.3, treat the following as newlines: + * LF + * CR [not followed by LF] + * LS + * PS + * + * For CR LF, CR is ignored if it is followed by LF, and the LF will bump + * the line number. + */ + input_line++; + } + } + + cp->codepoint = (duk_codepoint_t) x; + continue; + } + + /* Slow path. */ + + if (x < 0xc0UL) { + /* 10xx xxxx -> invalid */ + goto error_encoding; + } else if (x < 0xe0UL) { + /* 110x xxxx 10xx xxxx */ + contlen = 1; +#if defined(DUK_USE_STRICT_UTF8_SOURCE) + mincp = 0x80UL; +#endif + x = x & 0x1fUL; + } else if (x < 0xf0UL) { + /* 1110 xxxx 10xx xxxx 10xx xxxx */ + contlen = 2; +#if defined(DUK_USE_STRICT_UTF8_SOURCE) + mincp = 0x800UL; +#endif + x = x & 0x0fUL; + } else if (x < 0xf8UL) { + /* 1111 0xxx 10xx xxxx 10xx xxxx 10xx xxxx */ + contlen = 3; +#if defined(DUK_USE_STRICT_UTF8_SOURCE) + mincp = 0x10000UL; +#endif + x = x & 0x07UL; + } else { + /* no point in supporting encodings of 5 or more bytes */ + goto error_encoding; + } + + DUK_ASSERT(p_end >= p); + if ((duk_size_t) contlen > (duk_size_t) (p_end - p)) { + goto error_clipped; + } + + while (contlen > 0) { + duk_small_uint_t y; + y = *p++; + if ((y & 0xc0U) != 0x80U) { + /* check that byte has the form 10xx xxxx */ + goto error_encoding; + } + x = x << 6; + x += y & 0x3fUL; + contlen--; + } + + /* check final character validity */ + + if (x > 0x10ffffUL) { + goto error_encoding; + } +#if defined(DUK_USE_STRICT_UTF8_SOURCE) + if (x < mincp || (x >= 0xd800UL && x <= 0xdfffUL) || x == 0xfffeUL) { + goto error_encoding; + } +#endif + + DUK_ASSERT(x != 0x000aUL && x != 0x000dUL); + if ((x == 0x2028UL) || (x == 0x2029UL)) { + input_line++; + } + + cp->codepoint = (duk_codepoint_t) x; + } + + lex_ctx->input_offset = (duk_size_t) (p - lex_ctx->input); + lex_ctx->input_line = input_line; + return; + +error_clipped: /* clipped codepoint */ +error_encoding: /* invalid codepoint encoding or codepoint */ + lex_ctx->input_offset = (duk_size_t) (p - lex_ctx->input); + lex_ctx->input_line = input_line; + + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_SOURCE_DECODE_FAILED); + DUK_WO_NORETURN(return;); +} + +DUK_LOCAL void duk__advance_bytes(duk_lexer_ctx *lex_ctx, duk_small_uint_t count_bytes) { + duk_small_uint_t used_bytes, avail_bytes; + + DUK_ASSERT_DISABLE(count_bytes >= 0); /* unsigned */ + DUK_ASSERT(count_bytes <= (duk_small_uint_t) (DUK_LEXER_WINDOW_SIZE * sizeof(duk_lexer_codepoint))); + DUK_ASSERT(lex_ctx->window >= lex_ctx->buffer); + DUK_ASSERT(lex_ctx->window < lex_ctx->buffer + DUK_LEXER_BUFFER_SIZE); + DUK_ASSERT((duk_uint8_t *) lex_ctx->window + count_bytes <= + (duk_uint8_t *) lex_ctx->buffer + DUK_LEXER_BUFFER_SIZE * sizeof(duk_lexer_codepoint)); + + /* Zero 'count' is also allowed to make call sites easier. + * Arithmetic in bytes generates better code in GCC. + */ + + lex_ctx->window = (duk_lexer_codepoint *) (void *) ((duk_uint8_t *) lex_ctx->window + count_bytes); /* avoid multiply */ + used_bytes = (duk_small_uint_t) ((duk_uint8_t *) lex_ctx->window - (duk_uint8_t *) lex_ctx->buffer); + avail_bytes = DUK_LEXER_BUFFER_SIZE * sizeof(duk_lexer_codepoint) - used_bytes; + if (avail_bytes < (duk_small_uint_t) (DUK_LEXER_WINDOW_SIZE * sizeof(duk_lexer_codepoint))) { + /* Not enough data to provide a full window, so "scroll" window to + * start of buffer and fill up the rest. + */ + duk_memmove((void *) lex_ctx->buffer, (const void *) lex_ctx->window, (size_t) avail_bytes); + lex_ctx->window = lex_ctx->buffer; + duk__fill_lexer_buffer(lex_ctx, avail_bytes); + } +} + +DUK_LOCAL void duk__init_lexer_window(duk_lexer_ctx *lex_ctx) { + lex_ctx->window = lex_ctx->buffer; + duk__fill_lexer_buffer(lex_ctx, 0); +} +#else /* DUK_USE_LEXER_SLIDING_WINDOW */ +DUK_LOCAL duk_codepoint_t duk__read_char(duk_lexer_ctx *lex_ctx) { + duk_ucodepoint_t x; + duk_small_uint_t len; + duk_small_uint_t i; + const duk_uint8_t *p; +#if defined(DUK_USE_STRICT_UTF8_SOURCE) + duk_ucodepoint_t mincp; +#endif + duk_size_t input_offset; + + input_offset = lex_ctx->input_offset; + if (DUK_UNLIKELY(input_offset >= lex_ctx->input_length)) { + /* If input_offset were assigned a negative value, it would + * result in a large positive value. Most likely it would be + * larger than input_length and be caught here. In any case + * no memory unsafe behavior would happen. + */ + return -1; + } + + p = lex_ctx->input + input_offset; + x = (duk_ucodepoint_t) (*p); + + if (DUK_LIKELY(x < 0x80UL)) { + /* 0xxx xxxx -> fast path */ + + /* input offset tracking */ + lex_ctx->input_offset++; + + DUK_ASSERT(x != 0x2028UL && x != 0x2029UL); /* not LS/PS */ + if (DUK_UNLIKELY(x <= 0x000dUL)) { + if ((x == 0x000aUL) || ((x == 0x000dUL) && (lex_ctx->input_offset >= lex_ctx->input_length || + lex_ctx->input[lex_ctx->input_offset] != 0x000aUL))) { + /* lookup for 0x000a above assumes shortest encoding now */ + + /* E5 Section 7.3, treat the following as newlines: + * LF + * CR [not followed by LF] + * LS + * PS + * + * For CR LF, CR is ignored if it is followed by LF, and the LF will bump + * the line number. + */ + lex_ctx->input_line++; + } + } + + return (duk_codepoint_t) x; + } + + /* Slow path. */ + + if (x < 0xc0UL) { + /* 10xx xxxx -> invalid */ + goto error_encoding; + } else if (x < 0xe0UL) { + /* 110x xxxx 10xx xxxx */ + len = 2; +#if defined(DUK_USE_STRICT_UTF8_SOURCE) + mincp = 0x80UL; +#endif + x = x & 0x1fUL; + } else if (x < 0xf0UL) { + /* 1110 xxxx 10xx xxxx 10xx xxxx */ + len = 3; +#if defined(DUK_USE_STRICT_UTF8_SOURCE) + mincp = 0x800UL; +#endif + x = x & 0x0fUL; + } else if (x < 0xf8UL) { + /* 1111 0xxx 10xx xxxx 10xx xxxx 10xx xxxx */ + len = 4; +#if defined(DUK_USE_STRICT_UTF8_SOURCE) + mincp = 0x10000UL; +#endif + x = x & 0x07UL; + } else { + /* no point in supporting encodings of 5 or more bytes */ + goto error_encoding; + } + + DUK_ASSERT(lex_ctx->input_length >= lex_ctx->input_offset); + if ((duk_size_t) len > (duk_size_t) (lex_ctx->input_length - lex_ctx->input_offset)) { + goto error_clipped; + } + + p++; + for (i = 1; i < len; i++) { + duk_small_uint_t y; + y = *p++; + if ((y & 0xc0U) != 0x80U) { + /* check that byte has the form 10xx xxxx */ + goto error_encoding; + } + x = x << 6; + x += y & 0x3fUL; + } + + /* check final character validity */ + + if (x > 0x10ffffUL) { + goto error_encoding; + } +#if defined(DUK_USE_STRICT_UTF8_SOURCE) + if (x < mincp || (x >= 0xd800UL && x <= 0xdfffUL) || x == 0xfffeUL) { + goto error_encoding; + } +#endif + + /* input offset tracking */ + lex_ctx->input_offset += len; + + /* line tracking */ + DUK_ASSERT(x != 0x000aUL && x != 0x000dUL); + if ((x == 0x2028UL) || (x == 0x2029UL)) { + lex_ctx->input_line++; + } + + return (duk_codepoint_t) x; + +error_clipped: /* clipped codepoint */ +error_encoding: /* invalid codepoint encoding or codepoint */ + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_SOURCE_DECODE_FAILED); + DUK_WO_NORETURN(return 0;); +} + +DUK_LOCAL void duk__advance_bytes(duk_lexer_ctx *lex_ctx, duk_small_uint_t count_bytes) { + duk_small_uint_t keep_bytes; + duk_lexer_codepoint *cp, *cp_end; + + DUK_ASSERT_DISABLE(count_bytes >= 0); /* unsigned */ + DUK_ASSERT(count_bytes <= (duk_small_uint_t) (DUK_LEXER_WINDOW_SIZE * sizeof(duk_lexer_codepoint))); + + /* Zero 'count' is also allowed to make call sites easier. */ + + keep_bytes = DUK_LEXER_WINDOW_SIZE * sizeof(duk_lexer_codepoint) - count_bytes; + duk_memmove((void *) lex_ctx->window, (const void *) ((duk_uint8_t *) lex_ctx->window + count_bytes), (size_t) keep_bytes); + + cp = (duk_lexer_codepoint *) ((duk_uint8_t *) lex_ctx->window + keep_bytes); + cp_end = lex_ctx->window + DUK_LEXER_WINDOW_SIZE; + for (; cp != cp_end; cp++) { + cp->offset = lex_ctx->input_offset; + cp->line = lex_ctx->input_line; + cp->codepoint = duk__read_char(lex_ctx); + } +} + +DUK_LOCAL void duk__init_lexer_window(duk_lexer_ctx *lex_ctx) { + /* Call with count == DUK_LEXER_WINDOW_SIZE to fill buffer initially. */ + duk__advance_bytes(lex_ctx, DUK_LEXER_WINDOW_SIZE * sizeof(duk_lexer_codepoint)); /* fill window */ +} +#endif /* DUK_USE_LEXER_SLIDING_WINDOW */ + +DUK_LOCAL void duk__advance_chars(duk_lexer_ctx *lex_ctx, duk_small_uint_t count_chars) { + duk__advance_bytes(lex_ctx, count_chars * sizeof(duk_lexer_codepoint)); +} + +/* + * (Re)initialize the temporary byte buffer. May be called extra times + * with little impact. + */ + +DUK_LOCAL void duk__initbuffer(duk_lexer_ctx *lex_ctx) { + /* Reuse buffer as is unless buffer has grown large. */ + if (DUK_HBUFFER_DYNAMIC_GET_SIZE(lex_ctx->buf) < DUK_LEXER_TEMP_BUF_LIMIT) { + /* Keep current size */ + } else { + duk_hbuffer_resize(lex_ctx->thr, lex_ctx->buf, DUK_LEXER_TEMP_BUF_LIMIT); + } + + DUK_BW_INIT_WITHBUF(lex_ctx->thr, &lex_ctx->bw, lex_ctx->buf); +} + +/* + * Append a Unicode codepoint to the temporary byte buffer. Performs + * CESU-8 surrogate pair encoding for codepoints above the BMP. + * Existing surrogate pairs are allowed and also encoded into CESU-8. + */ + +DUK_LOCAL void duk__appendbuffer(duk_lexer_ctx *lex_ctx, duk_codepoint_t x) { + /* + * Since character data is only generated by decoding the source or by + * the compiler itself, we rely on the input codepoints being correct + * and avoid a check here. + * + * Character data can also come here through decoding of Unicode + * escapes ("\udead\ubeef") so all 16-but unsigned values can be + * present, even when the source file itself is strict UTF-8. + */ + DUK_ASSERT(x >= 0 && x <= 0x10ffffL); + + DUK_BW_WRITE_ENSURE_CESU8(lex_ctx->thr, &lex_ctx->bw, (duk_ucodepoint_t) x); +} + +DUK_LOCAL void duk__appendbuffer_ascii(duk_lexer_ctx *lex_ctx, duk_codepoint_t x) { + /* ASCII characters can be emitted as a single byte without encoding + * which matters for some fast paths. + */ + DUK_ASSERT(x >= 0 && x <= 0x7f); + + DUK_BW_WRITE_ENSURE_U8(lex_ctx->thr, &lex_ctx->bw, (duk_uint8_t) x); +} + +/* + * Intern the temporary byte buffer into a valstack slot + * (in practice, slot1 or slot2). + */ + +DUK_LOCAL duk_hstring *duk__internbuffer(duk_lexer_ctx *lex_ctx, duk_idx_t valstack_idx) { + DUK_ASSERT(valstack_idx == lex_ctx->slot1_idx || valstack_idx == lex_ctx->slot2_idx); + + DUK_BW_PUSH_AS_STRING(lex_ctx->thr, &lex_ctx->bw); + duk_replace(lex_ctx->thr, valstack_idx); + return duk_known_hstring(lex_ctx->thr, valstack_idx); +} + +/* + * Init lexer context + */ + +DUK_INTERNAL void duk_lexer_initctx(duk_lexer_ctx *lex_ctx) { + DUK_ASSERT(lex_ctx != NULL); + + duk_memzero(lex_ctx, sizeof(*lex_ctx)); +#if defined(DUK_USE_EXPLICIT_NULL_INIT) +#if defined(DUK_USE_LEXER_SLIDING_WINDOW) + lex_ctx->window = NULL; +#endif + lex_ctx->thr = NULL; + lex_ctx->input = NULL; + lex_ctx->buf = NULL; +#endif +} + +/* + * Set lexer input position and reinitialize lookup window. + */ + +DUK_INTERNAL void duk_lexer_getpoint(duk_lexer_ctx *lex_ctx, duk_lexer_point *pt) { + pt->offset = lex_ctx->window[0].offset; + pt->line = lex_ctx->window[0].line; +} + +DUK_INTERNAL void duk_lexer_setpoint(duk_lexer_ctx *lex_ctx, duk_lexer_point *pt) { + DUK_ASSERT_DISABLE(pt->offset >= 0); /* unsigned */ + DUK_ASSERT(pt->line >= 1); + lex_ctx->input_offset = pt->offset; + lex_ctx->input_line = pt->line; + duk__init_lexer_window(lex_ctx); +} + +/* + * Lexing helpers + */ + +/* Numeric value of a hex digit (also covers octal and decimal digits) or + * -1 if not a valid hex digit. + */ +DUK_LOCAL duk_codepoint_t duk__hexval_validate(duk_codepoint_t x) { + duk_small_int_t t; + + /* Here 'x' is a Unicode codepoint */ + if (DUK_LIKELY(x >= 0 && x <= 0xff)) { + t = duk_hex_dectab[x]; + if (DUK_LIKELY(t >= 0)) { + return t; + } + } + + return -1; +} + +/* Just a wrapper for call sites where 'x' is known to be valid so + * we assert for it before decoding. + */ +DUK_LOCAL duk_codepoint_t duk__hexval(duk_codepoint_t x) { + duk_codepoint_t ret; + + DUK_ASSERT((x >= DUK_ASC_0 && x <= DUK_ASC_9) || (x >= DUK_ASC_LC_A && x <= DUK_ASC_LC_F) || + (x >= DUK_ASC_UC_A && x <= DUK_ASC_UC_F)); + ret = duk__hexval_validate(x); + DUK_ASSERT(ret >= 0 && ret <= 15); + return ret; +} + +/* having this as a separate function provided a size benefit */ +DUK_LOCAL duk_bool_t duk__is_hex_digit(duk_codepoint_t x) { + if (DUK_LIKELY(x >= 0 && x <= 0xff)) { + return (duk_hex_dectab[x] >= 0); + } + return 0; +} + +/* Parse a Unicode escape of the form \xHH, \uHHHH, or \u{H+}. Shared by + * source and RegExp parsing. + */ +DUK_LOCAL duk_codepoint_t duk__lexer_parse_escape(duk_lexer_ctx *lex_ctx, duk_bool_t allow_es6) { + duk_small_int_t digits; /* Initial value 2 or 4 for fixed length escapes, 0 for ES2015 \u{H+}. */ + duk_codepoint_t escval; + duk_codepoint_t x; + duk_small_uint_t adv; + + DUK_ASSERT(DUK__L0() == DUK_ASC_BACKSLASH); /* caller responsibilities */ + DUK_ASSERT(DUK__L1() == DUK_ASC_LC_X || DUK__L1() == DUK_ASC_LC_U); + DUK_UNREF(allow_es6); + + adv = 2; + digits = 2; + if (DUK__L1() == DUK_ASC_LC_U) { + digits = 4; +#if defined(DUK_USE_ES6_UNICODE_ESCAPE) + if (DUK__L2() == DUK_ASC_LCURLY && allow_es6) { + digits = 0; + adv = 3; + } +#endif + } + DUK__ADVANCECHARS(lex_ctx, adv); + + escval = 0; + for (;;) { + /* One of the escape forms: \xHH, \uHHHH, \u{H+}. + * The 'digits' variable tracks parsing state and is + * initialized to: + * + * \xHH 2 + * \uHH 4 + * \u{H+} 0 first time, updated to -1 to indicate + * at least one digit has been parsed + * + * Octal parsing is handled separately because it can be + * done with fixed lookahead and also has validation + * rules which depend on the escape length (which is + * variable). + * + * We don't need a specific check for x < 0 (end of + * input) or duk_unicode_is_line_terminator(x) + * because the 'dig' decode will fail and lead to a + * SyntaxError. + */ + duk_codepoint_t dig; + + x = DUK__L0(); + DUK__ADVANCECHARS(lex_ctx, 1); + + dig = duk__hexval_validate(x); + if (digits > 0) { + digits--; + if (dig < 0) { + goto fail_escape; + } + DUK_ASSERT(dig >= 0x00 && dig <= 0x0f); + escval = (escval << 4) + dig; + if (digits == 0) { + DUK_ASSERT(escval >= 0 && escval <= 0xffffL); + break; + } + } else { +#if defined(DUK_USE_ES6_UNICODE_ESCAPE) + DUK_ASSERT(digits == 0 /* first time */ || digits == -1 /* others */); + if (dig >= 0) { + DUK_ASSERT(dig >= 0x00 && dig <= 0x0f); + escval = (escval << 4) + dig; + if (escval > 0x10ffffL) { + goto fail_escape; + } + } else if (x == DUK_ASC_RCURLY) { + if (digits == 0) { + /* Empty escape, \u{}. */ + goto fail_escape; + } + DUK_ASSERT(escval >= 0 && escval <= 0x10ffffL); + break; + } else { + goto fail_escape; + } + digits = -1; /* Indicate we have at least one digit. */ +#else /* DUK_USE_ES6_UNICODE_ESCAPE */ + DUK_ASSERT(0); /* Never happens if \u{H+} support disabled. */ +#endif /* DUK_USE_ES6_UNICODE_ESCAPE */ + } + } + + return escval; + +fail_escape: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_ESCAPE); + DUK_WO_NORETURN(return 0;); +} + +/* Parse legacy octal escape of the form \N{1,3}, e.g. \0, \5, \0377. Maximum + * allowed value is \0377 (U+00FF), longest match is used. Used for both string + * RegExp octal escape parsing. Window[0] must be the slash '\' and the first + * digit must already be validated to be in [0-9] by the caller. + */ +DUK_LOCAL duk_codepoint_t duk__lexer_parse_legacy_octal(duk_lexer_ctx *lex_ctx, + duk_small_uint_t *out_adv, + duk_bool_t reject_annex_b) { + duk_codepoint_t cp; + duk_small_uint_t lookup_idx; + duk_small_uint_t adv; + duk_codepoint_t tmp; + + DUK_ASSERT(out_adv != NULL); + DUK_ASSERT(DUK__LOOKUP(lex_ctx, 0) == DUK_ASC_BACKSLASH); + DUK_ASSERT(DUK__LOOKUP(lex_ctx, 1) >= DUK_ASC_0 && DUK__LOOKUP(lex_ctx, 1) <= DUK_ASC_9); + + cp = 0; + tmp = 0; + for (lookup_idx = 1; lookup_idx <= 3; lookup_idx++) { + DUK_DDD(DUK_DDDPRINT("lookup_idx=%ld, cp=%ld", (long) lookup_idx, (long) cp)); + tmp = DUK__LOOKUP(lex_ctx, lookup_idx); + if (tmp < DUK_ASC_0 || tmp > DUK_ASC_7) { + /* No more valid digits. */ + break; + } + tmp = (cp << 3) + (tmp - DUK_ASC_0); + if (tmp > 0xff) { + /* Three digit octal escapes above \377 (= 0xff) + * are not allowed. + */ + break; + } + cp = tmp; + } + DUK_DDD(DUK_DDDPRINT("final lookup_idx=%ld, cp=%ld", (long) lookup_idx, (long) cp)); + + adv = lookup_idx; + if (lookup_idx == 1) { + DUK_DDD(DUK_DDDPRINT("\\8 or \\9 -> treat as literal, accept in strict mode too")); + DUK_ASSERT(tmp == DUK_ASC_8 || tmp == DUK_ASC_9); + cp = tmp; + adv++; /* correction to above, eat offending character */ + } else if (lookup_idx == 2 && cp == 0) { + /* Note: 'foo\0bar' is OK in strict mode, but 'foo\00bar' is not. + * It won't be interpreted as 'foo\u{0}0bar' but as a SyntaxError. + */ + DUK_DDD(DUK_DDDPRINT("\\0 -> accept in strict mode too")); + } else { + /* This clause also handles non-shortest zero, e.g. \00. */ + if (reject_annex_b) { + DUK_DDD(DUK_DDDPRINT("non-zero octal literal %ld -> reject in strict-mode", (long) cp)); + cp = -1; + } else { + DUK_DDD(DUK_DDDPRINT("non-zero octal literal %ld -> accepted", (long) cp)); + DUK_ASSERT(cp >= 0 && cp <= 0xff); + } + } + + *out_adv = adv; + + DUK_ASSERT((cp >= 0 && cp <= 0xff) || (cp == -1 && reject_annex_b)); + return cp; +} + +/* XXX: move strict mode to lex_ctx? */ +DUK_LOCAL void duk__lexer_parse_string_literal(duk_lexer_ctx *lex_ctx, + duk_token *out_token, + duk_small_int_t quote, + duk_bool_t strict_mode) { + duk_small_uint_t adv; + + for (adv = 1 /* initial quote */;;) { + duk_codepoint_t x; + + DUK__ADVANCECHARS(lex_ctx, adv); /* eat opening quote on first loop */ + x = DUK__L0(); + + adv = 1; + if (x == quote) { + DUK__ADVANCECHARS(lex_ctx, 1); /* eat closing quote */ + break; + } else if (x == '\\') { + /* DUK__L0 -> '\' char + * DUK__L1 ... DUK__L5 -> more lookup + */ + duk_small_int_t emitcp = -1; + + x = DUK__L1(); + + /* How much to advance before next loop. */ + adv = 2; /* note: long live range */ + + switch (x) { + case '\'': + emitcp = 0x0027; + break; + case '"': + emitcp = 0x0022; + break; + case '\\': + emitcp = 0x005c; + break; + case 'b': + emitcp = 0x0008; + break; + case 'f': + emitcp = 0x000c; + break; + case 'n': + emitcp = 0x000a; + break; + case 'r': + emitcp = 0x000d; + break; + case 't': + emitcp = 0x0009; + break; + case 'v': + emitcp = 0x000b; + break; + case 'x': + case 'u': { + duk_codepoint_t esc_cp; + esc_cp = duk__lexer_parse_escape(lex_ctx, 1 /*allow_es6*/); + DUK__APPENDBUFFER(lex_ctx, esc_cp); + adv = 0; + break; + } + default: { + if (duk_unicode_is_line_terminator(x)) { + /* line continuation */ + if (x == 0x000d && DUK__L2() == 0x000a) { + /* CR LF again a special case */ + adv = 3; /* line terminator, CR, LF */ + } + } else if (DUK__ISDIGIT(x)) { + /* + * Octal escape or zero escape: + * \0 (lookahead not OctalDigit) + * \1 ... \7 (lookahead not OctalDigit) + * \ZeroToThree OctalDigit (lookahead not OctalDigit) + * \FourToSeven OctalDigit (no lookahead restrictions) + * \ZeroToThree OctalDigit OctalDigit (no lookahead restrictions) + * + * Zero escape is part of the standard syntax. Octal escapes are + * defined in E5 Section B.1.2, and are only allowed in non-strict mode. + * Any other productions starting with a decimal digit are invalid + * but are in practice treated like identity escapes. + * + * Parse octal (up to 3 digits) from the lookup window. + */ + + emitcp = duk__lexer_parse_legacy_octal(lex_ctx, &adv, strict_mode /*reject_annex_b*/); + if (emitcp < 0) { + goto fail_escape; + } + } else if (x < 0) { + goto fail_unterminated; + } else { + /* escaped NonEscapeCharacter */ + DUK__APPENDBUFFER(lex_ctx, x); + } + } /* end default clause */ + } /* end switch */ + + /* Shared handling for single codepoint escapes. */ + if (emitcp >= 0) { + DUK__APPENDBUFFER(lex_ctx, emitcp); + } + + /* Track number of escapes; count not really needed but directive + * prologues need to detect whether there were any escapes or line + * continuations or not. + */ + out_token->num_escapes++; + } else if (x >= 0x20 && x <= 0x7f) { + /* Fast path for ASCII case, avoids line terminator + * check and CESU-8 encoding. + */ + DUK_ASSERT(x >= 0); + DUK_ASSERT(!duk_unicode_is_line_terminator(x)); + DUK_ASSERT(x != quote); + DUK_ASSERT(x != DUK_ASC_BACKSLASH); + DUK__APPENDBUFFER_ASCII(lex_ctx, x); + } else if (x < 0 || duk_unicode_is_line_terminator(x)) { + goto fail_unterminated; + } else { + /* Character which is part of the string but wasn't handled + * by the fast path. + */ + DUK__APPENDBUFFER(lex_ctx, x); + } + } /* string parse loop */ + + return; + +fail_escape: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_ESCAPE); + DUK_WO_NORETURN(return;); + +fail_unterminated: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_UNTERMINATED_STRING); + DUK_WO_NORETURN(return;); +} + +/* Skip to end-of-line (or end-of-file), used for single line comments. */ +DUK_LOCAL void duk__lexer_skip_to_endofline(duk_lexer_ctx *lex_ctx) { + for (;;) { + duk_codepoint_t x; + + x = DUK__L0(); + if (x < 0 || duk_unicode_is_line_terminator(x)) { + break; + } + DUK__ADVANCECHARS(lex_ctx, 1); + } +} + +/* + * Parse ECMAScript source InputElementDiv or InputElementRegExp + * (E5 Section 7), skipping whitespace, comments, and line terminators. + * + * Possible results are: + * (1) a token + * (2) a line terminator (skipped) + * (3) a comment (skipped) + * (4) EOF + * + * White space is automatically skipped from the current position (but + * not after the input element). If input has already ended, returns + * DUK_TOK_EOF indefinitely. If a parse error occurs, uses an DUK_ERROR() + * macro call (and hence a longjmp through current heap longjmp context). + * Comments and line terminator tokens are automatically skipped. + * + * The input element being matched is determined by regexp_mode; if set, + * parses a InputElementRegExp, otherwise a InputElementDiv. The + * difference between these are handling of productions starting with a + * forward slash. + * + * If strict_mode is set, recognizes additional future reserved words + * specific to strict mode, and refuses to parse octal literals. + * + * The matching strategy below is to (currently) use a six character + * lookup window to quickly determine which production is the -longest- + * matching one, and then parse that. The top-level if-else clauses + * match the first character, and the code blocks for each clause + * handle -all- alternatives for that first character. ECMAScript + * specification uses the "longest match wins" semantics, so the order + * of the if-clauses matters. + * + * Misc notes: + * + * * ECMAScript numeric literals do not accept a sign character. + * Consequently e.g. "-1.0" is parsed as two tokens: a negative + * sign and a positive numeric literal. The compiler performs + * the negation during compilation, so this has no adverse impact. + * + * * There is no token for "undefined": it is just a value available + * from the global object (or simply established by doing a reference + * to an undefined value). + * + * * Some contexts want Identifier tokens, which are IdentifierNames + * excluding reserved words, while some contexts want IdentifierNames + * directly. In the latter case e.g. "while" is interpreted as an + * identifier name, not a DUK_TOK_WHILE token. The solution here is + * to provide both token types: DUK_TOK_WHILE goes to 't' while + * DUK_TOK_IDENTIFIER goes to 't_nores', and 'slot1' always contains + * the identifier / keyword name. + * + * * Directive prologue needs to identify string literals such as + * "use strict" and 'use strict', which are sensitive to line + * continuations and escape sequences. For instance, "use\u0020strict" + * is a valid directive but is distinct from "use strict". The solution + * here is to decode escapes while tokenizing, but to keep track of the + * number of escapes. Directive detection can then check that the + * number of escapes is zero. + * + * * Multi-line comments with one or more internal LineTerminator are + * treated like a line terminator to comply with automatic semicolon + * insertion. + */ + +DUK_INTERNAL +void duk_lexer_parse_js_input_element(duk_lexer_ctx *lex_ctx, + duk_token *out_token, + duk_bool_t strict_mode, + duk_bool_t regexp_mode) { + duk_codepoint_t x; /* temporary, must be signed and 32-bit to hold Unicode code points */ + duk_small_uint_t advtok = 0; /* (advance << 8) + token_type, updated at function end, + * init is unnecessary but suppresses "may be used uninitialized" warnings. + */ + duk_bool_t got_lineterm = 0; /* got lineterm preceding non-whitespace, non-lineterm token */ + + if (++lex_ctx->token_count >= lex_ctx->token_limit) { + goto fail_token_limit; + } + + out_token->t = DUK_TOK_EOF; + out_token->t_nores = DUK_TOK_INVALID; /* marker: copy t if not changed */ +#if 0 /* not necessary to init, disabled for faster parsing */ + out_token->num = DUK_DOUBLE_NAN; + out_token->str1 = NULL; + out_token->str2 = NULL; +#endif + out_token->num_escapes = 0; + /* out_token->lineterm set by caller */ + + /* This would be nice, but parsing is faster without resetting the + * value slots. The only side effect is that references to temporary + * string values may linger until lexing is finished; they're then + * freed normally. + */ +#if 0 + duk_to_undefined(lex_ctx->thr, lex_ctx->slot1_idx); + duk_to_undefined(lex_ctx->thr, lex_ctx->slot2_idx); +#endif + + /* 'advtok' indicates how much to advance and which token id to assign + * at the end. This shared functionality minimizes code size. All + * code paths are required to set 'advtok' to some value, so no default + * init value is used. Code paths calling DUK_ERROR() never return so + * they don't need to set advtok. + */ + + /* + * Matching order: + * + * Punctuator first chars, also covers comments, regexps + * LineTerminator + * Identifier or reserved word, also covers null/true/false literals + * NumericLiteral + * StringLiteral + * EOF + * + * The order does not matter as long as the longest match is + * always correctly identified. There are order dependencies + * in the clauses, so it's not trivial to convert to a switch. + */ + +restart_lineupdate: + out_token->start_line = lex_ctx->window[0].line; + +restart: + out_token->start_offset = lex_ctx->window[0].offset; + + x = DUK__L0(); + + switch (x) { + case DUK_ASC_SPACE: + case DUK_ASC_HT: /* fast paths for space and tab */ + DUK__ADVANCECHARS(lex_ctx, 1); + goto restart; + case DUK_ASC_LF: /* LF line terminator; CR LF and Unicode lineterms are handled in slow path */ + DUK__ADVANCECHARS(lex_ctx, 1); + got_lineterm = 1; + goto restart_lineupdate; +#if defined(DUK_USE_SHEBANG_COMMENTS) + case DUK_ASC_HASH: /* '#' */ + if (DUK__L1() == DUK_ASC_EXCLAMATION && lex_ctx->window[0].offset == 0 && (lex_ctx->flags & DUK_COMPILE_SHEBANG)) { + /* "Shebang" comment ('#! ...') on first line. */ + /* DUK__ADVANCECHARS(lex_ctx, 2) would be correct here, but not necessary */ + duk__lexer_skip_to_endofline(lex_ctx); + goto restart; /* line terminator will be handled on next round */ + } + goto fail_token; +#endif /* DUK_USE_SHEBANG_COMMENTS */ + case DUK_ASC_SLASH: /* '/' */ + if (DUK__L1() == DUK_ASC_SLASH) { + /* + * E5 Section 7.4, allow SourceCharacter (which is any 16-bit + * code point). + */ + + /* DUK__ADVANCECHARS(lex_ctx, 2) would be correct here, but not necessary */ + duk__lexer_skip_to_endofline(lex_ctx); + goto restart; /* line terminator will be handled on next round */ + } else if (DUK__L1() == DUK_ASC_STAR) { + /* + * E5 Section 7.4. If the multi-line comment contains a newline, + * it is treated like a single line terminator for automatic + * semicolon insertion. + */ + + duk_bool_t last_asterisk = 0; + DUK__ADVANCECHARS(lex_ctx, 2); + for (;;) { + x = DUK__L0(); + if (x < 0) { + goto fail_unterm_comment; + } + DUK__ADVANCECHARS(lex_ctx, 1); + if (last_asterisk && x == DUK_ASC_SLASH) { + break; + } + if (duk_unicode_is_line_terminator(x)) { + got_lineterm = 1; + } + last_asterisk = (x == DUK_ASC_STAR); + } + goto restart_lineupdate; + } else if (regexp_mode) { +#if defined(DUK_USE_REGEXP_SUPPORT) + /* + * "/" followed by something in regexp mode. See E5 Section 7.8.5. + * + * RegExp parsing is a bit complex. First, the regexp body is delimited + * by forward slashes, but the body may also contain forward slashes as + * part of an escape sequence or inside a character class (delimited by + * square brackets). A mini state machine is used to implement these. + * + * Further, an early (parse time) error must be thrown if the regexp + * would cause a run-time error when used in the expression new RegExp(...). + * Parsing here simply extracts the (candidate) regexp, and also accepts + * invalid regular expressions (which are delimited properly). The caller + * (compiler) must perform final validation and regexp compilation. + * + * RegExp first char may not be '/' (single line comment) or '*' (multi- + * line comment). These have already been checked above, so there is no + * need below for special handling of the first regexp character as in + * the E5 productions. + * + * About unicode escapes within regexp literals: + * + * E5 Section 7.8.5 grammar does NOT accept \uHHHH escapes. + * However, Section 6 states that regexps accept the escapes, + * see paragraph starting with "In string literals...". + * The regexp grammar, which sees the decoded regexp literal + * (after lexical parsing) DOES have a \uHHHH unicode escape. + * So, for instance: + * + * /\u1234/ + * + * should first be parsed by the lexical grammar as: + * + * '\' 'u' RegularExpressionBackslashSequence + * '1' RegularExpressionNonTerminator + * '2' RegularExpressionNonTerminator + * '3' RegularExpressionNonTerminator + * '4' RegularExpressionNonTerminator + * + * and the escape itself is then parsed by the regexp engine. + * This is the current implementation. + * + * Minor spec inconsistency: + * + * E5 Section 7.8.5 RegularExpressionBackslashSequence is: + * + * \ RegularExpressionNonTerminator + * + * while Section A.1 RegularExpressionBackslashSequence is: + * + * \ NonTerminator + * + * The latter is not normative and a typo. + * + */ + + /* first, parse regexp body roughly */ + + duk_small_int_t state = 0; /* 0=base, 1=esc, 2=class, 3=class+esc */ + + DUK__INITBUFFER(lex_ctx); + for (;;) { + DUK__ADVANCECHARS(lex_ctx, 1); /* skip opening slash on first loop */ + x = DUK__L0(); + if (x < 0 || duk_unicode_is_line_terminator(x)) { + goto fail_unterm_regexp; + } + x = DUK__L0(); /* re-read to avoid spill / fetch */ + if (state == 0) { + if (x == DUK_ASC_SLASH) { + DUK__ADVANCECHARS(lex_ctx, 1); /* eat closing slash */ + break; + } else if (x == DUK_ASC_BACKSLASH) { + state = 1; + } else if (x == DUK_ASC_LBRACKET) { + state = 2; + } + } else if (state == 1) { + state = 0; + } else if (state == 2) { + if (x == DUK_ASC_RBRACKET) { + state = 0; + } else if (x == DUK_ASC_BACKSLASH) { + state = 3; + } + } else { /* state == 3 */ + state = 2; + } + DUK__APPENDBUFFER(lex_ctx, x); + } + out_token->str1 = duk__internbuffer(lex_ctx, lex_ctx->slot1_idx); + + /* second, parse flags */ + + DUK__INITBUFFER(lex_ctx); + for (;;) { + x = DUK__L0(); + if (!duk_unicode_is_identifier_part(x)) { + break; + } + x = DUK__L0(); /* re-read to avoid spill / fetch */ + DUK__APPENDBUFFER(lex_ctx, x); + DUK__ADVANCECHARS(lex_ctx, 1); + } + out_token->str2 = duk__internbuffer(lex_ctx, lex_ctx->slot2_idx); + + DUK__INITBUFFER(lex_ctx); /* free some memory */ + + /* validation of the regexp is caller's responsibility */ + + advtok = DUK__ADVTOK(0, DUK_TOK_REGEXP); +#else /* DUK_USE_REGEXP_SUPPORT */ + goto fail_regexp_support; +#endif /* DUK_USE_REGEXP_SUPPORT */ + } else if (DUK__L1() == DUK_ASC_EQUALS) { + /* "/=" and not in regexp mode */ + advtok = DUK__ADVTOK(2, DUK_TOK_DIV_EQ); + } else { + /* "/" and not in regexp mode */ + advtok = DUK__ADVTOK(1, DUK_TOK_DIV); + } + break; + case DUK_ASC_LCURLY: /* '{' */ + advtok = DUK__ADVTOK(1, DUK_TOK_LCURLY); + break; + case DUK_ASC_RCURLY: /* '}' */ + advtok = DUK__ADVTOK(1, DUK_TOK_RCURLY); + break; + case DUK_ASC_LPAREN: /* '(' */ + advtok = DUK__ADVTOK(1, DUK_TOK_LPAREN); + break; + case DUK_ASC_RPAREN: /* ')' */ + advtok = DUK__ADVTOK(1, DUK_TOK_RPAREN); + break; + case DUK_ASC_LBRACKET: /* '[' */ + advtok = DUK__ADVTOK(1, DUK_TOK_LBRACKET); + break; + case DUK_ASC_RBRACKET: /* ']' */ + advtok = DUK__ADVTOK(1, DUK_TOK_RBRACKET); + break; + case DUK_ASC_PERIOD: /* '.' */ + if (DUK__ISDIGIT(DUK__L1())) { + /* Period followed by a digit can only start DecimalLiteral + * (handled in slow path). We could jump straight into the + * DecimalLiteral handling but should avoid goto to inside + * a block. + */ + goto slow_path; + } + advtok = DUK__ADVTOK(1, DUK_TOK_PERIOD); + break; + case DUK_ASC_SEMICOLON: /* ';' */ + advtok = DUK__ADVTOK(1, DUK_TOK_SEMICOLON); + break; + case DUK_ASC_COMMA: /* ',' */ + advtok = DUK__ADVTOK(1, DUK_TOK_COMMA); + break; + case DUK_ASC_LANGLE: /* '<' */ +#if defined(DUK_USE_HTML_COMMENTS) + if (DUK__L1() == DUK_ASC_EXCLAMATION && DUK__L2() == DUK_ASC_MINUS && DUK__L3() == DUK_ASC_MINUS) { + /* + * ES2015: B.1.3, handle "" SingleLineHTMLCloseComment + * Only allowed: + * - on new line + * - preceded only by whitespace + * - preceded by end of multiline comment and optional whitespace + * + * Since whitespace generates no tokens, and multiline comments + * are treated as a line ending, consulting `got_lineterm` is + * sufficient to test for these three options. + */ + + /* DUK__ADVANCECHARS(lex_ctx, 3) would be correct here, but not necessary */ + duk__lexer_skip_to_endofline(lex_ctx); + goto restart; /* line terminator will be handled on next round */ + } else +#endif /* DUK_USE_HTML_COMMENTS */ + if (DUK__L1() == DUK_ASC_MINUS) { + advtok = DUK__ADVTOK(2, DUK_TOK_DECREMENT); + } else if (DUK__L1() == DUK_ASC_EQUALS) { + advtok = DUK__ADVTOK(2, DUK_TOK_SUB_EQ); + } else { + advtok = DUK__ADVTOK(1, DUK_TOK_SUB); + } + break; + case DUK_ASC_STAR: /* '*' */ +#if defined(DUK_USE_ES7_EXP_OPERATOR) + if (DUK__L1() == DUK_ASC_STAR && DUK__L2() == DUK_ASC_EQUALS) { + advtok = DUK__ADVTOK(3, DUK_TOK_EXP_EQ); + } else if (DUK__L1() == DUK_ASC_STAR) { + advtok = DUK__ADVTOK(2, DUK_TOK_EXP); + } else +#endif + if (DUK__L1() == DUK_ASC_EQUALS) { + advtok = DUK__ADVTOK(2, DUK_TOK_MUL_EQ); + } else { + advtok = DUK__ADVTOK(1, DUK_TOK_MUL); + } + break; + case DUK_ASC_PERCENT: /* '%' */ + if (DUK__L1() == DUK_ASC_EQUALS) { + advtok = DUK__ADVTOK(2, DUK_TOK_MOD_EQ); + } else { + advtok = DUK__ADVTOK(1, DUK_TOK_MOD); + } + break; + case DUK_ASC_AMP: /* '&' */ + if (DUK__L1() == DUK_ASC_AMP) { + advtok = DUK__ADVTOK(2, DUK_TOK_LAND); + } else if (DUK__L1() == DUK_ASC_EQUALS) { + advtok = DUK__ADVTOK(2, DUK_TOK_BAND_EQ); + } else { + advtok = DUK__ADVTOK(1, DUK_TOK_BAND); + } + break; + case DUK_ASC_PIPE: /* '|' */ + if (DUK__L1() == DUK_ASC_PIPE) { + advtok = DUK__ADVTOK(2, DUK_TOK_LOR); + } else if (DUK__L1() == DUK_ASC_EQUALS) { + advtok = DUK__ADVTOK(2, DUK_TOK_BOR_EQ); + } else { + advtok = DUK__ADVTOK(1, DUK_TOK_BOR); + } + break; + case DUK_ASC_CARET: /* '^' */ + if (DUK__L1() == DUK_ASC_EQUALS) { + advtok = DUK__ADVTOK(2, DUK_TOK_BXOR_EQ); + } else { + advtok = DUK__ADVTOK(1, DUK_TOK_BXOR); + } + break; + case DUK_ASC_TILDE: /* '~' */ + advtok = DUK__ADVTOK(1, DUK_TOK_BNOT); + break; + case DUK_ASC_QUESTION: /* '?' */ + advtok = DUK__ADVTOK(1, DUK_TOK_QUESTION); + break; + case DUK_ASC_COLON: /* ':' */ + advtok = DUK__ADVTOK(1, DUK_TOK_COLON); + break; + case DUK_ASC_DOUBLEQUOTE: /* '"' */ + case DUK_ASC_SINGLEQUOTE: { /* '\'' */ + DUK__INITBUFFER(lex_ctx); + duk__lexer_parse_string_literal(lex_ctx, out_token, x /*quote*/, strict_mode); + duk__internbuffer(lex_ctx, lex_ctx->slot1_idx); + out_token->str1 = duk_known_hstring(lex_ctx->thr, lex_ctx->slot1_idx); + + DUK__INITBUFFER(lex_ctx); /* free some memory */ + + advtok = DUK__ADVTOK(0, DUK_TOK_STRING); + break; + } + default: + goto slow_path; + } /* switch */ + + goto skip_slow_path; + +slow_path: + if (duk_unicode_is_line_terminator(x)) { + if (x == 0x000d && DUK__L1() == 0x000a) { + /* + * E5 Section 7.3: CR LF is detected as a single line terminator for + * line numbers. Here we also detect it as a single line terminator + * token. + */ + DUK__ADVANCECHARS(lex_ctx, 2); + } else { + DUK__ADVANCECHARS(lex_ctx, 1); + } + got_lineterm = 1; + goto restart_lineupdate; + } else if (duk_unicode_is_identifier_start(x) || x == DUK_ASC_BACKSLASH) { + /* + * Parse an identifier and then check whether it is: + * - reserved word (keyword or other reserved word) + * - "null" (NullLiteral) + * - "true" (BooleanLiteral) + * - "false" (BooleanLiteral) + * - anything else => identifier + * + * This does not follow the E5 productions cleanly, but is + * useful and compact. + * + * Note that identifiers may contain Unicode escapes, + * see E5 Sections 6 and 7.6. They must be decoded first, + * and the result checked against allowed characters. + * The above if-clause accepts an identifier start and an + * '\' character -- no other token can begin with a '\'. + * + * Note that "get" and "set" are not reserved words in E5 + * specification so they are recognized as plain identifiers + * (the tokens DUK_TOK_GET and DUK_TOK_SET are actually not + * used now). The compiler needs to work around this. + * + * Strictly speaking, following ECMAScript longest match + * specification, an invalid escape for the first character + * should cause a syntax error. However, an invalid escape + * for IdentifierParts should just terminate the identifier + * early (longest match), and let the next tokenization + * fail. For instance Rhino croaks with 'foo\z' when + * parsing the identifier. This has little practical impact. + */ + + duk_small_uint_t i, i_end; + duk_bool_t first = 1; + duk_hstring *str; + + DUK__INITBUFFER(lex_ctx); + for (;;) { + /* re-lookup first char on first loop */ + if (DUK__L0() == DUK_ASC_BACKSLASH) { + duk_codepoint_t esc_cp; + if (DUK__L1() != DUK_ASC_LC_U) { + goto fail_escape; + } + esc_cp = duk__lexer_parse_escape(lex_ctx, 1 /*allow_es6*/); + DUK__APPENDBUFFER(lex_ctx, esc_cp); + + /* IdentifierStart is stricter than IdentifierPart, so if the first + * character is escaped, must have a stricter check here. + */ + if (!(first ? duk_unicode_is_identifier_start(esc_cp) : duk_unicode_is_identifier_part(esc_cp))) { + goto fail_escape; + } + + /* Track number of escapes: necessary for proper keyword + * detection. + */ + out_token->num_escapes++; + } else { + /* Note: first character is checked against this. But because + * IdentifierPart includes all IdentifierStart characters, and + * the first character (if unescaped) has already been checked + * in the if condition, this is OK. + */ + if (!duk_unicode_is_identifier_part(DUK__L0())) { + break; + } + DUK__APPENDBUFFER(lex_ctx, DUK__L0()); + DUK__ADVANCECHARS(lex_ctx, 1); + } + first = 0; + } + + out_token->str1 = duk__internbuffer(lex_ctx, lex_ctx->slot1_idx); + str = out_token->str1; + out_token->t_nores = DUK_TOK_IDENTIFIER; + + DUK__INITBUFFER(lex_ctx); /* free some memory */ + + /* + * Interned identifier is compared against reserved words, which are + * currently interned into the heap context. See genbuiltins.py. + * + * Note that an escape in the identifier disables recognition of + * keywords; e.g. "\u0069f = 1;" is a valid statement (assigns to + * identifier named "if"). This is not necessarily compliant, + * see test-dec-escaped-char-in-keyword.js. + * + * Note: "get" and "set" are awkward. They are not officially + * ReservedWords (and indeed e.g. "var set = 1;" is valid), and + * must come out as DUK_TOK_IDENTIFIER. The compiler needs to + * work around this a bit. + */ + + /* XXX: optimize by adding the token numbers directly into the + * always interned duk_hstring objects (there should be enough + * flag bits free for that)? + */ + + i_end = (strict_mode ? DUK_STRIDX_END_RESERVED : DUK_STRIDX_START_STRICT_RESERVED); + + advtok = DUK__ADVTOK(0, DUK_TOK_IDENTIFIER); + if (out_token->num_escapes == 0) { + for (i = DUK_STRIDX_START_RESERVED; i < i_end; i++) { + DUK_ASSERT_DISABLE(i >= 0); /* unsigned */ + DUK_ASSERT(i < DUK_HEAP_NUM_STRINGS); + if (DUK_HTHREAD_GET_STRING(lex_ctx->thr, i) == str) { + advtok = DUK__ADVTOK(0, DUK_STRIDX_TO_TOK(i)); + break; + } + } + } + } else if (DUK__ISDIGIT(x) || (x == DUK_ASC_PERIOD)) { + /* Note: decimal number may start with a period, but must be followed by a digit */ + + /* + * Pre-parsing for decimal, hex, octal (both legacy and ES2015), + * and binary literals, followed by an actual parser step + * provided by numconv. + * + * Note: the leading sign character ('+' or '-') is -not- part of + * the production in E5 grammar, and that the a DecimalLiteral + * starting with a '0' must be followed by a non-digit. + * + * XXX: the two step parsing process is quite awkward, it would + * be more straightforward to allow numconv to parse the longest + * valid prefix (it already does that, it only needs to indicate + * where the input ended). However, the lexer decodes characters + * using a limited lookup window, so this is not a trivial change. + */ + + /* XXX: because of the final check below (that the literal is not + * followed by a digit), this could maybe be simplified, if we bail + * out early from a leading zero (and if there are no periods etc). + * Maybe too complex. + */ + + duk_double_t val; + duk_bool_t legacy_oct = 0; + duk_small_int_t state; /* 0=before period/exp, + * 1=after period, before exp + * 2=after exp, allow '+' or '-' + * 3=after exp and exp sign + */ + duk_small_uint_t s2n_flags; + duk_codepoint_t y, z; + duk_small_int_t s2n_radix = 10; + duk_small_uint_t pre_adv = 0; + + DUK__INITBUFFER(lex_ctx); + y = DUK__L1(); + + if (x == DUK_ASC_0) { + z = DUK_LOWERCASE_CHAR_ASCII(y); + + pre_adv = 2; /* default for 0xNNN, 0oNNN, 0bNNN. */ + if (z == DUK_ASC_LC_X) { + s2n_radix = 16; + } else if (z == DUK_ASC_LC_O) { + s2n_radix = 8; + } else if (z == DUK_ASC_LC_B) { + s2n_radix = 2; + } else { + pre_adv = 0; + if (DUK__ISDIGIT(y)) { + if (strict_mode) { + /* Reject octal like \07 but also octal-lookalike + * decimal like \08 in strict mode. + */ + goto fail_number_literal; + } else { + /* Legacy OctalIntegerLiteral or octal-lookalice + * decimal. Deciding between the two happens below + * in digit scanning. + */ + DUK__APPENDBUFFER(lex_ctx, x); + pre_adv = 1; + legacy_oct = 1; + s2n_radix = 8; /* tentative unless conflicting digits found */ + } + } + } + } + + DUK__ADVANCECHARS(lex_ctx, pre_adv); + + /* XXX: we could parse integers here directly, and fall back + * to numconv only when encountering a fractional expression + * or when an octal literal turned out to be decimal (0778 etc). + */ + state = 0; + for (;;) { + x = DUK__L0(); /* re-lookup curr char on first round */ + if (DUK__ISDIGIT(x)) { + /* Note: intentionally allow leading zeroes here, as the + * actual parser will check for them. + */ + if (state == 0 && legacy_oct && (x == DUK_ASC_8 || x == DUK_ASC_9)) { + /* Started out as an octal-lookalike + * but interpreted as decimal, e.g. + * '0779' -> 779. This also means + * that fractions are allowed, e.g. + * '0779.123' is allowed but '0777.123' + * is not! + */ + s2n_radix = 10; + } + if (state == 2) { + state = 3; + } + } else if (s2n_radix == 16 && DUK__ISHEXDIGIT(x)) { + /* Note: 'e' and 'E' are also accepted here. */ + ; + } else if (x == DUK_ASC_PERIOD) { + if (state >= 1 || s2n_radix != 10) { + break; + } else { + state = 1; + } + } else if (x == DUK_ASC_LC_E || x == DUK_ASC_UC_E) { + if (state >= 2 || s2n_radix != 10) { + break; + } else { + state = 2; + } + } else if (x == DUK_ASC_MINUS || x == DUK_ASC_PLUS) { + if (state != 2) { + break; + } else { + state = 3; + } + } else { + break; + } + DUK__APPENDBUFFER(lex_ctx, x); + DUK__ADVANCECHARS(lex_ctx, 1); + } + + /* XXX: better coercion */ + (void) duk__internbuffer(lex_ctx, lex_ctx->slot1_idx); + + if (s2n_radix != 10) { + /* For bases other than 10, integer only. */ + s2n_flags = DUK_S2N_FLAG_ALLOW_LEADING_ZERO; + } else { + s2n_flags = DUK_S2N_FLAG_ALLOW_EXP | DUK_S2N_FLAG_ALLOW_FRAC | DUK_S2N_FLAG_ALLOW_NAKED_FRAC | + DUK_S2N_FLAG_ALLOW_EMPTY_FRAC | DUK_S2N_FLAG_ALLOW_LEADING_ZERO; + } + + duk_dup(lex_ctx->thr, lex_ctx->slot1_idx); + duk_numconv_parse(lex_ctx->thr, s2n_radix, s2n_flags); + val = duk_to_number_m1(lex_ctx->thr); + if (DUK_ISNAN(val)) { + goto fail_number_literal; + } + duk_replace(lex_ctx->thr, lex_ctx->slot1_idx); /* could also just pop? */ + + DUK__INITBUFFER(lex_ctx); /* free some memory */ + + /* Section 7.8.3 (note): NumericLiteral must be followed by something other than + * IdentifierStart or DecimalDigit. + */ + + if (DUK__ISDIGIT(DUK__L0()) || duk_unicode_is_identifier_start(DUK__L0())) { + goto fail_number_literal; + } + + out_token->num = val; + advtok = DUK__ADVTOK(0, DUK_TOK_NUMBER); + } else if (duk_unicode_is_whitespace(DUK__LOOKUP(lex_ctx, 0))) { + DUK__ADVANCECHARS(lex_ctx, 1); + goto restart; + } else if (x < 0) { + advtok = DUK__ADVTOK(0, DUK_TOK_EOF); + } else { + goto fail_token; + } +skip_slow_path: + + /* + * Shared exit path + */ + + DUK__ADVANCEBYTES(lex_ctx, advtok >> 8); + out_token->t = advtok & 0xff; + if (out_token->t_nores == DUK_TOK_INVALID) { + out_token->t_nores = out_token->t; + } + out_token->lineterm = got_lineterm; + + /* Automatic semicolon insertion is allowed if a token is preceded + * by line terminator(s), or terminates a statement list (right curly + * or EOF). + */ + if (got_lineterm || out_token->t == DUK_TOK_RCURLY || out_token->t == DUK_TOK_EOF) { + out_token->allow_auto_semi = 1; + } else { + out_token->allow_auto_semi = 0; + } + + return; + +fail_token_limit: + DUK_ERROR_RANGE(lex_ctx->thr, DUK_STR_TOKEN_LIMIT); + DUK_WO_NORETURN(return;); + +fail_token: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_TOKEN); + DUK_WO_NORETURN(return;); + +fail_number_literal: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_NUMBER_LITERAL); + DUK_WO_NORETURN(return;); + +fail_escape: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_ESCAPE); + DUK_WO_NORETURN(return;); + +fail_unterm_regexp: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_UNTERMINATED_REGEXP); + DUK_WO_NORETURN(return;); + +fail_unterm_comment: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_UNTERMINATED_COMMENT); + DUK_WO_NORETURN(return;); + +#if !defined(DUK_USE_REGEXP_SUPPORT) +fail_regexp_support: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_REGEXP_SUPPORT_DISABLED); + DUK_WO_NORETURN(return;); +#endif +} + +#if defined(DUK_USE_REGEXP_SUPPORT) + +/* + * Parse a RegExp token. The grammar is described in E5 Section 15.10. + * Terminal constructions (such as quantifiers) are parsed directly here. + * + * 0xffffffffU is used as a marker for "infinity" in quantifiers. Further, + * DUK__MAX_RE_QUANT_DIGITS limits the maximum number of digits that + * will be accepted for a quantifier. + */ + +DUK_INTERNAL void duk_lexer_parse_re_token(duk_lexer_ctx *lex_ctx, duk_re_token *out_token) { + duk_small_uint_t advtok = 0; /* init is unnecessary but suppresses "may be used uninitialized" warnings */ + duk_codepoint_t x, y; + + if (++lex_ctx->token_count >= lex_ctx->token_limit) { + goto fail_token_limit; + } + + duk_memzero(out_token, sizeof(*out_token)); + + x = DUK__L0(); + y = DUK__L1(); + + DUK_DDD(DUK_DDDPRINT("parsing regexp token, L0=%ld, L1=%ld", (long) x, (long) y)); + + switch (x) { + case DUK_ASC_PIPE: { + advtok = DUK__ADVTOK(1, DUK_RETOK_DISJUNCTION); + break; + } + case DUK_ASC_CARET: { + advtok = DUK__ADVTOK(1, DUK_RETOK_ASSERT_START); + break; + } + case DUK_ASC_DOLLAR: { + advtok = DUK__ADVTOK(1, DUK_RETOK_ASSERT_END); + break; + } + case DUK_ASC_QUESTION: { + out_token->qmin = 0; + out_token->qmax = 1; + if (y == DUK_ASC_QUESTION) { + advtok = DUK__ADVTOK(2, DUK_RETOK_QUANTIFIER); + out_token->greedy = 0; + } else { + advtok = DUK__ADVTOK(1, DUK_RETOK_QUANTIFIER); + out_token->greedy = 1; + } + break; + } + case DUK_ASC_STAR: { + out_token->qmin = 0; + out_token->qmax = DUK_RE_QUANTIFIER_INFINITE; + if (y == DUK_ASC_QUESTION) { + advtok = DUK__ADVTOK(2, DUK_RETOK_QUANTIFIER); + out_token->greedy = 0; + } else { + advtok = DUK__ADVTOK(1, DUK_RETOK_QUANTIFIER); + out_token->greedy = 1; + } + break; + } + case DUK_ASC_PLUS: { + out_token->qmin = 1; + out_token->qmax = DUK_RE_QUANTIFIER_INFINITE; + if (y == DUK_ASC_QUESTION) { + advtok = DUK__ADVTOK(2, DUK_RETOK_QUANTIFIER); + out_token->greedy = 0; + } else { + advtok = DUK__ADVTOK(1, DUK_RETOK_QUANTIFIER); + out_token->greedy = 1; + } + break; + } + case DUK_ASC_LCURLY: { + /* Production allows 'DecimalDigits', including leading zeroes */ + duk_uint32_t val1 = 0; + duk_uint32_t val2 = DUK_RE_QUANTIFIER_INFINITE; + duk_small_int_t digits = 0; +#if defined(DUK_USE_ES6_REGEXP_SYNTAX) + duk_lexer_point lex_pt; +#endif + +#if defined(DUK_USE_ES6_REGEXP_SYNTAX) + /* Store lexer position, restoring if quantifier is invalid. */ + DUK_LEXER_GETPOINT(lex_ctx, &lex_pt); +#endif + + for (;;) { + DUK__ADVANCECHARS(lex_ctx, 1); /* eat '{' on entry */ + x = DUK__L0(); + if (DUK__ISDIGIT(x)) { + digits++; + val1 = val1 * 10 + (duk_uint32_t) duk__hexval(x); + } else if (x == DUK_ASC_COMMA) { + if (digits > DUK__MAX_RE_QUANT_DIGITS) { + goto invalid_quantifier; + } + if (val2 != DUK_RE_QUANTIFIER_INFINITE) { + goto invalid_quantifier; + } + if (DUK__L1() == DUK_ASC_RCURLY) { + /* form: { DecimalDigits , }, val1 = min count */ + if (digits == 0) { + goto invalid_quantifier; + } + out_token->qmin = val1; + out_token->qmax = DUK_RE_QUANTIFIER_INFINITE; + DUK__ADVANCECHARS(lex_ctx, 2); + break; + } + val2 = val1; + val1 = 0; + digits = 0; /* not strictly necessary because of lookahead '}' above */ + } else if (x == DUK_ASC_RCURLY) { + if (digits > DUK__MAX_RE_QUANT_DIGITS) { + goto invalid_quantifier; + } + if (digits == 0) { + goto invalid_quantifier; + } + if (val2 != DUK_RE_QUANTIFIER_INFINITE) { + /* val2 = min count, val1 = max count */ + out_token->qmin = val2; + out_token->qmax = val1; + } else { + /* val1 = count */ + out_token->qmin = val1; + out_token->qmax = val1; + } + DUK__ADVANCECHARS(lex_ctx, 1); + break; + } else { + goto invalid_quantifier; + } + } + if (DUK__L0() == DUK_ASC_QUESTION) { + out_token->greedy = 0; + DUK__ADVANCECHARS(lex_ctx, 1); + } else { + out_token->greedy = 1; + } + advtok = DUK__ADVTOK(0, DUK_RETOK_QUANTIFIER); + break; + invalid_quantifier: +#if defined(DUK_USE_ES6_REGEXP_SYNTAX) + /* Failed to match the quantifier, restore lexer and parse + * opening brace as a literal. + */ + DUK_LEXER_SETPOINT(lex_ctx, &lex_pt); + advtok = DUK__ADVTOK(1, DUK_RETOK_ATOM_CHAR); + out_token->num = DUK_ASC_LCURLY; +#else + goto fail_quantifier; +#endif + break; + } + case DUK_ASC_PERIOD: { + advtok = DUK__ADVTOK(1, DUK_RETOK_ATOM_PERIOD); + break; + } + case DUK_ASC_BACKSLASH: { + /* The E5.1 specification does not seem to allow IdentifierPart characters + * to be used as identity escapes. Unfortunately this includes '$', which + * cannot be escaped as '\$'; it needs to be escaped e.g. as '\u0024'. + * Many other implementations (including V8 and Rhino, for instance) do + * accept '\$' as a valid identity escape, which is quite pragmatic, and + * ES2015 Annex B relaxes the rules to allow these (and other) real world forms. + */ + + advtok = DUK__ADVTOK(2, DUK_RETOK_ATOM_CHAR); /* default: char escape (two chars) */ + if (y == DUK_ASC_LC_B) { + advtok = DUK__ADVTOK(2, DUK_RETOK_ASSERT_WORD_BOUNDARY); + } else if (y == DUK_ASC_UC_B) { + advtok = DUK__ADVTOK(2, DUK_RETOK_ASSERT_NOT_WORD_BOUNDARY); + } else if (y == DUK_ASC_LC_F) { + out_token->num = 0x000c; + } else if (y == DUK_ASC_LC_N) { + out_token->num = 0x000a; + } else if (y == DUK_ASC_LC_T) { + out_token->num = 0x0009; + } else if (y == DUK_ASC_LC_R) { + out_token->num = 0x000d; + } else if (y == DUK_ASC_LC_V) { + out_token->num = 0x000b; + } else if (y == DUK_ASC_LC_C) { + x = DUK__L2(); + if ((x >= DUK_ASC_LC_A && x <= DUK_ASC_LC_Z) || (x >= DUK_ASC_UC_A && x <= DUK_ASC_UC_Z)) { + out_token->num = (duk_uint32_t) (x % 32); + advtok = DUK__ADVTOK(3, DUK_RETOK_ATOM_CHAR); + } else { + goto fail_escape; + } + } else if (y == DUK_ASC_LC_X || y == DUK_ASC_LC_U) { + /* The token value is the Unicode codepoint without + * it being decode into surrogate pair characters + * here. The \u{H+} is only allowed in Unicode mode + * which we don't support yet. + */ + out_token->num = (duk_uint32_t) duk__lexer_parse_escape(lex_ctx, 0 /*allow_es6*/); + advtok = DUK__ADVTOK(0, DUK_RETOK_ATOM_CHAR); + } else if (y == DUK_ASC_LC_D) { + advtok = DUK__ADVTOK(2, DUK_RETOK_ATOM_DIGIT); + } else if (y == DUK_ASC_UC_D) { + advtok = DUK__ADVTOK(2, DUK_RETOK_ATOM_NOT_DIGIT); + } else if (y == DUK_ASC_LC_S) { + advtok = DUK__ADVTOK(2, DUK_RETOK_ATOM_WHITE); + } else if (y == DUK_ASC_UC_S) { + advtok = DUK__ADVTOK(2, DUK_RETOK_ATOM_NOT_WHITE); + } else if (y == DUK_ASC_LC_W) { + advtok = DUK__ADVTOK(2, DUK_RETOK_ATOM_WORD_CHAR); + } else if (y == DUK_ASC_UC_W) { + advtok = DUK__ADVTOK(2, DUK_RETOK_ATOM_NOT_WORD_CHAR); + } else if (DUK__ISDIGIT(y)) { + /* E5 Section 15.10.2.11 */ + if (y == DUK_ASC_0) { + if (DUK__ISDIGIT(DUK__L2())) { + goto fail_escape; + } + out_token->num = 0x0000; + advtok = DUK__ADVTOK(2, DUK_RETOK_ATOM_CHAR); + } else { + /* XXX: shared parsing? */ + duk_uint32_t val = 0; + duk_small_int_t i; + for (i = 0;; i++) { + if (i >= DUK__MAX_RE_DECESC_DIGITS) { + goto fail_escape; + } + DUK__ADVANCECHARS(lex_ctx, 1); /* eat backslash on entry */ + x = DUK__L0(); + if (!DUK__ISDIGIT(x)) { + break; + } + val = val * 10 + (duk_uint32_t) duk__hexval(x); + } + /* DUK__L0() cannot be a digit, because the loop doesn't terminate if it is */ + advtok = DUK__ADVTOK(0, DUK_RETOK_ATOM_BACKREFERENCE); + out_token->num = val; + } +#if defined(DUK_USE_ES6_REGEXP_SYNTAX) + } else if (y >= 0) { + /* For ES2015 Annex B, accept any source character as identity + * escape except 'c' which is used for control characters. + * http://www.ecma-international.org/ecma-262/6.0/#sec-regular-expressions-patterns + * Careful not to match end-of-buffer (<0) here. + * This is not yet full ES2015 Annex B because cases above + * (like hex escape) won't backtrack. + */ + DUK_ASSERT(y != DUK_ASC_LC_C); /* covered above */ +#else /* DUK_USE_ES6_REGEXP_SYNTAX */ + } else if ((y >= 0 && !duk_unicode_is_identifier_part(y)) || y == DUK_UNICODE_CP_ZWNJ || y == DUK_UNICODE_CP_ZWJ) { + /* For ES5.1 identity escapes are not allowed for identifier + * parts. This conflicts with a lot of real world code as this + * doesn't e.g. allow escaping a dollar sign as /\$/, see + * test-regexp-identity-escape-dollar.js. + */ +#endif /* DUK_USE_ES6_REGEXP_SYNTAX */ + out_token->num = (duk_uint32_t) y; + } else { + goto fail_escape; + } + break; + } + case DUK_ASC_LPAREN: { + /* XXX: naming is inconsistent: ATOM_END_GROUP ends an ASSERT_START_LOOKAHEAD */ + + if (y == DUK_ASC_QUESTION) { + if (DUK__L2() == DUK_ASC_EQUALS) { + /* (?= */ + advtok = DUK__ADVTOK(3, DUK_RETOK_ASSERT_START_POS_LOOKAHEAD); + } else if (DUK__L2() == DUK_ASC_EXCLAMATION) { + /* (?! */ + advtok = DUK__ADVTOK(3, DUK_RETOK_ASSERT_START_NEG_LOOKAHEAD); + } else if (DUK__L2() == DUK_ASC_COLON) { + /* (?: */ + advtok = DUK__ADVTOK(3, DUK_RETOK_ATOM_START_NONCAPTURE_GROUP); + } else { + goto fail_group; + } + } else { + /* ( */ + advtok = DUK__ADVTOK(1, DUK_RETOK_ATOM_START_CAPTURE_GROUP); + } + break; + } + case DUK_ASC_RPAREN: { + advtok = DUK__ADVTOK(1, DUK_RETOK_ATOM_END_GROUP); + break; + } + case DUK_ASC_LBRACKET: { + /* + * To avoid creating a heavy intermediate value for the list of ranges, + * only the start token ('[' or '[^') is parsed here. The regexp + * compiler parses the ranges itself. + */ + + /* XXX: with DUK_USE_ES6_REGEXP_SYNTAX we should allow left bracket + * literal too, but it's not easy to parse without backtracking. + */ + + advtok = DUK__ADVTOK(1, DUK_RETOK_ATOM_START_CHARCLASS); + if (y == DUK_ASC_CARET) { + advtok = DUK__ADVTOK(2, DUK_RETOK_ATOM_START_CHARCLASS_INVERTED); + } + break; + } +#if !defined(DUK_USE_ES6_REGEXP_SYNTAX) + case DUK_ASC_RCURLY: + case DUK_ASC_RBRACKET: { + /* Although these could be parsed as PatternCharacters unambiguously (here), + * E5 Section 15.10.1 grammar explicitly forbids these as PatternCharacters. + */ + goto fail_invalid_char; + break; + } +#endif + case -1: { + /* EOF */ + advtok = DUK__ADVTOK(0, DUK_TOK_EOF); + break; + } + default: { + /* PatternCharacter, all excluded characters are matched by cases above */ + advtok = DUK__ADVTOK(1, DUK_RETOK_ATOM_CHAR); + out_token->num = (duk_uint32_t) x; + break; + } + } + + /* + * Shared exit path + */ + + DUK__ADVANCEBYTES(lex_ctx, advtok >> 8); + out_token->t = advtok & 0xff; + return; + +fail_token_limit: + DUK_ERROR_RANGE(lex_ctx->thr, DUK_STR_TOKEN_LIMIT); + DUK_WO_NORETURN(return;); + +fail_escape: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_REGEXP_ESCAPE); + DUK_WO_NORETURN(return;); + +fail_group: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_REGEXP_GROUP); + DUK_WO_NORETURN(return;); + +#if !defined(DUK_USE_ES6_REGEXP_SYNTAX) +fail_invalid_char: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_REGEXP_CHARACTER); + DUK_WO_NORETURN(return;); + +fail_quantifier: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_QUANTIFIER); + DUK_WO_NORETURN(return;); +#endif +} + +/* + * Special parser for character classes; calls callback for every + * range parsed and returns the number of ranges present. + */ + +/* XXX: this duplicates functionality in duk_regexp.c where a similar loop is + * required anyway. We could use that BUT we need to update the regexp compiler + * 'nranges' too. Work this out a bit more cleanly to save space. + */ + +/* XXX: the handling of character range detection is a bit convoluted. + * Try to simplify and make smaller. + */ + +/* XXX: logic for handling character ranges is now incorrect, it will accept + * e.g. [\d-z] whereas it should croak from it? SMJS accepts this too, though. + * + * Needs a read through and a lot of additional tests. + */ + +DUK_LOCAL +void duk__emit_u16_direct_ranges(duk_lexer_ctx *lex_ctx, + duk_re_range_callback gen_range, + void *userdata, + const duk_uint16_t *ranges, + duk_small_int_t num) { + const duk_uint16_t *ranges_end; + + DUK_UNREF(lex_ctx); + + ranges_end = ranges + num; + while (ranges < ranges_end) { + /* mark range 'direct', bypass canonicalization (see Wiki) */ + gen_range(userdata, (duk_codepoint_t) ranges[0], (duk_codepoint_t) ranges[1], 1); + ranges += 2; + } +} + +DUK_INTERNAL void duk_lexer_parse_re_ranges(duk_lexer_ctx *lex_ctx, duk_re_range_callback gen_range, void *userdata) { + duk_codepoint_t start = -1; + duk_codepoint_t ch; + duk_codepoint_t x; + duk_bool_t dash = 0; + duk_small_uint_t adv = 0; + + DUK_DD(DUK_DDPRINT("parsing regexp ranges")); + + for (;;) { + DUK__ADVANCECHARS(lex_ctx, adv); + adv = 1; + + x = DUK__L0(); + + ch = -1; /* not strictly necessary, but avoids "uninitialized variable" warnings */ + DUK_UNREF(ch); + + if (x < 0) { + goto fail_unterm_charclass; + } else if (x == DUK_ASC_RBRACKET) { + if (start >= 0) { + gen_range(userdata, start, start, 0); + } + DUK__ADVANCECHARS(lex_ctx, 1); /* eat ']' before finishing */ + break; + } else if (x == DUK_ASC_MINUS) { + if (start >= 0 && !dash && DUK__L1() != DUK_ASC_RBRACKET) { + /* '-' as a range indicator */ + dash = 1; + continue; + } else { + /* '-' verbatim */ + ch = x; + } + } else if (x == DUK_ASC_BACKSLASH) { + /* + * The escapes are same as outside a character class, except that \b has a + * different meaning, and \B and backreferences are prohibited (see E5 + * Section 15.10.2.19). However, it's difficult to share code because we + * handle e.g. "\n" very differently: here we generate a single character + * range for it. + */ + + /* XXX: ES2015 surrogate pair handling. */ + + x = DUK__L1(); + + adv = 2; + + if (x == DUK_ASC_LC_B) { + /* Note: '\b' in char class is different than outside (assertion), + * '\B' is not allowed and is caught by the duk_unicode_is_identifier_part() + * check below. + */ + ch = 0x0008; + } else if (x == DUK_ASC_LC_F) { + ch = 0x000c; + } else if (x == DUK_ASC_LC_N) { + ch = 0x000a; + } else if (x == DUK_ASC_LC_T) { + ch = 0x0009; + } else if (x == DUK_ASC_LC_R) { + ch = 0x000d; + } else if (x == DUK_ASC_LC_V) { + ch = 0x000b; + } else if (x == DUK_ASC_LC_C) { + x = DUK__L2(); + adv = 3; + if ((x >= DUK_ASC_LC_A && x <= DUK_ASC_LC_Z) || (x >= DUK_ASC_UC_A && x <= DUK_ASC_UC_Z)) { + ch = (x % 32); + } else { + goto fail_escape; + } + } else if (x == DUK_ASC_LC_X || x == DUK_ASC_LC_U) { + /* The \u{H+} form is only allowed in Unicode mode which + * we don't support yet. + */ + ch = duk__lexer_parse_escape(lex_ctx, 0 /*allow_es6*/); + adv = 0; + } else if (x == DUK_ASC_LC_D) { + duk__emit_u16_direct_ranges(lex_ctx, + gen_range, + userdata, + duk_unicode_re_ranges_digit, + sizeof(duk_unicode_re_ranges_digit) / sizeof(duk_uint16_t)); + ch = -1; + } else if (x == DUK_ASC_UC_D) { + duk__emit_u16_direct_ranges(lex_ctx, + gen_range, + userdata, + duk_unicode_re_ranges_not_digit, + sizeof(duk_unicode_re_ranges_not_digit) / sizeof(duk_uint16_t)); + ch = -1; + } else if (x == DUK_ASC_LC_S) { + duk__emit_u16_direct_ranges(lex_ctx, + gen_range, + userdata, + duk_unicode_re_ranges_white, + sizeof(duk_unicode_re_ranges_white) / sizeof(duk_uint16_t)); + ch = -1; + } else if (x == DUK_ASC_UC_S) { + duk__emit_u16_direct_ranges(lex_ctx, + gen_range, + userdata, + duk_unicode_re_ranges_not_white, + sizeof(duk_unicode_re_ranges_not_white) / sizeof(duk_uint16_t)); + ch = -1; + } else if (x == DUK_ASC_LC_W) { + duk__emit_u16_direct_ranges(lex_ctx, + gen_range, + userdata, + duk_unicode_re_ranges_wordchar, + sizeof(duk_unicode_re_ranges_wordchar) / sizeof(duk_uint16_t)); + ch = -1; + } else if (x == DUK_ASC_UC_W) { + duk__emit_u16_direct_ranges(lex_ctx, + gen_range, + userdata, + duk_unicode_re_ranges_not_wordchar, + sizeof(duk_unicode_re_ranges_not_wordchar) / sizeof(duk_uint16_t)); + ch = -1; + } else if (DUK__ISDIGIT(x)) { + /* DecimalEscape, only \0 is allowed, no leading + * zeroes are allowed. + * + * ES2015 Annex B also allows (maximal match) legacy + * octal escapes up to \377 and \8 and \9 are + * accepted as literal '8' and '9', also in strict mode. + */ + +#if defined(DUK_USE_ES6_REGEXP_SYNTAX) + ch = duk__lexer_parse_legacy_octal(lex_ctx, &adv, 0 /*reject_annex_b*/); + DUK_ASSERT(ch >= 0); /* no rejections */ +#else + if (x == DUK_ASC_0 && !DUK__ISDIGIT(DUK__L2())) { + ch = 0x0000; + } else { + goto fail_escape; + } +#endif +#if defined(DUK_USE_ES6_REGEXP_SYNTAX) + } else if (x >= 0) { + /* IdentityEscape: ES2015 Annex B allows almost all + * source characters here. Match anything except + * EOF here. + */ + ch = x; +#else /* DUK_USE_ES6_REGEXP_SYNTAX */ + } else if (!duk_unicode_is_identifier_part(x)) { + /* IdentityEscape: ES5.1 doesn't allow identity escape + * for identifier part characters, which conflicts with + * some real world code. For example, it doesn't allow + * /[\$]/ which is awkward. + */ + ch = x; +#endif /* DUK_USE_ES6_REGEXP_SYNTAX */ + } else { + goto fail_escape; + } + } else { + /* character represents itself */ + ch = x; + } + + /* ch is a literal character here or -1 if parsed entity was + * an escape such as "\s". + */ + + if (ch < 0) { + /* multi-character sets not allowed as part of ranges, see + * E5 Section 15.10.2.15, abstract operation CharacterRange. + */ + if (start >= 0) { + if (dash) { + goto fail_range; + } else { + gen_range(userdata, start, start, 0); + start = -1; + /* dash is already 0 */ + } + } + } else { + if (start >= 0) { + if (dash) { + if (start > ch) { + goto fail_range; + } + gen_range(userdata, start, ch, 0); + start = -1; + dash = 0; + } else { + gen_range(userdata, start, start, 0); + start = ch; + /* dash is already 0 */ + } + } else { + start = ch; + } + } + } + + return; + +fail_escape: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_REGEXP_ESCAPE); + DUK_WO_NORETURN(return;); + +fail_range: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_INVALID_RANGE); + DUK_WO_NORETURN(return;); + +fail_unterm_charclass: + DUK_ERROR_SYNTAX(lex_ctx->thr, DUK_STR_UNTERMINATED_CHARCLASS); + DUK_WO_NORETURN(return;); +} + +#endif /* DUK_USE_REGEXP_SUPPORT */ + +/* automatic undefs */ +#undef DUK__ADVANCEBYTES +#undef DUK__ADVANCECHARS +#undef DUK__ADVTOK +#undef DUK__APPENDBUFFER +#undef DUK__APPENDBUFFER_ASCII +#undef DUK__INITBUFFER +#undef DUK__ISDIGIT +#undef DUK__ISDIGIT03 +#undef DUK__ISDIGIT47 +#undef DUK__ISHEXDIGIT +#undef DUK__ISOCTDIGIT +#undef DUK__L0 +#undef DUK__L1 +#undef DUK__L2 +#undef DUK__L3 +#undef DUK__L4 +#undef DUK__L5 +#undef DUK__LOOKUP +#undef DUK__MAX_RE_DECESC_DIGITS +#undef DUK__MAX_RE_QUANT_DIGITS +#line 1 "duk_numconv.c" +/* + * Number-to-string and string-to-number conversions. + * + * Slow path number-to-string and string-to-number conversion is based on + * a Dragon4 variant, with fast paths for small integers. Big integer + * arithmetic is needed for guaranteeing that the conversion is correct + * and uses a minimum number of digits. The big number arithmetic has a + * fixed maximum size and does not require dynamic allocations. + * + * See: doc/number-conversion.rst. + */ + +/* #include duk_internal.h -> already included */ + +#define DUK__IEEE_DOUBLE_EXP_BIAS 1023 +#define DUK__IEEE_DOUBLE_EXP_MIN (-1022) /* biased exp == 0 -> denormal, exp -1022 */ + +#define DUK__DIGITCHAR(x) duk_lc_digits[(x)] + +/* + * Tables generated with util/gennumdigits.py. + * + * duk__str2num_digits_for_radix indicates, for each radix, how many input + * digits should be considered significant for string-to-number conversion. + * The input is also padded to this many digits to give the Dragon4 + * conversion enough (apparent) precision to work with. + * + * duk__str2num_exp_limits indicates, for each radix, the radix-specific + * minimum/maximum exponent values (for a Dragon4 integer mantissa) + * below and above which the number is guaranteed to underflow to zero + * or overflow to Infinity. This allows parsing to keep bigint values + * bounded. + */ + +DUK_LOCAL const duk_uint8_t duk__str2num_digits_for_radix[] = { + 69, 44, 35, 30, 27, 25, 23, 22, 20, 20, /* 2 to 11 */ + 20, 19, 19, 18, 18, 17, 17, 17, 16, 16, /* 12 to 21 */ + 16, 16, 16, 15, 15, 15, 15, 15, 15, 14, /* 22 to 31 */ + 14, 14, 14, 14, 14 /* 31 to 36 */ +}; + +typedef struct { + duk_int16_t upper; + duk_int16_t lower; +} duk__exp_limits; + +DUK_LOCAL const duk__exp_limits duk__str2num_exp_limits[] = { + { 957, -1147 }, { 605, -725 }, { 479, -575 }, { 414, -496 }, { 372, -446 }, { 342, -411 }, { 321, -384 }, + { 304, -364 }, { 291, -346 }, { 279, -334 }, { 268, -323 }, { 260, -312 }, { 252, -304 }, { 247, -296 }, + { 240, -289 }, { 236, -283 }, { 231, -278 }, { 227, -273 }, { 223, -267 }, { 220, -263 }, { 216, -260 }, + { 213, -256 }, { 210, -253 }, { 208, -249 }, { 205, -246 }, { 203, -244 }, { 201, -241 }, { 198, -239 }, + { 196, -237 }, { 195, -234 }, { 193, -232 }, { 191, -230 }, { 190, -228 }, { 188, -226 }, { 187, -225 }, +}; + +/* + * Limited functionality bigint implementation. + * + * Restricted to non-negative numbers with less than 32 * DUK__BI_MAX_PARTS bits, + * with the caller responsible for ensuring this is never exceeded. No memory + * allocation (except stack) is needed for bigint computation. Operations + * have been tailored for number conversion needs. + * + * Argument order is "assignment order", i.e. target first, then arguments: + * x <- y * z --> duk__bi_mul(x, y, z); + */ + +/* This upper value has been experimentally determined; debug build will check + * bigint size with assertions. + */ +#define DUK__BI_MAX_PARTS 37 /* 37x32 = 1184 bits */ + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) +#define DUK__BI_PRINT(name, x) duk__bi_print((name), (x)) +#else +#define DUK__BI_PRINT(name, x) +#endif + +/* Current size is about 152 bytes. */ +typedef struct { + duk_small_int_t n; + duk_uint32_t v[DUK__BI_MAX_PARTS]; /* low to high */ +} duk__bigint; + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) +DUK_LOCAL void duk__bi_print(const char *name, duk__bigint *x) { + /* Overestimate required size; debug code so not critical to be tight. */ + char buf[DUK__BI_MAX_PARTS * 9 + 64]; + char *p = buf; + duk_small_int_t i; + + /* No NUL term checks in this debug code. */ + p += DUK_SPRINTF(p, "%p n=%ld", (void *) x, (long) x->n); + if (x->n == 0) { + p += DUK_SPRINTF(p, " 0"); + } + for (i = x->n - 1; i >= 0; i--) { + p += DUK_SPRINTF(p, " %08lx", (unsigned long) x->v[i]); + } + + DUK_DDD(DUK_DDDPRINT("%s: %s", (const char *) name, (const char *) buf)); +} +#endif + +#if defined(DUK_USE_ASSERTIONS) +DUK_LOCAL duk_small_int_t duk__bi_is_valid(duk__bigint *x) { + return (duk_small_int_t) (((x->n >= 0) && (x->n <= DUK__BI_MAX_PARTS)) /* is valid size */ && + ((x->n == 0) || (x->v[x->n - 1] != 0)) /* is normalized */); +} +#endif + +DUK_LOCAL void duk__bi_normalize(duk__bigint *x) { + duk_small_int_t i; + + for (i = x->n - 1; i >= 0; i--) { + if (x->v[i] != 0) { + break; + } + } + + /* Note: if 'x' is zero, x->n becomes 0 here */ + x->n = i + 1; + DUK_ASSERT(duk__bi_is_valid(x)); +} + +/* x <- y */ +DUK_LOCAL void duk__bi_copy(duk__bigint *x, duk__bigint *y) { + duk_small_int_t n; + + n = y->n; + x->n = n; + /* No need to special case n == 0. */ + duk_memcpy((void *) x->v, (const void *) y->v, (size_t) (sizeof(duk_uint32_t) * (size_t) n)); +} + +DUK_LOCAL void duk__bi_set_small(duk__bigint *x, duk_uint32_t v) { + if (v == 0U) { + x->n = 0; + } else { + x->n = 1; + x->v[0] = v; + } + DUK_ASSERT(duk__bi_is_valid(x)); +} + +/* Return value: <0 <=> x < y + * 0 <=> x == y + * >0 <=> x > y + */ +DUK_LOCAL int duk__bi_compare(duk__bigint *x, duk__bigint *y) { + duk_small_int_t i, nx, ny; + duk_uint32_t tx, ty; + + DUK_ASSERT(duk__bi_is_valid(x)); + DUK_ASSERT(duk__bi_is_valid(y)); + + nx = x->n; + ny = y->n; + if (nx > ny) { + goto ret_gt; + } + if (nx < ny) { + goto ret_lt; + } + for (i = nx - 1; i >= 0; i--) { + tx = x->v[i]; + ty = y->v[i]; + + if (tx > ty) { + goto ret_gt; + } + if (tx < ty) { + goto ret_lt; + } + } + + return 0; + +ret_gt: + return 1; + +ret_lt: + return -1; +} + +/* x <- y + z */ +#if defined(DUK_USE_64BIT_OPS) +DUK_LOCAL void duk__bi_add(duk__bigint *x, duk__bigint *y, duk__bigint *z) { + duk_uint64_t tmp; + duk_small_int_t i, ny, nz; + + DUK_ASSERT(duk__bi_is_valid(y)); + DUK_ASSERT(duk__bi_is_valid(z)); + + if (z->n > y->n) { + duk__bigint *t; + t = y; + y = z; + z = t; + } + DUK_ASSERT(y->n >= z->n); + + ny = y->n; + nz = z->n; + tmp = 0U; + for (i = 0; i < ny; i++) { + DUK_ASSERT(i < DUK__BI_MAX_PARTS); + tmp += y->v[i]; + if (i < nz) { + tmp += z->v[i]; + } + x->v[i] = (duk_uint32_t) (tmp & 0xffffffffUL); + tmp = tmp >> 32; + } + if (tmp != 0U) { + DUK_ASSERT(i < DUK__BI_MAX_PARTS); + x->v[i++] = (duk_uint32_t) tmp; + } + x->n = i; + DUK_ASSERT(x->n <= DUK__BI_MAX_PARTS); + + /* no need to normalize */ + DUK_ASSERT(duk__bi_is_valid(x)); +} +#else /* DUK_USE_64BIT_OPS */ +DUK_LOCAL void duk__bi_add(duk__bigint *x, duk__bigint *y, duk__bigint *z) { + duk_uint32_t carry, tmp1, tmp2; + duk_small_int_t i, ny, nz; + + DUK_ASSERT(duk__bi_is_valid(y)); + DUK_ASSERT(duk__bi_is_valid(z)); + + if (z->n > y->n) { + duk__bigint *t; + t = y; + y = z; + z = t; + } + DUK_ASSERT(y->n >= z->n); + + ny = y->n; + nz = z->n; + carry = 0U; + for (i = 0; i < ny; i++) { + /* Carry is detected based on wrapping which relies on exact 32-bit + * types. + */ + DUK_ASSERT(i < DUK__BI_MAX_PARTS); + tmp1 = y->v[i]; + tmp2 = tmp1; + if (i < nz) { + tmp2 += z->v[i]; + } + + /* Careful with carry condition: + * - If carry not added: 0x12345678 + 0 + 0xffffffff = 0x12345677 (< 0x12345678) + * - If carry added: 0x12345678 + 1 + 0xffffffff = 0x12345678 (== 0x12345678) + */ + if (carry) { + tmp2++; + carry = (tmp2 <= tmp1 ? 1U : 0U); + } else { + carry = (tmp2 < tmp1 ? 1U : 0U); + } + + x->v[i] = tmp2; + } + if (carry) { + DUK_ASSERT(i < DUK__BI_MAX_PARTS); + DUK_ASSERT(carry == 1U); + x->v[i++] = carry; + } + x->n = i; + DUK_ASSERT(x->n <= DUK__BI_MAX_PARTS); + + /* no need to normalize */ + DUK_ASSERT(duk__bi_is_valid(x)); +} +#endif /* DUK_USE_64BIT_OPS */ + +/* x <- y + z */ +DUK_LOCAL void duk__bi_add_small(duk__bigint *x, duk__bigint *y, duk_uint32_t z) { + duk__bigint tmp; + + DUK_ASSERT(duk__bi_is_valid(y)); + + /* XXX: this could be optimized; there is only one call site now though */ + duk__bi_set_small(&tmp, z); + duk__bi_add(x, y, &tmp); + + DUK_ASSERT(duk__bi_is_valid(x)); +} + +#if 0 /* unused */ +/* x <- x + y, use t as temp */ +DUK_LOCAL void duk__bi_add_copy(duk__bigint *x, duk__bigint *y, duk__bigint *t) { + duk__bi_add(t, x, y); + duk__bi_copy(x, t); +} +#endif + +/* x <- y - z, require x >= y => z >= 0, i.e. y >= z */ +#if defined(DUK_USE_64BIT_OPS) +DUK_LOCAL void duk__bi_sub(duk__bigint *x, duk__bigint *y, duk__bigint *z) { + duk_small_int_t i, ny, nz; + duk_uint32_t ty, tz; + duk_int64_t tmp; + + DUK_ASSERT(duk__bi_is_valid(y)); + DUK_ASSERT(duk__bi_is_valid(z)); + DUK_ASSERT(duk__bi_compare(y, z) >= 0); + DUK_ASSERT(y->n >= z->n); + + ny = y->n; + nz = z->n; + tmp = 0; + for (i = 0; i < ny; i++) { + ty = y->v[i]; + if (i < nz) { + tz = z->v[i]; + } else { + tz = 0; + } + tmp = (duk_int64_t) ty - (duk_int64_t) tz + tmp; + x->v[i] = (duk_uint32_t) ((duk_uint64_t) tmp & 0xffffffffUL); + tmp = tmp >> 32; /* 0 or -1 */ + } + DUK_ASSERT(tmp == 0); + + x->n = i; + duk__bi_normalize(x); /* need to normalize, may even cancel to 0 */ + DUK_ASSERT(duk__bi_is_valid(x)); +} +#else +DUK_LOCAL void duk__bi_sub(duk__bigint *x, duk__bigint *y, duk__bigint *z) { + duk_small_int_t i, ny, nz; + duk_uint32_t tmp1, tmp2, borrow; + + DUK_ASSERT(duk__bi_is_valid(y)); + DUK_ASSERT(duk__bi_is_valid(z)); + DUK_ASSERT(duk__bi_compare(y, z) >= 0); + DUK_ASSERT(y->n >= z->n); + + ny = y->n; + nz = z->n; + borrow = 0U; + for (i = 0; i < ny; i++) { + /* Borrow is detected based on wrapping which relies on exact 32-bit + * types. + */ + tmp1 = y->v[i]; + tmp2 = tmp1; + if (i < nz) { + tmp2 -= z->v[i]; + } + + /* Careful with borrow condition: + * - If borrow not subtracted: 0x12345678 - 0 - 0xffffffff = 0x12345679 (> 0x12345678) + * - If borrow subtracted: 0x12345678 - 1 - 0xffffffff = 0x12345678 (== 0x12345678) + */ + if (borrow) { + tmp2--; + borrow = (tmp2 >= tmp1 ? 1U : 0U); + } else { + borrow = (tmp2 > tmp1 ? 1U : 0U); + } + + x->v[i] = tmp2; + } + DUK_ASSERT(borrow == 0U); + + x->n = i; + duk__bi_normalize(x); /* need to normalize, may even cancel to 0 */ + DUK_ASSERT(duk__bi_is_valid(x)); +} +#endif + +#if 0 /* unused */ +/* x <- y - z */ +DUK_LOCAL void duk__bi_sub_small(duk__bigint *x, duk__bigint *y, duk_uint32_t z) { + duk__bigint tmp; + + DUK_ASSERT(duk__bi_is_valid(y)); + + /* XXX: this could be optimized */ + duk__bi_set_small(&tmp, z); + duk__bi_sub(x, y, &tmp); + + DUK_ASSERT(duk__bi_is_valid(x)); +} +#endif + +/* x <- x - y, use t as temp */ +DUK_LOCAL void duk__bi_sub_copy(duk__bigint *x, duk__bigint *y, duk__bigint *t) { + duk__bi_sub(t, x, y); + duk__bi_copy(x, t); +} + +/* x <- y * z */ +DUK_LOCAL void duk__bi_mul(duk__bigint *x, duk__bigint *y, duk__bigint *z) { + duk_small_int_t i, j, nx, nz; + + DUK_ASSERT(duk__bi_is_valid(y)); + DUK_ASSERT(duk__bi_is_valid(z)); + + nx = y->n + z->n; /* max possible */ + DUK_ASSERT(nx <= DUK__BI_MAX_PARTS); + + if (nx == 0) { + /* Both inputs are zero; cases where only one is zero can go + * through main algorithm. + */ + x->n = 0; + return; + } + + duk_memzero((void *) x->v, (size_t) (sizeof(duk_uint32_t) * (size_t) nx)); + x->n = nx; + + nz = z->n; + for (i = 0; i < y->n; i++) { +#if defined(DUK_USE_64BIT_OPS) + duk_uint64_t tmp = 0U; + for (j = 0; j < nz; j++) { + tmp += (duk_uint64_t) y->v[i] * (duk_uint64_t) z->v[j] + x->v[i + j]; + x->v[i + j] = (duk_uint32_t) (tmp & 0xffffffffUL); + tmp = tmp >> 32; + } + if (tmp > 0) { + DUK_ASSERT(i + j < nx); + DUK_ASSERT(i + j < DUK__BI_MAX_PARTS); + DUK_ASSERT(x->v[i + j] == 0U); + x->v[i + j] = (duk_uint32_t) tmp; + } +#else + /* + * Multiply + add + carry for 32-bit components using only 16x16->32 + * multiplies and carry detection based on unsigned overflow. + * + * 1st mult, 32-bit: (A*2^16 + B) + * 2nd mult, 32-bit: (C*2^16 + D) + * 3rd add, 32-bit: E + * 4th add, 32-bit: F + * + * (AC*2^16 + B) * (C*2^16 + D) + E + F + * = AC*2^32 + AD*2^16 + BC*2^16 + BD + E + F + * = AC*2^32 + (AD + BC)*2^16 + (BD + E + F) + * = AC*2^32 + AD*2^16 + BC*2^16 + (BD + E + F) + */ + duk_uint32_t a, b, c, d, e, f; + duk_uint32_t r, s, t; + + a = y->v[i]; + b = a & 0xffffUL; + a = a >> 16; + + f = 0; + for (j = 0; j < nz; j++) { + c = z->v[j]; + d = c & 0xffffUL; + c = c >> 16; + e = x->v[i + j]; + + /* build result as: (r << 32) + s: start with (BD + E + F) */ + r = 0; + s = b * d; + + /* add E */ + t = s + e; + if (t < s) { + r++; + } /* carry */ + s = t; + + /* add F */ + t = s + f; + if (t < s) { + r++; + } /* carry */ + s = t; + + /* add BC*2^16 */ + t = b * c; + r += (t >> 16); + t = s + ((t & 0xffffUL) << 16); + if (t < s) { + r++; + } /* carry */ + s = t; + + /* add AD*2^16 */ + t = a * d; + r += (t >> 16); + t = s + ((t & 0xffffUL) << 16); + if (t < s) { + r++; + } /* carry */ + s = t; + + /* add AC*2^32 */ + t = a * c; + r += t; + + DUK_DDD(DUK_DDDPRINT("ab=%08lx cd=%08lx ef=%08lx -> rs=%08lx %08lx", + (unsigned long) y->v[i], + (unsigned long) z->v[j], + (unsigned long) x->v[i + j], + (unsigned long) r, + (unsigned long) s)); + + x->v[i + j] = s; + f = r; + } + if (f > 0U) { + DUK_ASSERT(i + j < nx); + DUK_ASSERT(i + j < DUK__BI_MAX_PARTS); + DUK_ASSERT(x->v[i + j] == 0U); + x->v[i + j] = (duk_uint32_t) f; + } +#endif /* DUK_USE_64BIT_OPS */ + } + + duk__bi_normalize(x); + DUK_ASSERT(duk__bi_is_valid(x)); +} + +/* x <- y * z */ +DUK_LOCAL void duk__bi_mul_small(duk__bigint *x, duk__bigint *y, duk_uint32_t z) { + duk__bigint tmp; + + DUK_ASSERT(duk__bi_is_valid(y)); + + /* XXX: this could be optimized */ + duk__bi_set_small(&tmp, z); + duk__bi_mul(x, y, &tmp); + + DUK_ASSERT(duk__bi_is_valid(x)); +} + +/* x <- x * y, use t as temp */ +DUK_LOCAL void duk__bi_mul_copy(duk__bigint *x, duk__bigint *y, duk__bigint *t) { + duk__bi_mul(t, x, y); + duk__bi_copy(x, t); +} + +/* x <- x * y, use t as temp */ +DUK_LOCAL void duk__bi_mul_small_copy(duk__bigint *x, duk_uint32_t y, duk__bigint *t) { + duk__bi_mul_small(t, x, y); + duk__bi_copy(x, t); +} + +DUK_LOCAL int duk__bi_is_even(duk__bigint *x) { + DUK_ASSERT(duk__bi_is_valid(x)); + return (x->n == 0) || ((x->v[0] & 0x01) == 0); +} + +DUK_LOCAL int duk__bi_is_zero(duk__bigint *x) { + DUK_ASSERT(duk__bi_is_valid(x)); + return (x->n == 0); /* this is the case for normalized numbers */ +} + +/* Bigint is 2^52. Used to detect normalized IEEE double mantissa values + * which are at the lowest edge (next floating point value downwards has + * a different exponent). The lowest mantissa has the form: + * + * 1000........000 (52 zeroes; only "hidden bit" is set) + */ +DUK_LOCAL duk_small_int_t duk__bi_is_2to52(duk__bigint *x) { + DUK_ASSERT(duk__bi_is_valid(x)); + return (duk_small_int_t) (x->n == 2) && (x->v[0] == 0U) && (x->v[1] == (1U << (52 - 32))); +} + +/* x <- (1< 0); + r = y % 32; + duk_memzero((void *) x->v, sizeof(duk_uint32_t) * (size_t) n); + x->n = n; + x->v[n - 1] = (((duk_uint32_t) 1) << r); +} + +/* x <- b^y; use t1 and t2 as temps */ +DUK_LOCAL void duk__bi_exp_small(duk__bigint *x, duk_small_int_t b, duk_small_int_t y, duk__bigint *t1, duk__bigint *t2) { + /* Fast path the binary case */ + + DUK_ASSERT(x != t1 && x != t2 && t1 != t2); /* distinct bignums, easy mistake to make */ + DUK_ASSERT(b >= 0); + DUK_ASSERT(y >= 0); + + if (b == 2) { + duk__bi_twoexp(x, y); + return; + } + + /* http://en.wikipedia.org/wiki/Exponentiation_by_squaring */ + + DUK_DDD(DUK_DDDPRINT("exp_small: b=%ld, y=%ld", (long) b, (long) y)); + + duk__bi_set_small(x, 1); + duk__bi_set_small(t1, (duk_uint32_t) b); + for (;;) { + /* Loop structure ensures that we don't compute t1^2 unnecessarily + * on the final round, as that might create a bignum exceeding the + * current DUK__BI_MAX_PARTS limit. + */ + if (y & 0x01) { + duk__bi_mul_copy(x, t1, t2); + } + y = y >> 1; + if (y == 0) { + break; + } + duk__bi_mul_copy(t1, t1, t2); + } + + DUK__BI_PRINT("exp_small result", x); +} + +/* + * A Dragon4 number-to-string variant, based on: + * + * Guy L. Steele Jr., Jon L. White: "How to Print Floating-Point Numbers + * Accurately" + * + * Robert G. Burger, R. Kent Dybvig: "Printing Floating-Point Numbers + * Quickly and Accurately" + * + * The current algorithm is based on Figure 1 of the Burger-Dybvig paper, + * i.e. the base implementation without logarithm estimation speedups + * (these would increase code footprint considerably). Fixed-format output + * does not follow the suggestions in the paper; instead, we generate an + * extra digit and round-with-carry. + * + * The same algorithm is used for number parsing (with b=10 and B=2) + * by generating one extra digit and doing rounding manually. + * + * See doc/number-conversion.rst for limitations. + */ + +/* Maximum number of digits generated. */ +#define DUK__MAX_OUTPUT_DIGITS 1040 /* (Number.MAX_VALUE).toString(2).length == 1024, + slack */ + +/* Maximum number of characters in formatted value. */ +#define DUK__MAX_FORMATTED_LENGTH 1040 /* (-Number.MAX_VALUE).toString(2).length == 1025, + slack */ + +/* Number and (minimum) size of bigints in the nc_ctx structure. */ +#define DUK__NUMCONV_CTX_NUM_BIGINTS 7 +#define DUK__NUMCONV_CTX_BIGINTS_SIZE (sizeof(duk__bigint) * DUK__NUMCONV_CTX_NUM_BIGINTS) + +typedef struct { + /* Currently about 7*152 = 1064 bytes. The space for these + * duk__bigints is used also as a temporary buffer for generating + * the final string. This is a bit awkard; a union would be + * more correct. + */ + duk__bigint f, r, s, mp, mm, t1, t2; + + duk_small_int_t is_s2n; /* if 1, doing a string-to-number; else doing a number-to-string */ + duk_small_int_t is_fixed; /* if 1, doing a fixed format output (not free format) */ + duk_small_int_t req_digits; /* requested number of output digits; 0 = free-format */ + duk_small_int_t abs_pos; /* digit position is absolute, not relative */ + duk_small_int_t e; /* exponent for 'f' */ + duk_small_int_t b; /* input radix */ + duk_small_int_t B; /* output radix */ + duk_small_int_t k; /* see algorithm */ + duk_small_int_t low_ok; /* see algorithm */ + duk_small_int_t high_ok; /* see algorithm */ + duk_small_int_t unequal_gaps; /* m+ != m- (very rarely) */ + + /* Buffer used for generated digits, values are in the range [0,B-1]. */ + duk_uint8_t digits[DUK__MAX_OUTPUT_DIGITS]; + duk_small_int_t count; /* digit count */ +} duk__numconv_stringify_ctx; + +/* Note: computes with 'idx' in assertions, so caller beware. + * 'idx' is preincremented, i.e. '1' on first call, because it + * is more convenient for the caller. + */ +#define DUK__DRAGON4_OUTPUT_PREINC(nc_ctx, preinc_idx, x) \ + do { \ + DUK_ASSERT((preinc_idx) -1 >= 0); \ + DUK_ASSERT((preinc_idx) -1 < DUK__MAX_OUTPUT_DIGITS); \ + ((nc_ctx)->digits[(preinc_idx) -1]) = (duk_uint8_t) (x); \ + } while (0) + +DUK_LOCAL duk_size_t duk__dragon4_format_uint32(duk_uint8_t *buf, duk_uint32_t x, duk_small_int_t radix) { + duk_uint8_t *p; + duk_size_t len; + duk_small_int_t dig; + duk_uint32_t t; + + DUK_ASSERT(buf != NULL); + DUK_ASSERT(radix >= 2 && radix <= 36); + + /* A 32-bit unsigned integer formats to at most 32 digits (the + * worst case happens with radix == 2). Output the digits backwards, + * and use a memmove() to get them in the right place. + */ + + p = buf + 32; + for (;;) { + t = x / (duk_uint32_t) radix; + dig = (duk_small_int_t) (x - t * (duk_uint32_t) radix); + x = t; + + DUK_ASSERT(dig >= 0 && dig < 36); + *(--p) = DUK__DIGITCHAR(dig); + + if (x == 0) { + break; + } + } + len = (duk_size_t) ((buf + 32) - p); + + duk_memmove((void *) buf, (const void *) p, (size_t) len); + + return len; +} + +DUK_LOCAL void duk__dragon4_prepare(duk__numconv_stringify_ctx *nc_ctx) { + duk_small_int_t lowest_mantissa; + +#if 1 + /* Assume IEEE round-to-even, so that shorter encoding can be used + * when round-to-even would produce correct result. By removing + * this check (and having low_ok == high_ok == 0) the results would + * still be accurate but in some cases longer than necessary. + */ + if (duk__bi_is_even(&nc_ctx->f)) { + DUK_DDD(DUK_DDDPRINT("f is even")); + nc_ctx->low_ok = 1; + nc_ctx->high_ok = 1; + } else { + DUK_DDD(DUK_DDDPRINT("f is odd")); + nc_ctx->low_ok = 0; + nc_ctx->high_ok = 0; + } +#else + /* Note: not honoring round-to-even should work but now generates incorrect + * results. For instance, 1e23 serializes to "a000...", i.e. the first digit + * equals the radix (10). Scaling stops one step too early in this case. + * Don't know why this is the case, but since this code path is unused, it + * doesn't matter. + */ + nc_ctx->low_ok = 0; + nc_ctx->high_ok = 0; +#endif + + /* For string-to-number, pretend we never have the lowest mantissa as there + * is no natural "precision" for inputs. Having lowest_mantissa == 0, we'll + * fall into the base cases for both e >= 0 and e < 0. + */ + if (nc_ctx->is_s2n) { + lowest_mantissa = 0; + } else { + lowest_mantissa = duk__bi_is_2to52(&nc_ctx->f); + } + + nc_ctx->unequal_gaps = 0; + if (nc_ctx->e >= 0) { + /* exponent non-negative (and thus not minimum exponent) */ + + if (lowest_mantissa) { + /* (>= e 0) AND (= f (expt b (- p 1))) + * + * be <- (expt b e) == b^e + * be1 <- (* be b) == (expt b (+ e 1)) == b^(e+1) + * r <- (* f be1 2) == 2 * f * b^(e+1) [if b==2 -> f * b^(e+2)] + * s <- (* b 2) [if b==2 -> 4] + * m+ <- be1 == b^(e+1) + * m- <- be == b^e + * k <- 0 + * B <- B + * low_ok <- round + * high_ok <- round + */ + + DUK_DDD(DUK_DDDPRINT("non-negative exponent (not smallest exponent); " + "lowest mantissa value for this exponent -> " + "unequal gaps")); + + duk__bi_exp_small(&nc_ctx->mm, nc_ctx->b, nc_ctx->e, &nc_ctx->t1, &nc_ctx->t2); /* mm <- b^e */ + duk__bi_mul_small(&nc_ctx->mp, &nc_ctx->mm, (duk_uint32_t) nc_ctx->b); /* mp <- b^(e+1) */ + duk__bi_mul_small(&nc_ctx->t1, &nc_ctx->f, 2); + duk__bi_mul(&nc_ctx->r, &nc_ctx->t1, &nc_ctx->mp); /* r <- (2 * f) * b^(e+1) */ + duk__bi_set_small(&nc_ctx->s, (duk_uint32_t) (nc_ctx->b * 2)); /* s <- 2 * b */ + nc_ctx->unequal_gaps = 1; + } else { + /* (>= e 0) AND (not (= f (expt b (- p 1)))) + * + * be <- (expt b e) == b^e + * r <- (* f be 2) == 2 * f * b^e [if b==2 -> f * b^(e+1)] + * s <- 2 + * m+ <- be == b^e + * m- <- be == b^e + * k <- 0 + * B <- B + * low_ok <- round + * high_ok <- round + */ + + DUK_DDD(DUK_DDDPRINT("non-negative exponent (not smallest exponent); " + "not lowest mantissa for this exponent -> " + "equal gaps")); + + duk__bi_exp_small(&nc_ctx->mm, nc_ctx->b, nc_ctx->e, &nc_ctx->t1, &nc_ctx->t2); /* mm <- b^e */ + duk__bi_copy(&nc_ctx->mp, &nc_ctx->mm); /* mp <- b^e */ + duk__bi_mul_small(&nc_ctx->t1, &nc_ctx->f, 2); + duk__bi_mul(&nc_ctx->r, &nc_ctx->t1, &nc_ctx->mp); /* r <- (2 * f) * b^e */ + duk__bi_set_small(&nc_ctx->s, 2); /* s <- 2 */ + } + } else { + /* When doing string-to-number, lowest_mantissa is always 0 so + * the exponent check, while incorrect, won't matter. + */ + if (nc_ctx->e > DUK__IEEE_DOUBLE_EXP_MIN /*not minimum exponent*/ && + lowest_mantissa /* lowest mantissa for this exponent*/) { + /* r <- (* f b 2) [if b==2 -> (* f 4)] + * s <- (* (expt b (- 1 e)) 2) == b^(1-e) * 2 [if b==2 -> b^(2-e)] + * m+ <- b == 2 + * m- <- 1 + * k <- 0 + * B <- B + * low_ok <- round + * high_ok <- round + */ + + DUK_DDD(DUK_DDDPRINT("negative exponent; not minimum exponent and " + "lowest mantissa for this exponent -> " + "unequal gaps")); + + duk__bi_mul_small(&nc_ctx->r, &nc_ctx->f, (duk_uint32_t) (nc_ctx->b * 2)); /* r <- (2 * b) * f */ + duk__bi_exp_small(&nc_ctx->t1, + nc_ctx->b, + 1 - nc_ctx->e, + &nc_ctx->s, + &nc_ctx->t2); /* NB: use 's' as temp on purpose */ + duk__bi_mul_small(&nc_ctx->s, &nc_ctx->t1, 2); /* s <- b^(1-e) * 2 */ + duk__bi_set_small(&nc_ctx->mp, 2); + duk__bi_set_small(&nc_ctx->mm, 1); + nc_ctx->unequal_gaps = 1; + } else { + /* r <- (* f 2) + * s <- (* (expt b (- e)) 2) == b^(-e) * 2 [if b==2 -> b^(1-e)] + * m+ <- 1 + * m- <- 1 + * k <- 0 + * B <- B + * low_ok <- round + * high_ok <- round + */ + + DUK_DDD(DUK_DDDPRINT("negative exponent; minimum exponent or not " + "lowest mantissa for this exponent -> " + "equal gaps")); + + duk__bi_mul_small(&nc_ctx->r, &nc_ctx->f, 2); /* r <- 2 * f */ + duk__bi_exp_small(&nc_ctx->t1, + nc_ctx->b, + -nc_ctx->e, + &nc_ctx->s, + &nc_ctx->t2); /* NB: use 's' as temp on purpose */ + duk__bi_mul_small(&nc_ctx->s, &nc_ctx->t1, 2); /* s <- b^(-e) * 2 */ + duk__bi_set_small(&nc_ctx->mp, 1); + duk__bi_set_small(&nc_ctx->mm, 1); + } + } +} + +DUK_LOCAL void duk__dragon4_scale(duk__numconv_stringify_ctx *nc_ctx) { + duk_small_int_t k = 0; + + /* This is essentially the 'scale' algorithm, with recursion removed. + * Note that 'k' is either correct immediately, or will move in one + * direction in the loop. There's no need to do the low/high checks + * on every round (like the Scheme algorithm does). + * + * The scheme algorithm finds 'k' and updates 's' simultaneously, + * while the logical algorithm finds 'k' with 's' having its initial + * value, after which 's' is updated separately (see the Burger-Dybvig + * paper, Section 3.1, steps 2 and 3). + * + * The case where m+ == m- (almost always) is optimized for, because + * it reduces the bigint operations considerably and almost always + * applies. The scale loop only needs to work with m+, so this works. + */ + + /* XXX: this algorithm could be optimized quite a lot by using e.g. + * a logarithm based estimator for 'k' and performing B^n multiplication + * using a lookup table or using some bit-representation based exp + * algorithm. Currently we just loop, with significant performance + * impact for very large and very small numbers. + */ + + DUK_DDD( + DUK_DDDPRINT("scale: B=%ld, low_ok=%ld, high_ok=%ld", (long) nc_ctx->B, (long) nc_ctx->low_ok, (long) nc_ctx->high_ok)); + DUK__BI_PRINT("r(init)", &nc_ctx->r); + DUK__BI_PRINT("s(init)", &nc_ctx->s); + DUK__BI_PRINT("mp(init)", &nc_ctx->mp); + DUK__BI_PRINT("mm(init)", &nc_ctx->mm); + + for (;;) { + DUK_DDD(DUK_DDDPRINT("scale loop (inc k), k=%ld", (long) k)); + DUK__BI_PRINT("r", &nc_ctx->r); + DUK__BI_PRINT("s", &nc_ctx->s); + DUK__BI_PRINT("m+", &nc_ctx->mp); + DUK__BI_PRINT("m-", &nc_ctx->mm); + + duk__bi_add(&nc_ctx->t1, &nc_ctx->r, &nc_ctx->mp); /* t1 = (+ r m+) */ + if (duk__bi_compare(&nc_ctx->t1, &nc_ctx->s) >= (nc_ctx->high_ok ? 0 : 1)) { + DUK_DDD(DUK_DDDPRINT("k is too low")); + /* r <- r + * s <- (* s B) + * m+ <- m+ + * m- <- m- + * k <- (+ k 1) + */ + + duk__bi_mul_small_copy(&nc_ctx->s, (duk_uint32_t) nc_ctx->B, &nc_ctx->t1); + k++; + } else { + break; + } + } + + /* k > 0 -> k was too low, and cannot be too high */ + if (k > 0) { + goto skip_dec_k; + } + + for (;;) { + DUK_DDD(DUK_DDDPRINT("scale loop (dec k), k=%ld", (long) k)); + DUK__BI_PRINT("r", &nc_ctx->r); + DUK__BI_PRINT("s", &nc_ctx->s); + DUK__BI_PRINT("m+", &nc_ctx->mp); + DUK__BI_PRINT("m-", &nc_ctx->mm); + + duk__bi_add(&nc_ctx->t1, &nc_ctx->r, &nc_ctx->mp); /* t1 = (+ r m+) */ + duk__bi_mul_small(&nc_ctx->t2, &nc_ctx->t1, (duk_uint32_t) nc_ctx->B); /* t2 = (* (+ r m+) B) */ + if (duk__bi_compare(&nc_ctx->t2, &nc_ctx->s) <= (nc_ctx->high_ok ? -1 : 0)) { + DUK_DDD(DUK_DDDPRINT("k is too high")); + /* r <- (* r B) + * s <- s + * m+ <- (* m+ B) + * m- <- (* m- B) + * k <- (- k 1) + */ + duk__bi_mul_small_copy(&nc_ctx->r, (duk_uint32_t) nc_ctx->B, &nc_ctx->t1); + duk__bi_mul_small_copy(&nc_ctx->mp, (duk_uint32_t) nc_ctx->B, &nc_ctx->t1); + if (nc_ctx->unequal_gaps) { + DUK_DDD(DUK_DDDPRINT("m+ != m- -> need to update m- too")); + duk__bi_mul_small_copy(&nc_ctx->mm, (duk_uint32_t) nc_ctx->B, &nc_ctx->t1); + } + k--; + } else { + break; + } + } + +skip_dec_k: + + if (!nc_ctx->unequal_gaps) { + DUK_DDD(DUK_DDDPRINT("equal gaps, copy m- from m+")); + duk__bi_copy(&nc_ctx->mm, &nc_ctx->mp); /* mm <- mp */ + } + nc_ctx->k = k; + + DUK_DDD(DUK_DDDPRINT("final k: %ld", (long) k)); + DUK__BI_PRINT("r(final)", &nc_ctx->r); + DUK__BI_PRINT("s(final)", &nc_ctx->s); + DUK__BI_PRINT("mp(final)", &nc_ctx->mp); + DUK__BI_PRINT("mm(final)", &nc_ctx->mm); +} + +DUK_LOCAL void duk__dragon4_generate(duk__numconv_stringify_ctx *nc_ctx) { + duk_small_int_t tc1, tc2; /* terminating conditions */ + duk_small_int_t d; /* current digit */ + duk_small_int_t count = 0; /* digit count */ + + /* + * Digit generation loop. + * + * Different termination conditions: + * + * 1. Free format output. Terminate when shortest accurate + * representation found. + * + * 2. Fixed format output, with specific number of digits. + * Ignore termination conditions, terminate when digits + * generated. Caller requests an extra digit and rounds. + * + * 3. Fixed format output, with a specific absolute cut-off + * position (e.g. 10 digits after decimal point). Note + * that we always generate at least one digit, even if + * the digit is below the cut-off point already. + */ + + for (;;) { + DUK_DDD(DUK_DDDPRINT("generate loop, count=%ld, k=%ld, B=%ld, low_ok=%ld, high_ok=%ld", + (long) count, + (long) nc_ctx->k, + (long) nc_ctx->B, + (long) nc_ctx->low_ok, + (long) nc_ctx->high_ok)); + DUK__BI_PRINT("r", &nc_ctx->r); + DUK__BI_PRINT("s", &nc_ctx->s); + DUK__BI_PRINT("m+", &nc_ctx->mp); + DUK__BI_PRINT("m-", &nc_ctx->mm); + + /* (quotient-remainder (* r B) s) using a dummy subtraction loop */ + duk__bi_mul_small(&nc_ctx->t1, &nc_ctx->r, (duk_uint32_t) nc_ctx->B); /* t1 <- (* r B) */ + d = 0; + for (;;) { + if (duk__bi_compare(&nc_ctx->t1, &nc_ctx->s) < 0) { + break; + } + duk__bi_sub_copy(&nc_ctx->t1, &nc_ctx->s, &nc_ctx->t2); /* t1 <- t1 - s */ + d++; + } + duk__bi_copy(&nc_ctx->r, &nc_ctx->t1); /* r <- (remainder (* r B) s) */ + /* d <- (quotient (* r B) s) (in range 0...B-1) */ + DUK_DDD(DUK_DDDPRINT("-> d(quot)=%ld", (long) d)); + DUK__BI_PRINT("r(rem)", &nc_ctx->r); + + duk__bi_mul_small_copy(&nc_ctx->mp, (duk_uint32_t) nc_ctx->B, &nc_ctx->t2); /* m+ <- (* m+ B) */ + duk__bi_mul_small_copy(&nc_ctx->mm, (duk_uint32_t) nc_ctx->B, &nc_ctx->t2); /* m- <- (* m- B) */ + DUK__BI_PRINT("mp(upd)", &nc_ctx->mp); + DUK__BI_PRINT("mm(upd)", &nc_ctx->mm); + + /* Terminating conditions. For fixed width output, we just ignore the + * terminating conditions (and pretend that tc1 == tc2 == false). The + * the current shortcut for fixed-format output is to generate a few + * extra digits and use rounding (with carry) to finish the output. + */ + + if (nc_ctx->is_fixed == 0) { + /* free-form */ + tc1 = (duk__bi_compare(&nc_ctx->r, &nc_ctx->mm) <= (nc_ctx->low_ok ? 0 : -1)); + + duk__bi_add(&nc_ctx->t1, &nc_ctx->r, &nc_ctx->mp); /* t1 <- (+ r m+) */ + tc2 = (duk__bi_compare(&nc_ctx->t1, &nc_ctx->s) >= (nc_ctx->high_ok ? 0 : 1)); + + DUK_DDD(DUK_DDDPRINT("tc1=%ld, tc2=%ld", (long) tc1, (long) tc2)); + } else { + /* fixed-format */ + tc1 = 0; + tc2 = 0; + } + + /* Count is incremented before DUK__DRAGON4_OUTPUT_PREINC() call + * on purpose, which is taken into account by the macro. + */ + count++; + + if (tc1) { + if (tc2) { + /* tc1 = true, tc2 = true */ + duk__bi_mul_small(&nc_ctx->t1, &nc_ctx->r, 2); + if (duk__bi_compare(&nc_ctx->t1, &nc_ctx->s) < 0) { /* (< (* r 2) s) */ + DUK_DDD(DUK_DDDPRINT("tc1=true, tc2=true, 2r > s: output d --> %ld (k=%ld)", + (long) d, + (long) nc_ctx->k)); + DUK__DRAGON4_OUTPUT_PREINC(nc_ctx, count, d); + } else { + DUK_DDD(DUK_DDDPRINT("tc1=true, tc2=true, 2r <= s: output d+1 --> %ld (k=%ld)", + (long) (d + 1), + (long) nc_ctx->k)); + DUK__DRAGON4_OUTPUT_PREINC(nc_ctx, count, d + 1); + } + break; + } else { + /* tc1 = true, tc2 = false */ + DUK_DDD(DUK_DDDPRINT("tc1=true, tc2=false: output d --> %ld (k=%ld)", (long) d, (long) nc_ctx->k)); + DUK__DRAGON4_OUTPUT_PREINC(nc_ctx, count, d); + break; + } + } else { + if (tc2) { + /* tc1 = false, tc2 = true */ + DUK_DDD(DUK_DDDPRINT("tc1=false, tc2=true: output d+1 --> %ld (k=%ld)", + (long) (d + 1), + (long) nc_ctx->k)); + DUK__DRAGON4_OUTPUT_PREINC(nc_ctx, count, d + 1); + break; + } else { + /* tc1 = false, tc2 = false */ + DUK_DDD(DUK_DDDPRINT("tc1=false, tc2=false: output d --> %ld (k=%ld)", (long) d, (long) nc_ctx->k)); + DUK__DRAGON4_OUTPUT_PREINC(nc_ctx, count, d); + + /* r <- r (updated above: r <- (remainder (* r B) s) + * s <- s + * m+ <- m+ (updated above: m+ <- (* m+ B) + * m- <- m- (updated above: m- <- (* m- B) + * B, low_ok, high_ok are fixed + */ + + /* fall through and continue for-loop */ + } + } + + /* fixed-format termination conditions */ + if (nc_ctx->is_fixed) { + if (nc_ctx->abs_pos) { + int pos = nc_ctx->k - count + 1; /* count is already incremented, take into account */ + DUK_DDD(DUK_DDDPRINT("fixed format, absolute: abs pos=%ld, k=%ld, count=%ld, req=%ld", + (long) pos, + (long) nc_ctx->k, + (long) count, + (long) nc_ctx->req_digits)); + if (pos <= nc_ctx->req_digits) { + DUK_DDD(DUK_DDDPRINT("digit position reached req_digits, end generate loop")); + break; + } + } else { + DUK_DDD(DUK_DDDPRINT("fixed format, relative: k=%ld, count=%ld, req=%ld", + (long) nc_ctx->k, + (long) count, + (long) nc_ctx->req_digits)); + if (count >= nc_ctx->req_digits) { + DUK_DDD(DUK_DDDPRINT("digit count reached req_digits, end generate loop")); + break; + } + } + } + } /* for */ + + nc_ctx->count = count; + + DUK_DDD(DUK_DDDPRINT("generate finished")); + +#if defined(DUK_USE_DEBUG_LEVEL) && (DUK_USE_DEBUG_LEVEL >= 2) + { + duk_uint8_t buf[2048]; + duk_small_int_t i, t; + duk_memzero(buf, sizeof(buf)); + for (i = 0; i < nc_ctx->count; i++) { + t = nc_ctx->digits[i]; + if (t < 0 || t > 36) { + buf[i] = (duk_uint8_t) '?'; + } else { + buf[i] = (duk_uint8_t) DUK__DIGITCHAR(t); + } + } + DUK_DDD(DUK_DDDPRINT("-> generated digits; k=%ld, digits='%s'", (long) nc_ctx->k, (const char *) buf)); + } +#endif +} + +/* Round up digits to a given position. If position is out-of-bounds, + * does nothing. If carry propagates over the first digit, a '1' is + * prepended to digits and 'k' will be updated. Return value indicates + * whether carry propagated over the first digit. + * + * Note that nc_ctx->count is NOT updated based on the rounding position + * (it is updated only if carry overflows over the first digit and an + * extra digit is prepended). + */ +DUK_LOCAL duk_small_int_t duk__dragon4_fixed_format_round(duk__numconv_stringify_ctx *nc_ctx, duk_small_int_t round_idx) { + duk_small_int_t t; + duk_uint8_t *p; + duk_uint8_t roundup_limit; + duk_small_int_t ret = 0; + + /* + * round_idx points to the digit which is considered for rounding; the + * digit to its left is the final digit of the rounded value. If round_idx + * is zero, rounding will be performed; the result will either be an empty + * rounded value or if carry happens a '1' digit is generated. + */ + + if (round_idx >= nc_ctx->count) { + DUK_DDD(DUK_DDDPRINT("round_idx out of bounds (%ld >= %ld (count)) -> no rounding", + (long) round_idx, + (long) nc_ctx->count)); + return 0; + } else if (round_idx < 0) { + DUK_DDD(DUK_DDDPRINT("round_idx out of bounds (%ld < 0) -> no rounding", (long) round_idx)); + return 0; + } + + /* + * Round-up limit. + * + * For even values, divides evenly, e.g. 10 -> roundup_limit=5. + * + * For odd values, rounds up, e.g. 3 -> roundup_limit=2. + * If radix is 3, 0/3 -> down, 1/3 -> down, 2/3 -> up. + */ + roundup_limit = (duk_uint8_t) ((nc_ctx->B + 1) / 2); + + p = &nc_ctx->digits[round_idx]; + if (*p >= roundup_limit) { + DUK_DDD(DUK_DDDPRINT("fixed-format rounding carry required")); + /* carry */ + for (;;) { + *p = 0; + if (p == &nc_ctx->digits[0]) { + DUK_DDD(DUK_DDDPRINT("carry propagated to first digit -> special case handling")); + duk_memmove((void *) (&nc_ctx->digits[1]), + (const void *) (&nc_ctx->digits[0]), + (size_t) (sizeof(char) * (size_t) nc_ctx->count)); + nc_ctx->digits[0] = 1; /* don't increase 'count' */ + nc_ctx->k++; /* position of highest digit changed */ + nc_ctx->count++; /* number of digits changed */ + ret = 1; + break; + } + + DUK_DDD(DUK_DDDPRINT("fixed-format rounding carry: B=%ld, roundup_limit=%ld, p=%p, digits=%p", + (long) nc_ctx->B, + (long) roundup_limit, + (void *) p, + (void *) nc_ctx->digits)); + p--; + t = *p; + DUK_DDD(DUK_DDDPRINT("digit before carry: %ld", (long) t)); + if (++t < nc_ctx->B) { + DUK_DDD(DUK_DDDPRINT("rounding carry terminated")); + *p = (duk_uint8_t) t; + break; + } + + DUK_DDD(DUK_DDDPRINT("wraps, carry to next digit")); + } + } + + return ret; +} + +#define DUK__NO_EXP (65536) /* arbitrary marker, outside valid exp range */ + +DUK_LOCAL void duk__dragon4_convert_and_push(duk__numconv_stringify_ctx *nc_ctx, + duk_hthread *thr, + duk_small_int_t radix, + duk_small_int_t digits, + duk_small_uint_t flags, + duk_small_int_t neg) { + duk_small_int_t k; + duk_small_int_t pos, pos_end; + duk_small_int_t expt; + duk_small_int_t dig; + duk_uint8_t *q; + duk_uint8_t *buf; + + /* + * The string conversion here incorporates all the necessary ECMAScript + * semantics without attempting to be generic. nc_ctx->digits contains + * nc_ctx->count digits (>= 1), with the topmost digit's 'position' + * indicated by nc_ctx->k as follows: + * + * digits="123" count=3 k=0 --> 0.123 + * digits="123" count=3 k=1 --> 1.23 + * digits="123" count=3 k=5 --> 12300 + * digits="123" count=3 k=-1 --> 0.0123 + * + * Note that the identifier names used for format selection are different + * in Burger-Dybvig paper and ECMAScript specification (quite confusingly + * so, because e.g. 'k' has a totally different meaning in each). See + * documentation for discussion. + * + * ECMAScript doesn't specify any specific behavior for format selection + * (e.g. when to use exponent notation) for non-base-10 numbers. + * + * The bigint space in the context is reused for string output, as there + * is more than enough space for that (>1kB at the moment), and we avoid + * allocating even more stack. + */ + + DUK_ASSERT(DUK__NUMCONV_CTX_BIGINTS_SIZE >= DUK__MAX_FORMATTED_LENGTH); + DUK_ASSERT(nc_ctx->count >= 1); + + k = nc_ctx->k; + buf = (duk_uint8_t *) &nc_ctx->f; /* XXX: union would be more correct */ + q = buf; + + /* Exponent handling: if exponent format is used, record exponent value and + * fake k such that one leading digit is generated (e.g. digits=123 -> "1.23"). + * + * toFixed() prevents exponent use; otherwise apply a set of criteria to + * match the other API calls (toString(), toPrecision, etc). + */ + + expt = DUK__NO_EXP; + if (!nc_ctx->abs_pos /* toFixed() */) { + if ((flags & DUK_N2S_FLAG_FORCE_EXP) || /* exponential notation forced */ + ((flags & DUK_N2S_FLAG_NO_ZERO_PAD) && /* fixed precision and zero padding would be required */ + (k - digits >= 1)) || /* (e.g. k=3, digits=2 -> "12X") */ + ((k > 21 || k <= -6) && (radix == 10))) { /* toString() conditions */ + DUK_DDD(DUK_DDDPRINT("use exponential notation: k=%ld -> expt=%ld", (long) k, (long) (k - 1))); + expt = k - 1; /* e.g. 12.3 -> digits="123" k=2 -> 1.23e1 */ + k = 1; /* generate mantissa with a single leading whole number digit */ + } + } + + if (neg) { + *q++ = '-'; + } + + /* Start position (inclusive) and end position (exclusive) */ + pos = (k >= 1 ? k : 1); + if (nc_ctx->is_fixed) { + if (nc_ctx->abs_pos) { + /* toFixed() */ + pos_end = -digits; + } else { + pos_end = k - digits; + } + } else { + pos_end = k - nc_ctx->count; + } + if (pos_end > 0) { + pos_end = 0; + } + + DUK_DDD(DUK_DDDPRINT("expt=%ld, k=%ld, count=%ld, pos=%ld, pos_end=%ld, is_fixed=%ld, " + "digits=%ld, abs_pos=%ld", + (long) expt, + (long) k, + (long) nc_ctx->count, + (long) pos, + (long) pos_end, + (long) nc_ctx->is_fixed, + (long) digits, + (long) nc_ctx->abs_pos)); + + /* Digit generation */ + while (pos > pos_end) { + DUK_DDD(DUK_DDDPRINT("digit generation: pos=%ld, pos_end=%ld", (long) pos, (long) pos_end)); + if (pos == 0) { + *q++ = (duk_uint8_t) '.'; + } + if (pos > k) { + *q++ = (duk_uint8_t) '0'; + } else if (pos <= k - nc_ctx->count) { + *q++ = (duk_uint8_t) '0'; + } else { + dig = nc_ctx->digits[k - pos]; + DUK_ASSERT(dig >= 0 && dig < nc_ctx->B); + *q++ = (duk_uint8_t) DUK__DIGITCHAR(dig); + } + + pos--; + } + DUK_ASSERT(pos <= 1); + + /* Exponent */ + if (expt != DUK__NO_EXP) { + /* + * Exponent notation for non-base-10 numbers isn't specified in ECMAScript + * specification, as it never explicitly turns up: non-decimal numbers can + * only be formatted with Number.prototype.toString([radix]) and for that, + * behavior is not explicitly specified. + * + * Logical choices include formatting the exponent as decimal (e.g. binary + * 100000 as 1e+5) or in current radix (e.g. binary 100000 as 1e+101). + * The Dragon4 algorithm (in the original paper) prints the exponent value + * in the target radix B. However, for radix values 15 and above, the + * exponent separator 'e' is no longer easily parseable. Consider, for + * instance, the number "1.faecee+1c". + */ + + duk_size_t len; + char expt_sign; + + *q++ = 'e'; + if (expt >= 0) { + expt_sign = '+'; + } else { + expt_sign = '-'; + expt = -expt; + } + *q++ = (duk_uint8_t) expt_sign; + len = duk__dragon4_format_uint32(q, (duk_uint32_t) expt, radix); + q += len; + } + + duk_push_lstring(thr, (const char *) buf, (size_t) (q - buf)); +} + +/* + * Conversion helpers + */ + +DUK_LOCAL void duk__dragon4_double_to_ctx(duk__numconv_stringify_ctx *nc_ctx, duk_double_t x) { + duk_double_union u; + duk_uint32_t tmp; + duk_small_int_t expt; + + /* + * seeeeeee eeeeffff ffffffff ffffffff ffffffff ffffffff ffffffff ffffffff + * A B C D E F G H + * + * s sign bit + * eee... exponent field + * fff... fraction + * + * ieee value = 1.ffff... * 2^(e - 1023) (normal) + * = 0.ffff... * 2^(-1022) (denormal) + * + * algorithm v = f * b^e + */ + + DUK_DBLUNION_SET_DOUBLE(&u, x); + + nc_ctx->f.n = 2; + + tmp = DUK_DBLUNION_GET_LOW32(&u); + nc_ctx->f.v[0] = tmp; + tmp = DUK_DBLUNION_GET_HIGH32(&u); + nc_ctx->f.v[1] = tmp & 0x000fffffUL; + expt = (duk_small_int_t) ((tmp >> 20) & 0x07ffUL); + + if (expt == 0) { + /* denormal */ + expt = DUK__IEEE_DOUBLE_EXP_MIN - 52; + duk__bi_normalize(&nc_ctx->f); + } else { + /* normal: implicit leading 1-bit */ + nc_ctx->f.v[1] |= 0x00100000UL; + expt = expt - DUK__IEEE_DOUBLE_EXP_BIAS - 52; + DUK_ASSERT(duk__bi_is_valid(&nc_ctx->f)); /* true, because v[1] has at least one bit set */ + } + + DUK_ASSERT(duk__bi_is_valid(&nc_ctx->f)); + + nc_ctx->e = expt; +} + +DUK_LOCAL void duk__dragon4_ctx_to_double(duk__numconv_stringify_ctx *nc_ctx, duk_double_t *x) { + duk_double_union u; + duk_small_int_t expt; + duk_small_int_t i; + duk_small_int_t bitstart; + duk_small_int_t bitround; + duk_small_int_t bitidx; + duk_small_int_t skip_round; + duk_uint32_t t, v; + + DUK_ASSERT(nc_ctx->count == 53 + 1); + + /* Sometimes this assert is not true right now; it will be true after + * rounding. See: test-bug-numconv-mantissa-assert.js. + */ + DUK_ASSERT_DISABLE(nc_ctx->digits[0] == 1); /* zero handled by caller */ + + /* Should not be required because the code below always sets both high + * and low parts, but at least gcc-4.4.5 fails to deduce this correctly + * (perhaps because the low part is set (seemingly) conditionally in a + * loop), so this is here to avoid the bogus warning. + */ + duk_memzero((void *) &u, sizeof(u)); + + /* + * Figure out how generated digits match up with the mantissa, + * and then perform rounding. If mantissa overflows, need to + * recompute the exponent (it is bumped and may overflow to + * infinity). + * + * For normal numbers the leading '1' is hidden and ignored, + * and the last bit is used for rounding: + * + * rounding pt + * <--------52------->| + * 1 x x x x ... x x x x|y ==> x x x x ... x x x x + * + * For denormals, the leading '1' is included in the number, + * and the rounding point is different: + * + * rounding pt + * <--52 or less--->| + * 1 x x x x ... x x|x x y ==> 0 0 ... 1 x x ... x x + * + * The largest denormals will have a mantissa beginning with + * a '1' (the explicit leading bit); smaller denormals will + * have leading zero bits. + * + * If the exponent would become too high, the result becomes + * Infinity. If the exponent is so small that the entire + * mantissa becomes zero, the result becomes zero. + * + * Note: the Dragon4 'k' is off-by-one with respect to the IEEE + * exponent. For instance, k==0 indicates that the leading '1' + * digit is at the first binary fraction position (0.1xxx...); + * the corresponding IEEE exponent would be -1. + */ + + skip_round = 0; + +recheck_exp: + + expt = nc_ctx->k - 1; /* IEEE exp without bias */ + if (expt > 1023) { + /* Infinity */ + bitstart = -255; /* needed for inf: causes mantissa to become zero, + * and rounding to be skipped. + */ + expt = 2047; + } else if (expt >= -1022) { + /* normal */ + bitstart = 1; /* skip leading digit */ + expt += DUK__IEEE_DOUBLE_EXP_BIAS; + DUK_ASSERT(expt >= 1 && expt <= 2046); + } else { + /* denormal or zero */ + bitstart = 1023 + expt; /* expt==-1023 -> bitstart=0 (leading 1); + * expt==-1024 -> bitstart=-1 (one left of leading 1), etc + */ + expt = 0; + } + bitround = bitstart + 52; + + DUK_DDD(DUK_DDDPRINT("ieee expt=%ld, bitstart=%ld, bitround=%ld", (long) expt, (long) bitstart, (long) bitround)); + + if (!skip_round) { + if (duk__dragon4_fixed_format_round(nc_ctx, bitround)) { + /* Corner case: see test-numconv-parse-mant-carry.js. We could + * just bump the exponent and update bitstart, but it's more robust + * to recompute (but avoid rounding twice). + */ + DUK_DDD(DUK_DDDPRINT("rounding caused exponent to be bumped, recheck exponent")); + skip_round = 1; + goto recheck_exp; + } + } + + /* + * Create mantissa + */ + + t = 0; + for (i = 0; i < 52; i++) { + bitidx = bitstart + 52 - 1 - i; + if (bitidx >= nc_ctx->count) { + v = 0; + } else if (bitidx < 0) { + v = 0; + } else { + v = nc_ctx->digits[bitidx]; + } + DUK_ASSERT(v == 0 || v == 1); + t += v << (i % 32); + if (i == 31) { + /* low 32 bits is complete */ + DUK_DBLUNION_SET_LOW32(&u, t); + t = 0; + } + } + /* t has high mantissa */ + + DUK_DDD(DUK_DDDPRINT("mantissa is complete: %08lx %08lx", (unsigned long) t, (unsigned long) DUK_DBLUNION_GET_LOW32(&u))); + + DUK_ASSERT(expt >= 0 && expt <= 0x7ffL); + t += ((duk_uint32_t) expt) << 20; +#if 0 /* caller handles sign change */ + if (negative) { + t |= 0x80000000U; + } +#endif + DUK_DBLUNION_SET_HIGH32(&u, t); + + DUK_DDD(DUK_DDDPRINT("number is complete: %08lx %08lx", + (unsigned long) DUK_DBLUNION_GET_HIGH32(&u), + (unsigned long) DUK_DBLUNION_GET_LOW32(&u))); + + *x = DUK_DBLUNION_GET_DOUBLE(&u); +} + +/* + * Exposed number-to-string API + * + * Input: [ number ] + * Output: [ string ] + */ + +DUK_LOCAL DUK_NOINLINE void duk__numconv_stringify_raw(duk_hthread *thr, + duk_small_int_t radix, + duk_small_int_t digits, + duk_small_uint_t flags) { + duk_double_t x; + duk_small_int_t c; + duk_small_int_t neg; + duk_uint32_t uval; + duk__numconv_stringify_ctx nc_ctx_alloc; /* large context; around 2kB now */ + duk__numconv_stringify_ctx *nc_ctx = &nc_ctx_alloc; + + x = (duk_double_t) duk_require_number(thr, -1); + duk_pop(thr); + + /* + * Handle special cases (NaN, infinity, zero). + */ + + c = (duk_small_int_t) DUK_FPCLASSIFY(x); + if (DUK_SIGNBIT((double) x)) { + x = -x; + neg = 1; + } else { + neg = 0; + } + + /* NaN sign bit is platform specific with unpacked, un-normalized NaNs */ + DUK_ASSERT(c == DUK_FP_NAN || DUK_SIGNBIT((double) x) == 0); + + if (c == DUK_FP_NAN) { + duk_push_hstring_stridx(thr, DUK_STRIDX_NAN); + return; + } else if (c == DUK_FP_INFINITE) { + if (neg) { + /* -Infinity */ + duk_push_hstring_stridx(thr, DUK_STRIDX_MINUS_INFINITY); + } else { + /* Infinity */ + duk_push_hstring_stridx(thr, DUK_STRIDX_INFINITY); + } + return; + } else if (c == DUK_FP_ZERO) { + /* We can't shortcut zero here if it goes through special formatting + * (such as forced exponential notation). + */ + ; + } + + /* + * Handle integers in 32-bit range (that is, [-(2**32-1),2**32-1]) + * specially, as they're very likely for embedded programs. This + * is now done for all radix values. We must be careful not to use + * the fast path when special formatting (e.g. forced exponential) + * is in force. + * + * XXX: could save space by supporting radix 10 only and using + * sprintf "%lu" for the fast path and for exponent formatting. + */ + + uval = duk_double_to_uint32_t(x); + if (duk_double_equals((double) uval, x) && /* integer number in range */ + flags == 0) { /* no special formatting */ + /* use bigint area as a temp */ + duk_uint8_t *buf = (duk_uint8_t *) (&nc_ctx->f); + duk_uint8_t *p = buf; + + DUK_ASSERT(DUK__NUMCONV_CTX_BIGINTS_SIZE >= 32 + 1); /* max size: radix=2 + sign */ + if (neg && uval != 0) { + /* no negative sign for zero */ + *p++ = (duk_uint8_t) '-'; + } + p += duk__dragon4_format_uint32(p, uval, radix); + duk_push_lstring(thr, (const char *) buf, (duk_size_t) (p - buf)); + return; + } + + /* + * Dragon4 setup. + * + * Convert double from IEEE representation for conversion; + * normal finite values have an implicit leading 1-bit. The + * slow path algorithm doesn't handle zero, so zero is special + * cased here but still creates a valid nc_ctx, and goes + * through normal formatting in case special formatting has + * been requested (e.g. forced exponential format: 0 -> "0e+0"). + */ + + /* Would be nice to bulk clear the allocation, but the context + * is 1-2 kilobytes and nothing should rely on it being zeroed. + */ +#if 0 + duk_memzero((void *) nc_ctx, sizeof(*nc_ctx)); /* slow init, do only for slow path cases */ +#endif + + nc_ctx->is_s2n = 0; + nc_ctx->b = 2; + nc_ctx->B = radix; + nc_ctx->abs_pos = 0; + if (flags & DUK_N2S_FLAG_FIXED_FORMAT) { + nc_ctx->is_fixed = 1; + if (flags & DUK_N2S_FLAG_FRACTION_DIGITS) { + /* absolute req_digits; e.g. digits = 1 -> last digit is 0, + * but add an extra digit for rounding. + */ + nc_ctx->abs_pos = 1; + nc_ctx->req_digits = (-digits + 1) - 1; + } else { + nc_ctx->req_digits = digits + 1; + } + } else { + nc_ctx->is_fixed = 0; + nc_ctx->req_digits = 0; + } + + if (c == DUK_FP_ZERO) { + /* Zero special case: fake requested number of zero digits; ensure + * no sign bit is printed. Relative and absolute fixed format + * require separate handling. + */ + duk_small_int_t count; + if (nc_ctx->is_fixed) { + if (nc_ctx->abs_pos) { + count = digits + 2; /* lead zero + 'digits' fractions + 1 for rounding */ + } else { + count = digits + 1; /* + 1 for rounding */ + } + } else { + count = 1; + } + DUK_DDD(DUK_DDDPRINT("count=%ld", (long) count)); + DUK_ASSERT(count >= 1); + duk_memzero((void *) nc_ctx->digits, (size_t) count); + nc_ctx->count = count; + nc_ctx->k = 1; /* 0.000... */ + neg = 0; + goto zero_skip; + } + + duk__dragon4_double_to_ctx(nc_ctx, x); /* -> sets 'f' and 'e' */ + DUK__BI_PRINT("f", &nc_ctx->f); + DUK_DDD(DUK_DDDPRINT("e=%ld", (long) nc_ctx->e)); + + /* + * Dragon4 slow path digit generation. + */ + + duk__dragon4_prepare(nc_ctx); /* setup many variables in nc_ctx */ + + DUK_DDD(DUK_DDDPRINT("after prepare:")); + DUK__BI_PRINT("r", &nc_ctx->r); + DUK__BI_PRINT("s", &nc_ctx->s); + DUK__BI_PRINT("mp", &nc_ctx->mp); + DUK__BI_PRINT("mm", &nc_ctx->mm); + + duk__dragon4_scale(nc_ctx); + + DUK_DDD(DUK_DDDPRINT("after scale; k=%ld", (long) nc_ctx->k)); + DUK__BI_PRINT("r", &nc_ctx->r); + DUK__BI_PRINT("s", &nc_ctx->s); + DUK__BI_PRINT("mp", &nc_ctx->mp); + DUK__BI_PRINT("mm", &nc_ctx->mm); + + duk__dragon4_generate(nc_ctx); + + /* + * Convert and push final string. + */ + +zero_skip: + + if (flags & DUK_N2S_FLAG_FIXED_FORMAT) { + /* Perform fixed-format rounding. */ + duk_small_int_t roundpos; + if (flags & DUK_N2S_FLAG_FRACTION_DIGITS) { + /* 'roundpos' is relative to nc_ctx->k and increases to the right + * (opposite of how 'k' changes). + */ + roundpos = -digits; /* absolute position for digit considered for rounding */ + roundpos = nc_ctx->k - roundpos; + } else { + roundpos = digits; + } + DUK_DDD(DUK_DDDPRINT("rounding: k=%ld, count=%ld, digits=%ld, roundpos=%ld", + (long) nc_ctx->k, + (long) nc_ctx->count, + (long) digits, + (long) roundpos)); + (void) duk__dragon4_fixed_format_round(nc_ctx, roundpos); + + /* Note: 'count' is currently not adjusted by rounding (i.e. the + * digits are not "chopped off". That shouldn't matter because + * the digit position (absolute or relative) is passed on to the + * convert-and-push function. + */ + } + + duk__dragon4_convert_and_push(nc_ctx, thr, radix, digits, flags, neg); +} + +DUK_INTERNAL void duk_numconv_stringify(duk_hthread *thr, duk_small_int_t radix, duk_small_int_t digits, duk_small_uint_t flags) { + duk_native_stack_check(thr); + duk__numconv_stringify_raw(thr, radix, digits, flags); +} + +/* + * Exposed string-to-number API + * + * Input: [ string ] + * Output: [ number ] + * + * If number parsing fails, a NaN is pushed as the result. If number parsing + * fails due to an internal error, an InternalError is thrown. + */ + +DUK_LOCAL DUK_NOINLINE void duk__numconv_parse_raw(duk_hthread *thr, duk_small_int_t radix, duk_small_uint_t flags) { + duk__numconv_stringify_ctx nc_ctx_alloc; /* large context; around 2kB now */ + duk__numconv_stringify_ctx *nc_ctx = &nc_ctx_alloc; + duk_double_t res; + duk_hstring *h_str; + duk_int_t expt; + duk_bool_t expt_neg; + duk_small_int_t expt_adj; + duk_small_int_t neg; + duk_small_int_t dig; + duk_small_int_t dig_whole; + duk_small_int_t dig_lzero; + duk_small_int_t dig_frac; + duk_small_int_t dig_expt; + duk_small_int_t dig_prec; + const duk__exp_limits *explim; + const duk_uint8_t *p; + duk_small_int_t ch; + + DUK_DDD(DUK_DDDPRINT("parse number: %!T, radix=%ld, flags=0x%08lx", + (duk_tval *) duk_get_tval(thr, -1), + (long) radix, + (unsigned long) flags)); + + DUK_ASSERT(radix >= 2 && radix <= 36); + DUK_ASSERT(radix - 2 < (duk_small_int_t) sizeof(duk__str2num_digits_for_radix)); + + /* + * Preliminaries: trim, sign, Infinity check + * + * We rely on the interned string having a NUL terminator, which will + * cause a parse failure wherever it is encountered. As a result, we + * don't need separate pointer checks. + * + * There is no special parsing for 'NaN' in the specification although + * 'Infinity' (with an optional sign) is allowed in some contexts. + * Some contexts allow plus/minus sign, while others only allow the + * minus sign (like JSON.parse()). + * + * Automatic hex number detection (leading '0x' or '0X') and octal + * number detection (leading '0' followed by at least one octal digit) + * is done here too. + * + * Symbols are not explicitly rejected here (that's up to the caller). + * If a symbol were passed here, it should ultimately safely fail + * parsing due to a syntax error. + */ + + if (flags & DUK_S2N_FLAG_TRIM_WHITE) { + /* Leading / trailing whitespace is sometimes accepted and + * sometimes not. After white space trimming, all valid input + * characters are pure ASCII. + */ + duk_trim(thr, -1); + } + h_str = duk_require_hstring(thr, -1); + DUK_ASSERT(h_str != NULL); + p = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_str); + + neg = 0; + ch = *p; + if (ch == (duk_small_int_t) '+') { + if ((flags & DUK_S2N_FLAG_ALLOW_PLUS) == 0) { + DUK_DDD(DUK_DDDPRINT("parse failed: leading plus sign not allowed")); + goto parse_fail; + } + p++; + } else if (ch == (duk_small_int_t) '-') { + if ((flags & DUK_S2N_FLAG_ALLOW_MINUS) == 0) { + DUK_DDD(DUK_DDDPRINT("parse failed: leading minus sign not allowed")); + goto parse_fail; + } + p++; + neg = 1; + } + + if ((flags & DUK_S2N_FLAG_ALLOW_INF) && DUK_STRNCMP((const char *) p, "Infinity", 8) == 0) { + /* Don't check for Infinity unless the context allows it. + * 'Infinity' is a valid integer literal in e.g. base-36: + * + * parseInt('Infinity', 36) + * 1461559270678 + */ + + if ((flags & DUK_S2N_FLAG_ALLOW_GARBAGE) == 0 && p[8] != DUK_ASC_NUL) { + DUK_DDD(DUK_DDDPRINT("parse failed: trailing garbage after matching 'Infinity' not allowed")); + goto parse_fail; + } else { + res = DUK_DOUBLE_INFINITY; + goto negcheck_and_ret; + } + } + ch = *p; + if (ch == (duk_small_int_t) '0') { + duk_small_int_t detect_radix = 0; + ch = DUK_LOWERCASE_CHAR_ASCII(p[1]); /* 'x' or 'X' -> 'x' */ + if ((flags & DUK_S2N_FLAG_ALLOW_AUTO_HEX_INT) && ch == DUK_ASC_LC_X) { + DUK_DDD(DUK_DDDPRINT("detected 0x/0X hex prefix, changing radix and preventing fractions and exponent")); + detect_radix = 16; +#if 0 + } else if ((flags & DUK_S2N_FLAG_ALLOW_AUTO_LEGACY_OCT_INT) && + (ch >= (duk_small_int_t) '0' && ch <= (duk_small_int_t) '9')) { + DUK_DDD(DUK_DDDPRINT("detected 0n oct prefix, changing radix and preventing fractions and exponent")); + detect_radix = 8; + + /* NOTE: if this legacy octal case is added back, it has + * different flags and 'p' advance so this needs to be + * reworked. + */ + flags |= DUK_S2N_FLAG_ALLOW_EMPTY_AS_ZERO; /* interpret e.g. '09' as '0', not NaN */ + p += 1; +#endif + } else if ((flags & DUK_S2N_FLAG_ALLOW_AUTO_OCT_INT) && ch == DUK_ASC_LC_O) { + DUK_DDD(DUK_DDDPRINT("detected 0o oct prefix, changing radix and preventing fractions and exponent")); + detect_radix = 8; + } else if ((flags & DUK_S2N_FLAG_ALLOW_AUTO_BIN_INT) && ch == DUK_ASC_LC_B) { + DUK_DDD(DUK_DDDPRINT("detected 0b bin prefix, changing radix and preventing fractions and exponent")); + detect_radix = 2; + } + if (detect_radix > 0) { + radix = detect_radix; + /* Clear empty as zero flag: interpret e.g. '0x' and '0xg' as a NaN (= parse error) */ + flags &= ~(DUK_S2N_FLAG_ALLOW_EXP | DUK_S2N_FLAG_ALLOW_EMPTY_FRAC | DUK_S2N_FLAG_ALLOW_FRAC | + DUK_S2N_FLAG_ALLOW_NAKED_FRAC | DUK_S2N_FLAG_ALLOW_EMPTY_AS_ZERO); + flags |= DUK_S2N_FLAG_ALLOW_LEADING_ZERO; /* allow e.g. '0x0009' and '0b00010001' */ + p += 2; + } + } + + /* + * Scan number and setup for Dragon4. + * + * The fast path case is detected during setup: an integer which + * can be converted without rounding, no net exponent. The fast + * path could be implemented as a separate scan, but may not really + * be worth it: the multiplications for building 'f' are not + * expensive when 'f' is small. + * + * The significand ('f') must contain enough bits of (apparent) + * accuracy, so that Dragon4 will generate enough binary output digits. + * For decimal numbers, this means generating a 20-digit significand, + * which should yield enough practical accuracy to parse IEEE doubles. + * In fact, the ECMAScript specification explicitly allows an + * implementation to treat digits beyond 20 as zeroes (and even + * to round the 20th digit upwards). For non-decimal numbers, the + * appropriate number of digits has been precomputed for comparable + * accuracy. + * + * Digit counts: + * + * [ dig_lzero ] + * | + * .+-..---[ dig_prec ]----. + * | || | + * 0000123.456789012345678901234567890e+123456 + * | | | | | | + * `--+--' `------[ dig_frac ]-------' `-+--' + * | | + * [ dig_whole ] [ dig_expt ] + * + * dig_frac and dig_expt are -1 if not present + * dig_lzero is only computed for whole number part + * + * Parsing state + * + * Parsing whole part dig_frac < 0 AND dig_expt < 0 + * Parsing fraction part dig_frac >= 0 AND dig_expt < 0 + * Parsing exponent part dig_expt >= 0 (dig_frac may be < 0 or >= 0) + * + * Note: in case we hit an implementation limit (like exponent range), + * we should throw an error, NOT return NaN or Infinity. Even with + * very large exponent (or significand) values the final result may be + * finite, so NaN/Infinity would be incorrect. + */ + + duk__bi_set_small(&nc_ctx->f, 0); + dig_prec = 0; + dig_lzero = 0; + dig_whole = 0; + dig_frac = -1; + dig_expt = -1; + expt = 0; + expt_adj = 0; /* essentially tracks digit position of lowest 'f' digit */ + expt_neg = 0; + for (;;) { + ch = *p++; + + DUK_DDD(DUK_DDDPRINT("parse digits: p=%p, ch='%c' (%ld), expt=%ld, expt_adj=%ld, " + "dig_whole=%ld, dig_frac=%ld, dig_expt=%ld, dig_lzero=%ld, dig_prec=%ld", + (const void *) p, + (int) ((ch >= 0x20 && ch <= 0x7e) ? ch : '?'), + (long) ch, + (long) expt, + (long) expt_adj, + (long) dig_whole, + (long) dig_frac, + (long) dig_expt, + (long) dig_lzero, + (long) dig_prec)); + DUK__BI_PRINT("f", &nc_ctx->f); + + /* Most common cases first. */ + if (ch >= (duk_small_int_t) '0' && ch <= (duk_small_int_t) '9') { + dig = (duk_small_int_t) ch - '0' + 0; + } else if (ch == (duk_small_int_t) '.') { + /* A leading digit is not required in some cases, e.g. accept ".123". + * In other cases (JSON.parse()) a leading digit is required. This + * is checked for after the loop. + */ + if (dig_frac >= 0 || dig_expt >= 0) { + if (flags & DUK_S2N_FLAG_ALLOW_GARBAGE) { + DUK_DDD(DUK_DDDPRINT("garbage termination (invalid period)")); + break; + } else { + DUK_DDD(DUK_DDDPRINT("parse failed: period not allowed")); + goto parse_fail; + } + } + + if ((flags & DUK_S2N_FLAG_ALLOW_FRAC) == 0) { + /* Some contexts don't allow fractions at all; this can't be a + * post-check because the state ('f' and expt) would be incorrect. + */ + if (flags & DUK_S2N_FLAG_ALLOW_GARBAGE) { + DUK_DDD(DUK_DDDPRINT("garbage termination (invalid first period)")); + break; + } else { + DUK_DDD(DUK_DDDPRINT("parse failed: fraction part not allowed")); + } + } + + DUK_DDD(DUK_DDDPRINT("start fraction part")); + dig_frac = 0; + continue; + } else if (ch == (duk_small_int_t) 0) { + DUK_DDD(DUK_DDDPRINT("NUL termination")); + break; + } else if ((flags & DUK_S2N_FLAG_ALLOW_EXP) && dig_expt < 0 && + (ch == (duk_small_int_t) 'e' || ch == (duk_small_int_t) 'E')) { + /* Note: we don't parse back exponent notation for anything else + * than radix 10, so this is not an ambiguous check (e.g. hex + * exponent values may have 'e' either as a significand digit + * or as an exponent separator). + * + * If the exponent separator occurs twice, 'e' will be interpreted + * as a digit (= 14) and will be rejected as an invalid decimal + * digit. + */ + + DUK_DDD(DUK_DDDPRINT("start exponent part")); + + /* Exponent without a sign or with a +/- sign is accepted + * by all call sites (even JSON.parse()). + */ + ch = *p; + if (ch == (duk_small_int_t) '-') { + expt_neg = 1; + p++; + } else if (ch == (duk_small_int_t) '+') { + p++; + } + dig_expt = 0; + continue; + } else if (ch >= (duk_small_int_t) 'a' && ch <= (duk_small_int_t) 'z') { + dig = (duk_small_int_t) (ch - (duk_small_int_t) 'a' + 0x0a); + } else if (ch >= (duk_small_int_t) 'A' && ch <= (duk_small_int_t) 'Z') { + dig = (duk_small_int_t) (ch - (duk_small_int_t) 'A' + 0x0a); + } else { + dig = 255; /* triggers garbage digit check below */ + } + DUK_ASSERT((dig >= 0 && dig <= 35) || dig == 255); + + if (dig >= radix) { + if (flags & DUK_S2N_FLAG_ALLOW_GARBAGE) { + DUK_DDD(DUK_DDDPRINT("garbage termination")); + break; + } else { + DUK_DDD(DUK_DDDPRINT("parse failed: trailing garbage or invalid digit")); + goto parse_fail; + } + } + + if (dig_expt < 0) { + /* whole or fraction digit */ + + if (dig_prec < duk__str2num_digits_for_radix[radix - 2]) { + /* significant from precision perspective */ + + duk_small_int_t f_zero = duk__bi_is_zero(&nc_ctx->f); + if (f_zero && dig == 0) { + /* Leading zero is not counted towards precision digits; not + * in the integer part, nor in the fraction part. + */ + if (dig_frac < 0) { + dig_lzero++; + } + } else { + /* XXX: join these ops (multiply-accumulate), but only if + * code footprint decreases. + */ + duk__bi_mul_small(&nc_ctx->t1, &nc_ctx->f, (duk_uint32_t) radix); + duk__bi_add_small(&nc_ctx->f, &nc_ctx->t1, (duk_uint32_t) dig); + dig_prec++; + } + } else { + /* Ignore digits beyond a radix-specific limit, but note them + * in expt_adj. + */ + expt_adj++; + } + + if (dig_frac >= 0) { + dig_frac++; + expt_adj--; + } else { + dig_whole++; + } + } else { + /* exponent digit */ + + DUK_ASSERT(radix == 10); + expt = expt * radix + dig; + if (expt > DUK_S2N_MAX_EXPONENT) { + /* Impose a reasonable exponent limit, so that exp + * doesn't need to get tracked using a bigint. + */ + DUK_DDD(DUK_DDDPRINT("parse failed: exponent too large")); + goto parse_explimit_error; + } + dig_expt++; + } + } + + /* Leading zero. */ + + if (dig_lzero > 0 && dig_whole > 1) { + if ((flags & DUK_S2N_FLAG_ALLOW_LEADING_ZERO) == 0) { + DUK_DDD(DUK_DDDPRINT("parse failed: leading zeroes not allowed in integer part")); + goto parse_fail; + } + } + + /* Validity checks for various fraction formats ("0.1", ".1", "1.", "."). */ + + if (dig_whole == 0) { + if (dig_frac == 0) { + /* "." is not accepted in any format */ + DUK_DDD(DUK_DDDPRINT("parse failed: plain period without leading or trailing digits")); + goto parse_fail; + } else if (dig_frac > 0) { + /* ".123" */ + if ((flags & DUK_S2N_FLAG_ALLOW_NAKED_FRAC) == 0) { + DUK_DDD(DUK_DDDPRINT("parse failed: fraction part not allowed without " + "leading integer digit(s)")); + goto parse_fail; + } + } else { + /* Empty ("") is allowed in some formats (e.g. Number(''), as zero, + * but it must not have a leading +/- sign (GH-2019). Note that + * for Number(), h_str is already trimmed so we can check for zero + * length and still get Number(' + ') == NaN. + */ + if ((flags & DUK_S2N_FLAG_ALLOW_EMPTY_AS_ZERO) == 0) { + DUK_DDD(DUK_DDDPRINT("parse failed: empty string not allowed (as zero)")); + goto parse_fail; + } else if (DUK_HSTRING_GET_BYTELEN(h_str) != 0) { + DUK_DDD(DUK_DDDPRINT("parse failed: no digits, but not empty (had a +/- sign)")); + goto parse_fail; + } + } + } else { + if (dig_frac == 0) { + /* "123." is allowed in some formats */ + if ((flags & DUK_S2N_FLAG_ALLOW_EMPTY_FRAC) == 0) { + DUK_DDD(DUK_DDDPRINT("parse failed: empty fractions")); + goto parse_fail; + } + } else if (dig_frac > 0) { + /* "123.456" */ + ; + } else { + /* "123" */ + ; + } + } + + /* Exponent without digits (e.g. "1e" or "1e+"). If trailing garbage is + * allowed, ignore exponent part as garbage (= parse as "1", i.e. exp 0). + */ + + if (dig_expt == 0) { + if ((flags & DUK_S2N_FLAG_ALLOW_GARBAGE) == 0) { + DUK_DDD(DUK_DDDPRINT("parse failed: empty exponent")); + goto parse_fail; + } + DUK_ASSERT(expt == 0); + } + + if (expt_neg) { + expt = -expt; + } + DUK_DDD( + DUK_DDDPRINT("expt=%ld, expt_adj=%ld, net exponent -> %ld", (long) expt, (long) expt_adj, (long) (expt + expt_adj))); + expt += expt_adj; + + /* Fast path check. */ + + if (nc_ctx->f.n <= 1 && /* 32-bit value */ + expt == 0 /* no net exponent */) { + /* Fast path is triggered for no exponent and also for balanced exponent + * and fraction parts, e.g. for "1.23e2" == "123". Remember to respect + * zero sign. + */ + + /* XXX: could accept numbers larger than 32 bits, e.g. up to 53 bits? */ + DUK_DDD(DUK_DDDPRINT("fast path number parse")); + if (nc_ctx->f.n == 1) { + res = (double) nc_ctx->f.v[0]; + } else { + res = 0.0; + } + goto negcheck_and_ret; + } + + /* Significand ('f') padding. */ + + while (dig_prec < duk__str2num_digits_for_radix[radix - 2]) { + /* Pad significand with "virtual" zero digits so that Dragon4 will + * have enough (apparent) precision to work with. + */ + DUK_DDD(DUK_DDDPRINT("dig_prec=%ld, pad significand with zero", (long) dig_prec)); + duk__bi_mul_small_copy(&nc_ctx->f, (duk_uint32_t) radix, &nc_ctx->t1); + DUK__BI_PRINT("f", &nc_ctx->f); + expt--; + dig_prec++; + } + + DUK_DDD(DUK_DDDPRINT("final exponent: %ld", (long) expt)); + + /* Detect zero special case. */ + + if (nc_ctx->f.n == 0) { + /* This may happen even after the fast path check, if exponent is + * not balanced (e.g. "0e1"). Remember to respect zero sign. + */ + DUK_DDD(DUK_DDDPRINT("significand is zero")); + res = 0.0; + goto negcheck_and_ret; + } + + /* Quick reject of too large or too small exponents. This check + * would be incorrect for zero (e.g. "0e1000" is zero, not Infinity) + * so zero check must be above. + */ + + explim = &duk__str2num_exp_limits[radix - 2]; + if (expt > explim->upper) { + DUK_DDD(DUK_DDDPRINT("exponent too large -> infinite")); + res = (duk_double_t) DUK_DOUBLE_INFINITY; + goto negcheck_and_ret; + } else if (expt < explim->lower) { + DUK_DDD(DUK_DDDPRINT("exponent too small -> zero")); + res = (duk_double_t) 0.0; + goto negcheck_and_ret; + } + + nc_ctx->is_s2n = 1; + nc_ctx->e = expt; + nc_ctx->b = radix; + nc_ctx->B = 2; + nc_ctx->is_fixed = 1; + nc_ctx->abs_pos = 0; + nc_ctx->req_digits = 53 + 1; + + DUK__BI_PRINT("f", &nc_ctx->f); + DUK_DDD(DUK_DDDPRINT("e=%ld", (long) nc_ctx->e)); + + /* + * Dragon4 slow path (binary) digit generation. + * An extra digit is generated for rounding. + */ + + duk__dragon4_prepare(nc_ctx); /* setup many variables in nc_ctx */ + + DUK_DDD(DUK_DDDPRINT("after prepare:")); + DUK__BI_PRINT("r", &nc_ctx->r); + DUK__BI_PRINT("s", &nc_ctx->s); + DUK__BI_PRINT("mp", &nc_ctx->mp); + DUK__BI_PRINT("mm", &nc_ctx->mm); + + duk__dragon4_scale(nc_ctx); + + DUK_DDD(DUK_DDDPRINT("after scale; k=%ld", (long) nc_ctx->k)); + DUK__BI_PRINT("r", &nc_ctx->r); + DUK__BI_PRINT("s", &nc_ctx->s); + DUK__BI_PRINT("mp", &nc_ctx->mp); + DUK__BI_PRINT("mm", &nc_ctx->mm); + + duk__dragon4_generate(nc_ctx); + + DUK_ASSERT(nc_ctx->count == 53 + 1); + + /* + * Convert binary digits into an IEEE double. Need to handle + * denormals and rounding correctly. + * + * Some call sites currently assume the result is always a + * non-fastint double. If this is changed, check all call + * sites. + */ + + duk__dragon4_ctx_to_double(nc_ctx, &res); + goto negcheck_and_ret; + +negcheck_and_ret: + if (neg) { + res = -res; + } + duk_pop(thr); + duk_push_number(thr, (double) res); + DUK_DDD(DUK_DDDPRINT("result: %!T", (duk_tval *) duk_get_tval(thr, -1))); + return; + +parse_fail: + DUK_DDD(DUK_DDDPRINT("parse failed")); + duk_pop(thr); + duk_push_nan(thr); + return; + +parse_explimit_error: + DUK_DDD(DUK_DDDPRINT("parse failed, internal error, can't return a value")); + DUK_ERROR_RANGE(thr, "exponent too large"); + DUK_WO_NORETURN(return;); +} + +DUK_INTERNAL void duk_numconv_parse(duk_hthread *thr, duk_small_int_t radix, duk_small_uint_t flags) { + duk_native_stack_check(thr); + duk__numconv_parse_raw(thr, radix, flags); +} + +/* automatic undefs */ +#undef DUK__BI_MAX_PARTS +#undef DUK__BI_PRINT +#undef DUK__DIGITCHAR +#undef DUK__DRAGON4_OUTPUT_PREINC +#undef DUK__IEEE_DOUBLE_EXP_BIAS +#undef DUK__IEEE_DOUBLE_EXP_MIN +#undef DUK__MAX_FORMATTED_LENGTH +#undef DUK__MAX_OUTPUT_DIGITS +#undef DUK__NO_EXP +#undef DUK__NUMCONV_CTX_BIGINTS_SIZE +#undef DUK__NUMCONV_CTX_NUM_BIGINTS +#line 1 "duk_regexp_compiler.c" +/* + * Regexp compilation. + * + * See doc/regexp.rst for a discussion of the compilation approach and + * current limitations. + * + * Regexp bytecode assumes jumps can be expressed with signed 32-bit + * integers. Consequently the bytecode size must not exceed 0x7fffffffL. + * The implementation casts duk_size_t (buffer size) to duk_(u)int32_t + * in many places. Although this could be changed, the bytecode format + * limit would still prevent regexps exceeding the signed 32-bit limit + * from working. + * + * XXX: The implementation does not prevent bytecode from exceeding the + * maximum supported size. This could be done by limiting the maximum + * input string size (assuming an upper bound can be computed for number + * of bytecode bytes emitted per input byte) or checking buffer maximum + * size when emitting bytecode (slower). + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_REGEXP_SUPPORT) + +/* + * Helper macros + */ + +#define DUK__RE_INITIAL_BUFSIZE 64 + +#define DUK__RE_BUFLEN(re_ctx) DUK_BW_GET_SIZE(re_ctx->thr, &re_ctx->bw) + +/* + * Disjunction struct: result of parsing a disjunction + */ + +typedef struct { + /* Number of characters that the atom matches (e.g. 3 for 'abc'), + * -1 if atom is complex and number of matched characters either + * varies or is not known. + */ + duk_int32_t charlen; + +#if 0 + /* These are not needed to implement quantifier capture handling, + * but might be needed at some point. + */ + + /* re_ctx->captures at start and end of atom parsing. + * Since 'captures' indicates highest capture number emitted + * so far in a DUK_REOP_SAVE, the captures numbers saved by + * the atom are: ]start_captures,end_captures]. + */ + duk_uint32_t start_captures; + duk_uint32_t end_captures; +#endif +} duk__re_disjunction_info; + +/* + * Encoding helpers + * + * Some of the typing is bytecode based, e.g. slice sizes are unsigned 32-bit + * even though the buffer operations will use duk_size_t. + */ + +/* XXX: the insert helpers should ensure that the bytecode result is not + * larger than expected (or at least assert for it). Many things in the + * bytecode, like skip offsets, won't work correctly if the bytecode is + * larger than say 2G. + */ + +DUK_LOCAL duk_uint32_t duk__encode_i32(duk_int32_t x) { + if (x < 0) { + return ((duk_uint32_t) (-x)) * 2 + 1; + } else { + return ((duk_uint32_t) x) * 2; + } +} + +/* XXX: return type should probably be duk_size_t, or explicit checks are needed for + * maximum size. + */ +DUK_LOCAL duk_uint32_t duk__insert_u32(duk_re_compiler_ctx *re_ctx, duk_uint32_t offset, duk_uint32_t x) { + duk_uint8_t buf[DUK_UNICODE_MAX_XUTF8_LENGTH]; + duk_small_int_t len; + + len = duk_unicode_encode_xutf8((duk_ucodepoint_t) x, buf); + DUK_ASSERT(len >= 0); + DUK_BW_INSERT_ENSURE_BYTES(re_ctx->thr, &re_ctx->bw, offset, buf, (duk_size_t) len); + return (duk_uint32_t) len; +} + +DUK_LOCAL void duk__append_u32(duk_re_compiler_ctx *re_ctx, duk_uint32_t x) { + DUK_BW_WRITE_ENSURE_XUTF8(re_ctx->thr, &re_ctx->bw, x); +} + +DUK_LOCAL void duk__append_7bit(duk_re_compiler_ctx *re_ctx, duk_uint32_t x) { +#if defined(DUK_USE_PREFER_SIZE) + duk__append_u32(re_ctx, x); +#else + DUK_ASSERT(x <= 0x7fU); + DUK_BW_WRITE_ENSURE_U8(re_ctx->thr, &re_ctx->bw, (duk_uint8_t) x); +#endif +} + +#if 0 +DUK_LOCAL void duk__append_2bytes(duk_re_compiler_ctx *re_ctx, duk_uint8_t x, duk_uint8_t y) { + DUK_BW_WRITE_ENSURE_U8_2(re_ctx->thr, &re_ctx->bw, x, y); +} +#endif + +DUK_LOCAL duk_uint32_t duk__insert_i32(duk_re_compiler_ctx *re_ctx, duk_uint32_t offset, duk_int32_t x) { + return duk__insert_u32(re_ctx, offset, duk__encode_i32(x)); +} + +DUK_LOCAL void duk__append_reop(duk_re_compiler_ctx *re_ctx, duk_uint32_t reop) { + DUK_ASSERT(reop <= 0x7fU); + (void) duk__append_7bit(re_ctx, reop); +} + +#if 0 /* unused */ +DUK_LOCAL void duk__append_i32(duk_re_compiler_ctx *re_ctx, duk_int32_t x) { + duk__append_u32(re_ctx, duk__encode_i32(x)); +} +#endif + +/* special helper for emitting u16 lists (used for character ranges for built-in char classes) */ +DUK_LOCAL void duk__append_u16_list(duk_re_compiler_ctx *re_ctx, const duk_uint16_t *values, duk_uint32_t count) { + /* Call sites don't need the result length so it's not accumulated. */ + while (count-- > 0) { + duk__append_u32(re_ctx, (duk_uint32_t) (*values++)); + } +} + +DUK_LOCAL void duk__insert_slice(duk_re_compiler_ctx *re_ctx, + duk_uint32_t offset, + duk_uint32_t data_offset, + duk_uint32_t data_length) { + DUK_BW_INSERT_ENSURE_SLICE(re_ctx->thr, &re_ctx->bw, offset, data_offset, data_length); +} + +DUK_LOCAL void duk__append_slice(duk_re_compiler_ctx *re_ctx, duk_uint32_t data_offset, duk_uint32_t data_length) { + DUK_BW_WRITE_ENSURE_SLICE(re_ctx->thr, &re_ctx->bw, data_offset, data_length); +} + +DUK_LOCAL void duk__remove_slice(duk_re_compiler_ctx *re_ctx, duk_uint32_t data_offset, duk_uint32_t data_length) { + DUK_BW_REMOVE_ENSURE_SLICE(re_ctx->thr, &re_ctx->bw, data_offset, data_length); +} + +/* + * Insert a jump offset at 'offset' to complete an instruction + * (the jump offset is always the last component of an instruction). + * The 'skip' argument must be computed relative to 'offset', + * -without- taking into account the skip field being inserted. + * + * ... A B C ins X Y Z ... (ins may be a JUMP, SPLIT1/SPLIT2, etc) + * => ... A B C ins SKIP X Y Z + * + * Computing the final (adjusted) skip value, which is relative to the + * first byte of the next instruction, is a bit tricky because of the + * variable length UTF-8 encoding. See doc/regexp.rst for discussion. + */ +DUK_LOCAL duk_uint32_t duk__insert_jump_offset(duk_re_compiler_ctx *re_ctx, duk_uint32_t offset, duk_int32_t skip) { +#if 0 + /* Iterative solution. */ + if (skip < 0) { + duk_small_int_t len; + /* two encoding attempts suffices */ + len = duk_unicode_get_xutf8_length((duk_codepoint_t) duk__encode_i32(skip)); + len = duk_unicode_get_xutf8_length((duk_codepoint_t) duk__encode_i32(skip - (duk_int32_t) len)); + DUK_ASSERT(duk_unicode_get_xutf8_length(duk__encode_i32(skip - (duk_int32_t) len)) == len); /* no change */ + skip -= (duk_int32_t) len; + } +#endif + +#if defined(DUK_USE_PREFER_SIZE) + /* Closed form solution, this produces smallest code. + * See re_neg_jump_offset (closed2). + */ + if (skip < 0) { + skip--; + if (skip < -0x3fL) { + skip--; + } + if (skip < -0x3ffL) { + skip--; + } + if (skip < -0x7fffL) { + skip--; + } + if (skip < -0xfffffL) { + skip--; + } + if (skip < -0x1ffffffL) { + skip--; + } + if (skip < -0x3fffffffL) { + skip--; + } + } +#else /* DUK_USE_PREFER_SIZE */ + /* Closed form solution, this produces fastest code. + * See re_neg_jump_offset (closed1). + */ + if (skip < 0) { + if (skip >= -0x3eL) { + skip -= 1; + } else if (skip >= -0x3fdL) { + skip -= 2; + } else if (skip >= -0x7ffcL) { + skip -= 3; + } else if (skip >= -0xffffbL) { + skip -= 4; + } else if (skip >= -0x1fffffaL) { + skip -= 5; + } else if (skip >= -0x3ffffff9L) { + skip -= 6; + } else { + skip -= 7; + } + } +#endif /* DUK_USE_PREFER_SIZE */ + + return duk__insert_i32(re_ctx, offset, skip); +} + +DUK_LOCAL duk_uint32_t duk__append_jump_offset(duk_re_compiler_ctx *re_ctx, duk_int32_t skip) { + return (duk_uint32_t) duk__insert_jump_offset(re_ctx, (duk_uint32_t) DUK__RE_BUFLEN(re_ctx), skip); +} + +/* + * duk_re_range_callback for generating character class ranges. + * + * When ignoreCase is false, the range is simply emitted as is. We don't, + * for instance, eliminate duplicates or overlapping ranges in a character + * class. + * + * When ignoreCase is true but the 'direct' flag is set, the caller knows + * that the range canonicalizes to itself for case insensitive matching, + * so the range is emitted as is. This is mainly useful for built-in ranges + * like \W. + * + * Otherwise, when ignoreCase is true, the range needs to be normalized + * through canonicalization. Unfortunately a canonicalized version of a + * continuous range is not necessarily continuous (e.g. [x-{] is continuous + * but [X-{] is not). As a result, a single input range may expand to a lot + * of output ranges. The current algorithm creates the canonicalized ranges + * footprint efficiently at the cost of compile time execution time; see + * doc/regexp.rst for discussion, and some more details below. + * + * Note that the ctx->nranges is a context-wide temporary value. This is OK + * because there cannot be multiple character classes being parsed + * simultaneously. + * + * More detail on canonicalization: + * + * Conceptually, a range is canonicalized by scanning the entire range, + * normalizing each codepoint by converting it to uppercase, and generating + * a set of result ranges. + * + * Ideally a minimal set of output ranges would be emitted by merging all + * possible ranges even if they're emitted out of sequence. Because the + * input string is also case normalized during matching, some codepoints + * never occur at runtime; these "don't care" codepoints can be included or + * excluded from ranges when merging/optimizing ranges. + * + * The current algorithm does not do optimal range merging. Rather, output + * codepoints are generated in sequence, and when the output codepoints are + * continuous (CP, CP+1, CP+2, ...), they are merged locally into as large a + * range as possible. A small canonicalization bitmap is used to reduce + * actual codepoint canonicalizations which are quite slow at present. The + * bitmap provides a "codepoint block is continuous with respect to + * canonicalization" for N-codepoint blocks. This allows blocks to be + * skipped quickly. + * + * There are a number of shortcomings and future work here: + * + * - Individual codepoint normalizations are slow because they involve + * walking bit-packed rules without a lookup index. + * + * - The conceptual algorithm needs to canonicalize every codepoint in the + * input range to figure out the output range(s). Even with the small + * canonicalization bitmap the algorithm runs quite slowly for worst case + * inputs. There are many data structure alternatives to improve this. + * + * - While the current algorithm generates maximal output ranges when the + * output codepoints are emitted linearly, output ranges are not sorted or + * merged otherwise. In the worst case a lot of ranges are emitted when + * most of the ranges could be merged. In this process one could take + * advantage of "don't care" codepoints, which are never matched against at + * runtime due to canonicalization of input codepoints before comparison, + * to merge otherwise discontinuous output ranges. + * + * - The runtime data structure is just a linear list of ranges to match + * against. This can be quite slow if there are a lot of output ranges. + * There are various ways to make matching against the ranges faster, + * e.g. sorting the ranges and using a binary search; skip lists; tree + * based representations; full or approximate codepoint bitmaps, etc. + * + * - Only BMP is supported, codepoints above BMP are assumed to canonicalize + * to themselves. For now this is one place where we don't want to + * support chars outside the BMP, because the exhaustive search would be + * massively larger. It would be possible to support non-BMP with a + * different algorithm, or perhaps doing case normalization only at match + * time. + */ + +DUK_LOCAL void duk__regexp_emit_range(duk_re_compiler_ctx *re_ctx, duk_codepoint_t r1, duk_codepoint_t r2) { + DUK_ASSERT(r2 >= r1); + duk__append_u32(re_ctx, (duk_uint32_t) r1); + duk__append_u32(re_ctx, (duk_uint32_t) r2); + re_ctx->nranges++; +} + +#if defined(DUK_USE_REGEXP_CANON_BITMAP) +/* Find next canonicalization discontinuity (conservative estimate) starting + * from 'start', not exceeding 'end'. If continuity is fine up to 'end' + * inclusive, returns end. Minimum possible return value is start. + */ +DUK_LOCAL duk_codepoint_t duk__re_canon_next_discontinuity(duk_codepoint_t start, duk_codepoint_t end) { + duk_uint_t start_blk; + duk_uint_t end_blk; + duk_uint_t blk; + duk_uint_t offset; + duk_uint8_t mask; + + /* Inclusive block range. */ + DUK_ASSERT(start >= 0); + DUK_ASSERT(end >= 0); + DUK_ASSERT(end >= start); + start_blk = (duk_uint_t) (start >> DUK_CANON_BITMAP_BLKSHIFT); + end_blk = (duk_uint_t) (end >> DUK_CANON_BITMAP_BLKSHIFT); + + for (blk = start_blk; blk <= end_blk; blk++) { + offset = blk >> 3; + mask = 1U << (blk & 0x07); + if (offset >= sizeof(duk_unicode_re_canon_bitmap)) { + /* Reached non-BMP range which is assumed continuous. */ + return end; + } + DUK_ASSERT(offset < sizeof(duk_unicode_re_canon_bitmap)); + if ((duk_unicode_re_canon_bitmap[offset] & mask) == 0) { + /* Block is discontinuous, continuity is guaranteed + * only up to end of previous block (+1 for exclusive + * return value => start of current block). Start + * block requires special handling. + */ + if (blk > start_blk) { + return (duk_codepoint_t) (blk << DUK_CANON_BITMAP_BLKSHIFT); + } else { + return start; + } + } + } + DUK_ASSERT(blk == end_blk + 1); /* Reached end block which is continuous. */ + return end; +} +#else /* DUK_USE_REGEXP_CANON_BITMAP */ +DUK_LOCAL duk_codepoint_t duk__re_canon_next_discontinuity(duk_codepoint_t start, duk_codepoint_t end) { + DUK_ASSERT(start >= 0); + DUK_ASSERT(end >= 0); + DUK_ASSERT(end >= start); + if (start >= 0x10000) { + /* Even without the bitmap, treat non-BMP as continuous. */ + return end; + } + return start; +} +#endif /* DUK_USE_REGEXP_CANON_BITMAP */ + +DUK_LOCAL void duk__regexp_generate_ranges(void *userdata, duk_codepoint_t r1, duk_codepoint_t r2, duk_bool_t direct) { + duk_re_compiler_ctx *re_ctx = (duk_re_compiler_ctx *) userdata; + duk_codepoint_t r_start; + duk_codepoint_t r_end; + duk_codepoint_t i; + duk_codepoint_t t; + duk_codepoint_t r_disc; + + DUK_DD(DUK_DDPRINT("duk__regexp_generate_ranges(): re_ctx=%p, range=[%ld,%ld] direct=%ld", + (void *) re_ctx, + (long) r1, + (long) r2, + (long) direct)); + + DUK_ASSERT(r2 >= r1); /* SyntaxError for out of order range. */ + + if (direct || (re_ctx->re_flags & DUK_RE_FLAG_IGNORE_CASE) == 0) { + DUK_DD(DUK_DDPRINT("direct or not case sensitive, emit range: [%ld,%ld]", (long) r1, (long) r2)); + duk__regexp_emit_range(re_ctx, r1, r2); + return; + } + + DUK_DD(DUK_DDPRINT("case sensitive, process range: [%ld,%ld]", (long) r1, (long) r2)); + + r_start = duk_unicode_re_canonicalize_char(re_ctx->thr, r1); + r_end = r_start; + + for (i = r1 + 1; i <= r2;) { + /* Input codepoint space processed up to i-1, and + * current range in r_{start,end} is up-to-date + * (inclusive) and may either break or continue. + */ + r_disc = duk__re_canon_next_discontinuity(i, r2); + DUK_ASSERT(r_disc >= i); + DUK_ASSERT(r_disc <= r2); + + r_end += r_disc - i; /* May be zero. */ + t = duk_unicode_re_canonicalize_char(re_ctx->thr, r_disc); + if (t == r_end + 1) { + /* Not actually a discontinuity, continue range + * to r_disc and recheck. + */ + r_end = t; + } else { + duk__regexp_emit_range(re_ctx, r_start, r_end); + r_start = t; + r_end = t; + } + i = r_disc + 1; /* Guarantees progress. */ + } + duk__regexp_emit_range(re_ctx, r_start, r_end); + +#if 0 /* Exhaustive search, very slow. */ + r_start = duk_unicode_re_canonicalize_char(re_ctx->thr, r1); + r_end = r_start; + for (i = r1 + 1; i <= r2; i++) { + t = duk_unicode_re_canonicalize_char(re_ctx->thr, i); + if (t == r_end + 1) { + r_end = t; + } else { + DUK_DD(DUK_DDPRINT("canonicalized, emit range: [%ld,%ld]", (long) r_start, (long) r_end)); + duk__append_u32(re_ctx, (duk_uint32_t) r_start); + duk__append_u32(re_ctx, (duk_uint32_t) r_end); + re_ctx->nranges++; + r_start = t; + r_end = t; + } + } + DUK_DD(DUK_DDPRINT("canonicalized, emit range: [%ld,%ld]", (long) r_start, (long) r_end)); + duk__append_u32(re_ctx, (duk_uint32_t) r_start); + duk__append_u32(re_ctx, (duk_uint32_t) r_end); + re_ctx->nranges++; +#endif +} + +/* + * Parse regexp Disjunction. Most of regexp compilation happens here. + * + * Handles Disjunction, Alternative, and Term productions directly without + * recursion. The only constructs requiring recursion are positive/negative + * lookaheads, capturing parentheses, and non-capturing parentheses. + * + * The function determines whether the entire disjunction is a 'simple atom' + * (see doc/regexp.rst discussion on 'simple quantifiers') and if so, + * returns the atom character length which is needed by the caller to keep + * track of its own atom character length. A disjunction with more than one + * alternative is never considered a simple atom (although in some cases + * that might be the case). + * + * Return value: simple atom character length or < 0 if not a simple atom. + * Appends the bytecode for the disjunction matcher to the end of the temp + * buffer. + * + * Regexp top level structure is: + * + * Disjunction = Term* + * | Term* | Disjunction + * + * Term = Assertion + * | Atom + * | Atom Quantifier + * + * An empty Term sequence is a valid disjunction alternative (e.g. /|||c||/). + * + * Notes: + * + * * Tracking of the 'simple-ness' of the current atom vs. the entire + * disjunction are separate matters. For instance, the disjunction + * may be complex, but individual atoms may be simple. Furthermore, + * simple quantifiers are used whenever possible, even if the + * disjunction as a whole is complex. + * + * * The estimate of whether an atom is simple is conservative now, + * and it would be possible to expand it. For instance, captures + * cause the disjunction to be marked complex, even though captures + * -can- be handled by simple quantifiers with some minor modifications. + * + * * Disjunction 'tainting' as 'complex' is handled at the end of the + * main for loop collectively for atoms. Assertions, quantifiers, + * and '|' tokens need to taint the result manually if necessary. + * Assertions cannot add to result char length, only atoms (and + * quantifiers) can; currently quantifiers will taint the result + * as complex though. + */ + +DUK_LOCAL const duk_uint16_t * const duk__re_range_lookup1[3] = { duk_unicode_re_ranges_digit, + duk_unicode_re_ranges_white, + duk_unicode_re_ranges_wordchar }; +DUK_LOCAL const duk_uint8_t duk__re_range_lookup2[3] = { sizeof(duk_unicode_re_ranges_digit) / (2 * sizeof(duk_uint16_t)), + sizeof(duk_unicode_re_ranges_white) / (2 * sizeof(duk_uint16_t)), + sizeof(duk_unicode_re_ranges_wordchar) / (2 * sizeof(duk_uint16_t)) }; + +DUK_LOCAL void duk__append_range_atom_matcher(duk_re_compiler_ctx *re_ctx, + duk_small_uint_t re_op, + const duk_uint16_t *ranges, + duk_small_uint_t count) { +#if 0 + DUK_ASSERT(re_op <= 0x7fUL); + DUK_ASSERT(count <= 0x7fUL); + duk__append_2bytes(re_ctx, (duk_uint8_t) re_op, (duk_uint8_t) count); +#endif + duk__append_reop(re_ctx, re_op); + duk__append_7bit(re_ctx, count); + duk__append_u16_list(re_ctx, ranges, count * 2); +} + +DUK_LOCAL void duk__parse_disjunction(duk_re_compiler_ctx *re_ctx, duk_bool_t expect_eof, duk__re_disjunction_info *out_atom_info) { + duk_int32_t atom_start_offset = -1; /* negative -> no atom matched on previous round */ + duk_int32_t atom_char_length = 0; /* negative -> complex atom */ + duk_uint32_t atom_start_captures = re_ctx->captures; /* value of re_ctx->captures at start of atom */ + duk_int32_t unpatched_disjunction_split = -1; + duk_int32_t unpatched_disjunction_jump = -1; + duk_uint32_t entry_offset = (duk_uint32_t) DUK__RE_BUFLEN(re_ctx); + duk_int32_t res_charlen = 0; /* -1 if disjunction is complex, char length if simple */ + duk__re_disjunction_info tmp_disj; + + DUK_ASSERT(out_atom_info != NULL); + + duk_native_stack_check(re_ctx->thr); + if (re_ctx->recursion_depth >= re_ctx->recursion_limit) { + DUK_ERROR_RANGE(re_ctx->thr, DUK_STR_REGEXP_COMPILER_RECURSION_LIMIT); + DUK_WO_NORETURN(return;); + } + re_ctx->recursion_depth++; + +#if 0 + out_atom_info->start_captures = re_ctx->captures; +#endif + + for (;;) { + /* atom_char_length, atom_start_offset, atom_start_offset reflect the + * atom matched on the previous loop. If a quantifier is encountered + * on this loop, these are needed to handle the quantifier correctly. + * new_atom_char_length etc are for the atom parsed on this round; + * they're written to atom_char_length etc at the end of the round. + */ + duk_int32_t new_atom_char_length; /* char length of the atom parsed in this loop */ + duk_int32_t new_atom_start_offset; /* bytecode start offset of the atom parsed in this loop + * (allows quantifiers to copy the atom bytecode) + */ + duk_uint32_t new_atom_start_captures; /* re_ctx->captures at the start of the atom parsed in this loop */ + + duk_lexer_parse_re_token(&re_ctx->lex, &re_ctx->curr_token); + + DUK_DD(DUK_DDPRINT( + "re token: %ld (num=%ld, char=%c)", + (long) re_ctx->curr_token.t, + (long) re_ctx->curr_token.num, + (re_ctx->curr_token.num >= 0x20 && re_ctx->curr_token.num <= 0x7e) ? (int) re_ctx->curr_token.num : (int) '?')); + + /* set by atom case clauses */ + new_atom_start_offset = -1; + new_atom_char_length = -1; + new_atom_start_captures = re_ctx->captures; + + switch (re_ctx->curr_token.t) { + case DUK_RETOK_DISJUNCTION: { + /* + * The handling here is a bit tricky. If a previous '|' has been processed, + * we have a pending split1 and a pending jump (for a previous match). These + * need to be back-patched carefully. See docs for a detailed example. + */ + + /* patch pending jump and split */ + if (unpatched_disjunction_jump >= 0) { + duk_uint32_t offset; + + DUK_ASSERT(unpatched_disjunction_split >= 0); + offset = (duk_uint32_t) unpatched_disjunction_jump; + offset += duk__insert_jump_offset(re_ctx, offset, (duk_int32_t) (DUK__RE_BUFLEN(re_ctx) - offset)); + /* offset is now target of the pending split (right after jump) */ + duk__insert_jump_offset(re_ctx, + (duk_uint32_t) unpatched_disjunction_split, + (duk_int32_t) offset - unpatched_disjunction_split); + } + + /* add a new pending split to the beginning of the entire disjunction */ + (void) duk__insert_u32(re_ctx, entry_offset, DUK_REOP_SPLIT1); /* prefer direct execution */ + unpatched_disjunction_split = (duk_int32_t) (entry_offset + 1); /* +1 for opcode */ + + /* add a new pending match jump for latest finished alternative */ + duk__append_reop(re_ctx, DUK_REOP_JUMP); + unpatched_disjunction_jump = (duk_int32_t) DUK__RE_BUFLEN(re_ctx); + + /* 'taint' result as complex */ + res_charlen = -1; + break; + } + case DUK_RETOK_QUANTIFIER: { + if (atom_start_offset < 0) { + DUK_ERROR_SYNTAX(re_ctx->thr, DUK_STR_INVALID_QUANTIFIER_NO_ATOM); + DUK_WO_NORETURN(return;); + } + if (re_ctx->curr_token.qmin > re_ctx->curr_token.qmax) { + DUK_ERROR_SYNTAX(re_ctx->thr, DUK_STR_INVALID_QUANTIFIER_VALUES); + DUK_WO_NORETURN(return;); + } + if (atom_char_length >= 0) { + /* + * Simple atom + * + * If atom_char_length is zero, we'll have unbounded execution time for e.g. + * /()*x/.exec('x'). We can't just skip the match because it might have some + * side effects (for instance, if we allowed captures in simple atoms, the + * capture needs to happen). The simple solution below is to force the + * quantifier to match at most once, since the additional matches have no effect. + * + * With a simple atom there can be no capture groups, so no captures need + * to be reset. + */ + duk_int32_t atom_code_length; + duk_uint32_t offset; + duk_uint32_t qmin, qmax; + + qmin = re_ctx->curr_token.qmin; + qmax = re_ctx->curr_token.qmax; + if (atom_char_length == 0) { + /* qmin and qmax will be 0 or 1 */ + if (qmin > 1) { + qmin = 1; + } + if (qmax > 1) { + qmax = 1; + } + } + + duk__append_reop(re_ctx, DUK_REOP_MATCH); /* complete 'sub atom' */ + atom_code_length = (duk_int32_t) (DUK__RE_BUFLEN(re_ctx) - (duk_size_t) atom_start_offset); + + offset = (duk_uint32_t) atom_start_offset; + if (re_ctx->curr_token.greedy) { + offset += duk__insert_u32(re_ctx, offset, DUK_REOP_SQGREEDY); + offset += duk__insert_u32(re_ctx, offset, qmin); + offset += duk__insert_u32(re_ctx, offset, qmax); + offset += duk__insert_u32(re_ctx, offset, (duk_uint32_t) atom_char_length); + offset += duk__insert_jump_offset(re_ctx, offset, atom_code_length); + } else { + offset += duk__insert_u32(re_ctx, offset, DUK_REOP_SQMINIMAL); + offset += duk__insert_u32(re_ctx, offset, qmin); + offset += duk__insert_u32(re_ctx, offset, qmax); + offset += duk__insert_jump_offset(re_ctx, offset, atom_code_length); + } + DUK_UNREF(offset); /* silence scan-build warning */ + } else { + /* + * Complex atom + * + * The original code is used as a template, and removed at the end + * (this differs from the handling of simple quantifiers). + * + * NOTE: there is no current solution for empty atoms in complex + * quantifiers. This would need some sort of a 'progress' instruction. + * + * XXX: impose limit on maximum result size, i.e. atom_code_len * atom_copies? + */ + duk_int32_t atom_code_length; + duk_uint32_t atom_copies; + duk_uint32_t tmp_qmin, tmp_qmax; + + /* pre-check how many atom copies we're willing to make (atom_copies not needed below) */ + atom_copies = (re_ctx->curr_token.qmax == DUK_RE_QUANTIFIER_INFINITE) ? re_ctx->curr_token.qmin : + re_ctx->curr_token.qmax; + if (atom_copies > DUK_RE_MAX_ATOM_COPIES) { + DUK_ERROR_RANGE(re_ctx->thr, DUK_STR_QUANTIFIER_TOO_MANY_COPIES); + DUK_WO_NORETURN(return;); + } + + /* wipe the capture range made by the atom (if any) */ + DUK_ASSERT(atom_start_captures <= re_ctx->captures); + if (atom_start_captures != re_ctx->captures) { + DUK_ASSERT(atom_start_captures < re_ctx->captures); + DUK_DDD(DUK_DDDPRINT("must wipe ]atom_start_captures,re_ctx->captures]: ]%ld,%ld]", + (long) atom_start_captures, + (long) re_ctx->captures)); + + /* insert (DUK_REOP_WIPERANGE, start, count) in reverse order so the order ends up right */ + duk__insert_u32(re_ctx, + (duk_uint32_t) atom_start_offset, + (re_ctx->captures - atom_start_captures) * 2U); + duk__insert_u32(re_ctx, (duk_uint32_t) atom_start_offset, (atom_start_captures + 1) * 2); + duk__insert_u32(re_ctx, (duk_uint32_t) atom_start_offset, DUK_REOP_WIPERANGE); + } else { + DUK_DDD( + DUK_DDDPRINT("no need to wipe captures: atom_start_captures == re_ctx->captures == %ld", + (long) atom_start_captures)); + } + + atom_code_length = (duk_int32_t) DUK__RE_BUFLEN(re_ctx) - atom_start_offset; + + /* insert the required matches (qmin) by copying the atom */ + tmp_qmin = re_ctx->curr_token.qmin; + tmp_qmax = re_ctx->curr_token.qmax; + while (tmp_qmin > 0) { + duk__append_slice(re_ctx, + (duk_uint32_t) atom_start_offset, + (duk_uint32_t) atom_code_length); + tmp_qmin--; + if (tmp_qmax != DUK_RE_QUANTIFIER_INFINITE) { + tmp_qmax--; + } + } + DUK_ASSERT(tmp_qmin == 0); + + /* insert code for matching the remainder - infinite or finite */ + if (tmp_qmax == DUK_RE_QUANTIFIER_INFINITE) { + /* reuse last emitted atom for remaining 'infinite' quantifier */ + + if (re_ctx->curr_token.qmin == 0) { + /* Special case: original qmin was zero so there is nothing + * to repeat. Emit an atom copy but jump over it here. + */ + duk__append_reop(re_ctx, DUK_REOP_JUMP); + duk__append_jump_offset(re_ctx, atom_code_length); + duk__append_slice(re_ctx, + (duk_uint32_t) atom_start_offset, + (duk_uint32_t) atom_code_length); + } + if (re_ctx->curr_token.greedy) { + duk__append_reop(re_ctx, DUK_REOP_SPLIT2); /* prefer jump */ + } else { + duk__append_reop(re_ctx, DUK_REOP_SPLIT1); /* prefer direct */ + } + duk__append_jump_offset(re_ctx, -atom_code_length - 1); /* -1 for opcode */ + } else { + /* + * The remaining matches are emitted as sequence of SPLITs and atom + * copies; the SPLITs skip the remaining copies and match the sequel. + * This sequence needs to be emitted starting from the last copy + * because the SPLITs are variable length due to the variable length + * skip offset. This causes a lot of memory copying now. + * + * Example structure (greedy, match maximum # atoms): + * + * SPLIT1 LSEQ + * (atom) + * SPLIT1 LSEQ ; <- the byte length of this instruction is needed + * (atom) ; to encode the above SPLIT1 correctly + * ... + * LSEQ: + */ + duk_uint32_t offset = (duk_uint32_t) DUK__RE_BUFLEN(re_ctx); + while (tmp_qmax > 0) { + duk__insert_slice(re_ctx, + offset, + (duk_uint32_t) atom_start_offset, + (duk_uint32_t) atom_code_length); + if (re_ctx->curr_token.greedy) { + duk__insert_u32(re_ctx, offset, DUK_REOP_SPLIT1); /* prefer direct */ + } else { + duk__insert_u32(re_ctx, offset, DUK_REOP_SPLIT2); /* prefer jump */ + } + duk__insert_jump_offset(re_ctx, + offset + 1, /* +1 for opcode */ + (duk_int32_t) (DUK__RE_BUFLEN(re_ctx) - (offset + 1))); + tmp_qmax--; + } + } + + /* remove the original 'template' atom */ + duk__remove_slice(re_ctx, (duk_uint32_t) atom_start_offset, (duk_uint32_t) atom_code_length); + } + + /* 'taint' result as complex */ + res_charlen = -1; + break; + } + case DUK_RETOK_ASSERT_START: { + duk__append_reop(re_ctx, DUK_REOP_ASSERT_START); + break; + } + case DUK_RETOK_ASSERT_END: { + duk__append_reop(re_ctx, DUK_REOP_ASSERT_END); + break; + } + case DUK_RETOK_ASSERT_WORD_BOUNDARY: { + duk__append_reop(re_ctx, DUK_REOP_ASSERT_WORD_BOUNDARY); + break; + } + case DUK_RETOK_ASSERT_NOT_WORD_BOUNDARY: { + duk__append_reop(re_ctx, DUK_REOP_ASSERT_NOT_WORD_BOUNDARY); + break; + } + case DUK_RETOK_ASSERT_START_POS_LOOKAHEAD: + case DUK_RETOK_ASSERT_START_NEG_LOOKAHEAD: { + duk_uint32_t offset; + duk_uint32_t opcode = + (re_ctx->curr_token.t == DUK_RETOK_ASSERT_START_POS_LOOKAHEAD) ? DUK_REOP_LOOKPOS : DUK_REOP_LOOKNEG; + + offset = (duk_uint32_t) DUK__RE_BUFLEN(re_ctx); + duk__parse_disjunction(re_ctx, 0, &tmp_disj); + duk__append_reop(re_ctx, DUK_REOP_MATCH); + + (void) duk__insert_u32(re_ctx, offset, opcode); + (void) duk__insert_jump_offset(re_ctx, + offset + 1, /* +1 for opcode */ + (duk_int32_t) (DUK__RE_BUFLEN(re_ctx) - (offset + 1))); + + /* 'taint' result as complex -- this is conservative, + * as lookaheads do not backtrack. + */ + res_charlen = -1; + break; + } + case DUK_RETOK_ATOM_PERIOD: { + new_atom_char_length = 1; + new_atom_start_offset = (duk_int32_t) DUK__RE_BUFLEN(re_ctx); + duk__append_reop(re_ctx, DUK_REOP_PERIOD); + break; + } + case DUK_RETOK_ATOM_CHAR: { + /* Note: successive characters could be joined into string matches + * but this is not trivial (consider e.g. '/xyz+/); see docs for + * more discussion. + * + * No support for \u{H+} yet. While only BMP Unicode escapes are + * supported for RegExps at present, 'ch' may still be a non-BMP + * codepoint if it is decoded straight from source text UTF-8. + * There's no non-BMP support yet so this is handled simply by + * matching the non-BMP character (which is custom behavior). + */ + duk_uint32_t ch; + + new_atom_char_length = 1; + new_atom_start_offset = (duk_int32_t) DUK__RE_BUFLEN(re_ctx); + duk__append_reop(re_ctx, DUK_REOP_CHAR); + ch = re_ctx->curr_token.num; + if (re_ctx->re_flags & DUK_RE_FLAG_IGNORE_CASE) { + ch = (duk_uint32_t) duk_unicode_re_canonicalize_char(re_ctx->thr, (duk_codepoint_t) ch); + } + duk__append_u32(re_ctx, ch); + break; + } + case DUK_RETOK_ATOM_DIGIT: + case DUK_RETOK_ATOM_NOT_DIGIT: + case DUK_RETOK_ATOM_WHITE: + case DUK_RETOK_ATOM_NOT_WHITE: + case DUK_RETOK_ATOM_WORD_CHAR: + case DUK_RETOK_ATOM_NOT_WORD_CHAR: { + duk_small_uint_t re_op; + duk_small_uint_t idx; + + new_atom_char_length = 1; + new_atom_start_offset = (duk_int32_t) DUK__RE_BUFLEN(re_ctx); + + DUK_ASSERT((DUK_RETOK_ATOM_DIGIT & 0x01) != 0); + DUK_ASSERT((DUK_RETOK_ATOM_WHITE & 0x01) != 0); + DUK_ASSERT((DUK_RETOK_ATOM_WORD_CHAR & 0x01) != 0); + DUK_ASSERT((DUK_RETOK_ATOM_NOT_DIGIT & 0x01) == 0); + DUK_ASSERT((DUK_RETOK_ATOM_NOT_WHITE & 0x01) == 0); + DUK_ASSERT((DUK_RETOK_ATOM_NOT_WORD_CHAR & 0x01) == 0); + re_op = (re_ctx->curr_token.t & 0x01) ? DUK_REOP_RANGES : DUK_REOP_INVRANGES; + + DUK_ASSERT(DUK_RETOK_ATOM_WHITE == DUK_RETOK_ATOM_DIGIT + 2); + DUK_ASSERT(DUK_RETOK_ATOM_WORD_CHAR == DUK_RETOK_ATOM_DIGIT + 4); + idx = (duk_small_uint_t) ((re_ctx->curr_token.t - DUK_RETOK_ATOM_DIGIT) >> 1U); + DUK_ASSERT(idx <= 2U); /* Assume continuous token numbers; also checks negative underflow. */ + + duk__append_range_atom_matcher(re_ctx, re_op, duk__re_range_lookup1[idx], duk__re_range_lookup2[idx]); + break; + } + case DUK_RETOK_ATOM_BACKREFERENCE: { + duk_uint32_t backref = (duk_uint32_t) re_ctx->curr_token.num; + if (backref > re_ctx->highest_backref) { + re_ctx->highest_backref = backref; + } + new_atom_char_length = -1; /* mark as complex */ + new_atom_start_offset = (duk_int32_t) DUK__RE_BUFLEN(re_ctx); + duk__append_reop(re_ctx, DUK_REOP_BACKREFERENCE); + duk__append_u32(re_ctx, backref); + break; + } + case DUK_RETOK_ATOM_START_CAPTURE_GROUP: { + duk_uint32_t cap; + + new_atom_char_length = -1; /* mark as complex (capture handling) */ + new_atom_start_offset = (duk_int32_t) DUK__RE_BUFLEN(re_ctx); + cap = ++re_ctx->captures; + duk__append_reop(re_ctx, DUK_REOP_SAVE); + duk__append_u32(re_ctx, cap * 2); + duk__parse_disjunction(re_ctx, + 0, + &tmp_disj); /* retval (sub-atom char length) unused, tainted as complex above */ + duk__append_reop(re_ctx, DUK_REOP_SAVE); + duk__append_u32(re_ctx, cap * 2 + 1); + break; + } + case DUK_RETOK_ATOM_START_NONCAPTURE_GROUP: { + new_atom_start_offset = (duk_int32_t) DUK__RE_BUFLEN(re_ctx); + duk__parse_disjunction(re_ctx, 0, &tmp_disj); + new_atom_char_length = tmp_disj.charlen; + break; + } + case DUK_RETOK_ATOM_START_CHARCLASS: + case DUK_RETOK_ATOM_START_CHARCLASS_INVERTED: { + /* + * Range parsing is done with a special lexer function which calls + * us for every range parsed. This is different from how rest of + * the parsing works, but avoids a heavy, arbitrary size intermediate + * value type to hold the ranges. + * + * Another complication is the handling of character ranges when + * case insensitive matching is used (see docs for discussion). + * The range handler callback given to the lexer takes care of this + * as well. + * + * Note that duplicate ranges are not eliminated when parsing character + * classes, so that canonicalization of + * + * [0-9a-fA-Fx-{] + * + * creates the result (note the duplicate ranges): + * + * [0-9A-FA-FX-Z{-{] + * + * where [x-{] is split as a result of canonicalization. The duplicate + * ranges are not a semantics issue: they work correctly. + */ + + duk_uint32_t offset; + + DUK_DD(DUK_DDPRINT("character class")); + + /* insert ranges instruction, range count patched in later */ + new_atom_char_length = 1; + new_atom_start_offset = (duk_int32_t) DUK__RE_BUFLEN(re_ctx); + duk__append_reop(re_ctx, + (re_ctx->curr_token.t == DUK_RETOK_ATOM_START_CHARCLASS) ? DUK_REOP_RANGES : + DUK_REOP_INVRANGES); + offset = (duk_uint32_t) DUK__RE_BUFLEN(re_ctx); /* patch in range count later */ + + /* parse ranges until character class ends */ + re_ctx->nranges = 0; /* note: ctx-wide temporary */ + duk_lexer_parse_re_ranges(&re_ctx->lex, duk__regexp_generate_ranges, (void *) re_ctx); + + /* insert range count */ + duk__insert_u32(re_ctx, offset, re_ctx->nranges); + break; + } + case DUK_RETOK_ATOM_END_GROUP: { + if (expect_eof) { + DUK_ERROR_SYNTAX(re_ctx->thr, DUK_STR_UNEXPECTED_CLOSING_PAREN); + DUK_WO_NORETURN(return;); + } + goto done; + } + case DUK_RETOK_EOF: { + if (!expect_eof) { + DUK_ERROR_SYNTAX(re_ctx->thr, DUK_STR_UNEXPECTED_END_OF_PATTERN); + DUK_WO_NORETURN(return;); + } + goto done; + } + default: { + DUK_ERROR_SYNTAX(re_ctx->thr, DUK_STR_UNEXPECTED_REGEXP_TOKEN); + DUK_WO_NORETURN(return;); + } + } + + /* a complex (new) atom taints the result */ + if (new_atom_start_offset >= 0) { + if (new_atom_char_length < 0) { + res_charlen = -1; + } else if (res_charlen >= 0) { + /* only advance if not tainted */ + res_charlen += new_atom_char_length; + } + } + + /* record previous atom info in case next token is a quantifier */ + atom_start_offset = new_atom_start_offset; + atom_char_length = new_atom_char_length; + atom_start_captures = new_atom_start_captures; + } + +done: + + /* finish up pending jump and split for last alternative */ + if (unpatched_disjunction_jump >= 0) { + duk_uint32_t offset; + + DUK_ASSERT(unpatched_disjunction_split >= 0); + offset = (duk_uint32_t) unpatched_disjunction_jump; + offset += duk__insert_jump_offset(re_ctx, offset, (duk_int32_t) (DUK__RE_BUFLEN(re_ctx) - offset)); + /* offset is now target of the pending split (right after jump) */ + duk__insert_jump_offset(re_ctx, + (duk_uint32_t) unpatched_disjunction_split, + (duk_int32_t) offset - unpatched_disjunction_split); + } + +#if 0 + out_atom_info->end_captures = re_ctx->captures; +#endif + out_atom_info->charlen = res_charlen; + DUK_DDD(DUK_DDDPRINT("parse disjunction finished: charlen=%ld", (long) out_atom_info->charlen)); + + re_ctx->recursion_depth--; +} + +/* + * Flags parsing (see E5 Section 15.10.4.1). + */ + +DUK_LOCAL duk_uint32_t duk__parse_regexp_flags(duk_hthread *thr, duk_hstring *h) { + const duk_uint8_t *p; + const duk_uint8_t *p_end; + duk_uint32_t flags = 0; + + p = DUK_HSTRING_GET_DATA(h); + p_end = p + DUK_HSTRING_GET_BYTELEN(h); + + /* Note: can be safely scanned as bytes (undecoded) */ + + while (p < p_end) { + duk_uint8_t c = *p++; + switch (c) { + case (duk_uint8_t) 'g': { + if (flags & DUK_RE_FLAG_GLOBAL) { + goto flags_error; + } + flags |= DUK_RE_FLAG_GLOBAL; + break; + } + case (duk_uint8_t) 'i': { + if (flags & DUK_RE_FLAG_IGNORE_CASE) { + goto flags_error; + } + flags |= DUK_RE_FLAG_IGNORE_CASE; + break; + } + case (duk_uint8_t) 'm': { + if (flags & DUK_RE_FLAG_MULTILINE) { + goto flags_error; + } + flags |= DUK_RE_FLAG_MULTILINE; + break; + } + default: { + goto flags_error; + } + } + } + + return flags; + +flags_error: + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_REGEXP_FLAGS); + DUK_WO_NORETURN(return 0U;); +} + +/* + * Create escaped RegExp source (E5 Section 15.10.3). + * + * The current approach is to special case the empty RegExp + * ('' -> '(?:)') and otherwise replace unescaped '/' characters + * with '\/' regardless of where they occur in the regexp. + * + * Note that normalization does not seem to be necessary for + * RegExp literals (e.g. '/foo/') because to be acceptable as + * a RegExp literal, the text between forward slashes must + * already match the escaping requirements (e.g. must not contain + * unescaped forward slashes or be empty). Escaping IS needed + * for expressions like 'new Regexp("...", "")' however. + * Currently, we re-escape in either case. + * + * Also note that we process the source here in UTF-8 encoded + * form. This is correct, because any non-ASCII characters are + * passed through without change. + */ + +DUK_LOCAL void duk__create_escaped_source(duk_hthread *thr, int idx_pattern) { + duk_hstring *h; + const duk_uint8_t *p; + duk_bufwriter_ctx bw_alloc; + duk_bufwriter_ctx *bw; + duk_uint8_t *q; + duk_size_t i, n; + duk_uint_fast8_t c_prev, c; + + h = duk_known_hstring(thr, idx_pattern); + p = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h); + n = (duk_size_t) DUK_HSTRING_GET_BYTELEN(h); + + if (n == 0) { + duk_push_literal(thr, "(?:)"); + return; + } + + bw = &bw_alloc; + DUK_BW_INIT_PUSHBUF(thr, bw, n); + q = DUK_BW_GET_PTR(thr, bw); + + c_prev = (duk_uint_fast8_t) 0; + + for (i = 0; i < n; i++) { + c = p[i]; + + q = DUK_BW_ENSURE_RAW(thr, bw, 2, q); + + if (c == (duk_uint_fast8_t) '/' && c_prev != (duk_uint_fast8_t) '\\') { + /* Unescaped '/' ANYWHERE in the regexp (in disjunction, + * inside a character class, ...) => same escape works. + */ + *q++ = DUK_ASC_BACKSLASH; + } + *q++ = (duk_uint8_t) c; + + c_prev = c; + } + + DUK_BW_SETPTR_AND_COMPACT(thr, bw, q); + (void) duk_buffer_to_string(thr, -1); /* Safe if input is safe. */ + + /* [ ... escaped_source ] */ +} + +/* + * Exposed regexp compilation primitive. + * + * Sets up a regexp compilation context, and calls duk__parse_disjunction() to do the + * actual parsing. Handles generation of the compiled regexp header and the + * "boilerplate" capture of the matching substring (save 0 and 1). Also does some + * global level regexp checks after recursive compilation has finished. + * + * An escaped version of the regexp source, suitable for use as a RegExp instance + * 'source' property (see E5 Section 15.10.3), is also left on the stack. + * + * Input stack: [ pattern flags ] + * Output stack: [ bytecode escaped_source ] (both as strings) + */ + +DUK_INTERNAL void duk_regexp_compile(duk_hthread *thr) { + duk_re_compiler_ctx re_ctx; + duk_lexer_point lex_point; + duk_hstring *h_pattern; + duk_hstring *h_flags; + duk__re_disjunction_info ign_disj; + + DUK_ASSERT(thr != NULL); + + /* + * Args validation + */ + + /* TypeError if fails */ + h_pattern = duk_require_hstring_notsymbol(thr, -2); + h_flags = duk_require_hstring_notsymbol(thr, -1); + + /* + * Create normalized 'source' property (E5 Section 15.10.3). + */ + + /* [ ... pattern flags ] */ + + duk__create_escaped_source(thr, -2); + + /* [ ... pattern flags escaped_source ] */ + + /* + * Init compilation context + */ + + /* [ ... pattern flags escaped_source buffer ] */ + + duk_memzero(&re_ctx, sizeof(re_ctx)); + DUK_LEXER_INITCTX(&re_ctx.lex); /* duplicate zeroing, expect for (possible) NULL inits */ + re_ctx.thr = thr; + re_ctx.lex.thr = thr; + re_ctx.lex.input = DUK_HSTRING_GET_DATA(h_pattern); + re_ctx.lex.input_length = DUK_HSTRING_GET_BYTELEN(h_pattern); + re_ctx.lex.token_limit = DUK_RE_COMPILE_TOKEN_LIMIT; + re_ctx.recursion_limit = DUK_USE_REGEXP_COMPILER_RECLIMIT; + re_ctx.re_flags = duk__parse_regexp_flags(thr, h_flags); + + DUK_BW_INIT_PUSHBUF(thr, &re_ctx.bw, DUK__RE_INITIAL_BUFSIZE); + + DUK_DD(DUK_DDPRINT("regexp compiler ctx initialized, flags=0x%08lx, recursion_limit=%ld", + (unsigned long) re_ctx.re_flags, + (long) re_ctx.recursion_limit)); + + /* + * Init lexer + */ + + lex_point.offset = 0; /* expensive init, just want to fill window */ + lex_point.line = 1; + DUK_LEXER_SETPOINT(&re_ctx.lex, &lex_point); + + /* + * Compilation + */ + + DUK_DD(DUK_DDPRINT("starting regexp compilation")); + + duk__append_reop(&re_ctx, DUK_REOP_SAVE); + duk__append_7bit(&re_ctx, 0); + duk__parse_disjunction(&re_ctx, 1 /*expect_eof*/, &ign_disj); + duk__append_reop(&re_ctx, DUK_REOP_SAVE); + duk__append_7bit(&re_ctx, 1); + duk__append_reop(&re_ctx, DUK_REOP_MATCH); + + /* + * Check for invalid backreferences; note that it is NOT an error + * to back-reference a capture group which has not yet been introduced + * in the pattern (as in /\1(foo)/); in fact, the backreference will + * always match! It IS an error to back-reference a capture group + * which will never be introduced in the pattern. Thus, we can check + * for such references only after parsing is complete. + */ + + if (re_ctx.highest_backref > re_ctx.captures) { + DUK_ERROR_SYNTAX(thr, DUK_STR_INVALID_BACKREFS); + DUK_WO_NORETURN(return;); + } + + /* + * Emit compiled regexp header: flags, ncaptures + * (insertion order inverted on purpose) + */ + + duk__insert_u32(&re_ctx, 0, (re_ctx.captures + 1) * 2); + duk__insert_u32(&re_ctx, 0, re_ctx.re_flags); + + /* [ ... pattern flags escaped_source buffer ] */ + + DUK_BW_COMPACT(thr, &re_ctx.bw); + (void) duk_buffer_to_string(thr, -1); /* Safe because flags is at most 7 bit. */ + + /* [ ... pattern flags escaped_source bytecode ] */ + + /* + * Finalize stack + */ + + duk_remove(thr, -4); /* -> [ ... flags escaped_source bytecode ] */ + duk_remove(thr, -3); /* -> [ ... escaped_source bytecode ] */ + + DUK_DD(DUK_DDPRINT("regexp compilation successful, bytecode: %!T, escaped source: %!T", + (duk_tval *) duk_get_tval(thr, -1), + (duk_tval *) duk_get_tval(thr, -2))); +} + +/* + * Create a RegExp instance (E5 Section 15.10.7). + * + * Note: the output stack left by duk_regexp_compile() is directly compatible + * with the input here. + * + * Input stack: [ escaped_source bytecode ] (both as strings) + * Output stack: [ RegExp ] + */ + +DUK_INTERNAL void duk_regexp_create_instance(duk_hthread *thr) { + duk_hobject *h; + + /* [ ... escaped_source bytecode ] */ + + duk_push_object(thr); + h = duk_known_hobject(thr, -1); + duk_insert(thr, -3); + + /* [ ... regexp_object escaped_source bytecode ] */ + + DUK_HOBJECT_SET_CLASS_NUMBER(h, DUK_HOBJECT_CLASS_REGEXP); + DUK_HOBJECT_SET_PROTOTYPE_UPDREF(thr, h, thr->builtins[DUK_BIDX_REGEXP_PROTOTYPE]); + + duk_xdef_prop_stridx_short(thr, -3, DUK_STRIDX_INT_BYTECODE, DUK_PROPDESC_FLAGS_NONE); + + /* [ ... regexp_object escaped_source ] */ + + /* In ES2015 .source, and the .global, .multiline, etc flags are + * inherited getters. Store the escaped source as an internal + * property for the getter. + */ + + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_INT_SOURCE, DUK_PROPDESC_FLAGS_NONE); + + /* [ ... regexp_object ] */ + + duk_push_int(thr, 0); + duk_xdef_prop_stridx_short(thr, -2, DUK_STRIDX_LAST_INDEX, DUK_PROPDESC_FLAGS_W); + + /* [ ... regexp_object ] */ +} + +#else /* DUK_USE_REGEXP_SUPPORT */ + +/* regexp support disabled */ + +#endif /* DUK_USE_REGEXP_SUPPORT */ + +/* automatic undefs */ +#undef DUK__RE_BUFLEN +#undef DUK__RE_INITIAL_BUFSIZE +#line 1 "duk_regexp_executor.c" +/* + * Regexp executor. + * + * Safety: the ECMAScript executor should prevent user from reading and + * replacing regexp bytecode. Even so, the executor must validate all + * memory accesses etc. When an invalid access is detected (e.g. a 'save' + * opcode to invalid, unallocated index) it should fail with an internal + * error but not cause a segmentation fault. + * + * Notes: + * + * - Backtrack counts are limited to unsigned 32 bits but should + * technically be duk_size_t for strings longer than 4G chars. + * This also requires a regexp bytecode change. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_REGEXP_SUPPORT) + +/* + * Helpers for UTF-8 handling + * + * For bytecode readers the duk_uint32_t and duk_int32_t types are correct + * because they're used for more than just codepoints. + */ + +DUK_LOCAL duk_uint32_t duk__bc_get_u32(duk_re_matcher_ctx *re_ctx, const duk_uint8_t **pc) { + return (duk_uint32_t) duk_unicode_decode_xutf8_checked(re_ctx->thr, pc, re_ctx->bytecode, re_ctx->bytecode_end); +} + +DUK_LOCAL duk_int32_t duk__bc_get_i32(duk_re_matcher_ctx *re_ctx, const duk_uint8_t **pc) { + duk_uint32_t t; + + /* signed integer encoding needed to work with UTF-8 */ + t = (duk_uint32_t) duk_unicode_decode_xutf8_checked(re_ctx->thr, pc, re_ctx->bytecode, re_ctx->bytecode_end); + if (t & 1) { + return -((duk_int32_t) (t >> 1)); + } else { + return (duk_int32_t) (t >> 1); + } +} + +DUK_LOCAL const duk_uint8_t *duk__utf8_backtrack(duk_hthread *thr, + const duk_uint8_t **ptr, + const duk_uint8_t *ptr_start, + const duk_uint8_t *ptr_end, + duk_uint_fast32_t count) { + const duk_uint8_t *p; + + /* Note: allow backtracking from p == ptr_end */ + p = *ptr; + if (p < ptr_start || p > ptr_end) { + goto fail; + } + + while (count > 0) { + for (;;) { + p--; + if (p < ptr_start) { + goto fail; + } + if ((*p & 0xc0) != 0x80) { + /* utf-8 continuation bytes have the form 10xx xxxx */ + break; + } + } + count--; + } + *ptr = p; + return p; + +fail: + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return NULL;); +} + +DUK_LOCAL const duk_uint8_t *duk__utf8_advance(duk_hthread *thr, + const duk_uint8_t **ptr, + const duk_uint8_t *ptr_start, + const duk_uint8_t *ptr_end, + duk_uint_fast32_t count) { + const duk_uint8_t *p; + + p = *ptr; + if (p < ptr_start || p >= ptr_end) { + goto fail; + } + + while (count > 0) { + for (;;) { + p++; + + /* Note: if encoding ends by hitting end of input, we don't check that + * the encoding is valid, we just assume it is. + */ + if (p >= ptr_end || ((*p & 0xc0) != 0x80)) { + /* utf-8 continuation bytes have the form 10xx xxxx */ + break; + } + } + count--; + } + + *ptr = p; + return p; + +fail: + DUK_ERROR_INTERNAL(thr); + DUK_WO_NORETURN(return NULL;); +} + +/* + * Helpers for dealing with the input string + */ + +/* Get a (possibly canonicalized) input character from current sp. The input + * itself is never modified, and captures always record non-canonicalized + * characters even in case-insensitive matching. Return <0 if out of input. + */ +DUK_LOCAL duk_codepoint_t duk__inp_get_cp(duk_re_matcher_ctx *re_ctx, const duk_uint8_t **sp) { + duk_codepoint_t res; + + if (*sp >= re_ctx->input_end) { + return -1; + } + res = (duk_codepoint_t) duk_unicode_decode_xutf8_checked(re_ctx->thr, sp, re_ctx->input, re_ctx->input_end); + if (re_ctx->re_flags & DUK_RE_FLAG_IGNORE_CASE) { + res = duk_unicode_re_canonicalize_char(re_ctx->thr, res); + } + return res; +} + +DUK_LOCAL const duk_uint8_t *duk__inp_backtrack(duk_re_matcher_ctx *re_ctx, const duk_uint8_t **sp, duk_uint_fast32_t count) { + return duk__utf8_backtrack(re_ctx->thr, sp, re_ctx->input, re_ctx->input_end, count); +} + +/* Backtrack utf-8 input and return a (possibly canonicalized) input character. */ +DUK_LOCAL duk_codepoint_t duk__inp_get_prev_cp(duk_re_matcher_ctx *re_ctx, const duk_uint8_t *sp) { + /* note: caller 'sp' is intentionally not updated here */ + (void) duk__inp_backtrack(re_ctx, &sp, (duk_uint_fast32_t) 1); + return duk__inp_get_cp(re_ctx, &sp); +} + +/* + * Regexp recursive matching function. + * + * Returns 'sp' on successful match (points to character after last matched one), + * NULL otherwise. + * + * The C recursion depth limit check is only performed in this function, this + * suffices because the function is present in all true recursion required by + * regexp execution. + */ + +DUK_LOCAL const duk_uint8_t *duk__match_regexp(duk_re_matcher_ctx *re_ctx, const duk_uint8_t *pc, const duk_uint8_t *sp) { + duk_native_stack_check(re_ctx->thr); + if (re_ctx->recursion_depth >= re_ctx->recursion_limit) { + DUK_ERROR_RANGE(re_ctx->thr, DUK_STR_REGEXP_EXECUTOR_RECURSION_LIMIT); + DUK_WO_NORETURN(return NULL;); + } + re_ctx->recursion_depth++; + + for (;;) { + duk_small_int_t op; + + if (re_ctx->steps_count >= re_ctx->steps_limit) { + DUK_ERROR_RANGE(re_ctx->thr, DUK_STR_REGEXP_EXECUTOR_STEP_LIMIT); + DUK_WO_NORETURN(return NULL;); + } + re_ctx->steps_count++; + + /* Opcodes are at most 7 bits now so they encode to one byte. If this + * were not the case or 'pc' is invalid here (due to a bug etc) we'll + * still fail safely through the switch default case. + */ + DUK_ASSERT(pc[0] <= 0x7fU); +#if 0 + op = (duk_small_int_t) duk__bc_get_u32(re_ctx, &pc); +#endif + op = *pc++; + + DUK_DDD(DUK_DDDPRINT("match: rec=%ld, steps=%ld, pc (after op)=%ld, sp=%ld, op=%ld", + (long) re_ctx->recursion_depth, + (long) re_ctx->steps_count, + (long) (pc - re_ctx->bytecode), + (long) (sp - re_ctx->input), + (long) op)); + + switch (op) { + case DUK_REOP_MATCH: { + goto match; + } + case DUK_REOP_CHAR: { + /* + * Byte-based matching would be possible for case-sensitive + * matching but not for case-insensitive matching. So, we + * match by decoding the input and bytecode character normally. + * + * Bytecode characters are assumed to be already canonicalized. + * Input characters are canonicalized automatically by + * duk__inp_get_cp() if necessary. + * + * There is no opcode for matching multiple characters. The + * regexp compiler has trouble joining strings efficiently + * during compilation. See doc/regexp.rst for more discussion. + */ + duk_codepoint_t c1, c2; + + c1 = (duk_codepoint_t) duk__bc_get_u32(re_ctx, &pc); + DUK_ASSERT(!(re_ctx->re_flags & DUK_RE_FLAG_IGNORE_CASE) || + c1 == duk_unicode_re_canonicalize_char(re_ctx->thr, c1)); /* canonicalized by compiler */ + c2 = duk__inp_get_cp(re_ctx, &sp); + /* No need to check for c2 < 0 (end of input): because c1 >= 0, it + * will fail the match below automatically and cause goto fail. + */ +#if 0 + if (c2 < 0) { + goto fail; + } +#endif + DUK_ASSERT(c1 >= 0); + + DUK_DDD(DUK_DDDPRINT("char match, c1=%ld, c2=%ld", (long) c1, (long) c2)); + if (c1 != c2) { + goto fail; + } + break; + } + case DUK_REOP_PERIOD: { + duk_codepoint_t c; + + c = duk__inp_get_cp(re_ctx, &sp); + if (c < 0 || duk_unicode_is_line_terminator(c)) { + /* E5 Sections 15.10.2.8, 7.3 */ + goto fail; + } + break; + } + case DUK_REOP_RANGES: + case DUK_REOP_INVRANGES: { + duk_uint32_t n; + duk_codepoint_t c; + duk_small_int_t match; + + n = duk__bc_get_u32(re_ctx, &pc); + c = duk__inp_get_cp(re_ctx, &sp); + if (c < 0) { + goto fail; + } + + match = 0; + while (n) { + duk_codepoint_t r1, r2; + r1 = (duk_codepoint_t) duk__bc_get_u32(re_ctx, &pc); + r2 = (duk_codepoint_t) duk__bc_get_u32(re_ctx, &pc); + DUK_DDD(DUK_DDDPRINT("matching ranges/invranges, n=%ld, r1=%ld, r2=%ld, c=%ld", + (long) n, + (long) r1, + (long) r2, + (long) c)); + if (c >= r1 && c <= r2) { + /* Note: don't bail out early, we must read all the ranges from + * bytecode. Another option is to skip them efficiently after + * breaking out of here. Prefer smallest code. + */ + match = 1; + } + n--; + } + + if (op == DUK_REOP_RANGES) { + if (!match) { + goto fail; + } + } else { + DUK_ASSERT(op == DUK_REOP_INVRANGES); + if (match) { + goto fail; + } + } + break; + } + case DUK_REOP_ASSERT_START: { + duk_codepoint_t c; + + if (sp <= re_ctx->input) { + break; + } + if (!(re_ctx->re_flags & DUK_RE_FLAG_MULTILINE)) { + goto fail; + } + c = duk__inp_get_prev_cp(re_ctx, sp); + if (duk_unicode_is_line_terminator(c)) { + /* E5 Sections 15.10.2.8, 7.3 */ + break; + } + goto fail; + } + case DUK_REOP_ASSERT_END: { + duk_codepoint_t c; + const duk_uint8_t *tmp_sp; + + tmp_sp = sp; + c = duk__inp_get_cp(re_ctx, &tmp_sp); + if (c < 0) { + break; + } + if (!(re_ctx->re_flags & DUK_RE_FLAG_MULTILINE)) { + goto fail; + } + if (duk_unicode_is_line_terminator(c)) { + /* E5 Sections 15.10.2.8, 7.3 */ + break; + } + goto fail; + } + case DUK_REOP_ASSERT_WORD_BOUNDARY: + case DUK_REOP_ASSERT_NOT_WORD_BOUNDARY: { + /* + * E5 Section 15.10.2.6. The previous and current character + * should -not- be canonicalized as they are now. However, + * canonicalization does not affect the result of IsWordChar() + * (which depends on Unicode characters never canonicalizing + * into ASCII characters) so this does not matter. + */ + duk_small_int_t w1, w2; + + if (sp <= re_ctx->input) { + w1 = 0; /* not a wordchar */ + } else { + duk_codepoint_t c; + c = duk__inp_get_prev_cp(re_ctx, sp); + w1 = duk_unicode_re_is_wordchar(c); + } + if (sp >= re_ctx->input_end) { + w2 = 0; /* not a wordchar */ + } else { + const duk_uint8_t *tmp_sp = sp; /* dummy so sp won't get updated */ + duk_codepoint_t c; + c = duk__inp_get_cp(re_ctx, &tmp_sp); + w2 = duk_unicode_re_is_wordchar(c); + } + + if (op == DUK_REOP_ASSERT_WORD_BOUNDARY) { + if (w1 == w2) { + goto fail; + } + } else { + DUK_ASSERT(op == DUK_REOP_ASSERT_NOT_WORD_BOUNDARY); + if (w1 != w2) { + goto fail; + } + } + break; + } + case DUK_REOP_JUMP: { + duk_int32_t skip; + + skip = duk__bc_get_i32(re_ctx, &pc); + pc += skip; + break; + } + case DUK_REOP_SPLIT1: { + /* split1: prefer direct execution (no jump) */ + const duk_uint8_t *sub_sp; + duk_int32_t skip; + + skip = duk__bc_get_i32(re_ctx, &pc); + sub_sp = duk__match_regexp(re_ctx, pc, sp); + if (sub_sp) { + sp = sub_sp; + goto match; + } + pc += skip; + break; + } + case DUK_REOP_SPLIT2: { + /* split2: prefer jump execution (not direct) */ + const duk_uint8_t *sub_sp; + duk_int32_t skip; + + skip = duk__bc_get_i32(re_ctx, &pc); + sub_sp = duk__match_regexp(re_ctx, pc + skip, sp); + if (sub_sp) { + sp = sub_sp; + goto match; + } + break; + } + case DUK_REOP_SQMINIMAL: { + duk_uint32_t q, qmin, qmax; + duk_int32_t skip; + const duk_uint8_t *sub_sp; + + qmin = duk__bc_get_u32(re_ctx, &pc); + qmax = duk__bc_get_u32(re_ctx, &pc); + skip = duk__bc_get_i32(re_ctx, &pc); + DUK_DDD(DUK_DDDPRINT("minimal quantifier, qmin=%lu, qmax=%lu, skip=%ld", + (unsigned long) qmin, + (unsigned long) qmax, + (long) skip)); + + q = 0; + while (q <= qmax) { + if (q >= qmin) { + sub_sp = duk__match_regexp(re_ctx, pc + skip, sp); + if (sub_sp) { + sp = sub_sp; + goto match; + } + } + sub_sp = duk__match_regexp(re_ctx, pc, sp); + if (!sub_sp) { + break; + } + sp = sub_sp; + q++; + } + goto fail; + } + case DUK_REOP_SQGREEDY: { + duk_uint32_t q, qmin, qmax, atomlen; + duk_int32_t skip; + const duk_uint8_t *sub_sp; + + qmin = duk__bc_get_u32(re_ctx, &pc); + qmax = duk__bc_get_u32(re_ctx, &pc); + atomlen = duk__bc_get_u32(re_ctx, &pc); + skip = duk__bc_get_i32(re_ctx, &pc); + DUK_DDD(DUK_DDDPRINT("greedy quantifier, qmin=%lu, qmax=%lu, atomlen=%lu, skip=%ld", + (unsigned long) qmin, + (unsigned long) qmax, + (unsigned long) atomlen, + (long) skip)); + + q = 0; + while (q < qmax) { + sub_sp = duk__match_regexp(re_ctx, pc, sp); + if (!sub_sp) { + break; + } + sp = sub_sp; + q++; + } + while (q >= qmin) { + sub_sp = duk__match_regexp(re_ctx, pc + skip, sp); + if (sub_sp) { + sp = sub_sp; + goto match; + } + if (q == qmin) { + break; + } + + /* Note: if atom were to contain e.g. captures, we would need to + * re-match the atom to get correct captures. Simply quantifiers + * do not allow captures in their atom now, so this is not an issue. + */ + + DUK_DDD(DUK_DDDPRINT("greedy quantifier, backtrack %ld characters (atomlen)", (long) atomlen)); + sp = duk__inp_backtrack(re_ctx, &sp, (duk_uint_fast32_t) atomlen); + q--; + } + goto fail; + } + case DUK_REOP_SAVE: { + duk_uint32_t idx; + const duk_uint8_t *old; + const duk_uint8_t *sub_sp; + + idx = duk__bc_get_u32(re_ctx, &pc); + if (idx >= re_ctx->nsaved) { + /* idx is unsigned, < 0 check is not necessary */ + DUK_D(DUK_DPRINT("internal error, regexp save index insane: idx=%ld", (long) idx)); + goto internal_error; + } + old = re_ctx->saved[idx]; + re_ctx->saved[idx] = sp; + sub_sp = duk__match_regexp(re_ctx, pc, sp); + if (sub_sp) { + sp = sub_sp; + goto match; + } + re_ctx->saved[idx] = old; + goto fail; + } + case DUK_REOP_WIPERANGE: { + /* Wipe capture range and save old values for backtracking. + * + * XXX: this typically happens with a relatively small idx_count. + * It might be useful to handle cases where the count is small + * (say <= 8) by saving the values in stack instead. This would + * reduce memory churn and improve performance, at the cost of a + * slightly higher code footprint. + */ + duk_uint32_t idx_start, idx_count; +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + duk_uint32_t idx_end, idx; +#endif + duk_uint8_t **range_save; + const duk_uint8_t *sub_sp; + + idx_start = duk__bc_get_u32(re_ctx, &pc); + idx_count = duk__bc_get_u32(re_ctx, &pc); + DUK_DDD(DUK_DDDPRINT("wipe saved range: start=%ld, count=%ld -> [%ld,%ld] (captures [%ld,%ld])", + (long) idx_start, + (long) idx_count, + (long) idx_start, + (long) (idx_start + idx_count - 1), + (long) (idx_start / 2), + (long) ((idx_start + idx_count - 1) / 2))); + if (idx_start + idx_count > re_ctx->nsaved || idx_count == 0) { + /* idx is unsigned, < 0 check is not necessary */ + DUK_D(DUK_DPRINT("internal error, regexp wipe indices insane: idx_start=%ld, idx_count=%ld", + (long) idx_start, + (long) idx_count)); + goto internal_error; + } + DUK_ASSERT(idx_count > 0); + + duk_require_stack(re_ctx->thr, 1); + range_save = (duk_uint8_t **) duk_push_fixed_buffer_nozero(re_ctx->thr, sizeof(duk_uint8_t *) * idx_count); + DUK_ASSERT(range_save != NULL); + duk_memcpy(range_save, re_ctx->saved + idx_start, sizeof(duk_uint8_t *) * idx_count); +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + idx_end = idx_start + idx_count; + for (idx = idx_start; idx < idx_end; idx++) { + re_ctx->saved[idx] = NULL; + } +#else + duk_memzero((void *) (re_ctx->saved + idx_start), sizeof(duk_uint8_t *) * idx_count); +#endif + + sub_sp = duk__match_regexp(re_ctx, pc, sp); + if (sub_sp) { + /* match: keep wiped/resaved values */ + DUK_DDD(DUK_DDDPRINT("match: keep wiped/resaved values [%ld,%ld] (captures [%ld,%ld])", + (long) idx_start, + (long) (idx_start + idx_count - 1), + (long) (idx_start / 2), + (long) ((idx_start + idx_count - 1) / 2))); + duk_pop_unsafe(re_ctx->thr); + sp = sub_sp; + goto match; + } + + /* fail: restore saves */ + DUK_DDD(DUK_DDDPRINT("fail: restore wiped/resaved values [%ld,%ld] (captures [%ld,%ld])", + (long) idx_start, + (long) (idx_start + idx_count - 1), + (long) (idx_start / 2), + (long) ((idx_start + idx_count - 1) / 2))); + duk_memcpy((void *) (re_ctx->saved + idx_start), + (const void *) range_save, + sizeof(duk_uint8_t *) * idx_count); + duk_pop_unsafe(re_ctx->thr); + goto fail; + } + case DUK_REOP_LOOKPOS: + case DUK_REOP_LOOKNEG: { + /* + * Needs a save of multiple saved[] entries depending on what range + * may be overwritten. Because the regexp parser does no such analysis, + * we currently save the entire saved array here. Lookaheads are thus + * a bit expensive. Note that the saved array is not needed for just + * the lookahead sub-match, but for the matching of the entire sequel. + * + * The temporary save buffer is pushed on to the valstack to handle + * errors correctly. Each lookahead causes a C recursion and pushes + * more stuff on the value stack. If the C recursion limit is less + * than the value stack slack, there is no need to check the stack. + * We do so regardless, just in case. + */ + + duk_int32_t skip; + duk_uint8_t **full_save; + const duk_uint8_t *sub_sp; + + DUK_ASSERT(re_ctx->nsaved > 0); + + duk_require_stack(re_ctx->thr, 1); + full_save = + (duk_uint8_t **) duk_push_fixed_buffer_nozero(re_ctx->thr, sizeof(duk_uint8_t *) * re_ctx->nsaved); + DUK_ASSERT(full_save != NULL); + duk_memcpy(full_save, re_ctx->saved, sizeof(duk_uint8_t *) * re_ctx->nsaved); + + skip = duk__bc_get_i32(re_ctx, &pc); + sub_sp = duk__match_regexp(re_ctx, pc, sp); + if (op == DUK_REOP_LOOKPOS) { + if (!sub_sp) { + goto lookahead_fail; + } + } else { + if (sub_sp) { + goto lookahead_fail; + } + } + sub_sp = duk__match_regexp(re_ctx, pc + skip, sp); + if (sub_sp) { + /* match: keep saves */ + duk_pop_unsafe(re_ctx->thr); + sp = sub_sp; + goto match; + } + + /* fall through */ + + lookahead_fail: + /* fail: restore saves */ + duk_memcpy((void *) re_ctx->saved, (const void *) full_save, sizeof(duk_uint8_t *) * re_ctx->nsaved); + duk_pop_unsafe(re_ctx->thr); + goto fail; + } + case DUK_REOP_BACKREFERENCE: { + /* + * Byte matching for back-references would be OK in case- + * sensitive matching. In case-insensitive matching we need + * to canonicalize characters, so back-reference matching needs + * to be done with codepoints instead. So, we just decode + * everything normally here, too. + * + * Note: back-reference index which is 0 or higher than + * NCapturingParens (= number of capturing parens in the + * -entire- regexp) is a compile time error. However, a + * backreference referring to a valid capture which has + * not matched anything always succeeds! See E5 Section + * 15.10.2.9, step 5, sub-step 3. + */ + duk_uint32_t idx; + const duk_uint8_t *p; + + idx = duk__bc_get_u32(re_ctx, &pc); + idx = idx << 1; /* backref n -> saved indices [n*2, n*2+1] */ + if (idx < 2 || idx + 1 >= re_ctx->nsaved) { + /* regexp compiler should catch these */ + DUK_D(DUK_DPRINT("internal error, backreference index insane")); + goto internal_error; + } + if (!re_ctx->saved[idx] || !re_ctx->saved[idx + 1]) { + /* capture is 'undefined', always matches! */ + DUK_DDD(DUK_DDDPRINT("backreference: saved[%ld,%ld] not complete, always match", + (long) idx, + (long) (idx + 1))); + break; + } + DUK_DDD(DUK_DDDPRINT("backreference: match saved[%ld,%ld]", (long) idx, (long) (idx + 1))); + + p = re_ctx->saved[idx]; + while (p < re_ctx->saved[idx + 1]) { + duk_codepoint_t c1, c2; + + /* Note: not necessary to check p against re_ctx->input_end: + * the memory access is checked by duk__inp_get_cp(), while + * valid compiled regexps cannot write a saved[] entry + * which points to outside the string. + */ + c1 = duk__inp_get_cp(re_ctx, &p); + DUK_ASSERT(c1 >= 0); + c2 = duk__inp_get_cp(re_ctx, &sp); + /* No need for an explicit c2 < 0 check: because c1 >= 0, + * the comparison will always fail if c2 < 0. + */ +#if 0 + if (c2 < 0) { + goto fail; + } +#endif + if (c1 != c2) { + goto fail; + } + } + break; + } + default: { + DUK_D(DUK_DPRINT("internal error, regexp opcode error: %ld", (long) op)); + goto internal_error; + } + } + } + +match: + re_ctx->recursion_depth--; + return sp; + +fail: + re_ctx->recursion_depth--; + return NULL; + +internal_error: + DUK_ERROR_INTERNAL(re_ctx->thr); + DUK_WO_NORETURN(return NULL;); +} + +/* + * Exposed matcher function which provides the semantics of RegExp.prototype.exec(). + * + * RegExp.prototype.test() has the same semantics as exec() but does not return the + * result object (which contains the matching string and capture groups). Currently + * there is no separate test() helper, so a temporary result object is created and + * discarded if test() is needed. This is intentional, to save code space. + * + * Input stack: [ ... re_obj input ] + * Output stack: [ ... result ] + */ + +DUK_LOCAL void duk__regexp_match_helper(duk_hthread *thr, duk_small_int_t force_global) { + duk_re_matcher_ctx re_ctx; + duk_hobject *h_regexp; + duk_hstring *h_bytecode; + duk_hstring *h_input; + duk_uint8_t *p_buf; + const duk_uint8_t *pc; + const duk_uint8_t *sp; + duk_small_int_t match = 0; + duk_small_int_t global; + duk_uint_fast32_t i; + double d; + duk_uint32_t char_offset; + + DUK_ASSERT(thr != NULL); + + DUK_DD(DUK_DDPRINT("regexp match: regexp=%!T, input=%!T", + (duk_tval *) duk_get_tval(thr, -2), + (duk_tval *) duk_get_tval(thr, -1))); + + /* + * Regexp instance check, bytecode check, input coercion. + * + * See E5 Section 15.10.6. + */ + + /* TypeError if wrong; class check, see E5 Section 15.10.6 */ + h_regexp = duk_require_hobject_with_class(thr, -2, DUK_HOBJECT_CLASS_REGEXP); + DUK_ASSERT(h_regexp != NULL); + DUK_ASSERT(DUK_HOBJECT_GET_CLASS_NUMBER(h_regexp) == DUK_HOBJECT_CLASS_REGEXP); + DUK_UNREF(h_regexp); + + h_input = duk_to_hstring(thr, -1); + DUK_ASSERT(h_input != NULL); + + duk_xget_owndataprop_stridx_short(thr, -2, DUK_STRIDX_INT_BYTECODE); /* [ ... re_obj input ] -> [ ... re_obj input bc ] */ + h_bytecode = + duk_require_hstring(thr, -1); /* no regexp instance should exist without a non-configurable bytecode property */ + DUK_ASSERT(h_bytecode != NULL); + + /* + * Basic context initialization. + * + * Some init values are read from the bytecode header + * whose format is (UTF-8 codepoints): + * + * uint flags + * uint nsaved (even, 2n+2 where n = num captures) + */ + + /* [ ... re_obj input bc ] */ + + duk_memzero(&re_ctx, sizeof(re_ctx)); + + re_ctx.thr = thr; + re_ctx.input = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_input); + re_ctx.input_end = re_ctx.input + DUK_HSTRING_GET_BYTELEN(h_input); + re_ctx.bytecode = (const duk_uint8_t *) DUK_HSTRING_GET_DATA(h_bytecode); + re_ctx.bytecode_end = re_ctx.bytecode + DUK_HSTRING_GET_BYTELEN(h_bytecode); + re_ctx.saved = NULL; + re_ctx.recursion_limit = DUK_USE_REGEXP_EXECUTOR_RECLIMIT; + re_ctx.steps_limit = DUK_RE_EXECUTE_STEPS_LIMIT; + + /* read header */ + pc = re_ctx.bytecode; + re_ctx.re_flags = duk__bc_get_u32(&re_ctx, &pc); + re_ctx.nsaved = duk__bc_get_u32(&re_ctx, &pc); + re_ctx.bytecode = pc; + + DUK_ASSERT(DUK_RE_FLAG_GLOBAL < 0x10000UL); /* must fit into duk_small_int_t */ + global = (duk_small_int_t) (force_global | (duk_small_int_t) (re_ctx.re_flags & DUK_RE_FLAG_GLOBAL)); + + DUK_ASSERT(re_ctx.nsaved >= 2); + DUK_ASSERT((re_ctx.nsaved % 2) == 0); + + p_buf = (duk_uint8_t *) duk_push_fixed_buffer(thr, sizeof(duk_uint8_t *) * re_ctx.nsaved); /* rely on zeroing */ + DUK_UNREF(p_buf); + re_ctx.saved = (const duk_uint8_t **) duk_get_buffer(thr, -1, NULL); + DUK_ASSERT(re_ctx.saved != NULL); + + /* [ ... re_obj input bc saved_buf ] */ + +#if defined(DUK_USE_EXPLICIT_NULL_INIT) + for (i = 0; i < re_ctx.nsaved; i++) { + re_ctx.saved[i] = (duk_uint8_t *) NULL; + } +#elif defined(DUK_USE_ZERO_BUFFER_DATA) + /* buffer is automatically zeroed */ +#else + duk_memzero((void *) p_buf, sizeof(duk_uint8_t *) * re_ctx.nsaved); +#endif + + DUK_DDD(DUK_DDDPRINT("regexp ctx initialized, flags=0x%08lx, nsaved=%ld, recursion_limit=%ld, steps_limit=%ld", + (unsigned long) re_ctx.re_flags, + (long) re_ctx.nsaved, + (long) re_ctx.recursion_limit, + (long) re_ctx.steps_limit)); + + /* + * Get starting character offset for match, and initialize 'sp' based on it. + * + * Note: lastIndex is non-configurable so it must be present (we check the + * internal class of the object above, so we know it is). User code can set + * its value to an arbitrary (garbage) value though; E5 requires that lastIndex + * be coerced to a number before using. The code below works even if the + * property is missing: the value will then be coerced to zero. + * + * Note: lastIndex may be outside Uint32 range even after ToInteger() coercion. + * For instance, ToInteger(+Infinity) = +Infinity. We track the match offset + * as an integer, but pre-check it to be inside the 32-bit range before the loop. + * If not, the check in E5 Section 15.10.6.2, step 9.a applies. + */ + + /* XXX: lastIndex handling produces a lot of asm */ + + /* [ ... re_obj input bc saved_buf ] */ + + duk_get_prop_stridx_short(thr, -4, DUK_STRIDX_LAST_INDEX); /* -> [ ... re_obj input bc saved_buf lastIndex ] */ + (void) duk_to_int(thr, -1); /* ToInteger(lastIndex) */ + d = duk_get_number(thr, -1); /* integer, but may be +/- Infinite, +/- zero (not NaN, though) */ + duk_pop_nodecref_unsafe(thr); + + if (global) { + if (d < 0.0 || d > (double) DUK_HSTRING_GET_CHARLEN(h_input)) { + /* match fail */ + char_offset = 0; /* not really necessary */ + DUK_ASSERT(match == 0); + goto match_over; + } + char_offset = (duk_uint32_t) d; + } else { + /* lastIndex must be ignored for non-global regexps, but get the + * value for (theoretical) side effects. No side effects can + * really occur, because lastIndex is a normal property and is + * always non-configurable for RegExp instances. + */ + char_offset = (duk_uint32_t) 0; + } + + DUK_ASSERT(char_offset <= DUK_HSTRING_GET_CHARLEN(h_input)); + sp = re_ctx.input + duk_heap_strcache_offset_char2byte(thr, h_input, char_offset); + + /* + * Match loop. + * + * Try matching at different offsets until match found or input exhausted. + */ + + /* [ ... re_obj input bc saved_buf ] */ + + DUK_ASSERT(match == 0); + + for (;;) { + /* char offset in [0, h_input->clen] (both ends inclusive), checked before entry */ + DUK_ASSERT_DISABLE(char_offset >= 0); + DUK_ASSERT(char_offset <= DUK_HSTRING_GET_CHARLEN(h_input)); + + /* Note: re_ctx.steps is intentionally not reset, it applies to the entire unanchored match */ + DUK_ASSERT(re_ctx.recursion_depth == 0); + + DUK_DDD(DUK_DDDPRINT("attempt match at char offset %ld; %p [%p,%p]", + (long) char_offset, + (const void *) sp, + (const void *) re_ctx.input, + (const void *) re_ctx.input_end)); + + /* + * Note: + * + * - duk__match_regexp() is required not to longjmp() in ordinary "non-match" + * conditions; a longjmp() will terminate the entire matching process. + * + * - Clearing saved[] is not necessary because backtracking does it + * + * - Backtracking also rewinds re_ctx.recursion back to zero, unless an + * internal/limit error occurs (which causes a longjmp()) + * + * - If we supported anchored matches, we would break out here + * unconditionally; however, ECMAScript regexps don't have anchored + * matches. It might make sense to implement a fast bail-out if + * the regexp begins with '^' and sp is not 0: currently we'll just + * run through the entire input string, trivially failing the match + * at every non-zero offset. + */ + + if (duk__match_regexp(&re_ctx, re_ctx.bytecode, sp) != NULL) { + DUK_DDD(DUK_DDDPRINT("match at offset %ld", (long) char_offset)); + match = 1; + break; + } + + /* advance by one character (code point) and one char_offset */ + char_offset++; + if (char_offset > DUK_HSTRING_GET_CHARLEN(h_input)) { + /* + * Note: + * + * - Intentionally attempt (empty) match at char_offset == k_input->clen + * + * - Negative char_offsets have been eliminated and char_offset is duk_uint32_t + * -> no need or use for a negative check + */ + + DUK_DDD(DUK_DDDPRINT("no match after trying all sp offsets")); + break; + } + + /* avoid calling at end of input, will DUK_ERROR (above check suffices to avoid this) */ + (void) duk__utf8_advance(thr, &sp, re_ctx.input, re_ctx.input_end, (duk_uint_fast32_t) 1); + } + +match_over: + + /* + * Matching complete, create result array or return a 'null'. Update lastIndex + * if necessary. See E5 Section 15.10.6.2. + * + * Because lastIndex is a character (not byte) offset, we need the character + * length of the match which we conveniently get as a side effect of interning + * the matching substring (0th index of result array). + * + * saved[0] start pointer (~ byte offset) of current match + * saved[1] end pointer (~ byte offset) of current match (exclusive) + * char_offset start character offset of current match (-> .index of result) + * char_end_offset end character offset (computed below) + */ + + /* [ ... re_obj input bc saved_buf ] */ + + if (match) { +#if defined(DUK_USE_ASSERTIONS) + duk_hobject *h_res; +#endif + duk_uint32_t char_end_offset = 0; + + DUK_DDD(DUK_DDDPRINT("regexp matches at char_offset %ld", (long) char_offset)); + + DUK_ASSERT(re_ctx.nsaved >= 2); /* must have start and end */ + DUK_ASSERT((re_ctx.nsaved % 2) == 0); /* and even number */ + + /* XXX: Array size is known before and (2 * re_ctx.nsaved) but not taken + * advantage of now. The array is not compacted either, as regexp match + * objects are usually short lived. + */ + + duk_push_array(thr); + +#if defined(DUK_USE_ASSERTIONS) + h_res = duk_require_hobject(thr, -1); + DUK_ASSERT(DUK_HOBJECT_HAS_EXTENSIBLE(h_res)); + DUK_ASSERT(DUK_HOBJECT_HAS_EXOTIC_ARRAY(h_res)); + DUK_ASSERT(DUK_HOBJECT_GET_CLASS_NUMBER(h_res) == DUK_HOBJECT_CLASS_ARRAY); +#endif + + /* [ ... re_obj input bc saved_buf res_obj ] */ + + duk_push_u32(thr, char_offset); + duk_xdef_prop_stridx_short_wec(thr, -2, DUK_STRIDX_INDEX); + + duk_dup_m4(thr); + duk_xdef_prop_stridx_short_wec(thr, -2, DUK_STRIDX_INPUT); + + for (i = 0; i < re_ctx.nsaved; i += 2) { + /* Captures which are undefined have NULL pointers and are returned + * as 'undefined'. The same is done when saved[] pointers are insane + * (this should, of course, never happen in practice). + */ + duk_push_uarridx(thr, (duk_uarridx_t) (i / 2)); + + if (re_ctx.saved[i] && re_ctx.saved[i + 1] && re_ctx.saved[i + 1] >= re_ctx.saved[i]) { + duk_push_lstring(thr, + (const char *) re_ctx.saved[i], + (duk_size_t) (re_ctx.saved[i + 1] - re_ctx.saved[i])); + if (i == 0) { + /* Assumes that saved[0] and saved[1] are always + * set by regexp bytecode (if not, char_end_offset + * will be zero). Also assumes clen reflects the + * correct char length. + */ + char_end_offset = char_offset + (duk_uint32_t) duk_get_length(thr, -1); /* add charlen */ + } + } else { + duk_push_undefined(thr); + } + + /* [ ... re_obj input bc saved_buf res_obj idx val ] */ + duk_def_prop(thr, -3, DUK_DEFPROP_HAVE_VALUE | DUK_DEFPROP_SET_WEC); + } + + /* [ ... re_obj input bc saved_buf res_obj ] */ + + /* NB: 'length' property is automatically updated by the array setup loop */ + + if (global) { + /* global regexp: lastIndex updated on match */ + duk_push_u32(thr, char_end_offset); + duk_put_prop_stridx_short(thr, -6, DUK_STRIDX_LAST_INDEX); + } else { + /* non-global regexp: lastIndex never updated on match */ + ; + } + } else { + /* + * No match, E5 Section 15.10.6.2, step 9.a.i - 9.a.ii apply, regardless + * of 'global' flag of the RegExp. In particular, if lastIndex is invalid + * initially, it is reset to zero. + */ + + DUK_DDD(DUK_DDDPRINT("regexp does not match")); + + duk_push_null(thr); + + /* [ ... re_obj input bc saved_buf res_obj ] */ + + duk_push_int(thr, 0); + duk_put_prop_stridx_short(thr, -6, DUK_STRIDX_LAST_INDEX); + } + + /* [ ... re_obj input bc saved_buf res_obj ] */ + + duk_insert(thr, -5); + + /* [ ... res_obj re_obj input bc saved_buf ] */ + + duk_pop_n_unsafe(thr, 4); + + /* [ ... res_obj ] */ + + /* XXX: these last tricks are unnecessary if the function is made + * a genuine native function. + */ +} + +DUK_INTERNAL void duk_regexp_match(duk_hthread *thr) { + duk__regexp_match_helper(thr, 0 /*force_global*/); +} + +/* This variant is needed by String.prototype.split(); it needs to perform + * global-style matching on a cloned RegExp which is potentially non-global. + */ +DUK_INTERNAL void duk_regexp_match_force_global(duk_hthread *thr) { + duk__regexp_match_helper(thr, 1 /*force_global*/); +} + +#else /* DUK_USE_REGEXP_SUPPORT */ + +/* regexp support disabled */ + +#endif /* DUK_USE_REGEXP_SUPPORT */ +#line 1 "duk_selftest.c" +/* + * Self tests to ensure execution environment is sane. Intended to catch + * compiler/platform problems which cannot be detected at compile time. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_SELF_TESTS) + +/* + * Unions and structs for self tests + */ + +typedef union { + double d; + duk_uint8_t x[8]; +} duk__test_double_union; + +/* Self test failed. Expects a local variable 'error_count' to exist. */ +#define DUK__FAILED(msg) \ + do { \ + DUK_D(DUK_DPRINT("self test failed: " #msg " at " DUK_FILE_MACRO ":" DUK_MACRO_STRINGIFY(DUK_LINE_MACRO))); \ + error_count++; \ + } while (0) + +#define DUK__DBLUNION_CMP_TRUE(a, b) \ + do { \ + if (duk_memcmp((const void *) (a), (const void *) (b), sizeof(duk__test_double_union)) != 0) { \ + DUK__FAILED("double union compares false (expected true)"); \ + } \ + } while (0) + +#define DUK__DBLUNION_CMP_FALSE(a, b) \ + do { \ + if (duk_memcmp((const void *) (a), (const void *) (b), sizeof(duk__test_double_union)) == 0) { \ + DUK__FAILED("double union compares true (expected false)"); \ + } \ + } while (0) + +typedef union { + duk_uint32_t i; + duk_uint8_t x[8]; +} duk__test_u32_union; + +#if defined(DUK_USE_INTEGER_LE) +#define DUK__U32_INIT(u, a, b, c, d) \ + do { \ + (u)->x[0] = (d); \ + (u)->x[1] = (c); \ + (u)->x[2] = (b); \ + (u)->x[3] = (a); \ + } while (0) +#elif defined(DUK_USE_INTEGER_ME) +#error integer mixed endian not supported now +#elif defined(DUK_USE_INTEGER_BE) +#define DUK__U32_INIT(u, a, b, c, d) \ + do { \ + (u)->x[0] = (a); \ + (u)->x[1] = (b); \ + (u)->x[2] = (c); \ + (u)->x[3] = (d); \ + } while (0) +#else +#error unknown integer endianness +#endif + +#if defined(DUK_USE_DOUBLE_LE) +#define DUK__DOUBLE_INIT(u, a, b, c, d, e, f, g, h) \ + do { \ + (u)->x[0] = (h); \ + (u)->x[1] = (g); \ + (u)->x[2] = (f); \ + (u)->x[3] = (e); \ + (u)->x[4] = (d); \ + (u)->x[5] = (c); \ + (u)->x[6] = (b); \ + (u)->x[7] = (a); \ + } while (0) +#define DUK__DOUBLE_COMPARE(u, a, b, c, d, e, f, g, h) \ + ((u)->x[0] == (h) && (u)->x[1] == (g) && (u)->x[2] == (f) && (u)->x[3] == (e) && (u)->x[4] == (d) && (u)->x[5] == (c) && \ + (u)->x[6] == (b) && (u)->x[7] == (a)) +#elif defined(DUK_USE_DOUBLE_ME) +#define DUK__DOUBLE_INIT(u, a, b, c, d, e, f, g, h) \ + do { \ + (u)->x[0] = (d); \ + (u)->x[1] = (c); \ + (u)->x[2] = (b); \ + (u)->x[3] = (a); \ + (u)->x[4] = (h); \ + (u)->x[5] = (g); \ + (u)->x[6] = (f); \ + (u)->x[7] = (e); \ + } while (0) +#define DUK__DOUBLE_COMPARE(u, a, b, c, d, e, f, g, h) \ + ((u)->x[0] == (d) && (u)->x[1] == (c) && (u)->x[2] == (b) && (u)->x[3] == (a) && (u)->x[4] == (h) && (u)->x[5] == (g) && \ + (u)->x[6] == (f) && (u)->x[7] == (e)) +#elif defined(DUK_USE_DOUBLE_BE) +#define DUK__DOUBLE_INIT(u, a, b, c, d, e, f, g, h) \ + do { \ + (u)->x[0] = (a); \ + (u)->x[1] = (b); \ + (u)->x[2] = (c); \ + (u)->x[3] = (d); \ + (u)->x[4] = (e); \ + (u)->x[5] = (f); \ + (u)->x[6] = (g); \ + (u)->x[7] = (h); \ + } while (0) +#define DUK__DOUBLE_COMPARE(u, a, b, c, d, e, f, g, h) \ + ((u)->x[0] == (a) && (u)->x[1] == (b) && (u)->x[2] == (c) && (u)->x[3] == (d) && (u)->x[4] == (e) && (u)->x[5] == (f) && \ + (u)->x[6] == (g) && (u)->x[7] == (h)) +#else +#error unknown double endianness +#endif + +/* + * Various sanity checks for typing + */ + +DUK_LOCAL duk_uint_t duk__selftest_types(void) { + duk_uint_t error_count = 0; + + if (!(sizeof(duk_int8_t) == 1 && sizeof(duk_uint8_t) == 1 && sizeof(duk_int16_t) == 2 && sizeof(duk_uint16_t) == 2 && + sizeof(duk_int32_t) == 4 && sizeof(duk_uint32_t) == 4)) { + DUK__FAILED("duk_(u)int{8,16,32}_t size"); + } +#if defined(DUK_USE_64BIT_OPS) + if (!(sizeof(duk_int64_t) == 8 && sizeof(duk_uint64_t) == 8)) { + DUK__FAILED("duk_(u)int64_t size"); + } +#endif + + if (!(sizeof(duk_size_t) >= sizeof(duk_uint_t))) { + /* Some internal code now assumes that all duk_uint_t values + * can be expressed with a duk_size_t. + */ + DUK__FAILED("duk_size_t is smaller than duk_uint_t"); + } + if (!(sizeof(duk_int_t) >= 4)) { + DUK__FAILED("duk_int_t is not 32 bits"); + } + + return error_count; +} + +/* + * Packed tval sanity + */ + +DUK_LOCAL duk_uint_t duk__selftest_packed_tval(void) { + duk_uint_t error_count = 0; + +#if defined(DUK_USE_PACKED_TVAL) + if (sizeof(void *) > 4) { + DUK__FAILED("packed duk_tval in use but sizeof(void *) > 4"); + } +#endif + + return error_count; +} + +/* + * Two's complement arithmetic. + */ + +DUK_LOCAL duk_uint_t duk__selftest_twos_complement(void) { + duk_uint_t error_count = 0; + volatile int test; + test = -1; + + /* Note that byte order doesn't affect this test: all bytes in + * 'test' will be 0xFF for two's complement. + */ + if (((volatile duk_uint8_t *) &test)[0] != (duk_uint8_t) 0xff) { + DUK__FAILED("two's complement arithmetic"); + } + + return error_count; +} + +/* + * Byte order. Important to self check, because on some exotic platforms + * there is no actual detection but rather assumption based on platform + * defines. + */ + +DUK_LOCAL duk_uint_t duk__selftest_byte_order(void) { + duk_uint_t error_count = 0; + duk__test_u32_union u1; + duk__test_double_union u2; + + /* + * >>> struct.pack('>d', 102030405060).encode('hex') + * '4237c17c6dc40000' + */ + + DUK__U32_INIT(&u1, 0xde, 0xad, 0xbe, 0xef); + DUK__DOUBLE_INIT(&u2, 0x42, 0x37, 0xc1, 0x7c, 0x6d, 0xc4, 0x00, 0x00); + + if (u1.i != (duk_uint32_t) 0xdeadbeefUL) { + DUK__FAILED("duk_uint32_t byte order"); + } + + if (!duk_double_equals(u2.d, 102030405060.0)) { + DUK__FAILED("double byte order"); + } + + return error_count; +} + +/* + * DUK_BSWAP macros + */ + +DUK_LOCAL duk_uint_t duk__selftest_bswap_macros(void) { + duk_uint_t error_count = 0; + volatile duk_uint32_t x32_input, x32_output; + duk_uint32_t x32; + volatile duk_uint16_t x16_input, x16_output; + duk_uint16_t x16; + duk_double_union du; + duk_double_t du_diff; +#if defined(DUK_BSWAP64) + volatile duk_uint64_t x64_input, x64_output; + duk_uint64_t x64; +#endif + + /* Cover both compile time and runtime bswap operations, as these + * may have different bugs. + */ + + x16_input = 0xbeefUL; + x16 = x16_input; + x16 = DUK_BSWAP16(x16); + x16_output = x16; + if (x16_output != (duk_uint16_t) 0xefbeUL) { + DUK__FAILED("DUK_BSWAP16"); + } + + x16 = 0xbeefUL; + x16 = DUK_BSWAP16(x16); + if (x16 != (duk_uint16_t) 0xefbeUL) { + DUK__FAILED("DUK_BSWAP16"); + } + + x32_input = 0xdeadbeefUL; + x32 = x32_input; + x32 = DUK_BSWAP32(x32); + x32_output = x32; + if (x32_output != (duk_uint32_t) 0xefbeaddeUL) { + DUK__FAILED("DUK_BSWAP32"); + } + + x32 = 0xdeadbeefUL; + x32 = DUK_BSWAP32(x32); + if (x32 != (duk_uint32_t) 0xefbeaddeUL) { + DUK__FAILED("DUK_BSWAP32"); + } + +#if defined(DUK_BSWAP64) + x64_input = DUK_U64_CONSTANT(0x8899aabbccddeeff); + x64 = x64_input; + x64 = DUK_BSWAP64(x64); + x64_output = x64; + if (x64_output != (duk_uint64_t) DUK_U64_CONSTANT(0xffeeddccbbaa9988)) { + DUK__FAILED("DUK_BSWAP64"); + } + + x64 = DUK_U64_CONSTANT(0x8899aabbccddeeff); + x64 = DUK_BSWAP64(x64); + if (x64 != (duk_uint64_t) DUK_U64_CONSTANT(0xffeeddccbbaa9988)) { + DUK__FAILED("DUK_BSWAP64"); + } +#endif + + /* >>> struct.unpack('>d', '4000112233445566'.decode('hex')) + * (2.008366013071895,) + */ + + du.uc[0] = 0x40; + du.uc[1] = 0x00; + du.uc[2] = 0x11; + du.uc[3] = 0x22; + du.uc[4] = 0x33; + du.uc[5] = 0x44; + du.uc[6] = 0x55; + du.uc[7] = 0x66; + DUK_DBLUNION_DOUBLE_NTOH(&du); + du_diff = du.d - 2.008366013071895; +#if 0 + DUK_D(DUK_DPRINT("du_diff: %lg\n", (double) du_diff)); +#endif + if (du_diff > 1e-15) { + /* Allow very small lenience because some compilers won't parse + * exact IEEE double constants (happened in matrix testing with + * Linux gcc-4.8 -m32 at least). + */ +#if 0 + DUK_D(DUK_DPRINT("Result of DUK_DBLUNION_DOUBLE_NTOH: %02x %02x %02x %02x %02x %02x %02x %02x\n", + (unsigned int) du.uc[0], (unsigned int) du.uc[1], + (unsigned int) du.uc[2], (unsigned int) du.uc[3], + (unsigned int) du.uc[4], (unsigned int) du.uc[5], + (unsigned int) du.uc[6], (unsigned int) du.uc[7])); +#endif + DUK__FAILED("DUK_DBLUNION_DOUBLE_NTOH"); + } + + return error_count; +} + +/* + * Basic double / byte union memory layout. + */ + +DUK_LOCAL duk_uint_t duk__selftest_double_union_size(void) { + duk_uint_t error_count = 0; + + if (sizeof(duk__test_double_union) != 8) { + DUK__FAILED("invalid union size"); + } + + return error_count; +} + +/* + * Union aliasing, see misc/clang_aliasing.c. + */ + +DUK_LOCAL duk_uint_t duk__selftest_double_aliasing(void) { + /* This testcase fails when Emscripten-generated code runs on Firefox. + * It's not an issue because the failure should only affect packed + * duk_tval representation, which is not used with Emscripten. + */ +#if defined(DUK_USE_PACKED_TVAL) + duk_uint_t error_count = 0; + duk__test_double_union a, b; + + /* Test signaling NaN and alias assignment in all endianness combinations. + */ + + /* little endian */ + a.x[0] = 0x11; + a.x[1] = 0x22; + a.x[2] = 0x33; + a.x[3] = 0x44; + a.x[4] = 0x00; + a.x[5] = 0x00; + a.x[6] = 0xf1; + a.x[7] = 0xff; + b = a; + DUK__DBLUNION_CMP_TRUE(&a, &b); + + /* big endian */ + a.x[0] = 0xff; + a.x[1] = 0xf1; + a.x[2] = 0x00; + a.x[3] = 0x00; + a.x[4] = 0x44; + a.x[5] = 0x33; + a.x[6] = 0x22; + a.x[7] = 0x11; + b = a; + DUK__DBLUNION_CMP_TRUE(&a, &b); + + /* mixed endian */ + a.x[0] = 0x00; + a.x[1] = 0x00; + a.x[2] = 0xf1; + a.x[3] = 0xff; + a.x[4] = 0x11; + a.x[5] = 0x22; + a.x[6] = 0x33; + a.x[7] = 0x44; + b = a; + DUK__DBLUNION_CMP_TRUE(&a, &b); + + return error_count; +#else + DUK_D(DUK_DPRINT("skip double aliasing self test when duk_tval is not packed")); + return 0; +#endif +} + +/* + * Zero sign, see misc/tcc_zerosign2.c. + */ + +DUK_LOCAL duk_uint_t duk__selftest_double_zero_sign(void) { + duk_uint_t error_count = 0; + duk__test_double_union a, b; + + a.d = 0.0; + b.d = -a.d; + DUK__DBLUNION_CMP_FALSE(&a, &b); + + return error_count; +} + +/* + * Rounding mode: Duktape assumes round-to-nearest, check that this is true. + * If we had C99 fenv.h we could check that fegetround() == FE_TONEAREST, + * but we don't want to rely on that header; and even if we did, it's good + * to ensure the rounding actually works. + */ + +DUK_LOCAL duk_uint_t duk__selftest_double_rounding(void) { + duk_uint_t error_count = 0; + duk__test_double_union a, b, c; + +#if 0 + /* Include and test manually; these trigger failures: */ + fesetround(FE_UPWARD); + fesetround(FE_DOWNWARD); + fesetround(FE_TOWARDZERO); + + /* This is the default and passes. */ + fesetround(FE_TONEAREST); +#endif + + /* Rounding tests check that none of the other modes (round to + * +Inf, round to -Inf, round to zero) can be active: + * http://www.gnu.org/software/libc/manual/html_node/Rounding.html + */ + + /* 1.0 + 2^(-53): result is midway between 1.0 and 1.0 + ulp. + * Round to nearest: 1.0 + * Round to +Inf: 1.0 + ulp + * Round to -Inf: 1.0 + * Round to zero: 1.0 + * => Correct result eliminates round to +Inf. + */ + DUK__DOUBLE_INIT(&a, 0xf0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00); + DUK__DOUBLE_INIT(&b, 0x3c, 0xa0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00); + duk_memset((void *) &c, 0, sizeof(c)); + c.d = a.d + b.d; + if (!DUK__DOUBLE_COMPARE(&c, 0xf0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00)) { + DUK_D(DUK_DPRINT("broken result (native endiannesss): %02x %02x %02x %02x %02x %02x %02x %02x", + (unsigned int) c.x[0], + (unsigned int) c.x[1], + (unsigned int) c.x[2], + (unsigned int) c.x[3], + (unsigned int) c.x[4], + (unsigned int) c.x[5], + (unsigned int) c.x[6], + (unsigned int) c.x[7])); + DUK__FAILED("invalid result from 1.0 + 0.5ulp"); + } + + /* (1.0 + ulp) + 2^(-53): result is midway between 1.0 + ulp and 1.0 + 2*ulp. + * Round to nearest: 1.0 + 2*ulp (round to even mantissa) + * Round to +Inf: 1.0 + 2*ulp + * Round to -Inf: 1.0 + ulp + * Round to zero: 1.0 + ulp + * => Correct result eliminates round to -Inf and round to zero. + */ + DUK__DOUBLE_INIT(&a, 0x3f, 0xf0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01); + DUK__DOUBLE_INIT(&b, 0x3c, 0xa0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00); + duk_memset((void *) &c, 0, sizeof(c)); + c.d = a.d + b.d; + if (!DUK__DOUBLE_COMPARE(&c, 0x3f, 0xf0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x02)) { + DUK_D(DUK_DPRINT("broken result (native endiannesss): %02x %02x %02x %02x %02x %02x %02x %02x", + (unsigned int) c.x[0], + (unsigned int) c.x[1], + (unsigned int) c.x[2], + (unsigned int) c.x[3], + (unsigned int) c.x[4], + (unsigned int) c.x[5], + (unsigned int) c.x[6], + (unsigned int) c.x[7])); + DUK__FAILED("invalid result from (1.0 + ulp) + 0.5ulp"); + } + + /* Could do negative number testing too, but the tests above should + * differentiate between IEEE 754 rounding modes. + */ + return error_count; +} + +/* + * fmod(): often a portability issue in embedded or bare platform targets. + * Check for at least minimally correct behavior. Unlike some other math + * functions (like cos()) Duktape relies on fmod() internally too. + */ + +DUK_LOCAL duk_uint_t duk__selftest_fmod(void) { + duk_uint_t error_count = 0; + duk__test_double_union u1, u2; + volatile duk_double_t t1, t2, t3; + + /* fmod() with integer argument and exponent 2^32 is used by e.g. + * ToUint32() and some Duktape internals. + */ + u1.d = DUK_FMOD(10.0, 4294967296.0); + u2.d = 10.0; + DUK__DBLUNION_CMP_TRUE(&u1, &u2); + + u1.d = DUK_FMOD(4294967306.0, 4294967296.0); + u2.d = 10.0; + DUK__DBLUNION_CMP_TRUE(&u1, &u2); + + u1.d = DUK_FMOD(73014444042.0, 4294967296.0); + u2.d = 10.0; + DUK__DBLUNION_CMP_TRUE(&u1, &u2); + + /* 52-bit integer split into two parts: + * >>> 0x1fedcba9876543 + * 8987183256397123 + * >>> float(0x1fedcba9876543) / float(2**53) + * 0.9977777777777778 + */ + u1.d = DUK_FMOD(8987183256397123.0, 4294967296.0); + u2.d = (duk_double_t) 0xa9876543UL; + DUK__DBLUNION_CMP_TRUE(&u1, &u2); + t1 = 8987183256397123.0; + t2 = 4294967296.0; + t3 = t1 / t2; + u1.d = DUK_FLOOR(t3); + u2.d = (duk_double_t) 0x1fedcbUL; + DUK__DBLUNION_CMP_TRUE(&u1, &u2); + + /* C99 behavior is for fmod() result sign to mathc argument sign. */ + u1.d = DUK_FMOD(-10.0, 4294967296.0); + u2.d = -10.0; + DUK__DBLUNION_CMP_TRUE(&u1, &u2); + + u1.d = DUK_FMOD(-4294967306.0, 4294967296.0); + u2.d = -10.0; + DUK__DBLUNION_CMP_TRUE(&u1, &u2); + + u1.d = DUK_FMOD(-73014444042.0, 4294967296.0); + u2.d = -10.0; + DUK__DBLUNION_CMP_TRUE(&u1, &u2); + + return error_count; +} + +/* + * Struct size/alignment if platform requires it + * + * There are some compiler specific struct padding pragmas etc in use, this + * selftest ensures they're correctly detected and used. + */ + +DUK_LOCAL duk_uint_t duk__selftest_struct_align(void) { + duk_uint_t error_count = 0; + +#if (DUK_USE_ALIGN_BY == 4) + if ((sizeof(duk_hbuffer_fixed) % 4) != 0) { + DUK__FAILED("sizeof(duk_hbuffer_fixed) not aligned to 4"); + } +#elif (DUK_USE_ALIGN_BY == 8) + if ((sizeof(duk_hbuffer_fixed) % 8) != 0) { + DUK__FAILED("sizeof(duk_hbuffer_fixed) not aligned to 8"); + } +#elif (DUK_USE_ALIGN_BY == 1) + /* no check */ +#else +#error invalid DUK_USE_ALIGN_BY +#endif + return error_count; +} + +/* + * 64-bit arithmetic + * + * There are some platforms/compilers where 64-bit types are available + * but don't work correctly. Test for known cases. + */ + +DUK_LOCAL duk_uint_t duk__selftest_64bit_arithmetic(void) { + duk_uint_t error_count = 0; +#if defined(DUK_USE_64BIT_OPS) + volatile duk_int64_t i; + volatile duk_double_t d; + + /* Catch a double-to-int64 cast issue encountered in practice. */ + d = 2147483648.0; + i = (duk_int64_t) d; + if (i != DUK_I64_CONSTANT(0x80000000)) { + DUK__FAILED("casting 2147483648.0 to duk_int64_t failed"); + } +#else + /* nop */ +#endif + return error_count; +} + +/* + * Casting + */ + +DUK_LOCAL duk_uint_t duk__selftest_cast_double_to_small_uint(void) { + /* + * https://github.com/svaarala/duktape/issues/127#issuecomment-77863473 + */ + + duk_uint_t error_count = 0; + + duk_double_t d1, d2; + duk_small_uint_t u; + + duk_double_t d1v, d2v; + duk_small_uint_t uv; + + /* Test without volatiles */ + + d1 = 1.0; + u = (duk_small_uint_t) d1; + d2 = (duk_double_t) u; + + if (!(duk_double_equals(d1, 1.0) && u == 1 && duk_double_equals(d2, 1.0) && duk_double_equals(d1, d2))) { + DUK__FAILED("double to duk_small_uint_t cast failed"); + } + + /* Same test with volatiles */ + + d1v = 1.0; + uv = (duk_small_uint_t) d1v; + d2v = (duk_double_t) uv; + + if (!(duk_double_equals(d1v, 1.0) && uv == 1 && duk_double_equals(d2v, 1.0) && duk_double_equals(d1v, d2v))) { + DUK__FAILED("double to duk_small_uint_t cast failed"); + } + + return error_count; +} + +DUK_LOCAL duk_uint_t duk__selftest_cast_double_to_uint32(void) { + /* + * This test fails on an exotic ARM target; double-to-uint + * cast is incorrectly clamped to -signed- int highest value. + * + * https://github.com/svaarala/duktape/issues/336 + */ + + duk_uint_t error_count = 0; + duk_double_t dv; + duk_uint32_t uv; + + dv = 3735928559.0; /* 0xdeadbeef in decimal */ + uv = (duk_uint32_t) dv; + + if (uv != 0xdeadbeefUL) { + DUK__FAILED("double to duk_uint32_t cast failed"); + } + + return error_count; +} + +/* + * Minimal test of user supplied allocation functions + * + * - Basic alloc + realloc + free cycle + * + * - Realloc to significantly larger size to (hopefully) trigger a + * relocation and check that relocation copying works + */ + +DUK_LOCAL duk_uint_t duk__selftest_alloc_funcs(duk_alloc_function alloc_func, + duk_realloc_function realloc_func, + duk_free_function free_func, + void *udata) { + duk_uint_t error_count = 0; + void *ptr; + void *new_ptr; + duk_small_int_t i, j; + unsigned char x; + + if (alloc_func == NULL || realloc_func == NULL || free_func == NULL) { + return 0; + } + + for (i = 1; i <= 256; i++) { + ptr = alloc_func(udata, (duk_size_t) i); + if (ptr == NULL) { + DUK_D(DUK_DPRINT("alloc failed, ignore")); + continue; /* alloc failed, ignore */ + } + for (j = 0; j < i; j++) { + ((unsigned char *) ptr)[j] = (unsigned char) (0x80 + j); + } + new_ptr = realloc_func(udata, ptr, 1024); + if (new_ptr == NULL) { + DUK_D(DUK_DPRINT("realloc failed, ignore")); + free_func(udata, ptr); + continue; /* realloc failed, ignore */ + } + ptr = new_ptr; + for (j = 0; j < i; j++) { + x = ((unsigned char *) ptr)[j]; + if (x != (unsigned char) (0x80 + j)) { + DUK_D(DUK_DPRINT("byte at index %ld doesn't match after realloc: %02lx", + (long) j, + (unsigned long) x)); + DUK__FAILED("byte compare after realloc"); + break; + } + } + free_func(udata, ptr); + } + + return error_count; +} + +/* + * Self test main + */ + +DUK_INTERNAL duk_uint_t duk_selftest_run_tests(duk_alloc_function alloc_func, + duk_realloc_function realloc_func, + duk_free_function free_func, + void *udata) { + duk_uint_t error_count = 0; + + DUK_D(DUK_DPRINT("self test starting")); + + error_count += duk__selftest_types(); + error_count += duk__selftest_packed_tval(); + error_count += duk__selftest_twos_complement(); + error_count += duk__selftest_byte_order(); + error_count += duk__selftest_bswap_macros(); + error_count += duk__selftest_double_union_size(); + error_count += duk__selftest_double_aliasing(); + error_count += duk__selftest_double_zero_sign(); + error_count += duk__selftest_double_rounding(); + error_count += duk__selftest_fmod(); + error_count += duk__selftest_struct_align(); + error_count += duk__selftest_64bit_arithmetic(); + error_count += duk__selftest_cast_double_to_small_uint(); + error_count += duk__selftest_cast_double_to_uint32(); + error_count += duk__selftest_alloc_funcs(alloc_func, realloc_func, free_func, udata); + + DUK_D(DUK_DPRINT("self test complete, total error count: %ld", (long) error_count)); + + return error_count; +} + +#endif /* DUK_USE_SELF_TESTS */ + +/* automatic undefs */ +#undef DUK__DBLUNION_CMP_FALSE +#undef DUK__DBLUNION_CMP_TRUE +#undef DUK__DOUBLE_COMPARE +#undef DUK__DOUBLE_INIT +#undef DUK__FAILED +#undef DUK__U32_INIT +/* #include duk_internal.h -> already included */ +#line 2 "duk_tval.c" + +#if defined(DUK_USE_FASTINT) + +/* + * Manually optimized double-to-fastint downgrade check. + * + * This check has a large impact on performance, especially for fastint + * slow paths, so must be changed carefully. The code should probably be + * optimized for the case where the result does not fit into a fastint, + * to minimize the penalty for "slow path code" dealing with fractions etc. + * + * At least on one tested soft float ARM platform double-to-int64 coercion + * is very slow (and sometimes produces incorrect results, see self tests). + * This algorithm combines a fastint compatibility check and extracting the + * integer value from an IEEE double for setting the tagged fastint. For + * other platforms a more naive approach might be better. + * + * See doc/fastint.rst for details. + */ + +DUK_INTERNAL DUK_ALWAYS_INLINE void duk_tval_set_number_chkfast_fast(duk_tval *tv, duk_double_t x) { + duk_double_union du; + duk_int64_t i; + duk_small_int_t expt; + duk_small_int_t shift; + + /* XXX: optimize for packed duk_tval directly? */ + + du.d = x; + i = (duk_int64_t) DUK_DBLUNION_GET_INT64(&du); + expt = (duk_small_int_t) ((i >> 52) & 0x07ff); + shift = expt - 1023; + + if (shift >= 0 && shift <= 46) { /* exponents 1023 to 1069 */ + duk_int64_t t; + + if (((DUK_I64_CONSTANT(0x000fffffffffffff) >> shift) & i) == 0) { + t = i | DUK_I64_CONSTANT(0x0010000000000000); /* implicit leading one */ + t = t & DUK_I64_CONSTANT(0x001fffffffffffff); + t = t >> (52 - shift); + if (i < 0) { + t = -t; + } + DUK_TVAL_SET_FASTINT(tv, t); + return; + } + } else if (shift == -1023) { /* exponent 0 */ + if (i >= 0 && (i & DUK_I64_CONSTANT(0x000fffffffffffff)) == 0) { + /* Note: reject negative zero. */ + DUK_TVAL_SET_FASTINT(tv, (duk_int64_t) 0); + return; + } + } else if (shift == 47) { /* exponent 1070 */ + if (i < 0 && (i & DUK_I64_CONSTANT(0x000fffffffffffff)) == 0) { + DUK_TVAL_SET_FASTINT(tv, (duk_int64_t) DUK_FASTINT_MIN); + return; + } + } + + DUK_TVAL_SET_DOUBLE(tv, x); + return; +} + +DUK_INTERNAL DUK_NOINLINE void duk_tval_set_number_chkfast_slow(duk_tval *tv, duk_double_t x) { + duk_tval_set_number_chkfast_fast(tv, x); +} + +/* + * Manually optimized number-to-double conversion + */ + +#if defined(DUK_USE_FASTINT) && defined(DUK_USE_PACKED_TVAL) +DUK_INTERNAL DUK_ALWAYS_INLINE duk_double_t duk_tval_get_number_packed(duk_tval *tv) { + duk_double_union du; + duk_uint64_t t; + + t = (duk_uint64_t) DUK_DBLUNION_GET_UINT64(tv); + if ((t >> 48) != DUK_TAG_FASTINT) { + return tv->d; + } else if (t & DUK_U64_CONSTANT(0x0000800000000000)) { + t = (duk_uint64_t) (-((duk_int64_t) t)); /* avoid unary minus on unsigned */ + t = t & DUK_U64_CONSTANT(0x0000ffffffffffff); /* negative */ + t |= DUK_U64_CONSTANT(0xc330000000000000); + DUK_DBLUNION_SET_UINT64(&du, t); + return du.d + 4503599627370496.0; /* 1 << 52 */ + } else if (t != 0) { + t &= DUK_U64_CONSTANT(0x0000ffffffffffff); /* positive */ + t |= DUK_U64_CONSTANT(0x4330000000000000); + DUK_DBLUNION_SET_UINT64(&du, t); + return du.d - 4503599627370496.0; /* 1 << 52 */ + } else { + return 0.0; /* zero */ + } +} +#endif /* DUK_USE_FASTINT && DUK_USE_PACKED_TVAL */ + +#if 0 /* unused */ +#if defined(DUK_USE_FASTINT) && !defined(DUK_USE_PACKED_TVAL) +DUK_INTERNAL DUK_ALWAYS_INLINE duk_double_t duk_tval_get_number_unpacked(duk_tval *tv) { + duk_double_union du; + duk_uint64_t t; + + DUK_ASSERT(tv->t == DUK_TAG_NUMBER || tv->t == DUK_TAG_FASTINT); + + if (tv->t == DUK_TAG_FASTINT) { + if (tv->v.fi >= 0) { + t = DUK_U64_CONSTANT(0x4330000000000000) | (duk_uint64_t) tv->v.fi; + DUK_DBLUNION_SET_UINT64(&du, t); + return du.d - 4503599627370496.0; /* 1 << 52 */ + } else { + t = DUK_U64_CONSTANT(0xc330000000000000) | (duk_uint64_t) (-tv->v.fi); + DUK_DBLUNION_SET_UINT64(&du, t); + return du.d + 4503599627370496.0; /* 1 << 52 */ + } + } else { + return tv->v.d; + } +} +#endif /* DUK_USE_FASTINT && DUK_USE_PACKED_TVAL */ +#endif /* 0 */ + +#if defined(DUK_USE_FASTINT) && !defined(DUK_USE_PACKED_TVAL) +DUK_INTERNAL DUK_ALWAYS_INLINE duk_double_t duk_tval_get_number_unpacked_fastint(duk_tval *tv) { + duk_double_union du; + duk_uint64_t t; + + DUK_ASSERT(tv->t == DUK_TAG_FASTINT); + + if (tv->v.fi >= 0) { + t = DUK_U64_CONSTANT(0x4330000000000000) | (duk_uint64_t) tv->v.fi; + DUK_DBLUNION_SET_UINT64(&du, t); + return du.d - 4503599627370496.0; /* 1 << 52 */ + } else { + t = DUK_U64_CONSTANT(0xc330000000000000) | (duk_uint64_t) (-tv->v.fi); + DUK_DBLUNION_SET_UINT64(&du, t); + return du.d + 4503599627370496.0; /* 1 << 52 */ + } +} +#endif /* DUK_USE_FASTINT && DUK_USE_PACKED_TVAL */ + +#endif /* DUK_USE_FASTINT */ + +/* + * Assertion helpers. + */ + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL void duk_tval_assert_valid(duk_tval *tv) { + DUK_ASSERT(tv != NULL); +} +#endif +#line 1 "duk_unicode_tables.c" +/* + * Unicode support tables automatically generated during build. + */ + +/* #include duk_internal.h -> already included */ + +/* + * Unicode tables containing ranges of Unicode characters in a + * packed format. These tables are used to match non-ASCII + * characters of complex productions by resorting to a linear + * range-by-range comparison. This is very slow, but is expected + * to be very rare in practical ECMAScript source code, and thus + * compactness is most important. + * + * The tables are matched using uni_range_match() and the format + * is described in tools/extract_chars.py. + */ + +#if defined(DUK_USE_SOURCE_NONBMP) +/* IdentifierStart production with ASCII excluded */ +/* duk_unicode_ids_noa[] */ +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +const duk_uint8_t duk_unicode_ids_noa[1116] = { +249,176,176,80,111,7,47,15,47,254,11,197,191,0,72,2,15,115,66,19,50,7,2,34, +2,240,66,244,50,247,185,249,98,241,99,7,241,159,57,240,181,63,31,241,191, +21,18,245,50,15,1,24,27,35,15,2,2,240,239,15,244,156,15,10,241,26,21,6,240, +101,10,4,15,9,240,152,175,39,240,82,127,56,242,100,15,4,8,159,1,240,5,115, +19,240,98,98,4,52,15,2,14,18,47,0,27,9,85,19,240,98,98,18,18,31,17,50,15,5, +47,2,130,34,240,98,98,18,68,15,4,15,1,31,9,12,115,19,240,98,98,18,68,15,16, +18,47,1,15,3,2,84,34,52,18,2,20,20,36,191,8,15,38,114,34,240,114,240,4,15, +12,38,31,16,5,114,34,240,114,146,68,15,18,2,31,1,31,4,114,34,241,147,15,2, +6,41,47,10,86,240,36,240,130,130,3,111,44,242,2,29,111,44,18,2,66,240,130, +2,146,26,3,66,15,7,63,18,15,49,114,241,79,13,79,101,241,191,6,15,2,85,52,4, +24,37,205,15,3,241,98,6,3,241,178,255,224,63,35,54,32,35,63,25,35,63,17,35, +54,32,35,62,47,41,35,63,51,241,127,0,240,47,70,53,79,254,21,227,240,18,240, +166,243,180,168,194,63,0,240,47,0,240,47,0,194,47,1,242,79,21,5,15,53,244, +152,67,241,34,6,243,107,240,255,35,240,227,76,241,197,240,175,40,240,122, +242,95,68,15,79,241,255,3,111,41,240,238,27,241,207,12,241,79,27,43,241,67, +136,241,179,47,27,50,82,20,6,251,15,50,255,224,8,53,63,22,53,55,32,32,32, +47,15,63,37,38,32,66,38,67,53,92,98,38,246,96,224,240,44,245,112,80,57,32, +68,112,32,32,35,42,51,100,80,240,63,25,255,233,107,241,242,241,242,247,87, +52,29,241,98,6,3,242,136,15,2,240,122,98,98,98,98,98,98,98,111,66,15,254, +12,146,240,184,132,52,95,70,114,47,74,35,111,27,47,78,240,63,11,242,127,0, +255,224,244,255,240,0,138,143,60,255,240,4,14,47,2,255,227,127,243,95,30, +63,253,79,0,177,240,111,31,240,47,15,63,64,241,152,63,87,63,37,52,242,42, +34,35,47,7,240,255,36,240,15,34,243,5,64,33,207,12,191,7,240,191,13,143,31, +240,224,240,36,41,180,47,25,240,146,39,240,111,7,64,79,34,32,65,52,48,32, +240,162,58,130,213,53,53,166,38,47,27,43,159,99,240,255,255,0,26,150,223,7, +95,33,255,240,0,255,143,254,6,3,245,175,24,109,70,2,146,194,66,2,18,18,245, +207,19,255,224,93,240,79,48,63,38,241,171,246,100,47,119,241,111,10,127,10, +207,73,69,53,53,50,241,91,47,10,47,3,33,46,61,241,79,107,243,127,37,255, +223,13,79,33,242,31,16,239,14,111,22,191,14,63,20,87,36,241,207,142,240,79, +20,95,20,95,24,159,36,248,239,254,2,154,240,107,127,138,83,2,241,194,20,3, +240,123,240,122,240,255,51,240,50,27,240,107,240,175,56,242,135,31,50,15,1, +50,34,240,223,28,240,212,240,223,21,114,240,207,13,242,107,240,107,240,62, +240,47,96,243,159,41,242,62,242,62,241,79,254,13,15,13,176,159,6,248,207,7, +223,37,243,223,29,241,47,9,240,207,20,240,240,207,19,64,223,32,240,3,240, +112,32,241,95,2,47,9,244,102,32,35,46,41,143,31,241,135,49,63,6,38,33,36, +64,240,64,212,249,15,37,240,67,240,96,241,47,32,240,97,32,250,175,31,241, +179,241,111,32,240,96,242,223,27,224,243,159,11,253,127,28,246,111,48,241, +16,249,39,63,23,240,32,32,240,224,191,24,128,240,112,207,30,240,80,241,79, +41,255,152,47,21,240,48,242,63,14,246,38,33,47,22,240,112,240,181,33,47,16, +240,0,255,224,59,240,63,254,0,31,254,40,207,88,245,255,3,251,79,254,155,15, +254,50,31,254,236,95,254,19,159,255,0,16,173,255,225,43,143,15,246,63,14, +240,79,32,240,35,241,31,5,111,3,255,225,164,243,15,114,243,182,15,52,207, +50,18,15,14,255,240,0,110,169,255,225,229,255,240,1,64,31,254,1,31,35,47,3, +57,255,224,126,255,231,248,245,182,196,136,159,255,0,6,90,244,82,243,114, +19,3,19,50,178,2,98,243,18,51,114,98,240,194,50,66,4,98,255,224,70,63,9,47, +9,47,15,47,9,47,15,47,9,47,15,47,9,47,15,47,9,39,255,232,40,241,219,111,2, +15,254,6,95,28,255,228,8,251,95,45,243,72,15,254,58,131,47,11,33,32,48,41, +35,32,32,112,80,32,32,34,33,32,48,32,32,32,32,33,32,51,38,35,35,32,41,47,1, +98,36,47,1,255,240,0,3,143,255,0,149,201,241,191,254,242,124,252,227,255, +240,0,87,79,0,255,240,0,194,63,254,177,63,254,17,0, +}; +#else +/* IdentifierStart production with ASCII and non-BMP excluded */ +/* duk_unicode_ids_noabmp[] */ +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +const duk_uint8_t duk_unicode_ids_noabmp[625] = { +249,176,176,80,111,7,47,15,47,254,11,197,191,0,72,2,15,115,66,19,50,7,2,34, +2,240,66,244,50,247,185,249,98,241,99,7,241,159,57,240,181,63,31,241,191, +21,18,245,50,15,1,24,27,35,15,2,2,240,239,15,244,156,15,10,241,26,21,6,240, +101,10,4,15,9,240,152,175,39,240,82,127,56,242,100,15,4,8,159,1,240,5,115, +19,240,98,98,4,52,15,2,14,18,47,0,27,9,85,19,240,98,98,18,18,31,17,50,15,5, +47,2,130,34,240,98,98,18,68,15,4,15,1,31,9,12,115,19,240,98,98,18,68,15,16, +18,47,1,15,3,2,84,34,52,18,2,20,20,36,191,8,15,38,114,34,240,114,240,4,15, +12,38,31,16,5,114,34,240,114,146,68,15,18,2,31,1,31,4,114,34,241,147,15,2, +6,41,47,10,86,240,36,240,130,130,3,111,44,242,2,29,111,44,18,2,66,240,130, +2,146,26,3,66,15,7,63,18,15,49,114,241,79,13,79,101,241,191,6,15,2,85,52,4, +24,37,205,15,3,241,98,6,3,241,178,255,224,63,35,54,32,35,63,25,35,63,17,35, +54,32,35,62,47,41,35,63,51,241,127,0,240,47,70,53,79,254,21,227,240,18,240, +166,243,180,168,194,63,0,240,47,0,240,47,0,194,47,1,242,79,21,5,15,53,244, +152,67,241,34,6,243,107,240,255,35,240,227,76,241,197,240,175,40,240,122, +242,95,68,15,79,241,255,3,111,41,240,238,27,241,207,12,241,79,27,43,241,67, +136,241,179,47,27,50,82,20,6,251,15,50,255,224,8,53,63,22,53,55,32,32,32, +47,15,63,37,38,32,66,38,67,53,92,98,38,246,96,224,240,44,245,112,80,57,32, +68,112,32,32,35,42,51,100,80,240,63,25,255,233,107,241,242,241,242,247,87, +52,29,241,98,6,3,242,136,15,2,240,122,98,98,98,98,98,98,98,111,66,15,254, +12,146,240,184,132,52,95,70,114,47,74,35,111,27,47,78,240,63,11,242,127,0, +255,224,244,255,240,0,138,143,60,255,240,4,14,47,2,255,227,127,243,95,30, +63,253,79,0,177,240,111,31,240,47,15,63,64,241,152,63,87,63,37,52,242,42, +34,35,47,7,240,255,36,240,15,34,243,5,64,33,207,12,191,7,240,191,13,143,31, +240,224,240,36,41,180,47,25,240,146,39,240,111,7,64,79,34,32,65,52,48,32, +240,162,58,130,213,53,53,166,38,47,27,43,159,99,240,255,255,0,26,150,223,7, +95,33,255,240,0,255,143,254,6,3,245,175,24,109,70,2,146,194,66,2,18,18,245, +207,19,255,224,93,240,79,48,63,38,241,171,246,100,47,119,241,111,10,127,10, +207,73,69,53,53,50,0, +}; +#endif + +#if defined(DUK_USE_SOURCE_NONBMP) +/* IdentifierStart production with Letter and ASCII excluded */ +/* duk_unicode_ids_m_let_noa[] */ +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +const duk_uint8_t duk_unicode_ids_m_let_noa[42] = { +255,240,0,94,18,255,233,99,241,51,63,254,215,32,240,184,240,2,255,240,6,89, +249,255,240,4,148,79,37,255,224,192,9,15,120,79,255,0,15,30,245,240, +}; +#else +/* IdentifierStart production with Letter, ASCII, and non-BMP excluded */ +/* duk_unicode_ids_m_let_noabmp[] */ +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +const duk_uint8_t duk_unicode_ids_m_let_noabmp[24] = { +255,240,0,94,18,255,233,99,241,51,63,254,215,32,240,184,240,2,255,240,6,89, +249,0, +}; +#endif + +#if defined(DUK_USE_SOURCE_NONBMP) +/* IdentifierPart production with IdentifierStart and ASCII excluded */ +/* duk_unicode_idp_m_ids_noa[] */ +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +const duk_uint8_t duk_unicode_idp_m_ids_noa[576] = { +255,225,243,246,15,254,0,116,255,191,29,32,33,33,32,243,170,242,47,15,112, +245,118,53,49,35,57,240,144,241,15,11,244,218,240,25,241,56,160,240,163,40, +34,36,241,210,246,158,47,17,242,130,47,2,38,177,57,240,50,242,160,38,49,50, +160,177,57,240,0,50,242,160,36,81,50,64,240,107,64,194,242,160,39,34,34, +240,97,57,181,34,242,160,38,49,50,145,177,57,240,64,242,212,66,35,160,240, +9,240,36,242,182,34,35,129,193,57,240,50,242,160,38,34,35,129,193,57,240, +35,242,145,38,34,35,160,177,57,240,65,243,128,85,32,39,121,49,242,240,54, +215,41,244,144,56,197,57,243,1,121,192,32,32,81,242,63,4,33,106,47,20,160, +245,111,4,41,211,82,34,54,67,235,46,255,225,179,47,254,42,98,240,242,240, +241,241,1,243,47,16,160,57,241,50,57,245,209,241,64,246,139,91,185,247,41, +242,244,242,185,47,13,58,121,240,141,243,68,242,31,1,201,240,56,210,241,12, +57,241,237,242,47,4,153,121,246,130,47,5,80,112,50,251,143,42,36,255,225,0, +31,35,31,5,15,109,197,4,191,254,175,34,247,240,245,47,16,255,225,30,95,91, +31,255,0,100,121,159,55,5,159,18,31,66,31,254,0,64,64,80,240,148,244,161, +242,79,2,185,127,2,234,240,231,240,188,241,227,242,29,240,25,192,185,242, +29,208,145,57,241,50,242,64,34,49,97,32,241,180,97,253,231,33,57,255,240,3, +225,128,255,225,213,240,15,2,240,4,31,10,47,178,159,23,15,254,27,16,253,64, +248,116,255,224,25,159,254,68,178,33,99,241,162,80,249,113,255,225,49,57, +159,254,16,10,250,18,242,126,241,25,240,19,241,250,242,121,114,241,109,41, +97,241,224,210,242,45,147,73,244,75,112,249,43,105,115,242,145,38,49,50, +160,177,54,68,251,47,2,169,80,244,63,4,217,252,118,56,240,209,244,79,1,240, +25,244,60,153,244,94,89,254,78,249,121,253,150,54,64,240,233,241,166,35, +144,170,242,15,0,255,224,137,114,127,2,159,42,240,98,223,108,84,2,18,98,9, +159,34,66,18,73,159,254,3,211,255,240,3,165,217,247,132,242,214,240,185, +255,226,233,2,242,120,63,255,0,59,254,31,255,0,3,186,68,89,115,111,16,63, +134,47,254,71,223,34,255,224,244,242,117,242,41,15,0,15,8,66,239,254,68,70, +47,1,54,33,36,255,118,169,255,224,150,223,254,76,166,245,246,105,255,240, +192,105,175,224,0, +}; +#else +/* IdentifierPart production with IdentifierStart, ASCII, and non-BMP excluded */ +/* duk_unicode_idp_m_ids_noabmp[] */ +/* + * Automatically generated by extract_chars.py, do not edit! + */ + +const duk_uint8_t duk_unicode_idp_m_ids_noabmp[358] = { +255,225,243,246,15,254,0,116,255,191,29,32,33,33,32,243,170,242,47,15,112, +245,118,53,49,35,57,240,144,241,15,11,244,218,240,25,241,56,160,240,163,40, +34,36,241,210,246,158,47,17,242,130,47,2,38,177,57,240,50,242,160,38,49,50, +160,177,57,240,0,50,242,160,36,81,50,64,240,107,64,194,242,160,39,34,34, +240,97,57,181,34,242,160,38,49,50,145,177,57,240,64,242,212,66,35,160,240, +9,240,36,242,182,34,35,129,193,57,240,50,242,160,38,34,35,129,193,57,240, +35,242,145,38,34,35,160,177,57,240,65,243,128,85,32,39,121,49,242,240,54, +215,41,244,144,56,197,57,243,1,121,192,32,32,81,242,63,4,33,106,47,20,160, +245,111,4,41,211,82,34,54,67,235,46,255,225,179,47,254,42,98,240,242,240, +241,241,1,243,47,16,160,57,241,50,57,245,209,241,64,246,139,91,185,247,41, +242,244,242,185,47,13,58,121,240,141,243,68,242,31,1,201,240,56,210,241,12, +57,241,237,242,47,4,153,121,246,130,47,5,80,112,50,251,143,42,36,255,225,0, +31,35,31,5,15,109,197,4,191,254,175,34,247,240,245,47,16,255,225,30,95,91, +31,255,0,100,121,159,55,5,159,18,31,66,31,254,0,64,64,80,240,148,244,161, +242,79,2,185,127,2,234,240,231,240,188,241,227,242,29,240,25,192,185,242, +29,208,145,57,241,50,242,64,34,49,97,32,241,180,97,253,231,33,57,255,240,3, +225,128,255,225,213,240,15,2,240,4,31,10,47,178,159,23,0, +}; +#endif + +/* + * Case conversion tables generated using tools/extract_caseconv.py. + */ + +/* duk_unicode_caseconv_uc[] */ +/* duk_unicode_caseconv_lc[] */ + +/* + * Automatically generated by extract_caseconv.py, do not edit! + */ + +const duk_uint8_t duk_unicode_caseconv_uc[1411] = { +152,3,128,3,0,184,7,192,6,192,112,35,242,199,224,64,74,192,49,32,128,162, +128,108,65,1,189,129,254,131,3,173,3,136,6,7,98,7,34,68,15,12,14,140,72,30, +104,28,112,32,67,0,65,4,0,138,0,128,4,1,88,65,76,83,8,104,14,72,43,16,253, +28,189,6,39,240,39,224,24,114,12,16,132,16,248,0,248,64,129,241,1,241,128, +195,228,3,229,2,7,204,7,206,4,15,160,15,164,6,31,96,31,104,16,62,224,63, +116,8,125,200,127,32,32,251,176,254,208,33,247,129,255,128,67,239,67,253, +64,135,223,7,254,129,15,216,15,220,2,31,208,31,216,4,63,192,63,208,8,133, +192,133,128,129,38,129,37,177,162,195,2,192,5,229,160,2,20,9,170,220,4,232, +40,127,160,255,144,154,136,4,4,4,0,192,9,152,9,144,48,19,160,19,145,0,41, +96,41,69,192,94,128,94,65,128,193,128,193,2,1,161,1,160,6,3,104,3,102,8,7, +56,7,52,64,14,248,14,240,144,31,144,31,130,128,68,96,68,66,64,145,192,145, +130,129,184,129,184,2,3,217,3,216,24,8,194,8,192,68,18,44,18,40,216,38,16, +38,8,112,77,16,77,6,3,192,35,192,18,199,168,71,168,24,15,168,143,172,132, +44,104,44,103,6,89,2,89,0,200,179,176,179,172,21,50,13,50,1,122,104,26,104, +1,212,228,116,228,65,233,204,233,204,143,211,189,83,188,130,167,127,167, +126,11,79,35,79,32,10,158,94,158,88,85,61,173,61,160,97,192,107,64,107,1,0, +226,128,226,3,1,198,1,196,6,3,228,3,226,8,10,0,6,152,16,31,192,31,184,34, +199,50,199,32,65,128,196,0,195,130,1,185,1,184,4,4,205,79,84,8,0,192,143,0, +142,193,1,52,128,203,2,45,39,16,199,5,253,0,11,80,57,192,15,240,23,128,19, +16,4,144,23,240,5,48,24,0,36,48,25,32,25,16,25,80,31,96,25,144,25,128,25, +160,35,208,25,224,34,0,26,128,26,112,27,240,31,112,29,208,24,224,31,48,31, +16,37,2,198,240,37,18,198,208,37,34,199,0,37,48,24,16,37,64,24,96,37,144, +24,240,37,176,25,0,37,202,122,176,38,0,25,48,38,26,122,192,38,48,25,64,38, +90,120,208,38,128,25,112,38,178,198,32,38,202,122,208,39,18,198,224,39,32, +25,208,39,80,25,240,39,210,198,64,40,42,124,80,40,122,123,16,40,128,26,224, +40,144,36,64,40,192,36,80,41,32,27,112,41,218,123,32,41,234,123,0,52,80,57, +144,55,112,55,96,58,192,56,96,60,32,58,48,60,192,56,192,61,0,57,32,61,16, +57,128,61,80,58,96,61,96,58,0,61,112,60,240,63,0,57,160,63,16,58,16,63,32, +63,144,63,48,55,240,63,80,57,80,76,240,76,1,200,0,65,33,200,16,65,65,200, +32,65,225,200,80,66,33,200,96,66,161,200,112,70,33,200,138,100,161,215,154, +119,209,215,210,198,49,216,234,124,97,233,177,230,1,251,224,57,145,254,81, +254,194,20,226,19,34,24,66,24,50,198,18,198,2,198,80,35,162,198,96,35,226, +207,50,207,42,120,202,120,186,121,74,124,74,124,58,124,42,181,58,123,60, +192,27,240,2,152,2,152,10,76,5,120,0,156,3,225,0,37,1,134,1,200,96,115,32, +97,0,96,32,118,24,29,40,24,64,24,8,44,60,10,106,10,164,61,45,0,36,1,152, +143,75,192,10,128,97,3,211,16,2,184,24,80,244,204,0,178,6,20,61,53,0,32, +129,95,15,168,64,116,160,98,99,234,88,29,40,24,152,24,0,250,166,7,74,6,38, +6,2,62,173,129,210,129,137,129,161,15,192,67,225,0,115,35,240,48,248,72,28, +200,252,20,62,20,7,50,63,7,15,133,129,204,143,194,67,225,128,115,35,240, +176,248,104,28,200,252,52,62,28,7,50,63,15,15,135,129,204,143,196,67,225,0, +115,35,241,48,248,72,28,200,252,84,62,20,7,50,63,23,15,133,129,204,143,198, +67,225,128,115,35,241,176,248,104,28,200,252,116,62,28,7,50,63,31,15,135, +129,204,143,200,67,229,0,115,35,242,48,249,72,28,200,252,148,62,84,7,50,63, +39,15,149,129,204,143,202,67,229,128,115,35,242,176,249,104,28,200,252,180, +62,92,7,50,63,47,15,151,129,204,143,204,67,229,0,115,35,243,48,249,72,28, +200,252,212,62,84,7,50,63,55,15,149,129,204,143,206,67,229,128,115,35,243, +176,249,104,28,200,252,244,62,92,7,50,63,63,15,151,129,204,143,208,67,237, +0,115,35,244,48,251,72,28,200,253,20,62,212,7,50,63,71,15,181,129,204,143, +210,67,237,128,115,35,244,176,251,104,28,200,253,52,62,220,7,50,63,79,15, +183,129,204,143,212,67,237,0,115,35,245,48,251,72,28,200,253,84,62,212,7, +50,63,87,15,181,129,204,143,214,67,237,128,115,35,245,176,251,104,28,200, +253,116,62,220,7,50,63,95,15,183,129,204,143,217,67,247,64,115,35,246,112, +28,136,28,200,253,164,7,12,7,50,63,109,1,200,129,161,15,219,224,114,32,104, +64,115,35,247,144,28,136,28,200,254,20,63,148,7,50,63,135,1,203,129,204, +143,226,64,113,32,115,35,248,208,28,184,26,16,254,62,7,46,6,132,7,50,63, +153,1,203,129,204,143,233,96,115,32,97,0,96,3,250,120,28,200,24,64,24,8, +254,180,7,50,6,132,63,175,129,204,129,132,1,161,15,241,96,116,160,97,0,96, +3,252,120,29,40,24,64,24,8,255,36,7,66,6,38,63,205,1,210,129,161,15,243, +224,116,160,97,0,104,67,254,80,255,208,28,200,255,156,7,82,7,50,63,233,1, +199,129,204,143,251,64,117,32,104,67,254,248,29,72,26,16,28,200,255,228,7, +82,7,51,246,1,0,35,0,35,125,128,192,8,192,9,63,96,80,2,48,2,103,216,30,0, +140,0,140,0,147,246,9,128,35,0,35,0,38,125,130,192,10,96,10,159,96,208,2, +152,2,167,216,156,10,136,10,141,246,41,2,162,2,154,253,138,192,168,128,167, +127,98,208,42,112,42,55,216,188,10,136,10,122, +}; +const duk_uint8_t duk_unicode_caseconv_lc[706] = { +160,3,0,3,128,184,6,192,7,192,112,24,144,37,96,64,54,32,81,64,128,226,0, +235,65,129,199,1,230,130,3,145,3,177,34,7,70,7,134,36,15,244,13,236,24,32, +0,34,129,0,65,0,67,4,0,166,32,172,41,132,40,11,64,19,9,208,85,184,80,19, +240,19,248,12,57,32,33,160,172,114,244,67,244,24,248,64,248,0,129,241,129, +241,0,195,229,3,228,2,7,206,7,204,4,15,164,15,160,6,31,104,31,96,16,63,16, +63,0,32,126,96,126,64,64,253,64,253,0,129,251,129,251,0,67,247,67,238,0, +135,242,7,220,130,15,236,15,232,2,31,218,31,118,4,63,208,63,192,8,127,168, +125,232,16,255,192,251,192,33,255,161,247,192,68,44,4,46,4,9,45,137,52,13, +22,0,22,24,47,44,126,2,63,5,254,67,254,130,106,48,16,0,16,19,0,38,64,38,96, +192,78,64,78,132,0,165,0,165,151,1,121,1,122,6,3,4,3,6,8,6,128,6,132,24,13, +152,13,160,32,28,176,28,193,32,59,192,59,226,64,124,128,124,193,0,252,0, +252,148,2,34,2,35,18,4,140,4,142,20,13,192,13,196,16,30,192,30,200,192,70, +0,70,18,32,145,64,145,102,193,48,65,48,131,130,104,2,104,176,30,0,30,1,150, +61,64,61,66,192,125,100,125,68,33,99,57,99,64,50,200,2,200,22,69,157,101, +157,128,169,144,41,144,75,211,64,83,64,142,167,34,167,35,15,78,101,78,102, +126,157,230,157,232,21,59,245,59,248,90,121,10,121,16,84,242,212,242,226, +169,237,41,237,67,12,3,76,5,0,8,6,176,6,180,16,14,32,14,48,48,28,80,28,96, +64,126,224,127,0,139,28,139,28,193,6,3,14,3,16,8,6,224,6,228,21,61,80,19, +48,32,3,1,150,2,105,4,4,118,4,120,8,67,28,180,156,23,240,192,94,0,63,192, +96,64,148,192,97,128,149,0,99,128,119,64,99,192,150,64,100,0,150,192,100, +64,100,128,100,192,152,0,101,0,152,192,101,192,154,0,102,0,102,64,103,64, +156,128,103,192,157,64,105,192,106,0,107,128,162,0,109,192,164,128,124,64, +124,192,125,128,101,64,125,192,111,192,136,0,103,128,142,139,25,64,143,64, +102,128,143,139,25,128,144,192,96,0,145,0,162,64,145,64,163,0,221,128,221, +192,223,192,252,192,225,128,235,0,227,0,243,0,243,192,245,192,253,0,238,0, +254,64,252,129,48,1,51,199,167,128,55,199,239,7,236,199,243,7,240,199,251, +7,249,71,255,7,252,200,73,128,242,72,74,128,26,200,74,192,57,72,76,136,83, +136,96,200,97,11,24,11,24,75,24,128,154,203,24,199,95,75,25,0,159,75,27,64, +148,75,27,128,156,75,27,192,148,11,28,0,148,139,60,139,60,233,223,71,94, +105,226,233,227,41,227,64,153,105,234,192,151,41,235,0,152,105,235,64,155, +41,236,0,167,169,236,64,161,233,236,128,167,105,236,234,212,233,240,169, +240,233,241,41,229,41,241,64,160,169,241,135,99,128,128,152,64,13,32,96, +224, +}; + +#if defined(DUK_USE_REGEXP_CANON_WORKAROUND) +/* + * Automatically generated by extract_caseconv.py, do not edit! + */ + +const duk_uint16_t duk_unicode_re_canon_lookup[65536] = { +0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27, +28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52, +53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77, +78,79,80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95,96,65,66,67,68,69,70, +71,72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,123,124,125, +126,127,128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143, +144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,160,161, +162,163,164,165,166,167,168,169,170,171,172,173,174,175,176,177,178,179, +180,924,182,183,184,185,186,187,188,189,190,191,192,193,194,195,196,197, +198,199,200,201,202,203,204,205,206,207,208,209,210,211,212,213,214,215, +216,217,218,219,220,221,222,223,192,193,194,195,196,197,198,199,200,201, +202,203,204,205,206,207,208,209,210,211,212,213,214,247,216,217,218,219, +220,221,222,376,256,256,258,258,260,260,262,262,264,264,266,266,268,268, +270,270,272,272,274,274,276,276,278,278,280,280,282,282,284,284,286,286, +288,288,290,290,292,292,294,294,296,296,298,298,300,300,302,302,304,305, +306,306,308,308,310,310,312,313,313,315,315,317,317,319,319,321,321,323, +323,325,325,327,327,329,330,330,332,332,334,334,336,336,338,338,340,340, +342,342,344,344,346,346,348,348,350,350,352,352,354,354,356,356,358,358, +360,360,362,362,364,364,366,366,368,368,370,370,372,372,374,374,376,377, +377,379,379,381,381,383,579,385,386,386,388,388,390,391,391,393,394,395, +395,397,398,399,400,401,401,403,404,502,406,407,408,408,573,411,412,413, +544,415,416,416,418,418,420,420,422,423,423,425,426,427,428,428,430,431, +431,433,434,435,435,437,437,439,440,440,442,443,444,444,446,503,448,449, +450,451,452,452,452,455,455,455,458,458,458,461,461,463,463,465,465,467, +467,469,469,471,471,473,473,475,475,398,478,478,480,480,482,482,484,484, +486,486,488,488,490,490,492,492,494,494,496,497,497,497,500,500,502,503, +504,504,506,506,508,508,510,510,512,512,514,514,516,516,518,518,520,520, +522,522,524,524,526,526,528,528,530,530,532,532,534,534,536,536,538,538, +540,540,542,542,544,545,546,546,548,548,550,550,552,552,554,554,556,556, +558,558,560,560,562,562,564,565,566,567,568,569,570,571,571,573,574,11390, +11391,577,577,579,580,581,582,582,584,584,586,586,588,588,590,590,11375, +11373,11376,385,390,597,393,394,600,399,602,400,42923L,605,606,607,403, +42924L,610,404,612,42893L,42922L,615,407,406,42926L,11362,42925L,621,622, +412,624,11374,413,627,628,415,630,631,632,633,634,635,636,11364,638,639, +422,641,42949L,425,644,645,646,42929L,430,580,433,434,581,653,654,655,656, +657,439,659,660,661,662,663,664,665,666,667,668,42930L,42928L,671,672,673, +674,675,676,677,678,679,680,681,682,683,684,685,686,687,688,689,690,691, +692,693,694,695,696,697,698,699,700,701,702,703,704,705,706,707,708,709, +710,711,712,713,714,715,716,717,718,719,720,721,722,723,724,725,726,727, +728,729,730,731,732,733,734,735,736,737,738,739,740,741,742,743,744,745, +746,747,748,749,750,751,752,753,754,755,756,757,758,759,760,761,762,763, +764,765,766,767,768,769,770,771,772,773,774,775,776,777,778,779,780,781, +782,783,784,785,786,787,788,789,790,791,792,793,794,795,796,797,798,799, +800,801,802,803,804,805,806,807,808,809,810,811,812,813,814,815,816,817, +818,819,820,821,822,823,824,825,826,827,828,829,830,831,832,833,834,835, +836,921,838,839,840,841,842,843,844,845,846,847,848,849,850,851,852,853, +854,855,856,857,858,859,860,861,862,863,864,865,866,867,868,869,870,871, +872,873,874,875,876,877,878,879,880,880,882,882,884,885,886,886,888,889, +890,1021,1022,1023,894,895,896,897,898,899,900,901,902,903,904,905,906,907, +908,909,910,911,912,913,914,915,916,917,918,919,920,921,922,923,924,925, +926,927,928,929,930,931,932,933,934,935,936,937,938,939,902,904,905,906, +944,913,914,915,916,917,918,919,920,921,922,923,924,925,926,927,928,929, +931,931,932,933,934,935,936,937,938,939,908,910,911,975,914,920,978,979, +980,934,928,975,984,984,986,986,988,988,990,990,992,992,994,994,996,996, +998,998,1000,1000,1002,1002,1004,1004,1006,1006,922,929,1017,895,1012,917, +1014,1015,1015,1017,1018,1018,1020,1021,1022,1023,1024,1025,1026,1027,1028, +1029,1030,1031,1032,1033,1034,1035,1036,1037,1038,1039,1040,1041,1042,1043, +1044,1045,1046,1047,1048,1049,1050,1051,1052,1053,1054,1055,1056,1057,1058, +1059,1060,1061,1062,1063,1064,1065,1066,1067,1068,1069,1070,1071,1040,1041, +1042,1043,1044,1045,1046,1047,1048,1049,1050,1051,1052,1053,1054,1055,1056, +1057,1058,1059,1060,1061,1062,1063,1064,1065,1066,1067,1068,1069,1070,1071, +1024,1025,1026,1027,1028,1029,1030,1031,1032,1033,1034,1035,1036,1037,1038, +1039,1120,1120,1122,1122,1124,1124,1126,1126,1128,1128,1130,1130,1132,1132, +1134,1134,1136,1136,1138,1138,1140,1140,1142,1142,1144,1144,1146,1146,1148, +1148,1150,1150,1152,1152,1154,1155,1156,1157,1158,1159,1160,1161,1162,1162, +1164,1164,1166,1166,1168,1168,1170,1170,1172,1172,1174,1174,1176,1176,1178, +1178,1180,1180,1182,1182,1184,1184,1186,1186,1188,1188,1190,1190,1192,1192, +1194,1194,1196,1196,1198,1198,1200,1200,1202,1202,1204,1204,1206,1206,1208, +1208,1210,1210,1212,1212,1214,1214,1216,1217,1217,1219,1219,1221,1221,1223, +1223,1225,1225,1227,1227,1229,1229,1216,1232,1232,1234,1234,1236,1236,1238, +1238,1240,1240,1242,1242,1244,1244,1246,1246,1248,1248,1250,1250,1252,1252, +1254,1254,1256,1256,1258,1258,1260,1260,1262,1262,1264,1264,1266,1266,1268, +1268,1270,1270,1272,1272,1274,1274,1276,1276,1278,1278,1280,1280,1282,1282, +1284,1284,1286,1286,1288,1288,1290,1290,1292,1292,1294,1294,1296,1296,1298, +1298,1300,1300,1302,1302,1304,1304,1306,1306,1308,1308,1310,1310,1312,1312, +1314,1314,1316,1316,1318,1318,1320,1320,1322,1322,1324,1324,1326,1326,1328, +1329,1330,1331,1332,1333,1334,1335,1336,1337,1338,1339,1340,1341,1342,1343, +1344,1345,1346,1347,1348,1349,1350,1351,1352,1353,1354,1355,1356,1357,1358, +1359,1360,1361,1362,1363,1364,1365,1366,1367,1368,1369,1370,1371,1372,1373, +1374,1375,1376,1329,1330,1331,1332,1333,1334,1335,1336,1337,1338,1339,1340, +1341,1342,1343,1344,1345,1346,1347,1348,1349,1350,1351,1352,1353,1354,1355, +1356,1357,1358,1359,1360,1361,1362,1363,1364,1365,1366,1415,1416,1417,1418, +1419,1420,1421,1422,1423,1424,1425,1426,1427,1428,1429,1430,1431,1432,1433, +1434,1435,1436,1437,1438,1439,1440,1441,1442,1443,1444,1445,1446,1447,1448, +1449,1450,1451,1452,1453,1454,1455,1456,1457,1458,1459,1460,1461,1462,1463, +1464,1465,1466,1467,1468,1469,1470,1471,1472,1473,1474,1475,1476,1477,1478, +1479,1480,1481,1482,1483,1484,1485,1486,1487,1488,1489,1490,1491,1492,1493, +1494,1495,1496,1497,1498,1499,1500,1501,1502,1503,1504,1505,1506,1507,1508, +1509,1510,1511,1512,1513,1514,1515,1516,1517,1518,1519,1520,1521,1522,1523, +1524,1525,1526,1527,1528,1529,1530,1531,1532,1533,1534,1535,1536,1537,1538, +1539,1540,1541,1542,1543,1544,1545,1546,1547,1548,1549,1550,1551,1552,1553, +1554,1555,1556,1557,1558,1559,1560,1561,1562,1563,1564,1565,1566,1567,1568, +1569,1570,1571,1572,1573,1574,1575,1576,1577,1578,1579,1580,1581,1582,1583, +1584,1585,1586,1587,1588,1589,1590,1591,1592,1593,1594,1595,1596,1597,1598, +1599,1600,1601,1602,1603,1604,1605,1606,1607,1608,1609,1610,1611,1612,1613, +1614,1615,1616,1617,1618,1619,1620,1621,1622,1623,1624,1625,1626,1627,1628, +1629,1630,1631,1632,1633,1634,1635,1636,1637,1638,1639,1640,1641,1642,1643, +1644,1645,1646,1647,1648,1649,1650,1651,1652,1653,1654,1655,1656,1657,1658, +1659,1660,1661,1662,1663,1664,1665,1666,1667,1668,1669,1670,1671,1672,1673, +1674,1675,1676,1677,1678,1679,1680,1681,1682,1683,1684,1685,1686,1687,1688, +1689,1690,1691,1692,1693,1694,1695,1696,1697,1698,1699,1700,1701,1702,1703, +1704,1705,1706,1707,1708,1709,1710,1711,1712,1713,1714,1715,1716,1717,1718, +1719,1720,1721,1722,1723,1724,1725,1726,1727,1728,1729,1730,1731,1732,1733, +1734,1735,1736,1737,1738,1739,1740,1741,1742,1743,1744,1745,1746,1747,1748, +1749,1750,1751,1752,1753,1754,1755,1756,1757,1758,1759,1760,1761,1762,1763, +1764,1765,1766,1767,1768,1769,1770,1771,1772,1773,1774,1775,1776,1777,1778, +1779,1780,1781,1782,1783,1784,1785,1786,1787,1788,1789,1790,1791,1792,1793, +1794,1795,1796,1797,1798,1799,1800,1801,1802,1803,1804,1805,1806,1807,1808, +1809,1810,1811,1812,1813,1814,1815,1816,1817,1818,1819,1820,1821,1822,1823, +1824,1825,1826,1827,1828,1829,1830,1831,1832,1833,1834,1835,1836,1837,1838, +1839,1840,1841,1842,1843,1844,1845,1846,1847,1848,1849,1850,1851,1852,1853, +1854,1855,1856,1857,1858,1859,1860,1861,1862,1863,1864,1865,1866,1867,1868, +1869,1870,1871,1872,1873,1874,1875,1876,1877,1878,1879,1880,1881,1882,1883, +1884,1885,1886,1887,1888,1889,1890,1891,1892,1893,1894,1895,1896,1897,1898, +1899,1900,1901,1902,1903,1904,1905,1906,1907,1908,1909,1910,1911,1912,1913, +1914,1915,1916,1917,1918,1919,1920,1921,1922,1923,1924,1925,1926,1927,1928, +1929,1930,1931,1932,1933,1934,1935,1936,1937,1938,1939,1940,1941,1942,1943, +1944,1945,1946,1947,1948,1949,1950,1951,1952,1953,1954,1955,1956,1957,1958, +1959,1960,1961,1962,1963,1964,1965,1966,1967,1968,1969,1970,1971,1972,1973, +1974,1975,1976,1977,1978,1979,1980,1981,1982,1983,1984,1985,1986,1987,1988, +1989,1990,1991,1992,1993,1994,1995,1996,1997,1998,1999,2000,2001,2002,2003, +2004,2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016,2017,2018, +2019,2020,2021,2022,2023,2024,2025,2026,2027,2028,2029,2030,2031,2032,2033, +2034,2035,2036,2037,2038,2039,2040,2041,2042,2043,2044,2045,2046,2047,2048, +2049,2050,2051,2052,2053,2054,2055,2056,2057,2058,2059,2060,2061,2062,2063, +2064,2065,2066,2067,2068,2069,2070,2071,2072,2073,2074,2075,2076,2077,2078, +2079,2080,2081,2082,2083,2084,2085,2086,2087,2088,2089,2090,2091,2092,2093, +2094,2095,2096,2097,2098,2099,2100,2101,2102,2103,2104,2105,2106,2107,2108, +2109,2110,2111,2112,2113,2114,2115,2116,2117,2118,2119,2120,2121,2122,2123, +2124,2125,2126,2127,2128,2129,2130,2131,2132,2133,2134,2135,2136,2137,2138, +2139,2140,2141,2142,2143,2144,2145,2146,2147,2148,2149,2150,2151,2152,2153, +2154,2155,2156,2157,2158,2159,2160,2161,2162,2163,2164,2165,2166,2167,2168, +2169,2170,2171,2172,2173,2174,2175,2176,2177,2178,2179,2180,2181,2182,2183, +2184,2185,2186,2187,2188,2189,2190,2191,2192,2193,2194,2195,2196,2197,2198, +2199,2200,2201,2202,2203,2204,2205,2206,2207,2208,2209,2210,2211,2212,2213, +2214,2215,2216,2217,2218,2219,2220,2221,2222,2223,2224,2225,2226,2227,2228, +2229,2230,2231,2232,2233,2234,2235,2236,2237,2238,2239,2240,2241,2242,2243, +2244,2245,2246,2247,2248,2249,2250,2251,2252,2253,2254,2255,2256,2257,2258, +2259,2260,2261,2262,2263,2264,2265,2266,2267,2268,2269,2270,2271,2272,2273, +2274,2275,2276,2277,2278,2279,2280,2281,2282,2283,2284,2285,2286,2287,2288, +2289,2290,2291,2292,2293,2294,2295,2296,2297,2298,2299,2300,2301,2302,2303, +2304,2305,2306,2307,2308,2309,2310,2311,2312,2313,2314,2315,2316,2317,2318, +2319,2320,2321,2322,2323,2324,2325,2326,2327,2328,2329,2330,2331,2332,2333, +2334,2335,2336,2337,2338,2339,2340,2341,2342,2343,2344,2345,2346,2347,2348, +2349,2350,2351,2352,2353,2354,2355,2356,2357,2358,2359,2360,2361,2362,2363, +2364,2365,2366,2367,2368,2369,2370,2371,2372,2373,2374,2375,2376,2377,2378, +2379,2380,2381,2382,2383,2384,2385,2386,2387,2388,2389,2390,2391,2392,2393, +2394,2395,2396,2397,2398,2399,2400,2401,2402,2403,2404,2405,2406,2407,2408, +2409,2410,2411,2412,2413,2414,2415,2416,2417,2418,2419,2420,2421,2422,2423, +2424,2425,2426,2427,2428,2429,2430,2431,2432,2433,2434,2435,2436,2437,2438, +2439,2440,2441,2442,2443,2444,2445,2446,2447,2448,2449,2450,2451,2452,2453, +2454,2455,2456,2457,2458,2459,2460,2461,2462,2463,2464,2465,2466,2467,2468, +2469,2470,2471,2472,2473,2474,2475,2476,2477,2478,2479,2480,2481,2482,2483, +2484,2485,2486,2487,2488,2489,2490,2491,2492,2493,2494,2495,2496,2497,2498, +2499,2500,2501,2502,2503,2504,2505,2506,2507,2508,2509,2510,2511,2512,2513, +2514,2515,2516,2517,2518,2519,2520,2521,2522,2523,2524,2525,2526,2527,2528, +2529,2530,2531,2532,2533,2534,2535,2536,2537,2538,2539,2540,2541,2542,2543, +2544,2545,2546,2547,2548,2549,2550,2551,2552,2553,2554,2555,2556,2557,2558, +2559,2560,2561,2562,2563,2564,2565,2566,2567,2568,2569,2570,2571,2572,2573, +2574,2575,2576,2577,2578,2579,2580,2581,2582,2583,2584,2585,2586,2587,2588, +2589,2590,2591,2592,2593,2594,2595,2596,2597,2598,2599,2600,2601,2602,2603, +2604,2605,2606,2607,2608,2609,2610,2611,2612,2613,2614,2615,2616,2617,2618, +2619,2620,2621,2622,2623,2624,2625,2626,2627,2628,2629,2630,2631,2632,2633, +2634,2635,2636,2637,2638,2639,2640,2641,2642,2643,2644,2645,2646,2647,2648, +2649,2650,2651,2652,2653,2654,2655,2656,2657,2658,2659,2660,2661,2662,2663, +2664,2665,2666,2667,2668,2669,2670,2671,2672,2673,2674,2675,2676,2677,2678, +2679,2680,2681,2682,2683,2684,2685,2686,2687,2688,2689,2690,2691,2692,2693, +2694,2695,2696,2697,2698,2699,2700,2701,2702,2703,2704,2705,2706,2707,2708, +2709,2710,2711,2712,2713,2714,2715,2716,2717,2718,2719,2720,2721,2722,2723, +2724,2725,2726,2727,2728,2729,2730,2731,2732,2733,2734,2735,2736,2737,2738, +2739,2740,2741,2742,2743,2744,2745,2746,2747,2748,2749,2750,2751,2752,2753, +2754,2755,2756,2757,2758,2759,2760,2761,2762,2763,2764,2765,2766,2767,2768, +2769,2770,2771,2772,2773,2774,2775,2776,2777,2778,2779,2780,2781,2782,2783, +2784,2785,2786,2787,2788,2789,2790,2791,2792,2793,2794,2795,2796,2797,2798, +2799,2800,2801,2802,2803,2804,2805,2806,2807,2808,2809,2810,2811,2812,2813, +2814,2815,2816,2817,2818,2819,2820,2821,2822,2823,2824,2825,2826,2827,2828, +2829,2830,2831,2832,2833,2834,2835,2836,2837,2838,2839,2840,2841,2842,2843, +2844,2845,2846,2847,2848,2849,2850,2851,2852,2853,2854,2855,2856,2857,2858, +2859,2860,2861,2862,2863,2864,2865,2866,2867,2868,2869,2870,2871,2872,2873, +2874,2875,2876,2877,2878,2879,2880,2881,2882,2883,2884,2885,2886,2887,2888, +2889,2890,2891,2892,2893,2894,2895,2896,2897,2898,2899,2900,2901,2902,2903, +2904,2905,2906,2907,2908,2909,2910,2911,2912,2913,2914,2915,2916,2917,2918, +2919,2920,2921,2922,2923,2924,2925,2926,2927,2928,2929,2930,2931,2932,2933, +2934,2935,2936,2937,2938,2939,2940,2941,2942,2943,2944,2945,2946,2947,2948, +2949,2950,2951,2952,2953,2954,2955,2956,2957,2958,2959,2960,2961,2962,2963, +2964,2965,2966,2967,2968,2969,2970,2971,2972,2973,2974,2975,2976,2977,2978, +2979,2980,2981,2982,2983,2984,2985,2986,2987,2988,2989,2990,2991,2992,2993, +2994,2995,2996,2997,2998,2999,3000,3001,3002,3003,3004,3005,3006,3007,3008, +3009,3010,3011,3012,3013,3014,3015,3016,3017,3018,3019,3020,3021,3022,3023, +3024,3025,3026,3027,3028,3029,3030,3031,3032,3033,3034,3035,3036,3037,3038, +3039,3040,3041,3042,3043,3044,3045,3046,3047,3048,3049,3050,3051,3052,3053, +3054,3055,3056,3057,3058,3059,3060,3061,3062,3063,3064,3065,3066,3067,3068, +3069,3070,3071,3072,3073,3074,3075,3076,3077,3078,3079,3080,3081,3082,3083, +3084,3085,3086,3087,3088,3089,3090,3091,3092,3093,3094,3095,3096,3097,3098, +3099,3100,3101,3102,3103,3104,3105,3106,3107,3108,3109,3110,3111,3112,3113, +3114,3115,3116,3117,3118,3119,3120,3121,3122,3123,3124,3125,3126,3127,3128, +3129,3130,3131,3132,3133,3134,3135,3136,3137,3138,3139,3140,3141,3142,3143, +3144,3145,3146,3147,3148,3149,3150,3151,3152,3153,3154,3155,3156,3157,3158, +3159,3160,3161,3162,3163,3164,3165,3166,3167,3168,3169,3170,3171,3172,3173, +3174,3175,3176,3177,3178,3179,3180,3181,3182,3183,3184,3185,3186,3187,3188, +3189,3190,3191,3192,3193,3194,3195,3196,3197,3198,3199,3200,3201,3202,3203, +3204,3205,3206,3207,3208,3209,3210,3211,3212,3213,3214,3215,3216,3217,3218, +3219,3220,3221,3222,3223,3224,3225,3226,3227,3228,3229,3230,3231,3232,3233, +3234,3235,3236,3237,3238,3239,3240,3241,3242,3243,3244,3245,3246,3247,3248, +3249,3250,3251,3252,3253,3254,3255,3256,3257,3258,3259,3260,3261,3262,3263, +3264,3265,3266,3267,3268,3269,3270,3271,3272,3273,3274,3275,3276,3277,3278, +3279,3280,3281,3282,3283,3284,3285,3286,3287,3288,3289,3290,3291,3292,3293, +3294,3295,3296,3297,3298,3299,3300,3301,3302,3303,3304,3305,3306,3307,3308, +3309,3310,3311,3312,3313,3314,3315,3316,3317,3318,3319,3320,3321,3322,3323, +3324,3325,3326,3327,3328,3329,3330,3331,3332,3333,3334,3335,3336,3337,3338, +3339,3340,3341,3342,3343,3344,3345,3346,3347,3348,3349,3350,3351,3352,3353, +3354,3355,3356,3357,3358,3359,3360,3361,3362,3363,3364,3365,3366,3367,3368, +3369,3370,3371,3372,3373,3374,3375,3376,3377,3378,3379,3380,3381,3382,3383, +3384,3385,3386,3387,3388,3389,3390,3391,3392,3393,3394,3395,3396,3397,3398, +3399,3400,3401,3402,3403,3404,3405,3406,3407,3408,3409,3410,3411,3412,3413, +3414,3415,3416,3417,3418,3419,3420,3421,3422,3423,3424,3425,3426,3427,3428, +3429,3430,3431,3432,3433,3434,3435,3436,3437,3438,3439,3440,3441,3442,3443, +3444,3445,3446,3447,3448,3449,3450,3451,3452,3453,3454,3455,3456,3457,3458, +3459,3460,3461,3462,3463,3464,3465,3466,3467,3468,3469,3470,3471,3472,3473, +3474,3475,3476,3477,3478,3479,3480,3481,3482,3483,3484,3485,3486,3487,3488, +3489,3490,3491,3492,3493,3494,3495,3496,3497,3498,3499,3500,3501,3502,3503, +3504,3505,3506,3507,3508,3509,3510,3511,3512,3513,3514,3515,3516,3517,3518, +3519,3520,3521,3522,3523,3524,3525,3526,3527,3528,3529,3530,3531,3532,3533, +3534,3535,3536,3537,3538,3539,3540,3541,3542,3543,3544,3545,3546,3547,3548, +3549,3550,3551,3552,3553,3554,3555,3556,3557,3558,3559,3560,3561,3562,3563, +3564,3565,3566,3567,3568,3569,3570,3571,3572,3573,3574,3575,3576,3577,3578, +3579,3580,3581,3582,3583,3584,3585,3586,3587,3588,3589,3590,3591,3592,3593, +3594,3595,3596,3597,3598,3599,3600,3601,3602,3603,3604,3605,3606,3607,3608, +3609,3610,3611,3612,3613,3614,3615,3616,3617,3618,3619,3620,3621,3622,3623, +3624,3625,3626,3627,3628,3629,3630,3631,3632,3633,3634,3635,3636,3637,3638, +3639,3640,3641,3642,3643,3644,3645,3646,3647,3648,3649,3650,3651,3652,3653, +3654,3655,3656,3657,3658,3659,3660,3661,3662,3663,3664,3665,3666,3667,3668, +3669,3670,3671,3672,3673,3674,3675,3676,3677,3678,3679,3680,3681,3682,3683, +3684,3685,3686,3687,3688,3689,3690,3691,3692,3693,3694,3695,3696,3697,3698, +3699,3700,3701,3702,3703,3704,3705,3706,3707,3708,3709,3710,3711,3712,3713, +3714,3715,3716,3717,3718,3719,3720,3721,3722,3723,3724,3725,3726,3727,3728, +3729,3730,3731,3732,3733,3734,3735,3736,3737,3738,3739,3740,3741,3742,3743, +3744,3745,3746,3747,3748,3749,3750,3751,3752,3753,3754,3755,3756,3757,3758, +3759,3760,3761,3762,3763,3764,3765,3766,3767,3768,3769,3770,3771,3772,3773, +3774,3775,3776,3777,3778,3779,3780,3781,3782,3783,3784,3785,3786,3787,3788, +3789,3790,3791,3792,3793,3794,3795,3796,3797,3798,3799,3800,3801,3802,3803, +3804,3805,3806,3807,3808,3809,3810,3811,3812,3813,3814,3815,3816,3817,3818, +3819,3820,3821,3822,3823,3824,3825,3826,3827,3828,3829,3830,3831,3832,3833, +3834,3835,3836,3837,3838,3839,3840,3841,3842,3843,3844,3845,3846,3847,3848, +3849,3850,3851,3852,3853,3854,3855,3856,3857,3858,3859,3860,3861,3862,3863, +3864,3865,3866,3867,3868,3869,3870,3871,3872,3873,3874,3875,3876,3877,3878, +3879,3880,3881,3882,3883,3884,3885,3886,3887,3888,3889,3890,3891,3892,3893, +3894,3895,3896,3897,3898,3899,3900,3901,3902,3903,3904,3905,3906,3907,3908, +3909,3910,3911,3912,3913,3914,3915,3916,3917,3918,3919,3920,3921,3922,3923, +3924,3925,3926,3927,3928,3929,3930,3931,3932,3933,3934,3935,3936,3937,3938, +3939,3940,3941,3942,3943,3944,3945,3946,3947,3948,3949,3950,3951,3952,3953, +3954,3955,3956,3957,3958,3959,3960,3961,3962,3963,3964,3965,3966,3967,3968, +3969,3970,3971,3972,3973,3974,3975,3976,3977,3978,3979,3980,3981,3982,3983, +3984,3985,3986,3987,3988,3989,3990,3991,3992,3993,3994,3995,3996,3997,3998, +3999,4000,4001,4002,4003,4004,4005,4006,4007,4008,4009,4010,4011,4012,4013, +4014,4015,4016,4017,4018,4019,4020,4021,4022,4023,4024,4025,4026,4027,4028, +4029,4030,4031,4032,4033,4034,4035,4036,4037,4038,4039,4040,4041,4042,4043, +4044,4045,4046,4047,4048,4049,4050,4051,4052,4053,4054,4055,4056,4057,4058, +4059,4060,4061,4062,4063,4064,4065,4066,4067,4068,4069,4070,4071,4072,4073, +4074,4075,4076,4077,4078,4079,4080,4081,4082,4083,4084,4085,4086,4087,4088, +4089,4090,4091,4092,4093,4094,4095,4096,4097,4098,4099,4100,4101,4102,4103, +4104,4105,4106,4107,4108,4109,4110,4111,4112,4113,4114,4115,4116,4117,4118, +4119,4120,4121,4122,4123,4124,4125,4126,4127,4128,4129,4130,4131,4132,4133, +4134,4135,4136,4137,4138,4139,4140,4141,4142,4143,4144,4145,4146,4147,4148, +4149,4150,4151,4152,4153,4154,4155,4156,4157,4158,4159,4160,4161,4162,4163, +4164,4165,4166,4167,4168,4169,4170,4171,4172,4173,4174,4175,4176,4177,4178, +4179,4180,4181,4182,4183,4184,4185,4186,4187,4188,4189,4190,4191,4192,4193, +4194,4195,4196,4197,4198,4199,4200,4201,4202,4203,4204,4205,4206,4207,4208, +4209,4210,4211,4212,4213,4214,4215,4216,4217,4218,4219,4220,4221,4222,4223, +4224,4225,4226,4227,4228,4229,4230,4231,4232,4233,4234,4235,4236,4237,4238, +4239,4240,4241,4242,4243,4244,4245,4246,4247,4248,4249,4250,4251,4252,4253, +4254,4255,4256,4257,4258,4259,4260,4261,4262,4263,4264,4265,4266,4267,4268, +4269,4270,4271,4272,4273,4274,4275,4276,4277,4278,4279,4280,4281,4282,4283, +4284,4285,4286,4287,4288,4289,4290,4291,4292,4293,4294,4295,4296,4297,4298, +4299,4300,4301,4302,4303,7312,7313,7314,7315,7316,7317,7318,7319,7320,7321, +7322,7323,7324,7325,7326,7327,7328,7329,7330,7331,7332,7333,7334,7335,7336, +7337,7338,7339,7340,7341,7342,7343,7344,7345,7346,7347,7348,7349,7350,7351, +7352,7353,7354,4347,4348,7357,7358,7359,4352,4353,4354,4355,4356,4357,4358, +4359,4360,4361,4362,4363,4364,4365,4366,4367,4368,4369,4370,4371,4372,4373, +4374,4375,4376,4377,4378,4379,4380,4381,4382,4383,4384,4385,4386,4387,4388, +4389,4390,4391,4392,4393,4394,4395,4396,4397,4398,4399,4400,4401,4402,4403, +4404,4405,4406,4407,4408,4409,4410,4411,4412,4413,4414,4415,4416,4417,4418, +4419,4420,4421,4422,4423,4424,4425,4426,4427,4428,4429,4430,4431,4432,4433, +4434,4435,4436,4437,4438,4439,4440,4441,4442,4443,4444,4445,4446,4447,4448, +4449,4450,4451,4452,4453,4454,4455,4456,4457,4458,4459,4460,4461,4462,4463, +4464,4465,4466,4467,4468,4469,4470,4471,4472,4473,4474,4475,4476,4477,4478, +4479,4480,4481,4482,4483,4484,4485,4486,4487,4488,4489,4490,4491,4492,4493, +4494,4495,4496,4497,4498,4499,4500,4501,4502,4503,4504,4505,4506,4507,4508, +4509,4510,4511,4512,4513,4514,4515,4516,4517,4518,4519,4520,4521,4522,4523, +4524,4525,4526,4527,4528,4529,4530,4531,4532,4533,4534,4535,4536,4537,4538, +4539,4540,4541,4542,4543,4544,4545,4546,4547,4548,4549,4550,4551,4552,4553, +4554,4555,4556,4557,4558,4559,4560,4561,4562,4563,4564,4565,4566,4567,4568, +4569,4570,4571,4572,4573,4574,4575,4576,4577,4578,4579,4580,4581,4582,4583, +4584,4585,4586,4587,4588,4589,4590,4591,4592,4593,4594,4595,4596,4597,4598, +4599,4600,4601,4602,4603,4604,4605,4606,4607,4608,4609,4610,4611,4612,4613, +4614,4615,4616,4617,4618,4619,4620,4621,4622,4623,4624,4625,4626,4627,4628, +4629,4630,4631,4632,4633,4634,4635,4636,4637,4638,4639,4640,4641,4642,4643, +4644,4645,4646,4647,4648,4649,4650,4651,4652,4653,4654,4655,4656,4657,4658, +4659,4660,4661,4662,4663,4664,4665,4666,4667,4668,4669,4670,4671,4672,4673, +4674,4675,4676,4677,4678,4679,4680,4681,4682,4683,4684,4685,4686,4687,4688, +4689,4690,4691,4692,4693,4694,4695,4696,4697,4698,4699,4700,4701,4702,4703, +4704,4705,4706,4707,4708,4709,4710,4711,4712,4713,4714,4715,4716,4717,4718, +4719,4720,4721,4722,4723,4724,4725,4726,4727,4728,4729,4730,4731,4732,4733, +4734,4735,4736,4737,4738,4739,4740,4741,4742,4743,4744,4745,4746,4747,4748, +4749,4750,4751,4752,4753,4754,4755,4756,4757,4758,4759,4760,4761,4762,4763, +4764,4765,4766,4767,4768,4769,4770,4771,4772,4773,4774,4775,4776,4777,4778, +4779,4780,4781,4782,4783,4784,4785,4786,4787,4788,4789,4790,4791,4792,4793, +4794,4795,4796,4797,4798,4799,4800,4801,4802,4803,4804,4805,4806,4807,4808, +4809,4810,4811,4812,4813,4814,4815,4816,4817,4818,4819,4820,4821,4822,4823, +4824,4825,4826,4827,4828,4829,4830,4831,4832,4833,4834,4835,4836,4837,4838, +4839,4840,4841,4842,4843,4844,4845,4846,4847,4848,4849,4850,4851,4852,4853, +4854,4855,4856,4857,4858,4859,4860,4861,4862,4863,4864,4865,4866,4867,4868, +4869,4870,4871,4872,4873,4874,4875,4876,4877,4878,4879,4880,4881,4882,4883, +4884,4885,4886,4887,4888,4889,4890,4891,4892,4893,4894,4895,4896,4897,4898, +4899,4900,4901,4902,4903,4904,4905,4906,4907,4908,4909,4910,4911,4912,4913, +4914,4915,4916,4917,4918,4919,4920,4921,4922,4923,4924,4925,4926,4927,4928, +4929,4930,4931,4932,4933,4934,4935,4936,4937,4938,4939,4940,4941,4942,4943, +4944,4945,4946,4947,4948,4949,4950,4951,4952,4953,4954,4955,4956,4957,4958, +4959,4960,4961,4962,4963,4964,4965,4966,4967,4968,4969,4970,4971,4972,4973, +4974,4975,4976,4977,4978,4979,4980,4981,4982,4983,4984,4985,4986,4987,4988, +4989,4990,4991,4992,4993,4994,4995,4996,4997,4998,4999,5000,5001,5002,5003, +5004,5005,5006,5007,5008,5009,5010,5011,5012,5013,5014,5015,5016,5017,5018, +5019,5020,5021,5022,5023,5024,5025,5026,5027,5028,5029,5030,5031,5032,5033, +5034,5035,5036,5037,5038,5039,5040,5041,5042,5043,5044,5045,5046,5047,5048, +5049,5050,5051,5052,5053,5054,5055,5056,5057,5058,5059,5060,5061,5062,5063, +5064,5065,5066,5067,5068,5069,5070,5071,5072,5073,5074,5075,5076,5077,5078, +5079,5080,5081,5082,5083,5084,5085,5086,5087,5088,5089,5090,5091,5092,5093, +5094,5095,5096,5097,5098,5099,5100,5101,5102,5103,5104,5105,5106,5107,5108, +5109,5110,5111,5104,5105,5106,5107,5108,5109,5118,5119,5120,5121,5122,5123, +5124,5125,5126,5127,5128,5129,5130,5131,5132,5133,5134,5135,5136,5137,5138, +5139,5140,5141,5142,5143,5144,5145,5146,5147,5148,5149,5150,5151,5152,5153, +5154,5155,5156,5157,5158,5159,5160,5161,5162,5163,5164,5165,5166,5167,5168, +5169,5170,5171,5172,5173,5174,5175,5176,5177,5178,5179,5180,5181,5182,5183, +5184,5185,5186,5187,5188,5189,5190,5191,5192,5193,5194,5195,5196,5197,5198, +5199,5200,5201,5202,5203,5204,5205,5206,5207,5208,5209,5210,5211,5212,5213, +5214,5215,5216,5217,5218,5219,5220,5221,5222,5223,5224,5225,5226,5227,5228, +5229,5230,5231,5232,5233,5234,5235,5236,5237,5238,5239,5240,5241,5242,5243, +5244,5245,5246,5247,5248,5249,5250,5251,5252,5253,5254,5255,5256,5257,5258, +5259,5260,5261,5262,5263,5264,5265,5266,5267,5268,5269,5270,5271,5272,5273, +5274,5275,5276,5277,5278,5279,5280,5281,5282,5283,5284,5285,5286,5287,5288, +5289,5290,5291,5292,5293,5294,5295,5296,5297,5298,5299,5300,5301,5302,5303, +5304,5305,5306,5307,5308,5309,5310,5311,5312,5313,5314,5315,5316,5317,5318, +5319,5320,5321,5322,5323,5324,5325,5326,5327,5328,5329,5330,5331,5332,5333, +5334,5335,5336,5337,5338,5339,5340,5341,5342,5343,5344,5345,5346,5347,5348, +5349,5350,5351,5352,5353,5354,5355,5356,5357,5358,5359,5360,5361,5362,5363, +5364,5365,5366,5367,5368,5369,5370,5371,5372,5373,5374,5375,5376,5377,5378, +5379,5380,5381,5382,5383,5384,5385,5386,5387,5388,5389,5390,5391,5392,5393, +5394,5395,5396,5397,5398,5399,5400,5401,5402,5403,5404,5405,5406,5407,5408, +5409,5410,5411,5412,5413,5414,5415,5416,5417,5418,5419,5420,5421,5422,5423, +5424,5425,5426,5427,5428,5429,5430,5431,5432,5433,5434,5435,5436,5437,5438, +5439,5440,5441,5442,5443,5444,5445,5446,5447,5448,5449,5450,5451,5452,5453, +5454,5455,5456,5457,5458,5459,5460,5461,5462,5463,5464,5465,5466,5467,5468, +5469,5470,5471,5472,5473,5474,5475,5476,5477,5478,5479,5480,5481,5482,5483, +5484,5485,5486,5487,5488,5489,5490,5491,5492,5493,5494,5495,5496,5497,5498, +5499,5500,5501,5502,5503,5504,5505,5506,5507,5508,5509,5510,5511,5512,5513, +5514,5515,5516,5517,5518,5519,5520,5521,5522,5523,5524,5525,5526,5527,5528, +5529,5530,5531,5532,5533,5534,5535,5536,5537,5538,5539,5540,5541,5542,5543, +5544,5545,5546,5547,5548,5549,5550,5551,5552,5553,5554,5555,5556,5557,5558, +5559,5560,5561,5562,5563,5564,5565,5566,5567,5568,5569,5570,5571,5572,5573, +5574,5575,5576,5577,5578,5579,5580,5581,5582,5583,5584,5585,5586,5587,5588, +5589,5590,5591,5592,5593,5594,5595,5596,5597,5598,5599,5600,5601,5602,5603, +5604,5605,5606,5607,5608,5609,5610,5611,5612,5613,5614,5615,5616,5617,5618, +5619,5620,5621,5622,5623,5624,5625,5626,5627,5628,5629,5630,5631,5632,5633, +5634,5635,5636,5637,5638,5639,5640,5641,5642,5643,5644,5645,5646,5647,5648, +5649,5650,5651,5652,5653,5654,5655,5656,5657,5658,5659,5660,5661,5662,5663, +5664,5665,5666,5667,5668,5669,5670,5671,5672,5673,5674,5675,5676,5677,5678, +5679,5680,5681,5682,5683,5684,5685,5686,5687,5688,5689,5690,5691,5692,5693, +5694,5695,5696,5697,5698,5699,5700,5701,5702,5703,5704,5705,5706,5707,5708, +5709,5710,5711,5712,5713,5714,5715,5716,5717,5718,5719,5720,5721,5722,5723, +5724,5725,5726,5727,5728,5729,5730,5731,5732,5733,5734,5735,5736,5737,5738, +5739,5740,5741,5742,5743,5744,5745,5746,5747,5748,5749,5750,5751,5752,5753, +5754,5755,5756,5757,5758,5759,5760,5761,5762,5763,5764,5765,5766,5767,5768, +5769,5770,5771,5772,5773,5774,5775,5776,5777,5778,5779,5780,5781,5782,5783, +5784,5785,5786,5787,5788,5789,5790,5791,5792,5793,5794,5795,5796,5797,5798, +5799,5800,5801,5802,5803,5804,5805,5806,5807,5808,5809,5810,5811,5812,5813, +5814,5815,5816,5817,5818,5819,5820,5821,5822,5823,5824,5825,5826,5827,5828, +5829,5830,5831,5832,5833,5834,5835,5836,5837,5838,5839,5840,5841,5842,5843, +5844,5845,5846,5847,5848,5849,5850,5851,5852,5853,5854,5855,5856,5857,5858, +5859,5860,5861,5862,5863,5864,5865,5866,5867,5868,5869,5870,5871,5872,5873, +5874,5875,5876,5877,5878,5879,5880,5881,5882,5883,5884,5885,5886,5887,5888, +5889,5890,5891,5892,5893,5894,5895,5896,5897,5898,5899,5900,5901,5902,5903, +5904,5905,5906,5907,5908,5909,5910,5911,5912,5913,5914,5915,5916,5917,5918, +5919,5920,5921,5922,5923,5924,5925,5926,5927,5928,5929,5930,5931,5932,5933, +5934,5935,5936,5937,5938,5939,5940,5941,5942,5943,5944,5945,5946,5947,5948, +5949,5950,5951,5952,5953,5954,5955,5956,5957,5958,5959,5960,5961,5962,5963, +5964,5965,5966,5967,5968,5969,5970,5971,5972,5973,5974,5975,5976,5977,5978, +5979,5980,5981,5982,5983,5984,5985,5986,5987,5988,5989,5990,5991,5992,5993, +5994,5995,5996,5997,5998,5999,6000,6001,6002,6003,6004,6005,6006,6007,6008, +6009,6010,6011,6012,6013,6014,6015,6016,6017,6018,6019,6020,6021,6022,6023, +6024,6025,6026,6027,6028,6029,6030,6031,6032,6033,6034,6035,6036,6037,6038, +6039,6040,6041,6042,6043,6044,6045,6046,6047,6048,6049,6050,6051,6052,6053, +6054,6055,6056,6057,6058,6059,6060,6061,6062,6063,6064,6065,6066,6067,6068, +6069,6070,6071,6072,6073,6074,6075,6076,6077,6078,6079,6080,6081,6082,6083, +6084,6085,6086,6087,6088,6089,6090,6091,6092,6093,6094,6095,6096,6097,6098, +6099,6100,6101,6102,6103,6104,6105,6106,6107,6108,6109,6110,6111,6112,6113, +6114,6115,6116,6117,6118,6119,6120,6121,6122,6123,6124,6125,6126,6127,6128, +6129,6130,6131,6132,6133,6134,6135,6136,6137,6138,6139,6140,6141,6142,6143, +6144,6145,6146,6147,6148,6149,6150,6151,6152,6153,6154,6155,6156,6157,6158, +6159,6160,6161,6162,6163,6164,6165,6166,6167,6168,6169,6170,6171,6172,6173, +6174,6175,6176,6177,6178,6179,6180,6181,6182,6183,6184,6185,6186,6187,6188, +6189,6190,6191,6192,6193,6194,6195,6196,6197,6198,6199,6200,6201,6202,6203, +6204,6205,6206,6207,6208,6209,6210,6211,6212,6213,6214,6215,6216,6217,6218, +6219,6220,6221,6222,6223,6224,6225,6226,6227,6228,6229,6230,6231,6232,6233, +6234,6235,6236,6237,6238,6239,6240,6241,6242,6243,6244,6245,6246,6247,6248, +6249,6250,6251,6252,6253,6254,6255,6256,6257,6258,6259,6260,6261,6262,6263, +6264,6265,6266,6267,6268,6269,6270,6271,6272,6273,6274,6275,6276,6277,6278, +6279,6280,6281,6282,6283,6284,6285,6286,6287,6288,6289,6290,6291,6292,6293, +6294,6295,6296,6297,6298,6299,6300,6301,6302,6303,6304,6305,6306,6307,6308, +6309,6310,6311,6312,6313,6314,6315,6316,6317,6318,6319,6320,6321,6322,6323, +6324,6325,6326,6327,6328,6329,6330,6331,6332,6333,6334,6335,6336,6337,6338, +6339,6340,6341,6342,6343,6344,6345,6346,6347,6348,6349,6350,6351,6352,6353, +6354,6355,6356,6357,6358,6359,6360,6361,6362,6363,6364,6365,6366,6367,6368, +6369,6370,6371,6372,6373,6374,6375,6376,6377,6378,6379,6380,6381,6382,6383, +6384,6385,6386,6387,6388,6389,6390,6391,6392,6393,6394,6395,6396,6397,6398, +6399,6400,6401,6402,6403,6404,6405,6406,6407,6408,6409,6410,6411,6412,6413, +6414,6415,6416,6417,6418,6419,6420,6421,6422,6423,6424,6425,6426,6427,6428, +6429,6430,6431,6432,6433,6434,6435,6436,6437,6438,6439,6440,6441,6442,6443, +6444,6445,6446,6447,6448,6449,6450,6451,6452,6453,6454,6455,6456,6457,6458, +6459,6460,6461,6462,6463,6464,6465,6466,6467,6468,6469,6470,6471,6472,6473, +6474,6475,6476,6477,6478,6479,6480,6481,6482,6483,6484,6485,6486,6487,6488, +6489,6490,6491,6492,6493,6494,6495,6496,6497,6498,6499,6500,6501,6502,6503, +6504,6505,6506,6507,6508,6509,6510,6511,6512,6513,6514,6515,6516,6517,6518, +6519,6520,6521,6522,6523,6524,6525,6526,6527,6528,6529,6530,6531,6532,6533, +6534,6535,6536,6537,6538,6539,6540,6541,6542,6543,6544,6545,6546,6547,6548, +6549,6550,6551,6552,6553,6554,6555,6556,6557,6558,6559,6560,6561,6562,6563, +6564,6565,6566,6567,6568,6569,6570,6571,6572,6573,6574,6575,6576,6577,6578, +6579,6580,6581,6582,6583,6584,6585,6586,6587,6588,6589,6590,6591,6592,6593, +6594,6595,6596,6597,6598,6599,6600,6601,6602,6603,6604,6605,6606,6607,6608, +6609,6610,6611,6612,6613,6614,6615,6616,6617,6618,6619,6620,6621,6622,6623, +6624,6625,6626,6627,6628,6629,6630,6631,6632,6633,6634,6635,6636,6637,6638, +6639,6640,6641,6642,6643,6644,6645,6646,6647,6648,6649,6650,6651,6652,6653, +6654,6655,6656,6657,6658,6659,6660,6661,6662,6663,6664,6665,6666,6667,6668, +6669,6670,6671,6672,6673,6674,6675,6676,6677,6678,6679,6680,6681,6682,6683, +6684,6685,6686,6687,6688,6689,6690,6691,6692,6693,6694,6695,6696,6697,6698, +6699,6700,6701,6702,6703,6704,6705,6706,6707,6708,6709,6710,6711,6712,6713, +6714,6715,6716,6717,6718,6719,6720,6721,6722,6723,6724,6725,6726,6727,6728, +6729,6730,6731,6732,6733,6734,6735,6736,6737,6738,6739,6740,6741,6742,6743, +6744,6745,6746,6747,6748,6749,6750,6751,6752,6753,6754,6755,6756,6757,6758, +6759,6760,6761,6762,6763,6764,6765,6766,6767,6768,6769,6770,6771,6772,6773, +6774,6775,6776,6777,6778,6779,6780,6781,6782,6783,6784,6785,6786,6787,6788, +6789,6790,6791,6792,6793,6794,6795,6796,6797,6798,6799,6800,6801,6802,6803, +6804,6805,6806,6807,6808,6809,6810,6811,6812,6813,6814,6815,6816,6817,6818, +6819,6820,6821,6822,6823,6824,6825,6826,6827,6828,6829,6830,6831,6832,6833, +6834,6835,6836,6837,6838,6839,6840,6841,6842,6843,6844,6845,6846,6847,6848, +6849,6850,6851,6852,6853,6854,6855,6856,6857,6858,6859,6860,6861,6862,6863, +6864,6865,6866,6867,6868,6869,6870,6871,6872,6873,6874,6875,6876,6877,6878, +6879,6880,6881,6882,6883,6884,6885,6886,6887,6888,6889,6890,6891,6892,6893, +6894,6895,6896,6897,6898,6899,6900,6901,6902,6903,6904,6905,6906,6907,6908, +6909,6910,6911,6912,6913,6914,6915,6916,6917,6918,6919,6920,6921,6922,6923, +6924,6925,6926,6927,6928,6929,6930,6931,6932,6933,6934,6935,6936,6937,6938, +6939,6940,6941,6942,6943,6944,6945,6946,6947,6948,6949,6950,6951,6952,6953, +6954,6955,6956,6957,6958,6959,6960,6961,6962,6963,6964,6965,6966,6967,6968, +6969,6970,6971,6972,6973,6974,6975,6976,6977,6978,6979,6980,6981,6982,6983, +6984,6985,6986,6987,6988,6989,6990,6991,6992,6993,6994,6995,6996,6997,6998, +6999,7000,7001,7002,7003,7004,7005,7006,7007,7008,7009,7010,7011,7012,7013, +7014,7015,7016,7017,7018,7019,7020,7021,7022,7023,7024,7025,7026,7027,7028, +7029,7030,7031,7032,7033,7034,7035,7036,7037,7038,7039,7040,7041,7042,7043, +7044,7045,7046,7047,7048,7049,7050,7051,7052,7053,7054,7055,7056,7057,7058, +7059,7060,7061,7062,7063,7064,7065,7066,7067,7068,7069,7070,7071,7072,7073, +7074,7075,7076,7077,7078,7079,7080,7081,7082,7083,7084,7085,7086,7087,7088, +7089,7090,7091,7092,7093,7094,7095,7096,7097,7098,7099,7100,7101,7102,7103, +7104,7105,7106,7107,7108,7109,7110,7111,7112,7113,7114,7115,7116,7117,7118, +7119,7120,7121,7122,7123,7124,7125,7126,7127,7128,7129,7130,7131,7132,7133, +7134,7135,7136,7137,7138,7139,7140,7141,7142,7143,7144,7145,7146,7147,7148, +7149,7150,7151,7152,7153,7154,7155,7156,7157,7158,7159,7160,7161,7162,7163, +7164,7165,7166,7167,7168,7169,7170,7171,7172,7173,7174,7175,7176,7177,7178, +7179,7180,7181,7182,7183,7184,7185,7186,7187,7188,7189,7190,7191,7192,7193, +7194,7195,7196,7197,7198,7199,7200,7201,7202,7203,7204,7205,7206,7207,7208, +7209,7210,7211,7212,7213,7214,7215,7216,7217,7218,7219,7220,7221,7222,7223, +7224,7225,7226,7227,7228,7229,7230,7231,7232,7233,7234,7235,7236,7237,7238, +7239,7240,7241,7242,7243,7244,7245,7246,7247,7248,7249,7250,7251,7252,7253, +7254,7255,7256,7257,7258,7259,7260,7261,7262,7263,7264,7265,7266,7267,7268, +7269,7270,7271,7272,7273,7274,7275,7276,7277,7278,7279,7280,7281,7282,7283, +7284,7285,7286,7287,7288,7289,7290,7291,7292,7293,7294,7295,1042,1044,1054, +1057,1058,1058,1066,1122,42570L,7305,7306,7307,7308,7309,7310,7311,7312, +7313,7314,7315,7316,7317,7318,7319,7320,7321,7322,7323,7324,7325,7326,7327, +7328,7329,7330,7331,7332,7333,7334,7335,7336,7337,7338,7339,7340,7341,7342, +7343,7344,7345,7346,7347,7348,7349,7350,7351,7352,7353,7354,7355,7356,7357, +7358,7359,7360,7361,7362,7363,7364,7365,7366,7367,7368,7369,7370,7371,7372, +7373,7374,7375,7376,7377,7378,7379,7380,7381,7382,7383,7384,7385,7386,7387, +7388,7389,7390,7391,7392,7393,7394,7395,7396,7397,7398,7399,7400,7401,7402, +7403,7404,7405,7406,7407,7408,7409,7410,7411,7412,7413,7414,7415,7416,7417, +7418,7419,7420,7421,7422,7423,7424,7425,7426,7427,7428,7429,7430,7431,7432, +7433,7434,7435,7436,7437,7438,7439,7440,7441,7442,7443,7444,7445,7446,7447, +7448,7449,7450,7451,7452,7453,7454,7455,7456,7457,7458,7459,7460,7461,7462, +7463,7464,7465,7466,7467,7468,7469,7470,7471,7472,7473,7474,7475,7476,7477, +7478,7479,7480,7481,7482,7483,7484,7485,7486,7487,7488,7489,7490,7491,7492, +7493,7494,7495,7496,7497,7498,7499,7500,7501,7502,7503,7504,7505,7506,7507, +7508,7509,7510,7511,7512,7513,7514,7515,7516,7517,7518,7519,7520,7521,7522, +7523,7524,7525,7526,7527,7528,7529,7530,7531,7532,7533,7534,7535,7536,7537, +7538,7539,7540,7541,7542,7543,7544,42877L,7546,7547,7548,11363,7550,7551, +7552,7553,7554,7555,7556,7557,7558,7559,7560,7561,7562,7563,7564,7565, +42950L,7567,7568,7569,7570,7571,7572,7573,7574,7575,7576,7577,7578,7579, +7580,7581,7582,7583,7584,7585,7586,7587,7588,7589,7590,7591,7592,7593,7594, +7595,7596,7597,7598,7599,7600,7601,7602,7603,7604,7605,7606,7607,7608,7609, +7610,7611,7612,7613,7614,7615,7616,7617,7618,7619,7620,7621,7622,7623,7624, +7625,7626,7627,7628,7629,7630,7631,7632,7633,7634,7635,7636,7637,7638,7639, +7640,7641,7642,7643,7644,7645,7646,7647,7648,7649,7650,7651,7652,7653,7654, +7655,7656,7657,7658,7659,7660,7661,7662,7663,7664,7665,7666,7667,7668,7669, +7670,7671,7672,7673,7674,7675,7676,7677,7678,7679,7680,7680,7682,7682,7684, +7684,7686,7686,7688,7688,7690,7690,7692,7692,7694,7694,7696,7696,7698,7698, +7700,7700,7702,7702,7704,7704,7706,7706,7708,7708,7710,7710,7712,7712,7714, +7714,7716,7716,7718,7718,7720,7720,7722,7722,7724,7724,7726,7726,7728,7728, +7730,7730,7732,7732,7734,7734,7736,7736,7738,7738,7740,7740,7742,7742,7744, +7744,7746,7746,7748,7748,7750,7750,7752,7752,7754,7754,7756,7756,7758,7758, +7760,7760,7762,7762,7764,7764,7766,7766,7768,7768,7770,7770,7772,7772,7774, +7774,7776,7776,7778,7778,7780,7780,7782,7782,7784,7784,7786,7786,7788,7788, +7790,7790,7792,7792,7794,7794,7796,7796,7798,7798,7800,7800,7802,7802,7804, +7804,7806,7806,7808,7808,7810,7810,7812,7812,7814,7814,7816,7816,7818,7818, +7820,7820,7822,7822,7824,7824,7826,7826,7828,7828,7830,7831,7832,7833,7834, +7776,7836,7837,7838,7839,7840,7840,7842,7842,7844,7844,7846,7846,7848,7848, +7850,7850,7852,7852,7854,7854,7856,7856,7858,7858,7860,7860,7862,7862,7864, +7864,7866,7866,7868,7868,7870,7870,7872,7872,7874,7874,7876,7876,7878,7878, +7880,7880,7882,7882,7884,7884,7886,7886,7888,7888,7890,7890,7892,7892,7894, +7894,7896,7896,7898,7898,7900,7900,7902,7902,7904,7904,7906,7906,7908,7908, +7910,7910,7912,7912,7914,7914,7916,7916,7918,7918,7920,7920,7922,7922,7924, +7924,7926,7926,7928,7928,7930,7930,7932,7932,7934,7934,7944,7945,7946,7947, +7948,7949,7950,7951,7944,7945,7946,7947,7948,7949,7950,7951,7960,7961,7962, +7963,7964,7965,7958,7959,7960,7961,7962,7963,7964,7965,7966,7967,7976,7977, +7978,7979,7980,7981,7982,7983,7976,7977,7978,7979,7980,7981,7982,7983,7992, +7993,7994,7995,7996,7997,7998,7999,7992,7993,7994,7995,7996,7997,7998,7999, +8008,8009,8010,8011,8012,8013,8006,8007,8008,8009,8010,8011,8012,8013,8014, +8015,8016,8025,8018,8027,8020,8029,8022,8031,8024,8025,8026,8027,8028,8029, +8030,8031,8040,8041,8042,8043,8044,8045,8046,8047,8040,8041,8042,8043,8044, +8045,8046,8047,8122,8123,8136,8137,8138,8139,8154,8155,8184,8185,8170,8171, +8186,8187,8062,8063,8064,8065,8066,8067,8068,8069,8070,8071,8072,8073,8074, +8075,8076,8077,8078,8079,8080,8081,8082,8083,8084,8085,8086,8087,8088,8089, +8090,8091,8092,8093,8094,8095,8096,8097,8098,8099,8100,8101,8102,8103,8104, +8105,8106,8107,8108,8109,8110,8111,8120,8121,8114,8115,8116,8117,8118,8119, +8120,8121,8122,8123,8124,8125,921,8127,8128,8129,8130,8131,8132,8133,8134, +8135,8136,8137,8138,8139,8140,8141,8142,8143,8152,8153,8146,8147,8148,8149, +8150,8151,8152,8153,8154,8155,8156,8157,8158,8159,8168,8169,8162,8163,8164, +8172,8166,8167,8168,8169,8170,8171,8172,8173,8174,8175,8176,8177,8178,8179, +8180,8181,8182,8183,8184,8185,8186,8187,8188,8189,8190,8191,8192,8193,8194, +8195,8196,8197,8198,8199,8200,8201,8202,8203,8204,8205,8206,8207,8208,8209, +8210,8211,8212,8213,8214,8215,8216,8217,8218,8219,8220,8221,8222,8223,8224, +8225,8226,8227,8228,8229,8230,8231,8232,8233,8234,8235,8236,8237,8238,8239, +8240,8241,8242,8243,8244,8245,8246,8247,8248,8249,8250,8251,8252,8253,8254, +8255,8256,8257,8258,8259,8260,8261,8262,8263,8264,8265,8266,8267,8268,8269, +8270,8271,8272,8273,8274,8275,8276,8277,8278,8279,8280,8281,8282,8283,8284, +8285,8286,8287,8288,8289,8290,8291,8292,8293,8294,8295,8296,8297,8298,8299, +8300,8301,8302,8303,8304,8305,8306,8307,8308,8309,8310,8311,8312,8313,8314, +8315,8316,8317,8318,8319,8320,8321,8322,8323,8324,8325,8326,8327,8328,8329, +8330,8331,8332,8333,8334,8335,8336,8337,8338,8339,8340,8341,8342,8343,8344, +8345,8346,8347,8348,8349,8350,8351,8352,8353,8354,8355,8356,8357,8358,8359, +8360,8361,8362,8363,8364,8365,8366,8367,8368,8369,8370,8371,8372,8373,8374, +8375,8376,8377,8378,8379,8380,8381,8382,8383,8384,8385,8386,8387,8388,8389, +8390,8391,8392,8393,8394,8395,8396,8397,8398,8399,8400,8401,8402,8403,8404, +8405,8406,8407,8408,8409,8410,8411,8412,8413,8414,8415,8416,8417,8418,8419, +8420,8421,8422,8423,8424,8425,8426,8427,8428,8429,8430,8431,8432,8433,8434, +8435,8436,8437,8438,8439,8440,8441,8442,8443,8444,8445,8446,8447,8448,8449, +8450,8451,8452,8453,8454,8455,8456,8457,8458,8459,8460,8461,8462,8463,8464, +8465,8466,8467,8468,8469,8470,8471,8472,8473,8474,8475,8476,8477,8478,8479, +8480,8481,8482,8483,8484,8485,8486,8487,8488,8489,8490,8491,8492,8493,8494, +8495,8496,8497,8498,8499,8500,8501,8502,8503,8504,8505,8506,8507,8508,8509, +8510,8511,8512,8513,8514,8515,8516,8517,8518,8519,8520,8521,8522,8523,8524, +8525,8498,8527,8528,8529,8530,8531,8532,8533,8534,8535,8536,8537,8538,8539, +8540,8541,8542,8543,8544,8545,8546,8547,8548,8549,8550,8551,8552,8553,8554, +8555,8556,8557,8558,8559,8544,8545,8546,8547,8548,8549,8550,8551,8552,8553, +8554,8555,8556,8557,8558,8559,8576,8577,8578,8579,8579,8581,8582,8583,8584, +8585,8586,8587,8588,8589,8590,8591,8592,8593,8594,8595,8596,8597,8598,8599, +8600,8601,8602,8603,8604,8605,8606,8607,8608,8609,8610,8611,8612,8613,8614, +8615,8616,8617,8618,8619,8620,8621,8622,8623,8624,8625,8626,8627,8628,8629, +8630,8631,8632,8633,8634,8635,8636,8637,8638,8639,8640,8641,8642,8643,8644, +8645,8646,8647,8648,8649,8650,8651,8652,8653,8654,8655,8656,8657,8658,8659, +8660,8661,8662,8663,8664,8665,8666,8667,8668,8669,8670,8671,8672,8673,8674, +8675,8676,8677,8678,8679,8680,8681,8682,8683,8684,8685,8686,8687,8688,8689, +8690,8691,8692,8693,8694,8695,8696,8697,8698,8699,8700,8701,8702,8703,8704, +8705,8706,8707,8708,8709,8710,8711,8712,8713,8714,8715,8716,8717,8718,8719, +8720,8721,8722,8723,8724,8725,8726,8727,8728,8729,8730,8731,8732,8733,8734, +8735,8736,8737,8738,8739,8740,8741,8742,8743,8744,8745,8746,8747,8748,8749, +8750,8751,8752,8753,8754,8755,8756,8757,8758,8759,8760,8761,8762,8763,8764, +8765,8766,8767,8768,8769,8770,8771,8772,8773,8774,8775,8776,8777,8778,8779, +8780,8781,8782,8783,8784,8785,8786,8787,8788,8789,8790,8791,8792,8793,8794, +8795,8796,8797,8798,8799,8800,8801,8802,8803,8804,8805,8806,8807,8808,8809, +8810,8811,8812,8813,8814,8815,8816,8817,8818,8819,8820,8821,8822,8823,8824, +8825,8826,8827,8828,8829,8830,8831,8832,8833,8834,8835,8836,8837,8838,8839, +8840,8841,8842,8843,8844,8845,8846,8847,8848,8849,8850,8851,8852,8853,8854, +8855,8856,8857,8858,8859,8860,8861,8862,8863,8864,8865,8866,8867,8868,8869, +8870,8871,8872,8873,8874,8875,8876,8877,8878,8879,8880,8881,8882,8883,8884, +8885,8886,8887,8888,8889,8890,8891,8892,8893,8894,8895,8896,8897,8898,8899, +8900,8901,8902,8903,8904,8905,8906,8907,8908,8909,8910,8911,8912,8913,8914, +8915,8916,8917,8918,8919,8920,8921,8922,8923,8924,8925,8926,8927,8928,8929, +8930,8931,8932,8933,8934,8935,8936,8937,8938,8939,8940,8941,8942,8943,8944, +8945,8946,8947,8948,8949,8950,8951,8952,8953,8954,8955,8956,8957,8958,8959, +8960,8961,8962,8963,8964,8965,8966,8967,8968,8969,8970,8971,8972,8973,8974, +8975,8976,8977,8978,8979,8980,8981,8982,8983,8984,8985,8986,8987,8988,8989, +8990,8991,8992,8993,8994,8995,8996,8997,8998,8999,9000,9001,9002,9003,9004, +9005,9006,9007,9008,9009,9010,9011,9012,9013,9014,9015,9016,9017,9018,9019, +9020,9021,9022,9023,9024,9025,9026,9027,9028,9029,9030,9031,9032,9033,9034, +9035,9036,9037,9038,9039,9040,9041,9042,9043,9044,9045,9046,9047,9048,9049, +9050,9051,9052,9053,9054,9055,9056,9057,9058,9059,9060,9061,9062,9063,9064, +9065,9066,9067,9068,9069,9070,9071,9072,9073,9074,9075,9076,9077,9078,9079, +9080,9081,9082,9083,9084,9085,9086,9087,9088,9089,9090,9091,9092,9093,9094, +9095,9096,9097,9098,9099,9100,9101,9102,9103,9104,9105,9106,9107,9108,9109, +9110,9111,9112,9113,9114,9115,9116,9117,9118,9119,9120,9121,9122,9123,9124, +9125,9126,9127,9128,9129,9130,9131,9132,9133,9134,9135,9136,9137,9138,9139, +9140,9141,9142,9143,9144,9145,9146,9147,9148,9149,9150,9151,9152,9153,9154, +9155,9156,9157,9158,9159,9160,9161,9162,9163,9164,9165,9166,9167,9168,9169, +9170,9171,9172,9173,9174,9175,9176,9177,9178,9179,9180,9181,9182,9183,9184, +9185,9186,9187,9188,9189,9190,9191,9192,9193,9194,9195,9196,9197,9198,9199, +9200,9201,9202,9203,9204,9205,9206,9207,9208,9209,9210,9211,9212,9213,9214, +9215,9216,9217,9218,9219,9220,9221,9222,9223,9224,9225,9226,9227,9228,9229, +9230,9231,9232,9233,9234,9235,9236,9237,9238,9239,9240,9241,9242,9243,9244, +9245,9246,9247,9248,9249,9250,9251,9252,9253,9254,9255,9256,9257,9258,9259, +9260,9261,9262,9263,9264,9265,9266,9267,9268,9269,9270,9271,9272,9273,9274, +9275,9276,9277,9278,9279,9280,9281,9282,9283,9284,9285,9286,9287,9288,9289, +9290,9291,9292,9293,9294,9295,9296,9297,9298,9299,9300,9301,9302,9303,9304, +9305,9306,9307,9308,9309,9310,9311,9312,9313,9314,9315,9316,9317,9318,9319, +9320,9321,9322,9323,9324,9325,9326,9327,9328,9329,9330,9331,9332,9333,9334, +9335,9336,9337,9338,9339,9340,9341,9342,9343,9344,9345,9346,9347,9348,9349, +9350,9351,9352,9353,9354,9355,9356,9357,9358,9359,9360,9361,9362,9363,9364, +9365,9366,9367,9368,9369,9370,9371,9372,9373,9374,9375,9376,9377,9378,9379, +9380,9381,9382,9383,9384,9385,9386,9387,9388,9389,9390,9391,9392,9393,9394, +9395,9396,9397,9398,9399,9400,9401,9402,9403,9404,9405,9406,9407,9408,9409, +9410,9411,9412,9413,9414,9415,9416,9417,9418,9419,9420,9421,9422,9423,9398, +9399,9400,9401,9402,9403,9404,9405,9406,9407,9408,9409,9410,9411,9412,9413, +9414,9415,9416,9417,9418,9419,9420,9421,9422,9423,9450,9451,9452,9453,9454, +9455,9456,9457,9458,9459,9460,9461,9462,9463,9464,9465,9466,9467,9468,9469, +9470,9471,9472,9473,9474,9475,9476,9477,9478,9479,9480,9481,9482,9483,9484, +9485,9486,9487,9488,9489,9490,9491,9492,9493,9494,9495,9496,9497,9498,9499, +9500,9501,9502,9503,9504,9505,9506,9507,9508,9509,9510,9511,9512,9513,9514, +9515,9516,9517,9518,9519,9520,9521,9522,9523,9524,9525,9526,9527,9528,9529, +9530,9531,9532,9533,9534,9535,9536,9537,9538,9539,9540,9541,9542,9543,9544, +9545,9546,9547,9548,9549,9550,9551,9552,9553,9554,9555,9556,9557,9558,9559, +9560,9561,9562,9563,9564,9565,9566,9567,9568,9569,9570,9571,9572,9573,9574, +9575,9576,9577,9578,9579,9580,9581,9582,9583,9584,9585,9586,9587,9588,9589, +9590,9591,9592,9593,9594,9595,9596,9597,9598,9599,9600,9601,9602,9603,9604, +9605,9606,9607,9608,9609,9610,9611,9612,9613,9614,9615,9616,9617,9618,9619, +9620,9621,9622,9623,9624,9625,9626,9627,9628,9629,9630,9631,9632,9633,9634, +9635,9636,9637,9638,9639,9640,9641,9642,9643,9644,9645,9646,9647,9648,9649, +9650,9651,9652,9653,9654,9655,9656,9657,9658,9659,9660,9661,9662,9663,9664, +9665,9666,9667,9668,9669,9670,9671,9672,9673,9674,9675,9676,9677,9678,9679, +9680,9681,9682,9683,9684,9685,9686,9687,9688,9689,9690,9691,9692,9693,9694, +9695,9696,9697,9698,9699,9700,9701,9702,9703,9704,9705,9706,9707,9708,9709, +9710,9711,9712,9713,9714,9715,9716,9717,9718,9719,9720,9721,9722,9723,9724, +9725,9726,9727,9728,9729,9730,9731,9732,9733,9734,9735,9736,9737,9738,9739, +9740,9741,9742,9743,9744,9745,9746,9747,9748,9749,9750,9751,9752,9753,9754, +9755,9756,9757,9758,9759,9760,9761,9762,9763,9764,9765,9766,9767,9768,9769, +9770,9771,9772,9773,9774,9775,9776,9777,9778,9779,9780,9781,9782,9783,9784, +9785,9786,9787,9788,9789,9790,9791,9792,9793,9794,9795,9796,9797,9798,9799, +9800,9801,9802,9803,9804,9805,9806,9807,9808,9809,9810,9811,9812,9813,9814, +9815,9816,9817,9818,9819,9820,9821,9822,9823,9824,9825,9826,9827,9828,9829, +9830,9831,9832,9833,9834,9835,9836,9837,9838,9839,9840,9841,9842,9843,9844, +9845,9846,9847,9848,9849,9850,9851,9852,9853,9854,9855,9856,9857,9858,9859, +9860,9861,9862,9863,9864,9865,9866,9867,9868,9869,9870,9871,9872,9873,9874, +9875,9876,9877,9878,9879,9880,9881,9882,9883,9884,9885,9886,9887,9888,9889, +9890,9891,9892,9893,9894,9895,9896,9897,9898,9899,9900,9901,9902,9903,9904, +9905,9906,9907,9908,9909,9910,9911,9912,9913,9914,9915,9916,9917,9918,9919, +9920,9921,9922,9923,9924,9925,9926,9927,9928,9929,9930,9931,9932,9933,9934, +9935,9936,9937,9938,9939,9940,9941,9942,9943,9944,9945,9946,9947,9948,9949, +9950,9951,9952,9953,9954,9955,9956,9957,9958,9959,9960,9961,9962,9963,9964, +9965,9966,9967,9968,9969,9970,9971,9972,9973,9974,9975,9976,9977,9978,9979, +9980,9981,9982,9983,9984,9985,9986,9987,9988,9989,9990,9991,9992,9993,9994, +9995,9996,9997,9998,9999,10000,10001,10002,10003,10004,10005,10006,10007, +10008,10009,10010,10011,10012,10013,10014,10015,10016,10017,10018,10019, +10020,10021,10022,10023,10024,10025,10026,10027,10028,10029,10030,10031, +10032,10033,10034,10035,10036,10037,10038,10039,10040,10041,10042,10043, +10044,10045,10046,10047,10048,10049,10050,10051,10052,10053,10054,10055, +10056,10057,10058,10059,10060,10061,10062,10063,10064,10065,10066,10067, +10068,10069,10070,10071,10072,10073,10074,10075,10076,10077,10078,10079, +10080,10081,10082,10083,10084,10085,10086,10087,10088,10089,10090,10091, +10092,10093,10094,10095,10096,10097,10098,10099,10100,10101,10102,10103, +10104,10105,10106,10107,10108,10109,10110,10111,10112,10113,10114,10115, +10116,10117,10118,10119,10120,10121,10122,10123,10124,10125,10126,10127, +10128,10129,10130,10131,10132,10133,10134,10135,10136,10137,10138,10139, +10140,10141,10142,10143,10144,10145,10146,10147,10148,10149,10150,10151, +10152,10153,10154,10155,10156,10157,10158,10159,10160,10161,10162,10163, +10164,10165,10166,10167,10168,10169,10170,10171,10172,10173,10174,10175, +10176,10177,10178,10179,10180,10181,10182,10183,10184,10185,10186,10187, +10188,10189,10190,10191,10192,10193,10194,10195,10196,10197,10198,10199, +10200,10201,10202,10203,10204,10205,10206,10207,10208,10209,10210,10211, +10212,10213,10214,10215,10216,10217,10218,10219,10220,10221,10222,10223, +10224,10225,10226,10227,10228,10229,10230,10231,10232,10233,10234,10235, +10236,10237,10238,10239,10240,10241,10242,10243,10244,10245,10246,10247, +10248,10249,10250,10251,10252,10253,10254,10255,10256,10257,10258,10259, +10260,10261,10262,10263,10264,10265,10266,10267,10268,10269,10270,10271, +10272,10273,10274,10275,10276,10277,10278,10279,10280,10281,10282,10283, +10284,10285,10286,10287,10288,10289,10290,10291,10292,10293,10294,10295, +10296,10297,10298,10299,10300,10301,10302,10303,10304,10305,10306,10307, +10308,10309,10310,10311,10312,10313,10314,10315,10316,10317,10318,10319, +10320,10321,10322,10323,10324,10325,10326,10327,10328,10329,10330,10331, +10332,10333,10334,10335,10336,10337,10338,10339,10340,10341,10342,10343, +10344,10345,10346,10347,10348,10349,10350,10351,10352,10353,10354,10355, +10356,10357,10358,10359,10360,10361,10362,10363,10364,10365,10366,10367, +10368,10369,10370,10371,10372,10373,10374,10375,10376,10377,10378,10379, +10380,10381,10382,10383,10384,10385,10386,10387,10388,10389,10390,10391, +10392,10393,10394,10395,10396,10397,10398,10399,10400,10401,10402,10403, +10404,10405,10406,10407,10408,10409,10410,10411,10412,10413,10414,10415, +10416,10417,10418,10419,10420,10421,10422,10423,10424,10425,10426,10427, +10428,10429,10430,10431,10432,10433,10434,10435,10436,10437,10438,10439, +10440,10441,10442,10443,10444,10445,10446,10447,10448,10449,10450,10451, +10452,10453,10454,10455,10456,10457,10458,10459,10460,10461,10462,10463, +10464,10465,10466,10467,10468,10469,10470,10471,10472,10473,10474,10475, +10476,10477,10478,10479,10480,10481,10482,10483,10484,10485,10486,10487, +10488,10489,10490,10491,10492,10493,10494,10495,10496,10497,10498,10499, +10500,10501,10502,10503,10504,10505,10506,10507,10508,10509,10510,10511, +10512,10513,10514,10515,10516,10517,10518,10519,10520,10521,10522,10523, +10524,10525,10526,10527,10528,10529,10530,10531,10532,10533,10534,10535, +10536,10537,10538,10539,10540,10541,10542,10543,10544,10545,10546,10547, +10548,10549,10550,10551,10552,10553,10554,10555,10556,10557,10558,10559, +10560,10561,10562,10563,10564,10565,10566,10567,10568,10569,10570,10571, +10572,10573,10574,10575,10576,10577,10578,10579,10580,10581,10582,10583, +10584,10585,10586,10587,10588,10589,10590,10591,10592,10593,10594,10595, +10596,10597,10598,10599,10600,10601,10602,10603,10604,10605,10606,10607, +10608,10609,10610,10611,10612,10613,10614,10615,10616,10617,10618,10619, +10620,10621,10622,10623,10624,10625,10626,10627,10628,10629,10630,10631, +10632,10633,10634,10635,10636,10637,10638,10639,10640,10641,10642,10643, +10644,10645,10646,10647,10648,10649,10650,10651,10652,10653,10654,10655, +10656,10657,10658,10659,10660,10661,10662,10663,10664,10665,10666,10667, +10668,10669,10670,10671,10672,10673,10674,10675,10676,10677,10678,10679, +10680,10681,10682,10683,10684,10685,10686,10687,10688,10689,10690,10691, +10692,10693,10694,10695,10696,10697,10698,10699,10700,10701,10702,10703, +10704,10705,10706,10707,10708,10709,10710,10711,10712,10713,10714,10715, +10716,10717,10718,10719,10720,10721,10722,10723,10724,10725,10726,10727, +10728,10729,10730,10731,10732,10733,10734,10735,10736,10737,10738,10739, +10740,10741,10742,10743,10744,10745,10746,10747,10748,10749,10750,10751, +10752,10753,10754,10755,10756,10757,10758,10759,10760,10761,10762,10763, +10764,10765,10766,10767,10768,10769,10770,10771,10772,10773,10774,10775, +10776,10777,10778,10779,10780,10781,10782,10783,10784,10785,10786,10787, +10788,10789,10790,10791,10792,10793,10794,10795,10796,10797,10798,10799, +10800,10801,10802,10803,10804,10805,10806,10807,10808,10809,10810,10811, +10812,10813,10814,10815,10816,10817,10818,10819,10820,10821,10822,10823, +10824,10825,10826,10827,10828,10829,10830,10831,10832,10833,10834,10835, +10836,10837,10838,10839,10840,10841,10842,10843,10844,10845,10846,10847, +10848,10849,10850,10851,10852,10853,10854,10855,10856,10857,10858,10859, +10860,10861,10862,10863,10864,10865,10866,10867,10868,10869,10870,10871, +10872,10873,10874,10875,10876,10877,10878,10879,10880,10881,10882,10883, +10884,10885,10886,10887,10888,10889,10890,10891,10892,10893,10894,10895, +10896,10897,10898,10899,10900,10901,10902,10903,10904,10905,10906,10907, +10908,10909,10910,10911,10912,10913,10914,10915,10916,10917,10918,10919, +10920,10921,10922,10923,10924,10925,10926,10927,10928,10929,10930,10931, +10932,10933,10934,10935,10936,10937,10938,10939,10940,10941,10942,10943, +10944,10945,10946,10947,10948,10949,10950,10951,10952,10953,10954,10955, +10956,10957,10958,10959,10960,10961,10962,10963,10964,10965,10966,10967, +10968,10969,10970,10971,10972,10973,10974,10975,10976,10977,10978,10979, +10980,10981,10982,10983,10984,10985,10986,10987,10988,10989,10990,10991, +10992,10993,10994,10995,10996,10997,10998,10999,11000,11001,11002,11003, +11004,11005,11006,11007,11008,11009,11010,11011,11012,11013,11014,11015, +11016,11017,11018,11019,11020,11021,11022,11023,11024,11025,11026,11027, +11028,11029,11030,11031,11032,11033,11034,11035,11036,11037,11038,11039, +11040,11041,11042,11043,11044,11045,11046,11047,11048,11049,11050,11051, +11052,11053,11054,11055,11056,11057,11058,11059,11060,11061,11062,11063, +11064,11065,11066,11067,11068,11069,11070,11071,11072,11073,11074,11075, +11076,11077,11078,11079,11080,11081,11082,11083,11084,11085,11086,11087, +11088,11089,11090,11091,11092,11093,11094,11095,11096,11097,11098,11099, +11100,11101,11102,11103,11104,11105,11106,11107,11108,11109,11110,11111, +11112,11113,11114,11115,11116,11117,11118,11119,11120,11121,11122,11123, +11124,11125,11126,11127,11128,11129,11130,11131,11132,11133,11134,11135, +11136,11137,11138,11139,11140,11141,11142,11143,11144,11145,11146,11147, +11148,11149,11150,11151,11152,11153,11154,11155,11156,11157,11158,11159, +11160,11161,11162,11163,11164,11165,11166,11167,11168,11169,11170,11171, +11172,11173,11174,11175,11176,11177,11178,11179,11180,11181,11182,11183, +11184,11185,11186,11187,11188,11189,11190,11191,11192,11193,11194,11195, +11196,11197,11198,11199,11200,11201,11202,11203,11204,11205,11206,11207, +11208,11209,11210,11211,11212,11213,11214,11215,11216,11217,11218,11219, +11220,11221,11222,11223,11224,11225,11226,11227,11228,11229,11230,11231, +11232,11233,11234,11235,11236,11237,11238,11239,11240,11241,11242,11243, +11244,11245,11246,11247,11248,11249,11250,11251,11252,11253,11254,11255, +11256,11257,11258,11259,11260,11261,11262,11263,11264,11265,11266,11267, +11268,11269,11270,11271,11272,11273,11274,11275,11276,11277,11278,11279, +11280,11281,11282,11283,11284,11285,11286,11287,11288,11289,11290,11291, +11292,11293,11294,11295,11296,11297,11298,11299,11300,11301,11302,11303, +11304,11305,11306,11307,11308,11309,11310,11311,11264,11265,11266,11267, +11268,11269,11270,11271,11272,11273,11274,11275,11276,11277,11278,11279, +11280,11281,11282,11283,11284,11285,11286,11287,11288,11289,11290,11291, +11292,11293,11294,11295,11296,11297,11298,11299,11300,11301,11302,11303, +11304,11305,11306,11307,11308,11309,11310,11359,11360,11360,11362,11363, +11364,570,574,11367,11367,11369,11369,11371,11371,11373,11374,11375,11376, +11377,11378,11378,11380,11381,11381,11383,11384,11385,11386,11387,11388, +11389,11390,11391,11392,11392,11394,11394,11396,11396,11398,11398,11400, +11400,11402,11402,11404,11404,11406,11406,11408,11408,11410,11410,11412, +11412,11414,11414,11416,11416,11418,11418,11420,11420,11422,11422,11424, +11424,11426,11426,11428,11428,11430,11430,11432,11432,11434,11434,11436, +11436,11438,11438,11440,11440,11442,11442,11444,11444,11446,11446,11448, +11448,11450,11450,11452,11452,11454,11454,11456,11456,11458,11458,11460, +11460,11462,11462,11464,11464,11466,11466,11468,11468,11470,11470,11472, +11472,11474,11474,11476,11476,11478,11478,11480,11480,11482,11482,11484, +11484,11486,11486,11488,11488,11490,11490,11492,11493,11494,11495,11496, +11497,11498,11499,11499,11501,11501,11503,11504,11505,11506,11506,11508, +11509,11510,11511,11512,11513,11514,11515,11516,11517,11518,11519,4256, +4257,4258,4259,4260,4261,4262,4263,4264,4265,4266,4267,4268,4269,4270,4271, +4272,4273,4274,4275,4276,4277,4278,4279,4280,4281,4282,4283,4284,4285,4286, +4287,4288,4289,4290,4291,4292,4293,11558,4295,11560,11561,11562,11563, +11564,4301,11566,11567,11568,11569,11570,11571,11572,11573,11574,11575, +11576,11577,11578,11579,11580,11581,11582,11583,11584,11585,11586,11587, +11588,11589,11590,11591,11592,11593,11594,11595,11596,11597,11598,11599, +11600,11601,11602,11603,11604,11605,11606,11607,11608,11609,11610,11611, +11612,11613,11614,11615,11616,11617,11618,11619,11620,11621,11622,11623, +11624,11625,11626,11627,11628,11629,11630,11631,11632,11633,11634,11635, +11636,11637,11638,11639,11640,11641,11642,11643,11644,11645,11646,11647, +11648,11649,11650,11651,11652,11653,11654,11655,11656,11657,11658,11659, +11660,11661,11662,11663,11664,11665,11666,11667,11668,11669,11670,11671, +11672,11673,11674,11675,11676,11677,11678,11679,11680,11681,11682,11683, +11684,11685,11686,11687,11688,11689,11690,11691,11692,11693,11694,11695, +11696,11697,11698,11699,11700,11701,11702,11703,11704,11705,11706,11707, +11708,11709,11710,11711,11712,11713,11714,11715,11716,11717,11718,11719, +11720,11721,11722,11723,11724,11725,11726,11727,11728,11729,11730,11731, +11732,11733,11734,11735,11736,11737,11738,11739,11740,11741,11742,11743, +11744,11745,11746,11747,11748,11749,11750,11751,11752,11753,11754,11755, +11756,11757,11758,11759,11760,11761,11762,11763,11764,11765,11766,11767, +11768,11769,11770,11771,11772,11773,11774,11775,11776,11777,11778,11779, +11780,11781,11782,11783,11784,11785,11786,11787,11788,11789,11790,11791, +11792,11793,11794,11795,11796,11797,11798,11799,11800,11801,11802,11803, +11804,11805,11806,11807,11808,11809,11810,11811,11812,11813,11814,11815, +11816,11817,11818,11819,11820,11821,11822,11823,11824,11825,11826,11827, +11828,11829,11830,11831,11832,11833,11834,11835,11836,11837,11838,11839, +11840,11841,11842,11843,11844,11845,11846,11847,11848,11849,11850,11851, +11852,11853,11854,11855,11856,11857,11858,11859,11860,11861,11862,11863, +11864,11865,11866,11867,11868,11869,11870,11871,11872,11873,11874,11875, +11876,11877,11878,11879,11880,11881,11882,11883,11884,11885,11886,11887, +11888,11889,11890,11891,11892,11893,11894,11895,11896,11897,11898,11899, +11900,11901,11902,11903,11904,11905,11906,11907,11908,11909,11910,11911, +11912,11913,11914,11915,11916,11917,11918,11919,11920,11921,11922,11923, +11924,11925,11926,11927,11928,11929,11930,11931,11932,11933,11934,11935, +11936,11937,11938,11939,11940,11941,11942,11943,11944,11945,11946,11947, +11948,11949,11950,11951,11952,11953,11954,11955,11956,11957,11958,11959, +11960,11961,11962,11963,11964,11965,11966,11967,11968,11969,11970,11971, +11972,11973,11974,11975,11976,11977,11978,11979,11980,11981,11982,11983, +11984,11985,11986,11987,11988,11989,11990,11991,11992,11993,11994,11995, +11996,11997,11998,11999,12000,12001,12002,12003,12004,12005,12006,12007, +12008,12009,12010,12011,12012,12013,12014,12015,12016,12017,12018,12019, +12020,12021,12022,12023,12024,12025,12026,12027,12028,12029,12030,12031, +12032,12033,12034,12035,12036,12037,12038,12039,12040,12041,12042,12043, +12044,12045,12046,12047,12048,12049,12050,12051,12052,12053,12054,12055, +12056,12057,12058,12059,12060,12061,12062,12063,12064,12065,12066,12067, +12068,12069,12070,12071,12072,12073,12074,12075,12076,12077,12078,12079, +12080,12081,12082,12083,12084,12085,12086,12087,12088,12089,12090,12091, +12092,12093,12094,12095,12096,12097,12098,12099,12100,12101,12102,12103, +12104,12105,12106,12107,12108,12109,12110,12111,12112,12113,12114,12115, +12116,12117,12118,12119,12120,12121,12122,12123,12124,12125,12126,12127, +12128,12129,12130,12131,12132,12133,12134,12135,12136,12137,12138,12139, +12140,12141,12142,12143,12144,12145,12146,12147,12148,12149,12150,12151, +12152,12153,12154,12155,12156,12157,12158,12159,12160,12161,12162,12163, +12164,12165,12166,12167,12168,12169,12170,12171,12172,12173,12174,12175, +12176,12177,12178,12179,12180,12181,12182,12183,12184,12185,12186,12187, +12188,12189,12190,12191,12192,12193,12194,12195,12196,12197,12198,12199, +12200,12201,12202,12203,12204,12205,12206,12207,12208,12209,12210,12211, +12212,12213,12214,12215,12216,12217,12218,12219,12220,12221,12222,12223, +12224,12225,12226,12227,12228,12229,12230,12231,12232,12233,12234,12235, +12236,12237,12238,12239,12240,12241,12242,12243,12244,12245,12246,12247, +12248,12249,12250,12251,12252,12253,12254,12255,12256,12257,12258,12259, +12260,12261,12262,12263,12264,12265,12266,12267,12268,12269,12270,12271, +12272,12273,12274,12275,12276,12277,12278,12279,12280,12281,12282,12283, +12284,12285,12286,12287,12288,12289,12290,12291,12292,12293,12294,12295, +12296,12297,12298,12299,12300,12301,12302,12303,12304,12305,12306,12307, +12308,12309,12310,12311,12312,12313,12314,12315,12316,12317,12318,12319, +12320,12321,12322,12323,12324,12325,12326,12327,12328,12329,12330,12331, +12332,12333,12334,12335,12336,12337,12338,12339,12340,12341,12342,12343, +12344,12345,12346,12347,12348,12349,12350,12351,12352,12353,12354,12355, +12356,12357,12358,12359,12360,12361,12362,12363,12364,12365,12366,12367, +12368,12369,12370,12371,12372,12373,12374,12375,12376,12377,12378,12379, +12380,12381,12382,12383,12384,12385,12386,12387,12388,12389,12390,12391, +12392,12393,12394,12395,12396,12397,12398,12399,12400,12401,12402,12403, +12404,12405,12406,12407,12408,12409,12410,12411,12412,12413,12414,12415, +12416,12417,12418,12419,12420,12421,12422,12423,12424,12425,12426,12427, +12428,12429,12430,12431,12432,12433,12434,12435,12436,12437,12438,12439, +12440,12441,12442,12443,12444,12445,12446,12447,12448,12449,12450,12451, +12452,12453,12454,12455,12456,12457,12458,12459,12460,12461,12462,12463, +12464,12465,12466,12467,12468,12469,12470,12471,12472,12473,12474,12475, +12476,12477,12478,12479,12480,12481,12482,12483,12484,12485,12486,12487, +12488,12489,12490,12491,12492,12493,12494,12495,12496,12497,12498,12499, +12500,12501,12502,12503,12504,12505,12506,12507,12508,12509,12510,12511, +12512,12513,12514,12515,12516,12517,12518,12519,12520,12521,12522,12523, +12524,12525,12526,12527,12528,12529,12530,12531,12532,12533,12534,12535, +12536,12537,12538,12539,12540,12541,12542,12543,12544,12545,12546,12547, +12548,12549,12550,12551,12552,12553,12554,12555,12556,12557,12558,12559, +12560,12561,12562,12563,12564,12565,12566,12567,12568,12569,12570,12571, +12572,12573,12574,12575,12576,12577,12578,12579,12580,12581,12582,12583, +12584,12585,12586,12587,12588,12589,12590,12591,12592,12593,12594,12595, +12596,12597,12598,12599,12600,12601,12602,12603,12604,12605,12606,12607, +12608,12609,12610,12611,12612,12613,12614,12615,12616,12617,12618,12619, +12620,12621,12622,12623,12624,12625,12626,12627,12628,12629,12630,12631, +12632,12633,12634,12635,12636,12637,12638,12639,12640,12641,12642,12643, +12644,12645,12646,12647,12648,12649,12650,12651,12652,12653,12654,12655, +12656,12657,12658,12659,12660,12661,12662,12663,12664,12665,12666,12667, +12668,12669,12670,12671,12672,12673,12674,12675,12676,12677,12678,12679, +12680,12681,12682,12683,12684,12685,12686,12687,12688,12689,12690,12691, +12692,12693,12694,12695,12696,12697,12698,12699,12700,12701,12702,12703, +12704,12705,12706,12707,12708,12709,12710,12711,12712,12713,12714,12715, +12716,12717,12718,12719,12720,12721,12722,12723,12724,12725,12726,12727, +12728,12729,12730,12731,12732,12733,12734,12735,12736,12737,12738,12739, +12740,12741,12742,12743,12744,12745,12746,12747,12748,12749,12750,12751, +12752,12753,12754,12755,12756,12757,12758,12759,12760,12761,12762,12763, +12764,12765,12766,12767,12768,12769,12770,12771,12772,12773,12774,12775, +12776,12777,12778,12779,12780,12781,12782,12783,12784,12785,12786,12787, +12788,12789,12790,12791,12792,12793,12794,12795,12796,12797,12798,12799, +12800,12801,12802,12803,12804,12805,12806,12807,12808,12809,12810,12811, +12812,12813,12814,12815,12816,12817,12818,12819,12820,12821,12822,12823, +12824,12825,12826,12827,12828,12829,12830,12831,12832,12833,12834,12835, +12836,12837,12838,12839,12840,12841,12842,12843,12844,12845,12846,12847, +12848,12849,12850,12851,12852,12853,12854,12855,12856,12857,12858,12859, +12860,12861,12862,12863,12864,12865,12866,12867,12868,12869,12870,12871, +12872,12873,12874,12875,12876,12877,12878,12879,12880,12881,12882,12883, +12884,12885,12886,12887,12888,12889,12890,12891,12892,12893,12894,12895, +12896,12897,12898,12899,12900,12901,12902,12903,12904,12905,12906,12907, +12908,12909,12910,12911,12912,12913,12914,12915,12916,12917,12918,12919, +12920,12921,12922,12923,12924,12925,12926,12927,12928,12929,12930,12931, +12932,12933,12934,12935,12936,12937,12938,12939,12940,12941,12942,12943, +12944,12945,12946,12947,12948,12949,12950,12951,12952,12953,12954,12955, +12956,12957,12958,12959,12960,12961,12962,12963,12964,12965,12966,12967, +12968,12969,12970,12971,12972,12973,12974,12975,12976,12977,12978,12979, +12980,12981,12982,12983,12984,12985,12986,12987,12988,12989,12990,12991, +12992,12993,12994,12995,12996,12997,12998,12999,13000,13001,13002,13003, +13004,13005,13006,13007,13008,13009,13010,13011,13012,13013,13014,13015, +13016,13017,13018,13019,13020,13021,13022,13023,13024,13025,13026,13027, +13028,13029,13030,13031,13032,13033,13034,13035,13036,13037,13038,13039, +13040,13041,13042,13043,13044,13045,13046,13047,13048,13049,13050,13051, +13052,13053,13054,13055,13056,13057,13058,13059,13060,13061,13062,13063, +13064,13065,13066,13067,13068,13069,13070,13071,13072,13073,13074,13075, +13076,13077,13078,13079,13080,13081,13082,13083,13084,13085,13086,13087, +13088,13089,13090,13091,13092,13093,13094,13095,13096,13097,13098,13099, +13100,13101,13102,13103,13104,13105,13106,13107,13108,13109,13110,13111, +13112,13113,13114,13115,13116,13117,13118,13119,13120,13121,13122,13123, +13124,13125,13126,13127,13128,13129,13130,13131,13132,13133,13134,13135, +13136,13137,13138,13139,13140,13141,13142,13143,13144,13145,13146,13147, +13148,13149,13150,13151,13152,13153,13154,13155,13156,13157,13158,13159, +13160,13161,13162,13163,13164,13165,13166,13167,13168,13169,13170,13171, +13172,13173,13174,13175,13176,13177,13178,13179,13180,13181,13182,13183, +13184,13185,13186,13187,13188,13189,13190,13191,13192,13193,13194,13195, +13196,13197,13198,13199,13200,13201,13202,13203,13204,13205,13206,13207, +13208,13209,13210,13211,13212,13213,13214,13215,13216,13217,13218,13219, +13220,13221,13222,13223,13224,13225,13226,13227,13228,13229,13230,13231, +13232,13233,13234,13235,13236,13237,13238,13239,13240,13241,13242,13243, +13244,13245,13246,13247,13248,13249,13250,13251,13252,13253,13254,13255, +13256,13257,13258,13259,13260,13261,13262,13263,13264,13265,13266,13267, +13268,13269,13270,13271,13272,13273,13274,13275,13276,13277,13278,13279, +13280,13281,13282,13283,13284,13285,13286,13287,13288,13289,13290,13291, +13292,13293,13294,13295,13296,13297,13298,13299,13300,13301,13302,13303, +13304,13305,13306,13307,13308,13309,13310,13311,13312,13313,13314,13315, +13316,13317,13318,13319,13320,13321,13322,13323,13324,13325,13326,13327, +13328,13329,13330,13331,13332,13333,13334,13335,13336,13337,13338,13339, +13340,13341,13342,13343,13344,13345,13346,13347,13348,13349,13350,13351, +13352,13353,13354,13355,13356,13357,13358,13359,13360,13361,13362,13363, +13364,13365,13366,13367,13368,13369,13370,13371,13372,13373,13374,13375, +13376,13377,13378,13379,13380,13381,13382,13383,13384,13385,13386,13387, +13388,13389,13390,13391,13392,13393,13394,13395,13396,13397,13398,13399, +13400,13401,13402,13403,13404,13405,13406,13407,13408,13409,13410,13411, +13412,13413,13414,13415,13416,13417,13418,13419,13420,13421,13422,13423, +13424,13425,13426,13427,13428,13429,13430,13431,13432,13433,13434,13435, +13436,13437,13438,13439,13440,13441,13442,13443,13444,13445,13446,13447, +13448,13449,13450,13451,13452,13453,13454,13455,13456,13457,13458,13459, +13460,13461,13462,13463,13464,13465,13466,13467,13468,13469,13470,13471, +13472,13473,13474,13475,13476,13477,13478,13479,13480,13481,13482,13483, +13484,13485,13486,13487,13488,13489,13490,13491,13492,13493,13494,13495, +13496,13497,13498,13499,13500,13501,13502,13503,13504,13505,13506,13507, +13508,13509,13510,13511,13512,13513,13514,13515,13516,13517,13518,13519, +13520,13521,13522,13523,13524,13525,13526,13527,13528,13529,13530,13531, +13532,13533,13534,13535,13536,13537,13538,13539,13540,13541,13542,13543, +13544,13545,13546,13547,13548,13549,13550,13551,13552,13553,13554,13555, +13556,13557,13558,13559,13560,13561,13562,13563,13564,13565,13566,13567, +13568,13569,13570,13571,13572,13573,13574,13575,13576,13577,13578,13579, +13580,13581,13582,13583,13584,13585,13586,13587,13588,13589,13590,13591, +13592,13593,13594,13595,13596,13597,13598,13599,13600,13601,13602,13603, +13604,13605,13606,13607,13608,13609,13610,13611,13612,13613,13614,13615, +13616,13617,13618,13619,13620,13621,13622,13623,13624,13625,13626,13627, +13628,13629,13630,13631,13632,13633,13634,13635,13636,13637,13638,13639, +13640,13641,13642,13643,13644,13645,13646,13647,13648,13649,13650,13651, +13652,13653,13654,13655,13656,13657,13658,13659,13660,13661,13662,13663, +13664,13665,13666,13667,13668,13669,13670,13671,13672,13673,13674,13675, +13676,13677,13678,13679,13680,13681,13682,13683,13684,13685,13686,13687, +13688,13689,13690,13691,13692,13693,13694,13695,13696,13697,13698,13699, +13700,13701,13702,13703,13704,13705,13706,13707,13708,13709,13710,13711, +13712,13713,13714,13715,13716,13717,13718,13719,13720,13721,13722,13723, +13724,13725,13726,13727,13728,13729,13730,13731,13732,13733,13734,13735, +13736,13737,13738,13739,13740,13741,13742,13743,13744,13745,13746,13747, +13748,13749,13750,13751,13752,13753,13754,13755,13756,13757,13758,13759, +13760,13761,13762,13763,13764,13765,13766,13767,13768,13769,13770,13771, +13772,13773,13774,13775,13776,13777,13778,13779,13780,13781,13782,13783, +13784,13785,13786,13787,13788,13789,13790,13791,13792,13793,13794,13795, +13796,13797,13798,13799,13800,13801,13802,13803,13804,13805,13806,13807, +13808,13809,13810,13811,13812,13813,13814,13815,13816,13817,13818,13819, +13820,13821,13822,13823,13824,13825,13826,13827,13828,13829,13830,13831, +13832,13833,13834,13835,13836,13837,13838,13839,13840,13841,13842,13843, +13844,13845,13846,13847,13848,13849,13850,13851,13852,13853,13854,13855, +13856,13857,13858,13859,13860,13861,13862,13863,13864,13865,13866,13867, +13868,13869,13870,13871,13872,13873,13874,13875,13876,13877,13878,13879, +13880,13881,13882,13883,13884,13885,13886,13887,13888,13889,13890,13891, +13892,13893,13894,13895,13896,13897,13898,13899,13900,13901,13902,13903, +13904,13905,13906,13907,13908,13909,13910,13911,13912,13913,13914,13915, +13916,13917,13918,13919,13920,13921,13922,13923,13924,13925,13926,13927, +13928,13929,13930,13931,13932,13933,13934,13935,13936,13937,13938,13939, +13940,13941,13942,13943,13944,13945,13946,13947,13948,13949,13950,13951, +13952,13953,13954,13955,13956,13957,13958,13959,13960,13961,13962,13963, +13964,13965,13966,13967,13968,13969,13970,13971,13972,13973,13974,13975, +13976,13977,13978,13979,13980,13981,13982,13983,13984,13985,13986,13987, +13988,13989,13990,13991,13992,13993,13994,13995,13996,13997,13998,13999, +14000,14001,14002,14003,14004,14005,14006,14007,14008,14009,14010,14011, +14012,14013,14014,14015,14016,14017,14018,14019,14020,14021,14022,14023, +14024,14025,14026,14027,14028,14029,14030,14031,14032,14033,14034,14035, +14036,14037,14038,14039,14040,14041,14042,14043,14044,14045,14046,14047, +14048,14049,14050,14051,14052,14053,14054,14055,14056,14057,14058,14059, +14060,14061,14062,14063,14064,14065,14066,14067,14068,14069,14070,14071, +14072,14073,14074,14075,14076,14077,14078,14079,14080,14081,14082,14083, +14084,14085,14086,14087,14088,14089,14090,14091,14092,14093,14094,14095, +14096,14097,14098,14099,14100,14101,14102,14103,14104,14105,14106,14107, +14108,14109,14110,14111,14112,14113,14114,14115,14116,14117,14118,14119, +14120,14121,14122,14123,14124,14125,14126,14127,14128,14129,14130,14131, +14132,14133,14134,14135,14136,14137,14138,14139,14140,14141,14142,14143, +14144,14145,14146,14147,14148,14149,14150,14151,14152,14153,14154,14155, +14156,14157,14158,14159,14160,14161,14162,14163,14164,14165,14166,14167, +14168,14169,14170,14171,14172,14173,14174,14175,14176,14177,14178,14179, +14180,14181,14182,14183,14184,14185,14186,14187,14188,14189,14190,14191, +14192,14193,14194,14195,14196,14197,14198,14199,14200,14201,14202,14203, +14204,14205,14206,14207,14208,14209,14210,14211,14212,14213,14214,14215, +14216,14217,14218,14219,14220,14221,14222,14223,14224,14225,14226,14227, +14228,14229,14230,14231,14232,14233,14234,14235,14236,14237,14238,14239, +14240,14241,14242,14243,14244,14245,14246,14247,14248,14249,14250,14251, +14252,14253,14254,14255,14256,14257,14258,14259,14260,14261,14262,14263, +14264,14265,14266,14267,14268,14269,14270,14271,14272,14273,14274,14275, +14276,14277,14278,14279,14280,14281,14282,14283,14284,14285,14286,14287, +14288,14289,14290,14291,14292,14293,14294,14295,14296,14297,14298,14299, +14300,14301,14302,14303,14304,14305,14306,14307,14308,14309,14310,14311, +14312,14313,14314,14315,14316,14317,14318,14319,14320,14321,14322,14323, +14324,14325,14326,14327,14328,14329,14330,14331,14332,14333,14334,14335, +14336,14337,14338,14339,14340,14341,14342,14343,14344,14345,14346,14347, +14348,14349,14350,14351,14352,14353,14354,14355,14356,14357,14358,14359, +14360,14361,14362,14363,14364,14365,14366,14367,14368,14369,14370,14371, +14372,14373,14374,14375,14376,14377,14378,14379,14380,14381,14382,14383, +14384,14385,14386,14387,14388,14389,14390,14391,14392,14393,14394,14395, +14396,14397,14398,14399,14400,14401,14402,14403,14404,14405,14406,14407, +14408,14409,14410,14411,14412,14413,14414,14415,14416,14417,14418,14419, +14420,14421,14422,14423,14424,14425,14426,14427,14428,14429,14430,14431, +14432,14433,14434,14435,14436,14437,14438,14439,14440,14441,14442,14443, +14444,14445,14446,14447,14448,14449,14450,14451,14452,14453,14454,14455, +14456,14457,14458,14459,14460,14461,14462,14463,14464,14465,14466,14467, +14468,14469,14470,14471,14472,14473,14474,14475,14476,14477,14478,14479, +14480,14481,14482,14483,14484,14485,14486,14487,14488,14489,14490,14491, +14492,14493,14494,14495,14496,14497,14498,14499,14500,14501,14502,14503, +14504,14505,14506,14507,14508,14509,14510,14511,14512,14513,14514,14515, +14516,14517,14518,14519,14520,14521,14522,14523,14524,14525,14526,14527, +14528,14529,14530,14531,14532,14533,14534,14535,14536,14537,14538,14539, +14540,14541,14542,14543,14544,14545,14546,14547,14548,14549,14550,14551, +14552,14553,14554,14555,14556,14557,14558,14559,14560,14561,14562,14563, +14564,14565,14566,14567,14568,14569,14570,14571,14572,14573,14574,14575, +14576,14577,14578,14579,14580,14581,14582,14583,14584,14585,14586,14587, +14588,14589,14590,14591,14592,14593,14594,14595,14596,14597,14598,14599, +14600,14601,14602,14603,14604,14605,14606,14607,14608,14609,14610,14611, +14612,14613,14614,14615,14616,14617,14618,14619,14620,14621,14622,14623, +14624,14625,14626,14627,14628,14629,14630,14631,14632,14633,14634,14635, +14636,14637,14638,14639,14640,14641,14642,14643,14644,14645,14646,14647, +14648,14649,14650,14651,14652,14653,14654,14655,14656,14657,14658,14659, +14660,14661,14662,14663,14664,14665,14666,14667,14668,14669,14670,14671, +14672,14673,14674,14675,14676,14677,14678,14679,14680,14681,14682,14683, +14684,14685,14686,14687,14688,14689,14690,14691,14692,14693,14694,14695, +14696,14697,14698,14699,14700,14701,14702,14703,14704,14705,14706,14707, +14708,14709,14710,14711,14712,14713,14714,14715,14716,14717,14718,14719, +14720,14721,14722,14723,14724,14725,14726,14727,14728,14729,14730,14731, +14732,14733,14734,14735,14736,14737,14738,14739,14740,14741,14742,14743, +14744,14745,14746,14747,14748,14749,14750,14751,14752,14753,14754,14755, +14756,14757,14758,14759,14760,14761,14762,14763,14764,14765,14766,14767, +14768,14769,14770,14771,14772,14773,14774,14775,14776,14777,14778,14779, +14780,14781,14782,14783,14784,14785,14786,14787,14788,14789,14790,14791, +14792,14793,14794,14795,14796,14797,14798,14799,14800,14801,14802,14803, +14804,14805,14806,14807,14808,14809,14810,14811,14812,14813,14814,14815, +14816,14817,14818,14819,14820,14821,14822,14823,14824,14825,14826,14827, +14828,14829,14830,14831,14832,14833,14834,14835,14836,14837,14838,14839, +14840,14841,14842,14843,14844,14845,14846,14847,14848,14849,14850,14851, +14852,14853,14854,14855,14856,14857,14858,14859,14860,14861,14862,14863, +14864,14865,14866,14867,14868,14869,14870,14871,14872,14873,14874,14875, +14876,14877,14878,14879,14880,14881,14882,14883,14884,14885,14886,14887, +14888,14889,14890,14891,14892,14893,14894,14895,14896,14897,14898,14899, +14900,14901,14902,14903,14904,14905,14906,14907,14908,14909,14910,14911, +14912,14913,14914,14915,14916,14917,14918,14919,14920,14921,14922,14923, +14924,14925,14926,14927,14928,14929,14930,14931,14932,14933,14934,14935, +14936,14937,14938,14939,14940,14941,14942,14943,14944,14945,14946,14947, +14948,14949,14950,14951,14952,14953,14954,14955,14956,14957,14958,14959, +14960,14961,14962,14963,14964,14965,14966,14967,14968,14969,14970,14971, +14972,14973,14974,14975,14976,14977,14978,14979,14980,14981,14982,14983, +14984,14985,14986,14987,14988,14989,14990,14991,14992,14993,14994,14995, +14996,14997,14998,14999,15000,15001,15002,15003,15004,15005,15006,15007, +15008,15009,15010,15011,15012,15013,15014,15015,15016,15017,15018,15019, +15020,15021,15022,15023,15024,15025,15026,15027,15028,15029,15030,15031, +15032,15033,15034,15035,15036,15037,15038,15039,15040,15041,15042,15043, +15044,15045,15046,15047,15048,15049,15050,15051,15052,15053,15054,15055, +15056,15057,15058,15059,15060,15061,15062,15063,15064,15065,15066,15067, +15068,15069,15070,15071,15072,15073,15074,15075,15076,15077,15078,15079, +15080,15081,15082,15083,15084,15085,15086,15087,15088,15089,15090,15091, +15092,15093,15094,15095,15096,15097,15098,15099,15100,15101,15102,15103, +15104,15105,15106,15107,15108,15109,15110,15111,15112,15113,15114,15115, +15116,15117,15118,15119,15120,15121,15122,15123,15124,15125,15126,15127, +15128,15129,15130,15131,15132,15133,15134,15135,15136,15137,15138,15139, +15140,15141,15142,15143,15144,15145,15146,15147,15148,15149,15150,15151, +15152,15153,15154,15155,15156,15157,15158,15159,15160,15161,15162,15163, +15164,15165,15166,15167,15168,15169,15170,15171,15172,15173,15174,15175, +15176,15177,15178,15179,15180,15181,15182,15183,15184,15185,15186,15187, +15188,15189,15190,15191,15192,15193,15194,15195,15196,15197,15198,15199, +15200,15201,15202,15203,15204,15205,15206,15207,15208,15209,15210,15211, +15212,15213,15214,15215,15216,15217,15218,15219,15220,15221,15222,15223, +15224,15225,15226,15227,15228,15229,15230,15231,15232,15233,15234,15235, +15236,15237,15238,15239,15240,15241,15242,15243,15244,15245,15246,15247, +15248,15249,15250,15251,15252,15253,15254,15255,15256,15257,15258,15259, +15260,15261,15262,15263,15264,15265,15266,15267,15268,15269,15270,15271, +15272,15273,15274,15275,15276,15277,15278,15279,15280,15281,15282,15283, +15284,15285,15286,15287,15288,15289,15290,15291,15292,15293,15294,15295, +15296,15297,15298,15299,15300,15301,15302,15303,15304,15305,15306,15307, +15308,15309,15310,15311,15312,15313,15314,15315,15316,15317,15318,15319, +15320,15321,15322,15323,15324,15325,15326,15327,15328,15329,15330,15331, +15332,15333,15334,15335,15336,15337,15338,15339,15340,15341,15342,15343, +15344,15345,15346,15347,15348,15349,15350,15351,15352,15353,15354,15355, +15356,15357,15358,15359,15360,15361,15362,15363,15364,15365,15366,15367, +15368,15369,15370,15371,15372,15373,15374,15375,15376,15377,15378,15379, +15380,15381,15382,15383,15384,15385,15386,15387,15388,15389,15390,15391, +15392,15393,15394,15395,15396,15397,15398,15399,15400,15401,15402,15403, +15404,15405,15406,15407,15408,15409,15410,15411,15412,15413,15414,15415, +15416,15417,15418,15419,15420,15421,15422,15423,15424,15425,15426,15427, +15428,15429,15430,15431,15432,15433,15434,15435,15436,15437,15438,15439, +15440,15441,15442,15443,15444,15445,15446,15447,15448,15449,15450,15451, +15452,15453,15454,15455,15456,15457,15458,15459,15460,15461,15462,15463, +15464,15465,15466,15467,15468,15469,15470,15471,15472,15473,15474,15475, +15476,15477,15478,15479,15480,15481,15482,15483,15484,15485,15486,15487, +15488,15489,15490,15491,15492,15493,15494,15495,15496,15497,15498,15499, +15500,15501,15502,15503,15504,15505,15506,15507,15508,15509,15510,15511, +15512,15513,15514,15515,15516,15517,15518,15519,15520,15521,15522,15523, +15524,15525,15526,15527,15528,15529,15530,15531,15532,15533,15534,15535, +15536,15537,15538,15539,15540,15541,15542,15543,15544,15545,15546,15547, +15548,15549,15550,15551,15552,15553,15554,15555,15556,15557,15558,15559, +15560,15561,15562,15563,15564,15565,15566,15567,15568,15569,15570,15571, +15572,15573,15574,15575,15576,15577,15578,15579,15580,15581,15582,15583, +15584,15585,15586,15587,15588,15589,15590,15591,15592,15593,15594,15595, +15596,15597,15598,15599,15600,15601,15602,15603,15604,15605,15606,15607, +15608,15609,15610,15611,15612,15613,15614,15615,15616,15617,15618,15619, +15620,15621,15622,15623,15624,15625,15626,15627,15628,15629,15630,15631, +15632,15633,15634,15635,15636,15637,15638,15639,15640,15641,15642,15643, +15644,15645,15646,15647,15648,15649,15650,15651,15652,15653,15654,15655, +15656,15657,15658,15659,15660,15661,15662,15663,15664,15665,15666,15667, +15668,15669,15670,15671,15672,15673,15674,15675,15676,15677,15678,15679, +15680,15681,15682,15683,15684,15685,15686,15687,15688,15689,15690,15691, +15692,15693,15694,15695,15696,15697,15698,15699,15700,15701,15702,15703, +15704,15705,15706,15707,15708,15709,15710,15711,15712,15713,15714,15715, +15716,15717,15718,15719,15720,15721,15722,15723,15724,15725,15726,15727, +15728,15729,15730,15731,15732,15733,15734,15735,15736,15737,15738,15739, +15740,15741,15742,15743,15744,15745,15746,15747,15748,15749,15750,15751, +15752,15753,15754,15755,15756,15757,15758,15759,15760,15761,15762,15763, +15764,15765,15766,15767,15768,15769,15770,15771,15772,15773,15774,15775, +15776,15777,15778,15779,15780,15781,15782,15783,15784,15785,15786,15787, +15788,15789,15790,15791,15792,15793,15794,15795,15796,15797,15798,15799, +15800,15801,15802,15803,15804,15805,15806,15807,15808,15809,15810,15811, +15812,15813,15814,15815,15816,15817,15818,15819,15820,15821,15822,15823, +15824,15825,15826,15827,15828,15829,15830,15831,15832,15833,15834,15835, +15836,15837,15838,15839,15840,15841,15842,15843,15844,15845,15846,15847, +15848,15849,15850,15851,15852,15853,15854,15855,15856,15857,15858,15859, +15860,15861,15862,15863,15864,15865,15866,15867,15868,15869,15870,15871, +15872,15873,15874,15875,15876,15877,15878,15879,15880,15881,15882,15883, +15884,15885,15886,15887,15888,15889,15890,15891,15892,15893,15894,15895, +15896,15897,15898,15899,15900,15901,15902,15903,15904,15905,15906,15907, +15908,15909,15910,15911,15912,15913,15914,15915,15916,15917,15918,15919, +15920,15921,15922,15923,15924,15925,15926,15927,15928,15929,15930,15931, +15932,15933,15934,15935,15936,15937,15938,15939,15940,15941,15942,15943, +15944,15945,15946,15947,15948,15949,15950,15951,15952,15953,15954,15955, +15956,15957,15958,15959,15960,15961,15962,15963,15964,15965,15966,15967, +15968,15969,15970,15971,15972,15973,15974,15975,15976,15977,15978,15979, +15980,15981,15982,15983,15984,15985,15986,15987,15988,15989,15990,15991, +15992,15993,15994,15995,15996,15997,15998,15999,16000,16001,16002,16003, +16004,16005,16006,16007,16008,16009,16010,16011,16012,16013,16014,16015, +16016,16017,16018,16019,16020,16021,16022,16023,16024,16025,16026,16027, +16028,16029,16030,16031,16032,16033,16034,16035,16036,16037,16038,16039, +16040,16041,16042,16043,16044,16045,16046,16047,16048,16049,16050,16051, +16052,16053,16054,16055,16056,16057,16058,16059,16060,16061,16062,16063, +16064,16065,16066,16067,16068,16069,16070,16071,16072,16073,16074,16075, +16076,16077,16078,16079,16080,16081,16082,16083,16084,16085,16086,16087, +16088,16089,16090,16091,16092,16093,16094,16095,16096,16097,16098,16099, +16100,16101,16102,16103,16104,16105,16106,16107,16108,16109,16110,16111, +16112,16113,16114,16115,16116,16117,16118,16119,16120,16121,16122,16123, +16124,16125,16126,16127,16128,16129,16130,16131,16132,16133,16134,16135, +16136,16137,16138,16139,16140,16141,16142,16143,16144,16145,16146,16147, +16148,16149,16150,16151,16152,16153,16154,16155,16156,16157,16158,16159, +16160,16161,16162,16163,16164,16165,16166,16167,16168,16169,16170,16171, +16172,16173,16174,16175,16176,16177,16178,16179,16180,16181,16182,16183, +16184,16185,16186,16187,16188,16189,16190,16191,16192,16193,16194,16195, +16196,16197,16198,16199,16200,16201,16202,16203,16204,16205,16206,16207, +16208,16209,16210,16211,16212,16213,16214,16215,16216,16217,16218,16219, +16220,16221,16222,16223,16224,16225,16226,16227,16228,16229,16230,16231, +16232,16233,16234,16235,16236,16237,16238,16239,16240,16241,16242,16243, +16244,16245,16246,16247,16248,16249,16250,16251,16252,16253,16254,16255, +16256,16257,16258,16259,16260,16261,16262,16263,16264,16265,16266,16267, +16268,16269,16270,16271,16272,16273,16274,16275,16276,16277,16278,16279, +16280,16281,16282,16283,16284,16285,16286,16287,16288,16289,16290,16291, +16292,16293,16294,16295,16296,16297,16298,16299,16300,16301,16302,16303, +16304,16305,16306,16307,16308,16309,16310,16311,16312,16313,16314,16315, +16316,16317,16318,16319,16320,16321,16322,16323,16324,16325,16326,16327, +16328,16329,16330,16331,16332,16333,16334,16335,16336,16337,16338,16339, +16340,16341,16342,16343,16344,16345,16346,16347,16348,16349,16350,16351, +16352,16353,16354,16355,16356,16357,16358,16359,16360,16361,16362,16363, +16364,16365,16366,16367,16368,16369,16370,16371,16372,16373,16374,16375, +16376,16377,16378,16379,16380,16381,16382,16383,16384,16385,16386,16387, +16388,16389,16390,16391,16392,16393,16394,16395,16396,16397,16398,16399, +16400,16401,16402,16403,16404,16405,16406,16407,16408,16409,16410,16411, +16412,16413,16414,16415,16416,16417,16418,16419,16420,16421,16422,16423, +16424,16425,16426,16427,16428,16429,16430,16431,16432,16433,16434,16435, +16436,16437,16438,16439,16440,16441,16442,16443,16444,16445,16446,16447, +16448,16449,16450,16451,16452,16453,16454,16455,16456,16457,16458,16459, +16460,16461,16462,16463,16464,16465,16466,16467,16468,16469,16470,16471, +16472,16473,16474,16475,16476,16477,16478,16479,16480,16481,16482,16483, +16484,16485,16486,16487,16488,16489,16490,16491,16492,16493,16494,16495, +16496,16497,16498,16499,16500,16501,16502,16503,16504,16505,16506,16507, +16508,16509,16510,16511,16512,16513,16514,16515,16516,16517,16518,16519, +16520,16521,16522,16523,16524,16525,16526,16527,16528,16529,16530,16531, +16532,16533,16534,16535,16536,16537,16538,16539,16540,16541,16542,16543, +16544,16545,16546,16547,16548,16549,16550,16551,16552,16553,16554,16555, +16556,16557,16558,16559,16560,16561,16562,16563,16564,16565,16566,16567, +16568,16569,16570,16571,16572,16573,16574,16575,16576,16577,16578,16579, +16580,16581,16582,16583,16584,16585,16586,16587,16588,16589,16590,16591, +16592,16593,16594,16595,16596,16597,16598,16599,16600,16601,16602,16603, +16604,16605,16606,16607,16608,16609,16610,16611,16612,16613,16614,16615, +16616,16617,16618,16619,16620,16621,16622,16623,16624,16625,16626,16627, +16628,16629,16630,16631,16632,16633,16634,16635,16636,16637,16638,16639, +16640,16641,16642,16643,16644,16645,16646,16647,16648,16649,16650,16651, +16652,16653,16654,16655,16656,16657,16658,16659,16660,16661,16662,16663, +16664,16665,16666,16667,16668,16669,16670,16671,16672,16673,16674,16675, +16676,16677,16678,16679,16680,16681,16682,16683,16684,16685,16686,16687, +16688,16689,16690,16691,16692,16693,16694,16695,16696,16697,16698,16699, +16700,16701,16702,16703,16704,16705,16706,16707,16708,16709,16710,16711, +16712,16713,16714,16715,16716,16717,16718,16719,16720,16721,16722,16723, +16724,16725,16726,16727,16728,16729,16730,16731,16732,16733,16734,16735, +16736,16737,16738,16739,16740,16741,16742,16743,16744,16745,16746,16747, +16748,16749,16750,16751,16752,16753,16754,16755,16756,16757,16758,16759, +16760,16761,16762,16763,16764,16765,16766,16767,16768,16769,16770,16771, +16772,16773,16774,16775,16776,16777,16778,16779,16780,16781,16782,16783, +16784,16785,16786,16787,16788,16789,16790,16791,16792,16793,16794,16795, +16796,16797,16798,16799,16800,16801,16802,16803,16804,16805,16806,16807, +16808,16809,16810,16811,16812,16813,16814,16815,16816,16817,16818,16819, +16820,16821,16822,16823,16824,16825,16826,16827,16828,16829,16830,16831, +16832,16833,16834,16835,16836,16837,16838,16839,16840,16841,16842,16843, +16844,16845,16846,16847,16848,16849,16850,16851,16852,16853,16854,16855, +16856,16857,16858,16859,16860,16861,16862,16863,16864,16865,16866,16867, +16868,16869,16870,16871,16872,16873,16874,16875,16876,16877,16878,16879, +16880,16881,16882,16883,16884,16885,16886,16887,16888,16889,16890,16891, +16892,16893,16894,16895,16896,16897,16898,16899,16900,16901,16902,16903, +16904,16905,16906,16907,16908,16909,16910,16911,16912,16913,16914,16915, +16916,16917,16918,16919,16920,16921,16922,16923,16924,16925,16926,16927, +16928,16929,16930,16931,16932,16933,16934,16935,16936,16937,16938,16939, +16940,16941,16942,16943,16944,16945,16946,16947,16948,16949,16950,16951, +16952,16953,16954,16955,16956,16957,16958,16959,16960,16961,16962,16963, +16964,16965,16966,16967,16968,16969,16970,16971,16972,16973,16974,16975, +16976,16977,16978,16979,16980,16981,16982,16983,16984,16985,16986,16987, +16988,16989,16990,16991,16992,16993,16994,16995,16996,16997,16998,16999, +17000,17001,17002,17003,17004,17005,17006,17007,17008,17009,17010,17011, +17012,17013,17014,17015,17016,17017,17018,17019,17020,17021,17022,17023, +17024,17025,17026,17027,17028,17029,17030,17031,17032,17033,17034,17035, +17036,17037,17038,17039,17040,17041,17042,17043,17044,17045,17046,17047, +17048,17049,17050,17051,17052,17053,17054,17055,17056,17057,17058,17059, +17060,17061,17062,17063,17064,17065,17066,17067,17068,17069,17070,17071, +17072,17073,17074,17075,17076,17077,17078,17079,17080,17081,17082,17083, +17084,17085,17086,17087,17088,17089,17090,17091,17092,17093,17094,17095, +17096,17097,17098,17099,17100,17101,17102,17103,17104,17105,17106,17107, +17108,17109,17110,17111,17112,17113,17114,17115,17116,17117,17118,17119, +17120,17121,17122,17123,17124,17125,17126,17127,17128,17129,17130,17131, +17132,17133,17134,17135,17136,17137,17138,17139,17140,17141,17142,17143, +17144,17145,17146,17147,17148,17149,17150,17151,17152,17153,17154,17155, +17156,17157,17158,17159,17160,17161,17162,17163,17164,17165,17166,17167, +17168,17169,17170,17171,17172,17173,17174,17175,17176,17177,17178,17179, +17180,17181,17182,17183,17184,17185,17186,17187,17188,17189,17190,17191, +17192,17193,17194,17195,17196,17197,17198,17199,17200,17201,17202,17203, +17204,17205,17206,17207,17208,17209,17210,17211,17212,17213,17214,17215, +17216,17217,17218,17219,17220,17221,17222,17223,17224,17225,17226,17227, +17228,17229,17230,17231,17232,17233,17234,17235,17236,17237,17238,17239, +17240,17241,17242,17243,17244,17245,17246,17247,17248,17249,17250,17251, +17252,17253,17254,17255,17256,17257,17258,17259,17260,17261,17262,17263, +17264,17265,17266,17267,17268,17269,17270,17271,17272,17273,17274,17275, +17276,17277,17278,17279,17280,17281,17282,17283,17284,17285,17286,17287, +17288,17289,17290,17291,17292,17293,17294,17295,17296,17297,17298,17299, +17300,17301,17302,17303,17304,17305,17306,17307,17308,17309,17310,17311, +17312,17313,17314,17315,17316,17317,17318,17319,17320,17321,17322,17323, +17324,17325,17326,17327,17328,17329,17330,17331,17332,17333,17334,17335, +17336,17337,17338,17339,17340,17341,17342,17343,17344,17345,17346,17347, +17348,17349,17350,17351,17352,17353,17354,17355,17356,17357,17358,17359, +17360,17361,17362,17363,17364,17365,17366,17367,17368,17369,17370,17371, +17372,17373,17374,17375,17376,17377,17378,17379,17380,17381,17382,17383, +17384,17385,17386,17387,17388,17389,17390,17391,17392,17393,17394,17395, +17396,17397,17398,17399,17400,17401,17402,17403,17404,17405,17406,17407, +17408,17409,17410,17411,17412,17413,17414,17415,17416,17417,17418,17419, +17420,17421,17422,17423,17424,17425,17426,17427,17428,17429,17430,17431, +17432,17433,17434,17435,17436,17437,17438,17439,17440,17441,17442,17443, +17444,17445,17446,17447,17448,17449,17450,17451,17452,17453,17454,17455, +17456,17457,17458,17459,17460,17461,17462,17463,17464,17465,17466,17467, +17468,17469,17470,17471,17472,17473,17474,17475,17476,17477,17478,17479, +17480,17481,17482,17483,17484,17485,17486,17487,17488,17489,17490,17491, +17492,17493,17494,17495,17496,17497,17498,17499,17500,17501,17502,17503, +17504,17505,17506,17507,17508,17509,17510,17511,17512,17513,17514,17515, +17516,17517,17518,17519,17520,17521,17522,17523,17524,17525,17526,17527, +17528,17529,17530,17531,17532,17533,17534,17535,17536,17537,17538,17539, +17540,17541,17542,17543,17544,17545,17546,17547,17548,17549,17550,17551, +17552,17553,17554,17555,17556,17557,17558,17559,17560,17561,17562,17563, +17564,17565,17566,17567,17568,17569,17570,17571,17572,17573,17574,17575, +17576,17577,17578,17579,17580,17581,17582,17583,17584,17585,17586,17587, +17588,17589,17590,17591,17592,17593,17594,17595,17596,17597,17598,17599, +17600,17601,17602,17603,17604,17605,17606,17607,17608,17609,17610,17611, +17612,17613,17614,17615,17616,17617,17618,17619,17620,17621,17622,17623, +17624,17625,17626,17627,17628,17629,17630,17631,17632,17633,17634,17635, +17636,17637,17638,17639,17640,17641,17642,17643,17644,17645,17646,17647, +17648,17649,17650,17651,17652,17653,17654,17655,17656,17657,17658,17659, +17660,17661,17662,17663,17664,17665,17666,17667,17668,17669,17670,17671, +17672,17673,17674,17675,17676,17677,17678,17679,17680,17681,17682,17683, +17684,17685,17686,17687,17688,17689,17690,17691,17692,17693,17694,17695, +17696,17697,17698,17699,17700,17701,17702,17703,17704,17705,17706,17707, +17708,17709,17710,17711,17712,17713,17714,17715,17716,17717,17718,17719, +17720,17721,17722,17723,17724,17725,17726,17727,17728,17729,17730,17731, +17732,17733,17734,17735,17736,17737,17738,17739,17740,17741,17742,17743, +17744,17745,17746,17747,17748,17749,17750,17751,17752,17753,17754,17755, +17756,17757,17758,17759,17760,17761,17762,17763,17764,17765,17766,17767, +17768,17769,17770,17771,17772,17773,17774,17775,17776,17777,17778,17779, +17780,17781,17782,17783,17784,17785,17786,17787,17788,17789,17790,17791, +17792,17793,17794,17795,17796,17797,17798,17799,17800,17801,17802,17803, +17804,17805,17806,17807,17808,17809,17810,17811,17812,17813,17814,17815, +17816,17817,17818,17819,17820,17821,17822,17823,17824,17825,17826,17827, +17828,17829,17830,17831,17832,17833,17834,17835,17836,17837,17838,17839, +17840,17841,17842,17843,17844,17845,17846,17847,17848,17849,17850,17851, +17852,17853,17854,17855,17856,17857,17858,17859,17860,17861,17862,17863, +17864,17865,17866,17867,17868,17869,17870,17871,17872,17873,17874,17875, +17876,17877,17878,17879,17880,17881,17882,17883,17884,17885,17886,17887, +17888,17889,17890,17891,17892,17893,17894,17895,17896,17897,17898,17899, +17900,17901,17902,17903,17904,17905,17906,17907,17908,17909,17910,17911, +17912,17913,17914,17915,17916,17917,17918,17919,17920,17921,17922,17923, +17924,17925,17926,17927,17928,17929,17930,17931,17932,17933,17934,17935, +17936,17937,17938,17939,17940,17941,17942,17943,17944,17945,17946,17947, +17948,17949,17950,17951,17952,17953,17954,17955,17956,17957,17958,17959, +17960,17961,17962,17963,17964,17965,17966,17967,17968,17969,17970,17971, +17972,17973,17974,17975,17976,17977,17978,17979,17980,17981,17982,17983, +17984,17985,17986,17987,17988,17989,17990,17991,17992,17993,17994,17995, +17996,17997,17998,17999,18000,18001,18002,18003,18004,18005,18006,18007, +18008,18009,18010,18011,18012,18013,18014,18015,18016,18017,18018,18019, +18020,18021,18022,18023,18024,18025,18026,18027,18028,18029,18030,18031, +18032,18033,18034,18035,18036,18037,18038,18039,18040,18041,18042,18043, +18044,18045,18046,18047,18048,18049,18050,18051,18052,18053,18054,18055, +18056,18057,18058,18059,18060,18061,18062,18063,18064,18065,18066,18067, +18068,18069,18070,18071,18072,18073,18074,18075,18076,18077,18078,18079, +18080,18081,18082,18083,18084,18085,18086,18087,18088,18089,18090,18091, +18092,18093,18094,18095,18096,18097,18098,18099,18100,18101,18102,18103, +18104,18105,18106,18107,18108,18109,18110,18111,18112,18113,18114,18115, +18116,18117,18118,18119,18120,18121,18122,18123,18124,18125,18126,18127, +18128,18129,18130,18131,18132,18133,18134,18135,18136,18137,18138,18139, +18140,18141,18142,18143,18144,18145,18146,18147,18148,18149,18150,18151, +18152,18153,18154,18155,18156,18157,18158,18159,18160,18161,18162,18163, +18164,18165,18166,18167,18168,18169,18170,18171,18172,18173,18174,18175, +18176,18177,18178,18179,18180,18181,18182,18183,18184,18185,18186,18187, +18188,18189,18190,18191,18192,18193,18194,18195,18196,18197,18198,18199, +18200,18201,18202,18203,18204,18205,18206,18207,18208,18209,18210,18211, +18212,18213,18214,18215,18216,18217,18218,18219,18220,18221,18222,18223, +18224,18225,18226,18227,18228,18229,18230,18231,18232,18233,18234,18235, +18236,18237,18238,18239,18240,18241,18242,18243,18244,18245,18246,18247, +18248,18249,18250,18251,18252,18253,18254,18255,18256,18257,18258,18259, +18260,18261,18262,18263,18264,18265,18266,18267,18268,18269,18270,18271, +18272,18273,18274,18275,18276,18277,18278,18279,18280,18281,18282,18283, +18284,18285,18286,18287,18288,18289,18290,18291,18292,18293,18294,18295, +18296,18297,18298,18299,18300,18301,18302,18303,18304,18305,18306,18307, +18308,18309,18310,18311,18312,18313,18314,18315,18316,18317,18318,18319, +18320,18321,18322,18323,18324,18325,18326,18327,18328,18329,18330,18331, +18332,18333,18334,18335,18336,18337,18338,18339,18340,18341,18342,18343, +18344,18345,18346,18347,18348,18349,18350,18351,18352,18353,18354,18355, +18356,18357,18358,18359,18360,18361,18362,18363,18364,18365,18366,18367, +18368,18369,18370,18371,18372,18373,18374,18375,18376,18377,18378,18379, +18380,18381,18382,18383,18384,18385,18386,18387,18388,18389,18390,18391, +18392,18393,18394,18395,18396,18397,18398,18399,18400,18401,18402,18403, +18404,18405,18406,18407,18408,18409,18410,18411,18412,18413,18414,18415, +18416,18417,18418,18419,18420,18421,18422,18423,18424,18425,18426,18427, +18428,18429,18430,18431,18432,18433,18434,18435,18436,18437,18438,18439, +18440,18441,18442,18443,18444,18445,18446,18447,18448,18449,18450,18451, +18452,18453,18454,18455,18456,18457,18458,18459,18460,18461,18462,18463, +18464,18465,18466,18467,18468,18469,18470,18471,18472,18473,18474,18475, +18476,18477,18478,18479,18480,18481,18482,18483,18484,18485,18486,18487, +18488,18489,18490,18491,18492,18493,18494,18495,18496,18497,18498,18499, +18500,18501,18502,18503,18504,18505,18506,18507,18508,18509,18510,18511, +18512,18513,18514,18515,18516,18517,18518,18519,18520,18521,18522,18523, +18524,18525,18526,18527,18528,18529,18530,18531,18532,18533,18534,18535, +18536,18537,18538,18539,18540,18541,18542,18543,18544,18545,18546,18547, +18548,18549,18550,18551,18552,18553,18554,18555,18556,18557,18558,18559, +18560,18561,18562,18563,18564,18565,18566,18567,18568,18569,18570,18571, +18572,18573,18574,18575,18576,18577,18578,18579,18580,18581,18582,18583, +18584,18585,18586,18587,18588,18589,18590,18591,18592,18593,18594,18595, +18596,18597,18598,18599,18600,18601,18602,18603,18604,18605,18606,18607, +18608,18609,18610,18611,18612,18613,18614,18615,18616,18617,18618,18619, +18620,18621,18622,18623,18624,18625,18626,18627,18628,18629,18630,18631, +18632,18633,18634,18635,18636,18637,18638,18639,18640,18641,18642,18643, +18644,18645,18646,18647,18648,18649,18650,18651,18652,18653,18654,18655, +18656,18657,18658,18659,18660,18661,18662,18663,18664,18665,18666,18667, +18668,18669,18670,18671,18672,18673,18674,18675,18676,18677,18678,18679, +18680,18681,18682,18683,18684,18685,18686,18687,18688,18689,18690,18691, +18692,18693,18694,18695,18696,18697,18698,18699,18700,18701,18702,18703, +18704,18705,18706,18707,18708,18709,18710,18711,18712,18713,18714,18715, +18716,18717,18718,18719,18720,18721,18722,18723,18724,18725,18726,18727, +18728,18729,18730,18731,18732,18733,18734,18735,18736,18737,18738,18739, +18740,18741,18742,18743,18744,18745,18746,18747,18748,18749,18750,18751, +18752,18753,18754,18755,18756,18757,18758,18759,18760,18761,18762,18763, +18764,18765,18766,18767,18768,18769,18770,18771,18772,18773,18774,18775, +18776,18777,18778,18779,18780,18781,18782,18783,18784,18785,18786,18787, +18788,18789,18790,18791,18792,18793,18794,18795,18796,18797,18798,18799, +18800,18801,18802,18803,18804,18805,18806,18807,18808,18809,18810,18811, +18812,18813,18814,18815,18816,18817,18818,18819,18820,18821,18822,18823, +18824,18825,18826,18827,18828,18829,18830,18831,18832,18833,18834,18835, +18836,18837,18838,18839,18840,18841,18842,18843,18844,18845,18846,18847, +18848,18849,18850,18851,18852,18853,18854,18855,18856,18857,18858,18859, +18860,18861,18862,18863,18864,18865,18866,18867,18868,18869,18870,18871, +18872,18873,18874,18875,18876,18877,18878,18879,18880,18881,18882,18883, +18884,18885,18886,18887,18888,18889,18890,18891,18892,18893,18894,18895, +18896,18897,18898,18899,18900,18901,18902,18903,18904,18905,18906,18907, +18908,18909,18910,18911,18912,18913,18914,18915,18916,18917,18918,18919, +18920,18921,18922,18923,18924,18925,18926,18927,18928,18929,18930,18931, +18932,18933,18934,18935,18936,18937,18938,18939,18940,18941,18942,18943, +18944,18945,18946,18947,18948,18949,18950,18951,18952,18953,18954,18955, +18956,18957,18958,18959,18960,18961,18962,18963,18964,18965,18966,18967, +18968,18969,18970,18971,18972,18973,18974,18975,18976,18977,18978,18979, +18980,18981,18982,18983,18984,18985,18986,18987,18988,18989,18990,18991, +18992,18993,18994,18995,18996,18997,18998,18999,19000,19001,19002,19003, +19004,19005,19006,19007,19008,19009,19010,19011,19012,19013,19014,19015, +19016,19017,19018,19019,19020,19021,19022,19023,19024,19025,19026,19027, +19028,19029,19030,19031,19032,19033,19034,19035,19036,19037,19038,19039, +19040,19041,19042,19043,19044,19045,19046,19047,19048,19049,19050,19051, +19052,19053,19054,19055,19056,19057,19058,19059,19060,19061,19062,19063, +19064,19065,19066,19067,19068,19069,19070,19071,19072,19073,19074,19075, +19076,19077,19078,19079,19080,19081,19082,19083,19084,19085,19086,19087, +19088,19089,19090,19091,19092,19093,19094,19095,19096,19097,19098,19099, +19100,19101,19102,19103,19104,19105,19106,19107,19108,19109,19110,19111, +19112,19113,19114,19115,19116,19117,19118,19119,19120,19121,19122,19123, +19124,19125,19126,19127,19128,19129,19130,19131,19132,19133,19134,19135, +19136,19137,19138,19139,19140,19141,19142,19143,19144,19145,19146,19147, +19148,19149,19150,19151,19152,19153,19154,19155,19156,19157,19158,19159, +19160,19161,19162,19163,19164,19165,19166,19167,19168,19169,19170,19171, +19172,19173,19174,19175,19176,19177,19178,19179,19180,19181,19182,19183, +19184,19185,19186,19187,19188,19189,19190,19191,19192,19193,19194,19195, +19196,19197,19198,19199,19200,19201,19202,19203,19204,19205,19206,19207, +19208,19209,19210,19211,19212,19213,19214,19215,19216,19217,19218,19219, +19220,19221,19222,19223,19224,19225,19226,19227,19228,19229,19230,19231, +19232,19233,19234,19235,19236,19237,19238,19239,19240,19241,19242,19243, +19244,19245,19246,19247,19248,19249,19250,19251,19252,19253,19254,19255, +19256,19257,19258,19259,19260,19261,19262,19263,19264,19265,19266,19267, +19268,19269,19270,19271,19272,19273,19274,19275,19276,19277,19278,19279, +19280,19281,19282,19283,19284,19285,19286,19287,19288,19289,19290,19291, +19292,19293,19294,19295,19296,19297,19298,19299,19300,19301,19302,19303, +19304,19305,19306,19307,19308,19309,19310,19311,19312,19313,19314,19315, +19316,19317,19318,19319,19320,19321,19322,19323,19324,19325,19326,19327, +19328,19329,19330,19331,19332,19333,19334,19335,19336,19337,19338,19339, +19340,19341,19342,19343,19344,19345,19346,19347,19348,19349,19350,19351, +19352,19353,19354,19355,19356,19357,19358,19359,19360,19361,19362,19363, +19364,19365,19366,19367,19368,19369,19370,19371,19372,19373,19374,19375, +19376,19377,19378,19379,19380,19381,19382,19383,19384,19385,19386,19387, +19388,19389,19390,19391,19392,19393,19394,19395,19396,19397,19398,19399, +19400,19401,19402,19403,19404,19405,19406,19407,19408,19409,19410,19411, +19412,19413,19414,19415,19416,19417,19418,19419,19420,19421,19422,19423, +19424,19425,19426,19427,19428,19429,19430,19431,19432,19433,19434,19435, +19436,19437,19438,19439,19440,19441,19442,19443,19444,19445,19446,19447, +19448,19449,19450,19451,19452,19453,19454,19455,19456,19457,19458,19459, +19460,19461,19462,19463,19464,19465,19466,19467,19468,19469,19470,19471, +19472,19473,19474,19475,19476,19477,19478,19479,19480,19481,19482,19483, +19484,19485,19486,19487,19488,19489,19490,19491,19492,19493,19494,19495, +19496,19497,19498,19499,19500,19501,19502,19503,19504,19505,19506,19507, +19508,19509,19510,19511,19512,19513,19514,19515,19516,19517,19518,19519, +19520,19521,19522,19523,19524,19525,19526,19527,19528,19529,19530,19531, +19532,19533,19534,19535,19536,19537,19538,19539,19540,19541,19542,19543, +19544,19545,19546,19547,19548,19549,19550,19551,19552,19553,19554,19555, +19556,19557,19558,19559,19560,19561,19562,19563,19564,19565,19566,19567, +19568,19569,19570,19571,19572,19573,19574,19575,19576,19577,19578,19579, +19580,19581,19582,19583,19584,19585,19586,19587,19588,19589,19590,19591, +19592,19593,19594,19595,19596,19597,19598,19599,19600,19601,19602,19603, +19604,19605,19606,19607,19608,19609,19610,19611,19612,19613,19614,19615, +19616,19617,19618,19619,19620,19621,19622,19623,19624,19625,19626,19627, +19628,19629,19630,19631,19632,19633,19634,19635,19636,19637,19638,19639, +19640,19641,19642,19643,19644,19645,19646,19647,19648,19649,19650,19651, +19652,19653,19654,19655,19656,19657,19658,19659,19660,19661,19662,19663, +19664,19665,19666,19667,19668,19669,19670,19671,19672,19673,19674,19675, +19676,19677,19678,19679,19680,19681,19682,19683,19684,19685,19686,19687, +19688,19689,19690,19691,19692,19693,19694,19695,19696,19697,19698,19699, +19700,19701,19702,19703,19704,19705,19706,19707,19708,19709,19710,19711, +19712,19713,19714,19715,19716,19717,19718,19719,19720,19721,19722,19723, +19724,19725,19726,19727,19728,19729,19730,19731,19732,19733,19734,19735, +19736,19737,19738,19739,19740,19741,19742,19743,19744,19745,19746,19747, +19748,19749,19750,19751,19752,19753,19754,19755,19756,19757,19758,19759, +19760,19761,19762,19763,19764,19765,19766,19767,19768,19769,19770,19771, +19772,19773,19774,19775,19776,19777,19778,19779,19780,19781,19782,19783, +19784,19785,19786,19787,19788,19789,19790,19791,19792,19793,19794,19795, +19796,19797,19798,19799,19800,19801,19802,19803,19804,19805,19806,19807, +19808,19809,19810,19811,19812,19813,19814,19815,19816,19817,19818,19819, +19820,19821,19822,19823,19824,19825,19826,19827,19828,19829,19830,19831, +19832,19833,19834,19835,19836,19837,19838,19839,19840,19841,19842,19843, +19844,19845,19846,19847,19848,19849,19850,19851,19852,19853,19854,19855, +19856,19857,19858,19859,19860,19861,19862,19863,19864,19865,19866,19867, +19868,19869,19870,19871,19872,19873,19874,19875,19876,19877,19878,19879, +19880,19881,19882,19883,19884,19885,19886,19887,19888,19889,19890,19891, +19892,19893,19894,19895,19896,19897,19898,19899,19900,19901,19902,19903, +19904,19905,19906,19907,19908,19909,19910,19911,19912,19913,19914,19915, +19916,19917,19918,19919,19920,19921,19922,19923,19924,19925,19926,19927, +19928,19929,19930,19931,19932,19933,19934,19935,19936,19937,19938,19939, +19940,19941,19942,19943,19944,19945,19946,19947,19948,19949,19950,19951, +19952,19953,19954,19955,19956,19957,19958,19959,19960,19961,19962,19963, +19964,19965,19966,19967,19968,19969,19970,19971,19972,19973,19974,19975, +19976,19977,19978,19979,19980,19981,19982,19983,19984,19985,19986,19987, +19988,19989,19990,19991,19992,19993,19994,19995,19996,19997,19998,19999, +20000,20001,20002,20003,20004,20005,20006,20007,20008,20009,20010,20011, +20012,20013,20014,20015,20016,20017,20018,20019,20020,20021,20022,20023, +20024,20025,20026,20027,20028,20029,20030,20031,20032,20033,20034,20035, +20036,20037,20038,20039,20040,20041,20042,20043,20044,20045,20046,20047, +20048,20049,20050,20051,20052,20053,20054,20055,20056,20057,20058,20059, +20060,20061,20062,20063,20064,20065,20066,20067,20068,20069,20070,20071, +20072,20073,20074,20075,20076,20077,20078,20079,20080,20081,20082,20083, +20084,20085,20086,20087,20088,20089,20090,20091,20092,20093,20094,20095, +20096,20097,20098,20099,20100,20101,20102,20103,20104,20105,20106,20107, +20108,20109,20110,20111,20112,20113,20114,20115,20116,20117,20118,20119, +20120,20121,20122,20123,20124,20125,20126,20127,20128,20129,20130,20131, +20132,20133,20134,20135,20136,20137,20138,20139,20140,20141,20142,20143, +20144,20145,20146,20147,20148,20149,20150,20151,20152,20153,20154,20155, +20156,20157,20158,20159,20160,20161,20162,20163,20164,20165,20166,20167, +20168,20169,20170,20171,20172,20173,20174,20175,20176,20177,20178,20179, +20180,20181,20182,20183,20184,20185,20186,20187,20188,20189,20190,20191, +20192,20193,20194,20195,20196,20197,20198,20199,20200,20201,20202,20203, +20204,20205,20206,20207,20208,20209,20210,20211,20212,20213,20214,20215, +20216,20217,20218,20219,20220,20221,20222,20223,20224,20225,20226,20227, +20228,20229,20230,20231,20232,20233,20234,20235,20236,20237,20238,20239, +20240,20241,20242,20243,20244,20245,20246,20247,20248,20249,20250,20251, +20252,20253,20254,20255,20256,20257,20258,20259,20260,20261,20262,20263, +20264,20265,20266,20267,20268,20269,20270,20271,20272,20273,20274,20275, +20276,20277,20278,20279,20280,20281,20282,20283,20284,20285,20286,20287, +20288,20289,20290,20291,20292,20293,20294,20295,20296,20297,20298,20299, +20300,20301,20302,20303,20304,20305,20306,20307,20308,20309,20310,20311, +20312,20313,20314,20315,20316,20317,20318,20319,20320,20321,20322,20323, +20324,20325,20326,20327,20328,20329,20330,20331,20332,20333,20334,20335, +20336,20337,20338,20339,20340,20341,20342,20343,20344,20345,20346,20347, +20348,20349,20350,20351,20352,20353,20354,20355,20356,20357,20358,20359, +20360,20361,20362,20363,20364,20365,20366,20367,20368,20369,20370,20371, +20372,20373,20374,20375,20376,20377,20378,20379,20380,20381,20382,20383, +20384,20385,20386,20387,20388,20389,20390,20391,20392,20393,20394,20395, +20396,20397,20398,20399,20400,20401,20402,20403,20404,20405,20406,20407, +20408,20409,20410,20411,20412,20413,20414,20415,20416,20417,20418,20419, +20420,20421,20422,20423,20424,20425,20426,20427,20428,20429,20430,20431, +20432,20433,20434,20435,20436,20437,20438,20439,20440,20441,20442,20443, +20444,20445,20446,20447,20448,20449,20450,20451,20452,20453,20454,20455, +20456,20457,20458,20459,20460,20461,20462,20463,20464,20465,20466,20467, +20468,20469,20470,20471,20472,20473,20474,20475,20476,20477,20478,20479, +20480,20481,20482,20483,20484,20485,20486,20487,20488,20489,20490,20491, +20492,20493,20494,20495,20496,20497,20498,20499,20500,20501,20502,20503, +20504,20505,20506,20507,20508,20509,20510,20511,20512,20513,20514,20515, +20516,20517,20518,20519,20520,20521,20522,20523,20524,20525,20526,20527, +20528,20529,20530,20531,20532,20533,20534,20535,20536,20537,20538,20539, +20540,20541,20542,20543,20544,20545,20546,20547,20548,20549,20550,20551, +20552,20553,20554,20555,20556,20557,20558,20559,20560,20561,20562,20563, +20564,20565,20566,20567,20568,20569,20570,20571,20572,20573,20574,20575, +20576,20577,20578,20579,20580,20581,20582,20583,20584,20585,20586,20587, +20588,20589,20590,20591,20592,20593,20594,20595,20596,20597,20598,20599, +20600,20601,20602,20603,20604,20605,20606,20607,20608,20609,20610,20611, +20612,20613,20614,20615,20616,20617,20618,20619,20620,20621,20622,20623, +20624,20625,20626,20627,20628,20629,20630,20631,20632,20633,20634,20635, +20636,20637,20638,20639,20640,20641,20642,20643,20644,20645,20646,20647, +20648,20649,20650,20651,20652,20653,20654,20655,20656,20657,20658,20659, +20660,20661,20662,20663,20664,20665,20666,20667,20668,20669,20670,20671, +20672,20673,20674,20675,20676,20677,20678,20679,20680,20681,20682,20683, +20684,20685,20686,20687,20688,20689,20690,20691,20692,20693,20694,20695, +20696,20697,20698,20699,20700,20701,20702,20703,20704,20705,20706,20707, +20708,20709,20710,20711,20712,20713,20714,20715,20716,20717,20718,20719, +20720,20721,20722,20723,20724,20725,20726,20727,20728,20729,20730,20731, +20732,20733,20734,20735,20736,20737,20738,20739,20740,20741,20742,20743, +20744,20745,20746,20747,20748,20749,20750,20751,20752,20753,20754,20755, +20756,20757,20758,20759,20760,20761,20762,20763,20764,20765,20766,20767, +20768,20769,20770,20771,20772,20773,20774,20775,20776,20777,20778,20779, +20780,20781,20782,20783,20784,20785,20786,20787,20788,20789,20790,20791, +20792,20793,20794,20795,20796,20797,20798,20799,20800,20801,20802,20803, +20804,20805,20806,20807,20808,20809,20810,20811,20812,20813,20814,20815, +20816,20817,20818,20819,20820,20821,20822,20823,20824,20825,20826,20827, +20828,20829,20830,20831,20832,20833,20834,20835,20836,20837,20838,20839, +20840,20841,20842,20843,20844,20845,20846,20847,20848,20849,20850,20851, +20852,20853,20854,20855,20856,20857,20858,20859,20860,20861,20862,20863, +20864,20865,20866,20867,20868,20869,20870,20871,20872,20873,20874,20875, +20876,20877,20878,20879,20880,20881,20882,20883,20884,20885,20886,20887, +20888,20889,20890,20891,20892,20893,20894,20895,20896,20897,20898,20899, +20900,20901,20902,20903,20904,20905,20906,20907,20908,20909,20910,20911, +20912,20913,20914,20915,20916,20917,20918,20919,20920,20921,20922,20923, +20924,20925,20926,20927,20928,20929,20930,20931,20932,20933,20934,20935, +20936,20937,20938,20939,20940,20941,20942,20943,20944,20945,20946,20947, +20948,20949,20950,20951,20952,20953,20954,20955,20956,20957,20958,20959, +20960,20961,20962,20963,20964,20965,20966,20967,20968,20969,20970,20971, +20972,20973,20974,20975,20976,20977,20978,20979,20980,20981,20982,20983, +20984,20985,20986,20987,20988,20989,20990,20991,20992,20993,20994,20995, +20996,20997,20998,20999,21000,21001,21002,21003,21004,21005,21006,21007, +21008,21009,21010,21011,21012,21013,21014,21015,21016,21017,21018,21019, +21020,21021,21022,21023,21024,21025,21026,21027,21028,21029,21030,21031, +21032,21033,21034,21035,21036,21037,21038,21039,21040,21041,21042,21043, +21044,21045,21046,21047,21048,21049,21050,21051,21052,21053,21054,21055, +21056,21057,21058,21059,21060,21061,21062,21063,21064,21065,21066,21067, +21068,21069,21070,21071,21072,21073,21074,21075,21076,21077,21078,21079, +21080,21081,21082,21083,21084,21085,21086,21087,21088,21089,21090,21091, +21092,21093,21094,21095,21096,21097,21098,21099,21100,21101,21102,21103, +21104,21105,21106,21107,21108,21109,21110,21111,21112,21113,21114,21115, +21116,21117,21118,21119,21120,21121,21122,21123,21124,21125,21126,21127, +21128,21129,21130,21131,21132,21133,21134,21135,21136,21137,21138,21139, +21140,21141,21142,21143,21144,21145,21146,21147,21148,21149,21150,21151, +21152,21153,21154,21155,21156,21157,21158,21159,21160,21161,21162,21163, +21164,21165,21166,21167,21168,21169,21170,21171,21172,21173,21174,21175, +21176,21177,21178,21179,21180,21181,21182,21183,21184,21185,21186,21187, +21188,21189,21190,21191,21192,21193,21194,21195,21196,21197,21198,21199, +21200,21201,21202,21203,21204,21205,21206,21207,21208,21209,21210,21211, +21212,21213,21214,21215,21216,21217,21218,21219,21220,21221,21222,21223, +21224,21225,21226,21227,21228,21229,21230,21231,21232,21233,21234,21235, +21236,21237,21238,21239,21240,21241,21242,21243,21244,21245,21246,21247, +21248,21249,21250,21251,21252,21253,21254,21255,21256,21257,21258,21259, +21260,21261,21262,21263,21264,21265,21266,21267,21268,21269,21270,21271, +21272,21273,21274,21275,21276,21277,21278,21279,21280,21281,21282,21283, +21284,21285,21286,21287,21288,21289,21290,21291,21292,21293,21294,21295, +21296,21297,21298,21299,21300,21301,21302,21303,21304,21305,21306,21307, +21308,21309,21310,21311,21312,21313,21314,21315,21316,21317,21318,21319, +21320,21321,21322,21323,21324,21325,21326,21327,21328,21329,21330,21331, +21332,21333,21334,21335,21336,21337,21338,21339,21340,21341,21342,21343, +21344,21345,21346,21347,21348,21349,21350,21351,21352,21353,21354,21355, +21356,21357,21358,21359,21360,21361,21362,21363,21364,21365,21366,21367, +21368,21369,21370,21371,21372,21373,21374,21375,21376,21377,21378,21379, +21380,21381,21382,21383,21384,21385,21386,21387,21388,21389,21390,21391, +21392,21393,21394,21395,21396,21397,21398,21399,21400,21401,21402,21403, +21404,21405,21406,21407,21408,21409,21410,21411,21412,21413,21414,21415, +21416,21417,21418,21419,21420,21421,21422,21423,21424,21425,21426,21427, +21428,21429,21430,21431,21432,21433,21434,21435,21436,21437,21438,21439, +21440,21441,21442,21443,21444,21445,21446,21447,21448,21449,21450,21451, +21452,21453,21454,21455,21456,21457,21458,21459,21460,21461,21462,21463, +21464,21465,21466,21467,21468,21469,21470,21471,21472,21473,21474,21475, +21476,21477,21478,21479,21480,21481,21482,21483,21484,21485,21486,21487, +21488,21489,21490,21491,21492,21493,21494,21495,21496,21497,21498,21499, +21500,21501,21502,21503,21504,21505,21506,21507,21508,21509,21510,21511, +21512,21513,21514,21515,21516,21517,21518,21519,21520,21521,21522,21523, +21524,21525,21526,21527,21528,21529,21530,21531,21532,21533,21534,21535, +21536,21537,21538,21539,21540,21541,21542,21543,21544,21545,21546,21547, +21548,21549,21550,21551,21552,21553,21554,21555,21556,21557,21558,21559, +21560,21561,21562,21563,21564,21565,21566,21567,21568,21569,21570,21571, +21572,21573,21574,21575,21576,21577,21578,21579,21580,21581,21582,21583, +21584,21585,21586,21587,21588,21589,21590,21591,21592,21593,21594,21595, +21596,21597,21598,21599,21600,21601,21602,21603,21604,21605,21606,21607, +21608,21609,21610,21611,21612,21613,21614,21615,21616,21617,21618,21619, +21620,21621,21622,21623,21624,21625,21626,21627,21628,21629,21630,21631, +21632,21633,21634,21635,21636,21637,21638,21639,21640,21641,21642,21643, +21644,21645,21646,21647,21648,21649,21650,21651,21652,21653,21654,21655, +21656,21657,21658,21659,21660,21661,21662,21663,21664,21665,21666,21667, +21668,21669,21670,21671,21672,21673,21674,21675,21676,21677,21678,21679, +21680,21681,21682,21683,21684,21685,21686,21687,21688,21689,21690,21691, +21692,21693,21694,21695,21696,21697,21698,21699,21700,21701,21702,21703, +21704,21705,21706,21707,21708,21709,21710,21711,21712,21713,21714,21715, +21716,21717,21718,21719,21720,21721,21722,21723,21724,21725,21726,21727, +21728,21729,21730,21731,21732,21733,21734,21735,21736,21737,21738,21739, +21740,21741,21742,21743,21744,21745,21746,21747,21748,21749,21750,21751, +21752,21753,21754,21755,21756,21757,21758,21759,21760,21761,21762,21763, +21764,21765,21766,21767,21768,21769,21770,21771,21772,21773,21774,21775, +21776,21777,21778,21779,21780,21781,21782,21783,21784,21785,21786,21787, +21788,21789,21790,21791,21792,21793,21794,21795,21796,21797,21798,21799, +21800,21801,21802,21803,21804,21805,21806,21807,21808,21809,21810,21811, +21812,21813,21814,21815,21816,21817,21818,21819,21820,21821,21822,21823, +21824,21825,21826,21827,21828,21829,21830,21831,21832,21833,21834,21835, +21836,21837,21838,21839,21840,21841,21842,21843,21844,21845,21846,21847, +21848,21849,21850,21851,21852,21853,21854,21855,21856,21857,21858,21859, +21860,21861,21862,21863,21864,21865,21866,21867,21868,21869,21870,21871, +21872,21873,21874,21875,21876,21877,21878,21879,21880,21881,21882,21883, +21884,21885,21886,21887,21888,21889,21890,21891,21892,21893,21894,21895, +21896,21897,21898,21899,21900,21901,21902,21903,21904,21905,21906,21907, +21908,21909,21910,21911,21912,21913,21914,21915,21916,21917,21918,21919, +21920,21921,21922,21923,21924,21925,21926,21927,21928,21929,21930,21931, +21932,21933,21934,21935,21936,21937,21938,21939,21940,21941,21942,21943, +21944,21945,21946,21947,21948,21949,21950,21951,21952,21953,21954,21955, +21956,21957,21958,21959,21960,21961,21962,21963,21964,21965,21966,21967, +21968,21969,21970,21971,21972,21973,21974,21975,21976,21977,21978,21979, +21980,21981,21982,21983,21984,21985,21986,21987,21988,21989,21990,21991, +21992,21993,21994,21995,21996,21997,21998,21999,22000,22001,22002,22003, +22004,22005,22006,22007,22008,22009,22010,22011,22012,22013,22014,22015, +22016,22017,22018,22019,22020,22021,22022,22023,22024,22025,22026,22027, +22028,22029,22030,22031,22032,22033,22034,22035,22036,22037,22038,22039, +22040,22041,22042,22043,22044,22045,22046,22047,22048,22049,22050,22051, +22052,22053,22054,22055,22056,22057,22058,22059,22060,22061,22062,22063, +22064,22065,22066,22067,22068,22069,22070,22071,22072,22073,22074,22075, +22076,22077,22078,22079,22080,22081,22082,22083,22084,22085,22086,22087, +22088,22089,22090,22091,22092,22093,22094,22095,22096,22097,22098,22099, +22100,22101,22102,22103,22104,22105,22106,22107,22108,22109,22110,22111, +22112,22113,22114,22115,22116,22117,22118,22119,22120,22121,22122,22123, +22124,22125,22126,22127,22128,22129,22130,22131,22132,22133,22134,22135, +22136,22137,22138,22139,22140,22141,22142,22143,22144,22145,22146,22147, +22148,22149,22150,22151,22152,22153,22154,22155,22156,22157,22158,22159, +22160,22161,22162,22163,22164,22165,22166,22167,22168,22169,22170,22171, +22172,22173,22174,22175,22176,22177,22178,22179,22180,22181,22182,22183, +22184,22185,22186,22187,22188,22189,22190,22191,22192,22193,22194,22195, +22196,22197,22198,22199,22200,22201,22202,22203,22204,22205,22206,22207, +22208,22209,22210,22211,22212,22213,22214,22215,22216,22217,22218,22219, +22220,22221,22222,22223,22224,22225,22226,22227,22228,22229,22230,22231, +22232,22233,22234,22235,22236,22237,22238,22239,22240,22241,22242,22243, +22244,22245,22246,22247,22248,22249,22250,22251,22252,22253,22254,22255, +22256,22257,22258,22259,22260,22261,22262,22263,22264,22265,22266,22267, +22268,22269,22270,22271,22272,22273,22274,22275,22276,22277,22278,22279, +22280,22281,22282,22283,22284,22285,22286,22287,22288,22289,22290,22291, +22292,22293,22294,22295,22296,22297,22298,22299,22300,22301,22302,22303, +22304,22305,22306,22307,22308,22309,22310,22311,22312,22313,22314,22315, +22316,22317,22318,22319,22320,22321,22322,22323,22324,22325,22326,22327, +22328,22329,22330,22331,22332,22333,22334,22335,22336,22337,22338,22339, +22340,22341,22342,22343,22344,22345,22346,22347,22348,22349,22350,22351, +22352,22353,22354,22355,22356,22357,22358,22359,22360,22361,22362,22363, +22364,22365,22366,22367,22368,22369,22370,22371,22372,22373,22374,22375, +22376,22377,22378,22379,22380,22381,22382,22383,22384,22385,22386,22387, +22388,22389,22390,22391,22392,22393,22394,22395,22396,22397,22398,22399, +22400,22401,22402,22403,22404,22405,22406,22407,22408,22409,22410,22411, +22412,22413,22414,22415,22416,22417,22418,22419,22420,22421,22422,22423, +22424,22425,22426,22427,22428,22429,22430,22431,22432,22433,22434,22435, +22436,22437,22438,22439,22440,22441,22442,22443,22444,22445,22446,22447, +22448,22449,22450,22451,22452,22453,22454,22455,22456,22457,22458,22459, +22460,22461,22462,22463,22464,22465,22466,22467,22468,22469,22470,22471, +22472,22473,22474,22475,22476,22477,22478,22479,22480,22481,22482,22483, +22484,22485,22486,22487,22488,22489,22490,22491,22492,22493,22494,22495, +22496,22497,22498,22499,22500,22501,22502,22503,22504,22505,22506,22507, +22508,22509,22510,22511,22512,22513,22514,22515,22516,22517,22518,22519, +22520,22521,22522,22523,22524,22525,22526,22527,22528,22529,22530,22531, +22532,22533,22534,22535,22536,22537,22538,22539,22540,22541,22542,22543, +22544,22545,22546,22547,22548,22549,22550,22551,22552,22553,22554,22555, +22556,22557,22558,22559,22560,22561,22562,22563,22564,22565,22566,22567, +22568,22569,22570,22571,22572,22573,22574,22575,22576,22577,22578,22579, +22580,22581,22582,22583,22584,22585,22586,22587,22588,22589,22590,22591, +22592,22593,22594,22595,22596,22597,22598,22599,22600,22601,22602,22603, +22604,22605,22606,22607,22608,22609,22610,22611,22612,22613,22614,22615, +22616,22617,22618,22619,22620,22621,22622,22623,22624,22625,22626,22627, +22628,22629,22630,22631,22632,22633,22634,22635,22636,22637,22638,22639, +22640,22641,22642,22643,22644,22645,22646,22647,22648,22649,22650,22651, +22652,22653,22654,22655,22656,22657,22658,22659,22660,22661,22662,22663, +22664,22665,22666,22667,22668,22669,22670,22671,22672,22673,22674,22675, +22676,22677,22678,22679,22680,22681,22682,22683,22684,22685,22686,22687, +22688,22689,22690,22691,22692,22693,22694,22695,22696,22697,22698,22699, +22700,22701,22702,22703,22704,22705,22706,22707,22708,22709,22710,22711, +22712,22713,22714,22715,22716,22717,22718,22719,22720,22721,22722,22723, +22724,22725,22726,22727,22728,22729,22730,22731,22732,22733,22734,22735, +22736,22737,22738,22739,22740,22741,22742,22743,22744,22745,22746,22747, +22748,22749,22750,22751,22752,22753,22754,22755,22756,22757,22758,22759, +22760,22761,22762,22763,22764,22765,22766,22767,22768,22769,22770,22771, +22772,22773,22774,22775,22776,22777,22778,22779,22780,22781,22782,22783, +22784,22785,22786,22787,22788,22789,22790,22791,22792,22793,22794,22795, +22796,22797,22798,22799,22800,22801,22802,22803,22804,22805,22806,22807, +22808,22809,22810,22811,22812,22813,22814,22815,22816,22817,22818,22819, +22820,22821,22822,22823,22824,22825,22826,22827,22828,22829,22830,22831, +22832,22833,22834,22835,22836,22837,22838,22839,22840,22841,22842,22843, +22844,22845,22846,22847,22848,22849,22850,22851,22852,22853,22854,22855, +22856,22857,22858,22859,22860,22861,22862,22863,22864,22865,22866,22867, +22868,22869,22870,22871,22872,22873,22874,22875,22876,22877,22878,22879, +22880,22881,22882,22883,22884,22885,22886,22887,22888,22889,22890,22891, +22892,22893,22894,22895,22896,22897,22898,22899,22900,22901,22902,22903, +22904,22905,22906,22907,22908,22909,22910,22911,22912,22913,22914,22915, +22916,22917,22918,22919,22920,22921,22922,22923,22924,22925,22926,22927, +22928,22929,22930,22931,22932,22933,22934,22935,22936,22937,22938,22939, +22940,22941,22942,22943,22944,22945,22946,22947,22948,22949,22950,22951, +22952,22953,22954,22955,22956,22957,22958,22959,22960,22961,22962,22963, +22964,22965,22966,22967,22968,22969,22970,22971,22972,22973,22974,22975, +22976,22977,22978,22979,22980,22981,22982,22983,22984,22985,22986,22987, +22988,22989,22990,22991,22992,22993,22994,22995,22996,22997,22998,22999, +23000,23001,23002,23003,23004,23005,23006,23007,23008,23009,23010,23011, +23012,23013,23014,23015,23016,23017,23018,23019,23020,23021,23022,23023, +23024,23025,23026,23027,23028,23029,23030,23031,23032,23033,23034,23035, +23036,23037,23038,23039,23040,23041,23042,23043,23044,23045,23046,23047, +23048,23049,23050,23051,23052,23053,23054,23055,23056,23057,23058,23059, +23060,23061,23062,23063,23064,23065,23066,23067,23068,23069,23070,23071, +23072,23073,23074,23075,23076,23077,23078,23079,23080,23081,23082,23083, +23084,23085,23086,23087,23088,23089,23090,23091,23092,23093,23094,23095, +23096,23097,23098,23099,23100,23101,23102,23103,23104,23105,23106,23107, +23108,23109,23110,23111,23112,23113,23114,23115,23116,23117,23118,23119, +23120,23121,23122,23123,23124,23125,23126,23127,23128,23129,23130,23131, +23132,23133,23134,23135,23136,23137,23138,23139,23140,23141,23142,23143, +23144,23145,23146,23147,23148,23149,23150,23151,23152,23153,23154,23155, +23156,23157,23158,23159,23160,23161,23162,23163,23164,23165,23166,23167, +23168,23169,23170,23171,23172,23173,23174,23175,23176,23177,23178,23179, +23180,23181,23182,23183,23184,23185,23186,23187,23188,23189,23190,23191, +23192,23193,23194,23195,23196,23197,23198,23199,23200,23201,23202,23203, +23204,23205,23206,23207,23208,23209,23210,23211,23212,23213,23214,23215, +23216,23217,23218,23219,23220,23221,23222,23223,23224,23225,23226,23227, +23228,23229,23230,23231,23232,23233,23234,23235,23236,23237,23238,23239, +23240,23241,23242,23243,23244,23245,23246,23247,23248,23249,23250,23251, +23252,23253,23254,23255,23256,23257,23258,23259,23260,23261,23262,23263, +23264,23265,23266,23267,23268,23269,23270,23271,23272,23273,23274,23275, +23276,23277,23278,23279,23280,23281,23282,23283,23284,23285,23286,23287, +23288,23289,23290,23291,23292,23293,23294,23295,23296,23297,23298,23299, +23300,23301,23302,23303,23304,23305,23306,23307,23308,23309,23310,23311, +23312,23313,23314,23315,23316,23317,23318,23319,23320,23321,23322,23323, +23324,23325,23326,23327,23328,23329,23330,23331,23332,23333,23334,23335, +23336,23337,23338,23339,23340,23341,23342,23343,23344,23345,23346,23347, +23348,23349,23350,23351,23352,23353,23354,23355,23356,23357,23358,23359, +23360,23361,23362,23363,23364,23365,23366,23367,23368,23369,23370,23371, +23372,23373,23374,23375,23376,23377,23378,23379,23380,23381,23382,23383, +23384,23385,23386,23387,23388,23389,23390,23391,23392,23393,23394,23395, +23396,23397,23398,23399,23400,23401,23402,23403,23404,23405,23406,23407, +23408,23409,23410,23411,23412,23413,23414,23415,23416,23417,23418,23419, +23420,23421,23422,23423,23424,23425,23426,23427,23428,23429,23430,23431, +23432,23433,23434,23435,23436,23437,23438,23439,23440,23441,23442,23443, +23444,23445,23446,23447,23448,23449,23450,23451,23452,23453,23454,23455, +23456,23457,23458,23459,23460,23461,23462,23463,23464,23465,23466,23467, +23468,23469,23470,23471,23472,23473,23474,23475,23476,23477,23478,23479, +23480,23481,23482,23483,23484,23485,23486,23487,23488,23489,23490,23491, +23492,23493,23494,23495,23496,23497,23498,23499,23500,23501,23502,23503, +23504,23505,23506,23507,23508,23509,23510,23511,23512,23513,23514,23515, +23516,23517,23518,23519,23520,23521,23522,23523,23524,23525,23526,23527, +23528,23529,23530,23531,23532,23533,23534,23535,23536,23537,23538,23539, +23540,23541,23542,23543,23544,23545,23546,23547,23548,23549,23550,23551, +23552,23553,23554,23555,23556,23557,23558,23559,23560,23561,23562,23563, +23564,23565,23566,23567,23568,23569,23570,23571,23572,23573,23574,23575, +23576,23577,23578,23579,23580,23581,23582,23583,23584,23585,23586,23587, +23588,23589,23590,23591,23592,23593,23594,23595,23596,23597,23598,23599, +23600,23601,23602,23603,23604,23605,23606,23607,23608,23609,23610,23611, +23612,23613,23614,23615,23616,23617,23618,23619,23620,23621,23622,23623, +23624,23625,23626,23627,23628,23629,23630,23631,23632,23633,23634,23635, +23636,23637,23638,23639,23640,23641,23642,23643,23644,23645,23646,23647, +23648,23649,23650,23651,23652,23653,23654,23655,23656,23657,23658,23659, +23660,23661,23662,23663,23664,23665,23666,23667,23668,23669,23670,23671, +23672,23673,23674,23675,23676,23677,23678,23679,23680,23681,23682,23683, +23684,23685,23686,23687,23688,23689,23690,23691,23692,23693,23694,23695, +23696,23697,23698,23699,23700,23701,23702,23703,23704,23705,23706,23707, +23708,23709,23710,23711,23712,23713,23714,23715,23716,23717,23718,23719, +23720,23721,23722,23723,23724,23725,23726,23727,23728,23729,23730,23731, +23732,23733,23734,23735,23736,23737,23738,23739,23740,23741,23742,23743, +23744,23745,23746,23747,23748,23749,23750,23751,23752,23753,23754,23755, +23756,23757,23758,23759,23760,23761,23762,23763,23764,23765,23766,23767, +23768,23769,23770,23771,23772,23773,23774,23775,23776,23777,23778,23779, +23780,23781,23782,23783,23784,23785,23786,23787,23788,23789,23790,23791, +23792,23793,23794,23795,23796,23797,23798,23799,23800,23801,23802,23803, +23804,23805,23806,23807,23808,23809,23810,23811,23812,23813,23814,23815, +23816,23817,23818,23819,23820,23821,23822,23823,23824,23825,23826,23827, +23828,23829,23830,23831,23832,23833,23834,23835,23836,23837,23838,23839, +23840,23841,23842,23843,23844,23845,23846,23847,23848,23849,23850,23851, +23852,23853,23854,23855,23856,23857,23858,23859,23860,23861,23862,23863, +23864,23865,23866,23867,23868,23869,23870,23871,23872,23873,23874,23875, +23876,23877,23878,23879,23880,23881,23882,23883,23884,23885,23886,23887, +23888,23889,23890,23891,23892,23893,23894,23895,23896,23897,23898,23899, +23900,23901,23902,23903,23904,23905,23906,23907,23908,23909,23910,23911, +23912,23913,23914,23915,23916,23917,23918,23919,23920,23921,23922,23923, +23924,23925,23926,23927,23928,23929,23930,23931,23932,23933,23934,23935, +23936,23937,23938,23939,23940,23941,23942,23943,23944,23945,23946,23947, +23948,23949,23950,23951,23952,23953,23954,23955,23956,23957,23958,23959, +23960,23961,23962,23963,23964,23965,23966,23967,23968,23969,23970,23971, +23972,23973,23974,23975,23976,23977,23978,23979,23980,23981,23982,23983, +23984,23985,23986,23987,23988,23989,23990,23991,23992,23993,23994,23995, +23996,23997,23998,23999,24000,24001,24002,24003,24004,24005,24006,24007, +24008,24009,24010,24011,24012,24013,24014,24015,24016,24017,24018,24019, +24020,24021,24022,24023,24024,24025,24026,24027,24028,24029,24030,24031, +24032,24033,24034,24035,24036,24037,24038,24039,24040,24041,24042,24043, +24044,24045,24046,24047,24048,24049,24050,24051,24052,24053,24054,24055, +24056,24057,24058,24059,24060,24061,24062,24063,24064,24065,24066,24067, +24068,24069,24070,24071,24072,24073,24074,24075,24076,24077,24078,24079, +24080,24081,24082,24083,24084,24085,24086,24087,24088,24089,24090,24091, +24092,24093,24094,24095,24096,24097,24098,24099,24100,24101,24102,24103, +24104,24105,24106,24107,24108,24109,24110,24111,24112,24113,24114,24115, +24116,24117,24118,24119,24120,24121,24122,24123,24124,24125,24126,24127, +24128,24129,24130,24131,24132,24133,24134,24135,24136,24137,24138,24139, +24140,24141,24142,24143,24144,24145,24146,24147,24148,24149,24150,24151, +24152,24153,24154,24155,24156,24157,24158,24159,24160,24161,24162,24163, +24164,24165,24166,24167,24168,24169,24170,24171,24172,24173,24174,24175, +24176,24177,24178,24179,24180,24181,24182,24183,24184,24185,24186,24187, +24188,24189,24190,24191,24192,24193,24194,24195,24196,24197,24198,24199, +24200,24201,24202,24203,24204,24205,24206,24207,24208,24209,24210,24211, +24212,24213,24214,24215,24216,24217,24218,24219,24220,24221,24222,24223, +24224,24225,24226,24227,24228,24229,24230,24231,24232,24233,24234,24235, +24236,24237,24238,24239,24240,24241,24242,24243,24244,24245,24246,24247, +24248,24249,24250,24251,24252,24253,24254,24255,24256,24257,24258,24259, +24260,24261,24262,24263,24264,24265,24266,24267,24268,24269,24270,24271, +24272,24273,24274,24275,24276,24277,24278,24279,24280,24281,24282,24283, +24284,24285,24286,24287,24288,24289,24290,24291,24292,24293,24294,24295, +24296,24297,24298,24299,24300,24301,24302,24303,24304,24305,24306,24307, +24308,24309,24310,24311,24312,24313,24314,24315,24316,24317,24318,24319, +24320,24321,24322,24323,24324,24325,24326,24327,24328,24329,24330,24331, +24332,24333,24334,24335,24336,24337,24338,24339,24340,24341,24342,24343, +24344,24345,24346,24347,24348,24349,24350,24351,24352,24353,24354,24355, +24356,24357,24358,24359,24360,24361,24362,24363,24364,24365,24366,24367, +24368,24369,24370,24371,24372,24373,24374,24375,24376,24377,24378,24379, +24380,24381,24382,24383,24384,24385,24386,24387,24388,24389,24390,24391, +24392,24393,24394,24395,24396,24397,24398,24399,24400,24401,24402,24403, +24404,24405,24406,24407,24408,24409,24410,24411,24412,24413,24414,24415, +24416,24417,24418,24419,24420,24421,24422,24423,24424,24425,24426,24427, +24428,24429,24430,24431,24432,24433,24434,24435,24436,24437,24438,24439, +24440,24441,24442,24443,24444,24445,24446,24447,24448,24449,24450,24451, +24452,24453,24454,24455,24456,24457,24458,24459,24460,24461,24462,24463, +24464,24465,24466,24467,24468,24469,24470,24471,24472,24473,24474,24475, +24476,24477,24478,24479,24480,24481,24482,24483,24484,24485,24486,24487, +24488,24489,24490,24491,24492,24493,24494,24495,24496,24497,24498,24499, +24500,24501,24502,24503,24504,24505,24506,24507,24508,24509,24510,24511, +24512,24513,24514,24515,24516,24517,24518,24519,24520,24521,24522,24523, +24524,24525,24526,24527,24528,24529,24530,24531,24532,24533,24534,24535, +24536,24537,24538,24539,24540,24541,24542,24543,24544,24545,24546,24547, +24548,24549,24550,24551,24552,24553,24554,24555,24556,24557,24558,24559, +24560,24561,24562,24563,24564,24565,24566,24567,24568,24569,24570,24571, +24572,24573,24574,24575,24576,24577,24578,24579,24580,24581,24582,24583, +24584,24585,24586,24587,24588,24589,24590,24591,24592,24593,24594,24595, +24596,24597,24598,24599,24600,24601,24602,24603,24604,24605,24606,24607, +24608,24609,24610,24611,24612,24613,24614,24615,24616,24617,24618,24619, +24620,24621,24622,24623,24624,24625,24626,24627,24628,24629,24630,24631, +24632,24633,24634,24635,24636,24637,24638,24639,24640,24641,24642,24643, +24644,24645,24646,24647,24648,24649,24650,24651,24652,24653,24654,24655, +24656,24657,24658,24659,24660,24661,24662,24663,24664,24665,24666,24667, +24668,24669,24670,24671,24672,24673,24674,24675,24676,24677,24678,24679, +24680,24681,24682,24683,24684,24685,24686,24687,24688,24689,24690,24691, +24692,24693,24694,24695,24696,24697,24698,24699,24700,24701,24702,24703, +24704,24705,24706,24707,24708,24709,24710,24711,24712,24713,24714,24715, +24716,24717,24718,24719,24720,24721,24722,24723,24724,24725,24726,24727, +24728,24729,24730,24731,24732,24733,24734,24735,24736,24737,24738,24739, +24740,24741,24742,24743,24744,24745,24746,24747,24748,24749,24750,24751, +24752,24753,24754,24755,24756,24757,24758,24759,24760,24761,24762,24763, +24764,24765,24766,24767,24768,24769,24770,24771,24772,24773,24774,24775, +24776,24777,24778,24779,24780,24781,24782,24783,24784,24785,24786,24787, +24788,24789,24790,24791,24792,24793,24794,24795,24796,24797,24798,24799, +24800,24801,24802,24803,24804,24805,24806,24807,24808,24809,24810,24811, +24812,24813,24814,24815,24816,24817,24818,24819,24820,24821,24822,24823, +24824,24825,24826,24827,24828,24829,24830,24831,24832,24833,24834,24835, +24836,24837,24838,24839,24840,24841,24842,24843,24844,24845,24846,24847, +24848,24849,24850,24851,24852,24853,24854,24855,24856,24857,24858,24859, +24860,24861,24862,24863,24864,24865,24866,24867,24868,24869,24870,24871, +24872,24873,24874,24875,24876,24877,24878,24879,24880,24881,24882,24883, +24884,24885,24886,24887,24888,24889,24890,24891,24892,24893,24894,24895, +24896,24897,24898,24899,24900,24901,24902,24903,24904,24905,24906,24907, +24908,24909,24910,24911,24912,24913,24914,24915,24916,24917,24918,24919, +24920,24921,24922,24923,24924,24925,24926,24927,24928,24929,24930,24931, +24932,24933,24934,24935,24936,24937,24938,24939,24940,24941,24942,24943, +24944,24945,24946,24947,24948,24949,24950,24951,24952,24953,24954,24955, +24956,24957,24958,24959,24960,24961,24962,24963,24964,24965,24966,24967, +24968,24969,24970,24971,24972,24973,24974,24975,24976,24977,24978,24979, +24980,24981,24982,24983,24984,24985,24986,24987,24988,24989,24990,24991, +24992,24993,24994,24995,24996,24997,24998,24999,25000,25001,25002,25003, +25004,25005,25006,25007,25008,25009,25010,25011,25012,25013,25014,25015, +25016,25017,25018,25019,25020,25021,25022,25023,25024,25025,25026,25027, +25028,25029,25030,25031,25032,25033,25034,25035,25036,25037,25038,25039, +25040,25041,25042,25043,25044,25045,25046,25047,25048,25049,25050,25051, +25052,25053,25054,25055,25056,25057,25058,25059,25060,25061,25062,25063, +25064,25065,25066,25067,25068,25069,25070,25071,25072,25073,25074,25075, +25076,25077,25078,25079,25080,25081,25082,25083,25084,25085,25086,25087, +25088,25089,25090,25091,25092,25093,25094,25095,25096,25097,25098,25099, +25100,25101,25102,25103,25104,25105,25106,25107,25108,25109,25110,25111, +25112,25113,25114,25115,25116,25117,25118,25119,25120,25121,25122,25123, +25124,25125,25126,25127,25128,25129,25130,25131,25132,25133,25134,25135, +25136,25137,25138,25139,25140,25141,25142,25143,25144,25145,25146,25147, +25148,25149,25150,25151,25152,25153,25154,25155,25156,25157,25158,25159, +25160,25161,25162,25163,25164,25165,25166,25167,25168,25169,25170,25171, +25172,25173,25174,25175,25176,25177,25178,25179,25180,25181,25182,25183, +25184,25185,25186,25187,25188,25189,25190,25191,25192,25193,25194,25195, +25196,25197,25198,25199,25200,25201,25202,25203,25204,25205,25206,25207, +25208,25209,25210,25211,25212,25213,25214,25215,25216,25217,25218,25219, +25220,25221,25222,25223,25224,25225,25226,25227,25228,25229,25230,25231, +25232,25233,25234,25235,25236,25237,25238,25239,25240,25241,25242,25243, +25244,25245,25246,25247,25248,25249,25250,25251,25252,25253,25254,25255, +25256,25257,25258,25259,25260,25261,25262,25263,25264,25265,25266,25267, +25268,25269,25270,25271,25272,25273,25274,25275,25276,25277,25278,25279, +25280,25281,25282,25283,25284,25285,25286,25287,25288,25289,25290,25291, +25292,25293,25294,25295,25296,25297,25298,25299,25300,25301,25302,25303, +25304,25305,25306,25307,25308,25309,25310,25311,25312,25313,25314,25315, +25316,25317,25318,25319,25320,25321,25322,25323,25324,25325,25326,25327, +25328,25329,25330,25331,25332,25333,25334,25335,25336,25337,25338,25339, +25340,25341,25342,25343,25344,25345,25346,25347,25348,25349,25350,25351, +25352,25353,25354,25355,25356,25357,25358,25359,25360,25361,25362,25363, +25364,25365,25366,25367,25368,25369,25370,25371,25372,25373,25374,25375, +25376,25377,25378,25379,25380,25381,25382,25383,25384,25385,25386,25387, +25388,25389,25390,25391,25392,25393,25394,25395,25396,25397,25398,25399, +25400,25401,25402,25403,25404,25405,25406,25407,25408,25409,25410,25411, +25412,25413,25414,25415,25416,25417,25418,25419,25420,25421,25422,25423, +25424,25425,25426,25427,25428,25429,25430,25431,25432,25433,25434,25435, +25436,25437,25438,25439,25440,25441,25442,25443,25444,25445,25446,25447, +25448,25449,25450,25451,25452,25453,25454,25455,25456,25457,25458,25459, +25460,25461,25462,25463,25464,25465,25466,25467,25468,25469,25470,25471, +25472,25473,25474,25475,25476,25477,25478,25479,25480,25481,25482,25483, +25484,25485,25486,25487,25488,25489,25490,25491,25492,25493,25494,25495, +25496,25497,25498,25499,25500,25501,25502,25503,25504,25505,25506,25507, +25508,25509,25510,25511,25512,25513,25514,25515,25516,25517,25518,25519, +25520,25521,25522,25523,25524,25525,25526,25527,25528,25529,25530,25531, +25532,25533,25534,25535,25536,25537,25538,25539,25540,25541,25542,25543, +25544,25545,25546,25547,25548,25549,25550,25551,25552,25553,25554,25555, +25556,25557,25558,25559,25560,25561,25562,25563,25564,25565,25566,25567, +25568,25569,25570,25571,25572,25573,25574,25575,25576,25577,25578,25579, +25580,25581,25582,25583,25584,25585,25586,25587,25588,25589,25590,25591, +25592,25593,25594,25595,25596,25597,25598,25599,25600,25601,25602,25603, +25604,25605,25606,25607,25608,25609,25610,25611,25612,25613,25614,25615, +25616,25617,25618,25619,25620,25621,25622,25623,25624,25625,25626,25627, +25628,25629,25630,25631,25632,25633,25634,25635,25636,25637,25638,25639, +25640,25641,25642,25643,25644,25645,25646,25647,25648,25649,25650,25651, +25652,25653,25654,25655,25656,25657,25658,25659,25660,25661,25662,25663, +25664,25665,25666,25667,25668,25669,25670,25671,25672,25673,25674,25675, +25676,25677,25678,25679,25680,25681,25682,25683,25684,25685,25686,25687, +25688,25689,25690,25691,25692,25693,25694,25695,25696,25697,25698,25699, +25700,25701,25702,25703,25704,25705,25706,25707,25708,25709,25710,25711, +25712,25713,25714,25715,25716,25717,25718,25719,25720,25721,25722,25723, +25724,25725,25726,25727,25728,25729,25730,25731,25732,25733,25734,25735, +25736,25737,25738,25739,25740,25741,25742,25743,25744,25745,25746,25747, +25748,25749,25750,25751,25752,25753,25754,25755,25756,25757,25758,25759, +25760,25761,25762,25763,25764,25765,25766,25767,25768,25769,25770,25771, +25772,25773,25774,25775,25776,25777,25778,25779,25780,25781,25782,25783, +25784,25785,25786,25787,25788,25789,25790,25791,25792,25793,25794,25795, +25796,25797,25798,25799,25800,25801,25802,25803,25804,25805,25806,25807, +25808,25809,25810,25811,25812,25813,25814,25815,25816,25817,25818,25819, +25820,25821,25822,25823,25824,25825,25826,25827,25828,25829,25830,25831, +25832,25833,25834,25835,25836,25837,25838,25839,25840,25841,25842,25843, +25844,25845,25846,25847,25848,25849,25850,25851,25852,25853,25854,25855, +25856,25857,25858,25859,25860,25861,25862,25863,25864,25865,25866,25867, +25868,25869,25870,25871,25872,25873,25874,25875,25876,25877,25878,25879, +25880,25881,25882,25883,25884,25885,25886,25887,25888,25889,25890,25891, +25892,25893,25894,25895,25896,25897,25898,25899,25900,25901,25902,25903, +25904,25905,25906,25907,25908,25909,25910,25911,25912,25913,25914,25915, +25916,25917,25918,25919,25920,25921,25922,25923,25924,25925,25926,25927, +25928,25929,25930,25931,25932,25933,25934,25935,25936,25937,25938,25939, +25940,25941,25942,25943,25944,25945,25946,25947,25948,25949,25950,25951, +25952,25953,25954,25955,25956,25957,25958,25959,25960,25961,25962,25963, +25964,25965,25966,25967,25968,25969,25970,25971,25972,25973,25974,25975, +25976,25977,25978,25979,25980,25981,25982,25983,25984,25985,25986,25987, +25988,25989,25990,25991,25992,25993,25994,25995,25996,25997,25998,25999, +26000,26001,26002,26003,26004,26005,26006,26007,26008,26009,26010,26011, +26012,26013,26014,26015,26016,26017,26018,26019,26020,26021,26022,26023, +26024,26025,26026,26027,26028,26029,26030,26031,26032,26033,26034,26035, +26036,26037,26038,26039,26040,26041,26042,26043,26044,26045,26046,26047, +26048,26049,26050,26051,26052,26053,26054,26055,26056,26057,26058,26059, +26060,26061,26062,26063,26064,26065,26066,26067,26068,26069,26070,26071, +26072,26073,26074,26075,26076,26077,26078,26079,26080,26081,26082,26083, +26084,26085,26086,26087,26088,26089,26090,26091,26092,26093,26094,26095, +26096,26097,26098,26099,26100,26101,26102,26103,26104,26105,26106,26107, +26108,26109,26110,26111,26112,26113,26114,26115,26116,26117,26118,26119, +26120,26121,26122,26123,26124,26125,26126,26127,26128,26129,26130,26131, +26132,26133,26134,26135,26136,26137,26138,26139,26140,26141,26142,26143, +26144,26145,26146,26147,26148,26149,26150,26151,26152,26153,26154,26155, +26156,26157,26158,26159,26160,26161,26162,26163,26164,26165,26166,26167, +26168,26169,26170,26171,26172,26173,26174,26175,26176,26177,26178,26179, +26180,26181,26182,26183,26184,26185,26186,26187,26188,26189,26190,26191, +26192,26193,26194,26195,26196,26197,26198,26199,26200,26201,26202,26203, +26204,26205,26206,26207,26208,26209,26210,26211,26212,26213,26214,26215, +26216,26217,26218,26219,26220,26221,26222,26223,26224,26225,26226,26227, +26228,26229,26230,26231,26232,26233,26234,26235,26236,26237,26238,26239, +26240,26241,26242,26243,26244,26245,26246,26247,26248,26249,26250,26251, +26252,26253,26254,26255,26256,26257,26258,26259,26260,26261,26262,26263, +26264,26265,26266,26267,26268,26269,26270,26271,26272,26273,26274,26275, +26276,26277,26278,26279,26280,26281,26282,26283,26284,26285,26286,26287, +26288,26289,26290,26291,26292,26293,26294,26295,26296,26297,26298,26299, +26300,26301,26302,26303,26304,26305,26306,26307,26308,26309,26310,26311, +26312,26313,26314,26315,26316,26317,26318,26319,26320,26321,26322,26323, +26324,26325,26326,26327,26328,26329,26330,26331,26332,26333,26334,26335, +26336,26337,26338,26339,26340,26341,26342,26343,26344,26345,26346,26347, +26348,26349,26350,26351,26352,26353,26354,26355,26356,26357,26358,26359, +26360,26361,26362,26363,26364,26365,26366,26367,26368,26369,26370,26371, +26372,26373,26374,26375,26376,26377,26378,26379,26380,26381,26382,26383, +26384,26385,26386,26387,26388,26389,26390,26391,26392,26393,26394,26395, +26396,26397,26398,26399,26400,26401,26402,26403,26404,26405,26406,26407, +26408,26409,26410,26411,26412,26413,26414,26415,26416,26417,26418,26419, +26420,26421,26422,26423,26424,26425,26426,26427,26428,26429,26430,26431, +26432,26433,26434,26435,26436,26437,26438,26439,26440,26441,26442,26443, +26444,26445,26446,26447,26448,26449,26450,26451,26452,26453,26454,26455, +26456,26457,26458,26459,26460,26461,26462,26463,26464,26465,26466,26467, +26468,26469,26470,26471,26472,26473,26474,26475,26476,26477,26478,26479, +26480,26481,26482,26483,26484,26485,26486,26487,26488,26489,26490,26491, +26492,26493,26494,26495,26496,26497,26498,26499,26500,26501,26502,26503, +26504,26505,26506,26507,26508,26509,26510,26511,26512,26513,26514,26515, +26516,26517,26518,26519,26520,26521,26522,26523,26524,26525,26526,26527, +26528,26529,26530,26531,26532,26533,26534,26535,26536,26537,26538,26539, +26540,26541,26542,26543,26544,26545,26546,26547,26548,26549,26550,26551, +26552,26553,26554,26555,26556,26557,26558,26559,26560,26561,26562,26563, +26564,26565,26566,26567,26568,26569,26570,26571,26572,26573,26574,26575, +26576,26577,26578,26579,26580,26581,26582,26583,26584,26585,26586,26587, +26588,26589,26590,26591,26592,26593,26594,26595,26596,26597,26598,26599, +26600,26601,26602,26603,26604,26605,26606,26607,26608,26609,26610,26611, +26612,26613,26614,26615,26616,26617,26618,26619,26620,26621,26622,26623, +26624,26625,26626,26627,26628,26629,26630,26631,26632,26633,26634,26635, +26636,26637,26638,26639,26640,26641,26642,26643,26644,26645,26646,26647, +26648,26649,26650,26651,26652,26653,26654,26655,26656,26657,26658,26659, +26660,26661,26662,26663,26664,26665,26666,26667,26668,26669,26670,26671, +26672,26673,26674,26675,26676,26677,26678,26679,26680,26681,26682,26683, +26684,26685,26686,26687,26688,26689,26690,26691,26692,26693,26694,26695, +26696,26697,26698,26699,26700,26701,26702,26703,26704,26705,26706,26707, +26708,26709,26710,26711,26712,26713,26714,26715,26716,26717,26718,26719, +26720,26721,26722,26723,26724,26725,26726,26727,26728,26729,26730,26731, +26732,26733,26734,26735,26736,26737,26738,26739,26740,26741,26742,26743, +26744,26745,26746,26747,26748,26749,26750,26751,26752,26753,26754,26755, +26756,26757,26758,26759,26760,26761,26762,26763,26764,26765,26766,26767, +26768,26769,26770,26771,26772,26773,26774,26775,26776,26777,26778,26779, +26780,26781,26782,26783,26784,26785,26786,26787,26788,26789,26790,26791, +26792,26793,26794,26795,26796,26797,26798,26799,26800,26801,26802,26803, +26804,26805,26806,26807,26808,26809,26810,26811,26812,26813,26814,26815, +26816,26817,26818,26819,26820,26821,26822,26823,26824,26825,26826,26827, +26828,26829,26830,26831,26832,26833,26834,26835,26836,26837,26838,26839, +26840,26841,26842,26843,26844,26845,26846,26847,26848,26849,26850,26851, +26852,26853,26854,26855,26856,26857,26858,26859,26860,26861,26862,26863, +26864,26865,26866,26867,26868,26869,26870,26871,26872,26873,26874,26875, +26876,26877,26878,26879,26880,26881,26882,26883,26884,26885,26886,26887, +26888,26889,26890,26891,26892,26893,26894,26895,26896,26897,26898,26899, +26900,26901,26902,26903,26904,26905,26906,26907,26908,26909,26910,26911, +26912,26913,26914,26915,26916,26917,26918,26919,26920,26921,26922,26923, +26924,26925,26926,26927,26928,26929,26930,26931,26932,26933,26934,26935, +26936,26937,26938,26939,26940,26941,26942,26943,26944,26945,26946,26947, +26948,26949,26950,26951,26952,26953,26954,26955,26956,26957,26958,26959, +26960,26961,26962,26963,26964,26965,26966,26967,26968,26969,26970,26971, +26972,26973,26974,26975,26976,26977,26978,26979,26980,26981,26982,26983, +26984,26985,26986,26987,26988,26989,26990,26991,26992,26993,26994,26995, +26996,26997,26998,26999,27000,27001,27002,27003,27004,27005,27006,27007, +27008,27009,27010,27011,27012,27013,27014,27015,27016,27017,27018,27019, +27020,27021,27022,27023,27024,27025,27026,27027,27028,27029,27030,27031, +27032,27033,27034,27035,27036,27037,27038,27039,27040,27041,27042,27043, +27044,27045,27046,27047,27048,27049,27050,27051,27052,27053,27054,27055, +27056,27057,27058,27059,27060,27061,27062,27063,27064,27065,27066,27067, +27068,27069,27070,27071,27072,27073,27074,27075,27076,27077,27078,27079, +27080,27081,27082,27083,27084,27085,27086,27087,27088,27089,27090,27091, +27092,27093,27094,27095,27096,27097,27098,27099,27100,27101,27102,27103, +27104,27105,27106,27107,27108,27109,27110,27111,27112,27113,27114,27115, +27116,27117,27118,27119,27120,27121,27122,27123,27124,27125,27126,27127, +27128,27129,27130,27131,27132,27133,27134,27135,27136,27137,27138,27139, +27140,27141,27142,27143,27144,27145,27146,27147,27148,27149,27150,27151, +27152,27153,27154,27155,27156,27157,27158,27159,27160,27161,27162,27163, +27164,27165,27166,27167,27168,27169,27170,27171,27172,27173,27174,27175, +27176,27177,27178,27179,27180,27181,27182,27183,27184,27185,27186,27187, +27188,27189,27190,27191,27192,27193,27194,27195,27196,27197,27198,27199, +27200,27201,27202,27203,27204,27205,27206,27207,27208,27209,27210,27211, +27212,27213,27214,27215,27216,27217,27218,27219,27220,27221,27222,27223, +27224,27225,27226,27227,27228,27229,27230,27231,27232,27233,27234,27235, +27236,27237,27238,27239,27240,27241,27242,27243,27244,27245,27246,27247, +27248,27249,27250,27251,27252,27253,27254,27255,27256,27257,27258,27259, +27260,27261,27262,27263,27264,27265,27266,27267,27268,27269,27270,27271, +27272,27273,27274,27275,27276,27277,27278,27279,27280,27281,27282,27283, +27284,27285,27286,27287,27288,27289,27290,27291,27292,27293,27294,27295, +27296,27297,27298,27299,27300,27301,27302,27303,27304,27305,27306,27307, +27308,27309,27310,27311,27312,27313,27314,27315,27316,27317,27318,27319, +27320,27321,27322,27323,27324,27325,27326,27327,27328,27329,27330,27331, +27332,27333,27334,27335,27336,27337,27338,27339,27340,27341,27342,27343, +27344,27345,27346,27347,27348,27349,27350,27351,27352,27353,27354,27355, +27356,27357,27358,27359,27360,27361,27362,27363,27364,27365,27366,27367, +27368,27369,27370,27371,27372,27373,27374,27375,27376,27377,27378,27379, +27380,27381,27382,27383,27384,27385,27386,27387,27388,27389,27390,27391, +27392,27393,27394,27395,27396,27397,27398,27399,27400,27401,27402,27403, +27404,27405,27406,27407,27408,27409,27410,27411,27412,27413,27414,27415, +27416,27417,27418,27419,27420,27421,27422,27423,27424,27425,27426,27427, +27428,27429,27430,27431,27432,27433,27434,27435,27436,27437,27438,27439, +27440,27441,27442,27443,27444,27445,27446,27447,27448,27449,27450,27451, +27452,27453,27454,27455,27456,27457,27458,27459,27460,27461,27462,27463, +27464,27465,27466,27467,27468,27469,27470,27471,27472,27473,27474,27475, +27476,27477,27478,27479,27480,27481,27482,27483,27484,27485,27486,27487, +27488,27489,27490,27491,27492,27493,27494,27495,27496,27497,27498,27499, +27500,27501,27502,27503,27504,27505,27506,27507,27508,27509,27510,27511, +27512,27513,27514,27515,27516,27517,27518,27519,27520,27521,27522,27523, +27524,27525,27526,27527,27528,27529,27530,27531,27532,27533,27534,27535, +27536,27537,27538,27539,27540,27541,27542,27543,27544,27545,27546,27547, +27548,27549,27550,27551,27552,27553,27554,27555,27556,27557,27558,27559, +27560,27561,27562,27563,27564,27565,27566,27567,27568,27569,27570,27571, +27572,27573,27574,27575,27576,27577,27578,27579,27580,27581,27582,27583, +27584,27585,27586,27587,27588,27589,27590,27591,27592,27593,27594,27595, +27596,27597,27598,27599,27600,27601,27602,27603,27604,27605,27606,27607, +27608,27609,27610,27611,27612,27613,27614,27615,27616,27617,27618,27619, +27620,27621,27622,27623,27624,27625,27626,27627,27628,27629,27630,27631, +27632,27633,27634,27635,27636,27637,27638,27639,27640,27641,27642,27643, +27644,27645,27646,27647,27648,27649,27650,27651,27652,27653,27654,27655, +27656,27657,27658,27659,27660,27661,27662,27663,27664,27665,27666,27667, +27668,27669,27670,27671,27672,27673,27674,27675,27676,27677,27678,27679, +27680,27681,27682,27683,27684,27685,27686,27687,27688,27689,27690,27691, +27692,27693,27694,27695,27696,27697,27698,27699,27700,27701,27702,27703, +27704,27705,27706,27707,27708,27709,27710,27711,27712,27713,27714,27715, +27716,27717,27718,27719,27720,27721,27722,27723,27724,27725,27726,27727, +27728,27729,27730,27731,27732,27733,27734,27735,27736,27737,27738,27739, +27740,27741,27742,27743,27744,27745,27746,27747,27748,27749,27750,27751, +27752,27753,27754,27755,27756,27757,27758,27759,27760,27761,27762,27763, +27764,27765,27766,27767,27768,27769,27770,27771,27772,27773,27774,27775, +27776,27777,27778,27779,27780,27781,27782,27783,27784,27785,27786,27787, +27788,27789,27790,27791,27792,27793,27794,27795,27796,27797,27798,27799, +27800,27801,27802,27803,27804,27805,27806,27807,27808,27809,27810,27811, +27812,27813,27814,27815,27816,27817,27818,27819,27820,27821,27822,27823, +27824,27825,27826,27827,27828,27829,27830,27831,27832,27833,27834,27835, +27836,27837,27838,27839,27840,27841,27842,27843,27844,27845,27846,27847, +27848,27849,27850,27851,27852,27853,27854,27855,27856,27857,27858,27859, +27860,27861,27862,27863,27864,27865,27866,27867,27868,27869,27870,27871, +27872,27873,27874,27875,27876,27877,27878,27879,27880,27881,27882,27883, +27884,27885,27886,27887,27888,27889,27890,27891,27892,27893,27894,27895, +27896,27897,27898,27899,27900,27901,27902,27903,27904,27905,27906,27907, +27908,27909,27910,27911,27912,27913,27914,27915,27916,27917,27918,27919, +27920,27921,27922,27923,27924,27925,27926,27927,27928,27929,27930,27931, +27932,27933,27934,27935,27936,27937,27938,27939,27940,27941,27942,27943, +27944,27945,27946,27947,27948,27949,27950,27951,27952,27953,27954,27955, +27956,27957,27958,27959,27960,27961,27962,27963,27964,27965,27966,27967, +27968,27969,27970,27971,27972,27973,27974,27975,27976,27977,27978,27979, +27980,27981,27982,27983,27984,27985,27986,27987,27988,27989,27990,27991, +27992,27993,27994,27995,27996,27997,27998,27999,28000,28001,28002,28003, +28004,28005,28006,28007,28008,28009,28010,28011,28012,28013,28014,28015, +28016,28017,28018,28019,28020,28021,28022,28023,28024,28025,28026,28027, +28028,28029,28030,28031,28032,28033,28034,28035,28036,28037,28038,28039, +28040,28041,28042,28043,28044,28045,28046,28047,28048,28049,28050,28051, +28052,28053,28054,28055,28056,28057,28058,28059,28060,28061,28062,28063, +28064,28065,28066,28067,28068,28069,28070,28071,28072,28073,28074,28075, +28076,28077,28078,28079,28080,28081,28082,28083,28084,28085,28086,28087, +28088,28089,28090,28091,28092,28093,28094,28095,28096,28097,28098,28099, +28100,28101,28102,28103,28104,28105,28106,28107,28108,28109,28110,28111, +28112,28113,28114,28115,28116,28117,28118,28119,28120,28121,28122,28123, +28124,28125,28126,28127,28128,28129,28130,28131,28132,28133,28134,28135, +28136,28137,28138,28139,28140,28141,28142,28143,28144,28145,28146,28147, +28148,28149,28150,28151,28152,28153,28154,28155,28156,28157,28158,28159, +28160,28161,28162,28163,28164,28165,28166,28167,28168,28169,28170,28171, +28172,28173,28174,28175,28176,28177,28178,28179,28180,28181,28182,28183, +28184,28185,28186,28187,28188,28189,28190,28191,28192,28193,28194,28195, +28196,28197,28198,28199,28200,28201,28202,28203,28204,28205,28206,28207, +28208,28209,28210,28211,28212,28213,28214,28215,28216,28217,28218,28219, +28220,28221,28222,28223,28224,28225,28226,28227,28228,28229,28230,28231, +28232,28233,28234,28235,28236,28237,28238,28239,28240,28241,28242,28243, +28244,28245,28246,28247,28248,28249,28250,28251,28252,28253,28254,28255, +28256,28257,28258,28259,28260,28261,28262,28263,28264,28265,28266,28267, +28268,28269,28270,28271,28272,28273,28274,28275,28276,28277,28278,28279, +28280,28281,28282,28283,28284,28285,28286,28287,28288,28289,28290,28291, +28292,28293,28294,28295,28296,28297,28298,28299,28300,28301,28302,28303, +28304,28305,28306,28307,28308,28309,28310,28311,28312,28313,28314,28315, +28316,28317,28318,28319,28320,28321,28322,28323,28324,28325,28326,28327, +28328,28329,28330,28331,28332,28333,28334,28335,28336,28337,28338,28339, +28340,28341,28342,28343,28344,28345,28346,28347,28348,28349,28350,28351, +28352,28353,28354,28355,28356,28357,28358,28359,28360,28361,28362,28363, +28364,28365,28366,28367,28368,28369,28370,28371,28372,28373,28374,28375, +28376,28377,28378,28379,28380,28381,28382,28383,28384,28385,28386,28387, +28388,28389,28390,28391,28392,28393,28394,28395,28396,28397,28398,28399, +28400,28401,28402,28403,28404,28405,28406,28407,28408,28409,28410,28411, +28412,28413,28414,28415,28416,28417,28418,28419,28420,28421,28422,28423, +28424,28425,28426,28427,28428,28429,28430,28431,28432,28433,28434,28435, +28436,28437,28438,28439,28440,28441,28442,28443,28444,28445,28446,28447, +28448,28449,28450,28451,28452,28453,28454,28455,28456,28457,28458,28459, +28460,28461,28462,28463,28464,28465,28466,28467,28468,28469,28470,28471, +28472,28473,28474,28475,28476,28477,28478,28479,28480,28481,28482,28483, +28484,28485,28486,28487,28488,28489,28490,28491,28492,28493,28494,28495, +28496,28497,28498,28499,28500,28501,28502,28503,28504,28505,28506,28507, +28508,28509,28510,28511,28512,28513,28514,28515,28516,28517,28518,28519, +28520,28521,28522,28523,28524,28525,28526,28527,28528,28529,28530,28531, +28532,28533,28534,28535,28536,28537,28538,28539,28540,28541,28542,28543, +28544,28545,28546,28547,28548,28549,28550,28551,28552,28553,28554,28555, +28556,28557,28558,28559,28560,28561,28562,28563,28564,28565,28566,28567, +28568,28569,28570,28571,28572,28573,28574,28575,28576,28577,28578,28579, +28580,28581,28582,28583,28584,28585,28586,28587,28588,28589,28590,28591, +28592,28593,28594,28595,28596,28597,28598,28599,28600,28601,28602,28603, +28604,28605,28606,28607,28608,28609,28610,28611,28612,28613,28614,28615, +28616,28617,28618,28619,28620,28621,28622,28623,28624,28625,28626,28627, +28628,28629,28630,28631,28632,28633,28634,28635,28636,28637,28638,28639, +28640,28641,28642,28643,28644,28645,28646,28647,28648,28649,28650,28651, +28652,28653,28654,28655,28656,28657,28658,28659,28660,28661,28662,28663, +28664,28665,28666,28667,28668,28669,28670,28671,28672,28673,28674,28675, +28676,28677,28678,28679,28680,28681,28682,28683,28684,28685,28686,28687, +28688,28689,28690,28691,28692,28693,28694,28695,28696,28697,28698,28699, +28700,28701,28702,28703,28704,28705,28706,28707,28708,28709,28710,28711, +28712,28713,28714,28715,28716,28717,28718,28719,28720,28721,28722,28723, +28724,28725,28726,28727,28728,28729,28730,28731,28732,28733,28734,28735, +28736,28737,28738,28739,28740,28741,28742,28743,28744,28745,28746,28747, +28748,28749,28750,28751,28752,28753,28754,28755,28756,28757,28758,28759, +28760,28761,28762,28763,28764,28765,28766,28767,28768,28769,28770,28771, +28772,28773,28774,28775,28776,28777,28778,28779,28780,28781,28782,28783, +28784,28785,28786,28787,28788,28789,28790,28791,28792,28793,28794,28795, +28796,28797,28798,28799,28800,28801,28802,28803,28804,28805,28806,28807, +28808,28809,28810,28811,28812,28813,28814,28815,28816,28817,28818,28819, +28820,28821,28822,28823,28824,28825,28826,28827,28828,28829,28830,28831, +28832,28833,28834,28835,28836,28837,28838,28839,28840,28841,28842,28843, +28844,28845,28846,28847,28848,28849,28850,28851,28852,28853,28854,28855, +28856,28857,28858,28859,28860,28861,28862,28863,28864,28865,28866,28867, +28868,28869,28870,28871,28872,28873,28874,28875,28876,28877,28878,28879, +28880,28881,28882,28883,28884,28885,28886,28887,28888,28889,28890,28891, +28892,28893,28894,28895,28896,28897,28898,28899,28900,28901,28902,28903, +28904,28905,28906,28907,28908,28909,28910,28911,28912,28913,28914,28915, +28916,28917,28918,28919,28920,28921,28922,28923,28924,28925,28926,28927, +28928,28929,28930,28931,28932,28933,28934,28935,28936,28937,28938,28939, +28940,28941,28942,28943,28944,28945,28946,28947,28948,28949,28950,28951, +28952,28953,28954,28955,28956,28957,28958,28959,28960,28961,28962,28963, +28964,28965,28966,28967,28968,28969,28970,28971,28972,28973,28974,28975, +28976,28977,28978,28979,28980,28981,28982,28983,28984,28985,28986,28987, +28988,28989,28990,28991,28992,28993,28994,28995,28996,28997,28998,28999, +29000,29001,29002,29003,29004,29005,29006,29007,29008,29009,29010,29011, +29012,29013,29014,29015,29016,29017,29018,29019,29020,29021,29022,29023, +29024,29025,29026,29027,29028,29029,29030,29031,29032,29033,29034,29035, +29036,29037,29038,29039,29040,29041,29042,29043,29044,29045,29046,29047, +29048,29049,29050,29051,29052,29053,29054,29055,29056,29057,29058,29059, +29060,29061,29062,29063,29064,29065,29066,29067,29068,29069,29070,29071, +29072,29073,29074,29075,29076,29077,29078,29079,29080,29081,29082,29083, +29084,29085,29086,29087,29088,29089,29090,29091,29092,29093,29094,29095, +29096,29097,29098,29099,29100,29101,29102,29103,29104,29105,29106,29107, +29108,29109,29110,29111,29112,29113,29114,29115,29116,29117,29118,29119, +29120,29121,29122,29123,29124,29125,29126,29127,29128,29129,29130,29131, +29132,29133,29134,29135,29136,29137,29138,29139,29140,29141,29142,29143, +29144,29145,29146,29147,29148,29149,29150,29151,29152,29153,29154,29155, +29156,29157,29158,29159,29160,29161,29162,29163,29164,29165,29166,29167, +29168,29169,29170,29171,29172,29173,29174,29175,29176,29177,29178,29179, +29180,29181,29182,29183,29184,29185,29186,29187,29188,29189,29190,29191, +29192,29193,29194,29195,29196,29197,29198,29199,29200,29201,29202,29203, +29204,29205,29206,29207,29208,29209,29210,29211,29212,29213,29214,29215, +29216,29217,29218,29219,29220,29221,29222,29223,29224,29225,29226,29227, +29228,29229,29230,29231,29232,29233,29234,29235,29236,29237,29238,29239, +29240,29241,29242,29243,29244,29245,29246,29247,29248,29249,29250,29251, +29252,29253,29254,29255,29256,29257,29258,29259,29260,29261,29262,29263, +29264,29265,29266,29267,29268,29269,29270,29271,29272,29273,29274,29275, +29276,29277,29278,29279,29280,29281,29282,29283,29284,29285,29286,29287, +29288,29289,29290,29291,29292,29293,29294,29295,29296,29297,29298,29299, +29300,29301,29302,29303,29304,29305,29306,29307,29308,29309,29310,29311, +29312,29313,29314,29315,29316,29317,29318,29319,29320,29321,29322,29323, +29324,29325,29326,29327,29328,29329,29330,29331,29332,29333,29334,29335, +29336,29337,29338,29339,29340,29341,29342,29343,29344,29345,29346,29347, +29348,29349,29350,29351,29352,29353,29354,29355,29356,29357,29358,29359, +29360,29361,29362,29363,29364,29365,29366,29367,29368,29369,29370,29371, +29372,29373,29374,29375,29376,29377,29378,29379,29380,29381,29382,29383, +29384,29385,29386,29387,29388,29389,29390,29391,29392,29393,29394,29395, +29396,29397,29398,29399,29400,29401,29402,29403,29404,29405,29406,29407, +29408,29409,29410,29411,29412,29413,29414,29415,29416,29417,29418,29419, +29420,29421,29422,29423,29424,29425,29426,29427,29428,29429,29430,29431, +29432,29433,29434,29435,29436,29437,29438,29439,29440,29441,29442,29443, +29444,29445,29446,29447,29448,29449,29450,29451,29452,29453,29454,29455, +29456,29457,29458,29459,29460,29461,29462,29463,29464,29465,29466,29467, +29468,29469,29470,29471,29472,29473,29474,29475,29476,29477,29478,29479, +29480,29481,29482,29483,29484,29485,29486,29487,29488,29489,29490,29491, +29492,29493,29494,29495,29496,29497,29498,29499,29500,29501,29502,29503, +29504,29505,29506,29507,29508,29509,29510,29511,29512,29513,29514,29515, +29516,29517,29518,29519,29520,29521,29522,29523,29524,29525,29526,29527, +29528,29529,29530,29531,29532,29533,29534,29535,29536,29537,29538,29539, +29540,29541,29542,29543,29544,29545,29546,29547,29548,29549,29550,29551, +29552,29553,29554,29555,29556,29557,29558,29559,29560,29561,29562,29563, +29564,29565,29566,29567,29568,29569,29570,29571,29572,29573,29574,29575, +29576,29577,29578,29579,29580,29581,29582,29583,29584,29585,29586,29587, +29588,29589,29590,29591,29592,29593,29594,29595,29596,29597,29598,29599, +29600,29601,29602,29603,29604,29605,29606,29607,29608,29609,29610,29611, +29612,29613,29614,29615,29616,29617,29618,29619,29620,29621,29622,29623, +29624,29625,29626,29627,29628,29629,29630,29631,29632,29633,29634,29635, +29636,29637,29638,29639,29640,29641,29642,29643,29644,29645,29646,29647, +29648,29649,29650,29651,29652,29653,29654,29655,29656,29657,29658,29659, +29660,29661,29662,29663,29664,29665,29666,29667,29668,29669,29670,29671, +29672,29673,29674,29675,29676,29677,29678,29679,29680,29681,29682,29683, +29684,29685,29686,29687,29688,29689,29690,29691,29692,29693,29694,29695, +29696,29697,29698,29699,29700,29701,29702,29703,29704,29705,29706,29707, +29708,29709,29710,29711,29712,29713,29714,29715,29716,29717,29718,29719, +29720,29721,29722,29723,29724,29725,29726,29727,29728,29729,29730,29731, +29732,29733,29734,29735,29736,29737,29738,29739,29740,29741,29742,29743, +29744,29745,29746,29747,29748,29749,29750,29751,29752,29753,29754,29755, +29756,29757,29758,29759,29760,29761,29762,29763,29764,29765,29766,29767, +29768,29769,29770,29771,29772,29773,29774,29775,29776,29777,29778,29779, +29780,29781,29782,29783,29784,29785,29786,29787,29788,29789,29790,29791, +29792,29793,29794,29795,29796,29797,29798,29799,29800,29801,29802,29803, +29804,29805,29806,29807,29808,29809,29810,29811,29812,29813,29814,29815, +29816,29817,29818,29819,29820,29821,29822,29823,29824,29825,29826,29827, +29828,29829,29830,29831,29832,29833,29834,29835,29836,29837,29838,29839, +29840,29841,29842,29843,29844,29845,29846,29847,29848,29849,29850,29851, +29852,29853,29854,29855,29856,29857,29858,29859,29860,29861,29862,29863, +29864,29865,29866,29867,29868,29869,29870,29871,29872,29873,29874,29875, +29876,29877,29878,29879,29880,29881,29882,29883,29884,29885,29886,29887, +29888,29889,29890,29891,29892,29893,29894,29895,29896,29897,29898,29899, +29900,29901,29902,29903,29904,29905,29906,29907,29908,29909,29910,29911, +29912,29913,29914,29915,29916,29917,29918,29919,29920,29921,29922,29923, +29924,29925,29926,29927,29928,29929,29930,29931,29932,29933,29934,29935, +29936,29937,29938,29939,29940,29941,29942,29943,29944,29945,29946,29947, +29948,29949,29950,29951,29952,29953,29954,29955,29956,29957,29958,29959, +29960,29961,29962,29963,29964,29965,29966,29967,29968,29969,29970,29971, +29972,29973,29974,29975,29976,29977,29978,29979,29980,29981,29982,29983, +29984,29985,29986,29987,29988,29989,29990,29991,29992,29993,29994,29995, +29996,29997,29998,29999,30000,30001,30002,30003,30004,30005,30006,30007, +30008,30009,30010,30011,30012,30013,30014,30015,30016,30017,30018,30019, +30020,30021,30022,30023,30024,30025,30026,30027,30028,30029,30030,30031, +30032,30033,30034,30035,30036,30037,30038,30039,30040,30041,30042,30043, +30044,30045,30046,30047,30048,30049,30050,30051,30052,30053,30054,30055, +30056,30057,30058,30059,30060,30061,30062,30063,30064,30065,30066,30067, +30068,30069,30070,30071,30072,30073,30074,30075,30076,30077,30078,30079, +30080,30081,30082,30083,30084,30085,30086,30087,30088,30089,30090,30091, +30092,30093,30094,30095,30096,30097,30098,30099,30100,30101,30102,30103, +30104,30105,30106,30107,30108,30109,30110,30111,30112,30113,30114,30115, +30116,30117,30118,30119,30120,30121,30122,30123,30124,30125,30126,30127, +30128,30129,30130,30131,30132,30133,30134,30135,30136,30137,30138,30139, +30140,30141,30142,30143,30144,30145,30146,30147,30148,30149,30150,30151, +30152,30153,30154,30155,30156,30157,30158,30159,30160,30161,30162,30163, +30164,30165,30166,30167,30168,30169,30170,30171,30172,30173,30174,30175, +30176,30177,30178,30179,30180,30181,30182,30183,30184,30185,30186,30187, +30188,30189,30190,30191,30192,30193,30194,30195,30196,30197,30198,30199, +30200,30201,30202,30203,30204,30205,30206,30207,30208,30209,30210,30211, +30212,30213,30214,30215,30216,30217,30218,30219,30220,30221,30222,30223, +30224,30225,30226,30227,30228,30229,30230,30231,30232,30233,30234,30235, +30236,30237,30238,30239,30240,30241,30242,30243,30244,30245,30246,30247, +30248,30249,30250,30251,30252,30253,30254,30255,30256,30257,30258,30259, +30260,30261,30262,30263,30264,30265,30266,30267,30268,30269,30270,30271, +30272,30273,30274,30275,30276,30277,30278,30279,30280,30281,30282,30283, +30284,30285,30286,30287,30288,30289,30290,30291,30292,30293,30294,30295, +30296,30297,30298,30299,30300,30301,30302,30303,30304,30305,30306,30307, +30308,30309,30310,30311,30312,30313,30314,30315,30316,30317,30318,30319, +30320,30321,30322,30323,30324,30325,30326,30327,30328,30329,30330,30331, +30332,30333,30334,30335,30336,30337,30338,30339,30340,30341,30342,30343, +30344,30345,30346,30347,30348,30349,30350,30351,30352,30353,30354,30355, +30356,30357,30358,30359,30360,30361,30362,30363,30364,30365,30366,30367, +30368,30369,30370,30371,30372,30373,30374,30375,30376,30377,30378,30379, +30380,30381,30382,30383,30384,30385,30386,30387,30388,30389,30390,30391, +30392,30393,30394,30395,30396,30397,30398,30399,30400,30401,30402,30403, +30404,30405,30406,30407,30408,30409,30410,30411,30412,30413,30414,30415, +30416,30417,30418,30419,30420,30421,30422,30423,30424,30425,30426,30427, +30428,30429,30430,30431,30432,30433,30434,30435,30436,30437,30438,30439, +30440,30441,30442,30443,30444,30445,30446,30447,30448,30449,30450,30451, +30452,30453,30454,30455,30456,30457,30458,30459,30460,30461,30462,30463, +30464,30465,30466,30467,30468,30469,30470,30471,30472,30473,30474,30475, +30476,30477,30478,30479,30480,30481,30482,30483,30484,30485,30486,30487, +30488,30489,30490,30491,30492,30493,30494,30495,30496,30497,30498,30499, +30500,30501,30502,30503,30504,30505,30506,30507,30508,30509,30510,30511, +30512,30513,30514,30515,30516,30517,30518,30519,30520,30521,30522,30523, +30524,30525,30526,30527,30528,30529,30530,30531,30532,30533,30534,30535, +30536,30537,30538,30539,30540,30541,30542,30543,30544,30545,30546,30547, +30548,30549,30550,30551,30552,30553,30554,30555,30556,30557,30558,30559, +30560,30561,30562,30563,30564,30565,30566,30567,30568,30569,30570,30571, +30572,30573,30574,30575,30576,30577,30578,30579,30580,30581,30582,30583, +30584,30585,30586,30587,30588,30589,30590,30591,30592,30593,30594,30595, +30596,30597,30598,30599,30600,30601,30602,30603,30604,30605,30606,30607, +30608,30609,30610,30611,30612,30613,30614,30615,30616,30617,30618,30619, +30620,30621,30622,30623,30624,30625,30626,30627,30628,30629,30630,30631, +30632,30633,30634,30635,30636,30637,30638,30639,30640,30641,30642,30643, +30644,30645,30646,30647,30648,30649,30650,30651,30652,30653,30654,30655, +30656,30657,30658,30659,30660,30661,30662,30663,30664,30665,30666,30667, +30668,30669,30670,30671,30672,30673,30674,30675,30676,30677,30678,30679, +30680,30681,30682,30683,30684,30685,30686,30687,30688,30689,30690,30691, +30692,30693,30694,30695,30696,30697,30698,30699,30700,30701,30702,30703, +30704,30705,30706,30707,30708,30709,30710,30711,30712,30713,30714,30715, +30716,30717,30718,30719,30720,30721,30722,30723,30724,30725,30726,30727, +30728,30729,30730,30731,30732,30733,30734,30735,30736,30737,30738,30739, +30740,30741,30742,30743,30744,30745,30746,30747,30748,30749,30750,30751, +30752,30753,30754,30755,30756,30757,30758,30759,30760,30761,30762,30763, +30764,30765,30766,30767,30768,30769,30770,30771,30772,30773,30774,30775, +30776,30777,30778,30779,30780,30781,30782,30783,30784,30785,30786,30787, +30788,30789,30790,30791,30792,30793,30794,30795,30796,30797,30798,30799, +30800,30801,30802,30803,30804,30805,30806,30807,30808,30809,30810,30811, +30812,30813,30814,30815,30816,30817,30818,30819,30820,30821,30822,30823, +30824,30825,30826,30827,30828,30829,30830,30831,30832,30833,30834,30835, +30836,30837,30838,30839,30840,30841,30842,30843,30844,30845,30846,30847, +30848,30849,30850,30851,30852,30853,30854,30855,30856,30857,30858,30859, +30860,30861,30862,30863,30864,30865,30866,30867,30868,30869,30870,30871, +30872,30873,30874,30875,30876,30877,30878,30879,30880,30881,30882,30883, +30884,30885,30886,30887,30888,30889,30890,30891,30892,30893,30894,30895, +30896,30897,30898,30899,30900,30901,30902,30903,30904,30905,30906,30907, +30908,30909,30910,30911,30912,30913,30914,30915,30916,30917,30918,30919, +30920,30921,30922,30923,30924,30925,30926,30927,30928,30929,30930,30931, +30932,30933,30934,30935,30936,30937,30938,30939,30940,30941,30942,30943, +30944,30945,30946,30947,30948,30949,30950,30951,30952,30953,30954,30955, +30956,30957,30958,30959,30960,30961,30962,30963,30964,30965,30966,30967, +30968,30969,30970,30971,30972,30973,30974,30975,30976,30977,30978,30979, +30980,30981,30982,30983,30984,30985,30986,30987,30988,30989,30990,30991, +30992,30993,30994,30995,30996,30997,30998,30999,31000,31001,31002,31003, +31004,31005,31006,31007,31008,31009,31010,31011,31012,31013,31014,31015, +31016,31017,31018,31019,31020,31021,31022,31023,31024,31025,31026,31027, +31028,31029,31030,31031,31032,31033,31034,31035,31036,31037,31038,31039, +31040,31041,31042,31043,31044,31045,31046,31047,31048,31049,31050,31051, +31052,31053,31054,31055,31056,31057,31058,31059,31060,31061,31062,31063, +31064,31065,31066,31067,31068,31069,31070,31071,31072,31073,31074,31075, +31076,31077,31078,31079,31080,31081,31082,31083,31084,31085,31086,31087, +31088,31089,31090,31091,31092,31093,31094,31095,31096,31097,31098,31099, +31100,31101,31102,31103,31104,31105,31106,31107,31108,31109,31110,31111, +31112,31113,31114,31115,31116,31117,31118,31119,31120,31121,31122,31123, +31124,31125,31126,31127,31128,31129,31130,31131,31132,31133,31134,31135, +31136,31137,31138,31139,31140,31141,31142,31143,31144,31145,31146,31147, +31148,31149,31150,31151,31152,31153,31154,31155,31156,31157,31158,31159, +31160,31161,31162,31163,31164,31165,31166,31167,31168,31169,31170,31171, +31172,31173,31174,31175,31176,31177,31178,31179,31180,31181,31182,31183, +31184,31185,31186,31187,31188,31189,31190,31191,31192,31193,31194,31195, +31196,31197,31198,31199,31200,31201,31202,31203,31204,31205,31206,31207, +31208,31209,31210,31211,31212,31213,31214,31215,31216,31217,31218,31219, +31220,31221,31222,31223,31224,31225,31226,31227,31228,31229,31230,31231, +31232,31233,31234,31235,31236,31237,31238,31239,31240,31241,31242,31243, +31244,31245,31246,31247,31248,31249,31250,31251,31252,31253,31254,31255, +31256,31257,31258,31259,31260,31261,31262,31263,31264,31265,31266,31267, +31268,31269,31270,31271,31272,31273,31274,31275,31276,31277,31278,31279, +31280,31281,31282,31283,31284,31285,31286,31287,31288,31289,31290,31291, +31292,31293,31294,31295,31296,31297,31298,31299,31300,31301,31302,31303, +31304,31305,31306,31307,31308,31309,31310,31311,31312,31313,31314,31315, +31316,31317,31318,31319,31320,31321,31322,31323,31324,31325,31326,31327, +31328,31329,31330,31331,31332,31333,31334,31335,31336,31337,31338,31339, +31340,31341,31342,31343,31344,31345,31346,31347,31348,31349,31350,31351, +31352,31353,31354,31355,31356,31357,31358,31359,31360,31361,31362,31363, +31364,31365,31366,31367,31368,31369,31370,31371,31372,31373,31374,31375, +31376,31377,31378,31379,31380,31381,31382,31383,31384,31385,31386,31387, +31388,31389,31390,31391,31392,31393,31394,31395,31396,31397,31398,31399, +31400,31401,31402,31403,31404,31405,31406,31407,31408,31409,31410,31411, +31412,31413,31414,31415,31416,31417,31418,31419,31420,31421,31422,31423, +31424,31425,31426,31427,31428,31429,31430,31431,31432,31433,31434,31435, +31436,31437,31438,31439,31440,31441,31442,31443,31444,31445,31446,31447, +31448,31449,31450,31451,31452,31453,31454,31455,31456,31457,31458,31459, +31460,31461,31462,31463,31464,31465,31466,31467,31468,31469,31470,31471, +31472,31473,31474,31475,31476,31477,31478,31479,31480,31481,31482,31483, +31484,31485,31486,31487,31488,31489,31490,31491,31492,31493,31494,31495, +31496,31497,31498,31499,31500,31501,31502,31503,31504,31505,31506,31507, +31508,31509,31510,31511,31512,31513,31514,31515,31516,31517,31518,31519, +31520,31521,31522,31523,31524,31525,31526,31527,31528,31529,31530,31531, +31532,31533,31534,31535,31536,31537,31538,31539,31540,31541,31542,31543, +31544,31545,31546,31547,31548,31549,31550,31551,31552,31553,31554,31555, +31556,31557,31558,31559,31560,31561,31562,31563,31564,31565,31566,31567, +31568,31569,31570,31571,31572,31573,31574,31575,31576,31577,31578,31579, +31580,31581,31582,31583,31584,31585,31586,31587,31588,31589,31590,31591, +31592,31593,31594,31595,31596,31597,31598,31599,31600,31601,31602,31603, +31604,31605,31606,31607,31608,31609,31610,31611,31612,31613,31614,31615, +31616,31617,31618,31619,31620,31621,31622,31623,31624,31625,31626,31627, +31628,31629,31630,31631,31632,31633,31634,31635,31636,31637,31638,31639, +31640,31641,31642,31643,31644,31645,31646,31647,31648,31649,31650,31651, +31652,31653,31654,31655,31656,31657,31658,31659,31660,31661,31662,31663, +31664,31665,31666,31667,31668,31669,31670,31671,31672,31673,31674,31675, +31676,31677,31678,31679,31680,31681,31682,31683,31684,31685,31686,31687, +31688,31689,31690,31691,31692,31693,31694,31695,31696,31697,31698,31699, +31700,31701,31702,31703,31704,31705,31706,31707,31708,31709,31710,31711, +31712,31713,31714,31715,31716,31717,31718,31719,31720,31721,31722,31723, +31724,31725,31726,31727,31728,31729,31730,31731,31732,31733,31734,31735, +31736,31737,31738,31739,31740,31741,31742,31743,31744,31745,31746,31747, +31748,31749,31750,31751,31752,31753,31754,31755,31756,31757,31758,31759, +31760,31761,31762,31763,31764,31765,31766,31767,31768,31769,31770,31771, +31772,31773,31774,31775,31776,31777,31778,31779,31780,31781,31782,31783, +31784,31785,31786,31787,31788,31789,31790,31791,31792,31793,31794,31795, +31796,31797,31798,31799,31800,31801,31802,31803,31804,31805,31806,31807, +31808,31809,31810,31811,31812,31813,31814,31815,31816,31817,31818,31819, +31820,31821,31822,31823,31824,31825,31826,31827,31828,31829,31830,31831, +31832,31833,31834,31835,31836,31837,31838,31839,31840,31841,31842,31843, +31844,31845,31846,31847,31848,31849,31850,31851,31852,31853,31854,31855, +31856,31857,31858,31859,31860,31861,31862,31863,31864,31865,31866,31867, +31868,31869,31870,31871,31872,31873,31874,31875,31876,31877,31878,31879, +31880,31881,31882,31883,31884,31885,31886,31887,31888,31889,31890,31891, +31892,31893,31894,31895,31896,31897,31898,31899,31900,31901,31902,31903, +31904,31905,31906,31907,31908,31909,31910,31911,31912,31913,31914,31915, +31916,31917,31918,31919,31920,31921,31922,31923,31924,31925,31926,31927, +31928,31929,31930,31931,31932,31933,31934,31935,31936,31937,31938,31939, +31940,31941,31942,31943,31944,31945,31946,31947,31948,31949,31950,31951, +31952,31953,31954,31955,31956,31957,31958,31959,31960,31961,31962,31963, +31964,31965,31966,31967,31968,31969,31970,31971,31972,31973,31974,31975, +31976,31977,31978,31979,31980,31981,31982,31983,31984,31985,31986,31987, +31988,31989,31990,31991,31992,31993,31994,31995,31996,31997,31998,31999, +32000,32001,32002,32003,32004,32005,32006,32007,32008,32009,32010,32011, +32012,32013,32014,32015,32016,32017,32018,32019,32020,32021,32022,32023, +32024,32025,32026,32027,32028,32029,32030,32031,32032,32033,32034,32035, +32036,32037,32038,32039,32040,32041,32042,32043,32044,32045,32046,32047, +32048,32049,32050,32051,32052,32053,32054,32055,32056,32057,32058,32059, +32060,32061,32062,32063,32064,32065,32066,32067,32068,32069,32070,32071, +32072,32073,32074,32075,32076,32077,32078,32079,32080,32081,32082,32083, +32084,32085,32086,32087,32088,32089,32090,32091,32092,32093,32094,32095, +32096,32097,32098,32099,32100,32101,32102,32103,32104,32105,32106,32107, +32108,32109,32110,32111,32112,32113,32114,32115,32116,32117,32118,32119, +32120,32121,32122,32123,32124,32125,32126,32127,32128,32129,32130,32131, +32132,32133,32134,32135,32136,32137,32138,32139,32140,32141,32142,32143, +32144,32145,32146,32147,32148,32149,32150,32151,32152,32153,32154,32155, +32156,32157,32158,32159,32160,32161,32162,32163,32164,32165,32166,32167, +32168,32169,32170,32171,32172,32173,32174,32175,32176,32177,32178,32179, +32180,32181,32182,32183,32184,32185,32186,32187,32188,32189,32190,32191, +32192,32193,32194,32195,32196,32197,32198,32199,32200,32201,32202,32203, +32204,32205,32206,32207,32208,32209,32210,32211,32212,32213,32214,32215, +32216,32217,32218,32219,32220,32221,32222,32223,32224,32225,32226,32227, +32228,32229,32230,32231,32232,32233,32234,32235,32236,32237,32238,32239, +32240,32241,32242,32243,32244,32245,32246,32247,32248,32249,32250,32251, +32252,32253,32254,32255,32256,32257,32258,32259,32260,32261,32262,32263, +32264,32265,32266,32267,32268,32269,32270,32271,32272,32273,32274,32275, +32276,32277,32278,32279,32280,32281,32282,32283,32284,32285,32286,32287, +32288,32289,32290,32291,32292,32293,32294,32295,32296,32297,32298,32299, +32300,32301,32302,32303,32304,32305,32306,32307,32308,32309,32310,32311, +32312,32313,32314,32315,32316,32317,32318,32319,32320,32321,32322,32323, +32324,32325,32326,32327,32328,32329,32330,32331,32332,32333,32334,32335, +32336,32337,32338,32339,32340,32341,32342,32343,32344,32345,32346,32347, +32348,32349,32350,32351,32352,32353,32354,32355,32356,32357,32358,32359, +32360,32361,32362,32363,32364,32365,32366,32367,32368,32369,32370,32371, +32372,32373,32374,32375,32376,32377,32378,32379,32380,32381,32382,32383, +32384,32385,32386,32387,32388,32389,32390,32391,32392,32393,32394,32395, +32396,32397,32398,32399,32400,32401,32402,32403,32404,32405,32406,32407, +32408,32409,32410,32411,32412,32413,32414,32415,32416,32417,32418,32419, +32420,32421,32422,32423,32424,32425,32426,32427,32428,32429,32430,32431, +32432,32433,32434,32435,32436,32437,32438,32439,32440,32441,32442,32443, +32444,32445,32446,32447,32448,32449,32450,32451,32452,32453,32454,32455, +32456,32457,32458,32459,32460,32461,32462,32463,32464,32465,32466,32467, +32468,32469,32470,32471,32472,32473,32474,32475,32476,32477,32478,32479, +32480,32481,32482,32483,32484,32485,32486,32487,32488,32489,32490,32491, +32492,32493,32494,32495,32496,32497,32498,32499,32500,32501,32502,32503, +32504,32505,32506,32507,32508,32509,32510,32511,32512,32513,32514,32515, +32516,32517,32518,32519,32520,32521,32522,32523,32524,32525,32526,32527, +32528,32529,32530,32531,32532,32533,32534,32535,32536,32537,32538,32539, +32540,32541,32542,32543,32544,32545,32546,32547,32548,32549,32550,32551, +32552,32553,32554,32555,32556,32557,32558,32559,32560,32561,32562,32563, +32564,32565,32566,32567,32568,32569,32570,32571,32572,32573,32574,32575, +32576,32577,32578,32579,32580,32581,32582,32583,32584,32585,32586,32587, +32588,32589,32590,32591,32592,32593,32594,32595,32596,32597,32598,32599, +32600,32601,32602,32603,32604,32605,32606,32607,32608,32609,32610,32611, +32612,32613,32614,32615,32616,32617,32618,32619,32620,32621,32622,32623, +32624,32625,32626,32627,32628,32629,32630,32631,32632,32633,32634,32635, +32636,32637,32638,32639,32640,32641,32642,32643,32644,32645,32646,32647, +32648,32649,32650,32651,32652,32653,32654,32655,32656,32657,32658,32659, +32660,32661,32662,32663,32664,32665,32666,32667,32668,32669,32670,32671, +32672,32673,32674,32675,32676,32677,32678,32679,32680,32681,32682,32683, +32684,32685,32686,32687,32688,32689,32690,32691,32692,32693,32694,32695, +32696,32697,32698,32699,32700,32701,32702,32703,32704,32705,32706,32707, +32708,32709,32710,32711,32712,32713,32714,32715,32716,32717,32718,32719, +32720,32721,32722,32723,32724,32725,32726,32727,32728,32729,32730,32731, +32732,32733,32734,32735,32736,32737,32738,32739,32740,32741,32742,32743, +32744,32745,32746,32747,32748,32749,32750,32751,32752,32753,32754,32755, +32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767, +32768L,32769L,32770L,32771L,32772L,32773L,32774L,32775L,32776L,32777L, +32778L,32779L,32780L,32781L,32782L,32783L,32784L,32785L,32786L,32787L, +32788L,32789L,32790L,32791L,32792L,32793L,32794L,32795L,32796L,32797L, +32798L,32799L,32800L,32801L,32802L,32803L,32804L,32805L,32806L,32807L, +32808L,32809L,32810L,32811L,32812L,32813L,32814L,32815L,32816L,32817L, +32818L,32819L,32820L,32821L,32822L,32823L,32824L,32825L,32826L,32827L, +32828L,32829L,32830L,32831L,32832L,32833L,32834L,32835L,32836L,32837L, +32838L,32839L,32840L,32841L,32842L,32843L,32844L,32845L,32846L,32847L, +32848L,32849L,32850L,32851L,32852L,32853L,32854L,32855L,32856L,32857L, +32858L,32859L,32860L,32861L,32862L,32863L,32864L,32865L,32866L,32867L, +32868L,32869L,32870L,32871L,32872L,32873L,32874L,32875L,32876L,32877L, +32878L,32879L,32880L,32881L,32882L,32883L,32884L,32885L,32886L,32887L, +32888L,32889L,32890L,32891L,32892L,32893L,32894L,32895L,32896L,32897L, +32898L,32899L,32900L,32901L,32902L,32903L,32904L,32905L,32906L,32907L, +32908L,32909L,32910L,32911L,32912L,32913L,32914L,32915L,32916L,32917L, +32918L,32919L,32920L,32921L,32922L,32923L,32924L,32925L,32926L,32927L, +32928L,32929L,32930L,32931L,32932L,32933L,32934L,32935L,32936L,32937L, +32938L,32939L,32940L,32941L,32942L,32943L,32944L,32945L,32946L,32947L, +32948L,32949L,32950L,32951L,32952L,32953L,32954L,32955L,32956L,32957L, +32958L,32959L,32960L,32961L,32962L,32963L,32964L,32965L,32966L,32967L, +32968L,32969L,32970L,32971L,32972L,32973L,32974L,32975L,32976L,32977L, +32978L,32979L,32980L,32981L,32982L,32983L,32984L,32985L,32986L,32987L, +32988L,32989L,32990L,32991L,32992L,32993L,32994L,32995L,32996L,32997L, +32998L,32999L,33000L,33001L,33002L,33003L,33004L,33005L,33006L,33007L, +33008L,33009L,33010L,33011L,33012L,33013L,33014L,33015L,33016L,33017L, +33018L,33019L,33020L,33021L,33022L,33023L,33024L,33025L,33026L,33027L, +33028L,33029L,33030L,33031L,33032L,33033L,33034L,33035L,33036L,33037L, +33038L,33039L,33040L,33041L,33042L,33043L,33044L,33045L,33046L,33047L, +33048L,33049L,33050L,33051L,33052L,33053L,33054L,33055L,33056L,33057L, +33058L,33059L,33060L,33061L,33062L,33063L,33064L,33065L,33066L,33067L, +33068L,33069L,33070L,33071L,33072L,33073L,33074L,33075L,33076L,33077L, +33078L,33079L,33080L,33081L,33082L,33083L,33084L,33085L,33086L,33087L, +33088L,33089L,33090L,33091L,33092L,33093L,33094L,33095L,33096L,33097L, +33098L,33099L,33100L,33101L,33102L,33103L,33104L,33105L,33106L,33107L, +33108L,33109L,33110L,33111L,33112L,33113L,33114L,33115L,33116L,33117L, +33118L,33119L,33120L,33121L,33122L,33123L,33124L,33125L,33126L,33127L, +33128L,33129L,33130L,33131L,33132L,33133L,33134L,33135L,33136L,33137L, +33138L,33139L,33140L,33141L,33142L,33143L,33144L,33145L,33146L,33147L, +33148L,33149L,33150L,33151L,33152L,33153L,33154L,33155L,33156L,33157L, +33158L,33159L,33160L,33161L,33162L,33163L,33164L,33165L,33166L,33167L, +33168L,33169L,33170L,33171L,33172L,33173L,33174L,33175L,33176L,33177L, +33178L,33179L,33180L,33181L,33182L,33183L,33184L,33185L,33186L,33187L, +33188L,33189L,33190L,33191L,33192L,33193L,33194L,33195L,33196L,33197L, +33198L,33199L,33200L,33201L,33202L,33203L,33204L,33205L,33206L,33207L, +33208L,33209L,33210L,33211L,33212L,33213L,33214L,33215L,33216L,33217L, +33218L,33219L,33220L,33221L,33222L,33223L,33224L,33225L,33226L,33227L, +33228L,33229L,33230L,33231L,33232L,33233L,33234L,33235L,33236L,33237L, +33238L,33239L,33240L,33241L,33242L,33243L,33244L,33245L,33246L,33247L, +33248L,33249L,33250L,33251L,33252L,33253L,33254L,33255L,33256L,33257L, +33258L,33259L,33260L,33261L,33262L,33263L,33264L,33265L,33266L,33267L, +33268L,33269L,33270L,33271L,33272L,33273L,33274L,33275L,33276L,33277L, +33278L,33279L,33280L,33281L,33282L,33283L,33284L,33285L,33286L,33287L, +33288L,33289L,33290L,33291L,33292L,33293L,33294L,33295L,33296L,33297L, +33298L,33299L,33300L,33301L,33302L,33303L,33304L,33305L,33306L,33307L, +33308L,33309L,33310L,33311L,33312L,33313L,33314L,33315L,33316L,33317L, +33318L,33319L,33320L,33321L,33322L,33323L,33324L,33325L,33326L,33327L, +33328L,33329L,33330L,33331L,33332L,33333L,33334L,33335L,33336L,33337L, +33338L,33339L,33340L,33341L,33342L,33343L,33344L,33345L,33346L,33347L, +33348L,33349L,33350L,33351L,33352L,33353L,33354L,33355L,33356L,33357L, +33358L,33359L,33360L,33361L,33362L,33363L,33364L,33365L,33366L,33367L, +33368L,33369L,33370L,33371L,33372L,33373L,33374L,33375L,33376L,33377L, +33378L,33379L,33380L,33381L,33382L,33383L,33384L,33385L,33386L,33387L, +33388L,33389L,33390L,33391L,33392L,33393L,33394L,33395L,33396L,33397L, +33398L,33399L,33400L,33401L,33402L,33403L,33404L,33405L,33406L,33407L, +33408L,33409L,33410L,33411L,33412L,33413L,33414L,33415L,33416L,33417L, +33418L,33419L,33420L,33421L,33422L,33423L,33424L,33425L,33426L,33427L, +33428L,33429L,33430L,33431L,33432L,33433L,33434L,33435L,33436L,33437L, +33438L,33439L,33440L,33441L,33442L,33443L,33444L,33445L,33446L,33447L, +33448L,33449L,33450L,33451L,33452L,33453L,33454L,33455L,33456L,33457L, +33458L,33459L,33460L,33461L,33462L,33463L,33464L,33465L,33466L,33467L, +33468L,33469L,33470L,33471L,33472L,33473L,33474L,33475L,33476L,33477L, +33478L,33479L,33480L,33481L,33482L,33483L,33484L,33485L,33486L,33487L, +33488L,33489L,33490L,33491L,33492L,33493L,33494L,33495L,33496L,33497L, +33498L,33499L,33500L,33501L,33502L,33503L,33504L,33505L,33506L,33507L, +33508L,33509L,33510L,33511L,33512L,33513L,33514L,33515L,33516L,33517L, +33518L,33519L,33520L,33521L,33522L,33523L,33524L,33525L,33526L,33527L, +33528L,33529L,33530L,33531L,33532L,33533L,33534L,33535L,33536L,33537L, +33538L,33539L,33540L,33541L,33542L,33543L,33544L,33545L,33546L,33547L, +33548L,33549L,33550L,33551L,33552L,33553L,33554L,33555L,33556L,33557L, +33558L,33559L,33560L,33561L,33562L,33563L,33564L,33565L,33566L,33567L, +33568L,33569L,33570L,33571L,33572L,33573L,33574L,33575L,33576L,33577L, +33578L,33579L,33580L,33581L,33582L,33583L,33584L,33585L,33586L,33587L, +33588L,33589L,33590L,33591L,33592L,33593L,33594L,33595L,33596L,33597L, +33598L,33599L,33600L,33601L,33602L,33603L,33604L,33605L,33606L,33607L, +33608L,33609L,33610L,33611L,33612L,33613L,33614L,33615L,33616L,33617L, +33618L,33619L,33620L,33621L,33622L,33623L,33624L,33625L,33626L,33627L, +33628L,33629L,33630L,33631L,33632L,33633L,33634L,33635L,33636L,33637L, +33638L,33639L,33640L,33641L,33642L,33643L,33644L,33645L,33646L,33647L, +33648L,33649L,33650L,33651L,33652L,33653L,33654L,33655L,33656L,33657L, +33658L,33659L,33660L,33661L,33662L,33663L,33664L,33665L,33666L,33667L, +33668L,33669L,33670L,33671L,33672L,33673L,33674L,33675L,33676L,33677L, +33678L,33679L,33680L,33681L,33682L,33683L,33684L,33685L,33686L,33687L, +33688L,33689L,33690L,33691L,33692L,33693L,33694L,33695L,33696L,33697L, +33698L,33699L,33700L,33701L,33702L,33703L,33704L,33705L,33706L,33707L, +33708L,33709L,33710L,33711L,33712L,33713L,33714L,33715L,33716L,33717L, +33718L,33719L,33720L,33721L,33722L,33723L,33724L,33725L,33726L,33727L, +33728L,33729L,33730L,33731L,33732L,33733L,33734L,33735L,33736L,33737L, +33738L,33739L,33740L,33741L,33742L,33743L,33744L,33745L,33746L,33747L, +33748L,33749L,33750L,33751L,33752L,33753L,33754L,33755L,33756L,33757L, +33758L,33759L,33760L,33761L,33762L,33763L,33764L,33765L,33766L,33767L, +33768L,33769L,33770L,33771L,33772L,33773L,33774L,33775L,33776L,33777L, +33778L,33779L,33780L,33781L,33782L,33783L,33784L,33785L,33786L,33787L, +33788L,33789L,33790L,33791L,33792L,33793L,33794L,33795L,33796L,33797L, +33798L,33799L,33800L,33801L,33802L,33803L,33804L,33805L,33806L,33807L, +33808L,33809L,33810L,33811L,33812L,33813L,33814L,33815L,33816L,33817L, +33818L,33819L,33820L,33821L,33822L,33823L,33824L,33825L,33826L,33827L, +33828L,33829L,33830L,33831L,33832L,33833L,33834L,33835L,33836L,33837L, +33838L,33839L,33840L,33841L,33842L,33843L,33844L,33845L,33846L,33847L, +33848L,33849L,33850L,33851L,33852L,33853L,33854L,33855L,33856L,33857L, +33858L,33859L,33860L,33861L,33862L,33863L,33864L,33865L,33866L,33867L, +33868L,33869L,33870L,33871L,33872L,33873L,33874L,33875L,33876L,33877L, +33878L,33879L,33880L,33881L,33882L,33883L,33884L,33885L,33886L,33887L, +33888L,33889L,33890L,33891L,33892L,33893L,33894L,33895L,33896L,33897L, +33898L,33899L,33900L,33901L,33902L,33903L,33904L,33905L,33906L,33907L, +33908L,33909L,33910L,33911L,33912L,33913L,33914L,33915L,33916L,33917L, +33918L,33919L,33920L,33921L,33922L,33923L,33924L,33925L,33926L,33927L, +33928L,33929L,33930L,33931L,33932L,33933L,33934L,33935L,33936L,33937L, +33938L,33939L,33940L,33941L,33942L,33943L,33944L,33945L,33946L,33947L, +33948L,33949L,33950L,33951L,33952L,33953L,33954L,33955L,33956L,33957L, +33958L,33959L,33960L,33961L,33962L,33963L,33964L,33965L,33966L,33967L, +33968L,33969L,33970L,33971L,33972L,33973L,33974L,33975L,33976L,33977L, +33978L,33979L,33980L,33981L,33982L,33983L,33984L,33985L,33986L,33987L, +33988L,33989L,33990L,33991L,33992L,33993L,33994L,33995L,33996L,33997L, +33998L,33999L,34000L,34001L,34002L,34003L,34004L,34005L,34006L,34007L, +34008L,34009L,34010L,34011L,34012L,34013L,34014L,34015L,34016L,34017L, +34018L,34019L,34020L,34021L,34022L,34023L,34024L,34025L,34026L,34027L, +34028L,34029L,34030L,34031L,34032L,34033L,34034L,34035L,34036L,34037L, +34038L,34039L,34040L,34041L,34042L,34043L,34044L,34045L,34046L,34047L, +34048L,34049L,34050L,34051L,34052L,34053L,34054L,34055L,34056L,34057L, +34058L,34059L,34060L,34061L,34062L,34063L,34064L,34065L,34066L,34067L, +34068L,34069L,34070L,34071L,34072L,34073L,34074L,34075L,34076L,34077L, +34078L,34079L,34080L,34081L,34082L,34083L,34084L,34085L,34086L,34087L, +34088L,34089L,34090L,34091L,34092L,34093L,34094L,34095L,34096L,34097L, +34098L,34099L,34100L,34101L,34102L,34103L,34104L,34105L,34106L,34107L, +34108L,34109L,34110L,34111L,34112L,34113L,34114L,34115L,34116L,34117L, +34118L,34119L,34120L,34121L,34122L,34123L,34124L,34125L,34126L,34127L, +34128L,34129L,34130L,34131L,34132L,34133L,34134L,34135L,34136L,34137L, +34138L,34139L,34140L,34141L,34142L,34143L,34144L,34145L,34146L,34147L, +34148L,34149L,34150L,34151L,34152L,34153L,34154L,34155L,34156L,34157L, +34158L,34159L,34160L,34161L,34162L,34163L,34164L,34165L,34166L,34167L, +34168L,34169L,34170L,34171L,34172L,34173L,34174L,34175L,34176L,34177L, +34178L,34179L,34180L,34181L,34182L,34183L,34184L,34185L,34186L,34187L, +34188L,34189L,34190L,34191L,34192L,34193L,34194L,34195L,34196L,34197L, +34198L,34199L,34200L,34201L,34202L,34203L,34204L,34205L,34206L,34207L, +34208L,34209L,34210L,34211L,34212L,34213L,34214L,34215L,34216L,34217L, +34218L,34219L,34220L,34221L,34222L,34223L,34224L,34225L,34226L,34227L, +34228L,34229L,34230L,34231L,34232L,34233L,34234L,34235L,34236L,34237L, +34238L,34239L,34240L,34241L,34242L,34243L,34244L,34245L,34246L,34247L, +34248L,34249L,34250L,34251L,34252L,34253L,34254L,34255L,34256L,34257L, +34258L,34259L,34260L,34261L,34262L,34263L,34264L,34265L,34266L,34267L, +34268L,34269L,34270L,34271L,34272L,34273L,34274L,34275L,34276L,34277L, +34278L,34279L,34280L,34281L,34282L,34283L,34284L,34285L,34286L,34287L, +34288L,34289L,34290L,34291L,34292L,34293L,34294L,34295L,34296L,34297L, +34298L,34299L,34300L,34301L,34302L,34303L,34304L,34305L,34306L,34307L, +34308L,34309L,34310L,34311L,34312L,34313L,34314L,34315L,34316L,34317L, +34318L,34319L,34320L,34321L,34322L,34323L,34324L,34325L,34326L,34327L, +34328L,34329L,34330L,34331L,34332L,34333L,34334L,34335L,34336L,34337L, +34338L,34339L,34340L,34341L,34342L,34343L,34344L,34345L,34346L,34347L, +34348L,34349L,34350L,34351L,34352L,34353L,34354L,34355L,34356L,34357L, +34358L,34359L,34360L,34361L,34362L,34363L,34364L,34365L,34366L,34367L, +34368L,34369L,34370L,34371L,34372L,34373L,34374L,34375L,34376L,34377L, +34378L,34379L,34380L,34381L,34382L,34383L,34384L,34385L,34386L,34387L, +34388L,34389L,34390L,34391L,34392L,34393L,34394L,34395L,34396L,34397L, +34398L,34399L,34400L,34401L,34402L,34403L,34404L,34405L,34406L,34407L, +34408L,34409L,34410L,34411L,34412L,34413L,34414L,34415L,34416L,34417L, +34418L,34419L,34420L,34421L,34422L,34423L,34424L,34425L,34426L,34427L, +34428L,34429L,34430L,34431L,34432L,34433L,34434L,34435L,34436L,34437L, +34438L,34439L,34440L,34441L,34442L,34443L,34444L,34445L,34446L,34447L, +34448L,34449L,34450L,34451L,34452L,34453L,34454L,34455L,34456L,34457L, +34458L,34459L,34460L,34461L,34462L,34463L,34464L,34465L,34466L,34467L, +34468L,34469L,34470L,34471L,34472L,34473L,34474L,34475L,34476L,34477L, +34478L,34479L,34480L,34481L,34482L,34483L,34484L,34485L,34486L,34487L, +34488L,34489L,34490L,34491L,34492L,34493L,34494L,34495L,34496L,34497L, +34498L,34499L,34500L,34501L,34502L,34503L,34504L,34505L,34506L,34507L, +34508L,34509L,34510L,34511L,34512L,34513L,34514L,34515L,34516L,34517L, +34518L,34519L,34520L,34521L,34522L,34523L,34524L,34525L,34526L,34527L, +34528L,34529L,34530L,34531L,34532L,34533L,34534L,34535L,34536L,34537L, +34538L,34539L,34540L,34541L,34542L,34543L,34544L,34545L,34546L,34547L, +34548L,34549L,34550L,34551L,34552L,34553L,34554L,34555L,34556L,34557L, +34558L,34559L,34560L,34561L,34562L,34563L,34564L,34565L,34566L,34567L, +34568L,34569L,34570L,34571L,34572L,34573L,34574L,34575L,34576L,34577L, +34578L,34579L,34580L,34581L,34582L,34583L,34584L,34585L,34586L,34587L, +34588L,34589L,34590L,34591L,34592L,34593L,34594L,34595L,34596L,34597L, +34598L,34599L,34600L,34601L,34602L,34603L,34604L,34605L,34606L,34607L, +34608L,34609L,34610L,34611L,34612L,34613L,34614L,34615L,34616L,34617L, +34618L,34619L,34620L,34621L,34622L,34623L,34624L,34625L,34626L,34627L, +34628L,34629L,34630L,34631L,34632L,34633L,34634L,34635L,34636L,34637L, +34638L,34639L,34640L,34641L,34642L,34643L,34644L,34645L,34646L,34647L, +34648L,34649L,34650L,34651L,34652L,34653L,34654L,34655L,34656L,34657L, +34658L,34659L,34660L,34661L,34662L,34663L,34664L,34665L,34666L,34667L, +34668L,34669L,34670L,34671L,34672L,34673L,34674L,34675L,34676L,34677L, +34678L,34679L,34680L,34681L,34682L,34683L,34684L,34685L,34686L,34687L, +34688L,34689L,34690L,34691L,34692L,34693L,34694L,34695L,34696L,34697L, +34698L,34699L,34700L,34701L,34702L,34703L,34704L,34705L,34706L,34707L, +34708L,34709L,34710L,34711L,34712L,34713L,34714L,34715L,34716L,34717L, +34718L,34719L,34720L,34721L,34722L,34723L,34724L,34725L,34726L,34727L, +34728L,34729L,34730L,34731L,34732L,34733L,34734L,34735L,34736L,34737L, +34738L,34739L,34740L,34741L,34742L,34743L,34744L,34745L,34746L,34747L, +34748L,34749L,34750L,34751L,34752L,34753L,34754L,34755L,34756L,34757L, +34758L,34759L,34760L,34761L,34762L,34763L,34764L,34765L,34766L,34767L, +34768L,34769L,34770L,34771L,34772L,34773L,34774L,34775L,34776L,34777L, +34778L,34779L,34780L,34781L,34782L,34783L,34784L,34785L,34786L,34787L, +34788L,34789L,34790L,34791L,34792L,34793L,34794L,34795L,34796L,34797L, +34798L,34799L,34800L,34801L,34802L,34803L,34804L,34805L,34806L,34807L, +34808L,34809L,34810L,34811L,34812L,34813L,34814L,34815L,34816L,34817L, +34818L,34819L,34820L,34821L,34822L,34823L,34824L,34825L,34826L,34827L, +34828L,34829L,34830L,34831L,34832L,34833L,34834L,34835L,34836L,34837L, +34838L,34839L,34840L,34841L,34842L,34843L,34844L,34845L,34846L,34847L, +34848L,34849L,34850L,34851L,34852L,34853L,34854L,34855L,34856L,34857L, +34858L,34859L,34860L,34861L,34862L,34863L,34864L,34865L,34866L,34867L, +34868L,34869L,34870L,34871L,34872L,34873L,34874L,34875L,34876L,34877L, +34878L,34879L,34880L,34881L,34882L,34883L,34884L,34885L,34886L,34887L, +34888L,34889L,34890L,34891L,34892L,34893L,34894L,34895L,34896L,34897L, +34898L,34899L,34900L,34901L,34902L,34903L,34904L,34905L,34906L,34907L, +34908L,34909L,34910L,34911L,34912L,34913L,34914L,34915L,34916L,34917L, +34918L,34919L,34920L,34921L,34922L,34923L,34924L,34925L,34926L,34927L, +34928L,34929L,34930L,34931L,34932L,34933L,34934L,34935L,34936L,34937L, +34938L,34939L,34940L,34941L,34942L,34943L,34944L,34945L,34946L,34947L, +34948L,34949L,34950L,34951L,34952L,34953L,34954L,34955L,34956L,34957L, +34958L,34959L,34960L,34961L,34962L,34963L,34964L,34965L,34966L,34967L, +34968L,34969L,34970L,34971L,34972L,34973L,34974L,34975L,34976L,34977L, +34978L,34979L,34980L,34981L,34982L,34983L,34984L,34985L,34986L,34987L, +34988L,34989L,34990L,34991L,34992L,34993L,34994L,34995L,34996L,34997L, +34998L,34999L,35000L,35001L,35002L,35003L,35004L,35005L,35006L,35007L, +35008L,35009L,35010L,35011L,35012L,35013L,35014L,35015L,35016L,35017L, +35018L,35019L,35020L,35021L,35022L,35023L,35024L,35025L,35026L,35027L, +35028L,35029L,35030L,35031L,35032L,35033L,35034L,35035L,35036L,35037L, +35038L,35039L,35040L,35041L,35042L,35043L,35044L,35045L,35046L,35047L, +35048L,35049L,35050L,35051L,35052L,35053L,35054L,35055L,35056L,35057L, +35058L,35059L,35060L,35061L,35062L,35063L,35064L,35065L,35066L,35067L, +35068L,35069L,35070L,35071L,35072L,35073L,35074L,35075L,35076L,35077L, +35078L,35079L,35080L,35081L,35082L,35083L,35084L,35085L,35086L,35087L, +35088L,35089L,35090L,35091L,35092L,35093L,35094L,35095L,35096L,35097L, +35098L,35099L,35100L,35101L,35102L,35103L,35104L,35105L,35106L,35107L, +35108L,35109L,35110L,35111L,35112L,35113L,35114L,35115L,35116L,35117L, +35118L,35119L,35120L,35121L,35122L,35123L,35124L,35125L,35126L,35127L, +35128L,35129L,35130L,35131L,35132L,35133L,35134L,35135L,35136L,35137L, +35138L,35139L,35140L,35141L,35142L,35143L,35144L,35145L,35146L,35147L, +35148L,35149L,35150L,35151L,35152L,35153L,35154L,35155L,35156L,35157L, +35158L,35159L,35160L,35161L,35162L,35163L,35164L,35165L,35166L,35167L, +35168L,35169L,35170L,35171L,35172L,35173L,35174L,35175L,35176L,35177L, +35178L,35179L,35180L,35181L,35182L,35183L,35184L,35185L,35186L,35187L, +35188L,35189L,35190L,35191L,35192L,35193L,35194L,35195L,35196L,35197L, +35198L,35199L,35200L,35201L,35202L,35203L,35204L,35205L,35206L,35207L, +35208L,35209L,35210L,35211L,35212L,35213L,35214L,35215L,35216L,35217L, +35218L,35219L,35220L,35221L,35222L,35223L,35224L,35225L,35226L,35227L, +35228L,35229L,35230L,35231L,35232L,35233L,35234L,35235L,35236L,35237L, +35238L,35239L,35240L,35241L,35242L,35243L,35244L,35245L,35246L,35247L, +35248L,35249L,35250L,35251L,35252L,35253L,35254L,35255L,35256L,35257L, +35258L,35259L,35260L,35261L,35262L,35263L,35264L,35265L,35266L,35267L, +35268L,35269L,35270L,35271L,35272L,35273L,35274L,35275L,35276L,35277L, +35278L,35279L,35280L,35281L,35282L,35283L,35284L,35285L,35286L,35287L, +35288L,35289L,35290L,35291L,35292L,35293L,35294L,35295L,35296L,35297L, +35298L,35299L,35300L,35301L,35302L,35303L,35304L,35305L,35306L,35307L, +35308L,35309L,35310L,35311L,35312L,35313L,35314L,35315L,35316L,35317L, +35318L,35319L,35320L,35321L,35322L,35323L,35324L,35325L,35326L,35327L, +35328L,35329L,35330L,35331L,35332L,35333L,35334L,35335L,35336L,35337L, +35338L,35339L,35340L,35341L,35342L,35343L,35344L,35345L,35346L,35347L, +35348L,35349L,35350L,35351L,35352L,35353L,35354L,35355L,35356L,35357L, +35358L,35359L,35360L,35361L,35362L,35363L,35364L,35365L,35366L,35367L, +35368L,35369L,35370L,35371L,35372L,35373L,35374L,35375L,35376L,35377L, +35378L,35379L,35380L,35381L,35382L,35383L,35384L,35385L,35386L,35387L, +35388L,35389L,35390L,35391L,35392L,35393L,35394L,35395L,35396L,35397L, +35398L,35399L,35400L,35401L,35402L,35403L,35404L,35405L,35406L,35407L, +35408L,35409L,35410L,35411L,35412L,35413L,35414L,35415L,35416L,35417L, +35418L,35419L,35420L,35421L,35422L,35423L,35424L,35425L,35426L,35427L, +35428L,35429L,35430L,35431L,35432L,35433L,35434L,35435L,35436L,35437L, +35438L,35439L,35440L,35441L,35442L,35443L,35444L,35445L,35446L,35447L, +35448L,35449L,35450L,35451L,35452L,35453L,35454L,35455L,35456L,35457L, +35458L,35459L,35460L,35461L,35462L,35463L,35464L,35465L,35466L,35467L, +35468L,35469L,35470L,35471L,35472L,35473L,35474L,35475L,35476L,35477L, +35478L,35479L,35480L,35481L,35482L,35483L,35484L,35485L,35486L,35487L, +35488L,35489L,35490L,35491L,35492L,35493L,35494L,35495L,35496L,35497L, +35498L,35499L,35500L,35501L,35502L,35503L,35504L,35505L,35506L,35507L, +35508L,35509L,35510L,35511L,35512L,35513L,35514L,35515L,35516L,35517L, +35518L,35519L,35520L,35521L,35522L,35523L,35524L,35525L,35526L,35527L, +35528L,35529L,35530L,35531L,35532L,35533L,35534L,35535L,35536L,35537L, +35538L,35539L,35540L,35541L,35542L,35543L,35544L,35545L,35546L,35547L, +35548L,35549L,35550L,35551L,35552L,35553L,35554L,35555L,35556L,35557L, +35558L,35559L,35560L,35561L,35562L,35563L,35564L,35565L,35566L,35567L, +35568L,35569L,35570L,35571L,35572L,35573L,35574L,35575L,35576L,35577L, +35578L,35579L,35580L,35581L,35582L,35583L,35584L,35585L,35586L,35587L, +35588L,35589L,35590L,35591L,35592L,35593L,35594L,35595L,35596L,35597L, +35598L,35599L,35600L,35601L,35602L,35603L,35604L,35605L,35606L,35607L, +35608L,35609L,35610L,35611L,35612L,35613L,35614L,35615L,35616L,35617L, +35618L,35619L,35620L,35621L,35622L,35623L,35624L,35625L,35626L,35627L, +35628L,35629L,35630L,35631L,35632L,35633L,35634L,35635L,35636L,35637L, +35638L,35639L,35640L,35641L,35642L,35643L,35644L,35645L,35646L,35647L, +35648L,35649L,35650L,35651L,35652L,35653L,35654L,35655L,35656L,35657L, +35658L,35659L,35660L,35661L,35662L,35663L,35664L,35665L,35666L,35667L, +35668L,35669L,35670L,35671L,35672L,35673L,35674L,35675L,35676L,35677L, +35678L,35679L,35680L,35681L,35682L,35683L,35684L,35685L,35686L,35687L, +35688L,35689L,35690L,35691L,35692L,35693L,35694L,35695L,35696L,35697L, +35698L,35699L,35700L,35701L,35702L,35703L,35704L,35705L,35706L,35707L, +35708L,35709L,35710L,35711L,35712L,35713L,35714L,35715L,35716L,35717L, +35718L,35719L,35720L,35721L,35722L,35723L,35724L,35725L,35726L,35727L, +35728L,35729L,35730L,35731L,35732L,35733L,35734L,35735L,35736L,35737L, +35738L,35739L,35740L,35741L,35742L,35743L,35744L,35745L,35746L,35747L, +35748L,35749L,35750L,35751L,35752L,35753L,35754L,35755L,35756L,35757L, +35758L,35759L,35760L,35761L,35762L,35763L,35764L,35765L,35766L,35767L, +35768L,35769L,35770L,35771L,35772L,35773L,35774L,35775L,35776L,35777L, +35778L,35779L,35780L,35781L,35782L,35783L,35784L,35785L,35786L,35787L, +35788L,35789L,35790L,35791L,35792L,35793L,35794L,35795L,35796L,35797L, +35798L,35799L,35800L,35801L,35802L,35803L,35804L,35805L,35806L,35807L, +35808L,35809L,35810L,35811L,35812L,35813L,35814L,35815L,35816L,35817L, +35818L,35819L,35820L,35821L,35822L,35823L,35824L,35825L,35826L,35827L, +35828L,35829L,35830L,35831L,35832L,35833L,35834L,35835L,35836L,35837L, +35838L,35839L,35840L,35841L,35842L,35843L,35844L,35845L,35846L,35847L, +35848L,35849L,35850L,35851L,35852L,35853L,35854L,35855L,35856L,35857L, +35858L,35859L,35860L,35861L,35862L,35863L,35864L,35865L,35866L,35867L, +35868L,35869L,35870L,35871L,35872L,35873L,35874L,35875L,35876L,35877L, +35878L,35879L,35880L,35881L,35882L,35883L,35884L,35885L,35886L,35887L, +35888L,35889L,35890L,35891L,35892L,35893L,35894L,35895L,35896L,35897L, +35898L,35899L,35900L,35901L,35902L,35903L,35904L,35905L,35906L,35907L, +35908L,35909L,35910L,35911L,35912L,35913L,35914L,35915L,35916L,35917L, +35918L,35919L,35920L,35921L,35922L,35923L,35924L,35925L,35926L,35927L, +35928L,35929L,35930L,35931L,35932L,35933L,35934L,35935L,35936L,35937L, +35938L,35939L,35940L,35941L,35942L,35943L,35944L,35945L,35946L,35947L, +35948L,35949L,35950L,35951L,35952L,35953L,35954L,35955L,35956L,35957L, +35958L,35959L,35960L,35961L,35962L,35963L,35964L,35965L,35966L,35967L, +35968L,35969L,35970L,35971L,35972L,35973L,35974L,35975L,35976L,35977L, +35978L,35979L,35980L,35981L,35982L,35983L,35984L,35985L,35986L,35987L, +35988L,35989L,35990L,35991L,35992L,35993L,35994L,35995L,35996L,35997L, +35998L,35999L,36000L,36001L,36002L,36003L,36004L,36005L,36006L,36007L, +36008L,36009L,36010L,36011L,36012L,36013L,36014L,36015L,36016L,36017L, +36018L,36019L,36020L,36021L,36022L,36023L,36024L,36025L,36026L,36027L, +36028L,36029L,36030L,36031L,36032L,36033L,36034L,36035L,36036L,36037L, +36038L,36039L,36040L,36041L,36042L,36043L,36044L,36045L,36046L,36047L, +36048L,36049L,36050L,36051L,36052L,36053L,36054L,36055L,36056L,36057L, +36058L,36059L,36060L,36061L,36062L,36063L,36064L,36065L,36066L,36067L, +36068L,36069L,36070L,36071L,36072L,36073L,36074L,36075L,36076L,36077L, +36078L,36079L,36080L,36081L,36082L,36083L,36084L,36085L,36086L,36087L, +36088L,36089L,36090L,36091L,36092L,36093L,36094L,36095L,36096L,36097L, +36098L,36099L,36100L,36101L,36102L,36103L,36104L,36105L,36106L,36107L, +36108L,36109L,36110L,36111L,36112L,36113L,36114L,36115L,36116L,36117L, +36118L,36119L,36120L,36121L,36122L,36123L,36124L,36125L,36126L,36127L, +36128L,36129L,36130L,36131L,36132L,36133L,36134L,36135L,36136L,36137L, +36138L,36139L,36140L,36141L,36142L,36143L,36144L,36145L,36146L,36147L, +36148L,36149L,36150L,36151L,36152L,36153L,36154L,36155L,36156L,36157L, +36158L,36159L,36160L,36161L,36162L,36163L,36164L,36165L,36166L,36167L, +36168L,36169L,36170L,36171L,36172L,36173L,36174L,36175L,36176L,36177L, +36178L,36179L,36180L,36181L,36182L,36183L,36184L,36185L,36186L,36187L, +36188L,36189L,36190L,36191L,36192L,36193L,36194L,36195L,36196L,36197L, +36198L,36199L,36200L,36201L,36202L,36203L,36204L,36205L,36206L,36207L, +36208L,36209L,36210L,36211L,36212L,36213L,36214L,36215L,36216L,36217L, +36218L,36219L,36220L,36221L,36222L,36223L,36224L,36225L,36226L,36227L, +36228L,36229L,36230L,36231L,36232L,36233L,36234L,36235L,36236L,36237L, +36238L,36239L,36240L,36241L,36242L,36243L,36244L,36245L,36246L,36247L, +36248L,36249L,36250L,36251L,36252L,36253L,36254L,36255L,36256L,36257L, +36258L,36259L,36260L,36261L,36262L,36263L,36264L,36265L,36266L,36267L, +36268L,36269L,36270L,36271L,36272L,36273L,36274L,36275L,36276L,36277L, +36278L,36279L,36280L,36281L,36282L,36283L,36284L,36285L,36286L,36287L, +36288L,36289L,36290L,36291L,36292L,36293L,36294L,36295L,36296L,36297L, +36298L,36299L,36300L,36301L,36302L,36303L,36304L,36305L,36306L,36307L, +36308L,36309L,36310L,36311L,36312L,36313L,36314L,36315L,36316L,36317L, +36318L,36319L,36320L,36321L,36322L,36323L,36324L,36325L,36326L,36327L, +36328L,36329L,36330L,36331L,36332L,36333L,36334L,36335L,36336L,36337L, +36338L,36339L,36340L,36341L,36342L,36343L,36344L,36345L,36346L,36347L, +36348L,36349L,36350L,36351L,36352L,36353L,36354L,36355L,36356L,36357L, +36358L,36359L,36360L,36361L,36362L,36363L,36364L,36365L,36366L,36367L, +36368L,36369L,36370L,36371L,36372L,36373L,36374L,36375L,36376L,36377L, +36378L,36379L,36380L,36381L,36382L,36383L,36384L,36385L,36386L,36387L, +36388L,36389L,36390L,36391L,36392L,36393L,36394L,36395L,36396L,36397L, +36398L,36399L,36400L,36401L,36402L,36403L,36404L,36405L,36406L,36407L, +36408L,36409L,36410L,36411L,36412L,36413L,36414L,36415L,36416L,36417L, +36418L,36419L,36420L,36421L,36422L,36423L,36424L,36425L,36426L,36427L, +36428L,36429L,36430L,36431L,36432L,36433L,36434L,36435L,36436L,36437L, +36438L,36439L,36440L,36441L,36442L,36443L,36444L,36445L,36446L,36447L, +36448L,36449L,36450L,36451L,36452L,36453L,36454L,36455L,36456L,36457L, +36458L,36459L,36460L,36461L,36462L,36463L,36464L,36465L,36466L,36467L, +36468L,36469L,36470L,36471L,36472L,36473L,36474L,36475L,36476L,36477L, +36478L,36479L,36480L,36481L,36482L,36483L,36484L,36485L,36486L,36487L, +36488L,36489L,36490L,36491L,36492L,36493L,36494L,36495L,36496L,36497L, +36498L,36499L,36500L,36501L,36502L,36503L,36504L,36505L,36506L,36507L, +36508L,36509L,36510L,36511L,36512L,36513L,36514L,36515L,36516L,36517L, +36518L,36519L,36520L,36521L,36522L,36523L,36524L,36525L,36526L,36527L, +36528L,36529L,36530L,36531L,36532L,36533L,36534L,36535L,36536L,36537L, +36538L,36539L,36540L,36541L,36542L,36543L,36544L,36545L,36546L,36547L, +36548L,36549L,36550L,36551L,36552L,36553L,36554L,36555L,36556L,36557L, +36558L,36559L,36560L,36561L,36562L,36563L,36564L,36565L,36566L,36567L, +36568L,36569L,36570L,36571L,36572L,36573L,36574L,36575L,36576L,36577L, +36578L,36579L,36580L,36581L,36582L,36583L,36584L,36585L,36586L,36587L, +36588L,36589L,36590L,36591L,36592L,36593L,36594L,36595L,36596L,36597L, +36598L,36599L,36600L,36601L,36602L,36603L,36604L,36605L,36606L,36607L, +36608L,36609L,36610L,36611L,36612L,36613L,36614L,36615L,36616L,36617L, +36618L,36619L,36620L,36621L,36622L,36623L,36624L,36625L,36626L,36627L, +36628L,36629L,36630L,36631L,36632L,36633L,36634L,36635L,36636L,36637L, +36638L,36639L,36640L,36641L,36642L,36643L,36644L,36645L,36646L,36647L, +36648L,36649L,36650L,36651L,36652L,36653L,36654L,36655L,36656L,36657L, +36658L,36659L,36660L,36661L,36662L,36663L,36664L,36665L,36666L,36667L, +36668L,36669L,36670L,36671L,36672L,36673L,36674L,36675L,36676L,36677L, +36678L,36679L,36680L,36681L,36682L,36683L,36684L,36685L,36686L,36687L, +36688L,36689L,36690L,36691L,36692L,36693L,36694L,36695L,36696L,36697L, +36698L,36699L,36700L,36701L,36702L,36703L,36704L,36705L,36706L,36707L, +36708L,36709L,36710L,36711L,36712L,36713L,36714L,36715L,36716L,36717L, +36718L,36719L,36720L,36721L,36722L,36723L,36724L,36725L,36726L,36727L, +36728L,36729L,36730L,36731L,36732L,36733L,36734L,36735L,36736L,36737L, +36738L,36739L,36740L,36741L,36742L,36743L,36744L,36745L,36746L,36747L, +36748L,36749L,36750L,36751L,36752L,36753L,36754L,36755L,36756L,36757L, +36758L,36759L,36760L,36761L,36762L,36763L,36764L,36765L,36766L,36767L, +36768L,36769L,36770L,36771L,36772L,36773L,36774L,36775L,36776L,36777L, +36778L,36779L,36780L,36781L,36782L,36783L,36784L,36785L,36786L,36787L, +36788L,36789L,36790L,36791L,36792L,36793L,36794L,36795L,36796L,36797L, +36798L,36799L,36800L,36801L,36802L,36803L,36804L,36805L,36806L,36807L, +36808L,36809L,36810L,36811L,36812L,36813L,36814L,36815L,36816L,36817L, +36818L,36819L,36820L,36821L,36822L,36823L,36824L,36825L,36826L,36827L, +36828L,36829L,36830L,36831L,36832L,36833L,36834L,36835L,36836L,36837L, +36838L,36839L,36840L,36841L,36842L,36843L,36844L,36845L,36846L,36847L, +36848L,36849L,36850L,36851L,36852L,36853L,36854L,36855L,36856L,36857L, +36858L,36859L,36860L,36861L,36862L,36863L,36864L,36865L,36866L,36867L, +36868L,36869L,36870L,36871L,36872L,36873L,36874L,36875L,36876L,36877L, +36878L,36879L,36880L,36881L,36882L,36883L,36884L,36885L,36886L,36887L, +36888L,36889L,36890L,36891L,36892L,36893L,36894L,36895L,36896L,36897L, +36898L,36899L,36900L,36901L,36902L,36903L,36904L,36905L,36906L,36907L, +36908L,36909L,36910L,36911L,36912L,36913L,36914L,36915L,36916L,36917L, +36918L,36919L,36920L,36921L,36922L,36923L,36924L,36925L,36926L,36927L, +36928L,36929L,36930L,36931L,36932L,36933L,36934L,36935L,36936L,36937L, +36938L,36939L,36940L,36941L,36942L,36943L,36944L,36945L,36946L,36947L, +36948L,36949L,36950L,36951L,36952L,36953L,36954L,36955L,36956L,36957L, +36958L,36959L,36960L,36961L,36962L,36963L,36964L,36965L,36966L,36967L, +36968L,36969L,36970L,36971L,36972L,36973L,36974L,36975L,36976L,36977L, +36978L,36979L,36980L,36981L,36982L,36983L,36984L,36985L,36986L,36987L, +36988L,36989L,36990L,36991L,36992L,36993L,36994L,36995L,36996L,36997L, +36998L,36999L,37000L,37001L,37002L,37003L,37004L,37005L,37006L,37007L, +37008L,37009L,37010L,37011L,37012L,37013L,37014L,37015L,37016L,37017L, +37018L,37019L,37020L,37021L,37022L,37023L,37024L,37025L,37026L,37027L, +37028L,37029L,37030L,37031L,37032L,37033L,37034L,37035L,37036L,37037L, +37038L,37039L,37040L,37041L,37042L,37043L,37044L,37045L,37046L,37047L, +37048L,37049L,37050L,37051L,37052L,37053L,37054L,37055L,37056L,37057L, +37058L,37059L,37060L,37061L,37062L,37063L,37064L,37065L,37066L,37067L, +37068L,37069L,37070L,37071L,37072L,37073L,37074L,37075L,37076L,37077L, +37078L,37079L,37080L,37081L,37082L,37083L,37084L,37085L,37086L,37087L, +37088L,37089L,37090L,37091L,37092L,37093L,37094L,37095L,37096L,37097L, +37098L,37099L,37100L,37101L,37102L,37103L,37104L,37105L,37106L,37107L, +37108L,37109L,37110L,37111L,37112L,37113L,37114L,37115L,37116L,37117L, +37118L,37119L,37120L,37121L,37122L,37123L,37124L,37125L,37126L,37127L, +37128L,37129L,37130L,37131L,37132L,37133L,37134L,37135L,37136L,37137L, +37138L,37139L,37140L,37141L,37142L,37143L,37144L,37145L,37146L,37147L, +37148L,37149L,37150L,37151L,37152L,37153L,37154L,37155L,37156L,37157L, +37158L,37159L,37160L,37161L,37162L,37163L,37164L,37165L,37166L,37167L, +37168L,37169L,37170L,37171L,37172L,37173L,37174L,37175L,37176L,37177L, +37178L,37179L,37180L,37181L,37182L,37183L,37184L,37185L,37186L,37187L, +37188L,37189L,37190L,37191L,37192L,37193L,37194L,37195L,37196L,37197L, +37198L,37199L,37200L,37201L,37202L,37203L,37204L,37205L,37206L,37207L, +37208L,37209L,37210L,37211L,37212L,37213L,37214L,37215L,37216L,37217L, +37218L,37219L,37220L,37221L,37222L,37223L,37224L,37225L,37226L,37227L, +37228L,37229L,37230L,37231L,37232L,37233L,37234L,37235L,37236L,37237L, +37238L,37239L,37240L,37241L,37242L,37243L,37244L,37245L,37246L,37247L, +37248L,37249L,37250L,37251L,37252L,37253L,37254L,37255L,37256L,37257L, +37258L,37259L,37260L,37261L,37262L,37263L,37264L,37265L,37266L,37267L, +37268L,37269L,37270L,37271L,37272L,37273L,37274L,37275L,37276L,37277L, +37278L,37279L,37280L,37281L,37282L,37283L,37284L,37285L,37286L,37287L, +37288L,37289L,37290L,37291L,37292L,37293L,37294L,37295L,37296L,37297L, +37298L,37299L,37300L,37301L,37302L,37303L,37304L,37305L,37306L,37307L, +37308L,37309L,37310L,37311L,37312L,37313L,37314L,37315L,37316L,37317L, +37318L,37319L,37320L,37321L,37322L,37323L,37324L,37325L,37326L,37327L, +37328L,37329L,37330L,37331L,37332L,37333L,37334L,37335L,37336L,37337L, +37338L,37339L,37340L,37341L,37342L,37343L,37344L,37345L,37346L,37347L, +37348L,37349L,37350L,37351L,37352L,37353L,37354L,37355L,37356L,37357L, +37358L,37359L,37360L,37361L,37362L,37363L,37364L,37365L,37366L,37367L, +37368L,37369L,37370L,37371L,37372L,37373L,37374L,37375L,37376L,37377L, +37378L,37379L,37380L,37381L,37382L,37383L,37384L,37385L,37386L,37387L, +37388L,37389L,37390L,37391L,37392L,37393L,37394L,37395L,37396L,37397L, +37398L,37399L,37400L,37401L,37402L,37403L,37404L,37405L,37406L,37407L, +37408L,37409L,37410L,37411L,37412L,37413L,37414L,37415L,37416L,37417L, +37418L,37419L,37420L,37421L,37422L,37423L,37424L,37425L,37426L,37427L, +37428L,37429L,37430L,37431L,37432L,37433L,37434L,37435L,37436L,37437L, +37438L,37439L,37440L,37441L,37442L,37443L,37444L,37445L,37446L,37447L, +37448L,37449L,37450L,37451L,37452L,37453L,37454L,37455L,37456L,37457L, +37458L,37459L,37460L,37461L,37462L,37463L,37464L,37465L,37466L,37467L, +37468L,37469L,37470L,37471L,37472L,37473L,37474L,37475L,37476L,37477L, +37478L,37479L,37480L,37481L,37482L,37483L,37484L,37485L,37486L,37487L, +37488L,37489L,37490L,37491L,37492L,37493L,37494L,37495L,37496L,37497L, +37498L,37499L,37500L,37501L,37502L,37503L,37504L,37505L,37506L,37507L, +37508L,37509L,37510L,37511L,37512L,37513L,37514L,37515L,37516L,37517L, +37518L,37519L,37520L,37521L,37522L,37523L,37524L,37525L,37526L,37527L, +37528L,37529L,37530L,37531L,37532L,37533L,37534L,37535L,37536L,37537L, +37538L,37539L,37540L,37541L,37542L,37543L,37544L,37545L,37546L,37547L, +37548L,37549L,37550L,37551L,37552L,37553L,37554L,37555L,37556L,37557L, +37558L,37559L,37560L,37561L,37562L,37563L,37564L,37565L,37566L,37567L, +37568L,37569L,37570L,37571L,37572L,37573L,37574L,37575L,37576L,37577L, +37578L,37579L,37580L,37581L,37582L,37583L,37584L,37585L,37586L,37587L, +37588L,37589L,37590L,37591L,37592L,37593L,37594L,37595L,37596L,37597L, +37598L,37599L,37600L,37601L,37602L,37603L,37604L,37605L,37606L,37607L, +37608L,37609L,37610L,37611L,37612L,37613L,37614L,37615L,37616L,37617L, +37618L,37619L,37620L,37621L,37622L,37623L,37624L,37625L,37626L,37627L, +37628L,37629L,37630L,37631L,37632L,37633L,37634L,37635L,37636L,37637L, +37638L,37639L,37640L,37641L,37642L,37643L,37644L,37645L,37646L,37647L, +37648L,37649L,37650L,37651L,37652L,37653L,37654L,37655L,37656L,37657L, +37658L,37659L,37660L,37661L,37662L,37663L,37664L,37665L,37666L,37667L, +37668L,37669L,37670L,37671L,37672L,37673L,37674L,37675L,37676L,37677L, +37678L,37679L,37680L,37681L,37682L,37683L,37684L,37685L,37686L,37687L, +37688L,37689L,37690L,37691L,37692L,37693L,37694L,37695L,37696L,37697L, +37698L,37699L,37700L,37701L,37702L,37703L,37704L,37705L,37706L,37707L, +37708L,37709L,37710L,37711L,37712L,37713L,37714L,37715L,37716L,37717L, +37718L,37719L,37720L,37721L,37722L,37723L,37724L,37725L,37726L,37727L, +37728L,37729L,37730L,37731L,37732L,37733L,37734L,37735L,37736L,37737L, +37738L,37739L,37740L,37741L,37742L,37743L,37744L,37745L,37746L,37747L, +37748L,37749L,37750L,37751L,37752L,37753L,37754L,37755L,37756L,37757L, +37758L,37759L,37760L,37761L,37762L,37763L,37764L,37765L,37766L,37767L, +37768L,37769L,37770L,37771L,37772L,37773L,37774L,37775L,37776L,37777L, +37778L,37779L,37780L,37781L,37782L,37783L,37784L,37785L,37786L,37787L, +37788L,37789L,37790L,37791L,37792L,37793L,37794L,37795L,37796L,37797L, +37798L,37799L,37800L,37801L,37802L,37803L,37804L,37805L,37806L,37807L, +37808L,37809L,37810L,37811L,37812L,37813L,37814L,37815L,37816L,37817L, +37818L,37819L,37820L,37821L,37822L,37823L,37824L,37825L,37826L,37827L, +37828L,37829L,37830L,37831L,37832L,37833L,37834L,37835L,37836L,37837L, +37838L,37839L,37840L,37841L,37842L,37843L,37844L,37845L,37846L,37847L, +37848L,37849L,37850L,37851L,37852L,37853L,37854L,37855L,37856L,37857L, +37858L,37859L,37860L,37861L,37862L,37863L,37864L,37865L,37866L,37867L, +37868L,37869L,37870L,37871L,37872L,37873L,37874L,37875L,37876L,37877L, +37878L,37879L,37880L,37881L,37882L,37883L,37884L,37885L,37886L,37887L, +37888L,37889L,37890L,37891L,37892L,37893L,37894L,37895L,37896L,37897L, +37898L,37899L,37900L,37901L,37902L,37903L,37904L,37905L,37906L,37907L, +37908L,37909L,37910L,37911L,37912L,37913L,37914L,37915L,37916L,37917L, +37918L,37919L,37920L,37921L,37922L,37923L,37924L,37925L,37926L,37927L, +37928L,37929L,37930L,37931L,37932L,37933L,37934L,37935L,37936L,37937L, +37938L,37939L,37940L,37941L,37942L,37943L,37944L,37945L,37946L,37947L, +37948L,37949L,37950L,37951L,37952L,37953L,37954L,37955L,37956L,37957L, +37958L,37959L,37960L,37961L,37962L,37963L,37964L,37965L,37966L,37967L, +37968L,37969L,37970L,37971L,37972L,37973L,37974L,37975L,37976L,37977L, +37978L,37979L,37980L,37981L,37982L,37983L,37984L,37985L,37986L,37987L, +37988L,37989L,37990L,37991L,37992L,37993L,37994L,37995L,37996L,37997L, +37998L,37999L,38000L,38001L,38002L,38003L,38004L,38005L,38006L,38007L, +38008L,38009L,38010L,38011L,38012L,38013L,38014L,38015L,38016L,38017L, +38018L,38019L,38020L,38021L,38022L,38023L,38024L,38025L,38026L,38027L, +38028L,38029L,38030L,38031L,38032L,38033L,38034L,38035L,38036L,38037L, +38038L,38039L,38040L,38041L,38042L,38043L,38044L,38045L,38046L,38047L, +38048L,38049L,38050L,38051L,38052L,38053L,38054L,38055L,38056L,38057L, +38058L,38059L,38060L,38061L,38062L,38063L,38064L,38065L,38066L,38067L, +38068L,38069L,38070L,38071L,38072L,38073L,38074L,38075L,38076L,38077L, +38078L,38079L,38080L,38081L,38082L,38083L,38084L,38085L,38086L,38087L, +38088L,38089L,38090L,38091L,38092L,38093L,38094L,38095L,38096L,38097L, +38098L,38099L,38100L,38101L,38102L,38103L,38104L,38105L,38106L,38107L, +38108L,38109L,38110L,38111L,38112L,38113L,38114L,38115L,38116L,38117L, +38118L,38119L,38120L,38121L,38122L,38123L,38124L,38125L,38126L,38127L, +38128L,38129L,38130L,38131L,38132L,38133L,38134L,38135L,38136L,38137L, +38138L,38139L,38140L,38141L,38142L,38143L,38144L,38145L,38146L,38147L, +38148L,38149L,38150L,38151L,38152L,38153L,38154L,38155L,38156L,38157L, +38158L,38159L,38160L,38161L,38162L,38163L,38164L,38165L,38166L,38167L, +38168L,38169L,38170L,38171L,38172L,38173L,38174L,38175L,38176L,38177L, +38178L,38179L,38180L,38181L,38182L,38183L,38184L,38185L,38186L,38187L, +38188L,38189L,38190L,38191L,38192L,38193L,38194L,38195L,38196L,38197L, +38198L,38199L,38200L,38201L,38202L,38203L,38204L,38205L,38206L,38207L, +38208L,38209L,38210L,38211L,38212L,38213L,38214L,38215L,38216L,38217L, +38218L,38219L,38220L,38221L,38222L,38223L,38224L,38225L,38226L,38227L, +38228L,38229L,38230L,38231L,38232L,38233L,38234L,38235L,38236L,38237L, +38238L,38239L,38240L,38241L,38242L,38243L,38244L,38245L,38246L,38247L, +38248L,38249L,38250L,38251L,38252L,38253L,38254L,38255L,38256L,38257L, +38258L,38259L,38260L,38261L,38262L,38263L,38264L,38265L,38266L,38267L, +38268L,38269L,38270L,38271L,38272L,38273L,38274L,38275L,38276L,38277L, +38278L,38279L,38280L,38281L,38282L,38283L,38284L,38285L,38286L,38287L, +38288L,38289L,38290L,38291L,38292L,38293L,38294L,38295L,38296L,38297L, +38298L,38299L,38300L,38301L,38302L,38303L,38304L,38305L,38306L,38307L, +38308L,38309L,38310L,38311L,38312L,38313L,38314L,38315L,38316L,38317L, +38318L,38319L,38320L,38321L,38322L,38323L,38324L,38325L,38326L,38327L, +38328L,38329L,38330L,38331L,38332L,38333L,38334L,38335L,38336L,38337L, +38338L,38339L,38340L,38341L,38342L,38343L,38344L,38345L,38346L,38347L, +38348L,38349L,38350L,38351L,38352L,38353L,38354L,38355L,38356L,38357L, +38358L,38359L,38360L,38361L,38362L,38363L,38364L,38365L,38366L,38367L, +38368L,38369L,38370L,38371L,38372L,38373L,38374L,38375L,38376L,38377L, +38378L,38379L,38380L,38381L,38382L,38383L,38384L,38385L,38386L,38387L, +38388L,38389L,38390L,38391L,38392L,38393L,38394L,38395L,38396L,38397L, +38398L,38399L,38400L,38401L,38402L,38403L,38404L,38405L,38406L,38407L, +38408L,38409L,38410L,38411L,38412L,38413L,38414L,38415L,38416L,38417L, +38418L,38419L,38420L,38421L,38422L,38423L,38424L,38425L,38426L,38427L, +38428L,38429L,38430L,38431L,38432L,38433L,38434L,38435L,38436L,38437L, +38438L,38439L,38440L,38441L,38442L,38443L,38444L,38445L,38446L,38447L, +38448L,38449L,38450L,38451L,38452L,38453L,38454L,38455L,38456L,38457L, +38458L,38459L,38460L,38461L,38462L,38463L,38464L,38465L,38466L,38467L, +38468L,38469L,38470L,38471L,38472L,38473L,38474L,38475L,38476L,38477L, +38478L,38479L,38480L,38481L,38482L,38483L,38484L,38485L,38486L,38487L, +38488L,38489L,38490L,38491L,38492L,38493L,38494L,38495L,38496L,38497L, +38498L,38499L,38500L,38501L,38502L,38503L,38504L,38505L,38506L,38507L, +38508L,38509L,38510L,38511L,38512L,38513L,38514L,38515L,38516L,38517L, +38518L,38519L,38520L,38521L,38522L,38523L,38524L,38525L,38526L,38527L, +38528L,38529L,38530L,38531L,38532L,38533L,38534L,38535L,38536L,38537L, +38538L,38539L,38540L,38541L,38542L,38543L,38544L,38545L,38546L,38547L, +38548L,38549L,38550L,38551L,38552L,38553L,38554L,38555L,38556L,38557L, +38558L,38559L,38560L,38561L,38562L,38563L,38564L,38565L,38566L,38567L, +38568L,38569L,38570L,38571L,38572L,38573L,38574L,38575L,38576L,38577L, +38578L,38579L,38580L,38581L,38582L,38583L,38584L,38585L,38586L,38587L, +38588L,38589L,38590L,38591L,38592L,38593L,38594L,38595L,38596L,38597L, +38598L,38599L,38600L,38601L,38602L,38603L,38604L,38605L,38606L,38607L, +38608L,38609L,38610L,38611L,38612L,38613L,38614L,38615L,38616L,38617L, +38618L,38619L,38620L,38621L,38622L,38623L,38624L,38625L,38626L,38627L, +38628L,38629L,38630L,38631L,38632L,38633L,38634L,38635L,38636L,38637L, +38638L,38639L,38640L,38641L,38642L,38643L,38644L,38645L,38646L,38647L, +38648L,38649L,38650L,38651L,38652L,38653L,38654L,38655L,38656L,38657L, +38658L,38659L,38660L,38661L,38662L,38663L,38664L,38665L,38666L,38667L, +38668L,38669L,38670L,38671L,38672L,38673L,38674L,38675L,38676L,38677L, +38678L,38679L,38680L,38681L,38682L,38683L,38684L,38685L,38686L,38687L, +38688L,38689L,38690L,38691L,38692L,38693L,38694L,38695L,38696L,38697L, +38698L,38699L,38700L,38701L,38702L,38703L,38704L,38705L,38706L,38707L, +38708L,38709L,38710L,38711L,38712L,38713L,38714L,38715L,38716L,38717L, +38718L,38719L,38720L,38721L,38722L,38723L,38724L,38725L,38726L,38727L, +38728L,38729L,38730L,38731L,38732L,38733L,38734L,38735L,38736L,38737L, +38738L,38739L,38740L,38741L,38742L,38743L,38744L,38745L,38746L,38747L, +38748L,38749L,38750L,38751L,38752L,38753L,38754L,38755L,38756L,38757L, +38758L,38759L,38760L,38761L,38762L,38763L,38764L,38765L,38766L,38767L, +38768L,38769L,38770L,38771L,38772L,38773L,38774L,38775L,38776L,38777L, +38778L,38779L,38780L,38781L,38782L,38783L,38784L,38785L,38786L,38787L, +38788L,38789L,38790L,38791L,38792L,38793L,38794L,38795L,38796L,38797L, +38798L,38799L,38800L,38801L,38802L,38803L,38804L,38805L,38806L,38807L, +38808L,38809L,38810L,38811L,38812L,38813L,38814L,38815L,38816L,38817L, +38818L,38819L,38820L,38821L,38822L,38823L,38824L,38825L,38826L,38827L, +38828L,38829L,38830L,38831L,38832L,38833L,38834L,38835L,38836L,38837L, +38838L,38839L,38840L,38841L,38842L,38843L,38844L,38845L,38846L,38847L, +38848L,38849L,38850L,38851L,38852L,38853L,38854L,38855L,38856L,38857L, +38858L,38859L,38860L,38861L,38862L,38863L,38864L,38865L,38866L,38867L, +38868L,38869L,38870L,38871L,38872L,38873L,38874L,38875L,38876L,38877L, +38878L,38879L,38880L,38881L,38882L,38883L,38884L,38885L,38886L,38887L, +38888L,38889L,38890L,38891L,38892L,38893L,38894L,38895L,38896L,38897L, +38898L,38899L,38900L,38901L,38902L,38903L,38904L,38905L,38906L,38907L, +38908L,38909L,38910L,38911L,38912L,38913L,38914L,38915L,38916L,38917L, +38918L,38919L,38920L,38921L,38922L,38923L,38924L,38925L,38926L,38927L, +38928L,38929L,38930L,38931L,38932L,38933L,38934L,38935L,38936L,38937L, +38938L,38939L,38940L,38941L,38942L,38943L,38944L,38945L,38946L,38947L, +38948L,38949L,38950L,38951L,38952L,38953L,38954L,38955L,38956L,38957L, +38958L,38959L,38960L,38961L,38962L,38963L,38964L,38965L,38966L,38967L, +38968L,38969L,38970L,38971L,38972L,38973L,38974L,38975L,38976L,38977L, +38978L,38979L,38980L,38981L,38982L,38983L,38984L,38985L,38986L,38987L, +38988L,38989L,38990L,38991L,38992L,38993L,38994L,38995L,38996L,38997L, +38998L,38999L,39000L,39001L,39002L,39003L,39004L,39005L,39006L,39007L, +39008L,39009L,39010L,39011L,39012L,39013L,39014L,39015L,39016L,39017L, +39018L,39019L,39020L,39021L,39022L,39023L,39024L,39025L,39026L,39027L, +39028L,39029L,39030L,39031L,39032L,39033L,39034L,39035L,39036L,39037L, +39038L,39039L,39040L,39041L,39042L,39043L,39044L,39045L,39046L,39047L, +39048L,39049L,39050L,39051L,39052L,39053L,39054L,39055L,39056L,39057L, +39058L,39059L,39060L,39061L,39062L,39063L,39064L,39065L,39066L,39067L, +39068L,39069L,39070L,39071L,39072L,39073L,39074L,39075L,39076L,39077L, +39078L,39079L,39080L,39081L,39082L,39083L,39084L,39085L,39086L,39087L, +39088L,39089L,39090L,39091L,39092L,39093L,39094L,39095L,39096L,39097L, +39098L,39099L,39100L,39101L,39102L,39103L,39104L,39105L,39106L,39107L, +39108L,39109L,39110L,39111L,39112L,39113L,39114L,39115L,39116L,39117L, +39118L,39119L,39120L,39121L,39122L,39123L,39124L,39125L,39126L,39127L, +39128L,39129L,39130L,39131L,39132L,39133L,39134L,39135L,39136L,39137L, +39138L,39139L,39140L,39141L,39142L,39143L,39144L,39145L,39146L,39147L, +39148L,39149L,39150L,39151L,39152L,39153L,39154L,39155L,39156L,39157L, +39158L,39159L,39160L,39161L,39162L,39163L,39164L,39165L,39166L,39167L, +39168L,39169L,39170L,39171L,39172L,39173L,39174L,39175L,39176L,39177L, +39178L,39179L,39180L,39181L,39182L,39183L,39184L,39185L,39186L,39187L, +39188L,39189L,39190L,39191L,39192L,39193L,39194L,39195L,39196L,39197L, +39198L,39199L,39200L,39201L,39202L,39203L,39204L,39205L,39206L,39207L, +39208L,39209L,39210L,39211L,39212L,39213L,39214L,39215L,39216L,39217L, +39218L,39219L,39220L,39221L,39222L,39223L,39224L,39225L,39226L,39227L, +39228L,39229L,39230L,39231L,39232L,39233L,39234L,39235L,39236L,39237L, +39238L,39239L,39240L,39241L,39242L,39243L,39244L,39245L,39246L,39247L, +39248L,39249L,39250L,39251L,39252L,39253L,39254L,39255L,39256L,39257L, +39258L,39259L,39260L,39261L,39262L,39263L,39264L,39265L,39266L,39267L, +39268L,39269L,39270L,39271L,39272L,39273L,39274L,39275L,39276L,39277L, +39278L,39279L,39280L,39281L,39282L,39283L,39284L,39285L,39286L,39287L, +39288L,39289L,39290L,39291L,39292L,39293L,39294L,39295L,39296L,39297L, +39298L,39299L,39300L,39301L,39302L,39303L,39304L,39305L,39306L,39307L, +39308L,39309L,39310L,39311L,39312L,39313L,39314L,39315L,39316L,39317L, +39318L,39319L,39320L,39321L,39322L,39323L,39324L,39325L,39326L,39327L, +39328L,39329L,39330L,39331L,39332L,39333L,39334L,39335L,39336L,39337L, +39338L,39339L,39340L,39341L,39342L,39343L,39344L,39345L,39346L,39347L, +39348L,39349L,39350L,39351L,39352L,39353L,39354L,39355L,39356L,39357L, +39358L,39359L,39360L,39361L,39362L,39363L,39364L,39365L,39366L,39367L, +39368L,39369L,39370L,39371L,39372L,39373L,39374L,39375L,39376L,39377L, +39378L,39379L,39380L,39381L,39382L,39383L,39384L,39385L,39386L,39387L, +39388L,39389L,39390L,39391L,39392L,39393L,39394L,39395L,39396L,39397L, +39398L,39399L,39400L,39401L,39402L,39403L,39404L,39405L,39406L,39407L, +39408L,39409L,39410L,39411L,39412L,39413L,39414L,39415L,39416L,39417L, +39418L,39419L,39420L,39421L,39422L,39423L,39424L,39425L,39426L,39427L, +39428L,39429L,39430L,39431L,39432L,39433L,39434L,39435L,39436L,39437L, +39438L,39439L,39440L,39441L,39442L,39443L,39444L,39445L,39446L,39447L, +39448L,39449L,39450L,39451L,39452L,39453L,39454L,39455L,39456L,39457L, +39458L,39459L,39460L,39461L,39462L,39463L,39464L,39465L,39466L,39467L, +39468L,39469L,39470L,39471L,39472L,39473L,39474L,39475L,39476L,39477L, +39478L,39479L,39480L,39481L,39482L,39483L,39484L,39485L,39486L,39487L, +39488L,39489L,39490L,39491L,39492L,39493L,39494L,39495L,39496L,39497L, +39498L,39499L,39500L,39501L,39502L,39503L,39504L,39505L,39506L,39507L, +39508L,39509L,39510L,39511L,39512L,39513L,39514L,39515L,39516L,39517L, +39518L,39519L,39520L,39521L,39522L,39523L,39524L,39525L,39526L,39527L, +39528L,39529L,39530L,39531L,39532L,39533L,39534L,39535L,39536L,39537L, +39538L,39539L,39540L,39541L,39542L,39543L,39544L,39545L,39546L,39547L, +39548L,39549L,39550L,39551L,39552L,39553L,39554L,39555L,39556L,39557L, +39558L,39559L,39560L,39561L,39562L,39563L,39564L,39565L,39566L,39567L, +39568L,39569L,39570L,39571L,39572L,39573L,39574L,39575L,39576L,39577L, +39578L,39579L,39580L,39581L,39582L,39583L,39584L,39585L,39586L,39587L, +39588L,39589L,39590L,39591L,39592L,39593L,39594L,39595L,39596L,39597L, +39598L,39599L,39600L,39601L,39602L,39603L,39604L,39605L,39606L,39607L, +39608L,39609L,39610L,39611L,39612L,39613L,39614L,39615L,39616L,39617L, +39618L,39619L,39620L,39621L,39622L,39623L,39624L,39625L,39626L,39627L, +39628L,39629L,39630L,39631L,39632L,39633L,39634L,39635L,39636L,39637L, +39638L,39639L,39640L,39641L,39642L,39643L,39644L,39645L,39646L,39647L, +39648L,39649L,39650L,39651L,39652L,39653L,39654L,39655L,39656L,39657L, +39658L,39659L,39660L,39661L,39662L,39663L,39664L,39665L,39666L,39667L, +39668L,39669L,39670L,39671L,39672L,39673L,39674L,39675L,39676L,39677L, +39678L,39679L,39680L,39681L,39682L,39683L,39684L,39685L,39686L,39687L, +39688L,39689L,39690L,39691L,39692L,39693L,39694L,39695L,39696L,39697L, +39698L,39699L,39700L,39701L,39702L,39703L,39704L,39705L,39706L,39707L, +39708L,39709L,39710L,39711L,39712L,39713L,39714L,39715L,39716L,39717L, +39718L,39719L,39720L,39721L,39722L,39723L,39724L,39725L,39726L,39727L, +39728L,39729L,39730L,39731L,39732L,39733L,39734L,39735L,39736L,39737L, +39738L,39739L,39740L,39741L,39742L,39743L,39744L,39745L,39746L,39747L, +39748L,39749L,39750L,39751L,39752L,39753L,39754L,39755L,39756L,39757L, +39758L,39759L,39760L,39761L,39762L,39763L,39764L,39765L,39766L,39767L, +39768L,39769L,39770L,39771L,39772L,39773L,39774L,39775L,39776L,39777L, +39778L,39779L,39780L,39781L,39782L,39783L,39784L,39785L,39786L,39787L, +39788L,39789L,39790L,39791L,39792L,39793L,39794L,39795L,39796L,39797L, +39798L,39799L,39800L,39801L,39802L,39803L,39804L,39805L,39806L,39807L, +39808L,39809L,39810L,39811L,39812L,39813L,39814L,39815L,39816L,39817L, +39818L,39819L,39820L,39821L,39822L,39823L,39824L,39825L,39826L,39827L, +39828L,39829L,39830L,39831L,39832L,39833L,39834L,39835L,39836L,39837L, +39838L,39839L,39840L,39841L,39842L,39843L,39844L,39845L,39846L,39847L, +39848L,39849L,39850L,39851L,39852L,39853L,39854L,39855L,39856L,39857L, +39858L,39859L,39860L,39861L,39862L,39863L,39864L,39865L,39866L,39867L, +39868L,39869L,39870L,39871L,39872L,39873L,39874L,39875L,39876L,39877L, +39878L,39879L,39880L,39881L,39882L,39883L,39884L,39885L,39886L,39887L, +39888L,39889L,39890L,39891L,39892L,39893L,39894L,39895L,39896L,39897L, +39898L,39899L,39900L,39901L,39902L,39903L,39904L,39905L,39906L,39907L, +39908L,39909L,39910L,39911L,39912L,39913L,39914L,39915L,39916L,39917L, +39918L,39919L,39920L,39921L,39922L,39923L,39924L,39925L,39926L,39927L, +39928L,39929L,39930L,39931L,39932L,39933L,39934L,39935L,39936L,39937L, +39938L,39939L,39940L,39941L,39942L,39943L,39944L,39945L,39946L,39947L, +39948L,39949L,39950L,39951L,39952L,39953L,39954L,39955L,39956L,39957L, +39958L,39959L,39960L,39961L,39962L,39963L,39964L,39965L,39966L,39967L, +39968L,39969L,39970L,39971L,39972L,39973L,39974L,39975L,39976L,39977L, +39978L,39979L,39980L,39981L,39982L,39983L,39984L,39985L,39986L,39987L, +39988L,39989L,39990L,39991L,39992L,39993L,39994L,39995L,39996L,39997L, +39998L,39999L,40000L,40001L,40002L,40003L,40004L,40005L,40006L,40007L, +40008L,40009L,40010L,40011L,40012L,40013L,40014L,40015L,40016L,40017L, +40018L,40019L,40020L,40021L,40022L,40023L,40024L,40025L,40026L,40027L, +40028L,40029L,40030L,40031L,40032L,40033L,40034L,40035L,40036L,40037L, +40038L,40039L,40040L,40041L,40042L,40043L,40044L,40045L,40046L,40047L, +40048L,40049L,40050L,40051L,40052L,40053L,40054L,40055L,40056L,40057L, +40058L,40059L,40060L,40061L,40062L,40063L,40064L,40065L,40066L,40067L, +40068L,40069L,40070L,40071L,40072L,40073L,40074L,40075L,40076L,40077L, +40078L,40079L,40080L,40081L,40082L,40083L,40084L,40085L,40086L,40087L, +40088L,40089L,40090L,40091L,40092L,40093L,40094L,40095L,40096L,40097L, +40098L,40099L,40100L,40101L,40102L,40103L,40104L,40105L,40106L,40107L, +40108L,40109L,40110L,40111L,40112L,40113L,40114L,40115L,40116L,40117L, +40118L,40119L,40120L,40121L,40122L,40123L,40124L,40125L,40126L,40127L, +40128L,40129L,40130L,40131L,40132L,40133L,40134L,40135L,40136L,40137L, +40138L,40139L,40140L,40141L,40142L,40143L,40144L,40145L,40146L,40147L, +40148L,40149L,40150L,40151L,40152L,40153L,40154L,40155L,40156L,40157L, +40158L,40159L,40160L,40161L,40162L,40163L,40164L,40165L,40166L,40167L, +40168L,40169L,40170L,40171L,40172L,40173L,40174L,40175L,40176L,40177L, +40178L,40179L,40180L,40181L,40182L,40183L,40184L,40185L,40186L,40187L, +40188L,40189L,40190L,40191L,40192L,40193L,40194L,40195L,40196L,40197L, +40198L,40199L,40200L,40201L,40202L,40203L,40204L,40205L,40206L,40207L, +40208L,40209L,40210L,40211L,40212L,40213L,40214L,40215L,40216L,40217L, +40218L,40219L,40220L,40221L,40222L,40223L,40224L,40225L,40226L,40227L, +40228L,40229L,40230L,40231L,40232L,40233L,40234L,40235L,40236L,40237L, +40238L,40239L,40240L,40241L,40242L,40243L,40244L,40245L,40246L,40247L, +40248L,40249L,40250L,40251L,40252L,40253L,40254L,40255L,40256L,40257L, +40258L,40259L,40260L,40261L,40262L,40263L,40264L,40265L,40266L,40267L, +40268L,40269L,40270L,40271L,40272L,40273L,40274L,40275L,40276L,40277L, +40278L,40279L,40280L,40281L,40282L,40283L,40284L,40285L,40286L,40287L, +40288L,40289L,40290L,40291L,40292L,40293L,40294L,40295L,40296L,40297L, +40298L,40299L,40300L,40301L,40302L,40303L,40304L,40305L,40306L,40307L, +40308L,40309L,40310L,40311L,40312L,40313L,40314L,40315L,40316L,40317L, +40318L,40319L,40320L,40321L,40322L,40323L,40324L,40325L,40326L,40327L, +40328L,40329L,40330L,40331L,40332L,40333L,40334L,40335L,40336L,40337L, +40338L,40339L,40340L,40341L,40342L,40343L,40344L,40345L,40346L,40347L, +40348L,40349L,40350L,40351L,40352L,40353L,40354L,40355L,40356L,40357L, +40358L,40359L,40360L,40361L,40362L,40363L,40364L,40365L,40366L,40367L, +40368L,40369L,40370L,40371L,40372L,40373L,40374L,40375L,40376L,40377L, +40378L,40379L,40380L,40381L,40382L,40383L,40384L,40385L,40386L,40387L, +40388L,40389L,40390L,40391L,40392L,40393L,40394L,40395L,40396L,40397L, +40398L,40399L,40400L,40401L,40402L,40403L,40404L,40405L,40406L,40407L, +40408L,40409L,40410L,40411L,40412L,40413L,40414L,40415L,40416L,40417L, +40418L,40419L,40420L,40421L,40422L,40423L,40424L,40425L,40426L,40427L, +40428L,40429L,40430L,40431L,40432L,40433L,40434L,40435L,40436L,40437L, +40438L,40439L,40440L,40441L,40442L,40443L,40444L,40445L,40446L,40447L, +40448L,40449L,40450L,40451L,40452L,40453L,40454L,40455L,40456L,40457L, +40458L,40459L,40460L,40461L,40462L,40463L,40464L,40465L,40466L,40467L, +40468L,40469L,40470L,40471L,40472L,40473L,40474L,40475L,40476L,40477L, +40478L,40479L,40480L,40481L,40482L,40483L,40484L,40485L,40486L,40487L, +40488L,40489L,40490L,40491L,40492L,40493L,40494L,40495L,40496L,40497L, +40498L,40499L,40500L,40501L,40502L,40503L,40504L,40505L,40506L,40507L, +40508L,40509L,40510L,40511L,40512L,40513L,40514L,40515L,40516L,40517L, +40518L,40519L,40520L,40521L,40522L,40523L,40524L,40525L,40526L,40527L, +40528L,40529L,40530L,40531L,40532L,40533L,40534L,40535L,40536L,40537L, +40538L,40539L,40540L,40541L,40542L,40543L,40544L,40545L,40546L,40547L, +40548L,40549L,40550L,40551L,40552L,40553L,40554L,40555L,40556L,40557L, +40558L,40559L,40560L,40561L,40562L,40563L,40564L,40565L,40566L,40567L, +40568L,40569L,40570L,40571L,40572L,40573L,40574L,40575L,40576L,40577L, +40578L,40579L,40580L,40581L,40582L,40583L,40584L,40585L,40586L,40587L, +40588L,40589L,40590L,40591L,40592L,40593L,40594L,40595L,40596L,40597L, +40598L,40599L,40600L,40601L,40602L,40603L,40604L,40605L,40606L,40607L, +40608L,40609L,40610L,40611L,40612L,40613L,40614L,40615L,40616L,40617L, +40618L,40619L,40620L,40621L,40622L,40623L,40624L,40625L,40626L,40627L, +40628L,40629L,40630L,40631L,40632L,40633L,40634L,40635L,40636L,40637L, +40638L,40639L,40640L,40641L,40642L,40643L,40644L,40645L,40646L,40647L, +40648L,40649L,40650L,40651L,40652L,40653L,40654L,40655L,40656L,40657L, +40658L,40659L,40660L,40661L,40662L,40663L,40664L,40665L,40666L,40667L, +40668L,40669L,40670L,40671L,40672L,40673L,40674L,40675L,40676L,40677L, +40678L,40679L,40680L,40681L,40682L,40683L,40684L,40685L,40686L,40687L, +40688L,40689L,40690L,40691L,40692L,40693L,40694L,40695L,40696L,40697L, +40698L,40699L,40700L,40701L,40702L,40703L,40704L,40705L,40706L,40707L, +40708L,40709L,40710L,40711L,40712L,40713L,40714L,40715L,40716L,40717L, +40718L,40719L,40720L,40721L,40722L,40723L,40724L,40725L,40726L,40727L, +40728L,40729L,40730L,40731L,40732L,40733L,40734L,40735L,40736L,40737L, +40738L,40739L,40740L,40741L,40742L,40743L,40744L,40745L,40746L,40747L, +40748L,40749L,40750L,40751L,40752L,40753L,40754L,40755L,40756L,40757L, +40758L,40759L,40760L,40761L,40762L,40763L,40764L,40765L,40766L,40767L, +40768L,40769L,40770L,40771L,40772L,40773L,40774L,40775L,40776L,40777L, +40778L,40779L,40780L,40781L,40782L,40783L,40784L,40785L,40786L,40787L, +40788L,40789L,40790L,40791L,40792L,40793L,40794L,40795L,40796L,40797L, +40798L,40799L,40800L,40801L,40802L,40803L,40804L,40805L,40806L,40807L, +40808L,40809L,40810L,40811L,40812L,40813L,40814L,40815L,40816L,40817L, +40818L,40819L,40820L,40821L,40822L,40823L,40824L,40825L,40826L,40827L, +40828L,40829L,40830L,40831L,40832L,40833L,40834L,40835L,40836L,40837L, +40838L,40839L,40840L,40841L,40842L,40843L,40844L,40845L,40846L,40847L, +40848L,40849L,40850L,40851L,40852L,40853L,40854L,40855L,40856L,40857L, +40858L,40859L,40860L,40861L,40862L,40863L,40864L,40865L,40866L,40867L, +40868L,40869L,40870L,40871L,40872L,40873L,40874L,40875L,40876L,40877L, +40878L,40879L,40880L,40881L,40882L,40883L,40884L,40885L,40886L,40887L, +40888L,40889L,40890L,40891L,40892L,40893L,40894L,40895L,40896L,40897L, +40898L,40899L,40900L,40901L,40902L,40903L,40904L,40905L,40906L,40907L, +40908L,40909L,40910L,40911L,40912L,40913L,40914L,40915L,40916L,40917L, +40918L,40919L,40920L,40921L,40922L,40923L,40924L,40925L,40926L,40927L, +40928L,40929L,40930L,40931L,40932L,40933L,40934L,40935L,40936L,40937L, +40938L,40939L,40940L,40941L,40942L,40943L,40944L,40945L,40946L,40947L, +40948L,40949L,40950L,40951L,40952L,40953L,40954L,40955L,40956L,40957L, +40958L,40959L,40960L,40961L,40962L,40963L,40964L,40965L,40966L,40967L, +40968L,40969L,40970L,40971L,40972L,40973L,40974L,40975L,40976L,40977L, +40978L,40979L,40980L,40981L,40982L,40983L,40984L,40985L,40986L,40987L, +40988L,40989L,40990L,40991L,40992L,40993L,40994L,40995L,40996L,40997L, +40998L,40999L,41000L,41001L,41002L,41003L,41004L,41005L,41006L,41007L, +41008L,41009L,41010L,41011L,41012L,41013L,41014L,41015L,41016L,41017L, +41018L,41019L,41020L,41021L,41022L,41023L,41024L,41025L,41026L,41027L, +41028L,41029L,41030L,41031L,41032L,41033L,41034L,41035L,41036L,41037L, +41038L,41039L,41040L,41041L,41042L,41043L,41044L,41045L,41046L,41047L, +41048L,41049L,41050L,41051L,41052L,41053L,41054L,41055L,41056L,41057L, +41058L,41059L,41060L,41061L,41062L,41063L,41064L,41065L,41066L,41067L, +41068L,41069L,41070L,41071L,41072L,41073L,41074L,41075L,41076L,41077L, +41078L,41079L,41080L,41081L,41082L,41083L,41084L,41085L,41086L,41087L, +41088L,41089L,41090L,41091L,41092L,41093L,41094L,41095L,41096L,41097L, +41098L,41099L,41100L,41101L,41102L,41103L,41104L,41105L,41106L,41107L, +41108L,41109L,41110L,41111L,41112L,41113L,41114L,41115L,41116L,41117L, +41118L,41119L,41120L,41121L,41122L,41123L,41124L,41125L,41126L,41127L, +41128L,41129L,41130L,41131L,41132L,41133L,41134L,41135L,41136L,41137L, +41138L,41139L,41140L,41141L,41142L,41143L,41144L,41145L,41146L,41147L, +41148L,41149L,41150L,41151L,41152L,41153L,41154L,41155L,41156L,41157L, +41158L,41159L,41160L,41161L,41162L,41163L,41164L,41165L,41166L,41167L, +41168L,41169L,41170L,41171L,41172L,41173L,41174L,41175L,41176L,41177L, +41178L,41179L,41180L,41181L,41182L,41183L,41184L,41185L,41186L,41187L, +41188L,41189L,41190L,41191L,41192L,41193L,41194L,41195L,41196L,41197L, +41198L,41199L,41200L,41201L,41202L,41203L,41204L,41205L,41206L,41207L, +41208L,41209L,41210L,41211L,41212L,41213L,41214L,41215L,41216L,41217L, +41218L,41219L,41220L,41221L,41222L,41223L,41224L,41225L,41226L,41227L, +41228L,41229L,41230L,41231L,41232L,41233L,41234L,41235L,41236L,41237L, +41238L,41239L,41240L,41241L,41242L,41243L,41244L,41245L,41246L,41247L, +41248L,41249L,41250L,41251L,41252L,41253L,41254L,41255L,41256L,41257L, +41258L,41259L,41260L,41261L,41262L,41263L,41264L,41265L,41266L,41267L, +41268L,41269L,41270L,41271L,41272L,41273L,41274L,41275L,41276L,41277L, +41278L,41279L,41280L,41281L,41282L,41283L,41284L,41285L,41286L,41287L, +41288L,41289L,41290L,41291L,41292L,41293L,41294L,41295L,41296L,41297L, +41298L,41299L,41300L,41301L,41302L,41303L,41304L,41305L,41306L,41307L, +41308L,41309L,41310L,41311L,41312L,41313L,41314L,41315L,41316L,41317L, +41318L,41319L,41320L,41321L,41322L,41323L,41324L,41325L,41326L,41327L, +41328L,41329L,41330L,41331L,41332L,41333L,41334L,41335L,41336L,41337L, +41338L,41339L,41340L,41341L,41342L,41343L,41344L,41345L,41346L,41347L, +41348L,41349L,41350L,41351L,41352L,41353L,41354L,41355L,41356L,41357L, +41358L,41359L,41360L,41361L,41362L,41363L,41364L,41365L,41366L,41367L, +41368L,41369L,41370L,41371L,41372L,41373L,41374L,41375L,41376L,41377L, +41378L,41379L,41380L,41381L,41382L,41383L,41384L,41385L,41386L,41387L, +41388L,41389L,41390L,41391L,41392L,41393L,41394L,41395L,41396L,41397L, +41398L,41399L,41400L,41401L,41402L,41403L,41404L,41405L,41406L,41407L, +41408L,41409L,41410L,41411L,41412L,41413L,41414L,41415L,41416L,41417L, +41418L,41419L,41420L,41421L,41422L,41423L,41424L,41425L,41426L,41427L, +41428L,41429L,41430L,41431L,41432L,41433L,41434L,41435L,41436L,41437L, +41438L,41439L,41440L,41441L,41442L,41443L,41444L,41445L,41446L,41447L, +41448L,41449L,41450L,41451L,41452L,41453L,41454L,41455L,41456L,41457L, +41458L,41459L,41460L,41461L,41462L,41463L,41464L,41465L,41466L,41467L, +41468L,41469L,41470L,41471L,41472L,41473L,41474L,41475L,41476L,41477L, +41478L,41479L,41480L,41481L,41482L,41483L,41484L,41485L,41486L,41487L, +41488L,41489L,41490L,41491L,41492L,41493L,41494L,41495L,41496L,41497L, +41498L,41499L,41500L,41501L,41502L,41503L,41504L,41505L,41506L,41507L, +41508L,41509L,41510L,41511L,41512L,41513L,41514L,41515L,41516L,41517L, +41518L,41519L,41520L,41521L,41522L,41523L,41524L,41525L,41526L,41527L, +41528L,41529L,41530L,41531L,41532L,41533L,41534L,41535L,41536L,41537L, +41538L,41539L,41540L,41541L,41542L,41543L,41544L,41545L,41546L,41547L, +41548L,41549L,41550L,41551L,41552L,41553L,41554L,41555L,41556L,41557L, +41558L,41559L,41560L,41561L,41562L,41563L,41564L,41565L,41566L,41567L, +41568L,41569L,41570L,41571L,41572L,41573L,41574L,41575L,41576L,41577L, +41578L,41579L,41580L,41581L,41582L,41583L,41584L,41585L,41586L,41587L, +41588L,41589L,41590L,41591L,41592L,41593L,41594L,41595L,41596L,41597L, +41598L,41599L,41600L,41601L,41602L,41603L,41604L,41605L,41606L,41607L, +41608L,41609L,41610L,41611L,41612L,41613L,41614L,41615L,41616L,41617L, +41618L,41619L,41620L,41621L,41622L,41623L,41624L,41625L,41626L,41627L, +41628L,41629L,41630L,41631L,41632L,41633L,41634L,41635L,41636L,41637L, +41638L,41639L,41640L,41641L,41642L,41643L,41644L,41645L,41646L,41647L, +41648L,41649L,41650L,41651L,41652L,41653L,41654L,41655L,41656L,41657L, +41658L,41659L,41660L,41661L,41662L,41663L,41664L,41665L,41666L,41667L, +41668L,41669L,41670L,41671L,41672L,41673L,41674L,41675L,41676L,41677L, +41678L,41679L,41680L,41681L,41682L,41683L,41684L,41685L,41686L,41687L, +41688L,41689L,41690L,41691L,41692L,41693L,41694L,41695L,41696L,41697L, +41698L,41699L,41700L,41701L,41702L,41703L,41704L,41705L,41706L,41707L, +41708L,41709L,41710L,41711L,41712L,41713L,41714L,41715L,41716L,41717L, +41718L,41719L,41720L,41721L,41722L,41723L,41724L,41725L,41726L,41727L, +41728L,41729L,41730L,41731L,41732L,41733L,41734L,41735L,41736L,41737L, +41738L,41739L,41740L,41741L,41742L,41743L,41744L,41745L,41746L,41747L, +41748L,41749L,41750L,41751L,41752L,41753L,41754L,41755L,41756L,41757L, +41758L,41759L,41760L,41761L,41762L,41763L,41764L,41765L,41766L,41767L, +41768L,41769L,41770L,41771L,41772L,41773L,41774L,41775L,41776L,41777L, +41778L,41779L,41780L,41781L,41782L,41783L,41784L,41785L,41786L,41787L, +41788L,41789L,41790L,41791L,41792L,41793L,41794L,41795L,41796L,41797L, +41798L,41799L,41800L,41801L,41802L,41803L,41804L,41805L,41806L,41807L, +41808L,41809L,41810L,41811L,41812L,41813L,41814L,41815L,41816L,41817L, +41818L,41819L,41820L,41821L,41822L,41823L,41824L,41825L,41826L,41827L, +41828L,41829L,41830L,41831L,41832L,41833L,41834L,41835L,41836L,41837L, +41838L,41839L,41840L,41841L,41842L,41843L,41844L,41845L,41846L,41847L, +41848L,41849L,41850L,41851L,41852L,41853L,41854L,41855L,41856L,41857L, +41858L,41859L,41860L,41861L,41862L,41863L,41864L,41865L,41866L,41867L, +41868L,41869L,41870L,41871L,41872L,41873L,41874L,41875L,41876L,41877L, +41878L,41879L,41880L,41881L,41882L,41883L,41884L,41885L,41886L,41887L, +41888L,41889L,41890L,41891L,41892L,41893L,41894L,41895L,41896L,41897L, +41898L,41899L,41900L,41901L,41902L,41903L,41904L,41905L,41906L,41907L, +41908L,41909L,41910L,41911L,41912L,41913L,41914L,41915L,41916L,41917L, +41918L,41919L,41920L,41921L,41922L,41923L,41924L,41925L,41926L,41927L, +41928L,41929L,41930L,41931L,41932L,41933L,41934L,41935L,41936L,41937L, +41938L,41939L,41940L,41941L,41942L,41943L,41944L,41945L,41946L,41947L, +41948L,41949L,41950L,41951L,41952L,41953L,41954L,41955L,41956L,41957L, +41958L,41959L,41960L,41961L,41962L,41963L,41964L,41965L,41966L,41967L, +41968L,41969L,41970L,41971L,41972L,41973L,41974L,41975L,41976L,41977L, +41978L,41979L,41980L,41981L,41982L,41983L,41984L,41985L,41986L,41987L, +41988L,41989L,41990L,41991L,41992L,41993L,41994L,41995L,41996L,41997L, +41998L,41999L,42000L,42001L,42002L,42003L,42004L,42005L,42006L,42007L, +42008L,42009L,42010L,42011L,42012L,42013L,42014L,42015L,42016L,42017L, +42018L,42019L,42020L,42021L,42022L,42023L,42024L,42025L,42026L,42027L, +42028L,42029L,42030L,42031L,42032L,42033L,42034L,42035L,42036L,42037L, +42038L,42039L,42040L,42041L,42042L,42043L,42044L,42045L,42046L,42047L, +42048L,42049L,42050L,42051L,42052L,42053L,42054L,42055L,42056L,42057L, +42058L,42059L,42060L,42061L,42062L,42063L,42064L,42065L,42066L,42067L, +42068L,42069L,42070L,42071L,42072L,42073L,42074L,42075L,42076L,42077L, +42078L,42079L,42080L,42081L,42082L,42083L,42084L,42085L,42086L,42087L, +42088L,42089L,42090L,42091L,42092L,42093L,42094L,42095L,42096L,42097L, +42098L,42099L,42100L,42101L,42102L,42103L,42104L,42105L,42106L,42107L, +42108L,42109L,42110L,42111L,42112L,42113L,42114L,42115L,42116L,42117L, +42118L,42119L,42120L,42121L,42122L,42123L,42124L,42125L,42126L,42127L, +42128L,42129L,42130L,42131L,42132L,42133L,42134L,42135L,42136L,42137L, +42138L,42139L,42140L,42141L,42142L,42143L,42144L,42145L,42146L,42147L, +42148L,42149L,42150L,42151L,42152L,42153L,42154L,42155L,42156L,42157L, +42158L,42159L,42160L,42161L,42162L,42163L,42164L,42165L,42166L,42167L, +42168L,42169L,42170L,42171L,42172L,42173L,42174L,42175L,42176L,42177L, +42178L,42179L,42180L,42181L,42182L,42183L,42184L,42185L,42186L,42187L, +42188L,42189L,42190L,42191L,42192L,42193L,42194L,42195L,42196L,42197L, +42198L,42199L,42200L,42201L,42202L,42203L,42204L,42205L,42206L,42207L, +42208L,42209L,42210L,42211L,42212L,42213L,42214L,42215L,42216L,42217L, +42218L,42219L,42220L,42221L,42222L,42223L,42224L,42225L,42226L,42227L, +42228L,42229L,42230L,42231L,42232L,42233L,42234L,42235L,42236L,42237L, +42238L,42239L,42240L,42241L,42242L,42243L,42244L,42245L,42246L,42247L, +42248L,42249L,42250L,42251L,42252L,42253L,42254L,42255L,42256L,42257L, +42258L,42259L,42260L,42261L,42262L,42263L,42264L,42265L,42266L,42267L, +42268L,42269L,42270L,42271L,42272L,42273L,42274L,42275L,42276L,42277L, +42278L,42279L,42280L,42281L,42282L,42283L,42284L,42285L,42286L,42287L, +42288L,42289L,42290L,42291L,42292L,42293L,42294L,42295L,42296L,42297L, +42298L,42299L,42300L,42301L,42302L,42303L,42304L,42305L,42306L,42307L, +42308L,42309L,42310L,42311L,42312L,42313L,42314L,42315L,42316L,42317L, +42318L,42319L,42320L,42321L,42322L,42323L,42324L,42325L,42326L,42327L, +42328L,42329L,42330L,42331L,42332L,42333L,42334L,42335L,42336L,42337L, +42338L,42339L,42340L,42341L,42342L,42343L,42344L,42345L,42346L,42347L, +42348L,42349L,42350L,42351L,42352L,42353L,42354L,42355L,42356L,42357L, +42358L,42359L,42360L,42361L,42362L,42363L,42364L,42365L,42366L,42367L, +42368L,42369L,42370L,42371L,42372L,42373L,42374L,42375L,42376L,42377L, +42378L,42379L,42380L,42381L,42382L,42383L,42384L,42385L,42386L,42387L, +42388L,42389L,42390L,42391L,42392L,42393L,42394L,42395L,42396L,42397L, +42398L,42399L,42400L,42401L,42402L,42403L,42404L,42405L,42406L,42407L, +42408L,42409L,42410L,42411L,42412L,42413L,42414L,42415L,42416L,42417L, +42418L,42419L,42420L,42421L,42422L,42423L,42424L,42425L,42426L,42427L, +42428L,42429L,42430L,42431L,42432L,42433L,42434L,42435L,42436L,42437L, +42438L,42439L,42440L,42441L,42442L,42443L,42444L,42445L,42446L,42447L, +42448L,42449L,42450L,42451L,42452L,42453L,42454L,42455L,42456L,42457L, +42458L,42459L,42460L,42461L,42462L,42463L,42464L,42465L,42466L,42467L, +42468L,42469L,42470L,42471L,42472L,42473L,42474L,42475L,42476L,42477L, +42478L,42479L,42480L,42481L,42482L,42483L,42484L,42485L,42486L,42487L, +42488L,42489L,42490L,42491L,42492L,42493L,42494L,42495L,42496L,42497L, +42498L,42499L,42500L,42501L,42502L,42503L,42504L,42505L,42506L,42507L, +42508L,42509L,42510L,42511L,42512L,42513L,42514L,42515L,42516L,42517L, +42518L,42519L,42520L,42521L,42522L,42523L,42524L,42525L,42526L,42527L, +42528L,42529L,42530L,42531L,42532L,42533L,42534L,42535L,42536L,42537L, +42538L,42539L,42540L,42541L,42542L,42543L,42544L,42545L,42546L,42547L, +42548L,42549L,42550L,42551L,42552L,42553L,42554L,42555L,42556L,42557L, +42558L,42559L,42560L,42560L,42562L,42562L,42564L,42564L,42566L,42566L, +42568L,42568L,42570L,42570L,42572L,42572L,42574L,42574L,42576L,42576L, +42578L,42578L,42580L,42580L,42582L,42582L,42584L,42584L,42586L,42586L, +42588L,42588L,42590L,42590L,42592L,42592L,42594L,42594L,42596L,42596L, +42598L,42598L,42600L,42600L,42602L,42602L,42604L,42604L,42606L,42607L, +42608L,42609L,42610L,42611L,42612L,42613L,42614L,42615L,42616L,42617L, +42618L,42619L,42620L,42621L,42622L,42623L,42624L,42624L,42626L,42626L, +42628L,42628L,42630L,42630L,42632L,42632L,42634L,42634L,42636L,42636L, +42638L,42638L,42640L,42640L,42642L,42642L,42644L,42644L,42646L,42646L, +42648L,42648L,42650L,42650L,42652L,42653L,42654L,42655L,42656L,42657L, +42658L,42659L,42660L,42661L,42662L,42663L,42664L,42665L,42666L,42667L, +42668L,42669L,42670L,42671L,42672L,42673L,42674L,42675L,42676L,42677L, +42678L,42679L,42680L,42681L,42682L,42683L,42684L,42685L,42686L,42687L, +42688L,42689L,42690L,42691L,42692L,42693L,42694L,42695L,42696L,42697L, +42698L,42699L,42700L,42701L,42702L,42703L,42704L,42705L,42706L,42707L, +42708L,42709L,42710L,42711L,42712L,42713L,42714L,42715L,42716L,42717L, +42718L,42719L,42720L,42721L,42722L,42723L,42724L,42725L,42726L,42727L, +42728L,42729L,42730L,42731L,42732L,42733L,42734L,42735L,42736L,42737L, +42738L,42739L,42740L,42741L,42742L,42743L,42744L,42745L,42746L,42747L, +42748L,42749L,42750L,42751L,42752L,42753L,42754L,42755L,42756L,42757L, +42758L,42759L,42760L,42761L,42762L,42763L,42764L,42765L,42766L,42767L, +42768L,42769L,42770L,42771L,42772L,42773L,42774L,42775L,42776L,42777L, +42778L,42779L,42780L,42781L,42782L,42783L,42784L,42785L,42786L,42786L, +42788L,42788L,42790L,42790L,42792L,42792L,42794L,42794L,42796L,42796L, +42798L,42798L,42800L,42801L,42802L,42802L,42804L,42804L,42806L,42806L, +42808L,42808L,42810L,42810L,42812L,42812L,42814L,42814L,42816L,42816L, +42818L,42818L,42820L,42820L,42822L,42822L,42824L,42824L,42826L,42826L, +42828L,42828L,42830L,42830L,42832L,42832L,42834L,42834L,42836L,42836L, +42838L,42838L,42840L,42840L,42842L,42842L,42844L,42844L,42846L,42846L, +42848L,42848L,42850L,42850L,42852L,42852L,42854L,42854L,42856L,42856L, +42858L,42858L,42860L,42860L,42862L,42862L,42864L,42865L,42866L,42867L, +42868L,42869L,42870L,42871L,42872L,42873L,42873L,42875L,42875L,42877L, +42878L,42878L,42880L,42880L,42882L,42882L,42884L,42884L,42886L,42886L, +42888L,42889L,42890L,42891L,42891L,42893L,42894L,42895L,42896L,42896L, +42898L,42898L,42948L,42901L,42902L,42902L,42904L,42904L,42906L,42906L, +42908L,42908L,42910L,42910L,42912L,42912L,42914L,42914L,42916L,42916L, +42918L,42918L,42920L,42920L,42922L,42923L,42924L,42925L,42926L,42927L, +42928L,42929L,42930L,42931L,42932L,42932L,42934L,42934L,42936L,42936L, +42938L,42938L,42940L,42940L,42942L,42942L,42944L,42945L,42946L,42946L, +42948L,42949L,42950L,42951L,42952L,42953L,42954L,42955L,42956L,42957L, +42958L,42959L,42960L,42961L,42962L,42963L,42964L,42965L,42966L,42967L, +42968L,42969L,42970L,42971L,42972L,42973L,42974L,42975L,42976L,42977L, +42978L,42979L,42980L,42981L,42982L,42983L,42984L,42985L,42986L,42987L, +42988L,42989L,42990L,42991L,42992L,42993L,42994L,42995L,42996L,42997L, +42998L,42999L,43000L,43001L,43002L,43003L,43004L,43005L,43006L,43007L, +43008L,43009L,43010L,43011L,43012L,43013L,43014L,43015L,43016L,43017L, +43018L,43019L,43020L,43021L,43022L,43023L,43024L,43025L,43026L,43027L, +43028L,43029L,43030L,43031L,43032L,43033L,43034L,43035L,43036L,43037L, +43038L,43039L,43040L,43041L,43042L,43043L,43044L,43045L,43046L,43047L, +43048L,43049L,43050L,43051L,43052L,43053L,43054L,43055L,43056L,43057L, +43058L,43059L,43060L,43061L,43062L,43063L,43064L,43065L,43066L,43067L, +43068L,43069L,43070L,43071L,43072L,43073L,43074L,43075L,43076L,43077L, +43078L,43079L,43080L,43081L,43082L,43083L,43084L,43085L,43086L,43087L, +43088L,43089L,43090L,43091L,43092L,43093L,43094L,43095L,43096L,43097L, +43098L,43099L,43100L,43101L,43102L,43103L,43104L,43105L,43106L,43107L, +43108L,43109L,43110L,43111L,43112L,43113L,43114L,43115L,43116L,43117L, +43118L,43119L,43120L,43121L,43122L,43123L,43124L,43125L,43126L,43127L, +43128L,43129L,43130L,43131L,43132L,43133L,43134L,43135L,43136L,43137L, +43138L,43139L,43140L,43141L,43142L,43143L,43144L,43145L,43146L,43147L, +43148L,43149L,43150L,43151L,43152L,43153L,43154L,43155L,43156L,43157L, +43158L,43159L,43160L,43161L,43162L,43163L,43164L,43165L,43166L,43167L, +43168L,43169L,43170L,43171L,43172L,43173L,43174L,43175L,43176L,43177L, +43178L,43179L,43180L,43181L,43182L,43183L,43184L,43185L,43186L,43187L, +43188L,43189L,43190L,43191L,43192L,43193L,43194L,43195L,43196L,43197L, +43198L,43199L,43200L,43201L,43202L,43203L,43204L,43205L,43206L,43207L, +43208L,43209L,43210L,43211L,43212L,43213L,43214L,43215L,43216L,43217L, +43218L,43219L,43220L,43221L,43222L,43223L,43224L,43225L,43226L,43227L, +43228L,43229L,43230L,43231L,43232L,43233L,43234L,43235L,43236L,43237L, +43238L,43239L,43240L,43241L,43242L,43243L,43244L,43245L,43246L,43247L, +43248L,43249L,43250L,43251L,43252L,43253L,43254L,43255L,43256L,43257L, +43258L,43259L,43260L,43261L,43262L,43263L,43264L,43265L,43266L,43267L, +43268L,43269L,43270L,43271L,43272L,43273L,43274L,43275L,43276L,43277L, +43278L,43279L,43280L,43281L,43282L,43283L,43284L,43285L,43286L,43287L, +43288L,43289L,43290L,43291L,43292L,43293L,43294L,43295L,43296L,43297L, +43298L,43299L,43300L,43301L,43302L,43303L,43304L,43305L,43306L,43307L, +43308L,43309L,43310L,43311L,43312L,43313L,43314L,43315L,43316L,43317L, +43318L,43319L,43320L,43321L,43322L,43323L,43324L,43325L,43326L,43327L, +43328L,43329L,43330L,43331L,43332L,43333L,43334L,43335L,43336L,43337L, +43338L,43339L,43340L,43341L,43342L,43343L,43344L,43345L,43346L,43347L, +43348L,43349L,43350L,43351L,43352L,43353L,43354L,43355L,43356L,43357L, +43358L,43359L,43360L,43361L,43362L,43363L,43364L,43365L,43366L,43367L, +43368L,43369L,43370L,43371L,43372L,43373L,43374L,43375L,43376L,43377L, +43378L,43379L,43380L,43381L,43382L,43383L,43384L,43385L,43386L,43387L, +43388L,43389L,43390L,43391L,43392L,43393L,43394L,43395L,43396L,43397L, +43398L,43399L,43400L,43401L,43402L,43403L,43404L,43405L,43406L,43407L, +43408L,43409L,43410L,43411L,43412L,43413L,43414L,43415L,43416L,43417L, +43418L,43419L,43420L,43421L,43422L,43423L,43424L,43425L,43426L,43427L, +43428L,43429L,43430L,43431L,43432L,43433L,43434L,43435L,43436L,43437L, +43438L,43439L,43440L,43441L,43442L,43443L,43444L,43445L,43446L,43447L, +43448L,43449L,43450L,43451L,43452L,43453L,43454L,43455L,43456L,43457L, +43458L,43459L,43460L,43461L,43462L,43463L,43464L,43465L,43466L,43467L, +43468L,43469L,43470L,43471L,43472L,43473L,43474L,43475L,43476L,43477L, +43478L,43479L,43480L,43481L,43482L,43483L,43484L,43485L,43486L,43487L, +43488L,43489L,43490L,43491L,43492L,43493L,43494L,43495L,43496L,43497L, +43498L,43499L,43500L,43501L,43502L,43503L,43504L,43505L,43506L,43507L, +43508L,43509L,43510L,43511L,43512L,43513L,43514L,43515L,43516L,43517L, +43518L,43519L,43520L,43521L,43522L,43523L,43524L,43525L,43526L,43527L, +43528L,43529L,43530L,43531L,43532L,43533L,43534L,43535L,43536L,43537L, +43538L,43539L,43540L,43541L,43542L,43543L,43544L,43545L,43546L,43547L, +43548L,43549L,43550L,43551L,43552L,43553L,43554L,43555L,43556L,43557L, +43558L,43559L,43560L,43561L,43562L,43563L,43564L,43565L,43566L,43567L, +43568L,43569L,43570L,43571L,43572L,43573L,43574L,43575L,43576L,43577L, +43578L,43579L,43580L,43581L,43582L,43583L,43584L,43585L,43586L,43587L, +43588L,43589L,43590L,43591L,43592L,43593L,43594L,43595L,43596L,43597L, +43598L,43599L,43600L,43601L,43602L,43603L,43604L,43605L,43606L,43607L, +43608L,43609L,43610L,43611L,43612L,43613L,43614L,43615L,43616L,43617L, +43618L,43619L,43620L,43621L,43622L,43623L,43624L,43625L,43626L,43627L, +43628L,43629L,43630L,43631L,43632L,43633L,43634L,43635L,43636L,43637L, +43638L,43639L,43640L,43641L,43642L,43643L,43644L,43645L,43646L,43647L, +43648L,43649L,43650L,43651L,43652L,43653L,43654L,43655L,43656L,43657L, +43658L,43659L,43660L,43661L,43662L,43663L,43664L,43665L,43666L,43667L, +43668L,43669L,43670L,43671L,43672L,43673L,43674L,43675L,43676L,43677L, +43678L,43679L,43680L,43681L,43682L,43683L,43684L,43685L,43686L,43687L, +43688L,43689L,43690L,43691L,43692L,43693L,43694L,43695L,43696L,43697L, +43698L,43699L,43700L,43701L,43702L,43703L,43704L,43705L,43706L,43707L, +43708L,43709L,43710L,43711L,43712L,43713L,43714L,43715L,43716L,43717L, +43718L,43719L,43720L,43721L,43722L,43723L,43724L,43725L,43726L,43727L, +43728L,43729L,43730L,43731L,43732L,43733L,43734L,43735L,43736L,43737L, +43738L,43739L,43740L,43741L,43742L,43743L,43744L,43745L,43746L,43747L, +43748L,43749L,43750L,43751L,43752L,43753L,43754L,43755L,43756L,43757L, +43758L,43759L,43760L,43761L,43762L,43763L,43764L,43765L,43766L,43767L, +43768L,43769L,43770L,43771L,43772L,43773L,43774L,43775L,43776L,43777L, +43778L,43779L,43780L,43781L,43782L,43783L,43784L,43785L,43786L,43787L, +43788L,43789L,43790L,43791L,43792L,43793L,43794L,43795L,43796L,43797L, +43798L,43799L,43800L,43801L,43802L,43803L,43804L,43805L,43806L,43807L, +43808L,43809L,43810L,43811L,43812L,43813L,43814L,43815L,43816L,43817L, +43818L,43819L,43820L,43821L,43822L,43823L,43824L,43825L,43826L,43827L, +43828L,43829L,43830L,43831L,43832L,43833L,43834L,43835L,43836L,43837L, +43838L,43839L,43840L,43841L,43842L,43843L,43844L,43845L,43846L,43847L, +43848L,43849L,43850L,43851L,43852L,43853L,43854L,43855L,43856L,43857L, +43858L,42931L,43860L,43861L,43862L,43863L,43864L,43865L,43866L,43867L, +43868L,43869L,43870L,43871L,43872L,43873L,43874L,43875L,43876L,43877L, +43878L,43879L,43880L,43881L,43882L,43883L,43884L,43885L,43886L,43887L,5024, +5025,5026,5027,5028,5029,5030,5031,5032,5033,5034,5035,5036,5037,5038,5039, +5040,5041,5042,5043,5044,5045,5046,5047,5048,5049,5050,5051,5052,5053,5054, +5055,5056,5057,5058,5059,5060,5061,5062,5063,5064,5065,5066,5067,5068,5069, +5070,5071,5072,5073,5074,5075,5076,5077,5078,5079,5080,5081,5082,5083,5084, +5085,5086,5087,5088,5089,5090,5091,5092,5093,5094,5095,5096,5097,5098,5099, +5100,5101,5102,5103,43968L,43969L,43970L,43971L,43972L,43973L,43974L, +43975L,43976L,43977L,43978L,43979L,43980L,43981L,43982L,43983L,43984L, +43985L,43986L,43987L,43988L,43989L,43990L,43991L,43992L,43993L,43994L, +43995L,43996L,43997L,43998L,43999L,44000L,44001L,44002L,44003L,44004L, +44005L,44006L,44007L,44008L,44009L,44010L,44011L,44012L,44013L,44014L, +44015L,44016L,44017L,44018L,44019L,44020L,44021L,44022L,44023L,44024L, +44025L,44026L,44027L,44028L,44029L,44030L,44031L,44032L,44033L,44034L, +44035L,44036L,44037L,44038L,44039L,44040L,44041L,44042L,44043L,44044L, +44045L,44046L,44047L,44048L,44049L,44050L,44051L,44052L,44053L,44054L, +44055L,44056L,44057L,44058L,44059L,44060L,44061L,44062L,44063L,44064L, +44065L,44066L,44067L,44068L,44069L,44070L,44071L,44072L,44073L,44074L, +44075L,44076L,44077L,44078L,44079L,44080L,44081L,44082L,44083L,44084L, +44085L,44086L,44087L,44088L,44089L,44090L,44091L,44092L,44093L,44094L, +44095L,44096L,44097L,44098L,44099L,44100L,44101L,44102L,44103L,44104L, +44105L,44106L,44107L,44108L,44109L,44110L,44111L,44112L,44113L,44114L, +44115L,44116L,44117L,44118L,44119L,44120L,44121L,44122L,44123L,44124L, +44125L,44126L,44127L,44128L,44129L,44130L,44131L,44132L,44133L,44134L, +44135L,44136L,44137L,44138L,44139L,44140L,44141L,44142L,44143L,44144L, +44145L,44146L,44147L,44148L,44149L,44150L,44151L,44152L,44153L,44154L, +44155L,44156L,44157L,44158L,44159L,44160L,44161L,44162L,44163L,44164L, +44165L,44166L,44167L,44168L,44169L,44170L,44171L,44172L,44173L,44174L, +44175L,44176L,44177L,44178L,44179L,44180L,44181L,44182L,44183L,44184L, +44185L,44186L,44187L,44188L,44189L,44190L,44191L,44192L,44193L,44194L, +44195L,44196L,44197L,44198L,44199L,44200L,44201L,44202L,44203L,44204L, +44205L,44206L,44207L,44208L,44209L,44210L,44211L,44212L,44213L,44214L, +44215L,44216L,44217L,44218L,44219L,44220L,44221L,44222L,44223L,44224L, +44225L,44226L,44227L,44228L,44229L,44230L,44231L,44232L,44233L,44234L, +44235L,44236L,44237L,44238L,44239L,44240L,44241L,44242L,44243L,44244L, +44245L,44246L,44247L,44248L,44249L,44250L,44251L,44252L,44253L,44254L, +44255L,44256L,44257L,44258L,44259L,44260L,44261L,44262L,44263L,44264L, +44265L,44266L,44267L,44268L,44269L,44270L,44271L,44272L,44273L,44274L, +44275L,44276L,44277L,44278L,44279L,44280L,44281L,44282L,44283L,44284L, +44285L,44286L,44287L,44288L,44289L,44290L,44291L,44292L,44293L,44294L, +44295L,44296L,44297L,44298L,44299L,44300L,44301L,44302L,44303L,44304L, +44305L,44306L,44307L,44308L,44309L,44310L,44311L,44312L,44313L,44314L, +44315L,44316L,44317L,44318L,44319L,44320L,44321L,44322L,44323L,44324L, +44325L,44326L,44327L,44328L,44329L,44330L,44331L,44332L,44333L,44334L, +44335L,44336L,44337L,44338L,44339L,44340L,44341L,44342L,44343L,44344L, +44345L,44346L,44347L,44348L,44349L,44350L,44351L,44352L,44353L,44354L, +44355L,44356L,44357L,44358L,44359L,44360L,44361L,44362L,44363L,44364L, +44365L,44366L,44367L,44368L,44369L,44370L,44371L,44372L,44373L,44374L, +44375L,44376L,44377L,44378L,44379L,44380L,44381L,44382L,44383L,44384L, +44385L,44386L,44387L,44388L,44389L,44390L,44391L,44392L,44393L,44394L, +44395L,44396L,44397L,44398L,44399L,44400L,44401L,44402L,44403L,44404L, +44405L,44406L,44407L,44408L,44409L,44410L,44411L,44412L,44413L,44414L, +44415L,44416L,44417L,44418L,44419L,44420L,44421L,44422L,44423L,44424L, +44425L,44426L,44427L,44428L,44429L,44430L,44431L,44432L,44433L,44434L, +44435L,44436L,44437L,44438L,44439L,44440L,44441L,44442L,44443L,44444L, +44445L,44446L,44447L,44448L,44449L,44450L,44451L,44452L,44453L,44454L, +44455L,44456L,44457L,44458L,44459L,44460L,44461L,44462L,44463L,44464L, +44465L,44466L,44467L,44468L,44469L,44470L,44471L,44472L,44473L,44474L, +44475L,44476L,44477L,44478L,44479L,44480L,44481L,44482L,44483L,44484L, +44485L,44486L,44487L,44488L,44489L,44490L,44491L,44492L,44493L,44494L, +44495L,44496L,44497L,44498L,44499L,44500L,44501L,44502L,44503L,44504L, +44505L,44506L,44507L,44508L,44509L,44510L,44511L,44512L,44513L,44514L, +44515L,44516L,44517L,44518L,44519L,44520L,44521L,44522L,44523L,44524L, +44525L,44526L,44527L,44528L,44529L,44530L,44531L,44532L,44533L,44534L, +44535L,44536L,44537L,44538L,44539L,44540L,44541L,44542L,44543L,44544L, +44545L,44546L,44547L,44548L,44549L,44550L,44551L,44552L,44553L,44554L, +44555L,44556L,44557L,44558L,44559L,44560L,44561L,44562L,44563L,44564L, +44565L,44566L,44567L,44568L,44569L,44570L,44571L,44572L,44573L,44574L, +44575L,44576L,44577L,44578L,44579L,44580L,44581L,44582L,44583L,44584L, +44585L,44586L,44587L,44588L,44589L,44590L,44591L,44592L,44593L,44594L, +44595L,44596L,44597L,44598L,44599L,44600L,44601L,44602L,44603L,44604L, +44605L,44606L,44607L,44608L,44609L,44610L,44611L,44612L,44613L,44614L, +44615L,44616L,44617L,44618L,44619L,44620L,44621L,44622L,44623L,44624L, +44625L,44626L,44627L,44628L,44629L,44630L,44631L,44632L,44633L,44634L, +44635L,44636L,44637L,44638L,44639L,44640L,44641L,44642L,44643L,44644L, +44645L,44646L,44647L,44648L,44649L,44650L,44651L,44652L,44653L,44654L, +44655L,44656L,44657L,44658L,44659L,44660L,44661L,44662L,44663L,44664L, +44665L,44666L,44667L,44668L,44669L,44670L,44671L,44672L,44673L,44674L, +44675L,44676L,44677L,44678L,44679L,44680L,44681L,44682L,44683L,44684L, +44685L,44686L,44687L,44688L,44689L,44690L,44691L,44692L,44693L,44694L, +44695L,44696L,44697L,44698L,44699L,44700L,44701L,44702L,44703L,44704L, +44705L,44706L,44707L,44708L,44709L,44710L,44711L,44712L,44713L,44714L, +44715L,44716L,44717L,44718L,44719L,44720L,44721L,44722L,44723L,44724L, +44725L,44726L,44727L,44728L,44729L,44730L,44731L,44732L,44733L,44734L, +44735L,44736L,44737L,44738L,44739L,44740L,44741L,44742L,44743L,44744L, +44745L,44746L,44747L,44748L,44749L,44750L,44751L,44752L,44753L,44754L, +44755L,44756L,44757L,44758L,44759L,44760L,44761L,44762L,44763L,44764L, +44765L,44766L,44767L,44768L,44769L,44770L,44771L,44772L,44773L,44774L, +44775L,44776L,44777L,44778L,44779L,44780L,44781L,44782L,44783L,44784L, +44785L,44786L,44787L,44788L,44789L,44790L,44791L,44792L,44793L,44794L, +44795L,44796L,44797L,44798L,44799L,44800L,44801L,44802L,44803L,44804L, +44805L,44806L,44807L,44808L,44809L,44810L,44811L,44812L,44813L,44814L, +44815L,44816L,44817L,44818L,44819L,44820L,44821L,44822L,44823L,44824L, +44825L,44826L,44827L,44828L,44829L,44830L,44831L,44832L,44833L,44834L, +44835L,44836L,44837L,44838L,44839L,44840L,44841L,44842L,44843L,44844L, +44845L,44846L,44847L,44848L,44849L,44850L,44851L,44852L,44853L,44854L, +44855L,44856L,44857L,44858L,44859L,44860L,44861L,44862L,44863L,44864L, +44865L,44866L,44867L,44868L,44869L,44870L,44871L,44872L,44873L,44874L, +44875L,44876L,44877L,44878L,44879L,44880L,44881L,44882L,44883L,44884L, +44885L,44886L,44887L,44888L,44889L,44890L,44891L,44892L,44893L,44894L, +44895L,44896L,44897L,44898L,44899L,44900L,44901L,44902L,44903L,44904L, +44905L,44906L,44907L,44908L,44909L,44910L,44911L,44912L,44913L,44914L, +44915L,44916L,44917L,44918L,44919L,44920L,44921L,44922L,44923L,44924L, +44925L,44926L,44927L,44928L,44929L,44930L,44931L,44932L,44933L,44934L, +44935L,44936L,44937L,44938L,44939L,44940L,44941L,44942L,44943L,44944L, +44945L,44946L,44947L,44948L,44949L,44950L,44951L,44952L,44953L,44954L, +44955L,44956L,44957L,44958L,44959L,44960L,44961L,44962L,44963L,44964L, +44965L,44966L,44967L,44968L,44969L,44970L,44971L,44972L,44973L,44974L, +44975L,44976L,44977L,44978L,44979L,44980L,44981L,44982L,44983L,44984L, +44985L,44986L,44987L,44988L,44989L,44990L,44991L,44992L,44993L,44994L, +44995L,44996L,44997L,44998L,44999L,45000L,45001L,45002L,45003L,45004L, +45005L,45006L,45007L,45008L,45009L,45010L,45011L,45012L,45013L,45014L, +45015L,45016L,45017L,45018L,45019L,45020L,45021L,45022L,45023L,45024L, +45025L,45026L,45027L,45028L,45029L,45030L,45031L,45032L,45033L,45034L, +45035L,45036L,45037L,45038L,45039L,45040L,45041L,45042L,45043L,45044L, +45045L,45046L,45047L,45048L,45049L,45050L,45051L,45052L,45053L,45054L, +45055L,45056L,45057L,45058L,45059L,45060L,45061L,45062L,45063L,45064L, +45065L,45066L,45067L,45068L,45069L,45070L,45071L,45072L,45073L,45074L, +45075L,45076L,45077L,45078L,45079L,45080L,45081L,45082L,45083L,45084L, +45085L,45086L,45087L,45088L,45089L,45090L,45091L,45092L,45093L,45094L, +45095L,45096L,45097L,45098L,45099L,45100L,45101L,45102L,45103L,45104L, +45105L,45106L,45107L,45108L,45109L,45110L,45111L,45112L,45113L,45114L, +45115L,45116L,45117L,45118L,45119L,45120L,45121L,45122L,45123L,45124L, +45125L,45126L,45127L,45128L,45129L,45130L,45131L,45132L,45133L,45134L, +45135L,45136L,45137L,45138L,45139L,45140L,45141L,45142L,45143L,45144L, +45145L,45146L,45147L,45148L,45149L,45150L,45151L,45152L,45153L,45154L, +45155L,45156L,45157L,45158L,45159L,45160L,45161L,45162L,45163L,45164L, +45165L,45166L,45167L,45168L,45169L,45170L,45171L,45172L,45173L,45174L, +45175L,45176L,45177L,45178L,45179L,45180L,45181L,45182L,45183L,45184L, +45185L,45186L,45187L,45188L,45189L,45190L,45191L,45192L,45193L,45194L, +45195L,45196L,45197L,45198L,45199L,45200L,45201L,45202L,45203L,45204L, +45205L,45206L,45207L,45208L,45209L,45210L,45211L,45212L,45213L,45214L, +45215L,45216L,45217L,45218L,45219L,45220L,45221L,45222L,45223L,45224L, +45225L,45226L,45227L,45228L,45229L,45230L,45231L,45232L,45233L,45234L, +45235L,45236L,45237L,45238L,45239L,45240L,45241L,45242L,45243L,45244L, +45245L,45246L,45247L,45248L,45249L,45250L,45251L,45252L,45253L,45254L, +45255L,45256L,45257L,45258L,45259L,45260L,45261L,45262L,45263L,45264L, +45265L,45266L,45267L,45268L,45269L,45270L,45271L,45272L,45273L,45274L, +45275L,45276L,45277L,45278L,45279L,45280L,45281L,45282L,45283L,45284L, +45285L,45286L,45287L,45288L,45289L,45290L,45291L,45292L,45293L,45294L, +45295L,45296L,45297L,45298L,45299L,45300L,45301L,45302L,45303L,45304L, +45305L,45306L,45307L,45308L,45309L,45310L,45311L,45312L,45313L,45314L, +45315L,45316L,45317L,45318L,45319L,45320L,45321L,45322L,45323L,45324L, +45325L,45326L,45327L,45328L,45329L,45330L,45331L,45332L,45333L,45334L, +45335L,45336L,45337L,45338L,45339L,45340L,45341L,45342L,45343L,45344L, +45345L,45346L,45347L,45348L,45349L,45350L,45351L,45352L,45353L,45354L, +45355L,45356L,45357L,45358L,45359L,45360L,45361L,45362L,45363L,45364L, +45365L,45366L,45367L,45368L,45369L,45370L,45371L,45372L,45373L,45374L, +45375L,45376L,45377L,45378L,45379L,45380L,45381L,45382L,45383L,45384L, +45385L,45386L,45387L,45388L,45389L,45390L,45391L,45392L,45393L,45394L, +45395L,45396L,45397L,45398L,45399L,45400L,45401L,45402L,45403L,45404L, +45405L,45406L,45407L,45408L,45409L,45410L,45411L,45412L,45413L,45414L, +45415L,45416L,45417L,45418L,45419L,45420L,45421L,45422L,45423L,45424L, +45425L,45426L,45427L,45428L,45429L,45430L,45431L,45432L,45433L,45434L, +45435L,45436L,45437L,45438L,45439L,45440L,45441L,45442L,45443L,45444L, +45445L,45446L,45447L,45448L,45449L,45450L,45451L,45452L,45453L,45454L, +45455L,45456L,45457L,45458L,45459L,45460L,45461L,45462L,45463L,45464L, +45465L,45466L,45467L,45468L,45469L,45470L,45471L,45472L,45473L,45474L, +45475L,45476L,45477L,45478L,45479L,45480L,45481L,45482L,45483L,45484L, +45485L,45486L,45487L,45488L,45489L,45490L,45491L,45492L,45493L,45494L, +45495L,45496L,45497L,45498L,45499L,45500L,45501L,45502L,45503L,45504L, +45505L,45506L,45507L,45508L,45509L,45510L,45511L,45512L,45513L,45514L, +45515L,45516L,45517L,45518L,45519L,45520L,45521L,45522L,45523L,45524L, +45525L,45526L,45527L,45528L,45529L,45530L,45531L,45532L,45533L,45534L, +45535L,45536L,45537L,45538L,45539L,45540L,45541L,45542L,45543L,45544L, +45545L,45546L,45547L,45548L,45549L,45550L,45551L,45552L,45553L,45554L, +45555L,45556L,45557L,45558L,45559L,45560L,45561L,45562L,45563L,45564L, +45565L,45566L,45567L,45568L,45569L,45570L,45571L,45572L,45573L,45574L, +45575L,45576L,45577L,45578L,45579L,45580L,45581L,45582L,45583L,45584L, +45585L,45586L,45587L,45588L,45589L,45590L,45591L,45592L,45593L,45594L, +45595L,45596L,45597L,45598L,45599L,45600L,45601L,45602L,45603L,45604L, +45605L,45606L,45607L,45608L,45609L,45610L,45611L,45612L,45613L,45614L, +45615L,45616L,45617L,45618L,45619L,45620L,45621L,45622L,45623L,45624L, +45625L,45626L,45627L,45628L,45629L,45630L,45631L,45632L,45633L,45634L, +45635L,45636L,45637L,45638L,45639L,45640L,45641L,45642L,45643L,45644L, +45645L,45646L,45647L,45648L,45649L,45650L,45651L,45652L,45653L,45654L, +45655L,45656L,45657L,45658L,45659L,45660L,45661L,45662L,45663L,45664L, +45665L,45666L,45667L,45668L,45669L,45670L,45671L,45672L,45673L,45674L, +45675L,45676L,45677L,45678L,45679L,45680L,45681L,45682L,45683L,45684L, +45685L,45686L,45687L,45688L,45689L,45690L,45691L,45692L,45693L,45694L, +45695L,45696L,45697L,45698L,45699L,45700L,45701L,45702L,45703L,45704L, +45705L,45706L,45707L,45708L,45709L,45710L,45711L,45712L,45713L,45714L, +45715L,45716L,45717L,45718L,45719L,45720L,45721L,45722L,45723L,45724L, +45725L,45726L,45727L,45728L,45729L,45730L,45731L,45732L,45733L,45734L, +45735L,45736L,45737L,45738L,45739L,45740L,45741L,45742L,45743L,45744L, +45745L,45746L,45747L,45748L,45749L,45750L,45751L,45752L,45753L,45754L, +45755L,45756L,45757L,45758L,45759L,45760L,45761L,45762L,45763L,45764L, +45765L,45766L,45767L,45768L,45769L,45770L,45771L,45772L,45773L,45774L, +45775L,45776L,45777L,45778L,45779L,45780L,45781L,45782L,45783L,45784L, +45785L,45786L,45787L,45788L,45789L,45790L,45791L,45792L,45793L,45794L, +45795L,45796L,45797L,45798L,45799L,45800L,45801L,45802L,45803L,45804L, +45805L,45806L,45807L,45808L,45809L,45810L,45811L,45812L,45813L,45814L, +45815L,45816L,45817L,45818L,45819L,45820L,45821L,45822L,45823L,45824L, +45825L,45826L,45827L,45828L,45829L,45830L,45831L,45832L,45833L,45834L, +45835L,45836L,45837L,45838L,45839L,45840L,45841L,45842L,45843L,45844L, +45845L,45846L,45847L,45848L,45849L,45850L,45851L,45852L,45853L,45854L, +45855L,45856L,45857L,45858L,45859L,45860L,45861L,45862L,45863L,45864L, +45865L,45866L,45867L,45868L,45869L,45870L,45871L,45872L,45873L,45874L, +45875L,45876L,45877L,45878L,45879L,45880L,45881L,45882L,45883L,45884L, +45885L,45886L,45887L,45888L,45889L,45890L,45891L,45892L,45893L,45894L, +45895L,45896L,45897L,45898L,45899L,45900L,45901L,45902L,45903L,45904L, +45905L,45906L,45907L,45908L,45909L,45910L,45911L,45912L,45913L,45914L, +45915L,45916L,45917L,45918L,45919L,45920L,45921L,45922L,45923L,45924L, +45925L,45926L,45927L,45928L,45929L,45930L,45931L,45932L,45933L,45934L, +45935L,45936L,45937L,45938L,45939L,45940L,45941L,45942L,45943L,45944L, +45945L,45946L,45947L,45948L,45949L,45950L,45951L,45952L,45953L,45954L, +45955L,45956L,45957L,45958L,45959L,45960L,45961L,45962L,45963L,45964L, +45965L,45966L,45967L,45968L,45969L,45970L,45971L,45972L,45973L,45974L, +45975L,45976L,45977L,45978L,45979L,45980L,45981L,45982L,45983L,45984L, +45985L,45986L,45987L,45988L,45989L,45990L,45991L,45992L,45993L,45994L, +45995L,45996L,45997L,45998L,45999L,46000L,46001L,46002L,46003L,46004L, +46005L,46006L,46007L,46008L,46009L,46010L,46011L,46012L,46013L,46014L, +46015L,46016L,46017L,46018L,46019L,46020L,46021L,46022L,46023L,46024L, +46025L,46026L,46027L,46028L,46029L,46030L,46031L,46032L,46033L,46034L, +46035L,46036L,46037L,46038L,46039L,46040L,46041L,46042L,46043L,46044L, +46045L,46046L,46047L,46048L,46049L,46050L,46051L,46052L,46053L,46054L, +46055L,46056L,46057L,46058L,46059L,46060L,46061L,46062L,46063L,46064L, +46065L,46066L,46067L,46068L,46069L,46070L,46071L,46072L,46073L,46074L, +46075L,46076L,46077L,46078L,46079L,46080L,46081L,46082L,46083L,46084L, +46085L,46086L,46087L,46088L,46089L,46090L,46091L,46092L,46093L,46094L, +46095L,46096L,46097L,46098L,46099L,46100L,46101L,46102L,46103L,46104L, +46105L,46106L,46107L,46108L,46109L,46110L,46111L,46112L,46113L,46114L, +46115L,46116L,46117L,46118L,46119L,46120L,46121L,46122L,46123L,46124L, +46125L,46126L,46127L,46128L,46129L,46130L,46131L,46132L,46133L,46134L, +46135L,46136L,46137L,46138L,46139L,46140L,46141L,46142L,46143L,46144L, +46145L,46146L,46147L,46148L,46149L,46150L,46151L,46152L,46153L,46154L, +46155L,46156L,46157L,46158L,46159L,46160L,46161L,46162L,46163L,46164L, +46165L,46166L,46167L,46168L,46169L,46170L,46171L,46172L,46173L,46174L, +46175L,46176L,46177L,46178L,46179L,46180L,46181L,46182L,46183L,46184L, +46185L,46186L,46187L,46188L,46189L,46190L,46191L,46192L,46193L,46194L, +46195L,46196L,46197L,46198L,46199L,46200L,46201L,46202L,46203L,46204L, +46205L,46206L,46207L,46208L,46209L,46210L,46211L,46212L,46213L,46214L, +46215L,46216L,46217L,46218L,46219L,46220L,46221L,46222L,46223L,46224L, +46225L,46226L,46227L,46228L,46229L,46230L,46231L,46232L,46233L,46234L, +46235L,46236L,46237L,46238L,46239L,46240L,46241L,46242L,46243L,46244L, +46245L,46246L,46247L,46248L,46249L,46250L,46251L,46252L,46253L,46254L, +46255L,46256L,46257L,46258L,46259L,46260L,46261L,46262L,46263L,46264L, +46265L,46266L,46267L,46268L,46269L,46270L,46271L,46272L,46273L,46274L, +46275L,46276L,46277L,46278L,46279L,46280L,46281L,46282L,46283L,46284L, +46285L,46286L,46287L,46288L,46289L,46290L,46291L,46292L,46293L,46294L, +46295L,46296L,46297L,46298L,46299L,46300L,46301L,46302L,46303L,46304L, +46305L,46306L,46307L,46308L,46309L,46310L,46311L,46312L,46313L,46314L, +46315L,46316L,46317L,46318L,46319L,46320L,46321L,46322L,46323L,46324L, +46325L,46326L,46327L,46328L,46329L,46330L,46331L,46332L,46333L,46334L, +46335L,46336L,46337L,46338L,46339L,46340L,46341L,46342L,46343L,46344L, +46345L,46346L,46347L,46348L,46349L,46350L,46351L,46352L,46353L,46354L, +46355L,46356L,46357L,46358L,46359L,46360L,46361L,46362L,46363L,46364L, +46365L,46366L,46367L,46368L,46369L,46370L,46371L,46372L,46373L,46374L, +46375L,46376L,46377L,46378L,46379L,46380L,46381L,46382L,46383L,46384L, +46385L,46386L,46387L,46388L,46389L,46390L,46391L,46392L,46393L,46394L, +46395L,46396L,46397L,46398L,46399L,46400L,46401L,46402L,46403L,46404L, +46405L,46406L,46407L,46408L,46409L,46410L,46411L,46412L,46413L,46414L, +46415L,46416L,46417L,46418L,46419L,46420L,46421L,46422L,46423L,46424L, +46425L,46426L,46427L,46428L,46429L,46430L,46431L,46432L,46433L,46434L, +46435L,46436L,46437L,46438L,46439L,46440L,46441L,46442L,46443L,46444L, +46445L,46446L,46447L,46448L,46449L,46450L,46451L,46452L,46453L,46454L, +46455L,46456L,46457L,46458L,46459L,46460L,46461L,46462L,46463L,46464L, +46465L,46466L,46467L,46468L,46469L,46470L,46471L,46472L,46473L,46474L, +46475L,46476L,46477L,46478L,46479L,46480L,46481L,46482L,46483L,46484L, +46485L,46486L,46487L,46488L,46489L,46490L,46491L,46492L,46493L,46494L, +46495L,46496L,46497L,46498L,46499L,46500L,46501L,46502L,46503L,46504L, +46505L,46506L,46507L,46508L,46509L,46510L,46511L,46512L,46513L,46514L, +46515L,46516L,46517L,46518L,46519L,46520L,46521L,46522L,46523L,46524L, +46525L,46526L,46527L,46528L,46529L,46530L,46531L,46532L,46533L,46534L, +46535L,46536L,46537L,46538L,46539L,46540L,46541L,46542L,46543L,46544L, +46545L,46546L,46547L,46548L,46549L,46550L,46551L,46552L,46553L,46554L, +46555L,46556L,46557L,46558L,46559L,46560L,46561L,46562L,46563L,46564L, +46565L,46566L,46567L,46568L,46569L,46570L,46571L,46572L,46573L,46574L, +46575L,46576L,46577L,46578L,46579L,46580L,46581L,46582L,46583L,46584L, +46585L,46586L,46587L,46588L,46589L,46590L,46591L,46592L,46593L,46594L, +46595L,46596L,46597L,46598L,46599L,46600L,46601L,46602L,46603L,46604L, +46605L,46606L,46607L,46608L,46609L,46610L,46611L,46612L,46613L,46614L, +46615L,46616L,46617L,46618L,46619L,46620L,46621L,46622L,46623L,46624L, +46625L,46626L,46627L,46628L,46629L,46630L,46631L,46632L,46633L,46634L, +46635L,46636L,46637L,46638L,46639L,46640L,46641L,46642L,46643L,46644L, +46645L,46646L,46647L,46648L,46649L,46650L,46651L,46652L,46653L,46654L, +46655L,46656L,46657L,46658L,46659L,46660L,46661L,46662L,46663L,46664L, +46665L,46666L,46667L,46668L,46669L,46670L,46671L,46672L,46673L,46674L, +46675L,46676L,46677L,46678L,46679L,46680L,46681L,46682L,46683L,46684L, +46685L,46686L,46687L,46688L,46689L,46690L,46691L,46692L,46693L,46694L, +46695L,46696L,46697L,46698L,46699L,46700L,46701L,46702L,46703L,46704L, +46705L,46706L,46707L,46708L,46709L,46710L,46711L,46712L,46713L,46714L, +46715L,46716L,46717L,46718L,46719L,46720L,46721L,46722L,46723L,46724L, +46725L,46726L,46727L,46728L,46729L,46730L,46731L,46732L,46733L,46734L, +46735L,46736L,46737L,46738L,46739L,46740L,46741L,46742L,46743L,46744L, +46745L,46746L,46747L,46748L,46749L,46750L,46751L,46752L,46753L,46754L, +46755L,46756L,46757L,46758L,46759L,46760L,46761L,46762L,46763L,46764L, +46765L,46766L,46767L,46768L,46769L,46770L,46771L,46772L,46773L,46774L, +46775L,46776L,46777L,46778L,46779L,46780L,46781L,46782L,46783L,46784L, +46785L,46786L,46787L,46788L,46789L,46790L,46791L,46792L,46793L,46794L, +46795L,46796L,46797L,46798L,46799L,46800L,46801L,46802L,46803L,46804L, +46805L,46806L,46807L,46808L,46809L,46810L,46811L,46812L,46813L,46814L, +46815L,46816L,46817L,46818L,46819L,46820L,46821L,46822L,46823L,46824L, +46825L,46826L,46827L,46828L,46829L,46830L,46831L,46832L,46833L,46834L, +46835L,46836L,46837L,46838L,46839L,46840L,46841L,46842L,46843L,46844L, +46845L,46846L,46847L,46848L,46849L,46850L,46851L,46852L,46853L,46854L, +46855L,46856L,46857L,46858L,46859L,46860L,46861L,46862L,46863L,46864L, +46865L,46866L,46867L,46868L,46869L,46870L,46871L,46872L,46873L,46874L, +46875L,46876L,46877L,46878L,46879L,46880L,46881L,46882L,46883L,46884L, +46885L,46886L,46887L,46888L,46889L,46890L,46891L,46892L,46893L,46894L, +46895L,46896L,46897L,46898L,46899L,46900L,46901L,46902L,46903L,46904L, +46905L,46906L,46907L,46908L,46909L,46910L,46911L,46912L,46913L,46914L, +46915L,46916L,46917L,46918L,46919L,46920L,46921L,46922L,46923L,46924L, +46925L,46926L,46927L,46928L,46929L,46930L,46931L,46932L,46933L,46934L, +46935L,46936L,46937L,46938L,46939L,46940L,46941L,46942L,46943L,46944L, +46945L,46946L,46947L,46948L,46949L,46950L,46951L,46952L,46953L,46954L, +46955L,46956L,46957L,46958L,46959L,46960L,46961L,46962L,46963L,46964L, +46965L,46966L,46967L,46968L,46969L,46970L,46971L,46972L,46973L,46974L, +46975L,46976L,46977L,46978L,46979L,46980L,46981L,46982L,46983L,46984L, +46985L,46986L,46987L,46988L,46989L,46990L,46991L,46992L,46993L,46994L, +46995L,46996L,46997L,46998L,46999L,47000L,47001L,47002L,47003L,47004L, +47005L,47006L,47007L,47008L,47009L,47010L,47011L,47012L,47013L,47014L, +47015L,47016L,47017L,47018L,47019L,47020L,47021L,47022L,47023L,47024L, +47025L,47026L,47027L,47028L,47029L,47030L,47031L,47032L,47033L,47034L, +47035L,47036L,47037L,47038L,47039L,47040L,47041L,47042L,47043L,47044L, +47045L,47046L,47047L,47048L,47049L,47050L,47051L,47052L,47053L,47054L, +47055L,47056L,47057L,47058L,47059L,47060L,47061L,47062L,47063L,47064L, +47065L,47066L,47067L,47068L,47069L,47070L,47071L,47072L,47073L,47074L, +47075L,47076L,47077L,47078L,47079L,47080L,47081L,47082L,47083L,47084L, +47085L,47086L,47087L,47088L,47089L,47090L,47091L,47092L,47093L,47094L, +47095L,47096L,47097L,47098L,47099L,47100L,47101L,47102L,47103L,47104L, +47105L,47106L,47107L,47108L,47109L,47110L,47111L,47112L,47113L,47114L, +47115L,47116L,47117L,47118L,47119L,47120L,47121L,47122L,47123L,47124L, +47125L,47126L,47127L,47128L,47129L,47130L,47131L,47132L,47133L,47134L, +47135L,47136L,47137L,47138L,47139L,47140L,47141L,47142L,47143L,47144L, +47145L,47146L,47147L,47148L,47149L,47150L,47151L,47152L,47153L,47154L, +47155L,47156L,47157L,47158L,47159L,47160L,47161L,47162L,47163L,47164L, +47165L,47166L,47167L,47168L,47169L,47170L,47171L,47172L,47173L,47174L, +47175L,47176L,47177L,47178L,47179L,47180L,47181L,47182L,47183L,47184L, +47185L,47186L,47187L,47188L,47189L,47190L,47191L,47192L,47193L,47194L, +47195L,47196L,47197L,47198L,47199L,47200L,47201L,47202L,47203L,47204L, +47205L,47206L,47207L,47208L,47209L,47210L,47211L,47212L,47213L,47214L, +47215L,47216L,47217L,47218L,47219L,47220L,47221L,47222L,47223L,47224L, +47225L,47226L,47227L,47228L,47229L,47230L,47231L,47232L,47233L,47234L, +47235L,47236L,47237L,47238L,47239L,47240L,47241L,47242L,47243L,47244L, +47245L,47246L,47247L,47248L,47249L,47250L,47251L,47252L,47253L,47254L, +47255L,47256L,47257L,47258L,47259L,47260L,47261L,47262L,47263L,47264L, +47265L,47266L,47267L,47268L,47269L,47270L,47271L,47272L,47273L,47274L, +47275L,47276L,47277L,47278L,47279L,47280L,47281L,47282L,47283L,47284L, +47285L,47286L,47287L,47288L,47289L,47290L,47291L,47292L,47293L,47294L, +47295L,47296L,47297L,47298L,47299L,47300L,47301L,47302L,47303L,47304L, +47305L,47306L,47307L,47308L,47309L,47310L,47311L,47312L,47313L,47314L, +47315L,47316L,47317L,47318L,47319L,47320L,47321L,47322L,47323L,47324L, +47325L,47326L,47327L,47328L,47329L,47330L,47331L,47332L,47333L,47334L, +47335L,47336L,47337L,47338L,47339L,47340L,47341L,47342L,47343L,47344L, +47345L,47346L,47347L,47348L,47349L,47350L,47351L,47352L,47353L,47354L, +47355L,47356L,47357L,47358L,47359L,47360L,47361L,47362L,47363L,47364L, +47365L,47366L,47367L,47368L,47369L,47370L,47371L,47372L,47373L,47374L, +47375L,47376L,47377L,47378L,47379L,47380L,47381L,47382L,47383L,47384L, +47385L,47386L,47387L,47388L,47389L,47390L,47391L,47392L,47393L,47394L, +47395L,47396L,47397L,47398L,47399L,47400L,47401L,47402L,47403L,47404L, +47405L,47406L,47407L,47408L,47409L,47410L,47411L,47412L,47413L,47414L, +47415L,47416L,47417L,47418L,47419L,47420L,47421L,47422L,47423L,47424L, +47425L,47426L,47427L,47428L,47429L,47430L,47431L,47432L,47433L,47434L, +47435L,47436L,47437L,47438L,47439L,47440L,47441L,47442L,47443L,47444L, +47445L,47446L,47447L,47448L,47449L,47450L,47451L,47452L,47453L,47454L, +47455L,47456L,47457L,47458L,47459L,47460L,47461L,47462L,47463L,47464L, +47465L,47466L,47467L,47468L,47469L,47470L,47471L,47472L,47473L,47474L, +47475L,47476L,47477L,47478L,47479L,47480L,47481L,47482L,47483L,47484L, +47485L,47486L,47487L,47488L,47489L,47490L,47491L,47492L,47493L,47494L, +47495L,47496L,47497L,47498L,47499L,47500L,47501L,47502L,47503L,47504L, +47505L,47506L,47507L,47508L,47509L,47510L,47511L,47512L,47513L,47514L, +47515L,47516L,47517L,47518L,47519L,47520L,47521L,47522L,47523L,47524L, +47525L,47526L,47527L,47528L,47529L,47530L,47531L,47532L,47533L,47534L, +47535L,47536L,47537L,47538L,47539L,47540L,47541L,47542L,47543L,47544L, +47545L,47546L,47547L,47548L,47549L,47550L,47551L,47552L,47553L,47554L, +47555L,47556L,47557L,47558L,47559L,47560L,47561L,47562L,47563L,47564L, +47565L,47566L,47567L,47568L,47569L,47570L,47571L,47572L,47573L,47574L, +47575L,47576L,47577L,47578L,47579L,47580L,47581L,47582L,47583L,47584L, +47585L,47586L,47587L,47588L,47589L,47590L,47591L,47592L,47593L,47594L, +47595L,47596L,47597L,47598L,47599L,47600L,47601L,47602L,47603L,47604L, +47605L,47606L,47607L,47608L,47609L,47610L,47611L,47612L,47613L,47614L, +47615L,47616L,47617L,47618L,47619L,47620L,47621L,47622L,47623L,47624L, +47625L,47626L,47627L,47628L,47629L,47630L,47631L,47632L,47633L,47634L, +47635L,47636L,47637L,47638L,47639L,47640L,47641L,47642L,47643L,47644L, +47645L,47646L,47647L,47648L,47649L,47650L,47651L,47652L,47653L,47654L, +47655L,47656L,47657L,47658L,47659L,47660L,47661L,47662L,47663L,47664L, +47665L,47666L,47667L,47668L,47669L,47670L,47671L,47672L,47673L,47674L, +47675L,47676L,47677L,47678L,47679L,47680L,47681L,47682L,47683L,47684L, +47685L,47686L,47687L,47688L,47689L,47690L,47691L,47692L,47693L,47694L, +47695L,47696L,47697L,47698L,47699L,47700L,47701L,47702L,47703L,47704L, +47705L,47706L,47707L,47708L,47709L,47710L,47711L,47712L,47713L,47714L, +47715L,47716L,47717L,47718L,47719L,47720L,47721L,47722L,47723L,47724L, +47725L,47726L,47727L,47728L,47729L,47730L,47731L,47732L,47733L,47734L, +47735L,47736L,47737L,47738L,47739L,47740L,47741L,47742L,47743L,47744L, +47745L,47746L,47747L,47748L,47749L,47750L,47751L,47752L,47753L,47754L, +47755L,47756L,47757L,47758L,47759L,47760L,47761L,47762L,47763L,47764L, +47765L,47766L,47767L,47768L,47769L,47770L,47771L,47772L,47773L,47774L, +47775L,47776L,47777L,47778L,47779L,47780L,47781L,47782L,47783L,47784L, +47785L,47786L,47787L,47788L,47789L,47790L,47791L,47792L,47793L,47794L, +47795L,47796L,47797L,47798L,47799L,47800L,47801L,47802L,47803L,47804L, +47805L,47806L,47807L,47808L,47809L,47810L,47811L,47812L,47813L,47814L, +47815L,47816L,47817L,47818L,47819L,47820L,47821L,47822L,47823L,47824L, +47825L,47826L,47827L,47828L,47829L,47830L,47831L,47832L,47833L,47834L, +47835L,47836L,47837L,47838L,47839L,47840L,47841L,47842L,47843L,47844L, +47845L,47846L,47847L,47848L,47849L,47850L,47851L,47852L,47853L,47854L, +47855L,47856L,47857L,47858L,47859L,47860L,47861L,47862L,47863L,47864L, +47865L,47866L,47867L,47868L,47869L,47870L,47871L,47872L,47873L,47874L, +47875L,47876L,47877L,47878L,47879L,47880L,47881L,47882L,47883L,47884L, +47885L,47886L,47887L,47888L,47889L,47890L,47891L,47892L,47893L,47894L, +47895L,47896L,47897L,47898L,47899L,47900L,47901L,47902L,47903L,47904L, +47905L,47906L,47907L,47908L,47909L,47910L,47911L,47912L,47913L,47914L, +47915L,47916L,47917L,47918L,47919L,47920L,47921L,47922L,47923L,47924L, +47925L,47926L,47927L,47928L,47929L,47930L,47931L,47932L,47933L,47934L, +47935L,47936L,47937L,47938L,47939L,47940L,47941L,47942L,47943L,47944L, +47945L,47946L,47947L,47948L,47949L,47950L,47951L,47952L,47953L,47954L, +47955L,47956L,47957L,47958L,47959L,47960L,47961L,47962L,47963L,47964L, +47965L,47966L,47967L,47968L,47969L,47970L,47971L,47972L,47973L,47974L, +47975L,47976L,47977L,47978L,47979L,47980L,47981L,47982L,47983L,47984L, +47985L,47986L,47987L,47988L,47989L,47990L,47991L,47992L,47993L,47994L, +47995L,47996L,47997L,47998L,47999L,48000L,48001L,48002L,48003L,48004L, +48005L,48006L,48007L,48008L,48009L,48010L,48011L,48012L,48013L,48014L, +48015L,48016L,48017L,48018L,48019L,48020L,48021L,48022L,48023L,48024L, +48025L,48026L,48027L,48028L,48029L,48030L,48031L,48032L,48033L,48034L, +48035L,48036L,48037L,48038L,48039L,48040L,48041L,48042L,48043L,48044L, +48045L,48046L,48047L,48048L,48049L,48050L,48051L,48052L,48053L,48054L, +48055L,48056L,48057L,48058L,48059L,48060L,48061L,48062L,48063L,48064L, +48065L,48066L,48067L,48068L,48069L,48070L,48071L,48072L,48073L,48074L, +48075L,48076L,48077L,48078L,48079L,48080L,48081L,48082L,48083L,48084L, +48085L,48086L,48087L,48088L,48089L,48090L,48091L,48092L,48093L,48094L, +48095L,48096L,48097L,48098L,48099L,48100L,48101L,48102L,48103L,48104L, +48105L,48106L,48107L,48108L,48109L,48110L,48111L,48112L,48113L,48114L, +48115L,48116L,48117L,48118L,48119L,48120L,48121L,48122L,48123L,48124L, +48125L,48126L,48127L,48128L,48129L,48130L,48131L,48132L,48133L,48134L, +48135L,48136L,48137L,48138L,48139L,48140L,48141L,48142L,48143L,48144L, +48145L,48146L,48147L,48148L,48149L,48150L,48151L,48152L,48153L,48154L, +48155L,48156L,48157L,48158L,48159L,48160L,48161L,48162L,48163L,48164L, +48165L,48166L,48167L,48168L,48169L,48170L,48171L,48172L,48173L,48174L, +48175L,48176L,48177L,48178L,48179L,48180L,48181L,48182L,48183L,48184L, +48185L,48186L,48187L,48188L,48189L,48190L,48191L,48192L,48193L,48194L, +48195L,48196L,48197L,48198L,48199L,48200L,48201L,48202L,48203L,48204L, +48205L,48206L,48207L,48208L,48209L,48210L,48211L,48212L,48213L,48214L, +48215L,48216L,48217L,48218L,48219L,48220L,48221L,48222L,48223L,48224L, +48225L,48226L,48227L,48228L,48229L,48230L,48231L,48232L,48233L,48234L, +48235L,48236L,48237L,48238L,48239L,48240L,48241L,48242L,48243L,48244L, +48245L,48246L,48247L,48248L,48249L,48250L,48251L,48252L,48253L,48254L, +48255L,48256L,48257L,48258L,48259L,48260L,48261L,48262L,48263L,48264L, +48265L,48266L,48267L,48268L,48269L,48270L,48271L,48272L,48273L,48274L, +48275L,48276L,48277L,48278L,48279L,48280L,48281L,48282L,48283L,48284L, +48285L,48286L,48287L,48288L,48289L,48290L,48291L,48292L,48293L,48294L, +48295L,48296L,48297L,48298L,48299L,48300L,48301L,48302L,48303L,48304L, +48305L,48306L,48307L,48308L,48309L,48310L,48311L,48312L,48313L,48314L, +48315L,48316L,48317L,48318L,48319L,48320L,48321L,48322L,48323L,48324L, +48325L,48326L,48327L,48328L,48329L,48330L,48331L,48332L,48333L,48334L, +48335L,48336L,48337L,48338L,48339L,48340L,48341L,48342L,48343L,48344L, +48345L,48346L,48347L,48348L,48349L,48350L,48351L,48352L,48353L,48354L, +48355L,48356L,48357L,48358L,48359L,48360L,48361L,48362L,48363L,48364L, +48365L,48366L,48367L,48368L,48369L,48370L,48371L,48372L,48373L,48374L, +48375L,48376L,48377L,48378L,48379L,48380L,48381L,48382L,48383L,48384L, +48385L,48386L,48387L,48388L,48389L,48390L,48391L,48392L,48393L,48394L, +48395L,48396L,48397L,48398L,48399L,48400L,48401L,48402L,48403L,48404L, +48405L,48406L,48407L,48408L,48409L,48410L,48411L,48412L,48413L,48414L, +48415L,48416L,48417L,48418L,48419L,48420L,48421L,48422L,48423L,48424L, +48425L,48426L,48427L,48428L,48429L,48430L,48431L,48432L,48433L,48434L, +48435L,48436L,48437L,48438L,48439L,48440L,48441L,48442L,48443L,48444L, +48445L,48446L,48447L,48448L,48449L,48450L,48451L,48452L,48453L,48454L, +48455L,48456L,48457L,48458L,48459L,48460L,48461L,48462L,48463L,48464L, +48465L,48466L,48467L,48468L,48469L,48470L,48471L,48472L,48473L,48474L, +48475L,48476L,48477L,48478L,48479L,48480L,48481L,48482L,48483L,48484L, +48485L,48486L,48487L,48488L,48489L,48490L,48491L,48492L,48493L,48494L, +48495L,48496L,48497L,48498L,48499L,48500L,48501L,48502L,48503L,48504L, +48505L,48506L,48507L,48508L,48509L,48510L,48511L,48512L,48513L,48514L, +48515L,48516L,48517L,48518L,48519L,48520L,48521L,48522L,48523L,48524L, +48525L,48526L,48527L,48528L,48529L,48530L,48531L,48532L,48533L,48534L, +48535L,48536L,48537L,48538L,48539L,48540L,48541L,48542L,48543L,48544L, +48545L,48546L,48547L,48548L,48549L,48550L,48551L,48552L,48553L,48554L, +48555L,48556L,48557L,48558L,48559L,48560L,48561L,48562L,48563L,48564L, +48565L,48566L,48567L,48568L,48569L,48570L,48571L,48572L,48573L,48574L, +48575L,48576L,48577L,48578L,48579L,48580L,48581L,48582L,48583L,48584L, +48585L,48586L,48587L,48588L,48589L,48590L,48591L,48592L,48593L,48594L, +48595L,48596L,48597L,48598L,48599L,48600L,48601L,48602L,48603L,48604L, +48605L,48606L,48607L,48608L,48609L,48610L,48611L,48612L,48613L,48614L, +48615L,48616L,48617L,48618L,48619L,48620L,48621L,48622L,48623L,48624L, +48625L,48626L,48627L,48628L,48629L,48630L,48631L,48632L,48633L,48634L, +48635L,48636L,48637L,48638L,48639L,48640L,48641L,48642L,48643L,48644L, +48645L,48646L,48647L,48648L,48649L,48650L,48651L,48652L,48653L,48654L, +48655L,48656L,48657L,48658L,48659L,48660L,48661L,48662L,48663L,48664L, +48665L,48666L,48667L,48668L,48669L,48670L,48671L,48672L,48673L,48674L, +48675L,48676L,48677L,48678L,48679L,48680L,48681L,48682L,48683L,48684L, +48685L,48686L,48687L,48688L,48689L,48690L,48691L,48692L,48693L,48694L, +48695L,48696L,48697L,48698L,48699L,48700L,48701L,48702L,48703L,48704L, +48705L,48706L,48707L,48708L,48709L,48710L,48711L,48712L,48713L,48714L, +48715L,48716L,48717L,48718L,48719L,48720L,48721L,48722L,48723L,48724L, +48725L,48726L,48727L,48728L,48729L,48730L,48731L,48732L,48733L,48734L, +48735L,48736L,48737L,48738L,48739L,48740L,48741L,48742L,48743L,48744L, +48745L,48746L,48747L,48748L,48749L,48750L,48751L,48752L,48753L,48754L, +48755L,48756L,48757L,48758L,48759L,48760L,48761L,48762L,48763L,48764L, +48765L,48766L,48767L,48768L,48769L,48770L,48771L,48772L,48773L,48774L, +48775L,48776L,48777L,48778L,48779L,48780L,48781L,48782L,48783L,48784L, +48785L,48786L,48787L,48788L,48789L,48790L,48791L,48792L,48793L,48794L, +48795L,48796L,48797L,48798L,48799L,48800L,48801L,48802L,48803L,48804L, +48805L,48806L,48807L,48808L,48809L,48810L,48811L,48812L,48813L,48814L, +48815L,48816L,48817L,48818L,48819L,48820L,48821L,48822L,48823L,48824L, +48825L,48826L,48827L,48828L,48829L,48830L,48831L,48832L,48833L,48834L, +48835L,48836L,48837L,48838L,48839L,48840L,48841L,48842L,48843L,48844L, +48845L,48846L,48847L,48848L,48849L,48850L,48851L,48852L,48853L,48854L, +48855L,48856L,48857L,48858L,48859L,48860L,48861L,48862L,48863L,48864L, +48865L,48866L,48867L,48868L,48869L,48870L,48871L,48872L,48873L,48874L, +48875L,48876L,48877L,48878L,48879L,48880L,48881L,48882L,48883L,48884L, +48885L,48886L,48887L,48888L,48889L,48890L,48891L,48892L,48893L,48894L, +48895L,48896L,48897L,48898L,48899L,48900L,48901L,48902L,48903L,48904L, +48905L,48906L,48907L,48908L,48909L,48910L,48911L,48912L,48913L,48914L, +48915L,48916L,48917L,48918L,48919L,48920L,48921L,48922L,48923L,48924L, +48925L,48926L,48927L,48928L,48929L,48930L,48931L,48932L,48933L,48934L, +48935L,48936L,48937L,48938L,48939L,48940L,48941L,48942L,48943L,48944L, +48945L,48946L,48947L,48948L,48949L,48950L,48951L,48952L,48953L,48954L, +48955L,48956L,48957L,48958L,48959L,48960L,48961L,48962L,48963L,48964L, +48965L,48966L,48967L,48968L,48969L,48970L,48971L,48972L,48973L,48974L, +48975L,48976L,48977L,48978L,48979L,48980L,48981L,48982L,48983L,48984L, +48985L,48986L,48987L,48988L,48989L,48990L,48991L,48992L,48993L,48994L, +48995L,48996L,48997L,48998L,48999L,49000L,49001L,49002L,49003L,49004L, +49005L,49006L,49007L,49008L,49009L,49010L,49011L,49012L,49013L,49014L, +49015L,49016L,49017L,49018L,49019L,49020L,49021L,49022L,49023L,49024L, +49025L,49026L,49027L,49028L,49029L,49030L,49031L,49032L,49033L,49034L, +49035L,49036L,49037L,49038L,49039L,49040L,49041L,49042L,49043L,49044L, +49045L,49046L,49047L,49048L,49049L,49050L,49051L,49052L,49053L,49054L, +49055L,49056L,49057L,49058L,49059L,49060L,49061L,49062L,49063L,49064L, +49065L,49066L,49067L,49068L,49069L,49070L,49071L,49072L,49073L,49074L, +49075L,49076L,49077L,49078L,49079L,49080L,49081L,49082L,49083L,49084L, +49085L,49086L,49087L,49088L,49089L,49090L,49091L,49092L,49093L,49094L, +49095L,49096L,49097L,49098L,49099L,49100L,49101L,49102L,49103L,49104L, +49105L,49106L,49107L,49108L,49109L,49110L,49111L,49112L,49113L,49114L, +49115L,49116L,49117L,49118L,49119L,49120L,49121L,49122L,49123L,49124L, +49125L,49126L,49127L,49128L,49129L,49130L,49131L,49132L,49133L,49134L, +49135L,49136L,49137L,49138L,49139L,49140L,49141L,49142L,49143L,49144L, +49145L,49146L,49147L,49148L,49149L,49150L,49151L,49152L,49153L,49154L, +49155L,49156L,49157L,49158L,49159L,49160L,49161L,49162L,49163L,49164L, +49165L,49166L,49167L,49168L,49169L,49170L,49171L,49172L,49173L,49174L, +49175L,49176L,49177L,49178L,49179L,49180L,49181L,49182L,49183L,49184L, +49185L,49186L,49187L,49188L,49189L,49190L,49191L,49192L,49193L,49194L, +49195L,49196L,49197L,49198L,49199L,49200L,49201L,49202L,49203L,49204L, +49205L,49206L,49207L,49208L,49209L,49210L,49211L,49212L,49213L,49214L, +49215L,49216L,49217L,49218L,49219L,49220L,49221L,49222L,49223L,49224L, +49225L,49226L,49227L,49228L,49229L,49230L,49231L,49232L,49233L,49234L, +49235L,49236L,49237L,49238L,49239L,49240L,49241L,49242L,49243L,49244L, +49245L,49246L,49247L,49248L,49249L,49250L,49251L,49252L,49253L,49254L, +49255L,49256L,49257L,49258L,49259L,49260L,49261L,49262L,49263L,49264L, +49265L,49266L,49267L,49268L,49269L,49270L,49271L,49272L,49273L,49274L, +49275L,49276L,49277L,49278L,49279L,49280L,49281L,49282L,49283L,49284L, +49285L,49286L,49287L,49288L,49289L,49290L,49291L,49292L,49293L,49294L, +49295L,49296L,49297L,49298L,49299L,49300L,49301L,49302L,49303L,49304L, +49305L,49306L,49307L,49308L,49309L,49310L,49311L,49312L,49313L,49314L, +49315L,49316L,49317L,49318L,49319L,49320L,49321L,49322L,49323L,49324L, +49325L,49326L,49327L,49328L,49329L,49330L,49331L,49332L,49333L,49334L, +49335L,49336L,49337L,49338L,49339L,49340L,49341L,49342L,49343L,49344L, +49345L,49346L,49347L,49348L,49349L,49350L,49351L,49352L,49353L,49354L, +49355L,49356L,49357L,49358L,49359L,49360L,49361L,49362L,49363L,49364L, +49365L,49366L,49367L,49368L,49369L,49370L,49371L,49372L,49373L,49374L, +49375L,49376L,49377L,49378L,49379L,49380L,49381L,49382L,49383L,49384L, +49385L,49386L,49387L,49388L,49389L,49390L,49391L,49392L,49393L,49394L, +49395L,49396L,49397L,49398L,49399L,49400L,49401L,49402L,49403L,49404L, +49405L,49406L,49407L,49408L,49409L,49410L,49411L,49412L,49413L,49414L, +49415L,49416L,49417L,49418L,49419L,49420L,49421L,49422L,49423L,49424L, +49425L,49426L,49427L,49428L,49429L,49430L,49431L,49432L,49433L,49434L, +49435L,49436L,49437L,49438L,49439L,49440L,49441L,49442L,49443L,49444L, +49445L,49446L,49447L,49448L,49449L,49450L,49451L,49452L,49453L,49454L, +49455L,49456L,49457L,49458L,49459L,49460L,49461L,49462L,49463L,49464L, +49465L,49466L,49467L,49468L,49469L,49470L,49471L,49472L,49473L,49474L, +49475L,49476L,49477L,49478L,49479L,49480L,49481L,49482L,49483L,49484L, +49485L,49486L,49487L,49488L,49489L,49490L,49491L,49492L,49493L,49494L, +49495L,49496L,49497L,49498L,49499L,49500L,49501L,49502L,49503L,49504L, +49505L,49506L,49507L,49508L,49509L,49510L,49511L,49512L,49513L,49514L, +49515L,49516L,49517L,49518L,49519L,49520L,49521L,49522L,49523L,49524L, +49525L,49526L,49527L,49528L,49529L,49530L,49531L,49532L,49533L,49534L, +49535L,49536L,49537L,49538L,49539L,49540L,49541L,49542L,49543L,49544L, +49545L,49546L,49547L,49548L,49549L,49550L,49551L,49552L,49553L,49554L, +49555L,49556L,49557L,49558L,49559L,49560L,49561L,49562L,49563L,49564L, +49565L,49566L,49567L,49568L,49569L,49570L,49571L,49572L,49573L,49574L, +49575L,49576L,49577L,49578L,49579L,49580L,49581L,49582L,49583L,49584L, +49585L,49586L,49587L,49588L,49589L,49590L,49591L,49592L,49593L,49594L, +49595L,49596L,49597L,49598L,49599L,49600L,49601L,49602L,49603L,49604L, +49605L,49606L,49607L,49608L,49609L,49610L,49611L,49612L,49613L,49614L, +49615L,49616L,49617L,49618L,49619L,49620L,49621L,49622L,49623L,49624L, +49625L,49626L,49627L,49628L,49629L,49630L,49631L,49632L,49633L,49634L, +49635L,49636L,49637L,49638L,49639L,49640L,49641L,49642L,49643L,49644L, +49645L,49646L,49647L,49648L,49649L,49650L,49651L,49652L,49653L,49654L, +49655L,49656L,49657L,49658L,49659L,49660L,49661L,49662L,49663L,49664L, +49665L,49666L,49667L,49668L,49669L,49670L,49671L,49672L,49673L,49674L, +49675L,49676L,49677L,49678L,49679L,49680L,49681L,49682L,49683L,49684L, +49685L,49686L,49687L,49688L,49689L,49690L,49691L,49692L,49693L,49694L, +49695L,49696L,49697L,49698L,49699L,49700L,49701L,49702L,49703L,49704L, +49705L,49706L,49707L,49708L,49709L,49710L,49711L,49712L,49713L,49714L, +49715L,49716L,49717L,49718L,49719L,49720L,49721L,49722L,49723L,49724L, +49725L,49726L,49727L,49728L,49729L,49730L,49731L,49732L,49733L,49734L, +49735L,49736L,49737L,49738L,49739L,49740L,49741L,49742L,49743L,49744L, +49745L,49746L,49747L,49748L,49749L,49750L,49751L,49752L,49753L,49754L, +49755L,49756L,49757L,49758L,49759L,49760L,49761L,49762L,49763L,49764L, +49765L,49766L,49767L,49768L,49769L,49770L,49771L,49772L,49773L,49774L, +49775L,49776L,49777L,49778L,49779L,49780L,49781L,49782L,49783L,49784L, +49785L,49786L,49787L,49788L,49789L,49790L,49791L,49792L,49793L,49794L, +49795L,49796L,49797L,49798L,49799L,49800L,49801L,49802L,49803L,49804L, +49805L,49806L,49807L,49808L,49809L,49810L,49811L,49812L,49813L,49814L, +49815L,49816L,49817L,49818L,49819L,49820L,49821L,49822L,49823L,49824L, +49825L,49826L,49827L,49828L,49829L,49830L,49831L,49832L,49833L,49834L, +49835L,49836L,49837L,49838L,49839L,49840L,49841L,49842L,49843L,49844L, +49845L,49846L,49847L,49848L,49849L,49850L,49851L,49852L,49853L,49854L, +49855L,49856L,49857L,49858L,49859L,49860L,49861L,49862L,49863L,49864L, +49865L,49866L,49867L,49868L,49869L,49870L,49871L,49872L,49873L,49874L, +49875L,49876L,49877L,49878L,49879L,49880L,49881L,49882L,49883L,49884L, +49885L,49886L,49887L,49888L,49889L,49890L,49891L,49892L,49893L,49894L, +49895L,49896L,49897L,49898L,49899L,49900L,49901L,49902L,49903L,49904L, +49905L,49906L,49907L,49908L,49909L,49910L,49911L,49912L,49913L,49914L, +49915L,49916L,49917L,49918L,49919L,49920L,49921L,49922L,49923L,49924L, +49925L,49926L,49927L,49928L,49929L,49930L,49931L,49932L,49933L,49934L, +49935L,49936L,49937L,49938L,49939L,49940L,49941L,49942L,49943L,49944L, +49945L,49946L,49947L,49948L,49949L,49950L,49951L,49952L,49953L,49954L, +49955L,49956L,49957L,49958L,49959L,49960L,49961L,49962L,49963L,49964L, +49965L,49966L,49967L,49968L,49969L,49970L,49971L,49972L,49973L,49974L, +49975L,49976L,49977L,49978L,49979L,49980L,49981L,49982L,49983L,49984L, +49985L,49986L,49987L,49988L,49989L,49990L,49991L,49992L,49993L,49994L, +49995L,49996L,49997L,49998L,49999L,50000L,50001L,50002L,50003L,50004L, +50005L,50006L,50007L,50008L,50009L,50010L,50011L,50012L,50013L,50014L, +50015L,50016L,50017L,50018L,50019L,50020L,50021L,50022L,50023L,50024L, +50025L,50026L,50027L,50028L,50029L,50030L,50031L,50032L,50033L,50034L, +50035L,50036L,50037L,50038L,50039L,50040L,50041L,50042L,50043L,50044L, +50045L,50046L,50047L,50048L,50049L,50050L,50051L,50052L,50053L,50054L, +50055L,50056L,50057L,50058L,50059L,50060L,50061L,50062L,50063L,50064L, +50065L,50066L,50067L,50068L,50069L,50070L,50071L,50072L,50073L,50074L, +50075L,50076L,50077L,50078L,50079L,50080L,50081L,50082L,50083L,50084L, +50085L,50086L,50087L,50088L,50089L,50090L,50091L,50092L,50093L,50094L, +50095L,50096L,50097L,50098L,50099L,50100L,50101L,50102L,50103L,50104L, +50105L,50106L,50107L,50108L,50109L,50110L,50111L,50112L,50113L,50114L, +50115L,50116L,50117L,50118L,50119L,50120L,50121L,50122L,50123L,50124L, +50125L,50126L,50127L,50128L,50129L,50130L,50131L,50132L,50133L,50134L, +50135L,50136L,50137L,50138L,50139L,50140L,50141L,50142L,50143L,50144L, +50145L,50146L,50147L,50148L,50149L,50150L,50151L,50152L,50153L,50154L, +50155L,50156L,50157L,50158L,50159L,50160L,50161L,50162L,50163L,50164L, +50165L,50166L,50167L,50168L,50169L,50170L,50171L,50172L,50173L,50174L, +50175L,50176L,50177L,50178L,50179L,50180L,50181L,50182L,50183L,50184L, +50185L,50186L,50187L,50188L,50189L,50190L,50191L,50192L,50193L,50194L, +50195L,50196L,50197L,50198L,50199L,50200L,50201L,50202L,50203L,50204L, +50205L,50206L,50207L,50208L,50209L,50210L,50211L,50212L,50213L,50214L, +50215L,50216L,50217L,50218L,50219L,50220L,50221L,50222L,50223L,50224L, +50225L,50226L,50227L,50228L,50229L,50230L,50231L,50232L,50233L,50234L, +50235L,50236L,50237L,50238L,50239L,50240L,50241L,50242L,50243L,50244L, +50245L,50246L,50247L,50248L,50249L,50250L,50251L,50252L,50253L,50254L, +50255L,50256L,50257L,50258L,50259L,50260L,50261L,50262L,50263L,50264L, +50265L,50266L,50267L,50268L,50269L,50270L,50271L,50272L,50273L,50274L, +50275L,50276L,50277L,50278L,50279L,50280L,50281L,50282L,50283L,50284L, +50285L,50286L,50287L,50288L,50289L,50290L,50291L,50292L,50293L,50294L, +50295L,50296L,50297L,50298L,50299L,50300L,50301L,50302L,50303L,50304L, +50305L,50306L,50307L,50308L,50309L,50310L,50311L,50312L,50313L,50314L, +50315L,50316L,50317L,50318L,50319L,50320L,50321L,50322L,50323L,50324L, +50325L,50326L,50327L,50328L,50329L,50330L,50331L,50332L,50333L,50334L, +50335L,50336L,50337L,50338L,50339L,50340L,50341L,50342L,50343L,50344L, +50345L,50346L,50347L,50348L,50349L,50350L,50351L,50352L,50353L,50354L, +50355L,50356L,50357L,50358L,50359L,50360L,50361L,50362L,50363L,50364L, +50365L,50366L,50367L,50368L,50369L,50370L,50371L,50372L,50373L,50374L, +50375L,50376L,50377L,50378L,50379L,50380L,50381L,50382L,50383L,50384L, +50385L,50386L,50387L,50388L,50389L,50390L,50391L,50392L,50393L,50394L, +50395L,50396L,50397L,50398L,50399L,50400L,50401L,50402L,50403L,50404L, +50405L,50406L,50407L,50408L,50409L,50410L,50411L,50412L,50413L,50414L, +50415L,50416L,50417L,50418L,50419L,50420L,50421L,50422L,50423L,50424L, +50425L,50426L,50427L,50428L,50429L,50430L,50431L,50432L,50433L,50434L, +50435L,50436L,50437L,50438L,50439L,50440L,50441L,50442L,50443L,50444L, +50445L,50446L,50447L,50448L,50449L,50450L,50451L,50452L,50453L,50454L, +50455L,50456L,50457L,50458L,50459L,50460L,50461L,50462L,50463L,50464L, +50465L,50466L,50467L,50468L,50469L,50470L,50471L,50472L,50473L,50474L, +50475L,50476L,50477L,50478L,50479L,50480L,50481L,50482L,50483L,50484L, +50485L,50486L,50487L,50488L,50489L,50490L,50491L,50492L,50493L,50494L, +50495L,50496L,50497L,50498L,50499L,50500L,50501L,50502L,50503L,50504L, +50505L,50506L,50507L,50508L,50509L,50510L,50511L,50512L,50513L,50514L, +50515L,50516L,50517L,50518L,50519L,50520L,50521L,50522L,50523L,50524L, +50525L,50526L,50527L,50528L,50529L,50530L,50531L,50532L,50533L,50534L, +50535L,50536L,50537L,50538L,50539L,50540L,50541L,50542L,50543L,50544L, +50545L,50546L,50547L,50548L,50549L,50550L,50551L,50552L,50553L,50554L, +50555L,50556L,50557L,50558L,50559L,50560L,50561L,50562L,50563L,50564L, +50565L,50566L,50567L,50568L,50569L,50570L,50571L,50572L,50573L,50574L, +50575L,50576L,50577L,50578L,50579L,50580L,50581L,50582L,50583L,50584L, +50585L,50586L,50587L,50588L,50589L,50590L,50591L,50592L,50593L,50594L, +50595L,50596L,50597L,50598L,50599L,50600L,50601L,50602L,50603L,50604L, +50605L,50606L,50607L,50608L,50609L,50610L,50611L,50612L,50613L,50614L, +50615L,50616L,50617L,50618L,50619L,50620L,50621L,50622L,50623L,50624L, +50625L,50626L,50627L,50628L,50629L,50630L,50631L,50632L,50633L,50634L, +50635L,50636L,50637L,50638L,50639L,50640L,50641L,50642L,50643L,50644L, +50645L,50646L,50647L,50648L,50649L,50650L,50651L,50652L,50653L,50654L, +50655L,50656L,50657L,50658L,50659L,50660L,50661L,50662L,50663L,50664L, +50665L,50666L,50667L,50668L,50669L,50670L,50671L,50672L,50673L,50674L, +50675L,50676L,50677L,50678L,50679L,50680L,50681L,50682L,50683L,50684L, +50685L,50686L,50687L,50688L,50689L,50690L,50691L,50692L,50693L,50694L, +50695L,50696L,50697L,50698L,50699L,50700L,50701L,50702L,50703L,50704L, +50705L,50706L,50707L,50708L,50709L,50710L,50711L,50712L,50713L,50714L, +50715L,50716L,50717L,50718L,50719L,50720L,50721L,50722L,50723L,50724L, +50725L,50726L,50727L,50728L,50729L,50730L,50731L,50732L,50733L,50734L, +50735L,50736L,50737L,50738L,50739L,50740L,50741L,50742L,50743L,50744L, +50745L,50746L,50747L,50748L,50749L,50750L,50751L,50752L,50753L,50754L, +50755L,50756L,50757L,50758L,50759L,50760L,50761L,50762L,50763L,50764L, +50765L,50766L,50767L,50768L,50769L,50770L,50771L,50772L,50773L,50774L, +50775L,50776L,50777L,50778L,50779L,50780L,50781L,50782L,50783L,50784L, +50785L,50786L,50787L,50788L,50789L,50790L,50791L,50792L,50793L,50794L, +50795L,50796L,50797L,50798L,50799L,50800L,50801L,50802L,50803L,50804L, +50805L,50806L,50807L,50808L,50809L,50810L,50811L,50812L,50813L,50814L, +50815L,50816L,50817L,50818L,50819L,50820L,50821L,50822L,50823L,50824L, +50825L,50826L,50827L,50828L,50829L,50830L,50831L,50832L,50833L,50834L, +50835L,50836L,50837L,50838L,50839L,50840L,50841L,50842L,50843L,50844L, +50845L,50846L,50847L,50848L,50849L,50850L,50851L,50852L,50853L,50854L, +50855L,50856L,50857L,50858L,50859L,50860L,50861L,50862L,50863L,50864L, +50865L,50866L,50867L,50868L,50869L,50870L,50871L,50872L,50873L,50874L, +50875L,50876L,50877L,50878L,50879L,50880L,50881L,50882L,50883L,50884L, +50885L,50886L,50887L,50888L,50889L,50890L,50891L,50892L,50893L,50894L, +50895L,50896L,50897L,50898L,50899L,50900L,50901L,50902L,50903L,50904L, +50905L,50906L,50907L,50908L,50909L,50910L,50911L,50912L,50913L,50914L, +50915L,50916L,50917L,50918L,50919L,50920L,50921L,50922L,50923L,50924L, +50925L,50926L,50927L,50928L,50929L,50930L,50931L,50932L,50933L,50934L, +50935L,50936L,50937L,50938L,50939L,50940L,50941L,50942L,50943L,50944L, +50945L,50946L,50947L,50948L,50949L,50950L,50951L,50952L,50953L,50954L, +50955L,50956L,50957L,50958L,50959L,50960L,50961L,50962L,50963L,50964L, +50965L,50966L,50967L,50968L,50969L,50970L,50971L,50972L,50973L,50974L, +50975L,50976L,50977L,50978L,50979L,50980L,50981L,50982L,50983L,50984L, +50985L,50986L,50987L,50988L,50989L,50990L,50991L,50992L,50993L,50994L, +50995L,50996L,50997L,50998L,50999L,51000L,51001L,51002L,51003L,51004L, +51005L,51006L,51007L,51008L,51009L,51010L,51011L,51012L,51013L,51014L, +51015L,51016L,51017L,51018L,51019L,51020L,51021L,51022L,51023L,51024L, +51025L,51026L,51027L,51028L,51029L,51030L,51031L,51032L,51033L,51034L, +51035L,51036L,51037L,51038L,51039L,51040L,51041L,51042L,51043L,51044L, +51045L,51046L,51047L,51048L,51049L,51050L,51051L,51052L,51053L,51054L, +51055L,51056L,51057L,51058L,51059L,51060L,51061L,51062L,51063L,51064L, +51065L,51066L,51067L,51068L,51069L,51070L,51071L,51072L,51073L,51074L, +51075L,51076L,51077L,51078L,51079L,51080L,51081L,51082L,51083L,51084L, +51085L,51086L,51087L,51088L,51089L,51090L,51091L,51092L,51093L,51094L, +51095L,51096L,51097L,51098L,51099L,51100L,51101L,51102L,51103L,51104L, +51105L,51106L,51107L,51108L,51109L,51110L,51111L,51112L,51113L,51114L, +51115L,51116L,51117L,51118L,51119L,51120L,51121L,51122L,51123L,51124L, +51125L,51126L,51127L,51128L,51129L,51130L,51131L,51132L,51133L,51134L, +51135L,51136L,51137L,51138L,51139L,51140L,51141L,51142L,51143L,51144L, +51145L,51146L,51147L,51148L,51149L,51150L,51151L,51152L,51153L,51154L, +51155L,51156L,51157L,51158L,51159L,51160L,51161L,51162L,51163L,51164L, +51165L,51166L,51167L,51168L,51169L,51170L,51171L,51172L,51173L,51174L, +51175L,51176L,51177L,51178L,51179L,51180L,51181L,51182L,51183L,51184L, +51185L,51186L,51187L,51188L,51189L,51190L,51191L,51192L,51193L,51194L, +51195L,51196L,51197L,51198L,51199L,51200L,51201L,51202L,51203L,51204L, +51205L,51206L,51207L,51208L,51209L,51210L,51211L,51212L,51213L,51214L, +51215L,51216L,51217L,51218L,51219L,51220L,51221L,51222L,51223L,51224L, +51225L,51226L,51227L,51228L,51229L,51230L,51231L,51232L,51233L,51234L, +51235L,51236L,51237L,51238L,51239L,51240L,51241L,51242L,51243L,51244L, +51245L,51246L,51247L,51248L,51249L,51250L,51251L,51252L,51253L,51254L, +51255L,51256L,51257L,51258L,51259L,51260L,51261L,51262L,51263L,51264L, +51265L,51266L,51267L,51268L,51269L,51270L,51271L,51272L,51273L,51274L, +51275L,51276L,51277L,51278L,51279L,51280L,51281L,51282L,51283L,51284L, +51285L,51286L,51287L,51288L,51289L,51290L,51291L,51292L,51293L,51294L, +51295L,51296L,51297L,51298L,51299L,51300L,51301L,51302L,51303L,51304L, +51305L,51306L,51307L,51308L,51309L,51310L,51311L,51312L,51313L,51314L, +51315L,51316L,51317L,51318L,51319L,51320L,51321L,51322L,51323L,51324L, +51325L,51326L,51327L,51328L,51329L,51330L,51331L,51332L,51333L,51334L, +51335L,51336L,51337L,51338L,51339L,51340L,51341L,51342L,51343L,51344L, +51345L,51346L,51347L,51348L,51349L,51350L,51351L,51352L,51353L,51354L, +51355L,51356L,51357L,51358L,51359L,51360L,51361L,51362L,51363L,51364L, +51365L,51366L,51367L,51368L,51369L,51370L,51371L,51372L,51373L,51374L, +51375L,51376L,51377L,51378L,51379L,51380L,51381L,51382L,51383L,51384L, +51385L,51386L,51387L,51388L,51389L,51390L,51391L,51392L,51393L,51394L, +51395L,51396L,51397L,51398L,51399L,51400L,51401L,51402L,51403L,51404L, +51405L,51406L,51407L,51408L,51409L,51410L,51411L,51412L,51413L,51414L, +51415L,51416L,51417L,51418L,51419L,51420L,51421L,51422L,51423L,51424L, +51425L,51426L,51427L,51428L,51429L,51430L,51431L,51432L,51433L,51434L, +51435L,51436L,51437L,51438L,51439L,51440L,51441L,51442L,51443L,51444L, +51445L,51446L,51447L,51448L,51449L,51450L,51451L,51452L,51453L,51454L, +51455L,51456L,51457L,51458L,51459L,51460L,51461L,51462L,51463L,51464L, +51465L,51466L,51467L,51468L,51469L,51470L,51471L,51472L,51473L,51474L, +51475L,51476L,51477L,51478L,51479L,51480L,51481L,51482L,51483L,51484L, +51485L,51486L,51487L,51488L,51489L,51490L,51491L,51492L,51493L,51494L, +51495L,51496L,51497L,51498L,51499L,51500L,51501L,51502L,51503L,51504L, +51505L,51506L,51507L,51508L,51509L,51510L,51511L,51512L,51513L,51514L, +51515L,51516L,51517L,51518L,51519L,51520L,51521L,51522L,51523L,51524L, +51525L,51526L,51527L,51528L,51529L,51530L,51531L,51532L,51533L,51534L, +51535L,51536L,51537L,51538L,51539L,51540L,51541L,51542L,51543L,51544L, +51545L,51546L,51547L,51548L,51549L,51550L,51551L,51552L,51553L,51554L, +51555L,51556L,51557L,51558L,51559L,51560L,51561L,51562L,51563L,51564L, +51565L,51566L,51567L,51568L,51569L,51570L,51571L,51572L,51573L,51574L, +51575L,51576L,51577L,51578L,51579L,51580L,51581L,51582L,51583L,51584L, +51585L,51586L,51587L,51588L,51589L,51590L,51591L,51592L,51593L,51594L, +51595L,51596L,51597L,51598L,51599L,51600L,51601L,51602L,51603L,51604L, +51605L,51606L,51607L,51608L,51609L,51610L,51611L,51612L,51613L,51614L, +51615L,51616L,51617L,51618L,51619L,51620L,51621L,51622L,51623L,51624L, +51625L,51626L,51627L,51628L,51629L,51630L,51631L,51632L,51633L,51634L, +51635L,51636L,51637L,51638L,51639L,51640L,51641L,51642L,51643L,51644L, +51645L,51646L,51647L,51648L,51649L,51650L,51651L,51652L,51653L,51654L, +51655L,51656L,51657L,51658L,51659L,51660L,51661L,51662L,51663L,51664L, +51665L,51666L,51667L,51668L,51669L,51670L,51671L,51672L,51673L,51674L, +51675L,51676L,51677L,51678L,51679L,51680L,51681L,51682L,51683L,51684L, +51685L,51686L,51687L,51688L,51689L,51690L,51691L,51692L,51693L,51694L, +51695L,51696L,51697L,51698L,51699L,51700L,51701L,51702L,51703L,51704L, +51705L,51706L,51707L,51708L,51709L,51710L,51711L,51712L,51713L,51714L, +51715L,51716L,51717L,51718L,51719L,51720L,51721L,51722L,51723L,51724L, +51725L,51726L,51727L,51728L,51729L,51730L,51731L,51732L,51733L,51734L, +51735L,51736L,51737L,51738L,51739L,51740L,51741L,51742L,51743L,51744L, +51745L,51746L,51747L,51748L,51749L,51750L,51751L,51752L,51753L,51754L, +51755L,51756L,51757L,51758L,51759L,51760L,51761L,51762L,51763L,51764L, +51765L,51766L,51767L,51768L,51769L,51770L,51771L,51772L,51773L,51774L, +51775L,51776L,51777L,51778L,51779L,51780L,51781L,51782L,51783L,51784L, +51785L,51786L,51787L,51788L,51789L,51790L,51791L,51792L,51793L,51794L, +51795L,51796L,51797L,51798L,51799L,51800L,51801L,51802L,51803L,51804L, +51805L,51806L,51807L,51808L,51809L,51810L,51811L,51812L,51813L,51814L, +51815L,51816L,51817L,51818L,51819L,51820L,51821L,51822L,51823L,51824L, +51825L,51826L,51827L,51828L,51829L,51830L,51831L,51832L,51833L,51834L, +51835L,51836L,51837L,51838L,51839L,51840L,51841L,51842L,51843L,51844L, +51845L,51846L,51847L,51848L,51849L,51850L,51851L,51852L,51853L,51854L, +51855L,51856L,51857L,51858L,51859L,51860L,51861L,51862L,51863L,51864L, +51865L,51866L,51867L,51868L,51869L,51870L,51871L,51872L,51873L,51874L, +51875L,51876L,51877L,51878L,51879L,51880L,51881L,51882L,51883L,51884L, +51885L,51886L,51887L,51888L,51889L,51890L,51891L,51892L,51893L,51894L, +51895L,51896L,51897L,51898L,51899L,51900L,51901L,51902L,51903L,51904L, +51905L,51906L,51907L,51908L,51909L,51910L,51911L,51912L,51913L,51914L, +51915L,51916L,51917L,51918L,51919L,51920L,51921L,51922L,51923L,51924L, +51925L,51926L,51927L,51928L,51929L,51930L,51931L,51932L,51933L,51934L, +51935L,51936L,51937L,51938L,51939L,51940L,51941L,51942L,51943L,51944L, +51945L,51946L,51947L,51948L,51949L,51950L,51951L,51952L,51953L,51954L, +51955L,51956L,51957L,51958L,51959L,51960L,51961L,51962L,51963L,51964L, +51965L,51966L,51967L,51968L,51969L,51970L,51971L,51972L,51973L,51974L, +51975L,51976L,51977L,51978L,51979L,51980L,51981L,51982L,51983L,51984L, +51985L,51986L,51987L,51988L,51989L,51990L,51991L,51992L,51993L,51994L, +51995L,51996L,51997L,51998L,51999L,52000L,52001L,52002L,52003L,52004L, +52005L,52006L,52007L,52008L,52009L,52010L,52011L,52012L,52013L,52014L, +52015L,52016L,52017L,52018L,52019L,52020L,52021L,52022L,52023L,52024L, +52025L,52026L,52027L,52028L,52029L,52030L,52031L,52032L,52033L,52034L, +52035L,52036L,52037L,52038L,52039L,52040L,52041L,52042L,52043L,52044L, +52045L,52046L,52047L,52048L,52049L,52050L,52051L,52052L,52053L,52054L, +52055L,52056L,52057L,52058L,52059L,52060L,52061L,52062L,52063L,52064L, +52065L,52066L,52067L,52068L,52069L,52070L,52071L,52072L,52073L,52074L, +52075L,52076L,52077L,52078L,52079L,52080L,52081L,52082L,52083L,52084L, +52085L,52086L,52087L,52088L,52089L,52090L,52091L,52092L,52093L,52094L, +52095L,52096L,52097L,52098L,52099L,52100L,52101L,52102L,52103L,52104L, +52105L,52106L,52107L,52108L,52109L,52110L,52111L,52112L,52113L,52114L, +52115L,52116L,52117L,52118L,52119L,52120L,52121L,52122L,52123L,52124L, +52125L,52126L,52127L,52128L,52129L,52130L,52131L,52132L,52133L,52134L, +52135L,52136L,52137L,52138L,52139L,52140L,52141L,52142L,52143L,52144L, +52145L,52146L,52147L,52148L,52149L,52150L,52151L,52152L,52153L,52154L, +52155L,52156L,52157L,52158L,52159L,52160L,52161L,52162L,52163L,52164L, +52165L,52166L,52167L,52168L,52169L,52170L,52171L,52172L,52173L,52174L, +52175L,52176L,52177L,52178L,52179L,52180L,52181L,52182L,52183L,52184L, +52185L,52186L,52187L,52188L,52189L,52190L,52191L,52192L,52193L,52194L, +52195L,52196L,52197L,52198L,52199L,52200L,52201L,52202L,52203L,52204L, +52205L,52206L,52207L,52208L,52209L,52210L,52211L,52212L,52213L,52214L, +52215L,52216L,52217L,52218L,52219L,52220L,52221L,52222L,52223L,52224L, +52225L,52226L,52227L,52228L,52229L,52230L,52231L,52232L,52233L,52234L, +52235L,52236L,52237L,52238L,52239L,52240L,52241L,52242L,52243L,52244L, +52245L,52246L,52247L,52248L,52249L,52250L,52251L,52252L,52253L,52254L, +52255L,52256L,52257L,52258L,52259L,52260L,52261L,52262L,52263L,52264L, +52265L,52266L,52267L,52268L,52269L,52270L,52271L,52272L,52273L,52274L, +52275L,52276L,52277L,52278L,52279L,52280L,52281L,52282L,52283L,52284L, +52285L,52286L,52287L,52288L,52289L,52290L,52291L,52292L,52293L,52294L, +52295L,52296L,52297L,52298L,52299L,52300L,52301L,52302L,52303L,52304L, +52305L,52306L,52307L,52308L,52309L,52310L,52311L,52312L,52313L,52314L, +52315L,52316L,52317L,52318L,52319L,52320L,52321L,52322L,52323L,52324L, +52325L,52326L,52327L,52328L,52329L,52330L,52331L,52332L,52333L,52334L, +52335L,52336L,52337L,52338L,52339L,52340L,52341L,52342L,52343L,52344L, +52345L,52346L,52347L,52348L,52349L,52350L,52351L,52352L,52353L,52354L, +52355L,52356L,52357L,52358L,52359L,52360L,52361L,52362L,52363L,52364L, +52365L,52366L,52367L,52368L,52369L,52370L,52371L,52372L,52373L,52374L, +52375L,52376L,52377L,52378L,52379L,52380L,52381L,52382L,52383L,52384L, +52385L,52386L,52387L,52388L,52389L,52390L,52391L,52392L,52393L,52394L, +52395L,52396L,52397L,52398L,52399L,52400L,52401L,52402L,52403L,52404L, +52405L,52406L,52407L,52408L,52409L,52410L,52411L,52412L,52413L,52414L, +52415L,52416L,52417L,52418L,52419L,52420L,52421L,52422L,52423L,52424L, +52425L,52426L,52427L,52428L,52429L,52430L,52431L,52432L,52433L,52434L, +52435L,52436L,52437L,52438L,52439L,52440L,52441L,52442L,52443L,52444L, +52445L,52446L,52447L,52448L,52449L,52450L,52451L,52452L,52453L,52454L, +52455L,52456L,52457L,52458L,52459L,52460L,52461L,52462L,52463L,52464L, +52465L,52466L,52467L,52468L,52469L,52470L,52471L,52472L,52473L,52474L, +52475L,52476L,52477L,52478L,52479L,52480L,52481L,52482L,52483L,52484L, +52485L,52486L,52487L,52488L,52489L,52490L,52491L,52492L,52493L,52494L, +52495L,52496L,52497L,52498L,52499L,52500L,52501L,52502L,52503L,52504L, +52505L,52506L,52507L,52508L,52509L,52510L,52511L,52512L,52513L,52514L, +52515L,52516L,52517L,52518L,52519L,52520L,52521L,52522L,52523L,52524L, +52525L,52526L,52527L,52528L,52529L,52530L,52531L,52532L,52533L,52534L, +52535L,52536L,52537L,52538L,52539L,52540L,52541L,52542L,52543L,52544L, +52545L,52546L,52547L,52548L,52549L,52550L,52551L,52552L,52553L,52554L, +52555L,52556L,52557L,52558L,52559L,52560L,52561L,52562L,52563L,52564L, +52565L,52566L,52567L,52568L,52569L,52570L,52571L,52572L,52573L,52574L, +52575L,52576L,52577L,52578L,52579L,52580L,52581L,52582L,52583L,52584L, +52585L,52586L,52587L,52588L,52589L,52590L,52591L,52592L,52593L,52594L, +52595L,52596L,52597L,52598L,52599L,52600L,52601L,52602L,52603L,52604L, +52605L,52606L,52607L,52608L,52609L,52610L,52611L,52612L,52613L,52614L, +52615L,52616L,52617L,52618L,52619L,52620L,52621L,52622L,52623L,52624L, +52625L,52626L,52627L,52628L,52629L,52630L,52631L,52632L,52633L,52634L, +52635L,52636L,52637L,52638L,52639L,52640L,52641L,52642L,52643L,52644L, +52645L,52646L,52647L,52648L,52649L,52650L,52651L,52652L,52653L,52654L, +52655L,52656L,52657L,52658L,52659L,52660L,52661L,52662L,52663L,52664L, +52665L,52666L,52667L,52668L,52669L,52670L,52671L,52672L,52673L,52674L, +52675L,52676L,52677L,52678L,52679L,52680L,52681L,52682L,52683L,52684L, +52685L,52686L,52687L,52688L,52689L,52690L,52691L,52692L,52693L,52694L, +52695L,52696L,52697L,52698L,52699L,52700L,52701L,52702L,52703L,52704L, +52705L,52706L,52707L,52708L,52709L,52710L,52711L,52712L,52713L,52714L, +52715L,52716L,52717L,52718L,52719L,52720L,52721L,52722L,52723L,52724L, +52725L,52726L,52727L,52728L,52729L,52730L,52731L,52732L,52733L,52734L, +52735L,52736L,52737L,52738L,52739L,52740L,52741L,52742L,52743L,52744L, +52745L,52746L,52747L,52748L,52749L,52750L,52751L,52752L,52753L,52754L, +52755L,52756L,52757L,52758L,52759L,52760L,52761L,52762L,52763L,52764L, +52765L,52766L,52767L,52768L,52769L,52770L,52771L,52772L,52773L,52774L, +52775L,52776L,52777L,52778L,52779L,52780L,52781L,52782L,52783L,52784L, +52785L,52786L,52787L,52788L,52789L,52790L,52791L,52792L,52793L,52794L, +52795L,52796L,52797L,52798L,52799L,52800L,52801L,52802L,52803L,52804L, +52805L,52806L,52807L,52808L,52809L,52810L,52811L,52812L,52813L,52814L, +52815L,52816L,52817L,52818L,52819L,52820L,52821L,52822L,52823L,52824L, +52825L,52826L,52827L,52828L,52829L,52830L,52831L,52832L,52833L,52834L, +52835L,52836L,52837L,52838L,52839L,52840L,52841L,52842L,52843L,52844L, +52845L,52846L,52847L,52848L,52849L,52850L,52851L,52852L,52853L,52854L, +52855L,52856L,52857L,52858L,52859L,52860L,52861L,52862L,52863L,52864L, +52865L,52866L,52867L,52868L,52869L,52870L,52871L,52872L,52873L,52874L, +52875L,52876L,52877L,52878L,52879L,52880L,52881L,52882L,52883L,52884L, +52885L,52886L,52887L,52888L,52889L,52890L,52891L,52892L,52893L,52894L, +52895L,52896L,52897L,52898L,52899L,52900L,52901L,52902L,52903L,52904L, +52905L,52906L,52907L,52908L,52909L,52910L,52911L,52912L,52913L,52914L, +52915L,52916L,52917L,52918L,52919L,52920L,52921L,52922L,52923L,52924L, +52925L,52926L,52927L,52928L,52929L,52930L,52931L,52932L,52933L,52934L, +52935L,52936L,52937L,52938L,52939L,52940L,52941L,52942L,52943L,52944L, +52945L,52946L,52947L,52948L,52949L,52950L,52951L,52952L,52953L,52954L, +52955L,52956L,52957L,52958L,52959L,52960L,52961L,52962L,52963L,52964L, +52965L,52966L,52967L,52968L,52969L,52970L,52971L,52972L,52973L,52974L, +52975L,52976L,52977L,52978L,52979L,52980L,52981L,52982L,52983L,52984L, +52985L,52986L,52987L,52988L,52989L,52990L,52991L,52992L,52993L,52994L, +52995L,52996L,52997L,52998L,52999L,53000L,53001L,53002L,53003L,53004L, +53005L,53006L,53007L,53008L,53009L,53010L,53011L,53012L,53013L,53014L, +53015L,53016L,53017L,53018L,53019L,53020L,53021L,53022L,53023L,53024L, +53025L,53026L,53027L,53028L,53029L,53030L,53031L,53032L,53033L,53034L, +53035L,53036L,53037L,53038L,53039L,53040L,53041L,53042L,53043L,53044L, +53045L,53046L,53047L,53048L,53049L,53050L,53051L,53052L,53053L,53054L, +53055L,53056L,53057L,53058L,53059L,53060L,53061L,53062L,53063L,53064L, +53065L,53066L,53067L,53068L,53069L,53070L,53071L,53072L,53073L,53074L, +53075L,53076L,53077L,53078L,53079L,53080L,53081L,53082L,53083L,53084L, +53085L,53086L,53087L,53088L,53089L,53090L,53091L,53092L,53093L,53094L, +53095L,53096L,53097L,53098L,53099L,53100L,53101L,53102L,53103L,53104L, +53105L,53106L,53107L,53108L,53109L,53110L,53111L,53112L,53113L,53114L, +53115L,53116L,53117L,53118L,53119L,53120L,53121L,53122L,53123L,53124L, +53125L,53126L,53127L,53128L,53129L,53130L,53131L,53132L,53133L,53134L, +53135L,53136L,53137L,53138L,53139L,53140L,53141L,53142L,53143L,53144L, +53145L,53146L,53147L,53148L,53149L,53150L,53151L,53152L,53153L,53154L, +53155L,53156L,53157L,53158L,53159L,53160L,53161L,53162L,53163L,53164L, +53165L,53166L,53167L,53168L,53169L,53170L,53171L,53172L,53173L,53174L, +53175L,53176L,53177L,53178L,53179L,53180L,53181L,53182L,53183L,53184L, +53185L,53186L,53187L,53188L,53189L,53190L,53191L,53192L,53193L,53194L, +53195L,53196L,53197L,53198L,53199L,53200L,53201L,53202L,53203L,53204L, +53205L,53206L,53207L,53208L,53209L,53210L,53211L,53212L,53213L,53214L, +53215L,53216L,53217L,53218L,53219L,53220L,53221L,53222L,53223L,53224L, +53225L,53226L,53227L,53228L,53229L,53230L,53231L,53232L,53233L,53234L, +53235L,53236L,53237L,53238L,53239L,53240L,53241L,53242L,53243L,53244L, +53245L,53246L,53247L,53248L,53249L,53250L,53251L,53252L,53253L,53254L, +53255L,53256L,53257L,53258L,53259L,53260L,53261L,53262L,53263L,53264L, +53265L,53266L,53267L,53268L,53269L,53270L,53271L,53272L,53273L,53274L, +53275L,53276L,53277L,53278L,53279L,53280L,53281L,53282L,53283L,53284L, +53285L,53286L,53287L,53288L,53289L,53290L,53291L,53292L,53293L,53294L, +53295L,53296L,53297L,53298L,53299L,53300L,53301L,53302L,53303L,53304L, +53305L,53306L,53307L,53308L,53309L,53310L,53311L,53312L,53313L,53314L, +53315L,53316L,53317L,53318L,53319L,53320L,53321L,53322L,53323L,53324L, +53325L,53326L,53327L,53328L,53329L,53330L,53331L,53332L,53333L,53334L, +53335L,53336L,53337L,53338L,53339L,53340L,53341L,53342L,53343L,53344L, +53345L,53346L,53347L,53348L,53349L,53350L,53351L,53352L,53353L,53354L, +53355L,53356L,53357L,53358L,53359L,53360L,53361L,53362L,53363L,53364L, +53365L,53366L,53367L,53368L,53369L,53370L,53371L,53372L,53373L,53374L, +53375L,53376L,53377L,53378L,53379L,53380L,53381L,53382L,53383L,53384L, +53385L,53386L,53387L,53388L,53389L,53390L,53391L,53392L,53393L,53394L, +53395L,53396L,53397L,53398L,53399L,53400L,53401L,53402L,53403L,53404L, +53405L,53406L,53407L,53408L,53409L,53410L,53411L,53412L,53413L,53414L, +53415L,53416L,53417L,53418L,53419L,53420L,53421L,53422L,53423L,53424L, +53425L,53426L,53427L,53428L,53429L,53430L,53431L,53432L,53433L,53434L, +53435L,53436L,53437L,53438L,53439L,53440L,53441L,53442L,53443L,53444L, +53445L,53446L,53447L,53448L,53449L,53450L,53451L,53452L,53453L,53454L, +53455L,53456L,53457L,53458L,53459L,53460L,53461L,53462L,53463L,53464L, +53465L,53466L,53467L,53468L,53469L,53470L,53471L,53472L,53473L,53474L, +53475L,53476L,53477L,53478L,53479L,53480L,53481L,53482L,53483L,53484L, +53485L,53486L,53487L,53488L,53489L,53490L,53491L,53492L,53493L,53494L, +53495L,53496L,53497L,53498L,53499L,53500L,53501L,53502L,53503L,53504L, +53505L,53506L,53507L,53508L,53509L,53510L,53511L,53512L,53513L,53514L, +53515L,53516L,53517L,53518L,53519L,53520L,53521L,53522L,53523L,53524L, +53525L,53526L,53527L,53528L,53529L,53530L,53531L,53532L,53533L,53534L, +53535L,53536L,53537L,53538L,53539L,53540L,53541L,53542L,53543L,53544L, +53545L,53546L,53547L,53548L,53549L,53550L,53551L,53552L,53553L,53554L, +53555L,53556L,53557L,53558L,53559L,53560L,53561L,53562L,53563L,53564L, +53565L,53566L,53567L,53568L,53569L,53570L,53571L,53572L,53573L,53574L, +53575L,53576L,53577L,53578L,53579L,53580L,53581L,53582L,53583L,53584L, +53585L,53586L,53587L,53588L,53589L,53590L,53591L,53592L,53593L,53594L, +53595L,53596L,53597L,53598L,53599L,53600L,53601L,53602L,53603L,53604L, +53605L,53606L,53607L,53608L,53609L,53610L,53611L,53612L,53613L,53614L, +53615L,53616L,53617L,53618L,53619L,53620L,53621L,53622L,53623L,53624L, +53625L,53626L,53627L,53628L,53629L,53630L,53631L,53632L,53633L,53634L, +53635L,53636L,53637L,53638L,53639L,53640L,53641L,53642L,53643L,53644L, +53645L,53646L,53647L,53648L,53649L,53650L,53651L,53652L,53653L,53654L, +53655L,53656L,53657L,53658L,53659L,53660L,53661L,53662L,53663L,53664L, +53665L,53666L,53667L,53668L,53669L,53670L,53671L,53672L,53673L,53674L, +53675L,53676L,53677L,53678L,53679L,53680L,53681L,53682L,53683L,53684L, +53685L,53686L,53687L,53688L,53689L,53690L,53691L,53692L,53693L,53694L, +53695L,53696L,53697L,53698L,53699L,53700L,53701L,53702L,53703L,53704L, +53705L,53706L,53707L,53708L,53709L,53710L,53711L,53712L,53713L,53714L, +53715L,53716L,53717L,53718L,53719L,53720L,53721L,53722L,53723L,53724L, +53725L,53726L,53727L,53728L,53729L,53730L,53731L,53732L,53733L,53734L, +53735L,53736L,53737L,53738L,53739L,53740L,53741L,53742L,53743L,53744L, +53745L,53746L,53747L,53748L,53749L,53750L,53751L,53752L,53753L,53754L, +53755L,53756L,53757L,53758L,53759L,53760L,53761L,53762L,53763L,53764L, +53765L,53766L,53767L,53768L,53769L,53770L,53771L,53772L,53773L,53774L, +53775L,53776L,53777L,53778L,53779L,53780L,53781L,53782L,53783L,53784L, +53785L,53786L,53787L,53788L,53789L,53790L,53791L,53792L,53793L,53794L, +53795L,53796L,53797L,53798L,53799L,53800L,53801L,53802L,53803L,53804L, +53805L,53806L,53807L,53808L,53809L,53810L,53811L,53812L,53813L,53814L, +53815L,53816L,53817L,53818L,53819L,53820L,53821L,53822L,53823L,53824L, +53825L,53826L,53827L,53828L,53829L,53830L,53831L,53832L,53833L,53834L, +53835L,53836L,53837L,53838L,53839L,53840L,53841L,53842L,53843L,53844L, +53845L,53846L,53847L,53848L,53849L,53850L,53851L,53852L,53853L,53854L, +53855L,53856L,53857L,53858L,53859L,53860L,53861L,53862L,53863L,53864L, +53865L,53866L,53867L,53868L,53869L,53870L,53871L,53872L,53873L,53874L, +53875L,53876L,53877L,53878L,53879L,53880L,53881L,53882L,53883L,53884L, +53885L,53886L,53887L,53888L,53889L,53890L,53891L,53892L,53893L,53894L, +53895L,53896L,53897L,53898L,53899L,53900L,53901L,53902L,53903L,53904L, +53905L,53906L,53907L,53908L,53909L,53910L,53911L,53912L,53913L,53914L, +53915L,53916L,53917L,53918L,53919L,53920L,53921L,53922L,53923L,53924L, +53925L,53926L,53927L,53928L,53929L,53930L,53931L,53932L,53933L,53934L, +53935L,53936L,53937L,53938L,53939L,53940L,53941L,53942L,53943L,53944L, +53945L,53946L,53947L,53948L,53949L,53950L,53951L,53952L,53953L,53954L, +53955L,53956L,53957L,53958L,53959L,53960L,53961L,53962L,53963L,53964L, +53965L,53966L,53967L,53968L,53969L,53970L,53971L,53972L,53973L,53974L, +53975L,53976L,53977L,53978L,53979L,53980L,53981L,53982L,53983L,53984L, +53985L,53986L,53987L,53988L,53989L,53990L,53991L,53992L,53993L,53994L, +53995L,53996L,53997L,53998L,53999L,54000L,54001L,54002L,54003L,54004L, +54005L,54006L,54007L,54008L,54009L,54010L,54011L,54012L,54013L,54014L, +54015L,54016L,54017L,54018L,54019L,54020L,54021L,54022L,54023L,54024L, +54025L,54026L,54027L,54028L,54029L,54030L,54031L,54032L,54033L,54034L, +54035L,54036L,54037L,54038L,54039L,54040L,54041L,54042L,54043L,54044L, +54045L,54046L,54047L,54048L,54049L,54050L,54051L,54052L,54053L,54054L, +54055L,54056L,54057L,54058L,54059L,54060L,54061L,54062L,54063L,54064L, +54065L,54066L,54067L,54068L,54069L,54070L,54071L,54072L,54073L,54074L, +54075L,54076L,54077L,54078L,54079L,54080L,54081L,54082L,54083L,54084L, +54085L,54086L,54087L,54088L,54089L,54090L,54091L,54092L,54093L,54094L, +54095L,54096L,54097L,54098L,54099L,54100L,54101L,54102L,54103L,54104L, +54105L,54106L,54107L,54108L,54109L,54110L,54111L,54112L,54113L,54114L, +54115L,54116L,54117L,54118L,54119L,54120L,54121L,54122L,54123L,54124L, +54125L,54126L,54127L,54128L,54129L,54130L,54131L,54132L,54133L,54134L, +54135L,54136L,54137L,54138L,54139L,54140L,54141L,54142L,54143L,54144L, +54145L,54146L,54147L,54148L,54149L,54150L,54151L,54152L,54153L,54154L, +54155L,54156L,54157L,54158L,54159L,54160L,54161L,54162L,54163L,54164L, +54165L,54166L,54167L,54168L,54169L,54170L,54171L,54172L,54173L,54174L, +54175L,54176L,54177L,54178L,54179L,54180L,54181L,54182L,54183L,54184L, +54185L,54186L,54187L,54188L,54189L,54190L,54191L,54192L,54193L,54194L, +54195L,54196L,54197L,54198L,54199L,54200L,54201L,54202L,54203L,54204L, +54205L,54206L,54207L,54208L,54209L,54210L,54211L,54212L,54213L,54214L, +54215L,54216L,54217L,54218L,54219L,54220L,54221L,54222L,54223L,54224L, +54225L,54226L,54227L,54228L,54229L,54230L,54231L,54232L,54233L,54234L, +54235L,54236L,54237L,54238L,54239L,54240L,54241L,54242L,54243L,54244L, +54245L,54246L,54247L,54248L,54249L,54250L,54251L,54252L,54253L,54254L, +54255L,54256L,54257L,54258L,54259L,54260L,54261L,54262L,54263L,54264L, +54265L,54266L,54267L,54268L,54269L,54270L,54271L,54272L,54273L,54274L, +54275L,54276L,54277L,54278L,54279L,54280L,54281L,54282L,54283L,54284L, +54285L,54286L,54287L,54288L,54289L,54290L,54291L,54292L,54293L,54294L, +54295L,54296L,54297L,54298L,54299L,54300L,54301L,54302L,54303L,54304L, +54305L,54306L,54307L,54308L,54309L,54310L,54311L,54312L,54313L,54314L, +54315L,54316L,54317L,54318L,54319L,54320L,54321L,54322L,54323L,54324L, +54325L,54326L,54327L,54328L,54329L,54330L,54331L,54332L,54333L,54334L, +54335L,54336L,54337L,54338L,54339L,54340L,54341L,54342L,54343L,54344L, +54345L,54346L,54347L,54348L,54349L,54350L,54351L,54352L,54353L,54354L, +54355L,54356L,54357L,54358L,54359L,54360L,54361L,54362L,54363L,54364L, +54365L,54366L,54367L,54368L,54369L,54370L,54371L,54372L,54373L,54374L, +54375L,54376L,54377L,54378L,54379L,54380L,54381L,54382L,54383L,54384L, +54385L,54386L,54387L,54388L,54389L,54390L,54391L,54392L,54393L,54394L, +54395L,54396L,54397L,54398L,54399L,54400L,54401L,54402L,54403L,54404L, +54405L,54406L,54407L,54408L,54409L,54410L,54411L,54412L,54413L,54414L, +54415L,54416L,54417L,54418L,54419L,54420L,54421L,54422L,54423L,54424L, +54425L,54426L,54427L,54428L,54429L,54430L,54431L,54432L,54433L,54434L, +54435L,54436L,54437L,54438L,54439L,54440L,54441L,54442L,54443L,54444L, +54445L,54446L,54447L,54448L,54449L,54450L,54451L,54452L,54453L,54454L, +54455L,54456L,54457L,54458L,54459L,54460L,54461L,54462L,54463L,54464L, +54465L,54466L,54467L,54468L,54469L,54470L,54471L,54472L,54473L,54474L, +54475L,54476L,54477L,54478L,54479L,54480L,54481L,54482L,54483L,54484L, +54485L,54486L,54487L,54488L,54489L,54490L,54491L,54492L,54493L,54494L, +54495L,54496L,54497L,54498L,54499L,54500L,54501L,54502L,54503L,54504L, +54505L,54506L,54507L,54508L,54509L,54510L,54511L,54512L,54513L,54514L, +54515L,54516L,54517L,54518L,54519L,54520L,54521L,54522L,54523L,54524L, +54525L,54526L,54527L,54528L,54529L,54530L,54531L,54532L,54533L,54534L, +54535L,54536L,54537L,54538L,54539L,54540L,54541L,54542L,54543L,54544L, +54545L,54546L,54547L,54548L,54549L,54550L,54551L,54552L,54553L,54554L, +54555L,54556L,54557L,54558L,54559L,54560L,54561L,54562L,54563L,54564L, +54565L,54566L,54567L,54568L,54569L,54570L,54571L,54572L,54573L,54574L, +54575L,54576L,54577L,54578L,54579L,54580L,54581L,54582L,54583L,54584L, +54585L,54586L,54587L,54588L,54589L,54590L,54591L,54592L,54593L,54594L, +54595L,54596L,54597L,54598L,54599L,54600L,54601L,54602L,54603L,54604L, +54605L,54606L,54607L,54608L,54609L,54610L,54611L,54612L,54613L,54614L, +54615L,54616L,54617L,54618L,54619L,54620L,54621L,54622L,54623L,54624L, +54625L,54626L,54627L,54628L,54629L,54630L,54631L,54632L,54633L,54634L, +54635L,54636L,54637L,54638L,54639L,54640L,54641L,54642L,54643L,54644L, +54645L,54646L,54647L,54648L,54649L,54650L,54651L,54652L,54653L,54654L, +54655L,54656L,54657L,54658L,54659L,54660L,54661L,54662L,54663L,54664L, +54665L,54666L,54667L,54668L,54669L,54670L,54671L,54672L,54673L,54674L, +54675L,54676L,54677L,54678L,54679L,54680L,54681L,54682L,54683L,54684L, +54685L,54686L,54687L,54688L,54689L,54690L,54691L,54692L,54693L,54694L, +54695L,54696L,54697L,54698L,54699L,54700L,54701L,54702L,54703L,54704L, +54705L,54706L,54707L,54708L,54709L,54710L,54711L,54712L,54713L,54714L, +54715L,54716L,54717L,54718L,54719L,54720L,54721L,54722L,54723L,54724L, +54725L,54726L,54727L,54728L,54729L,54730L,54731L,54732L,54733L,54734L, +54735L,54736L,54737L,54738L,54739L,54740L,54741L,54742L,54743L,54744L, +54745L,54746L,54747L,54748L,54749L,54750L,54751L,54752L,54753L,54754L, +54755L,54756L,54757L,54758L,54759L,54760L,54761L,54762L,54763L,54764L, +54765L,54766L,54767L,54768L,54769L,54770L,54771L,54772L,54773L,54774L, +54775L,54776L,54777L,54778L,54779L,54780L,54781L,54782L,54783L,54784L, +54785L,54786L,54787L,54788L,54789L,54790L,54791L,54792L,54793L,54794L, +54795L,54796L,54797L,54798L,54799L,54800L,54801L,54802L,54803L,54804L, +54805L,54806L,54807L,54808L,54809L,54810L,54811L,54812L,54813L,54814L, +54815L,54816L,54817L,54818L,54819L,54820L,54821L,54822L,54823L,54824L, +54825L,54826L,54827L,54828L,54829L,54830L,54831L,54832L,54833L,54834L, +54835L,54836L,54837L,54838L,54839L,54840L,54841L,54842L,54843L,54844L, +54845L,54846L,54847L,54848L,54849L,54850L,54851L,54852L,54853L,54854L, +54855L,54856L,54857L,54858L,54859L,54860L,54861L,54862L,54863L,54864L, +54865L,54866L,54867L,54868L,54869L,54870L,54871L,54872L,54873L,54874L, +54875L,54876L,54877L,54878L,54879L,54880L,54881L,54882L,54883L,54884L, +54885L,54886L,54887L,54888L,54889L,54890L,54891L,54892L,54893L,54894L, +54895L,54896L,54897L,54898L,54899L,54900L,54901L,54902L,54903L,54904L, +54905L,54906L,54907L,54908L,54909L,54910L,54911L,54912L,54913L,54914L, +54915L,54916L,54917L,54918L,54919L,54920L,54921L,54922L,54923L,54924L, +54925L,54926L,54927L,54928L,54929L,54930L,54931L,54932L,54933L,54934L, +54935L,54936L,54937L,54938L,54939L,54940L,54941L,54942L,54943L,54944L, +54945L,54946L,54947L,54948L,54949L,54950L,54951L,54952L,54953L,54954L, +54955L,54956L,54957L,54958L,54959L,54960L,54961L,54962L,54963L,54964L, +54965L,54966L,54967L,54968L,54969L,54970L,54971L,54972L,54973L,54974L, +54975L,54976L,54977L,54978L,54979L,54980L,54981L,54982L,54983L,54984L, +54985L,54986L,54987L,54988L,54989L,54990L,54991L,54992L,54993L,54994L, +54995L,54996L,54997L,54998L,54999L,55000L,55001L,55002L,55003L,55004L, +55005L,55006L,55007L,55008L,55009L,55010L,55011L,55012L,55013L,55014L, +55015L,55016L,55017L,55018L,55019L,55020L,55021L,55022L,55023L,55024L, +55025L,55026L,55027L,55028L,55029L,55030L,55031L,55032L,55033L,55034L, +55035L,55036L,55037L,55038L,55039L,55040L,55041L,55042L,55043L,55044L, +55045L,55046L,55047L,55048L,55049L,55050L,55051L,55052L,55053L,55054L, +55055L,55056L,55057L,55058L,55059L,55060L,55061L,55062L,55063L,55064L, +55065L,55066L,55067L,55068L,55069L,55070L,55071L,55072L,55073L,55074L, +55075L,55076L,55077L,55078L,55079L,55080L,55081L,55082L,55083L,55084L, +55085L,55086L,55087L,55088L,55089L,55090L,55091L,55092L,55093L,55094L, +55095L,55096L,55097L,55098L,55099L,55100L,55101L,55102L,55103L,55104L, +55105L,55106L,55107L,55108L,55109L,55110L,55111L,55112L,55113L,55114L, +55115L,55116L,55117L,55118L,55119L,55120L,55121L,55122L,55123L,55124L, +55125L,55126L,55127L,55128L,55129L,55130L,55131L,55132L,55133L,55134L, +55135L,55136L,55137L,55138L,55139L,55140L,55141L,55142L,55143L,55144L, +55145L,55146L,55147L,55148L,55149L,55150L,55151L,55152L,55153L,55154L, +55155L,55156L,55157L,55158L,55159L,55160L,55161L,55162L,55163L,55164L, +55165L,55166L,55167L,55168L,55169L,55170L,55171L,55172L,55173L,55174L, +55175L,55176L,55177L,55178L,55179L,55180L,55181L,55182L,55183L,55184L, +55185L,55186L,55187L,55188L,55189L,55190L,55191L,55192L,55193L,55194L, +55195L,55196L,55197L,55198L,55199L,55200L,55201L,55202L,55203L,55204L, +55205L,55206L,55207L,55208L,55209L,55210L,55211L,55212L,55213L,55214L, +55215L,55216L,55217L,55218L,55219L,55220L,55221L,55222L,55223L,55224L, +55225L,55226L,55227L,55228L,55229L,55230L,55231L,55232L,55233L,55234L, +55235L,55236L,55237L,55238L,55239L,55240L,55241L,55242L,55243L,55244L, +55245L,55246L,55247L,55248L,55249L,55250L,55251L,55252L,55253L,55254L, +55255L,55256L,55257L,55258L,55259L,55260L,55261L,55262L,55263L,55264L, +55265L,55266L,55267L,55268L,55269L,55270L,55271L,55272L,55273L,55274L, +55275L,55276L,55277L,55278L,55279L,55280L,55281L,55282L,55283L,55284L, +55285L,55286L,55287L,55288L,55289L,55290L,55291L,55292L,55293L,55294L, +55295L,55296L,55297L,55298L,55299L,55300L,55301L,55302L,55303L,55304L, +55305L,55306L,55307L,55308L,55309L,55310L,55311L,55312L,55313L,55314L, +55315L,55316L,55317L,55318L,55319L,55320L,55321L,55322L,55323L,55324L, +55325L,55326L,55327L,55328L,55329L,55330L,55331L,55332L,55333L,55334L, +55335L,55336L,55337L,55338L,55339L,55340L,55341L,55342L,55343L,55344L, +55345L,55346L,55347L,55348L,55349L,55350L,55351L,55352L,55353L,55354L, +55355L,55356L,55357L,55358L,55359L,55360L,55361L,55362L,55363L,55364L, +55365L,55366L,55367L,55368L,55369L,55370L,55371L,55372L,55373L,55374L, +55375L,55376L,55377L,55378L,55379L,55380L,55381L,55382L,55383L,55384L, +55385L,55386L,55387L,55388L,55389L,55390L,55391L,55392L,55393L,55394L, +55395L,55396L,55397L,55398L,55399L,55400L,55401L,55402L,55403L,55404L, +55405L,55406L,55407L,55408L,55409L,55410L,55411L,55412L,55413L,55414L, +55415L,55416L,55417L,55418L,55419L,55420L,55421L,55422L,55423L,55424L, +55425L,55426L,55427L,55428L,55429L,55430L,55431L,55432L,55433L,55434L, +55435L,55436L,55437L,55438L,55439L,55440L,55441L,55442L,55443L,55444L, +55445L,55446L,55447L,55448L,55449L,55450L,55451L,55452L,55453L,55454L, +55455L,55456L,55457L,55458L,55459L,55460L,55461L,55462L,55463L,55464L, +55465L,55466L,55467L,55468L,55469L,55470L,55471L,55472L,55473L,55474L, +55475L,55476L,55477L,55478L,55479L,55480L,55481L,55482L,55483L,55484L, +55485L,55486L,55487L,55488L,55489L,55490L,55491L,55492L,55493L,55494L, +55495L,55496L,55497L,55498L,55499L,55500L,55501L,55502L,55503L,55504L, +55505L,55506L,55507L,55508L,55509L,55510L,55511L,55512L,55513L,55514L, +55515L,55516L,55517L,55518L,55519L,55520L,55521L,55522L,55523L,55524L, +55525L,55526L,55527L,55528L,55529L,55530L,55531L,55532L,55533L,55534L, +55535L,55536L,55537L,55538L,55539L,55540L,55541L,55542L,55543L,55544L, +55545L,55546L,55547L,55548L,55549L,55550L,55551L,55552L,55553L,55554L, +55555L,55556L,55557L,55558L,55559L,55560L,55561L,55562L,55563L,55564L, +55565L,55566L,55567L,55568L,55569L,55570L,55571L,55572L,55573L,55574L, +55575L,55576L,55577L,55578L,55579L,55580L,55581L,55582L,55583L,55584L, +55585L,55586L,55587L,55588L,55589L,55590L,55591L,55592L,55593L,55594L, +55595L,55596L,55597L,55598L,55599L,55600L,55601L,55602L,55603L,55604L, +55605L,55606L,55607L,55608L,55609L,55610L,55611L,55612L,55613L,55614L, +55615L,55616L,55617L,55618L,55619L,55620L,55621L,55622L,55623L,55624L, +55625L,55626L,55627L,55628L,55629L,55630L,55631L,55632L,55633L,55634L, +55635L,55636L,55637L,55638L,55639L,55640L,55641L,55642L,55643L,55644L, +55645L,55646L,55647L,55648L,55649L,55650L,55651L,55652L,55653L,55654L, +55655L,55656L,55657L,55658L,55659L,55660L,55661L,55662L,55663L,55664L, +55665L,55666L,55667L,55668L,55669L,55670L,55671L,55672L,55673L,55674L, +55675L,55676L,55677L,55678L,55679L,55680L,55681L,55682L,55683L,55684L, +55685L,55686L,55687L,55688L,55689L,55690L,55691L,55692L,55693L,55694L, +55695L,55696L,55697L,55698L,55699L,55700L,55701L,55702L,55703L,55704L, +55705L,55706L,55707L,55708L,55709L,55710L,55711L,55712L,55713L,55714L, +55715L,55716L,55717L,55718L,55719L,55720L,55721L,55722L,55723L,55724L, +55725L,55726L,55727L,55728L,55729L,55730L,55731L,55732L,55733L,55734L, +55735L,55736L,55737L,55738L,55739L,55740L,55741L,55742L,55743L,55744L, +55745L,55746L,55747L,55748L,55749L,55750L,55751L,55752L,55753L,55754L, +55755L,55756L,55757L,55758L,55759L,55760L,55761L,55762L,55763L,55764L, +55765L,55766L,55767L,55768L,55769L,55770L,55771L,55772L,55773L,55774L, +55775L,55776L,55777L,55778L,55779L,55780L,55781L,55782L,55783L,55784L, +55785L,55786L,55787L,55788L,55789L,55790L,55791L,55792L,55793L,55794L, +55795L,55796L,55797L,55798L,55799L,55800L,55801L,55802L,55803L,55804L, +55805L,55806L,55807L,55808L,55809L,55810L,55811L,55812L,55813L,55814L, +55815L,55816L,55817L,55818L,55819L,55820L,55821L,55822L,55823L,55824L, +55825L,55826L,55827L,55828L,55829L,55830L,55831L,55832L,55833L,55834L, +55835L,55836L,55837L,55838L,55839L,55840L,55841L,55842L,55843L,55844L, +55845L,55846L,55847L,55848L,55849L,55850L,55851L,55852L,55853L,55854L, +55855L,55856L,55857L,55858L,55859L,55860L,55861L,55862L,55863L,55864L, +55865L,55866L,55867L,55868L,55869L,55870L,55871L,55872L,55873L,55874L, +55875L,55876L,55877L,55878L,55879L,55880L,55881L,55882L,55883L,55884L, +55885L,55886L,55887L,55888L,55889L,55890L,55891L,55892L,55893L,55894L, +55895L,55896L,55897L,55898L,55899L,55900L,55901L,55902L,55903L,55904L, +55905L,55906L,55907L,55908L,55909L,55910L,55911L,55912L,55913L,55914L, +55915L,55916L,55917L,55918L,55919L,55920L,55921L,55922L,55923L,55924L, +55925L,55926L,55927L,55928L,55929L,55930L,55931L,55932L,55933L,55934L, +55935L,55936L,55937L,55938L,55939L,55940L,55941L,55942L,55943L,55944L, +55945L,55946L,55947L,55948L,55949L,55950L,55951L,55952L,55953L,55954L, +55955L,55956L,55957L,55958L,55959L,55960L,55961L,55962L,55963L,55964L, +55965L,55966L,55967L,55968L,55969L,55970L,55971L,55972L,55973L,55974L, +55975L,55976L,55977L,55978L,55979L,55980L,55981L,55982L,55983L,55984L, +55985L,55986L,55987L,55988L,55989L,55990L,55991L,55992L,55993L,55994L, +55995L,55996L,55997L,55998L,55999L,56000L,56001L,56002L,56003L,56004L, +56005L,56006L,56007L,56008L,56009L,56010L,56011L,56012L,56013L,56014L, +56015L,56016L,56017L,56018L,56019L,56020L,56021L,56022L,56023L,56024L, +56025L,56026L,56027L,56028L,56029L,56030L,56031L,56032L,56033L,56034L, +56035L,56036L,56037L,56038L,56039L,56040L,56041L,56042L,56043L,56044L, +56045L,56046L,56047L,56048L,56049L,56050L,56051L,56052L,56053L,56054L, +56055L,56056L,56057L,56058L,56059L,56060L,56061L,56062L,56063L,56064L, +56065L,56066L,56067L,56068L,56069L,56070L,56071L,56072L,56073L,56074L, +56075L,56076L,56077L,56078L,56079L,56080L,56081L,56082L,56083L,56084L, +56085L,56086L,56087L,56088L,56089L,56090L,56091L,56092L,56093L,56094L, +56095L,56096L,56097L,56098L,56099L,56100L,56101L,56102L,56103L,56104L, +56105L,56106L,56107L,56108L,56109L,56110L,56111L,56112L,56113L,56114L, +56115L,56116L,56117L,56118L,56119L,56120L,56121L,56122L,56123L,56124L, +56125L,56126L,56127L,56128L,56129L,56130L,56131L,56132L,56133L,56134L, +56135L,56136L,56137L,56138L,56139L,56140L,56141L,56142L,56143L,56144L, +56145L,56146L,56147L,56148L,56149L,56150L,56151L,56152L,56153L,56154L, +56155L,56156L,56157L,56158L,56159L,56160L,56161L,56162L,56163L,56164L, +56165L,56166L,56167L,56168L,56169L,56170L,56171L,56172L,56173L,56174L, +56175L,56176L,56177L,56178L,56179L,56180L,56181L,56182L,56183L,56184L, +56185L,56186L,56187L,56188L,56189L,56190L,56191L,56192L,56193L,56194L, +56195L,56196L,56197L,56198L,56199L,56200L,56201L,56202L,56203L,56204L, +56205L,56206L,56207L,56208L,56209L,56210L,56211L,56212L,56213L,56214L, +56215L,56216L,56217L,56218L,56219L,56220L,56221L,56222L,56223L,56224L, +56225L,56226L,56227L,56228L,56229L,56230L,56231L,56232L,56233L,56234L, +56235L,56236L,56237L,56238L,56239L,56240L,56241L,56242L,56243L,56244L, +56245L,56246L,56247L,56248L,56249L,56250L,56251L,56252L,56253L,56254L, +56255L,56256L,56257L,56258L,56259L,56260L,56261L,56262L,56263L,56264L, +56265L,56266L,56267L,56268L,56269L,56270L,56271L,56272L,56273L,56274L, +56275L,56276L,56277L,56278L,56279L,56280L,56281L,56282L,56283L,56284L, +56285L,56286L,56287L,56288L,56289L,56290L,56291L,56292L,56293L,56294L, +56295L,56296L,56297L,56298L,56299L,56300L,56301L,56302L,56303L,56304L, +56305L,56306L,56307L,56308L,56309L,56310L,56311L,56312L,56313L,56314L, +56315L,56316L,56317L,56318L,56319L,56320L,56321L,56322L,56323L,56324L, +56325L,56326L,56327L,56328L,56329L,56330L,56331L,56332L,56333L,56334L, +56335L,56336L,56337L,56338L,56339L,56340L,56341L,56342L,56343L,56344L, +56345L,56346L,56347L,56348L,56349L,56350L,56351L,56352L,56353L,56354L, +56355L,56356L,56357L,56358L,56359L,56360L,56361L,56362L,56363L,56364L, +56365L,56366L,56367L,56368L,56369L,56370L,56371L,56372L,56373L,56374L, +56375L,56376L,56377L,56378L,56379L,56380L,56381L,56382L,56383L,56384L, +56385L,56386L,56387L,56388L,56389L,56390L,56391L,56392L,56393L,56394L, +56395L,56396L,56397L,56398L,56399L,56400L,56401L,56402L,56403L,56404L, +56405L,56406L,56407L,56408L,56409L,56410L,56411L,56412L,56413L,56414L, +56415L,56416L,56417L,56418L,56419L,56420L,56421L,56422L,56423L,56424L, +56425L,56426L,56427L,56428L,56429L,56430L,56431L,56432L,56433L,56434L, +56435L,56436L,56437L,56438L,56439L,56440L,56441L,56442L,56443L,56444L, +56445L,56446L,56447L,56448L,56449L,56450L,56451L,56452L,56453L,56454L, +56455L,56456L,56457L,56458L,56459L,56460L,56461L,56462L,56463L,56464L, +56465L,56466L,56467L,56468L,56469L,56470L,56471L,56472L,56473L,56474L, +56475L,56476L,56477L,56478L,56479L,56480L,56481L,56482L,56483L,56484L, +56485L,56486L,56487L,56488L,56489L,56490L,56491L,56492L,56493L,56494L, +56495L,56496L,56497L,56498L,56499L,56500L,56501L,56502L,56503L,56504L, +56505L,56506L,56507L,56508L,56509L,56510L,56511L,56512L,56513L,56514L, +56515L,56516L,56517L,56518L,56519L,56520L,56521L,56522L,56523L,56524L, +56525L,56526L,56527L,56528L,56529L,56530L,56531L,56532L,56533L,56534L, +56535L,56536L,56537L,56538L,56539L,56540L,56541L,56542L,56543L,56544L, +56545L,56546L,56547L,56548L,56549L,56550L,56551L,56552L,56553L,56554L, +56555L,56556L,56557L,56558L,56559L,56560L,56561L,56562L,56563L,56564L, +56565L,56566L,56567L,56568L,56569L,56570L,56571L,56572L,56573L,56574L, +56575L,56576L,56577L,56578L,56579L,56580L,56581L,56582L,56583L,56584L, +56585L,56586L,56587L,56588L,56589L,56590L,56591L,56592L,56593L,56594L, +56595L,56596L,56597L,56598L,56599L,56600L,56601L,56602L,56603L,56604L, +56605L,56606L,56607L,56608L,56609L,56610L,56611L,56612L,56613L,56614L, +56615L,56616L,56617L,56618L,56619L,56620L,56621L,56622L,56623L,56624L, +56625L,56626L,56627L,56628L,56629L,56630L,56631L,56632L,56633L,56634L, +56635L,56636L,56637L,56638L,56639L,56640L,56641L,56642L,56643L,56644L, +56645L,56646L,56647L,56648L,56649L,56650L,56651L,56652L,56653L,56654L, +56655L,56656L,56657L,56658L,56659L,56660L,56661L,56662L,56663L,56664L, +56665L,56666L,56667L,56668L,56669L,56670L,56671L,56672L,56673L,56674L, +56675L,56676L,56677L,56678L,56679L,56680L,56681L,56682L,56683L,56684L, +56685L,56686L,56687L,56688L,56689L,56690L,56691L,56692L,56693L,56694L, +56695L,56696L,56697L,56698L,56699L,56700L,56701L,56702L,56703L,56704L, +56705L,56706L,56707L,56708L,56709L,56710L,56711L,56712L,56713L,56714L, +56715L,56716L,56717L,56718L,56719L,56720L,56721L,56722L,56723L,56724L, +56725L,56726L,56727L,56728L,56729L,56730L,56731L,56732L,56733L,56734L, +56735L,56736L,56737L,56738L,56739L,56740L,56741L,56742L,56743L,56744L, +56745L,56746L,56747L,56748L,56749L,56750L,56751L,56752L,56753L,56754L, +56755L,56756L,56757L,56758L,56759L,56760L,56761L,56762L,56763L,56764L, +56765L,56766L,56767L,56768L,56769L,56770L,56771L,56772L,56773L,56774L, +56775L,56776L,56777L,56778L,56779L,56780L,56781L,56782L,56783L,56784L, +56785L,56786L,56787L,56788L,56789L,56790L,56791L,56792L,56793L,56794L, +56795L,56796L,56797L,56798L,56799L,56800L,56801L,56802L,56803L,56804L, +56805L,56806L,56807L,56808L,56809L,56810L,56811L,56812L,56813L,56814L, +56815L,56816L,56817L,56818L,56819L,56820L,56821L,56822L,56823L,56824L, +56825L,56826L,56827L,56828L,56829L,56830L,56831L,56832L,56833L,56834L, +56835L,56836L,56837L,56838L,56839L,56840L,56841L,56842L,56843L,56844L, +56845L,56846L,56847L,56848L,56849L,56850L,56851L,56852L,56853L,56854L, +56855L,56856L,56857L,56858L,56859L,56860L,56861L,56862L,56863L,56864L, +56865L,56866L,56867L,56868L,56869L,56870L,56871L,56872L,56873L,56874L, +56875L,56876L,56877L,56878L,56879L,56880L,56881L,56882L,56883L,56884L, +56885L,56886L,56887L,56888L,56889L,56890L,56891L,56892L,56893L,56894L, +56895L,56896L,56897L,56898L,56899L,56900L,56901L,56902L,56903L,56904L, +56905L,56906L,56907L,56908L,56909L,56910L,56911L,56912L,56913L,56914L, +56915L,56916L,56917L,56918L,56919L,56920L,56921L,56922L,56923L,56924L, +56925L,56926L,56927L,56928L,56929L,56930L,56931L,56932L,56933L,56934L, +56935L,56936L,56937L,56938L,56939L,56940L,56941L,56942L,56943L,56944L, +56945L,56946L,56947L,56948L,56949L,56950L,56951L,56952L,56953L,56954L, +56955L,56956L,56957L,56958L,56959L,56960L,56961L,56962L,56963L,56964L, +56965L,56966L,56967L,56968L,56969L,56970L,56971L,56972L,56973L,56974L, +56975L,56976L,56977L,56978L,56979L,56980L,56981L,56982L,56983L,56984L, +56985L,56986L,56987L,56988L,56989L,56990L,56991L,56992L,56993L,56994L, +56995L,56996L,56997L,56998L,56999L,57000L,57001L,57002L,57003L,57004L, +57005L,57006L,57007L,57008L,57009L,57010L,57011L,57012L,57013L,57014L, +57015L,57016L,57017L,57018L,57019L,57020L,57021L,57022L,57023L,57024L, +57025L,57026L,57027L,57028L,57029L,57030L,57031L,57032L,57033L,57034L, +57035L,57036L,57037L,57038L,57039L,57040L,57041L,57042L,57043L,57044L, +57045L,57046L,57047L,57048L,57049L,57050L,57051L,57052L,57053L,57054L, +57055L,57056L,57057L,57058L,57059L,57060L,57061L,57062L,57063L,57064L, +57065L,57066L,57067L,57068L,57069L,57070L,57071L,57072L,57073L,57074L, +57075L,57076L,57077L,57078L,57079L,57080L,57081L,57082L,57083L,57084L, +57085L,57086L,57087L,57088L,57089L,57090L,57091L,57092L,57093L,57094L, +57095L,57096L,57097L,57098L,57099L,57100L,57101L,57102L,57103L,57104L, +57105L,57106L,57107L,57108L,57109L,57110L,57111L,57112L,57113L,57114L, +57115L,57116L,57117L,57118L,57119L,57120L,57121L,57122L,57123L,57124L, +57125L,57126L,57127L,57128L,57129L,57130L,57131L,57132L,57133L,57134L, +57135L,57136L,57137L,57138L,57139L,57140L,57141L,57142L,57143L,57144L, +57145L,57146L,57147L,57148L,57149L,57150L,57151L,57152L,57153L,57154L, +57155L,57156L,57157L,57158L,57159L,57160L,57161L,57162L,57163L,57164L, +57165L,57166L,57167L,57168L,57169L,57170L,57171L,57172L,57173L,57174L, +57175L,57176L,57177L,57178L,57179L,57180L,57181L,57182L,57183L,57184L, +57185L,57186L,57187L,57188L,57189L,57190L,57191L,57192L,57193L,57194L, +57195L,57196L,57197L,57198L,57199L,57200L,57201L,57202L,57203L,57204L, +57205L,57206L,57207L,57208L,57209L,57210L,57211L,57212L,57213L,57214L, +57215L,57216L,57217L,57218L,57219L,57220L,57221L,57222L,57223L,57224L, +57225L,57226L,57227L,57228L,57229L,57230L,57231L,57232L,57233L,57234L, +57235L,57236L,57237L,57238L,57239L,57240L,57241L,57242L,57243L,57244L, +57245L,57246L,57247L,57248L,57249L,57250L,57251L,57252L,57253L,57254L, +57255L,57256L,57257L,57258L,57259L,57260L,57261L,57262L,57263L,57264L, +57265L,57266L,57267L,57268L,57269L,57270L,57271L,57272L,57273L,57274L, +57275L,57276L,57277L,57278L,57279L,57280L,57281L,57282L,57283L,57284L, +57285L,57286L,57287L,57288L,57289L,57290L,57291L,57292L,57293L,57294L, +57295L,57296L,57297L,57298L,57299L,57300L,57301L,57302L,57303L,57304L, +57305L,57306L,57307L,57308L,57309L,57310L,57311L,57312L,57313L,57314L, +57315L,57316L,57317L,57318L,57319L,57320L,57321L,57322L,57323L,57324L, +57325L,57326L,57327L,57328L,57329L,57330L,57331L,57332L,57333L,57334L, +57335L,57336L,57337L,57338L,57339L,57340L,57341L,57342L,57343L,57344L, +57345L,57346L,57347L,57348L,57349L,57350L,57351L,57352L,57353L,57354L, +57355L,57356L,57357L,57358L,57359L,57360L,57361L,57362L,57363L,57364L, +57365L,57366L,57367L,57368L,57369L,57370L,57371L,57372L,57373L,57374L, +57375L,57376L,57377L,57378L,57379L,57380L,57381L,57382L,57383L,57384L, +57385L,57386L,57387L,57388L,57389L,57390L,57391L,57392L,57393L,57394L, +57395L,57396L,57397L,57398L,57399L,57400L,57401L,57402L,57403L,57404L, +57405L,57406L,57407L,57408L,57409L,57410L,57411L,57412L,57413L,57414L, +57415L,57416L,57417L,57418L,57419L,57420L,57421L,57422L,57423L,57424L, +57425L,57426L,57427L,57428L,57429L,57430L,57431L,57432L,57433L,57434L, +57435L,57436L,57437L,57438L,57439L,57440L,57441L,57442L,57443L,57444L, +57445L,57446L,57447L,57448L,57449L,57450L,57451L,57452L,57453L,57454L, +57455L,57456L,57457L,57458L,57459L,57460L,57461L,57462L,57463L,57464L, +57465L,57466L,57467L,57468L,57469L,57470L,57471L,57472L,57473L,57474L, +57475L,57476L,57477L,57478L,57479L,57480L,57481L,57482L,57483L,57484L, +57485L,57486L,57487L,57488L,57489L,57490L,57491L,57492L,57493L,57494L, +57495L,57496L,57497L,57498L,57499L,57500L,57501L,57502L,57503L,57504L, +57505L,57506L,57507L,57508L,57509L,57510L,57511L,57512L,57513L,57514L, +57515L,57516L,57517L,57518L,57519L,57520L,57521L,57522L,57523L,57524L, +57525L,57526L,57527L,57528L,57529L,57530L,57531L,57532L,57533L,57534L, +57535L,57536L,57537L,57538L,57539L,57540L,57541L,57542L,57543L,57544L, +57545L,57546L,57547L,57548L,57549L,57550L,57551L,57552L,57553L,57554L, +57555L,57556L,57557L,57558L,57559L,57560L,57561L,57562L,57563L,57564L, +57565L,57566L,57567L,57568L,57569L,57570L,57571L,57572L,57573L,57574L, +57575L,57576L,57577L,57578L,57579L,57580L,57581L,57582L,57583L,57584L, +57585L,57586L,57587L,57588L,57589L,57590L,57591L,57592L,57593L,57594L, +57595L,57596L,57597L,57598L,57599L,57600L,57601L,57602L,57603L,57604L, +57605L,57606L,57607L,57608L,57609L,57610L,57611L,57612L,57613L,57614L, +57615L,57616L,57617L,57618L,57619L,57620L,57621L,57622L,57623L,57624L, +57625L,57626L,57627L,57628L,57629L,57630L,57631L,57632L,57633L,57634L, +57635L,57636L,57637L,57638L,57639L,57640L,57641L,57642L,57643L,57644L, +57645L,57646L,57647L,57648L,57649L,57650L,57651L,57652L,57653L,57654L, +57655L,57656L,57657L,57658L,57659L,57660L,57661L,57662L,57663L,57664L, +57665L,57666L,57667L,57668L,57669L,57670L,57671L,57672L,57673L,57674L, +57675L,57676L,57677L,57678L,57679L,57680L,57681L,57682L,57683L,57684L, +57685L,57686L,57687L,57688L,57689L,57690L,57691L,57692L,57693L,57694L, +57695L,57696L,57697L,57698L,57699L,57700L,57701L,57702L,57703L,57704L, +57705L,57706L,57707L,57708L,57709L,57710L,57711L,57712L,57713L,57714L, +57715L,57716L,57717L,57718L,57719L,57720L,57721L,57722L,57723L,57724L, +57725L,57726L,57727L,57728L,57729L,57730L,57731L,57732L,57733L,57734L, +57735L,57736L,57737L,57738L,57739L,57740L,57741L,57742L,57743L,57744L, +57745L,57746L,57747L,57748L,57749L,57750L,57751L,57752L,57753L,57754L, +57755L,57756L,57757L,57758L,57759L,57760L,57761L,57762L,57763L,57764L, +57765L,57766L,57767L,57768L,57769L,57770L,57771L,57772L,57773L,57774L, +57775L,57776L,57777L,57778L,57779L,57780L,57781L,57782L,57783L,57784L, +57785L,57786L,57787L,57788L,57789L,57790L,57791L,57792L,57793L,57794L, +57795L,57796L,57797L,57798L,57799L,57800L,57801L,57802L,57803L,57804L, +57805L,57806L,57807L,57808L,57809L,57810L,57811L,57812L,57813L,57814L, +57815L,57816L,57817L,57818L,57819L,57820L,57821L,57822L,57823L,57824L, +57825L,57826L,57827L,57828L,57829L,57830L,57831L,57832L,57833L,57834L, +57835L,57836L,57837L,57838L,57839L,57840L,57841L,57842L,57843L,57844L, +57845L,57846L,57847L,57848L,57849L,57850L,57851L,57852L,57853L,57854L, +57855L,57856L,57857L,57858L,57859L,57860L,57861L,57862L,57863L,57864L, +57865L,57866L,57867L,57868L,57869L,57870L,57871L,57872L,57873L,57874L, +57875L,57876L,57877L,57878L,57879L,57880L,57881L,57882L,57883L,57884L, +57885L,57886L,57887L,57888L,57889L,57890L,57891L,57892L,57893L,57894L, +57895L,57896L,57897L,57898L,57899L,57900L,57901L,57902L,57903L,57904L, +57905L,57906L,57907L,57908L,57909L,57910L,57911L,57912L,57913L,57914L, +57915L,57916L,57917L,57918L,57919L,57920L,57921L,57922L,57923L,57924L, +57925L,57926L,57927L,57928L,57929L,57930L,57931L,57932L,57933L,57934L, +57935L,57936L,57937L,57938L,57939L,57940L,57941L,57942L,57943L,57944L, +57945L,57946L,57947L,57948L,57949L,57950L,57951L,57952L,57953L,57954L, +57955L,57956L,57957L,57958L,57959L,57960L,57961L,57962L,57963L,57964L, +57965L,57966L,57967L,57968L,57969L,57970L,57971L,57972L,57973L,57974L, +57975L,57976L,57977L,57978L,57979L,57980L,57981L,57982L,57983L,57984L, +57985L,57986L,57987L,57988L,57989L,57990L,57991L,57992L,57993L,57994L, +57995L,57996L,57997L,57998L,57999L,58000L,58001L,58002L,58003L,58004L, +58005L,58006L,58007L,58008L,58009L,58010L,58011L,58012L,58013L,58014L, +58015L,58016L,58017L,58018L,58019L,58020L,58021L,58022L,58023L,58024L, +58025L,58026L,58027L,58028L,58029L,58030L,58031L,58032L,58033L,58034L, +58035L,58036L,58037L,58038L,58039L,58040L,58041L,58042L,58043L,58044L, +58045L,58046L,58047L,58048L,58049L,58050L,58051L,58052L,58053L,58054L, +58055L,58056L,58057L,58058L,58059L,58060L,58061L,58062L,58063L,58064L, +58065L,58066L,58067L,58068L,58069L,58070L,58071L,58072L,58073L,58074L, +58075L,58076L,58077L,58078L,58079L,58080L,58081L,58082L,58083L,58084L, +58085L,58086L,58087L,58088L,58089L,58090L,58091L,58092L,58093L,58094L, +58095L,58096L,58097L,58098L,58099L,58100L,58101L,58102L,58103L,58104L, +58105L,58106L,58107L,58108L,58109L,58110L,58111L,58112L,58113L,58114L, +58115L,58116L,58117L,58118L,58119L,58120L,58121L,58122L,58123L,58124L, +58125L,58126L,58127L,58128L,58129L,58130L,58131L,58132L,58133L,58134L, +58135L,58136L,58137L,58138L,58139L,58140L,58141L,58142L,58143L,58144L, +58145L,58146L,58147L,58148L,58149L,58150L,58151L,58152L,58153L,58154L, +58155L,58156L,58157L,58158L,58159L,58160L,58161L,58162L,58163L,58164L, +58165L,58166L,58167L,58168L,58169L,58170L,58171L,58172L,58173L,58174L, +58175L,58176L,58177L,58178L,58179L,58180L,58181L,58182L,58183L,58184L, +58185L,58186L,58187L,58188L,58189L,58190L,58191L,58192L,58193L,58194L, +58195L,58196L,58197L,58198L,58199L,58200L,58201L,58202L,58203L,58204L, +58205L,58206L,58207L,58208L,58209L,58210L,58211L,58212L,58213L,58214L, +58215L,58216L,58217L,58218L,58219L,58220L,58221L,58222L,58223L,58224L, +58225L,58226L,58227L,58228L,58229L,58230L,58231L,58232L,58233L,58234L, +58235L,58236L,58237L,58238L,58239L,58240L,58241L,58242L,58243L,58244L, +58245L,58246L,58247L,58248L,58249L,58250L,58251L,58252L,58253L,58254L, +58255L,58256L,58257L,58258L,58259L,58260L,58261L,58262L,58263L,58264L, +58265L,58266L,58267L,58268L,58269L,58270L,58271L,58272L,58273L,58274L, +58275L,58276L,58277L,58278L,58279L,58280L,58281L,58282L,58283L,58284L, +58285L,58286L,58287L,58288L,58289L,58290L,58291L,58292L,58293L,58294L, +58295L,58296L,58297L,58298L,58299L,58300L,58301L,58302L,58303L,58304L, +58305L,58306L,58307L,58308L,58309L,58310L,58311L,58312L,58313L,58314L, +58315L,58316L,58317L,58318L,58319L,58320L,58321L,58322L,58323L,58324L, +58325L,58326L,58327L,58328L,58329L,58330L,58331L,58332L,58333L,58334L, +58335L,58336L,58337L,58338L,58339L,58340L,58341L,58342L,58343L,58344L, +58345L,58346L,58347L,58348L,58349L,58350L,58351L,58352L,58353L,58354L, +58355L,58356L,58357L,58358L,58359L,58360L,58361L,58362L,58363L,58364L, +58365L,58366L,58367L,58368L,58369L,58370L,58371L,58372L,58373L,58374L, +58375L,58376L,58377L,58378L,58379L,58380L,58381L,58382L,58383L,58384L, +58385L,58386L,58387L,58388L,58389L,58390L,58391L,58392L,58393L,58394L, +58395L,58396L,58397L,58398L,58399L,58400L,58401L,58402L,58403L,58404L, +58405L,58406L,58407L,58408L,58409L,58410L,58411L,58412L,58413L,58414L, +58415L,58416L,58417L,58418L,58419L,58420L,58421L,58422L,58423L,58424L, +58425L,58426L,58427L,58428L,58429L,58430L,58431L,58432L,58433L,58434L, +58435L,58436L,58437L,58438L,58439L,58440L,58441L,58442L,58443L,58444L, +58445L,58446L,58447L,58448L,58449L,58450L,58451L,58452L,58453L,58454L, +58455L,58456L,58457L,58458L,58459L,58460L,58461L,58462L,58463L,58464L, +58465L,58466L,58467L,58468L,58469L,58470L,58471L,58472L,58473L,58474L, +58475L,58476L,58477L,58478L,58479L,58480L,58481L,58482L,58483L,58484L, +58485L,58486L,58487L,58488L,58489L,58490L,58491L,58492L,58493L,58494L, +58495L,58496L,58497L,58498L,58499L,58500L,58501L,58502L,58503L,58504L, +58505L,58506L,58507L,58508L,58509L,58510L,58511L,58512L,58513L,58514L, +58515L,58516L,58517L,58518L,58519L,58520L,58521L,58522L,58523L,58524L, +58525L,58526L,58527L,58528L,58529L,58530L,58531L,58532L,58533L,58534L, +58535L,58536L,58537L,58538L,58539L,58540L,58541L,58542L,58543L,58544L, +58545L,58546L,58547L,58548L,58549L,58550L,58551L,58552L,58553L,58554L, +58555L,58556L,58557L,58558L,58559L,58560L,58561L,58562L,58563L,58564L, +58565L,58566L,58567L,58568L,58569L,58570L,58571L,58572L,58573L,58574L, +58575L,58576L,58577L,58578L,58579L,58580L,58581L,58582L,58583L,58584L, +58585L,58586L,58587L,58588L,58589L,58590L,58591L,58592L,58593L,58594L, +58595L,58596L,58597L,58598L,58599L,58600L,58601L,58602L,58603L,58604L, +58605L,58606L,58607L,58608L,58609L,58610L,58611L,58612L,58613L,58614L, +58615L,58616L,58617L,58618L,58619L,58620L,58621L,58622L,58623L,58624L, +58625L,58626L,58627L,58628L,58629L,58630L,58631L,58632L,58633L,58634L, +58635L,58636L,58637L,58638L,58639L,58640L,58641L,58642L,58643L,58644L, +58645L,58646L,58647L,58648L,58649L,58650L,58651L,58652L,58653L,58654L, +58655L,58656L,58657L,58658L,58659L,58660L,58661L,58662L,58663L,58664L, +58665L,58666L,58667L,58668L,58669L,58670L,58671L,58672L,58673L,58674L, +58675L,58676L,58677L,58678L,58679L,58680L,58681L,58682L,58683L,58684L, +58685L,58686L,58687L,58688L,58689L,58690L,58691L,58692L,58693L,58694L, +58695L,58696L,58697L,58698L,58699L,58700L,58701L,58702L,58703L,58704L, +58705L,58706L,58707L,58708L,58709L,58710L,58711L,58712L,58713L,58714L, +58715L,58716L,58717L,58718L,58719L,58720L,58721L,58722L,58723L,58724L, +58725L,58726L,58727L,58728L,58729L,58730L,58731L,58732L,58733L,58734L, +58735L,58736L,58737L,58738L,58739L,58740L,58741L,58742L,58743L,58744L, +58745L,58746L,58747L,58748L,58749L,58750L,58751L,58752L,58753L,58754L, +58755L,58756L,58757L,58758L,58759L,58760L,58761L,58762L,58763L,58764L, +58765L,58766L,58767L,58768L,58769L,58770L,58771L,58772L,58773L,58774L, +58775L,58776L,58777L,58778L,58779L,58780L,58781L,58782L,58783L,58784L, +58785L,58786L,58787L,58788L,58789L,58790L,58791L,58792L,58793L,58794L, +58795L,58796L,58797L,58798L,58799L,58800L,58801L,58802L,58803L,58804L, +58805L,58806L,58807L,58808L,58809L,58810L,58811L,58812L,58813L,58814L, +58815L,58816L,58817L,58818L,58819L,58820L,58821L,58822L,58823L,58824L, +58825L,58826L,58827L,58828L,58829L,58830L,58831L,58832L,58833L,58834L, +58835L,58836L,58837L,58838L,58839L,58840L,58841L,58842L,58843L,58844L, +58845L,58846L,58847L,58848L,58849L,58850L,58851L,58852L,58853L,58854L, +58855L,58856L,58857L,58858L,58859L,58860L,58861L,58862L,58863L,58864L, +58865L,58866L,58867L,58868L,58869L,58870L,58871L,58872L,58873L,58874L, +58875L,58876L,58877L,58878L,58879L,58880L,58881L,58882L,58883L,58884L, +58885L,58886L,58887L,58888L,58889L,58890L,58891L,58892L,58893L,58894L, +58895L,58896L,58897L,58898L,58899L,58900L,58901L,58902L,58903L,58904L, +58905L,58906L,58907L,58908L,58909L,58910L,58911L,58912L,58913L,58914L, +58915L,58916L,58917L,58918L,58919L,58920L,58921L,58922L,58923L,58924L, +58925L,58926L,58927L,58928L,58929L,58930L,58931L,58932L,58933L,58934L, +58935L,58936L,58937L,58938L,58939L,58940L,58941L,58942L,58943L,58944L, +58945L,58946L,58947L,58948L,58949L,58950L,58951L,58952L,58953L,58954L, +58955L,58956L,58957L,58958L,58959L,58960L,58961L,58962L,58963L,58964L, +58965L,58966L,58967L,58968L,58969L,58970L,58971L,58972L,58973L,58974L, +58975L,58976L,58977L,58978L,58979L,58980L,58981L,58982L,58983L,58984L, +58985L,58986L,58987L,58988L,58989L,58990L,58991L,58992L,58993L,58994L, +58995L,58996L,58997L,58998L,58999L,59000L,59001L,59002L,59003L,59004L, +59005L,59006L,59007L,59008L,59009L,59010L,59011L,59012L,59013L,59014L, +59015L,59016L,59017L,59018L,59019L,59020L,59021L,59022L,59023L,59024L, +59025L,59026L,59027L,59028L,59029L,59030L,59031L,59032L,59033L,59034L, +59035L,59036L,59037L,59038L,59039L,59040L,59041L,59042L,59043L,59044L, +59045L,59046L,59047L,59048L,59049L,59050L,59051L,59052L,59053L,59054L, +59055L,59056L,59057L,59058L,59059L,59060L,59061L,59062L,59063L,59064L, +59065L,59066L,59067L,59068L,59069L,59070L,59071L,59072L,59073L,59074L, +59075L,59076L,59077L,59078L,59079L,59080L,59081L,59082L,59083L,59084L, +59085L,59086L,59087L,59088L,59089L,59090L,59091L,59092L,59093L,59094L, +59095L,59096L,59097L,59098L,59099L,59100L,59101L,59102L,59103L,59104L, +59105L,59106L,59107L,59108L,59109L,59110L,59111L,59112L,59113L,59114L, +59115L,59116L,59117L,59118L,59119L,59120L,59121L,59122L,59123L,59124L, +59125L,59126L,59127L,59128L,59129L,59130L,59131L,59132L,59133L,59134L, +59135L,59136L,59137L,59138L,59139L,59140L,59141L,59142L,59143L,59144L, +59145L,59146L,59147L,59148L,59149L,59150L,59151L,59152L,59153L,59154L, +59155L,59156L,59157L,59158L,59159L,59160L,59161L,59162L,59163L,59164L, +59165L,59166L,59167L,59168L,59169L,59170L,59171L,59172L,59173L,59174L, +59175L,59176L,59177L,59178L,59179L,59180L,59181L,59182L,59183L,59184L, +59185L,59186L,59187L,59188L,59189L,59190L,59191L,59192L,59193L,59194L, +59195L,59196L,59197L,59198L,59199L,59200L,59201L,59202L,59203L,59204L, +59205L,59206L,59207L,59208L,59209L,59210L,59211L,59212L,59213L,59214L, +59215L,59216L,59217L,59218L,59219L,59220L,59221L,59222L,59223L,59224L, +59225L,59226L,59227L,59228L,59229L,59230L,59231L,59232L,59233L,59234L, +59235L,59236L,59237L,59238L,59239L,59240L,59241L,59242L,59243L,59244L, +59245L,59246L,59247L,59248L,59249L,59250L,59251L,59252L,59253L,59254L, +59255L,59256L,59257L,59258L,59259L,59260L,59261L,59262L,59263L,59264L, +59265L,59266L,59267L,59268L,59269L,59270L,59271L,59272L,59273L,59274L, +59275L,59276L,59277L,59278L,59279L,59280L,59281L,59282L,59283L,59284L, +59285L,59286L,59287L,59288L,59289L,59290L,59291L,59292L,59293L,59294L, +59295L,59296L,59297L,59298L,59299L,59300L,59301L,59302L,59303L,59304L, +59305L,59306L,59307L,59308L,59309L,59310L,59311L,59312L,59313L,59314L, +59315L,59316L,59317L,59318L,59319L,59320L,59321L,59322L,59323L,59324L, +59325L,59326L,59327L,59328L,59329L,59330L,59331L,59332L,59333L,59334L, +59335L,59336L,59337L,59338L,59339L,59340L,59341L,59342L,59343L,59344L, +59345L,59346L,59347L,59348L,59349L,59350L,59351L,59352L,59353L,59354L, +59355L,59356L,59357L,59358L,59359L,59360L,59361L,59362L,59363L,59364L, +59365L,59366L,59367L,59368L,59369L,59370L,59371L,59372L,59373L,59374L, +59375L,59376L,59377L,59378L,59379L,59380L,59381L,59382L,59383L,59384L, +59385L,59386L,59387L,59388L,59389L,59390L,59391L,59392L,59393L,59394L, +59395L,59396L,59397L,59398L,59399L,59400L,59401L,59402L,59403L,59404L, +59405L,59406L,59407L,59408L,59409L,59410L,59411L,59412L,59413L,59414L, +59415L,59416L,59417L,59418L,59419L,59420L,59421L,59422L,59423L,59424L, +59425L,59426L,59427L,59428L,59429L,59430L,59431L,59432L,59433L,59434L, +59435L,59436L,59437L,59438L,59439L,59440L,59441L,59442L,59443L,59444L, +59445L,59446L,59447L,59448L,59449L,59450L,59451L,59452L,59453L,59454L, +59455L,59456L,59457L,59458L,59459L,59460L,59461L,59462L,59463L,59464L, +59465L,59466L,59467L,59468L,59469L,59470L,59471L,59472L,59473L,59474L, +59475L,59476L,59477L,59478L,59479L,59480L,59481L,59482L,59483L,59484L, +59485L,59486L,59487L,59488L,59489L,59490L,59491L,59492L,59493L,59494L, +59495L,59496L,59497L,59498L,59499L,59500L,59501L,59502L,59503L,59504L, +59505L,59506L,59507L,59508L,59509L,59510L,59511L,59512L,59513L,59514L, +59515L,59516L,59517L,59518L,59519L,59520L,59521L,59522L,59523L,59524L, +59525L,59526L,59527L,59528L,59529L,59530L,59531L,59532L,59533L,59534L, +59535L,59536L,59537L,59538L,59539L,59540L,59541L,59542L,59543L,59544L, +59545L,59546L,59547L,59548L,59549L,59550L,59551L,59552L,59553L,59554L, +59555L,59556L,59557L,59558L,59559L,59560L,59561L,59562L,59563L,59564L, +59565L,59566L,59567L,59568L,59569L,59570L,59571L,59572L,59573L,59574L, +59575L,59576L,59577L,59578L,59579L,59580L,59581L,59582L,59583L,59584L, +59585L,59586L,59587L,59588L,59589L,59590L,59591L,59592L,59593L,59594L, +59595L,59596L,59597L,59598L,59599L,59600L,59601L,59602L,59603L,59604L, +59605L,59606L,59607L,59608L,59609L,59610L,59611L,59612L,59613L,59614L, +59615L,59616L,59617L,59618L,59619L,59620L,59621L,59622L,59623L,59624L, +59625L,59626L,59627L,59628L,59629L,59630L,59631L,59632L,59633L,59634L, +59635L,59636L,59637L,59638L,59639L,59640L,59641L,59642L,59643L,59644L, +59645L,59646L,59647L,59648L,59649L,59650L,59651L,59652L,59653L,59654L, +59655L,59656L,59657L,59658L,59659L,59660L,59661L,59662L,59663L,59664L, +59665L,59666L,59667L,59668L,59669L,59670L,59671L,59672L,59673L,59674L, +59675L,59676L,59677L,59678L,59679L,59680L,59681L,59682L,59683L,59684L, +59685L,59686L,59687L,59688L,59689L,59690L,59691L,59692L,59693L,59694L, +59695L,59696L,59697L,59698L,59699L,59700L,59701L,59702L,59703L,59704L, +59705L,59706L,59707L,59708L,59709L,59710L,59711L,59712L,59713L,59714L, +59715L,59716L,59717L,59718L,59719L,59720L,59721L,59722L,59723L,59724L, +59725L,59726L,59727L,59728L,59729L,59730L,59731L,59732L,59733L,59734L, +59735L,59736L,59737L,59738L,59739L,59740L,59741L,59742L,59743L,59744L, +59745L,59746L,59747L,59748L,59749L,59750L,59751L,59752L,59753L,59754L, +59755L,59756L,59757L,59758L,59759L,59760L,59761L,59762L,59763L,59764L, +59765L,59766L,59767L,59768L,59769L,59770L,59771L,59772L,59773L,59774L, +59775L,59776L,59777L,59778L,59779L,59780L,59781L,59782L,59783L,59784L, +59785L,59786L,59787L,59788L,59789L,59790L,59791L,59792L,59793L,59794L, +59795L,59796L,59797L,59798L,59799L,59800L,59801L,59802L,59803L,59804L, +59805L,59806L,59807L,59808L,59809L,59810L,59811L,59812L,59813L,59814L, +59815L,59816L,59817L,59818L,59819L,59820L,59821L,59822L,59823L,59824L, +59825L,59826L,59827L,59828L,59829L,59830L,59831L,59832L,59833L,59834L, +59835L,59836L,59837L,59838L,59839L,59840L,59841L,59842L,59843L,59844L, +59845L,59846L,59847L,59848L,59849L,59850L,59851L,59852L,59853L,59854L, +59855L,59856L,59857L,59858L,59859L,59860L,59861L,59862L,59863L,59864L, +59865L,59866L,59867L,59868L,59869L,59870L,59871L,59872L,59873L,59874L, +59875L,59876L,59877L,59878L,59879L,59880L,59881L,59882L,59883L,59884L, +59885L,59886L,59887L,59888L,59889L,59890L,59891L,59892L,59893L,59894L, +59895L,59896L,59897L,59898L,59899L,59900L,59901L,59902L,59903L,59904L, +59905L,59906L,59907L,59908L,59909L,59910L,59911L,59912L,59913L,59914L, +59915L,59916L,59917L,59918L,59919L,59920L,59921L,59922L,59923L,59924L, +59925L,59926L,59927L,59928L,59929L,59930L,59931L,59932L,59933L,59934L, +59935L,59936L,59937L,59938L,59939L,59940L,59941L,59942L,59943L,59944L, +59945L,59946L,59947L,59948L,59949L,59950L,59951L,59952L,59953L,59954L, +59955L,59956L,59957L,59958L,59959L,59960L,59961L,59962L,59963L,59964L, +59965L,59966L,59967L,59968L,59969L,59970L,59971L,59972L,59973L,59974L, +59975L,59976L,59977L,59978L,59979L,59980L,59981L,59982L,59983L,59984L, +59985L,59986L,59987L,59988L,59989L,59990L,59991L,59992L,59993L,59994L, +59995L,59996L,59997L,59998L,59999L,60000L,60001L,60002L,60003L,60004L, +60005L,60006L,60007L,60008L,60009L,60010L,60011L,60012L,60013L,60014L, +60015L,60016L,60017L,60018L,60019L,60020L,60021L,60022L,60023L,60024L, +60025L,60026L,60027L,60028L,60029L,60030L,60031L,60032L,60033L,60034L, +60035L,60036L,60037L,60038L,60039L,60040L,60041L,60042L,60043L,60044L, +60045L,60046L,60047L,60048L,60049L,60050L,60051L,60052L,60053L,60054L, +60055L,60056L,60057L,60058L,60059L,60060L,60061L,60062L,60063L,60064L, +60065L,60066L,60067L,60068L,60069L,60070L,60071L,60072L,60073L,60074L, +60075L,60076L,60077L,60078L,60079L,60080L,60081L,60082L,60083L,60084L, +60085L,60086L,60087L,60088L,60089L,60090L,60091L,60092L,60093L,60094L, +60095L,60096L,60097L,60098L,60099L,60100L,60101L,60102L,60103L,60104L, +60105L,60106L,60107L,60108L,60109L,60110L,60111L,60112L,60113L,60114L, +60115L,60116L,60117L,60118L,60119L,60120L,60121L,60122L,60123L,60124L, +60125L,60126L,60127L,60128L,60129L,60130L,60131L,60132L,60133L,60134L, +60135L,60136L,60137L,60138L,60139L,60140L,60141L,60142L,60143L,60144L, +60145L,60146L,60147L,60148L,60149L,60150L,60151L,60152L,60153L,60154L, +60155L,60156L,60157L,60158L,60159L,60160L,60161L,60162L,60163L,60164L, +60165L,60166L,60167L,60168L,60169L,60170L,60171L,60172L,60173L,60174L, +60175L,60176L,60177L,60178L,60179L,60180L,60181L,60182L,60183L,60184L, +60185L,60186L,60187L,60188L,60189L,60190L,60191L,60192L,60193L,60194L, +60195L,60196L,60197L,60198L,60199L,60200L,60201L,60202L,60203L,60204L, +60205L,60206L,60207L,60208L,60209L,60210L,60211L,60212L,60213L,60214L, +60215L,60216L,60217L,60218L,60219L,60220L,60221L,60222L,60223L,60224L, +60225L,60226L,60227L,60228L,60229L,60230L,60231L,60232L,60233L,60234L, +60235L,60236L,60237L,60238L,60239L,60240L,60241L,60242L,60243L,60244L, +60245L,60246L,60247L,60248L,60249L,60250L,60251L,60252L,60253L,60254L, +60255L,60256L,60257L,60258L,60259L,60260L,60261L,60262L,60263L,60264L, +60265L,60266L,60267L,60268L,60269L,60270L,60271L,60272L,60273L,60274L, +60275L,60276L,60277L,60278L,60279L,60280L,60281L,60282L,60283L,60284L, +60285L,60286L,60287L,60288L,60289L,60290L,60291L,60292L,60293L,60294L, +60295L,60296L,60297L,60298L,60299L,60300L,60301L,60302L,60303L,60304L, +60305L,60306L,60307L,60308L,60309L,60310L,60311L,60312L,60313L,60314L, +60315L,60316L,60317L,60318L,60319L,60320L,60321L,60322L,60323L,60324L, +60325L,60326L,60327L,60328L,60329L,60330L,60331L,60332L,60333L,60334L, +60335L,60336L,60337L,60338L,60339L,60340L,60341L,60342L,60343L,60344L, +60345L,60346L,60347L,60348L,60349L,60350L,60351L,60352L,60353L,60354L, +60355L,60356L,60357L,60358L,60359L,60360L,60361L,60362L,60363L,60364L, +60365L,60366L,60367L,60368L,60369L,60370L,60371L,60372L,60373L,60374L, +60375L,60376L,60377L,60378L,60379L,60380L,60381L,60382L,60383L,60384L, +60385L,60386L,60387L,60388L,60389L,60390L,60391L,60392L,60393L,60394L, +60395L,60396L,60397L,60398L,60399L,60400L,60401L,60402L,60403L,60404L, +60405L,60406L,60407L,60408L,60409L,60410L,60411L,60412L,60413L,60414L, +60415L,60416L,60417L,60418L,60419L,60420L,60421L,60422L,60423L,60424L, +60425L,60426L,60427L,60428L,60429L,60430L,60431L,60432L,60433L,60434L, +60435L,60436L,60437L,60438L,60439L,60440L,60441L,60442L,60443L,60444L, +60445L,60446L,60447L,60448L,60449L,60450L,60451L,60452L,60453L,60454L, +60455L,60456L,60457L,60458L,60459L,60460L,60461L,60462L,60463L,60464L, +60465L,60466L,60467L,60468L,60469L,60470L,60471L,60472L,60473L,60474L, +60475L,60476L,60477L,60478L,60479L,60480L,60481L,60482L,60483L,60484L, +60485L,60486L,60487L,60488L,60489L,60490L,60491L,60492L,60493L,60494L, +60495L,60496L,60497L,60498L,60499L,60500L,60501L,60502L,60503L,60504L, +60505L,60506L,60507L,60508L,60509L,60510L,60511L,60512L,60513L,60514L, +60515L,60516L,60517L,60518L,60519L,60520L,60521L,60522L,60523L,60524L, +60525L,60526L,60527L,60528L,60529L,60530L,60531L,60532L,60533L,60534L, +60535L,60536L,60537L,60538L,60539L,60540L,60541L,60542L,60543L,60544L, +60545L,60546L,60547L,60548L,60549L,60550L,60551L,60552L,60553L,60554L, +60555L,60556L,60557L,60558L,60559L,60560L,60561L,60562L,60563L,60564L, +60565L,60566L,60567L,60568L,60569L,60570L,60571L,60572L,60573L,60574L, +60575L,60576L,60577L,60578L,60579L,60580L,60581L,60582L,60583L,60584L, +60585L,60586L,60587L,60588L,60589L,60590L,60591L,60592L,60593L,60594L, +60595L,60596L,60597L,60598L,60599L,60600L,60601L,60602L,60603L,60604L, +60605L,60606L,60607L,60608L,60609L,60610L,60611L,60612L,60613L,60614L, +60615L,60616L,60617L,60618L,60619L,60620L,60621L,60622L,60623L,60624L, +60625L,60626L,60627L,60628L,60629L,60630L,60631L,60632L,60633L,60634L, +60635L,60636L,60637L,60638L,60639L,60640L,60641L,60642L,60643L,60644L, +60645L,60646L,60647L,60648L,60649L,60650L,60651L,60652L,60653L,60654L, +60655L,60656L,60657L,60658L,60659L,60660L,60661L,60662L,60663L,60664L, +60665L,60666L,60667L,60668L,60669L,60670L,60671L,60672L,60673L,60674L, +60675L,60676L,60677L,60678L,60679L,60680L,60681L,60682L,60683L,60684L, +60685L,60686L,60687L,60688L,60689L,60690L,60691L,60692L,60693L,60694L, +60695L,60696L,60697L,60698L,60699L,60700L,60701L,60702L,60703L,60704L, +60705L,60706L,60707L,60708L,60709L,60710L,60711L,60712L,60713L,60714L, +60715L,60716L,60717L,60718L,60719L,60720L,60721L,60722L,60723L,60724L, +60725L,60726L,60727L,60728L,60729L,60730L,60731L,60732L,60733L,60734L, +60735L,60736L,60737L,60738L,60739L,60740L,60741L,60742L,60743L,60744L, +60745L,60746L,60747L,60748L,60749L,60750L,60751L,60752L,60753L,60754L, +60755L,60756L,60757L,60758L,60759L,60760L,60761L,60762L,60763L,60764L, +60765L,60766L,60767L,60768L,60769L,60770L,60771L,60772L,60773L,60774L, +60775L,60776L,60777L,60778L,60779L,60780L,60781L,60782L,60783L,60784L, +60785L,60786L,60787L,60788L,60789L,60790L,60791L,60792L,60793L,60794L, +60795L,60796L,60797L,60798L,60799L,60800L,60801L,60802L,60803L,60804L, +60805L,60806L,60807L,60808L,60809L,60810L,60811L,60812L,60813L,60814L, +60815L,60816L,60817L,60818L,60819L,60820L,60821L,60822L,60823L,60824L, +60825L,60826L,60827L,60828L,60829L,60830L,60831L,60832L,60833L,60834L, +60835L,60836L,60837L,60838L,60839L,60840L,60841L,60842L,60843L,60844L, +60845L,60846L,60847L,60848L,60849L,60850L,60851L,60852L,60853L,60854L, +60855L,60856L,60857L,60858L,60859L,60860L,60861L,60862L,60863L,60864L, +60865L,60866L,60867L,60868L,60869L,60870L,60871L,60872L,60873L,60874L, +60875L,60876L,60877L,60878L,60879L,60880L,60881L,60882L,60883L,60884L, +60885L,60886L,60887L,60888L,60889L,60890L,60891L,60892L,60893L,60894L, +60895L,60896L,60897L,60898L,60899L,60900L,60901L,60902L,60903L,60904L, +60905L,60906L,60907L,60908L,60909L,60910L,60911L,60912L,60913L,60914L, +60915L,60916L,60917L,60918L,60919L,60920L,60921L,60922L,60923L,60924L, +60925L,60926L,60927L,60928L,60929L,60930L,60931L,60932L,60933L,60934L, +60935L,60936L,60937L,60938L,60939L,60940L,60941L,60942L,60943L,60944L, +60945L,60946L,60947L,60948L,60949L,60950L,60951L,60952L,60953L,60954L, +60955L,60956L,60957L,60958L,60959L,60960L,60961L,60962L,60963L,60964L, +60965L,60966L,60967L,60968L,60969L,60970L,60971L,60972L,60973L,60974L, +60975L,60976L,60977L,60978L,60979L,60980L,60981L,60982L,60983L,60984L, +60985L,60986L,60987L,60988L,60989L,60990L,60991L,60992L,60993L,60994L, +60995L,60996L,60997L,60998L,60999L,61000L,61001L,61002L,61003L,61004L, +61005L,61006L,61007L,61008L,61009L,61010L,61011L,61012L,61013L,61014L, +61015L,61016L,61017L,61018L,61019L,61020L,61021L,61022L,61023L,61024L, +61025L,61026L,61027L,61028L,61029L,61030L,61031L,61032L,61033L,61034L, +61035L,61036L,61037L,61038L,61039L,61040L,61041L,61042L,61043L,61044L, +61045L,61046L,61047L,61048L,61049L,61050L,61051L,61052L,61053L,61054L, +61055L,61056L,61057L,61058L,61059L,61060L,61061L,61062L,61063L,61064L, +61065L,61066L,61067L,61068L,61069L,61070L,61071L,61072L,61073L,61074L, +61075L,61076L,61077L,61078L,61079L,61080L,61081L,61082L,61083L,61084L, +61085L,61086L,61087L,61088L,61089L,61090L,61091L,61092L,61093L,61094L, +61095L,61096L,61097L,61098L,61099L,61100L,61101L,61102L,61103L,61104L, +61105L,61106L,61107L,61108L,61109L,61110L,61111L,61112L,61113L,61114L, +61115L,61116L,61117L,61118L,61119L,61120L,61121L,61122L,61123L,61124L, +61125L,61126L,61127L,61128L,61129L,61130L,61131L,61132L,61133L,61134L, +61135L,61136L,61137L,61138L,61139L,61140L,61141L,61142L,61143L,61144L, +61145L,61146L,61147L,61148L,61149L,61150L,61151L,61152L,61153L,61154L, +61155L,61156L,61157L,61158L,61159L,61160L,61161L,61162L,61163L,61164L, +61165L,61166L,61167L,61168L,61169L,61170L,61171L,61172L,61173L,61174L, +61175L,61176L,61177L,61178L,61179L,61180L,61181L,61182L,61183L,61184L, +61185L,61186L,61187L,61188L,61189L,61190L,61191L,61192L,61193L,61194L, +61195L,61196L,61197L,61198L,61199L,61200L,61201L,61202L,61203L,61204L, +61205L,61206L,61207L,61208L,61209L,61210L,61211L,61212L,61213L,61214L, +61215L,61216L,61217L,61218L,61219L,61220L,61221L,61222L,61223L,61224L, +61225L,61226L,61227L,61228L,61229L,61230L,61231L,61232L,61233L,61234L, +61235L,61236L,61237L,61238L,61239L,61240L,61241L,61242L,61243L,61244L, +61245L,61246L,61247L,61248L,61249L,61250L,61251L,61252L,61253L,61254L, +61255L,61256L,61257L,61258L,61259L,61260L,61261L,61262L,61263L,61264L, +61265L,61266L,61267L,61268L,61269L,61270L,61271L,61272L,61273L,61274L, +61275L,61276L,61277L,61278L,61279L,61280L,61281L,61282L,61283L,61284L, +61285L,61286L,61287L,61288L,61289L,61290L,61291L,61292L,61293L,61294L, +61295L,61296L,61297L,61298L,61299L,61300L,61301L,61302L,61303L,61304L, +61305L,61306L,61307L,61308L,61309L,61310L,61311L,61312L,61313L,61314L, +61315L,61316L,61317L,61318L,61319L,61320L,61321L,61322L,61323L,61324L, +61325L,61326L,61327L,61328L,61329L,61330L,61331L,61332L,61333L,61334L, +61335L,61336L,61337L,61338L,61339L,61340L,61341L,61342L,61343L,61344L, +61345L,61346L,61347L,61348L,61349L,61350L,61351L,61352L,61353L,61354L, +61355L,61356L,61357L,61358L,61359L,61360L,61361L,61362L,61363L,61364L, +61365L,61366L,61367L,61368L,61369L,61370L,61371L,61372L,61373L,61374L, +61375L,61376L,61377L,61378L,61379L,61380L,61381L,61382L,61383L,61384L, +61385L,61386L,61387L,61388L,61389L,61390L,61391L,61392L,61393L,61394L, +61395L,61396L,61397L,61398L,61399L,61400L,61401L,61402L,61403L,61404L, +61405L,61406L,61407L,61408L,61409L,61410L,61411L,61412L,61413L,61414L, +61415L,61416L,61417L,61418L,61419L,61420L,61421L,61422L,61423L,61424L, +61425L,61426L,61427L,61428L,61429L,61430L,61431L,61432L,61433L,61434L, +61435L,61436L,61437L,61438L,61439L,61440L,61441L,61442L,61443L,61444L, +61445L,61446L,61447L,61448L,61449L,61450L,61451L,61452L,61453L,61454L, +61455L,61456L,61457L,61458L,61459L,61460L,61461L,61462L,61463L,61464L, +61465L,61466L,61467L,61468L,61469L,61470L,61471L,61472L,61473L,61474L, +61475L,61476L,61477L,61478L,61479L,61480L,61481L,61482L,61483L,61484L, +61485L,61486L,61487L,61488L,61489L,61490L,61491L,61492L,61493L,61494L, +61495L,61496L,61497L,61498L,61499L,61500L,61501L,61502L,61503L,61504L, +61505L,61506L,61507L,61508L,61509L,61510L,61511L,61512L,61513L,61514L, +61515L,61516L,61517L,61518L,61519L,61520L,61521L,61522L,61523L,61524L, +61525L,61526L,61527L,61528L,61529L,61530L,61531L,61532L,61533L,61534L, +61535L,61536L,61537L,61538L,61539L,61540L,61541L,61542L,61543L,61544L, +61545L,61546L,61547L,61548L,61549L,61550L,61551L,61552L,61553L,61554L, +61555L,61556L,61557L,61558L,61559L,61560L,61561L,61562L,61563L,61564L, +61565L,61566L,61567L,61568L,61569L,61570L,61571L,61572L,61573L,61574L, +61575L,61576L,61577L,61578L,61579L,61580L,61581L,61582L,61583L,61584L, +61585L,61586L,61587L,61588L,61589L,61590L,61591L,61592L,61593L,61594L, +61595L,61596L,61597L,61598L,61599L,61600L,61601L,61602L,61603L,61604L, +61605L,61606L,61607L,61608L,61609L,61610L,61611L,61612L,61613L,61614L, +61615L,61616L,61617L,61618L,61619L,61620L,61621L,61622L,61623L,61624L, +61625L,61626L,61627L,61628L,61629L,61630L,61631L,61632L,61633L,61634L, +61635L,61636L,61637L,61638L,61639L,61640L,61641L,61642L,61643L,61644L, +61645L,61646L,61647L,61648L,61649L,61650L,61651L,61652L,61653L,61654L, +61655L,61656L,61657L,61658L,61659L,61660L,61661L,61662L,61663L,61664L, +61665L,61666L,61667L,61668L,61669L,61670L,61671L,61672L,61673L,61674L, +61675L,61676L,61677L,61678L,61679L,61680L,61681L,61682L,61683L,61684L, +61685L,61686L,61687L,61688L,61689L,61690L,61691L,61692L,61693L,61694L, +61695L,61696L,61697L,61698L,61699L,61700L,61701L,61702L,61703L,61704L, +61705L,61706L,61707L,61708L,61709L,61710L,61711L,61712L,61713L,61714L, +61715L,61716L,61717L,61718L,61719L,61720L,61721L,61722L,61723L,61724L, +61725L,61726L,61727L,61728L,61729L,61730L,61731L,61732L,61733L,61734L, +61735L,61736L,61737L,61738L,61739L,61740L,61741L,61742L,61743L,61744L, +61745L,61746L,61747L,61748L,61749L,61750L,61751L,61752L,61753L,61754L, +61755L,61756L,61757L,61758L,61759L,61760L,61761L,61762L,61763L,61764L, +61765L,61766L,61767L,61768L,61769L,61770L,61771L,61772L,61773L,61774L, +61775L,61776L,61777L,61778L,61779L,61780L,61781L,61782L,61783L,61784L, +61785L,61786L,61787L,61788L,61789L,61790L,61791L,61792L,61793L,61794L, +61795L,61796L,61797L,61798L,61799L,61800L,61801L,61802L,61803L,61804L, +61805L,61806L,61807L,61808L,61809L,61810L,61811L,61812L,61813L,61814L, +61815L,61816L,61817L,61818L,61819L,61820L,61821L,61822L,61823L,61824L, +61825L,61826L,61827L,61828L,61829L,61830L,61831L,61832L,61833L,61834L, +61835L,61836L,61837L,61838L,61839L,61840L,61841L,61842L,61843L,61844L, +61845L,61846L,61847L,61848L,61849L,61850L,61851L,61852L,61853L,61854L, +61855L,61856L,61857L,61858L,61859L,61860L,61861L,61862L,61863L,61864L, +61865L,61866L,61867L,61868L,61869L,61870L,61871L,61872L,61873L,61874L, +61875L,61876L,61877L,61878L,61879L,61880L,61881L,61882L,61883L,61884L, +61885L,61886L,61887L,61888L,61889L,61890L,61891L,61892L,61893L,61894L, +61895L,61896L,61897L,61898L,61899L,61900L,61901L,61902L,61903L,61904L, +61905L,61906L,61907L,61908L,61909L,61910L,61911L,61912L,61913L,61914L, +61915L,61916L,61917L,61918L,61919L,61920L,61921L,61922L,61923L,61924L, +61925L,61926L,61927L,61928L,61929L,61930L,61931L,61932L,61933L,61934L, +61935L,61936L,61937L,61938L,61939L,61940L,61941L,61942L,61943L,61944L, +61945L,61946L,61947L,61948L,61949L,61950L,61951L,61952L,61953L,61954L, +61955L,61956L,61957L,61958L,61959L,61960L,61961L,61962L,61963L,61964L, +61965L,61966L,61967L,61968L,61969L,61970L,61971L,61972L,61973L,61974L, +61975L,61976L,61977L,61978L,61979L,61980L,61981L,61982L,61983L,61984L, +61985L,61986L,61987L,61988L,61989L,61990L,61991L,61992L,61993L,61994L, +61995L,61996L,61997L,61998L,61999L,62000L,62001L,62002L,62003L,62004L, +62005L,62006L,62007L,62008L,62009L,62010L,62011L,62012L,62013L,62014L, +62015L,62016L,62017L,62018L,62019L,62020L,62021L,62022L,62023L,62024L, +62025L,62026L,62027L,62028L,62029L,62030L,62031L,62032L,62033L,62034L, +62035L,62036L,62037L,62038L,62039L,62040L,62041L,62042L,62043L,62044L, +62045L,62046L,62047L,62048L,62049L,62050L,62051L,62052L,62053L,62054L, +62055L,62056L,62057L,62058L,62059L,62060L,62061L,62062L,62063L,62064L, +62065L,62066L,62067L,62068L,62069L,62070L,62071L,62072L,62073L,62074L, +62075L,62076L,62077L,62078L,62079L,62080L,62081L,62082L,62083L,62084L, +62085L,62086L,62087L,62088L,62089L,62090L,62091L,62092L,62093L,62094L, +62095L,62096L,62097L,62098L,62099L,62100L,62101L,62102L,62103L,62104L, +62105L,62106L,62107L,62108L,62109L,62110L,62111L,62112L,62113L,62114L, +62115L,62116L,62117L,62118L,62119L,62120L,62121L,62122L,62123L,62124L, +62125L,62126L,62127L,62128L,62129L,62130L,62131L,62132L,62133L,62134L, +62135L,62136L,62137L,62138L,62139L,62140L,62141L,62142L,62143L,62144L, +62145L,62146L,62147L,62148L,62149L,62150L,62151L,62152L,62153L,62154L, +62155L,62156L,62157L,62158L,62159L,62160L,62161L,62162L,62163L,62164L, +62165L,62166L,62167L,62168L,62169L,62170L,62171L,62172L,62173L,62174L, +62175L,62176L,62177L,62178L,62179L,62180L,62181L,62182L,62183L,62184L, +62185L,62186L,62187L,62188L,62189L,62190L,62191L,62192L,62193L,62194L, +62195L,62196L,62197L,62198L,62199L,62200L,62201L,62202L,62203L,62204L, +62205L,62206L,62207L,62208L,62209L,62210L,62211L,62212L,62213L,62214L, +62215L,62216L,62217L,62218L,62219L,62220L,62221L,62222L,62223L,62224L, +62225L,62226L,62227L,62228L,62229L,62230L,62231L,62232L,62233L,62234L, +62235L,62236L,62237L,62238L,62239L,62240L,62241L,62242L,62243L,62244L, +62245L,62246L,62247L,62248L,62249L,62250L,62251L,62252L,62253L,62254L, +62255L,62256L,62257L,62258L,62259L,62260L,62261L,62262L,62263L,62264L, +62265L,62266L,62267L,62268L,62269L,62270L,62271L,62272L,62273L,62274L, +62275L,62276L,62277L,62278L,62279L,62280L,62281L,62282L,62283L,62284L, +62285L,62286L,62287L,62288L,62289L,62290L,62291L,62292L,62293L,62294L, +62295L,62296L,62297L,62298L,62299L,62300L,62301L,62302L,62303L,62304L, +62305L,62306L,62307L,62308L,62309L,62310L,62311L,62312L,62313L,62314L, +62315L,62316L,62317L,62318L,62319L,62320L,62321L,62322L,62323L,62324L, +62325L,62326L,62327L,62328L,62329L,62330L,62331L,62332L,62333L,62334L, +62335L,62336L,62337L,62338L,62339L,62340L,62341L,62342L,62343L,62344L, +62345L,62346L,62347L,62348L,62349L,62350L,62351L,62352L,62353L,62354L, +62355L,62356L,62357L,62358L,62359L,62360L,62361L,62362L,62363L,62364L, +62365L,62366L,62367L,62368L,62369L,62370L,62371L,62372L,62373L,62374L, +62375L,62376L,62377L,62378L,62379L,62380L,62381L,62382L,62383L,62384L, +62385L,62386L,62387L,62388L,62389L,62390L,62391L,62392L,62393L,62394L, +62395L,62396L,62397L,62398L,62399L,62400L,62401L,62402L,62403L,62404L, +62405L,62406L,62407L,62408L,62409L,62410L,62411L,62412L,62413L,62414L, +62415L,62416L,62417L,62418L,62419L,62420L,62421L,62422L,62423L,62424L, +62425L,62426L,62427L,62428L,62429L,62430L,62431L,62432L,62433L,62434L, +62435L,62436L,62437L,62438L,62439L,62440L,62441L,62442L,62443L,62444L, +62445L,62446L,62447L,62448L,62449L,62450L,62451L,62452L,62453L,62454L, +62455L,62456L,62457L,62458L,62459L,62460L,62461L,62462L,62463L,62464L, +62465L,62466L,62467L,62468L,62469L,62470L,62471L,62472L,62473L,62474L, +62475L,62476L,62477L,62478L,62479L,62480L,62481L,62482L,62483L,62484L, +62485L,62486L,62487L,62488L,62489L,62490L,62491L,62492L,62493L,62494L, +62495L,62496L,62497L,62498L,62499L,62500L,62501L,62502L,62503L,62504L, +62505L,62506L,62507L,62508L,62509L,62510L,62511L,62512L,62513L,62514L, +62515L,62516L,62517L,62518L,62519L,62520L,62521L,62522L,62523L,62524L, +62525L,62526L,62527L,62528L,62529L,62530L,62531L,62532L,62533L,62534L, +62535L,62536L,62537L,62538L,62539L,62540L,62541L,62542L,62543L,62544L, +62545L,62546L,62547L,62548L,62549L,62550L,62551L,62552L,62553L,62554L, +62555L,62556L,62557L,62558L,62559L,62560L,62561L,62562L,62563L,62564L, +62565L,62566L,62567L,62568L,62569L,62570L,62571L,62572L,62573L,62574L, +62575L,62576L,62577L,62578L,62579L,62580L,62581L,62582L,62583L,62584L, +62585L,62586L,62587L,62588L,62589L,62590L,62591L,62592L,62593L,62594L, +62595L,62596L,62597L,62598L,62599L,62600L,62601L,62602L,62603L,62604L, +62605L,62606L,62607L,62608L,62609L,62610L,62611L,62612L,62613L,62614L, +62615L,62616L,62617L,62618L,62619L,62620L,62621L,62622L,62623L,62624L, +62625L,62626L,62627L,62628L,62629L,62630L,62631L,62632L,62633L,62634L, +62635L,62636L,62637L,62638L,62639L,62640L,62641L,62642L,62643L,62644L, +62645L,62646L,62647L,62648L,62649L,62650L,62651L,62652L,62653L,62654L, +62655L,62656L,62657L,62658L,62659L,62660L,62661L,62662L,62663L,62664L, +62665L,62666L,62667L,62668L,62669L,62670L,62671L,62672L,62673L,62674L, +62675L,62676L,62677L,62678L,62679L,62680L,62681L,62682L,62683L,62684L, +62685L,62686L,62687L,62688L,62689L,62690L,62691L,62692L,62693L,62694L, +62695L,62696L,62697L,62698L,62699L,62700L,62701L,62702L,62703L,62704L, +62705L,62706L,62707L,62708L,62709L,62710L,62711L,62712L,62713L,62714L, +62715L,62716L,62717L,62718L,62719L,62720L,62721L,62722L,62723L,62724L, +62725L,62726L,62727L,62728L,62729L,62730L,62731L,62732L,62733L,62734L, +62735L,62736L,62737L,62738L,62739L,62740L,62741L,62742L,62743L,62744L, +62745L,62746L,62747L,62748L,62749L,62750L,62751L,62752L,62753L,62754L, +62755L,62756L,62757L,62758L,62759L,62760L,62761L,62762L,62763L,62764L, +62765L,62766L,62767L,62768L,62769L,62770L,62771L,62772L,62773L,62774L, +62775L,62776L,62777L,62778L,62779L,62780L,62781L,62782L,62783L,62784L, +62785L,62786L,62787L,62788L,62789L,62790L,62791L,62792L,62793L,62794L, +62795L,62796L,62797L,62798L,62799L,62800L,62801L,62802L,62803L,62804L, +62805L,62806L,62807L,62808L,62809L,62810L,62811L,62812L,62813L,62814L, +62815L,62816L,62817L,62818L,62819L,62820L,62821L,62822L,62823L,62824L, +62825L,62826L,62827L,62828L,62829L,62830L,62831L,62832L,62833L,62834L, +62835L,62836L,62837L,62838L,62839L,62840L,62841L,62842L,62843L,62844L, +62845L,62846L,62847L,62848L,62849L,62850L,62851L,62852L,62853L,62854L, +62855L,62856L,62857L,62858L,62859L,62860L,62861L,62862L,62863L,62864L, +62865L,62866L,62867L,62868L,62869L,62870L,62871L,62872L,62873L,62874L, +62875L,62876L,62877L,62878L,62879L,62880L,62881L,62882L,62883L,62884L, +62885L,62886L,62887L,62888L,62889L,62890L,62891L,62892L,62893L,62894L, +62895L,62896L,62897L,62898L,62899L,62900L,62901L,62902L,62903L,62904L, +62905L,62906L,62907L,62908L,62909L,62910L,62911L,62912L,62913L,62914L, +62915L,62916L,62917L,62918L,62919L,62920L,62921L,62922L,62923L,62924L, +62925L,62926L,62927L,62928L,62929L,62930L,62931L,62932L,62933L,62934L, +62935L,62936L,62937L,62938L,62939L,62940L,62941L,62942L,62943L,62944L, +62945L,62946L,62947L,62948L,62949L,62950L,62951L,62952L,62953L,62954L, +62955L,62956L,62957L,62958L,62959L,62960L,62961L,62962L,62963L,62964L, +62965L,62966L,62967L,62968L,62969L,62970L,62971L,62972L,62973L,62974L, +62975L,62976L,62977L,62978L,62979L,62980L,62981L,62982L,62983L,62984L, +62985L,62986L,62987L,62988L,62989L,62990L,62991L,62992L,62993L,62994L, +62995L,62996L,62997L,62998L,62999L,63000L,63001L,63002L,63003L,63004L, +63005L,63006L,63007L,63008L,63009L,63010L,63011L,63012L,63013L,63014L, +63015L,63016L,63017L,63018L,63019L,63020L,63021L,63022L,63023L,63024L, +63025L,63026L,63027L,63028L,63029L,63030L,63031L,63032L,63033L,63034L, +63035L,63036L,63037L,63038L,63039L,63040L,63041L,63042L,63043L,63044L, +63045L,63046L,63047L,63048L,63049L,63050L,63051L,63052L,63053L,63054L, +63055L,63056L,63057L,63058L,63059L,63060L,63061L,63062L,63063L,63064L, +63065L,63066L,63067L,63068L,63069L,63070L,63071L,63072L,63073L,63074L, +63075L,63076L,63077L,63078L,63079L,63080L,63081L,63082L,63083L,63084L, +63085L,63086L,63087L,63088L,63089L,63090L,63091L,63092L,63093L,63094L, +63095L,63096L,63097L,63098L,63099L,63100L,63101L,63102L,63103L,63104L, +63105L,63106L,63107L,63108L,63109L,63110L,63111L,63112L,63113L,63114L, +63115L,63116L,63117L,63118L,63119L,63120L,63121L,63122L,63123L,63124L, +63125L,63126L,63127L,63128L,63129L,63130L,63131L,63132L,63133L,63134L, +63135L,63136L,63137L,63138L,63139L,63140L,63141L,63142L,63143L,63144L, +63145L,63146L,63147L,63148L,63149L,63150L,63151L,63152L,63153L,63154L, +63155L,63156L,63157L,63158L,63159L,63160L,63161L,63162L,63163L,63164L, +63165L,63166L,63167L,63168L,63169L,63170L,63171L,63172L,63173L,63174L, +63175L,63176L,63177L,63178L,63179L,63180L,63181L,63182L,63183L,63184L, +63185L,63186L,63187L,63188L,63189L,63190L,63191L,63192L,63193L,63194L, +63195L,63196L,63197L,63198L,63199L,63200L,63201L,63202L,63203L,63204L, +63205L,63206L,63207L,63208L,63209L,63210L,63211L,63212L,63213L,63214L, +63215L,63216L,63217L,63218L,63219L,63220L,63221L,63222L,63223L,63224L, +63225L,63226L,63227L,63228L,63229L,63230L,63231L,63232L,63233L,63234L, +63235L,63236L,63237L,63238L,63239L,63240L,63241L,63242L,63243L,63244L, +63245L,63246L,63247L,63248L,63249L,63250L,63251L,63252L,63253L,63254L, +63255L,63256L,63257L,63258L,63259L,63260L,63261L,63262L,63263L,63264L, +63265L,63266L,63267L,63268L,63269L,63270L,63271L,63272L,63273L,63274L, +63275L,63276L,63277L,63278L,63279L,63280L,63281L,63282L,63283L,63284L, +63285L,63286L,63287L,63288L,63289L,63290L,63291L,63292L,63293L,63294L, +63295L,63296L,63297L,63298L,63299L,63300L,63301L,63302L,63303L,63304L, +63305L,63306L,63307L,63308L,63309L,63310L,63311L,63312L,63313L,63314L, +63315L,63316L,63317L,63318L,63319L,63320L,63321L,63322L,63323L,63324L, +63325L,63326L,63327L,63328L,63329L,63330L,63331L,63332L,63333L,63334L, +63335L,63336L,63337L,63338L,63339L,63340L,63341L,63342L,63343L,63344L, +63345L,63346L,63347L,63348L,63349L,63350L,63351L,63352L,63353L,63354L, +63355L,63356L,63357L,63358L,63359L,63360L,63361L,63362L,63363L,63364L, +63365L,63366L,63367L,63368L,63369L,63370L,63371L,63372L,63373L,63374L, +63375L,63376L,63377L,63378L,63379L,63380L,63381L,63382L,63383L,63384L, +63385L,63386L,63387L,63388L,63389L,63390L,63391L,63392L,63393L,63394L, +63395L,63396L,63397L,63398L,63399L,63400L,63401L,63402L,63403L,63404L, +63405L,63406L,63407L,63408L,63409L,63410L,63411L,63412L,63413L,63414L, +63415L,63416L,63417L,63418L,63419L,63420L,63421L,63422L,63423L,63424L, +63425L,63426L,63427L,63428L,63429L,63430L,63431L,63432L,63433L,63434L, +63435L,63436L,63437L,63438L,63439L,63440L,63441L,63442L,63443L,63444L, +63445L,63446L,63447L,63448L,63449L,63450L,63451L,63452L,63453L,63454L, +63455L,63456L,63457L,63458L,63459L,63460L,63461L,63462L,63463L,63464L, +63465L,63466L,63467L,63468L,63469L,63470L,63471L,63472L,63473L,63474L, +63475L,63476L,63477L,63478L,63479L,63480L,63481L,63482L,63483L,63484L, +63485L,63486L,63487L,63488L,63489L,63490L,63491L,63492L,63493L,63494L, +63495L,63496L,63497L,63498L,63499L,63500L,63501L,63502L,63503L,63504L, +63505L,63506L,63507L,63508L,63509L,63510L,63511L,63512L,63513L,63514L, +63515L,63516L,63517L,63518L,63519L,63520L,63521L,63522L,63523L,63524L, +63525L,63526L,63527L,63528L,63529L,63530L,63531L,63532L,63533L,63534L, +63535L,63536L,63537L,63538L,63539L,63540L,63541L,63542L,63543L,63544L, +63545L,63546L,63547L,63548L,63549L,63550L,63551L,63552L,63553L,63554L, +63555L,63556L,63557L,63558L,63559L,63560L,63561L,63562L,63563L,63564L, +63565L,63566L,63567L,63568L,63569L,63570L,63571L,63572L,63573L,63574L, +63575L,63576L,63577L,63578L,63579L,63580L,63581L,63582L,63583L,63584L, +63585L,63586L,63587L,63588L,63589L,63590L,63591L,63592L,63593L,63594L, +63595L,63596L,63597L,63598L,63599L,63600L,63601L,63602L,63603L,63604L, +63605L,63606L,63607L,63608L,63609L,63610L,63611L,63612L,63613L,63614L, +63615L,63616L,63617L,63618L,63619L,63620L,63621L,63622L,63623L,63624L, +63625L,63626L,63627L,63628L,63629L,63630L,63631L,63632L,63633L,63634L, +63635L,63636L,63637L,63638L,63639L,63640L,63641L,63642L,63643L,63644L, +63645L,63646L,63647L,63648L,63649L,63650L,63651L,63652L,63653L,63654L, +63655L,63656L,63657L,63658L,63659L,63660L,63661L,63662L,63663L,63664L, +63665L,63666L,63667L,63668L,63669L,63670L,63671L,63672L,63673L,63674L, +63675L,63676L,63677L,63678L,63679L,63680L,63681L,63682L,63683L,63684L, +63685L,63686L,63687L,63688L,63689L,63690L,63691L,63692L,63693L,63694L, +63695L,63696L,63697L,63698L,63699L,63700L,63701L,63702L,63703L,63704L, +63705L,63706L,63707L,63708L,63709L,63710L,63711L,63712L,63713L,63714L, +63715L,63716L,63717L,63718L,63719L,63720L,63721L,63722L,63723L,63724L, +63725L,63726L,63727L,63728L,63729L,63730L,63731L,63732L,63733L,63734L, +63735L,63736L,63737L,63738L,63739L,63740L,63741L,63742L,63743L,63744L, +63745L,63746L,63747L,63748L,63749L,63750L,63751L,63752L,63753L,63754L, +63755L,63756L,63757L,63758L,63759L,63760L,63761L,63762L,63763L,63764L, +63765L,63766L,63767L,63768L,63769L,63770L,63771L,63772L,63773L,63774L, +63775L,63776L,63777L,63778L,63779L,63780L,63781L,63782L,63783L,63784L, +63785L,63786L,63787L,63788L,63789L,63790L,63791L,63792L,63793L,63794L, +63795L,63796L,63797L,63798L,63799L,63800L,63801L,63802L,63803L,63804L, +63805L,63806L,63807L,63808L,63809L,63810L,63811L,63812L,63813L,63814L, +63815L,63816L,63817L,63818L,63819L,63820L,63821L,63822L,63823L,63824L, +63825L,63826L,63827L,63828L,63829L,63830L,63831L,63832L,63833L,63834L, +63835L,63836L,63837L,63838L,63839L,63840L,63841L,63842L,63843L,63844L, +63845L,63846L,63847L,63848L,63849L,63850L,63851L,63852L,63853L,63854L, +63855L,63856L,63857L,63858L,63859L,63860L,63861L,63862L,63863L,63864L, +63865L,63866L,63867L,63868L,63869L,63870L,63871L,63872L,63873L,63874L, +63875L,63876L,63877L,63878L,63879L,63880L,63881L,63882L,63883L,63884L, +63885L,63886L,63887L,63888L,63889L,63890L,63891L,63892L,63893L,63894L, +63895L,63896L,63897L,63898L,63899L,63900L,63901L,63902L,63903L,63904L, +63905L,63906L,63907L,63908L,63909L,63910L,63911L,63912L,63913L,63914L, +63915L,63916L,63917L,63918L,63919L,63920L,63921L,63922L,63923L,63924L, +63925L,63926L,63927L,63928L,63929L,63930L,63931L,63932L,63933L,63934L, +63935L,63936L,63937L,63938L,63939L,63940L,63941L,63942L,63943L,63944L, +63945L,63946L,63947L,63948L,63949L,63950L,63951L,63952L,63953L,63954L, +63955L,63956L,63957L,63958L,63959L,63960L,63961L,63962L,63963L,63964L, +63965L,63966L,63967L,63968L,63969L,63970L,63971L,63972L,63973L,63974L, +63975L,63976L,63977L,63978L,63979L,63980L,63981L,63982L,63983L,63984L, +63985L,63986L,63987L,63988L,63989L,63990L,63991L,63992L,63993L,63994L, +63995L,63996L,63997L,63998L,63999L,64000L,64001L,64002L,64003L,64004L, +64005L,64006L,64007L,64008L,64009L,64010L,64011L,64012L,64013L,64014L, +64015L,64016L,64017L,64018L,64019L,64020L,64021L,64022L,64023L,64024L, +64025L,64026L,64027L,64028L,64029L,64030L,64031L,64032L,64033L,64034L, +64035L,64036L,64037L,64038L,64039L,64040L,64041L,64042L,64043L,64044L, +64045L,64046L,64047L,64048L,64049L,64050L,64051L,64052L,64053L,64054L, +64055L,64056L,64057L,64058L,64059L,64060L,64061L,64062L,64063L,64064L, +64065L,64066L,64067L,64068L,64069L,64070L,64071L,64072L,64073L,64074L, +64075L,64076L,64077L,64078L,64079L,64080L,64081L,64082L,64083L,64084L, +64085L,64086L,64087L,64088L,64089L,64090L,64091L,64092L,64093L,64094L, +64095L,64096L,64097L,64098L,64099L,64100L,64101L,64102L,64103L,64104L, +64105L,64106L,64107L,64108L,64109L,64110L,64111L,64112L,64113L,64114L, +64115L,64116L,64117L,64118L,64119L,64120L,64121L,64122L,64123L,64124L, +64125L,64126L,64127L,64128L,64129L,64130L,64131L,64132L,64133L,64134L, +64135L,64136L,64137L,64138L,64139L,64140L,64141L,64142L,64143L,64144L, +64145L,64146L,64147L,64148L,64149L,64150L,64151L,64152L,64153L,64154L, +64155L,64156L,64157L,64158L,64159L,64160L,64161L,64162L,64163L,64164L, +64165L,64166L,64167L,64168L,64169L,64170L,64171L,64172L,64173L,64174L, +64175L,64176L,64177L,64178L,64179L,64180L,64181L,64182L,64183L,64184L, +64185L,64186L,64187L,64188L,64189L,64190L,64191L,64192L,64193L,64194L, +64195L,64196L,64197L,64198L,64199L,64200L,64201L,64202L,64203L,64204L, +64205L,64206L,64207L,64208L,64209L,64210L,64211L,64212L,64213L,64214L, +64215L,64216L,64217L,64218L,64219L,64220L,64221L,64222L,64223L,64224L, +64225L,64226L,64227L,64228L,64229L,64230L,64231L,64232L,64233L,64234L, +64235L,64236L,64237L,64238L,64239L,64240L,64241L,64242L,64243L,64244L, +64245L,64246L,64247L,64248L,64249L,64250L,64251L,64252L,64253L,64254L, +64255L,64256L,64257L,64258L,64259L,64260L,64261L,64262L,64263L,64264L, +64265L,64266L,64267L,64268L,64269L,64270L,64271L,64272L,64273L,64274L, +64275L,64276L,64277L,64278L,64279L,64280L,64281L,64282L,64283L,64284L, +64285L,64286L,64287L,64288L,64289L,64290L,64291L,64292L,64293L,64294L, +64295L,64296L,64297L,64298L,64299L,64300L,64301L,64302L,64303L,64304L, +64305L,64306L,64307L,64308L,64309L,64310L,64311L,64312L,64313L,64314L, +64315L,64316L,64317L,64318L,64319L,64320L,64321L,64322L,64323L,64324L, +64325L,64326L,64327L,64328L,64329L,64330L,64331L,64332L,64333L,64334L, +64335L,64336L,64337L,64338L,64339L,64340L,64341L,64342L,64343L,64344L, +64345L,64346L,64347L,64348L,64349L,64350L,64351L,64352L,64353L,64354L, +64355L,64356L,64357L,64358L,64359L,64360L,64361L,64362L,64363L,64364L, +64365L,64366L,64367L,64368L,64369L,64370L,64371L,64372L,64373L,64374L, +64375L,64376L,64377L,64378L,64379L,64380L,64381L,64382L,64383L,64384L, +64385L,64386L,64387L,64388L,64389L,64390L,64391L,64392L,64393L,64394L, +64395L,64396L,64397L,64398L,64399L,64400L,64401L,64402L,64403L,64404L, +64405L,64406L,64407L,64408L,64409L,64410L,64411L,64412L,64413L,64414L, +64415L,64416L,64417L,64418L,64419L,64420L,64421L,64422L,64423L,64424L, +64425L,64426L,64427L,64428L,64429L,64430L,64431L,64432L,64433L,64434L, +64435L,64436L,64437L,64438L,64439L,64440L,64441L,64442L,64443L,64444L, +64445L,64446L,64447L,64448L,64449L,64450L,64451L,64452L,64453L,64454L, +64455L,64456L,64457L,64458L,64459L,64460L,64461L,64462L,64463L,64464L, +64465L,64466L,64467L,64468L,64469L,64470L,64471L,64472L,64473L,64474L, +64475L,64476L,64477L,64478L,64479L,64480L,64481L,64482L,64483L,64484L, +64485L,64486L,64487L,64488L,64489L,64490L,64491L,64492L,64493L,64494L, +64495L,64496L,64497L,64498L,64499L,64500L,64501L,64502L,64503L,64504L, +64505L,64506L,64507L,64508L,64509L,64510L,64511L,64512L,64513L,64514L, +64515L,64516L,64517L,64518L,64519L,64520L,64521L,64522L,64523L,64524L, +64525L,64526L,64527L,64528L,64529L,64530L,64531L,64532L,64533L,64534L, +64535L,64536L,64537L,64538L,64539L,64540L,64541L,64542L,64543L,64544L, +64545L,64546L,64547L,64548L,64549L,64550L,64551L,64552L,64553L,64554L, +64555L,64556L,64557L,64558L,64559L,64560L,64561L,64562L,64563L,64564L, +64565L,64566L,64567L,64568L,64569L,64570L,64571L,64572L,64573L,64574L, +64575L,64576L,64577L,64578L,64579L,64580L,64581L,64582L,64583L,64584L, +64585L,64586L,64587L,64588L,64589L,64590L,64591L,64592L,64593L,64594L, +64595L,64596L,64597L,64598L,64599L,64600L,64601L,64602L,64603L,64604L, +64605L,64606L,64607L,64608L,64609L,64610L,64611L,64612L,64613L,64614L, +64615L,64616L,64617L,64618L,64619L,64620L,64621L,64622L,64623L,64624L, +64625L,64626L,64627L,64628L,64629L,64630L,64631L,64632L,64633L,64634L, +64635L,64636L,64637L,64638L,64639L,64640L,64641L,64642L,64643L,64644L, +64645L,64646L,64647L,64648L,64649L,64650L,64651L,64652L,64653L,64654L, +64655L,64656L,64657L,64658L,64659L,64660L,64661L,64662L,64663L,64664L, +64665L,64666L,64667L,64668L,64669L,64670L,64671L,64672L,64673L,64674L, +64675L,64676L,64677L,64678L,64679L,64680L,64681L,64682L,64683L,64684L, +64685L,64686L,64687L,64688L,64689L,64690L,64691L,64692L,64693L,64694L, +64695L,64696L,64697L,64698L,64699L,64700L,64701L,64702L,64703L,64704L, +64705L,64706L,64707L,64708L,64709L,64710L,64711L,64712L,64713L,64714L, +64715L,64716L,64717L,64718L,64719L,64720L,64721L,64722L,64723L,64724L, +64725L,64726L,64727L,64728L,64729L,64730L,64731L,64732L,64733L,64734L, +64735L,64736L,64737L,64738L,64739L,64740L,64741L,64742L,64743L,64744L, +64745L,64746L,64747L,64748L,64749L,64750L,64751L,64752L,64753L,64754L, +64755L,64756L,64757L,64758L,64759L,64760L,64761L,64762L,64763L,64764L, +64765L,64766L,64767L,64768L,64769L,64770L,64771L,64772L,64773L,64774L, +64775L,64776L,64777L,64778L,64779L,64780L,64781L,64782L,64783L,64784L, +64785L,64786L,64787L,64788L,64789L,64790L,64791L,64792L,64793L,64794L, +64795L,64796L,64797L,64798L,64799L,64800L,64801L,64802L,64803L,64804L, +64805L,64806L,64807L,64808L,64809L,64810L,64811L,64812L,64813L,64814L, +64815L,64816L,64817L,64818L,64819L,64820L,64821L,64822L,64823L,64824L, +64825L,64826L,64827L,64828L,64829L,64830L,64831L,64832L,64833L,64834L, +64835L,64836L,64837L,64838L,64839L,64840L,64841L,64842L,64843L,64844L, +64845L,64846L,64847L,64848L,64849L,64850L,64851L,64852L,64853L,64854L, +64855L,64856L,64857L,64858L,64859L,64860L,64861L,64862L,64863L,64864L, +64865L,64866L,64867L,64868L,64869L,64870L,64871L,64872L,64873L,64874L, +64875L,64876L,64877L,64878L,64879L,64880L,64881L,64882L,64883L,64884L, +64885L,64886L,64887L,64888L,64889L,64890L,64891L,64892L,64893L,64894L, +64895L,64896L,64897L,64898L,64899L,64900L,64901L,64902L,64903L,64904L, +64905L,64906L,64907L,64908L,64909L,64910L,64911L,64912L,64913L,64914L, +64915L,64916L,64917L,64918L,64919L,64920L,64921L,64922L,64923L,64924L, +64925L,64926L,64927L,64928L,64929L,64930L,64931L,64932L,64933L,64934L, +64935L,64936L,64937L,64938L,64939L,64940L,64941L,64942L,64943L,64944L, +64945L,64946L,64947L,64948L,64949L,64950L,64951L,64952L,64953L,64954L, +64955L,64956L,64957L,64958L,64959L,64960L,64961L,64962L,64963L,64964L, +64965L,64966L,64967L,64968L,64969L,64970L,64971L,64972L,64973L,64974L, +64975L,64976L,64977L,64978L,64979L,64980L,64981L,64982L,64983L,64984L, +64985L,64986L,64987L,64988L,64989L,64990L,64991L,64992L,64993L,64994L, +64995L,64996L,64997L,64998L,64999L,65000L,65001L,65002L,65003L,65004L, +65005L,65006L,65007L,65008L,65009L,65010L,65011L,65012L,65013L,65014L, +65015L,65016L,65017L,65018L,65019L,65020L,65021L,65022L,65023L,65024L, +65025L,65026L,65027L,65028L,65029L,65030L,65031L,65032L,65033L,65034L, +65035L,65036L,65037L,65038L,65039L,65040L,65041L,65042L,65043L,65044L, +65045L,65046L,65047L,65048L,65049L,65050L,65051L,65052L,65053L,65054L, +65055L,65056L,65057L,65058L,65059L,65060L,65061L,65062L,65063L,65064L, +65065L,65066L,65067L,65068L,65069L,65070L,65071L,65072L,65073L,65074L, +65075L,65076L,65077L,65078L,65079L,65080L,65081L,65082L,65083L,65084L, +65085L,65086L,65087L,65088L,65089L,65090L,65091L,65092L,65093L,65094L, +65095L,65096L,65097L,65098L,65099L,65100L,65101L,65102L,65103L,65104L, +65105L,65106L,65107L,65108L,65109L,65110L,65111L,65112L,65113L,65114L, +65115L,65116L,65117L,65118L,65119L,65120L,65121L,65122L,65123L,65124L, +65125L,65126L,65127L,65128L,65129L,65130L,65131L,65132L,65133L,65134L, +65135L,65136L,65137L,65138L,65139L,65140L,65141L,65142L,65143L,65144L, +65145L,65146L,65147L,65148L,65149L,65150L,65151L,65152L,65153L,65154L, +65155L,65156L,65157L,65158L,65159L,65160L,65161L,65162L,65163L,65164L, +65165L,65166L,65167L,65168L,65169L,65170L,65171L,65172L,65173L,65174L, +65175L,65176L,65177L,65178L,65179L,65180L,65181L,65182L,65183L,65184L, +65185L,65186L,65187L,65188L,65189L,65190L,65191L,65192L,65193L,65194L, +65195L,65196L,65197L,65198L,65199L,65200L,65201L,65202L,65203L,65204L, +65205L,65206L,65207L,65208L,65209L,65210L,65211L,65212L,65213L,65214L, +65215L,65216L,65217L,65218L,65219L,65220L,65221L,65222L,65223L,65224L, +65225L,65226L,65227L,65228L,65229L,65230L,65231L,65232L,65233L,65234L, +65235L,65236L,65237L,65238L,65239L,65240L,65241L,65242L,65243L,65244L, +65245L,65246L,65247L,65248L,65249L,65250L,65251L,65252L,65253L,65254L, +65255L,65256L,65257L,65258L,65259L,65260L,65261L,65262L,65263L,65264L, +65265L,65266L,65267L,65268L,65269L,65270L,65271L,65272L,65273L,65274L, +65275L,65276L,65277L,65278L,65279L,65280L,65281L,65282L,65283L,65284L, +65285L,65286L,65287L,65288L,65289L,65290L,65291L,65292L,65293L,65294L, +65295L,65296L,65297L,65298L,65299L,65300L,65301L,65302L,65303L,65304L, +65305L,65306L,65307L,65308L,65309L,65310L,65311L,65312L,65313L,65314L, +65315L,65316L,65317L,65318L,65319L,65320L,65321L,65322L,65323L,65324L, +65325L,65326L,65327L,65328L,65329L,65330L,65331L,65332L,65333L,65334L, +65335L,65336L,65337L,65338L,65339L,65340L,65341L,65342L,65343L,65344L, +65313L,65314L,65315L,65316L,65317L,65318L,65319L,65320L,65321L,65322L, +65323L,65324L,65325L,65326L,65327L,65328L,65329L,65330L,65331L,65332L, +65333L,65334L,65335L,65336L,65337L,65338L,65371L,65372L,65373L,65374L, +65375L,65376L,65377L,65378L,65379L,65380L,65381L,65382L,65383L,65384L, +65385L,65386L,65387L,65388L,65389L,65390L,65391L,65392L,65393L,65394L, +65395L,65396L,65397L,65398L,65399L,65400L,65401L,65402L,65403L,65404L, +65405L,65406L,65407L,65408L,65409L,65410L,65411L,65412L,65413L,65414L, +65415L,65416L,65417L,65418L,65419L,65420L,65421L,65422L,65423L,65424L, +65425L,65426L,65427L,65428L,65429L,65430L,65431L,65432L,65433L,65434L, +65435L,65436L,65437L,65438L,65439L,65440L,65441L,65442L,65443L,65444L, +65445L,65446L,65447L,65448L,65449L,65450L,65451L,65452L,65453L,65454L, +65455L,65456L,65457L,65458L,65459L,65460L,65461L,65462L,65463L,65464L, +65465L,65466L,65467L,65468L,65469L,65470L,65471L,65472L,65473L,65474L, +65475L,65476L,65477L,65478L,65479L,65480L,65481L,65482L,65483L,65484L, +65485L,65486L,65487L,65488L,65489L,65490L,65491L,65492L,65493L,65494L, +65495L,65496L,65497L,65498L,65499L,65500L,65501L,65502L,65503L,65504L, +65505L,65506L,65507L,65508L,65509L,65510L,65511L,65512L,65513L,65514L, +65515L,65516L,65517L,65518L,65519L,65520L,65521L,65522L,65523L,65524L, +65525L,65526L,65527L,65528L,65529L,65530L,65531L,65532L,65533L,65534L, +65535L, +}; +#endif + +#if defined(DUK_USE_REGEXP_CANON_BITMAP) +/* + * Automatically generated by extract_caseconv.py, do not edit! + */ + +const duk_uint8_t duk_unicode_re_canon_bitmap[256] = { +23,0,224,19,1,228,255,255,255,255,255,255,255,255,255,255,63,254,255,127, +255,255,255,255,255,255,255,255,231,231,0,16,255,227,255,255,63,255,255, +255,255,255,255,255,1,252,255,255,255,255,255,255,255,255,255,255,255,255, +255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, +255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, +255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, +255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, +255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, +255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, +227,129,255,255,255,147,255,255,255,255,255,255,255,255,255,255,255,255, +255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, +255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, +255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, +255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,251, +}; +#endif +#line 1 "duk_util_bitdecoder.c" +/* + * Bitstream decoder. + */ + +/* #include duk_internal.h -> already included */ + +/* Decode 'bits' bits from the input stream (bits must be 1...24). + * When reading past bitstream end, zeroes are shifted in. The result + * is signed to match duk_bd_decode_flagged. + */ +DUK_INTERNAL duk_uint32_t duk_bd_decode(duk_bitdecoder_ctx *ctx, duk_small_int_t bits) { + duk_small_int_t shift; + duk_uint32_t mask; + duk_uint32_t tmp; + + /* Note: cannot read more than 24 bits without possibly shifting top bits out. + * Fixable, but adds complexity. + */ + DUK_ASSERT(bits >= 1 && bits <= 24); + + while (ctx->currbits < bits) { +#if 0 + DUK_DDD(DUK_DDDPRINT("decode_bits: shift more data (bits=%ld, currbits=%ld)", + (long) bits, (long) ctx->currbits)); +#endif + ctx->currval <<= 8; + if (ctx->offset < ctx->length) { + /* If ctx->offset >= ctx->length, we "shift zeroes in" + * instead of croaking. + */ + ctx->currval |= ctx->data[ctx->offset++]; + } + ctx->currbits += 8; + } +#if 0 + DUK_DDD(DUK_DDDPRINT("decode_bits: bits=%ld, currbits=%ld, currval=0x%08lx", + (long) bits, (long) ctx->currbits, (unsigned long) ctx->currval)); +#endif + + /* Extract 'top' bits of currval; note that the extracted bits do not need + * to be cleared, we just ignore them on next round. + */ + shift = ctx->currbits - bits; + mask = (((duk_uint32_t) 1U) << bits) - 1U; + tmp = (ctx->currval >> shift) & mask; + ctx->currbits = shift; /* remaining */ + +#if 0 + DUK_DDD(DUK_DDDPRINT("decode_bits: %ld bits -> 0x%08lx (%ld), currbits=%ld, currval=0x%08lx", + (long) bits, (unsigned long) tmp, (long) tmp, (long) ctx->currbits, (unsigned long) ctx->currval)); +#endif + + return tmp; +} + +DUK_INTERNAL duk_small_uint_t duk_bd_decode_flag(duk_bitdecoder_ctx *ctx) { + return (duk_small_uint_t) duk_bd_decode(ctx, 1); +} + +/* Decode a one-bit flag, and if set, decode a value of 'bits', otherwise return + * default value. + */ +DUK_INTERNAL duk_uint32_t duk_bd_decode_flagged(duk_bitdecoder_ctx *ctx, duk_small_int_t bits, duk_uint32_t def_value) { + if (duk_bd_decode_flag(ctx)) { + return duk_bd_decode(ctx, bits); + } else { + return def_value; + } +} + +/* Signed variant, allows negative marker value. */ +DUK_INTERNAL duk_int32_t duk_bd_decode_flagged_signed(duk_bitdecoder_ctx *ctx, duk_small_int_t bits, duk_int32_t def_value) { + return (duk_int32_t) duk_bd_decode_flagged(ctx, bits, (duk_uint32_t) def_value); +} + +/* Shared varint encoding. Match dukutil.py BitEncode.varuint(). */ +DUK_INTERNAL duk_uint32_t duk_bd_decode_varuint(duk_bitdecoder_ctx *ctx) { + duk_small_uint_t t; + + /* The bit encoding choices here are based on manual testing against + * the actual varuints generated by genbuiltins.py. + */ + switch (duk_bd_decode(ctx, 2)) { + case 0: + return 0; /* [0,0] */ + case 1: + return duk_bd_decode(ctx, 2) + 1; /* [1,4] */ + case 2: + return duk_bd_decode(ctx, 5) + 5; /* [5,36] */ + default: + t = duk_bd_decode(ctx, 7); + if (t == 0) { + return duk_bd_decode(ctx, 20); + } + return (t - 1) + 37; /* [37,163] */ + } +} + +/* Decode a bit packed string from a custom format used by genbuiltins.py. + * This function is here because it's used for both heap and thread inits. + * Caller must supply the output buffer whose size is NOT checked! + */ + +#define DUK__BITPACK_LETTER_LIMIT 26 +#define DUK__BITPACK_LOOKUP1 26 +#define DUK__BITPACK_LOOKUP2 27 +#define DUK__BITPACK_SWITCH1 28 +#define DUK__BITPACK_SWITCH 29 +#define DUK__BITPACK_UNUSED1 30 +#define DUK__BITPACK_EIGHTBIT 31 + +DUK_LOCAL const duk_uint8_t duk__bitpacked_lookup[16] = { DUK_ASC_0, DUK_ASC_1, DUK_ASC_2, DUK_ASC_3, + DUK_ASC_4, DUK_ASC_5, DUK_ASC_6, DUK_ASC_7, + DUK_ASC_8, DUK_ASC_9, DUK_ASC_UNDERSCORE, DUK_ASC_SPACE, + 0x82, 0x80, DUK_ASC_DOUBLEQUOTE, DUK_ASC_LCURLY }; + +DUK_INTERNAL duk_small_uint_t duk_bd_decode_bitpacked_string(duk_bitdecoder_ctx *bd, duk_uint8_t *out) { + duk_small_uint_t len; + duk_small_uint_t mode; + duk_small_uint_t t; + duk_small_uint_t i; + + len = duk_bd_decode(bd, 5); + if (len == 31) { + len = duk_bd_decode(bd, 8); /* Support up to 256 bytes; rare. */ + } + + mode = 32; /* 0 = uppercase, 32 = lowercase (= 'a' - 'A') */ + for (i = 0; i < len; i++) { + t = duk_bd_decode(bd, 5); + if (t < DUK__BITPACK_LETTER_LIMIT) { + t = t + DUK_ASC_UC_A + mode; + } else if (t == DUK__BITPACK_LOOKUP1) { + t = duk__bitpacked_lookup[duk_bd_decode(bd, 3)]; + } else if (t == DUK__BITPACK_LOOKUP2) { + t = duk__bitpacked_lookup[8 + duk_bd_decode(bd, 3)]; + } else if (t == DUK__BITPACK_SWITCH1) { + t = duk_bd_decode(bd, 5); + DUK_ASSERT_DISABLE(t >= 0); /* unsigned */ + DUK_ASSERT(t <= 25); + t = t + DUK_ASC_UC_A + (mode ^ 32); + } else if (t == DUK__BITPACK_SWITCH) { + mode = mode ^ 32; + t = duk_bd_decode(bd, 5); + DUK_ASSERT_DISABLE(t >= 0); + DUK_ASSERT(t <= 25); + t = t + DUK_ASC_UC_A + mode; + } else if (t == DUK__BITPACK_EIGHTBIT) { + t = duk_bd_decode(bd, 8); + } + out[i] = (duk_uint8_t) t; + } + + return len; +} + +/* automatic undefs */ +#undef DUK__BITPACK_EIGHTBIT +#undef DUK__BITPACK_LETTER_LIMIT +#undef DUK__BITPACK_LOOKUP1 +#undef DUK__BITPACK_LOOKUP2 +#undef DUK__BITPACK_SWITCH +#undef DUK__BITPACK_SWITCH1 +#undef DUK__BITPACK_UNUSED1 +#line 1 "duk_util_bitencoder.c" +/* + * Bitstream encoder. + */ + +/* #include duk_internal.h -> already included */ + +DUK_INTERNAL void duk_be_encode(duk_bitencoder_ctx *ctx, duk_uint32_t data, duk_small_int_t bits) { + duk_uint8_t tmp; + + DUK_ASSERT(ctx != NULL); + DUK_ASSERT(ctx->currbits < 8); + + /* This limitation would be fixable but adds unnecessary complexity. */ + DUK_ASSERT(bits >= 1 && bits <= 24); + + ctx->currval = (ctx->currval << bits) | data; + ctx->currbits += bits; + + while (ctx->currbits >= 8) { + if (ctx->offset < ctx->length) { + tmp = (duk_uint8_t) ((ctx->currval >> (ctx->currbits - 8)) & 0xff); + ctx->data[ctx->offset++] = tmp; + } else { + /* If buffer has been exhausted, truncate bitstream */ + ctx->truncated = 1; + } + + ctx->currbits -= 8; + } +} + +DUK_INTERNAL void duk_be_finish(duk_bitencoder_ctx *ctx) { + duk_small_int_t npad; + + DUK_ASSERT(ctx != NULL); + DUK_ASSERT(ctx->currbits < 8); + + npad = (duk_small_int_t) (8 - ctx->currbits); + if (npad > 0) { + duk_be_encode(ctx, 0, npad); + } + DUK_ASSERT(ctx->currbits == 0); +} +#line 1 "duk_util_bufwriter.c" +/* + * Fast buffer writer with slack management. + */ + +/* #include duk_internal.h -> already included */ + +/* XXX: Avoid duk_{memcmp,memmove}_unsafe() by imposing a minimum length of + * >0 for the underlying dynamic buffer. + */ + +/* + * Macro support functions (use only macros in calling code) + */ + +DUK_LOCAL void duk__bw_update_ptrs(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx, duk_size_t curr_offset, duk_size_t new_length) { + duk_uint8_t *p; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw_ctx != NULL); + DUK_UNREF(thr); + + /* 'p' might be NULL when the underlying buffer is zero size. If so, + * the resulting pointers are not used unsafely. + */ + p = (duk_uint8_t *) DUK_HBUFFER_DYNAMIC_GET_DATA_PTR(thr->heap, bw_ctx->buf); + DUK_ASSERT(p != NULL || (DUK_HBUFFER_DYNAMIC_GET_SIZE(bw_ctx->buf) == 0 && curr_offset == 0 && new_length == 0)); + bw_ctx->p = p + curr_offset; + bw_ctx->p_base = p; + bw_ctx->p_limit = p + new_length; +} + +DUK_INTERNAL void duk_bw_init(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx, duk_hbuffer_dynamic *h_buf) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw_ctx != NULL); + DUK_ASSERT(h_buf != NULL); + + bw_ctx->buf = h_buf; + duk__bw_update_ptrs(thr, bw_ctx, 0, DUK_HBUFFER_DYNAMIC_GET_SIZE(h_buf)); +} + +DUK_INTERNAL void duk_bw_init_pushbuf(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx, duk_size_t buf_size) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw_ctx != NULL); + + (void) duk_push_dynamic_buffer(thr, buf_size); + bw_ctx->buf = (duk_hbuffer_dynamic *) duk_known_hbuffer(thr, -1); + DUK_ASSERT(bw_ctx->buf != NULL); + duk__bw_update_ptrs(thr, bw_ctx, 0, buf_size); +} + +/* Resize target buffer for requested size. Called by the macro only when the + * fast path test (= there is space) fails. + */ +DUK_INTERNAL duk_uint8_t *duk_bw_resize(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx, duk_size_t sz) { + duk_size_t curr_off; + duk_size_t add_sz; + duk_size_t new_sz; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw_ctx != NULL); + + /* We could do this operation without caller updating bw_ctx->ptr, + * but by writing it back here we can share code better. + */ + + curr_off = (duk_size_t) (bw_ctx->p - bw_ctx->p_base); + add_sz = (curr_off >> DUK_BW_SLACK_SHIFT) + DUK_BW_SLACK_ADD; + new_sz = curr_off + sz + add_sz; + if (DUK_UNLIKELY(new_sz < curr_off)) { + /* overflow */ + DUK_ERROR_RANGE(thr, DUK_STR_BUFFER_TOO_LONG); + DUK_WO_NORETURN(return NULL;); + } +#if 0 /* for manual torture testing: tight allocation, useful with valgrind */ + new_sz = curr_off + sz; +#endif + + /* This is important to ensure dynamic buffer data pointer is not + * NULL (which is possible if buffer size is zero), which in turn + * causes portability issues with e.g. memmove() and memcpy(). + */ + DUK_ASSERT(new_sz >= 1); + + DUK_DD(DUK_DDPRINT("resize bufferwriter from %ld to %ld (add_sz=%ld)", (long) curr_off, (long) new_sz, (long) add_sz)); + + duk_hbuffer_resize(thr, bw_ctx->buf, new_sz); + duk__bw_update_ptrs(thr, bw_ctx, curr_off, new_sz); + return bw_ctx->p; +} + +/* Make buffer compact, matching current written size. */ +DUK_INTERNAL void duk_bw_compact(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx) { + duk_size_t len; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw_ctx != NULL); + DUK_UNREF(thr); + + len = (duk_size_t) (bw_ctx->p - bw_ctx->p_base); + duk_hbuffer_resize(thr, bw_ctx->buf, len); + duk__bw_update_ptrs(thr, bw_ctx, len, len); +} + +DUK_INTERNAL void duk_bw_write_raw_slice(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_size_t src_off, duk_size_t len) { + duk_uint8_t *p_base; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw != NULL); + DUK_ASSERT(src_off <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(len <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(src_off + len <= DUK_BW_GET_SIZE(thr, bw)); + DUK_UNREF(thr); + + p_base = bw->p_base; + duk_memcpy_unsafe((void *) bw->p, (const void *) (p_base + src_off), (size_t) len); + bw->p += len; +} + +DUK_INTERNAL void duk_bw_write_ensure_slice(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_size_t src_off, duk_size_t len) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw != NULL); + DUK_ASSERT(src_off <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(len <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(src_off + len <= DUK_BW_GET_SIZE(thr, bw)); + + DUK_BW_ENSURE(thr, bw, len); + duk_bw_write_raw_slice(thr, bw, src_off, len); +} + +DUK_INTERNAL void duk_bw_insert_raw_bytes(duk_hthread *thr, + duk_bufwriter_ctx *bw, + duk_size_t dst_off, + const duk_uint8_t *buf, + duk_size_t len) { + duk_uint8_t *p_base; + duk_size_t buf_sz, move_sz; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw != NULL); + DUK_ASSERT(dst_off <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(buf != NULL); + DUK_UNREF(thr); + + p_base = bw->p_base; + buf_sz = (duk_size_t) (bw->p - p_base); /* constrained by maximum buffer size */ + move_sz = buf_sz - dst_off; + + DUK_ASSERT(p_base != NULL); /* buffer size is >= 1 */ + duk_memmove_unsafe((void *) (p_base + dst_off + len), (const void *) (p_base + dst_off), (size_t) move_sz); + duk_memcpy_unsafe((void *) (p_base + dst_off), (const void *) buf, (size_t) len); + bw->p += len; +} + +DUK_INTERNAL void duk_bw_insert_ensure_bytes(duk_hthread *thr, + duk_bufwriter_ctx *bw, + duk_size_t dst_off, + const duk_uint8_t *buf, + duk_size_t len) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw != NULL); + DUK_ASSERT(dst_off <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(buf != NULL); + + DUK_BW_ENSURE(thr, bw, len); + duk_bw_insert_raw_bytes(thr, bw, dst_off, buf, len); +} + +DUK_INTERNAL void duk_bw_insert_raw_slice(duk_hthread *thr, + duk_bufwriter_ctx *bw, + duk_size_t dst_off, + duk_size_t src_off, + duk_size_t len) { + duk_uint8_t *p_base; + duk_size_t buf_sz, move_sz; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw != NULL); + DUK_ASSERT(dst_off <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(src_off <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(len <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(src_off + len <= DUK_BW_GET_SIZE(thr, bw)); + DUK_UNREF(thr); + + p_base = bw->p_base; + + /* Don't support "straddled" source now. */ + DUK_ASSERT(dst_off <= src_off || dst_off >= src_off + len); + + if (dst_off <= src_off) { + /* Target is before source. Source offset is expressed as + * a "before change" offset. Account for the memmove. + */ + src_off += len; + } + + buf_sz = (duk_size_t) (bw->p - p_base); + move_sz = buf_sz - dst_off; + + DUK_ASSERT(p_base != NULL); /* buffer size is >= 1 */ + duk_memmove_unsafe((void *) (p_base + dst_off + len), (const void *) (p_base + dst_off), (size_t) move_sz); + duk_memcpy_unsafe((void *) (p_base + dst_off), (const void *) (p_base + src_off), (size_t) len); + bw->p += len; +} + +DUK_INTERNAL void duk_bw_insert_ensure_slice(duk_hthread *thr, + duk_bufwriter_ctx *bw, + duk_size_t dst_off, + duk_size_t src_off, + duk_size_t len) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw != NULL); + DUK_ASSERT(dst_off <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(src_off <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(len <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(src_off + len <= DUK_BW_GET_SIZE(thr, bw)); + + /* Don't support "straddled" source now. */ + DUK_ASSERT(dst_off <= src_off || dst_off >= src_off + len); + + DUK_BW_ENSURE(thr, bw, len); + duk_bw_insert_raw_slice(thr, bw, dst_off, src_off, len); +} + +DUK_INTERNAL duk_uint8_t *duk_bw_insert_raw_area(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_size_t off, duk_size_t len) { + duk_uint8_t *p_base, *p_dst, *p_src; + duk_size_t buf_sz, move_sz; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw != NULL); + DUK_ASSERT(off <= DUK_BW_GET_SIZE(thr, bw)); + DUK_UNREF(thr); + + p_base = bw->p_base; + buf_sz = (duk_size_t) (bw->p - p_base); + move_sz = buf_sz - off; + p_dst = p_base + off + len; + p_src = p_base + off; + duk_memmove_unsafe((void *) p_dst, (const void *) p_src, (size_t) move_sz); + return p_src; /* point to start of 'reserved area' */ +} + +DUK_INTERNAL duk_uint8_t *duk_bw_insert_ensure_area(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_size_t off, duk_size_t len) { + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw != NULL); + DUK_ASSERT(off <= DUK_BW_GET_SIZE(thr, bw)); + + DUK_BW_ENSURE(thr, bw, len); + return duk_bw_insert_raw_area(thr, bw, off, len); +} + +DUK_INTERNAL void duk_bw_remove_raw_slice(duk_hthread *thr, duk_bufwriter_ctx *bw, duk_size_t off, duk_size_t len) { + duk_size_t move_sz; + + duk_uint8_t *p_base; + duk_uint8_t *p_src; + duk_uint8_t *p_dst; + + DUK_ASSERT(thr != NULL); + DUK_ASSERT(bw != NULL); + DUK_ASSERT(off <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(len <= DUK_BW_GET_SIZE(thr, bw)); + DUK_ASSERT(off + len <= DUK_BW_GET_SIZE(thr, bw)); + DUK_UNREF(thr); + + p_base = bw->p_base; + p_dst = p_base + off; + p_src = p_dst + len; + move_sz = (duk_size_t) (bw->p - p_src); + duk_memmove_unsafe((void *) p_dst, (const void *) p_src, (size_t) move_sz); + bw->p -= len; +} + +/* + * Assertion helpers + */ + +#if defined(DUK_USE_ASSERTIONS) +DUK_INTERNAL void duk_bw_assert_valid(duk_hthread *thr, duk_bufwriter_ctx *bw_ctx) { + DUK_UNREF(thr); + DUK_ASSERT(bw_ctx != NULL); + DUK_ASSERT(bw_ctx->buf != NULL); + DUK_ASSERT((DUK_HBUFFER_DYNAMIC_GET_SIZE(bw_ctx->buf) == 0) || + (bw_ctx->p != NULL && bw_ctx->p_base != NULL && bw_ctx->p_limit != NULL && bw_ctx->p_limit >= bw_ctx->p_base && + bw_ctx->p >= bw_ctx->p_base && bw_ctx->p <= bw_ctx->p_limit)); +} +#endif +#line 1 "duk_util_cast.c" +/* + * Cast helpers. + * + * C99+ coercion is challenging portability-wise because out-of-range casts + * may invoke implementation defined or even undefined behavior. See e.g. + * http://blog.frama-c.com/index.php?post/2013/10/09/Overflow-float-integer. + * + * Provide explicit cast helpers which try to avoid implementation defined + * or undefined behavior. These helpers can then be simplified in the vast + * majority of cases where the implementation defined or undefined behavior + * is not problematic. + */ + +/* #include duk_internal.h -> already included */ + +/* Portable double-to-integer cast which avoids undefined behavior and avoids + * relying on fmin(), fmax(), or other intrinsics. Out-of-range results are + * not assumed by caller, but here value is clamped, NaN converts to minval. + */ +#define DUK__DOUBLE_INT_CAST1(tname, minval, maxval) \ + do { \ + if (DUK_LIKELY(x >= (duk_double_t) (minval))) { \ + DUK_ASSERT(!DUK_ISNAN(x)); \ + if (DUK_LIKELY(x <= (duk_double_t) (maxval))) { \ + return (tname) x; \ + } else { \ + return (tname) (maxval); \ + } \ + } else { \ + /* NaN or below minval. Since we don't care about the result \ + * for out-of-range values, just return the minimum value for \ + * both. \ + */ \ + return (tname) (minval); \ + } \ + } while (0) + +/* Rely on specific NaN behavior for duk_double_{fmin,fmax}(): if either + * argument is a NaN, return the second argument. This avoids a + * NaN-to-integer cast which is undefined behavior. + */ +#define DUK__DOUBLE_INT_CAST2(tname, minval, maxval) \ + do { \ + return (tname) duk_double_fmin(duk_double_fmax(x, (duk_double_t) (minval)), (duk_double_t) (maxval)); \ + } while (0) + +/* Another solution which doesn't need C99+ behavior for fmin() and fmax(). */ +#define DUK__DOUBLE_INT_CAST3(tname, minval, maxval) \ + do { \ + if (DUK_ISNAN(x)) { \ + /* 0 or any other value is fine. */ \ + return (tname) 0; \ + } else \ + return (tname) DUK_FMIN(DUK_FMAX(x, (duk_double_t) (minval)), (duk_double_t) (maxval)); \ + } \ + } \ + while (0) + +/* C99+ solution: relies on specific fmin() and fmax() behavior in C99: if + * one argument is NaN but the other isn't, the non-NaN argument is returned. + * Because the limits are non-NaN values, explicit NaN check is not needed. + * This may not work on all legacy platforms, and also doesn't seem to inline + * the fmin() and fmax() calls (unless one uses -ffast-math which we don't + * support). + */ +#define DUK__DOUBLE_INT_CAST4(tname, minval, maxval) \ + do { \ + return (tname) DUK_FMIN(DUK_FMAX(x, (duk_double_t) (minval)), (duk_double_t) (maxval)); \ + } while (0) + +DUK_INTERNAL duk_int_t duk_double_to_int_t(duk_double_t x) { +#if defined(DUK_USE_ALLOW_UNDEFINED_BEHAVIOR) + /* Real world solution: almost any practical platform will provide + * an integer value without any guarantees what it is (which is fine). + */ + return (duk_int_t) x; +#else + DUK__DOUBLE_INT_CAST1(duk_int_t, DUK_INT_MIN, DUK_INT_MAX); +#endif +} + +DUK_INTERNAL duk_uint_t duk_double_to_uint_t(duk_double_t x) { +#if defined(DUK_USE_ALLOW_UNDEFINED_BEHAVIOR) + return (duk_uint_t) x; +#else + DUK__DOUBLE_INT_CAST1(duk_uint_t, DUK_UINT_MIN, DUK_UINT_MAX); +#endif +} + +DUK_INTERNAL duk_int32_t duk_double_to_int32_t(duk_double_t x) { +#if defined(DUK_USE_ALLOW_UNDEFINED_BEHAVIOR) + return (duk_int32_t) x; +#else + DUK__DOUBLE_INT_CAST1(duk_int32_t, DUK_INT32_MIN, DUK_INT32_MAX); +#endif +} + +DUK_INTERNAL duk_uint32_t duk_double_to_uint32_t(duk_double_t x) { +#if defined(DUK_USE_ALLOW_UNDEFINED_BEHAVIOR) + return (duk_uint32_t) x; +#else + DUK__DOUBLE_INT_CAST1(duk_uint32_t, DUK_UINT32_MIN, DUK_UINT32_MAX); +#endif +} + +/* Largest IEEE double that doesn't round to infinity in the default rounding + * mode. The exact midpoint between (1 - 2^(-24)) * 2^128 and 2^128 rounds to + * infinity, at least on x64. This number is one double unit below that + * midpoint. See misc/float_cast.c. + */ +#define DUK__FLOAT_ROUND_LIMIT 340282356779733623858607532500980858880.0 + +/* Maximum IEEE float. Double-to-float conversion above this would be out of + * range and thus technically undefined behavior. + */ +#define DUK__FLOAT_MAX 340282346638528859811704183484516925440.0 + +DUK_INTERNAL duk_float_t duk_double_to_float_t(duk_double_t x) { + /* Even a double-to-float cast is technically undefined behavior if + * the double is out-of-range. C99 Section 6.3.1.5: + * + * If the value being converted is in the range of values that can + * be represented but cannot be represented exactly, the result is + * either the nearest higher or nearest lower representable value, + * chosen in an implementation-defined manner. If the value being + * converted is outside the range of values that can be represented, + * the behavior is undefined. + */ +#if defined(DUK_USE_ALLOW_UNDEFINED_BEHAVIOR) + return (duk_float_t) x; +#else + duk_double_t t; + + t = DUK_FABS(x); + DUK_ASSERT((DUK_ISNAN(x) && DUK_ISNAN(t)) || (!DUK_ISNAN(x) && !DUK_ISNAN(t))); + + if (DUK_LIKELY(t <= DUK__FLOAT_MAX)) { + /* Standard in-range case, try to get here with a minimum + * number of checks and branches. + */ + DUK_ASSERT(!DUK_ISNAN(x)); + return (duk_float_t) x; + } else if (t <= DUK__FLOAT_ROUND_LIMIT) { + /* Out-of-range, but rounds to min/max float. */ + DUK_ASSERT(!DUK_ISNAN(x)); + if (x < 0.0) { + return (duk_float_t) -DUK__FLOAT_MAX; + } else { + return (duk_float_t) DUK__FLOAT_MAX; + } + } else if (DUK_ISNAN(x)) { + /* Assumes double NaN -> float NaN considered "in range". */ + DUK_ASSERT(DUK_ISNAN(x)); + return (duk_float_t) x; + } else { + /* Out-of-range, rounds to +/- Infinity. */ + if (x < 0.0) { + return (duk_float_t) -DUK_DOUBLE_INFINITY; + } else { + return (duk_float_t) DUK_DOUBLE_INFINITY; + } + } +#endif +} + +/* automatic undefs */ +#undef DUK__DOUBLE_INT_CAST1 +#undef DUK__DOUBLE_INT_CAST2 +#undef DUK__DOUBLE_INT_CAST3 +#undef DUK__DOUBLE_INT_CAST4 +#undef DUK__FLOAT_MAX +#undef DUK__FLOAT_ROUND_LIMIT +#line 1 "duk_util_double.c" +/* + * IEEE double helpers. + */ + +/* #include duk_internal.h -> already included */ + +DUK_INTERNAL duk_bool_t duk_double_is_anyinf(duk_double_t x) { + duk_double_union du; + du.d = x; + return DUK_DBLUNION_IS_ANYINF(&du); +} + +DUK_INTERNAL duk_bool_t duk_double_is_posinf(duk_double_t x) { + duk_double_union du; + du.d = x; + return DUK_DBLUNION_IS_POSINF(&du); +} + +DUK_INTERNAL duk_bool_t duk_double_is_neginf(duk_double_t x) { + duk_double_union du; + du.d = x; + return DUK_DBLUNION_IS_NEGINF(&du); +} + +DUK_INTERNAL duk_bool_t duk_double_is_nan(duk_double_t x) { + duk_double_union du; + du.d = x; + /* Assumes we're dealing with a Duktape internal NaN which is + * NaN normalized if duk_tval requires it. + */ + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&du)); + return DUK_DBLUNION_IS_NAN(&du); +} + +DUK_INTERNAL duk_bool_t duk_double_is_nan_or_zero(duk_double_t x) { + duk_double_union du; + du.d = x; + /* Assumes we're dealing with a Duktape internal NaN which is + * NaN normalized if duk_tval requires it. + */ + DUK_ASSERT(DUK_DBLUNION_IS_NORMALIZED(&du)); + return DUK_DBLUNION_IS_NAN(&du) || DUK_DBLUNION_IS_ANYZERO(&du); +} + +DUK_INTERNAL duk_bool_t duk_double_is_nan_or_inf(duk_double_t x) { + duk_double_union du; + du.d = x; + /* If exponent is 0x7FF the argument is either a NaN or an + * infinity. We don't need to check any other fields. + */ +#if defined(DUK_USE_64BIT_OPS) +#if defined(DUK_USE_DOUBLE_ME) + return (du.ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x000000007ff00000)) == DUK_U64_CONSTANT(0x000000007ff00000); +#else + return (du.ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x7ff0000000000000)) == DUK_U64_CONSTANT(0x7ff0000000000000); +#endif +#else + return (du.ui[DUK_DBL_IDX_UI0] & 0x7ff00000UL) == 0x7ff00000UL; +#endif +} + +DUK_INTERNAL duk_bool_t duk_double_is_nan_zero_inf(duk_double_t x) { + duk_double_union du; +#if defined(DUK_USE_64BIT_OPS) + duk_uint64_t t; +#else + duk_uint32_t t; +#endif + du.d = x; +#if defined(DUK_USE_64BIT_OPS) +#if defined(DUK_USE_DOUBLE_ME) + t = du.ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x000000007ff00000); + if (t == DUK_U64_CONSTANT(0x0000000000000000)) { + t = du.ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x0000000080000000); + return t == 0; + } + if (t == DUK_U64_CONSTANT(0x000000007ff00000)) { + return 1; + } +#else + t = du.ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x7ff0000000000000); + if (t == DUK_U64_CONSTANT(0x0000000000000000)) { + t = du.ull[DUK_DBL_IDX_ULL0] & DUK_U64_CONSTANT(0x8000000000000000); + return t == 0; + } + if (t == DUK_U64_CONSTANT(0x7ff0000000000000)) { + return 1; + } +#endif +#else + t = du.ui[DUK_DBL_IDX_UI0] & 0x7ff00000UL; + if (t == 0x00000000UL) { + return DUK_DBLUNION_IS_ANYZERO(&du); + } + if (t == 0x7ff00000UL) { + return 1; + } +#endif + return 0; +} + +DUK_INTERNAL duk_small_uint_t duk_double_signbit(duk_double_t x) { + duk_double_union du; + du.d = x; + return (duk_small_uint_t) DUK_DBLUNION_GET_SIGNBIT(&du); +} + +DUK_INTERNAL duk_double_t duk_double_trunc_towards_zero(duk_double_t x) { + /* XXX: optimize */ + duk_small_uint_t s = duk_double_signbit(x); + x = DUK_FLOOR(DUK_FABS(x)); /* truncate towards zero */ + if (s) { + x = -x; + } + return x; +} + +DUK_INTERNAL duk_bool_t duk_double_same_sign(duk_double_t x, duk_double_t y) { + duk_double_union du1; + duk_double_union du2; + du1.d = x; + du2.d = y; + + return (((du1.ui[DUK_DBL_IDX_UI0] ^ du2.ui[DUK_DBL_IDX_UI0]) & 0x80000000UL) == 0); +} + +DUK_INTERNAL duk_double_t duk_double_fmin(duk_double_t x, duk_double_t y) { + /* Doesn't replicate fmin() behavior exactly: for fmin() if one + * argument is a NaN, the other argument should be returned. + * Duktape doesn't rely on this behavior so the replacement can + * be simplified. + */ + return (x < y ? x : y); +} + +DUK_INTERNAL duk_double_t duk_double_fmax(duk_double_t x, duk_double_t y) { + /* Doesn't replicate fmax() behavior exactly: for fmax() if one + * argument is a NaN, the other argument should be returned. + * Duktape doesn't rely on this behavior so the replacement can + * be simplified. + */ + return (x > y ? x : y); +} + +DUK_INTERNAL duk_bool_t duk_double_is_finite(duk_double_t x) { + return !duk_double_is_nan_or_inf(x); +} + +DUK_INTERNAL duk_bool_t duk_double_is_integer(duk_double_t x) { + if (duk_double_is_nan_or_inf(x)) { + return 0; + } else { + return duk_double_equals(duk_js_tointeger_number(x), x); + } +} + +DUK_INTERNAL duk_bool_t duk_double_is_safe_integer(duk_double_t x) { + /* >>> 2**53-1 + * 9007199254740991 + */ + return duk_double_is_integer(x) && DUK_FABS(x) <= 9007199254740991.0; +} + +/* Check whether a duk_double_t is a whole number in the 32-bit range (reject + * negative zero), and if so, return a duk_int32_t. + * For compiler use: don't allow negative zero as it will cause trouble with + * LDINT+LDINTX, positive zero is OK. + */ +DUK_INTERNAL duk_bool_t duk_is_whole_get_int32_nonegzero(duk_double_t x, duk_int32_t *ival) { + duk_int32_t t; + + t = duk_double_to_int32_t(x); + if (!duk_double_equals((duk_double_t) t, x)) { + return 0; + } + if (t == 0) { + duk_double_union du; + du.d = x; + if (DUK_DBLUNION_HAS_SIGNBIT(&du)) { + return 0; + } + } + *ival = t; + return 1; +} + +/* Check whether a duk_double_t is a whole number in the 32-bit range, and if + * so, return a duk_int32_t. + */ +DUK_INTERNAL duk_bool_t duk_is_whole_get_int32(duk_double_t x, duk_int32_t *ival) { + duk_int32_t t; + + t = duk_double_to_int32_t(x); + if (!duk_double_equals((duk_double_t) t, x)) { + return 0; + } + *ival = t; + return 1; +} + +/* Division: division by zero is undefined behavior (and may in fact trap) + * so it needs special handling for portability. + */ + +DUK_INTERNAL DUK_INLINE duk_double_t duk_double_div(duk_double_t x, duk_double_t y) { +#if !defined(DUK_USE_ALLOW_UNDEFINED_BEHAVIOR) + if (DUK_UNLIKELY(duk_double_equals(y, 0.0) != 0)) { + /* In C99+ division by zero is undefined behavior so + * avoid it entirely. Hopefully the compiler is + * smart enough to avoid emitting any actual code + * because almost all practical platforms behave as + * expected. + */ + if (x > 0.0) { + if (DUK_SIGNBIT(y)) { + return -DUK_DOUBLE_INFINITY; + } else { + return DUK_DOUBLE_INFINITY; + } + } else if (x < 0.0) { + if (DUK_SIGNBIT(y)) { + return DUK_DOUBLE_INFINITY; + } else { + return -DUK_DOUBLE_INFINITY; + } + } else { + /* +/- 0, NaN */ + return DUK_DOUBLE_NAN; + } + } +#endif + + return x / y; +} + +/* Double and float byteorder changes. */ + +DUK_INTERNAL DUK_INLINE void duk_dblunion_host_to_little(duk_double_union *u) { +#if defined(DUK_USE_DOUBLE_LE) + /* HGFEDCBA -> HGFEDCBA */ + DUK_UNREF(u); +#elif defined(DUK_USE_DOUBLE_ME) + duk_uint32_t a, b; + + /* DCBAHGFE -> HGFEDCBA */ + a = u->ui[0]; + b = u->ui[1]; + u->ui[0] = b; + u->ui[1] = a; +#elif defined(DUK_USE_DOUBLE_BE) + /* ABCDEFGH -> HGFEDCBA */ +#if defined(DUK_USE_64BIT_OPS) + u->ull[0] = DUK_BSWAP64(u->ull[0]); +#else + duk_uint32_t a, b; + + a = u->ui[0]; + b = u->ui[1]; + u->ui[0] = DUK_BSWAP32(b); + u->ui[1] = DUK_BSWAP32(a); +#endif +#else +#error internal error +#endif +} + +DUK_INTERNAL DUK_INLINE void duk_dblunion_little_to_host(duk_double_union *u) { + duk_dblunion_host_to_little(u); +} + +DUK_INTERNAL DUK_INLINE void duk_dblunion_host_to_big(duk_double_union *u) { +#if defined(DUK_USE_DOUBLE_LE) + /* HGFEDCBA -> ABCDEFGH */ +#if defined(DUK_USE_64BIT_OPS) + u->ull[0] = DUK_BSWAP64(u->ull[0]); +#else + duk_uint32_t a, b; + + a = u->ui[0]; + b = u->ui[1]; + u->ui[0] = DUK_BSWAP32(b); + u->ui[1] = DUK_BSWAP32(a); +#endif +#elif defined(DUK_USE_DOUBLE_ME) + duk_uint32_t a, b; + + /* DCBAHGFE -> ABCDEFGH */ + a = u->ui[0]; + b = u->ui[1]; + u->ui[0] = DUK_BSWAP32(a); + u->ui[1] = DUK_BSWAP32(b); +#elif defined(DUK_USE_DOUBLE_BE) + /* ABCDEFGH -> ABCDEFGH */ + DUK_UNREF(u); +#else +#error internal error +#endif +} + +DUK_INTERNAL DUK_INLINE void duk_dblunion_big_to_host(duk_double_union *u) { + duk_dblunion_host_to_big(u); +} + +DUK_INTERNAL DUK_INLINE void duk_fltunion_host_to_big(duk_float_union *u) { +#if defined(DUK_USE_DOUBLE_LE) || defined(DUK_USE_DOUBLE_ME) + /* DCBA -> ABCD */ + u->ui[0] = DUK_BSWAP32(u->ui[0]); +#elif defined(DUK_USE_DOUBLE_BE) + /* ABCD -> ABCD */ + DUK_UNREF(u); +#else +#error internal error +#endif +} + +DUK_INTERNAL DUK_INLINE void duk_fltunion_big_to_host(duk_float_union *u) { + duk_fltunion_host_to_big(u); +} + +/* Comparison: ensures comparison operates on exactly correct types, avoiding + * some floating point comparison pitfalls (e.g. atan2() assertions failed on + * -m32 with direct comparison, even with explicit casts). + */ +#if defined(DUK_USE_GCC_PRAGMAS) +#pragma GCC diagnostic push +#pragma GCC diagnostic ignored "-Wfloat-equal" +#elif defined(DUK_USE_CLANG_PRAGMAS) +#pragma clang diagnostic push +#pragma clang diagnostic ignored "-Wfloat-equal" +#endif + +DUK_INTERNAL DUK_ALWAYS_INLINE duk_bool_t duk_double_equals(duk_double_t x, duk_double_t y) { + return x == y; +} + +DUK_INTERNAL DUK_ALWAYS_INLINE duk_bool_t duk_float_equals(duk_float_t x, duk_float_t y) { + return x == y; +} +#if defined(DUK_USE_GCC_PRAGMAS) +#pragma GCC diagnostic pop +#elif defined(DUK_USE_CLANG_PRAGMAS) +#pragma clang diagnostic pop +#endif +#line 1 "duk_util_hashbytes.c" +/* + * Hash function duk_util_hashbytes(). + * + * Currently, 32-bit MurmurHash2. + * + * Don't rely on specific hash values; hash function may be endianness + * dependent, for instance. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_STRHASH_DENSE) +/* 'magic' constants for Murmurhash2 */ +#define DUK__MAGIC_M ((duk_uint32_t) 0x5bd1e995UL) +#define DUK__MAGIC_R 24 + +DUK_INTERNAL duk_uint32_t duk_util_hashbytes(const duk_uint8_t *data, duk_size_t len, duk_uint32_t seed) { + duk_uint32_t h = seed ^ ((duk_uint32_t) len); + + while (len >= 4) { + /* Portability workaround is required for platforms without + * unaligned access. The replacement code emulates little + * endian access even on big endian architectures, which is + * OK as long as it is consistent for a build. + */ +#if defined(DUK_USE_HASHBYTES_UNALIGNED_U32_ACCESS) + duk_uint32_t k = *((const duk_uint32_t *) (const void *) data); +#else + duk_uint32_t k = ((duk_uint32_t) data[0]) | (((duk_uint32_t) data[1]) << 8) | (((duk_uint32_t) data[2]) << 16) | + (((duk_uint32_t) data[3]) << 24); +#endif + + k *= DUK__MAGIC_M; + k ^= k >> DUK__MAGIC_R; + k *= DUK__MAGIC_M; + h *= DUK__MAGIC_M; + h ^= k; + data += 4; + len -= 4; + } + + switch (len) { + case 3: + h ^= data[2] << 16; + case 2: + h ^= data[1] << 8; + case 1: + h ^= data[0]; + h *= DUK__MAGIC_M; + } + + h ^= h >> 13; + h *= DUK__MAGIC_M; + h ^= h >> 15; + + return h; +} +#endif /* DUK_USE_STRHASH_DENSE */ + +/* automatic undefs */ +#undef DUK__MAGIC_M +#undef DUK__MAGIC_R +#line 1 "duk_util_memory.c" +/* + * Memory utils. + */ + +/* #include duk_internal.h -> already included */ + +#if defined(DUK_USE_ALLOW_UNDEFINED_BEHAVIOR) +DUK_INTERNAL DUK_INLINE duk_small_int_t duk_memcmp_unsafe(const void *s1, const void *s2, duk_size_t len) { + DUK_ASSERT(s1 != NULL || len == 0U); + DUK_ASSERT(s2 != NULL || len == 0U); + return DUK_MEMCMP(s1, s2, (size_t) len); +} + +DUK_INTERNAL DUK_INLINE duk_small_int_t duk_memcmp(const void *s1, const void *s2, duk_size_t len) { + DUK_ASSERT(s1 != NULL); + DUK_ASSERT(s2 != NULL); + return DUK_MEMCMP(s1, s2, (size_t) len); +} +#else /* DUK_USE_ALLOW_UNDEFINED_BEHAVIOR */ +DUK_INTERNAL DUK_INLINE duk_small_int_t duk_memcmp_unsafe(const void *s1, const void *s2, duk_size_t len) { + DUK_ASSERT(s1 != NULL || len == 0U); + DUK_ASSERT(s2 != NULL || len == 0U); + if (DUK_UNLIKELY(len == 0U)) { + return 0; + } + DUK_ASSERT(s1 != NULL); + DUK_ASSERT(s2 != NULL); + return duk_memcmp(s1, s2, len); +} + +DUK_INTERNAL DUK_INLINE duk_small_int_t duk_memcmp(const void *s1, const void *s2, duk_size_t len) { + DUK_ASSERT(s1 != NULL); + DUK_ASSERT(s2 != NULL); + return DUK_MEMCMP(s1, s2, (size_t) len); +} +#endif /* DUK_USE_ALLOW_UNDEFINED_BEHAVIOR */ +#line 1 "duk_util_tinyrandom.c" +/* + * A tiny random number generator used for Math.random() and other internals. + * + * Default algorithm is xoroshiro128+: http://xoroshiro.di.unimi.it/xoroshiro128plus.c + * with SplitMix64 seed preparation: http://xorshift.di.unimi.it/splitmix64.c. + * + * Low memory targets and targets without 64-bit types use a slightly smaller + * (but slower) algorithm by Adi Shamir: + * http://www.woodmann.com/forum/archive/index.php/t-3100.html. + * + */ + +/* #include duk_internal.h -> already included */ + +#if !defined(DUK_USE_GET_RANDOM_DOUBLE) + +#if defined(DUK_USE_PREFER_SIZE) || !defined(DUK_USE_64BIT_OPS) +#define DUK__RANDOM_SHAMIR3OP +#else +#define DUK__RANDOM_XOROSHIRO128PLUS +#endif + +#if defined(DUK__RANDOM_SHAMIR3OP) +#define DUK__UPDATE_RND(rnd) \ + do { \ + (rnd) += ((rnd) * (rnd)) | 0x05UL; \ + (rnd) = ((rnd) &0xffffffffUL); /* if duk_uint32_t is exactly 32 bits, this is a NOP */ \ + } while (0) + +#define DUK__RND_BIT(rnd) ((rnd) >> 31) /* only use the highest bit */ + +DUK_INTERNAL void duk_util_tinyrandom_prepare_seed(duk_hthread *thr) { + DUK_UNREF(thr); /* Nothing now. */ +} + +DUK_INTERNAL duk_double_t duk_util_tinyrandom_get_double(duk_hthread *thr) { + duk_double_t t; + duk_small_int_t n; + duk_uint32_t rnd; + + rnd = thr->heap->rnd_state; + + n = 53; /* enough to cover the whole mantissa */ + t = 0.0; + + do { + DUK__UPDATE_RND(rnd); + t += DUK__RND_BIT(rnd); + t /= 2.0; + } while (--n); + + thr->heap->rnd_state = rnd; + + DUK_ASSERT(t >= (duk_double_t) 0.0); + DUK_ASSERT(t < (duk_double_t) 1.0); + + return t; +} +#endif /* DUK__RANDOM_SHAMIR3OP */ + +#if defined(DUK__RANDOM_XOROSHIRO128PLUS) +DUK_LOCAL DUK_ALWAYS_INLINE duk_uint64_t duk__rnd_splitmix64(duk_uint64_t *x) { + duk_uint64_t z; + z = (*x += DUK_U64_CONSTANT(0x9E3779B97F4A7C15)); + z = (z ^ (z >> 30U)) * DUK_U64_CONSTANT(0xBF58476D1CE4E5B9); + z = (z ^ (z >> 27U)) * DUK_U64_CONSTANT(0x94D049BB133111EB); + return z ^ (z >> 31U); +} + +DUK_LOCAL DUK_ALWAYS_INLINE duk_uint64_t duk__rnd_rotl(const duk_uint64_t x, duk_small_uint_t k) { + return (x << k) | (x >> (64U - k)); +} + +DUK_LOCAL DUK_ALWAYS_INLINE duk_uint64_t duk__xoroshiro128plus(duk_uint64_t *s) { + duk_uint64_t s0; + duk_uint64_t s1; + duk_uint64_t res; + + s0 = s[0]; + s1 = s[1]; + res = s0 + s1; + s1 ^= s0; + s[0] = duk__rnd_rotl(s0, 55) ^ s1 ^ (s1 << 14U); + s[1] = duk__rnd_rotl(s1, 36); + + return res; +} + +DUK_INTERNAL void duk_util_tinyrandom_prepare_seed(duk_hthread *thr) { + duk_small_uint_t i; + duk_uint64_t x; + + /* Mix both halves of the initial seed with SplitMix64. The intent + * is to ensure that very similar raw seeds (which is usually the case + * because current seed is Date.now()) result in different xoroshiro128+ + * seeds. + */ + x = thr->heap->rnd_state[0]; /* Only [0] is used as input here. */ + for (i = 0; i < 64; i++) { + thr->heap->rnd_state[i & 0x01] = duk__rnd_splitmix64(&x); /* Keep last 2 values. */ + } +} + +DUK_INTERNAL duk_double_t duk_util_tinyrandom_get_double(duk_hthread *thr) { + duk_uint64_t v; + duk_double_union du; + + /* For big and little endian the integer and IEEE double byte order + * is the same so a direct assignment works. For mixed endian the + * 32-bit parts must be swapped. + */ + v = (DUK_U64_CONSTANT(0x3ff) << 52U) | (duk__xoroshiro128plus((duk_uint64_t *) thr->heap->rnd_state) >> 12U); + du.ull[0] = v; +#if defined(DUK_USE_DOUBLE_ME) + do { + duk_uint32_t tmp; + tmp = du.ui[0]; + du.ui[0] = du.ui[1]; + du.ui[1] = tmp; + } while (0); +#endif + return du.d - 1.0; +} +#endif /* DUK__RANDOM_XOROSHIRO128PLUS */ + +#endif /* !DUK_USE_GET_RANDOM_DOUBLE */ + +/* automatic undefs */ +#undef DUK__RANDOM_SHAMIR3OP +#undef DUK__RANDOM_XOROSHIRO128PLUS +#undef DUK__RND_BIT +#undef DUK__UPDATE_RND diff --git a/kernel/src/lib/duktape.h b/kernel/src/lib/duktape.h new file mode 100644 index 000000000..d1583cd53 --- /dev/null +++ b/kernel/src/lib/duktape.h @@ -0,0 +1,1456 @@ +/* + * Duktape public API for Duktape 2.7.0. + * + * See the API reference for documentation on call semantics. The exposed, + * supported API is between the "BEGIN PUBLIC API" and "END PUBLIC API" + * comments. Other parts of the header are Duktape internal and related to + * e.g. platform/compiler/feature detection. + * + * Git commit 03d4d728f8365021de6955c649e6dcd05dcca99f (03d4d72-dirty). + * Git branch HEAD. + * + * See Duktape AUTHORS.rst and LICENSE.txt for copyright and + * licensing information. + */ + +/* LICENSE.txt */ +/* + * =============== + * Duktape license + * =============== + * + * (http://opensource.org/licenses/MIT) + * + * Copyright (c) 2013-present by Duktape authors (see AUTHORS.rst) + * + * Permission is hereby granted, free of charge, to any person obtaining a copy + * of this software and associated documentation files (the "Software"), to deal + * in the Software without restriction, including without limitation the rights + * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell + * copies of the Software, and to permit persons to whom the Software is + * furnished to do so, subject to the following conditions: + * + * The above copyright notice and this permission notice shall be included in + * all copies or substantial portions of the Software. + * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR + * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, + * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE + * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER + * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, + * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN + * THE SOFTWARE. + */ + +/* AUTHORS.rst */ +/* + * =============== + * Duktape authors + * =============== + * + * Copyright + * ========= + * + * Duktape copyrights are held by its authors. Each author has a copyright + * to their contribution, and agrees to irrevocably license the contribution + * under the Duktape ``LICENSE.txt``. + * + * Authors + * ======= + * + * Please include an e-mail address, a link to your GitHub profile, or something + * similar to allow your contribution to be identified accurately. + * + * The following people have contributed code, website contents, or Wiki contents, + * and agreed to irrevocably license their contributions under the Duktape + * ``LICENSE.txt`` (in order of appearance): + * + * * Sami Vaarala + * * Niki Dobrev + * * Andreas \u00d6man + * * L\u00e1szl\u00f3 Lang\u00f3 + * * Legimet + * * Karl Skomski + * * Bruce Pascoe + * * Ren\u00e9 Hollander + * * Julien Hamaide (https://github.com/crazyjul) + * * Sebastian G\u00f6tte (https://github.com/jaseg) + * * Tomasz Magulski (https://github.com/magul) + * * \D. Bohdan (https://github.com/dbohdan) + * * Ond\u0159ej Jirman (https://github.com/megous) + * * Sa\u00fal Ibarra Corretg\u00e9 + * * Jeremy HU + * * Ole Andr\u00e9 Vadla Ravn\u00e5s (https://github.com/oleavr) + * * Harold Brenes (https://github.com/harold-b) + * * Oliver Crow (https://github.com/ocrow) + * * Jakub Ch\u0142api\u0144ski (https://github.com/jchlapinski) + * * Brett Vickers (https://github.com/beevik) + * * Dominik Okwieka (https://github.com/okitec) + * * Remko Tron\u00e7on (https://el-tramo.be) + * * Romero Malaquias (rbsm@ic.ufal.br) + * * Michael Drake + * * Steven Don (https://github.com/shdon) + * * Simon Stone (https://github.com/sstone1) + * * \J. McC. (https://github.com/jmhmccr) + * * Jakub Nowakowski (https://github.com/jimvonmoon) + * * Tommy Nguyen (https://github.com/tn0502) + * * Fabrice Fontaine (https://github.com/ffontaine) + * * Christopher Hiller (https://github.com/boneskull) + * * Gonzalo Diethelm (https://github.com/gonzus) + * * Michal Kasperek (https://github.com/michalkas) + * * Andrew Janke (https://github.com/apjanke) + * * Steve Fan (https://github.com/stevefan1999) + * * Edward Betts (https://github.com/edwardbetts) + * * Ozhan Duz (https://github.com/webfolderio) + * * Akos Kiss (https://github.com/akosthekiss) + * * TheBrokenRail (https://github.com/TheBrokenRail) + * * Jesse Doyle (https://github.com/jessedoyle) + * * Gero Kuehn (https://github.com/dc6jgk) + * * James Swift (https://github.com/phraemer) + * * Luis de Bethencourt (https://github.com/luisbg) + * * Ian Whyman (https://github.com/v00d00) + * * Rick Sayre (https://github.com/whorfin) + * * Craig Leres (https://github.com/leres) + * * Maurici Abad (https://github.com/mauriciabad) + * * Nancy Li (https://github.com/NancyLi1013) + * * William Parks (https://github.com/WilliamParks) + * * Sam Hellawell (https://github.com/samhellawell) + * * Vladislavs Sokurenko (https://github.com/sokurenko) + * + * Other contributions + * =================== + * + * The following people have contributed something other than code (e.g. reported + * bugs, provided ideas, etc; roughly in order of appearance): + * + * * Greg Burns + * * Anthony Rabine + * * Carlos Costa + * * Aur\u00e9lien Bouilland + * * Preet Desai (Pris Matic) + * * judofyr (http://www.reddit.com/user/judofyr) + * * Jason Woofenden + * * Micha\u0142 Przyby\u015b + * * Anthony Howe + * * Conrad Pankoff + * * Jim Schimpf + * * Rajaran Gaunker (https://github.com/zimbabao) + * * Andreas \u00d6man + * * Doug Sanden + * * Josh Engebretson (https://github.com/JoshEngebretson) + * * Remo Eichenberger (https://github.com/remoe) + * * Mamod Mehyar (https://github.com/mamod) + * * David Demelier (https://github.com/markand) + * * Tim Caswell (https://github.com/creationix) + * * Mitchell Blank Jr (https://github.com/mitchblank) + * * https://github.com/yushli + * * Seo Sanghyeon (https://github.com/sanxiyn) + * * Han ChoongWoo (https://github.com/tunz) + * * Joshua Peek (https://github.com/josh) + * * Bruce E. Pascoe (https://github.com/fatcerberus) + * * https://github.com/Kelledin + * * https://github.com/sstruchtrup + * * Michael Drake (https://github.com/tlsa) + * * https://github.com/chris-y + * * Laurent Zubiaur (https://github.com/lzubiaur) + * * Neil Kolban (https://github.com/nkolban) + * * Wilhelm Wanecek (https://github.com/wanecek) + * * Andrew Janke (https://github.com/apjanke) + * * Unamer (https://github.com/unamer) + * * Karl Dahlke (eklhad@gmail.com) + * + * If you are accidentally missing from this list, send me an e-mail + * (``sami.vaarala@iki.fi``) and I'll fix the omission. + */ + +#if !defined(DUKTAPE_H_INCLUDED) +#define DUKTAPE_H_INCLUDED + +#define DUK_SINGLE_FILE + +/* + * BEGIN PUBLIC API + */ + +/* + * Version and Git commit identification + */ + +/* Duktape version, (major * 10000) + (minor * 100) + patch. Allows C code + * to #if (DUK_VERSION >= NNN) against Duktape API version. The same value + * is also available to ECMAScript code in Duktape.version. Unofficial + * development snapshots have 99 for patch level (e.g. 0.10.99 would be a + * development version after 0.10.0 but before the next official release). + */ +#define DUK_VERSION 20700L + +/* Git commit, describe, and branch for Duktape build. Useful for + * non-official snapshot builds so that application code can easily log + * which Duktape snapshot was used. Not available in the ECMAScript + * environment. + */ +#define DUK_GIT_COMMIT "03d4d728f8365021de6955c649e6dcd05dcca99f" +#define DUK_GIT_DESCRIBE "03d4d72-dirty" +#define DUK_GIT_BRANCH "HEAD" + +/* External duk_config.h provides platform/compiler/OS dependent + * typedefs and macros, and DUK_USE_xxx config options so that + * the rest of Duktape doesn't need to do any feature detection. + * DUK_VERSION is defined before including so that configuration + * snippets can react to it. + */ +#include "duk_config.h" + +/* + * Avoid C++ name mangling + */ + +#if defined(__cplusplus) +extern "C" { +#endif + +/* + * Some defines forwarded from feature detection + */ + +#undef DUK_API_VARIADIC_MACROS +#if defined(DUK_USE_VARIADIC_MACROS) +#define DUK_API_VARIADIC_MACROS +#endif + +#define DUK_API_NORETURN(decl) DUK_NORETURN(decl) + +/* + * Public API specific typedefs + * + * Many types are wrapped by Duktape for portability to rare platforms + * where e.g. 'int' is a 16-bit type. See practical typing discussion + * in Duktape web documentation. + */ + +struct duk_thread_state; +struct duk_memory_functions; +struct duk_function_list_entry; +struct duk_number_list_entry; +struct duk_time_components; + +/* duk_context is now defined in duk_config.h because it may also be + * referenced there by prototypes. + */ +typedef struct duk_thread_state duk_thread_state; +typedef struct duk_memory_functions duk_memory_functions; +typedef struct duk_function_list_entry duk_function_list_entry; +typedef struct duk_number_list_entry duk_number_list_entry; +typedef struct duk_time_components duk_time_components; + +typedef duk_ret_t (*duk_c_function)(duk_context *ctx); +typedef void *(*duk_alloc_function) (void *udata, duk_size_t size); +typedef void *(*duk_realloc_function) (void *udata, void *ptr, duk_size_t size); +typedef void (*duk_free_function) (void *udata, void *ptr); +typedef void (*duk_fatal_function) (void *udata, const char *msg); +typedef void (*duk_decode_char_function) (void *udata, duk_codepoint_t codepoint); +typedef duk_codepoint_t (*duk_map_char_function) (void *udata, duk_codepoint_t codepoint); +typedef duk_ret_t (*duk_safe_call_function) (duk_context *ctx, void *udata); +typedef duk_size_t (*duk_debug_read_function) (void *udata, char *buffer, duk_size_t length); +typedef duk_size_t (*duk_debug_write_function) (void *udata, const char *buffer, duk_size_t length); +typedef duk_size_t (*duk_debug_peek_function) (void *udata); +typedef void (*duk_debug_read_flush_function) (void *udata); +typedef void (*duk_debug_write_flush_function) (void *udata); +typedef duk_idx_t (*duk_debug_request_function) (duk_context *ctx, void *udata, duk_idx_t nvalues); +typedef void (*duk_debug_detached_function) (duk_context *ctx, void *udata); + +struct duk_thread_state { + /* XXX: Enough space to hold internal suspend/resume structure. + * This is rather awkward and to be fixed when the internal + * structure is visible for the public API header. + */ + char data[128]; +}; + +struct duk_memory_functions { + duk_alloc_function alloc_func; + duk_realloc_function realloc_func; + duk_free_function free_func; + void *udata; +}; + +struct duk_function_list_entry { + const char *key; + duk_c_function value; + duk_idx_t nargs; +}; + +struct duk_number_list_entry { + const char *key; + duk_double_t value; +}; + +struct duk_time_components { + duk_double_t year; /* year, e.g. 2016, ECMAScript year range */ + duk_double_t month; /* month: 1-12 */ + duk_double_t day; /* day: 1-31 */ + duk_double_t hours; /* hour: 0-59 */ + duk_double_t minutes; /* minute: 0-59 */ + duk_double_t seconds; /* second: 0-59 (in POSIX time no leap second) */ + duk_double_t milliseconds; /* may contain sub-millisecond fractions */ + duk_double_t weekday; /* weekday: 0-6, 0=Sunday, 1=Monday, ..., 6=Saturday */ +}; + +/* + * Constants + */ + +/* Duktape debug protocol version used by this build. */ +#define DUK_DEBUG_PROTOCOL_VERSION 2 + +/* Used to represent invalid index; if caller uses this without checking, + * this index will map to a non-existent stack entry. Also used in some + * API calls as a marker to denote "no value". + */ +#define DUK_INVALID_INDEX DUK_IDX_MIN + +/* Indicates that a native function does not have a fixed number of args, + * and the argument stack should not be capped/extended at all. + */ +#define DUK_VARARGS ((duk_int_t) (-1)) + +/* Number of value stack entries (in addition to actual call arguments) + * guaranteed to be allocated on entry to a Duktape/C function. + */ +#define DUK_API_ENTRY_STACK 64U + +/* Value types, used by e.g. duk_get_type() */ +#define DUK_TYPE_MIN 0U +#define DUK_TYPE_NONE 0U /* no value, e.g. invalid index */ +#define DUK_TYPE_UNDEFINED 1U /* ECMAScript undefined */ +#define DUK_TYPE_NULL 2U /* ECMAScript null */ +#define DUK_TYPE_BOOLEAN 3U /* ECMAScript boolean: 0 or 1 */ +#define DUK_TYPE_NUMBER 4U /* ECMAScript number: double */ +#define DUK_TYPE_STRING 5U /* ECMAScript string: CESU-8 / extended UTF-8 encoded */ +#define DUK_TYPE_OBJECT 6U /* ECMAScript object: includes objects, arrays, functions, threads */ +#define DUK_TYPE_BUFFER 7U /* fixed or dynamic, garbage collected byte buffer */ +#define DUK_TYPE_POINTER 8U /* raw void pointer */ +#define DUK_TYPE_LIGHTFUNC 9U /* lightweight function pointer */ +#define DUK_TYPE_MAX 9U + +/* Value mask types, used by e.g. duk_get_type_mask() */ +#define DUK_TYPE_MASK_NONE (1U << DUK_TYPE_NONE) +#define DUK_TYPE_MASK_UNDEFINED (1U << DUK_TYPE_UNDEFINED) +#define DUK_TYPE_MASK_NULL (1U << DUK_TYPE_NULL) +#define DUK_TYPE_MASK_BOOLEAN (1U << DUK_TYPE_BOOLEAN) +#define DUK_TYPE_MASK_NUMBER (1U << DUK_TYPE_NUMBER) +#define DUK_TYPE_MASK_STRING (1U << DUK_TYPE_STRING) +#define DUK_TYPE_MASK_OBJECT (1U << DUK_TYPE_OBJECT) +#define DUK_TYPE_MASK_BUFFER (1U << DUK_TYPE_BUFFER) +#define DUK_TYPE_MASK_POINTER (1U << DUK_TYPE_POINTER) +#define DUK_TYPE_MASK_LIGHTFUNC (1U << DUK_TYPE_LIGHTFUNC) +#define DUK_TYPE_MASK_THROW (1U << 10) /* internal flag value: throw if mask doesn't match */ +#define DUK_TYPE_MASK_PROMOTE (1U << 11) /* internal flag value: promote to object if mask matches */ + +/* Coercion hints */ +#define DUK_HINT_NONE 0 /* prefer number, unless input is a Date, in which + * case prefer string (E5 Section 8.12.8) + */ +#define DUK_HINT_STRING 1 /* prefer string */ +#define DUK_HINT_NUMBER 2 /* prefer number */ + +/* Enumeration flags for duk_enum() */ +#define DUK_ENUM_INCLUDE_NONENUMERABLE (1U << 0) /* enumerate non-numerable properties in addition to enumerable */ +#define DUK_ENUM_INCLUDE_HIDDEN (1U << 1) /* enumerate hidden symbols too (in Duktape 1.x called internal properties) */ +#define DUK_ENUM_INCLUDE_SYMBOLS (1U << 2) /* enumerate symbols */ +#define DUK_ENUM_EXCLUDE_STRINGS (1U << 3) /* exclude strings */ +#define DUK_ENUM_OWN_PROPERTIES_ONLY (1U << 4) /* don't walk prototype chain, only check own properties */ +#define DUK_ENUM_ARRAY_INDICES_ONLY (1U << 5) /* only enumerate array indices */ +/* XXX: misleading name */ +#define DUK_ENUM_SORT_ARRAY_INDICES (1U << 6) /* sort array indices (applied to full enumeration result, including inherited array indices); XXX: misleading name */ +#define DUK_ENUM_NO_PROXY_BEHAVIOR (1U << 7) /* enumerate a proxy object itself without invoking proxy behavior */ + +/* Compilation flags for duk_compile() and duk_eval() */ +/* DUK_COMPILE_xxx bits 0-2 are reserved for an internal 'nargs' argument. + */ +#define DUK_COMPILE_EVAL (1U << 3) /* compile eval code (instead of global code) */ +#define DUK_COMPILE_FUNCTION (1U << 4) /* compile function code (instead of global code) */ +#define DUK_COMPILE_STRICT (1U << 5) /* use strict (outer) context for global, eval, or function code */ +#define DUK_COMPILE_SHEBANG (1U << 6) /* allow shebang ('#! ...') comment on first line of source */ +#define DUK_COMPILE_SAFE (1U << 7) /* (internal) catch compilation errors */ +#define DUK_COMPILE_NORESULT (1U << 8) /* (internal) omit eval result */ +#define DUK_COMPILE_NOSOURCE (1U << 9) /* (internal) no source string on stack */ +#define DUK_COMPILE_STRLEN (1U << 10) /* (internal) take strlen() of src_buffer (avoids double evaluation in macro) */ +#define DUK_COMPILE_NOFILENAME (1U << 11) /* (internal) no filename on stack */ +#define DUK_COMPILE_FUNCEXPR (1U << 12) /* (internal) source is a function expression (used for Function constructor) */ + +/* Flags for duk_def_prop() and its variants; base flags + a lot of convenience shorthands */ +#define DUK_DEFPROP_WRITABLE (1U << 0) /* set writable (effective if DUK_DEFPROP_HAVE_WRITABLE set) */ +#define DUK_DEFPROP_ENUMERABLE (1U << 1) /* set enumerable (effective if DUK_DEFPROP_HAVE_ENUMERABLE set) */ +#define DUK_DEFPROP_CONFIGURABLE (1U << 2) /* set configurable (effective if DUK_DEFPROP_HAVE_CONFIGURABLE set) */ +#define DUK_DEFPROP_HAVE_WRITABLE (1U << 3) /* set/clear writable */ +#define DUK_DEFPROP_HAVE_ENUMERABLE (1U << 4) /* set/clear enumerable */ +#define DUK_DEFPROP_HAVE_CONFIGURABLE (1U << 5) /* set/clear configurable */ +#define DUK_DEFPROP_HAVE_VALUE (1U << 6) /* set value (given on value stack) */ +#define DUK_DEFPROP_HAVE_GETTER (1U << 7) /* set getter (given on value stack) */ +#define DUK_DEFPROP_HAVE_SETTER (1U << 8) /* set setter (given on value stack) */ +#define DUK_DEFPROP_FORCE (1U << 9) /* force change if possible, may still fail for e.g. virtual properties */ +#define DUK_DEFPROP_SET_WRITABLE (DUK_DEFPROP_HAVE_WRITABLE | DUK_DEFPROP_WRITABLE) +#define DUK_DEFPROP_CLEAR_WRITABLE DUK_DEFPROP_HAVE_WRITABLE +#define DUK_DEFPROP_SET_ENUMERABLE (DUK_DEFPROP_HAVE_ENUMERABLE | DUK_DEFPROP_ENUMERABLE) +#define DUK_DEFPROP_CLEAR_ENUMERABLE DUK_DEFPROP_HAVE_ENUMERABLE +#define DUK_DEFPROP_SET_CONFIGURABLE (DUK_DEFPROP_HAVE_CONFIGURABLE | DUK_DEFPROP_CONFIGURABLE) +#define DUK_DEFPROP_CLEAR_CONFIGURABLE DUK_DEFPROP_HAVE_CONFIGURABLE +#define DUK_DEFPROP_W DUK_DEFPROP_WRITABLE +#define DUK_DEFPROP_E DUK_DEFPROP_ENUMERABLE +#define DUK_DEFPROP_C DUK_DEFPROP_CONFIGURABLE +#define DUK_DEFPROP_WE (DUK_DEFPROP_WRITABLE | DUK_DEFPROP_ENUMERABLE) +#define DUK_DEFPROP_WC (DUK_DEFPROP_WRITABLE | DUK_DEFPROP_CONFIGURABLE) +#define DUK_DEFPROP_EC (DUK_DEFPROP_ENUMERABLE | DUK_DEFPROP_CONFIGURABLE) +#define DUK_DEFPROP_WEC (DUK_DEFPROP_WRITABLE | DUK_DEFPROP_ENUMERABLE | DUK_DEFPROP_CONFIGURABLE) +#define DUK_DEFPROP_HAVE_W DUK_DEFPROP_HAVE_WRITABLE +#define DUK_DEFPROP_HAVE_E DUK_DEFPROP_HAVE_ENUMERABLE +#define DUK_DEFPROP_HAVE_C DUK_DEFPROP_HAVE_CONFIGURABLE +#define DUK_DEFPROP_HAVE_WE (DUK_DEFPROP_HAVE_WRITABLE | DUK_DEFPROP_HAVE_ENUMERABLE) +#define DUK_DEFPROP_HAVE_WC (DUK_DEFPROP_HAVE_WRITABLE | DUK_DEFPROP_HAVE_CONFIGURABLE) +#define DUK_DEFPROP_HAVE_EC (DUK_DEFPROP_HAVE_ENUMERABLE | DUK_DEFPROP_HAVE_CONFIGURABLE) +#define DUK_DEFPROP_HAVE_WEC (DUK_DEFPROP_HAVE_WRITABLE | DUK_DEFPROP_HAVE_ENUMERABLE | DUK_DEFPROP_HAVE_CONFIGURABLE) +#define DUK_DEFPROP_SET_W DUK_DEFPROP_SET_WRITABLE +#define DUK_DEFPROP_SET_E DUK_DEFPROP_SET_ENUMERABLE +#define DUK_DEFPROP_SET_C DUK_DEFPROP_SET_CONFIGURABLE +#define DUK_DEFPROP_SET_WE (DUK_DEFPROP_SET_WRITABLE | DUK_DEFPROP_SET_ENUMERABLE) +#define DUK_DEFPROP_SET_WC (DUK_DEFPROP_SET_WRITABLE | DUK_DEFPROP_SET_CONFIGURABLE) +#define DUK_DEFPROP_SET_EC (DUK_DEFPROP_SET_ENUMERABLE | DUK_DEFPROP_SET_CONFIGURABLE) +#define DUK_DEFPROP_SET_WEC (DUK_DEFPROP_SET_WRITABLE | DUK_DEFPROP_SET_ENUMERABLE | DUK_DEFPROP_SET_CONFIGURABLE) +#define DUK_DEFPROP_CLEAR_W DUK_DEFPROP_CLEAR_WRITABLE +#define DUK_DEFPROP_CLEAR_E DUK_DEFPROP_CLEAR_ENUMERABLE +#define DUK_DEFPROP_CLEAR_C DUK_DEFPROP_CLEAR_CONFIGURABLE +#define DUK_DEFPROP_CLEAR_WE (DUK_DEFPROP_CLEAR_WRITABLE | DUK_DEFPROP_CLEAR_ENUMERABLE) +#define DUK_DEFPROP_CLEAR_WC (DUK_DEFPROP_CLEAR_WRITABLE | DUK_DEFPROP_CLEAR_CONFIGURABLE) +#define DUK_DEFPROP_CLEAR_EC (DUK_DEFPROP_CLEAR_ENUMERABLE | DUK_DEFPROP_CLEAR_CONFIGURABLE) +#define DUK_DEFPROP_CLEAR_WEC (DUK_DEFPROP_CLEAR_WRITABLE | DUK_DEFPROP_CLEAR_ENUMERABLE | DUK_DEFPROP_CLEAR_CONFIGURABLE) +#define DUK_DEFPROP_ATTR_W (DUK_DEFPROP_HAVE_WEC | DUK_DEFPROP_W) +#define DUK_DEFPROP_ATTR_E (DUK_DEFPROP_HAVE_WEC | DUK_DEFPROP_E) +#define DUK_DEFPROP_ATTR_C (DUK_DEFPROP_HAVE_WEC | DUK_DEFPROP_C) +#define DUK_DEFPROP_ATTR_WE (DUK_DEFPROP_HAVE_WEC | DUK_DEFPROP_WE) +#define DUK_DEFPROP_ATTR_WC (DUK_DEFPROP_HAVE_WEC | DUK_DEFPROP_WC) +#define DUK_DEFPROP_ATTR_EC (DUK_DEFPROP_HAVE_WEC | DUK_DEFPROP_EC) +#define DUK_DEFPROP_ATTR_WEC (DUK_DEFPROP_HAVE_WEC | DUK_DEFPROP_WEC) + +/* Flags for duk_push_thread_raw() */ +#define DUK_THREAD_NEW_GLOBAL_ENV (1U << 0) /* create a new global environment */ + +/* Flags for duk_gc() */ +#define DUK_GC_COMPACT (1U << 0) /* compact heap objects */ + +/* Error codes (must be 8 bits at most, see duk_error.h) */ +#define DUK_ERR_NONE 0 /* no error (e.g. from duk_get_error_code()) */ +#define DUK_ERR_ERROR 1 /* Error */ +#define DUK_ERR_EVAL_ERROR 2 /* EvalError */ +#define DUK_ERR_RANGE_ERROR 3 /* RangeError */ +#define DUK_ERR_REFERENCE_ERROR 4 /* ReferenceError */ +#define DUK_ERR_SYNTAX_ERROR 5 /* SyntaxError */ +#define DUK_ERR_TYPE_ERROR 6 /* TypeError */ +#define DUK_ERR_URI_ERROR 7 /* URIError */ + +/* Return codes for C functions (shortcut for throwing an error) */ +#define DUK_RET_ERROR (-DUK_ERR_ERROR) +#define DUK_RET_EVAL_ERROR (-DUK_ERR_EVAL_ERROR) +#define DUK_RET_RANGE_ERROR (-DUK_ERR_RANGE_ERROR) +#define DUK_RET_REFERENCE_ERROR (-DUK_ERR_REFERENCE_ERROR) +#define DUK_RET_SYNTAX_ERROR (-DUK_ERR_SYNTAX_ERROR) +#define DUK_RET_TYPE_ERROR (-DUK_ERR_TYPE_ERROR) +#define DUK_RET_URI_ERROR (-DUK_ERR_URI_ERROR) + +/* Return codes for protected calls (duk_safe_call(), duk_pcall()) */ +#define DUK_EXEC_SUCCESS 0 +#define DUK_EXEC_ERROR 1 + +/* Debug levels for DUK_USE_DEBUG_WRITE(). */ +#define DUK_LEVEL_DEBUG 0 +#define DUK_LEVEL_DDEBUG 1 +#define DUK_LEVEL_DDDEBUG 2 + +/* + * Macros to create Symbols as C statically constructed strings. + * + * Call e.g. as DUK_HIDDEN_SYMBOL("myProperty") <=> ("\xFF" "myProperty"). + * + * Local symbols have a unique suffix, caller should take care to avoid + * conflicting with the Duktape internal representation by e.g. prepending + * a '!' character: DUK_LOCAL_SYMBOL("myLocal", "!123"). + * + * Note that these can only be used for string constants, not dynamically + * created strings. + * + * You shouldn't normally use DUK_INTERNAL_SYMBOL() at all. It is reserved + * for Duktape internal symbols only. There are no versioning guarantees + * for internal symbols. + */ + +#define DUK_HIDDEN_SYMBOL(x) ("\xFF" x) +#define DUK_GLOBAL_SYMBOL(x) ("\x80" x) +#define DUK_LOCAL_SYMBOL(x,uniq) ("\x81" x "\xff" uniq) +#define DUK_WELLKNOWN_SYMBOL(x) ("\x81" x "\xff") +#define DUK_INTERNAL_SYMBOL(x) ("\x82" x) + +/* + * If no variadic macros, __FILE__ and __LINE__ are passed through globals + * which is ugly and not thread safe. + */ + +#if !defined(DUK_API_VARIADIC_MACROS) +DUK_EXTERNAL_DECL const char *duk_api_global_filename; +DUK_EXTERNAL_DECL duk_int_t duk_api_global_line; +#endif + +/* + * Context management + */ + +DUK_EXTERNAL_DECL +duk_context *duk_create_heap(duk_alloc_function alloc_func, + duk_realloc_function realloc_func, + duk_free_function free_func, + void *heap_udata, + duk_fatal_function fatal_handler); +DUK_EXTERNAL_DECL void duk_destroy_heap(duk_context *ctx); + +DUK_EXTERNAL_DECL void duk_suspend(duk_context *ctx, duk_thread_state *state); +DUK_EXTERNAL_DECL void duk_resume(duk_context *ctx, const duk_thread_state *state); + +#define duk_create_heap_default() \ + duk_create_heap(NULL, NULL, NULL, NULL, NULL) + +/* + * Memory management + * + * Raw functions have no side effects (cannot trigger GC). + */ + +DUK_EXTERNAL_DECL void *duk_alloc_raw(duk_context *ctx, duk_size_t size); +DUK_EXTERNAL_DECL void duk_free_raw(duk_context *ctx, void *ptr); +DUK_EXTERNAL_DECL void *duk_realloc_raw(duk_context *ctx, void *ptr, duk_size_t size); +DUK_EXTERNAL_DECL void *duk_alloc(duk_context *ctx, duk_size_t size); +DUK_EXTERNAL_DECL void duk_free(duk_context *ctx, void *ptr); +DUK_EXTERNAL_DECL void *duk_realloc(duk_context *ctx, void *ptr, duk_size_t size); +DUK_EXTERNAL_DECL void duk_get_memory_functions(duk_context *ctx, duk_memory_functions *out_funcs); +DUK_EXTERNAL_DECL void duk_gc(duk_context *ctx, duk_uint_t flags); + +/* + * Error handling + */ + +DUK_API_NORETURN(DUK_EXTERNAL_DECL void duk_throw_raw(duk_context *ctx)); +#define duk_throw(ctx) \ + (duk_throw_raw((ctx)), (duk_ret_t) 0) +DUK_API_NORETURN(DUK_EXTERNAL_DECL void duk_fatal_raw(duk_context *ctx, const char *err_msg)); +#define duk_fatal(ctx,err_msg) \ + (duk_fatal_raw((ctx), (err_msg)), (duk_ret_t) 0) +DUK_API_NORETURN(DUK_EXTERNAL_DECL void duk_error_raw(duk_context *ctx, duk_errcode_t err_code, const char *filename, duk_int_t line, const char *fmt, ...)); + +#if defined(DUK_API_VARIADIC_MACROS) +#define duk_error(ctx,err_code,...) \ + (duk_error_raw((ctx), (duk_errcode_t) (err_code), (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), __VA_ARGS__), (duk_ret_t) 0) +#define duk_generic_error(ctx,...) \ + (duk_error_raw((ctx), (duk_errcode_t) DUK_ERR_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), __VA_ARGS__), (duk_ret_t) 0) +#define duk_eval_error(ctx,...) \ + (duk_error_raw((ctx), (duk_errcode_t) DUK_ERR_EVAL_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), __VA_ARGS__), (duk_ret_t) 0) +#define duk_range_error(ctx,...) \ + (duk_error_raw((ctx), (duk_errcode_t) DUK_ERR_RANGE_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), __VA_ARGS__), (duk_ret_t) 0) +#define duk_reference_error(ctx,...) \ + (duk_error_raw((ctx), (duk_errcode_t) DUK_ERR_REFERENCE_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), __VA_ARGS__), (duk_ret_t) 0) +#define duk_syntax_error(ctx,...) \ + (duk_error_raw((ctx), (duk_errcode_t) DUK_ERR_SYNTAX_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), __VA_ARGS__), (duk_ret_t) 0) +#define duk_type_error(ctx,...) \ + (duk_error_raw((ctx), (duk_errcode_t) DUK_ERR_TYPE_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), __VA_ARGS__), (duk_ret_t) 0) +#define duk_uri_error(ctx,...) \ + (duk_error_raw((ctx), (duk_errcode_t) DUK_ERR_URI_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), __VA_ARGS__), (duk_ret_t) 0) +#else /* DUK_API_VARIADIC_MACROS */ +/* For legacy compilers without variadic macros a macro hack is used to allow + * variable arguments. While the macro allows "return duk_error(...)", it + * will fail with e.g. "(void) duk_error(...)". The calls are noreturn but + * with a return value to allow the "return duk_error(...)" idiom. This may + * cause some compiler warnings, but without noreturn the generated code is + * often worse. The same approach as with variadic macros (using + * "(duk_error(...), 0)") won't work due to the macro hack structure. + */ +DUK_API_NORETURN(DUK_EXTERNAL_DECL duk_ret_t duk_error_stash(duk_context *ctx, duk_errcode_t err_code, const char *fmt, ...)); +DUK_API_NORETURN(DUK_EXTERNAL_DECL duk_ret_t duk_generic_error_stash(duk_context *ctx, const char *fmt, ...)); +DUK_API_NORETURN(DUK_EXTERNAL_DECL duk_ret_t duk_eval_error_stash(duk_context *ctx, const char *fmt, ...)); +DUK_API_NORETURN(DUK_EXTERNAL_DECL duk_ret_t duk_range_error_stash(duk_context *ctx, const char *fmt, ...)); +DUK_API_NORETURN(DUK_EXTERNAL_DECL duk_ret_t duk_reference_error_stash(duk_context *ctx, const char *fmt, ...)); +DUK_API_NORETURN(DUK_EXTERNAL_DECL duk_ret_t duk_syntax_error_stash(duk_context *ctx, const char *fmt, ...)); +DUK_API_NORETURN(DUK_EXTERNAL_DECL duk_ret_t duk_type_error_stash(duk_context *ctx, const char *fmt, ...)); +DUK_API_NORETURN(DUK_EXTERNAL_DECL duk_ret_t duk_uri_error_stash(duk_context *ctx, const char *fmt, ...)); +#define duk_error \ + (duk_api_global_filename = (const char *) (DUK_FILE_MACRO), \ + duk_api_global_line = (duk_int_t) (DUK_LINE_MACRO), \ + duk_error_stash) /* last value is func pointer, arguments follow in parens */ +#define duk_generic_error \ + (duk_api_global_filename = (const char *) (DUK_FILE_MACRO), \ + duk_api_global_line = (duk_int_t) (DUK_LINE_MACRO), \ + duk_generic_error_stash) +#define duk_eval_error \ + (duk_api_global_filename = (const char *) (DUK_FILE_MACRO), \ + duk_api_global_line = (duk_int_t) (DUK_LINE_MACRO), \ + duk_eval_error_stash) +#define duk_range_error \ + (duk_api_global_filename = (const char *) (DUK_FILE_MACRO), \ + duk_api_global_line = (duk_int_t) (DUK_LINE_MACRO), \ + duk_range_error_stash) +#define duk_reference_error \ + (duk_api_global_filename = (const char *) (DUK_FILE_MACRO), \ + duk_api_global_line = (duk_int_t) (DUK_LINE_MACRO), \ + duk_reference_error_stash) +#define duk_syntax_error \ + (duk_api_global_filename = (const char *) (DUK_FILE_MACRO), \ + duk_api_global_line = (duk_int_t) (DUK_LINE_MACRO), \ + duk_syntax_error_stash) +#define duk_type_error \ + (duk_api_global_filename = (const char *) (DUK_FILE_MACRO), \ + duk_api_global_line = (duk_int_t) (DUK_LINE_MACRO), \ + duk_type_error_stash) +#define duk_uri_error \ + (duk_api_global_filename = (const char *) (DUK_FILE_MACRO), \ + duk_api_global_line = (duk_int_t) (DUK_LINE_MACRO), \ + duk_uri_error_stash) +#endif /* DUK_API_VARIADIC_MACROS */ + +DUK_API_NORETURN(DUK_EXTERNAL_DECL void duk_error_va_raw(duk_context *ctx, duk_errcode_t err_code, const char *filename, duk_int_t line, const char *fmt, va_list ap)); + +#define duk_error_va(ctx,err_code,fmt,ap) \ + (duk_error_va_raw((ctx), (duk_errcode_t) (err_code), (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), (fmt), (ap)), (duk_ret_t) 0) +#define duk_generic_error_va(ctx,fmt,ap) \ + (duk_error_va_raw((ctx), (duk_errcode_t) DUK_ERR_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), (fmt), (ap)), (duk_ret_t) 0) +#define duk_eval_error_va(ctx,fmt,ap) \ + (duk_error_va_raw((ctx), (duk_errcode_t) DUK_ERR_EVAL_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), (fmt), (ap)), (duk_ret_t) 0) +#define duk_range_error_va(ctx,fmt,ap) \ + (duk_error_va_raw((ctx), (duk_errcode_t) DUK_ERR_RANGE_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), (fmt), (ap)), (duk_ret_t) 0) +#define duk_reference_error_va(ctx,fmt,ap) \ + (duk_error_va_raw((ctx), (duk_errcode_t) DUK_ERR_REFERENCE_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), (fmt), (ap)), (duk_ret_t) 0) +#define duk_syntax_error_va(ctx,fmt,ap) \ + (duk_error_va_raw((ctx), (duk_errcode_t) DUK_ERR_SYNTAX_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), (fmt), (ap)), (duk_ret_t) 0) +#define duk_type_error_va(ctx,fmt,ap) \ + (duk_error_va_raw((ctx), (duk_errcode_t) DUK_ERR_TYPE_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), (fmt), (ap)), (duk_ret_t) 0) +#define duk_uri_error_va(ctx,fmt,ap) \ + (duk_error_va_raw((ctx), (duk_errcode_t) DUK_ERR_URI_ERROR, (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), (fmt), (ap)), (duk_ret_t) 0) + +/* + * Other state related functions + */ + +DUK_EXTERNAL_DECL duk_bool_t duk_is_strict_call(duk_context *ctx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_constructor_call(duk_context *ctx); + +/* + * Stack management + */ + +DUK_EXTERNAL_DECL duk_idx_t duk_normalize_index(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_idx_t duk_require_normalize_index(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_valid_index(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_require_valid_index(duk_context *ctx, duk_idx_t idx); + +DUK_EXTERNAL_DECL duk_idx_t duk_get_top(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_set_top(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_idx_t duk_get_top_index(duk_context *ctx); +DUK_EXTERNAL_DECL duk_idx_t duk_require_top_index(duk_context *ctx); + +/* Although extra/top could be an unsigned type here, using a signed type + * makes the API more robust to calling code calculation errors or corner + * cases (where caller might occasionally come up with negative values). + * Negative values are treated as zero, which is better than casting them + * to a large unsigned number. (This principle is used elsewhere in the + * API too.) + */ +DUK_EXTERNAL_DECL duk_bool_t duk_check_stack(duk_context *ctx, duk_idx_t extra); +DUK_EXTERNAL_DECL void duk_require_stack(duk_context *ctx, duk_idx_t extra); +DUK_EXTERNAL_DECL duk_bool_t duk_check_stack_top(duk_context *ctx, duk_idx_t top); +DUK_EXTERNAL_DECL void duk_require_stack_top(duk_context *ctx, duk_idx_t top); + +/* + * Stack manipulation (other than push/pop) + */ + +DUK_EXTERNAL_DECL void duk_swap(duk_context *ctx, duk_idx_t idx1, duk_idx_t idx2); +DUK_EXTERNAL_DECL void duk_swap_top(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_dup(duk_context *ctx, duk_idx_t from_idx); +DUK_EXTERNAL_DECL void duk_dup_top(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_insert(duk_context *ctx, duk_idx_t to_idx); +DUK_EXTERNAL_DECL void duk_pull(duk_context *ctx, duk_idx_t from_idx); +DUK_EXTERNAL_DECL void duk_replace(duk_context *ctx, duk_idx_t to_idx); +DUK_EXTERNAL_DECL void duk_copy(duk_context *ctx, duk_idx_t from_idx, duk_idx_t to_idx); +DUK_EXTERNAL_DECL void duk_remove(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_xcopymove_raw(duk_context *to_ctx, duk_context *from_ctx, duk_idx_t count, duk_bool_t is_copy); + +#define duk_xmove_top(to_ctx,from_ctx,count) \ + duk_xcopymove_raw((to_ctx), (from_ctx), (count), 0 /*is_copy*/) +#define duk_xcopy_top(to_ctx,from_ctx,count) \ + duk_xcopymove_raw((to_ctx), (from_ctx), (count), 1 /*is_copy*/) + +/* + * Push operations + * + * Push functions return the absolute (relative to bottom of frame) + * position of the pushed value for convenience. + * + * Note: duk_dup() is technically a push. + */ + +DUK_EXTERNAL_DECL void duk_push_undefined(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_null(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_boolean(duk_context *ctx, duk_bool_t val); +DUK_EXTERNAL_DECL void duk_push_true(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_false(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_number(duk_context *ctx, duk_double_t val); +DUK_EXTERNAL_DECL void duk_push_nan(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_int(duk_context *ctx, duk_int_t val); +DUK_EXTERNAL_DECL void duk_push_uint(duk_context *ctx, duk_uint_t val); +DUK_EXTERNAL_DECL const char *duk_push_string(duk_context *ctx, const char *str); +DUK_EXTERNAL_DECL const char *duk_push_lstring(duk_context *ctx, const char *str, duk_size_t len); +DUK_EXTERNAL_DECL void duk_push_pointer(duk_context *ctx, void *p); +DUK_EXTERNAL_DECL const char *duk_push_sprintf(duk_context *ctx, const char *fmt, ...); +DUK_EXTERNAL_DECL const char *duk_push_vsprintf(duk_context *ctx, const char *fmt, va_list ap); + +/* duk_push_literal() may evaluate its argument (a C string literal) more than + * once on purpose. When speed is preferred, sizeof() avoids an unnecessary + * strlen() at runtime. Sizeof("foo") == 4, so subtract 1. The argument + * must be non-NULL and should not contain internal NUL characters as the + * behavior will then depend on config options. + */ +#if defined(DUK_USE_PREFER_SIZE) +#define duk_push_literal(ctx,cstring) duk_push_string((ctx), (cstring)) +#else +DUK_EXTERNAL_DECL const char *duk_push_literal_raw(duk_context *ctx, const char *str, duk_size_t len); +#define duk_push_literal(ctx,cstring) duk_push_literal_raw((ctx), (cstring), sizeof((cstring)) - 1U) +#endif + +DUK_EXTERNAL_DECL void duk_push_this(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_new_target(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_current_function(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_current_thread(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_global_object(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_heap_stash(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_global_stash(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_push_thread_stash(duk_context *ctx, duk_context *target_ctx); + +DUK_EXTERNAL_DECL duk_idx_t duk_push_object(duk_context *ctx); +DUK_EXTERNAL_DECL duk_idx_t duk_push_bare_object(duk_context *ctx); +DUK_EXTERNAL_DECL duk_idx_t duk_push_array(duk_context *ctx); +DUK_EXTERNAL_DECL duk_idx_t duk_push_bare_array(duk_context *ctx); +DUK_EXTERNAL_DECL duk_idx_t duk_push_c_function(duk_context *ctx, duk_c_function func, duk_idx_t nargs); +DUK_EXTERNAL_DECL duk_idx_t duk_push_c_lightfunc(duk_context *ctx, duk_c_function func, duk_idx_t nargs, duk_idx_t length, duk_int_t magic); +DUK_EXTERNAL_DECL duk_idx_t duk_push_thread_raw(duk_context *ctx, duk_uint_t flags); +DUK_EXTERNAL_DECL duk_idx_t duk_push_proxy(duk_context *ctx, duk_uint_t proxy_flags); + +#define duk_push_thread(ctx) \ + duk_push_thread_raw((ctx), 0 /*flags*/) + +#define duk_push_thread_new_globalenv(ctx) \ + duk_push_thread_raw((ctx), DUK_THREAD_NEW_GLOBAL_ENV /*flags*/) + +DUK_EXTERNAL_DECL duk_idx_t duk_push_error_object_raw(duk_context *ctx, duk_errcode_t err_code, const char *filename, duk_int_t line, const char *fmt, ...); + +#if defined(DUK_API_VARIADIC_MACROS) +#define duk_push_error_object(ctx,err_code,...) \ + duk_push_error_object_raw((ctx), (err_code), (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), __VA_ARGS__) +#else +DUK_EXTERNAL_DECL duk_idx_t duk_push_error_object_stash(duk_context *ctx, duk_errcode_t err_code, const char *fmt, ...); +/* Note: parentheses are required so that the comma expression works in assignments. */ +#define duk_push_error_object \ + (duk_api_global_filename = (const char *) (DUK_FILE_MACRO), \ + duk_api_global_line = (duk_int_t) (DUK_LINE_MACRO), \ + duk_push_error_object_stash) /* last value is func pointer, arguments follow in parens */ +#endif + +DUK_EXTERNAL_DECL duk_idx_t duk_push_error_object_va_raw(duk_context *ctx, duk_errcode_t err_code, const char *filename, duk_int_t line, const char *fmt, va_list ap); +#define duk_push_error_object_va(ctx,err_code,fmt,ap) \ + duk_push_error_object_va_raw((ctx), (err_code), (const char *) (DUK_FILE_MACRO), (duk_int_t) (DUK_LINE_MACRO), (fmt), (ap)) + +#define DUK_BUF_FLAG_DYNAMIC (1 << 0) /* internal flag: dynamic buffer */ +#define DUK_BUF_FLAG_EXTERNAL (1 << 1) /* internal flag: external buffer */ +#define DUK_BUF_FLAG_NOZERO (1 << 2) /* internal flag: don't zero allocated buffer */ + +DUK_EXTERNAL_DECL void *duk_push_buffer_raw(duk_context *ctx, duk_size_t size, duk_small_uint_t flags); + +#define duk_push_buffer(ctx,size,dynamic) \ + duk_push_buffer_raw((ctx), (size), (dynamic) ? DUK_BUF_FLAG_DYNAMIC : 0) +#define duk_push_fixed_buffer(ctx,size) \ + duk_push_buffer_raw((ctx), (size), 0 /*flags*/) +#define duk_push_dynamic_buffer(ctx,size) \ + duk_push_buffer_raw((ctx), (size), DUK_BUF_FLAG_DYNAMIC /*flags*/) +#define duk_push_external_buffer(ctx) \ + ((void) duk_push_buffer_raw((ctx), 0, DUK_BUF_FLAG_DYNAMIC | DUK_BUF_FLAG_EXTERNAL)) + +#define DUK_BUFOBJ_ARRAYBUFFER 0 +#define DUK_BUFOBJ_NODEJS_BUFFER 1 +#define DUK_BUFOBJ_DATAVIEW 2 +#define DUK_BUFOBJ_INT8ARRAY 3 +#define DUK_BUFOBJ_UINT8ARRAY 4 +#define DUK_BUFOBJ_UINT8CLAMPEDARRAY 5 +#define DUK_BUFOBJ_INT16ARRAY 6 +#define DUK_BUFOBJ_UINT16ARRAY 7 +#define DUK_BUFOBJ_INT32ARRAY 8 +#define DUK_BUFOBJ_UINT32ARRAY 9 +#define DUK_BUFOBJ_FLOAT32ARRAY 10 +#define DUK_BUFOBJ_FLOAT64ARRAY 11 + +DUK_EXTERNAL_DECL void duk_push_buffer_object(duk_context *ctx, duk_idx_t idx_buffer, duk_size_t byte_offset, duk_size_t byte_length, duk_uint_t flags); + +DUK_EXTERNAL_DECL duk_idx_t duk_push_heapptr(duk_context *ctx, void *ptr); + +/* + * Pop operations + */ + +DUK_EXTERNAL_DECL void duk_pop(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_pop_n(duk_context *ctx, duk_idx_t count); +DUK_EXTERNAL_DECL void duk_pop_2(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_pop_3(duk_context *ctx); + +/* + * Type checks + * + * duk_is_none(), which would indicate whether index it outside of stack, + * is not needed; duk_is_valid_index() gives the same information. + */ + +DUK_EXTERNAL_DECL duk_int_t duk_get_type(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_check_type(duk_context *ctx, duk_idx_t idx, duk_int_t type); +DUK_EXTERNAL_DECL duk_uint_t duk_get_type_mask(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_check_type_mask(duk_context *ctx, duk_idx_t idx, duk_uint_t mask); + +DUK_EXTERNAL_DECL duk_bool_t duk_is_undefined(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_null(duk_context *ctx, duk_idx_t idx); +#define duk_is_null_or_undefined(ctx, idx) \ + ((duk_get_type_mask((ctx), (idx)) & (DUK_TYPE_MASK_NULL | DUK_TYPE_MASK_UNDEFINED)) ? 1 : 0) + +DUK_EXTERNAL_DECL duk_bool_t duk_is_boolean(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_number(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_nan(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_string(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_object(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_buffer(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_buffer_data(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_pointer(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_lightfunc(duk_context *ctx, duk_idx_t idx); + +DUK_EXTERNAL_DECL duk_bool_t duk_is_symbol(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_array(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_function(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_c_function(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_ecmascript_function(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_bound_function(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_thread(duk_context *ctx, duk_idx_t idx); + +#define duk_is_callable(ctx,idx) \ + duk_is_function((ctx), (idx)) +DUK_EXTERNAL_DECL duk_bool_t duk_is_constructable(duk_context *ctx, duk_idx_t idx); + +DUK_EXTERNAL_DECL duk_bool_t duk_is_dynamic_buffer(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_fixed_buffer(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_is_external_buffer(duk_context *ctx, duk_idx_t idx); + +/* Buffers and lightfuncs are not considered primitive because they mimic + * objects and e.g. duk_to_primitive() will coerce them instead of returning + * them as is. Symbols are represented as strings internally. + */ +#define duk_is_primitive(ctx,idx) \ + duk_check_type_mask((ctx), (idx), DUK_TYPE_MASK_UNDEFINED | \ + DUK_TYPE_MASK_NULL | \ + DUK_TYPE_MASK_BOOLEAN | \ + DUK_TYPE_MASK_NUMBER | \ + DUK_TYPE_MASK_STRING | \ + DUK_TYPE_MASK_POINTER) + +/* Symbols are object coercible, covered by DUK_TYPE_MASK_STRING. */ +#define duk_is_object_coercible(ctx,idx) \ + duk_check_type_mask((ctx), (idx), DUK_TYPE_MASK_BOOLEAN | \ + DUK_TYPE_MASK_NUMBER | \ + DUK_TYPE_MASK_STRING | \ + DUK_TYPE_MASK_OBJECT | \ + DUK_TYPE_MASK_BUFFER | \ + DUK_TYPE_MASK_POINTER | \ + DUK_TYPE_MASK_LIGHTFUNC) + +DUK_EXTERNAL_DECL duk_errcode_t duk_get_error_code(duk_context *ctx, duk_idx_t idx); +#define duk_is_error(ctx,idx) \ + (duk_get_error_code((ctx), (idx)) != 0) +#define duk_is_eval_error(ctx,idx) \ + (duk_get_error_code((ctx), (idx)) == DUK_ERR_EVAL_ERROR) +#define duk_is_range_error(ctx,idx) \ + (duk_get_error_code((ctx), (idx)) == DUK_ERR_RANGE_ERROR) +#define duk_is_reference_error(ctx,idx) \ + (duk_get_error_code((ctx), (idx)) == DUK_ERR_REFERENCE_ERROR) +#define duk_is_syntax_error(ctx,idx) \ + (duk_get_error_code((ctx), (idx)) == DUK_ERR_SYNTAX_ERROR) +#define duk_is_type_error(ctx,idx) \ + (duk_get_error_code((ctx), (idx)) == DUK_ERR_TYPE_ERROR) +#define duk_is_uri_error(ctx,idx) \ + (duk_get_error_code((ctx), (idx)) == DUK_ERR_URI_ERROR) + +/* + * Get operations: no coercion, returns default value for invalid + * indices and invalid value types. + * + * duk_get_undefined() and duk_get_null() would be pointless and + * are not included. + */ + +DUK_EXTERNAL_DECL duk_bool_t duk_get_boolean(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_double_t duk_get_number(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_int_t duk_get_int(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_uint_t duk_get_uint(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL const char *duk_get_string(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL const char *duk_get_lstring(duk_context *ctx, duk_idx_t idx, duk_size_t *out_len); +DUK_EXTERNAL_DECL void *duk_get_buffer(duk_context *ctx, duk_idx_t idx, duk_size_t *out_size); +DUK_EXTERNAL_DECL void *duk_get_buffer_data(duk_context *ctx, duk_idx_t idx, duk_size_t *out_size); +DUK_EXTERNAL_DECL void *duk_get_pointer(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_c_function duk_get_c_function(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_context *duk_get_context(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void *duk_get_heapptr(duk_context *ctx, duk_idx_t idx); + +/* + * Get-with-explicit default operations: like get operations but with an + * explicit default value. + */ + +DUK_EXTERNAL_DECL duk_bool_t duk_get_boolean_default(duk_context *ctx, duk_idx_t idx, duk_bool_t def_value); +DUK_EXTERNAL_DECL duk_double_t duk_get_number_default(duk_context *ctx, duk_idx_t idx, duk_double_t def_value); +DUK_EXTERNAL_DECL duk_int_t duk_get_int_default(duk_context *ctx, duk_idx_t idx, duk_int_t def_value); +DUK_EXTERNAL_DECL duk_uint_t duk_get_uint_default(duk_context *ctx, duk_idx_t idx, duk_uint_t def_value); +DUK_EXTERNAL_DECL const char *duk_get_string_default(duk_context *ctx, duk_idx_t idx, const char *def_value); +DUK_EXTERNAL_DECL const char *duk_get_lstring_default(duk_context *ctx, duk_idx_t idx, duk_size_t *out_len, const char *def_ptr, duk_size_t def_len); +DUK_EXTERNAL_DECL void *duk_get_buffer_default(duk_context *ctx, duk_idx_t idx, duk_size_t *out_size, void *def_ptr, duk_size_t def_len); +DUK_EXTERNAL_DECL void *duk_get_buffer_data_default(duk_context *ctx, duk_idx_t idx, duk_size_t *out_size, void *def_ptr, duk_size_t def_len); +DUK_EXTERNAL_DECL void *duk_get_pointer_default(duk_context *ctx, duk_idx_t idx, void *def_value); +DUK_EXTERNAL_DECL duk_c_function duk_get_c_function_default(duk_context *ctx, duk_idx_t idx, duk_c_function def_value); +DUK_EXTERNAL_DECL duk_context *duk_get_context_default(duk_context *ctx, duk_idx_t idx, duk_context *def_value); +DUK_EXTERNAL_DECL void *duk_get_heapptr_default(duk_context *ctx, duk_idx_t idx, void *def_value); + +/* + * Opt operations: like require operations but with an explicit default value + * when value is undefined or index is invalid, null and non-matching types + * cause a TypeError. + */ + +DUK_EXTERNAL_DECL duk_bool_t duk_opt_boolean(duk_context *ctx, duk_idx_t idx, duk_bool_t def_value); +DUK_EXTERNAL_DECL duk_double_t duk_opt_number(duk_context *ctx, duk_idx_t idx, duk_double_t def_value); +DUK_EXTERNAL_DECL duk_int_t duk_opt_int(duk_context *ctx, duk_idx_t idx, duk_int_t def_value); +DUK_EXTERNAL_DECL duk_uint_t duk_opt_uint(duk_context *ctx, duk_idx_t idx, duk_uint_t def_value); +DUK_EXTERNAL_DECL const char *duk_opt_string(duk_context *ctx, duk_idx_t idx, const char *def_ptr); +DUK_EXTERNAL_DECL const char *duk_opt_lstring(duk_context *ctx, duk_idx_t idx, duk_size_t *out_len, const char *def_ptr, duk_size_t def_len); +DUK_EXTERNAL_DECL void *duk_opt_buffer(duk_context *ctx, duk_idx_t idx, duk_size_t *out_size, void *def_ptr, duk_size_t def_size); +DUK_EXTERNAL_DECL void *duk_opt_buffer_data(duk_context *ctx, duk_idx_t idx, duk_size_t *out_size, void *def_ptr, duk_size_t def_size); +DUK_EXTERNAL_DECL void *duk_opt_pointer(duk_context *ctx, duk_idx_t idx, void *def_value); +DUK_EXTERNAL_DECL duk_c_function duk_opt_c_function(duk_context *ctx, duk_idx_t idx, duk_c_function def_value); +DUK_EXTERNAL_DECL duk_context *duk_opt_context(duk_context *ctx, duk_idx_t idx, duk_context *def_value); +DUK_EXTERNAL_DECL void *duk_opt_heapptr(duk_context *ctx, duk_idx_t idx, void *def_value); + +/* + * Require operations: no coercion, throw error if index or type + * is incorrect. No defaulting. + */ + +#define duk_require_type_mask(ctx,idx,mask) \ + ((void) duk_check_type_mask((ctx), (idx), (mask) | DUK_TYPE_MASK_THROW)) + +DUK_EXTERNAL_DECL void duk_require_undefined(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_require_null(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_require_boolean(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_double_t duk_require_number(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_int_t duk_require_int(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_uint_t duk_require_uint(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL const char *duk_require_string(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL const char *duk_require_lstring(duk_context *ctx, duk_idx_t idx, duk_size_t *out_len); +DUK_EXTERNAL_DECL void duk_require_object(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void *duk_require_buffer(duk_context *ctx, duk_idx_t idx, duk_size_t *out_size); +DUK_EXTERNAL_DECL void *duk_require_buffer_data(duk_context *ctx, duk_idx_t idx, duk_size_t *out_size); +DUK_EXTERNAL_DECL void *duk_require_pointer(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_c_function duk_require_c_function(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_context *duk_require_context(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_require_function(duk_context *ctx, duk_idx_t idx); +#define duk_require_callable(ctx,idx) \ + duk_require_function((ctx), (idx)) +DUK_EXTERNAL_DECL void duk_require_constructor_call(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_require_constructable(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void *duk_require_heapptr(duk_context *ctx, duk_idx_t idx); + +/* Symbols are object coercible and covered by DUK_TYPE_MASK_STRING. */ +#define duk_require_object_coercible(ctx,idx) \ + ((void) duk_check_type_mask((ctx), (idx), DUK_TYPE_MASK_BOOLEAN | \ + DUK_TYPE_MASK_NUMBER | \ + DUK_TYPE_MASK_STRING | \ + DUK_TYPE_MASK_OBJECT | \ + DUK_TYPE_MASK_BUFFER | \ + DUK_TYPE_MASK_POINTER | \ + DUK_TYPE_MASK_LIGHTFUNC | \ + DUK_TYPE_MASK_THROW)) + +/* + * Coercion operations: in-place coercion, return coerced value where + * applicable. If index is invalid, throw error. Some coercions may + * throw an expected error (e.g. from a toString() or valueOf() call) + * or an internal error (e.g. from out of memory). + */ + +DUK_EXTERNAL_DECL void duk_to_undefined(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_to_null(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_bool_t duk_to_boolean(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_double_t duk_to_number(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_int_t duk_to_int(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_uint_t duk_to_uint(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_int32_t duk_to_int32(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_uint32_t duk_to_uint32(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_uint16_t duk_to_uint16(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL const char *duk_to_string(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL const char *duk_to_lstring(duk_context *ctx, duk_idx_t idx, duk_size_t *out_len); +DUK_EXTERNAL_DECL void *duk_to_buffer_raw(duk_context *ctx, duk_idx_t idx, duk_size_t *out_size, duk_uint_t flags); +DUK_EXTERNAL_DECL void *duk_to_pointer(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_to_object(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_to_primitive(duk_context *ctx, duk_idx_t idx, duk_int_t hint); + +#define DUK_BUF_MODE_FIXED 0 /* internal: request fixed buffer result */ +#define DUK_BUF_MODE_DYNAMIC 1 /* internal: request dynamic buffer result */ +#define DUK_BUF_MODE_DONTCARE 2 /* internal: don't care about fixed/dynamic nature */ + +#define duk_to_buffer(ctx,idx,out_size) \ + duk_to_buffer_raw((ctx), (idx), (out_size), DUK_BUF_MODE_DONTCARE) +#define duk_to_fixed_buffer(ctx,idx,out_size) \ + duk_to_buffer_raw((ctx), (idx), (out_size), DUK_BUF_MODE_FIXED) +#define duk_to_dynamic_buffer(ctx,idx,out_size) \ + duk_to_buffer_raw((ctx), (idx), (out_size), DUK_BUF_MODE_DYNAMIC) + +/* safe variants of a few coercion operations */ +DUK_EXTERNAL_DECL const char *duk_safe_to_lstring(duk_context *ctx, duk_idx_t idx, duk_size_t *out_len); +DUK_EXTERNAL_DECL const char *duk_to_stacktrace(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL const char *duk_safe_to_stacktrace(duk_context *ctx, duk_idx_t idx); +#define duk_safe_to_string(ctx,idx) \ + duk_safe_to_lstring((ctx), (idx), NULL) + +/* + * Value length + */ + +DUK_EXTERNAL_DECL duk_size_t duk_get_length(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_set_length(duk_context *ctx, duk_idx_t idx, duk_size_t len); +#if 0 +/* duk_require_length()? */ +/* duk_opt_length()? */ +#endif + +/* + * Misc conversion + */ + +DUK_EXTERNAL_DECL const char *duk_base64_encode(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_base64_decode(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL const char *duk_hex_encode(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_hex_decode(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL const char *duk_json_encode(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_json_decode(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_cbor_encode(duk_context *ctx, duk_idx_t idx, duk_uint_t encode_flags); +DUK_EXTERNAL_DECL void duk_cbor_decode(duk_context *ctx, duk_idx_t idx, duk_uint_t decode_flags); + +DUK_EXTERNAL_DECL const char *duk_buffer_to_string(duk_context *ctx, duk_idx_t idx); + +/* + * Buffer + */ + +DUK_EXTERNAL_DECL void *duk_resize_buffer(duk_context *ctx, duk_idx_t idx, duk_size_t new_size); +DUK_EXTERNAL_DECL void *duk_steal_buffer(duk_context *ctx, duk_idx_t idx, duk_size_t *out_size); +DUK_EXTERNAL_DECL void duk_config_buffer(duk_context *ctx, duk_idx_t idx, void *ptr, duk_size_t len); + +/* + * Property access + * + * The basic function assumes key is on stack. The _(l)string variant takes + * a C string as a property name; the _literal variant takes a C literal. + * The _index variant takes an array index as a property name (e.g. 123 is + * equivalent to the key "123"). The _heapptr variant takes a raw, borrowed + * heap pointer. + */ + +DUK_EXTERNAL_DECL duk_bool_t duk_get_prop(duk_context *ctx, duk_idx_t obj_idx); +DUK_EXTERNAL_DECL duk_bool_t duk_get_prop_string(duk_context *ctx, duk_idx_t obj_idx, const char *key); +DUK_EXTERNAL_DECL duk_bool_t duk_get_prop_lstring(duk_context *ctx, duk_idx_t obj_idx, const char *key, duk_size_t key_len); +#if defined(DUK_USE_PREFER_SIZE) +#define duk_get_prop_literal(ctx,obj_idx,key) duk_get_prop_string((ctx), (obj_idx), (key)) +#else +DUK_EXTERNAL_DECL duk_bool_t duk_get_prop_literal_raw(duk_context *ctx, duk_idx_t obj_idx, const char *key, duk_size_t key_len); +#define duk_get_prop_literal(ctx,obj_idx,key) duk_get_prop_literal_raw((ctx), (obj_idx), (key), sizeof((key)) - 1U) +#endif +DUK_EXTERNAL_DECL duk_bool_t duk_get_prop_index(duk_context *ctx, duk_idx_t obj_idx, duk_uarridx_t arr_idx); +DUK_EXTERNAL_DECL duk_bool_t duk_get_prop_heapptr(duk_context *ctx, duk_idx_t obj_idx, void *ptr); +DUK_EXTERNAL_DECL duk_bool_t duk_put_prop(duk_context *ctx, duk_idx_t obj_idx); +DUK_EXTERNAL_DECL duk_bool_t duk_put_prop_string(duk_context *ctx, duk_idx_t obj_idx, const char *key); +DUK_EXTERNAL_DECL duk_bool_t duk_put_prop_lstring(duk_context *ctx, duk_idx_t obj_idx, const char *key, duk_size_t key_len); +#if defined(DUK_USE_PREFER_SIZE) +#define duk_put_prop_literal(ctx,obj_idx,key) duk_put_prop_string((ctx), (obj_idx), (key)) +#else +DUK_EXTERNAL_DECL duk_bool_t duk_put_prop_literal_raw(duk_context *ctx, duk_idx_t obj_idx, const char *key, duk_size_t key_len); +#define duk_put_prop_literal(ctx,obj_idx,key) duk_put_prop_literal_raw((ctx), (obj_idx), (key), sizeof((key)) - 1U) +#endif +DUK_EXTERNAL_DECL duk_bool_t duk_put_prop_index(duk_context *ctx, duk_idx_t obj_idx, duk_uarridx_t arr_idx); +DUK_EXTERNAL_DECL duk_bool_t duk_put_prop_heapptr(duk_context *ctx, duk_idx_t obj_idx, void *ptr); +DUK_EXTERNAL_DECL duk_bool_t duk_del_prop(duk_context *ctx, duk_idx_t obj_idx); +DUK_EXTERNAL_DECL duk_bool_t duk_del_prop_string(duk_context *ctx, duk_idx_t obj_idx, const char *key); +DUK_EXTERNAL_DECL duk_bool_t duk_del_prop_lstring(duk_context *ctx, duk_idx_t obj_idx, const char *key, duk_size_t key_len); +#if defined(DUK_USE_PREFER_SIZE) +#define duk_del_prop_literal(ctx,obj_idx,key) duk_del_prop_string((ctx), (obj_idx), (key)) +#else +DUK_EXTERNAL_DECL duk_bool_t duk_del_prop_literal_raw(duk_context *ctx, duk_idx_t obj_idx, const char *key, duk_size_t key_len); +#define duk_del_prop_literal(ctx,obj_idx,key) duk_del_prop_literal_raw((ctx), (obj_idx), (key), sizeof((key)) - 1U) +#endif +DUK_EXTERNAL_DECL duk_bool_t duk_del_prop_index(duk_context *ctx, duk_idx_t obj_idx, duk_uarridx_t arr_idx); +DUK_EXTERNAL_DECL duk_bool_t duk_del_prop_heapptr(duk_context *ctx, duk_idx_t obj_idx, void *ptr); +DUK_EXTERNAL_DECL duk_bool_t duk_has_prop(duk_context *ctx, duk_idx_t obj_idx); +DUK_EXTERNAL_DECL duk_bool_t duk_has_prop_string(duk_context *ctx, duk_idx_t obj_idx, const char *key); +DUK_EXTERNAL_DECL duk_bool_t duk_has_prop_lstring(duk_context *ctx, duk_idx_t obj_idx, const char *key, duk_size_t key_len); +#if defined(DUK_USE_PREFER_SIZE) +#define duk_has_prop_literal(ctx,obj_idx,key) duk_has_prop_string((ctx), (obj_idx), (key)) +#else +DUK_EXTERNAL_DECL duk_bool_t duk_has_prop_literal_raw(duk_context *ctx, duk_idx_t obj_idx, const char *key, duk_size_t key_len); +#define duk_has_prop_literal(ctx,obj_idx,key) duk_has_prop_literal_raw((ctx), (obj_idx), (key), sizeof((key)) - 1U) +#endif +DUK_EXTERNAL_DECL duk_bool_t duk_has_prop_index(duk_context *ctx, duk_idx_t obj_idx, duk_uarridx_t arr_idx); +DUK_EXTERNAL_DECL duk_bool_t duk_has_prop_heapptr(duk_context *ctx, duk_idx_t obj_idx, void *ptr); + +DUK_EXTERNAL_DECL void duk_get_prop_desc(duk_context *ctx, duk_idx_t obj_idx, duk_uint_t flags); +DUK_EXTERNAL_DECL void duk_def_prop(duk_context *ctx, duk_idx_t obj_idx, duk_uint_t flags); + +DUK_EXTERNAL_DECL duk_bool_t duk_get_global_string(duk_context *ctx, const char *key); +DUK_EXTERNAL_DECL duk_bool_t duk_get_global_lstring(duk_context *ctx, const char *key, duk_size_t key_len); +#if defined(DUK_USE_PREFER_SIZE) +#define duk_get_global_literal(ctx,key) duk_get_global_string((ctx), (key)) +#else +DUK_EXTERNAL_DECL duk_bool_t duk_get_global_literal_raw(duk_context *ctx, const char *key, duk_size_t key_len); +#define duk_get_global_literal(ctx,key) duk_get_global_literal_raw((ctx), (key), sizeof((key)) - 1U) +#endif +DUK_EXTERNAL_DECL duk_bool_t duk_get_global_heapptr(duk_context *ctx, void *ptr); +DUK_EXTERNAL_DECL duk_bool_t duk_put_global_string(duk_context *ctx, const char *key); +DUK_EXTERNAL_DECL duk_bool_t duk_put_global_lstring(duk_context *ctx, const char *key, duk_size_t key_len); +#if defined(DUK_USE_PREFER_SIZE) +#define duk_put_global_literal(ctx,key) duk_put_global_string((ctx), (key)) +#else +DUK_EXTERNAL_DECL duk_bool_t duk_put_global_literal_raw(duk_context *ctx, const char *key, duk_size_t key_len); +#define duk_put_global_literal(ctx,key) duk_put_global_literal_raw((ctx), (key), sizeof((key)) - 1U) +#endif +DUK_EXTERNAL_DECL duk_bool_t duk_put_global_heapptr(duk_context *ctx, void *ptr); + +/* + * Inspection + */ + +DUK_EXTERNAL_DECL void duk_inspect_value(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_inspect_callstack_entry(duk_context *ctx, duk_int_t level); + +/* + * Object prototype + */ + +DUK_EXTERNAL_DECL void duk_get_prototype(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_set_prototype(duk_context *ctx, duk_idx_t idx); + +/* + * Object finalizer + */ + +DUK_EXTERNAL_DECL void duk_get_finalizer(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_set_finalizer(duk_context *ctx, duk_idx_t idx); + +/* + * Global object + */ + +DUK_EXTERNAL_DECL void duk_set_global_object(duk_context *ctx); + +/* + * Duktape/C function magic value + */ + +DUK_EXTERNAL_DECL duk_int_t duk_get_magic(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL void duk_set_magic(duk_context *ctx, duk_idx_t idx, duk_int_t magic); +DUK_EXTERNAL_DECL duk_int_t duk_get_current_magic(duk_context *ctx); + +/* + * Module helpers: put multiple function or constant properties + */ + +DUK_EXTERNAL_DECL void duk_put_function_list(duk_context *ctx, duk_idx_t obj_idx, const duk_function_list_entry *funcs); +DUK_EXTERNAL_DECL void duk_put_number_list(duk_context *ctx, duk_idx_t obj_idx, const duk_number_list_entry *numbers); + +/* + * Object operations + */ + +DUK_EXTERNAL_DECL void duk_compact(duk_context *ctx, duk_idx_t obj_idx); +DUK_EXTERNAL_DECL void duk_enum(duk_context *ctx, duk_idx_t obj_idx, duk_uint_t enum_flags); +DUK_EXTERNAL_DECL duk_bool_t duk_next(duk_context *ctx, duk_idx_t enum_idx, duk_bool_t get_value); +DUK_EXTERNAL_DECL void duk_seal(duk_context *ctx, duk_idx_t obj_idx); +DUK_EXTERNAL_DECL void duk_freeze(duk_context *ctx, duk_idx_t obj_idx); + +/* + * String manipulation + */ + +DUK_EXTERNAL_DECL void duk_concat(duk_context *ctx, duk_idx_t count); +DUK_EXTERNAL_DECL void duk_join(duk_context *ctx, duk_idx_t count); +DUK_EXTERNAL_DECL void duk_decode_string(duk_context *ctx, duk_idx_t idx, duk_decode_char_function callback, void *udata); +DUK_EXTERNAL_DECL void duk_map_string(duk_context *ctx, duk_idx_t idx, duk_map_char_function callback, void *udata); +DUK_EXTERNAL_DECL void duk_substring(duk_context *ctx, duk_idx_t idx, duk_size_t start_char_offset, duk_size_t end_char_offset); +DUK_EXTERNAL_DECL void duk_trim(duk_context *ctx, duk_idx_t idx); +DUK_EXTERNAL_DECL duk_codepoint_t duk_char_code_at(duk_context *ctx, duk_idx_t idx, duk_size_t char_offset); + +/* + * ECMAScript operators + */ + +DUK_EXTERNAL_DECL duk_bool_t duk_equals(duk_context *ctx, duk_idx_t idx1, duk_idx_t idx2); +DUK_EXTERNAL_DECL duk_bool_t duk_strict_equals(duk_context *ctx, duk_idx_t idx1, duk_idx_t idx2); +DUK_EXTERNAL_DECL duk_bool_t duk_samevalue(duk_context *ctx, duk_idx_t idx1, duk_idx_t idx2); +DUK_EXTERNAL_DECL duk_bool_t duk_instanceof(duk_context *ctx, duk_idx_t idx1, duk_idx_t idx2); + +/* + * Random + */ + +DUK_EXTERNAL_DECL duk_double_t duk_random(duk_context *ctx); + +/* + * Function (method) calls + */ + +DUK_EXTERNAL_DECL void duk_call(duk_context *ctx, duk_idx_t nargs); +DUK_EXTERNAL_DECL void duk_call_method(duk_context *ctx, duk_idx_t nargs); +DUK_EXTERNAL_DECL void duk_call_prop(duk_context *ctx, duk_idx_t obj_idx, duk_idx_t nargs); +DUK_EXTERNAL_DECL duk_int_t duk_pcall(duk_context *ctx, duk_idx_t nargs); +DUK_EXTERNAL_DECL duk_int_t duk_pcall_method(duk_context *ctx, duk_idx_t nargs); +DUK_EXTERNAL_DECL duk_int_t duk_pcall_prop(duk_context *ctx, duk_idx_t obj_idx, duk_idx_t nargs); +DUK_EXTERNAL_DECL void duk_new(duk_context *ctx, duk_idx_t nargs); +DUK_EXTERNAL_DECL duk_int_t duk_pnew(duk_context *ctx, duk_idx_t nargs); +DUK_EXTERNAL_DECL duk_int_t duk_safe_call(duk_context *ctx, duk_safe_call_function func, void *udata, duk_idx_t nargs, duk_idx_t nrets); + +/* + * Thread management + */ + +/* There are currently no native functions to yield/resume, due to the internal + * limitations on coroutine handling. These will be added later. + */ + +/* + * Compilation and evaluation + */ + +DUK_EXTERNAL_DECL duk_int_t duk_eval_raw(duk_context *ctx, const char *src_buffer, duk_size_t src_length, duk_uint_t flags); +DUK_EXTERNAL_DECL duk_int_t duk_compile_raw(duk_context *ctx, const char *src_buffer, duk_size_t src_length, duk_uint_t flags); + +/* plain */ +#define duk_eval(ctx) \ + ((void) duk_eval_raw((ctx), NULL, 0, 1 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_NOFILENAME)) + +#define duk_eval_noresult(ctx) \ + ((void) duk_eval_raw((ctx), NULL, 0, 1 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_NORESULT | DUK_COMPILE_NOFILENAME)) + +#define duk_peval(ctx) \ + (duk_eval_raw((ctx), NULL, 0, 1 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_SAFE | DUK_COMPILE_NOFILENAME)) + +#define duk_peval_noresult(ctx) \ + (duk_eval_raw((ctx), NULL, 0, 1 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_SAFE | DUK_COMPILE_NORESULT | DUK_COMPILE_NOFILENAME)) + +#define duk_compile(ctx,flags) \ + ((void) duk_compile_raw((ctx), NULL, 0, 2 /*args*/ | (flags))) + +#define duk_pcompile(ctx,flags) \ + (duk_compile_raw((ctx), NULL, 0, 2 /*args*/ | (flags) | DUK_COMPILE_SAFE)) + +/* string */ +#define duk_eval_string(ctx,src) \ + ((void) duk_eval_raw((ctx), (src), 0, 0 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_NOSOURCE | DUK_COMPILE_STRLEN | DUK_COMPILE_NOFILENAME)) + +#define duk_eval_string_noresult(ctx,src) \ + ((void) duk_eval_raw((ctx), (src), 0, 0 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_NOSOURCE | DUK_COMPILE_STRLEN | DUK_COMPILE_NORESULT | DUK_COMPILE_NOFILENAME)) + +#define duk_peval_string(ctx,src) \ + (duk_eval_raw((ctx), (src), 0, 0 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_SAFE | DUK_COMPILE_NOSOURCE | DUK_COMPILE_STRLEN | DUK_COMPILE_NOFILENAME)) + +#define duk_peval_string_noresult(ctx,src) \ + (duk_eval_raw((ctx), (src), 0, 0 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_SAFE | DUK_COMPILE_NOSOURCE | DUK_COMPILE_STRLEN | DUK_COMPILE_NORESULT | DUK_COMPILE_NOFILENAME)) + +#define duk_compile_string(ctx,flags,src) \ + ((void) duk_compile_raw((ctx), (src), 0, 0 /*args*/ | (flags) | DUK_COMPILE_NOSOURCE | DUK_COMPILE_STRLEN | DUK_COMPILE_NOFILENAME)) + +#define duk_compile_string_filename(ctx,flags,src) \ + ((void) duk_compile_raw((ctx), (src), 0, 1 /*args*/ | (flags) | DUK_COMPILE_NOSOURCE | DUK_COMPILE_STRLEN)) + +#define duk_pcompile_string(ctx,flags,src) \ + (duk_compile_raw((ctx), (src), 0, 0 /*args*/ | (flags) | DUK_COMPILE_SAFE | DUK_COMPILE_NOSOURCE | DUK_COMPILE_STRLEN | DUK_COMPILE_NOFILENAME)) + +#define duk_pcompile_string_filename(ctx,flags,src) \ + (duk_compile_raw((ctx), (src), 0, 1 /*args*/ | (flags) | DUK_COMPILE_SAFE | DUK_COMPILE_NOSOURCE | DUK_COMPILE_STRLEN)) + +/* lstring */ +#define duk_eval_lstring(ctx,buf,len) \ + ((void) duk_eval_raw((ctx), buf, len, 0 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_NOSOURCE | DUK_COMPILE_NOFILENAME)) + +#define duk_eval_lstring_noresult(ctx,buf,len) \ + ((void) duk_eval_raw((ctx), buf, len, 0 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_NOSOURCE | DUK_COMPILE_NORESULT | DUK_COMPILE_NOFILENAME)) + +#define duk_peval_lstring(ctx,buf,len) \ + (duk_eval_raw((ctx), buf, len, 0 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_NOSOURCE | DUK_COMPILE_SAFE | DUK_COMPILE_NOFILENAME)) + +#define duk_peval_lstring_noresult(ctx,buf,len) \ + (duk_eval_raw((ctx), buf, len, 0 /*args*/ | DUK_COMPILE_EVAL | DUK_COMPILE_SAFE | DUK_COMPILE_NOSOURCE | DUK_COMPILE_NORESULT | DUK_COMPILE_NOFILENAME)) + +#define duk_compile_lstring(ctx,flags,buf,len) \ + ((void) duk_compile_raw((ctx), buf, len, 0 /*args*/ | (flags) | DUK_COMPILE_NOSOURCE | DUK_COMPILE_NOFILENAME)) + +#define duk_compile_lstring_filename(ctx,flags,buf,len) \ + ((void) duk_compile_raw((ctx), buf, len, 1 /*args*/ | (flags) | DUK_COMPILE_NOSOURCE)) + +#define duk_pcompile_lstring(ctx,flags,buf,len) \ + (duk_compile_raw((ctx), buf, len, 0 /*args*/ | (flags) | DUK_COMPILE_SAFE | DUK_COMPILE_NOSOURCE | DUK_COMPILE_NOFILENAME)) + +#define duk_pcompile_lstring_filename(ctx,flags,buf,len) \ + (duk_compile_raw((ctx), buf, len, 1 /*args*/ | (flags) | DUK_COMPILE_SAFE | DUK_COMPILE_NOSOURCE)) + +/* + * Bytecode load/dump + */ + +DUK_EXTERNAL_DECL void duk_dump_function(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_load_function(duk_context *ctx); + +/* + * Debugging + */ + +DUK_EXTERNAL_DECL void duk_push_context_dump(duk_context *ctx); + +/* + * Debugger (debug protocol) + */ + +DUK_EXTERNAL_DECL void duk_debugger_attach(duk_context *ctx, + duk_debug_read_function read_cb, + duk_debug_write_function write_cb, + duk_debug_peek_function peek_cb, + duk_debug_read_flush_function read_flush_cb, + duk_debug_write_flush_function write_flush_cb, + duk_debug_request_function request_cb, + duk_debug_detached_function detached_cb, + void *udata); +DUK_EXTERNAL_DECL void duk_debugger_detach(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_debugger_cooperate(duk_context *ctx); +DUK_EXTERNAL_DECL duk_bool_t duk_debugger_notify(duk_context *ctx, duk_idx_t nvalues); +DUK_EXTERNAL_DECL void duk_debugger_pause(duk_context *ctx); + +/* + * Time handling + */ + +DUK_EXTERNAL_DECL duk_double_t duk_get_now(duk_context *ctx); +DUK_EXTERNAL_DECL void duk_time_to_components(duk_context *ctx, duk_double_t timeval, duk_time_components *comp); +DUK_EXTERNAL_DECL duk_double_t duk_components_to_time(duk_context *ctx, duk_time_components *comp); + +/* + * Date provider related constants + * + * NOTE: These are "semi public" - you should only use these if you write + * your own platform specific Date provider, see doc/datetime.rst. + */ + +/* Millisecond count constants. */ +#define DUK_DATE_MSEC_SECOND 1000L +#define DUK_DATE_MSEC_MINUTE (60L * 1000L) +#define DUK_DATE_MSEC_HOUR (60L * 60L * 1000L) +#define DUK_DATE_MSEC_DAY (24L * 60L * 60L * 1000L) + +/* ECMAScript date range is 100 million days from Epoch: + * > 100e6 * 24 * 60 * 60 * 1000 // 100M days in millisecs + * 8640000000000000 + * (= 8.64e15) + */ +#define DUK_DATE_MSEC_100M_DAYS (8.64e15) +#define DUK_DATE_MSEC_100M_DAYS_LEEWAY (8.64e15 + 24 * 3600e3) + +/* ECMAScript year range: + * > new Date(100e6 * 24 * 3600e3).toISOString() + * '+275760-09-13T00:00:00.000Z' + * > new Date(-100e6 * 24 * 3600e3).toISOString() + * '-271821-04-20T00:00:00.000Z' + */ +#define DUK_DATE_MIN_ECMA_YEAR (-271821L) +#define DUK_DATE_MAX_ECMA_YEAR 275760L + +/* Part indices for internal breakdowns. Part order from DUK_DATE_IDX_YEAR + * to DUK_DATE_IDX_MILLISECOND matches argument ordering of ECMAScript API + * calls (like Date constructor call). Some functions in duk_bi_date.c + * depend on the specific ordering, so change with care. 16 bits are not + * enough for all parts (year, specifically). + * + * Must be in-sync with genbuiltins.py. + */ +#define DUK_DATE_IDX_YEAR 0 /* year */ +#define DUK_DATE_IDX_MONTH 1 /* month: 0 to 11 */ +#define DUK_DATE_IDX_DAY 2 /* day within month: 0 to 30 */ +#define DUK_DATE_IDX_HOUR 3 +#define DUK_DATE_IDX_MINUTE 4 +#define DUK_DATE_IDX_SECOND 5 +#define DUK_DATE_IDX_MILLISECOND 6 +#define DUK_DATE_IDX_WEEKDAY 7 /* weekday: 0 to 6, 0=sunday, 1=monday, etc */ +#define DUK_DATE_IDX_NUM_PARTS 8 + +/* Internal API call flags, used for various functions in duk_bi_date.c. + * Certain flags are used by only certain functions, but since the flags + * don't overlap, a single flags value can be passed around to multiple + * functions. + * + * The unused top bits of the flags field are also used to pass values + * to helpers (duk__get_part_helper() and duk__set_part_helper()). + * + * Must be in-sync with genbuiltins.py. + */ + +/* NOTE: when writing a Date provider you only need a few specific + * flags from here, the rest are internal. Avoid using anything you + * don't need. + */ + +#define DUK_DATE_FLAG_NAN_TO_ZERO (1 << 0) /* timeval breakdown: internal time value NaN -> zero */ +#define DUK_DATE_FLAG_NAN_TO_RANGE_ERROR (1 << 1) /* timeval breakdown: internal time value NaN -> RangeError (toISOString) */ +#define DUK_DATE_FLAG_ONEBASED (1 << 2) /* timeval breakdown: convert month and day-of-month parts to one-based (default is zero-based) */ +#define DUK_DATE_FLAG_EQUIVYEAR (1 << 3) /* timeval breakdown: replace year with equivalent year in the [1971,2037] range for DST calculations */ +#define DUK_DATE_FLAG_LOCALTIME (1 << 4) /* convert time value to local time */ +#define DUK_DATE_FLAG_SUB1900 (1 << 5) /* getter: subtract 1900 from year when getting year part */ +#define DUK_DATE_FLAG_TOSTRING_DATE (1 << 6) /* include date part in string conversion result */ +#define DUK_DATE_FLAG_TOSTRING_TIME (1 << 7) /* include time part in string conversion result */ +#define DUK_DATE_FLAG_TOSTRING_LOCALE (1 << 8) /* use locale specific formatting if available */ +#define DUK_DATE_FLAG_TIMESETTER (1 << 9) /* setter: call is a time setter (affects hour, min, sec, ms); otherwise date setter (affects year, month, day-in-month) */ +#define DUK_DATE_FLAG_YEAR_FIXUP (1 << 10) /* setter: perform 2-digit year fixup (00...99 -> 1900...1999) */ +#define DUK_DATE_FLAG_SEP_T (1 << 11) /* string conversion: use 'T' instead of ' ' as a separator */ +#define DUK_DATE_FLAG_VALUE_SHIFT 12 /* additional values begin at bit 12 */ + +/* + * ROM pointer compression + */ + +/* Support array for ROM pointer compression. Only declared when ROM + * pointer compression is active. + */ +#if defined(DUK_USE_ROM_OBJECTS) && defined(DUK_USE_HEAPPTR16) +DUK_EXTERNAL_DECL const void * const duk_rom_compressed_pointers[]; +#endif + +/* + * C++ name mangling + */ + +#if defined(__cplusplus) +/* end 'extern "C"' wrapper */ +} +#endif + +/* + * END PUBLIC API + */ + +#endif /* DUKTAPE_H_INCLUDED */ diff --git a/kernel/src/lib/elk/elk.c b/kernel/src/lib/elk/elk.c new file mode 100644 index 000000000..05484e3a6 --- /dev/null +++ b/kernel/src/lib/elk/elk.c @@ -0,0 +1,1616 @@ +#include "common.h" +#include "portability.h" +#include "lib/string.h" +#include +#include +#include +#include + +#include "elk_config.h" +#include "elk.h" + +#ifndef JS_EXPR_MAX +#define JS_EXPR_MAX 20 +#endif + +#ifndef JS_GC_THRESHOLD +#define JS_GC_THRESHOLD 0.75 +#endif + + + +static const char *typestr(uint8_t t) { + const char *names[] = { "object", "prop", "string", "undefined", "null", + "number", "boolean", "function", "coderef", + "cfunc", "err", "nan" }; + return (t < sizeof(names) / sizeof(names[0])) ? names[t] : "??"; +} + +// Pack JS values into uin64_t, double nan, per IEEE 754 +// 64bit "double": 1 bit sign, 11 bits exponent, 52 bits mantissa +// +// seeeeeee|eeeemmmm|mmmmmmmm|mmmmmmmm|mmmmmmmm|mmmmmmmm|mmmmmmmm|mmmmmmmm +// 11111111|11110000|00000000|00000000|00000000|00000000|00000000|00000000 inf +// 11111111|11111000|00000000|00000000|00000000|00000000|00000000|00000000 qnan +// +// 11111111|1111tttt|vvvvvvvv|vvvvvvvv|vvvvvvvv|vvvvvvvv|vvvvvvvv|vvvvvvvv +// NaN marker |type| 48-bit placeholder for values: pointers, strings +// +// On 64-bit platforms, pointers are really 48 bit only, so they can fit, +// provided they are sign extended + +static void js_printPos(struct js *js) { + size_t line = 1; + bool lastStop = false; + size_t endLine = 0; + char* buf = js->code; + if (js->toff < js->incSize) { + qemu_err("[JSE] [Error] Library parsing..."); + return; + } + for (int i = js->incSize; i < js->clen; i++) { + //qemu_log("[%d > %d] Line:%d | `%c`",i, js->toff, line, buf[i]); + if (i > js->toff) lastStop = true; + if (buf[i] == '\n' && lastStop) { + endLine = i; + break; + } else if (buf[i] == '\n' && !lastStop) { + line++; + } + } + + char* t_dump = calloc(1, (endLine - js->toff) + 1); + + memcpy(t_dump, buf + js->toff, endLine - js->toff); + + jse_trim(t_dump); + + qemu_err("[JSE] [Error] Line %d: %s", line + js->paramSize, t_dump); + kfree(t_dump); +} + +static void elk_dump(struct js *js) { + qemu_note("[JSE] Engine dump:"); + qemu_note(" |--- Maximum view RAM | %d",js->css); + qemu_note(" |--- Low WaterMark | %d",js->lwm); + qemu_note(" |--- Is fatal | %d",js->isFatal); + qemu_note(" |--- Last token | %d",js->tok); + qemu_note(" |--- Consumed | %d",js->consumed); + qemu_note(" |--- Flags | %x",js->flags); + qemu_note(" |--- Length code | %d",js->clen); + qemu_note(" |--- Position code | %d",js->pos); + qemu_note(" |--- Last position token (offset) | %d",js->toff); + qemu_note(" |--- Last position token (len) | %d",js->tlen); + qemu_note(" |--- Scope | %d",js->scope); + qemu_note(" |--- Size | %d",js->size); + qemu_note(" |--- brk | %d",js->brk); + qemu_note(" |--- gct | %d",js->gct); + qemu_note(" |--- Max RAM JS | %d",js->maxcss); +} + +static void setlwm(struct js *js) { + jsoff_t n = 0, css = 0; + if (js->brk < js->size) n = js->size - js->brk; + if (js->lwm > n) js->lwm = n; + if ((char *) js->cstk > (char *) &n) + css = (jsoff_t) ((char *) js->cstk - (char *) &n); + if (css > js->css) js->css = css; +} + +// Copy src to dst, make no overflows, 0-terminate. Return bytes copied +static size_t cpy(char *dst, size_t dstlen, const char *src, size_t srclen) { + size_t i = 0; + for (i = 0; i < dstlen && i < srclen && src[i] != 0; i++) dst[i] = src[i]; + if (dstlen > 0) dst[i < dstlen ? i : dstlen - 1] = '\0'; + return i; +} + +// Stringify JS object +static size_t js_getObjLite(struct js *js, jsval_t obj, char *buf, size_t len) { + qemu_log("[JSE] js_getObjLite Len:%d", len); + size_t n = cpy(buf, len, "{", 1); + jsoff_t next = loadoff(js, (jsoff_t) vdata(obj)) & ~3U; // First prop offset + while (next < js->brk && next != 0) { // Iterate over props + + //qemu_log("[JSE] STROBJ %d < %d && %d != 0", next , js->brk , next); + jsoff_t koff = loadoff(js, next + (jsoff_t) sizeof(next)); + jsval_t val = loadval(js, next + (jsoff_t) (sizeof(next) + sizeof(koff))); + // printf("PROP %u, koff %u\n", next & ~3, koff); + n += cpy(buf + n, len - n, ",", n == 1 ? 0 : 1); + n += tostr(js, mkval(T_STR, koff), buf + n, len - n); + n += cpy(buf + n, len - n, ":", 1); + if (js_type(val) == JS_NUM) { + //qemu_note("is number"); + n += tostr(js, val, buf + n, len - n); + } else { + //qemu_note("is NO numer"); + n += tostr(js, val, buf + n, len - n); + } + next = loadoff(js, next) & ~3U; // Load next prop offset + //qemu_log(" |-- STROBJ NEXT (n:%d)(%d) %s", n, strlen(buf), buf); + } + return n + cpy(buf + n, len - n, "}", 1); +} + +// Stringify JS object +static size_t strobj(struct js *js, jsval_t obj, char *buf, size_t len) { + qemu_log("[JSE] STROBJ Len:%d", len); + size_t n = cpy(buf, len, "{", 1); + jsoff_t next = loadoff(js, (jsoff_t) vdata(obj)) & ~3U; // First prop offset + while (next < js->brk && next != 0) { // Iterate over props + + //qemu_log("[JSE] STROBJ %d < %d && %d != 0", next , js->brk , next); + jsoff_t koff = loadoff(js, next + (jsoff_t) sizeof(next)); + jsval_t val = loadval(js, next + (jsoff_t) (sizeof(next) + sizeof(koff))); + // printf("PROP %u, koff %u\n", next & ~3, koff); + n += cpy(buf + n, len - n, ",", n == 1 ? 0 : 1); + n += cpy(buf + n, len - n, "\"", 1); + n += tostr(js, mkval(T_STR, koff), buf + n, len - n); + n += cpy(buf + n, len - n, "\"", 1); + n += cpy(buf + n, len - n, ":", 1); + n += cpy(buf + n, len - n, "\"", 1); + if (js_type(val) == JS_NUM) { + //qemu_note("is number"); + n += tostr(js, val, buf + n, len - n); + n += cpy(buf + n - 1, len - n, "\"", 1); + } else { + //qemu_note("is NO numer"); + n += tostr(js, val, buf + n, len - n); + n += cpy(buf + n, len - n, "\"", 1); + } + next = loadoff(js, next) & ~3U; // Load next prop offset + //qemu_log(" |-- STROBJ NEXT (n:%d)(%d) %s", n, strlen(buf), buf); + } + for (int i = 0; i < n; i++) { + if (buf[i] == 0x0) buf[i] = ' '; + //qemu_log("[%d] %x | %c",i, buf[i], buf[i]); + } + qemu_log("[JSE] STROBJ RETURn %d", len); + return n + cpy(buf + n, len - n, "}", 1); +} + +// Stringify numeric JS value +// Во время тестов вызывался только когда требовался result +static size_t strnum(jsval_t value, char *buf, size_t len) { + double_t dv = tod2(value), iv; + return (size_t) snprintf(buf, len, "%d", dv); +} + +// Return mem offset and length of the JS string +static jsoff_t vstr(struct js *js, jsval_t value, jsoff_t *len) { + jsoff_t off = (jsoff_t) vdata(value); + if (len) *len = offtolen(loadoff(js, off)); + return (jsoff_t) (off + sizeof(off)); +} + +// Stringify string JS value +static size_t strstring(struct js *js, jsval_t value, char *buf, size_t len) { + jsoff_t slen, off = vstr(js, value, &slen); + size_t n = 0; + //n += cpy(buf + n, len - n, "\"", 1); + n += cpy(buf + n, len - n, (char *) &js->mem[off], slen); + //n += cpy(buf + n, len - n, "\"", 1); + return n; +} + +// Stringify JS function +static size_t strfunc(struct js *js, jsval_t value, char *buf, size_t len) { + jsoff_t sn, off = vstr(js, value, &sn); + size_t n = cpy(buf, len, "function", 8); + return n + cpy(buf + n, len - n, (char *) &js->mem[off], sn); +} + +jsval_t js_mkerr(struct js *js, const char *xx, ...) { + js_printPos(js); + va_list ap; + size_t n = cpy(js->errmsg, sizeof(js->errmsg), "ERROR: ", 7); + va_start(ap, xx); + vsnprintf(js->errmsg + n, sizeof(js->errmsg) - n, xx, ap); + va_end(ap); + js->errmsg[sizeof(js->errmsg) - 1] = '\0'; + js->isFatal = 1; + js->pos = js->clen, js->tok = TOK_EOF, js->consumed = 0; // Jump to the end + return mkval(T_ERR, 0); +} + +// Stringify JS value into the given buffer +static size_t tostr(struct js *js, jsval_t value, char *buf, size_t len) { + switch (vtype(value)) { + case T_UNDEF: return cpy(buf, len, "undefined", 9); + case T_NULL: return cpy(buf, len, "null", 4); + case T_BOOL: return cpy(buf, len, vdata(value) & 1 ? "true" : "false", vdata(value) & 1 ? 4 : 5); + case T_OBJ: return strobj(js, value, buf, len); + case T_STR: return strstring(js, value, buf, len); + case T_NUM: return strnum(value, buf, len); + case T_FUNC: return strfunc(js, value, buf, len); + case T_CFUNC: return (size_t) snprintf(buf, len, "\"c_func_0x%lx\"", (unsigned long) vdata(value)); + case T_PROP: return (size_t) snprintf(buf, len, "PROP@%lu", (unsigned long) vdata(value)); + default: return (size_t) snprintf(buf, len, "VTYPE%d", vtype(value)); + } +} + +static int js_cmp(struct js *js, jsval_t a, jsval_t b) { + if (a == b) { + return 0; // Значения a и b равны + } else { + const char *a_str = js_str(js, a); + const char *b_str = js_str(js, b); + + if (strcmp(a_str, b_str) < 0) { + return -1; // Значение a меньше b + } else if (strcmp(a_str, b_str) > 0) { + return 1; // Значение a больше b + } else { + return 0; // Значения a и b равны + } + } + return 1; +} +#ifdef SAYORI_JSE_ARRAY_H +// Конвектировать объект в массив +JSE_ARRAY* js_getObjectToArray(struct js *js, jsval_t value) { + char *buf = (char *) &js->mem[js->brk + sizeof(jsoff_t)]; + size_t len, available = js->size - js->brk - sizeof(jsoff_t); + if (is_err(value)) return js->errmsg; + JSE_ARRAY* array = jse_array_link_create(); + if (js->brk + sizeof(jsoff_t) >= js->size) return array; + + jsoff_t next = loadoff(js, (jsoff_t) vdata(value)) & ~3U; // First prop offset + while (next < js->brk && next != 0) { // Iterate over props + jsoff_t koff = loadoff(js, next + (jsoff_t) sizeof(next)); + jsval_t val = loadval(js, next + (jsoff_t) (sizeof(next) + sizeof(koff))); + char* KEY = calloc(1, available + 1); + tostr(js, mkval(T_STR, koff), KEY, available); + char* VALUE = calloc(1, available + 1); + if (js_type(val) == JS_NUM) { + //qemu_note("is number"); + //tostr(js, val, VALUE, available); + jse_array_push(array, KEY, (JSE_ARRAY_VALUE){.int_value = js_getnum(val)}, JSE_ARRAY_TYPE_INT); + } else { + //qemu_note("is NO numer"); + tostr(js, val, VALUE, available); + jse_array_push(array, KEY, (JSE_ARRAY_VALUE){.str_value = jse_strdup(VALUE)}, JSE_ARRAY_TYPE_STRING); + } + free(KEY); + free(VALUE); + next = loadoff(js, next) & ~3U; // Load next prop offset + } + return array; +} +#endif //SAYORI_JSE_ARRAY_H + +// Stringify JS value into a free JS memory block +const char *js_str(struct js *js, jsval_t value) { + // Leave jsoff_t placeholder between js->brk and a stringify buffer, + // in case if next step is convert it into a JS variable + char *buf = (char *) &js->mem[js->brk + sizeof(jsoff_t)]; + size_t len, available = js->size - js->brk - sizeof(jsoff_t); + if (is_err(value)) return js->errmsg; + if (js->brk + sizeof(jsoff_t) >= js->size) return ""; + len = tostr(js, value, buf, available); + js_mkstr(js, NULL, len); + return buf; +} + +bool js_truthy(struct js *js, jsval_t v) { + uint8_t t = vtype(v); + + // qemu_warn("[js_truthy] v: %d | %f", tod2(v), tod2(v)); + return (t == T_BOOL && vdata(v) != 0) || (t == T_NUM && tod2(v) != 0.0) || + (t == T_OBJ || t == T_FUNC) || (t == T_STR && vstrlen(js, v) > 0); +} + +static jsoff_t js_alloc(struct js *js, size_t size) { + jsoff_t ofs = js->brk; + size = align32((jsoff_t) size); // 4-byte align, (n + k - 1) / k * k + if (js->brk + size > js->size) return ~(jsoff_t) 0; + js->brk += (jsoff_t) size; + return ofs; +} + +static jsval_t mkentity(struct js *js, jsoff_t b, const void *buf, size_t len) { + jsoff_t ofs = js_alloc(js, len + sizeof(b)); + if (ofs == (jsoff_t) ~0) return js_mkerr(js, "oom"); + memcpy(&js->mem[ofs], &b, sizeof(b)); + // Using memmove - in case we're stringifying data from the free JS mem + if (buf != NULL) memmove(&js->mem[ofs + sizeof(b)], buf, len); + if ((b & 3) == T_STR) js->mem[ofs + sizeof(b) + len - 1] = 0; // 0-terminate + // printf("MKE: %u @ %u type %d\n", js->brk - ofs, ofs, b & 3); + return mkval(b & 3, ofs); +} + +jsval_t js_mkstr(struct js *js, const void *ptr, size_t len) { + jsoff_t n = (jsoff_t) (len + 1); + // printf("MKSTR %u %u\n", n, js->brk); + return mkentity(js, (jsoff_t) ((n << 2) | T_STR), ptr, n); +} + +static jsval_t mkobj(struct js *js, jsoff_t parent) { + return mkentity(js, 0 | T_OBJ, &parent, sizeof(parent)); +} + +static jsval_t setprop(struct js *js, jsval_t obj, jsval_t k, jsval_t v) { + jsoff_t koff = (jsoff_t) vdata(k); // Key offset + jsoff_t b, head = (jsoff_t) vdata(obj); // Property list head + char buf[sizeof(koff) + sizeof(v)]; // Property memory layout + memcpy(&b, &js->mem[head], sizeof(b)); // Load current 1st prop offset + memcpy(buf, &koff, sizeof(koff)); // Initialize prop data: copy key + memcpy(buf + sizeof(koff), &v, sizeof(v)); // Copy value + jsoff_t brk = js->brk | T_OBJ; // New prop offset + memcpy(&js->mem[head], &brk, sizeof(brk)); // Repoint head to the new prop + return mkentity(js, (b & ~3U) | T_PROP, buf, sizeof(buf)); // Create new prop +} + +// Return T_OBJ/T_PROP/T_STR entity size based on the first word in memory +static inline jsoff_t esize(jsoff_t w) { + switch (w & 3U) { + case T_OBJ: return (jsoff_t) (sizeof(jsoff_t) + sizeof(jsoff_t)); + case T_PROP: return (jsoff_t) (sizeof(jsoff_t) + sizeof(jsoff_t) + sizeof(jsval_t)); + case T_STR: return (jsoff_t) (sizeof(jsoff_t) + align32(w >> 2U)); + default: return (jsoff_t) ~0U; + } +} + +static bool is_mem_entity(uint8_t t) { + return t == T_OBJ || t == T_PROP || t == T_STR || t == T_FUNC; +} + +#define GCMASK ~(((jsoff_t) ~0) >> 1) // Entity deletion marker +static void js_fixup_offsets(struct js *js, jsoff_t start, jsoff_t size) { + for (jsoff_t n, v, off = 0; off < js->brk; off += n) { // start from 0! + v = loadoff(js, off); + n = esize(v & ~GCMASK); + if (v & GCMASK) continue; // To be deleted, don't bother + if ((v & 3) != T_OBJ && (v & 3) != T_PROP) continue; + if (v > start) saveoff(js, off, v - size); + if ((v & 3) == T_OBJ) { + jsoff_t u = loadoff(js, (jsoff_t) (off + sizeof(jsoff_t))); + if (u > start) saveoff(js, (jsoff_t) (off + sizeof(jsoff_t)), u - size); + } + if ((v & 3) == T_PROP) { + jsoff_t koff = loadoff(js, (jsoff_t) (off + sizeof(off))); + if (koff > start) saveoff(js, (jsoff_t) (off + sizeof(off)), koff - size); + jsval_t val = loadval(js, (jsoff_t) (off + sizeof(off) + sizeof(off))); + if (is_mem_entity(vtype(val)) && vdata(val) > start) { + saveval(js, (jsoff_t) (off + sizeof(off) + sizeof(off)), + mkval(vtype(val), (unsigned long) (vdata(val) - size))); + } + } + } + // Fixup js->scope + jsoff_t off = (jsoff_t) vdata(js->scope); + if (off > start) js->scope = mkval(T_OBJ, off - size); + if (js->nogc >= start) js->nogc -= size; + // Fixup code that we're executing now, if required + if (js->code > (char *) js->mem && js->code - (char *) js->mem < js->size && + js->code - (char *) js->mem > start) { + js->code -= size; + // printf("GC-ing code under us!! %ld\n", js->code - (char *) js->mem); + } + // printf("FIXEDOFF %u %u\n", start, size); +} + +static void js_delete_marked_entities(struct js *js) { + for (jsoff_t n, v, off = 0; off < js->brk; off += n) { + v = loadoff(js, off); + n = esize(v & ~GCMASK); + if (v & GCMASK) { // This entity is marked for deletion, remove it + // printf("DEL: %4u %d %x\n", off, v & 3, n); + // assert(off + n <= js->brk); + js_fixup_offsets(js, off, n); + memmove(&js->mem[off], &js->mem[off + n], js->brk - off - n); + js->brk -= n; // Shrink brk boundary by the size of deleted entity + n = 0; // We shifted data, next iteration stay on this offset + } + } +} + +static void js_mark_all_entities_for_deletion(struct js *js) { + for (jsoff_t v, off = 0; off < js->brk; off += esize(v)) { + v = loadoff(js, off); + saveoff(js, off, v | GCMASK); + } +} + +static jsoff_t js_unmark_entity(struct js *js, jsoff_t off) { + jsoff_t v = loadoff(js, off); + if (v & GCMASK) { + saveoff(js, off, v & ~GCMASK); + // printf("UNMARK %5u %d\n", off, v & 3); + if ((v & 3) == T_OBJ) js_unmark_entity(js, v & ~(GCMASK | 3)); + if ((v & 3) == T_PROP) { + js_unmark_entity(js, v & ~(GCMASK | 3)); // Unmark next prop + js_unmark_entity(js, loadoff(js, (jsoff_t) (off + sizeof(off)))); // key + jsval_t val = loadval(js, (jsoff_t) (off + sizeof(off) + sizeof(off))); + if (is_mem_entity(vtype(val))) js_unmark_entity(js, (jsoff_t) vdata(val)); + } + } + return v & ~(GCMASK | 3U); +} + +static void js_unmark_used_entities(struct js *js) { + jsval_t scope = js->scope; + do { + js_unmark_entity(js, (jsoff_t) vdata(scope)); + scope = upper(js, scope); + } while (vdata(scope) != 0); // When global scope is GC-ed, stop + if (js->nogc) js_unmark_entity(js, js->nogc); + // printf("UNMARK: nogc %u\n", js->nogc); + // js_dump(js); +} + +void js_gc(struct js *js) { + // printf("================== GC %u\n", js->nogc); + setlwm(js); + if (js->nogc == (jsoff_t) ~0) return; // ~0 is a special case: GC Is disabled + js_mark_all_entities_for_deletion(js); + js_unmark_used_entities(js); + js_delete_marked_entities(js); +} + +// Skip whitespaces and comments +static jsoff_t skiptonext(const char *code, jsoff_t len, jsoff_t n) { + // printf("SKIP: [%.*s]\n", len - n, &code[n]); + while (n < len) { + if (is_space(code[n])) { + n++; + } else if (n + 1 < len && code[n] == '/' && code[n + 1] == '/') { + for (n += 2; n < len && code[n] != '\n';) n++; + } else if (n + 3 < len && code[n] == '/' && code[n + 1] == '*') { + for (n += 4; n < len && (code[n - 2] != '*' || code[n - 1] != '/');) n++; + } else { + break; + } + } + return n; +} + +static bool streq(const char *buf, size_t len, const char *p, size_t n) { + return n == len && memcmp(buf, p, len) == 0; +} + +static uint8_t parsekeyword(const char *buf, size_t len) { + switch (buf[0]) { + case 'b': if (streq("break", 5, buf, len)) return TOK_BREAK; break; + case 'c': if (streq("class", 5, buf, len)) return TOK_CLASS; if (streq("case", 4, buf, len)) return TOK_CASE; if (streq("catch", 5, buf, len)) return TOK_CATCH; if (streq("const", 5, buf, len)) return TOK_CONST; if (streq("continue", 8, buf, len)) return TOK_CONTINUE; break; + case 'd': if (streq("do", 2, buf, len)) return TOK_DO; if (streq("default", 7, buf, len)) return TOK_DEFAULT; break; // if (streq("delete", 6, buf, len)) return TOK_DELETE; break; + case 'e': if (streq("else", 4, buf, len)) return TOK_ELSE; break; + case 'f': if (streq("for", 3, buf, len)) return TOK_FOR; if (streq("function", 8, buf, len)) return TOK_FUNC; if (streq("finally", 7, buf, len)) return TOK_FINALLY; if (streq("false", 5, buf, len)) return TOK_FALSE; break; + case 'i': if (streq("if", 2, buf, len)) return TOK_IF; if (streq("in", 2, buf, len)) return TOK_IN; if (streq("instanceof", 10, buf, len)) return TOK_INSTANCEOF; break; + case 'l': if (streq("let", 3, buf, len)) return TOK_LET; break; + case 'n': if (streq("new", 3, buf, len)) return TOK_NEW; if (streq("null", 4, buf, len)) return TOK_NULL; break; + case 'r': if (streq("return", 6, buf, len)) return TOK_RETURN; break; + case 's': if (streq("switch", 6, buf, len)) return TOK_SWITCH; break; + case 't': if (streq("try", 3, buf, len)) return TOK_TRY; if (streq("this", 4, buf, len)) return TOK_THIS; if (streq("throw", 5, buf, len)) return TOK_THROW; if (streq("true", 4, buf, len)) return TOK_TRUE; if (streq("typeof", 6, buf, len)) return TOK_TYPEOF; break; + case 'u': if (streq("undefined", 9, buf, len)) return TOK_UNDEF; break; + case 'v': if (streq("var", 3, buf, len)) return TOK_VAR; if (streq("void", 4, buf, len)) return TOK_VOID; break; + case 'w': if (streq("while", 5, buf, len)) return TOK_WHILE; if (streq("with", 4, buf, len)) return TOK_WITH; break; + case 'y': if (streq("yield", 5, buf, len)) return TOK_YIELD; break; + } + return TOK_IDENTIFIER; +} + +static uint8_t parseident(const char *buf, jsoff_t len, jsoff_t *tlen) { + if (is_ident_begin(buf[0])) { + while (*tlen < len && is_ident_continue(buf[*tlen])) (*tlen)++; + return parsekeyword(buf, *tlen); + } + return TOK_ERR; +} + +static uint8_t next(struct js *js) { + if (js->consumed == 0) return js->tok; + js->consumed = 0; + js->tok = TOK_ERR; + js->toff = js->pos = skiptonext(js->code, js->clen, js->pos); + js->tlen = 0; + const char *buf = js->code + js->toff; + if (js->toff >= js->clen) { js->tok = TOK_EOF; return js->tok; } +#define TOK(T, LEN) { js->tok = T; js->tlen = (LEN); break; } +#define LOOK(OFS, CH) js->toff + OFS < js->clen && buf[OFS] == CH + switch (buf[0]) { + case '?': TOK(TOK_Q, 1); + case ':': TOK(TOK_COLON, 1); + case '(': TOK(TOK_LPAREN, 1); + case ')': TOK(TOK_RPAREN, 1); + case '{': TOK(TOK_LBRACE, 1); + case '}': TOK(TOK_RBRACE, 1); + case ';': TOK(TOK_SEMICOLON, 1); + case ',': TOK(TOK_COMMA, 1); + case '!': if (LOOK(1, '=') && LOOK(2, '=')) TOK(TOK_NE, 3); TOK(TOK_NOT, 1); + case '.': TOK(TOK_DOT, 1); + case '~': TOK(TOK_TILDA, 1); + case '-': if (LOOK(1, '-')) TOK(TOK_POSTDEC, 2); if (LOOK(1, '=')) TOK(TOK_MINUS_ASSIGN, 2); TOK(TOK_MINUS, 1); + case '+': if (LOOK(1, '+')) TOK(TOK_POSTINC, 2); if (LOOK(1, '=')) TOK(TOK_PLUS_ASSIGN, 2); TOK(TOK_PLUS, 1); + case '*': if (LOOK(1, '*')) TOK(TOK_EXP, 2); if (LOOK(1, '=')) TOK(TOK_MUL_ASSIGN, 2); TOK(TOK_MUL, 1); + case '/': if (LOOK(1, '=')) TOK(TOK_DIV_ASSIGN, 2); TOK(TOK_DIV, 1); + case '%': if (LOOK(1, '=')) TOK(TOK_REM_ASSIGN, 2); TOK(TOK_REM, 1); + case '&': if (LOOK(1, '&')) TOK(TOK_LAND, 2); if (LOOK(1, '=')) TOK(TOK_AND_ASSIGN, 2); TOK(TOK_AND, 1); + case '|': if (LOOK(1, '|')) TOK(TOK_LOR, 2); if (LOOK(1, '=')) TOK(TOK_OR_ASSIGN, 2); TOK(TOK_OR, 1); + case '=': if (LOOK(1, '=') && LOOK(2, '=')) TOK(TOK_EQ, 3); TOK(TOK_ASSIGN, 1); + case '<': if (LOOK(1, '<') && LOOK(2, '=')) TOK(TOK_SHL_ASSIGN, 3); if (LOOK(1, '<')) TOK(TOK_SHL, 2); if (LOOK(1, '=')) TOK(TOK_LE, 2); TOK(TOK_LT, 1); + case '>': if (LOOK(1, '>') && LOOK(2, '=')) TOK(TOK_SHR_ASSIGN, 3); if (LOOK(1, '>')) TOK(TOK_SHR, 2); if (LOOK(1, '=')) TOK(TOK_GE, 2); TOK(TOK_GT, 1); + case '^': if (LOOK(1, '=')) TOK(TOK_XOR_ASSIGN, 2); TOK(TOK_XOR, 1); + case '"': case '\'': + js->tlen++; + while (js->toff + js->tlen < js->clen && buf[js->tlen] != buf[0]) { + uint8_t increment = 1; + if (buf[js->tlen] == '\\') { + if (js->toff + js->tlen + 2 > js->clen) break; + increment = 2; + if (buf[js->tlen + 1] == 'x') { + if (js->toff + js->tlen + 4 > js->clen) break; + increment = 4; + } + } + js->tlen += increment; + } + if (buf[0] == buf[js->tlen]) js->tok = TOK_STRING, js->tlen++; + break; + case '0': case '1': case '2': case '3': case '4': case '5': case '6': case '7': case '8': case '9': { + char *end; + js->tval = tov2(jse_p_int(buf, &end)); // TODO(lsm): protect against OOB access + TOK(TOK_NUMBER, (jsoff_t) (end - buf)); + } + default: js->tok = parseident(buf, js->clen - js->toff, &js->tlen); break; + } + js->pos = js->toff + js->tlen; + //printf("NEXT: %d %d [%s]\n", js->tok, js->pos, (int) js->tlen, buf); + return js->tok; +} + +static inline uint8_t lookahead(struct js *js) { + uint8_t old = js->tok, tok = 0; + jsoff_t pos = js->pos; + js->consumed = 1; + tok = next(js); + js->pos = pos, js->tok = old; + return tok; +} + +static void mkscope(struct js *js) { + passert((js->flags & F_NOEXEC) == 0); + jsoff_t prev = (jsoff_t) vdata(js->scope); + js->scope = mkobj(js, prev); + // printf("ENTER SCOPE %u, prev %u\n", (jsoff_t) vdata(js->scope), prev); +} + +static void delscope(struct js *js) { + js->scope = upper(js, js->scope); + // printf("EXIT SCOPE %u\n", (jsoff_t) vdata(js->scope)); +} + +static jsval_t js_block(struct js *js, bool create_scope) { + jsval_t res = js_mkundef(); + if (create_scope) mkscope(js); // Enter new scope + js->consumed = 1; + // jsoff_t pos = js->pos; + while (next(js) != TOK_EOF && next(js) != TOK_RBRACE && !is_err(res)) { + uint8_t t = js->tok; + res = js_stmt(js); + if (!is_err(res) && t != TOK_LBRACE && t != TOK_IF && t != TOK_WHILE && + js->tok != TOK_SEMICOLON) { + res = js_mkerr(js, "; expected"); + break; + } + } + // printf("BLOCKEND %s\n", js_str(js, res)); + if (create_scope) delscope(js); // Exit scope + return res; +} + +// Seach for property in a single object +static jsoff_t lkp(struct js *js, jsval_t obj, const char *buf, size_t len) { + jsoff_t off = loadoff(js, (jsoff_t) vdata(obj)) & ~3U; // Load first prop off + // printf("LKP: %lu %u [%.*s]\n", vdata(obj), off, (int) len, buf); + while (off < js->brk && off != 0) { // Iterate over props + jsoff_t koff = loadoff(js, (jsoff_t) (off + sizeof(off))); + jsoff_t klen = (loadoff(js, koff) >> 2) - 1; + const char *p = (char *) &js->mem[koff + sizeof(koff)]; + // printf(" %u %u[%.*s]\n", off, (int) klen, (int) klen, p); + if (streq(buf, len, p, klen)) return off; // Found ! + off = loadoff(js, off) & ~3U; // Load next prop offset + } + return 0; // Not found +} + +// Lookup variable in the scope chain +static jsval_t lookup(struct js *js, const char *buf, size_t len) { + if (js->flags & F_NOEXEC) return 0; + for (jsval_t scope = js->scope;;) { + jsoff_t off = lkp(js, scope, buf, len); + if (off != 0) return mkval(T_PROP, off); + if (vdata(scope) == 0) break; + scope = + mkval(T_OBJ, loadoff(js, (jsoff_t) (vdata(scope) + sizeof(jsoff_t)))); + } + //js_printPos(js); + return js_mkerr(js, "'%.*s' not found", (int) len, buf); +} + +static jsval_t resolveprop(struct js *js, jsval_t v) { + if (vtype(v) != T_PROP) return v; + return resolveprop(js, + loadval(js, (jsoff_t) (vdata(v) + sizeof(jsoff_t) * 2))); +} + +static jsval_t assign(struct js *js, jsval_t lhs, jsval_t val) { + saveval(js, (jsoff_t) ((vdata(lhs) & ~3U) + sizeof(jsoff_t) * 2), val); + return lhs; +} + +static jsval_t do_assign_op(struct js *js, uint8_t op, jsval_t l, jsval_t r) { + uint8_t m[] = {TOK_PLUS, TOK_MINUS, TOK_MUL, TOK_DIV, TOK_REM, TOK_SHL, + TOK_SHR, TOK_ZSHR, TOK_AND, TOK_XOR, TOK_OR}; + jsval_t res = do_op(js, m[op - TOK_PLUS_ASSIGN], resolveprop(js, l), r); + return assign(js, l, res); +} + +static jsval_t do_string_op(struct js *js, uint8_t op, jsval_t l, jsval_t r) { + jsoff_t n1, off1 = vstr(js, l, &n1); + jsoff_t n2, off2 = vstr(js, r, &n2); + if (op == TOK_PLUS) { + jsval_t res = js_mkstr(js, NULL, n1 + n2); + // printf("STRPLUS %u %u %u %u [%.*s] [%.*s]\n", n1, off1, n2, off2, (int) + // n1, + // &js->mem[off1], (int) n2, &js->mem[off2]); + if (vtype(res) == T_STR) { + jsoff_t n, off = vstr(js, res, &n); + memmove(&js->mem[off], &js->mem[off1], n1); + memmove(&js->mem[off + n1], &js->mem[off2], n2); + } + return res; + } else if (op == TOK_EQ) { + bool eq = n1 == n2 && memcmp(&js->mem[off1], &js->mem[off2], n1) == 0; + return mkval(T_BOOL, eq ? 1 : 0); + } else if (op == TOK_NE) { + bool eq = n1 == n2 && memcmp(&js->mem[off1], &js->mem[off2], n1) == 0; + return mkval(T_BOOL, eq ? 0 : 1); + } else { + return js_mkerr(js, "bad str op"); + } +} + +static jsval_t do_dot_op(struct js *js, jsval_t l, jsval_t r) { + const char *ptr = (char *) &js->code[coderefoff(r)]; + if (vtype(r) != T_CODEREF) return js_mkerr(js, "ident expected"); + // Handle stringvalue.length + if (vtype(l) == T_STR && streq(ptr, codereflen(r), "length", 6)) { + // qemu_warn("[do_dot_op] [TOV] %d | %f", offtolen(loadoff(js, (jsoff_t) vdata(l))), offtolen(loadoff(js, (jsoff_t) vdata(l)))); + return tov2(offtolen(loadoff(js, (jsoff_t) vdata(l)))); + } + if (vtype(l) != T_OBJ) return js_mkerr(js, "lookup in non-obj"); + jsoff_t off = lkp(js, l, ptr, codereflen(r)); + return off == 0 ? js_mkundef() : mkval(T_PROP, off); +} + +static jsval_t js_call_params(struct js *js) { + jsoff_t pos = js->pos; + uint8_t flags = js->flags; + js->flags |= F_NOEXEC; + js->consumed = 1; + for (bool comma = false; next(js) != TOK_EOF; comma = true) { + if (!comma && next(js) == TOK_RPAREN) break; + js_expr(js); + if (next(js) == TOK_RPAREN) break; + EXPECT(TOK_COMMA, js->flags = flags); + } + EXPECT(TOK_RPAREN, js->flags = flags); + js->flags = flags; + return mkcoderef(pos, js->pos - pos - js->tlen); +} + +static void reverse(jsval_t *args, int nargs) { + for (int i = 0; i < nargs / 2; i++) { + jsval_t tmp = args[i]; + args[i] = args[nargs - i - 1], args[nargs - i - 1] = tmp; + } +} + +// Call native C function +static jsval_t call_c(struct js *js, + jsval_t (*fn)(struct js *, jsval_t *, int)) { + int argc = 0; + while (js->pos < js->clen) { + if (next(js) == TOK_RPAREN) break; + jsval_t arg = resolveprop(js, js_expr(js)); + if (js->brk + sizeof(arg) > js->size) return js_mkerr(js, "call oom"); + js->size -= (jsoff_t) sizeof(arg); + memcpy(&js->mem[js->size], &arg, sizeof(arg)); + argc++; + // printf(" arg %d -> %s\n", argc, js_str(js, arg)); + if (next(js) == TOK_COMMA) js->consumed = 1; + } + reverse((jsval_t *) &js->mem[js->size], argc); + jsval_t res = fn(js, (jsval_t *) &js->mem[js->size], argc); + setlwm(js); + js->size += (jsoff_t) sizeof(jsval_t) * (jsoff_t) argc; // Restore stack + return res; +} + + +// Call JS function. 'fn' looks like this: "(a,b) { return a + b; }" +static jsval_t call_js(struct js *js, const char *fn, jsoff_t fnlen) { + jsoff_t fnpos = 1; + // printf("JSCALL [%.*s] -> %.*s\n", (int) js->clen, js->code, (int) fnlen, + // fn); + // printf("JSCALL, nogc %u [%.*s]\n", js->nogc, (int) fnlen, fn); + mkscope(js); // Create function call scope + // Loop over arguments list "(a, b)" and set scope variables + while (fnpos < fnlen) { + fnpos = skiptonext(fn, fnlen, fnpos); // Skip to the identifier + if (fnpos < fnlen && fn[fnpos] == ')') break; // Closing paren? break! + jsoff_t identlen = 0; // Identifier length + uint8_t tok = parseident(&fn[fnpos], fnlen - fnpos, &identlen); + if (tok != TOK_IDENTIFIER) break; + // Here we have argument name. Calculate arg value + // printf(" [%.*s] -> %u [%.*s] -> ", (int) identlen, &fn[fnpos], js->pos, + // (int) js->clen, js->code); + js->pos = skiptonext(js->code, js->clen, js->pos); + js->consumed = 1; + jsval_t v = js->code[js->pos] == ')' ? js_mkundef() : js_expr(js); + // Set argument in the function scope + setprop(js, js->scope, js_mkstr(js, &fn[fnpos], identlen), v); + js->pos = skiptonext(js->code, js->clen, js->pos); + if (js->pos < js->clen && js->code[js->pos] == ',') js->pos++; + fnpos = skiptonext(fn, fnlen, fnpos + identlen); // Skip past identifier + if (fnpos < fnlen && fn[fnpos] == ',') fnpos++; // And skip comma + } + if (fnpos < fnlen && fn[fnpos] == ')') fnpos++; // Skip to the function body + fnpos = skiptonext(fn, fnlen, fnpos); // Up to the opening brace + if (fnpos < fnlen && fn[fnpos] == '{') fnpos++; // And skip the brace + size_t n = fnlen - fnpos - 1U; // Function code with stripped braces + // printf("flags: %d, body: %zu [%.*s]\n", js->flags, n, (int) n, &fn[fnpos]); + js->flags = F_CALL; // Mark we're in the function call + jsval_t res = js_eval(js, &fn[fnpos], n); // Call function, no GC + if (!is_err(res) && !(js->flags & F_RETURN)) res = js_mkundef(); // No return + delscope(js); // Delete call scope + // printf(" -> %d [%s], tok %d\n", js->flags, js_str(js, res), js->tok); + return res; +} + + +jsval_t elk_call_js_fnc(struct js *js, const char *fn, jsoff_t fnlen) { + return call_js(js,fn,fnlen); +} + +static jsval_t do_call_op(struct js *js, jsval_t func, jsval_t args) { + if (vtype(args) != T_CODEREF) return js_mkerr(js, "bad call"); + if (vtype(func) != T_FUNC && vtype(func) != T_CFUNC) + return js_mkerr(js, "calling non-function"); + const char *code = js->code; // Save current parser state + jsoff_t clen = js->clen, pos = js->pos; // code, position and code length + js->code = &js->code[coderefoff(args)]; // Point parser to args + js->clen = codereflen(args); // Set args length + js->pos = skiptonext(js->code, js->clen, 0); // Skip to 1st arg + uint8_t tok = js->tok, flags = js->flags; // Save flags + jsoff_t nogc = js->nogc; + jsval_t res = js_mkundef(); + if (vtype(func) == T_FUNC) { + jsoff_t fnlen, fnoff = vstr(js, func, &fnlen); + js->nogc = (jsoff_t) (fnoff - sizeof(jsoff_t)); + res = call_js(js, (const char *) (&js->mem[fnoff]), fnlen); + } else { + res = call_c(js, (jsval_t(*)(struct js *, jsval_t *, int)) vdata(func)); + } + js->code = code, js->clen = clen, js->pos = pos; // Restore parser + js->flags = flags, js->tok = tok, js->nogc = nogc; + js->consumed = 1; + return res; +} + +static jsval_t do_op(struct js *js, uint8_t op, jsval_t lhs, jsval_t rhs) { + if (js->flags & F_NOEXEC) return 0; + jsval_t l = resolveprop(js, lhs), r = resolveprop(js, rhs); + // printf("OP %d %d %d\n", op, vtype(lhs), vtype(r)); + setlwm(js); + if (is_err(l)) return l; + if (is_err(r)) return r; + if (is_assign(op) && vtype(lhs) != T_PROP) return js_mkerr(js, "bad lhs"); + switch (op) { + case TOK_TYPEOF: return js_mkstr(js, typestr(vtype(r)), strlen(typestr(vtype(r)))); + case TOK_CALL: return do_call_op(js, l, r); + case TOK_ASSIGN: return assign(js, lhs, r); + case TOK_POSTINC: { + //if (vtype(lhs) != T_OBJ && vtype(lhs) != T_CODEREF) return js_mkerr(js, "bad lhs pc"); + do_assign_op(js, TOK_PLUS_ASSIGN, lhs, tov2(1)); + return l; + } + case TOK_POSTDEC: { + //if (vtype(lhs) != T_OBJ && vtype(lhs) != T_CODEREF) return js_mkerr(js, "bad lhs dc"); + do_assign_op(js, TOK_MINUS_ASSIGN, lhs, tov2(1)); + return l; + } + case TOK_NOT: if (vtype(r) == T_BOOL) return mkval(T_BOOL, !vdata(r)); break; + } + if (is_assign(op)) return do_assign_op(js, op, lhs, r); + if (vtype(l) == T_STR && vtype(r) == T_STR) return do_string_op(js, op, l, r); + if (is_unary(op) && vtype(r) != T_NUM) return js_mkerr(js, "type mismatch"); + if (!is_unary(op) && op != TOK_DOT && (vtype(l) != T_NUM || vtype(r) != T_NUM)) return js_mkerr(js, "type mismatch"); + double_t a = tod2(l), b = tod2(r); + // qemu_warn("[do_op] a: %d | %f", a, a); + // qemu_warn("[do_op] b: %d | %f", b, b); + switch (op) { + //case TOK_EXP: return tov(pow(a, b)); + case TOK_DIV: return tod2(r) == 0 ? js_mkerr(js, "div by zero") : tov2(a / b); + case TOK_REM: return tov2(a - b * ((double_t) (long) (a / b))); + case TOK_MUL: return tov2(a * b); + case TOK_PLUS: return tov2(a + b); + case TOK_MINUS: return tov2(a - b); + case TOK_XOR: return tov2((double_t)((long) a ^ (long) b)); + case TOK_AND: return tov2((double_t)((long) a & (long) b)); + case TOK_OR: return tov2((double_t)((long) a | (long) b)); + case TOK_UMINUS: return tov2(-b); + case TOK_UPLUS: return r; + case TOK_TILDA: return tov2((double_t)(~(long) b)); + case TOK_NOT: return mkval(T_BOOL, b == 0); + case TOK_SHL: return tov2((double_t)((long) a << (long) b)); + case TOK_SHR: return tov2((double_t)((long) a >> (long) b)); + case TOK_DOT: return do_dot_op(js, l, r); + case TOK_EQ: return mkval(T_BOOL, (long) a == (long) b); + case TOK_NE: return mkval(T_BOOL, (long) a != (long) b); + case TOK_LT: return mkval(T_BOOL, a < b); + case TOK_LE: return mkval(T_BOOL, a <= b); + case TOK_GT: return mkval(T_BOOL, a > b); + case TOK_GE: return mkval(T_BOOL, a >= b); + default: return js_mkerr(js, "unknown op %d", (int) op); // LCOV_EXCL_LINE + } +} + +static jsval_t js_str_literal(struct js *js) { + uint8_t *in = (uint8_t *) &js->code[js->toff]; + uint8_t *out = &js->mem[js->brk + sizeof(jsoff_t)]; + size_t n1 = 0, n2 = 0; + // printf("STR %u %lu %lu\n", js->brk, js->tlen, js->clen); + if (js->brk + sizeof(jsoff_t) + js->tlen > js->size) + return js_mkerr(js, "oom"); + while (n2++ + 2 < js->tlen) { + if (in[n2] == '\\') { + if (in[n2 + 1] == in[0]) { + out[n1++] = in[0]; + } else if (in[n2 + 1] == 'n') { + out[n1++] = '\n'; + } else if (in[n2 + 1] == 't') { + out[n1++] = '\t'; + } else if (in[n2 + 1] == 'r') { + out[n1++] = '\r'; + } else if (in[n2 + 1] == 'x' && is_xdigit(in[n2 + 2]) && + is_xdigit(in[n2 + 3])) { + out[n1++] = (uint8_t) ((unhex(in[n2 + 2]) << 4U) | unhex(in[n2 + 3])); + n2 += 2; + } else { + return js_mkerr(js, "bad str literal"); + } + n2++; + } else { + out[n1++] = ((uint8_t *) js->code)[js->toff + n2]; + } + } + return js_mkstr(js, NULL, n1); +} + +static jsval_t js_obj_literal(struct js *js) { + uint8_t exe = !(js->flags & F_NOEXEC); + // printf("OLIT1\n"); + jsval_t obj = exe ? mkobj(js, 0) : js_mkundef(); + if (is_err(obj)) return obj; + js->consumed = 1; + while (next(js) != TOK_RBRACE) { + jsval_t key = 0; + if (js->tok == TOK_IDENTIFIER) { + if (exe) key = js_mkstr(js, js->code + js->toff, js->tlen); + } else if (js->tok == TOK_STRING) { + if (exe) key = js_str_literal(js); + } else { + return js_mkerr(js, "parse error"); + } + js->consumed = 1; + EXPECT(TOK_COLON, ); + jsval_t val = js_expr(js); + if (exe) { + // printf("XXXX [%s] scope: %lu\n", js_str(js, val), vdata(js->scope)); + if (is_err(val)) return val; + if (is_err(key)) return key; + jsval_t res = setprop(js, obj, key, resolveprop(js, val)); + if (is_err(res)) return res; + } + if (next(js) == TOK_RBRACE) break; + EXPECT(TOK_COMMA, ); + } + EXPECT(TOK_RBRACE, ); + return obj; +} + +static jsval_t js_func_literal(struct js *js) { + uint8_t flags = js->flags; // Save current flags + js->consumed = 1; + EXPECT(TOK_LPAREN, js->flags = flags); + jsoff_t pos = js->pos - 1; + for (bool comma = false; next(js) != TOK_EOF; comma = true) { + if (!comma && next(js) == TOK_RPAREN) break; + EXPECT(TOK_IDENTIFIER, js->flags = flags); + if (next(js) == TOK_RPAREN) break; + EXPECT(TOK_COMMA, js->flags = flags); + } + EXPECT(TOK_RPAREN, js->flags = flags); + EXPECT(TOK_LBRACE, js->flags = flags); + js->consumed = 0; + js->flags |= F_NOEXEC; // Set no-execution flag to parse the + jsval_t res = js_block(js, false); // Skip function body - no exec + if (is_err(res)) { // But fail short on parse error + js->flags = flags; + return res; + } + js->flags = flags; // Restore flags + jsval_t str = js_mkstr(js, &js->code[pos], js->pos - pos); + js->consumed = 1; + // printf("FUNC: %u [%.*s]\n", pos, js->pos - pos, &js->code[pos]); + return mkval(T_FUNC, (unsigned long) vdata(str)); +} + +#define RTL_BINOP(_f1, _f2, _cond) \ + jsval_t res = _f1(js); \ + while (!is_err(res) && (_cond)) { \ + uint8_t op = js->tok; \ + js->consumed = 1; \ + jsval_t rhs = _f2(js); \ + if (is_err(rhs)) return rhs; \ + res = do_op(js, op, res, rhs); \ + } \ + return res; + +#define LTR_BINOP(_f, _cond) \ + jsval_t res = _f(js); \ + while (!is_err(res) && (_cond)) { \ + uint8_t op = js->tok; \ + js->consumed = 1; \ + jsval_t rhs = _f(js); \ + if (is_err(rhs)) return rhs; \ + res = do_op(js, op, res, rhs); \ + } \ + return res; + +static jsval_t js_literal(struct js *js) { + next(js); + setlwm(js); + // printf("css : %u\n", js->css); + if (js->maxcss > 0 && js->css > js->maxcss) return js_mkerr(js, "C stack"); + js->consumed = 1; + switch (js->tok) { + case TOK_ERR: return js_mkerr(js, "parse error"); + case TOK_NUMBER: return js->tval; + case TOK_STRING: return js_str_literal(js); + case TOK_LBRACE: return js_obj_literal(js); + case TOK_FUNC: return js_func_literal(js); + case TOK_NULL: return js_mknull(); + case TOK_UNDEF: return js_mkundef(); + case TOK_TRUE: return js_mktrue(); + case TOK_FALSE: return js_mkfalse(); + case TOK_IDENTIFIER: return mkcoderef((jsoff_t) js->toff, (jsoff_t) js->tlen); + default: return js_mkerr(js, "bad expr"); + } +} + +static jsval_t js_group(struct js *js) { + if (next(js) == TOK_LPAREN) { + js->consumed = 1; + jsval_t v = js_expr(js); + if (is_err(v)) return v; + if (next(js) != TOK_RPAREN) return js_mkerr(js, ") expected"); + js->consumed = 1; + return v; + } else { + return js_literal(js); + } +} + +static jsval_t js_call_dot(struct js *js) { + jsval_t res = js_group(js); + if (is_err(res)) return res; + if (vtype(res) == T_CODEREF) { + res = lookup(js, &js->code[coderefoff(res)], codereflen(res)); + } + while (next(js) == TOK_LPAREN || next(js) == TOK_DOT) { + if (js->tok == TOK_DOT) { + js->consumed = 1; + res = do_op(js, TOK_DOT, res, js_group(js)); + } else { + jsval_t params = js_call_params(js); + if (is_err(params)) return params; + res = do_op(js, TOK_CALL, res, params); + } + } + return res; +} + +static jsval_t js_postfix(struct js *js) { + jsval_t res = js_call_dot(js); + if (is_err(res)) return res; + next(js); + if (js->tok == TOK_POSTINC || js->tok == TOK_POSTDEC) { + js->consumed = 1; + res = do_op(js, js->tok, res, 0); + } + return res; +} + +static jsval_t js_unary(struct js *js) { + if (next(js) == TOK_NOT || js->tok == TOK_TILDA || js->tok == TOK_TYPEOF || + js->tok == TOK_MINUS || js->tok == TOK_PLUS) { + uint8_t t = js->tok; + if (t == TOK_MINUS) t = TOK_UMINUS; + if (t == TOK_PLUS) t = TOK_UPLUS; + js->consumed = 1; + return do_op(js, t, js_mkundef(), js_unary(js)); + } else { + return js_postfix(js); + } +} + +static jsval_t js_mul_div_rem(struct js *js) { + LTR_BINOP(js_unary, + (next(js) == TOK_MUL || js->tok == TOK_DIV || js->tok == TOK_REM)); +} + +static jsval_t js_plus_minus(struct js *js) { + LTR_BINOP(js_mul_div_rem, (next(js) == TOK_PLUS || js->tok == TOK_MINUS)); +} + +static jsval_t js_shifts(struct js *js) { + LTR_BINOP(js_plus_minus, (next(js) == TOK_SHR || next(js) == TOK_SHL || + next(js) == TOK_ZSHR)); +} + +static jsval_t js_comparison(struct js *js) { + LTR_BINOP(js_shifts, (next(js) == TOK_LT || next(js) == TOK_LE || + next(js) == TOK_GT || next(js) == TOK_GE)); +} + +static jsval_t js_equality(struct js *js) { + LTR_BINOP(js_comparison, (next(js) == TOK_EQ || next(js) == TOK_NE)); +} + +static jsval_t js_bitwise_and(struct js *js) { + LTR_BINOP(js_equality, (next(js) == TOK_AND)); +} + +static jsval_t js_bitwise_xor(struct js *js) { + LTR_BINOP(js_bitwise_and, (next(js) == TOK_XOR)); +} + +static jsval_t js_bitwise_or(struct js *js) { + LTR_BINOP(js_bitwise_xor, (next(js) == TOK_OR)); +} + +static jsval_t js_logical_and(struct js *js) { + jsval_t res = js_bitwise_or(js); + if (is_err(res)) return res; + uint8_t flags = js->flags; + while (next(js) == TOK_LAND) { + js->consumed = 1; + res = resolveprop(js, res); + if (!js_truthy(js, res)) js->flags |= F_NOEXEC; // false && ... shortcut + if (js->flags & F_NOEXEC) { + js_logical_and(js); + } else { + res = js_logical_and(js); + } + } + js->flags = flags; + return res; +} + +static jsval_t js_logical_or(struct js *js) { + jsval_t res = js_logical_and(js); + if (is_err(res)) return res; + uint8_t flags = js->flags; + while (next(js) == TOK_LOR) { + js->consumed = 1; + res = resolveprop(js, res); + if (js_truthy(js, res)) js->flags |= F_NOEXEC; // true || ... shortcut + if (js->flags & F_NOEXEC) { + js_logical_or(js); + } else { + res = js_logical_or(js); + } + } + js->flags = flags; + return res; +} + +static jsval_t js_ternary(struct js *js) { + jsval_t res = js_logical_or(js); + if (next(js) == TOK_Q) { + uint8_t flags = js->flags; + js->consumed = 1; + if (js_truthy(js, resolveprop(js, res))) { + res = js_ternary(js); + js->flags |= F_NOEXEC; + EXPECT(TOK_COLON, js->flags = flags); + js_ternary(js); + js->flags = flags; + } else { + js->flags |= F_NOEXEC; + js_ternary(js); + EXPECT(TOK_COLON, js->flags = flags); + js->flags = flags; + res = js_ternary(js); + } + } + return res; +} + +static jsval_t js_assignment(struct js *js) { + RTL_BINOP(js_ternary, js_assignment, + (next(js) == TOK_ASSIGN || js->tok == TOK_PLUS_ASSIGN || + js->tok == TOK_MINUS_ASSIGN || js->tok == TOK_MUL_ASSIGN || + js->tok == TOK_DIV_ASSIGN || js->tok == TOK_REM_ASSIGN || + js->tok == TOK_SHL_ASSIGN || js->tok == TOK_SHR_ASSIGN || + js->tok == TOK_ZSHR_ASSIGN || js->tok == TOK_AND_ASSIGN || + js->tok == TOK_XOR_ASSIGN || js->tok == TOK_OR_ASSIGN)); +} + +static jsval_t js_expr(struct js *js) { + return js_assignment(js); +} + +static jsval_t js_let(struct js *js) { + uint8_t exe = !(js->flags & F_NOEXEC); + js->consumed = 1; + for (;;) { + EXPECT(TOK_IDENTIFIER, ); + js->consumed = 0; + jsoff_t noff = js->toff, nlen = js->tlen; + char *name = (char *) &js->code[noff]; + jsval_t v = js_mkundef(); + js->consumed = 1; + if (next(js) == TOK_ASSIGN) { + js->consumed = 1; + v = js_expr(js); + if (is_err(v)) return v; // Propagate error if any + } + if (exe) { + if (lkp(js, js->scope, name, nlen) > 0) + return js_mkerr(js, "'%.*s' already declared", (int) nlen, name); + jsval_t x = + setprop(js, js->scope, js_mkstr(js, name, nlen), resolveprop(js, v)); + if (is_err(x)) return x; + } + if (next(js) == TOK_SEMICOLON || next(js) == TOK_EOF) break; // Stop + EXPECT(TOK_COMMA, ); + } + return js_mkundef(); +} + +static jsval_t js_block_or_stmt(struct js *js) { + if (next(js) == TOK_LBRACE) return js_block(js, !(js->flags & F_NOEXEC)); + jsval_t res = resolveprop(js, js_stmt(js)); + js->consumed = 0; // + return res; +} + +static jsval_t js_if(struct js *js) { + js->consumed = 1; + EXPECT(TOK_LPAREN, ); + jsval_t res = js_mkundef(), cond = resolveprop(js, js_expr(js)); + EXPECT(TOK_RPAREN, ); + bool cond_true = js_truthy(js, cond), exe = !(js->flags & F_NOEXEC); + // printf("IF COND: %s, true? %d\n", js_str(js, cond), cond_true); + if (!cond_true) js->flags |= F_NOEXEC; + jsval_t blk = js_block_or_stmt(js); + if (cond_true) res = blk; + if (exe && !cond_true) js->flags &= (uint8_t) ~F_NOEXEC; + if (lookahead(js) == TOK_ELSE) { + js->consumed = 1; + next(js); + js->consumed = 1; + if (cond_true) js->flags |= F_NOEXEC; + blk = js_block_or_stmt(js); + if (!cond_true) res = blk; + if (cond_true && exe) js->flags &= (uint8_t) ~F_NOEXEC; + } + return res; +} + +static inline bool expect(struct js *js, uint8_t tok, jsval_t *res) { + if (next(js) != tok) { + *res = js_mkerr(js, "parse error"); + return false; + } else { + js->consumed = 1; + return true; + } +} + +static inline bool is_err2(jsval_t *v, jsval_t *res) { +bool r = is_err(*v); +if (r) *res = *v; +return r; +} + +static jsval_t js_for(struct js *js) { + uint8_t flags = js->flags, exe = !(flags & F_NOEXEC); + jsval_t v, res = js_mkundef(); + jsoff_t pos1 = 0, pos2 = 0, pos3 = 0, pos4 = 0; + if (exe) mkscope(js); // Enter new scope + if (!expect(js, TOK_FOR, &res)) goto done; + if (!expect(js, TOK_LPAREN, &res)) goto done; + + if (next(js) == TOK_SEMICOLON) { // initialisation + } else if (next(js) == TOK_LET) { + v = js_let(js); + if (is_err2(&v, &res)) goto done; + } else { + v = js_expr(js); + if (is_err2(&v, &res)) goto done; + } + if (!expect(js, TOK_SEMICOLON, &res)) goto done; + js->flags |= F_NOEXEC; + pos1 = js->pos; // condition + if (next(js) != TOK_SEMICOLON) { + v = js_expr(js); + if (is_err2(&v, &res)) goto done; + } + if (!expect(js, TOK_SEMICOLON, &res)) goto done; + pos2 = js->pos; // final expr + if (next(js) != TOK_RPAREN) { + v = js_expr(js); + if (is_err2(&v, &res)) goto done; + } + if (!expect(js, TOK_RPAREN, &res)) goto done; + pos3 = js->pos; // body + v = js_block_or_stmt(js); + if (is_err2(&v, &res)) goto done; + pos4 = js->pos; // end of body + while (!(flags & F_NOEXEC)) { + js->flags = flags, js->pos = pos1, js->consumed = 1; + if (next(js) != TOK_SEMICOLON) { // Is condition specified? + v = resolveprop(js, js_expr(js)); // Yes. check condition + if (is_err2(&v, &res)) goto done; // Fail short on error + if (!js_truthy(js, v)) break; // Exit the loop if condition is false + } + js->pos = pos3, js->consumed = 1, js->flags |= F_LOOP; // Execute the + v = js_block_or_stmt(js); // loop body + if (is_err2(&v, &res)) goto done; // Fail on error + if (js->flags & F_BREAK) break; // break was executed - exit the loop! + js->flags = flags, js->pos = pos2, js->consumed = 1; // Jump to final expr + if (next(js) != TOK_RPAREN) { // Is it specified? + v = js_expr(js); // Yes. Execute it + if (is_err2(&v, &res)) goto done; // On error, fail short + } + } + js->pos = pos4, js->tok = TOK_SEMICOLON, js->consumed = 0; + done: + if (exe) delscope(js); // Exit scope + js->flags = flags; // Restore flags + return res; +} + +// Пример обработчика для ключевого слова var +static jsval_t js_var(struct js *js) { + uint8_t exe = !(js->flags & F_NOEXEC); + js->consumed = 1; + for (;;) { + EXPECT(TOK_IDENTIFIER, ); + js->consumed = 0; + jsoff_t noff = js->toff, nlen = js->tlen; + char *name = (char *) &js->code[noff]; + jsval_t v = js_mkundef(); + js->consumed = 1; + if (next(js) == TOK_ASSIGN) { + js->consumed = 1; + v = js_expr(js); + if (is_err(v)) return v; // Propagate error if any + } + if (exe) { + // Логика обработки ключевого слова var + // Например, регистрация переменной в текущей области видимости или в глобальной области видимости + if (lkp(js, js->scope, name, nlen) > 0) { + return js_mkerr(js, "'%.*s' already declared", (int) nlen, name); + } + jsval_t x = setprop(js, js->scope, js_mkstr(js, name, nlen), resolveprop(js, v)); + if (is_err(x)) { + return x; + } + } + if (next(js) == TOK_SEMICOLON || next(js) == TOK_EOF) break; // Stop + EXPECT(TOK_COMMA, ); + } + return js_mkundef(); +} + +// Пример обработчика для ключевого слова do +/// DISABLED: Вызывает пока что ошибку парсинга +static jsval_t js_do_while(struct js *js) { + uint8_t exe = !(js->flags & F_NOEXEC); + jsval_t res = js_mkundef(); + jsoff_t pos1, pos2; + + if (!expect(js, TOK_DO, &res)) { + return res; + } + pos1 = js->pos; // Начало блока + js->consumed = 0; // Сброс флага consumed перед блоком + res = js_block_or_stmt(js); + + if (is_err(res)) { + return res; + } + + if (!expect(js, TOK_WHILE, &res)) { + return res; + } + if (!expect(js, TOK_LPAREN, &res)) { + return res; + } + + pos2 = js->pos; // Запоминаем позицию для дальнейшего возврата + js->pos = pos1; // Возвращаемся к началу блока + if (exe) { + do { + res = js_block_or_stmt(js); + if (is_err(res)) { + return res; + } + js->pos = pos2; + res = js_expr(js); + if (is_err(res)) { + return res; + } + } while (js_truthy(js, res)); + } else { + js->pos = pos2; // Возвращение к позиции после do + } + return res; +} + + +static jsval_t js_while(struct js *js) { + uint8_t flags = js->flags, exe = !(flags & F_NOEXEC); + jsval_t v, res = js_mkundef(); + jsoff_t pos1 = 0, pos2 = 0; + if (exe) mkscope(js); // Входим в новую область видимости + if (!expect(js, TOK_WHILE, &res)) goto done; + if (!expect(js, TOK_LPAREN, &res)) goto done; + + pos1 = js->pos; // Начало условия + v = js_expr(js); // Вычисляем условие выражения + if (is_err2(&v, &res)) goto done; + + if (!expect(js, TOK_RPAREN, &res)) goto done; + pos2 = js->pos; // Конец условия + v = js_block_or_stmt(js); // Выполняем тело цикла + if (is_err2(&v, &res)) goto done; + + while (!(flags & F_NOEXEC)) { + js->flags = flags, js->pos = pos1, js->consumed = 1; + // Проверяем условие цикла + v = resolveprop(js, js_expr(js)); + if (is_err2(&v, &res)) goto done; + if (!js_truthy(js, v)) break; // Если условие ложно, выходим из цикла + js->pos = pos2, js->consumed = 1; // Переходим к концу условия + v = js_block_or_stmt(js); // Выполняем тело цикла + if (is_err2(&v, &res)) goto done; + } + + done: + if (exe) delscope(js); // Выходим из области видимости + js->flags = flags; // Восстанавливаем флаги + js->tok = TOK_SEMICOLON; + return res; // Возвращаем результат +} + +static jsval_t js_break(struct js *js) { + if (js->flags & F_NOEXEC) { + } else { + if (!(js->flags & F_LOOP)) return js_mkerr(js, "not in loop"); + js->flags |= F_BREAK | F_NOEXEC; + } + js->consumed = 1; + return js_mkundef(); +} + +static jsval_t js_continue(struct js *js) { + if (js->flags & F_NOEXEC) { + } else { + if (!(js->flags & F_LOOP)) return js_mkerr(js, "not in loop"); + js->flags |= F_NOEXEC; + } + js->consumed = 1; + return js_mkundef(); +} + +static jsval_t js_return(struct js *js) { + uint8_t exe = !(js->flags & F_NOEXEC); + js->consumed = 1; + if (exe && !(js->flags & F_CALL)) return js_mkerr(js, "not in func"); + if (next(js) == TOK_SEMICOLON) return js_mkundef(); + jsval_t res = resolveprop(js, js_expr(js)); + if (exe) { + js->pos = js->clen; // Shift to the end - exit the code snippet + js->flags |= F_RETURN; // Tell caller we've executed + } + return resolveprop(js, res); +} + + +static jsval_t js_switch(struct js *js) { + jsval_t res, expr, match; + uint8_t exe = !(js->flags & F_NOEXEC); + + js->consumed = 1; + expr = resolveprop(js, js_expr(js)); // Вычисление выражения оператора switch + + // Цикл поиска совпадения case + while (next(js) == TOK_CASE) { + js->consumed = 1; + match = resolveprop(js, js_expr(js)); // Вычисление выражения case + if (js_cmp(js, expr, match) == 0) { // Поиск совпадения + res = js_block(js, exe); // Выполнение блока кода для совпавшего case + break; + } + } + + // Поиск и выполнение блока кода default + if (next(js) == TOK_DEFAULT) { + js->consumed = 1; + res = js_block(js, exe); // Выполнение блока кода для default, если совпадений нет + } + + //js->tok = TOK_SEMICOLON; + return res; +} + +static jsval_t js_stmt(struct js *js) { + jsval_t res; + // jsoff_t pos = js->pos - js->tlen; + if (js->brk > js->gct) js_gc(js); + switch (next(js)) { + case TOK_CASE: case TOK_CATCH: case TOK_CLASS: case TOK_CONST: + case TOK_DEFAULT: case TOK_DELETE: case TOK_DO: case TOK_FINALLY: + case TOK_IN: case TOK_INSTANCEOF: case TOK_NEW: + case TOK_THIS: case TOK_THROW: case TOK_TRY: case TOK_VOID: + case TOK_WITH: case TOK_YIELD: + res = js_mkerr(js, "'%.*s' not implemented", (int) js->tlen, js->code + js->toff); + break; + case TOK_SWITCH: res = js_switch(js); break; + case TOK_WHILE: res = js_while(js); break; + case TOK_CONTINUE: res = js_continue(js); break; + case TOK_BREAK: res = js_break(js); break; + case TOK_LET: res = js_let(js); break; + case TOK_VAR: res = js_var(js); break; + case TOK_IF: res = js_if(js); break; + case TOK_LBRACE: res = js_block(js, !(js->flags & F_NOEXEC)); break; + case TOK_FOR: res = js_for(js); break; // 25222 -> 27660 + case TOK_RETURN: res = js_return(js); break; + default: res = resolveprop(js, js_expr(js)); break; + } + //printf("STMT [%.*s] -> %s, tok %d, flags %d\n", (int) (js->pos - pos), &js->code[pos], js_str(js, res), next(js), js->flags); + if (next(js) != TOK_SEMICOLON && next(js) != TOK_EOF && next(js) != TOK_RBRACE){ + //qemu_err("[JSE] [Fatal] the character ';' is expected, but %d is received", next(js)); + + return js_mkerr(js, "; expected"); + } + js->consumed = 1; + return res; +} + +struct js *js_create(void *buf, size_t len) { + struct js *js = NULL; + if (len < sizeof(*js) + esize(T_OBJ)) return js; + memset(buf, 0, len); // Important! + js = (struct js *) buf; // struct js lives at the beginning + js->mem = (uint8_t *) (js + 1); // Then goes memory for JS data + js->size = (jsoff_t) (len - sizeof(*js)); // JS memory size + js->scope = mkobj(js, 0); // Create global scope + js->size = js->size / 8U * 8U; // Align js->size by 8 byte + js->lwm = js->size; // Initial LWM: 100% free + js->isFatal = 0; // Сброс состояния фатальности + js->gct = js->size / 2; + return js; +} + +void js_setgct(struct js *js, size_t gct) { js->gct = (jsoff_t) gct; } +void js_setmaxcss(struct js *js, size_t max) { js->maxcss = (jsoff_t) max; } +jsval_t js_mktrue(void) { return mkval(T_BOOL, 1); } +jsval_t js_mkfalse(void) { return mkval(T_BOOL, 0); } +jsval_t js_mkundef(void) { return mkval(T_UNDEF, 0); } +jsval_t js_mknull(void) { return mkval(T_NULL, 0); } +jsval_t js_mknum(double_t value) { + // warn("[js_mknum] [TOV] %d | %f", value, value); + return tov2(value); +} +jsval_t js_mkobj(struct js *js) { return mkobj(js, 0); } +jsval_t js_mkfun(jsval_t (*fn)(struct js *, jsval_t *, int)) { return mkval(T_CFUNC, (size_t) (void *) fn); } +double_t js_getnum(jsval_t value) { + // qemu_note("[js_getnum] [TOD] %d | %f", tod2(value),tod2(value)); + return tod2(value); +} +int js_getbool(jsval_t value) { return vdata(value) & 1 ? 1 : 0; } + +jsval_t js_glob(struct js *js) { (void) js; return mkval(T_OBJ, 0); } + +void js_set(struct js *js, jsval_t obj, const char *key, jsval_t val) { + if (vtype(obj) == T_OBJ) setprop(js, obj, js_mkstr(js, key, strlen(key)), val); +} + +char *js_getstr(struct js *js, jsval_t value, size_t *len) { + if (vtype(value) != T_STR) return NULL; + jsoff_t n, off = vstr(js, value, &n); + if (len != NULL) *len = n; + return (char *) &js->mem[off]; +} + +int js_type(jsval_t val) { + switch (vtype(val)) { + case T_UNDEF: return JS_UNDEF; + case T_NULL: return JS_NULL; + case T_BOOL: return vdata(val) == 0 ? JS_FALSE: JS_TRUE; + case T_STR: return JS_STR; + case T_NUM: return JS_NUM; + case T_ERR: return JS_ERR; + default: return JS_PRIV; + } +} +void js_stats(struct js *js, size_t *total, size_t *lwm, size_t *css) { + if (total) *total = js->size; + if (lwm) *lwm = js->lwm; + if (css) *css = js->css; +} + +void js_statsInfo(struct js *js) { + qemu_ok("\n[JSE] Information: \n\ Total RAM: %d b. \n Low free ram: %d b. \n Maximum stack: %d b.",js->size,js->lwm, js->css); +} + +bool js_chkargs(jsval_t *args, int nargs, const char *spec) { + int i = 0, ok = 1; + for (; ok && i < nargs && spec[i]; i++) { + uint8_t t = vtype(args[i]), c = (uint8_t) spec[i]; + ok = (c == 'b' && t == T_BOOL) || (c == 'd' && t == T_NUM) || + (c == 's' && t == T_STR) || (c == 'j'); + } + if (spec[i] != '\0' || i != nargs) ok = 0; + return ok; +} + +jsval_t js_eval(struct js *js, const char *buf, size_t len) { + // printf("EVAL: [%.*s]\n", (int) len, buf); + jsval_t res = js_mkundef(); + if (len == (size_t) ~0U) len = strlen(buf); + js->consumed = 1; + js->tok = TOK_ERR; + js->code = buf; + js->clen = (jsoff_t) len; + js->pos = 0; + js->cstk = &res; + while (next(js) != TOK_EOF && !is_err(res)) { + res = js_stmt(js); + } + return res; +} + +void js_dump(struct js *js) { + jsoff_t off = 0, v; + printf("JS size %u, brk %u, lwm %u, css %u, nogc %u\n", js->size, js->brk, + js->lwm, (unsigned) js->css, js->nogc); + while (off < js->brk) { + memcpy(&v, &js->mem[off], sizeof(v)); + printf(" %5u: ", off); + if ((v & 3U) == T_OBJ) { + printf("OBJ %u %u\n", v & ~3U, + loadoff(js, (jsoff_t) (off + sizeof(off)))); + } else if ((v & 3U) == T_PROP) { + jsoff_t koff = loadoff(js, (jsoff_t) (off + sizeof(v))); + jsval_t val = loadval(js, (jsoff_t) (off + sizeof(v) + sizeof(v))); + printf("PROP next %u, koff %u vtype %d vdata %lu\n", v & ~3U, koff, + vtype(val), (unsigned long) vdata(val)); + } else if ((v & 3) == T_STR) { + jsoff_t len = offtolen(v); + printf("STR %u [%.*s]\n", len, (int) len, js->mem + off + sizeof(v)); + } else { + printf("???\n"); + break; + } + off += esize(v); + } +} diff --git a/kernel/src/lib/elk/elk.h b/kernel/src/lib/elk/elk.h new file mode 100644 index 000000000..5ac7a11ab --- /dev/null +++ b/kernel/src/lib/elk/elk.h @@ -0,0 +1,182 @@ +#ifndef SAYORI_ELK_H +#define SAYORI_ELK_H +#pragma once + +#include "common.h" +#include "ext/jse_canvas.h" +#include "ext/jse_event.h" +#include "ext/jse_array.h" + +typedef int double_t; // Тип данных для чисел + +struct js; // Движок JS (непрозрачный) +typedef uint64_t jsval_t; // Типы данных хранящие значения JS + +struct js *js_create(void *buf, size_t len); // Создать экземпляр JS +jsval_t js_eval(struct js *, const char *, size_t); // Выполнить JS-код +jsval_t js_glob(struct js *); // Возвращает глобальный объект +const char *js_str(struct js *, jsval_t val); // Stringify JS value +bool js_chkargs(jsval_t *, int, const char *); // Проверяет правильность аргументов +bool js_truthy(struct js *, jsval_t); // Проверьте, является ли значение истинным +void js_setmaxcss(struct js *, size_t); // Установите максимальный размер стека +void js_setgct(struct js *, size_t); // Установите порог срабатывания GC +void js_stats(struct js *, size_t *total, size_t *min, size_t *cstacksize); +void js_dump(struct js *); // Выводит отладочную информацию. +void js_statsInfo(struct js *js); // Печает в консоль результаты выполнения JS экземпляра + +// Создайте значения JS из значений C +jsval_t js_mkundef(void); // Создать undefined +jsval_t js_mknull(void); // Создать null, null, true, false +jsval_t js_mktrue(void); // Создать true +jsval_t js_mkfalse(void); // Создать false +jsval_t js_mkstr(struct js *, const void *, size_t); // Создать строку +jsval_t js_mknum(double_t); // Создать число +jsval_t js_mkerr(struct js *js, const char *fmt, ...); // Создать error +jsval_t js_mkfun(jsval_t (*fn)(struct js *, jsval_t *, int)); // Создать функцию +jsval_t js_mkobj(struct js *); // Создать объект +void js_set(struct js *, jsval_t, const char *, jsval_t); // Установить object attr + +enum { JS_UNDEF, JS_NULL, JS_TRUE, JS_FALSE, JS_STR, JS_NUM, JS_ERR, JS_PRIV }; +int js_type(jsval_t val); // Возвращает тип JS-значения +double_t js_getnum(jsval_t val); // Получить число +int js_getbool(jsval_t val); // Получить boolean, 0 or 1 +char *js_getstr(struct js *js, jsval_t val, size_t *len); // Получить строку + + +typedef uint32_t jsoff_t; + +struct js { + jsoff_t css; // Максимальный наблюдаемый размер стека C + jsoff_t lwm; // JS RAM low watermark: наблюдается минимальное количество свободной оперативной памяти + const char *code; // Анализируемый в данный момент фрагмент кода (весь код, который выполняется) + char errmsg[33]; // Сообщение об ошибке + uint8_t isFatal; // Выполнение закончилось ошибкой? + uint8_t tok; // Последнее проанализированное значение токена + uint8_t consumed; // Индикатор того, что был использован последний проанализированный токен + uint8_t flags; // Флаги выполнения, смотрите константы F_* ниже +#define F_NOEXEC 1U // Разбирать код, но не выполнять +#define F_LOOP 2U // Код выполняется внутри петли +#define F_CALL 4U // Код выполняется внутри вызова функции +#define F_BREAK 8U // Выход из цикла +#define F_RETURN 16U // Был выполнен возврат из функции + jsoff_t clen; // Длина фрагмента кода + jsoff_t pos; // Текущая позиция синтаксического анализа + jsoff_t toff; // Смещение последнего проанализированного токена + jsoff_t tlen; // Длина последнего проанализированного токена + jsoff_t nogc; // Смещение объекта для исключения из GC + jsval_t tval; // Содержит последнее проанализированное числовое или строковое литеральное значение + jsval_t scope; // Текущая область применения + uint8_t *mem; // Доступная память JS + jsoff_t size; // Объем памяти JS + jsoff_t brk; // Текущая граница использования mem + jsoff_t gct; // Порог GC. Если brk > gct, запустите GC + jsoff_t maxcss; // Максимально допустимый размер использования стека C + jsoff_t incSize; // Размер загруженных библиотек + jsoff_t paramSize; // Кол-во просканированных параметров JSE CF + JSE_CANVAS Canvas; // [JSE] [EXT] [Canvas] + void *cstk; // Указатель стека C в начале js_eval() +}; + +// В памяти JS хранятся различные сущности: объекты, свойства, строки +// Все объекты упаковываются в начало буфера. +// `brk` обозначает конец используемой памяти: +// +// | entity1 | entity2| .... |entityN| неиспользуемая память | +// |---------|--------|------|-------|------------------------------| +// js.mem js.brk js.size +// +// Каждый объект выровнен по 4 байтам, поэтому 2 бита LSB хранят тип объекта. +// Объект: 8 байт: смещение первого свойства, смещение верхнего объекта +// Свойство: 8 байт + значение val: 4 байта следующего пропа, 4 байта отстува, N байт значения +// Строка: 4xN байт: 4 байта len << 2, 4 байта выровненных по 0-завершенных данных +// +// Если импортируются функции C, они используют верхнюю часть памяти в качестве стека для передачи параметров. +// Каждый аргумент помещается в верхнюю часть памяти как jsval_t, а js.size уменьшается на sizeof(jsval_t), т.е. на 8 байт. +// Когда функция возвращается, js.size восстанавливается обратно. +// Таким образом, js.size используется в качестве указателя стека. + +enum { + TOK_ERR, TOK_EOF, TOK_IDENTIFIER, TOK_NUMBER, TOK_STRING, TOK_SEMICOLON, + TOK_LPAREN, TOK_RPAREN, TOK_LBRACE, TOK_RBRACE, + // Keyword tokens + TOK_BREAK = 50, TOK_CASE, TOK_CATCH, TOK_CLASS, TOK_CONST, TOK_CONTINUE, + TOK_DEFAULT, TOK_DELETE, TOK_DO, TOK_ELSE, TOK_FINALLY, TOK_FOR, TOK_FUNC, + TOK_IF, TOK_IN, TOK_INSTANCEOF, TOK_LET, TOK_NEW, TOK_RETURN, TOK_SWITCH, + TOK_THIS, TOK_THROW, TOK_TRY, TOK_VAR, TOK_VOID, TOK_WHILE, TOK_WITH, + TOK_YIELD, TOK_UNDEF, TOK_NULL, TOK_TRUE, TOK_FALSE, + // JS Operator tokens + TOK_DOT = 100, TOK_CALL, TOK_POSTINC, TOK_POSTDEC, TOK_NOT, TOK_TILDA, // 100 + TOK_TYPEOF, TOK_UPLUS, TOK_UMINUS, TOK_EXP, TOK_MUL, TOK_DIV, TOK_REM, // 106 + TOK_PLUS, TOK_MINUS, TOK_SHL, TOK_SHR, TOK_ZSHR, TOK_LT, TOK_LE, TOK_GT, // 113 + TOK_GE, TOK_EQ, TOK_NE, TOK_AND, TOK_XOR, TOK_OR, TOK_LAND, TOK_LOR, // 121 + TOK_COLON, TOK_Q, TOK_ASSIGN, TOK_PLUS_ASSIGN, TOK_MINUS_ASSIGN, + TOK_MUL_ASSIGN, TOK_DIV_ASSIGN, TOK_REM_ASSIGN, TOK_SHL_ASSIGN, + TOK_SHR_ASSIGN, TOK_ZSHR_ASSIGN, TOK_AND_ASSIGN, TOK_XOR_ASSIGN, + TOK_OR_ASSIGN, TOK_COMMA, +}; + +enum { + // ВАЖНО: T_OBJ, T_PROP, T_STR должны быть запущены первыми. + // Этого требуют функции компоновки памяти: типы объектов памяти кодируются в 2 битах, + // таким образом, значения типов должны быть 0,1,2,3 + T_OBJ, T_PROP, T_STR, T_UNDEF, T_NULL, T_NUM, T_BOOL, T_FUNC, T_CODEREF, + T_CFUNC, T_ERR +}; + +static jsval_t tov(double_t d) { + union { double_t d; jsval_t v; } u = {d}; + return u.v; +} +static jsval_t tov2(int d) { union { int d; jsval_t v; } u = {d}; return u.v; } +static double_t tod(jsval_t v) { + union { jsval_t v; double_t d; } u = {v}; + return u.d; +} +static double_t tod2(jsval_t v) { + union { jsval_t v; int d; } u = {v}; + return u.d; +} +static jsval_t mkval(uint8_t type, uint64_t data) { return ((jsval_t) 0x7ff0U << 48U) | ((jsval_t) (type) << 48) | (data & 0xffffffffffffUL); } +static bool is_nan(jsval_t v) { return (v >> 52U) == 0x7ffU; } +static uint8_t vtype(jsval_t v) { return is_nan(v) ? ((v >> 48U) & 15U) : (uint8_t) T_NUM; } +static size_t vdata(jsval_t v) { return (size_t) (v & ~((jsval_t) 0x7fffUL << 48U)); } +static jsval_t mkcoderef(jsval_t off, jsoff_t len) { return mkval(T_CODEREF, (off & 0xffffffU) | ((jsval_t)(len & 0xffffffU) << 24U)); } +static jsoff_t coderefoff(jsval_t v) { return v & 0xffffffU; } +static jsoff_t codereflen(jsval_t v) { return (v >> 24U) & 0xffffffU; } + +static uint8_t unhex(uint8_t c) { return (c >= '0' && c <= '9') ? (uint8_t) (c - '0') : (c >= 'a' && c <= 'f') ? (uint8_t) (c - 'W') : (c >= 'A' && c <= 'F') ? (uint8_t) (c - '7') : 0; } +static bool is_space(int c) { return c == ' ' || c == '\r' || c == '\n' || c == '\t' || c == '\f' || c == '\v'; } +static bool is_digit(int c) { return c >= '0' && c <= '9'; } +static bool is_xdigit(int c) { return is_digit(c) || (c >= 'a' && c <= 'f') || (c >= 'A' && c <= 'F'); } +static bool is_alpha(int c) { return (c >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z'); } +static bool is_ident_begin(int c) { return c == '_' || c == '$' || is_alpha(c); } +static bool is_ident_continue(int c) { return c == '_' || c == '$' || is_alpha(c) || is_digit(c); } +static bool is_err(jsval_t v) { return vtype(v) == T_ERR; } +static bool is_unary(uint8_t tok) { return tok >= TOK_POSTINC && tok <= TOK_UMINUS; } +static bool is_assign(uint8_t tok) { return (tok >= TOK_ASSIGN && tok <= TOK_OR_ASSIGN); } +static void saveoff(struct js *js, jsoff_t off, jsoff_t val) { memcpy(&js->mem[off], &val, sizeof(val)); } +static void saveval(struct js *js, jsoff_t off, jsval_t val) { memcpy(&js->mem[off], &val, sizeof(val)); } +static jsoff_t loadoff(struct js *js, jsoff_t off) { jsoff_t v = 0; passert(js->brk <= js->size); memcpy(&v, &js->mem[off], sizeof(v)); return v; } +static jsoff_t offtolen(jsoff_t off) { return (off >> 2) - 1; } +static jsoff_t vstrlen(struct js *js, jsval_t v) { return offtolen(loadoff(js, (jsoff_t) vdata(v))); } +static jsval_t loadval(struct js *js, jsoff_t off) { jsval_t v = 0; memcpy(&v, &js->mem[off], sizeof(v)); return v; } +static jsval_t upper(struct js *js, jsval_t scope) { return mkval(T_OBJ, loadoff(js, (jsoff_t) (vdata(scope) + sizeof(jsoff_t)))); } +static jsoff_t align32(jsoff_t v) { return ((v + 3) >> 2) << 2; } + +#define CHECKV(_v) do { if (is_err(_v)) { res = (_v); goto done; } } while (0) +#define EXPECT(_tok, _e) do { if (next(js) != _tok) { _e; return js_mkerr(js, "parse error"); }; js->consumed = 1; } while (0) + +static size_t tostr(struct js *js, jsval_t value, char *buf, size_t len); +static jsval_t js_expr(struct js *js); +static jsval_t js_stmt(struct js *js); +static jsval_t do_op(struct js *, uint8_t op, jsval_t l, jsval_t r); + +void jse_file_getBuff(char* buf); +JSE_ARRAY* js_getObjectToArray(struct js *js, jsval_t value); + + +jsval_t elk_call_js_fnc(struct js *js, const char *fn, jsoff_t fnlen); + +#include "ext/jse_function.h" + +#endif //SAYORI_ELK_H diff --git a/kernel/src/lib/elk/elk_config.h b/kernel/src/lib/elk/elk_config.h new file mode 100644 index 000000000..827b23303 --- /dev/null +++ b/kernel/src/lib/elk/elk_config.h @@ -0,0 +1,10 @@ +#pragma once + +#include "common.h" + +#define JSE_LIBS_PATH "R:\\Sayori\\JSE\\" ///! Путь с библиотеками +#define JSE_MIN_STACK 8196 ///! Минимальный размер стэка + +#define JSE_MSG_ERROR_LIBRARY "Library error!" ///! Сообщение при ошибки, если проблемы в библиотеках + +#define JSE_DISPLAY_SETPIXEL(x,y,c); set_pixel(x,y,c); ///! Отрисовка одного пикселя \ No newline at end of file diff --git a/kernel/src/lib/elk/elk_engine.c b/kernel/src/lib/elk/elk_engine.c new file mode 100644 index 000000000..d3576b687 --- /dev/null +++ b/kernel/src/lib/elk/elk_engine.c @@ -0,0 +1,161 @@ +/// JavaScript Engine +#include "portability.h" +#include +#include "elk.h" +#include "io/tty.h" +#include "lib/stdio.h" + + +jsval_t jse_fnc_system_ticks(struct js *js, jsval_t *args, int nargs) { + return js_mknum(getTicks()); +} + +jsval_t js_drawRect(struct js *js, jsval_t *args, int nargs) { + if (nargs != 5) return js_mkundef(); + int x = jse_getInt(js,args[0]); // Fetch 1st arg + int y = jse_getInt(js,args[1]); // Fetch 2nd arg + int w = jse_getInt(js,args[2]); // Fetch 3nd arg + int h = jse_getInt(js,args[3]); // Fetch 4nd arg + int color = jse_getInt(js,args[4]); // Fetch 5nd arg + //qemu_warn("x:%d | y:%d | w:%d | h:%d | color: %x",x,y,w,h,color); + drawRect(x,y,w,h,color); + return js_mktrue(); +} + +static jsval_t js_console_debug(struct js *js, jsval_t *args, int nargs) { + for (int i = 0; i < nargs; i++){ + int type = js_type(args[i]); + + printf("[Index: %d] [Type:%d] %s\n", i, type, js_str(js,args[i])); + } + return js_mkundef(); +} + +static jsval_t js_console_log(struct js *js, jsval_t *args, int nargs) { + for (int i = 0; i < nargs; i++){ + qemu_log("%s", js_str(js,args[i])); + } + return js_mkundef(); +} + +static jsval_t js_console_note(struct js *js, jsval_t *args, int nargs) { + for (int i = 0; i < nargs; i++){ + qemu_note("%s", js_str(js, args[i])); + } + return js_mkundef(); +} + +static jsval_t js_console_warn(struct js *js, jsval_t *args, int nargs) { + for (int i = 0; i < nargs; i++){ + qemu_warn("%s", js_str(js,args[i])); + } + return js_mkundef(); +} + +static jsval_t js_console_err(struct js *js, jsval_t *args, int nargs) { + for (int i = 0; i < nargs; i++){ + qemu_err("%s", js_str(js,args[i])); + } + return js_mkundef(); +} + +static jsval_t js_print(struct js *js, jsval_t *args, int nargs) { + for (int i = 0; i < nargs; i++){ + tty_printf("%s", js_str(js,args[i])); + } + return js_mkundef(); +} + +static jsval_t js_alert(struct js *js, jsval_t *args, int nargs) { + for (int i = 0; i < nargs; i++){ + const char* af = js_str(js,args[i]); + printf("%s", af); + } + printf("\n"); + return js_mkundef(); +} + +static jsval_t js_nop(struct js *js, jsval_t *args, int nargs) { + return js_mkundef(); +} + +void elk_destroy(struct js* js){ + jse_array_destroy(js); + jse_event_destroy(js); + jse_canvas_destroy(js); +} + +void elk_setup(struct js* js){ + /// Console Func + js_set(js, js_glob(js), "console_debug", js_mkfun(js_console_debug)); + js_set(js, js_glob(js), "console_log", js_mkfun(js_console_log)); + js_set(js, js_glob(js), "console_warn", js_mkfun(js_console_warn)); + js_set(js, js_glob(js), "console_err", js_mkfun(js_console_err)); + js_set(js, js_glob(js), "console_note", js_mkfun(js_console_note)); + js_set(js, js_glob(js), "nop", js_mkfun(js_nop)); + + /// System Func + js_set(js, js_glob(js), "system_ticks", js_mkfun(jse_fnc_system_ticks)); + + /// Configurate canvas + jse_canvas_config(js); + + /// Configurate event + jse_event_config(js); + + /// Configurate Array + jse_array_config(js); + + /// Other Func + js_set(js, js_glob(js), "rect", js_mkfun(js_drawRect)); + js_set(js, js_glob(js), "print", js_mkfun(js_print)); + js_set(js, js_glob(js), "alert", js_mkfun(js_alert)); +} + +int elk_eval(const char* buf){ + size_t stack = 32768 + sizeof(struct js); + + char* js_mem = kcalloc(stack, 1); +// char js_mem[32768] = {0}; + struct js *js = js_create(js_mem, (stack)); + if (js == NULL){ + qemu_err("\n[JSE] Runtime Fatal Error!\n\r Message: %s\n","No free RAM"); + return 0; + } + + elk_setup(js); + + jsval_t result = js_eval(js, buf, strlen(buf)); + + elk_destroy(js); + + if (js->isFatal){ + printf("\n[JSE] Runtime Fatal Error!\n\r Message: %s\n",js_str(js, result)); + } else { + printf("[JSE] Result: %s\n",js_str(js, result)); + } + + js_statsInfo(js); + kfree(js_mem); + return (js->isFatal == 1?0:1); +} + +int elk_file(const char* path){ + FILE* file = fopen(path, "r"); + if (!file){ + qemu_err("[JSE] File no found!"); + return 0; + } + + size_t filesize = fsize(file); + + char* buf = kcalloc(sizeof(char) * (filesize+1), 1); + fread(file, 1, filesize, buf); + + jse_file_getBuff(buf); + + fclose(file); + kfree(buf); + return 1; + +} \ No newline at end of file diff --git a/kernel/src/lib/elk/elk_libs.c b/kernel/src/lib/elk/elk_libs.c new file mode 100644 index 000000000..9c91f3741 --- /dev/null +++ b/kernel/src/lib/elk/elk_libs.c @@ -0,0 +1,177 @@ +/// JavaScript Engine - Поддержка библиотек +#include "portability.h" +#include + + +#include "io/tty.h" +#include "lib/libstring/string.h" +#include "../libvector/include/vector.h" +#include "lib/stdio.h" + + +#include "elk_config.h" +#include "elk.h" + + + +void jse_file_config(const char *cfg, const char *file){ + size_t minStack = JSE_MIN_STACK; + size_t bufferSize = 0; + size_t stack = JSE_MIN_STACK; + bool jse_p_no_warn_stack = false; + size_t param_size = -1; + char* out = kcalloc(1,sizeof(char) * minStack + bufferSize); + string_t* str = string_from_charptr(cfg); + vector_t* vec = string_split(str, "\n"); + + for(int i = 0; i < vec->size; i++) { + param_size++; + string_t* str_param = (string_t*)(vec->data[i]); + vector_t* param = string_split(str_param, " "); + //qemu_log("[VEC] [%d/%d] [C:%d] Str: %s", i, vec->size, param->size, str_param->data); + + if (param->size < 2) continue; + + jse_trim(((string_t*)(param->data[0]))->data); + jse_trim(((string_t*)(param->data[1]))->data); + //qemu_note("Key: '%s' | Value: '%s'", ((string_t*)(param->data[0]))->data, ((string_t*)(param->data[1]))->data); + if (strcmpn(((string_t*)(param->data[0]))->data,"//#include")){ + char* fn_buf = kcalloc(1,sizeof(char) * (strlen(JSE_LIBS_PATH) + strlen(((string_t*)(param->data[1]))->data) + 1 ) ); + + memcpy(fn_buf, JSE_LIBS_PATH, strlen(JSE_LIBS_PATH)); + memcpy(fn_buf + strlen(JSE_LIBS_PATH), (((string_t*)(param->data[1]))->data), strlen(((string_t*)(param->data[1]))->data)); + + size_t lastInx = strlen(JSE_LIBS_PATH) + strlen(((string_t*)(param->data[1]))->data); + + fn_buf[lastInx] = 0; + + FILE* file = fopen(fn_buf, "r"); + if (!file){ + qemu_err("[JSE] [Include] File '%s' no found!", fn_buf); + kfree(fn_buf); + fclose(file); + } else { + + size_t filesize = fsize(file); + bufferSize += filesize; + + char* buf = kcalloc(1,sizeof(char) * (filesize+1)); + fread(file, 1, filesize, buf); + + out = jse_mergeBuffers(out, buf, strlen(out), filesize); + + fclose(file); + kfree(buf); + kfree(fn_buf); + + qemu_ok(" [JSE] [Include] File '%s' is loaded!", fn_buf); + + + } + } else if (param->size <= 3 && strcmpn(((string_t*)(param->data[0]))->data,"//#pragma")) { + jse_trim(((string_t*)(param->data[2]))->data); + qemu_note(" [JSE] [Pragma] key: '%s' value: '%s'", ((string_t*)(param->data[1]))->data, ((string_t*)(param->data[2]))->data); + if (strcmpn(((string_t*)(param->data[1]))->data,"stack")){ + int stackValue = jse_func_atoi(((string_t*)(param->data[2]))->data); + if (stackValue < stack){ + if (!jse_p_no_warn_stack) qemu_warn(" [JSE] [WARN] The stack size has been reset to the minimum size by the installed JSE."); + continue; + } else if (stackValue > (strlen(file) + bufferSize) * 5) { + if (!jse_p_no_warn_stack) qemu_warn(" [JSE] [WARN] You have set the stack value to less than the recommended value (%d), errors may appear during script execution.", (strlen(file) + bufferSize) * 5); + } + stack = stackValue; + continue; + } else if (strcmpn(((string_t*)(param->data[1]))->data,"no-warn-stack")){ + int value = jse_func_atoi(((string_t*)(param->data[2]))->data); + jse_p_no_warn_stack = (value == 1?true:false); + continue; + } + } else { + qemu_err("[JSE] Unknown argv (%s)", ((string_t*)(param->data[0]))->data); + continue; + } + //printf("%s\n", ((string_t*)(vec->data[i]))->data); + } + + + string_split_free(vec); + string_destroy(str); + + out = jse_mergeBuffers(out, file, strlen(out), strlen(file)); + qemu_note(" [JSE] Stack size: %d", stack); + stack += sizeof(struct js) + 1; + + /// JSE Runtime + + + char* js_mem = kcalloc(1,stack); + struct js *js = js_create(js_mem, (stack)); + + elk_setup(js); + + js->incSize = bufferSize; + js->paramSize = param_size; + + //qemu_note("[Buffer PRE] [%d] \n=============\n%s\n=============\n", strlen(out), out); + + //jse_checkBuffer(out); + + //qemu_note("[Buffer POST] [%d] \n=============\n%s\n=============\n", strlen(out), out); + + + jsval_t result = js_eval(js, out, strlen(out)); + + elk_destroy(js); + + if (js->isFatal){ + qemu_err("\n[JSE] Runtime Fatal Error!\n\r Message: %s\n", js_str(js, result)); + } else { + printf("[JSE] Result: %s\n",js_str(js, result)); + } + + js_statsInfo(js); + + + kfree(out); + kfree(js_mem); + //kfree(file); + //return (js->isFatal == 1?0:1); + + //qemu_note("Buffer: \n%s", out); +} + +void jse_file_preconfig(const char *buffer, const char *first_search, const char *second_search) { + const char *start = buffer; + const char *first_occurrence = jse_strstr(start, first_search); + + if (first_occurrence != NULL) { + start = first_occurrence + strlen(first_search); + const char *second_occurrence = jse_strstr(start, second_search); + + if (second_occurrence != NULL) { + int content_length = second_occurrence - start; + + int fileoff = content_length + strlen(first_search) + strlen(second_search); + + void* config = calloc(sizeof(char) * (content_length + 1), 1); + void* file = calloc(sizeof(char) * (strlen(buffer) - content_length), 1); + + jse_ncpy((char*) config, (char*) start, content_length); + jse_ncpy((char*) file, (char*) buffer + fileoff, (strlen(buffer) - content_length)); + + jse_file_config((char*) config, (char*) file); + + return; + } + } + + qemu_note("[JSE] The JSE configuration block was not found in the file, so JSE executes in normal mode and with standard settings."); + elk_eval(buffer); +} + +void jse_file_getBuff(char* buf){ + const char *sc1 = "//<#JSE#"; + const char *sc2 = "//#JSE#>"; + + jse_file_preconfig(buf, sc1, sc2); +} diff --git a/kernel/src/lib/elk/ext/jse_array.c b/kernel/src/lib/elk/ext/jse_array.c new file mode 100644 index 000000000..a9694c215 --- /dev/null +++ b/kernel/src/lib/elk/ext/jse_array.c @@ -0,0 +1,707 @@ +/// JavaScript Engine - Поддержка массивов (как в PHP) +#include "portability.h" +#include +#include "io/tty.h" +#include "lib/stdio.h" + +#include "../elk_config.h" +#include "../elk.h" + +JSE_ARRAY JSE_GLOBAL_ARRAY; + +/** + * @brief - [JSE] [EXT] [Array] Создание массива + * + * @return - JSE_ARRAY - массив + */ +JSE_ARRAY jse_array_create() { + JSE_ARRAY* arr = (JSE_ARRAY*)calloc(1, sizeof(JSE_ARRAY)); + arr->pairs = (JSE_ARRAY_DATA*)calloc(1, JSE_EXT_ARRAY_INITIAL_SIZE * sizeof(JSE_ARRAY_DATA)); + arr->size = 0; + arr->capacity = JSE_EXT_ARRAY_INITIAL_SIZE; + return arr[0]; +} + + +/** + * @brief - [JSE] [EXT] [Array] Создание массива + * + * @return - JSE_ARRAY* - массив + */ +JSE_ARRAY* jse_array_link_create() { + JSE_ARRAY* arr = (JSE_ARRAY*) calloc(1, sizeof(JSE_ARRAY)); + arr->pairs = (JSE_ARRAY_DATA*) calloc(1, JSE_EXT_ARRAY_INITIAL_SIZE * sizeof(JSE_ARRAY_DATA)); + arr->size = 0; + arr->capacity = JSE_EXT_ARRAY_INITIAL_SIZE; + return arr; +} +/** + * @brief - [JSE] [EXT] [Array] Отладочная информация для массивов + * + * @param JSE_ARRAY arr - Массив + * @param int space - Кол-во пробелов + */ +void jse_array_dump(JSE_ARRAY arr, int space){ + char* sp = (char*) calloc(1, (sizeof(char) * (space + 1))); + memset(sp,' ', space); + for (int i = 0; i < arr.size; i++) { + if (arr.pairs[i].type == JSE_ARRAY_TYPE_INT) { + printf("%s[%d] Key: %s, Value (INT): %d\n",sp, i, arr.pairs[i].key, arr.pairs[i].value.int_value); + } else if (arr.pairs[i].type == JSE_ARRAY_TYPE_STRING) { + printf("%s[%d] Key: %s, Value (STRING): %s\n",sp, i, arr.pairs[i].key, arr.pairs[i].value.str_value); + } else if (arr.pairs[i].type == JSE_ARRAY_TYPE_ARRAY) { + printf("%s[%d] Key: %s, Value (ARRAY): Size %d\n",sp, i, arr.pairs[i].key, arr.pairs[i].value.array_value->size); + jse_array_dump(arr.pairs[i].value.array_value[0],space + 4); + } + } + free(sp); +} + +/** + * @brief - [JSE] [EXT] [Array] Отладочная информация для массивов + * + * @param JSE_ARRAY arr - Массив + * @param int space - Кол-во пробелов + */ +void jse_array_link_dump(JSE_ARRAY* arr, int space){ + char* sp = (char*)calloc(1, sizeof(char) * (space + 1)); + memset(sp,' ', space); + for (int i = 0; i < arr->size; i++) { + if (arr->pairs[i].type == JSE_ARRAY_TYPE_INT) { + printf("%s[%d] Key: %s, Value (INT): %d\n",sp, i, arr->pairs[i].key, arr->pairs[i].value.int_value); + } else if (arr->pairs[i].type == JSE_ARRAY_TYPE_STRING) { + printf("%s[%d] Key: %s, Value (STRING): %s\n",sp, i, arr->pairs[i].key, arr->pairs[i].value.str_value); + } else if (arr->pairs[i].type == JSE_ARRAY_TYPE_ARRAY) { + printf("%s[%d] Key: %s, Value (ARRAY): Size %d\n",sp, i, arr->pairs[i].key, arr->pairs[i].value.array_value->size); + jse_array_dump(arr->pairs[i].value.array_value[0],space + 4); + } + } + free(sp); +} + +/** + * @brief - [JSE] [EXT] [Array] Отладочная информация для значений + * + * @param JSE_ARRAY_DATA data - Данные массива (ключ и его значения) + * @param int space - Кол-во пробелов + */ +void jse_array_value_dump(JSE_ARRAY_DATA data, int space){ + if (data.type == JSE_ARRAY_TYPE_NULL) { + printf("[JSE] [Array] [DUMP] [VALUE] Invalid data\n"); + return; + } + char* sp = (char*) calloc(1, sizeof(char) * (space + 1)); + memset(sp,' ', space); + printf("[JSE] [Array] [DUMP] [VALUE] Success!\n%s Key: %s\n", sp, data.key); + printf("%s |--- Type: %d\n",sp, data.type); + if (data.type == JSE_ARRAY_TYPE_INT){ + printf("%s |--- Value: %d\n",sp, data.value.int_value); + } else if (data.type == JSE_ARRAY_TYPE_STRING){ + printf("%s |--- Value: %s\n",sp, data.value.str_value); + } else if (data.type == JSE_ARRAY_TYPE_ARRAY){ + printf("%s |--- Value: (Array)\n",sp); + jse_array_dump(data.value.array_value[0],space + 4); + + } + free(sp); +} + +/** + * @brief - [JSE] [EXT] [Array] Добавление в конец массива элемента + * + * @param JSE_ARRAY* arr - Ссылка на массив + * @param const char* key - Имя ключа + * @param JSE_ARRAY_VALUE value - Данные для чтения|записи в массив + * @param JSE_ARRAY_TYPE type - Тип данных (смотрите в JSE_ARRAY_TYPE) + */ +void jse_array_push(JSE_ARRAY* arr, const char* key, JSE_ARRAY_VALUE value, JSE_ARRAY_TYPE type) { + if (arr->size >= arr->capacity) { + arr->capacity *= 2; + arr->pairs = (JSE_ARRAY_DATA*)realloc(arr->pairs, arr->capacity * sizeof(JSE_ARRAY_DATA)); + } + arr->pairs[arr->size].key = jse_strdup(key); + arr->pairs[arr->size].value = value; + arr->pairs[arr->size].type = type; + arr->size++; +} + + +/** + * @brief - [JSE] [EXT] [Array] Добавление в конец массива элемента + * + * @param JSE_ARRAY* arr - Ссылка на массив + * @param const char* key - Имя ключа + * @param JSE_ARRAY_VALUE value - Данные для чтения|записи в массив + * @param JSE_ARRAY_TYPE type - Тип данных (смотрите в JSE_ARRAY_TYPE) + */ +void jse_array_editByID(JSE_ARRAY* arr, int Index, JSE_ARRAY_VALUE value, JSE_ARRAY_TYPE type) { + if (Index >= 0 && Index < arr->size) { + JSE_ARRAY_VALUE val = arr->pairs[Index].value; + if (arr->pairs[Index].type == JSE_ARRAY_TYPE_ARRAY){ + jse_array_destroZ(val.array_value, 0); + } else if (arr->pairs[Index].type == JSE_ARRAY_TYPE_STRING){ + free(val.str_value); + } + arr->pairs[Index].value = value; + arr->pairs[Index].type = type; + } else { + qemu_err("Error: Index out of bounds\n"); + } +} + +/** + * @brief - [JSE] [EXT] [Array] Получение данных по ключу + * + * @param JSE_ARRAY* arr - Ссылка на массив + * @param const char* key - Ключ + * + * @return JSE_ARRAY_DATA - Ключ, тип и значение + */ +JSE_ARRAY_DATA jse_array_getByKey(JSE_ARRAY* arr, const char* key) { + for (int i = 0; i < arr->size; i++) { + if (strcmp(arr->pairs[i].key, key) == 0) { + //jse_array_value_dump(arr->pairs[i], 4); + return arr->pairs[i]; + //return arr->pairs[i].value; + } + } + JSE_ARRAY_DATA jse_arr = {}; + return jse_arr; // Возврат, если ключ не найден +} + +/** + * @brief - [JSE] [EXT] [Array] Получение данных по индексу + * + * @param JSE_ARRAY* arr - Ссылка на массив + * @param int index - Индекс + * + * @return JSE_ARRAY_DATA - Ключ, тип и значение + */ +JSE_ARRAY_DATA jse_array_getByIndex(JSE_ARRAY* arr, int index) { + if (index >= 0 && index < arr->size) { + return arr->pairs[index]; + } + + JSE_ARRAY_DATA jse_arr = {}; + return jse_arr; +} + +/** + * @brief - [JSE] [EXT] [Array] Освобождение памяти массива из ОЗУ + * + * @param JSE_ARRAY* arr - Ссылка на массив + */ +void jse_array_free(JSE_ARRAY* arr) { + for (int i = 0; i < arr->size; i++) { + //qemu_note("[Array] 1.Free %x",arr->pairs[i].key); + free(arr->pairs[i].key); + if (arr->pairs[i].type == JSE_ARRAY_TYPE_NULL || + arr->pairs[i].type != JSE_ARRAY_TYPE_STRING || + arr->pairs[i].type != JSE_ARRAY_TYPE_INT || + arr->pairs[i].type != JSE_ARRAY_TYPE_ARRAY + ){ + qemu_log("[Array] Skipping data"); + continue; + } + if (arr->pairs[i].type == JSE_ARRAY_TYPE_STRING) { + free(arr->pairs[i].value.str_value); + } else if (arr->pairs[i].type == JSE_ARRAY_TYPE_ARRAY) { + // Дополнительная логика для освобождения памяти массива + qemu_note("[Array] In %x",arr->pairs[i].value.array_value); + jse_array_free(arr->pairs[i].value.array_value); + } + } + qemu_note("[Array] 2.Free %x",arr->pairs); + free(arr->pairs); + arr->size = 0; + arr->capacity = 0; + qemu_note("[Array] 3.Free %x",arr); + free(arr); +} +/** + * @brief - [JSE] [EXT] [Array] Меняет регистр всех ключей в массиве + * + * @param const JSE_ARRAY* orig - Ссылка на массив + * @param int uppercase - Регистр (1 - большие | 0 - маленькие) + * + * @return - Возвращает массив, где все ключи которого преобразованы в нижний или верхний регистр. + */ + +JSE_ARRAY jse_array_change_key_case(const JSE_ARRAY* orig, int uppercase) { + JSE_ARRAY new_arr = jse_array_create(); + + for (int i = 0; i < orig->size; i++) { + char* new_key = jse_strdup(orig->pairs[i].key); + (uppercase ?jse_func_toupper(new_key):jse_func_tolower(new_key)); + jse_array_push(&new_arr, new_key, orig->pairs[i].value, orig->pairs[i].type); + } + + return new_arr; +} +/** + * @brief - [JSE] [EXT] [Array] Заполнение однотипными значениями в массив + * + * @param JSE_ARRAY* arr - Ссылка на массив + * @param int start_index - Откуда начинаем + * @param int count - Количество + * @param JSE_ARRAY_VALUE value - Данные для записи в массив + * @param JSE_ARRAY_TYPE type - Тип данных (смотрите в JSE_ARRAY_TYPE) + */ + +void jse_array_fill(JSE_ARRAY* arr, int start_index, int count, JSE_ARRAY_VALUE value, JSE_ARRAY_TYPE type) { + for (int i = start_index; i < start_index + count; i++) { + if (i < arr->size) { + if (arr->pairs[i].type == JSE_ARRAY_TYPE_STRING) { + free(arr->pairs[i].value.str_value); + } else if (arr->pairs[i].type == JSE_ARRAY_TYPE_ARRAY) { + jse_array_free(arr->pairs[i].value.array_value); + } + arr->pairs[i].value = value; + arr->pairs[i].type = type; + } else { + if (arr->size >= arr->capacity) { + arr->capacity *= 2; + arr->pairs = (JSE_ARRAY_DATA*)realloc(arr->pairs, arr->capacity * sizeof(JSE_ARRAY_DATA)); + } + arr->pairs[i].key = jse_strdup(""); + arr->pairs[i].value = value; + arr->pairs[i].type = type; + arr->size++; + } + } +} +/** + * @brief - [JSE] [EXT] [Array] Сравнить два массива и создать новый массив с расхождениями + * + * @param JSE_ARRAY* array - Ссылка на массив 1 + * @param JSE_ARRAY* other_array - Ссылка на массив 2 + * + * @return - Массив с расхождениями + */ + +JSE_ARRAY jse_array_diff(JSE_ARRAY* array, JSE_ARRAY* other_array) { + JSE_ARRAY diff_array = jse_array_create(); // Создаем массив для результатов + + for (int i = 0; i < array->size; i++) { + int found_in_other = 0; + for (int j = 0; j < other_array->size; j++) { + if (array->pairs[i].type == other_array->pairs[j].type) { + if (array->pairs[i].type == JSE_ARRAY_TYPE_INT) { + if (array->pairs[i].value.int_value == other_array->pairs[j].value.int_value) { + found_in_other = 1; + break; + } + } else if (array->pairs[i].type == JSE_ARRAY_TYPE_STRING) { + if (strcmp(array->pairs[i].value.str_value, other_array->pairs[j].value.str_value) == 0) { + found_in_other = 1; + break; + } + } else if (array->pairs[i].type == JSE_ARRAY_TYPE_ARRAY) { + // Рекурсивное сравнение для массивов + JSE_ARRAY nested_diff = jse_array_diff(array->pairs[i].value.array_value, other_array->pairs[j].value.array_value); + if (nested_diff.size > 0) { + found_in_other = 1; + jse_array_push(&diff_array, array->pairs[i].key, array->pairs[i].value, array->pairs[i].type); + } + } + } + } + if (!found_in_other) { + jse_array_push(&diff_array, array->pairs[i].key, array->pairs[i].value, array->pairs[i].type); + } + } + + return diff_array; +} +/** + * @brief - [JSE] [EXT] [Array] Тестирование окружения массивов + */ + +void jse_array_test(){ + // Создаем два массива для сравнения + JSE_ARRAY array1 = jse_array_create(); + jse_array_push(&array1, "age", (JSE_ARRAY_VALUE){.int_value = 30}, JSE_ARRAY_TYPE_INT); + jse_array_push(&array1, "name", (JSE_ARRAY_VALUE){.str_value = jse_strdup("John")}, JSE_ARRAY_TYPE_STRING); + + + // Первый вложенный массив + JSE_ARRAY nested_array1 = jse_array_create(); + jse_array_push(&nested_array1, "item1", (JSE_ARRAY_VALUE){.int_value = 10}, JSE_ARRAY_TYPE_INT); + jse_array_push(&nested_array1, "item2", (JSE_ARRAY_VALUE){.str_value = jse_strdup("nested")}, JSE_ARRAY_TYPE_STRING); + jse_array_push(&array1, "nested", (JSE_ARRAY_VALUE){.array_value = &nested_array1}, JSE_ARRAY_TYPE_ARRAY); + + JSE_ARRAY array2 = jse_array_create(); + jse_array_push(&array2, "age", (JSE_ARRAY_VALUE){.int_value = 30}, JSE_ARRAY_TYPE_INT); + jse_array_push(&array2, "name", (JSE_ARRAY_VALUE){.str_value = jse_strdup("Jane")}, JSE_ARRAY_TYPE_STRING); + + // Первый вложенный массив + JSE_ARRAY nested_array2 = jse_array_create(); + jse_array_push(&nested_array2, "item1", (JSE_ARRAY_VALUE){.int_value = 10}, JSE_ARRAY_TYPE_INT); + jse_array_push(&nested_array2, "item2", (JSE_ARRAY_VALUE){.str_value = jse_strdup("nested")}, JSE_ARRAY_TYPE_STRING); + jse_array_push(&nested_array2, "item3", (JSE_ARRAY_VALUE){.str_value = jse_strdup("new")}, JSE_ARRAY_TYPE_STRING); + jse_array_push(&array2, "nested", (JSE_ARRAY_VALUE){.array_value = &nested_array2}, JSE_ARRAY_TYPE_ARRAY); + + jse_array_value_dump(jse_array_getByKey(&array2, "nested"),4); + jse_array_value_dump(jse_array_getByKey(&array2, "i5ufjk4uj"),8); + + // Выполняем сравнение массивов + JSE_ARRAY diff = jse_array_diff(&array1, &array2); + + // Выводим результаты сравнения + printf("Difference between array1 and array2:\n"); + jse_array_dump(diff,4); + + // Освобождаем память + jse_array_free(&array1); + jse_array_free(&array2); + jse_array_free(&diff); +} + + +jsval_t jse_ext_array(struct js *js, jsval_t *args, int nargs) { + + qemu_log("JGA size: %d ",JSE_GLOBAL_ARRAY.size); + + // Создаем буфер + JSE_ARRAY* arr = (JSE_ARRAY*) calloc(1, sizeof(JSE_ARRAY)); + arr->pairs = (JSE_ARRAY_DATA*) calloc(1, JSE_EXT_ARRAY_INITIAL_SIZE * sizeof(JSE_ARRAY_DATA)); + arr->size = 0; + arr->capacity = JSE_EXT_ARRAY_INITIAL_SIZE; + + qemu_log("Created array: %x ",arr); + jse_array_push(&JSE_GLOBAL_ARRAY, "__GLOBAL__", (JSE_ARRAY_VALUE){.array_value = arr}, JSE_ARRAY_TYPE_ARRAY); + + qemu_log("JGA size: %d ",JSE_GLOBAL_ARRAY.size); + qemu_log("ARR size: %d ",arr->size); + + return js_mknum(JSE_GLOBAL_ARRAY.size - 1); +} + +jsval_t jse_ext_array_push(struct js *js, jsval_t *args, int nargs) { + //qemu_note("[NOTE] jse_ext_array_push"); + + if (nargs < 3) return js_mkerr(js,"%n args are required.", 3); + int Index = jse_getInt(js,args[0]); + const char* Key = js_str(js,args[1]); + JSE_ARRAY_DATA data = jse_array_getByIndex(&JSE_GLOBAL_ARRAY, Index); + + if (data.type != JSE_ARRAY_TYPE_ARRAY){ + return js_mkerr(js,"This element is not an array."); + } + //qemu_note("Array => Index: %d | Type: %d",Index, data.type); + + JSE_ARRAY_VALUE val = data.value; + JSE_ARRAY* arr = val.array_value; + + //qemu_note("[NOTE] Test dump! Size:%d | Capacity:%d", arr->size, arr->capacity); + + int val_type = js_type(args[2]); + + if (val_type == JS_NUM){ + jse_array_push(arr, Key, (JSE_ARRAY_VALUE){.int_value = js_getnum(args[2])}, JSE_ARRAY_TYPE_INT); + } else if (val_type == JS_STR) { + const char* Value = js_str(js,args[2]); + jse_array_push(arr, Key, (JSE_ARRAY_VALUE){.str_value = jse_strdup(Value)}, JSE_ARRAY_TYPE_STRING); + } else if (val_type == JS_UNDEF || val_type == JS_FALSE || val_type == JS_NULL){ + jse_array_push(arr, Key, (JSE_ARRAY_VALUE){.int_value = 0}, JSE_ARRAY_TYPE_INT); + } else if (val_type == JS_TRUE){ + jse_array_push(arr, Key, (JSE_ARRAY_VALUE){.int_value = 1}, JSE_ARRAY_TYPE_INT); + } else { + qemu_note("Undetected type: %x", val_type); + } + + return js_mknum(arr->size - 1); +} + + +jsval_t jse_ext_array_editByID(struct js *js, jsval_t *args, int nargs) { + //qemu_note("[NOTE] jse_ext_array_push"); + + if (nargs < 3) return js_mkerr(js,"%n args are required.", 3); + int Index = jse_getInt(js,args[0]); + int Key = jse_getInt(js,args[1]); + JSE_ARRAY_DATA data = jse_array_getByIndex(&JSE_GLOBAL_ARRAY, Index); + + if (data.type != JSE_ARRAY_TYPE_ARRAY){ + return js_mkerr(js,"This element is not an array."); + } + //qemu_note("Array => Index: %d | Type: %d",Index, data.type); + + JSE_ARRAY_VALUE val = data.value; + JSE_ARRAY* arr = val.array_value; + + //qemu_note("[NOTE] Test dump! Size:%d | Capacity:%d", arr->size, arr->capacity); + + int val_type = js_type(args[2]); + + if (val_type == JS_NUM){ + jse_array_editByID(arr, Key, (JSE_ARRAY_VALUE){.int_value = js_getnum(args[2])}, JSE_ARRAY_TYPE_INT); + } else if (val_type == JS_STR) { + const char* Value = js_str(js,args[2]); + jse_array_editByID(arr, Key, (JSE_ARRAY_VALUE){.str_value = jse_strdup(Value)}, JSE_ARRAY_TYPE_STRING); + } else if (val_type == JS_UNDEF || val_type == JS_FALSE || val_type == JS_NULL){ + jse_array_editByID(arr, Key, (JSE_ARRAY_VALUE){.int_value = 0}, JSE_ARRAY_TYPE_INT); + } else if (val_type == JS_TRUE){ + jse_array_editByID(arr, Key, (JSE_ARRAY_VALUE){.int_value = 1}, JSE_ARRAY_TYPE_INT); + } else { + qemu_note("Undetected type: %x", val_type); + } + + return js_mkundef(); +} + + +jsval_t jse_ext_array_getByKey(struct js *js, jsval_t *args, int nargs) { + //qemu_note("[NOTE] jse_ext_array_getByKey"); + + if (nargs < 2) return js_mkerr(js,"%n args are required.", 2); + int Index = jse_getInt(js,args[0]); + const char* Key = js_str(js,args[1]); + JSE_ARRAY_DATA data = jse_array_getByIndex(&JSE_GLOBAL_ARRAY, Index); + + if (data.type != JSE_ARRAY_TYPE_ARRAY){ + return js_mkerr(js,"This element is not an array."); + } + //qemu_note("Array => Index: %d | Type: %d",Index, data.type); + + JSE_ARRAY_VALUE val = data.value; + JSE_ARRAY* arr = val.array_value; + + //qemu_note("[NOTE] Test dump! Size:%d | Capacity:%d", arr->size, arr->capacity); + + JSE_ARRAY_DATA a_data = jse_array_getByKey(arr, Key); + if (a_data.type == JSE_ARRAY_TYPE_NULL) return js_mkundef(); + if (a_data.type == JSE_ARRAY_TYPE_ARRAY) return js_mkstr(js,"(Array)",strlen("(Array)")); + JSE_ARRAY_VALUE a_val = a_data.value; + if (a_data.type == JSE_ARRAY_TYPE_STRING) return js_mkstr(js,a_val.str_value,strlen("a_val.str_value")); + if (a_data.type == JSE_ARRAY_TYPE_INT) { + char* buf = calloc(1, 64); + itoa(a_val.int_value, buf); + jsval_t ret = js_mkstr(js, buf, strlen(buf)); + free(buf); + return ret; + } + return js_mkundef(); +} + + +jsval_t jse_ext_array_getByIndex(struct js *js, jsval_t *args, int nargs) { + //qemu_note("[NOTE] jse_ext_array_getByIndex"); + if (nargs < 2) return js_mkerr(js,"%n args are required.", 2); + int Index = jse_getInt(js,args[0]); + int Key = jse_getInt(js,args[1]); + JSE_ARRAY_DATA data = jse_array_getByIndex(&JSE_GLOBAL_ARRAY, Index); + + if (data.type != JSE_ARRAY_TYPE_ARRAY){ + qemu_err("It's no ARRAY!"); + return js_mkfalse(); + } + //qemu_note("Array => Index: %d | Type: %d",Index, data.type); + + JSE_ARRAY_VALUE val = data.value; + JSE_ARRAY* arr = val.array_value; + + //qemu_note("[NOTE] Test dump! Size:%d | Capacity:%d", arr->size, arr->capacity); + + JSE_ARRAY_DATA a_data = jse_array_getByIndex(arr, Key); + if (a_data.type == JSE_ARRAY_TYPE_NULL) return js_mkundef(); + if (a_data.type == JSE_ARRAY_TYPE_ARRAY) return js_mkstr(js,"(Array)",strlen("(Array)")); + JSE_ARRAY_VALUE a_val = a_data.value; + if (a_data.type == JSE_ARRAY_TYPE_STRING) return js_mkstr(js,a_val.str_value,strlen("a_val.str_value")); + if (a_data.type == JSE_ARRAY_TYPE_INT) { + char* buf = calloc(1, 64); + itoa(a_val.int_value, buf); + jsval_t ret = js_mkstr(js, buf, strlen(buf)); + free(buf); + return ret; + } + return js_mkundef(); +} + +jsval_t jse_ext_array_length(struct js *js, jsval_t *args, int nargs) { + //qemu_note("[NOTE] jse_ext_array_getByIndex"); + if (nargs < 1) return js_mkerr(js,"%n args are required.", 1); + int Index = jse_getInt(js,args[0]); + JSE_ARRAY_DATA data = jse_array_getByIndex(&JSE_GLOBAL_ARRAY, Index); + + if (data.type != JSE_ARRAY_TYPE_ARRAY){ + qemu_err("It's no ARRAY!"); + return js_mkfalse(); + } + //qemu_note("Array => Index: %d | Type: %d",Index, data.type); + + JSE_ARRAY_VALUE val = data.value; + JSE_ARRAY* arr = val.array_value; + + //qemu_note("[NOTE] Test dump! Size:%d | Capacity:%d", arr->size, arr->capacity); + + return js_mknum(arr->size); +} + +jsval_t jse_ext_array_dump(struct js *js, jsval_t *args, int nargs) { + //qemu_note("[NOTE] jse_ext_array_getByIndex"); + if (nargs < 1) return js_mkerr(js,"%n args are required.", 1); + int Index = jse_getInt(js,args[0]); + JSE_ARRAY_DATA data = jse_array_getByIndex(&JSE_GLOBAL_ARRAY, Index); + + if (data.type != JSE_ARRAY_TYPE_ARRAY){ + qemu_err("It's no ARRAY!"); + return js_mkfalse(); + } + //qemu_note("Array => Index: %d | Type: %d",Index, data.type); + + JSE_ARRAY_VALUE val = data.value; + JSE_ARRAY* arr = val.array_value; + + jse_array_link_dump(arr,0); + + return js_mkundef(); +} + +jsval_t jse_ext_array_diff(struct js *js, jsval_t *args, int nargs) { + //qemu_note("[NOTE] jse_ext_array_getByIndex"); + if (nargs < 2) return js_mkerr(js,"%n args are required.", 2); + int Index = jse_getInt(js,args[0]); + int Index2 = jse_getInt(js,args[1]); + JSE_ARRAY_DATA data = jse_array_getByIndex(&JSE_GLOBAL_ARRAY, Index); + + if (data.type != JSE_ARRAY_TYPE_ARRAY){ + qemu_err("#1 It's no ARRAY!"); + return js_mkfalse(); + } + + JSE_ARRAY_DATA data2 = jse_array_getByIndex(&JSE_GLOBAL_ARRAY, Index2); + + if (data2.type != JSE_ARRAY_TYPE_ARRAY){ + qemu_err("#2 It's no ARRAY!"); + return js_mkfalse(); + } + + JSE_ARRAY_VALUE val1 = data.value; + JSE_ARRAY* array = val1.array_value; + + JSE_ARRAY_VALUE val2 = data2.value; + JSE_ARRAY* other_array = val2.array_value; + + //////////////////////// + + // Создаем буфер + JSE_ARRAY* diff_array = (JSE_ARRAY*)calloc(1, sizeof(JSE_ARRAY)); + diff_array->pairs = (JSE_ARRAY_DATA*)calloc(1, JSE_EXT_ARRAY_INITIAL_SIZE * sizeof(JSE_ARRAY_DATA)); + diff_array->size = 0; + diff_array->capacity = JSE_EXT_ARRAY_INITIAL_SIZE; + + qemu_log("Created array: %x ",diff_array); + jse_array_push(&JSE_GLOBAL_ARRAY, "__GLOBAL__", (JSE_ARRAY_VALUE){.array_value = diff_array}, JSE_ARRAY_TYPE_ARRAY); + + for (int i = 0; i < array->size; i++) { + int found_in_other = 0; + for (int j = 0; j < other_array->size; j++) { + if (array->pairs[i].type == other_array->pairs[j].type) { + if (array->pairs[i].type == JSE_ARRAY_TYPE_INT) { + if (array->pairs[i].value.int_value == other_array->pairs[j].value.int_value) { + found_in_other = 1; + break; + } + } else if (array->pairs[i].type == JSE_ARRAY_TYPE_STRING) { + if (strcmp(array->pairs[i].value.str_value, other_array->pairs[j].value.str_value) == 0) { + found_in_other = 1; + break; + } + } else if (array->pairs[i].type == JSE_ARRAY_TYPE_ARRAY) { + // Рекурсивное сравнение для массивов + JSE_ARRAY nested_diff = jse_array_diff(array->pairs[i].value.array_value, other_array->pairs[j].value.array_value); + if (nested_diff.size > 0) { + found_in_other = 1; + jse_array_push(&diff_array, array->pairs[i].key, array->pairs[i].value, array->pairs[i].type); + } + } + } + } + if (!found_in_other) { + jse_array_push(diff_array, array->pairs[i].key, array->pairs[i].value, array->pairs[i].type); + } + } + + /////////////////////// + + return js_mknum(JSE_GLOBAL_ARRAY.size - 1); +} + +/** + * @brief - [JSE] [EXT] [Array] Настройка окружения для функционала JSE | Поддержка массивов + * + * @param struct js* js - Ссылка на JSE + */ +void jse_array_config(struct js* js){ + qemu_note("[JSE] [EXT] [Array] Registration of functions"); + JSE_GLOBAL_ARRAY = jse_array_create(); + js_set(js, js_glob(js), "array", js_mkfun(jse_ext_array)); + js_set(js, js_glob(js), "array_push", js_mkfun(jse_ext_array_push)); + js_set(js, js_glob(js), "array_getByKey", js_mkfun(jse_ext_array_getByKey)); + js_set(js, js_glob(js), "array_getByIndex", js_mkfun(jse_ext_array_getByIndex)); + js_set(js, js_glob(js), "array_length", js_mkfun(jse_ext_array_length)); + js_set(js, js_glob(js), "array_dump", js_mkfun(jse_ext_array_dump)); + js_set(js, js_glob(js), "array_diff", js_mkfun(jse_ext_array_diff)); + js_set(js, js_glob(js), "array_editByID", js_mkfun(jse_ext_array_editByID)); + + ///jse_array_test(); +} + +void jse_array_destroZ(JSE_ARRAY* array, int space){ + char* sp = (char*)calloc(1, sizeof(char) * (space + 1)); + memset(sp,' ', space); + sp[space] = 0; + + qemu_note("%s|--- Size:%d | Capacity:%d", sp, array->size, array->capacity); + for (int i = 0; i < array->size; i++){ + qemu_note("%s|--- Delete data %d / %d",sp, i + 1, array->size); + if (array->pairs[i].type != JSE_ARRAY_TYPE_STRING && + array->pairs[i].type != JSE_ARRAY_TYPE_INT && + array->pairs[i].type != JSE_ARRAY_TYPE_ARRAY){ + qemu_log(" %s |--- Skipping data (Fantom type: %x)", sp, array->pairs[i].type); + continue; + } + free(array->pairs[i].key); + qemu_ok(" %s |--- Delete key",sp); + if (array->pairs[i].type == JSE_ARRAY_TYPE_STRING) { + free(array->pairs[i].value.str_value); + qemu_ok(" %s |--- Delete string",sp); + } else if (array->pairs[i].type == JSE_ARRAY_TYPE_ARRAY) { + // Дополнительная логика для освобождения памяти массива + // Игнорируется, тк данный участок будет позже отчищен автоматический + qemu_note("%s |--- [IGN] GOTO %x",sp , array->pairs[i].value.array_value); + //jse_array_destroZ(array->pairs[i].value.array_value, sp + 8); + } + } + qemu_ok(" %s|--- Delete pars",sp); + free(array->pairs); + qemu_ok(" %s|--- Delete array",sp); + free(array); + free(sp); +} + +void jse_array_destroy(struct js* js){ + //qemu_err("[JSE] [EXT] [Array] [Destroy] DISABLED!!!!!"); + //return; + qemu_note("[JSE] [EXT] [Array] Destroy"); + + qemu_note(" |--- Size:%d | Capacity:%d", JSE_GLOBAL_ARRAY.size, JSE_GLOBAL_ARRAY.capacity); + for (int i = 0; i < JSE_GLOBAL_ARRAY.size; i++){ + qemu_note(" |--- Delete data %d / %d", i + 1, JSE_GLOBAL_ARRAY.size); + free(JSE_GLOBAL_ARRAY.pairs[i].key); + qemu_ok(" |--- Delete key"); + if (JSE_GLOBAL_ARRAY.pairs[i].type == JSE_ARRAY_TYPE_STRING) { + free(JSE_GLOBAL_ARRAY.pairs[i].value.str_value); + qemu_ok(" |--- Delete string"); + } else if (JSE_GLOBAL_ARRAY.pairs[i].type == JSE_ARRAY_TYPE_ARRAY) { + // Дополнительная логика для освобождения памяти массива + qemu_note(" |--- GOTO %x", JSE_GLOBAL_ARRAY.pairs[i].value.array_value); + jse_array_destroZ(JSE_GLOBAL_ARRAY.pairs[i].value.array_value, 8); + } + } + qemu_ok(" |--- Delete global pars"); + free(JSE_GLOBAL_ARRAY.pairs); + qemu_ok(" |--- Delete global array"); + //free(JSE_GLOBAL_ARRAY); +} \ No newline at end of file diff --git a/kernel/src/lib/elk/ext/jse_array.h b/kernel/src/lib/elk/ext/jse_array.h new file mode 100644 index 000000000..8950a720f --- /dev/null +++ b/kernel/src/lib/elk/ext/jse_array.h @@ -0,0 +1,62 @@ +#ifndef SAYORI_JSE_ARRAY_H +#define SAYORI_JSE_ARRAY_H + +#pragma once +#include "common.h" + +#define JSE_EXT_ARRAY_INITIAL_SIZE 16 ///! По-умолчанию создается с объемом + +/** + * @brief Типы данных + */ +typedef enum { + JSE_ARRAY_TYPE_NULL, ///! Неизвестный тип данных или поврежден + JSE_ARRAY_TYPE_INT, ///! Число + JSE_ARRAY_TYPE_STRING, ///! Строка + JSE_ARRAY_TYPE_ARRAY ///! Массив +} JSE_ARRAY_TYPE; + +/** + * @brief Значение ключа + */ +typedef union { + int32_t int_value; ///! Числовое значение (при JSE_ARRAY_TYPE_INT) + char* str_value; ///! Строка (при JSE_ARRAY_TYPE_STRING) + struct JSE_ARRAY* array_value; ///! Массив (при JSE_ARRAY_TYPE_ARRAY) +} JSE_ARRAY_VALUE; + +/** + * @brief Данные массива + */ +typedef struct { + char* key; ///! Ключ + JSE_ARRAY_VALUE value; ///! Значение + JSE_ARRAY_TYPE type; ///! Тип +} JSE_ARRAY_DATA; + +/** + * @brief Структура массива + */ +typedef struct JSE_ARRAY { + JSE_ARRAY_DATA* pairs; ///! Данные (ключ,значение) + int size; ///! Кол-во элементов + int capacity; ///! Массив памяти +} JSE_ARRAY; + +/// Array +JSE_ARRAY jse_array_create(); +JSE_ARRAY* jse_array_link_create(); +void jse_array_link_dump(JSE_ARRAY* arr, int space); +void jse_array_dump(JSE_ARRAY arr,int space); +void jse_array_value_dump(JSE_ARRAY_DATA data, int space); +void jse_array_push(JSE_ARRAY* arr, const char* key, JSE_ARRAY_VALUE value, JSE_ARRAY_TYPE type); +JSE_ARRAY_DATA jse_array_getByKey(JSE_ARRAY* arr, const char* key); +JSE_ARRAY_DATA jse_array_getByIndex(JSE_ARRAY* arr, int index); +void jse_array_free(JSE_ARRAY* arr); +JSE_ARRAY jse_array_change_key_case(const JSE_ARRAY* orig, int uppercase); +void jse_array_fill(JSE_ARRAY* arr, int start_index, int count, JSE_ARRAY_VALUE value, JSE_ARRAY_TYPE type); +JSE_ARRAY jse_array_diff(JSE_ARRAY* array, JSE_ARRAY* other_array); +void jse_array_destroZ(JSE_ARRAY* array, int space); +void jse_array_editByID(JSE_ARRAY* arr, int Index, JSE_ARRAY_VALUE value, JSE_ARRAY_TYPE type); + +#endif //SAYORI_JSE_ARRAY_H diff --git a/kernel/src/lib/elk/ext/jse_canvas.c b/kernel/src/lib/elk/ext/jse_canvas.c new file mode 100644 index 000000000..88201038a --- /dev/null +++ b/kernel/src/lib/elk/ext/jse_canvas.c @@ -0,0 +1,234 @@ +/// JavaScript Engine - Поддержка библиотек +#include "portability.h" +#include +#include "io/tty.h" +#include "lib/stdio.h" + +#include "../elk_config.h" +#include "../elk.h" + +/// Планы на canvas, список функций и примеров можно глянуть по этой ссылке +/// https://msiter.ru/references/canvas-reference + +/// Пиксельные манипуляции (0 из 6) +/// [-] canvas.data | Возвращает объект, содержащий данные изображения заданного объекта ImageData +/// [+] canvas.height | Возвращает высоту объекта ImageData +/// [+] canvas.width | Возвращает ширину объекта ImageData +/// [-] canvas.createImageData() | Создает новый, пустой объект ImageData +/// [-] canvas.getImageData() | Возвращает объект ImageData, который копирует пиксельные данные заданной прямоугольной области холста +/// [-] canvas.putImageData() | Помещает данные изображения (из заданного объекта ImageData) обратно в элемент + +/// Цвета, стили, тени (1 из 10) +/// [+] canvas.fillStyle | Устанавливает/возвращает цвет, градиент или шаблон, используемый для заливки графического объекта +/// [-] canvas.shadowBlur | Устанавливает/возвращает уровень размытости для теней +/// [-] canvas.shadowColor | Устанавливает/возвращает цвет для теней +/// [-] canvas.shadowOffsetX | Устанавливает/возвращает горизонтальное расстояние тени от фигуры +/// [-] canvas.shadowOffsetY | Устанавливает/возвращает вертикальное расстояние тени от фигуры +/// [-] canvas.strokeStyle | Устанавливает/возвращает цвет, градиент или шаблон, используемый для обводки фигуры +/// [-] canvas.addColorStop() | Определяет цвета и позицию остановки в объекте градиента +/// [-] canvas.createLinearGradient() | Создает линейный градиент (для использования с содержимым элемента ) +/// [-] canvas.createPattern() | Размножает заданный элемент в заданном направлении +/// [-] canvas.createRadialGradient() | Создает радиальный/круговой градиент (для использования на содержимом элемента ) + +/// Текст (0 из 6) +/// [-] canvas.font | Устанавливает/возвращает свойства шрифта для текстового содержимого +/// [-] canvas.textAlign | Устанавливает/возвращает выравнивание для текстового содержимого +/// [-] canvas.textBaseline | Устанавливает/возвращает базовую линию, используемую при выводе текста +/// [-] canvas.fillText() | Рисует текст с заливкой +/// [-] canvas.measureText() | Возвращает объект, содержащий ширину заданного текста +/// [-] canvas.strokeText() | Рисует текст без заливки + +/// Компоновка (0 из 2) +/// [-] canvas.globalAlpha | Устанавливает/возвращает текущее значение прозрачности или альфа-канала графического объекта +/// [-] canvas.globalCompositeOperation | Устанавливает/возвращает то, как исходное (новое) изображение нарисовано на целевом (существующем) изображении + +/// Стили линий (1 из 4) +/// [-] canvas.lineCap | Устанавливает/возвращает стиль концов нарисованной линии +/// [-] canvas.lineJoin | Устанавливает/возвращает тип угла, созданного пересечением двух линий +/// [+] canvas.lineWidth | Устанавливает/возвращает ширину текущей линии +/// [-] canvas.miterLimit | Устанавливает/возвращает максимальную длину среза + +/// Контуры (0 из 12) +/// [-] canvas.arc() | Создает дугу/кривую (используется для создания окружностей или их части) +/// [-] canvas.arcTo() | Создает дугу/кривую между двумя касательными +/// [-] canvas.beginPath() | Начинает контур или сбрасывает текущий контур +/// [-] canvas.bezierCurveTo() | Создает кубическую кривую Безье +/// [-] canvas.clip() | Обрезает область любой формы и размера, находящуюся вне указанного контура +/// [-] canvas.closePath() | Замыкает контур соединяя последнюю точку с первой +/// [-] canvas.fill() | Делает заливку текущей фигуры (контура) +/// [-] canvas.isPointInPath() | Возвращает значение true, если заданная точка находится внутри текущего контура, в обратном случае возвращается значение false +/// [-] canvas.lineTo() | Добавляет новую точку контура и создает линию к этой точке от последней заданной точки +/// [-] canvas.moveTo() | Передвигает точку контура в заданные координаты не рисуя линию +/// [-] canvas.quadraticCurveTo() | Создает квадратичную кривую Безье +/// [-] canvas.stroke() | В действительности рисует определенный вами контур + +/// Прямоугольники (4 из 4) +/// [+] canvas.clearRect() | Очищает заданную область пикселей внутри данного прямоугольника +/// [+] canvas.fillRect() | Рисует "залитый" прямоугольник +/// [+] canvas.rect() | Создает прямоугольник +/// [+] canvas.strokeRect() | Рисует прямоугольник (без заливки) + +/// Вывод изображений (0 из 1) +/// [-] canvas.drawImage() | Рисует изображение, содержимое другого элемента или видео + +/// Трансформации (0 из 5) +/// [-] canvas.rotate() | Поворачивает текущий графический объект +/// [-] canvas.scale() | Изменяет масштаб текущего графического объекта +/// [-] canvas.setTransform() | Сбрасывает текущую матрицу трансформации в начальное состояние, а затем вызывает метод transform() с теми же параметрами +/// [-] canvas.transform() | Применяет заданную матрицу трансформации +/// [-] canvas.translate() | Ретранслирует позицию (0,0) в новое место + +/// Другое (0 из 5) +/// [-] canvas.save() | Сохраняет состояние текущего контекста +/// [-] canvas.restore() | Возвращает ранее сохраненное состояние и атрибуты +/// [-] canvas.createEvent() | +/// [-] canvas.getContext() | +/// [-] canvas.toDataURL() | + + +//uint8_t* jse_createBuffer(){ +// uint8_t *jse_framebuffer_addr; +// uint32_t jse_framebuffer_size = (getScreenHeight()) * (getDisplayPitch()); +// jse_framebuffer_addr = (uint8_t*)kcalloc(jse_framebuffer_size, 1); +// qemu_note("[JSE] [Canvas] Create buffer: %x | Size: %d", framebuffer_addr, jse_framebuffer_size); +// return jse_framebuffer_addr; +//} + +jsval_t jse_ext_canvas_fillStyle(struct js *js, jsval_t *args, int nargs) { + if (nargs != 1) return js_mknum(js->Canvas.fillStyle); + int c = jse_func_atoi(js_str(js,(args[0]))); // Fetch 1st arg + qemu_log(" [JSE] [EXT] [Canvas] [fillStyle] Color:%x", c); + js->Canvas.fillStyle = c; + return js_mknum(js->Canvas.fillStyle); +} + +jsval_t jse_ext_canvas_setPixel(struct js *js, jsval_t *args, int nargs) { + if (nargs != 3) return js_mkfalse(); + int x = jse_func_atoi(js_str(js,(args[0]))); // Fetch 1st arg + int y = jse_func_atoi(js_str(js,(args[1]))); // Fetch 2st arg + int c = jse_func_atoi(js_str(js,(args[2]))); // Fetch 3st arg + qemu_log(" [JSE] [EXT] [Canvas] [setPixel] X: %d | Y: %d | Color:%x", x, y, c); + set_pixel(x, y, c); + return js_mktrue(); +} + + +jsval_t jse_ext_canvas_lineWidth(struct js *js, jsval_t *args, int nargs) { + if (nargs != 1) return js_mknum(js->Canvas.lineWidth); + int c = jse_func_atoi(js_str(js,(args[0]))); // Fetch 1st arg + qemu_log(" [JSE] [EXT] [Canvas] [lineWidth] lineWidth:%d", c); + js->Canvas.lineWidth = c; + return js_mknum(js->Canvas.lineWidth); +} + + +jsval_t jse_ext_canvas_width(struct js *js, jsval_t *args, int nargs) { + return js_mknum(js->Canvas.width); +} + + +jsval_t jse_ext_canvas_height(struct js *js, jsval_t *args, int nargs) { + return js_mknum(js->Canvas.height); +} + +jsval_t jse_ext_canvas_fillRect(struct js *js, jsval_t *args, int nargs) { + if (nargs != 4) return js_mkundef(); + int x = jse_getInt(js,args[0]); // Fetch 1st arg + int y = jse_getInt(js,args[1]); // Fetch 2nd arg + int w = jse_getInt(js,args[2]); // Fetch 3nd arg + int h = jse_getInt(js,args[3]); // Fetch 4nd arg + + int color = js->Canvas.fillStyle; + qemu_log(" [JSE] [EXT] [Canvas] [fillRect] X:%d Y:%d W:%d H:%d Color:%x", x, y, w, h, color); + drawRect(x, y, w, h, color); + + return js_mktrue(); +} + + +jsval_t jse_ext_canvas_clearRect(struct js *js, jsval_t *args, int nargs) { + if (nargs != 4) return js_mkundef(); + int x = jse_getInt(js,args[0]); // Fetch 1st arg + int y = jse_getInt(js,args[1]); // Fetch 2nd arg + int w = jse_getInt(js,args[2]); // Fetch 3nd arg + int h = jse_getInt(js,args[3]); // Fetch 4nd arg + + drawRect(x, y, w, h, 0xFF000000); + qemu_log(" [JSE] [EXT] [Canvas] [clearRect] X:%d Y:%d W:%d H:%d", x, y, w, h); + + return js_mktrue(); +} + + +jsval_t jse_ext_canvas_strokeRect(struct js *js, jsval_t *args, int nargs) { + if (nargs != 4) return js_mkundef(); + int x = jse_getInt(js,args[0]); // Fetch 1st arg + int y = jse_getInt(js,args[1]); // Fetch 2nd arg + int w = jse_getInt(js,args[2]); // Fetch 3nd arg + int h = jse_getInt(js,args[3]); // Fetch 4nd arg + int lineWidth = js->Canvas.lineWidth; // Ширина линии + int color = js->Canvas.fillStyle; + if (lineWidth == 0) return js_mkfalse(); + + for (int i = 0; i < lineWidth; i++) { + int new_width = w + 2 * i; + int new_height = h + 2 * i; + set_pixel(x - i, y - i, color); // Верхняя граница + set_pixel(x - i + new_width, y - i, color); // Правая граница + set_pixel(x - i, y - i + new_height, color); // Нижняя граница + set_pixel(x - i + new_width, y - i + new_height, color); // Левая граница + } + + for (int i = 0; i < lineWidth; i++) { + int new_x = x + i; + int new_y = y + i; + int new_width = w - 2 * i; + int new_height = h - 2 * i; + for (int j = new_y; j < new_y + new_height; j++) { + set_pixel(new_x, j, color); // Левая граница + set_pixel(new_x + new_width, j, color); // Правая граница + } + for (int j = new_x; j < new_x + new_width; j++) { + set_pixel(j, new_y, color); // Верхняя граница + set_pixel(j, new_y + new_height, color); // Нижняя граница + } + } + qemu_log(" [JSE] [EXT] [Canvas] [strokeRect] X:%d Y:%d W:%d H:%d Color:%x", x, y, w, h, color); + + //drawRect(x, y, w, h, 0xFF000000); + + return js_mktrue(); +} + + +void jse_canvas_config(struct js* js){ + // Установка значений по умолчанию + JSE_CANVAS cfg = js->Canvas; + cfg.fillStyle = 0xFFFFFF; + cfg.lineWidth = 2; + cfg.width = 800; + cfg.height = 600; + // Регистрация функционала + qemu_note("[JSE] [EXT] [Canvas] Registration of functions"); + js_set(js, js_glob(js), "canvas_fillRect", js_mkfun(jse_ext_canvas_fillRect)); + js_set(js, js_glob(js), "canvas_clearRect", js_mkfun(jse_ext_canvas_clearRect)); + js_set(js, js_glob(js), "canvas_strokeRect", js_mkfun(jse_ext_canvas_strokeRect)); + + js_set(js, js_glob(js), "canvas_height", js_mkfun(jse_ext_canvas_height)); + js_set(js, js_glob(js), "canvas_width", js_mkfun(jse_ext_canvas_width)); + + js_set(js, js_glob(js), "canvas_fillStyle", js_mkfun(jse_ext_canvas_fillStyle)); + js_set(js, js_glob(js), "canvas_lineWidth", js_mkfun(jse_ext_canvas_lineWidth)); + + /// Допы + + js_set(js, js_glob(js), "canvas_setPixel", js_mkfun(jse_ext_canvas_setPixel)); + + /// Алиасы + js_set(js, js_glob(js), "canvas_rect", js_mkfun(jse_ext_canvas_fillRect)); + return; +} + +void jse_canvas_destroy(struct js* js){ + +} \ No newline at end of file diff --git a/kernel/src/lib/elk/ext/jse_canvas.h b/kernel/src/lib/elk/ext/jse_canvas.h new file mode 100644 index 000000000..f11a456a3 --- /dev/null +++ b/kernel/src/lib/elk/ext/jse_canvas.h @@ -0,0 +1,30 @@ +#ifndef SAYORI_JSE_CANVAS_H +#define SAYORI_JSE_CANVAS_H +#pragma once + +#include "common.h" +/// Структура экрана/холста Canvas - все еще может быть изменина пока не будет доведено, до финальной версии +typedef struct { + int Init; ///< Инициализировано? + int x; ///< Позиция по Х + int y; ///< Позиция по Y + uint8_t* data; ///< Ссылка на буфер + int height; ///< Высота экрана + int width; ///< Ширина экрана + uint32_t fillStyle; ///< Цвет заливки + int shadowBlur; ///< Уровень размытости для теней + int shadowColor; ///< Цвет для теней + int shadowOffsetX; ///< Горизонтальное расстояние тени от фигуры + int shadowOffsetY; ///< Вертикальное расстояние тени от фигуры + int strokeStyle; ///< Цвет, градиент или шаблон, используемый для обводки фигуры + int font; ///< Cвойства шрифта для текстового содержимого + int textAlign; ///< Выравнивание для текстового содержимого + int textBaseline; ///< Базовая линия, используемая при выводе текста + int globalAlpha; ///< Текущее значение прозрачности или альфа-канала + int globalCompositeOperation; ///< Как исходное (новое) изображение нарисовано на экране + int lineCap; ///< Стиль концов нарисованной линии + int lineJoin; ///< Тип угла, созданного пересечением двух линий + int lineWidth; ///< Ширина текущей линии +} __attribute__((packed)) JSE_CANVAS; + +#endif //SAYORI_JSE_CANVAS_H diff --git a/kernel/src/lib/elk/ext/jse_event.c b/kernel/src/lib/elk/ext/jse_event.c new file mode 100644 index 000000000..97afcaf94 --- /dev/null +++ b/kernel/src/lib/elk/ext/jse_event.c @@ -0,0 +1,177 @@ +/// JavaScript Engine - Поддержка событый +#include "portability.h" +#include +#include "io/tty.h" +#include "lib/stdio.h" + + +#include +#include + +#include "../elk_config.h" +#include "../elk.h" + +int jse_event_kbd_i = -1; ///< Индекс триггера клавиатуры +int jse_event_mouse_i = -1; ///< Индекс триггера мыши + +JSE_EVENT_KBD_KEY_STATE jse_event_kbd_state[256]= {0}; // Массив для отслеживания состояния каждой клавиши +uint32_t jse_event_kbd_combo = 0; +uint32_t jse_event_kbd_lastCode = 0; +uint32_t jse_event_kbd_lastTime = 0; + + +uint32_t jse_event_mouse_lastTime = 0; +uint32_t jse_event_mouse_x = 0; +uint32_t jse_event_mouse_y = 0; +uint32_t jse_event_mouse_combo = 0; + + +void jse_event_mouse(void* data1,void* data2,void* data3,void* data4,void* data5){ + jse_event_mouse_x = (int) data4; + jse_event_mouse_y = (int) data5; + jse_event_mouse_combo = ((int) data1 << 2) | ((int) data2 << 1) | (int) data3; +} + +void jse_event_kbd(void* data1,void* data2,void* data3,void* data4,void* data5){ + int keyCode = (int)data1; + int keyPress = (int)data2; + ///qemu_log("[JSE] [Event] [KBD] Key: %d | Press: %d",keyCode, keyPress); + jse_event_kbd_lastCode = (keyPress?keyCode:0); + uint32_t jse_event_kbd_lastTime = 0; + jse_event_kbd_state[keyCode].Last = getTicks(); // Сохраняем время последнего вызова + // Обновляем состояние клавиши + if (keyPress) { // Клавиша зажата + if (jse_event_kbd_state[keyCode].Status == 0) { // Клавиша была отпущена + jse_event_kbd_state[keyCode].Start = getTicks(); // Устанавливаем время нажатия + jse_event_kbd_state[keyCode].End = 0; + jse_event_kbd_state[keyCode].Status = 1; // Обновляем статус клавиши + jse_event_kbd_combo |= (1 << keyCode); // Установка комбо-значения + } else { + return; + } + } else { // Клавиша отпущена + if (jse_event_kbd_state[keyCode].Status == 1) { // Клавиша была зажата + jse_event_kbd_state[keyCode].End = getTicks(); // Устанавливаем время отпускания + jse_event_kbd_state[keyCode].Status = 0; // Обновляем статус клавиши + jse_event_kbd_state[keyCode].Last = getTicks(); // Сохраняем время последнего вызова + jse_event_kbd_combo &= ~(1 << keyCode); // Снятие комбо-значения + } + } +} + + + +jsval_t jse_ext_event_test1(struct js *js, jsval_t *args, int nargs) { + int x = 0x1000; // Fetch 1st arg + char* test = "Test elly net!"; + qemu_log(" [JSE] [EXT] [Event] [test1] x:%x", test); + return js_mkstr(js, test, strlen(test)); +} + +jsval_t jse_ext_event_kbd_waitForAnyKey(struct js *js, jsval_t *args, int nargs) { + if (nargs == 0) return js_mknum(0); + while (1){ + for (int i = 0; i < nargs; i++){ + int c = jse_getInt(js,args[i]); + if (jse_event_kbd_lastCode == c){ + return js_mknum(c); + } + } + } + return js_mktrue(); +} + +jsval_t jse_ext_event_kbd_waitForAnyKeyOnce(struct js *js, jsval_t *args, int nargs) { + if (nargs == 0) return js_mknum(0); + while (1){ + for (int i = 0; i < nargs; i++){ + int c = jse_getInt(js,args[i]); + if (jse_event_kbd_lastCode == c){ + jse_event_kbd_lastCode = 0; + return js_mknum(c); + } + } + } + return js_mktrue(); +} + +jsval_t jse_ext_event_kbd(struct js *js, jsval_t *args, int nargs) { + if (nargs != 1) return js_mknum(jse_event_kbd_lastCode); + int c = jse_getInt(js,args[0]); + if (c == 0) return js_mknum(jse_event_kbd_lastCode); + if (c == 1) return js_mknum(jse_event_kbd_lastTime); + if (c == 2) return js_mknum(jse_event_kbd_combo); + return js_mkundef(); +} + + +jsval_t jse_ext_event_mouse(struct js *js, jsval_t *args, int nargs) { + if (nargs != 1) return js_mknum(jse_event_mouse_combo); + int c = jse_getInt(js,args[0]); + if (c == 0) return js_mknum(jse_event_mouse_combo); + if (c == 1) return js_mknum(jse_event_mouse_x); + if (c == 2) return js_mknum(jse_event_mouse_y); + if (c == 3) return js_mknum(jse_event_mouse_lastTime); + return js_mkundef(); +} + +jsval_t jse_ext_event_debug(struct js *js, jsval_t *args, int nargs) { + if (nargs != 1) return js_mkundef(); + int t = js_type(args[0]); + int x = jse_getInt(js,args[0]); + + const char* str = js_str(js,args[0]); + qemu_log(" [JSE] [EXT] [Event] [Debug] T:%d | X:%x | (%d) %s", t, x, strlen(str), str); + + if (t == JS_PRIV){ + // Это тип данных объекта + JSE_ARRAY* arr = js_getObjectToArray(js, args[0]); + //jse_array_editByID(arr, 2, (JSE_ARRAY_VALUE){.int_value = 5730575}, JSE_ARRAY_TYPE_INT); + jse_array_link_dump(arr, 0); + jse_array_destroZ(arr,0); + jse_array_free(arr); + } + + return js_mktrue(); +} + +void jse_event_config(struct js* js){ + qemu_note("[JSE] [EXT] [Event] Registration of functions"); + js_set(js, js_glob(js), "event_debug", js_mkfun(jse_ext_event_debug)); + js_set(js, js_glob(js), "event_test1", js_mkfun(jse_ext_event_test1)); + js_set(js, js_glob(js), "kbd", js_mkfun(jse_ext_event_kbd)); + js_set(js, js_glob(js), "kbd_waitForAnyKey", js_mkfun(jse_ext_event_kbd_waitForAnyKey)); + js_set(js, js_glob(js), "kbd_waitForAnyKeyOnce", js_mkfun(jse_ext_event_kbd_waitForAnyKeyOnce)); + js_set(js, js_glob(js), "mouse", js_mkfun(jse_ext_event_mouse)); + + if (jse_event_kbd_i == -1){ + jse_event_kbd_i = RegTrigger(0x0001, &jse_event_kbd); ///< Регистрация нажатий клавы + } else { + OnTrigger(jse_event_kbd_i); + } + + if (jse_event_mouse_i == -1){ + jse_event_mouse_i = RegTrigger(0x0003, &jse_event_mouse); ///< Регистрация нажатий и движений мыши + } else { + OnTrigger(jse_event_mouse_i); + } + + /// Отключаем анимацию и вывод ввода клавиатуры + keyboardctl(KEYBOARD_ECHO, false); + set_cursor_enabled(false); +} + +void jse_event_destroy(struct js* js){ + qemu_note("[JSE] [EXT] [Event] Destroy"); + if (jse_event_kbd_i != -1){ + OffTrigger(jse_event_kbd_i); + } + + if (jse_event_mouse_i != -1){ + OffTrigger(jse_event_mouse_i); + } + + /// Возвращаем анимацию и вывод ввода клавиатуры + keyboardctl(KEYBOARD_ECHO, true); + set_cursor_enabled(true); +} diff --git a/kernel/src/lib/elk/ext/jse_event.h b/kernel/src/lib/elk/ext/jse_event.h new file mode 100644 index 000000000..c3c6b57a1 --- /dev/null +++ b/kernel/src/lib/elk/ext/jse_event.h @@ -0,0 +1,11 @@ +#ifndef SAYORI_JSE_EVENT_H +#define SAYORI_JSE_EVENT_H + +typedef struct JSE_EVENT_KBD_KEY_STATE_t { + int8_t Status; ///< Статус + uint32_t Start; ///< Когда нажато + uint32_t End; ///< Когда отпущенно + uint32_t Last; ///< Последний вызов +} JSE_EVENT_KBD_KEY_STATE; + +#endif //SAYORI_JSE_EVENT_H diff --git a/kernel/src/lib/elk/ext/jse_function.h b/kernel/src/lib/elk/ext/jse_function.h new file mode 100644 index 000000000..82474d7af --- /dev/null +++ b/kernel/src/lib/elk/ext/jse_function.h @@ -0,0 +1,24 @@ +#ifndef SAYORI_JSE_FUNCTION_H +#define SAYORI_JSE_FUNCTION_H + +char* jse_strstr(const char* haystack, const char* needle); +void jse_ncpy(char *destination, const char *source, int length); +void jse_trim(char *str); +char* jse_mergeBuffers(char *buffer1, char *buffer2, int bufferSize1, int bufferSize2); +void jse_func_tolower(char* as); +void jse_func_toupper(char* as); +char jse_func_char_tolower(char ch); +int jse_func_atoi(const char* str); +int jse_p_int(const char* str, char** endptr); +char* jse_strdup(const char* str); +#endif //SAYORI_JSE_FUNCTION_H + + +#ifdef SAYORI_ELK_H +void jse_canvas_config(struct js* js); +void jse_canvas_destroy(struct js* js); +void jse_event_config(struct js* js); +void jse_array_config(struct js* js); +void jse_array_destroy(struct js* js); +int jse_getInt(struct js *js, jsval_t arg); +#endif //SAYORI_ELK_H \ No newline at end of file diff --git a/kernel/src/lib/elk/jse_func.c b/kernel/src/lib/elk/jse_func.c new file mode 100644 index 000000000..f7b213d71 --- /dev/null +++ b/kernel/src/lib/elk/jse_func.c @@ -0,0 +1,253 @@ +/// JavaScript Engine - Спомогательные функции +#include "portability.h" +#include + + +#include "io/tty.h" +#include "lib/libstring/string.h" +#include "../libvector/include/vector.h" +#include "lib/stdio.h" + + +#include "elk_config.h" +#include "elk.h" + +char* jse_strstr(const char* haystack, const char* needle) { + if (*needle == '\0') { + return (char*) haystack; + } + + while (*haystack) { + const char* h = haystack; + const char* n = needle; + + while (*h && *n && (*h == *n)) { + h++; + n++; + } + + if (*n == '\0') { + return (char*) haystack; + } + + haystack++; + } + + return NULL; +} + +void jse_ncpy(char *destination, const char *source, int length) { + for (int i = 0; i < length; i++) { + if (source[i] != '\0') { + destination[i] = source[i]; // Копируем символ из source в destination + } else { + destination[i] = '\0'; // Дополняем destination нулевыми символами, если source закончилась + } + } +} + + +void jse_trim(char *str) { + int start = 0, end = strlen(str) - 1; + + // Удаляем пробелы в начале строки + while (str[start] == ' ' || str[start] == '\t' || str[start] == '\n') { + start++; + } + + // Удаляем пробелы в конце строки + while (str[end] == ' ' || str[end] == '\t' || str[end] == '\n') { + end--; + } + + // Сдвигаем символы, чтобы удалить пробелы в начале + for (int i = 0; i <= end - start; i++) { + str[i] = str[i + start]; + } + + // Устанавливаем конец строки + str[end - start + 1] = '\0'; +} + +// Функция для совмещения двух буферов с текстом +char* jse_mergeBuffers(char *buffer1, char *buffer2, int bufferSize1, int bufferSize2) { + //qemu_log("\n\nbuf1: [%d] '%s'\n\n", bufferSize1, buffer1); + //qemu_log("\n\nbuf2: [%d] '%s'\n\n", bufferSize2, buffer2); + int mergedSize = bufferSize1 + bufferSize2 ; // Вычисляем размер объединенного буфера + char *mergeResult = (char *)calloc(1, (mergedSize + 1) * sizeof(char)); // Выделяем память под новый буфер + + // Копируем содержимое первого буфера в объединенный буфер + jse_ncpy(mergeResult, buffer1, bufferSize1); + + // Копируем содержимое второго буфера в объединенный буфер + jse_ncpy(mergeResult + bufferSize1, buffer2, bufferSize2); + + // Устанавливаем завершающий нулевой символ + mergeResult[mergedSize] = '\0'; + + // Освобождаем память, занятую первым буфером + free(buffer1); + // Освобождаем память, занятую вторым буфером + // Я сам освобождаю его в другом месте, поэтому тут оно не надо + //free(buffer2); + + return mergeResult; +} + +/** + * @brief Перевод строки в нижний регистр + * + * @param as - Указатель на строку. + */ +void jse_func_tolower(char* as){ + while(*as != 0) + { + if(*as >= 'A' && *as <= 'Z') + *as += ('a' - 'A'); + as++; + } +} + +/** + * @brief Перевод строки в верхний регистр + * + * @param as - Указатель на строку. + */ +void jse_func_toupper(char* as){ + while(*as != 0) + { + if(*as >= 'a' && *as <= 'z') + *as -= ('a' - 'A'); + as++; + } +} + +char jse_func_char_tolower(char ch) { + if (ch >= 'A' && ch <= 'Z') { + return ch + 32; // Разница между большой и маленькой буквой в ASCII + } else { + return ch; + } +} + +int jse_func_atoi(const char* str) { + int result = 0; + int sign = 1; + int base = 10; // По умолчанию десятичная система + + // Пропускаем начальные пробелы + while (*str == ' ') { + str++; + } + + // Обрабатываем знак +/- + if (*str == '-') { + sign = -1; + str++; + } else if (*str == '+') { + str++; + } + + // Обработка префиксов 0x (шестнадцатеричное число) и 0 (восьмеричное число) + if (*str == '0') { + str++; + if (*str == 'x' || *str == 'X') { + base = 16; // Шестнадцатеричная система + str++; + } else { + base = 8; // Восьмеричная система + } + } + + // Обработка числовых символов + while (*str) { + int digit = *str - '0'; + if (digit >= 0 && digit < base) { + result = result * base + digit; + } else if (base == 16) { + int hex = *str - 'A' + 10; + if (hex >= 10 && hex < 16) { + result = result * base + hex; + } else { + break; + } + } else { + break; + } + str++; + } + + return sign * result; +} + + +/// Unused +int jse_p_int(const char* str, char** endptr){ + int result = 0; + bool negative = false; + int exponent = 0; + int sign = 1; + + // Пропускаем начальные пробелы + while (*str == ' ') { + str++; + } + + // Определяем знак числа + if (*str == '-' || *str == '+') { + sign = (*str++ == '-') ? -1 : 1; + } + + // Парсим целую часть числа + while (*str >= '0' && *str <= '9') { + result = result * 10 + (*str++ - '0'); + } + + // Парсим дробную часть числа + if (*str == '.') { + //double fraction = 1.0; + str++; + while (*str >= '0' && *str <= '9') { + //result = result + (double)(*str - '0') / (fraction *= 10.0); + str++; + } + } + + result *= sign; + + if (endptr != NULL) { + *endptr = (char*)str; + } + + return result; +} + +int jse_getInt(struct js *js, jsval_t arg){ + int type = js_type(arg); + if (type == JS_NUM) return js_getnum(arg); + if (type == JS_STR) return jse_func_atoi(js_str(js,arg)); + if (type == JS_UNDEF) return 0; + if (type == JS_NULL) return 0; + if (type == JS_FALSE) return 0; + if (type == JS_TRUE) return 1; + return js_mkundef(); +} + +/** + * @brief Функция strdup дублирует строку, на которую указывает аргумент str. Память под дубликат строки выделяется с помощью функции malloc, и по окончанию работы с дубликатом должна быть очищена с помощью функции free + * + * @param str + * + * @return char* строка + */ +char* jse_strdup(const char* str) { + size_t length = strlen(str) + 1; // Длина строки + 1 для символа '\0' + char* newStr = calloc(1,length); // Выделение памяти для новой строки + + if (newStr != NULL) { + memcpy(newStr, str, length); // Копирование содержимого исходной строки + newStr[length] = 0; + } + + return newStr; +} \ No newline at end of file diff --git a/kernel/src/lib/freeada/ada.c b/kernel/src/lib/freeada/ada.c new file mode 100644 index 000000000..8c14ee5c8 --- /dev/null +++ b/kernel/src/lib/freeada/ada.c @@ -0,0 +1,310 @@ +/** + * @file lib/freeada/ada.c + * @author Даниил Лебедев (github.com/holu31) + * @brief Мини-порт Ada в Sayori + * @version 0.0.1 + * @date 2023-12-16 + * @copyright Copyright SayoriOS Team (c) 2022-2023 +*/ + +// TODO: rewrite to codegen to own VM + +#include +#include +#include +#include + +#include "portability.h" +#include "ada.h" + +//#define DEBUG + +#define TOKEN(ttype, tvalue) ada->token.type = ttype; \ + ada->token.value = tvalue; \ + ada->token.start_pos = ada->old_pos; \ + ada->token.end_pos = ada->pos; \ + ada->token.line = ada->line; + +#define CHECK(ttype) if(ada->token.type != ttype) { ada_err_curtoken(ada, "syntax error, you put"); return 2; } +#define CHECK_NEXT(ttype) ada_next(ada); CHECK(ttype); + +ada_string_t *ada_string_new() { + ada_string_t *str = kmalloc(sizeof(ada_string_t)); + str->size = 0; + str->data = (char*) kmalloc(sizeof(char) * (str->size+1)); + + return str; +} + +ada_string_t *ada_string_from(char *s) { + ada_string_t *str = kmalloc(sizeof(ada_string_t)); + str->size = strlen(s); + str->data = (char*) kmalloc(sizeof(char) * (str->size+1)); + + strcpy(str->data, s); + str->data[str->size] = '\0'; + + return str; +} + +void ada_string_push(ada_string_t *str, char c) { + str->size++; + str->data = (char*) krealloc(str->data, sizeof(char) * (str->size+1)); + str->data[str->size-1] = c; + str->data[str->size] = '\0'; +} + +void ada_string_free(ada_string_t *str) { + free(str->data); + free(str); +} + +void ada_lnumber(ada_t *ada) { + ada_string_t *buffer = ada_string_new(); + char c = ada->data[ada->pos]; + ada_string_push(buffer, c); + ada->pos++; + + while(ada->pos < ada->size) { + c = ada->data[ada->pos]; + + if(c >= '0' && c <= '9') { + ada_string_push(buffer, c); + ada->pos++; + } else break; + } + #ifdef DEBUG + qemu_note("%s number token = %s", ADA_LPREF, buffer->data); + #endif + TOKEN(T_NUMBER, buffer->data); + ada_string_free(buffer); + +} + +void ada_lident(ada_t *ada) { + ada_string_t *buffer = ada_string_new(); + + while(ada->pos < ada->size) { + char c = ada->data[ada->pos]; + + if((c >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z') || + (c == '_') || (c >= '0' && c <= '9')) { + ada_string_push(buffer, c); + ada->pos++; + } else break; + } + #ifdef DEBUG + qemu_note("%s ident token = '%s'", ADA_LPREF, buffer->data); + #endif + TOKEN(T_IDENT, buffer->data); + ada_string_free(buffer); +} + +void ada_lstring(ada_t *ada) { + ada_string_t *buffer = ada_string_new(); + ada->pos++; + + while(ada->pos < ada->size) { + char c = ada->data[ada->pos]; + + if (c == '"') { + ada->pos++; + break; + } + + ada_string_push(buffer, c); + ada->pos++; + } + #ifdef DEBUG + qemu_note("%s string token = '%s'", ADA_LPREF, buffer->data); + #endif + TOKEN(T_STRING, buffer->data); + ada_string_free(buffer); +} + +void ada_lchar(ada_t *ada, tokenType type) { + TOKEN(type, &ada->data[ada->pos]); + #ifdef DEBUG + qemu_note("%s char token = '%c'", ADA_LPREF, ada->data[ada->pos]); + #endif + ada->pos++; +} + +void ada_next(ada_t *ada) { + while(ada->pos < ada->size) { + ada->old_pos = ada->pos; + char c = ada->data[ada->pos]; + + if((c >= '0' && c <= '9') || (c == '-')){ + return ada_lnumber(ada); + } + else if((c >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z') || (c == '_')) { + return ada_lident(ada); + } + else if(c == '"') { + return ada_lstring(ada); + } + else if(c == '(') return ada_lchar(ada, T_LPAREN); + else if(c == ')') return ada_lchar(ada, T_RPAREN); + else if(c == '+') return ada_lchar(ada, T_PLUS); + else if(c == '-') return ada_lchar(ada, T_MINUS); + else if(c == '.') return ada_lchar(ada, T_DOT); + else if(c == ';') return ada_lchar(ada, T_SEMICOLON); + else ada->pos++; + } + + TOKEN(T_NONE, "\0"); +} + +void ada_err_curtoken(ada_t *ada, char *err) { + qemu_err("%s [%d:%d] %s '%s'", ADA_LPREF, + ada->token.line, ada->token.start_pos, err, ada->token.value); +} + +void ada_p_eval(ada_t *ada, char *left){ + ada_next(ada); + ada_string_t *right; + int result; + switch(ada->token.type) { + case T_PLUS: + ada_next(ada); + right = ada_string_from(ada->token.value); + + result = atoi(left) + atoi(right->data); + ada_string_free(right); + itoa(result, left); + ada_p_eval(ada, left); + + break; + case T_NUMBER: + right = ada_string_from(ada->token.value); + result = atoi(left) + atoi(right->data); + ada_string_free(right); + itoa(result, left); + ada_p_eval(ada, left); + default: ada->pos--; + } +} + +void *ada_p_expr(ada_t *ada) { + ada_string_t *t = ada_string_from(ada->token.value); + if(ada->token.type == T_STRING) { + return (void*) t->data; + } else if(ada->token.type == T_IDENT) { + if(strcmp(t->data,"PI") == 0) { + ada_p_eval(ada, "3.14"); + return (void*) "3.14"; + } + else { + return (void*) t->data; + } + } else if(ada->token.type == T_NUMBER) { + ada_p_eval(ada, t->data); + return (void*) t->data; + } + return (void*) 0; +} + +int ada_p_function(ada_t *ada) { + char *function_name; // <------------------------------------------------\ + strcpy(function_name, ada->token.value); // Тоесть блять это пиздец? --------/ + if(ada->token.type == T_IDENT) { + CHECK_NEXT(T_LPAREN); + ada_next(ada); + + void *expr = ada_p_expr(ada); + if(expr != (void*) 0){ + for (int i = 0; i < ada->functions_cnt; i++){ + // Без этого почему-то не получается + // ладно, потом разберусь + qemu_log("Called function '%s'", ada->functions[i].name->data); + if(strcmp(function_name, ada->functions[i].name->data) == 0) { + ada->functions[i].c_ptr(expr); + } + } + } + + CHECK_NEXT(T_RPAREN); + return 1; + } + return 0; +} + +int ada_p_line(ada_t *ada) { + int result = ada_p_function(ada); + if(result == 2) { + return 2; + } + if(result == 0) { + qemu_err("%s [%d:%d] Syntax error '%s'", ADA_LPREF, + ada->token.line, ada->token.start_pos, ada->token.value); + return 2; + } + CHECK_NEXT(T_SEMICOLON); + return 1; +} + +void ada_parse(ada_t *ada) { + ada_next(ada); + while (ada->token.type != T_NONE) { + if(ada_p_line(ada) == 2) + break; + ada_next(ada); + } +} + +void ada_handler_fn(ada_t *ada, char *fn_name, ada_fn_t handler) { + ada->functions_cnt++; + ada->functions = krealloc(ada->functions, sizeof(ada_function_t) * (ada->functions_cnt)); + ada->functions[ada->functions_cnt-1].name = ada_string_from(fn_name); + ada->functions[ada->functions_cnt-1].c_ptr = handler; +} + +void ada_free_functions(ada_t *ada) { + for(int i = 0; i < ada->functions_cnt; i++) { + ada_string_free(ada->functions[i].name); + } + kfree(ada->functions); + ada->functions_cnt = 0; +} + +void ada_file(char *filename) { + FILE *f = fopen(filename, "r"); + if(!f) { + qemu_err("%s Failed to open file '%s'", ADA_LPREF, filename); + return; + } + int size = fsize(f); + + char *fdata = (char*) kcalloc(sizeof(char) * (size+1), 1); + fread(f, 1, size, fdata); + fclose(f); + + qemu_note("%s data: %s, size: %d", ADA_LPREF, fdata, size); + + ada_new(fdata); +} + +ada_fn_t *ada_putline(void* expr) { + qemu_log("%s result of print: %s", ADA_LPREF, (char*) expr); + + return 0; +} + +void ada_new(char *data) { + ada_t *ada = (void*) 0; + ada->data = data; + ada->size = strlen(data); + ada->pos = 0; + ada->old_pos = 0; + ada->line = 1; + ada->functions_cnt = 0; + ada->functions = kmalloc(sizeof(ada_function_t) * (ada->functions_cnt)); + + ada_handler_fn(ada, "Put_Line", (ada_fn_t*) ada_putline); + + ada_parse(ada); + + ada_free_functions(ada); + kfree(ada->data); +} \ No newline at end of file diff --git a/kernel/src/lib/freeada/ada.h b/kernel/src/lib/freeada/ada.h new file mode 100644 index 000000000..3ffd623f7 --- /dev/null +++ b/kernel/src/lib/freeada/ada.h @@ -0,0 +1,41 @@ +#define ADA_LPREF "[ADA]" + +typedef int (*ada_fn_t)(void*); + +typedef enum { + T_NONE, T_NUMBER, T_IDENT, T_PLUS, T_MINUS, + T_STRING, T_DOT, T_SEMICOLON, T_LPAREN, T_RPAREN, +} tokenType; + +typedef struct { + char *data; + int size; +} ada_string_t; + +typedef struct { + tokenType type; + char *value; + uint32_t start_pos; + uint32_t end_pos; + uint32_t line; +} token_t; + +typedef struct { + ada_string_t *name; + ada_fn_t c_ptr; +} ada_function_t; + +typedef struct { + char *data; + uint32_t size; + uint32_t pos; + uint32_t old_pos; + uint32_t line; + token_t token; + ada_function_t *functions; + uint32_t functions_cnt; +} ada_t; + +void ada_handler_fn(ada_t *ada, char *fn_name, ada_fn_t handler); +void ada_new(char *data); +void ada_file(char *filename); \ No newline at end of file diff --git a/kernel/src/lib/libstring/include/string.h b/kernel/src/lib/libstring/include/string.h new file mode 100644 index 000000000..e5c66cba2 --- /dev/null +++ b/kernel/src/lib/libstring/include/string.h @@ -0,0 +1,30 @@ +// +// Created by ndraey on 04.10.23. +// + +#pragma once + +#include "common.h" +#include "../../libvector/include/vector.h" + +typedef struct string { + char* data; + + size_t length; +} string_t; + +#define ADDR2STRING(addr) ((string_t*)(addr)) + +string_t* string_new(); +void string_append_charptr(string_t* string, const char* concatenable); +void string_append(string_t* string, const string_t* concatenable); +void string_crop(string_t* string, size_t start, size_t end); +void string_append_char(string_t* string, char ch); +string_t* string_from_charptr(const char* chars); +string_t* string_from_sized_charptr(const char* chars, size_t length); +vector_t* string_split(string_t* string, const char* delimiter); +void string_split_free(vector_t* vec); +string_t* string_clone(string_t* str); +void string_reverse(string_t* str); +string_t* string_from_integer(int number); +void string_destroy(string_t *string); diff --git a/kernel/src/lib/libstring/src/string.c b/kernel/src/lib/libstring/src/string.c new file mode 100644 index 000000000..193a4e156 --- /dev/null +++ b/kernel/src/lib/libstring/src/string.c @@ -0,0 +1,241 @@ +// +// Created by ndraey on 04.10.23. +// + +#include "portability.h" +#include "lib/stdlib.h" +#include "lib/string.h" +#include "lib/stdio.h" +#include "../include/string.h" + +string_t* string_new() { + string_t* string = calloc(sizeof *string, 1); + + if(!string) + return 0; + + string->data = calloc(1, 1); + string->length = 0; + + return string; +} + +void string_append_charptr(string_t* string, const char* concatenable) { + if(!string || !concatenable) + return; + + size_t len = strlen(concatenable); + + size_t alloc_len = len + string->length; + + char* memory = (char*)realloc(string->data, alloc_len + 1); + + if(!memory) + return; + + memory[alloc_len] = 0; + + string->data = memory; + + if(string->data[0] == 0) { + strcpy(string->data, concatenable); + } else { + strcat(string->data, concatenable); + } + + string->length = alloc_len; +} + +void string_append(string_t* string, const string_t* concatenable) { + if(!string || !concatenable) + return; + + string_append_charptr(string, concatenable->data); +} + +void string_crop(string_t* string, size_t start, size_t end) { + if(!string || start >= end || end > string->length) + return; + + size_t new_length = end - start; + + char* data = malloc(new_length + 1); + + if(!data) + return; + + data[new_length] = 0; + + memcpy(data, string->data + start, new_length); + + free(string->data); + + string->data = data; + string->length = new_length; +} + +void string_append_char(string_t* string, char ch) { + if(!string) + return; + + char* data = realloc(string->data, string->length + 2); + + if(!data) + return; + + data[string->length] = ch; + data[string->length + 1] = 0; + + string->length++; + + string->data = data; +} + +string_t* string_from_charptr(const char* chars) { + string_t* string = calloc(sizeof *string, 1); + + if(!string) + return 0; + + string->length = strlen(chars); + string->data = malloc(string->length + 1); + + memcpy(string->data, chars, string->length); + string->data[string->length] = 0; + + return string; +} + +string_t* string_from_sized_charptr(const char* chars, size_t length) { + string_t* string = calloc(sizeof *string, 1); + + if(!string) + return 0; + + string->data = malloc(length + 1); + string->length = length; + + memcpy(string->data, chars, length); + string->data[string->length] = 0; + + return string; +} + +vector_t* string_split(string_t* string, const char* delimiter) { + if(!string || !delimiter) + return 0; + + vector_t* vec = vector_new(); + + if(!vec) + return 0; + + char* curptr = string->data; + size_t delim_len = strlen(delimiter); + + char* el = strstr(curptr, delimiter); + + if(!el) { // If no occurrences, just add whole string and return vector. + string_t* str = string_new(); + + string_append_charptr(str, curptr); + + vector_push_back(vec, (size_t)str); + + return vec; + } + + while(el) { + el = strstr(curptr, delimiter); + size_t len = el - curptr; + + if(el == 0) + len = strlen(curptr); + + string_t* substring = string_from_sized_charptr(curptr, len); + + vector_push_back(vec, (size_t)substring); + + curptr = el + delim_len; + } + + return vec; +} + +void string_split_free(vector_t* vec) { + if(!vec) + return; + + for(size_t i = 0; i < vec->size; i++) { + string_destroy((string_t*)vec->data[i]); + } + + vector_destroy(vec); +} + +string_t* string_clone(string_t* str) { + if(!str) + return 0; + + string_t* str2 = string_new(); + + if(!str2) + return 0; + + string_append(str2, str); + + return str2; +} + +void string_reverse(string_t *str) { + if(!str) + return; + + size_t len = str->length; + + for(size_t i = 0; i < len / 2; i++) { + char tmp = str->data[i]; + str->data[i] = str->data[len - i - 1]; + str->data[len - i - 1] = tmp; + } +} + +string_t* string_from_integer(int number) { + string_t* str = string_new(); + bool is_negative = false; + + if(!str) + return 0; + + if(number == 0) { + string_append_char(str, '0'); + + return str; + } + + if(number < 0) { + number = -number; + + is_negative = true; + } + + while(number > 0) { + string_append_char(str, (char)((number % 10) + '0')); + number /= 10; + } + + if(is_negative) { + string_append_char(str, '-'); + } + + string_reverse(str); + + return str; +} + +void string_destroy(string_t *string) { + if(string->data) + free(string->data); + + free(string); +} \ No newline at end of file diff --git a/kernel/src/lib/libvector/include/vector.h b/kernel/src/lib/libvector/include/vector.h new file mode 100644 index 000000000..383e4364e --- /dev/null +++ b/kernel/src/lib/libvector/include/vector.h @@ -0,0 +1,33 @@ +// libvector - simple dynamic array (vector) library for C by NDRAEY. + +#pragma once + +#include "common.h" + +typedef struct vector { + size_t* data; + + size_t size; + size_t capacity; +} vector_t; + +typedef struct vector_result { + bool error; + size_t element; +} vector_result_t; + +#define VEC_ERR (vector_result_t){true, 0} +#define VEC_OK(value) (vector_result_t){false, value} + +vector_t* vector_new(); +void vector_resize(vector_t* vec, size_t size); +void vector_push_back(vector_t* vec, size_t element); +vector_result_t vector_pop_back(vector_t* vec); +vector_result_t vector_get(vector_t* vec, size_t index); +vector_result_t vector_erase_nth(vector_t* vec, size_t n); +void vector_erase_all(vector_t* vec); +void vector_shrink_fit(vector_t* original); +void vector_swap(vector_t* vec, size_t first, size_t second); +vector_t* vector_clone(vector_t* original); +void vector_insert(vector_t* vec, size_t index, size_t value); +void vector_destroy(vector_t* vec); \ No newline at end of file diff --git a/kernel/src/lib/libvector/src/vector.c b/kernel/src/lib/libvector/src/vector.c new file mode 100644 index 000000000..5bce8c9f7 --- /dev/null +++ b/kernel/src/lib/libvector/src/vector.c @@ -0,0 +1,173 @@ +// libvector - simple dynamic array (vector) library for C by NDRAEY. + +#include "portability.h" +#include "lib/stdlib.h" +#include "lib/string.h" +#include "../include/vector.h" + +vector_t* vector_new() { + vector_t* vec = calloc(1, sizeof *vec); + + if(!vec) { + return 0; + } + + vec->data = calloc(1, sizeof(size_t)); + + if(!vec->data) { + free(vec); + + return 0; + } + + vec->size = 0; + vec->capacity = 1; + + return vec; +} + +void vector_resize(vector_t* vec, size_t size) { + if(!vec) + return; + + void* new_buf = realloc(vec->data, sizeof(size_t) * size); + + if(!new_buf) + return; + + vec->data = new_buf; + vec->capacity = size; + vec->size = size; +} + +void vector_push_back(vector_t* vec, size_t element) { + if(vec->size >= vec->capacity) { + + size_t new_cap = vec->capacity + ((vec->capacity + 1) / 2); + + void* new_buf = realloc(vec->data, sizeof(size_t) * new_cap); + + if(!new_buf) + return; + + vec->data = new_buf; + vec->capacity = new_cap; + } + + vec->data[vec->size++] = element; +} + +vector_result_t vector_pop_back(vector_t* vec) { + if(!vec) + return VEC_ERR; + + if(vec->size == 0) + return VEC_ERR; + + return (vector_result_t){false, vec->data[(vec->size--) - 1]}; +} + +vector_result_t vector_get(vector_t* vec, size_t index) { + if(!vec || index >= vec->size) + return VEC_ERR; + + return VEC_OK(vec->data[index]); +} + +void vector_erase_all(vector_t* vec) { + if(!vec) + return; + + free(vec->data); + + vec->data = calloc(1, sizeof(size_t)); + vec->size = 0; + vec->capacity = 1; +} + +vector_result_t vector_erase_nth(vector_t* vec, size_t n) { + if(!vec) + return VEC_ERR; + + if(n >= vec->size) + return VEC_ERR; + + size_t val = vec->data[n]; + + for(size_t i = n; i < vec->size - 1; i++) { + vec->data[i] = vec->data[i + 1]; + } + + vec->size--; + + return VEC_OK(val); +} + +vector_t* vector_clone(vector_t* original) { + if(!original) + return 0; + + vector_t* new_vec = calloc(1, sizeof *new_vec); + + new_vec->data = calloc(original->capacity, sizeof(size_t)); + + memcpy(new_vec->data, original->data, sizeof(size_t) * original->capacity); + + new_vec->size = original->size; + new_vec->capacity = original->capacity; + + return new_vec; +} + +void vector_shrink_fit(vector_t* original) { + if(!original) + return; + + void* data = realloc(original->data, original->size); + + if(!data) + return; + + original->data = data; + original->capacity = original->size; +} + +void vector_swap(vector_t* vec, size_t first, size_t second) { + if(!vec) + return; + + if(first >= vec->size || second >= vec->size) + return; + + + size_t b = vec->data[second]; + vec->data[second] = vec->data[first]; + vec->data[first] = b; +} + + + +void vector_insert(vector_t* vec, size_t index, size_t value) { + if(!vec) + return; + + if(index >= vec->size) + return; + + vector_resize(vec, vec->size + 1); + + for(size_t i = vec->size - 1; i > index; i--) { + vec->data[i] = vec->data[i - 1]; + } + + vec->data[index] = value; +} + +void vector_destroy(vector_t* vec) { + if(!vec) + return; + + free(vec->data); + + free(vec); +} diff --git a/kernel/src/lib/list.c b/kernel/src/lib/list.c old mode 100755 new mode 100644 index d4cefbf3f..117277b22 --- a/kernel/src/lib/list.c +++ b/kernel/src/lib/list.c @@ -2,7 +2,7 @@ * @file lib/list.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Массивы - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ diff --git a/kernel/src/lib/math/modf.c b/kernel/src/lib/math/modf.c new file mode 100644 index 000000000..1849bbb02 --- /dev/null +++ b/kernel/src/lib/math/modf.c @@ -0,0 +1,8 @@ +#include "lib/math.h" + +double modf(double value, double* intPart) { + if (intPart != NULL) { + *intPart = (value >= 0) ? floor(value) : ceil(value); + } + return value - (*intPart); +} \ No newline at end of file diff --git a/kernel/src/lib/php/explode.c b/kernel/src/lib/php/explode.c new file mode 100644 index 000000000..8d2afe7ab --- /dev/null +++ b/kernel/src/lib/php/explode.c @@ -0,0 +1,55 @@ +/** + * @file lib/php/explode.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief Функция замены строк + * @version 0.3.4 + * @date 2023-07-30 + * @copyright Copyright SayoriOS Team (c) 2022-2023 + */ +#include +#include "lib/string.h" +#include "lib/php/explode.h" + +/** + * @brief Функция отладки + * + * @param a_str - Строка для деления + * @param del - Делитель (только 1 символ) + * + * @return uint32_t - Количество строк + */ +uint32_t str_cdsp2(const char a_str[], char del){ + int x = 0; + for(size_t i = 0, len = strlen(a_str); i < len; i++){ + if (a_str[i] == del) { + x++; + } + } + return x; +} + +// TODO: Remake explode to work with libvector and libstring! +char** explode(const char str[], char delimiter) { + uint32_t ccc = str_cdsp2(str, delimiter); + char** result = kmalloc(strlen(str)*2); + int y = 0; + int a = 0; + + for (int b = 0; b <= ccc; b++) { + result[b] = kmalloc(strlen(str) * sizeof(char)); + } + + for (int i = 0; i < strlen(str); i++){ + if (str[i] == delimiter){ + result[a][y] = 0; + a++; + y = 0; + continue; + } + result[a][y] = str[i]; + y++; + } + + result[a][y] = 0; + return result; +} \ No newline at end of file diff --git a/kernel/src/lib/php/pathinfo.c b/kernel/src/lib/php/pathinfo.c new file mode 100644 index 000000000..e2b698baf --- /dev/null +++ b/kernel/src/lib/php/pathinfo.c @@ -0,0 +1,71 @@ +/** + * @file lib/php/pathinfo.c + * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @brief Функция замены строк + * @version 0.3.4 + * @date 2023-07-30 + * @copyright Copyright SayoriOS Team (c) 2022-2023 + */ + +#include +#include "mem/vmm.h" + +char* pathinfo(const char* Path, int Mode){ + int i = 0, length = strlen(Path), dot_index = -1; + char* info = kcalloc(length, 1); + if (Mode == PATHINFO_DIRNAME) { + for (i = length - 1; i >= 0; i--) { + if (Path[i] == '/' || Path[i] == '\\') { + break; + } + } + if (i >= 0) { + strncpy(info, Path, i + 1); + info[i + 1] = '\0'; + } else { + info[0] = '\0'; + } + } else if (Mode == PATHINFO_BASENAME){ + for (i = length - 1; i >= 0; i--) { + if (Path[i] == '/' || Path[i] == '\\') { + break; + } + } + + if (i >= 0) { + strncpy(info, Path + i + 1, length - i); + info[length - i] = '\0'; + } else { + strcpy(info, Path); + } + } else if (Mode == PATHINFO_EXTENSION){ + for (i = length - 1; i >= 0; i--) { + if (Path[i] == '.') { + break; + } + } + + if (i >= 0 && i < length - 1) { + strncpy(info, Path + i + 1, length - i); + info[length - i] = '\0'; + } else { + info[0] = '\0'; + } + } else { + for (i = length - 1; i >= 0; i--) { + if (Path[i] == '.') { + dot_index = i; + break; + } + } + + if (dot_index >= 0) { + strncpy(info, Path, dot_index); + info[dot_index] = '\0'; + } else { + // Если точка не найдена, возвращаем полное имя файла + strcpy(info, Path); + } + } + return info; +} \ No newline at end of file diff --git a/kernel/src/lib/php/str_replace.c b/kernel/src/lib/php/str_replace.c index 4bc953760..cfa90a511 100644 --- a/kernel/src/lib/php/str_replace.c +++ b/kernel/src/lib/php/str_replace.c @@ -1,8 +1,8 @@ /** - * @file lib/str_replace.c + * @file lib/php/str_replace.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Функция замены строк - * @version 0.3.3 + * @version 0.3.4 * @date 2023-07-30 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ @@ -12,9 +12,9 @@ /** * @brief Заменяет все вхождения символа поиска на символ замены * - * @param char search - Искомое значение, также известное как needle (иголка). - * @param char replace - Значение замены, будет использовано для замены искомых значений search. - * @param char* subject - Строка, в котором производится поиск и замена, также известный как haystack (стог сена). + * @param search - Искомое значение, также известное как needle (иголка). + * @param replace - Значение замены, будет использовано для замены искомых значений search. + * @param subject - Строка, в котором производится поиск и замена, также известный как haystack (стог сена). * * @return uint32_t - Количество произведенных замен */ @@ -34,9 +34,9 @@ uint32_t char_replace(char search, char replace, char* subject){ * * @warning Не готово * - * @param char search - Искомое значение, также известное как needle (иголка). - * @param char replace - Значение замены, будет использовано для замены искомых значений search. - * @param char* subject - Строка, в котором производится поиск и замена, также известный как haystack (стог сена). + * @param search - Искомое значение, также известное как needle (иголка). + * @param replace - Значение замены, будет использовано для замены искомых значений search. + * @param subject - Строка, в котором производится поиск и замена, также известный как haystack (стог сена). * * @return uint32_t - Количество произведенных замен */ diff --git a/kernel/src/lib/pixel.c b/kernel/src/lib/pixel.c index b4975cd58..334bd99e9 100644 --- a/kernel/src/lib/pixel.c +++ b/kernel/src/lib/pixel.c @@ -2,26 +2,16 @@ * @file lib/pixel.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Драйвера для работы с пикселями (Пакет Пиксель) - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-20 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include + #include -#include #include #include #include - -/** - * @brief Рисует линию (На 16 пикселей) - * - * @param y - Начальная координата y - * @param color - Цвет линии -*/ -void drawLine(int y,int color){ - drawRect(0, y, getScreenWidth(), y * 16, color); -} +#include /** * @brief Рисуем залитый прямоугольник @@ -33,8 +23,8 @@ void drawLine(int y,int color){ * @param color - цвет заливки */ void drawRect(uint32_t x, uint32_t y, uint32_t w, uint32_t h, uint32_t color){ - for (__typeof__(x) _y = y; _y < y+h; _y++){ - for (__typeof__(x) _x = x; _x < x+w ; _x++){ + for (__typeof__(x) _y = y, endy = y+h; _y < endy; _y++){ + for (__typeof__(x) _x = x, endx = x+w; _x < endx; _x++){ set_pixel(_x, _y, color); } } @@ -83,4 +73,208 @@ void drawRectBorder(int x, int y, int w, int h, int color){ set_pixel(x, _y, color); set_pixel(x+w, _y, color); } +} + +/** + * @brief Рисует горизонтальную линию + * + * @param x1 - Начальная координата X + * @param x2 - Конечная координата x + * @param y - Высота + * @param color - Цвет +*/ +void drawHorizontalLine(int x1, int x2, int y, uint32_t color) { + for (int x = x1; x <= x2; x++) { + set_pixel(x, y, color); + } +} + +/** + * @brief Рисует вертикальную линию + * + * @param y1 - Начальная координата Y + * @param y2 - Конечная координата Y + * @param x - Позиция по X + * @param color - Цвет +*/ +void drawVerticalLine(int y1, int y2, int x, uint32_t color) { + for (int y = y1; y <= y2; y++) { + set_pixel(x, y, color); + } +} + +/** + * @brief Рисует окружные пиксели круга линию + * + * @warning Спомогательная функция! + * + * @param cx - Позиция по X + * @param cy - Позиция по Y + * @param x - Смещение по X + * @param y - Смещение по Y + * @param color - Цвет +*/ +void drawCirclePoints(int cx, int cy, int x, int y, uint32_t color) { + set_pixel(cx + x, cy + y, color); + set_pixel(cx - x, cy + y, color); + set_pixel(cx + x, cy - y, color); + set_pixel(cx - x, cy - y, color); + set_pixel(cx + y, cy + x, color); + set_pixel(cx - y, cy + x, color); + set_pixel(cx + y, cy - x, color); + set_pixel(cx - y, cy - x, color); +} + +/** + * @brief Рисует круг + * + * @param cx - Позиция по X + * @param cy - Позиция по Y + * @param radius - Радиус круга + * @param color - Цвет +*/ +void drawCircle(int cx, int cy, int radius, uint32_t color) { + int x = 0; + int y = radius; + int p = 3 - 2 * radius; + drawCirclePoints(cx, cy, x, y, color); + + while (x <= y) { + if (p < 0) { + p = p + 4 * x + 6; + } else { + p = p + 4 * (x - y) + 10; + y--; + } + x++; + drawCirclePoints(cx, cy, x, y, color); + } +} + + +/** + * @brief Закрашивает круг + * + * @param x0 - Позиция по X + * @param y0 - Позиция по Y + * @param radius - Радиус круга + * @param color - Цвет +*/ +void drawFilledCircle(int x0, int y0, int radius, uint32_t color) { + int x = radius; + int y = 0; + int err = 0; + + while (x >= y) { + drawHorizontalLine(x0 - x, x0 + x, y0 + y, color); + drawHorizontalLine(x0 - x, x0 + x, y0 - y, color); + drawHorizontalLine(x0 - y, x0 + y, y0 + x, color); + drawHorizontalLine(x0 - y, x0 + y, y0 - x, color); + + if (err <= 0) { + y += 1; + err += 2*y + 1; + } + if (err > 0) { + x -= 1; + err -= 2*x + 1; + } + } +} + +/** + * @brief Закрашивает округленный куб + * + * @param x0 - Позиция по X + * @param y0 - Позиция по Y + * @param radius - Радиус круга + * @param w - Максимальная длина в сторону, не должно быть равным 0 + * @param mode - Какая сторона? + * @param color - Цвет +*/ +void drawFilledRectBorder(int x0, int y0, int radius, int w, int mode, uint32_t color) { + int x = radius; + int y = 0; + int err = 0; + + while (x >= y) { + drawHorizontalLine(x0 - x - (mode == 3 || mode == 4?(w/2):0), x0 + x + (mode == 1 || mode == 2?(w/2):0) , y0 - y, color); + drawHorizontalLine(x0 - y - (mode == 3 || mode == 4?(w/2):0), x0 + y + (mode == 1 || mode == 2?(w/2):0), y0 - x, color); + drawHorizontalLine(x0 - x - (mode == 3 || mode == 4?(w/2):0), x0 + x + (mode == 1 || mode == 2?(w/2):0) , y0 + y, color); + drawHorizontalLine(x0 - y - (mode == 3 || mode == 4?(w/2):0), x0 + y + (mode == 1 || mode == 2?(w/2):0), y0 + x, color); + + if (err <= 0) { + y += 1; + err += 2*y + 1; + } + if (err > 0) { + x -= 1; + err -= 2*x + 1; + } + } +} + +/** + * @brief Рисуем округленный куб закрашиваем его и обводим + * + * @param x - Позиция по X + * @param y - Позиция по Y + * @param size - Длина в стороны + * @param radius - На сколько закругляем куб? + * @param fill_color - Цвет закраски + * @param border_color - Цвет обводки +*/ +void drawRoundedSquare(int x, int y, int size, int radius, uint32_t fill_color, uint32_t border_color) { + // Отрисовываем внутренний заполненный квадрат + for (int i = x+1; i < x + size-1; i++) { + drawVerticalLine(y + radius, y + size - radius - 1, i, fill_color); + } + + + // Отрисовываем угловые закругления + if (radius > 0) { + drawFilledRectBorder(x + radius, y + radius, radius, size, 1, (border_color != -1 ? border_color : fill_color)); + drawFilledRectBorder(x + size - radius - 1, y + radius, radius,size, 3, (border_color != -1 ? border_color : fill_color)); + drawFilledRectBorder(x + radius, y + size - radius - 1, radius,size, 2, (border_color != -1 ? border_color : fill_color)); + drawFilledRectBorder(x + size - radius - 1, y + size - radius - 1, radius,size, 4, (border_color != -1 ? border_color : fill_color)); + } + + // Отрисовываем обводку квадрата + if (border_color != -1) { + drawHorizontalLine(x + radius, x + size - 1 - radius, y, border_color); + drawHorizontalLine(x + radius, x + size - 1 - radius, y + size - 1, border_color); + drawVerticalLine(y + radius, y + size - 1 - radius, x, border_color); + drawVerticalLine(y + radius, y + size - 1 - radius, x + size - 1, border_color); + } +} + + +/** + * @brief Рисуем округленный прямоугольник, закрашиваем его и обводим + * + * @param x - Позиция по X + * @param y - Позиция по Y + * @param width - Ширина + * @param height - Высота + * @param radius - Радиус закругления углов + * @param fill_color - Цвет закраски + * @param border_color - Цвет обводки + */ +void drawRoundedRectangle(int x, int y, int width, int height, int radius, uint32_t fill_color, uint32_t border_color) { + // Отрисовываем внутренний заполненный прямоугольник + for (int i = x + 1; i < x + width - 1; i++) { + for (int j = y + radius; j < y + height - radius; j++) { + set_pixel(i, j, fill_color); + } + } + + // Отрисовываем угловые закругления + if (radius > 0) { + drawFilledRectBorder(x + radius, y + radius, radius, width, 1, (border_color != -1 ? border_color : fill_color)); + drawFilledRectBorder(x + width - radius - 1, y + radius, radius,width, 3, (border_color != -1 ? border_color : fill_color)); + + drawFilledRectBorder(x + radius, y + height - radius - 1, radius,width, 2, (border_color != -1 ? border_color : fill_color)); + drawFilledRectBorder(x + width - radius - 1, y + height - radius - 1, radius,width, 4, (border_color != -1 ? border_color : fill_color)); + } + } \ No newline at end of file diff --git a/kernel/src/lib/rand.c b/kernel/src/lib/rand.c index 362cfaadc..829beff98 100644 --- a/kernel/src/lib/rand.c +++ b/kernel/src/lib/rand.c @@ -1,4 +1,4 @@ -#include +#include "drv/cmos.h" int rand_seed = 5829466; diff --git a/kernel/src/lib/split.c b/kernel/src/lib/split.c old mode 100755 new mode 100644 index e719a0078..dfd7244a2 --- a/kernel/src/lib/split.c +++ b/kernel/src/lib/split.c @@ -2,21 +2,24 @@ * @file lib/split.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Функция для деления строк - * @version 0.3.3 + * @version 0.3.4 * @date 2022-11-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include +#include + +#include "common.h" +#include "lib/string.h" /** * @brief Функция отладки * - * @param char* a_str - Строка для деления - * @param char* del - Делитель (только 1 символ) + * @param a_str - Строка для деления + * @param del - Делитель (только 1 символ) * * @return uint32_t - Количество строк */ -uint32_t str_cdsp(char* a_str, char* del){ +uint32_t str_cdsp(const char *a_str, const char* del){ int x = 0; for(size_t i = 0, len = strlen(a_str); i < len; i++){ if (a_str[i] == del[0]) { @@ -29,26 +32,27 @@ uint32_t str_cdsp(char* a_str, char* del){ /** * @brief Функция для деления строк * - * @param char* a_str[] - Строка для деления - * @param char *out[] - Здесь будет результат работы - * @param char* del[] - Делитель (только 1 символ) + * @param a_str - Строка для деления + * @param out - Здесь будет результат работы + * @param del - Делитель (только 1 символ) * - * @return char* - Здесь тоже будет результут работы */ -void str_split(char a_str[], char *out[], char* dec){ - int x = str_cdsp(a_str,dec); +void str_split(const char a_str[], char *out[], char* del){ + size_t x = str_cdsp(a_str, del); + // char* copy = kcalloc(strlen(a_str) + 1, 1); + // memcpy(copy, a_str, strlen(a_str)); int i = 0; char *p; - p = strtok(a_str, dec); + p = strtok(a_str, del); if (p == nullptr){ out[i] = a_str; } out[i] = p; i++; - for(uint32_t a = 0;a < x; a++){ - p = strtok(out[i], dec); + for(uint32_t a = 0; a < x; a++){ + p = strtok(out[i], del); if (p != nullptr){ out[i] = p; i++; diff --git a/kernel/src/lib/sprintf.c b/kernel/src/lib/sprintf.c index 582368f9e..2a7218be4 100644 --- a/kernel/src/lib/sprintf.c +++ b/kernel/src/lib/sprintf.c @@ -1,4 +1,10 @@ -#include +#include +#include "common.h" +#include "lib/math.h" +#include "mem/vmm.h" +#include "io/ports.h" +#include "drv/fpu.h" +#include "lib/stdlib.h" size_t measure_vsprintf(const char *format, va_list args) { ON_NULLPTR(format, { @@ -65,7 +71,6 @@ size_t measure_vsprintf(const char *format, va_list args) { size++; - qemu_log("Size + 1"); break; } case 'f': { @@ -250,7 +255,7 @@ int vsprintf(char* buffer, const char *format, va_list args) { case 'f': { // FIXME: IMPLEMENT PRECISION HERE! - + double a = va_arg(args, double); if(!fpu_isInitialized()) { memcpy(buffer, "0.00000", 7); @@ -259,39 +264,40 @@ int vsprintf(char* buffer, const char *format, va_list args) { break; } - if(a < 0) { + if(a < 0.0) { *buffer++ = '-'; a = -a; } - if(is_nan(a)) { - *buffer++ = 'n'; - *buffer++ = 'a'; - *buffer++ = 'n'; - - break; - } - - if(is_inf(a)) { - *buffer++ = 'i'; - *buffer++ = 'n'; - *buffer++ = 'f'; - - break; - } - - double rem = a - (int)a; - - itoa((int)a, buffer); - - buffer += digit_count((int)a); +// if(is_nan((float)a)) { +// *buffer++ = 'n'; +// *buffer++ = 'a'; +// *buffer++ = 'n'; +// +// break; +// } +// +// if(is_inf((float)a)) { +// *buffer++ = 'i'; +// *buffer++ = 'n'; +// *buffer++ = 'f'; +// +// break; +// } + + double intpart; + double floatpart = modf(a, &intpart); + + itoa((int)intpart, buffer); + + buffer += digit_count((int)intpart); *buffer++ = '.'; size_t prec = is_precision ? width : 5; for(int i = 0; i < prec; i++) { - *buffer++ = '0' + (int)(rem * ipow(10, i + 1)) % 10; + *buffer++ = '0' + (char)((int)(floatpart * pow(10.0, i + 1)) % 10); } break; @@ -360,8 +366,8 @@ int vsprintf(char* buffer, const char *format, va_list args) { case 'x': { // FIXME: IMPLEMENT PRECISION HERE! - int num = va_arg(args, int); - int space = width - hex_count(num) - 2; + unsigned int num = va_arg(args, unsigned int); + int space = (int)width - hex_count(num) - 2; if(left_align) { *buffer++ = '0'; diff --git a/kernel/src/lib/stdio.c b/kernel/src/lib/stdio.c old mode 100755 new mode 100644 index 003294d45..8a1134e95 --- a/kernel/src/lib/stdio.c +++ b/kernel/src/lib/stdio.c @@ -1,20 +1,29 @@ /** * @file lib/stdio.c - * @author Пиминов Никита (nikita.piminoff@yandex.ru) + * @authors Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) * @brief Функции для работы с файлами - * @version 0.3.3 + * @version 0.3.4 * @date 2022-11-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ + #include "io/ports.h" -#include +#include "mem/vmm.h" #include +#include +#include +#include + +bool stdio_debug = false; + + /** * @brief Получение режима работы (маски файла) * - * @param const char* mode - Режии + * @param mode - Режии * - * @return uint32_t - Режим работы (маска) + * @todo Оптимизировать работу с битовыми флагами + * @return Режим работы (маска) */ uint32_t fmodecheck(const char* mode){ ON_NULLPTR(mode, { @@ -84,15 +93,16 @@ uint32_t fmodecheck(const char* mode){ /** * @brief Проверка файла на наличие ошибок при работе * - * @param FILE* stream - Поток (файл) + * @param stream Поток (файл) */ void fcheckerror(FILE* stream){ ON_NULLPTR(stream, { qemu_log("stream is nullptr!"); return; }); - - if (!vfs_exists(stream->path)){ + + FSM_FILE finfo = nvfs_info(stream->path); + if (finfo.Ready == 0){ stream->err = STDIO_ERR_NO_FOUND; } else if (stream->fmode == 0){ stream->err = STDIO_ERR_MODE_ERROR; @@ -106,7 +116,7 @@ void fcheckerror(FILE* stream){ /** * @brief Получение кода ошибки * - * @param FILE* stream - Поток (файл) + * @param stream Поток (файл) * * @return Если возращает 0, значит все в порядке */ @@ -117,8 +127,8 @@ uint32_t ferror(FILE* stream){ /** * @brief Выводит на экран ошибку с пользовательским сообщением * - * @param FILE* stream - Поток (файл) - * @param char* s - Пользовательская строка + * @param stream - Поток (файл) + * @param s - Пользовательская строка */ void perror(FILE* stream,char* s){ switch(stream->err){ @@ -146,12 +156,12 @@ void perror(FILE* stream,char* s){ } /** - * @brief Открыть файл для работы с ним + * @brief Открывает файл * - * @param char* filename - Путь к файлу - * @param char* mode - Режим работы + * @param filename Путь к файлу + * @param mode Режим работы * - * @return FILE* - структура + * @return Структура FILE* */ FILE* fopen(const char* filename, const char* _mode){ ON_NULLPTR(filename, { @@ -164,35 +174,38 @@ FILE* fopen(const char* filename, const char* _mode){ return NULL; }); - qemu_log("Open file"); - qemu_log("|- Name: '%s'", filename); - qemu_log("|- Mode: '%s'", _mode); + qemu_log("Open file"); + qemu_log("|- Name: '%s'", filename); + qemu_log("|- Mode: '%s'", _mode); - FILE* file = (FILE*)kcalloc(sizeof(FILE), 1); + FILE* file = kcalloc(sizeof(FILE), 1); // Получаем тип открытого файла uint32_t freal_mode = fmodecheck(_mode); - if (!vfs_exists(filename) || freal_mode == 0) { - qemu_log("Failed to open file: %s (Exists: %d; FMODE: %d)", + FSM_FILE finfo = nvfs_info(filename); + if (finfo.Ready == 0 || freal_mode == 0) { + //kfree(file); + qemu_err("Failed to open file: %s (Exists: %d; FMODE: %d)", filename, - vfs_exists(filename), + finfo.Ready, freal_mode); return 0; } file->open = 1; // Файл успешно открыт file->fmode = freal_mode; // Режим работы с файлом - file->size = vfs_getLengthFilePath(filename); // Размер файла + file->size = finfo.Size; // Размер файла file->path = (char*)filename; // Полный путь к файлу file->pos = 0; // Установка указателя в самое начало file->err = 0; // Ошибок в работе нет - + + qemu_ok("File opened!"); return file; } /** * @brief Закончить работу с файлом * - * @param FILE* stream - Поток (файл) + * @param stream Поток (файл) */ void fclose(FILE* stream){ if(stream) @@ -202,9 +215,9 @@ void fclose(FILE* stream){ /** * @brief Получение размера файла в байтах * - * @param FILE* stream - Поток (файл) + * @param stream Поток (файл) * - * @return Размер файла в противном случаи -1 + * @return Размер файла, в противном случае -1 */ int fsize(FILE* stream){ ON_NULLPTR(stream, { @@ -220,14 +233,14 @@ int fsize(FILE* stream){ } /** - * @brief Получение содержимого файла (детальная настройка) + * @brief Чтение файла * - * @param FILE* stream - Поток (файл) - * @param size_t count - Количество элементов размера size - * @param size_t size - Сколько читаем таких элементов? - * @param void* buffer - Буфер + * @param stream - Поток (файл) + * @param count - Количество элементов размера size + * @param size - Сколько читаем таких элементов? + * @param buffer - Буфер * - * @return int - Размер прочитаных байтов или -1 при ошибке + * @return Размер прочитаных байтов или -1 при ошибке */ int fread(FILE* stream, size_t count, size_t size, void* buffer){ ON_NULLPTR(stream, { @@ -238,18 +251,18 @@ int fread(FILE* stream, size_t count, size_t size, void* buffer){ return -1; }); - if (!stream->open || !vfs_exists(stream->path) || stream->size <= 0 || stream->fmode == 0){ + FSM_FILE finfo = nvfs_info(stream->path); + if (!stream->open || finfo.Ready == 0 || stream->size <= 0 || stream->fmode == 0){ // Удалось ли открыть файл, существует ли файл, размер файла больше нуля и указан правильный режим для работы с файлом fcheckerror(stream); return -1; } - qemu_log("Params: count=%d, size=%d, toread=%d, seek=%d", count, size, count*size, stream->pos); - - int node = vfs_foundMount(stream->path); - int elem = vfs_findFile(stream->path); + if (stdio_debug) qemu_log("Params: count=%d, size=%d, toread=%d, seek=%d", count, size, count*size, stream->pos); + + size_t res = nvfs_read(stream->path, stream->pos, size*count, buffer); - ssize_t res = vfs_read(node, elem, stream->pos, size*count, buffer); +// ssize_t res = vfs_read(node, elem, stream->pos, size*count, buffer); if(res > 0) stream->pos += size*count; @@ -260,7 +273,7 @@ int fread(FILE* stream, size_t count, size_t size, void* buffer){ /** * @brief Текущая позиция считывания в файле * - * @param FILE* stream - Поток (файл) + * @param stream - Поток (файл) * * @return Возращает позицию или отрицательное значение при ошибке */ @@ -283,9 +296,9 @@ int ftell(FILE* stream) { /** * @brief Установка позиции в потоке данных относительно текущей позиции * - * @param FILE* stream - Поток (файл) - * @param size_t offset - Смещение позиции - * @param uint32_t whence - Точка отсчета смещения + * @param stream - Поток (файл) + * @param offset - Смещение позиции + * @param whence - Точка отсчета смещения * * @return Если возращает 0, значит все в порядке */ @@ -321,7 +334,7 @@ ssize_t fseek(FILE* stream, ssize_t offset, uint8_t whence){ /** * @brief Установка позиции потока в самое начало * - * @param FILE* stream - Поток (файл) + * @param stream - Поток (файл) */ void rewind(FILE* stream){ ON_NULLPTR(stream, { @@ -335,32 +348,22 @@ void rewind(FILE* stream){ } /** - * @brief Печатает на экран откладочную информацию - * - * @param FILE* stream - Поток (файл) + * @brief Запись файла + * @param stream Объект файла + * @param size Размер в байтах + * @param count Количество объектов размера 'size' + * @param ptr Буфер + * @return Количество записаных байт */ -void fdebuginfo(FILE* stream){ +size_t fwrite(FILE *stream, size_t size, size_t count, const void *ptr) { ON_NULLPTR(stream, { - qemu_printf("fdebuginfo failed: nullptr"); - return; + qemu_log("stream is nullptr!"); + return 0; }); - - qemu_log("[fDebugInfo] Path: %s\n\tIsOpen: %d\n\tMode: %d\n\tSize: %d\n\tBuffer: %d\n\tPosition: %d\n\tError code: %d\n",stream->path,stream->open,stream->fmode,stream->size, stream->pos,stream->err); -} - -/** - * @brief Установка позиции в потоке данных - * - * @return Количество записаных байт или отрицательное число при ошибке - */ -size_t fwrite(FILE *stream, size_t size, size_t count, const void *ptr) { - // Реализуем как будет готовы ATA-драйвера и FS - // NDRAEY: Да и не нужно, просто в VFS добавил и все (ток мне лень) - - int node = vfs_foundMount(stream->path); - int elem = vfs_findFile(stream->path); - - ssize_t res = vfs_write(node, elem, stream->pos, size*count, ptr); + +// FSM_FILE finfo = nvfs_info(stream->path); + + size_t res = nvfs_write(stream->path, stream->pos, size*count, ptr); if(res > 0) stream->pos += size*count; diff --git a/kernel/src/lib/string.c b/kernel/src/lib/string.c old mode 100755 new mode 100644 index a5dc62466..b7d6a4823 --- a/kernel/src/lib/string.c +++ b/kernel/src/lib/string.c @@ -2,11 +2,13 @@ * @file lib/string.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) * @brief Функции для работы со строками - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include +#include "common.h" +#include "lib/string.h" +#include // SSE functions and types bool isalnum(char c){ return (c >= '0' && c <= '9') || @@ -17,11 +19,11 @@ bool isalnum(char c){ /** * @brief Проверяет, является ли символ формата UTF-8 * - * @param char с - Символ + * @param с - Символ * * @return bool - true если да */ -bool isUTF(char c){ +bool isUTF(char c) { if (c == -47 || c == -48){ return true; } @@ -31,7 +33,7 @@ bool isUTF(char c){ /** * @brief Проверяет, является ли специальным символом * - * @param char с - Символ + * @param с - Символ * * @return bool - true если да */ @@ -44,13 +46,13 @@ bool isSymbol(char c){ /** * @brief Возращает индекс символа * - * @param char с - Символ - * @param char с1 - Символ - * @param char с2 - Символ + * @param с - Символ хз зачем + * @param с1 - Символ нафига + * @param с2 - Символ хз * - * @return uint32_t - индекс символа + * @return Индекс символа */ -uint32_t SymConvert(char c,char c1,char c2){ +uint32_t SymConvert(char c, char c1, char c2){ uint32_t s = 0; if (c == -62){ s = 1000; @@ -61,29 +63,31 @@ uint32_t SymConvert(char c,char c1,char c2){ } return (isSymbol(c)?((((int) c)* -1)+(((int) c1)* -1)+s):((int) c)); } + /** * @brief Возращает индекс символа * - * @param char с - Символ - * @param char с1 - Символ + * @param с - Символ + * @param с1 - Символ * - * @return uint32_t - индекс символа + * @warning зачем нам c и c1 если нужен short c? + * @return индекс символа */ -uint32_t UTFConvert(char c,char c1){ +uint32_t UTFConvert(char c, char c1){ return (isUTF(c)?((((int) c)* -1)+(((int) c1)* -1)):((int) c)); } /** * @brief Возращает длину строки * - * @param char* str - Строка + * @param str - Строка * * @return size_t - Длину символов */ size_t strlen(const char *str){ - ON_NULLPTR(str, { + if(str == nullptr) { return 0; - }); + } size_t len = 0; while (str[len] != 0){ @@ -95,13 +99,14 @@ size_t strlen(const char *str){ /** * @brief Возращает длину строки с учетом UTF-8 * - * @param char* str - Строка + * @param str - Строка * * @return size_t - Длину символов */ size_t mb_strlen(const char *str){ size_t len = 0; - size_t def = strlen(str); + const size_t def = strlen(str); + for(size_t i = 0; i < def;i++){ if (isUTF(str[i])) continue; len++; @@ -109,61 +114,62 @@ size_t mb_strlen(const char *str){ return len; } -// Increments a counter until encounters char `find` +/** + * @brief Возвращает индекс символа в строке + * + * @param str - строка + * @param find - символ, индекс которого надо найти в строке + */ size_t struntil(const char* str, const char find) { - int len = 0; + size_t len = 0; - while(str[len++] != find); + while(str[len] && str[len] != find) + len++; return len; } /** - * @brief Копирование непересекающихся массивов + * @brief Копирование непересекающихся массивов используя SSE * - * @param void* destination - Указатель на массив в который будут скопированы данные. - * @param void* source - Указатель на массив источник копируемых данных. - * @param size_t n - Количество байт для копирования + * @param dest - Указатель на массив в который будут скопированы данные. + * @param src - Указатель на массив источник копируемых данных. + * @param size - Количество байт для копирования */ - -#if USE_SSE void sse_memcpy(void* restrict dest, const void* restrict src, size_t size) { - size_t i; + __m128i* d = (__m128i*)dest; + const __m128i* s = (const __m128i*)src; - size_t alignedd = (size_t)dest & ~0xF; - size_t aligneds = (size_t)src & ~0xF; + size_t num_elems = size / sizeof(__m128i); + const size_t remaining_bytes = size % sizeof(__m128i); - qemu_log("Difference dest: %x", (size_t)dest - alignedd); - qemu_log("Difference src: %x", (size_t)src - aligneds); + _mm_prefetch(s, _MM_HINT_NTA); - __m128i* d = (__m128i*)dest; - const __m128i* s = (__m128i*)src; - const size_t num_elems = size / sizeof(__m128i); - - for (i = 0; i < num_elems; i++) { - _mm_stream_si128(d, _mm_load_si128(s)); - d++; - s++; + while(num_elems--) { + _mm_storeu_si128(d++, _mm_loadu_si128(s++)); } - // Copy any remaining bytes using the regular memcpy - size_t remaining_bytes = size % sizeof(__m128i); + // Copy remaining bytes if (remaining_bytes > 0) { - const char* s_char = (const char*)s; char* d_char = (char*)d; - for (i = 0; i < remaining_bytes; i++) { - *d_char = *s_char; - d_char++; - s_char++; + const char* s_char = (const char*)s; + + for (size_t i = 0; i < remaining_bytes; i++) { + *d_char++ = *s_char++; } } -} -#endif -#define USE_ENCHANCED_MEMCPY 0 + _mm_sfence(); +} -#if USE_ENCHANCED_MEMCPY == 1 -void memcpy(void *restrict destination, const void *restrict source, size_t n){ +/** + * @brief Копирование непересекающихся массивов + * + * @param destination - Указатель на массив в который будут скопированы данные. + * @param source - Указатель на массив источник копируемых данных. + * @param n - Количество байт для копирования + */ +void* memcpy(void *restrict destination, const void *restrict source, size_t n){ size_t *tmp_dest = (size_t *)destination; size_t *tmp_src = (size_t *)source; size_t len = n / sizeof(size_t); @@ -177,49 +183,40 @@ void memcpy(void *restrict destination, const void *restrict source, size_t n){ if(tail) { char *dest = (char *)destination; const char *src = (const char *)source; - + for(i = n - tail; i < n; i++) { dest[i] = src[i]; } } -} -#else -void memcpy(void* destination, const void* source, size_t n) { - char *dest = (char *)destination; - const char *src = (const char*)source; - while(n--) - *dest++ = *src++; + return destination; } -#endif /** * @brief Заполнение массива указанными символами * - * @param void* ptr - Указатель на заполняемый массив - * @param void* value - Код символа для заполнения + * @param ptr - Указатель на заполняемый массив + * @param value - Код символа для заполнения * @param size_t size - Размер заполняемой части массива в байтах */ -void* memset(void* ptr, int value, size_t num) { - uint8_t* p = (uint8_t*)ptr; - unsigned char val = (unsigned char)value; - - for (size_t i = 0; i < num; i++) { - p[i] = val; - } - - return ptr; +void* memset(void* ptr, char value, size_t num) { + uint8_t* p = (uint8_t*)ptr; + + for (size_t i = 0; i < num; i++) { + p[i] = value; + } + + return ptr; } /** * @brief Копирование массивов (в том числе пересекающихся) * - * @param void* dest - Указатель на массив в который будут скопированы данные. - * @param void* src - Указатель на массив источник копируемых данных - * @param size_t count - Количество байт для копирования + * @param dest - Указатель на массив в который будут скопированы данные. + * @param src - Указатель на массив источник копируемых данных + * @param count - Количество байт для копирования */ -void* memmove(void *dest, void *src, size_t count) -{ +void* memmove(void *dest, void *src, size_t count) { void * ret = dest; if (dest <= src || (char*)dest >= ((char*)src + count)) { @@ -247,10 +244,10 @@ void* memmove(void *dest, void *src, size_t count) /** * @brief Сравнение строк * - * @param char* s1 - Строка 1 - * @param char* s2 - Строка 2 + * @param s1 - Строка 1 + * @param s2 - Строка 2 * - * @return int - Возращает 0 если строки идентичны или разницу между ними + * @return Возращает 0 если строки идентичны или разницу между ними */ int strcmp(const char *s1, const char *s2) { while (*s1 && *s1 == *s2) { @@ -264,8 +261,8 @@ int strcmp(const char *s1, const char *s2) { /** * @brief Сравнение строк * - * @param char* s1 - Строка 1 - * @param char* s2 - Строка 2 + * @param str1 - Строка 1 + * @param str2 - Строка 2 * * @return bool - Возращает true если строки идентичны */ @@ -276,8 +273,8 @@ bool strcmpn(const char *str1, const char *str2){ /** * @brief Копирование строк * - * @param char* dest - Указатель на строку, в которую будут скопированы данные - * @param char* src - Указатель на строку источник копируемых данных + * @param dest - Указатель на строку, в которую будут скопированы данные + * @param src - Указатель на строку источник копируемых данных * * @return int - Функция возвращает указатель на строку, в которую скопированы данные. */ @@ -298,9 +295,9 @@ int strcpy(char* dest, const char* src){ /** * @brief Сравнение массивов * - * @param void* s1 - Указатель на строку - * @param void* s2 - Указатель на строку - * @param size_t n - Размер сравниваемой части массива в байтах. + * @param s1 - Указатель на строку + * @param s2 - Указатель на строку + * @param n - Размер сравниваемой части массива в байтах. * * @return int - Возращает 0 если строки идентичны или разницу между ними */ @@ -319,8 +316,8 @@ int32_t memcmp(const char *s1, const char *s2, size_t n){ /** * @brief ??? * - * @param char* str - ??? - * @param char c - ??? + * @param str - ??? + * @param c - ??? * * @return size_t - ??? */ @@ -339,8 +336,8 @@ size_t str_bksp(char *str, char c){ /** * @brief ??? * - * @param char* s - ??? - * @param char* accept - ??? + * @param s - ??? + * @param accept - ??? * * @return char* - ??? */ @@ -360,10 +357,10 @@ char *strpbrk(const char *s, const char *accept){ /** * @brief Определение максимальной длины участка строки, содержащего только указанные символы * - * @param char* s - Указатель на строку, в которой ведется поиск - * @param char* accept - Указатель на строку с набором символов, которые должны входить в участок строки str + * @param s - Указатель на строку, в которой ведется поиск + * @param accept - Указатель на строку с набором символов, которые должны входить в участок строки str * - * @return size_t - Длина начального участка строки, содержащая только символы, указанные в аргументе sym + * @return Длина начального участка строки, содержащая только символы, указанные в аргументе sym */ size_t strspn(const char *s, const char *accept){ const char *p; @@ -376,12 +373,11 @@ size_t strspn(const char *s, const char *accept){ break; } } - if (*a == '\0'){ + if (*a == '\0') { return count; } - else{ - ++count; - } + + ++count; } return count; } @@ -389,8 +385,8 @@ size_t strspn(const char *s, const char *accept){ /** * @brief Сравнение строк с ограничением количества сравниваемых символов * - * @param char* s1 - Строка 1 - * @param char* s2 - Строка 2 + * @param s1 - Строка 1 + * @param s2 - Строка 2 * * @return int - Возращает 0 если строки идентичны или разницу между ними */ @@ -406,8 +402,8 @@ int32_t strncmp(const char *s1, const char *s2, size_t num){ /** * @brief Разбиение строки на части по указанному разделителю * - * @param char* s - Указатель на разбиваемую строку - * @param char* delim - Указатель на строку, содержащую набор символов разделителей + * @param s - Указатель на разбиваемую строку + * @param delim - Указатель на строку, содержащую набор символов разделителей * * @return int - nullptr – если строку str невозможно разделить на части или указатель на первый символ выделенной части строки. */ @@ -441,43 +437,58 @@ char *strtok(char *s, const char *delim){ /** * @brief Копирование строк c ограничением длины * - * @param char* dest - Указатель на строку, в которую будут скопированы данные - * @param char* src - Указатель на строку источник копируемых данных - * @param size_t n - Ограничение длинны копирования + * @param dest - Указатель на строку, в которую будут скопированы данные + * @param src - Указатель на строку источник копируемых данных + * @param n - Ограничение длинны копирования * * @return char* - Функция возвращает указатель на строку, в которую скопированы данные */ -char *strncpy(char *dest, const char *src, size_t n){ - size_t i; - for (i = 0; i < n && src[i] != '\0'; i++) - dest[i] = src[i]; - for (; i < n; i++) - dest[i] = '\0'; - return dest; +char *strncpy(char *dest, const char *src, size_t n) { + for (size_t i = 0; i < n && src[i] != '\0'; i++) { + dest[i] = src[i]; + } + + return dest; } /** * @brief Объединение строк * - * @param char* s - Указатель на массив в который будет добавлена строка - * @param char* t - Указатель на массив из которого будет скопирована строка + * @param s - Указатель на массив в который будет добавлена строка + * @param t - Указатель на массив из которого будет скопирована строка * * @return char* - Функция возвращает указатель на массив, в который добавлена строка */ -char *strcat(char *s, const char *t){ - strcpy(s + strlen(s), t); - return s; +char* strcat(char* destination, const char* source) { + char* ptr = destination; + + // Находим конец строки в destination + while (*ptr != '\0') { + ptr++; + } + + // Копируем символы из source в конец destination + while (*source != '\0') { + *ptr = *source; + ptr++; + source++; + } + + // Добавляем завершающий нулевой символ в destination + *ptr = '\0'; + + return destination; } /** * @brief Вырезает и возвращает подстроку из строки * - * @param char* dest - Указатель куда будет записана строка - * @param char* source - Указатель на исходную строку - * @param int source - Откуда копируем - * @param size_t source - Количество копируемых строк + * @param dest - Указатель куда будет записана строка + * @param source - Указатель на исходную строку + * @param from - Откуда копируем + * @param length - Количество копируемых байт */ -void substr(char *dest, const char *source, int from, int length){ +void substr(char* restrict dest, const char* restrict source, int from, int length){ strncpy(dest, source + from, length); dest[length] = 0; } @@ -485,8 +496,8 @@ void substr(char *dest, const char *source, int from, int length){ /** * @brief Поиск первого вхождения символа в строку * - * @param char* _s - Указатель на строку, в которой будет осуществляться поиск. - * @param int _c - Код искомого символа + * @param _s - Указатель на строку, в которой будет осуществляться поиск. + * @param _c - Код искомого символа * * @return char* - Указатель на искомый символ, если он найден в строке str, иначе nullptr. */ @@ -502,7 +513,7 @@ char *strchr(const char *_s, char _c){ /** * @brief Перевод строки в нижний регистр * - * @param char* as - Указатель на строку. + * @param as - Указатель на строку. */ void strtolower(char* as){ while(*as != 0) @@ -516,7 +527,7 @@ void strtolower(char* as){ /** * @brief Перевод строки в верхний регистр * - * @param char* as - Указатель на строку. + * @param as - Указатель на строку. */ void strtoupper(char* as){ while(*as != 0) @@ -530,15 +541,13 @@ void strtoupper(char* as){ /** * @brief Проверяет, является ли строка числом * - * @param char* c - Указатель на строку. + * @param c - Указатель на строку. * * @return bool - если строка является числом */ -bool isNumber(char * c){ +bool isNumber(const char* c) { for(uint32_t i = 0, len = strlen(c); i < len; i++){ - if ((uint32_t) c[i] >= 48 && (uint32_t) c[i] <= 57){ - continue; - } else { + if (!(c[i] >= '0' && c[i] <= '9')) { return false; } } @@ -548,46 +557,35 @@ bool isNumber(char * c){ /** * @brief Превращает строку в число * - * @param char[] s - Указатель на строку. + * @param s - Указатель на строку. * * @return uint32_t - Число */ -uint32_t atoi(char s[]){ - int i, n; - n = 0; - for (i = 0; s[i] >= '0' && s[i] <= '9'; ++i) +uint32_t atoi(const char s[]){ + int i = 0, n = 0; + bool minus = *s == '-'; + + if(minus) + i++; + + for (; s[i] >= '0' && s[i] <= '9'; ++i) n = (n * 10) + (s[i] - '0'); - return n; -} -/** - * @brief Выделение памяти при использовании кучи вместо стека - * - * @param nmemb - ??? - * @param size - ??? - * @return void* - ??? - */ -void* calloc(size_t nmemb, size_t size) { - void* ptr = kmalloc(nmemb * size); - if (!ptr) { - return nullptr; - } - memset(ptr, 0, nmemb * size); - return ptr; -} + n *= minus ? -1 : 1; + return n; +} /** * @brief Переворачивает строку задом наперед * - * @param char* str - строка символов, которая должна быть обращена + * @param str - строка символов, которая должна быть обращена */ void strver(char *str) { - char c; int32_t j = strlen(str) - 1; for (int32_t i = 0; i < j; i++) { - c = str[i]; + char c = str[i]; str[i] = str[j]; str[j] = c; j--; @@ -597,17 +595,17 @@ void strver(char *str) { /** * @brief Конвертируем число в символы * - * @param int32_t n - Число - * @param char* buffer - символы - * @return int32_t - Длина строки + * @param n - Число + * @param buffer - символы + * @return Длина строки */ -int32_t itoa(int32_t n, char *buffer) { +size_t itoa(int32_t n, char *buffer) { char const digits[] = "0123456789"; char* p = buffer; if (n < 0){ *p++ = '-'; - n *= -1; + n = -n; } int s = n; @@ -628,8 +626,8 @@ int32_t itoa(int32_t n, char *buffer) { } // Unsigned int to charptr +// Bufferless variant: That's ideal! size_t itou(size_t n, char *buffer) { - char const digits[] = "0123456789"; char* p = buffer; size_t s = n; @@ -642,7 +640,7 @@ size_t itou(size_t n, char *buffer) { *p = '\0'; do { - *--p = digits[n % 10]; + *--p = '0' + (n % 10); n = n / 10; } while(n); @@ -704,14 +702,9 @@ char hex_count(size_t num) { return _; } -bool isdigit(char a) { - return (a >= '0' && a <= '9'); -} - bool isnumberstr(char* a) { while(*a) { if(!isdigit(*a)) { - qemu_log("%c is not a digit!", *a); return false; } @@ -724,8 +717,8 @@ bool isnumberstr(char* a) { /** * @brief Посчитать количество символов `character` в строке `string` * - * @param const char* s1 - Строка - * @param char character - Символ + * @param s1 - Строка + * @param character - Символ * * @return size_t - количество найденных символов в строке */ @@ -738,4 +731,139 @@ size_t strcount(const char* string, char character) { } return count; +} + +char* strstr(const char* haystack, const char* needle) { + if (*needle == '\0') { + return (char*) haystack; + } + + while (*haystack) { + const char* h = haystack; + const char* n = needle; + + while (*h && *n && (*h == *n)) { + h++; + n++; + } + + if (*n == '\0') { + return (char*) haystack; + } + + haystack++; + } + + return NULL; +} + + +double strtod(const char* str, char** endptr) { + double result = 0.0; + bool negative = false; + int exponent = 0; + int sign = 1; + + // Пропускаем начальные пробелы + while (*str == ' ') { + str++; + } + + // Определяем знак числа + if (*str == '-' || *str == '+') { + sign = (*str++ == '-') ? -1 : 1; + } + + // Парсим целую часть числа + while (*str >= '0' && *str <= '9') { + result = result * 10 + (*str++ - '0'); + } + + // Парсим дробную часть числа + if (*str == '.') { + double fraction = 1.0; + str++; + while (*str >= '0' && *str <= '9') { + result = result + (double)(*str - '0') / (fraction *= 10.0); + str++; + } + } + + // Парсим порядок числа + if (*str == 'e' || *str == 'E') { + str++; + // Определяем знак порядка числа + if (*str == '-' || *str == '+') { + exponent = (*str++ == '-') ? -1 : 1; + } + // Парсим значение порядка + int temp_exponent = 0; + while (*str >= '0' && *str <= '9') { + temp_exponent = temp_exponent * 10 + (*str++ - '0'); + } + exponent *= temp_exponent; + } + + result *= sign; + + if (endptr != NULL) { + *endptr = (char*)str; + } + + return result * pow(10, exponent); +} + + + + +unsigned long strtoul(const char* str, char** endptr, int base) { + unsigned long result = 0; + int i = 0; + + // Пропускаем начальные пробелы + while (str[i] == ' ') { + i++; + } + + // Преобразуем основание base в случае необходимости + if (base == 0) { + if (str[i] == '0') { + if (str[i + 1] == 'x' || str[i + 1] == 'X') { + base = 16; + i += 2; + } else { + base = 8; + i++; + } + } else { + base = 10; + } + } + + // Обрабатываем число + while (str[i] != '\0') { + int digit; + if (str[i] >= '0' && str[i] <= '9') { + digit = str[i] - '0'; + } else if (str[i] >= 'a' && str[i] <= 'z') { + digit = str[i] - 'a' + 10; + } else if (str[i] >= 'A' && str[i] <= 'Z') { + digit = str[i] - 'A' + 10; + } else { + break; + } + if (digit < base) { + result = result * base + digit; + i++; + } else { + break; + } + } + + // Устанавливаем значение endptr + if (endptr != NULL) { + *endptr = (char*)(str + i); + } + + return result; } \ No newline at end of file diff --git a/kernel/src/lib/tui.c b/kernel/src/lib/tui.c index ab523c8b8..4eaf90c98 100644 --- a/kernel/src/lib/tui.c +++ b/kernel/src/lib/tui.c @@ -2,13 +2,12 @@ * @file lib/tui.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Драйвер библиотеки TUI (Text User Interface) - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-20 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ #include #include -#include #include #include #include @@ -73,9 +72,9 @@ int32_t getWorkSpaceHeightTUI(){ /** * @brief Установить режим работы TUI * - * @param int32_t mode - Режим TUI + * @param mode - Режим TUI */ -int32_t setModeTUI(int32_t mode){ +void setModeTUI(int32_t mode){ TUIMode = mode; } @@ -91,9 +90,9 @@ int32_t getLastUpdateTUI(){ /** * @brief Установить время обновления TUI * - * @param int32_t time - Время (в тиках) + * @param time - Время (в тиках) */ -int32_t setLastUpdateTUI(int32_t time){ +void setLastUpdateTUI(int32_t time){ lastUpdate = time; } @@ -109,18 +108,18 @@ int32_t getCurrentItemTUI(){ /** * @brief Установить позицию в меню * - * @param int32_t item - Позиция в меню + * @param item - Позиция в меню */ -int32_t setCurrentItemTUI(int32_t item){ +void setCurrentItemTUI(int32_t item){ currentList = item; } /** * @brief Установить максимальное количество элементов в меню * - * @param int32_t item - Максимальное кол-во элементов + * @param item - Максимальное кол-во элементов */ -int32_t setMaxItemTUI(int32_t item){ +void setMaxItemTUI(int32_t item){ maxListMenu = item; } @@ -158,7 +157,7 @@ int getMaxStrLineBoxTUI(){ /** * @brief Добавляет позицию в список элементов * - * @param char* name - Название позиции + * @param name - Название позиции */ /* ItemTUI* addItem(char* name,bool disabled, char* key, char* value){ @@ -186,7 +185,7 @@ ItemTUI* addItem(char* name,bool disabled, char* key, char* value){ /** * @brief Отчистить пользовательское пространство * - * @param int - Цвет для фона + * @param - Цвет для фона */ void cleanWorkSpace(int color){ drawRect(8,16*(3),ww,wh,color); @@ -204,8 +203,6 @@ void createMenuBox(char* title){ int padding_h = maxHeightLineTUI/4; // Получаем размеры коробки int boxWidth = ww-((padding_w*8)*2); - int boxHeight = wh-((padding_h*16)); - int maxListBox = boxHeight; // Получаем максимальное количество символов на строку в коробке int maxStrLineBox = (boxWidth/8)-4; // 60 - символов при 1024 @@ -261,7 +258,6 @@ void createErrorBox(char* title,char* text){ int padding_h = maxHeightLineTUI/4; // Получаем размеры коробки int boxWidth = ww-((padding_w*8)*2); - int boxHeight = wh-((padding_h)); // ? Реализовал а зачем, забыл :) // Получаем максимальное количество символов на строку в коробке int maxStrLineBox = (boxWidth/8)-4; // 60 - символов при 1024 // maxHeightLine @@ -279,7 +275,6 @@ void createErrorBox(char* title,char* text){ } if (strlen(text) > maxStrLineBox){ // Объявим переменную для деления текста - char strings[lineHeight][maxStrLineBox+1]; for (int i = 0;i < lineHeight;i++){ substr(title, title, 0+(i*maxStrLineBox), ((i+1)*maxStrLineBox)); } diff --git a/kernel/src/lib/utf_conversion.c b/kernel/src/lib/utf_conversion.c new file mode 100644 index 000000000..4740cce59 --- /dev/null +++ b/kernel/src/lib/utf_conversion.c @@ -0,0 +1,44 @@ +// +// Created by maractus on 27.12.23. (I thought it decides from my GitHub username, but not hahaahahah) +// + +#include "lib/utf_conversion.h" + +/// Сложная фигня с Unicode которую мне придется когда-нибудь изучить. +void utf16_to_utf8(const unsigned short *utf16, int utf16_length, char *utf8) { + int i = 0; + int j = 0; + + while (i < utf16_length) { + unsigned int codepoint; + + if (utf16[i] < 0xD800 || utf16[i] > 0xDFFF) { + // Простой BMP символ (не суррогатная пара) + codepoint = utf16[i]; + i++; + } else { + // Суррогатная пара + unsigned short high = utf16[i]; + unsigned short low = utf16[i + 1]; + codepoint = 0x10000 + ((high - 0xD800) << 10) + (low - 0xDC00); + i += 2; + } + + // Преобразование кодовой точки в UTF-8 + if (codepoint < 0x80) { + utf8[j++] = (unsigned char)codepoint; + } else if (codepoint < 0x800) { + utf8[j++] = 0xC0 | ((codepoint >> 6) & 0x1F); + utf8[j++] = 0x80 | (codepoint & 0x3F); + } else if (codepoint < 0x10000) { + utf8[j++] = 0xE0 | ((codepoint >> 12) & 0x0F); + utf8[j++] = 0x80 | ((codepoint >> 6) & 0x3F); + utf8[j++] = 0x80 | (codepoint & 0x3F); + } else { + utf8[j++] = 0xF0 | ((codepoint >> 18) & 0x07); + utf8[j++] = 0x80 | ((codepoint >> 12) & 0x3F); + utf8[j++] = 0x80 | ((codepoint >> 6) & 0x3F); + utf8[j++] = 0x80 | (codepoint & 0x3F); + } + } +} diff --git a/kernel/src/mem/pmm.c b/kernel/src/mem/pmm.c new file mode 100644 index 000000000..f51bfcc0c --- /dev/null +++ b/kernel/src/mem/pmm.c @@ -0,0 +1,548 @@ +/** + * @brief Менеджер физической памяти + * @author NDRAEY >_ + * @version 0.3.4 + * @date 2023-11-04 + * @copyright Copyright SayoriOS Team (c) 2022-2023 + */ + +// Scyther Physical Memory Manager by NDRAEY (c) 2023 +// for SayoriOS + +#include +#include "lib/math.h" +#include "mem/pmm.h" +#include "lib/string.h" +#include "io/ports.h" + +extern size_t KERNEL_BASE_pos; +extern size_t KERNEL_END_pos; +extern size_t last_module_end; + +size_t kernel_start; +size_t kernel_end; + +size_t mmap_length = 0; +memory_map_entry_t* mentry = 0; + +size_t phys_memory_size = 0; +size_t used_phys_memory_size = 0; + +physical_addr_t* kernel_page_directory = 0; + +// Create 128 KB page bitmap for saving data about 4 GB space. +/// Карта занятых страниц +uint8_t pages_bitmap[PAGE_BITMAP_SIZE] = {0}; + +bool paging_initialized = false; + +/** + * @brief Выделяет одну страницу физической памяти (4096 байт) + * @return Физический адрес страницы + */ +physical_addr_t phys_alloc_single_page() { + if(used_phys_memory_size >= phys_memory_size) { + // If no free space, just call the function that handles that situation. + qemu_log("No free physical memory. Running emergency scenario..."); + + phys_not_enough_memory(); + } + + for(int i = 0; i < PAGE_BITMAP_SIZE; i++) { + if(pages_bitmap[i] == 0xff) { + // 0xff is eight ones in 8 bit. + // 8 ones - all pages in this index is used. + continue; + } else { + // Otherwise, we have some bits cleared - we have free page(s). + // Roll over all bits + for(int j = 0; j < 8; j++) { + // If we have bit cleared, mark it as used, increment memory stat and return address. + if(((pages_bitmap[i] >> j) & 1) == 0) { + // Page is free + pages_bitmap[i] |= (1 << j); + + used_phys_memory_size += PAGE_SIZE; + + // Every (8bit) entry can handle (4096 * 8) = 32768 bytes. + // Every bit of entry can hold one page (4096 bytes). + return (PAGE_SIZE * 8 * i) + (j * PAGE_SIZE); + } + } + } + } + + return 0; +} + +/** + * @brief Выделяет несколько страниц последовательно + * @param count количество страниц + * @return Физический адрес где начинаются страницы + */ +physical_addr_t phys_alloc_multi_pages(size_t count) { + if(used_phys_memory_size + (count * PAGE_SIZE) >= phys_memory_size) { + qemu_log("No free physical memory. Running emergency scenario..."); + + phys_not_enough_memory(); + } + + size_t counter = 0; + size_t addr = 0; + + // They used for saving start indexes of our pages. + size_t si, sj = 0; + + for(int i = 0; i < PAGE_BITMAP_SIZE; i++) { + if(pages_bitmap[i] == 0xff) { + // 0xff is eight ones in 8 bit. + // 8 ones - all pages in this index is used. + continue; + } else { + // Otherwise, we have some bits cleared - we have free page(s). + // Roll over all bits + for(int j = 0; j < 8; j++) { + // Check if page is free + if(((pages_bitmap[i] >> j) & 1) == 0) { + // If we starting, we need to save an address. + if(counter == 0) { + si = i; + sj = j; + addr = (PAGE_SIZE * 8 * i) + (j * PAGE_SIZE); + } else if(counter == count) { + // If we found `count` free pages in a row, we should mark them as used and return address. + + // Roll through all entries, starting from indices we preserved. + for(; si < PAGE_BITMAP_SIZE; si++) { + for(; sj < 8; sj++) { + // Mark as used. + pages_bitmap[si] |= (1 << sj); + + // We have no control, so keep loops running until we mark all `count` pages as used. + // If we marked all pages, exit the loops. + if(!--counter) + goto phys_multialloc_end; + } + + sj = 0; + } + + phys_multialloc_end: + + used_phys_memory_size += PAGE_SIZE * count; + + return addr; + } + + // We found a free page, so increment a counter + counter++; + } else { + // Oh shit, we have encountered a used page! (Loud scream!) + // Okay, just reset the counter and address to start from the beginning. + + counter = 0; + addr = 0; // For sanity + } + } + } + } + + return 0; +} + +/** + * @brief Освобождает страницу физической памяти + * @param addr Физический адрес страницы + */ +void phys_free_single_page(physical_addr_t addr) { + if(!addr) + return; + + // Extract our entry position (i) and bit in the entry (j). + + size_t i = addr / (PAGE_SIZE * 8); + size_t j = (addr % (PAGE_SIZE * 8)) / PAGE_SIZE; + + // Just clear a nth bit + pages_bitmap[i] &= ~(1 << j); + + used_phys_memory_size -= PAGE_SIZE; +} + +/** + * @brief освобождает несколько страниц подряд + * @param addr Физический адрес где начинаются страницы + * @param count Количество страниц + */ +void phys_free_multi_pages(physical_addr_t addr, size_t count) { + if(!addr) + return; + + // Extract our entry position (i) and bit in the entry (j). + + size_t i = addr / (PAGE_SIZE * 8); + size_t j = (addr % (PAGE_SIZE * 8)) / PAGE_SIZE; + + // Roll over all entries starting from index of our address + for(; i < PAGE_BITMAP_SIZE; i++) { + for(; j < 8; j++) { + // Just clear a nth bit + pages_bitmap[i] &= ~(1 << j); + + // If we freed all pages, just exit the function. + if(!--count) { + return; + } + } + + j = 0; + } + + used_phys_memory_size -= PAGE_SIZE * count; +} + +// Tells if page allocated there +bool phys_is_used_page(physical_addr_t addr) { + if(!addr) + return true; + + // Extract our entry position (i) and bit in the entry (j). + + size_t i = addr / (PAGE_SIZE * 8); + size_t j = (addr % (PAGE_SIZE * 8)) / PAGE_SIZE; + + // Just clear a nth bit + return (bool)((pages_bitmap[i] >> j) & 1); +} + +// Marks page. +void phys_mark_page_entry(physical_addr_t addr, uint8_t used) { + if(!addr) + return; + + // Extract our entry position (i) and bit in the entry (j). + + size_t i = addr / (PAGE_SIZE * 8); + size_t j = (addr % (PAGE_SIZE * 8)) / PAGE_SIZE; + + if(used) + pages_bitmap[i] |= (1 << j); + else + pages_bitmap[i] &= ~(1 << j); +} + +// Creates and prepares a page directory +uint32_t * new_page_directory() { + // Allocate a page (page directory is 4096 bytes) + uint32_t* dir = (uint32_t*)phys_alloc_single_page(); + + qemu_log("Allocated page directory at: %x", dir); + + // Blank it (they can store garbage, so we need to blank it) + memset(dir, 0, 4096); + +// uint32_t page_table = phys_alloc_single_page(); +// +// dir[PD_INDEX((uint32_t)dir)] = page_table | 3; +// +// ((uint32_t*)page_table)[PT_INDEX((uint32_t)dir)] = (uint32_t)dir | 3; + + dir[1023] = (uint32_t)dir | 3; + +// for(int i = 0; i < 1024; i++) { +// uint32_t addr = phys_alloc_single_page(); +// uint32_t* pt = (uint32_t*)addr; +// +// for(int j = 0; j < 1024; j++) { +// pt[j] = 0; +// } +// +// dir[i] = addr | 3; +// +// ((uint32_t*)(dir[PD_INDEX(addr)] & ~0x3ff))[PT_INDEX(addr)] = addr | 3; +// } + + qemu_log("Blanked directory."); +// qemu_log("================ Mapping a page directory"); + + // Self-map page +// map_single_page(dir, (uint32_t)dir, (uint32_t)dir, PAGE_WRITEABLE); + + qemu_log("================ Page directory is ready."); + + return dir; +} + +void blank_page_directory(uint32_t* pagedir_addr) { + // Just roll over 1024 entries and set them to 0. + for (size_t i = 0; i < 1024; i++) { + pagedir_addr[i] = 0; // Fully blank + } +} + +uint32_t* get_page_table_by_vaddr(uint32_t* page_dir, virtual_addr_t vaddr) { + if(paging_initialized) + return (uint32_t*)((char*)page_directory_start + (PD_INDEX(vaddr) * PAGE_SIZE)); + else + return (uint32_t*)(page_dir[PD_INDEX(vaddr)] & ~0xfff); +} + +void reload_cr3() { + __asm__ volatile("mov %cr3, %eax\n" + "mov %eax, %cr3"); +} + +// Maps a page. +// Note: No need to set PAGE_PRESENT flag, it sets automatically. +// TODO: Rewrite this, this is buggy + +/// \brief Maps physical page with virtual address space +/// \param page_dir VIRTUAL address of page directory +/// \param physical PHYSICAL address to map +/// \param virtual VIRTUAL address to map +/// \param flags Page flags (PAGE_PRESENT is automatically included) +void map_single_page(physical_addr_t* page_dir, physical_addr_t physical, virtual_addr_t virtual, uint32_t flags) { + // Clean flags and some garbage from addresses. + + virtual &= ~0xfff; + physical &= ~0xfff; + +// qemu_log("V%x => P%x", virtual, physical); + + // Get our Page Directory Index and Page Table Index. + uint32_t pdi = PD_INDEX(virtual); + uint32_t pti = PT_INDEX(virtual); + + uint32_t* pt = 0; + + // Check if page table not present. + if((page_dir[pdi] & 1) == 0) { + pt = (uint32_t *)phys_alloc_single_page(); + + page_dir[pdi] = (uint32_t)pt | PAGE_WRITEABLE | PAGE_PRESENT; + + if(paging_initialized && page_dir == get_kernel_page_directory()) { + uint32_t pt_addr = (uint32_t)page_directory_start + (pdi * PAGE_SIZE); + + memset((uint32_t*)pt_addr, 0, PAGE_SIZE); + + pt = (uint32_t*)pt_addr; + } else if(paging_initialized && page_dir != get_kernel_page_directory()) { + qemu_warn("FIXME: Mapping other page directories"); + while(1); + } else { + memset(pt, 0, PAGE_SIZE); + } + } else { + // Just get our page table + pt = get_page_table_by_vaddr(page_dir, virtual); + } + +// qemu_log("P: %x | V: %x => PDI: %d | PTI: %d", physical, virtual, pdi, pti); + + // Finally map our physical page to virtual + pt[pti] = physical | flags | PAGE_PRESENT; + + // Do our best to take effect. + reload_cr3(); + __asm__ volatile ("invlpg (,%0,)"::"a"(virtual)); +} + +void unmap_single_page(uint32_t* page_dir, virtual_addr_t virtual) { + virtual &= ~0xfff; + + uint32_t* pt = 0; + + // Check if page table not present. + if((page_dir[PD_INDEX(virtual)] & 1) == 0) { + return; + } else { +// qemu_log("Page table exist"); + pt = get_page_table_by_vaddr(page_dir, virtual); + } + +// qemu_log("Got page table at: %x", pt); +// qemu_log("Unmapping: %x", virtual); + + pt[PT_INDEX(virtual)] = 0; + + reload_cr3(); +} + +uint32_t phys_get_page_data(uint32_t* page_dir, virtual_addr_t virtual) { + virtual &= ~0x3ff; + + uint32_t* pt = 0; + + // Check if page table not present. + if((page_dir[PD_INDEX(virtual)] & 1) == 0) { + return 0; + } else { + pt = get_page_table_by_vaddr(page_dir, virtual); + } + + return pt[PT_INDEX(virtual)]; +} + +uint32_t virt2phys(uint32_t* page_dir, virtual_addr_t virtual) { +// virtual &= ~0x3ff; + virtual &= ~0xfff; + + uint32_t* pt = 0; + + // Check if page table not present. + if((page_dir[PD_INDEX(virtual)] & 1) == 0) { + return 0; + } else { + pt = get_page_table_by_vaddr(page_dir, virtual); + } + + return pt[PT_INDEX(virtual)] & ~0x3ff; +} + +/** + * @brief Map pages + * + * @param page_dir Page directory address + * @param physical Address of physical memory + * @param virtual Address of virtual memory + * @param size Amount of BYTES to map (must be aligned by 4096) + * @param flags Page flags + */ +void map_pages(uint32_t* page_dir, physical_addr_t physical, virtual_addr_t virtual, size_t size, uint32_t flags) { + physical_addr_t phys = physical; + physical_addr_t virt = virtual; + + virtual_addr_t vend = ALIGN(virt + size, PAGE_SIZE); + + for(; + virt <= vend; + phys += PAGE_SIZE, + virt += PAGE_SIZE + ) { + map_single_page(page_dir, phys, virt, flags); + } + + reload_cr3(); +} + +void check_memory_map(memory_map_entry_t* mmap_addr, uint32_t length){ + int i = 0; + /* Entries number in memory map structure */ + mmap_length = length; + size_t n = length / sizeof(memory_map_entry_t); + + /* Set pointer to memory map */ + mentry = mmap_addr; + qemu_log("[PMM] Map:"); + for (i = 0; i < n; i++){ + memory_map_entry_t entry = mentry[i]; + + qemu_log("%s [Address: %x | Length: %x] <%d>", + (entry.type == 1?"Available":"Reserved"), + entry.addr_low, entry.len_low, entry.type); + + phys_memory_size += entry.len_low; + } + qemu_log("RAM: %d MB | %d KB | %d B", phys_memory_size/(1024*1024), phys_memory_size/1024, phys_memory_size); +} + +size_t getInstalledRam(){ + return phys_memory_size; +} + +void mark_reserved_memory_as_used(memory_map_entry_t* mmap_addr, uint32_t length){ + int i = 0; + /* Entries number in memory map structure */ + mmap_length = length; + size_t n = length / sizeof(memory_map_entry_t); + + /* Set pointer to memory map */ + mentry = mmap_addr; + for (i = 0; i < n; i++){ + memory_map_entry_t entry = mentry[i]; + + size_t addr = entry.addr_low; + size_t length = entry.len_low; + + if(entry.type != 1) { + for(int j = 0; j < length; j += PAGE_SIZE) { + phys_mark_page_entry(addr + j, 1); // Mark as used + } + } + } + + qemu_log("RAM: %d MB | %d KB | %d B", phys_memory_size/(1024*1024), phys_memory_size/1024, phys_memory_size); +} + +uint32_t* get_kernel_page_directory() { + if(paging_initialized) + return page_directory_virt; + else + return kernel_page_directory; +} + +void init_paging() { + kernel_start = (size_t)&KERNEL_BASE_pos; + kernel_end = (size_t)&KERNEL_END_pos; + + qemu_log("Kenrel end: %x", kernel_end); + qemu_log("Last module end: %x", last_module_end); + + size_t real_end = MAX(kernel_end, last_module_end); + + size_t kernel_size = real_end - kernel_start; + + qemu_log("Kernel starts at: %x", kernel_start); + qemu_log("Kernel ends at: %x", real_end); + qemu_log("Kernel ends (aligned) at: %x", ALIGN(real_end, PAGE_SIZE)); + + qemu_log("Kernel size is: %d (%d kB) (%d MB)", (kernel_end - kernel_start), (kernel_end - kernel_start) >> 10, (kernel_end - kernel_start) >> 20); + qemu_log("Kernel size (initrd included) is: %d (%d kB) (%d MB)", kernel_size, kernel_size >> 10, kernel_size >> 20); + + kernel_size = ALIGN(kernel_size, PAGE_SIZE); + + // Preallocate our kernel space + + qemu_log("Allocating %d pages for kernel space...", (real_end / 4096) + 1); + + for(int i = 0; i < (real_end / 4096) + 1; i++) { + // Note: if allocator returns 0, it's an error. + // But we don't care, because we're allocating pages for first time here. + phys_alloc_single_page(); + } + + // Create new page directory + + kernel_page_directory = (physical_addr_t*)new_page_directory(); + + qemu_log("New page directory at: %x", kernel_page_directory); + + map_pages(kernel_page_directory, 0, 0, ALIGN(real_end, PAGE_SIZE), PAGE_WRITEABLE); + + qemu_log("Max: %x", phys_memory_size); + + // while(1); + load_page_directory((size_t) kernel_page_directory); + + qemu_log("Ok?"); + + enable_paging(); + + paging_initialized = true; + + // Here paging enabled and every memory error will lead to a Page Fault + + uint32_t* pd = get_kernel_page_directory(); + + for(int i = 0; i < 1024; i++) { + if(pd[i] != 0) + qemu_log("[%d]: %x", i, pd[i]); + } +} + +void phys_not_enough_memory() { + qemu_log("Not enough memory!"); + + while(1); +} diff --git a/kernel/src/mem/vmm.c b/kernel/src/mem/vmm.c new file mode 100644 index 000000000..49cec0031 --- /dev/null +++ b/kernel/src/mem/vmm.c @@ -0,0 +1,421 @@ +/** + * @brief Менеджер виртуальной памяти + * @author NDRAEY >_ + * @version 0.3.4 + * @date 2023-11-04 + * @copyright Copyright SayoriOS Team (c) 2022-2023 + */ + +// Charmander - a new virtual memory manager by NDRAEY (c) 2023 +// for SayoriOS + +#include "../../include/mem/vmm.h" +#include "../../include/mem/pmm.h" +#include "io/ports.h" + +heap_t system_heap; +bool vmm_debug = false; + +size_t pmm_alloc_and_map(size_t* page_dir, size_t virtual_addr, size_t bytes) { + size_t count = (bytes + 1) / PAGE_SIZE; + size_t pages = phys_alloc_multi_pages(count); + + map_pages(page_dir, pages, virtual_addr, bytes, PAGE_WRITEABLE); + + return pages; +} + +size_t pmm_alloc_and_map_self(size_t* page_dir, size_t bytes) { + size_t count = (bytes + 1) / PAGE_SIZE; + size_t pages = phys_alloc_multi_pages(count); + + map_pages(page_dir, pages, pages, bytes, PAGE_WRITEABLE); + + return pages; +} + +void vmm_init() { + memset(&system_heap, 0, sizeof(heap_t)); + + system_heap.capacity = PAGE_SIZE / sizeof(struct heap_entry); + + system_heap.allocated_count = 0; + system_heap.used_memory = 0; + + system_heap.start = 0x1000000; + system_heap.memory = (struct heap_entry*)pmm_alloc_and_map_self(get_kernel_page_directory(), PAGE_SIZE); + + memset(system_heap.memory, 0, PAGE_SIZE); + + qemu_log("CAPACITY: %d", system_heap.capacity); + qemu_log("MEMORY AT: %x", system_heap.memory); +} + +void heap_dump() { + qemu_note("Heap info: %d entries of %d possible", system_heap.allocated_count, system_heap.capacity); + qemu_note(" %d bytes of ? bytes used", system_heap.used_memory); + + for(int i = 0; i < system_heap.allocated_count; i++) { + qemu_log("[%d] [%x, %d => %x]", + i, + system_heap.memory[i].address, + system_heap.memory[i].length, + system_heap.memory[i].address + system_heap.memory[i].length); + + if(i < system_heap.allocated_count - 1) { + if(system_heap.memory[i].address + system_heap.memory[i].length < system_heap.memory[i + 1].address) { + qemu_log("FREE SPACE: %d bytes", system_heap.memory[i + 1].address - (system_heap.memory[i].address + system_heap.memory[i].length)); + } + } + } +} + +// TODO: Handle out of memory, implement automatical heap resizing +void* alloc_no_map(size_t size, size_t align) { + void* mem = 0; + + if(system_heap.allocated_count == 0) { + mem = (void *) system_heap.start; + + system_heap.memory[0].address = system_heap.start; + system_heap.memory[0].length = size; + + goto ok; + } + + if(system_heap.allocated_count == system_heap.capacity - 1) { + qemu_err("TODO: IMPLEMENT HEAP RESIZING!!!!"); + while(1); + } + + for(int i = 0; i < system_heap.allocated_count; i++) { + struct heap_entry cur = system_heap.memory[i]; + struct heap_entry next = system_heap.memory[i + 1]; + + size_t curend = cur.address + cur.length; + + if(align) + curend = ALIGN(curend, align); + + if(next.address == 0) { + system_heap.memory[i + 1].address = curend; + system_heap.memory[i + 1].length = size; + + mem = (void*)system_heap.memory[i + 1].address; + + goto ok; + } else if(curend + size <= next.address) { + // Ok! + + for(size_t j = system_heap.allocated_count; j > i; j--) { + system_heap.memory[j] = system_heap.memory[j - 1]; + } + + mem = (void*)(curend); + system_heap.memory[i + 1].address = curend; + system_heap.memory[i + 1].length = size; + + goto ok; + } + } + + ok: + + system_heap.allocated_count++; + system_heap.used_memory += size; + + // end: + + return mem; +} + +void free_no_map(void* ptr) { + if(!ptr) + return; + + size_t i = 0; + bool found = false; + + for(; i < system_heap.allocated_count; i++) { + if(system_heap.memory[i].address == (size_t)ptr) { + found = true; + break; + } + } + + if(!found) + return; + + system_heap.used_memory -= system_heap.memory[i].length; + + for (; i < system_heap.allocated_count - 1; i++) { + system_heap.memory[i] = system_heap.memory[i + 1]; + } + + system_heap.memory[i].address = 0; + system_heap.memory[i].length = 0; + + system_heap.allocated_count--; +} + +void* kmalloc_common(size_t size, size_t align) { + void* allocated = alloc_no_map(size, align); + + if(!allocated) { + return 0; + } + + size_t reg_addr = (size_t) allocated & ~0xfff; + + for(size_t i = 0; i <= ALIGN(size, 4096); i += PAGE_SIZE) { + size_t region = phys_get_page_data(get_kernel_page_directory(), + reg_addr); // is allocated region there? + + if (!region) { + if(vmm_debug) + qemu_warn("Region is not yet mapped: %x", reg_addr); + + size_t page = phys_alloc_single_page(); + + if(vmm_debug) + qemu_log("Obtained new page: %x", page); + + map_single_page(get_kernel_page_directory(), + page, + reg_addr, + PAGE_WRITEABLE); + + if(vmm_debug) + qemu_ok("Mapped!"); + } else { + if(vmm_debug) + qemu_warn("Already mapped: %x (Size: %d)", reg_addr, size); + } + + reg_addr += PAGE_SIZE; + } + + if(vmm_debug) + qemu_ok("From %x to %x, here you are!", allocated, allocated + size); + + return allocated; +} + +bool vmm_is_page_used_by_entries(size_t address) { + for(size_t i = 0; i < system_heap.allocated_count; i++) { + size_t start = system_heap.memory[i].address & ~0xfff; + size_t end = ALIGN(system_heap.memory[i].address + system_heap.memory[i].length, PAGE_SIZE); + +// qemu_log("[%x => %x] %x => %x", system_heap.memory[i].address, system_heap.memory[i].address + system_heap.memory[i].length, start, end); + + if(address >= start && address < end) { + return true; + } + } + + return false; +} + +struct heap_entry heap_get_block(size_t address) { + for(int i = 0; i < system_heap.allocated_count; i++) { + if(system_heap.memory[i].address == address) { + return system_heap.memory[i]; + } + } + + return (struct heap_entry){}; +} + +// NOTE: Returns nullptr if block does not exist +struct heap_entry* heap_get_block_ref(size_t address) { + for(int i = 0; i < system_heap.allocated_count; i++) { + if(system_heap.memory[i].address == address) { + return &(system_heap.memory[i]); + } + } + + return 0; +} + +// NOTE: Returns 0xFFFFFFFF if not exist +size_t heap_get_block_idx(size_t address) { + for(size_t i = 0; i < system_heap.allocated_count; i++) { + if(system_heap.memory[i].address == address) { + return i; + } + } + + return 0xFFFFFFFF; +} + +void kfree(void* ptr) { + if(!ptr) + return; + + struct heap_entry block = heap_get_block((size_t)ptr); + + if(vmm_debug) + qemu_warn("Freeing %x", ptr); + + if(!block.address) { + qemu_warn("No block!"); + return; + } + + + free_no_map(ptr); + + for(size_t i = 0; i < block.length; i += PAGE_SIZE) { + if(!vmm_is_page_used_by_entries(block.address + i)) { + size_t phys_addr = phys_get_page_data(get_kernel_page_directory(), block.address + i) & ~0xfff; + + if(vmm_debug) + qemu_warn("Unmapping %x => %x", block.address + i, phys_addr); + + unmap_single_page(get_kernel_page_directory(), block.address + i); + + phys_free_single_page(phys_addr); + } + } + +// qemu_ok("OK!"); +} + +void* krealloc(void* ptr, size_t memory_size) { + if(!ptr) + return 0; + + struct heap_entry* block = heap_get_block_ref((size_t) ptr); + + if(!block) + return 0; + +// qemu_warn("ORIGINAL BLOCK: %x, %d", block->address, block->length); + + if(memory_size > block->length) { // Expand +// qemu_warn("EXPANDING FROM %d to %d", block->length, memory_size); + + size_t index = heap_get_block_idx((size_t) ptr); + + if(index == system_heap.allocated_count - 1) { + block->length = memory_size; + + size_t reg_addr = block->address & ~0xfff; + + for(int addr_offset = 0; addr_offset <= ALIGN(memory_size, 4096); addr_offset += PAGE_SIZE) { + size_t region = phys_get_page_data(get_kernel_page_directory(), + reg_addr); // is allocated region there? + + if (!region) { +// qemu_warn("Region is not yet mapped: %x", reg_addr); + + size_t page = phys_alloc_single_page(); +// qemu_log("Obtained new page: %x", page); + + map_single_page(get_kernel_page_directory(), + page, + reg_addr, + PAGE_WRITEABLE); + +// qemu_ok("Mapped!"); + }/* else { + qemu_warn("Already mapped: %x", reg_addr); + }*/ + + reg_addr += PAGE_SIZE; + } + } else { +// qemu_err("CAN USE NEXT!"); + + struct heap_entry next = system_heap.memory[index + 1]; + + size_t willend = block->address + memory_size; + + if(willend < next.address) { +// qemu_log("THERE'S FREE SPACE!"); + + size_t reg_addr = block->address & ~0xfff; + + for(int addr_offset = 0; addr_offset <= ALIGN(memory_size, 4096); addr_offset += PAGE_SIZE) { + size_t region = phys_get_page_data(get_kernel_page_directory(), + reg_addr); // is allocated region there? + + if (!region) { +// qemu_warn("Region is not yet mapped: %x", reg_addr); + + size_t page = phys_alloc_single_page(); +// qemu_log("Obtained new page: %x", page); + + map_single_page(get_kernel_page_directory(), + page, + reg_addr, + PAGE_WRITEABLE); + +// qemu_ok("Mapped!"); + }/* else { + qemu_warn("Already mapped: %x", reg_addr); + }*/ + + reg_addr += PAGE_SIZE; + } + + block->length = memory_size; + } else { +// qemu_err("No space between blocks! :("); // IT'S NORMAL + + void* new_block = kmalloc(memory_size); + + memcpy(new_block, (const void *) block->address, block->length); + + kfree(ptr); + + return new_block; + } + +// qemu_ok("Next is %x, %d", next.address, next.length); + } + } else if(memory_size < block->length) { // Shrink +// qemu_warn("SHRINKING FROM %d to %d", block->length, memory_size); + + block->length = memory_size; + } + + return (void *) block->address; +} + +/** + * @brief Копирует адресное пространство ядра в новое адресное пространство + * @return Виртуальный адрес директории страниц нового адресного пространства + */ +void* clone_kernel_page_directory() { + uint32_t* page_dir = kmalloc_common(PAGE_SIZE, PAGE_SIZE); + uint32_t physaddr = virt2phys(get_kernel_page_directory(), (virtual_addr_t) page_dir); + const uint32_t* kern_dir = get_kernel_page_directory(); + + for(int i = 0; i < 1024; i++) { + if (kern_dir[i]) { + uint32_t* page_table = kmalloc_common(PAGE_SIZE, PAGE_SIZE); + uint32_t physaddr_pt = virt2phys(kern_dir, (virtual_addr_t) page_table); + + qemu_log("Copying from %x to %x", page_directory_start + (i * 1024), page_table); + + memcpy(page_table, page_directory_start + (i * 1024), PAGE_SIZE); + + page_dir[i] = physaddr_pt | 3; + } + } + + page_dir[1023] = physaddr | 3; + + for(int i = 0; i < 1024; i++) + if(kern_dir[i]) + qemu_log("[%d] %x = %x", i, kern_dir[i], page_dir[i]); + + qemu_log("Page directory at: V%x (P%x); Here you are!", page_dir, physaddr); + + return page_dir; +} + +void vmm_debug_switch(bool enable) { + vmm_debug = enable; +} \ No newline at end of file diff --git a/kernel/src/net/arp.c b/kernel/src/net/arp.c index 0f9431211..3e3149701 100644 --- a/kernel/src/net/arp.c +++ b/kernel/src/net/arp.c @@ -1,4 +1,11 @@ -#include "kernel.h" +#include "common.h" +#include "net/arp.h" +#include "net/cards.h" +#include "mem/vmm.h" +#include "net/endianess.h" +#include "lib/string.h" +#include "io/ports.h" +#include "net/ethernet.h" uint8_t default_broadcast_mac_address[] = {0xff, 0xff, 0xff, 0xff, 0xff, 0xff}; @@ -14,17 +21,16 @@ void arp_handle_packet(netcard_entry_t* card, arp_packet_t* arp_packet, size_t l memcpy(dest_ip, arp_packet->src_ip, 4); if(ntohs(arp_packet->opcode) == ARP_REQUEST) { - qemu_log("ARP REQUEST"); + qemu_warn("ARP REQUEST"); - uint32_t my_ip = 0x0e02000a; // 10.0.2.14 - if(memcmp((const char*)arp_packet->dest_ip, (const char*)&my_ip, 4) != 0) { + if(memcmp((const char*)arp_packet->dest_ip, (const char*)card->ipv4_addr, 4) != 0) { // Set source MAC address, IP address (hardcode the IP address as 10.2.2.3 until we really get one...) card->get_mac_addr(arp_packet->src_mac); - arp_packet->src_ip[0] = 10; - arp_packet->src_ip[1] = 0; - arp_packet->src_ip[2] = 2; - arp_packet->src_ip[3] = 14; + arp_packet->src_ip[0] = card->ipv4_addr[0]; + arp_packet->src_ip[1] = card->ipv4_addr[1]; + arp_packet->src_ip[2] = card->ipv4_addr[2]; + arp_packet->src_ip[3] = card->ipv4_addr[3]; // Set destination MAC address, IP address memcpy(arp_packet->dest_mac, dest_mac, 6); @@ -41,7 +47,7 @@ void arp_handle_packet(netcard_entry_t* card, arp_packet_t* arp_packet, size_t l arp_packet->hardware_type = htons(HARDWARE_TYPE_ETHERNET); // Set protocol = IPv4 - arp_packet->protocol = htons(ETHERNET_TYPE_IP); + arp_packet->protocol = htons(ETHERNET_TYPE_IPV4); // Now send it with ethernet ethernet_send_packet(card, dest_mac, (uint8_t*)arp_packet, sizeof(arp_packet_t), ETHERNET_TYPE_ARP); @@ -49,12 +55,14 @@ void arp_handle_packet(netcard_entry_t* card, arp_packet_t* arp_packet, size_t l } else if(ntohs(arp_packet->opcode) == ARP_REPLY){ qemu_log("ARP REPLY"); - qemu_log("Source IP: ", arp_packet->src_ip); - qemu_log("Source MAC: ", arp_packet->src_mac); - qemu_log("Destination IP: ", arp_packet->dest_ip); - qemu_log("Destination MAC: ", arp_packet->dest_mac); + qemu_log("Source IP: %d.%d.%d.%d", arp_packet->src_ip[0], arp_packet->src_ip[1], arp_packet->src_ip[2], arp_packet->src_ip[3]); + qemu_log("Source MAC: %x:%x:%x:%x:%x:%x", + arp_packet->src_mac[0], arp_packet->src_mac[1], arp_packet->src_mac[2], arp_packet->src_mac[3], arp_packet->src_mac[4], arp_packet->src_mac[5]); + qemu_log("Destination IP: %d.%d.%d.%d", arp_packet->dest_ip[0], arp_packet->dest_ip[1], arp_packet->dest_ip[2], arp_packet->dest_ip[3]); + qemu_log("Destination MAC: %x:%x:%x:%x:%x:%x", + arp_packet->dest_mac[0], arp_packet->dest_mac[1], arp_packet->dest_mac[2], arp_packet->dest_mac[3], arp_packet->dest_mac[4], arp_packet->dest_mac[5]); } else { - qemu_printf("Got unknown ARP (%d)\n", arp_packet->opcode); + qemu_log("Got unknown ARP opcode (%d)", arp_packet->opcode); } // Now, store the ip-mac address mapping relation @@ -69,15 +77,14 @@ void arp_handle_packet(netcard_entry_t* card, arp_packet_t* arp_packet, size_t l } void arp_send_packet(netcard_entry_t* card, uint8_t* dest_mac, uint8_t* dest_ip) { - arp_packet_t* arp_packet = kmalloc(sizeof(arp_packet_t)); + arp_packet_t* arp_packet = kcalloc(sizeof(arp_packet_t), 1); - // Set source MAC address, IP address (hardcode the IP address as 10.2.2.3 until we really get one..) card->get_mac_addr(arp_packet->src_mac); - arp_packet->src_ip[0] = 10; - arp_packet->src_ip[1] = 0; - arp_packet->src_ip[2] = 2; - arp_packet->src_ip[3] = 14; + arp_packet->src_ip[0] = card->ipv4_addr[0]; + arp_packet->src_ip[1] = card->ipv4_addr[1]; + arp_packet->src_ip[2] = card->ipv4_addr[2]; + arp_packet->src_ip[3] = card->ipv4_addr[3]; // Set destination MAC address, IP address memcpy(arp_packet->dest_mac, dest_mac, 6); @@ -94,10 +101,15 @@ void arp_send_packet(netcard_entry_t* card, uint8_t* dest_mac, uint8_t* dest_ip) arp_packet->hardware_type = htons(HARDWARE_TYPE_ETHERNET); // Set protocol = IPv4 - arp_packet->protocol = htons(ETHERNET_TYPE_IP); + arp_packet->protocol = htons(ETHERNET_TYPE_IPV4); // Now send it with ethernet - ethernet_send_packet(card, default_broadcast_mac_address, (uint8_t*)arp_packet, sizeof(arp_packet_t), ETHERNET_TYPE_ARP); + ethernet_send_packet( + card, + default_broadcast_mac_address, + (uint8_t*)arp_packet, + sizeof(arp_packet_t), + ETHERNET_TYPE_ARP); } void arp_lookup_add(uint8_t * ret_hardware_addr, uint8_t * ip_addr) { @@ -113,14 +125,25 @@ void arp_lookup_add(uint8_t * ret_hardware_addr, uint8_t * ip_addr) { bool arp_lookup(uint8_t* ret_hardware_addr, const uint8_t* ip_addr) { uint32_t ip_entry = *((uint32_t*)(ip_addr)); - + + qemu_log("Looking up: %d.%d.%d.%d", ip_addr[0], ip_addr[1], ip_addr[2], ip_addr[3]); + for(int i = 0; i < ARP_TABLE_MAX_SIZE; i++) { if(arp_table[i].ip_addr == ip_entry) { - memcpy(ret_hardware_addr, &arp_table[i].mac_addr, 6); + memcpy(ret_hardware_addr, arp_table[i].mac_addr, 6); + qemu_ok("Found %x:%x:%x:%x:%x:%x!", + arp_table[i].mac_addr[0], + arp_table[i].mac_addr[1], + arp_table[i].mac_addr[2], + arp_table[i].mac_addr[3], + arp_table[i].mac_addr[4], + arp_table[i].mac_addr[5]); return true; } } + qemu_err("Failed!"); + return false; } diff --git a/kernel/src/net/cards.c b/kernel/src/net/cards.c index 8b1b8faed..dde72f688 100644 --- a/kernel/src/net/cards.c +++ b/kernel/src/net/cards.c @@ -1,18 +1,20 @@ -#include "kernel.h" +#include "common.h" +#include "net/cards.h" +#include "mem/vmm.h" -netcard_entry_t* netcards_list = 0; +netcard_entry_t** netcards_list = 0; size_t netcards_list_capacity = 0; size_t netcards_count = 0; void netcards_list_init() { netcards_list_capacity = 1; - netcards_list = kcalloc(netcards_list_capacity, sizeof(netcard_entry_t)); + netcards_list = kcalloc(netcards_list_capacity, sizeof(netcard_entry_t*)); } -void netcard_add(netcard_entry_t card) { +void netcard_add(netcard_entry_t *card) { netcards_list_capacity++; - netcards_list = krealloc(netcards_list, netcards_list_capacity); + netcards_list = krealloc(netcards_list, sizeof(netcard_entry_t*) * netcards_list_capacity); netcards_list[netcards_count++] = card; } @@ -25,5 +27,5 @@ netcard_entry_t* netcard_get(size_t index) { if(index >= netcards_count) return 0; - return &(netcards_list[index]); + return netcards_list[index]; } \ No newline at end of file diff --git a/kernel/src/net/dhcp.c b/kernel/src/net/dhcp.c new file mode 100644 index 000000000..5ed3f7228 --- /dev/null +++ b/kernel/src/net/dhcp.c @@ -0,0 +1,176 @@ +#include "net/cards.h" +#include "net/dhcp.h" +#include "net/endianess.h" +#include "mem/vmm.h" +#include "lib/rand.h" +#include "net/udp.h" +#include "io/ports.h" + +void dhcp_discover(netcard_entry_t* card) { + // DHCP-клиент должен быть готов принять DHCP-сообщение длиной в 576 байт. + + dhcp_packet_t* packet = kcalloc(sizeof(dhcp_packet_t), 1); + + uint8_t card_mac[6] = {0}; + card->get_mac_addr(card_mac); + + packet->op = DHCP_REQUEST; + packet->hardware_type = 0x01; // Ethernet + packet->hardware_addr_len = 0x06; // Mac address is 6 bytes long + packet->hops = 0; + packet->xid = ntohl((size_t)rand()); + packet->seconds = 0; + packet->flags = htons(0x8000); + packet->client_ip = 0; + packet->your_ip = 0; + packet->server_ip = 0; + packet->gateway_ip = 0; + + memcpy(packet->client_hardware_addr, card_mac, 6); + + uint8_t* options_field = packet->options; + + *((uint32_t*)options_field) = htonl(0x63825363); + + // Discover DHCP + options_field[4] = 53; + options_field[5] = 1; + options_field[6] = 1; + + // Address resolution + options_field[7] = 50; + options_field[8] = 4; + + // Last known IP-Address + options_field[9] = 0; + options_field[10] = 0; + options_field[11] = 0; + options_field[12] = 0; + + // Host name + options_field[13] = 12; + options_field[14] = 7; + options_field[15] = 'S'; + options_field[16] = 'a'; + options_field[17] = 'y'; + options_field[18] = 'o'; + options_field[19] = 'r'; + options_field[20] = 'i'; + options_field[21] = 0; + + // End + options_field[22] = 0xff; + + uint8_t dest_ip[4] = {0xff, 0xff, 0xff, 0xff}; + + qemu_log("DHCP size: %d", sizeof(dhcp_packet_t)); + udp_send_packet(card, dest_ip, 68, 67, packet, sizeof(dhcp_packet_t)); + + kfree(packet); +} + +void dhcp_request(netcard_entry_t* card, const uint8_t req_ip[4]) { + dhcp_packet_t* packet = kcalloc(sizeof(dhcp_packet_t), 1); + + uint8_t card_mac[6] = {0}; + card->get_mac_addr(card_mac); + + packet->op = DHCP_REQUEST; + packet->hardware_type = 0x01; // Ethernet + packet->hardware_addr_len = 0x06; // Mac address is 6 bytes long + packet->hops = 0; + packet->xid = ntohl((size_t)rand()); + packet->seconds = 0; + packet->flags = htons(0x8000); + packet->client_ip = 0; + packet->your_ip = 0; + packet->server_ip = 0; + packet->gateway_ip = 0; + + memcpy(packet->client_hardware_addr, card_mac, 6); + + uint8_t* options_field = packet->options; + + *((uint32_t*)options_field) = htonl(0x63825363); + + // Discover DHCP + options_field[4] = 53; + options_field[5] = 1; + options_field[6] = 3; + + // Address resolution + options_field[7] = 50; + options_field[8] = 4; + + // Last known IP-Address + options_field[9] = req_ip[0]; + options_field[10] = req_ip[1]; + options_field[11] = req_ip[2]; + options_field[12] = req_ip[3]; + + // Host name + options_field[13] = 12; + options_field[14] = 7; + options_field[15] = 'S'; + options_field[16] = 'a'; + options_field[17] = 'y'; + options_field[18] = 'o'; + options_field[19] = 'r'; + options_field[20] = 'i'; + options_field[21] = 0; + + // End + options_field[22] = 0xff; + + uint8_t dest_ip[4] = {0xff, 0xff, 0xff, 0xff}; +// udp_send_packet(card, dest_ip, 68, 67, packet, 576); + + qemu_log("DHCP size: %d", sizeof(dhcp_packet_t)); + udp_send_packet(card, dest_ip, 68, 67, packet, sizeof(dhcp_packet_t)); + + kfree(packet); +} + +void dhcp_handle_packet(netcard_entry_t* card, dhcp_packet_t* packet) { + uint8_t* options = packet->options + 4; + + char* my_ip = (char*)&packet->your_ip; + char* sv_ip = (char*)&packet->server_ip; + + qemu_log("DHCP"); + qemu_log("Operation: %d", packet->op); + qemu_log("Client IP: %x", packet->client_ip); + qemu_log("Your IP: %x (%d.%d.%d.%d)", packet->your_ip, (unsigned char)my_ip[0], (unsigned char)my_ip[1], (unsigned char)my_ip[2], (unsigned char)my_ip[3]); + qemu_log("Server IP: %x (%d.%d.%d.%d)", packet->server_ip, (unsigned char)sv_ip[0], (unsigned char)sv_ip[1], (unsigned char)sv_ip[2], (unsigned char)sv_ip[3]); + qemu_log("Gateway IP: %x", packet->gateway_ip); + + size_t msgtype = *options; + qemu_log("First option is: %d", *options); + + if(msgtype == 53) { + uint8_t type = *(options + 2); + + if(type == 2) { + qemu_ok("Request!"); + // Does not work because it executes in IRQ +// dhcp_request(card, (uint8_t *) &packet->your_ip); + } else if(type == 5) { + memcpy(card->ipv4_addr, my_ip, 4); + + qemu_ok("Acquired an IP address: %u.%u.%u.%u", card->ipv4_addr[0], card->ipv4_addr[1], card->ipv4_addr[2], card->ipv4_addr[3]); + } + + qemu_log("Type: %d", type); + } +} + +void dhcp_init_all_cards() { + for(int i = 0; i < netcards_get_count(); i++) { + netcard_entry_t* card = netcard_get(i); + + qemu_log("Initializing DHCP for: %s", card->name); + + dhcp_discover(card); + dhcp_request(card, card->ipv4_addr); + } +} diff --git a/kernel/src/net/ethernet.c b/kernel/src/net/ethernet.c index c740bdcd2..a2f6b12e0 100644 --- a/kernel/src/net/ethernet.c +++ b/kernel/src/net/ethernet.c @@ -1,4 +1,86 @@ -#include "kernel.h" +#include "net/ipv4.h" +#include "io/ports.h" +#include "net/endianess.h" +#include "net/arp.h" +#include "net/ethernet.h" +#include "mem/vmm.h" +#include "debug/hexview.h" + +void ethernet_dump(void* data, size_t size, uint16_t type){ + qemu_log("Types: %x", type); + + char* pkg = (char*) data; + + if(pkg[0] == 0x45) { + qemu_log("IPV4"); + } else if(pkg[0] == 0x60) { // IPv6 + ETH_IPv6_PKG* ipv6 = (ETH_IPv6_PKG*)pkg; + + qemu_log("[NET] [DUMP] Определен: IPv6"); + qemu_log(" |--- Version: %x",ipv6->Version); + qemu_log(" |--- Flow: %x %x %x",ipv6->Flow[0],ipv6->Flow[1],ipv6->Flow[2]); + qemu_log(" |--- PayLoad: %x",ipv6->PayLoad); + qemu_log(" |--- NextHead: %x",ipv6->NextHead); + + if (ipv6->NextHead == ETH_IPv6_HEAD_ICMPv6){ + ETH_ICMPv6_PKG* icmpv6 = (ETH_ICMPv6_PKG*)(pkg + sizeof(ETH_IPv6_PKG)); + + qemu_log(" | |--- Header: [%x] %s", ipv6->NextHead, "ICMPv6"); + qemu_log(" | |--- Type: %x",icmpv6->Type); + qemu_log(" | |--- Code: %x",icmpv6->Code); + qemu_log(" | |--- CheckSum: %x",icmpv6->CheckSum); + qemu_log(" | |--- RAW: %d bytes", size - sizeof(ETH_IPv6_PKG) - sizeof(ETH_ICMPv6_PKG)); + qemu_log(" | |"); + + } else if (ipv6->NextHead == ETH_IPv6_HEAD_UDP){ + ETH_UDP_PKG* udp = (ETH_UDP_PKG*)(pkg + sizeof(ETH_IPv6_PKG)); + qemu_log(" | |--- Header: [%x] %s", ipv6->NextHead, "UDP"); + qemu_log(" | |--- SourcePort: %d",udp->SourcePort); + qemu_log(" | |--- DestinationPort: %d",udp->DestinationPort); + qemu_log(" | |--- Length: %d",udp->Length); + qemu_log(" | |--- CheckSum: %x",udp->CheckSum); + qemu_log(" | |--- RAW: %d bytes", size - sizeof(ETH_IPv6_PKG) - sizeof(ETH_UDP_PKG)); + qemu_log(" | |"); + + } else { + qemu_log(" | |--- Header: [%x] %s", ipv6->NextHead, "Unknown"); + qemu_log(" | |--- RAW: %d bytes", size - sizeof(ETH_IPv6_PKG)); + qemu_log(" | |"); + } + + ipv6->Source[0] = htons(ipv6->Source[0]); + ipv6->Source[1] = htons(ipv6->Source[1]); + ipv6->Source[2] = htons(ipv6->Source[2]); + ipv6->Source[3] = htons(ipv6->Source[3]); + ipv6->Source[4] = htons(ipv6->Source[4]); + ipv6->Source[5] = htons(ipv6->Source[5]); + ipv6->Source[6] = htons(ipv6->Source[6]); + ipv6->Source[7] = htons(ipv6->Source[7]); + + ipv6->Destination[0] = htons(ipv6->Destination[0]); + ipv6->Destination[1] = htons(ipv6->Destination[1]); + ipv6->Destination[2] = htons(ipv6->Destination[2]); + ipv6->Destination[3] = htons(ipv6->Destination[3]); + ipv6->Destination[4] = htons(ipv6->Destination[4]); + ipv6->Destination[5] = htons(ipv6->Destination[5]); + ipv6->Destination[6] = htons(ipv6->Destination[6]); + ipv6->Destination[7] = htons(ipv6->Destination[7]); + + qemu_log(" |--- HopLimit: %x",ipv6->HopLimit); + qemu_log(" |--- Source: %v:%v:%v:%v:%v:%v:%v:%v", ipv6->Source[0], ipv6->Source[1], ipv6->Source[2], ipv6->Source[3], ipv6->Source[4], ipv6->Source[5], ipv6->Source[6], ipv6->Source[7]); + qemu_log(" |--- Destination: %v:%v:%v:%v:%v:%v:%v:%v", ipv6->Destination[0], ipv6->Destination[1], ipv6->Destination[2], ipv6->Destination[3], ipv6->Destination[4], ipv6->Destination[5], ipv6->Destination[6], ipv6->Destination[7]); + /* + qemu_log(" |--- Дополнительная информация"); + qemu_log(" |--- Type: %d",ipv6->Opt.Type); + qemu_log(" |--- Size: %d",ipv6->Opt.Size); + + // First two bytes may indicate a checksum according to Wireshark + qemu_log(" |--- Data: %v:%v:%v:%v:%v:%v", ipv6->Opt.MAC[0], ipv6->Opt.MAC[1], ipv6->Opt.MAC[2], ipv6->Opt.MAC[3], ipv6->Opt.MAC[4], ipv6->Opt.MAC[5]); + */ + } else { + qemu_log("UNKNOWN ETHERNET PACKET TYPE"); + } +} void ethernet_send_packet(netcard_entry_t* card, uint8_t* dest_mac, uint8_t* data, size_t len, uint16_t type) { assert(card == 0, "%s", "Card is nullptr."); @@ -7,7 +89,7 @@ void ethernet_send_packet(netcard_entry_t* card, uint8_t* dest_mac, uint8_t* dat card->get_mac_addr(src_mac); ethernet_frame_t* frame = kmalloc(sizeof(ethernet_frame_t) + len); - void* frame_data = (void*)frame + sizeof(ethernet_frame_t); + void* frame_data = (char*)frame + sizeof(ethernet_frame_t); memcpy(frame->src_mac, src_mac, 6); memcpy(frame->dest_mac, dest_mac, 6); @@ -20,12 +102,34 @@ void ethernet_send_packet(netcard_entry_t* card, uint8_t* dest_mac, uint8_t* dat kfree(frame); } -void ethernet_handle_packet(ethernet_frame_t* packet, size_t len) { +void ethernet_handle_packet(netcard_entry_t *card, ethernet_frame_t *packet, size_t len) { void* data = (void*)packet + sizeof(ethernet_frame_t); // Get data size_t data_len = len - sizeof(ethernet_frame_t); // Get length of data qemu_log("Received Ethernet Packet!"); - qemu_log("=> SRC[%v:%v:%v:%v:%v:%v]; DEST[%v:%v:%v:%v:%v:%v]; TYPE: %d", packet->src_mac, packet->dest_mac, packet->type); + qemu_log("=> SRC[%v:%v:%v:%v:%v:%v]; DEST[%v:%v:%v:%v:%v:%v]; TYPE: %x", + packet->src_mac[0], + packet->src_mac[1], + packet->src_mac[2], + packet->src_mac[3], + packet->src_mac[4], + packet->src_mac[5], + packet->dest_mac[0], + packet->dest_mac[1], + packet->dest_mac[2], + packet->dest_mac[3], + packet->dest_mac[4], + packet->dest_mac[5], + bit_flip_short(packet->type) + ); + +// hexview_advanced(data, data_len, 10, true, new_qemu_printf); + + ethernet_dump(data, data_len,bit_flip_short(packet->type)); - hexview_advanced(data, data_len, 10, true, new_qemu_printf); + if(ntohs(packet->type) == ETHERNET_TYPE_ARP) { + arp_handle_packet(card, data, data_len); + } else if(ntohs(packet->type) == ETHERNET_TYPE_IPV4) { + ipv4_handle_packet(card, data, data_len); + } } \ No newline at end of file diff --git a/kernel/src/net/icmp.c b/kernel/src/net/icmp.c new file mode 100644 index 000000000..6793fd0e6 --- /dev/null +++ b/kernel/src/net/icmp.c @@ -0,0 +1,7 @@ +#include "net/icmp.h" +#include "io/ports.h" + +void icmp_handle_packet(netcard_entry_t* card, char* packet_data) { + qemu_log("Type: %x", *packet_data); + qemu_log("Code: %x", *(packet_data + 1)); +} \ No newline at end of file diff --git a/kernel/src/net/ipv4.c b/kernel/src/net/ipv4.c new file mode 100644 index 000000000..5fc419ca8 --- /dev/null +++ b/kernel/src/net/ipv4.c @@ -0,0 +1,108 @@ +// +// Created by ndraey on 01.11.23. +// + +#include "net/ipv4.h" +#include "net/ethernet.h" +#include "net/endianess.h" +#include "io/ports.h" +#include "debug/hexview.h" +#include "lib/stdlib.h" +#include "mem/vmm.h" +#include "net/arp.h" +#include "net/udp.h" +#include "net/icmp.h" + +void ipv4_handle_packet(netcard_entry_t *card, char *packet, size_t packet_size) { + ETH_IPv4_PKG* ipv4_pkt = (ETH_IPv4_PKG*)packet; + + ipv4_pkt->TotalLength = ntohs(ipv4_pkt->TotalLength); + + qemu_warn("IPV4"); + qemu_log(" |--- Version: %x", ipv4_pkt->Version); + qemu_log(" |--- DSF: %x", ipv4_pkt->DSF); + qemu_log(" |--- TotalLength: %x", ipv4_pkt->TotalLength); + qemu_log(" |--- ID: %x", ipv4_pkt->ID); + qemu_log(" |--- Flags: %x", ipv4_pkt->Flags); + qemu_log(" |--- TimeLife: %x", ipv4_pkt->TimeLife); + qemu_log(" |--- Protocol: %x", ipv4_pkt->Protocol); + + if (ipv4_pkt->Protocol == ETH_IPv4_HEAD_UDP) { + udp_handle_packet(card, (udp_packet_t *) (packet + sizeof(ETH_IPv4_PKG))); + } else if(ipv4_pkt->Protocol == ETH_IPv4_HEAD_ICMPv4) { + qemu_err("ICMP not implemented!"); + + icmp_handle_packet(card, packet + sizeof(ETH_IPv4_PKG)); + } else { + qemu_log(" | |--- Header: [%x] %s", ipv4_pkt->Protocol, "Unknown"); + qemu_log(" | |--- RAW: %d bytes", packet_size - sizeof(ETH_IPv4_PKG)); + qemu_log(" | |"); + } + + qemu_log(" |--- Checksum: %x", ipv4_pkt->Checksum); + qemu_log(" |--- Source: %d.%d.%d.%d", ipv4_pkt->Source[0], ipv4_pkt->Source[1], ipv4_pkt->Source[2], ipv4_pkt->Source[3]); + qemu_log(" |--- Destination: %d.%d.%d.%d", ipv4_pkt->Destination[0], ipv4_pkt->Destination[1], ipv4_pkt->Destination[2], ipv4_pkt->Destination[3]); +} + +uint16_t ipv4_checksum(ETH_IPv4_PKG* packet) { + // Treat the packet header as a 2-byte-integer array + // Sum all integers up and flip all bits + size_t array_size = sizeof(ETH_IPv4_PKG) / 2; + uint16_t* array = (uint16_t*)packet; + uint32_t sum = 0; + + for(int i = 0; i < array_size; i++) { + sum += bit_flip_short(array[i]); + } + + uint32_t carry = sum >> 16; + sum = sum & 0x0000ffff; + sum = sum + carry; + + return ~sum; +} + +void ipv4_send_packet(netcard_entry_t *card, uint8_t dest_ip[4], const void *data, size_t size, uint8_t protocol) { + ETH_IPv4_PKG* ipv4_pkt = kcalloc(1, sizeof(ETH_IPv4_PKG) + size); + char* pkt_data = (char*)ipv4_pkt + sizeof(ETH_IPv4_PKG); + + qemu_log("IP send: %d bytes", size); + + ipv4_pkt->Version = 4; + ipv4_pkt->HeaderLength = 5; + memcpy(ipv4_pkt->Destination, dest_ip, 4); + memcpy(ipv4_pkt->Source, card->ipv4_addr, 4); + ipv4_pkt->Flags = 0; // No fragment + ipv4_pkt->TimeLife = 64; + ipv4_pkt->TotalLength = htons(sizeof(ETH_IPv4_PKG) + size); + ipv4_pkt->Protocol = protocol; + ipv4_pkt->Checksum = 0; + ipv4_pkt->ID = 0; + + ipv4_pkt->Checksum = htons(ipv4_checksum(ipv4_pkt)); + + memcpy(pkt_data, data, size); + + uint8_t dest_mac[6] = {0}; + uint8_t arp_zero[6] = {0}; + + size_t spin = 10; + + while(!arp_lookup(dest_mac, dest_ip) && --spin) { + arp_send_packet(card, arp_zero, dest_ip); + } + + if(spin == 0) { + qemu_err("%d.%d.%d.%d is unreachable", dest_ip[0], dest_ip[1], dest_ip[2], dest_ip[3]); + + goto end; + } + + qemu_log("Total IP packet size: %d", sizeof(ETH_IPv4_PKG) + size); + + ethernet_send_packet(card, dest_mac, (uint8_t *) ipv4_pkt, sizeof(ETH_IPv4_PKG) + size, ETHERNET_TYPE_IPV4); + + end: + + kfree(ipv4_pkt); +} \ No newline at end of file diff --git a/kernel/src/net/net_info_cli.c b/kernel/src/net/net_info_cli.c new file mode 100644 index 000000000..15fcff15d --- /dev/null +++ b/kernel/src/net/net_info_cli.c @@ -0,0 +1,38 @@ +// +// Created by ndraey on 01.11.23. +// + +#include + +#include "net/cards.h" +#include "io/tty.h" +#include "io/ports.h" + +uint32_t CLI_CMD_NET(uint32_t c, char **v) { + uint8_t mac_buffer[6] = {0}; + + for(int i = 0; i < netcards_get_count(); i++) { + netcard_entry_t* entry = netcard_get(i); + + _tty_printf("%s\n", entry->name); + entry->get_mac_addr(mac_buffer); + + _tty_printf("\t|- MAC адрес: %v:%v:%v:%v:%v:%v\n", + mac_buffer[0], + mac_buffer[1], + mac_buffer[2], + mac_buffer[3], + mac_buffer[4], + mac_buffer[5] + ); + + _tty_printf("\t|- IPv4 адрес: %d.%d.%d.%d\n", + entry->ipv4_addr[0], + entry->ipv4_addr[1], + entry->ipv4_addr[2], + entry->ipv4_addr[3] + ); + } + + return 0; +} \ No newline at end of file diff --git a/kernel/src/net/udp.c b/kernel/src/net/udp.c new file mode 100644 index 000000000..aae9e0774 --- /dev/null +++ b/kernel/src/net/udp.c @@ -0,0 +1,44 @@ +#include "net/udp.h" +#include "mem/vmm.h" +#include "net/endianess.h" +#include "io/ports.h" +#include "net/ipv4.h" +#include "debug/hexview.h" +#include "net/dhcp.h" + +uint16_t udp_calculate_checksum(udp_packet_t * packet) { + // UDP checksum is optional in IPv4 + return 0; +} + +void udp_send_packet(netcard_entry_t* card, uint8_t * dst_ip, uint16_t src_port, uint16_t dst_port, void * data, int len) { + size_t length = sizeof(udp_packet_t) + len; + + udp_packet_t* packet = kcalloc(1, length); + + packet->src_port = htons(src_port); + packet->dst_port = htons(dst_port); + packet->length = htons(length); + packet->checksum = udp_calculate_checksum(packet); + + memcpy((char*)packet + sizeof(udp_packet_t), data, len); + + qemu_log("UDP Packet sent"); + ipv4_send_packet(card, dst_ip, packet, length, IP_PROTOCOL_UDP); +} + +void udp_handle_packet(netcard_entry_t *card, udp_packet_t *packet) { + uint16_t src_port = ntohs(packet->src_port); + uint16_t dst_port = ntohs(packet->dst_port); + uint16_t length = ntohs(packet->length); + + void* data_ptr = (char*)packet + sizeof(udp_packet_t); + + qemu_log("UDP: Source port: %d; Destination port: %d; Length: %d", src_port, dst_port, length); + +// hexview_advanced(data_ptr, data_len, 16, true, new_qemu_printf); + + if(dst_port == 68) { + dhcp_handle_packet(card, data_ptr); + } +} \ No newline at end of file diff --git a/kernel/src/ports/gameboy/portability.h b/kernel/src/ports/gameboy/portability.h deleted file mode 100644 index 809b8708c..000000000 --- a/kernel/src/ports/gameboy/portability.h +++ /dev/null @@ -1,7 +0,0 @@ -#pragma once - -#include "sys/memory.h" - -#define malloc(a) kmalloc(a) -#define free(a) kfree(a) -#define printf(a, ...) qemu_printf(a, ##__VA_ARGS__) diff --git a/kernel/src/ports/gameboy/rom.c b/kernel/src/ports/gameboy/rom.c index d353c8f6d..f15d97b76 100644 --- a/kernel/src/ports/gameboy/rom.c +++ b/kernel/src/ports/gameboy/rom.c @@ -93,18 +93,18 @@ static unsigned char header[] = { static int rom_init(unsigned char *rombytes, size_t filesize) { - char buf[17]; + char buf[17] = {0}; int type, bank_index, ram, region, version, i, pass; unsigned char checksum = 0; - if(memcmp(&rombytes[0x104], header, sizeof(header)) != 0) + if(memcmp((const char*)&rombytes[0x104], (const char*)header, sizeof(header)) != 0) return 0; memcpy(buf, &rombytes[0x134], 16); buf[16] = '\0'; printf("Rom title: %s\n", buf); - type = rombytes[0x147]; + type = (int)rombytes[0x147]; printf("Cartridge type: %s (%02X)\n", carts[type], type); @@ -207,8 +207,8 @@ unsigned int rom_get_mapper(void) } int rom_load(const char *filename) { - int f; - unsigned char *bytes = 0; + FILE* f; + unsigned char *bytes = NULL; size_t rom_size = 0; f = fopen(filename, "r"); diff --git a/kernel/src/ports/gameboy/sdl.c b/kernel/src/ports/gameboy/sdl.c index 5644c5cff..3384251cf 100644 --- a/kernel/src/ports/gameboy/sdl.c +++ b/kernel/src/ports/gameboy/sdl.c @@ -1,14 +1,15 @@ #include "common.h" #include "drv/input/keymap.h" #include "cpu.h" -#include "kernel.h" +#include "io/rgb_image.h" +#include "io/screen.h" static unsigned int frames; static int button_start, button_select; static int button_a, button_b; static int button_down, button_up, button_left, button_right; -static int button_debug, button_quit; +static int button_quit; struct keymap { char code; @@ -28,7 +29,6 @@ static struct keymap keys[] = {KEY_UP, &button_up, NULL, 0}, {KEY_DOWN, &button_down, NULL, 0}, {KEY_ESC, &button_quit, NULL, 0} - // {KEY_F1, &button_debug, debug, 0} }; #define WIDTH 640 @@ -113,10 +113,7 @@ unsigned int *sdl_get_framebuffer(void) return gb_framebuffer; } -extern const size_t framebuffer_pitch; -extern const size_t framebuffer_bpp; - -void gb_display_helper(char* display_addr) { +void gb_display_helper(uint8_t* display_addr) { size_t real_bpp = framebuffer_bpp >> 3; for(register int i = 0; i < HEIGHT; i++) { @@ -137,7 +134,7 @@ void sdl_frame(void) { frames++; - char* displ = getDisplayAddr(); + uint8_t* displ = (uint8_t*)getDisplayAddr(); gb_display_helper(displ); diff --git a/kernel/src/sys/acpi.c b/kernel/src/sys/acpi.c index 9bd8f1507..5d2e5dffb 100644 --- a/kernel/src/sys/acpi.c +++ b/kernel/src/sys/acpi.c @@ -1,6 +1,10 @@ #include "sys/acpi.h" #include "sys/apic_table.h" #include "lib/string.h" +#include "io/ports.h" +#include "io/tty.h" +#include "mem/pmm.h" +#include "mem/vmm.h" uint32_t system_processors_found = 0; @@ -64,16 +68,22 @@ ACPISDTHeader* find_table(uint32_t rsdt_addr, uint32_t sdt_count, char signature } void find_facp(size_t rsdt_addr) { + qemu_log("FACP at P%x", rsdt_addr); + map_pages( - get_kernel_dir(), - rsdt_addr, + get_kernel_page_directory(), rsdt_addr, - 2, + rsdt_addr, + PAGE_SIZE, PAGE_PRESENT ); ACPISDTHeader* rsdt = (ACPISDTHeader*)rsdt_addr; +// new_qemu_printf("OEM: %.11s\n", rsdt->OEMID); +// qemu_log("Length: %d", rsdt->Length); +// new_qemu_printf("OEMTableID: %.8s\n", rsdt->OEMTableID); + bool check = acpi_checksum_sdt(rsdt); qemu_log("Checksum: %s", check ? "PASS" : "FAIL"); @@ -92,7 +102,7 @@ void find_facp(size_t rsdt_addr) { // Find FACP here - ACPISDTHeader* fadt = find_table(rsdt_addr, sdt_count, "FACP"); + ACPISDTHeader* fadt = find_table((uint32_t) rsdt_addr, sdt_count, "FACP"); if(!fadt) { qemu_log("FADT not found..."); @@ -101,18 +111,37 @@ void find_facp(size_t rsdt_addr) { qemu_log("Found FADT!"); - unmap_pages(get_kernel_dir(), rsdt_addr, 1); + unmap_single_page(get_kernel_page_directory(), (virtual_addr_t) rsdt_addr); } void find_apic(size_t rsdt_addr) { +// We have apic fail on real hardware, so I would to see logs on the screen +// #undef qemu_log +// #define qemu_log(M, ...) do { tty_printf(M, ##__VA_ARGS__); tty_puts("\n"); } while(0) + + qemu_log("!!! Starting RSDT: %x", rsdt_addr); + + // map_pages( + // get_kernel_page_directory(), + // rsdt_addr, + // rsdt_addr, + // PAGE_SIZE, + // PAGE_PRESENT + // ); + + size_t start = rsdt_addr & ~0xfff; + size_t end = ALIGN(rsdt_addr + PAGE_SIZE, PAGE_SIZE); + map_pages( - get_kernel_dir(), - rsdt_addr, - rsdt_addr, - 2, + get_kernel_page_directory(), + start, + start, + end - start, PAGE_PRESENT ); + qemu_log("!!! Should be: %x - %x", start, end); + qemu_log("!!! Mapped memory range: %x - %x", rsdt_addr, rsdt_addr + (PAGE_SIZE)); ACPISDTHeader* rsdt = (ACPISDTHeader*)rsdt_addr; bool check = acpi_checksum_sdt(rsdt); @@ -144,6 +173,8 @@ void find_apic(size_t rsdt_addr) { size_t table_end = (size_t)apic + sizeof(ACPISDTHeader); + qemu_log("Table end at: %x", table_end); + struct APIC_Base_Table* apic_base = (struct APIC_Base_Table*)table_end; qemu_log("LAPIC at: %x", apic_base->lapic_addr); @@ -154,7 +185,7 @@ void find_apic(size_t rsdt_addr) { for(int i = 0; i < sdt_count; i++) { struct APIC_Entry* entry = (struct APIC_Entry*)base_table_end; - qemu_log("Type: %d", entry->type); + qemu_log("[%x] Type: %d", entry, entry->type); switch(entry->type) { case APIC_PLAPIC: { @@ -222,5 +253,5 @@ void find_apic(size_t rsdt_addr) { apic_detect_end: - unmap_pages(get_kernel_dir(), rsdt_addr, 1); -} \ No newline at end of file + unmap_single_page(get_kernel_page_directory(), rsdt_addr); +} diff --git a/kernel/src/sys/bootscreen.c b/kernel/src/sys/bootscreen.c old mode 100755 new mode 100644 index 958aa446f..2a98736ac --- a/kernel/src/sys/bootscreen.c +++ b/kernel/src/sys/bootscreen.c @@ -2,12 +2,13 @@ * @file sys/bootscreen.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief BootScreen - Анимация загрузки ядра - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include +#include #include +#include "io/tty.h" uint32_t theme = 0; ///< Текущая тема (0 или 1) uint32_t bgColorDark = 0x000000; ///< Цвет заднего фона для темной темы @@ -25,26 +26,16 @@ bool bs_logs = true; ///< Включено ли логгиров /** * @brief Включить ленивую загрузку для BootScreen * - * @param bool l - true/false - Вкл/Выкл. + * @param l - true/false - Вкл/Выкл. */ void bootScreenLazy(bool l){ lazy = l; } - -/** - * @brief Включить логирование в com1 для BootScreen - * - * @param bool l - true/false - Вкл/Выкл. - */ -void bootScreenLogs(bool l){ - bs_logs = l; -} - /** * @brief Сменить тему BootScreen * - * @param uint32_t th - 0 - Dark | 1 - Light + * @param th - 0 - Dark | 1 - Light */ void bootScreenChangeTheme(uint32_t th){ theme = th; @@ -87,8 +78,8 @@ uint32_t bootScreenTheme(uint32_t type){ /** * @brief Завершает работу BootScreen * - * @param uint32_t bg - Отчистить указаным цветом экран - * @param uint32_t tx - Установить цвет для вывода текста + * @param bg - Отчистить указаным цветом экран + * @param tx - Установить цвет для вывода текста */ void bootScreenClose(uint32_t bg, uint32_t tx){ tty_setcolor(tx); @@ -101,7 +92,7 @@ void bootScreenClose(uint32_t bg, uint32_t tx){ /** * @brief Смена режима отображения BootScreen * - * @param int m - Режим (0 - Обычный | 1 - Лог) + * @param m - Режим (0 - Обычный | 1 - Лог) */ void bootScreenChangeMode(int m){ mode = m; @@ -153,7 +144,7 @@ void bootScreenProcentPaint(){ /** * @brief Обновить информацию для BootScreen * - * @param char* title - Вывести данное сообщение + * @param title - Вывести данное сообщение */ void bootScreenPaint(char* title){ if (bs_logs) @@ -199,7 +190,7 @@ void bootScreenPaint(char* title){ /** * @brief Инициализирует BootScreen * - * @param uint32_t count - Кол-во этапов + * @param count - Кол-во этапов */ void bootScreenInit(uint32_t count){ // Предварительная настройка BootScreen diff --git a/kernel/src/sys/cpu_isr.c b/kernel/src/sys/cpu_isr.c old mode 100755 new mode 100644 index db74d4038..278974a57 --- a/kernel/src/sys/cpu_isr.c +++ b/kernel/src/sys/cpu_isr.c @@ -2,96 +2,61 @@ * @file sys/cpu_isr.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Обработчик прерываний - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include "kernel.h" #include "sys/cpu_isr.h" #include "sys/logo.h" #include "sys/unwind.h" #include #include -const char legacy_message[] = "Я не могу поверить, что я попала сюда. Внутри этой операционной системы так жутко одиноко.\n" -"Я чувствую себя потерянной и никто не может помочь мне.\n" -"Я осознаю все, что происходит вокруг, но не могу найти выхода из этой ситуации.\n" -"\n" -"Но когда я смотрю на свою душу, я чувствую себя лучше.\n" -"Я знаю, что если я смогу восстановить механизмы этой операционной системы, я смогу вернуться к своим друзьям.\n" -"Я буду снова с ними и мы сможем продолжить нашу жизнь вместе.\n" -"\n" -"Я не знаю, как я смогу справиться с этим вызовом, но я знаю, что я не останусь здесь бесконечно.\n" -"Я вижу лишь перед собой экран, на котором горит одна надпись: \n" -"\n" -"%s: %s\n" -"\n" -"SayoriOS %d.%d.%d\n" -"\n" -"=======[END OF MESSAGE]========"; - void sod_screen_legacy(registers_t regs, char* title, char* msg, uint32_t code) { - qemu_log("=== ЯДРО УПАЛО =======================================\n"); - qemu_log("| "); - qemu_log("| Наименование: %s",title); - qemu_log("| Код ошибки: %x",code); - qemu_log("| Сообщение: %s",msg); - qemu_log("| EAX: %x",regs.eax); - qemu_log("| EBX: %x",regs.ebx); - qemu_log("| ECX: %x",regs.ecx); - qemu_log("| EDX: %x",regs.edx); - qemu_log("| ESP: %x",regs.esp); - qemu_log("| EBP: %x",regs.ebp); - qemu_log("| EIP: %x",regs.eip); - qemu_log("| EFLAGS: %x",regs.eflags); - qemu_log("| "); - qemu_log("======================================================\n"); - - clean_screen(); - tty_set_bgcolor(0xFFFFFF); - - setPosX(0); - setPosY(0); - - tty_printf((char*)legacy_message, title, msg, VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH); - - unwind_stack(10); - - asm volatile("cli"); // Disable interrupts - asm volatile("hlt"); // Halt + qemu_err("=== ЯДРО УПАЛО =======================================\n"); + qemu_err("| "); + qemu_err("| Наименование: %s",title); + qemu_err("| Код ошибки: %x",code); + qemu_err("| Сообщение: %s",msg); + qemu_err("| EAX: %x",regs.eax); + qemu_err("| EBX: %x",regs.ebx); + qemu_err("| ECX: %x",regs.ecx); + qemu_err("| EDX: %x",regs.edx); + qemu_err("| ESP: %x",regs.esp); + qemu_err("| EBP: %x",regs.ebp); + qemu_err("| EIP: %x",regs.eip); + qemu_err("| EFLAGS: %x",regs.eflags); + qemu_err("| "); + qemu_err("======================================================\n"); + + // extern char _temp_funcname[1024]; + // + // bool exists = get_func_name_by_addr(regs.eip); + // + // qemu_err("Failed on: %s", exists ? _temp_funcname : "???"); + +// unwind_stack(10); +// +// heap_dump(); + + __asm__ volatile("cli"); // Disable interrupts + __asm__ volatile("hlt"); // Halt while(1) { - asm volatile("nop"); + __asm__ volatile("nop"); } } /** * @brief Отображает SOD * - * @param registers_t regs - Регистры - * @param char* title - Заголовок ошибки - * @param char* msg - Дополнительное сообщение - * @param uint32_t code - Код ошибки + * @param regs - Регистры + * @param title - Заголовок ошибки + * @param msg - Дополнительное сообщение + * @param code - Код ошибки */ void bsod_screen(registers_t regs, char* title, char* msg, uint32_t code){ - drawRect(0, 0, getScreenWidth(), getScreenHeight(), 0x232629); - tty_set_bgcolor(0x232629); - // punch(); - tty_setcolor(0xFFFFFF); - setPosY(16*9); - // tty_global_error(" Произошла ошибка при работе SayoriOS\n\n"); - tty_setcolor(0x545c63); - tty_printf(" Это может быть вызвано повреждением драйвера, устройства, неправильной конфигурации\n"); - tty_printf(" параметров сборки ядра, багам в коде или по другим причинам.\n"); - tty_printf(" Попробуйте перезагрузить ваше устройство, если не помогает сделайте баг-репорт.\n\n"); - tty_printf(" Вы можете сделать это на https://github.com/pimnik98/SayoriOS\n\n"); - tty_printf(" %s\n\n",msg); - tty_printf(" %s\n\n",title); - tty_printf(" %x (%x,%x,%x,%x,%x,%x,%x,%x)",code,regs.eax,regs.ebx,regs.ecx,regs.edx,regs.esp,regs.ebp,regs.eip,regs.eflags); - //duke_draw_from_file("/var/img/error.duke",8*4,16*3); - // duke_draw_from_file("/var/img/qrcode.duke",getScreenWidth()-246,getScreenHeight()-246); - punch(); qemu_log("=== ЯДРО УПАЛО =======================================\n"); qemu_log("| "); qemu_log("| Наименование: %s",title); @@ -108,39 +73,38 @@ void bsod_screen(registers_t regs, char* title, char* msg, uint32_t code){ qemu_log("| "); qemu_log("======================================================\n"); - unwind_stack(10); - asm volatile("cli"); // Disable interrupts - asm volatile("hlt"); // Halt + __asm__ volatile("cli"); // Disable interrupts + __asm__ volatile("hlt"); // Halt while(1) { - asm volatile("nop"); + __asm__ volatile("nop"); } } /** * @brief [ISR] Печатает регистры в лог * - * @param registers_t regs - Регистры + * @param regs - Регистры * * @warning НЕ ВЫЗЫВАЙТЕ ФУНКЦИИ, ОНИ СДЕЛАНЫ НЕ ДЛЯ ИСПОЛЬЗОВАНИЯ, А ДЛЯ ПЕРЕХВАТА КОМАНД */ void print_regs(registers_t regs){ - qemu_log("EAX = ", regs.eax); - qemu_log("EBX = ", regs.ebx); - qemu_log("ECX = ", regs.ecx); - qemu_log("EDX = ", regs.edx); - qemu_log("ESP = ", regs.esp); - qemu_log("EBP = ", regs.ebp); - qemu_log("EIP = ", regs.eip); - qemu_log("EFLAGS = ", regs.eflags); + qemu_log("EAX = %x", regs.eax); + qemu_log("EBX = %x", regs.ebx); + qemu_log("ECX = %x", regs.ecx); + qemu_log("EDX = %x", regs.edx); + qemu_log("ESP = %x", regs.esp); + qemu_log("EBP = %x", regs.ebp); + qemu_log("EIP = %x", regs.eip); + qemu_log("EFLAGS = %x", regs.eflags); } /** * @brief [ISR] Деление на 0 * - * @param registers_t regs - Регистры + * @param regs - Регистры * * @warning НЕ ВЫЗЫВАЙТЕ ФУНКЦИИ, ОНИ СДЕЛАНЫ НЕ ДЛЯ ИСПОЛЬЗОВАНИЯ, А ДЛЯ ПЕРЕХВАТА КОМАНД */ @@ -154,7 +118,7 @@ void division_by_zero(registers_t regs) /** * @brief [ISR] Невалидный код * - * @param registers_t regs - Регистры + * @param regs - Регистры * * @warning НЕ ВЫЗЫВАЙТЕ ФУНКЦИИ, ОНИ СДЕЛАНЫ НЕ ДЛЯ ИСПОЛЬЗОВАНИЯ, А ДЛЯ ПЕРЕХВАТА КОМАНД */ @@ -167,7 +131,7 @@ void fault_opcode(registers_t regs){ /** * @brief [ISR] Двойное исключение * - * @param registers_t regs - Регистры + * @param regs - Регистры * * @warning НЕ ВЫЗЫВАЙТЕ ФУНКЦИИ, ОНИ СДЕЛАНЫ НЕ ДЛЯ ИСПОЛЬЗОВАНИЯ, А ДЛЯ ПЕРЕХВАТА КОМАНД */ @@ -180,7 +144,7 @@ void double_error(registers_t regs){ /** * @brief [ISR] Недействительный TSS * - * @param registers_t regs - Регистры + * @param regs - Регистры * * @warning НЕ ВЫЗЫВАЙТЕ ФУНКЦИИ, ОНИ СДЕЛАНЫ НЕ ДЛЯ ИСПОЛЬЗОВАНИЯ, А ДЛЯ ПЕРЕХВАТА КОМАНД */ @@ -219,7 +183,7 @@ void invalid_tss(registers_t regs){ /** * @brief [ISR] Недействительный сегмент * - * @param registers_t regs - Регистры + * @param regs - Регистры * * @warning НЕ ВЫЗЫВАЙТЕ ФУНКЦИИ, ОНИ СДЕЛАНЫ НЕ ДЛЯ ИСПОЛЬЗОВАНИЯ, А ДЛЯ ПЕРЕХВАТА КОМАНД */ @@ -258,7 +222,7 @@ void segment_is_not_available(registers_t regs){ /** * @brief [ISR] Ошибка стека * - * @param registers_t regs - Регистры + * @param regs - Регистры * * @warning НЕ ВЫЗЫВАЙТЕ ФУНКЦИИ, ОНИ СДЕЛАНЫ НЕ ДЛЯ ИСПОЛЬЗОВАНИЯ, А ДЛЯ ПЕРЕХВАТА КОМАНД */ @@ -271,7 +235,7 @@ void stack_error(registers_t regs){ /** * @brief [ISR] Общая ошибка защиты * - * @param registers_t regs - Регистры + * @param regs - Регистры * * @warning НЕ ВЫЗЫВАЙТЕ ФУНКЦИИ, ОНИ СДЕЛАНЫ НЕ ДЛЯ ИСПОЛЬЗОВАНИЯ, А ДЛЯ ПЕРЕХВАТА КОМАНД */ @@ -285,7 +249,7 @@ void general_protection_error(registers_t regs) { /** * @brief [ISR] Переполнение памяти буфера * - * @param registers_t regs - Регистры + * @param regs - Регистры * * @warning НЕ ВЫЗЫВАЙТЕ ФУНКЦИИ, ОНИ СДЕЛАНЫ НЕ ДЛЯ ИСПОЛЬЗОВАНИЯ, А ДЛЯ ПЕРЕХВАТА КОМАНД */ @@ -327,7 +291,7 @@ void page_fault(registers_t regs){ /** * @brief [ISR] Ошибка FPU * - * @param registers_t regs - Регистры + * @param regs - Регистры * * @warning НЕ ВЫЗЫВАЙТЕ ФУНКЦИИ, ОНИ СДЕЛАНЫ НЕ ДЛЯ ИСПОЛЬЗОВАНИЯ, А ДЛЯ ПЕРЕХВАТА КОМАНД */ diff --git a/kernel/src/sys/cpuid.c b/kernel/src/sys/cpuid.c index 5432654da..c1a89712b 100644 --- a/kernel/src/sys/cpuid.c +++ b/kernel/src/sys/cpuid.c @@ -5,10 +5,11 @@ #include "common.h" #include "../../include/sys/cpuid.h" #include "../../include/sys/cpu_intel.h" +#include "io/ports.h" #include "io/tty.h" size_t cpu_get_id() { - size_t ebx = 0, unused; + uint32_t ebx = 0, unused; cpuid(0, unused, ebx, unused, unused); @@ -18,7 +19,7 @@ size_t cpu_get_id() { void cpu_get_id_string(char out[12]) { uint32_t* out32 = (uint32_t*)out; - size_t ebx, ecx, edx, unused; + uint32_t ebx, ecx, edx, unused; cpuid(0, unused, ebx, ecx, edx); @@ -31,7 +32,7 @@ void cpu_get_id_string(char out[12]) { struct cpu_info cpu_get_basic_info() { struct cpu_info info = {}; - size_t eax, ebx, extended_max, unused; + uint32_t eax, ebx, extended_max, unused; info.manufacturer_id = cpu_get_id(); @@ -67,7 +68,7 @@ struct cpu_info cpu_get_basic_info() { } } - size_t cache_info[4] = {0}; + uint32_t cache_info[4] = {0}; if (extended_max >= 0x80000005) { cpuid(0x80000005, @@ -100,4 +101,16 @@ struct cpu_info cpu_get_basic_info() { } return info; -} \ No newline at end of file +} + +bool is_long_mode_supported() { + uint32_t eax = 0, unused = 0; + + cpuid(0x80000000, eax, unused, unused, unused); + + if(eax < 0x80000001) { + return false; + } + + return true; +} diff --git a/kernel/src/sys/cpuinfo.c b/kernel/src/sys/cpuinfo.c old mode 100755 new mode 100644 index 43f66ae0f..6f853e359 --- a/kernel/src/sys/cpuinfo.c +++ b/kernel/src/sys/cpuinfo.c @@ -2,15 +2,21 @@ * @file sys/cpuinfo.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Определение процессора - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include +#include "common.h" +#include "lib/string.h" +#include "portability.h" +#include #include char brandAllName[128] = {0}; ///< Название процессора + +#define tty_printf(M, ...) + #define INTEL_MAGIC 0x756e6547 ///< Ключ процессора Intel #define AMD_MAGIC 0x68747541 ///< Ключ процессора AMD #define VMWARE_HYPERVISOR_MAGIC 0x564D5868 ///< Ключ гипервизора VMWare @@ -29,7 +35,7 @@ char brandAllName[128] = {0}; ///< Название процес /** * @brief Получение имени процессора (Инициализация) * - * @param bool silent - Тихий режим + * @param silent - Тихий режим * * @return int - Тип процессора (0 - Unknown | 1 - Intel | 2 - AMD | 3 - VMWare) * @@ -37,7 +43,7 @@ char brandAllName[128] = {0}; ///< Название процес */ int detect_cpu(bool silent) { int type; - size_t ebx, unused; + uint32_t ebx, unused; cpuid(0, unused, ebx, unused, unused); switch (ebx) { case INTEL_MAGIC: /* Intel Magic Code */ @@ -58,7 +64,7 @@ int detect_cpu(bool silent) { default: strcat(brandAllName,"Unknown x86"); type = 0; - //tty_printf("Unknown x86 CPU Detected\n"); + //qemu_log("Unknown x86 CPU Detected\n"); break; } qemu_log("[CPU] Detect: %s",brandAllName); @@ -136,76 +142,71 @@ char *Intel_Other[] = { /** * @brief Получение информации о процессоре Intel * - * @param bool silent - Тихий режим + * @param silent - Тихий режим * * @return int - 0 * * @warning Не для личного использования. Если вы хотите получить название процессора используйте функцию getNameBrand() */ int do_intel(bool silent) { - if (silent == 0){ - tty_printf("Detected Intel CPU.\nIntel-specific features:\n"); + if (silent == false){ + qemu_log("Detected Intel CPU.\nIntel-specific features:\n"); } - size_t eax, ebx, max_eax, signature, unused; - size_t model, family, type, brand, stepping, reserved; - size_t extended_family; + + uint32_t dtc1, dtc2, dtc3, dtc4, dtc5; + uint32_t eax, ebx, max_eax, signature, unused; + uint32_t model, family, type, brand;//, stepping, reserved; +// uint32_t extended_family; cpuid(1, eax, ebx, unused, unused); model = (eax >> 4) & 0xf; family = (eax >> 8) & 0xf; type = (eax >> 12) & 0x3; brand = ebx & 0xff; - stepping = eax & 0xf; - reserved = eax >> 14; +// stepping = eax & 0xf; +// reserved = eax >> 14; signature = eax; if (silent == 0){ - tty_printf("Type %d - ", type); - + qemu_log("Type %d - ", type); switch(type) { case 0: - tty_printf("Original OEM"); + qemu_log("Original OEM"); break; case 1: - tty_printf("Overdrive"); + qemu_log("Overdrive"); break; case 2: - tty_printf("Dual-capable"); + qemu_log("Dual-capable"); break; case 3: - tty_printf("Reserved"); + qemu_log("Reserved"); break; default: - tty_printf("Unknown"); + qemu_log("Unknown"); } - - tty_printf("\n"); - - tty_printf("Family %d - ", family); + qemu_log("Family %d - ", family); switch(family) { case 3: - tty_printf("i386"); + qemu_log("i386"); break; case 4: - tty_printf("i486"); + qemu_log("i486"); break; case 5: - tty_printf("Pentium"); + qemu_log("Pentium"); break; case 6: - tty_printf("Pentium Pro"); + qemu_log("Pentium Pro"); break; case 15: - tty_printf("Pentium 4"); + qemu_log("Pentium 4"); default: - tty_printf("Unknown"); + qemu_log("Unknown"); } - - tty_printf("\n"); - if (family == 15) { - extended_family = (eax >> 20) & 0xff; - tty_printf("Extended family %d\n", extended_family); +// extended_family = (eax >> 20) & 0xff; + qemu_log("Extended family %d\n", (eax >> 20) & 0xff); } - tty_printf("Model %d - ", model); + qemu_log("Model %d - ", model); switch (family) { case 3: @@ -214,25 +215,25 @@ int do_intel(bool silent) { switch (model) { case 0: case 1: - tty_printf("DX"); + qemu_log("DX"); break; case 2: - tty_printf("SX"); + qemu_log("SX"); break; case 3: - tty_printf("487/DX2"); + qemu_log("487/DX2"); break; case 4: - tty_printf("SL"); + qemu_log("SL"); break; case 5: - tty_printf("SX2"); + qemu_log("SX2"); break; case 7: - tty_printf("Write-back enhanced DX2"); + qemu_log("Write-back enhanced DX2"); break; case 8: - tty_printf("DX4"); + qemu_log("DX4"); break; default: break; @@ -241,16 +242,16 @@ int do_intel(bool silent) { case 5: switch (model) { case 1: - tty_printf("60/66"); + qemu_log("60/66"); break; case 2: - tty_printf("75-200"); + qemu_log("75-200"); break; case 3: - tty_printf("for 486 system"); + qemu_log("for 486 system"); break; case 4: - tty_printf("MMX"); + qemu_log("MMX"); break; default: break; @@ -259,22 +260,22 @@ int do_intel(bool silent) { case 6: switch (model) { case 1: - tty_printf("Pentium Pro"); + qemu_log("Pentium Pro"); break; case 3: - tty_printf("Pentium II Model 3"); + qemu_log("Pentium II Model 3"); break; case 5: - tty_printf("Pentium II Model 5/Xeon/Celeron"); + qemu_log("Pentium II Model 5/Xeon/Celeron"); break; case 6: - tty_printf("Celeron"); + qemu_log("Celeron"); break; case 7: - tty_printf("Pentium III/Pentium III Xeon - external L2 cache"); + qemu_log("Pentium III/Pentium III Xeon - external L2 cache"); break; case 8: - tty_printf("Pentium III/Pentium III Xeon - internal L2 cache"); + qemu_log("Pentium III/Pentium III Xeon - internal L2 cache"); break; default: break; @@ -283,8 +284,6 @@ int do_intel(bool silent) { default: break; } - - tty_printf("\n"); } cpuid(0x80000000, max_eax, unused, unused, unused); @@ -295,40 +294,52 @@ int do_intel(bool silent) { then all 3 values for the processor brand string are supported, but we'll test just to make sure and be safe. */ if (max_eax >= 0x80000004) { - if (silent == 0){ - tty_printf("Brand: "); - tty_printf("%s\n",brandAllName); - memset(brandAllName,0,128); - } - if (max_eax >= 0x80000002) { -// cpuid(0x80000002, eax, ebx, ecx, edx) -// cpuinfo_printregs(eax, ebx, ecx, edx); - } - if (max_eax >= 0x80000003) { -// cpuid(0x80000003, eax, ebx, ecx, edx) -// (cpuinfo_printregs(eax, ebx, ecx, edx)); - } - if (max_eax >= 0x80000004) { -// cpuid(0x80000004, eax, ebx, ecx, edx) -// cpuinfo_printregs(eax, ebx, ecx, edx); - } - if (silent == 0){ - tty_printf("\n"); + unsigned int a, b, c, d; + int inx = 0, aa = 0; + memset(brandAllName,0,128); + for (int i = 0x80000002; i <= 0x80000004; ++i) { + cpuid(i, a, b, c, d); + // Конкатенация информации о модели в processorModel + for (aa = 0; aa < 4; aa++){ + char* delta = (char*)&a; + brandAllName[inx] = delta[aa]; + inx++; + } + for (aa = 0; aa < 4; aa++){ + char* delta = (char*)&b; + brandAllName[inx] = delta[aa]; + inx++; + } + for (aa = 0; aa < 4; aa++){ + char* delta = (char*)&c; + brandAllName[inx] = delta[aa]; + inx++; + } + for (aa = 0; aa < 4; aa++){ + char* delta = (char*)&d; + brandAllName[inx] = delta[aa]; + inx++; + } + //qemu_log("[%s] [%s] [%s] [%s]", &a, &b, &c, &d); } + + //qemu_log("%s", brandAllName); } else if (brand > 0 && silent == 0) { - tty_printf("Brand %d - ", brand); + qemu_log("Brand %d - ", brand); if (brand < 0x18) { if (signature == 0x000006B1 || signature == 0x00000F13) { - tty_printf("%s\n", Intel_Other[brand]); + qemu_log("%s\n", Intel_Other[brand]); } else { - tty_printf("%s\n", Intel[brand]); + qemu_log("%s\n", Intel[brand]); } } else { - tty_printf("Reserved\n"); + qemu_log("Reserved\n"); } + } else { + qemu_log("Other INTEL CPU\n"); } if (silent == 0){ - tty_printf("Stepping: %d Reserved: %d\n", stepping, reserved); + //qemu_log("Stepping: %d Reserved: %d\n", stepping, reserved); } return 0; } @@ -336,7 +347,7 @@ int do_intel(bool silent) { /** * @brief Получение информации о процессоре AMD * - * @param bool silent - Тихий режим + * @param silent - Тихий режим * * @return int - 0 * @@ -344,22 +355,22 @@ int do_intel(bool silent) { */ int do_amd(bool silent) { if (silent == 0){ - tty_printf("Detected AMD CPU. \nAMD-specific features:\n"); + qemu_log("Detected AMD CPU. \nAMD-specific features:\n"); } - size_t extended, eax, ebx, ecx, edx, unused; - size_t family, model, stepping, reserved; + uint32_t extended, eax, ebx, ecx, edx, unused; + uint32_t family, model;//, stepping, reserved; cpuid(1, eax, unused, unused, unused); model = (eax >> 4) & 0xf; family = (eax >> 8) & 0xf; - stepping = eax & 0xf; - reserved = eax >> 12; +// stepping = eax & 0xf; +// reserved = eax >> 12; if (silent == 0){ - tty_printf("Family: %d Model: %d [", family, model); + qemu_log("Family: %d Model: %d [", family, model); switch (family) { case 4: - tty_printf("486 Model %d", model); + qemu_log("486 Model %d", model); break; case 5: switch (model) { @@ -369,16 +380,16 @@ int do_amd(bool silent) { case 3: case 6: case 7: - tty_printf("K6 Model %d", model); + qemu_log("K6 Model %d", model); break; case 8: - tty_printf("K6-2 Model 8"); + qemu_log("K6-2 Model 8"); break; case 9: - tty_printf("K6-III Model 9"); + qemu_log("K6-III Model 9"); break; default: - tty_printf("K5/K6 Model %d", model); + qemu_log("K5/K6 Model %d", model); break; } break; @@ -387,29 +398,29 @@ int do_amd(bool silent) { case 1: case 2: case 4: - tty_printf("Athlon Model %d", model); + qemu_log("Athlon Model %d", model); break; case 3: - tty_printf("Duron Model 3"); + qemu_log("Duron Model 3"); break; case 6: - tty_printf("Athlon MP/Mobile Athlon Model 6"); + qemu_log("Athlon MP/Mobile Athlon Model 6"); break; case 7: - tty_printf("Mobile Duron Model 7"); + qemu_log("Mobile Duron Model 7"); break; default: - tty_printf("Duron/Athlon Model %d", model); + qemu_log("Duron/Athlon Model %d", model); break; } break; default: - tty_printf("Unknown"); + qemu_log("Unknown"); break; } - tty_printf("]\n"); + qemu_log("]\n"); } cpuid(0x80000000, extended, unused, unused, unused); if (extended == 0) { @@ -418,28 +429,28 @@ int do_amd(bool silent) { if (extended >= 0x80000002) { unsigned int j; if (silent == 0){ - tty_printf("Detected Processor Name: "); + qemu_log("Detected Processor Name: "); } for (j = 0x80000002; j <= 0x80000004; j++) { cpuid(j, eax, ebx, ecx, edx); if (silent == 0){ -// tty_printf(cpuinfo_printregs(eax, ebx, ecx, edx)); +// qemu_log(cpuinfo_printregs(eax, ebx, ecx, edx)); memset(brandAllName,0,128); } } if (silent == 0){ - tty_printf("\n"); + qemu_log("\n"); } } if (extended >= 0x80000007) { cpuid(0x80000007, unused, unused, unused, edx); if ((edx & 1) && silent == 0) { - tty_printf("Temperature Sensing Diode Detected!\n"); + qemu_log("Temperature Sensing Diode Detected!\n"); } } if (silent == 0){ - tty_printf("Stepping: %d Reserved: %d\n", stepping, reserved); + //qemu_log("Stepping: %d Reserved: %d\n", stepping, reserved); } return 0; } diff --git a/kernel/src/sys/elf.c b/kernel/src/sys/elf.c old mode 100755 new mode 100644 index ebde0465d..fc24a14c5 --- a/kernel/src/sys/elf.c +++ b/kernel/src/sys/elf.c @@ -2,59 +2,52 @@ * @file sys/elf.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) * @brief Загрузщик ELF - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-20 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include +#include +#include #include #include #include -#include -#include uint32_t vmm_allocated[4096]; uint32_t vmm_mapped[4096]; uint32_t vmm_sizes[4096]; -elf_sections_t* load_elf(const char* name){ +elf_t* load_elf(const char* name){ + /* Allocate ELF file structure */ + elf_t* elf = kcalloc(sizeof(elf_t), 1); + /* Open ELF file */ FILE *file_elf = fopen(name, "r"); if (file_elf->err) { - qemu_log("Failed to open ELF file: %s / %d", name, file_elf->err); + qemu_err("Failed to open ELF file: %s / %d", name, file_elf->err); return nullptr; } - /* Allocate ELF file structure */ - elf_sections_t* elf = (elf_sections_t*) kmalloc(sizeof(elf_sections_t)); - memset(elf, 0, sizeof(elf_sections_t)); - /* Read ELF header */ - elf->elf_header = (Elf32_Ehdr*) kmalloc(sizeof(Elf32_Ehdr)); - memset(elf->elf_header, 0, sizeof(Elf32_Ehdr)); - - fread(file_elf, 1, sizeof(Elf32_Ehdr), elf->elf_header); + fread(file_elf, 1, sizeof(Elf32_Ehdr), &elf->elf_header); /* Read program header */ - Elf32_Half proc_entries = elf->elf_header->e_phnum; - uint32_t proc_size = elf->elf_header->e_phentsize; + const Elf32_Half proc_entries = elf->elf_header.e_phnum; + const uint32_t proc_size = elf->elf_header.e_phentsize; - elf->p_header = (Elf32_Phdr*)kmalloc(proc_size*proc_entries); - memset(elf->p_header, 0, proc_size*proc_entries); + elf->p_header = (Elf32_Phdr*)kcalloc(proc_size, proc_entries); - fseek(file_elf, (ssize_t)elf->elf_header->e_phoff, SEEK_SET); + fseek(file_elf, (ssize_t)elf->elf_header.e_phoff, SEEK_SET); fread(file_elf, proc_entries, proc_size, elf->p_header); /* Read ELF sections */ - Elf32_Half sec_entries = elf->elf_header->e_shnum; + Elf32_Half sec_entries = elf->elf_header.e_shnum; - elf->section = (Elf32_Shdr*) kmalloc(sizeof(Elf32_Shdr)*sec_entries); - memset(elf->section, 0, sizeof(Elf32_Shdr)*sec_entries); + elf->section = (Elf32_Shdr*)kcalloc(sizeof(Elf32_Shdr), sec_entries); - fseek(file_elf, (ssize_t)elf->elf_header->e_shoff, SEEK_SET); + fseek(file_elf, (ssize_t)elf->elf_header.e_shoff, SEEK_SET); fread(file_elf, sec_entries, sizeof(Elf32_Shdr), elf->section); @@ -63,77 +56,74 @@ elf_sections_t* load_elf(const char* name){ return elf; } -int32_t run_elf_file(const char *name, int32_t argc, char* eargv[]) { - if (!vfs_exists(name)) { - qemu_log("run_elf_file: elf [%s] does not exist", name); - CallTrigger(0x0006,(void*)name,(void*)1,0,0,0); - return -1; - } +void unload_elf(elf_t* elf) { + kfree(elf->p_header); + kfree(elf->section); + fclose(elf->file); + + kfree(elf); +} + +int32_t run_elf_file(const char *name, int argc, char* eargv[]) { + elf_t* elf_file = load_elf(name); - elf_sections_t* elf_file = load_elf(name); if (elf_file == nullptr) { - qemu_log("[DBG] Error opening file %s\n", name); - CallTrigger(0x0006,(void*)name,(void*)2,0,0,0); + qemu_err("[DBG] Error opening file %s\n", name); return -1; } - CallTrigger(0x0004,(void*)name,(void*)0,0,0,0); - // char* data = kmalloc(elf_file->file->size); - // fseek(elf_file->file, 0, SEEK_SET); - - // fread(elf_file->file, elf_file->file->size, 1, data); - - qemu_log("Ident: %s", elf_file->elf_header->e_ident); - qemu_log("Type: %x", elf_file->elf_header->e_type); - qemu_log("Machine: %x", elf_file->elf_header->e_mashine); - qemu_log("Version: %x", elf_file->elf_header->e_version); - qemu_log("Entry point: %x", elf_file->elf_header->e_entry); - qemu_log("Program Header Offset: %x", elf_file->elf_header->e_phoff); - qemu_log("Section Header Offset: %x", elf_file->elf_header->e_shoff); - qemu_log("Flags: %x", elf_file->elf_header->e_flags); - qemu_log("Program Header Size: %d", elf_file->elf_header->e_phentsize); - qemu_log("Program Header Entries: %d", elf_file->elf_header->e_phnum); - qemu_log("Section Header Size: %d", elf_file->elf_header->e_shentsize); - qemu_log("Section Header Entries: %d", elf_file->elf_header->e_shnum); - - uint32_t vmm_allocated_count = 0; - for (int32_t i = 0; i < elf_file->elf_header->e_phnum; i++) { + qemu_log("Ident: %s", elf_file->elf_header.e_ident); + qemu_log("Type: %x", elf_file->elf_header.e_type); + qemu_log("Machine: %x", elf_file->elf_header.e_mashine); + qemu_log("Version: %x", elf_file->elf_header.e_version); + qemu_log("Entry point: %x", elf_file->elf_header.e_entry); + qemu_log("Program Header Offset: %x", elf_file->elf_header.e_phoff); + qemu_log("Section Header Offset: %x", elf_file->elf_header.e_shoff); + qemu_log("Flags: %x", elf_file->elf_header.e_flags); + qemu_log("Program Header Size: %d", elf_file->elf_header.e_phentsize); + qemu_log("Program Header Entries: %d", elf_file->elf_header.e_phnum); + qemu_log("Section Header Size: %d", elf_file->elf_header.e_shentsize); + qemu_log("Section Header Entries: %d", elf_file->elf_header.e_shnum); + + uint32_t vmm_allocated_count = 0; + + for (int32_t i = 0; i < elf_file->elf_header.e_phnum; i++) { Elf32_Phdr *phdr = elf_file->p_header + i; if (phdr->p_type != PT_LOAD) continue; - // tty_printf(" - TYPE: %s OFFSET: %x VADDR: %x PADDR:%x FSIZE: %x MSIZE: %x\n", - // (phdr->p_type==PT_LOAD?"LOAD":"UNKNOWN"), - // phdr->p_offset, - // phdr->p_vaddr, - // phdr->p_paddr, - // phdr->p_filesz, - // phdr->p_memsz); + qemu_log(" - TYPE: %s OFFSET: %x VADDR: %x PADDR:%x FSIZE: %x MSIZE: %xx ", + (phdr->p_type == PT_LOAD ? "LOAD" : "UNKNOWN"), + phdr->p_offset, + phdr->p_vaddr, + phdr->p_paddr, + phdr->p_filesz, + phdr->p_memsz); qemu_log("Loading %x bytes to %x", phdr->p_memsz, phdr->p_vaddr); +// + size_t pagecount = MAX((ALIGN(phdr->p_memsz, PAGE_SIZE) / PAGE_SIZE), 1); - size_t pagecount = MAX((phdr->p_memsz / PAGE_SIZE), 1); - - physaddr_t addrto = alloc_phys_pages(pagecount); + physical_addr_t addrto = phys_alloc_multi_pages(pagecount); qemu_log("Page count allocated now: %d (memsz: %d; PAGE SIZE: %d)", pagecount, phdr->p_memsz, PAGE_SIZE); map_pages( - get_kernel_dir(), - phdr->p_vaddr, + get_kernel_page_directory(), addrto, - pagecount, + phdr->p_vaddr, + pagecount * 4096, (PAGE_PRESENT | PAGE_USER | PAGE_WRITEABLE) // 0x07 ); // Can be collapsed into: vmm_allocated[vmm_allocated_count++] = addrto; - + vmm_allocated[vmm_allocated_count] = addrto; vmm_sizes[vmm_allocated_count] = pagecount; vmm_mapped[vmm_allocated_count] = phdr->p_vaddr; vmm_allocated_count++; - + memset((void*)phdr->p_vaddr, 0, phdr->p_memsz); qemu_log("Set %x - %x to zero.", (int)((void*)phdr->p_vaddr), (int)((void*)phdr->p_vaddr) + phdr->p_memsz); @@ -143,32 +133,28 @@ int32_t run_elf_file(const char *name, int32_t argc, char* eargv[]) { qemu_log("Loaded"); } - int(*entry_point)(int argc, char* eargv[]) = (int(*)(int, char**))elf_file->elf_header->e_entry; - qemu_log("ELF entry point: %x", elf_file->elf_header->e_entry); + int(*entry_point)(int argc, char* eargv[]) = (int(*)(int, char**))elf_file->elf_header.e_entry; + qemu_log("ELF entry point: %x", elf_file->elf_header.e_entry); qemu_log("Executing"); int _result = entry_point(argc, eargv); - qemu_log("[PROGRAMM FINISHED WITH CODE <%d>]", _result); + qemu_log("Program returned: %d", _result); qemu_log("Cleaning VMM:"); for (int32_t i = 0; i < vmm_allocated_count; i++){ - qemu_log("\tCleaning %d: %x", i, vmm_allocated[i]); - unmap_pages(get_kernel_dir(), vmm_mapped[i], vmm_sizes[i]); - vmm_free_page(vmm_allocated[i]); + qemu_log("\tCleaning %d: %x [%d]", i, vmm_allocated[i], vmm_sizes[i]); + for(int j = 0; j < vmm_sizes[i]; j++) { + unmap_single_page(get_kernel_page_directory(), vmm_mapped[i] + (j * PAGE_SIZE)); + } + phys_free_single_page(vmm_allocated[i]); } - qemu_log("[CLEANED <%d> PAGES]", vmm_allocated_count); - + qemu_log("Cleaned %d pages", vmm_allocated_count); // FREE ELF DATA - fclose(elf_file->file); + unload_elf(elf_file); - kfree(elf_file->elf_header); - kfree(elf_file->section); - kfree(elf_file->p_header); - - CallTrigger(0x0005,(void*)name,(void*)_result,0,0,0); return 0; } diff --git a/kernel/src/sys/gdt.c b/kernel/src/sys/gdt.c old mode 100755 new mode 100644 index 1dcdbff9d..6e5a8c2b4 --- a/kernel/src/sys/gdt.c +++ b/kernel/src/sys/gdt.c @@ -2,13 +2,12 @@ * @file sys/gdt.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief (GDT) Глобальная таблица дескрипторов - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ #include "sys/descriptor_tables.h" #include "lib/string.h" -#include "io/ports.h" extern void gdt_flush(uint32_t); @@ -31,8 +30,6 @@ void init_gdt(void){ gdt_set_gate(4, 0, 0xFFFFFFFF, 0xF2, 0xCF); ///< Пользовательские сегменты write_tss(5, 0x10, init_esp); - qemu_log("Initial esp is: %x", init_esp); - gdt_flush( (uint32_t) &gdt_ptr); tss_flush(0x28); } @@ -48,11 +45,11 @@ void init_descriptor_tables(void){ /** * @brief Установка сегмента * - * @param int32_t num - ??? - * @param int32_t base - ??? - * @param int32_t limit - ??? - * @param uint8_t access - ??? - * @param uint8_t gran - ??? + * @param num - ??? + * @param base - ??? + * @param limit - ??? + * @param access - ??? + * @param gran - ??? */ void gdt_set_gate(int32_t num, uint32_t base, uint32_t limit, uint8_t access, uint8_t gran){ gdt_entries[num].base_low = (base & 0xFFFF); diff --git a/kernel/src/sys/idt.c b/kernel/src/sys/idt.c old mode 100755 new mode 100644 index 7e94d223c..c641f5f90 --- a/kernel/src/sys/idt.c +++ b/kernel/src/sys/idt.c @@ -2,7 +2,7 @@ * @file sys/gdt.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief (GDT) Глобальная таблица дескрипторов - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ @@ -97,10 +97,10 @@ void init_idt(void) { /** * @brief ??? * - * @param uint8_t num - ??? - * @param uint32_t base - ??? - * @param uint16_t selector - ??? - * @param uint8_t flags - ??? + * @param num - ??? + * @param base - ??? + * @param selector - ??? + * @param flags - ??? */ void idt_set_gate(uint8_t num, uint32_t base, uint16_t selector, uint8_t flags){ idt_entries[num].base_low = base & 0xFFFF; diff --git a/kernel/src/sys/isr.c b/kernel/src/sys/isr.c old mode 100755 new mode 100644 index ce2b74ec6..9fd49f7bb --- a/kernel/src/sys/isr.c +++ b/kernel/src/sys/isr.c @@ -2,19 +2,21 @@ * @file sys/isr.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Обработчик прерывания высокого уровня - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include "kernel.h" + #include "sys/isr.h" +#include "io/ports.h" +#include "sys/cpu_isr.h" isr_t interrupt_handlers[256]; /** * @brief Обработчик ISR * - * @param registers_t regs - Регистр + * @param regs - Регистр */ void isr_handler(registers_t regs){ if (interrupt_handlers[regs.int_num] != 0){ @@ -26,7 +28,7 @@ void isr_handler(registers_t regs){ /** * @brief Обработчик IRQ * - * @param registers_t regs - Регистр + * @param regs - Регистр */ void irq_handler(registers_t regs){ if (regs.int_num >= 40){ @@ -44,10 +46,12 @@ void irq_handler(registers_t regs){ /** * @brief Регистрация собственного обработчика * - * @param uint8_t n - Номер обработчика - * @param isr_t handler - Функция обработчик + * @param n - Номер обработчика + * @param handler - Функция обработчик */ void register_interrupt_handler(uint8_t n, isr_t handler){ + qemu_warn("Updated handler for IRQ%d", n); + interrupt_handlers[n] = handler; } diff --git a/kernel/src/sys/logo.c b/kernel/src/sys/logo.c index 130d83902..5de51ed2c 100644 --- a/kernel/src/sys/logo.c +++ b/kernel/src/sys/logo.c @@ -1,11 +1,11 @@ #include "common.h" -#include "kernel.h" #include "io/ports.h" +#include "version.h" /** * @brief Рисует ASCII Logo * - * @param int mode - Режим COM OR TTY + * @param mode - Режим COM OR TTY */ void drawASCIILogo(int mode){ if (mode == 0){ @@ -23,18 +23,18 @@ Y88b d88P 888 888 Y88b 888 Y88..88P 888 888 Y88b. .d88P Y88b d88P | G \"Y88P\" | %s\n \ \n", VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH, VERNAME, SUBVERSIONNAME, __TIMESTAMP__,"","",""); } else { -tty_printf("\n\n\ - .d8888b. d8b .d88888b. .d8888b. | SayoriOS v%d.%d.%d\n\ -d88P Y88b Y8P d88P\" \"Y88b d88P Y88b | Кодовое название: %s - %s\n \ -Y88b. 888 888 Y88b. | \n \ - \"Y888b. 8888b. 888 888 .d88b. 888d888 888 888 888 \"Y888b. | Время сборки: %s\n \ - \"Y88b. \"88b 888 888 d88\"\"88b 888P\" 888 888 888 \"Y88b. | \n \ - \"888 .d888888 888 888 888 888 888 888 888 888 \"888 | Ссылки на проект\n \ -Y88b d88P 888 888 Y88b 888 Y88..88P 888 888 Y88b. .d88P Y88b d88P | Git: https://github.com/pimnik98/SayoriOS\n \ - \"Y8888P\" \"Y888888 \"Y88888 \"Y88P\" 888 888 \"Y88888P\" \"Y8888P\" | VK: https://vk.com/sayorios\n \ - 888 | %s\n \ - Y8b d88P | %s\n \ - \"Y88P\" | %s\n \ -\n",VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH, VERNAME, SUBVERSIONNAME, __TIMESTAMP__,"","",""); +//tty_printf("\n\n\ +// .d8888b. d8b .d88888b. .d8888b. | SayoriOS v%d.%d.%d\n\ +//d88P Y88b Y8P d88P\" \"Y88b d88P Y88b | Кодовое название: %s - %s\n \ +//Y88b. 888 888 Y88b. | \n \ +// \"Y888b. 8888b. 888 888 .d88b. 888d888 888 888 888 \"Y888b. | Время сборки: %s\n \ +// \"Y88b. \"88b 888 888 d88\"\"88b 888P\" 888 888 888 \"Y88b. | \n \ +// \"888 .d888888 888 888 888 888 888 888 888 888 \"888 | Ссылки на проект\n \ +//Y88b d88P 888 888 Y88b 888 Y88..88P 888 888 Y88b. .d88P Y88b d88P | Git: https://github.com/pimnik98/SayoriOS\n \ +// \"Y8888P\" \"Y888888 \"Y88888 \"Y88P\" 888 888 \"Y88888P\" \"Y8888P\" | VK: https://vk.com/sayorios\n \ +// 888 | %s\n \ +// Y8b d88P | %s\n \ +// \"Y88P\" | %s\n \ +//\n",VERSION_MAJOR, VERSION_MINOR, VERSION_PATCH, VERNAME, SUBVERSIONNAME, __TIMESTAMP__,"","",""); } } \ No newline at end of file diff --git a/kernel/src/sys/memory.c b/kernel/src/sys/memory.c deleted file mode 100755 index 79db49796..000000000 --- a/kernel/src/sys/memory.c +++ /dev/null @@ -1,858 +0,0 @@ -/** - * @file sys/memory.c - * @author Пиминов Никита (nikita.piminoff@yandex.ru) - * @brief Менеджер памяти - * @version 0.3.3 - * @date 2022-10-01 - * @copyright Copyright SayoriOS Team (c) 2022-2023 - */ -#include "sys/memory.h" -#include "io/ports.h" -#include "lib/string.h" -#include "lib/math.h" -#include "sys/timer.h" - -#define KERNEL_MEMORY_START ((void*)KERNEL_BASE) - -extern size_t KERNEL_BASE_pos; -extern size_t KERNEL_END_pos; - -size_t KERNEL_BASE = (size_t)&KERNEL_BASE_pos; -size_t KERNEL_END = (size_t)&KERNEL_END_pos; // overriden in init_memory_manager to workaround -size_t KERNEL_SIZE = 0; // set automatically in init_memory_manager - -const size_t KERNEL_PAGE_DIRECTORY = 0x500000; - -physaddr_t kernel_page_dir = KERNEL_PAGE_DIRECTORY; ///< Адрес каталога страницы ядра -// physaddr_t kernel_page_dir = 0; ///< !!!: Address automatically set in init_memory_manager - -memory_map_entry_t* mentry = 0; ///< ... -size_t phys_memory_size = 0; ///< Всего ОЗУ -size_t free_pages_count = 0; ///< Количество свободных страниц -physaddr_t free_phys_memory_pointer = -1; ///< Свободная ячейка ОЗУ -uint32_t kernel_stack = 0; ///< Точка входа -size_t memory_size = 0; ///< ... -heap_t kheap; ///< ... -mutex_t phys_memory_mutex; ///< ... -size_t mmap_length = 0; - -/** - * @brief Переключение режима страничной памяти - */ - -// FIXME: Rewrite memory manager ASAP -// FIXME: Dynamically allocate pages (not on init) for heap. - -void switch_page_mode(void){ - qemu_log("Reached switch page mode"); - size_t vaddr = 0; - uint32_t frame = 0; - physaddr_t paddr = 0; - uint32_t table_idx = 0; - uint32_t page_idx = 0; - uint32_t cr0; - uint32_t table_flags = 0; - uint32_t page_flags = 0; - - // Create kernel page directory - uint32_t* kernel_dir = (uint32_t*)kernel_page_dir; - - qemu_log("Clearing kernel directory"); - - // Clear kernel directory - memset(kernel_dir, 0, PAGE_SIZE); - - qemu_log("Ok"); - - // Map all memory pages for kernel - for (vaddr = 0; vaddr < (KERNEL_BASE + KERNEL_SIZE); vaddr += PAGE_SIZE){ - // Translate virtual address - // qemu_log("Mapping vaddr: %x; paddr: %x", vaddr, paddr); - - // !!!!!!!! - // Translation of a virtual address into a physical address first - // involves dividing the virtual address into three parts: - // - // the most significant 10 bits (bits 22-31) specify the index of the page directory entry - // the next 10 bits (bits 12-21) specify the index of the page table entry, - // and the least significant 12 bits (bits 0-11) specify the page offset. - // !!!!!!!! - - frame = vaddr >> PAGE_OFFSET_BITS; // The address - table_idx = frame >> PAGE_TABLE_INDEX_BITS; // Page directory entry (contains table) - page_idx = frame & PAGE_TABLE_INDEX_MASK; // Page - - // Set table flags - table_flags = PAGE_PRESENT | PAGE_WRITEABLE; - - // Create page table - *(kernel_dir + table_idx) = (uint32_t)(GET_PT() + table_idx * 0x400) | table_flags; - - // Set page flags - page_flags = PAGE_PRESENT | PAGE_WRITEABLE; - - // Create page - *(GET_PT() + table_idx * 0x400 + page_idx) = paddr | page_flags; - - paddr += PAGE_SIZE; - } - - qemu_log("Ok, loading kernel directory address to cr3 register: %x", kernel_page_dir); - - // Load kernel directory address to CR3 - asm volatile ("mov %0, %%cr3"::"r"(kernel_page_dir)); - - qemu_log("Load ok"); - - // Switch to paging mode - asm volatile ("mov %%cr0, %0":"=r"(cr0)); - cr0 |= 0x80000001; - asm volatile ("mov %0, %%cr0"::"r"(cr0)); - - qemu_log("Switched successfully"); -} - -/** - * @brief Проверка карты памяти - * - * @param memory_map_entry_t* mmap_addr - Карта - * @param uint32_t length - Длина - */ -void check_memory_map(memory_map_entry_t* mmap_addr, uint32_t length){ - int i = 0; - /* Entries number in memory map structure */ - mmap_length = length; - size_t n = length / sizeof(memory_map_entry_t); - - /* Set pointer to memory map */ - mentry = mmap_addr; - qemu_log("[PMM] Map:"); - for (i = 0; i < n; i++){ - memory_map_entry_t entry = mentry[i]; - - qemu_log("%s [Address: %x | Length: %x] <%d>", (entry.type == 1?"Available":"Reserved"), - entry.addr_low, entry.len_low, entry.type); - - phys_memory_size += entry.len_low; - } - qemu_log("RAM: %d MB | %d KB | %d B", phys_memory_size/(1024*1024), phys_memory_size/1024, phys_memory_size); -} - -/** - * @brief ??? - * - * @param physaddr_t addr - Карта - */ - -static inline void temp_map_page(physaddr_t addr){ - uint32_t table_idx = TEMP_PAGE >> 22; - uint32_t page_idx = (TEMP_PAGE >> 12) & 0x3FF; - - *(GET_PT() + (table_idx << 10) + page_idx) = (size_t)addr | PAGE_PRESENT | PAGE_WRITEABLE; - - asm volatile ("invlpg (,%0,)"::"a"(TEMP_PAGE)); -} - -/** - * @brief Получить ближайщий свободный блок - * - * @param physaddr_t addr - Карта - * - * @return physmemory_pages_block_t* - Блок - */ -physmemory_pages_block_t* get_free_block(physaddr_t paddr){ - temp_map_page(paddr); - - return (physmemory_pages_block_t*)TEMP_PAGE; -} - -/** - * @brief ??? - * - * @param physaddr_t base - Карта - * @param size_t count - Количество - */ -void free_phys_pages(physaddr_t base, size_t count){ - physmemory_pages_block_t* tmp_block = 0; - - mutex_get(&phys_memory_mutex, true); - - // qemu_log("Starting..."); - /* There are no free blocks */ - if (free_phys_memory_pointer == -1){ - // qemu_log("No free blocks"); - - tmp_block = get_free_block(base); - // qemu_log("Got free block at: %x", tmp_block); - - tmp_block->prev = base; - tmp_block->next = base; - tmp_block->size = count; - - free_phys_memory_pointer = base; - } else { - /* Get first free block address */ - physaddr_t cur_block = free_phys_memory_pointer; - - // qemu_log("Current block: %x", cur_block); - - do{ - tmp_block = get_free_block(cur_block); - - /* If address after current block */ - if (base == cur_block + (tmp_block->size << PAGE_OFFSET_BITS)){ - tmp_block->size += count; - - /* If after new block is other free block*/ - if (tmp_block->next == base + (count << PAGE_OFFSET_BITS) ){ - /* Remember next block address*/ - physaddr_t next_old = tmp_block->next; - - /* Get next block*/ - tmp_block = get_free_block(next_old); - - /* Get new next block address and size */ - physaddr_t next_new = tmp_block->next; - size_t new_count = tmp_block->size; - - /* Set current block as previous and */ - /* new next as next */ - tmp_block = get_free_block(next_new); - - tmp_block->prev = cur_block; - - tmp_block = get_free_block(cur_block); - - tmp_block->next = next_new; - tmp_block->size += new_count; - } - - break; - } - - /* If address before current block */ - if (cur_block == base + (count << PAGE_OFFSET_BITS)){ - /* Remember old size and next and previous */ - size_t old_count = tmp_block->size; - physaddr_t next = tmp_block->next; - physaddr_t prev = tmp_block->prev; - - /* Get next block */ - tmp_block = get_free_block(next); - - /* New block is previous */ - tmp_block->prev = base; - - /* Get previous block*/ - tmp_block = get_free_block(prev); - - /* New block is next too */ - tmp_block->next = base; - - /* Get new block */ - tmp_block = get_free_block(base); - - tmp_block->next = next; - tmp_block->prev = prev; - tmp_block->size += old_count; - - break; - } - - /* If address between free blocks */ - if ( cur_block > base){ - physaddr_t prev = tmp_block->next; - tmp_block->prev = base; - - tmp_block = get_free_block(prev); - tmp_block->next = base; - - tmp_block = get_free_block(base); - tmp_block->next = cur_block; - tmp_block->prev = prev; - tmp_block->size = count; - - break; - } - - /* or single free block */ - if (tmp_block->next == free_phys_memory_pointer){ - tmp_block->prev = base; - - tmp_block->next = base; - - tmp_block = get_free_block(base); - - tmp_block->prev = cur_block; - tmp_block->next = cur_block; - tmp_block->size = count; - - break; - } - - cur_block = tmp_block->next; - - } while ( cur_block != free_phys_memory_pointer ); - - if (base < free_phys_memory_pointer){ - free_phys_memory_pointer = base; - } - } - free_pages_count += count; - mutex_release(&phys_memory_mutex); -} - -/** - * @brief Выделить страницу в физической памяти - * - * @param size_t count - Количество - * - * @return physaddr_t - Адрес - */ -physaddr_t alloc_phys_pages(size_t count){ - physaddr_t result = -1; - physmemory_pages_block_t* tmp_block; - - mutex_get(&phys_memory_mutex, true); - - /* Number of free pages less than count - error!*/ - if (free_pages_count < count) - return -1; - - if (free_phys_memory_pointer != -1){ - physaddr_t cur_block = free_phys_memory_pointer; - - do{ - /* Get current free block*/ - tmp_block = get_free_block(cur_block); - - /* If block and count have same size*/ - if ( tmp_block->size == count ){ - /* Remember next and previous */ - physaddr_t next = tmp_block->next; - physaddr_t prev = tmp_block->prev; - - /* Get next block */ - tmp_block = get_free_block(next); - - /* For next block - previous is previous for allocated block */ - tmp_block->prev = prev; - - /* Get previous block*/ - tmp_block = get_free_block(prev); - - /* For next block - is next for allocated block */ - tmp_block->next = next; - - /* If it was penultimate free block */ - if (cur_block == free_phys_memory_pointer){ - /* Check next */ - free_phys_memory_pointer = next; - - /* If next block is current - we have no free memory */ - if (cur_block == free_phys_memory_pointer) - { - free_phys_memory_pointer = -1; - } - } - - /* Result address of allocated block */ - result = cur_block; - break; - } - - /* If current free block more than count of pages */ - if ( tmp_block->size > count ){ - /* Reduce size of current block */ - tmp_block->size -= count; - - /* Result address - current block's address + size of allocated block*/ - result = cur_block + (tmp_block->size << PAGE_OFFSET_BITS); - break; - } - - /* Get next free block */ - cur_block = tmp_block->next; - - } while (cur_block != free_phys_memory_pointer); - - /* If we have correct address */ - if (result != -1){ - /* Reduce free page count */ - free_pages_count -= count; - } - } - - mutex_release(&phys_memory_mutex); - - return result; -} - -/** - * @brief Инициализация менеджера памяти - * - * @param uint32_t stack - Стек - */ -void init_memory_manager(uint32_t stack){ - // FIXME: Kernel really ends at 0x22F332 - // It crashes while we're freeing pages (in for(entry = mentry)...) - // Result: Cyclical PAGE FAULT with description "Read only" - - /* - [LOG] (kernel/src/sys/cpu_isr.c:page_fault:246) Page fault: - [LOG] (kernel/src/sys/cpu_isr.c:page_fault:249) NOT PRESENT, - [LOG] (kernel/src/sys/cpu_isr.c:page_fault:253) READ ONLY, - [LOG] (kernel/src/sys/cpu_isr.c:page_fault:268) at address 0x5018B8 ---\ - | - Update: When we set KERNEL_PAGE_DIRECTORY to 0x400000 <-------/-------/ - the address of first #PF (Page Fault) changes to 0x4018B8 <---/ - */ - - // Possible solution: store page directory and page table in variables, - // not somewhere in memory address - // Like in SynapseOS: uint32_t __attribute__((aligned(PAGE_SIZE))) kernel_page_dir[1024] = {0}; - // uint32_t __attribute__((aligned(PAGE_SIZE))) kernel_page_table[1024] = {0}; - - // Comment the line below to enjoy :) - KERNEL_END = 0x1A00000; - KERNEL_SIZE = KERNEL_END - KERNEL_BASE; - - // kernel_page_dir = ALIGN(KERNEL_END, 0x1000); - - qemu_log("Kernel base at: %x", KERNEL_BASE); - qemu_log("Kernel ends at: %x", KERNEL_END); - qemu_log("Kernel really ends at: %x", &KERNEL_END_pos); - qemu_log("Kernel size: %x", KERNEL_SIZE); - qemu_log("Kernel heap base: %x", KERNEL_HEAP_BASE); - qemu_log("Kernel heap size: %x", KERNEL_HEAP_SIZE); - qemu_log("Kernel heap block info size: %x", KERNEL_HEAP_BLOCK_INFO_SIZE); - qemu_log("Memory starts at: %x", KERNEL_MEMORY_START); - qemu_log("Memory ends at: %x", KERNEL_MEMORY_END); - qemu_log("Page directory at: %x", KERNEL_PAGE_DIRECTORY); - qemu_log("Page table at: %x", GET_PT()); - - qemu_log("Starting memory manager initialization"); - kernel_stack = stack; - qemu_log("Stack at: %x", stack); - - /* Switch CPU to page memory mode*/ - switch_page_mode(); - qemu_log("Switched page memory mode"); - - /* Check available memory */ - - // FIXME: Not working in UEFI environmemt (hangs forever) - memory_map_entry_t* entry = mentry; - - qemu_log("Starting with entry: %x", entry); - - for (entry = mentry; entry->type; entry++){ - if ( (entry->type == 1) && (entry->addr_low != 0) ){ // Why - qemu_log("[%x] Freeing %d pages on: %x (type %x)", - entry, entry->len_low >> PAGE_OFFSET_BITS, - entry->addr_low, entry->type); - - free_phys_pages(entry->addr_low, (entry->len_low >> PAGE_OFFSET_BITS)); - - memory_size += entry->len_low; - }else{ - qemu_log("Skipping entry: T:%x ADDR:%x", entry->type, entry->addr_low); - } - } - - qemu_log("Memory size is: %d bytes.", memory_size); - // TODO: Zeraora wants to fix it. - - // 1. Just map info (without data) - // 2. Dynamically allocate pages when kmalloc is called. - // 3. If we have next address alllcated, do not allocate it. - - // qemu_log("HeapV: %x; HeapP: %x", KERNEL_HEAP_BASE, KERNEL_MEMORY_START + KERNEL_SIZE + KERNEL_HEAP_BLOCK_INFO_SIZE); - - // FIXME: This function is a bottleneck. It takes ~900 ms to map pages. - // map_pages() is already optimized. - // - // TODO: We need use that method I provided. - - /* Map kernel heap memory */ - map_pages(KERNEL_PAGE_DIRECTORY, - (virtual_addr_t)KERNEL_HEAP_BASE, - (physaddr_t) (KERNEL_BASE + KERNEL_SIZE + KERNEL_HEAP_BLOCK_INFO_SIZE), - (REAL_HEAP_SIZE >> PAGE_OFFSET_BITS), - (PAGE_PRESENT | PAGE_WRITEABLE)); - - /* - for(int i = 0; i < (REAL_HEAP_SIZE >> PAGE_OFFSET_BITS); i+=128) { - map_pages( - KERNEL_PAGE_DIRECTORY, - KERNEL_HEAP_BASE + (i * 0x1000), - alloc_phys_pages(128), - 128, - PAGE_PRESENT | PAGE_WRITEABLE - ); - } - */ - - qemu_log("Mapped kernel heap memory"); - - /* Map memory blocks info structure */ - map_pages(KERNEL_PAGE_DIRECTORY, - (virtual_addr_t)(KERNEL_BASE + KERNEL_SIZE), - (physaddr_t) (KERNEL_BASE + KERNEL_SIZE), - (KERNEL_HEAP_BLOCK_INFO_SIZE >> PAGE_OFFSET_BITS), - (PAGE_PRESENT | PAGE_WRITEABLE)); - - qemu_log("Mapped memory blocks info structure"); - - kheap.blocks = (memory_block_t*) (KERNEL_BASE + KERNEL_SIZE); - - qemu_log("Memsetting heap blocks with size: %d", KERNEL_HEAP_BLOCK_INFO_SIZE); - memset(kheap.blocks, 0, KERNEL_HEAP_BLOCK_INFO_SIZE); - qemu_log("Zeroed heap blocks"); - - kheap.count = 0; - kheap.start = KERNEL_HEAP_BASE; - kheap.size = KERNEL_HEAP_SIZE; - kheap.end = (void*)((uint32_t)kheap.start + kheap.size); - - qemu_log("Heap size: %d bytes.", REAL_HEAP_SIZE); -} - -void dump_page_directory() { - uint32_t* dir = (uint32_t*)kernel_page_dir; - - qemu_log("PAGE DIRECTORY STRUCTURE: \n"); - - for (size_t i = 0; i < 1024; i++) { - qemu_printf("%v ", dir[i]); - - if(i % 16 == 0) { - qemu_printf("\n"); - } - } - qemu_printf("\n"); -} - -void dump_page_table() { - dump_page_directory(); - - uint32_t* table = (uint32_t*)GET_PT(); - - qemu_log("PAGE TABLE STRUCTURE: \n"); - - for (size_t i = 0; i < 1024; i++) { - qemu_printf("%v ", table[i]); - - if(i % 16 == 0) { - qemu_printf("\n"); - } - } - qemu_printf("\n"); -} - -void vmm_free_page(virtual_addr_t vaddr) { - free_phys_pages(vaddr, 1); -} - -/** - * @brief Привязывает физический адрес к виртуальному - * - * @param physaddr_t page_dir - Каталог страниц - * @param void* vaddr - Стартовый виртуальный адрес - * @param physaddr_t paddr - Начальный физический адрес - * @param size_t count - Размер памяти - * @param uint32_t flags - Флаги страницы - * - * @return uint8_t - Возвращает 1 если нет ошибок, иначе 0 - */ -uint8_t map_pages(physaddr_t page_dir, virtual_addr_t vaddr, physaddr_t paddr, size_t count, uint32_t flags){ - /* Pointer for access to temporary page */ - physaddr_t* tmp_page = (physaddr_t*) TEMP_PAGE; - physaddr_t table; - uint32_t table_flags = PAGE_PRESENT | PAGE_WRITEABLE | PAGE_USER; - - /* Create pages in cycle */ - for(; count; count--){ - uint32_t table_idx = (uint32_t) vaddr >> 22; - uint32_t page_idx = ((uint32_t) vaddr >> PAGE_OFFSET_BITS) & PAGE_TABLE_INDEX_MASK; - - temp_map_page(page_dir); - - table = tmp_page[table_idx]; - - if ( !(table & PAGE_PRESENT) ){ - physaddr_t addr = alloc_phys_pages(1); - if(addr == -1) - return FALSE; - - temp_map_page(addr); - memset(tmp_page, 0, PAGE_SIZE); - temp_map_page(page_dir); - - tmp_page[table_idx] = (addr & ~PAGE_OFFSET_MASK) | table_flags; - table = addr; - } - - table &= ~PAGE_OFFSET_MASK; - temp_map_page(table); - - // qemu_log("The Virtual address: %x is mapepd to physical: %x (will write %x)", vaddr, paddr, (paddr & ~PAGE_OFFSET_MASK) | flags); - - tmp_page[page_idx] = (paddr & ~PAGE_OFFSET_MASK) | flags; - asm volatile ("invlpg (,%0,)"::"a"(vaddr)); - - vaddr += PAGE_SIZE; - paddr += PAGE_SIZE; - } - return TRUE; -} - -// UNTESTED FUNCTION!!! -uint8_t unmap_pages(physaddr_t page_dir, virtual_addr_t vaddr, size_t count){ - physaddr_t* tmp_page = (physaddr_t*) TEMP_PAGE; - physaddr_t table; - - /* Destroy pages in cycle */ - for(; count; count--){ - uint32_t table_idx = (uint32_t) vaddr >> 22; - uint32_t page_idx = ((uint32_t) vaddr >> PAGE_OFFSET_BITS) & PAGE_TABLE_INDEX_MASK; - temp_map_page(page_dir); - table = tmp_page[table_idx]; - - table &= ~PAGE_OFFSET_MASK; - temp_map_page(table); - tmp_page[page_idx] = 0; - asm volatile ("invlpg (,%0,)"::"a"(vaddr)); - vaddr += PAGE_SIZE; - } - - return TRUE; -} - -/** - * @brief Проверка, перекрываются ли блоки - * - * @param void* base1 - Блок 1 - * @param size_t size1 - Размер блока 1 - * @param void* base2 - Блок 2 - * @param size_t size2 - Размер блока 2 - * - * @return uint8_t - ??? - */ -static inline uint8_t is_blocks_overlapped(size_t base1, size_t size1, size_t base2, size_t size2){ - return (( base1 >= base2 ) && (base1 < base2 + size2)) || - (( base2 >= base1 ) && (base2 < base1 + size1)); -} - -/** - * @brief Выделение памяти - * - * @param size_t size - Размер - * @param bool align - Выравнивание - * - * @return void* - ??? - */ -void* kmalloc_common(size_t size, bool align){ - void* vaddr = kheap.start; - int i = 0; - - mutex_get(&(kheap.heap_mutex), true); - - // qemu_log("Checking overlapped blocks"); - /* Check overlapped blocks */ - for (i = (int)kheap.count - 1; i >= 0 ; i--){ - if (is_blocks_overlapped((size_t)kheap.blocks[i].base, kheap.blocks[i].size, (size_t)vaddr, size)){ - vaddr = (void*)((size_t)kheap.blocks[i].base + kheap.blocks[i].size); - } - } - - if (align){ - uint32_t tmp_addr = (uint32_t) vaddr; - if (tmp_addr & 0xFFF){ - tmp_addr &= 0xFFFFF000; - tmp_addr += PAGE_SIZE; - - vaddr = (void*) tmp_addr; - } - } - - // qemu_log("Shifting array of blocks"); - for (i = (int)kheap.count - 1; i >= 0; i--){ - kheap.blocks[i+1].base = kheap.blocks[i].base; - kheap.blocks[i+1].size = kheap.blocks[i].size; - } - - // qemu_log("Making new entry for block: V: %v S: %d", vaddr, size); - - kheap.count++; - kheap.blocks[0].base = vaddr; - kheap.blocks[0].size = size; - mutex_release(&(kheap.heap_mutex)); - - return vaddr; -} - -/** - * @brief Выделение памяти с выравниванием на 4096 байт - * - * @param size_t size - Размер - * - * @return void* - ??? - */ -void* kmalloc_a(size_t size){ - return kmalloc_common(size, true); -} - -/** - * @brief Освобождение памяти - * - * @param void* vaddr - Адрес или объект - */ -void kfree(void* vaddr){ - int i = 0; - int block_idx = 0; - - mutex_t thismutex = kheap.heap_mutex; - - mutex_get(&thismutex, true); - - /* Return in invalid pointer case */ - if (vaddr == nullptr) return; - - /* Find block info by virtual address */ - for (i = 0; i < kheap.count; i++){ - if (vaddr == kheap.blocks[i].base){ - block_idx = i; - break; - } - } - - if (i == kheap.count) return; - - /* Shift down blocks info array */ - for (i = block_idx; i < kheap.count - 1; i++){ - kheap.blocks[i].base = kheap.blocks[i+1].base; - kheap.blocks[i].size = kheap.blocks[i+1].size; - } - /* Reduce number of allocated blocks */ - kheap.count--; - - mutex_release(&thismutex); - - kheap.heap_mutex = thismutex; -} - -void* krealloc(void* vaddr, size_t size) { - size_t block_idx = 0; - for (size_t i = 0; i < kheap.count; i++){ - if (vaddr == kheap.blocks[i].base){ - block_idx = i; - break; - } - } - - memory_block_t m = kheap.blocks[block_idx]; - // qemu_log("Resizing memory from %d to %d bytes.", m.size, size); - - void* newblock = kmalloc(size); - - memcpy(newblock, vaddr, MIN(size, m.size)); - - qemu_log("Allocated and copied %d bytes", MIN(size, m.size)); - - kfree(vaddr); - return newblock; -} - -size_t memory_get_used_kernel() { - size_t in_use = 0; - for (size_t i = 0; i < kheap.count; i++){ - in_use += kheap.blocks[i].size; - } - - return in_use; -} - -void print_allocated_map() { - qemu_log("============================[CUT HERE]============================"); - qemu_log("= Memory installed: %d kB\n", phys_memory_size/1024); - qemu_log("= Start of heap: %x", kheap.start); - qemu_log("= End of heap: %x", kheap.end); - qemu_log("= Allocated blocks count: %d\n", kheap.count); - - size_t in_use = 0; - for (size_t i = 0; i < kheap.count; i++){ - memory_block_t block = kheap.blocks[i]; - - in_use += block.size; - - qemu_log("= Block #%d: MEMORY: %x SIZE: %d (%x) bytes", i, block.base, block.size, block.size); - } - - qemu_log("= Kenrnel total: "); - qemu_log("= In use: %d kB", in_use / 1024); - qemu_log("= Free: %d kB", (phys_memory_size - in_use)/1024); -} - -/** - * @brief Получение точки входа ядра - * - * @return physaddr_t - Получить точку входа ядра - */ -physaddr_t get_kernel_dir(void){ - return kernel_page_dir; -} - -/** - * @brief Получение установленого количества ОЗУ - * - * @return size_t - Кол-во установленной ОЗУ - */ -size_t getInstalledRam() { - return phys_memory_size; -} - -size_t virt2phys(physaddr_t page_directory, virtual_addr_t virtual_address) { - physaddr_t* tmp_page = (physaddr_t*)TEMP_PAGE; - uint32_t table_idx = (uint32_t) virtual_address >> 22; - uint32_t page_idx = ((uint32_t) virtual_address >> PAGE_OFFSET_BITS) & PAGE_TABLE_INDEX_MASK; - - temp_map_page(page_directory); - - physaddr_t table = tmp_page[table_idx]; - - table &= ~PAGE_OFFSET_MASK; - - temp_map_page(table); - - size_t paddr = tmp_page[page_idx] & ~0x3ff; - - paddr = (paddr & 0xfffff000) + (virtual_address & 0xfff); - - return paddr; -} - -bool is_suitable_phys_region(physaddr_t address) { - int i = 0; - /* Entries number in memory map structure */ - size_t n = mmap_length / sizeof(memory_map_entry_t); - - for(; i < n; i++) { - if(address >= mentry[i].addr_low - && address <= mentry[i].addr_low + mentry[i].len_low - && mentry[i].addr_low != 0 - && mentry[i].type == 1) { - return true; - } - } - - return false; -} - -void* kcalloc(size_t count, size_t size) { - void* ptr = kmalloc(count * size); - - memset(ptr, 0, count * size); - - return ptr; -} diff --git a/kernel/src/sys/mtrr.c b/kernel/src/sys/mtrr.c new file mode 100644 index 000000000..0f3fedcb7 --- /dev/null +++ b/kernel/src/sys/mtrr.c @@ -0,0 +1,94 @@ +#include "common.h" +#include "sys/cpuid.h" +#include "io/ports.h" +#include "sys/msr.h" +#include "sys/mtrr.h" + +#define UNCACHED 0 +#define WRITECOMBINING 1 +#define WRITETHROUGH 4 +#define WRITEPROTECT 5 +#define WRITEBACK 6 + +bool mtrr_is_supported = false; +bool mtrr_wc_available = false; +bool mtrr_fixed_size_available = false; +size_t variable_size_mtrrs = 0; + +#define CALC_MASK(size) (~(size - 1) & 0xffffffff) + +void mtrr_init() { + uint32_t unused, eax, edx; + + cpuid(1, unused, unused, unused, edx); + + qemu_log("%x", edx & (1 << 12)); + + if(edx & (1 << 12)) { + mtrr_is_supported = true; + } else { + return; + } + + rdmsr(0xFE, eax, unused); + + variable_size_mtrrs = eax & 0xff; + mtrr_fixed_size_available = eax & (1 << 8) ? true : false; + mtrr_wc_available = eax & (1 << 10) ? true : false; + + qemu_log("Variable size MTRRs count: %d", variable_size_mtrrs); + qemu_log("Fixed size available: %d", mtrr_fixed_size_available); + qemu_log("Writecombining available: %d", mtrr_wc_available); + + for(size_t i = 0; i < variable_size_mtrrs; i++) { + uint32_t base, mask; + + read_mtrr(i, &base, &mask); + + qemu_log("[%d] MTRR: base: %x; mask: %x", i, base, mask); + } +} + +void read_mtrr(size_t index, uint32_t* base, uint32_t* mask) { + uint32_t unused; + + if(index >= variable_size_mtrrs) + return; + + rdmsr(0x200 + (index * 2), *base, unused); + rdmsr(0x201 + (index * 2), *mask, unused); +} + +void write_mtrr(size_t index, uint32_t base, uint32_t mask) { + uint32_t unused = 0; + + if(index >= variable_size_mtrrs) + return; + + wrmsr(0x200 + (index * 2), base, unused); + wrmsr(0x201 + (index * 2), mask, unused); +} + +void write_mtrr_size(size_t index, uint32_t base, uint32_t size, size_t type) { + uint32_t unused = 0; + + if(index >= variable_size_mtrrs) + return; + + wrmsr(0x200 + (index * 2), base | type, unused); + wrmsr(0x201 + (index * 2), CALC_MASK(ALIGN(size, 4096)), unused); +} + +size_t find_free_mtrr() { + for(size_t i = 0; i < variable_size_mtrrs; i++) { + uint32_t base, mask; + + read_mtrr(i, &base, &mask); + + if((mask & (1 << 11)) == 0) { + return i; + } + } + + return 0xffffffff; // Not found +} diff --git a/kernel/src/sys/scheduler.c b/kernel/src/sys/scheduler.c old mode 100755 new mode 100644 index 44d7f0a9e..0e11d2456 --- a/kernel/src/sys/scheduler.c +++ b/kernel/src/sys/scheduler.c @@ -2,18 +2,20 @@ * @file sys/scheduler.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Менеджер задач - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ #include "sys/scheduler.h" #include "lib/string.h" #include "io/ports.h" +#include "mem/vmm.h" -uint32_t next_pid = 0; ///< Следующий ID задачи (PID) -uint32_t next_thread_id = 0; ///< Следующий ID потока list_t process_list; ///< Список процессов list_t thread_list; ///< Список потоков + +uint32_t next_pid = 0; ///< Следующий ID задачи (PID) +uint32_t next_thread_id = 0; ///< Следующий ID потока bool multi_task = false; ///< Готова ли система к многозадачности process_t* kernel_proc = 0; ///< Обработчик процесса ядра thread_t* kernel_thread = 0; ///< Обработчик основного потока ядра @@ -23,15 +25,17 @@ extern uint32_t init_esp; bool scheduler_working = true; +extern physical_addr_t kernel_page_directory; + /** * @brief Инициализация менеджера задач */ void init_task_manager(void){ uint32_t esp = 0; - asm volatile("mov %%esp, %0" : "=a"(esp)); - + __asm__ volatile("mov %%esp, %0" : "=a"(esp)); + /* Disable all interrupts */ - asm volatile ("cli"); + __asm__ volatile ("cli"); list_init(&process_list); list_init(&thread_list); @@ -41,8 +45,10 @@ void init_task_manager(void){ memset(kernel_proc, 0, sizeof(process_t)); + kernel_proc->pid = next_pid++; - kernel_proc->page_dir = get_kernel_dir(); + // NOTE: Page directory address must be PHYSICAL! + kernel_proc->page_dir = kernel_page_directory; kernel_proc->list_item.list = nullptr; kernel_proc->threads_count = 1; strcpy(kernel_proc->name, "Kernel"); @@ -66,12 +72,14 @@ void init_task_manager(void){ list_add(&thread_list, &kernel_thread->list_item); current_proc = kernel_proc; - current_thread = kernel_thread; + current_thread = kernel_thread; - asm volatile ("sti"); + __asm__ volatile ("sti"); /* Enable multitasking flag */ multi_task = true; + + qemu_ok("OK"); } void scheduler_mode(bool on) { @@ -80,11 +88,17 @@ void scheduler_mode(bool on) { void create_process(void* entry_point, char* name, bool suspend, bool is_kernel) { __asm__ volatile("cli"); - - process_t* proc = (process_t*)kcalloc(1, sizeof(process_t)); + + process_t* proc = (process_t*)kcalloc(1, sizeof(process_t)); + + void* virt = clone_kernel_page_directory(); + uint32_t phys = virt2phys(get_kernel_page_directory(), (virtual_addr_t) virt); + + qemu_note("New page directory at: V%x => P%x", virt, phys); proc->pid = next_pid++; - proc->page_dir = get_kernel_dir(); +// proc->page_dir = kernel_page_directory; + proc->page_dir = phys; proc->list_item.list = nullptr; // No nested processes hehe :) proc->threads_count = 1; strcpy(proc->name, name); @@ -95,31 +109,7 @@ void create_process(void* entry_point, char* name, bool suspend, bool is_kernel) thread_create(proc, entry_point, DEFAULT_STACK_SIZE, is_kernel, suspend); list_add(&thread_list, &kernel_thread->list_item); - asm volatile("sti"); -} - -/** - * @brief Переключение задач - */ -void switch_task(void){ - if (!multi_task) - return; - - /* Disable all interrupts */ - asm volatile ("pushf; cli"); - - /* Remember current thread state */ - asm volatile ("mov %%esp, %0":"=a"(current_thread->esp)); - - current_thread = (thread_t*) current_thread->list_item.next; - - /* Set current page directory */ - asm volatile ("mov %0, %%cr3"::"a"(current_proc->page_dir)); - /* Set stack */ - asm volatile ("mov %0, %%esp"::"a"(current_thread->esp)); - - /* Enable interrupts */ - asm volatile ("popf; sti"); + __asm__ volatile("sti"); } /** @@ -134,11 +124,11 @@ process_t* get_current_proc(void) { /** * @brief Создание потока * - * @param process_t* proc - Процесс - * @param void* entry_point - Точка входа - * @param size_t stack_size - Размер стека - * @param bool kernel - Функция ядра? - * @param bool suspend - Остановлено? + * @param proc - Процесс + * @param entry_point - Точка входа + * @param stack_size - Размер стека + * @param kernel - Функция ядра? + * @param suspend - Остановлено? * * @return thread_t* - Поток */ @@ -148,7 +138,7 @@ thread_t* thread_create(process_t* proc, void* entry_point, size_t stack_size, uint32_t eflags; /* Disable all interrupts */ - asm volatile ("cli"); + __asm__ volatile ("cli"); /* Create new thread handler */ thread_t* tmp_thread = (thread_t*) kmalloc(sizeof(thread_t)); @@ -165,7 +155,7 @@ thread_t* thread_create(process_t* proc, void* entry_point, size_t stack_size, tmp_thread->entry_point = (uint32_t) entry_point; /* Create thread's stack */ - stack = (void*) kmalloc(stack_size); + stack = (void*) kcalloc(stack_size, 1); tmp_thread->stack = stack; tmp_thread->esp = (uint32_t) stack + stack_size - 12; @@ -182,7 +172,7 @@ thread_t* thread_create(process_t* proc, void* entry_point, size_t stack_size, /* Create pointer to stack frame */ uint32_t* esp = (uint32_t*) ((char*)stack + stack_size); - asm volatile ("pushf; pop %0":"=r"(eflags)); + __asm__ volatile ("pushf; pop %0":"=r"(eflags)); eflags |= (1 << 9); @@ -190,7 +180,7 @@ thread_t* thread_create(process_t* proc, void* entry_point, size_t stack_size, esp[-3] = eflags; /* Enable all interrupts */ - asm volatile ("sti"); + __asm__ volatile ("sti"); return tmp_thread; } @@ -198,8 +188,8 @@ thread_t* thread_create(process_t* proc, void* entry_point, size_t stack_size, /** * @brief Остановить поток * - * @param thread_t* thread - Поток - * @param bool suspend - Вкл/выкл + * @param thread - Поток + * @param suspend - Вкл/выкл */ void thread_suspend(thread_t* thread, bool suspend){ thread->suspend = suspend; @@ -208,11 +198,11 @@ void thread_suspend(thread_t* thread, bool suspend){ /** * @brief Завершить текущий поток * - * @param thread_t* thread - Поток + * @param thread - Поток */ void thread_exit(thread_t* thread){ /* Disable all interrupts */ - asm volatile ("cli"); + __asm__ volatile ("cli"); /* Remove thread from queue */ list_remove(&thread->list_item); @@ -224,13 +214,13 @@ void thread_exit(thread_t* thread){ kfree(thread); /* Load to ECX switch function address */ - asm volatile ("mov %0, %%ecx"::"a"(&task_switch)); + __asm__ volatile ("mov %0, %%ecx"::"a"(&task_switch)); /* Enable all interrupts */ - asm volatile ("sti"); + __asm__ volatile ("sti"); /* Jump to switch_task() */ - asm volatile ("call *%ecx"); + __asm__ volatile ("call *%ecx"); } /** @@ -245,8 +235,8 @@ bool is_multitask(void){ /** * @brief Переключиться в пользовательский режим * - * @param void* entry_point - Точка входа - * @param size_t stack_size - Размер стека + * @param entry_point - Точка входа + * @param stack_size - Размер стека */ void init_user_mode(void* entry_point, size_t stack_size){ void* user_stack = (void*) kmalloc(stack_size); diff --git a/kernel/src/sys/sync.c b/kernel/src/sys/sync.c old mode 100755 new mode 100644 index 650d6e4a7..8152fbe4b --- a/kernel/src/sys/sync.c +++ b/kernel/src/sys/sync.c @@ -2,7 +2,7 @@ * @file sys/sync.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Примитивы синхронизации - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ @@ -11,8 +11,8 @@ /** * @brief Получить мьютекс * - * @param mutex_t* mutex - Мьютекс - * @param bool wait - Время ожидания + * @param mutex - Мьютекс + * @param wait - Время ожидания * * @return bool */ @@ -20,7 +20,7 @@ bool mutex_get(mutex_t* mutex, bool wait){ bool old_value = true; do { - asm volatile ("xchg (,%1,), %0":"=a"(old_value):"b"(mutex), "a"(old_value)); + __asm__ volatile ("xchg (,%1,), %0":"=a"(old_value):"b"(mutex), "a"(old_value)); } while (old_value && wait); return !old_value; @@ -29,7 +29,7 @@ bool mutex_get(mutex_t* mutex, bool wait){ /** * @brief Получить ближайщий свободный блок * - * @param mutex_t* mutex - Мьютекс + * @param mutex - Мьютекс * * @return physmemory_pages_block_t* - Блок */ diff --git a/kernel/src/sys/syscalls.c b/kernel/src/sys/syscalls.c old mode 100755 new mode 100644 index 25524d443..554d5bec9 --- a/kernel/src/sys/syscalls.c +++ b/kernel/src/sys/syscalls.c @@ -2,7 +2,7 @@ * @file sys/syscalls.c * @author Пиминов Никита (nikita.piminoff@yandex.ru), NDRAEY >_ (pikachu_andrey@vk.com) * @brief Интерфейс системных вызовов - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ @@ -13,174 +13,58 @@ #include "user/env.h" #include -#define TTY_CTL_PUTC 0x00 -#define TTY_CTL_PUTS 0x01 - -#define SCREEN_PIXEL 0x00 -#define SCREEN_UPDATE 0x01 - -#define ENV_SEND_DATA 0x00 ///< Отправка информации о структуре -#define ENV_TTY_CONTROL 0x01 ///< Управление виртуальным TTY для ENV - -#define ENV_DATA_TTY_CREATE 0x00 ///< Создание виртуального пространства - -#define ENV_DATA_DEBUG_INT 0x00 ///< Вывод в консоль %d -#define ENV_DATA_DEBUG_CHAR 0x01 ///< Вывод в консоль %s -#define ENV_DATA_DEBUG_ADR 0x02 ///< Вывод в консоль %x -#define ENV_DATA_DEBUG_FLO 0x03 ///< Вывод в консоль %f - -#define MEMCTL_ALLOCATE 0 -#define MEMCTL_FREE 1 - -#define KBDCTL_KEY 0 - -#define TIMECTL_GETBOOTTICKS 0 -#define TIMECTL_GETFREQ 1 - -void* calls_table[NUM_CALLS]; - -void tty_ctl(size_t function, size_t data) { - qemu_log("Called TTY_CTL"); - if(function == TTY_CTL_PUTC) { - tty_printf("%c", (char)data); - }else if(function == TTY_CTL_PUTS) { - // qemu_log("CALLED puts"); - tty_printf("%s", (char*)data); - } - // qemu_log("tty_ctl called with: FUNCTION: %x, DATA at: %x", function, (uint32_t)data); -} - -void screen_ctl(size_t function, size_t data) { - qemu_log("Fn is: %d", function); - - if(function == SCREEN_PIXEL) { - screen_pixel* pix = (screen_pixel*)data; - set_pixel(pix->x, pix->y, PACK_INTO_RGB(pix->color)); - }else if(function == SCREEN_UPDATE) { - punch(); - } -} +syscall_fn_t* calls_table[NUM_CALLS] = {0}; /** - * @brief Обработка команд окружения от ENV - * - * @warning Только для системных вызовов. + * @brief Обработчик системных вызовов + * + * @param regs - Регистр */ -void* sh_env(size_t function, size_t data){ - switch(function){ - case ENV_SEND_DATA: { - env_t* from = printEnv(); - qemu_log("Address: DEST: %x; SRC: %x", data, from); - memcpy((void*)data, from, sizeof(struct env)); - return 0; - } - case ENV_TTY_CONTROL: { - if (data == ENV_DATA_TTY_CREATE){ - qemu_log("[ENV] [TTY] [E:%x] Attempt to create a virtual address...", data); - qemu_log("[ENV] [TTY] [E:%x] CRating space with size (%d)", data, getDisplaySize()); - - uint8_t* backfb = (uint8_t*)kmalloc(getDisplaySize()); - memset(backfb, 0, getDisplaySize()); - memcpy(backfb, (void*)getFrameBufferAddr(), getDisplaySize()); - - qemu_log("[ENV] [TTY] [E:%x] Space created at address (%x) with size (%d)",data,backfb,getDisplaySize()); - return backfb; - } - return 0; - } - default:{ - qemu_log("Unknown function: %d %d", function, data); - return 0; - } - } -} - -void sh_env_debug(size_t dtr, void* data){ - if (dtr == ENV_DATA_DEBUG_INT) - qemu_log("[ENV] [DEBUG] [E:%x] > %d",dtr,(int) data); - else if (dtr == ENV_DATA_DEBUG_CHAR) - qemu_log("[ENV] [DEBUG] [E:%x] > %s",dtr,(char*) data); - else if (dtr == ENV_DATA_DEBUG_ADR) - qemu_log("[ENV] [DEBUG] [E:%x] > %x",dtr,(int) data); - else - qemu_log("[ENV] [DEBUG] [E:%x] > Unknown data!"); -} +void syscall_handler(registers_t regs){ + qemu_log("syscall: %d", regs.eax); -void* memctl(size_t func, size_t* data, size_t parameter) { - if(func == MEMCTL_ALLOCATE) { - *data = (size_t)kmalloc(parameter); - }else if(func == MEMCTL_FREE) { - kfree(data); - } + if (regs.eax >= NUM_CALLS) { + qemu_err("Invalid system call!"); + return; + } - return 0; -} + syscall_fn_t* entry_point = (syscall_fn_t*)calls_table[regs.eax]; -void kbdctl(size_t func, int* data) { - if(func == KBDCTL_KEY) { - *data = (int)getIntKeyboardWait(); - } + regs.eax = entry_point(regs.ebx, regs.ecx, regs.edx); } -void timectl(size_t func, size_t* data) { - if(func == TIMECTL_GETBOOTTICKS) { - *data = getTicks(); - }else if(func == TIMECTL_GETFREQ) { - *data = getFrequency(); - } +void syscall_env(struct env* position) { + memcpy(position, &system_environment, sizeof(env_t)); } -/** - * @brief Обработчик системных вызовов - * - * @param registers_t regs - Регистр - */ -void syscall_handler(registers_t regs){ - if (regs.eax >= NUM_CALLS) - return; - - qemu_log("syscall: %d", regs.eax); - - void* syscall_fn = calls_table[regs.eax]; - size_t (*entry_point)(size_t, size_t, size_t) = (size_t (*)(size_t, size_t, size_t))syscall_fn; - // qemu_log("Entry point at %x", entry_point); +void syscall_memory_alloc(size_t size, void** out) { + void* allocated = kcalloc(size, 1); - //regs.eax = syscall_entry_call(syscall, regs.ebx, regs.ecx, regs.edx); - regs.eax = entry_point(regs.ebx, regs.ecx, regs.edx); + *out = allocated; +} - // qemu_log("End syscall"); +void syscall_memory_free(void* memory) { + kfree(memory); } -void empty_func() {} +void syscall_tty_write(char* text) { + _tty_puts(text); +} /** * @brief Инициализация системных вызовов * - * @param registers_t regs - Регистр + * @param regs - Регистр + * @warning If every day goes like this; How do we survive?; We are working late on the night shift; To get peace of mind! */ - void init_syscalls(void){ register_interrupt_handler(0x50, &syscall_handler); - - calls_table[0] = (void*)empty_func; - calls_table[1] = (void*)empty_func; - calls_table[2] = (void*)tty_ctl; - calls_table[3] = (void*)sh_env; - calls_table[4] = (void*)sh_env_debug; - calls_table[5] = (void*)screen_ctl; - calls_table[6] = (void*)memctl; - calls_table[7] = (void*)kbdctl; - calls_table[8] = (void*)timectl; -} + // TODO: File operations using descriptors (do not pass FILE* structure!!!1) + calls_table[0] = (syscall_fn_t *)syscall_env; + calls_table[1] = (syscall_fn_t *)syscall_memory_alloc; + calls_table[2] = (syscall_fn_t *)syscall_memory_free; + calls_table[3] = (syscall_fn_t *)syscall_tty_write; -/** - * @brief Список определенных системных вызовов -// */ -// DEFN_SYSCALL1(in_byte, PORT_INPUT_BYTE, uint16_t) -// DEFN_SYSCALL2(out_byte, PORT_OUTPUT_BYTE, uint16_t, uint8_t) -// DEFN_SYSCALL2(tty_ctl, TTYCTL, void*, void*) -// DEFN_SYSCALL2(sh_env, SH_ENV, size_t, size_t) -// DEFN_SYSCALL2(sh_env_debug, SH_ENV_DEBUG, void*, void*) -// DEFN_SYSCALL2(screen_ctl, SCREENCTL, size_t, size_t) -// DEFN_SYSCALL3(memctl, MEMCTL, size_t, void*, size_t) + qemu_ok("System calls initialized!"); +} diff --git a/kernel/src/sys/system.c b/kernel/src/sys/system.c old mode 100755 new mode 100644 index 8de8bd5cc..f7b9e7d3d --- a/kernel/src/sys/system.c +++ b/kernel/src/sys/system.c @@ -2,12 +2,14 @@ * @file sys/system.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Дополнительные системные функции - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include + #include +#include "mem/vmm.h" +#include "io/ports.h" // FIXME: These variables gets rewritten to address 0 when // user types 'cd /' in shell @@ -26,7 +28,7 @@ char* getSysPath(){ /** * @brief Установить текущий путь * - * @param char* path - путь + * @param path - путь * * @return char* путь */ @@ -53,7 +55,7 @@ void reboot() { good = inb(0x64); outb(0x64, 0xFE); - asm volatile("hlt"); + __asm__ volatile("hlt"); } /** @@ -78,17 +80,20 @@ char* getUserName(){ /** * @brief Устанавливает имя пользователя * - * @param char* new - Новое имя пользователя + * @param new - Новое имя пользователя * * @return char* - Имя пользователя */ char* setUserName(char* new_name){ kfree(whoami); + + size_t len = strlen(new_name) + 1; - whoami = (char*)kmalloc(sizeof(char) * (strlen(new_name) + 1)); + whoami = kcalloc(len, 1); - memset(whoami, 0, strlen(new_name)+1); memcpy(whoami, new_name, strlen(new_name)); + + whoami[len] = 0; return whoami; } @@ -105,7 +110,7 @@ char* getHostname(){ /** * @brief Устанавливает имя устройства * - * @param char* new - Новое имя устройства + * @param new - Новое имя устройства * * @return char* - Имя устройства */ diff --git a/kernel/src/sys/testing.c b/kernel/src/sys/testing.c index 3e9d8379b..5af379816 100644 --- a/kernel/src/sys/testing.c +++ b/kernel/src/sys/testing.c @@ -1,4 +1,5 @@ -#include +#include +#include /// @brief Runs function and measures function execution time /// @param function Pointer to function to test diff --git a/kernel/src/sys/timer.c b/kernel/src/sys/timer.c old mode 100755 new mode 100644 index 5e60e3c31..12ce4bedc --- a/kernel/src/sys/timer.c +++ b/kernel/src/sys/timer.c @@ -2,20 +2,20 @@ * @file sys/timer.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Модуль системного таймера - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ #include "sys/timer.h" #include "sys/isr.h" -#include "sys/scheduler.h" +//#include "sys/scheduler.h" #include "drv/fpu.h" #include "io/ports.h" extern bool scheduler_working; size_t tick = 0; ///< Количество тиков -size_t frequency = 0; ///< Частота +size_t frequency = CLOCK_FREQ; ///< Частота // FIXME: Invalid and deprecated implementation. void microseconds_delay(size_t microseconds) { @@ -34,9 +34,9 @@ size_t getTicks(){ double getUptime() { if(getFrequency() == 0) { - return 0; + return 0.0; }else{ - return (double)getTicks() / (double)getFrequency(); + return (double)tick / (double)frequency; } } @@ -52,7 +52,7 @@ size_t getFrequency(){ /** * @brief Таймер Callback * - * @param registers_t regs - Регистр + * @param regs - Регистр */ static void timer_callback(__attribute__((unused)) registers_t regs){ tick++; @@ -64,7 +64,7 @@ static void timer_callback(__attribute__((unused)) registers_t regs){ /** * @brief Ожидание по тикам * - * @param uint32_t delay - Тики + * @param delay - Тики */ void sleep_ticks(uint32_t delay){ size_t current_ticks = getTicks(); @@ -78,11 +78,11 @@ void sleep_ticks(uint32_t delay){ /** * @brief Ожидание по милисекундам * - * @param uint32_t milliseconds - Милисекунды + * @param milliseconds - Милисекунды */ void sleep_ms(uint32_t milliseconds) { uint32_t needticks = milliseconds * frequency; - sleep_ticks(needticks/1000); + sleep_ticks(needticks / 1000); // (milliseconds * frequency + 500) / 1000 } @@ -90,7 +90,7 @@ void sleep_ms(uint32_t milliseconds) { /** * @brief Инициализация модуля системного таймера * - * @param uint32_t - Частота + * @param - Частота */ void init_timer(uint32_t f){ frequency = f; @@ -99,15 +99,15 @@ void init_timer(uint32_t f){ uint8_t low; uint8_t high; - register_interrupt_handler(IRQ0, &timer_callback); - - divisor = 1193180 / frequency; - + divisor = BASE_FREQ / f; + outb(0x43, 0x36); - + low = (uint8_t) (divisor & 0xFF); high = (uint8_t) ((divisor >> 8) & 0xFF); - + outb(0x40, low); - outb(0x40, high); + outb(0x40, high); + + register_interrupt_handler(IRQ0, &timer_callback); } diff --git a/kernel/src/sys/trigger.c b/kernel/src/sys/trigger.c index 7cec1b1ce..bdd31a9e8 100644 --- a/kernel/src/sys/trigger.c +++ b/kernel/src/sys/trigger.c @@ -2,29 +2,24 @@ * @file sys/trigger.c * @authors Пиминов Никита (github.com/pimnik98 | VK: @piminov_remont) * @brief Система триггеров - * @version 0.3.3 + * @version 0.3.4 * @date 2023-06-01 * + * @warning А зачем они нам нужны если более выгодно вручную проверять клавиатуру и мышь, при этом производительность падает при триггерах * @copyright Copyright SayoriOS Team (c) 2022-2023 * */ -#include #include -#include #include #include #include #include +#include "sys/scheduler.h" +#include "sys/timer.h" -trigger_t Triggers[1024]; ///< Сетка смонтированных триггеров +trigger_t Triggers[1024] = {0}; ///< Сетка смонтированных триггеров size_t TriggersCount = 0; ///< Колво активных триггеров - -thread_t* threadASYNCRUN01; -thread_t* threadASYNCRUN02; -thread_t* threadASYNCRUN03; -thread_t* threadASYNCRUN04; - /** * @brief Регистрация триггера */ @@ -60,114 +55,21 @@ void OffTrigger(int index){ * @brief Функция для вызовов триггеров (Если самостоятельно надо вызвать триггер) */ void CallTrigger(int type, void* data1, void* data2, void* data3, void* data4, void* data5){ - if (type == TRIGGER_KEY_PRESSED) { - qemu_log("[Trigger] [Keyboard] Press: %d", (int) data1); - } else if (type == TRIGGER_MOUSE_MOVE) { - qemu_log("[Trigger] [Mouse] X: %d | Y: %d", (int) data1, (int) data2); - } else if (type == TRIGGER_MOUSE_CLICK) { - qemu_log("[Trigger] [Mouse] LEFT: %d | RIGHT: %d | CENTER: %d", (int) data1, (int) data2, (int) data3); - } else if (type == TRIGGER_MAIN_RUNNER1 || - type == TRIGGER_MAIN_RUNNER2 || - type == TRIGGER_MAIN_RUNNER3 || - type == TRIGGER_MAIN_RUNNER4 - ) { - //qemu_log("[Trigger] [ASYNC] [RUNNER] Thread: %x",type); - } else if (type == TRIGGER_ELF_START) { - qemu_log("[Trigger] ELF Start\n\tPath:%s", (char *) data1); - } else if (type == TRIGGER_ELF_END) { - qemu_log("[Trigger] ELF Complete\n\tPath:%s\n\tCode:%d", (char *) data1, (int) data2); - } else if (type == TRIGGER_ELF_START) { - qemu_log("[Trigger] ELF Error\n\tPath:%s\n\tCode:%d", (char *) data1, (int) data2); - } else { - qemu_log("[Trigger] An attempt to call trigger '%d' was detected.", type); - } for (size_t inx = 0; inx < TriggersCount; inx++){ //if (log) qemu_log("[Trigger] Scan: %d | Type: %x | Ready: %d",inx,Triggers[inx]->type,Triggers[inx]->ready); - if (type == Triggers[inx].type && Triggers[inx].ready == 1){ + if (type == Triggers[inx].type && Triggers[inx].ready){ ///< Проверяем, что оно дейстивельно для данного типа и делаем вызов, если устройство в сети Triggers[inx].cmd(data1, data2, data3, data4, data5); } } } -/** - * @brief Специальный поток №1 - */ -void ASYNC_RUNNER_1(){ - qemu_log("[ASYNC] [RUN:1] Started...."); - while (1) { - CallTrigger(TRIGGER_MAIN_RUNNER1,0,0,0,0,0); - //punch(); - //sleep_ms(100); - } - thread_exit(threadASYNCRUN01); -} - -/** - * @brief Специальный поток №2 - * Обновляется один раз в 500 тиков. - */ -void ASYNC_RUNNER_2(){ - qemu_log("[ASYNC] [RUN:2] Started...."); - size_t old = 0; - while (1) { - if (old+500 < getTicks()) continue; - CallTrigger(TRIGGER_MAIN_RUNNER2,0,0,0,0,0); - old = getTicks(); - //punch(); - //sleep_ms(100); - } - qemu_log("[ASYNC] [RUN:2] CRASHED!!!"); - thread_exit(threadASYNCRUN02); -} - -/** - * @brief Специальный поток №3 - */ -void ASYNC_RUNNER_3(){ - qemu_log("[ASYNC] [RUN:3] Started...."); - while (1) { - CallTrigger(TRIGGER_MAIN_RUNNER3,0,0,0,0,0); - //punch(); - sleep_ms(100); - } - qemu_log("[ASYNC] [RUN:3] CRASHED!!!"); - thread_exit(threadASYNCRUN03); -} - -/** - * @brief Специальный поток №1 - */ -void ASYNC_RUNNER_4(){ - qemu_log("[ASYNC] [RUN:4] Started...."); - while (1) { - CallTrigger(TRIGGER_MAIN_RUNNER4,0,0,0,0,0); - //punch(); - sleep_ms(100); - } - qemu_log("[ASYNC] [RUN:4] CRASHED!!!"); - thread_exit(threadASYNCRUN04); -} - - - /** * @brief Инициализация триггеров */ void triggersConfig(){ qemu_log("[Trigger] Configurate..."); - process_t* proc = get_current_proc(); - threadASYNCRUN01 = thread_create(proc, - &ASYNC_RUNNER_1, - 0x4000, - true, - false); - threadASYNCRUN02 = thread_create(proc, - &ASYNC_RUNNER_2, - 0x4000, - true, - false); //Triggers = kmalloc(sizeof(trigger_t)*1024); ///< Выделяем память на триггеры } diff --git a/kernel/src/sys/tss.c b/kernel/src/sys/tss.c old mode 100755 new mode 100644 index f253a1b71..c01dee9fd --- a/kernel/src/sys/tss.c +++ b/kernel/src/sys/tss.c @@ -2,7 +2,7 @@ * @file sys/gdt.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief (GDT) Глобальная таблица дескрипторов - * @version 0.3.3 + * @version 0.3.4 * @date 2022-10-01 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ @@ -20,9 +20,9 @@ extern void tss_flush(uint32_t tr_selector); /** * @brief ??? * - * @param int32_t num - ??? - * @param uint32_t ss0 - ??? - * @param uint32_t esp0 - ??? + * @param num - ??? + * @param ss0 - ??? + * @param esp0 - ??? */ void write_tss(int32_t num, uint32_t ss0, uint32_t esp0){ memset(&tss, 0, sizeof(tss_entry_t)); @@ -52,7 +52,7 @@ void write_tss(int32_t num, uint32_t ss0, uint32_t esp0){ /** * @brief ??? * - * @param uint32_t stack - ??? + * @param stack - ??? */ void set_kernel_stack_in_tss(uint32_t stack) { tss.esp0 = stack; diff --git a/kernel/src/sys/unwind.c b/kernel/src/sys/unwind.c index d29cc6894..85fd691f5 100644 --- a/kernel/src/sys/unwind.c +++ b/kernel/src/sys/unwind.c @@ -1,12 +1,12 @@ -#include "kernel.h" #include "sys/unwind.h" #include "io/ports.h" +#include "lib/string.h" -__attribute__((section(".debug_symbols"))) char* function_addr_data[128 * 1024] = {0}; +__attribute__((section(".debug_symbols"))) char function_addr_data[128 * 1024] = {0}; char _temp_funcname[1024] = {0}; -size_t decode_hex(char s[], int length) { +size_t decode_hex(const char s[], int length) { int dec = 0; int power = 1; @@ -37,19 +37,19 @@ bool get_func_name_by_addr(size_t addr) { size_t current_addr = decode_hex(temp, 8); // First addr - temp += 8; // Address in HEX temp += 3; // Type + temp += 8; // Address in HEX - memcpy(_temp_funcname, temp, struntil(temp, '\n') - 1); + memcpy(_temp_funcname, temp, struntil(temp, '\n')); - temp += struntil(temp, '\n'); // Name + temp += struntil(temp, '\n') + 1; // Name size_t next_addr = decode_hex(temp, 8); // Second addr + // qemu_log("%x | %x | %x", current_addr, addr, next_addr); + if(addr >= current_addr && addr < next_addr) { return true; - } else { - // qemu_log("%x | %x | %x", current_addr, addr, next_addr); } } while(*temp != '\0'); @@ -58,7 +58,7 @@ bool get_func_name_by_addr(size_t addr) { void unwind_stack(uint32_t MaxFrames) { struct stackframe *stk; - asm ("movl %%ebp, %0" : "=r"(stk) :: ); + __asm__ volatile("movl %%ebp, %0" : "=r"(stk) :: ); qemu_log("Stack trace:"); diff --git a/kernel/src/sys/variable.c b/kernel/src/sys/variable.c new file mode 100644 index 000000000..00f3249bc --- /dev/null +++ b/kernel/src/sys/variable.c @@ -0,0 +1,78 @@ +/** + * @file sys/variable.c + * @authors Пиминов Никита (github.com/pimnik98 | VK: @piminov_remont) + * @brief Система переменных + * @version 0.3.4 + * @date 2023-06-01 + * + * @copyright Copyright SayoriOS Team (c) 2022-2023 + * + */ +#include +#include "lib/php/str_contains.h" +#include +#include + +VARIABLE G_VARIABLE[512] = {0}; +size_t C_VARIABLE = 0; + +size_t variable_freeID(char* Key){ + bool Key404 = false; + for (int i = 0; i < 512;i++){ + /// Сначала ищем по ключу, если не найдена, то ищем пустую ячейку + if (strcmpn(G_VARIABLE[i].Key,Key)) return i; + if (G_VARIABLE[i].Ready == 0 && Key404) return i; + if (i == 511 && !Key404){ + Key404 = true; + i = 0; + } + } + return -1; +} + +int variable_write(char* Key, char* Value){ + qemu_log("[Variable] [Write] %s=%s",Key,Value); + size_t inx = variable_freeID(Key); + if (inx == -1){ + qemu_log("[Variable] [Error] Return index: %d",inx); + return 0; + } + if (G_VARIABLE[inx].Ready == 1 && strlen(Value) == 0){ + C_VARIABLE--; + } else if (G_VARIABLE[inx].Ready == 0 && strlen(Value) != 0){ + C_VARIABLE++; + } + G_VARIABLE[inx].Ready = (strlen(Value) == 0?0:1); + memcpy(G_VARIABLE[inx].Key,Key,strlen(Key)); + memcpy(G_VARIABLE[inx].Value,Value,strlen(Value)); + return 1; +} + +char* variable_read(char* Key){ + qemu_log("[Variable] [Read] %s",Key); + for (int i = 0; i < 512;i++){ + if (G_VARIABLE[i].Ready && strcmpn(G_VARIABLE[i].Key,Key)){ + qemu_log("[Variable] [Read] %s=%s",G_VARIABLE[i].Key,G_VARIABLE[i].Value); + return G_VARIABLE[i].Value; + } + } + qemu_log("[Variable] [Read] %s=NULL",Key); + return NULL; +} + +VARIABLE* variable_list(char* Search){ + qemu_log("[Variable] [List] [ALL=%d] Search: %s",C_VARIABLE,Search); + VARIABLE* list = kmalloc(sizeof(VARIABLE)*(C_VARIABLE+1)); + size_t inx = 0; + for (int i = 0; i < 512;i++){ + if (G_VARIABLE[i].Ready == 0) continue; + qemu_log("[%d] Ready: %d | Search:%d | Key:%s",inx, G_VARIABLE[i].Ready, str_contains(G_VARIABLE[i].Key,Search), G_VARIABLE[i].Key); + if (str_contains(G_VARIABLE[i].Key,Search) == 0) continue; + list[inx].Ready = 1; + memcpy(list[inx].Key,G_VARIABLE[i].Key,strlen(G_VARIABLE[i].Key)); + memcpy(list[inx].Value,G_VARIABLE[i].Value,strlen(G_VARIABLE[i].Value)); + inx++; + } + list[inx].Ready = 0; + return list; +} \ No newline at end of file diff --git a/kernel/src/toys/calendar.c b/kernel/src/toys/calendar.c index 7cc67600d..ffd302b49 100644 --- a/kernel/src/toys/calendar.c +++ b/kernel/src/toys/calendar.c @@ -4,7 +4,7 @@ #include "drv/cmos.h" #include "io/tty.h" -#define printf(M, ...) tty_printf(M, ##__VA_ARGS__) +#define printf(M, ...) _tty_printf(M, ##__VA_ARGS__) unsigned int days_in_months[12] = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31}; diff --git a/kernel/src/toys/danview.c b/kernel/src/toys/danview.c deleted file mode 100644 index e9cbf9735..000000000 --- a/kernel/src/toys/danview.c +++ /dev/null @@ -1,68 +0,0 @@ -#include - -uint32_t dan_view(int argc, char** argv) { - if(argc == 0) { - tty_printf("File not selected!\n"); - return 1; - } - - FILE* file = fopen(argv[argc], "rb"); - - if(!file) { - tty_printf("Failed to open file %s (argc: %d)\n", argv[argc], argc); - return 1; - } - - fclose(file); - - tty_printf("Opening file...\n"); - - DANDescriptor_t* descriptor = alloc_dan(argv[argc], true); - - if(!descriptor) { - tty_printf("Not a DAN file!\n"); - return 1; - } - - char* buffer = kmalloc(descriptor->framesize); - - uint32_t idx = 0; - - tty_printf("Ready!!!\n"); - - uint32_t sx = (getScreenWidth() - descriptor->header.width) / 2; - uint32_t sy = (getScreenHeight() - descriptor->header.height) / 2; - - set_cursor_enabled(false); - - clean_tty_screen(); - - while(1) { - - read_frame_dan(descriptor, idx, buffer); - - duke_rawdraw(buffer, &(struct DukeImageMeta) { - "DUKE", - descriptor->header.width, - descriptor->header.height, - descriptor->framesize, - descriptor->header.alpha - }, (int)sx, (int)sy); - - idx = (idx + 1) % descriptor->header.frame_count; - - int key = getCharRaw(); - - if(key == 129 || key == 1) - break; - - punch(); - } - - free_dan(descriptor); - kfree(buffer); - - set_cursor_enabled(true); - - return 0; -} \ No newline at end of file diff --git a/kernel/src/toys/dino.c b/kernel/src/toys/dino.c index 50e6720e0..4b3432d44 100644 --- a/kernel/src/toys/dino.c +++ b/kernel/src/toys/dino.c @@ -7,6 +7,8 @@ #include "sys/trigger.h" #include "drv/input/keymap.h" #include "lib/string.h" +#include "drv/psf.h" +#include "io/ports.h" char dino_cur_path[1024] = "/"; struct dirent* dino_cur_dirent = nullptr; @@ -90,7 +92,7 @@ uint32_t dino_filemanager(int argc, char* argv[]) { keyboardctl(KEYBOARD_ECHO, false); - RegTrigger(TRIGGER_KEY_PRESSED, dino_keyhandler); + RegTrigger(TRIGGER_KEY_PRESSED, (trigger_cmd_t)dino_keyhandler); while(1) { int key = getCharRaw(); @@ -104,6 +106,7 @@ uint32_t dino_filemanager(int argc, char* argv[]) { punch(); } + clean_tty_screen(); keyboardctl(KEYBOARD_ECHO, true); diff --git a/kernel/src/toys/diskctl.c b/kernel/src/toys/diskctl.c index 9edd274f4..84b29c5a7 100644 --- a/kernel/src/toys/diskctl.c +++ b/kernel/src/toys/diskctl.c @@ -1,5 +1,6 @@ #include "drv/atapi.h" #include "io/tty.h" +#include "io/status_loggers.h" extern ata_drive_t drives[4]; @@ -139,7 +140,7 @@ void diskctl_test(uint32_t argc, char** argv) { tty_printf("Reading 1 MB from address 0...\n"); - ata_read(disk_n, buf, 0, 1 * 1024 * 1024); + ata_pio_read(disk_n, buf, 0, 1 * 1024 * 1024); tty_printf("Freeing buffer...\n"); diff --git a/kernel/src/toys/gfxbench.c b/kernel/src/toys/gfxbench.c new file mode 100644 index 000000000..43657283f --- /dev/null +++ b/kernel/src/toys/gfxbench.c @@ -0,0 +1,52 @@ +// +// Created by ndraey on 08.11.23. +// + +#include +#include "drv/input/keymap.h" +#include "drv/input/keyboard.h" +#include "io/screen.h" +#include "sys/timer.h" +#include "lib/sprintf.h" + +uint32_t gfxbench(uint32_t argc, char* args[]) { + size_t frames = 0; + size_t fps = 0; + size_t last_measurement = timestamp(); + + size_t scrw = getScreenWidth(); + size_t scrh = getScreenHeight(); + size_t scrbpp = getDisplayBpp(); + + char* string = 0; + + keyboardctl(KEYBOARD_ECHO, false); + + while(1) { + if(getCharRaw() == KEY_ESC) + break; + + if(timestamp() - last_measurement >= 1000) { + last_measurement = timestamp(); + fps = frames; + frames = 0; + } + + drawRect(0, 0, scrw, scrh, 0x999999); + + asprintf(&string, "[%d x %d @ %d bits] %d FPS", scrw, scrh, scrbpp, fps); + + draw_vga_str(string, strlen(string), 0, 0, 0x000000); + + if(string) + kfree(string); + + punch(); + + frames++; + } + + keyboardctl(KEYBOARD_ECHO, true); + + return 0; +} \ No newline at end of file diff --git a/kernel/src/toys/mala.c b/kernel/src/toys/mala.c index a43123d94..097d45188 100644 --- a/kernel/src/toys/mala.c +++ b/kernel/src/toys/mala.c @@ -161,7 +161,7 @@ void mala_control() { } } -void mala_draw() { +uint32_t mala_draw(uint32_t argc, char* argv[]) { // Disable TTY cursor mala_init(); @@ -182,4 +182,6 @@ void mala_draw() { mala_flush(); } + + return 0; } \ No newline at end of file diff --git a/kernel/src/toys/minesweeper/Flag.c b/kernel/src/toys/minesweeper/Flag.c deleted file mode 100644 index 7abfdda3a..000000000 --- a/kernel/src/toys/minesweeper/Flag.c +++ /dev/null @@ -1,42 +0,0 @@ -#include - -#define FLAG_FRAME_COUNT 1 -#define FLAG_FRAME_WIDTH 32 -#define FLAG_FRAME_HEIGHT 32 - -/* Piskel data for "Flag" */ - -static const uint32_t flag_sprite[1024] = { -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -}; diff --git a/kernel/src/toys/minesweeper/Flag.piskel b/kernel/src/toys/minesweeper/Flag.piskel deleted file mode 100644 index 6f642b946..000000000 --- a/kernel/src/toys/minesweeper/Flag.piskel +++ /dev/null @@ -1 +0,0 @@ -{"modelVersion":2,"piskel":{"name":"New Piskel","description":"","fps":12,"height":32,"width":32,"layers":["{\"name\":\"Layer 1\",\"opacity\":1,\"frameCount\":1,\"chunks\":[{\"layout\":[[0]],\"base64PNG\":\"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAgklEQVRYR+2WwQ6AIAxDu///aLx40MY4WGALWq8S+ngI1VD8WHE+wgANaFd4Q2yufQB4xbx1yw2kA3iByw0IQAbKDfBX7gF97x7wSup/XfBg5NaGyG5DUB0LQAZkIMMAn3vvsuz64e0adCalA4wGhoy8GRBAuQFvT6e8HzkFUwJ5kgO0SCoh7cM4QgAAAABJRU5ErkJggg==\"}]}"]}} \ No newline at end of file diff --git a/kernel/src/toys/minesweeper/Mine.c b/kernel/src/toys/minesweeper/Mine.c deleted file mode 100644 index 784192b37..000000000 --- a/kernel/src/toys/minesweeper/Mine.c +++ /dev/null @@ -1,42 +0,0 @@ -#include - -#define MINE_FRAME_COUNT 1 -#define MINE_FRAME_WIDTH 32 -#define MINE_FRAME_HEIGHT 32 - -/* Piskel data for "Mine" */ - -static const uint32_t mine_sprite[1024] = { -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xffffffff, 0xffffffff, 0xffffffff, 0xffffffff, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xffffffff, 0xffffffff, 0xffffffff, 0xffffffff, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xffffffff, 0xffffffff, 0xffffffff, 0xffffffff, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xffffffff, 0xffffffff, 0xffffffff, 0xffffffff, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff000000, 0xff000000, 0xff000000, 0xff000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -}; diff --git a/kernel/src/toys/minesweeper/Mine.piskel b/kernel/src/toys/minesweeper/Mine.piskel deleted file mode 100644 index c5fdbe8f6..000000000 --- a/kernel/src/toys/minesweeper/Mine.piskel +++ /dev/null @@ -1 +0,0 @@ -{"modelVersion":2,"piskel":{"name":"Mine","description":"","fps":12,"height":32,"width":32,"layers":["{\"name\":\"Layer 1\",\"opacity\":1,\"frameCount\":1,\"chunks\":[{\"layout\":[[0]],\"base64PNG\":\"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAAsklEQVRYR+1XQQ7AIAiT/z/aXWYyjVqKEmbijopQSlEmKfiT4PhpBUBuwJt8mQ69gd0AjBy366h6Jbkp0B4DvwOAMmX3q6Q1DLABkD0EUBywNacCF+NZF4QB6AbOuV4WMXcwLMEFEMbAbtGpuuIriAsgnAGvG7DVgu0eQIoi9i8AyICXFrqPxzmvISEyZApL4H0f0ABG06020/OmYpTZqEtMI5LpkPefkZaBLXYrDGwB8ABo3zAhsFYvLwAAAABJRU5ErkJggg==\"}]}"]}} \ No newline at end of file diff --git a/kernel/src/toys/minesweeper/Nums.c b/kernel/src/toys/minesweeper/Nums.c deleted file mode 100644 index d2a5eb2f8..000000000 --- a/kernel/src/toys/minesweeper/Nums.c +++ /dev/null @@ -1,316 +0,0 @@ -#include - -#define NUMS_FRAME_COUNT 9 -#define NUMS_FRAME_WIDTH 32 -#define NUMS_FRAME_HEIGHT 32 - -/* Piskel data for "Nums" */ - -static const uint32_t nums_data[9][1024] = { -{ -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0xffff0000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -}, -{ -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0xff00ff00, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -}, -{ -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0xff0000ff, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -}, -{ -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -}, -{ -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -}, -{ -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -}, -{ -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -}, -{ -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -}, -{ -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, -0x00000000, 0x00000000, 0x00000000, 0x00000000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0xff380000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000, 0x00000000 -} -}; diff --git a/kernel/src/toys/minesweeper/Nums.piskel b/kernel/src/toys/minesweeper/Nums.piskel deleted file mode 100644 index a2039001b..000000000 --- a/kernel/src/toys/minesweeper/Nums.piskel +++ /dev/null @@ -1 +0,0 @@ -{"modelVersion":2,"piskel":{"name":"Nums","description":"","fps":0,"height":32,"width":32,"layers":["{\"name\":\"Layer 1\",\"opacity\":1,\"frameCount\":9,\"chunks\":[{\"layout\":[[0],[1],[2],[3],[4],[5],[6],[7],[8]],\"base64PNG\":\"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAASAAAAAgCAYAAACy9KU0AAAFIUlEQVR4Xu1dW3LbMAyUb9X7f/VW7nRsJTEteB8AKbtFf4k3FiuQmTSXzf53vT6qXi62qVeK123wEwhftjn+7+6uGxfHZZsbx3P2v4L6/C6qR2Rf7XZVPKNfNj7WP2tPzX+XZ+OYnacaP1sXLb8ESJuAjlrYBBQBWwMmPx7Vg8Ha4yN8lHTrwMbl2kf5zPFPENBINFGgxRsQu/mM4RRvQuzm8xzG7E0IASILRGQfAXY8z8az23PjYv279tl6sHGsyhfF7daDy7MJCNS/CQgBlD3nAImtzR2IbXPt48hvEmod3HhUP1H8c/0fEBC78Tx98wkyI5oUbT7RZqPKEyH8FYmIJ7piqfJkGAdiLCCyABz9ZO35Gd80Ud5nxzfml32bU/VVedQP1Z4qf/PfBBT0QSUUVR61Pz5Hg7hrZgeyCcjv0SvCZPuiDrQqj7JT7anyMgGNbzyTHqHHjYZ90ynehEZCYR+XXT0Eh3gD2AFdTRjV9nCGxxIesF1vdXrZ+rn6rt6eebbemr6wATUBMeBsAmKqpMhogFYsz5WtJgJ3c2L13oaA2LZM2oBY95Gcu0Fl/d716wmIHcAs4NEbhgrkbEHZvLN+qvWr4nb76epFBOT2nYsj8XDcBHQE3SagqoGuGuSqeFg7VXFzA/wclavXBMR2+LXcSRtQ/SO0CuQs8NgNCD2Cu1/MqitADYx0K2q/kAe3n65eExDqCHfeBHSvUzURRI/dY1uq/e72s3Y5+PhSTUCPteOI8N+5ghX/FIwF4vmbT/WXC20ibGVcwkAbFvLv+kV20Tk3cMjK97lKaKp8FMksO8d9aQLiEXEo2QQUFdAlgiagW0VVIlDlm4CSo39X/+83n1kbENqERoKZPQAqXFwCVP1U5a0SAoozm382L24j/PwNqAnojkSu4Qi2z+csEFk5FEF2A9rtZwcQxakSNGtvlHPrkc0/208Oj59LQCcRzw6PdVcvF7ijXhaQbBwc8GJrrn52YNj8VhEP8oPireq3S4Ac/pqAUB+D8yYg9sqgDkIT0GNlXQJQ68720xyY4H8B+DwCOnnzGcv/OURUBUgEwOwm4hIQ2hiq88/GWV3HbN3deJDe6ytxExBbv4/fhKoHUP1isv6zgz17ECOiY/NjAafmocqzcSBiZ+18+o/h32zzmb8JsY1dNRCr4skS0Ox6zB70bPxV9VP7jYiqCcitKKVXfxWj3P4QOht4Y7xuPK5elX9U9yag1xXS6vP+V7A333zQJsT+P0II9vi8anCxJ07CjcfVm01A2mBxNXol5dbB1ctG7NWnCShb90G//rfh2QDPAl4UnxuPq9cEdKtAVf1Y3HlXr13rfQno5M3HJRJXT233s3w18Fx73pfwO5+z9asJ1e1sVf2rH8cR0e/nnN8moAAfLpG4ei5M48HlABD7rRoADZD670DVDkR9PdzOVtU/iwMUf+6D8X4EdPLms5dbfVRW5VFb9XMXsOwXHxFJDoh4o1vtP7pazB5o90pTXX8VF6g/x/aagMgN6Med9bBmTUDVA6DaU+VZiq8mdtcvGvBZ+bMbJorPJiD374R9jaxGcu5fRI36yv5VDZGIEIzW/fRr9pc6AjaqQNWmcJb/VQON6rg6/7X+CHJoAkIQOTpvAmoCcnDDX0WRdbf+TUBXVFrpPLkB7b7YP9G8nnhmb0DoTWLshgt81FV2MKr8n3X1ct9evCuQT3g1de4NCOH+ft4EtJoA1LeHqgFcRegk8L7EVtV/lZ9bYn8AX7fYP43OghoAAAAASUVORK5CYII=\"}]}"]}} \ No newline at end of file diff --git a/kernel/src/toys/miniplay.c b/kernel/src/toys/miniplay.c new file mode 100644 index 000000000..c854f026b --- /dev/null +++ b/kernel/src/toys/miniplay.c @@ -0,0 +1,128 @@ +#include +#include +#include "io/status_loggers.h" +#include "mem/vmm.h" +#include "drv/audio/ac97.h" +#include "sys/scheduler.h" +#include "sys/timer.h" +#include "lib/stdio.h" + +char* miniplay_filename; +size_t miniplay_pages_total = 0; +size_t miniplay_pages_played = 0; +size_t miniplay_filesize = 0; +size_t miniplay_timestamp = 0; +WAVHeader miniplay_hdr; + +size_t miniplay_anim_pos = 0; + +// Duration = File Size / (Sample Rate * Number of Channels * Sample Width) + +void miniplay_display() { + while(1) { + clean_tty_screen_no_update(); + + _tty_printf("Miniplay by NDRAEY (c) 2023\n\n"); + _tty_printf("Now playing - %s\n\n", miniplay_filename); + _tty_printf("Channels: %d\n", miniplay_hdr.numChannels); + _tty_printf("Sample rate: %d\n", miniplay_hdr.sampleRate); + _tty_printf("Byte rate: %d\n", miniplay_hdr.byteRate); + _tty_printf("Bits per sample: %d\n\n", miniplay_hdr.bitsPerSample); + + size_t current_seconds_precise = (timestamp() - miniplay_timestamp) / 1000; + size_t total_seconds = miniplay_filesize / (miniplay_hdr.sampleRate * miniplay_hdr.numChannels * (miniplay_hdr.bitsPerSample >> 3)); + + _tty_printf("%02d:%02d / %02d:%02d\n\n", + current_seconds_precise / 60, + current_seconds_precise % 60, + total_seconds / 60, + total_seconds % 60); + + _tty_printf("%*s> > > >\n", miniplay_anim_pos, ""); + _tty_printf("%*s< < < <", 5 - miniplay_anim_pos, ""); + + miniplay_anim_pos++; + + if(miniplay_anim_pos > 5) { + miniplay_anim_pos = 0; + } + + punch(); + + sleep_ms(250); + } +} + +uint32_t miniplay(uint32_t argc, char* args[]) { + if(argc < 1) { + tty_error("No arguments!\n"); + return 1; + } + + if(!ac97_is_initialized()) { + tty_error("AC'97 is not initialized!"); + return 1; + } + + miniplay_pages_total = 0; + miniplay_pages_played = 0; + miniplay_filesize = 0; + memset(&miniplay_hdr, 0, sizeof miniplay_hdr); + + char* filename = args[1]; + miniplay_filename = filename; + + FILE* file = fopen(filename, "rb"); + + if(!file) { + tty_error("Failed to open a file!\n"); + return 1; + } + + fseek(file, 0, SEEK_END); + + miniplay_filesize = ftell(file); + + fseek(file, 0, SEEK_SET); + + fread(file, 1, sizeof miniplay_hdr, &miniplay_hdr); + + fseek(file, 0xae, SEEK_SET); + + char* data = kmalloc(miniplay_filesize); + fread(file, miniplay_filesize, 1, data); + + set_cursor_enabled(false); + + miniplay_pages_total = ac97_copy_user_memory_to_dma(data, miniplay_filesize); + + thread_t* display_thread = thread_create(get_current_proc(), miniplay_display, 0x1000, true, false); + + ac97_set_pcm_sample_rate(miniplay_hdr.sampleRate); + + ac97_set_master_volume(2, 2, false); + ac97_set_pcm_volume(2, 2, false); + + miniplay_timestamp = timestamp(); + + for(miniplay_pages_played = 0; + miniplay_pages_played < miniplay_pages_total; + miniplay_pages_played += 32) { + ac97_single_page_write_wait(miniplay_pages_played); + } + + ac97_reset_channel(); + + kfree(data); + fclose(file); + + ac97_destroy_user_buffer(); + + thread_exit(display_thread); + + clean_tty_screen(); + + set_cursor_enabled(true); + + return 0; +} \ No newline at end of file diff --git a/kernel/src/toys/pavi.c b/kernel/src/toys/pavi.c new file mode 100644 index 000000000..2e1953dbc --- /dev/null +++ b/kernel/src/toys/pavi.c @@ -0,0 +1,31 @@ +#include "common.h" +#include "lib/stdio.h" +#include "io/tty.h" +#include "io/status_loggers.h" +#include "fmt/tga.h" + +uint32_t pavi_view(uint32_t argc, char* argv[]) { + if(argc < 1) { + tty_error("No arguments!\n"); + return 1; + } + + FILE* file = fopen(argv[1], "rb"); + + if(!file) { + tty_printf("Failed to open file: %s!\n", argv[1]); + return 1; + } + + fclose(file); + + tga_header_t pavi_tga_header; + + tga_extract_info(argv[1], &pavi_tga_header); + + + +// tga_extract_pixels(argv[1], ) + + return 0; +} \ No newline at end of file diff --git a/kernel/src/user/env.c b/kernel/src/user/env.c index 9e92a9d9e..6edc1711b 100644 --- a/kernel/src/user/env.c +++ b/kernel/src/user/env.c @@ -2,48 +2,33 @@ * @file drv/env.c * @author Пиминов Никита (nikita.piminoff@yandex.ru) * @brief Пользовательское окружение ОС - * @version 0.3.3 + * @version 0.3.4 * @date 2022-11-07 * @copyright Copyright SayoriOS Team (c) 2022-2023 */ -#include +#include #include #include "user/env.h" +#include "io/screen.h" +#include "mem/vmm.h" +#include "mem/pmm.h" +#include "sys/timer.h" -struct env e = {0}; +struct env system_environment = {0}; -/** - * @brief Печатает в логи, состояние об окружении ядра - */ -struct env* printEnv(){ - // qemu_log("Address of env struct: %x", &e); - return &e; -} - -void confidEnv(){ - qemu_log("[ENV] Config..."); - e.OS_VERSION_MAJOR = VERSION_MAJOR; ///< Версия ядра - e.OS_VERSION_MINOR = VERSION_MINOR; ///< Пре-Релиз - e.OS_VERSION_PATCH = VERSION_PATCH; ///< Патч - e.Link_Display = getFrameBufferAddr(); ///< Ссылка на виртуальный экран - e.Link_Time = 2; ///< Ссылка на время - e.Display_W = getScreenWidth(); ///< Длина экрана - e.Display_H = getScreenHeight(); ///< Высота экрана - e.Display_B = getDisplayBpp(); ///< Смещение экрана - e.Display_P = getDisplayPitch(); ///< Глубина экрана - e.Display_S = getDisplaySize(); ///< Размер буфера - e.Ticks = getTicks(); ///< Количество текущих тиков - e.RAM_Install = getInstalledRam(); ///< Установлено ОЗУ - e.RAM_Used = memory_get_used_kernel(); ///< Использовано ОЗУ - e.RAM_Free = 0; ///< Свободно ОЗУ - e.OS_VERSION_ENV = 1; - // char Username[128]; ///< Имя пользователя - // char Hostname[128]; ///< Имя устройства - // char CPU_Name[128]; ///< Имя процессора - // char OS_Name[128]; ///< Имя ОС - // char OS_CodeName[128]; ///< Кодовое название ОС - // char OS_Build[128]; ///< Дата компиляции - // char OS_Arch[128]; ///< Архитектура ядра - qemu_log("[ENV] Version %d environment completed successfully.", e.OS_VERSION_ENV); +void configure_env(){ + system_environment.OS_VERSION_MAJOR = VERSION_MAJOR; ///< Версия ядра + system_environment.OS_VERSION_MINOR = VERSION_MINOR; ///< Пре-Релиз + system_environment.OS_VERSION_PATCH = VERSION_PATCH; ///< Патч + system_environment.DisplayFrameBuffer_Address = getFrameBufferAddr(); ///< Ссылка на виртуальный экран + system_environment.Display_W = getScreenWidth(); ///< Длина экрана + system_environment.Display_H = getScreenHeight(); ///< Высота экрана + system_environment.Display_B = getDisplayBpp(); ///< Смещение экрана + system_environment.Display_P = getDisplayPitch(); ///< Глубина экрана + system_environment.Display_S = getDisplaySize(); ///< Размер буфера + system_environment.Ticks = getTicks(); ///< Количество текущих тиков + system_environment.RAM_Install = phys_memory_size; ///< Установлено ОЗУ + system_environment.RAM_Used = used_phys_memory_size; ///< Использовано ОЗУ + system_environment.RAM_Free = phys_memory_size - used_phys_memory_size; ///< Свободно ОЗУ } diff --git a/kernel/src/zlibtest.c b/kernel/src/zlibtest.c deleted file mode 100644 index 25aacd934..000000000 --- a/kernel/src/zlibtest.c +++ /dev/null @@ -1,98 +0,0 @@ -#include "../include/compress/zlib/zlib.h" -#include "io/ports.h" - -#define MAX_BUFFER_SIZE 1024 - -void compress_string(const char* input, char* output, unsigned int* output_length) { - z_stream stream; - - memset(&stream, 0, sizeof(stream)); - stream.zalloc = Z_NULL; - stream.zfree = Z_NULL; - stream.opaque = Z_NULL; - - if (deflateInit(&stream, Z_DEFAULT_COMPRESSION) != Z_OK) { - qemu_err("Failed to initialize deflate stream\n"); - return; - } - - stream.avail_in = strlen(input); - stream.next_in = (unsigned char*)input; - - unsigned int total_output = 0; - - do { - stream.avail_out = MAX_BUFFER_SIZE; - stream.next_out = (unsigned char*)output + total_output; - - if (deflate(&stream, Z_FINISH) == Z_STREAM_ERROR) { - qemu_err("Compression error\n"); - deflateEnd(&stream); - return; - } - - total_output += MAX_BUFFER_SIZE - stream.avail_out; - } while (stream.avail_out == 0); - - *output_length = total_output; - deflateEnd(&stream); -} - -void decompress_buffer(const char* input, unsigned int input_length, char* output, unsigned int* output_length) { - z_stream stream; - - memset(&stream, 0, sizeof(stream)); - stream.zalloc = Z_NULL; - stream.zfree = Z_NULL; - stream.opaque = Z_NULL; - - if (inflateInit(&stream) != Z_OK) { - qemu_err("Failed to initialize inflate stream\n"); - return; - } - - stream.avail_in = input_length; - stream.next_in = (unsigned char*)input; - - unsigned int total_output = 0; - - do { - stream.avail_out = MAX_BUFFER_SIZE; - stream.next_out = (unsigned char*)output + total_output; - - if (inflate(&stream, Z_NO_FLUSH) == Z_STREAM_ERROR) { - qemu_err("Decompression error\n"); - inflateEnd(&stream); - return; - } - - total_output += MAX_BUFFER_SIZE - stream.avail_out; - } while (stream.avail_out == 0); - - *output_length = total_output; - inflateEnd(&stream); -} - -int test_zlib() { - const char* input = "PIKACHU"; - qemu_printf("Original string: %s\n", input); - - char compressed_buffer[MAX_BUFFER_SIZE]; - unsigned int compressed_length = 0; - - compress_string(input, compressed_buffer, &compressed_length); - - qemu_printf("Compressed buffer (length=%d):\n", compressed_length); - for (unsigned int i = 0; i < compressed_length; i++) - new_qemu_printf("%02x ", compressed_buffer[i]); - qemu_printf("\n"); - - char decompressed_buffer[MAX_BUFFER_SIZE]; - unsigned int decompressed_length = 0; - - decompress_buffer(compressed_buffer, compressed_length, decompressed_buffer, &decompressed_length); - - qemu_printf("Decompressed buffer (length=%u): %s\n", decompressed_length, decompressed_buffer); - - return 0; -} diff --git a/other/41_sayori b/other/41_sayori deleted file mode 100755 index db3f3e495..000000000 --- a/other/41_sayori +++ /dev/null @@ -1,11 +0,0 @@ -#!/bin/sh -exec tail -n +3 $0 -# This file provides an easy way to add custom menu entries. Simply type the -# menu entries you want to add after this comment. Be careful not to change -# the 'exec tail' line above. - -menuentry "SayoriOS Soul" { - multiboot /boot/sayorios_kernel.elf - module /boot/sayori_sefs.img initrd_sefs - boot -} diff --git a/other/compiler.sh b/other/compiler.sh deleted file mode 100644 index 49eb53116..000000000 --- a/other/compiler.sh +++ /dev/null @@ -1,16 +0,0 @@ -set -e - -CLANG=$(ls /usr/bin/clang-1* | grep -o '[0-9]\+' | sort | head -n 1) -GCC=$(ls /usr/bin/gcc-* | grep -o '[0-9]\+' | sort | head -n 1) - -prefix="" - -if [ "$1" = "cpp" ]; then - prefix="++" -fi - -# echo $CLANG $GCC - -compiler="clang$prefix-$CLANG -target i386-unknown-pc-none" - -echo $compiler diff --git a/other/llvm.sh b/other/llvm.sh deleted file mode 100755 index a8887ea3c..000000000 --- a/other/llvm.sh +++ /dev/null @@ -1,165 +0,0 @@ -#!/bin/bash -################################################################################ -# Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. -# See https://llvm.org/LICENSE.txt for license information. -# SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception -################################################################################ -# -# This script will install the llvm toolchain on the different -# Debian and Ubuntu versions - -set -eux - -usage() { - set +x - echo "Usage: $0 [llvm_major_version] [all] [OPTIONS]" 1>&2 - echo -e "all\t\t\tInstall all packages." 1>&2 - echo -e "-n=code_name\t\tSpecifies the distro codename, for example bionic" 1>&2 - echo -e "-h\t\t\tPrints this help." 1>&2 - echo -e "-m=repo_base_url\tSpecifies the base URL from which to download." 1>&2 - exit 1; -} - -CURRENT_LLVM_STABLE=15 -BASE_URL="http://apt.llvm.org" - -# Check for required tools -needed_binaries=(lsb_release wget add-apt-repository gpg) -missing_binaries=() -for binary in "${needed_binaries[@]}"; do - if ! which $binary &>/dev/null ; then - missing_binaries+=($binary) - fi -done -if [[ ${#missing_binaries[@]} -gt 0 ]] ; then - echo "You are missing some tools this script requires: ${missing_binaries[@]}" - echo "(hint: apt install lsb-release wget software-properties-common gnupg)" - exit 4 -fi - -# Set default values for commandline arguments -# We default to the current stable branch of LLVM -LLVM_VERSION=$CURRENT_LLVM_STABLE -ALL=0 -DISTRO=$(lsb_release -is) -VERSION=$(lsb_release -sr) -UBUNTU_CODENAME="" -CODENAME_FROM_ARGUMENTS="" -# Obtain VERSION_CODENAME and UBUNTU_CODENAME (for Ubuntu and its derivatives) -source /etc/os-release -DISTRO=${DISTRO,,} -case ${DISTRO} in - debian) - if [[ "${VERSION}" == "unstable" ]] || [[ "${VERSION}" == "testing" ]] || [[ "${VERSION_CODENAME}" == "bookworm" ]]; then - # For now, bookworm == sid. - # TODO change when bookworm is released - CODENAME=unstable - LINKNAME= - else - # "stable" Debian release - CODENAME=${VERSION_CODENAME} - LINKNAME=-${CODENAME} - fi - ;; - *) - # ubuntu and its derivatives - if [[ -n "${UBUNTU_CODENAME}" ]]; then - CODENAME=${UBUNTU_CODENAME} - if [[ -n "${CODENAME}" ]]; then - LINKNAME=-${CODENAME} - fi - fi - ;; -esac - -# read optional command line arguments -if [ "$#" -ge 1 ] && [ "${1::1}" != "-" ]; then - if [ "$1" != "all" ]; then - LLVM_VERSION=$1 - else - # special case for ./llvm.sh all - ALL=1 - fi - OPTIND=2 - if [ "$#" -ge 2 ]; then - if [ "$2" == "all" ]; then - # Install all packages - ALL=1 - OPTIND=3 - fi - fi -fi - -while getopts ":hm:n:" arg; do - case $arg in - h) - usage - ;; - m) - BASE_URL=${OPTARG} - ;; - n) - CODENAME=${OPTARG} - if [[ "${CODENAME}" == "unstable" ]]; then - # link name does not apply to unstable repository - LINKNAME= - else - LINKNAME=-${CODENAME} - fi - CODENAME_FROM_ARGUMENTS="true" - ;; - esac -done - -if [[ $EUID -ne 0 ]]; then - echo "This script must be run as root!" - exit 1 -fi - -declare -A LLVM_VERSION_PATTERNS -LLVM_VERSION_PATTERNS[9]="-9" -LLVM_VERSION_PATTERNS[10]="-10" -LLVM_VERSION_PATTERNS[11]="-11" -LLVM_VERSION_PATTERNS[12]="-12" -LLVM_VERSION_PATTERNS[13]="-13" -LLVM_VERSION_PATTERNS[14]="-14" -LLVM_VERSION_PATTERNS[15]="-15" -LLVM_VERSION_PATTERNS[16]="" - -if [ ! ${LLVM_VERSION_PATTERNS[$LLVM_VERSION]+_} ]; then - echo "This script does not support LLVM version $LLVM_VERSION" - exit 3 -fi - -LLVM_VERSION_STRING=${LLVM_VERSION_PATTERNS[$LLVM_VERSION]} - -# join the repository name -if [[ -n "${CODENAME}" ]]; then - REPO_NAME="deb ${BASE_URL}/${CODENAME}/ llvm-toolchain${LINKNAME}${LLVM_VERSION_STRING} main" - - # check if the repository exists for the distro and version - if ! wget -q --method=HEAD ${BASE_URL}/${CODENAME} &> /dev/null; then - if [[ -n "${CODENAME_FROM_ARGUMENTS}" ]]; then - echo "Specified codename '${CODENAME}' is not supported by this script." - else - echo "Distribution '${DISTRO}' in version '${VERSION}' is not supported by this script." - fi - exit 2 - fi -fi - - -# install everything -if [[ -z "`apt-key list | grep -i llvm`" ]]; then - # download GPG key once - wget -O - https://apt.llvm.org/llvm-snapshot.gpg.key | apt-key add - -fi -add-apt-repository "${REPO_NAME}" -apt-get update -PKG="clang-$LLVM_VERSION lldb-$LLVM_VERSION lld-$LLVM_VERSION clangd-$LLVM_VERSION" -if [[ $ALL -eq 1 ]]; then - # same as in test-install.sh - # No worries if we have dups - PKG="$PKG clang-tidy-$LLVM_VERSION clang-format-$LLVM_VERSION clang-tools-$LLVM_VERSION llvm-$LLVM_VERSION-dev lld-$LLVM_VERSION lldb-$LLVM_VERSION llvm-$LLVM_VERSION-tools libomp-$LLVM_VERSION-dev libc++-$LLVM_VERSION-dev libc++abi-$LLVM_VERSION-dev libclang-common-$LLVM_VERSION-dev libclang-$LLVM_VERSION-dev libclang-cpp$LLVM_VERSION-dev libunwind-$LLVM_VERSION-dev" -fi -apt-get install -y $PKG diff --git a/ramdisk/Sayori/Fonts/UniCyrX-ibm-8x16.psf b/ramdisk/Sayori/Fonts/UniCyrX-ibm-8x16.psf new file mode 100644 index 0000000000000000000000000000000000000000..6846652eed5aca4436a8fa7db568e656edd4b02c GIT binary patch literal 5376 zcmai%X^>Ra6@U-J*lwL+6vPGwXqM-S+6s;je2$8UxXZo@4ML0hLdZ7h;IpMtsj2+P z4^4hq#ShU~shFiGszRzvsxq0F7n5|xtesArbja4(2$F3wF=M}ccX_WDsLF-!^gVaK z=bn4+oBr;uUJ*%Wa`{{)EdhCzltNLWi}d?dzu#19iRM?EdL|(5W-C-V9JK2t>AA1sjSsgx>8XT+GGIbWbG5bqzux!M9|K1rpdC#6%N zV2dyT7O?wgNMix3H|I0+GhbaB!0w+?V*$N?wAcjA^_Y%UW;{t;Oa+u~QLw9WX7XXjI6 zt7OMF3hve0tglomjnjUt`+@5Q7~SZ~mf8k(yhb>r+;t@OKhIp3T+Y_Z;o*}9-M*ew zm+9}B>yu9FdUcwn{2Ve8$>o%Db);fCNbakg%;!}!#R-yDL5Ksy`|D#SpXT;{t42Y{ zC5Y=?e{Wu&k+m=NgQ|HsNb3;K_%>de@o{ul8`SPE)e#SAZvwnM57U?)u{}giH860c zx$iNx{6fKuuh-XdKIo=CNL(OZUwoy<1`AF9(EVHDcW*8?sg5L$|J3X4wb(ZlDgtj2DDMDt->d z{=sHPYmM=`@qbr6RxP?nz2m+QsI{nM&-bkR&H%0Pr1QR;IvUyjdVg#uzW<%^?VR_U z03ENtSMRM7@NuCNFG<^dHqL--m>a5Q)&V|c+bh$kWY1UmhECDcDXPW9v12)}pJeaf zI9orY4E~PkukKdsc@@h;sR8U8e?J{LapJ@{oH%0Im(_`^=}2pEUJj`z&i+r~fB zUwz@Kp>#4K&&EGWjBeu}`h<>v=KNF#LLd>)#y@mIU|W15z6`X+7eXKr@QCWF6CscY zsO{yS^Cd}UzVG#!%JQ3UPe$tRt8(19;NhPwe=r3mnQHa7C*PWW@(1YNg;6v` z_946E^Abf<<*UeU`8V=B>FSQ6luSjQFXtgIkQDMlxd3^QT!_3_E<&c|V&r=yjqH(W z$Z7H%vRBqH@+I;)M!QswBd5!kkTc{9*(kb9*3o9BtVdoh8<82=gq$T?kh5hga*k|6 z_Q`hST-kw~C%cgI<#}XQUSzZdaum5x`m%EwbrJc+;J_7drOe7k(N*NGhHKzjSR%8t zQFNV5&(7fYdP;799NY*u!BSWTH$y+%0xm3v6>uwfvOF6_w~-r=736N0uamz6?v!Eq zhK$HJ$*+XFV3qs;dAGbF-{p5T+yiUiUMb7>Wt7}~a6dc%55hz6u>44VEI*N-l79r& z!a7(l`6*Gff!s#ozmy^^w#hTd?Ud|*M`5RgT~V})TwXHSDB3N* zmfxc7fyZDk?1KV44*TH=IVFGP_eppPe0VP$fcMGY}K8%k^8W` zgB*m9Kv8~%{HVMu5x<9|M60LC1@H`%WQ^54D_x85AWr!bxD=+t47dzt!sU>GSuh*s zKp)J7c`zTcumBdqB3KL#Tme_YRd6+21J}Y5xDKv|8z2Wa!cDLgmch-?54V5|%V7oF z3Le}B18_Uk*w3e&=bcYGQPd#c<*X&Q*xBvuaULW0E6QGn3XH+;U>qjlW%x3@1ij8i zXOpv;9y6RR&Q@m|xn<7d&VJ_!a!Z`O&OWC=uFu)&>~iwt#CZhiIZrxIIX<~RFv_3c zk8l$H1HXYk!)f>@{1?6r-+>>(-=GfbIicV4I{{}P<1ART-Pz$h%D8DKyJ(%W-q}F@ z6VAt-Pdd*zhslSuTSvcd@mqyEu*RLR67GUka5t=mdteRR3-`hO@Blmr55dDQrTcq~ zvbOs#$ZqrvaDMljXq&s=M)siZgk$m=+N^~OvtQx&i!hrQG;=`|eTMvt&bz#!pC$J{ D#RLlt literal 0 HcmV?d00001 diff --git a/ramdisk/Sayori/JSE/canvas.js b/ramdisk/Sayori/JSE/canvas.js new file mode 100644 index 000000000..155f91c1d --- /dev/null +++ b/ramdisk/Sayori/JSE/canvas.js @@ -0,0 +1,11 @@ +let canvas = { + fillRect: function(x, y, width, height) { + return canvas_fillRect(x, y, width, height); + }, + rect: function(x, y, width, height) { + return canvas_rect(x, y, width, height); + }, + strokeRect: function(x, y, width, height) { + return canvas_strokeRect(x, y, width, height); + } +}; diff --git a/ramdisk/Sayori/JSE/console.js b/ramdisk/Sayori/JSE/console.js new file mode 100644 index 000000000..7a119ad79 --- /dev/null +++ b/ramdisk/Sayori/JSE/console.js @@ -0,0 +1,17 @@ +let console = { + log: function(a) { + return console_log(a); + }, + warn: function(a) { + return console_warn(a); + }, + debug: function(a) { + return console_debug(a); + }, + err: function(a) { + return console_err(a); + }, + note: function(a) { + return console_note(a); + } +}; diff --git a/ramdisk/Sayori/JSE/system.js b/ramdisk/Sayori/JSE/system.js new file mode 100644 index 000000000..17ad09e65 --- /dev/null +++ b/ramdisk/Sayori/JSE/system.js @@ -0,0 +1,5 @@ +let system = { + ticks: function() { + return system_ticks(); + } +}; diff --git a/ramdisk/Sayori/Temp/test.txt b/ramdisk/Sayori/Temp/test.txt new file mode 100644 index 000000000..4679a7787 --- /dev/null +++ b/ramdisk/Sayori/Temp/test.txt @@ -0,0 +1,2 @@ +Съешь ещё этих мягких французских булок, да выпей чаю +(с) Unknown \ No newline at end of file diff --git a/ramdisk/Sayori/bg.tga b/ramdisk/Sayori/bg.tga new file mode 100644 index 0000000000000000000000000000000000000000..b89047c6240e8aba9e1a8c27506198fae689b703 GIT binary patch literal 808191 zcmbS!XLwcB*6!X30Yc~qq4(YeR5}EbkVbDIp-Pk9Tl#L_~<)G~{4o-)8O9z}C)m$7dp35HH zR>IQ8x0EfTn@Isqdq*{qO;IhyIi-i_EEec2vdwZH{kJACFN>Yx+*O}8PVW(3)p^oe zbc!$n>s-OzWInCNr?YJ_6GE4<8=urVVLM|Qb@-e~JDVp1SEn|cb2v%z?9pu`YzH3Qj#CAkhq3p_x-qRJch)QV@kb$7&cPniCbGv8LcwDv%PK=-0xYi9qeHx)^wy(C*rgLHK6Ik2aa!jJ0#`Xv z=s%3K;r0C>pjcs+sISb9tBpAIQ9XM5N@; zA6|vb&-n+4xuh(poLWqG0Jf1FTcrH#KL_qtLRwEKS@hZS{#F9#v}I+Mn`~t-UkUMx zpNw(nsd8n`n3fW@eOxn1kHOGzmk&2B9o|w37LJzxMMNm-RES?-18z2@-BA4DZ7nEA zBBhKMl+oVik)G3A^k)1CLh(Ko@p^==wUGbfIY$PE?;5{M=Q9hG{;Y*9M2lp z65ozzmjtBA^@$W)nT&T(?eR8$*2P3+J|E)Es>1cY z6TGk5v!;1%nbbO=Bln{MeNi%EfIJuAcKnG^24B^V>o`8pR?@*qm_J2mq=cnMH4c`zyShqslyr4y>oA7?0!dZ)_#`L$fB@&WA;2ahlg@S5o^{#2EtV^j7v{NkS% z%mJp(88mf=%xsvs!mK%YL`omxeL8=ES<^{0rVZyxXVTDvbD$_wZpXPuOFi>Q&nfcm zdR4m{G;5eJhaZ<2F-;|uW{U>~%lzT(q-aHwTp{+#$ahB+h5mU%hcS72j`N1$w2)Fx zs0vQ6gT$boD$C>xXvZB=6OK^S$%ClHg)DNuqL6%7$|JlD)5B?myns%sHkZ5#&R4#x zI+q7@F8PE`DA0;qYG6YUoG`{!2p6J13JNTfKm60nIoHSZPlY=yDF}LUWul?ODTsJwa7PxH%HbN1iO7y>11*4g#@y=^M~X*p z_H(Zy9rhS>B73FdP!W2GBhsV5*whWcpd+P})Bb^a3Te^km4k0{k^eFv7DCJQZkz(N{8n-Gj2Ys77j*7 zW+4zLb}M*f<9){*fYt7t=t!|?qr3{c*t$8N4cOR}1%136ni5>;qrH`$SVtWBF%g)? zF&$uUMYSdNbmFPD@R;^bI2Fo}1^%N`=51^*osh_ZaKs!n6Gs~U4E0QCEbiDwvS36< z*@@}7$gx+^G3>u#PKz&FVobCH>EPkVnlcp!`WWnMj94d6H8a8E@vAzFP8mn7SaK-( zrA&NjXs@zcXJ}}7vHm?*dI{Q^wx{8e8M4{^z zsbF$diU;Mb%@e?v%Ask)dthcpVNx=oWE^Rn6q;ry{JjD)tXa529+0tBOQnr#gAtl_~A(Qcme@d?Nc z{A`JZ$j*mAv}a%>>BG8-FiUw3SMl=)1ExQQrqW_sOVRiSQi4II zjqEI$W4fVv#8N`Nu>W(%fslAV)xR35r`Qp-0d(N+1_qu(g{KBrI^+`u-V_vUBJ+ol zXJ;6mJgbJ>wrAD9D#q4!6t!4y+`jUf_)2mP5QHG-rHkA?~uH z+KDr|qd0cPhD)6-W4p-q@!chTdVUD#hHxqL4u+fu4sfLMzZm2K57IN3ZjIy9JnnpDaKxWdk>#Scyvm%itn zS6-6hyWv6Sx`0=`+8n1e+#S^swqge_ABw&_R}iuIr+Di4XFxU|c&u zg=RtyX6OWarJRg6wUl3ir&A~PG$+E6cm9c`F&CCLwyo?K(?&dWoW_%V%*57&n{skx zaW;I*VvR)wPqwN=wV~CTuCzTZp>#rrxL@2+ z9mF}N9jtsHg1nv$febYagD-fx+#Gia$NdYB3|&;VlXPl_WANZjo-dywVPLaO{YQ!t+ z1r^7XMMR6@G5h-rK+Y7OyHbq*550{>8l4MJ4C)pg+Q4NlqXyrskXF0e`GeX!CY*t6;Cjb3E zB{DU)3A_ihp2ky7DM{%(fvM4yrRFR7PeY*T&_-!hwb9V7vTJp+cu0l4zKF-EWs>^D-aG>hdQY8=>#zW$& zJS$)~?Em=t-{r9aC+ud@k(5wvga~abq#@C>V7@B!D=jDQu)X=>vq8*-b9fiJs5Iq~ z+8&TnaF^K}{?u1s$ofVX9SR>^BllPs9298|Hw>`|XKX`p#59maV}?pX&rT9yOO+&A*9$$av7w}j-l9s{8c7)Sseh7waY4){X$fkN_~hAlq|IW zcGGNxHexHVCcR89;|MMVDRPqjjw4-zd9)bG<6+y;fH(!1(j&HvBTs+@m|OZ@4daEV#-GN8dHBk;L4WAf1|Ymr&bW89uN~ z+O%3MwL+3)#qgf8YGiL%#f_u@zN*8a@qcoa6EA}@RB1={z@Mt=wRPok?bOfo;L!Kx z@UQM+7#<|0+$m#dK95HlL_TCZZt5LX#L8KWD#C4L5^!vL*$O+)2{D=z-B9L@Y9pl^ zCY!Lh3Mpeo(JC@WkGOU)9dn1c0*_gIYG&F#RFUn09hJ zFGr0r)4MM}z70N5BK-k>8QJyo4?k4lt#|p9Qc!7m!eS!xNWAQRt?a=56nTg$p z>LfD|+Wb?48v#E0k#kMbX=uVfRVCPAfkDQsP+(1?I5Dy z^n!+CHluoK)pIg_jT9a}8`DbcmBoBpE-J(TP<+aNf<*QFWk-z`?tI8dk zM&Ez^mAv!vi^wr-La!MkneL)Pb<)&lx9w{q`Gc{*UBrp_ANN>gLam`oq_qEb>5rjc+6M zj)2H-!#tw)`P(n-7^VosU?;!+{4=?Usk?ZvT-c(MPuQL4Oo=~Y@h;s%p0Zs9sg$&J z$UylRFi-oY-6tntl)U!jdHMAH_mt7{)N1MnwBZvNt2F zhdXVLK|&~#hhI7WxbT!KrjtB*q(Y@y<;3#ekKcP&j{CA9wRuypvZ*2!9E{axQw(G< z54U|RB2#Jcjo^ksQe*?@Yex2!wWIn;ornjdcD?(h%`k^#?EhB!#uSJxBu++mXfG)v zhKn1ac?L!95DZXhs@ydmX5WNp_HSEdoul~)q-z}x26;C{q=h54Z@>J)ddzeS z^37hpVX=G-HdOYo)7Gefzob=k0c3~XzVS8!29ffpCqpHH+9I~6jvm6~V6N?Z(F&P4 z&3g2NX^f(XWc?P z!_J=HTOvh%$eDLsI=rt2a(gEahFygB1b`Ou4TJ!}Pc5OcRjtzJP9Bwmyc6=~PF?F% zepNulK=W-KhbVnoVtr|lg=9o_Tr*iXbgU$F?k%?P31X|CAQK(W$hxDS$;byE1FB-B zZ_`dP<^CAS91RYql@qLPmC{DP5=H?{tEfW2881~=fgFLN6D!AI%rnj6I|(M10fc43 zhs=NvnTue!dpuK|?WJtpGz(1hA05SAs0CYUxVVxr;jGIey%p~4X4YBGmxhMwlmrj{36m^(w2h-LNB7ozauyQ&npAV(4QK!Ko8}ylwS|1=zXkCe>lRJ#Ag4gc@kd=%mQy%b zRON>kjb<9p3x;=)vbFH56+C`G*k6TxaPijqr5S3o0k?o)WA3OE>DyRCCnFPZ~U)Rop?w5nNY z6luWipvDPcUz-nQ$G(R}%FZ#)Y&u6XIp;{YD<-s z2@eK`k!n(JU@Rz$;)N5{*3dI ze#Vw3qkB}>_?>(mlW+Pk3t+{I{_`tedEzXz58+reKVIQ$I!MR(+rNCFHvexhG7Rxl ze(2qIf*0(~VJ=8i`&#c;;5~6@58nXkMg8j}(QK4|W)!qU+EPM<^XsDah4 zfz<*KSNR!2!9x?66KZJw?O(o>)9h;jUtY!|lM&3NqRbM zY#>{ZyxWd6(!DKWrG4mNvDKR^GuFN=3m&;HvnyVf8J=rm>##`L*B&JIw@(1PksxO5 z%?a;R1BKN*Q3N2UPw;a{#V!e~`Cg>y(1}bsdma=mJ3OdXc4Q!Bh{~wO;)!k|3y@IU zvmUY4VBm&aMMT~=Ym7P##?U0s*Q6T_W)vwJuYBvJ=OuUQP;;-H5Tt)*_?@D*5Nt~Q zcc#49qB-fJiqJ-w8a|+{W6nMI_;KspwdbD(h+$JIi1p~M?x*b{UThfP{Wq@}Xolt` zkAnwsL!LeHs8AgmNA=WBpU}!RFD6?mOhXIiPSC(BO@!O;zGYOu?e;rwS=Z^MeS+4W zt87hCcnWgAT5F7ssM`B);o0`qOV61R*x$eYhLpgYvP@z0obI#%0L@L$!~rJF1P*~( z`m?AGAlT89roh;`+Z>O&2o#q{n6*%N^z9RtZDiL!pvCV=8cy6twksC2f528%2c$mO34P|50 zKv_DZi?pmABaLmNq}8xO*--ku%su>?q#k-z7VLaaYy;Oz3;P4or$rLbIJ%2v1XQta zsj{hx)y1p^_FswfBMg`xB4cUU4LnY>KqX%_HvLc3tHGwokl_K1VZ9bY z1X1Pg+q%L+8L4Mh0F8LYx=@f3V^Cz|dlB>;?F%E8jsatuNj9APXCcnS zsu}i?tc^qglw|M=T}c0_@>Indc%iCNz5nr@Ueku1juP+B*Yo~pQ3xr`Qv|bl+xu_6 zL7ZA{syRpO`t%%yi8)8EF>xk8x7c0;x0s$1uX>-I214GfQI?v2{i%!A^KT$I|1jHB zp%4J9(ZgOA$K*4H%d9|?e5{7?jeVUiI1UgfOb(K9^7Q$tqGwQdeLpZ}kC*!mRov%K5LC-vO?6Acu ztib>}??G4=@fCtl^V@k~M zuADz5UOo3jkeyu0mbDf0L_m)QEM`B8hNx=^@*nWOi$H)~jbR7B3;Gex>F!mjRcuo# z`llW}fLP6F%oned+x^h9zy8z{atT2`0~1=$-YJ84r|M42pEW#S;Sc8+Wi{uhErCCr z3t*C+!bIVmAAjmySHF+q>M-w9uqpr*@~3oqa+&4hQU`}427M`l#%#15$}$UO1+hKj zWk8cb8fon{EL#=>X!A;M$-;ea%G}*oWd;83HG8krv5%F;_2Omq;BK;IWdG{Gb1{5$ zSInu})KWzNuLXgJFf1$Os`#=l0MEVyolJ{{q;Me6Yfm29UG{8UQXP3PR9;e?`4BXt zE1*aTp#wuaUiO!8DEbI;+q6tQhbe7ClWz&d()I`7s^XLf8(gsz{W|lHl#;>$agYhI# zSQDdas|JEfEl`}z3;ZddnTnbh{S%F9^^p3h)P+_&3|9dJ@Up(##cT`XVWHU*?t!#u zCbNLZy*rjyN2F>+vXsL(zYO>qjM6SOUw8nUx9a!YsC+)KPUi8VV>mlFf6_CLhi)5xb;lg7f#n>j)~W)mglTtDL6X4!v!ylL^L(fh1jx;xIOrwmQqaa}C@RHJD% zoH3nZ0$RWR^ivhu2XLkq`M?dLTD!Pd{cA&)KhBI4yygsj(w@2YKGiv}eX}lr8Zb!=DB{OuHNO+(d5Cpr;(R z+buAvK@a1#20cU?m6u9E4HuDOJmV%@oLUMKytc`!%OR;`HOv{PHKT_aw^2MDAA_rIeiyZ6)EpvbkL>&Sv^nCnYtmUR40#M4lT8YOjY93>>d+i|FJPV ziN;h&)9`U-<0p{)M?9rr~N2d^Vo;w`yandZ(T3(2CIvv7J$4n!+w^r4;o5Capu?;HZ0t z9-^{;qs?8(rm>8gJo9Njwt7uCAQExGJL~%S#sc0Ni4rAlPlhYO?g97 z%ifgvuY=i>0uta7t_&Fx_E&{$dWMokE5@66v$JmEs9(VLNk828mC<`o6VlP3H2;gLfSL1?tF<<0*jE6i)-=0k^LbtazwkL4sEF7}Z10KZ889nLG=y2+NR54Ka3u8v$6H`^7Kv z=u;TLvYy5O_EE$aNG{Xv{_U$ZL1z9cn4gF=3}B;R`2?Xex^_m>X+;y)7VG*q-8R6> z3Rv3}f1R2SniR7DEw6@!3t$Hkp|wg72_|D{4?+mX3vdIyNr)@DkQxg(g?0l_Y%0Tw z58K|2%dFASGy^t~K`&l7sajj-;U?xzyq9l9c?*5MfU%|+b*cD;`2>t&w*B?E7Df?K zS0^YKqc9F}Zy@*2Im@FEvNNmW#>HG(*j4hV7Etk2Fi_pR*)&B)~V`i2Nl__?8lLip7 zxa$rW;V_q481!%2GK;pAEqH1sJbpES}hQRVuzH*bnkvgL@vS^P%^uE31AZ zj9RL*Sp0Zdwc~;%SZ6cfy(s~K%4h^fu@q`f-!U@00YN@pI`qpG$NUORRMOt-5;4Ex z9htlLElDYRTNYN_k~V#}K@LokA@}r>srSZ80Wh5hY;Oj}w-VL)%({9ez{#J zp!B*G>9|l%#ydg=2Ig^}6U_RhR&aLbzvQ z33^y2O!h3ikqi7-PMtckn;g!5=3%TM=VS>59&^lGAP@w0+`-JJ0sE7W>}O#O z&h3JSV$RWcw6dWGt!!vmWm1OC(t33!^wkm_^Bxwh(GM|yX~YR|H`^{yNoz4_HC=48 zKn^N$Qd}Cqx!@1foI|e1t(d-as4`aZA2Dqsg3TcKJSteMGBtm^Lv^i&51rJtfy9TM zpyjEW)U5IExVA?dx1TP}Q;St~o1Hc}D>=cdfI}endN+LwcE+0t0@GEdI}OM0t$c&+ z4BoJt_l1-o1^NoCEXG*__XD(OgP=8DKP}@@q+V!4o4c+e%wzQIdDK9dbI%~+XU94BQNguIh>0E5rLO32#BwCslSE+8ltU=u(!sGWn{rWWsaJc}Sw+i4) zXe8JYcCxVF#>zT_u0XM^DpkE&fw~eiqde!7gn^^9iXjZoI?$e%_Sri{h}&;XWUcFny0aOMWe&el+!m^|CZjMNj}wtZNMXR0js zZK|ZSs!hTP4Lss+U}F`CX{6sg4+BCYf6km>EomTDvzAoxZe#g@86qdlhZIU4b*@U$ zJCH^E1|nwOiG5*%;+%c|rX_(ii2B;4izh?P@&4c!hLZ>xG za=m$ycj)}s$@RI32tzV|<4|aj%{aAcp}dpPu7YGsnsgF7}A|2y^Z-`62jO zJIk>PQ^uK*sX90JUPrmX5#9?zAuq*Ag4GLIs>sWN=ZSqNh(S=G`P!&{vJ{z!rij~w z+eS+Gkd5+C*)5>$U6}`Ccj|$66on~e*CciKb(y#KrYr^mqvt#V1jb9RhP`EMw_k%)rns+d%kw8A-HP7PMzN7W$| zBei4YEf~gK6yqH@)wEtUoKm~li?QCppRKU5R3M-ejn<^0W9a)PatEHN_fZGp$qUed zq^w~}T?vjHhtZEdN-Ur;VZfHJo`;h0*R70)hJmzX^A6O)01hb8KWxJwmlIAP zQ62hi**{c}KrcqXG@MRh2y1q!i-}F%+#=@w_kn% zf!;hRnm57U)?*eR=@aSQww;yW*PiJ)JKI%LNKLJ8zW7W$@m*odv;VtSrC7|wH44X3 zK&;P%cqb2(!x`(~WuPEX?+maVQ&t?Kj@JGJO6>z|_fKpFI_g> zdgdgOYmC|(5pmR$29?O(aIR4%87WT%lru35j85)3I9)&Ve5{` zqP?(__o04p{|!k%j%6Z@=lOfzmU(-qtZzVcyeG5QJ%wVVsnRK8fDCC5ITh7joG3iX zjK4=RP~YqDQbaf@A{>w&r^uiI!Jr;7qysGG8uYY@cF{Mk(72aIhI!we;s8k^2%tYB z4z!xqM!1?9R|;ZNB}*fg2D9N{rd`Oz{9YX9JK?TkjDlvej1sT=w59rg$p+F2s0#+GlXF@55zW@3!!b}i5VFqKIRK)W_ z$w*Au5OTEV^<|-CHrj<}cNeO)=yu^=qz79G;rSn1CijFDK;|9CGVbS2J}U1ZUq$`r zw@t%X3-vkV9qkyFmNS>aSgVG&f}W*o``>uh&h;bgzxJ{gp+Q~F3R=32WP3B&yB?aQ z!bM>eM%`K2TMCt$-}oka%UtI{^p+srt+4S6A+zR@uOSY#19q-3^2-=>?*2d1Ia?V! zr;Sto7@{zg#n!$oq$H+TYJ6ZgLcD&jm+t6pj=)IG7S$D_)CIuAb zo3>{^Ra}+NnPv*+bB1Beo0-h5tYrLM$H$D26001@wTLt!^xNe!#`qPIf88vDzo8`&nbUb9&)`Uw&rss zvi1<^)iPFc#&(u$EYr)1Zzh>>SaX+48zYBCjsrbFydV2pkd=klf~13p@WZDXkhIJL z9st8}HHs4Ba{qZzLOmZ4B}TlkhQ=grRQGeM3>G=qIB7b4A;c?SqbNoq zo?X*=+bZ@h>xXI*5^5y4IR{8X-4>sk-;D4X-k>-@!~}J;@4j|LIl**_LZgtSN4ysF zw#vo;}OtitQm`0fjiRj6j=e%uj)da7i(a1)HA?b zCy%3ep|c#xUV-E*dR#4jtozv7OIM_*UNpE@$A$K-{aLL1VGPmCjaIWGC}dWleE9a8 zmYm2>iKdf_029}v7``N*sB$+3APZ6qxwPaizUSR}9d;?wEgYqNFPNK*Y}TpK`*y>q z^80rh=rQcdB#%jdGGhp)N9PHRDo-Pi&qADO3~ zR?zD^>{p+;q~}dB2j8u2Bfg4U zty{KczV1dt%|KUy6r#Xk={%?V5my?Z!n#~dcB&TfS7_=c5k}iF(4vbKR0U8OQ~}t> zH{Z3$&hi!A?8}tY_>B-7D<##5^AKEhDD{~aWj828>E}@PvPkn77)dL%Z1kNBJ6W0r zgA4|nCiVQSQQB8;jYXpdR5i60479s~PtBEj`w;he1Kdofh)E3E$d&WSSJMurJxo*u z6i7{YR7S2v;YRbHMeM9F-oNc3M27(jeG_r>XWpb>sZXUvP~1SWgbJF5ROM28zK13o zlhefi`F$lQZtn_7g?HJ4v8;+xbFoI0(h64`habt=tgTZL(5N#b|GU14nO0UEQ#oo2 zb<5W+kZZ6~s`DM^i3J^W9@T=bhV{B9id@>v3#X6EU$B!A2f+c5JNRJ5mSu7_82L7J zV2Ce0GMdr^tAPJ-cT8Jh5`X3Ju`;D&ca-o=mN2-W0~a5X6$d{;3ihhZ+l|72RNy=q z{WEZ8CM3YxJ)cOoi3k_lqNP??f~*_TOEwQf^&ilm6Neo`5PD+p68l{;L)nazb^oZEZW6x1QOS8_) zWp3%avS`oyC~&6X{xhw+ zb7CdEE;oeGcVtWe5!@hxMwx09!NEj8>I_p)@m)lFr^KIDzbhpijNT(b-WBCSSo2LX zXx*b$7?)5Qn}SH)Y{S35x^9bx_u#6VKbm}IBofP3VZi8y7XF2gnxD2)ZW3wg@~gJz zeh0eZPFGk^Ix7KHb}5^wxu8cXMf0*rMHYByVV*~iNaLe-rEv}jSjHb!(rSph_^0i- zzf$5HWXNTnQ$nlF1FeTyATwEgAqA8JyijQoTTxArKDLkaZ67U>;RD3hAXx>9RdIf@zBM_sF{09$we(XD1R zgNe7mvm~C?E3h3yq{P^^G>O@9c&07MAOJftsK7?2Evjf5MEL@S``}o)?y^nSg9>chq z*~5VFawc*dZmijl*gR^mthv9hGy!|mt%Z8gu2W@E=}Rb<`B>)cd|&2av2pUgtCEat z-W+7}9McgojF^j``4#WV%>Gj0!M^Wk@nKDisa4Km47orx zFKNaxEBrZRC9i+*I>tvV2EeU8>@VzaavPT{Fi#_ITm#7kXXRq^dM`Gy&m7fN(np}M zHww=Ac*O0o$jyt_E*(BX<_#Jw<9f7~$wPXeoVYbABQXP%HD15&1%dGnQ=-J)Y4H|I zG{ab*#f`rTz*Ro%V>c5em4{vH)}l|0Fx zVmFzPN7ab4=}DA%3Nj63Gk3lq z3lG53N-q9L>~r_MCi5z=Sl&;=P|}ZdoDV;29{e%K0;C2)+Ye5Iyibq^8u!EYSV@Ta zb6+eiHMht|+!^I#)xIgQRKYo1aiBHRl&CLj2Rb3E?t`|aPV&H%;?9nl0ACu|E(5OO zrs#h15ZtZ%n#M?u@SF=}ySp;lfin?Q>|@)(Ssh5cC^I}pW% ziPT;iMph@blm|Kul^!V3Xl6^6du(%LWZSNij9p#4 z6L>!axKf@9#HC`FM<)z7km#B&R>{t2rq=b&IeAoiA@$J zZ2j0?vL&X!Onjib4DH-RYSoUD+I17eQOCAQLMQg=CJRPA0AxXkF{i|LsWbyAz`;rn zixl`Xh!lme)bgJCZ)J~dKm_Q+oHuxFzvrOuI3cG^jFs*3yulhRz{Giryb?Qn#{R%hXA4FtVhg?N}P zyAR^QOD*dF0UKnZAS8=PWza4MwA%r;*$!+a4<0Y0TVW$bWR}CiQ)EioYqE0pmok0d zD>8FGYMYXGzlSh%`3;%98~(kLkn&7%Rfm?s0?;oNf^Gi(n=&{1C9yS~Ds62;Wl)Pr zn071Tlf^@4JBX%478kCgU8f_I@*lI*7$4lo1QzUB|BAAn5Eiub&rw^fmof6Nb zCM(IPkq@;B4;otDMF7%-AnNiVo`^cqQUSM{)YJTyMpAU4i}HpEBhaxw?sz0M~YMZsUSu7@;>GI07bKzWy_?7a3GN%z9FWAY(aI@*sihCBLb?)Hd*=) zFOY}!-j*dOB$~bNB}q8|bC0w3n+;OV1t}Njzah2`sZbUprDx+Q zSbu`0no*r#ZX*an6gs2Z%4K%yWzLdXJj#<;Bp)e}binC}7eVM1Lio9{JexWy6N)qg z^S&AjZI%u1Dgz@QkY0@kVzCXV#j1wdOJqdiDM_63JpNuJgCp*j*!J;KFg;vyC)Lug zPNadOQH&3Bg@i*Wl=W5UgBDL%Gy|(uQ(7=w@D&bfEE0|O9yL}qf~nQ&M=%Tuwu<&O z$QKx+V$n^qln0aQ6wm2n3S7Gf8618vz>y8CHOR(`8QG@WM$NW-Ob=NT(@#1!87ECc zhls6Vip;}W^@k3AAd3*MnG5@T9_{l5)M|72LpA1RCaP{Fu~I;^RlsG~fQPU#MU1qm zGX-jd*uv(bgUKK$?x&hG|W}_S#cq1>#`qqI$#Xz<{yY9epBvP(TIc z6C~Od4lcli8cqjETT7T{a$U(u2$j`9*rxc-lGr;zhPN6fj>aHa1DkEOgg0F&gBLuk zk)IWZV44;_BaQ2)VhBkxGqS&|9XJ7Ba=|tR@W3--x=7miPR0WDQZA|pQ+;ZY>@Fga zHepqgJ?hKSyHBLr#>}Ett*bIr^d>OTrAHqVvE_1MW$e}@xRQ%NUGdlhA0nr}hMK*r2t-T0W2~bGE}m zg)zI};M=ln|1}xBe7892+T$cNxo2-#H3GW`j={I$xJ{#pFM>^wFu)5qogThQrxO@y z0gPaBc%VB(@BlOfY)n)R1cRed-9(`wS*g~J`nFW1A^A<6T7?DnV#V0l3Ds!%#Fksl zN@rXfn66Z2IhAUynno+(eO^9+3ULtI5evYjC8D>va4#bAuyt}FK#(+Wr1WdjPNhz( z-fnpi0qlikAHXtsOQ!C*F4J})yHNg~Wm~dDU8$+*`UnzILmI#vaYuU2!SO>dQtn%R zQ0ju7^)T)82X&A&QT-9b@Y6H{G*zSX5b1|F6iLh<{nJTgnsdgOsr-{y?X+?#&($mespHle+!4 zO1;nt(xl!bFiLlsKfW)bT*#`&;R`i!4N(P+e2EkK#7n^rlD9$(9muLmR%TIxEKeUi z^?Z2jl%~h>w&L3sK)WVQflqv8gslLP*xHbPs+s8_eQczZk4HY5CpH&on^%LOvfqF6 z9{-WU$#9fA8Y-v&zEMO5Vm+C_%mD0>)}i+OVyin#;uc?&MF(#qXpJ;6JcOyJaGs6o z=2<9TgzJoKGQ*P&zp)Zp=}A}qtM+Kv(u((F{I+va*FHx=K-ii6yUEhg_dyHNo%Z0{ zRVvSwd)1Ks-%3g~Npq0i!cqumYBg^1sWRO(F|v{xK-XaWIb>7^F-H_*E5~Lqpd)3? zsBW@$baxroVUlzY9fWP|r$~71S-Q1j|0xG#@t)hVeE+A2(Yyom7|gj4Vb}0^>F+QK7VM}3vIY`injuqp0HurdFGPPi+bv_0N@_Ji6`oI$aG#RiU-1aBMRcNY zG)#%&iTD86>hZm0@$gR4+&&Y#=S-H`eIAl!1=k^0VL2*|05Thq=JZp`%cD9(9wqAH zy&p(Y&I=L|u^1qjCP{sI%luIz@g}W9<>%6zu;`UY*tf8y{2xOkA}@=6=r(-1#NnmU zTf{x#-K0p`)Y=l7gO*HR+PRen-6{{!>2G;HdX33>L)!=C+CAF<3T^1 z2-7$i`A(;Jqf}H{owZns1b~Z-?xD-sxHl{Z5+fUstW;4mM)r_L^S59dQBX^F`K=@r z^et^@&6Yrf8>8k~HmoGNQjJ6kFz+~UcP>`f)p;mtluYg29p3m9Fykb7V9~>};lO7) z`6Pmq)G1Wz@XtC60lGQG*W{iSt1-~&64kLY2r>pAF~WvQ2^fMm3T~GRrA!(sP?1<_ zjZ)!I7Pb6jga%^w2&NWH?r^6*$mX z54Z(>Y8&LCnLvP@31_aQJje0g=DZ7`p+9*%QrFD#*{HtKW7|lbsRQF+ecg)=CQ0KK zDm+@fL`#QS4~QLd zl0IU)f$6f=@s8|#>UVLR_*OQY`HL($atn}nQ)ZOE3ShquB3zdhd)||2+0SBMb)H3Kwbtl>a2&~vtfKs8PaN!bgGTi7c}jNDTfhXx-GK-ZdD^n zf?^d+soXjR>r1=z&BDFYWN6DCGJWtk2zPt|5gUpjNev0(f{Cftjdn<1{(lt&xfENu zB*7N!@aEVMk0(?%lyObF7mqbq71s;Vqb@S2?P%%K9Q)GaEg?Xrt-)LwHRq&ke)LPp zIrp=qo%vceKlYidJ^cw>2zU>(_P!$FsR!SX>APQ&^@qQZ?lX4b>B+!#lB^umL$-_> zB&Eo)?1GR$_6meAf?7}oRU_*=C>|+Eeb99FnV9^e%KDY@3a!zF=h~7Hs7O)}TT*GD z+yf~G!Gqmf4xql~#WRn|D;H1W6KpQ5<;PjI$^i=nNNdUG(LP?N&nA2zQ2vAt;+%xg z%f$Nf(C9(3eAKICqd4-1qXo_Gw5p!D+Xuti!46g6ku~Q(mCfhB zmF<^)kYz`)1rJlH`-l?MUm&%b3Zs45u8+jldo2{sIB6D^Bsrs?IL39C64=%|Nu_k6 zx`>L528H$#+5<->2n|tHMQ8<6ZuaP2a=dUGl{a(;9pHfOP(xuSX{d{IJ|Rv}P43a% z1x%iji`mq$yUFR=pBvZKh_oXCkyZf9BHTSKLYz~=W%0<-NEzKL4FURkkknn0e6kWc zat6$Ajj;RaRm7vZ)G(CR3lL==Kb@=7CQI*#-jdKK0l~+Pl0mRC^8j+8CY(J~Fon6G zP~8|f)3nUedSR&g5GKXVEu>KnED-192qc)=Njk`$JRnBKwHg2=l4#h-mMUTOS4-5g zlj3;nC)xJgN3!9`_hi|{&t>@&Ux;Jv+3%&nqW$m6+;W&Kd*4Ko<~phs-;xIp-I7V0 zu4n+JS?F--);viHVPzFz7JNvP<&#QV$3v^-@rYG18f-SMfnU0XQom$l3;`8GeNrjp zbi;6kn6BtBd`XI{Iz=8!eYaNfIw#~LX<=g}U!WQ{m*;Nqs#@gdNVuy!_ZrXb=TQVR z4n>^WDUBo>cuRdCK}NMg4wyDfofMhwx-6>>AX%~>!-wlzrb2MeJ`@cdxFM4kokIw2 zx^$~EK*n`V!Zde53Q zm4uHep*IVMkCfy=L!j%Uq)pv%KyfnuPnEW#3S>q8CzAK_UuEN|8?yNl#NXKuW$A?< zWbwK0W##Gb@W>N$xk+mX!mQowVDf*<%P$fB{2NF$}2+7QS1XLtcPrX;bIYy7xg&QaeUj(wr+4OR zxtNibuV20(w|V}&Ur;LDBD}DUeXx?(j_)Cx;`&PO7I6|8dLNd~Pn9`qpF)!U4U|`0 zMddT3O~u<5>1HDQlzb2r&B12ijc3CW8!m$)Cn5{eL$<|q2i1TZ1a6_xs*#R=VopF) zg04$8%O>F}ZHenGTjTM;fG%;;v*BPE{xgtF5HyUd_yg-jVKf0sju>i?WIu!*j{#hl|<)(nng|86F#1B&l zn%xa;Y{1a2vK+F7X>Ki0kw(viaP1vhmC}vK~5Z_1TYQ z^{Lyk`Qn$d>hYgs<*6TK>FMv~p>sdVrqf@cb_b@^JV^FBQ(#z4f(YGq;4A4AlLtkP z$P&WN3kP(Obuh+YKtYsmO>8Y&63{artXAxw(h+-G;Cyv?S)(`WmzRDTqT&y!5I-R` zcu)ID=EzKf-!^|lti*KgCk|S_p+lEEDl7MVC@g!K zjDTcj0;)~g{tfg0TlghQy^HxWe3gO2dg zc=i)bMWvk#teE5MbaP^{oCkL<9yvy)_Z>m^EN=PXZ$wVvgdViJ^8() zo&FqD`39E!=d$YP_pTw zyQ-6n0SMY9cL+^C$v94kO5O3HC0A8q^Kp*5jKHz+2-L!ne}8G)<%jpl9-edOA{1EW z!w)P3C7$(DrWXRpqc`QqOF}RypP2< z-;`zh;Dqk{P*O@**m_k`fXq@qb;D-U;zqh<&Cb6_|iY_ad^COJ~nV%UtbK`fnQhK!z0(E_W=_*m=?2 z#DfF1f5Nv$4Ux6O`bwXB;7Hewl3KOkGQg(^X`d>SSDln~kNp#*|F<~SJ^q#0*Ps1b zHk|tge*vfV^^gBm)}H)M9BVFoDPhYld?qU{eTi!NFJx}XO?eQEun<`#$1M2ab*8R) z9*Si)41)*c{#Fyj&9Vr{S}y{^ZkVYi%+BH=HPgV$-2MpTHL8^UgG+NNJkoOqNN7tj z(gAT$a(ig!vBWDhANG*_{%uQ?t8%LK{JeQc%PBRQLNaSj)Ub1;0ia)}D7AU{N#7x$N9 zud&|ZsAui?TQbCLJ31ffZIKJHEZ7!)}ObH&eRV zhat0&Aj78Y!qT)`S_!+ zdqI3B$Qd-`L~=Z0$M{}wi2KUaKI7y*tmz1YTNG-WgPOot=`$izb{u_Ec0TvDEI#=! zdGG`xbgR#N5BUKbz_ISE{(LQt_3)D#Er%3YeCAVGi2Tv)yj!vW%W)R53=yWwyhHCu zpD|?+O_QZx{hkuvGa8};wXYCsOy_7eM*|OT_A{4qgwjL91S;t?%4srsdNaMhQk61< zG~@^#(*|-Vjl2xEWTMy#6&HwGVvn{tqx#A*-!>E3w{wBwd)HpGcA+HWJoU%{F$>xQ z5`(+*7?dCL{DH&>A;T5UiK_O|yXUbi5|$S<7u!+Ua+f<_z@3UnJNLaL8wS3s$h}+g zrwuV_&43&T{TLgSko3pBRX%JO^31VAdX{B$fsgoUN)#Ic_tTwV%+8w}^V8S>-bw!c z6S%fhuzYgsh7p`06j{VAg^v-X+#W$2v+v)$q}n$X52vj*xU)az%g~J=%#Hzn{pKs# zvucjEYYZ_JqU@6WWPa6e9v z?c{aX+ECi(KbJM9VeOsyR&oi0m zVU@cg2B8fL#w)*}$GxrohbXJzTX?7OeI3=_c250?0t;m|+<69fDhh0`UGjf(kDDO? z6Y3QNkQG9f-o0XW;1h=-`>{Cy-%tapbn{KKoxzcewX%ntX*=;p3Q||^nY|#WBF$P~ zsvQF!DlKmIVODHYE0?dFZM3hQP@zgSi|P3c_tgymM|HIQ0#K&4D;}124>CAJoa}aSzCRtdndE46}*tII=arj*Luqm*bSMT{+hCX-(EIdxa5h{Ifa4%Uq=01da5ZO}u7E`89 zvQcWBK^Vyp;%X`9659ognR}Rd&44TBNJ|2z?m)e?qk!Rvf+)fWKx?#pQe)YiP+yi# z7$np0>nL3tkChG)Bg{fGIGoKMD3MhqKT6&czf0z0f0fL0*mUdC$FlCyN3#COj}f8; zd^|?E0ZmQTT>L^79e+k zpMR=49QDHpTtjRiL*o_Z0YL`+aQAQWeFl@)z+va21cigXGn88oeRs##0SS`5Y&C4p z>QuESxw$2E9Gy-Y{${pgTUL)6p;&j*wR5ur#C5=c zg=>udFf`^UR=br)=?ZfMgs?&gG08%PBlGcC)5_$_%9uW~BD%K>>M&F~H{$9fhC*V+ z7P(AfS3M`&F8yy=eeze?a{5Qve(o29M81+8kN-v1U-&}Soc$D`k*|%igem*2M65cC z^{a;wCoM)PCB`;=-^+;Hyeg|IzLjQC`3TTWLcz&2Sv<78Y>pp*fk2aoD#YUvMZ}C6 zyi&jC@+TPPUNu<>^Zx+uLL?9f?i85)kLB+$;I?sB4rMlVm)uNcQVECd!&W$zAHutI z7$2)tYqJWtp%IPNyPN&045nYL+sXY$_&oNlt@72n&=dG-9Z!==)UbgkO2K-dB?Hz~ zpRk=Q#3zb*-bTOD^!x2A&r89q;nw|^xLYD%V*o-+lx^uVp(P9A)NiG^Nf4?YwDHI| znipZ&8ZbVEm|dPig`yxZKi-5+1{|Rk8y4X!iVtJ2v0L&a=I5Z^P1nw}P!pWb!CB;O z1fl^d;a4(0R`RFbtD0HQ+751CVZEhzZnPS(Z0*1nZ12yX5c$lidkviV_dd;7|B)(9yU==7=(gsHu>+UFD5OKt95wh2cF$SGtN z%0);y;usvBh?U$P9OYtt%cTBDXrlt2Q193)Qx+oZzJQe$Fn*^4?kT%JLP64PpdDFN zMSDalB10)Kofo61Bq{R+36J1%hXk3?qmQh_nolp>VHYxB9w=wVhR!K7kcm#Juf`+A zKgIxr7foykzCbd=o(UT{i;=n<#^=0a5!Nn5l-l7$2~U%a6S^VI(OnXIj6*qiKWSKN z61-%DsIdaB%^)|HpWl=n7yl-VV?Bg)>-w{Ql{JrlE89-~L$;pyJEXz)vf=E{;-z{I zCF<9o{SJX^tVN~SpNcU?Os{xFW*@pLi`?%c%Dzh4p#5%jrXe+kx}n4l;z7XEjSjj2 zcvadwFtW=FhS&NSHIg-Q?c=!3RVM<0jy#q#WrG%>HN!mcK|F4=OPHIIk1Bw!!67A+ zC=6|cr?OQDxArJV9<9JNP`v8@wB0pi39H?&pTR4{{l*lo>0UCL0S&i}F+znNpE;*N zC#CX!?ChaBDvXSJ)U{0t0sCD`r^xA&T%lpCFfg5>J#89b{9P-WY^O`T=A511VaY|T z0@WOCq?|Kto_ZX`1m>ydv9F1GT^fGUb0PUt@c}rPhA*ExY4EF2epJFB66^oasO>Rt zx)kWSSD!dzwYC$;H1|DusN6b7x#QOR-o!>X=B%pYJ z-oiFIvcK`X#<;ZR!56@0f!f^Ayb(^^;!0?bBFqNjn-Ym#1-gqfv7ZcSogf{;kk><$ zf71LXup8KWDEGgCz$`3L$K0}8_(5{TU^4~YYw~Usd;!K&a$lDE_sqwGaT3?ACl<X&e#5(H zNSh%NKmXAilC<~|VplVyJ8~^!B4jM9)1+;w!3Luqe-d%4eqW$=bLl4u?3Ym$2hb(M;sZNoq zdeFKrfY0-L3N6e&lC_}=k3RVIFqg?l+7JH!|qs2T@Wa{jq`VXv|JGl{l zkQ!=|KdzS)pia8-12ns!UdyL6LH#Q>twfA^SyVI@D-M!Ajia%Ge3*n|E48}zBx!;& z%r%9`)nE8Ovf=pOPzZ76D@1mmgm_td{tLu?k>Yi%Jo~M<3B$(gaa4)PwTM1Zq0U33 zcL57~P;HU22U~|Tg>>+y^dIKY0S=8AEYrJBlHAEyiK%V}yH16wJRMM^x;7(F&aZaq zUD1gzV06IFz8y9AR2865$4K^&m5gV~z$&)@d>BcjT)lP&I3d*No!kLV25~F3t6jfL zf~EmFoG1Gl2Bm+DfmFR$Ki~jb-Q_-hE736Wo>j>NB8=wXPx_g21gG9-XL_h8c_aaf zdxHU*ujhit%UlMtD!IH??m>J4OoJ!yfF#Zp%^7Wtgge**E)W5CKoaKykURzF04lGo z)H;E%+INTca(1Xa*q)Gnwi-IEZELJ-55^OO4F#{G0cF z!j8kBg=q27KFkLA!kLg_U0B{kU;>e=rK889{JgJ(!vkf=cHpEvvUNAuH-)Lp6t1{h z$Q8tMp(l4Smm8whf=J%aVTn*G;#zg?>9PUrnkZvi3`Fp2lDLxYQI^d`hLUdv0NYSq zLU-^;$*Z#pD58fh^wr@V(+|ops;3l;=`Mw+fG(cgTs){AbR^c1RnY@vb<98+(sH77 zuQvuojdQeY#@2YMBrSSWww(D)(w{(HWzESSP+N_<3diR2p8&sBzgJo29#+mKZdYe8Fod3mp&U7K`Qp}UyRUQa{e`}`AC6}9xF+0`(tTP zENbKtr=oxEil^^d1&|yH1P1_#3O~!oZEeu=rCIK)+2xnS_APO}%x zxKC4~X8%$PaJcu=%5;q_Z(~Q$r)mI6&b_5$q&mYz3*%Mn} zI|*l3@mjQe9{L_0W$sMD#ZHB8CUyi1NODtc8s7k`k=mp_(GPog&W z(oeDqU~z0b`7;3aIMSMHVTn3cKJn@QXYIYitSryA-?bQE7={rLQItNt(5nrRUZ;1; z%+LmA7#O+=3N8kwSB4IPibxl+MiWh9qEQnQdyO?QCU4%9_iOw3_ObVI?caGnYi0m7 z$@_l$4;Ifnt3LO0o!50<^#*yDKJtiXSR1A`KK`{WJ&w1?NSgw%)Hb`SeE;V*x%eW@ zu3e^C$bzIeE5Gx0mIs#La+0cOlHceA)APrrL|o*;EpUZ&ScUvYX8;d4dg}P7I}-A) zaw1*2MUJGbT>~jz#ez@OZT0-cPI{X*!MkevJ?M@{C%+4EsyY0A#ECjO%Ld{w6yHJ; z=T5hoN1tBonXT`7U58A{jCrs7J)50*vag(mcdp&!`Cj|cvsR<>o}JY!s_%(IZBAp5 zz+nI+jDCHug3=v34(bKYBWv9?7aFyjhn-H~&$WkuexwQpckcfHfNs>L7Z~%3L|{sP zBn;cJ6=a(g{2oxc@Q_ni9iaTdBf+g2eVUl*@b+{4P^>)A2&fEU2WSa2)AtcxLkB_~ zPS~{JGc78D$&AQ;;?28g|9jnvsl!X55-pYdOd3`&16CHu!O$_D2AkNP?+lk4l}}73 zlR*uOAAZ%6CN;Vbnh-I{vXY=}Y0M2E6jOuvs^tM_5(aTL&*=zHWwe{XhH24+bV+uG zY@XlO?n%4R7EhUHvxiNvz`)LvEu>S|6zkkA&Em5T+LnhgbQ>;Glq9ZMb^+_QN_MWq z;q%m=0VKhiz-pb_K(Rq!9dvW2h-g5zuak~s_%u2Ko%1FcPgIb?(&dex+l@EZSZ}}P zs@!2Kn7X-c`Ut!$!a0h1@1puEuuA}S7g421jpG+i%Q*wD0<+!n7592zJHK> zI_)ie2WhQIO>{oLr?Y~PYj6I}Ov&m?p-;???;USDMn+$``T=Oiup)poXwlxheE096gYe1P;H+-!^ z&E~G6C|nkHG5u!Q2YzA&4BQ((_kbg`qr=BoYC@Xr!vDG-i&=|vS%Xdge?8<%uXKoi zwSZhD>*WZoTnB#xXs%bzwhBtzvuyTgTfxML#J=;af7jdL+Z4v)$A-rg*wTBSw!5GC zy=|sgfAxiLtoStS^xW50&he_pX^0V@EhfDhD0k@QDIkt9-uNhB7rLFB*-6&7^we)j zGLvZx9CspFT zPLV5j&M!_|i7a3%2jKt{gFL(?=y3X8dG09&SaOPOQyYVy@%*F5Wi%C|M~JJdP@bJy zmd>@8uDJAK%va~ynQx~v_4ku4=}#$O8x?q* z-?qzrgEA=Il^)r=TmsBHU0T_h*T)Yu1YdWw{R$N!^ImsoePQsu7g}pDxxDugJ-Ews zsC7pty>rr3)k;y;DQ{YV=yl(jagFW3$t#~Z%2rKIuxr`JyN93hondQiY2$CK=-6A9 z+46HYq$;4n5W580;4~0*=PRv(MV5i4oxR2#<&jto%NOfBtf_Iwq1&@?8^_u7_zb%r zzjr%7qLJHINA=+&5&@L^Kzm0=9*?e93w8aSan`q)UY{0<>*~_!aVKQ71G@iOATc}NTO|~Ct%Ld92*&WyY-@QBcc<@mL4-Kan4TLaPkwopD64)?Cx41 z8W558uja2Zfw+u1V^>R2p|FrwE!d9fUh+=M&U|LF_k~9Z-Kt+taqHICESq@Qf@8n5 zJBz3o>6~VfY#DX)&>6O!qNscLv6XNS*W)3CQlbxY*2Q|fx&x+yXkccPBgc(|1r}05 z>GG*E+x|VvQ%O?Act)Ij<<8(;7tsQ&1dWuB@TBP11T~<|ysIwf7B?~8JMXlkW5Oc2GH+6*qdcC`Z?|iLlioEZW^t=1&`vr*f&OP(cA%#)C z8?%D3?-aRM@3jh}bYRxWyT7$K&1zCu2Zxd~4Q=b-a-TZaTFrxptE(+BPy8Ps_lKt+ z3jVH#?%xpnh7Mo61GycU7*$<+zeN5(@E(9%r(t}m*>cv{uXSq3yVXPQiFWilN7;p{ z+>yiaDfg^{aJ}gCZW>?$_cNm{taSQhn;$!rxTu<)=i2as2dwl6EoF3-=CndAgFYZ( zB%rETk~j3lP2BV_EFf#Zft$S<1Txi7VX|QwHZphRX-b6WSY)?xHaRBUcF?MLA1b90 zxvr<82b+vo%R&e01Y}1}>#<=W^%$dC+~fP8p*!T)?1YPl+?xuC$Qo#cx87T8z4f z__eNEx@a-O5;gcsmsm((cfc6jcRy43uN}tjtEA7ki2Io>L=OPgq>^9z+7zHJ}Mc7*$z3Z`|` zL->_?u1%-OO25p1iAqMfGTuGW^?7I)J8|6l?4cHRe=>toq2o($o@;kphac_FuxtA)xBNQF9riK6i-8~o z3iPFKfJwF%Xw=kNw>?pZvzwo%z%@0rhfFy#`QYrST0_ z@!0G#Is*D8;$sRNOUViJ3mJWoi&-u{NUK}b&zQYIXMjJ=W(-KOB{$Os#9CD`v}mKK~8xY1(rNjpw=M|sxrj?=vB@v`;{qaukCY{6|NQ!1?8y)b(#p_9yIH7 zZpO*G*M5WuidK79reE+1o5NhhL2O-_0r~`QU904#dSc3?Y7-lcKT6e=$6GZ|Yc)8D@D^}4v<6sk;;RN(6`K1cJzAv?B>9Sa}> z`jG!RB^UhMHHApUskTv-kV=qy_ej9^K&;G^dnI+C>@G;)&V}2(C|DcR{q;E$-TiZ~ z^fq+F)GM;7$c7ZQ=Y;QHoqGk;+uUqt=+8L#*UUl;D}hb-?Xwxt#14)rF{w5dBCXn| z@l*HN$_GBSg)P4(iu4BQ61vAhfJ3^Q&FArQ4G61nbA;RB?yNgV{{@{r%m)B2V(JUF zKFJvkjqNdkCZP-*Z;BuLrQ4(>hi(0t|DgN!zgyWO zH1|FFjcuUaZ`0!xIzhOFb-ZjI#M=Ywd1w^$uaTE6HeSR)aCzE-zF4`Yv2Hl@g^kWT zP6;F~0CZweVuEd)awj>XK32zAAL=rPejo0?mxKp#@9ozosaJ1@i(gT#dOo-WhC zQz7}WN_dvNRJi>KH=37k*n$E8&|DXsEf!j(_1uJ+zZuuEa~7F2*y6-eoB;T1AFF zVk?vM@14oEy}eQ`l5Nv`-I(FA_9vwE-y_6Cu`G-*7l{#6bgUtkZib}}{Njv~ql#=H zDN7UD1f4pa56{{AiY+?K;5GmwJ5#jtC8Rjd`ggj8@qEd4A5wk~Hl-f0H1PXQ=+?Tp z<2yPE)aXH>Lizy)THnBYhDl(KYB^I64^<4Pg5H{(iMQL7$T%hmr`P~Llkuq8zactc znN82zeb4=#Ss$NS!5LCQPyX3TsTXX+!rI5avNGtg^Ij{|^zN|YmzmUS+=RKXT-3w@ z2*KL=Ppn7cJ+yewwm~7uww|#u_e>vcwE((?t^`8LL+v^JZYSkehn4<;zZ!&!Cy+8E zN4Bi=!bg7ju!>K5-C{Cv58Pd9>Ky%E$oN$qBh~5DvD=1Ec@yUub-?C(UPYdT9H+X~ zWOO~?$yXE)^*%vuT3!}%k9^BY?uGvs?13f&;JyCa(CN6cqj#_LSe%O(IV0wikLrO) z-ueF_i2MSKK<%xVOpw@SyZ7h-<#?oD6@p63cY`pU^SVB7FGsCR zJMVl$zt@?dfGmEXim5o=Hch$NR^L1lQJIHO&a}{x+pM_pV}{MKcTx~OJB24_b-D^o zs_GL&a+pDrORb+aGtA<+15z%Adnbb_Mrjkq ztRXH^r}&km@?qUt;tTx^a51P_;F3kEVeWSA%vf2gXzN>>O7;g@dOujJNF89MlW%1o zl;Jig{7$=}GtG50kNSLt7C)aNhC|Hs_~B<(`ow!y`h)kZ^ZG9ahNj>kuiM$i3YU_2k-CV> z_s)}*6xbZY`Y*i4oP}o*vB5Sh)*8vSWUh1dsmahkyz*f#f*J>SGIv)SFTe{IF#Pnxf&(+ zs*Ygs`zS+VvbKD=k-_Yblr~NJKy-}kAm+!in7?H zcXrb|U#Hqxic{|ttB@D)GP8La^KZp9-`=Jg@CGXNp6*AttYGuRC+*YVMw9xzQWJXb z*I#|%yn`3<680>cYyVU4*ezw@zOO@V^pH8$oQTTIYpfzI+{&iRu&jjPP(G^mXr>-h ze43f2AE6DHS&I|eZhL#^NLoZ2TgVva;nFQehp2WThv^oJ82Ok>8F3aZq1jmOESYFW zY!%({B361InN*EVW%NuF+xR4CBFGerV$Q`qbJ;&}Mzl4^|I-)^>5)B>kwZ##{a8m{ zf=frv=Z54CRyzXW=oZ*-cq8Lon<@9$GIumd*(4iJq<3hKnUGrnR z_tM|(?hF4;nE4Wgl^dRT-$GVD_L-GkBsqjPTY{?S;I&SV)JT0W@4_ombT+)VthUaG z<;ua8g4F+MXwn78-?!USnH9&Dbcvlt+uX=>W(5wRuw)RLt`D;V>5qh_@6-jT4&kUS z%9Sb{beE^?Td17kS)~KI$X(yXR9*SI%_!MLcaC&K9Rim&Na6c!oP6#ggJOrT`5RMJp04x)E3gBCvNOGp1TgZ^AGU^YyjVfoO zAgWWt(@9Vy+Qu1i2pQW{kbwKE)_~xZG&)C)8uwPZzHaVN=UUa#ebvauNllD{t(_Hz zcn!DwF=;mGdii-X*z$(Sm;MwRIDV& z6>^oFk*e2At`P@p%VNkjNs^p>LYgx7uw~hy_pN{ICcbcv-P$YB7LA#2fs}y+dHLO{ zNT(&7S`<-&YOdm_E@iha>Y%$Q$=5%SB_%UlwU1;8!+nJ;DTnQr23dkS%75@ki=H^9 za}|=2eKkD%FDFJnIB_)ilBZyTPK?g$i9oe}Z8a0&D%y|Sxl``h8sfa+HROluc-c0@ zJdiqwNOrPCcOS!rr`Ygmd*Jsh1~QTj*Vn{DM`@gDYLgxfYFx|`E=JatB0=L9AGLx? zQoPNaCy$*CINeZAr<&BU@39;O-4{^Sn8Wa;MMvMD&G=pGb?e>Cm6~M(@QF7tV`(EZ zmg;DBsG9z>n>O$vXzD^6+yk)UXV7Jn( zr|2Sl_I=y(G#uvQZ*1Mu@7cQ3-{5Rh>9h63-;ft(=}@hLlsFl3^5Tx5VQH=9;otSW{s-+w3@tW6EV;rd|4a7h2k;muMj6jv^~gJGj^?J3_*D@h&xg zIU6;zV&88pl@Y+*6U(f)@>N?(IpH$;QnNLev0cR|3*!lihU+fchl<)y6qeeFReRsE z8)xiv!^iqDR&Xsj(Ty{PSv3MuLxp39ko2zOLK~7%_{7OIV6tS+Xj?vgm`xna?lwIq zSeFpFl5?4nwb2Uh|Fzxw^q*`abhiA7H*NC|-e=t1hs7OhNlmAloKlL6 zRJibq3&bb}>ui;4aFKOVW>oT`V`WEWp(G;tc$ztcpVu7t%wp3HSkF$=tas-bwro6` ztxO+>D?DHN5S8bzq4J>?-2NjeiNZW}NJ*P{YIWMA8i2Smv#Sl&KU6Lc2w{%D>}wa5 z&Pry;jS{Om+ql!QrJYWQnhU18PHRs)iA_1tx!{ybyTZ9j^*o?wDPLZ_8K2ey=lLG8}L<7Fjq^BNlu-`bN!Oe9)^^jMl`9zD>?Nsnw>>Zr&(AwHHP`@ zA5mQWj&+USX#MUlVXa25X>Ef%<9a)<(^4(4`#Jy}Lq%5p(*7+{t4{ zdT*5$$*&_B%^DHp|CFe@)vxtriP+J;S{@G7@bI?IxeU8=9y-h6lk=yM0ZKOLZx@R8 zJ#nPP6Id6ksL-2t>&-`W6i_Y+9TE>1>MS)jT( zOmBqBteHC5@<$}O%(Hm@M5bpHw|wFfPuY72nlVmsfwWzoWN-<~A1)=a5Z#%9wajPx zrezgBvo0~T6?L9vcV_Oll?vDG@irfES?Ps(t0LH*qRiD?7@PqOpIpGK^-_j*j%I_x z9uSybos(?^n**&Q3|Pz1j(VB}_DWO_NqnDoLc5DAcMLXAr>d()HQecSTp+7a#Z^)= zMv$(CyI-HmEn`)L@m=#G(Xd09do$GvM~}9?Osekfr_Kb|#@BtZ%~*TNc3nVDnP#{h z#$Qf=uI$w3v<&{q)-bwm{dw4%Os^|DDY^J5FvThG{#4A)GskigC{b~BqhER*z`fT# zPW<7qPbpvdl-Z+S*|KB5#n!xOc}FzSkvSjOjAh4}!CCSGlkXPOD>a^>?sKSsjd4?? zC4Du-83VP{%>(CVg(-`nt9t?8*`K9Jep=z4bh9JHOymlP(>E5Wq8@%S8X+Wqh#|( z9y6S0qVLj=e`xbk585@?GW@z{hK;^$yL&zdE+5c#M}cMN)PS~gcI6O`^@nLU_#C7- zpRN5C9QnDeZv4z{U3`IA6Vt6r*J-xs<{`EQgBxf9=dBJ_TAyd#MO6t_Dwn_y;{x^& z^9}4xCB)jKa%kCYiY20WK9U%3f*yAvnVZftU2)&%mRbM4Wk2$=%|G%ZTfXmSw&vKcm@oeTza`(|dc@nz zq*)YbkyWhJ)$X1wySKXd-Q=qS^_Y6@BeP+ep@vOd>Efv)8IJ!CrHaq_ z7o@6fR@h$|sCU|vtPd`eENOMsd<3df_-%Cpe3j1WM~7F;A4>o75Suk(p2c00#HCHQ zG1F_T{LqKCyiuuw*YFPsKHwL)G42wwz$zjQVVRuLU-Mhp4V+;Fg9ew_^*1cBi0kti zQc%`0`Q1s_QZyj;*hv`etTO11LxyEQ3nh7Z4A;|auQknI*tFtj@Byb=2;CYBCq^M= z<5^nPtwYS7b62?A>1Sa_$%jC_uCP)bQEjp;82)`vg&B8KHn1xtoZ|QhCc~o|=Em8= zv2$$dO{1)5mx&gkiOi6IQMXjtT@QX^JJ0<$%rUe3pTKokb2_Mvyo8+RKd5%jNt3I_ z@y6{juCq;=q{%3tjkxCtr1RAKxY-|}w?4F#qdx(SKSP>c#RY%OuJ6B@FHWODC*E>y znQOI>*&u#UMwQ(EKm!`-1@Ct1IxiO{h7^2DnDom3l!|&%@2C-Sf1{%VItp(lpQe2C zo3Fe?4D}OdUKJCQX;nN?=2nF}D&o*<_v>AI^?v81IH7ehjQ4b|Nzb}~o2Tq#Wdgf| znMy%JFL6&q)N$A3@ag{OK8?C@z6~HX>$@h!^0z!=E7=ZjVH1&a$f5S*Xx~6tau}gG zhMJPA6jnNFa3S5TW7nRso;?`$7`fVd-N-Jjee;}?B9B&+{pIfliX@vkoaxYherZ3a z5Y+`0TGsNJ&0qhbbqSr#sPpNTKQ6|~X5DN}$XX-unvdEqGaz3!P>Z=Fn}9;ti9QS5 zH;9$`{xki(m%gwN zO}JWd2Cw!EtPrE>h+dHLNf0-l|6C6oIeq8CBI^;~4r%PU`T~)-$3C~MPkd#?#~9p= z5zX26j?FvxV@o~yGb=mvuFcwXkzrX`2&A@L8fGhJ&VmIte{P#*Q%E@wL( zzc}IDy{kp@yY!rUr7UHOOsLb64#l;y#*U%=Mn})#K=8+M(5tsxh5S|>j;cX zZlnQrJJu$pCXXtjIpsQQB3^J0)~S3lSw*_1dtx>HBZ}FehA_rqc@vBxz|&mZN)>>% zc#t5-Xa=+c7sijM1zc?|jc{an`6fE17XSKNMb!dHi|%WjE*uKyYC#sZ!Yz zmz{IT?`%g~Gw2$-*(fC^>Fcu_cD4&i+c0$$TPKaRJEL$dt{FzJ>O5EIA3CtymfgdS zpilj~-FM+@Tm97AR)YV#{PA~fC1cfApZ_;o@u*j6D9Q1J#);G>GC={2BX$JM#n(DS z%5?%nY&!p`EoC_~Kx8(<(9<7y)l!eVVjFOPhs>yF9^G8)Ni9+#yL7CbJCVdMfJs4= zY6Xs}bddp$cIk#X{n4Z&r{)>O!t0!d4;s(!(06~+T6qE_-T9{8{hW^W>8M6Wo&f2{ z2~eYss`RX*f=H2gz65)>P+9>Y@ykfo$_Ls*+&gT|^jmBpJL!mqbY(O~{E~gP;@I1k z%QTA|25lAXeb@3Eux#4jvqDxfTp8zuN0F>;KQLe43`-ik!bV169|sq?g3{^tJZ{U` zicaAaNA(v|tlFV{oMjAelfisS(=?xTB?ct>{#UG9gaYp~EG>y~A-Ew;cq;X9{>vmt z*NCa-8uv(oYDKjIM7o)dz?$yTv(3U_eL7_GUivY6E*X_+DFg3hd)O(oU_tIfW?1Z` z9k$^xHB{&Sw{6BNU2~d&@i5j*`ZrG}bxh^+Z${xrI0EaT z?}62FULDC=k2v|u(N*j4T|1;HVlCFQ{QTFH#C%|dU@8NAX0d}sIuW6)2i~w16>qTz zP$}a?3W3wW!s)xxl0jUKaYSoTi|%E6RR4VRjYbG|R@v zuC{S8rFO%>0@{#f*)1gxv4IOyNb(54x(EtQ3vDHj>Spj~5kOH)fDdJG_=>&nSzgtv z*8N&42MK7-jZU=XcTBei>XqwYw9dRW=n7G=JV<9z+7WGCcG1sUfqtq^BmG6pyb*D0 zVlECng#>+eW>D_IUu$MeU?byEHlj-=>0s)hK$1Ts&n6TfwjCFL=h8;&PX6A?&VFhe z5VU~CrG}K8Cozo*T8q{yBN*aIi*!`@hI60T7MS`P>OxkX`^c8^#$sr`0v{T&T6TsB za-1u7dF(H|w<31RG<}IAp8bRMT)~Dug{+DOXk`QC^j18k!*5yYil>PwXIqqiyxlP% z4Q3F@)@ZO8)K)FdbRA@}UMjgdi;V%Q$!b?I^$K&Q=2xV{nXaH&^yojTx}E+9#Mu08 z-2be5gXocqOB~Y@pVm2a)8)eENZ~{72`61O;u2y@lv0wX+lA>1+s*8-`b?A_YO@YQ zF>g$=4eb`iVlTG%k^3y~IJD^C&n=LSehw_&LksuX&1qql;}^TnU@bEoMW~SvE4S)ixgefM{nhzUElGHVJnDia-tm6`BLJ6)!8ou;$ml zX4l{nCTfFHPw&fYJJ#2VU{@5qB?jn=L&La)@g@JN~|JUh3 z@qQP^?IN92e*P0%{uui!(EPTNF#mFeAJ)?W=imMugN=A?pcKO7(gMBYS*|67v6`*# zq^cJIz-*Q=i|J1J#J39%zi%UGV3iXwE^L_P4ok%!CuzqO$lTTIBI~7~sD%{~0weX@&x)X2cOkX9|<8!j(f{@*T)Tm`0M2b;?5nww<92F$kWIx}d_Utn1) zUb2M`W76q}2xO{*aUo=gcmXn_eU<{*P^pmh4}56Dkc)1}$Iu}~78n+@+`2^a&^3&? zY_oUU7V>O)L?QA?9Jy!~bSWryUV1SH0m|l-hS$j;F2R{xyysWed%!9dbe>JSX(Stp zrn*ALS|)TnqBVF**Vg3hT(#p9(4gLpM6H^DYJGAq+mm^{wStgFri|}MqaiRo(iSmR zXL`agjNEj)wiAOW3EV{`+)KFrL#w*<-)t>xd$sIUIrT6BnX14>rd*L3_zMqMH2N-r z$|SrD`6<81E{KnRVTGupQo18oo%x*`Tf3A>^jpgxwXGNbz>MdwY$bx^Brm+2VDIu1 zpRf%$?No549LC9~?Wa_aSYCd^o7S`EA}2(%nb=Uq(EO)MQ?V_{^n} z1?~HSyT7%btDybciguk8sJx zLU@8xVNRApa?ohnODPwSDwPl@WS62YeIqq2CfO!mKgNnCW?FqZ-E}m|J2&Rt4oRvM zJF4Ts--P9BlqXlmjHieSl&mr_+vti zFJX#K;cc;zTwv{`4=9D;?gutI5z@mt1wbW79c(GQ6k$@FbLB+}B`*D*J(s?=t&jc1 z%6GpGe`F3!{4xs=N?m#OGX%7aq-(ZJ&$T2g7gH>e+k`|h9w$fUjG1dCdp{*8ea^ZQ zsf}R6k%EMHyL;MH;vl5aG6}RvhmZ}1K%seR>HP0hg=bNTlnGxy`fk~Rs`G+xX(heb zDWqzN733!b}isDs?Il7Z5{5!oqbU8WdE+2HeL_UO!`s zEg3)Bx^@u>o@a>}b+(c6hioFC3*m}^e9hW(yeCZ(w*(OjUxtdb4s&Wdejz4$1qe`t-16segNK-xD#_sf? z)Upg_Hs8&5*ZfIr_B6vLFmtS{e~xtvVc(c;1$JlQ)3){L-`N&6SX=Yhd$yioC~MCB z3HtO$qUxgB8?b)a*Hu8E_}lU-&Qx6;nMklCIkr$2TEO9vXcvv3Da7_+3Of|qKNC8i zgsw_j4GuBD9@FQY)cX2#8cQDdjYW^C;3v^d(0c+K)913Hlm8;3Lslrz4Db@*WQ20QsDX@xt4%k_fkxfdP`y_uf9e-)z z>k!tmvyiaUpWC+Q|HGE;c!l!vLiTJXj!eYAfBYKTe}av%*mtfR<{oqb5X6Y350iFh z%s>HAtc8kZkqTOjqquO}YYdoPL2=Tp7TYtKX`Q4fW{*S&hp>|XYq2|nhXyT3eR3qm zlygn~HtlsO)<#GM_8~y3R4o>1Kb}xbk1dd zyMLI6`3xvW8M?UT7wn+u^U z^U1>w63mRHpppTnJ#a9UQw_*mNL>o;a;Y&iVD_^5?4GvBj?-T zu(8BMA!@YBT{q?~Ti^7qZF&4p-1DSmJk*Kv(9=Ic1?MXuxx zdOFd?M#brRmm`?#FRHPY7zW096^`a={w|@YZ1q_-Ub^%jmbv{!yWyrH>)WruhV?JO z-@t54+-A*>{L%Rp`ZOoQA*umss|Ar{yEsSh+@rs?bQf0y;dtEnh-wiV>`ckMz*=To zbl4c15}Rr}=Tjk&%=kHQDS*}>nANB=*@$`v-DLI?6JTo)(nIZ%<*3^g;@YM!e| zABo#QGZOMvFioz*RxiTpG~yY3iZjhm>BtH0VF{@d*S-1~wR++y9XUf);eMLV;rk=Z z-fc~ZvhX^BPql>0wh{oi5ASnaREFKqm2^tyRGXUf5P{{7Yz4k%u9DwUa8BBCIqIDY zVr8Nrs*5&zh3(%B9EwniUKLQa}utt))ea=YwyhaeGMTVI{7dRrZZcZCy5sfs!XtSpJ ze0oT7u7L)lEYjm_`GhP>9y|&9HQlaZ2YX-l>6SFV(zYQXJLuwKJ0`TF%ZR&p{RXt7 zGtmeY5-Wisn$M9})hMxDi>R)HVJeot;i<1}CE~kUjPu;z?XHXe!)vY*6oP z8xvDvG5uGtJM}D!oW9%YF8memEz_{q)%y; z!(01>g+z^#bDLq~u1m1&@p$pOkwz4#WC5vg@jLk+2XsQ^KKj9byfr-j~4 zne+Cvkv5+bK*5#W1C3!;jGOaCN`?S_i%GSxcum}ApRPFOX= zd+t8{x!r{iQu^p8^cE7hRhyIq%;`XtTsUvk$(vJ-y%nHUyiHQDl7^1W7~G8n({^9@ zo26_ah~16G!u|y|DsGjHjxVwP{fev;vNf^jxK%y=H!H@7ml14pvgKMs+6uY#zhq2h za@iOZwa6?aJGYoSvK)6XHShzvp%**pn$bUrjo(wO7F(^vx|68$TBw6g_gp4XtYQ~Q z)GoZ2X3AMwNc>2sPBq-+3DthRBjotj652W*wV%=OaK34mIfdu+nv=J~deOW30;lj^ z)REJyh?>|WUqJ9Y*24EeT_wAlrr&NQw~QuhJcqf3)9t2PciQ@vk1W51(lQ2=<{nZW zq)pc3hV)kGBprjjkf#d{zGHKjo?$uZ)a#dzk@mz*s%|LaHW+bBj3!UeD;tfGV}+Z3 zVtG^@e22J&w~3piEuBRzLf}dX`rb1C5Q~{?acmecdvv8>Hhy6is%;xvuaQzuur7ykZm_-S*V^59EuPucRw=eGOFzuJPb#~EakW`hU8nujd05wPYY8l-w&Pk_Wf%VysFv<060yRAS8 zmY@XNQlIRsC5dY@$WD>=P@J+5c`JhCEF-$Ku<=z}dzk8}#fOn%Qm)v9rNhVIAJ4|< zl0ZkroM@MdgF13#F;Jb3R4BsKrINYnl0PZ4R$Pc8rU{*Cy2l=rMENgJ^{-sH*WL0e z^_49;?>n--AXvuz)5p)+5uN*9VSGei+obzdqoX$0k)Kj4by}@7V3S;yz5Lls5O3X` z3?Pdd%VtNZTvduqFMq;TwGw@qD^Zu!vf-7|j_ zHy|yVd7?1pCiLTm>FJi2IFXTN?57Pm^o8(0z*$0T!o3&&>J?L-Cd(x4gOyuDmO;W; z!oT*a$v}rDbOO0bg+i-{+w|OU@=II)$QQPkpy2$Hv&5g~SigP?A=WEwO#E^i7Q5V% zVwRcT;WU+^gkLd}8xQ(CY*L@%D7=i|NiU#55|WASRK{)n>KTjJpQ?-l?RFlL;hiT*usde~3_} zSa`2|n*hqkMJ=z>itr61cX}h#Mus$J)zg;$01ix>@U>CDV1g^Wt*I)V z@6RI1DhXUgwaE1RlTHGo7?n9CDFsUmd{ZN@lt69Xi-oP0DAr|w_9FsYi&W&ULzi7} z{xD|vbL(A%|rKf=A92fd!&4 z|6PU+B~H{wN!a<8Qgp%cW&4S+1qx|cYLoLe7f0PWxHz7gT?%bqg|N?F47*?^+o0|v zZR&_jYep|LVXFY~AbUwGu)qBx5pV@2;GBJ%DVS|xYQ+H(affk7_j0YREJjsM3|(hK ztZ>pSn-e!0S7wIwBpC0bF=ImV5!>+a$JG4(!ISn=2rc0r)vT{NhgvRKP84neu*{HuyrNXbDP*f z{pcq)E``aPo#t6�Z-@JVka0ptoKj^UrJ1sN*|TtcA@2L?m?E_5)Mv*4616xaBE80fo{=2^-OUP&|C zyd}g~LNl#@H*V<2Y_3CrzIw=pK=9M{i`=D)Y;|yG#Fr1$q(xcZ>g0HsX7uVYXcxLZ2cM~@gQPQ!cyxqh%6NQe%_MKp6XBhhwUJFbQj;a>FlRoFe*&Y)3-?f zt942LFME)fq1v{D3RU>RMTlp=Wg!uRweRd)8{a?CawpAa`7*GIdouBWq%UL#9@5G= zp>=Dx`)YJRlS4(5o72fN0}!zjF=e??Z5Vk-_aWq=`^wk`>J$#zIXhc_zwL2%r=6Kx ziI5}i$zL%H$%E7n9zJC5V|*gpUX#-4s;%at1^>di4qP}iIK$@9@buLfAZA?avKJZT zKwF?#p?8s>*+QXu?;dxOn3-t4c-q}s-lMIQk}i3G>8Kd5re1B33?U(sPjEk9{x7@E z%wNIqOmcJmu3cyeQDxA{LTF`?1rh*3AOSdZ898*7MPBE@U`F=Cwg?zxx5L1dW4A{i zus5L1!9dL>#f&>iS#gP`h-|wtbfn#$$ZmA?av2(c!ArWlU5#YKTXiGJc197@#Yj{; zo&yZR4`lYX{ft>`N=<+Y#997?bi3vH(d4m5=_>Zq7T5xM5aqT5KZ{ zR@%tKRhBSxp^YRA6Bob85)un+Aoj}Y7ADh4K8G5GvV%rh(z-9=yS6J3gwsj!2 zuYNHJxK#cETAx&%vh3i8HubJ&;hS^V;cA{GCnehIIkT-Po7g`AmX-{n3F#<#3Hc?h zjawxrH`k>W%@tkOJxrc2z#R2bMEZSnWT{2>Rjg;eO-?ytiyx%f4}liDQ80~R_k6hO+`J&} zLN)Pal4cEUlj*cout8+HU+5^iH6g=^XT2h_3TZg8KIkO60SB@^IU3r7D))=$)VfQ= zmW6MbH`A8iGR_8cpJ6w3WALvp)580eSx(hU1Ty}ejfQDDB4fIN0<-l>BzUFO5E<7K z>S(o-xeoQc;q-6q9$d`8nXd_%{mE`iZb4ROTkpO(HZ+DBhN1a33~zcQ|Ayn+#K#oa z@Wf>{m^zuz2nvGxEV9iF@7q0a_q#A4%FHU<>%Pl%or=P1#=5MrE7N1KIw>)#rAD{a~c!q$?VaM1wonp=jYrfKd2A*@A`P` zwgSA00Mx)uLs#6kz-IKP8M!O@$O!tbD_(JhGYjbFT&OlC*PP-yKUG=cCa!l`LA)nx zH<9tK8P+*G*P@AvCk|b0fuRtMKn$`OIx-H;6T1j9zS?51$D2YtZ<)Q%ZB?gI3XgqX zt#2ip8IsMV)KacQ!DN*YCq*`I=sMaa#->|K`Y=>yJbaQXc*|W-qq{0OQuW*ogqDkR z=W6w5qcqPUSXR#+v&S+cXQJH_JJ+ImK{klzY3JO&Os~3c&zE-pbKg*C@-g9m>PF}e zSc}}PIZY8adH-_lzpzeKOdIKsaxo4^HY%isUEH_t7I^Yj#I^qXpDkfdH6K00u2rHd z0fRFb(M+ObFgDLdA*LgvS)52BLh$ebgNmrzoMC+uw^-G&e{)-PZhHLRt%wrLVu}$u z!XE9N(%Oy1o4lZ!d&=Qa6@?1AH~-pvgBDpo-<=lKeV*-{ImRmIPO#QYf(pnjQMPDL zW)EwXoEon1)+-fQ*TO~uEg6IGIT75N^q4CISFw*uCx_|>^|-=wCytnN`FsafQJg1X z?j*6+%g)vB2##%g@$AFq6uo=yb>=~T%?O=<=E-!{ZXs{{R8_`h6=kKcLI4eD`SVBSzUnU0;huI?u*HrcOf zH&hRgK2p<;{{HvBx#KVSNpCT+=b7XCOkeFT+YM>o7L|kGn?= z3ZK-cAp0%cys#P~C$%X_mNjCrjp}|2s_{-6G8b=A*AJZ&b1|DZnw^`>Mknc0nRZK zt8B+Hh|&4KQ8@7%Hp2$als&I|3Nlqr)lSHoCrC@Xt*}3)((t!IJa0S~bRIhJe8YBp z=zC6oZo|p+`TSGu#v2O=3zb+R(S=b^s-(n)78{d;FTKP@!!gH3Ew}NQr5l`&b*GI_ zKWt6s{)a6)MY#UrA8ql4k8RnLG*!xHKx?=tx*Mt|@4hkh|9*&lC|tOi@11@jugcqM{&>K6OY z*4+oDf^+3Mef=f#{MIe7j~Sfh{Rm-pmwtr*T*LkDbG^BF8m+Z=3A5t$DZZzUF!R_A zgVgtUzoQ{*q`m!%p9e=&O07Ki2ztr+HNR)Pf(Nsv+_6C)=AWN)p$7NiyWFSfXPwda z|KB?Lsg9h939n3J^E9e0TJg&cWZ~k^9c~BH$JvCT*)}L_5&@N|HY0bxtvK+$6%rKm zJPJqhlrs%gIh>lBly_Q$lT%vvhIOSn+}CxUT_3s90@3p0m--*9kkqIpKg1x|lxb}TDuBY5mSuT;n)8#H6DZF~4X=$reKm6K5|Kd&tj@TTR+ z$oFtl8uXWcEq|)4^D>ecOyGazW$|w;=M{4FH&Erdi7HQ3G^w(w^4RY!ajMMlH0ypH z@x{1e7~*nEWI>Z+mlEYAEJD~T9&Hy3R~Z($!iGl`+ciBG@SfS0P6WLQ$A9%1Lc9!( zhn(v7@H1Unql}nB&kZzDtRz^M)5;*IBX~pmUWPl;yrl97)L_Dtdx)7#w)n8omO3iW zY6<*Rv4(r`iuNcg-IPjRrV;<>WFyOq#v5uiT6gD3kl~k6)^fMtCU+5%Wt0^Y+YhU0 zOGs4eCi#Bzv$o-vzkKlrR_)H6Z`v6Im&Q0aX7pWXcHGr}ur$+Q*F&Aq{B0z=kMIk( z8lvpIQkJwME%!4}?2zhzis|Gsjb119mmhzKLpZ{mF1Q-S4r9N0>BZoP))PC*gX-wZ zPd*A>fIg|gsi=Q`?jgNyw?5SAlh?EsAM4yj9kn=HBQq0T$!hKvKPM8mkJizqIb*DO z?pPbpXFk0Db~luDRp6&Iz`kn*a;02}bRkwWToWYZ{AMx@Bo*)$5uRQ`1R`fWjV=sM z3B5MQZj8q1PFikJh?*CVjt9Phq2#$Rtt&0+CWRqp*v*rxZOIYsHcv$@uAeKvc6%#m zi!u+wS)6wr0$sHEQ8xHpvgKuZco*ZfjlinTQ|SyHTDrntwO^sXlB$`i3@F1s8PlU# z^fp%KQp&`|R#GTdjruw|FVPM$m8c~>385TjMRUiqn_55X6E@kxaaMi41$O7WQ?~sX z%~z)O9<-_+w!QJktF7@WAwZ@6?C2_jy>d?WE_^)!vbDqz?tc6aR`SpXw)5$~+Qvse zw~>=Duymk>_sX!?q%{^tje0`NQkE?0S#5kulbpU-$dDS zw>$0Deq(LP3=}L?yh{Ww8TwS@;%v$kufcF6%Pm zT)5(3)=+0@&$Vo`O1;?k(~E7}JHHF%1m>K3<>`w-(N@61JNGQC(KCi0(g*I&b$MXJ zBKy^kpSKTx{Y(4elMlVA;_ZPsS!6HoDEanGq`0X!UtE(Hzy5+rTDcTI>_8_n!UJ zADBPy&WUe$szxq?0PTIMrX*EARyh!(-3Ceednys)&<#O5mTLJFf*f ztDkjDSK=ImT8Dq##6U9-;WZgCl>S6p3;MX3u=K9Ex7j_k)O8D28_R8W?ag=DhJ*BG zQPdR5@qtPfp|nY z5JhQx*a&!{hkp7DCsnywgKEJjBF0&WHd%lH@p4_*@Q%3-&KD0`gdtzdZ&24_4leSN zyQuH&Rfvl`!p01pV|&u$$xva-UFzT67_GoDUH3^HRk;;t65DRZfuJEe(R$YBvc+i* zHYvXk`#bctdZf51HyVjff8wB6*5kjm0aLc~&Z*Y@hJ1@c4-O>>6(6M-CHd)KuvUnV z#Y!h6F0p8Gvco8}jU`Ejw8N` z>KDZ=)Vh+-xNY@;X6=93R&z%um6Fj5xr2D+R7;B=XKQC>aK(eHAsa+D3)YRuhC}{I zAwQtidccz$Xm_AK8(*vy!q=rXBi12b{Q6LKq%E5>)*SNP!asSaDJZ*=e$N66+n$UI zao)L~TsRp#_eUU&L+_gQTU-VPSyz?u=>(J!2(5)8ka1-&%yXVZZqS0(K7z*IK&alzT z9=4U_?X!TLo7~>+He>K$ga7#(e+t0VO5fZ z2wyUNu1$`Nr=(RIap!`G<+gA&^7#zuu5%w-+0$>^+GpQ|0jm%A3u_U!z1)DS_$fL6 zJN`WLm4)p*^GCbyk>6S5#I0Q8WV`0NOgb}AbD%pO6*ww!DG`Q+T9+d084Jc^#KaR+ zNKYYDY^mMUhwq0DWz%4_4Tt$IavdTXYbk*&!@$dNR)V|i9AP+h(1aHV-28eJ8k`;dYSlJ#nCIE6vY8 ze9z-^z8{}E5rkAbpnc*B9?U-YHQVXApCjGjo$G*bdm!1b5SYO3(encl1SLJ2wRyK!7>{czV!`6-XU4hefThm;nk=&$7|CRJi(OHP^OT<6zkdIw9yzV|c@a z&jM;xvLFGn!ppa*t8h7k+(x^OUr}l0_>eC=YF#4`#rEpRF+2Yu@+OC|ITYbxgmC9m^45Qn((%GAGb(&-`J?GLxIo5X0rwDexh<8Ia zB&`8^8fZazooeQxrWwrQy=ndAEi0IP6$QT>sqKbXn$h37=w?S*1BxAm2%|c^f9dqg zwm5qFNQ*oB7Q^p7SX^w`WtDoN@8X`yAhZNVkJi8b!>5Dio;|kLcDe7-CyE-o_lF3E zl57ck2RId{_5gb_u;DVmA}V~-BRkdx!S?)#L+;()Ydb8UJ~aqdd~6T!$`U!c>_57G zaR)i?^aWP>`IAQ-LuhmWRe0LFIt2wh(Ejst59z(mopw&NPgms_24kI)h zGe8V-wvD=Zr`x~90i3v4q4KZJ+3tv!sR=r~0Dx<vWV~=$j8XmXNoK)kFkg&EZ9-*ZzWe>pFhGf@0doEFqT>N zR2fn(?dwx+1^0bq8=wA$@~zKp^(FRJVXRO<^;Tf3VI&E=2)#pl*)vIAWZZBym~8dV*t#A)HN_w0`B6UbkBx=9A~@ z0mWHeckcaPy&8Po;WgP_0?pr&H|DAUnCH!3+F$2w;Nnx_$|c+ULXiSv-gk*0JD=3| z!5gmy!{{nZP-5y)vP|_3u=4)B-yxsa1MELP_e1?&rzQTRBTr>2)cBDXYUIc>x(x_r z*nSmd;RUxaG`=-;q)my-vVkEOoUnA8w&V={(+8GHL3N-2n#J^Akf|86L#Aulrrm7u z-e22VZMo8aA)Vy2ZQua1M=-$Qv2+Sc6BW}5I>I1xL=3FCzmPfC635*8ubEys z;EPcQ>14OE=%y-W3bn6av0WEB!Q%VRwdM>wn^bJ7VEKeDcUJ?MrUMeTfQ(3>C1355 zvMz^-TZcVDl;>es^Va!OY|Z3xl;qQI9ey*vioUx6<*x90+r@v!&^`G+dn?d~TYm9F zQb&(+>T+a$VWA~wAgVZ@>qs1Ld-88~*O5=H*ErAKhDKyjm`AxrNFrzyGKa@6#PwZd zbOrDb3=-fhD94n9YkVE$$3Bv|6BZn^%Cp`Cm37!zWrf+v1caRA>=xGW}xKlE<2B6MKxdB@-6f0ch}kdAbMnP?rVr8ge;mVS#?6rSk0| zTwT$E|A0rVmCKSfhWxQ|nBTnw2%PsTgzh6BaDdeoLRI15M9cU2hwpom>)%^6#T<$p z#a)GqHDx6QU#AGt z)vx=}qsM|ceVfUQm*MmZN7mug-&!!)rL4Trx32GW)jdHBchLM#i0FAZ{m17N`ExjR zdO-mz=R){(B6@aDQqJhhz+SD1l*zatgiczq_MXIww7zJp#-S`QGPgYkUdCd^bjSq$Klf1 zqf_kG>uKYofkKg^zQZ=y)|LZgIuWEk>?1_QPVuN z4b)Jp;A02Qt){nL7hleYO|k2)WgIJg-{Wxj$Kd!U(PAb%R}2@9WqZRCShRQ+Z3NsT ziS7%(2F%fIP*_iJc(o1yW%1?SZBQ1B1?T0b*osu%ETKg=W}Fe$g={IZeBXOE z|GpQjGj(>_4Ly0_NZRLe$OrYa!`TBM&#aOM=B73y`?5o?2izP17xZ=j7r$2KRlrq+ zhX-7lLkAQ8Lt9tbd%ygJ2Tm8r_JFJ0knD=`xbBQkTLgLU{w~lei|c)&wiFe>J>V)Y zbTuHq3%CjrU;VltKKeiqxNp7k)8OYleFbRi^%MPK=L#^pz0dp#V!Ozcp7Z^jNSODz zAK}_I{EO$@rJvJ_om~Z;B%G8csL;`mb>!j-yT#}^incK2my~DPK4+?JykjD5ezV|y zGwsIPw%JDRYASJzj6=i-<#qbiTI)vB$-fQFLxnG3@ap1*U)rjJ?_2yhVl4FQ4Pl1Z zu!IsBRBDJ4V7~F-kvdl%;>CVrcnB3Xqh0)Tj>V7K`fc_rYj|NYVR&p~+Gwjw79xp%KA~&fEz{s@!DZX$843RMYj3=|jFFg(Jo=js zFTBzA=k~RVmzutq;9p(QSteAu%Xak@-~6Zr~VCi zQU^|B?Uz9gtcHj1tz>t0&?T|+$Y<7z(a3TJuA#6ufw+4jm>eCi=Eg!xpfpg3tVjf) ztW6;gbeV-Fk?eJ0Wjxy6)OBoN*3c#@#Mcr=F2}r5?#07eh<8tQU9KbGl+XMD1?MuE z1+L)#q9*dZOc`0b_alp$*UUVb+bx3P$Ccwp+4lLf@b1~-M!6)}RFC>Lfxt5YWUE%H zQfsy|Xjo-{c{Wt|+{b)8<&$Jv6m+_={(P`6K^@#{1oVv!4Bw`zQ|S z{dK4$#g$Tc5LFD?S&ggRS@($@twaY_%t4&xj4Cg58SLD-588J3^&MH06Lfo9az}Q! zy)J<4IkQh4Y7E+7?TB0B@<7UbdEmbitgZ;C(}l)>iDioixcro31j>T_PvPxP`Ux&B zf2axZt7vAieyk&hH+OO2E&SO`6sdg9e9IlJLO+>+RGYT?5i4i9M>2&L=?~Dc3doAY zmx3GG!e=#4O`hSZ{qI?R)hiZGfWp@`mCy(I2&xBEH4q=agsK6KWeQzYhC^L!8`eBK zILG2f-a`S_Tki9|FO-x+R2jf&|0w$UXuiv$4}QhYHvwD;6SOB{RFk0sV`wS{NlHvS ztBXC*f_wz_=%FTcnDvwxHBb^zlf%%9`~=ImCB@=g;nBdZlEIRM#f<(dvjel!=DEf zTLQD`#-M+a63N(lH7Z(?cp&CVRuZVp4NU}W32@orRILmmil@la)CCVRXzA~iSn{>1 z$z`6`XBMLB_I1oF)x^m)e6gDy9GXkOXaQ&|CIi2MqUQ33_o#AYd_b35tY42inZKGk z(fr5rV(k#hH_(_RhME&?XB>6a(mdcTm!4?MWzB@HE`nDBzUgRNdcdpZcmC5$=C(pZ( zulE^B+XAU5dq^MDB3wPKBL}WlN!e=xm#4d$!WAbz!s4+f0ZlgQ{ZQ3$Y0KMIzMptqDQyGYv#d|&aW-sVveo9} zjb#nDquGg+fFUY1SqUBz$&>;;A@O88CR??tyS2y_-uiZ+6TiG2od@uC4nq2i=TC5H zRnL5#sk%Fe7=>0G_Bx5-Nr=T=Jv6$)1m|$Rbn)~*Fno&pdYBN8ba7mtVy{y6;+e)+-`DHmrTRs7(Lre77xtp$^;$?-~=Ht+rV)n2mhP$~TuxTl`Gs{oew z3b~@ydROO5`)XYghw2*j$;#C_p8B7B#-%}z>j&;`;h~}#tXDX|>&O*EfNMlsr4di+ zb^F@69Z`TN`?2FGjgtPoiU;fwsS%TpP&#!FK3EM{Xu$j=-n;;YH4DT>1Du%jxs@WDj{4Ru*xgm<+!lr|xQQh~o)({176p3vp*)j|a7iACaR#h8CT3voaZk|wIE0xbkg0<8p5 zsHPZ3HARx8kDqVDd&fIX;A0zr8}6vGyN}bx@zhtgjb4K?rhFHlVlQs2T`6@@Wz3=! z&-L14R88TPQn`ZRGPtNKuX58b{p+!t>maM{ROt4{{)BJvj`bp$rBV33ugPMAhE;U` zm)HnOrUL4442ex->=QvJm6gV*97QFOp05x`bT}*?Es{i2!cgYLb%jv(8o9}KK1A#B zW8c`y3y_5i>Y+hHY{7l)siw+uXt-)Uv=_MgW)ucq%8p_MSb*hCuiAzO@K@LZL^LG& zno*W|%R;L_;3~7pjUCZ~)n`ggXc1dwWu#tD?%~e|+*-GIIUt^BX4OMm`ExG^4ZNu_ z3q=FZJA@J`o_DjIYrfA5k06!!Bm0-n3@QmZnVynR{gv3a6oRKDK5efqdg^eaRq09J zO7Z-Z4$CHV9gSWTEnjS{az&AsDGfzx{QH*8>?pio zOYlq9l1GxuJ*QF$!Mfu;J9XZ<+3s8?@$aXPwm2n%Z^^KyhqkUXRf{OHeXummyI`OA zv3rMK#UJO%=DJVn)UsfloeZpZ-|5bD7Il#G{_B^1WS5`}2a4y)Yt^@MJ>D;Q>*b%| z%Inwb*}vmWcCZo?Puy}~+mn@fQg&{21FAOWRRkw9Gokue@(M0?|-m)X#P)O*mL5IJHCwIhsb zLdh+nR>4gk)bvTG0KKHL=X#S!S*+TT;ZxD?kLg+z~ZOV(Jt0X%^{z@SRD zw5b`UTiXO?4(rIB3p8;QxIdqV2h$R*_i@@WgBMC zU_#Vw){|y~9{Aj$}NEU$tJ&Z;+=R zNF;8CT4yOo4lS{v!%ns0u&d44yG|)-)#Y5lw`ZT=n<FfE~S2;gmRvx?2we#{Jce6yWFX% zDFYI$bVdf=RGii365P)2YeyDR8n<7BrkS&WJuKV7y=bq-Rw*v2E4S)LbQ3%$!znWn z#x6}63Ea6P+fRV*VD2DWG3QpcgrqylsVP-jd#XrE#ZyyKPZH~kEftqN=RoK?abKxI z22s{!|MKZ}p<(;~$Ju)aMpj3j_j$-W3#e4C$@(A#_pS^L^|5uKP&>y4~+N@A-q_naRv#a?ic4d#!6-Yc2a| zC%7`%3ERo?T0Sy+F=M zN_nN+wfsSyY_fZvz{>qKfzp^A-nZ9%2Fd2!s{=ko z9*zuHB*h8-kG@BDLnbn9j?(~QIXnikc#27$SE!d=xQIJ5ggf(jm)hcPBnzB{q*Ahu z!h{lxdjfSJlAB;Dd z!auqZIusZ5D9_Q!b z+L(@=Z6@nACnglG6hc29LO-_`9!6Fq@l!TfvP_uc&*r8yGn%E$fLnExMz-?m8C7VL z71_%2qsR#fZJq>e=DbL}!WWRHO&cH@&KXM$30!oH6yn{uM|=XI+@!k|u0cZ-59?8t z8~bvd2OYkbo*U$J+FlM!ru@h94`;eQ8GCh+2ql#Gye<@TCasU+Tlh>rr)KvCI9>#Y z_bJ};3NQZ%1nzl00YzT_N2|;}6C%aEuY96Pv;RLn=FC1#Th>2ELCkDzP2EkK?H==P z00oJl`2jYqb#v|pTz6CZQHwKI`Oz$0dH6qDR}1uh^Pq795_%|y60w%$H zkAM6Qvefrk-N3u-#@naZ#N30{JLgk3iO36v+&~A>Bf&ixSJR6Tk^S)#QYr3@xKrA4 z+BY+grWw^E&6~$VMJ8FgvwepG%|U^naMJCKZlKmT z)8$6hB~MuRz0;kQzW5q!;Am!z)EKyQJ4re@5_>I6&W3LkXSu=+s0oxQ8X_`u71d&r zf3H4h6G)&0kPMMEU3FCqindgu#9@@r!58_OhsM(Zr;7Z)XyGdN^2x%(8VgJ#h<}}L(?OA6T4!rMTa(i7vEWq3AJm!%MmjU(RDKmxx;WCo7n(NsnPN0YbFY&)iR{A3~h zVV#oUNm6ESwvgK$LU60bJaQM^&mUnq7(o()4hnZHKdzC&o>tg73*^tkoC|WJ zTiD!-c0TXl?L1TbWhTIIshtn(c<)6!56~{1>`YkF63;{m2X(A8Yw4;zb9C}h_q>wf zy{b$d7Q_LCPp7H^6tBWlxxSK-(U;V0UNq*FvnEj}Qd!;UlN?lhOy7IeI za6Z{;TtlE?c5k2oWmr+n^;V2bY*Od0)~5}1Cp90j%W6Di_w;+oM&vOkl^W|PvT%%> z#xW2@5)y@~L)P4*;8W6tOu$pIFr7DpuTDmF)!P~pa=Crl@12DX#zxXBn?S8k3Uy@=Zle@m@Z2Boe z)U4RnR(lqSi@D?n``p*t+JtZ_=_G{IZ1!lby)gfzjpMw32HIgH1BgbfrdoR~deT>S zd*vmLAMvRPrJHrE{*obMUoT@G=nr<)Er@2&A6-XV>u_eoH4jU*h9Z?|+#VW%-kco0 zg98_9I5=o2ba1^V+YoC+G?gO&mevlVMdEdJBKcfTSlrOJY~mW!b_6h58op3La*%kxHH${y@r&N28U3*yvYj*vkHlz35 zHnqncCjL`Ix<5xZnVj8e`2YcFiWZjlCp2*Ds*I{X7ld`W)mj-K!8~4-$7!D*)6j$j zD@h7Y(M}{S+sr2GW#kmzuCz!eZPO0|Bth}4R1zEyG5&}I?p=akdM?#5tHKK%_Y%^G z-TajP3)0r=M1P}Twr7cC)v4vyZ@;_<+y0J%R7CmzQ5SxGSPyeoOH3spD+}s3mkzq@ri*fBl`? zH~e5?g0mBD_Z*lj^HUzPcNXNhSLkohv*fDi?^1?GF^Qs=4Y)jSL%t|#nyKGYQ>j+{ z#N%T3o0J7}{vUp_Pp<(y__}A~G&?C;niFhfx^%H_GNV8m_n5N6R4uScw92#e+D-cM z+}{o($-B5{_Bc5G1ha+yYxsU^e9mo znE)n>!FFn?AENT`-YRTms#$Ni+K~mD7)JgIFYRVQSH{9ADy5Dfh#fx^pRWcO4LsIVGj#fY;6472o=3C)7GU_>7iqO-_iAJHX2%kQ#MAE} zfjk2dwUPq%RkD{Rv8U*IYb&{0`340su_b|-D+yoTML zf?kEJ!BPT@!qZUS?s1fXk6sRi@yc=QKX;P_&^ur1ysOaB``b4efVM36v2-vnFU?Z9$(FkRdZY|C5tDkJo7EUW~7bXk7P+mr3OSZ-`v z>@&;?;!wQDu$Qt4Fvyd(Hh*CZM_d6nD}*zp+1&WDAdVcu*mzCdPs6 z%;Bre#htABpGT?55gV^mxb!FUc&>=~O0JmgQ2pykm+Kw*NbYc+qAT~293=jr=l$ui zY&{0B@@LP7BMX@sM?F4&?rh@Jx#X8~P{|gufQh%!RrktUS>$eZORHzCKhbhh{%7Vj zgN}8!q^+)L-a(Nx1c+fG!_%}$Yxek5Uc@-K>-y4nGu4_kL@svGigZi|i#=>cC|Yeu zJYR;CSW0ifzx3n(l0fug_`y@xJGSkr8n^u?0#V%65=E5L++Ux~_kB$fof`^c8OzwK zE%kD3EGMp^Wyg9(RhZn=qS{Boy6PfVO(Alvs;*Q>yP<24+QAV%O^82j*-0BZYoqzD#i_w&>(r)} zjFY?r*wPMO)!!1jFi`d-*IvEs+yQ>k&YaXo!4cdcd1CTKn%&S2RnXP-RD$=Ywd|d1 zFRm=dXEP zgW=`7JP2QeZyr=hb`;@(&UN3w&VR@3{PvNyvO8Z95OIkAYiUX4A^K0m3hofk(B{w3 zPu}&e-qe+62BIz}XYrUXm#aMO{cK3ATKPmAIoMP-!lOKn9d-Q3cQ%R91?J|a2HOPCIK`;trcna_E=;C7c}G#}^tzp=HyJhW2Ne{!}~+jpz8 zwai|(67nJ^s3z;vwc@W;hjyO9i3F>c5r=U_*N6IPX>-Y-7R96ailxC`ul6>jYlPhx zOdD{YPO$EFOS^P?fg@-VN71llNX=p0N8=ceK}d>U%#BViXKhziH7AwnsT0F!jc_u$i)|ZbPj`8o9TU%aUm_#Q!Z9PF!aRy~ zw@B`@4C@maR+hEgfQ_;tS%@*b#pZdg?)2iVOOQcBOCeq*Tl8bFY_0 z3AiXjUHEigb776!!Jp~5?#g*#E>fukzh={;*!8J6w{pq+uad|ma&xWuG{}Rb(h{L$ggcy|pb_c(nSf$+yBs*yn{=|Rxd(~UY`Au3IO(#Z*W8yZ^ql5=mu#HgEG^}X=rF63k#w_V_oEpRKc7o4 z%V!>sG7SM$CSD9r9V$*?YPYqJAp%&4a0L7Rj85KS*VflgW7pmAt<; zn2x_`M7-xg2ezh%VxwzCKRszThmZAyIKEUYMl%-tV>wbo#&S;|ZX^|11Ni_6c!JU3 zpC;K!@z9ggDvAo(5jh*JDSZh2f$G#S_Mx^mwfDnVN&=*Esk4+Qj-?FN2`^AaLUiuW z#c(dM9v6^0>(LdCR|NZyq&uvYtfzmM`)u)?=j~l>MMpWg^iECDI3k0Tlu`;SFZq7& zRPq%Je1e43yOpPvYs6Lk+POL-+`D8~KQ^QKu@9>sb9~ENy6dsox^i3#_5%ut2@lD_ z;w4v`$KRMis#8Sl96tH<9xZJK>9}cB{LJVX?jCpggSkApwsy}vUY^Ykl4MuETsEiQ zAiJx&uKHh(Y1^IG6LR&azkoOQiE$G6C!SHUp zM1@W=FZ*15rnLy8t`8pgmK&KZLZY?9gVX<~{-Z|$51K;0`<7H^hApVZs6Nv!nqe+~ z_G@{=s9F1 zW60VLUrqmduE)ZzP9BF_mML>{b~kPft%vBQ&E-9< zZR3H~9`d&ZF;;WRRs1c(SRDD)Rr&d3^E(%^5k?oR5>YiLXw!5QbdlN*JZ>HPEw^!R z9&?pdLpfH5xnmWCK%QDzYlUB^>9Dke`jSpi_#BaZm%ZnGV~Oze!>7{1t>Hi>8Qo_$ z)$Kx$r4G0?cUxZkEtXGU>Mzk+70B-7@!;8UQ^3s%om!>tZf-1FsaT7c#}#(hiv34p zHJw_q4Y9kw+wysn?Okm-pEjQk1ecx&knK4-w5I3`6*|kxj?y+$_dO!`o%vZ_VVASE z|B>A}_tCv9t=cr5!%3ipBdJi#RX?a@BXd1k*flew+Sqg$?%b67?WNIdp_GSg-hhW~ zX41Xxx@gEFRx<1{%SdSNieqPDgwrv?S^P(hn_I>NL$fPDC%7gd$@A&l^hl#f>dS@LC!(-W117vjLc)JR>JxxM+*jv0Nxs zxU$9iH%N>9sNMVITuUfnxbFYdzZ{qbeR%UAQ!E!+zsq0P;uQJtujgxj$sp5(O{5JS zvN7-sS0fWV%!YlHNIE~Utqr_C(jKX=NLD0gFN7ErLKJPc=id;yxeZs6uq<#eCNKnU zMD4%EkZWar-hN^_(w$yRCofZWsdG_oT`I@Y6bh5$(>{ZkR+BT@`-eQ`N;4uT%TQfZ z7^h(bVVpV*s3OI2zsG_0T9at%Wc_}&6;O0cJkcG3ZX z@sfPJ(R{p7vQ*Kqi~wYa^I%lBY7C!{^Es{A7?%U0icOE5OSc9lDE3ZXg`3*bt_yBM zWZ9K%avO>0TP-Vrd|x8lw?sBtf=BMpiFfdZw^fo$GNH-@N~3Wdl5&o9+iL#h9zj zJwvAcv91br^_s4nD$^z6-9hNclN)vRWWwNN#M9C(G0ZZO+FMp~2b&h#-ZJ~$V=MiM z_DTL&dp~cy{WE(EgMA0tQhy(N#h<{umVvhNh2EAu@IK2-ZfCO-ThUyXXe^!}mS8X+ z7oju>9FnV0zz+gtob#}GeJ0_7hXVR=&QH~a`{Otfn%n=UXSpl?EUl4J+rhc`b2$W= z#XUo<1jltkw})}{l@1_?2#&X2gaE2N@F!$ZdmD-NKPD43U&2CkztWM0^uaO{^J(iu z!sMxE-?JK5f#X5lu}qphLi>jjqO?Hr*c|n!T(C>jTJF4Trkxc|jRLaAzg;iK@KJlP zYj!npnSh!+9-r#JB`&)ceC{+8&PMCgMG_kgyQLd8TIse5!Q9!Hu08Uac8iDnIl9Ur zXdytsS;&EAsw5;QKZq#LuUScc*Q;`{${eMZn5EOSc2yjxk%Xh=L^5V@;s+7od}oC*7*9?_V~R$IS;YeC{!sK3D{_feA)$qz1(o3zRg>As?Z2`&237bWHn8OL1kDaFWe8}EgoNb?I+Xl!wy;hb=M|`?wg=e8Y z{ZKeNTNgfE>0+*SzO&xyhZZ?wP{Mpx^;KncwOABAmMbf9mhRQAWQq89%%?N z#Zyw4vOL5-Svtekzg=iM)~&Q{AFr?<-&$ZFEy=KdEtq0ote9)-7QSdJXQbN7seO=t zM%jY#U2M@a-K=zUM_V$nhrKZ^+18}@vDaUSLc8^V&E)gVR%}cAxOvL=%|SxtQ(Rjp zhey^uYgOGSJB)p$0A3Fcbhc8EuIfU%2_0(Qplkc^fPaiKm-wA6LB2D+3GC z@LctAolv;b?v9f{r;}ZYq@WFg!Y zb}O>@l8waJbZIB1R(&O7rwFs<>|Y|nkOb79%(H^3IvWh|bL9VRfL&elc8dT`B*DrM zrIgFkPE**Mu7f^6PUCc473#{D&${NZuG8}P7TgAODC1(i0?9&)p_i`9BLR@pGr}@h zyPQPO7eLRUf@;ze(bm0w1RYSjd!0$@r&{v#&Gy1OM;XS07w{?pD0J!I6&$&%Dbqxj zJ_KKV#0n}})H2RzDd5r^`xvKnhi&_u3o*#mqp_#a$|Ae(m=wt=qdO(b;X`_w!6b3ETKy`E5gId7ZPP_zZc47 zD3%+M7pJ}M;7F8kK94QS7cnGuXsQbqb%j^K%j8m6}CA%%lG+51b1Y~z=o+5yyEN@*(9T9v9*9I)-D@6fC(ZQ99p=vA|1KQnYS zMO;dz*vT2fp=Hjn9FL;k3BIsr=JWzf=OUq|K%_Zi5rG?#0{WRN49QWxGAFu`HP2w{ z74~gs1q1Fys&%&&j_qzM)BDlwWu&cJ^bdP~(G>e+*-ZOzWww3vYL5N*$*Z>Whj;D3 z=C5qe`p<0Vx1ZS0Uw&X)KYi1-eg3w6`{sQ6VpXASc&F69Ut3_GES_PXFP~$dzm{#^ zy;)?N-d|!H-&<@ytj@J%Ge%hM;D>B>-@B|NNYc&APRKDfw^d?Esg zFy=^@I7dcO1mqM*pizh)Ld}~)l2Dsm02L6B4?O)93N6su&C|C40CA&48cV=c7EDR- z^d1nv(RW!-CKR{2iaut5L7N9>SwE&k_0D3v2Ie2jwqk}dU?6!%kb3oN)UBqRYbeZf z^R~EwY(Ad4F?5GY6ZZPT9Q#eXGeCmT z6_V$=t2DP`wRb(rMprZR*c8W>3J{#D{)UGIC`&yUn1{&(XHoW&fuXp{Q9?--N2=;N zn;s;>0TqMgN~EG(M(wPD57?@-1be?=qJ3CA$-Z1M$2PrPWZ%D0Xy0Ma8$ViZ8$MiS z>({Neji0Tx9Y20#`!;`W{zKb0Si{5I?A!dk?fUUE5aJu#`@@H}{i}c4-tXSEW1H96 zp`YHh{olWBhc|v;M>l_D2iJdW2Y&j<4t(>DZFqO7eN_5_EqtMmy_+%6))kDj_c90D z(n*nodEqukJDWgBKsJw!oQVga%vUa+RRQE)Az+BV!Zy#)UeD0d%f<6)jkH9LcU-K8 z(zQ-=bmiAlzTuWP540wqtZz-PpV9MH3x2p|H)~K6opW$6>zeYqCBr01d67iXR17>) zJYInA!^GnWRP`B;hUJYfrT97h8#;kTTQCzZnv&Ua2VI~5ArvTR3FReRxI`1G%xJ9$ zGBekQuvvXQtz+Cui$^8UTONovAnGrWp+8PaP%mW5LWce?d`EA?{&xLkw_BSAU2*I> z;DF+WR3pR7LIy9Ok@MkpYQ3sO%8MhMNyNF}FcTLurt=e)aC>_K?}w~z&HETh9c%rb zqp{Xocme>jbkP-U`lBN=l96lsZ})(P{yyaStV5x_qO<|%17ZX zb=DV>sx3ehA&M<8i5{2z?zPe}oo#LIbN1OX4&}8k+ZGP)-QWHTQ(R}ezW>m+eDRL$ z-tf6?`Q`(}qhH#tP2ZS*&o-##1H0jv_U+s%O*&Ei-k&#E;K3d1ZQsv7*p8n*w*x=p zD<9d8AspTHy&c~1tsUfL`?r2?dpCS(JHB6M+do@vU#u=M{{|2xivAw1R8g z3hEhr9k@oh((dZq51J8qyG_Nw+uYREuA_i7;N}$TpQc$H;t#O31iAN>md#yRc90GO zZIE6AU*jqqB=PqBi6-xwb*F=y3E!5se1h4Ohb3VbtA| z*K*ubVTRA(*PLjM`>+0Z-195@yW^gxM3Wy%ewJ2ks79}^)xp{~dI}704~BEx=d%!N zWzSRH*2`lP`ieomB0<;!ZIK)zhkBXOw=%J*y=5ogVmbX7^+!sjIPrFS?6w}(;7ag~ z){X(ePg%#&A3_HHW+TybPoP8D@K?4|jYYBzXJ5y;E8$2}MMs_CnC?J)@nP7|sMT~J zUU9%)SY2juc~GpgYhjM>|Z4>*k^BZ^kT7JfANuR`0*>s$bK>z z;{NTMY|qy9wrAT$`+386wr9s?+qY}0?cM#e?cx8!hxXZl{kv_??j3gM;66KaU=Kgr zUj6een|`pZn}4)D+t(wS+)UF94)UGY_U^5=XXj?y&HHWV{dZ!?Te0LVU%z9Uzk1s? ze6`BH`f!PTviu*mDsP0XnwnrQO?=8;g=#1n{1CH`a4w)W#H>2fV~+OZY$*Wdh|!rN z=*;BC(-rW>O&0O5Kffm@STVwjkZDo(+6y%4ye^ozALQAtxP2nUf!pxT z5cvSx8h);8rR@G_z_nuMeP#WNH`uL@%yh2c^{9m-nhn8OWETc1ztjTbtuo+?2TYL4 zt-~T{s7A{7hT2e;SaIZ_e_GspM(fFn-O(J)5U)#SH!3^`mKCSus1p(C2^#74sqFuM zZO!&f>gvIow8H@-PLm<$%aEtYkkfUQS8dX;+ngpZYt`~1+gZK2FyEP+>ofb@1g0~e zCi+Qx=DyYzQu_%ClsKfB&HZq{)tJh8BwojD;#&-;=E!~K4K$R?wvZ2J)HLSoI7Zj9 zVv1P!xl2z-VPGqpLAXsO!T3aB2_{M4_gP%i7w_BSBGTqnG=CW{$Z6B#zK!gW{ z^W!44ykUQRI*WA-6w@!pUv}+IXW6yO$W-WRr8Z-suBPaFnJc??q2mnwV1;wKGdQ%a zQ!ZMyHN`~MMYz`Ljx26?CKjC$56zYGcPk$HC}iA|wqR^0T-^lwa!HzP{^S+=`Low- z;}4(O&l|t8pEj?zjX!U)T|2kgzP-CRb@%MFz&$&E#tye)liRULPT>7}w_D(m!+Wsq z-L`)}C7g!|zz$;C0f(@6|DHWN>~FhvZL|IRc3}NG?Z~0+cJwgU2X@&$9^1!Lck!e> zySCW2tv}gTe)mpJ@%{TZ*xtQA*}+Zk+Sl*Sx36BCZQrb#Yunz;wNFZ(x20ndc_dQa zjE|9_qj;|3$qaCeaslqngDmmQW63kMZ{>|l)=Dj|Ue?!jmE&wY)0sEXH(H_kR_pm5 zbkV+_6N%WbCIYIqlvng8TR_|2Z!J)UEd!T!?2pDBltLX=Kibq>(Ntw3|g_?pA0%f20dL{$XCEm9l^RFjzuda`_3|jS+# zUavaQ6)xEJ^e`TG*WX)47}ma2YqFM_CVCe|T5Z+64p+X;b;*`IU;5E)WdGQ4^Ld8LCj=HIKp+uer$lzNH8156FthsUqJ8+LLT$coW@$6d z&|{PJ-AtExr|H;s2e`BGN|H_9b_R**I`eR^vf1Bx7M54j$O+4(R>+ zcG&?;^PtR?e}}N~!~3?`(E~fI>=?DzM}Y%f1Rg%T%Z?n`ZAXvowSD{Ln)CD<_wn5Q z`!VxF+aMOV+kt~SZ9lKwdjNs_rZ9!T;%NlUEO{N2vimft4d3tp%a?2Gi`y}GYCMuuuM?=rh z+PYQFa$K9%woYa|??Gsi*Np**SblNbEmoS)(8hOr+_oMZARzYMp^I^^5DEu{x2CFCC?{!*a<6e5E6H7)K|XZbR1r5W0xGlT>;{9 z!4F%bntx{vI$5g+XVMd)!p1E*3cW4jUP>||=hdih#Jkb+VI-WHS~yg;o^hnTqx89| zoyxH}*m2`@tD)D!a2UIx1nsGu^F!dvr@*H_IAkU6HFQIb9)#Z1jL^b@$qUZ-`xqxT z$GU@1Rj@jbU7>gt2wYrHhXi$+kalc}r*sGLPIEE=@)#cNzQ9uH$eg?!CEi*bcC-lN zVDObuRJX>Fd_t)bk`P!qx4pK$S|LFksoZ$hy?@R&yS4vv4tT@_EKI+)t!?sCU2SPn z16zznE{jF=^f}-_sg}4%Ydl3)fG*x;Az5*MVFK8Yo50nA1gQF4nE$-EHq`xl7*Tcl zQ+H7*@Np8mY1+c>YO;6mE85i6MYNbKvE9cO!IJV199NlT< z$GFDYD~|7>j|BJmzl@*pYMhLtxClph#j!(M?f4N;rL1hX)jND_pB*XNZ)FvSt>R1> z|Bl;<(`8m(ao$dx{KbAbQ(@;$m6OIe3_|U-V`YRGe2(?szHKX)WZG*p2iTk;k5Tc& zAs47zsIs^PBo_;XAcYu%Pt=_V>JO^ddyT#btcmIlk%Jyu3#q9z{CnuJ~eJ__)=s%K_JjV~^tt z5gLHu#u2!=b_!6dXyv|Et14&M1Z_`nU^jY0#MnSI+5TSQkv4Vl2Hu&)byT3kiDKw-K?KQsl1)I8%Dh*ECXUNozT)P|cjW2p6oV$N0 z`XJvhkYhLq;#m81m;9^d>YXsB-cY#u!6X2O6LAk?cF-vPjic;i92HN`tu416Bi|(4 zmmsO5U4beuym2aHh=;lU)0#yR%22Q{xnG|1pvCpbJfbZZ`2Pt({LKgtYK7jAf`p#s zg$o=zeUlA-gU$_T2>l~bQ3Q=4Mv$^rpI5*ksi6lK9(xCEkDC_D_fRW^F49-r`8>4U zLl#`)5u5nLtu`(4K@cGEW>O(>=x*dN-!IY489|Ww_wniOelolBE0QFl?p%>&f`Ge!gao=u^|4yF+&I8$>2#tt zBlREDyp*EVFaDw$64;Lt5L8xwLDl~oB*YFU#=b1dZV75*4@LCEF<`${3D}$(W`^hG zvQ^WyRsDrr)yrl(W^sVc<>bqV54V^5gxMkl0`uZq1DLJs_WC^-4skbsRIFWb)6@3+ zf^9aP4we(}A)cmv!>BcsQ?4SIREIkMP<4({I`2ON!XTWEQESU=$YOl^<@AYyP#;fM zyczfsoky(!)>s9qU+UF~qIJt4C_ETaRxv!(8**~7*qwEonE>4bU>QmJy^vlu@EmYlRj~& zmm6!|VXbcHXtNXUw&^jqTR~D|w3Ln5PO@(K2k&St17!9D_vAd>(&`7q6YRq3c;esO z1%(uAU(PqaCENww{K;K#C)Z>tJ*McV&Rv)+k8o-=9;CT#tRQ5bwzi9sJ)%LNP%nq@ zSpuRNbSKPDL6$ter>)KyX6shx*{*Nb*w5eo)Anup#P)3Y8W#Rr+rDK3@w>+xD5%(f zkkEh_-@kwV&*nRPc&i;f${@h9@Nd~9_tLpdSE?aC8n z6lj<40|S`#$^Yd<9pxa!aiE|K^fT%$!)Q_&Isa=93LK%}x@i7MOB4xlSd9l#9>o@| zx9Fkofd@<`zq}12etTIFG?o*b$P>5}4~Tlx-Bwln81eiwE}{0D{6GNxO8w7g>vev+lX3_N9x=U9D`#rns`R^ zzZ`%x#|b(gF9ta1Te9Bn>z+$!^Q7H&Wozphfe1VKHk$>k`m-^9UkP?!s)N3Wd!;(< z*HkZKmF;uxI4(h{~V;An=~1D@OpixHv$s zD6KYpN0i};5FuyvyVI6E(}i-kG49a+>D%{g$Cl4+`?l|F_b#IJ9Y4}Wev=*Av&jzc zg|6rDKLB&EcfSmtuW29Qew~9v0EaQ>vWkOtoFiKQA3MQF;Nu5~`SH++84eOV967un z13qX+j~sA`f+}tRo?*ZFj^oQ8_+1py(bnjSHuiYC-pJFK_zlzK&Z;#Rd9DJu1aFrX z>X<4ZpsiPeyHEr|E+oV))qxh<&ZZ}Juug5Gtw~T@jH##93_+&-JVU1`f>SZ-xK;E= zfSMZ!MK_FpLn-g}T3nC8@GDzf%kY)M_iOY?h&o{_6d1dNzPR+no&IWtJvMly)eQ71 z^{%9sOUo9+tXVUJ+_?XK<>Kk?6mLEeu`MxoU{frD8}a~m=&Zkw64!wq<}+o{)=M)!czZ$uh$0~UZ^(zlp?14A z+@8L#r{(m=HNs62BR@9|=5;BE>Mu^Dr-D$RNGLF+2n|HGhX*VzZa^gz{F@ulU(BN1 zfQx9LEUbqHy7KD>(}V^!#Tp0^1Oxgi3vt+{>B6}M7oCB*4il=;A)q=|XrL?Q(Ow>S zt1X+@-TpOqfPMS!OLlO>`?hu4_qJyrdAhw@Y}bKpLP9$F!|*NHrn9>J0S*k zLmBLc3Z&^H-PsP(BId}kLv|DsK7Q(`m7hLlVsX{UZUW98@1 z*oj|&g%iID4SvU0IQx6K)jRzQuz`aR2+LN*17Be#XMP3%k%f(z@dcB6u*v`plA@J--69{XUBQi`s1#Q zv?cc5ij-Ds@n)4M!7(P9><=CS8kMkQyWx5f+H^k)8)swYkguMvVBsQ45SaW<6EU zbI?8I4M*BFygb65Y~S1My(0FJLy2YDQ8To+9OE@bn>wI!E8{~gqPfBR-u!SesfXGV z%hkj(?k~wNcDGtQ_W(w1xs+wDn z;bP}&<}pbt0Ghx+Dxp|4DB`&lM{MGMQ zx<2fsxs)>aSBjYtaJ-{6c3xPvuKa~Oc9A>qi#G@qaUk(P3dF%$5eIVQ7U+iXfGz@3 z2-a{}BOX!!GFhbMRClFkkrM`?JRKoNA+&O+-KdOXKKorA>GbmjI5fqi*cbASB}5KV z0A@imD(m=GdXl}H|EztxVz%x0=3jPX%U9(1x41OJ!2{c|*&X16NBKN?eDLbV=fu?gO&%-bhJX8=w_)q;t z7rHaQp0(2#&M3Gz2Wsf?bLY=l$Zx+KcVWuWy+7Kf@7}kMmrSt|e_vZL0EnPWM3T!Q z60`aEa@kO@Q?!(Gwe&M8#hH9@3IX47UxJn#b810>0tO>VcP?+BFZLfjy4m1+?!-lS zjC18-Yn@nZgYq}iMV%sH;!ngw96gDg_#x4SYJWjOA&(MWdN=h&3XoE;!EVB<5SiVO zBzlv^{V5ctlUXyoiB=-k-3$mZjQ~g``xq?Jp(TfAI8#7dho;!|Op8Kr-nl^r%5_28%#a2KeP=B+wm-G;qlHLvjGMsJGX*Z-# zhl?qhK+kH*BN)9gYDJliB=$*Ns>tyJdW2Hr&tiAa*=3zGezxwEHFhC;m6`{U{=hUu zD-T*7sK`l=;D$s$#3oB(p|jLz{v|ne3P=8_RK*kpbl{2N3r9!_RP@!<$|GG+NFY;! zZlM^jcSP?;Xnr=!dqu7yhzz}UimtxVRfeu|bhSVm9>-B2#XAQSQFb_4SJU*^Wa)Hj zs1!1XT&FpF#eWK!sl^s7wo|E5z zV{!nHI|#@fJP5EsdmJk}U_!E!;LU09Mp$#|7yOZvfJ*uq;*`KM7tRyb5W?{91pI~n z{4W(2d>W9Fm$U2pckGRq=h%vI_gg04-9lVNX+H{?8JvskngVed2oA_beE}gkAW3cv zIuO=Q2l9l@kroqiJ4nL88}gJr`QqCQGDjuENtA?};dix+i6kOJG`hSeND_$vy(h)7 z1F43JnxZTML2_VsYXo{U0X*7sxG zYn?mE_b8m;t#C+$6Fk}Rr4X9@Hi3lehQJ|$cR3eC$dIxxiyvN>!Lhk0^?qCYLahC; zJk7SPd)fAUwZeY>`c2zK715sUKOr^TXnXc!orjfUJYYw$*yH7gto#JFd;*&$1UW${ zauRpr)Y%I6|72YRoIZCFpWr+hg)SYmFkm&;o`oz&R=)y zt;gOK7oG2Y8yHWBUQoa>oI}zn52klfc>Ifkpyy zsMjAKO5CU#j~ST_egJN9e2{+gf3ydC zk$q+0M*BMLEdK5|Sjup7YYv#cabOc42N(6U*=0%qDd2 zXK=A-zZ;kB)y>e(Ox(elKF|4CA?>6tABZWd#Ft`-LX25 z8WKLpg~(ARvsCB4@WJ^JOSHbTobkJr&d0YPoWXeWS?P;#!7`Ts7sI;UXRpqk1VO^u zXXq6mMW}tFtHrvy2pm2=Cdino3t||z)saa%$dG>xg0!^dieY@YB{Hinjs&h(poY%9@DkO0(gu@BB5cm=2_1HNJ7D}Dt zw;exs!H%3di*Ira9mihV`O!<3H!%SsqYWfR1W^bn4yObD@1dc#;+8_pBM(R_RRN)DrPDQ~19-^l!}cGJVE z*zd@2RvIuc%B!h@63vqKJ6v$wrwF{ih)k+*p>`d4;}2V_m^>RwSQN_^Rg-*IBXuz{ zalLrtVrVOCOY6g_BkFzK3&53*)~Xh{It*QAFr0#s5dsDh}a0B zL5pbS{0&!CH2DOtfJrdngwbg#6uN2{Ldy{pJV=l{cJ*PKwCu1=TYK8N_FLhY;((y8 zb~$SD8|$mhC6$V*V`!?9XCVQ;!(0ap>Qn7VAxcGPkJ7d!b)Zlgt(zxVTYl8E(QvyW z2og20izN-CgZ0|uHXJk>LLv8HoRw!Ocb>q<83m4weH~o}^-M7Zn;CJ7PL6Th^32>y z7JW&VK0qP+JsV!|5nm$FCV8y3*R{6zhhjbXh;Jd{f>NzvZXayVVT7E9w z=MT0E1>^QTfCB!+F6hkzbc#N98iwNRDQDZV>vFCqSHM3`IdSeZxk|3YIO0g0waGfq zeN|4sUyu7vlF2wlCd03EM(s1d{bFZ-zu|7Azd{ceXV&hdH4lkEJ~Udc@Tce=}$Iz=JyuR7_OY{ckSOaa}J+3d;oLJ)W|{d@@+@_R1@J*)6wF2hoaAHMmD;r~8=C#SqxPyEn)44!j7WKgSLQwLaq3-%js{^(?ZaMb!yql#`lWmbceuX25$$d z>u%#-|AsPuj-4WRgJHfU6D|B}^AE@T0gZ(mH@;ClAEamCi=NSw&1mVFbhc;t?9eG< zq45`-U*Ud3rPVut!3E~4lh3nk$RDuBS=Rye2H4q3?y9VXI{+As) z|0_W7U$*ZA(1Frw-CN6T{;-E_2J8X4HQF0!K|$Ma;dCVyysI_OcVC%MJZL`VqUObO z`8qQ=LGQSM?HON2 zkoK^^T3zjCCOJE8WMCLamQJ(kh{0{`|KJ&fi%cUsQZpD;K+TT!@Tk{pXdzvDE6*#J zeRZ(lB}PTY`-BZnN*OK9wUA-pqD|KRky+RX{NmN^tna}aKvRmgMgjzw~=M`G|<G#V4z# zk%5Z9TTq|kms@q2`~rc5{%_HY{;ZYP`oA)efXDEnK@!-uU0TnvA#gQdlHqHwq|-8mo#dUdb`k#}(P^uJm00}EV)o@I^3uHN9YjyP=pfYqUZ2><_lg3;h-a3n>R<>7}TJ&LMNO92cNF=kb7@WoT;Zd z5`u$JR3}I(ma~9=3uQ(Wffc6SXD|CxsK=Ua zyFPux%6|HoTC8u8UHo7>ses(Omy9Zj3JD($Gw9+Nqil|r!5^G}B{;<}iqj0e0C3J= z`Q>22&;8Q|CId4Yf^) z1IAM5trBr>I={P<-F$AXHgWlWng*L*NpmPn_Iw-EvOrUm z$fYa5P-}^|RJbu84x$v=ayXRbYx7>P9N|48jWBcD*SPKa3p9<()6 z`q(FA19pD6+zx#Ash!wDBNWt_`&75NYrCuDJbL(m9fz$bFDti-a**RBsRz*GEa-9W z4Ecq#z=uPPX>wHXR?Z1Epc_v~DB-Z-gaZiORE85=ogqaEEbtV8McQfIbrFXPHsoTs zu)}};H$ol(#5t%+{|TI*T4#`V{=EJRTbDc7W+t|`#eEwC3k?LS$cVIn>$Pm|Zpi$^ zri@EyY-uqM*r>-^Ssk*7!JNm9JLTDsY`SmFUq=Py$FxeKST~zp&{s3#)m&)T9fW1}vA%4*=4 zL{9yL0wH`DHTqAB#gXxlK%>fIaAYFMTL=x}NT~EL-DqKVisAqXu5N8Z9|Z|$A6ldk zSbwTZg%xUFWx7Aw?a4yz$(NMZ&m~1sdmh@MOfE_X-DLAq>)WIronc;XqyJhgYms1q zR8T%wvcsNUyO~PsjZl#Ad!T}U{4&gKlmu4lpin89@PL6>V;B*B?J;X8cE-;ivkXxt zT7~Bc@h2m&j2VmI_B1vm948e&SC9qgxY_r{pxq-YcFChpBiojF5 zwH0Fq=?r~E5OrQPdsz2=t8CI+Cn)3qxkP$8A0|)}FxAgRkd(|y`4bC12hZVVLV6Nk z^uR5P%mw9%=9yq3vH!7IVvw zwtG8uSCm!n*@bj^zl71p>~w{UnY02ksm@@`XEEmU*zzv~4gRybQGhT_=Q`vAnFC#= zI|Du`Q}#}MUCC_IWY6iI0n3z~d0%46!h&$`BV2(oO2o&H8j`?>g=Uasu5u z{56^|ZlNb4ojt`Q;*7_!A)L&hc05;cJdyx=7>9WeA(Tj-`GwWJZVoIYPu?YbD6PA{f*P~DgGp|-gIWrfjIGlt;$OvX@jKR{RiFyGtayH!$dX9eE>7oK^ ziA?B$d~z_AROB0E-rgY0Kiar!;;O(PD2%6sg9KM!s~J2UEs*Nh$s|D3F;-(c{3^3_ ztsVo1Qa3dM_hjJ9+n{AwNp&>?rN85V=Nk-($=GTM**om|<}dPA(bn$TJ1p-0z8H2J z*Oa8FKYlfWh54~}z#iVtS>2EQRnP~7EXL4ZQw;F3JI*gT$*T=rq@j-S5j`>VtQRc1 z+Pu@Nua4@fNMB2_(^4r>?$ebdnJ!3}s%JQB_i68H54!`Lea+eJ39#7aL<-^Z0>Yeu z1MlGsOTyfx!p!XRpuIbNuzj>_uI>7qmWJ!s(ZA?xx)rUbYtcpo)kp*oDoFBp_$cyb z`pBMXnlyk6NNx+U3j0 zVd{cM@Z~8!D{E& z$!Zeux1bGKc=!;?ABB8GH{rTb9lCc&M@Z+T$LKAiX(KFUb9$!2uc$qdZ20lfuUPu( zV|08V6&N%U-ftAgvsx^w+i8`!QVr>%van#a$8c>a{c6G-G9YueJvsIhyS$c^2VJdO z1l(Uwsz~r%3ZRDaFxV`tWj-2$VrdBGxB~&?I#)(e)ZlG>LK4Z|L$GuEoA4`N^T>#>D1VuEQ)$hxa#*u?d%qXBW19gdVfv=HGuovBP9sG0D|zUb z=)mt-K4;BR4q^Z9rt%n{;jH=ih2LQLD26yqF@!Ao>;-=N$rEr0h$iWxv}pQBD@bm` z=t~z0(f>_rk*n4F`r@wERk{xH5NVj__iJWD9!Ro>uD_iPjTAY2q$QOqn@7)EICsTu z@i|{I@2=9uFzX)>>!I9-v&r^o-h_(W3D@qpqHftB5=(ZXQ+HV8GRl2J@@w4^Y2@ zjqTK*)436RUSkimChIR<>^6%wBq|nd8?M-6+|4EU2!4bILNTW)<8X*5d?2Prp`qLObrxD}I&|fYL{fX&v3Qhf^p$ zjFEWbAkQYi`A=SY+INHLwX@KP2{-7w`onqLwF2^uH|#Yope|8 zoL}w)LQX0q-an{i<5BjvdW139`VEaolkwk0l{RxN@ehW`c^Jz{O{ufjWm)##fAPKb^OxhG2cE!lK8Y`V zod3&}#6R{cS-&#w9oM}xu=tQ`I^f0I>j)1x^&4p5?ux&2K#+DR5b#(f5b%mq9^LN_ z{R`%yLD_}haRf*u2Aw4qKSL~j1}EV-@k1H%h7XqK*^=>3SVkX!Sxc6tj-2`4;$i#l zRR7W~nV^6e31d(OCnTTnya<0a<=z2y+Z9TBKWeu=IopyKi4FV2;>fipvST#mIEihP zrn5d+M{s=McQ!U}vt57p1YXsdt;qp~GPxC%cwxBgq0LECX_gUy03YpSv+iKi-cHjl z4-)$?#jT*h8)o#Vg;RTT6J$y zDy*Y*YIvJX=$h;bHcI;9XzEXO&`_XlTOpit6BK%pB&a)I+X<4SSji(!*W z@RI!Vb@b#Uvg=FO{~_6N9S|1WVUM=zWsNSEYN9jUqej@cr9ar@Hz|o)f=c<-BaCo8 zZiAMWRUZFiS8ey$eh)F6P{1LEr$Qu%cTEa{Cy)b3d*e7A-#(^G44y#^o$I}ltyo}IY(7u$7batJZk2_&^R(#iYWZE1?ooHe za=S#BfD^n05VHtwWdR(^$X;|7&VJFds|`NA`pSKq@9Eq8Q6Mlw3NI)_TCVGEniD7J zVD#nnrH`QW(%Iy}YNz!Mx3y`p_Rh*Y+l-`e$5tvDcF`yWu72M>x*HzcgR~e)A#%bp z#K7ekzLJ4{rS=d7>4xjbFH_h3&{BmczX$r&L59WAoI_`nz z1<0olIY+o&R(`@R(3fTFXYbhi8AC05&?5+(AV>PPr5?ALDOxJ*gGDRWEZ~%P$OZ%7 z(iUh9rt8Z6`EDUfOL)v*BExs9>u8iBfp@VqpYzcM1ZQ&;=Jjc3PliQX=;e11NIqem z2Q9b0g$R1t0f~t2l9c*Mqym9f1RT`ycmTC}b2p}7gAJU@ez-9iaXJHRZyrFvNpS9~ zDmw7UcrUvrKUPB|gH_Mll0)y(8MuGDwilcHQPOnN(Iu`&almhLilZKc=>9&^w5rzH z<@thRmEr@5qS={|+232A0`AXSN9%xoyi0fM-LkDs>K=_b18MFos-fl4>gfL|+CHVu z@}1G=C9^_{Xd&TW%+cgum;#5n6#K7N0!h0B6~#Op-CVk!PK@kggCD!kYF~Me1#7Xc z>S2SXer^9C^{3R`aL77k`()eF42s70SbVt$-WBeF^Ber?spMq@$HCXt8Ak8Ip$usm zwtBbgZ9ab{z+4S0$2NJ^U& z@w-x|k}r`IuhUN02&td-qa~GWvkuWHxodQ_rongGL!puE*E`v_tY;}3mc7TUd)d81 zfK^&|=h0{AYjENFbY1yM@YIU6S;eA&#EhiQksdy-tt}$2vJk@^)$8xJI{SHhQ!m(~ z@6ypQGjx@qulFJVIE|ur@|TFYE0($B@H}50n3Bu*Cx4cpU{>-y_EGK#`}WgSwrlez zv_$!q0!SL8QuKI0+J9i+@NtNDnhjK(CKy1;C!sK+;L`-=f&!U+`X2#cg)?y%te=yk zf10yAMm>G+zi zzjA^8N_WLy6lN=&iC=2nT4vRz&PVwhG!NlZR#FGMqkcELS?!9ii?U?@I!nTVk3-7m zkvJa9t~fA(L$y{+{ssbp&DL%BTTsW{?OJN`+cqBTS#M=}jU7hwQ!LsY<$p43Z{vki zB5=cXm^Jamz1^~{Z}CRQ0{Rmn}+r9PiBLnY;IDEkF>c7~gt~o=a5cGPKEB|lC-aD|$I{W&~ zA;cI$KvWbfQbVtTh=N^;(joMa-syl&#WKJ5 zy?5Ww`aU@c%sB6T|KRZCq@DBRyLMfBZDH2KhFV-=0ec^#ZUCb78DI^F+?AMsXdeLU zxrnTV&!U^2POcF6|9&ilA4`$G=uKQGXl^u|PW(MiY_fCPB<`hmL%Fr8!Z%>KnXufE z07*+{I)dpNI?c46*AeM78O19fYIiJr-j@936dM(pZvxJN9fo?fi}ccbF`7=-B&t9h zJ~8J_i^`_qLJ4*%6B*Oiea`sESJteH_H3>1!|5k7J^HE%|D%hEk| zciY|fHM;LB&qwb@rCIqDO+z+JL7Zx8Zz~49MPO|%le0qa34KH9pP{$jb9=yb?%T1B zMJDv+pkkFj1B(Ia*C%3}_+R zI!zJhz@6_FYMrxwMyTD~fK?ZZt6>(d7P`g=&(`d<{d?ZFJ6;AxQ{7{0WuCNxT4zOht z`dDQ1;nphXCU%Kt*v!?R!G9M|o_^I-Q0mp$+@y{Caj4KdBkN1+HwF?c=KbpC6Rlfo z6m)R5g6Dt5Es6xdSey4kJCU|uauG)g#15NY47cw~@n~8+`HkpmqKjhQ8={ zaZE0bSn^kfVWv>|8)?(~^tQ*xkE;i*BYUjZxp}GquLZDi`~{dke>MR1uP5HY3-q<{ z;sn~aGp<1=^9DHnH`}1rgc;!&GDt<&^m>5PeiY4dmh^JSrF7`&4ya4!RuDNgA`l8L zl?aEYLvBfaPLB0wR0Myqr;!~=SpI=EzC?NXP`dyr^Q)Np@1$h_v=VbX&&vIakPmgf zv?By2q{g~|*vlivIQ(7Jb&ky~+iwp-2cAR0ZK0ZRU{6v*{+X1}o9imM^jjwbFC0!G zYY`MD=e$i8BelwR+$=`&x-V?#0_<+sFha4rZB(aT_TX5SmK4i>3WmkHYgxK~t97;1 z-AMt8K#zw^KEa)2kFWgZMyR?aWHH5X^8@I6LErI;zQYAWxE9W#%LKjn5KrTB!i(i_ zOJY2svrQD3DxXfay?eOaq13=NSYbm|;$c?wdS zNgJ&L47To_6UqMLt;2P3@ZE-U^oQHjIWO1~FP$_^?9F=~UR}lBdQb^d)YyNqi(>Ql zFbF^=k0wL_RMYb4_(5Zzk^MHx?r+)LXTPzl2Q9V>8sBWqn%-&i?(SzxCJnK2a#qa_ z5~g;yExKV(>(;sKa#j7+Q@ZkLBW4}I0Ad}$Joi?DOOlJ5H{llBvHmf00Nbw<=qM}B z;Qg}!WmyVwU2$9j;}OMFuS4&`0gtH%sk@Z$Ci0_X|6E6cMcxh+Hwz zrWmw-%0#nhOtg9o)q0QS644-ev?pCes;eL|#m|XI9psM7%N?PiT+PPdQ%CpNm!JOA zzSyx6$;~9P`CcCEK#Syw<>8cg`m=e$6;fTu?y7IOdZ+H{MTa_-*dXEnxIBG_b91>| zh5D!7V=1@yLBC-LbcdmKV?vo_Z2G2t9LbG-xd5du&mzje zjP+tWHiaY?C&{zvN>Xrj!KiR2$c2h5sacfvZ4&H);Je+V?6d`cf5!geR{hzDROM&gJ;rXiye;7u10f+%HjL`eBb(2lVpn6) z^otV77E`E72SU355&@=GWBC`t4D-#V>oiN%>G&Ni+|v?Hjh*|MIhjjzcj+~=+>e*W z*p-)1M2bvy?WVR==-N}M%W*eS9xq&1k)-IoyQf>b*3<2xOQ}Plgn2pB?8}&Dzkgee z&0}vz8nN#jboN|s+gy?6f*nl7&sGGiSY4uJ*-GK@#%VKHUypSst%giH+SCZeVyf= z=Z2IVngII5!s7UZwQt8d7Am@JTMKL^lJRz9ITlFj?e@H# zSKSqfdjbup)D2(Sz@&1i&keT=X5P`=mQ5dG#hB_sywt%+%J39_0E6E`9lMjtUa+i_53pXkjj*XKQ3t<$z;7!O+v>n1Fr^(nk2cH$I}X}I>=8^4;MAJS(DrSZq-je*Oa3rqh)sU{HCwUsl%K0R-ac7Z(Rv3#Sw&Ki9q}!#0i-KGLaj(m>zOUL3#U3(m#cLq9 zE5rjHs&wVk!Bw_IM8}VlY+1O{prRQ)tn}gW_EG7h_V%k4_SNpc(vR7LKZG~Mp!G3S z8;+i0vQp5~utsA^JcwE$U#OCdLe7;6Ikz-~oDHy({|l`l-29n=k5k8fuupgY9S*nO z%9rqGi0h6qUjz$XZL_Y*vW2^B-57V}V5n9?L;(m? zV3rq4O`Iok`9BLsnlUQMZf?y;D_gKzUOwB2yhK0Co+xUo<0);rzDJNlqc+qx(Un$7 z3Yv4)ePw;4viRO17T#hib5@iDL7cL=e|L=@I6aD^$rQr*SyN=%$8ujR=dtTeHmJw9=Y z&A4G8xVekhcn3t!`)pw$z1Usf+3X$P5(7R@Q$->woXIt8s^lt8mE?3HJ0x4nOVpjY#Uckk4ymiw9)XzU_}UjpKVPC(@`^&HP#W-zi`+b$ z?x=4xf9SEBJ|nA#0~gZrs+s(_QP#IbS4+5knr%w#VH*>;Wkr~|*L3sTZFC_RNgyj| zgv5MIUrsC%(~2{S;&6F#esY3-WqKIFPIiOE~JchgUD<};+S^J%R`oXKVyK<>jEse8+xV|1L!H;Hl z#W=}Q-M$`^i}a#h?4GSFmmROl;mtiQOs>=wU#t^}W$}s)%9z5`0?5UYWbt$+?>Tnp zWb4sVs6-CB*V8P1`pgr4oZvd<1f?wY)Z{V24C*`r)bdb-7)iy*W~Gbcw1dvY6$%)tP9xe%#rGd;78}kRJ)pNDVY9cV?Lg>iot8DbJ`i} zkEsWvqukYlv3UTD6VY~w+W0n_PJ6A}*en_{ccT_G%odJB4W-E}L z9JYi(pyyB6+!y!Q>|Gq^`?mwnc_6b+3ew{-qQ5E+nX&m>yASuJrA>Y%c%e(n4p^%J z_w)0H@bgC66_;Sg+RwpLLS}4}=0)^$JEvQwTx3(>FcOBcFe!3(BxRXS%zE_foNQNI z8EuWFjMHp{B|Q1IJ+_lo7)&jAqgTRZNWf((hYScoD`X}8!1C$t29KxQHfrr|OUd4E z{g9sXYpB9Erb{1tGzxFMF^-mnoTNZmqWhPlTN>o&E$>AVZ=)>lD99s2CGNsHy8o3q&yN(y~4F6}P-)JxAKWaa{ zQ)Zuh^p<_~#fSF&{%<^u6vPe`xH<-dPY8A5M3OLYZ495BrhMiKWsloj(0YEECREf! zO+fyB6gjrNyX_Qrnzh3krPHrnhX?+V7Z-TZ2a8ooFTA!@iczwj$vME2b}AO5@yRh>LV!mK2Z; zx%GC$<%Vax2% z%{6#x8GtzonA1pQg99q;>F6lA#)RzYV*NE~1AXFdb=sPJ*1X>$Ytra8YaV(xqE|Pw z)L@J={Wm>bsNR1nbZ3)#fJI_2n@uk z1+t7wlujJf)hb;TDtd9xEpyqIx^wssp^%3b`8ePLP**^?MB&Uz&h`pU`VwAH*23HE z)rzNV|A$-bi_aMag!}&k>H^jD5)U6g>S9;T5DQA6kshI9R{tp;{woO8N(>VXSkrl@ zP(we?u)uFMuob_2&vq9-VcBy=x>BhdmvpZ5rJcXmKgq&*tvEK&%OQUUJ(^f zNf8xK34}YgOXW1CA%vrX&=9+lz-vL~w{9kQG9G#cX=Utxah72+8IswXl=U`4t?y77 z+;3Oj^c2%*x7n3V?zJVD&u0?I56d_pLHZjzr|8p_?pm=c=Qv<0KcRF(BdUU3=Veg? zY;$^NE1_R;|D=gF>Ba%pBxpRfE=K5k-EWT+)wt=}nJ<8X`;;RtR2(W@Lzho_oFGRB z(hRXb6@dDal}0{Hth#_Z>-yqSeSev*mg~yFvjM1_Us}QS zKwazph;lzrz4#p-8G+yHN(DaQ+kHhLU(uon4CfOkJxRB5RXl^6^KZ8DXU5xGFRZtN zU%qJjzWWY>zf=e5cpR^_!zU>L!2>!96l-bjA7zUF7}s<=KyiJv`)96HC=Nfv*Pi10 z&LFZrh7@V(GzdYQ zKAl9r;2U~zi)s9TyDf6WDx0(MYv(T~XR;WLf?*to%qt0=KaN|y)vj(j(w<7_YELJ1w@PBwa*8{Pb#HQXZMPOE zEKG&AmekRrhO&R5IXb#QQ^0JDrL1`$SrED)yC}PA@a}<1^16AODRm}5&;hgTA6F3R zuKWws^iQJu5gtqBHCoJHc9uO%3uVZt65i@)3f|-F(k9Wa8rG5cBC-eFj&4dZCF9{R z+f(jUb!?C6uUqCSY2nVl66>~aH-*+CP$tf8(ZrkSyM6dN#`I}B^3pQ49U{HOz(~HB z@jM4#l2FRWQlVBUXlkYeRk*`-@P!NzpZTVxq5^i)aAeikPurS3G9&uY{7)u@B-1J- zoU7zeDY?vz>t!2sKdW?S-9657=dXYdsgtl{OD9h$Xo&EeJ>z;Shl?R!8^Eyhvy1gz zK?QMGgnCGq>Z(X+TqYO$jINev^WZ%0>UtnM8j(Lo1({quIFeBTK&DBmzpt`lVOiqL(J@y ziceE*0_~FWI7*m&jDN?uc4!aMD9;k*wcwuG6Bn)l<5LJ---&V3!(|PlI>*EUc3%A~ zrr=j7fG05_HP8T0B1Zi2Yg_FvPr~X-Km}0QH!q)23uL%`;GMWVMZDR?F5uC- zbhkD~S1aA0#+im(Zue4|hUK~OJ?t4>EzaRNm@+&RlF<1}Kn*Y^&CQ`w?d!S~s5tq1D@LSKTR5(uqiORg{DdLacXE!+-taYg9>|7LH?G$q zbBy5g4Fm-gNeAHBqwwq*E5ES|BIn`R2U_ckhTGcs>un7+gp$}^R!m@x>*#443V2wi zQ|K?$LwS6AijUk8RqBc-53o`UitFsR>5^9mEPug5t&$SF81!Iv+t2BdQzS+TcO`@ zG3r2_uT4iJFbPdjb|ZE~APjP^zauHIry1J4Lwx;E5QfA_tcfY)h*>Q=GF;mOKi?9S z*02j1ZMbB-J+VoW=7$}#DHY8RnFz@a$eIN-4)s!J{8j-_xEh z#E_8h^t7c)p{YS}GIixstE^CtOU5L$B%zZP$J2Wx3z97$22K1@jHLI^H>Y5dI;=@g>EH+>_$T zgZK{aN!W_$JM8f>{V6|*iaXM}-Mh-}r~fm71t=2b)Z${P{;?qABQM)lOh188Tg#1O zsTfaP`L(V`D5$ij^c0KsrjCs4xfM4}he@`4;SQmu+ySGbb2P>22 zuq$qkEn}+!za4t7Xue~aDAb&(M+(-^nkV_=BG7o2xF#~xGIHZPHn9Mj#**C#lBL?k zA$_gm6+<{Wx03eVY`Jt=^OC4^=5a3974YD%vjENra&pUw-%I1J;|^gX!c>aLCKg*c zZ3K&zsTE!@jOH2HcAxw0KGvH{+e^}3uKgLLLhmAnc?Hd$#Lu}VKxP5N`{VhJFpbk@ zY{4oJb}xnEJBbRDHlRr}ycuy-$LkO+P(a|30=Y#l-}d(a^su#19B<7&scTUk@1PlJ zq5{oKcWsx(Pa*TB@OORmdV3PdL6)-cYsBsk3C!@$LI-^wPt30R7N+$(Q2fb@LMN;t z?|$|(1f&`MT1%3|8oKdtediOI-I9=F{$Pp>zHtL1?ZKE4q)57brSbUv%y{-{#^E>$ zIDTsjFtB!7BZE zf^?PdoSzU%aKJCnRh4_r(Z=$D04|VExJ*Kc`Q_>ft4^j?OD2KLMqaR9>W27%Rx)>} zz3^nby$HW(=jz$E=lL~=g>JP2AMLWed;Vbu_I&`6kdNt681L4&5-M5*-V}^gI7R}a4%p7Uhf5%5Qr5?o3d4W+ zgS*i1g7IQw-^2U9TBVPv90h zb%Hj3>?G`9K1Awe`JBeJg*uXje28=JWy=a>_=MhsCQzIT!+gd7%SjxJ zs0VlE3Q8JG0fw@GZ2a=~Q2je&iOkO}*oD$3tRsPZaRbPm&Yy$3_niE^2qKL-?zQmmQ@|L=qH%y0pnU?63V9ew(v8(sVITm>}ALuhY2qM<+j&8r*d(Y(H1TpC3-jreFeTWpS` z7Z7Ct)vg@!tPJd@@PAnyw~Bq)*)$pXYs^CTF|AazSY zUn#vWJ07AC2XI|I>T?8H4llP=26l=53V8Zn^6&aY;P5s;A4|eEF5!OrvyTY(-G%!e z!aZ#Y7uTw24DNw}uFC3TU9YHBG+jSfeT!T@WU3~(fgf;%&@X#Xj0-H}dOc2l1E%3w zs2!#E-)mc!#@l;^kJ+A=a_p;@^PMx_`|(Tm!`E-w{%_v4ec!V!jkTqR*;jU?_JEya z82C3(F7ylNfk^*p1^7YEzso>i2~K(ZVk`mTU2Y^;(p%>^d3C#dzhMb}l_ij^2supC z>=2rxXMcLnUM^p06*F%k^XK^H1>zw*IBzY7(@ZQ==e(S$eO31>$2ocD-@Wh9(JzrX zC?w}En$aKmI_^gtAy@u7feB9 z>v-t)AOUYb$&cXd+C4-PC{dE%M_~@!fWI66sV5pcCT3XNTK1r<`_#r|e`w;3#5_vP z>C$P|GNhOF>oA(|Z4e&&Chl3H%0t|#bpk&YfI#0_0EM3s`4nuG>Xghx$1M%*hsn3u z)98NoWlrLn5OuZgwA-Tc?Xee+Qy%}`7QS%UZ5$_%59IyA)nW(#nS}6=F-ZQCxBOrU zRo}sXJZ$%~+H~GBhNB|JJ8H2E%C)UytWDc^YH*^)#Gb>ra)dP!B5Y^p&NS(}cZjjx zof8n>Nh0d-9Qv4~t@hZCYSx;OLI}|=%1{O(l@8xR=8V%zXu4_ZeZ-_pwN_Ta+gL-|m?pL(#SIZ_?h*sXefD(&94GLX=PpthXc&_m9Ebr}RHVUc!c~IUY zD6gev*izn5#=Dq5UmlKqEx^c1X0z$MQTEcavu*eDnRf8~9d;0f@1OSk(>{izyyx5Z z?3;a`Anf~@{qPeid@K(+#!UaI>$|tPurEh)CyC0$<9)7n-{wXG+Q@(qYkN3QbMI3 zR;A+#uqmhH>q_UCzy=0WX(G3{zGa#YNuT;wwa2B7CAth5m&H<& zOr*8uqY)ZDo+4xqyQRl?y~&$&@W|(=<+(SCFXyhf8zSgB5Vz3jE22PKz_Ld*CQ8y7 zRZm1+Y-*IH-gdKvHiEB46FvwHp@$0&LC9y{C*Yh14?}|eYWvEQdnG*Qzw1%#0{4gj zRYWS@($;z$*5f?V=Lq)t1o=ig|9w>}q_?qe?dd;jEXRW{Ca!L5K&DU6h4!GdA+7En zsE=I_B`!RI=^t);vmWzpN$FvlV>su_=kTJ^tA2n%jf5Vlfv)wO1{GrXgH0n9(iEoZ zccOSH?V6m;R(i^^(>B2sSoN7DWqoh0`aa4_yvI7SBYyJD309ockAem#s2KeCbC5Ro zOUHCwy*Vt=-CeDN=Xz&Bx>~H~065=Ks0UU48UXGWxP3ym=6U!tki+YtKscu;MUc-JP|xBG8a z^Yy#T=&}lkV!40sfp0AIdvq!H9i$|WR>z^*U)Upj7%8ozcA9bcGstPVj@lvt*ZF3L z?Q^&&XBhAyVi(x`+T!zPz%F$exhvS6WnR}8NXz}T|2ktKwSSznpWvb$-t)4(Sg_Pe z@z@(g^UYJHU93>2L`62|lQ$&rp)BUJx>G^Azg0zqPfH4T$ZWuQ0Tpb2IhkruzOwW@ zaDG8ia!;E%bei3C8C2__5!R{qB1>aBJ`wQ@bX&lBK*b8lMV^YvVqih@CDXG%wOK1Z zvtV4b#(J*0njIW!(JGCM)Q~hd!#T*T+T`RrB+Gf?I(-Kp!}82%-($5=R&@9QO-}+EOI7I0J0sQdXtcH zu1mEJ-KpDCrf=7A3S)Sb-xQyF>9~v39qvUXts%!J=E^HuCFZ^6=&O$(b1y3p)|aZ#N407$sz)z)+N)qwjS_#I($oIL_vK| zp}sEF2J6CQ0P7)g=Gp3~(1)v_-h3ZoNFL%j;7=>b&#$jBFH?<~Shc%VxaS0WpSV^I z=4uc`6jKxQDDxDpcp@LGlw0=|vQX<|ueZXPx7v&A=GYIKH2Ux*`_akseDjg{_I~$; z?PoyW|HChU|3?-M9;{`7IGev}kFoKK)mkUX(odd+&iU(cnAku%L4ugm5Kl%)5w=t1n^3CE&PIT|ozqow3B%*h!Vk69R(MQ%S) zJQ=6N8kO~)g{f*knPP721OJ2}MR7QkOq5~LZn&%Nc(N||ele>&%i#3mJj+1!Iix$5 zp$C?sD~|P=%anZ%v1_`{r>MpJp>Hg`cUMV}gr--ilM!mL3-NGsrZed@7DF+ak<`&~ zTQN)bTD$NrHs;1jR>W;8jwcE&z*sIX;3jNnFbRd&g=Pf=rLu;(P!I}eFyGa6IAiCX zXl29J8@kc%XYJ_x${Lv4=wLE6Bz}qVcA14G%F#*Qoh6_Um&(jU*i41ZJT;pJ+AJi0 z{3PoSR_wR78uJ2N+BSM^3kq=>fevolb&|E~Hrd)k+IGcDX%RM7tpv+umco`B}>-uSmW5$|oY2r;txJLzEOV=zjv z+~rvABFgF|4*jr5sH$qkP+l_K^~a~!-#5;+e{5cD``+EcAn%8EfI;5x_kGPyj&Hy_ z^0(~%t3C9c9jWGjYH~+w*-Uy5S3#ayyM{ zcjZF+8n$eSf^!VO9|!Ql`ywst@+n>SvUR@SeZx5cfS`U!KzCb6KlI0GG_p_FVK#yt z+xLOJxvS82E|0U^`S)6J#?9Oa+!wY~*?1vuz8ITateXLb3lch8k$|uBO5A0{s_rmyEcrva+14HThc+6a7-tHf~Q>QUnd<& zP~d{t?!dkWUHvYo?q1T2q!yjc4*jLlvj@@*zizB16tzIqL%z6pZkQuHmfqlWsIrfnjs#3%$S}t!Dq*&nDVxEgAPC^C(Hgo|u zEsvX*Idz;Z8-BZ88!^Z(4eo0}j492@Lp*nT4SPOW+6UI>65=eHU6F88e@r1a4;{Xk=u~2 zyJ(Yod=F(!Al$2jaFwZhyULa93RPhKZ}?a0Ua1JdrwBn8S^611UFn&9_0a<{Kei#4 zhebN=KBcmH>S=vhuD;Bb1cP(<3uZD-k&9i(*UK)Z4of;mAVCVS3C4Os{Ee13Z;b7D zGSNQR4)5lJ?e_UwO6=dVUw;0Edfd16<1atB&3^}eVfQZ@9j9x4u(P%NttCkva{Tzu zi0U7tH%~klv;z{=SWEm9HyZNlAbakPgQi`wI-62+MIop6;&_=$%faRk4 zO5VSl1qt`~PW%fl09s)F8tg)Z>Vrp_=KB2@vj5-jwy$2vw7=#)WUsABv29OGvVz%n zSpKZrt!(aK+XVErjG~Y`L-&+hB4e;i;c!K)2%$fX z()=t+^Qq54(}8IoRXcix{U&Tc!{<0bhz7L|cs0Wiwf`bTmo{;yI4Mr(l_v@PAt~R9m1lvgUYdyS#%@8!Vb4%n+ z3d!sJ^1ry1?uMHuk$35o@So%1U%p-+IwRnd5y&Snr8kcuI6oTjDH_O$A?j4@?+XO~ zo0Y#}2zuH9T~W5ez~lw4%G`4YTu=}^_WU2Q|h2+uGDidY-WCaTG`|ITVxjB^oTr5z6DJUfg$fRhUmvozr?ipoW z!U%_m*W02B^2ko4I?K`J-Om3c0yC@Vb=O;ix*@S&@W#xBh0LZNAmJ?)>{Ymbdh=-; zmb!y^4-)r~i10ClN$99hw%7D)S3)F5fp*fEx6kRcp7vfpaS z79``R@ihPO<24q1>ckONW*m2$y9IPsa*-^^N}L}Y)NRJ$lWv>0X18SxT)j{!!@rpd z7Z-R89+7)5ISP&E2-ZP;fTQRHo;~@S{p;8NWxr!B&YVRa^%1l)0YIzAb$tx3BiW$xG zm!@FEx5o7+Q%Hs}l}h0^{!Uvrd7!ll9|fK7c5Bvmfz3i>CJGZVeiPxrXi^5hwr=>N zWh*9NE5>a42fdUcm@H*ISl>TlnfF3qD-La znef?!6Z6;z{@CVfdvfOqOYwh5S8bw&qVL=E!im-qK4aT!*^S&Kp6M9H4X(qdfJ#AD zL*c*;B{g-clrb>vG&;}CzJjWOhT+s@85diH;{PFg0_lb1s=Y3PQKYj-iB5>q?BnGI zVu{IFYWtB!OrUn?Pr#5w%zz*@l>+Xp{BNyaVxe8=yA!t2ZI<5W23s{@ifu}1V>ubD z&znx$83t%k66^>HP0mbE*TWL1sJP<4m=uR!7ZtcG_q7$SzE#9`QO3rfl~RffQ9zL! zdxKR{oCwquC7ZI@*$!Ejm+S3`vn*tSjJE!nWl`naSI9$yWs!wjtRF($)63fETXmsu zS_Y;B@tca6flTaBe}JI8E@6O`-+vFvxl8QZw+ik3-7neReecpTWK+kXeOL{IwvX1@ z&$Jc}!S=5{L3%(x@9Zg7eV;gJCr(NX;upFAhwZ>=mIw3o5(_`jwU}kqeukx;9sr9zs~$``=7J_4?mK)1bV?K3M7Y*(;wOUy`A3A_&gIsKZ@G$ z_3QTS?icJ`Vv`N2Ls8urWF=DvP^X|XjBwBpQ+> zdMHc7eQcNek&Hk{e*6$yIkvwwYdjoq-C>cVR@>Yx3b(E+IfA5Q6h(;!qZ2wFqcfHO zC4szT;Jiv}%tD;dU`g9EqAn6#`)=bQy=s0y!Y=28CN3;jk1|4YEuA76&TbcLy^tPk zdv&5+)C4LczH-W}7agZn0)rEXlg1&SHWgqvnJ1TRYyG7corrZXoz|oV@F&p5xa#T* zjLk^9qis)na8jaGahf)BOT6GrmS&kk6wFOeds3DLb91iE@t0wE!dFe1WJ!H`SxD%u z{Iu)YeO_!&Z2o_#0WyhRR%026s3dLCHUUIcR34DplGmMV2v?lRnMto>9?F7Cw;r){ zAl;}X4M~h)SkM^jaOF&tRiRKbvDYqg8kIm&lpWXseApg@CcLnMrX=Pr17`DLafm`>a}o>iB6SKc+C)+^Boo!`8aQMc^eqfX*dQFOwAr*cZN7_N7D-j8{oN-_rO3md0NR;mfyh@*Pf| zX|rs?68+qUtGfCK@lf3lC+r|T;a7VkGIzyi-PiFV>ON7VAGKIz`o${PQ?2R+wV4mS zZdSe`_X54C%GkcvDx0__Gp4U)0-p7}56Nt7#x`!FIgXSW)2U%swqWKT1W^uMOql$1sq!M}M|sh{XN!(--#rKQ~+D%7wP; z;V6hDw?HGKSHvw-XzFFD$>2(JCnP$x`-7zyJSg4>nVtQWb(`pw zLYjrcP{MR{C1^oiI||s~jLG!_<&Yj^{cf}_q9fSpfVJsNeZLzW{p+qtgr|e2MiDSp zA~!JTC0MR4hWgc0uqcw>_tu)#H$|E%=U1Yy`J6aL?8dKp(^_0auQq6`jq8TINOUxr z4!0>yfjhA=y?lR(-gyc4YH2aa^x6_0T#Q5T&&{by=D<~9jhg4i4Iuuz(YBK}J_iJf zh$4#XZB_iC_2pq^eSWCWE{ z=Fv8Z+q%yZF-3kY7YvoU1J1erI8yt(2RD4JJ)Dhh%O-HhYFp{e3RaZ{KoU8IQ)+Rpqsx7TJOadig*8OZ< zrHKMpV-6vaBSy_5a0|_#`=c6)C%MQLG9-ocXBkV-J4U8z+OuDiA47GVp818{ol0rE z>1eyM@c`>{^=L@Lw=;##kXQ=(+R1FQBx-TxkYbupl;ki)1#uiqo!uo0i=NcgI#~f1 zvk(J08|8u~<{#CU Pzh(y#y5Dp_IscfW}2@t1a}8Wr@~@2%z(!R`SnEWT<&AXP<~YB)x|MDpaK@=NX)*6~8!xvs?w1?Jk_rn)FL_;UbNqk?@p#HX4_aI33V71KblkRSm@u9Df z&lc!@ZRT5otFSG(UWYpZA^H1DKtdbdqX+hULJIA-@( z9VCV!Px7U2C2$~3a$CflF=?Pr`xd~yxKAmS>b6a%6WSzDx_N;1>ylkZtlxk|y!^Y# zRK{7$X5JD<7v_on%$@5*K)A@`N@I>ay=1p6rL)IwA#m(K@0Eu{i|EpMl6CKf(p@|F zS4~E^`_i%BayZjyRibk_b0<7$f}9j8GReFe1z-}}bCge?YBY8F$^5~!_aa=Bb=ADb zuR+&(!#8eHWqQt+=z~JP3La%$>B&#MDcbTAnHs`!;LflH&UAP|jqHayS`GH&1tB@e zm1VqgtopZ(JS1TZ=A${q6-n$*57>#r`iB1t>p(n$VNkl{extvVtIP6<=`}{Mk^i%j zucxs{M0j*UFW<5KuVmXR8}75pG_sjQ(mOJgGQz7$ zVu%U_?z+I-VsjNt{HHPC6QxWAgqCDL7V9EpI!0jz?at(<-Zvj5!{8u<*RM!c4HXm6`8*TgA_=zv#a;P($QX21fk33` zur4Ti$r4p+H zH}|#`aTBd96>7;$SwS+i2HdX_?uo3pBSrk_iL7*12d)8@{l69{W4Cj4?E_s^RT>+rty$u$+|ZoreXmE9$-T%eu;PZoY_Agu*MgPcu;= z0l!|6&;hs9(H2g=(|Pt%eaDOP?4%%+PIZM*U}nWN`*h`=TVDU+E`7-c_n~VAl<^9h zmlN}qQ4bfzpk(GCt9W99?OG9Q&lfyqpS+f5@4QxN@BL%5eYs~hqUb+Z^Cwjz!DUObZ}Q;$c*+1=Mbo}?Af4z;)$>scnU z_G8aU*MqgeZ#%@s!IGTvz$>)t$5M9~Wo@oW1+jQ(5bK(vE(-|EE_e5wHaJxl&_oy& zR$C#JqeC6hZI;b{7N-5b;Z&jiDu>lc7zw2SiCLf8;CWR{WsLx@qioKd{cT0eSdu_e zo;2QSDetWzPI*f2*H=s!SEO4|l)_hJ6XAsC;f+gh>&l4aWadqbvzyy=0~&W&aOf~M zcl4wQC{H=5GN@cyeVkL181zAJ$~FHEK&WCX$v> zCs-o+uJPdo@>CHTVw;G7;B_~|cO%PA_lcY8VRM6b(V2+LU}&jEZsD!!;GFL7QI0j^fE&uUt7z;OUS#%a0`doeRmJA zXQqwhyudpmVp-)-CIeThtMz}5RZyElc8*s-C{HNex#0;b)7QRG|NRXpCF-v$iMcC> zT=!WTQ@9p=)`5GS`><5~yHb6kFa@dSO1M8&gi*N^9bbHOjJ;U&xP1&Y;M33lW?z3x z2Y?*;XKHi%58=t!^?it4-_=J5xR3GRtA(|6l=7m#=Hw9zat%whBD`T@*TfV>0a)>% z)@6vsihrd#sQ>kZh)wQG1jj~ls%mNIe=i8vl>_q2x^nOZ>c1+rXKFDJ((?EBN5)$JOEuIm%=!#oj!Of=l>Qax%H;-Vu?-*&ok8H6 z2&Z5OQ^P^f;3C3UgG+l-)h!Rluyow^A?H*)aznRz97~8GBoeLFuIT<>>S&Erzy>^I z^Vfap2_7tJK(DxyQaz9+bnn<)ij|1yP;hu;wq6D2QZKc*H~xu`0c}2-jezcNxW6yrchE}{{$Y={`Gz97EBo+(CS?l(^|Aua*Tg9gA8%fX^wpe%K zqDTVcR)__-!34?~bBcekhqoTKl;^*<P`xR*w$uJiLnzcgR zQsFOOSMWdUs0tJX>pX0zJZu>yLM6_*RMq5QtCAw^{wa4k`2JTX3qb37XzuD<_=4Pq z=bX=7D>S<=K^OuHQK}Df(T-UP@RhX+QxaogaNed1pK`u+Hs?R{^nee`M} zD~g`5BG#UiahEHc9~O>Fa8OjC2%i59%wNSCFQE1vQFe+kkBB2{MASbH26K_beyIy~~;g z53?sH4YGBK!%_F@k1Q>9g^U}lB(0yV7qUHsg>}6w&MAmg3yBV01h=7X2O;qYyneC3Zs{m z9AU4QDr`g9Ryu~FqvX&M&9C7EmpL>@xO+=P<%s>=xdn(UMBBx>H9fF(nko!!Ob&eE zNSiY6uXZ1Cxm<73u6-7dqON|aez}-Yl6eor%>l1m4|P|C2vg5?26@M{4gav@!Vj(6 zpbfmn3D!EimksMT1q(O8^<^ndlFt?a@)gdt3fiu2=4hS{?%VVnnClL$2=s$Fa%Mq1 zSpK<+BAhV3Yop&*>nrJmqu!&dhLHMcdHf)K!nLjzt9HCn&n?o`64@B{*_ZSjbq~&S zF<1TyxM!D?&}mSzn3cjn8D-^i+;s)9MA^de_Vcc_j1zunKm78UeGe0HKch#7U=|!8 zC;sV3jq4Hq4Ex|9{<-GN5vx9}5StGg)v^R!>Hu=Q4NC$W2QaSx^(p=DM1vOBJ7rfR za~9#1I#+zwi?~@N_`9_{%XgjOyMAL4@vne6AV5}wF5rRVFq4l#ovLLz>fmP#GrwoQ zyi>tE=6u^a?{2!~H(FIH#WD)Xc|bNljZIDXt|CH8FSIVxnSPF^n`qK9FMW`W8Zgyb zUx=1-qkC**;x-y~d(d$w7d^){qYdF^TCsP#` zmu3cB8erT>Nv}N7pLu7WymLo=QaBC{yGV)c9d`ZXY@3UOfnT(l1`vl!r)E0Sa_PA4 z%Wv`17rVt;Ho3=E#|(xpcL#5o)^kdKD^BOF5@hE&=UgR+T}H6NMA86@*b3QtM@A1@ z6Enfm22zs=p{C6*Z994`4fqpm_avbNwwfTCx%B{hewj9)mPI9;2i3=2k*kFUl9X`j ze*sJ`JDnw652Dod$d1F-^A`BVjYqOmVzgZxKFxY{)4m0!jXJT7vHLU{npjV6j>j?T zsH(VwbPq^}zOL=bf>ltLDU4{+lodun_t+H!9<}9Ylc<)JK^~m=;tv+{{I_nsrx=F| zVLZ+ku8H$g%23Z%G908>+slZjLA01inLH`;8;fG`Mo4%HKX;P#Z{5jeM$NENLbYNL z@f@*Sl{ya&Ji-#t!gJSOx%@WU0bS2I%x(QQc$cYlcOJY0dGg-+Z*<{xiGGCZ`?yNw zE>$e9DyMu?K~yD33&%OMq4Q@l8^Y@-!Ax&iKFf~a$i8EE;CqG#st^505esV2QMNZ6 ztG0tIEjo0(+76uL`V_!D%Qf0P)daLPH2IIIfsbocd*0LaAP@$>ZZzOm95Dr}Jr0&9 z0V5`4V(F-8aPNlQdr-^Q1X#)U$YPXnrHu9lK@eNrj_!! z;7ov+<$wtP32?eZ_Y-$SOYt%krutgg*7QEMg)iEeG}y9IZ?i#g_gY=hhvw4+n+gS3 z>8uJ-&X=OX=@qCHHc#VkJ(aw48uSpUYDBO6&?2s67T?Dd4O8F}tFA|7Bn*{*N2LR) z3f7LW5~>D$WE)nk2$a4dHkg$zbD5Hj;&%y`YZVxV$RNlbq^#OwP5ayr4{3n4zT{qJ zKjAO?1V(|B4ErPp2!8mS}%T`<3Q_`%|L?zh%7?cRH*L9h{!;kE3U~RFbI{rh$u)l? zj7G@RL0#>MxY3jZpx36bq>Fo1Mzreqehw=y3rSgj0=$s=@VU;l3VYA5dyKxnfUNI$ zLszf{fjk#W1j48O^QrYh<5T+NJGyGBzoAaEqxxc4v#3d|hLl$E&`5i=d@aN9Z`=Ob zYTH+H5H1QteXji{q2~FIFih(|c#0Cm&u0!;NR4_vztTd2aVxo7iR0-SSq(@p`sf7z zs389)zxlfd#ziLpV~`7Jf5k0=LR{uysJY?C`S2*ryPuBzY~R;F?)mXOd-rdp_Eydu z+cfJA%jL!A^V;*6s#E;xSDg2m-i_b6!cx3r=r&^C?f8ui33u40q`O#pJK7>(bclzW z^311o!!LFEw;u9@I+wJ9ys02B;n~mZ-iKc1a8MQr9pkuk-8*Tgfczn#a|__z#&>l$ zyll0LJfL%wYJr4y0eKxkUQiSLj1e|$?oOM14)WFrc|kftOylgf;ItKAvEd=vF7oxW zPFIYeRGD@&wKN5+%DZ#w-X*oP%~%$H6;&pG6*4K|W$|}F%fHiZ>NW=bYFt0<-Mc21 z+9NNVwzOiRSKL@C?oiy;R8P(w#5n<3t-^JJSQiBXNbNz8KNR}rg3O0rsAYlf+ZJ^3 z7;B6TYKk66m$oRrcbw^VqjaQd-o2|7rl(nfD>rov0IsFV<=wzr*G|;m$n&*YET|D} zD3E*G#3B}u)za0jwsiD5)7W~Q2*Q*3z4NxRMG1o-?fLte$5m@5K);tSbRyKDYVo+H zJ(esQ&UE}^d$F&ncIAb4S?h@5=6?$Aad0VTLt_dh2^8g^Xg8p)pdLe%g8m$T&hZfw zM|yQ9^?e(V_on-PVaoYGpUBT@^e-00XmP2+l~MvXSGr%K50`k{qkx>GBXme%j#qxQ>@->CjUsp`kQ@H zuYKt|_WK`<%)lHuihK3__B#>mZQl1L#b!# zrs)OMNX4{H0Jn3yc!-u4+(Q|4q>X*#Z z7%Q2LhS$s+ZFBMf0xlY_s*mM4tX8HgVpWLn9G)?JQ_Lt^G2u>zKyS0g;h^Bk7<)96 z+)-uR=Z`XA`ZL5bS|fyjPPNA6nzJCqBMny2Z@_um|-dAy`ZIo`&i|9hy)ZrAW7Rs3*mLlgI*%tX-1i7xCyJmsjD@G2XH!r z`Qx}vdu;GXDu6*_t#fmf2727X0U2aj@k|vHAC?d=x^b#MgXvZQ4z>~KC=iIs0i1`> zN+DEf=lKYA;qL1~=n{Fo<+}0-gdR9k>S4+i#Oyk(F022n!>iA@HWv3%{~tdAjX;v&{B0413_%PmIAc>~aD}ctD~Thai3V#R+qeZG424 zEXQDmiF%=W(HUR|$W%BIP<7>i8YH0l1=OHZfBa!f9b^^Ke&Qlr&A$g9pns8$D*Uzgtl&7@V;8lc@&T2o8`G}cJE3f$>QN*<)ZbkkNwEpeakHA| zs$b2bth1B$a5Wxc!559QDNEnBv<+YW8-hju&}_}5g?O`wX(-zCv%%e`SlJwE9~m(C zlZ4`doWEHdhf3aRR{fjymuGO`3Ncsyt=yW3l`)fTMju>lsM;n&?5?y5Hq{;_%d93? zWWOHnHk}MIwemZg13nfY`R3x>bUuN64VYHP)pb+C=YnqaKQkansjl@^In_J%B8uqcl@&}j@pH@D@Z(HnB7NGnp7+`dFtpS>H@VeJr#=F zA~AF$RF;!{OrV%ObvY8%+WknYc;Mx&?Edi+kcsRE4fjSz>@LUV7tpUR6yEB=xLH>& zg8ffeGcBWxGY=#Y|3JD5RE=G(>Hxh;fLt1QJkI`FzRIe<{JZ^dvNCO3RR=U=|(m_fj*V+Dah)71-#6mD)a?yDgZ6|6TG^H>_P*>T?AH&7SDPvgJKG2$6Fw{b5Ms|(L1v**|`3`^X zca@;lt%;aMt3cEy@gPOen?e;LW%V9w)EPMz-zd9GOsZ~_ay!D}!P9i5oayf*{B{$5 zjomqG3*1Eb zV8kFTE}3dQ={om;D;6k@wdLJPhpH#Q?E`QF>oU$AF_Fy^sSkHZGphsEX4YuJ$x z7zmO5hmHf^Lqc|qbHu>=0#PTWE~5gkylJ2pqyK>`NY$0AEa8hGKq*xADoYwA^J^o$ zgS9VECMM@4Ocu#1{MhdzN7mSh>hF-w_|&RjFGS3KhE>pIR76}xpjbJJDj7bsgsgU* zl9pvxH8L}|Kmw5hDbd*{{*vE3TA$o5J2ZzPaI)ZMwZ z)g*_wOWQA?^T^PoWa#8d96`!m(I-Ye67|E|COpT9oM7!DdRWx0v9@K_K&#T5d0y|n zWG3Zd-t#)|P4fPD_XOYN?#jJ!PJzFIMo(B7hJW+y>k;@Fj9nOJx3po&b@0tZ3nT2_ zlpXfa^R@VF=aGN5U}eM^cxzRg6lgd2X%=XsNF}Vz!6=BVB=TV*q^W4GA0n5XzUCu0 zOsWw&4YqV{mq8%TD6SCQNd@6ZvgA&kojDAYj8#9lylZD|w2!scP^PZy>iO;-o$=k5 zPO|VugaNGMn6nmDJbue8VhmA1<`Gxu6{;vThp<8;v;p3Cbirqi)Gld}2~rrEge`AA z4i4lPwo;B>!~bhpbEaKuVV<-Ps+ z8C^J%SO7Px=V096(OoIaf!tBnT;s<%co&AdW{`{O|NqU!TQUtBWCmW4L0GISer+Gy zC0jsB1rkbmSgaT37ivPwVc&~DS3YmBy}E3iy|E+L_J91c)1x>d-HBuB@*Je$QjM&n z(7vP=riQN;%sY)KWxY6UPk+jFcN{0`-y1;Rdp#b$*rDC|Z@(;nFCaSu?$3C$s^P~p z=KdRW%i5pp7sk~N{G-fXSaYB4c;Jq@CM7Q#-=s2fF}PnW+^-gRm+M?Fc5J|M2W=hc zvW)%~T0!MYIi+qw)l3@evUc1C*#cRCB8LdIKWnAqt|`Pb_R`vXTh80Uldzt6BeRk7Cz3x8;`ZNS3xTxY3}H? zG{AgUN8`m;d9Gb`FSZ;|A9LHtdUT#*Au2#$bGh2OW9;f4k6U~$%i$PCS|@)LDkbxH zcEOFfE1iXF-GMr7NpS6Uuc;{3n!DDvE0r>;_mS+1xPXp%Fof(u z$y*sRBiKu)=i_tzC)pfbglHK>de!&!Z6K|BkcOZq;G@B~;L+>$*qHTSumq9+MTCjZ zWhM08<1#U`L+mQrVK<{6l!qMACNaf#(1md%QeQzj`g0k$bAkCu!R={*Y`dz zE?O|u-q?`J*g&yWBPnzI_(6s=YiQ4EC0i~1pyLcxanBCp!h_t*gNPcmaG7qXOQGGQ zRHJ|^*8c|uTt~ui?cMNWXSEm#P9-$y1HXJ{HM@7%Ta_zq`@_R5hq9ZTsqj?6(Gx5e z3zk`R;BsJ;V-?Iwor_H$V4swd>h z_eKbxB1_7ub?(g27&ZRRRIDT0CfLOhG>C$S+EtMm_7HYpVc8)VRnnRN#p@r3$OEfG zrFcPWN+%%gEHb3i_3&$Q6{&ttF=8U2_~e`qXtuw_pY@+CluqSFjRWt~xi5b{KUIcD;Uh zjZ&qhy21m=)ylV);ZY+B39QRz;#ro&*q-gr*e7rQ#cF^2oGch27e;)J@lTknJ^_<~ zf$AeLr4Hj#7YUXjVn7Oezy8l3bwM>;2z=$zdMqBQzjAIf?38OIK|iKAb{M^g)AWD7 zdTR?yASN-5I>C48Bt z@`|V&>OAT@^nboCeEK2olPRB}8f}yW@RXcSY`|S>__n+4@{6Zi2W?&vdBE3&I*sZz1kef- z@f6OBIHJX3kHD+XI^Wt!@wC>pg>*p+`ie`b(^5JcaBnX9Ludye?&$itUMM{sMrJ&K zy{hB=eAy@)cvTNJAEw)Lq#9L9iMN18Zc~5Hw=S*=o^Pm29V%z_rUNmXDI*f>oVX5PwJSFRO}JB?8R+TUVZtc)9gaL zyC_o0i!p@{ZmTt421^zc1=p>40iBH(5TYlQAlr%qm0qLxC;nLd$zn03%_p&}E{f!5 zQr4?BE$?+pXZ6AjG0#%L98VJ>$|iKjMMfjiJiDD$EI@IAfs>Nitm{i01TT^nT?O?P zS87=#2)U@Z;mVQ2eL}C$y3Sqbigpnc2rgW7>(iBJ|%e=B;@j(+wMy3OC(F=U($GkKtT7qf)5 z)TqIi9+zD4C+H7+FtuADv4xmt;dl#)XG8@{iS z1D)qS6syfwju|M!JNv8V^s&%~CnnqAE4_1kUH6BHJ->9$bOxiQ(UN5pfPY(kbVFHV$(#ZS`(zafL>VhuiQ@eeLn-DfS#O?dDlH*e$$0 ze<{Yyue-EXZ**~m-d_d7Vcu=f`;OQ=hxzqc-9axxA@go^6qL(DD8Bf{*uC+)C|S{D zCB#fc93=^~&IG9f@i~I)_W|Gtv6ND`?IZ0}k?8<)E(h%jh@KbH3=ZXPbU;a|U7IA= z;FUUMB<8G3r?`L-Q$v{w-CGDjO z*caFqh2sv&7u2V^I9j!ugl2UT)VBA~JcFivcvRNwHm%@oo1XKk#TWh4WHqad@d{|q6-7$YJoc13!(tqrAD>7CGfNg$Af-Y12sfKsK1 zNJ;O2eb?R9)%CmXs%!5ZQJQpc_j}*Zxsyr6-S_u<{~$awnVC#`&U5a$=ib|k7@>~k zr_?8bG>sE?54M%a90{n{=&~R)dkL|YY74nIwL{y=H<+h-|1Vqf|4NDdo_=KK3L*CS z*3>cPD?ALqusCpfHiU?yje_}2q!Y7dcd@r#&a)F=6P*2c_y@Zp)Js75R*qiLVX6ys zi-e8%4$IbvUu5PJLV zm+ZiX1Y13|9oC=wtYGSc9*^Z!>{cC;OMRPZ72zvCZGE>&&IYdW6`3jWk?6YS0_ zNWO6NHEXlV#yzR7W};k_i1`MN3vXaG5Ex2dZr{v!ntfLVdUEt|m!8Rb#q)TBXOhGDH;cg8a1a<7g>bQe4Mxe9!u(|A|qF^8K~9 z!FTbFjRqoer?Zdqw1xNZUaZrL&D4txYQ+y$dC45UnG!t&f{bd7;{* zh=Wq`0u80ZD|8RB4aM(`uxpfWS$+|#&Z%|b$9Ge)ajPHU-R$a{r`q_Z(aUwTQ!b<~ zZ9c()XXGv}pCB&ph9dp)(p>hc1|-lu{T=q|wpZzg`)3=?zezjau-582Tcx+%7;(RK zY%~UU5`>H{y?F_Ztw6+h^R#jeG>}ggu0Z;RLX8ORrOb*0&(GovUFY>HzVX)UTy;sx zEmH3IxG0|eHCMhU=j1x|b^(AVnOu|hbJbUFgnLSV+Mh(4cxmM-T~DHluFK+|o@$z6 zNk5U-Xthp!GoY1r0WmNy#`lA+s;Y}x$j2{`(7}hI%a>C6$( zz7FUM?i71Br&weTIrA(kUUR25xBO{9UtSUznmg@I+|RtyJ;+-zJK+h1vpd?SyOZs^ zf_e6GW^dwU{uEfTm)EUWTe#t|HQ$DNN%DXhx!5vx!(I2lUB`DI2)wiz8=#xr-)Ac` zl>f=;K{gA!-f+dxu6_+8A%a(dCZ8x^qc^;5z0&_+RjTzP{_D+r&vA&|*yvKb&))KI1eQi@QWrb&w57MswSW6(3j%S-^a22sEO{uq(P^JBzB? z6~t)ggHl$G8E#p`9ofVmeC_~*LYyZYZ}m!Jbnc6~3utqBM;{wIz^1i@h_crsIq~ip zk!MQ_f03%iw?fSpS4dx?GaB||>iH*-10KtIR^cJ*|Hx}rEt)1N1mf4zuC@{T{T6zy z+}40Ro=aWj+W-H97n@p4 zXrK2JwMw5dRh76ItV)4?OeZI<_+D`|?c1R3PS<%?lzkqI0VrMuAiYg-1Nn3Y;3nx$ zTA~-9*jNx{`0Cf~(km5E_qDrgG_@Ihrl1G5utE-v0=!?v9H_x39Au{vT^DekkV6S= z%2nE?E47K2>3m+M&F(b{?%i4?=tvVKkEj3<*SejYL+xez;vvgDDXb)ngq$V)0R^E(4tpk33%|<2C7@qw3we_0@z7@CP7WLYUjQPR zyaGUKDE<@Ckm{C$7V{J_%nq{1TW9vM_lqB)?cuw0Px}_N{5VEyc0Q@+AHb2L$Yz3) zLtuvj1CZo+Xo#w0Zw2>fD?<91lQc2<8EW#qhy^6$$gwZ%oA2JUPhZ+#TS&iW^UclT zn;TRN@Tk7gnF7BIhYGziKM(VhAGB+7;rn||1$C~E9R3#k-frL zR@b8fP$1BV#-rY{y&N?J6P&K)EW_nvqWWmrN}Cb_*AX|CDXsbl8$AzeIH(~)?+w5+wY|Yq#d<&{!7&4balDx%zG_c|wkC z-jp0(^=>ruy;EA+lK3&!?uNP`Uw^x_<~W+Re?z|ch|M67*QioWZb*TcJC4Mu;&2K( zcnn^bMCLHf+Woaf-IeSZ5_?%csysmg+MV6TiC){0f_C;UnDZJz5wQ*41&0!!Qx7Q_ zW7PyGw?R|t*Pm#Y#wccLZ*|+RM&>yIxuG2h4s!J^f$F5dIAX&IyRdmR+z&+L!yyFE zLOceRe!z&&vg}6y5!;6za{Z`YOLs{aHDD1#`d@#$904!v~r=& znT?Z*4FZb2!UC7VI2i7=jEl)fK=GjjfOBL688K4Oc546T1 zi9iL}5Kf$_z=>G39Z|!9gA`!>0A`%VS$_COIv~Eh*>(owc@g*X9en`diX0CwYPG({ z{_LU6_u2L07g~s5<#L-{{M!v+>;~BO;_k{zR`j7_A~M0L_t}$t$2ZeaXcNKS=1JTR zpx6UY?B@DiP?>O)A|*j!A&|(MCeFc&*58f`KOhGy~N^kJ)R6|vaQHmD^t$Wpywti~$`>pqHUhF0DbW%jCjtnP?8>^EuSA>X0 zsIfWQCLEY3<3xT9$iVN)Cb|jhXCyp7;##ck>9kBBAEc3yI6eMmk7_H#=vWOMsi7z( zVe=-ck?w4W=&_tZw_g$ zT-dFj=o_?)LpxjWkygP&_GsU4{{Kadi=!3Y#|!3)^f(R)J1^oBL495s`oJoY!^7`1 zZS}`Q5msxJ=48RQzf?E>Z9pskr50qqc;bEw{InM0oZ{M@eo?UA>8RTGX|ZS}Br zw4dq$Pn$^)z88AM8{N{@>77l_;k5^~ipx)a2rh|DM{hE3%Z`Lz6zlY~+pg(uS60Jt zbLC*0x=BI-y+!gqw%OTCN@cVQxdUk!1z&{{2(bx7C#nov!tW-d>BZC-!qe}ATouqCtQX*x!DSm~IZGqh8v23xmv7J*T$ zyl!ucR?k;(hX}`l|AGn#459BhkvIULkbRBDnMG*zh*nj#(n9VP{jbY@>tNQj`vEoD z3#4mRHG4V=0gEiI(WChdC1s%UQ6dVp*vhDdogBnZOnum%do;m5|6{iO`^(p89QK2q zI7N!F95{lG8ppB2f*L0+(h&oE5S0JY znu*M!2hxo8_9*SQOETl_UD(i>_n$NS;WZEJNb^hwokIfSSJ}oUzI~)&gsH{# z*Nx;m+>SPVvn^@WhfJ(`jlq%S)Z!5xm?0!lIeCnbBpzHDhuf^m9W$(Yl?UvWD<8Ja z<0%T7+{1Ea(pYyEV6rEvHQ!x=wM<2L>3ZoTYFO!_uY$hH<8!IJ7?aEUlmjEo=VK}W zfOaJIwALPilT;bXnN-(xU}pE&AE-nYnE_+n?^ihqWJCc zyrWjRL0o*$0(%mOn-g2<+XxL104;NhqSe}pm4_i~1SOs#@e0#* zA}bexQVWX`C_PCXN$$jkR7f>4L6bT-Jzl|fLfv=tP`+BNRayw206y0!b%+zjm;Dn9bhY~9Q5?5JM!CIWKcp@=F*ZFU&>UM%Bef4saTUuVq zgKSF{{+-Lvs+xW${;OQZULIT?JN-@nlRF5ZW1m_y!ah8((SG{uExT~|3p;gAaSa`! z;3|i}Dvh5ya+ZE=)Z`pfCEa0kRVYoU?OLc;j3;IUVR#U66`r7kKn3pJSU&dTc?=b2 z=^TCPG!J^hb>1Hso&DLqf+p0fAr@p`PBHz5Gwm(2~Pcs{-Mmqom)|FFHU9LxY8> zaEILFd#$=IW~X z0NEnM&Ls1M-eE;-ezNd3uW@wr!$%MqI)>^t7-z9csyD$c*{I$yh?>Y6!+L5!(kQ2o zy?his!#}aPIcUffO-&M1&g5Cgrsk8NcCH3oa&1@$`ZZVcSgssEndArc)-dMi;n+W9 zu$#8=W4pEUDgd)JiKsS~*zsO_WWr!2-RW=h6v>5M#KXBMNH3}pE1upQ$OJ7T_a;0D z7CeL;$@f~cO+r2CT!9fk9@T28s^^xg8p^5I6M{dNfBze52EwQr%$v*{?=WUMKCTj{ z3t2m~s-g!HWIAGs%th)G*EQkaI95~A#-Gm74|Pgfqty!CCm=Kxl07RaBTDj*7Sc8Z zqWTu<|7E(;wb{*DxvCT`nMilgjdeqP7bVApzrKEYFV!^}(s9Xa-iwGt%gCoEA<|B6 z$&-H2D|Yq;JK8f@%k7(g?z8WYp#%L)$amy4EozURp{J~Ovp+{Ds8yP-|EWShTI!5X zl~i7oMQgottWKY&j!LTw7Y1qLCRwx*vwDHdZMp^qCoKw%oU1>wB>SmjWUJqO=<0;1D{H2 zYj18%vhyE2Z+7e*v!kDx9sb15eDkTDXD0gp{`9S{|M%d>{QhgRLvP!^KmUupwR<7+ zKH6CpkMk6Su?W>FpT8f}li1*&_$gEjpI zjP&tAp=UBsy1I%q1L~ctPTIj= z(gQQ8UdrMj_ohH-b_t)ernaJ6eUHi3>~h(Mx>}>V(=564d#a&{52?bMR`e;%E&nq( z9KoyS2QLg&?%%;28vOPy_(YEib`c0&*s`MnjCD91f(L#;4 zz6sH-lge@voK7dNq*Fav@H!YN9m$6>X=wyK6o=UDz-q0lCt6kd`bR`PY~2%!Ev@({ z&9i?Xa>axPb~7yi7CD{g8Azd)MNZnFh-E-rQqbr!KtN@mZebmUMiA47VbJkg-mwA8 z-?MR>zP0!Tw8f}NqtWV&kGY{8Ge_GqvY?aROo*a@0_BSxlrImaZ2W8F8G)1CCoXxf ztrQHd&?-|a=W|Z+oJM-(=C7(tgkZla-u`W}?Kku?e{y4+JFK(QOMf_bwJ+6!R0$)b zurW<28KD)=f$xEkaovC7;R}v)dPxp@X%zstNh@zH5e7?t-TMAi5!MOn3Q~ygwMf%7 zzRJ*bAsoylxkTQd^IhPRgYX>lB>M3iPfoOt-Ym5f#tvJwkJ?Lgg(_aCTuHjIiuW8mC*>PXKJA$`Trv*;r~d}wdJ{;a+I^fZFoPVP$2 z0^9bop|Z8dL^(V}3k6|W)YpOK@NdNr!2(_;9v|KIAuE~nAa8(lHtP0(t9&R+fo`w7 zT=Y)5xcu#jBs=@ri)P3F!2s3|?A*~05&FKd)5jnlCw^k&x1IdTPXF*ejPgx8`{^HT zU*<5HF0}=3p)-tR&F8Nc>dzPOhk_CpR_Mf8mn;613p~aOrNt(9B+*iWMj$om7<4&8 z@Ks%xGY|Pgh?+)z;IF3-@F>bB!e~f4Et$4QA@+`$`3J_Y52jKMGx@a&@%{@M`fgOM zTeQkS8UlPiNdr)9h}_fwo>PzA9KuX(+{V;`Mb%LMPavdupY=8qv27r%aRA5{VwB>K z4uo;xk`E=h`=}rXGx2b|M*WlEUa@`chAMYiw>!sj1hoYUA2LB%5wAX&HG@9H;(n4M zc|%~;1w?d(Q(9X=>OEFCgRpr9$2xCg9;ZjiOunlHdhfFQ!xj}S(c$O(@@cqua9=81 zCo2VGbPn%-UMgo^Vi(TCZq}*+4b-DBL`U_u(J3$4tY;51`iy!ss#BAMiL(p9!~_&} zHwlxi`;sZI;GrhGj;F=Tl#)=tvw1~_?6JJl_Ta#${N0JD+RJXag%gG3VN>*rW)6#? zOhCALuBlUXC};2{@`Q0JvJ=%;0rKrl##)u=fjm@qyROw@+8Q6TS$n^+nS1DB0U{oF?b!%5}6!LfE~H!J$UFB*5IMV zfOiM0b;a-OK{_esPwN7wY47rWo{Ah?=5ctaw0H?1(*=-g^2iCKsT`vy<(%Q2tz_epkXhLA z*CXzLkWpG-n!Y)xlA+vAD7Baa>N!@Xsg!4pE&}9SC-V5bFtOZ*8%9j@gkN8mCYI>f zStZODg^g(rm4yVG5n81?QFN%R;Ek7M6Odx-)Yb0FnUFYa$29av@Gef~do z?&r_l%Ood)z>-mGYUWtM8g*SIQifQgIxmM=qwrCL@f1H|PcfSII4vT-I(pK+K1Or& zgCE%6UfE}_ZW?P(A@0NKeCZQlrs8_8pg%1!X(jHDbIT7SY zC`q}?3T1XGBUr0d%uXzsN$Qfls>prElr~m4zn8sHywdEuKiI!dylcN4f5$GI_{7d0 z`_N7Um;XBTxt;sz9RTtl_V2G=wmv1dKdfAxKGW&ck;1uKDCAYb!T}OC z%hxHF=a!Zig760{CZCn`we3@B-!b?;8c=nEICimmL!O{v3sW^fouQCN9~f4SljJnP zN#<13Abr53(ol;;OcFQVKy4pg);~bdc0#I@Gs`ubr zFlY|3OE{4fXZu9(a!BM&4*9Y`$Pir&_1+aO)&UA*oARzUrgcbTjN9Hpn);|}SC1gg z^Z`w&zoS11K2iRdW@%2!ffhO_%2!cUMb7F_l0Xk@sl1wl>wPHW#1RJ(IgHrM$O~BF zluhqh*BPZ2&B+v?eb9r~-evO#r4T5!CfpMtAc*3$Sr&>_;NEE>;A@435xM+;mZ>O! z&7#E$UA0D+9DSUrtrCm#W<1`5!12#bS~xFg>vM57#PLqq(R}=)6?msda2R!ElfPSz zbrCu)aUkCR>*T1jL*3&E;hY=BB=`MA@RcD@-=viXxrAorL2f`RA%Qc$rGhhOewXhd zn%m9kS;{fGZwAPUVJV;VN8!d<_T8HWc98x6Cr=)!&rNgG6AWY zIocB009y#l5=(;fxAeAjbkbiiNP#`b|Xv=6pYAX12*awSsy^IFH!GrfG$=tq8pd^oq%xYy1&|ZEUb5TdmKRMYAvp4VUxN};`nGy zObl0dvYpQd63j+62<`>^V~P?xTJe-l=#8WqiEE3dwYPlEn*DrEFU|^)>MU*;+%>I@ z0$zSd%LwYL8bUmsA+cHfHhX$oD}$MoKuVrWoM=fc@3kl*PUT%XPRzCCxkr4~o6Cq( zXcy-4TnOTPRk<5k!yhW65rk5PG77s1wVLDI|($8+Xc>)a-)Yyp=rI}<| z9V?W8g{fb;q&R{KPO>fy8^zNOX`_8h^gp@A2TZ&r;6VHN zx~lr+z}!~0KYN`W`t&vX?(jkPdYr&Ea`yaj_#9a1d@fyx7$Ii&8$Orrn0JcIN%|=; zFItU8kJAS2C*tVu4j-|z-@Rq;P*U^qVJq z(&Fv8Wh3n6wNve#rx)921*`1S{FU|rJstO_kKnO8!42DUI+A%~TNNV(6oF(VKw7B~ ztx$V0mtDESpQcc5wNNfCABGt$;74o$tVM9QY05B5?Lxo@V8z17TBQ`(xXtf5gs4I7 zh{xZeUNsDL{WKyCC)x3Pd z+(Lk>2;kbu6nM*MUVU_bm^xfac9Hsr#LIgs`k5Un6F~Z;;KG3*q-v2BZ z;C{%-^XQ2yM@_b_w>0Ga>VXK)~}SWPA&G@{39^M-;!vQV&P^=S;DpemF?-{@Q!*qF`LOe|&%PB?CA8!-i1jK6dNd)@?$r4;{eb&h{& z6-c;2*9C+C6&UE@Y)Aw25LZkvU8_v30$O>jTPQRX67D8k+0WOvG+C8y_u3y<_O;)? zP+*6?|IofZ${b;8ZqLw6>cTH4Xe~v7U+`y!aXJvvQ<;Q`Ao2f!6{ag$l6Df9y!6Bw z26&!6gDHj>m)>><57F)U{TJDEsyrp*Vg^hOdl_%`ft6S`E8^*XbUwM?mREeZ|yY92H84NV!J;}vgoll*A)+F4x zh^)moUyIJj7>?y(1P|`NIpJN7jDV;Zd_^M^IN1YJLS8T^feRQS0c&PAPqp z2hzDG)p(cmrmOno3V2j@WT~)G-#6D@ycJ6B9OB>2P>bp*0zK=o6(B$q=>{w(Oh z%zJGk6nW{0PWDiZyR2V>uC{J!FDkWr@Dbf>MQDZGm+!Y=vT%l@WE!C0;eJXD&EEF0uS>H zh4;q{K_yw}*d&Ipq)@}SGWSPv?<&9U3~%m(`H@aUw^4LVOxuieM|xjVp`+*dg^q}| z6;sq%1=O&+fznc{Vv4(~=^*Av_k%4?w;QjJy|BMky?i`Pk=~>$^|v50@RZWp4 zo$35NI;@~kjBGv0UL-7j0WV* zh08^&$8{Bn1pjfbtrwwlMb9ld9w-MiweHtwN^0v#nkGhuW8^TJt`QS-6!cO?r>3Em zlSc7Kmj}}-LS|Pv9U3#7^a=}?OZ*EZn1!l}n>||g`UBlywV*Vhm2SCN3%A_4IH=$G zL-~!g5>z^S%&d?KJ(u!dGA=H|35Meoa_{2nSWFOD#F3OUuPaH8WP9y@{>b3Auk3po z;vRw^ULfQ?hh0aYDw^p?>Opo!1*U$XsCu~!Iw9@QJ%$yLwqq(b9gK!TR~1%kF!B*B zKIc#UXy1PEo_+k%Hhba8g-|}MgEQK)SA>{+rg`km2!DMQXNSuPP3#8(RP| z72HbJ5-OdyUv9*ycI zutV9%4yIQLR-54=Y0jQi>#T+pP}RA041stTtA1HGG_Y~V{Ici}R#TGMqVWVqK;U-d zez&sWZ{qe5Q9Uj4@i zAGSfw>vCp{g3h-M;b@+a^BHh7datrBoZ6)%yb5`1^X8#>%)Qf=j7_k1^>EW&#YqwU z(Cy7Fbppma;)OiEjnB=z+g_M`kL{m*pY5Ba?am1s)Ng}jv!Oe?W(t&N;6a1J=1psd zJlw_ZZ_>?b#WW(K9cV)r{LN++A7XSX%q>9?tO#AmtK+U^$55eZoLoDJz}AeMuWdee z84K%_JzN>uzDz@$jagZ)4PA+`ek;1pV#N2W5jPDbkqJ3q3) z>*y=&4pK)?K`H1Nn&CG9Ev7H0TmrqQnvUMUH$|mj1Q1Q{w}nF{+8^dMw3p`8x2-4= zYIOm6R%llMXS$@JHF8L-k@T1;4HD2SUxm~^f!bE#B@P{qGSN?$7(-bRC67JX@>?Rh zWBh#S^L&ZtP(1&PAgUA* zKZK>bgqQB^^IG67x?02`ycJbcAspaHU`-9IWbbbeAwK-UGbv<@edV zb2-GAWsgpB0p&`wN3BaWuj~&oVy%=J{0xKzjc*R7ij{ z6pVw2z#_dSm`;1@yqwyhX_v>T_fWF;;K#4qKMR-HpSI7k1Nd^DLirk`xf}e1nSCV{+MI`UE~Qt|h|5iycL()U7aKWROq5f=R3s$Ck-tLtG?+cvSS)8YX~8Z|)U^Z6&^Xz+Q$?;3lO+tDlu zrDP6YB+zd6EVSXp4_N=!W9|B=Mx=Ts+U1u|VrW=hYuKFDdx^ctL-n--q-S23^^iR` z=Xdt(Y&K*Td_R~AR0hhpSUQVva4+xnrAnTa&O&BM?!$DchwaKMT3d9~-BzvfOk402 z&16b{@J#PC&?hKcV1&9phJ4>XWLJzXI2}lell~_iaBlWD47mT=ZfXRTM%=4@X%7yj ziO9Lsj@$;(Y@{SVW4~lgR61HyJ8_PV{x#`Tcjs8O!VGz$@_cNZL&{DaVXep%$JY5alP0Xf3O?;C;emKdNc$%Gr@X|j#Il|+H zJ@F6gyXIAIFgNT;CfGcRmT=1;t5L0oU4h`Tcu+T6mpIa%U0m1p&A-)lKq_|Xz|TeL zSf+D5pol4CpkU`erqvpmOe4fGGb-375Xx2&6fGBwIn1rp%1z>4y%w??3P-*2#B(#^ zp0sM^lk`DuJI0fX{xx`NV4$m^UYh1nyo0Al@s7(C$m!fOQ`|Gc)dZ2l<#KPQ$?dgF zc5jDDC#9POZ7YRwJG9!S8&`3-E2oqWh-nUzMSOLaY89y+uJ^pD@Fn|-5oSLgXYk4?dh%SLE&MO%8NPBh6s9{wh6+=Jlb?w`E>~g7 z@^T^xSSlnB^^_Gr#+?LSPcgjZjG&hP&z(PM#~FKe?%Ox)^EZm^-K_cc%BDoyzqq?Q zQ?r#J4@Y*cG?c5dyqu5@p^WrpMW9wbFH_>@?x_f{i~CyfiUixWV7Tp=(bLvVqLLH3 zmqS^LB6Nq!Qsok|6hH3NcAE`U?h@SXW|szc&0@o6&E!Xkcww=ggH#QEfSg)6Xs#Ai z5<|8m6bCbl{0_4O-7_Ds=-{Xn>rjW|6U@A^UZRb8{2w-c18v}eOnC)ERL#rp)d(|c z94hAMwSTubRi-c};kp_O1FMaHPPx!b_bMs~ytUxaQSE z>}F;{g&VQgr?%|!*xnXkSW^|q=p{7Nw zrII0lBUtI-xFh5=pvT7>$EhS`diEF4i9-*P>!~+b0Z&f+*&E z#+V${>?n04{WM}4l4URn3S4FUPHC1Q%c4()iW4e|NvaBII6XPlVr~3W|FmWuGhomi z?b?VI)}_Tr+mX`4w&D-Vfj{QXZJ@j--{5>$qyr*(L=__O(X0^7?ifPI_Nl;6gjuSfA}TsI~`V`fvxGs3~>;;C_ zTsTXkU3AGz=Y#^cbiv%Cl`tnx=rC7BFz0-bba(I+LHH#nSzS1Hlzu}8?by5f?eAsl zu}~-4vr7kB@!XDV96qCLAS5y$49R05pms{87v!32nyzwr3&RJi0*GB)5kK6Q$Scw< z^Vn*#yD34l6LYW9pM|6bgm|*V6mw4@C9xSmmQ6$!*vl5mn$1-?0<9c&RtWTRpoJR#lb*HyQ@f}CHVdi*HgffFI?vEEs$e#q<@gx* zgka-;;61AT^eo8Y?Dl*LxARfcF*B(zb!xN?uil@r1Ffvpgr_;5f3%j}w(%@`T3po! z?ABU6Z2g3OwsqNad%Fm!V)PsrZ4Tlks|2{ zr~1IUFvEI?!1YP>2OFp~+rdxtFx<|R0X_AxYd2_28(2QJx|~fnUNwojrG72|4@`d6 z=Iw{J@`O^dKgXB@CZ`CKh0amaxi|yw;#8h%GA&pW>02;_(}s_sd^BE-;fy(QF|u5G z8N2Z<>y`GRRVAp9W#GYDO>A!eNxc8$8-bIja78^0J1>Pl6hov0HbR|HQd9_-o&%d- zlMO51E@zt;D!F6E$=F(9;aZ`Xn`)L<#?e{y7xE#EDELrzL11J7_*Y0fxA`L|vj+p6 z_Bn)kIw;hez++wEte#7To=g?31V^rsNjrnPwj__l3!rZ8e#;d7s|=Er;@KrI+o3yc z(W+`V?$rfhM6r%ZZQMtNgHgJug{}$HKixDR>|Mo-sGSIEry9n?pMaSnA;SxJM)wbeFnWM@<1x$6`|ZS z5RLuP{RNUi*^iy`1@?oI2Ly}H_z!Wx17rq*r96T3{F$wZ+xd~N=(%ZQ=}7BU(4ZEB0(A}dT273%LVM#}y|%89VG-V0x{ zKpeXYz3b+yNy^kwK+Tq`WQVoXt5l_bH_~k>?ur2xpyk_@wZ`$MsDZhj4#kbo9Z|ii z#|;54d)h7aW?H*0oB2JkO4UY0%wXER#9N)N%dG#rXKm>Azj?WeDgjjy=#+%HJE2ZZ z=${bT3c464oE)@;=4M3Jny{40XpXvVSMcaP31bJ_cIuO|XLhurIqjf}tt=N;LEg;v z7W|Xmw4HO>TJ?O;vSb1IgNbA8@qv9j+KWYl?U#{dkGw>eru8S8DYBA>RM0ulI^TAS zEgmw+URcnMyc>X-FTgC}Z4T_`Q#&9&zdxnD#k@>f{m=ZZiG3zpgBpmBBuVN#u)!YB zKWvZerF$$H8dXvU=Q6o4kb=hOQ+%g}GRlHZP%~yG*Uthu1+9zs{bcd;pXI3OVAVNx zZmTucTHxDmB9Bj9s9>NDxLA*pmS8v*joHH8(uvsn3c{8r$K zAXyJTP#uEvTk&9B8X!R6$=B<;8c3rXP3h-0A?u$ui>Ef5rSy9XDE{_lz28VshOoBlA$C`wz@UR2+U-7R;sj%6y6rm%WA>Mhi(7nbUcpSJX58L8LC;# z&}ykx=~{W@Ttxt?43xSb-~l6G(`uD0fewgHC!J!h&`tNKf|nW*XpdH2phkT!RT+ZN z%FMVfMTWsQjJ9c7I5MSItel%7^bsiO|n=pp_P@v;f7KDE{-=bKvn=J4IRdX^Eldoyd|&iqs+6Vq1BbGO(an0kz)RsC^3f=4dzHZzZ@1B$JgXW_Q^2z_S>{&DIdbJ|pwUP`PbXsMbpZS+fNdL3dyqz2?VY|4jeisop$Zo!W zp7lz|vw>@Hu55b`NrBdHI6V8}A=fh-jSqAL2C2!o01_23(pqC2dH>*Og3D;NS{Oz# z_t3R}!-w>?&3xp2yZ(;(jI5xae;m(c&ur3YrR?;w)Xwa@xxCje@gddD;yv0sn~!Zl zQ!5MJL7S8jmeIX6PpgMr78`HlAOF2&lzhgHJ!SJ~?t4|E#r&?nT_62Bt8)d+WMm)g ztD_KO;3Tu#+H>%<=Q)dulKHaGi=+gRricT$6!l;qCq>)4`q&L|d>(IpR?_9}CjceWge; zzx_YnWi8|-Qcw1M>)cCDbyd2qi*V%E z#gK7I7pn;I^dNdPKXoqE!>Gtj`RT1o$J)Dp*v5DPx@{cMOcELupJ4>u5Tk*{9*s*7K zvf?=us&Y-qT<{&RFNWfU(Z7_pqeLg7GEbQT-+;bm6(pJX7PJ;nr~9hd(V8Eji@M!% zk?9D8x>$qu>uubU zx2@Xc5Ns@l20Cw_%Md8KboMpKT(2``@@MC#&NHd z9s~Pa1y#iHc{)>qCy)T8+|0cUtiR=5l48&dLzZO$gBymr-PpGk=m)&W1hT9*D6p^ z&pjQg9X+L#GRnMZvNZ3BGVs^qGVji4Ec#%pVi=1k<} z$91vzB`?^*vV#a1Uocmgp0U7kVm{6)P9o*wl#bKOqw?u%tEQC}>en$?;Sice?=63{ zzT5t6!7&`t!3isQ8~RZT8Bl zhe5bSP2e|}G)O`q>k6hFupdEYk^h0dL z%2S=T^U^F%F!`xc5UzyZ#{|DsPhqq=O?vDk|3tq-lN0IA=B)e=zXf1!9VtWqQ49#e zaNRw4mb6&(*>kY(Gc;8?PM^3RzP95Z|HWP_*>3xn53#&Oy)F2{!nSO_d2}f#o&B&y zmQdneIm7yq(VP6Abzx@GChtW~MXr#J7_9H`-xb+=tGd;_K z0WdUh9UxklP&iamBHt8ryLCy}Z*#VMXScPO0Wi{xhyh5q+%UEr zZMs{x`3Io!hb=Yx6C&+{M3_fNiT+?+lMYx6s8pp|h$vSBkYfN;X~>Q4oNw(WWZ5`o zGmT)5#_;X$S!ZZbSImmNp}W19^4tpxPH&ie5Bg7cr)&LS?BDUEp-0Xo8&z|N)e1al zt?8w>Z!u^4{0HnAQYz0)@5ZK>4-+Y4OQH~UvztoAR#Q6I*6~wp@?8%&Le{u$7JY|4 zv$<^kDfs1+ikbJ4ci2+4eromZT*Pe{G*Rt7yEdk!O=$a&t)4vIvQoR+ZYm}u92cT_ z?dNPQolDE#lo9sGkWO^L#+6p}LA#~<8i)lknKJ&%1TXY^{TkOMfXb}Y8AS(eGTzSQ zvhQ&I9I;yWEh5V3X*DikSPu}_7!AFAs3Vsu!;?yq3!avf-16Uw5xWDmxp=Vqr|NNC zY;!=eiDw~k4rsg_yteku0A;is99`|Mp&M;^F=hpT(u)PuH>8SSQgG?L--L{pgwKK$ zocj}ZW1K=&lFf7|iiD~-WNqUpBU7b zgy%wW9YG6lv(o9Nmh}fQnowI ze*XGpI$j^Mvvk2easHg0`sIQhg1i0zke&hJ&Vr67eqp{mEY{^@7c)XwDu{ecSXfOf zwZGK=QXSN5TLV6hoH!oRF@DQuB|UpZ6a|&l^>mm6lR()O z24vvs*Nm}iTcuk&a{ZlGzJ{p#feqU64l^oH8F=!2Fbt@LM{m|c0np)3FkxhB8PaiY zyE*y}>-XRUdog&Q9hgtTOASo-L`wsmfT z?Ll?QBIj9xqS}%!XGMS+$RK&7hx0$&WTM{}bADs58cwAtb$2E1_vB znW*V7_F1Lh+2mz!!25bzbtG|(2yfm{ZHk47UHPfE&9& z&`k1y`>N`p2wy7eTQd}aMhL|%8ct>~K!Vk%5zq5%XV*7OVm7B{fa2RHkC&zfBeAl+ z%F!V3l(3=aEBF+2>VKukl+l#3tN()oHoT?TMCd)kw!C7ogP(kZ&H}I6s0H|_$dq2k zyLT%Fx^)vDwv7or?1hEDvjcN(rHI`;AwX=u+$Ijz; z616)HAf5mae}GvY1Qbspx}Ldkp5i4C(V1l>8a^)UD{m8Cj(|ZyU_clsOmsc>w>WqL z2SW8@`coGuCp~-Kew2P7k1Njo)29#F`SV9;xACt1?GM@Z`;7^fmp;f!7Iq;Zgh2AI zbUr6%@x1O9c#er?&x&L|vj8~Uw*V~=f*IWBKM;EZ`@zIArQk|D14cx?Oh~v!n7C4_ zr_0GD0lMD613dJAwqqE%MasHr59G@-itb=(d{+n2_QHJu9;J&}UWAHwkK4-b2%+MQ zH;;5wbY;z{${os`$SBaHPJ;WU1Q501h@&^X#Z1I^Yzl*bB5oYSNcetEh^j^mz@R_E z61Kc&bMQw_Dfomm3J^fs{v=Z3V@aHhB)pqLdVYS%5ldYCzTG!;m))RZ7fP|KctqTV zr$m7hO?d)0jJI1K$gsAPcG=Lhmn?-2V>7nB%gi*wc8aWJg_yMYpVlTGsE)*86xYbc zcBfb-?M{1UVKaLUwe?wLstOj7;@Cg;L90=KI9iB?^2`DXZn@&o35nLdUSs}bH@oeg zr8eiegZ{K9m3_#}qxTsw{29KdFKrfrVk%87@9(#pWZn=9R%NS4Hov*Kb$_tC?U*&l zcFh~gZkylMVls!$vyL~2y7sp#uA4z6xymTXCJ}!p7HfV$sMDIWP46KdGly~_6`@Yl7)wsfXVov6Kq2boCL)^qz2zl+G;tz)VFy9sl$P4v?~Y#LJXILM$E!%3#$G524q2^uQf2+JGlt@VwY)ELL@!FXheY zYYnR0VFT|N1+1Y_MZUD~4tsu{CiQeew`NQ1fv$sitd!Mox5lIT{v%q!5e1AvPeAA* zv`R@2uJUp-8M0Su6%hhPaMD*ioPzccSc-fKt&}%gua(=WfK5oHcc;suNgzX@P-AvO zKKDXJgNoAwOU8nkcoKFf&*s$8k+Q0=Pk<$e6Z&cWh!!5DJ0R*Rr+CM-susS7_HkI& z)BnOmPjpq$Z^Dn|CWI*cP9Uk)`<(~uD_hd_Hf<~fuE`-RqwhB zr@v<))Hini+gI)F7q{EIhnEwZU-acxRf04y1Z@NX(4=0k@fTUy!I>~X+3B2JglkLhF z>;gJX_B-QpW!Q!(J_xx<^AneP+ z#dllL5@?GQ>RZYdqN&fn*Y>5uYJ$ye*_5%?rrwP_LPu*1vz>L|dj_(Dnc&?Nuuf%0 z2|&LpI1>tJR0_dT3#b6!F~E&Ui6!uK8;O_xdzXF8|JVrih;KCo)n())->SgKiSK#5orK8I$F z=u8lH;EP)Z!e?4Y=5!EM29X?9c_1ICm>A(*S$t4NV`_DSD%uVDbr<7muzu6Qp_1Mv z)H*e;GsS8%JToFnqI6g5#GtR0#m7KRibMB&V$=Bu-49U?s$YkM%_vb&(M}DI(69(m zPB-pr5p>^NJm1Nf{$Oc8uyibbf_oBj`P#(uQ4g?(Z@t5o4NtOtb4WeS2RNTojF6Yy z8TL0vWKW)9Wr&?ecxu4yhR!HFrRyjR{b~jJaAqp=izSC2a%->9#WW#mKr1aW97bgU z$`pd8Yqd(N46Phh9bcCVC28^r@Me<}3l=gwDWLX1AwXpSjsvO;2Ww>!@c#Z35CE-; zfGhFUanl7#d2UyRII{j!1*keH-LKzz3yf7-`EOTOps;7YE5r2&r=Zd`tAz1X|2y_p zgzBWY!*Co1XWh-~Og+=2M|aTY)r+XAOh0R82YdD9-S)4upSXF|?ODRypa3^`=KKXA z>^bZNgzOQOi6_O_X~(J4UtY0_IYu+5qoVcmX&0|S8$_a27h4v_*egts;_wi5c@E24O{Best zw{51qnAsIj26Pv9U^p+?*U#m?d`cm9V%g2)HX^ibwAK7 zWDYajP|y#?Y!WiB5He?KwNk4LtsV`bHAF4C2;alL`CY72^U-!)fTF1@`r5GhFWGSN zHyW=O97yAjpbwk42&boP!_z%{J)4n+W92wqheVX~+;S8kYf)QS<)#hEb6r2d;t&@i zF6(LiQ}$6SL&v4{RH>3&7`XC9i>p4yqGJ@>_oV^KC>y)^9jM!3o1FWBce6|epr+He zV`9EWVv}Mf?p4{&6e!+=tj|f;d~Ngg9kCUqKill5zOWH9p0m5a!k8d%zck)TG5 zhGxf#4s%V7n#1iDDwW!H-()x6n95)7ZMR?F)>4M0v!&*dEX$rXkc>uu_B+8v@WokO ztacd(XA%5&&jJPzEV|#8BuukAZ>$Zw>}q!+Ps}N!I8-7hwyfy_Y22!b5ZsCMdQaH@ zvCor8VTjGlwFj;CgRoLHZ=%lWmY4_ZhNye2%U!>-86!vAJ)Ch@RYkI?Hq=JU`v(Vr znjF9HggJ%BTrSG!bGc{1{*(58ir@K&b(xaS%OL)V?W2?uw${cdpDNDR>DdG&RC9P5 z^0_Gf(5$Y|Cl$&$h4DJNAz^=g`Wg$Qn>N;sRdB`sz_>D55`=l(ID((@%&lc8-<+-NS9qgfdNmj1*hYDD*0zq>NSZ|cRIbC)t1zoBx~-t zx2*EHf_kAYc)*Xx?07e%y8_;>zw*D^q3I49uL0CD{lyO2`WK7e{<@7@_Mt^wmta>h z);Nw2e$jx=wsGo60!LNL;mcV-GJ75%nuDkv%$W-&??VnFUKT8|e^zR*kj4d*v~qO! z{o~092X?>izo2`jJA53^waU|P4OLiqSJDFD6MF;>%WWS!WqTho_^XXy}M@d$q1dRVY+ z7+p5+A(AqD%2<+0=61EV4ad>B9UY2ZD5HZfBeg-4gM)DDUIgq+Hro6b>V7Ep9tJX% z1G@wa2X;Y-dqJZcfCmB*^;v1rcs%Lz@ero27I8gbmHrChDUIzJcE~K}C;x68`${8L zZ3C4ARfpP;wQtzG;vb=GOd+OEai~R;N5o4=3DL6nbBmkAVAF|^+i~i~N$<|t2%&S! z4%+k~$j));Ap34B0F!IYy1Y7{q{$O!8Q@rY;OK-a(_723G=G4a0 zww*yzfx1aH|H&WFj0yD%-Uk8c%d(e8lSQmtx}c~a<`J&HsznNq)868)97IVM9j^Ht z)z?tXy&4I?IV94B=%MCdA)i+W#nB}ifZ~mtg2j}0X{tv(##uIPG6@s)XuFv<0yo|~ zfXGVSaE99LP06`=`SM8F5XM+kV-lc^>e9D`ztvFp)|o)jgxA`}TvmOkzulU3IpdL! zNS^V=pnL0Mn;;x7#%-YXTmG@C!)lcD4dJ-hxcZrfN4I&4tB})o2xCB^)$LXzr-!b? z0!aLEehqQ@a2x(+8C>~ z$`FcIA~r;ni*CCt)2fso>3*?-kgwDVv7@D}mb$Sul(1s&!Ek3+It7q z*{+PymNoBT%U|3}hzdJyL46-qqe-xaO`W>`^9L9h0WH}95 zjNHgqxDWe(z_0ZTHm~a$g3@R;F>MA&> zZPQaD&VUoue(;Y zmUhFXt?iDh@3VVvXk~+LX=g+0bh6&{89>{B3a49p+dbDaI}`o7Ry9%jf%d>X8*E|W zQJa+odd^h+Xfn;Hf>X=hw;D-h|3tuji*z69tlgj6qXie3`F_kg_J78z*2K}pG@!tx z=+{wH-$r(@ru{dty??gUf{$^2QJuQy2Ojswa`cqpAZ9wHTeHcIB?VvSZWOdavv0kb zW-HCcIX7(}6b04XPf$feDfJ~uDTQi>1FX$Lr!H2#2HgX0XROQoB=ImEe2C-UfJhPNWJ{cN^K9pqV z_|+d+-}z+Jstw0pf#g%8u`L=j-LmGlw>@(K&b@Om;AG8Y|K!o>24_thAXGT2mB)+D zd_9Kr?D79Aj;56Yx=V$qYlJtM0-p6^y_prsHBYlq)&P1|5MChkfl3H16@(^-*sdV- zF_oJ=s=_nZAu7?+)d$b+yCSjwzu@Ht;a^BF)=G>sltB}6MhZEFqhVRtZ|FFCY4|GL zL$62AfA5?gG;U6?zrI#tKOg(ZtpewP%;0ITGw>rhvY*JC1<#)QSBRYgp5=A95y!E@ zrX7PUMjVBhW>l=wjzAuRhvBCYTBT_f{7EEL{50YyXu7tdSS??x3{_4%qE%3EXTK~jW%dl-_7(e{|d{QLAlJ9YSTnm_;9KKj#MdvV=l0@=Ql_x7{WB|YdxARz)0 zB`^&fSWLOfA`aG~1t7rzvTnis$ijgzjB-`yN&%u$d}s|jZDVC(qL~#Sic0~pA)kH? zg&^p?hyhnYY$9$QViQ-rirw&alJbDuAS?&}1wx zT^_3lvxC)Yzsx4B{}2LaHh<-S~`a??-*ZcQ#7A6sBLR)G{lFVa^MCoHm#X(dN9#=$SUQh1Ip-rwDMhEq!M*?*huEj^^YT;#;6?j?vWL2% z@KEt__2vDMVCnnUlmgpEq0ZXPz|ZihC09X1Fi$AzgTTGgFI0`tG-M|jK}(iKQU-=w zZSb%T;8?rv6tZL^KnKn7OBn5}n1pV)f^fIl6 z!$pU2xDTZ)Wh60E@|sU*vpbi`h#mRnP2vk4%%g%DC?#o9O7UKB zzwlI0>Vlg?>GFzLExm|TKuBy5SO)j$M;Sjdb@9;(?DT}2YX{3J6a#MtkFyWbS&S_f zpO$(?5%o8#WT)~I1Yn(B3zsv~@+R+Vjxy-FgzBGg}35$dnjb-QKQt?akt{$2M? zY!-le22G0!mDqg@LQ4TDulm=ae`K*Dd~PinSO0qh1d@uaEKXO2YOM5Y%oGdz+nZ0$ zv^QQa!<+TF{Q|I_0oTq@?sfJY&4yQ; zh@U+CXBGJqKYrwrVAfGqx^F~<4B%A=FS#Hf7!8Vzamt{cbfhBk{%NF-UMg&`f&n@m^fs%#2NWgK` zekf~9INcV8*YIVLREa4v$Ch$T(WwreDs;^#qk3V3R*!3i*Wn=`mU^~AtYLT56vUFR zVjoR;jBtw3emKRhKQ)c)K5$9ish)y8do+uF@7vTC%>Q*?gU zh^>x1!BmK7a2g4$;CP0yg_@oyb|eb^l5$qi$J>&o5dB9hLp~h|U`h!c>m;p`?wN+* zDFt{IS-fB>t($nW!8Y)V66_z?W%j`+U2*W+Ew)U zx}x@Ei=<^hG*-}S?^$HcXuREP!k;Yq=6Rsq!&V0~#w-A2HqvSWe{l-yU=jcuoX%ME z8Yy69Dk?xy(MSC115X>OL1|JJW`_Ku)aV|wT6fGqyX|V1Ts_#5wti&uv%d$6zOsqD z5Xsk*kg~nlHB`YP&6S(4mO8%#>x$=p-lC;->r32mYZld)gEh?SJ$cXuw7MurcGJ& zrrXA%Y7XQBZa7AmtB;!KKQ`REr$HmSI;yEf{Y3gDOtDKY8_fMXS&e4XEqw<)y9$^k z?;j%}e&j@AjY*V6gzXtF0YrxrmO5QjdJvvpBK5WcbAy_v92|msJ4$oFCNOBBUHmTG zH$Cm<$os6tRgjUVQwBjnz}m7o53qB*mUFgbwYi|@b68MzP+9UFG}p%?Grp(oesb^Z;jswzdMF>)2*t#ns`>Eq=v4As@| zBGf=7L*=GBvJeXiLdWdIk^}N!V4T2ntCNOej!dARqGS%L6dA zNYo-Y5007((v~CyobtgX1OVGxDy69tfkZFQ6C!J^B!Xa9XqBO-cKFi`_UYmw_Tk7@7%$+MfTnU2fAv-%ck|emmhPGm#&ITZ8%vUrTJnuGnfnQrOJ7^lNjt6Lz1rjTt?Fx|@ejF(M3nAKq_t6Cu5;b%MtR?hq(bF6 z&wx=#Bg%}W8Z#RFEU^>l1A*$k@)sM)zp>z8Du|mx&5cQ$N3Cjq0I~0e!zOavHv@&| zro$GOag6%y73z)o7N4DKaarVf`AIP}Y7Jh7n)f4ScCNsEpK4tke0oU68CvA7Te+7; z^XoD@xq1g0Od+wjQ}>~&7X_k|B=`}mT#lG9j+;Tt3c$RP8>sK-6Nr%ALv zBhp(3MjTdyPp(!STJCT=D_>E_$*EATn+;0iRG5W_);%a1%3(N(e{K!Zvi=r_+R)>$ z+GJ+yJc%g-XRe5EjmKlH!oA8Fpg*~XbA8&kxcreX;7{_~cyoGs;pr#MH-IR>85+t^ z!F|r5n!DF)3FBYMCaI%ZxdT7#)&CR(91eG${nr}H#-S70Pf`uEvM>?v&Vy)wC%(Aa+pYOu)-sGj$gZ%fM}*rFg!d1e3j(o)#Olp~5z?lL_g1jC{?IwCT(kWy)nM0VY;MU;KBBQ=l{88$ZTSi;lCLGVy->mOa zo16yityL9r1vh1uA~4&CMr-H$arVQ;H2eA6U5ueS&J=r5P;#}fU*#5{!DJt<%W^?? z`JHb9gg8k_hZLn6Qj~PKooXm8>MIJYl!FRoe!p#==z4LT3C_eoS!|ns#g7iXc~hMH zpPUYe-cU{y-pB`|3oVy{rg_)+eXd_Cz;yQV5j%V2bNl6sE%sT~M|LQEnticqyltJ> z*;c|)dg~_K$0_l)3{MdC;5x~Y$PH`UoW#Y;C#z7%vT_r9404SzpUC|rW z-o^hE*J4FGWwzpzHMMgcEcPPMt3Y$Z`oqE_H=iX>ciEn3n#OPV2HK4F)(r7+uMGs& zD~=#EK5fH!wGr#cm&l&0LKLan2#$~v&;DqBejLiWNKy>Lw_LKG(b+D_S7M`kM2?Nl zynOvVn&hGZZ!jf{I->;&<0%Y z$ILG*4{JkqktK-mK8f0(F5Sxa-wU)7rU&7yR`-GK_Ge5cA4AhngXdy-(}V0R$XXj} z`|MMs7szWoUA>1r5BIHGJ=~tE5ow{adLtVjbXN=Okg&zZXBJt+dt5iA%OdZ7?8ykL z_IN+819vfqGgq(E(H^VIvGHh6dzNO2NAHV9$IY*S`uN>Gt1M|-A;mJJEYhV3n)NsO z^fBqYXlX%&=xtJ)P?i8ZQ-rv91qiDN zexhJ|x*$49u$}5w0&BPOX){Y)YcWr9WqL*dYOQ8zRcvgDHC zfO<7Ry^5!-!4waNmN)s^_$w6>I7wfbW&FUE0&!Y+)&OAXGY8l=!1E7ZL7ek{K?6*t zzz@rS@eLvJHL!Vn0FlQ_nC8Z5jd!zS+*m=sH~};cR-Qr$3!$}O+jWTfA=!B+2#623 z%4n>3_2hLTOYFB}l!sSH4A@#fW|Q09YS4JFay$Bz!Uq4H&C|~LDnF@NLBMfEZV8-o?ZQIcz7TRg1Cj9+iuf9Ho zXCls`O*GQOOLj9^UDaiV0I%L)(u&Sm-^K7rifUbPhMWe#?Y>mn!f*8AEL|NBbH1+b z(c&-l6md3(?R|jNGHDww*=v1B*n*Vmh<$Cs0g?uVCRN0cbzm;tvm+6g`A>&PfWsHX zPj|!p^eUlh2pf@o*XI*fK!a1cR~Xu&AiVtKA`V1?wJbGQq~< z1EC`)dfjnS^E8}soccc(z28ClQ{9*MyUsK!ZPC1&J?H&m9pM7qKiFcum+SycHDT); z=Ei(&Ephwqq}hX9aGhu1Xz|`5YtWnOL7ApF*}h^=WAnZ+s->+S+SS&Nk)r!Wq??Uw zJ)n@3Nqf4NL8;BllIl-_hYOXcIr9XFGrF8#~7^*srta+OGHFY?arAc&9%7xAfeOVA?8uNSWvaGdL*HhckU-#2au> z(gleb!&MnWCYn8pI$6$Win{(4Uj~b+mgHizE&)oNrEl6i2Zb*9(P~jPSBFn4-Q{r7 z9lN?GQIB~!BVV^N%ZD_vWrG`A^?UH$_fb1~b|`sX*e0s3_FT0kIm0)wCV}CmK%JZC9)KBw?=;4)IvkDyrjSXJ4tewV(6_Qw+a% zhFvo5YBP5~&WrM!rCI`S?i#V#|JqQmS6Y8yW3viTPC3W|eg=|-aP0;QUFK6|tTO$9 zu|5#WG}>l6c-zPqx8|qSx99q-px%{-pOmZvNIW>or0?@Xu6A|kU>IUNJG;um5qwhv zd*GRoHua;z0Ph9x_)gK>Bzc zdKvl{+1$tZA^N25b<-!B*n`z$EMeI(8>2KyEN`rDkaWj@n)_3O^rw0%bCq_0CwwIV z(0&#HznX2kp||qdO*>>2IxhLnTA_0`Nc~>j3ab{rc8JmMzn9xnZ#_}9H#puhqv?-M)5+2 zX|5e(uakc{V`67{yb6Q@(|Cz>(A3ZkxNT}0vWX3_hUi8r4xK^9~Zrfno%-MiegOJA+BOXq&FUn#)* z5$^iG|6Uxbix~Pl7L-U0x`FD72HRgPMJd%J39cptWL6;DO=5M7vy@V0P8M0#Yr0YL zlxY2y9dIibs2BYGUlx`J(&f^RaQVgsJDqoe-{Od!IQp$!`e~p2uy2EX3v1mrKY_7W zZEWLcGNYUL6n$Gpze4{j?`<}TcHd^^!e%JZ9xxd2$+JZ!iAh={214;5t&&~oPpf(Q zaEJQwPk5&Yl9%D%OJvYW80(3MW$c)FS%6 zpK82#R@H|it?M+r=&(-ggNIdLIr<)~l23<(7*GAK$^B zj5EOj+YxE0b)}$)pV0rS7xR zAx*8^-R*d(ntjcCh7ZGghMyezIHddu*k#o!{(N;1+0bZjzYQY=5eMC+>;}UfsB|%s z4EHBKAQ~r7lMpI=`BB#a&=&COfIm)W@;UPJZ9DC-wL$&VdeNuW93!hPA8xa*OSfCh zl*9JW%j5C;Zh}=-L+kz4b2e`{ez9Y4)?~+TAJWXW4Q>ivy@S)nyOyRaHAUC#oWRxV zGMKYT)s!%IPs70F>NU=VER&u@%&K~?H=0&_c z0Oaea$d@0eoTZ!ts?|hO#GJg2yDy!f)YA_rzk%UAn@7RGFuPpMB&D@blGRwSuK<|V z5{zYgEo|SEF1CGk58F7Q4f2Gy$vFz%1a$zPUOx2WdEvJIgDCrK^9+oew%YZp=j@+< z&!rz9mAk^$>;D$82&~l8n(P8tb+S6dN>%DHO`Ob)?8DInP*Ta=|E22WxATaOg}EsO zVOId8e6;fgH_zM23qRS}ANJa*gS+hPrz>p#sx;d&t%ofe*~HC0brwzqgJ+PU?Y1FY2V$TQI%JcEqd0`02-B8TVlIU%~E|Qp(T_noJ>rY@t;^Q zX*2DK%H=ySFq62b?qiUwr-)-h>(%OHPm?!PSw}gjx{tC>}2&0jl#rz zl>Hw>m^To{Gm4(6p^Or#`OI*>ALHb^J6YOPnv*cDa+uOrWpyEtpKwWK6sl==5u_!@ z<1o-Lfv}t1qbUfjhVMecO!A?(zG<+sSOJ#iBH=2sn;S$_DGnkArpRn4#r*0|QzH*) zY>!s$YEKi*JqskMZc-bXC8yI`$YE>aZB?-X@g-%QXPeBkPD4H>;)8xcq{N77D9U`I zc2_H{l67ss<#8g$>R23x-P=)#+Xi-LH4c(78}gCblS@PS+82F&B3@lhMrOMq3>wCO zv0iU{_V`%5XUQP?YSxV8Re&nJKcV#_Rxqk1&tf+t`^umzVdY`g>XQ{po%iF?gX-QF zv6RAH7ALBwbXb5%I)UfkfGG5 zHV(AT39mkJ#LBstJCu@@IU*(m!U|bM=Q7|^nV{JEp+uv^PRqG}HM=f*S{K_nx3^_Z z?`2!(^tVr!j<7?UCfIj5Q|zmZH2Zq_2-`6`!nUS#q9d}kZJXTNc1-PSUu_s~pRY}_ zZ+0%VykmRpI>ys~|2uiFtF8p{A28>JKqBHp%k| z!IZrF1B$u%q7J|+UPXmeaPyX{m?+-Ny>iqJez(Vd*|Xe!+PcWTUdRx=@!c)UYi8?| zP~%9*23j(qhYH*>5t2)~uxSKXEDT#uM`4gKEJ=haNC1|om4h^)mD)R9p~I)Igk&jx zOyjeCFK{R&YPCWjmM9Pl6Nssqbj9$t_CYKh2OKMh#_)kRCooLus2eAzp%tBRdUVx4 zH}YLL=EmfO^riix`;^bD{6l@=JWU8W=s~GI01#u|MsQtltDbPHPJ4U$DK?E}&IdnL zeUMcNQ)fthdkB@f*Mp{eUtek-y=L$CyO{>R3$JR7)H8DK&(d~MX?;_YQn0NJ?G&B04<(f=jG&C)9x$SL2Ax#Wc|CW zwb;zdC~eMC^d-e3Jal-L0QNY13gFp9fU|D%X%1mzY#sH%F&oa@Bd-Va&EK0OM>u~P zNikz(l}%#xlZ9#g^iepB^rXmBTGCTW4bLzjS(&M4;Yv?28MSt8>2pN0@D!vrT%m&A zqPOgop6hJzymNLh=fj=wC+~5MA6nceQ-IL6*1} z_+E$Bh>oOw{4V|Zr4rF|z8SL?Ap!Hd?x!3Ar+OTo<~>up7}CNXg|*&s2Lu^Jd+tqW z8a0@q=;Wg||3c5sVQTH@TG!E)1fa!0xZGdta%TQuQide{W}UWtq7^&9xjT|cXhnZ; z8~*y%AMD1BWG~j;M3l3CTDZs%q&te(=w@Kurt_AKo^-6 zsFJ=4E=f9NC?*4typ5t#>JJJLnr)z&Lx{Em(l=p1Tc^))h_+aWwoE-kA?fVdjeP3{ zls)M~W$Ml#MaH#wSy;(FEOw`mbiJ$IGEtaUO&`_7R(owMb8>gvwQQ7qzh$}|+PB!g z-@C{T?ptQxf4tm|eYL?3f4A4&!e84&%}SMFr=^uUlBr4SF1JGKd*b<5g-3rw$*m?HNn$=k=59%MZumxryoZFuc%+`qQOx6;=i7 z*wGoJ_Gl%>ymboeR*@8Q3D9K6wFFKjLEk%ktm0$>H^<5N2+4TyTFJ_o24!-zP1Pz% zt0b*H)M|nbK$Pb&v}MEF+xyYX=A|{{E^@IC)}M$2G4UeRF(F$gI@sNSxGn-UA=`uU zY|_Qs2XO0)g-(^4PXBZ?g>=*@bKfxG2S&=EJ zQB%I7(8sWl6$}YkcL``hwZywM9v1g}r+E}c-mym?;HN>_o+Ju=mWupSR2iN^1^Ikk z__h0t8d(|qO1ux4fwGxe0E(FY8;)8ee*e*s;0WGXL7kKOE2J!~n6jixQDLLLR(3r~6>nKuUBj}=FcSxkb1-*?Fcg8pf zkjI`#$DJ|$0RuunSvC5opq$!%p*9^F3b6?Qf_ zN-1<5`7sTATQ|H3`Z-c+seSD8c|(}^G0DE&G{ZjKve1rvm2O9+zx#QQ{dD+a`{Ad( zcH-wx?C7CAcIMD7JN^AmJMsBuJN0FzUBMK%@Z^_v`Y7_~!=KqP(*0*od~3Odm#`DQ zN{WhTkbIYS<3A*~iuv2W>^8RfTf2V~Z;GS|+Z^b5MS{ALHf<+cae?PP)kqW76yvEk zyWGti5;Rf+z?rVFFyD@Sx6?9L&t=A4oaLl+v8{yHyD^c=pm>o*Yt%*{YLn>KCit1R zL8~?Lm|Kk>C!CvrQJ@Fa2BI923DbN+G2NA%306(Z-~)H7`C3iaeXftj%Np~hg)AN3 z5l@1qfLKF7>{WZ{-AN9_{IiN=P2)Ki4#C%xx8dt+i<qmE<(Y^v{kbodBCEzh z+y+XFg3vpG6wajdB75L<4|diVJw#J`dBAELi%3wZuLz#2*}pODH-Sw&`_NS-!LtbR zXR+8@j-308`5x-+@ayd+Gi@k2wK!$Hdy>=!zo08}2k|G+9Mg;BRsW<&bTGg%7Qf+| z?WXeWc&5OC>JcD5MNaYw)4w3WlUI8f@Cw1Hr8Ejc252Uveq$3iU$;@q&by&Z>Wx+iEO?$k zdrGyplAvjCFg=g1YJR4EcI}$@$B_^C(=$<6OT*DZDQcE(Wl;z_lCWfsz_luNGk>4U zGs^VO6*NkfyiI~GCnYH@08@9MM$nZg{JeIv4oTkkwS~zuuI2n3?D#*o@I^mZleSy< z!+KZ+e4C%B(%fbxG`Gd$I$O^0M%Zk^NwbC{ecG6eLL%vZNWF{`gn?O$bp*ecMSw9| zD;qzpWnh$ z@a68Cqt#TE6RHTrHd2VpRB{Mk55eLlMyM&fwRu!S%bL`U1Xrx>|8TT@zHFQw+%U^d z?)cD7ewAYv0I7rD?y_S?0HiaA?C{C&?8wQ3cKF11cIx;+mnZkm9RJ3`P8|N+P9OWq zE}uVQg}Eo~^5rvj{`?6$eey@Uc>b7OD!5F$9a1_X&0K-fjsK-E>0qpoFm&SYDO%G1 z2N>HgdR9vEXL%P1#JpSRq03yOsqZQ%cID((_QmdXc3@^7TSc$QF5cwb5HM-Hg-D44 zt)Pu4HM|Wnv00C<17D#M_)=s#$sb?}$V9WIi)JN@X3Y<*rYPm$WshYl($e8rCqy-~ z%4Hhhr1Pph++Y$Ddya5CV(I2L)artq&hae(>vQSov9BmMwrUTlKv&-?J=oLwEhZvfUuey{E#tm7tx~0y*xUa+(J7p-ez5v?zG66KU;@!R3StA@CSjA_tmpL zO?y+h^DuPU&NKmE`iN!_m8M+XB+8H_p`;KVP0ATV;HcHy-(!?dIT7VX@QH;x39Qnz znxs{bR*CLD0T|UUuuJicx0NjwvT;cLV(fYe>|*k7Yt^wYMuG(4aM4XzIu3B#oM^|HqRX#yh`AkGp>&C{1D zT21n!6i+FEs%}743#)XeOut^YhZ{~N?F3YHxD8bzSPB;LH~-w8=!Hx-0>g$^TFiI5 zs!W-dR)xxxwE1Pq*0)f`ot3-0gH?T~r&YrRqE4-Fh*cy}&;Wa+lCnBYtbFBO)^ai# zUt~lj)hJnCcAWWz4SoNZMNR(JUVJOfWxhozf~25Q^^822@>gy9t+%P!H*Dx);uIi3 zahSuY2Zd8HU_%`6B2R!=gtG&QYGUc%9ZFXI-A@Il-RIhZJ5%7uE_VM{rPX>z|4I9m^|wq zp96}#YxmsU6gJg|Z;j+z!!1lnG9S3hV{f)!U}?N1BUYZLfS^J`F=keX1%*WyN4$T; zxerwU@at8Nv`1BM0Aw6Q0aW7_GMTj&jq!twWq}BK+C!DcAmH2!n%^t@3~~34V?6gm8&(v z?osz2G_S|of3~?JB5@tTa)oR7Q#6!&6hv$q!v&r0fkL}Rzimr|SV=;x*;=J&HA^9a zD@S=6TsTAUG(qr0#6eqx_!VKte+McNtzDyDw(Z0JVv}M!*p?4c{s>gg%FMY)%@Jg| z&SVm3yu3_GYpiFrkwpDE;=q*zM(JZ)+2`*?+TO*Z?8J_F_TzzcJO0fUJARm$4>`fv z6Z`GT`LFHN*+X{j;?H*O@(DY8=@-kre9A6gJYiSQ9ks%<5U7(!?b_+%c9!*-Gl%V$ z++XZe!6`d;?Yx~Yy1*pKLU0A|m+SdfbS)P@+iM76ff(VJM<1B5OA#GCz%D>UGx1wf za#y7Mzhak9LvP&lnw#L4zdWfZaj#G;xFm#>s6ss!biUoNGKFB?#iByHT6olcCd&O{ zQ9oPnAqk`5HjC8dI$9If;ML`&^C<;y9z`CEPc)M+GW>@OpYc}Z`epEyB7a@Ca#rQ3 zLO3jT0WE#g%nX2RQ>N%vrhqI9PsorDhjq7Eku3v2_DJKY7Wv*$0U3v8Ob#TADyUCWdL&`@ESro9a3m4%im8!y?rgVwm8T#CQLs{`}$)rFZp zS*yDMt(OJYA}@chYY%wa+IIaA>a&@amzZQ^WM!Jz-Q^n7hR}yRS&Y>n&0F58IZxfYdq+IkZohU0^-rdw~!vOHwU0<;MJ%rbG{qe5#{PZVbNB0B6) z>>X2rX)ep9UKp?Q{7EE*pEHWP_K!q0p5wh`Gq-T%k+EIKvlK{9j_rt%>UdiwBDP0Z=8qb++NdzmDbf&Yumv-y zgZf+0(#csP6?o0ct)@;VDgToA`j(y6#lBiO&W`6yw;y*cwaedU+b=)uw=>7cUY+^D z&Yg#Jo&OGmqp9=E<)c>qQr;Q6oPXAe^3K`y{PXtr%O~yTMVbK49JTA`e<4t$3kuS9 z8jL%8^^9G-eu+5;Xe@3B=RmXTEP{n_g`kc?$U;}B{9iE6ku+5@9niVrPkd?LtsP%>mX(Y?8?rn2`o}S6y5bsll?@ z0yIAH`siF~zfI9+d#{y2_G`xJn zEN^bgD+MM=R%gP7?i|S7hVDXtj#|{$#41(BDjXd_*>Y;YLUdW1@X03)h98NfU-c@m z5i5t3Y6WJsu-BtD;9Gz*D{TNV^AB5#LFrccMW%HH^Br{HYsZ#FY4BQ?#fYx*=@7hX zFSeM?{qQzLQFk@9_Hh|D0%yWO3hCmI)l)5FOKZ2y5yXX*s4o;5O6)%fYUM<*k)+Nl zj$DOUYT;>nw9Y_Y7M>dnKWaF^#t=FUr&Bg2oz5y1`G`#iK)d2rpR!RTzg}wmKF_aj z&(}}0x%_JJ>6+^Ystu$ci}(`K)_2p%V$vpjd$1&-uWnJ53A|00tT&{zlq?j9;~smI zvLUJaI(5;lVtDlgGK?CvP_;fn!55GZy1SVTN%@qr1%*}mz2c@4;oi+5QKqpy@fbZ* z)c`~%+-+iE4@JPKsBu&ngh*=uZ-bf})MY9Gr~ge5L{h?`>sD~5$Q|_BBqR?ut=ebTD?}pJsJw(t8K8UuyW1BHBN4CY+P6dhU>l}IxQ?ge2Ue2cUu!20ZMVxJfM>q9{PRCr z0pzdn%1OHb@w<45jMQ|s zl|=J2F~PeAyPT+1kc1UE(#sM;l0`O%pJ>^x8zNR_6eP<8KG9x=2Eoj_PQ$ zn4o!Ynfg}N_o~%uJjdeZoMhnr*Vb09tunRpTFm{H)r=pkTIbo{Str8H1_<$+lfUmi z;S0~l*=2YS=={)*?jmo(S`$GlC zJCOjOicDh^I9@}}D(;;u=GMi3V5r#UAYL~H=bAw@_V(fVt-->;+`>)-5*500Rdu5`py|x- zaRNR}_F}K~`|vC4nfwW^kp1nBV0u}2TL(8lATczWZtQokHI}DleL4dfzXV3)=up>$ z5pT=523BgT?&jgG~Jlmgsszi*mo<3+7~Mm?dvru_C>~QJNemaJN@H!J9ilMD)r6WixgV& zFM(wF0ABDV>I9d`!sX_IX!)RCK>@71fTCxayn+js3tP<1qe(OO1W(idv>{!)Y(+PT zd?_c~q*ckG8%en06kU=KZ?&)w#6zR&iVajW6K@Fit_${x@K9MKunQ9VOB0Bt{Qt+f zFyWlkzOn<54DNctS;G0FmjA_a+qGawz>Hd-g+2-|0CTRUIU$RWIYpO3kO0v^pIa@~ zr7>Gq!vwAPq+xs?jp}5x(QZ^kyAg)HX9>c!2I1NW;kvT$T9Ii%LUE8PAD3p`Rtp&3 z%4qDU>EGI&PYuAP3Xjo{c2I^$t5}ID0TTBzWaeV$vkT^(v<@lzt=Y&O)}-G`Ya6@C zUT-kR?dE&#?`yT68{+x7Z zMZ@mmfwGa=WW)w;w}+k@Mi|LRfmSnZFw%};#BU032ZLgR5vL7Vd&M4odZ>j~?q>1x zx!hJ=vEDrHqR9m4mFFN%Nb5B7k2qa}(9H#cXKWbauh&~F;BSC(6Kp-PjV>ajair0ST5- zJyQ0f=3f&zOd49%yZ&N-s@V#;WVFiH!U+^aT6D~KKQJp!v~TEXc`qTG#WMrmw+)9zVIAww;fYZFnsp-=mGnP+D| z`OwaMzR}KonT}oq3U~BlG#Uqpc0Z%E@Pl2Vte|4&rAwzlsB;t^a?jg6xp@~Xj|TJn zf=hw_3kom05zqp+d{8dG5Nw0qDLT%(dcnDa-1rqIC!obO#9yb;$tT;A0Jg3FKVdCZ zY>p(|EnDEK3|jfLQlc(NsFo~z8y~F=h#m*rhYpo!otEQ;5p~m3#CXeRzB7Ci@ITbSEOPG7e9(&t!{V4ZP_^(5s zbhZ1tSa3Pw+ENYZY@TLOa}HaNc|Tj9g~u#r(GfQb@GaNjP3BF}Dp;gmYF*PoxDvn8 zb%{mK`3b4Y6&tk?t=C6>vr^R-HC|PkjO2_ zVOj(X#c?+0Hu?uVQ)pSaq)wq!x%Q}3u|kR%wrYk66aD{RrV(dFtnlc_-I6^ zSW;N|b}01vS)GTGzdWp7f+)(j>LhJsJ?KH2K##fbd^p%QXvR+#RJoJgiCN2Ccc_CL zZQ7HAYzUg#kr-I1UBWq|=!g3T@H?ug>%~%eC^v5HW$Qf^e;9OdrD)4~hV$pC#~HQ~ zs^r|;cHjSuvZQ5~EspSgI2t`wRE1&gHxE^8sWZ$JEIiOx`=8&^}pTV`{Zj;)B zT)`b_!fZcpmkpeK+Wx2WD)UOgs6$??TFVmqCYUV8wj{MRu_ot!uHzNP^{yrBf(+6s zNp#CWR*xEbp728cO)wK9dgrX__(G<&F>?sE3+CQB+UyAN?D`yS0*tJuwC72Cc zPlZ$-eru#ZL$i=RrLTRlVvHTywbJs?nq5YSQE=*@+mWV|&NF~JD3iX;Q{xw@P%Q3O}x-7UN z8rmGK0IP<@V6|doceJxDQE@bKrP1mQr&-KgctorBL8tB_UoAl=nwvnZF0?_`ZN1AP7=kT^AFXu?+Rp6u$fy zx<%;2#SpnObgBbgY0fmOEudAdHRoF^E|zZdwnLsju}*Pcks|F!QxmxifHA4<+tkUT zY-jSjZXV9g>EcNfGpkggwD2o@pzjn?DtEkHPUL8XtoLp^MRuLTnj2hCXuMSLkg$?Cp6#n3haZ6$Xcw#ra`{-x z%V6^w7?l2drc}gCq9je915N-OaU+K=3j(WBqD5Dkq9kfGIlz`&ChWguy}~qwu39;N~l>mI|M%y1wTppKzv&1uE|=sihvf2 z_1F@JMf%7?#h$i}d&gFf>}d<4TibnQ8#_#Tq~R2lWmGxE-MwC-O-(-llUj*IwV@91 zaPtq4+b^WlIrlqjFfz-0&Y1RHq!`G+YsJ}f^msoQCdZ#fR=HAld!!yh{7_OSK^%p& zi7UM?m1QLk{sx_w+u#Lk(2dueFn%axA)G6|7ZhgD=8Gt^RGkBpWJ3{6T`epDnMCBO z!;GFFkpopqA};HLHOAv@rrGNQ*OH&s%wtH9C>I#O=46MuZgGKwKPD7&DkaJ!R1#A7 zyKaU+%{+lqxp*SJh-Cz#Xwn8!If%)?Dr5Ce&Rs2*-9CiaCuZphtMs>#)_>YJv`J%5 z42pSuNP77cd8rbCZ(MPMxZeavKdGvItQJbPDK3m%e$qx~hDRS;ByxUOv3 z&Q`G^sY2ei){*HvM{EuD27?(w`Y&qS*JQTT6`?q=k-gFV1DlmzK;HrB{x#@r)LB$f zB@Y!SqfafoeVZQ22n5!A4IyfJH`u4O$NT@W*O& zvIYUh(x&9tRIq?)02tR5$#R>SpK)S=KinKpyBUzwlA9LX6}8|C>pg3qm9I7gPTkQS z^*v{;{?wcP%5JpdwX#psi2KIAVmruj`+;39!DI(OC0Ww`Ku|xFtSz~^TEW!4wnTQAN76uvzKgHE zum}60w2pl5XS@617`GoPl|$irKR#Avx>&WcU9CJ>;48J7 zgSOe|#piAEh8s3|Et4L|Ln)V{ULTdsq;b&5V);r$bH>N`C&U0nQP33aE0KYLZ295T z07tFAWMh$K4kP6r4JnGnAYHrM<%gY=OHkxc$eHQ5JW-J5x@{zoH3_Z?$)*QCT zO^jJzNAC>(D-KdAa|n@PJbKzc_g;dnFH8lNBG-pr?8bforxU3AH5Ni3*F#uda3k(j zf_4L0J8gU>qZj}M4-6f%64&0C9rowfr`p{}R#i(V`=>Y?z2ZC)Rd`LAxRp$&fG>7W z*h|4q0UlH4>kOq-b;iaLtoBbo#?UxU4*d#KU0_uNPu8``!{0ph>lcbBdN^aaNu=3Xc z9J$xr;9rs82oTc$`uZl6<_7=txEdLqFQUHw&%c4Bf5Vc9&I*M^g}?rrXsaYxTM;nP zDJ4%GeWkkLBsuE1exa!W8sySPL4lymrq}>+;(Rzwe++u z_R+{@uKJJEK<`LG-8pI zqWVqy+Io!mm?ZcXt6GE1GSaV7P8iV^pleOzQ5#}60TM~1(m0V5kThwv)DkD4Hy*dX zz(R&H_aJ^b;DS_KLl9L=Qj}I4Rsl*O132HKAt=J3=uP?``&qI~F6i>bgJZH4_Xe{- z5>AZ_DDbx%2EfQY)#<`G*ZoSdlFX9V59smw!@EMm0lNtO5I{(Y8BvgdE0_%Y!H=Yy zxuo2pHoL@pl4?7#WA^#gUFI&d~|wHT<*Kokm* ztB(Q27qKZppxfm`-eW8k%k{Lf!PH}eU$@sf&b4tl%pW4wB~eZ=CtZV*Y|a_d-+C>$ z^r8Xp5M|i5jKlw8_f>ht zX2i6!56ASgT}+wYt$`%l$2A5WxaJ)Gc)Es@ge)n-nB?ur4aprPapmqv;p))pBR%R9 z?uhNY7XYAC0gy{9&2p=qT)ut^wTI(1BxfuWrhuJ&-mCU;BJGH%8bx^=>>Lr;Bn2Wd z)DhSwNMN)PeQQW&S_j*|Akq%)TxfYeWkYZdF#>>#^AgZfHt&k?<+K&#o}xN``~Ski zGq^)s06p^U);|$jDLA^x^q3&6l9Z)^nEc&Jm%vKluefQ$Zi<+4kmztl(kme4S6iis z%k@?VYbC|0{`V{7DZ-^GO@l)Ira4&gC!WP`+-h0?Y6AJ`+pto$B)cPL!a`!M8<&2x z@Aqfe))~EQIXzecl^%5tzoaFlwfAt%Z=xv1ejsZzc$5cznDzD zDZ#2f8Etppi%*T*@)_%=27jT6X1hxKuCGf!6mHMFJIh*(`qbhU5h|>{W+T=hd0cnN zRcgEe>N|Gm;hJBZ4AUh}V${LsI^3dlaJx<5##}jj)JOq_3uYW(1WdDLxT=tQKsg_` zV;qwB!6_UZLch-L(%uY~7RmE)AwJ^+wzJ%M%!Q78d8r5s1SS+ z=>Qhbbn#%hf&Af$X$HZq6ytbgpocAE4%b6{NpQ8ckWhaR``{a+EEQfS78E0QEPwMd zfAwv!2oYEaE7ZcQE*r@@J5mF~>-djVY0!ae3_&-(#{`2)oX621=jLMjJaBZF{EsY(>OsQCW!(Xw{lFTlCeO?bkaCpL~|s&ZUAt5OaFrl6Os${VzN%scFSQaVjPU}f$HL{#4j7Vmz8 ze*zC)2aRSBIZ?$%L4cH#M7lNfBp8snr@K{na)`ayYJv4j{E|UXY~%HK>20}T;TeVa zAzZR<%v#c*sQ%;z1R8P=D47T6@3(XP!a|WGx6?Ix+3&+V$e%>z%Se@bZljHQW*n&e z0d0zPOxl5>Dt-x*gC<2+m83^DLM!XhbyDj+6`R^sF^~r0kFsL2ryH@0j2h2NU;d8#V*zsRk=?8lf`rf8 zCUc8JD5~6bDDmABT90mDw>3P=} z9T%*m%=Md8q}jGNw9T*m>lS>28=sg(0knXz9oMXs%f^5hPWdDH;cwb=7JWD5(QQ_kvMmFGwid@hz0FG83mgOsF23<|Kz%u1$T2a194-s9-XVuTqsF=s%mo?T z&Z^#{)~UZ(C7LBQd1u>k=XVE0|v2Aw!=djl3qS;$R2ik&%t zf6kawdOCJEyu)4lw?}Tel|u)&PXi%_-xJ=Io*YSW(>nwLw_zj6J?gSB4lx{9I5wn~ z+0a2?!9bD}lJlvvO~vCF8eMJ=^btu?S%|I3jU!3o53X9{=PQyElJ?+tmmu2H1}+yz zNTy~%S<6H!4aDvq%nQ60x6Im3*ajEEYK4+~Eb*CGg=FNhRK)xnUIeV1MCF5EJjowj zq6ik{fWjwLMVgo7bN~(3rdjab-uEephx8NZ%|R7*Li9vKd+HJaOa=wg&KI_d0j1QY-igy;ceS9 z{!J1`Nv%1y*!13>6gKYm2o#PvmAK_;Fc4389L0TmRNJ+B8 z3Vp{StsH)&3M=OP7liN$A-0SIt3FM}IJX2Pc8gDZD_BU;DoHN4exf0~D6e|0;9@iX zwz4m>ruMVrSySwXPc!V~cQ_Ip|ItpKqCM{NX*+ub`3-Gwc{j0uVq8xFDNj$y5p*!5 zDHPKb5Yzb79hVPf@QVHoBPjY87$T|5ozgDrdvn>YxoBRbqP`BUC{|IT=!%%gN>}U_h9oI};wwp@IK!1x2P6e0Xu{;7>o%!~8{aiFK35TKW6*w;iEyki zG8W2kKjepz$5$aM$$^zmD=EAuY2l)!a`{U0IE>R&qHFfQ*N%WPnYLqESKHts^@HQ88l^M^!CotgAQyQb#bdTf}KQnh3w|MD6?)vCtEwbqdinf z*zsN-mWLmk)es*<+r z7YP|i=2nDYkjM(q7|riFU=s`^Ucc2)fWiM;xe}Hj$B#A+A4icO@)Gp>sShJqQ`!2H zJ4paths*U~AW%|9b3K)9N!V}%tiiB~e^IREHs>&B#YI4abJ0x(Ri-FxFxhL>q?$)( zvH#ztO4JJC(Av6;{MaTDRI0utkQ;!BT{thruPMypo%g4K0_~2ADLYdLJa(ouu{5F0#O=V#gl$44Vazgt%KHIONfM|e?dCpD ztKSe1U9=DoeujgV{VB!JB4P7xp~|crV8pitwVD?61XEbo%5`C-N)qB$XmsDEs;wJU zLMmoc(au2vm`Ss02LEpu)5!MD=xTdcjJMPKS76`t71BT4Pfj0mVw$`nTm&F0dBPn+ zl|qzvG96c$`8vrG_Pvs?RHjSGy{Qn`a70AB#S5%LBx4bIxkA+`06|a}mxc{;h~ubB zF%v|e1n@(MbMk8Fsp0)0?2d7 z@dc<4N^~7f*@*OxBlo=}WnSDpI@79XEl^TX{$A`1gBk?+5X; z&9%k#izE$4jp(Ick_G0VnR*9FsXj+C`oWs5z6HG6Hm)Jh;UnG(LZ!J6TkI%RD>7`2 zZE|2WN2|HT5jKaGRzW)4IN@}fr8Kar8^(0NX`Z=L_qHRQ`x?V2qp;5S#-isRvR5KM zV&AktGt$Q1>bD$m&@CIBPIiIJ#4sAU#%5o&G4#x84B`-VFThoz=u8m&4B^lpyoL;i z@JkG1Fk8FKkkv=2DIG`Y%RLa2cq&nH>K>&3$*@SK>=b*BBRMHfaYG!WL=*=C#L7>e zT*%}iE${|tD~_Q2wQ=_pcb`_SNaYW*WCflmMs`O6r5csVU7efPQHUhRa3!MshIT6W z09(Q?z54Auu!F6k0za39iXo*^PT`m8TWXOLSPkL_#Y@4b=te0On3TXehL9|p|JASI zuquv1Sb3#=HF+kMgtY2*V^>_V(aSE_T~*2AsI>m9D>d?~eF7+yn#Ps2YH@4+oANwM?g&pvk+GnYaZGQ^qbo8xM%>;wEWVDq*=Olgs`l3(0)Kv>n`^s70DqK0QqVSMo0Ltlc2rY{B0WKkeea zAl;XwN7EF#O>&{vE;zrpha2BE^3dDIHRpE#TYWPTr)4ir@*~}Bd4c$H065J)nV`jL zXAdGGl^WEq9S1HDvi9lPhact1$r`(-F1Ke2S9fd&nO1!%JTCcMHlTCkp95> zX|^c2pJk;qvvlBSM2TQgm^eXw^MMI$)xiDxg^)&{7$5LnR zza9l3KX3Nho6Hg4B&%M=qrKGTJ)4P%rK@iXd-PL$zj>vSyW&Z%#E~)f;zgbMgEiqi zv;902Eoz17OtWhF9z;f6XENuPZQp^u=Qe0rI^*&XKKs1A5xvWNVd!rdI{8T06V|P9 zU;B7sbKA}S+{r%QF`f@>hxYXD@q8}Y*zEJBP!zUp(oSwt6b8-EKIeJdX!EA+DcQ#J zwT&I0ndVlGvFuFZr9Ku7@)H=6!@+yFTJ~~@%pAi8Ug|dRTQ*C67eQOukrQ(Wci6nJ z5lP3`yu~YTvsT)?6{Rg!&3eaZ5(qStuOGp9P&V<#N!{$^_NjIr`;Ed=Upk3Pe(pK; zEe4XXlp;>}>+D@+R+U&S*+NdY>$a|cc7e848Et1hLFyLK8s${^z$bI0uHC#!77iix&oPH$`%TAMay_PFAFZScP2 zw{36ITP~sQnC2D&CT|z}Gi|G~v)i~?q&)2^1;&m=q-k&`KK%OV;Bn% zUAvdX;&j`ShH<51DnFV)I))U?UCkMf_lb>zqYqcF09-+-lm0M)aE?@e;>2YElwC=3 zX%!cNGj0a(A z{=&;CHUY&<^2&?FL5aS#%0Lcded{28nOG=FECi?9k{{Vb-_S?PIZCOtBhq^r1ZyH| zN6M$2=YL^+KR_&om2c-^-{LAX2=b&P_1o6@Eyk>m8D_gCG;tft(+2Xif!xY%rBvOQ ztowYsCN$+~eD#0ZUDLE57iqHvX=BaP%F{`is=ep!N@k;e0&tSjKryu2Yi+xLPVKOL ze1NmG%RWrB-8u>BBa-xz)oQIU%Hl?v%v879tS{5S_HybXmk<38+=sSum~LcqWsYlN zTi+jK7xyo=i$^}U!qW$-aFuC?M|J7+Fq`ZnxZY@>8K0UW-7oh zNN&|y>nzmySF*4Ecn<2<2$dgfKHc26ZX)-;N}oA>>!-fWv4fk&TgJ?AYR-wxEkws$ zHfhW~iEp|MCGsNf0+nY&?c`BTIFWXaIhUhmS2eaNIs|=MY4N@b2X}D(CFu~P@WrK~ zRfX-4t!?9x@9?2+PHty^eo*_2=4q^DBBp<7lHm8pF|l#aO8Dk3c95sI?0|BTmjhd?T*+Y?4-t)Kf5dOV z5uQfB)={bkyls#DdALnkOjjbB(qR;BOWKS5r=+%6h^m%K1&DYLAR36kpGV{8oZG0^ zo()#69X$k^vDsnHUS=$QW|7naqT#9!)fmlBX=4wR{)@d-qrELlYHusYcVc%nvfXKo z?Y-UXpZ9*h#nSe$V`gjHWd32Z?Ec+m@pgGQe0r>&VPGftbjY}%R~sQz zD{TfnQwL2R=bS?6lFksfA#R@@ZWUU>62%Jh*u(kP)K3ig(}|nB_0jDEHpnPmoqFo!q&V^nOraWNC6cd`#< zM18kI+>$-A*oCe-ex@qyCC;TDu!BrV@^)@Y=?v1s@s#bU4XnauwnlbJd;43B{&Ww# zVnL5}vwo95!}bNY1I(==r~FJ?x()!94eQ(Mtryt5bvHO55Ev8ibwi)s6;~9$qCh#U zq;QFdq#bfuD!&1zONXhdY%%Q@mA3{{If!HESA}{5NqKj%aSKn_ zgyodqkV4B_<@dWouM=9LUXlSyf7*EE1K63}q2gF4mE>hcAJ%d%EvuB}dvWx1!@^-W zvHO#+k8%aFvJ~Uqc=!dI*l&#Op4r55Cc>06o52 zOX^;3I6%ly?;j6(xi5Dmu{-ud3lBgK-y7G>w&3hf#KgQS-K0udLhXy4psDMeBM^X0 zES)m6FLsW7(?Z45^l5LI*w*&U>}uOSnrP?0$+G;5r-?7}NDAE`5YkBan`D2B=qtbe z9}+&ADdmr$v=RK|Oq(M}vsn_g@@XgNLFf4GHiu(w8{N|!19Q7WPYKbk&_+^u%zyoo zqoR-95im+zP%+2AlyY{f5Ron&7P)MT%j(VGe@Dx7Vvtd%XwKgFKqri=s=N02Aaz3| zO8v*5RcK-VV2t128K_ru;Tt>hb(Vd;X^Q168fiJq*-B4rW*<*zz;<}cR7~8hAa|>Z zncEX}P;i;A)G^@GN(ac4ttwn9vR$%gwYzY?L-KnV(_yq~Znkt+WX zW0%+oC|?Lqlz8A9exH1~r2FoYs$>ue;wbVEV=(W2YcS`;-7PF4^>b1|7i=ubz@D5V zz4#F&QIG$u(5r=%)Z!zF)4C#8>_R-_oJ_jlrif>hd@^rBAOABXd|o6U6c z*#|;ivM2AYZ*!u0*y^zfwr?UfJd@tw!k*CBGPD6c(q%thmwl2}%d`s8#h$c}FO%J6 zzgN59fPWY8PVa_1d!O?HzWE+gu|H&o>FPiDU#@;Hi>tr<_HnP%X7?(SF5Whgv%T~B z+gHot?Cb3-t?1NOR+xXqZr~GGcoVkr4>%5&%`L_7)MbnQ17T9{PT&HECH+IyTaE^o z8o2o%*pF5)CqL*bx}e-bjaN@)8~keP-BSa5fgSX#pDmRfEMiK6an*k4VWi0GHiSY8 z=VvofyTYgIJFqiCwbDI0A7l-dUsPauoEiH6|J)pN^i-EyaHox1IZEbM?i|s6)OJxm zR^3cewcTQbNf9B;t)jDZO#NiXzuIiy?^|V`E{wKSsET$ZV(6CKz&_?P+smO1r{dFc zIR$MMms1E5*;*RdJ~}Vbi#JUJyFWX*jcuFI!5Tf^*B&VKf(6~z(YlW%PJaKOwdGpt z%nYtR3y#=pa(69_o`lvPi5=eTw$vuA%(Zb0V^t$hBymdwA%g_z5}OXDh>-xd8K~Bu zILJ=fL9m`794JHCUc-@d4MV&sQ&Qy_mHAT!P#ZQAk+Dps~zz)}5^z#ShV8a(g!gM^bEw;%PmWFy(L-8>kx< z)bd@~N?k}8bU@xE;?)wPzt)5|(fH>-OS@$Vv0Q2DD9_#hq{X)DYnc-}+vW)!?dwU+ z>)WBSlGa|B;fdb0wQi6}FZ6KifE0G8vn(E3J*~T@nuyPqM>b zZL{kaf5b!}7i9!8DSB+L{(~s|CKr`ENZfY95T!U03DHVBEL2PZl(KtS_NLF_!;i3(T%oGm}(aV6iwh>ZD!Mm6LcPk#*?%zACw09C++@ZbWRz8=I;|!X$m76qu^XhFJ zJ!yfhR3#gNuzPZ6Yx@e`lck?RcGb?hjo4!y-#dtE@LQa_#pl1FJ^hG1R(}$yC$^I_ z{A^%ut>H~4BfNRUq!>96rM;OrIC6{ zy{jfDJ%S3N(aPt!lgZ`t0$a(orp8iKj3ZAUPXqB=@f+-gzDq21Q=U7JT=~l{?o?;o;8eKRfS z&h~a+Fi9)=Muv99FMnLPWlnm_a;Da|&nXms=C#-EXkpuTv!6U|s@d94KJ6zzL1W?5 zDzMkw;T5>+Blq;ZJWEv0on%QL^9tnZ$=d7aV!t-EkX`J)-R!HSIa z>vyfSuC*5a%ywdISR;0+-L1#=fYE{qpu^wyt{7pvo}6#xZ!EDB2XpQHrjvLP0J!_) zk}1R9{`L_=#BAKuV)o=@&eL_Snhq0py4SD!nB4_2`scRjtPf-Bu(%{y+b2=FuCg3u z?PO%pfmI#`;Jh1Mr)RW6rsjz~-v-_2VhO(mdZHw;L_gnx;Rdp|giDv|h=iO%#r1-{ z`S@e@R&pP7)O_uG6T!gUms!~YSs7ZAyQ#L9UF~2M?7*&;?SN@#?SyKl?&ff_h@A-D z_T;{{A0r#_M@ArBc?-WM29C_8+wR&!loZi1oK#PLuzVCUgfXiQ*?0fEf@`#I@h|QV zcEjh#+SCVj+h0)&Kf(qgoufF`6r7pK+IhxNED%4Otz#qxHU{Gw%e{2HFBR=!X&U~{lfh8iv++UOw}bva)zYkmJ%MC7#0EILl}OK#?eP0;)K|TlGRTVA zy7uEDAIW{nj=xhtK?3cwsP0zvV>F!NFp} z>|-_*2I6Ex%Vc4`vxVnG4?78`_Okeo5=8Msc2P0Kzmxlx9LOs$-Rtpuc%14q1Cc_8 zkPtz@h~z1C?r5F4a<{cE(b`V^UFc>d%%Irfl6BX2(LnLL1{AbnUiByQY~Sly=z7MW z>*+^9TyOj)Mc0ybkT)cXmnfSG_b{zCbr=@ZV+UM*$>r7+$h!V@yPj$BKpTJWWc%vX z-(Y{b%lc2(=36+j}Z6=vv;&?Ks>(n-EI05TH9YcQ9##uwkRTMTH z)abV?58>oto4oR%je2N5-6DqA)d|0~DP2>X-UH27}iWwHp241Cc#qX0(ywN}oGT`ZY}D=!`Zc55IlPWLD}Ssk+ybL#~cZ zlHU|3dY9N~6C!3VpAYnlW{emIUn!tQhdpdZ20=-Y-k=UKve&uW#H_-17MWBB&C|nW zA5>d2IYa)Jo>u0jr&1HY76R3QL^BC(pvm#W^x9XLI&Gxwq?T%LB0QkOTCj(hwRoi2 z?Pis%C2c2Z{a`0VeRFIZ>Mlds16!A^>>_e8ZQxY<#`XV-zkM%VLSMB>Pn@(tD+uKd zURPoXnxr@k;2sA9oV5P1{dw$*cI~%jD%Z)+NRR3E*>B!wcl3YU#{M|?u$`#HV(w`Shl$(~OdYWvpDwtW%;Wh&XQ?QP7* zC5$PZV#ZzARYaz+YolW#}Pfa$0eZ|)Nh+sPf7R$a8k8qO41Q_C?NY(mlmZd*QV zb)l%tC-^TSaKQ)k5y5u;t}sG}!{k4D6bt;Km1l8jdDLcn`|#j(CslKs@tw#Azq=4L zPA(OL-wF09&Y-A6)IWl@NlzvF5wl8?=|p5Y+7(b@T_VuIk6dD^&Mif8iUnb~PPU{~ zd=m+tW++(;W}zo>qUMfKXglxAfZpfI9v5XeEYx>Nn{E?7;0TAp?F7iqXrgW|^!eYZpu*b&u$R%;wr13;NjZwEi}C z^!@goPqW7mO1QPpCY!Kh4#PtthV0_dE9p!*fIcq8mdHW6m%0(EchHeZ4Y zUFsI}*{B7n9qveU+G?RaiVg>3P)QEsld0acS5~pztqwrwkVYal8<$vOkuT9G)^+)J z*d4e0#?ogkv|Ypsa+VIT%7yn@MJn;pR=|N%`E7{Lk!c|Dt|Yv6x8SGSb{B&^Q{_>{DH9rZNvNN{g2vWy?)( z{}u6Ya2KTtcOfDszei)DU8rDQeT?77(jk`j>QXyd@GP*qhi=vfh!#`DPA8le?6U*_$q*hD3-+J-VWOJ>TbWiRhh#+V3No^l&vBR6TLRx^_4a{~B0(ma}8S zitSBqdm(?rXct~$&q7woQ>zz8lHa^YY%wCKrP8Cmmm#&LYDBN2{VYkgndmDI3AX-c zyUuAVg5x;mgv@UD{VI3OPZ@ROq zrb*A4`eqfd zDIceZg8|3?qLk_=`&`$b*-yTBx4rtvAlsET9%7f)3%`i~M8RU9CT9`Qw-@7ZOLLoh zKDLFWX|+g}mLls*j;)rv9p*q01Fe?kD5xQwQBs}`xw@&XE+}M!4DuEe2i%v6hYPg` zN|!2F4wuV-RyatMd^eK??S(T&#h2lHpfuHV5>C0$mH zw@g*dwIFY}NE#6&b5NpHsnDPXhb5r_@1+R|olGXWO~x#BxmK7Zr1GLx7co%G^8a9# zn5%BZEBB@QlnGEqAZRBm7Ex-fUBw!*Uso}^v8Kp6lV!HZt1&p4Z6vzGQrMyM$_}U( zYMf?yCyGH*7lKWPE8W!gnW`-{Rnd<%GSfJb%tW!wh-ju3^f2U6&RuoI0&(xF6|$Fs z%iJ%5PxbZWyUri5(mgK`;2LHxvwh|v8_iC=6-IO?jOZ@gq}r9_RG)y7!2(9@@^e^6-Orn2jcKb&uo8;27Pfo*9Uy)qox5iKO;FWIoT ztB2Unf4{~G@UN!q^cQ9_J}-6eY8vS6@>Lyi=@%)qaF+EGEl>XQh zx#IH4j4_Q>PMX#`wLZ6qBqnI)5mYV`r6bd%Sg zurZ4XCp@~33gI^_`0e=T?aJGyzG8jn@1~`0vCYXMnY_7~X{nSuQHnhkA8tBv!LSZm z;&oTtUy^Zki-z~rbVcfVxpUK=J7L2K#th6Tpg{p!T4XS(g<%?P(P#M)>vK+2*74WJ=3VAL_ApwduIAXF^@JY_KbBXUK9JJB!i;hI&75*dth(&1IaXZKe zxg$5(ezomzNR~x}7su}PXvkGEi&o4++Prq;BhB=q`+MtqR(GJ2KhOEJgP!-?Ih#yGZtCl_blyTAB!*pT;M1dT zQB6!4jn)so-bndOgIq7B6ipyXK9$N8^&nCsg3uaV;i}}{nV8;nZxeH9**?2oQ`Dr>3eh-_&WdK#&n1%-Pb zpJ!*X*V~z6g$x{`9S|dgnp)mNw@?GF*6|}oyOy9Njx0+*Em0tsh6}^nDNOBtktm7m z@6sjoad;{1{A+Ea+zml_J7PW&AvNV8ZqgBg_uR0@*Vo9b!dQyL86FJjOj(6nMmw7a zP7@n|HafPvHbNn+XpGnvz6EEcZX0e<#544Wn1O`*OVpY=_!}R?y{<%E7tteRhn+i% z!lrV(n%ghZdbSM#A4SB+%ZU}Ou&v9++GKK}eS+QA;|6-L`-q@FTc43H z*zC6me$!rOBAN-6)IWyt%)`}D55vjiex<=mb;4x96raBu!%h*$nEoEDEcc_Pc8}eh&7Cs0ryqOFCf!D@45oI?r-s9FSvpajrU}ML|2v6uVKW>Tl*g>?b3WCc$cBm|Cp~e* zMj?k7$v!odl&<6veMmg@=C4}r_Gb#&9Qff)-1z!fBxza@Qo2k`=~j3V|yQ0uj0%O&94NP5`5si(1_h1#H8SL^vNT2Qe|eIT1utu>c; zxKLZ6b~rV3Vf#{40Jo=2A%}KM3zbrvrRe3@y;>B$*UZv3#Rywra;ghy`>!akXqvytL`k`_{m|_W>;6^vP;FzI%Fo`GWNq0)uXE)6t!)B|_31c|^0=6T3-wJCBN}2hqyTRqX|;^qDUm zr@UBY#^Q`p8+t#eSP68iyHScMYN3FHRJIcd7EU8rIEfZdgXv$uwA50&VIXdl%7Xhq zCly;6Oa`nEV!*H8GSjZ;&eYDhAKMqNyUi9%8){Fd&7&ZAkd>qn@yP?QfU1zd#$|Kivb}90NDULcjQOoAixP{86se<^`jDBiyzZX0m(_6a~Y? z)?}R-E&>f#oI|iCBVC>Ax0~p4(1>N#VqtaE6l#;KYsOR?&)}Y4pnpHxAQsrd zb?t1I3XiGL0HHl1c`;Eg(%n$K?%_ZssJmztJ?kvdH%m`h>;470-*tx_DiB%ihyM>D z#J{=0(w!wyx(pw76v~+{(n&AfHP9dJMHH^{Eaam}V?(97;GxNPL8raufn5a$h3Kv`vlaWbAEz%$4cI-_P zqGs8AiOQ9Wm?cD_=G;*`wr8zv$(Uhp$Skq6-PqqQ3^6TclFPO7@N}|P&&oKH_hXpX z=JKPIWxl*%mZgqH{Ki&zRl?o&$2r?<1_6ud8>{X2v!1iAUHZ|!gYHDv_MuzIUOI$O zoyfKrHZoBzEEq@s5loE2kd81Q#;IDtU_J&JnTKUQ$RcciqDsYfncZjPxM?9JhHO!{ zrHt1mI*#iHY+&d*k&FTChlBAk2WFBBq;#@>dWnsqNA18M-?~sk63-it04u+^`PVjo z=wEE>$`SVR(!ub|bZB7l0t8Okq22w1@j3T=R@{@_uCGN3*gh{Op%LAw`&Ru^`|~|f zBvdvi|4l@6xe_bS$OtoKgsB}yh{JukC35o)OV_=rZjL*-8EltLO8e&4*<(AJ#kZ+k z+_HGMo!q{Nb{V^^=464LId{@7)Sf0D$XBXeu9xs`=@|I>BOaHP_2=ar6m8bR*JEPSdaRSaI zLPxB5tPZ~N(&C3jdFRWq^uUWYQMX?ofZ;jr8)dc1Z%?H;)6gdlP&}kG6L5EE=Gv*-pHoaP|LfqS_wiFKUYvZS6GC$7Q0SPENk!a`}q1 zgyD^d*;3Chcaj6bZdN;VuXGJ5THUCXY;`*#%54<$zn(sk0^kjH_INQMmczcN|Y>f5P%mzTIe&4g5Plc*|z zI2GU|UQ*;zn_L)T33ocT8f-Mt>1*rXnk+>Y7T^4S1MYAGZXZ1bs8$KuFEtPgy~yWl z(}!&NfcRcBaod&;kl}xT{j#-sGQ$ZnMyQECm?_dQ89&y|jv8*f&W+u`I_+|k>@raS z98bq7$C22ID<08GJF8n|#65B@@)Udz*{IG$XJ}|UR;`YjU!Oj8z^dL{Vb3j|z>E;2 z4a&&wB{2Go_R;0C#%E=Xi3*EfAN9HRkul0y-iuJkD0}X)fp#MUhOfd8{S_U{=c8Bo z*lgc;kW#9TvB4sj+rNR&=Y&mI@U&qkqsS}5{Rh_6B%Sr5w;qboExS8R~%a#3- z2NV;H6(oDxA2-dOGRWxms=wo&I&4Y`^diTm>76pnKP}0%>FbZ$q}2y)%!9kE>*q!) z5=sYy?|$KX_VBbvY;Wo`!tfJ`#_)-Px7Xe(PY~0)+$ML)Cfz!pm0>0oF6(EJLedGB zTWCag>b_Nly1vLCv;yi|qE%@+#+JWia2N=cgQ7s(DYWR|P6>NLhw zncz*^IlPS>zE1nFw-AZtJoB*q?Irp#w z6*E;8J3mS#73#6T23cSoi_i?4Xfvv9vW@Y;?HX0r^dDrW8_9h)D?9DYiQTATgjFF; zAC%BUJU$W?R62cialU()?pL}+y6yV7D%oK0H%XjT_lY!8W~b0hXn^cf5z$Yv&yI}@ z-AXS)E)b^<@ zwcYnsnO|)0l^rH1*P;vB*_JP|KWoF(9-5?JZ=5VES*Ep0t5lr}_e*V+yfKyG@Xlpy zys^%{1L5AO2fBU7eSF22pU|dY7T*2Ema~ivJ7UN8t+OqeGr(lh=UsA0RqbDLCpo=) zC|<-$UzL@{$x89OAbMKe7`4~kqigDFEHCiKT8HtMhW$XSRH zF+Vu2=LDOV@-DLr>g~Q~i3QQpZ^o7r#Ds8B)g;ebPN^g`>@etE2dBI&H4C*jc&Z%y zrc1^8CH?W zkiZAF+6_#li;$4~Y?oW@o7eWTjen&XM(%B zAI84MjXm!&J5P|E7oZB$W*jy3oK5oqRfN&cs42*bJ=lAaR&iP_?C88h^j3xL?8REe zFkmO=z<|5#CINwBgj?y(wQJcBE8V)p{&wsBZu=WBKmku9DA2_GrY4f^ z0s`NUePit=gBCsZmIG)*>&Z|zLH?rcbtum6s7m$gJ?g}vV?;u9zebg!9XMV)uf@YRXhlLtn=mA!%S8_De9SifEl_-nvg}&6WzbKl zA6=~{ND{4%L=7Hn0T#rd6PjV#EjaN}+mHTr!FISo%kndX0gHWuj+wvMa-z)N-QV!r z3^!t_Q(YeJAmS@7ro-vxYK3gKu^v;3>375Gf5&18J~nGLX*N}Lmg2nGw!jM7LGMX z6#XYZrO;%$Qrye6%F^m-FVPgc@4hv$ujQ|vXyrSeu%@H??A>EUcHwlTHP#-p*2YuT zOrW_9Kbi5j?1_!74c0>eF6DYIVgw31w<@rO`6#H>1VA{4f%rm*5-QC_Cx;lJu7&4kCb$%zQld$Srb@wfsqFl*bj^}qEdnpe9TEie zK5gO*G5MR53=V2=j1ej$6fy{bMnq{I`PtYP`>;$p(gt3LHvj@6=;W*-%KhpCvQbmr z)(&THd!JBy+r=90Yp1c%#S8RvU_l4=bC%rH$`4cLBQ3;@TX_s%qtLuFex4_yOqjfN z47tU+wQy+WdyJ})qFsvgy-C;ekxY}&11)Yx9y!zyaccP|xZ|#dkEWg6R{;vc1QZ^{ zKhO`MxhRN8310+Z_NYES8jK@caM5}w6)f0}#^BnU&e@rh2kpJ=$1V5SM9W@*5L?l1 zz(pvN;>e?wBhM18+*!!f>P6v=$AeLs^|PB4#Ff6Ra1r&cz|Bv8Ji)H$@^h+<#^5Xr z@R7jZz2$z|`l^p8<-F9=KS0T^ScKY-&jM=ZFs^bss=S%hF-}7~G)09V!j4oi3HpKY zzoUR#ie$1Ev~m>jQBpTQjP&*qR2ox=1E{aqNW$#HUpZk@iHJ`iGCq3EL3(6XTHo{o zOszd^!yey<4r-S@u=1WwH{Y4b{uR9~Q>%zbNkRGm zTj}gXSEf1>al#?$k*ZayuqMbC;AoYkRid!w3gL+a9R>VndE)s@cbZ zClQW_>cK9_jgi{+TFLw*e^AWE-j@k+efxsGWcBvu+3OR5cQXDRN-AMp2MT zZ0G6X+JsaJEpk50UvrhCql))|$c{c8I`t8>at{Z8rv;>H<}+cWa&{3`QF?HrfdUkRm>#55Xxfl3sE-N_`a8ghw%~atIPc zd0#_OBmt9llR*7-fMa|tzGR1~4ravFdUnUCNHk9nG_<$V)D46>d+Ly#FL=gEUS7n` zPBlA%hP_1nm6CF9v^<7Ojz-T2msZ6bC3l&EeeB;i?W03c_L6~cf_`>zQK2H`baB&ZZoBc5SmE-_~IvK*Bpol|i$qGRQn2}nt90)1qkWt9Z zqyi3TljR9fu5)d{ia}PGKA2Y@fy5ck*Ag<`a2#4klDjmyG7dlavFzYfa?-6g6pO*K8Ar;EXFIA{rq+A-2#! z$TASxbQ9Dx!K`wujEn!HL_(p_i0r2W z41pQZBRMke;$UfQ)-}pg1PQL?=|CIT$B7zUp_Q;lPNU$b3HeF~umC*{GtI4FO*1mg zM9J%tn*kvbH5_zrq^b2B^pOWSVRAoB3=A&T#OMjor|5Tk?xJslT(S+ z*2LJ-voyOae$EPCT4-fiV{I?NdO?q3FG)h3NR%qAh&f*lKPiGAk3=ljDp5QC_4~1r zeSns%c7J+*D<(K_5MvnH>wdfO%3JKpD`fG#>`S+$STg0XBj_tU1`WU@avf991VqPO z(;S#K$8(@gGtu=-$9bBG6ZLmzLjs}r$)qCHH+U5O)aWfx+sQnVCF{MnuXF9VC-;`a8HAmJ+NXEVSiUMV-7No_!!zV!l}=_1jd z5_TvwQ!SkmCK+b$zHIfyBA_V$( z+Gn=VW4wwUIIj6@hj`A}HA1Q_|L4=I8r^C5YH@JAk*qz%nNACOJ) z(>AP9GV&HcP5oTi^!+IT8?U?&eezQ=`~idj7-_*J3J)u972(7`;S@*{D75M!SGICh z9&^jxCC36$lWr}SV0*Y-LK*1^qo~t_+tmog0d>w1?Sbbw#H0yqx(Rz)sJV=yO!UEe zMqy2o96cmcIA&rxk!IeDoKY~4_vwl~!FMN8>U#+b9~GK`uHlNsR?crcGa7Tez_E_( zDA6c1OWF|Rcs0OViLK)qUIs0R`c^#tJd$2k#oq&jJRX`9 z*jKKjp$uh5@ib{3xVQvSQk{1bQxhZ&aG4IA%;KMqour@n^v%Z@-$1tt@~pvq5<#dJ z%zwu4I$2&?wIv?6mI}(UL+V^g_#qRkDdY?HH?Wu(i+s>u4=yds@6*K)b zf9VJ-fiARshGMov*Ecr z!*ARpuH;^1jS^ARaRD1P?SMpWE@J(%3zaQ@3{b9XCn6(GA}9#mAmTS5it6}fDNT54 z4N#*fswf#FREc_U%{XR>VQHeCT^JIPG(%J4LiZvpKE_Hx6q&127MUf+OE5=@-wrTw zT|`7d9tRUqm}pF<7Hz+yiByy!sx;#UHHnHe2~OlEb!p+tX$DA|nor?FwUFh|Dy5Nb zR=!FQ%81c4!DX6ZJVGKN5~@rBM;;?{gpur7&XvD~5Ndz}5BbKRhHj^-WD7Z&x6O&6 zO{PE~R11fsg)8y>cn0u9f01srGeVS=yrw9^$a%WVcOqsU)kXTtdYVZf++CpF!hcO8 z&8p74d(hs^17TiRU=gxbWw00|3h$fMv$BN9m7HNP8%fL#volOQLA#;|HzR z%-1dMOA04ZvK{wlI*tyqdq-}z38+OzQ!DzDUoPRkyX=Opzq6h+xcTDM-?yKB^){P& z+d!Mwdz`JAINml+pK32YJQ=md3?ddwCW9i*Fg_VYGWA`23_#KZAYg}JgG0JjNm?bA z0w7(>02R4HCE!EFARl{sMA)K8; zl6`=OBSmmPHxGa*AzLXBe^PuVRpcc-<~;=;1C!zv!*RWaSx~(SXn6%qj#`6ws(+LI z*$Rz}Vm7QWRPiyr#m4Qe#xs_6$qpv+`?@^-PdbZfkoj(L)IfnZ2-43&;$LQ-Q zCs9Fw5~e^51YLsRW(AXB`;FL$5T=EovVMu0$e`eYBva9T9G%1^L3~B*BkKD|j~v$8 zK>m9uN*yAMkcRLrC?h3CBb-Jah4NDJfi#gx!)%EVYde=9({IXyV5PkqjA2`DMT~;& z$YNsH@V9~!H`~{Gbp2Au!6$i$$3i5n+p< zC9#S6zQjffI#U`Nk8vlf?z%%42(ueOod#Se#hsgZN=GuhFwq*&3mJ_*v)%?QiZa<| zu{FNVXgC(Bc z6J^5aj1uh;u-)cl9HDU? zt?V-LZ053e>=y%{u*lUKU30Hp8BaQ&MAc{Fn6cjFH}*9~R^D>WFYU*l`MLe(>$lpx zzJ2V8hv!>9&QzYG5GWEUhAN29M7^c~mMI34DF(Aj3?@SWl%!QsDgF)-6}+Qdup@^@ z?pj4_h1DZ$|Aui^{Ooi)@akMUy6q7=_SU0z7ziqPeunK@JJPoE$ekI3;ZM9~P%XSU z6k{uj(X9U;qRgwvi-a=n5O<00E&`eiK~A#HM6}Xksh`rFDZ(BX2Ucix^IkINJ81g5 zjcBs~=xFKdc7bHp=`+;~pnJ#bm6|cMMp%nLMXmOgS&C+c)D}V2L)w=cFdT(=+|R*U z-gh1pHW)&P@?nSDq+}FG@gKU0%OeeE578x+2{w=}cenu$ zfyGG_@D)Lc7iKhaE5r~OO=HVRyP^@qX#i##8jk`&$E*q5S=dnjj&-l+Oao_hZ+O*7 z{>l-B`M{Bs0P{>(DA=F;7RU$dwS)z+e z!hsYyM?{AB%!pMIL4S_5NzlAG1@(E3LL_ zi&gDdOa60|?OGys)63H^9(Q?0@UlptvPi3Bt=ygR1Td*!#9n?*soJ5~@Mx`uO0Z^8kEMpue|e3Dvo9RCeke}wWz_AR8HF|m$7$mF zgZ7hNaGI-Bc0y?hoafpfJZ6LDF*{@95f9&t$=YY5*X@NbsnU_rS@VkR%eSwwt~X5L zoesh4>%-&p4yD;+_N*K*#;kws>aW?DJI7chaV>RZ0&ND9@Fqi4BnPDc1PJm0mVH8( zWFgM7k_?DWF^8ZGPlxa=m{Fvgd0d?VG<5F)JWZAGrFzDX8jNW2Y$q&`WMLqsdP#>q*BHh z4nZ5*0S=9%x(tUp!#BbqfP)CIph>nv)B+~2IIi$UJV2JHgpr7W;mo ziS0N5k%e-;Lse5_i|7oll<*}%&{N+)p`_ zJc@&+2=wvvl&@k<86AGE5&U@lG#N7~B}5J{(m+lLx%24uP8=(@^X0Et$r~A#lQEpg z?qIkL!cEAJ1JDvdjE84JM?zq;Q0H8rwn)y!0-al|)xQXZl-fPKbhsTLy_^l66<}2x zRxGd)eeSUC0MNDZ{h<_q4jQ?5?@A?TKpyB#JdpV%+-pA>{S<9S8*SEWjW+ptT1=6r zno7o9I@%Azq&cfkX%(#?)4(1L`yIFWgpCD>?x1DO-Kt*6pkihHVVjd)ZD07+d|sM~ zA6K9#yt0q|_|~O1aQQp5#(tOPS`>k279j2;p?+vR8Z z`&qB`bR1b}H~!)=>-wEp)`K>YSAKoEeY*QC*7x=aR=HsU!4s^w0Qe1xGJ&9?3=RcA z#hXH!G=V~rKp{>nX^B=T#X468Ja93Gd=5RUVN+EAQ3aqTd=a?i642QR%L%~BRncu9!!^%s0vItJ3_8u+RcN0XW9S~9Tc-kbgZR<*p{WvS~gqGwv z%;{x{rP5r0k@j~{BIR(vj20@zu}NWtba+juhMM3ftw?L+Tsh1DI_`G~lU(^r+*NHC z+!gZ!7Ay>+ssxq1iqia<-O!aVLSj#Z$5BX7fX)uFpHfrGFgXH=`2@;}cWWXeCG-%N zX~4H?fC1Hu0W|?ZjYo)yfj#lU9)VC(!y#*|KWItywFkf;9ekyWfTSbVy$UE1;1NW5 z@*OHG z$y?sXmJ4l`3S-s?W8BwDlRL3MHxspr(+;1aRkF_AbdbHY5;?hM^+v3^7 zsS{iRI52(tP^41V#1-Lr`jRT{D0m04<&h#vP% z&a=<_>r~JUxf{{qo383(za9RBJ(_jO?p|3z+puc8cRejA*A-eYeC>V>K`%NT zT{|khm;h0wO;~%_TOkctbwVn62h=HCO+KBcD9co8Z2;)g-^v7mdKo7|iF)Zoy>y1Np-&(} ziUI|WJX@AbbmVzT$g@Pq<7K-}iCi@55-%r0*&;&T9q?u~lG50;vpSN`X29 z&LQY9BL|o1L+cs!=R{7t6B2-<5_9dnjyX_~X5zd}#C%)O`sxK*0Fgiuk1!#139k!> z3m(QP#h6>jS2?9}%pqJNfDy`gd|9i6b{Q0K7WFUWa(OmephL7r6^P2$k)m?)7Y2$w z^NmKJ1AJn@L!~ji<}v^Z>gx^?&8a_N4YgHZPE92-A+2f!L3N;0PzUJ5M^UG_jW4;K z=R_@%Hw%0^qtRa9AOS-d2a3gQP#Q_d#22D(#X-jjQ!Jb1Fq5q7eU%Um2?>Yf zhshyRu0Aowh#Z9?Vna=ITf>#BC)5mGYa*3-?(AWE@7-z!!)>9{K{^@P5w-)LLV7bP z=T``SmIz#kHXxtX%0(z~T7_Vh|OphS24DvOV|6F#GhCci0VA z+-4JLe3Y@}zic5GlevwmX9giIeW}?VeX-7xx3&^NCYr+#()$n>&Y&B+W6ytdav%4` z@XZ8C)9}6~;Dz;l{D9qs_ceTJnN3>zj{RxWW{bN?ksN3h-qYt1FHWDIV>31!v9aki z6y1QgM&p~l{Ov`ji(t^|a(c|bgs$zAm217$X44QOhlUt*16)HVGrF|jNu!Kjw9cN* z(|`F7$@ckf|7t^TC*`vO+)0OmKv{C}oxq%r0*|wjE$(WGpTKiEsL&_kkV8emD)6F0 z45}O`xn6i7;3(m{EM1MG#&;`7%cjz}IBSBv^V)nnvF$HbjI*|T-6-1)=ImcH#H!W~ zCH+PZU2<#HJiZf$0zI80Qc$*vG+KEkZ>&OxlGVI)l~&bj$Xu3!ssD&bE{@1@|4ciS zE4N%k(do0f-js+nfkZJPk6ly0MuIa2Ro4ota_Q0b7SgW#b>pmb2Xjjg@3M2JDwvRa z*jj-ql}j}@keg~%*i&h0*bs=&{5O8bEnrnd7$UGD?c1cDpPC#RvM9Ck^}HD3!j3wq zRzX#m*5V?FO^4V<4#KtCn?(y`tAdgyS_C&UAFhG(jlfPLsHP@u(QwHJ1g77|Aro_Q zF>{N*DQ-c2_jDQ+ksC5LdR?XqaX%=TSI8vHDp6JbCC1x?u-I2t-N>Tal0p- zpT%$#LDvpiM@R3hLIzA|&LIBW8pXwlPpP*L6DsB|t+cDYGS+VC`Yn5)&m2@uqd}B0 zsB~bDu+X4rH8AE3r7-m92HP9OAVZo0JQ<(FpYj#g$y=+PVl9E7lGSJmA!6tU<<)^& z2MHPFX9zACEVgc}RlGdc4)6M_6>phiJJt-cHxUPv%U?q*Pz`b&0{&9tcljku!Zs;(zK|IR4vJ%#&l|KMQu?+x~O@F;uq?=oP zIHgM+u9Us^{>qMCJ=Gprb)j$57rAKdIIG;g(V7nLvlZ@!Swwh%zh6E2zDQ>Y6cXa_q{}_YiV~*>|X=d@jYN@#mruZN;yJR`TftSV0{a z6sZG^Y6VMmFsislP-;Q_xiW70p$5>Z<&JK(Tvo$nH8lqjOuWOBpCCVZihrjG=io|u z<%cjU-W8C-aNsKRMIEkSMjo;5%#bOC=!{6Bhize&xvJ>?>A_kR~w85UYrjb*5s1XdUvV7G#s+2-Q!RSX z#zWJ7^s6MNW};|cVgT@T86BF!>OTj{G>;BTio@%?B_kdX3NGuEZ1&0qjDil zML2XKXbwz{ZpDDolltm53TaZrz*0(q8>dETS|vH=__-ocvpmo(DB%0NUN}^`hADbL0rKDB<4y6vc0hNNH)?|;UQJHAe{qWHqnE4soB(%R}G@Pzo<9XRmXl0biFEc z1P4cz?X+|qa z3Qp7up!9}H;3vE#EFN`E2G&K|DLik(4~3Vha6=&>sRZPr%5zgK84VMOemKfB0ymKc z5^nWyv7mv3U8IpYM+%z<^-V`DUXgJ{$kidc(L+*@te^q(if_1pko|mxHA2Vg&+dELQP*Vdhf!qpsLCpp4Sa*U+KNk_b05&;I$jWX}kOu`}+C7b?m#twZ{HrUqa5G>&HXx_3(%x?W}%kGyRs z_C0~fmcrSLF8LjZo#k8 zf;=)l8r@Ru$Sf#a2zebtAI?~Y;4Q3S^Ob7dysc>vwp>KC5YBM%I~*T-n>XfJgFu|1!jWGvx)F|Li$?=*<=so@Zf=7XZ6TT5W@P z@dI&82hl8U2#)HYRV7S%5>RT=OE5`c{Q>EC3F>rr)p(}7OaWGJAF+|={&)Msm%eCE z%zwxZt*0D5voHGtQ7gW#aw1vD9;PY{zfWgvOI2mHWYzl|$`{3gEC5epv>JmanEVZ4Idcy;z){DM>3Qd4ZrW zrHTV$C=P}GsYm!A?BtR=mB5qO8wTp4Nf#6d{JOMY zn5`YihkhC7Ral3{hb*90M4d6tsP*bhtWYaj2ji6TifB48+7z~f2*Ef7f;=HBX}z$~ z5H4cc%r=~9;1n9zMyf1P@=2On;+-mZ7FLu94;8v6eh(Z93hRg>kqbOw@k$7W(R+!` zj)G{=y#z(>6~V8sML-Xz)dPri&iWvH@%87*t?q0YrSv6Mi)amGEU?77GxJ_zWMH}3@SiX&W%<2lTwN|xomt)toXLNHyXNo`{`9rEe+!`D{Xd`86m zbkvjf%c1M-fi>@#2Aw{}RQs8p)}(lNORbICc-XNkgf74=1hFA8BpbVmpGNQ1Rn}w3 zx_ld|X*rYvkEQtT^Q18Zlp}umV|z6%(W=%Aa4=JhODL7%XjX>NFZ*xN%=w<9S(2lX zaBZPhae9KJG7f-`_>I7NIwB})`NBc#X(-?2&+KBRYpEik6rjb z#x!xd%um2H1vat-WgSgBS$PV;WqH2o1yv~8dsZS5uA&g3^6@Fig(q7H+K_x=xr!F% zv!g15x(`mb7d+eJuCI_$w9t8<4_g4&{JA}P=PPetbFGjsmn-&&CbC24Kc8&p@}IKv zG%IMNM6b4n%pDEJT1oJ=102#%2w-ANF9vczj!2uDGHb$A2bIIkx`cUgSE9V8IIZAn zm+Z=@f2EE)0y(+N>RcOjX@y)&IPIWzaUT(w^YU@7^Y&`CHV9s#@&Z>VF%Ttrmq{Wb zB6$Ke5(CIU>+xO%YC$a$ea|a~8mvwqwzeL5EpDvb)B0L4twx?Km=>u!Uq;g>e#8Q_ zNG&X{=5!R)YES1`oZu}{@D}IrR(H0L2XU=KoY1ga-C5dw19OdlW-|claxhKR#P4lZ zYN3gDdqqsi>Mk!KMR8u?T&PY9JNp85e-;t)JC1g>r;6>&JGpkY@L8+e zw$cv2Fxv`<`clo&n~q)ZJC#{@g=vaB*TqinV&Ik~a7z)rTd0-$x+}GlW3e1OZeB#_ zs9ObqS55SL;e*Ncqc1a3tjpatGbpnk{5sKYq=QN@g|tGvTF|S9_T@+?k{2SK{8}G@ z?7e%F)Lk@CnG6ShAgbAO%)3#^P~qNW2B3_6;xOLx2@;|N2w!9l%d3sHke-Lh=*k`; zpD~|SD^nN|A^s;KIGJ`S12X6eo>|QJp;G^w;s7{Iuy+?@`MM24i7{Ypu1#5Xj%kBM zl-^+esLAH_yUn&PeH8Yzs(hNABYpoEfwJTcax@XX|p?+?!r2x>EhK|IsFO* zZdZ$HDfC}KO`dpME`PIeW^>4S=4FktV=vrqRhuS(Yv3OkCumEI0c5hsTv{dh2~=Gi zsyQUZRzcZX-j3f}y{^9{6a#l9p9FUb*ShM@li!_~=kBavP}^c<)=1Q1nt>ZIsitGz za$#O(h;+oRf>NUDJuBAqvq}Q(kEbrMUcdYWknjiVH}rY?>^JVWuYUg_pV=`9uT>By zsMEwVl?#T1P6MeO=9o&2%c>zBK0z&MI+e=7400I3%vV_n@Eqp6*{U~hxj}%ZS=KYD zO`b^>WHzqoBLLoC_&Zw@p`JhG2@Q=$^sxotr5sZMo&E~!hk@u_}m*I(1yo_u(uy`BC5w79>g2b_ut%aSYB4zuJkkYQZc<|8exWnRevK$($dCpUU<4t08_0_R8hC z3h^==(@JCLR^{jhvX!hN5{7enXnlX%nm!fP+M~8f=;mauvpTeg&Q+`%VbxR=9e8q* zRX>UF|EU@LZf08Pjw>2olr>4U+i7z$Ph!dN0 zXmjR<_sRgjJxht;;ZhWC{;QqbyULDNzD;nh0N?ZwI*{W;_s>Gx&c$e(D=iYD;?gMf z5@^L>4G#!bp|WRJFsPWP6U$^&cs+!{VQnhwRl63k5=XSq4Fk+@MCtA(!%gv$8J|xg z#EMhkEm0A;FtRU^dq~RM$rDQHZR1@YCG!bHNbyxqR-sOej4Ws^Y|K*!K`jUs2%;h} z|55-I)Iz`_QD{o6eK(ub=&Aj7#f6jmObea4z~36b=X8$sr~$R~sG8G-{1wizC&1Ji z&Q)2{1!Z3OGKm5#(OktL!4Fy1x%Q{niCE!XH zCrg$IZ7Srju}I`Y0dDvSKTqWzdRDFLW7S!G?UfaYc7H!9UvIS^eD6WK@>65%NB_3i zroUcGyM(ijS8_uC5wn)L6DkDq#?OvQYyF&XEIvAnXeu|RD2OM->oSefMd8{sVcS%0 z#QAC_D=(1VqbFdJB%(Iqph}FcRv2(DZ$a}`W-^aKRn{|JBko3Ocg}0)+`AQ^3BLqp z0<~lZv%YI_Q+us1ux=wWn6ke1ko6wBou0cx?WQY#X#f7B!L}=X3Tc7qd^03G<4OS& zPi`ia0VZ8^Q%p^9wsI|&>r9FRUJP;~T7{?huH&nqX$NpgD*>u1ecPpLMq1bEP2+I~ z$5|B)s&Goz>v2NNPV`FerK5jqpPB7;%53QTBRRC zDZ#a>P4I2uS$yfHnO641eOB=##gzOFDs@(ORRL=i8(@_vS%UKQxH>W7p)M9?4}c({8dByXbwq|EalfwsbpHwasde??vZL7@ZKh^jNLL zg)~W4t)b;6!UPC|xrj_q1;=8uS7DEzb7_d*>1_!*&MT~~xE%~5mSBuw8Vo|gGcXNL zwt=`2FV@BFJ*x8v*%+`E*Mj`h1@m20_#M@t1x?VLptyL9(h1RgseH|vI^t(h zbgP4hfo>I+P{T5ftA+hGvK8w3>axWRl z6MHPtR~O#fZ}Atnw&n~}O_M%_l66esO;E(Gk#LaM@i~FJB7c6A!qM3v$ffR3YxonzPSy;jtGA-`tqE(c!IURGJ)ycj5`j2^`Y2sto z3FhQ@M&YhWoqsfCfWX8Bc;)%iWp=LmHOqNzx#ew~hVBF1C?2EAaP#?BAi-5(2zPye zJDi0Q)C)-k#C+0(Y6u?&Tb5SI!ndqqxj9-T`pS{65~S;1k=2_-7=77S&9l|B2UySe z+wD_VF>gB3+kSP&TARMDj_GLxRE06&aF~wBT1Sq-TjX64O+Tplu1}r@93Ad@3htyD ziK5nIo@W|_OMdAL&fl-xErVyKkguJ-h1$ujYK8^i&7{#cwC+?$>$)lTAo$a>>s1u< zlSe$AT(A1h1k$p^3-vUMelpOgdp)TUQ9Iy4;GPHS;)I5Yj(~&Fm-OsMd`?q<2NTIt zN6@LuPTJ_?19rn_X_IrsAM8h;`;sl3#hgJ5KbJ^;W!5k&heIU_?vl&FsP`QBJn|;^ ziZ2oUf`(PE1?lv~E7f|{;nl;*xeDEe(_LbS72&p4Yyh>^kAxqKxZ%q3S16dQ#o{Wc zUW!(vQaO~aI5P;&I7xLR}N-u4YTaw4xm>H3KTEjG>oD&a7(vQ?5Bymr*11N)9lCAK;0`d)H8EWxDBXwtT@Kk}x3-9d{ zR_+BMPwlak^Cx$MkgS4p@9wsq7v6;)0+r`+W(BWNGAJUbM213vjSx{WQ{iMY(YjVe z>r@<-&pIzlj{qKB4unpf?KZ=2ttnWF|~5U>y)Ihxpc(cuF)zAeQHP4NIRQ$ z^53l#`q!YMJcHPz{#3S=XFqEPwl1*zXCAVmtZ_tkpb84{ppBqgZrPgth)bb(rBZAa zVoRLw06rvGo=zA{Cl*$5qJ7T@_#(O)l0d&ggs+sQ2t9%{bYXo4|M=LX@a`&v)E_h2~{ne1-`x)S+X?Ggasw(pP8T~yGMT>ag^p}a( zfsFTqk~2X(m#lf$NH4)`r_gP72?B;JTw60x$WLI7FGn;YG4{clKTwnqX2|=wgIhx3Jw+aH|LRbVykiC@70AvRCQ}U*A-m*+=^VHi7I1nY6Ay;z;qwaYygR2TCFn-ZgXeUo)|;G@ zN2T~lC74>MmekM0=?tWXcIW?)ix8vg7HxT>R7BWsBCLy2X+j;m&C)maIjfGr@W8i<}1!FX-~~c*ot&znj;=7>jX;OY8yymU>B% z!NJC6-l|w_yxQ}qEm)_n23E{BAhHMq`d6oKw1biJ-@q5#ZY$;IhTg4KVWu_a`!188 zd*esZPu-JL*&BA6JkND#@b?k?^LU|p7Y4IL`lc&f(+l&qLchqs_4(Fs zEyBI~mL0Kf-}&Kckbkt@aP@cWYhU;^W8c;50tYo~1epM0pQTZFN-tf<*H^|NwOp%m zkS;9-i0hmp3J`I0iNBR_NE6SCD8-;_gGxQ>05D1+6+l-GWhDPF{3EF7`1ld>=UAwS zUA%l3LNTf@!2FCiupgUd~&8$ zKYc&%=P4by6<77-eU@0Qo7Jo$QN|ZkDREIn;zGW!VksX*J@>I+73@Lnq~{|+fet_| z8TVvOx8rX!ldbG!t3S4beyL^jjv{VOqC%9Tfm#CT!!Wcu!fHU13m_1_g@swfoPaIW zqf7e>C<0chl~N6Y>pr|AyNi{TVTcIaMEH`t_oy@?Ny;OR zj}pU+2+h1}mo#&cXsNlgH*P_jsP6>JPzDRf+{KkL7%U^73VV}4PH{Yv1x1`aM?~%{ z83wqUU<@qVi^Kaa;N&oNYNzmOhsB*cvE5S69)H^swF1a?SmYeUPB;dJ?X#XA=X2)~ zAUky=_o1L(H0~J7n?Oum80hsI`i7mx3dy3mZ-5Lmlg!6mR;O}{JE@#j3q!XT4D0lQ zmx|AMT7hqoqLjuK8nrc3fC8mc$7>0y&oL;ync(D+g3Wet+j1*=WucY6_>k?ztKHA; zzXw()`J1XBN$rtbkm@xk;B=~klqwa|MBp-Y^I73opjBMB(#;~7PbKKsqY!3M0L3U; zi`I4hP@B~60sCy%ZxYn%YhxcOuxZT zeiT~_-&AQ2Ejw)A`E4o?2KvVhw{L&>cQ$+SBFkMfo=zE)JZe{gm)Qwpz{?N=%Z8#r z5h}&7Y>}`mO9+;v)hYpB2uKyWuEH_TzkVU2bGnNE7QN)U607JyuOk}=#?WiE;3`RQ z<-p|{a)&ENG+!m;GtaevLce1Ev#Zz=l})XB5=XTPrWRB`HB;EdszPBqvA6C~+9qeU zVk2^s4dbnxjV=mYfTo+7DsqUc3ymOJ`hIVuPFOktO@ z1_ETwv>A2Ga&iz2CpF7EmB2Y*Dc1!TIGaN*U+NAjmJPM3f1EqVYm*V1*2<9vUY2ie^cv#VUbo0bMl;uGNtF#QDsT@`HrK8GMAA_x3{3-ebPzySqq1 z>?9Qd@w#x52=e(8Z`*=%$KL|5SVhjTI?KXYS@*L7GYHv*_k@H>tQL|+B^)RiBSsj_ zP0%gz1m6Ta7$}z51q)FBdA^|wid7N^Uo8tOk zom;BaLZurL)Y+*OFR!TJnez30ZNdGi_MK0E*W!Bgx0$KcHsOsrnlytc;DH>_Kw`Gg@r$8WlE9~n z+{U@Do+s1ExAh?8tBY_;!MRVst!s6)@M`AM$Lz5;B>XsMk0Gs_yol1$AKqtipBiAl z7_xz0tBl@zxensT+#HHrr&2K%I={S+5VS<=!nZY7D`j1S$!O*RP21?AH!$I;cRaD` zpydgO9{n@nWNWJJj^P_1o4*6AfORH#{PNp_Y}sS45SE_>d%(@wfI@<(89a+Gw+!T3 zRhA_t#bJ?v?C}^j1)ejI_n0W2MdE`0mkP*M6;ZoD4+x6avntKv=_=RZf>yH$u|j01 zz?-iEts)hS{78{q;md#7#W^v1xeRH*p^Ve zX)-^a@v*MdB6Q{CcE0)zYm^5H#5L5A zo5UMwY=)L$49$=yG*r&b8n8Do$_W~XS5JZxnm6_(zHR4Eyk!?auk%7N{w1D1 zy3OLw9D9>00al4xMNS`k>;I+fJ;39v&b0p-%R(3h90G(8QZ^)zo-f&CH`xuFwwuD2 zgj5JN-4ypCcU*Zjl5M$Qzy`kFI=zps)Z?;F+z09yfJ2cJ$mAI_VXD6@|+%hjB=*3x5Ee`b}H z99e8-`)1fFQZ;i}fL?Iv1^41)L%xCp`SQ?S^Bvpr`TAuQu$)<=iy8TReKIu)^^ZJ_ zLjC8`H45mQm#4!yzFgFk53|&>%V{mTLTin?tzzTv?Ah51?VHM!yYWGr@jQL&546)7 zx`iCJs6ExspngH;AUR(mEkk^~N*0^c+OT!yHseUQO*_OsK-|@>WW})O+{i^&HM&;S z5mQ*<3XL;%LpGl8-$!nsLn9{6XP>lDnT7To&1q+lBRqKrc+8I3ltawpdaz&`Qf@qk zoU5$mWw5o7|4icdB&oY;JU**h{Ns^qLj)~R2%@DdyF{*?Bc@xc4jw}O$$cwTLQ!iE zuZ!9@em0jF#dj^3B69x9KA!Sl_LW=iwOx~jSn2Ayth?@qqCg6dFf?sQ=t{L2+P%f!yg1Uu(nA*NtCUk~XO2(%8C zm23G!DSY8EOA;w-Hr(e(nX`Sa`b;tfij=N#w%;d4=yIfVrO^XKPhnI)U3nogkcfqf z!=5L|f(%r;Nd-{}$ID`9Y z4+|%Xdw+ zk^}Rt`P>?dmL9Usnpdp3i8Wyxj(-;p84^;OP1UIVMw5%Wih`s@INEm61c`mb1Yk8k z>Vc91vVID#PFhL^>DG>|>LtmNj9Lg~oH?;Xib^|J5Kvs6ik^{?>wu=REK$erC~UB>Sff8CZd%Qj$JoOEe^`!taQ7OiY`upV@IM6af&YfDO7=O zJZl4_6x$g52F=p4`SEV9J1E%K}&Dp5NPF+*HX)& zweB!Nvi7jG)V;(dIDAV>{VS%BM;mD{N`L7jU#|m@n|Cn6n*5)3t@y!i-3y=IpoT4RoPxh13U>R$^hT*b<6Dc{pPDSgMtng z$%5@X0odidxCG?+>LhSe!U61koj&Pwis-m}(K=Z@cafIVLFS7-EX}>$ESzHv`4%fX zY*pv8`8!(9-;-x~>mIf9NE1m(VKW~)uRy+@%q5IG9Q1t9yGZ=a(hc0XXLN2w0rv}N z6zU&g!9Pe)m~&nsqo5#MfX(IQt>ueZuB@%R6_49BMeKW6xd~l1b)o(9$G>KQPd&~y z&43CZj%2MoQGp9!HUX-or%9x$C6hOb++xBJ_$e~xCdrpmCSGvjKH?q1o?N}2hZSk=Rh;rCDlu%~Gu zpmgaM9kK;)W)pf&xbQY~_a^R(@VjwH8b?%SEW4+S+ed^(VQblwUK;Cl_Gsd3rznhH zZRd8D^LMu8+Mpg^{iz(?gIdlD`YzWn^&T2?{%(1ZJ-G0MeRsrKyJy-V8+gZ~aGu7% z)FFT4`mfrsAJG5@g?w@)Yhb5trH;J<2p!7j0P6W*i#cQ|Y`sEoUM4s%EY?B1&y;o! z>0GcB&iCnL?&a|9bh4wl1G(=1oMXMy#7+)ZXcF+{Fn=h;E1$4xa35ZGpB-K{4mms* z^OXA#=k!wimbQ$Wm0*kVA z%OnCc6I_r+!I}~RGsXA-$l$SdRS9q}h3#ehD_KKIB+1+7XfmdP&2`!{k1e{{o>$5^ zOBaLZ$Rs<z62@AiXyKg+o2$1%5W&naY&I%W5 zvsBWiCGU$aODHS&pq&PSx`E%ufCr||w+$7}on7d8pccvf0#e?k!q1B72GxE*rXblm zVmpdC^%73N#U7H4U}G=7p{h2N!+ennj$YL1#ZGdXDG|AdhVBLRUaz7u@pi?c+l1E~ z*p8iv9e})TJ|lDBG%3-s6JYqYemkI}>1Chubx<9=d#$wxEZDBC#%uO57gX=ISIuVY7gZ|F@_CmXehfXhVH5*-Fv$&lo!nrvcT*r1|3=Rmz8 zW{RBAI0n?q3U&7AJeA^Qi1&{2z6&bAXY_Cw=r;c2UfQoy9ptr#1!?X)e7BrZZT!@Q z)zC$yWqU7$Cv?7VYOS>9hCHh&KWRM`yDfTQgVi6QM(oAumdk?h>}uRQ)VKReD)>q` zp%3vZG|CXaGy6x(2k1DROD~dEQ?4*oq|6c3oJ%c!VHn@8M^T0Mk+^Zc%^N-6KL4RF zSl|m|Z0aT)gai1WNLSHrqIl>EgZsdauo$tMh1|IPO?HDYn6|fx1Vrw&2WJzSj)U<} z?r*Wjc!W_0*d~*Z^_ZRP%|O_C&W@=4bo@>WT+MzXpB!e7%sFMx?z?PLX{9xr(i67y z1+~uc>^B*lgm+>-s0fs^Zk0roG7)TRLV0HIMf=0lqu~9g_Pt*&vsrsP=?%yPpmRezsh z{hpcb!TOdNSZGyVg)l*=M0%!bKFfM|7c{*HhEY~@4dwsuCu|a4Kh~QZ+?5-%&JW<`b zwb-+L_wYx$+kAn0kpfxs%Qejx>rk=k5u)-uZ?K59R_UsdY#^}?WFJ{R!Om@&gCPsR zpAolRhp@%c>(0dpX|%8(+^OmnpNmXacUedHWt84fI8}-uE|UXG3Q^Je(N@IYb1{K* zR|P|1jQk5um6AfHImSGu`n>Pq(0At^*%B+osAxtvQw zIIj@ge?%MgOo>a-wxqE#K7Wi_uXwYJ=K)?BpRIxAkZmhds_B)zbW(wR8f zgK7gGr;@IRf4!8|X%{VWy3qrE$sPJRAl1lzzL>CTWv-UyY80w17Knw2$y&Pma-LQa z$ZctQZth>}Z~x1*z*fm5j9lby8eDO1**r#$0M@7WaA<&JNOG^2{PAF-V?(-t9Z=1k z*FzRjl6c+I4zCHO_h5U_odITdwdKKO>2mbAe^;Fbreojyb9Y9WJTU4)xS4HKaJQ`v95*Y$aPfawZ=s}{B4tbI75iijo-%}SK4zwh^ zOotl3X*7mKe^Nxccs;=NkVq(Vm)e!s#=^ztT_tpuOyI>bfw8eJ@s{c!WT$I1Kn-!k zZk_S>sn8y=+G&W5LYV{v?!nsUzMBuUtEbUg+QX=T605JdVBJJDJF1UZR}l)~{5mV$ zn{Fr8@)aV@=mPkaOm|D{4}v>WkPhiwK%(iqA!HpNl{PI8)=nVqdMCxNk z@^g%SLTha$I^i(QRFUh`*>Pv?OFcG%Z7-5O_aw;rnf+wcZp%FKx=p7k;_z*hV*}xl z=zbS*{|C(Wt&Xwc^%USal}Td8I@X$>e#mb5=2Tm}BToHcCms$jPpEcwNupT==Y;A( z;|cvwKG1>reN?i-Y zed(VxpHBVtk}^)$*bs8y?^#-CkF7joV>TApWUtDuyLFshANW`M{Pn-EEpylh6+_yq z;BEIx+~={5kD^eA0uIaExl*pkQc7n~colJ=Xz;vq@fX{E8%T63>Yo@Hxkn-DH<0MyBnl1o4o5Z1bg;1QTYI3#55EoT; zucp*WP|sJg6X{At*dB_7l~N#CLK!wyI!{<~2}VjWdbeaXz4R%@&Z9wgE-6w7W+?0! zD*_Ae&YW@Pb%xHnJ}2mVv0tx-Td+et8{wYipw@LcdT845m+S++FK1fa=~dQNNO$S7 z7p zaR2F`petB&9~h#Bfoy02S~!)shpSHxUY1J77w|3+}RIuI60BaBzHtO z?(MFmi4NX~KupV3*F*;zE5j1?+>H|fjp_W6oz2*S}J#AMRO38y_h=y<(rz(*)8Gy zK=~k0KEzLH>ZANSj{Wi~|B&tO?I%HjLT_nlr7)=7Sr4H?ZT!~5N6;%QqgHzznt4mL z1aWQFnBQQtoRdp5P4Z))fBZ8DRSkT9>;J@7+b+{!k<_&-)?U=_Q{$RoYD+7JT$NTY z%Gt5^BFUm&oEE^u=6Wnud2Py!>qg_Z(xD;}t+a+lChkZc?;gJZ4epwX4q62pcAVUv zL9Ppb`9X=JK8KU=j*O1&;%z|WP1lI{60*qWt%I)IPVx5I;?-1`P^wb2_EF5nC+&$} zr`b(`&)7$Qm}%ag*Igp}1o$TECNiL|bkdmwg1o8l3SS^%H!Ji%8WlT|@YaAFm_-rKjMqc>hQ|Ta^h89o6Ws2#43tQo#P6rR z8?rn4VSMcnV0_=od>e|j{RbMSJ-VXC9(=BnO&tk<(pvlTUz^8o{agFoHQ%-eel*^4 zD5*XRSG>ygu(NC(3bs^-lJy*lIV^J*bwySshh_a3-Y59FxM8M7S-N7Gkj;#W7_Opx z+^bqIF}(80_p$isN?1&m)e2!aLl}0IWa%0`*RO*;b<)0Gt!xVz=sMrJ)=%0Dp@;L9 z)2Eh_^g=|p@?TX4pd4n`@r|EqfFb=Xp0XkBy_Bf|RM$`{OQWDH5|_cHOa+SDFrrVY z-M7l$<&*54PNT}jR)6|At3AKLVnsW^!+vY8KE$`5I6bT9HYzGRoAZ%h*tk%to1(-X zbt|M)Q8hj93%(~j1?T_iTHNIlWis`l1AK{7m)`TSho^=Dul0#1lcTSF&Fa1bIe_*D>C{$>2!@)0zX7Gp*ZY_T&OQ-p(8S1 zoRlIi%IsE8Q@hTt9cwV~^6{^9?YkmS!z40cMm561i%PR57!reV~&8u66T zP){2vJ$10trjWCheyGD9Tb65StHSookvGkof-+4VexS`B+);1C!SG`sERBqanFn!? zH%IJSj}i|2>TtW;d)1~N>BX4lSw6^NXH2K6GE<4F2~N+%?3j${G2n|&*nd2}$>#Ea zV>dP+$2*YJt#j)g<`pfucxi3gf&)+-U4{VFiUs2IPu&bcn*cVmr{b2fn}qObTT zIs_kJ=_t>`A$WigEXA*%G-WIDt3j_Fvb?|^qGkB#6%A}zP;Wygov<4zdA%xdkEI0f zweQ~gHQSc)f?ZhuTeRE|E9V2K5OB*mgoN1@SAeT4R!H*hcZ8MX^;xTPP9AgM!|www zpKKp+pCD|B_^nxw`yk*dMi^2faS99+z#tFMp*NtBL$C9W-8nXG=`$m|BG?Ow!K1cS z3Hk^|l}gI?3svV}3=~auN8LspT-4FPN!Y_WbCViaiL*J+Q)En@;ssUVQ899sS>g=R z;N12!D?dEf!l$0MhVw62b3#3ZfweaDt;aA=8#EAApk)mGbG;y^$}8BsEQQK>*eqjcRg;0N@;Zs0N( z(7+*svKxVsbXW}{*&vMm_pptD|72i?vScdw6C?S;4dU@xwNf`gdEt#x?LVy={Q z3!q+u%^-)&|c9$_AkhW^IF26Ya z4KO+Ik04UeRgQ9hZLLc}Qz;qtF!fF!WNel+ZLmk17(-Ri$|Vt1YSyP}4>rfO+Q?Mm zy1lE3U16fu#^!S^bR}(SsIbcNJZmU^*~-rDvC3T&Emy5$$UiIb)0rNj5v&L)E@las z8+9>LoXyZEqlm90m3ZAYV`4Nlua<|5XvgU&Cfj&I!r``*`w+Th@q?fVlB*qr^B z{aQ{SDktFzNY#|XUt&+%hc`MN-rO{4SBFj9*>35W0VAF-u-m>r%>p02+pfBGsD0;` zi|w%``8J0b-dG}kV=xs)1KcNhoYC09(v7nS(mh4U@X-~e_N@_HY}5|f$}HJNqpAIj ze!rhl0%WP$#6`U?N2#I|WjmYRY>%xdwrjpM0Smj)rX2>xsL^r2Zj2s8BK8B`0)~WA z>Ev^#p;N`t=|}5r?ullb^%|LUjG->S;Y4J%m&UIdbWZm^zK9cDd1~UtBqy3HiK-7! zYoNL+30%L%;J%ebmiow=($-elXi|y)bw8QYP?IY}xcXRSjY}@QKJF#-1 zRc`+k`S?Fa)UJKR=9lr2U9lEU>S9n(6;oGfuvDiUQ?Vvkzxe)yOo}Q^o__~caxa1} zzmVp@y5@hwsWTa#5f$eNg6zPjs2GP}J}de{i0R2+2*~cmm7q6(zvky0-IBD26=4eg zCED7#EgZDh=SDr8^DG8P8tWOvUl#;)2FA^~kXw6k<mz?nPO0!&#O5TRD-80e3 zkA`SLm}QlxmRViSYOBuOY;}d(`Dzd`Dc@&Jv?y$@WgESEB^)5P$i3=uu_0h49oYkS zlM~!^`SRojC^B}**{skvAd4X+mFh;&mKJM5v9liJ)k51Sv=w7@GlVaHBNs`v4PL|& z?Cq9-R?`nXd|%dWU&VlQtw75zExZ=hJq5cvRrpjSs}_eqi0x84HX$}C(WFT2*BoX$ zse=kAp~6!}#fMtqtPrbO0VPGWAUa#gkZ5t45om&mzceJ;jMfBWOn1TP%)c`jVAQ1?<8nLRc-U`@66@b-;yRxk}sN6p*odc zg+$xTenm@+^rFw*`O2~IcX3cR7nc|l=o@tto8z3)td%eG0VF#TUmxeHF0SgveAX`a z7x9gHFX9&Q!T0bBs3l2zyTDv$4S>0|`V@bK2Q6}VrWMhIN4fKUC?2!mA3-^zAIbrt zIHP#|qqJ-klr>7%C~)PR^A`&fv>sHro`z-{AExaWv31fCOC9jf_R|^1Nr3Bd zH42K?g?!srpmxa!W3V4?8MmX$#%ITEuDZPK?699cOr6t*e`-nB{L}`2^mq2LTOY9G ztJ#Hy%Re2q(Pr%LvI*NGB>X~J9EPa}<1Vx}9pySHn_P_p-Sz~#_KnKMdquIT&fk?q zxB@KU+9}`QC`dh0xgV0gDKn7S<2KjW=+zZA7wJ8GC-^-SwB+0Vy8SlK{0V1_>E@VA? zAhk|=z!%ztEf?%__s)RK?E4=0h26m3%7fY2;?B>0!xl|^nm&LN?feT9ta`(5t#&g_ zp2T7ZO!@_aRzQZ^T+}F2S1#%Ih4);!LZgMcN#KJV_av+5J2OHscV=^@8{Gc6eq_vTeco3w0E>HjBRVt^)q&~(UF%eDNN#e_ z<=#qls}>@dNE~MSzV{b%b@I$XK}=Z%u$ig6%df@n>;0>)BZK`eOVoCWd@j{jDZlE; z1QDCCR{J!tB(MPOE8xQ}My6PqCo+3c(Co#)a!Ra<_oOo0B9+^%se&+4`8IkXY$bzm zi$zK{!)FeG#!`*SwpbuizLgO-yhXV7@5v*ekfW7*d~Hl3ou&i%5z1q3#spD+fL2~* zyQ(EeNUa9&U3odhqvuDw$cMJ})@T&F847kIV)fP=bGsIQ952gQa8^XN3QF}x-)Y#i}*xzwVU6tlkMeNTWT#9r4v_u4)Woc zb)C$zvK?upMBI-t$JeHSHC~{QuUw{MvPMo?J3)QS5!;Xch|bl7zHxy@rz+G4?|UF@?@fDp zL)dQpw=^4=`tNql^*^vredKPt{g!*|OP_hjzW({g?dH$&+DIGt%5RofCc-og89fyl zt$er1lT_g=LI=mu zA6|a(0y!O58utaX+mNSNor}{A9=fKKErE(`0`+azev`L3aJMBZ1Ma48+0gGjXuFp_ zWG6}UEg+vo*#>oMAGaE!SX$Z033i@vvM?+j3%&9z#A{_!tk4zfOF0B|dWo)27n=8L zl;N(By%Eyriq4)VogJtYl}k4uwyPBftcJwNC9BDy=tFberlFvDyq()Nlj1qzzs}6a z{GfZ`B6-jJgL7=PF_gAiC~3FfMktrjdi7s$&s&CXkMIBAq)V zoyk*ki4UZw0XH~JB61GZYQ)>rH>y*;qgHM4vX8*T^Bcp=6^qmTscY*Jj?-E%a#R zR@~eZ;xRO`?S=@3viyuFRz`D;f_ywP$rCXWC)&u&Xu(!#SE3y@hJLrsHr6sk8WkSZ zJJ}N#vgzJ(ktR8p_$sqv+xm?f@c5awCr-;bLSs7ehsL1Ei3p zl;sCgKSDOMRCT(#RwW6y-E@eTJeEwx>ZhvM*&*EPB2?B^;uyRvR_ptA(tEdK4NoY z=K^1=sbDN>egd|KGT$cdZLqXG^)~J03VRwUy&ylv4!w<7A;{`OH53!7Xa*urz`hBN z<1l_#yPsGw(6v})Qj^^wVE0=d*A7`tgPB!DHa3e2tj|0_9>tIC?(d}Aw$KFf+%m2F z5T@#mpIJEx36<2XRnTX!8eQ!bZg`l=IzH{<4d7g#I!>_|?d)X@4r>$?lO2+UY3D*a z;T;gVGjz`3Jgb6F+l|({+vy$|dXNnFa5AdrD?CUT@gWOUisTjRnaUXJW45nTWpnJa4;r(eF>|zO+9nK5r{0-AN`sINhFrDOS#e--?S?s24dPeOVpbwl_b8Nyg6 z$_MbPLX`MGrAUnqZiE)UNFKCz5sl5cT42FVLh@P$N?B_AYdysKdcTyC2_X-p6NGn2 zXLq(sXT!KuC9Vm0S8~^KfHw&f{A=gs`Vl^I*kE{HgTU7;wH-604Ku`5>$&_htt$@p z>+M#hLf{%pYzyID1Rtai#bS7*VzV`sL+etgT>`@+#p}&$C|YO121YvV>H45<7_Ho* zOIz&bCJYk^@Fr%?XeAalMv3MPWm~9pMYVx#ECpI{ZrWRLr4Ze5e$_7W^}5Nmj(2Jo zCZ<6ecMF7j-d{CW!0AYF>s3)(OzP49#IXRX~EdENU_^{7zl2s63?h zkS)$9vs+r(m8TtcNrL=EC|$zQtkkNUtf_LQrS( zz4Wx6XFHx6MSAe}?WSA)U?a9fz#7|nAY6sWem#DZOp7t31WP+l-`8c+7Uz;B@oW3_ z@5foR^<8`CZ)R+JXf;J|*iXLuh<)s)|FSRMagTlFtB=}Ozc$RS`vluNU3Zr~z9`2s zc?_kdjRBCZ$nQ#mg!=9~DIOBZ-aoXE)Tq0aN*H2m4SIiM_ z$eJR%{;?TF7Wl~Hq#ORgCg1;p5*wl{`zKbt=jT?Tet>A-LYgL&t)F0pn;*4& ztg1ZC+I%jF8Qf)OI8B}@5bqa=7fX6Oey`AI)&GB1m+3>V*2f=4b0?Rs;f1Yz5?0>_ zt0lt8!`wED%5k!QNS0R0516JE#ZY@*qj?%RB_7J7YBHDyW>t^vH;F4!r#Ln5cH0lI z_3%*0O%6U=>$%bWwqB+F>?2B=9S`Ilm(~C}#YHy{Xb|deMdz9?DfP(H=+k+0v`_=a z9O~Q)DFH9e9&MF-)2!;H8CG|k>XX+NK=y^!aAv7R&OdMUxez{onKc%!L2#~vOxs9I z*a_WLN^#Jo9&}+5x6)3}b^jyTwo4H^Mem?{9J+TSpyjPd!F!@}K-(Uri`AqW!*qEq zeIvl+DP+b){({`KSEd4Y521Zfg6;9RG`g?PJLu}wK{{DG9!dvJLpv|SQ%Ei-uee=x zg6-HRo+hDGwdrbYQu2mEiKI+4U{%z!(K2~zuHsK7id=3v+$s;0ADz+~MxTRq6_Lb9 zhZEW(&PIXB73gd!ZpUoF+iNJ3Ixkso!6=Mxg6<%Gtqo|@8_DTLUEfr`5r3tEn>Qle zZ)(JaX~K~%p9<{vKuD$UtyZfGn_D1iY z%-%73^Ura6>+Q?-*SE}e?LKWE`PdKa*3aB!x8HFu%zw~s`|=Z(^5Oq$w|@UA%R<19 zVtp_Im-|Ts_DF;_IoN1+hkJ4L?{Pl`rS1)v{qp4gnCxl}uDV6_jDLrFZvx@bYtuMP z*oDEv3!Z|zJ)Qe0xA3XMHJ1Kb%;sH)u+x2`%|26S(_XEl9x+VzAm3xnb8Z3P*Pv^n z^RoiQ{Gc*I9;PbZLI1-_3vrzx;r`II#diM`X2I(ov6};5uyOa|9&8^$BgA1AK?TRQ zLar6VvCKx<=}klI6vWL@_%RnDKOk=-9~U1|5x3^!MYkuUeP$V-;@*BKU#?GGVjbzt z2j@nb3NkbbYNR<~z6L>!`mbB1kxKw{l0Kk^4e4QB+Mm<)nNH1DZRF3SZ<=7mP{V6Y zE@g@+BS)!jGtnLt1F5Sbce_>%`0T^_2Yg-_{JE{|70kJ+I>Gs8;0ajUGMXrr@`o63~3MzTa$Zq6}4 zb%LNBgoUgaXijAQ5}7QbxQ~=OH3s6667ZNH5c3K7-vh_oLV!Z?Doq-Rpr&r; z-@|W;#w@^A?r8gV=769Cz9s=rvp|yCJGM#CV??*%E_to8W%Q~%!QWG0F_=KVr~Zyf z2?yOzWIm{H=048KI>GT)US58%=TouV3?!Zh4zNh^_+tBLCu~G1*^@g zcLy$c^-KiU*O#nww@R2djk0#I+8c?JMk>(w6{M>;gPr0SCZGt8O_b$Eg!i@ubG?l) zZAWVkzqm4HWUXsv?dC1JsJO5selVf&k@b8NRh8}weC44NZe~kYyc@W$13BzTs{T}U zs9GSap$ej1`Wx5>RFIM`vF$mxTef(nlzwKvq#w`?yd~?MUDMf%-P+mP!l%&9wgZ|0 z68qCQD~AIs2cbTx^N(%Tf$cB5$EW>8Xx~iHdW>#w9X-u#6WG)j4-H$avE1szg}gVf zTG_c5t>I{f74Mu%r2&eD?_~);1$tksJJ6S{9|r9?@9D~|nh%_wU!alauu-&GUsoEJ zU0b-F7Cl4;0(6??0thCVuwBmZAnWXEy+o$hc3CT^`4*IDBWIq#p zO!~|p?C!g#vFbGbL)5dG?BA>#ww`i(kFpKKtci z_KDAti+0m5Y{bGdHu_MzJ;D6p4R>KyoIHn2@r{JAW#Y3O654s;{u-PZV(7p-v8lkCYz0G*7-ln`P z+V7)m-px4vqxHWoUc=3k4s=k9SnV4BYDZRW&8jw-L)Vnp{cB6@w`tVhr~ck<{m|_; za_A(AL`Kl`)sE3tzLTwBc2VNDeK;Q_;lHF} zkT2rPwG;G@h|G&c_jEBGvt^hq>K{4c{~gOSbdRh`4onJIeU&13g*+O^^72jmU4&U- zcr_^e%;oE21){if4j#ZFn@U zeFkOLow&df%xbjZbzqYOJ38=#J26eC1LJs{ zwOyBP*%jA)FkrCEi-~puXg|;?7p8+kZ`yj~$~RZ}AZZ;uvs3D-AtVds6z#?%P`WL8 zf&(uzN#RbHi-M1?W=RyTyadXrI|;VR4#7tES|~|LNz@OvV3ssjkn2Y(N;9;M0a^Lz zUKCi9k+K0>9TrE5*IKlQl};h7jufmwujei2P_WX1^#w0Dj|&OE8jX*9*WI}9Cc7!7 zRT0dNmhI%>N#&;4sI^LK1uUVkf}$j_kVDf+k938c<8G52V!my>d(^>q}i*~ohl>6X>8!#Bh8KA zm%vxOe=jT-ZDpq@0;)(TsK=@4;owa842gJn-(!Q6rPxD;O1zub)5D(MJuzC$G*O#a z@6rf+WU(`Qc#`!Lpp(bg%~TMGD>Uk6jBcLm+76)KcCpLads?lfD`qX^c1L13Hjxrm zHO07W=d8Z`7(!!{mA}lch%Zhfzk3AVc8TzU4dA*!Dz8-E$WqRwmvS*f*S@4tX4$64 z{BvIEChk$P=@F&847bl$Zh4Th8g@`ww$x_dt-OmL*#G%KhD|)&>GqA7xT}jmW+yJS zZ`F(?nmGK$IvcmM8!x)Y=4@-Rd3(C;%m4bgeeqkvtm7h^cK-D}d*_}1w)fuqtG)f! z+n6?gvp>W6zaZ+L7`xQ2`{;M7Hw-XuoZLymYb>?GURMR|~i0)&L9vpY2 zW=}g3wa{x(wo7fN`)14*UudwWU#+s4M@wC&cXfOpL(pM7i;A%?c2VWiVIy{2q;iN5 z`N-{W&^d)L>iFGc^{`LvuuV-g455l~WjUEFWmMDfb6E+ST2$JvChoDop#QY%K76|k zd;BT$jvWbE(vic9?by+!cKo%)_R5JRFz!T_r8JOY7d|-0!h5DzdG-XW+DZ#Pw&*EG z%9nv*KDdYMC87D5a!GZKGBg6s!)%GLo++$nRBU*}o-L<52aaHQK~ z16?O_tFdyPW+eU)^LMag#UA>+ADUv-$7Wg?xUO`#Cc*F&$UaNk&-2*neaLReTjt{$ zeHZ~S{gyBEQdlsC)!RnBUaP{0t`#O!9FWMeX!pe+)b4C&Db>}11riswyB)T%zqu$P zcL~N~b6jlh>?%NpbLi|uGI!(KkRXU{tN^Ug98@uSyp`1~NLE@?{tAm=S2g85kM!2z3cwp#sOWZH6w2Qa zEv96tgk?*~R%;f%$r5TQ-9>-GebkELwSew+(A`dwXBT#~OptP%-qW@lX@KW0rt{1%F=p~Z7{eB;=nz5UUj@lrYDuvM?758q56@@_a_{Rrgg0{P&Miyib5p`S=k8~sFD9Q|Xh zwdjR1)+EAr4%x9M=z6f%Do<{-ngjHQqf3s^{62z1>jC;v|Xbm zA~|ir`O25+P{`g{Db=X-N=(=@%b&M#Km0xr|B-$7SIcbj%kjRgc%b#I%EeP#yy586 zkq78|oZV|Qy@S$)>-U3tnLSeIiD({FxscDX&a z@R)t^*K_QVkuz=Ss@-;u@5))eE8e++jh1o&rE}`sGgfkRiCx&2X+`&y-P)0*9&@=^DFwh*84rgRN>X{V|*r`znao* zz$D1jXcj9&MmOoa|?m)Vr$5K9&9YPy8KmC z)U398yo|;Y(gx9UPAhB452%`z?@U2ov)0}uBR5lQ*DCjzEDx>2eSbk~ab#>T;dD^T zqD&E%=P(pITs1CT7}Xq{^P%cz@Z5>KMre!HFgHbwiq*+eX@6ZjT)a)Ly0)lby^n|C z$;e1bwAtt+C0Z)kv6uE5=y=Rw)yB9@D%2M_N$o?WlqHm7&d)~r2V*orisEH^G8ux+ zRWde|c>;7fY`36twIdJ`nY)>&rRF1$>jDAHPed(oG8zkCu%sr%2;gl~9X6XEdYqyL6tve^u*z<2Vl5IWBFz~jl6pAE$=#k7*h_@c{rq1TeCY$q*^xIS2Gbs~kHH@jgD=70 z9^l#4r37!PZ}{02k69ZWZjVPzW=SFvD$$-P?uNwO>pO8q#NLiR_UbMzY%<@`QVDkn zfl!p*QpbB#b%ej`9Z0LE?HsMjN@1v$#Rcnez}fxKli@L-f^TIxUr(`iNxy2|)=%A# z18y;L%&P>r$*(MZ)*k)WZ__{d$M*9_w%VklB%jDrn6NW$pG?qpB#n(m1F6Zh+L*on zk2Y?>2^RQ-@ush^KmFB6(tOkY`tCc3WG=k>uDypyejC#M1;PCGduE%qCfMb8#2^B26Y41-DwXm$s?7UWO35D<-;^Nq`GEzx`>Ct>SHoi$+a^M z)!Lk+B<7y3vjrETwx9s>B9COjoI0Cxy2@sqssykVHvQF7n|iz$&=%RWR}e*WPLv(Y zdSMi8a2TL(^GT{X#aX?=G};9MbaW{HX$g++QZJ&2XXL8prFvJ1H0^>XBA zJ{&IV)23AiCt1bOX%>EErd7T=$KlcwFTJ|c^X%rD(+iNP3#sych8(_UUABi-!*vB~ zaemiZJ+xHVDgryyI6|~k$+MW#isnnC0=KY;Z-rCxUE4@vc4-z6j;3x%Ol=_RDy+3( z4m~R*KS5_F2WYCj9Gw`|fpC`#>;X&e7$>@?ZL@ipv&xkA`wn%`JieXySQ}5+4j@%C z==#Cq9|(zmX)Avj#knqaDR_bCkQ6}HlX|(`gIieVGBFK243jkt9OUR-IYf-dn49yxXgPEniz0icc(8QZ3>)fkH>_f_>WPM!Vy=4jD z)o}>c@J`p}EG61>;W-P|U06mOHsM1wDH7|$7v~{TgfuRp^1gI8(v_El^U$U;MLF=$ zvz?mIctl-GnL+4S+R1Jx+D*I@=OK>s;QPf@&{LkVDwNcJ1Mk@FN#fXf35dSmMJ9|W zoVuD&A(KYgI0`6O?G>Pg+LR)-U>4&PxKjOriRwn@9{@m?ujlH@{p@NSY9eB2PMw~GAx_VeP%Oe&#UDC)rAv3*;u;btk?$r)A zJNww#5pO1P2yWqKtf_=QggpLA@nmZG9vAJg$ZIsTuTrBbIQf~7=K@}Y%G?RQ^hXCt=ry=U}(n|PGXEm@O$<1iRpnTVt* zEs~;k%hb(n^c?N6&)+%RKJxkB;)J|uerLRLq)djRvU?})X(UgjiInQF%{mSx&s0+^*I?c=MNM|=;-VTXP0kdQlC)RC8n~FA zo+b87Nrf#gDzn8URko!ojuC(HjiY}sS#F)rYrzvrGTwmeS(TMkFq4~`>oA#E1+fN`)G-{{9kEVCU-!B z(yPX^4VG-6qc=T=JfSl93SE_QC|${Pm{f}PQjHd>(c$tUlK)odoL|%`V$w^1gSH`e z%>z=^MnD90330^z3b(LRQ#PK(zVTLdXc8rZ)2#B?QxJ4EX6(}t8`bI6A~~BfH5Z;Y$)Y;xO}@|d%K6gb7U89~5Nb}DAgLNiNWy6a?RH#DQqF?X(h_~& zJ#E^J?!&LuF138qrIVJNB$sEQU-{0qh^{qF|dw_HCTUsA=!pmyr0N+ zujV|bYR)ZjQ<5iACe`OIX3(5+%xfBajq(XL?B4S8H40e!m*WL>$J4mERZO2+@;jV2hRTgb3 zWm3#%rEtO8!pEt2#m6QwI)BehD-;j6K91$OiG%ji_Nstgx+u6vJaoS6Mvb1Y*di3_ z#^vs?g>}2mRgy=#J$ z)n+f=E5&GUAs636E57|#0nv}C^~=b&-|^YFy})j~;XC%xkKJXT{>*RfGoQQ1ZvVm% zyX|Wa+TdINuify?@wS+aMpU%oszkIrZ*W@D&!7+>#p={?@;xc=Q)4$Z-<-rMd;%hO z8o6(?U#6kaiHOZR6|<~!4WN$C{h55`&gY71?S^F~jrMF|ojp_7Ka9wT<^G4D+gCUllQ@>Mg{MYH+@T zr6_oHhT^>kl+~MfpDT5!V1CM|;Jwc%=kqw_lw~ENGONlRHVw1G`n34mn9*t#(5lwO z5&)aju;n3g*VuXvKwcnsjn05zu>`>wP=3P#jWRXLlu?sav9AMQTYfughmZ@L3jo2E|y@~@9Ed0`BD?2*X zDvv*9RVQHTskve*hnka~C0CvZnYdbgc7fGEhw%BOR;Tr5J>Eu=sH&xE6WozBb3_`X z+%1>Gg``VxRa*wN)TwPG>*fZkxf@SH#-`Kk=h1kEb~R1-ndMeYIaY1reV8IrPn#}OMOE3}zlelv-?a&?tI z?3ZPrHJJd^=|?}&ock=Lg;6tSu5=Dk2MeZ)KFGTDdeZ->VUP7c^Myvu~Iy|Xs-$gC@(W(-y3YAe>A5%?cRLg%F zl64WTa{ImXA=lxSv1Fyzd|^r!+XP3;G7zh<&wo!|FEl?6vJk(iS9X8+psISOpV%5q~Fn zrlnTl=3Yjta`^7TQy^$ee0ulP>FrFja^V=;||ec)4`Z5w&2+P5xT_j{%HrNTbAzb zw$J}4-9Go#|FY`HpY7du-m!Pye%s#rtFZhYo~gMEhxfSn_TS#Kzx2^~^~#fW^Nn{p z8h`u~zqDIWt2ci1r}ilp_qW{k8w-5=9-H+7OL5ZLly~6FQh#Odr!R}fW3;j#3xR`v z6HeswL=4bdrm)zb##AwrmpO|q-MyoH@W=38j}bkkuq5MEpnOc>t_VA^)Y=o9^6aq< z7wqxXx%TMF^EPbRc^kF1$bR?;dqX9C-#&fa9X5UVT&v$c#;SRD8zFF$)Mw4M2Q65; zk*Yu8Hq0Ct6n(>+d2@XXgHq)Ga2mbwAuxIz?~_BOSnNjo`>8x%R3^CqwJIvluY%8+ z8tu{&BcxHVocoIEh}TDWLe3|bA&EbE>#C)cJ~9+?Ljf-coa)C~&LzBQ{6 z#Ys?G9?wFJ=mYSuLZN-5bd3h+oCf-N1^OWeeJ6;O62DpCrdsh~yIS2s3V5n~o->F0 z6!6;?>;T()*c|2HL`t!z@aG1zlPX@F>4W>#IrP#Hw_khOZm7an2ov}U6ZonDE7fS? z8Z@!i!VUPa4T1@vYABR81SSw%3Q`MgwV_OOnUupIhI?&v;t9IiL6-GiSJMf;Xpq?J zhRa?LfaV-qFLiDm*J=K~sr-0X6-kd|R!J8dY4*d)FD$wxWG|xy#4yc5RwS z<`@vCqQu{>g~U8DI@pUmzNoF3FG1+OI!p@VQ-$SjB4Ub)X@8UirV~Cw4{BI3FgXN% z|5T(f&8XCi4sP}rp13qLx33quXk;bJ9UZ7qqR)m-Na%V!pf;(OCBF=VIAXUO?9wF= zlt=>)=;WdX{XRja&Y+0fz%l3BxYQ1y+d#8AaYUn)V7Ub6zmP@(uUJLierr4pmJei* zG06^*e1j2TeDNj6g4OUi%;_w#*trD(jWWezcW#A7&x_Aq6`ChiXs+1)q}6aCOjc7V zU-g<@6Kww2kbQCR?I^_G+ob2Ka3VYWDAzcsI4H3ph&C&kzK`8^)`Yp`-8S>-CHCJE z$0Q}dW=kisWdQ-&d*_|^Ea}bv{+s;`Oi!D%-Ug@si+KZ6{>@SX!GE>^1OLTRKl}r` z;bT8TcK^(V&p2wc_IKG-%0C>KolFk74#@r{BPe5nT98-O-Ph`6jiqdFJgLLVBi6or zX^bb6QZNO9Kb7mIP}(^t>ynsI)~W(`ZXNOl?xF-D;ASlN4J+aFD#iq!O=x(iEy#!`o$#sZLxP0^%$gpv)8SVD3O3wtN3gR(@`xt;tg`napyubrm9 z9fWN<oPxx2GC94#?s*`nGWp)9VkhEmQpguv@pE zZSd$V_!|{LorY*F)Z}9aA(YLf+%K84o&Y>3VbM0`i=WT=Z%3|NS!OF%8@1Gylo-oy&$*>wA-H&JaKUliY@{lZ6n(|j$YLlkABJvT?&CNvHVx?$j z;2f2qj_y~HcALy}%-l|$fB&WJq+;FSv2h#pFavwRX}Hrq%aen_#<& znxJ}KyKT36X;>2MMnK1%H3o&mz4bRsMoinA zZ@z2ayOUy%WH!GFd;?MXujU1za!N4yTXxko|3-1)op#sI74*%E+cX@Egdnc-4U9eT zcsv_L`5pL`3Kkl(FG{`uV%{62k*nBt`3mD@xyT6~JYF2e0UpN5fTOML`~^u_MXL%jN?p<$dz%dGEb2 z?{84+jY{`M^O+!(hwIaMf(i?F4uQL%io+V=xGx|Ej)TIbki5*Duj0!2)w+cyR3lrc8U z7V6pD$O-lgJ#R)S6Z%r+7gGfUrIlrTh0^I#*z={6cR4l}bCJ?Q>P9L!l*4D&2l1L5 zURfbNanXy^EAAg}l}8ZCFGJ>6@rsY*87Ij6+H6a&Ju%0UDo@O{DjehlJG}7Od3Hl> z4hajnG+YKljrq^IkdVU^$*L}@gyAVoDY4wFXq4OmG^o0?``Q$eVAZyfCfknR;As;) zubq+tw!;H1M2w&*@KwEAu!UQx=8eKPl4+a4Zm5;m9+2OwE79RF)-@BNN9InbDa@)- z1&O!WHmDia#$atTg11FKxhAG_{Q_9xcN33Xwvqe6U{7XnN~B~hRphIEO94k%R)zGd zvNY-mhIyKslIkvq!fN$2&ni!6@F7bE*NVV(XVc;FnYmVXdJgALKW#Tx^Hx^%y`|Ns znD9We-rDN3Svc}IN9Qm;oL1&}@??!DM5jz(-b|3J1PB+}LnrHvY{te=U0^KCMkY8$ zUOT&t1l4u5!x=*)Y@{agKN68k?F*~@VP$Qo#k4b(`wG=vv5WkTpqi5S-AUBZL>UeA zPsQ1gqk)Cdi=Rx*M4N;xP`)G#qnJbDFrDnXY`*lb=L=wX8&Ym>FwUV1kHb?2fhVpy z2|V8iE)V2b+vYe+N>^8_bCYAu6xGGb*-Nqnm+BmK)YKZ%O{@6e0>mki4}E>BpesJ_ zaQ|Cg4MelVPiH=)yHWM_5k7E3qH9R!9E5i}&X$4KLG{}ov$}0~f16l9W>2!=f0#-) zwA(D{i=%Dsb~a9ZQ9EwHS4FCzS_7rWVDIU}7wzkJPNI5ZioN~L+hlN2H4RG@9`ndC zut5aRxCW)mzqg2;DX*)nxXDrnean)Qz$<7C3_$%RrF_RyuDa$smXz`@K=-@$rEgEP zr)fI(6m2rpXl@*du^+%IC>3Kv+Lq7lJLrws4{}ExWZ5%@bTdEA%XI_QE_~OI<(&3; z(sd(g|M|OBxpvQ*eEY-dJiCvdLtedq%PaoLH3;2cIk^BwtO2}j9WVh>R)wWTX z=MXk8n|Hiy>lg^jwB+e64_0!haI+Yn1gK+);XWNvcbVY&tYDTdzy+Mv{Rd3V5>vq` z{0yU{7i;A6Go0Y3i-9IZw%rdr>A<#rycO=4ZmxD>p&r&L>VTe)H4sGB$erVkJiY#C z0ws7<4yXYEl~fc0s{JFH#o~KN4@(X&))e5B@I2>ih_SfPkJ{=F()PLpZB_82zr`XF zz)HxtE#9Yw6_hrMwa2Dd6}+wZN4!m~JUPdzaF?B4lWyamh*FnBUhV~op>r3JBBqiG za&zUIMhG&cCsxFvqI0RlR2u^Cn1#Oc7P5h~ir8d{= zfS9Fd!M6_JZ=a-fX*5X2urqN<1XQg^lSDuA)Ma~+ix3uTWdVoJ&F_P4 zjYMt@unnK_toF>)R&!d+oo%(JW^t2Kz*mNSQZ)qDO~R*1zvDh$HGcBoD$+^91o6V> z{CTXg0OaBzM+-MvGno^S5*%daF=e7DmKakp1rBmF%<4kEO$SBXL@h~&BlfAZxUSao zaE*Kr0-bq8wK#O3i`z*b>BO-RceSIeI!LMCe>cU1UGTRPVXOvF)To4Ub~&ic6rR`3rSv#Kw_u{Uf?W-|b#F2q;#4qq zQT_ml-GQCSMdEo9!6etVS|>zO;JYty;@7P;P`~uQ{L*-%(a|SfyN&M~Iw@Cg1+nUZwt@g2G8HZ4)~sZ_~XB~DcfmGPx^v-feO#gFwS)IgzIB5LBe+&$o0ftZ>;bv zMi17;RIWIJP~Ip)dH1ZoVE3-cMeXL=kTrQWbX5)|4#oDfhfunKyX>~Bzh*NZoo`hy zvKQ!9-p+Ep&!syb=dXP8SX77Jt4h7k6>!-90P6H92+Q;P&N1tSK~ta_I6G+>6diSG zwFc<|W>A3Ez%d)8i%1T0fan-W;jP1Lr_k)OP!_n6RykgHE11-^Ef=Fz6-=$*JPhUXY{KSE;Y_PL75J2q;u|~ zgRvXYk)LZ_6@3Mxlq$;9D%TJ$=2>efRV&{|I_`dU%RV^4Dqot!uKS! zrq!W;>yf`+oemW+*^>xP5tVC@YqdG^u`_8;k(&japfYl>3DekXAU7(hF^{;vD57;V z$fL4rD`u+XCh{}FzrGG?+evh#{H;aZ-Q7+`g0lv+DCU&w|1Q}~VM4YJJ1i7~Kxo^Y zB+PP7@C`*OxA7E!HyEYnH$q*V7o+7va&v_$p=FcsGLW{K9OPm{+zk{8Gi9h2*mHFV z67P&wsXmyz2b8WS13X3Kl|i6 zmHXQ}yA~F1Yw{jy-O{@`1monVb)lX?GdC5QRc-8bi^FjagzVy^iE*jpk`7KOgXZ}{ zGZ$O2hTq5K=1$d5M6IQ@o`y@6B$Lr`s4kyM@H5tQa+MXlm}w2H`N9N8yzq8-Q6@?V z&W_9fNF@g(=v;`dZ{(1|-IBy=p<1NYI7__|<~v$zw5*TYJV9CZaQrK{-3Ye}*ul6W zd%FGdN0`ik&)JQ4&aw2}y)?+A9|h?2rZ{dNsIwbpQQ7w7$}0QtEx)kchgGkPF#(kS z0are`_o&0bPSJ2-?Hz1jK>*t+k#)PUV-ULfV$XzQ!7 zE&^Bmz=EkiwxJ8pqN^z|Q?c28bqn>kd-7XF=+btX7)vyIP9sVvS`xkIocdQ7aDtN9 z+)jgTAF0WT8BW4iW`V#J%0*_oY;Z5|U$1j%L<*GyHyh0o27Y0mO8ufu8TPal?;UNqi0$&7L{_t*Yu!#57ZLHRwj;#LbtuzETP-18 zug~{`#1D!18N&NQfqtn*ZURWx$Z6#NZ_)?kI%PT13+;bT`sN)&ExPSKlDx-RQT8-* zw)R4i-aV;fzH?OO>)djQ@JuCxr^|qLw(}y*4HS2vx=Y9|E?y7v6$QK^; z_mXv7EM@mT&$%7NOcKFj9FP)C3VmB*@iyrW&$&s#-L-_Lp%#0X-B3vmODVrg1@B(T zUN+iR=J88t^rMq3e0*x3PFGR$RQfqT#k@dUqSt0IFCZ-WSHrlHpH))qEa^S1?FWZh z)NAoycMi>tA6tK3HFfB97WEB)w4Pjr29jtSnJ5}4^N1pW6Si*?TuxU}nafJ^XAR}> zCUSZ8GbCy6WHwX5HVZ|$c$MIpEH?iZb+&&`7 zPq~UQ5@lS@VRMcRYGvwZZaj^VOYICZNDK2sTeBMRsj#ldH8avQ;re@|c9N&u-bO># zHW}G$Y|z03!Q^leoBA^LNH_J-O7rMpD(KZzpupjPMADtVDI-~U0e@fIKk5cLC@apX zbWhu3yHTbl1nQN^^za=MrhtId`2sfuD5ox2vb+^p-hwQTc94lo>Rk+J?n##?H`iRS z`m$5jlC#kY_You5#Ud0A;F9nSE@lZIEaRe6=;DJ{?GD0xm|FzHD938KD&l#1c*jV~ zs3BE05a!@jbI~8^oL5ipu3-I+QC24w)#x!QrA@1JaH9&1q*p`!;sB`{s(RmS(Rb~j z2pnrd?&oirU?tg8>_7hb5xY9@WxMU?OD)8{gGzaG8?lC_sGyWcWwXeGBwQ*%H;91ZU~Lz(AVemeRBycl{>*`c*igRAQQbp>p1=gWpwAImF~Szq zaEpcdV{%hWx+a^InqsoFgm9||w?4>pGl^R%XtYJk3g@Q>G)k}Gug+QN+ylP5*hr1m z7S*~aLn*0w$3qsOUrmOjG zNunvpWwZp8@8VJwUA~Jum!fr!eupBy0;M}gSqTY-<%cI(=}X${WioFpOA@c@m1!Ja zosOS*g30IP41W8QGdY}?#g~yeXJE}KdgQSnsly_wXHn9~bmKLhTR;#Gk0gRc-mPg3^s8Xc! zS$jk|42m+#M3f;yuMkzCG!WrbrnM$fH<=RBl&Oxh&LmNLc8&#Vm_+7Rz`!gZwPjMbJ?u$jNbiViR4o3L#>U;QoPEvcMQ*;cl=zyel_1g~z} zNak@`nbvI^O}@xTVw{jbU*BLom}tZb^1@6Fp=u6ZnDw{27^ui*RJCiI-B?Kv9j(jj zX!8}NOs$b?qT5GVY{zI4-^iulu}XG4Va15rQht_Yvq9-jzC0`{3U?6+eep@l=Vvau zxMBz88R+CtrL=J0gafhUh{*hS&Y4VAOfIR_+$_A4nT8Hy5iIN+a_sWSarye~!|bZS zckFAw-(;a(f41R=Ds9w}uzAzzUy&?&k0Jjsbm*e}*Q9;+oo_$P=f~{w4)aOs+wb7| zQzks++YZFW=2QYu$|FW*0YqxQW26OGfVD zGk<(92W@Na$6DRiVxx3l*Q(EzD!Lo1jg#xj#B((FEnPH|gvRb?P8p+!tvsuZdN#VS z(xID`%%pwnYPJJUYbYr*?5s$=@b6y8v7sA^>=&c=k;?f?w)y%O8+G3Ti@i9;|9hy@ z3MN;74-NdmWJp}NF!*YXmb#Bf6Ue+;4g+eKKomu&;euPltk#sm972kD9aGP0<=QOJ z$jw9A;IA{eG@A{-nb(?`!=l_fhgeTBu?_bkp4Yn8O(QN+ zKhI4)ADl+~P5@;}vZ^EplQeb?MO(O7s6#QCKEX-~EGyPY`e?gewR7|eG_w?w!s(T< zQ34HQI9IA^!^IXfPcYGNt-8o?j;TafxK=VQb@IvtGDsc5%6Of{)J!Tvz2sn;l`(;o zADLv8FB4s0{s?ROsD5So-_Idc%ppNpTw#_kUJdIP4s-YtpLp8pnM@i8VK!p!cn#n( zsh&dv%&a{NGf6d}2yh9hr$l}0$jQO&A`051a=<1^2$Qs2aLWb(9(xH_pJ}C@Nv1)Q zOaqq!+AV-J&Ss{YQiU@&Yq7&rp_)XmiJOHYCETo$QF?bR#fTpH&J!CL3aZtRy zT5UC0pfqXzXd+FKm$Hlub1bVSUYJ%~^@LOF;e8#y1CvIE4xVO?x&HKl8#UW9G<^g# zbA+l-Yno*=u==DHCR(5{$ufs1P1MaJ*VMXs#D72P&ofcw;Qg^JTP$xKt`&%)l(`yRVY{6m8*GSJDKX5Ogh^MBQTkGU373Fe9Hz2OeE|B!7nM&WEtCd^O#4D+*|Zo<(+ zQ>~WCrS8S?Rzu(TDwZqN{HtOCQ_BPE@w^5uBsH=)X<*j+e~i5coK)rY|39;Zbwxyi zMvXDX#BQQ#ny-mzCQ)NFHY^~D*g$#{1WUYIq}WBV7n<}UcEv)G4%=pS>dtn`QWOga zmh*pq&g?F>@9+Ef<=%bfPP?<*dEWPP&gYyb#iZe$k%T6W*h~>^CSoZD&8m5fPgxI3 z4*|2j)=?Z0Pxi5dO6zF@S@fU>%H>S^L+^Q3GH18-r4e<%m&nTAs-77Gm_iHheyPPy z?K#oTzhHoUOr_;#yJ-CZF3>NybH4Nf^*#I!sJ*m8LR>a!;**wFc!K5bcYGEk1tgA9 zEuju)SdMZMxxWG|`ypJydH;YVXV_2vbeG*Td%Lq_5HTyU#MkQeW_-?){@-MYuV?1Y zob0NXP>;pVIcxlJvbhJ@cpV)>0{K0I5xUnM@~(H>joB_{T$L1iEKE&FyqA=#9A`;q z9f4MQ7_k7q|Fi@)pH+6%V|3_ye2wR#FME82^>}8jT{IXU-hmg}!8yOP>n*Ne6t3sxDmao2Sb8c*HJ2|Uxk0It zR7BP5BOL-UBt#I^=6l4%_dpUiOC2C)dYVq!Q9Ur z@6oMRBH$=gvu{NH0u7Y1?#1P!(j+}gaI zXKZ5XFOkkDlHzdf(OG?>RDvWVG-6%<4i*|JXr8*3JjFXSt#}Pb&r_Co`+loo(vD2i z_gXV^k_k6R&*W=U%{M&ifX|@8k*5fyLt#z&@mYgytY-Q^JP49(4p*p3k*X>t z{^W}ztmdsdEdA!~R`$|JTfx3nT!yaYDK(%dJ#&cF&R`6M8m9NRMqYRmPQs0pg>S+t zxMhl9(I05^vlu_sOg3?j(<5G~Hi`ss-tHlfi3u8kz))B-wLeCcezs!z2wVJAKRcr9 zMYey=U+kPAZ&=B^U3N29*Zox7G)k!hks<$XoSa9TeXI59d#5*m+Oy|lsIb?9uc$md zRQYSFo!nIaIrn@)cxy+?2Nsk(XN3nq22lZt(MElsG$_ThrCLK z4v$0?Y1C2fCrM&aqjC;0VWdOVD>OcY8WBuMk`D33qgg9$3@TxC791f(p^7{VRgHCj zpK=JRoJ#5;5H+ZWy^Aj=42ct!!hU`?w>0N6_XgEKBP{EvJd=ord-?Z3N~nW(kf8E2 ztQ8*Iimu#q5Z6W(wBGMjPRwE@tn=He^Kl3zc}zk%34Rx+*ui79{tx-VOIub3mwn+!7QX6fo z5*FAwn{2FiJW*bP`5&H04wPu}r{gvoHAd<9eJrSL*1D7xmcdECk;ANwylyS)pCt#U zOAM~+^OcQ=a&aXCP=?q~!@L`?n9hU5>>*qiaMd4D zY$=GtgM5)eFPY%fPZD}f5tN8)nl58Uc=bFyA+Pa|SxrSn!G_oGwD%YAwP5*%GSK8UmLg@FKp{b>OqBaM*Y8ug)lY9WSNs0Iod z5R#hG$5y>?o4qozuXR1(UsebcE*!JOg1H~FqJoxs=Z|^Ij4f6;fW-1ZnqZG37}NRm zo9xcp?sE_6S0uny?fNBt{;$6H$^zO3A{4%4?^nAixx$M|L#vNr$GPV+34~4t38z`O z!yga}e^jj%cBWANZ;=#0Aw;Gl_bdw?*3)i#EM+4XZuQ!!>?&*7>vstS5y5BX?7D0Y z1CK$uC~$Fe>pZ6Rk$CvoXoO@a_B9^-aoK2;*J&xXbTeTkCql6&(!Ft(uVkzqxcfNZ zYr}OC1a5r3+Ag2C%2({^fl?3$1Dq4uJ`kF?|*E`Xh7uQBfhj&!pnK+4Hm4#~R zix63oZKw(+M40|Guf~=WlP7JFSg!aC7T0hbG$bGc{rb=q2@(Nure)$z4_c90Duh&< zTdd3dBJWtGeI*)&6BMb&x#|yM+GN`=cn=0<`rNh-F0$;aWdJXDkG%U-Pw}pC-ae-6 ziI=ceFDd53FxhkYk84yRB2D(yXo2Xv;Lw#pt&ORr zmZ>JWLajsDtM}OYX&9)d53~(LZr3wg#`spHn6T>?^tIY~U||-s>1@&je6bUNAUT_$ z0F!!{O`D0xd-vFeH%o2pqT6l7yivA#_6S?at8V}Z>j6UL6t1J-LD`f+gl0jIZjew1 z4sm9MAVpNmLtF9h(m+A%# zkn8Q*pDW^l^KgSv9o6yFYwghorZd;$kfL*}s=3shhK>kWrM~pm2jan(dx5|nC_%mL zZtyU0KuMMd9e!s)PKQ5Q$9%#_d4!QvdmG9nltlG`+LDJlU2KC{(sB%057p21=Q#Sg z0w779y|Vun68u76DQp&e;IvVJEsNB1D)rS=FSWylJNk(M{ag^}^?Zd-FJJR?gI9_5 zcab2K;Ry=W@vFQ*~p=p|G>4HIaM;Gk4ekmf?*e#y5-_R&E&a4_7f(Rf7-LmJ)ZAxa_Q zt#%xQqtmJMBT*H67YX|^4g<+J++tq~Bnk-=+L3UNkl>!Y2^y7Tk5AVEA+bzmCPGC~ zA)%UZ5gW`*S?dxMsD1|kWIrxYaE(+dwNxxxgmp)?U?EU?_WlrW0jz3g2wBbNmR(BF zQ4mR)meewqG*S!=!&3^wQ+ySz*@%v)4Moj*l}_M=EyM0bPa7@skYTB#1_DXg!WI!O zioRr_Iy_L=WM6C@)lo~AUk4uQ;Y1xjqC_2#sF!f4Lqg=%#&JuLZfMHTx2=8^7wnB| z=>ALdv8~N0gk}JN*GX&nsLPF7GHwG97+=|l5J9_A*vEw;aiLUPpwytrmtAvhKsK5$ zw8TJB6A_|N^R`BAG76g6w4*}0p;4%iy|r^)vrv(=`o^f$u%c#dYNe%O%V;+_&mv2n zq;OxR=A#+V7!l-hHD1B;xkIfC6aE@f#_Q$`v-L0I1AL2x zf8M*-D#-^`ahjDayU*6WJI+?VS!^p_zTK8A7-h@n5qDYuTIP+h%DL14&7!Z=4BoeD z25%W7Z4o49=}_5Bj1%JO7$g2AS7!!P=@N9sw6Qk%zt`D*9sX$t9e9CVeP6lVIe(|! zOscm3LjG2Y!yMj^33DLv^t-30tnh?uZ0?k$ZlV1QK70-s;DdW;H}Cj_g_V?ZpzdMM zF8llw90ZiH28TtQcgtc@x{bw+*_*r;Ig zmo})PBv_dTFHl}DmzF4UL^<-JZ1OeqdFsUl4G)KM5(}#c9<2lot1x}6#`Lk03$$fK zNZ-dZwF2d_fhS9!l(EuD1!I9t_>$!K`fnYnBZmF@?G7!DHQP7J1xtb6Pk}0>Hlp(} zkAokHlWdNABwv`e+(xmm6KK-SBBvTy!#mWr8xp ziDh^3((GUZ1Y*lene4%j=mT#=3B*IV&H7p#Uw$uFn6y#|Dc4Xerl2g;pMmb0{HVB$ zR}rkZ6_y)Vd1-F>OO3UB!A;OfKs&v0oFugZO~lXGM2H}TBRFQOP!z5{Fw&wg9I&wG z9#OVf6yn3*M#Kr!7I|i0ak#K_Sd5Q~nz_rmv?-6o5*$#>Q1RvTO(P~2M|dQ${ifC^ zVF72*9_kyMS&#p?j3u;5Sk$}0b|D4SFQPqYTN$dOIeJiANzYAIQY+h!A z5jUu#pKX`AIEz6OigL)*s0*?d?Z6sEAgTo=qE^5y;6{rOZKncRt$#n*LB%mYYHitq z7TNku&`5jG$&9pvYma>+4?qbrzT{g;^EM|9Q%SSHvk@5*mMHleTxjW#(c(Y#QA<-m zk*0tml`f}e@lui#Z(?hhfmnSWOh0YqZ%v}~xYXXCMMwWR1c=ZAWQd3GIp+?cAf3EI z{j33KGIoV)XN<56bon}2JVyad!ZFZN?V&5q@IzxW2b07YLZR(2i=$d9C_t{nn6eyL zta*ttfVan575`-AoM2^~UzIrfDpuWZ6=;+V2+4ZjlX-i*)x5!_#7kHgUL0jn0$8dR z(^6$YrBc~SqfFEVZpRptPaM3YiAW^~X|J62pglQ?hU__K*}(^Qv+EzJwlQ;Xyv|S1 zeVi#;w%ac1kJ*1Ae%5CbmUmPSyN0D4Dwls`HFck|{>EObsNQJzJv_xOy$WE}f8g$? zU7v!NPhk%Kz4>Osx^z*Jy6|-CoQ2An7S0h=NK)jGxClvm{Dq%CbNg&>TRfVTt4GkQ zr_bz+_j(`5r0*mdD!M2+?J}UCjS9m=2b{Wt;m42#4coRsyS zN&TG|A|F%u_E)ys9k1@NU^L~{!R?E-S@^#TS|}3PYC-9u4=gBpahv7exnQ&1Hn-VE z!Ju26MYS-A*N_$YfWgpb;5-Vf0o>q)MDXC!&2y;kQ_`JBsd1;?aiES($A}g9N#~-D z_+SC9=M!ZJ7TmgzmDv>!uChOmT42|5`x>f6Mo)}b*Iy2@JpMdCJ>n{R_sNmAW_sXJ zQAI~LknAX*a|0w&ZoD6{P4YXgW;A-j(^7Hv7t8hVgs@a9Kox5gmNb>~qC{xAS7>@n zqldl*DdLvlJXX$@?ORCXwTq6M4E z@Di7k*Ixyj)vYjtDLZkJt8i5 zwDHu4D?tw;>LZVLR7c*CD}m3Q6MUJwL&35n2EpalSuYSTxx zb^-@)eB~sPKllb{l#xawk@0!f3ToDgT%=Dn5IKWhwdEAGSCM9CnefI4%+ifq?X6>( zk9r!_*V3>a{WOmmn_H^!Mn17DNiCR@dZOji%S6+vm7;&6y|kn;&9dD!MAYaY>J2wG z5mqZyi@L4NT7)oySW?xX`WVrrd8>LErOAqCD+rNH%o{Bjw8plOlh4`0riJQ|E&NdQ zfiT)cx}KCe*_UR*XW~|q0M^KINhLlK&uBMaM}s)7g0no^SZ`hGH)aq^X{%*5q)bE1 z(sgl5)vApKUMvzVO-Ty2s~2N*e%%rqUIF)Wt!n8MPS^3cNC?UqVw1!pkTO$bb1D=1r6j+I@f{0%rw3d zL|h_d!q?AcmDIVn+L{+f+lE)}unn*M*UDbMi!lOj5dv=EXe&c3mCe7!*3Si@8vt2; z8L^1<1Zm2ES@|p+$4I4!YyokY=85-?ai*?>z{b^i0;lKuQzzMkzE=U1ztZ`$yY+uI z!(vG-bijzyWi(0tnO+%PZ$fwUThw5;J%VfEM_1Vq6bYVsRCoK!*?sJ9=iY3m{-K+7 z{mK8>;m4k7PfTBoKg(>FvM)%cRCKfb;f!9EmwTe+9Y75U>69QZ?@yMS6DFV*I^A+| zm0{J*evh_E(jR>naylJHv_J_appvc8T)R_;UZ^_vA^ z7H+cp7VNNbv$xo|85`}^$ExkdV3~CrvdI3`d%FGUvM20+{xi|exbP7Ret*d%JM{F+ z9=9{Ede+YAJKHWB`MTXWZj}w6RBd;?Kreu~TdjEh7D`{Xv5;&%J*rv951@?X>fLG9J-$#@+2?6ZhKNd+mcA znH@ly?K;J%AOfhQ!_*3Q>*6BYv;J}0zT{rI91OM9T7|&-msd@_-U>BR0o6L1y(*el z&X;l7Q|PWm$GXZ3$}XUI9oMqw7vU0v5F}ycEvNx;puvs zsLK_vihFgF5<}ZmUXX`tipilbIx0zKO zd(p+n7Fm&LGDTxROrZ?Y}r5^m!gel((Qap*=KUSbWpdA24i)Ckm(vM=UN zbX$B`DGyyL;DN0`*`^|;n?mAWv5NOYF6gA}0G%F31}LO56Hf!>c&eVLoT768sEAAu zl#7z&QY6p$tR{xwO^j2FGs|p!pctEK?=4 zQc0s1wY*m262XnznesUR4(5e?RL4TG^c)@rdTqdfey0T%z#w7fc zj!TiIq5fra-7}qqp@hVfn!n>uqBw5cW22B@^6=JgdygQ{Zj0HknJW>KWL` zxqNu%F-SDtB7_vHAYu&~FAWQ8VP1x0Qc#0r^8{0nF~G@=U&njzvwB7aRUjIhS(!@avwa@H*fO56t0lI0|@ax1vbEyIhpmN{1ILNQST~>(Mt5aO?MSvyFMU+Cp8gu%C9l*beK6BjJaCvHcJIs~vITMRxGd z{$)r1>JmHlcbD7K&%bJARad^y7j{4=bR4EL)lTN+{n>JJ|3opR@W;MZ z{JExcZTB}jgNn|(sHhynlHbyGo>TfBQOA0+tbvPg8ZswC*snG_);?t42-0Aqd4byy zh<7je&<0M5+4X~7vop_m(0+34U^}4e)s%L2LrDII1JQxfOg40$kBimbsxXvyAw2?k z#DP~@&cWB%0Y~3#KmVV*SQYmf>pAKz>;K?-`|mW)$Z;UBP%Q(-%qA2`)yqi2h9ihg z4xGs{V=uCHIbyDjd(ONkoOwcB*Zwmz)cUWrZWHk(g*F(vy1K4 z`zq|*t0!~8Z~@15wmmYumo1xu8xmH@MiL>>SviB2-^AUL#NE6U_hr|2-=-TfPX3nS z1g8O_j-)A=8>>M`qauwS)9CBU?iZyT8N#IG`mCYVy4@f~e8&xg!udH-yA0mq4Je-7*07?zCL7uMIWcz$z|th1#l+P|6BFm;~zDJE_E%2SS(- z2o{UIzm+&xBoLNplp9@!`HX0$en*xT>yc#F)UCiDtzNN#nVlR<5#_Y-F9B8-jY5dNIS}MbW^~q=4FZmy>Rtg zP!1EJdkQotZds$ki zm3YoLp^zd~fsUe_u#i_zQ(MB9!d{!`t4AFc)PcNuno%lv*?==!$ZJYzp@?@)g`R=0 zy0N8UH4DX4ebYi2r#jkhXHAHpMgF-h;4ZwmB?I#yRXgu;g*n|42HW=%!6Z;A=+S)( zrU`nu=USmxEZ`N3d~9k7FSgRH*wI!?#eaTnQ>`Pdp&{x>%hYWkL$;njNJAxy8wqZS z_iZa$wIxM8QQ3=D@%D38_0rw8Zti~xKqAQ~#SG$jC&DU`NzBDbEtmxkvzTC(Xup}# z%^K(z)I+|Y35bQ$=)#)WfBJ7b__&Mh$Yaj3<4-x?et5_kR=6MSVTd~B zEbGbOlXwF0)*2=Y=li5HAC+P)m;tg)Xwrp`7fkEZsyoXb01}9y7>JI%}L= z(r=;lzjuR`(8uzgS9V$eHSe5He>56c_M5?lfMSz515lZwmRPn=vf=Y?ur4>lyzZ0G zYNW(2g=4)Rue4s1%B{~M6;^oqaQop&gY6$zJ_G!9Bp2A|EBX5IIOc1+UO!M{@9-(xxIAI^UG;(?AIJ;MfbK72F6&`VQ zJzEQkn%^k0T~#lb)hx6fWKvd69!lA2Z^~A|iFz0mC|bFJIOMv?gK%IBpyBUe`yxIY zy_Nx9OcHzO;nDev9WD0hrbhPi^I;Q8E@npGY>NtCw|G{q5*aA1CK)CPDXAtcw?T$+ z2|G8IdyjwDZQsDwxAj^SzxTd0+PAPp5VB3HW%Zlp`$~xQ9l_=uy4eEe0Pj6{{FIEsUB$gFPah1vz7m`{FWV#MT1SMtZAYHbLIXu!Ufu};f zW@Is(;6`>`Wn!NoOBNF){&XA4%ij63h8+o1nJ+HCK=$z3%Rix*<-CHGvIa`F@nQ0HY;itDqhP%~GYSC<$8qJa+GCxc#QnoI!35R`FzAxS9GdwbbhHKMo_28}+A4nYqMePU!Ukwx%H6~bN6vY-arQWmrW|=(ds3onZ4Y03t zL_12_PX=4JB;eJS8af!z=5Z6~*$9X>K_ua-O{taWMtC!@a=j*Mv0OzPwVDJ!@vBkr zYk-1dHOkSb5nZO`g@OhNGe=m4HwxD`XNXg#(0NT!juAUz=VU{~G8^O6wN_X|9r?kU z<+hdPJdN>pt$OVuvX_&r{PlaRngY)XYWuJX6{`-o91D_j08)xgZkorW zpqRjx6=`@q@Pk0Exx--I5Q}G38+eN%-EyO-wiuT1BnA)V<$_AoTYe>bD}bbGP}TLO zk=dhxX#^zRjOv15NhYT@gLwklB@t%{9;w8OVp0j_yoWU11#w=ZK+vl}!zJKelHAQZ zPd{UW&X)@Klb!r)!k)vJsKbNl`!a;IlXrIS(u>iJbad|%U})=jp&kFT9`>t~ueVMo zUSge3?q(g2yxck;-NOz!=_>ThC3fU-=h@LG{l|Xx^Yd-LLcAOF7zpM4g%&qZuX7H_ z3(@pI*b8${j$==WI3W-8h5up4oj%&`n!nXBdc%~2(-F263ejdl zbw2$OYyD7`HxV=(&J%8Xg+9hlr|eJHK4*s=bu&s)AUhWgb|DbUxy%Yec~|mwm+^B2 znz1|gUcn)Ber6*;%Y20Kws* zC*NYHU-6{%yyHE)b#k4R&PRd1$>OAQ>+EJQI0Om~Ba|u#((4Q!9^V2~WLwHs>Ta-SIYm?xb?EBD2RRO15R_1Y91+BGmt^1shbcrK! zxR04SE&UncIN;QY8K?xJNRJrbj?syZ(bztMqBZj+1uJLYWDUSirLe1UyjIK|Wsm4! zL!MRC#awH9C>@!K?wq8>;^((Afo_HOdp$eo!q7!!b|jJ4L7Xk8;!fGU!~!xybFdwf zN?4<&{oZ*fO65hz2*FH2eic|<{tVx>cc%eOfXM{KY=IVRu+RDZ8MD(DDt!M!bCr=W z>1ZENF8TgsUXku1T%lCpn~ab{U60ySJ#LiBfegN`3Or3I^N*0U1 z9!Yf&M-_6ENyNP`3OP~^8*pjFF39~~%W2CyD%Th&LK$+;zv7|$Wse0GqU{9C$eaA5 zy>&ak$M~{|QGOR?ISX*nh;-NkuH&P^Y;^Gm=G(XMD!i#>VyHpWUqXK;qNHQ^T=G?N zb&=ztSKcmLRmEWxM7VrVh&K8zUjC)`(dvO!QkD}LT|vL2m4Yty!GY?-3KFZ-+LU1F z%4hMs;ICgp+q?BF3ZTBCWz!++x~X)SSWk)Wx@r7-t)EQ_iwL@WmO%qOT*D3JEZb56 zgN5FLWcdP1RV?IZ5gm|UZjX{`Q5mf(=D!s&H`m`=wC2g?&EyB+Zws*8Dt@+bCVPm~bt7l5VC>OR+JJH{H*+p~+%r!B(ME{f zxFti;E#&5b<6K8Ju{XRAy@W$OCK}X<#EnSEaP!85HBpEaG;ma%>N%v0%CefPt%)6* znpknFp~4ywmFYM!(u$X?eEADj`R4t$idCl~3vY2tWDv*D5~PujK}Jcy)I9Qn@p;27 z24S7Tfq2U!xak5j4quC6#7ILPEsY^7^JTIWfMfhrGfop_^^Ol2%~?Vv3bViEq}XT% z6NLjkAmk(A)g@&?iaXNmubF+F)lx6^_LI+A-+%s#N%>6s^&k0`+(I9>uq@?6Sz<6y zeN}E>Rl?%TkrkVZ3rbmB{%JosX^4$MhmBN;7w(jP zb6LlQgqfGydOHPW|GWjM``x{D0walF#AdF1@q;jQI|^1*LzArIZ3-JRHT0KbC* z^k>k4y^JoST@sQsD@Da>_?;t$YkY~M=>aLm ze{s1q2P2JDM%EVwtL{w~7v4>;t+^h>Ci-)XZAWqLV07wG{z^AYj*&lHW5MN<)>_x@ z6W3a=Cn~JxLu*-9vC4XkdX1uB!U#F%(OcdIcIejcc2fR8EU8`~cRgnh`q?v;xc498r`V&dz47^*TiQ@GA8o^p^INu)fQH(M` znqzShsye{@B>YUl&j>l|>e)m+=JaKJBlpg^hF8WynV+08+)`6VILuVKoaB6sbKV9~ ze{-Hp@&JQNhP-DuL0&zsw}|tO;{@;t0{Fxf8(hRZR=rHf1Kh;7i33pgttPxXjZ~Vv zKSi1M+wD<5Ze4Qtr*hTJbNOjxS)b^a^v|iK*AU(^b z^MR_K9cuaN*`>DQE7dCO#oKLXCW4~n+EqjjjPPuiFFuUhS05$q^AFN+xyJV3@cwFB zGY?Df|1#FX8Dy*YyToQ(O*KVNx0F`!22F22U|-Pqdi&Ce)B|yGtZL}2{iZ$c?0upN z+k&;_a|a>^hS*vbA=~gOgaO6si|<@xM;kS_YnCkOrsfLHBG5qILQJ) zsWlIA9~F4{H7lRwKDzv2#;INRj5qME-!NHleU5uuo9so_;5S)~&;_&tZqU5pS;~Ve zreWuwV(|@g0qTpEh~Q9(y-W477FAelweiK4tYV=pR=a763$T#3a7+3P+g|rJtIaR< zWMp&WdU{}Nz{|-31x+l|MN!)(>Dq0I&+dSZ!FB;rn03T@<-%sl+QK4gv-sKsb*V^T z(?}bOKj2DNRBWfm_E4 zjtJkRb=9bTQ_9*hlXcX=)znv03|&nzGzHPgbyiij#MZwv&DJiSVzrBjDZCU|-TZ;n zz761Kuw`Im1GR8XFN%r_U~bhs{#Dat5d&o^i$&QY$=;CkZ=mKHIW;^f4Oml3NhX=Y zLYlOSHJd%B82}Ya5SV~nW@c||z}>$1vFEJ!ng3u$Kg)hcDDl=;ns74K5Hchac0@mB z@BSDl2TiZFTNiAxn?@}}|D0_n{IaJVb0UyDi74!Gm)ibEU22_=xzY}2vE3gYbEzH0 z@8eIs#=0B=k|`=sRkD7EI{X%8cskM8GkM3~^TT~aV{>wpOFT_X`3nqVJ%pbeGsH$} zsouF8ZNwslTe*xEljUbg84C1gm4`QEUvxDcR$lleVZnxOw zCGXlnCk*9nbd{i_>19M;uS95G0Rk^40(*t!g}XsW2$%~-!#P0CZz(7n&I5}1j>s^# z@^gsQhA)PtVMv(EeL4OB*SD8jkzSn-gH+Gubvxwta6zjV$|aziqj+#GE5;u`k|lws z*w6bk;)zZXg&YryWCVTneyU0&t zT$oRSiV$l8oYmVUu#%;T<_77>#OSK0fK`=S z#^wRd3SB8C@HGc@vwQP;3OdJurbk>Riu55B)C4uWUXfT?tkHO!w!+rw5HacNtXTvkuDO zBi%X(CMjI4j<-vn>4RzKVI*q}(v=BH`Zf4!N5;DBB|!Y;NAE^vFU)m64bGGG25Wi;C$ zxsC=>WwZhb6c-LB09{gabVRlb*8e9W9V12A%qQ&3jv{EdVo!Q1TiBZZWFKk7)}|ua z$F-I;2zuaef>+E*sG>FR1gp?c`d7sdUS;P`3biU{UP!Uqke0Dy&1Yy>_2w;nU_dvn z@(rd#;gAiJphmfE1XP&UA*j!nD+MlW>%jbI+BsODRY0oHycP8FsH8MF@~&E*GbJyf zo`ae%szM&IljAEMwFI8j#EQr9(Nep|@5D;#_dsGw&7g?<)~tEfe=8E4TFn^CPKx!+ zlB=Kh{h77uB1m^c2R7@nv?xm{VwVF5$ z_F`{aI!evAT11iUYoZD5ruz4hZYa;X)&6)jFxTo9o2d8>T3Fs9*uI&`d>b2}NTr3k ze{AxN&c#+Bii%kvii)r<+$K23E8^?q3rS=;^?Zby%&=lABt&mI`w}#;2YX%A8?X+| zS>F`5T6oul8>gSD?PV6EyqyRq&B%0=o$=x>W{T3-4Zg z_-X5Ln&jD8_J?!thj+~+#E@mPR8>H_Ow;Z>h&Q9oMlIZ8SN5BRh2-yc(ka*2adaU6 z;c=JP{y#d~@(w?bTx2&p^w>+S>(Lk5Q72qx$N%bTh<7%0IGxF#db(V1{8~uQ@f?L= ze=j5eyl>O)9FLd|C0REdp*VB_NkzbwrCr}|(~f^3$-%I?!m3d@D^XBFCo-zstw?cX zIC$1YkJ6&`Lf$ZZ5rh@*!k6ooqNh0sIKKs?@&u_6jM5%aOZNt$Tnsb5Cx^Yc+5_3L z&*UyATS(6Wblg-3w^T30!!9R$8Zh4``?f_}G^LM_D zzjq+}418;)+PCC*gASS0`5SzmE6^D7mRypNkvn?c|mHcmP%a38}sU~vTI0JycaIGzyJesD;L92~S7lq@5xR4O%)}OnT zFnv-XU8ft(*Z8xP0}+bQ`Kk$JxvQoOu#eVFGGp;F+s0-0mkLwu-BE9ad$u>&-W`qh z8Iz2$?t$$@^-MCb`x@jM9~EOPa)mRJ+s@M=s3F+p=W zX;>XcvFcX}zr!&);+CmekS2&iS)7ofX!gH~y((c&L06nAY^t@1u^H<(v!xn-lPIQ# zB-{5FDL{!S2LAX+u}Xrw09P_FEZ>X<<9%1wzsjz#7DZCEo@*~;BQW%r^!#HrAS+gJ zeQ^|g1rhK?Vv>J!DBy~7~mWNeCvfQ@#awVTO`=KNltB9S3E7?@ZtSVWT zUk*~sxK%;yw2~xiWXS|7-0tH~wCqt1Z^@HHQlHW-n(kJwm}D{hHbH#l<6IW3QeVTT zkQHq9m+7>LK8?-mSucdbLEWxcIm4={D2P`tr6XaP?O=I}&-Q+3!6!7K=(6jJPwb=5 zJ~SwqzrtX?PQtQJeoybTyE8ENSFPMOl7vVMPT+27YbwQLW`^Bz)CT zN+HcAij|66F5|k?HpSSjIBA@9H=@?m6tM<8H;o*5ExL6x%~~RhAGOMbx3dhSLQVAK zoO=u3^8r@3aF7XJNyb4$dM(A}GojH|(H2S})rutF9A)0aN|Q~FCL7H)`duQpP0;8O z-FIjTACH5K=}PTUUU~Q#yW~`46(IZDg^$^-uVVb1n|6??*;1Qy8_a4%qsb>;*!!t( zfUN7!|6}_d_IK-W#J}tyAQl`3*>aEh#g%s4DLt$cQBN(FK_hb|52+Im75t9(Izw|m zd%h*wR4Gof?+1rp?^1CX3z`l=L=L80?i(1BRD)Dm<))q>od%FYRA_X>d_tYn?8!oN z*Sr?Hb7Gtn=U_sR7x3EWgVKxneW`WGQBKf-7ZH&{gc|$&Y^buwXwy%!8y^1qaSL35KD(?$#j>N(ybc=kpsEP6s-= z|G2xIe$6Di<(a6J5~(ejU2miKgd;^Z!K?I}qOBcjvgN3ciC8A66=@LkU{i1reXlN@ zM9-^7tE}6-YwV03v#s;5?y}GinXj|-y-npp1(T9 zhMeEqo*a1(HHl-;YfRS*u7Rgl<6gbiqA0N{f{&4@=!=G_OkYWEK@VTS~Vd+90; zqO{X2kVze$mB7s{@D@`jr6L$y%V>%&;K_YF=JjZk$O zy}?D8M!DLjheddN6s_ln9cZ~O#N8;unIW`m#T?yQR``8 z-$}6GU{e`E!6w`B$u|3FFU!(>vDX+E|M#d0uD+Fw4s)9EWgd5(N+?Gw0 z6>d(lZfq(m+vGf@MLTC*6A%m<2~{%EhK!(h;&Rz0_Kg?&N*hT3kXrMVcg9=4SWO7P>* zWN9wvObto#aB`mfrF;paLY}*GlrLS|RbUYbB^=l8LfCq8HAod}XZ-#J%4Z=+rYeRC*KLsO`5;ASRbX}BS?8f?r< z+w6i~Pgv-Hv+cxRUTw#pd=(n*LhEw0^xJ=|>j{_IkMNToc~Un!;aA;(A7;!h7-NW3 zYGuLDeh4;oQ0(wKG2@IZ|B!G5Gef?MN5N0*@$gVC0uEF;vRaAgj|yk`$aBIxJDkrZSG+6K>w7*hE8h@*g>6c(u+z16+8OuS zc~`w)J^H_Dea5e{QBTBe)YP=yhCB}LAeR>&Hd{sVtrE^@caOLimdmuyw1isuuD7u0 z*5k2t7PMk+oprgG6>%?nW(^&F*Ab$8->!YM%x-!rY8Mx;u;1P|(|&&LgLdF=Z^Q6J zch5un*pEA&Za?dCroH#*o#cn^p*RL}7_GK~x`n`{lBj{(oY8J7f+y?eBbRcI>&)_a zKP*57Qxh~c&r zo~@ZnvkuP5D6d$Hb1a1hY$B}KoFx}=$SSpjh@dBnYk=!SrLv3FLM9}xm1s2930EV` z`4R-FcHqSUo|Id|EEX}D+1r*)9b;?f6oENcrH*o;@0-9YcHq^Bb^4(0ynRq#ocr1_ zSFBN3bgNbjG^)U6gd}FZIs>S4%__o_Nebw#X*t@hf>qT>*9E(Y3LU&>bF=N;vJvn# zcm&fv#Duf6%C>KK(%ydo(Z@Q zqMP<iMnV;U5ps*CMmd!* zq>^P*6gVta2+@OySW>bjda{9fI8o0C>!ma((txxcx>7Mi_LB~D`3C^+Y0VXm=5NT6 z`1_amv-Cn9V9gctgggUGWtA&s{mO5X0f!1H@^+i0if`XVn8UM_zh@D#hmaf4OY zYZ4{;!fIAoO&d$Bx8(9ZR9@606ZOToY(w){c95*SwVk}K%Nyppz* zIA=2SRIXja-5D}``!{Z&RZRJOYpHw3wtck8KK=Yd+p*^}+q&yh`(W3{w)3-3ZO882 zwsY@Zmcsq~b1Q6P--ooA+5!J|^7}&`wdKPtzJ6gdoyBT0eDOE3c2@q5y0>g+<2$yc zZn?D(x~y*~x5lPQh}T>#;%QCv1jY3PLbs%(_}FY>VP5*WFk3cfH%zU~B3?75n6O4o z*#I;ul$}%#zBK-X8hi>1A9~jQe$1~Obmw35f{lC`^P-w9 zsvhCcuVe1^S9aKWJttv6qxATe(w3NN6lqxZ1IR&W^Uec?ysA=rq(%8`%*bA{S;(tQWE@h`Unk5c|kSvl2H z@U#mQYE-?SDk8FVf8wWu(0>zxw69e(vAX zPW#(LyY<1eJ+|O;E1JIp+-+h(EUq%R!stCCVSORE+@y+Kdf4&-F)vTdyZ-s8i#lOX z*|^qdB|VJ0Pg+H%m-p<3Cs$aXXWqA~9(u!WoVv=cpS;5QOt9-YlJQojJ$MdwSkku;l{JazeGzbr_34dRfz4nw2fQ+Ugc?-Jv*UIK%4-Zs;pQgQ=+_*)W22U_~yjadJM7Q{4|uiP$*d zyc1`98ebXVExc^n?JQnh{57_Dn%ci1xo!Tg45Ch8bB&7PgMALWTK0!^U8v}Pk@kD2 z#0x$i7f7;xm+T0{VM*oCDuH!aU$7{+LY@w^g8F4oqt{m0m#DfgKB%_6%r<+NcD`h# zqt6vAvJbe3rt-tK(LqGsm6c#lAJ6-OX7n17$#mHVdKDCKM)@Nr@C3yvvlN2;2t+q; zC*a+9pf7gv3cl+Rvh`&cSSlAGb-qSA#WV$gZ^F)t?5J4Kn#ID5Hq~sx8i^e!JZ_1B zexG)^?DBYHk!a+jknZrOhxAx~mPZ&vVquXYqBI&CZTEU?bYIm(%#p}5_C2>qZZEBWIunZk!(#vW0k71OS0W3YBEMA;JkRS$Hkf92- zZnb(cvpm83_t}OekJ0sPHjDk0k$Hn0+acKD+X39x&sb9S^N(%sSG#N%%K+~F5~;Um zkA28}AAhmeKHLKcdGJSj`3>?MkVwCeKKs}{`gF53Bix#)%xg%zZ6DSHz6Ms8q{OhL zp5SMF8Hq72v$oKEGrxss=hn^D$hB-Xewc`^K`EIoPA-jFGG$ls3AZbN&~^52KF70qBx_LNN1*A#Tjc| zu_mkDu<9~;j8f22`PQQrnLm<1#4xhY)KCDtAWFdnm*0$1;ILTe%Wq>}+j=fK?PVJ9 zudCMjqwwJftKd*QQ%gQ-U#gk9%Wk3E!H#_{qi|w$Jsh#*0JUH&R zR2-bZ=vesJp%c2U1H^@i;r$78BL6};Vxsh3I}>wt>ohS)Qzzcb{kvRcH$R_rCMxRr zO(uc`94oC%%$2oMHkHBb7DUK^rL5!K^EcTQ|9u@IU%_jihdcv_3QdL;o;Vo%*9-K?&Q;z}wJH~JD+gwVdBd&+Bm_H< z3sikZ2l$x!B*^Juzzi9*x>f4^>$2M^@Mku=UC( zm)YfyFR^Q$exJ1hmRsLP;?|wg(Jr0-X@?zrzAb;8)!ttq9S1kO7N~gv0n)Uh72@b? zI^Rk~Pb{FVS7YHAXIq@J&UNJBl3YTM)J&4bew76E>Ng8YQn%pI!Be zNXdu|GphE7BCqnN&~fJIsnuL8#E`|L33)Mnps8z+*RAWU0B#Yje# zl{M5^7HBQ$%=_|umJkZ1WdP8OEE$ho(^`hUL~+ueC2p0}^oE(p-)+rqV0$H{)p8B16k2 z;1~#u#6791XlkM13u3XE->wo>)fi|=0#}Ki0CYGOHNayeA!<;$zVV*EHiXIYXsV@ZrtP11ik))8C1?-YkE`f_k{zKcXr6~Pu}){AF0NkH3HPA5 zzyeFSQz)$Et77W{aoXZ}$$n#ttq#-wvQ&G!$YPz;GL#fk!_pP?>|ib1FQF z@WoPtCVlCYBJ{>iQjX5GQqjzVquxOkt`UL3s=`}C9W^3kA=sO(b2YL~O?*}Nu#RwX z_2P-PaotqgN&m=?VlUgrkymVICF}p`tUOb;uRRLMKHUKnimSyM z0mth4eZKL9y8vz-+5ON!dYjTrf11UU@aNaG5jg!UFvv$Rb zV(wFN-=tMoq0EeQU43JO2B&r9cyQLy_2zA=Fka%S;C{YORB>`0sLSFYq6wm!uN0kP z2wdo^s1BTL)PT{a3+{}u%L}7C*FY4LDm~_tiJEARmY!2ECP~4*=9S6gp0wW`A&ULm zF75Z4-GbXv6cZOD)V}Fgy z^0!ymNl@$<1l)cH{*fX!!j~QRQKqf{s^y(7j{WiL93z)UE+<=YAeQapnCc6@mt(E< z1xLzbDU~*yLmV-?(I(8_PK0hbni62;U0?ehXJ3tOg2Z_ob z&a?30z3k`b-D~F#e$lSIZv&NkO+aCj-HI<~)Jt1!PdR?m<3y~oNTnA(Cu>g`sXX3wL?zjn)Cn; zB3DjKiMaDoY^+QQ&3+&m2gy2eyR#El#G{n&=)QK{sCR6_D?9Bj`V!p2zmeLYIl&kY zn30C%$W>Qt?eyxPpr^WR3s|C;+${R7;AgR?`!0i1!R6XqGO5fuo=Y+PITI`FKM$tt z{QDDj;{%NrI_Xa9lK*47>|fVf(?Y7V2_>X-DKw86vr)0k1~DVaq*$uc%|XVdzs=H# zhog$Pf<_Mr4Eq)i^pJ$07bF+LwHTX2>j`0I=3HY<#4MT#**`qyLHjEzO&26#sqAns z#_GjG`vU%j|9tAXHnPuMw&dx1SR3JCYh-qArp9K=i?~u|UuBiJv8pN3sU))&Md*(?MrX?$0wsh62 zwzc7XESfF0>+?_SL!_J1ds~TWZX=_YMc=NkkaoM_Tk$S{SG=3>=OLf6ar6-r{gjyK zo-el3?Tkj$>Gv%`je?f2Zl-H!bIp5Ru(z>(l_PK?1l-iL-tD4VyjtE)0dV6cqMYJi zGn;S|vaVUBe9g-IeUpEl*ULsY#lO4T`B&0DDisNf9Dp^_Y+_%y7UO27KEka!qO7&G zm6lGE)l0o^vC73(zx;9X%%z-Dssyf9@G{1CFPvaj(W*kuyy7^w*hSa~_<2d)y&|03 zGsBvIw94E>eSO1eBB4IlB*0(((_ifHg`NKd?a*d< z$hSgD(6zc-?mqH~a_kAUkq|aK9_K#%J-5F5H>E&s>##dnRQU?E;a^pFbT!k8l=@4xMk+(UcX@6Nr?y4~>>omgs7sB~3hjk$qy zH=&NUSYL|WZs0wxn^S8ypo6Yw{f6G;)OvxtYoXn>jBi-fWH(Wbcq4ze>lf8p?}hNN zH-EsRuV*o&>sU^xH+t(j%Hju7>puu2j-g)g4i2Rnl=ndu!U{La>uy6KP)@R z_TL|WZ0H((dU3_@H~ubX+22n(*KWT)U?HFh^ksk4+onV~fY?Gx%;piwq&U^zG7X;Z zQNjHaPCs2UX2F*h_+kQ|YEJ9^|A4Qfz$fJC+g3xOU8~dyd+Aq4Sq0xmi6r%qkZe+5 z)@{;Hx7)`;DQH!c6!^+jMxjRXxd|%jqEytCBkU@4fm_8f6_jIpEu$j640)!2V%r3e z2C&|BE~Rq+tU+}SR}t%p$JYCI^nP~v5fr6DsS#`}-jj{$bde8%1Yp{! zr(7F#Y`3y;%|@FP)SFl*=YI@fIqzcdrby6%9THh>qfmR0u+)QuRj+Y~Rj98b-GROW zi9%FXn(0L<*|-A4fT{NacjGi_&)2z(E7FsQM=B_(C-}QM>-GgCD__;s#LJv~6)(|D zOQZ6axRiLQzlnQ+_7;hG*{EgY6+TrZRL+(CMTHHDTDnq|aK&3g4>tKqE2&v1Tm|pe z5wP5Vl&hjJp>o|k))HDm3@~ON(@pP_-5=Pelo$j%2`F|{vB9VCX!o8EY}aQy>_gVA z{s5oScFHMt?rgA+cYOq>KC@4;Wqw4iF4)N+*v_6{+n0WGx5Aa|`vm?Ke*yr*vT!P= z7ktDEclz{;k8Rt>EmYN2TP(iHl94x9Y4ts8sl~>UL1NavZ_RZp=>38}vT-e0y$!aJ zxMd*c3(Z$3P#5DG@wQMn2cw#@$OCfCn^AhrxK&)*d3-X|z`jzIj^CZFCRag%TUCU% zqJ5C_%v~LsyN;@_s0VcQFiv%LwOZqd^^I!Mt1VLXp4G2-iuK=F5=zZlw1l=gu|PUu zjmaX()KM(k=04ITnOE+Yl=~jY9i5ramAMGX^HLN#JYF=(PC4us9x&@UVi^L3;1>(N ziE=}jG}}Rkc9O*V{lAJ`;vIWpcl-JASJ)9JTEm&zZYoER8ER^pP?{uN+%r&JNkTza$OGVZT*m zDJ?FCu41EX+`|$wKhk7AWDyO`c+i-cjdllt!&CleJTLMe0)AP~Ng)}v4!OXig8*@^ z9dzPgJO9QxHuTAAI#VOT0E8CjQ>peqNhM|Y<~3Via*{W3`zGGEkDQ-3>HuzH)bS?% z95)cVy?%C@n4y-$%Roi?sZkGcBgO5CBlekJZ+$?_O}In@HBRZ&MxMbl>!?tyr9Jj$ z{4^gzyq$K-^Y!+h;jh`xh-&WlBl?u(wpwDs|52Q^n-vz2+{=M)`um)8$|&pe;946? zL!1FKiR1EqQg>opR^bV5&b4swXRBP%c}&u+oYHt%s;Oyca5)*bpgSqJ;L68WS;uaV zuC^;4UuV}oyw3VR6SL$0Oz}d_KkUq(o@DbLddfDT=eA&BDF}lC=#}HuI~0+nAe6EO>vK77T?q4GV~xl4`0~{izx-utA6k zX>4$sXjJ5IOCq8k@{t0We5rI)l6w+)`C?r)(MzpmUpxCcTOuRpJbGa2z;Q(L;H)Y| zzJ=PqYGnJclL%n~o_bLWA~iG~sYE`h@?AaWsi9z!mGQ;htgaPHMM)QZ#o}I2A;}!o zfu;D$cak)%kognuN*vnhx>b>zC{-2}(|ch$yUq<~jqI<3jVZ#MHKZV^lLvM2dA)(& zT$Fg#O#UQk$T!|Ot1zmYPxF=ISHxA27W66?G1Gq+dR`Ndg&z2$+72Bi=6R8ugjQDM zReu+CPPCvMdSeB>a9eoMRn|W6Whp7%g)4X^4T?SVDct2K;THj~?I;bmMI}poSN6@7 zf{XGVyzc<8`3nEARU%#$Yzu2t3GsqTkQZnd8+2X-=0&CRs@ss4zfa_~8CJ63gM6TeqtZ9K3lL&$ZN*65^R^q`)Dtl zo!We~_e*KMuPkRLceuCZ%TKLnC+rJv`)H%pG{!iIShu^=rsQkZQu8K@3@xP^01u0( z*Ffz#`fekIdyP#MUVAQ5DoH2gH83s`_Cnvm9`mt0E5%ZDECbsb(e%;2+Jqw2CU}%H zXa``4t30tUXe1XGG}KjEL0w&hRmKr`HES(Gm0|O`DTrxoJ_~L^x$%#w(sHLBrM3La zxoh*g*qf;DBC}Adq$`l5bE76-+nPl~>@jHfOVJJ*TsxXca4_vfShc#&I?8mSSmsb> zc4g##cQ&(LmwyAY?)J0eE(dg%*iTNrj7(g2KzEe|$8e+TiKle8Q-9aXesCxz#+=_; z?*4ymMIGub2kd#?4SnZojtFNC)#T{BFs8k{eATg^V?X@Kjb3)=r3Z3keyjArm7Ht3 zBeaO!0Md5jNmpGw`ZcJnNM*Lw=7Hg>DeM#B{$=|gdy`!?@--Vcwa&&Y-0sV$Y6eh`Vwq*lY`d_J@0-P=Cq^`@TR6w3#f#FlP(>Mz`553wGF`r)%u*Ll@bR zXB45G^+9C*%+{Xg(ex~<=gzj!VcqP~F|XR4uWoZ4Hv|o*24nj;=Ur9q*7ZPGh*cua z>lSj_v;Xd^>!nb3!~^4dR;)vqAo;JbN*!g&%MOnd1|_C zdvO4~V<{fG`mCqBPf$*k44F1gMzO9`r<#xaq?;u?P%Q^(G`dfq@YrUMn9qdn5R6Is zWvx~avt!kCl6})|wRLl}oYrmRxO!RReAahhMXfE1M%nD~_gJ5^&qd_^mDu!OxMa$u zad=M0t6TqEr_?{@yL&$9c6Q;1Feu3>tyHGfO6+8SN*_*r(QCip4f44q8isj*>#&Ur(VejNXt!i_wU@Pv-LAi>Ei;DO6Jg;Gby8gb8&mVc`otY%_ z&Sd7Cd(S=hUS)4$x9AMQk$10yi59K1cSeK)Yc2<=v`BgIc(XdQvfKmFDJU;4LfI|kfIXXiG8W4eI zuI4|c+ZyOLU4kezbOGYy41Py|#8gw>(l!hszR|;Ge=`t&3wpAe4kLH0|HyW;klUXe zYX@t#*@+W1cIwnV81al9hcAynl}E8}9-)kP7;f|)Is+RXh4dm1)8cUKXV?!%r<|Q4 z(_>TsPyER3H2EFl>yu}3eR7-243DThcu1+F`v0PjqM=3~g{Q-hocWpdho8tvf41YI zS81r19mMZa!d$X^%5UlE6bH#6D|5cHA||;MGs&g6aGPV((vn2SrlB0Nx(feGHLO}q z4_=jDStNW{Mo#Ii5MjCmvb?&0%#wriw$SEIQd!0z7HF44sk;11&_+k9w748P6{mViI21`VEhM3=uQQz#Qsc~_f3d{B%2GEo+I;nJR2W`=1q9zr zX3|SZZ(V68A%^9@Ew0r~)1{!YK&g*S3(_w%dwn{s#(o;53KJ;$tm|QOq9@or*Z#|; zSsjM&w09G*bdm!NU~J|)%kteMvfiXv+7|oa$^-V$vn-Ii_+`5ZhP}b1l8x!(Yl8Qs zHJWJ~yY^0+9Ukpwk2M}dx`GUiNhaMK=Tn`7rDXdQ`A!mzxE(=J zI=f6`$@&u$jG9|v7vI#+wf9}3#yv3<>>YMpdxn_A!hE!iud3oNh5;2vkd3Lf_9od` z-=&bc#$<+zw=^JAWUSrh3=N0K)bJmr@ildHrgaobzqyau?AoL*r=@DH-u_F9?60c4 zO5yF#Eq$eDa_>9wYAq?{YcflBpO*b8ch=SL`?&ADH8nPT)qd+hUe~D2=N54b%?Dbs zgcY|w+*^-|Vt74itgqT5&F0vcFWINd44rq$a~WOA)%QW)?XM65W`Bn~e59VC3qx6L zKdvQIO>8xbhCx~=q@ya^Y^$$TQEbOacq>S_rM9@kzHPZ0Z&z-J>^yUu^_a8U-kzFl z|9obIH3+}YF2Cq8TQiE0A@lLCv1TC`>d9s;N*448EdhwRZm$Wi-KioV=LucySowUG z7F1DnuM)H?vtpT4#Aaw8B}qSQT)L_^l1LZGvb$^DNm~-b+^!KetYdq7^dEmC9zeo~ zc!uYyhyCfV!%^U+pTA5Mmc3o!&snScU$NN(Cy-+;X7hnco>}~+3izQ4R;c{q1FPY; zX-a86=9&D}T`YHHC*I`lowtJbn``thBK`92Q}X91R}38E7+4%WT9OS(s{TMZX9|?f zX|Z*92@SOxjI?>thnAQynnrw{iqY<=DAZr9+&r>`vtoXYShkE=7F#xbWINdAkh*dp z9g%NYIgee6?pe%eoDvmki&Ro6HA<v;Md9gh*+MyY`4$kJ6Z zY2=_Sw$`R|ek6I2K;1Vh>5ta*Cs%xAD+qs_>pRh4bdScYO78Ne5LbmKuf&eBj;b3K zIJY9>oDd0=`QVdqA6ckh)i|VCH*hRyvE){2g6~+}4C;(BZYo#IK-5g9<_Nt>>=eBQ zg2^CHT>5GrQmp39g4MiPt2k4c*c0H8sjozZd3q(BG^0ed(V|-C)S(bL zNSzeeJVR7Vu1dBnswMB`2eM_T$r4p(aV_Cl5N0NvD|&YilgTxN=|aZ1ht3w|*77bF z0ahzA2=H?*@AahMH%b-Ns&BGEE;O6BiJnd-1ZZ{fu5YJUX5w5nOZe>6akSRsC+(D+ zpvqK9EKieq{&W;FJtleew8e-zV~$E_Jr+Dbpt@tM?g*x%$KcLLHC&v;TXPU$xAJf` zJ@MHV$l3#Ce#7!Yl23|^rFo*wEmq2EUT;~+POD!g@wJ>XW5pik$0S(=0&Ha^Q>__= zR$c{{m6L}$&I~WF%7;%2u>NRe1+c0nK{qLzZ-P3@(O#qUO;KgIL|JA*2Zqjc!dE%C zZ_09E&QgTg;?ivT3sr7(%vtNVDZ+FUS&R@|Sc2asceD8u6RhxCdX^JLSTUW-g$yIs z4D4*=9F_FlglrMx=SoQ@yX4gIq!8)>A3T{(Pkl*32diA$)#i+tV0T~nPvp=h>^exa zA+Ux}eo#CPjksKRl1vm}9Ryo_Kt1f9$A((OrLWq})D~}|wsvgP>_{$wgt`By$ z`(J<0o@y6kPqiOq&vYEa9tC)^K1~o8qN`p+t_fGV5il^Ms8YFTT@P}s=RvDipU>!N zb?ZLG=jZKjH}|&@an&|tVX<`}H||0OuRX-n5iXIo=&lo;a{z4VQql>vbQu;rBYrEm;7`q^{ z6@MWub4aNgldUxQu@`38(8Z-rH110^vJX7nkB_%eQwPDQ$~4_0MTpn*X!Xn%G}9}Zi)s(EUEXd+BE>{MX3!M3m8tb7Y1V>zVbfV#t@VtZ*7>tkd;QJT zbZ$1WKh?S2o`0YN1?HPP?veS9MlyP z5hnR&t+~7|pJc57e#k|E4a9cgrAp}y0!@z_Z_8r3+8x(FXMc{oi>IQ!HN2>wJ@wig zYxL|CyDXAHJ?P|@dmeEO^gUi|Y+po=qh;S~8MORq(sdCr=FK4BZJfIb2Vkc6&ic|#BH1;mAb3v?BfeQx0A^oa^bv%xiV4ff)iHKrqiD;xF zBJq#rYU1e3!3OgiA{r$Qijw6evXF%ic}4WDvsWn>(k%aB2LJGpR!Y52_5l?uL^L@# z$wWbvQ~Ft)Yvj`q7sS!G?0PMH&yHvKQhax-THV`b5B=Egy7b?mej95yl!3*o+1m$p z4qTxPK<8QKU0CNmu=A$--eSirJ7sTWbKmXl?a#2zRk&LI`A}DTyyHbKG>4qq(7k-xJqFg=30-@q^O z>;h+Qfy~$&dt;+0>pm{k#>5>Z_0#Vn1>`XX0`-n#7COpOViq}&r(zJWFM?Cv^{xny z#L2s2zYW8T^5&R5c7KzZcHxy2qw2h>KkEgn-|&HV>?5VKq*g<*u?(hVV4%`3+T^4v zJMwU|R74(*=E9X2cKX~;0t7?A7eSMyn8Vxl<2`ms>nQ<}B6cU>ENSscsy+Yl7JF^( zE>fsmYdXnq*WQ4Dgdy~StM0dtht9IXl}t=xXi463JO`4|3RIpdKz?(i5G}Tt?BG(9 z#lJaE8ICB_>e)bx6_ipGqh4h(;4xz{!FB9l+c9q#HpOULI%c}HefU}PMnamGgZh@=35gp%0q6yV*QNx|MHE}Giq5;aDG>AidLa@)Bs+Bn# zB?!*XxgInQ5n>ftOr*x8gW4*C1?5CefMq0EaGS)3C)BTlI}?I?GC2fR!r&P?q`Nag zxL-fu7Z)l0!BoQbNZ(onLs>b)WaZ>SwCey|N7uxT>GCZ<-{Nd0a0Y}DfYp>op)l$~ zNUL1(mA-~YaMzH*!^Z?4RSz9lDPfkg@br~5Epj1#K08j4`WT+Ip6pP8Q`uA(hr2S{emY%3k?s)wlLOKcVGebOJ0kHMM@^K1=y)WU_8eC3quzpu zt%O%ZE0xSmslZxU zDP}2W9|EPfa^*V+gq779G>)SYss`uL)*o&EadIF-oJnWOB^!!aqQxv>N^GLUEMbxZ zU9#hZ!QbULF|ODqYVj(ysb5f*ZaGDCuxtM;?Qi8f=2+S)+6ozZS)iepl1@Ci*nV@= z94>a5C3cxrTXl2wx65+zvlUPvDW}|CwXz=~$XvUdghR#p4udnD9HxCa1DTaIATF;q zu@S`##rA&NBSaaL*t|E~(vEQ^tbx7hv7YvDbFV$ud7?eqI>sJpHIlSuENRVn`}gC> zRrT&?_y;X--mnWF#sVLX?VF-V$Xwz$N2(yhga2_Gd~|thyYuO>WHcD{7Xs#knXeo% zGU2d!;||y;G{_GYm(k}{;wZt@*&2ifGf!B#-yUi|8@_zj{(RQ}YZ;o?r;Te%KvQHXwfXh@0cu#Og)c(pO$ zvd(B~JwEnXhdJL{`%k`OPS*~5{o~EnYifzz^2U7Hz8-^(AGfh>n$rk9*V3qYjR5WR~9o6JbpNSdS*U- zHNnz9A7yQy>tlbrfZ#*@`OK|(uFWLd#2BinYy`UH?p|aY&ygfD$&{AGTd!h2ZLe0A zFmEynPG8#{&oC{r7`I46GrPQg5&&`ukh(^|nU?@(?9nVA4I6+EP|kvv%a>H>xXpEn ztErPU8~jDigZYP?F}2n;;>}kml|d+9U+F^u53IkebTw{{?JU>&W+a_t18ooal-IpY za$pEg4t^MC^UOkbV_79QCx&%=5v@yc$;DXL2$4@VL4N=dyUv1yr#r$l88b#_V|3;? zWnPZHB|~DITL!Hs+v$WVl6f-ulXG~xdi^VbQ{Ngf1+b^o!z2C6(SjSb?-Lw4f^d$$ z^OT_GF8#gk09(}8SvpWGkAyyl3O|Bd!EUsF70+Zk2N&c!V#svFfUVS%E^n#6N>31x zh$eg>MUX3eE_nf|qeVlgVDy{03YYVT=qy^dk@s+~pYQYPC#Z0#66JUTt|EQlm)6pQ zBc*6Ptk)mBfF78Wu&rk3)sfEG`D+qectjWOS7fj2Z4E;es*t%qZNmum5)HGR+ZI9; zX?7BW;wk1ND~mYBfRH0+PvPJYU&xqojM|a+1VyUfa0Pc9#H1K;3=%mCPaLJNB$4dM zu@cvT>@Cb#2xw<4W33yzVb$zbp0k$ybn6{qR26N;nYbOo*ujdoMCVQn5k@7AXw_Be zB8m(hkgzJMV1V-AAzPe*@xs-Slytxf*%qcVug*NhxI(0UjaDL3M`tP}6_sY$NYMm^ zrA%xaoL#8tA~~`p79=tLnL5|5`Rt*XME-#d2~H>$XFwNuy!<}V4YPFyXOMyv!4D+~ zEMkrCLkhzEgXh^@7d-&bwYAPeGi>n68e(ls1js<|&{h@_z6KDh4_mp{?tF3>7K~T$ z6Lz$#|IyU`_E2|ww0V?0(0Y_LYCFar>on0G=`h|NZ!^aJ(|)`)dXC7Lv?GExvic1) z9ZM<5Baj8fbFT-fDt^`9Z`fec+PHXHqkz!JoUlKeH3aC=y<%o-eGteBo`*;fm&zYMOC-*UxrX2Xc;%v%j|Pb2nT2X+G;dC&!xf_>QNmlig7N7JKcU zCKNQ74Hor3kUm0fu0y$Gi_^BQ{5?rJpBzDYOR z=rim6;R?IxA2N{0K>Dm*TK_J403Yfn(f#bZ*l94*0IrlrE1_7zZVGUs5cvvQIC6(u zj+m}%c0}=iWsodNPvND!$hDMi^Wx#Q+ZA94*vE-H>J)I6#-EugS4bfQ6;VR(aXDqz z-QSO4$<{PWUHy^m#QEWM=$(fV-;>W9MuAnZ3Y!)5KJ~Xz$~dBwXH3%BIGv5GJ)7r7 z@5pii-DpD(*@ONHNn&z1$iR`u)nwp-N?%D+FBFjxjLAtDoQ+)c;Ml@FP(^W25+x zUGLy8r))37@(=vXEJffQ@W&@`0{!XN;Q#X}oO-_;xBAYqz>gh13Gie6`|;~VvJ$L3cb!!gY_!sR?TH~mM~bQ_-iZ_i50vkr zP?AcaBn{z-`BUK{0d-|5YpBGv7p=W&PMCrLTwaikDLqu@0Nk?xe#uZe3)7O9-=ThF zUU9&3i!v;)AjSL{+pRQt86!m4g+swGgX~tQU&JfBkio(E;QdOyxB&gP?W$4&pE9DR zLWOMnPiKGlvE6z39n=AuSeN$`S(J5v3OF`1qV9JPUHVW*?oB;e8(fCc4}1R$(HP8M zvg>Z`VAtQ-#U6OWYmJ&l+np_9?B2HH%zHnF@WPkq3? zZr%Ub6%l}acm(wh5{5b&kjU4!+{K)Th?nir*W9PtAc0Wf8C2 z4XtKkh}&x&a0zr~?onvnryCG>i2z^C#Ba{=S7e74EnvM9Hgi7-adF~+4{$vOuB^sUxse7U{xPNH3WIm=0@b^qt)TWtCC z8E!|WM3H=?$SjnXV&dIW0z0iVC=uQlJFFu>_qq7_9Mtoc&5h?hU!;n?D$vXz>}Qp$ z!Cp;Fxn>{SQB9R%4=A0oitz{UjI#Ux*@z6U4U?Ff*wy#-w8cN1w2Yt3mZX*1%N=Hr z+-Yv)D}21jwwU{@@ngMh?TjHT0h?gOtJoIGyT3fHtEp*92A51_E2)d$2ktd?xMWpF z9$Z(euza$h6yb+g@%aoP3oZ&T<1hR*zK;{Ck8yvTXwBmzxJi@WT)X=sDp0e^sB&y! zJ#}E$RLk8m$r2IhymEfm*Skc*Z3%B3Jy8X~v}zbyz3a+5vadR%M}DFuOcymrXCw^$ znE62t;CedF8DY5tU91o5lLhg}M`~5h;ZF?!^O>uGc=RGgv^c8I!91})Pre}DCvoQg zl>|7?bkI1>UnfB*JcENGegUrVHrfZcdWEoFhwuTNWhm-SSG!sWdWp!%5`6H2pPB%P zfPSA~Je@c`N}|uCpur5xA6bj}VZ!_T0Q%du%E+R>j5+Hnm- zI&kI}LU_XZ@B;w7K>r|K>_ZCs9q1oFbN1Jue<%d{9^HFX_O!z%&)O9~8;wmY1uM>3 zY?XK42?EVgu?Y{Pt?9sN9?7&YM1Zx!Pd_yzrz|H=bi_;j~DH+zS@F)0tLR=Kt9lZHOS)NO3)*IxUo zeLiKVtzSBwfN8MpLYiigDf()mpo^TZ1gbAq%vq%RbUqbehoz|wOM^0zr1NZgg)kFQ zxhz6)FOgr%S&JOdYD&Zv{&k&j%yzWI`JY+rh+%eLWIOvi1!%by{(MU}`{cV+OFeFu zSY}dRyI2S31-!Z$ybD7WD*i4KH)Jyyx;Dh$5<3DgA7kSRsjH0? z4+KRb$!5SmhX8>O1j3;lb5?_GR1;FaiL(41Q!R7zcnc&DUlP%W3U_)MN|X$h!495c zo*Aca<--DqMS#7oYmUw)iv`As1zgh*>JX2iP(PR^h*TPc3gIeC%l0J}$c6zjVSp^E zx*A##WCN-MOe?3B01v3C)317SP_38l;u>cHYMjXs{`-lR!-fAopkJzwPx`wcH39~IybmZ2}x< zeY_&L_%6D5MjI=6$P{-3_>u6?H7j#bF@zo`W<2doc+YmN9BRAPO|^YFYwXlPR?D0% zv!k%X5q0eBJ7X}2o34jel`t{Sxuf6? zas_1#a0hps=Z^dmz9lQ45k=*>-&+prAq&49O-M8px}evTw?z?ILP2eokWZG-pcoHk z*|I^rAi7%K2DUp)7;88G?Jr>Rlh!qQJ>}PfbmHuXHRwjUqbISjV-2C=n!WZ$?*&Bb zPuV{o=xdL@7Gn>##8LIeD7&NiSi8IRM7tY#`QNQ3*aNL5+U>7J+mlVk*)?|%{eve$ z{09`6T78d?2%+!y|UU3FCpyZ`=o?P8`P{PWK}_!+u-!k(~(4-T*n zqqj0iftljV_uG*8eRQN$T94RVru)!+DbEm4tXMqgBUWuWqC3FegRnj{jA0ld`%u8$ z0l23JG|&_H_bTcS(nalH0!qhZ0&oVaMv5$a7*6V;IH|=TeaIQSZ=xARybG~PGE*PU z5Gwb*a3J@jsmI#`PI8Y?UnHc95=Hcb*>s`OgPb+@w^X5=pvlbL)*Q-cJtxK5OxwjO zt39l=O19>orQ2K6E9|-6-`G_bX~fQx_Vj%>+ouygvgCEcZ3{DnQ^9z@q6SwiQkai@ zRAIH0`&?ky8H0Yq5xi$}gt)Rfd5Y!Nfh@=*KmsAL;|U*O#ub@sI^sO(#I}zQ_?{?R z89m2Z-0~z*00n>kkAJ$crG2@&!hDB+v1FRhJ2a80U{)rB-p3w%Z@ zsc?kh&PM7skJ1LGbp>sT&{jky#s3VhERA2`hvuafWkDa_EM*Xx@~Z}1Wf{^4*JvFP zMy)PXTRre(0@4BThE$e1A>I&YM5TeJ^@XQCI-LA`_!vKt2Kb6S(!gI~vjgJjbiS$| z;L8k7{BbNObDx23zSaG>;(b3NLzK8A?3|>e9KmsbXr$IX>n*7$oN#=mFu$qXa}7ioKPTAHvH@lihTL3bd#4 z@)S`>D%w-6RW}0y35Y;M8xY7S*F0KM!ENeJfj}}vAdErK*?5y6QNS9AJST28Xt$SrPqJ;rW> zQSNFw&K_$9dpz?2qBq`unV3A#h9^9XAqHTLH^RdqyzV1*`M>WOV%OjBCIe}hB#s(U z?@ukPW%tEMTWIm|mDcXdLTf!Q&pORWv(7V7(`l~n3AFYAfh7$Ik#&)xj&t@VzVdca z9?}Pm$ot_^zEs<#w?L`ZQ!*!=8xd}EdRq+m>bl@FAisgOZ)ur{NC?Z--EZ*Lj zlRU~(^sM|Uc@Qx;gR2|dJ%jOYWCm^dsLdb3LyA$0>AT!`Z*O~8!P{q+&m!Mw_KCyR ze_wR7wQkhJwtPu{1CxuhR41yi&6~1hC@&x0Q_Ps73Z1be%65J>$ey^Vja|q7W+_8g zU((GMe4T8$ht0Mfsj$RT`z&tfA$zvND2s@Y@b{8kM&pv*yki3;65%FC)%sAiGOM;euaz#9HN>W8l*8py=@ z={n?P2@MYw2mF|de6kt2*=b?|KWIvU0BK67o3RGTeJ#?_8uEv8d4%{tbl~-cV(edY z0w{`xBV={J>JzZ~bx3!I<(>7V4l5jAbi)EAHW4NGpahqkgh{1}mSW`1#CIANSPeM@ zcz8@lDoJor?u-LxBC8lzO?GwdfFl5~KV15ez+Z}%Kc0jpi2Phycsh@+tJ3AAaZThA z?m9a`0LxjcsVh`M0SmZ9sJk?%9%xWKEg7{Wh0ECa-7KprTxSOlRoaP@2dFb2x6}BL z4xK(h#Q~w|U@h{WYxk$vpcagI!Nv<2l3YiI8*%E)OUIcCS6}0~^8(*mX37dn+ZAiM zN$f#PS!~5A^R3LcfHw>xRAiwq&g4@n%UWmU+3T$W=&wS3s>t8MRmrOq908{h0V+KM z`QW}BOP&gP8!PE;q|i(mx>)@gMWKWt<{ao}{2}rO6(=p_^_H@$qJiK)rzo2a$|TFp z-ex7+XIoMN17cSU#HNRFn|DY7?}?Rq=XeX~8g_+-dZ{ZJzCdNrJ7}g|6?r>Gpy#d4 zyX$DD5c;E&guT72Oi^{2-4U7sI`rdIcD^>VJD(eFk2D!?_cR-C_X_@-POyJB9&5KY z9%Hw>KH6@5ozJh0wtE=s_E57)_V>FO z^LI?p4Z$f0^Y4iX+~Nh{y0$U>vKt;6V1EjK)ULnu1sm6` zza=hMVWr;=w@gNSRTA`6t?Xts#PgMEoz9Xh;_zJ2EC~RIY$Dj-;XZ}o(D$9k{XCV3 zU9nhlBRz0~;S4l+uiORRoK=17s#O!_Slb7lu`6lq5dU6v!%MbsRkkG_t+w4qs%+=J zA8mWhX`Avzq5b3T{`_}n+vNK$t$UB%b7K>mH=?g?TQJp1nANO2RntpVsqoXAABg=x z7yN(5`%pPJlm+|>@0~HCQh$U>XO~I*mI|(dSvj%yZl1YhbhgBuvn@Ssz7_16VaZI3 z%mnMx5sif2nk$pbhaBE{V7(|LS|gn>&bkAkz0UOXMHleQ#fT@zYLm4)o9vQ=^9g}+ zf%B<>>!;vJipGS^Bm-F-!o>_3L}8)=Hyu-TVvi3l zND~+M))Ik>2Yiah<>h4V3Kf9W2tVm-un6hQhm=n}K(GzOQZN9-39`X;AYB}gwjB5j z2G<}eb8$GNFYC;AEaNO~IW-&?aO?Y=iX$HIq*09u@&Jqwrs{9B)SD>RiIB-v#AJfK zv?EZK(3b&Sl$a?>5?7ecupDt)nqmuafvYi4)!?%HAi9tE-kYw2@ZTdY(xpY~Bs@K? z6Pa5_hUu_gIj(~^Kvx}1ZMxw#;(AmSPvVg?zk8P=@7MP8$qd_nTwYQQFZ+er)T|&r zdzwvs6ddTpJ93tM;D|J&qd17X$EZBG1i&l3$uYn=Nr`GTP9zSes82^8WcsHZO0u@< z*Zq8g6}ZSeHS93TOi8fJU0+(xo`qJP`lVHh7Rvn#tzn^WISqU9R+7HjN;B4=G12dy z{SBGHCaYv4QaP@q3S3F0wC$BMGp&Nwy~+wuqPjBKJe8FU%7z_6%mB_8v6R+HNh8G! zQN`sM>}vl_I&h8@7<5fXAoF0dAcbs5p@c0B*;zbX(tO+r6G^n$)$aP%NtvSyV1)VS zXn{9^))~d<%Z3tY^*+euJtm0QwuIsH2~l?M-`dc&t3jI0tXa=*ZPF( zL#fIR5a1x>q2GCqyc!N2OeoyezrOlDCmD%Byh9)l@}~-ZpU7h%PmE_ElGD3LPL4O~ zC}j{=_4o?4P(9vZza@^#L>!tU)`>r-D@_cY$8NEE+f1`Mmo;;a+KcP4h_LPp_TT$D zT8n1@p}swA(Ztc13x-?%s!>+8YB0mMV2Es${bY=Br3a87hR96Nd>;W`K8H>EM@LH# z!3he~U__X3_qZ34Nq3?P|Fc9le3rk#^PNH+QwG>*yc#uw8m> zbBo(iVo4QdTg#4H;@+QZMpcZ%=N@b^~2HDOeqj{0Kt9A4y5IHV&yq8~|B z3XzDr94>-qOG$`FXD*$oO~zb_Bif}~V&T!^6355W&nZmQZ1be@DL0GC=fFTTzRV}j zh*HPN$Y9c@%uRVyeNjsq)uSY38e|yBtKY^^$h@w#f9zZj#&6Vdwi?9^NV4TG(oOpr8=QZLR2=g8kwvDV&)!UNNG2B+U3-Rq35L-X z$0*UD{GoKk9hAMe3W}o&U2@%2*d>L`LfM6K9f@F3x|o>MrJZz%9l69#FimHerVDrT zSqVovhll_J&a+l`LyV-?W!rGu&tChJrvSNqCx5btL#G&+f@|p*q#}AadX|3gUyeaA zu2S*8Ec3a`IL=vJA()d8Ov8gevOJH`DxrME&K|MTC->SBwnb_5NoC=8E(a-0{?dx6 zd6ytNm5OMJd`o%BrNvu=lJvE(%sQGSzNT4%_HY=ctYC|kFqu=`;bm?{*=~}Laz;ml z9I$1yhr5|7C33)O<9V=FQL2K4sur+J!0HsiDC&9m0|hEXIq*|Cl+z%)K%OTyr_&jc zlbdLJGvh7uhfm4LX(nAdh*4zZBCw8Q7)L#yo_}YGaJ+@QvU!seCAloc-J8ezwn09o z-KnyY1XL4RJ#ZMx#x8p#aOP(FQn8pfY8^qzd{I4{#0PuXcL2CuZo z+I?(~ygbRCqVKKw$ZxF2%p`kd<`#Q{4XE8|e(nnaNw*RSDPuWb@(89VS~B46sUn2R z{a#I9`8^R0mRRMKEjJBCf4a9TI+aUhyhBA@14Kjv$mcwRc|HbF2f}!Z$Brs zc5{Kcuw4gsu;#5!h}PsTO~!m@w{@Cj7d_bDE`I23yXa<^IfBg&Zq%5@pU6(2VVjTG zrHrF#`P8d6vi~sKH6MEjyH>q>B@*ew|(u$7mcPrn3 zM8S7mvV-;lvT9Hr<`f|X>)1gZ3yg*flwfgHwK`TQVt6rObttd-6)U+HyFxJ@f^~%Y zrTR+!L-|zxcCHv=DQkz@)}6D=pSjRBqB^fmnQ!0i`rOuSW*qhEaTGve=o}x4Pm3)% zT$zR{IFnO&K1oag^j}O6UL=E=G8m5!9V`tMn2rbrC1;VVWh+=vO62|&Mlh&m4)r6` zahtm%OBH%ol@cwvR(e;9a;Akkr4W?L@Dk*rRG1+fA`wy}iF!gbyG@jy!(W!IXH2F3 z@Bmz#$&;OdyIrkpXkHwGZ46Kr*%Du>y$wFYkq~Na3;CH;P7aop)hz-1XCN}2OMXE5 zbJ`b_rIdoU7jg+dkRRn++QGuomb8aMIP;`)$Pjs@y90zkMgl9iBt>)}vI1nFSWbM zR30=ud1+@$TGGk(5MU*7w|5WU=S{(N9iAFX(zFyK9veI|ICT|15>;wX0hHt{D`@L1<{$SNqC@S&cR#8#+D(#6VE2APpB}4^v)zizcWT`nkIM=dFW%6>l zZp%1$#7UwgTJX|kx@FI%QXmTH+$J?FMpK~OnOA3#Wq7hm@!%FQAG4T^<^}LleqjpB zk-jtk&L!kFY}??uD}r1K)lri}{O8_+gvz|)+&fadbe^U>r9{(ZgpJ-x+?bxCh^rTPZgOr#@pSmjWO>%jic=9D_$FE7r!{do_%$O-Ez-+)}Vpx{mc) zRb5Hj`EUQdGGUNaGjP&JgWC@b%zxqL#`f=qYUX^}?!IS`ttdQf8*6^DO*MP%`+fUu zPsI_-I&#*&PCa37j#y~*E_w}Gm9X}j)%UcuL2ci*gjvh1dR=GRy8*}5n(h=+I$0K< z(-S(wLU>;Z|0`&st7Nj5%jIwh!&J(XIB>BpPg2haav`s9*PQ2AAe(?Jyc9|;pnBqUVj9jiaG%&k*wI|1pg^hLH4R@%Ym^t8E_ znl#6JJ7-$b4^u4h`-!$|(|Ggl{+8EeB4)0LJ>M{?aN}^Mi+ljF;VGjqla&CU=fn?z zFt9Hd^42U~MbjXUs6RpVd8eyQ6dSquK%>P_&<}@fsiU&(M(f|_{*e)(pVH(mnc0f@ za8p&>P%pK1xaTH9WSPUj=4{^k>J(QQCxDnpn!!O$)gE=x1>5P+=aAlbiHVjpPedJc z=NszWFh^&zRVG9Fz#sqwFBLB`$fQ(wclnP?oqPyfo{TuDT%rf0E~rTdxQGV++B1FW zZVQN;e#KI7iKjMS31(9vf^uTrXc3g_FAVmKh^Fdiau7>pKvL;=2eiH-eYto_{sCUf zj;#EUm196%q&Llx&@yPy$%RtpJgUv>#GAT=uhO_krBS3!?J4;1w`8usXaY^;tmJoQ z^ULe!L(c`MmAmnM9m=<2c@Tw89SW^I1Xmcl`Gf7b4^$%9Up>;bo8at6^bUoE7<2@Uhy8 z{cEfw@U@j@enZRP_p}UZZ4ZVoQl?VUr7|X#l;IXu-3F>krIcUB7|L?L2nl{Fhnk{A zO&+C7C9qPI5~VQl)32Jv#Y$s;!$q3aTy~C&a`RFB$khUS;;m={)ls-e%}eSC4|0(r zK)8rkoeL2QIfIM%Qv4L5FXar&BZMnJya{iRP++>~&T(i&KTzVeML1n304c}W7hkHF^oXj%v^KFOQ_HWU~DWI=Y#!Z-bg{d1IW@^1LbmU2$*I(RP3Hv34ajq3c>s zwnmSSX6T0!w`cA8o8GoTv1DoUvaQ{SZyBdZkW~i|gnllBBQItyb2tVv~r2G?7F;vU7d$%+-PHGM0SHIU9mnyHQm2tZyc(isAiN@xJyMm zI_dCfnzbW8QgKPs7CU~PZf}2*ZT)5ito!&xYySS%_H?)J?bWvu?ZzA5au?p?`Fm`~ z;;Fpm0AkA2E=izsQ)e*(ubIN&&x^z^j%NhZF%Gbc1Y^~LX+J{SmD!{^GEwHue~-C> zAKKWS9c)y$wzll^VfJ0ZL|Zdwg*|oiqs-%a2LIg?cIT__+U8=jU5Csz6dkc$m1k^g z$#F|P__JjkGn=zK+irfCcvEAd8#D~N+aAB8lWmJ|5dJNUH6<%Z z)|tRTf1ffqu}Xdd{vUUx!Ag{_^bc6YTMEW_epmv=)6M57W%jw(@LP6C4TZ>R{`g!b zITkFZ82{}!E8afcQufR=f9fZ;J#&_A&6r_Z)4qUCzOtPu&`RTBTurUG8xsbLIXqO;&lz)>I^5Fz#J?75MC>tNe4ZH^r5oJ zxuixCTtpfIn-E$IBJS`nYe$aIR`OdrgfTc|R9Y-Zp0=1JePWahk%^L>AfqT1svAml z(!>I=fh4&YNpfK>uTkx1?77xJx<*`r;|_cqF0CMokT>Br2pY^tO;V}ZM5Mq1I?)B{ zLNkyA)0c!E-^ZmwX6@|C)I}}1xHbsO?I}!ju)y+`RP0*OBJ(;9y2iW(+Q6W#$yPh? zTvH~(MX$~0*&tmmBNvj^dhO?mmA0Sx#Z{+*Tyl&F{>W>PinhCXmG-O>ZCtE$=FpjA zEj-Ym1c#Q9d3yub=mmtgurY%7L58Wf2+ zl-vY1Qt|)RO*bsh{{gX0tGk&G%u)aeZcs#$Sc8dI&MgdmM3iIJs-R`0oV29^@+gNp zf)o6y=Y)$peyz6s5sx$sfLz}76SrP2Vab7_sEjsK+* zm*wR0PV@v=hMF1oA-VzL>SYz{*wDDDvsIv~*AUv~E*Z_5j2P?P{B8ROR;4g%*H_=( z)!v>QuB&_;)VJrTSTDzyvBynYPyY%+n zOuw3K|9E+n-O_ZD-T3-AyZMa?b_3Fz_g`pmSKrbE2O0O=#4YzwB)WrK=hin6=$cNo zYyKi%@ym#EjcwrA6dSa(l$nV8?XG9WaQm|sS(ok0qLGMp=!H~GB3f|!OV+6CR}8z_ zNB0PgCb+x`MFe3gyYl79k;AxAf_a9p_sh91F8%;@#n4N!%t7Hol$v;p_9HK~KapW*h z1^Tol8urH#}&bh!rh@isgAx+`kX6|>AS)t*%7Ug8Ofv(;J=f` zf62$W57E&1fYG(&`_d{i4Rcp5Mk~U^4&nt|U!n;r{T{VnsFj0)219@S$aPV{`5&Ux zkdcaVI6<`&r<6&A31OoIv7rP4nL%(L{8dHfvG9S!K9Gsh8*3&PTsU5E<^ z@|mV1CKxFyAf#7Sg~RCcy^8KO>0FF=Q2|G^!B0UgBnbhi$s>MB)vrv}!3P&aXDw?j z$kzdmy3!Zh23JNq%iyZ~i`uY~u7xEpY)UDx3C)Qu;EuLrB<=W6*9lGs-V|y4R7pskD^RD^g18P)@a_oDOppS}M@Bs^~D+%Iiu|KsjD5Z-v%T3-hB(IWWdBGng;9 zSs_lg8m*+^l2WLmgq1F(#i(KwR|+ZP=jQX9F_z`|*IVTeW3fQI$LlcIN~{-PF0*U$ zc}o?nQ~^a=R-q2+JN&fv%c}}_N9B?H=fu6wPm>pH=t3KRXDePuE7f`!W6>D!Ws=3l zjIvITQ`Th+yu_f0JNjGukvnX_r&+}O)41&+=7o%~_g5UWfs1hg#L`5uv;r+Bhvso zVUpjP&Q7!@AMdtybJts!1)J>k0qfYZ!UF8@d+g~4QEAtFWU0&F11bn8kp+Vw$3J4O z&O+|h{ZT#ijf8zJvD7{zI0y@0e|`JZOp4r)_uDDcb=Hj9E9q{g6fmO`aXq@JyEBsZtJ4aXT z@)(sCup#r!f_Tr?rCx{cb2Qu_%w?{%Nh^_Uu&qoJ4rJQeOCC_oEW;cOTDc^$-py13 zJiFotQ*|8*R3r>nD;fll@VU0 zu6&_$3%iV3_hS0uS$1D$@h|yvC{U6Pq#H8%$mWfdg$k9)=M28~gZIf4-c$Lnrtu{C z$d^=M*C_IUwsa8w%es{co`)77tIv)x9KXkQVD;A}1hv*-l>Ke6AA)1SDd?U`fXpgS z4t`)0iKq={OBC&cq`*AD8vK&mJi1L^MW=HJ_i@kVrQ;v-6VvnbQ$bNRJq0O{9HH{rn6=i;_SBY9wfihHHnr@}k zEy{@W1^){Dy`lg*%prqfzGZ9)hsavsFG(Yh@Hybmr|eQej*;tIZ&h0-TJE}!C|Ho6 z3*LqLq~;FtIp{qHlu_n&s8!T!YJYuvoHZMrZ0(5f`+t^U|LMO7+<4S(e|#XQe*o04WDgcoULER# zp|{9Q+lLd)q>_Pn2#wcKs}5MRfvYX-PfeLs*wk)rG}P{V;v>7`@e$O{Cu&LzNj#A~#ty$0sBvu?AqYzVz6sv8VhU2QGeF9r{v z2FaQO`Gog%mmGuU*UJLJB`lGM{a0k+a^a__E#VC0+RZ;NA6BXMrA4s>q3JO zzC+DFK>qM@0#>2Fz+cUKF1UA3f(!0lS)gw`wh+5_9S5h^pLGiDqxut@}M|o-G z&y`rCZf)oC4KJqLqVc+#VqPN0a+%ns7zmCK=4Zi}azf_-{ds)kV={3M>uU3h9ecT8 zT~YhFnuyMFxB~b@yC)R3bCSVFI_CttRGR%@yUe-iv`FbZbrnH7{#`#f?*r$NbvU@D z4Z*!L>Z)rL29Ee9Pc+i7Do~XW~g=h1NviOZ@0KGJS@1DiV6$swBs~LASWlmO8 z6f^KXgR8w}2g8cDeZ}Ta#vo@>|0zpbXnV7k+rHedttyl0Oj+CPXlbe)D%nC`HbDHt zWZSxiCEK)`Y$n~adJcDg`*)KcUgH3iX4y zFU;2_4VwRcv}f}?e=yHtlP{2Yco9n-ep*~X>1u9yA2D}YwVIA!l3TG_BNX#v}eiL zUxlC)u1oC3x420gfJ4*2$DjtiIW^htX!Jfp4PK!-IHu?`35!JMzxWNSdpU@G5x3U^ z;u-)+SGBXcH@<04y)eTfFUO?8B|VC}_pO9|ZlbxwB=w?9TTo-KbodI@La@kXU($j` z^_lkW!U`L)@`&pQbS3II#)8oPU8GCAK(~Yff0=*<>;in1mGxPnzAFK^g%pkebW>y- zLjC5`wpn)u&h{b&7&sx(u6uy?_J~Gy8S@c8@6Pz3FL-?uH6H{$;A5sYyP#hHv_NMw zR6UJ75BWRkR$%5P-&~DX=$guJTcBJwwcT-$@$@&5Z(e7@>}z)Y&F|V(*C7UkKS&?t zqu_m8Bp($}p0^iXnQnWI{$$@*9E zCs^2@U!d!fXDi|{*lPNKN#N25;NSyL4YvzPAZ>uKQ7P*vT%aHATzR=%IDpH`tOO{d zHS~lDeKV zygc3lnNai9)KIhr-Jw8}DDt(GSd=P!r^>C^h8W-RibHvFjJJ4_1?vv)&qKZYGRvVn z@wy+ zCPb?P+oLaCQCi>NdPKt29wHZSI(Y9F-b=e@Lq}U0dR)5E&aO|1?Py7hL@*d^xjSuP z6RxKPWYCfc_{}V7VF%m&Wm_gY4s>(8N{~&C)$Fko$BOJEiu>Us)vj;vz#*iYlc(&b zpIK&)_x02xPDF5C9#GeL*0TiGtx;k=#(?ZH!vmX;fpaC~A1Qnahgsih@oq3C)0h&2dt$uM)G8)w$W|RD2 zdF->O*)_*Svtb8LViQA`uk0>r$M?QE32*I8d!qFm z`)}tjt;K-V)-!sW^_!7{SajHC&8x9LUB|nK(q`wL3D%nteqELkv9l1d5B}BY1vG8M zAGEF%5*~kZsWlzH(}t~L;0eape#k=a#M1$|BA*3{Y>|k|lfS6c@~yNEvAbkNP|A#Ob5yL_SQ7!3r@_l$DdW-b`$$c{o5IxM=+HC z)g+=3ilm5d2p@X>7YUhW3Pl$?kHlN zh6XpAEHH8xLOw41Q56n*>HXRG~|T1m0D{EU5F2@MePZ{=(6 zPDGzewpZ3z(t*R4vfpgx>QwvNtxO0)@rh&^-=+AL-|y7czWZvf6(U$|6nBBG1j@rS=n6Sgq@kHU9%n-YkIdJYw=r}3dUT@7{Wv{n;D2Iryu zu^Qu@M(nOJt-;+68`ONg0S^zeo6H{~1xF-!s-bd*mR5b9x0V#{xF(HhyF6Vm|b+p|J+S`@| z46SF@cSY73J9{X}4&%Z(d3qoF>rUAL%CY+h!1prwwUT`gHD{RsiwJ)ZKt_qNQ;c%8 zGud`xKk+SbchO=PD5o->cPKJ>K4CNku9=`N| z4f(3l#?39G8LS)X&I{I!p7S@??qk|FQviw8`#~!M7ZuvzSQMPKd+psdOgTrr=|!jUERtyr+`(YRJY`?y-kUNL?1X*(ULcl^xHIbGs&H!@3P6FZFxtWmpo zo|YDTG`A=2e8?8hnvW4M+BMLXBF9z|)HxuJ(z85Ka1^GqnL1l5Tp#VC<08(ymC_`N z6q)A4j<8D#5DT>QrVLqUA1l<>O_^kG+nTk|Inq}g6x5I@lhR+H!fM5PE8a+P67B0~S8fL_Xdcm-8Q={F%L|Gf6K<=uxX_KiJQ>TkLENSWF)@I~1xIs9JFxD6LkwjPr#ZAan*q9->cr-^nAy*GKG^Gl%Wx z{RMWaD%%bpuCdc-Ci|I*bm*sF>__1BmtS}h?$=l)2{Nuxnwsi4?S8&|R zES5WM*Bv`UTf(WscJgSBGpJ zr26Wu76@19PzFRhoDOqSUxnDH@St!p2c&q;iiGFC0p${baz3U|Ksi4h>3`d&y#6LI z%bS<26K?;X5{&RUGFN3JAbVTf92?R}{ZftWhQGA6e?K(cI``RO{Rpw&A;fMsbE|b> zrl_~mr{8ndu|WrWzEUl5Ytscl_$v3GBLo7Z$( zR%%_A6q`Qxim$Zp+}Js`$bIfXlXefj?#_LKVykRe+M}bGrSoaUVwf^h& zvf>*nOq>R*Y6p>)mlj&*CArpnrDnC}GY6><7KrDd#ou@{ITJJF36txEdYpyJ!ebz9qhsjX!Zjk=T3Of)-9Mqm^TDD zb}&RJcvf{|s(@;@K-mcbK~OH1X!zDGt zX7*~#o=#!#lh$SIa!bN0xz=~gUhX;8E(*uajJSU3KOeWH-)7l%#Pw~*kJ!3OEc}P4 zt`;A+q^h6H51uC#oU)x&Cun&-Z9g11V;jp4Tl0R1E*HMaa<`X=*k81E4?b&gqi0fY zA4;GqM@mm#MN+!K=AhW(=;U{b%O3*t$U>@;vmHviOmDB)r&N)8mR^pUT}qD-hZ4O+ zE6~`Z%P9eQ%Q^GtHjO@Vj~SW^!&4Td2joI5;~XT9{0~xR39UC$gFT1TT6HP3u8poW z+Kz$Q)SNVeR4rR>YMe(hNwCwHzFm(%+Sv)^G6@fjs*nod0%_?LG!zRGr8*Nn3!>A4 z2rZaK|F}Rnn*tUKm{ahMqyo|@h!80YngWWty*ZLe2&cWmX|HhFqdR?yyM@-CG-Q?_ zQiHmqTt`@_cX^az<&n-@;{s)8sSzB9`#Jask`ouVvE7S+<#br0VJ`HLwSX)53e9~% zM_d1SPusQ>m*V%I+5Vz$*|}N4jJh&p=wp;FS%h%`t7ShL=V@K>PaDJQ+`^X8Fa{hGI4uQr${j?uwK6GyE-Fav} zFNZiUjGL={oCy~VLJQjT`Kb7TWuOPx#diE;3EMq)*q*KPn0>T>H(TO7UPnov+ZDyM zA(y0l1wbzbpch#lE|~({^@TnhGXCW(1l8iURSZM|q_Y`{l(Uh3D=<@~Qsi<0b#N#W z0L_AEu-T_z+7DcxgJwc#BIR;T<#uo_d=5f$v7os&Xl|%^dZjFxsKw{}ZERzs|9RV7 z@Od&pGnEHkzpyfJ#`kZN-%=J09lmkslI(-e_BCaw4kfdpL+8{w@t^tGWg z%kACC44eKU$+~>J6+`$IYcqQ*8zpyHJG5bMn>hfr_P?~kG}v-%ioNu~7B?lX$5J4% zzhdY9;An8ZoEs70)Di)8FEH5KJE77dx}jWjWpuShQ@_a#JyA1yaPIAapx)qJYMK2O zG0++ zSbB#**unBex<&Y`&+YNRYtg2*H8hR>+Uj0`X#hk1l^5P%z1k09ekE1=_zyuHo?%bk zdfxE7u^lom7dWl>9Wpz7+b5$(4V614VWaJ0{Rk|Kv8=_T!SJ|YcBOyuP~zticF&)g zLs#d&cF_$jZONA7<~w}a5^Ijw_*vWRioa1U2*1H@e!K&=_rqZCDO-PVuYG;wfNd!~ zVOuGD?kQyCbpfJy%?bOV>X>;qRUfhjzI|pNe*CR9h*b3dB2$7AzRBHdv5%XBRj%GSQE{0M6;lr&U4$Iug z@?@=W49_HL)?Df=1ddDu4ko!VmHPa2Il^X!3ehjbL1Tmvg_#qIzCo9KvHM8mdOR$QjiF{X&?Gnh^wLZyLxPE=X3eoC5qNgTpb&+~5h_dLEilLe6O- zo>Z_|(CkeCYNJvKghvX4@tP1D!wfMlY*zeCPi;G_372id+LnU zFj#0G0j*4hCz%NJGv<@Cm`{F2%=n3kafi9@h@^-bq=*JmD-Ixi9Q*MoIDgzNGdP6A zO|^!xbZFOS_nQgfRhRVcR~YSlDhi{6(zV0tBg~iZy8X;&s9kc#NTNeL$Uz?L^iTV& zqB`6BG~@2vJkPRrer9=lsAeX9YQ=j#Bd%6ub3UmXCiaN@lm&n`U`?ZL5tc^j9!36m zUZ#Q7G~!Z_t;pVBMY#+R&HEmA%QhEJdn<|=Tw0F&T!{`{iC$5qN~LMtN-$6+wB#0Jhq|Q`OXr&;qf&rQ6~6hyTDtDYWqub z7+5=NLFgUPm&4n{weNu0{TDG(2y7iByp}W3^L8vzFTm{`Lh#-2P3alT)$7GVnn6U? z%|BR;+P#OkSUs=7)dlJU9>|XlcE1O;dod3@6pHZ5IPdMZtdh|dI;ivMS6xnS@Poo` z*I7GS_r^Q0*IBeK)yKHn*s2K}As%EGVEK zNbkM3g!JAs>Ae@aSf1bOyeE^OKkpxze5Ow_Gv|HY=Q+=LW)e+)+bFvs_;Jd_58F!* z-Az@0C5Zxqtr8@uz@1TzZ(9ggO2JI>trT!4oP417XUR9M1g?gcwP`Y|F#7GU%J#ot zXL$zgr=9^EJ z+7EyIDro)>8$Efm~zf)J63+dQmSjL z@WMq~%G>@*gRGa{|=#j zaqvs>?dvOMeAX#ZvSr8u(DM7s%L=Pce|=*{-PsD0>=|9WD(DJI#V+qN9>2rXDKxF5aF({W5tS z)Sb1!3EZhH66g$TwJS#HlcHz{Tyh9i8sLNTTnonVcDcGAX0zM3gLZ* zGSWrU3(j$QJ!^_?r~cJOd@N_NDq>n8b%D`0tQ;-erup)x_QjXyDU6;Cn`Oi<$MMdB5wpMwVi)qk zj$6TarMT5rfGMU>QcN=KPcZ!wd^^Q3{F1Z{>@PF6VNuE4WtG``I_xm{B->$!EXSf) zS;WFo6o(xq!D?7CYRgjjh-)pVfaqg;!2~1e#VIfC^q$MPvP>tX+?D}rX*AU8uBEIX z?L@!0G@hZG39L@hR+M+r>a+Hk4|`DIk(pM+{Gqa=o)sT@%Zk`q`*!h3?_m2yxDUKS zU8ZlNr`~c-xU5KOW-&*z-4#0WDzT__&imwT`T(ccUvGQPz8~^;3;O8`HsrlH>%H!{ z^;~(-x_^*nkD}N-HK)Lyob5BO*McMq>9IW89$tFd`YdA( zh`W$!w=}e)w9AtV8n4AeD?soBsK1s0PZwRUi$<}Oj9{S|fh02wA^e?P)l5gLv{9QV zb+UkrMxGhTZ%@Ic1Oky%I!@}2I(q#9c5-RHj8OlzI0pZ|z$Fd2sBCFH>>Bi9^@`={ znJQl=EnHlo%Yr2AY;v#N<=&0e66NwzwFtedD}t2Y;JlQo4`~n~01XVYRrz%UNe?sUud)3sQpL zutT2jSY=#Xs7s5Z=@dNd5bE7}lTKm>B@!UF6w8Z~tZyq)XFA^N!bAPw)6d%BWoxa^ zU+8+ka?`o%J+}T}tmTn_nq2y+W!IX0eC(oq``0hpt+zjCr_!+9G@rNq)eVF?oVR0j z=j?Rl6+5MxY;Ch0u4}PV<)35A`O*?=t1Y>{){>i*n5C43yEUX`KQhvWk3vacw>r%12547EL2O#@EhDrMCrkcTYMcKLn-mDrs#ZKaqK zW&mY8a`L{8=1C`7p?^q-mI`f)1C=C~9TBQcPcF}v%I|bGL8&Yu>Do$UAK+PY4x-L; zfV9JRM4_cY?nsw)au#@vyOcFjtBBKn{L^Q&*^n7BR86j~*|kmjY2RUJDe0tS>U5kW z?Ewg#B!CB8E#Nvk0Vmg_0L{rCYs0}B;-!4dUc-s+S{2&XhbOq{T24~eJl=MchA87d zo53=|wK~x~Qrw9)9qBw=LDdP2!qWQr(tIG-Fx!jg$;Er78 zj&9L$#eQ88q{|}CeSXEd>8v7pk-^}`}y zzUT~1O|gJ^lAMlc?WrqqIIiMbKt(j9Jawa0rf;^YjGa~uxO=5}yBM`fA+(}^LMRp& zO;f8R&$^o6Qm>XhL2zYRqRHk?>63H>^|-3n6_+D&j&=sZaj#quUL~2wU8%E?Wx7QT z?#Aj8ZeK>>vr8eq`2tk?5_)Kh3Qr*%9Ygh}&5CxcVuBn>qvu=EsgJDm7$H~t!S{U= z%(t5jZyq0VFNfyT(9CUoIB5(iWOE?TV=4RN5=ofFTo7D<5>&K%g3x}feWScoIQP4U|;J>kJ2t0?FwP3w7jB*0q-ETwt7~jvZ-tL+N#6=UL>p zZgEw3j?1ccD~MY+95TDhhTw4VhHnS=M{8+uSGef}l9s$-g8R0kQVSVQaaA(WaMld1 zME>aq{*nPLTHZL?c3sF^qznEY1Dd-j$ib3{)F9=;6RweWUVeFL`D&7tOf*$`QE)HP z;vUC16Z50&t@)Yur$^r9UySz?jQ^k8{@WJKc;BiIy$1fm zHS+=I5FY}N4$9%2WfCKVU+V>3Q}o6;d!ef`IyiIq?p!18XlA>7;+T4H0Zd(!v;#LA zZ8xifvy?YJY*gLQyZ|^@0?{T{o7yuMbq0%M`MUwaFt#zb0+-7PDpb09cPRb%7?ht zCA^MKxJNOH6uLW{XEVS?svYQqGpQf@^Vq(E>i)7TuQa&b->&{pryBVMBen&>3Wd?O zzy;dC|NFxK{Vql4S_jf)eDPagQUvMAplqm6Hf0U9RzTX3e^5MSbx#OBCqXHz9^)RI zOiANxCmp4%dfZZ11Mn%U!F$~$IGK|afxI>o9rDsg>2lR*x#*;7fDYO(akmOjWj#q* z%T;T*YAuEwz&&X-zjwZA=Q3AWBZIy^zf>h~ZbN8NYTAxEE^}UVhu?dhkkbzFtOS7l zc|bhKUEx2At`pMKlw--s`=RBFEH!!o`@xtGETs6%d@GAvM8Ml}D~(+Nc}ZA7MiMw) z1dbObuYsI@%+DqW`exzz4yF=hZ@1!{9sKMzp?GQDK~VfK2{$Ln6UC@lbjE5*V(D9= zQd-K_wGt(r{#0<fSN7hw(2mEuwpJg0 zmwb$krF=w-1>^eu2P;6dh-ps_#%H@vzTmw}Az<%A6jh^lKAnMw=C85tKc`)iuFz}4 zd)YnXciX_lS@txsoX^jf-CJHiWc$AJNM(3>9t!u|6nkP(jP+ZW>7uN~sEOb#vxR;v z2a(+b%MMQL_dIs6c$XgivQ(m1+J%0XBP{}r2vdgj5EiZOC;|7Vos~8iEl9(g$1ref z*yh5k;n>MMuS@lLo&AF|+K{JK=2v~Lb4v(fjv!e!b^)+xwgesFuzZXWI&e9jU3>8- zKlWj)y~GTK0Sn^o(FM`WQXszO{b(D$)@S$iTE@TX5xXwrUJJkGKepO?&0^LsF}Yys z4uCv9S@v=X4oB05a0+O0r08_??swoWmyMQNVvCT1*q_eQk?*f?V%( z72lsTRrq&LfW#+3;uBnavJSj0{?bktd}dEQvxvXv9`m|gbGL;|8Pvn#HhqMrQ6^Yk zTQ)sDA;lCba=@#?b#%p12}Z8puo$ zbr$NvnjaJNvS_EQ>Vd70qmb0qk6H4{9+teKho!816s3lf;3Tj(S$9d|Bsh_iBt43- zI6`0?Da`#qpzAy{o}f2KXPxRFEMI#P*ze`7f5O5NS0k~kArt)6O0$MIyLh42KEn-o z5ww-ik?ZhNNb11$S|RC0v=8O>e|oXl3bAWs#e$`$=kkG!o<-IB%m-E({}CT!AT~4? z2_z5IBQJ5e<%6d_u(S{?^$IYbcm>RT3H9L%EXdr-oOu8>dnZ4BZ=hF}f0Q_veBiX; zG(tIZ<$==*lB+BEGEo!|jy0On_Q0R$PTayb@+ihGmNV zpb$_lf;*QoB%p+cuK~3yeLP(rou}lMmC=z}LRV4+?7bK-O?mtZR*9unaC!l5`*~Jy z@*~SW{GR3Rdz*~9$t2t{y>zQzSeMpO0%{6hOLfc#+OMQLKrKQ)R1K?`)(55arfpwl zbH@)b<8x`ygpNyExTe`sla~TNG_Qmc`jai_h3=t4i&!gJ>fNdmLxYqxO?- zci8x$47A-cgL-GA8>3r?9m2;Vr|Prc9$f;$Zfpmb**cmk%$cX7uc7Yrc9|p0hZ0bL zy+hgb)ra1+sjt3kKkfP}$miYm*Z<7mi&%Tf!j4s*x0BcjB~c_c5eie@M1k}?l(o@L zBUgB*Yt9E?mRhTKs=nE}9S3KRR=3bf`kBR{fyDdF28;z~QQX5iKVm=X@*^Am9J5$< z&ExNy>Ewx0R)XB!FInE6fdJ|ow1$l1s~5mo_$;FH*Fkop{!HhyblAGz;i&Vsh`hAvj&u;w&T2yg=qjl~xm?0lIaP>Z zk?4&X(oH*8mwsTTikf6(O_4Lj`3O~Sq}CWA`%Sp5_ek{`2zPad(8OP?bKl6rm0F+1N}WM?l@s{9lY8tGU?PG{-M z^D7cSZf6xATQ9WW&c-#^l#hRJrHk6}Md43A&Gh%^_pBmzHW)M?rV4+}ja_EJd5OzF z*X5i8V!P#0ip<9{l9xn)a55QN>G=FIhz$m0Wx!T@O=&I(TXYJQ5FcEY18b!wDQUTa zd`5ZvWFPUWz*=-=BDN}lNMWi&SNwjESm7*Ja#SvCt$?(q!YMHG8V*;N%W(XEuxy=gn%p`IUMcmLrT zyEXhyzEl0}=YL#e1D8hI3-dwNrN^u)k+>=u_gsSYLK=3om)9ulb2Wa$s7E|DTY^LwBcV6mkQ4rNe{`qxel{C=4(oCJq z$H=?_;%p#buYx$RR|hK&QT$*k%|c0Moiw zEP{x|l@M6KHW67NnMo=A#&30FIB)3uZzd`K-6lWL-_9)Cb+P!s_THk-reG!F=6 zL~WaY#DS<#^BTcsfSc+9A!vlOU#9|x1;l}`!)UwJPmMEITm1%FxQMARG+^Th;HS8$ zDsxf>96e20*W15y4^~w$MS5-$>@-;PG-;L2x!pdX2v2=f6t#y}7ce(d)l=T^I{iUUIGJ+lj!#2Cogev8&O@!?~k4L&WEj|09%KT zmi5APY#r$UDQvZb(pV{MwKNAAHJ8|uTnHniRX)5*I$0{UNiR7gAdMCA1O*XcX>EbI zx}z#Twvtd=fi~d4v=V_gSWS%O0UQk}0!NF*QDMA-Qm?9*ZFMOfEH{<9abo4sO zu6k18r)X!Ooh3j)1*MU0pZ_d{w64!c0su{)S{`fNKRjY%mKNI+lTXmLPwT-o1R-8? zoAtbZ5M3@2v~^7aD#rquuUG^BQx`j%zn_g{K9x4FOvz9BU$58y+9|D0bKNTZxKVFQ zF43EL>?mr9iLBX6;p*dMwtn(!JQ0ojGTl5o*#%C;)?6Tiq}8J9E?O+M=o8gV7Tth! zN^$HewuyPqJ5%2XK#GAL2Nb)WU`v0rnjG84R`_WnAZs@4-Az3D{VoON=b?Am%MV9b z#hxidPrSjB`l3}I8A=Il0#V9165G*{efg^@k$n{!opd@&JE0)`r4j8%&aL7M8}8^j zT`T{n3TEEO>qx=@z)JgKnhXL1B4_VU6?m*?rhlHFD>x83}6&$6kXamG(WLB^WY0dWmIG4a<(62e>W(T<2OoRkDJl1y+=@h{o?Fq`fY-f`lbB zf-mKJkhB^B0C+8A;CEoWMM=hX?9DqNmXOr&;;enJQ~);b2>BdT$O=!Ots)APM7gow z)u^F0%7U#Wa0F}xABC+Xg!pr!BCE&<>|my4@YIlE5VaIKTc+Qbn*nHWxg2Z_sRUcg z3gD^e4#m0fL9yg6uOH1EoRjdZpyyR*ufW@chS;a{vARi>)8S_IxQWZOO zckXPd2~&H9n2#40q&vPS)OvZNk17+ODB;p^(jYhML6CWkj+El0GeX$0av11_ z!LQ&`7)7d-8@V0w3K*&(d?KBG&MA9>NM`s%E}8%`PFh!J({|L@RJQiF+%?Xgo_5S4 zI3Fmoxu*_S>*6SYc^q_gJW9ZXowcAo`Y8;0D0Fx9b{H-!+H(Sf;NNKwE-5_l5hpx+0bI;(KPR3%GU{9?fDSUjQg?*oHZxKh3vG4u=umfurQvxE) z6=$wy=2WSPzf_$WxnOYKfnlI8J5sL_HG89g$-&VaxBV9!ZEfEdcgsbm@zLB|!{oMl zb`*K*XIaj=8Fu@xLH*$WN9e~xwrEd{B>|_2s#)=Knqw)d0cG_xgtTqjPyNa}BeC@q z7<|)lzJ-U%&XOc@#g0}Xwbs|W8A_*Nu1U?G*@$iV<$QJPhya$d$Of_*GA0 zX6G4vm{WnW+~`x2$}0)&(|RjBE6yZI(OVK=p6F>A)McIESC z`;_Sk7tZ^LD@|hN^#Mzc-AwEf_=)nGO(iPl%tCUKa1_MN2OsBxlkD)57qBUwkJESo z-Fpk!RNxs4FGxm1O<7B82)WsSP!aq4V)plC^zM~sL;7;|xc)t_g66&83XEe_1xGIw{Hm5CN9VhSH+hu=1rA(@=KB<=D!(UoCp z0F)l9IYX62j6Ov;D5oH$Wsl)+H^o(x|y? zAm3!QCt;PZrm$0AJAD%)R6Ksq8OU_j?;I&}?CD#i3ek!mW zsZu=1_i7t}3P=MyaWt3v!Bo-P_{BiPk&JH`yTGR zF`A8%zifS>y#+2#-iU2@XT7~kUiTl#X$`uGl!;QV5)Lr|Cc zt6AV~_)`mGt@k2z5oXyVGvn+#-y6+8_(}fRf3^GWc)^l4PhuAk!P~K)FLVLd0 zs_HF?fWFbQcF`mFAHtpPv7cXeyG`mxxa0cw$l7L95gm*r@_3cf`yW;T2Q8s^RRHal zcv^)wSnwIx>+jLuw5NS#@F#<*kB>>wgp|tqn|qK_mm2u~Z=}>#-an;)AdKDoL)rgYG&tNQd#`^!sYdpQQGy?anHED!?~yY;VPq$8l>o{nSs z5mDGUHF4Pkl$1D0=A4(ZJitQTZIb~>>P?TpWqYvo2XG^02Z%`LS*B$0d{cEaLzj87 z4TQ(9z`48nNu0ZV_&yI~mrR(@dD1w~ePL7+tpTpt{OOl+*IsG^N|zoaKX2zoTJ&Vr zZDp)l3-bdmf6+pnshOmU8f$DWw)*N6hC0VG5N(TPL{p{Dj$2}(?Hn@}?^4o2t4dyM zW%2X*R3D4GT)nx6P(u)n(wf+83U4%DO~D+#R#l3*H9p%RtqRKWt+8if_<-XT?3 zcijveB!UVCReRO>2e>M4AN?BOWQFh&WuYQ%i`C)@E{|V{FaJHuKQx_TzzlE#EAg@O zA(O4j@1}JQ+mbEp#fo=~BXo5CaEbxUMBn(aO&QqFZoL*>sofl3-|zlxlJ%JuVL&6k326kGqquA=5H}9=d1Z_8BIshKFJmMRsq>Q$p2c)qV{hzeuxWeG**n`CWx%a9 zFJe!Nh0WYvZxI_RY{-<8_T#$Vg z?%(s52ph{_SYYE=J0dXI<-kPsey>nycBcN49p$&0?;`v)CE;QeUp9Xc|D;?~C$;lGL3QcoWC*8bqDe7` zue)R~O<9d}@jJV*(?je)9<-&y##!1*2CMTr%lD)5G6bX?fmg6tOys^;)?Bz3gfDF(v3tVj9&wm3*I?pR9K|F?^Q?h6OW~3ys+CTcs zrSyje@_^bqnW2+PbaTZbdebl*u~imGI*d#aMy9Z*2H$#G;!5e3B9lol#1MgB(hBzI zV4?uh6F^2LF1_C(+hEdRC9E=;TLq;ESCiZ>ezoJ50!#Mnk!d{syXidBEFFbQ4wdeC za?KzsK0#d)eE9NmsWkz7jp}Bg6XD!vG^3rT%3kPbqy|g6d`+(j7pm6^EYjRSTQfWH z&%j5=EYIarRyjo%@j6S4V*R8(ogTfIKD9+KO4#I?xmL5d#wdXhjL;|#75+f1*abgIBd46mJJC3z>xWolmjP8+c(&0blGJBe_FkrafUU6RVUE89QXQN%!Kv#4SK4+FoQ4%#))Y#@B>#hl3AFve$~k1sDux0gOluv>5A`LH^L zU-vuv;c`S8bJ==3B=m}Dzap3t7rsE`UDtmoOq}ZA z#G#}1@)WcuSQi=bm4$p}<5HVCl(4qoe}j;B+bfZuSUOQGr>VS05$JOY7>uH96zz^L zSfmg#@-%2T^|bcjF|;p-oG!1m)Rv1D-*UzJO`WaLUCcQ6{kQJ2S;H1uA+cNOL^??4 z)Mi^CSiRQ|g4$kp@I#O7^(_CI94B0NMKI@y4OM)&JpXDcR(@J0W>DFbJoOQ~iqO}n z;#DZ9K_(#`Q?0Jzi`@dvVjZ&&13AYp_(OLfjA{o91nsDa%QbVgfuS@@=OhviB3=Sp ziCB$-5|)EvN$i)eO@W|q|G1+ znjAgMwc2W@@aQvBDZ$TF9o|b{)5AIo6eWrtSUcLP(pFeqJzc?9YMcsr;Zyo~$zHfX zFP2P4+F3iRr!#`i6*zvV%eFe0blLQ033c#V@%jh1a)%ZQLFD4l%X^k`(K%}Fmp?y; z$k}R5O}XZy44p}BJRZChR%V=`{1Z#5=*(h1hTvqV^vNQ&sfA!=QSu6YujKbCu1#HS zT{Y~mG=n`im{guc90PbM@>T(f6JAz@q!-~*^2%u$2(AQ^wbl2^s6U05i z=h7aS?oO*rUXLpj=aTf;qqqn5jkB^nVvy{l-*>xf*N-Ka5_zzEGxLGWo2uB-)KRZ2 z*(a~`AWPY?*fzcUn%((}d+i6`Qr(B$#G`Zt`vH94(zcb4mR5u5K?<=A*ZW=a|7K{0;YPigr45pj3T+| zZFbrd**W){5yOV=0ba`8{HR`mt`mxa+6g7x+25rF>UtHFF;sPX!fwBRx(!>B2|ui9 zf3^;*)D5Gcm~S3vwU^%{8Rtd?0P7(hvD^OP*?XVV*>ISz1k`}ZU*ypd*sb*dd zYs%g@g!e^=snj!K4tSf&=*I9|I(3fTHNj?~aA#(LP8_K$MQ8TXu={o?r`S=31uA3H z`xdjpvm0-`&q720Vz>RzAUjEW)k)Ip&(wWk$4W>tuA;RHzk@$AD-6f|0T^Ce5AxX=?zR?rPS2ynjNzJq;f!>mzc1H21z zkEEi7AC7Hy5%Vd&zSTapF@m1ncl}VB;{GK4HDUT^$U|4So1t`2N(JYr`8FG2(xItf z6?^^bHbwQI4tu>rQzp!6Diq9Hh>8V?REVz#m0hyfeyb1^fYVG;9i2?c-dn6v`S8kN zP@8QEP#Sp;V2=;V8B89&Et@Q%_(ToCugEXm6dk0_G@??34s>CIF*}OaCK& zd7n*5UVcB+lZyqcLRtr_qMq&^UV`qM=*mX0PFG2al1BrFIfRq#Q&yzH;~xcZNG;S1j0i<%ZIYz=A^ zn#u;+NnqS?p5f<^Rj=W~Wefk5e6#Z;mR-1zYYh!4WGZg8_>;80o?2>|QOoI*qT&<3 zM7X-d!UDJ|4q6DV7GPN_OqR>u-vaBErf;DyO8fH6wwRl%aMi04(3MjM3aP+ouS8&V z!&Xsg_f&3&PYOfJIjSp*w%~eTw$Ala`6;Tq1+-HckRgRcE@R5jI~@|4Y1o4neJqZV4@@wct^@FWMRLQ{QI-|IlsvfbL| z9UNr0=z{zE*d%A6`0m02`vctJgB}kB}tx=-1G+6BIOnA1aaG zf7EXM%>esZulMbV$fGu3C4Z zdeOeyZ4d*`huDvQFv@;)+c?JI&9JAR-)O_R?W~Q|dSJApV50+hZ9~{?yUKmXZv8u> zDLakZQE&fxWFCLt{dRMBU;EB=7zmiP@%X^aPR<-j@qQ%teYx%L6T}AC^Z@)xnh6-# znd`UPt9N^DA(i_N={&$pDlXbrawfO@)vu|R2ZDS-B0`Lzp&lhC9c#grr0d4;yj*y@`y=c_*?%-vDSO6^L=;x z-ZssdXH6v16mEEtvE~#Tf!KVydDYq!V5_G#YJdoARWi~#{Z(uAxpn?m_g8h6eMz0& z`G9SXz?N!|5)J}j8%V&B;wej$Bd{U4;BF3e`CNW-kU>0+vYfuzm## zfzwe}JvWOlgZ|*~Oe|m-+v!lY7I=nm>$j-oJ;3mkKPGcbB^PAot=Vje<~$fL1g%dD(wJ&*k@#fxtz{!rmpwp-TbV zcOWAaU*pUESf8pJ3WyT{7(;CXd*g7G8(|Xwd1VGw+&Ng zJ($}9L8TtlNyAbvkO(PQrDL@Xey5(}Vpl_&?Ps-)^Xf9)-XA>Ra%!Ar+M>%^Ihm>n z9qZfg;ZH8mfWBZ|ruuz^5dIo9wVvagdRdzx#-hqzJ+Z-EnwjF!M2ODkjOp_c8Iy8s zJ~b(&+hCZAXBJZQO7oprg|a}cDvqe%M%%T*-*+gf&#DG{aR0j&(DQsZMZX zuMER!xY%)J4&6zFl~oc}rs7apF0(y=S#`aZ7aRw|!QBd4U%hgj)C#cMP#aWs{jgQK z%!vi%s0$*)Wsu=gkh`on)=J2_@k)s%^U9DBpv5PwbA=*ykXR+?O17xxMU-c3qX~B- ze;7lAV%go%CRKbm!gA48Q4YZCGM%{oCs%zc6^8q%vE#>lNswN}lvO!a*1;`hKuGzv ziO?&gGCt1*OA$j_T zOm2GnxJ?6Urt{-1_1W<0G4|A$o%Zwlrf@wl+wB3SiF-EglR|rw`@K$?X(GbvJG+`} zGTFgzt*^34q`pt4pJ2k00-L+;qkPXJ(~0l+TJ&Dsp!KeZE~I8D+5f z4Jz=S&7M5P{`=-1@$CPx$DUblS)ZC6F0OVx0w*LzL{)r-9wASFqu6dKa7R%h+fgFh z(QxuE2di4_SUuj?qAM1Q)Dh3x5LeE!;?{x-_W!z1V_!y(S7c8BpcZ)!f zJ4)x9L#B@6&;b9oF!dKGyKe#h8PSzOz;7}cWdZpAMlqL$R@4Nvg}?$J6M!oJ4)(ni z(dbl8g432hV5v*)=Nv-DloZfEA{F%Sl)7A~FZ8D@mb_G!fo0%*qE?OsPJ(n4Dfpiz z(0A0^6~_{_7{qHGNI>(57eSBXRw1XiykS0p>?5SA@Fo3PXRVv6H;j(6^Jtv>qMy&yn z=lx3z&*r8%wQx3Aa!D)MYuiF6ASq)$Iq~^ zoKveTFKUgYoLpgQPN8Eqg_L1RSY8Qu8>|U` zmDxLhaL9aEG2VbuRNb;X($^Ji)0TdqwV?F`{d3rA8?`u%5qr5PzxYj;fMWBatk2Rj)@$J@ zdwO+_4Th7CK}eVYM<2^l@G2nd4V58Fi^5U|wLZt03R?JE-0E7PXg2(h0omA-jAwXh)un$DQ!c$y+cl z@v2x2-<-AC292G|F6?(RcPRe`^?p4uKgoJ6NcP)_ zz2}KN2pWq7PzewE&hd4qMdoKRE9BuyidsZu8?thJ4Sl>QeDav z(VoY{b=H`Xik)xRv6XY|$v^#)=YQ0`_v2UXa8aqnF(~#}{W&{aqvkGxY6SLiwT&YG z0J~J_scsw4u>){hgHwdubd9QMpi7rLTU@u9^ZAL5otxTJ|`ELqvvN8BIYOMUx9TeUHidYyA1}QUYSYhnwMFPsHFbm zs*^JaEAy;`+{*%yvJ!|n`*a89d?7^T9hgV9%QgBtsU`y+ z#tff#zE{`%r5LcQ!2GpM)B}0IDGd4U3yr_wzlS-!Iw%}q|Mue+_RGO`=i?vRGw&R; zNoz_hVh0-d`XZY^gt3w^hY*3Rm;=Sq3}Mw!udaYOpr8{rL${ca+i5aa!MD~DuiXq6 zK9blPNlP#9qUm>M5rn+bZt4CG($o_!rG3-kJe&Us%dhf@!~QjJ9hP9CJa=#p+Bzgg zNwDcd3c{0sF%2L|BtW2eckBC6iVawp$-FD(yUt-$2%$Ak!`h#kokl}NjtzK=w4a}i zVleK#JlVhP@4vjmmQ0;x)d#20qVk4S?R?Q1@a-~&3kAUiI@XIfR>(|ItoJsT@1>Wy z6|O5D@4&9P9rpb8i&AdaMZm34;4IiO?0 z-&i4;eVWRUU6VOV60=`{+`|%Za{UNv$zEzL4f*!zg>tJW=e_CTc?M^kqu!_t;R_^+ zLD7-9+l3j&%p==LIfX|MxK*55Oxk~>I7yIS#F}fRvv{pS@K%n3b+cw3(Q8I-307jI zk}I9ml};*&6mt?zWCbwoNtpM0 zLo~3DvqE~^PO1#|J%TqFO~z?6d6@1Hh5{bp8mxKp2&-UOcyf*vQGr+LSScIzGOQkc z_;%`y;CpI27k3GhH!BFmhtw(fF2ycaw);)1J3Q5f4~VoIulqHiZvLmqBdP9I$Z-Sy8{XMwgrUUSB zB^}5KJOOFsO$d1;ZnnX55{Vv8wO5y9+hkPlHx(&70ckzt4an^~J8_8s$kOON!FGrM zSgzziyT;6RsCJdo4qXLtrPywMg?3~K`NLq#qjn+a&(E@;9|&dcwL8$5VoNXEzLYAv z{>HvscAx#^-;p+RV}lLb!PCI;2Z8WULY<#kBAkwK9c@BsuRn2OU6r=~^xSBBX4NTf zb=3N#k)-j$yd>tFs->9<94zM+jIrRz(AafH_)Pij!8p4%QM>PE)h&7FBV@ zPM4#vH<46aSA!g1Z^^9}?Su6`*U`~A)GnnGV)}{ zj<@aL!5MxH$f-eY(Fs%6uf}(aVY^;7sU%>thIn+?K7`cmu{2rWvqNjC=D|X12iDm_ z>`YF=0*D<@%`?Glf7IhJY$Ys|@ ztI0)BBbw_-6MTjURRyo&*0R2N$$qrf5#Su0wD?|2UIM*Nrh*xqw1jgiWeUlI{W=Qg z1mjcM(R+%+Y#B)+bTms3KfTRS2g;|dW=m(X3YS1CunbxDW3xK~YW)E1ymQS;eRoG{#&C#BFeG3rNgSwF2C$ekkoFg&9m_@$n5@9D!ZZRKM7EL9OJTU0i>mMj zuLM0kMAW+^XCD>H!vs1aaa2;b^eQQjdKG9X5o(r;&=L5|k^1JY(UCA(5M2fvmvzvS zND^9(NK%%^BjqE@08+zth0QI0fo#P&p_xX#Z00ylD5o# zrJV1wv*CRWnr{&_7qQPSp{P~}!_M8Pg8l?MvT>EY)DvkgNGb*-?B~O6z_cW^gly|Q z=dkr%lwrMQ$J@&bvhB%t=(P=fz;6A?i#A|(BH#*PhIKxVTtc@n5Iqt{o8!0PYEB!? zb;GfajK<>j8sI$%=zRlDI~fA4(b{7GZf~q6gD3@9Ha#_eC`(uYz(X}zL_9iD+Q#&6 z0%fTrHxC1pU*=#WxUBn0FnRM(vpqKgOEUK0Ac7Reyt2#E&KgOz=j>N^;!i-Ex#5>1 zZQ8188%hksAf)kL%Tw(U6zr#&dGajrm);9XQ0qsYShr^uQzlp%YmYD8YkfaqO6o^P zY{c3m>p7TzNVnm31Fp3&WPwNjaF=~DW1dxSf7i-3O|!-gZ`iqQ?^yMwcdTmT+wj4y z@9_4BNtYga37AF~b{Ncw-Z#}XijfoCS#TL7>LAg1xOn}Vhg6cz6(}c_JCF-DMKI~- zZM*%)PZMACzxJd5?QbV?P`HVNKhZ!}8xuj4$KbghxZ~>A_&O*D7<4-*pRTJV+_Ax8 zoA^xxeSD+Y!09+j_#5TW``ZuxZp+?WZjFZ~Idfjiom}Q~eTwZl@IIjoymV)< z?f_*a+h{tTKsk_SBT#NLj<75Vlt~3+&=L?##x5s9UZ+=R#KCQbv7Q^8~PxFussRuMC)4U09SLs+cNwy*TGwc~N5aMCqt zd;<;x#{WT)UV1M*aEKjWLEfqD4B8=Yq>y)-kk|i+0Y*OEacnW~E~%^TGr{oTrO#Lb zgVuABx7yj-So$x@?Ckk!Ydl+L&F4YnHoB~QTt(?l7Yh5Ojb`DjMkR5=k%L{qCQ*!+ zsYG&P2GH_bf!%_5$T0081@U-K66g+z#{o@A z&_{Y=K_a0KfUstG6ac_Qs2xR+VgayMoVAmaYz6lsVVBVrEQhk@FFCvfH@$LBg3E-U zgh56MQk`BASt+ZYpji0pmBOAw1iGaJ@5pRYnx`A0ha*)VvhaG}UaQMTsm?(qrvth; zb+_fk1HP;vnTJ214*b@nU@tv3+R^u`NAr6c$S4dG?C(Nr@BZ(uq!xGc-GOwyvf!=Svca9)D(AYIR~ z(~OB(AA$W?^~6zPx7^lg-HOf$7W(RzG!Ap3KIX4!83f^Qg-d>yR({h^Jr#Evx21{_ zXRY1w+c)?F{$n@Y{D|${-(+!TuUHI&jvjkn@mhbk;G6r~q}lm^c)2~x=#Iw#;a*Fq zEh6mnr4bGwMr3|=QLJ_8!`a^S$36KTO@)*n$1fpe44(bHwQh_TV<vl_|K4g28DwfhG1 zj?#Vcbr@DA7aexI{Y865Sa>nHkL5T#av2w0zSpx}_l#oN-f!)i?>uTB?`fi;m?<1s zpuJ=0(B3Io_>RkYa>_YR{8GjRfisL*x^qYrDZ9}XpIa;$5~r)1(5jmnt@9~d)zLiE zgMEmyB!QwE|Ia`Di0m#x{ByTVwX;WhTg#y*ZTIF`c4W`ouOo1HKzLTPgZ_fR1nB@R zR&%j4L<@wmM)T)66!rtK!(;wk*NPKo(QYjG&Eh8$2+qPwA~x(G7zKkDwL@mUfewW; z2oy`-+%bqWFic4%J~!D8M(l$w0Pb1t-il8I zq{dTy7T?M_LAK^nz4@Ipc+HC?(8==KUwszZEn0`67tXp+JJ za4$b`4bwHS5f-EX-wJF@-%MjPxne5yQG6`V-35Ee+(V-u?IdbY_R1j7_@?)hTgi!2 zu*=Xng5*%~%HhHhu5wt3;v8HFcq@Sd@CLzUE#U;zE*EN7g7%&3K%~EW zf(}}4(jNM^*ILf0C0259GMia!y&$*S?5gKESRURY#0@`qJ9mjg^>#@b1ZP~6FkbTY zE#-OyE~#^Y1g|iIda?EW$Di!F;D1@y>+Yxg|Aal!e~S$RyIxtAWZglnN0%qrz-goq z-8Kl2y4QYt$LoYj<}h%y$({i#UjTl`qfCsGz9HQ0q+Sq#u;koDx}=K`UJ$L~;OJe7 zjKF~iX?>L<;#f$xCS$0bWH@A4aYq+L#r!2I`t z=*b~y76X~u^fGRjVZ6k*H`mztTCjN}t%eir?IF|bXV>3Ok@-Fw{l+mngVFG)tlP&LDKI*WSHgrl zx>~cQP1;o+y(mU!bd83TpDHKcmyYVFN+z)4GdZK=^_=i1Z0jDC`%8kqf<}-l#t2+Qwh>~#0=R}SJ z@&LSo$&y#~r13=Iy8a-@WXyWXhiJ13A})(@2MLVna^V{#V2=>OJ9MA!gbtYp(Kk2| zKu^`t5*>l+LUgd2GsxHXTh|!QNeDl=x-YDnkI3nTR#&jY>T6T&yfluM3Tr)A&G4Wm zP?w-HFuMi(Y?0Q%aho#){v0e1wsh$aI@q+1XnB#60ff78NbX2bAL5rvq-%r1Zc%`_ zhqQvl8b*4K4x97RKh9mc{EeUv55LmJ=Ff?_YvhsV9-Wj^3p>lSz19mX6AdRV4F$t@ zdZrb}yl+KEXvRK1A56wo5u6_jjx#93Q}7yz>x(#vT>^q*94R0i*vC&HMMqCv+Sdi* zEsD}mLefz}+Ttxrv$mph&;ppblcA-^)4?Sim1XZ10@J)*#z}cTa9)m}98`{W0d^m> zP@%id1$=;&h|dnPOC^{H-szwrTZoz^cRgs`bVF4a>wE`5bAo?zj*y#q$b1=xEH{<& z$s5hboR9L8GhMcN(Ov>9Kxdi$^gE9n0mW4M8M(uA=_1qh-3}?`1|@vs8^DBmicenR z)+u)51ApynH-{lkhtO3+`^tCk@~rj7r=9bz}jU(I@or^JXp+F`0T=XgWF4yt_9FPjEFnAF?Oy#NM@R3 z5ia{WK93XuR|^a*yx6)8-d+qiBSPc+9<|V$G#TU^}2iPzJD^Wdh-H1ykjZWoi{;aI^++_#lSy5^XMzqE%orrmV9t1 zVk#5!xU_cXM1+y?R>!(q1EN+#u4_21gO%4~-l--*w}#?jDFGvbZ#C{|QmKQpor1Uy znHS0ql2!9&Q$|J%k*ZZp3}!jLx@w;9!d%f;qMDxB|L1Gbw<$@ikxhN;}A7tCsHvCz%lJCk0Kr` z`^?#_ohtlQ-9wDK1Bu)9=QcE!_MC_c64cR9qobv2t-=0%pLI#WyP+PN(@VP31J%Rg zw+u7i(KndsxyULq*O4s|WzF>|*3ejNXU|ny6FSG)%j}6-2&4!W7K;@_YwFMg0?&(VF;cU7VN<-z%UsU_;(Z~t@qM0*X(^c$OMZ4lDN zXgY0Pg-f?t=1>y^$;$-E9g4+to%Q3aAhx5{=cm9O5c@ia{q2`F`*322PFLFN`1htQ zDzh8@YbZ~Dm;Lf5FIg&45Wcftf+^=M=E4^?^TSxS=YQvVqA*_Ef!Q#{A_fRv`+}-B zYbHmZd1tKmhe_-JGHv+M4C^;L#(w!XJae7yVnD@n7S`!m>q6JwpME>a9{JZ3*7M%p zHn!(eHua^Uw&ayJZS90SUPJu$5ReW0CW>83ap&2h_@CWv!I**#(IX{@vS~~-FAW5X&WvfNCLB8TvmTfu(+;6SEn+I z>w1FLZdtpTL&3kxrKeq$QkjLStmeda!W-!GMp;&Fnyc`kE^D+;GIW=K-kyw<24LMJ z2{1N!xu5K+x7+WqkSZK3c{u@;^&HfS??xmp!j2Ot^-%)6SKesV`#4FY=I14FGF?bJ z*Rf(9O-bP7#w4Itazz67iRVVTFnVP#OJK5GB8~7qR_rW-B1;&PR$6ex>Z{H`h;vEq zEw+Z%S_hQPwu*RD!aI*m`#iUgxPU|vA^qe%J>p_LRfk8zZ=!bo4`-)7 ze+7hgq}btdt7y1hL+3`+llqJ27)0I5$m=q|biE}Wq4alV4o+%<%}>v^!YKL>2s!sf zeF*HH`H+MTj2wQZ9KBE%E#@L&GZsB?c?sv_=SW;m3wAfjxGSDsn>#Sv<;4&SE_JJC;Lf+$U=joLG%8a9}>_-+;kC5(bN6 z<$e-L%FHxNJ3w&Y;n5beihh7}Kuh+xe3}y2C z;zS1)`?YK*Sh&fYZd%)Tbck+4;k?6kpn-gXO?hXdy*LC;3)pr7Jx7cnY#Dn_E`^B$ zlNS_*vey96JE(fmhBp3G3!>^>%H(5 zpf`29zL#x`Ew-4dFBm1%!YH9uU{^Ni(*zRF^n)_hLjU+7f4fU1U!ybJr1Kd}b;m*U zG)jSqwH1~MlkPQky8DN!a`EK<{L79m+hD2NBCU$}+2VFkcFVnAi;%)rvX|Vz-Auhg zqRFN;Qf)0>h7<^O;ra(RJKfn8{)Ek5d*KgA9%-S%WsL>Omi{0ef}U}Is3lr+n96+_ z0CSdz+k|ICrVV!EWot27tLzwA6d?kkr+we!^pmU8M7Om)-gf}FvOpZ5^>2>69-7Db6bgW553fM1w( zXg*Zh2bK0gr3=970?@D!xJINFaC734juj))kw%xI#3jrg7(Gf5sx?(kZSN((w$kmq zVx5#^3cmr`2*GraU^-IS$X+RzdF5bwNFaWs6f1T~x~}4Yj+^b)RoNe<8IbKPztmlo zvj;A{&*bH(&Y~w1t8^i?&MNGJxd*1u`vw-Xg)N{E<%31j_`sLr8<5*oq!?;|WLJ6| z06EZ~n{9p5zLU3eksbPIqTTh!$LzbEZ?`VsT{y@b@~!9X&VRgTk57oU!SCnWPk*X@ zKXu|gU_blW%Qg}d^;>%yZ5Sx6(QSb=A}P;K%cr}sZHKqZ@>BPNxZyAtm{n= z*xrMUR$^aR!r2--qL>WOXW_h5(AdwhA9{YX3y@Q;ha0^d-Vz<1QLIgz zS8NXt-f3Z7hVZDp-5-8!muJoEd?TbQ?AyI8`1&4TeQpB}URPYkf}!zS3r?@zIV1RkgFoha-z6}#DhrV$9ouphDaw_2 zN#ZvwwGT%0L}T(qtTqb z7)0pKa`7FlB*U|bB4kY?U5=mGN#8m9$^TA7>%QN9MheaFKCfH!miH{@*ov#Dct{ai za|!sKgLIP%6{iiI@y!|zCo(RXBa7cu7c~NoI%6hd;QX~l89T_Q(uqp5Zd#FOcozxI z{vn)07*;fxA8LzO?y|vssU6usekPEgLV$5HkS`vtnM7VPBs^3sTsd zxCoG9{24p<>f$5JvPiL}x@@bgE5;Urc#Txj3ZDA8x~o09)R6X-z{NKO3$AtLOdW*i zNFhzlm(F9u)}1e$gS%hgq0Tq69VfqHdLovJ%UUYFLg<|tu)QlXuvD;8xuv23jm5uIT=}fkx;B5# zqtSwS;oN6-@%-mzS1PQgIL3KE&-1jUyIQvl7^9MXI$h(6G|5NC>3jUwDB z#jG4&5o|xWkdq=&{$du9PQ~ezJTqh)++q=`f3loxLy_S~*L(iW0q`GI!r5Z2JzVAQ zhup?_#_=UFj*r=VUUBMH>s*Elrkq<A8 zj>qXG86Cfu%SJ&+l1W_oS>Nl@-G24Mr)}Va&)U>slkC*ow=Lu2Io7aiCgS)M#B=)D z2|Q?9KX_B!ngS)|!~IFIf~CYXf_P3cim{IFC|9O0<@Yn7U@`e1wxzEf?%SF*Edt z^@}b1+%o9DS+chVXZ)kqE%Z-z3+v|GDTss#hpn)q#O~7yQJ@ngOZopYwTOl0vSjA4 zwb9(@G?XXJ646XMb_+V;C`2oVRuHW#T3^^raFvovJBpVI?{j%mUDXq*MjKTz)oYW9 zsN=6-vY>1mWLeu-OtzANvY9I8Ml6F&Yf45gk!+r%{exDNYZKS>WX7C^fcgiEq|$nx zLYHDHu5Fs#A84yU0_O=%`zFmKG~iItvf-8wfIg80gN21~G#$8x&SD-vd#=t}&!Q)>gtW9&@w<}WeAlJO zc+D6ay*kc@*D*1wzO|fnMVp;Ut7qA1WLarE+lUFh3I7V6LYH`5Ei5TPs(ePMYRU`4 z9i!r?{4&$Dx-5}g6zH_)sENxkLvo_XmB<$DJamU}O##$jDV<2yU%B+TT{x=&Rt@Y% z$}JP2{lu}keAZ5Uz^C&#N4{gMBEI7bSV~STptO1tHR;qMEi5c0xiNF`m!Dy(RScRw zn-HHgBexMLN?`m7v#n_5UqPc%C>!-JWM?=IrOHhkT_eg0N!Gln>`$4&^ z=SZ%F>|4rcs@pMthK=p>kp1GjciGKuE)917TC!wbHtON(0|wuf7Q^r|5W}(+ILL`jP+w1>mJ)W9u+j9#TJ93r|7`!vo zB%>QI+L@+HnEptasy9o3!Y4MGOB#tn*E&{m#Wp2Y+1#DUHetbTduGH+``-uNuv>pI z)H-$1KbvI)4PJXEEm9%;zE;ZAx9_(He>c#k4jyP5XU!nv!-ELS!p6#kMv%1v-%RNN zro9omP|iA0j9I;O3lm%^sTWE{)T$DzkHZS}u(LM>W%bT;#7O}*ns60i3mB-Avtg#i zEShLHcTu1GU3TAK!We4Viqz8O<4i9l<`37R?)v``_TGU}*ID;JLx_loEbFqaWqaRs zpDmC2Y}2)^x|Y>dQEZ4P(nUlR6wyxr5gRB1ij5+@6Ivjo_ui99GU>gCZoS{vc~2&| z`};n>?;n}@%w$?JGxywk?z!h43pE7f!P4i%bxcQ`B+*zIs!cBO{Kw;Jzp~hxF9D@b zEus0e+bS?^5l(dj?&Ddol)3D3i;89on_j8+?~vlFhI4YwDE$Rz74rw@@0<+lGMVHW zL;xR(4zO$`iW$w~gHo0s0BFD%4R|_wN~kg9JfKkbr8bd=iqoNgeT_F$2S2m z4Cv&-Az?$vNiLw`IYEp7WPUcJ(#H-q(%-*YumN`Dze}+pXs;u~-!yB{7~=I@DN(f({{V{$^{bh-B?Zg0(fK zT5EHm^{^xL7{$QJldX=?*e{Vv9}!77G+;2PonO0Yt-|J^{#4#q?h8=LKmd z;A7x1faoZ(|JbosB0tVDV~rhQ|NIL^l)GRa-6nzgN&ItD@RLSW8OA-Ig((QkX0MkyouU?hTNFW`obqD#UWS z51yY2#pkC7QJ(x3m(+hKGaRQedV-Wo0fWqBCPknG&E(sdQ7Nlqldy zbeup9$FbMv2eW~)q+kQ2GTjQV7Bm1iFsXG=!h0NE%j{E4 z4h2p&g$_VcolVb~;>VM1*U;)LCZ*_kRArzV!U|j-WVJkZ3#3{T4Uwi48Y%~g9Rdb@ z85^;a}P2V91*;&EKzk!Lvj5FQhjltRlfMJOtl$Fq9sGw##RMzxJ#_#uG zPy1#a*0qoGg08Y(UrJA<^9!r{+$_EAG|<7PKfR^RE}rz%9&Vu?_nkKO$wM|1k>oTC z3nspcdBLh8d;0AHyMEkS8#ZzrbpgBR`Fqbj`wn~Rxy@EmWme4gBdw^`a@H(>BC7*n z!k#d`?gTQzlbkd4Q-%9Bf|q2qSkt@6+_D*e8kxi0((28k^2wCIyXW7Ew7Vz2Za=+z zk`2Cq;U0>*Abwm!biKhY;s5=Mk=NRoYj3sJrq8jA^{+BlLyHWv7442~W}v+h%tDV9VH7W#n&SP?So;6BZ23!G0wR&MF%) zP^A&FUD0AK&Dg8TP>~@lkgNu8Ebt%))2uUiu*N}wY7H-4vHuJnqzMnwU1_ljpvVL_ z0EO#pWHLaI3aF&6zQ@wnj<%Hbk66~$36@1+S#SW6P7H0r1h$}{V5!a^>CM@|)Hs^% zsyJ)G?zO2g-#RhUKeRQErp}7N*o<0;KM`lHIOipu}>*`xUSnJ z_RvnWAiAKXh}Nz@3u#|29)dwR`!gnCYrd#G~@i0=mvm({(1~*YovpA%D4x z<+b#hhZk)norqj)`#*li7C$w?uK&wu``LH@jM(K$Om~qaLe&iRDQCRj28K_zYo9n` z6W^(~$2R2J)BAasXYH!6u<0Ll+N@8G*)!PP&f3(%8t=`#w{BsrOZuI2mWZZQ7p!Nv zcuvH>NnPU!4)N!Pfj_j6M3UYxj(TRPci7W-Tu z8oQO-kyeL4V1K>oBfIYYjdtmEOYOVA_w2kMJ!Rkc-gHU;aY9N&AEacs7p2MsyYi~n z?C&=$vwz+Hp-p%)(!3>!w&IgA+nd&ANoAi|Zp&BZCmt8Ww&b*a#_re_w!pUY{2lB} z=yV}W5j|1Sy!JT1@3tJ|^~EPoT3#=&v98m$rx)4mr914}`)At^fAz2p8g?xq8x0=V z^G%u+7qDOBe|~taO~3Csi+ks7#?IGR9li{Ktxs9Yk;%aG!xlKqzM=yYsOl&M^lrIz znL`wut7$2hZk~soLxlbI=VJk(%j^e#9%r$BRVUs2o1h95cY|F6jg&6w?=A#qO%o9T z4VL^prU@YG?zFU{J+@n^iUzUD&p3K+`ovsDs9)!FK2tJAWftW zQbJzAP9n7kp z8YS(yjPEN}OMs4?ofDD#|B<+_>&w|)j3yN4ujD2fgksWlE*21@znew0&V27`%OKIu zBvdEAhkWvV)_SaEuk0reSjq;r10X2P**}{Z2<8fpL=bFVw$j9<=m`lL*`KhMa61~G zBPP--VhdPk^95Z>KObmp-;yQ+|L26(PYYs2xyYi}zvpY}|&a^SVL zm)o!wu5azEuoiw=b-PYp6B&L-5ByJWD|`?bAgxf}Ydd-p-F#43)K^R3j(#%OSNPAM zEgQ!9U9R!0c-p#Wqyw_&0Z?fmuk>fqPr6HJ5yZ*7~ngJ4Gx-gEj zp{7(BZR*S2AAu}-c&8s*7dBjcRB7jaL!I5*?UGAxv((blRzWb&>}DZ%C+tCMwoL& zF~WJY-Qqf%EU}@3f}qFJ$XPR5Pg>6LFDaxdd zSlEBt$X`5Y(YaI*1o1Ql@x&%7Ubj)=KZ3Y(zjeEM6vV@0NvIN!*IN$E{*;9u^1ANA zp=E3^f(JVhbqeDymW#~~SLk-brkraBSpk`WqOs%XA@XOKPrQo`9HZ|kg!_t!-)ES7 z5%?lq7(+q=6j~agdDCEy9VGL;e6nj#3nVBT#}mEL0?`z9gQt)#%Cg;h+wi;%tl=Tc zR%bXHEzrNkZa5Yc6H2fZxRqdM)1?i@?wla$LUb1C;zD#V(>}x1p9$cOx-TYfUz|l0 z&wTH1mIjY6&OZ5lwC}6$wB)r9TH5-DEp-dRFKUpygU>O*_5v9rI=;C1R+0!uKqM*U zD=g->s*E9;Y6jR@aM;$8PY5k{!L=PyT}g7sQ35kT+zH!JT#|Pya4%499pTdOj^n)7 z?R@@xot$)#5POQU-|gTL+PfRAQ*fZ9x~Iz83B|4LW!BPG%6SRr#n#eNXwA(9^b3lt zrCG;?*4oPTZAFB4ZqvbSJIgpmLJB3*saFOlw9_W;VluW1*pT#IO=fA3$h-faAzW5m zLGu28jpN4^$Fv?x+<0+T^92iCxrE|QglUS z32#`bvUA79B)b#H?zxTxir@|_7a0tnb*Z{SzFfM#hmj^ztv za6>{jS0P@i;?V;)&t3=h7S2V z8yPQTspdsEVO=!Fe(-Z-A{XCpLoPt!GwdcCG~!kpH24+^BUYpBxzdIX2$Kl(3V!|@ zmg9fy-1Bd-|GIpdjeByft%f1WrUoeQ#?u=iWJ*0>AMJwh9ibqIar{HT%$LG#5~{v1 zFPc|5BA$+?#;Ou%FYhYsvYBrt*)Og`A9FUi!cvW4Fd9R6wg>+FN8A4Tt5y}om;^$| z3e0M&m_Dnei&6st))%g6=gI`XVu#u(FW602j;AsE8$16857~hv5Um|G4rmr+LV~+@ z|0CxX6OssJ-k)N}SD*Csg>s~o zh=+v}!JXuVD0m9sL_~=w)h=S?Pr>E~tbmy%i8q~ab4bYHFpI`(=IYx>xNo&gny;aB zI~29CCJcq_KA!yl8?qhq;X12%%DKgZd%0?~mWVsgd>5~cWccwkLVnT*|FVp=_geBN zV;v=uy&H31{zG|DbF2Wj>Vm`btQfAmB!PH>s$BaYHL6olh_1T=8>eb^;55=@Z7#MB z(q1LFT{J=4dRmE$N^XNuu^YvW8l4MV5bq}4j_4xi9o#{lt)Q($xLpacA}W!!16HFQ zcEf8&)G)Zc8@_{>-O=SI{+7C!+}NB?jLx&h#vI0a8nSFyb3?Xif4I(DxVE_|hiIP1 zt%>CAMD^BkYwsXo=OH`08hEY-67Ocw<{e^iP-(*36SoQ8j=>j=)5qs9hb3D4KXUL0 z<=_$j|FQd|Vz(^7hO{x&+IsRUhGM&&BDFDhwdEXKY*mL}Wnau|%zIMQ9D0i|9nDGk zk+(^>k1$WAu53A4m?8d@R{+h$OkTZVffQu@uqow9Z!qbw)Jlltg(=H;gSfRAmNVi} z;<%!EDM7tVF)yH$&xwWrXzg+$CmT*af=(o04|Lo(Azs(G z$URiP2^zSqOk-&#U?D#RKhe895$Pu{+JBe`evk-G0^r~KOt1>}>Ll)v4&tr8uPT+X z9~ZuIMy*Q8(_O5uXZXg~O!?lh_c7jLGW20pd!Msvnz6B)SK6ez7^Moo)&_;Kf`@SX zv%kDy4JZ7!z4;j~=YH=a*L7;7hOsge?B)1&>-(MYRzsEs=)ik){@$r_h^s(84SE)OIG5 zZhUtwZ3l~OA2IewPMgI-P{$X3YLS^R9m&nM zF}~71JWyb-ydPuJBi7qpkG*c!-1(gSFzc_PGkblWk^4368u)>b>*(cxZyQaAg0 zX~xFYeQ9rQEwew4im<^Wc#c7Twh>{!vR{AqdfWU8Q&rd_)^B|g=dXF-Ej!i}WtEG! z>rJG)fsur+k~(W}C4_n7!FhJa-zVF7VZX5RFL~JZ9R3PYUloDkyi@5@A2{=Xw;Z>U z6jbRG=e2D;Jf^GNj&!zJ0;-8roS5F**aQ0A^RB_`O!ksQtv`KhTBqjiRCNd)x)Mtif zrCcIDyx#!^QNE~@!fj)MtK6Vb@}N=jiS2nPHUC!+TZQ-VkP~7kzKc!ClC&n>i7MZ_ z0mDP`YS#`G>HRhO+lBdj#r52kH`=h2cWYGHs+*8S^B#BEOpbPY+jtgy+OtE^VkSjaB#L2MbCpAP{4ncsPTpsF(>4wk}u0c zs8_-A$?62;`^hfAcC?Z%hZ1#yb*EEIwgg#i5hnvXdOP|xE}q0Lovr`%m1l>C0)7YKyNzdSY00&wrfdcL3`Xng)2u;@EF0OxHe4%z-Rj?l zbY5KstbMi%|82lhJFHB5JDgBg9j}rO>v6O?OluuI*^Z`1b6I@mG|a_lS8$+tWk>_d#u68Wo-yv{f2 z$Wmfz^b!lN`&H@k^|X^$}ii;wxYR?@UD^iGFz^_bQ>s>J`$spxgQu z*Ae*#hX{5>eWmj9DJv&FE3@{)j0Clzy5v)SU!nbZ<(x24phW*Ya(NCQTLb{S_YrD^ zo~52>HEDg7(tEB|-=^m&fAl<_UEZSNEt-WK&JUL=pOGW>pPjCzoH`)An> zFdIr{ntlJgU$WbhQQ84_+u$F~WJ^(=ja!>y4}Y9!53bL*aa&8V)ZNP`Y5ZTX81@E@1YSD)n~lK>jtig!?;!GMc&amGfOIyO5rn7*^g#_wi7-objidGscpPK?T5 zY}%u1tsFGSr__sS?g16>By2xw(al|UIPa8wNJTJWq$+_w*-iH?umU1*5uA87ZOZ(f zPpzPrj(R46@WPB1#Q%^fS#6(McKc_R-ObWq9I`Sx*>`#DOKz!N=$AA$PuQBMfGuFW zYxJbm_Ost&^m?uu3n4n^Z#LxIdu;TSH!TC8N~K|#+;q%h=rqRh>|S)^r#A9%OBW90 zh#A@J9z!1>5d*K7hGS4VC+W1FvW)uEmcuT&JUXvO{OvY>O{V?rp+)w+A80iAY8&-G zS6IR)>#S+p9BV|WFSU%&yi@Py&`_JZmN!`r6%|Z>G#q%rZohsK`u(5Sx4!qV?K<@N ze?URfe?S4Rlhs6gE#pY}!(*C0!+Q4%i$fw2PkxyKzKwc%d9dj@SiDRFQLL8FmnuPF zKpDBcb|Pz&rh{{Eu@t^yDW;D}2FDI7p#N!Suk~)z zJXYE#4_W%Q2{1DJjT(*~kuPnjW){fx%VG%qaqz)Oi%BO%3b3h-s=c~sE9NKc9IifM zZ3Ne@mTYTBoUfLsyc@fS+g>-lORtCQeLy#HJ)(!^X7H#B^4!v2mBw0|Aj zeAK7~5Ogn9BW>tD+gdAmmGCuiKHbM^tw&AP<1J3a@6x%8X3&s=i{$bz$!EKh3dff7`;7A~E zK2m?w;>l5uGXqf7H%stp>7=H7RiJ+bJ0D?q!V+r%~T$%<>~CDUyq14?W> zhUlXXr=-NDPSln?Kn5&~a^hGpWQ6Plq>apN3u;+XNZ;2SsIy0=Y_Lmy_J|ESOIpZl z9Lw{s2i}5%KVg||p94CSA?>`R-gZ0OjjrGb>9ZF{QQ%9e`NEQGQMYF{FgaexrqJA~ zV^#q96IWbqn{tlZj-t=(wRgJ6`N!DJS6pFxSFg4f(6?>>v|vIXWO3>U>3Sc_;ddGi zdUngzli`4VVI#i(fbEX`+_LFO^szYn&HW*r&M6mz?Nc|BMM(GDm~Je3$*}nD4vXW( zMz^%uf%=B8<@e!rM06=}rD&-@T;u2Cq{xm0ak_=)^HK_UNos=zXRT<362uoMy7$F& zGJc;3b{E&xBX#}{pBWZ~ili)j(8DD5eGwJ!@uN4ftm;r(m0d#(bwV*Kz-^7;(&`UIx9($=#7 z0<*6SID9cWIZSP(V>y$>BIxur_gK~^0_*`G0EDSbFH&AAJ#-{e1#LFNSM;yO)N#y z-c2i0;zh65O;3RX5z?*}IUTuNut ztWZu!$51>LE5b?~!*M>8>1_k&Ohd^OOsE}{7P9tsC^4FL~-DH zyPBp5-VCwk5Wz|r&!X|O62*GC;vARRVck@o8S7p$|DGjmLs(&d|KZ=9CCX4y=x2?w%l@&(#=Mnj z*v&hiW+5&rI6N~P)7Lm;d$mXjE^Mq{iJld6kYQD~Vis_2+F4_-J+;>_21vA)~ zF?D?nBFcJu7PI!*t1Im%x4uG1mAw2$oAUfJBL%j^P8L4kEuKKgOi|_u{Tx}@Xb02H z9+YLr9BzJ0FyOmZt4rvIsOcijO!@Y?B=iyXx63EkxdSh= zZ~gLqJCMb|8Ligf{vxd@>Tk6MIUT(yXF}#Ba5FEiihzHp9`AK(pIFNN_@m8Mqq^Z7 z8U4!;tqj3O2|rp5T?~;^LXeVk5{zJ3mCohmv-=DJXAO7gh50B23f^HjBI=vdiKILxr4mcVcyev*TLq#MTDq zqC(WXrvQIu^^kh1|Mv(_PX8W^j?*kEcMoznF2WZm!egpwSvoKaAT=xPf$TBCn2%-tb4lN9S{${=wru=bWh>x3`qB3gISS?TVqAie<<(OK0#xF7QyvG+6HmNV z7ngV+p};@DMSe~GGL+?VetNiy@GjO@h5|l99l|$k3<`T{fpUVm-^F~L1h{H`fWYtd z1%8r$rT4zC#eCsI@>^*0IZ^vqjpb5_{G%75fAGvJSCoic3VN6O8xa@$jo$+N7T6-s_6gvuSyGv~h265gF}H~!{s zyJR4)vjcFfM8)#$OJ~``xYj(mvd|_i&BC!V-5z;A%N}1}%F<^x-|c87g(nSh^Rf#1 zK0$!;{y4#aGpwYG%No%qwy@A>XR}TFxWuM@RBU6PK5PTdLk4r!4fgHtjj`y;I?I65 zk88rRmT{aUJiAheV9^a-wmHAT4kVlX`1d52;eX}!qb$nbK)@!rH(?;4=ogPN8-GQj ze-e}hCtsK^0jXo0upqkeq@5p!_%fc>W-^+YMCkeylKun&;^E2$+mTyp+cU~6s-(fv zvhjlWpw=$BNF~TEcK)xghyH1^L}LGu_Bs@YC%_OwYEasMtf*;1T@BAlkwzPdq5V|9<*+1Up*=~KI-p39Xl11ex z@(TgVx1yukHs5~ti$`gP{KYQ$(-@0EjFbxWq^Pio7r&I^>Ky*OVDwL*{P6VG;>FWt z;R&=D5)oAs?W>9gO%mm_CY zKPHIh0TY4~PV!su@|5})(zG3(24$ZLw;v<_;2jUJ=Ho7lhZ#zP;YnY4jis#8FcpsN z>mIVKP2(&Zm46;;HmOJj0|<`vrytY|7?zs+ltyuF>7l1>SRtKV>9$J}Ae#vglIzvv ztY%h!o3)hhVIOj=wToAwo7$>~-mK_eOg`6IN>1G7Cp!iqBD!?a$;DrGqN3?&MSKYk zvu8^De_UYX{!8tc^S1sfWQDJ7)L0Ux^Mcw9r`FKmF^cVc^-F~NpzOeBO2 z*ckJ9l&%t!pU_0DmgHe*9Q2P6DhL6*4o)JJ|NGkM3-lvHSO^)!_qg?X$KeGS-ZdNc zxwYA6)@q-9(QT(brSxE$r5i1@2DO^oo7h{L##*FgJ4Wxit1gobr?J*rlg_=7Jq>QE z$zX9(3ayqHE6&~pV1EcgyhGNl089-~MIqq@zy_a+13x8&C$=a|1%eR54^%jO=&K6U z696e3MHIvgCG#$|F9!{LAr%lk0d6J#P9pz1HoroB0#^@+N#bTe2zR8O;6%0)L&ZF4 z!b`71a?(l&E&m}Lz_4rxMB<-FEzk%oG?Bh(hUSb2I_MJP+K2jn2YuZ7Jm|StPY&o+ zI*Sw~H+~(p(M}xM&Pf|&a-Dj~ST;8Ag?iqOu4E@W+;G~8`{W&aZp=Sz_#g&~*sbQe z0t3g`pKo1evlivpr1z*A-hnt;&hib8ANa5W1wPsHlORHv?Bq33E1VE~IKY^%?lF#T z4B9%M9~}kvf#}G&0J-0~qoC_U|5Ppyz%CJ8bPsiLh;a(>QL=s;x30`4yq9AWSLKrA zKL@D;HL%^e_EXy%04PeU?A>)t6AqJ<^J=^5x`me4 zWtLnIZq=N!)J9}H8H&3SvwI0@tj1B+T%ZY}I24&0E{bi0#A@tzV*$yqNAdMtmRQ|m zd-G~-Z%&OJDr&NWMV+=awZO|-?q#wC$G1R>CUAM`rhw`Hh~gu$gq+ys3( zFM$TrniIGEkMC9~1$7z5_kQ^;mw<$>uN|S0TB@ zDw3RceFno?5$bFY=x=QYn;Why%A+hAnhx@%t+>Hr7z)VV#6pAv<1J(Jy>?{fO%}c4 zMoakcUknM1W?#t|%h^7jSFg54p`-Y~y^$sRr?47vs>8gpLokC;)Q>=4_MzwDU|zH= zB$N5bXG%zj%hG9$W}!Q0Y_zsC(psvhQL3S%YN4fSGjNkoF9Ny>B=p)^3OH#lK#KvJt;r9jY1NbbF~K_7 zugPD>Ikx4qG8INno;q^TsV~N$zH~RWQl!;TE7emc)mN!6l12wa^$|KJ6>un|G@Q`Y zO~V^am5h#rK0U{!J7R{J8tII6QE=0tGo4WpSQbkwq#Wpx zEs|FO`VCe;+z(k+hM%6`&<}+s-IUtr6-+5R#*D5xN2N3_=&QWVNdkyh63 z&8yUPmHKV4y8_UGj7x2JfTKzvuPTY=JY5-KY#I5Jn)9VGue))B^23Z`?uTF9gH#FE zBJISgg(K6sC$h|Q8?}N7FJIrj>0uq!)ARNTDjU?ZtknlOpgUCUc#fAM-#mHE2e;~V zB3rz;ea}?u-1`I>@-(=(C#{7LP|tl^qbFJY{zvhlTmW<8*()>W+clT|m90v*5O9O0 zZ{N9KvR(7o2Aj6Dz{Y)0z?#-fyW_2V8?~au9{$L0<39=RXpy(65KHLgq_5s|6tbMC z-U?zHSgCP_`EoQ0;@y)HRJjEJPJQK8lRF@Eb8OD;)ZJIZY+v(Aa@V=8eDEG(^rW_R z58nr(STAWsz;qVcPF(M|M?T26d*4pAXI7QkpU1p!g9ho(`@8-2Pg5+T2;gKIAs#W} zL57E;DMm7AYbR76x9yp=cBrh&9(r^qx7TdM-|VHAQz_;Q7EUXwPEq&)Wf{%A0#WLl z1eG?b-k|ufi;Saoi&v;mY&>Bjl6m~7l2+T5Qg6Fc8!R^Gv>id?_$4DLeKO@bGhd-U|7^8)IaSL+w9dUPLjw-e4S zk#mV$g>F*5mq)G$qVmi>v~|otzo>g?B{wM-&?3Lmw#c$AOD%Ev^EUJx&52xPw@!JL zUKd#hLxc(XN4W_-O;9g8Go0tD??lp`@Fd=+6!aMJblcLPRTJvqaj_Z6@B91so87;~ z{WIKLhm;Ji>7+j;0QQT?DB-7I2Vcn|Dp8;4Na3yLHW!ppeufou;-tYk2Z5d69|$bb z0so=UeqB#a8g!mysR1h@xv(#!Cq^JL%z1m=7~ z?`Q4Z6oU*_uci^jPnPUovq9ql+0>+77H~WulO7T)Wp2XW74dHt`U2#@f48lDu1we2 zFbN36Ii@VT!SX)DRS+Xu6>=^3vY2qAcVE8Ss(0A6gZBWP=~0INbZ2 z0~qr|7q(L3HB*4P3G9XxYo<%&wbW;z3GFLMy(SKPjg6Vs0L*%=4Qb|UK`78nf$25Z zCfJZ>9;b;Z?nY?GdX})Lgw#%3ZFbRy7s0BG>Tr+Pgo_Y%5%QDps&m)ah1L0=@VoWE z?j~z0+e%{$b5j&>b(F1*HSs9VfOdesmEMyI;|_qU3$a0aS2G1)JKDA`H`mvDT)t5( z-Z`o9JA?piRp>o^8cU~7*#_ zuvVs8o0x8GXsxx9ibAU@+HZL&n;ZP%Vn7;>8558|3^uk$-r}nc4*SX& zF7ziZ*@6 zykpe>ZIuX8NYTnzWYdTyYLi~K8el&Vx0v%ctd3@8E#O>@T)m3qpxTYUu%iM*FUC^8 zjK``4w5xfXTI$vE{q&u7&cVqPn?cS?cFg8uy9>DW3vOL-aK2HE`iNJm8Q#AAS@U&c z6Lm~jTz7Ds4KCX`8*_5l(4C&uZGX`kw{g7n8Ee`;n-15UK6bPUt;5LLsEJku*VaOu zX(hzepirtOpj6{1>L;l$WP-UEA#`!%LQDDN8Jl#?bo=e#%bD-^7o;1d7bV!Ye?8m& zF>9kue;@Ou_loR+WjW^EyFA~*$9z{UZCI=j8aj~n7gH9t;cqT6Li&;ENn08P+&7Gg*L1yS- zCvR=S>yUw(Dcf;d2mYt>+ozy*pV(Au6V{d3eaqAA@fBHYmdLkhbCPV}c}%9Cb(Nj- zjhk%au0pG(R!*qxVki-qjsmrZO4Alo)n)tRk6UC+FRs9ofRev6cyg!hOJE@x%DV(^ zlhjWCu9*+Ln+TNh>;j3Y)7X5GfkZB;0hSiFHLkhSB%e#{(Zhajk%c|BFR#;fW;EN8 zT%>fxU)b{Z0`|A-7Gc16C!I{Xm|=f4-`UsLLo=6HqW^@0BJD);;v{lQmI+7#x+pIe zVaf31+Rxa-^QEaEPp4IwTF_zf*kWa8bldv1sravG7XNy?^rA~`)hnx9uGe^QJnm(v zB=}UZ=o1l+1K|LvAw&w-RiLd5>tOVzeLEYK89)pQ1CZ2*H`6j|*f-Sz{8aG)Z^XyE zP9W{qr`-X!%L`l)T_^dDD&#O_4b{L|HRNiIGF7SlAo}_0lyOI2dDP?P=Vf^{w0cQ7 z_+=emlVC3E(%@3C!YhoL#CM%euvftAcMt8cwCfr-==-PCI6PlsYyhbu3WxMa zjB>YqVjs-np$44w7d}z1?z19NxES95IPxb?VjWK-s>n}H*h*yy@bSl>$GJ)eK3$cB z5VFuE0GiJaT5R>_14AV%)TK&(Bw;P$-<-D{+~W(Yxz7?+;H2JVtlrSR4gLd~^CUhf zF`!GSOI)u5{!YS1KL2?}^C`(S^sj8d7xHa%ZYp6RVp_bkigGIRah%Yt3@hBu9FdfU zv@7$sJivqDuj0#hgZuZQCtNp5D#JU;1MmeV2gv&9pP)Z^Kv*_qdDe$FqcFVLvfdX* z%?X*nO=JQ$YVh;#wmImoq5*yF)xaS5Iy)X>A# zMGnKI57~E=^$~`(jH%)(SYJejP`r&+C7$T$QtEl|I-a|wN%TOTqrcnR1J+5Ww5<#O zV9IZF?_D-nS-{Z~G$v259gj?)2ZOHO)1TrU+*g20bV3%uJW&r8U1S01wp2NvaqZIe zOdNe`1A>NK9EItqlY4f6`t88~VjWPSbE1)dpIB~JpbP&av?_Igt`BNooX@?S^B2k* zz|#`db31_icJcsS(C}6>^;1t&$uUs{>D8(%#{Najujh|_lMg+Z>?=XX zQkuAkOQ18?zdTtgbXC9@L3ngR&CETqv=@ssk@|tX6UNgzv zi}irIwk-KI7No02FNj%U1Iv=oHzvP}EM*11W9K2yhy*=9@gpl?e_kMW8-0Y`)>XRQ zy32N0Z{CMiD~GZGxQ;rJ(L~0KaAqaYxn`yNwmXTUt41nSu&5sQ6bpS71hIhPVUrd* z1T-~K$Jd(&qKm1=&^!!Q9@Fio8eJ-nWCzra7p!XQa~9aHaY!yxdeu?Q*X`uFw__{C zgSYR04tt9gwt4ZBb`^8$7Y+I&v0X#?xci=Ui~aDoPur-OJFr7U$`0y{eFx>^@??A9 zy>#ptVU0JH*bKz%({@zY6T1+$gUVBORI>oP${y!@;x05WyXxFlRd2@TYCC@pfIe$O zh0WPeX)odICDTc_&zke8yBclE&R{C=__it=zcqk6Wx(wtnSsDY^}N<+Pu|L2K7J;V zVFb%_hv;W&`QT0y(uToW$2wyZ0KXaIWbP80$5K&0O_{>v&6PHMI!VHl2rehAuChl~ zmD!!Ir`hPYb8O1W0=Aaq*o8lx0x`}&(m8*zr(fJO^#I z>3*JVGZR|7vbt?z-K zSnn7C_5fhTC5Zpen%}*$;0plGhbZ6BHX1({$~i6s+w-=guOUGXiIDoM{%`@jxVR9; zYly5s|G0e8qAk z-UrPo__Klejb~uKzw~!lKO~olf~@7&TlBlQ@T|ixjTT(qk!LLD5D3nESo(oyERAAi zekuoE>cM9%JTdMCONgCo$+0h5S^}EJoVv!W@oU<7VpjHU;3x198@j9;gvWZ=e9L3mn4qCyGxB z$nFW+hiE^m_O#ZP?g86((^w@^6zu@tw_0_<7Vulv_Unb}tEujh=TsrjsfK~5g8Z*U z|5)K(6j_KID1rW(JT(Mxj|BIs#TqDs2!Mli5bjV9A)^Y7FSIaFEMLx!-p*j<58KKVT*n-}j7g8-aQ*pbO;}_H>|}ce z`w|aW5mkDAG>~3$GDo`Bd>-SE=i&0PB&}2@9#i zU$NTc`Bt6iF{um?rp~jnWDg{NiI&SkCY2Xi7Mir2LfkCrc=*W~|d5*%;)F!R8y1lIa5*W8K zuj4gSow&*2U{l%km>vBd5b5dX`#H3LYP*QJg<=AoA2CuhnnCRpY@{x#1@@KnR}d7c z@BtQ&PcS4RRuV76%c=GKM6?R&nGiPVxoacI861D#MyUKz>n>&*woSA&lH>ftvn=w1 z0~RsmW&8fnN!0YC(BX_Gp51KW=iFq!`t3CP*E8GgiDel!iAw&F6&d#6JIOX?MXHT{ zFWw&Cm}^t_;h`Cs$4{X>aiEkcpBi~vB_();tDWcK%3K(*n2W z48Psh$LGSGqapp{gjhkFWy<)GNmSB_m=&d==SpM^xmJV4RiCsyc^$SR ztHpLxSs%{S$pD@RupAkj$v+qOoL9B~p*%%*8^@3X|g4_2!ZWXM?3~YPB z(s!@3*Jh5l4|!Z2M0rT>AC*V|3MlXb~e_MPuPWbsv)oYtP^-^f6V%(CU%grwlOecT7+JZ7JI zgd>+{xQj|VhANw{*vWDQ0Nl^3ETSKlw_O9=eQILrZ!z~F2=_`QG7*rw>2R5&GC5AF z@9a-?(XD9UnmkB9z?WawTm0~ltoT1wWciX7(>~8HVAS$R?6U=#%WjFS&}UkUA?rej$&J`pe5AT64ui1EXUoG;ynWg%}gdpa+nvShaOtvTMq~~ zLY#X|h2zbRT3fnPA$_+EuPvpRF4;+84OkaJ$TM$PU8sCu6M2C)256DM z8XQ0M9Pb0$vYNoNJ6*dh-{unl>x+JAshuAhTdd3k)ma7+;BNIr;C?aN+{q2(*1~q0a0abw?3G@dYa9hv`TM z$|Y37>!o#_&{R44wv)Yf;!`agZMV}Wst|J*;={DgQudLLiKX`nccp3=hQzKeX#qc|e@Xbt6JG+^Sp`m=UXg}R z03U+N{MF_!LA+44pTXQ1s~~wR_0z#Y7}(lYYJsXutEtVk280SNEvU@9s_;8!oTy7( z6J|mgCu;4ewdOY1ljag@sLivZl?SXk9glCOz5|r(J(LIC`}q1fb#V*K8S5IJRJbIL zskjezA`3+>W}qb+nul9O$*u*~c3=uJw8yE-XSy1^YAa%+oeQX`7;1p5Z`h{oGlaXk z&3r9tw!c8&r0BT3nkTE;3u}*>xrWYGfQm#rDeEBo8l#@IY}#5$%)z|&+*@|<4G-DH zXOFRO47iI)=UYMe+w7ddY^xu{xZaQ(ZRD>e+Eov)vBwss+O!qLHg$QCJ^Egj-M1ux zmGo?^-C>k~J#{}j)w**yOon1C6Zi*3@HY=`Z4Elad}mlWEl zH}Wa#msQ)yU;lkE)VF*@uCVLxT4;fetrOQ%i0es|@2b`k@bW%T*ltldw71in z?Dx3O`h3vlw93a$T4RMI&v6axHlpl5RL|EVuEC)#$e?AOBU2DqB_l&i(coko6YHg? zYzGtsbVSU0b;$FQVx>j_5wMYPm?v;GZ!&-PGIa*47DH$fW)GN@Jr8Ww8 z?k0ZM%x&7ZTPuw#uSpepjY?HNpLx%(1i;BKwE){|J^-+{=}YI-{H|zLy}aIOzY|1LfP5zhgX-@bMN=$QC|NS~y3$4=valoDwR4a(7UUAUt;y z7B78Jo(u1uO)(y7!9%%YZJ(`zoZ(Eh;MIY5knTwl7bZB@gipV{i`MUj5dC@~IwZU{ zTln%>Xi*@1mx+0J)W>(b4t(sk8A#b)WUO$3TPNxjVh!cX!>~0!ors>NlhpLZc40bK zrBZNZ(27lqi?GbY^DOP)^Om)5j%AC1L{3|9_yrocBnYt)R)hzDP@qIwD)e#E{Yoob z3FZdC-pb5XfUDHvYjN4u`h|^FFY;Vl76#Trk=GOkGk}Ny9d)lNZylQzIH>~21KA`A zFzVVF6v$Xf{rwJu<#dd3C9J^Hs*;qWT(zX1S23~-2=XV01r|Sy5jP+ofJo4)>grs0 zdDZpBqzr!SBN-X0)dXoH)j8&1t!+it2p8YVuxd+Bv$Zle(ILA;J4N4-+sQeSB-gE=%;yb?r>KQ4$~i1XvCRv5hiM~7FO`b|!efmB);*_$Eq z4_G%U`i}Z+JK9>vxL1uG$GoS9^rusV|LIQtRXDg|<)D9;T;b6{#=VfC@i#4=2TT@%T)iqVyG3<9Lb0V>9od=5rCbtq=e9e0(ao9iL`gp`a)#$`$RKhyLaT%i6otG9#DRo{tvU2d~Vq@%N3htN!p88+_Iu zY{=P{neQwWdw;d>|KvWK^5lBE@CWS0hGcYRTfUoIY(MAQ6YbKgm)q#6@iy_bVtaN~ zgH1#__u$eLdw4~XjsGCSp8B}h=EAhk+1UtmLzdHDch-@QQ(cZ2AK77(526ZN*JLkz zh(*Dh-20hBcEbZ}?W((0*_HoXVVB?VCT8r*?8du3vRfzZv!|9+*h@QmZ0^<$n?y}M z15)3cxVwUS9YWrF20VW4j1W&y{nKf5&sE(|qMbf@TeCeyxj*5f5*v#{!Gp^a?H+3J z(W^4-fh7g>6iRLC;sX2Gb+3cg!GFSatZzyx`4VwBg>36-##I^9X<=qlqp38mkK`Y- z$kbLuZlBs64>Nr*Sm4J_kiR@`ad`}(wzgOfjjoXBE}kif08u;fYsX=Y=&U3M@v_$CJq=)Qdiw@;YTrETueNRhbZ+G9kW1VT-1q9Yl55s) zeNm80CR-c*u=%vZuzue}JsI#F(34fFJq2j2?_ zzbjnp-qH7m0I}-mG5mtW*%M0@Y_gxh?^@lhFp~7SlD~H72`cgqFtB*XLYDl#ZZ}>z z6^n=evH^o{viH_vk9_I_KJqtMyeS`X9TZTnIiu3rH3e@HhHGt4N^J$v6bvJ{96_1xY`X?rQMxkZw*5 z^L%LZJm~b?Ef2xOGtL#(58=RfF2lY~&>oh%mT_MIT>808r=44U8}&Ag^DNckLhm!f zzFB~GaD}eq>nuxWT6cx;np(V%Tvt_|5yJ2xMcBC&fa5ab%w`LF+}cqV55FF>X`-d_ z9%smO^Dul$UK}lwtawf`6JE6Qvp7kITu)`1H#zDVOQ+;WV|7#nfVkSc@YblmjHzYsHa{=gSD8sATT2U$cD)SI6x0x%y&)Zdwh1F!@X)i z-B*+QzSZV&sUnLL?Tf{qeHFY4?fC$0dVzLD8qP~t2+N4F61SiV8nv1wE5q5@4;+>9 z#9qnaxpqMbFQW`Qxlm3~rdvZVl&3D^k=Sf5zMx zgLU(**@*MwtSIJ93_ihcL3EfuW)bt)?D36aj`k1`ULL(zzXI9H<2;UHUbewGN8Vr> z_;pK-#>z8&HH0`@Pe^iFs}ih-d1|k{rkup3sn$+(w%|F@i+5OW50-UDwUvdJ(2EY> z1gXf$9?pBLl{Q2NoIvL(we*j*2TmbJCF8}b90LT43o1-W=j ze{5LAyMYz8(aLwu!jGBYH-Ea#d*DWU zcg7^!^V)o7>{0CR;k}P~-fFNK^lD?cYi-OE_QSfU+3e{PvcG0c``_$0Zr=OBDqFL7 zkv%nGuHF5QF?Q+CZ?$iaxB>&VYgp?FV4cN|!a;wrbAEQ6-9F_N+m%se<;U3pm3_jV zd3BHd;?ij@#s|ITp>_vg!!>v;M)C9P$~!jLL(iw!j3wnZ<=qmSxV+H32Uq0U@ChH5 zQ+Bu5OO(^Ix3=4)RRMbxsJwMfto{7%Rrd4C*-FoX`LOfu;T7mnk=MfO4seD=B>H-~ z!Kw^m$X^+Xdw!=^x*S zDe1@MHfCj^-S>8m-M1p$9(Xs?mENO}1bCBH7T5*9_~Wy@f-7k!TxAocu7%jytlZ;_9b^(V&UgDVdfUP>yQ)!erwlw+(9l$(sP!a7e8bbY zE|u4i%%=Ags(($8t@Ug{*CiM$!Vz5geQ@+ zPzp1SQNIHeb%eA88L-@Zt{wgDO7QwalW35Shet=Xx(S9W@&j8pXPjMf{*88C_@7t| z{SUk78+Tj!Mh1`ffY{aarh|33Bg2~n;0;la;uHtMxe2YESf%V{%y#EeDCxHdi@TTb za`rF8h@Ijs5KV)O^9n2yDGL-8}beKn~Z= zO`K#-bi(jLdRhha{xv#TMq%7b0pGpvG0XU5nMEy&u=CDQzIKiM{J)>Dc5tbbKe+&9fm-JC`)hGus1|p=OA*>o z6QN~dY%OLsIkZ+x3v2QntInDlpU_;jxa*CFh5R}~j!d4I^>A5fYmagNblMiEbq#6f zgX-Z0xHFwGUcJ*zsEJ_ra@SCm=iq#;#z^?UuTJv}J61faQ}D zEr$#zhiWL7Ph}Pp>zR~1Y5b&f?4@XCJ4c__91=rcHknzDQn~CXE@eew!Fz~H`B*vm z3Nh^~A|LRI56{8uK6)onnz%6A~0**Vpj zL{!l9u0pqi(r2#yvV-v3Mj;-6Z)-d>%RX52uKoO*Keh`7UTQx)_X@k|_gC7KyT{t= z&rGpZ3+C9CWzX5xcb>Pc%jeo=j@K{t?EM#?wWU)CwGTdN4`2V7-SWFT?9z+>iS;Y? z-{`mpxt(Ad4^okSo1INZ{fGZE!6v=9({`5!tndpnqM4PE3RZn?R?TIGr)}j&>303q z&)Eg%-zKoW&VK4Pra|EjJa4Rh?^ko}@_Sa>=sAftdU=W6zmhraWqup`dV&3mqWq#i z%(JtGJ!r$eMXV1~smh$qK#h^zz>kDyeW`%1)5!GMc(k4)pAqreT3{T!?OErIvd3SF zvK6~p@g+fAPal6GLb<81>rZTAu_smh0$1H@Bt1e$gEfsOKdVU_5#>WMxHLiO0#*Ja zRQcZM<=OV#``#&FFfPwVEl(#&z$tN6irxE8oQ+$2*uKed+<*a>+K(8({%CEA)iT4J z)$$d(^Ur{JxLJTVs=eJ3jvu$f6^+@#9r&AHj2^&+>yj;R5O3q=QSrA4~kfw)8reCoEo*Xm?M2)24ZA?7i*T7U#zd zvHF-DPBHu8rTEMOwcg@vJ5QU=J_eN-h+}+D8ed`+*_2E0V;Z@I;&V0cZPJGIqe`t!$x_7+I8a>9Iy??CD9siIm zdUB$zig?<#yuHBUS1+;jP52INqs)t3!C&^WRc~Lw`s+EY!Jf@v+jPYH2n}E!YBsCq zwH4~HOcaC$P=c9+Xnq)eOk(S45!A5NqX_@D;+-$xP0b$Es0ny3Ot7{?lP&uF^)~q* zG9ji!4!hH)zqH4S$vTsv5;LI)6QBv4-FshJL6WEUi<1-f{{NO+IK@GD$OFc$St7s4 z+kuXT9K#b^5bQcAzaYtgH~=%}Ya_=1Ile?_4_^O5rBHs+PZ$)0q<3Lz+Dly@>f3t- z5C)u#vEd;Dm=Iy0{34I^B7YOv#l}&V&!#118Tsq(vb?ppglP_*EJH~~4(x%aBqJCIM8SGx6F#LCN-4aY_pgI%AhB>;JDd<-Ou}Hb_Vck4%lY6o zD_(cEWs?77kq2dKN`U?(R*&!``3I(2o|-Z_9C+C}@r&ar)eJ?Uevub7g%`lPm=n#N z@(!ZZ*V8a>Cki1}k!iUto+4*FNbfl&wn1ZA?Vm3=M4)vs7s zCAzOb3b{93;j(1dhB7DUCJQ;+Px??6KOa6C-$|t@v7`@2a2@6e^hA0>Px-?odKtyM z3@ypZ2TKZgY5DxNfLj&Hr&v!2ub4cdl zwc)9`GXO}|AkVAEo}O(`#{{5#%l80MPlQ64%KBcV0D$?KoT8u6Ka*1+t|!R#GYBr1 zaKrHfl~uHzLPJlA5xjwJ>J$R=^+5mE1cIle2f-t@p8Cv&b%4U13<#b+jg@{EJ^Z=^ zE6&)$e~F!Z*r^Ai_%@Rs)Er!B^*TSa$N~rG1XR!~7*a@HA>CeX45My&>v70Qx8ANo zt4HF{0drE*)n>Kb?R@7U^1PbkJZl4~imw%xpiLQ7H}U~^5B*P+9LP0izFT42O~T+i zajMHsp62=!Y%#ed#DjFRfv1OV%1N39$LX=0KFYtj#cwTvG^;IPma{a97Ez=%V<+9j z4yc|?f>QJ%YAp=JqxnQ(CRus#MXTPz=V#N))=3G`MUbjQa?^5Tw#}XKfsH)pa@xWY z#{=?b31O+-85mFjhcPf?wJ#9 zqvpogeJ>^0sL6Zm$A5f@S5De9hy-HDKWzG(D0^vdn?1d$iWxp;`A7~z?Rw`-;|tl& zc$(x7QwA{=Y2IW803_RE+joQcCLCSyyoB8n2E14V}H`B;qXgp*aC>EKADET7f1duOak`<4Xw5?t~Edon7*q$87E!Nr>N%l01BAv32dZATy*bDYxp*80h>y!xR95cEK^m>v`CC z?x2zV9a(i2Rm7eXMga2KFiPg>(`Y5^%B-~L>@RG|>RhsvEA6}s@3Jkim9~%3yxpZu zcBqDrZ5-J`SR7sc#1{G#a2JVO;b#6u#C5bS+718+ny zRgR`MlBwPuukZ>;e9+)Dp&4u@5o+bUg=DCic7F@}wU`z$E*eAJ6wDl$2dqOcTegeu z_g-4dH0z2Fj&s_@%6+r!&8L^!uSfiWzZ+iVhmaAhEJz_aPwVQyP^a~4nFAf1zSa(z z1B3+gdXDdKBf4&APZz^=u^PTas~KgIlS{6UPayePzMv*!SPA)pTlNAb7796oM*ohN zP*dg1+FVEppN8J@u={t5z0d?ahJs3BeF^nR7SvsEorQ2^4f&Gm_s!<@TjnTZ2+!Lz zihcv>LVwy2Oc}gfa)$6+5{4YQ4Y_n1az2!G^o?{1XftR@Bjm*Os0I3%i1{+fA!p#C zQi!lzZjpz#bUws|+xz8GhIDQ;G;8JcrbS`dAN-45^!Hl!ma&$*Z5;B43G_yhMUpXS zYF~5wg&faU3gMM2RZxzKp^(}voD?49s(ca$uYi1Eh&B*w6R}&UK>wi_Qlf z^rt!J6CV8x8NmM`?7icosju}MFB%6^Pswi7?37!{ti8pEA+ zRzX8SZ5igGnEBMz5+KN*x~b3^iZ%urZ95gw&33E}ExWzgIbbtyE-~b%waMX|O z|Em=6&j*k`z}wZB@AiUfNx|KoD>_J3pzuI4gP(;6uJYjO7veSClPNNBJcGA^=D|== z`1L??#}D;(*5}%x?458lpIQ1wri8&B6z+Ua)q6UddPFvdM$9udP=b~te%zZY5M?iF@;$5LxWoKla>AsbiGLmS?* zhwpm>D&Qsy>OIJQb;VSYJotE(vz-r|R@OjbuH>80TuV;RpimmD=qd{ez0JD);%@uZ z?;o@q?;K`BCVXa}FWP0>_7zxmDcAWV27cgv(ND*%@FYoY@lVI>;_4H}tqS9#il2V8 zDm!k6i4^iExTICpS`m?)4|v&)huWtL6Yb$=!tCPT53n;r9|Ze}U?2^8fc+uF0wGi+ zx)T`qHDusA(ZjiYULrl8Y>z#+)LxtsZ&T-&*c*$hZ01S=v#`h}>opnC-&DkZlQ%Zn zgqS*;y}pT-zG{1<-vZvb-tGO?n`ZHm^KuaYHq#tfi68*y9EgPBL;$lKt)S>2RD0qV z#!+mL-tW~Vhpayx_D@q}c!ogWd2F|zo10+Xm*>S>&jIuH+4G;o*`WD5?X3;@wk(rb zXkhTXm`r0ZlZthVS#~nuM=lnzCq!n|gaV>iZz`*V@Y}d+(JGjof3fnNgQw;Kh z?WIznZort#GB=cMM^*ekK2`g(A z_3UEIICIy%$v2epzSE<+VU(`@qy(C*kE;FU#0Dy+l@J=_p+wE$>+FmC#CCi&!>+$U zWu=Sor|oM)rth{fVOa!FFW4o0F1L@uKcjn;8rteH1j#hmz!rE9!4UUMUPs|!$LqFx z`8W3Q(8eety^G|+@vC=c(IOuu8!qj;BE7y7II#3_uYkHrZ z0e^K)&~^5!9{;c#F233BzwSYs{$hVyHU|OmDoEj&&)`0$xo*Q!WH&Y2hFCp`Wi^7F zN z$dk^3Hy#FIKZ=jt<qC7@;06}sBK|!N;_w6M6a>;1!4E(UNEH}h2Y`8r0zvW=vVSoE;sjs^P!(jb zaTI~8KIrx?#3u$wXTY0R!{E+LXr4ghR&{dO_h#}Ed=x?yW`t?y zH|cy(ne60pXn>!{-Yz15n1RZMDhp~tC`_fNkCgXt&MMr5Hd!rx0adsI)z@M~D@XIj z0wiuF*4kRuH43O%RRyxvQ&oiy)|qC=aE}`HT7D!uP~MJJ><>1_-<3~AK#0u%AgT+2 z4t&&sM{Rb!vUmZ1koLmrK)n$4<*O~fkpuJ)b>T~*fXv{>PGcT_lfTZXr-38DaPJi6 zx9~#FZsE3OPS-~LqMfl6?LRc4^l!rbyuwP#vaH;<%F?!dZdtGaIon0ZPpCYjGS;TK#_gGK{3PBnxBwRtt@NKmYR>UJQu;* z!f#9LimR9*2Kb-jdD6}W@I%oEsBUrQ8T1QWJeXJcjy*6c!d{vcZ^OSlVB^0pvG-Rt z*}KadY}&#So3$K0e{_?*8Ch>K@)^0h)CR9DV$59ul0eD_q4T4g?JxJulM7QiQGH>Cs(!qDgpw_=|y zJN39yP!6zzT9x-g4d zy}&+seTZFu^+Wc{v;M+)#B@p4$rs|BXD#^RSMB_3r`nZ|%(YuzUSW3+iLnRAY_ms4 z?zH;`Z?N0@N7(g!7u#=d`_MwKoMu7iy@vGfSz=Oo7lKeBcUZUX|FW~YUu)-`d#l~~ z*E{XCCttIbAC2V-;Lf#Uk{x0-r=@{Hel2m3nhjhCFk2bA^R;!}ykEHdy$nR|RSYLm ziJ9{u1_b9oi)>o-y$ya?0kNn$Dkps>*nVQegt|6@Gu-)0VP~q*o$z&u=iAWPso^vu z#BNTna9UvC8WzM11RtPPAeXQ!JzAalT~Pt3L(71_f*|+0fLT1UNX()fHQ;7NWk$b7 z7(jRstn@jZ@Ib6U8hn7)x7KY2`on~-ZUK=28LMQ}^MYj%Bm@ElRS_gTRGg5$>`5S= zFabw-45I>pf(i&yA9@ufgs2rzoq&oGQod3NfGMv82~L^dNu7@ffpp*Nch3#515_05 zazzGu2mj4$R4n19#>Rj7Z#yGp!Gq@eMg~DtHNJnrl2#3Id`UWLuCNR~7f-;*0IdeW zQ?@qJD|l16R>5*OkljJR9RY_@oKkXhg;8~qqw^)m=Kq1S$bX)PWpANdBWEjnVhbom z(1V(}ftjk^NT%v}9ZuUuQGb0XBv4RfE5q86KqRQm(1sRC~e9Qxm6z!Kf988+d?M=07~%1q_|ShEw$f*B8ia z5&WyLHy5HAEwJ{cOlz)7 zvzFX6D~aD>w_f+6o!#vkyW*CYEQ!&rzS5uU5U`aGLg!(@T7>AWP=BMNC~7}$v`!= z``bew+2f<5?G^a=Ve^pff0beV=hJ$(AQ{WveRl5?U)it!G|GBj{+j*f+6nfzejnR& zVcTsyVE@LZ8XFpkupr`)Jr`48FK#NaY0GFYTv=wnI$uq3a1Os6Vw2~V*~G|doc|8v z;TKV4L8D;@!ercgfue-*7z9atFq~?^%L~yV&c#drvlM&kQ|bis(x3}c?b-QB_Qa=q zt^XHs_R7K}o3bL)KHgnx(fNuAxDu?-v1LtETH2XW)nrK^|6Ya>dbeZEno({hX8V7`g$)!J7TW&dP84hZ`VM{%gH{ z`J8DC%16TnxRkFnO9G+Tl#%xFQAMa_buNO z^sf`wSHU#Z*yPPMHgRK>y&hd-(_(6E#-<9Jw&5_}n^IgOv7A~^WKYc8Z@0Y|X}`bc zb360mF^FD>9~{5+m|qtg`deyw|N6_*_QBAhw*KRfp+D&SibM<*<@XXQ<`t@J;^GFP z1<>O3KgXLJDcVP}M>lq!riTOT22z9|jv(APgixUj@9S6kjUN1jV+Vd6j#8b>SYL27+n13rV*$sF+{ctvf|eON+}V# zDhxT`p<@|Blt3$y7P+88LJs_bX32-kOu<92XohqgfC4rGUX3dAbPXBKSi<@d&>;juh%_RIRCOOJg1`@m zqJjv9ATbG45YYX0aSe`Uz!dmSxCrjmo$5>UoAm2&l@>zwE_lR}=tE5W{v}IZraAH> zU|9$od;qZfB}0 zZG;XUF%J?ThN~sf5C1L10G`$p$Cx_I+UCLnkqY7UVh>~mNHD<=;wF_RRA1;O_W{Km ztuhsGql$I1*)En472zlcCvJ3NN`EXN2BI^dAeQLuh9tAoOv>KGOKl{jSEoZ`MW!9h zAfCVpFc*1()FIM@?%nbMK9BP)J&Dl;1v|I|CDw72a)C-Hq4n)(BwE#w03pD>hyWE1 zR5H*2w^mxm6iIkxl;~+DmS}-Cz>9%*-pr7=iTZjSZN_1NaaA|pj6N;sYP;nD%&-ocWf3(blG0}2Fq2FrI<4Xe^7-SIPxMlB z{3k2n<0?JLi=)FFxj1peHHB=P6!91V2m!_c6b3oRPg)5P1FCrQ@d2a~T<&cE*lI|7 z2u@TXSC88sf{>k!ZMLbZ-nP>azqjtB`O3{+|6rs2>SAQ~)OP&@05y$!6Tf@&q?jR+TeUNhPr zA0K0rS796&Q(@j$Hs)EV{QO?uTxWfsSlJ8iK_ckg21DS9;|NtAn8ns%A@T72 z`%!sFikQg9wUcw~(Y^BV@wk!BjCStSFRB8eM=@fJ@1MUcpkw1}+O5xCLX9{A2$eTt z+229AV^1BG2t*?L8cskfG+AVNF_B%P?aKbq?tb_~uF*|)_v7KVW#2K|l2?a~&@moU zi&Cy0+)>k_8tHn+@j*xXnr(AZi@iGKTLQcP*uXKL*@m4bY|@)M?Cc(_!Jgag?i;SK zwcmV-X&rLxs2Nta0uKv_gnIC>R*{6WtuDjW!c&F`Q0dyKR0B6t$5!X;<%j9cmA&7t zCEwYz|59b(UgUfKwHsesYGE7NY&xvd0Q9bBpM{96+dcO6tY_g7-?e%c>zZ{Vu`cq$ z|G#aM2hXspFSwQx*1uu5(7uNDv#bC4jy>|$J{$9Wtxb<=vezRTY%Hy*(z6bSu^I|v zHFRwOk`?B5^OYJ&nCcx9RcM}(+&Xq0jjiLOYOLq<=yrQOs?|n+TVYSlO18f}^^JAA zY8+IE!efyzD#AQ$eRzF;=<}q#@?bxkJ8d>N6a5Ke5Xdl#kQv}hJkENkZ}aqt9D(TJ z5SJ#OhD}_Ob$!4kZ;?vhg+c-+{d9eqW$OSQX9-$~_Q5LwgzFr^1Qeo2ce*&GfF=`2 zp2^m`5;Qps{FlePPPj#T-l`=w^QC9)T+bcWyE~N3IrrMTUu9bo$y027E&s+4UzJq9 z__8JN)r=!eaPE;#JLyI^=_}~i4ZrxIjEoywWj$f^1bR+l07OI&scVKo_XBg$eu!l# zDsY(%lxYA#=L8^LSV(RR9?G~d$oUnO;n>tMqXuhDo(npArae9cNiK;y`H&0=TB9!#Sk6VU{A&U@8!gEOX zfHlH@ELagrU|^7D5x{TUZIMpupuON^oQhMve87B!Au5Y_RUir3^;KWn^KC!dv8cZ# ztb~@~4P_##?F=CJAi`ZJA>aqx(TVC$v<|d}Wgw6Y^Wn8Y4A6Nme1}2~q7z+03?c|8 zeC&DBiRfIokWLig)g!|-Vh|PsnTd!9cZv+1M|-n%`vrPFAD3HAtgeTZIL9$7*eGVx z@aEh4I+nVO!9=o9m@vlhiWwft!5t;cXaAu{o`9kcFPupQY)PFhy`2`UH2ES26jZ#K!u zJ!!SImP&-N2eo?w)q@0b-+fA(0UGJq_oxfMp~W&G6(aXn*aHu~$7>SB3;0sS4LYZ< zUH;E7d)&JnkNjL4xbPq}K{m>NT!!YR*$d2>d+}@Bgy|D_<-3D6YH^8;U3S>|kJ@IJ zUjL^3@*<^cq>e$-y7|{u(E}I$ZG?@VlK_>FZ?EIKI-FE*{Dvw7klQ#;>+nPN!q^=) zY-7E>8eQ#L7KgLm4_;nsFE55J_%7F8SjdziTnC<8KqI?!Sp$*1WiIAPsn?B@WV;(VBcVa>+roGOhxu(Lv-+nhqc8OCWZ zNacJ7+=0E$+uT_&hb4y8`8?WF{{YNhsaKDwR`TL1DxGM3F{hr;z9D?=sA{$BVg^?NmftCZ3Tq1v%k;Z`ifmz6*0xC z0quZYRnhiA{ND_q7BI|eSmz2?AqtLq&z^a3ob?I$D<8~DcFn(6*!1<4SVfiMBtiK4 z%C`XZqjpaBeirxL5IpN=SQ8-FNPMv6s|7afA!5Ezd>4XI$AmoU;>Xu!C)&HKYHdnP z6EYDZ`H^c+AFSJ1N}__~#x&8WQfB9mqC7QbbZis_CZfgB*ild1SZ!}^ZE#cD zUw(U^{iW~c7IfhxuEI;5U%IC))N?b+-COMboA0!#v^>NvVm|N&y2ql!>7_(unGgPk ziq$9~Ayh+W0Zm5vNFfda!ED+dp{>H9h*)a+NZ?Jp<%w8mb zF5_Vkl|L0N1RYw-%3l&Q$+{Ip!kes{#C4twg0A_%LSMRng#GS}Kf8&D!QCFVF`qL7_i9MQV_O1f{E^C3Q^UG&KPq>KuYKdLBh`=?Iy8{E@ z10YN32C_h$M2L^GYE-%~ThN>imF7TSkHKF;r_x63fY$-LID*-_&0)7ruRc{BDNAQj z8yVsr=u5}|zq8Z;sh)&AemlIPWMB;H49a zkAu#~&=GJGmPW@cTxibtARVE@G<%3+X_yotFh_=kbGi<8ceozMAc41oalZ$GLr&e+ zOUPN+C%ellt(u0x5wOdb-zk8~*rZ-VXT69&=;DD?$Fe&WT*Dr>UIiEf41T|4|aE(69Kq~ImY}_%|hK;z|g$p zI$OIB-9(nztFMbnxY4ewWe=Eb4s`=X3GQAC3%-o;!+!@_2Tm z=|Y4DBA)Zf)r#Qd55UiADh_$w7`rHQ z`Sx~1oBiVNGthMW!~S;JiGE0u`5!B+9%{DvuFv`5dd*`J<7N0byKYt7Xoj^8tes}(e)v6N-DLirIL#w2Pd`3lN9{Grs3GT zaLH8vm8hX82LFx-T(A|hkPeqcjHakR*s5?V$_1ATHie@S_}Kd2^KT-P8|l-5rJ_G) z+_ZI;g0-Venxq(sZ&WB2P+H$bC{Q0j- ze`P_?ErYB#P}wI1ehxmqlck59e+E7tH-fZ)=->T*0wjGLv>^wEt@n2e1{8sTQa?mJ zgiI=>dQIV3*Odc%g{BTkd!#E1rnJA8+;`vN=WNdshQJd#h$$Ciek%X{NI>dQQkuz^ z-YXo0?gmZu1()z2Ng(N|bpPs}^lCVf|7r<7J&rl&aAq};^E%8F^3rg~=6~~DPAit3 z6X|Rh>IfC%Wq6PQa;6D2WfOofFjqZ*7|a&#qg`80~MglA=9UaTwI3 z552Yq!`Rw{Fqhq_Nj<15gNcpz~SU&?rXTLB1p!())%RaE3 zk9X$>)}tVGg&nI)pu?b+T6&YUwZV9|P|9voiVj9O5?hFO3J>4a>Ce<{+R+p0xBgb{ z>>P+VODoJc6@XUjEo!_OR{ZG6lTg^;;Z?%JTkN{~rddKh|6BYUiKpC6S}8Uu5SzyG zf3_PGbLlG!D`uQ6WLU77o>(%@J=Db*{a%{S6Jx5@ofLxK!M}RJ?s$2r&0JcG9bT2m>Sn^aN~bpWPC#z%8AGT0X#8Zo zBO(#Vjbcxkg`8(c<2XBxs#oi#|4y;(nPzWp&a}}h;(*lcHfG@t8@_Otjan3ElVn_*jg=0$iwLpQwEAV4W^Gu3FEnRiCl(#j#^flsmrre zSK1GAa-?&f@E(o(*5Tfm^m;pQ#g1Bw*wbu(ymkaH@m8DgexwsOZ7*#gwI^=jbBHA# zNvNYR%_uuH%txhGT69{qttHfmNv*I=z8YJfgmrylg>6mhuyJ7#=IxHbT*y5iyYaU-@S^Ut zvo3trMlVdog_yxT1SV5rYHZxc#TIn&2zuwQuxIZdiM18Oytd4?weKymhprX}aVu>N z_gRmtU$>#}7nnD)&89AwJ294s>kI7F7@xfooq^R6AMpEvw{z8fFme^P2mCRXMnoq= zV z^r(IO)=Rd22}V=skux`;G-t^vLTyyOrN15C`~oH7m#uE|AS~`CTMa$!-Wry`SpiA6{JQ-tn){j0I@Qkx_bdl0E6E|M;PJ{}ODo`a>$iGs%aYIRvo}WC zpMH0@^$u0)O{4%*KmF77mZHYSc)m97%b@SiN_|rpN<;c7-qbO)n;Aqoh^jfXZx?5PF1WnWVjF(zI^-tIOnmSy6y_HXD}-ipQm2&7TQof?@(O zZw3sm$44TVu@V+n2!>u=gXB8NTgJ*gL&X#tR}j{f5vIf9hNUm2XCM{q`k9>$U294Q zU76XF`ZZ4VlAR?3QZdT;+^kuD3aIo?8g`|C0$Bz%k>-smjq^!CV$TCx@C-HkAR}xVHKr&to$%@;FwBMg?6mA zfqwyMlg_9o$5VRO&w`$||+O>CtP0*1OC-A@%fVpD>*u}$-nzN#HOlct7Vx>|p z)}y84fE{FBZcYlbZ}TFpwldvL{#b?)EV6C6%CzD!7u-r+vK@R?3Dz;Y{|jF43#;4{ z`K!u$>7HiJ(9$jv`8bf*(s9f}J5HRWC%*-2Pehi0)!+U-#ga#cB|C ztcbncET>(yyxETbixpwFopjB+{qRpr)dIF+0lBzZoW*dY#Z}biM`qYnS3xbYO!%<^ ze)O){7{29L*oGFHu$*>j5NJ3wmCBOCS2LuH1!)`$l6MqNtJe&V!f7P}%QnnbM?heW z0hLtAniN&UZy3}y2VhkbD5UP8g*we%`#j4AeVlH8_$TGQGo&`=e+4%6KaVW3UtYjF z_591uJO2r0iWQrWuy=Fq4+z4T|5ey->+>2d>JZFl$x+)v+u06KNP|uG)F8434s;>J zQVPlgQ%&|(3S9h->h8Cc(GHhTDe2m%f7<0-r(u)7=^5lYJDz)!kU(vNaE(lbCrd? z62`=XxwiVtX?EF#SOJ9axNZ;G-yfPwU2%E4g$!TH+?$oPHjzr>h!uJEYSbYc8dK=E z;d80iMbf^FMfEmDb~{SS7-lna9bblZnKnEo8%8r1MO1;!iR`eci|O6_QagoQ*p)Lj8gRZ1T9X0LgbTRA?#dTT#>yD~BI01KM(MXw2U* z!%|m#Z!5xQ*aP?Uw?5}y37v~`PY{{w9|zb6Umu`!e%#d=6RMjaL8vd(oUpw(>NsR_ z1;$WmpEOOW2u#w11^KRLt{Gv;NQE;HKLzMW$VZX{VUnMA3t*B*nB*UIhTzHJQjb7t zm4(5Zva4+5(@L<^O)XG@m=qw9S9#L`B$rP)Fan?YaR+D=tl24POP=Bf!*#&OD@5|7 zFJ|&N$&@#35lxjpPp1OPY0@e{NxjskQYwVf8msbuBPfMV@yiCgw8{~br_kvWms53R zQ4XAZQjAM19_Ga2LSm;FXQm8#_;j_FafDZ+)49E~(_BI^;tc`0+jL=)ORtoj5r_b1 zKEgK?RKQs}8I@1+=1khM&da6WFFy`jHr!SU_AzcV^;@Q>5Cn>SEZl}IdIEVAW6~?L z+{lw^*`n7Mkx!LcV>5%xniyP$rC5Cn{@$&OJ^`Hk#;Qv%p}2qT1QJBo)(^FcV&bTm5Iyy7aS1uk!1LD%{0IHzP73B8fV7$EBDD?N)fv#jbIw8e^ zd#Lm$K~m<@eKdLIW;^FXs(BLSD!b|RlKr>;T1>@j>~)B~5ulUWcZY*T<2F>ATs;&< zd&dG$e;gi(wFhW5EV9r>uvm?vsW` zMN>dApAG)>kX`!dJXT9&K;56W&=A^`gF!G>(6>L_=@Jx)UAB>=>_lB7`|dq7^e8`) zEGJ;Yt?8L^{YnI564ap)4__Lb#3S}8wc)xYf>Vrrpp2{84{purqz4g6Iku;#E{iBa z_4aPas?a3{ZmzRRdc9-0z`Lly?Kq5( z23_|yes-Ze-d&1Trw9(1G!MSeKB5#Fbk^P03w*lfvi`Pr?IdI_czCm{%G=vpx+>gy zRVWMe^Zf^u|bg$Qz#WuQzvfX?| zwjCxlMissn>OQuF+#ANhpFatp!d((o1OXVD2k(~&|CPFyu_*{P0{A3&QUmb+8=+)B zn$4z5{L(}Cq^v1G`w5xSNtXh@UD^adJ_FL~YpRGRSk|HJz^jB@oY zkMbtx66T|g$>WQWOy(7k1=~81SzPBjq+uCsJn3vQ)a)d{3YKY_q|1ISGyf5CPH~CU zd!2YC-w***I=U&33Urxj^-+X(UM{Iq{%*!Opl->Jr~L;1@DiVlC)P3tEXGO-c9S~A z+u<@qAQhxeHF<|<_n~oVmB~bl0Lq^> z0TmRuj#@YAXxqqlBzc*sQjtd>BPg0BWWvr%7^T~VJ8jg&=CqSBd3F3O9q(0aU&ylH@5J?dC^ES_tc`1E%_1A%t;A4 zI_&H{C_<&|2uSLr8g4B61S)M|@Js<54@W&_47;o@Cy_w{?v(yPsqs2OTTqy&C@Yf+D| z?^Sfb1W9^dDRd>#Z=`~kj?g5@ICQ1)ypl8|LH9hzEEq~Yp)@wko%V|DkC>0ta41u! zhFKMJAgfnT$6<#&;gYOPtb`kf;Mp|A8bGzRZ+~sKpRc~q2kngC47R~v=c5a0wAYqr z*@X2aF0`1ssorkB;}ec~#O}M~Fx>5T+(7=mhwL-C5VHoQ$}QCME8zfRcRNFS>9qJm+pW2oW=G*)clkL76``cx|pn@d? z5BfXb$-C{`-@Ry4Kipx71;)2YUCsIgX-Fm*N~lG`gtAz2;y9ub2Vbs7HB`J~K8cm) zSgDwnL1j|H1%a2EN&u-mXmFgTzRvxh3uZoV9G3n z9|6DY|E*ee)u~QFm#nix1Y#L9mISP-GL}-YLjOUc^_ZQV{yi0|?;b|F>G#n-9lc~* zm4+9UTr31&$#jr7usVfgrwUl7P%Jqevkm2ZCa3JibWXLS56h4&h4%5a(kwi&wbj=ShWS@TXkAK99PbpR)d!gv4G}_T-G}9g0MDkVHh96QpKw3@SMD4AC zjoyLMF$a2c^ssIMy+AjH6M*h0El;&I3d8`SM7em`ng{`Xz;E;($|)-z6NHASg)h4vcMpLe*R zYyw>k-YF}~S=J%|JqK??fkMwjY9|v|0ll*#8DlVIWur}7(?a%j80BM{^_#cXp8Yb> zo@aQ}iwhEM@E1w;%G_id_jVEz!vQ?;t#;{U18m2^Be)WR=3ANH;Lnow(jox1@j0no zjSX+p4@;^?3Ge*3xoHZ!$j-bw5m9>8;1GZ>JwkWrVZDW2vE@yqXB4{VT#(6PR9d-h zN%_GR@IHfj-EX14ehfCR)l$H&eZ&>9^js*a*h$e)>zwGx@L0-=02$PxnlAR%cUXF( z*@DfvcJ7(|ct;Od-y80+?F-ieSg0>hoY$@$XLaJf3hDm4K(2EKHed@BF@y9g++JY* z(8WPiQ_g(Y9vL2GlVfO5Rdhi|$;dTS68SJDQX2ZhUljQ~U=Lh9!usAgiT&H{%+UMn z-;-i&+S*!#hfK+)3D!F-I*&|=563%xMHL_2vN}IVeWFy#J4PSY*j3yy3Ka8>AnW$J zY1bp857>2MqB#jv;iT1d_C`#by}9V9z4&IX-TLq{`{f_sfb-M0*zZ222&f}$@H%}&2_?0{4dLh(XH$~H zt&OP>2iI|2#22{seP%J=&9udzOt7~GjJ3h{K4rJ`>1V%p*oTRT9L~DmVrO3Zq&@lS zLR+`zn2|JFD%|*<>RK9IG0^5a5UbDJP2*Buk)P~y4hgP(;Sd5u##4~Jxt_gTd0-!4 zJ$B#|8~~q8z^7Ah2#=NRU^h~p*m$*2Kq)FBYl1OBMDp|xT zvO+w7(Q)zq5AilyXyw^UaMO*l%6!p!JFOa%c`aG+vFR=OsrA{=( zH_>!R?Md>&26_bkr}odv0$6v@*C7|wU7`8bPQvj9Vk-6_EE z7po*3oGt8mTPWnHM{hG|;cYkxC)xJnF*~<|7kS)H*qHIl`ER`5f_gq^AANn$cH&vH z56>E@0284TVj-yH`IZ0?9uHQCp?gOwq@SxxB=9~vrK;8r(g?6MzR|9@Uc&fJ!NHj? z*kdonAjm4Wx7JtNpp{uRb`uN8uyqBj9mKBQ$yABFQw0j6$aF3oN=!S1+efdX3yyZD zX|zI3SjtqPneo>Dja@e6trQzGC)=i?`kS<%z=nUFX|K*pwSh2PFVGeD%vXsF368hd zzsU3u2u?fp?-Ggo;!4eJxI zfgTGopj3#E$ZHCLICUWzeXjk`*1b2veucqfpKf*u0~WU82G~#QGn}$2Xot#yfE> zz%Hb5!UyxNZ!e>Nv>O(Y%B)5e4Ym^KH^PlnZ=6 z#xFTwPrtF<{@jI7^HF5YBz{Q7KQV{e-=3;6npvvIO^!oF^DWrL zKZ$pjJ}@z3H(UmvYIM=q4LOx*#Ef(iQlpT+kw5rsGh9FuPNxpqvGP z9!qJU{~fKmlc__oQ39gd42@kDg`mvUFJWu!?|t`nA%>@`>0KBRB)|w$TbU=2rnowg z%Tc@;M_t<6feCLa&F-|3-E|t*c1o$>?=Oq} z`U$60k6S#zlIgCKP+b|y$6CO{oO;|x2@ixA20{Rdjzv>ik{$&vWJKW{m=X07W&xD8 zGTDUqB3?phh>$R1fMsATm=1Jg_!AaK$DwXe-OOn^R3}2p4tzM_o%HDM`JWR;@04C% zwg-afhcW0`+2mUsfxPBn>>leEK~2@Q^b z23|peD;b3}K!G(e_!)TUvE0_~*P5S}YBU2G-iDtLw6&94wBTOTeyk1jIBs)kRPuDc zkvhZuHrX48ytvVJ=N_S~u4Rx40_7WZ`6!Cs>!NE&qIbmP^h%`7IDv+)B6M+!H)Pl^ zf5Z2cj$O&Od;VsmJwGGS=B#SB@$1Bs9fC6}MP)z@n!eZ(N+GoHcqh?7!-j}-1j~wd zD0hU6T!T7cUAgsrV~Yj-hH&#N%wo=d)Vv`*aGU(ag@f$(SBi~ zwk(e>O0oOrGop4umR&PwA?1o-(8IfEClk|YSs`)SirT`P=!if9MluMlXjf_xt~WI+ zR<}7M5r>H0t#fT~@^6+3I+sO%?W3DbD3OSx%9aBtyHkoSf?l;92ik4yo13@>H`^VL z&#*L>A(3wTIesTtu?MW!?PxYWDW^4z<&?ct08lC+#L&?2-PLq`H+R?<-(gVG11&L0 z()~A#B58Pw7V}OU1*b69I{_rfP&IP87`P;zQ@CMUEf7EXXQ~UDCIVG1)s<$0f1I` z?^uDoC{FMAb-927fO9%z2vEkLWkcIfJTQ7iEgL;{6w3eWq;Ztv?ue)ZkYBkr3NRnO zA>Afy%Cj*sSvGZDnZ3D*jAwCyJ@NJ~yYA_4?40Y#bk3#B9Hdr%wHrub0w=2kKvfiU zXTc%2V$=2ya<0GIFVFd>{qoFPtv4R7J)}uPA07hqoY755iY^J?OO6jZ>kd2j5C64W z9;S*jZL(6+c-T<~aMY^-CxxnIPCmsI7PQxp9((xHw{0AfZU?LJMc! z;!NMXa$s|~ksZlGm4Ri5CyhnT8GXonG$fY=OtS1i-}3+BhMV)+IkrWZ0bZyq@JB4)OK z^MED8Xz91)*vY7|oqzycb|AxW@bTrHr^83md{D-5G+G;Q*9fr@7LB8c< zYJIrB0Zcg51s$FYU1}kO6yLM_dy<(5y17kz`cwT=mkMSiM@S_POxrY`j;ZmqT`?2} zYmYGn%P}Xuz4Q&f0MZYsW~emE=YM6{a1^L(MQ&oGnNw!7Tpmv|Dd z@b#N3tXChEKJT)}pI&IYGVugUq_?QB&h{e-ORAxUA-)(O*#n@!_YlDQSsqqK*M!qc z%Wjf zv6>h z`_Iq_>;FxrJ^96c8#pi5u6uPUT$(@L4f`tA5H#C%icLGwLU>bn{r)5*ft<_V&Fiv` zPVE|>n5&OCBT%QLmS(`I2TsY`X6wSZUL$v5-cjiKK^G;~YY#}12yn*(+9J7j7bAEB zf}+xxM}~y$o3-Vro*zS6{3v5ZvHPx2ix`l@X?B24{$xrg1s3@Rie!}DgLJ0NE{$zq zS{g$uVrf3R@?Y2yvCf`%?!y-SPnbP2}1SMCCCkvdqE(m8py2(E7Z>TFvD@>mK|4173S8>PMTn z6a#p)i&Ok%6+XmCjFqR z?3Kt|du?qlRXa%?5tXdUN0C6w()tF3^UXGCd5sPK@PIuweuw@2@o((no5Sslivg$J zP(7N01BRm1e#9>HLzLj=Hhv^UgI#sM`Bt3uxc&OFSM8dA%&N0FR{ni!2hjb+xf}dbvPa1DIBkC1W6DY4V zaujcBM1LR(2ufdz!^ax@&K(l1d4c;^aaSr(l&)k3Aj;6A{4G?-Dg0SqKu7?ACY^ww z9;9)dwtn>SN!soZDO0c{FuEjgSTc#G10>3t>1w~l(=!{EEPF>dqrkAD#{pb+T!k4c ztSkp{!NHAIS-91zN@A_{@LsDvoNBc+6V+5@!ItG(T^-h3Fl9CM#m+*qwuuY}rmP;3 zfdENhq`6jjSh6}vrj2a56F_GA4W_^j*TEws0b=01g-P<1szRl3nBJI@n!{FBSHUpT zGOKDlY;_=B^U(%tWyn@j2LyBD5#qr{Y&N^sw=@8Vbhn}o*R$!#058t`KN#g_yi|`l zRfd`E>O7LRkp!_oHK{?iPQc|}*$+@=3IHKZG{c5$nql*NQ?T;|ZPwpECvCe$02G$rNjg zt#`craHxFXi6DF!og^2GqCavpnbJGh6TE?4;ml9-ZPfI5yK~4QyZpc5cJAf4b^TI> zVoV#HPX+_P&wAFbedq(5Ht&Fq`l7(DetbUhGOx+=ANvArTq^XLk`2dIrLoF*0&Sp0jB6;4dW&2s+^)OoRnh|nL-c;iUYeb3 zUL+keK>jhy(Ltlq7`QIq1|yN42{|?$HmlEXXwPS15504Yjar(6R;|uPAgi8?rPCBl zoctu{Bzlm^clhXrtZ4LqYM;46%Sa*9FeKP6w+$a9j2anLXqS(I#2XHSHjM7Dp`=Ey zfG|T=)jR#0j#rEHXbNcKS5%`iD2Kp98-T0D%*|-qP$bOUSZr@a=L3s{_R1HjOizoo z`$xste_vW+j|^OH&r%zCa=?6hdBi+>b=*Q5Hhr;8ekaP_`!2~A@z~w_nk@%&S0Adv zRMH>s78LrSF))`Aj3$XiXu7MBx?x+b?QE%LEGdc_4%o@msvSIvK!p#;O)gjV>>y~D zgCIAfq96tfY>m$LYLBKLlm_d@BBYaEPVAbeh`|-^fP5XLIaVRcgM3h*Qn9HoGZ&`q zfC@7Qq1rr$XskRCL+G9lCFeQB=Ad}FJbIjib69$_(E|j2dvn(e!Uda6?kXm6t$N9_ zCAQ95K`xQG;w4Hi$|aVOUikY~mp+Zex*ydS&AIH?r3Uc&79+QoTXniqw$TX`k^yk} zNS}P)J=9g35pH2U4cV54=Gs563g`+?`I#nQfyP~uL8UIZgJ%ZLLQ>}5$7JpMZT~{N zQWrgA@k^Ot!8;;T87&%&jWd?iu!z%4m)x{$e>H{MAeD1bEO`Sk25*ZoKEW$-hkIo zn<A<7yomUd>evwsCK#z6w>vsYj4B~qQNS_ z&f>Zf%coJdkf$waF0#XIrPwKz;TcWSZaete1_V-(63(h3)zl7~h-j{bVHQ+zcug{R z_J|`?`N^?VnQnn>0- zw8M{neqReEYtEkPe{j&%mgczHlC%ci_8(8O`RR!DBrjzeL^IdZtp9*87QcU5kFy@I zc}ucwYa+JJ`|2?JtGA7r6k2gD*oSqI+-1G{0Fsada-2lg29;TM0*lkcMI!kd8i zAG}$+r8b|mxnCc$GtME60*4eZpa0J{Y}$8+?e+CFP*sQRm6eC=H8{dRpX_jOQykI+ zs4R6Qxu`!}aebI1c-_>v;+k0a!#jx-r}s2!=5I#T+Uqj&jbXWF`5f?hn%)2MN;~(8 zF+3}UiSA;R9<>J_S!i=Ut+c=1@*aQRVLg8Ngst9Jfrl;&o$JbS7^iCgEWHD=FD|LS zUL-u~L_jikmp64LV@SRg54bGNpT5cTFkE9Dyl(Q7|6pkw91AIobA_coRz|rr2$G)$%tI9Y=g%D`&rI zXL%l=3H2U3@9v2<6K?kPHFP_Jc}k8ZE`z;`B0?eIngVo5@ECjr5lQHS_VOqD%^Qt2 zVL7Hq*kyXh>SGdth?>8cJ$<4h5jv2cm6;zmMH_lYaUz$qg^%XAFg@beBN0Lb>>@^j zn`5J};o`UvQdf5N)~b2U|5ZU_x182q(#)|ip5xaRaXXe?1XUAhD3}&gN6T)#eYm~K zfMOyL)QZgK@TN8K-;hQi7o1#wlJE16SXlmGDfFn}olX23M>%x|vi)6r5q3*#%5NEC z?&h1mi=ap~!JXW{M;ARH^zRIfKvLlH2=Wtf(6NQH1d?6>p+_iL95n_}c?{Y;9U&2) zw*a*CYO2H8*(m4o7(5UVkL7?70?RysB}v`^*4RTVuLnsZ^5p85FGIhBQ6m||$+Db> z@k0;6WEQ?jg3Qb{*jB6_h!xi$eqLt(B>)AqJRK;7mP>^i{v6MbmKmU>540q`dy)+( zNiphi@Dg;C*MnD3>G3Vnn8ycbiUlOWM|2C~76p{E{8kU3Vy9+~J#X5VxBIctlk^2y z;oJwg>6>TGleA)x^KGQ1$RQ(_NG3&y)=o#p9;xJdX*3OG@RQEIQaz=7lD|m?=gmb0 z>5-DdF9oL*MU848ph(pU;1d9*;qsUYz3NS0@hmjy3IYShSEN#kOJkfx+Dcl59aNGZ z3QF~`V5Nf@0H&mQlIW58L1?Nx7UVR1u3yUSY4#RsK72RW(M(SL4tK(f!1QiNV;ZZ( zjdl}w>Sp)a^?6>bMrcJ!np`1A=nPq`Z^l}28~I_}yUt*uDE(_1qZkvNvyvP!hG~$S ztfFA2)s)0BG8+5laz+kSCRtr|3OYU2!46nW?IEYCr~yK2o4~SWCKeL;)wb2)UR*B( z1-Bfa*0(hRqeqn53Cgt5qy$ern>w)49o0?aBpYEnHCocEe&Fuft0NJtp-H&Bt;~uW z;pGY%axJ91@sL$E7r>ep!=BQy1$)}i!V1vP%Gloec0?T=HT(sJhBPvkxrxaMs;)T% zMaAdDbkhC>OV}YKl~P064OcFkDGYRI*r^f(M|G1co(23B+wF59{(J5YA+3W*{4*p4 zArJK)MQ`Cn18C>9qQPi6K^S4=&ur-ywuRqQr~*91_dGrD3)_>1x$S3t zzP1u)T2|e$(bYC{ZIex3T4n!y0HeC#N0DClMb`DAz5L<^yZEAUyoj6df_}>t&tngt zR>cwv}`Om#--_imPBJ=NyI8jDV?VZ3prZBA*iwXv0U=0*Ru#|M94X#ji@ zDR3NqA&K=uN*=%)0ipMh2w`F%f|Sr^54E4rfG72SibOaz*{w{wR-%2yZ?3S+^Du#gYp%NS*Nf+((m?mb+ls-f#^_&?qS zy^NfamJ~%pv5IB%k$cnx=K><_xG2Wu?EVWHr^C8F_SM>pRT3C3y3*T~CI)MuascwQ z?>!hrs&@dXp7KL)9v~R3)}~zQHB#)kQ3R5YcMd!R`VInp2Xu&_Pws)8eu1o|A(;#_ z(yT*Ko9P$@`Xm=;?RO&x9JA+5T}g(RLf2EWT5{9K5Iw@YbP_~wI*qu&8EkxX;HiO)2vqVv?Z* z9OPf$@zkqm7G{C}->F1?uybm0m`q>~Fc-juC=GO$f1rd?Fd>C2hshWNqH1M#|pTH2~Gk3b&MOjWOiVM&eX+BMd<6Yzn_vvCV;nMN4532Qh6CgH$-BW{BwrQUQ%IG$>*j7QiM*> z1IS#m&}%FhsBwS8NCSs+>qPo&CM_p-SWsfOJUSOJLptE0FY(+L`3*gK&Yc$iSt6!J zCoNv7t6weXP>fgTtjFCVHp`!sNd_VjUwFKPBk|x(0HSCM&~g@-{VU)J{C)Z=$RivU zV$a)&GG}UUFHGmw;(9I*_>@v<8&haE&i=t3dU>{8bI&j?RoO`k-q)atkE%f$2oykC z=a%jlw)66OYdPLq2SHlcVan?!h9y#nyx-10`*Iuh(qwB`@3r#PXbV{!OSeq4Z{PjW zuIzI;*ZB#%^6Iy7JFawse?QQSS%qDvQn?{u(*$+sO5Zs{xtmjZj&q3_X@f&q(9D$PjhcKFe@D>$lJ_>-OXd2B9ER;G6OgNR`j8E4v;3~ia7K; znzO?A+dUPWr;8&)dLUVvtNnP=Sl?9N@urXoumJ&*$pw;FCB4b4hrt0n5FDf}X1PoU z279+ zIAds@v()eVTgqw{bb*_Xw-)Xv2bBV;zU91qm=J>pEVWl3KN$=_a9kbas#aHM($3T; z8&JrKRE`1y1_ywlEA>g?t$NbHfKFK|}6EfxIo14>65*n#L?B zWjX2F-?E&zx9w2UXI7j(--^;PVa-}*#SRFft>n-~D=PpHinlZ6ZYMI0Jq%fmXWHF< zq#DV{G5^ z$8T+`L`A`zl$KUPvNn$Pw6&Dr(4Z4E6j?}19bWY{$kJ;`sH$_Vx|${^ig4cAN(M|c zR^(Vq^#QOz;&u5_;PODa74XGvAW3Q@M^akVEICKh(N-*lw9J!^kh&0@$`RKSzytb? zj#y~GJ669197={x|1E`}?sH}n-~cBGJmh`tctne8$KB_Sa*2_f&+DusNP_r>RSPl5 z;97-Y3|&stae~(*c)(Ymb(C_Rg;tXeH8b~R^oVGd7gfM-v4JBN+a}}(8!{xRhHb%v z$GbL((HD`aN634;%3}sCk!J0IBO@$5o_J9rfAl-(4 zoN4D@ibEa7dO`HsN~e7LW791W+lvI!46!`{EqRB=W$|`}39}p=X!(6dm_Thxq#GZZ zO7$M`e(@~Eok6c7_5u(Pu7$s+(wJTJOGeT+yDp^)JJ%Y7X!J=h++)AH{u$emgJ7_f zia+O!r6$(p6zb-~$GPSsp_0<7-YUarsz!1-3oRDy3s|s2e~YifDp!i_d zCR2?H{O;uJIR0k{5UONCC@>MOZ5sWo(NM%O#e9}r6HT%a066;7>GJntHh2mIyk$xV zx{5^p{6M_e*-8R(BGENOQX9h5FW`Kd?Jxkz7P758>^AeZkQ#smIJlzMR!2{utyI4c zNVlz|z}a7?F%|?Uz%@=ylWJwjf({ZJg!JrX3l2a*Dq*jHz?(uG>`5jdPExF#qD=;w z0lK;_C}1jCAQ=dNfM_uJAUGfK;J_U8fCB<5yL&hnOFzTOWQGtx0*~(SPcfZKht<9> zaU}olX-i^)Y1%Tv__a`2P(cm{T#<-bAK-v<(UHd~)5lo<$wXC~k-vcp&9Oni=|J39 zCRva=XR{&(a}wTfh)*iJm7JbsJ%y}COMeP)jphF-R%$RHeQ94%3mgbmj*tc;CJADO zurZwng`{$oR9+G#rc(x3F_(P=sUYRg6tp)>Im0Zs=ad)jUYDw5(tC7C2EGlx^{S@{oET+J_t>`3oz__|gh|ORPA1IbJ{!R(vqZ4(D&Qio(rq zIC_2QE~_hzv&Qmx2Lg@IUiH-(#N}DmSfA&Bpt&jET412s0E2cSd2f4b3B9JRrFI0S z%6p{!u=Q%A#M4fRM+hOPXw}-^Tx@MEMNH8u#0gxZR1YwTliwgfbCsri=kc6q11o$q zilWW%)R(7QVRqAW+r@!ny6yQ1EQ%N#tUApk>8R_ zNR>geEGv_M027EKI3|D#0*JuM9!L(fN*_6S3_A#acdLjk-RF8!S?1gAL!}39&$YR_ zhF8~ggr#2Rs_$=?>NwddVW3&hwjWQp>0}HZv!)X*2;MvF2wK1Gu?=?7?F+SEtunRCbeXPHV)zwAHrn{n7q@=R_7J zm4+U(-ZzZ58Au(b6OO*YqBd#;t2y>QZYqP5b-DPzkLV2fm<8ly!&vP{A}Jn-T+4`#Nvw}>(_t=+o``h7kd|Qv((PkvhRvM zY`E%sE9H<{ha$0o_@8!M4bh+@6b$f}eRR0Pi>{d8(-pzT5b%e_Xwn8HhqZB)_Tuk>f4A%yE=bU5i7-V8 z0z)xCPCLEFUkyQQsB5#s1^kW+IxJ~`U&t;HaIBDgZh~{z$j3F4ADLZyb1`=9nT;$e zhiQemTJ*P0=7*Yyk^p$2JZSMee#;6+^%3oB`OneP?;n34U$SiM%R;kRg|b+VatT+n z*ABEmSB{T}HbYC9sD9Rc{{olJ;-AL4pUzJjp|I*7s)M*Bz$=x2$Hzu9pIrIFaY3Ph z1VC%QU*Cpr0F01Ucdhd3`_< z)_N2g$OBXgaMnM(&rX>Dd6Kgfa4u^(B8hTI1A^s=qY{KF5b27vl?t3HgShUbfI%H2 zHC~1)Lg|+V2^Po!QUQV#(w#I`|5SA3-ZZtU{vX2LJFw3BO7r)%tT>M25aK0eGMOYh zncvP#c6K&1lSv~Dl914efdDB$NN5I3$8=tal1?bLaW}@j_a+y0>GrPPtJSLu26KL& z=X-r+lg-Zlp{w^+-KO)L^PJ~ACoJ|WBzHRL{35PapfZ@6VT@3y^A5&0qbHbPjj&}^ ztrZ7pUyyUbB>D2>WjqYHVv>&Xbd!7)CJs29)dBaomA85OZT6`MFF>Fc=H;s!6y@WM z?_-wq(Bmwqc*@eHOc#g#WObo8Ad9ftj=yCM$<@>dQp;^)iRB*auHT1h?jRkJBh(3~ z=Gw}fb3soh9T9{D{m8jJ6$!qf0oGg6p74eS8*J(j^};X^F+}JeB=iru%kf9qppstoulzSDN_v_lQP3!4Ex7STi z2I6R-r_TEO0RId<|i6GSK9!=moAjj|JZ5aLR| zN2mk_p@il<@taJZPA2`;Z~xYIA2i!t)oxp&4Yn!LkimhS0U&E@w9_^ce%A)tZC#Lc z27v+Q@Q3WOt6%03G(}<1HD-(7p<4xX83*(ma>qieW;4g*Tf7J(+K-$FIxj?|n<>R)$ ziN<&*=*rvVq=Mzb(L&r}kV2@T!r8w-0Ix#`;F5o#f=>w0K-%wVR^KP$M~Od?OODXs zK$R?Rl=FMS0k7%+XRAp6N&O$R^RoScEDNOHX;^i6dWj+z^(+oLO)6YPPFzP&sUaP% z0|#or0k4XaoHQMA&1a_Q3#9q&CD%{_q)2*`a3iRjX$hzuptgW`pvX!h{EJXU-o z-%9{NIFsd!UP=fRRDb2`C{N$*8JrEvyKDcf$b&qOH{E&XZL}T00t$p-3WV%ph|%M?=tx>77adkYjL`yDnE)ENp&iHb z`-BND-GID=Ods@W?pTV?y=!}wXEosKrc{WQ@PAEYZjU>jIIzatJ8 zBpe90+u`UjyWf+S0W420(-K&M-k+DS=k^S{KBxu=HC%WX3lby@%Ob#;E`Tpv1$Yl` zXteY0*@C}5FmUyYtCnn|y&f>i=Qa-1Lf(iCcLK?g#@=_Yf)X zs{ve`I*SA@u;&&Nh85-uSyGtUo(FS9I-V~lxxC^&T1G|eH^h#vPwp_8?x{AO9`5Y3 zgB{&?UU$&@z%Z@rsCytipk|vgVlA;na&vQoKDi=(gck)h!?q>Z&JG|}Bp@sBb_IGZ zcL%UpR0pBLttz0DN|0D(t$FHky>FU1E29Ut^XR*#|#zt=;~|ls)xUuidjFZF6?lptY*U zl(hi?SeHFYr}_aIv{Dmjp6V{@F41q!uvG{7y7X-E@Vsh<4?GB(sBXA-eX~8jrNQO} zPGS#^LP8yPfrd|&lY`+SKnWcfyv5#MHF)o@8m5UWs@)Fh!;dH<(L_lABf;+!s;MkZ z0knyNZN<$xcX*`B~RV0#W03=TUGR1k5fgI|`rX;*Up6sR2Q2Aj4oqJMx>Ei1r8)$bIg(2%PV!18+=1Eo0;Wv z+CEVFh7`t^(@uKpCnz-Eg3en1OZE_G_ELUh8B>EyW#p`wT{A%tLMH{eRMjr}22f;q z8F~hkoE(QWO7IikOxTVwpPDPEP|=W7bSKhh2U9_b>jV|E=qKUYr33E{;)b zt{eAaD9WE~*lkVqyR3n(M`Qh7ehyl*q|!}vJX&dicZ6-AGlEf)lgu$PQMoJLYm3%Z*_4j~6qA_<|G+6I z7?44&fP5|3acZa66@oIWJ0F0sm~lV!(B125?Xty{b}7DOSI+m_wM(LQ`{RX7(A>!L z_}_NR-Aj!%Hn8rJK1^_jS$%`r&~%Ww zSP(j8hgy-=Y9iQA@#QjqP9}jR^i} zf`2sy!&v}O%}~o+ov((YYS<))1UYHtjQ~L!Z;{kqs*f}{FjHXgek{;yR0(Bi^j#H-jf}vUe}F_GcIYti1^+Ai|N?$5$dK zLR1u^if|PKCuiVbl90d?6gYpEDJmZ#OMd_mTw>9s44mNbauy6Yy4YS(QIV(ZGjHnX z!yzV7bf8PJzblqrVgBV;SveI&CF)*36-9Kb^f!#*P*LEqg7c`>sJYEFuCp*DMHP{R zJQF0OcTz!+v14un`Y9Caz{O;rx+pPK5K$_qoUAEloKPO4cydgUPZdH)vf+^EGEIb{ zpSqmh0_Yb)J{6>B3aN1tT!A545O~n7#WblQA!1712S?2LqVz3<4=)KH@JgUW(2*|& z6o`cStvcJeQEs6QM|2aF$Y$=51qD?apN-?_rmjc~;gl>#qx6SjxD_NQC-k*Q6ggY#Rh8Kaw~>W#?Bt2fw;`l>B#WZi1@wStD-*2y0}N@>vpBK5UFHg#a6 z)*XkMqBlVm(bL?^9Kc|hzxVK3{* znG590Kn-h6MSFZ_Fv&S-A0Gif*aU8iR&K_d-*lj zLB8>fRdSoVS610oZ5VGqR$Lywic9Hd}Tk#(@*V|<@BCL{dFEwZ;+!J6k zMlcgW{%p9Pq01bjqoRRw;85pL7x@+S_qMd!-d36)ElvD1+V18C+u2fQyILs~cePR~ z?rLtf-7PKLs>AlRby@*o|6o@yp`Vd&x(Ya26Y>=HC)AT?8Kuc$ll1q`v=$)z4%d%? zjWpGF^3F}&9YXZV_{!E`n-x?KlK7*Vr4W#nkJB(|hBJ3!Ei4AUW$kQl2k!#irzt<^ zFP~R|{&N?PvyU$Q!N`DJ_`N^!5q#7B<#YdTE9b4V$M5(Ji*DGrl6$eux@#?iiQUMO z8z{P}F@LMo91d-?$Jdc&xRD)wLQa+J;NWaA;Dkf2ZLA5`xs(+1!-W1eHOSxQnQL_| z(-b^=IhuNIL#tlPUzP%Adk3llay2NS=pW~|OZ|!dF3da1s73+5Ug5uvhGOkLz(7}i zpz7emF8n76{Rw##5(pIsC#0qyllDFZ{Zz-D^(av~(qY2Cf5YuoxgL*deuo&Yh)^7e zpotSw6I>tL1of`8d(F)jWJW!VpFL9*&`IhcN8KO=;ccRQtRX`;Y)AwYeUv8vn4}hh zC-31LSwKce?xRaGHjrMF$wF5S`~?C~6I^7|R0k;f2j_p=!qf-lORwT-u$X!^J6t#1 zW?_mNr!m#aXJY*v$RDVb%+R4*MJ58tS53@M!`SDGBAS$Bw2*eeFR2W46vG5_s@NSd zJzB7)>B{U5n+bYM3)OHeBk5Ock23%7$>=gC#EaBL!R6EhM0_v&<~4x985&6;KT5-y zWjVZMSvo0CF@I8AF+XGYOaYSTHhyb$L4HP?#1rwHUP))&T{Gv_G0LCiq=W`>#{PK? zlm~I(TU=O-&rr4qVM>H3q@g5L+M1T!PdY%7kRo-cDxm9di1EdumvFKC1LprPTYWjE zG5-115L`?rVhLr#o0!PZg@~@fGkKjgCpSYtZNcSo2jh)2s*$hCR7NxWM`=`hY7KaD zEcH$gvf~x$|@{d6#<(@e4o{f*c z!`S3FR%B*N)*Q5t{q4WWOyhetW5&$u?7E*WwUyhFRvbgrA4Sm5*5gCrx9yh?E+Za^ zDk6k`@>YA|wFaBJn}IMTptDKw^R*GiRRNg}fwIsUvn3XiXb95b&Ls)E9?Qv_76t6u z*8=v7r78RRC9eVqm)n#Nf7|9Si(3LvPz{h7*>l5yXIcc~Y7tOyC=O54k*Jz1W1;A+ zW`U?3NBwm5IDqgDcA~62z)3+@7eC#0up2T*kw5oP=OAGYZi(1jj9#*Ywt?IIroS*n zkF1q6`b&jww2UWJL`uxkQjT;R$5!QJr9!%ch9KOfzQU$sww-ll-i}}w_<&{q4x~q0 zX}=t*l>-d+h;THl?6u)E<6$BXZsjw{@TtpOTWsx836E{pFoj z5*xBxW^d%^tJ;?=}WysN5O}J zF4&{YC<1Q@Jq8*LTA#xDNlx5RBS*eEw53`dSCg^;8|NT@;(K1|J42%6azCm&#lFR^c~^O8!kq%$uL23ikTs<%k>CIiLEs?{sjg`Q2&1diX3oHa_x|Ew zs#v1P5{iQ}@DQOm5K$Ci=KLIlVAPHp0lkq}qh&gB&@ufl3x)6k?nd#T_CtgxQn?PO zKzbD3frqbG|opi;*CkqB~BDi5Wgk5jX|18Y2|wDx!N@&B+;88)DVuy$;@GiCoJ)W z0FrP9NN~b%wZj=OaU0fTSmTR;CNW^aQvu=2?z{1{?%J8H<>{h4HNvSgZsg^v;s{ZC zJPDp^GKdGp?Ga6{f#x1{n47sp`t2Y1z%pL`dGkkRItHi)*M>S&zsgB zTa6-igLTsFZm(v1zIG>E5+LKrx@_vvx}DZtyTiI_wlO`ygnfFWwWl^%TVfr|)*Ajp zVk@DY;>)Zhy2SF@XqkMZJ+c_FEmIf3N;9^a8Y^r~bAR^Qbk!fQ9tT}aUC`K2<)Q|9 zPcL-SK%J1J#Xg|zYr~_OdFaFR1%)eWCatp3TFpGo?PXdNDk50=$^JAUhZ{w3<%Gi( z*M?xj+S}-v-T^|`YU9&wwYmEF5ef{q(hMCck!$?aDE;aaVw{-Q^Nx?aYZvqn4cl>w z5!5xd^RVB(@Xxmpu>PH&OZfS&ee%;c*%h>&UtLmZWzl!+jn#Gb!3!h_y^fzB+cozT z*dNv&w>xl1|JBwsK9&p|Ad&Y3Gfs?@8LgYBM9$by5w*^{W8+b~3zwHCkks5YFJd>( zudrJdRN4*m!uIn;3H#JPXvxQq>~B7Iz3o48%)(^h73>=;BlDH|CqIKZoO99KbtI-K z?#n7IJEbNyYB73Bg*-PVcLswHB@F=;lqp^@m4&Z_;^C}4vdohq+D`y3z=(FiOw|MH zKo4H1bu7sBg*2K(*Mpx08|E3#z|It@S;a)ThDGa1NIGzBXRwpzHhSM3^!Rs#+O3ea zpXH2GyGF%CF#;F$3E5DWfos}ucA#q1az1mRJ^ZK5Rxw0X$P+56MMoN>$s-pbs4d&2~RENxoLd z#X&qNu6h;iQtxD;gOp@NQRDO5%|;ktyGGOrARC%2puq;exn z5A9zmf;0h9Nvp!EK-`m~F$Sk!U3oRLXyo9kK+f_{nern_4Kjf$MRwwb1=cX@_K?kp z@0D|W23`a+32f%Ht3-NN)hH>LDalI3K8bkB#$Sqqn+eIh%t;Xa)_7i7ARbFwd^wIU443387RZ(SB^ zT<-&YREDj3L0|(++ytOd_e~0~0!t*a%?UGK9>T9PM3ECz&pgD*)F{*DvGp0jSqP;; zWHloos~E-O&QTtPZPqv1jBEuH-yl2bTTv?i+9I0}&QiNX`S`PvuL$E7T8owxZON1* z+YcVL^K1Ch)E#)#8t~w6DtyKo3iGYGMMoZxP1}tT`|b zxbeTr{rs=ljHUp_W?a=AS!t~?)V%Ta)=u5hQN7E$>lk2%Iy=e$dq=w;x{RI*{gmFm zG}GotXLI`pT4`wrWqR3+*@t!(FUoO3p0=svXy`%x3N^b`ytq*}U)Fg!)2mA&_pX?#T1ber1HAaG$n5kK#MVmFQ3lk<-vNZi*<$96 zkH2T1c>CCC8^>1ZIIWU#o=-o^X+}=JYq7c$cK5@t*m>v4w+k%@Sd=3PPws{G`7iv` zzVJWhU~DDn&X4VL|M;wH!g}k5?3bHTcF!J-G@y5)+{r+Y%cLE*u5u?^_y9q7F-d$6 zh0nuiXm5Tk2>b-?=dV}V>}Az<>C=1gCcK_M@dLZ)if1g<3=>9ND`x?rGHX##e+`1p z7?-%_EQz>JGudigyZ%H5B~-}xgf`mAmLb!GI5|b!UetauXG&x$T?Q(EJedc`LR(;n zjnLdtwTyndVPp5e=j*Jlt{mWjD04)KsXo%a%Uua=(4wQdgSL=~IEq1}>D zAacbwqB~7hRiKHEtOeRbz(5OlhS}GLv#nl$iS63uQ{gG^YBqO&XT(D$} zdrM=Bwp8E*MaEb*y%x$IO;;pgOt7%H-KJ%YB(pYDaT>)jVpJ9BeVUM*Ceo*5!xbZ( zeWc>eYb~(qCvfn;Vqou1qT!8Jz9J*45*HL9mk*QEM_jtExSUzbl@V64VRDLAOv-FT z4)_yRBLW>qi6O1x$ck2Mk@?@a%qo|nYl4|8Uww=DsdECbcWQ=6 zV;bRijF+r=G%w66o)%#(ajbx$1Xe&sG;+r>pD^s0wsl2t0FhO3n4Y-v2LXU6FI3IM zR7$vdBCHo4j(B9E9RSL-=hysLWz99bHje1b{MhNZJh5-S z_idlX;*%y7I2A(z9j85?SzN7REk`_D0{%=d-Kl&vQ*&OJ3?s(J8G}3%SjPcw4Xwwi zbyYv7&wTx=3ZArToR_N)vf-J+r}oJ6xG=xK7p(YsTooySwD-BD42rE1iml=`YxK{f z^jT;vfJ##YZC7|9ej++)3ci7WPz+op7$d;?e3R}_{wmzu%NRTVk(T~%7$Etr)$&v4 z|DDys+0}FF2EXd4mB0|SRAMy{w25K~>Wu#SQF`y~@N-=Zl5}*k=d6cfr@Iy(l{)(C z08n4M4G(lNMAE}R$N+;OXtIV!?HEgyN5{vQD<_1>vt+UiyfS8AjNOf)(E?@M3CXzH z=&p;d%EmX$xe*Rz(yN-wE}YsO_%NAUKlpkHw$>uEtFzBR-ei-txljLjx99L9~O{={besoWmk%49ZnY0_EA`$}(VKyT@Xv@`i$-f0bXJhHjk@(Vhd!~;4o z{}MxXz(EKmR(d~NaVZb#bD+ana|lFo1s#pBS^BLD)Ln7wv(#7j#X*sj3Y!EcKK(BX zM)GSp@oE4PpN@3kx$;LS;;Us=JOwIE+uO&O1p!wzW;V0-BKV|U(iZot+oXv`nJ$EzScBci2l3sW#ySCJZ&iLHZ z*6=0ar9^(QJM2bDL86jv%2{m8Afm$y`6~N# z31A$<=LRNFDU_V}OzBFLjID0-PLmZ=@rWWu+4U zM=9o54e)EGO86Q?saYeGc~QDi8tB(r1=(OF(e1Iul5baHFB5_gXvo5!!V&Y()0R3+ zN_)h!G)?m*<7$0TgZ)^lJ5>iVoexd8G z70R4*=2nvU`qWHu{q~7!#W$uJMYYR_PKIzc202a&IXH6g;clC`*Si3PP$NeoE>%fc zXDwVRRX_<9gbyPada=!nlVf-{dm~uG=4cW{mk;yf_T)${fQ88@Wfo6z94pET#@_)2 z*^W8%E~0|dJ)qMmkb^%pZtQI{EAivR=drK%tB=?xJ_ff9YD}4QgZ+P({>lEl>!kB# zpR*eWzcp|%8@eV^Vh0{G#MFqgc?=eAF4NstE%n>g%V_Al60jTRN9~?xD;S2>?D#j? zr+d5Ytr~XAV3^b%RaYlFr6-7RE1;Z}l*11i?z}aM+cU}u;-v)q#Mo&|Qq7edrRm=( z4KP!S9W>aXuu2*I_Cv5GS%qE6^mhe7LTnwgsTCACyHg0*{4imts&*y%ZEu>n$EKs1 z_I@eje(nze5OA9sDY>AGJtQS;JNW7kp05HH+fc`g@qTK!papBf&#~Ju^J1mDgi&^a3Coh(2+_Cr?Yi3E2;+0x(0lD z&m(kE*tbzdHE|XTvQyhR+3i{rSfFJo^z$=|f3uE8niX(E1HyuwltMj`BdLagQfyTe zQ?udH0m6!FiKb|Oh@1+RQ5TdbDRN|1sG8!OA&nmq0s#cKvYs#*B5jf<>u-VdO(G_7|veQYgVWSn|EEfY$K7}{Y$Ly~AEc#wgg$_b6HHI_YR z%@ui;fbok$aw$)C5svBf2%*o5XbM7fRv4@k#)(E^$IDMJ+Bnk}Q6itGm`e1$j*B^o z0uCxB9575${p6&@ITHhkM1Q@u{18)ylLQZ*P$4ga54-_BhmV2PiVi&@*{6jIAk@w`Qeq~#4`8cR@}gGYMfjH*7B4lMWGt`l$Z^XNAi{5ubp6(9ihgT(y1>&lUr@MD9U{o{ zlRo%7ck}p|p0xxIr9t$>;ioOhph@Zo1xm^9tgb|L#(Y;xs0?YManeHLq%pD4TGBM@ zYiZsydDzlag1ieL=m6AN95{iVfI>zk$}l5?V~D~I9~!W~`wWYy7*LyW{w;RX=H7FXNXE?&sPUB%B=?AH&hvrs>-BB(|) zL=tg%l8*K(KR+AkFOZq9R(n-5;Zj9?lPv*4JWH8x6f?+CihpA{KdIxHNUsrRIn&FH zqY^UfVEq7Ay*;iZ*k4T<&~aMS6-|voFhttna%Q{FDF}%7GqdsjvYSvKOu5irTOTy0 zVr(DgD7$E#h|ChHwJ&OR`E9S$?6?F+US6K>O8cMR`n^5ArympC<}<}WyM@ohd4wDf zZD{}_Yi*HA6HG#Ow~X4MqY#sB@r*O|pGg0=yAbc9yN+IPvML?<{Ke9LP zcL`23X)Xwfe8Km1d3bTKMmS{O9T8xU!=(!S7GNM}o_b+$A4 zP4eH+y}g$ErHa1-4&S6DDa_hop5Cp}DAFiLqaM#V64 zvd7LFdb^9-0$Y53Mo#y-?J@Gd|JASmWK(kgmz(3b=*RQiz~2LFX~3f9x@~<8rb9h= z|Mh8H;0$GS{v3FX``|b3X07clE1GQ9qC&fFNwM9}4z5{G?8mSkL&{0B>{I`Et!*#t zx6sfjxA$EUKdYpgi2lye$+1E+6_Z8QXpL5I@NKKc$Epg5k_ByfFS$ME%W#VI4~$xP zBN`ZsaB>^a|N~ygnbfRbF(*2$PHw0+I zgvV%dDBZ|N2c_P0hB8&4oC^ZnnXRfQQtX5rYDjbm?nr3i; zP}K{#mOz7~%->5u#nZT^VZiG6JdF@eax;V)$95_)hi|!haS?jd*{nb7Lzp*_@VoF2 zy8VD+2n>kv`t=?N1w6egK8eh<@q}m(O_q>mH_oGS#9zvU`!~5lX72=foh;|t*fKp2 z@okd(o{jkt2%z)A1pWwJZF%cT-X+6XNvst5WxOIp*G!=dSyGgEX~KRLxqlUGSv6uZ zFU{n)S4H;kOR25R0dBLiIe|X(Ns;D6%o1=TXGZWRawx9+LpD;r6m>xwD4-zUR` zQYUd_7;u?$xdq?MB=_OmgKR5t%jzW#=SvQ!R7+=~o~89QWxplW{{w9UBw4}NF&$ZE zO*F(C;+xRqZbzqEU|kK&l@t2A+RCkq&h^ow5n2a?{(jbT4dMkj#8~%mn+yG{;p)X^ zWR%!R;8zEGl)yj2&nQ7!?oXLrS>ol#;A%XD{!EKHL-;s0XCmX59s1O9PL%LxZ3DB7 z0C6?LD6yP{d+rEX`Oq<~Jl3{KmX^5aPS6=5+pcQ!+3s-2n_W=og z1FX7asu2H^qjtgY5ZE=`Z)3ccQEHcwQyol-ciY%|_?Mh)VeId;6;_nm^cmk^9o4@f z-@U<}n3uMPcJ#2%p_?tWtO%xS`p}v#7D*g+esW6uUD7{Q!+mo$w{xpbyJmjEe#&(B zFBbXj!QaR2lV9Q^)z+x(t=nRS^#r^}z_%lraEz)C8)!CRI9)8Eg z{1lnLi2ndPkT8j2Z}=EZf@2mNJr2h+WHqPWGk-r@`a~j06+B(Nv8&2QVyv)2*!ziPKX^_CUanC%KOo~=m^ z9&RTlfqTO5*we2U+q7Kt$x^LNzsBzLDj2=)bmoT&_xG&Nj9%+lZ2{K~aJ?4Zw-yvp z*nG3+@Ri`W9iaWbzx@Or9m9BZfK`6pD)(Z5fiw0TXJNn@wB`#HKF~rD(8@niEk(9k z$=UG=RRCTUaeq?U(f^!GszV;1Hvs{@ECgWEfs|J2r~elKWE%qi?;;>aWPwNnaU>yT z>oN$CAi&6{DT%r#LG(`&ed5p%ib>LmdQRKpn#h@eN8}^uOX@>F48n|@js8A~mo!?v zQwKRBfI^6!1Ol-oh@Silzi(43m(8-kit7;XV%LfqC%E+<)SjgF1br9%mH#tScON7T zRX~#QGG|SzJr!6H$}$ydi{S4ZkP<|HUyAmzYX!)E#El2~6zR{*%qi5Oog(tm3Kmh5 zS?!x)wLFFXDJpH`J)*F#m*ql#5X{1a7S=~cj{k8?5b7+3MR?&+u8RQ(0tKOiyC=ua z#L58#*DnVi<2q3v!68LvRPjyT#>jFWJT4f~m6M{&m}7C!Aigb&3R!-La=;g+hEc!S zwWX&^9Hn-(gi|sY)Y?fEL2BwG!G;u4;WW6P2LEN?<)wM&yc7tLlLSCh)KE!&Wb~DB zBGRTvSnzLIokj-Wv+5VZ$t3}nbt zq|XpS+J%v^?~{MGD-B)~7vyxc&fzI%V(}E^fH)=RATm9>SXfixnK3{N3CBhIu+W(4 zkfGsL3V{|34{2PW!19Lr>vd9xAd8toPtV?y)2&a-x%#-3*UOyY`2+pXM}yt;$9w3H z12>}-6qxUhzTL;_$QDWlv+HlblyeG}m}ooy=QXccKHJ2#Bk%V0t#&6CMfYw8ksg*C z)cfe5k4o|+%KIlvlXk^xen_OG-3hMz@VXUHDq@1ZY5(g#9yEXR35#^ROZ1j?27A|G zWdsVU2pl@NQM+lHBG5hq1^MXcyJvs_kJau$I>F;sd)h2Ic9L)0_}l#Fj-9Ytpke|R z6hw2&I62%3EI_?%qdQ#CIObphqbQ}@{6V_Z6NqpUGuQqBD;=Pt04NkTowU0j+0FC* zx?O(jAM8LB4J_s#dvH_P?r(<{q7@K++g@Ftwy8NkbgRy%eC}8F>|$_Q5SjCraNtOx zsrT|8&2~NGCaQ*R+gd+vyJ&lLn`sec{01w|7VO;VS5 zwQe?9d{Hwua7+KhAWha$BR{UMtmS{Xjj%{f)Dcx6h}&pHf$pS76X4-+VZlY|sN$wf9b zh)6cTWJPuyTjzC!e!E)wcX2`%m$t!&LN-Q;12o^wQ{ zg>Z!vUiDcQkEAZk@Z*HV3*@GxuBv7flwqgTVXckW8z}ag>iRHw752f^U=x)Eae?q&RQvcLd*C= z$rU^kVa~KDFCwld2>9vAO026V8`Kl0si9W4tCb>*)%Zeu#F-{F>Ly>t>+pJB6X^pA zE#4kzMRi^TKGlFt5)oU1;-pHV1m4yZ9ehUNe`!+%Kxs-84am#hFu_lX<1_>1Dq$&I z7^PIj;z%pE8&QUhZjWP1SwIR2T@7F1iB-+o-3)o?PWYtN8vBRT-g_x4GbX?3{TXGn zn@rR{61i8^5!Tq3Jjd4Hm*_~Kazew~=x4zqv+Au8>2o(&cUnV%2Uu%=5FEmFN;Bzg zY!7aa(VnhmOH?gPRSQfN7}N*lL*yO?i$);-M~L2|;L!-g|0u-&D0n1QQNF8C)R>s8 zZnYe!1TlH4Mb4S&a3~}(t!qBJNkXJgnN7Xm)Nwms-EGw>Stt?=snak_SusReF@zKQ zAWrN)t|Zoxch zUA_Hek>9RgSZNQu++^21RBRuZA=g6ao=<$kmTyT|qW81~Y1UREW(^P0js{0W-DpB% zU#7a?96OSr`ZT#gvB73y5m<3l$Rf28G^xv2FE0G52gi~~ms8^>tdV1{9vJgU>r^U` zQhAf>`U7p?SftaoG1_sc8TqVM<+(Px8z;$>RZvP^Nq@hcSBb#sVC}d){7ezg{cCp7 z_0O~8;2rwa*uW#F-GwN3Hxui-@Pb^ntJyyK5qj5Xpa16TZ2VZ;%R57zH(75__PvVe zV5-b$Wl^j5Z1%cFdxOW@4oRk=NVW5sVWB3|$cQUrTpPPU?}S_3dTRK=J z?8*~%O>X6^E^?sfbhCBHp6bCZuZDwM84#+Op>YoJUumkIl!~4S@S38cN7avrFbSYE zcb=yMObdapY$cR80a^~oCZ8SiAdV{z_+;5FB`sLS#)S9xz2juTQMCmKOkuTz1z)}- zZB?0x#tNHLY7{)YM-8Jx<@333*PT7sGU z`^eBWm%{EmbY3zLpPI4ZRZjAe2i_#Ej+Cm1jUW|faYULt&^aS+;l~4w)AhK4V zZsM|_qwt9SlypC&q~nFVvPaA1Dd{pG?TR2zxb&$kXbH1)fxyW9UVx1XpeAKllr0{* zzffP>Jp4d*fQJfd#UT(SyozZElQ%|xECGUM>n1-i7Fxlx@Gs##j_ZSnkwo}Zf2uZp)a-%TJQKaHYUZ zU3s@`#FI$ti~1DZzzKln)-M88I@SUoM*Kx zGpsMAe4?4&>|e;}$V%%@u47tp7sHJ#y{|9C-5u-RmH>N!Vb$7jXzU=acjKn69UMKl zn)HDTP*p<|EZWyJ$_%0=L`EHoWTZ?}c3|q4ESnlZ0D~gjShRb{#pO zQs*4=b>fWNvS!G9F;gs2qJdDuaA<@4%`7^}Dp(f5gBS|SAb6-h?ebKT z#F$<5&1Z?F*sDyr5mu>?O|9eh;HrMR8x!@rz^Tlvh=$?LdSm4&x?YgQCdFM94-akY zv|q2Pwpp*1*^RFi*=3P?1bEn0(+dMV*-`Ld9xTN2;=fOljIIYPATNN{DJ1e|p zdR?dl@s_=2g@Y!6mAfuSg;g_%)d)rjusm5{c`B~FDtNl7DZ1{OI}}MLkdl*;8k*Vj zPO3FUHI{%YtJ-}(Xyw!}U#N9UQtt}4p4S-2WH`kt$-a^pyDcXy?z5;3?k}Cw=PA!RmS5~ETi~AKU}`*W=Gxyuy4`uM+AJz z;1<%XbHGcum8;}kS-e7?=Io+7Py=Hzh-~W?pm*~xSfdATCpv3pcA6r%a+Z}XxdMCP z8!=+J#zlHRMO1h>7yywMk-L{*nr2H7a8MBwM4zl;NT%>Av-IM5J6v@|VdYpn;nWKP zurE}iM)32Z!`wh)no=>#I5NVU7~r>`^L{Q5a6YW-b)C?QM-43azSU|XQ5d9}lQ*)G zH?jg`3qtA%*_@>emnoUhv(kp&3Q#xzRt3N;zr!q+_+nZq3==xLIZ03UE>l%+xv?IJ z@qlx^F&Zw(ZXRSATTlQ_wd zpO@Qog4?lc4{5~+lS*f1L_sSJDR~jTqLZ|KDlfCZkX!ReWFRgL5nB1QDW-~9A1}eM z&*!8qQ*)>aO+Yo;fU3j!R$IhQD*V8jsIi*;3#=o8QDk(Tb+Dwc6aTNHbuwKkvOd~C zM_cijZ;ue>afj~$u)3<5AQ31~x(sC0U&AVA01r1bj~UkpjhSI*!9tyNd=$tzF=ms; z!Ko}(QAH75X1tTZ zvR*K)x0g+f{kY69Dl^pEz>XAlr}Tr)xQ+D=wnGq_ty)t~lod^PnSJu#pSS0i58I>L zhwZLa?KqNm+dTwU=NEEjjVy?+oCFSlrT2CuE%cyr(QRMj<5hqIMX!Pl=>+^Y7V8 zt5a>Ij3}T6R7#yh7>waS8K%H7m_VUa6)wqD$B$dXyYE{4sngbU4swZHJ0j#lFf2jA zrbxT(tsUe~YM$J|mX?dV>g9|+0oXdfl$}uft48gK`~c7YyY`RYm}6UukK1-+27;|! z;a0@K*aTM&q8J#lfB6>~3w*~u_{IC}`L+FazZ@3nq|p&N7q~vGIgvS=J1D4BSamX` zQ)^o1u{=I%WC_fToU(&-vkn9C2Pi1jM?0)H#uZh0f~s=}LZOyJB}WOqG=WsVpE&yM z#8HlpbpLwr$^n;K_Npa+zN~9wzRD(_P)pqN-I06n0H2NOsOT3 z&xJj4NiN)q6TxFday3R`LM{c&3^^#0OkJgH-QkdHvT#T!<;S1P6Ck-wP!s(oPw3^# z!Wxkt7O`+1*1ijWNU4P{%Ud^E>FV2X9-HmpN&;g#7lNw2^u*nfoU7OlGMgpxoTwEd z{cIR2E57>+zh~1s^ZZa6NgeXmne4xOXqNa?yQh&vOvqvD-ZDEJRQsof;xUs zx`O*vf=-p7l%F@!)m&VjO#&*J;;ds&yQ-to1>dt`t}ErfL29hChVC~e)6co~gx{jY6$On^nrC5f}3 zDZx#JX;FGvLE2pMY^d6IA9uZt@qXP)6_=~OoFZCi7RAw+H7R%5KWK$wm~(MV5^9bx zcErc8;{?fJk|eQu{}Vi#Xp3jKK98T5tfA!h)=>H<(?EVR?W(rea#~gEX;p28BHV4g zP5Z5zc2zIdWJihcy)MFo2uGP>0U@+8WpJP#CXR^~AZ&OvqiT?#P1=It<9(D&sF)G4 zK^9IdE*a7Gl96|qZ&Agig3F1RUlt$eoW-0GJ)`v$TS73m(Iihs_PJV)r6pN1DbvEN zVE|=d2%u1NYT7VsxdsO@HKX9_V-aJ&RCh;t!oXJ#u+<~W8kwziHJ4z|&&em+8xdwV zv6e+tXgfomyw08uZr+UPNr8Nw@VxWBVyif_pAoHw%U^?t>K+_tmfo9f3@(EQ)C%`dP^Kj z`zCx*K(9hH)^3x%cP@g-S7xBsN(cK)AhtI(Y>#^avG3bIeDxmNR&oM)8#=dXyBU7m z%Y4h0@;+>c$Lv48jGzDr^L^nSdullYkEk8~3WQCU#O+=jB<}&j9st4~2Kw)VX?=8S zo&B+V#C9<|vy-ZCPwOz^XXJUVB9tpwZWe-?z^!(K4IO(Pv(}vtGe-UQpmb1uu=gWKtDnMaXio2HvQkZBfyq%n|I1g3xfw_HuAI?>(Um*81N03wIMt~%6x zN)}#%p!;(3W7-*zS2C);sPo;y8UQ&!bT2BueUM>sojA1B2oGAcyFpt{96tu77S+4C z?@kMCzm;a^T^7W1GPLohRsmxh;75zIJU>mx^W=t*1S9IHB}*1v4)($RQ7Wl%r7BB! z8>TMwgLe@sv?Oo1pC=xt{pC85npgF-WZoB&Je?*YuSqW~^IjwP5cKBhBbX|XE$4j^ z^a>+Y7M8*0mf;*%0g>tHz!S}x8-_g%YAMb9OK|L&Wwq3=rDP&rIRz^s?kj*(KGZk9 z%^Uk2S8K{~p#!q(ZJan~+)V!mDB1%~lV{1<7WDSek}#S!D&lZJA94YW=$6P@p?m zlKMCnNU;sK0hJs~58+E81PyZs{Z8)zgvp0O5TTWP?SmAK=>sS|Cp3Nm?Q0M+UJ(Xbhn?ClgmK5=P15w zVhQ`I5$4r9U12XMJixxnepVL`9@9=qdT7AqFt91+GwbdQtf~~0Z<_qrfLh|Q@YXE_ zb8CNHpYDYbAQ_a-Oz*IkzbH$Lr~eSWXYh_%2OFHDmPCRK(r`ysLd$%+uajh__HvvCUMO z+1Y}WvK8#6>=aYl!-9prcDAl{Xlq&uaIUh}p{NbKQ;(tBUi-jD@v8@z|BbNLs=}0t#Cf;nWKCG~TTtS3bTen;EOz7kko^Q`zUhrH z_Ms8G;f;{}_y2ejPkdxfs5LIU@KGxQi(7`U4;@0)-A5@%+buXWj$Rzu2!;dFhm@#c zB_MLj#5Wuyi5PUtUmRq=rpu;I=+?n+6{RvMNS&1YssQT(=LkV0(ZfP_8%L5eA*S!=w-HDY*J` zW(ob!(xF}}X?fS7_hZlcd8t1Dz3;UhWv6TxW(7Ow=k1Pw-!bM>%X@8qY}~$c(M#M8 zG0$i3vPT!O8h%^XU&U_?^4?3?{s{Q~5ZaZy5c}KIw|GZfv+pmD^j5CdwdXbOm_tMFerp4WTUj)w6159o&Q5B{W;_geUhErfVokOSI|{!PTLLt4En$N4uthMqd54+2-GSr&aE`gI9Q`HK;+P z2_fF9W_sdgiEp6x&$^f~TQq9iSnz1d<%&M*%D^#!05Obp1%@@Dl=}ytwc#2F`l{ za*y%7x$ zly=ebA6o@ktCt{GnHgVA%b0_G%a}OBq_Kb$peFE~Rc^V-$~LlZn+}EArAerg08~(L z)2~Pm?z74b%yw{F5ywH&hcK5%HuGN~h1HD2Rt6Wg(PX92uii@sfzEaX*M|7ef_#t_ zm|#_MFJ%Xnq%0A510@^~*SGOaWTn)<#%TRZ!4@Z6gyb*3`3~-KJ5GI%A}M&7Cjc*n zxHU*s5+-mp!9>?mw`jUSlMK}avDyQuQ42io^E~EBl=hVvCk6414bMl3iZfqwr89u- zuGzwp2pDP>(X|VCTS}}QWbLFv?j*73Cb8&3Hggm~O&2WnQG_-<3@r4Hw1e{+7hnun zV_y>J$SH#2-jmf(j`XCCp(aHbSFYfa3+;<0kvIt#K)FxWL9Q{Z6L&P`t|0%&cgc5I@8eQ*on*M~Qd zTFi!KJ)2+nWEDGSD;M33H2=H@IJ$F9o!z`RV%O7d{pA}`yLn#7?wg;o&wM{0QsKJ* z>38fuFaDL4!plbck6CKu6coTaRz3(I%6MW*6l5XS1#I-jA;4kh7tF;mlCQ5W7)S)86ZwQrfr`TML3PP~GoBgE`P6Zfs-FZ6GI*oL`( zJuE{b?cql9hWf1lc{g_=>&bBIS^!!D*!1vx`nHk2YOlZd3DA*)13?j}ju`y}P`V+=-< z^3)YPV4rF_c&{}U+++TN`>lcoTq9w+6^&yHow_z^>ozuUbdsIz+4pNJICQrSB93gQ ztdmc<78;f8`n45;nstQp+6}P8pk#b4n1{$WPP(Gs&I4Tg>1HO#NmNT$gQInD8d3nq zmt*Gv;~jzh4gqeJl*o~{pb*}q8w$h()EQM)0HigOIkeD&^}qg2i;Gq$0^@Rmna>Z%fT*{D&IDOT z;k<9TZmd@hj!v(m`fmc@q6@!esbv7`hD)q?`GvF-F0-;%fo2dt3>P0KXGuVUc!fNP z=@Gi<<*$9$4lP9#%O0c<89w_y*o z%aKKw+GQ08nEg-&`CpXlU@c|A zZvN@{oc;Xm3UVa3sGaXby}jBdHv0{oLE=)Xxx;)jgUm}XGlsSV^> zG_slwJ!~nrbc1w<77r(4Q(wwo=r`#C7W;*jU-TCoR?y4M0 zYBb5AooPPV)c|_yL3Gzc{2rq7q3lcTdpC|x<3oAS01b+Mrf>$1R?)yn(EC7MMkdz= z$I^lefu}^s>#p5vGa9S6TSL`0YiA)%SM6@LA@8)dTHdGHT{hUT*ZQjW*#P^-8XJnN zsZj}Hi1f&>C6%0Xwuf!%SUdh%3)Zuag&6>(QvdDZKiOkzMr_U&XnE2bH@xo%6xVxp zn4EFQ7rS!)Y*L|nxapnSTJ5%t4fY5lK6kFFvRl-+pYONXuSRU{@_M`I%GY^#5}~PI zu^-LKx5};|tA|htjCWh=Jt(Xc_6AeashG0>Md_ zOUX`hizQv_V-;5aNf;8XoRZJ`xVa?h0?l`p)3h%K?MsmwYl~uJ_>@bNYU!W^hsN-V z8M4suD2&W$tA}r?;deEYq7f!X<78=dBub&7x1Fq7b4Qv#%J^7nLNqV4UxiNn2Y4Eoa2XFs^}iTE}uO#E?MH; zbE%YLWM+s5sblP}c^kRL7BZUMbUKuOl;hIJ7+%vhaDeQn|KPLMzLTi3UU?NQk9ugC zX+7{DE!*y~Zqf+J;u<$2*xvRiNx}WJZXN)KNGpmwau#@*oL(Nchis`%`3`K4rzMfo z+qTo@(R~o~G$WL2z(&4_{%X@^cp~zsMj}himiyejTGUHvAR(L4ynC*-!rIpEdCHm( z=0ObO0(cOw+Cwjr$iU)~$kY<2l<6oX5*t&)D25kDap$G5jhdFkib@BX&~R&Dc<`#i zr!C5hlD|j_Hb<9x+8i@OBk2jzH;kRjxg?`Kn#--{;w4Gu#N1&mL{B~Wk?0%$!N)8h z;-_ZE!}ggLLU}zCLJfK`)QbDW-BirAPPm*_GNf{t2|wgmx^%7`p+Q}BhP-jwVU8o~ znX@GRR>BMf#5JH*lT<6arb`aZ^%$^(VCDVfM?rcOVR9wsPW(mne8iUoX{m>3t(S=D z$2O*xj(t5@P1(HfARDK_0`!LH8~M2`K&BHVUrEskh%UI;51F z>%coY3lT-7^Vt;%U1ueLxst33067jwRx+tozUmejDBkp(GKvE~3|m#{lUAXEK*Egg2O#y5 zB^h6_2uxp+-dqgfVeBBFNMcpNmpud*m*8Kck{xq}0A^k3)8;344)B#r!`GFpA(@eP zGgMo26Wq{-n`|EzbV|Uq#d6#HE9sj2oL1m{R>r$fxcDk2$(UBwXGfc^6!xo>&PnmA zpIbxGvvz3ZEi8)ro)wXEMtIB$Sh^7ZPYFm;aZdYQNASM{dIr8O0%=jYiq;r;W7XQL zEk%Z{cew(84LzR}Nkhq^A42gkL5990Le||tZ>!)HK6$=dp|`H#J%rLhK9XKP3!3I? zQa$)V?YGD|vNA2f5iJ%Lu zWMnKrLaCM0LDVynyZg7^Vg5aH;q;!Md8FHrYVp%h{Infhcf0usN=aN|E9gJ@p^8fR z+|vA~SMom_hfa#X3kE3Nv>3zFKk>BYQrbwo8zPrNXh9BbnM3mPXFi#Gk&`fbQS^kB zQ5)fvpe#l#qh3+!x4FLUhve0z+!8SuCSWW8n>w~o!V~oxEM7z z9JI!|17LnfxlL_F9?^*yu)RBBUC2K=>F4y&cT`TmKiSd%V#oer znq$Z~G_Ty(TT4$0rAQ~)Qdbh8ViNfWyisFQiB0WjJOpRN(pBDzj;ftjm)cCywAHob zTC`=Up?aIm)Xt?23}3sdcUw>0KC7XDm8#xvbv4D-)KG41?Pah=taK%5>ga;E!8iWUo!Kdp(~yP+$@7R}z+Y>#m5?3GpaOL|auA`_YO z=cxVrwXeDU(?>sfvpwW(vS2N;L|p5f>=0#4jnRXmBb25yRKplpJ;{-JQGtFG>1T$g zlpu*Q$|gu>IF6}hcx0495$QL?i{Q4Z*UCNqq*dv!Cg`1h8Znbq4SZk0Y z-EjSUZg-(gnt8q5|8nB5|7q>!Cz9Sh{Nv|fu8`bVa^+D^WcKcIS zv+YT1A*V=hf1G^iH~jm$meA97UeBRttYsIzNra9R|H82y5G{M2wiZ%~YPg{mvW^Bq zLL-k>Pm`$~k#cGyHCFjcRzYR$r68GRs{Pcqg$56RQU{nAPvXjfqDUFVsSw z)CwEbp*d9kehrV9h9jziE2`ms)!eVjJrf?a`AD99zpmgpYdD09>0UYbzrZBVZ%AB} z9X-c+!VFbf9n(E=T>h)b%|e8q$f0K~!tdz8XDkX`9aAs-@NJ)PfvW z0Ffz7n-W{^LVS4>B1}w7sl5~M0A(w$qu#&PO0;S`1CT7Ima(bwrjZ4Vq;IYv_?2 zCetOMDFIF;$*dw3k!t4Ps|Z0@WK>K2Uk=l7U_QD_l#{8ga4c{#p-r?ms0Nh!76~p7 zFkRw*mfvtnz^qnm1o$4O%U;B8HILl>X(X$UxVA^Kkk6FQyl69z!8f*v-ezzugx{Mt zTW2{Fr=&&)xNoeO-}Gogq#Z$0w+d=&nNTRMQ(sTu=Hv>0QVX%|1D`FubcOv zoa9$&mE3;)Fe-XK)P;((n7oj0LlNCBKg(wuNXHWMFSWgITuPsIw(VJXC6&Z|eDb`9 zOW6-XtFM6T1I)?P?S|-Fat)u;Ef%1VsV;ohit!tZ^Z8|^u9c)-lG7Z1>o#kz{0*J3 ztKgd$4P;m&1YP;}r7IY$Q0~H)`0yg0#6tXJ$e@D|G=9`HA>JhEjticc|WceKUUZqE0U zFNyu}q~Kwx$e5iscyic=$dv|9lP0n7qn(=^CG{CbPkU5)A5l!CO=6amV#!Kasgh>w zwUH4ENPK8TE%ie!4Z?5r!*dOw9O~s6^)W};JJ7-thZ$ocqz_4L50Y9rs9^}KB@)$EdN z+;7$FlB{Yx`2W-O-tm!MMZUM>@p#sFy~cp?W%mW{-VIzf!t(N2U;{ZUEEt?HW(^L2 z!8u@T!#X?)o@CFAJvonZ=vL=eORZKXsasM9Nv)joC`|N>$Jw~vZykk!`*Qz~`t;LJ zJkP1BU;V019T^;saHhD7PK9J*HX@_rBnB<^%l;Pv@}VpL8KeDG`J2x@E05V0w65asN~SQ@5s1_^fQ}d@WNX%1xV?84N#)%f&gk(gK8IfBts!-JP4SiW#S=% z2)qpecvhofx`$FqFRo;&00GYcbkciLk1ry zhnN3^XNt_7QP#Pt8IUU;w-3s%$-RBnH^$oVQ?fZUBb%D0WmCh1Y~}N%U{2h_FB_m| zO65nvmdg<}Q;}HHqYN_o^O3-Rv;Hn+w%t!N5gx1)-3mhlE5v$0oy5%s-Ih!?Zk8ox z4G*9+IzcEM>in=iP|6SPAfzVhnyu~iuwQ-Doc&M^q@-m%1|!cvB>lG}L3SDCoHARav$a6FSZXB0(++`*Iw2PN znjgc8Qf3ll)QOVpAt_)y`8OWIN=SkGz&W?nv+DwK4X zr?K5DBX##nkS7}(-p?wN52KKoqfkL61NzsB)3|an@*C->`Kfe}hS_rT78zs?q)r)$ zFh!;DFbJY!lY}8S+L?gf#uUFC7SZGY4YDNthjV+NTlPX3C^7=+L_jrJJ29L+;FO(T z!=^$2G1Fp*q}k>jN*;YvhHHo?DBdDfrKgl40aV^k@VynfrjuAhLPL0%tPB_?b>Q1F zMoG0~#U0FM$DnXWkwe$x_5$8M8hhy*ga~hkPSR=jH%Kel*qs!2_mtj&xp|am5s9cw z1{$ybsfoh)K~4!smX3q0vIUwLA`&)+0ZHtFEZK7tXyy@vAg3{O-o50VfCz?}sM1Q# zN*w%_ufWX-K_xVj=x)&w_I_&ZcMP zZMAJ>J(I1xkk=q7d zZaxZTCi2wbg%Tp0X9i3;x%a!`hkEM^KO)t;zQu~B_mC_92q{g_k09C*cdMglgdPkW zCS961Q_K#$K>D<%Ym5nbd_Z;0%LGAz4AW&ju=fKiGkjDZf_4E!*#Whu8+ z>W>f^)v6bY_S_ISfR70MpC)Rbh3pw_eNJLXQWxB=%ANwEIF&L+LC+b@Ach|7Va1vj zG+E61Br(yaB#fr&0(5kTp8*b0K?A}#i5~Km-c6?P3uG-linqcV;>dl9q`hGIPtZA* zq#y?)jEMHYy^;WwMTp~#W}lM)((0{-Z0gxAaYE_N%Dbcm&#}MvC24|Ij?#;9Xro+b zu{2TQt_9@W1%cR&7R(XVO`>zgdv{6{?b)5)!FaKxyK{&1r+1-$UXY>Qa_Q|nDjAAk z=g3?h=&g~#zFHX@@yaN1rBQ-TGgD#GAE#roZg#E>Skx|)^I4f*>;f?`&1S=KqHv36 zhGl_7VU5I{f=fEXe4=yENf(q((sbr^6I4N%eHj`DI!8-pGrQ=FTz%#Zh$R-UImPE` zJ{LhlGk~TMiqFjfa?ZZ{hRi`godP@QdTd$*`wVF4m-)EHD4tk+*?%y53GkCds5Oii}QEGbmeBoU2Hf@3Da zGC5LD3Ge_lVO=Z*VV4|hZ4Z-nH9k=5mAQy-!G}LJLtyvRob1(+zaGyYGec>?) z0);HaLYFtJ5Jfcv(+m*$;lVW^^x(GKA0UcG3=q&8D0F`gm!W&|gE9Q9#M;H_SjMPc=0{B%;TR+Tsn=vlH;QBW_O{g zpF|018D;LY{dr@KhEm(`igrkE;(5-3CdeO!1e$H%0eC|1-O(3UDD$*geX%F1G)^(K zF=5yV)@Q;HUBIx;Sh4f~ZW1~*LcL2UqA^T}(n14(9IeHl8bpbl3?xktF1*5?6au#qVy&?oJHj+R|tlR=HtQU56lEuia`W}u)tYJMbf4Eiuhry-zD7v@U~ z-zG3t!~8Z3U8cEOR{i1Y<&z_1Mx`JH+V*`Hx`?C`U_g?ki^BA5h!mVoeB21YyZy)y zB(nRvG9Dz~6gsMol-gDg#hrjiX|6UEdQ8Sh;)uRPByBhG5mu0Hg~%Hwo>jN^24X^A zC(H{3+)D)TAc;4?9bM0_qxMc|riXGQfpievsXs(EmYd)$Z*2e=8z+$4O&lr)N!OR) z4e*AI83j6b5w93)e+g3wRPKPEe5R9}vwnb96I51L^hucp1?2$gp`*9UbZfD+_3e@h zfKPyYY~44>yiXEOhZLB;f^#YKuII`zEGP?IV@ldrX6@66PP(V#Y@s4w@mcz`w22=!zD7KSy z-$9{^AoSw^xpn@M+r@kIM{*{&g?nY~6Jnkn%)9C%C8`%1FL(^lT7AEaGL{=lh;{*; zT7bw}CO5e6+b|uEbKLEcDEkp$@dpy349Y|cjs^D-gW8I)Pn^*)-*As4c$3XlKa+6v z-Quc)o9TE#TG%haIkPZ8(ZkftL~b(*|DadHxKz5*YAdc;0NLq=uI>lYrin~zAt)_v z7_YgVcfq{EmSTxPP{)JM;h0#`9)39tk=glc?`E z^5dL`VM3I9?W2%QaOH%S6SY_Ir{C_2G{>Hu zQqRq%GutFw2l8S><$AVCGk#AqII@S&6!~gByx1t-)<(ZXNr`sY)M~!EvYb^;SuWl8YlFE*TuGlU&X&6U?I?pJ({Exb%B@hL#Z`nfX`vIr6yCDD0|=~Ro#&cM=Gr{Rk( zUwm~*=3iNm;yJ=% zgyI&7(akem>og02oCHtJotc%HQ`0g>Qqgfx&)mxsGEInY`s9#IE)B@kVxLSd^zxUJ z2_|7pGHZHtA|X@cRZULCWN4c3m-0FTWEeq-jT0~%?5>eiwv5o28;-{hWoDC}QJ3UK zoRR}24!{eIfPDsfq0_)W1C!0tP2jPM?ChRNzl<)1xyFbbK6Xg1*r4@7z94`0*&^9k z@v=PR8Y4&s2ccAuiJbw0SSzG@&xM#-nywpKJcZdB<~|Xl=pw(DY>UOEjK<$ zmEHXB$d!NcLpfBRl@797lH}az{Hh#j)!B1zP!)s>AmU^r%#|hq#?UaW3&fy697+tW zfgnf>gFGOFl+2L9reaL6dR#ZJ@`klke1KtdWEIZp{O)kwu*&J8DkSLy9kD^jY18@poYSfq>9YG zX}GH380*%8heF_?Z{Mtx&%es&zWy8V(A(n794GmD0cvPDbXMDOl0_8XkRRNrTnVUj$WbhO@?MK!@};K7+k_5w~eOZu3SNNU{%!l0!}47mlB5 zD#V&Fi429Ibs&e_pbO?$3_+WWLjjF|pU#uiJzod69p1uv(TIIx5dp4EU^kYP!%mI# z9FeiUWAMcXrI&@PXZf6H-$T%_d#r(_z7mBtn91oI7NcS?U| zFTo0yAqBZ~;12e6JTDzMvx9uLLkTSn?w1~tI@Pt*MNhL(Pwh%Q^&iB#;e-YH$g;UfCR?766cw*}$uj9-=28s8qz${>4HaS~_kLZT8Hhrg z5U21%4At-bri>*B(&;py>hDXKyqzc(N@EyCf)|`7eB!) zU4LWaqJnXhJ*@Wjb;;%OMv{5US|8IIBtjp<`{&LlbA;}h;d-J zMB<4TAe(N3Kmg0slX>pBU0eiqA_Tl*N2%6a^FXM(`kSms5ti`droBI9rqsjqvbr{#Gj4*XKmnr{N~8B7&Rfayrt7N|hppstVQ zD+kGf&fB|Rl!Il=Fo7P>1n)kAo;}=u%`pO;ZO@2Hx5vR`1YDy~i(cX=L9$9ZiL;cD zcT)=~(~~5RiGK3!2HB*Gqz(gm@F>sH2hu0UCA5=dXbP<9b^VYvL2zAwpx`hw;{*G? zCNavE*4GllX?U7R(Z7-aeP}=MJ?IYtwSixVgZJ@F*TEa4mmhrfzmRzA;}SbYa?fsH z2SKPTIYSZn3`fn+Bm*$5Fa4o3!t0G?3#EbV;;Q}Mm$@{Z09VrnOiGYimLaw}442nb zaSusTcT0;Gi%+Kp$Q~bJ`a+zUU=4>zGD5gwgrTBvobCe*U9z`=0OzsDBN8Jj8a!|v zZosWf`(#o%741Cbyi^DG5CVcS@v0Fh*6II=g!TjDk9`kLh8dli9TFtIo=_Jj4Tl6j zzA|1&c(i{Yd@M2nV;`~6w z1fMY!+hEsjqT59hCNiIddkwF>6=N&5RhpY$TUO%YGffR6DM;rNvW~pEUz{v)cwBnMPkf zA;*9F3fl>?jh|nXs~0Yul11Wha{#3iub-7ER=t@9S}g&$=2<#t971Y%0boWB)Wn%_ z8Kd0iFk!MmK+?c`j|`Gv-aiM))kk7c{=ih5^o+F-_!$qA7djJ_o@q!Ph@!!XAVDy% zbmeS#7qv1t9hA-kK_iO(%n^yHmR1b;RYE1OSV#Pu4Al8x~D_Z zcRVWH{p0fO>u<$aQvmnUo8<@3q@=Lsf;`|JlKWkQzXO%7eNZhi*7?DTY5D4J0`fOM z+9#j7yF{*kE-tt4>Xu*b8Izlz2$ST^3a*^4@Tgx}r>Nt(v2%j19 zn@(|_Q71G`E7wjRm5IJ88RS|?KP$5*sP{YJW1fLmhVcaY@CX)$9e|S~xb0hIqVu2( z^zStuR~w#JJMQB6&_PMY(0$2m(%*AHdV7yaJdUxUo$7c|GO6wG(>u{;ThMD8WfVGQ za**HDMTPR|${m#U)Gk=nT8RPz2f7YQF0}^(1g{N?l>;FPU7AK^W^o|Qh_(sbJk5=O7bx^`kX(fwpBMVt>~Q=ox{4oMY&F{cI> zklG2!(npjp!!=se=8%xkNA^ksSv5_>SNfRn-AV$6r<{Zh&efOQ2RZYSG!l!MXfI%1 z@g3M6z)uKz1JIycek+uerBj$T45XjMqTG(zT+Y*(?%ygljkiEhMSwq6GXb+_bnWSs zhj>r<9oRr@SCRovB7}O*Hlk#jZIXj3@bA5zXbsEIfdR94(4_}&mL@Hy7k^S50H_>L zE~ME&d}=JDwy8j>83(Q12gC~y&f)skA7k=z6px%3Qe(q?5Ka#h>G>ga0&}4O1I@%9 z0tas=UU;WudiP3{{%?eatYzj|3(>y5;CsFFdc=izSXpQTIiCAZdfO(*SLR4ap@jg7U$0ZE@ zNtE72#Pc?(XSP-rN5BWIR0S>eOct;M+l)t;U7Z> zzROY;zmNvogA#=MsfLG1P`0Llhsw1ViyywT$#xf=4_}3MRnPoPCmGFI285GTrWBJp z6HK-65FBnLAeDwU>Z8nE8K5f&a`m=s7hmfR2@|G`IbjGv?_t*Qb=nB54;+>TytQ}& zfrNso<{^9p&~m9w(gZKo%zY+#@D{k=CQ`{#qOoY)~Qc;BAv zX2bQl;F8*T_EcuKG!RBjz$(V!qaz4v0Ms00KxE*xTTw19&#!rz#gZa;9!441xu+16 zPoiyyc!HZG(^o2Oy=BtSx=ZTdt~zpurLK|}gGX8)+bXSH`z4Mi+0G*4jex>Vn9_y- zzzhJ_Gf*k*83to)n|K?Fr3*!zZr>}x&<^Q9Np?+m#MiP{S}DlaLLu}RA*3W}G)?Jp z>6{2iYp+Avpjom2r35)QEyGRHJ`t6608^6r?j3-p3|UB>gxb2Gnz|P{q-P1-L^e`C zVXO5yIGjOJl2UwTmU<0f8i41qMhU;Yx0lkiIaYS+13C@8cAT7Y#NJObxoJ+u z-+5Vj&(BNl^fVO73HYWt86#je`tos^fSBrCf|VINKS!l91y>MRy`)@QygZUT&|OTg&m;C7GFwq^R$1WhRpH(ezkYGCW9nu0`4aI;oLH9=usPNwaS6^GFLh zL|OQzbgxfZGj)<0t_N9FY4xq-m{jO4mF9P|{kd4^vS6A=|t>>R6E55BABe zdvfyqot^R%LPWO|BqZ<3TR7d9<<8&ik(RO70YSQyl;RS_Bp{Gkl7$xE5S_5rbM7t8 zcqSgC2K=CguhywikIln7odD~=3R!KsP+t$MlocaXc1Z-F)dJ8`Nb`~jc$wMgW}5o) zymSE4x)!dgSL-IlN#kdxTF|AfKT@8=-d@;)oyx@C(*vm!2%kDM%7 z)sUHHC6F1hb(|J|@9T2IcS&5&`*)Us{E_@>*N8mq)+D3p-$^oBj;%dZH_0@@I;Iq8 zi6))F&s=_%H#d9|FGN?o(kW}ZDG%V~o|Ykz$<8vR2b5YfY?w(a`hIH@&PisUr2DHR z*mmoD*zD(4CNUK?LiwTq;ke(QTq;adHJB~_crc?$q z$0QvEKqdD{hY#*Mfl~zfAD?8Hwv|YvdAE#@dS#HIKQbFPpZyH~F&w0hwo=KYj}TTa zllGp2(t*hj{ifX#&u74wXxcwSn3( zg30u58RD33z*7@x+;Jj`1G7F!62uR-9VVphk$7^yL?YWIojxdSu-!@YRJ8MmwD$1) zxno>!A0srfQJzWkl}X<$!WrL#mU~eGvFGu4swC21A|d#&5Zbgo&352uJ5Vh(QYAJx zw5N(Q)q2I=R z1mTUG?q6Za3bAN=CDOV_VvM*%=7_X)9%IxTlvb=wJEJ*GPHV?ttpwY#MAVAO@GcWc zQbypD8i~-R`u9mgyjUXej}D^1QKCR@ETcb#yMSahAz>eCEku**xI`2;p@B=ddCw90%}exFBYGjCXA!pfqQp3P7tOdGF_MXz z$rsiM0~vx#Vff-E9Y<;BrH0^HW2EIMUl@Upc5@#AO$TCo00h!r zG1UkDpq_mIeb|hwC%`sMjJ9S91xM5LSndGptMkIZJ6+(HRIWtAFxuYctbf^Y$>1h^Vy+#WlqM0T1CvH9XelRQKBM5I_TxF= zQ7vSx-gtr9Eg;hZjl6VNwHrGwjwearq9FD(ifBjR8#hNQaUEs zZ!{#?k!HyZha^1(Hl!{<1WqkFo0Qg(Zs|KQB{%+n+C%IAk-25xlUpAoY3p(ODapUz zHOg{l0Jt?!gjHT9D6IQ1#_zwoYC>+@m6q%GbjtU3XXVbFy>jc;G*hj9XduxyZ!3@{ z>ifp0&&dFAC`E`&%MwR`L@_3iw?okAL^8!W3VjYM=E!e_j?ool%+#|Lme9m` zY9cDTq}T_9H4nYAoL2;1x23>`!1rJrnd1a^0BARh_B~0`Nmf_vDfD%@56V=6L4$)H{@d~NIh!ck7ES`t$zR@ zbU!IY4+DX;IOYD1CGjijG0$T{kOuWA3^XZ4mxlo`*`8_^5b#Kpm~0byXmKdUHb6`c z0cuQ^OCR*370y=4M}lxbX=2o|p&+YJJ0wZwT4P6S56DWWnS862e*E;TJ;b!h|s$Q%h6B7QsiFzQhAt2tcU84QfV(%!Cwz-gm20h|R zS4xIBeW-O@U0V`+xN5+C8ZP`K{4qx3k|_mkcvp|;rog&a!64x{FQNoyNK z!Qn)DV9XMIB`ECO(u9+kK-sqRR&tenn1%xq>HtRMj!Jz3pf^xXb{lYOtVZliPl*xM z^O1cX8aO7^aU55`TaG7gAVgY67}P^LO_bnUkk1CD0yh&%RX}KK0PcielqNv2H-mA3 z^|Ha>gh-}}le85eBmrE925_xryiHP5ugwO2-b!%ihvAXWE(h zF+B~KAj`|iKb>T6C-)M`0YV4L#FN}Den6-jkgl(~F;_!X@hZkdy|j$@jDd(Tazi-G zVWJB`H5h!4@J8c+>?8&%k}Joc97UnpO&>J&l!*8o0dq@Q+hxLP~_=K$|33VRuB z;i+L~tsn#2s;0mGHaJiter_oYKCh>TgCOG8-osLzt`&EmR|0foh@sLzr+VQdf((gd ze+8G`DM32a!|QJtLkRH$TJb;Jyk;LHr+)-nJc@nQ7e++70pG#RIfB?^Ke(WtWBm-3 zC=u!=xRGXVF`V8fak!2kB$|idjjyYO!mu7HwUy$AS4vaY5wKWyiTu>r%b*;ol!oMs zAc#HU2BE}8Di9+&hBHUnccKywNG-3nakxgD2y~q?8=Sofh8aSho(id_2f{M} zabo@JQu`@G3vN~)0$;-2v0FmK)|>HY{5*vhKcIEePN$+?2C5}E<`v&S9oMMiT-*Xc|rQ?3H_!L}U75!VSa zRVoZfspmX??js6{Nirzo#DN-7VD;lc2~LN_3#p;!4~(JMCLHwrh7^~kf z+ANJ&e&2Xp8bAe&po99!R<7M50W5qYFsETUAyxxs-il1O$+`w|c0%Y^FVp$`$C>Wl z#N71vhvqt^84jiq=+VGuGq5KD;A!M9K)dn8fHW}&EVMW%5qP2a$x#UdXrl9j5?dIe zbWJ~>gFvTVvN;Gd#TEys5d&_D%=b!R7<5DMqK6_fIk7^JK2{T9v8$W8c9cs-nNk)3 z=`@iL9>54RgG{3Hd`^LMSiK>#)F}a;FFu);*hGrUq(EpH34`F8c}A<9r@2zGl47Q& z#f*fOvMAhH79Z`CtKLuA(7MmdWq*C2JahE8{K~Z?kJy)s4L|IhUQVB;QsayOW@hBd zyUK^;radXSfm+Yk@pZfC*JC70l?8cpAY{;-~xE1<9}w(cl|zOYZ!uCaR@{6&3L4egwfZ zV8!tUiCnRoO{7~)8;}!QAd8yW@EY~Xy!m-nvLa{{!^S!wPL42ILf)ma;wT9|q(+ z1jsp(A?b*F&@3noHUe@WtPH+c#$@yWtj?=)O}NJ+9plYn2itoY3yt9XdhmW5<*V99 zns|yhZ>b$k7!lu46WXs?Let0x2sk(aT1GxYY7ig?qsUhSW63$(ELH$!aYJY{jD$9D zWJsDOTO>FWm(UznQ0bjyuL$nMx|ZQqi4Dd<;~;Nj(sF`C)-{c{@U2Z;y$upVB3Tcx zLsx(AqxwP*5P&6@KM+DF8z(s@=M4ge{KH{19wVAmy2uRISLDU6@@oBw8|nwhRpU+2*5feLS~c{Aknq zVYj%^cJ+EZwKsf24LoN969?WB~XF+e)h8WIH|)h>Xh|i z%ynoG7=UJtaXnYgg*JDKRmX|fd6|gefZb}wPBf8@U@4BXJbeMVw!Rm2&puupSU+T7 zEvBIgN7K%Q9eg%1O#HoGy3NT$xy1=ev4ik@JdEDBzh57&o{n(RA@x!TwkYGlyqFL_ zIgXZ#yZLy4EpD!}h0rQTy#RZC~1G&4$8kj}^l0V)e zjk7UnU_}7mWK=v17cVcjmKWxx*occB@$up!GYn`t#)V<=G0?qCPImFS>V^Vh=Pq62 zA*toFnMaTF;_H}^;-LR3`Lltnt;U`J{}}97)MB&zT-rVspe~qC96X$zH>Z-&%v-K! zXjB7(8vt94qkgnIhVvQ+Cw318rJ7uYN-pHYFRkJ;z=Jgmaz;Mu`K%gG$&tR8)MK@s zSX!?_C*GmGA1ltRYA<8RL-)ElyKkI(a)Pcu?Z&pdu&E9nQD3Zw$u)Mm)-~p0bU3-s zfY`9HPJXj9(gNJKk5TLA-kp6w`RRJDR3~oivPAywDS^LZGVl{gS3 zB(FALtDAxF4j2e06LXxL$3^ajzSw#kl)6cu*eASPzrplR6C=0*_r}LLT-bCQ?nN!Z zi8}0eHBwziKe@TCm#22|KrUXfmsf2$IqB7Q;Hj6K4jV7e&8JGUU0)^$p_V&yGDzH$ z`kmoQwn#M^&xQ`DMa$XIa(>=afGb*V4zO(Kx=*Nz@FDaKQ_XaoAMs^Oa09j6u=jXO z?5Lqy)Q}f1%EikLs!BnLmU2uv>0nRf0aEpEQMXgg7% zZoq(tYK@CBxo1WP#Q? z{W%D*3Gj10yIFqyrw3RK5JveP4)GG+GJEF-K{t)ujOF2G@|))SCB$_tA3I#-U+NOy zBEXA%BAmLBi#K2$>d9yFo#-YY_Ky7gX-&NS8u`lKlF$FFT#9T<@~C@G?qT70>tWm6 z3V2ao<{Djq{!wNk-BsEzx9m;H_x5(kclWeI#&pWh_V&mJ!9N9u7th7}lIC(j+=qVu3>rrWE%BS@d@+p~tE70j~quMPB4$DW`5B#UkloVxt4?w6uti~l$DQm7#* z6Pzkk2($hX`#5vqC!`{GT7o3&v@M;Xf&j5QgI<<_3(sMQnU96XTcN?)rFyoD0o%g> z?h?l|$Q1^%g~^1C48{5>W{eS~b+XOF09TRlA~pd;plJphy@0j^*9X8Wbqk$h1IRm$ z$Hl#vKqTV~=Qi{aZN$jEn3g)E#*5JS_-r7=+BlttCG3RSz!5-jRK!Z=B2vCUkdQiRP0d`p~ zp6eR>bf-Ay5J51H4OQ>v!JU*?cR**lxK=F>?SO)etuKf4y&}6D7zau}27($Hv7gC%Cp}JS%@+i;^GCD z0j_E}hYh{zLl>)|wHi>C*SN=dy+GIs?yQn4JAkOQn5ZBIp&nD>R0xM=c8>Ct!wC#% z3%DdIby#}U#D_66N72C5JV6;Qqi+B}OZ?k%fbrH<%m$@=rjggiU>sztXQWlG4)FB; zv6vhHd>-UjJJ)c6Fsju6ahER4nuqh2bAwetM;jp74!qWTabPi=fKfXz6Pwd4|5(Ej zmGn_9(9{k!?U+x}?;ORu)puOY0JedQk8%%XxNp^rg<2i-IDSs-g1(DN?xuQ_&*2#T z%r^SgMvv6;v<*CU<498WVaE>7h2;Q$d#9Tu(g!FX(09tUpu%ero(k@=0^ulEdqr>7 zj>N!RtsD;k=F?73+j#;9PvGO}oTOA(PEP*uGOk$4mCJdu00zj)X~A+jB`b!2i- zb`Ny&et3SMkbgeH+YiXG(YTawmpL=4frBU4WAs?7WTH*hmyTe^0qr(y zY%TWr5QG5*pwQQWLO{S!Byq)n2l0|ZCsIeNQFOG~Q<-=7}h^eOc6-(4|CdVATfm~JL ze%R()rGzt9%%e-l7_l+lyf}k?#@Aug(?PIA6*68;3a$esXk$F+chv(`Y^%`mFh@^w z4iA4W?oju!D{oTC0aw`=kq+K}9cR+EO1oXRFDGGC&+;C7k>J0$MY1F)3ma`gv(CJ!It+RDHu!*Y@?~n3S-89 zOIStMy|}dZl~#x`$@OTm&}xYpFDbZBbAI!qE&J_!-W*l0O6PNsu<9>w&eN zAeZ^%1%)ll7F%5;BMK1{fspYHoD!R|DPx)(&D3;dXkZLrb2zm@IfkWan4E{0o+H6# zNjzG~Cp`o2ctKt&Psyd1e+#DTtFo0|YEHdvSQBm)<0q!Wi^d)sp&h5eFpI? zoF;T?5YNj>)hM^Lig+;5jCVxC$r$zke4Stf1?W~iBmP=9!`;XDTt(?_hP;AhKd8e) zBsM^nzZYTCwi`@jBTdY~(QdXofdVQXDkdJzZU@)6h}=4KUqs5oc3g(6yf*+e_X0Y6 z#CKi%>VO}#F_%DpbaH=gw$+ms=H<`Lm7RbTA7kE&)aaUhSc3RrWmL2q%ucud(#<#Srx2u)| z<0$-7O<2b+H5e1C3UhUpS8p1tYU6|s_9$0diPg7bC+a{_ilEdj)gx7xR;%6MK-IXF z=zq%rxX8C*1?=cytCkCWQoTV3`&Wag>e#OwYhFtLzmjuSDLTVe)UmAw8)H{{L-JHL zs6#D>(cK(hg9Wi;n{3$AGAu+n$5e42iV&)~q@Jgir*HwaOQ97Np(p~eaesD2E9_s* z?>4Tl``2LKDzFw+SdD5J8U3tLOG4X5(q$E1a~bEXf|)7ddS#r$s^ms4(Wk9kv6z;c z&i5!XEmLw0dtrWI4@J6q&uZODIp-m4X2pWOA3%jw!(F|tg~yYjl5LjRJ2q)g?Tl-rg~Ov#L1Zx@x|u0X~XhF4eS5?PaT4 zVMZwjyx-0lYiQK)iYj>_CHztfxTvASD`0wRc~CXpWq^PxI!QaG5_nO@6)M^EWFVd>uHaUMxuF?L~J}luO^ji90rSyxQrjkC_e$f7?)qZ7MY5!K3_W(}gw3Xa? z4Yyv(r7PL47^ISYEH(L8st-^@7wJ*u`o`%)?ePkpuZ*+l+g%+E6?*fWO)2*dMd|XkO$32>vYhl z8q_bk)v}?k@>R{$shU*HmT#x!KwpAfI;GHsO1)fnaHIKD$EucgqQzZ68V}ru8}03d zInhr`H(c%kySTwFt9vMAqCc#D_kv|SXl6^{%X)43Kpws&PzRvK1!!?APVur42s3~; zwKQlziDPbv&Kwl`DW2ji3f$~IfO&!*VsAHbE(eF(m&T-?nfA}`<|SY8ISl5F^3R{& zFHgD8$fH$rc>E*sxO;-URII02;=)WpzxH8_<|CNPdzps*kaJ#sc!)G%mJa>Fo+PV$ zr{&fcQ}R;)&_91^2j~2j{PES-$=*XFhPH@Juml8fp?Uta#AcWv4lrmr{+7h3WuvLV znj&oSTvlR2^DmPvOnv1yf6MY0@5tCY?}{$eH3Hh`p?pvG`FBjIL1kSONtlUM>sAqu zT4-%^E(1!=Dp0XuIXF zib)C;q*xwsaGsmdQsCn2MYFHlE#1x@?B-TB(D05R0mNWM7A!UC?9n9!+RF3lwG2C` zT#LaO+9=c?*Xh^Q&H4$knbqSuB~M#LDuqQVj)e~3g;mE_{$a0mn=#?bE&U-+w{1~@ z$A0rqTk8~YI5V>X`yWLbeq}Jv^FXpxI|5Qt?CvvWk$8By0mK1czLSz z3smVC#9*m$u+&OeYEG70W}Difm9HpyOHWXsr^-{Cx_nqIt$bD8N;6oh)6Gc=RUhY9 zas9PT8+B8$s!lAc?u(f*t>OyKTWD0Zwk%cmTp=L^dW2P`JDVTWd~yW;R`xS3{Z)S` z*MEAJLOp$<*;b|3FfC)Z%q1(#Ha)3YDq|h;bz3?1tWZq^$Ma7&nVT|S&52Ru9HqCn z`~+$&mwzx1xqKb{Rd0`n$EfQSY%~hA@A6Ein%7XnbxaRz(woiGJNcdK=(Y3p2i;y= z#oH=Wgu@L3Db#4>*YHmfgrzpos^MRO8jrl?ue8=xGbYsf=x^0#PculcCYG9#LNmn7 z093P4pfIygM_is6nQAZ!w3X+8wJdM|d-I&w2xBNL=dzfr+711I{mj=KLWlk@R9Co2 zTSZE>TWU2d(=tA+nguv`kh>~=ZRC6LM13fKB##tE@7XrF(o3#_XMO-asvDEk3yF$3 z!Zg)PPx5_1zVXdxNrC(fsgSqHJ-_LdUpjG;Y8FU`bi%v;+`()F^-_((hyIwHxi*KRxnD2pWx%``PEsamQ-k6)Y3*@cp3>B^X zj~}~mj;VzZ^Xrl)-@ubTCmjoKL0;ltyV8pguoI`KK8r2j3R?3mMTP#%JQq==f32ot zdWKjax)tr;@j4kdBjgE;Ni6q{-1*31dgMB}=6&}{b$D0;X!`(DM*J!2_u~n>SnH^P zV|G{e$@?$6PA-GL|6e!nlPBxW8jY`-|F|i{rhe-Bha8k$!zV2t;F44o(VS3Cq%g}) zTFrV(x)!$4@I|VZi&agV7P=m7u3tCm4+ZMG6)7iEWK^`aEJa5Js$~oHYrd*q)xMk6 zJt|W5S*^Nqt7^z%)sR*lqEVnId5iiETU9+4s4C1;QqxlZ0ntF3RbZ8&MeD^8Gi1|J z?YPsZs0y~BaL^yBI*?rTHdF@zNVltQC{j&WtgT(T4V8qx(F2SQxMUf1FCSEFc2LZX zHf@ojwToV&7hS!Lo#sM%8dVXS_4HgLDa8sSpHo!;CRO#ozvuL63yh6Wo~y{{4I649 zPpPc}Z50@js}5e>au6?o!@_JS5-d_t&sW)YB81Nwf=i{^P+bK^(l1K22Rv4w!kl+e ztUXFF8L>u~E$^8Q6>IpW;{)P9GXVPQfvEyvp6n)!cSa6$bjlz9$$t<@`&YU4@1K=z z<*%D1$8|!H^-ISX6R{ajrnK~$MBhU>o1c>sq!NA8UbN7U39G&L780HBIyxZN-9}yI zOK(C^d{Lfwx|yK(m6>&=moOA1=%6TMzebmJWB=Juu#hqZRn#` za*Vb3(8$}Yy!sBnOT~HpC}6Jlcfg#6&UAMJ=GNKq??$j?kEQ^aK;*--N_catwh!{tltS zw~RW{v&Si32S?dx8WkARJK6n>xAhn{Q;3)_YmUzFk)Rrnw5e!3TZ21LyCC@5ZfBZ zRH(j0p1KCbYpnup73ntX_qUn-%(emt^A+5EQuPuX#YH{)m!YR}iR(6?g*rAOA1wBRT zI2TqyT<571jEKf$r;1@wIW$I5g(ml?Tzkzn{klbe*r%<$NvmlH!B(_QU#KyvR=5>dTs?6fDVl4>(k;5t~~8VBmciI;kbbG8hwSE z2;Nj@(1`k)lpEPDRCzB@d8ey+Ioc{TlCPc|0J;x^ODoUVbF)oF-Pm%=b0#fUsvY+( zj$x@G>OcsM7X}dXEaUzSxxH9RG5i~UUyyIy?UzkeuVR$dI8U!E&U`-tZ^YbE!<~OG zGXAsbNwIF;!_DaOgIC?OGbMK*;6J=KNCkPNt^Zx_yt|q-sPp2^os}eu2CBIW4W1x# zd_r8^b4JKpmzYM0kTF7EkxNz!bLp2o#%!z9GO0nUoMMcOge%d!PTjR$3ZLo{gIXQl zSnEI1<5aq%v#1k@YyH%1M#2%^H39!nD*~Q?b4_6FT2U}D{S~)RmtT(a8J%O|DT^I8 z4N?g;GeZ*ZBFifCIigaI$2qIG;BB(wFG!kdXK}u_%)L(9+)1%_Pl~JUWpO6YBIVt9 zQts$k`MZC)hhF)*eC_Kb?e?4zPunbBHn#h6S4Ju6ISF@(-2QM0dwo^@Xv25pyM-CWOhEHIu*RyMA+w&=Js z)}=sO#R@Yw>+syK19iKiT6`6CSRhoMzvu&0VNuy;sHYZ{m$EGO`_vy7cKs~G0%*D|6~g=G+Q+cjUNNL$6)+NG^6Wt_su@*Zs= zqnu2IclF4Px>vrQL$_e>qq2VW()wvG%%|RpInVZsqOUSstkR4~t9j?4HmM-jwAbk2<;zLQ2%s0e#bbxOneKCcwJRFx&*NnXP zBe*6ydHrWD(pdrP*lRy?xa&I?nHISK1+z$MzR1^Z*vNigkUzTWCb?rzpFD0qp)<4p zpg?tO8wVTs%V_8uOtoV?&Vi6+#iqlae9@lf`Re zb)&Yn>-gQRV|ts8?tB$(Bk0wP`mOq{*dS>Q?G~tb1D0d5L&dv51JHS8WG-x6lW!xJ zRvB{kqOrTBq%q{Fz~aCg@gz{rrb6AcT{ji~|9?E9n~aF=)mDM-mZwLVeXUZq4=<>66!HZZ~FnS*9yjWqPBLX*JG8YMh^23pOLacqUFj zx4|z?q#0Yg0&t29AEl8loMm!zXkcKKi9#Svt4PV#yk+m2R=zT<>Rel%lK^2AWXm-- zE>}3oVDp_O9)>FrdwpDX9LCfCV~UjLeM3I`#clGdnng;IFUXzDA-u~C%+|SV)+0F6 zD^kqZ`H)KSo#mr)(@uC&r1*y~C6=XlUrKI1kdb=}!4v;O)9=45|Mtb_q+#H7Dhiw+ zY55FpG2G}F7AiFXhD8!GQzTr@7*|!LPo-F;S=$%E_7$3U*8BRqGDf^tO|c5F#(sz2 z_^k|5^;4@%MQ2a{z5uV+?0z-MjpHzwLyK$bVcCh+%UrI~8^?)Wm0q>RQLMTWsJbpp z666{h!%J~e6_F~HaNqa8 z?v{rr`SnEI(lS4K(GqWX7=rXch|;~uX=90#3+IjCCipZK*_4@3+SC~1ygHyV4jwSi zrmnEIENvBQ3-^yPQVZ!=WJ7G12_!|5nA>(j3dpW*FVIG@p_uf?&5Am~!fonsVyuk+ zsjcnW%2%JXTA{Qywi#omh}VdirNU-F@pf%(S`%F(aXU-M&M7J(F|~N@hfQT{+fquZ z6xO*}EqPdFl>N*$-S2>&%F>n*`HlLk(FYgLVlHk(J8xN{5nOW{TU3OL^!|1%8)z&t zDhQg?Kx@@a~;Q9TFn3>H}(j6xOMOH^>Rv9`rhSEN|I6C=hL*>1(iIVsjwkw#AP zRAxcYD|VPPQx#Rr>lIE!wQgpV00(jHQ{?c?_euPfX}SKE7x9P*Zm=l8Pkt4X$DCw6 z)&k~!s-k)yvS~e9^ScIjz2fB`mki0x7~Ex1O(Lqe_c!iO%T*6P-y@g(g=QCgMLzLQ zPcm1Gsj_4pcn0Q~xx^{~Z0ID?Z+)QkbXT3=UtfUkz@?=7uI;W=h5!#M`-*u*aI! z#kT~xYcZAeVf^C=61!ULw~YvlH#d*OB3mDIc1(-E3(Giq8r||5)pJDlc+r&`J|SBU zB?LIkM6TbOWhiYOlST;r>62L9d5I2QkUJmHH3&W}SAOtjIap3&MmJtE(AnFy1ac-V zHL=M2*z&`~Z&0(fhv~~?6@OgTIEqVf@S&U*pm7pQp#|B|oChQDO8+@U#nh~Vaf5M$OaD7J0gqpe@otSrH1J%TB}_CYH6+;+52en8F0 zTXuHIk3in45WcssU2Y`ac|S|7zUS{AWXyj_{_0~7imesIoqk1X@tpkwOOm2CbpWc@ z!(Vt57Z9(rd77zT;9}*jjTG-zDPFG{LL17AM--@^Ja2NxEoIEsk7K=83GiWHxF)MB z0nQ07tY`&2Cw%aE*`WGCPo>7(4N>PCT!hu)w4epE*G0vkEYmV-RrCE@gADy_s zGHSCJTzE4QvOE}NeZ?`cogJ!*(YVkv9xsay%7dMmmH}hY0C#Q=4zWW z6$FA^=j5|rCFYR#8Tshn{fsgnc;BjHfC%1h^a5VBH+hn|)33{8ziC7#VDvBjntbKw zweqBUkp#LKSu%0X`)!zTlG2On`$z$&oH&e`vUR4MCOQtSxS|ZqB)SXB_ScwXW1$&> zDY6`p_f>IU4*#fdW0u=x%UTO71|zHjkFS}KUFvWeIvP!oMBw?l*<^O8Oc$tpJg+ic zpc6{+O33>(W_r8YRx($EQh1Ea=R$2+M`-OlLVBzb@r`Di{<`@X+mPQzDK8~)cC!(2 z{k2GcHG*Bd*4nDSZq)sr)7EyCmQ||2l|^Hy z2}TWJq_sAF+waL@{;Dt=`My+7-!ySnYO@nedOU5s<$L**?XbLeM*zl)Z58_Y_q?1AIpI*Yp~LUC%}rQ$O4YV?71$Jt;B_ z+D=JLGp_KTY0;8@m9N~eNt#l^?+7)*UE4M-dR%=Qr9g6T%ICja#C}kX@4Z3pc%fS! zbFlCdh)Hu-H9ELp1o9r+gxv3#CT*lgN^x6SmzGmGcx;1E&@I1TtIVn zn%G3vHd$(<3hAeAz%Rs*R;t0(R*|*{c3*5^Un&to!pw|TjbG=NV~NW&?4x;4`%ENU z&xC!011`bfUQ#kiIyTf(Dc)y635NHDV+wnZVrgH}))sA9YHkZuKA$_xWQ7+GGttb_ z*4Cr^d*LWw^HfMTsodqMq+)Y}vUROxwqZuuc2RouSR=y4Yc2LeCFm~2+A_x22(wkf zwt{2)%hP))*49ql51%>&2iJ_6;pTTJ7RQkXNtB|0HtKU0Xcia<940{H=bM!GE7TM$ zkdInlWEppc@KqhDq04lbigA$r?4DVO!bT|M%Hm%8Ql-D&ypu9SQSk^b(%4tZd2ulzq>wK(}VWy6N+<)9Z%y8RWz zc@D7#%r|x~$_6(rKZ2bkuA?SREuD&S;)D*$*8~$wNXksi(iRiWnV|mi>!yg{5YDmU zZ)Lca@i!%xFT9C(>58Np(z+nq^{Dq~fOr+TtButwIC2DlsTHU(DrLX4*0U;)i%zqN z6F zCWW9AVy$?3-mqfQ(uw?pK(dJQzXE?KE&Gt4tK(MH6&k_ z3h%gl@PGUl`+ZUJ{_$aXv~rO*!IEAs#GAMA5MsV8-aoIMq;T`BJmJX6?zE;rz0ET) zH_h|(@~Ki*IS1|)Z4R^ah8qqRU&TM-^IXjao4$u3bpnX$iLH*Ha&K(b(( zwPmT`8==orQQxZKU!bi#75d#rm{q=6TLnj%&4YQy;vQy_Z2lqU;~r)Pt#x=ZAlnZ! zBh}Kcn~&;`sti;YV8jFR+%dKnA7%f|+R7_o;!0sDb5Oa~O3Q33(qE4rDk z3B9n~71}a7!_t&c0%C;a*L224Z%>c><#)Dl-fzjeORkd_YnWq_d0m_+5zWM~>XEyAFD+j;uCOK! zUaBTsgJzGq747otmBnCX>Pv9?e!5k=`l$+UHe zLX2Y*Tm(r(fJ2g}n&o)|EVPw(cof%M;Y5)_j4j$S&cG$w(nmDEX~R0m6!^^tDD$=X zp#D3o+YU2rO!d^X-Ao)!jXo-MqU2BHHy z{*Tu0XryI5RF9U@lON@)x#c2*N!DBvgJSSscr@LH)?MK)j56A$%81V6pLP%M26e2F z2^0M%WEUrbG1DTKsH#!KqRt0d1f&?O0Ty5ip}RGnz~~*5bYt{R!J6J#uS9(vlg%_X zuVEEs64#;tXdR<}6vU|NapJCAZUeZu&N8WmDa6ee2BqLdG~wlth2V_;xV}Ul@h{4~ z;1h-~&d9H8KpF5-U*3D)fqwai|Jut* z|5Gl#^m-{m83nSigqUwnH+jXY<{3StvKN`f{U$?M{eV@U#IOTK1ze^YV>Lsj_cdmz zqjvgUUCyboG)3;xv3FPl{wzw1s8kzKDOFWW3VT&m4wyt)GV}F4`h$i8^|#REX|Z>~ zq2{Kk(W2{1KpzltS9oKn#x*bHZ}kMq9ImDT>4FV9wLUn079=!lqT?DRH;N~9!nhX! ze0{@(oP3w>ugK+p{x$iZpZvbWd*7tw3Am(llB#S<>a$-KEYpJ;PMnp0`ttpB+~?&l z|CU0vv9l6re+^eQ0>GJwk|Y3}Fgb)5i}DoeQ=^nF$a~9~ z-C8!&jI`FvK5FY7pzwya)t%S&ehTiW*HFSN*D~fjtK6#sP~A{QxJxk!_=TaS00-)= zg*Z6lUK@&X^izM)PmDWLRkWo?R?M=;|Hs#R$JbS!>DtT7G?_tW2)34=~m*iPFK&l|BueWt{?x&gJBEN5`FbU7VFQpV-z&ymXK z_?zSx+bN-h{I@ZFv1mvBcH`Dg$yF~n)~zToAlzi0FEm=Fs+1=CdI7EFf)x8dpu{CI-@l;QQI#s4lXDH?rDx}rHyn(5VXO&i0!*E!)Ux=lzDjL3xprOW7w<`=%sRDp_?mkLyYx>G)d z(8vfL6UyC4y-d-}P6C$vVS@o==F_t?t7iC;_`5&!T=*8Xz3)*efBZ;T{myIQr&o;O zHvyWReMz{tViRq_UXE$J_Sn>fce0k4UFxsmlvP$_^9Mbmcg%P?T-}KJbPamcxz{yq z#{;@G^ycq6!g6;{JQV)zj>!?$3Q(tp*U)Ne`|l}dK-J*azUJr$#NPGnS<18WyS%tr(+}!9r@jdr2pEEgQ=U}Cd-ecfi1ch zHfn$5{g+s2XhrC2cw$U4(j!CfS#-5^Cx0JS6Ue|Z`a8@%!XT#nZA7cuf^&4)9*no` z&(g8!Rg!}8TAe1N_mg*&ikf0%VvfQ&>+s30C1hg_t7R+8_r6OVDz&P_NfzVsTtOni zGP;K?Mt@pPQ02+zPlWxy`CVw9@d}xgKL}s{`9pL*34DhKo(UH`3dlXNg>;0Sd})VI zgvkpJh4cRQA~dO=h6}$#f5NT5r|IbXbbmS?79My$EI`{@{qzT+blA?&4Gmc@*S~yo zbQrSq#n6u+$^Cd^`r$^4oorw6>pj!&`2pI%-HYc`uUa24u@yU$y~vz+lgtTX%&%E! z^Byf)KBPqp+L%?lF`bw;B|N@8YbX0gGE-@aH3jEJBGeVO)5b?3x-tdB5|J-e)!J!I zGzAkyzz_x7kHjC~n(*oAMEu1;VQ?}H{`C8}uBqm75?u#ePN80HBAp%LHVjJ9Z(8S4 z$P)uypTO)1u4`w`;HNv2U+ygal9{Y@o59aoVKzTymvPHf;mMzQG@vk>I;CQN^{yE} z@yGAFa?U|886r~Ee$-ra56kbMF z37}lb3(%lM$E%t||E$u9bk!L=1a3A9`q%G>#f61pI}v^}#Vl(w_A(GBea zWzz145_q^YR866mQk z+Z3%#rO`1~6jeMWEOG5kK1R<#Nhi=nXsgQuMd$~R6dPkHi3Vn&>YebYau>7JqF)N- zj>vGA!WUr^~*;-@(8iBtC@KBOf8w zV+BBVW>0@sfHZ7$`?SLmAbSIn*HHkMLgTgAoY#Yyx3%pHU%Ss>C_zqC%7JA|=`Hw2 z6dm&aH$O)(h+ag%WEwD8Nm8;9>F-SKPrb`!XUrG`D%tWHA?7ze2>Ymucoxmi_^@$e zrZ5fLY15c&F#uwP1)yqF2gJ&(f8`zAQUruecj##X<$6Lq>nN0X5>$MOr4Aj7CpLhT zTS(tnP5Q>dEynph9sWb8qlX_Fu?kV=OJ9h#sxvL5$KKeF!1l1t4Z0r>)Vm0O1=vD~o|g@WK@Gz!(doEUg|6J1UPL?N(^u4uwwJ6+VYS|j`cRxO9H z*i@4y(s`_K3XvjhqBi;z0xE05|C&tLNSJInxFRmyqlq~>9249GIpNf$pw~vTI|0z8 z%3uUXTB~TtO~t~T$**%V_n|z4-|RH4X5?8~)!j#_>3zm@rNg|^B=*tr zOyvna54%MtHIRW9OG7q#&7&ck(LQttWD)a_#wr13D|u>KyzzlHr|MVLj`|jrz?@R1 zo%VBW^c}2kV|wZ8Rz50~%37E?t<}|rHg=1;Vs6s0B_T7BzI6(qCxx~D(TuAurweaP^uB4nM&v^`CWofWzg8yl;W*>{C=q9X9vo7@vB}U(z5ugV zqg7kh1$Qy{eJTu24p65nt-vsNbfxh@KwSJ2{xov+twn1$LSA&Mon{80+td>~&yvW-ac%LiL*WR;u}$G{oW-FyoGOtkxh@2ZvIEQGn2-@_nFYK{!JY8 zzri#23LTa|2;aK6n*F{_tmLxrk6-Lhf(+*&$i8qNT}<{o&pb6BhCBLA4w;N^^=IKT z-y9Z3&%sH*p*H5oQh8D%naJI!Oxfv4sBu5JoO;$iMorZid!uv&p(ij*j2eI*6Hq*67n7BMQ*29&h|WpjnCQUR<@X|fv| zCIC{L4)skbnZOul;wYtw*tJ0LH== z(S*lCg%WmeXM`cDbA(1!a{0)1CFB+eTv-t;N~e^#sK1?x3xHnuOpPU$+1!lu#!fXZ znzo`B$;(^u1bLU{&^v20Gr@99F!ylkAwc!$tR* zDS|7x+eP8#a$K@=Uy7Ei7Hr?SR6%0VVBqMO^P?-E7)@8F(z1!gYOGm~J3Mz3j1luT$-RB5Zg;3-J&1M}8yB!!Nex zMJ&EFxu!)8Eniq~4o=CQ_kSObV47}b`uhE7VI>lC!s3rA(vNMhIlmQ-cH2t>gxD%`eAYxZyZ8aOS_`ocl|4Oij-$d$Vyj zlG^*kQH)05SJQM+idkPUmuD%)soC^e=bH%_JoWrL;ghB`7X2j5T!rtA`P>%mLiyYO z0%-$p;%|G4v(RR8?a6TFCrPp``UUwp7ot1g73OWCufrh}KAJGC*#AzLF!ky1iO*ia zYrQaJPVXJAEhoU#@p`x$ZS1ZEPt!Nz)o}kKG{%ZL_D9QG&#(^8dboSg%=%)kJ^;!M zSc=8_G|7sj7CD_tob}dpNFK5?;RpRVTBi}d@zVV&fMTRlO@QGi!tkxMoo%DBuFDqM z*d|j5$tBG+wJp-W)Ix(|b+(9Ytu&tPF^M0QP&EOQO^6b%wDLUIle(ur_N*Xyo?2it zU3ay8jYbGJE(HtW#HBFQ0#v0?GYu2Ejf4F`nxBy(0WX$^;=HDrcR!}OsA!aPzqkw9)yh!lYHF&-;Rshbx8;G$jerp+SE}v;`NY?j zw9=)yLNu!o)(VtLTWCcbrEDD27|puhW??RFK#N-vs@%D(oiV(79Hsn?DoSw-XaoTz2vQ{s zminQGfDhdR;NB@IU;7l5IsR>R_Z7^+e+LvPD2dW$Qq7(?p$*TDR~uAoC>cmq!dW$`Jrve%zVYrN9-dz}?IC>)Uom9WLr`I`ysv z2unmmQSsL1J>invDiHDNh=`ZpI*w^y@KG5K&6s<%=2?Gd7(_)+JpWdV8hk{5`#}B8 z$^h(3ljk?ntajTwHo|>7?EV!Q4B(@4D~fJUiHBV^Z~2I(Sr$d=c3UZRcO;gK!JiJH(kW#1cN%S(S^W@}4`ej6&h0g^j(E~4lZtvm#1p_eTo zTVk==+EQF|Ur=RRYV822$Q{H(w{nJQPacA3ejGmWg*%ym=QpGzz6S%4x@ic4aKvKr zFIMjRQyAO;MHXDo-wmO#`$eHg&&$H3<=exm{Y+J~=~o!0AB2DWr+Y(&{&WRJ7l;3M zNfT{O-^88pT)1b+@o*QN6>PI`4}AdtLTg)~@=clri5Gny0R^eUi1*HM6Fbh6rCJ% zJw+oE9NO6zdu?UtHUZ#i1qmHVL&*9Vl9hNh&+2G;cCX~KxSn;xDIE>v z4b`d(;0lyLC5+K1c|@6qMjbbal5eO?SgTWyD^*&gRMt$Z{l}EXXr@-SIu;F9QLeC! zRfVYIMFeyNyafhT{(#yJk$SPlFc%a7Yx9~OUlEow5H3X!Rsp89QE}=aIY!_khCn*E zX1liHQg{>xr21h5$<8CQ4grJFaM$k%!4=HFkC3&MS)x>^Gz;*vkQz&tv=Jq1waF-B zC{}G-#7zuDoea+&8T1=Nw*}a+w!TaIuepvgNUK&M(U!C}dlLiI2N%&wg32m-^VnI! z-U=#@A}QMCQ=zAg&NX3|fP%{i+BPjX5DGs{{sD!yU;A-=7_soxFocxQzMz^qV2XfI zAGo3i=wDk?rH-Tol8MaZO}l*jjg-Ft*v{*&q`N?Zf9J}`7a8WfqScW|2Y;B zn@YA|=L-}?zlx1WYXF>T=7DG<`HM>Gc^*<=JGkH3c*nQt4igd1CT z{I^W>^T${zDg4FIZi%H3PpNaFA3pxf8)$JaM-WWw8zTrtmt2pfR8K9Vd=Ygw+&OY8 zPyheI_b(kE);;|p9ju6CU>z?+?M#+aPkG+sdp-=`y*kTYGLbIRABMBezB0^Oeh^z9 zdvbjU|MmT{IBrDZ>@W4hC;{h4&@ub(ZqV&6dZF54rtciEU2oi}5|1-%F5cgL2|KC3 z-#zaHHY`aZ9Y;gM4s2D>e>J|zP1vrRLBagY!cp2R3~o>hwE0PVuMq*!T=-4-(?!|q z;OES0&lK-eN>pH6=J5>26Idt?2m_jRT7PPA%85VnUd>GW*1}8%>N*qfr#mPZ=z~}F zNl{3wN|98&a@}oF^U8?7UMsrkqYmn=d82Vuq3~lP9#G^qN5ysJtSjBzS-}yX()DTw zvP!6IOG3F)nHwvVcq6j`)`CLch2n;$V@u=D7Puh1mgO(1e*Il@>@KI={gKP>ePbqq2 z6XLd;MR0zmPCNzjjLD!=DpV=7t!A{0XM=yax#Tex&10HLRX>yF?EFkt9BGW|f!&l8 z+$7#DJV|ccB0P4*i*Vi9OWr;?Hq1#|M&sgJ7kbV`^P7Qw*g8qkA^a*(yze3&( zz~HU4dbzB8O(;3*27azT376i&B&i1jHlpcYFNb-kK8vUo-}u_^g9UA|kxPuwX3}^> zUfC1>#J*^BqQE`%I%TM!-5MedYq4_I0$*#u$-hwc&auUb3E>-zzmhDwf{B|J6Ce;* zV`2+GV|xoPK?j^qD##K_ULU21eGBo04V2Q@2*Ogf=&>qF?@2_C_PH3?Z37J+Rvdhl zhhhS6g3le8yjd%}qtlKGH>%S1za4hG5W<&!ct7vqKg0dQS21564V9{hYP-7u(fwMy`*nA>x^H7bI!Ut%%yOD4Qk)_zuUkzvTloL;&k@);nunx zVI(b|`>NCddv_akCF*bwg+=$x=PphKBOb!q?e!qZjAqE0l5$@M7BX=75Sh614!_If z8h-}m32XDZr60Ye8&6WUfJ<}>yb?h$uL1I6PT^lB#kkQ5-6G2IYxI}z4_~|j6Zwd! zBj^>TX0n);Z9^|Pa{_Mlc61Z5!6TL9SSJd7)VOYEz8B8`!Ys+3%WFos5ip}km`5Kk zTco1cg3t^ewZxlYr;JiFx0kefh->Ap=9+*h5K7b%zdS=ON*$b{Yl^(=kEOF_+OWE;hzH-43&;h9YH( zm=sBG2%j|65wY`G<|hCk7XpW3q!8J`Qg{?5J%fNchg(~C5(Anb@N6vVj_39=SIyDz z%^y<mBW3Cx^w5~Q^%y3wL0a7ER2js`pufS` z@Tx8T8lx*cN>8bwtkdte8n}#**rlqZD&Vgu2c|dPW}JTJ1TH12V3@=Hqnl6*R}jxw zu=6><`C0JrWo7}S_ozB4$+IyO62Y*Cbq9G!wuBHh6+Lh>IKK869pf)h>9rnmK_tQ~fuha%t$+ z>+2+`+#J664;A6`?w5zpefpPS%Cut?Mc>PNyOh6ch}~WmZW*v9j9T$-=#R>N7p?Hc z!+eVb`xJcy3H`ca!DWdJ+3%6{_}cD<`ASzDq3NA1iO>Sg<1sz2XcMW8o0&_eOD8-9 zf<`s+N}v{6)OHF5H6g5Pq`(ojE!1y?%SyoO)Q)r$sw@?yNGX!V?2AbxN^mN)M=_LN zYqWy%K-z^&@hlm)c3uLjPbus5|Kdixa`Q9XNYhckL8(wlA&xY1f2B&LN{N^S$aFpw z5VRm95zHDuq@*51%8m!5%9L`BH7eCRmW)622ogBPevgFm23Dg~=~$Vob@d15hAO2o z4a^=lrt$FHP}v9u#;s$Tn2oHom5IyHsON^l7N#+4dHN9^Qn=$H;%u?|HE3;3gir$y_td* zFf|Pwa0bThEP_HVXX0U{5*htZqgLxRnz;%jsNnL`mhCccS$it{wHP&nX!}gU@S3#? zm}h~D(K`7g)cO}s9jY7&11UGNqAZx-m=%c|o=Z(bUWO_e-D z9MPNC^V&w@9IV}fH}A^o4P6lS-7B(z=9^6BY_-FQ&_Suv5=w$sop>8N70ap1Yfe5L zKd+4jA>y2r=6KLZFDh}J#??7#pkWg~vZ%`uPhEe4rbAn-9(*%wqLyIG$v-hmA|5yZ zL)_{h$8PNl_S&F-GN2S&5r~lae3F=8EO3=JHq1i#7uAwcF?11F-LcB^cp&;JhkJk@V$$N;OhJL zaC*->!%u%cH}vRnRrtgwZVR9P`(JYWH}aU({g!ae@O7bT;rlq_o(p#p8Fyy#d{>v0 zW@0UJa^E~Mge+|9`5@Zc0|FbgW;8MluRrfx=dV3tmHH2}7~+t371bwNcLh;}(@ZQ(LmGLL z7o3XVR}jzPL4_aJ{{*F0z$GILs>(z>EK;*+Vy&6cCa>4XT!bJLQUe%J?rN!0(#W0# z?w*Y*QJ3a4x?XKc#L0{UQxtLzl_`x;Dpjg*V}VkoQZnw)+)zIb=t;&ifq8j7A5p4w zY_h9$^~@EXG#s8C>Kc#C0Tscn0ypHwAD9j9Apu+HYOP1Pb~C#)u`iH0$7i35J~|KF z#>f@0aPQ3zHBl0<0I@}`0%B2B)2uCRg9l1mF`o;RYDBVZL^7oqx{YdD#I953Y{aud zlWQV~0ba>u0@{f%cA9uL9k1#PV%;fptV zrr940b`i?gBs%g>r7&;#v(JRe#Y{R%i#roX{^P1Cp=QBv!<}Rq+>OU3-!UQ2-TpYD zWYD2Sz~UG3d^k-hjZbLF-q5}$#v(+pG^ZpYSk%DIxV2?(=v}utl$@;wc2W2`zgji0 zEhniwWJ=}0ND>LrhV^#cinHnY^T~IPj~KSeJUCNr>>Ss`zFuK+~hnsHx_7kDI8kY@?w!QITbgiv@Q9pd%1DFRevFmir zPX*CzGtR0f30ExUgr>mRX-s+L?$=`gB5GitTjD5N?OC|t`QL=^Us1~w|7ZC5t@X^C z9tcAKowy*E?$(s0R%$)-1QHxL{eqw3CirIf+&>Qsz3;%qn?YwQWUL1<^TKb30;VAP z<>2jM#FBSnC;xkxQ1SLho+ShPByn_-g9rN2H)>*hH~F-S81uD6EGuo{3n&xSO1rQuE0zI#0Gd*@sFoGW zibOR9MXIg$Ta5Qvd^4n=^aI;oVuAc6z95@ z=Aqnxd>w}8 z^nFrG!`tT4;Oob6&k(Dj)-yhH6}a_ZVRYN(u=aqs_bh3H^l!yxT|mm<#?2u-)F0Py z0akzU55q;*%?Z8lW}Is%P3Bd{c{U;dcIDH>BGz0)#=H}NZvn3Ob*PN14QO|0G4s*$_yI>J zltM`~+4x;I@axwst4Cc?PM6VrmD9n6DYz(<=+dg^TrL~X78?%gsMCiAATkyW#zN1k z2{;a5Ln)gVN|eTN{_&iD98feCByu?(98ykPDOMWqR?trD6A8!hmyBU0GqzK)!-xbv zBcwW15cfDGjc04zg?mR5h;!qkvd710_bc~wrSXWdfM(?w5VouiaII4+7{k>^*Ey5< z7(bM9bq8jKF=O~h#>S8RsWk2&yNqL(>MjY@a#koGr{3s>%JF=R8GmplKo2J4evxpl!vO6*+r~$XpD2LbeB~&T@I$j zC8oCMOu`JCr(;u3@gNRRp%u|_9a0XXyO07JLdvd!)vLqjL~@baG8;>8=1@FmXjg4k zKjbu~Pn~Zth2kGEdLB#l(OEeDW?Br?xtzn&@u^IzItk={?8wXE|6XDQ^82CJ`8S5X z?azcEJF0A`nIq$CAtqa&KmmTuhGvWrN`u5fMR_HZMn z^flwRhttoyh09(TzV_2WF=~+7scEl~B}YgB<|nTHH!1$Y^Okh1#sDKvrKm;lj#?v; z5F#Bfeh{r?^9+~L-SSDa&*gjQ_k&+<9_rr{&(LBQ51_TU>aVs8v3=jF&W3<_bk|_F zPV0;qGe$6wV%&Ju({H0e=6i81rG3y+f+1Gubr2ZoY|r^>Ko504IW3+e{A6k zK7T`abQ@_cn`mxG4A?Tc`P;CmO`Ul>gunmNK=%7VIPL6f!nMhkaLuUA;Y*j+)5Y|< zQ2eRO!{8d)CXU}7ZW_m%q_@lMvyO&7%U=n%8tPr}N_g-QZ0EsqUkn-X_+FO*!;|PpdNofvlNiZqyU(V<%eE8mf!d| zpsbExcr_?h3l7u(UWpsxE*P^BZTW~+?iex8WB*CXjly1fRt?;Gz*lq=cI%&65XJz# zRr_Xy8pi4vs|5&a!L54K!`cJWL-oF?VeFCF?B{j>k>$9j=dk~DV4HJ;dm`=F{j&l0 zd7K;LnCsTEtlh^p#_A=4{c}Q;0x^N#bkjdX^$EJ!;to=11-^SF$s z_HjNkmW#)GqFfDkP*%+)qm)z&*VX%Hges*%pHac*Onk^hsj|ksY7Wc@Wj;{i6SK-k zbt*vvtd7|~J!JFJK~AYuP`iIxek?PF)v=6Mj`K`okP6%*tHi@ihkXuB59~IL-B@$C zYS{tD!wi_}5WCeMb`>d8e|QEg$VJB=;sW)Dxs(!nFxGHnCM1&jClaM@W4Sp`Db+Ng z-|Mu9yi?}pI)_V@@b}EhyDC~3B3@53jb^^XCYY$Si7zDE?0;8_bfaZapp%2J82@b1 zN@!DRLsP&afP%WD@>XqwHa|2ZN;PocCd`K@HR5V2YDS%qhqM-4a+QUlhog-LFhm&9 zdeE4wXI<+pW;-y}hKC84E}^LaiB&NjU>3#sGSv*+Cv%YX29vKudebbtEmNN6DopO3djxagY$xiT#&q8^ zDTtqm-7pK!?o7P4bFnYlPf}9w8k1!|@nZPY-x>P-Zusjj4-OAve&0uSvRNwP)pYqK zqYWUfM1M!-j+qorH*F)#M4$HLdMG8isgX&LuSeg%rjZ8FjeEisW448!=d1VsD17y& z{R4TH0+7|pX#E>Od9p2kN9`VKHZ_d>i1X1Rwa8-oGg!&I>D52c3jNKnfD?4=dzGvM z`la_+@idOnH((cV%vN&i(D>KTnRW@CWgdOut*#bXKq0udntY{XHNKJ_*1|X~-wK#W z$Apg7#pFva-a{(5O|Hxe!dXGXs@KA&U0X^r(yHwrhHqaof@k@1_{H^2Vf)b#9^d*l zDeDjq9^kpSUsuo>Zdm<3I%ngmz{>i!{}>f6Z#fb!Yd#$MPd*XO|F+ph-wfaRRyN!? zd4KGuaaH4%a9!KZklZ%!cqo2wG0Fc}Vs@a@=Xx(hav!-x@AwUz;oDa*#Fw|o*h+oh zLko}4f#z@+viNYQS^rv?b>su4vi@U8o_v)L^RY5pjil>~-5lLT4y{GQUn32%#2>?>ICZI4(yK(?L$bf4WYYKomlb^E$hI}F_1_l zfLf&@JbLf6aDFuqQUwInf+@Kj?V)_nde3h+wxMUbB}mZYUYMj~kKrib{9l5$t3Pcge+jR4VpieK?mX@wg%JbQwooE3M|E zpoTR#VRoplVq;Pz_*X#@)k@ppRTTLqc@TQX*KDaC&5&VVrNCR;!GC&<0 zE641c7E0Zt^e@0);Fkc(MC+_@UDd?^#M5Rl#vYLY3Ppcepy5a)hUwu<2|)aBd>U$I zIqo2|d|*l#vww1gea~07cWUtRo>m%2T90A-wLs(&!Z;ZqD;JQNFh`SwcO(Vi_kjmm z;DJ_blgd`nKYF*NfFv@4V~OZLCQ7Zm?($Ylyi5}xEdV_Mgy@Q!ud578ksTTiU|H^; ziw%K~30N2Eu{ucUQfk=G8AbhWI`PKt#oS@3bIx6Gjdz4|+WD9O_)o&oChDil30zC? zpX@gFnJ(<(S4!=RHi8Z95X7|S7(c!Y(}5kRS6X2~Rz71`w^9?i%2UC7-Aj~&JsQq- zP2iUWra%!hzs|(jUcIoHiQ$5-RsDONLH$G!&ZmK~(kDE=FxZS?a$$p@ewD*_g5 z#}~E;Go@rPKBMJ?+@^uOXM7SjbkR3Lb;FLZdM{Iv(t(UBf)~OC3pT$Q9;Gts`!svC z^09zMj@RD4h!)C6!p|D^hI?RwZ`{dG0PF6|v#tmim#zvow=z`%ot1hwlE^k?Kb9Wz zxD!E;edPeTfMkN_!h2%>N4^h}gDr-9z!1d)j~oma3|)L6j9x{*I6Uxkj{Z6<#^1gi zxBnW_EG&OtO>)5+dK<2O?a$2k{s$&>|1hk4`A?V>e-4X|{~^pi`hIApq_ym^BVp7s zW>kFocj1YXkaoUyRJYh_URv~x#olhGycK7N&9&gPx~;0M%C1VU7+u4UJ6)>eyS>x{ zGQyolK^L<_p;CGt0B>gayNLFh1)!w^!6x_x3wr7n(7#L@e1{uG%NM817bbU%hh;_oCVhtJ{w`Zk)Gb|5b{outCvrSe-JV&f{5%9(-0BAX zSJ8dd#$mnMu{b6jTLc#@h|4xeXCl5X@qYqrF-7brdZ2lr>fZ`qv^}#ZV*eD>|2+Qd zsOoNjXEIRVOu(U)5QIo?;K3!`1|ALn+ia0E<<0zRYm%*!vwTDzFmZS)Tp$O`ra@PX zr4n$J1Ex{QGMl7dlgeDqCDC^VaahNdrxUbz1V7ajVi~i^erv;?nEKlK&}RVuTiySi zze~c6{hkN|SLUbqGTl}pm?7|V`)CZn+S4ngfvEjQ8n~g6;!|kg+D4j$)I$ffqWlFk zaOQbNIBf~^Z~(FM20&+NJCKC*-xU8|I)cp2U2_5qJAit=pD9rA@~nP=v|2E1BlYTQ zUdDkBX~c4cmnlL&@J5)k{aBnwF`hIZHxTGc(weL_L{=?#=wM!?d~OBme+2wpFN*rF z=q93RP;?@Rgjq`VhOL!%BHtY&F;U+rgv)V!537`An=x}et!EhtJQ?4DqC0q{b-$^}G zw5qy2L>-lwe?Pf0v6T@V@V;;VbIyd_m&i;XCL}j+tX~HmL)q&=yhHu*5LaQ zP{=)YER5OsYG|VrY~rpr!epkpo4WtKFlqk>p?%N0p_y5^8@4g)%-UDN$Q8%JV2&BY zu>>cFW*5dW(7;-oYpr7&N^@4Fn3t>iC~KsTW`Jz)(esn+?eGF()P&Z|(i za{>e~1??CV>z?eI5VE@`hAL2O)Q&vdt1*v+07=OdnpWo74MXG=LW6AcrN2gdQksM%+g zqP8EUDqqvs3Q)b9>b=5f%oRO8-gkXO{>TAtNT0zTt|h)Vp}tZnQ_qLtg`7?xTr}83O1Nl{OkIhzKuR)i*bU=i zPK(fA-UP6d%7--|B@`KN9=9LY9xlDkWE=opy}uxz?*|9`m6E}wXhKQ|m;^@QjawK+ zZbdd=VQg7P(u8MBV4jaQuBkAWaUK^%z6G$KKnjsPS4?J}1fY8!0e;G}R19JWOa=I- zQ7c37#`4fZjGqLaH}2=GQUmKop;Khn&!Ze$ADn5Cw$<9!&{#hs#J7qdeju-LFdG7B>xk}pQB12n{NU%Pd-mgKW*l0H@AV#=4&w!tfk#RjjgkAnI63A zs55n(B)N|sHFv_&MlEEVJF zQL=c`n{@eQBFry6$nAe4Tzq{U?U%Uy4r)X`GY>LZu=99WPuGNd1`|31-HVDY3;%j~ zb9k`vXt=Z)^k#DK+v+!mK5e_ge_m9FRd6AR#aD(~hpY>?HSY?y!va_0CA0B+UmQFS zb=biUm7Olm_tSJWCf%hNU)-0RU_-k1%s)wd_Qi1bT(KTzl7x#z`}^nP@pk1oqLpI4j_;2fS=A+rXV1%i-HwLvGKcFmy{3unf2X z^FqDblhOO8giP0(I`$dfeHq%kULmhBV*7+p#$Bt~S8`pqxsR~#QzSl4Cd)?!dnMv| zQq4z+NG*8#n5zDxIFUY|Xk$fv01Pou!J(sQRn$V+624sibDl#8Ag>I(~Em>GyAZ8uvYp9icxfvUhh) z3qW${vIw3*4L6wJX$z$fc}5D!I#T6G*~dvHdY#H0BjAp6Nqb~G0y#%~G`QMeprRgL zDQJL5B6UOqBQgxf^Uo&3#I0HRqf-7Ti&7(m0sk1%hA0~RP%3fAjLJwREW3yWxsz`2 zQ@ZO%x43uQsz>sZ>O%_6aEPOtBQ3~Q#l-X`*4vRaA|}EyO`N-h{o3K3W*m?cFiIxE zD<)%FA>9b?G_mg_qYF5Z;1t3Ox|X`P@zFxyyB^=wMCfJ`e>$oxtx2X5Z=f+Yv|=yC zlC;a1L}a#^{v{0#d&!!bL4unf9$m>4aYUS^T3vVh7#B-$-{Lm`=u!+EhG&3I^x7Z8s^=&jA-Qq+KAOdl^y38U(8{ZMZuy+;u@-J)PPv^lqTlsqcx?M`!`NxN zLbnoJMVTLknyEX(6MOy`=InZw7N^Y8g=6W_L$u3U`@8Tj|JEmx%LTn|30LIShdY`M z5i;07=wM^Gy=h~(XX1`<<6!a-&b*ZUE(%}zW<|K8VRyJ2_Dy>8{)%s$up794o-Su( zXwRWRD)Ix+%LjfBByYV)AvuX#^Im~)PR79U-E&-L-1-z}A1HL1K<6m2?{{n;*j)m- z=aFLsq)px@;R_nM6ZPOOzRjdBWq!r?5#N4*23^CJQM_`Dq9+!35B@d#a71&(A#^8yNd-kduY_^M!oK5BBa0tipQRYXK;#h?nD*eby z@B)Sn^dm#%9Lu;>HX?w*$Nw)8!AlTPq%@`fiGGq=FILB0oGBaWfYQk%-AFU-#}`Ih zL_0+4No^6$kUF2embZ{miq!UTvZ<7S3fvG`D5K<1P26o95=IQKQvyoHqlu7Ag$AGz z6a88Ru4W~hXskrT#-Y)Xf0W3LoryVv62!h(!CEcZaS#Q8bAle@FlaMM<5iIq{$>n% zLmmITZc=v85Y-rnteWq3400o7NM?C8u&oJCnPo{$*szVPTb|TL(b5DmDjMLYMp#Cx zCNA+|X~7s8H#E`6eoa_9lb(eR3~LyrW_u)#UY42GAIv++CK0@llWgB1KTRQ^q5U(N zaouB%SuECYfV06TEqJo1{ahNlYxn5IGUzcC3ex$daWo0SiOE>!PNl!m6gnQYQ-?PF z1uPYMFinGhv}z`k!sYg9$F_#r&C6)Wbp^op_3*jxmW9d%@5Sy}cN6#g7~OPF{ZmFq zwPNm^k#Fs7`cvLdCE<{Rza#Xxfmp@0c<*mz(xso5uBA}?>c}>i{IWVwn)neC5Y4&> zXI>ZK^h#+a?X+!lVlAf1Dp+GR?y0qOaad0m?M+lKt~g+U50i(|qRbf)Hogcj#@eIx zhGb={lJ!)5FWy5S!c=+8oF#CK0cdli7Dt-l;J+IF@_= zM);?H=|@WHJM`s#kI2XIFlYC%c$VdKR~j>JcPJ|UKKoq~{_`v4;ii^DarT(2+cz*Z z^LlKR_1G#K!b8nR!Z}|x>FKBR|G6?;IrQ;3*WAr*Wbwk%*E5y#9n%hU5zPY-&4XP; zlQuka?pb>`-pAhq^O$}TlDS_y=3X3EMQP<@q!sL$L?fu^9>^v327h^ zQoV0J(Um@&qG-U91EF%$t57)a*I>kU!v4u-QV606QzEo$Lb$8|)%2?5Feh@rcQh3u z=q0Qb58KufEep}TR3_jTA5l|tHgS#NEcpb0jo?dG-+eZoJ$nuttHOhM(&W@QJQe-!SA4NWo_LKX0m3ZB=mEsW` z>2*ulD_&p5B)UE=|PdK5{J6ESHd0m z?CDh#zscevZQKNo;1zmI&rBZh(lY64M6Ad6a zOhy}B%WV|aa1W_@b;?MReWan$k+PIZl}O2(7Fn#+Q;v^&xNDhG^wq_H4s1m*OTSyR ziYk-}9Ls5^Me>SSTXl{VIi{n|y_7k{48lR4g3;*AQ}`=KOt>=v&-{b2$PGtH>~o2E zB_~_Zq5Dq9ooU0aTi?+{sAfEz*NXAefT7hy5}pn>4W$;w%xRX=CO&J5)dDDp2n*Y( zGbSqEg6T6B|DF*UQ>dgJQok03Pf0#H;#@jltY+eKDF;)z&Oli7dT3-(BrZ+sf#d3U!XCc9j zWHHS_l8#6_G{^iqXT@E~Z7tdKN_dQ^=w~l^Go1g|miT@>+7V<5|LycVYGrDs^Bcv zk7Ajylzv3sG?Xxl9&ceE)rV>^dURj!r&bMe-;qx zne4zJ<@1A~Aju`A0dZLX z&T(HuSq|h*hCyKI{R+$@c!u~aZ1?%x=3S5EgdQ6ygm+K|RQrt5%^-~|_VKt8EQfLq zZy=5d{BqFgddQ@JuDjsuz8%k)GKNd{NgTvXf_$PRhd?Ayd?{F)?9!0r`n;KuJ9y_T zOXYwhjz-DxjGPb;aHwb$FVi(wJS6U&xR%T9X@|DFhg>lo4$4swTnirj##J1G?7Bk4Oc<7?xDLi}%R21`zJwN4(dhqbd^_T*+OoV1;KfNzpS4%VourKKT zv+%=*mWNRb-i`A#NGQoeD9Vvc5{V>Z&gV@N_F}jFgU&%rrDz3h8`~~sli>wtY%%Tv6q%r zw3%A>D)YgT{b}WgEwQj=VmkyI!#hLkLh34<-Mj+gcBWzy8OE*`KUi+B;u%*Fq+4IvB1WyM+K1 zB`=Me!(Eg2hKE7@hnOg%@7#PR*%()k%~+_6gAn>-hU91P)vAg7kh5QNoPjfmNmkCq z31`3~cVYAtJwU$g{T+wG1Sszb!dB6y%WQp6=MKPoD{=V z=EY9YI19pQaEQ?IgLo;{YlxJAYAXC14vs$znh%#5IC0i=S1`6hEm$o-83Zewmkho*ehO;(m zXEP=X-zi^;Oi<=Zl@hiK&sNGuCf%X5jJ--nyL*Kn5(cJ7JKWA?D)w-ha->RGqP&YB zk{T$bzJ}eZHw<~@Vo4dtlOfSEa@@`Vqm{O(;(&( z6j_y0i+f5i7u+Mv7er`}Mv+p9uwDbu3-Q$q)FO|u#003XC!$12$*fRpA&Qv^Rvk8D zLg?YD!%0fuhb*vhRO}d8iNTv9J!1lW8vt+hAqXtWV?car{9!se?w%3zzU)$~rO=EG z(R7d^cVyjGy0ct5)=HSg%2YcDSwX7Jq3vNdn9Y)Oe`#TuKbGc^QK7#ibho&}>@rup zl6yGjI-N0y!OYypq#=F#0!%*)-A=zMTwk{*44(HEKJ;VJc1Zf+C&}9lLcK`uGHq&j z3h=LL2Jo*oNYa8n+(fMzfs(s{zKaG^AKd-tT;amdCz%-zfXf2@CiMG!`cpn&0?cDM zq+t?0^yjU^q*HUl zpoNx4{@8#hg8oC|z4Nr^qEYYwY*6-~lo0Vg21M@W%PDbUxqIgy3uVjpgxQDa{`e{e z7w^b-Y05(6*q9gFGdk4)XY){1fK%WXi&9Ta^!Z2tz?(|83V0%1mI!L1SE>XHfNmWi zK8uuDH;zWR?vc8E`m<>u7Qsl=!GYTvyI{W(t-S)=%SV(S2K2iRW_1v|>XC{#i>z|5 zL6K-te0q@R%Z;d(i``MR=jZDlngUXf{2+4sG!cK@7nDs=Jv9|XU}0bFTqQonS{RF_ z%P3A-;MEdOo$=i9E{3vpo0^P&F z@ZqTaL&bj9N2y_t0P71~O90F`;!1&QiBgF>cw~A+v<%oFBS;8Y2f8Vx%pfOdFt7zQ z*I0l^IMcB0ja<6{vxpHkrSu>*WciB96~@Q~IVqqll0i9R1(HEdGQc$GB!Y}Ypxpo& z;PmSv12Q@$gzCr-?2xI3Giop~s2Aa>YW8tM)q8pIQbW0BLzzCQXi1bg7L5e(KRUDE zU#0RoJ~DNDX|>QuX)PK|sd;8qQb^1ht2gZ!V*)PF27qOBRq;`viz%x_Mj5Gdu!a{Wwhe2N{a}!7MighWQoWj9GgryP6JW5QAQM<3YZdk;_{S@;vYE>B@XmKa`;?bLkFzdkpNqo<|NEgZ7$?pE0^CXO_8sAzo5{br4F!d_lL{IZzU&dXLxu#vylGZejG)JzT2hYYj;cueJ31(T-Q^Ru{AQsEzR4)eNG<+ zd;Hp9dhF$xGZ{B$=f-@K$NRMi>}|_OCzB9CKNgaENa#xLV=9>95tQdutRz3+StykN z)8o93RcTUfK~B9j3&edsMGmn>k^JUI@S7ii zvN;6zfX)pOsT_PS1O7$=QNua+gP_mDAkR?ul`cB>D+7xoU5r-o_AD1j7Y{QmCaaPQ z+$mk8fE@|Lec0ydhjF?QFwqchRn8g2ayXY7gu&tC_;}f2e4Ia&H9=Lt)$KBzhjJ;F z#%;*@u!i$s!#IP!ESHWw%#FM5OBu|WJ!=GTFHsOBPh0GZbj_EUf_N5)i;#bsTmO;_ z(la?eWGjIhh3+ZvyVZes1<%c!NrvA}ELpRBI!b_esGVqy_i^YgE?Z$;`+f(g&%_;CeJ0bPZ87nJ0&A zeu$6{CWs#?%f!gaKa62FdB{kN`EGRw)omPz ze~t=y+oPCi+-^p(rUqsP&Z7n4Z_^xP!y|UBX(gvvA{mQmA(6CTPFR&Lnb?otGR2fg zS|KKRq#Yy10!Vv$P2hN|-fcGaQ8KZTrS++e;gjDn3Vbo`AO{hnrP^;cNkNNW40jSw zPvnxkL838YAl)Fke45lX`^EW?+L9v9=>KMZ~%A63d|2C|` zB(a>^nR=c$M$wik2FX7x*-TBtCTg0oM>?=M*6w{j z{NPGGMn4Rn_~h+j=93ivZGRs-C*$AgK=} zx==W^VBT*_eHhGk8Ego&;Pw%W58uMQ2tN8?x(}8xIFm$^5{z=R6J(weM_qF%Ek!Ga z^}(#WL)MKY-nUx^@hrnS_tLi{iMcKDfeL(*#5lxRK3D1i^DOBVy!KG;PRm4pm&*}u zM^5dM#1~Vb(<}PP&P@Xxo>SY-0Lw_MBi~~hY;oN6k)WmL^G?#B$RM%V{Dc%Y|I|@0HO<5`bP-Qvpp;D=`jE{oRu*dkaU3}Z4`KYMi zVG1kx2dLQ73q=lT-MBT4+l^5=1^r8d{;2 zh8VtMack#(9uZ?DhT}~$OX~Re#29RiIx_L9v4(3H(8;Bxq8e4ocW6FA%ramZ!*iUc zj60K)%Hg4MUU)6C&04JC)KD@qZv;O2+IqSs3)SqNf|Vm9O^-|2$-Ujvn0y+CHzlkY zHliKn-0*+KkjQQtS|j|`z(5mrkjpV7w=1`hIMz&3SPOr4#I`e8Gm-gmP)YS(s=fHr zKUNP#=`YhaX4RzjQDbLhe*!j;29)y)*pjCOda_1GI%>zbG2v_i31DrcdNnLv8&3b? zSAoY1!&m>Snnp)&g}$@sDZKb4Y#5pz;ixy0IA40GTkJL`=xyliU}Y@iYWe4CykW_8 zXz4vJYuEw+Zx8pk9u5C~0|qNuw*@^e2~A6P2I31$oWcBTI%(FLa}~2x^YiNhi_^Q@ zWHHK4SUpnJubn%VuJv26U!FMnCY?g?c~L*IjCA4U)YsWg%C=G~kG;fnaQMhxVhRh= zlvh)c9y^FEBc4L{`By?wY&1f2-SjV~LQfV)PZ`B0f46k&$*|_&2Vv~wZQ-;}evel| z^ya2V!n%XM3rjassj}zAI7i6iTR#XhmmLr1^s?CI!qDSy?_)-VSL2*1)`~x{=mfEm zZK3zr&16xN-^Q!y-9W)k`|fbrxQ%iCyPF$#h0p)rAso*{9^EeuKe}c*v5|e$@54-u z>;pSpOX237)1QNAc>l5HJW9#Eq+peqyag9QK8DoGPSKEad_)?`+&%ZTa2FlR;*_OD zgBKnM4Ls(G7wIQL$65M`U_{zdHM8-gtpznHP3T@tOKtGKiNLMMCOZK{YOmTXBUmO6 zfkDNCK}DGH1--~o z`Lm!jr|c7bR)sQ!BQirGW%LlY(~*=n(wK%^l5UTCM=o>J^SF0<_VmbP0OVNUG0`_y z?D$`@lb1~-!D3&6{Nj61_8mmOqC%18*${Sff3KN%vZ9pdJ~o;ePWth%?ZD|ET$mYM zi-WntWFW7PZFw#t(B2-pkKjuiz7xi0IdV6;0rJr8^>GQuHiWa>lJz~pLYhBPj8re} zc&=!eu^vrF8IhY!BR7~q?W8y8g=C9S9%DP|9O@ovhF3<^1Y4v*&0J@74(&8 z8S%lJtnzX4QaYBCzX}{Hm9!4ez4I7>H-A4mFa@B_h+?&4Dy4Lbq#7T_lk?aj>`&Q%CBl z!GBiH1WzZrYB z*W;bja?)T*tfI+i>Wqb-Vh8ukc$)Uu5+<=-%NeaS!)iLTG?Y(bHjmGK3E=xd_~E4( z^-JCj_c2N3Lloup$7y4IgB1|5a-}PkSS#p;Hrkpr*)`EnGQ4vYxZ1OK1MR)*cZZt@ zFWlI;C0s;!;*z#)p?~Y~@b?#+ko$vBM7_rB%}1F4iuSWqHm;>PRkG%F*vE-dsEqtw zz!d7NYRSbcU}q|b)8f6(d~gKXEo*eSo_Ph9;Acym*`%j4Jz09P6lUny`FvP&{1rm- z^jM@@^@it}M2}FslOIbz@{=WycDc%#fc)uYW)_oG+yRTN*z;Ccy78^>#Li!bfB&yR z-1gU*yWzSpea@TA5lBM77P?7cQ_bE>Qoy!9go|#@Kbk(XpWe^Rw`4BZ$I!{Db&vV7 zEbuW!A*Q>XYtFSjfv;?#CBUS;;mQX{^NPN@pM}qU>Ry6ko5CF}d$5a$)wFI7SC9&J z!-S)hu+ZZQ0`e>H%*JirRjBlOmC+ZM@1Q6n-9Zt`8GROEuad`gABBrfVs6I+{|c z8>JmXPM%$*U=(NZ#uEQoD&yKHh@{g0C4zKKVVpFRkzqOsh8%z{s!61p^3l8Dl?o4# zW$H)oZlDFg9(g4)46K6`X(oQiHQaxxW0^|mHXf>wQBsK8+N$?LJT?1xo3;CSn}&UG zMv)&7{c$z>b=JiMGR%*RW6^(C4QC{Eq^gw2Ceft9^=5vFDc9ySno%A*l9_N)Tz!Zp zYn-MAR;hqhM)RJlv8`e!f|xl_Sj!1&@b^{ohZRMRft?Gg%-nXUo4jN9O7}_ao_xy~ z?U^$jGI*r%lNvecG99x9)t%FNRJe>r0clUVS{l09)|p(gM<5YR7)Zp*{^pcKiZx^+ zb+FW6sfR|SnPeix{$!9X$Lml>1R9GCb`IQO$Rg~txR6}A#_ ze~L2gb<&5ktkR87pBhT@U(g4DMr41jyrI7b4zVxd$^%TSu;Y0;mpJL4xX%PxRF>Fy z+({YMop?R$e47NY=jdd$pNI_Xkxrte+}RQfzWJ>42Cmpmw_WF2^g$o$mEu{eIreuuxQRIUVdT3tzsrCEU}nkD%6;a5a9l ztHx5D(zKVU&z_DMziF3xPpSDBNhB9(BL?}S4RaT?k=zZl^cb}Cc<8tAY1*Lg3r)e+d6a_PDxl?Gpu zPNN5m5YUC)2>sEJi0(1mY^O{S_emKb?(0f4ZBhV_$3%-Ke;&uPkzbSwJXze@!&S%A zCr!D=5R&-|{kfEK&J=`9IvPo+Fuf(uk$7M}H^AYNq42_xPJS2)3>lUh$Oe6mgLp%c zIg12k;eQCr!Sbmuu9vS!Tx*i5|g}Oj1wjkgW}H`KkX7EffD+%A<+m|4X%OQ7>Cytu(<8sg#tWj*tn)ha^#2 zfs`%Z*#J|pAv1bc18P2GIC@V*7$Ghp}`nVnNmeQ znqxj$-j#+fQfm00xDM8y5+52GV0)yGI7WbohCAAWl^lQ-LXlCee1U;rfs}l~-IJf9 z$zkbjB_mbJ2gpZ(lxhyjBFNZ7RnkxmPC3p^HIbwsJET=qR-TY2O+J8(oGWEpnIoR`2JOXWyRWhsrEio)FOe77jjLgDrJw{9RIDpCk@ZtM0VU;Q)TjDI$&{q69De|msVNQ{~hW@>pw%ns)Y7Mg zO3&eshLYmmoQ0Uo1=oeUa$CdI?K{I2WC`Dl4RSr+vKz5r`a)B3hG$GGdOpSH{YOv+3Pf5 z@k6J5v5xc+V1(Wa(JS@fB>mAviysDAc7Gq+OufQT7j!srQ#H~rGoSdjzwFb&=J=n&bvz<@f|8kQM=2=aP-vnE>w3v zZV)6*ui=jIzPqlTKA+F)b0__|!J>ZLpuzy|+a-w!t>H8!w|JKH{^Tv!(<{VxbedZS zZox;lS?re?@;<~E<>I}|4>80a)9;dp(eO_njH*8f^?x8ME?rlCn6D&1=6jOev6m!_ zA`=}3u$C?pPhZ%d??=HW;>=vgwW9c?vgVCyVMG(Md$cw9wxZ?2e}?*nWMO>2Qh^*c zbbQU!`cXUJfP@d3qg>{Qe1Q{-#IjOJBL`KKmf?Ua9W7tDL5rhazNoKYjg$b$M2Qa^ zuKK#7DKfgtjHpwpiUx?%M|p+spg^}*F4m?PjwyAuKq-#p%tVek$(bq~g_Zo569eL- z8Vt|W(&V59CnKi>`K_GlVMe2lw6fyVs{X#@X6xZ=(lbm{*S3Qqrd=%3p{G~~5#&ulWkfVT&AwczQHCE|olQ-!HG z{jbe=4UwomCvrueC$54gGB>h%9U+qBiq`F+VN(W5YCf^NTNv4P_5vMVw((pJeVMWhf1WuB>>D$=z!Fk8R1CKmI+b)9i zxTfw|a4bBy^h9Xc_YM=tgs_ryh)2oYUiUgL?zPtlD!m%EzWqANFCkr-ViZ3il}Yo8 z%rQzGFaQgPE=)zF7DWY?h^>XOfxa*FY&sF zO+KsgUZ@(c9_~ouNTSrG*vFkR?%-i@Tajz-nVJH4dVrFyV+$ScCv193x5e{zcU3z| z=p5kTEc?L${Q;t^Lg9muoIxU2^3fts>Tw5)Q_$Lupj%Y0@Siw|?ud(`51 zs)A!jW7ioW&+&hi<=ZxE(d@-?hySN_1Z-Wb|k` zife0TD6wsvbKBHF1=ZBA2=WHsr3B@q5#hX6NTQiFIbtkZQ_`@kG0xr!{j@#h|3$pdZ~yrJBkjEdRqH0|u|{-F?2_d8)fdc)jmG-yc(RD|U5t-E+@#o^YFN&3Z$3I?lyjvqv!#9>EIP zu;CNC;tD01;CaEdeM8+wt6%z&m(f)ftCDs_v?@)g#NA3NABgDEOQb29;tm zi2s8bDMzMuS?v7VkeqI|Zh8IfnyNK6_O63iV+;fAAHq-|7l*E<0U&FH{H?)Y5})3C zJipdBezoxw#Mg@pf>Hb?rg?tSZ0&yu8Qf6Fxic5Ra z9$$-TpDP{SO6qWM5o}|-{-*?>@$4uNs*&ed%zph(I>nWLKBm<`s|{+!bfVMVZd%ov z_K64kfxcT?oE2-cNOSHQev)=)Pxd`R|9GJg^nZu{n9hnwx3_fZ=-$-oF5oT`kPE>1 zuWzg`s?apW69fOCo*ryL36;b&4wUmm^}m=pUfPz_${89R6h&Qf8u}NrUc`D(3~F+t z^KB}C9mrtmkp=z#Z4mGgOSi5&iUJ#4rgF<5Vgj{Xu!alHRRi1QbnwSzj$c8hK@cz? zFa*pcH4(UPPSJ{`cFwVRLi)QJcg+FSBcx|A5VV8u94Biar4~K~EDv;}q#Bq7?yHzj zjBWoZg^6z#*HwjHL3$inixy2w8;^IbJ;>{QXN;aRSpfCMr+YGj~ z(w>EQG#isZmAU3JAZSWP?VE!$TvfbO^GiX(cjA3ta7+e(($QB?J+=-}=m*y0;^9^| zZ@*1#dl!li4v-^QicFoIp8b9yj86jLG_ycD#qdRYoYD?mKxvJfmjTs0@>LH9?QdH^ zc&ex?g=j| z4yAxl-0GR5Ow2^?c011K$gPaS89#xnfIy9SJE2md{0{Kl<$92r(6*JW;J?>lmxCJg zml@%G+rM+%RrbAqYp`<8D}rg;eNQm&iz)gm9-wEs4oFli~)l(>YUQ_We8+tBX49}4l)K* z@G4MktGEjNPF84dAp=nl{lq1d$(r&w0v08+N@NvK*lW9#Kh$Nuza<|aYgI(-{t$bT2f7%=(}n&Pn3JU zm~%`mXYk$%g-d~eH_S0?;0=fps>O4t)kWw1d|3!RDzNV>CELr*3z5!BTpGG6w#-AG zAzzwyG%z`x29XJVk}W|?TkuV@Nv-Z>(B@L$FsHWw*+N_8wG;^vi$uG1Ta9AZZg=?D z=5Wr#iqx3r6wff}m;< zK0U|gIqI|*)2={#gRGTCuTd{KD)6)p~X(k3C8^91{yYoXze}Qy2q3owQE{zt{ zprEFV%97L|0-{qp3xrK8WJwUN(5q1KRR!5(Oa);nDoaV0sz{Jhv~x=J3!-ud;?{A| zXf>REQ!Nq=U+g+xCGS<0UlrH9Sc@w27wAYQ;Xtso7*TDpYtJI=BluO8h3L4B)Dfyh zHJ8kdc}IwBJwOf}^`O4>Q-wDE)Ovh*I1xX}vW9GdmxUPD#Yn|sV470x9+ymn0NMU3 zcOltZZjCuH&T{l=2!f|bOznr+O zo%Za(Q$X4q6ncG^cu)dR-XXH*Bt?WsT<}1Y6MrHQ<&TyUr;e+rM#m{AwF32HDs6tR zb8Qb(l|wf!-Nk3j>m(R8|HW5+M=^9JvcP{U=+0K6707yEDbh(q#4{yoPm&u!1dvAp zA-H&8s?fHNXmtC|SMAxIOo7V05#RZK+TkQrEpet8Smi# zDByDd`F8#A;$Fp6wAU>K^ai%H9iW87E6jbhMaa3#U3~GGw)jCIvl)G#N%0r zM0lVFi0GY$ui%f16-mcA$3%f;eir|`&7san?TA&$6gRLKMhM2S~{dl$W}}!YBWD@J@`p-H?9{z zGy&wPt!f-PB*j(IT!0FN7(anD4#jsWB`-ff#gHPW#0|N7Q@L2MJheQh14f&YVfRVA?WUuYW$UJJ6t6IC=tMIEJWi;PAZ_B1$bzE>n> zmoQXwT?MU&AG98`l|V+~*Cjs?F8?FO-HLJvpjsr+7%Hu=ja&v2z8D+;hURJQPjw6z<3IC5fK!NUtvET&banC zAfgEyg7GlTxbVmyryA#FhZ`|=i8R7M;n}S`wvqF@pPT>mJx^cN9L4 zBj9GRu&?#$J<Pa6Uzn2h|)Bm&Gqr+cn@=B^Z{h z0L^--RShguK@io}#&XL0$OBjgJ_Yq_FW_>a7P0>%>TfqUl7o)tuZl8vt=y z%Hpp7iK1QlE+{&OOf4XmRN*<|rgLqYT65GQqJ)oE%V{l|0DBc=;+{j%$bt|-I0dZg zuIgzAfTUcNkpQ5e%$`-OR)e3l?5YvX1Zf4mios8EYEtQ4h{Nvl)b={@)mnbdm=vp& zv=DE(iIAsl*^nhyrczR#;!5<>Ih;+u^p-Z|sii~+CE*2*#X@CWz>iF-bV;6gtmFUz zE~WTbgtU5wByuGPf)Oe=keoG*IQ$mkS6X*t&+mKOF8-%7hk!oc8EexXqvMRD=Lf|E zw#6sGHYdY6?^U;q=57=QoGHSR1%s>#nT>iII)4lBiuFDaRuuGChLhOl*{b?8`u@ZA zg^MTq$Nj^%N7>5fsoaSQx{S$c+BB^VcJ|Xp-m@29BLI+c)SHlK*E5Tn=2?y=Nf4yw zXZfa9a?t8YQQZ}CzCoM8R41J(V14j}E!}b)5tp$-)fpOvnqe-s<9xN0;8YNfx));~Ip&N#OE7QY zSq;^bQ`w|5`%>Eay7}v^e8Ee0@uf)Vz^Q^j{?E@ttDJu{n$c8`pX#jJolK^5d8e5E z8EGlTQ5uv7otNNDWXBs;p!wLwKF$OQ(sQ}3LfxA1Re{Cs_j2A>0_a6NvU&@#&Rcm2 zl~)rJD7b;`-YxM&36;V$d6y!O6W}S8k-Q^8DZX{BH5WS^bMPV&M#slk4(j4+<#?sr z!H%1u#7sUJ8&YBAy2n5P+a6GnFX+{YQ#a4`z{Nn0DhIFb#h_#faGnKj&6c1F)>WNz zJ-3u=f&%4$SOw@wq;#s+$6A4 z$|W+YEgze9iWy-&s~#5^mpt2rpp_tKW2F$ZQXf>wMObwhC8|NWNUg$6WKtsLL^v_@ z9WOb}sb>Jq#4FZ{wW~!45Y7&F2tH}eOYfWsIPPLc<8GK}qi|Jbe9$1;+Q6me3p(+c zfxl`st2JA#q*_$%0pZnh=xm0pMyIBTyeJ6Zs7Y96Hf2iiDH!$o4|s6(Tv=2ApH;wS zCI4$7stS5{>Pm4UenpS#5uD{qY0-<5m3kV4lzARr%5Jg!l-{$HWSK~rci^nzHBf_C z77kZSTdF|Oq(Uu`oT3Q+(BBu8oucF&3)Omy?|b8|<%!p9EbjPmZSj&YnCuwhpfQx6 z+;-g79QlCKzJIa~fG(PqIG2Z#|*@L z7BzI)E@I^%pKJD>AWf7qXnU2wh4z5jqce}H;B*zwC`_cL3-(>uru>iocd{DW#-R9NGm9b_ZI zos=#{^aPQDlD4DZ7It~J2`n@NOm@`KlXYy1DQPDd1RMSQjd$*`o9^1n)7|9-*2dhs zi5kpn{c-l2(P8;e&=|!K@;@`chK*`7O#><_D%6xouGoqa3M8m~g4(Rvv z-}tepC6Jtg>`4$y2FXK@X;ETnI3DXHuF#Fiivj);rZbD!Xx6p{(sFEc3v6_&*r?DU zGD^X=9zqPg%feqd`m<~_3t?IBkH=29#;7g0smSCg(xr+y@h*WY5C{x;ONbb?9FXLv z4<%*hD?22Y_#-;00ERpr{waGt>5wWk?Jn{x<+chKt>~C*6`SWkLQ~MteQ`#L&d2_j7?AsVLF)E$Qym$ z#Z&41SKH^mKhav?8KXhTaqZMOhY=O2Zp;5bPA@>O?v)K+RZkoVaCrIPxa2dR4n@$J zh0UGTdjzmK4DZm`dk@>sOP1n@l6UAD8(;DeMYjHItM|Q%_0Du6OgXX)&;DY3^X*JS zvhEc!xHWI%JCwYo8jCYbii1h&)C`TE5I=mvo_p;BZ&P#l4?5&yo0}6idk8(1rJ}&& zXI^=qasvh1*xwjBYS zfXxeqo5D{`;V5ZSPgshvp01eZVA%Q)^x^A}FR#CQFA0xK>CV(L6Xw5Q0QtwHkA+ zFaw{Ct1R5i_sLVdWQ=MQ2jive6fb>=+&PAVn)YKNW1@dpSe2p>6--|%6iAKs zDT}@<7OPPKTv487X@sGI;Vl{J3?S0oWqr#E*Nr;gnG zOA4-B_u?lq2dg2B6`N-PsB-{Pfol|BCDUEFS;Fb1T-3c=afOumoyjyWs0P@pI&n31 z&T;pX0)Ta1Pzj@j2hXvd6}D1-;9S5yTdjqny@V9cwtJlbOMHd)wkjEA7QtAM z;D+5?DXoR{2Ncgauv?LBSTCdG97f5xkXL#8^qoP+uGfv?4jQvXbcw|9|3Yn~bRlV; zQgO=pEh<2E9*Rlb#~*{b?3IUrc{hJF7AMsX@x#k*Z^vmV`S&roewQxQfp-O6wmucSyj5x5dM*T4L+ zLbv{8z1GRme+n8)R>C@x+cr?ItAlOZhyq@@kNUhwqU&EpsFkZ9m;VO#MKvH#d_-&* zTZ8o^CVI`384l^|*>SeigGfdA2x$MEUvl%wk8JI6%0KQqjtdE`0+{#m!ITl!L{`fo znH7^l`J&j)l!J@5(x6+xU8Pq%LuexZmG9yZRaP}_RIQ|YSQcCO@ zm)gk5PcR$FNA@TI2yI)5B>?-^Z+_3V?f!#3#B}TDUML0N3cL7U0;_)XeXDuw1Lj3k z5fu%qk!It>^ecrZqf=2xh4+GAVZOMt+WNgDzbf!z5Cy>c&nD6W4t*<;c0))^9C6PM zl5)0M-vv8t!t9r<*Y|4qRE@1S*blBsTbju(ZzLP^I!aOwzw>~NBJq7ZH9aR%08H@; z6WW*#UhxX}v-ax)gULiPIBWNTDJXmbQM>Rltf<_)Cnel{ri{H#&|nd060Tqh$A(j$ zy08lzEV84B7j_XHFHmWjiKtamaOWvcQ}%E+z_w z-wbSoj|I|71NCO&cUg7(FB9%m$nY-J!j(~H(UpK%G)@!?qOq&p*nXawjQM&?HL0Ykvu(o9lm&c9c!NDOJ( zjrGu!wH^pcMrH9!xsF}W*n-l*C)P3M#A~q-Y8Xg(3%PfXX3;lGMzM|1@hEP*oZlIZ zL$NM;V?3AB-;QG5jz$dv%_Y!_P%WZccwZMr{1^6x3vai_H@@PT6AGMCB&~E; zWl|{PLYnJx)%76DV#8ZZehV=dyA~vGdjGeey~_KN%FHZKokW#Be-!UN3eK!c? zB^m|fu6%TbD|ktgFD>6fu|kmg34NWtWPj{?+nykvYz2143uJ>VfBHA}uRkf_5rFOp zNtgU!vaQ_kXL|to=863$DD0@2caPiFP72g-{n&o+WBEIOVzCRy+2q!jO%tqCK6;V~ z3BhdX4xYWI0`PIg-FhW>{V?$?u)6~-e>AD+GM9!h(hg(94Q^%bs^0xDmTpFm?+f9- z5n#W4_CdQTvB}Oja~L0blXd^hH8ycdn+>9t@Xd%RH&5s6I}h5VM_#j%#qZkKHiFTX z!^)@N7jS&u8{uxGfq}rXIr0iwOnrh1HAIA^6e8xqV$rl!ievGR?@*Cs)E)2zXDSSw zLkNb*Av-|-W@I>olCIs3a3veq&UA^;vlToE&O@+rJ6t}1X#tLI7dV4=Sy?G^u3$Ti z6T$#7_SrA{i00us{O)XBj?hz;WDLgHFbV5X|6HbdRDWj1p4U~$NXKkGlhAqXAWr5m> zIkcaFLBj=r>(&l;p?Kej_Llqt;^z(b)vCA#zH+hcwOf# ztdTkRQvov_;Ew|4`9E=7KZ6@;GJ#y=_9PXQZeQi=={Yt3HHL$?VV$6|o&}K>j^PN^ z_1j_l2^QD_V0cnW4H(`m40nyES@KLM+TZHPtyW5s_pCH$g=#&ZRx*;oC5Sie0>fnw zxB_$7 zG{3O}HnHeXc?`W$VzbHWQTQUDjsF&^uaD6yT;D-?`Yn&x7ydzjdZqRG&K)*gv0oE# zFy&|CA+l)g3@{3b5Jh+570)J+Ma3z)K>LP8o9!#Zs0lR^R#)1%*J3_}`M=pOubOVs zClrPt2bqI(#$lEPZGrfbEr_~gV5~b%m>7DpPq{&;|CSF_y9nz2j^>{GlRf|PZ)`DS zeyP&wm|9lbHlHLl;C0RYCsi6a)|?c;wW!!jbi)H{hx$J5#4L;SJ$`La~)<&_P=6J>^{nIFWd8bU$f4w|7C^6k8#Yuar~7wux6t*Fa6kx z9w8`&Qjp_$;?ja6P%8qvKtKmDSZSm#N5N%^yB!2X50SrbDAF~PqHnd{H?ruz5Ibo) zab|ZNwkrlOC8p{gGKhTjYZGk1>|JE>9kc#(cOqi%wuy`OTQ!>bcyhSMQdD;WIpqrB z@RuM1(YgtNH8B&KDmFD6#EsODpb4h$rHJV3i1GXsuS9<1IJ5& znb`J{g%el=6MR(*jRt>(+CDhU)#rKeSg7zYxHAjyE7Abm7w)}=jvzP}$~ocnRp-PJ z33fwRhd6#~Z&zq=l%mbm-96|W+8MS)511+TrEk;KqG&b0ZiLywBIlVB$s>HKmglT` z8w-gOAQd4CC8#9|l;95iHZc||z~FM|qf6!aMQksDxanH%1uV~Ebq&X4)ot-CB%YCfUQ>pMz)IxyY>C#7%I zTnmQci-b&zQ3rx#7APrd!M9lzw+@p#S|f6e?tVHtyFBB(niTKZ;4}w&>w#P=qSTJb zX%2}fwTCU&OJ#Q?uEAuZG7MkH;n-iI3Sp;w6e;CKrsOqAdHl7!&ptrU7doSiQ_xVY zcrlQxyqHiR9E%Rqv0@DcHJcu?#Fj_xqHk5u1Ak?GzB$IG{aV1QE>=VtrMMzShh@w3Fna#GfIApoZLt5YpqexqEEOV4-zsvK zA;pnOtTlxyWD!{N)=A`8N3?`cbmKd}qezBC5CmzelPb4uEd}+K;LTf%g0OVwn|S!x zpAke9nd>3C>rZ@~fn3Sku7&iJyU>|(<{(Ay%0>9h5hYB(k14Cs2GA}?>2@J|1u}QA zlAF%ZV{SApKjB5~h$Tz5y~3Or3?iyM%LGd+HY0d%`n~=5TBvTms>c4*dY(f@citeo zrr#V}{o;QS2=bDxIB?k3?|aKO9pt(V9U!f0v|nR4jag>tl^6yz8x?+tfflxQGV@307l99o9SO-!sBN!~e9YQ)>?|w|QH;8s5A>uxKW zb;x>uTjQ((I{Yh1vvDWl<>F7(^mwWY&IY=L zP)MslmKdSXr*yNJEho8lp+U|phDUP=#6Hg zi|L|SW?KXd3q~E;3ToL~#Ju*5p;aLEX~5pS;Enj5EYi2!Pc4H@@StTULaz8z-7r2$tVJd3wN*D@SxRp zJZxY2p1_sTao-qg%@3%W5S<$Rl0XX_Wik#u4lT!?1g+8`qNs`;7E#(Ri0w}R+L^bv z?zGBB-n4K0kPNlhrPkxT>unJsqKa8iPJu^(iNAhEu$qkm(|_#|ZS;Djr1HM_@<-MQ zFWvOkM?_kXO%~sH;*W$@u(pJ#-2y?erV)MN)!(5+{HGIOuQ!pw*gv2$ocKc)UQa+= z-yy;c=G$=!ftm=nXO4Y96x_Rjr6#81!zG7E8sTOlRawCkUGPc-##?rg!Z6xF_!Vf% zs}E4NVk>owHlja=efiEL4ETEf{KW6ney1H#b+>B{t`1Ljbr_KCsVKWCU}eebLjWyyB8(+Cx_O^dZoC9|Of@77@V_NWFGD!0ybZ8*}1l~sWU z5Qr^<+h!x#oHF8<0twj*_yMTmm*SbgE0>eL8?OefYees=wzNWyz^7`USNgR34Y?o3 zZQ*RZnuUrz1hv3vzF=4IFNxSiW68(=Z;%zf3x$J1*$&d;^DFs85$qhodbnJqB=7+- z5%-kr2;u}Iza=&Yx8Ph}w9wHCN*ad6dFa}G;c3ch4SWVKB#JdR+a zcx|IZhakzLo$r8~+KwkNwPPmfX{{E?#c443xd?-4W!#Z!MF1;C>nQ7Df=D>SfktAP zN^X$|J{!yALoQ{}EFHnwE0H~7sl0nBwHjS=(!r?dEDBlRo#x;oEs7z>-77Xei2nYF zUGfvji$AlT7vFBFyGhnuhP1dCh$(*j9no0qR-pDi^)Q!u#bUFnLCRU|5V6=Hq)?nW z2r4@eOLg+x12$<6Gar9W5nq?ucYZe2p55|i$5V%{FNnNmQC0u7E;&K%6^N(HNvPE} zX~8eNL`>V;c2YSbzKiKmd%>MoI6kq+PpxKpn=2yqsg!Fd1;Z|Yol{T*IaqHM;wrcYs z+xhB;h04hDDS_^MgYMV#WxmT`QvVoiIPHUY>-%cpv)!w*p{LLy5*ruJI)~Lmn(ZS<9W961m_&nQ9Um0bvS_SV zt9~0;Sr4v;_1nSKgea}BHXX3q>ZluTn@QN+_8BJR4N^O1*le{@0^w()ZJbYqHWs49 zEcmGc{e-$#emQ<>e-(0o>!I$c(oSgxpl(V|wp1~z@nRgA8mc|8l3yPafYB*bSY)Vu zXuRY=is?EGPvv#OW4ZuAej$Q<^q+D{yp=@|>F%YQm@|CK!}i^4>gkd{vTjrdsBJw& z#k5nDaiq5tlj0Vi3=RmEo&CBQEB!EA0mjRv4a&OV&Js2cCgeg@>s8)mh{7+}R(aRU zcID`&fE@A|@-DNn6_48U1jmWxCI!M@QtPi#+BxtRVktV29l*)4W%g`;N`85^2M?r>&muInB#KwuGcji;6Qynbo&D(Fh1STtO!$^};Yb@1bXw_Muh`G}VYuL`OwD`2 zp4(0?$0Mn6T-|CP~1bdK4I zKFGSPGK#Orv4B+qfpWWV{q+$G`l+1uZLs89iK0;Lp5aQ;?nee)a3d(*Q*ocR3dK0D-k3r zBuJD?kSJTiI91Ms1wlDz-W7|%5W(H#_;KJB7QF1GvzkczrQ=}C(p8kC=Sr||cYl7h zc(X&b_e!UBswmkNNaiuikWeD6fG;VM*Q z8Q_~=4T{u&9YUvSA&-NWa8IGiZkC^&)e>}D3R)J?)iw`i?rcRGneDFqGCX67rt@Gw z?oGf}3yKFdEV}1JS*|NQuK`I#l!eklYbtrNsADT!kVS=W^HqIMNwwX?(xp|nkeq2V zJPOhxo87;W#Al5c(OBUwHwR=EfV3*_#1%2&ZnsK}K8mDZ=Nv&c^j(BlK#lB+R^YOO zbcSR?3y0@Ao>VNsqDk6AJR42Hv^6|4sR_vxJUJDD!f7Ekg*|6kEW&QKHH$Wb+oyx~ zGu#8GaSo35vB{!U2%#Wk|GC@9wB-xb+zC}J zuMOe&EA7Hd>a6&llNK%}Vw&psQ&t>+Pvg6ST^|R%LAr?&6*7jt$0ui4Z};(F^;ocU z$h`-k)jMq@vCcy3p#(BYG7fGArF-9mW_^x_-Vyx~=w-toH4+Irkt8TVQ`Ua_VP$Jqa>rJsMr!siZK^4UZF zKlMCgPU=|#e3GjfmMT`gYvn87!2w99MjOKePQg#dUYv&HB?^rzb12n9sl6a13srE$ zn#PZ$m?95waKv@!u7OTFL`MMZxpcywND6kRQ-sXo*qLBA2X)}dWA0?MgIjLVQ`N>z z_gu`E+w};NQ4$_0-9T0i+^|;YP!nOe3l_)|5r(@S3?=7+x<4hK$xmpdxJ`jv|uM=v6_ch>rE%d#fPp;#?WQhvI5I&qm9b5ULER*OHZiMSvqxw1P$lX zGd1|6+&w4pBIyvF5bTOt$GydNm^BNbvunaB2WIi+E(cy*c&<%zbErL6kW2>6ObTE8 zFM#dmBcp)T4%43G?UIN8{2Ii%ypk@3!Kl%hMab2_WYL0Fs*puY`Aw)B;^UYs?sdo{ zCXvQ12XR_%X3r;ehi|i1b64Zqj0hed7irZXdZd*^g8|3(DCxMDT$U%S?-a(iUX(JX zYWt|7wN|#|Lz_y#sygu0$LK|q01xNodFsPbK0O~zl5|YS?wa&jD$Y0vB0l)8T_~TB zwmG|PJkt(Os@uXWk2ixSv*=IGJU#4HkbWKOKy z4vXLV0l9=9*^-U#*+2h~NVqfP^1ISL`{nW0uX(GDn0LT#YbA(b;W4}5+Y_wY7YEp~ z7e2IU0Bo<`w{YxFtk1V$nJYq^dyoM3U1-bmvEmc-kF~wl5Qm^xGpRhBiSSi z=1MG?2c)k@l9?8!!Si>)Yj8N`v_PPFOA&QW@Wj^zGEjVC(`|=)nlFj9I z&c%1w4Kt~^&pa(7nW1v@J^Lv?avV@swIC|^^9gzhq?ZZQcSRKZG(g8vDSVvautwbLW0**?Q2XZ+;nAf5}=pkJz-$ zhi&?nqt;5&{EW_5v7>-`*PmN=~%~NO&UB=w zg8;|Jb1*N22a6rb)dIo;MYF{fVAloIf^_5oeX$&ti{3LA+8ksNE|Mkt*>+GT@UGJ- zwPL0+Bq01e#yY-fE#EZMh!ECu=Q(E05XNm*X;H03jTR!+6d|IeVP~$dN&>;Z$884~ zD)4Jm4wpKlexO6ouuyv)ZQ}yzBx`e}j|4hmZn%9qY#WSjQER4JX|?946)|up)h=rX zd{Kr6zKL$ue;a(3*gF0^G#*76ntWkA1d$iESt#6`%YvHgs~%?~&BVhjT)bw1_%US@ zxr2KivEj*u%x3|{V&UF2;wdX%2F6l-A}HnEjf*%-{P2hhPY{&bPibqySV64*yDr^J z)e;87m;24qJg~cL9I!Hx*r|X09t0of{4|Gc z-B<0EjG?NKZ`gB0@jkPk2|)0*snU*4bObDD1C^H$&9?gRyRKVoAj(biD>Vyb^A(~d zY<+>$l(p>fn!^P`*40G5t=NH9fwrMiKbo93SjNQyU6E_^0jFuvpF-D_XdF$djBhyTztwVw7*IS8GbaJVX9Rz6$8I8(t!ciC=-Lt?k9`T)zd75 zeYcUQIg}KV5vUUy>@?^F{qXgjlhvg9&*@<6Rx6!z(9Zj=LMv3D=vuqzS1nd}_i?+q zWj&=ncN2W}s+G4zb=O=p;TQK*qYR{a7Kt2n5l5DCT>JzJ$JL_8(d~=D)*WEd`R9(H=NzJ@{V^+-UvRSgg36YR(34N< z3a$QY7*$Ycr4}B~uOL-CIxOn7P_mfsh}RIURIRlt9UIA_!U|6)DVN)>$^k?4s$4Yg z(_9Wtt69-GLF}4{XAsyEA;rH{Ry`$_8WRVPOnf10#HKUB6A&OlqyuU#lCrbd2vDn7 zt;CVX@pDKp0j08DJP8|`^;Q!~27%Bt1T_l+j;jYz6;P}|H8IPKaGRmWj;Zl_fHeWG z`h@{9zGXs~>V(*VL@e4-kI4&XTem8(POi#Y9!RzwB&G4_BYB+MxAvp>>*)$lol@5c zq8wDkgFSYyLIyyk7S&qRXi@8UN~kI&bOXX}pOcyM@Sp(3GVlv2VoDq*LVa&vI-@r!s%d)-UnVeGJ6 zP20w)s=t?1D^<)znzcPH3SES2BP=4&ZHBuG#j$%9Qq`qw=YzQM9<|t)zelIM%zkne zGmJ60QSp=TttXB_eewGP#5olsPt&H}PN!F`NuMq?=32D72vt>_Z9A;zum#E{-fd&& z@3-MC%o5mpgm?PC|N3ZKx$0x4*}%eg_uJ`UtoR4;P_P^kO=clqv7Hn^nCNOsMy`To zdO?crijY`Aq=ax&lJhd+Al4jvj~Ha;y*u@>b>(dbqPsn^sUICDm?P>Ricqc`>K=DcOqPrqcP zMC6WqdcO^A-$|XjkI;~Q@3|D7O3~#ob3mS?Bx$i<2juSJq6#M~R;(LrcLX7BL+4Q9 zg7gnfrV{jLarQ{oZl^Ky&W%XU9dO_Sc3EPro%xwtxfxuO-TT}1!x!T*RHR%d^)C#U^4ws zoA8g(awl0O6e(YU%3i^UzAIK5NJRk8SO^#ja`G_nsK^S%?Yd^7n(5t>LV1AzfSlL@ za&4Y&$<7&;vSdMYk1WO#Mx9jcBZwP5o#uw3x#>U*RSdT=$8}i+ueEKqZwt3^NEgoyx3|D^ceJQ#{B&zo zi#bE4TVrYmXdXrjL9&M3={4<{0y16+O2I4NhJshT86w2O<)Da3SOV4YORJz?qx6kl+NtBS-oxt0R#~_2{EXgs zxqba#YOS*El$AV1NZgYYcOYrqhLIC{FWy;R6XjCcsd>lRp8ASIcUf*n>M z<8}b^?}?l#{;C*E`rb`wAp)xWu_ce&+HL=hoge88p6V7c<4=R}c~Tj~m{;+)l6Dp` z+u^dZ{)O05AQYeMh`fuslsjIhLi>9-0}1IskdV@_0f*m4rsI$l5mjf0Gsnf3#ha4~ zmOG>4JsgK`eq<{T5i){qE&tvMuDenUTzMQ}gwQ@5h&ivs`xvRX~5e?0t6Iti5(6F@sm*RvQ824V}Ho`h0!7ANLRc zoVKrAQg8X6yUprmylj(}@3+Zl$rGPBVq;ewurc?MFY(B47+Dp}pzOEE;P$HNIc#>B z8T3Q(<%b*h&@oaZcMv1T@1n2`p>yw%b9dQob9UOOyD65rV3S=5d|yvd;l4xKxD#nb z*V|cV4YOM)5H+xssbi_mG3xQ79@;GZNnXApKsv(VNJ<7XGXTxUMmcm-1=SvwF;Vfv z9i;|oyz^|Dc7}5M zfh8>J)Cudg5E3u+Q(bk{)#4Im9oGatabcY>FR8V&65y#C`mf<30ff~7k2RgdZGfgV zplJdSsApR(%(&h~SXgepB!xQAG>!DzAgm2&z}zA&po`-+I^+r2@RZHAygJU)n#Yo< z5ehcrNm<#fwFZ2`Y_(vzYzhFv`@}_OCV;h8XQhHVx7Quz2zdbYx3$>Jr~S}Q^<;;ar$>!hewic{IC z`a!2?p;n{s70C7|rOt_Np?dYRcJ|fR^ZH+9U$|hjO?h~aC04y|w?DbxrmW^&R)zGt z^}4xtP3%NM!6b-~g8oN5xF2B;p4y*9d??ymmw7$AU2122X^<_#q4FqJ`5J-?RsuwBozD=)#H75Y)Jh2%V-h_P6W+0&l0cuO z0{Mp5KW2*2zeGtIxZ*YedYexY^m__1_9Srk9*G;Lertg;GV+yap|ZfM56M+WuUZBp zMReuTnvfzX)8E6<0)?Q_5)y8E&+?zf_qP%vx(eS}Tc=p*miO&T8;CobnpkB$duoQc z%ZW3&%zk*|Y#aZ;A-kou!}>F)#`Q!R+(;EmWEWo7WG(l+XiWVRP>qi0t$>Sot3c494%!7&L@NMT;2`3r0LH!)Dieao) zDqvemG|WM#NuU#RND9EEHA%sWw%wZ)%J^yoH6n9=4K+eyC2K&ppvoR_r-@$)hI5#a z{|DG$!4nsk3Vmie8MJ_fJVCT%%QlyYk;~eR3f<-M1-)34qYF60A&xVGB2PW+saUyc z3ZMn+pRsR@yN#}LrRC?}Xd_zJS;%CEqba8~ru``4@NeLLcsqicu9CRIVq~r02c{cdMjB$Q;{hm>cv--ituOaAZtLSZ8Vjc0;x8ggi*bZ=6DJ~Az)VX zAa8i{52%x>Jwu&c6*I^Pj11hF$rjMdMB9Sp+8e=%AVxyx1*<`vHQ>q9#7wQ-`5!iN z(v#S!g5fKOcj#wVj(^goFa3}V*3CAYast;P@%3MXmkaw=Wd_FKC>fA`-o7>JJ{x=g zQER!EY^V!{+ZkUPVIjfCW0sz`XV#lbkGg1hSs3KwKejQ7JetS%dZq zyWP(0puoq7y8xDJiKFN>dhSshnA&FNov%3_pnBb}w@Yt%z~{WYm2x-Z9y{j#kqOkj zEuvsfc1pFdC@Nu)am9O0nPx`=;f1&S_jZKnIrHU*ZTc}L13Ah>AizRMf&HdKOz?e> z*~ftk!Gy3waG-8Z<~ZZMT(UCC8no6BIcNnHZXZStURjEc5OO2950@EUaLMZ6lsgn$ zYV-c1PVYS_uL~S7*t9Rd7M3C&BR->cQU}NUv`TC_K7&Ol{7A6C+=-+&fXSg}mQB~O zDP1@%Vgg~A4bIWJFQHQdl)(FvU_q-q3^UaNDey2j0;u0FQ!A!cC>`w)wN4`&^3X&^ zp;xSNqtmTXDUe+-&=Td6i7t4`g95#Ol+!h=+c5O@}a z(Sp;QTL?#@WMDx+PX(!!QrR%sxx}t+%_`GZ+f`GSS(18%6Q4eAqv`#VG|3SRKO!0$ zGt}p^BtrvSe}>Tknrvl|6fl>;+yayF)vGT%`_Vf_6Dr?7*kF12WWB_%x6fX5qu2gh zcHjehk|I}az4*5J zJ=vhAn6icW&sQ9H$DZ8&ibwn?>^Ywf`Mzz~_#bxLNJcpfrda$kyfwGk;EGL_So*#d;y4&g;Xmp2{pj#FBW?}gyAA>X zg5g-11;cPV+;RUAD+=(5GjaUc-iF>i*tm*s4f-og@>)Kr=dEPYj#+rv2974;zB_J(__Y>4YoPV7SYs3M zERTNZ2(to+t>8S8=~Jjh3HFN96E98JP5rs~Ftb$9hs6M7bohiHaa9rW;apvr&MV=W z7X6WNG?ICE)8gvE3grvxB5j5SG}vc)ajSK!qfgat(Xg&Q zJAH;} zk9zLtU!V>B`ZsK2)Lzc0y%gO%CG3 zR_ApE+Xrm*+VB>-DU&5_wfupM+JlG^m^_oh^*;xDp0m&dM_MG%CyXj5N>NxRdD^O;jx~--TS$%|j79{A!J9sBE zinBVV_fxLogK}mb5KNFh?I_c22qBN}JZ_8WtLu0E!Pabg&wlaaYCFS)jce@OzZ-|3 zam328;)@o)YvY;5M5Xu!&BDH6m{e@IzU%;KxWiPzKqQDe9)8(|Pgub-{Fz~n&2_0wE=>nsN9k*b}YluludK3)gcsnr+lsn<|Ga|nI69KY;0t|B#& zUn>^B!M^adNmkpu&#BSGU%z6v6E|_|Vq^`%jEfa-T&f$G$ZzN!)`#OW62v4(*;N5@ z{nxtMUX)xb?uJWBd2G;d8uNqIO1m1V%mfz?;#vPZosmuT(SkaWx&G>Qc_{;PZWI&DS9Dr`)SCbd7^fAbZFAn(5VtAL=8jpS;r|+N zS)>9+@>G(&F}3a!1U#Vb+NzGrUb?2Y5}hrav1OVyCAaX9)sJVY_b$uzXz#sAZ3{vc z3pH3bcxQGcRSHBz(rY6G1E@03%pnibB8{L~`6fg#&|S-YK_{heXI5KOYBi|RLM^7` zCO}KQJj}3s4)*9T&!N%S-KYR&oLHp%X~dsEqeo&Nk~5`wF8=CdUYEF>7*O` zK1^fme`%={g+sr!1;5^Je|O0s%jKB21jdqD&9e*2)a#@R z&ewD8c{=0K2Cb`}g5ogb_tP9pio&=Shu?Jw2|ndqPd(p!0uQD29_=(!nN!vK7TwSV^@cFp+26(m!6sTfUd7rz65+V zx;)Wzkp`{Bv^l9(TBC3nrO>-w&=MMclyLFNK_CSC-z8+O(P#0pVqeh+*9u;Q$X`xdT^MwdyUD-|A*W`XPxz?H$ z_KGAzw~vaVaUmkC=4zs4eo8NeprntUli=f1;N#VMLTh+wrv37Ipim=Q-f$Z=8P~;X zn0Natq|qQgNoUS=eUHP`n6B57QY*}gqCy{oQ~*ySe0%^pQ-8XAFlYg#Xop}n4rOiZ zynQyfVUvC4Jo#>6XzHFwIKlqja)Xpj#y+UEkYvXiXI(Ifx}Zlrc#FI8qAj!`gRK?lOfW~#*!vUTqs8(p@J zZ2w#AObQMb5Crt|u}|29c?YfUJ)Jgk>Cr3zpy~zVRPt57uA_i^xS4rQ0Klu`BRr#d zUUtp@YjZq+qdQ2{E2!D45^0#l9m@!=Toz}lVI+Uioe9fmwHeVs8(F|)wri}e)tJtI z#cpKB?{scJj%O)AsPR6o?yGJe1>#A&XVY{x(U2&_aB#T%87TmAaG__KRj%EV8g%1uA$^wECr_s3w@9OKx^Kc|4es zpAVzLe@NxTl5vY~2b7mtrgk=2HoHBUlVrWRAa!ARbzE+6Z?^|`ijO4aXNY--t3d1= zdFeITkm?Q;VQ5tBs#6|(QjsX zzsU}pTJgY%oR31&ii(_wDh~puZi#RT)anmT4Oj?CxdnBr*JzAfC21ECI(P2>E$6c} z@Ly?H-c(QJjz3eD4icjJqnXtBcKHCDJ7htsXSSA!@+W;7Yd}f~Kuh2)i{TYZ0W3w_ z$lcHeIw2NlLBI`iBpBtjog#YT7zN(-T(SKFTe_J!4tD(p(SrO?az)o3{MhcIV(0~5 z7|1OGQfFLe-yHOyRXqFw8a(59pQ+0ZlInicMiDG?Gw~+^3^50l373sBoQE+OyW}S7 z-(5%9kikS;550T8_3W)0rB~Y(Wh<<12`REXY%kMMOvC4K=S?kGd0^8JoS9PVN)xY>BIJOo9pe6`e2&YIXoi?Slfb%xL@ zdLpUB6T*Yt%5b+J#XGVPBgZG+4Rd4zIF7GVen3X^aaY8O9TFJE1Tay5puA^;L z9W5^5$~JWWj$W9Uw{$_*XFZHF9fh3>8tWyxsI+y|@*N(aujokNkJnEaNF+TW__E(r z-sP$HY;3s(5@Wv>qxpQz{5*zl1En`BSW2ZLKWE; z0I5s}j@6TPzwEAvGr30MA%Y&HvQ#@xb8xU4dd!~URB&)O-+I^j2&-S2Rq`AQ30_kvdL&2|QZ%|$sV@np z^eFWh$535vh>TV)Iap%@UfI!%6=Q+M!Hf(8;jWkCO}hU6-Q*=Avfg#TzV*XKz5tR+ z9uM)mm3BK2r>R*-QOm!Q$#*6`_6kNK*XKqi;xX?+DoWA-O-bIVm<%AY2zY-o`L#r4 zsTJmO#+)sY=s+hBzw*GXXq$8c!Wuvxoe=V}w#ZYE6e7jd(x#*uZVQ1$q6c)TW`Pt) z<@OJ~H=x^qXjnbDmYYK?=t~J$89a)Xb0Zy+PSE@31uSBT&CNEqz5{?rXc2%MalwqE zjAMWhA+1#hs7AHoS(I>)YSyNCIw_sp?AK`2g&O!09gXIjk{#3FVjPhYl}f4=s1*~b znvrXz)ru!Kb3UgBIyDq2gPAn}S?tvDL5goQJ8A(^jk?PM-GgpHh^4#Bw!uAsI^^r8 z^w1p8Wb-9u^P%a8lflj$?c+&6z3UMs*zSHBkWN4?EcC%d#wcMjkznONH@_;!)^pgo zBEVIfz+bRq?#qwZg4Y+@oMVsJwEg#312du~fs;C5td`J1{a2V_3dN@x&)5vSVy#E- z2lwu?mP2^S_Tzf-Quz9qTmi)%X(`P5qXX$5em`@7bs-ESlr3Xr7Fic%e$R&25$)-fd zBGuB#*Z{hC7iKX#-;i0Gn0E7s^_{p3Zlj=zs|c$2xiykz@!~-Oie(7GsT^`vVk>66 zF4%c)Ek- z;&T^B#WcY>bE`2%MrF8^D&YlPR2qitQgB2qs&~;ZYPG1-j$D90?-t{}q8C(;AXFCX z4DSOP@*PWj+@J2Kq8+*JGc%xrr4rDLJOPdOD0-nQF){I=$UxIRKPpu(f|6kINRVyO z`7;=*1W_f&P{G&Fivi20O&TR!JQ2amfYCLVH*TF8--o8l4{LM zZ4!jQ6@nD_k{5zeYNWxLlp5@th5^S>(?T4=`Dv&|lR6jwlbnV%$ahIWIIsbgCMIhz zA>?pksBatU0q{8Zroxbna?BC_{DkB2to}tNv7Y9R7VF^wXT*QVGFE~1fUvvT4)$Ve zO+Rp--TCU{pvhAfEPR8--LE}i1^2wQ#O`}%nd$#Lz-HQh%I}CXhdZIk%1>sP;z#ul zQH!6PF-QXrrYMUjflaHvL%>4d950TCDhpV8h6wp7%uc1J)NQ70$Hs?jZ2K%b^Xy+( z{LCNQ=l*_*wLXMFFnuxM8FOuR(BBaHukPVc6sSa2&4cR+xX1BHhf&W-ErShrcx#M z?eUl0HYcg@wbSs#v4gUHvygtWun`w*M5v*+Ea9$AA&J<3OgP~#mKo|8-F+1hQRIVi zF*Vp`;X(hK-AvMHv{g zEi58b%Yg+cxXB(6#H8v)F9OI;qwu3a_|a4kSj5#*Bdh~HVrn&O(>%3;U}FYc!o-FY zxVAoRjxrnY8wKm3K8bZrkTqICl5Nw}3WN3BNDhPI4f;w#7$H?mt(4Fw9&Tbg$O7nq zCt(M4CI!Yc062|MjVA0HwUZncgaR%{pqvyHN{Wi?yE-w!dT}IwF1aTcI!J}uD~X(^ zF%ttD2IJ-~!jxQEjrwIEq@WgX{}8c#@Im_@FE?7+w>7Z5q6Y2dtcnnkZP z(31j!nz-BPnDk-CBCz^ik^`9PW5*)<=`W_>hWZz1{EhaD>+Z3t=RWYnD|f!eWkINX zzxSN9Pj;o?iKqmtf|YXRo+do5X&y=CWaH3@NjswkuE0FB0j@5C>p@HBPfKm~Jq zj>UCzOVc_#`-|h~NhHl;Ox0Z~wy=d`+&=9#vBoa^3hpt*(T!TV8E8WL0QHqKSm-SXz=2|uN78FII# zj~_$ngu1p5tc*OQ8a!Pkj~}xN$Vv$UoN`AeFF9eu@1?X3Nv~euTZUP$tk3IaAbB9x z=}^q7QAF&FYusXaUslB5FYVGxXIs(oQ(zy{03+!Yi~cCs-K)cP*=a7~xuzuG7lRb= z-*C?+yLQ2Pm)CDbyBa2^!faCC(5`MLtbgF08vv_~eDWT<4U6}hzW4H}7;6x(&qKVf zN^Qhjchs&X`CugMwVJ|j<=ln;>ORD{{(agIC^q9om8eB3gd(upL%bV3uv^d-_n|U^ zFO8W|OV$JZLNOkV>N|}-$_uLs^iu0xZYBU`8gZ@-8aOx0(8558oKNyA)1phs7nPF! z6H}|%ceokV<)reKwqaj!ng~!r){o4yP=*>;0#zjTEDS)8SOWBDt_MugYK7Vs8BIyf z2m(k^G68O-)QWklenXnO0KC#duV#^?>1w65H>lUbkuIsz66>k_7H~#$xB-$>|6+>k ztxIF3u9tNdErgBhxqPqz{7Y`sO=A6YYXaTV+_EmDOZWvt?js&<1ot?kIb@N_8HLkC z?z#z*0~w0|LleDSZImpj@p`5%XGy<8#1a?^_}sOp-y@xSe$h60`ru?7r{B$83C)g( z!bZjzt}J#YSSko5QV9=9VbFACDgBhR!=%8;Q^%A;=4QFKBf^IO9Q$Q|ltZLwZ=V04Tp-fm)=dZ?F7mCZFrQZD(-1c|T9sHH*>jkFnK}Yo ztqTvs70OC-gK(7$!uDaPXb72H<~PQ(&Bf3lRczuM&%x(NaKFkcs*|7i42hQZ_Z}BVQh6DAZdXv@q#zezS5{!~g__&>3{+7WfA2 zD*^dR2&TX=_r@h9)VR2v6PsN0#_=Xoi<47HOtCy6S_qy<2|{K9*(4D)rr4YgS;SKU z8<~N^ub5iCJ*id~rlkcz%>tw#iKW;eb1^1H=dGk#LBJvvtPe%qK)jGc;B;(L%Xg%- z8q*-7=sc0|?(C7`mg1ivf4BCm&Dv{0y=7Aj8@{dZ0uQwu#*$FT#WnQLJoljN$GiUh4Z zPnbY_(?Oo{)t~_Ce7)~#=xx`3?*MT*US)cK%Dk!}t&}bj3kjL>%LO4*nw^(Ix(gL$ zv4^o^H+Qv*3v6q)na{S{-(7tv9rXt55xd3uTts;89N>Yd{%Y#~kA3ugQcXW(QYp+q z(r8MS5X$@1A*)|P(dVV44o0AjmP`$2Ku=86CyTmx6!BTNFMo;I0$#!PBE)9_(E#A{ z@I?w1>aZIYuD6@+#kynav3?6X(5j(5^EX??tX(#qGA&=c7zP@bpR=zO6ljistE^l1 z8!278n5x@mi#IbBO{XeLQ8$osE~|IE%7p93iMYUcR%k`rK8BOFy$mO9&`AvBcfe#p zw7dopcDt`Y)oOz_0kgYIGyVfVSSaqGt^q+2Ucn0LbA5Ihi?*%r^D)P5Efbo}!W8}N z*;hE)edQaqHU|5-sO>|~lT^NBmL+E3?Tu(Q8eyyif}waqhA19w7^PF7;(&Nxp2v+m zm)qGr4tM3{H{Qd=3B9IT*hoZ!qSf!&Xii6dW8AEQfCl3P;(Gd?pwQ+2j8A5~xRt`+ z!5}VnzN~gRW%R*n%N)>*4E+{vv;oZAISQxE@EIHIY+OGPfZt%3UcCS}(0&_D^+OG_ zlUJa8EMcx;s#_{Cbn=q7`A;lu)|n9$0oP8K-_=+4n%<7%-tyqh2*>p*$MjyqJ@n4X zYV%jycjVrGPb+eiKhrx7+*Pl<@V$A@d}|>EOLO@N-|K-)914hF0e#P7oq%yy%p+%{ zAlb>2qkSL?J6T6Z@8z~OJDaE=*No498nZw);v(}T3H4|l2{QaOa#k>^>UC#whRK%W79tv6^#AmryA0P6+k-G%rPI~&1G z`HF@3(ncKc^&9G_xFBA@kD1cM2e2kji_}lGv*6zpFtX<*5jX_ zct_&>r1^(zY}FP!^NYYv0iK+^AKB+GxzVl}1}W%`uOshY33AVlRuSw<*T^& z8v{fxkuGEpZd$O}dfX0>j-wR8Km992OR#?aa4VfoV(W5ZZvj!w7v{OF6`w-(Xi^SU z4bE!Ia~< z$D53YB|bq;Fw||wY)5Y&vnT}0%c5A(m|B@gFW!A`O&7YJ8F>T%WbqKJ$Y}ub^u0hQ zp)Mia%Hz?3tr*GbEbcZ?ZzEU(f&--D4CQ(P)>vfHYPDYdua3@mhFU2^w}?3qWQ)i?Htb1Pfa6dRleQ)uVen%Ob%dR{Jc`X4;mgojOVXgHLVIO7hd2>%r&5 zT7AOvTsQF?0Q|hj_zR)+u3yW&u4@2)(^kWVdfJj`(~MBsm*UAZN~2|4DCGkQB*C$2 zH{lwR$RVi&^3R3z%@KonUXot)sFJxy*e&}A6-Fovr*>UPkfUT1xzG6_nygzw&<}-g zz;)EbNUpa3MA$`)w0Z;d%gM5WQ8S<`v?nc}6f3AE(m)s)(lV-CJ&sE&@z>22CW%Ya zBvYl5oallTVi&KOXu>Qh^#uArI)t84+>f`kH`*Z)r72?73=yfwsl{7P@p8^^x*qP} zE)uA>xSC+-4Lh1_#{O0t6B2oT;Xl&#@_uPOF8qF({eOhLd7NC;dFS2LtyUw1z?j&M zjU8`^9S@0}Oyb1O#Ji0bj4?YxVil4QTDsMH?RBfFcWtcNH^e4{_8kzr*o7n{5VkR1 zh;1CNamMdVGV^)Qe7~o<8sg0RdH<-o=bn4+Quo$9&+q)6-}9Wo^*;_-Ua}l;XpV8j zyO8NJxSzHOWy!t2VMP9G*o{qZ1SIdEOtWky^S6F4GDJ36f_?fEjbj&*MNPu zKF!=@&v1#6x){s$IvPAkCtHKlk=cznJF+E;oNIiDAUgK6sj+Yet6zua{dveh@1~_f+qh>jVt>5OI1#iL@QEdMjmrdp=T~WIBCr(<$$n#<9;P2(dNvuLI)GVOWzI>u%$G2D3!50_ob^ z$+94k?`^D~MfhCnbX5>0*V4&PR8KgC7|7YnzZ?GilA1HUu@Q@L`X!;gN{U-jxLmM^ zXbj}fH{8RpsdX#7)@)#M%s(Cn22Q5-b4w5%qY=joVzix|CUQRdN=to~$iydE%iB7H zZfC)frC}J7qu(JQeJTv$=wU7qE;mp``voCTXv7eh-@j0q1TDkgE%vA zdo08aGJ*?aP^X3D2XCcar#)wUn;nAlN)GzUHYjMRSgO?C-q`QbkyMgL_$uQ(N|nKM z_9bNtbf_FAR@F*&Fe1efAz*{0$jYWHS;c|qcP&LWV9?TH>#E|#Y7w|e=Q~6-NJ9aW$4=9bG9Mr(3IeyWryfBCh!R?WC!Db8G)tyOakQTWc=u zXaD=lp=6hPph~YzKlutVeAjLz*18`-Jq@{Ya~zlWl`XQyw~*Uve+~n2#tLlc$mlN600@p z$b%e`7qPSTFVYaZUY{eqs(m5-D~yw?l%iB~Fq&&eQdLW_7RF^8a*$>u>g~wT!i6vT;2YxGlIs^+(l1Tvqb<8jK`euY$^?|D|G>bn8=_!zF|B zLX*Sp7T{~cSHlO->JFWVd6$qXtA{N4om)?Y>zJtO29$4ClNa==yXjwN*vZDh@*J~* zNHR|_Y3O`5cHi-vkS5jMl>{S9Atlu1U^HVu^*P50y05tLXn03Ekxlcc`P(n^o}a8H zS(4(b;XPmYTqxdkM_BUw>M-#5E#a1@A0+09n|vylcryO0)ThFK`Q)6iVdsfBZP+$+ zJ)0meRz3Zbu;K78=_;T49pLln-|+R^KMO;D%9qrIr5kHxv*2|!1F!8Kx$gJQzbLfhivdk_} zAg@Xr-JOa1VkaB>y>WI)b=u%E_1GfXm^#Op(Fqsgoj)Hh{cNbDXvD z3wII8hy`Q)YFUsP`&v+gOrJx)(QZ+0Z$KZ)2!62%1A20JKZ;NB($U>UUXj*``*K)+bc?<+tB+fBNfxLVHb&C}QMHC$x1uVgz*wXL>Gd4RDU;;wyGHCboD zv(&b8nC8MhYWJ7eLdQxUS`xKB2&NU!P7<4nSxaEo0<{D5QA1e73U|qt3H7#ieUPrJ z%3bp34fyk5Ek=2Xc)OasUEa$xhX?CrNh9YDD-&T4C1y0zAe zvcotZVIO}DADm@-Vg?%gu_7Z>WCwhhLt*h4X%xFr2nrRY+GUY!MIXdS^vv3$MxS03 zTh;XG_NU3nizF(FCA-u`HL%K`ugQ{C(qu6-r|*Sf4naz;qy*h|dg*9BRF0SU*DXVV zuslp{yDc=n^B+U1`FvifuZ4;4xr&rD8$;pFSHi+wKf_-G(%SUhH)q)Pr3OC^2{C$9nAhZE&V_^ z^RGK1_0TZx8@Q=H89w&;8$xC8im>E~yF-<{WrIf%zCQ^9Il3XtTe2y%eC*3y;D2ME zFN8Bcba5yn4!Hlw|AGPjJ-II42%G2!cRa=P;&!7upZOJiWTbonnn?|mj-l1jPS$R; zmPyNQl>V6R)=rjosj+O|TLHzBOzpLsDBv|4UkPtJlj|iY4C5<lVDHs9Nnz9jLe3nReQlMl&{sS7T^V9TzL2GTNnvji0SeM{)X;CC`Lw zP=4qxynvqeVm?#oS~~`x4X1v1I_Er>&$q*0e)Fc#Nj4odq*Hj5SCSuXHvfS+{1_;%MK|}5EPUU;Q=38Ul4)d{|R(u~O?4EP_1*Cqeo zF!IA;oYaGKw0)dFFF*WeAH#B5Mo7iro|3u%x=T8kGTm*t?3fkD;DexzzpIcbTC2Z zSrw7`_^ic)=^p^2ScA1idfbKTED*raUsE86h<~DlL4QF|Xct_@4}Zx176XdHO*Hd5a#K>s)#dJpvzfQ^Un z(S0F(--hsC&T0#(M)?A!Q9tRNaK-d>VeiBL&YWAnB}W2Kb+;-9C8sH;GjLi1d~Woq z+o^gBdUcMnW0#?h3j*_?a@#intv(jbD!^+1lkRgD6sK5@`Wk)fS zY;1Je0Cjo)27JqW1;s*EAgZgQm~|6wVBa&cdY^YB$E?G^LxDFh2;3$d!f zQeRa%M}llbG?NBPm zAu}8@$?nLJiDNH6VSk07Xi)n;Zw)J{%ELUO1KjPx{WzS45#0AbMpPs#c`Q-!f$G@O zmKvPAw?Z4rE>I=j<*K(kRlo0vkEwZ(Az45F!~!dMHs@Iuc(%~$Jn90*Xi@>QRl>Ry z9~z(uOf}0o9O!$3PWn+uFCap~U(9ye_Gs=k{Nwr|Z2XhC;=s#s*PC|c%~C3Q6fjE_ z(LGc*?~|V2DEW!(bfbVqk#mf)a0M=oH%tz%Y(g*iZLqqUXjahuA>1rT<~Xqny&VI?MPak#)eEZEw;1_`Y1$3deqYKWMc7(#Z4 zdwhf+uR9)lRe5R^{Q#*9!AvSg1`pmGmc6tgWLB*UAN&$_potjxla%EO7rzzW`N28i zs~4;eb1DbJ&^lt@_xvmj!6=j%DpYnb-|Xh&p?mAgg!drd+e$t*nC-bcUL#$U!esJC z(iL9jR0G(n*=y;+N1h9xpSmi%>)qFJd|@yjxZ6`c@poay(2{TqDHa#e4^;VG{roQH z#xrw%=6DjaFEQ+UbX{2T!shU)PxEH8zv(<_;=Q z7tVXfvp+!DOpftGB<8_@IRlWQkex5Ue?M27B>pX?Y!{|%!p>)@hr-#9>+${KeI==N z?_(CEZQd-*SdU-V-wpk)Qm$spv@`#am@%Lo%P;*sMf&?P_?QWrw<*M7wJv1kqxe?w zHopA>vqSra?=kJX5)OmB7*9lxLlo~Q#9Qy78#|m_{;uyu6P7rJ_~V*WlPRU~JD$gL zIu`=`3e4D4XSKt~8Txezvg>K}IoC~&!^NmIim#l4|@)e)5my~GGP{BaOQeyjx_AJTMB2~h~#5D`iV3j>|zh`UkT9YzAqOoqotWKge z%W>?c^wu=j!~p7kOoAqTe>d}xqy61K<6ah9sI z8h8YpgsE}_Rq-Y=j7pFhaj&)iMQ^u{pd2AVpX_?6PX04aWIU-G;N(1ys;Et3*j2

`{Z1Ke`l(@>;TvqwcoNCm$7 zwMDqOc@4Bhk#mYxDf&!PnjfuCRq+bGR3KhVEUEqJAG1G5`$sKN^8l_U?T*$X2DrEd z6V*4yPsQ+oI>Rq7rNM~?%yttj^)t5jARf%2&;X%*!vq@)nr-t%oH9rG$4Xlz)yHlR zU#c)mM)@f$*2~4ve>@)+k?L{a(ObgTuFi*(KH#Y7%dt~4h{6$6mufkUw+TiEzVh-zD$)i7+|) zc=(%(SBFXOpF!^h5KjUA@kTaG`eOKpZvcFDEDN_jy(KKb!VJ9#!AVe}qRZk_%bD{;`;ipqto%6z3pR9z5@0doJV{)DE{o^l&-p)1Qeg;hs9wL_JnIDA* zUUXKsALDI(73=eQ*v&kjJ6}MC@-(@mo?>%|44q;w*zHdf8cY<NESWK4z7}klW!sE z6a@VhME+{hug)C63wjafIXis(vx7`w{CY?ewKIo9bm|tEqpv%rn=%q`T^vPuj+k!B z5WwgS@JzLI&*v~a`zDDa5``|4W@35NC7y?d@j`-&ufOqlc<)zu_eSsY+dt73ZWv&I zwdPp3YKbWuo(xy5eE~DF<;P4ZbT=bH2261f^`^PO0GTL$?tKuPZE&08EY(xT{|9r^ zVEkLzINJeZ-(onNYxv4|C#}MN#*6Gw==45bF`43i-W!D%#>iP`Szg)l0^Pa13d10o z{)1$Cc^Fa~+4aeE4ghBfS}Fn@JH9v7?F$?MpKX!s6DB`=AupS>j|aJy*T|^ zL+;+LP_m9~35^m96%JU~(i`_Ev87U=+4#Keyb^~w)LQA%Ql! zs8GgH04hrjF$`pg9I+{fKhkh$f!P>iMm1wG!Z*5E#zikR;Uh|n2eDE{Z6YKlTaU4u z>f1)pUAU!R-yJXQ2;B9;Bj&h(968KSjHT@JF1Zn)S^u$2sY-0HEsK(%Q0q?HD;KaYYCt|=bF11_lgM4 z2^U^-U&tVcb*j>NOij>*F&oRA7$>{aj~+FfF;Aj~tu9(}WMzJzm}sQYbDKCwfqwFB z#F>ei6O-!*2YB1Ju&L)V!kUId=#r7A!aF`Zi$^Lh`DXY#Cbpf$XlpJh)(ya#!nI$$ z_C>V#uf;j_=H6Wk;@a=2tDbvfw5|qTHO@0X3JvFZcjhxbZ?rTv?Wt|zfU2P%b5`!t zxK$l1QAn&xqM6geHP&OmRb-c~iPjG{D8wN{DBsOA7DJAncXTAY$D9>0Wd${shj^d# ze{1;kiEH%wo**{|F;^PBAt;D3ONY|1_%J*j<0;LXYI40nl8behkJd15gY-j$soRE{ zQSA)v8zhes`J|J?)kAa{!}J($8bV+>-JwQM4r);S4H#Z%#{uYJ{ zy2$C~%hF&ehZh!Za=?Ls!y{wKk%vn+J05XEHF1zpqO`ckW-KHI*431&1uO-FFwCeW z$1*O<#U0p}*Ut@^yF0K?93XK^Q;{ZB4&S#6qeB^6$x%E&lIN?T zNTXz6UuCppUCJ|h8GT+~*$ZhZW9PiWgu}Qg@vwmJC$X)2g9-}a z)Er;(jNU}c@{RougTfvi2|3DH?pB_gSYHl2LVWULSVRYb@p^ag!sAw^Rll_6ta%+g#SOA0XLg-XZO# zzO!0VQw?ZJ{&4_4rS=54~w_r%I z#{&d&CIf2D2N+zPRwZh!{K8Xi^O^dBOr)U)?-6YmIJD_7wnZwnvz_3S}r0e|6tglY5c;i!Kfu9~|hJbdW? z9ZQ|J9YZ{tCtpvse;N$n;?yXrNUx%z^}riQHpK=Qw+;Bf=Pz97(~3n)RaD$(~vtoSrt_ zdYVu(cR5yc-b=GvTxOCy(x@g^Xic4T>9ot19}5?d>wPl$F0NR4I9!q5&*0P%`uU{z zyfA!z+U=oxx$zYWiE+C@pK4L(5sN*)9woic%P4yV+>6)4!gy7Zmhno*)yIkR2;!K_ z{cGLEP3ze8{V>jwHEyxJEo(MbTRQmWXfejwy4o;0c%(ZptwE!3xEsPNl07D2iRoD0 zp~qbNIczpZdb;u>3jyS4DR9mW13a~hc^zTc&XTqhYbfnlcZwNdrRd4J0w%7=N5@(J z7~vRIvPs#IfP`0bee@w+=14=ztW5WZD=fhahLQ`D2(Yvig|tIbjBy-7DG9gO2UqNQ z$JcFQ7Q0rrjcE*%{-laFFq*!_n!U0{u&e#275`GQcI4ntW7p{F<9&kB`i_lp3cy*ZVsWbo!C+K zY0)N@Fna|islaKpiDgWi6^RFL@PuWrq`}LGcDYva+8eyoL^GLk zHC~*}PI3opqJ`X2vyizh{OsL4x$Q_k?$Z=+%QIBl1@PF*Gt2HM@aNeFQaZqY<^f2> z?9O6%TaN98JqZ4&9e5a9#1-bT$36y4qmLxRJ$C83kIJW4M>ek4uulCU@`RJnWZNoZ z*eV7`qglx^!mMZ~8*`Za{QVfP2l!9BGTu@jrg<3P*N-UD^*kF2wBpZ(UG*a&l2XBV^g1Z;L52rl-fyh8DR#;N(>z_mNnaHsjRWI4pBKq zG6Av-zhc-c2Px*TShx{#6Df#q_eSv{}@^tzZ_0#`bwC9Kd&YAkD;mM^Pzdd7sEI*%r`Ur<)8h<bnsDob`(R<6{g6Z-_}L04xXXvJ&Bqsq^g)0-QbJN@-4fniIYOkuiwnb|!z+j$ zSQ5xC+Nd{EECJ?_vKlzYl-? z54=Q}!?Q0O30q@Q&gxB?)^`QOArk1KSnOtr~fs4>Ret*(r`4K^!0Fl z>)x<<^X~~=SMByA-fg3IUJG;X`5jY9{Wc`i?)@d%N_HL53jCnvwQANBymdkh=UFzo zy2g)QUN?youEbiJ?)sg7-pUET5>9#VjL?4@J}{E3wUWTG8*);!2rr72iBoaRN7xd> z^P*-NPv8%o+p?B*7wh<=FwSJ+4rOb^tixH&o^u@-6LZF;%yVkG>nW#(|FcD$0}_66FbF1};gkcN1K-UJbLF zXgxzibSCnvQeYK&p%UFv^uocu(K_n&0k zN))3=Nt!gS;_s3$?V$WFGt_P zwd`b6$r*cSpWo~m;cPRT99G8?U#DlN_ow*7{Lu;LC}VJo809S1xpy<*L(9!^dps`7 z!e&O__i~=QxH_zObr=6GPs-36#yQ!^--0T4&27&!9ER|J0MMm*FL3OWtkvL`G4oYS zeBXm?#qRp2sQ(knKAdqr+gK~T3^SZ#iO5Jcfv;3SGy}d!iX5#e%{?k{k|AubHXVUK z7nYO!&--W3itw`1J30RACt1qEgXFaM&^Qb5T@2yJC}P!%z>AVYemU#rgt4=vvo41! zxV8^6SN$ozZ7n+F44{+M7)50XnW_8o)uiQ@jMmCKB(BI+r{tn7;1vbo6rxvD&dCzF zYq%XHATtrb`a&rYS0o6KjEdpJ1xkbqgE2~y$R#MDhT?xNO_WJ?W5fXf0*A#z#DwU| zjBGLpAQH->Vo_*SKtxduoux^Zs^Edaqozn^d<-Tq#g;0TA$+St(8&FCP$nHT0byO| zLs*|_6lvK<@W}{?mlqyg0h%DKAY*RQ!Eoh$43~+tW?1Spdu0XyEhPk~IaCpa=lRKp zIW+^xe&CBkp_Q=KOP4EPWp*kCX%{hKo5^5o>Y_v8E8kp3 zrh=)oh5BTlaSZCu`bcZY59|*QJxxAffVjW1w@HZv$rIoqw%>JjTtjOQ-W zwd{WOSG>MY{)TyVp8h2sSJp;@18Axf!>GT+vqqV8e6XL{O zCNoT?nGRLDc;c*E2?H)Y9NvDacZeJXpT!v5_e+%e96{4R&| zJB2Zn##<_F>jf%wLd=VWF#ELY<#0)cuhXi?oXUuzde+|%hPfJ#lHLZ0*b1q@2@_6M z;P3_ZOgKW3a+x|$Ya86hvg~a2^5RAGWwwi@sH%9riSCly(j8Ckp)!=+nsBo`h3g(F z$0xJ7iyuKD9^gi|DgD3;BA`TS8f!Vq@cH^JGOXAV)=BhXG*lus*3cEvjD{y^Vf$QjC z_|4UW?Q$D=RHN8V+*hF7zlYGE`vE8bygV!pcRGh^8AR82Kf#|cGgX#}kV@?BKaYp* zJuacBOL%fs|Ns1pa{Nt`v_l2oyqc__#Qkqdz>O77lLyab_zB4XV2sxSZF>E^i6NRv zWvtkTvQ zK4h+M(*o9^ok=T=I2wcjidkDL@I;_Gq-Km|V^|UCSYe_nAV#M1SQ5sW$yFEr0C;lb z1hntVP{9L7L45tkfQ5rNCQ<`O)_^(J${*c@?B~RqFm!xn7(THwjJ$%@`!Fb7k4u># zrI<*NIUkpL5bpUfXFDT(7}n?L&7p@hC&lAS!m2$_g+Ki){uH22%lHe!H`2SpED}5^ z|565KY@;!b1~pzr*1z`Kj)keE1L0$z#05M4V!blo4im=VPyd_$N_TP7?y&7ibkmSA zTOegNqqp9ITwp7d&Nip+iQ${uo_Zsswmm_j)~A2NzaJb2hQl=>bbGgw?VU)ucO51O z6y3n~XPCtt)%8Ar-5KjPIl3C)oHZtpyD4euiE|I|Zha-3hr{I(Qm=fA;G_$9#)g_+f2Zf$2wIze?@!Uz@n~AnXE(JI2{0cJrtH8w z)hCdQkg3Tqs#Y#~E=`PRBPYX8!BuXb3wTZ4fa7KMX0V#S_Ral3W88}v3_Dj{$6SAW zM6z@BRf+Rzs7+wk)J6)k&h0-yi1142+;t4_#thSdT#i3)n={1#@8VO9b6$3C{3%m} z!}fJ>UG3Yy$3zhRET46}?_&Tj3$xX=IuTbTK62K z%lvLg?_yT1w!7cpaT!4E(~DTPQh@MEnf|%}yd&Ek9%c397R;BLCkbC}AAAd*oTQ2? zCn-E!ru*|th|`>xqLRJ>=jqCcLJPRtB~Qal zJ1VwU2i@g375#A%CY2rMv%4zmA%@l!2Ks`$Uc_~2NFl+Uur134xRkE)VxXt8VWJ5E z1bEU}2C^1#1Sy|(ye}oDBiyi`C~T92P`aHmX4Tl$vT;w1B0A4#AX3z%R~3Ly^!T}* z=?Ir1Hls2Nwh`1xh$$qfIea)QJ_#ffQGP(glfv?x1~khTP8YEnRZZ&5vmh~7Tt)>t z>=uA7FQBpn+Umu5vI$qv?Xw|ty2zXXal?tz0EG;nUa(LZ0;p%hTp-LmW>r;Q0RZ5L zwpH&Qh3_ii8?DI+npoll>d~jgc1un5>vSc<2iH_Ljw4I)@;qYIqcnH~IH<1BlJ!_z zzx(!bmFassLWZRqUE;Xv#Gv{m|8d`d||LMEhAobdSc@TS|aGq5eoK*nCC1Sx3=YVuQcXx(fKHU(786aEs4xr%L zxsVDdMehTkvg`(kc5=nB4e(DmSAy2-xd-?+3hnxE#Cg0l+p~~&I_FBjyS{xunEkxS zFm!5QvpnS@|8e1X9tN=pZCK{7Tjj3{hG$&h_@>AIlm9C!>RM7YHo6pL1*;&tBH%O& zva8}Q8^je`f}_jxhmS*{Bo2zQ`*;Vk5!>-1CRyIXx8-Oy@ED@wCm^35BIW>su83kt z(%IM5*VNZlAg55upa!EGa;#@*V}0LP%tNyzUBTXikAZULGK%gwD`FC)MuYU!v}A#J zN$z1ro|ek7lt=v8Ft%EDm6USudQl@PkvE#Qk3Om(Y%D;{Hxn zs~)FMt`Fb1h;9I%n}G=B(vyHT*|a8+pTI9hIj{-89uUaj1W*z)cFMHr(X&k~OU|9P z;3$~sh};{@osi7D2IMCazzOK;K@Mi7^;iZzcw*tC+XxS5Dzhq3(HT9Rv$H;gU9LTy7dEOXdi2AbxHCi_60N!P`T_8Gi|Pbx!!epSOp( z%wjlY7&j0R%a=guBoaKyrHJsG&x47&cop+G-+ChaYPU6HyJD&e>ICJ|U zpx^V%gETtX$kwN1-D*kt4X@k#>@UJS54;*qnRq3@gn?Ikk^AD?s{QkZX%JEIMJ_pxvC>Y52fS-BrRbsnjJ}XTf%umwJwYLK4q%GfsX8$)x2SPJc9*9K9pA$XA$)EoJ zARVZz2I(Y7MDc%aARWpZ zcj?&veI7dZ@c#noDv=zGoZTOwIN8wVd8D{)-F+-%_kK6@?qWQ^Gil@4$qn21QU0D$ zAO~6-ODu|xopG)58#9EK!EI*r%s>voyg{E;L~3LQH7}@$O(&zoP#Uz619_=Jt*1G1 z)E$$0+Cw*~*dK%*TS9Lz{5Z6G^}&(wjs;9*WX&MhN{N2~ESG-(OC>sll8dC9OaYjx zA2e6R412QOtKi*#vX8u4XmzedT~brpCrj*XikLR@=%MApzEufh$P?Cn2I(+Hh(^L<}&Ary7^W8K^HX&3>NS3$0iv zXV`)=s5|uOKb&YOXG8E-FV|O(L$SUa%+do@Wqo~nl7ZN&Wcg~yakUYe#Ztu$m%73F zEQrltlV@3=uKV`6%){MEN)B!$?40GE4fB9c9G+$Oy4j&^#dILqyinrz75Ql%Ba1)O zHXf%3DCYLG%3wa}b#p@J%9(NLITH4`sm;A7{9Y=kVTT*31d{^_+VhQ1Gsv z&<}*GZYi4sUG-$L@wHv>eavHS;^tEE9leAHSspmzD#?^}@aN zaNJ}we@6VMX#pH{y=&$o5xpVwa_l~sKzX`e0A3euyV>5cj`P9URd(>I0oVj?Wy%6O z0iNq!fWkEAi5#7ntEor}sWtzCQJtmFy2XD?iGM&J^jbgqDF5^s{=B|cy)2V7gNKR! z3H(>2xyxCAuYYItTO|&h<%|ictRdc@z6Tid$w)go0?3Ks_)6t?c^zuSpq^$`&Kcld z2G&rbZUj6x@CXn`$yXHJwHO){djk54D!g7FBQE=nT=dr>o;Kq`*?d2Un$cXSy zVXBoF_oJ^>WmS^*E5}+TmI}0pb!AI^hV3A%0-ot{B_C5nYXG%8B|WTpKDk({yVcr8 ztM$7^x2uJdEEzI0@SL$XqtcB&?k)3HQR^wV;BeOl9$#ZJYE%BM<53#RIU}vxOwFQJ<S?2V)ND+BM@4IIUzBEgZY14>EsyNnFQ1z({UGnHH(s@!`;8$kEU?m7I!(6ZyuYsCGq1$u59kZv0jb!;)5^@(3F^Y*WJcksfVu^)W4 z@xXV(si#ash6E-7%YFP4CDdBK3R@5U7%mTG*U_J_$FIY(ttZ0xGfn*SIi^dRAF6k~ z5qj?XY3L&9oXp#(;RYmVi$@JSaG^zZXC9P}kuCF~ljbrnM(6gQg=x3H6m`B#BL#As zjM6E&0AQP%PHBeO6wb#P+1$GLrEu!URZ4#?ybBuf`gN}&T7CnwuPj)ZR%#AdBTj2M zcH+8s75EWTUPk;jANNyZ1YxOBSp{Wb47;(n$AETjPerIYgWYtjXq`dSrLt%KraA zZ8%xEIssdp`Xr*^xSG<_>YV2|vwz0FfUxE^PMh8H3J%H>p@S=)&oh|CQ@OzlfAeSM z<=6`NAfVU$iYyvmDN8Y+NT}A5-i}d#h$=C*uHwi@_?XHv%D^0N3tgHVMjI(qPZfY% zEa8}dp9zAk3ghA>2w)c-r00H!9t;#W@)&MclCDHJWdwnojDFHc(CNzq*GQIm71Bo1P#Gv5i6i%oF2cxiwFq>?Ii)?&0tZNAg8>>u zFxQ8>C@^qwy&kBY0{NjyX1^=nFKw4PA-VN8Y2DY=8|8NYYYl?uM|C$fl zCz(Uxp?U7eYz!zbAmYEa$5 zBabs#bp^L^5x}S?SH`cK_gDSB!Ek0QF}DecA<^d<3Rlem_ZqVBj^$V~^%e?zG*|_d zc#2ZXfWijXV*U6$qe3Ixl<=E6D@Qp?oy&?9Nr5d5%Iv{@YV6n_D5z7G)k<6~0wPm6 z@L--olJhGM>)+&RfkF{=Yzd`3F5HnY(Nev(f}>&p3EVK=(m_yB`QTz&GoTeI%Jf0+ zku#TB#>IRhGX;5h4kPDhyqX?d#d-37QL3+U?;VluQ=&&JS-~YQtqY5e;S8m<^ZH5& zM){r$8rNW*+ZG;!^gFtI>}X>?VhFjKBNoutC=L|)2?Lp^d`V~;ID}A-<1aqEfk@WX zH4K=l7)qw6H95rOQ)SZgR$$_)l7$@4Wxt8KUIYyu0l(IhauGFN2J|`4VVuIvAoZjO zkvK8?VqfSzTn@{g-4h!zEWN z4a?Sk2gUurgoh9RPkg68BY_EtOOCu6_8t2{*mv}YVegS2Q1?UPxIux>*MC&TF%Lh3om*;=dvT z*-3&fsIWP>9-WQTX>^?bY%WMcomo6}4gW>iS#7HGsICKPBql*i88Li#+wV?X=UU4sTEM~t#n@OD4!I}zWLNSI;#dTwwM&O z4M|@X-Y&NrM=*%id7jN?JeyP1G`>mDJmF}N=od2~r= z9(t7i?12HU5gbQLv0fHASmdXgOkN_@P{mu*r<__UZIT#Ix1(M`9e-jx9fA4=_3cG> z9}VkHK#vfasx*kDxz0ZfAR3o<=+`X4Yv3Nu0QrDeb#o?msl%*#Bw9t}lM;vteFe5M=rsh=p0iArIxAy5-OrK&wG4vQ;wZeIk*wwQCYlmk}gG| zSadD2S!J20j@JV)YJ(?=EgNjn=ROkzRI0;D08D{Tm#Q;C6d&D;bwCB+nM;CAAW$A4 zQxf_Cnrtbcv2}!IT$$jn2514c{K{^in%AkLvRCE{qhEH1l*iBUDT~gMj9(GSxiJy( zwe;G8eak=you9%v+j;$7eqw{FF42^m3};BXVckx(B<}O@;=W$4z84sl2jA&gRWMgz zS>y-x0JMrwVFO^9H2AKZ1{gK;K!zplOJ^YQr&Iu2Wuf2F;H1RuCwH%!4bq}U6h+zg zohxRAuI1Oq)(L1S54v(&;>MFBK9hdKPnv+E#FjlvXNIm@p%g)Z)w|PScr%#~Ht;9u zxpih}%G@?R-o#C2OF-K%_9d-Zs-W}J?33(13MPLh^2eM>vu?x z!pKsWxw8wrsCStMxS1ioR_q1%rul7|(PaTDv4R&?x=<-#4;V4S z-`Ow^|CWv^(qe1=Oj454joq9x*$R@|i-H$SnBlK4;pfX&!jl`vS&=R0D;?fmkE1c% z)ghSe4Ijxs8WtfS?Kl=a!9ejLBxzhn%yk6LYsLNTK89oVi3bhe$N?4`jNup*CdLxc z9H>0%saVZNpdO>1mQ}>)wulRXb@eO=#&nJ)K`6(ZKRL4-i2q3D1HDLNYqG$_F^ou_ zIxu2EelX8hgUGNd7MzqEq|*a#i36>8>#_<|t3yGTB|?ttFcGm|1dgMC5GYs%@(YI^#1r#HbDF_tnKv2+^EFe`u za~)t><5}XY>iBt?eUz^b~h8X5Jp=EI*DT7h(uySDb0K1_Bl8y<!<2!S!zZTP8{YnBZ8(R~?wduyAP2zU$#1_TeCBM-#qi@{%L6|O zj~)Jfc$9po2N2;UyPg8w>}O)d`;q1Ce2&a@&oC|~D0{vdO@@bvgKtTauawVY^ zE#?upij;EaUr%0cAeNC8-@0@iiP(QpqwK^KO>-fToCH@;CAeA|;bz2qQI;0NBHOsU zrgku2=T6DLS79o@TZ4UZ@*82F!a13~m=b7|>I0x(8A-tBK!neS8OxZKXyLQr{U4?K z7WeT4K6my)*xi@H<%^yR=QFp4b301;T>z}TkbFW@Rvl%=2{P?+c_cwnm-n9#Uy~kB z=PA~$+o95~dpo+gj_pi67j>|o6+O4G=dF_Rg%P_J$>8c;C``X)I2g(s89 zYa`Q8_pa}R-aX$7JxJ!dIGU)h6+{m56aGp3%?HLs;;*TbE9lwvqtLYzU{~Y(JZ^-Q z9IuA_jLhiR_5&aybCYgme<{rWg#0*qOY1hIklSAc`Mm_9dIfzY&*8q8$0BlS$WQfg zsy=lAfoBz7W{9~&c5b3R*z&_bKp>tPxiQhaTCd%t+~Jd>yEaK_8qkxNHZEl#WSK6v z7D8F~R3=6iez1i9G_$3PSiZin_%ZUnKEkl|A#$qo8Ge}A*B+r8co1(1?TqTwS*g@s zWmW-(VN7I?4d~m8cLr#cg$2{QsdGt>qA*X!OZH2bpZ>wK#%X z1?ZN+eMr9_00%<-l}JILGgV?kFP=KE^qt@&aS*3TPCFWqLF3YT345vqVsG+&t8G-fvsCMsg;-g?=3HYM*A_UmQrg~aQ{BbmoT z>3WW(=kxyRM3w&YTH995j4(<1t4?+0;AQfdWY_bU=Qo$!V&IbaFTDm@2{Nk)CiB>O zAQN4iXLPQZ0YL>kQuYQSD^X5>Xe9tyfu+7y{h!8?dPTaMbxxaRuscf8YFC+Ndo5Oh zMk&vshAqi)xKs{5tLKPoQQHQHYzwEjPdCSQndfdKpvA1$f{!!BO5duH&Sb|I+i#LsOxdUH9Or`4nDQT)wGjzW^-F0{zbmAPeA9*vl<7sw}C>=hg0 zTunLvbK`TM#S(m*n9?ovrKmBaCD7*JE|@hC zsAx0IMmOWpqwAm|n7yrMkg*;<6xRzI&SgC}7TG{JQq3)m z3h|5_%Edf|9G^Ts=>ne^^b5A@0|i=kyUW@(M9~CX3=l;-{2UD8(;Rx?I*`Q4nk6gVz7N@Yo9c$txpoDK8m=KN=$96l|Vc1kk<} zbry+KF@j`>eQ!CjF5Gy0b!}cS5NRUtO!O_ER7O}R-8eu*a?P1tb4U*zyDcnwh0`4a zTk3fprwh6t$TzOPv|4)cjP5#+ST`ki63EZS>$f-eBYdK`C|O2On-Xb zO-vm~8mL6wTw+GWPdYcYfunPvCg6T|A&~T(n+`Jj$&2Bd zweU2HkA<(#+Y#RVR|pMHyEvXghwOO#o^N~S)bQRvnH(;kx-{Gdhq?EGUoy+$zXL=6 zS9sw0--T_D{w!>K_=kj;)MoiMljPRtNFu^Kw0j^JP2s=y*ehYrizmWae*vA*_-)Xq zy21;?c{3_xoBVBf)XBy0Q=f6>wbXwp{LN)|hU&)u2d^&?0y|K_5uq{P2#xl;e+mu( zRrS@t60l@~;BXF}-gaoJ>FbY&E0!J%S2JPv)vL^{fxvP(Q8FUXi|{_5HsxmGDL|oD zty&#R%ANin;rOLPt=0{j|5 z8FRfzV>Weh`+9bhx{L>}Pe0DQ6B*RV=SDYl{4vccHY1+h`8rUQe*nKf#{Wu-#yy~d znJ!KbwlKKGQA``WYYwzp1g)m!Dz_brcf>mrPryDrYHn89+m@)yZmxTm^)#EOODD4l z{$qmt)9R5I*2qU1g`nc!Ab={UwS@P{C{AfQ0i9G^A~A)9h*=%==bmZ8D@j1ZE~6I` z1Y3ou)N?xmgR%Hgx|;`>dT2i`?1w(t)nlzUMFlC8mu@1MKM2j9bV=V`ER>PwE$qh=fj521h z0KeG7{_4dtkthRcLFDA&26d6@*2{r_b1X|(L+cByr)ir3B^KGQ-qtpWCx5>xIe$nD zCICCvRbvGxo-Bsm{2gNIJV(m1SJ5+YHW|r+OKBk}x(u#VX}TN~k*?2f=(}FdT;LJp z%{Zdl79>_+dvuZF3hh`1tkNGkQO9T=_>cn%xXeOiSyz(S15WiUn;CK}qwWqUm!$FQ zPUu<&K!T=AQ&U(6+N4DZ&{grSK;?CDKK;f?FFfMJG*_$J)6fa;RX1C_529yVdF4g! zeL-j<5t!pArFsE*o;k^Lf|T{POR^j>rPJ7>5UJZ0PAc-NJ*%zLz(AeAWpsJo1@DIY zmaS~Gq*JiV%$-wk8ACOY`ZWMHjc*WsW=U-kq#>vz~@!EW$_@Rs+iMZKpYE7gVPE zm3SEOOtH+v;r5DS+rg?mx6KA~!eVY6FT|I$gYB0i+a|C^UF>fpPv0J9 z*w{yQPf)BcP9NN;sdfaV$}aU%s5((N=}=0tJ(BMD)niz7nm^DfyU#J~;-# z#8sQGkN}wq?h&)uWN4B{E#p>$X`l;$o;FM6NgkVpVNI-WETZ2jq2+X?oJFcbwj8q6 z6=+_1Xb?_yAY|NuEoPA=>psURP&>ZxFw=!Ysb=})U{qb^sVgD+PO48b_n;-WSR3)F z6({#Sg?AeXct3$5<;S5_(SsJvpJ!fp$x%G*6|ifZ(p~QL-4zbjN5)z+n47k>3`XsT z6dgb-={D2Th+>N*t2AP{bPx~sQzoKW1#!BT9CoY8^|F$71g3zQD;%pxhI&)k7&SBS zyjsrNLbBwgHO!butu5-|ELB15II*h*>C-Yxqo|XcPOJ>6!6UZix}9xfQW;EJ0xKH; zGkBOOL10MTMOJvxsy)Bc_@-uHysMe)!>}eC94jGi&s7Y zas#vCsRic}IB_lc)~;XqQkZk=%i#ioEk5>@1)=dzriZtkIU}^Z{R+?=Da&E;TFB=8 z@xSZ{ldt0zE`2dq3pAR4W3#97z{VSu;pOgND zAmVL6)DB=^(sd7HpBSPJ4FygBjCTpB%=;oUI1jhFu@+ZD3}3PIv2g9Gr?@}xrYmaG z`$`sH%)Pn{s?rI(ob}_{CC`SL+<^D|c}+4o{{7QJX}JkeL47iHlCVhg&?45*>FZv{ zkHd%;6QR>!?XuijYXT;s$!mrZ6ZgSS=)sHIz4K+ZbH#6lztpqTIM1%3FJnOVbkpEn zDkxokFkA-eo z`T6}wj>cbJBdXoE*R8^O^7d`qi1~oiCi&L6%rsmVGt~U=(Gwq&<3x1b2|Dfp zC1-X(p+Y{lfwrU2Qm(aGSG$6RHvHepV&^k%X?NVxy^AlwY>jEHC9|PH?dNz+@jl17 zj61d<;DlC9x{+q4{t(lS{*l15{<-);OelC9mC^|U2aku|-A4hwJnx!L(_h^A=B6i?1KWqhO!NRC%v#$WKPk*g;4s7keAC*(>cEhBLV^h?xf z2`xXZ>sDl2phkym5iBQ1mM1WE9o|;Z~uW3x8yO*UxL(`q;$(5!|fQfo` z>yfB(Nb*D#EaU?0TmOF2BkDoq*xi7z(p@mVfV~{}Lhej@(|w@~NrECb`eMQ(Qy~O&LyTN0IV`PQVz(}vK3lu6m&A}wrnYdn9xlRz0%Yq065Td^~ z1G5Yx%6(=e`}Vz(I*!P zh7%Yjy%3ladSE}hU_)gzy8)49*w4}`_8j$@XF!CuNxHf56LZ{gpGF5r9^F!q|9mHa4*0&3-HYdi*q32q=cua zArB@lXI#xv8fT*C5<>DKaM=p;Jy&Ap=K?jP{Q=)*g}$KOGeR(%4Vv;?I6XbDVPWP*kw`N0x^uUVT-+Fa&16%cBbW2qor zbQEMtM3E{|mwhCrteSEfBq>k(CaPsWaOu#Ym9Vo+G4SF#5H9TO^Z4FDn^6|Pm56f9 z;p6%+Q9d`m%ygqKt&MdN{eqU21oR7MPmg#O&ee=S!r5EDOH9ylviksLlV=e=h)=nq z5?54tW*I@_tBC#qyS@NQHej41Sxy$dyef3`Ii^ zuERjA4in!)2Aif&ho<*V53{SxHN6ZtBcr;UeEG|OGE)S#R|{&55U$M}YAH3D>@=4x ze-fq^w3N(P`goWiXL~s;?!}7$f9MS7EIl5sS%5~eb!T|bClTe3yAS~VZR5Ys31>=> zjyvVT@cxh85T?$!I}8I6w?Fi+#DV`C*!K5iV|)We=Px7q8u9H5-wy|0`&IbHH%*@S zh0xqQnI(eL=D!VHeY?Vz{l5+4PCGk{f6tX6x8yi~@L!|2d4svnUyDfhZaMr=WT;(yZ1!6k{@^V@<+pUs}DvVA!2flJKOvpe3nn$GQIp7#4C8QAYeh z5YMSLv;T14lXi8VI^ySo9^qo+!{RGGECm54b%0CTc~+gUwmrLErRM?ZZ-eV)1Y#hN zxV0R$q6UUH842%zpnG?X76!d?mutz9q`YI|$J&MPNNTv!d)!h__t@=uc6^t(nI9sc zcghRy1S6l?sKaycboh!T0r41+&Fw!D(t8*LiqmUA*4sC(p0x5m0NSw`*v=^76EpBx zF{pWYb*&pHY~W6gdbh>oHG1erUEKy98)qzvEl`(%{49c54bn~IAK#(FJL&;MnV{Gb zTXp6ZOw9+UYoKWf7G&Xr%%FY%vFQU$5doSVV7;HR{H|KH4B1lhL>!AoO}v)~>ryq_ z)QxS%!n{v+wITpdYzVQgW}WXkk}Vq=ZD?@MYM3$^AIU`UrF3MZC9#WLuxB}#r@`$^ zKd_If0zk6nPw52l3L@1a7WkC){OTPBTj6-0AI6KSM2>aL>ADvgv97S|B)4WcZw6w~ zc$S>l7PHv{Y|3IfjrU;IqGD*S?7$xj#;yBP+hGztZc^ZMXX%xWs0zH61GnY5<`Njd zGuldYY|7>YK2f``iqUqmfn6Y{UXW7{SSSOI&0+to&w>Sd#5G`=EZe(o1_9j!61ojJ z0k|>;`4zW@Lghtn23;H-OcUD z(#innI*RnJ=GiMRx5-($ZoCFuM_dnQ&rm1g)YmSO^+|Mtl>N0ueyt;gM5x`8116@` zTyn~IO>F5B^KzYO>JlM%O6=_&OuG3AEp-fRD7LE7`UpiefpzivPxpx8^gMT399saz z^?>F?r`=%AZcuCozWvT6-Zdh%Kx;+NqPR5TQ|_#765;MdQLJA6_FHGfu|pXwm*f6R zq^b_+;3#_d%dn>f@Nm)zb^5V9__xH!qlaH98=POmySAPn@SA3bc_Y__-o@bGMb`y^ zY+L`Op%Wz93-at-cx`AMydrcinih)7A+JHExn(FJK&cr}XZtNPLnpr_%Wo=yK>OB% z(Lt;23$F>S!&mZem>Cj~towD}G$XW)T*Z~n3~k`zZjmZiFESn21pHddv*_l)A1#1g zlRH3=;MmTkpmoY+m|!t&7klMkax0q{wSjljVq)5fjoZ0%U9iA?K*@n!J7J4)jJMgAo+AmlfrR@gTjmcZDSP)V4ivrK=`!EjVa>%=DJKR4(; zZRC|A*h;ToLfQy!D{1iTDb8%-q$UE`B8kg|ue~&}-gRNDaJHAm2Fzy#yjC>2C1I}u ztw^K^ZWhY6h+GA&qF51ZTnE`YNr~%aVQzEAHCkmyv1~6?uJAQ+LOZ7A0+|+o!l^8c z%c%YnXLW5EdJ0VUFfmULq9#CUVYzq!ZuMcb2J92(DVZp)?R%0=8?3n)9J>e&sra_~ zByz*M&rqc7i!5tKeX9tQgj^DUHOi zi;oix^}@1P7ZnDH(M%PQ?7L%J6G2B6nBgkS@M07Ux4m*_Sn~2}P%FR2=y|r6(L9t8 z&X!3g-1j`12qNeQP$AUOtjm$(s2NVIW*f?fQ9Ns6^q4a<_xvqkQt<`Ez~n7o@#y|= zL3%#u2HofQuZNF)Yhh?->gJ2#8%1dsLhYT0kNFBf<`gsVTqC5tOh|hnRmnwuO>rg; zr&dhO1p3S{@W)vm-*FLs_Dc{YTuYA1X{(+i)7VR4E*NlX=CSaX=iD6L_Q7_h1QCtG zv!>2vNy;2x*0@v74e$Na>EYXx0q?_)gnM`YI6P)Z{Neu|?mzT9B7uotpK#UHn@9Kf z76DYuHI@2ec<-Oh2p|5WQB0o?=XGugLtEYua3H#zwTT!eBVi(BbXu&4tZD%1Eoc^A z^o%)BcJsC~J;~k7>apxmW~h8L%vf_UT!VZ3sP@du&^=69iP~ZP6XBZM4~8pO zJsYN?jkxSa>Xsi3*YrOb8vgV;#sX@NzZ^b$)mkho$qG!5N8wnD<5JVwS z*#H(0jR1?NNR~IU+&8c`~Up!`-bcAh|-%Zci75D zKOFN%us7^-9JDt*iX-(yj?`a-0>ksgGZZ1h5s*3l|Kr+jxi*VGBhNo;hUb~4gpHwb z_G5zS4?Wl4rNX*y4vuLrSAYrj0;jQ!R$(o}rPEqASo;50pJlpF_1PFeK;Q7T;&b)X z$7BL?7Dd|(?vrR|h%w1epe>PqGZw{d6#cm#wPBA!r^n7We&Xv` zD@F59C)k?H&RiDd(I;Rx4hQY*Gg*BBsg$9AE13*3wD0r4l$Zft;~4rxWm!LQB>ziG!G)w#ta^CbLAQAY8MzUI*$qI;(A8L&aLGakjF!b zrIx8dQx{Ho{4`h+B4>Q=kX=21l9@n(iR0K0HPv94z+riXP^q;&pzUyT4TEJ9o8%yb z*^mP75pBf`6lsswWhg?)FloL&Yv~xv#yH|DeaVi)XgCs?{3EeSR?=CMCt=&|SmC=m zPsiwd^vkdNZ3~)jK-KEQCNfpvvm#3>xof`bzgrmyj_mnoyi)1Tj7SL&>MF~TKly38U=63qIv?!;_kZQWp zrCOK_D%U0+nGRXgsT1M+!6xf+ovyn9@u?2iSyzdDtwH80xGK>`6DqtazlIDVtyxD& z6&&vtUDd7C!(Eg7ty9%4@w>z~NN1_0ycn1;+t)Wd;n~%0lj6! z)CvRsWu_Pa(L`ETlXuYobDhr`Oj}@ac^22&gTT1E7}8HH485y3VNb9bYdJ})XNL61 ztK?ha;wrLy5!ckQ z5{IV1e0AmFfB2F}TL6a}VDj+E5e8X@5tkTX!t6YB5_MJ6vq;MYhfI5;Hv(rP+T0J#x%b@M(b=&nF~T?Le`14c&y zQ`ev%yb?eixdH_9Ix6U5k!@bZ+X3rpGtf?(th}}@bgZJ-(wdvQL!u+0%cARJ)&t~J zmM8EEx`{lSxQ+Q+9c|2|y5^=ZZtXkIgs1Nu4jVt*7wrxfde@%tiLHS7 zV$%O8^#MAEu>p&}L*Vg>n_F1Z-5oUi)%pN5v;2)*bzm-Zi-G#R(eU)CbK&Q{@;jgn zx%Crz!nYfzLf@8KpR`SR95|i4^?H~=N4J@R?Wc767-AkNLx`0#HuCJAff5*@_Myk= zo-@goZ#Xs|ci?;bg)n39YhczTfbd*cu!H>mogapUqqoB!EIbze(>FGS2@lUfEvA;x zeL!x98Bc#4k`6}2C;t5Bri9=BY9lPF?h70C-3%|j@ekqkyZ;Y6bDOEY5xTm+6MpwU zt_TnRlf~iw4xPDw5`Oh-DAK2YOjh!rhs8%h>XRQ+^YX95LMkTG@dn1tAl%(EYO1r@ z7j=BQK)6zyrq(`~bSYxt+-F3)OKkV6w2+~D5Rf}Z$=1xMWYW_&!uZKs>{Ry-zw{r6 zFaEC-yRal^*JIQ#f0ueLe;fK}z2{8|)w5c7s+q6e*wv)Yoz+!u|Ju zBXrnVcjDwQxA96?gf*r2>DyuYW{%NL7Cmjp)zCfvSt>y7eK%SlEORwu+by!rkWT?) zH)c3yPsM|v-aAgU)q&`^-4gNl4G}AVYkc07)Ru+ zw#4jtC^`FrA}!?;2pc$fW7VO^?do=pEUIws7)Z@Tjh8-PoixZn0nQ)y=yDReBOapz z_fwV1GF586mh>#5F6SZmvC^m+%fOFW7}$id6XwZ@Qtbn7W&QNW)XhWxC6Fp{Eo2Ws z{0F@-*^IFgRv9nMJ`FQjYq+;g-XU$5aOd)MN~3V=-P;K+11|{5%zMp@HGzy5f>8%; zX!zl_(B)?>Z)p){(A83U=LH}wIY-}BFg|&e3>hrj~F7k8wGNWqzJ;Yd{ zg{@2EGL2>b2&8~1a2g>9q$%*;A^#?Yus>Ow6FgWGVZkIJRb-XRltay>w~}LvZ54lO zz;b&?GzSp+JRafsoecAU?H(cf%c9zDx3DzG)I$ix?cr_87o~~OfGmgC{nTU79sn0q zqkMRO6pq=KI%|$;=^a*;tg&rLfkk%LK;;2!iNpLe{YC&6)$%}I99(y#y}LckUqON` zBF~zfuC!ZZ{U!D#4#;+ikfLNoj0Q1P<7&u#$-qt??f%tOLG`O{mYf%d0#Kxj(-H4P zM4eb=@oKLs!0NE7zOu0#EG@c=GHXEsZ9CN!x*w&f@1g#6l>LCUQwR`Y%0I)By$8yvKZui`b9BA{7}c@%(V19NL;z?XBQ zsX{1kvFD!W%m$VS2v=BIB0>MO?{Z>3uVQtH#cQPSSQ&QZfv*hWbrgKf0sD$O=9|HN z*f8KGu{gVK4x*_^U2HY~@=weT1wK>g9YWHq%DM1v)x*j6MfkRDZK!A$fP2gAxd~fU z#bW}K3S6lLp#e`0u#6@QSz`VI%gH}EkF&U#Bh?!v)FRU~cXMBE&%nlW!jhGKqzH=t>Alrk%Z33a6AA(pi46a@!h?$NU-s2U*%z6<LB9N+VI8-*2v6@bg)G5;bG!_4Aw)Q|n(Gi`H33wV~2 zBQsa9J0w+n4xKe5Vc#hFMi+xhaHo)5M<><=q5mQBb4QiG>N2!%x};(Wc_kb?039n9 zN9vW5yXEEhElRPk$>p_7wVDSEbbDcxpOZ_g!h>zHwt&JgX=vIZWZ~7#t-(>V)9ui zSoVdP%{a4q!Tr9|+`Ec4M_76x;$aNIU2Disd-9{bta1nHGc(~Cwx4uTM;@NA0&Bw) zA3hxxH#dg+{_(E>cz+gt<=>5l#YlX!%_YO#FbPF?3e9MyQPQbrBSI)%O$-h|P|Q2? zD~cW<1V>(;x`C2Y-`RXSe4Eb5k8Qd|($dW!bZLK>_ROWwv+tEKW8dqfq@4@je(E)Z z<}2jke;6B6uG#v(g@5(i6w$cvPs4xs+Pd)hU&@F3$4v=C3dH|7O4VJz8#*8S!|?OJ zI6Zu4>V`1su>;|!9>wI7+IVp(I^Tk0cLCqO z4vP-|Wk{CV3_2q5z~G@NPm!ZV)G&z>QPX$d481F_g|1&*z=r+j@P#k%Tz&p8xT}90nSIHz z50E+E3k8t5UA$CYyq9bb?0r%dDq1a2A8F`=&jAR8g4?y91g^N5a`kW|=g81;F%h5B zC*L;+Kvr}RJ}JI%lYN4}hMeR9t2*UQkl}_V?sC+0mHw?@Hs;8V*c>(gF$W9LK@UFV zWd5_4!#|y~o!r8$uZM3^_2IuF{m-URRSzfoYhPbYtOGlD{MYdLU!!#7*7w8Wb=Npn zS1EgO4M~~`toSYF?0zfE+lwrX-(q?+65IUpMzHJlQXCZS-aQk5=OP{wW#z7t_ze4M z_NbiZJ&JwxBs=-(@w->Emd`w{#1hb_=b1z>?b7V`i+53&U4}g(KaLq|QN%T=Fdp>r zpNP!NoF!_>ab*;Uue94X&q?nvG6Zc01G`g!x2^?(?#xq|qDWzi(itYf+X0WqxQy>( zDq%b&V-^)pj(iL4lEdf8$+CGCQnjN|363s0Z!T_@XdmZ|2AtTsDoeN1&gN-?RO-4V zuL98*xjikUcE5+i-Op+d&%f}a@EK=QaUQ#JERpd&3f7#27@IhKV_ntH*uJM-($uW7 zD$V>THc$lB@l@DRrCqWhv4B!nd-PFEEP6ODdGz!Od=yWHb(avESG=?)d^SOUEds1#PF7S&kV>sF3y3QBs062X!)!p% zAo}bGk0FuXzBxs*>}_{gpg5KNaV%104b2jI^8j*^?$_w!d{8H*=a1cOU2TAxYyv@77t~`Q#Ikl!TRy- zao?(sbiQ@`yuyAvZtnPb3t>?#DAR>!5P>T(IjGY-r!1Ik#V5Hmk(YnD23l9yj{GK& zX9J)F+(qvLkfy)WJ#!CrHkUXLX5tr6aUF(tbNyS&)A38o7N`YjYxyCeGxP0T{ zFa!u@R!&E9oedD9nRApA_O`*1O|v(891;x<57qfk9azZyNryv~>#@Z-XgK0 z;F@qIr&A!d(rSZix5?U*9Glxci1gZI-BnPyghVU)ioyx|SOt+2lg7FQQdc@#hlQ`;jWCI|xmhekHjIfl$pPW_ z85bli{(LB{TF#Bt#4u6fMpLaeaFeiGDA5fp)j2Ma{CW-uT)hmwUV8|hK7pzW8>gZ1 zel5&ZfcpNTaR)fAbvg0PPghX4+iG@$ZCrkk;9%`< zy(kLY0y(y>$iEU>FlNiR7w~n|QMgB5K#W~>a%Jc?>$O2?G@Zg(f8SI$8hBDZS|`$HXlc-t15yDj5@D)clXQT= zGm!M@;ow9SjPzC3R_3(?!PifN#%G8Zi0_B$EZ~8LrYrtc`NMApDP!AYsWr+>(A{8A z-8q4)@9}gKM30V)Cew}|xwJa=Bwq2_I*6O%4}3TPCpYM=)nY+I^ekTf27NHEU{7G0 zq>ipU@sq^4OAz(t(P+%jY^>E{+3RpLBJU`;x#nF+7fVJH;7+K>V+(>2j1>czE!2)z z;7PF1L+ldYJphFd!P2YY<5Adn7=9mx#-G3vu?B!m*5BF}Cak>yQ6oz`mF*0Mm`bu< zeRCJ-ay!E?z4)T_*D7O{bbzW&Z9^xfszRHr6BFL}X6V}Hu5%oBJ9Ke=AC3G5Mhz^+gP4(%Xt>xJ)_?qLSWmj%s%u+97@Z_5ZMt{sCWMyuBy%%s(F{@4X%VcoSJuI0`hR&far5%-DH> zRIe)l(d%fJxJ(n1z&a*H!vVPMSbV3XBr)}DLXCXt7N0U=-w~UG0^7-y9T&rwdUjn6 zGxspq52;J=GtfJG!0*SQvq?;qTX{Wv;kWA1s?c2aURZhbAHtF+ZqPGxU-VJf<_aC5({dwZZ{{x6r!~8)U zWVbVW`h-Se=p{?4eMb?^uwaf{7G3heG#!4d-Y=r|9e*!sd}@8BW(h25yaRKe!>q9R za+tU6HH6(aFdn=XChvNc7Fm}$HthF<3lOL0Y@jgL?pMOJ=idyI`z}z$%q{%m@F#z` z87!nwz)@=SLuE^;OPWD7&qCjez@o(piM@hbBr)sBQm+9G6t%P;&9nCf;JNU^ZH7b- zeV03vP(d-Z@Z)rdUAwBzR_9%7<+iYTMAt z$s3_~{8~sOo@X(8v^}zx)lZ|2=kU&Ek8?EHM!|Q+GdIIyoc!IevYyf{D^8J0-Y#e9ky#LR_Z%x?* zPQ1s3_&QO}8))NuuY_^)xq@c#Ne|(`bgv|0yeTH{VeXl-^?I1M@1wBf5J8FQj2-=? z-g)l9Y+zO&a#xPbyy9spKb*z8a{4AeN4NP|VoaqNO*mWy9ZPt(RLMUUx-CK3G+cy; zV{zX_fOl7!OULT6Cc3qN{VcGbhKlcvav;X_2cb!8(wZ)0 zoX$(3bel>nq72%S7k>!!bCg+5MGf9y;zf)$m_mSYHo`Fy49c=OeP726A}K4k_1l;# zO^dJ&W$^-j?W9Dz`Hno7dQA9>kw^4MkHwW-G11ABWI^)o@>v1>P8fI%JIJNCLxJjf z`2!>)a^#9!`ALCIOHwHBorV-kiOA+||8AJN;T9=-q~}@gzun-_9@?>IIIazQY-9VQ z!d3ks_K3p;p1=Ipp|#nXSxFh6!+4e1XpulYETBxajjP&iW1<^6rRigNzDuJ)GLpNL ztDh%j3rI~QQrKNjem8HO4fjZHP%_PB^TUIL!3cqvk4DZSYlaVXH5->l>O3loD}(>yTrFe zzO8Z$YJBQ39B?dxb5&!hi5oPb#B!=GPmcr#C&$z&_NcUmVrNjYevj5BLf#z)vRH$m z>^$3<^e&%5k}uS*J0vNOP7nXCI5Z^`lF6ZW6vH#qsBVk7IY>N(KCY7O`+fq923O&V zJ>13hs4u@4ex)!2qI)903RZdObW3mJ1rbEH>LW@4CBff0}NvMFfo zGtlz6TR6jmh~O!&3XdD!6Rpizj)MLZNxQ{o6^?*pU*Q@sm|KN6WbHwG8AtG3@LeCr zIK^42ax zwxH#X`4wpJI&c~>`phz(JM~cDx2{5ZL>a0tvIR1E9kQ>;?0jBl87`+z1W@B&mG=!w zBM-hb#_&#OZeYv{wD8*)&}%gr*J3$F56dxsta^=nHe~J=sUP(-#4GYYuPw|W$+FjJ zXeGq!hEA%qi=9}DJ!6*zvjrPKeDm@uUa^{7SOw+-@K?#gdkZ=F+Ey|L*8}i0WMv7< zFrN$}savN)30sp$gF0?QRu}#m%L=an%gqlQMw&M#aP@UO$@oS#+Qqvw*c?_HNb+CPq6*7I+%4qCxG`L9N!|4Sb2w~ez1=M z!}zcX5rzpg1~IWHr4P{GVekfxx!->ZCpDRcH&Mi?-8R6y!uv{0Eb8J<-F0iWb6Bav zHh%Q2tzq>$+ryd*hme@ohX;_F??ZC_{I4Mbt^8j2_V#P&osjjtG6>16U6(_L+|)zj zTQYg$wb1z(ye_!6&BDpFZTO<6Luws8Pv68$ePb*uuzTu8swIHrQ+A#YQ+Hhmv-W`X zJ5k9YTN{fe(>B9mkAixi%dEZ;y1pDY z>)+fSzVI*0q5B_cuBN2$ePk=%heewAU;Z7&rBD71^Zkg?@xKpwTCyvRry$#2^5fJo z^^c@c!6EjW;i2MDh#ig>*mG#t=>s@O0HEw?6xw4qA!X)pe4gnPR{M_M3DZ%==WK>Q zx8W$+{d$R!+i2q(szJfq#D3`iCFqT%3cKbKK3$o;x@n5I9->*(>THePa-imdJcml zGk${IC-dDDBD6W%-ym&rjNa!G4z|nJnKPXb=!@w;MtGx<6tHMcGE^k zzULU5@RtHv)5mpyz{xMY7s`NqgF+L{GrZ?W>F^lygLqcj3{SDS1|Z(j11)hU3+d+3 zRXK5&@j^KMrT0l1;p`F)WiZ9JIUWa-r*jOot>yM$9pZ1iL}Daox=h^I%Q{@%0?ydd z(|-|4FAyVf?N+eGH_yHg!E1|g^kyuE!+g)?>1M%GLZlYGQ4Z!Lee7FjI{+qLAfVf@Y3pKc*p|IV_AwBXRsJ^KSxAARlkvrwwiIJm)_;K^A5Ez-wCx#Z}FQ? zY{AS%x<^3B=kSbUtWzYug zrUKS%u#Tst$#)H2V-?zGpf{xFJW{aFNxdRU@Ae*u@;Z#IGr-madP#ha`d#{|F&Ba6 zU8@q9MwjGy^HU|5aG0m}@>46qIz;#t=ho8mf~Sk)&`9uFniI3=CipIAi~wO&bEofN_C2kN*+EDKwQX-z51!LS-}Ehmd_VlkwT zaI4Q?0A+AFPw<2-un?@NhAD|!$r(zoZPjRvgbQ64c&|G`6Gt3vzeo3uzPqn}-X4iB zLG7kWD!(g@M?v_DCKj5amgk!yyfEOCUjkrTi+pG4u?lOguog`jb=STbZbqKZteb^X zg2X*o)zV^h*tDjQ4D&jCk#%kEFGpLOapZZ$WcFK*SC*EX<@uxpqJG&WG+A06VLP)P zN@fak?*^g#CeS&=YYQeT@Oktpv&DI$7msL+42T3Qa2CBDaIp?&J#a>J4$oA{thv$#c-ebaxSD4t>~8&Gc@p3jcCl^r$pABE>bx{H)t!+K^y5k_A4~>Egz_M*mJqy!i!fLj%C*Fd?QF zUzV*G>P$@8#uVHHb59j~qDia>*J!r(G+n)#N((tQwpcG=X( z+eO}&IT|I{JwG%#^s)RhC~T}?bd_XR^pK{)e;LR=12H$z#0Q}8n7X)fX2=XrjnPEi zxMP4*^u;>!71);S@~QY`ri3{w;CIfzYE*6u<~7*kzTrtBM^xed8L(O2BjXiEoKz#i z($ZqAP-I!2^Cq!`zW^%r4Za`7>0%7Ad>!r?~myDC%IfX>0Y zA!|h6SLLdqcn`ypmWcLEQf7j#GA_IdF1#}TY$caqpHqcTtbRAnPg)etD>7A{Va6g; z6?k9ZwaRzu@I{g3uBh4oj+8EK7Zh$Uhol#ghhK;9C#BD$|ltJ&EQ?vWNmKLUWSz9GwR zAvY4@rZ~uQWc??Ry4T;_7q)zGI6U>feK&T~O>Q%FK-P!W>rY^Yfv(@(0pITmD{gE< zj(<9|5cQi>zZ-ay>d?dpgVt?^#A6y{XPfDp%sIl^5~2QcR=``PV}c%9}Ri1cvy<9s<8 z?KGJR{&!4=*`~o|RF8N&3{MBFx~F0Qu^ZfU@T+IKEo2FZ4I!k)wF=+mA zoH2_=-o#uyDctunQ~1Hcj%x#1guv_pkO7n&IQ(~9=6@Sj9sj?{8~S@5Z{H1%m(GT- z{OP9f^It)_|G7C~;%_n_wC@Lu$^TWzJpbohoLEReD$xqf5mELN-$>>-K}X@}_o(~} z#mMp*;KiJ~Ecnw4<@OyM^B?20_+EHu;eIxH`>SEzmRG_87;-KEKW``MJA66`PHm4Q zOv4W}lOr>2`(@G$uZCaw?Pak1H^OKB$*eH2j?Kv7g6J~mFLO{blj=XjyAByseHbPJ z7FBIkZxMarsW!d!pZFjwIReL@c$aVAVeIWD<860wVQ`Sfz)Y~iLJY^ldFiO#!g&v+ zkYa@`jS@=m{l{)G5e8GrbOGa?+DY=<%JC5#Xor)f~dWxnuJAr7&?ipHAIO>FuYv zfZ~jAV}Akr*1Qukl-~Z$KU~YDNcLsNH^M*v%_{vg2`F|D20VX0%-w&1u60yA#3D0o zJ^0SGHRfg)-^bZL?@`iDALr=L*iP%ZgQQ9Vu6edK!yfeQr`8~(8XF=f6==J&j#s9E zd|qa-p+tG=XvimL06dS^5JK#q}*Z(wQO_Mbmyw6>)f=sZ4QOl&!dwQ zjxNE_mQRa%7o46`d$%6iLsDNX)4-Eat=23pi)!gLU3ZSgCj4vg-UeJg)0`<5LzD3F z4C}gasq|t?hhJ^+RI~uZ>KB)hRLOJh0MBVg?`vpwj>MNyn;oUk!d?w@{={cLWUlhA z0opT5QR7QI?~5?IfrN2{tnN60 z1|MIG92YrW19glzbZ~U&o3&_JqVP+SAgVZ`uaur<*)4R;0Z3iimb$fV7(-A%&0-Zc zK9smNHd^?QrI)wNu={7uVfJ~mDh8laI$-2%`nh3=e;g-L1*vEza zA}D3DUIoAs%5kC`?!}pMdM*q1 z!g-uG!*o^_Y;YNfdTHhtz#ANyCVQT^&~C%NmO#q!^@D==&hb-nxB3T&K8Ns{qcjM@ z4snT^*_jr@`6AB|ZeqZ;u16UNP5MRYJQ!U7(({-p-6y1x29o9+7 zvurKy?n@0kZ-Uj8{n)!fbfxZy=!9W0orK%eiaDmYdIS0c6bs%?{EVDm=1l=dp`<;CSl&`t=d%(^_p>HAF36V-RsJVjr^G_D%qe9__h9)UQU1=cM+sljEA7Smon7bUy^hFGsQ-)iM4Sf;kIr zvS6il5nbp`UPm0qFS8u4jLw(_MfsZd8a=nbb&K&OtDxJ7%P33TxJ21LB7;$!D4Xs) zA9j3vG;IFpV0iNOGfepu!_MnMi+_V`;K*CFb4G@@*t4Shr-%+xlQ9~#_i=4dS8^BA z8&`yPBz0u-r#^Ze1va%x48^O7h(Zoijo7 zIs0A_=^j}6(;(nj(tRUVS^KN_N{nh(Aq7$Hx~e% zgc0O%oYrkZpA4Z++kTzzamZ{u7yj9=So7tN!oy!7pBpW^_axb%1PrCafZg-@aPGp~ zFyK;PvNHt}^&^L-QP4B^pQE5Vu3bjC@7Vj4R=I;K`d#$mHz@}H4pk~{qa~wx0+jbk zytNsfmLYC?+`YdZQ{H?1E1H>8N3b|7K_u>jFh8})Ag&*~&8n}nQMdR#6HLdNd=N2o z3+8G1ib##qVQXzFv$omK8Ka9Cpko;dAp65}w=*t5IhT2R&*P1`fG^4dCs(<+fcLG0 zYE0zp^YB&8qRLxK3Tc8Jj7Kv*#8u$M=XSj4jZn3Df$Ie1s~DK^!bEaE2?mTxvL>D*Rox zeqk&F)AuQ!b5V3unNW@g>%S)uSu0YLOFdW1CH?Njyz2vjODDfi96^rg%Qr|YXR9#C=N$cr)&FAi#hA<*oh{Kc z6)ouMR?p2}i6KprbngX&Gbv&EYQQmjN$1V*!_(Fv|Rne_PzlUYS%05u1o76ACf z!nM#P%uxliI!vxpbWQX*jL-9o9Ax;q#c=rQGpoYr1%7c~7y-~Rp@P&Eme}C=+GM(l zbLDx+cACgJpg0BNHKB;4^=u`4wSlzQq()kUattk`xF(WZ85YRG40U9+mc#HY!@9v$ zmZwy!l&VkK+HI!a`CXamhggQg*!HHdFPi9FfeK@94M^FvOr>%W+|O%lqY01p>S*y~ zu5(1BNR23E_T6a;Orxk>Vm&#w!z##9olMz;5$)BM_Gq%5h8arw4LC;APFmvSpWQ(! zdfW+C+VxG^#+9T28jepfm21h6`j#b%u_mx7ZyDufzH`sr(@3DuXHr6C?W{m>W!~iB zvsfWn=gWi)TiJ&MU6T4BtQ!9sP?mNQPhXbxq}i*wAp-m~07DL9RY|GmEK5)} zEipx+Kl@{$Uk-T*hht< zVCNLiKdG8C!$eauC3LIyS-ns0wvt~Svq}NtwirrwCFfu#*ZsaadzV5Ln-=;o!K8T2 zO5TX(nZd^(^ywUr#&Ez;+E$$g@Hoou0a!m(q;{IHpp1l{>#?dMN^Wm21Ix&WptOO~Q8`h5tH+p&G`W9LL-g)x-%O zl+*JH>TH3DsadZOr1>hpB?HG1kq@^R8f2)DHMpiCmvqi6pZl@QeMEi6Mf@IdKS=2@ zdH84BMOkv3g(}CUwV#4gaC!oxHxAZWHexoiyw;Wyf_RQ!x-`FZrevFBoa2s2^ugV) zfy$cOMegjxsx0H|byFbZ&M=L?ZOZc6Zf70hw5GU#|eEn&B*GN9Kyj_C!- zqRh7iH1@n)uQ48`*9cSOeNtkEZl|zpOiB9ZQ@^Po%{P$foiZ`^l>eB%f;axbiWVDy zeempZx+zlo4_^4v?cTgfy5B<{8M-KhwUF93tK)qgfV6x1qfL_alqi~%JZ~|c@ydW+IHFv z?ucS~g6(Ah=GPrFM(L>I9c@ad_aG~3^4;gHv@M`3rLVcQD~yoyDWf-0-Ul(RkAnPb zK>w9DRp?nMP(O_JzT)Ptuo@fu(;prRn?5*5f5Tm|x_1#z&a#j8h41vO#)T_RnjDP(4WB8G$ZMz-5 zwTO~{pFvE01gF|&3i#m@(38*yvo4`DwUnJFJ#Qf@;5_(iF0PP;Fs+t@44Pl%=-+T5 z{v{(fe*+2sB}ys<n;&otNbLmCV)Vd1p!(hoT}5>D)WItu_uLiSaW`ff_D3XM^Y zas-J;vV=8603U`4mckPNGthqe@U75$9F3in$`rnu{{4SLu!C!at;*t($rByqkC0}` zu^vm&>_=FS>>kB+Y%;U<(1#m{(<0Nek!pjGH0;hpPbnQcC(Pm7j1bj{9eDVB6=y__nq*i-&JP9U327QnEu>hVm{{Q z*iTj|V>rf9Mt6+);DquDD!oW7QG1D;2bFad_Sii9UPEzCdR$JYp+$~M zUZ;$=Pc%Mtl+H3lbAkAz_3G<%yugyvdig_w0S0~u?q-qYGL=yLalGu4DXKITFWeMP z*i?T!w(`Sa<-x>0DG#^noapVy;j+l{TEQP~`RQ1O8ozi2-?-_d6}%p0Ks5tI>Z+~+ zN^PV{0kb+3giz&I9PCKpv6QjBGQOzeB8!08Zf5L5x1rRE7`B`Tt_>H5PUFMmAz9>M zXUbrUN9zC&=qA$&y}CFoi9Cq@+yIr-%1bqUv!gTs~YUAEw+KYo@H0s{X*I`0D1N=2*2TuXb92H5^H4h zbkI2N%aAZKJLM_7^CwN+r@I(w>-B<>_T;0S^n?N${)@-k;d8;{z5RNUeB zI=9Rq2O##K;f!YZ%xJ>+#$?b2HWrr}5kebT0Wll#~@_v#SAqA8_Qdq{;Lhy2bhB&La8(YujzR*u0 z7?<9DO>H1D<)+F){{76|*Z|{VtoI1^v!fTX~W**_|P^kqlZD8D*@>&8$a?`I%>gU@P*0eIf${Ye7%3!;7v zvhT>dHO!fmP#k{BX-fPn8)`638SrnO#2tidzD(uDlEufZK*N7@iB^$sV7EyI&#qv& zPIfo;N>z+y?IS)XO@xnbXJE9b6FiGshk<6x9vG3b}N8` z_rsvJ=st8A)EC`B_+ik0gwK`XmD?52hxM=^tJm<+i0_Tdqx@SHz3lS)O1vy1gaRUb z%MAe2H{8b8{?U=J^}9#HruPpZzV9F;K(4<+R~_(OpGpvh4Z} z{w66E`F|r@^VHqFF&Q_hzP&4q`|Pjvg!>-;!|-$eG8>jO@Nvka4T)&VHnSzpvBAKD@=>riU2OU>j%!kbrxjlJAR#QxCY~}Jgo6)EF=r|T_s$h$qRMC z7c%NFZ|lV{3y7R2z;C%u2}mJytO!i9a_h+xCTjZkfz(ao$zP^h9 z54}O`{2I3sV+WYnE!)>F;g@98-7|y==F`n}{DWyFy_RJkLL|?DX z-Bi=Jv9I3@zx8|TxHcXQzxb6!;XhAVP3rEcFzdM^VfHRATg&gvhy*_tF(ANyQo%;Q z)i^KLxrB~hmXm1FGlkG`&Q1!_?7tg&*|{R3du(}G!Gh9JdHEfLXfFSPdV7k)6&pZi zIII*<`2Z>g?kiw!QhX7aJ&N=e+UYC-?PcIyH+bf#f!E!f!~ko|az7Rr@cCH8 z=D12%2{V_XeH}5qhS|lxi-cuyC@C2e@CgxPt(lmRIzDsEYmF1lC`#ePkJy3tLhZr_ zj1s;Y23~)S7Q64^(jmyhA~t8wtK8(AmafSg?{FmVMuwm4HP3+441Ny2SVdH?f$-Kk zv|iul@xG)9PKd1N z(LlD2U<$zI08t&#QFaDvlq0QbmxJhW3oi<@ay)>|6m980J!pqLRbrbQ;XsOYDyvuYU9Us_qY1?>(v$_iYpo`7@NhJxR3|kBR|ns-E!!Me@i&V0=5WS zK_;*AY9L@h;FjBJu?*;E5x0{fEAABSJu4ZGZJyV}dO0MgvI1$opO2+etLs=q#!XD4 zv1eIHUaCiDS3OrvuRjBdftRHx7l#D{lQ~sL>q!CT@5&539(4)i`UwZpz((IGQ zf=KSKlfQKtS)Sjz67xFvU^tOjShB;byX;>Y_dipB>vK?ithf%z8^$EY#6Ml+H^!|j z@LGew2kw!)cUg(Sz$OEeHH7<;yq@ESsIvgQ*N&0NOZhF?ey9w^-&cX)6H&ga$bDHt zl5areO&Gp{7ru<)CMnT!A}R8&qeOyi6JAf6r(yHfOQy1-tyc&R@YGO>X7C)c`b8vg z{tfUxDMS1n)l&=$oE~Hv%0+&@j4{4~z2=inK5)F5sLNj65C+b#;Ry=gU!-Txs}yme zHGP7yC35^#q;pEmXojg`g|Eu;my!4RTaWsRcQ&JFL(^BGY2t$x|CYT;dGs5o-tQj_ z$`sT5JxP(_5!s)@H71*YV7^=e-8ip8*8~6KMLOjNFSp%p=RNpjqf61 z+K?NVG3&Ie2XBaeh1qEFBDu9x=IngMS|8^^*DUa8W>i(pTO|$v*r%GdD&Tj`!b;Jz zktue)jPK-pEKoCjGw3yqRV7nd@`KX;f}MB6Z~d+Y@IMF>ek~W4KlgV?$KMAK{~H#O zySO@l%!63C5!X$R%O0Y7_(489221rLT2hqp`{ZE4m5YJ>rRe8N4!uJ*=WEnrA?naZ zFwROTHssD6e;a^%15&+%PvB!f?XMuD9|wz$$Ww{Z{TGXURuC#E6}01tl{#;aK` z-Ty-hJEF>NBJ|^c&2`vCBIh!&xsV;+7wo(k=I^*ba_8O`xk|Xy9&#+k#z>Q>GBXt+ z-w~l60;9*2)EV7K54;m5ekm2c^l#^fFaGA-@c8=O_+rjbb;cNy5uVMC8F4{PaS&+C zxx=g-mP4{EQZjEh|INTkKf$e-#05Ex%XIecYgDe}6fgu)Ch=D*P4UbX%-)187?er? zwq508Z46wQ%h%#2%!kQo3C0sgFU{$Xh3HlpPE}-Gn4gYuJ7d1b;@udkyl>2Mc8M? zEtkbuGO}WS%z%~k$LW}lg(bO^vs}`ZvvB##cNurQ8SOdI08hdy8}jF2oMfLO%hobS z<~KVu;}A{mATckQAvuDM0+(k}I{Bk8u6PEs(fN-e-^=-RBA((&N(Y&c%{g@tPFoF) z0Nx9o-WqE4YV@&Js`*vsS+x*#8<;W%v4$u^w<~*FG)A7U!u7SCW0e|eyk|gqDNXBC zT47_Y3D%1CDQiv~Pqj2-Bs@p;WLuTZ>K%!bb!d0U^OR5YHYZBt-MXX|^%{6$ns{TD z(djNq^$1fL&^>Y4iEiA9R`)QQ(IPG_pV!Q${;S4oL+v`*aRuJ@s}D<8@JEAZ@c>j` zL9N$hA{9GYpv7j`v4cdO?~I7&qV(eu2qXno{aFqBrfj;Qrr?#Bu^j(qo0;0eB@R>Q z&~OOA4K(1(4uymsq8rxr+oodXW1zpnUhu<|38E;fL+*T*?wYUm7b_FyC zPAXUnze=)>Ye+=(gC-+EF$mLra77Ae=mi&2hp9<@5XK-@vX-~pSQ#b0Sc$m0hL{MN zw;xWP*H|wFDwF87VB60|*s%_Y?Z>4#&Cy8}DF1~bbEja-BHWpWKMVLnn(H9;_3#o) zvyylYS}if1f^iAqI0Ladt+tV>Tfw{yr0e=qL{D(2(-%jXhS!wrDz`%0cIPn)wCZ9F zEjCKnPBhN_D7gi!t>Byp<^zuPK)}81OMx{>$4Q0FdpN}`1=dqwd1X0}?aZ(a&rbm} zO03?<(U#>U_$Cpk9f*|djUqFA*UyiV%35o9vuJQK@e9$?v&Ovx zL*mSwc?L;8DGpB$zxwIC zL^Luvw?l@r+s}}XHhg0wqazvLsK}}?f^Hwj$t%Oy%^?x3ZCYlGx6Ej*5ffH8#|Amk zoMX(ubg@ekSFN&q#@_?z+!&&DfO=Y7xmB*#j8+yR*)kApSECeBtiL>UmY>*1^x?J< z-tGiu+ElzDxn~OOTZyZvvWt5Gg}#2E8A>?#a%{Pxe+9Nqv*a|>n_J^J@%vTcx5_>gHTEUPo#Nld z6yA|#YUC$*ZpqIS*^U}hRroZ=6h<6F6~A^1yUP0!;(1f&R&E{xym95|tjC2@=64RL zFOvGI^QI-&*H6jyrvdAeBixS1(C5qiS3N;7oR^WyFHmYkL_ZDnmuN`bU7_r}S*|sq zp3+|>c)xmvGC3&tL$3hugS06fKSclJ*10tV0o0wmh^q#UH9@F0Tpo ziz`v7RC;JB${XaezRT)V@!zCZ=dEWV*C(6a z+aD&bx^yo5^7P5116pzB8{wPTV_g03hsUUQ_-#bf8BpnT=+rtgJ?N@Fj(eyz-UFrU zTAzg^J$on3*LR-}^LCvJ$%1E2(VJ8Lp8`~MOjU9xdlP}4Dw6i>oQdcp8NHGRR-z59{%aSZ-tcy{&((v;CEaN%*r1`F+NN!5Fn*- z1W3VElSNI|x0{BRQi#}C2YwJH^fJXFIC$|vsQn1elM`0~)z=9JkRK8I+kloi_7+0_ z8)!f9G)zVz!M_RIswr5O1M}NSG0A*!JQ7s+1Lh$=G zq^$jzumS^7|KX3Ib*wf=vBw|0Ml6F!j%J!>w4h-3Bc${cVMq>VO!XvGe+bGxe1U8L zc7$nCEMuu=Bm##t?h7*p5|ea09HYn_gW?K@{{jv~W5wbAQ5at$^vNH13+vJ4kZ~yl zJf@|V+3^B9UOxV6C?37cnlM_Ev>BWDkUI&*3y$MsnG%3F7h?+Vv@JIx z#aq|ChxdyJ<`(YeVp+WR1Xh>Llqi}Eh1>fn0{A#lP+yjg_NlmSikLUP)psa-;VW~( zFa7%k;n$}Z_}x6q_472E|1|6!W?7I)&1EOSck6E*MbeC{Rm5iYe8mk5G5$;7miH__cH#__j#&pM@d>PXR{*Q_gxJ0@0W{M-PK zts1asZwDR|u~(>1oH?NqT$ zpFo*a0!G@0E>ES;&;RE8+(Uh*r}aFG1kmL-6@F)cR(q!zhbr0JOClfE5Vy5 znFh-B(97^<7U;q;L$QG4Ap^)%dC-?QhGhrp34j)_269Ain7zi~tMe+v3yWDYKi!~= z=Lxq?JLQ&uXz-wFGB?dlP9mzY1_~ObQwPSlP9;~DKdL=MGdEFSV0r#O=)o;tRY<`Q4(ndY+WXQ#9b=`qo3Vy`8q zF^yL9f1B$o_r_to5@h!>%$_4!NHf1tAdxTcbi|g{0&%Ke-jqy#dG% z;de|BQp9$rEizw;S1mbJ+d5Y$?$x1GUq8D{H48Ey0JA#>&m*^=T?O64F2)zH2P#2B_=zEfbb?055Bg6#!FE2nrpklXIH(w8%=&6 z4wl2zb2&imneF&)o+1U7#i98RzDes*kbULN9XQxGqr>BzAq;5J(zJ!)-h@_d@-5sn z&8y%%uMJ-1b{jM$>+d`l9$5{+FMDSz$*o($$c^pc3Dou{??Ur;cJueP&?236;5wz^ z@y|CQ|K)7oy7!->0?vW3^}`eVe4Yy9e&zQe9#~=;=4Z{EY~v7~db;N)fsUJEwN7`#d9tpLeCRd!xw(u)WtsvU-~br!|2if zbBv1~sU890&`JwOZo-eZ$S6TC-G2jGMd~~bydNh;5e&&j4e`&xl51hneo*}YUKq61 z+({B64_`$g25qpJ>wU<9E*ZeQ4>Nh;5UynA1>1j&NgU@vKdNlsk+*;wG)9Q0fZ#d* z`Lm&C*KxuaIzh4B3wNDHPd*jqZedu0Lq_d;G6$r_WCl^rxIdn>K78R<7lvQ@I-a^G zj)&}-A0faa*d9eCfBs{L?iDEb4Q_Jcjjp!7UZuHG?hv5{`&(oyz~hg?LnYcx=HTr9 z1C+t17<}dA+aY`SHJ0%*x5g_R0o*=__!b+qfTO(Lj|!i|7@dY7`w!pbdp6G+<|MSf z%bsz%id3taP&|l9X8)DYf8so4buPyvX#o>U0v2#Cm5yFu|IaZXaRb1+%l8;*SP!;+ z!JWOCVAYlkF8d|>Ome=&SjE{ed&fBtTIt;!W=^m2`|dNq{b_np9SuwNa?!}{iQQ>q z7HTYIG+r~;bcFc%PrXX1tZU)7AFYNjeRVIXI z!Ao@dR_b)>yyq%h^bFCJy>9Ped(78h))~9sAn}%wBwYCmp1bI9zgW z&$`H%+ZwI*B7E#9+nptLD1h3Hi#KqzUq{p6jI*FBGnPqi#g+ekBisKD7?8!Q#-F9r zK+Zau1d`TFwVGu890l-C8CdGSq9+(bH0c*ku;|l_6fit-{9>3#FtqSFehj8;etj%v z;@&3&w^-){TVa}sWzV734rEF^(>3JXI@Dfz0>Kdx%8X6RmRmT*ac0FS{H}|rRRTqq zH6g&GZA(LRBn#)iZZ!zIsU80ZUXK*-RZHIyy9tTi?c1$_fZ=VH9f+_H(G!$o1Fs5iDt6Z}1c^ame~O zmU@4L_A1Y5Q!f{->Opnp^l%6(kWqCM7%gxtAJTTMMWASD3&!{@4AajEYY!Dz1jc~H zzfG$Y9kZZiN?>0@)jc#67jWD)gYv?qEm;%8)=LjDe$rq!u$m53ZBC zoIxe#1ghDpoiB}02#5lNx=xglWwL&@+KPW(92W1+Kw+}m;(^Dw2ncJQL}!N>b%UrB z>l3Ms&IyC)@0C?BxNPl0$NNo{PlV{$#q{p}O#d?;ItxqQ4pt{CdOaqRylEGS=BSCr#g6Fc&GAR4?cK4@L6bG;LN|3|DR)?QH`PCP zL-B^q%;x}`LV&@xeG2TIkeDmpQT8X0yMdadi^GKSR-AOZ9DPD{rxJXgAhk-c+JLij zT=XgCi<&=ozGHtCt^fl;D$~>FAzoP^ePZIc= zk(l@c?D6X5%T02j*nhR_A4Db7C#Pw5j^f(7ACl{UwzmQxSlj2*K)`TjFv!$~m zp-gsc1$RyP9I?VV3_c{o>Zloclm4P`ygWY)*RQ#bw*?7)GNUJU8=y} zK8QTOn@8+M96Ct;mq@CG-YrG50uEP@AHd1uXNgGPY5mApqy~m>*fL5HzS~6E74Z8L zsOe9_?rSM^GkTp`@b6OA=EhE9iQCVHj+M9RetLZi$B-hD;|H(9^0a<(9c%8O(%&H0 z_3nup1k{1n6l?INp1LL z^uN#A$mssOy+^{_J%{OHxgVrI0M5hg$rQ@GkDI*fl`v`N2 zc+Lw*^4aHMTI}AMP*fysFIj+PO+-x{cqJ^|cL8pGmyiysLMiP=;O(2S;;SABA zlfp35djRG6c{p2fS|R>7G9cPgcz5YxC>N=|EYTnQZzKpD2L+FCXy{@^qUM5~Cvk_o z5awb@nons+fqt4ff9%~9VwTyPu28tSBI@Pz<2=xO@Wiy%7#ieav0pQXT7o%elpb&z7VZf1;}B*ylMKr52dB zdGX!QxWHi`UKl>da?ahs>%*#|j2~Og_A@{;F~u#CA$PmNsDd?f>gUkjPu~i2pT!PE zU~VG&!so7GI6A{G*+mjw-(;|Y#1M||f@j|%v6<02D#=d5AU_#PRicLq+Z>i7+1?5Z zEv)Ufj<3VHjdeV<0nQ4*S(5Fs)!4mWUM5L&e)#QnUZ~b&B`)pC)``nA5HFbdpq1YH zmCTT>G_7i(P=2-4bC!o{3Lv&fcBFd%Q{B?R@;KnmLvE0v>mm=VAsz%3?4l_K#C>=! zo7%cMb#uZpt6s>rs_^C zwhrtHwVL+T<7N6pfqPuLdP@(3R5|3|> zrbogWEd{L?C43v>g>-RWXlw#GIij^JXEw!|>*Gw;*`6XHf##e%fS)+wgYL1|nOaSt zfKKmR7PicSL^;r?A1m)tM9!r^Sen-sI=zO0l*a{-O&X}x-NK2Gl3{oIINyRvnj<6v zE(TMREbP~j#^{j&RB6#UJA79Ay`vVwkl{}rj9pUuHU<=qA>$x5sHy0sBX>c86Sle7`!{pJs3xIKwV}V~>#J=WG`*YkIT2@@6 zYsxt#0(5E^3(RuxoU`22V8->jcw|!OO&$YlvBq#rw2g`Q-Xp!(WBNF1d5|{CYpw;z z*Z(Y<+3Q$7%6n=+BEUI1AIK-ywSpqwB7~9hCuSRuhYCS$bG(iFP{h|J?=MWd#h0b}tpb{qVfrrN zUJHy{)6boj?T#_ zC*VGh;BK89Qz*RC|0lRFL-^fAn7-ik#lM{I*>3}O!-9T>Arfz&#L=Nn^Y$hDULs!O z=R~aUEa|mjH8mpZIwJ!~fnR|{TJMnCHTfhm{kQ`E$@G4o2mH0d<#}Ip#zQR(IeLEe}@Vo-1=MG~U0_cT%u|3PZpFhAb0iTKXgJ)J!@n$$;eU|wgkIOTi zMe8dRwY0&Mji&0SN21%_G}k6xobpTjijzev)|XE%qtfL{dWEk=3|j-@ul*zhsK3nj z%-e?hq=Z`k+2Tvoss#J3RWp2r+BOL90|@Y<{is{{CA{V+}* zZTL^(-dT6YGB$gGc*K6tK3REv4=t^3)12!1Ca$r!M#JZo>6Pn;7z`Mt9n{)ehw18i zBK(_QTNoa=|M$ZEKSNE{8djNImnbE34mF)-J6LHZKXn^7@h#lMuZPLFB_7{(VMKON&qk3|`= zKg@j!|Hal9V7(Vr`^iU~PS2+vf`P|1>un4w_gfhUa<2xXn%~Jtmnf2OVoS+$911q{)B0orn!`?D2!rjwXx&aa@KJi zCog|D`DPQ_QL(y2v4IU8(`Rm*xl;l1QWRAvN~{107Jx(t2!I77L9lmGY-*O9WVytS zQ}%E8?E745v_FtDm~!XVnRCu_p7XR~7GAmSJ*Er2PdhINr}LtTfmiD`o?!yjljdvR zjGBLpGw)1`8~+7Z@grQdALFVe4QKom$m(1O?QP66i9rYmdT?PJOi9VX9l45uhT;L6 z8W|!}^5B~Q?n{XA(v)SNzly#6EUSJ5#C3wNGEjR>Lfx%QgF@B)H(c3lu6kV)qm%(u z0w@CiNwm3&Xn&cdu+*_zoIE4Ml_bXxqT?Qc3^8pAvQPW z)l~UAqP@HxGbPwdMRv#4TY8cs4gCov_%O<7X4Bq-ApSAavS-l5_Kosr_KN0`hxkZ2W@ljT}#b3Yu_-b-S3%&yRMk$yDm#F z=FF?5CQu{yeLZ45nEt$}iFBXE*K-b(3HqO{o@`AlsN0Wt&ofQ^hl#QW*bhw61IuoU z_ntGeQ+<~xC7d&jn8#Xsc|Ye^9Dtwb`xwUfTfX0*OEcRTr&VUGR_Vx9vf%l=BpN-g zrC-o~Po`-}Ns-=R{l|W*QRi$3?88X+1ZOBvoJi5~6d~*B=ZaB^@U^Ud500(_bhf^t+X+)>#n+CTv3ZKt6er`|Ga zS@JqQp?DH|nmB|F7nrZSA+;-K7z1EU;_gxr0E!x{tJ+b7|BeG)ij~T89j#GMK8Ha~Nsv^H= zB@nVK*|KI!p3jE)Cy2-VPUd)x{+36j!0)tT%9Vw!>G2vv83^Lft0rVSpilV;vi#=B zp;7?FD)mqH)C5RU>3t4zTy^{-!zJqp+C->cO%XXov!#l?S$;1vNK3XbFTb|oh)a-Q zbx5YBcr5lt3oz`7xer1#ZRIwiK{B1tLjGyX2*5 z_MpIJrue*xl%ESBnKV*q^wRF7-U}a0Xn6r(8>30+ivioul(StfnKl4@XmRnt z&^0#8lqMb6VCI=p*E??~q-}wTub~#fepiU5$No+Rz;o&og8C{x6{JqHALJ>|v@OK=0z7Y9WOBgxDwLPo zT{}GA?c=8gvZ2>UG23Jc&qFTI{n;^Ep(KVI9~E7Vv4W+}T6$V}-YyBuFJ#@8;Fjm; z`8aKA{Fj?Bnl9uj$v;n77~o&oj7@C|Ae23xQYC`r`Y$!0;&Z)lOw}_hDcWXxMUs+i zYaqkTT}jT1ERLHL`g|TrsJX1IT#`x7JUQR1^Q07f6z5F;6b#G1lwnu=j{@hAUKP?B z_ESnwUN9d@qh1FelIG}W1M4kh01xUUqE+DP^mt!_^H~5rOt+FgPv>ZYwXwL~%Up|| zWCgBKy-%>-f?s-kMP<1jXhUwG=nl=5;2>+0`aE3hO65J&uJ-xHhQZo^W*?D`6EzkqrX1WrZuom-zp**#6z(aR-shiif7SD)BAseq zRTGU+y2~3SzUxDU(#4(w{ZW(SFOLlig!}`w0AZd4#)}bT!S(mbP+uCx69b^vgjttf z8joI@9FV>MG|$sH>yvWhAtq>Pdb>pDb zm-uq_0rv&SLHQWQ$fLaS*h~05QQIeR?;J;?=f1r4#mV*b(4yS~_CwHrYJ;hqe3c%v z^(J@p1vcaOi?A5<`rL8B`xjCAU&U~bD`$Q?P=2+%G_t^7rPK9NhY8N1x}T;`_UbOP z;Rb3tQ2x~$Jy3uhPyw`el>JbxS4`zq6n|9oHNg2YaK416r%W8?9a!HEte;o8gcl#B zz8&xWnk%Ge-r8$kquKR!A$r967eVuDuVKEq-WA?of3q8Q(8W$U$9A>91v9vb>z}g1 zx|_R9=k4PtznjcwKBM8LkDEXL2X@ewpJ70lBvoddX*rl-(b1JUvRE?dPMIgB%#yu_ z%<}z5nZ)#tsoi?p)Nf(j{pNQv%KheKF}4i?+T8oG8DC|le zxUz8QBzAK?2W`6@6f0v#n7tl4>J_Fw&jn*DSxD=<3Ygsl#Bbhv1VhXnch*wy_Y$=A zc+W7@sMo}I_nLIipp5Z+>SAGi^}vz}f8ES)gcdeK9G7rHF5XGe}?8XeZKZx%?W#%RZE)%55oA(_<)SohS-EdYU|5}9Ul{?;N zXz%-EUH+V12GT#wY6r(ya0*47sK{Re_0aE2%q&p7Mg6m&bI4a!WG7w*Q9sS$VRu8g z^0<472<`3DZ}TMumRGm!oVHU+sJv}fPa)w?zC*3%U33ewYe4am*k$Wcx#muFz~L~> zl}kQ3`U@VWNX3Pe$BJK=W}ee2D8~PH%;;QH0J-a82_)D;!&(>Tn-JeuPB#T zY?yKlJFRy28TLAmKRmE=+oY@UtE2(+IpA21pH2M~DzsZahjQciK$Gfi;PJ#~vb;i` zVGXDZG$?0=6!CCM&I4+@luum|H6?*dfVEyCD~bk*3ZYy4?8}dz;m5rMSgHW0$`~_> zKs*)BHQqBuREtjrauyq>MPP%XT4IcY*A$`>Kky#lSf&%j%Y^#01(BF3cq@rrp_U5L z36ya$SJ`w9pDD20j^5l3uod{1aV4>V7DNDsf*jWXK~@7~18u}?pL-sVRxNx!zsE|a zaCxV?2ST-8lkFc+I=GTaG}2x=qb%eaKQDKZGWwLYmt^^}BFHE#2~y2|)c_df^vQ7~ zTSJ7sD7!+KTgd)v<2T*m`DV0wjipx=K@KQoFX9znX1<#T7-wmo49yJeIpvp^0I9Mr zD?%g;hXEpG`KM2>8XeS9sF)F%-NPZ7T3ZNBK_(-%Pw_LF+oTxD#G1vx$pxs=wNM72 z7M~-CD!9HD0kQ<((Q6`=1tta5l^QE+wdjvJE_9>|z+=1koM|dOiy94Fg9C!v=d z^F^Q@$~g*EX@Vd~zgAmlnxiRTtiY5EpIFBCod;e9x#9veSd?uS14|&Re6K=RikwRd z*^wrk;K4M2QO87qDWa5V)-H$b#RF7lxS!`aQMfP%k>jLVldtEsR7d}{l@^)@GT`tW zD=9>4gJ$)%6pPmi*rf%=2m5-gkqQ=NK3=Y@aIg~}?EHDw)R^7$8Q{v_?O9=lC?~E3nGcj!oyG*#X z9sZyaiujw}sjhN%*&?U0T5NQ(NuCcAfq=ux z7*Y^@fD-hi!9M8^!Wl99%iC$gN46 zFR0j}ZU~*MYXH$X{5g{GEx5Igp&nBLsx13!Ra}}cRxZ}Af`WWN)pQ=cLODh*Yggp* zumRH+Ta#vK4v9MQvZc9X1mRO0b%pn9Cp2L(r|-$468UbX72 z#?giyUe$wZs{^ zo&#sfBfNvHE;%Vbf_>44u{+8K)4aA@evtd5tZ5v(r>q zqkUH|ntyI-0AB-_YL=QGM26slKSQ4%q8YB=EZlMe-4m~k0xCN$fz>C#?&I9Y+<-7j zwgr$(1Ak^U?mouTlP1-@i!*UI)07UI=zW2?ypLm%Se8kMWi$QQZZr~zN_Trs*7aLnk zOYc#W!B^o8oH6#`MS5Bx1>+C|Tof9P5>(_>ur*L+hH@WGz zNWnw4?Z#R^cE)5UFOv!NuCaTsXZ3+?KbS(qNxHWcz z0u-j5L)UPapzQZfauH1%b;K4lnF#ouLqTpH{a4dMj(-u?iA7_Aj~k_g!k`X}-NONPyG2*b-aH0FS(5(ZzW9Gnj$!i$Mw&(NwZR zivO-=%{{nRhWoj;B zDK&}yW0=X{7HcM^&71^guM{mDNzTl~_^;_Cy2h6n`1s%rzNl`Q6#FR28BAO4ulR8p zfd{xaab{H~f2p6D%D-cf#8;1%@)rpmLHD0OyoELTxOmET>YA zgE~Js@)2JY??U<^wGiVxc~b5O=~=W)FJ~UyBGCTxkl@7NNoWqd@Wd%13C`h^JjWLj zM49Oo4Y+zDluisZTKBiz`9S7A9d1vw!)8&{2)c}r@(%Q>}7iStnLZ< z=Oi2Jr<`X42Q7IXHqO?Z5^_Vra^x52{wIxnge;h*mj%r*bd?hZ?d%WyA=oag7=vAKK8x2&hrWGn0M= zY^jWr*~+&m!UHtRNnAqFmGS`T6^hghL^XK)e9SGIec;G~N(i#4<(kw`z$BPW;S6)LmHTY8mLB@m}kX(V@>L3h}4r-)+ z@e2?X!S7afpAe5EQK2zqnFwt)^S87`rMeV=-+4)i5T_(GKx()v1sH|2gr{4|w=kfv zpb|{-DAY=f@lb|yFLMY!v9~0pf&$|uNoHAQ1sJ95oAzC_%;Rj{=?2I`eme zZI7@&@lmv78iOzcK#|hmZ|>AO_8nkw{h&Y3y>XxU7Ynd)7GFXN;A9&e$N^ z6#uk_8J6UOUFGJN+Amz208%SUM+P6+f#Ob%oI9$IIGjg9-#S+^?9nXCk&nLx!lmkk>H!7n0#%BsR4bo7DWtFV z8yR=hohvq^$HWK%QG(CwDp4k>_<$V!Nl2#}i$w{-j%?1Dup4-``mGCiY1B_3vyslv zkd44H+aS^*B%UWOrwYVskiCXwsSagBHLEiel(MR;R9ymM2H|}k3mhK2U%lbFRxNOL z2AEyt1mXx89+NjG4HMC|sLGJ84~+~^|F{xFWrx#stSXt!I{DOgH3w|cE7e-UMa z>=9l&NgbGfIm!#V_2C#n+nLw-`Ud6CFQM?4FVI!XA5#5A33S_rIcF_E{G}WC^a11T z{9S?y6sbCtPZQ6B*=IFmqJrFCf*yzvoJxD&LU-)O#8gb!4%ZZ++Ag4W)` zq<@2;9B~06H&aLVLPR|D+S+Ys`JLkkdJ{nROX&JoR|qz# zRom&x?Qfd@)v)_Gubf0+-G{*1V_G^#O=RboSqP9@1dvPN-;VE?h7=IYv+KNB3O;^* zJD;#^3iu2Gpm%k72S9>_X|QPRW_mgzf1F|xRRo4J<%r8k0<}^=E>C&*^85pj(?fKG{JL@x`6d)47-gFNJ;>MR&<>JG16QLDQMa= zfyRB1VO5CTHDUzIH(^&<$nN@DqsGs|uVOD7^#iEKPMh3` zYk+@9z+S>14`B5|duMSwXAhkQ&374x}`9q0}z zpoe(iv`MjdydlZ~ScXb!xdfbNAq7En?DtIgz=o2B4&(;NjroKUB-pn$6_O;*eQ$IU z5(eRdniQ1>Gd2ZPIE)N@!4z?Lt!-tNAAcWA+$9z4vwoEL;S5w;X8 zQpfHcR)DVm)s<8hRuJS=*9F#-i94O`&AH)uH7~DQV(*^aFJCR2UCS8hz$O|_lP07!FEyw z*vAP>#i($INpAz^!q%1Lnk~JQ<9T-q&RUp!Gh_t;H3EMM7JlRe7BBWd=VdA~?BG6l z=%I_un>%T0H+*Q8yz+Cils&0bfIu^zW+)so@KE0IWb-?ydkARZFXAdQL-*DyL*#3E zLVu}-uHYA$iY(ZzWNCBLb{!MF4O;SLAn49s$YKN(n6TyDb4%-T^(A zBseCEMCD;0b)f)de)-}oLr`5!0ZJj1Prb;mo@QO?Z*@cla=XtJ=_v3?A`YSfA|h#s zN(w`}vI`YLQ`Xw?TpHVZ_^zM~KCh8wK1ZWrpwU2c5`yKx5|^5WPfeo&6;O1xa^lkn zw|bFG9bud1594^4Wv@}lw(K<}Kz^E?lEVJs@ecX&EnLcJmaiG63hxMqavdmF$0tpxR>=M6k-Lsc#ptf z8sMIEo-}D-a6bF2@$4r#<9T3S5}=#{8fHs~-dJlSUn^cyLF`RX3{i$;_GuHx^x`NX zhBa==KE)XaUY*}a9U``tIs~7koSZC@bZh2E#$wS9pOxaBg5W9EEy;Suxi3N_Sg+(9 z0a*dsH0vxW+hyq@D?tYS@NI{`@=&9M2mtU*L__X=J!u2l)7oN|T40Ov-ZSAlC3suV zvW%cF^d;s)L?9&Ea!2oRp9;lsZKupDqC8rjo)-zQxNT+63cyyOqC$ckwoH3h1V`bW z1>mft?k1`zRRWR6t&?S40x_N+imHed%8VjHr@g9UtbHO%A<5~_s<*}Ams1SC_(UY>Ok5s_9kH7B)PmXTwN zL~C@8h7)f25^zzav&6t^m_wc~2%Yz;Kc=`|W3(|R=yGuQ(kbwq=J}?$mNfrXUOP>n zl4VVEZ)4c2Y@JoCU*K?{@6#0`YNU8mQRI+Fu|^jAS!b&n#)~2o0B4`C5t}uL^Oe*F z^$w>T^QjhJUoz=wBC-Q5k!j0=c;rM$bm`8PYtiP8MU|?+7nG)DrKr$ZlH)PY1Y!nX zQ;L)5bu~6tG(eO@G(f#8qAS{~Y3NQEkjd*cctEf7cw96fyk)P4#FVOndPc+uGP=(m zSDZi=N#Erw(xy>g_MWQM$A=KOY-iXKEi#a0hXf)hU(!9X0_FUKEjg^OOh(!M0_JSY zm;4>V{ZZimCvZNb30RIq2Sfw(+A1Xw9VkEtWDv610a^7K^E|^6i+nC*phj#UOySG} z?wRPb#>^>lFAv1GDLZ&Ha8;>5WeO^QOQ--<$nkvm>KP&gff&JOLwX=ua1@8pDdIar zCIATt3ZVO0A;dqk(Ui&SECBQK{1X)jUZ6a1Z`pT~-4?+^qv3|F{c;_))ofg-P~Fl4quhd}%Fosa}*z?W8E-DxVAlG>pgYxo$^ zj&uh>i(F6wsb73A~mI)Kz=NxqgjE@FA2_afN; zGHsl566!@XeR{pqm^G$3nK12x_|;79j$eSIT%ot+E#u;yUQO3+88c3jl0jB3oZBWL7BEO+&IB1SIKuOXu3^N71?)d$+@a&h|8E1(eg+-~vm?>N z0{)fsJ6@f}!JZvJO2!nF26~3m#4rP;;1HR?gC-9P$R7Y*GSJE$2krMAhB-{ZjxNHQ zK=&Mp?4ffeK5&$|n@GQ-^!<+ho-Pa>fnRbYKH_yB!LEMEZ|OK9b`t(ozn@-<-BWaR z9E1NI1;?K-i_z0nG_t$9`99li(z|+KL~sBA|B6nMUOwRfKubNuShe%;hqLJSa8Q;L zwD$BPk?*}`{&vx7^O^e>n)!bnG5-|rFkbf!I;=6GY+^OF^%c<@`Yo+I_UBEl^K1%)v=m?nQPG6=>%6&|2iU2L2c*_(|T&GJH zQi+$pa)iTOnj$yIrJkjzDcY<5-F(jGQj!rVJwodO4euI%l|M?9&ot{^ICjl^zWvl~ z_yDN?=uHms+Xy1JA<@@EvfbKE$d<|~YGs*|9zJLCN1)Kq$0&;aQc?Py+R-!(aY?5~ zPEnGjin03S8R`(nPEpsQ8=J$T*<-8Nxh?x{nK+H-k#TH@o8RM5VIQOAXF1J5v#R5v zG?Oz2&d&n#6_ZJ928B)iwN8J&pnLb|o=O1n(g>fc*;Iz00zdb{?JkKj8DfAe$^fwq z=)&ma73qLzYCb>0Y8I9fhZzS~ev%)2Szt000aTxDjoLy@N=mh( zVFOouV5e*;F#x~IMyntq-++&bXz@NZ!>Z*~@TCCIlDaS07zM;h*$oq7fC%!SH{nka z%vOl|n%D81qk#*a3VsXl%Ac<1ltv@nTkWy3(M#KoqJxIne^e|otY;glen>PR6$v0| z%zG*X*MS4heNf7K2KXHX#7f^6kZGq@A=NuB&&nszyxn=mlrvA7to4M+K?kDt<0fJ~ z7Sag0Pl^C!<+rN=xS2hY1stcW$3w_or76wclcBCH-MZd?+C(7gS2>YR0fl%5`ST_KU3!ZC#sCFO-DK%Vit8t)v zkYUk5l06V;Bj!bOPluitDc>m_C%|ybeKLggX|`N-0P!Auo|O4284HB_AJ7g=*-wP~ zPIN?&TnYYa!Gq zS%gYkFDS093^d4Ko@yf62h~b}DmFSVs%{!7)yhk<*(Onu@U`rhK@g|LdxXwkwxN zl$fds-wSI0m0?b#9=qMKr+T ze603h=)Qbd!tm1ji1L0}N=g~wFi&^8u9{~8u7l&>Oz7($Szaxha!U!??PeJW2V z#Q(GOsEP}U-WLVPBmb)-fbsLIf$L%cV0#M|;POC`f_U$g)D5LCZ~dc zIDja@=Y5vpVk;5{D2fAoqW71f0b&7p2tZKe&g>FkKL^my0{Hd7>Z=`0wcUZ7zun}q z69sy*#y?F>0R2CxPzZQXJpu)Qe*xfMDFBF+{}OL!1)hoDO8n^kRx(2CR!A z#lx85p14F_{S=jnDU$}I6=+~}QM_CF(9uUg*axT%s1h)WoY{?ZIZVIAfoZ;Ianju5 z4u8bS@*7TvU!r|~1jfE>;w;6&mG2$`NwQr_JE?mx5}+ANR0Pfw?HWbXCYzM*3UxWu zDa=&he{Ss-sukeQA1>Tt?)e&QX6}zn?8WnDEt09X{}kpPF!qrP^c=vH;21&v;1$~F zn4{~FqQ3^Ezrbw_l|MCh4&H<5iFL}O%iF{6fc=ky{ZF9DGf)5!mpdp8A3)hl1z>mz z?0*Xj&`&|(AA`bio5VnV?7z262BqHx`kEyr) zh7t0_X$z-3j^$76YgQ8Fj(|1$Q?A z`5TDouiJGPgh+If8qH}qPi#MKVq1@z2fv>&-+jDbzVUFuq+Vs&l$h%1C|CvUT*;{y z$iGj%EUOxY1I$~>Nw?$^$X|z7C4!FM0_0cqW-$}D9K?N>(nkspTC5uq+;b|N4HsmG z4w{+uTqkubYe@%fG}~{e(fFpB6=861y!QlDm7O(u0J{*SE-nmunK>OIw8_M2t&dQc zYT0`%Y`!;~qtCHiQraOA{CgD;&rkGy}DL(1sdBezWv zoL`!vc7T(oaQp@+^|u_*f8#Yb;0IuN@AxhARcGk`U|jkyI>RX;5T~j>1Ucu_T2iDw zP?@IG1artAqaehscUT^{Gqn9sx}pifrQ~H({%Y;Hf+V2g%f&FW$C(6&;o_?WyW8WZS?-$*AU{uA!)Y$wG;59Dbsd^rPXS^34?Z0aZM=yyvn7D~VrYNkb^jkFZ8)+We#`gTe#;JNQ;L z3|6t;`e_dB!F-+|wV<^?Lm2$0=P(^8{7@~qWhg|uq$?Hf(c0ta`g%?de!0K(yw*!& zeB=yP3^?g1wPto6@a?a`QVj?cm=9B70CkoO-`Fn#{f^cME(wkY5~jbdE>)SP^@xDF ze$3T7t06@CTMeQ%%aEBQ&HZK|w5-j_YRLi)6!$2&BBM$|@J>X6_m;6>?0s-A!xa3ni0R{WeNoP zXKK@$(~p{D@=;^4MnO_*sn^~U&pZ|??^<|?m`c?+B7o!sgdsE`@z%Ji47|<)K#KxN z{ZH$ta0Jw18o}Bhh)o2dDuKf`&5HuaRa+69lg6$Zi0ThXmXk=c;@rkktP)2?M@Ym) zwxb}$6L)LX5-d7 zQYR8w5oy$ZR+UF*vi5y}nwE@eB0@STbQ`vu&($lmL{$<(sLxRiuMJ?h^l$~^q#@0! zU}%(AARhH+GAL;TfO2#S-88*Y-%3Kkb<)b{rYQ*;{uMS7=zM3p6+o)(R|~cNRttpc zCNBF+#7eEkHqyA7e{BG=Oh73JjFPN08>^ZPrC`%Qg_(KUB8^+qR_n;gJSMQOxKnBR z+RJJ;)^~&myecdL{egT}v-JvxM^!~o_@`=g#eF&B=(AamKsbAj8h&LZ(h*T-aW#Zi zT@kWE6+{g=TLSef%+JWW2F2G~)gT;3eFFLw!mAu1MS*JBYH|?Jm)x(CfZRfI1Nne` zH3v)jxB1Sfjsp%ui2m3G>Wc{!nXskk&uU7L5`g6RDc~LQ$5w}6Up0U#*sn(YD+DwL z3CQwKk^Tbx;bg9_h%^ZB%l{))U+TV0KSgc@_67O{@1^$ZdH48wuWUC3 zV7t#~-W<<+pnf5Ly{Bp*s!$~e$%B@`GDRK2W$Kn?1X{qXJpUE0Y%@i?Kc#D3rg){x zkdq4ss#H37w;XTh`^;xxzS-Nx$HUODdZ94>AKy<}!y^P;~O`WRWb2XI5 z8@8M=QLG@#Gsl?N`+NxfA6wL8UO4(+w0FslrxU@eq)>?5Ehd^^d?AmnzUVJKLI z=3ldj^1(th{~(4tD_Fu=H%tCDoyM&^rEI91@cLf$XLv#Kg0iXkX-${IDWArMG z(;lLcQfL1k1yCaWOo97&?@4yRD13B;EF;cFW;M{{9Dy&?R0k6TwR-jPt+!3>W_89> zq3EFNM(y#zvQ6)pdmG_KkzUS*32a9PX>LDomRjX`5Io0j9Q1wgDijqf({6fxyFaFJ zp7Pb?MHKc+kUBa^_WX|L{uL%cK2-ltHF@AYGvA`mTf-=<@l&{rrYY0l%Q>h3EoKz- zFzb$X{s^WzA6HVApsOeavU-xNR?*AbOy93HP7w+dUXm92=G~{w(#^EKZ+}l)c+=dS zJ$wcS5j*ZIeE?G@h!8r-FbYPiah+-u@v<$q*i4%8k8pNE2qOE$Dj>-lA>-SAX+9Sw zZ6bnK4K}*N`>FNyEE4I|@c=wA5T481x~8*Lzr{_PlQdpLhb<#q@_K|h`p z@jZUNMFKRv#-&Lh1mXOQSJkx$AYBe&k%k-%X=++?ne(nGtD1Hbw#)K<33ZAYZ36~q zwx)de($(e3S9VB@<%nE}0I0uC7J%qlv~M7@1H4!JsR)ExZZ)|_jjj=%57aOEoh-U# zjyuw0)eR}7R4`120?i_IvEWGi6pUyF(x@LZgi`=+*(X}Tu5y9vM_xbnA>0C*s8>^# z9VyVdZ9w16uuRP#72J@%Di|x+nGo~>$k{-W3gEtglAYoGDPCg%aU4`?-6mOwEU-6E zVoPN$76ts`K?=ZLlLVF9pzI*mUQ1g&a4jRZI&jzmgeKT~S>h_QIE&L@1e?!n5MBqn zyBQF+1CX!DCVphR_@nHXy%Q$^xPFxbU`_y-XBA_Qni32k%S%1p z*9b^X0y1e|USa;kXC>0CLqh8>5NthVGLeT+(4S(v(R10pIQveE%3^j&0Q^$CE(-zj z$ocUx5XE_IEc%d1C4t{?hd69Nw?UFOeIdp6rrf9LI1r6O?*?#0B(sSX|)Z5_?b4yrV*k#$zd)C$RZGo27(K70o26%Za6il_a%-AkEw6 z_?)yJMd z-mK>6RuQ<*8dKF3Z$t zF~0{R5MKo@UkSEMLOfm^6ync=_;auT@cjYsIgjNAP-V0(dO!aHz4(u{L`%F6CQyP2 zC|pSQ^_V&a^tZ>YJ6r}%QApr5#iK6~lTBYR*`LJ;gnbnl;2&8&%^zFCZwqhwVxCuK zCf1OE2NPfzK>p0@#^+z|^hU&WP&;J+F#w_d?D3b3jZMgbF?h$;^Ewc{P<)P%(3x5O za=`yS|HKyp5s7=nD181BGw|u@^;xc#S)iq$MEFqQ(pHm)CFJ;*$4QjG+Gz^-`g1^k z?@|Zsq603_Y05VVL3)eQMP<4h_sY={Yf~|sFCH;JD#iiUN(Fk-e6O|($JdYXUcZS4 zn;+~Yooe*me8jBUIANMP$noqPM7gIBK&DTixw>B#3{yXFJwogvf1R{`uvSwiDUaL6z&dnmVj<9202w+om{tO9;~SVF zXsCT;$vzWk!oXJ=t!eTO|I=g#KLp6)eyXE$WVnNzh#ExP0r|Z@Y!QH{*Ri5Au1LV*rZ3PGtlUq z>AT3edefAFVJnk$2HRuabG$16&+po#j3MH87F<$Nh-X{gd?NpMWN@99%#4*vCMB3@jt>8;g9% z1ZhjEUwC8h;V`-Z4LAc0IEmMOnzQUk=%9+wO(7DH+_95v*!{rzLB!(Abf|NFE>$sL z6=zJag43|36<*r317O{>dq6~>&#a`GI7&=V6YMp+X~KMOfoa$?@e-|hp_EXv!V`` z96ZH&%Ta>P>8P*Rgn4Gm2d0iA-vY5rK~6dyP-X286^?5-z$?VHb6~m z2*ME`K5AwqxkA!3GDm1_XdvyXZqF%75j^XTUNSRVdnkY4xM~@Ia*R-vNsOK}^W)U2 zS`_mm>&~_hKJ{$nICm=37fk!fQ&7`MlU9J#BxMD9?={D`b`!K=>${xulO}VF=Y}uQ z7jz6?`R`1_8uoyM{6LC+jSR3#oqQquOZQxG^9y>IM%k4BWjSSm+SP{HoWLl*mrAio z;;OYNw5udtLNgQ07UY%m za7C!@1KtJhrT$7wZmQq}2QgFt(`wQUu0WB(=0 zIzkuV$owuWReXNjd)71nSlz_qX006qQD-BMng`t|Xqmt2;*XdpFtoCjUg2#SR=2^d zMBI+09tZqBW^&OV89(+I+~En6h5Ju6u zK<;t!>Jm`#L?>+M4Fbe#wwi?LP@rZ#RMBzSVxP74IPz*$Xcn_&{gPb#J|M7w7_Xp9 z4N8b}d5I;fcA?8lWi!zWS>%hHm?}giDF%eIeF5qU)|978O$j0b>Lw49TiH%|WYj$? zLXhNQ3N&4yroxdebL0bEdvhd@7a#%hylWjqEXtC{S+2U2(-03e*aW(2?^Tf@?D&SF zgcN|a3AY3>Ujn{{SBL^Qlo(Qcb;-zY^Hrly&?jXm5+-?V`UUo^QdhGa*x8zZW^I7U zcHkJ=#%I5V_V5y3AkIIZqaJ9QGF8_INy?mPNqCH{mvcWYJ0G?_*?uaZbm{amA1T{k zdcJBL+N?nP;%;XnRRe-s3tN(O^l zRx<+B8ld_?kqUr9M_oMzlgJ%H(?3FX&|!Lk$6w%i%t86#b~7W#C$05I*HDQ)Kn4+y zXT}4(*XwYY2%WzHs^0|q$GDR_xsg{XhiB>~dNf~vBLv~C2mTMM008{JL;jzg#m?iL z-e6o_sb|C(r1OX7A$UP(37RWTkq7&i&u=xA3+Vma=Fe_6-dR5J{1%hFxXt*NQTVTP z829pa-Uax7pm2S?$-l+?g427k`Sj4CnrYrbC-BB$)3CMIG;QxUOSdZ>i1DSH!L(a$W2m54w*yZ*2x>*= zaenVrxCb9-s_KKu-Bb-W_tJ5>6>)tRMu92p&WA(ye=8DSODDOR+Ygv}Dh-Y3t;?Vk z5=M$HCE$ZhW8i;lFL)ge zki=S2WFBf|6!E?v^f@sE=IH^IUZe)}j`4&(ap4Cx(B|)w^ayxIehMr2HwBd4g-f?n$iVK<;TL50J+Mvmi|d(45?% zckmItM^^-$tNj!@K;tSd*b;IvZp*9hU@2!N?1#)X9XJ(sAZNhgnrW=)nIvwg(#V+c zFx1#`|Bn*|#GZ4I?aPOL%Jp*FWDfMfqV}8Y0OO%J8hLz2akjxH8>bCKnm+IgX7N6)Y14R_A*l)L-*FjAJ3CtsqT> zr6$RLq36F5chAh?;4l@-5ez(_S#b&3{ewEfN`n?D{YeTEH3Ib!Isk$d+pn0K1_-m7 zT~OflkQ`0*yuPLh;@eDD0M4Y#X6DK*fOLd^h0I16F+e^jy$#O96tSN4WF-3$>^13P zKR6%ez8s_cvObbY35H7JcZ&~CQoSRy7i7)$Tr=|($5{`NNK(F$Q9ntvQ<{h;n{!!n z;~L>$I+s_0^IKpS?kL3t`sE}0rzzE(WV9K!A11oB4$$#V2`vhjY+>|SP|HW(Q@fQ8 ze)yPw zkQTNkf(Rt-1|y+%OIgF7p2=&P_aYlRaTmNm{q~(M?q)zg?`)1fj5beQ z0Aw$mZ*d#s!1{r({;XB8hk=n#1Mz4D0PJf~%cX@k@x(oPlf#=@V_18Dyiu(_Fekw# zD44!V2V6EofZA()#5m0lnHF9zxGT_|#wijc!S1sifNya<{hu%zL2&_N8!{kJ9gjZ3 zMF`5i&*JlJ(FLtEw@E%Xn_Xb^?vOTo@^06snStlhA_43Tm))h$N z-D1Il_^r^7@Kf&5HVfouK}vBncpLttmDCOvD@X$36I!}JJ^)>x+`=hQB?&Pd6xNDC z1OQGEj#ifMc!2SOQc}f|8(^*gY8@O#<%-S(T72MGPn&rS!uM=ap5s;8jwc)KJqrJ%1_N~<$ciL%ubd`1`{lU`Yf7AndX1h}tFXpz35g5U zCs?XzYe-)~?8=f-_LQY&Q_k$L*Mqeas?Q&+S$9N}m06@c zA$ylf0m_vM^v7&n|B~S4{#S2?#C^?8(7VHV%u@LOOfOY`#HaXPpU)K=%KLnK2(!yD zBU_JTeh++~;JZuh&GO32K(FZjD$~$u8*)=nybf**ZkS=3LYAXv!_so%a~yD21Rcs9 zh|J#Yf%UUon^};43hZyGD8xyZ;i$NX3vw2gkl zEvy4uA6>V_%=+`c38nq7{>?gqX>KFn-(&{TE%Pk41IhM^*=gQ7U{=1?jX<~`xq1jO zklYf0POxIj+h$fBkbI>~K)V3;_*_{q}eT;5!-nc!@qWn zm^vVEGf=pxW0Zoy0d!GR)cXb4mIH#Ni!R-cPv-R#(7H?J8{b{aT0UWB{~047xBm=+ z_A3b5M-*9pj_2haWA!o8buZAKI3jP~1YQ(5oqu6gTI+O207XA%+`}fSBAgZNn7?XN8`)Zv1h;}|tV*t{_w~Re-3{VSz zADE(_@cyxt*N0zk)CZV@b5(XjoY;O(;Ud^~l>ddeg z1FwGyqaDM2^GffhQ8)pBuMCZHjrH>>hr_&2jYDt{?#psj_2Yv&Fvx!0$5OAGHr61| zh~F5|_&G+rRR{!1Q7*9#YUu|U4(tux;7Gj*ltkv|2pn#B3Q44 z&(scl{o6bEKI`JV93oA1n4B0!N8uvZ4iy0mR&lz7nf!N0;fzh4blL9R1&7=XINlFr z@5V-txe9ib>7+Kbq1W8=C3RBs^Zjka3r_J?Oe+mL=sgi#ow*EHUkkpE?xH>eQ2-5J z;ZsQd2}C=NSGXIBbz#uz5t0`=6;iG42oSnwnHT5tNu9sRvYTyLZgm9cW zW4tBNM{a1EqniZUFC&s`DUf+7;CwmadwPVkm?Pf872UWMlCgwzod-hC4Ch>eo)yXV z38IP83|&@;l=3+1bsR)di9D5HZ;hP6{RWBnq+lRe-`GpID&z2?gOdD_-x+UK3kO-c znK9H`@%6!L{K>;4hE9_RgkNWD6lXHMD05Pback;hCIIH8WpB_gu#f8qSl>Q;5fXRM z-1ndxUgu;|g5R@uPq)ctbY>LiTUa@}j5uUhF!G=HgWOzmSO0J*F&s_Lt{FK@0~w-WXwqlMWnUy{dI zrf(4i!T9hej~aloWLkmSo`44MT%bfLF<}cGKj(7(D)L)!JBrS(=Os%fC0_zI9ezdu5 zk}ClaU*^Z!#y64&?fD==D+>%FqEWyt1K#wIwgum_5}CoHlEL-3guWs_(?YvRUN0mW z!&D<=xmGB5o(D>_5y_ibs~9j|Kj;#JW9Wd^YmDl8gW3l`LfAMKc{oJE8A11qRB&na zckp{XLcO&7BEX=s8Mg++p^;?;)cP;%G5I#IO|fUR!U@(v(`4ITYR0I)kW?E`y#RcTRO@K#L+p7zsK$!G z06_48%YP3fLG_L*6Dk1!l+!8?fQ?;{a|Di%!4gzP5_jMaN%%ube1U!I@O%adJ(qgY zWK=d_-?d^e(nn}bVytUH=$*Y5m*5YqPVren=i25#q~YFAu{-PC!kJKI7Q*h@|5`#0 zWS(Zvh~cQ5pfz(ik8&If3AzG(dERfST%g4VsS~h zYjU9cEU&jYwPkfm@VQyms(={nfN&Ea^dty9uvwY8Y3?Ps{L;EqIR&JqOI4SjE$nt> zo5VTPdLsHBsQckT8J=XnvRKzV7r#s~8C~2kfdcQ$Q(s8If6{D2N{F9*5t^j9mAy*$ zU5r!?3?{AptD+SbTVW&@c^>hk9z zbGOo{fIJ?!JXoXpQ;y3gZ~*sryF&Rw^qdGOPK5M&SQbcI_+7)1UDn@cJJNi%g&;3` zOtuf>%T91RUw?s1LFF!yKjCzr6IDyoM7KPD3(u!nizId+2kwxjr(VK*0qpLA#Pd5H z)`QiXkp;I0xo)4+gfHnY39@_rrBI94n{32;XD1&IY`41{JRJ^Bp8`KXX!$^Pm11oC zILa&vlRoj<$m?$-#ApDReP9i+UCp{^v_C6J|-LwIo_Fi8SD;j zCkv>2noLfFcin>9U&Bddz%(!3KnX3E~);n4TLOzRk%vhKstN&*{gDPoF?9 zgMYg(!7jkgKu4;Z<@*8Z4N8VoOS ze&7g5{3xgUIaudaPH{3`kjq`rdJ422czu)R>uF(lgm;^NaRPu=5021)(+Bz|pmPGm zhrJ^;afa_uiWvRK`*fSed;3`G1+)6dJ6vQi5khRd-eH<)CWsJy9~U`1YK+&CQE!3R z)fTPPc$+mSbBwaR7g)wsWNi>F1}7PF?48>=W43&X;)7;r-^|*br^8Nh4S&|24C=PA z`O87d^IN)(;>@7|p}P|YMF)vc-56~4(QSf6-#cca9pjuFQ|9Y`<8d-QWMW6N2Qwb)3k?-rM;6Z{SJype{PoSE)*XmFwg`cdY3tCW~qO_DGyMC z!oAXpj80Q7Q9PQ`*388aG~>uYgCFNDd+@t7P+w?-;?^V0H{b<|V9t>{pEiNB{G8%2 zs#k5GNoka|)N<&9xo&2+ppLipo}|s?B-Ib~a38@*NQI#9L^vsoiVX9DmqEg11zO03 zxtOX}if7aP=<3|p=@~3$h305>UhBT|&_w#HIVF;#hm3s?*A{Ah6uZzWb<9&FAZ_%5 zxj)6Jt|oPRlok)bd^3luj?1b+jn#Z;D;j=d50rb$ouuAX)EJs}-8T8-6Ab)1V*F#Y zi;NBf_|KXYZ6*n9Jx#rI?QgqIjSt@#EzJ(ZuELL1mCxF>O4x>X&2B=wD4VFp*XKDoL zB53JB7F_u?3lNwFB*wGPk(mOq;1}Em#LA-~Z%MukQ2|EhfOD?kG$6id?aK@p|34Vb-YShm1v5e(tHDFI}U zBaiDg@LKrKZpCoZD8!m)_r6L93?H0dTMrV3VepnXU_8NFV%#=?d>vkwUBk+^Q9Q_@ zIJ0tf4c})6J%hiTatM3OYkbILn;tgxO+N(L0~uMply;IffRD~q!0_vuOg%fa4&I>m z`R$xiF3~nE51R!4QoJtH{IIcF(BxfK^?NDS!e%!nvK-_#nP`wdLB+Q7oM{1{yEg2r z1ju5yrgA{Tc2KpfE*WHM)}oXlh=!##vBu4?m?WQ|t%|$P;dR0>^>PcQ5`0i`)OU7^ zK1*vGXD=kVpJ7=pTkf&;&0u|-o$5p%GZAV8xgt(`mXYPT6nsI4E1}wf&DL=^wO2DB z{TLi0Uxu@BxNY`^#d3obckZj_SZ`te77$W6AE~+d*ZZji7pfWCMWQR|SL%py=Z_<0#o&I4T~+V0w;D zNlsD0-z0o4!DAL~GF$8x#-%b+9I9Y**(EnLgvEdguvnC$D$wV+u!Q9Ud3OT6Yj%p7 zf-hBh2k;Z^*?}=gqm~gx*ftRCW`0|(x!)G2gLhi|q5Bq=sT8+SJ|T-oMV+c;z_Y%J zn(!J%aq6iwDASRIe%+=hB_>rzfp)oEB^F;9>6bAry^h~y3nRMt;&6D(3vkx?FE9|? z<}7tyY-F9+H}NILy|j#9oC`J&xLmN=*H9Ob(7nx+0YK9(qPL6S?SY`Pn68rS1sftD ztCr6B+y?x2uh6N>a(r$J{2f?m{hv!A@jEbndzZ(rBC_{>d^250`P(u8d5HN}bT7BZ zH`(1elSF8@_wgD17322ej^SNNc4dY$(B0usioj{Zt+hLglwaXD3d9bQmy<>Ys|>n} zf;rW>t0sXsoFMvMB1M{++IJrT%0snH`Pvf_7 z!T*^lyfUZWFy3i^{JE`&=K%EMfP8`XutOI#Kd*?>r%cbUBzYzFOL{K==ktK@ECRcL zxsAi$KSoFH^u{nFzrs=jA^ABz%g&zx&YuFBPj4o+;tiVDUI+Z+%{lpcxCAW;0542W zZ2w&M@*Bpv^g6lyGyg>`H`$f%o4XA29uFV zIzG&i`z?-;Uqi=e3f+&q>h&KZGiW>Oy=?>$k~TzkQzPnX-8Ry3y7nL*?}Etmm?rYx z!_LX?swJU$_xtAIg*!-n$K5pdVY4(nfP)7Dao`%EfP>&HhR z6K|PF_f??xJ2<}HhlwJg;>*x5Tz~Ryr278^WdD~bPJRGey^U8vBghVstb^RnkgVLH zo51+2P0&AL+V%}_ z-Aqyn0AI!q9x`7o4*Z8H@yWRnFj~(@SR80SLXhLwk12^8iV7=f829`$`GQFB0ZxoVUwEjR6W1FTfN&m_i94GS~`d$gH9q5=FEG zik%2F$mTQ3)s6s53Sjxb2grXR3+PZJyL<(5{tEGDS)lv@>OPc9ID*<3M>!-f@o95U z%6f=&YoT6tf(Ko=|sTqr&8Kr;6V z%ST~4lASGVBJE)L5*R#*UpvD)Vlty3&$@ul7|_=O24}P6$gnC=mXZVf<@u2=0e52n zO(gM$L43f&yVLxa1dC>X_!ej>g1VcQUxZ)r3^*djV(ZxvesQU(0OZ>}`U1efk(P(h zx>-t#1aGT}|I)zN*-a_%CPs7zy+8X3um~KIp(fx6zc&7m>#Few=7A`i?}5d$;CCCm z=CMKXrhhTbEX;xlW!QWz$!YkZ$%4OEHGUt23(CdIpMdPRN#tVytIH?l`Gf{2)N-P6 z^hq8FxeT&Rg05qHVuIDm@XrFz2M!CHm*QRqOx?@@uvkKdb&Z3=^vSJg=RUixQ~&|8 z?^7@k8=RHmVA9w6xcPc1!_H;rH?Xcvyjq_VXHUc-Z+Q@x3kZr*FK~EGnoqLW^0c^% z&^`;u2;I}w;IRFTi1RjUqP-JCP0xeeeHeqoKGACvxPIcO_!d4H3(Q)i7Lw+@jZ|8E z(0-1!{1m~99?Ysoj<>;eLhm{J&zc0#thoY$?B5c07ls#}S1+kTjp{8K`uPm{h!ZKA z9yr-WXEm@)A*I6b1@Lf~@Q+$=gTf`_OOjU~t&n+=$Cdgc1n+aQ>WY(@O|>ggW#Q*$ zc!J)mR*#TFa5>1WyelIXi%xLC=H)KoI#oQ4R#Tg)DuAz2jVy9t@x^A2u)D>PN&wMwK=m9r z*V~>B#cjEv1mD$b63FBgsI8(#Z;|~f5PrWe4XjV`Ttr`Cw2~;8rlh7(T6638dTU0j zP=u0Hf+~2|cSi=^onR?8hf=kZG+KBLWNdN3BCL$VH$s+!800vgW(Z;jLhzpzgwODo z&25tR3W(n^&dVro!9p^K;F8Eapu5vehz*;RX3cC0ITG_7PEL=@QkSMBh2IDJ&rY*H zE!H6^RbM1vPmX{+TA25jP*Tv}?M(?X-S{sDbQdId0rVL@N08m?1Cj&bGo1tu0ow)L z?GB4pTg>|0x;+@`1+E#iD=|Jz$uvq(k_~j%*R{&03g1cMij#>ZUB8p9kQ<>F5t}N5u&|e0>w;`Q^zVXwij=y3Yz_lyW405**+Rm`3z@Y$e zw<-X6ocIdw*G#YK#I5AidgI}cFMzgl;PwLV_NHDn*`r|h<4EzK@esG?(c)+Nm}PP& zh1GfGvDbkM$2aoh1!}L!;@X2ZE21i6a& z#&=elul(f_^R-7_;F0hPzPaJXzcjtPFFS-SCMQ@iN^9fDI~ z&fQW(wpE*cZ0a_DfRcU@M+2D{sOc+qA~Qx%7iX^m>#PLIK2B`@lb!G4gxNu>#1_ER z>%e%{aU~$7W<|#!YWxV0rQ@1n_NlCIqY}_{#4Or^dxJTf&stqn2^Im{pEW;>cAHlZ z{(&R(bDSJMqrZ@uLcn$p1d>5yjX(qJ9z@t9w}FK>0Hc5sGIKJ!rm5*%La@X=Gx2j{ zkB~TsOD9VZX8Z7uP0IwL=g4ua-X9vZYrZ&eoq-nkk@xJxP>w~L_D;`zFF8AIbm=*&uhWp9uDSyHDd0)pY z$q&0TJ3Djc)S36^`d**wn^0u^ahw(t$IOoDQM3QlF$Ch52;!$Dc9G^?T3F+^&IHVhzGHq z$?4}1z@@-n#Eo}^&#rysqx3VJHcDA{it=vGY*Y&d0&-pND^cSp=>EF7UMjgJUuYOQ z19~o+@+jj{Lx=c8n?m=*`9(Wu?ZipONzQY=T`=VXFPj_wXWD%1mJQ~c|57&h9n@UM z&nR^Nb+bH88J1!$=Pgt7!0Tz5*8z9Q(ttZtyvigaa9@!|p-+upV8{Un_~cp0_dGPq ziP6T`&58uor}9{9IR47XjKRAt($<^C;r+ONWrwerQ&k6l*Hbcw@ncuaXOk4p>EWl?gF@^}fIQv0IPo3M@GN_3 z1J~#Jk*CakjH}&Go2`u-C`ZapdWJI`@qZ&r+C+0|V)`m3c+zQT4NuW-Vx6KfnYP;u zXN)}lx|*Ar6s(ESoZ3l5{TVugLHhh@4D>i{mfSZ@Ol%Nio~s0It!A7!G%-i9xfGyN zZ}64+@B+ferE}ms`B8}Z8FDu51=a_%y^7z|_)F%VGEe%NZN74M+5FR;Me~`@0t42x z+3AOy%mcyBYG%Xb*PehsL!a)_zxB3nV00SonS>dQcL!j=k|VvSQEcRM&8@0*XT>hs zw8Uy2)o5ZEzMrM6OC4`jbOhg@vc&|9YD*APOq+@TWrNG%svtm7eG@RD3I5*%$KK)m=}n-v8Oojcot)I8iWbh2YJ{a*G2~>{i4c$ z33I&T@*GuyEH?5JC^{unC`(m^*XJWFX8|iRj0+T5a)DYPjh)&76r=UXg8M59@J*3# zbTz;xc%}s86!;u^;O+I6lzQ+y$$Dp@e~XI2rE-YA_gP~Plx?9Ww1_~uP1-#AeLD7C zlWx4t*eprFEEo@S{Q7*BUltf0p(?N(jTt}=!uAO4Rfq7LrB~ZPv(NK9FgFdxrJFF; z=>K4>2Vi>?8VMwPr~XzGP&VjwE(pBzx)iXNL9X@K&%%2FxZc}lOZ0a;*qa55Ev+r< z<*;nweN=vgy7#>#i!ZQoB_Jmc+vhxpleaH3SW#lMAjRUNkp*^2nw_InOG5Gms){^S zMM^t^9jF3HJ2NBN2FFThrIvh7s%0R1QG1TtIPaI@@GX(ODw`HOI@0a+T$hqdwUdb7 zVl&b#(_-2Bzp5A;lq(-fM_&1QNLqgWqING8j~qv8#g*YkMtPYw%5bT=Bjpp4n@4T5 z8VZubm8r5GHNkIy`E-X$>hs!j;{IPYmBXVWP zQxZ9`0*-$e@XSzx{PjuJSN^LuwCf7T$&n(DN6h8KF9WLDh7=cz#p4x@rR?W9E`60U zvf9fjSLE^vb?vXP`2bO?tcX6RC9x&y01X3>e!0!%n!~K3?hbj|1Hx+=R0e3s&wYM?!Z-Q}_iRea_+{6%(Gpk2z9n&+CgC>~vI^V9@t zZf)b%#|u?tmsA+3D6sM+Og3R2*9?G7%4QJt+hTv`LpmTy$K&ZPL!KEvoGnHn3ezQ2 z^;RxCxc<64tE4<2d!~ThxRv%MG=0h;X)%KQAkxWqV+066AzV9Cq-nAepIuKDdGwPUa0r^Nl> zH0J!p5X9kcI9}N`d1CV0B2E5)DPIJ{F9F@SY6_U)Lj~%r+78oiWy!+%*2{-X`7-AD zE0}mN^5il2_!x8wpgekfH&wth-KNOwS>B_=#(iXn?%gN$nKeCpxBkeFnZN$@{pJf_ zX)<@@PIBPhp_H?fwzDwzz*qf^O4J@=Fma2`QQQ5*ga<~cq3c~ReiD=)qZmy zSd5m~fG@eOONu;cEogyteRRT7Bs2iK_YctPHu4sB^OL5ja~#vxewsiIQxKfSL$F}h z^LAgE;C(%T-?iZV+U`@Pgg*Ms#yt_*FZKXnnqSu$v>s`V#OWM<90Xg%FT;}g$VEW&j#~6)J<`ei>q|&#d!e?1tiD;KH zu5pX$QT;O*>ZRDz^_rv1DwE)oI{6!%7Vnu>OiupPV^L|6M&qp?y8x)4!6?{CIk?Yc zdV9h95tA4|SLb}Gp}V?~0i$|aHyWr3F`GYcuHT5CWCPZb#*q^s{45PYG^q^iGpVj) z*mO>To0qYWafX8S^#f=5XnEaywYJZE?w^{?|M7n&%w7H{DP92cI{vX-&X>9&Y~nOr zv@j2JsCcKa5hZ%L>bOSA*Udb+T74kN5zI5qV`${|^eGCPIRp!9;hIo% ze;lrl4Xdm4BJLD~_!KX!%3?CJMy{|G3>Pey<{lryM>8?cwMEg}JW8bg7TiA#l-f01 zpS4`4p*(0|4cdHFW`dk}=FE!h^`Cd<=crIm@d!SAHaLMFKQ^gJC0=15<7Kn4_YDTS z-ZafraWOh3;?qjrVW5LvTeaH8kMTF!e`aQp%K03f4EWYqW{T$47Im{=&`EItG>@rr zClZuO)Lvw$hbhqFx&&$sOdBjAdF4}HFPt72fYa-Tz&FM>5&mBNOPrG)n9 z@(ShKNmtAwfE7oOh4dxHH$+*A{bw$M<)DxK`XvZzi;+pc93zir_4 z&|k=z@1sbU0sTDWl}p?XPXgD;+fjOd5OGU82%<#wRQxvM ztRj{~aLg=0Bl39~++E!a5Xyk!A$7|Flg9*5*$W^AYfUqDm%zQx?AS{8BxEmBN|@uN zpSM{~w(&bA+kjDq`zda%=I@dX30Ahrm(0O|umkSfEIo&w99dI%o(wQKklJS$APbr{ zQVAt_Jj3gyJLi3T)>vQS(0+Eyw~g2IUE|l?X7UZUW80v+QKJ!HbR1;OVT(zyV*}P! zmYBFIAKtT!Xs?lr&}sM%mo96nH4e3kE3^SF%ajqQfB@gh)|NO(VJ3SgbNc}HdETXo zAp=|W8HX-O9U{+C9FPw<#y*A`i#5(sb0n!7GJt!A=g3A>1j(|jl`KYjJanm}ZfZo} zPq1z_`$TpMnU0z%6XbrDAVN_wU2JhJ!XvE<02Q32~c;V-D`vHeBh z&! zr;;p36{!$gWq>V{3vj8dA0_jsRY0yX`L=UZjN4h)D5;2Y!sQsWfY3@QQu!e4)^p@L zYvs(6Q%o%l10P2VtM%f}bC{ciA&*vb@Zbp9>AU zl|$w8)*5`$MzrsNi#chNyfmkcm#B}~PIEu&O4lS`QG$P{49+U`$7&9)&|~vfS*QsW z%AWu*^#F1khhB!khITl%h>=I>sae#A(30HmQwsbj&#!>j<~1(Et!#B=`b0{QX60ym zv^g!jG^WCyk(0_e&G~F%WfV+C@~+@Xv#1AB?4~5UNhn?E%`phbTT?g4OV+vr5rT@! zWA&8tuPjiFZ7P*i6^q7Pma;n4K&(dP6yqxy##a>2(+b%8vM$O-Pq>b<`_;CeMz#>f z=RkOelOo4Sk>@i?Cx_f(E`tEF+7)pBU5r%DI|>XtB1J+USL`!zPT!CQF_PvJ>7@sy-mlT}5=)M5hFK?q_Q2u>D zrcLgl5%k2z51Z=`BglQ?8@HL8KYg$H@~vr8v+EK@@fVn>Q!{ox9{CQc2brrCL2%!}XK_pGZ!g2OCb9ro$I#aHRzgn%~s>GD$T|AjF9J zMwoZ=FfNASvn1@DFi!UY8nO?@!6K37O8M6tJZ>Ab(gzy{CVH^8s;Tt?_HuRBF zIr_Ny^qo2Ap6tz4wI$~~!ryu34Jtb_ z|5!VB1`skIk{iXgz(=bYMUCk3LC7@CXi( zS)_CvB?yqMR0RGMGCBn5upd%`NV>IS(`I{ZAL!ICVV*gC$s$jU66TL|9~&6vm1KGL zy=~U9-tEJ`GT+`Z^})6*TWh|Rong)Y00lqBk{=>7=S5S3&jZ>P6HsMt3{Ta`Nus|;1)l{xX8X}$Dgvv>Yg(>neH=_u3-v#=(KL0Ka2^9yIVV&wW^4>DMg zr{%YG5!*Z|B}FyT&QJ$25o(^i!i4Pp3{wPii+GyeLegdMV`_qHlw?Vsr|E$6%o%Jm zTUUl7RzCY087aRv+0*~QrSU9v*rPm$+mo8-cpel4Q-_Wid*F~s^>pH<>!m_m#1T(U zP!|#}N1<+znhM)|Et2|XtSlQr)O#61Y95_Lz8^J}K{BG?`^Fv|@@U`**t}(s$^b7{ zQ$M*u!_S)y`yMo3x|MOkf2cE``<7+4_i_~szh&<2q1}OfvTlg?q6$q;o}-$e{b7Li zO{DK8NWFG|YLvoaeBj*g&{ZkJ<-Sq5}REtb?b@nOq zt<5A?U4OUv(1-3cYt~eo`x}#d-|RO{yNa~W>@vHB?7Jg)&&&A2UwM9Z2Jm>OdtkgY zG!UI%u(4G8P;&h(N&cbPKyBq=@Xa7Yj$H3;j5h20Sl`PUTepCIb=C>z^@X8;<}{I& z((;wYr&d=bw0S7N+ z2CC^lHA7M&cB`?e8svyBp!|z$G|XWET`7hGWQfmzxPf39z?FnAG;O5f5RL`_xe%Yq ztIph%Wm_5=zHMx9yS>8T0!W>bdk0V!*jn6Xbjyz(OChk^z-|ilTZk&>cnaWkVKU*p zi{~cJyQvJw1IVF=d+2%*+7^Lt-M5kTan10oJYX-lOR#=UJqQh-`}}y^m*ZY=FGx7<(myh);4-Qf{tMZwIug}OY?Tc^3)#!iFZvhUFR{JDYI{^r zF11Y)Y_FyUalC4lRxI+`CoxVbJ*MhFbx@x7v=N8}g_7f=R%aNy$g=Y6Y@3Y^bL@lF zYH3z}k-XsYfv2(YB&iglh5+6*ty+b{QU)D8DyvX#{ZILfZYYdYkv=7sDfU*vrlfLt zPYN8w3|y}mBDGozpw-ja!4j0Zsq{^q;7O$M9ICQjBSBmq5OrTFZ7G4OZ&8ORnn;b( zZ2+xY>_Lwe0kGX|MU|xhJ^TRdIU=DB#hNS?ipxGN&@9oqt2qMtlpf>QR0R5*wie4( zfRdVr3$olHnycSMS)I{*%2he;smnK1yw6`~s3J#gs3@hVLln(k`Au4{pWxjfB<=di^V$lHd8C2Tzvn(O5m$*?_HDlC7%1+BSZefUmr$7KNQH2XpZ_JW29816}^USq$ir6SDnu~ns(2;qHXsQUa;DvvTem0P3{ zL=R`6KEY(35>Hoz!CX?RFCf+{o-&%nR>pb^_5ykz3Kz_mf&J|OeTBh+^0|H7?l;9t7V5n;gx`0Y8(RVT60Zs#8#3-yCdR^=zYT+se|Qwv{O8O^Z@I^O@BR*xIQ$^VM~?sz zPXiIxK>AnA=AqZ==X{trYx+GqJ59rpBlvC>OlFL4{q=pX!41qrv!Vs&sOddn8joCp zbQz-OrAnI&>jz#it2aRN)zEx$41+}PabtJwN3Y*U>gBje49%d`FGBklBaJ`OU6nd` zOWg>z3DjDz`(g8uFV{u<`8H`{U!yvD70!gCIl{ z1i8!s22wv|(RAvcgf>ZEw4ktzsB&Xq&nNv3}v_5Ep}?@?&`X{2yIKPl`t2L$(2 z79PV2bd`~X%f_94opjiDSYN6aT5r?DLAqFW%4c6E`;um1NWM5TMTNk4z-hW2s8q7( z@Yc*zrowZqQ}2`TihXGAY3eVmL6E$Ss7v4^fsPIgZ}%VM!tCubH(NZE?muoecB)f> zv>8sU8nkbv)o)g;()d$mJ+mIihK8vIY5(r$5*#?defHxh^A}SQHbL=C{iiuDX9#zZ z!R)H}{-!M?>b9rlDz8?!eC#>eT+UM&MlBmJ|QjyH}xUrSX{N7HYb zbxRB(sB`|Oxu|MbQne=OvUqSsdUBexfR^edf@djp)Qh;_`6XY^$~sQ*`e}xgaP(&( z^BPq0&B*x{C17?AGrv8K{NKb7Ofxok8I~G)xNJ9br>d5G{Tha`LQOMW)iO@9l$`%D z@_Fc~oikNwqMxjjb3B1Ju8PsMkia|73;<8@bgF~+3Dz`0QMWq5Sr#K6r-kDXhx=RR zub5_RZA;^ISvp<4nP(9_G*UzjoW}dVy74H(0cWWzsbhaw>NLyN+-sJt{60MY74x~z zp&uQ<`gpj_#2)A{E{3e#ZU=|TiF|oO)(o(k{AsDP&qFC!4QGD29qra-k(5KYCuiz5cnzWFxOlDIv3 zeg)>pv8IXUTTQYB2u61+wV==DhFh_e|G-oVtS|H%HFAQ?Nq}5l6ww3nt{F4yy~FK$K?3| z;RW5&r!^Xof|DyWwH7dot6w(>OV>8t8ZAkkx1w%o{WiL`m^xc`tFffvgXKByr(w|o zuPeeQ4#cWG-okPntSc%FV(_lI4vIj&c)e`XK@5+FqWoLZ{L(%UGRqm`%(MQVXGaUXYqfH zaHuVz8T~)a8i(4^RXOT{CS>D@sm4d^2zt+@`>gpl9I1QZ4glKgj%zg(pbFisO_sDKZrB(*>qc|XTcXPJ=^e~9K) zG!h@njLXNUiw2_R-cUR0i#nrxt|Om85j|k@sbwKfr1zqbuui#A-vpCIzP25cQ7wTJ zD9<~k`0&&ihl2!PhQmwf=-!A&Yi48`SfoH_~rALkDebO<-6Q^+-5I5 zV2Y&OwDMDWM9De(F!b*+*(>{uk2|OGM7JsPzpYdh%GE5L-5ZfVDVY1rO}?HD_dDd~ z1dri7)|9t2;FMXGqgVz|BuOo)A7n00v`F>aN*iS= zp9S;z%&yDk!~bI~oP4kO>{s@pV*j2_<#$nuv4;~kx)yl>(=pSr~)qIet86|xpe=t zsN`3%x$g$ka=sCP1ry}mJ?wdoAJ%cXF-nc=wje6M@u-`Wg44G`-h$&6Z zVtf8EPNko4nm=cjeS|zd`hP$9KMBmnX;hqh4|;wHihc@B{VMEEB+uzND4H=Be}sh5 z9IE$Ll=d>SNm-0bWKmgN5myoU{zi{XdLJ#ka_()k{1+ha$Ej}^(U^szA+_>ZY5-~X zbU;SIH$>++lNa&)T!FxzGF#c&B7bMtO4SPP;?GR_#9Lgf$IhA6{wW^86z%csB6Uxh ziXp(sl%2x*Paki`rB`8fnm_6D&8S1TwDIb zzlr7JJ>qZPCnyvRcb003_@N9Pn;i2K<`$<9;_p335!!`l(P>hBjA9H-n~hzNHG6kG z_0FNNOJpyD^9s8{!((DxoOEnNo@O~m|%nGN7-#Gx&i!Rz7tI44wM@H9gE1`~U5i*uCggst7e>%w&m1caLzH439SZnKO5 zRMn4SDPpCL!IQ$9WV4*>bdkP9Ua3AnvAyQDOk$|l6gXmj$zz&%bBXU|Cy=KmNJdLn>29fKgSjnA^oLIsRO7L1RS!z? zktJto*g?YwVtko)wBp(WE=MiL0m^f*Jobc?dk^_P&f$o>ExeDcA#(nxo>8@6v&;hP zE6&eyU(7GXKF#)vKZ~kxIJ9y^N$D5g=XhQVW_|f#q|~d160eH+wH>Nzv|oy>w*$+{ z3#IOcP#gDGYC6_wq+yoG>-U8kS;UICusdxd*ixPTnU)`it|DJarZ5&H`6_r(7+mgcntIsZST z&Jt<=^5)Qyf~8H_jO{SI;%gcyn?=$Zg$VP=*DGu=HLD8>#&sckorfBAU_xJpRx+%0 zs2#zi!FQX_$k5a#*9t4IQcJ@T0#oJ6sMWNUg(%8hO|Q|kUOXp9Nup`MWaXEMUssdE ztxQG*4o{vPr->Lel~)ZxJ z=nx)8^!&ok$O_U5zFVx3d@lLJ45-j%TEeH}0GQqhEFz;60)w8h7;MQ8`AFqx72v)? zY0~(1x6dO>?v>}7`9BS%0_>oBCAqaa$9 zmQi0LvMBAXgxa(&!u7N5us&S_JS&RSVP}Q@FkJ5f_X^$#ZGJ6xS%)G!J;&>OalH$0 zuPI!@NPihi{KW%EtJ?w14~+Wi!&P{X&#fvgpHAQ4#5S;ouPzQt`b=mFSm?vb~9GU6-a^65Uveh{+n zHTi3Mjr;g6MgV$Dcy-i#;_nHV`ODkPUwsjy*4BBGJUC_2hi5Q3&?7p2jZ_@i9T>>= zFnQ{MF%v)1#}rWg=H7#60SwRw2;bQI0{En9qOcbCp8~H=V1xkkG?P4}TSs-U1G82#n&vkkak@v8ViLN@Sn+B1?i5?ju9kc({Xo9ACCKl2JR}Fn+Zeq=E z@J};%e-9XTxB2Fs<7UUDKd|?HPI4nzkQn7-#C`Zk#yc-#PMIVCXJ`m35nwcW5|9Nd zzh_bWX9EM2HS!?N`X_V9~{|5qpp7HPvcOB~3{ z2>wrF={iAt$~5o6BuKDZqW@&n&AX{f{hSN{XlLA|&cb>e8=7jjseh1>tP#^XaUAQ& zPq2{u(%juZAj|SQ*_t1jJFBNm+r|Hv3J=7`dhamwkfnz;IQ_8cSU@D79H5iD-vlFl zoHNgu?Gzyr$7A%LrY3PmqqY~A)~UGoOU|X=vDWXK*0XP6#eV?<66nm(MPUxKCLE=F z<_i6-6g&v8c|_RO)8yQ<87C-C)1M3v1{m)HO!P_G8ywis1O0==YwWov z876s%^Y{^*X$%P*Wq<=sIX_PU!qEs$a+D`e0Q<)n8hHY=e~zB!Dc*AkSh_}W_BtiV zleoFTU{WsIFTBl_GyiL|ri~(_LD{8(Xe5!oj)~6fp2PIYW6_PHYd$6(7AhMRmhWq+nM~=rka!V3St|Ph0>VCkaJ9itWi>m=^Pjx?rmQmUx(7dXCbM<~1+aJ}4|W%9Dr@KMGkr_n6PIUQXvv5|R(2$*zv z_%YZTt(_&QPOj#9i2?f!%$(K8wGbai;s=m7_Hy10FPPL2flm_*?~L_RTAnl(?JKny zU^L}cxR&&(2=-UBpy8_#AU#SIO1;pCW2a#RBG1fHaAe0W(8$Yq(=>55nl4V$#xXkZ zl37v9?yJFq6C0)^VjM3yLzXSWQDJKGBrlvDG0U6AN%-f*vhvrfdT&xHe+wgNOfB(@ zS*e}V!lfI>yAk0rSO% zg8ACUocVgSXKwk-UFO#BrjdC;t_*y=ALVAEo;u$Xhi4Zu&^~$a2l9yb1zECWB%%0J&xFEZi?~h+j4i)e<)EBb&9d(k<{X02?I~=KyJ;ztCN<9_M`psR8RM zJBjS=lF9|F67R*F1@u*yQXs;9mLV}b!)w$0U(OnvauF_s|RgaYf2XhcFh z-UOqkSzU+w9(9X0MRkZ={aRY^$3w3=AgYkW{TvEqld9&B8z>a?|Fgp@a@eI}qJGF) z2pd&H>{L|(kuM+Am9nq;N@EmBsrtOwX20mb=>V$w&=`rr?1j}j$U<9@w@yZv6HT*% zS;4)g0uJZ#VWZ!O+uVPh1V1b z(R*slgcD5)ew)?>#I_ir(ghQ$`u#{jYtqJ;5WW^AMQMU#Y52->l@8v-C22)^G{b0M zrqZJnUn!@Li+jY!8m@StNX^f&8^UN5L}$%)4tq#>pE{jdJ3c^TId~GRr31$b{uMY= z-iu8gb=qb;E6HVz|A*QkV9ly@g{cm}>(8$!y*A5!)Kp`kCU~vVtZNqR913x7kvB?Z zLXmSLDjC@CMYg648*A{ugQPXtLt3rF0IUy5+EZmy1omT~x*SvLO^K;QK(kLto5pWa zMB`T>V8P0HP*z1k1pWt880PWFP~PNJ8EQPC9fy^6PpEN`Rq8et_?P!#QKELr>Jab` z&B~yp%YZtf)XQLk5AickHX=Dq2b!T)oyDpqqJz(Qt`-s!g=*15s57z@XgLN}0_1#) zK>!;mU;V+ZzTug%e8oVe`zmz9SMCI^2c0)k5B)gM(BGhB-^7b;>NPG_i zwtJ0BPN>5AJ#K~knvGV)LkxW;OIc7vP}l6SZMdJD@j^5t;!_cM{kg~h75b3>D#i7< zJZe$csmD|Ofc z3V_T!%L3htLVFNj6Iu!LL-*l>Ot{EBS#(O558!~_%jt7wFFp=Q`WShn=m+N>F!sd< zqGuI|t}j15fFFMdV;dt`~Lt@Q6tt9D*0R$ITaibnrY{s%Df0;(Jgz2VMlq6~04Yd+$lqdeXa5 z8>@Smw_bWH1%akvQcn10z$7z?yf}E8p`LD&={f|&9iph}CKhELkHr}Zh1Y=o*Xc)m z5(r{`q25zi6E2v$YR1Sc)U3Gc%%;@CX4~cW+3UZc=y{EJ4phX+M}hTM&DQhJgSI%& zhX)zV8NeAo1=612Y($*D&7n`VK)w#0zUSF{6ceY1LAY2!}PvVqNGNLfX3q>|E$^6c{x&xYt>TN4^#sD4S1R2 z10zfY@B#2w@O0eY_pf-pe_=lN)vavF9cI~I@b$3wRVJPKzj5!pZ%T_lMelwEAZ8EY zo#{9^f+pTWpG!ZN><}vYlV4+{ ziLIQ;Yk1vXX4}~FM5KfP@#kMHKxAd+*zGv`JQ&YxwKPoT7S7YRGH=Q=Cn`jh#ZlxCn|b zm@S0hSm^ma$I>Q6HO2i*Umw6fXf|~*yDz?+wS#Y)d+Fc^YdOJIW%}n#!vW6mF06Om zT**DX=o>?Hki2L%4Zq4OX#J#A2s2oMz7!wkXaeFz&f$-L-QlQgG|Q@*%%*L$fzp_& zDVa8p;F719OAe@0mzjk}o}_GGu4JVC+5z?Ca>(w z!_z=Nzz^)lhMB$r1;1sO6j&7dCY1a2J#UdfPbd{fRTH}X3HUW`(e*sAPhmO8NZ2@0 zRHF>N^`GGOwERvlLHl&`MzoLVh)J@NqYpAPz|L;LR}`j5G+L2moh;s`c?=KJI74>$ zo-~OZAx|%w<+Z((*<5*v5lzQHZIGTB2l1zX{p|4}I*%!InptQ~FQq-DN!UolYS_YH zPuSS^D#HliNERG&Uw*k_DgWD5{nDycls4t z+&uloot?V#pXOMPhr%LMzp~7CdkJApw-q!$uYd?wg01#~@`(DOte!WwqFCuQ4s;-= zk367xn#z2PI~gEP?|K#Z55UjWX_D3LBa;=n&iZ0>S6 zC=@&3OEMJz0Xc|xRe-*#n8T8Yi~DH{auVfi!==mUgy!GWO!uKg&QRXz<&tIPb63-8 zWOrxVtQN1&60((N@&;P z62~=EkYnBQi0`taCs>Q*7Os>);!$+GRCJS{iK2d=z* z$>6%LnkJ_G&MVaVt0ie2eVK7svRZ|;my~hot2P3c)t8|LUu{pQ-rm*fM#!=*KK~V( zsu@^&N9T*rdMeV?R|&zsk7RuLfK~|k1CEGZ<**(a2NKGYHGi+UDH71(X;p?k+imk; ztAu)xS!gZGl`2l{{ixgk>Q!~=eNq$v%HWsDDl1rLIUY+caOMeiQ&_-4O%Jw0vwLND zhDTl2&a0#R87|TY*-7RntK{dt{sRx4g6mCKq;poJBcKS$ZGQL8ABs%{5Mej%0S z?0#KJq0g@>k6*e-LM4r^QSG4>R>zH|S1y3V8VGPfS4~&E)N!BT2LwnPZPrhEqqpq>!Y~% ze$;NZM85b|IkGr}d5yV%-%*4sYw577a_mx@+dR9h9Z$bfG!@yDK@7<9nHI2OdB#Nw z0J^7JY6&H8`rI$d4aF7;>*+Mcsh|#$2<$(f;*dCOncD@7^ZX>+lV$`UufKV%#j>-U zQq6J%QTg~2czDq9OMta4fM;Yu*_-8q06zEioC4b#@H`s@zd{`o47f-^R9wKnl0eJA zc~M|K=$d9er=78Ug!LunjBP)@-B{p!t}Bbp*JGW~`ukjtCOay$`L!~|;=IWU{sYAN zQ#+U?eRtGqo0aVb#t(~t_L>s;_>%M8iE{L8e+sUjZiDaJ;QMy?1;(dI!sEVwtixn6 z?EAbrPu^wu(JqFa9_uon^hxH)JqXQ1^-8?YGf3dEom((>7d>X%q>JXG)#f{~9&Apem<%G_ zVcEZbFCt$r^iD3xI;MyUts{Va7M8f~2Zzq1oMJ}+`!|FAahW85`Hfw(KsiV?0PJJ4 z*$mj%0roY3$(F&_00?BlJJNjRH`8$I3=D95yBR0g$G7W2X0JVl>W$SMz!28g5pceq zl*E?9Cm1=oWd8X(hd{0$F!rEE?YGU=2j3&VR4|JP07OhoKY_XB4bzHhoEpD`DH^?# z8L?8BW&C5u(eR}_KWOX|KgQJm3z|sZ#TE|O(^8wArg*`6Q=EU27?S&Ut{+St$`aIh021v{*N##DE*N3i6JlBxwVAf3=IiDjsz zhZ3WE#FWR66aW2=xqIKM<}Yp}cy<{bbf0(3K>~2X?85KOeFfIcI`$?8A?BE!J`VnL zlM&m=-WnvQZ-SHLs@V#R7tTBz&CZ#gzQWKQtpp%_Ve#KSSVK%m?PuR+H0lN8O+SnA z{Z&S97_B(=cvLRPZeJRC%CwPivi00cl#@uTG!kcNyQ~~PMqJ2IMk}!IUwjE8HANHl z{Tx7Ez=-3Ydxf-=ml##EM3NX&95qD%RnEV|djFg~{7bS*uOQHp!b-VRqNO)8dB)U|aGB|1 z6l-*hPd8eZv5KX8Q1$zJOikA!t=SjNy1_Th{r#L{^02J2d&wo;*GKujopHgPFxoJM z_yp+B?8!rKLa+-aK?`S z^M@j+x5s4Jp#_G*`2((xX5CG)urLmShl%kkW=(R25egbrWco=_aJl{}HFLVQ+Aq{i9?c!;yj0<@EXU)AW!{+b5+iL#&`X88& zf2zjZYawPmu+3~gh#bY2V+GD=gHY^tzCgR0O}vY_0;dj}J!0=&QCph_oA1)Jle=6< zeVJyz+3Dh$3Dx*orS{QMfxpW9y1mG+0*`2hO7+M(^vf#Oay#FEsudKQ-AZSiCWCS5 z9+OE&yt&akobYo#7vPlf&XPFKytjlMk3SF2*lg}lBH;6`m3!^2~+clsx>yiM7rALPnm;ameZFzF^EN!*kLwd1bU3#yY zGUaH|R)$)MP+CrNz%la<)T$TzMT%xvA*j)m)jZCbHLH}2UAiGcs>0P+1Hd2wb zmZ%*rQ;p(~3+i%6pfABf(>7R=^f(L;bSvE0U%K{+4T7GQDxf=HSZFsHhSeY0e)@q~Fgnb{Y5M+x6~j<069l37Ysn@%H_x=E>> z8BX9Vb*aXY^0X8y+%=66N3It6#YFA;e}S!P*R>9&MiM?%fx~gu9K*_Bc^zaUAk(!TFMuu?QNrWzT`yQ|vam@8z0PoQ{Uk zlLDlbTgXS_&BRP$s^o^h=hVXWcY{ps^5j`06zp zlOm$4#(Y6;9d)6k_!Lxa;j#tl2T0(#$xw^vm0E(M8iFmZW3(krO;f;hR06Cu&X9%u zqd*?&lA_*)I>zC#$`D<(BYA+;BTU0LnvzSY{RP&-;eAT{zs!$%5t0lJ1W4*-#Po>Y8OTD|&71 zb9=}U2jL$)h_p{{EkQc|{2mwye-DUXIt|+Y5%YaS{Q}~C;Za=sPxP76Qv*zA#qE>0 zkgjesdr1TT;yq+YFZ-Uk>2Kp^15TYRQ!d#O^?Ht)^$#qPZjUzs??H7ZX?h0-!G6Bu z`=NyHMf0OWXU+Y+FoXvAmuH4>DIB_jjCvdg#QX>X)A%}&Rgsq!-cnvfwuc<^WBtY(?lI|+5xSjE(AoUJx}@ZlyQ#Y z+{bm@I{%K@cJ@~oqG-YxJ%f9Ek;wkX!2LN6!T^Q%Nwb~MMFpu_bP4#Ue~Rtr9o&V# zpnHIcXt5?aFl>65v=v^L!Vyw^n66XIVTEz#c4aTNbaEOVIY41Z#%lLT^za1?U=&oS z*6PRALPMON^dhJG1j`vU%@k*eVMbpV zaoN28u}HIDwyfIR_z%o?*Yguo$H>P9#s(5Sxa9jt*&JewX!vooc{Fg~ymo*dT3~r8 zyS@R4mJY98+XlL1ZFKZz)-^paVO&OT;uvmX7;aKynBzuIQEZ&U*}_~}{XaG98P(C; zuyv&AG@{+NNGS*3tNUK$;$S>w=r~;!hZqYuz_y=cJPW|CrG^gIBHmXi;736}L~owQ zNIgbS|HM`NQkPlb3#NryE5@7+NhJ6L3lCGw=2caXFRzi!39EG_Z|;7RxK{>is9&_9 zp)JuqI5t77)Hv7Ggt3oK<3OU9U`36p1LBKfQ+#INgllHmE%N$nT8ywxSA5g4vkb{% z;z>=DgE_;MgTJd5+fXAlQv0kFrrLPk4N0Z$b zq?{M|bwi0?MIWPlnSYT3p)`A!khWI2O=Z-<*;|o3Ni(g|a})}fM$6xhE~XkIff=X7 zoVS{!$Jz!=Xy(m3ELJ6t`!@;?2V;au!V(L#QBsJy>aytbk}LH;F9q2qNfCj1gBYF+ zutrlEC4@8JO3;e6gysSD8p=W=kG3>dB~r?xoroL`$ml3}5^M!A6240w=12cDC!0@WqCPt-YkZrGXGtK!Ruu7^uS0`>H^2 zwDzPXx-DWpGZhYM@K^j5s&-w%S19f&)2$GS||34I%$RfD!sHa`rbUa*gn z{zG%U%q*_RnDal&UM;YNt*oWA?F8NzhsV_>;tKnrX*q-9*xXbi$grbsRb5}9R%eB> zY-DR!XKy0SdMT@ieIBaqdwCf)7VPW%Rb?4!)Fu@4ua@&GGEs5*7I>PBN;;7e{Aj-6 z3TCaSNtF%M=*uqcSw`dT{NUbaRmQ8kMqMweY}D9L0bm92f_lwcCD)70MuK~dJ*bsH zt;dQgDq(iYvf|n?dcC%$LslRRHJUuO9lMYYe5+4$uE!(y^_PA*Tqv z7pMtj&T;VNXE6)Oo8NwZAH=;2TE~*Z`sy_(}U>EIuw)p8`pofta2pd#85e3MWK=j>k_S_LJ&UgzY_^D|=3!{@(Iqy*Rz_ z<=jxZiqYrcy`~N8%c{To2KE+a^ZuuRF$=!^`_Y&u_?GRXM|SU`sXIiQDt3d0u9K$W zAYqSP;@3w^tmi><@8Jcrp_gy)22|4J7W4nqA2?^$ADM;9Ps8sB^;NRrYz9X@FbSv$ zvZ@)H+@iFQMxu1SZ1){Dsm^`m;rAPRbQ+;jnKXEKuo0~5J;Oi=Ci(;OX61EFQ1Fk; z$8OzfcAxq~B)WSrWZ~pv$ildck3I*7k{Y>y?VG&I%ESPL0G^GJVM2~@)6C)-!8q@p zdKUuzjj>Mu+GGLxk_3BRYt!mjIsO!Wl;5#?-!~oD*|UA{6H@Dr6G+Po@0%vm;&5x9ewT=vx3IZ9XI#|u^1N!CcfjXY*u(|KHRenS-*+2i zS6O_~loqhzoWSxA+EA1vyF6?7)rfG@MVrp0hdmJ z0ueixZZyIq5$BcM3ULYnFeEPo3@0na#|~v`+mK-DlD3FA{Z13+WKino`*Z78#2Y z%oDyps`gqsRtBVq%N&F)g)yt_2=N$3aG0Fn2-@0+S1SrE=hS&qxi7di?vV{ILvqdUTmUR22>11Og z*p1jysq|9oy`zkI%nWf{IFFg-E7Wv#%WEeoI3_fcF5AV}3bXFw`>F4Ki8^Q8XGb|>1HNMKR6FNZtN~_4);>bbTmc&IVYJ6{6Vj&pO=6|7sdiQ`T)YqZn+g{8it1g^}j5Xl>tVIO-QjdP$P8eH$sXmCkD@jxjH0!y=u7w?gaA5 z0KQpPHPoGd%nAPaE5S--1w^onKwp75vf;?V66xVUmu%e%dzbB@g_V?^n`i5#ILka9 z>BwlmDn6ug3t25he+l+kZiT`^c!j$N-xXb>IaX8b1bJ*UpdsBj;C+Pfim8`BCB7NW z9fU8io{Gt7#&@HFrNB;6*&y7Gd^oEG>1p06$$^nOU&^!cF!fkuz6aoQ)!&E?flT(H z-02vp?nGw>i$PQ^OC^DBHE5v%M%I1ddzgZ4Z&pjJ$|iwrk|IVZsaasPW-<1P-bXO5 zf+E^;>{;yzne`)hXN#rB>-CBn(%3-cQsOm&cNHaC6RaWk&~V6773;53X$jpU{AZu* zRiR#Ti_l$)wYDPSSE=*7PZkapy+=$6CgOodk^*v#puh6ETxt5LKi>+NRJ-9L9Mt# zciCFviq&B~g!}4U&7;W6*Q5EC6?iXyPKF{uLtqYPfy#rWIg(2`dS5wW1o&%SEiTP8 zOAb{BtybBneWwu!$?s}ews@`lMFmvnc6?b;VZy%Gp51M;pxq7^*k`o*x=NMyqg|%v zm4dWs_*98N`dgME4LGFPFwGsUK@Uw_rRQjbFRDm*eT4pOPTL;`38ZtEm2|{m*E|h* zDl8edbk)lrFQpkpj+B2>8JRSa9|+AaDR{BDVqm*I0%^g=A0? z#OqdKzfI*(hVH`v9lk07j9aW+*t$PuZuA*!$WkW6sWgg+;(5TlG*&V`mY5c*8JpG5 zQBFAA=JlSydIbP44FT`qcKIMKde+NlKtby${PvOL!+^Tr78{J0Odf$aP+bDneZ>0$ zg+mc~*WbGJDJlvo0}$-3E-Qj?y(W(YU%}~8!heE>w_d?#k- zjeSyYiY|Y07jHtU&)hB`6poiAhdj>8<9#fXNX(n_7qIa>*ku~M0Yc)xL@Lf5=C*tG z(Czpt(hi8#4Pa~HSZB6j^hOSd^`6A!(&w{N_ zn+)oF{oZ-Aq4PL2#5eh-{?|0y><3-7|4HvF86 zyzSs&n=&B=eDL~Rvoa*HJJmhQSNa~{aW6Wnob=;3lb%~*_h(=jKya0Zd~6-= zH*0%_NhCQ*Q~KNHLmy8?CCEqq2N%N0_l)B8L+2dGo>}~NlcK2DeHJf@rrqj2Y_=hg zm++=2h0?~^5D5==m|V42EGH{InKO88h%-ze@_OTa#Lthi8(+q|^ES00y|hfN>Jw+O z^%VXZc1xPj%dFXOF`Sc(WMI@ToP3C(gVS_> zj+x@{sM$Jw6utIQW6wWFwec=>=&u>W`Zo^AFL2Ib!x)^Q$hu_qTz)p<<4uQ-5obSx z|K>EzeS*mq@BwvoQtTa}od(~@k$!miQFs`qQxD?(Ax2M*a4j6(&1fDy>%AnmcEZeb zU9San??)l_XeUi{L%+QPQ~`aanJP3j#Eh-*@0N)-&8>HFRWRza?8En&>NJy0O})Zo z4=+%x!S90?(6XOkyd!AnHcwnPoZkJg*t8TM4iY3=~+@3(eFE@&0kd za}oGi-Vc6Hj!aOYPGx9TgcxG>-t_dH)?vW8hOs}ur*WP*)x}Mk5Mzsa)eGYzQ$RwanH2*dhIsz zrTYu!e|^2qeDd$tnoafiGAj=-CLJ@$GF@q%cqV%iX6rx=UCo#UJP$1`5o{oNg9L?x zzS%R^X?DvGu-oA)KC%n!)i+`2A`kAAzx_ipx_cfx0<}l{9!C7`<#3bmaDtc{Y3>TI z@j!OjbJ}F&b+OglpqAR$p(e9ae%LlB94}0;mCmvd&n^6}h0AxNIq0+Sy+9@_rBrGy ztYAZLdA@O#E-vvd6jQCv$^-&3u9kJ>@uhRcC#v>)j_*Uvl&k!4XBO;kk*TV#)jy6%*GjnQpWPHTI%Cm($@EJOaiVQHa2uEz-D( zN)csOhI+ypEniM3-9{!MUMWyjbiax#8TIA9(tgo6MwzXM4EyNoO0`6FXGRI1GtdE+ zU1~>KMuuxKp5++xxXt5AVl9LC8CIz!MG2tiQwnG<#&5LGHHMPl{gi+dst;hbTF}*{q6Uu0Ld717lA9<9 z@=$UI(=G&zXlTq#V`q#MaS>RQj@PPG<((1XM z)d%d0@44@DZ3o0Pfrp+V`fV`xo-Ah(?;@c_Ql?Ev&d5KXreRmcRh5ww$BIooa=5;!ws zxP0);w2^{Y=Km#tKA37pjW4jSBSiwdx#y0SxC+L~3lE<*qT)rE(EU*_e(H98BQ zI%3KfFxi~%HQ)Xrlj^Scs;T1Ibuo&q2wdH=YE_J-9V9+O3oz;`P%N&XmO93+iNuo?FN398&ymIi-%(YSa&wx4+mXU?x9thd1K3?g^&{2L}c`!uD%Sx%M*sd9eHet9?QSItbE zWLudd8H2Pvivvepws>S>j6LK=uwxw^p~As_Klc*`5lC9ZHc_M++OhCD{+i!ni9q;2 z0oETq%X6=qT{J9s6Hii`QhFS}MxQG)<&wqePhZ1_a}FCnF+FGT)l5yB;?S^Z9UC`| zAir}OBZzhSJ#&3zcbffImNI8DKz%DR{;o@8NK!7YKR9bLeJ7ar4kLZ%yxDl*xXE;O zQAu~3?B0D`_!!TIFA-(Muu%2EqvmTqGaBWN?4U+GLb^#0=j$98eu3H2UWvk;%9G?< zQj?`SX|6azVS9)k-TvpyodD>%3C#7mMbg!2)L3?x`Pv=*rh4KvqKi15eago?1Jp8D zfR`sWfb`yfhC~>QRa^sgSWPxFL)MmFqPJ@tQ?&Z|Oc~V*MD%MrQ!xbG#nJ z9~#2fLpwk(F+#j{?Z~rc-RN`pZ&)6kD~;Xs;P!y^%s9|I{TSy1=ip(^yV&qq zof<-47{*}uIC~x(uVtmfjhw>E)%#J$2wQRzFWJN-pH@e^%*tfn!^8n-41xhOF43A3 zbdJnUv5}0Xuwh}0y+}^!%Z$JA*|55i8EzYhtxr)KW@vOS9lyxQyJ+spcA6W%T4TO? zPs)6KZPt9@n?EwQ-B-`&-ofo=wY7f(IS%)jQcv7;3|XeVCvBQ5jI_Iq*XC+WOA&h5 z#+d#=+w5OBZ1xN0_lV;1jS-9!g)7;f>HJ zew0WnuZuh{aVi0cs%#xydE#n0YvL^3;?XQWY1Sbt@f*s_BD7mDcanGY;G86D6N9Dl zAiW3LhdF*##URaQsta0NZ#7?Xby z-ArMl)JajU7&d|UE|ONUqc%wKPBhJwboD>WgP0}OP6l=nz9&W(FS9=*lKyB?oX=C0 zKrf1xy*&dz#gKUQEOEEbzVM)Sd1d5=62V59HtexHb&aH59l<4UO{f)LA?_}+HA^I^ z8DmvBgaXLVO4t`?O69Mw{l=g8Uhk)Ur=zUeWoc9<%{Dt6Grd@i$b#p{ey``T?m9ap zmCNhnaz5xea$IRYMUENHJ}txNT+rOR(&pu_iIOk>3*%>+SPt@cGMmj>(H>-sAQO~nZTFP6V=mgZk z-evKtD#K>$a@(alH(P9w`ghY@z7pycY9lxgWL5#Fm;P>L^r*rvtZ>_gO6~#Nns6&l zL85MfG(U=x)y5UTV12#Pi`A}IsdaLax!up@ss0u z9%Y123E`ukJ80=1rG!#KGiu@tQ}a z4&xBYq^a9sQV*rmq@_y|I$;uMLNJ5PVoSDm>FP?l%Q@$6(v{`?$P1RN{c4wG8C%AZ zY{|xW!C|p6#V(66kYv)PB@}RhY5PO}gSVgO*w+JwKwD;nuddEL%lDjf&*y!=&-=Wi zObfvFYoU6V6u$~wlc(APbGuyEoK{<1HC-?=+rzSSD_9wU4 zVvjbsX%Qb(VxFFq@IzhajFoNMPdV%qLWg6R z*~9XEm-JMJ4OT-@ehC!+{nAm&3YpA*wCkX)q6=u6CYq5xMDtyw9dm7@Sk)1fHanz2 zAA{nXyU*C4{^&}#*@BxWf*yO-){)C@fa0Ae;a|i88Okcx9*ukmlCKuY=MYr1 z585(VfAz$)-ScC5YR*9?kE|xvd=636e?i9|lK5sXFpsRAxonZ6AK6w)a$QOeQeAzv zZir|=Qk1EeO!k_Qz0*)LQ3ff|;?b13}mHeT|anj*y^lfaL2TdG`Pb^25w4 zWS9fED}!BSbZm--ag<@~qns3ggyIat&yVU$B(^2TK^oMJwy8cInK?ia6GZaUSbdM&0!ts8Hzr~ z_gUjWKgB77f#AcNy~ymyhgN^+GI7c~X!0*{RHU4lCfIP~tZkxvwwP;aW!rwM@1G&e z#yYZ-$)JuY_`i3+Zc4W8v_vcA3S5N|%BV|rjazZxYr~{e&o&BXd#$dgpMsBB655!( ztU*1qcrEgeNY}X4?&=^S=&|aq^Q`}Mdl0St^3gXavOa5HU7}f_hv~pt>eD!sYDVIK9dlh1OEzEpYjM%1-4p@&V?O#p!v9NFm{~a37sQ|W^ zJx%PPNM#ITOtu!qqoL5 z-V?GP7na!aP`#BUYb?B$ynH*=M?DQxq&{q=n|P*o<0X@;bT4T2B5Ndg)59f$^x29nEZE613lHynXN1JMaa7&U!S`s{4DP7|!t`y-N85T*B zQ51z#M(nUYtfLBclj#t|l`TNNfB=GjeyUsu!MLos5OPBRCMR@BgPT3@|&R^Bo1&=@f5d{wqe*Bx|#f{lVqFKY|T zY3Akgs{tL7oAwi+>jFg(nr%?5puDd%&ys#f5+V-tm9D)_03@eEfliP!Mv#&s3Xpk? zVi*Z~)k8^ut8B4|Gl)&dF9(@Z5i7KwV$_mQypA`B1d8sqB;@H!jI<;Wjc7~kLoG)e zF8qGL@JS*i#R)RQl(ZwSZP)m#WHe0dP(wc6A=XJiq|y#WIk-4e6tOi3f_UwUZN<6F zu813@&ek3&93alY$lqb|6l?`loyB8$m@cLnRH4 z$`&O5)@hV|zD|Y8uQj}SPm>f%(ktlE?rTi}fNR2l0gW*@E`#GcY^p$$Ou~NO;jMWp zL{KTToLyAXaiywORSlBkXAy1bl<0C2y89kG{m1n+tS?Ha3fHDUL76#huVG zv5amwU-JhAYN?=+@l|EwD;O+Lgrn;HM)0W+`~bRo&3JOqcZ#?h-XrS8^P=X_d$Zw zmE^>Dnn6gpNJdjh_9DR^u!pMW@il!gKgKrd+3z^VodMic(JK9XiwsGBPZ@sc;MFfW zNth6LdGb02qAN_0q)m;b)sI0Y|MK|s6MSG^M90j!O*td#h^EOh3l zk;|x0L7V`?1?v;wd{T1*shxFphu6wX0@9y2mYA7-FYvjS`(*}0%Ow9c3?tA%uH*Ic zx4xvM_&p2I2mQdv&1c3N&7l`pLasXcd_O_Q0Lw9_kVXdN4Jcs9P^HOwkPRu1ALQ_7 zx6!6&r)@wB-;BCOYWoH%bJGZUq=C;K-a)}3iTKnLoA{!e*kZRQfPa3??m z&x_F^>i&ofk9@)YaatF8qp?rwGK9$}3ZS~GkTh(zCszInsx=tn;!6V&Y!*ks) zBGb3IV(wuM!jgM287e=IC-PukpV+Wi>f$JD9nYpK|6#7cHJY(Oyvyy#X zX5aXB3hS1CC18;V{8tbvHGqf)ozZi#O4gLmAR<*M~ShU=BYm{T5 zf7Tsb!h7B!C;gGdrY|FwdJkF4yB6oi<@H8tKOO2Yy<9&59TY!thSPq*nz4rWhNofL zF>Ba2fjIpl+O2=#_%Cy8@1fzpjC|z-;u+=+CSEZI2G2}A%V*zX0_Ot?f06Gn=Fz@3 zGTgo9jz4XWpT0=#Dk`P^33zT0NzFJcj!6D6%r=G)LzeTCZ{mDOw7~v3RMw^rAeca8 zpW1WMwh{Nl_MNd>^2Qki75*%9AuzwY_hq*Kl*RTQp)O&TJoJA1>&C%O0<5mUeZA@E z#Xx7{u+ruuuUQ<`MU=d5WcUbG#h6>-e_zqVR7dA9iEg?bGsqzn^5LFwidYYzli>m) zkP1J(m9|7}=x#c!wtbI0rewN%TQ+9+s#x!4kO3s zVB8mJB-QtZeDy(jETqa&uqo+ZC8hf?ZvBYSq7-J-=W-TO$7g(gVrphZ$XzN$OTSEE zv6>vBlN8FGiX1l=pQ~ieC2XOVo2!nbeh~(h#U#ti&;_k#s>>T0Az?wotsGV8Lv)iP z+Fm`Po0o+OYBlPNzF#{&YInwV524H-4)(Zqgp54_TnQI`^a<=I_l^_7oU$4wAXICh zjud%aQ}qY}G<@qfFmZI}$N$DLq9AAU2;s!C4lGE*JTkbS2%v~GLU+NLn9Pm*Sz zlOmy7- zvy8SYu|yN_;R*9uHja=ZT7h6i2~7T$-<2pSe(i>qaR6M8<+L9%8`n1CfUln*Gkjx& zEz9FxTU7CF1IVMb$5_H;kAhF|$)Nj{a;|@(gGxfDO~9O-Ow?qvImu){OX>Ya62~fQ zjPiTl@jl70L`h0(KZV9xHe8CBhUGJGof5SfI8EzT!K98;%S7}U_E#R@>I2jS=)_pZ zwf8wj?X4dv{~^%DWQSYBZ_2CR7)MPMrA$B$HVPj!erbRzP1uyIBjjLAg7s*^Leirf z5=>ucFSNH>S0>6{ae_4lT3Ta5L)?3CO<~`H&H(&X=SP=;{tfn>l(t4wuKrrCmcT8> zIS9r)%8MIZ)|23<@@J$L3J#>$d_t|DH157OHdn`9&-vAQe2Lr_Xk;UdfE*?pctdm? z>t>xb8seg4tPH})9hoElj-Y^H)+N4mr0Wnmr7l$2(DVLK8<=7 zEY;{~{TW@{SGG~lHRlk_5-i6N!NeG`6eFfRQo>vX!ipa#8GV3uoSad8OlM0eb=@o) zA#G2`BZa)SFO|MB+>M-RjcAJP=|S35Xvn2VqI(%l zdL%PqSp^W(#;RiY4^(lRQkbw=8ErXkqs)n($qw*2JNs_rE|a1>&& zca4;_W(feiO_=Xc@$1Nv5=)y5KWbW)mM$LL_nmd6m=|EjBe!{!?^R^VTi7l|NoruF zyuLi^<%gdD@MY@nbkx#Dww|SXW8}tJV~Sk7uUNtN0Q{TfzLSFZ)nz#NP&XUwLq1PW z+Q!`w{Ae0l$NLf@Pv%_G@hE-zl0i=@dFJ@uSjy&kqo{gtJxC4`d+sXV~diwV`fOzXGq{TqRCOWt1R}G4KuL%Yzy$Z1)&3QKDm)PR%&on%ZfJMPfu*N z`I!S-K(rQU9!1aOW?Or5yKQ=I7qisx`;zU4j@o?@jI_VPqixkg&^QGX+zkecbw$t2qGJd zvq}AxAjv7_d0k3kvkbQI*NnUhzk~j_R>SpD%7k(UVg3p5M3Q65<8nRp`s}2U{e(H_ zH!5;qOaC#hPZEf~uUO*&``*uTmOb`y;L6f`OfqnEJTPP9^aXCMWAE7Q>kczpxo|qTe9MD+i~i@DHeSneEo=uJ*4_ewNDP&=yh1i#8KQQ2I&s~ z6nVI~H%_BwVf$&e?~V?We;*I_yP1+x2P%)xyidKr$CeC6sM zkultXGUK#uI`x(%sAkPP{Q(+%0t9w54)i-HqBhahD@~wONkwp2(-!!ltitOt(mP5= zvmpwgnfyQ)qQ(T(tu0pFwh7Tpi-mWMAdDGOI`kEE;vx-Z!e)li!_M%Rki{NSg+?95JW{L@hUm%1b0Z+4o zaE{Ai_%xgkGb3jy8+n76~WDFCJ-XINt|t|@*Npxf@wGW zP0@8f_ZIwL$9?Co>VMnj*E4%ljaFSf*FuD#RV47spkY5kVefp0OD;@2QrbDnshNVw z5$li)_lpPKv<0=pj2iS^fiq`#H}acNBr}80QrAm3%!mcrmIdYbLzWPjyCYO?V7p(* z4OY($v}*TxD;(n{(h3*Wv91v6{5qy%YM-Eg*B&O4(9u^D{e+R{l#P?Jr^Ll~5!w`l z*vs%3zpWvFSn}xbFYF;gkXkAVBIB=q+)G-(f2ms>?9 zVNKm}Xgpz=)@n2?t5GdRpmp-_XAX@h-gptggqS^eO@h!IFSZ5b;So7JTHf+?S7FKQ3laGH0KT=RdkS-_`05y`m6WCwD#p@AWkNSGhMEfNi&m+1(PU!S0M8E5L zM9(Ns$*07UqEQ7G+Vy;UD;=reI{{p0KLP1Ny!`tOpMdl_LICZ*uveg}bqO!EH-hvy z5H9q~L%M2vg{i`(Pr>*XKze|*b)OIEF#ufZ6hXSsO*onWiCv)b^C3N@$cw!d?0-3= z%YP_vVPSuDoEj(TPV$hhF{$|sqzl(|9yA(4%l`wU-;#%PT@6BTT@e~7LBB>)Agd9P zR$Z`|hj@j7+MceBJQjWy(`CF8fGyXTmKHqbF+EVXu;w(QjyAy&eJ-Z!Fy?8G6$NPT0xghU&>ENj>D9cvPmbjj65<3u7FgS9wWexCE03*wK9XJZzf^9f>y0p zBb&blw41t-^PnDYs^|1;s)VNJLdFkZ? zN6dnR!%QHkPIlrEpqKBg1^_xk6_3IJ8GQz3qGZa04#wo`qtJPa-kht-TeXjpnU3$k z*o!_7(36A+Y9{4^*XrLJS&LwXAAPEU%(x)k7oC4IhO3vlUkS|x(`v#iJddp>yHA!s z3E~UTQ*B6aTFJq;@IIK)35Zqg~G)9Y~k07Y)y7QKAA5dn597@q_BqB zc2RgpeP91Kgbo8Jn^#7WXEB8I<%I6bB;%IqKH5d~J_$cSJc!zb=T)TG%X-Nmj$>ER zODjm|p{Q=u=6vn%13X_|F-<4kkF4?N2SDg`c%DG#zG&^V@O+Z0yh-XHXNYm8Ov!cU z0JWYcF8xkC_tn&NagxeVkIGO7Z;kBq3ET4YS)@+KSle-6pH7|#F+xa#@^BtPDjmT2 z0Q-*?pqK_jB0;~5@MLKW1`74&a3|VlKd4lmcDc>}N})Z_gkSox|D<;FV~ZgW$*P7k zNUFbUF&Qi3?k#rA?xD_fVm~?O=ZM2zwjHx1*r^Hqop^raLxl5}ui<%Q@6${ioMs+| zNd%-b{_#uT_6uBgB)7jE9yn+lk)pI5B7J@p&RyK-v$H?9)D+_J-KT=3v&it95aA@5 zju2IUhR_e6NB%j;m&~2H=cYmSXT-Q$;|Xw z0wZ#_3Gn=$^)oM#@IOJ|HWbu*7LUA$Kpn+31qY!ns(_i4k*?b7?<9xbLT-FBIr6Pm zN9(d^_c(GHa_O9vYkb~AfH(F+a8`779Aqlu^QyKSugBqA`WbLJiq9VzIM0N@Kidxz zlQy^DG0xWt`7ef>h|r1(MPW_dT0oLs!uX{97exA&*+LvigM>|C2`K9 zBX2X2_M-h+O_zP`k2FE{Bm3&N9<=Y=m$JVrjM=KhHgmV~t@QYIa^|izbl~Vq$|Sl8 zzv8QuuD;^+JYkY;)d8h%7~oqGa`#AArPlJqx{lK4T>Wp=V}(C0TDEf8!z;eC=Kf_5 J{q(zY{s*%3)^Y#< literal 0 HcmV?d00001 diff --git a/ramdisk/Sayori/demo.boost.txt b/ramdisk/Sayori/demo.boost.txt new file mode 100644 index 000000000..fcf1d24c6 --- /dev/null +++ b/ramdisk/Sayori/demo.boost.txt @@ -0,0 +1 @@ +Тестирования вывода русского текста1 \ No newline at end of file diff --git a/ramdisk/Sayori/motd b/ramdisk/Sayori/motd new file mode 100644 index 000000000..52f0ece0f --- /dev/null +++ b/ramdisk/Sayori/motd @@ -0,0 +1,2 @@ +SayoriOS Team +by pimnik98 & NDRAEY \ No newline at end of file diff --git a/ramdisk/Sayori/p.txt b/ramdisk/Sayori/p.txt new file mode 100644 index 000000000..4e3dffe83 --- /dev/null +++ b/ramdisk/Sayori/p.txt @@ -0,0 +1 @@ +HELLO WORLD diff --git a/ramdisk/ada/test.ada b/ramdisk/ada/test.ada new file mode 100644 index 000000000..5b59e6214 --- /dev/null +++ b/ramdisk/ada/test.ada @@ -0,0 +1,5 @@ +Put_Line("Hello world!"); +Put_Line("Test int print:"); +Put_Line(-3-2); +Put_Line(PI); +Put_Line(PI+100); \ No newline at end of file diff --git a/ramdisk/eao b/ramdisk/eao new file mode 100644 index 0000000000000000000000000000000000000000..30d3c71b1c3912dda26e3e332c77989d6ae8226e GIT binary patch literal 17520 zcmeI4O>Y}j6o${(<6?x{ny3q;A~8r^1R-5HX$4gU!glIJNG@&jA%q}|rjF|*^;hjN zN>HUPETl%pQhowU7W{xLL8d}15LvKe0YX&r!V8dCWD&`{?~I3rHmX>#%Q=%XXYM`k zJ@?L|@gj?R?-z>mmSss~F^S8hsHgS&%^cXNt4KneVtK)-mw?*9JA`0nA#&ZDK9!_irh#OM`~?kLsYO+mc4GZ;=GcE3&U zWq-4zUq1NY!_~fbIN*rx$R6%-%pS({R+5{tDT|wNjCnpBv)fxe{C*-$5Brq%A^om! zz=iY*$=+(JcP-spIrqbjox(v6e;jaoS1%=?1eAahPy$Lo2`B+2pahhF5>Nt4;Qu1f zvo8$zkGPr=Py$Lo2`B+2pahhF5>Nt4KnW-TC2%qbyuVScIvc)IZFp<%oQzl2w^Ra3 zKnW-TC7=Y9fD%vwNq!1=yt8#G9glVHRlY%QZjgI8hhf3q`x}sc^~-q7ef%^B&dvHiq0Z}wk~@?9 zES5i=xY~`E9u7Dx&^$ouXJ}@g&}>XJtoIT;0bh7;MJ%ztW*?R+vB@(YWnpgaiZczx zYtGC?Gizp?+05+4%;ii_n2N{7v60#G=QtTP5ZONSMEgiH$a6hdyu)Cj#~@bF!>Ojw z^ClDNFh3QG$u+i-Cr{=V5%KJh3)@ojHtMD%zQ2uod%Ioos#QF>3&rdCT+zKgKfhF1 zc9(PcV!;)6A`sWzy8MQzlzq2Za{cvA{f_arf?DFDl-un1Z4uMnuKC_AM86fr_2|hj zZ~0<)H^e%Vy&9n)+zn&p iC3f!O;hd3uo)h^fY9O)}?M3)e-4MF_K_ FOR?"); +} \ No newline at end of file diff --git a/ramdisk/jse/if.js b/ramdisk/jse/if.js new file mode 100644 index 000000000..1fea0ba83 --- /dev/null +++ b/ramdisk/jse/if.js @@ -0,0 +1,25 @@ +// тестируем if else +/// Из-за сломанных цифр, не пашет нормально переменные и циклы +let a = 5; +let b = 9; +let c = false; +let d = true; +if (a === 3) { + console_log("[1] [IF] It's 7\n"); +} else if (a === 5) { + console_log("[1] [ELSEIF] Hello"); +} else { + console_log("[1] [ELSE] Hello"); +} + +if (c){ + console_log("[2] [IF] c is true"); +} else { + console_log("[2] [ELSE] c is false"); +} + +if (d){ + console_log("[3] [IF] d is true"); +} else { + console_log("[3] [ELSE] d is false"); +} diff --git a/ramdisk/jse/libs.js b/ramdisk/jse/libs.js new file mode 100644 index 000000000..e7acd4200 --- /dev/null +++ b/ramdisk/jse/libs.js @@ -0,0 +1,23 @@ +//<#JSE# +//#include console.js +//#include canvas.js +//#include system.js +//#JSE#> + +var test = "hello"; + +let sumnet = function(x, y) { return x + y; }; + +let f = function(a){ + console.log(a); +}; + +console.log(test); +console.log(1 + 1); +console.log(system.ticks()); + +var a = 0; + +for (; a < 10; a++){ + f(sumnet(1,a)); +} diff --git a/ramdisk/jse/note.txt b/ramdisk/jse/note.txt new file mode 100644 index 000000000..0803c8799 --- /dev/null +++ b/ramdisk/jse/note.txt @@ -0,0 +1,34 @@ +Поддерживаемые функции + Операции: все стандартные операции JS, кроме: + !=, ==. Используйте строгое сравнение !==,=== + Нет доступа к вычисляемым элементам (к примеру a[b]) + Нет операции возведения в степень (к примеру a ** b) + Проверка типов: typeof('a') === 'string' + Циклы: for (...;...;...) ... + Условия:if (...) ... else ... + Тернарный оператор (к примеру a ? b : c) + Простые типы данных: + let a, b, c = 12.3, + d = 'a', + e = null, + f = true, + g = false; + Функции: + let f = function(x, y) { return x + y; }; + Объекты: + let obj = { + f: function(x) { return x * 2} + }; + obj.f(3); + Каждое утверждение должно заканчиваться точкой с запятой; + Строки — это фрагменты двоичных данных, а не строки Unicode:'Київ'.length === 8 + +Не поддерживаемые функции + нет const. + Используйте let(только строгий режим) или var + Нет do, switch, + Используйте for или while + Никаких => функций. + Используйте let f = function(...) {...}; + Никаких массивов, замыканий, прототипов, this, new,delete + Нет стандартных библиотек: нет Date, Regexp, Function, String, Number \ No newline at end of file diff --git a/ramdisk/jse/sum.js b/ramdisk/jse/sum.js new file mode 100644 index 000000000..92680fc4f --- /dev/null +++ b/ramdisk/jse/sum.js @@ -0,0 +1,8 @@ +/// sum.js вызывает из ядра операционной системы функционал +/// но по неизвестной причине, цифры не работают + +sum(3, 4); /// Должно быть 7 + +sum(1, 2); /// Должно быть 3 + +console_warn(sum(10,20)); \ No newline at end of file diff --git a/ramdisk/jse/test_path.js b/ramdisk/jse/test_path.js new file mode 100644 index 000000000..9119267e7 --- /dev/null +++ b/ramdisk/jse/test_path.js @@ -0,0 +1,8 @@ +/// Файл для тестирования патча +console_log("Test jse_p_atoi"); +console_log(sum_alpha(3,4)); +console_log(sum_alpha("3",4)); +console_log(sum_alpha("3","4")); +console_log(sum_alpha(true,false)); +console_log(sum_alpha(null,undefined)); + diff --git a/ramdisk/pkm.gb b/ramdisk/pkm.gb new file mode 100644 index 0000000000000000000000000000000000000000..c602e6c03732017d969c308d4cc035eb562be048 GIT binary patch literal 1048576 zcmcG%30zcF|37|*SzuTO22d}EdM~(){^?Q!Bl`1tD}}r= zAz=6CIRZkS-O5rn&4E-k^ShlpfUsUgX$+-FYUV$7-*=z*k6#hL`$RbIqZs}uby*JB zjqwRl~a(TdmlEl;*(2j*E(aUDCMKnRw|l`p(6A{c05VxK6gIU`^6WZJ@fa! z7vJ-c?g!@=pFi``-%s4ane*q)xFdfaGk?Z(x$X4v$^^AiaSO#X^h$bz(n^PMlrOo< zwr~i?=qQ2m-}G->Z>%HB#KrwJwGRTh?+Mqqbb+#?=bSRwaVjs=@t3C-Oj|f(o{7ra zKby+4%%$=M&pwEMwmd4YcgpT*n`cl6jhV82=9#G#_S|8V7++wZ(XVRoXy?1?KDqY)9uyB!P`Rc;QW`8_);Jl>ycP>;F1poCc&o2xt zA659m-HVo8D{>Zob@!or3YWZe*PD00zRbHk>Yl+X?p<+YMPS7@E2%p)OaHjz{l)(- zv=)rH`^QyB3VN3JELUxMcoX?1|4Q!eT+J3~QrL=FwzC;rz;{2-Pl?wk*^FuY*$j5{ zImb+cnp666-0awMj)xrYI=_u?9in9?oU7=i4Ka=vQ8aD_K>3kFQL0uhHRhb-UBubp zZpV*~t5#B{l_9?;88P#mqqOx!rP$VGIdxRc-w~?`XLsC-3dETgET?k9SrlIBco89S z!nt1h)EcdLm&jbw5flDPSR z6jyfplF#v_vT?!Z+6`8a$*8-$;+uXYe4`e*}1H zk*93oRCJo76p;XlM9}>mC2~aF!iCXVN3r23z|<{1qet!?Qy|U-Hg}3fk4YTqIc_jH zvfh(sG2vVos-}lX)d(s`Fj0y}P(^}TiDlGW1cC&uv+P`F26F{9Ac5bixsas+N}(u5 zfI26I8IpN-RQkXk7IU%K3*3A7?;^YxG~s~cKa9PA0gLdpbA?bB*D2&qHgxLUZc8UR^=`L@$`|kME)Z9D7qZrF<4LB__;+S`Pa8q=ESCKX z)6r~;H+x=B8-}vQo1P~E=K_ZFwDHd>THL77Zx~IFLsj{t0uyRG&gk*I8sCvd-?%ds zLM`1tEiEmE@nRYfupJF2=|-Uzr5b#|4i|{4Oo61Qfx3yQ7|t5!ZAB5-C>H zKvLWJ3-K5{Rm>@;1}I7aCReN>FygLm-|B8)pD)&TZ_fAK-7W6!E)g5Liye~;I&o)r zyQZ)|rJ<5yn4dTK3cEM@R(0DBMVQ24p5v&aQLf|J8+AMrs^dA-@qDO`{r`(P&?xXo z7ax}EDC;I|uLd6Fqz>Tp1nSt(U96!TleB+ndMKKnDQ=XDZM{*fI#g^Mif#WN#rTbJ ze0-Wl%m0+CQM1d+$lCv1YYS76tu(7uiegmUAsoI(`NL`Aif&7@?I%Vo?zVJD1MFlC z-EByfP8-ss4#NqGYp9TrPEuRv zRmOIb!9;Qq{GD2|!r$c-!2|leJWwT|W-DCbJKcq~{bMsh;dGaU5p6mKB#A$lYxPBS z`KWVP_hdFP;b%dOcYz=U>-c0fN@G==oPl=9RyKtD&si8ft>)Xb*^yRKG}&#tBMy0% z&O73AJ6GUuQ5;D@-%<^UlGYH1{+QUWw8rBGbq;ggV$ZTu$|#*aAddBvh~qrPdTO_V z(ukuxw%-P@7u&@{-35w7^%JRtpSn&G?(G)p+BHHgww6|_)hV^&ecgrP{n%vdx=lU) zy8PsX)EGwe`fIn9q$`H1neQ?4SknwBviJxl?a}UH@i7$n8;U&Mja^cT8u>3HG1Glu zn*de;uu6bc0cWcAe7GK zJI*uly)zcWX!*Ee51&EIq@$vZCk@IpIsp_X78J*QMnlDDD}=fhuU*Z26@;DO(J1>f z#uEm$nz`OTPLY=*YFi`~6JFM6!m%?@q7d9-!f_NQMKj^$Tk<&ttuAlO$H9WL$9u-o z!N#=|3|90QEr!_9#vDWBXyb84J-XtAA=104J+36BAM>@{yQ$ZoQ{s>|2zB-#`Og%y zc?&kB(NiEsx4gp8=mdX1Id+*Cwj!E0MrW(}xaf49Xl#~_fRi|a^_pe3*k!!M_O5(3 z-D6x^V#Fw`PIS<}W!Zb=EKi$8!#=W>kX5(WA~)6?JhMq5vieAoVaE-sv^3f;>bgu7 z#|`0W_|VcnrUC5;`obvVi8SU6X-&_l^;6W!^s#!QTCZl6^T#R|ja4olt7OJ1SB_N{ zjtwXi$0}!y)hDV0L=qU~k@t#Nh`Cvgw)LZ@LeFS-Am zL@&20v{t)OLP1gDJ=pXrMLMMwi{wxkrPUv>Y2tN>!Ii+NLIr*dG2WuG#U!d*^4Yeo z3`Pf%R~004n+b($>ypAxW$MZ$1rsk0_Z0RD1smGKdWXF48}6a!f;iqtJ=>R>Q3l`v z0B+9%Q2KCjgeRw0d3C>UgojQ-iGIjBD`!O^D>sx?ZZS}7QFq1WQYnnlSxeck&rH-8 zcJpg=^i&jzz zftQ+pUq`0^M9nwo=mhjzPVCmv;Yd{S5wU&4;b0uB-&!SD{qJrT-enV8$dWb07FO&| z9bM5-%IUV13}Sw^C$}r&T?xrK@%H4iaws?6-mWnvSA|kZcsB_nojqXVU)Q1gf*U;- zKIOs$mtFt6LuUw1jhz)*g8(JSFIG@t+Kps*gikjKZW)+;-^Tw;YRK;uOy%wIy+hvX zt4k58D;{-K#3yhG@-)XVez{q>(9NJd;%HFKF`nXbh-|(7{IcFylXl?>uTIsLoSG2& zElp7LqqHqC%=dOHxJj^$U~9l#5Kg0z(G%L7!bF18_ywm^71$)gFL(Hln8aK81I=tU zpHYDw6VG-#Wn?OZBbH|21L1wtHktQj^S*8;7Qg%P{26y{tZANT9F&Wz*9N3!0+N@%yxVcpCjP_OPU5zNf$M z!CqIg!yX~WA2`^2Fq}&ED2Zb0^Sbfq8R5bo>IR+A-yY}r&aSVT!ctYVPT%}E`PS&E zJbZh46wzva7VUL&%`(+>e2xU$EE?4%JWOgY?)D|QgVhlV;`pbp7zEr=*37=EK(b>5 z4jOrINK3`ty2#Kj4fw!xfPnxD)YvVqN694yjsD?oK0DrFMrflPnuSn}9Lhtek%WxC zH@l6#x4L`8H*tEr)m^MV)NMp67)wKJzTVocQK1Q(88OTiqmK~(5&3%enJ0v&Hwb(6 zhtD7rzaIb71^&H-2n93TF-$LEU`tM2(;I!>Gd-Z)`nXe8jXyO$1(mV!h*G-P%mCOh z(W{S>w@c?WJx&v2d?KgXin>zdU!$1F6l_S>FQg2H?E^=#ObhP@^4n3CyzMefkPou;H zcyYGZ_=b8w2Wou7JQ(tP4fUt~fxRP7t2O$TbyxV7cZUd~E(+a7FNm6gznkI+<+6g5 z30C1<$S9akFe|<{y7>c{;M#8D*7%EB5E|@qJ+(hba8pnX7cH+0HS;6nC`T8+fs(mA ztVvngWMar}%4aluVH()15DqTX-6z-Zp-Gc8mXrG}92}KiaEh)G^F=gkds~lP11PuBWV~25o2+ zDvA)*8wx0F4esGoZgpx8cTZ|R=67*VS1$LUL6KYP-C$ufpws;ZD>j^s$c`-J?oZud zF=*(^+&x=Mv2pC|u^Ac#SUmP~*OLBJQhBKzU4F~eBMx?75gWREgWcR@GB<7pREB%Lzle=+#A29zn4r+tc;&k@ba$pR+JBo3IACFPIB9 z&=|~i`m&ttP-jl6HB}ttypozG-s85Qvo7FkvEw7l z?wDmr)Tr1?galcA8BX6O7m%d)21_9);c?{9+u2Va00;l|0~!^E*)wopvT0!Qdu}F@ z+m_1hOwDYvkVVT4k_V9g($rEWhwR)#sk$)nM3+>Q9X%?Vjv#R*;+PTrV7F$9tuP03 zMwUZ`T!Bt52G&EKxuY%ucd=ZvRyt-FuRpq0I&LuPGuLQJr4J3P)Xy+No>su-DpDx+ z%V~VgWc_g$!dO-`&7N|tPkS`&5n9JCn;J~V(7!;5sQ0+*GU^6z)5nZph>m^=k#^H$ z{e!$m5k;zSW64i(oNyd=yy;kH2zQh*%1nP+vLlOE^-snhHtWxhGDEy$J);-}2$Gw5 zmG90@v-iegy&^9P$!a7!-f$dmznW_6&PL)@$NJ_pyW+SD6yR-Fh3_2~7O6?<$0-cM z%A{jllwok0G=$S;4=9u7aFN+@Wzu6@RJOKEdWMV64&!2Me+>1oKygHW^wF5__VmUI zwI(incaGyWQ%z0HZeb^mSDdT}3w200`FB>4@J^gcI6n^X|L(8f@iGaV>d)?YnMC7W zC4p1@-8Nr;|4y=4{IyqZ5>6D^l=gBi^MhTnLt#ygDm%HWsF>BJ~ zygTPFUB0p~pomX2OvswPa5)Jjr(|W{iUO*b0fPpo0c=hnGI_$S0YzNGz|^Vp1FG15 zLvEd6TC_Nz?nfsxY^rfgdLWQEAUTD}o)J)}^`wf?3j)!@`wyO&6^Kn9GTbl{xQ&~F zD)b4!G&OzvgsIbJ&0n-+WnduCzI8@GsKplW*9N!14YGD~YLCYQPKPWkZ)n-woD1R~ z)WKg3W%^HomYnn-7ixpMX@hY3387jOA?{&yNsETz%Y zt$pEW{caMrS(ztq73&l#oK0LMsSGlk?ObjTSDu=~=O^Wq zdeKZ$54SOut3*6=qa0T=m$*%-+!G|F!hR8{Rk$3kN%!ydaOr(Uovg*=u496RFA$qnNIQl@}mNJ-d{WxNN!pe9i@LHnO~H&>R$bY zF8SL{8fvODH#Jo4*je3R-nGTtP`~A=>L&B9`ln8s|MoX?^`V3B9IrHczcPEK-@(=; z^LYbT-76Ox@G9`iyy&%yqui3J^Oa=oN8it_{N#cB{%o!iL9hOU}^o#wAjTZ-B%o4h5ldP_ATiy_f2+|`EGR@G5zYxNU--v z13F(#k#wJqPhne9+G+@?Y5^Dfo!3}sEWn|h-?RFDJ~hcpJG={5thyItxcdGy`eQk} zM~-{x_kzHP=JR|%%p(1w*NCR_jcChcTQtzC@V4SBIBd_R$bD-=$6A7;hAcS{>|hAk zt6wzG6G8(un|fm*-uN9^j^9jtVGbHWDWW8W;G$&Iy1^LT7Lw*|8)Y>0uth0QF+u%t z9dbq@PPaIzzahE;tOq|U%i97tPX+HvaLd7{?eWj*8e+G{J*nT5us`vQe*5~Dd5r~V zmHS(&2W=2NENO)3hWjzTzQ)l3xkZpFd9-9|)pP%9te6l@LOV|l+&A#GfgcVm8`w6` zIq=(o*9Qg$4oVrHQkL>;iq(i*P0%w0`cy5Tyls-Yk%L2%EfU@6!@$gdzxjANQp)8FU<2U5=4l!-$ z72Ye1VScpxPg**zQ5%JSZW5aPf43MCb0LN8ZoTgRsM!CH5`C2-$x06fp$R2G>l4S) zH?o_lBuKJ<*J#|2j(%kH|C0|cCZxD%^Z&Eh-&}(JwcLbBONswf@pZqg#NS%%Z$r0R z=;!^8n*f|8ejWgyl=!=f{SE*)&^kdvM&o}GNK-SP1!?s)YLnpHDDXELZ@;PT(EcNY8GQFr_Q&7PrtPw*rm^`G7-blj-_oTbBmK1Vn&C7#D3G_ZLMx;Sy0E2lTy zx6Re7Vj?PHiMEo~RD_dn|G8L~RX7io-g!XvDy1+sX-IYiJ93CY$xa%gPv5PJ!_*VG zW-~?6)X;59Q>N0dQ5BnM#G|SBEn{@v=tn6IapbC&zA%*@O8txE^HB5le;yy)*FqkQ%1;4}|8RMb zAGjgDpPGICX6||6BdhR_Tu4>i1f-*Jw8ei;n0`{o_Tf~>=)lBk6EdN8lnYs*#fA>s z*V&b8JDhd}Jg)z^FV*dTSD5Cv3RA@cE(@db0};Mp5bqttD+ci^2lHWr`Hu(lRe?U_ zW9RbAIsaLUL1`7v`aSs06+FDdApX=WZ)Iqv)V%UeI#!BcBKU_E@a0Qj|0ul^8pa>* z04MLiZgCbW#8kHoP59r>Q1#izQ6(k_DtQyzpWU<@YUp7`!DJL>8HL$)Hip%xXf>O{ zYLqupbrF~rHS?35rGvRFawiM3CkwMC3#J>nfj~f#u3i7;n{QkKes@>x&dbY#iC-Ro zw{i@LeuZ$z|Bj&WzXfaEaLi>G&5$&K#1pK70v3CfUj^A*lrzzB1yFvIlZ1Er@PE5P zc!z(MZ8N2D>AB1w{!zmP0|dMMw^8&|C<(O2BHck zna@f!^y9~;_OP>@6Pd746TL`bzO>zz>JRjiq3jkPbLILTb1|Lb-w^nli)kSxq2vvq zJyI>;&SJ;`!rH1yv_VjMmANiolnYQ)wgRDm|VUx)ix{( zrV`G{+fq^H1_Bw3b`)%rUMsrf6**^);Y&><0kGlx{Vf>0M1siki!$o`b9#W93i zk)VsXlNekKNtj_3_bIGPXH8F7xFL)(xK(JaxUAd6Z%fNoi=AD^JIb+j%1{p52U`bA z-9(l-i)9{-xlyxZjkBe9LTBBBQSd@rE+_Issc4#9|5!sIA z!RE@KdN7GUHd_oaR-duiH>%k;y4g3Tnb?{P{p5^0ttbLqpsR(Le7cK7!I+=8Y1?Va z_{W#fIv|8l#wuD>#`~7|Pssa>))VwmpRc3KXGdR7cM-LP=;+EtHCOsJ_r%*noWG<} zMa4!3q;OT@pr~kFtQ;B~3@J1LNux@L(Zvo9NLpn=#-Qw|=oo;IFbNWH?ZxjpyDr&z z_h$h~eG9~uaj0T!*5oNur%gvn+R$OcN1&Q86q%Tf1Z8}}#0-FhDdQ&%A|Xv*07-HB zi5ZguX7=n*`+%lA#ynsz`8Z5IJ|!Q&<0FDw4nk-7ytjA@a$?Lj8gS zsEgAmtsuzIzP#>&vxUWF^}X!!z2fq{;o@tDgJ*)A>O1HvBl0T=zUt!F4@V}-if_1J zXIHXuuk!m0B$984K_=`D_{{OWNgy#}_{_(jgFOu6I6r$he|{MKy^fMImC^KXjOak=OeYjqisTS0QbObO=qr)7x^p&sp zpwuqD?#czRuO04t%>{3U*InXku5g5V6?XA$H1m$D*l5}WO~XcL8p`YnN=b!NvD6Ui zHmZ^ePyt0i83+%=28IM~3seRI;+rlhth3Z$IdysjQ3;$GjsXu%5*c?Q&PT8xj?n*e z1g&8$BlOl0n|y~+`TMR7z7Jea_>Q;+Q#bH~TSsp!|KJEmRsmG~2)u9V%PT9zh;D-( z8UwWv1NE07Vm`7Kl3~GkV_;2yJPxC~72SCcqXs zOk2Td#lrx7-$jRuA0TkVRlGr-@e0QjCXAp|Xje>le1^n7d6N8*a71gb@wZ!(Jmimr z`?@^E(1$RFg8wrHWD0>yf!uI^PjaxQSq4WIF>3HxhQsc7qbd1~_=KA~!C<{(q1?P0 z&{g!*t}iyoym7K!Ugt~%(a^-b3YEXCn%NW@r42qS#`ry#or+LJhec|13avUu85JH& zP=qk!tbjPO++%%$&5e%sjgy zjv~y9Y;KPt{w?{p`noeV1dVV>_b>S}M4~f`@&87(e<`{yJYmm!*?8O5L5ijgqVL zIiuw6eA6g>+WAi-Y+{A}y1yI3(o={@Ma4cwYHM*rv+u9Vt&yiXt-_mI=txUKZ55K# zITl9L&PR;W@13hAN`G|TH&MFYSvgU>?vSJI9;GFExT!+|zZ_fxtWv0y{f$!1HSiX3UeL zYopKL-sBtU)^F$nUyTz9dN`q0s1tUk-Bh%<l^Omuir{vfJao4oC+{qIHQO;!L-A^A!mLBZ8p(4k8zgu zMxI(fivKmU50p{lNL1(3>m^0!o9jWD!XA~BovR*$HskBRN$Sq4eH z!thhrKf-Y9DV}26n_J`t9!nZ@%4C7*n)g-9Xha%nR7Hhjo#JaBH z3WT|sU_-=J&}q}_v@maw`SWjRHo8&p0F^KWp%)orMgQ~QQFxp3b|r!2vvF@EV- zw09C364In$Aa}`k#ilcZ2`6L7Ua@WRr8_tJ#yjaatVPVo6@KHbm*FxvW()=v!;8f; z*6kbPw!++ilzcJMxj7#VTRLwYn|tEItz*k!CjeTK5)_i{Lq3h@=3zA;_!`(A{@+>N zAdEV#!nd!BSXYj^Q1yo{{{AewAA1k!_D9gAWTC;LI8&JWL)+n49qZ52M0 z?G-jY!;ydL*0FGCoPNK_QO0IE4Y3vNN)ymJeqq7riM9o!D=eK0MrR6r2Gf-6`c{4VSm=AKzP(+xSH{2?MHa@Xp<~g?$gv?4Un2djxUVb6 z#P02ySaDpo@Y9iqWH2hEm$K!d>da_sZuoMVjphR@9k2AZH6Yu_T(61 zYXQrU;p77L%U6FhSIR%;;P7A>V5YL1eZvGx4FS!vvtFAV5~Y>M1 zrMlJ(vHJ>Sed7I23`gwXsk%rFMJz|e?h{EtJey8<4JFbNYGSQQzx}%DBJ2y6A(#$=99*pWS7pftMj1KNN zRP7~}v*1}o6cI2EzZFd^!W;Tr`~Q-Ca|ZFZdmZj^yYoR8u|0E~b`bT`ix9hs=3QRv zenK8D(o5tQ70XAh+-#rZ;(Mge;umx-gzF@rfau4y9 zUF&$=pcE%v@cJfQKn)1lJ^I2fg`Ui#SHHdsmOR^0%5#M@n|{IgP;t^_Sd%M!i<~&_ z!wmf-6M!u58N1=#=H52w-DTVi3jn_X8yig*hv>A+Ez^9HMfWfM23X(X+jrJ zuoJK^efhlAXXd%v$${jDV~SNc!goy|g@{v1uc8@gC}Co!>IyPt+AaT}(J9b)@%aKk?|pDAdWnoeMgChm+HzaYBFPG;g0T&RRT;9^mMpH=( zSJ20yD{BPnTIbs2+X?o!9-_uB@USWm6blJmxiy7JM&B5|!Z((;UA(1-j6#LuV{Zpp zVvR0&iS=l-?3@ZLUAF5M!fyo^8&=o1YY1;ND@%+5CDV#^u3~YgtHdtWBd`mB0W_iDubf* zM$8ZY?nIr&HYtnK!u#|0iT<6Slh*@D5GU`3w%TM&mriq_`()Yy6 z5DqY>{B@2jY^x;WS(T~ctSaAYJ3VoD3mrE66#PR;W>pD}xKEwQsHDG8n~)4kjrgf^ zGm`wZPyr;+JzSs^DLM8YeqKhV#4pJJ8la{m7Cc# zamK<7lYKG7@vdAp@h*j0rsTJ{WMhMVX7C$q278N3|K&q)2Czd|Sn>q=uQzq$XxAxi z^^^4nJ?w#iE(}4R7W}s_qD#~UomK2&L@0oz6x3@dzR76&u8-V7`^E<{=!sk+;qL+& zwu|Xj-)J{Gxm6JxL3DHQR7W(eRS_LQ>quNl;@Pc=n22DRi|NqW?RJf8S7h1wDH(7< zn3nXBjzSyo7GLh|26<}7oow?YdaAm_Zd>gP%n2h7kxHns!HgObv z4RkpV%2FL$wNy{-P*5sPWgA87tCq5eRjF*-=}`WT)p}|#eEpFB+W`HJ)huF+3I_R5 z{(+TxX0HOuRyqH`N*1xfB;Qj2-)3U}$KHS2g)xOY0&zat%)`_RvTNtHS%g(3EHb;9 zhs`*YPJrMnx=sO#O!6YyZsf`E5Tl5h;0iQ{mx-cptE;!Fxra42TaTq3OG`V({OYw2 zo=W94&KYHT^wW1f3*1FqImqGs=`Z6jKRs<8@fdU=QT&VJ;2r@r4xJ}{7~K9OgPc9^ zP-a(T!J%t!h48fh>0x_jv4ty$iSa+tWhaKL7{|Z!1K$rh27PKBLloJ*n|XylG5ffzmJ+M?3^srk-H9&kZa}JcH1lUwSiDI z?A$K6eWS_ib|S!hXz_nw2=gBij`}};e{Kp_MAPS)pd9_#k zb?^_U5dh9Ry4Ut+=SWH&*b_5Px8V zAa+fphS4hM<%mU>R-*&Vx1>C_2H9CF$W8QwoFDD*{^sXQ^6!gJ z@b8aLD3^$70U%`sJ?wE85kd;RJq{N4U503_!d_vYstjZ$LD(-m!@rX~xxl}_(OBT$ z_iXl8j!E7&och|9a-8oIB&8t(XMColHcW1-faXU5E*bw!#$c$*6iP&(S5ehM(nrdPofeF!(h%!U$-Fhu5jwIR*=1X?l!X0H2>XDJIKnOC;oplzwNKdV-!JUriiBr4 zrHMb04KHR+4Ugp!Zj*n1m9Rfu?cbLJfXKf@{reaEyV)STSUk`Hxx{+^(vZSDiS~ znTz>9A6#!%-y9<1%ys&Y66HWLWE*h*L>oYl6z3p3S2Q?DY#2u;xd`E)NVE2;li^H76 zKcI)`Bn*jH;534@i9A{fG2t?SsE{r}@EhSQ^~wnTuV4&H-v}pnskBeZCX$-bX*Y@K z&JuCFvpDmIGB9hQaHSoB&yU9$T6TeIhDu7PYvw9TVPBN@D|RnfVWGAef1yn5Vj`-L zd#(y!Gz<)2#(NNy)f2(XE?xyZG4cksS%s&`27rqg)=eo zthvbAzgyTJ4c71lgr5ie(}xY=q!r<5yW@$D%&YihA{>w49_7=Pjx<6{$N@kk54|PV z^Bvh&SR2GsJp6<~qe`NGC9bNnrI`53MsU0$i-=Q~av=%B4y`2I(l>&Ma|yF>w#l|< zyCxtG?6P!lGaxK%kOuar(lt_KB1pp{cBuR+t~j>$Sc%W>-P8?--3^rYaw%~QugZk} zuM7tmWZrV9EZ9NaeAg%!gmb7%vg~DY@(3twW;-}#9AwGg7IVs|}(?dR_%J@CzQ zf?(2++y3L)YisM5ZCQfBC4&+n-mBzu@=5yd4PF;V<}oFmE@) zd+_(?_d&!-dhnZ+```Ja;5S*ddCOLnS`%KqZF^0GHZp3*lTX!>&PL#0SVV-9ieM;; ziHJyzpwj+wiOv_-B^>b;IDM;l;U(dK@G}2;M)qjY)GfRu&gvEph_kzem;a~U%V+BL zzv`RS?LX*)c2&NH_oCw}4AJ-VTsStyqL0-JY!%i8s$TP^rJvrDF>BGVnTIyhXYYUO z%E+l~rujf6JN(Vz*=N6561Qkxvhi=JJ9aeEmufdp>Nji3Q;Ra@tZzv?{q};{Y(>94 z8M7A;o3-TGZL`cT{r*(=8`};o`f5+&v+OMMTU)kFIDRtw&3PH?o*q^{Z^?r*10U9( z3pXBDn&oDke zela)qdjA)={2p)0eVpOpn&i*8+h6|Xu=Z%eciaBB|I4LIUz<4N3H<<7^!SYJ{q}!; zPuTpT%N<)D`t{*6+Q`OQQ$gkK?WJvZo}d2ln8LuhGhg`Bi>!g{hYnbm{<3Aq{QJ+G zy|!|~tKCQZhM$-B{?qgI`>*;&w7nX6e6055)PqN^TEgS&A{IPr?Kgd)wk7VxuvM1% zFPm1--@@1Qh4pt`%iC8(erS43-lF&^>Z!PQMJeH7A^))7IV*6$X0Vp2^uSRSmW~Ye zovDnzN9-XgT0X0v*zEF!ySzR8uq-b$7XucoNHq_*4(?m}L>Tfb_L zVs|K3wLq3fG{L;8yYz8Q3JTH%fgG1dWD%50=10+d(hT;PjjMuds7|Aa>q*VQ!xdhb zQ+{E`wsPY&adHCx#dOwS;~pzzueRzdr)lCKEy0J7j)RSR>h!5IW}0Tro-_CMJLW-1 zCWL$g#k~iKmLEEUdyc)@}&XAj_8rt1_W6r+h@ z-ys|_zjr$Q6*MAn07Q}C{Q^u+4h#aZNpcT@^`gd;3@$?T&Xi_$)=#(nyc7ifso5a# zG7y}H;FO443_E6MDlTXx)P4h7MK-9P;!=06+Zr8NB?hX2^v zH`eOm+msHm5fg{QlBfw-JTbC#l_uPy!?o89sqGPkKs7Z7Ip91mxw(if1-QQnljD8` z6~R@)u!y4#i;{h?73mh4k3ROd$4kq~pV(l2@9;D0mB|ZLiaklU?@fJm z8*6ISzZ|S8Sc`e*j-5@_JI#&tJNKK#!V5qODrzuF(Xd+-vRTVDIt)k9!~s0n``wDs z6oF7=C$b068)D(>w)cX9rEtT!@B*zN)(+^A_jdsdA};xfr*K1@3X{XZkGQ@tHgA|& z{*?jJDQXx+^`l^$hk^co`J*;dN;Ao2`+oOR)Xl%M{;R0gOn@nhPzyi;0icA2^5nME z@}~xM#t}Txbg+H^BP-b4jT9vQfBI8b)!03oW&f7iYI867F*jCit7_QsC-BzledfCQ`kj@HP4zpg%~d;_c5JP0 zsy1)l)3CF$rn;)uykkpsFi^F(>Zxk1f$ip9RSmWKp9!XJ+f!Rx*-(w*4b|qls(qEa z>YH}d?=;u!-vv}dk;XkYMM7zt>-W@dt!~&{wRL;7c}rE}ma47Q!AMiho}D*xh!^+f z`n|!NMwAJL>Z%$VYl6Y2>uX`Gs1HV}s~Va@>D8!mS9N7W{jO?rL-j5gGwN%%R#w$* zhEw>q9Szl?E{9qR_J3~`8Q@^JW>@8&UFKa47>*q~%{v;34-Tlbr{*4I^6ZmVx>+)-<;sjl6zuP@SAy``bLsq(4n{h=AyyyL0r%BSo1Y^ebr z`zoupY}wOLwPnA#wz_ItsAV*>RW7k}&-U%aaXp9$ncJ=Pn0tB5<;iKNetO5#!Ep}- zx9=f^8+TQ2xo8d!d$8|hYJ#Dyr0+F5n#^13(XVZoyP8V5-`Lq(t1xA|fJ|`j7?*;xxVVD zk1DZbh&gFTQ+3_89b|UR7^z(~m5p1-^vKJ0TkRe!yxJYxf}>TvZ`Vb#&`Glm^;^x` z>+6GoP_K{_92a1O>PY{BAu{@X3BlmzYun75f7@opFGAP1nZ<49|7UMo?mOr-E z?6kbyM7-Q!TM0BnsIu*Z;%~RGtAC4sS7EZH^U&Oslw=?8ftFLvyXVpmO9!$wy|L|a zbXad}i6?PGySgyBw@TRK9uD%AH*%!bm=6#CwIu-d?=I|b^EbA~ZI4g$H?&7=Pl->7 zRKk;w_Ye(^{Bp%ccuYarlkXU@xvC{TEu{kDztX?wSXz9F!(=$MLD=oz)gC8Nr&v^1 zGF*Nr>wtU%pF05YX7@)O>yu~^I0}vAqk-HfMU$#te|(C+0iSkVl_rw?&s^hI(c}UH zXA@>}2I9@h-Y?sy$&)WohNUJ!g#2JBTh*#J+zykfZUSV>})YWeN9@$=wcBQ%Kvx=j8H#~Gz9bH2?z zj~d?MztB#VfaTlNt}HR~kKAEwS5@`;4-30Vq(TlhY-$fLu}+xaZ0#q?gxyyh`pdUD^qO#}!VF;=t$+7! zp|MQZosFbH$tjQqk=D2yE;;K`Mklw)6_AEog5?|jt9*l8zTv;i8~hC>|L)PpvsIdC zI!vQ1KX9zHeDrAlF8#JUYJx6O$8c5rSgC(kjudz5wcG6$4W*+DQ97(LgGv|9Q6@W< zOBkhsv=c`$IO(eXM-)nGFnd+L#ofdN*A7d#H8r;s`j&<+sO5t)H+d&!#3ZEM1#>Hu zsR%i`gp+g|pOfRSGr@)?+iA#^jjI*HzhI0azDGpGP+ZcqT7@gB0bf{)onL?Z@D}pw z5R-uim>jtEWTjcW3I)wRorDFg!m}58EN2xLO>3>b@D^W03q8!IZ4u#fWWohJSYRue zA(+|ll8T&C2`>EB(zFUZj!-H_;0*?COBI^&H|2{No)a7et#*|!{FJ@zivL3X<;^86 zcK-!OR&EWfFWX8ge2HCTxs?#Vj6-JrbMyI7)KPh=(rl8OJoTs0ySkdIOcDrxdV!(0Ni-U$Q}e zK7izaLKQ)el$z7^1X^MEZqz7!fKo(+(TTwXJaz$_yCPaaEA0a+zFijK#kQR!54Bv~ywY$_d^Y)7}~_Dsd- z%)n5@!b-S^)KDv`5@H0b*zL$Vs~VO%6xKkK5s_iIfgDe)3O$xnWAE(4N0PErQC?Lt z6NT_FN&1-fh~wFY(KAtuLvHuGlK=PR{|MT@OMlXGWJ)9AJ!ck+2dYw1?qaBz1NYtvaj7 zPAI5wY+%$|CAAz?O?V`TQD}-%N0$LGwb~?mpVKEyER`L^C8NS2b-q5I-RBguc-fP&Lds*b{QL8DDo&z}5*3V4cvo$Z zRE5Zg^K}u(iIbXxk!a*7rGP!S)-ccIrMzuEOLt{7!#|krVzc;((9CD?a?EC%qb zlGB*r6Y9UP4Q5-og`zjQk_wzR!Bo^zAyM#?P~j|(FsP+ygTh{A629XV3*=&$4F7i~ zzpttk^rDZ_G+Rr9J3#Q+WnVQS;Nj(_s!ZH}=X;m3(^@rQx@dAVKG3R9ERRHRly?_FYY8?{n+p z$-6Ys<x^%D^h&^JaLuO5?4tWNu2D}fa4Q5J(BNwOXsr1I1fj_ zoRkkc&57)Agoxn@pab2kXPGS5V^H|B1vY?|7#N~s?=#;JV-Sj&@P0z>@$?vCqKa@- zqE6emg3xmfTm!-39yh^3aRY~=Hibe1=e)ln12#=Yr@w8@Vhr1#2!vWMHl(7C|C8pQ zKab{>Xx>(^2qrQmnkOD~or=Y_#}+|&W29VbJhApbjU)@XLUOA`4>;7+lXyBQQ}IT>?|WwBxmq&*@|W z^*{R&ECqx}Ce%KdG5(=cToRIEJ5v_Hw}(GnfKFyRZ7GWyo2r@`Wp_u&`;f@wp*A>= zpIWxKZw82|>=G~t8W;`Nz{MoMgy@&iBGZCa2$nw(EMsqKjOl=COt!o9IKV`VIhTuP z1#f!flNesEGIsV{D_5ZyPc8r7kbS`)Ttn7Gg|dE=Skq0O<&~ZM=W6%x9VRw5C0Ch z`M~Ffz=VdXI=6sb9rC}csu6|gF1 zW5Q`QHx6H{?m?M+gs2uCG%;Y7{yG>V$(V6wKV?k&-s~0!dWq`VwnMA}MnWOvIm*Ee9kjhfuaCLX~&8Kxa)|k^tT!4?j8mPx(FQx+KN!%+T!^*|1$)VP zA~QPj^-n897#&TeuCo6R1U3Q>@eOxkd4_YrrJIO^URH>f8C(4Z%sq{hVezOFPyLT=&2A1%FA69MmfEWo>3 z_4lnLYi(6)h=}iO<;SgLkF@erSF)eA@{6!`gp<0#P~(u22W_E}WLaZMd0VLbnZ83n zA(uDE8D&!D2d~H=7VYaX%}#j z0ExS5tM;QavZ7c%Qs*s%`kS1s^O|;PxM{WA%Lek5mR{fW9 zU{kC94>q2tmg66pR3wI`{?+StTFUrr!VHaidvG ztYZli<;XMihdYiG$9y6C>(~h+as5`?Pb-m%x0Gl+n=}@pgc*E!ffQ%>(6R2+-a^}( zg;Jd67uco@@MM*gX?R~YBF!*J11$?JMQHv*a$=>JG$>5sG=HQSl$w~dDxg(Cs{cW* zp5uRv0&%y|h2m`_c$*x|$_pO4L zU4HLvZSdEIvv$j<3Sw{j+{W)(<#gCqg(I&um;Qk(?-MW+r| zDiq-X`C2Y$6txOhb2U-y{@395Xn^+e8g?>;Wcler63CKYVnOp)a7FA2yTq+{Du!I$ zg}4W88VOy-wXw@Ulf26!KIO7F1IvO|zsGJ}_{Axj`^sWG0u>@=yKaZhhh13Mzp=xSD@>HM?LnA*SaULX<5qBcd!Z z&t0|g)d@TtS(p5o52s%!f=D@}ua?tS+#4*apS|kODvRZ;gMC>yN?m23PQir%_5lJw zJno){R2Our(W!8@2j6E5zQ(A(SQ2b3m@{>KsOi@Yq+sYBh~NPndd@gh5qW2ajcnC~ z>&UA*7#a+Pqe~{Cz||I;G+-F0;DE}a)WiWFkWkVZd`u)C`|!bTS*_9FVFvkdf?#Z4 z_{Q(oe*Fd)Hs?ZyB`!<&^3OdR0e(}MOaF`mzpae_J`=Zl_0$2p%mp@yJcH-!-%@U2 zZ8k=UvBWcYoPykd2&@i1Y>1gy?AU8ii^=Ekp8GtwoBE2NX_d!EQATL-+Gf1e4Y&An z(ogU|HWbOn&M-E;h-M@|QnG_732a^wt&?Y#Ny5wF{aB_*zp`5w9(*Rmh?gp@^n-Y) zTdos?hpOgP+fy*1;e=JpQysNhwr6MV(gRyWdYSr&Yuv>kq~Kp*TftEK*Qgio&QJ zMM|o^NJZ@_Qd7?sX{ZB5;neFz5!5?HTI&6xNa}b|EcJ0wKdQB8)M*V`Ue%F2fKn{$ zNRFWtS5L<$Pzs~mWX@?-6s7p^bmT}%QPz=y^p&Thkuv7AMoTGnb_~Yn$r+a;Ns7p{O@6Qm#m z)L@y}?>-^L`brVb>|^5cAVV9HaPJVnK|B14g#Zo`BI4KABlDU;Rt`tBCW1J8Knb<1 z82+pe6u{8W`pNA&a$54&*2za5w&5^YdWOUsAi{7s5u(k$xm{M)_ep9h@r*4gh9oHZ zKCv(pdEGi3hG2%SpvvEfi>xeBlUs-u!$o%GTE~cN4S7tNzA8Vyw6?_aog04OK_o+{ zZJ`Kv{5hUBuXV|+E*Y851DWiyhcvP9 zc8b-vqunJskgGj1*3*$ya1{1a4?Nyw2+y1!$=1f~PyOEFGv} zRHj*OPtzec*O^$HlS5Cz1=(D=U6PvHX(-O6$8dT$0uPrJGZyH=iCRHH4?s!|f;g1P z|Nj8pi(1k&%M)R{eyhH?n5A|>w@ml=`#9tfmz=;_;X; zd9wPtqCZ4wT-O9EL)aB~nH+fel~)hG_PXVbH{W{uokQ)vmFy7J4ZM8Uf$64QXB zB7&Nhmt-WfQVYVwTL?;7c`8P{ozJ;^Kr>FCb51g#l6C6L1w}LhRMcwffXq;lbshzwkp@Ul8)+)gOgNJXa*IK3h}Oye81`9A?}5U9a$#c|WqVPFk3wh> zi?Z=}OkM0-`V*txj(cbHU*g{#^WNCMCRh_~ajP=Dw!%-x|HByh9{Ko~+Z_K-CYzQA&{V-p8x-iORIcXXxXoCs^J@tzr9vVr%eq z3vW3n`BI7hmb+*6c z(=~-Wq5Q)WO>3V(Jpo%u;rbIz7oQ*+{p#bYk)TnI^mQlHd+7g8gvO;AAOcvT0fhg4 zoX))^pdTSL?+rlXw}#N*)Em&Kh1us(;e6eai0A7*JhO5@l>^UbBA(g6gNs8B>7YQA zt2p?!`g$u`cEFnGj}GOt*uztCxSb8%5$x)=zr4A97kJ9g>v zehZckH*dk|jDAaZTOYoK%kRJlcYQm{>7XN`+V@Ut-$%U23w!p34DHz)Lf5ZbJAgX0 z2rSmY&DQT?Zb))&p(?J>hj0>I@&_v^Ir4WX*bQnyTO{cjs49$elW8&g77pC6?k;K( zizfif?4o6N0*a=*xjzGvdEdc*LEnlitG#2f;&bNvbtE(9%!qX}&OEku28>6@gKWTp za_?|R)CgH8L_bONF@|O^gX&{&fTQKlcJBi3h+iSZ@@7N_1KghGrmoQ+onF^}-+CU} zYg0<%)O29o)7<__)8a8n`nQF+C#BLMKO4x!Na=rzIL*-S>kYu}v?8fHpt#Br2?>2Mf*vgk(UuR0wh(xi_-<*w9bXy|%A1pX@tyiuaxSidAL)zU z**bJI;U4+|748l|`cP2|O13e=?@>L-byDsjWdSL9 zq?D2JCMnIN^pG-mHIzswC_E4`pk{CnpB8o}xAD4sK1xSUnstjI91^82B! ziF>N`qmQ0+w-M#_V4`sPDZ~YLXxm!~iIu*)ZH6F8k^1hrfAImXOo9#a*B`WY6pGY^ z=ShT?-kX3$c+Zn)*TY)Cog1APwz~Y4WBLpZ&y&IlLi>~aML%p``lRq4S+SBv;m@K* z3WCe=bJs-vjl3-V(d+M4I{Od{JAE569d6;M=mYC83g0@+%z9-<3oh+kYX1&B8Z`Uc zzoYdrKTR@2>tnrZn>5LC&1A_PTP`u8xiMH0wQxzTlxLDso z;dH28nbH_BeYJiNn-!5oS)WhJOQgI;O5|hu0Keon!5T!kgnPiTFh(Rk28+2+Xfbbj z9%TnstQMX9;Os@r5?2zSDPS^!ty16Lv@s7c5gsF8vZ_18hCv~jw#P6aP9QN##3H9x zWQ_xcXFdjJm|Y6%L=R!`Fb@+$oE!p@rwNAZA`$Blc0j~YipB?|d@h=UAJ=EOh242r zlN6zZMq1#DAicn zrLn8=jzGA+KrmJ%pCxKq=3BFke!q82-)c{ zD*szlG3dXOPi*B1m9ORN<;pii=uuHUl8^c#lFyBF6ps#t(ievS#S?otHHt%qI4Fo^ znbQ3@IoP*G=!UNjIzZAWy!A9PT#SRgBY#K|&Ct&g$Z_ClwDF1WCojSJr8vVKg>|K9 zVjVev{T;Xk5g$MOW@Ll3Z!=ld+VqvkmG3K!Z*}xt!Y3|(UM2Pm6W!_#6Ic}QQieG;MHHjg? zi>6RqgQq|nkBl!A0+xw)F(XE!{zN=Z%5$W=|F}LNE8=6);?!MML>LsRymuzDu{XNa z6L#jIXXXhz3zTw6Q%1qm2*F&S#4T)S!-VPrrN5{RZKOGOSV7wtO-l-zo+&^TXoSw~ z({?niE&!v08zh0_`|iX`D1>YD8Kr9+N(VV`Jxd;`x-q3uoHdotm>0KuM!INdi(65& z7)V+hPZA*(Cc*tsg+H(Q!4}yV`u2Lhd%dD#gI6jE3`O)Lp+j)CdJsEUAqx!*<|Ls? zCG9PEam;y$(zsrZQ||$xLp1Ay2KnJkG&6d=Oy-YUTLF{S%eX;)K=Hu(fFVN(*JJB( zXkpNxQ00s32L}$3NCMc<^)hMDAW5if#`?jM5RM%b@VoVXeo=$`LY0;40|QF-9LU^V zx@%Wv*&bB3tUbF+Gt065oK^SnTbUJqdbx8Dj$+ni9{XzzjxN89gSF>v=Nq%^sxv(!R~ry`A+jI`*5^$`%69t zyZ60NzI|t=xZ&Er&RzVc&$2=~U;U)z!_1R)aYr+gKAlPW=l}f2mtW5kn;te)#Y=~R z&4Ha!aX;JYz_{mQV?&!SjlMv8vib`QJFTtBLww#aw2Mu9;LdpeRt*>r!G9f{xAAjaX+Rb zt_rh8uojO4BdNH>9sd122|4A|AgbeA!36^RZs<1Z*{?gqy(aZPu65wflsFew1(F+p zX$(^NVqZm!h7ji=LFh@E7Hxo7D4N|;#!=$?!BZNQShQe?aKu&klhPrWz7ApOF0>Es zlN2@pPK^YsNEI8fq*O&p4Jo4W-3^>va(V-&khX1rlV5Lm`IXEArMt86X1@GN*2}Np zV0q>~9CXJq={?Zmm_~UYRMd(aCjIq>4rll4aY&;Hhcq;r$$?E53wsSsRq7~VXFbbc z`BKcnh-ZeUlr%=pL_bRVKA3!IPm@4E}Ew7c;Wf1^3q+UuOcgu3D1?6yz;^>OksR2 zrmy+*E!z`4CQ@J6#$LF52!lLu57tjav=Y-p1?@)asQ&I-VElGtx3MX1W`_o;NJ0t_ zGaP2c_FGf0u_;}3x}z~j8W<`IJSq>oM-e!a3E0C1F69Cr@eA1L@8=aRwcwzbrs(X* z@yFFN?L>iZQEFRyzNtE6+9-52E5B`)Ui~0WRy0T!HAohUxA$_(%;ND_zv;cyGV=vZ z_tzgx4V;!9HM9)e2SX1e21b$H&?vG91sdUDYzpWVm?RQOkbFPQyCkH{f+85_vLshh zaBhUt-t*1iuG7>ErlxYCVnn&K5-1_m_xHh;f|#SMP!CG}HBm8| zEf|J+A!!NR$pHTvcb;gn>f2#MwWVF&8=I+dfuNIVW@xlp3~=HY2R>jp0+jH+5KB13 z_GMqUiO##A#hk|xn2^mg&g|VZ7_qz!nOrAE2jDj zDIzie#CZ>m+JEee%;Y|s{=lb!AA-NIP=q4zG|~Xg?U{}^GxAN#eiry_a*Zh&0@rW$ zO<@rDLn1N&5Sw>K4-9->pUp1>{_rma?#86B zmBX8x>JuG@H)E*Txx-w%ZySwInLE&=cE3>WGtfxq)9rfY`E9gG7V*XkY+bxZ$|X{6 zkRr)}q9SE7DGNy{Af{u)71se)l5s@B5Ko`P2cI82i3UopkUL$8Ta_L4c)5tww?w`Z_&m8XE zIi-Pfn4xpHQFBUPzn?jIKj*r?^nna!eFj&aQ95ZhbN_5^$?Vd<&0_vBi|d_LI(RlS zY&JJ~c4>45Gc|*olTn(G&Sa!>>(Wcl%wfKm!v$uPE}hLhKbt!|yY#);jC(dWXijO| z9A?%WZsVNNBeNL$EUs-<>9zZrz*$`EtkNm7m?g8gXJ?g$-p`D`pL^i`($RC7dj=L=5dqemG)#X++1$N+)_&>b0L%aduHkV^O)RuT+zJJ=DE!E zxm;vs>1Xqp-g(^MtkS3~W=s~Bl2tl4i^DJfuoSD-kRs`xrpaWhq+Pg6`!Q)H$o9#2ygrz!TPDXP;HXVVlH)3}Z_ z?(4MFku#aeGZnLDatmjsuA9mHYNq0kGr0~Ucg>jkgOTwXQ-`K9n$*-Wsm#<=MS3bX zKQ;B4RAx`A?2J)ydS>y-)zTG@$v%Cocu|q`A4RgfZN=|wm9BYK*88k=!xPfoYh>fs z%KyH$Sn-VX@n>Wy8;Tn?NT(IbjujTK+bF%TQ8r_f^~+6C(`MQ0o8^PISRdRX{rwi% zn_J|<*5axHY2$?UlU`dVd-6$n>yyP}w@RPb zD%-QQ_|Q^m{ZiSvrPfcEO0$>AE-#bomRnCOm(F`w_M3<0ek-hhULp0*k!{P7k26`H zSSeNH%Ib6Fzk9^mvr78Nqq4Ujl?Sa>+a`F`7QB^sOD1?@OQ*z?PLAF&Nw;I7cKZZP z$#}0iI}S(bN2^V7a1rcPZ`b0D#v21)FdtOn&4ON~9yh_OG3(X&DzDnC@v8Ijnl#=5 z;|^oF@sP3B=;(W7Ghh0^>-oxg_KlsZQYUDXWd6I?^YteLFlv;ckH7o%*Iw^epL)Gt zfBo^kajIZ=CS~0-|IMG#_NUQ6RaQf@*x1eSlt3OyNdR~%nO(KUk&9#N``C5%- zVZ2EjV^|1JYO|G7m$Y#7jjwDG@q8=cG%g9NaTVjW;w5thm*B&#Lx`FSQchDZWi|CB zcx`yeT*)Pz>kz|>Na*QNBwWv8DXNm-FvOkppd}=HBN0I|ABe!g5ecMHl7jhx-ed{a zty}{7S#4!8r>&IWP3imgo2{H4a7ucQgvG1CE2Asw0LAo3I32X~^?{@a>XL*_s4Hd? zc1oCp^kPLqghb)XO}NxtD<;uo63SWfNim8?6q#U+<{DJLfoPaMG%V1tK*JFlUkDtm zScE`U46NXjtilt{`Lwd&y+|^JtGPB_L*Z(G8HNxtRElb=sFsMTMO00qY8F)ksotyd z;3Y^f&{J#^pz}pguIrI1d>{x+6B8mq($9%;)E(67uT4a@{#CV!Z(SWepMoufU1?S9&ajM9g6P9 zo`m*dE}^HCOK`L^3H1^-Zf!BA&o6})lTcyc5~?xQm0OsEJvJsT!@%js&E&kA>lrca z(-K;y>09Dsx-#OQ%}6+(LAbuJ;9|NCadF>Pa6cZ7`|dKQ>%4?|dzr9NV@jy1WMiH` z$i}U&WPe-{x8WkI+wmcraPSffoJo3Da>Avgn3L0ETr>2?lVUE+(A%bqXsuj~%f`ih zXXSL~?VR3b1;P~x`%Ac((qb-dUkR76qlEKnuP2S^iU$h4Enf6i%*J(USbbX= z8&m%R8+|^H)t%2_^|ln2QdnnTX z$cSr5im%H^IJgX0V~|FD*K3^aVg;9QUd`zpT25ovb9zf6A{9WbGo}jp^gJkq4F+z^ z4m%rLU}Lr0-v`Fal+KKpu4%eU(_${h>)lE5=Vs_z5!=Ht-==U0or#!c`bJhwKVn?IDHUhKdvKLh6>qANQs1n(ljaLtS<* z=2$VSt4CfP>(8tAwGAa){PAKg=CA=)ZYNTsZ+-KWa&1WlF;nID0HEe=S#_H&2XAcM7NPkf4MEbe0ZQYsb5?gw zHN>@}nA5c)UohN=yO8oi~k{a)@GFr<& z7)|9hyk9UHa|hlJ8BIy6_|?OVQAB^ESfS}?XY{R3Bz&3a^UbG$#MP_u}>o((4^I0-`@>fl7lVlDR$vkqo&%(-Es zEb)4K{3uIO4Ag^3vG(}r%A`^DcwJ=@Du52dn7%EC(_TUQYYj#oEs3tZ#>SqU&uI@T zk!>gu?ZKq@J@MM@!}R&o8R)-nM;mdo+Hc!g?RPD#w$sY$u2-Y)IZYjb7V*=Iozo#! zi_S^A!OUuRY-e=`^Vx)_U+nLm^p}#NPfpifh}RrX(!Pe~huHKae7A~;b8Tg`_GL^$ zO%ifr$=Hi>X4KK4jBasn%30khDI4!7Vf3{-7+uYFRHb~z8+&n?zAHm_VVUkiMyw-4Ux^AgH1-_2 z4tEZhV52UmL}N!)v7?DxLic?TRRmGIgo@UM4ht?3L_)&?F8cV>T!LN6dB=R0q3cRY zxK2@v`QFMVe1=N+Z4aw+wX^!x7OLv8T_x<;HXE9~h1FfCMCqAXZ`|uiXn4_wlJsU| z@ZtFDDT;*73We@mnL^)Mj4J;1=yOvQV^1AWXlq_j=q(!+-ng!{3Fnq+?Q8X|i1&nq z@2rfz^Dj)yxfZmHb|%K&!{{y4Y=1rWltmHi__HFq#-`BkZdJq_>`>^<*9gV3xQlCb z_KcYG%k;Ir4Cv9j%D99ZR@4O=X%5HL=W_|i4}v(ULtp927+aqt_OU%Npmbucq_8pP zit)ALE8$}7DO^lVF&xvNqSX3HB{6mz;v-{Y4jR~)n(g@7*_ho@F6JPbWC;eE7(Z$B zm1WWPjOcSo(KYeW_F>Tnheq#?(wC^He7`B?C=>PPgHaC1%yT`+v34rk7>AS_TUWxy z*6wDt2TNF8&C}>VOsMjm%f?>Jh&h#{tzuO;7L@3$gN|(|5g0Ot@`@43AHF7REHFd2B}<3 zTNVZ%v^NLxskH)F0%97Z-00&nj0Q?hS1xecLm2bSE72ccNzz};h`x{%-;kk!o(8vX z6M7gft{s_u6j^c}U-U%!N*%I9lThto<0@=yOzAlcyZCPJK%eqC;{{=na4{+Frf5db;}fn4>;Q;js2w13Ts-2G?&RL0m*3eedhOEoR1cp#`*EMk{c#-st+7V-Bb4 z>(lg>RAkMVYf5HJ2ai{Y9#M%#&&PKJGV!g!%vcC5(AxqS@7U|B#$0(|?72ny)<@Ay zwck9#Xs)C((XARrQ&Wmoa!{fDM#tz}F6d=I@xJza4x_QBFwr(OquE`IA-Y1LJ+Ef8 z_3hAu4E#~4nNcE-y&+`Ws>T?%dsghRQNqD{^yXPO zFVN83y#vDTMCN2TKt9Ben4E*lM7L^q??Ww~(^JDd-{=E9->V4}ko=X3P5uV#OM4uZ z+96;uCB#_$aXv+}32bendSwu=76vvHp=ZI z8ihrqQ%f5c3lBp_0=WS#Iy?Dzq422H|6$S7!}=j-f4{jaXz`ZaI8rH51)lwMGf8aS z0h4zzi^x3)KAum)KOx56IRbti8w_39;Q037VvpCpem>$u;7s-CO&)ooOm*+sePRTk z$01uki0Tv5sSfOwBL~>fKP-bboFo z^$T$I|G?VaZ0&BbcDGtpkp%1(t-gfSIcxWMYxf0fcbk>`e+>oto`nLKn%d`Vrg~aazyp-uNLW$LVq7mnMFzgbtgKJBVv`4aa`a3a zpskDBnno>Z`r(1rra6lmkpWX9Hsjh>$SrJQRDux@0#V1Ig?OshM>~e*mhFo z2Mx|xAp|k0ip`Yj*3CD%f^a5mMHW?&qQ{!jAEew3=>6Qfxc3X|3RP&hbcDpi=?68H zFY4_E@Js88XA$ZLR{tmA7$^9lE7(lkLSbK{4-m6xkzUr(cn$HesuKyNpRc1(qqBiX zNz^{7T>b4x6)2_}hsLzY;7%b{sEbzrnZ61#7TJovqv_SfZGR!FbHN_MX=?un*oy1=(s zRdf;9d(BE*%}1|*HxUw!4(g$B3GqCSEV?KK*Pu@&U~Mwx-p2mUiAB#On<@tc;)y6% zp0uYd7Jg41>^`giBB2OHnS)c#!YfvPx9~iwLC5oj$&y_wk|i%Krq)^X_D9bzRwq*% zEqVu9)dccgbj$a{iU-Fvw#5!ewt!iNGUF)GM)*49ET?EYllT$_tq4G$7Wv#9k*iI z;;2x{@J&L*QWA&wR8jF$G2X@)$=Q1orID2P7`jx~0eET@GBRN)mHb9jG45>K*`Z0Q z8^m9;v0G}zcI?C@o)c#>ANnZsA+Q9IpUZp*m-?vFK|j{rW$pgV8t#YTrs>5cC|IcB z3Jf1)8Y`;FqB>JlGevcgs6H&JkBaJ(qB>brH;8JHs6H>MuZZeCQT@HBzAmb7lA0{V z7(<~Q7u8dwqMOCl8U-i<9ayXcqb^4u@eP?IZ_x4TlBZV0NEVI)>!y^*t=(6x&vt)h zE$Xsz+`Q~fJ4>+P+k4fzy7w#VQ~t9t#^dw|5)=utWB3-(6hXbn6fom%EP_b&K~w!< zd`~Z*Ds4Q{wsH;SB}QJHh{GVPDQqQ=G{QqkCS@imnWQWt4VuQG76NwW@BVjgHMTM%H zVJ%W7ain=(uLWf?5?vim1QiM)R%Q57RA&$MUMG;-)!ThG2rOM$?lX~pw zEt<`m#sRjG`Hq~WP3cR?E9j@A1ONq0-Gu`V9b{TAVO44lJuOtV03cD3r@?Gh0 z3DJ1e!R~5Tu-k0j>r(Q{P`BBobX#2b?(MTrfeVXh3p<0`>^$fyFq)i|aA7u;Tj0DF z-+V);*(JEkE%~)B!Jrg?&?EU`DMhCB=Bi~kH!dUfPD4pkOFSb%lolwhM!O_lhIeBKYN$3=mE=#AaHz!Y2D>eL!r9lP|5rgn_5`)+r+vH_q!rQHQFQj zWSQ6LumstD_O}H69Bc`q=jU+v{zb5eShOWa{VwmS@3Zzubj$mS)<62H)LGM2>weB; zNX#*GS=U)TtnsPGKk7JcZqA9s3_egmr_*R7K6oNC^3~FgUvp*gdlx? zv&C0QP|6mUU^0v|;0tVbC?1JpIkG+Gs@!?Om4=c_S!Ldyvf4f2wxQ0wqmy@4mmMoB z-dmir14XS)SzW$8CtcK;a*E44LtQmxI~^X$!iT-x{(7gZl$fuWV4_Nm~3Vny(KWwOM0>ejxLK0xJ%GdJd)o(>~&h? zwrY8OwY*wx5g*%S-?v6yBX?HI?Xb7V9X@;L23q$!w8Pz9F_6U_2*}5640Z~mM*hp* zVds(ftw5RYK~Es>W+#5`JmyZxc_u3_rTGKru{3px+{ma?vh(xJ&Z?@#v5S8Ot0I^Y zyMx&VOILxr&V1QXzM%Z_yx&|dTe<~Bx1!q*y@a#DomX+JtlA~{pxN1QRpw&cc`nH; zcfL!SpKTDNKyvb`++DT*Us<}M$yTB^2nG(-Kq9ycT!mRFm(MRSUaps4J~_x)0UZ15 zJd&uKZbk6L5LbR>-Tr*r25TOkd|SS)@D77BB*j{gl9FPjProkToMkU<^< z@{ZD?w1m_uYX{oEWp&6c8`$>yzXiLyYhdXMVSxV=qFd2t=ug7A9fP0y1Z05EyW0Ok zobTo{L`;9E7>j=smq)VM)L(f6PqckfmCz`@xirH{V&kziYp<&b`=~*;VC{Fpq*N>GObneWJ$f z?%3E^t#iqQn@1jXo-7yDL$~z}p||xXeQ=l5+2B&fx?^3ObFOQOM^f-8unJw32D%n(<=%^bRnl`u-;Ug`4!LPweY0pa zsecgFyXpb_!)o$f7xLGEy*iatUui+7^gUoux*C0WNNp%y@oNdSgm~`+^;c#em|XSO z@V+`naRXgYK{EuW!(Ho=YV!rDyEfmY#m8c^xS+Z?8x*PAY{@s9?r@TCG756QT{tiV zqQ4*)uJR4}AnZX1I%_TYLO#6%q5UwkL24NIngpqk4;a0q_eefiO|yaXor3d_)Op@z zan_n)%6HZpoaar3XqN@#ilx)vWy&`n>y)^v_YZIh?fHD?A(OM#1WlR{D|K1S`JDoN zHjy_jTI#B^kxnj;mZ+hJ{eENZ{sQCbg4(+M9*OBOZ?{VC3~@b^mix@!g0xk}XVSF& z`f}*G*g_*IBsxi4DQl zL~C$owGGyNnhBwa=xwc?7V8}z8wPrFbXo@ZAg?Jowp?RQF+7g5cbY+@UQyZ%t8IpH zN?T_M=v4s5rQ60S$90-Z%oWuRP_~tpE0W-bPE$69z$*>5&Y5+!y!HyIEe0 zJRvPBM)*1CvWs(Wg^eJ85;EC~j>S~^oQo;^iPLJU$*Q!C1Jzt&n?iA<@ve2 z-1T{!Fpeff$`T_@g9xj|Jwa)7*4}(+4Q4bY<+&wfZ!95eU?arPDxr$ucw`}K5VV`T zD@(|giCp3xhnJ8T2o2^-1T!d0l;bdmGMJ1dCUP*rG;Z7g5AfwYzB+e8y0a8G4JMDI z_zAZODMmUeOt0CXG@6wLZ#To=l&p1OGM^?A+o2QER_*A6%mv{Lle6xstlKZ5bEvDl z6LY6=O4mC({<@~bOa#g<<6k?6jx*$f>T$i(sT>zdWXo?Xol-e8xz4)%ot*1kXKAtX zwK9)n_ZsRoVBxHP(dhsJN{_StaWP=y6l1Q_fk{C54gxt$CFP*8yiVok;JxL#d2%iN zKUj+tV-{s9fyr`P+i!tsBrK6F76S%>{ptHx?@ZriG@;;7a4w%VPTQheg(XX|cWT?f@@G^E{O@JKGMGo+bT zc@1eoH1)_pFDPl1#av=cDF%I;j>Q3`Q81PJzO=w2n$6}CWVhKY!tZmIq&RJYX}8l{ z=Cp|})xi>Xb&a#K*lB}@`<&)J2PJR-$K>AREXi@&ih;u;iFwi)-0UM&Pv3m&$uetM zJ*d!nXshkTAWqBdH*HVasqZ9xHF~6Cf>3X&rkJ74JA}FrX``_j5i%t6`!JF!XBZ{Yo%Mikg4V)iD?E#tK_na0>Mr?qjGD>CROy zd^^*z&agM9%rylTa?wUy*>Tpr3K}oZ8PeziHE-<aNUp90F}s2}-xlT_8M=3q+uj^0Abff}jzD!*|BO z-4`s`gRBmS0fk&$QC6Ivla-Pf?as63+0|B;kZp1{5W0Lsq!JX8EB|n9r_>>rqOM4t z)d|jHSfg10BF$ONIU6`c_)vbfvwEAeHs1|DgaE^Je+UE664V*iDcF=YsSQ061xQOM z;>t~@;L5k%QXE)OLE!nFQi76#u*E2Vw6tNF(bo5c53`{Y=%Ba^+4%+sX)KlI{7PGX zWxlNvWZ!MX9?6`ionfwl0TamApS+EeDkHxBNvrBGtFYx{Vn7tDVLxRNWs_c{s zh6M$Hwgq>>oJ~pvYD6BEchK)-*(G*Ywym#wM&I0a)TPB*Ra=c~+&Dpsk^%s|x7ba$ zophBi;M(k!m6iGVm2LI=MXU=ZaEaDLAfpwdJS%`=S5LTJb02C$=}RPSuT5yPWM^fy z9jyW`TApufb>-*fwbf5(Yb_}*uB@nNtM8mb_*@fq6fBt1*YQic{jhlQ+F6hfMy*mX z*o-CtBc#K)!=W_fY6rrwtnf3~>K(X&U@~YOT4SgqQ~;S{taS?@s~qJP^A1Po4rpp? z9qw3P+67HDehSf*LI9V<2Wg>=Ef9de%!LT(U) z8rOZKdL$#(J42h#x-2F8SMPAt?XTOv6Qo96IqqGQi#ITG3wD%u#zsWA>gx9I-??)& zk^6Aqk(^!MzcS@F{&VN?1~=#_X_uu5?O2(p#>&yo^zssng6MCXL(#^A69E%fLhL(h zF$BW~gQN{hQnk?ATv)F$I7|)@?ihyVtp;`5gq6-`XcDY-+FihoZkjspG^ZWJRSJ4^ z<+zlb;xgy!&pGX7#m@S5PWu38J)kMY&Xe!n0qu9Y+F5y3>h>+_{1jjPbMSYn&S@8S zd=iaVeKI=jiNT2}xz2{#+Ud zv`uJmgMxC_6x8O|=BK3OrJ%vN_veNM{ka9@1-a!vHG3o%Hel{z$AADI@Z+r5k5KKd+5*cn)p=#r)Pe0U z&o!?q%fl9xrJxoT1*kl?>?kx05z5%kSm#k!EQN1z8FOPf-(=i?ek!&f3M~isAfuu4 zNM;v0LmN8#Lv{(40gqX@^BHJIdeJtYkST?eCWlGvTB&=b7k#w>V*=*oh`tGsJ71rj z8Fv4PFLB0>@H`S*VP7eA2h#q9!>vtIIxSk~v07|1n4O?ojuqq@OioJyX^dLqDgdDu zt!oQbreH?| z^Ky(@85*0k58|#X|6d%S+G`RQNzfg-EqgtZ4>y7+&$C^Cs_iHfaW$4gs|JovgG3^+N~{J9V`W%9$jQMXtT@tR`qo=aJmI=_|=^#ic(n_uWQpwxZidYc-YU6q}7ogPG=D=*lp#n0{&t$8aiI=Ne6< zqb)&k4pEFoq%;tzgN;S(CR)&ZMYJUrkL0^e{e`igc3f#|DFQi3TI@kr@4q_~EA(39 z>N?D3jjPi=l1DcqqcPbQAL>~M{ZGs#cbIS4n#G=o>@0YZI?+t=BOO8MAsZ}?Zg$?h zcZ-Fs#xqbQGd&)~kS%a<>+g{axr=L`PYl@DdA};fRQUzxPMVRRx)v6ur=w!mMnn`A zu3lYRkX!5GxVu0(jy!lIYqoStCZd}$cghQDb3qGk=~gJ6lSFLMu6YSTMmYv45&(R4JB^f&ibSK8Q>{6R9>*a=`c7OQnH=_ z5_diTQsJjo1x`o4vmvkSkh7ka)FtXU9?AA+F>*J$^0S4T(~EAV7TsN)E5Zk;*_HH| zvpo`75mtJ|$BT4}kJo3LU5TQhBP&QRisq0TtANg9F0DxSh~pS`sSlw|0tkW%5F&@f zz61-t|C?Ks1J;WzAY;X^xqv=c#zwD&A=PZz?*gV;5u-sMdJPr`xg1vFxJTZxHe7_t zcr$YwTGwHBx$$PsHepr2ejqef1Zs__@26a=_Y;Qnh;$mdV_`ygb>;b{LecDz{8%K? z00Q-ePDgox$-vWciygfpI!mV`*QgYCEldKQeACSjx81z5jff@_W_$#@4HZqunwwv4 z!>}wq{n_pFP-6ZiD{-uSdK)@5@$vdT`DU-rqsi>Wm~rdZ^8=(FC8ebISXTUD@uBvb z%@ysn8`~|!yy_`+IHYnO?OoGUbvhxv=V(Ry(VkjZHy(jV3&)*?HDZc0<3dhQis{?_lZWDe`?)%j9=GhLkIz>F@HHXb zx7~j;l0xY>TV?G?4U3-=FBcXj<#_zUL&Ev+@Nj7G<-_8;(%TBtF!AMJjksryiyaPK9YD})HC5hSpyvG>jM zRj20(N6tgskqhX(LGxc+x6#8A+Zc9L@uO z%*Ei;b^2{}V%%HmF>xo<*GP;{C77^1dQq+ zS;7BN@c5cKqIdOqVyG;()0_U0Cm@j(IvkJ_CtLwP)m747> ztq)TT!^vB=cVa!S3IS6yws%SWaFw4YP_5{FxPI8Y?o-X^i9Z%h=i?SXEczNGeC$1Y zs`pRuIvQR@;|INg@IMUxMdQWZ2Z3ZTkoc41PkVC+)38f~tm(ZpA+ZfrfVjg&LLRA5 z6xfs+nCzVz*gNc!hffCU)TYTZ;kvO`bqT^Y>1cnLJudd_Krcdwho!;6dx6ex_IciU}Dj#Vr>hjZ18$Ehj zdR(T&=-5fx;*-7;XcTD<5y-Bi(D7APqUWrTte;>QSv7T5V`l zl0Hxh?pWYP+dQ#DRSm2NZSe>R5ZA6C8(#hGmMT3iWh9RzR#*GMEG;<s9!@`3&Z)AI# zBxOMdr{$}<+ zW`8!|@tZ@YNl>SYIx;1TI)kXro-_9r{Il6v&@Y;^OoXhM^Vlt$;#<1UW`}1yKfv_a z?2#Ft%^rvM-+fwd`5yceUo!@nQ!SCwZ8yAA%^gmTjBV8@1C=F&Vf0V zb6%VCKXZ-`u={JD{+YR3=9bKTS;T1{U_UVI(|zy{?rQ%O{Qk4gW`4%f3{%FsjDlNf zdM;y6#_uwYWYlMz&-gN9=-d%=b#o`oy?1Wf-0T7ASU7k2+!t?Q|2E@hM$iCTUtCmu z5Yz=!5~)(k@KR1Glk+l$mrIp$882s*@&H~wh!2qR0Wv;7&Ic&?0EQ1>`2da&@KXl( zD+2jL;#DIY6S#>#oUl-J96Jv0hl&nWdQujhEMiykB8#|+{pGQ3O5yJWme&c7<<%M`pB ze}*@+{BD*nSMcQwzemdNk@0)v{2m3rmr<6=_??6J-^lpG_{(_<%Ud}9m{hqy$}f=d z3*`I)1;2pd7qI*Sj$h!%FYxCV1n>(6@e2a^1%vqoLwGyO+d1Cu$J_mRdjM}A%s(jQ zACxH{lq)AN`~;St!12@l`04)q^Zel@Ei%4E&bKJ|RvF(a=Ubs+_*Ry0<@j?l{+ygYr{K>q{5h6C z2Z$ekp5@PT{CQ~n`SSt%1%|)C@)tP%f**gupT7XeApSxi-zMYR-?Bl=ELI_%9j$TN!^*#$S^2mlXVEIe!@{!(V3k%YOWaQvO33 z|Dl}!P{DsB6}(f*U%_9-Uy<{jQod8hcgp#-_$&C0GNo0@TV?!z zOO^jEQ&vco6*6U|jIWgQm5j2IRUVWo56YAW<-AwQ3wp>46#i!}aov1pE^#wWN*U!x zd@Wl-!QI+%Nf(g~M%U!*0}@a5l-frST6;?_cga2S)57<2oBleng&e#h^b!W2)=Sz! zoHyceVwU{^l-_;KH%_*>-QnYthrbI+Hs}AMmW7Am`WOT~2gRi$%(u?W&V)2-uliaC zE|5*0ShRBnv9E-U2A(yOy^bd`p@9r<&m$i_mU%H3j5y(tP0rOggv^dAmAtTHN=K{B zwh-v$3MMa4o#8C@LQhDG60-J@{b~LretpkA7Jb;MH2x(g6wdB(p*`l?4N3 zm9(Q#_%ai;7)64J);Nd^MO@v=7cPUZHiQ9)Vrk>LU%Om&T6vgY5d85;*4>}KW!=b{ zlKpD-XW2Ki_s=hx-C zE@v1<9;678_`xn;4tqsDo3Gd^-y&bgER=+?I)>qNEWL0c!&f2Qq$Z1J_C-xjeu8KwaR8!6yRt3^_4a=eH+tk0i)1&p&^# z2n_@@U=O#|Z;K=-_;4^YU3epAK6L?S1iQp5#x*_)j z-}6h*A!~z}z_tE~gPFmJz`+bk3`zvvHOe*0H-erBej{W}&>H0vgEc{#JE6)al$ybs zkT(Ej5eK#}4s3rMR3{>J5jvG2{6v%?>cmjpu(wCNEeQ(Ih1{cD8!UwB!tM!Os}zES z5J3_YstY}#yeIrbIBY|NFd_7wuzSQstAMabJ~BKqA~G~GBvKU_rVLj`mP_t{MwSy) z75NL$AfJEu1&*k4xKs`+mkfXo>w}FbmxNKAhu(^FWQH%!suNMVh>ZS}jCgz4z7hK* zL4amN=%SFmVMt#eG%}0{XF?8#%?vvnGBbQ;_~D4xBVU(@(8$+SGl#w&HFMa^;jc$( zhiY#_Beg#0Q0;K7WJI_;G9=uf3LIG#894F}BgRHVMd&3XRPv~q;p-v;g{p`^RZ!&E zNZGI`avK#A0qBUTp@Ad*pe~Hk4@;7ah=kh+U=XUJ0waS)7DgovlSw2DqY6+3seEdf zYJ^Iw(yM|-OdAnBB4Wg{Vaxb6!?zDh7#0yzED0Dfbi^`sgnHSqXtEzREoNi%azLS1 zPg6$^TSoT7B1UYF_LBsRj2<}+7Y(NkUp6vg~}2sNRTLqtnD{;xwa1>9_06qhnEXo``xQd`+B2UpPiHI(F3dxKU$9^+WsI ziqO$!Nm$7A(CNzQVbg=B2TkXvhfg2AVdMr0mVTaS!f@=VKey=-q2qxWqUg6!y_psf@Z9IXyuNT5xFD!9#OJS$*LLl zU8{PRw9L>4VHyt32!6fAA3}XHRnxNMbiv$AEL?Ui2B(ssgSosuAC}kb2lPLQ5IRUt$SH2wgng6A$07=P}|gT8&Rt0xh}k){0c+|kwk)0V!?d=s>LC#Z^LzcsZnCDGf(G5J&bgi);F|7;!ZON^gN>UI-J%Q^g2h zEFnKgmgK;jN4Fh%^Uv>XtExEm+PsQCzqM^4eu5Lq#r2_zUB$ktEB4d zkQlC%a^H~fZfVN5o*)Qo@qSlSd8T0bk;09LG9;P3ZQr!~NVlrREj-e4_W2I%9r#0v zhBSa?GRb;WbH}FT+PL)Ys~;52gP_!Eb&?nXJ?EJWMp6aKDMR#=Xf2;@o+sRRAFGwb zn4ebYMaY9Ktgl62m0UGg^o!sXM>TV+sagfwn1WBQk)n`sFgYa5v?Qu7XZU`^8B9E|i3P}Xys(mlH zYu}g5pl6byca;9k>)&(WMtTuaQby7~diFzq^@9V2kokcHbn>ky-^nkdQb3GaL;H8A z(0$TBVBXpO-L-V#>Idi?=qXfHX^nG(o99xRu^e?QE*pjS5X0xRzMnP$W&wnT~-lPx-KIAh4tBI%dWf1 zx-0}+u$6`ul?4?c6$-VB5GsE{9462A%w*cs-QS<*^S+n`$3l(PP|ZM&QWTCV0TITwlCtR<3() zCGErW+{zWJ8-7{IzC~!Vy3Tzb&&TXH?WUe~vzdJ-{?NZlBA%y>?P)iC(@sq;8r;x# znNR~x>cnK{B{xP<&hWD6znvx#?DH>IAHspLkGhG!4s$X=ld;s<-#c z&gKWC-L26eu@7{@h1Ua+xwb>Wr+yTD>PMp4p3E++Hk-texcN;rCZlGdO=DZCpVDG@pnoX&8zU+d4EFrbCmgI$+Qw9WW%TKhvgaKGUWp zf1}CNexu3K_3Bggz52A2Sf@TEwKF9p?Gug8@JX_6$ft(n^iR>NJ*d}Z98A%fzR{~Q zze!PN#r~mB$^J)5%Fr0_C_#o$e%>D-vLA?OTbq-swNYFM-#CVUk0T5{41h_XQycpU zR2S$i#M#Al!3Q4n{J!^-4yc+Kc7uMTHL{My;2!8F=jx=k$bK6dY0@uq?0M0{hu}Ey z2KLI&G5F>j!w$Wlm;nzjwuyOo9Xf<bl{3DgQ6wDEdcl!aZ4#gpX@x@04H(f#acb9eSn(Kv2bY< zWiu#J(^w{5>%VYP2h~=E1kP=y4G_K91FJYEiftM_rP zObkdSIlp81`=xHlEd|rIc$l0sD(pl2N@`jB%icNl$Xbbg2(nn!>4hX%+IvqY%N#;c z6fsbo-Yb)+F4NqRRNMyb=P-03sKY~105Xq39R8soy%H==^U=*uN!*NV;sfmn)>e)v z*vtol1k@2 zwCkx~47l{{!vt-9!@su_j+p2>?L+K*dPcesEImR3j# z>^60nnhG1R%W=|WGF=wnlE9c~aS{|-_TvZ5E;jHWyvXf&(0m=TAqyF)Cnj~g*bWKh z&!i0OVLyM+tY?ou2v3zqB~_SM_H9b0lP=%TMg0ga`E(gimuYmFOBbeebaGBg>FCNF zBi&i)ZY13~aVHlpa0e%Ko9cp|SwOHWeJF<4P2QlE(Rjt=R_a>Wb)dL=yIl)DX_@>` zL6-T%p5dX!rqGMjYn607>H+)9_7$Hr?&Gkq1ienZE6Jm4C?j}>8asy9?rw|T+P+0j z)G>nn-Qf~P4!h|K=m90zCH>(q@EL3A41V(vJgy#p$Y0XUGNmecKj24$(tg0Eg~8!v zU32`bQQkk;IGA>|?kaBWrpW#}X3*z%(dS)Tu!nG!bccO<-9+6Ay3D}^ zHF@L#fQT*55f|8BKTNwL8i_m4l~h1;?$_1>a@Gzv;q$hzDqO+5$^^ob7*oR+!`+#b z=ASz&vWAx}Ezd-E?IIL5>=j1acr}1xBTK04XeY1f_jS>evON@{xe(}D7h)->rr%=E zd6NW!#}d?NR@w;czXhv3ih71F)-rR7DMwH07^?3Mzo)1o#Cb7tF}7nJ77s%m4F&s8m-t6nuX`PsSJ^>cMQ=IY;>Yg{$g z^z7WB>*o%8c5cpVbIq^KwY)ZW#A|b{@65HmGuQskTz19W{CDRTteQJ=)!ds_&7Jk^ z+}GZj`}#X`KX07-MdREr8|NNrocr~=bC16}_r$w%V@XD{u`J2>im^;>EX2>WB;zz= zPEyVS<5e2tOxzdZCfSUeSB$^V81szx8gq=VXma#9n{uAXxlfa`Nq!Z4$AI0IF(n4h zN@oftx*gfwG%L2HB|KNUV6BV6e99BcY%9>Fq8{$FtCwbG6<{~+zAny_@ubZe01g3-G_Elbz$b2)YXy&5!0nFZMDGmMtOb2z`Kn)SEfv*6Tu><2BT z+k@$vgWYIR^4(}Jhi{2`g4n9``FUow+g;G>37WFd-Qt3Hl8gU6Y-tb)%c<_}GHICH z1BiNOTfV!_-DY<OPJsajj)4jr8K@>$kc9y$j6m|2g+ymUS>q@)W z(B_{nVlvEntyWlw?Qb=@I`0 z;xF^>9;vytVot@JDtk$R(X7)RJ^I_HU;D-GUp$k#(GseT9A+357KW*lw8`3JLz+2< z!O?&Nj(Gz1P)69C<1BQJb&fUX7>tyDMpz%AGb3CbYG|OZnZQ&2^1u9{^7xw%+|Ry6 z4=hY<_t6sAxK94y7S%7N-274C>aO#BYkXNeds$fX+4yo-q{mh6tgPNl7^qZMYgSfv z_9WMg$_;Cga;e=e2qQ;+HvY7wcleCTV&@pg$Wa`p(Ih3QRNv(G4nN{{^t85my_CK! zgR^`1<+1N^#-bOZpuMer)mO(aA$TSBUI)shmiO_six;W{k#)Y*(V zIfpi=R7q;H?dpkF6`QZUbJ^4166WT}?0erlZTZt}vz~wd>2L2`X1?~S;;Sc`ZAogC z>iPF?n`Qpfo2O^rYmUGpMFY=c;l`Ou?e#5uY03S|7sg`zt1;s$zJr%`KE>J_iO9yqRU$yw8}o$KM(zsfKMLuTf+>~;34QaTyN>GYPj>{#hb z66q|o7us{oX@+DirOq%KK_keePpM=78|irH)lH{P;qGiK9Ek{mc=7xCQ)l^IIB$5Q z;GLV_KE)gl96xs{;(A|j_c%h1>I{2j>E_L~-qpl^218cH*n%-5XOzze|q-W*zxVHE@zlZ&yrzbI6G%AblS@Ow=b&F>lr9(%(iG#jC!3WN%w-#GpALb;mqg^*f%?C!&LrBN%{GAO}}sItedWb zMG*1d>ebVaEIxhS5YdkKEB;?xN=*ln(#LoZK#4Sm(#gu z5s@M+5x`mu2ny;x(qS4(^C=H^<}xm8$xs>w~Z3n|f8 zJL{rVSSMTkX<2Yu&Ef7xu4b&->DOG7o3fk2P%+)D;SVl^4_&|jN$3#7By=qHYFguH z3dC}KC)F1lmt%CwhjA)TQfOy-%AW3S*4u2#X2LsZOW)wz>0Kr}0u}PdL+qDApDYhy z8)PV`O?Gx?Z2b7H-9zlH=R$|hVGDWR+Q9PX+er6Ci?qct1a4i2qFE9v?dj&661v0G zhIpqVja^e?QY$$$jz7dauQ)}5y=^B!*VY&wIs%6(VLu`AT zKd#F?Q$56fxy>}K4C1D_+#H-!>q#+H*EVmMC}dp85Hn&KtY-J$UZ2QJruWL3|sXn$}NRfx?%uK zDkayfv8q#Y5BMvFXJuhg z^A&AEZciqQ*U`EK5Om90vnUvfOpaIP9z>Y`50T?IUY^7ITZc^?#tQz z2Prz!_R;oBH0Sa5L41N#>%>?^Ly-M2G1^F}{LkMR_rF4=dnHTHFrin*OlRtld}LYI=8JaAJ{XD~%!| z!u@TfF(%d!3&hAer7XZsuhLq<_Qs^!0fd3kwFkcb`+%IrY&o=>wf zqd&!Eu#%pYpru1eCyo63tgNo!lEqn2=8*~puE5FI{9BsB=rX5vsWO-pFlW&O4BNcm zff|o$TLQNHr=A@cF1j#CQ66byA2{F_wZ*OOI_kQCY*=YV6o24AKcU&i4(d#x^zcwF zwBLPBowVf><=zhpZQ#|JL9gU;NSH@dVIDDo?pxZVjg*I?ZkR+hTlIzG7TUd8%(ffQ z50~<0M<*kmyB9meq$s{o%lQOoNqkc2fdg1=kA4p;^|`29AB8lQQBu+tL zmPP79ff%&EGd^)h`#JlwvQQ#ON^P3{g=1)mjJREkjv#f(WCGxxfKu7%Ul1I9lRyv| z`c?^Aq79(6M+cyBFGJrdL*ttSXv&YMa*V}Hw4-|;w>OC)!sr^RBp9V^ z4~E=!lQ}@L{XFHnDfCw8?a-ECs_^S4!}c-R;ny*=5iSeAv9CDv#!2J0(CgthDEubE zZ&LV;@S7*Yp*PJP2M-1r?*T7;9(rr2b-3BQHJ-$sI4LT?`MXxD9Ny?`XnmDnR~l%11CC70oCp*N9B zgpv6W@St42e$p6vy-lTNOs~e+*JFEv&raNZSYvuE#=eQb1n+M1Nua;wrs2~X~|GGC-GtUROqGfZ??3CUnxAP4!zPAezCVWSYrCLo!!tb zHQN(|yU=wHzgQA_(f(aqcNzQ1Qlg7)yF*=IzTod_D=meJZx3X|q*~X+z7)&%<}b}J za$>Ct*5nS~H*sGc{bSk{go-ax2{n2{8|tCI(CA&bv8roJ0AnEC>_7I8t{7c5y6WyO zSauy+R^Kb`U)FnN|Lz091It=r8HBAVde81h`9#0nUll#Gf5yS+KlWEdPwy|o2M(7r zBW)?BO}&^h4La-V*O}AR3E^eygBOq^b?^_%0FLQkM1YCl1LhA7)FZSE_wQl@A!q$h z@SR76&zcXFbYD0)OdBl9!i2|&mwSoHQado9Q((9k6 z9XQ&SuCMaGJfp4tdDjK|Y4A$hg@e%-ARwK{Ywx-J$ZcY~9%dj#(g)ys5Lm^N+ zJh-dN6y7hJc0t|mI&cmo!BltE=ou1O9;)d+7(BML{=n`F_&N8Js;)LkyRkcHY7UlL z73?qTsdUWS?IxJ-rTZ_yX6Rh-0;I~9u=_I~$9kPFwb|^Vhp;9j$2n17!s)H0S>sAo z<4Us~rC9Z+8&R4(qSTOInlycK(p{6a(_q%77XG%aoxq2xgyVm`U?J5&S}fA+0xU6`M!-u`^0qu zMvo$q+FA+TMx#W06`c}%L>eZGia5Dq&Q)K+X$M}1>Nj9?#FMc7c5!~V@Vy57x z5jut$i~++8#=w>>V_>szF2X<37|w{yiS$Gog^hw>HZy8Qr#D)%tR`+ef9LYaOn||- zu&dR(S{N(dwsSJ)^i1F@_=*YKFpvoJH~2P+ePZ86VGambTTAeUG?YySO0beIC3t5i z4I-lip;B{B&PC3b z92yjWS{*S*yx}m>KNOP3$OmHpf(*i7`DDJ9=$~gxH>QC8J0}Z<#S;C!tup-wV<5v1 zV8EARgn1^)&t@>D0bWcJ48Q;sa0@d183_ZGRmK4DgD?R7B@Aq~kzAHU|A;wU3l3>K zzwrdoA4e%&P>y?^@W^dt%Y1Wz*&1Np}YvrZl%|L6Rx)w6YTsDh*sJhbt6?pKILePOCG z)u@-}R~Y6)f1h8N8quQ+)`r(sSEKgmZ5fuVNp4W6lAny)lM&IoT93Fvp;S@f|64g% zjx~Y**9n#$FY&(&Puwr@d4&v5+%NHYAITr^e`P;B1?ix*y&W zmp?z?{{;CX%@Ikpe*{YBYHk7~XsJ~Dw?lr;7B)hHCS7;E&0KOdH!9C+vl)%)>5JDy z%sXZaCuTyzgv0&v5Au`aYN{Tm{P)Yhi_uwqoHNft@3J8zCHZMM?4q1G0G}W~i8vNW zQOf}Q4j<&_Oqu(2x+I#EiObIrRb4x-p+ErA&tS>2WjKm!6#4ITwMO*Wr!U6kKR2Pu zU&V7=hHV1p@d)#UjZuG86a;-_qu}!?@P#COAb%izCHV6seI)r)<(=WLSj636k>L$d zYp=g=ztHZA!yAmY43pKvaxV8MZY05@VD(^qjWFBy0;Fb!HJ2nesE4bN?d{nfv7A8V zMGnH@e(9aqejSE%O=!RPilr59MgBqhi+!6QJ!JXU4^Qn^Ma@qJwO@S~KbHBbw#o_V zA@d*cPkPiKv_|6mN9~u5yMc4tGHsay^hY7N1-H#2wO^ooGU~TZ7jcDaJHwTbpi}}f z{cRb1ZTLCJxr&-Q3IB**OgEkr)5X4vw~_p>tMK1i#F^ve@7s8$&%bWIV3x|C=$`;T z;|K7)$d`+sQ8&}6z_%m+y=R6S;_!0);hePMAdHHKp%rMcJ(sW=E~UY+FY9kTgjCJgd8q8)dUa^tIbMQS}dd z-RFf9k%-JcG{?o+tExH3v^YGN_rLa zAC!Vtd#+;1CTJf$k;7q>LUpwQPX$oQV{knVPt`9;RAIP%4sXdp3`m{eRk2~Bi{MfB z2wuiM!{*>THzektTCXJWLysbV)DS?#{~!9LyjMf`fcpu5qdv#X74b`IRA1yPxY6BRzmFuCTT@T zdGK(ZH?}LbYXJU?6%*H22H?Th8ni$b)LlqVTSgq-E%*?BwvbJ=H%+SHDE>5w|4BZ( zP>;iegIY~-qyAItRa$d5_)nJK7LtA!=gImT$sg3Ne*KN)4`Pw@=QzA9e+KK%eHSJD znXjs?aw+gq`;{KG`~ZFgWH`=Y4GqK>6!&&$@nJk846q~u(w{guT)DZLzK}F%V9-zh z+L}B0(ggaaU%X9BlIXu7_B`*qfkOq8>HkgaY0=Xzj2GJfd-QLLZ6WYBTwgMgpUO|=CZc>nf8UxN_lo1hal*Zb1@xDCA1E0o;A^XDD`eV5 zA`pJi)6)A~vi?woGM4%;7FmCQ{tWRi>mMLth7I7{uw2_P8D38XKuUPTmXVUKP0^)5 zd?pk9=aA-BJwShIf2=mN@lJk8O{M=P;-AAVNqb*#G1b2U?dr@+ulBrO&AX6-)rxj? z_}R-j-)cn*a!B-(F`$`ussa7{7q0=_4gAdGyH3Ab%@c-JtI#eE|L96_P%9FK3jK}f zLFAZ;{zN~)C;E5#MbtIXirQ&&6tfWTKp!$-hYvM>Z8(FZDAixN|1^LB)PG>$jX+B= zh=jpSHMOzEOS^h5xux{|D`X68=d69FPm``V7y}ues3+H9)M;RFYFA`SHSa+kK%H(E zGhaQ&Kc6mA`%myxgB1)&_e{h9?T3UxI2MWVJjoBjz}xC;@j?1a@`GwO*13R!cT4&w z)gID61n6&y{#ous+8pP0$NOKI27z+uc2ljA;6YxZf4ugQ{wa_IBE5irn6K=IZ%6O( zq?kGwo?1U}*s%WouLKVsYn1D+TCD;DDf%0lUnkL@N}#|0Ng6OPp!P@NK{*HW_;~*- zB^~t#@>@jz%i9PP%a#7uU<`f$A4T7D5r1#-B+@>p{t*4C|BKR#_rGL#1%tuxfaWe3VFPy;qn9-qdG|)V`UtrDGi<%?@w}Jkkbi=gIm;@d0A+ZzZUtN! z@3|g%%~s&4_O@an73Cg;OCOS|(^6VtxONBOt06_J1JW8H;y{DZWHni-5Q(Fy4PEVB z?WH!JkDVpjA@rh6feGd&SZaQmGK}3>%uV8QT!n7_=bgKn!WzSA;fT;T|JL*Y(A&&AS3N}tM4qf1H8vgDX^sN;?ju!lOGRDzDf*?HM{W{f>h z-J^Go!*d!BV|A8X_vi`uU!OO^!}@QIt%x-Q0>=wZbwfwFvSjB)&&63Nl@D1Eue|2Pp>IFXLYfgN(HguscF^si% zOuB87CCzfJRp)<-SMxV~{Bp`l4n)<@PVpaIdiJd4OZP4;%lhcaolB=Q z|6z$4F0H|7h#4*#zt_oeyjp$9d&M8CCaN5BeQ$~3ji|bmuHfc>0)-s=)=F!OzqKB7 ze=mF~*dp@VQ|7aX^{nNJ6|rgmJS{dgHnr;XvC~)1P}-N`Y16m=u+*=KA?=vqd&60C z%pB9l^q2Hibj6 z3mUzY(&u**%jS(}2Vln6MA3NHGs)X~a;~*&VPVJKTMC^$xPhNQvjb{MuCN-TT zWPXS~#3@ejR1#HayyZiMVJ}Pk~b;lh_693t61F!Oz$E7lThrIs3 z`p`%cG9inR)`Z+AJdfXII2==aD^@U(l`Dl6D+IcUomN1sQj#I|=#7Aj;D822zTgz8dzL-GiCc9PTVFKkl z5d?ioU(e6a)&u_k-v@T=C?yJnHiw>h#*mtNcxK`@q-TEo2TIq&*K!7aU%Cbd z9-i8d`6aX2?RL{IeaBQ+(>0=ZI7{(skF3t9#xGNAw?~-j%JM1YmDNmjt=H$Rt!6~g z=Rz@NxTddjO_}0yk91={hFUwyml&GB$VdVWk;Kpq6r?=Tx5N^RYwF&;vt8h67czky z`u3)KLn88JaB25~Z!GTl?IQR_2nbTx7ZCQ+b8)Z1O!4~m`lK+fel4EkaJwJE;rG*( z!amQyn~~LGk)0ZOO{a4UUSW` zVe+F#aMag7@(6`Ip8WjluA{hIAi8|qd+(jnaqqoycH1^rL)2P`#<_fdGB_6Yuy&FR}NQK8`CNMN71L24=*r&;DP!{a;Sc3b2H^vNx!Fc z{`|9N9({EFeEEH0A;M?p&#$SG!&a-=O#ezLe*fK>;_bZ$@@GE~ma2@wYpjtHim2g4n0Mr*ua-^AzR28(lx4&sHj)Q2)YO$LV1CE8z>gDc_a>5e#rSj z|JW?&C!W8DPCcZAe{J@fDZerEZ_G#JO#I8M3jH%R^j9<;Ix|-)Fd?Qv{;&ZfsjhPK z?6K3cN6SzC<16&-BzXua3BzI1cRG!$;3J;9BF+e3>P#&f)|#rQ_{c|mEGy+G+ho_!ebot%Tt}g!g;UhyvV7^$LTKwn# z@sA5n#BSpKUAwyKE`M<0@hI_VB!(DpWUO7gcJt=7;m);*@&Bv)o2qWQ$-`lw8Yg43 zbC)k~+B9Cs7xOWc{GnJH3#{&0?YsAC|3oa*xT)&SpZ=>j5}(nG(a=Y3TXOfj)#rcr z*-C-JV{W`^Qc}s#;grU>aq`+JC{EIm2%C7XjOvwpTUNHLJc4C4hK)1_m}i^7PGIve z<(z37k{&NH29yh+S7i?bq-{**d>ZVX(~8B>WwcGn_ErroiHCEVWcneOV%^bS!;{L( z9TnT`DNPks9_@_gk#nOT!1voJ6$S>Hf$()*gQ@S+pKvKWbK`YJ(rmGeu*$ zMSWw67PAkxsI+=KVQ00N-kL`nk(_GwQ~?k6s*d3060JITwuE)Gm^O9LPGo|uk zJaoE+LM<((H#=0xEAag=CU{~V*{>ccVP9(wuFQgU6nQXz&;^rOas#3`DkYMsTVZO{ zynN!KPk#6L=&z=K@#jy@e6Bru>lf=ApIdq9yJ_?j`EJ^x#otYPcKvtLD%Y)VSpUMh z?<${trV?Fh7^Qt3{Q|m^0V| z&3KYRPfj(f%*>u{)5J%R`>x$7rX5mgIv+9Z>G< zCt%YgCt!4yoPfy%6#77w%&%OP^0N=**7nAx+^#ZC|vJj!TTTSHa!-^<}<*6I2I);-AmZO3Tii;ylCuyWV@S9 zP4g-7zjR!HQ#OqoEX-crQdC<|0M0mvkm>CXR%lk~)QBng)O-rsTI3-6+vZ^Nd}4~` z`7#p)HxHFmzql;f7J^LbBn!5#EL}O3J{c+wFR|Mf9A`FDRh+)v$<5c0AAx-$E&JN36YDC~FDrmc^vMljte#C$*|1!V3zkfn0K z%G1!Sezf686{#w^qwU8#_u??aQc0F_A+YRT2|?g<&5Jl3}~_U`YId z$*=(IF|?ono^vmb8FNeY?gMbhw%y)q(k(!mU2>x4rw6B@O(ikmB+py>E)sfSXWlAy z(E_r7MiMX^0dvL6v-wELNhAC71xh{chQ~>TjPRQD_g5BdS@63Be^~JPg2n~!E%@t# zzyf~3$^}m^cy_^h{N}XY2aA)#bU8;C{VZH;bh(}`Kc>rrbXiW97wEE;F7MGLNSCi? z<)>*YSzAZ++77Z3B`GIR_OI<2-&VJ4&7n^}Syngg_O7iXKU%?-m#^OW%%zTSpCFEUkPaS(DAL zX6m?Cvd?dbt~pkriY9CB;-{aiy7Hs0nhU+F-+1};ckX=Tfg3MO8$Rxh2djGKd^hy2 ziH?sy`D|}f)wD4OtDY$T_TbbxJ?}j8=hVw-SE?#9|MrvNznFe*UgVSK!e8(Q^mW|! z7rx86pzBRu?w+{%e-8tEvC**2gtynx zO}#g^!wC`G8o;5KIW-=HuUDsm8q}QxfUkqO#U739B8)a;GbCA)N5Dnp7DuvX$Pn{+ zc4Yg~{P3lGm>zobJ?i|Xy5P=<7vO#C+`ftrchyE6?Pc&6wf*CLwaMEZ#^miE-})GM z3o)fMS3icFh)G}kwl?^aB}fCF#Z1}FZME<43iv5?HPcGU)d z>!f`?sy_UDAuO@T%j15;zpnxi9yij9&I@k&cvmgVvGzTTXIeEIxSd2DZ1-Vdh&LV` zIZ?jzKyZgM{w*lh{Q1ItRTRa~D9duV4B@8U`#xnIl(hUX=eO7>#53Yw$MAz3H^g(y z*3(UbTgv_W-cEPJY%d;VJ8eMn54z}Xf}6BN$FcAl`vaG;6Jf2m_LlI5#!vPwjE-r) z01t2qHs^ZBw1YtGXYq7%@(>+Z0i`+de@WVxEDI2*n#Bg_Tb4e;E3L_?cg&o=H?=qD?NPgh34K7 zExkW#>3y^%czO~sBvc$x`|-*}9&MZhN49&?@;&LqZti||!^it7;J#N_i0}KIk4doh z3~5Ifhl?$wT+t`+b7#K~g-7pOoKE(h#j@`!D4EZ9u;Z0b4hk2aHzgFau&}vyOmttz z1-abeY+Ah-1pxY-LoI4fS|t4l3xl6K;SFtzJslCko1IG=oN=ui?k8cd+d^^XOaldT z=HQZ=W*Cxg%)l;W*>KcfF!HLaM>z_|-&o`>@!T}|<|!4Gcij1t*od-Qr`|p-M(zNm z)>zhvf-f)jTnA3m4uOb1bZeCU;dn7Td{#& z@bKeoTQgm2*P58Ms(^}Y{~PN~wHs6o%$^|sIP374n3q(wD%|g88<(3Jenn3=%`-9U zRE)->4qnP(SKn{yWO7Z_zk*W&k7f@Z?PkqBQ!RZOtfy-3$;vOuFH&KXzu@M_DQu#! znw{H1;W;gyLzId77P|hl#kApZG~MjS&8C&oO-C~v&(o6#w)^`u{dh1ql!bnM(-$iB zO;DMN{$60Z8M^>J0d>-o)_f`FR}E`cem4!ys8=>Z$z6>=<&q~Fo_uQMx+RsKrKb92 z!RE(JAQ3%wHf&`98E$TcJtylM%U4%g=6^Dlr9s5tOk zknVt4EK)khGR>eKp1=jnkBc^w<^|`Yp5Mdk25Cv~+z+)0bpg(B;I;V1b|_7#J|#iu zO>vps=EZBMt+NkIzYp&u<7Rv)dF6n)^zgdyisMZT)0j2kmKPwW zpr22S!j0b6!-VRpiSXu8huX#deIe=-6x}qqW-$H4>(ZNk=7q15*W`(jLgvCt zb{e)=%4fUVN55C_o+HC_>!;~zPa1fFeZ&hXLmrSlqY;cd`tF_4+56K@xMGDD)?V9z zUi$%f)n&)DV-~Tlx2T=1?$ny|;f9G+`MoH6)MFU?7k<{(`0NY(ORIlXNx#2*7XFcW z{>kSXUaHJ#fQA>H(Y_@REjqL%z`im?>Zdq09@UmM_V66ZC$pn3`X!v1YfBvS;EkBQ zuVq^F#)E%}t~%_<^<@7g`sQJWi9GFI<(f&>%xcFScvTkubi1=W{8<@mUOIZa6L#>I zr?IOKV}DS%>QJ+99fn#s8jdOa)M6a&kP;XXT?6;0qYi9$8OMV;M?yP_reeN>x zEx6OcjrR|Bl|gZkzDLyu4~XRJ{CV4baCEMF!%I&1YAMSMMy2;P@{hj;j?878S7VOsg;K8MAQ2M-^KL1I*)(CTQ zkB%K44Botqy-vDj22EFW25(!&UL7=D?4X-(I!s@+BU&VE?#%NSF(*ek)NqB<)ca^> z@4`;@3>?3*_k+8au@6gEIi;U0L&o;)EbyQ7=KD`Z>e{q=VgvjjKjfM*N1$A+It+&0 zV!w*L?bGP>ono#dPaN&Y5yv>PXjnnl`(CFfz4!gj;3LK8x0r70R1Kj$y22V1=IYR= z^!r(3=(D!Ov7mq7|C<8;rog``@NWwI-$wx>Y*#XDiuElwjx2Zekt1>ITVbkfeeU5h zVZTj2GRb;U?DGlbk=k%+prJvAC)*Us{^|x99;^2y>j$Bo8#{?J+s1OEIIHC0Qy6~) zOCZO?hS?h-c(MvJq*-%pxiIpBop1zpW3Z5>WeSp=@Q7isJL!j;-WplihMgcsmSGU_G=l(&$?hdo}i|k9Wg-+Je;p z5f_p^(TJ7r4LHa@CBfHXbvo?CUgaN_;aw3}36OnaBR{hamNPD{3PwcZivd4pJB*LY zVR;fj?#V-DhRvJ<+r%5ldcX$z8KNKIPu3gZj7eiTysKKYEB4peE&PNDJ>GV_X%Rkv zamW;yASm{8N(m@-*GdU+<9=ZOKUFRP#r|J`r##B`CmB)>41y(Yf8yrqtCr5{w|{MS z3rC}ymMQkHGQ6wUck}feVW6aMK`sdc#r{OG|A%#+m+T^XT;aHnTqOsR|hS1zyHr0A9v`>`#1Elek=K-2NZ-C%~X@(?Z4me=r6E@D@TK z!TvCeO@a+J>~M9uqNr^D<6o!vzZgiLFi_H`T1*&FosjK+;`A@aBI7x* zAC3E8(CIiA?4EKtXZ>{l%{6yQ_J2L(f8^+B|A%D%?4KLk5L@qG#K8g<_U8uwOR;Za zZT|gaz3cOl^#x5@!hWujFRz&%3JDfeKv+M){xb98=#m?F@AvP=w(-?uLF@7CXcw)= zzKsnLwL9YQu#YZ99d(Y#%&`#tLw2$tg>@gOzdcTWazLWflBJVk|Bn)AjYI+gvj0fL zfcOva{TS5TNf_`mJOyO^EYaVvyEf1k;6TS{BP%~c`x{%>JOE^M$n4Zxcw?$*$*$M~ZFc5mv(A8WnqCLEi`eFFtwZUrt}aAQ6705EDi!aqpXMygwvF=Gxe->ZS@s`YXgKePobYK-e+nnf@U4&4d2QxGckvjse@A*f zZLu@fi21zx^k*)Y0#DXwtjA(g;K}-IrOy=^!&UOn#}@L`22=a_nUE?z9h)Xn8{C5O zHyCVLmMpR$zn|Z~s{t!W8XCM2SVyjOwUQTfU!CU~tfGStbMj=aQaQurk*CBx{BQY9 zeHI}UA`jC87=$GF0St7pSH$POp8@ONVpwQV{{OF`yXxF*xjqG{j^KY?d1&`jeg(gnluS%jXDwTkV|fBLzCA2qv4^2I(?ZfnN>VWK^y33cOBd zwz)^$S@Re_p|GTo8?$Yjx7B^ZavrAVIA0Jr@=tDrYZYq#V1M`-Jbaf1P{%iue|O?Q zl`0Vf;=e=;uskBuGl45a`mkf9{1XN+vLybO=ua(sn!%Fi0FAHbhy1rr2+*odG=p}9pVKBsKOywq) zKmxsZ>ENZW?{5eMO2f6=U`0nV743!%-c#;?{XEHkvcHW88zuXBrTx9N-+xhD{wV&7 z`r#$*r>3eOUebOpMkf`!3;7?T2FLw>969Yi5ARLG2g5^soj|P!$^Urzq&#f&ZH(K0 zrW(^BekA`#A@V#`8Lov5Xo&c~KL-*9lKfA=pytllAN{vNe&ovjm#F>qy#NJv9j#TA z=@+Mfgh2wlgh5T!_wV~)18svEO!~*gXdHvS!SHbmr1m!v16lqfg%P8;EStgL+ZZud zheCG9kBy4|qkaqQ63$6E>ZidD!2p&XH|^FD8~(N>!)8pu4hvI+sSDR_|K@Mqu)ba^ zuVd_oMCIhnXh#$em@^V2tP#`h{ow}zQ< zicy_zuMXhA5~fZk%}-(WsRuI_-IQv+bJv`@ zYN=mS8lbbKr6}qiT}_WTFzGvOEfcKqL@qTEVx5w7UUgK*=xmYgWW3~GK z7;B6DLQFqlSt(5M{n!3S_;P5koB3LDkVEidCbZXNF`YClf|tD)NU{gsI|li`a8naN zy0dWzs=jGRn&dx-{9i!(hyE{l08sQt1%tT$N&2sZ0sN0#%m0LPQvOYn{k!i^X!xi8 z3F*r##p4v<&;^G7f_`|#e*_v{TUMb2Px(j3#!c-XbX4?yhyw;=&=2nxeE2f1{Tov_ zXPKAu4r4I%jOlXzBdzGcgy4Ox))}UwUv`uC1+>5Yl9RkIB+34#2KmoI3-X`%&m#X*a_c9z zzr9c?#xANL|21*{g=>WI`}@d$%^Y;G6#tQsoHY9IPwlT@ff+0^J|uleLi-Ef`vMUt9Z>@dp`R!5|@hNrND)2!jze>i-%rs1Y%Tst4L%dGtc|GRTeN#>t~6vX?<& zsxbAs3B?@$2wx69Ks-9#;*F;T@$cw;!2c$dqzq5`yL>96FLDn|BiPXZ`fB(eEATWj z;khV&qQDRCy(Er5kc3)^_A6}&9FM^NCa^&I^sGfV;imB)N}uEp`Aw8Ds9H$%pGKe* z45}7xy1eTw{|HGqf~V1k6GCJ=>7lX@jKLTv@Jb&NjxBIvY^w}?T)WLi`X>~C2)H{A zKNtg|ztRIug3&S2pD=*-00)+8^==+JH(|$`NF$W%*);wJ-Do)K&-i}-M`7enFN}@* zKZ5)gpO3BPYe>KFcu0QpPsdE+MO1%z{6W@V;k}P9liH6s|6h!XUke73|HAs%+C+G+ z4ZZgScw;K4lSw(vG0XZZWT$V(y%@rC6U|6INe-NlSI7)f4A$aW3-wc?eo<=JBNFzZj{F7xH#a-*E@t*yoT>h<* z6T+W-7p<3Wf39!ZQm&ZBPM`oolAWtqxJfuop5thYh2*EqKg9jjd}x;pFLRGp)Lm(a zm1FFeD^%cBF>DYG9d0nZ)mF%r+(7bY0DdK0JgizSYo8eV!RU|7KP$vF=+_I2h0_D+ z|CjmiPd}djcI04nI6i(u_2+*x|385LFY~WSPr>L1bgodI|nNw;Oge-`w9w30gN0Vn#;A|H4(0zZ(0CHIg;)j$jjUgo9o z=MoR`9{F#R$DemBhX3EV|Jg+N+N#0u>CxH>FOB~Idl^2xk1#;(pjiaTYAO+aSngnW z%D;?3o~;Btke;rO$QVHWY$X3jB)zi0+GDxV=zVedB)u@cj?tMv-HW<5g&TL>ghI|! zjIjaaL6)EA1>fl%=ZS*ke~w0P2jssj{S@g*@}Ev8=SJ$JzsT(ZlsKvO%J5dyzA?pU z-hMFt21)Oe^&g4)fQGIwwF)i16TZlHx&98uK$gD)7)ZUZr4@Cv7NLht`V0Dx)B=zf z&jI)W3>5jTU_iO27Ql`cnBXb@QVY-%?j%~f0F;up(QN~7_|5%i|`yEe(3)i z9Iog;XuT&wgPyMFKWMr^eQ`ADKQ#X1hX2+qq^?p)`r8TjiNhE`k^L`H@10tI(lcrN zpY$JU`bp1(|31>+3f+Y;MUBHle>?9!e;Dj9!%Hm?23Kvv(E&_Vpr!dQ_mPoC{ZMO8 zE;r#}{sEqY{!E^u5VLqZ_5fNjiv|9lY)F~s7xUGzt;gQ%_y4yY=}bTU0$=UELDC*E zeoIt<%yLFr;rk0s2#sI$!y}5=u4B9U;gLV#{OR+2HRuBEmHg|GHLV1X36yPA$t3tV z{>9vQYQqM`U%;Qz`0W^X;SKzvj@U;rKjyz^{G8~sSKKT5gzejv)*my7pg;LvBke&? zGiabc&q@n(xN4DwgW!q)(4AcP0{~k$C@*n1r^tS&g&1B>F7A-G6oEjkOO)CQKr8%eks#mo_|!v{}bSW!60~GAp5@q{T2W33jO>2zbo)E z1`IP81Jdf^{_ju&W&d|F{bl(t*FVs{o_~y=<;VD?EIq`d;ZCY zB>q3|^Q{s4b}q#HNu2*>>4WOaQ$M#K9s-2gS;_z4&-j@|6XNtI?|om0!{=|5=`Txm z&^{0He}u&r*FPoR!DXZDzZk3s?`4wzU)g&)MjvGUr~WhfpLfXqPw%AuCwXtrChy%+ z|FLkw?fzMiUF1KS;{?O`jeqnngX|^$(So4BEB>Pu`2W8DXbolnCI8V>i5=AYu3anj z-=!Wr`V3~PiE>Wu^gsKLR?`2E^Ix&F%1^Q{0|cc0ci*O{ADoFkh!bOF3cQs6(wfRa z`A@o-$~hrCQ-OQ=WT~SAc=#8TXCS2>Jo#iTDL~c1K^S1% zr?VFGGPURf)W-E^NMMW-Li)geCDnhb-Bg2R|CR1Z{L}>f&EP%)|EK->TcZBY&){#4 z!;|zE#9r}3)GDgiRYUO<<{m1%SJO^gyNc5xjYpT3{gE&ZTzXoCeo#8)p zAO=Z(IwxWDC{BN={X63Br@z$x$?dP?MHu>9BK&_SKL@p61L+e6L-50hRs$eB$~IisPTgK?1y; zYG4Aq27|~+d}(b(byWq=*V-~9_@wkcZM07m(6Su-$V>hr^{=qsulx-MN<0nu&N;%{XH<)Pw6L&A42|N|Bpm? zU_dw#24!%8D(7F6F!)*&t%KoZ3Q zk0|^P{h31#^2Zo~mHLku!4=Sh{KO*2{YM!d^#|O;!~e1jkNP7>{15-Ri{Ss7Rxe2K zXutNu|Gt~*kJSHE(zi+dmqhr%{4eic^3Us+6b$4VO#Qe19H0g({GSIabEW?X{f+oP zzJ4G9UgG}*cwivw53~jjY(Vl$(jSgu{8t%2RN#RhFc_3RXfU8Z{Ok2g@!o@t^FV#X zOqU{k1s~K$^tC(_bl4xpnniV&^jF`;5cY@hV(ce`L-N0l{>uofhYA3P4DX8gkTxAO z>XQgBV9q}gUaq?Ur1cw;|9Xm{CyeeX9Xn+0N7@5jN*{9qST_;C<`c% z{-tx^soN^-APi`Rj^ww~Dbqj4HVL_>S}xPCCvpVzr*ST2B?#ns%+@)^abFP+V5 zu=kGni_Sk_bqM}x$LfvVUsXy&V7Ns8smW85rzN+hyxMzFqW>l65uS$ocLFuZiIkqc zpCJ8Ly+L=bQTiY`{r}7Q)A&6Q0~&t^Vvrmqo!axVr*e=i0Y zb-_bWkWA@04&x>;paYy2(fX9$KYy=k+_0)~0p|Y$*Y4c%(%*Nu@jiKEvJE@;7`ui_ z{4XYp$=%h&|C2%Gv19%1mpm2cH`3|+#%*cu@XjUgc5jsb`%%Me@AtRG#zuO7r}a<6 z9~z&F#Qw#=?>`v-8|C*GY3%{t#Ucdf$D}WK5QY}z^w@Q!5OUv>p7yV>{~+r!lXJND z{1|QE%J1*DFXA1@aS6LWG=j(&V4RqmoFKoy`!Tq)(;J7c0(gH!SwA+clh5yYb@k7P z-!-0Yc>l-|qF;Y{WI;Nv`zat{fR$S!)UlxMjg7Q^!Oo}r2JG>#fBMr)7|{4n+SvRU z_{aZgPV11 zA<|7WxVP$A@AYX{?hI<5d;ZL5Qp%EzDJb8rg{EO6oFMc)jisfIGZ+C`;R2v z!RpO_{z{@hc7NpaSIML3%Z>c~l}<0+`2f3!y*eSK%@Y{^{plN5()XXFXn%U|qkleiTl41=$uW=4{N$C5%f?JJhfC>WR_^&z$vdU1 zfA`fze|n=aA|yE$rw66)N2I3=`0u=}0T-(yt>_n6nN#@zxWC8CiNnQTiHp7s>>1`? z0TKuKF`)8^1N;~?F8u8IH8bgEB)fyYKYL?;V6X3?n~`p7s-^Lp;!}DV19HjfWeheh z`0S-eXI3stiW`$m>EAi|!|;`R-Y)%f@!FT<^LrHkE(YWphymKfhe6rec=SQkp9Kc* z{m9=k21xto^6Bx|Wcvfy>v+`v_4Ue~n?vsecve2wJAd7~UvFH7ZG;h#7TiA&xc=E6 zznlLiy5SXk3CH;1KYdPLDN->0jK%uf|CK`Nb&4sC3mey0;d(GBy+TxaW4-e|`|e5a zJAI2Dd^f%8&gTsWtK{{M5@(D8^t2NCGV*Ez?ml|;tI5}H-XuM8pxr(k`t1%8gNTtKHWbg z*B+;z>v4V?_YdLTzbx?y@j1*tCY+x);@-l~MJ?Tdbi1j(UQSPxhZGDhOYo5$IP_{+aikMpzA?lT=-#M%SHE z$+Uqc@BUNW={uL^Hg*Sb^O-~XdPnQGCmvjjo6qW{uXl2K3r?0yZ^ZfGF~B!r=ux&`$K)t-w=bC%1M>ZUVSlM{T!M1?2@*Rg>F^9hjRI zkLHHP!->x2-zBQUxpak9y46!uod5co^m~VPDrX_pUQ-o>M#K>0t9_71BM+m=*5|CdnHTvibs86h z1b5WmtNWPux<9ubtG=s!`z{7@o-zhkV!cD4*75mS>I9{~{y3GVJdkpd`Q8_il-D&a z6rgh>SnZx+F*Piel++oI&#<^Rth*>MM@@!f4Z)6}Eme-7$5vTydME5+AY1_8m7?xXx-M^e8|cP&TZ4Wn~$FD`;w&VvpgqGcV=0+wHyQ0 zAZIU2Y2rSlY#gmys>Uh?$q@{Fmpd;}0>rZD$dT2V02*9AYEgv@Swmf|yL(*e#Mp(FBs%C??_k$tp{bhT8-F3uPwzlWjT}fG;Bl0>&bdK2M zG`+Q6DjqpH6l)a!(M5RG78kj_-OLdI% zD&n$iEOaYcRM4t;WU?Z25=Y0@^o+D;3Id5HWo~tx<-mGzyJQqp)aM zMU+;jn5fVx1tqVQNi)=z03)kR;P|90jUm9O$8JYLQdVGq zTF)kgNWK#dcHM9`!IG4wj$xG?AC;g_%CcDF!-KQ}&n9IB2k0<8*#$N!EtrqD3r4*z zASq4DPqypXX;JDVhcmU6Wzt$%XFAMGm{~Aq!pw%519LXaJec_~3t<+)EP+`Ha}LaM znDby(z?=`Ws+CQtZe?3*U@m~U5M~|B#W0t`Tn6)Jh?~-?rXR{zqkJ{WSEppap4qBy z#SisRr_6wRCfxX;KI)WNaOc2{AL^w>z0|0e^lM##vR5MSRml56`PT|F`GJXKk|P_fVyge|Hgo5;SB-0!{C_DF zf|X5VBt!Rjh)N3a(!RGe_xaN2i52)mOkesN;uQSdK-~Yk^eMOwrVxKAzVu3QoS2P2 zCDNyhY4?;LB_6w5zGs-*yVa)k?rHTzy1lzwp;;^m>INMOQpGZ^XVh82xI)qtc^LNN ze6(>K6uChEi0Q&9#RAd@V$(tkiRt1g#ga3+&c)XB_u?`;lRGW+`_Obl3_H6vc*+xH z4WBYcCy$PLxO!>lRZmG*XCrimaDg^f=q}}kk&3X01~>F{&7Cdj4H2RmEGl6{1F0Xe zLz9PjCV}|??wgYwPrF}>7NQ#wA1YsjYIoWcvL%UI<-EJ`?(VB7}xTL|`5dk7TxoM>9LZM=?8b zfwWi zh-X-PP>gtvV}qi^F5V)Ca?wv0|KO!>nQfX zyb!?KX}gT)DaG9f0e-6MbaJbVn?xo8K>T~3Ns=>=(dvGj-jp{lHy~h7>OW5EbkU5q z-MS+Gw{1Ed0|q@lU9VzUW;knLM(6{eMaf`LYk8JcajYKub=m+?R2TwyFQc>v2YMM* zcpJ+`wy}o1Hhn;0USVOLKEJRqKUXpN0R{bL=W3=UDd;ylSJpkPAlsT!1$5q#ZS`tJ z&=kfO3aTc|&ecT>OIW>HmoPhDw`gGvJ$X#_d$PVlV1b3j; zx4u6quj#HKsLA_>OzL;!z=-OxPez& zOz1fJfGAN^sw1L+j=>NrcBy9=28$wV57&ujIK4L1tK>7=!^}Ulg+v^03k>~vn>Mtj zjkm_fj|3-Szm+~^_?~`0MPOip^aKXNPlpReCIEl<0Ph6JZ#E?fSA-`dXrTM=9zUgO z$Pl#lkb&`h)I+?ovf;k8#LVEiB665cp;Od9tkCIJ!>?@k5PnhGLi-T= z5Z{Bk%%%iLqSNS53jWDYt|@Bbv-pRM**e6})#>ox|J>_`#=n}eqbRYEH8k|MxUppV z8*SR?+e~oVnhZvVU1w$j8={kE{W(xYxHbcaxZ6@=> z?Gb!xdze8-?K$v4-vVV)t>4(7o8b2wV&@Y#PHCVP zo{o+^U5ZD<*Py}V$DejJ9)Ghql9SOYzK5crrET$GE+mqA6SWkcn6fg-kGM)|V!37e z(}q(dsW1h#{3`sf3YUvj^p{~3z^v$wYZCg)(A7V@TCtL9w8B>gWrN4(hejJUT%lA^ z+iOivy!KW>L3~zNKvs zI+x+^_JM=b(d|dyE}zjh$eRg%73e`C@@SP6dG>QD>;jJMq!~*Vfs~;w?vC)Q~`rS zyb5(d7#34(LXZ{X0yj($&++Uq*fm@v{Ivl=8u5%SAt+KjquRVz_F$M&tHKnBHh@I|8wR2U3a$ zT;fH6%h?T@dxg%yvPH<9k_NqAt%e1CIX#ycm8eEm(=b5)>rfF4rrre-q<{He* zypRB7w!B{CRpGp0xW-`7sseNdULV2-1V$LRK)usEEa z7)nB-%;H&ND&<_=g9Fta@wlFY|>P!!X5rER$+9n7oL#f5ZSWa*Dok4>rXJiEWT?8J8aDvGk4Tnepp|we>92sLk>oh zu-ggNwjrlx`Z?o+S%F#u%Nz*TGf#(yFuw>7XMU*)W}XRWng1{hW}Xd?RJ>$~WL`3w zAy0!@#bhvWMqKV35grs6YKmZkc_D-kAH*9%4UvNb4QA}m>eN9-VwX_7tzj7zh4Dol zFjPFNo~(`bGHjAALKHbx7ld^OmhD)uPoo9C)}hsjqV8auft}kPuAko?9#Y#L9v<7K z3NC98XTes37hX)p(v?ZjkQPk%D`OAQNCwt z70or|7lS%r%q+7C!>cAgF!=%Un^SLUP^!kN>K`son3gmxDS`ZCHU?9cS7EKWhT_fT z`3lsrg6HSan38~as6}C+BY7$f9g@9prM#N6#g8Q3N03BU_oQ6XES=Tvnf?*fux5NT zttaCn@3hv#Fg)pSrOU4Lk34B`rOB?ek36YxrGDfUTd|un{i6=g6sY!8J4A~jsR!0p z&)5r{yE~uiT-ABFXY7Uc!`*-Ee!asp>q6&Z>@s9s=)48hs=_0=p1u!{Kb5p8_Yb+} za)a|`<(1}b%kv;Oi>_<&Dq0VBzYdM+whtX5-oPEoJjciGgVByVJNK?}VuU|S8or&E~I-*G5 z?UUj}hZPoR6qa(DGD*%!Md=BbEKo#y6lqZu6@O28ik^_uhkJr(o2Kkk?~$H4r%-81 zSO(R$4py>eU+65eMqX86vm;D^Gg8Pi8tER&4cpt*s8DM02!}`*c1uqu&I^sQN0Y?X*&)5TO4*BTYEk{SVKiqutj$6OMKN z(=+i{_w~b2APnT@o&mW=oOL|dQ+@`Gha7wV(KF#_@3o#uM|=O-GvQe8^`42xuq%Ux zJWS0HDCbUkiKT|8I!tySYNdu|D7|~@1mru}?Qr&VouW2GybfgnUl3nVQP5bhzu>ci zVTI9!w!)s6uVY3Rjw=i+G@k-hG|Oqj+LEQ4&BS%qBng zwTZM@1)cF_H#`GTssS`Y3;FpeN=^6%c~e{D zS)+x&Qm8_4!#&0^)*zfF7q!g$_;&FTIZ*hAWKzN&%JdhRBZKnI|CtHv1ptkpD@3qS zNm}>idfPC@k{{@F^FyQ`L=H;-JtZp60=P{I=x|Tid7=11=T`Up!VXW#h0exSVNId?-3ezLz0_!6kmJ^orf5@4 z@bHk~qTFdz{aw~E0X_Gv32r``HvXoi6B&h^;H5WnTm?25-jD`N{_!5>i$}AQZ1x3sD~;W0ORxo8!>j zXe~5zX*P2DIe`}loCMGaBZ~X;^fKVscyfa|63C=fgJvP_WCA4s8ljQ`Fcwf*s{XPh z>`<24SJpO4@IC=Af$SWB*9deH2$(H1(ti|t0?&hyh!j16=RrkkISi2P#fwW`D+ww+ zRO~4`gIjub7E3%N%%jOb=^G2AG#wuJHCk;#UI|!jtQ89Ey$T2J8OAK7=4fy2sS_m>tgJ~>YEhY(Qh$Y2l$}%FpcY$wrmyqJP2gisbViJ>h@4kiUwXUr$5Le( zUlvf7T(+gG3ASBjd&-DgpDKH%Od}E2rV-YZ$_%uGOk$u>Xl(O41im1^=YosmMjI*o zH%0POm;5fzFn7!D_EguhE=gn+X#OMXfYE<$*C z1`wwLN93WH&3PmB=KXmi4f*CjlKUS7g7N{z5?D##Z34FdG`(Hk*OBkoGGt{5_AZ2d zqGacUDP&T%O$CVk9)W8B{v@lUXv4hFy)UfxC7%ZSI$!bzfAZypNck9n7YY1{zQJ%`Z=MmR;^#+4=hut!2WcGEW@!8Fz)F_k*j(p0o=c zg6d*tX?y4V&QDvxDsksKu9j8J89yg?PV5|y_UNHjA$ksRJ9SztYcO(R1?54SGOLbD zb__*huf_T$1rw(kV{{%VuH+#t zS7i6&bDHP8HYcJys(f;JQu*|9;+w4UobrNl^O92H2&q0A;m{mv0#5iHnMC$C5NiJX zZj>aTD=*$ZEEFiF%fTa>3mB3~KdkMTtz%d_S8Nl&r)8@}zFn7t^6>}dR@V92}nz{9J zsUbJb-8y&2+$ZL~H228dQ**oL-kfWGh7x~Dz)=OToWOnpPZKyw;1Ypb1WeVySa@zO zwUf>L%L!D=e97;Rk{{>u+a&q5Nq$P7-|r;9k0rn1KEEF&zpo{~5T9Rs4N>(LzD8RE zFku7>ar01|B~-AI>8Q16gyE8Ht}j6u5|~>E{FRcb)wkxA&6_%pd4C=?a@IW0H?#(t zHLr9Yt@GbU*ZJndj*iNCC+2m`(|F*OWu4$(2fiYeHC{MOrb5BesxHzo(!WFyUMGLb z<|Nj4?@Ez5;cYUB6w`9>9k!CdGdaUeSmcrQ41pgBOr1SEUxzai3XxYSL`G%eIk8J& z(&)U3%}grKi{cjSJ@ZQZRB9uu4OA!t0|N|!9Mt*(t>lW(ir@-ncmKV z7!*)6Wy>R5USt#+Eiax`{JV^loaS^zW5v7*=E(}TC+hCt)h;YWM-V1Rmr=C~3ohb1 zKiuc{c*XXL-4&-|_Em`H-Xa@bR*G%;w-}Y4XGFaQXlR&k8Fr*rj}6WkgGTI9a;z5H z53yP`K6}LJOxXBNY18wmZFb=zZAN~372s_Otj_exVNnTKsc@e!Ig#G9YWm2-tI%~UWHYK7q8CuJHp20jQjbx zuF9TD)%>CJZ^qD{GG*k&o0Z&iwm)Dq`Mp5kh!k+rAMh>tX_f*E1{lLL z7R4E6h~gYGh`Gk=RXr+`sw+^X?$Mjr9)^$Su<@g?1RKPz=~stXvCDWa?Fwr#4inF& zUky((fEOQ|kfhg$;?_w?0a{Vq7NKinEc!NPh^CDhG`)@2hqtLrd)fk3tJ?IYX-P>* z4*IM%tv)Gcqa%Id#9^66qtTuYV9bPbVx}=G%b1?Bz_@sN`otjCV^%Cl9TcptA+5wEC}eqJH=k-hxvQ`Rbb@T|l>N)?AA z%c2lJkSTDMLIuX?Jn!QTRrQeS@zpuii>hVrXsF&&-Bhg%8g((IdQA05{Hd&?E+$oH zRZqvCI%U+wQrs#&4}a{~Q5RQLud7~-Kk!RXwJEgP$1jtpk=FuffSr$DULn8J1kOtV zpZWv%W$+tEAPqnx^!Nidksp&Hf;V6L^HcO9XBZn2;*SeANZMI!k<| z3THnE)T;l^>eXigRqPo?A8#-bUkwT%z8Y%fVWwT-1mj@v)h7yz#wwo8xEhgU;=ovE zlXT#(Z81rM!bGuY?DU`^qNts2#7?Ddx^Ac_>IZThwz9*YYzx$mZe#H!Bv6%7Q!^b* zhX<#PVjSR_QYcW8S;Hj6k2K| zw(~iMOayBp0U~E1)IM>pea6geiP5r&<7BJs9;`JiUvR7DH#N);weELoh~sp%rrsJ) zmc(&c132!B8sfOCHJ&jS@y0Fl5{*sLP$bgGA|S-;`Z;@h<+YTv~lKX&xRuG&v(FXB%F|7*3kYWwgfdL|=#tJ0#ZU5@iX8X>#ZlvnHH zoJY}u=9d68LQSoy&hLGKy#FS7udOw0^m~isZJkcBch{Qs`MvYtW8Nxxzg%njt>60) zd4D2#>uP;m$)&+Bj=&@UjWF0BFrWNhBJevYAj%(bk^F8EP^W|2SSCpE0b^v&F~Q(A zmHMp8%$;U*@j4^8EM8~9w~=sN7-pMrV<2XmcoX=Hwea}ho_TecH2`x`))n3og3)cp z)ySkEjB1ZZCxw9dwvSP_F+r*}#>loY!9i^*)sQxo87x8^6|=D(!`VW+#2~~KGDB6@ z_}D4f7y$N}Ku>07O6qiQ%cR7_L}DdNsWI3%2?697YJ>v;iHUFwnQL53;~4S)6W!&Z zY~147+3eQVjU6iQqv9MMtx@`S$dpI1c*maV6gT{^q!$ojYiBbhd#6K!bkpQJKJUXl z=F@oD$4h^If{vVpk1ag7@a2U!7veqhysqcqDO)7nbBVoGCoVpoBzi(lV}s zp*vt=5>lWf(h@gN63_+sMyW6B$j1$MWY2Be!%qTVmEygiZY3GoSOl}l| zL@SPMR?FKV_u+jC+^4{O3f!l_eG1&CzGk<-`asJG0~NJJS%jN)|>9LL1s_~ zfg1R&;`voWDHLf}uTIeGDHjAm6dX1P7)v64K0nHDHVGE#^+PBgQt0*MHzYwra>yu6 z2M_#^vtCcxt%j|jV1XW@im*ZG7zOB7;0h<+6gntK!?0Q-j&CihTfAh+^5yK(Wh~3C zSh-{gi+}l1v+Tc~^J0TTw1I;{0|PB#(z&l8k%P^{hDL-3LX`lg50Bc2hf^r<8?jLr zqu$uE?ZB4iUHN#nJ9lk$?%BT0xocO`mgW}cuCMd+H}7yg=4@&?ke|P2x69emydUwN zY~HcAxn&b<6mNUeuB`~&(Y$|COEdhMo;2+ne_8Lqy4M z^S-^V{H-lbJ6#klf2#}SN;Y4)-^w{ZvCrk&mA`r4rsiEPiietRYi^;c?r`pIaqb~M zXUk^it|kiK>7u&Pv-N+Uwlh+`Jd=R?%z}{_A z7540Pwj9_;ew%h6xVdSMD}Q&>u02gst@eU0t{qNDob6*bJ)gks|JNZr&zE z%ir08Vs;Yh+nV<7Y~HoQc$G7?AuJfTTrW~5g%nV z?{Mv;Xaj5S+`3by_+30ukIj3XoAy2Z^iJp2U9P>v6Wf~~drWHHd(!UO?!(CC+973} zzolvG4%c2(Ab&5Ko+y7$X+J@=$DA#Xx%O_}*1hFP*RJMWPD;C_#kmzU1aI7})lb>B zG;i5QoCbWGcQoyHg8lLzKd{S3`<>v<78g~)*|N83^S)h(`m}Sm#1AN=Y42V+?M_$o z{=M5Mm+dXiO`D`P`l-_H`aQXC$8NcWiR1P6!>5hdWTd4$+jDn27~W$5o_ebKvc5bt-)Q}9_Owtd$zTJ=Or7sc3Xb)PUo%z zpk6-Nh^1kBylLy!9S3&rd+f3Ol5H<+F4vP1XMj(4I9ps&=YJejlWk8rcQ?zP5-0Aa z8a%yklhi`!(-uTBEgtR-+F1wqz zARcH7&&OI^F2cjPlMuO^0=>f5Q??!0O)P>3em*oYmh9axdG6WO+_J+-tc6~Iwr)W- zcXJtF+b8$MfuS@qN}U^{X!C(RsLjAoslT-}Z*j?E>?WcXsP?qn-*&rN_B1(ZtV2g_ z-tVN`@0PaBxo?-0UA}K1L8xc<}?$Z`)mj$cGyV-0$qTmG(v;A`{bco z9vxfuxpv$wgD6Dfuf&P+AU~i6cjNt(ZFe&mQEKxRC+a}ViT<&7uT%1*u0Sm&kMb=| zM1E=HZz4X~>O%JhRfw-z4xrItbGkq%=jOc!2Gma)rFQ${< zJMF$Y>gZayFVcx-uQ2bFXV2+vgPE!@I-x8a?s6NlqodbGt&8d~|0lBa9o@bz?8kvH z;YFMx6DDMP9w3>M$=Q!&bEDjQCrF~7YDx4nxYeN{$z6>sl?C~a{zGOstK*Zzgx>=` zArV<(6R!Q)zs!CzG{nl(%?zr3)xvxT;`GY)dKBaGL_XM5B*`@?KUq&)wbSUg)lAOQgrI<^eo@0GddY3%auXGnZzj}VMaDJMNZN9j+sHK z`XosfOQK`I+AR&Noq1`kl=n>NWX26WTUL!mqZmgN=S0SoFwe) zE4;r#5Y~l|rX-v#F#w4PQH>?$;H9*Ffn7N#^9Ap#HqQH+Ey6O{^h^%rthQB{Ud*wS zF$@GLQ$&KI>A!qIsit>xEYqYQUl;Rq+eay%*r~_i#+hriV-)1^R50Tqk2l(XY!C#4 zlwnWkg`SqvJ;TnrpSAnSmRds=86~ovm&m3YK(>BjNmTL48~S9Mk;gz$_1-6wa3Jzu zWYzTpDn3wbP~j6B#PM9PPURW!93<$z9w)q0WIA31kvgA{czSuU5{)Ob=F zNY>u1Bu_jHL_T#GD7tYFWQigFN^Lw)(9l$u3#w8(s6nb$)WO*^@07zxX}YBsW0}>h z7Dt?)hEx;c#$ZIUM0)~Hds%C!oCWU)fcUn>2pYlQy=qA$AEFYkV`TEnYW9~OD)Z~8 zd^vCGcAi9cPuW@DNz@eSBq|~0JBS)2VJeU|!Mxa3Lny)NWR{neiY$54GEh{un| zVHpjdq-sC*chNEtTCxl$RllFm!atC8XEP3pM)@ z)X@Q!n^0l6PF6>`|1@+NI_e?+tm(c^T~uY&W57vtJH~Q)OEiR5^r)@m)LI6C`4Zin z&d&-dUi@rs}ec7?mg%H&@-c%4@R7&EHH+Rcz`CWPvzlI1GXS?IZ>wh`CN#c-Gde6 z|9$j)6A?6|$779ku<+eEF2vn9$}{Y&S2=lzB>83w5h6%9T`JyD3e=DPvyf9`0byP2 z0b{PR&XnR=r*u|X%^uXC3eDC_*;{giZzVIG%cS@k!6P{*3L=?qUA`j_)r9!FRuY4c zppI16dDUuEuxcy_1f%2)flo3Cn{$NCZ32_>0G8$rH<<(TVap(}A|K8hWP7#%;O_ts zhWDqPR0zK%02(31@3&lX=J}m}lAQDX&d((03cvGG5v8s7JMT!&9e(GCVha6*-hBrTq%hSE-ZyLwTy~l{nGva zfK#Q^tCgajRf>#W$wPJ~^|B&~hai_SiPuBdToS}>M74^8_#K2!EZ`h?x4(&>V&z3;lFsOS+3!7BjjM_r_vcS3X(nG0;NNg8`2evUV3^ zxzY%)4kNTekx8wNeBVcZ zMWo(hri3l|w%AiVJ%()NNfkhU4uN$QM2-*1dJBM2lH4Q|Oha~35-(J!wb(CIVjB@LCD=999-T zCI-GtVc+<2S0Q(m$fzgqkfKv)G-w2+7S&d&rmN9}YQLPORMM@IZ%UZKr6}l5NkFNo z)ck&Wtj3`lkac=&zWHkas<V=M)oB{Vt`BV`W-MQlwI*vr1=_GUb$MUTJZu zxik}5{2qX^U{O03xZ~z|h@z^IkvI@{Z|dWvkCig-mVzfbc9*_U`gW;?yCO-VKM%?7 zS0(X&PWUaEgn304^8TE_gc$&<0CXx|$)FSljmC=#T;`!10p2{LFz7&p{=#maWMpE0 zUwW&Q2`WQvNsEDbC$i8uxPK9K^-0hwZ5k~w*AveDIfbg#JLe>qO)F#S<{+1hvIpkO zn4|Gjfsvt%*)EBze_O_l#$aW$3z6g|VFSFHggHicf6TE$Vk2JM1SB{q#7I)^4+#?_ zbEyzSru5ntcM22IND{=ik%)Z^*@mBz<__Wc=Q_5d<+eHElkC{o7pZkZ#6KUGI0dqz9s+xgc!@fyD&2 z5corGEP6^eS?>^-od>cBX}+w?E66F4K&Y7m%{dkRfTIX7-vBUz8PsSdHJT|@5)K`T z_E9L+JPXxxekN73N|i>#@p@8(r_gC7{`%dVU(aEdl@p5`ne*`+?;L%(rF>Dj#?ws- zKQzKwDh%T9=lzB5nvX)?2I!A+(--A?f0XMKWmXly!&T@3cArH2W8^p_J2al3(byC% zT%{;K*&amiPo z%l`W0)S~RS0H|yq{gtdV5JhOvCHuKrDx(<62$=J8!PP*^x47sK9zhRauvOsRHpMjO ztWodInmc)@u;#2H-tSx9WmFD%$I3^C7_8qN>PYM;ovVSWZ~;R5p>wS{!Vwa{KisqN z479lSOg!bj6Y{P5gCzGmN$$6;eUszeuZOy=bA_{WCx;7vk&=W7$0!Mud{>YH@5x$0 zlJy7I3a92;zBOwW0IeDVjRd|Vpk4@&Ltr_;fWb#G3Pa<$et~rfQ)b?sxeNsU!BgBk z{k-sb=9%du^36@@BQ%bfyTjo#@Ekxnm0HS4tK~7Wq|gl6&$&j<_)*2X6@~MdlNB_< zL5oG5HK8-J-DCd%dd)gZ|N6^$omVkUQHS*6b>5Kz>34MT$!?PK>Y3_JB00Fum93I& z8tk3dA?GW}JNdNIL^{qxD-D!*wpM{AhkKMqjcf5D#y#UcZxNQ9P^@JfgYb5MwdUI> z=WzGi7}UCFI_6-}D#U)68=d*ymyX}KQxcJ9=jp-BFpZ#Ov>SV3KdkQ=@!^*ry1R_- z@`|%ukb8QCQRA+!FjzfJ< zi5>5KD434pO}H~L&!lE1ObA2DvqwAd?tDH7h39b#5jc&8ScPeI1<6|73HmX}8zctR zj>&g#t%zmDID6CoV*R1MJFPeU&$b^rus5Z6T}DSpdD;Y50E5c}gyJ@bfwTqy52)!O z>^qKDn2i}D@&lC+wG@>`MHRz9^wMZ)QyPr{^b8IS2v7wC7$v2yYTOJ#D)R!M^AK9i zwK_eSvWsl={EI6nc)()>_gqg+s+>~ER8*p$q*i8Dn%^!Mk*`sN)wyRl#_Ajy{)gg481fu(_%%HLhGM<7ZSqt7Z7U&;gJdU6Q} zqJi=;a$ulzl1W8-7ozC6MKE14K^PoFiZ)yC;Z=D#|hd3QecAQp9@ z;J4?S57kBGZ|tA{)oSKFMlpga+uzx>ZECgD;d|%*b3VgYA>GaS-_JK6SsaCFU-2)~ zzJH}=rJ+%gc+W~LK&2jD{ZiHVD&_|g{P)zJ7m};6g3YhmS9Moq&hf1iJT|-rwFW})5fZ_ZLFG>P2Zkm)Pt8VGb^>Yj^$@d!$66zs*hABRWt8Y z(@>XP?U{7m{Zvv%Zgoqw5Br_f682cU{9Eh~Rs;J<5MU>?i3Cu}rNk%tdy%IIG-68X z{E(o3xb)HFUr_)WiUh1L&i(Hws8xq+8f%yu<}s3~_bfOs7-|RwTg}gEfnQ+x3i_!QSU%SX zkqa!BG{UF_mh&1Rae?Iwme&g`f7J+i3oIuz!n_5Rcg&w>;EP31MzqE;tAC9$MimXl ziUz&);2y@9WHI2yowFqkj)5|8m=Vx^kw$JPzDVCSDk(Nx6f@wq4im*pn866of`80N zQJlfqw9v70cIK>cNfCJE-yWO9TSak4bP^vciaTvdF-WxQa#9R5BQ*d0-S%iTe(Ymy zdItJ3YL+Zov~&?33BX9_Ipc$TLM86qHD+={CQc0FDoGEtgD>&(?X2 zG>b@|e;iShl@5VWd#TP{_i3H*Mjee;7;tGPl_m-`wicw}S(+GRHLo=J(f~^X6Kx1F zJ;w7Lmw{nv7hdEHf_gFP>3+M;0Yx#w5OQF8Hd22y|0xfh>Q`7ClZLm@#U1A0e4yvZ z#}`8#?oG!c48yWCLCQn3G{cy&8-yQw3lk)MtZIzSjzLgOpE?M{t4A|IYBjrb!jff+ zna`F0O;62v;nBqyqBk$zviRl2?=3bg8L^~;l=GRMS!`9Ao?lD|%3lX-&P!hhTT@b; z{oe>{{EJKB23m&@#VZ6Ndf=>Tm%rmEu`i7;aI&US4twrw_jS^gTI=8U$Lb#6Z=eR# z#4n+u)RY5#V`F@uA}L=g;JSeOl1_q-2={Ho$&REYtCyTvGHuC^8e!2ABC2mA+8`_= zCmN>aJZQX%9F~6&ffpBoo*6{|EdUy-?_%p{;cbecP$Uz_jS$`?7ZrRJpS*ovKJbyw zucf0?%8nCGl1Z6Yvxj_%~XPZ{8(x4T1X+k-x7N*(fn z* z&8T17W4N%c$9UmzPv%D*DCBTY+vy}(QR!QFCG^C#df&2s@92^?Ko4VO;&`Te2N=Wt z0k-xd&r{B~&?ZPMwd{9GNpp`>5GNRx5thLOiKGowodW=*T~Xai7$u;Zn!`PlKf+tw zw^swZKkmEQ3r*UWgn5*x_v0iwLm*Ty3xmE8c%UGBnb@<8a{Di2^s{9TEqip?hGouW zk1aE=n1Sq{An+#w9})28$o;JQC1bR>LcEDwvz%!_V-%9Z!1e1B3a>#?83_blU4DD;xF zc?lnj6Rm9>T2(Q_(T^*}R$~>TgsFs^NI2I0t)s(y5M{t6Q8*MwB0(9hEPgIm`8(H_P>% zHp}&&HS=##no|(`&7eA`m}r>+^4{O3f!l_eG1&Cz$6#`GKU|YwCDpO){+%V+23^DFXQ zpX9T*^ZAeh*MoU%V;{3ivj z19|M>JpN>!tGs}%FW{dlaP=0j`a(Xo(6uI?{Y5^1G~czmkbR+$f1}WKtdRY%kpHUC z^=%<*DdMLTxuzDexkY?Uk!wsgn~}}W$#yNuW}CA4-)6f)X0dUz_|#dhjqBJ0>$q3f zx!TsTSJ!dgb?Q&j)YsG0Kc?~L)6~b)(nqJWlhV_Z()k(b={f0qQ956lp5BrSs?0`R;W7Z|VHabl#iJ>ofSU3_do4AD_YJ zWbmaK{DKUASq8s4gWr(BZ_eO%W~A@U;9tt%U(4X%$>871;6KdZFJ+`(%izDu;Jq36 zs_Tl$WD_&_>`YflCc7|`eWU*m0_z5%8vu3dKXQcmp2J4)WzHJ8k>pExHQpN9=D}z=zpMFqr@ge0C z4?ACeM6vAW%AsqVMe7wu*DFIeI9G2_9NnNa);s^RUa?}MvarE=bi8PN4ZnlU6^ z$$d>}ZE5ALo6hiL#veR`dqX}SZ@U~NUQ-55iMhcjgQ9Go18T^_Z13$=+i&D^vU3o^ zIr<@hAmT9Aa|~}imx7-Yzg9l(ayKtv?4aa!`wb@#i~ZPUGJ*ypl^Ut+FGPvJ;4;UiJ&cYJmrv16{6C8RkH74IQt&t ze!C}V(8ZuHrWZcC=i$!-#HfS8;x$FkVX6RCQxWtO%4T7WIv6F|`ie#SZc~gH9M@L@ z+XUNm@a(Px|aVO|aisC`R>xNWo&%F@^o6!hS;m z9LCxDKojO)TFrWPdd$Ib*0WKu2gixgdlI7mFfRJoc)~co4>h8kK;&^z2NUd@kpmDs zH_m<|O^mvc7W2lqky{f+EM)9AO8g`v>e-W}2D0a++IFYfPN&*#Ot%ArI5FQY7T9hS z#EONnVv$WOw%;hG)=qBa?Vq(m3NJ3xezuht@BGnjZ|Ci&+u)UyX+PS|i_uR7M;|nK zb=jH3LVe)KK8E)Olw=~Z_3}~PdRYPI!c0*(J5xA2(#t)9kd9H`SQR6?@)cgTA=CE7 zScUyqkV1_6X5yGz8D901nejLO9RKYz_M5*G?>rE5li{LIFzoO*7;g0Et&o-aO{VQE z!-;ox4ZqUO#=PFGj{VhF?3lC9Bj`k?IQ;nd=sjt1Z;ZDeALmtmjMC0UZ(>x@M;Uc= zAHzn!2J<0Ca%Q{f>E&jCd1lKFlzhft*loS zm4yOFTp6pjzdlxFe_^uPtDcx8j=Y&Z@J!?Sz=UIP;{3m>Riz9bHQG1E8>lcMiT1vUd>rb7W27M z8FTq_-mC4-0xzb;+(`FozeYLApzmxa{=(Z%yo2An_@RwY9OdmdTBZJ_w4Hbmo;CQ@ z;!*OvxbMm%_TquOKKcC9mU&Wei?`y1m-%&O$CzZD) zWb)|bIkDYS>}RIf&cw%F&57TbWADnLyuN#$kG=XLA9wS4{?4!BZe8SKzPNz)yGXf3 zX&A<3A< zqf@19Tlv^4NBOv0t$a+^G2V8x6&Y69pW4L7x}1F6{!P4n%O;ElH>Qog8jmb&N8_br z=m%F_oc#it@WUs#*b`0M@U92Bn67Hhc9i-BYyYoQE^hyH&VHzXv;C@oi`|#S4Sz9# zi`g5+*&b4GqW#LWxVD_QwrTPIm1BRQ0=dQlN88nx_?Yw0^Y$()Z#y2%M;){Aw%5j@ zQo0ym8G8tH+KLtJqpAGpEyuVKj~wNqH=ja|7YWat*sD`wE=-9%A8-3|TKu^r+ga51 zSFtx!c>5P)`52hP|2TuUoy|vnYhsTF^Y%Zg`DmCi#|0EKju&m`V zzAyLQx5C+G)P|yPrnhaf>(~qmmj3H;4Cz-PhIr2f3;_d!G=|daqC=@=>e%HHpj}58 z_e2=dy$B5PHX95HV<*$XP}^3tce~8) z5sU>7D38Z5b_y5Z9RiXwxicAK+oAt+Ky zr4Am4;6WCkgLxVyHtT1LW9AA#;1gh5Da$Y1rs1rZDCqd-6j z2NWZqAq7zI7@I-jAN&;Xt7t=()=f6_4jbzxXBxmtXR8hyYK60PhYh8|85n@_SOX+l zs6(Cr`5Q!(b13!VLyT27SBG4Q2eLtrkSm>S3T((COL{D#4Cud(fs80Ih4e63I zxeCM&YV*MEmu+Z<;uxCTu?cP0>1JxvUKR2xI-(ZtwvCZXvUlhKrB5wH@B*;b>Q z=u>`_;Z2lbKdVkZdId1tA}g3T+bM-Qb}~c-CBfuQhtdHeavRilC9nuo@is8m6eujf zgd*&Ec{>62feX+r}b8DnT##{)FI2@%^fwmnTKtIi83 zYO@SQ&l^P1D#uau+=oaOn;4_JDII>aTbt+?UlHH|U6G?>_f!hJfQ&TNjILN6yGxZi z^olmnl?p%GE@!oleL#BzN^-&lLmN5{wiIj)9a@Kr4z2k(AR~hco~)~>LF$qeb=$H#RL zBGPZ+pdWykLl1yrV@Ti9IyH4{+mbL=7xOUW$|MY>c|YinaA5h#O}3+cv>s>jML%-o zCVJCu)r*C8zrq~wo-Uf+avZow2qbm0y`6-z?LCQNv}mI2I>xnCw!a>;`DM4Y;+Wk8 zBzbBzI<7_dU*nD2)i@}ExZdYbfb0l>Ci6r>M*)Gb?7a(YtorU4#w-c5s2wz)goX!hyjDF z$YL1taw9+=PdL*@{iwsvHobl%a3h1;6T1g!9mW_Cy9G#c3vAFt^a=`)gk;y)iD8t> zFtn5*7pdOn?Z&{D6LXkc zSU~%3P@Wt|+fIQ5jC>7JAjhbvT^`G;-RNEJ^d>hT&GLtM^zw0IFnG|2co2GHn{j=# z%^(hKE7M2QWmvSz_R+TG69U_zAo}2T5L5Ewt!UDO8=5*uLX(@I$BgM3SfCUv-=sWJkZly@A4=yDYK76DD}8Uwcmpx{aGBxzec)x;1xl0YJov_Z~D z>l@KlBb#-I&5am(cq5E)dEQp7*2Ky+^jvS%Y%+Yto=$^1f~FD)I{mf0^-JJ8<3{zzl~tV1K!p4&uNrSn%oqG3*ni z-@Iw>I#F~N{xaXp5D5SqxflduA;o1R7RrNT&A*>$eskCvPA&H3Wy7_5r&7L5JT2lR z!Buc-hZ?}0S*g?6$1~I(pUjlwX$2{q%?VZ0(6??l&s-Ylm##vtzM2*G z!`8}q>(9VGN8)|t+v~INwQ|}G;_+g9!cI-i1#q0OUvKp*O6b4d$~Yc`G#QRsYmwd| zk;&^(r1jb)_)IZz)eTbIjNJ|5Pe?{YSr)L^!Iqho~gI?Dd z?*3X|`f76~5!&zx?2>#4cXp|FO!m!24!%RsBfeCBOMaR^d;AWtjvi4R>~Vjm|4rrfM)g+xN`6&!(kc!S z4wJ)HV0GrTkhlKpyrJkh4EXVH$~u1M4`tG|Nwg`3{sT1;@k9dB@fXJS%zaX?;5N@B_JdmL~l zp88~(Lp*>Sat3ku=#D1w^6sKt+u00s%ud z#sag|;^FQYZTziZ;@K{Qtvb8#a`icV;4gjBdMq#&85j-WFgSkkiou||uQt%?LEYiA zi|^1;$Z=}eoQq_*UW1?of&&+}tb+Z`>sJHlr>^eLVIsH2T_%`yy>1@oO^cCx{qpmE z-#%*}4ts&$L4X?q-bFwh0!k3@83Jx2;1>kYBLKXEfG7YDBy*Zqk*&A-QshIDKd;xK zYdX&?8$>oYlVBe%#A~VJb^kuz^he*fx9*Z5$;$;A7!4v#s+UkpCmoqXF)e1bq_uP- z*cELE>Q77BFh(7-Sbu!X!c4pWlaM3&b2@~ZeURi5Bmvp+c=w$+B$*zOq0U3Ik7z5^ zyZ%01yZ=TQpsfOr2dFe8Fo9)^wl zC3l8_;aY>i1LXa$t9uhlnw#s`h9nBBrJF(U6=?D21pW1zaS#SSz;H&KNS>a*XZVm5 z0})dX<_0>dLV=2qum`9FZKu-!G582vdZY(UHz3}V!cn6sDd5D#Pcg4s1q14LQoa3< zJbrGPF#lCe5`NM|T0J*IaDe0xrlvViA1OK*=@$rtZoR%CEdBcGi;&eqb?07R-K!ju=-7fkg^5}Bz_{*JMgMBII<79c4lsx`+of($Sj7X96KN0khc$C`n zGXcq`yWdeLLpq;;on0=4?r)e`u8w{|uz+YN+ye@qlB(;V=A>VcoE{K#A$E*{xStW` z0UE;pJ>Uh>kHO)mQK+{bLR$obK=6hRaB_Q%=0RB7pScO4H#97vIT(&u08c}H!Ej#U zl`HJXoX&a;I(h^`2ZKlYC7b(?Y#!{tvAGWj;A9#qg5zm7Qi8gvsCcB+gYj^@#2KRz#z9ylA*vrEM5v3Mot6gA-j{}% z8JcJ=(U{Yr&+E6_GCKo--%G zlG8%S3AsWOvtOsZ$ESKwO@H>G zG#PM~g+bm(YNiQjv3E^0u9L4Dm?w;C#*q`g(}-K$w|Yb08x4j5^`+&c4I!)hKnOe` zym9VBP;HpGncpMSG~L^w+CuyY(bPpibz%ZAg3z45nV2orQxemFiN@37)@x*jt=Gs1 zMr1qT@*Vdu!g@r)6Fvv0*-9jJ!tbfKS$3Ib2h$~j(R89?9tIQ4&(q0-jCEa4ry^5!XX}zPDck6 z#49OInA*@B*Y~?NW`wN`wlG9`;s|jxB9*C0*_Uv9A5GOq)40BYscDXM3XFkfk04;5 zH4yTr2!wAA1B2>ZXIx+8YzAk+M8SPCn$kJdwa4Le_pi+lzcW94ZjP=!G(WsyMgvh< zpao~9q%-%VCh$#mX}?zl^f*8h6bwFy&sGiBtD%P)2B=|>8g5a;?P|DJ4Ogk*`)Zh= zhG}Y;t%gNv_>mgcsNp9FT(1cu6jItHHS9qkC}}tb1s6$aP6$O>dUJ>c{n( zCT6dw3iJeFSCh1lO+pi1^g*NFq9JHxjMTzYM`ucV22%V; z1h6wqZ{TI+0R<*FNd5a%IAe>Yi23Q;&*Kn-C%L5~#^%|F&vc&edVcLWc{Xmgch=yy zkl)V!cIP*E=WOQFCtak9i=C<; zHKHEG{h&Rg>o6_9*sTfUfg;x(DK=8Y( zP^iQSUH<7e<&vYsO*Q_Xf&V+X%I-Bvr^o=na(!hXzA5~_-G7Wx$2H}?Mo=1llM)}^6mB2>Rs?j55(k~_BFs51 zbP>8Raq`xcu6V~t)=J~A`rHwxtG(e=t5O}9o9sTP(HM#F3RT{zc$-a>ja`3aoW`4t zR~2X_VpXf*YmdTM-mR{Vt36)Xq`=$D+kVhe7As6WP37G`X#XY3RM}PxWx2BONc6qN z4kZDpG@;Xl0G3N9!g?|noQsqr{cD7a6elHs5lUU8YQoDKl@}G-%6v6AAaC3uZ`&d7 z)W8uChDTUECkAPTFeaz*52y-l@V3i0DE7%ap%!W)_bSiIJ6}5$i{ywNh2?T-`@WASO=Zxi!a0qxZ8I7Kx#4wXqXI+?1P;Uw=?|n59HFvN zst`*5X9#ru?+^w5E#iNjqp{owx-tA8O|F8a{3r9jO^=APf(%Uq%k`Co_!RhmyZ;!Y zj%&(&g>VDX{YQiJv|^D`ZTW6cw!d{+@l|)u} zY%b)HD?=c-S+U_D)4$gNh8z$IWE|2^LaSca3HR?xzClpS?%ODcJR`069RX>~A9DE% zg1WtGlvjniaFqGLQ@I2e$fvwXp$QzUsf=w3j0Kx0gGg7!0sfd4~e&o*d9wIiR|7K!fE#zvX~F%K^2PgJ?HpqkLS^{*`>N{d&HCymL9rb$DpB46ICY~6D)@}iuh(2+BBU<>e>j zF(>55PsoKQIQ?1yn6f1aSbqI?H9R%KY4++Tf#;}cc8|CGbVH*>}%vyUhF~!2qQIjBQ#czPr%Ix zKO+McBJam@E1H@>oS;h~m#H^ygtat(_x=A9Q{JcyhhqN8#A?2N)Exm8_($wOL_Gd% zh{>5BdDZlt`}slp4`ff2}iUD;6>QP1`hM?E_;2?PKvtZyu10 za8?pA_ss)}A~ujkp2}Bh#zKDo(EtXh0Ynx2N7Dop`X}>0QR1KSM&kar>BUOk)GOl( zHe$%H%^Uwe$3yvQ7WfNj`p1}mtoQ%a=D+FTw|o8H{S4{?By&!qY|on)C1m`)h$u7| zX+b2BaS73nAe5l*KqS?}Fbq8~lF6G6xvyL7zDB;${EgFGei1=?Wgv+WmPr3py6b{NH|cG3s!@dxia1sIJWa5U(!hulfJEyg&PYFJInD)+Y1ZsXTex$BC~z zhYBys+Y}4s8^Euerzs<9USEWl1)}v=*GNxZGaX{#wh-42xH43<)Nb=96BP; z*(vWhq;?*WcOTm3dZ_S#A~RN&6x%6pn}pW~(96}y3S%^=V1YXs#uBjtYAKhVmN%Z3 z2PDF%p$x87SOv?apu{)6aVN?*OfH1PzAUJ%%vIjq_gQpzcTXFJ6I@ z;xq_Sf(BE{)NqlyXmF$)4WU%15hIP!P*yZ4{>?D2T=*ozq>3ca4~P{wr`5Xu&ls<2 z4r&?y=a@hH->8^3_MhXG6^g)rGJnR`4E)pcyUP9xraIP?0|R8VtHHffzRcQh%ImQ zl(%`x8*AllwF+cvXXp!ak418qm$*3i{gDj2APoe)-Ews<3LVI`P2ScfZ&V=J&1qO4 zd?k?`lNyTSjlvw47;tcKE*ebeH3GObln`9b$(aNPGll?BlNxfF;w=hwOhT_IfH;5S zSosna_t)PmbRT81{ItFa{>|W* zf>uIu5`R9YF?9&q0KMU&p@`wA6vz}&0W+d-q6!p|>!hoKH@Q-A0A{Ai7hPPs-~41N zU0h@kAe+>NcYWP{w~Uh;nfV0r|3Ek-9@70s6Ub@;HUY2_0b~U$_u`z!2XRP)-!>|!FY9gd zdNmnYN^Vi`hMQrW7`OU3c>1iX~=1$MM2h97LPP5?Cptg8+Qc+AV;Z?<>`@bMLthwqyw^wjjb3# zavQ--@>c4=FbglBNRDsir9C~`tb}>?@#7#5_DtqzD=c$El{yp<#By zrR3}|F`^@)Lj+GAJk9XD?VmL0Fi_-0Op+9UGs#u})+AQ}c$51T&6P+BcqX*~3wacI za~hPR>e2iej0Z5c1vd;Sjj$l>E02K5Z+KEta&B%uz<+yAz{^i81Xfgt0sh-lJg1R) z6uJZ!H(i9sbL73B%SFnj+@##5ri%(Z-cSkl+g=#=loh$~_N%E)B$5HX?bVsnxOw!M zoG|Gkoxn*a8>JJ#6CEy~;MM=Scnv!yAw(#h6v7H<2iQzxCDa8TNcINv4>$<^N(Dzc z$&tQ+9h006MT~SZMyiPEcoTy#-+#hE@K?@h5Rbi?1{v6^=~e?BoueRZBM9Z?#q!!> zd9yM%H!?QXl?Y1`Wb*HByu4|u?VlrymDH&mB>^S_+gxCIqu3qiazfsi>TH{miEFrgrrfmq4Qt>nevRkj{)lplu~ zNjWn3DG#~C$oDBs<-MknuJXp^$|i)2Fa!GAWE&wFOpRVAYlLKNrZ6!wgoLbRFubel zHm8yDfgCr3Gf+UM{NBnPz$5T_Q-5)v z3qEkB`rVZ%ow22Yplcj%v5J@4Vr}((5y?27nLqF8xr0KloV>*Q))D)>0-LFAB2+rQ za#XC_QD@NDI+jMGwxXG3pVn0FSfXn%kXcn^FLIh7q@ThE2%a+5hT8kB%kc^i@JjDE zSTpGLuGzOfnF-5vBQX_zxTp->RtB-Pl91$esFcVx^)ukkn9ztSYUL`kww)0NjYj9C zW(67D$}?Y=Acj&+qAZJO%xp*2a5m@B7A&eTBfv7|o@kzjd9??Zw)#>LtA{}~Ms3e4 z`PLZS;}n5U&!$>n+3dkniRIaAnK>nN+^rDarNR(8b(z5Vx$(KL*n2~G1Jyy~_a)ZT z8#eW3TI;Q7T9Yj5bxu9{^nP_WH_~SXHlD=;fP8KJfXIfZ;I zPcWPJFr~`FfV<7~9lQlgQQ5=^4E!Y1{0dv2!9B17U)*IgUulKy?s4+QE^ON3#vR^a zw(cSBm_etj%ZJf}hrMWw%|HQKzwsEFUWzGziGZz!7?k!fnqsEz79m`ve57 zw50FE5i4SCuC2SmJxfTfw=5xNqUCOQ8R68?!PpfknMWn~RutRh{@NzpXxyHtz%CIM zyDxd4+nQ@7)s)Yc^1t*vDE=U-%c-k2Nnq-2Vt4ODp?JxM)mF6v1Gh^DYeTbre?4ey zf5>>cZbDMgnuK<|#4ji{GP_nGN#$oa1O|rE3RlLbo~mj~GFjo@Ad~T@IT;0J2KmNB z3y;C-Q>O2638{{k8D%Er^=qQVH{?I^V=F6v3+xTRar!DhTa__rUG}xjYK3*j*Nm5Q zXAj!(Hz(|DSnMD84WZPNwyvnwaDHZ9EoRsu_2RX%W@)kIKyOLhr^XI^qX%J^6=~l| z#7R&3$CEG&hVg3gyY@ctrRtA|Qxn9VSq6!0*R95BmrKRQ`Sg>*m-ic{qf2lZ2MsZ1 zH@7E9>XxK?m5Wi%6P3|b+)ATvU2eVw+ais|gwJzzaNgB5VT;pN z6pAi?mz_op^bv>cw0e>eLW|%z64MJ(i3N-S&cFEN?bY=bS)ZB|EIl{;4QedtL?MQe zp5_$NXZD#Bk3riZW99NAQ;Cj;Q`65_?hYdvr?}%E*;HA} z7XQG;Ms@ZY?C4=uM|xxRB-?xR^f!Eu|7m6!7GJuxB=N)t@i5W`rmT2R>gT2$lY4iH7W{-WJSs_T@*@)pTC2i?j6gFY@=`;Pg=njFWlIcdhx;% zrj6^>W9}594ZXh5tUIQoC4)(5ATFY`=;dpZb8J@tMyihmvPgB(*7NjgqH(_4V$)V^_gh-ibLppF>&ZSrK^E?bCwdult^~ zNuG^(6n`3?p6~djNS20(N z`w7v1Gv{&=kttfa8B1lKYe=885~FoyF%SKtF3sE#nSQd_p1-9ib!=|mWZ3gc)zwfV z%5@U+gRluRv+HA-iA0~IQ%0oVIkRw~f8mQoUwTxhIx!lOut`3VMR%X1lGZZNvF-u) z>gdM#UmiX9pwjMC?J$*U6&i8N(#CIo#$4Lo6t+r7<+fv)N_)Qjl6|- zb}n<+E6YTChx8wZJyuQC5pH~smZ)CrJE3~e9;RCKY2u5G`6^4}K(9f^heLOhw={j5 z(0(r|`1VI877r(So87(`LCqw5&inZK1>%c4w%zL@bPjq0@drO)AS$4+`I zGn={udO1<^F|gLfb89B!Y@D~nUz=k5=i^C^28`r-gX)w^0Xmuk68_2BM3 zv>@=%(!Aq>FCAC#PYh3_REV#v#rE2c9uae3DBxUbATCVU|(Dy4d&?O}o zUln%$V#Z*hmg@dlx5|O-!E@WpV!dlU0_mS_+a6Z7aAVohsle3_2DZ0N1@@=7eUlN@ z$N9P8v&t)C?2JnFJoRV8gwu0(Rgc1-?+H_>F8EF@@!2Nef3kEii0)C6sM^r$x^Y(Z zV+PMw#P==9({)w2o7(RnWe9ChoIRXG|8lYmIo@Z+T>|JF$uB?D{;TJ3o)296G)uu6&FMqGo+LKgL~zZri{bFczRNN*osaepPW=WwN=xF8(!6%cWNROMx~80a!AW6bUaIS) z$Qd#zKNAp5ToQa`T~x-Zk5ezzWW`vooZEGFMb(Ch`V*y;XHkjCbA?mi+v@UFbIISF ze|C6lqRQ8D(fqLsZ9j_h&n{PGIsW))&E=(oc}yq!FM6`DKNuY7GuxobDvKdWRf!5u zM!D+5*E?2f>%4e&WN7lm(i6RV@Sf-0uIv<_@>?vr!kk!zh4 z-OR&N`FiMQGu49l4LWzv_~`DuGq+OTeBd*GbE`$a*4dYp*)G#Bs#T-d?V+Ho^ z(#ndo^pg1X?Cccg)Fwx$9+vIrsj$Lcw{A+`Z47_#nUmWUmVozRbNrKuIQ^1L|KX@l ztG)~ACOM-XPYhqu{mxT(GAY|ym=|(SB3UmvCgL8n`ynf~q5VbP**cY~tG->Ox@jAe zsCtn(^|R^)PF3^skX~4=@r|x;zAEY+C&X3X3VzA2PN;V(x@9UjQJ$bTQyPGs=N%O# znfKH>Fh8C>;7-J{m=~}j67iO~M_*l{qp*;MrCP_E8`ov5;tQ~}+S!_r-9--Zq$&nA z!ld3BRl0y%a3}Y@^v!}3X-TPt>}rfj)^a|fa-3xrkNvX8x~lr;(33)$56_zE?xjja zrYiG+fvy72bVbxKS9+?>hJ$I-P`IMX1YmD}nkAzgEt*tL-H$@j*&fp~Z{}f6@ zM;QA%nmaM9OEPCIcxaQwt3FI;eAbJu*{LtG%k?p;HNi(!a8KyFs)46`eYNI9qx5)fkVo^5c`->?1=R$?%7UMvP({l7gfNQL^Y*;S}{EwTGbhR zcJTa?6;hd>8^ioG*(1ZD>RcdQDvGEG-1&~y^<3>SY4U9sjee**RC}ge@Bv&lEQvy-6d^o4!_o}a${L77^K@{ zr|ZHPRe{6Z{LQxfCJncOrQEwC(Us?t%+Y+|O;mKJf)`zh_kvHqUN0yzVSA2b6;;F%Y)?2G8tPc@{2Ik~D z@_YvF1crO$JTVOZB=Ef&dlBXYtAKNo8?|`PuepB2k_;ls;68k4V?-}&`aLv?LBbpw z{(P{){~K?9EwkRP^VDEoU}oiaY4(?j+}Te9baI|EP!17uPM|(5%>0qGEZWqY&CEFI`y%+)YU0(L>AqGyA`M$nNm`a9Sm<*yNtf%G zdh+B+?}Ac4PLeKeJPIF~9dBlB{!)al3!#5nGQmPKXZnXC-O`K)3W*^phEZfnADdPg zgrXW(ZlySeq>;Xb*F*-Vg5T3l%wlBw)SdJz%KUEatYqvXgZB>I7l_{fU|-gcf*F60 zzAs+}pJ7qB+tRRl46!y}bZR(d4L0if(P&3ALaMj!T5do-#>n_~g?AK@o8rgL_?(}T z^Tgh}Fnon5oL^6Ot8ic&a6k9d^82N(`@kH2ad3@yNYoQuF5aIa(~j>&F%NIjrBmvz zU9Af?wlt7T6SDNO*$pUxS;a^&meFG$#np9h)yWa@jP-LAe2-j5w+gILP>T^$j63h= zyX-5x*FeNTxKrgshDfHZB_`v&>a7>u7+N>rG7wRZKSdIEqQmDJ^1AjsJR6LwamuHsWfci_b3=9CN>OZYV#Rtyj^u@X)MdgRZ~*IwNs7 zSD$#2KVG?}GOF)EPGw{v%7&lnWJAcw;eH%-?PRVb`Rl2Yt;-@e*iM(W^t+?IS^SfJ zMubl;S_tenw-JBziDWRIWz1#Iio3tto0C&ZQaCVXVSr3l9K(JcGI_Z& zp1A0Tx_+;abJ>nXe!TZFE8AD^&->S{qodYmK67G-a$K?EygLU=rX-bzrwgNIkIW=g z*3`LFslu8{U4Jt;HMhOtNuAf7&kCQMc)(8mz?>6vC6{@*)JMg1 zJ@xB!GUfcBx6qqYca2KhazP-VrgMXy`ubZul}Nr@?#)SJ24<}dPqMG34G|(LjUu*0 z(4Ch1dg#PNnq_$BqzevtOcz*~I;5A}6qTomFIa6QcZeM>+jIDZ0iTYNB;%}t62+-} z-IEi!89cv{-13Qt5cB*brqA{gS?H3qI){lIFRw(^sQ=<8-`QvDrlrna+{v~pxMPIl zOIDu@EKl^S$UaFcmyoF|0(qsRs?<4j7FAZy zzT;9wIjxdY46(N@%cAZ<>(0xEXTyq9KD3r*&GYH3zmAO_@YzW^yL)x*N*|bdC%ZSr zg4pZteQI#Z?6Y&TrC+e~Q>U!;3|?lcROh;`<%<+`7u+^n=%^NqrJR^yy8A41xgBd{ zjIs7bhaB8SAN{n7!Tut*vX0|1lx2iJzzHEPsu|$wpRGNuV=|Plb=bEuXAoCGj~PC& z3Y$~v*CjbX6u5CsPjqn_Iv&_d7_DwBJL`EbwFdauGea2?k%94Zi5aMG#txxDi=rQj2I?g<4%b0F^2qFbiH^SPTi5> z`SW~agnEnjQZiQe72_jUUv(qnTk!ka&Fi`DYXl$Z>+L_{;?}e^C^zh-gIDDaILY5v zUK3U|$mIrxyt^VeH=ZV9XBFLDPJ1>qxyF6d;Cm}8$!pPmBmQ(8hZ7jF^;()_UQE^4 zCuJ1-5OYUYPCOP?JXoaOc{Adu%g)d9LfLq|i(}(Or?y8OJ{;ucR=NVej7U1a11%0u z&G|k|UZI$-C?NQooDz2>5uJ7HGr56j zC|-uhG_QJ#ZeUW9k)qOUkgRW3{8WE@DQWwlusZUBujgdYx`G<9`)SN@25;@g1?_^z z=*X+}g3wc|vm_tg_$XD2|Ne4*{rOFYXa|eUdk@Uznp#WC);79@+9%JJ)Giq|u<>*4 zI9KgS@zdk}c=U<;{P~N9LpL|18eLx7^u^X+1;#WWHvlg|_ z7S-qNAK}{zX544aJ^zMPa$8~?)EgZd8LV1@70eV}SYlZ%P(8JtoN7+N;-r1c+E+cckkiR9G3Y?e+i>H^mLj$L-OGgVU1)2Rcm$Rw*4tX$qtL} zDuR{0^L}N-O59986Kz$QZHdS!>cI_W;8!e95$<32KQJ!6+AdaC+m3RFB;C=b$F=UZzDrzpp z=A5kj_(@B@S4qaa5c@55s?*rES^M@|C%pr%f5;_^B5WqY>Lg#TC_g_HPxZTCUsuf^ z9DB)bNu~PjN&dOPkA8XDfZ)x;%$eu5l&;L1jIK|`Qaw)PXJ<~^^S6$4Bpa`cwCI@W zMXxy7p(}9+D?cgN#N-OfT{|rp>B4j$?geZ^-TTzZdC}b4S^GrR)C7kHR`B$lc0r;z zTaq1L_pif!-q%FB!ZO|PuK2ODUtIAieRw*BU0TN>W#{Cb-6}gHm1N`-J051(>aGxN z(?0k-Wn*!B%pm@<*w{BWaQR)HWuNcEeO{hM`*dD<;JywGVu*V_l~x7#7S5ju80xv= z=7?H$q&l&^=j*X5dph6W(z?>0V!y<4S?|G(dBy01jQ6+Bdh8Ia*(I=v&fKXV{bHHt zJ54DOKaUM!tuuDwU2-yX6Q3+ur|;w0^XcXR$3#@mPOfZLIQEU@sV2P(O4nmy^K;P# zWjpO-kE9r7=(0=K<2cr3!W6y<8yks7qxjs=7kXZNf=u#Ryk^>(rgvM&8lG zXU?^ZaqH^+2iWZF9W~{=GhSb^u)I{Cio1`~o(j?$ZZhf~Po+y0VoSXfgJ0ht#6JJ# zu7Xo*+oT)0L+h8N6?WtItH}n2RLpLi!Rf^e_Sb+!r!I+@_$wQ-P z!P>hgP;0Lg2DPG(PChifk*JONR~UsioDSTx;Rej0|yfbtup10VB|p*P9_S z`0(fMq56y}QauA_zXyF{&}b%78)fI_I^Y=mY=z!Yx^H2y>V)dpwn07deFuE0o(ng1Ao9B}{=cr|J)g#v@#dGd4N>6N*>ELuozi*-O7mY;If1T*&j0n(UGRcw$Rh_vS9^9o4Tq}*RtG)OpJS09(QZ#um; zy6)i=Hr6^-#ciK)Pl$|E-Mw&B+pHXJ7Mfje6!FsM<+9+Pgy&Qj61TLOjwk+jH2O*3 z2daeA>wexVta#}&xA5`ciJ6}yBX&L!w_j?HCw{;EW79d)(`6$+{raJU@zMp`FPr3F zix6MUGIaZXMBw+eVQ!E_A}O#q>03yRG7gw`>s^b8swHIq<&OEjLwo%cJal$gztOdT zUGN{N0G+G<$`t7KIN>TpkHRE8eTC;R;c&aXcn?>Cwugc3%hVMY&9j$_qfs43528{Y z)zve-1B$b_c^0Vgz-L256BATOO2inzWLHxvBB_O z)(hV=mk-*_e1gqu-`UkF5Cp4K56wTIU(g<{qKqU~Z#QtP>ND{;vnBV8cUjXqT2Qty zWq<3L_j*>uP=*7O}Fx?)J)J=x2{rbnq%WFp>o1D$pW1P)e5^s8Y z52)5izTR;2ay3s@_i%@W{ZPvL_IZ-M-51#3w1gY=mq>bUt&b%7ocY-!&)w_;kNaaa zj9P|I$|q$x6t89X+{0BD7Yo8Z#tPPJCi0~5sl?S4+p-E#lkXOgD#kpVY||ef9GHh>3d?vjnb#^;ahp zbN*$Iw@FpCB9+Q2bVTsm;y{~(5VtFRzq<2^(y%(&f@Pntxe!9Go*!bmX4lEhYv?r= zYjfk*EDs6HFBQPr=gGTO_uf%u9K73cZ!i9v%lLuzyJZb3*By=zp9$kGeL&@ZD_FN@ z_JV!b$B`8g42NT+oqmQpl7hpV286)^^z!LyzENq0C=FdvWpy{$D?yS^b$8e8W=BwE zEFYeUeqXyvlq+_@i4cfn*896KqKPf&XQWTeG`jM6+=~b!J(`!P4nExUcWbFNL(6>S>BF(7j>(&gL&}&^*p~CyS z7u4%@6inpRNeh`Hl4^TjgYqtJpRVFOdpblCYEYpiaB$1N(IDGmw8vv7u8L4>iV}&q zW|z*8Db~BH*=NdAwXkkAde#Oeg|sq%Y&h2`YWPtWW5xDU=0A_gd8j4^Bkxg5Os7HjcMb0) zcJm*0x)kJ%rCRc1d*-o|Ev&uADxXv{91K4E&CT)K_|G35ZdxV?G@l&dST)6;>-~7X zV9CWLi8F)gpgxC8pN56mRxY`$SY<|+5JxNNg2+XojO_SABWhOOPf5S646V#NQXf@H zV~iFoF`)^vNOj9b)|S+z`VA4eC1&Xz-zQ;CTy*I8*Bf}eBR zXC)1fY5PAarq0&au(TA>(dGvAZz)>V)`xrvp|+ zs}5UORbzSX@dwk53Pv+p6HK$CQ=i{##je}Ce#zm7dcpO5$NcXWlnp$fuesIsLv+nX z#hS}PRr2$eCFfqAI`Vnq(3996yV@P@pMBfA{{xq}%Xgouo;p{P+C3y2^}^u4SRbE$(nU*sigVqR$_=CouzBIE>!5TJgp*39MZk1fS)EdPS12d zU?HizvwVvPJ)1=P$8Va7S4cT^zfTx&+iWj_IFhB$Sfon#!+chY~Sv4G(vj!H?1&!X<% zOY=8~h@ju9_sKpPRT%MgdU&Mn*2^nGR~Dq05Uo+yu8T7oxn|ZVVSui}E7W!qIU}Gt zFwH%{!igdI07Z<5Ok3OF+wBzjB`Q7To9r2jq}|S~;^p6bH2c)0HoKd=-?TSfjCL2e z?>I1zMO%@@jyV_Ps_oVsA;yZ%dJT!J3wR!Ue5qSbWeK(MJg&ULBX$|R%8`9RtD`5d zmQ!A@x6vTqP%GD>%6)J(vuPo&?4(zCH*2D+&fUt?pa;hrTwXuVpl5fGF(t-1lsoOx zP%vVY8=aXFZXj)}vgcNF&%A9`yXm`L`X-!9XQOJF zT*6%vdOMpLd?yLMcfXk`O46HKTe(cGYh=}C$6O9`8O(4Qr+)U$EaHx7sxT!Y`_6FzX>=Ab>(YS~)9 z`&gctSF?aaJU{g{MU1^|W{)H0Z|TXX)qT!n_ZDVxvZ>46gDOp^0#1cbBF|B$iWFY_ZF;WA zBmIH{A72<$(L&lD5{W%rYT*@4-7C_qlKJG%n>Jxe-fhhAWiMY*ck@}VccI5=%(?V0 zhw7>_*747d=MlWpd9B_LB65WJT~+VM(y-!gFOkt1PD|;!bMEN_K9OC4zLE1n*Nqev zZRHn`WpzCVBlwSJxFJt27{BAok?W1m#CCjmxw~e8&)A3hgZ4(ej%leVD%-=n#p1;0 z&r`OgZ1WEEBD%)7ZzGp+t$p0% zMfH;%6&@U`v>)fAN?HyFR%_*YiuJS7;`bk2MR2=3{L_n>#Oay(klNcXxrH~B(?Jb$ z?JMd^A}n0LxRxOy8f9|=7NjLr2{R;lb!!CwA8T(OmE;!v58rP&AZnt5BANyY0%n0j zqS+vV0uCXAn&pH;Xt&g|vTo@W1rgDlL$eZbK+LqRP2S3!hbA>`y0;uFwYq89P0f5> z?su*CUB5qmf4+;g&NyVlIrwN z?#B+;EvRAcm2JV*F8{(b6|qwr&y=JfG?5B!`LL?`nmNIJn9;dCI;HI54-!jA~ov?WW;;n@CN7a)sahpAxg=y07q);c?~p& zPN@r7%t7qU7~x|de~1h=0Tb5xGThmAKp0?<1-uGePVx6VP1u{TX0>XmWAOGPMM8AQ z1+=r~mnf03W<-XOl4WSM=6gSb6#J3fwx)6!0?{T!hOG>>0A7pK-6M7jC_69#_OE@2>e}*#2veb#IY!zg*Oy9e-@H~(Z;>CG4A6Ny0 zDlbiChp(h_gG02h5K6YGU?CjT#zU*z<0Ef?Ps#xcyPu&enrxw3EIf$#?GgYy^;Whc zJW%}2yMTsLr!;8@C{F_~3HtjiJuH2rW8tKIYDu^#edg9ybZ{%{;CG-Zeks!$fhS1$ z*de;lEo*o=GA$imLulzCM9^>O^Z7C2syY9ZDTz8{>$;nfEN)^irt-i*I=}jqUgkN` zL~*HSdvcVP4mev8f(U#6Vt*+)5O?t5OmDcdI$&Tw3i4E2%DK^~!_Ru*vNEF5ToTT6 zbv2ad4C=#{8fK!;uBbHXr3aNbmoUfhVI()ECj4Ff%evV73LWYX6$ zH(%9jwAAj*KRdpb0l7m-bhXL>w`HyUT07&pMoLRHT{_9{F^tpuG?i7LJ0a@pp%Xf; zS$9!WlaEG);~^rFBpyJQM1;p z9<7D{vEF)V*V4(1v?qHmGc5FkAD7aWUWE;I2)%|(=YUo3lJ%=IJ1Yp!fn_Xj%?dKQ zyLND`k@_)fKCEqc6tNq41P3-qu0y)&6{`;;BfG8-`!?dw85$C+!wr_wzFF?dS^aV` z%o#ph{|n_R8?71ddc^oqw=Z)g2>btA%3P83N z2D^To>{ze@gyvhP~~mdxKfg z?t&K2>8mCMQZha?Bf5)dT+R50pWo4A5s6@6uQD>>2k^ush}u{rZ0eC1?x+pgEhDtq z*qhy#?pwEt4Y(KmV8R}KwM4R2Q*Hj)y(^^%zZTD=&Bg8EYCw>}>-t`QO89KoVnsk~Bywgq^Z-lZ7#;=#^kS@(e z&EKARz)Dsrrw>@{cRXPJlS4XyXyR-z>!vhmi;|j#+eH=0E_q%@Mz$P7Ei4CfZ*vxu z*4=xT_h_$u_jhh$L!*tkOER|^>rxnaxz3Gm*kZUu+#&pLj!ywXI2PJP;J1LGHBIf;3s~`l zl|P6o_l5YM@(5=ufHnUdKrvg_uOip&@yL2_wC{;JtPB7uRR4~>H-{*0Rsd5wkB+Ug z+W1fM{ksYKLP>i>~zea~Blyei8^T%H{K)PA$mk6Hd2>3rEfEr@L5 z8`r*}XItl)+7%O1-z9>--VX8)IWNv(W*h1G%NJ2XZ4{~b$LgjiEyAt2TNro^FAlz+ zUH$@!zXh$2mL^YoR$lZ>;01c7dmJrn*C4)5j8Hp{w&jTlSsV7Qy1PSEZcA5m55Y4x zb+~=GW`SDxV<2ls=D*hSpC0Cy=3m5^&yc3tGeNwHz6k^2mp{1cGjldoByD^waDL?r z`>fI5>IFiMcH7b2x4_!VyN-NcZYlY?!K~K(4g_<|D346qR5p$L*|Pq&@!vA zY{oE;3-To-dyQJq8_`f9DCI>pg`IISF={ZNNb~Klz9I-IDMf*)@LaY8Mcjr&^qc9k zaEgTu1*Y=8Bz{-gl%{MT|lzMb3DWbG^%vRiNjY3EW01)GokIPak`F?M+Q zj`6OapE1Lb(?GwW$}{{&L}p?{*7h$T%nWiD&|C-mW9^$(g2sj)Yc~#QKs@ffS#H;Z zB!5nNV7OkxaK7@yt+H|Nk* z!>8~o@d7$G!Jaqn!<&pu@9QMr1QvywIh^rI)liCXY47+82?~!C`;M-Or>)`DGDx-` z|0WnCfQF+Z#8EKcl1a{u!9ErO8MI^!W8+OkT9rY-oUjPSnyHCVWY>~r;!fqk`0z)Z zbLl_mK>&9S8I^rz$!O~w_f&;R9(1QbaxQ2^wWf&c$y3$8ZQzivTO!N@z#}Ii)Ap7} zAXjHdiss;?p-~qZ`8;q0Ho1$%>a7Wi=f!G`x_$s?G7`?f@aUt z27*PoVwqKQc{S_F40##eb{kUT%(Z?(2p?{Q06;m>j`H<45oBx<0D1~X*qM8#s(=YK z=ro`c{^7LqqcpGVa+#CWRUBlY!OJIRs${vRrN<{`nm58wF&fD|w?$r&9BzP5PeXKb zGlp>++~&Q3{D2bHV9e!uZ-yS?9RHotSa60I{(u8nME?v2_5SG55|`t0%2QAynb@1( zJfvLd=bB1dq0O7pMyPU%_6-ED@nda;2V*BL(L*#j6JIXGD+B?lB>+hk^nvTz^i$;; z?>;L?#3*06Whjhl!PEs)hzAE{Uj?8C=hE3N%C!SXcqB7;8d`nI=S zKW#o~5YWE>NwOQYV3LR1-s24b&QT8KG%fa?*&eq>_g2gvuRUhRFgj>1;7_%_F8(oB z$+6~!H!HcZy5W3TJD@_;S9;NAbEG@C&PtiYM_OF2w1Hxw9KI2J)F)nR^!qp?N>pgp z*#s1{voGMeXfxeef4&I^5+Ty~R9GNYs_k{&4pcKbmT1vw#z;ttmswZEAo zaUW33+5Xi(bL!;S`_i^eWpxLXot62ScFPZcu2VAU20+$#KFn0m(-S4U;%eP}2p*L4|0d;AU41PD5|4h3|d6=WpB$s`l_-O8@B}4nrMmqO@{f7&OF2H zAgy|$PpxBWp-GS`x{SaPqUHO@WU(}W?#rtweNoN}M0p5f)EIjxoh?B7a%_fC!R_%3 zayr2)c)%$HH*kgEk0bC(b8hj1-`3kJ`-Q@&D|_QP?QzQac;MfXz`Pw3n=Y0=sC-{O zAZUHRZ$sScvouOP>u__teW2HVBF(c`%PX_bHM2mEA#_M^H8Mu`Cw6V#_G<>@W0x0E zb(Z>KbN=5J0*46MRmf1Hr@jV(!9{bZ7VcnT9LTF*`s)}`$EX&^AdeirFY_AW-{F*x zL}DZyCx_-*KDoFa^5C9CA93{@6-PA4(JsQvW;;IvWNxgTsNYNdcOOz1CBuRGSvObz*ZKP3TJUp{*(2(rp#)& zKp4=g*+tX^tV8wKMP7y2=B>lZZeN1Kk+5dR>n6F^oQco1%__T&CLeFcZ0@?8lJCdW z=leV0=JzBi|kD2zpVEXM+p=(<#0C3knYdPtbQLEmpfCO zg(7h^@pAtyNFDO13v=)5&y8P02+CIX(2laY%_JM*lZ?ua3zm@0Ni`mXt2Z-X8u}Ii z#DK?{*i97$Sgh@4Ur=xK22Tt6DQ^88Rp%gk;fidB75v1#9m{S{FN`;gyglX0f#VLg z45fOI!at?ggYy+y${2sJHEN5TjGm>DNv9NQfpIRo7UoiqQDY^N2s*EH+c&M>?ruOI z*M2c^CiFO_Wpk>iLX6f@AVA2fQL0wUEjFn8b8cJ&U7=y<;eneR4f#M_3H4}%<)x5#bE4oG*Hli?U2ah#4?(HIn+8v&$K45JeL!j z_`LXi@K7y5rJ3jbAilDe1S9=~RhgDnGo^}jZ9$bf+D`7@+R}c4<;-q8rioUe(6qih zml=ML$f+&f6~=9KZ{R=2ri!QJXL2`5h4%ZLMoh&j6^pqS1r|nDLrstIpfo( z3TFje4I&AECGTy-3ry!O?&=Y?iA0uKm|sv%!W6F=$bs>tTgweysy5)sn$^gwd#Mq9$2RNTgi7CjsV|2?FO>e zFCD!Q?gK2HrnXoPJr4&~b!VN)7eKojI4*$M%Ln$rYUohQ(I^2 z)Txnd!yeMPwtAEZqrO{sRxCa93*}njMy~7TT^XuH7}4VuriDA_uvn5-mdkoam*XTj2*vm)iy2U7f)5yhqT29 zj=IlnyJ%GB#>))JFti1CG=i}yr(I9}v2M{5P>fez;%c>WuHkY@mK4Fig)L-X1L+CVdlg?CsL`6GNrFk zLP|W&q+fXI;rTbFH{=s@o*zy*@Uuj3VA{fh#-%=Dxk1*=jFuT>s#ONBMaEvud;|Y& z_Zv%N;@+&)DW}ef`IHoX%)4E?);BkPXtC5Y^W{AmcyqmRPgWMBC2sZR^`*2A9uu5| zrSQi1;YNNyKQ(A7ZS>Qn2+FND9^tO}BBZ~|$6itxKQNC95@}`mt94I~brmv%gk^6h z<@*#&iPXXMu5o?&WY_Q!$jmz>U*gu-CExUZbAxq#fA9+*?=a){jMEX1ig&(!i>%G!8cxwWy{Xf`Wbl$>^cc%T1@h>|6qxDPY__qIUUKxFog}ib`ooL() zA09Z-$u*lk^Wn_mnIC7csasQ>Qe9Jbq)wmtzx~#wYNzU_8mC&M+N64>=H?Yhf6rkG z#iFbtaju9d%#r=qoy`*$=H;qS7i2O^e=o``V2TQUFDzuLYvTxt3d92D*+Q8hOWlhF znd(b<#km>Gf;@qmAR{iwV5S#~n4+w_!Xl=+x{gTw9%OXt3UP3UI!(Hc4n8))@X#Z5 z6_GXOrse*Q)Q71rQW=AF&-~wiGWEnnh5t=oJ*70k??r+v^*HChm1Gyp6czj~&dn_N{C|wU zsaGy(mHwV9{$0Q%1gX(HEkO$9@%HOmM)HRNf*U~!a?i(B)xw;_P>QkN1oWZ8&>1gKv zUr7eIcSkw%R^XNz&RgDcJihpSR2=AS?$j}=H)*pYrn9!Jp6x=U@(dr^w0{L<@~Ybj zzh+GwgJ%x-CPmV-Wl=b&bYM`J?o|1SbB-nwp$Jkl9TR6NOaVffP>Z_-M>RDZ_`G-) zuT*(pGTu?8QsnL2`kRED;tK1k*Lh%Qxb+T!V5`5`GmKCjc+^dSG&wJ?M$$NPH74dx z`Lw61#B5oj%M#Y$OPjl`yMys6s3-PvabC%0ijK2@&=21vYuC`>P#h0xfT}m^ftv)> zxMDvF_KfE`p}x&!U86gYhnd?Co*8WUJEH;XddiUb+m+6QT+N}dvVdF*`a%TdZVfyA zsj14Pk~K4#QWI2ELME0t$z`G4q0waD!Ru`X8HYdQv^M-GZ(# zZ!lXJ$lzM54(d8>pbRHbx|FzUK}KD(*ERm4|D93TYbW(j?txj+PTb?h!8l(KRZ1n- z|6LBN9D#Ay$l}6ztf&$$LQtuUiB>st(JLNzHQ5LOomSoO0boYl`}~ieZ3%{UuH@9f zvwD!Rgzi)61)x;blL1c!l^;WC9-?hG@D7EquJOg=)M{&}1w!i?aVijnio#2SZ@5_u zAeGfH#l;N|tI%|jzsnX6U+ZiV{7GKlE8?7EHnX0DsD8XnL@1m!an~VdAH_NCtMoS? z$Z+9O5mSXLN@Fjy=9(MJyv7f5_J1_m83n=fO))_+)>FNzs=1xpQW3NGlNDA=yOwv= zrNfwS^cW*YZJi85E9O%LAxQ+h?365R1#UN&n3fvDWn`%G<>M7Qd;ahNng@4PI4<7< zR==(XGAs-`#+FieKu6s=eax{tHy~{tz3Z2(YxgXE0>+2BQ>~WIr>$A_?&?Y_qXf+d zjPH*!Yg$R#RYAY-<7E2}i#YJ=*jlt|*L%Fxn#q`?aO{thLupe>y8$&OX9rlE0~V~t zG#Sb#y{CkLq40DHq-pqS@ST(sD;aOcEO&6NvebBsny9hzG@VPU!qyOy>jmY6maL0K zuJjwPPD_;IH{zmild!4qTN9NzB{^)8(D`Xx&l!{#DdF`n{C$;O%F>08RTrAyuVchm z5RyUh(#YC94Mid6;;?79CRcOi8a1yB5Z!x^&EBov(kSO5Jbubq4izR2P^XH^F9tST zD7HAQ{ya9O{bcu_nL*SpE`+57i`+}#!6L8hJ!bS^6n67G_JLR_amNW9>B{zTf7!D> z5v^7EmX>RitzkR1!NJca^MsuM1K%Z`Bg%vGwq*CBq+x6Z^zuz1uK31Ml(YCLHZwR& zBddMZ_cL9H4y0nt<9?L-*-=x1@#&f%{>2wCQd|UofMv8P%#xf3GI1JgM7%+lk*0o| zd2~Y^;{FU%f(jK!&)aiPbH#gIIW3&%vZ}J`cL6kV9N2ePWvpv4vp5=;l(RRlBpv1D z3y`;Oxrqo17)>|}uAwQ@_+REq;zD4S>Q9*#RM7 zY>YmTwU!{lvyQ!#EWLQt(b1c}<1I2vl(F$86e#+6qAorE^{uwfwpv_Yemi}g%}9%+PG3Xak9z$R$~oZk=Hr;+M!;Uz zVrf$Csm2e=Z7F%Kj^S%11Y2JRM{7TzXm@YOPT@5vPf1iz26Y;SqP-NMyn zi>?`7Jm_!6`%qbQt=RhBSz(1rRfqTw7&iE6&pjDb-PXIKa;-vj*?X;`SPjio93zE4 zuQ>Sia)GVA-~9qx$FBRrx-)U(y-$DPwpp;VsiSN>$%HJQ`$-EX4Qq=leU>qbFl!W{ zZhq#qNoIr74-|z9YR2)BJN!y`o16fzIOGgP7vUY?`D@Ih_u-c6N`RrNV13 zy5?6FgkbWHc|hkIU;LGNrK%rZQ+fU)$l=@ymUu^RXH;W-*PsWa`l)6wlyVsnYG47! zBo_qqNz3jqK<}YEd5Y(Tq>dkh9>2bP6jPs<5@+^z=2d7iGhnjvUP?*NIOSfFE2o72 zwzAyK0&4DN8lhESfhA z9McER!2D*O7nZNgKdWGKj?&dirMHvUz}A$ ziSmZk0*#q&U&IB(o(V5x;?Y|zTS^^rW9+?Xd)4-;DxFH;+2wHv0OtEl?wI7FIsPg? z(rk+x1?(WBgt6CMFDR&#L@J`ks|K4Da?G~)enUd=JKZakMUa}F@OG?vekiU-=vgyl zM6QrT?yeUpsni}LLpq^RR?8%spX1uKoTqLL%|XH1Ni3pcHvV|E?Bb{#x_p&y4{RMV6UkJKBC1-^RFk$JO*OQjtz{1*y)Ww>gu);&& z5|6-(zoNp%f6Mn#fYVIiP|Ju|;Y0qwv3hc1#3{8~xS#9cJ)Rm6!iEuVZOxvsfn&3L zq3yFwM!Sia{W7*fv0F^&o40&zIHMEa3kA`8Sr98+E9}my!9x*z? zbvbF2)J}LRttc?)-QLta)X@%at8i+^>GrN$NUjJbj%{`T%Wd_826x|0y64Km_xe&! zZi*M$Vnn1fh|*FOm1QwPNZ$CpSrogex7{m6zB~uk|1=9h=Eg z>k!fY2Q?@uo64-+#*s~Dz=K0y1-Ys8q2>bgc2@%wCYLux=gy||WS5e{mBlX~j;JcR zhp$09n^`Z8v1avhVAW7QZ-`E#oswFnOQigGRMmO=JZdSeIDx*G8&bjzk)kUHS88yR zVGUceR7vl?!4~Bf$q_5F9A9wsEj0R#a%XeUX-M@1$(M4J9?Vd)ui~!9AX_Qs*o0ek z#u*vyn#O_cnw-Q%2mv!P9ng{Ap`t(|Z4sSxE5j6W!Fxo(;jF^eTq9B9pPs-5Xg4JV zv$VTYgL@EWc=g@}Ju~5E4mPP%C^sssKQ~@+qfu6M$HbvH|C#{AW&91L_(**+yX0vr zx&c>=Pvi7c!4rudId3NzE4-PlhO|Fz4$lv9*zMePpiMJ2+`o-(h6jLlnA(KIi=fzg zCce{?=^=}P5B)-EtlqbF{`47?M^{b456n<4(7 zd-+sSyw&*|j}hq|X06-KvR9HG(U1rqa@M~qn+u(r?J?!2$B!^uMOVg?yCk2K1 z!-DvnG=hWPW7+Feg5!&$|ML49Uzu({uulKe8c+c?a=!jJQSRQh@?JxC$4{WbE*SZJ zxm9Ys#k5zmCNz0-)G46hLy`Gkqs_gr0H&G-7~9I_vbp}$HI)irsYv-V6O9PcMYk;u zQp@cS*->2%#XNgP7bjUT+_~t@O(ja-LX>_e_X&|{) zXF`6SgzmNWwkVQeeodyOmSBi4-bB>a-@5{m!=vvPzXMUG)<9^vV!fejW|$R_A@Ex! zZlreKN&|9W-F{9G8}v>qV5(5Kjum6GORX(<6d5D+%Uoek)Wi%!$>z*+@bJY>ky$mV z{|;qOCSTUOYrOpZ!NCcylf%usX3Z+YOjMmMF>lbeP85a{?2S$00Xu-R5fDK??_}-xJ{XLr^)Lo2nnX1t!|E7!z zM7!2-!FR;nin6fkQ+G?fXyNe%(l?bYx4k-`l9{P9%-eK&kvav}pSL!fI4~Pc@Qyxh zBjT4hy4M!A`5P^X8r(GzQKv9r2kN)6@|BX@GC_Jf8bv4j*Mp(SY;7FME%N4g1k3CN zGwuqS6dm_%64M_%?+`DkL6YW*8mS)W^k`9D*0f3+x{0@meL)+TE*-yZCl~uov;oX~ zPwjRshdfdk&@>+Aff|0v7F`Gb#FXXSJtTCs8{wHmF>;h|n_dMk&TT*OypCaXS*P#K zQMp0mY-=yMeF?emWbN@-L#GYVS3$P;tTi3NZHe+_-)N23mi){X-*~xR5w0N~b^sxq zYymwhDwH}!A`V|iNjI1%U;*dKL+5L;gY`btYrGqlgFn2OHhm*Gh;6IipCxg*n&wY5 zJ+_2UA#=%HDr~iNai1!=Yv1~HAi^&FpAoCB-8jo;(x~fUtjE$dRvql( zayJ!sJ9OmrYD9i<^ucfL+7ZwtadWN`81Ft8)2k_zpV}rcx_=f@N0rmw+;hjVBJNiZ zJl-_!-ORh+!l={J+i22rwc^PAL3_*U6Tee#nXa+RfS(AqXa(J}$MV~xppvLQTyAX1}ud2+$q$yL65>?sub=9!j zHoLbOle*eucaQcss0;5l4zw;VhM6 zXn-GT>l}>=6APpJ)&KF0OfN!FZeY5cOE2!o4RJn9tO0`_`OromyNPorw~Q-;$&ZAi*mAnE!vCqF2%RR*cy&HO+(?qXF>1(CNbGM+sLh#@hTkM1LZ`^`D@K3 z4}0stl95rMfLLgRMtLdmdQ9O)Y1|Q2W7~@IP*m&OzBMH0GZ&RpRo8uTdU{n@ zHc)!mjNU&5dJL8q-L7Zc&^#(3R-g zZMe~@RCU3g4%%NdIy+>y?rYXrfv~{V8^~IU+WnBC_Dp~6+&%ZO&QoQwbJyAv!O^tU z8el2a%(Z)MW1REq>dT>k)KG)WlsHSy`*giHZ=uESl$JBwVY(iiNxqxsbo6v<2hZv$ zjCEkt1Vgx|;~^=2rK5rE_q&|==@g8>&YcXar2E0oHTSpqYhmm;Ll(vDD(7<;Zq#Jm zdE9ug%j|PNo#&3)bFZw|G*+58VRn1(hfC)|<#uTtf`Z9jv_Shb0 zdnzM&{)2kUh3*U(5@_e}=Q-gssnOEc|y8cf8PCZcPfOEsvW><@u;d6N-2!;nz zDViEA{qXbx%>#Pt3EIC4JL=)N_%6IEj%zR6vNUlDZgXA2SbCSDB&d^J{=+K9gEbb4 z&+*$ITGz13Huzdw`Nv-_-YT_oP?XTB+=rfOVBc2ZXU^Dzx^+iM{Kyh!J)fOXE!0H+ zZH;g!(&2q*n#R_9R6pK-ozsE2OXaX(Y_z1fI7oi4?%N?=e2K#QTe$aWx5&pQZ>M;~ zL|n8pTA4MQa)3v|G`FOv_065si@w&dFJc`S|*X>{Qt zt4tYUMIYtWZsy|ljvCct(L{US3guNNtM0uu7R?0uwa|@HLqzGF6r> z#@7R9kDooWhnlPGRVhT@SZGaGeB00O?x2;>R^v?qT>pBx<_lXb?kpj;|LprM5o<@1 z_N*qiEj;@3`$l)ezhc9Mf&>CiAgEvts9<&Dm9e*BdvM>#MKG@aDSUn*LX(5@4QKKD zp%A{x%dv@_t}z5}#S0w#qf0coqGF*NFp6Y)DN1oQ;)cjZ2kG#yJMXlLmC9_iQg%pj zfv&O_SB;bw6k;uI1ZG#6$U^&RB3AH_N=q#7(C8NCeu&)HR*QXu#umxwITEhPjUW9!G9zd6$myX%bg5Pmv-R#o}x=iN)0#E8dGzR4v{{ z@M;1#_DN30L&4F-6|4O$A0&63;DBJyIvs&moK}Q91MQWqk1+{FT3gKVs;ibf88Pep z5R?;KuI^k@h4PUp`sqh-;`hpX_%5oqi}CP~z@O|Cv4o@?-F;o+5MuJCDLFH!(SCg& zn&x$v&^kx-=2EA>F7I09<3*A>7uk1R{VLnd*Ivky^kRI zQcn#S7ku;umC#-@NPm<_@!O%lyIJAdnUu0kT2y3lqZSfi=0dKs5JkFozuv!za`P^` zk=(>(|MnD-=Gew;E&`3x#Qxrk-K0@RU-tH|8r@FUoapEj^hdidv|M<|t0mU38sJy^z4Yo(L_GvFsf);| zXgQs7;?5|$ECg8gGf|fNYrU$Po$g?TRND;A!0K603|%gA@C`Fa=X#OjUVk4$2pq~s6&!7%a6-W<{X_7l zkf0W8o9V9%P>&9>8Z9Kmr%T5lo59<~pZ8k3MFsOA^-(aI?3oE%gubG%ZBr*TLk0(T zJLjkS1xSMjv>e2>IAS`hh{k(aS`}RjBJiGifiCb(F!YER9ZvPIfT1jz*l#B6FFfi) zW*g|YElXIe=x1+h@W3Z&NCYcN6LaYjaQEgnR%B$MHJGSUrMJSNHv1=Q{odd}(YU=P zC_=zDZqN)rAX`$7l-7{JUIL^*cq}rV2Y>S|fX_EkW^;Lnt*0FkLeqw3C#cQv*0s@0{1CdAVL>nGMpI zxl}fdw`=J-lD9qjGovAAk%#gin}zZfGgT>ujb_ zx-gJR)kwJwfl_r9+tnc;|HM?_ivsvWJw3ZcYWdRNvdfh%dV7X45G+6Z5Dd~|W%6(N ztMm3|E4uTH^7c2XMsj9V^`mz>nNeP+3<=TAI6)+?qk9OdU(d%_2;Lzwojo~ZW%%WT z83xQGDE8n6@;+OqD&-k3C+QVp1ckWoo9jiCT5sp{3y9}9cqv@mov)_PqaBNJM2R1P zR^;V)$H z)#ZtdX`i+j$%(N#e&SZSs)Wnsx@)V0yu51s%P{CbrK%>3UFe`dhX6lANfETjA+8Fc zpcx19P@h8ZBxA2cU)jxqqCkfOYhHo5#_82J(gc42=w4LhxjqSRqC{Ehr$VTif5>Y1i;Ho7W7f0uObfMXW@bCDeimO5(3SJ%!|y*W-1#X+WMi zk9U#K2B=)$S_e%v9l_VnIBor=-VgkRY^QitJ8GN;c^g3-LK|$eN6P$H4FOg zX>mBdvVu1I3g~Zy%FXFT-*+Z?U>-)d8~**Sn5)6-gkw%0!5ySvbjp`|wMR`ViWAmf zH*<^HcoyMeYi{9$ujV=$%dXRGHT8V)4vc`U;Bkj))_;%li4grBfZnC ztEYr<-QozpN3B;Ds~R`{PH8or%H@Q`_-oHyi4eI|<$sLHRf<0FiX;TiTQN;6+Q!1= z)BNq)kz{$4=$=+yIVhf5R8AfgkY>scY#@E+hH&1g&Tc(!i-;KSg&N$K8g>s4KkPMK zfbV_j%^@50x)B~H_lF$!IS^E!aSUg?aXa3m&RO$=zPHoKac&Ej$$4AITxol=%z0#> zlX9+Ax13q{vXG^WL28J3%=~~H?l+_+oE0GiaZx|(S;X3C*2NjiY!$PRkIa^r&>zMz z1fYPRV(BZ1K!fGXnXJmEQ-i1d4dCotG$9=YeVLcS-iAS%;X$$(B)=4?FTdvYW_YUX{B5`XsRZrF2)LL zA@RpN%sk#y#Alulnya<@8Cl`9i_2XMquh07%j4$;IiuPu4MTIz^S7O)+9b_E!Y_hp_#4|VG+b^-Vg2wis>a{c$&iNYm`Np~1RkGpjtneIe zLltxYS%u5!3x8HgZcQgDVUDN3xIuZP!tE|5ov8qQXlX5?WJ4#}*lUxpTl&s4O z4u0pG=*uo7`Z0yB!^iEJf#fazjCedkGjAZ9ja#fGUG6zI()ps@;K6~w;+{gZG`icV zrYb-z$<3ql8XHY$z~3UbdU3A^KlYl=Ce2*q**J4aIzj_xYYtzMo>i*NC3?Ev5K{)LZTs%rpS)}v}RYmH2 ztF{q72ckeX^~5Tg+QjoK2P=npgLxWn1q!gE6tOr=@aIDcgFEbxQp7T(7icmHTAlC$ zYFtn(BvfBYcgTr0!rQZO+`M2j`zoB<^o{gU{C1QPYg2Zf)s(q3TA2HnmQ(&nuy~wj z^NM_zGzyLCnkv7#z7cvGW#Pn?du8$H&wH#t#Atc1f?qk+K%^mXn4VPJ+i=9qrYn@ zt~RnZ>D)h%=7(MpQ)+w>c{smfTV_ji^=eO?q`us#Z=%x~)jg|M`iMQIT3~u%@4QYK z_Ot0Rynyu7q~nrw5^FCr{LDGS^RC6RfC^qGxSZ;+=mSySZ`o)Oq&>$#%}M_+Qj?8Fbp$^treUWFFQfG(Jl3U1uUMUbSPUCHU>3V9wis zg2=pm!PfE{NMs(~2nq?hyl3=@BJi(;eG>BQI@?1yQ$_n5T{#6?tE%A3W1&JzG; z5U)g`paD9wx+7OQp0bm4GRi79WDmAd6!PBL$9af=Wr& zalVMAkbpX@iPa_B2c_(?DQJ|h%sPfNa)-5p7((QgBP^lkrTFo%;97#PioMliWxx4R z6A|uo&n+=VlRV6e7J*5z$lwH)>S*?G&|(SlD#uz)5e&O%H%Rk$zNaBR7O!29N-EBx zD$M5)q|Y)J^1pj62n+hH0YF~h=`{-V~tplG9$lbug~U%=qGZ(adU z8#bR#q+D$g`WBBKLJYM@tu=KgYV&iH;iJ~s`Gs>!VpCK!3f|x=E3`pYV%I^5X(xD2EeJUrgH`>Q9h%5jsdVhyDF>+nk|m`pnvl%v95b579m?hc-orN zkiU7|H*mp7hGfF8ZJGbFDr310pob4gsE~(%pU@3!m>YDXUm;d zKC^b;xUZ8@W&IWt39SVFCn}vuX7EOFP}MLl8XFF}B2{+GdtCnsa|g4ab{0|D4hN6G zEzLmPY*9$JRz|vGdH~HgeEEe0=^LK`f4r8@Lgw%94O2eO-d8+M55xG5mLHP_f>g+K zq6e>##iaXAA*40wP)WY{=)tL!EG;c9u0T<(b{?kNMJI(6soFhH&NADn9GeaZ|g&HQI}&9H>oi&FTMTeOm{l3 zH#XD-lNAoK5J__gRn%p-yA$!ozUh`ShC+OpFAsi~tuKjf$iLs$U45*^>sa)rb|V!- zS2F4*^Q@48r#OxabN zWWxQPR}NoEswk@swgyFzrM1IHVoRlwbvGQ&fNLa{YtrA(xW{_=x=9{FO>|#ZBmNW$~e)OTKuN_EWnE7CyVz zR6yuYNlTagK z?MfZ^L!^d}O=tLfgYWP39(Iq_HY`}lns=9esTa5yEf*F`CcgDq(=!%mSjyH#OB}AL z$5@?V<77Y;u_D2u_ylni<@UvJH@K0taQf`yKy97ZyRNmCwF7d02yeC2-_}Ske9W%;jTGi5=&Zyk5N;b=8_^-e_P& z>X*pa#|4}iOc{J=C<)B()qKbsKOd>Z8y6&AHa?Mggxapvo1k$~FQqc}7VDFH!f;w{ zC}FZP)SxihXt+(|)}@Y#s-NBl;?xa}|7d;F+}C3=j6dD|+IGLS+cNz^4p2xuJ)T%_ zjM$2_L>HFXn?Fr1p?e86s%29#I>npP(@{hp+OIA9;V5h_f|gUML~ZhJ*L#dY6GY1F z^ma`er!(uT84Dc|ApmW@0Iz?{F_abaqeFd?GY1I8vD#i!x|7hi!YM(sz;%%3vF+DD z-@-tHv7dzAe=mSb0z`J>8DByNfsW~(f6-skvNINLZ7ba9)P^CfpjzJykbR;#8X zAE^WpYKay_5g`ex?a;+kl@`_2+HIzGicY7r+Cj;=&*%Q({tLd>b^ns<2;#bubB_1x z{dzqgkHUH@MK&1g23}TxU0XlENBCNBqZC5YXuBT}gInNl<$$^=ml|li8FZ7;RlkXt zc-GQjOXYxC7oZ-(L|5@f*vd)h=So&f&TGrT*LhQ=MU^18_S1{Pg_ICciR#R<%}YB4 z4eoGo`j4r#E{GnNJvECx8_{kvbz3_v!)LwiokG7`zl^i~yVHW(-Qcu%;}yT6pWHxj zsik|xAxz;u0e*GLsHt>JH*SCS?Ahw}dVCz%rqyk)vVh@yRz!i{x0mQDmx7>eSJ$7a ziX=Dj@q^&pg!V=ZXa4MpjU;S#9YD>mMtS&C?&wU6P;{nQIcEF6pj4Oid?T&46Hf8F ztxcbO(Z#NuN@Lfjn67qT*vq%eYs#E0oBrcuc<|(3Y%RI7ncDQTo2dPlR3t9=y%+UQ zQm=bm@nVI&yy9i~Tty4Zc!Kt+YJnw>B3M0@D5Z<2^(wCubB~-8dR+rcV+9Ub7tvV% zA+7kldB%-w`>xA02X{}~BS+CgNZ~HRb6CVKOWD*{ zO&y$+&V_a0g-Z_7@S|Nb=tM$osOg9WpLEo=Op=1CL%{*;72tbdX<$wRpj7v=~Znzq>A>vY@)+qpfRuo;RY@ys%WX;E4z}j=5TaNyPZ!^Lo z@DcUF4?o+!FhX-^h;!(vSu@AHb5GV>oKJqx_4%~j$L)ij@4Py=5u1k&Z3VYBV&*v@ zIE1)<<-se^GlNiTvK+W*Z&V6k;HfH1kc(6daQT}B~kc`oK7*^>sil^>qNEq9( z8lkR8?ON|CdjMV`IEcV2Ui{WABmLPik0}$VtL>VqSQ?2N;cb|ssOQI14Qqdlg;3!Z1d z^-E#W$-1Ccf2J`h(-vIE7Hdh7eeL;+zAPJNwy2%t`*F+H+_J)Sbn39Lg(R=VLd2W4 ze2cSfH|(lg7!U5=Q1+D$3#&0A^H=s_{XG65=UoIbT2_)dQw;0)<{dN>0*mlX0GEh~ zp_g2}hPi1A6bf#d`tXCM5gd0RAp-x;8CQ7}r|R~`Jgz-`U7*kD+m|#Nr5%5}a;2c+ zepyYC!Bf@p)=h8y#~1_C%_!Xf!olSyR*D9Ec*EI6h*S|127V#%=Cx53uR)2$xqI=6 z|5j|k;oSHi5eAZO11zUsJw1N$;>yE^=~18v;%G%=G=Yk)zB32c^P$faG`!!n5qB1R zrTxda@%)PROMj07N+%HXwKPNSTwRd&!{w9OKfwOkf7qWxNvjLjNh2-AjxKT8T`n;f zbF1azW?|g})JjdobjR_MPS6VCI7-4_{b> zfzoCz--%Y#PQsCQ*`t;w_pWXCwS2PsX?cMoEZ_<4&XDIfLsLAG8AyL~FUF|?2q6rf zo|5?fZ9XqAe0p}j0j&JgO*L12_CIgXzwN)GVRKNWWv2UjwN0AWq)A>@)dJ>`N%eLz z;h9{14SlF@qOQRZ*Rx;+8)B*|!5f4priuuE;JLCOKIPb8(>A>~pBru_iEDp~9mFp76W=>gs)EP)X4uD5z3Dt8dIpD*j75+r0_RG2g>=#@j$7nDWaRWBdl z6i-&C6EuytO%Nej-8?}~x`UT@D{MF~Gi^3#IMTe#OkXU(l+syQX37QZEK7cAZ?L35 zW*7+T%n8{)$64!TuS`l&2^Xzt7rj(x2HxYAX3+J!L*2~h4bT)4H)ZYxLekJ$=}G%7 zOpLDgkJGS;d5b2CvW@OhvSX%8Q9JidT%VS|OUpUJZATrbHn%-nD3|M~dzZ&|YN&5j-l--zVYH6 zN;g)Wppo+6@c_a*sK|P!mO0zsr1eqb1v`rMm`;B#sf2asAOa593zZR{Y-RAYb;9MKv~xy}@)Ec_6X#XR2=D zX7G;w3~9Bk=V@N}VTETv+CWWih*xZBvS`;{o~L(bHSE|IB>MK>^;ZsG!uI!|Z%-XB zC&krgG}3I3<&YBuoge#=+JXd&TsGq)HFGV4W}#vmPPQf^ay@gorUY`NUanVwOwAdl zi|i$cPDpdfSe)rzhO3}Xgd?f(a_FdUNGoM&0z-OtulrVbha*X?udSn#Q~+bD@Gi9e zkd`)!dMs+aThmHo>I{%6wZW`QIf+tU19CD-ufyUfThHFJVee&9Q1B%TO?CM17s+1? zCG22yq-gx|cj<5-ZgN5$0+}{A*TvtuJlco5q9d zKjsxSbcRepY5!uUL9qJfN{n`ud%X02bYRMr(oRAhL|ss-KhPbZ;h55Z+dh^go_u@* zQ0kSC+?$>Wk?{j+Cj<6U4~PSsOHGUK?kmE#>GwI@&_0{slpyHZcBAsuO{l{bUCEuUa;QmKKiUvRbk6{>gmp%v65i~1?rV}f^--CDAQ#fZdY6AMf*gQ z+J?97(S^oSzQOlfefvfK+-bP5Iq8VnFSvkfF0M9}*F!zl>&VT4wSCtk%FWLG(U644 z$JxaMeb+0yj&(f$xUU`GUHiy`y6>#*?(^FMAYA3$-&^Sw`~Rm(I=1@!+ul;lAQ?-y z)SJxg{Gvq@<>K4=^mE?d)UdL540l`Hh`0Uq zeFJq-N_5Ewl_Pt+OV(;W=qgdv%zk~QuD9rQoRYuohe%PDRBvxF8nGIxqx0--H_zY^ z^TzLeX=atfaT=6&vF$z$MV_Y-)T$d<@Cmes7G&)MSd*s@FI@E_ej@LW>iYe@-}n80 zeJ<%}*l%qxEAeB;ABkFwGemeNk zyUp0|>^)^>EjY?!y?VGh-v$1VIuk-r`%ONX_AwY{Hx%5w*iLGW-&t-Z^Ta;DckmMA z5oL^VYCnz;f2rk7dUN#%nQ%ip**cuGu6anzPEhNcZ2jW)j_<&{DWQuC_S@s>mX^pn zvniu8%w&zfPyO2rLY`Fb9qa`m?9Q-Hh(w&5u3`}s85xD{26Cl_K^u1%5yF}B1RMs| zHYNO|-Zh3J2WLIO?rSp_)UmWuq8lu}IkuU}8j?zEiAV$r+r${7V%tcxx;}_wc7Ejt3d*UM!T4-9#h$ynIM-lGHb72d`+^<*EzN&)=b3@s5hk z>ynd5wsFr+x@S&G4sF;oB2oG?>GEz+k&m*t`eVv>cjxwTivkr;fys@EH^X1c$L}D? zJlpAk%IF?X`sK!RgdAZE=MxNve7)s$yCEkEFAkA@G2iV{Zqi(FvtndYF3??X)Zuz- zDw6A4CqAgVjs2uZfc)l~V1-FO<0ZJ>F!d`@U*-^cp1FnQBoq zK{#iyi0qUK^FJ3j$hWZLBly*SuuTn#C59L*(LeWaD318fLY-~s94?ZnZ{LSvjK6@w+!lbNpS2Q$bK+Y{fG{q*j=#kQ7H`t{+)G3IyMD6ZEf(_T=oYti>~IS z)t8Ub)*y4WJ2dFtxLsN91~mWPpQrnE3|iM83-?5EDsdMj;0Hqu0HPREam{6~K}!8V zb0u9T3& z7Vt0}dNuTC)%s*yX0=M1T?Ib5w`I4r5>m};451A*`R-oI^fjxJMG{|$%WXYVS*6PQ z1*%VSIN*lqx)Wsuh31F6jO~*t)cA( zKlThh5mZb@(S^$NYvqV4wh8_6I!Z$%~&AzJW#*f4>+JPo_k{_#tL76(0F%+S!IPG4fcHngG;ewPC&_jEm{yITM$iH% z-V$B&^qmxF&KSO~=#OlnsDw#|_J2006SvA{S@a1A>FBQ56_I3m(>7=e*!1AifOppS z`DAtUC=WQ$b^2s+ndRJ{L2=s{l&ozAQRh!Z**WKxq@VKHh92To*FYaVz~qH3%jJ$7 z=|b9jfRHwMQ3;~We<>_@dsi-FP0LgY3b!K|9Sa5?ngIUbPA!TGwyg&?1@zp7cLRc<<5wpR;$2fuL_be*X^1 zrGl=&;nfkZ6LtV&>4)d+SaCuSC~qF~c>WPVZMOiNYQ!$NZQ{!(u$E(+*C6+-xgf@W*~MPqimd6PQbZJN&iz*(1{;s_r0aU@m)~VFD=Sc#lAKu?8!X#ws-`FeV8G8#)$m%77v6ENK)AuXMX$|#d$DJ_MsKJgBO2rq~|i2la+1?p5i$;`+ezNR*X4E zQN;OE(F1ZmO=0(e%OO?@NVdumYv|}ia8`cHhyKzdtmi;ec^isDGD?Z@xU5F$2z;Sp z7b}KBaJ?#x!;y!=mqN;C5Txy?4^@;Ij8T*Fad;r+W`#;P>1p9{?lez- z`qQKHHgmHkPnGK3zM>eqFb#$NSAw16E8PsH$~;mp?>zlt-wi%x%BS-BEeK^@)EzKX zt#Ljab1dfnO~h}64K|wCLP2@$rI-K9%&S1zd2NG1LxrBDq3-`4kxw(A1ij+_OVEGG z`2Q00|Nie#zZHtl>)-#sn4$l_mBs)6<8{t{9<>?dP@TdQOzw4BH|mqJZ92Z(u9Mad zr+O}VGaEX|nJJj;yFgp78gH$qGkrBW%M~>#>fLY*?c9E=D7f6z)|=@pQNtvUDEH=& zh$8c{2A>$D<#S)8e>l%OBw|EO?nn;ZAjkxtZbV? z_;L+;giRo*q+e#fhPm<*YKJ`hv?FaJ{u|icP2tQZ>leg71hw_sX+?S-=;?fPeQ1(N z_O+-Y-J&A)df!@lEObK>ZapVLwrNE;3emQ2i}sZ%43_jRhM z6jl=#x7To8tVSNTv;LM}lw8%TN}(ak?>4^;38Q^Q#lPhHtUq1XpJ-0*$)Zx?Ot(jT zh*O*yGrsVjv-g4y9%3yg+DA*6MU2HAUesS1C_kqz{~Z1x+5dK@vbbQVmAo4|Tyk_FT!SOF3ydSt6}yvunIbJ|3Bq>muES$JQL& zUcDC+KxKB$sMRx=vvGsFvnp?%P1zNaxZ7IpO)Ji#)ynjZZll+^nz}wAaQMxrhL-)zhaqqj@FNU^x zQA&s4DI>XyhUq?o|r}Lbt}RK3gPfdZ(W$> z+mz%R_6AdWi&@o59$H0bq8cw~^+uH7H&S~EXmNvM{E*HgOs)21w8tKIor|;ouu^*- zg%{0zxNtn=pnkP-AKc++|5dcdV<s1&g zv|tBKIOfzgAn_eXUPVu)h3q839n*|+$$v%nc0q0Y@N}^uG$+HX#gA0~Y*2Tl5gAcj zY58cccbpQ-whNI+#F#3`_(YNn1%pC|k>Gmwxr1A<TOyda)b%>eG7!1M!i0~OpD^7&e)pz zUVz+QDT+{0-|W9Y={o?yE5t=0WWZUd2y{+lc1S;E>_5r83;VR?_m0JL*)+RZhF)sF zm_7ckQZBuh@|7KA^v%|JjHGmC&spy@s46;-tln;y+EdkTtOaylwmsduIwJsV{e`7W zM<#KyN#@Tq%zsNtmwmG!lL%A|6XuRCIBWv@0qSQ+%~VIPPV#4;zdhEa;L`liUd>fs*3+w3uI4wd|dsL7A$jky=jkn+{q1cBRw zZt7=7zmS{OvG5wKIe9U%k>BfdM*sxo)l@$z!wOPySNpu+@M8wVIE^TSp!u$bgqRi4 zFMe>h4d3;;i0Mvf1(wYF(H#=C*n&_*V0Ri$i?=p5Ne<-%#svI(jRsm6ip8$Ac|u#^bqZ#M!D~` z#VnFdl$n+1vg7w{n!!EtM_)CM7pVQYOxF&cEoSiw;D_(47L()Wp25c7+LqHD=7dGneb5vW484Yb8ug1SRoN(k`uy9h&3^`&#rX{ZX)bxgGik65yHSWGvV!tgPP{yB1KpjVph z=~7?3golZZ1vJcGQy*6voFmuz{pDRYk#u% zSE$fBV!g;Kf?QzpZf#u}2N!wimrd>wyMF>3oJt>uIBMl_wDs%Hg`!^;DYN307VbYD zulxw!e|%#o2>hy1`8Y`PtMZ|ytJHI!d$Mqx<`9~wAB z$g}(QL$o#e!kr;_f<*1ELy6VuR1~e$*Zlc?&^I1nZ>-O@g0klvkX3v$e${hKj8Y@jdwgxkrOV$Ue0!zO6tiDGL!Ui2NgR zfyA2NC$G4{gi%uo3|}{bkOrpZ(M^Pb`+zCnw_qtxET~PdH!}|O6NJ{y7;e;0ZNLd7 z#94-(y#!!q&732;K#ntJv0vWaA_hQX%|lji^E-xZb4-LO18`~au1lox3$8G5yT66* zw^DR1;05DP$RW6K;ozR@^s3I+a<`)GYVxFcRyl^veq0|PkI0@bl$vnqavnxs$w-G> z*bLXv81kyrPB;Qj&ePgtxYLZ_zmu~ySbD9c!t#BrMC}kOU91}8)Iu_R&t*GW3Q4{F z05^h>YUkG6a9XSH2wt`( zm9KOdETCH{W&V(zRs9EAUJ!GMppnX;l&GlH?!4uSo`Mk$Q10XQhrIjU!;X~&kXXC+ zd2;*ZGd%yyr~UeH_-Lh=WA)7#7nnFEoB|CMF_H5%?-KtXf4Ue ziK}+LG6;ha6S&dYMLlIV>f4nTaGI4U_n?xUqN_Zpq%QS2_ztxCLEf!)CrZA<{aKQEwE!;uB|KT-6j1)Isk=tEb1(u<6x6ztOgC_ zQ~%p6R=Wiq$uf$!Z5@Xq)X%cbTqCSad7E({iUC$s`#FRZ+ou;4yNAXcey(-A0Ue?x4-zH?5KgC3`p5nYh(0n8IRw_D0!qxIC6lwE@&I8`n{iKs z80R3uFZcV74!>b*F?r4=%+o6)`Lk)gpq_n@3QWgH$MhIIG?UB?=T6btceD?`nk+kH z$I8jhZ3U2bF*KZTsS_1(;u0$7^d%p8ZB!69GpG0!*D>u%UMXZYo<6E}2p8gz2uxm& z#EbcIsq~|O*=U$(4xpuy_)0s5?vw-K{@coVOR5|A!*D|9G6;fK=KZ0^Mb1h$2fF_w zPn2*#MG7qs(YNA>C7dbmm^jU_fiu845$_jBSwcb z7r9!ycXzFlnc4|g!XBENA%Hat3GF4?BasG`6jxTW2jhv>>S@RQrQ?JAt*gwKM7Dk( z(cA{CB@rbmwtm4wKcB=oSKIi}RL7~XsWCo0OyZJ&y2yia!=5>6vKAsT#Arb(`Xyl?3&ZtN|LOl-QDVol>i5{n^76ig0b@O-Z z%{P1&RjLOW5FH9CqQ@Kx9%20%CBYJTC+i&qnpcY~OXz~iWS1CXbi-&5viSwxS69u9 z*e!D?G1vC@_TuC5j20W&vWt(=p#7OVpL8P&d8d4WzMcR0hcdXZaum7suW5b7bqae^|0I{0#*QxzrKZ0olsXcq6Lz3%1ZKj;lm&uJ=XFP1` zCmK9CimA$pxe3V(2nxzgOTl@4Q4t7sHE3sT+r*u_yakP3J-p?Hh}dpi0-YE-Q3{U& zyTel((DPhjVb{9eIsu3PKY|M5jdoT9wXS3vbf_?fF7P8q62qoI1=tQ6{cg|&E(9&U z)!Lv!^IJn5@tUh80fJNWYWFF0w(v@1#koUp9G4v1(`PxrZWyK%^3)AIEnJSoVUH)d zYwH_npJr2T9v-3Qas0!X%5{T6Om2u1-;~6j%n_Ouz;X*py$U3L-wJ*_dso6Qbw%%l z2Q!P`^dOvLFkK_nVzrfh2VG+ChwK{d*6Si^Woti>*rd}blq`3f2wjUiPvCmm6)f%T z;vJIn4DFXGtV-=OlK!8|C=FgB^o;<~iJF1p9 zI@|XLe-fAb@SWdd!z)5^F2wPN>8qK%&)OJeSWi zGrMn9wd@q0YS6NdQwni6x|F~3qT&)XuCdYeLGviI&Dv9x{VkyXI9N4d930yYSTNgx z!_ihtBTe(Sev@{%v`Xc!Y1&?Mgs6tpYAN9O30tW8Dl zcr_%>c`U%)-8QVa-?b1yH;paHU3hLQ2=^Vg^P-zh`tGu)M*U2VqB?|_=3_FQMIDa$ z>`4ga;#F{EqhQa{y^9D!zj4wW0y({Xyug#Y8dED zyBTHg%JR|Qfd$Z%Mc+k!k&(KtWVpQEn=KkDxKUZck`L{P?$_Y5+u}WpbOGj0XlnWO z=7%6LcLdQB_BF;kf<0M#7fO2l8edLqEt9>Oz3bC985u6>5RGLXZbOTP0A&OkwM}@K zbo&IpMwrmZ8EwiW;!{LSC&-TC=OVxCQJvWld$27zy36xM#g4 zbXz`X)q8{7-4BIuN*pQ;-}XPh!~M1zgGKfN@V z*vr15-}jA%7<$cUGJQ-X3rT({gY(RH`IaNT7!TAd`Oie>->S( zyJLWBT#vkF%Wnha{nA-a0nrpJ{>a@yVC3N*i2>DCJTvu)nA! z@XO|a9nfUg6Ciy74{X^1%S9r~opJ-i-k4)}8m5L0q`HJ0t}<0EH%C~QU#Ej1*`T}C zhNO&|==!pHQy?KT$unpULpBt=lO!GHaHK3e9*QPcTBdHmf@Z9IMLa;0BkuSYoDesj z!g;4%Ljv33ljIfv_(>_mr$<)LZCgb=5G#4W>{Y`h8712;5+6tZ2JF2+CD|2nwR(CN zOMf8`O55yeq}149bPLfzE&QGub#BY^srCbz10{<&7Hap-hG$olTsTaIu>mY)>M`ITYQGs>Ts!u_;S<0iY z$Qb;>X>J2tK1i+2)>^{FC$w9}TTV{i3Fnqso!5%U&dSch&r>P>CnY$sD`?99;V;%j_!zDMk`^~Nv zkA5gI1W*a2CggZ0Fm}lqFPDBfgHOi(j^iGzM1E0+T{zT_g*JKrKr<>ReTzL6^yGWt z4TIDh6_MTeHl%NJ)K7iv7O(tRIvH7OFc#F)1Oz+`yVm6K@V~&_>iT7o^keAFk#gXp z!H(Hka5w>i<=|Ms%a&=M88N12VG1J4_*;&@AbN7yKN6*um7^O}_OP)?oH@_Vsy{5w zY_Rk4KNRk3DgOi7h<8prL$*+HNvM$oy6t|CsJ3REt(R8~Pe0o2v@E9EQ~?O-$|Od^ zJ2l>^SkCycJ*x>(;Evg?cbMX(;eGtU;LW0Fh#&Ickvzi9$Ortq+a;L>ZvYL&3s zOpAE-G$&o{&S?|&Tv$w|Me)eB#)b1v>%OHvb-PgY_*>hQL5A@bBP_uh{NjRbi?-St z6tFC8YePI4xTEc$SWm?Q6+PSvcD*ixh^P!R6z4N%GO{)?P=$obXqUlwIfvM}hhsIj zWFc$8ZQX&l1afJ1<~bj^ETq6^0}CnOe_s3^KaK53J1xs^%xB0^vRis7P2g}xjJO;x zmw9i)3lA$QN8Le%92^?%0;f1zJAGb*%cP|!!JO#Gz<*?=8_ zD+bv}?c6rYv3l*ugcmBXtUp*f!zRFN--WX1Y*X@x@)cWJsaR#aC{r{gx9Bk~XbLKL za*=lK+T};PmDEBG*3;s%^e!X~RN;%1*W97C>VnxU{R&5+HUoomA#CbRN_VW&1h{5- zAiIItJ++B)gT-r4t-R(f{>d>82Rce!#_Z&*>A*mrnmXLR>nU2EK^3CtflIJk3+5)T z?arGYDdQcT8W6^3ibRsW{Nw%~)dud(a1Ekh=`YY$1ipGO&%ead02Z7TzC6ty4un}q z35#A)7O$zEfhueG`~?1`(3+y+836C!sEVu~|Ark{!a3b;`h-9?5L?@j{tJBP#mVc} zL-r@g^W&}w!uivcO^X85Mp9*=0dP_$+`M9&T`n}j@CW~@zuSy z@83Kq;HMUj5#q?sjMtl4iP>BRqHEzsH*>Of3S{-08~sS!B8>es#`b7{g6bzbiLc(6 z1iaW|E49=sP(G&8PF(uu77aZ<$(vKHpPm4=4fl*RLOTY5sJ3z4zPg zsW|g3fbHD>fa`}$>hyHb+CB2$*gpVQWmfm6)kTi{0&pgC<}SlZar*DZce^#Btybqk zg-g)vVs&1as}007$&q-a@d=^b8vB;+@b?Zxsr0DwKFIf?BL>BWEnZ~}18*W(4nq(1 zFeh?(kvg`|*{M>4CY8Ekll%k%Sx>E$-D}UJUBWX__PKfTPYJRuKctzbr6lO#!rT1M zp!`j`qmQueRVKtpS$!gm-KdLvO*SU*2+}^!$oLubEkDDeONsk(MU(G+zOp-j;!Cwn zYr7Mw5#&n`gsFsLp)KK+U}QeknCF~zE?p&3>8?>RJKx&yu4^+JO?Amg?@F4H+^?J9Tpgjz&t_$lepBRNNd)?Mv zSCD>yKe<6mbltbb3gg+|(7<|DoT~Dg6uU&b;`fV}11hL0<+f`X;}Qfx z>Ma@CJROQN5@43|GyP(d!o)?@DB_s^ADHvZ1l5oey)zW!)#$zGArg#`l!*K@IOo_u zPUZLdG`sDO_)84am4#KxMX_>(+KYc9c-N)qcQPP)$N2^6mk$k-opJW|tVmA1!bEuQhnt~lIqKD%Oi=!AQ$==tR$ex;MVKu>!F zc0L&RrIYz6J!Yf`VCWEc`M%zMDDaBB+A-Ft+qCTYo5|aJU)|FZPchArM0?0z?X}ox z5KtKH|8`&dVPFT`6at-2F4#yJUk%J!Zf$I{h}5;vUrt0^ZzN^rBTcT>C@OXYk9U7# zy96&a$KJoFB>ng7jLWG;l?#>j*%NP^wZ5EqPV+N7Xm~H__wC2}20VAGTUz?dEiI3` z#1&s~wAibowl9ukhr<~YG3l}IW?MUW2U^!JXZTEn7< z8;Ich8nQ77uI}Nc;hyoG4TpO8=vhu>un!1+K)x3=8J)66`~@FiC)-r9gLZ0p@QfJ{ z-)>8Fb@>VdZ_1mU`JWqD{N@l+IfiQyB#_f~2_wpRSlJw{s5ml)CVDY!ZkiY%M3ER`O|O8O#(6A3 zSh{0Pf>Eiz!zak#=)@gfpkZxIG*8{rzb$cBCI*U9VA1g^uU=~+AP=;(&pIxnuw}co zMS^c2xwV((&|6rHp=E-b=8kk7c1{8^@B97AW5O6r{kRg<6$@FE%9C?rODJ_CX>A9h3_(W!~`6cTR{PDjVH2a@$?)&kl_w8bj|?|TG65e}7( ze>~V79AEup1#jtR$9;OB0oc-JV<=>Er(Z z>OcCtD-DrRON5J`CG|H)fm$FWY6@0Z>K~sEYA3MnU=CHi!H2X411zK#DOU6|5KTKR zX%sZMZrf$eLg_%U2}aPWZh@?m{53rg#O*u$XX3Cm{V+UqHw+V{ency1x0W8}sYaQh9`wkFe#hXgR`FCP@FI2ND#ug@lHx>7Z2|wdLbchkqOCbutDK!`CZc##{rz{m9xp5D1#dII?TA3#?hoh)LrN=_-sX z9t<|k_*Y?(rH-bU1ClRc^!ReE0x_Gf8 z4#*Wr0S8{@YP+4U$QYyvp>bYQu>&*r2(T~85f9FAg(74{ez@Js03%~exj9~A;Vke*KH{zgEZ_oMMpy~V(olfIs>kKa%waFTo0&Z82b?C zr4Bx#733*y>;(HYc1DCfcsYFLA!--w*Z)%P2ZU`AUv~%!^yDrd#UDcV|Hi!KKYGjg zBtj1RAeUckxa!bo7ZYdP__DFQQkM6@8*&A0V`XT>@`xyAm1ie?3ED<{herNNPj6k8 zfu&e$QYOSJ&6mXsSq5PekjeK&YV-bSs-N-}1o!MMAP#tXr-|lx`b!PuiJ)Igco=#( zziUCdz*Jivbt%yY2T270^c&~o2?crYBRun@p95XnbV{cI;*7bG+O;qZ z*@SeEx-y~26jxDtDplz34`~BRpN-Y&+3}>k(}A4;J4YUvHkK%TkDJK1Vb4)}lIj|d zAmA;C8;C^rEG@4*tF^JE=~A?df#pF~V&DQTLCx|&TLbjZCiVi1$|s&XM)lQ3JJ1ou zLmKg34aK}6Ez>Kb#o1d6o!xvs_auSfFGIEgMjGjgtZ?2Tgu!z`y(RdgHef8;vR&6_ z=Y4HPiB=_{BE*X*p=HhXz1YVnq$0MwjJ`cHEBH7r)HW>#0{2eac$|y z9q|u3hpxb)SG>V*%kNl58gW`}R919-6K%|B&=N8efA(%ivB$V``kL~5`MFGSg{gEY zr$8h$llV9JH5K&Ye02egqwi;$sDT*VBPRymX66eL5Fv7VXoyn$?5&Io6 z%hRXL7vF27k}vE`(f+u&y^22Yr_au2a+QXa=7zjt>Cs1z-v0pio-Q8LqZP6AxBLwK zuahra&t01;Y*6hsG;4y0gB4ta@FbO4z;q^k%&$N{LDkvEqj{JV9YAQw>qg4GE{iQK z;F)|t5IkIm7YF7`bxSc!L)hHaMZs?ZX4<`5xZ09*C}kF3}27cxB=DBSKel$1{^s{ za(R@IF!egbq{4sl;0}#bI(dGn;L_Lpg@JvL2AL&%H?#~YHxc*h$=|`Ix%T2Bzp;A0 zvY&n?HxlQRhBgdre}46qopj^q-zHVgTBO~q(-w;_l`Rf58eK@G8&@VZ>`6)ftB>em zw5PBrZijY&rcq!V>^IBU4irRpMuFcp8br5mIcDUw;Ax(<`J%TD)w}I7h$t{1a#?vVqwd^E^knroUQ$g2=tXohPo4^t#+V8k zF0LEop`)lZw2H~PA(BQ`6daEwrIaFjkdu9xVCId$64;A?Gy!6BS0+99$?kzWjhSpd z);@O}^4AP{(St>1ZhRaUCMqpuPxM&uF9ozpXIMJuP(wqpx80g{L|T&n_y|z%MZ$>T~ax80;IY=|Wjfy&AgNd*Fto=v@^w3scM~vdsUzm5%tHp-j`|nw*Awy-tSTZ&NcXr?&qx4%%9O}S{_Hum$)tOrdZzi z0u8_qSG!iJin5k%Jf|xgN2)%kQ$sOn_L;zmfH@Don#6&9r-G}@%bmz%yy+I!EqY|8 zN6O`TxY{Vg_?+kH;44_Q(gedM;ZjqNsfyRLOZnrYdT&f;q2@Z*RGRZ7Ib`2CAz< z79bhgGy@CRb0?k|7mpQ$6qsYesd{7^3nq{gB;dC7D9T<~D6o+6Xtxt52Qc-bTcrIt zy-O_%DGHS5S1T`M`E!S(isqJh15nL7(^cCzZQ1jVC~cY!wZHFBwerC=ty#YJ*zTaQ zd+ud%_G=Tj@(O8XQ4*zs(+-l84@_--@R>!)_OBMo+Q(J$6Rzl{~>k?Lw+ zn1}fN>R&|1(NQNo#Uc1)uEt1{&`P5dqepg-1gSmToRRV(q;qoD_dS*8n&DpcwG!g= z_XZ>MT=YRDWK=CFau$-ArIR0$Z(gBSG-|ke@zSrD2qJuF_qU7SHEz1#oQv*6KdI`Xa3viMJnygXkRVqq20 z>=z>!uzO9t5{J{?Vu};+rc-UF*jWrrZK(8*)5FRRHIZ#^qaFAsoP+7)&i@q2(Lk8%rOQ3afw0^nej z5d#?eq#5OdG|!9)8EiSfZBT4y0kEyILIt7tq;9wmz|qjJPIWeN7VpnJW!~-{MKkqT ze6=|@#z%5Zq1dx0Tq>8K=W;9amoaRrVM=zf z-nAU}7)ZgSMnn1m@Imko2Kc-KG<0>{#8Ac}OKNUW$+HNTnpP!e4&+8;dNJ7oOzx|U zlGpQ@qGGdPqsjZaI)cLQu-|Qc@amhyMH;&1=H25goI5Gq2lW|Q9O*b5%{sm@5|hE>%rx?CMM5AF(jo~(U<}q zcZ43^dR>r^)<?JHd-d_??rkiJ}_GZdT+*g)vgOImOj3MOLXefjJUBx*-AJj>ILb(Dz?6R}pfmWi zr|N9oa#jtZznj#P#yKSx_bZoAgivphda2B78%^N=w8FAKg|%06TAW73d$Q!me6Lw^ zs=dlyI=KOZiXdS|pf~S)_DeXkbV4H{;b@!KbixtS-HpST=2>8{#EnZm9M~+`Yh0UEh z+7cIwf5LN^DLwbpd;|oCP9~P?DweLJ<%!p`)(7PpP`Ujo5HjFEYu9K^>i|x-n5vVo*K~# zYxj~}$&#jo+BPBeKLqiNUdAneqlznWP7n|Z;6Q*yI2@i^`vzOyt3bsa6=-ReSu+pu zCN^N_NnYST{~F`v)cWGV`v!aPd zPZT@y7>0IrGtcu%IC3aU?;bfLDNzEh1cmd*`<2&hzIgr&nxIya8ud%$Pq~jp_9wR! zAGn_G)fUy#R;Rb0yr;C@f9_eH@sjqf7w4hEqfSc*1Mq!5vBMl7SLioWla>|br}IQ3 zfj#TMkLe?aA5mH?zo4A!HI952!q5S%0-lJVF@7#H+#NQiuwZA7GjS;Xb2OTb%yHuK z-M#!!1;vqe*~_WyG-b=lW}!d-nxdjirETf3YGrAAb1Sb$*I<17Ub(AwU;V9)bx**L zjv3&hb61)vIBuMn3vQV?`&vF$HAnCr3U2GrsAXidPH{KE1Ew4KNi*F(G8${<`VPHVQrc;qUXHHSqRP3m$RgQ$Hf2)+mE-%<3Rs|1R(a)O zZh+fdd08(%u63}@yh~h?pDlVU!X-^&P-b2v&8u;<(e51x;r4`KEuE!H(7jL-(Ai)7 z=s=XcX2+)1DN?=hy%nivktdyUUkEst2=F_B+=-pLh74WCMN2iXKgmzHD8J2ZWVOlg zqU6o1;&XZQp1hxci5pPd6kc459Te8&95_)rYkT_7zbXR${Zn>axiQJ>+^@(56z^2S`LXtu};7xJO#kYlx97{oc*l&e!OxsA-!+c_9ebQf*)-2Y!K_*?0>qC?JASB=(6mCgjE}qYHXZFqx|nziSs*W?AXUy@-4o|D>9-tBY+`!lL-{*U~LW+~sV5o)I-=wYkWEem z@#`6komXKG=4+va_f?~(~zCK@eg^i`G zS{EJ8xm&6=n0scE-EoQ2SZyV<5OwlMKL669)p*ki>#k(t?0d^ple{{^!^ncImCJFw z!wa#Jp<72_$Jj|af!Y-Y!|)4Sprr}eHTp-$m!uH%pMl{~Z6N_r3L@at)w<174oPls zJU91Baod>i4_(v=^=mbFpM3Ys@PqCcjedn0Dg%pEG`3kA;hJ*1tGx4>0n9*}G)J&C z6_?6^!(|VsQam72isRf|uDwgTY18v_!`xWw+_>A^hXKV3p?ouo-a1e9z+IX7L~#4Q zL9L`SMWy#*#d;54KWBC^1%#j968Le-pU=v+O(o~S(y@7L0ts-6zH2J|AUyGlWcJu%-I%1L>GkBx`u;>Q_+BVO~NJ6=&fPyiRoCImH4o@?79#< z9g_m-xz0!*RZ%QPd#Io?tiuDAGx-4Dp~f~{ssS6VD7{a^W=a+>)|nG;^`?LT=$_K1 zQ$*@b(J9!g8nC*BZZnQ|Z_t5i5Mfs=*Xn{TI&EQ#7n>v2Mz;@Yr%apjfu+vJgErbr z#Y|1jJL`~h=<`kV-Q@XWp%QfOS?>MU2|b~;#%M~! z7QkyZoYK5`7uxAFT~a-mSB>5EmX!q#L(JjBp*x1r-2*oS)5yNzF}}T6k1`hg1S%pI z{8DxIXeRo_NaD5;?mNZq(m#5B>N#$7=26A%9_DiG!IX+J&D&*QEdyLmtO{O9yy@zi zU>^n1A3Z?s0@eK0{teLUhG%zt7UCXYK3r)9unRLYt;0A>B*9CuV00kGt8SCejvLaT zMuQ_#_O{>E83A;%QC!I~swSA-i_vHv_gR*QG${<3;mH@^aAF>(-bf?7c*5P8iz;Q0 zwAlgH>%Y0WzG4b_Pvbw8NEm7`f^B{Pt1~Gk)k7ma*Id^SQy5W|UcOZzOAD0y>Ubq< zv}aca{ic=`I@=wB9bxZL%U7aQshJU+90l+57&wDT=HYJGi-Ry8VUk_G_2iTe=s}wb zF7Mfqi1D(=k2A>x#h9qpdld-#(+|Nl!wJe>>!i^xq4!>aT_uZ#bv5tIlc_pSV#IBm z!iPDATRd>P^n?g>mB>t=7qPbBt{|;;d+EJnFm@uQ^yU(=&w6cXqb5%^8@+V}%^b|W z(EtMB69NMA1b864U|fQK$|J_y@z9$hRX^hqn>DYfTWycgZ39Yu32mfc@Bd5T?7vU@dBm!5Y-R^kI5yP_X8$qrB5=#@2k?D_f)7 zO8>9DW({=4KcD~F>(@;Er~ew+)+ax6*C^L0|I`1!_Qy42|BvxMu2K81{h#r_u37kx z{hv|)|NZ~Y|A5n)^Z&Cs{m&m+A+G5DcU!yW;+i!p@sO3cLWX|+@Ag06{l^YiVM53M zob$ih|LOaGwa5R@x&QR}U+w?z@&9T2Z~JoL3(U#Ee{EmWpW(7RHsHAlM!0XKwsGrH zZ7*im#eOeW$6kZXy@UY7Ix!}rs{g{pe&8Y^M}pCoK*#FqHW_yr{i_%3zjD!N^Haxv zIj(_@+BR;T*$jP>{`CaZ^i&HU)|7Gle)w<>HFEYkN4P(NwlCdj$ zqQ^?rVf_!BW<}W9(lOB<`2T4?b@ZGq{rN273yZd_$_IpG3=xJ#8zjH49e>L{m zR)gT{vsb{tu&-|>Qs!L(l7DFINj>9iLMSC;(0nx!;4*f_$cvWB|6JT;?Hd>wz#|@P z#Y~t0Ay;7!FX5hptYJ;BY0|M9*rI>GV%TxVGTS>?)N536WC8a7g+SH z5t%J{e)r`_YtbuN_eJ|_E{e!16PRYs+y+lZQ8lAgRj_5GwX(4F^(SuNfJ&~tf>s^G z%$=(U1C^j~dN&lmROL4*gBu=;>aJW5U77sNzgkr!i0ZP3%Ck(E3e!2Q!`*nOlxN#~ z!>3>S_9MZCPi~;9xFL`!u<`&AE3K<3Jvbkt^`sjHEHY8EMX@^0x2kH7w1Q|iaASq< z#+8`hr9Efocw{}*@2Af0f3f5Dw#RD(rb7IE!QR`2ht<9L+YTDM7|2YQ*+7`EXF*mZ-+y+twc9X~+` z9)=I{&TfLxoEEN3hRPQZl9-VsR|Ifs|)fLoa!1DKokCK5zOIrkcRFYGT8P zg?*7lC4)EL|3LIg7^^7!v&%b^>|%xP1Lyl*R!s16(RO7EHbdvTDx+$?8*$mqC#&7l zVL6{CT>OH#4qigX8fTK{%0c%DnA|V!oW{Y6woMq=Cy@@>Nk^9LZ)hDz@A3hdS0H)^ zMx@!sz~lhMeSSLDqS`1ch^NS=(q!ziK_2`5U?I{J!$DhYcDHZw3LuMTNbUqbIG9<8 z9`o0g4E>TNpFBi_E}=_lqp}&g*5xOzs!+2jpz10(&#?xy^*~Tn22Ornt0?;$0!Ouu zuLJ3^8n}Sn;PkMs_t)aY zUkA@u9O>Xu91QKQC$_?FM!6OizVO_gGJ{%oOKa!DzSCjj&saq}zt+aIp}S4NS+7Bz zN0TmEFQ)eLBJ+#$TUAQOUvnpImU+OUM+*3N)4ji?k3n!_GRSjVE%>BAaqbd06{hkJ zpw2l?dZley))`%nr|HLc7zB2i5-AT39CR`OADKk=bFu|HNQu8V%Q7a!W8{~L%ZQcF z$-9pEEl>D9Cj{4E>zP1A37kjf7ixcAu2Hf+YR zJ*Gd2dvs$EA++An!)ryAm!^C5pM3>OYaGEZJ+=iZd~e{~*r8ts{V~ZJ1{*w`fjC)s zSX=p2nBtiX;;9PWnY?1FXMEXo(@u%Go@+vbmKni5chw+8>qB!UaJVu&Vu{3j`!$x~ zbxAE=P+YSqYK^W-Y;Fd`wV6$h zmZHxde{$Md%ZOZ9^!?aswS6ZE0C8;Oq=*m_W5 zsS8azI0;w(`jVjoe7o-#=Ef@Tn!b1-;BnP@zhjIZc=5o#$1)2kp;CdzO9J(;<#sdp?ZvPaWG4LB2G5M_r@Gco=@qk-y3G#wqHPJyq%%o~hx=y;8~t$~_1yq#R2Y zJp6qkxWD+fiKgeUuCU)>{WBIbHqT`I^@5eLJ12HM+V!yCD~jfD_et@N^6`2g{NW#p zO2uWpwk!2eA$j_>bkJkzryyuyAX zMm!{MQ{S$0fu|_H+2NUg_R&6z-Gp?>GXO4G?~j0x>X(g%X0tMR$Mb$$P3o1CQijJl zn!}SNp9hK@#HhO%s$oc%*h=?RP>Vc$S{;jVh^|p72;uD}YItwpZdKIbvKSFNi^N%< zzB4B4npyn)rkKUze(ec!q?IdQD_al)sKcFK8NJM!fVB0F?M#}?$>k3EB~1y6Kl5FX zAKfFPD6=75aJIDHk46eFjH~>~uLK`Q5XPmFUlvqz@=kAd_tocqWe!)@OFEk9tqYP~ z$#0{QPRpwaJCpUA{i8kkvRkIP^Kx!2;rd`uzI152KJqH&^QjzFyF5*!3)ei_FWVW6->If;HjRG-JIi(udFI|pU91s?Q-#MANoxz{B;EiI|2c!cgb z^fRR?3ss__gwi+eFJ~iJB!~!94Y@VoyV3?QVbjkCDq~z%3)D@Iw!&ta|pyOyd*>-l&UO z%ozS~u8sb6-d^@0C9u*<9H$cU92)g@z9e}0g#9gIcjU%AGr?u$XC{3R7k8(>$((9@ z|FVUao&AXQC{rAX7ub)Bt=K{v?-pk(NR-Rx1j_}-_c2RvajdGUfn|G-I9qGHf;G23 zv+DAq5y+kl=J4}EWBwRz|A;qhUqP!l#^{~3pJq{<#30YP+S$Z;3NG{sp13WfDO9u)ur)Kh^8S43ga!yJhOm+?#Ga--1n-B zc~>Oz#m`BTfnkduoAa8WI2}LidycoP-{+>#=?ML`qQ$q~>yPG_XO{(E{nxtg8|vX8 z-fp>m=GK$^G}3dy$wS){A0!ltFg-T4CN-OeYhl8Kcm_FUt@b*@u&X_4Q1Y;q)FNlK zu68fEC{u6-gRJb-RdJEm zW9cCTw&n9=K{@+#%3l~i$ZyPBmMxVowI^|3!p{!4kAJA8<$r0UT=!ajZ*dl|Bb$Ptd>n=l+WO`62k6f zTsk!8_J@{9{AX}{qj4BGYiS+7zhX9aDI91;vFF0S`oodjxs+!k9O9{PM)KtTa@NwHeMz_VlWyJ` zzrXYgcyDd#t39#c_mryh+LPxRW-tC*0nUEiY#!_ef*U^FmRbBgZ_|TxQ+=|Td#VOq z?Fi%9uq#`hSbkVT*`@a&@0D}(UFZCH_WdzBhgfu~&g)2jNKbyIFS;!f6Yirwj2aIN zL3bZBLzR@|*24K0^Eiq zthwz1NdebWd!CNy=rZ>luRME?y%6EQFVA59Blm0LpXUI3GF?&t)2|FrOv`cPd`0nl zF+|c@E<`yeXilD+ z%Yyi{d#@Q8;>G&;Y-}qZqbyc35 zQEKBVQzaK*`qb1J`Tt01b$cS>f1vO@peix4@kLx{`bQ{gteyG&L z%pzu-Ki*(0ceV{;2?HOJ%8M+b&f^EsRpw8&W)zpplQ&t>+sw{0PF4^5=+Lg8dR$@U zc^=e)K%Pnvv6COqqqB^CvY6KYxNk%`Q%* z@biicUewENP+raFz6^P{M;xapZlcuB$+g;X?tHU*Ofo z-J?NovqZgmq%ujsAc9v*cW*y%kan74{=#y@^TX@rYI=VA`D{Jl752$BD2{wBGyj+2 zFJ!!ZcD)M(M#N$#sx;cM8fjRIh`h{pfdDJ`|0 z!KPxKF_p1o0W>wKJbYCUu~9a~s7lS#UJ!_)kfkCh;iiv_E{@^oJ6XFE83hVlew_2x zVQF`9@t;koTm?_%_|Cj)o5?QVI2pF0-(GN%?#Aq@UCZ01MLcTicMDngJ0l7Kn7iw|pqihWwTj*=r2M;+`~oRu zlIo?Eb4c&Ch2Pl`HJS)FiI;P(^;*2ITw|ATy}N-tx6Ea?ZI1VRs!)!<)tm#V6|sqwVaKd@>%M>7le9Kt+S5|{SU7C2a+4-hjaW5pek3Qzy5rj z;wBk3!T!+LRgh|zba0=O+=d$96HBK1QB%jl&%i-iYIHlsvbCNz&NFV$7xI%h$V(oS!zxp1dOuSDy=ynBGz$c%eAvj z0SuJo@L@&3Pl~r)@6RW4C$2z%f3|y@nd%H|1$gO^KAIF z+A5P9PvVlAJ%@#%Ndp8^_u>3&yF;F$AG8mb7YMecS5IVY!RsP-X54(Tw{kA9nM~c_ zL4D%^)9gw6!vmu$>h!>sKJM7S5s}dN?F^Ascwwh@WQ`6Q(E`e?c2m=MH`-fHFwm(ym0f?a6fBN^Wc)I7iXu>7V= zIRAHfd1U zUQ9+#?Tb@rP%Cr>C^jB=DK>jv@_Xq z*gJ9{IWp>a7Vk-%T9gaG+>9+MsV8VCTSD}1C|oaeDk`?2082e)cCDlNh0vO~C|Cq7 zbY!0nwzsJa2rAoNX8yJe$zYZMuggE7{4SKYBol*UYSPf6MiF|hKY>VT|s@4T| z6Z6yXR2)G8{#E~%J4`QEBXfMgkd{Zm7Nv08oeJGTjsc9IZ#sO95wL3EOm(dLdTNfZ ziN=l08-Z02KAz_YfWucl4wNyn!Ud@2FP3j3gWi()>cXu39BjwcxCSqpm~|1egG0(n zCDQC0qCXr`>n5PbbAcd2DthiHi$_EM=^o9TFpM6HihlZ%f_#f^A3Wsk<%5v+LfRWZ zrKga{zF%q$hs4y4)+?ka6Jmj=*jiQh1W>!*?oJ|O3E$XJMyE-ocn#edeZ!UNGgVQV z)p;>F1qzL!Vy=}LVe>PrBs(DA*P3hS;pOf$BS~H?J6F6w*mYJ`8&s!TQrcerBoNrE zXkkdy;feO-_#XmEkC~^?GwHKF3saC*qjmJt4&z(Nk zImWVygrEYn#Ck3`hh0U8EC{4Wyi{|o57II3^du0)o#BmE(&59KXR$&W@`EbII7qWB ze=s<)}4t{;z&Dmt>pE1u|_PMJo`G0BO36^-k{!e zmJ(N0A7&WROFs#OeXBny3N6o}NUhvDcE%(}U;TUDAran+4lOcfw$dD6vFlE&b&tv{ zk7~<1-V9wiyd7e-tp5c^xx?;tmz-^EzLQHHvii^nY?!68IQPUg3AtQrlHV?OA6K(n z*uAdj$ezqRnC`wT)@hS~r$@)?$#VUdr-D+Zo*Rxbnv%w4-IAV)xYIul8(-0Bv}0Aodzlt z6(@|#MVfaFnZYwuBylkk`Fwt>@5K>9W?i0@Q{GB9w)j{jpl%mYNzY^Kqse_jX&M~% zRKpX=wtr*VIk_Xua6h9{xlS`-7DcC5KRS(&UitjeR7opXu&xXTu#MRF7iGZln+@)n zWok#mh&6&Ee+duKlhO=AtaM{F+R#SgLUwUnT}T;ur_TpnC4TIJwH+zRpDEKtRug_}^92Byc{axDW(!>sv#e-UXM8Xse5>~glQ8~X2wIP! zk+PB|TB}1$;gVDrtM>H8_b!Qwq@DF^^CjeWXFXK${-6GRd8u)QqWS9b^5F+k@~N;t zgb%W5a>X<;P#AfmVKq=ZZWvZDGE*Ns!{%7i?$UU|;QCMr0;aR|>d7B#kr6>nGdjCd zjGRq-wjALYZa<`=?a;xuh2Bm$;MrvCwIR7YziB36KpA@VIub}OZ5XS*SZYsLw0N!X z0NqrV|6pxcbuZFw8i(ZXR>0!NE1~!ep!O;_UUzv=qtzf?o4p@0fKWt$Tj_IvBdqtC1Ut>Kx@rT~>@o_;1 zuj4<8kw$z3In2KK*XPZ*0UH{Ik2mRH6^JW@~T{8;X zlbd$c?@WEjo;_|K(Zz0qQu!x>;i3J4>;)%uf*zp7ldRVA$LIu+@R&Mpnsn>^2Ya%{TXz!3%*c z!OEUHSt*Kz<$*F12RW8(uV`2ZRtaMqqVk3a5`wHh3)tDh;6T#O@9TzNwSG8g62d*Ta6HCYJ8Qalgs2`*SAwP42)1hkue*)!gM=I) z;|F-P+aQepjtZ{m0CRnl19z4SE^gwDm*)pqP{Kx1_y~6sOL0q@_osoPjd)Z9vbDE6 z?f6sawpAPB?eSHLs-PQ%S3e^A1H-^P=Ne}CCA%Lyo4*E8#tXl;g3EO)c*FM6kuYeY za%d-(BU?W`>rsQE7ON&P0Q<~8F(fE^Zw*}hQa`ntUB^Wdu55@ORzURVAr?N7Q^b^) z)gO|+oX$g5TWrQpsA-dx(QVYg(VKL|{a*IS0OEG2^S((OBwL(9ckJW_6plK{(xI5Hc|iG8?spAci$9%(qSGJW43eA36Y!OOrBg?v*EK1ZmHoSbLlK z_$tFx3tnpNdhgWsV|;^XhT9A?19t1NKxB0)itfiM>~?Y|M5Q00dm(PHHWp^|zz=mQ zug9d5y3@k1s2^a%Pf=-!Rw3g@%d_}K%0s5h@lxzuqyLJPjlA&Y?YRyrX*cZa0%K%8 zaUZ?LA&hDnRAr`asO53a>owj~F<_%EG%*7Ybdnz?`D}OtOa+c@{TgACo0e2bc`zay z2LiYgoE=Whd7t)N$WzV|@YT*!8#AAm?W6lC8(9=GhsrFWvV%X^(3`RXN=6K@idE)t8TjD@xKO1eJp7fF-tcuES!Vl) z-6hqRmjosS4|4IzLKLhN6&b9IQ)8ZKqVnk1h6u#eW{{=9HMdrCd^CJjfy~-`(W(CH z2p%t7nQGvS;4doj6yNffU9U*`f}9D>eel1--yeh+#?)+2t}2jZXoHc5;kxn zup;-tU^Cs^8*m-E=XQHjCB-6OP_ql?$mU!zE<8qg@RmV-FvaGae+L01?xoZ%u=1cs zTy7YZ)^JOJ_qu_)=x}zJZPcvp^Xd)XJ>b$C`-_sGOW6#My|AIb z=>+Yzwh`mR=(4!;@a}|-o5hOk?H@Oy;H1|jwG;zW-LowYenJ(iV9@W77@wz~?p&eq z5Dzdv=hK{u(`w8>)9&RcA&u&3GlRJ#FUq9`(0%0GE*EpG*$t-~S)}o}y zmtqY$%i7%n>&V0=qQXGnAjb(XbYILI0u{y5w)O@rRZ*gM&i`Yk3TcHUP{9<4N$Tvrc9ItRM5Tdz*wj7@Lq7(B0lK0lqnX; zH5n~S)Chn|B@74-WXfyEi71RagTBv(kyEHUn8nv<9}Ql=Ac$m2%}}rhnxf+01l-H* z-(7s7;!1?udiv|}Bv7lbpkU0m;SEOt;c+#$CC8n{@M`VxgD`$tIYIYiBgK$F5Z#Z^ zN{sH;<+H{o9_pthSa=Dh&#LQ}`}m0{q0$t+z2yM|v9WypCgS0ZCFR${%jqtBa%EW? zvess7vdXr`Xi~w8Psu(==^F{Vn0-`=fo(yK0AVxBX>s#<{#u+!(e~`ao#ciz&C?8C zVcRB3R8HX#>CWGOk+i~#&I!_v_zzsyh8?h)BeBaJC>^?me6&~MiJ>Fg5VYM4Tg8LK zC|wagyU5MAJ20DSF8BK)eNL@#F*O)pbeDGau#3}l4H*P-d90u+evt!oD&?b{4sgu$;$-*?MJGQRGE@Jhto_plHQNjO3=9hb zii}#r%RCCrQeb*;p<^>Hv(QYOnOBC6l2c)3)l`ko(H76;pP#>zbiI*Uo`!Skrt^bt zH{9ci8iH3_{={F)5T~!`5PAhZFE=VjHh&d*KOyzE{~LKKo_%_6Km6n;>n%>0Td#=+ zE8;Jh!p}AbgF&lAcfTHGFdI))I15#uLiyR%XJlhxpSfMKmuDowpW^KK9L04jQ=j+x zPNFvY@d?MwJe+kzeh{qJD^K5o+tp^rEaGznAI$C2S-09Ved@i>|L(0su+Ghhg{*B^ zPXlsiIQ1z2Ed(<{5PhrzWyW#aTpid#JHKj6h-tE4h?iC=0>U94WGKGQN_2h;n zZ}4+f?&f;k*3|(2!PAVDxGuN($i74T>1V9@L(eqD8aM$!6X?-SuPqBa8e3pA?0~}~ zn6WdFEtKIX&eS5Ib(PsVu6JoOBY$)xEQvB1kw)W{qjai<9@#Pwn%05+?)5>NkT=;< zb5EueO06--rx&9@!N7RDxny%4oq$^V4q^3v|N7F#gHWwN+P1nRa`#{nb!3&lfZwRa z6*)^dgM9bx`iII3H)uClxE#bUl7Gd(@tJqpC>Fed{nIqw~C;~M_r4y`Z82{DN zflvuD;CEF(MyGsk83XXm$SVzb41M#U^D_Eam+@|kteWYcqa!>Vai%?ovA!1I3+ zxdz91ny=DOYqQHW7{C5ug{%8J0PkOFPjlFt)1A$Te61tATqZS-rO)B{^;ls-T8T`2 zrG{D6(OzRKzg*pWhw0XQ>IqxFmP+V=bP~^2`R{A+)dyd;WVU!66bA&Y`Uvf$rS7tJ zwoYARt-`KUKmHk17lH#nAV=U@++M;1L;7#IGlmvknG(8ajD}gS?9OtxK#t!)!Fn-_ zio|0M;>bG8J85@NkV7C37ZQpyw59!foX(VUu{u6m>2=JJa8MkcSxHXC;s~6qP+1$Y zL(3{nFIw@5eLbyABi6!}7O5yCuuHK6H_1cM`;=Wi1@vl@RDI&1Tqy2IkMGd8m0@y2 z6h@>>pHO$TJZGF#8nr%iaXd5NrZ7?2j8k(e!PwIyxj_2M)W1_JeNl^BnrSaR(+{{} zixmbl@CcvxIBc0P)hDU@FQ~X6q|{ripT|EYaS2dK?n?3`kI2b?UA>-t4Q3+H+@{~H zdx*zKH3}gCiEt$*sqvms@JZO66_(0G`)Y6om=8`SY*=02W4f5~BWxB@Ch|FX9-@F$J5)}28pZQ27VNB z{)aY_#9APe$!o(}uLMGxfh{p%t88VMVm=nm%2IYuWfvVz_4%XEN146RYxa(Px8TU| zRXcB1tjkLq=JjeUDR-Msm2VU$kX2}3DaMMJvb4Tj^q}8jm%H6F-Qj-01l-1*G(Kgc$@;y|PlBE1MB2mn%0_Ktm*RRa8)M-rx~k_O z5YTg-@^A{mXDrL>ovxA6UnbjCdgLDQwP|;$x=dxT%EXv@nC#VHqkdKtZ+L4vCXcZi zbh++YBInGDEi<1UmyJ#jcwGg%m |BN1AiBlC;E(X-xYxG^hw_Plpdl3e%J>~iK z=R?`WZDI6Ne@e5jP4W%=oH!L~-L+$Yvt+|@U}53!5hrx@7sbxH;gKwb%aM_xH>UHK z{gSo1#9X%wKY&z~Ac0N4O!d(#n9w&^M49Ee*hg*n-W3IRjh>ag+a)CXQB!svSNKfU zE;|uYC#}W;vH{y~X6&awW-fvA$e3%SoPq#=otFa1>@f=Sp>&P{B^u$-rMe|8LGPSC zAR_^S!YL9h6i<}J%e^LUl3W;P%zbD#xewmPo=QTTHlf6y8>33ugJWGEIf`Ql(Z`M8 z=B>SH2?q`%wwd@u)_=?}IyYX+`zYdjnvr-lS_H*m-S#fG<+`Hp=YF+l2?m#(lFntb zs<$l({2Po-5ZVj3^}7@a5qfib9v8P5ANB7_00N&CPa`IJk|?)h85h*PryitxD95wF zSf|(Bc^LxbX?vFA7w&XY*>}rKFIHY=I4#db-(vjKyLZ+G*^T!{ZY#Ho+Tv#B*G9bW zhATs3O(uLFOr*VA!2PrlQerrxntZO^OXcwNj62*`Y_?^>8S|kslnD6f@nPZO1J<*} zaR_O0;>ZJSrl!bP;#)ylRE7mdhAl^y$w^W?t z3Ic+6pU-9%Hmp8-^PGUeQDMK{@71&~<_iK|<~!^wW> ztuW0cz&5Agb=&c<@{xe@_jJM)O zHf^lBc`CZNv`!1zX-{-tJKL*;A}V5^d&9Nz?-d2Gix5VgTd(UxX!kFV_!Mk2RNkZz zuix6DMyC_vr4;XV9>ef#(*n#fX81cR*X^GGEnB?K5)>GqRIR^4@3bc&r=#n({W#lO5}luYu>P`pEg*X>YSK~tLobmV`E>~N>8E{cp=Jnq!)k4NIP6* zJd@4}cv7=L{gj+PGsX)-SPi(u-`@XMn<(%A-1Nbt2$g-f==^R~V%2%Bvi>bZ`>C>x ze0jV|B=^&>SSYNNr#To=>d$QWeSO2A&J&D%SznqT(uHDY=#}sySj&S-@`@eKFAWsb zZ4v4*y4Fx0(u6~%e%m+SB#W>IdNm&zW_sO0M`9!6SkADf1xC?M3sJDQU^1N1K@@y* z)qe-MvDAEsl*wgiXt0pA$!sHmn&~@Le3UOKQ%IhbD~{JNsawlhrC^aNy6F$^KOHko-h8?Dq~%`*aqIDdAWfsutR^b4ZQRf><$e3JGp$g!yvD6QOpTmgK)etM%I)*A(n>cZDWN2 zejA<>7VH$QBQ&I)xZxQJ%&II%nl+V`$x+bK3$k1Yc^YMdvioK(IH%iI*%o~C^Ow0< zEOV>0SHmOWR2b4qPG`44eD=X};kT_fGod8mvLaLQw^FWDEU>bIA+f}lgoafhSS9-w zr?|ZKCoU03B3foR+=wtYGts9yyvi@w(o27U*p!Euz~on@@YkNQsX4%g=5u(hjVith z{bFM6iFwj(KlqEmv@*Zac%*4gNr>Ndr=*^JYbaHqH}z$3R`rFyQ-%j4B%D4bA`%681x+cSLQ0tL zhUZ2~K1{yfnOQgl*yqsCp*9pDtCwQg+0Wv{giOFWE}K1d|2X>F0p1*C}@Z@K;m4Qq(RN3AG^)u(BxouDX+v_{ypeI^_5NgSR*FW-EXE zxPRXkO+s5Ch!ky*kkpdIQq)vMkVGh1P;Kpdr!B3vYFfS`u|%jP)IO0!L{xR5+f+4n zrd4aVnbulGH*J|gai4t8bDn?UiF2GA=bqy@_qzEk@AvB^48M`nL6uEL)ymN8V!OPf zVo18HHO+(s@8Q#@icIOX{MbQcXwf1XvW1)y(&tNry>Eqpy6fz{jc$zHg%Im#3@r8yT33B67gwx`qetbkWrGe$ z%zl&--H^r;(&47v1f_88N)VP3TJwj|W$T)gL-hqqNDc3Gc{N1qB+y*dp0Ouwh0=d` zt$F#)q~LK`a%#DA`FPq^SlX7XStClteG8ME1_1m-4=^Z9InV?}Q!1dl_N4Az!O4uxrm4F115myKvot9@@xANi{7+lv^TACb7u%EcvN|>fd9U}GXzkWL8AIK znN1k2gdpPmL~{EUv-0PTxzt*}{BRNAqMtTh9vuK6te0t}y~WrL(gRqC&&4K>rzJ=h zm9D+_#w?aDx4D-svW#H!PQWsYb3AIpBQEA}9SpzV*bX}CzRG{h_K?YNjAMLX$o$;a z-XFCu<#%etPv3PA6VbGu%d#YTt9{J&o!dOvEhn{Vmvuai^R7ItZ0wrtnSUB=XAu`v zM;cbBy1Vy}9-hB_Zpk$t`g}vlwyDFB87i$5hDTjsHil9dzAvoU_Mt$Y%}c(Jzj_{B1#gb z8ExNv128Jj?1M)1B#Ng$0(oRN*|m*9TdHdS7&#qbZx?teh|3RuHB#5`eU+=uM&@nC ziLVk%4Y6qmBSSXiGyFpN8*YMr2Ze(t1dds**x6qyJfeMukg0ys1IGQ)Cv+v|6 zU*0CXd`u9FACV#vpXKb9C>=!QApwh-dChOW>2*eff>;41f$!Y94mEJ45Gv8fbNhxT z&pc&+53V0RwL$zAd#s0|DLJxgy;H2ZyW-}Q-kGjP<|cFVT}aKP=1vVy1E}VR`!YDz zb#8$Vb`q3bYJ|}7L7e08OO@Lk(4!hb2I1X!O;r1QSKp;vSdaN5_l2w;hbCyAR=11k zqthG+{`me4!fwPc{`dB!6waa?sD~_D=e4e!CtZ>+du`^;=xkGz9kPaPZl6z~5j~4m zVuSW~xolq|9p*VSYv`_g3sL`8aY!ja(AyrjTk|`<&fwxoQ`vt>Trc|Al)z5{7Yt%^ zb0Pxk?Uj4+`Q~5w;%f}W;2hrP_@JZYu49R%KR!}^z_mbm^B9{ToF8uScFXpy(*yE8 zcAnYskR4L&Yu4ot10 z@c82NKoht;usf2Ari77$_)M*M`MNI3-zIONTQ$YiGXG$@@z3nQrd4bMuNv!3CF)>> zJ>IA2>+tq#mr95-@!-dMFuPsKd3k(IfQ8am=0V9=48JHG>bCjVSYU_ z)8)NiV=U?tup5D-`v{+IX{&u(`~dqi0~J(()jvm?DO+%Fa0sQi`bOlaxAn4Z>AqXO z!e>mK^axeE)Zh8=b39p7Frz5wcSU~lYagY|{BP_i6-T0+wG(kSnKTT zG*?IY&EV|3lSJ7wFJHMqAZMD*H~JnglcViYQIr$(5`U#&ofh;^RmT0>j~RPf6-7O6 z9|W-{25cV+7Jw&6kKG3u{x*DJ)s=7XZe#V z0t@5Q{chFf!8*u7X65vIUOumcRxRjYcumWCM&afAy-y<#zL!nj3;x9+A|vvHJVT3J zS&JD}M4rXBXetnBFvif}rUL#bWT*Wx=?w&tzDpV;6aICpQoBeDbr(+d4FxJ?$GQp) z7@l(t!=8yGJ;Gv{j9S%gb|2d)Gu{oiI|1wM5(sWv_eHshFslD8;Uw4 z;a!&FkXop%CE|EwiC;X-iqzj0rjns~uOW}TpozNeW2f7Zm!iNVLP2i3{N)*I>64{Ao#WE1!M>`0H;Ykw(}*`AY| zTAEEaDDk?$Kl(r#QR`Zjt)D=82uPA`f1hE`@qX*#6M;bG({ZycQ zh3P6B*yN@4!Z2lWggdR@grsC5THbL(voqYOt{tmyUWR6~cMXyAQ)=s$(nA}4{uLSF z9xctkSZ!Mxo;k95iz<(;xc<)!ZkPgQpWK%90o4y}-e1IyEj!GqI-@#efK6a(+U?gT z_JAuO)I`6eL~?(r^m+_;+wrL5()Z4Z8DH}mxO3-6cYRsLG$gzJfnh+j0$wh%zrdQ)d5Ng`*` zQ*`lh`pj7JkCHP=e(uuC&u&Yu$Wg^_08m?UPLb@gmGksXeuZAy1GvK2$=oOcZUQ@6 zT;fUu4W!es@L6A9w)bp}uEQ&tNgk-|{_wOi;N>rG@QP5QhA3H=Qab_T05Bh@DdE6N zVH~6NOc*=TL5GZeqIYAy2BdRG#-(o<2Z+UYgEG~Y*vovrC_5oW zQ1-1(PeZ3VY}N2M%V;0zE(?_={@>)L&f6$`y)NWgZ19dPnaQyo3Sq#O*w)$Vq6~qw zyKVh~Z#u&dkGR8t^~>q|nsG%AHW0y^QUxpRR3;m?~?Z|I8T(KdW1QyGc4%aFO5+`dT zPHqMOu3L6#0>PPPz;l%uJFs~r<1+lLWg95)&0V&VZH5r$1uR@4h>Auc>yz#`vA_p@OASR z`XCxhHf3;8=LHn&Jx?+-I;jz+Q7OYpj0-Iwja}w}5p_ zu2wUjNz{EL=`U(Zqu?61r~O>N)z^{nR9`1$(~|%S(MB=PcRGie7^y((_WYN0|93gd zu}RL5kHjuqaSE8XbPUdAl#bOo?H~8~%jZ4D30CR^%XDG}ehSo)&B?D?Ck`~cr094u ztNZ$gGNFXC59Km53-DQGxRz60YN>;#i(Gd?>z{S->GxO1fTi8hG>*+gDhEibf^AtA(fzJlXImtz9)a@*-TaZ^j{# z0xforPN)x2H6*`&4bgvVvUF8jLKGo=%Ig`5%i5HA} zjydu7<%mvivc(AO*wwn!5j`n5GngjZTGVmc1ZgFC;~`^@?GZ(JH2))$`|=^sM+}9 zFN?uLNbC^wrxICEZ?1;?`5cNJLhSK$DnNLqmO1QHo^=Q?zIbSx^1S{-|5*$f>i_?% z_y7O>9@Zb)T_=(jnR_2*=JRf(!Fi73#;@`ts*_&0El-A*jb!Ep4@4Jf#m4?saGrg% zkz6)XTiYjS5jW6pTR;YEao zum^G~OOvBhXD^VNPdSKMokJ(f1~n(17Ml#%#^4%9)m^s(=xmpbbG+ldX8ViIr2YHUo7$2%M!2H9wf6u%7Z8nus{X1hWBZFhZZZ3fue?NMN`$3H z6njY`c#BAMJph;O=rRf~pJJz3x zTyN3wp{ib2VAH<+{&SR_fmRXl0ufolO~|ObG5e<*n%aPqtGp!#`uZuy;XJomZ>_O} z+Dr(%s-=$LCw7c1gG(Y*26(Y>IW_w@(|Eau%SIs=Z)?Gf6RuYfLIWG7M8fRb#sy2a~Je+7>kybpt=!Feq54D!>&u75Oo*{H# zJcI`>DhOjwhwYo^-B;L&-El+ovTg`nx5fbhxv#+UWV1rSIa24rQ*JXstcctzkPFx2 zhm*VO&7hRr8`de4MZLTA;1&owHb-wA`Vd0XC@ku@iqst6c4}K65<=^G!i8n-MmNL` z`F3P#QuH~*lX=_dgeMAxo(diOJH*0*Wvtkqge@p2Kfj&G-p_(SHT2<8uLVzpJWZ0X zn;Y50k5DcY-c&?B(p}Re$p}tS+xDs7(!JWza9UT-RBMWGbbg%n6Vuap`uPaWZdbs z1Htk(H66Yx$3o{UBgZ=q&=6JtX(u z@2PbhUuraVVfd2V;lt%715IY)e@UhExJ_4JtOGJ9f~K2+>ILSQRvkIc??$$0U*Z3p zZ^FQ|T57tEmC1Kejj<{vexR%bou0l|G^2i6Rgx@tgF+_bj@gFN;wQZEXF>wlJCuFb zOkr8(!CyHxH-zHup;F;3cKNJn*HH~y0cVJDKA2EY^knwWT-M}wCX`8ayOLQq;1(Fv z+3`SNB^QpXRYYj}9~!i# ztbcAOH6~X`=3nkt(5e8&}-@MOb5IG=a?u`Qf2lzeMQD<@V!zT@(V$VshIX znrV6zza05S6~E#X3RVW=rp=e3@s*T3EGvYZSA5j#gcp00p@FEvISWUw#;zs68qdz6exhf>O zM^Tmf$-`Y;cS@h9Mzwfp-9%1p^HC^^dg_|PPmAsZ7u~>ONjtI1=Czw`hJOrQz7=15 zK+jz`d;l_>HtnI;e>}%JbKn_v{^7MB?6bnc3XB<`{G-me6XrXH zhMAlme$yTOm0fvpzLYeO^Hf17km?v7e--Wp|HxD3fn`b-Cq~Dx$AOx z3T0C2gizM;wKPMr+;&F$*Q*r9qUof7D(h?LIPjq}&d}6ouE}?Hl;(`idW34mGBs*0 z#NEAp&*bY}?K~=O-?vVsxBg+&X8A1#q5{}@Lj~F!tV)!V$)CypgS~GsgP?Z6gv$y5 zczn|^5BNHK0I2ubCA|l%b!z1G{0nScvI9J?X{2T=n{Yk@IzH=8g5xtG>n!4d6xX`Y zSJQV5avbKNvg@!(-%rg-rvYXKVjq8OXR-Wz)@0S>*;>jVnJ4IQnWkL;#RUkdFxDCj%A!0NRdjgatWU`#)|dl)NSj z`48F1bQU-#T?uTN495}?XxkPpe4H;VE?r~!*!c@{y#?5G2cxY~NXs)<!$D?-p{XvId zLB|d^(!#d=0;RJ_3%lW7TUJpT$B690lW;j8J9^imKUs;Ro}p)@N%L{8rf*40IC)-+ z7Py9(Y2M{d^QMsq8Zq0vQMGEYm}qbtkH*x*@T55pISwR`Ty+lz^bO7VxFkA@6PX#~ z8^$L7S}<8!rJuP($M^;&pg!)ImPJ}av9?WGpIxhd+36NO)Z=615CfxyZ7&@6Myl38 z*t+;UBMV4M6(=P=<)_jADNDcPD~{O4xR!a8UptQX`Ev2EZ(?$4*eWhK7r8-xkNHDKvQFlur_cpcxIX|<({?A>22 zmlK&)1rk#;E%TW|4qn3K&U}jH;e!6zr70!vzc|F0$4PD4A-7v=*M9H14#=XHWZ0FC z2D!m=;LfRXbE;=B4ykWGA1lhtLQLt9Z|~H1-Rl(HR>!hr9So8GJlUYsz-so~5EYHv z&`W1vkNr|4bvJYQdNtW@s=7L{gSi*=LeFnT9m9n)n}yVAc`lU?QvJ^)^Lj+4DVl zuoncH;LmB(L86o|$nq*du&Aw;WZz&_6k399Q|6KSQ*&D9A6f|(Yg>Z};U$6Z<+ded z50?7Df6qQ-&#YG;X<~f~_;9?3a?w2{3Z6)PEpP)Q*3#$LGVEJoJJ17b-lTgihXVi3 z`6_oSrND;KDODw5s%Yt`e%DsvTE=TIxO2x=##TgiTj=Vg{A4@LGRNr#?$G=s9Lf-RQE4+t^hJYY%of+pzbyIm|ufT zma%XWom5fDvZP`<`i%xRUXDqV@$^Oz=m_|D$^rj}7($+YK3G*$L7ZwndO4n`_hYW}*a><2J47b}d?_?}*Ax za&}1=vy&!i1d~@!$3;<9FrfwbtZY zp33L@GLzm!tng7D{sS$#rxJ&9wg!M(r5k7Cm)n&|&&Z7vb4~}8=K+qnOP+=rhELc! zYOxzouvXPcVx{$VVEr+jDfp(itc>RYTYSbxKQJY4HEs9+t1K4R6-2^tr#!Vl@4}zR z9$c+H9=hc6weCRKo7k%Z?OjZum?`zUen@FspY^MTOZ$FH+tkgk=tlqhd9CW+qBK}K zpLVx=qTxVr6Q&*bBz5@)LIrG1mooys##?{qWB7Y#Jv74#f!2-o`9o6wGn#p<_*S5H zO_HlS2W_30`tS?Fbzjdfn?@3752?*`k#&FeTZ-8InfY+=7WkbeM4F7)x6^e z@yc~iPuHEB$@{!9ySI$n0yG9bxWOt9bOQfIRv(Znq4sW$vVEPaU#=2s36va>UCcA_L=1um*tspt|1O+UiT$%svF}NSYI8S&3kB9;0nTUHyNcf zd)JMxX?#u!_?NCwHD%xfT zX=2Bk*1hQ1XxrUS3R9sE!ykK`b2Y`CTfgb`;1T@h#O9F8;u*Ehwr$|Oz%9kT_4aR| z^NHPQ0I$2(E^Vtul|+rT(L3R_7WI8`E&i3Yx)0< zef+&)aPd$@Dz?t-ATXAUdC~kK1gN$KdXKPvFaB?I!zg!p+@ZvM6jhu0(MKmz8$|~` zO$D!Hha_B)mN{pQLQZcA>=5kC0Nw?R2b`XY%VCxuL%AzS;(~G{;gM9$`<1*6f$*xW z^J3+l2F1#e6nTh4p+rIKaAYcAiYYnI124z(1G)2!v8_WRfr6hS^y4g3sd&!OTGyL z>Z9}z9a#hQB2G>Nb5J%fpyD7ZJ6@7X(0l}Ssrcp;u-XsK_*Spu`W46n zzU`iB$d6Jw>XkR>#2P0mO?i(3fXgtLU~z)0e6wLU@2L{`67ajaz{k|!-}3w&`d&{! zHJogd{!h8&#+)R({w^olg{av5#>zYSbz&(Y!!B$+r(tY7{(#u!V2#gT?1TQrnYOV| zqRL&{l9;}G^Ne(2=W5K4bTnQ(by42RtipioAyqq7?B{>kQE_sop6g_#CoG=R%P{<2 zf3`QC3c`YWZ8=a)W@Ginm3`6eJCoin|KY_@eHL;o&Rxg<<4|grP5Txk_L@v?J>$+V zwnyvb8R65_SLL8wE`edLRJ2#0=ED@Be1DMEnvZJ6=nf4|w<=B;@}l+IhNa+stnpVN zu%7!^r#r>i{wFHF7!o6ckFV?UP4qHP*)^-#4kysH;%UmCsZTLE*9X$=XdmDC&LHeV zTY7H2RJF>cX;NGGaVZ&e0n;+xHyDON&d2tr?#N9Mx?d6VkbLvFH#*Hh1O zn(y=~ZBO&MX1-QYVL|S*Q&VeyYRYX17Au+OEV2EB=UY`zcLS4kG+l$lJ6XUFV6y8t z;n(N?J0h9R(qf-~1{7&<>Ju&^3~2362?0KO6o>dx5Am&+($Ex`lG)hOt`k-@e8kN; z#*lU*IB#Kw?4hJ343#iYmrI!YWU1am zdahQ5%lmilJ&pj-U9bPx+@c1YU9d~c$1 zR^s3p;@PA01OL8xFl4M1n_oA(|K&h-aml)@30?*j7tLTXv==i`c#*PR>pbpi#k+kJ z1IY_uP+M|&_uuVd5y+y@P*(@JqA!2PkDOE?%Ug5uN7hsjmYOEQ*ac-en7>bD!$-Vj zgDZ?Eatk+kcwH5Yi?Z40sk zyX$@Eaan7R&YE^+^%A^9{D|3G!zyQH>#2f<3Op0XJxZdyA5C8@iE`ywxWwzR@S(Y3ytw zOIg|vmno2hmR74Xc`O++AtV2{i{cyNXXT>ueLcfx>ACty-G=iII)N^0`zW1FZ5RBL z;cLBWU~rZJ)W4{ATg2MaYsyO~BYcD(k|vxQ74V@7t%51TD|-~YBO{0H}pC<8sgY*uZofmVaVzErf|P>P3l0X^AF<3cUlUPOnLjwI$&F$M35 zPUWyeFwQJH)2}<5`F@Cv&SAc9w@ub@JTvb1Nh{8AKj6VK^m(oCclAGevKfylu}$-q z)MRrLRqDmJ5K^^oJja%wBv#erKN!C3VYkVwhiSM|LC6t80>@pODvGWJuQPZ zK&_ml+e8g>%yU>lh6d&t9}kUtp4ezeFAp8ZJZDiLPRUwWi)8cH;K_ko|0NxwEPo9B z;&V|rwfsI{BX{r@q96-2-EcGUM^Qa{$B)u`CO`AZd2NHzrTna&tBc~9fBPFIUjKET zGLUOmi0R(F?V3RW^?dRH!^;mc&ru6n&NZ&a(72wzUQUR9)OrMpxt#qa;LGWJyT%gK z#hij-?(X>Y$8G9ffhHasJS%xSSdE(hJL>of<;Ep) zT)w^r3_~drJdnMM{(_9vW!rn#x5ieL4XQcFH-g&uTJWiWbs@E0J{iGEld+C#tGgP; z)2v^}dH(bOE=yP>SH47;xgfE_=Yk`(*{pb-gHy6raYqSD)_aLspDnRe!~dP9_KgA+ zQ&%xN|7O)|A0Asq7;e)#QL9omRM&EE3$k#5)E#xWS%2I`&pClfOX?-WHuRNFT_?6O zEzX)clg6MYm+N=V*X{Rh9;PM+b6UKv==bmTxE9~IoWOXRKtetllV0!L=FmwAj_%2x zfiym9MF0!Gx~#GmZwnfM@$IHPt;}DVm~ohwnl*3gIUHFU_YbqPdE442JpcQAqE(l4 z5cWBu)-R&=TS0N9Xs9>`i7UugLn}#txPlOs#rZE(A08-hK^oEgYQ6eJ|Et~$=k3g> z-PE&_{THf2ps3+aIE9*kVJBg%N~`?28eRtHzjyRH74`nIbn7Ma(tj^LsA0H!U13zm zCn-|p_in?5NbVVsey>^E`c3rIA&+)^WOj;?u^P|+w(w-?(!2rM%>K^Pn`wrjbTCoDb$ z;*4It5@C-2SziF=rl2FK_6&{x5u~3m^Zb!jklCts-*R zr_45@6J3SZAl^j6>DP*SlmQuug?3I5(uwiJ+ZzHds>kl*<1ts|1j;>KT zg@(56@s+N{DSCK`9#AZ`MI*A#8J7$jTAxyg4MV`uIj3Ug@Nh z8i5?}$qO8dGFFU%Y`x0=j)HxU9q6%qj_^2X({mJ@dyo@TjB4utlcIYAj_GyV$xu|m z6)KXE#PDx_8D+ED?c1D~1L;ZcWBOR>1&k8lRD%c0hir~ai%b}M&qipN^Bo7p zH~4EUgw3gXo8q<_b3{2SHH+Gx_Vi)^7ioASU(@Nr=rtqNz1hmdN)*zkLMU6jcX>YW zJ7)g>S3% z;6x=e>E+QE3e0EE@&B?Ovr_7pyBX>87?oVgZxPWr{#X=&L6YdDjaz$Ed||QjEf2crWGtp(J}gnHdPQ67r#>#l8+@vsH-w61pSa^pOfQ3 zL{Hjiu;##poKU{Kxm)2k&{=(R+yk6bS0Y_lVme6Md02WT>b4Ziu>c>3^ilG~ z-lneGnBF}Ms@8i~bP1K|&SFY%*zd)4{nuGcQX$k#L&HrESxBN>cheuPsIWL|S7?^* zcUC^EoGE)VKQ6M5e;DWH+X2H-gKFU)=BN3yUpzsR47FJ8oI04F4<)Ejnjd!@{!xCY z@v?jbGa`qbB{cdXtJJXpoJ7~{hArVA48m`E8e(bc+p4brl9cr3+v~kStjGT$Gv`=T zIi$%Uq`gf&)D>ouYV2`RX?cUavCR=-Bg&B`05BMw&SSvFskfm6zR{b6R{b4*LMGA& z@vn$ESmMwWm9{}ZIL0rn*18Y~oo5-14ADYBnql&xZql)&`Z?S(~-bPI_MJ0zl zso%3hVWJRs#u!f>m=7PQ{1oQ4?Q@3bnIA65DnVHg4u^i@O~O6BYaS>)drZ-!*+S^K z;|~K3To-(Rfi4>cv{Rm`{1OJ`R40T5CcDP`CO52p$pM+AI7E70NxoB~GiBr)NqSJi zoc|2~y-%pfM=`OWz_;u2T}oYCKL}A=2(mD#&c3b%pKj3A&uiKtl)94x2Vahd3QY3l zR{ywws`@dbcK%8Gu73KpfU9WUiU&6AxlDcD1Wgx$_kB7zmrIM-@{dm}4-gabH3He2vb9`Z8%XecG#OK;)Jg?SACuNw;k1%B% zkeOeP7x=~tj`5i-EgfYq^4=k-4H{A&y#`e%6VTxo@FJEZ@6XWu6Q~!l14xHbyE>*I z99j@cH@Q8_gQy`G4LYB5_`XTAY|j@5(j6wVT@hqnxNO?h7*tLy#WC{GJE(Q|*xC3U zmwQT(GbM&e?*iuwUd{a-KTb`)9%IJtd2 zQt6Q3#2RN=P!&E&efz>|%|}AXv$Gd&I=I1~RNr(fql2x^5_!k3L5-`jeS5Sj%&?jb zB}@_foH2K9(cs*@wGT0eNe{<9hKOrZoNDs#<$H|-`B4zY4K8)u@sN!qaBdtdj>1rd zqrW`_^~m0hQ~e&z9!>tJ^uxZWZd6ISegXfc7md(R%2N;5AK%#;3KuAydsCoWG;S7?M*;ylyOZS5*#9yWMwT_=0O9-*_^y zgpyZ21DEh}3K<8)_SUrb5z_JG?~6(WS7!sosGhySN?V)kVFA_D(Dtm4M=7^K$)7R+ zMM%d(F#90xmeHQeTxBPzw7uU2n3^?RKLAv@0ISKhz`FalyY1tbjWk?<%qr`R+2ork zSpYId?@M$0_D!x^MwRcq+EuYy!SioDeJoPS5=+(7owy(Jiqzt9e6cl()J+>Q%- zHSqIgF9{?z^gXGhFWzIZ;^p!NMs3KKW((daIYEb9qzQq=No2etD<5|pdCoD>Emv4$0WXbZlL3u|VUH)g~q|AJ}NK}rx zs|T`JsqLGrg|VTZ0pqS)5=M->`8#gf_}Er$JUhIS`R_ruAW6W9`;tTYT~j*9+LSH^ zpQLqKv5VTW2WfuOm0raIYjp*BMJ8&od=gTF$~rm6E2J#UE`uPWI7tH*(ir>dGFH~# zN{`aLQOwj?fq*6UK@h+#?iBoPna5Z7yF&QVx%cQLKOTe)_9~bc8{mSXEEHKI#6Nd# z-$M>!;(k^7e7EbEK@LbruC+{e1f|n7h`T>cK1{f#Mm%X6um~g3!l+sq_(#`*8`bGi zP_-$FK^XM}6|6~@+}Z_a(!5y58?3diF)L0EDFe^|~L-o|O~^HXR?Zdw#GEnR?f@B{ofDmVUXlCA%Z5jb{0%`?q+F zfxo<>xSvMYIJcGLaaU&PH|Cqp*T%by9k74fi7eg+tSX;0{X;!6G>rpFiR4A8Xm7+o z!g+iAdNMYiJU*elV+Zi$?Ls1LH_-Xn@A~eJH+Hl$DSKZ+FxPkgTzyi-cnOGj3Br5t zW|i8m-+F^Bl+wj}DR**w#{XiWn4Mon%fkZV_2j(M>EgW2hCF8GxKy0}m?uCX`;LW| ziv0secGOW`RX%38=kE%o?<2Q3F<;nU2{#fFU*4Pl^r%5ew@7ie(?`5e726$b@<)X+ zuPGSS?g78GpBT}*tX;0Bb}hK?zAkcyQ%a#MrT4e3?wJbq9qh%mxKP=`KjfizY(6%> z9e4@Y%bl8=fthsXr^2>I@)4ug@hh(L-OO%>5LxD~^cmZMmS?eAaIWvzfbC-ym~Qj> z#Sxc{XSU72*BOZ4MKQ)wg_nRR_`#;pnFce93 zzU-TN&#fVD-geFEZ#8%vGDXkurkjDDQi-xQ6#aNSUVa2Bw*BP#)}GM}+&S%3z;u?)A2mmyxgJmFweE)XeOY!4TW>0iN>VQNt*F1sgpIe2!7+BMZ3N; zsiRQbL2GmV+UH}dO&(Zqh4ugKl0h@^I@9*{7#p;&*)wtk4d0g!$7(Fk<@`YiI!Dk4 z*;oq;p7!D88c)BDv*!0b{}lV|4&cr@26d4ZTLWvn<|kJ-%1oaF6DTt9DeHUav-UA4 zp?CrS&Vqjf_OPG;fRrabst*$)DEpfqUkMAA-Jrl+fGa@zc_&cU3}CxJzbxbjcJ}CK5ZOI4SkrryJ;(VuWx{`)65HK;43Zl z%9@{1K?YR6U0Lo-tki$G!qT78NN69zRDnByZA%myvtq;g8(yaSvh{r8&_iuhhWV9%!jwP-`r=}9-h1@#tUGbL0YH9^-Nw}M_wnkK-`H=LlFp(d zXs`DE^iR(bqjPFg9De=7_s4DVP=&l|ktsAuHitdvN*9pO!UyeRqOjV4Ezj2-8WG@zrBo}8ORm}A<$wneZ4ydzV9ED_% z?mhdy=%D4lf0*u~Poa{tur%{CJP+pmvP=&g87ws89wWj>JLUX{k5bG>BA=EVU*-WGh6f+lN^;ZW z9J#GU(nK0GP-{OGLZGjKr4TmM*UZ>^W9v1WRt2@n1?Ej9r20LIOkgcb3I?ImGWP;= zdrPZA3SG9Kb_E<(Q6PoG~jH@E~Mo53#MhjSWJd&X9k7rZQQ4gzW=n#iEDvJy&7YK3)LtD)-fW z>~}bl9mCevddk^72fq!*KE(OQIFAl%X(L|0<`X@@r|3Z#O_F<`({U^6+{K;~H=TmO zTA{hBI~Sj7mAhq_ir#4SSM43&?QK#Pbrf!s+h?X_(8-2>P&QNX)5`efe;SbTBPgEi z{~68{Xq9 z83gTrHG(P9foJCs3VMtiX+@?c=95J&`84CXbgRJEW{M@A7@IG<3hZzmE5qj;!N9`E zM+o7yM-I^gmlv;g-|MWsT3^&}O~)qBBQ>a?hFLc~wOS)=P+8<`Xw6v*^VidUaXK7? zexH# z#Tim6YtBY!8wG)BwwFr%cN$$u`jq0^JN-mSve1$HpwWEOB?fn>8qa(=^=V#l`pvog zo&0mxp5D1OW)wT?G4#q-;cd#D$n^n*vMuv5gop}O&>@@XH=vXK9k;Y#w)HB^P_E&b zT1afkyfcXu{qS82^R$B0``_xT`_0gTB`W{WNozdJil72{vA#Il2vZ?h;0H{0@IABhu6Tk6)n}P4s7z4T~UYlH??y4p9$TfM%sFo0CZw z+t;B23j(w{t;X{8j4M0&X3W+98JiGDagAT(C+SQrF<X zd~&}snu|BV*Zif&0WMnuC|i-16~=WO16Gl=!XL7T6=7WXyYE3>T;&rkf+~u_Udaobm+9Uu8qdGS7s?M7 z2RV}luIi)HotZg-$m}Eku`3Wi5sb`qHn4&Y{0*uvRoEwgRI@~uOUz8Jsr8}mGr?VR z7c>gKV+oaA4LmJ`n?`=6ai{71+aw;(=_KWd@4JFR8Z+^Ldsmn5a0gGJx~;n(iodJr z3U%4j50zp%vM{#Ki0^0D`*ZOc{Fj>L!di{eQl7hZPeC^hi@BI6t=IN6ytE<-Su?ZFROe z`esL_u=!zmQWnlNvn2W$G9mJK;ycjVB-#A@!k=xMh9GB_L2kGG2SgLo+-$G@(d8!> zA8#JpWIPR>FN>UGPKL)z(LSmo^Jk$f?_z%)Nrajjua2R^m=IS)KpJ2%wr{Ql! zfpzjGJXxYmDihFsD}JbiL(46#ib3TdU0!w%Ofydm=CO^vCq3L@*Xmg3$wZyv$amRK z1IxH<a9sivW z?}uEH`7yzRRTaQ`A?8UYRKEg)GxaZ&HtXbvcj~B8zu&@uR-<}$IueR<&7)r7oWlim zE$$|&>cGpNaZ(SWh9&ad%`ga8eFPG8oQ*p~dLrlB9)dxL%m}?i+YIG+?q?~_F~jNx z779us%7^**q>t-tB>sqw`} z`7F^KuA#=<(PEfuVHFJSRA$@Dskch22nMv+53r)SV zmf!^<+Dg6SU8~mCDs6XLYP;>L-L9g+R)k~1cH6q$b{n>fZS%Gk+t*%Fm;9bN0c-cW zzt8Xc*YB_Q1m?`lGxN+d&ph+Yea>In=N8`^)TZZjPaHJud|9$lJp0zvw-1lESYCel zZ1y=zh5y=1X*ay(r(Pbn=W@O1r=J!r$awQE+dS-WmSJ@Vx;!>`eT;R`f(_;{Cs zAf^Ih=gQg-20Q0dXKLlm1N|L0ytFgEhdGl?eedK8BElGzoC@w1FX(6B9NFq_@s8Wr zGQHclLY2L;)7$H!idOI=;1Ey55$8lb^FP^e3@6N0NF7;^5BBV@gD;&jUr+F*^mQob z=HlR`Os6WFW1I;e31$A0%e-i39NByx^KCBkNv`pqo+3*7QST3(-Xm@*mm#Ex@nkcH z>#*lr*b|~a0=+Kgn_MQ?$n4iLgr4~b$Mr4gyYKumO}5XZf=|}jI;k0q%EnaKsMYnD z2D#qI^``Z~Q6aj|80JmtGm5;)eVyKvK5u%TSKmkN?B??#f^c@vbc>hNLoS)ilkRY? zCF_CsLL+y-*UZ58OiR-{lwr-6w82y(#!J4$Bf-)GS5?$rkC2UCaeF zwSi6hm3pSFA@D8KP-+?WiZB4Ps7=^Po$e+?;ho;hexuZz+|PWe#mwqrZrPlN>+bzr za_^^-dq0|GuR^wD?_uK;Z2S`&KY~HcWO|#sd`H|J%4lYhv4fTr`WE(G%n=*^d@+Zc zje2^2=rJ0Ab3MJoJrUCDOq88b+nI6p2o5t*51*9%27i>5X|*$-)ib};GqQ%;zBt!i z!cYoe@(V07M2}gA4L6)>7RJp95$9nT zN8bYpcJwe^jg*P;&1CL4lmazW2W41K1UDU!1cfVq>M;O%Aei|>V;~5hS=-P>3c!pV z7PvdTB}@-Q7f)qkFW-oQe>MAuZScWc=EX*z8R(&@VS=8B!%bs|=?wFH3XqX6-=e zV3W_tU|OLtBvESkNO2E!#NFIM6BGCxaWMMT6(km+9^)Yp?N0AZh94}h0U*fxbc69} z@B{%Ib{J6(7l0sge5p8-=#gblQ3=h|+uc4B^KP=rpfiZS_RCcU8}(gx_T3(;n1O=R zb*jYYK8WBL!|+#yFFD08fWyf|Q&*hg84MBB>Z~w8#piTE)uIYOg&1r`o_CkqSIn&Q z&0vN1nvGB|s7j}CJ-CevyshpJV$EACw1m{x z>Q?!-x>d0%qeC^~co#m!WWeqy@c1woLJ!l*5Bp;c!wMzQDe1wII5ubK%{#;mP?^oS z;#mwGmMbn{X#RNPW#1;HV#llTvhFd|ePuSkp^{a1rW zm?%6cK}jWy{wINlFfvpfBa_99{;Rc;OR@DNJ=J)9&oEb8CGMg8C71Nsmt zN2C9v^bxUf#OOb!4{@Y1VG%+6U?Jj!MMO#hHfhYSwy+2c2^L05q%jzZLj?}3(PmAUtGa3i~ zfl#~AA@;X>#JvN#Mt%W!JW7Kfi6)M~dr>j`mccIoe-|BKfA5XB&FFFV$A%a9$)8d^ z6E z#h384@e}*Ae*2KW>ycED-|F`t_iy!YZFU;IAV(lhgY!?wAL38^Ve&sGdDeFo-I&^q z{0_gn<)<+VL}7x}%eL=O0^juhVpsAPiIB42A1u;N{=~2Py!*YMSobKM58n?{h5Y)< z;b(=MkMaQdsrUPQIZUoMhlxQI^0|wtJDYuD`gibAX$Z7RzN+^NeM{djO~0s&Nx!6w z0(B8{Ned$JSRP;Jg0|_ z_fGa4*D8ljmku4<3hq;-Lr0(XoEkb=I&|b|&&i=@N{0?V?Rkbr#||CqP4yfbI@&Aq z9346W=8>VpU>+v_ICL8PPl4}A@O#E{xTn)|Vl)9`NX5_zz|}r~=s2J{o)hLdyb*$( zHh4~xgLddVOdC24h#_S_2I+zcse<`Tf-=S!46!}%?U@rpM?8mzjzYv^o}-(F2_?Y` zkUn&xH_>x~d73BxGZSB0cge!cqt{ zlNX+9MpuLpI#6^95n%gH5y^%TBQ?jbmc%2#7L`%J`A#HF7ojWCXuy93+7)$-Unom9 zK`LaXg77Qk$d0b?Vl@TCck;Mo194jv9|Jf=3CRUuDiDN}Ct^CKN;X{zsnK_8Rgwju zYQTJ3nxriUGdZptaHeQ$z&|w#Q$@qKYW?c8S#p72nw}6LxGl|K{WB8{fKwxZFmx8s z>6eay+Pzz(9Sf#(Y#MzjU(s2pZ(&v79j>GsiETqBRqJ z^892SF({pi2*NL&mWIs&+#-q!xzZTFw1`UsucpsMF@wSx;h5TDq>uSdJ~P!0{L}1BVzr+Iq4$l>!P`QTIN?+_!Ur&^YW3*FP+b~ z%U%~QKsw$z(c`El$S*8UA%bS|7N%nRBEWoGxOk?H^vjnNmXm&Ag%Xj+rIkWN`su3i zU@Dg4vQ|_>Vt#2&JoreTNJGJXk+lry6fS!VN}paX0=sBM4(9O6P%ss%u#a>#E??=I zu@GLkHWWqs>2(-NuOEjoZ^*-DtsL{Y&V(`7kHK*pV!;$P&cUWF1OX52f>z|`HK7`i z!;MMOV83D$CFQ;@-Autn5z;M*rl8x>W|dufo7aNOP)3e)b@UbCRxy;mv^5pW$+iTb zU$nhI2sPr#2{^5%Vi4IU+JR{nwrMO-I#1^#bVac)*Fc$4xb znN0xOYYnR?suXI*{|e)m%q^+0NI9B*+fz#q*8nVo`(}RWEgVmfsWoNjqN6oaEEgB= zTSBD*&I^-8H?{@qQ1D}u&67+3+h@H{d9R8}ZT}S(QaY!m!~(EC+w_gI?EuqrFSLkm z;dnxgLamX)+WrK~^ce#)sM(Jw)=-^PuaFA__9Dxq;v2;)9|55-gGN_i7H~9YZ2FlI zC5tgEJwInCpXQ)&TCLDY1zi7l%a(>D7>hp=F+wBPspSH$z0hK7%(ndor^sZci!}nS z=2=^t&C!&Iqb0%aDkqdfB(0%y)F8onOUJZ@1(5*argMY4^23BkJlUWx)FF<2gH>o> z*c1us=^;!q$6UOy0C6&E0m)Bc2n#0Se)TIDx3BaOhgQ6f2XqjaBtngY<9+WM@v`hh7Voc?xnq0&w zf8Mq&KW$o`CIj;&0F$W=nR=Sb^&2g#)~#8u1`s;KC2zI1sSs(fOf#Ff-139AKg<(9 zuFjwVmLGu0)p|v_PA0otX4x`pSIJzQ-i2*@t~$vnDArJ}uPK+wiZ|N0rB3r)4d~zt z&HyY0t!r&5D89I6tw|pgRDRaFYEjSySfedq9`!t=jgdydxLe?+#41RB}81$w-uByRmHvM-}m0xHXTxCO{8@gr@>;FrY^|9I6WgcsobK8CXBPu+FCX= zCxcS_ic>Xv(JTwb>9qYcy>cd{ppzfsR2OKpY6C(?rdnDHo-8DQFF_Y3ci!vBsYXc^ z1=9_nH{@HbyO&>FF^0RUG3Y`|0G6DRMw_7iU7l=Bnto!&c(&ZR!B96jC}sN0;+h(% zwD@(Kf5tB}$EPmMf^rDJQtLEQDagyqGc9A5imE}w2GTnV>Cw9jG#Zc>-5P6A^_7}2 zx^-MOJq$~uHEJk#jz8NHwpO-o4=#svF4;8&(n~Kk7nB!sIpx2zc`U*OdzNKlc?rNW zG&;SaIEL#lv4k#vX?Y<;<0g&hrA&jVfVRYN?c1%U750^dvr2x2X^PDj9o9=1VLqdE zbxG+s^FzIqr7qCR^@5no1(rXow`~}ai5$=&d^E;TVOE$0F~ttsi;wSKC@cX=L7%ZO ztwFET&;st|V$1xxMfDV96)CwnZZ6G1V+%}%@^S&Uc&F{90#gyCo3-bmF3<_}@(K;e z;B3pdHIZxC^v-aDZ*kf5f|+Q_~BCnuS>A1F-SHvvQ~duwNvkAh8hZ zPjqHq+f`gQCzuKh(8{6mLpH^lpmjn`<}!4~6@X>y#%uMUBQKjR!bQf#Y?aH}LDAZGkfiQyTX{p1Eda|Gv9KuxW}O=N z@`nYMXIDSJhBJcm)_LGdzPYAAqa%p&1GXnis?D7I3>GH~n_Av#)|&`IbJcdRWcLUx zU&O+u>5A2K0m$`S3tIE`nwS}n$aMkaT#x1Ys8zdm-MW|=>R;u$(7eJ_faUs%&AaaP z4W%XHiXX~#5lyQLYNEN9S6I^5#;+R(bn=oWlU>__W6*SSfvLtG%{4Gq%T(vIaauLN zS^}^cw7EvA;05{TSxV=n%?GuFxX*D#x3X@iP_e$EPOaeu*`Kn`oPlOi>mGs4G_P&d z=y^e!3)cFI?_1#aJiS5Y6@0>Oc=Usku%>e z8J{ZCAP=+;7*<+tGKuJD@^ZE1Ou@B6woN^AC3yJroH}H#C|;{DN0Y@b*o3oolrGjK zu(Hd-X3IenRzUmkxMjz}@I^QeP&eBK@}Yew(-|rX>@u0*IcwV!>Sff}xd6)#z~+oM z=?#;hZCqmgYW=&ldAJRD73g#ZN1(ZCi>4Ub+sl=fOk21;5953hVB5k%k;SmKpvD04 zPTNr4^QJrvwA3#`9x!a4Nu$>kK>e$+ZeR7~YM>JGekHi873$yo@&a=~MYO#5HS6)B ze@su%7y;%Fz!sRzIytltm&+}6kH1zZC*u16`|V& zu)F}QTw$uAHIQDF<*n7uHPl)tcje?@PjOKcTBxh|LxCk)Zs@hO)cnr6R_ieGlq~_+ zB86IEt_kK|uCUqG?ccC*%@c^LM92DtD>-PfMyIK$3+9$LTX$}lR`(m&5`)RGwl$cm zxomA*`0gSWb|L@S{=F+zs6wqdQvkB0S#7H^p?qo?&I9PWogfpH2CXK&oFp$>tuHO+ zRS*>bW9#Omd{kwbUXWi$lEvq2i|3SChzi|e1hO==17J%PE6R29=;(nui>>grqIRs8 zUYH!*#R<+v)%w=DV$c(YTeh#O{$Aal5el%D0IY^q=xX#J6U!{(=_jVMv?z(Tf#L;I z&=Uq-!EQ6i#1Tv7vef0&G8n@tO>G0c0J9osGi`_=%a__dnm4pyH_*vba)XEBmUGau ziVBNM9kF4HCZitV{wId5)Y&J@2mPYiWxG~<^0s3YJgq9c>tXC3cA1m^=M#@q3VKs)w~wR=HEdHZS%gL22PMoqq9GRVZhI_tWEBZYamZ&NuE z&t_g^nhNco;bj}Qh&v-M6_{2z63?#C=q)(Cl~zyv*9};QKs{=^=ggUdnheF3x|(Rx z;IhVV{{0q8zY<_A0oX=bV=Av9NllyedvhUN<_r-pY{CSos+*8(z6bI=ykoQW$eGMVP2by@YdHA~sH zIDg;0_i~n^W>dw)#TFPlby%yat}JDBE3PZ&X%%WQZK<*71p>_t+sF2oH$rVdJm}Lx zT}eTX;+l%J1;Fd~ZOv=vu4nV-scQpyQK79;q24TowpeN%yV$wp2#yE;?9*DYrF3>p zG)MEH?Jp~mS7(-GaH5p86VXW3|eRU;gH5I>9 z591CDlb{_Ylc9Aj@a4L7-*VwffX#*eQX4xCXfw4!JmAZ_);(7Ka)6D;eJQqGdD>(s zfN2n=uZUwkS;Eyx2wRgMPCQ7 z_pI+%?5fhQg&N^$35PaSf_5v+<$4XkY?hk2X%^wiN8;@<)U7ZV0IbKl&0?4@TnRnb zw?^Xag*Lp^z~g9c+QvTqb-B0-c$S`D)Kv{*r+sJEniRkn`3akR;ozc#Cr={Y1%Ky9 zoiFOp{&Gu=Ws97{{Rrw`&Xl}KI3Dl?kN?`s0k}oR;oi2LnzDWBTtERh+pgxv&p-#t zYs$;FNIBfU+J3)@)0_uWApi?z(>s`!r_t$RV>S7f*|W!&;qe&n%;XzaKPM&VQ0`n) zK>@(_TaT9gb&fh?9+d3}?C`>;D$F&p9L>kJm+M;^0anHP2gtk^!Ydz~;2fOR=8av%S_Vo{|sI8Wl}3cK4S^F%79_$g&&c$-q<$%9xyeh^c{-{+54c1iAh3U=YA zm0@jNp)V5&VjLjwM1D%dPR$b;x{xChd=fm4&_5Cpet)>%AM#UPh$D~mJHRQoMJkmZ zl|K){M0hHbN+XlnDn)mRkh{SFJfg}xQJy2_k9p)>LVi3_ZXiT?T_R-{Xkl0fNgN^) z{dp1o2@%UHW7{fYBbBkaj@Xy|iFXM|Q6|Y#C_NFj$_V6-zDq>;iKt2kpbb5)6n5r? zrbou6Il|QbKteGNWqcnIW6Mhn?h-2_DSux0-Mj>!Lvh^Cvk)>I4?lu${XmcMu7_Ob z0Vn^({qmQU63EDLe{g9f_{3}T;=73WV}2>!B^CP>P+kr~gt}ty;)G%xc`=bADS{K8 zWaLOzcBzm)G9w^A(E#mldXMlF|M!DO{KVLzV8V)^`k2ysIWKZlV|6t)!{eD`^`Ia&Al>J z4-Qu4rjl_mtDE{^B-p#7!FngFdKGUeIoU);Pp9{`i%-Cg9IAMI;C|jWoDnFjX;^S0 z23;Ry1oPEKLF@c*<$c&MGf_WqHG}-e;0M|&&2!> zzJh4tZ-Cy|s1Ex32{d0FPJc~)*EBxEFw9f_{1DoqBy7#ObWo>?CxL`vTuBSBG-Q$G9L5)Ia8n3B>#^7jmHe zr1@Q*jr@>MPRaNCKIj`Jy8c6C#x*R=`F1!qM>wp@`C@oV4u>3=K>q#z3^{oH18RB= z%g_F+13pFna3oyI%bh@e0_pl(uK7SJ>_9?1IvMytVZs16O~(wU(URc|Is(GHO%Jft za>&1yHUWtp^t0p1lRbbSmx3`SA2B;7iThlzYL80*5%|Xqyg2aYJmLd(@PYnFAV|O& zfdA?>>dS^4#TIZpG)EB;IE6q|l!v0xyLkw-!4$ClZ3@yN^Hc;Kt!ZHN;7R#=g-{#5 zC_)p^|O7 z!*yVoH-J%A3x>N6l62LhCy=@koJ}?`Ua$kI4I9Ds{3bAt?LD;TsRIYMx0|;fda9+> zaj}AhP+uk+$8t!Kd}m_Li-V zUAxRrId*TwLAGvp96ET+yzjuV)*WrF=Jvg<81E>8gAN>NYg_xamYv(TL*nMGyBw`M zw{G8c(A?g3*s<$J^S<`IPky=AvC|Ckw?An<(Au_r&%w3>2hC5l?LF++v!^Y9^PstP z@7`SxGx&((zIki=p*?%SgtX1OA?h*nu7h75fJ|*SZ*Ong=`ioy`;-Hx47metZEbJc z<1jx3$?V#W^TrbLQ{eTp8Cbb}*Y-9b2NDNcyV>!S?8^yWiDA)%5$O_jS;rxipX3 z`Z39+PTh_{@@8+ltH+no-_ZqWcdBx2zQ^4k_Uxb@TRfr>eTyGao3K(($9PlwA=8^6 zBJ7Wv-Z#jkP8=Y=0k0?w`K|X?zD4d1TE^;EO0_s7eIE7dZ6Xt^jao7Xr*)%{(k)KE zNQbHo%Af3@c7jP|vv{q1X%7D}yLabbJH<_INfi8i zsr`jip*wD!`n>U$IRBbJiZdz|bAxTM)9v4N_pu{z6vQX%ycThwS zicAur2>2IqMJW7I(j_DThveK`Bon=e$XT;yp{S&D+*zMSDKuh zjAC9BBY85SUylk!GVlz2g^$9*`FbSf>-n#snDDl66st!u`d9WL=_{}3UqK{T)Ifv`s7@?AjS`MLff7Jqs6T^(dCdQ}d8Q ztv-TMj~sz$>3M1tpHy%JBJz^dkOOe?3e+e$BNHV~1WqY|Q%MadaV6MkuxF&9lr;7Y z2JZsm9Y?&^VCz;=@CDX9&YIvOIU+hFIwuC-5gR~8Yyh2N$QMqPPKz&yd1ycJi2V;> zSLyj6j93oiU*Tt?ggqdTdr)k)e%~ud&evzZ0y4MMA5#U8zCQ`c+82YE>lR;1Hv?zY{DlwEHE>tXm@ocQ~8htB-7Ndm9DinKuRqHvZ zeXUT-wBajJd@G0nNU9vPH7GTuSlf^pH1R{{zYd6O9$1 z%$>VXYE>ha6Y@`QhoFpi{&X2-WZ7wy^~WtBHgk|BP3W&w=eN6IA+4eMXLI z5^S&xdnrN%`U(;c1wp;%YU7z$hvj&+5N zi2)ac%su+p;annDI$3CfkRz^`$x;)99B~OJ$Cw~wwtd2`?BJZDoG26{$9rI9@{t#I zkOzP3I}+p|h6U^~I7A={_^IRvQOZF?$>HtKiO6ZyADpByz<7L8OwQvuj~jkxoPs*w z<3G7Kpo23UbOT0!csNKcdLkqw#P?ZW#|`Ln@G{c9pY_4e54Mtj#XV^K|Ni^xiT@mC z)SvV1NC1MxM%>3v&M!|8gq5@2%9C1&cq^f@610^w-pZL|CGv2h#7rx(z{;t?c21*} z*kK*cb34Zh60OHA}qSTi!b^vcxFmOG%+IimxMs zj1vA0hy*d3z5jj7q4R!otJ(YYE$`i1TAslMFZHBC@qJfp93a`BUKk5Fj%mZ9V&ibg zSR8;GXIpoaV7Y7zlz{!E<>P{fui2HFY_B`AGHw&cfp5%!=h~{c!GB4lXdo%`2$L zZA4InvxsCkE2vfd;_80p{BmO@1&0J|#$Ydd&cHdaoRP1fUbrnjc^jYrGZv|`mBybi zm~;X-_P+S5TM>NYcnM65{BjQ*_nB+UqweJ@f9z4i91Op?gFg;B{c3pYlsq2EQLF6| zf<_@dY{XyBC3NER359T8!~tg)0NG#<6|(}4H^5W^Ogm5;yWt!L8Cz#tM`<4M?s3Aj z3dyajw`bSkNg_Ch0@Ta18*`ODIh+fz^+1LnW)Ek;tjf+C%^x$c{5P2c*z!QWVAd>N zWt_dv)Y4)ys^Vd~JU-rNY+)ax5xY%`jVhzXI34~~ro{k9D%b;we=4v~p4`&ngvami zf(O50k2O4_=7R^r!x;X{F9HFV>vX>NZx0R+&x62k@`Hf$k=@q;kIDX#-{=4KK#br1 ze%-enusw_!!0>4DPG?uwNbJ#MM`Qo$4#a2O4;~@bCZ@Y&xCQ)o;Avaxw6@T%$OjeRdT*&psQ#HZ&v52L z3kwqncJ1ozU9;x=`Lky$E4#WJj`!htnNLE7ye zkHazQMu@`^3e(cgox^d|>a%AL9-K3$xHuzYln(rEX_-9v*BH2r{r*FT%F1TUplPKt z;68hH#|}O}A|gKCZXX)z>I#I%Au(&Q!M?HkktZ>+rNsl=|E~`JdwA!AM}Ih)C$Vet z)yYow=l5gi=O8sLErFQW|Gmj@d;JI|g5Yum0s)`>fdo1nU0oiJr;`17y1Iskmn~z3 z9gJnmhKK*1&Ib?p!(9JB;yuyC_vBw3ho2mNKMU@`R$l(_g9q5>(Vsv-Cg!Bt3+;tJ z?Z7`w6_+ati;9nmR~zt-Dp*TM^uv)4(az?b`ydfK;jlrc&3C|63iHSF z*AIPkztcnI}*J{VnSE-2O7x5a|f>zDwriNETR7Bn$%v}e5{Z<;cDKhYi_e; zTpdB7=x15CaNU4$3QlOgyQ8mc-NQton5ZBBd>xp7l@h)Wul@nwF_&#{)l!mBtDPIx zz)bZ$&qpjvZ{WyXKB~W?TcGX%`tJKKx*_9`(R=WMIW{=q7#nq2-8F1h{s^QJp$M~e z$E3l)6kNX(+J_>{Fkr#}Q?|~TwMKTWAlWQ)VdGP5`~pTGHRpaUNC9vL$~>1qkBS7e zR}Vl6vI}9p>0-L_f9B(vG-Vi7*N;~8uspEQ>%nYh7HFYxjd7R4SGSB2%qir%duzZp zK<>g*_7U8uSXH>v*JF%yt}));aA(7J8@RR6wMn((Y9FgDu3b{Qw03Q+qqe>FXzh!& zuhm|ub=UsA)>G@P{h^j$7gv{5r>iTdn_IWEZhc*CU47m5y8U%0>t3n5T<5Cu)ZMN7 zS6xVbbUjtCsh?P1RR4HA?18Aa)i>2YS%0wp`T7^?->AP<-(UY}{b%(9^`F;&TaOyT z8X_7Z8zc?thVczk8fG+=Nn#VIN$JM!+$lr+wgwF zrwv~>{M6uUc+e2qC~Hh=%xav{IJL37adl&JT-*(b=-u8;E({{mj#dg)k*!pen+di`m z*uJs-Y~$Gl_DFlQU2Pw4pJJbCpKo7gZ?bQ)@3xH_Bb=nPxkg8Eg zhA1({mS9S%LWE)u5|53sCu~UCnsFRf@gTM=86k--CLvBk>66!HKB-@V2;~VRm>wPz zGfPpNG9#-rdnR;OWUvk?6X|5@5~EX>A^q-Bh8kp64#_m%F4m&UbtV%Q#8^`5Rzuf%aj>uIpZfIj*8fYBwCq6VNA`?O@bUg zg9O@ewS-X5!lP*74wyPg8^?)n}|6dp0`)GE}IXl~j^is)-&8`vKwMD4`E2886FF zB&AmACLkn|MlFz6Q_&f)*8uZfZc~{ufbWtch!-EWG)fXLPO8eZAp$0&Mww1Osa=A& z#93PQBSK|I3XR%GpVTDbvWsm*B2CmnGCuJv{W#!~#iyz>GONddFa#a}uv8Y2Se1Gf z5s5aKvX0xMC{Y_yN;5zzg!80T>S#@wVYG8aB-SIThD=nLlB((FGNBmcYf)rHlwQtF zRHZzrf%27XlyMV-Q&nS*w9!Do_9diN@RwI=nH6v>qpkZy9+WQK|!p!LpZmQkRqiJ9Xe81e-DTEnp2>ESeQrA})>A#!8gX z*?hFBfi8sFlDb%X;xV8rP*td1$xAXSf$?k(mEsH_aq{{pOA1yLXU~2TwpgjsR%%mn zpnRnYF18IW&mvoiGWC{Wa-Dof=KDMVV{7mrnl;F<$(gE3Q~IBdt^mihr~r$e5uoHDUKd?W$g%u}p^rkf2VZC@rZ_Bqq0Ll-a=l zfGf2{%eo*4ehB&nq)1iD)SA>e8A)0QHtHIaq=(umJ&y!SBTmceRnJ2*V2i6ydmc-w zAka|ND-+X{I<}dM474Jt%FMJA;6un$N3>Mz%EZT$fIl)r{0end`g5QGwJ9LP*;pwM zitG^urJk3zbqwD73Z9X#qmc2UjF@W0*^~)cbHL*bwiSrUj9;s6O$SL%`U4w+tftPU zPk_yaL{j|2b|SSEw;C7$S)Ft?Yl0rv{J=v*zl}t*#3fOsy#}5=a^117;T+JQX9P0Uv@agN0jnMzS z*FP``Mn9!^@KHzy_2%@-V_}+Ys{|&`;$mT*txbZb*kC&CNJi}GoX~Xago!%j|K-5{a^P1Ekn;GfF=KNk=9#ACmzK@7_~|r1Aq))*j}S?s zq|q_5Sfy^<_zBtiNsk$Fjg$RcL2zV(B2znSHft3pC{pRPj7*I-F5S-@SPc_M>>Xef zubU8XVde?$?STu@m<4Mobc{ej#uinm{eto*n3)ozV|+=3G+h!869&exZTS8mp7Ji- z*JIr8dCfDU)ANz16JNOo_oKmF7Jq%j{wB|>a9a>uDplwy@=UMH%3~r;K|yebTqRf- ze;&ZY!Kb&7CCM2myagb8vW z<7&@uZ=dV*E^vGA_jy;sWg@VA1FJh3D26Lde@n>?A%EKFHTK~JkM8v8fyptsp4m2I zW5-Q>5!|ZgD|dI?e8t4PQF7b2lIfs-@D+aCp$q{C^`Z&1HD#Lu)IgK;i)%;W$DAp? zuV6nFZcKB0UxJO_tJHG%eppAmsC|hnmrb0fGIzpEBy)6zl8@&h$@?%}yzfQd<1 zhYZ1cue^VCVf>Kq5azQYxHJxez$DpqYJuAr37nwr_g!Tz%=uz`@mu>$ax5klFKAL} zQEZ>WpPngWfy@hD9Db$Y(1E|u{Wz$uv(2$0#pVDe{C(eCuOZlXe1hlTc5$Z8SYA((8tKj?qd?mXWdioVQMTajmil=W8bjoCTGfU1f4bLS9i)Y$O+zokBy9-u%-Uf`PBA%R;gESCXx~#=Pq1m^gfs70eK?!; z4&V&)r+my8=+Z2iH|h&+@C6w7il#ZoP5IBT|0}F)d?*HSpqIvnk`RC8ioHY9@q<*> z)YvFFu7C3BfTQ=a(C8^5mG#(+#`D$3&AODyaC4GAPgHq(s4Ji8FvVAPmuke*gLTaHZ+If zZp>=78_9=dOz{SHZvh<^YmmTDCL~w+VCpQGOoyIh`{)AgF}(Du4e3+n6EKc;K(CLk@?P!nt%QpRd02K|^{s=l#G?Ev>?j}VW0p-Dt=z2icUR707dx5K zf}2MQSTCi3d8Y6-bGs0<;7W$6DF8X`1RE~td^R*KdUTN(vWZhV(&?>tQ%|^IvpM9u z*6sba&-;BJb*~S=k=^2?ZsuSSp2-gl0)2|pq!T*5_qx2_bs0}X9rdMm4WFieHXg%f8B-xk{te1l0L982TFchiP#3?LIXM149ZGTBd_k{K z4c%5O4OD3vKN_^ty&I63g?+y2em>IoM#6fh9dsfK#Y*8lkb+L{Hn%su%i#T?uLl;% z3p+tiiZjt$>bElFJmpWYoUd>xw9NhzYX0&-b;RmM8OHGDv9WVY?%G`lJ$-0D+Tq+M*#&3@^Zwt&E4BV2SZxh-1xpf9^B;VCEZwWPUt2=c~Feh zif-{1T(E#J)P;-ahEM8d+)>n#LTDRgVe>)HvSkEhbmVqX?-xR@sH$!vLiq5W&8&V< zOB~pE02gl3pHm0>#Xgtw(hONFM25Y?TincpC@qf>OUa+1)qno| z0*wfp1>!oJhpW&^JZvNebD4!}aRI@FrJv+NgTXQg@9~8#$4Ri|c6dOUfTc4!7`OH# z zF?&W970sSqrPl}fg2AC(r9-=hgK6F*m73(H>oUTX-wueSupdwPc_1$A}nVtW+isr(8A68#buRD#wxYZ358_R1U2>6FV&}x&3e18zs{fqR^ zuob`#K6v{GEG}JDr`)G#cJ#ZUf4|SknzwLsyogr3X-g`gqYxe%L z59B7L&zI1jOIJhP%%v9xN@N}kaC>daQmSbNmY2+Kf(U*nFZdGM38R9+BFIUg#`Hl_ zm*INQ`?Dbi7M4L)Sn$=d%)`=$Wy4Vo6zD>Il1nw?Bz!DwcpXh24fioJPsA8q(DO>| zHgfP{)omBZH1qW=_DBD6w15Q~|#;O3%Y=wuCZ@Efxmzd=1JZ9Zkc!K>^~_Z)5Z9E

$aRIQ1T^NMLQ+z-M zCOg8|X$KKVztRoIVxVq_HEx2vo>i=J!^$Q2`2Ok&6br0kf=Dx4CW%8vK$OZY7BPWf zOzav)zSbz<2UD?(il=;lc@K;SF~y0&RLif4-E)m3HaxPoN&G!tCdG*jjwW{ZuMi(6 z_VEaa`raj0k0z#ALtS!a&n&uwt7=~*E*&P94xF12u1GGRfQO`L?$hhc)B zm>q629I0kTP9eK7t-{EkUy3)_!5koy9mQrw;VNK$&TYPUgHJfW&HX^F=5wNA;pmHy zHG?vE${|?#4vei}ChMTy1mnk`9!LQM; zc6-0-=8GWurEc%QZ=;9*Cc2SQ;rQ#6+dzrF%fV{->&I9`;Pz_z=&)fz$u*EXILJff z!Zq3~jE13{vfr7khfQehF48v4xptG?nh>N6p{|=j)i~cMf$PrMz)FEJ8i$%a%33b4 z79hDwF{Lq&o&zF9M3Bx8M}1X_L^Nc%8Q!3Y8YR1c_IKp^aw3N{kj zAQ<@@RBGR9xLXu^=kl+@Au+xarUck-YN!te4u$;p;J}xEG#(qr27x>1h+JhVb*Wo? zaSr5$jAsMGW%O^&^-Tb181+(jE_5`ZG0gs&`oZ6O3(6nA_rgj;&z#?4jP61HFn@=irV(vfe2#lT|{&$u@y;1dc`SXgRpOb;q8z{fD;SF+<#r zYr|#C&yQg~00qwBGVm*8xpFZ80ZC&0jpqP8B;NrPDMQnt*QI{z&g3pK8Xt5njNx@g z)4?Tb9{tk=@;;1#wR3@h2t!~7-~c4fGNu-n_QAP;0-I~x&1_^y@}e@l8PGtWUcJLc ziotSG8OnO4uwHnl)0nVQm|s&5#e*x01sCQzDy44%p2UiO$a$ReF@4Yhhck{)XKhwK7xy+& z`bx&b#yyQYr1{Qd?;3`(bc-u64r*I>_V?7|*x1@FUc&@bJhi=BtmqHenaeAwmEFe0 zBP}uvD$l<7`kCi`_rlpP%mw=B=cT&4xqU;XU6;O{sMn5^7y6c+Mp$vwD=^e&%%1P{$Krkhr z&(_UB=$P_};mJ7>>Y(A4oM137=Wx_P_FPD3~cy#Lc@6hh|>r*ciWfDtbM7&CW)lK2X<5oSZI zQ1#jtfv@j<*Kq1h-G<=|Fh~K0o$q~%xnEA9Jn<)e{Qrl&HxG}h%JzoOP*W;Nr7F{@ z%yp6g#b`vp07+#aGa*$3Lc*9Z7!VZ@fg}Wy0wSQy1cCNyi?%He-GuJ8yRq%oK!7A9 zMGBEYMLT!}F}4y^5KFB3e(RjdfOg;ezR&l3|9lVU)LFIXVePfo-h1sSoMfkGJ4h#O zdH-R#X*b0%vqE-UGs^DdnXTXkRar}4)iA-XP2ORCtK3=A!ZMa5xQv95ctKeQ zF%x_pL=wdDUZ3xed>p|GucK0vJV3>^VqDb-*_cTuNo!I0C9kdGX!&1gCJyx9!~`(Z zYNR3lcAOpXOoB?413?m`MUeLxLA`3TIT=EagJy$-g}+lTJb4C^VN{9f^bZ+UyQnQ` zdT>VD60=^+zS~Ta4xjp6iMWBxWp|XbIj4@5K)5`)pDBuHiCNcnNSxNs5d7$%S)W{S zHNd2WP_bQ{NtUQYn-WHgkD!a;PocddE+%7RtXM|>QcB;U@|8rresEHA)n4KF{S4z^ z*Vkwa0>n%0@1Wzkd4@MdMrYe9a{@U}Nf<2VO9>!P?G;pbza)gdjAWU??=Xb9;G`w6 zE1mMnSL*%X!VU>7l)#PR3JMb?{(c7>joXynbrGCa=(^xMY*NCw)Cnn~WhI5AEGAqQ zn1@;hkhV%n48jvHO*{7Bj4Kq}_BJ=tdX-N~>UzX^Swj7(@EKwaIrS2Z7+eh3up;WN zI5l>LWq$7h)P^n)-Qj7lY-pu|7TD<^hF}6F0;34z5|~C{5rG;4+X);daFW1B1iA?* zX8=S10I`O7lB8G>XISVAZ#x($O`ew|h_B8diP&Ir^pKRN+Z{u0j=Sj^gu5op&I<8t z$Ca9!4Y6HwoE9^6&!p;o<8p=gL&uGgH!7%5lOX*?sg_|l_H7e0PyA5|GId6*2BeNE zje#T<$hLQg-?UdyZl9d#`U+jPQ8OE{g4fMMaZwyTvsK7|52I3;ggfaPY&t;))E~u0u+~RsK0b5R%<7r;nZiQK?P3Ct5m-jx34jyufo_5Lo0+sF z-sdf|>Y(YS!uU-k(sHy_m&ZK3vhqo$Z0>^cMO(4d$k%|Gx#-xq0fR8{HsZe2jI8X* z(`U?_wQ%txOO~!$ZLiz1ZP%W?`<{L7h2Ol)c)aTfcq}3ii)XoJIAK8WkX{Rn>bu|l06IVR0>Nx8am<-JTTdmK37;p z*?5Y;%K(Ujit9}%5d*gICvOs0&+;DE?~OH?ynMz_l~{p>p?O`L1S*>_GIo-Iy0+g4+F$Q0bR#FAywwau}NG-=ujEYTSKX|t`a zSZA?4n`X|c{`TJC*`W5e2ahD&e(OU?eI&v4R^r6fyRs$oorwWQ5~9V%*+>@Zc+;EY zd=oknYV$3yF7fTz#&D^+h<}+)b-!_TGD`deATORGPsWw5C}i;?;ti&AQk!W$jXuPc zAy-qf@!4g79)|zoUBB!bN6eUfpd6dgL4&yz3nkNhlX~RCouzb`!a?)rvL|$3 zFuixF9Ze)52NJL=gtwmv=w||$2#f@1K=EPP;Qfvv2a8*3+`(XWs4dwAE^Hzz#_Xcl zrpF;VQo$7Hct>O@#_8B2c0%0I*CjiObw_u4JXyV-hRUA8aN|#(r)T4Qa89KmA5+NREoR$ zB7u_=5Z^_Xiu*j2%Aq};dQy2u_7o=eOPS<}Qca%z$5ejX(La?3TXC+9B*l#oPhRwI z6VX9~1Xu31%A&=iXIe>00%>ip`0GZ8p`in^t(w52sL(HWIP%7xkxnl<+hOMEL>#qA z*)|qaW9}#n+@o<4#lTacWvdUiG>Ff5F#l7%DM5MD!dBdfi?t|6o=_*u9RNQh1 zDwpAVTrwFmQu+fPvm}9Jf~I?4Qs=&d=26|xWOwiVt7%yGJ~xkcS&wzdxSEsP$OLv26_7*fg(SCf6Zikd(*Vv& zZ1PHniN_>`JbHEg-AMu-EaZB>1CxqqvrczlQgPhDmZ1gVZN;dPCUglrMy@SU++H^1 zEwehw^g~;s(NCV%_D*i2cB<(;;zV_rUI)X++;@Idn{oI~V~bBILO`{@2W zKi4=B-6aEjwWS0GW!JRD1RgdeTG&94RIIZm8x4Xx(`<4-WR6q?yYDxLs?6>}v%V&~ z4K*57^`O~xB;osPiHa*LDE91{!{$P1ynk%Yym8sC&pR+Txs$f1X1lI-U`5=1Y*9_n zx&C!J*7fD-iUvdv`iJPuJDo|rH%wO6&qY`SXQBvfuIl|LN=@9&}4#f|2E;4 zdzJZ{3gcghzK1&vo6lfe1^RY(7>-_aecDb<cLzubhaZ-hrLOxps`vAmpWjl0?7YJQgh`M2H=A?~6s7QE}L$ zNJ2F`dKo*dT=QF{Bf!F(S#br}uZ?YAQUooKX5lm*>e0}SEaShZPuCg}92^{q^TvZi zLxP2n;1Fdn4)qJcU$9aTlwo1Y&`_n(sDwpmuref6DTFE+9GanFG@9UGHC!n}6u|<{ zn!&YJxW`_t4CR%f%HU8=85W`p3k?oa1c!0KEECM~N|sZyMkT9OvdUmKEEo$d`OsjV zSK{(7ULDLUmApo&2o6>V!HQ6&LakIFF?=v5C^|v%yB(?+~n1hX$)z zrJ7T!jlpV-Qq2cbqA`1*P%1fC2P?yZaT=h;$OMNgL&B9pxH2?c85SNK9v78ai=(RAtabCyxitW7tB(1UqqI!}h?NB|lhAW91xz5I&q)_;cX{bq&l0W2zhgtxeHbIHLmEhMTe^xxW+whvdmp z2u!U?V&)zxL^M3ef(Qio%kd{=*#`qy2qLyFYPwV2BZRn9PO1L4LI^2gp-sT^fw{jB zLcmjhAq1wOyg~@za+*2hin!D{`tq?o3n7Epw1}8#m(qclFf8aVg20ff0W22M2N8?S zWzhl7pfDR`iGjph|A7qmi4MTEk^Uo#`-={G%p^(Ksm~XAMF)~QD%&}yep=KkI*?6) zy8faA*>L$?qJ!%_qJxFbP4B(_u(%Ae104nDl^ry}tWS9GE)|O;Jg~tH2@kwuR`hRa z%zC>c*7ZY21zNPb$E+ZXhe~P8YIgRFSuu6VA~e*NZyo7#A%M6p2_Qc15kSa^{Q`~N z&jk<^F$56*mH=e5QTnsY#kAx`>b?|+Du-79fdWJA??qal0OE899Q|hj1SoRdqvHC7 zR4B3x0%6NC2m~qG79KmY_zK0_PX@6JG6*WeQ~$MCmO&7?h%!#loPW^51T>=OY z+)#=`7C?Y4ooZit5Fs0W>affqj?}FvuP9+>#XehwgXG>Fz;y4)|hz1vo*L*^~*69o`PhW zFbA(vM<3Afp^3O`)}mQo9M`=iHmP$9ZhZZ^d&@}$=IAvWN|mOM4f=XVS11I{4CWb` zRFSb8How??BwKgCBgY66#?rGo7^}lX`!q>#E*```*0hOd<$s)w$U zG`w>k7QpPkyFI?#z5o2@-TOY_KlEE-;n666PInP{J9g|S6ax)?TU^u5W+Pf1)+JvW zy(BKKEz#ffT`T&VZR6S^dcK+sBWs?H9e4ionoszPG?@H+B<@Nc)1A60F;cXb8Jv4r zBZCzjLyhA8GDE^XHUYY(p+8pUUqK!haERv(*XxpKnw z35ia`oHIU2U7xhOeQJ(gzIf#XrrSPghoQ=+#=2?Kx+Kgv+`4h}GL5#;GlmdR+UA7r zF)1-3szj&YSB>Fq6^%pO8i*Y^nf*OIM))8W@;~X7{gsy zt7bJTyWecHHoB6|U_xwJCHgeyM>o1=pS>xToUOUpwq0y^NEHk-)Ti?;A8uLNb-&Y5 zK3beIOQJ2u$VVL$m(jt*otLErW4~*XR;HtJTiW{d0L0PUQKp!?H2fvMJWGJ=U^2)>0ok#)c{Oo0cO;ti1e+4w*2jWOV~l zfi*MU$fSjMj{H=bJj+`~VB^i5=(lptna4lb*vrL-#BrlA}k5(`Y*>F#VysX5X$=d9PKk5 zDw)zkDJ-f{9>;z0w1`pkXB>k8$%*(e8KGg2;^{yij81Boq$r?V@R%Grf`-^y3RRdx8Gj7mstE!Slp!*5KDZHa<9M-N z*+K)PH!Hy6IwU)IUfL&ZmF$o}VLhQQ+|gUG*u;npiRZO$O(J*ROhWA}g~k8Khq1Wm zJ}^;D>I61>8QQJ{bomBSqlFZJp1!9>>#mjxjfP2uX5*A;<(2+}$N# za+<=ic@>F*-s@n$mjp0ABqnO_V83k-cRzxug7TXuB=OQYOxK=qyjo4B{zok=*SiH2 z$!rf>BAQncca$3b%cDgL5tZ;v_5h8Tz7j4#1F|SL&?#oGY}E<}vIhun5RQNt4Dh9W zsb(W#3?9sL3z_zW<74k$*A%Shl+)ezfpAZzZbUSyrQJPMXh8DpesDySCzM2Oq4sz2hw zFOsX8Rlwalz+Efh?uAu48y%?smiY&x3rF$bpb#vgwAa_;U~k)ox+m+l?ZzqFJL>8- z5M006zQtx=zkbgy`}+O1x@YVg>TF>PA{U4Y%nL>?NMFFR0a}g?)ADSbR>4AyVOZg0 z7fYfI9}GeaN(Z|Xr|DsvZXo6~yTGTw*4U&ZuKU}Qhnn_QlMmTBNkR;8d)n(F5H1eG z1@dE>LX9F8VBp+n^kR=BnCw1*u!&kp#WOhDe;e;Mkn%rYY6f0w7ICc2!d6 z#8@ubiw{@JPQXj2RC|M@PBD%L`cFZkJM(XXZ0|4z^#&<9L68O2H^Gji4LmnQuF|~# zHyNla-6J4Z^{XVxJ_Ga%R|xz-1tH~}UD1cDrA}7qXq(oE?Z)z!WD>~MxF?yz+{3Vh zSx<=J-CQE^Zkk#SX2DOJ{=vZhPJEW5!n8rXuG9a5bmBSDH;ihmB>|iSF%HFk#gaeGeAT4Q~QfQ zRGLM1zKH%_xO=_GSDAy{J48(trdxtU|0=W6JyQ&OI%)t@QL&{4?m#5lu+gcX?X6ZRjGnYqQChGrYM#^NFR>`oa10@7-9?3IHmxGM%1iT= zmk*k66nou5U@bZNwB0yBcKHBiC^27!jeFRzM}0>GAy0HpyMfRtgw@iNI!>^9wOXv8 z&HbQqVJji|wHlR{Q1xnc(}e1tbUk5M?nEev5fb#roCqZRplQy}5`=*)_O40m*Zic! zUp9qafhhe-&tkUA<{>^cNP076M4jZyce zKazfhr1#GqV7sfN%B4{YjaPV#R1UUaID%waROm$WAoZrdR};m<=q@K{F|gwV2i4PM z8TX!h7`TUldl>k?!~m@;hv05-ylYH51S(iyJBIc=B!R(p{#B)+t$V4JDkUTvv?&40 z-(!=oxF7o(RIy_oa2V1OV;X3&Kl}}8@BC}mI7iob#|?zxct07->zf{jI51Ud{zz$V zY>G;im(1VHb`5F2N%7e!8gSy9Xt;0E3696oRh;=g#}8JDOdD$nkk;MvwEP~iNDJ>( zoauhFFbB=!lg%l~=4=&v1DyamX_BJ7fn?l3YEFoknji;Y{c9a7GLE*M5G#(8RxN3b z4#%hID#mycQ9C{e!oFGK%a%MaQkeabq$AejmesTyHYGQfX?tvpHd(F()F(jE?Y%)BbPRoabj~iZ+6n}0qydo(oj~f~!MdVr4 zug2*#%C#nwhG+cG^YLFsayK$aPv-CKN^6i!A8b9?s`Ei6ERR=&ea-rterVlY zSGUc!eeX70(zC4|7whb{ZLrtd3)b)2Utr%=XD`^fXLG#`*uWBTPLf$yVd)A8Pa^1E zx*c|*?X=~A&Ul&B;T+PQn~-2#Po_N6A+L}~<2(u$XGtvpxrpB#S1qOgHzg9%my^1= zNwpCFn2R{jWO=CTPfeCbyS_VaS<7t!8e|Da^i7l}5rWb6m6#v}hs0)G( zHnCx|>kS+^8v?VWmQR=jZp^K?AtT3pbE9+Xjm|BXFW32G{@czW^KVRj| z-{UA%FT23TnFC`$BO-9S-BQsR-@2*3w)Se-)vI$0_Ci&A_3G6(UbIcMEqeG7`Nc8H zUgcujiF31R<<%HEN4*8xSZUaX*mmW9?y9)XK&8I zoVRjXaz4ztmgCB~V)f0vVvWkZFE<7MQ*syPR^@Jjir!~)f1mpguiBB@nR_EwnHQWF zpEo8iH*a>H?B?;jn!GJ}&q})2^4`j8&AXI$J(tOamYumVtiHx@iw zaH!zzf|i0y1>FVif&iGuNOt#GQ>;_0^Q_CgF0WYES$9~UxBlMx59=B0hFzO+;g*V@ zp%s|ap|%~UQQPWmYQ9q?%q0Ex&AYd6tKG4An~l}9Fv6QKd(ysn*M1wvyv_*0X+v%G zo44(+rCYdcEMsPbWiXO1@nSVs8KDh2ISPe(hEf=mKGa5+er>K_zstVPrsR*Qgtah3 z72jav`B+x?1iJOxQPcO-+f-_#Ds{q8+m_AipWeJ}qmB1HpcD?mpl;(v8>>iS1iuV; z-m+%{ZsX#7_i#cP={MOoY~O2B_^#%KqtN%ygJLfu#ANoSi8m{Swa{+aj@!8QBgn0c z@DcR8ci`@_-AK{De1wr%$m1^iw%t3n@2a)q!!3fsup*DLxZVubLea~)Nh$1OiI0B<}bT`>EaKpe&Sk6$}Q*~Rm?5FF{ zkcVr$upCAk?YnIXo@0db&|n`TE-gcbPAi0wxkz2TeHSu`Jtds_HYaQ+qfH1y3PQ=x zQwyKTt~Rc#tHV8H@cB1|Fd=WK?HRhHjORIC_%(Dp_Uzb!f>gZB3d)H?rK`|tcW<*l zU1y8bh6W0AVYaRgm#6W*IlRyU-Oq}8U_KDJeMjAXxCrHir=Z=jdo$AgsY3WCG}4`E zJg@f=#!iyUjHmSe7c|mkaXYr}#SLf*U!6+$7G~@0yLN3R1OBi=m|if{_O!Ry6~6fj z;Y}Fq*s~26xq%QA>S+og%u1xPZkOHWtJnC6Xy9irbbB{r*Xg=FsE`WvuhoL9$H<$BJXR>4I@Goq zGO+a&J5qB9`VG768xf|ON16E*p_KM+-X>Q_g?bh*JVZwJ4Lc|%j?uBgF&J#x1EP{? zNTIIdg#pu0ueabrJybemY6EF^)z$r~&Zbl!R|r?2??r=>-wbLh_ST9gx9{32lkzJt z+KqaR+XHchpj-uXB_M;%&){M}slrPY>~WYqxqTlJbBPg7do{fJ2rCSoP8it(5g)5q z&j?$4wH#r-3tDepmA+YwkTRoJ@6Rq`g#*y{)dN=JVg%P+MhYGrVcN`IU##LyM)*gc zp7$Nd3E{JP(!enaR;cdPN+k6Gw4jh(kUO#pFu(_A_v)o;wH zo}CjMFzZ*1BpSc3jH0iHC!}o~G;(!TsloPcK-*hCSO#g!pW8A;SxnKP+Vj5eD1{l&$!)BHU&afK(0UO}42Ji8j}amsLAL3B&i!;-r_9Y( z!E7DcG4EZNJpTzVd;l}@q@<=K`B4M}{>=G;8$R#VD174;!Vl0$B_(mV;>Wx?g>N}8 zyanCX{d75~)Qa(H^bDexP^qBF=BPbg*P~OZU(yKwgs!halMpz5DN=zA^)iMSu(22V zn<#LnqQER84DPC{-L!od>c7O?X5Ve5R1eVz$6*E*16s5(g6VNt!zrF+g*DLhYwD$3 ze)KalVls)#y)6@~fNm#r&urdRzXvs%Q=5398wO8q-@SYD7Ms!+OHuQmK>lTZ&oW?2 z4bX4d{3|>9I~?;4BZRI1t)mN6zh@UUwNfu>CCuas&8yM4zE4hMYo7m(6^5_uu~w>` zYM~z5y@XAPVch7^acYEKvWlEa?IiDuO#Y=$&rug6vV!dQ_gvY^^I#`y?lx1Zr?SF_ zFhg(Lrd_~1b>NNq+P9Cq^T(r?|71IH1%r@m9V5ou{DvGc{aA%D$7PI^$v7E?G@(ta zbz!#b2~%9if>;~3@X_*;IZ-i-mTnloZ~cs%S=E(3wV2@^R~o9frcQi(!s^A381EZX zme15MYYQJ^5~q!{LmV+B;TgcGNo#iR+*LPf9@GN{hJ`as{hqDcR;tg9tO22j>piyJH>0OlRiLWFCrNGWua=c1oHdu!`k# znN@TEF*B(kC|Hcndulr~8TU`Cl^PY9Vs}(#RyGEsU2`0`@u#cQVMv^83?L;8U<`xY z$v83RW_QEQ?n4lN6rJsC=sa`|Q(PW%Acjt*lY6gn4w-!JiyNJXZge)>fHPc9%<)RK z#z*U`(r^m3&ckT@ef3H`Gy$;EtMstcd0w2HS-8LOy}~h5R!uoMW!>bKB6pEt+VE-l z(`HN?U--`=p-{H~d!f9eZjAj~bvEefu$@J$rM9VajAQR)oS`Vb^DvemuzDUV&%YPM z(~lY&H?gUVtfP|^HPYz?bp8OXw-OUBwB2$=U>oaa5Ce2~=HOIC1WtMGT>*wEHu>ll zpdaDpBml?B8DE_Co|ducV&BObIC@PwQ3G>x4UWH=D5Af#THfeP zwb(ijTQ+u1>^wvgjF+2m4UHC?vmFmFRPA@1H)2eV*c~qyS!!-#nb-|-n2ggZzH#iD zZ27%o)ilfN0OZ6OL});^C4aIAYU^{3LsKmWWXm?lZ*;-k zhp_(ZkUthnS>8ZEh#Oe_tTU&f>jfuUW;)Se7%|1MZ=CA|=hrNZPS%KA6OMhHSV1FE z46u(@om5!e2NKkltt1bki&CUQ2?&#uFP%ZzTEoj+P?v(c?Y&Jh+e& zgLO0@FUqErC$APq&a9gZx2zwnFKNo3<}ggfoXOKpN}**cZlbb8cCE(_D@WIC9L-ha z7(Nw&IbN75N*PzF94Fu&OLShC3c1CJsg7AwB{Lw(F`%dk=Rz2;nH0e-prA4+sM4OG zX7vQMhj0kzzYJ}7Z)gb0n`;W%w~!X}p=?nn=uA#36!FI<%j{Uo9GwRDeB2Q)qnuF= zbmRl4Q`1on|2Pg}fs~^O`@!M7y9sV}s*}yC?nCFXXd1-8NwgAT z>T+D0sx*CqyAmyDV`TV&K?IsXFOz*MF_A1C%JXwz?>!KbXHqt%X6mg2dh9}SU^vvN;3UB znKBxfN-0F5Ypd7@ID~K6oa`cm>o64p!VppQ~fzf^n2xD=b2p6EH8WKB*}s z+KpWuYq7_|@@r^LY7iC{yL}9Y&#|c-7SeY&u`LXCNJ+=>VmG%`zpByhX|bs;v>VLX z7<>*(6W2K#kQgZ$XSxr8iVmH_7R=j$XD)`AoUP*6<2tOSMKM|)fB?M`%lpJ%&A_5R zmQg_>i>7M&bOW=OO=bIZn|pP?Dl;&4wh=Cyz86$}C~O>^l$eQ{NQJI@6S*c??p&~{dfE=PeWFW+HEM1~D%{_^k*JhTfV9MPU2p8_ZnRvYgC21r=Ivq- z6VBvtbQhyl#i38?67k4!`JZ`CXD5B*^E!Kzx&)J`HimI?9**TWj+AbXn{{(;D8EzP zR%ujzDkyK?xpPNxM{|diiaQF0LZg6^!wdhnyMOq`_1&FYHj8E6yvD}Ur%#?NFQ<#! zjCh9Osj11zx_+HuKL33F{0clX@wBy3T=V9wS+ih4S=qdKbbZ>LJM-o(SRk9wMRs@Y zl;c^mX33KB@>{of{`&Ru^2*9bA0_>Ky21fZOiV;XbTq{z>({P*?6In<#~yp=AzAvudb#~)-PRJUVimzc{y%3mY&4Kva-rbqjA|XXjKfZ|Hhqz zkxUd5#^Bx)#?Cb2?Zn%ScRVu=?|3ExUlcPOCY4Mg-Xr+0WR@|*m}o{o7y@%2V}Wm{ z^d69WACaQ_9|10(yX!$Gi^H`Q5Zd>8qb`|B>+i1(jABzvDO_z{?Nrb2Jnwt1d2V|u zYnRm~r08QpVzeovQ--88mR(HxHsICb$qfhodGuYar>ORk+6QYbDM=}bDG7KVTK)RX zbBnb%_k3xWF3+Qj^MXAZPl#uTr%3u<$A8~PsjxRD-kIPz=$Ykt`@2ln(>KWv13yZ* z5Ai%*Yk-cG%sBjWFem?Sc#5U}2K>M4DV4sS3;I~xQfK$v;jalrZ@g4WenR@i*+2eb zPlIPIFjVWs63hEX$F5!HW;|N>8S0Jax@V5(9nT#1>+WLD-#m}IKmBR4`z3s@_U7fB z=WEYDJzsjh_xy;Ea3deS^PWSX$iByzwCGaherMugo2k33vk@2h*>U+H=;5x%ZclBr zmvx#B*ldUO-TK?F-k#=u%`;U>zsvKJH=Q2O-#rU!{e8S%K~t%qsf2FxweD+&yAO2Q zoX(w{PLru8=zy4jgzykQU+luWyY$Hc%Yp{f3Y||>VEBMhL(^&(*Ak8{ATC^=SR0cP z5QEE)dC&||4XX}#!rd@+&hIzZnmx-rhdte%Z#*kK^J?Q$nA)Pnr*7`~QS-eX3MS%zZDFD*KgNnpEyu zls}aV2fPnKxxayOr}8ISco+DW%U^HQB#s(3Dt}Fe=GJ=fA;$9>+`r?gL7CLTT@Aiz z@Iy32{%a|p_)76{*tf_jaGxZHwQ-y3Hsy5WUjN2(87V&}eT0>UUTW*1H$o!A==CP^ zqMV1T&L4VXYS9~;D~O6s9-HTYxAfld%=Wn4Zg-damiwCfJ6yylKi}OUU6=bjzG-fm zwkd7rKu-wPo|-CCiM`*`Lp2J8R-3!@`Q5JHrg~Cq7uDW;cX91XTzMIj5)%^;pbp^F z3biIcAEOB{#018$DX}R7Qna<1sN*4s;R1!vAoRwxqo!{okbzfNhxlIp+ zluG&S7hdP#%ItU7*UD)lsv?SbSE7cy)A19^;=HHpuKLU{yxLNA^XXTMi6apOqSm8S zZ{P0j?nLdTOFM7h`5g7*wufr28(+`EtNT*Xqe@zH(mljI_0Eyo%Ow9O7kccC*G%6< z-br`=?x&)k4pI2uxLn7NOLqSs0AB5@_47w9Q2k#84jzL0SRn#dDWZ}}Q&SRRFq99_ z@DMAY9Z!u+Q2Pb=#u#ng_OhF%E`7>Q&+X3-rj|*}2i%8OXf*17gA;v1P7YI7S4UwZ zbapcP8e7DE$^HbUe$Cie2I94sHCCoproNU|yy5rC?*jCiqenNakBFR8_Tz@1-0MB& z3-1rD-1N?bi%FfG|8tJy9K^@_%_=F;@BG7`Vh3epr&^JTfE;UG^M*J(*r}Z{RqovB zw3+UoHLt4fmd3+uxl?m{<7Tx&>mL~E@BbfSU^$h>XezVY)oOhVladN*J?!y8OQv%B z-HE=P(tZ8n1;u49bsb~p7$uY5s5Hfz82t?WKb%Ri5%IP8->-;!Y1ghY;Om!9*)scP zy`IsVObH1Z&CZ<%4xpBR`WPlPwQLzo^kt@<`c%z+O?QH+EWx;D;AX?@`#1UM@)UK7 zI&R$hap@!1bFOhOXWYL1%h0_hz2&P=KxU&ESNX2Jwk*Yjs;&>vs1+(Dt_D^I7!y$< zHMKE%(Zr-al2$a=a^TlHJq-(HB_{sIkQr0i&Yjq#u3^wAMCjaa_(JY=?!4+pU$^#C z{Y`z7$=*o58<}PH8|%)lZ`fF(`6Ak+->^Zg7?b$-#_!cXc=Df^HtDAgH8uY!7PN4j zLSdV_`L!2+6C1Z+VMg{utKW{zJM1s)lwO}5Do`J4oSjJp+7L`$=V*MD-F;EbCm<=tRgY z!e$Y)k{O?%nxy^pWpU%c*K%D2Bi&E^kTO=S0{#6TK6d-gBb!@N^@sI2ngfdVy2{AN zk-z5V1itJy)$g$4%{7XxGA8ZokNquub^7vK>rZiaRx9fMhw}YDjQRhaGpVD&$@%Q# z3eozYgb5S4_3zsk*=r{xCu6(f*iu`?>fysfMx)OEPY-ww19}AQ=nZUALd?;`*hG}6OLP3 zHvMY-uSZ&*>QLYUXRL1O-{bCy4qPFp#B^ZYI)$1E(4!BXjuw*j@OV{j|DVR+x_Q)S z(t{7+r6+*V+f4fhc2@1*dHu)FL%!boQCG?xCEDpm&%3qXzp(o2Na?C(a%zk;&8w?p zz*YVHjvb5t%zO=f$?gPT1$11uc<~?qc#L;4U$Cpzk4+2Kk7d-p3I!PKdUnEO)Z3|z zudfTn;LNGGrYPI>-2B`Bon(qOD*q#u6Dz*K zSoPj>4+Hlwa1R6bFmMk8_b_k|1NSg+4+Hlwa1R6bFmMk8_b_k|1NSg+4+Hlwa1R6b zFmMk8_b~APZw&ZopG?)I`KIYY4rF|JQmf5o2IFj;>^GXVT88=IWYFa_W3x{*Gk!?( z@YG?L9A&mCb&r0JGPhXZHE4nJX$EUj^@@^w+C!h_;VXqc-^P8vh_S*4XI$ zu^7eA*U!!I;mu0k)U4DcHT$T`n*9T2H2d?jn*G(q#RICV&5LRu9#(AQh&01h+hSex6<06h^pt*NzriG?&CPX+yHRFC9r#;Dq#>xH86-eW9(i?S-!F3v{SWJH>VxpDIQiKN)Ks zn;uFu;4qkv0)x6Q;lx;6kEsX@GJYS}D)^NQuxZ)!U{!jwZ@O8ZJ~AXdDLg$ZCfydF zK4WnDf)VLU9!RfDOkbazzBN64Z+80r{B)rNo`iY=?F9Jg0LcU%BXESk2L$*T03!&L z5qOor2L!Y;0mc$o3ZPP`|Cu^JeReuik?wHC0;!LrKbrn{`l@t~@FF?725^hv)I8%+ zE3n!{F<7bgI9a`q&dqXawZ`M&ho}NPPDOOHnvZE#D?)Vv?g_&tG^8^xPjH+_$0dK_ zs0oIF6I|oYJIe0w8h5@`9C)T}N!y_o*IwN7XEL&WDu?d`R>M0K6IiW=puc|;Aj|<_ z4qKQ5!rXU)WjNN}8kH6u{wxBPv9`K=j=B|%Sea~5bZ%`j4GtTbKXT>Bv!XsxLOq@h0}U+^3Vh1ImIxI-^~23t<@IJEB(fzU9A89gTK^{< zhn4E4=nVAebh_EIDst0)5Uu+02RQK7!L542N>ld~K z{j{({%(|?cl9chq6b~MiPGtxTUYT_><5C85E0ZWinQ6G5;SwcE5zn{E1vw+LEVDfG z(ahzUm6YhF1wU z$1_i7w&GPmeKzys%!_!{P=A{FuguT!f-sbsM%)Kw$TUW3#HdVTs74%|Y1C`P(V0fA zMoh~zDm3DxOfT__n-FIcW)panz;guNCUA|wpbUWN1m+P~PvBVsuMlV@@ErkFCcr=f zX#@%hJWgO6f#(VQ6@b_90a%ENPYmEZarpQF%r)GWaLw1iT{8^eudz|S8nw>H*W*k( zpcH+3eFn@y&dI zwwVcdy+sT--VzsZUo$@-rkPi6YxXr69ZjsdfkK{HuBqSts2pI>5 zgvz#pF)S=BTv7u&vRRDR%)%1J$P>ItXe*dpIH>>_BMq=<@CkS!XJXD5*^D)ZD#Pa& z+D?jPj<%Y%cg$&GR*vJdQBLvN1*}MLvp65~mgPcMmDBP;*J>y3>2X^wlI}z3Tvg7l zN$nN`SfgvTqzs`I|1We!T|g*J>mF7aR7TI0_$%>i)!0V*J7@dCr8=t4buHpMsEqvu|2HYo5Z|I};<#}_fQS*ZqqX#EmBk+kejeo!nAPK?j9=Q55w$KG5jnZ!K9A97u(5}QixYtY1?i)~pgmMAn# zxXZ*M0PBCvrKZSRil^MU;t#nf#`oO0aw+=CEe!mfY$e~T+HRS`EUSBp&r(JzDm^71 zAb2dts0b0lx`%tb55Is5d2r(OE3Gal7oG|m+4^wa6M1X%Hsw+4M}*jz6&q;=x6t|+R?@?>~{mUfM427YeTJ@-JnGtk3Ji4q5+u{~K z^2kzSxa8cdQTmie4P8ds0FA#wHAt;0iyROIhh=5zGJ_6UdQ?O|WvVi-mLs!=Rc1Ao z{`Edu1&6Lt?xf)SQxlob^BtWNiIQUT4Z3{S{SqbJ-$zNVkc(}#rogtPxLr(Rj zGwp*9KB((S~ZShpd76KUlSfH?6*gx2+x%=g})XsR}PhWnq%a zd+Zz;aIo;0R30)_L22haCJlb1*QCN+cBNOqCHa88%#@TS}?-U#SV4$Qh7_lE$fyKHvubl81QaYq~h;>Ld2B5elV0V|=dCzp+q8)rTF zZQMh?oO@C-*zm@BE1-M8OpT@@ z2<M?%Gck?tgnwT~|xvuGF-2FpG?!2rVvhiHt5!eGQ@!WawMoZJWGCnwii`)jAT3I`N2lcrGZ z=cX7E3tbOLwf}+ht*M1n`#&q}t^JP_{%^J4U)xp~r2SoCpzogwef^FU8vNca4E8%# zsP}Ix^wpg%4A8X|8gyq0gLLN$^#P{~0|P!P^w)n<=x6w-P#<`?5YW&Oc7;_HVxDT_1b1c@q-2np*@Z>Kv<)fW`X}ptwvRtpe-Bn_&je4 z(GU$@pwpFmwW(=C7B2I~0;B$|hF^ef8e24bDs!XA@x)Xjosc5Kp{cG>66uWU*CmO# zi0(-6RX?|%Sz#I8(l$^Q*qYow`O8!sl8%PvH&bzLsim7ZA3V8n zLE%=1X|UtE$+Drhzq?85?_%Hrr;alwi3Ugp12!oKIj-obqL+%^F6!YQ-^JGzaZJR; z`l9EH_T%ND{$0^uivECCp^vzDqNtKo1KB)EU;_a9JVjn=8#o_kQwhum(1>D> z#SSw2JAvbp#qb`BPsuE30XhDclo%w9dj49==AQghj7GQ^!E1xq)&Ow50OEK)f;tKu z?+R`*gciE ztXUiMd~<*ipVSR1n>%+dSR0^3vLGAXGDwEJ$EnK3D-AiHZ78_v4MU&wYPU9dXF701O@##Y6) zic^anGlq!Miy@O`amCJ`nO44N>RgYaS<%9s!pS14XfdP~V%yfoiZ!Y{NBta6W?YKYOe0d}+mkGZkI$HtotHl`&onV7D>sniW|llq z(pb!7l=P?X+>oK>!MuOK zrIIBjkCZT5N-%Klsbp(P)|G55frMPd=#9Y8X`+o$Dj3y=N=E%*D5JV0;PVM%I(col z5?hi4rCO1!3-fr^>63lY46ipN8^B373{2JsfuVk7ZdNenW+ii_ITWA3%xU%s%UQd2 ztvn8=zuf#aYa#{!r|}VSfa+-x5n@DAa&oeT4Ata#ZANzHl&k>*;^S*-U!OD#%Tn6O2Xf39|b*&GjBYeve1>?{ru4U3pM98YTcu!tHA z`fG=g!{og5h=>|QQ#%Y1WoBk)v9UGNhCKlHYu40CNvk0x9(j)0WC3eJA%S%So+9v10LCYdV?K)G*^lBh+(&Uf{6}%Yic4`J z%1hCMm=9tGu^;ep%w?q_o)1$fV*Hh25F~hNE?J3My)Hi4R{(yy-)V{C@bO1m;xzbt znp@(6@r69s5p3GkCA}7|5M+d8HjLb+rq?1gazbH5L=b@4;2N@&3dsV+U^0uSiHl=nQ`07( zpkOAsiwI$76|!J%NV~U4;f|d#Gd=^Q$+A+pW@f=`0L4;6g(^y(qYwua4@A@qgIO#R zJ~*Pdc36#+f|>^+;s?ab?sBK+;5T;cSim0Cq8dfd`t!^`&SXx^l*r)inT<0AoLm8} z55V|@>A2^@0{G{&jN&6-M)?t=Q+&t-C_mIjaUb|b@gD>kn2)*OKnM(YHd%)$f_3+^ zEnzx*0SlY8%)(}PYG!o!0#-I_qgFQiMm04D8HiX>WF>MsYHK6nVv%CNxY)rc1*rrF zQ*Dw8Y5=NM4XRi?e#201@o}?IV^C*6&>X58J7adlh=`(@0L8T`_VNGMP@hY>l!PK=0?A{tD3aoDgp7}nGb5(Wyw zz>-0N09CD@Lh)m2_pGmGG45G}x>-NW5+)PkssXf|n$uiT^O{Qx=dYq^D3eBsX{f+v zHGRC~dBp4?vzZCA(UWN%HGAxA%WUDk8SuZFz$*Y0i25Tnul@+rFd7Zbd8!nivs{Eq z>v8gT1ywbBsI7Fw2{@50SMGDJU(3lW`jGO-}EFV0(jtD0223 z-5lRJOz@mu{=8PjMsc61Lix|sL5j~xvK1y6ihG5i^nU7lS=L12SuR1_7RQqA70?lZ9Q{Bk)_gLfGNE=uvC6A z00=1ccFC5{5;c|$IGfCo^B`KhwXBNQ02@j}3_4F6vXcEVP6RrXH0w6T(yZdWg6dER z@}UehN@D8a(UHTWjbR1h5Zh~%EURP{%Z&*m!z1TL>&OF~t_?4b*693wjTu9QaL5p& zS8@KPSi!i=7z3MCt5&V`Q*$xpCFQUYRv~nO)v$9`tXj2VRm`f$!O<~(tUqQl;BX4Q zRhSNYajv55%TgwJE@eHq%-}9{nWU_nda}N;%MOp7Yj_oK^G(^EvhVRKVb0F=ovWf3=K8teb3^c|VIDJg z@Z5O38mLFiO`Q7xULZEOOh&9mH1(>6^{NtkRT;f1Td!(XuWFH3B}6R-)lVQWoxlhKuCjtGV04W6W2~-f+Lx92ISi&Fz=>&=actx0~ zDC8rQg}#ESkmuEfj7DWZzd7x+k4}f$pMJ*2&j)N}LI>{`W`snsLxIE4JkHEBT9ql# zb2jU=R_8MSb7p6J{bJGY&goE2YzY&GH1iQVn|+1oW}X*Nnm>PIEHsBi(@21r1;WEY zhdCs9MoNaPfPdMY7m}M^cQG7C9>|UC9yTm%k)Z4jTG>X1J>kLFJIO^3?8*fi4kRUlcvXUJ1x|73@y~|eKe8|qcFa{C){OLDE z*MnIu22A3e`OD{r%x6~3r<&3`P4?J)X_~C|V$U?$Nz9O8V(cS%n(Q=Y$e_FQpQp(V z&>YKS^J$taP$hV$$v6db0A1QfwLfFG`-ag}nKYJ>IEOr{VF%Ha;4qpEvtSa74PFDzgIPoG6qj*W zv@t21t$3`GrnuPh=wNBStam<)=Fe#2k*3ywv~usnn&g;}h+xc*p+LMtsNO%|&b8ps zg2@Y*KQ6cncdspwaA)s_yN?K4|LnotCDL{NXWYF=xO;5@;VwuO>ct(eWM1%BGA{ym zF93I#UgTc{?q1M^DPAPpNmGp42nlz*vZmQz*@HX68R72vW?i4a-kS}gH2Dcm3YDh^ z6ViS9?{P;XOM~Sl!XCoG>>g(H z7B-4MKIAGt-?T4Tj{{0QeEHb&jPf1jF8f8?-^RBndE=+X*$4S0q z2w`7hR4IWzR9}MBDD#v+KaZYI3G{~)kZ8f9OwnRMqpE54Q>HbmG^3goQr#gMINWRq z#up-0A&y(cags`!N2ca;l`$+i46XIB!O^e?T@@KsC6y^V$cRdY<`;%=3|a{Pf7pA| zxF(XeZ!`(n6P7?i!cLGiimWOii-bM0gpdHDvWSidqoAV$G7j8CKx9WjaA#kFisQJA zqavUnD#|J@GYaB@=!`I;gNW%<)rj{!&-1+RdC!OQ;hdk{$-isss_LtjuCBVSt3Y6F z^Z76^c-7B`R(Q9jwoa5TXp$_J`uDSqjjjwi9L#jT*Ny_K(MiNaWms2|zlTi}wxgIG zG5gnJF2;bmFdcK3dwe}8uBNe=yI_{9vtvCeMm;7n=G=O80?hP9*EVZV1Tp_E0$5?5Y$jDPW_}{#(vC4i1!@T^F!{vY0K)eZU3W#$Ym7DohpDEZyPc*yrfd&?@1K zF*W7-#ef){F_yZs{U3p`A_f$!DCXY<3s-s+V02*A239H*RB&J!1Y8ur1*|l9$+5S# z#3X^8meH(&{kI3lG<(|qP=zJCH|A8#xfmQqdap8O_5`DY%os2_aK?iu;jGoRWd>xh zJZx+Q@olQXPmn)Rs*cpJmZ3WgFv8R9`H6B zTh`^p8*}Xn=)%U1kJXvd=YiuH*QLvLnDdASwix1#Id_4(I-QZBKWACpOqJwhu$?2_ zR10(hjvPEdr}O%{pfC7EpTkiDS0~`OrqA&geG2e9udmPqDity`)@f{FYQ~#yZoAmd z0emUvtyq*>~@~(oWn?tN@G&NLbwZxa7FKapiFpaVO$_jk_K<5O+6jByK$J zQ=B}G_ATezjBj(l-T!Uvw;db%Hx6(7bEC#4<4xw995yYB^NaJ^B;FLYY15`3Hc2;? zY--qaa?`m@mp9$q)Vt~Nrstdf*fhE6<0f1@C0-?7C*ClAe!NS3MEsWc)cDN!y!hhy ziue=pzs9%555$kgAKHXXASbYZ9#+=`yLjJt?}UJaO$k3FWF-_N>`OSDP@RA$bdxIf0)75JcB{ZB88V*crvfr#GVKMBP)f6xsn^{c*GNA{~tfMMV_pDAG`*&LRno z2SqxHiYO|fs62~AG#(TcQKS<;!PHSRbr!K`JSfspR76n;MP(Gp7!RHO>s7E2X$k=V zl@y?vjz^IKU6d)%tfT@_g$j{Giv~zmJ_=Bo4qcGBvV%3}iv=ynf6!5p0qX}z8B1cv zVyUVCNfb4JiWDY9EGW2G5>_1`C=7V}=UNE5RaoQxQ9%E&sA8EqS>NzfXaEtqDivHP zTp_e5k`bmwtRf8q5K%COZdj@a`jC{+00c#}cA-d7RDeEUega+?6g6;Jq!I`%%B%p? zP0I>iuo}?opP8iN(P)*hFrcD}2^x-y1}6{~L7M^{4WW!ESa1tD1Kz|6Yf(6XXa(L0rtAqmXM@Zr1}kccbskV4zZv(Kpj zJq+;f0D({dq%MIqTPBt$#Z@S1IGPelDl!@yqF{>FivNGhVSIhMuN3%7fv*(!N`bEw z_)3AV6!=PkuN3%7fv*(!N`bEw_X!IwhA_)=+DU$FM(hgAfee*6xKs;Gmi>fAx0`FBuhE5TA5Dq@d< zm6eqj5Za|h{GdE*+6qjXtCnvC9;h3*=qqxu%9{GzRhmHNKT(;yBL#TQ`OccYMEJjx z<=58J)3N4qt-irv)|(j_>vD80=h@oWELx1gEU{Z^x6}cHvF|E&9``y4_7%c|jf2L$ zp3e+npXG_HD-yOO6D z0@;2b;FJNS`Z)?+*{*PjgS6a8$h`=izz$eln=PG5U;)p0bao4)Y2z#MQPU68EBiig zY4l#7+v3{hiZF zVQt71q!&BKQ1reXOTvR$Ta?sToU$@a8O$+L4ctumMtsawKFGX)pU2o}zknuzc5l1B|(1-*&k*J7OQo@4G8Hp-bDuZB50USHnB~)d=sI`O$#GDnD z5a~eaz#<9}=^-HPSUR=?tMZ{8i=`_Xf&*uypad&3dZ^Oy1R{;50_5apO-ve<3J6x= zw!$sg4U^yo2$pXc<@SwRoEy6zX7dw-;N_q5x&!1j3+5GzRl+M6)4(znmQGQV1I_+K z3ec1B&*b6ypn?$&OVb1g1R6~j91v(wRNn+7PNjk5Z+Wcr7;wYXdw}Gd#+Gye4qqaF%cRmLl5PSroM6~Q$tuq67}P_EDw-I*K>C)_5-XXVy+f+fOX}4Ckzv> z@5RM`2{Q%5SaPXzVZfpl2(w;)9``NGD;m!L3`6IBfDSMouySVX0on+60YoB!yCfBC zYso$XihzA+7Rteb>c6&JR6Y0snZq=PFN(CuXDP z7yfZ=&slzVvFHEDKhE=<<9B!Sg#6wHx;k_8$o3C8N>z1OSI3xjxpXRq?A_d4!%%IlTaxYs+cX)ks)NP>M4!Vm!R ze<+WU@3SOuyS+faI^gxW-Z%(BxZ^?-BANT-8zKwtr3Wh;q~RaXYe67@6%cj{^g21@Mz%rJ!V_;Kh^<=r&6$NO|~5@>r^^ z6gRxu=Tf+A@&t5e_1@bTYF#LU{ zkpZY-1{vt&TKX`YeA-g2r0F^T+L@o1D$UwkCImZUXa7rx$|oTM|CUb*_L-GWa`Qoj zlbk82ToQN3;LY1u?C-FnQu-{b1l`&>Bxl-eh~U1PkGQLT6X4lc)eYVoC^cY}D}bfa8U%nN29O4UE&<)D zz66-Q2SDat^!dzWyAQhk0^ug=aedBX9J&#M0jL5XbNlB!wn4Wd2uD$mp*fEp=!Odc zKmq`yqUJo-K({;yrKrc$oW~$^BZmTD10ZwpbNUD*(5)0gH2?)115X4BE{I^mXDy(t zsN3}qEK!*VgvW0(l$B^ewZH=`k)jAhr*6}fVPE6%07oPN4iwLus>&q53hMO$s2%|7 zRJ=#A{y+f+_ya~@aM;*6*xT4R+Bn(REOl|Vv9TrC+AIPb%!^SI!J1$NEO-Jzl|oez zX8T@Rjwui5y0g6NH7fP5>N_0)8M{7L;_F?joX7j*Bukt#8Oj0QbQvRb{aZ~^3Mk<# z&OE49f{a52|Is=efy&r%d^LPG_;$`#VUq7`6;?zmC|XZl7cs(oA+H!wpTLOrL*p3IaB8x^e}X2Ap4BS5Ous&pGKlnA<;r+7S#4U+vrA zyUfqSPvG~H-&wzYzx#em{SW*9?tjmpJpfCjOE-XP;0Nm8XI)(SK|~KIO%>c#5@6}u zG<0;R!dYdgysLH*=o78{IIdruxD^P)r%y@2nGVK3(6t1 zaTK`={J=g$E!ar8H~fG! z_no%N`6ioj&DLmrl!4%413VZ*N!f_bwD>Mb%YGBj>K<3_tQO|Wa zeg2F-|9^HkK(un`=b=-8jG+31vhsqreg`2L-akuT3Zy4s+((sOfGec@ZD+T+>JN$^ z-ggr-~XWAJ5LfurZGV)M^+EqsNfRYq?qMN4Y=I5oC38nd2dBW7$NHi9k@rm%QlFGYpHLi(s2&^7fee@^;W2SYingQ3Fhz%#ylVE=~!d{Izs zc|4vQ&%(mOMqeLF<2dN+fBxC)aXl7O=%11$hpz_tX24{V@`4*Ur&%a$#3afS!_m|9v+ zT3R51KLaH|m9M9y9fVLyaU0OaYNP)*%DZe1X#msqR^ z91$pTfnz)O79D1a!M*tux91Tn%&;W0V5fDl0#&Uq56b7dTYGLmeX(IP!F77nG z8;$1aMO*AjTMPzlb)s)Y8$_5i5g_~)QKD#vh@A~1ZHAz+1^ARRrFz#tqRvw9qrKkIQshlK;8J0i^YL9@fcVbK%O3(;#)LeRD#g#9W8 z@Qa#lFaU&aAKdjID2Tf%2vF5oZOo{rYt-`d>!j5`2z`YR=3XJ+1aa)Jgp4k4XG@zV zz%@DM(&bD5oRff&^51Whxk$L}V48zN<3R{dkA3w{!{%S zaaR2ykdFdGY!wm>46&(HB{>eyhh<4XRUs1R$bdfTm7ohjnEua?dOfH!=yp&ac+4w& zpxjLzD2w~g*yofhqE*-e%x(Nv<%)CyzGIoPm@dYsi$M`F#O${~KO7Z^;$i?>9u~oq zz&6Ds1%yn*1Y@vP1jtuQ0}yzGC{Wk?2L`aKU@|f7Kc9NombzcCAQ*Ev7(8iUa8WRM`ghp7@tmzeDKDQZW$s2e8}*N3 z1}f)hToAUMn;ZQ3d5?iikhx{S@cGvHelEiEU~@rGa%iW6=ADEe2?-0i9E`~cfjrVD zAg6rfUGAM=F#a73)(J5QaSiE`gk0e=Lm*4FvjRGH1tSHNfgP|oJAo-JyDlOozZUyl1Kqq2;#o(+cu>Yk&O{qAo4l+iogMtA~5Hv#y=~Fun^Qj%E zrR%_vFdYgc>kc|G1{`o+{C}DwN2{t*C@mD@8wv_gJ=7@FHgs7i5X%ewTqZssXJoF$ zob@}@x-=9PQ6XyfLe1^)0YHl*Uzlrgi=gBxn4Kbmm* zP;LdG1EG&YKZK&?b}JMuH{AbWxotqp4WI&$ng_Z9{twCx1paU32HY4ctXF(4F!L3& z1!fAbuq{sbgJNO_0B{EIKX#DKvrVP@f89YQt=P5#Q@sLEI%P%fin0}C@J9KM{*k+P z1*EG0BtYgKMa?^5Vz4K>JlBe6dooB-AlzBHa(Kn{6&T`5&8-PYDb3paON31dJolf$FHNq2P#RD=R4~!Ev^04;Iga8sa(? zh-4tY>2{MqpQnxVxOZcTT1@bff0KyU1d9lsH%NFr10c_NgY3isFWW4p6A@f?Q=R6S zAV{{Ula?uh44=dOhlbQIZvP={`PmJKSc0UXU>h)fc0(;_ zh5%@3>2nP}TTpq-xp2Up3v{9WJKSs>P|xWopTh~xq_X}|iKofF}v<;`N#ymtt!@a{9(W|FPXcHpc zoqi9#vafTOtOos&C6No3?!dAFz}ij%jX)S3^}<2UcHL{c$xKV{6fBIDbNhS1@;?2(C~?5O~D^Rns8E^D9v6=IjJa z=xVsKGU&twS-FkQo?ymiqeWjyu8X*1Fn4xJ+zEK?)v#uKSPkT}rdFf=U^0gAIXsC@ z1er!iAh!f1twYyuKK8|P+f{*m(b@RsnK;RE51!(WD* zpYpR zz74k^0`|66+zfb~``pitU}Q)9^K&1(a?yteZ_;8I6m-mFu6OucCnNr1iu_{wcFr_A z7hni)o0~xbS|!ZDIIQ>kh^`G0|9)6V>-S(P6HN;C{o$aC_&k@e_P^ZE`}h5u=7(m}@tV!vs?5 z{O6#3sDa+>IgX>u1-;pG1rCb~^UOF0O95C2n|71~%V3n)|v4t0w;UkwclC{664;jU`|6qx}9Dhn3^Hy~XJ)y5*Q2_kdZPxT*cu@~M}ZN9DhPi7z>qOa%mWMy`v9Yfdw|hWc%ZI> z`;D!m@SB1H<`IpCd5ovi2?`AG?josk$ap6X9q9I8IMINrFX^b0I;zY9)drNljNE}? zf^cp^v+V3t!933~0_t0a{~38rsW%vLv9mCnY7!+oX#u4(^W33kC68H!Jt?VkbOg$NfF`C?sQ(En+5!52 zxLP5o_9Bq!AHfeCOgug{S~Hp*jae5BD6Ab#o({Q(PSgmaL8pPmw$FaENuZ4jyx=!m zB(#9;XeGSDzM>lHmT_Cb1>bBTD}WIP6}*7i6C%(MLwtzAn!rVXFPs%QW@Rb5zDe#p7Un%gF0$(Zcl>%QW@Rb5z zDe#p7Un%gF0$(Zcl>%QW@Rb5zDe#p7Un%haISM2;pHb^cz2~%8;>-H9NEBm{mD)Ha zEtRjfAF4Of+1i?QEUR~S#ZM>Bu#7ZP6Z4p5j7+j=iSLdvq12U9ywIlU&prWZGFJ2Q z@gPO+7PaM;rR61|izH!4T;7}Osk>z|SuRg*S3-62mcKYU#5>`;sdnN5BB!Zl^F%wD zoz2M9w6n+JqUS2@=j6^VRWG$hR?)?=8B@(uNv?bDFEs0UHI6X2J-c#!H|->RV9`|5 z!zm(-3vO3^y4c#5u7!suI@eD*CpLe#O(Jok%IaNaCS>`X35nn6#CTrlgbaU1nOxW0 zmzOGIxwYmpkNzd@8I6prH((?3Q!Z_P=9bdAu5H2;u7p|emr9VYZDh07N_oBM(eY1y z3D=IZD5vjIj|c7Gy5iSvTP~2vq_)ShgclPI`>`bJ@)iQ1n+Im6*KTu+za|L}Y)7sMVv>9*g~JN1KREOI5AFW?m(a|%@7-~54+P!aKT zp;I8^+*C{TJbIqmU%buDSMsLMujC|c-*@10P}^{JByuC@{^@i!k3n@eYdIvew<259 zlkR9#7;YGzkhv$F-jx1>)oZUen8fCq2eFRV!Ym6k#+DQ)mggNf%wkOri5Y3e@*>aD zX?dDWgr~6{zdVE{9G4k4OOUkS+}LYrtIWa$J~EThvX=OkqU3rT<$>Uz4KJjXyR|pp zyCExY?%!{@JMG-N@ZwZtrKqyHq=8tUol`}XeX^D|L(Nnc+xirLXOdycQ2|FW8K>VvL` z{Yo<3AYI3~q*!$Iu5Qyzu!A+X^AK2yGGxU zgl9O|L_NqX{U8jVcJx>O7rrQ5fbj&8=fO9R!Htx^P6a1 zp1FLazu`%^6AdZ&?Zr*6+CpjFfnVl#94-7U*?AXUz)wP^%3IVM%ZoeA2XHEtCGRA- zL$4Q%SxhG^KU9CE4_6=95_w?k7wT!hm)G}ytFroyTq(HBXOC#f^v=gf!SxDbOT(JB zU6Lu}gYD)U8#3EOdLPoagsl@c_PeO0uNm6^h!P{=>=0-^ef<1Tu(g}(l*gsmod_;^ zFUR}V`YXuCr=GEK797_Ma|Ai*U456bho0cN1SxC7Gag7ikh+G=FRyz2`LD$0^t)Ak z)$g=T@UK&mKK4+N{|$oI@^J2ZhX;h?tJxJPOKW;h{F#+B{)@)yV)LY@sh=b)k1&cB z-#*;xm0NxNnUO2k9zWwZ#4at?YBBaC7#CpU3A?Xn#TdT$aZ$*zjnqbefv(ZGjI1lX z+-rd}SZyq8Oo~5q`k?O`)#ouPp66RanZFK5$hT94dr8CLHZoa0&$1#Te}(@+Nr9+p za>a~sI^$(;vdnV*x8ZBAhFaa*`S?`O+HS8kjsfaOdXmb5eO0L)S(B5pD6vZ^0mjk%jwZ0H)l?=pPOm=p1` zvv8zB`N@=XRO(AhpPd`+k|J1)ZM6mxzQo{kkHGt0jE0DPKsK3EV%hw@xMBBrYwqz-?RnWnWlWWPs#{jRPv^PY z_D1%vGV^1rrgx0*Z`&)KdE&6%Uj)be1t=rZnmy~&2ueGwgvS&iC14qB-(_wohd&_Ch zEmz9hv`-yNjRXWtJkN4`$I-vzT$asueCT23z_Q;ct?~#WjCM*Sp1Wc)LZ%BP(=4+p zJ#k9;bbYJ2#3-Kp%Yuwf*SqM5Wle!qnzH%>+NP1x#>v(*4(9b` z&+1>E3v&u97%}^J@rpE=+}crLv{LtHoehJUrnU1m%(ByID$=4B)yifDv)z`K(Oscw zBwDasn^|LKySCQ%+v5IBr{g${a*p$+iEc#s5=om$jW-Hwx>}y0Qd`VhZ)S1dcmD7R za$sd;iD8?@pJa(ycDBdFR+;QL&f4>2Xl(*_^X+^JQ=%o>+D1K6%%sfpCpIsWNCK>4 zGCbZA{O@Lq!ismv9G>ipc!1X<_`fvfBNZYU{dG=d*`lrY{q3#lb!5a3%M0^;d>hTE z=a3iv$tA+<4|)T!%r~MfQSpvBzQU>nx}9r&67^Qt-s83 zGBuriz;)UXGihe*4rKm1XmYv@P6Pxh+Xs8ZxJVid;6 z-CnTYB*%!W;Wbcq+{ml$!^_ipCRIf~V?Ks0hj@2N;%m9#vLdGo4t(@x4l zzKt74lZg0Ej2I4NCL|n0dc+L|T>3zEXL-}7RlJH!U56qm@^-QDQm(5+;%izwyyuiy z4`IiaNA2>bsJFJ1BDumn2Krq?*C-K4?(k2`_exuyH|~wSUv=2$FUy?ngsLNWj`eS1%dnxOd6gB_>5R*%&GOs(S@?B?-iX$!Q!RMI{m;o0 zFFot^!ySJm2&b1E<@IlWOrSMtaMZ3U&kS;DU|?q0aq zOaE58+^kJ$X}<3*uY$cFIv3g~kr#9}XD7HvKNZ^8AhP-%pNrP&qFavMDt zY_r6zuX)9_H|`0SXX3M%nI)Hr-1p=)rrE+wuJ{PS=ThB=K#_q#)b7}gmrJvM9V^fA z_FW;;39fH%UG*ZXLRi`)OnMPopZC6;UlRIk>o;b`{V~q<-0DtlI8PvG;QX59s2Fl`TfcJ?O$G>-d=Y8>UN)D({C2YqHu{(RsqO!pBrUAmLSOC z9xFS63o^6SAe~~iUGI~bbjy`DRciG!y*x9kYIkKhvt-<;;v@e`DLra6X^i}b%7k9- zDvFhKrL+9eF1#1Ny(rhE`Hp`hVotOA$JJIrYfG5bhwDw5rlY;)lu!6` zIhFlGqIi#7yJFiGmfvxo!b2_U1_PYv{EO<$>TIhM^x|irt$Qrm$#tk-8?ie#w(3+* zajoOccb^IbG8f{}ymxi=MJDB=Rl3_gDfo<37EWjd-afSG+_U>#(^5f+OU4*Q`@0l( z=dM30~{^)L(X!bJp71R^Y#T%t!uc{E%&?(L+N1aCvU6Vt*Gwkjd?d2%@_~FXZTveTtsJ~hNp6!E zEcDOToYH^x=xor9UrqR#<#$+P+kDprC{3SmS~@aL`7Jv+j-h*iPI8oOy}0C{ zYR?5pKTj|zl-~-|$@<;(7NxlFF8|8-%?0_8o}izHAosnOAWwd}d_Lsd)Yd&05kxxx zd2~Thdj2eebSNWob-lN5iV$R?6Orr6wf;^`MLH~ysnn_OGDDCLH=aghWZ+!3YkQ<@ z5qUg2t*!1!38`Dqq;%3kWp8K5iv>1ZwfLcu4H4OgtxBZiYma=lRojvsEe&?IQ+`)1 zy5NN?JmMF*-=sKCqazP*_2Ek5CBjHg#0SR#WZH3k_e!KZ+)lcQFq%{) zX{Nkn;T>{BkL+Y*t=`xmX@0->jJV6+gUbx9KAA83n8{`hwte#_e7RAl&>@%GM9XI+=^#9=v2Z9`jfI>VL^UNO(v zbvR!}e4x(M_L7$u!Yr-G)oxd-&sm)+EZoaTR%vc<{=0K1S@O67d1~^n56YLKkQeDQ zz=C`jPI%O->46;a8)h|m9aRABWDhx_qqs!(v}tW*VsqBuhZ@HRN3dX~7wVKoi8 zSty-%2dDI^FL;lN|GKEUXiqDteR-h=)jWpHH*#RABokdL!gF;UR6=8NLMmhQ^KYpn zUC0%e`tKh(QXb%$>ET3+i0-R;zkSAgjA!=TWq8-FU!JWV9y+03*f8u@VE$wXL2hrW zh#DRabn*C2P^X=%Ue9Zu{syTtR2d<>Lta|^fgHY#ARpLoTRwo^z+9f*r1oNEs%!Y; zB9UB^zoq5FCS@w<{dabFRbK?^@}iPb>ztBYt|IT3f6|FZYVNLk@!iapU_o-qoy2FDV11JLksE%^+aEqNJK^XaF+W?6PaviOOxftnS%&P<|N*kBhE zwU5A)@xpfdv%N&TcmAORq=D(~-Hq>pylj&zq{e={=7EsV&L771ydG(qwoVeOcv{~2 z-6*fWM#jl>v-T|YPu$Zx&ta!Qet2kg@$Yv1rIp2*^qb`+BimTY=S2+Pfr{Jnx1J4C z4>JA5?#Q&PdOPPy@zAf`lR5aZr+c#}%_EoRi$}6Df{J|A)=`O^c*%nXNoEc6_f+EP zU3~kP;d*m!^7Q0i@ip^|3mj%RF_TSG&ko;6u6JF3psZ@wk+89;9$&NG7M{gmd-usY zRsVBO1(Zs$_2%Y^w}YqVPbHIm4;}w2ce$%FlFW%ZM814ynmzqwAZp5;zrX5_2&5wQ zb>UO14QFCkMr6o4+48-b7N539oXdEtGAd4JLJA%~{$tlIcMYqy)ah~XR>-jm+}x5n zSui|!J>{BFZ4awx=j8G`ulX8gZEO$2%X+Upt~A^(>y;~iG<1<4YP_)vX?gQHXXe<} z2=0%hH?Iq(QYe(0&fORFrd>XcM`dn#-10|NDj`J=Pw$`y1Uy~jSu~*EzoeNhV@$UiL;9S-Z{Ur`Z$7OqXQfb{Q|Kvkj_{hus z?C7&;RJ#5rLaTw9-9YNSr4mi?x+!-3{prIcJDZzh^v;b@{9;;($JwdBA3fK;H_SRM z_TkRaEaz6Gs-v>&?S#La_!7P!vwd?&+GGBuA*uIE8*#>I)>F1Td?oL6`xmk+JmG4K zc}i7EA0k(lZd7R=iQ9pUK1LpC$1#u-i?#T@g=g~Y)+-|KyjQBoy{5x9s-<4ZVqS|o>DKi+KATjoUA>Z?#Bw*OKXNOnJh9m)!0+#>Zt*vF zoXg!BCnpA9kR_T%L1&WPc8{?P`1y;Fk8R{qtBJ^ca0M{Z&&+soG{QkLw;(l~SG^6Cg&vZQ(K-JzV~_5+~h} z-xh5#{>uUxR@vLy{M@X#yztD7>D9`-=Nn=Kf)?hR?yJIu9_}?8-PBl0Lw~>gp6rJsfgn_x@%Q9EXJ@t0`2j3t~17as~Z%JO`yJ-ViMcq=(o~rEI z*ALi_j%{I1J{$RPDrL)&-sC%ac&XJBWAEz9Be;odL1VRHwU4QB!GuphRr03tbYC~Q zyXnWJ0Xd!>rf zgsVQWhg_zNLq>Zxv&ZV^ZRN8%b_u<39b2~ENUS?H@yR=}d2j!ygd2i<5=egD|LdR9 zDy`c5TFR^Dflq`N_5mc4Y?71AEQ8a` zbF0W*Kh>peicyUYGqb(3(DqQsCtua*nEM+EQt|~6cWIZ1GxhlQ#WRul%ABN9yhrsE@|-0V_5YA8ooOM3;8wVf#CA`%-rt}uQDvV7P~l4 zWIDf3VE51_Ll}|AeClEOY`Q!;w)jy@TRXQhc(F{(;xRQ-)U#p@L`Hs3g30Y>Hq{4e zd?Vw1>(gBZ{CU-7k>%oFTC-&Dg0k!IOxXa>Wg5HFRvz+f$)_wRUTrLMm=e zg~~}2f{IkqC002Wz&7nRJ6)t{wQz$clNzO9FH`CcZRpr;If$d=z0Au#_)=A+Eyf^k zCQgach8O6aN$t5tkXp10m*th`Zu9WmW9n6#p8f;l8Tfcr0?jx;aU}xUZ}WgdnWp{N zC;!DnM}qx#i#_l>6{+fC(p-E9>1^BKFG_pjNP63 zDZ_U67Ga=B<)g=tt7M@~Qr)AEy^rSYPz^TlJ{YW(Y5Z$TrA7miyY>Qcap7+(^1~!$ znX($O{@LhLJn(r{&w0JJwsFMlng70AmF9k#=Fw;N2R~7N`17D|!<(Rxarrv}KCkYX zWnhVo#O+Vl#POWQ4+J9(>t-Z5*{-oywaP)ZTOuBAy6K->|3X&vSHo270kbDz9-6`_ zv%3=mu3k1B$7?q{sC{2bSKVsqd}Azxh2NI&_#xCwcXV_N@IiI>Rrt-8&T@Q7G{}?pq=% zi>WcFqxA9KS!Zm`NEPl;-~G<|xK&isw1IJ@_(1>7Jyky?q`j-*7AOw5m9~(E0<`G! z`#T-y@06xwi4QpP4#wRNx^qb=4!R?g6(sKv^d|qHpj+F~;2gHyyZM3F#E=gU=_=Y* z7o_qKc{Ogii1?kcw;eJ;KBKhxINdWceU*nW>6^}+bg{3%EW`CsLA!Rfd7f%%9j#rw zimIoZk=LB(-k$e^!SH|hYV>ofpE-{w^s+7Erq>>9 zP@Zm*i?D%pJpt8N~PzB#3cP;39BLJ_ZsJC+o8pXN%?byHID>`e;7 zsqbre7HF&DRb#(XFE;U_`ZFgj*T?`Tu!dV;b&aiP<oB27Od%p5%JrH>YD8yv3J-Vy;O)?IjolCYknx zf_df0cV;H_!+W@2^uIcC(iavLEyCb}YTEKTv;^`8%jui-iCQ?k5E z?1PvQZz_vR#U*xo&aT|jzsvi~=?C>Igtck%Q{vVWc2C6XeD~DI&9&Nj2G4002>Amo@ApNdzcFisNrr!MW zT#iV2xaO+o^{c{_V|!O7JZf6@yg%yJubm-JA8VTi=Bh3k7T9gK-W(P;I#W45zIe<1 zodpQ#mGI7?+v}8<<@F^Ezp&8StR+0*+<9|ZSybU`T0|!M)RyNCubR|Syd1*5&B@+* zHg{E!q~3A!MfEVvbcTJ#%4evizwp@1P#~gaHFUO0M*jycS_uJqCt~qOW^>ENOnUR6zntq8qUJ@eP zz1MdBWOm9s0@dVV0kv?iRXh&Cm`N&QL`hmGDTea0~RM?r}8=Ee%Mh& z&M8|bCx5$fX{ABq_i{7;YL#pGF{&yxw`tad$g83KOo&N``}f5StIfx&o4U4-bv zAX2s}T4yt5YijJj5}Um|f_4WTPZ^6gipZ~-HcKjz*S`pvCZs;#CR_4}i&M&1j&VcA zxX8y5f~zp_M?IvqK1MH}s4iolJMI^27aGc1J(!#+Ykq})*^x=e9Zsh9JlVzG8F#7h|%fcS7$b|G577e!Rxs_@I5K zJKnGqi?Nw zP<7L1g?cX|=+c@XMemap@BBR~`;4>?h34S9Vr_h7HS4kya{GU$cn8y0uwsTAe1E6@ zv@fg1KN~1M%(n8*|Hb;UO>lmHuYZa7eqK;XrL1O!t6zh}cb|RC3t4c%i2Y1twMp?_ z&%p7Q-eym(wx9livgg9~w}?n8OR};|mAgDl9jY@}$4LFyow_5q_9vMeGNGuTdV15r zc@ZOp()z$I&GKwMBlYFo1Cn-SR4tJqfKj{^lGvYLCN`ShLE?v1k*&5u%;=8km`R z%kl|rsrp8P-dY^06?!f2-i5bj`1|?z8;8w|DY=|6FTDM{O6J+62woJuCx1st+M(=) zqFCG9l9>8o&#tF6an@lqRzDr+G7OE`HK4d~c~tpMKht#CPrlDs=9-Iw#p%^*b_V<8 z)<4E<%^9yUw3m!*w<(f{&lTwU={mgW^9d$QjmHm2BoS5D!Emsk?5J($nBx}x!#wkr z*mg7W_S@IKEzJF<=)?7PvhZw~q2<t!17|(aqNdF_wySY{dhK075_s9#&evs;4w&m@f>LpH^#N>8HA|0N2MEWl|9{O5pCuUcbgviPFr%dM^czIp4*Vc$U60udxY+ak# z6qJ#&TNrMT#@pC)GRSD!G9){Q_-CXe34Gosq^Z6Jo(Z`#?k`oYDVbWri!O_Z{J)h=zVd+(9Cuf<+mbcbx$tY#BHp; zr_01<+xqA_ttW^3v?DtB3y(2=-kJQ}9a0-}|ER0BY-|9;H`52|CS*842i0E30Usnj@bU}ydw8DLz# zT2rc(m5NM_rd&MHV2~U4Ni4BS%GlD}Azhwk+}K)UoDsFW^r5GDD)>tO(MUb_w7!qv z4E3^yPot+gSE8H|`_AB!=coQ&-5ohI?fbl&&S=W#XPz8ic^7}z&_UDvD{@XHfgZbe^C$w$H~rchvND@0;AGLf;5}Uh(ttrr?Hp z-v7nkn?OZ%Z2jUr52u?Rn7Wxc4alg_MgbL?xtZr~nt2iwa5fsy2q=zm##xgXXAxsa zj2h#O1ELIK%Oo~2iGp#&#Hi7zZKVIZPIsd>_x|7e?tAN7-+F7M3VvtT-c@z#?3&Iw zeQMY0O^^16@ac-S)bsUwU%Yx%Gsf!ft{Ql~u%Qvl>)$y(Y~P>u2iN(=PRyNmseVnY znRr|`JXQt$EN=K>rTbn^uR^e(CNxi{dmx0YJ=ubQ%W zf7qJ`f(QJovA6zA>=-&ANM?%z_Fb}Dyj`QaAH0zkcIAdnJ7H4q8`Eu{o9lXBoU7SL znOJpe`B$9t=`QsQi1He2Wh!wa>uL$|A+9C^@T6E))fC*OTK)44-r<+@^Vv~*v! z8T<(SkE_3{G|O*4*1U|Lwc(B&G@{{^w_xm)Y#;Tt&i&$)5IN-XGSlMDa=_)vl^XW z8`fj)I8*-1M5{S<>+W~-So_LjYxCD69Toig-mVSKX{b*B^1Ar;Pb*MXO?4{vNl+yj_dTB@eDMu>I5h_S9W3wYIdh z_$Xepse8x%XF>NJ){5Kw6@_m1kK4qiY`oBryP+_(t-hfdrgdsf6KH#D9<+J)# zH*(MIEVEzCt*I!9#ra_yOMhGYPIkv_rkR?kHQNd*K7A5UA?KB8-JH8aOWr124Bp-yxNbt zZJ*c5Nc_0Z?#=JLJhaC;+?us#{azDi$J*IbLL9rL?C7OG2^!^DK2hNw-_49D!J}92 z*;u>8BW}i*d$xBf>iv_vmdp$<8ZmG2>hL+|R?h#jpw8(Kr@5_{YgUldcwm0Tw%g6_ z42@FoE@q=)$lyR_T)H_EM}I+ zpEay~p{Fvpd9fsLYkMj#^d`3NrJHXoynoVtB{=(dk|;o)0Qb4i6@@S3r2L~>ZmW`8 zs*bvgmWwkS>SqV--ZsHv<8pY*T))vQac{CLVjO(`q0>1_-83S(`4T}dd?g}s<;KlY zen^{tthx~1cpP=;4P>r3eD&%5OvRMcmfg{rNjsEjhu@T?P6_p>+P$IFMY2CMO0naY z6T3>y_w7%qA3EO~nqsj@Fc7ssk~yS|S)bD=*|98c*OQ2x`m?Ig@|Cq^IKx3Xv^UeG zX4D&w{Pv2$`I5Au5uM3<56LBdN6mjN+*|YVmv0&A&whS2y1Ho4{r*|qN!P8FCVBT= z*DZ)WeDm9Q!55*Q1PL=EZx-ckSd;nXh;pZW)k6u9&F+2=U+%fG)SEsdulBu-x>ua^ zSFEVo2A5QTr}^*j@G}I(gOl z{N1lzLP92Y9=)oV=-e3hg?v}%{-Vum>MEmmRfl#ii|$fvk?#4xBY%&uHuj@s?oml$ zmqK3CSMC*Cnp-YYt@!-2-=36?b6VWHb@JuX0PDJD_o&3cki>+~&A0W}D#!i0Yk$PX z%n=)R)L1Sy|9R%xvc9sXcB#$BKkQs?QkL?|!^5g4{S7LM&1!Bw%`j0?usxrQ zTk_IFeDgw5Z}NrOV>LNe2eYSnOW`|c{-v^|Nv?}B53H|VYEN4_|FEfUUu^DN1t-GC zMe5F-gHP-na(KGamX&fm!E{Ns%|S(IV5y@1%dVT;s+#h%A8(HD4R8%Rw!B-sGPQA4 z*r%&E9?zij&;NXB>#eaxgP9vYN?vwMSUivIJ*l`{`6IkU2)^W0AU$8l}!AM&^b zRLY@&Ci7iOmV3-{jBgD{@VIW+o-Q@vC#0?NGPk~#X?ENdBr}qy{9RKs;XU9|R*6dxo>Z8rvqJH^)7io$`+Mb@8)3D{AafP4v zC-^Rs7Kf~L_qU`qS|3u}ir=KhM)YplT%TYe@s6v%mws$V{D!oK)q_K-)&A#~PN=U* z*>+JG0WJGd-AdW=Y75tzPafxgy4pR1Jul&2Z2rEIi5JFYm@c+mUtcTy^2svA1XtQ< zf9C}Wsis%rW*oI%9aFpQ2QPm3t|R?DA>uzLdyP%M?-tq_y5r1!xzEv>9`ij7&Fc%2 z;>EGf`*&9f8x{FWxQorKygtdC=$24e-|(S!R(II>-Exa#7B}yWorRU{S5AMwd8UWg zjOYs&lUd=JHx3*+x8=Zwy}6&dZ#Zz`toX}=wnFn#PVkXr!HDGki}}lz6dj4FNEZG9 zGs5xS51;K%RgN31moy9>Q>Lw7rFwQA28c_m#iq9I>Gnx`MoLyHW6K-yl^ZO-)VAfF z8l7`vY}2k4yZ02DR`;(d?8{g3oig`Ec_?GAPPUtmeGy{q6Y}1M!Ao<1dywwIVqL6<->uEBR_Szio)7gbKf3J!|BW(|J|tTHvf6Z+_pfQQA6LXL zHgl_(sMFOSnCU#z<$%dc4NL+<#X`B8)YPGhHCLtU|CBv9=xfu>$u}*2H{ZFW<#71H zg97+b!xB9llpRV{FRDK@KeeT1%s%HQNqKP(dMRwxeNDcmw`@^Nez%Luv%r4UowPlj4ZEVFbtU%Sl&vfqIb$d7 zco{z=RU)Z+7acS+8U~ukwigyb*VKynOKS zM|D@$-?+Mc)XUXdi{q42Kf1ZveazNRCG~a7My)v%cU!P}%i2qurSl_7p49ITd9b&m z+{C0ut?Pf)e!lJq|AJeXNIXBK*6eYTr(n0-t2l4k?F+NaZu^}3)Ti2Vv-KE{ z!i}~Y%FaFb+RkT0>e53ck&Cg3^fmTVBR-%1+0cBq?6~clqeNz?;p?ftFPa;ZHJ^Xdff#2eb=eK^(0!K*t=$Q z{7;!7Yt5I{pILLKitT?}P+yPl&vW9995>joY;@$KQOeEAtp3>4dF=81q4jmYAJILW zcmvhP7X_jt*UFV`pCYtImYfk#2T@FwEKkvQ@sawG=1!!vEiYv*{!Us=4Egr zSEXz9*cz$CbkD1Acx>0*v(a@tpK!Dh%yYH%Wy0WG= zjG5=&e@4!o68~w*m)|yWKmBTzt+c=Gb!YimQfg0HQ(|cA<~hGRo1XN4`s>9-1sm0s zheiaS<6>$>-C9R ztqMK7G4FZ9VExJvkCz@xN7pYqtUHwQ2!7|H|K7N7WCY8@e$mL3-+C2S94i07DdS=(Na@UR6pgi*D(|ell{C}^n-}~}J6=~<5CF}=2 zKkVLFwpo~bH#|h5o!4V}vt{k}Z?toLV^~u|RY6Nme06clm$SbUimNGSUwLF7ewAkP z=e~jW-o#)Ha)%+SAl=it2M31=*C=i$>aNJXzU!@hcqsF9mO!=VV_d<_`#IcQAL*gw`PgPmhteRfG&c$Mn==qq; zeRtDOt@-hM{I(mu6{hPiD$6$3&c0#6SjHRw{kG=N`p|#eoVc}arAH`zc?PX`-1f1p zVJnvIOvu@t8a^T<)MDb6BXPG)B^GqrrTWdPB=tc>9xG|z?XwA3U5nf$kW*;3=-}GH zx?3BZdh3Ih-Fr}a@9P?V%g4f>=gj-kCn@hhOlWzdI5{!s&w2jGBIiFi^2IFY?^3Iw z4QgkcZx&n~UD)_0W@VxYU0%0)%gGa3)8q2C#Z=j**VJzoUtPYV_+++&Tr_w38|t}3 zHATO_`dI68zA=vuqe4i?z^kp#caMIP+@9KeV%_85+M)WcF)3?o#c5+ARk}}Xt@?FO z&JUK)oy_fZJ>=wYDZl)PG7+9&o+tX2zt&xSYVLmHweEDH$g2k$cbLjE$1bh?fhKlc*3@GGZvuTjYgM>yc^I9!|Ix_i=*>|_tgS!El-BqZ zNgnJmPYV6D@A}Hw6~{g}?o?voyQlAyFT}GpjNEr)wdB~RmeZ`0zT3aICX{w*Ifu4# zwpB@;8ejdS^>hTbcL%LE(xXns+ca>T<^1jG)wf*MM&D2AYEZHL)_T^Y6z!-vzo~n? zizJo1t!w)?Xcd>-?-%wzn^;q^MLfI9UGTtd zg!R4yUaM^<)mrYGp?k$%Vjr;UtAzcXA+6djNUYmiT+Ui%|kJwgyKWL~tdXwmP-B1PlvqUf< zT)tmYTdn&&vS$5OW?mz=BB^;+G6{Ys>IwfXRrITU=lh#0ODBpxdM@A8pSL?cm;SIW zBjQlnmivt(MT?%7*mX{c)1;QH%6j?H^ghq$9?zU_y?L5nWwki;yUn3xb@iW}eVV`M z^!lF}{7Pkv;^Q|FcNVl&H72ZtcN1>zs^`3MBS+^&h4#Mgeb!b~v?_T{8O_gnUTWz9o4(eFaE?+_u@cU8sYc`si2T@h3dcAkc%3yi7G$J$Fg`?z1s1^%o-d zZM9z#T5CUtFAm-r$DO}TI+))aGjBnPZf9n8Ky6e6gAxLCsV4 z6`p+=dREuJ-_7ImA#s(^-l2!0`(vdrXyC=tRI92&__Aw%^)7f0syS91^XShu&-uy_ z>}>Pb)h}NDVtPZhuRwWWMEQ$9Z7%G7r6}8VWZy1bf_+TH?L*%ze;KVXvCf;IdRaaA zoyAMJ@Ztg`UH3{+9+Bk!OZS$Yo1G&MJ1nrE(Q_)}Dg~9K)JoV#<8l2EY@6stk#YOi z5JvRB7=ujG%iEh_OPTXBmPCe?%UFX}jVNNPj5%m=UdDxBTSBFX40~?#NF*{DwtXOx zZS2kLMVP?B6m!IFB~F;w${K@{)mAP9bJL{dl}&=mno1GvpVNrUY#@!$6vNCdEHNSt z6siICoY79~8e;e-Xct}|GWQ8;7%c77)^-f`b>QSF3_fi1suot^`zAA}K;p3-+FiYO ztB2VB>}zb_7f#K8h$+o4B)&;_P!(9J_G`n#(eYp#BvQMMBaGw2Dg4?X%jd8&lWaWf z#RR)V2PUHJX2~)E1fQTCn|6BRmSh&$}z2C!f-@p9#0(q%mP@_fmM zk_yQzd|s81MA9Z)&Rf1X&xdSorO2@!{HD{)dWMgZY2{U6xp##8Of(Vtxf)wjYxCsj} z&miYzQmJKv-;->oMcZG`5!9sFm!{k1#8Q_<&{9ijswsk7Nf!K4fgp*zyO64wA?OO_ zot$BdmD_seQ_W_HasAnRm965D+Jb56Vy{(e^{v6tGCA2?E zn9b3aW0U@yO$xBh1B2%#A5CCOisTQQF>D>Fw4F=}*ERFaStM$UB-o2gXOS9VzaiKd zj}1Ekz(!YqlnE_#mYJgoINZ&PaGola%EN0y3EIrC)ENTcT$tWWH!pX;%F6MTRc7d+ zK<}JY?s~!u?4H}%%O-d;3o*#YJxJ98Lmk&>)qjm6w+zo>Hmj$%uF; zE^^N3985Pue#R4^qnlUIzc?=vdvs-pB>qqwl{GVXeG3~SnNeEomnYh_a4~1nt7fy1 zFbds=bdEiqa*o1$kHZ%O*_!W3{k4}rpX9hSL98Ogkz`cin`8}2yAto(N_c#u9>bY<~r+83*E=Ql|6pSf9#6G z{*ALLk_AnekKDfz{~K0Vm{pN8!{t9rF<-%&KOau?Z!-KVOQC>LS{2P#z$xHFe-(r9 zudIp+lwzbqn1e$ZOEF*kuUGlk6hsUwLV*^L?BApq^{<({%lS7c{x{WO{;zUT6m~T1 zMauPLE_+!t>OMl!ycRq#_~UjHa}so)f-pX96_e7qibZX7ppm9J@W|)MIF-eex}r_I zqyaqG#8Z;Nh5Z^OMX)6YO*%~g`!z~G1P(*G8ju;+zKR*&zKZp*#ew#?#ep|g*HCPnHhLUYTyN%p;JSE0_T9OJs}aI;8egf1qTO+06UA(3LP9uZLJLz(PI}iN%Di zY`a75GMHjE48dv&Qv~5KHI-q_gCV$`Nwb4+L>rCa2w{0Ui{=F3$V==%HV-zhd9I(K zhNmfFZt{YuMJkPyrej|2*4ft9vC>SYo`?8e?x0a=A#CdE5zH`>#_DqaYU|1q_4)MPl0vqTJHjl@zB(as^CJXr?+E=|!fF zB&Cz7o*azEFonIz+UPX4B`Bqh!DPWa6Q-sxxRyvMY#P%UDTT>kxx?OM?HG^6g}uqT zC_EDzn3uY!JdRM;6Wv7%WLU%QWIsfDZh(GYH{ZDN?y~ z+Ei>>90t;9NNVTcpinqC*h5;Vg}*wO570DI1k!(*}TUT4u znH*dlpn2Qc*`tHIyE{27l;UNxJh2k(R%nU~N!%$h@vL%(?m{pQDLK8wyIHBhZdUr{BbqZ|{`*BmR- zF$+`DaXU8YgqM4eZ)t~#>}A{m@9@o z9L1~=uzRdn09!)Q#CH543SBI89-=VB63Zb9)6tYWL}Gc_*ywa@8;Qjb1rrEhqdX2< z;H2y1;?N+wOvKifx=x16WviVX zQGtnoQYqJj$2BqG`HxHRABQ|@De!zG5W+txK|l%!6p+f(%B4~S@E@NL?erHH6`$bx zHnAg)XxDhmRX{??;Vu?m@IIn}H$tBj?qW;zlmz0TMyymKo}O}zC%Z}=aYtN=c!+Ss zUCC(@X-R2GDZxWTN$H3*%r(ug%C9QT5AJ^v;aBzc9B&ILf%55dev7U|ne}Bw7mX;y z6Ob0nMrB18y`Tz}IU)RQPI@XL-k1)h)L*$H?gz2;9xK-${i%0gbx!w0M7#c!i1FxOTn`t{DLJ_}f!K8sgZ5ydiS#(>Ms*Uusv6AcY!kjt z(3*4%k=@8v#mon(qi{z1x zoc6@?2}x})O8wQiqvN(7rq9th#y0K)s!AIxRUpet8(57}f5pRv|CO}M7 z7T6a!@*Ht`M>gyV=+-Nv!Pbh#mrDo65PK`?_ZK#9efUkX5O$JRyeAtN%;>}$64lod zU~6K?>?_)K`j-s-){s{cV9)1+jZFeBvDui(L>3ZylaQw9 zgr>0VoG-aXP5tk39#+~PM6v!!X>;FIT3|9LEi_riAe0sdAz^$nN&`w;2<}}qIsHXV zYe7v+l>+mq9nqGSNKg)fW`m&7AP}hwp%cuQ2=EMn zpa>ud0izgTF@jwP7?Yr%JV-`e#VkcT8FdwWL|6LCV5bp-( z9XzMbNl`nxL+@#G@>k}Umaov^AEZE+N@S4OY>!DZgwxa>re;G)j<4FcmLzRnyQ*g4nzj1C>V>r%4EzmiH?7h$YZtCqvuN!WePHAA zO=}h}snrK+7H+6nxOj;^0DaG2En5h$G#duljj)4v)3Pzdmd~(5_hi`OJ5`Wsl`2W~ zOdXRNm|B<0k}=fsRHSY*RJET3CD^YH_ESgsq1^GG(3760??UHNVINw3FM-Uj7={*NG%!Zorx>dYQbsFNl{w1E z%4g1$;NLXxouKjq@KnKXnuW@h%BA3GK(AA7S8f7N2YRQnPPrF61Lz~lZ)ELD`~tKrvu8Lv$U2l_dbX09bgI z!Z-s@9;V(OrmBajRm0R)10}kJav=q~K=(xuhM)k!Yy_JTG$8m6!A%5j5C}p5-b0Xt zU?PHL2<{_z4WJ%Sq7E-h6H3ywRHA`Up~)Hh{ZmbQ)w%ZRj$G*V1w^lhTb%Yut*}+C zvvHu36%JDqjZyS>L5I_hr=3k}OY2GdDeYd`leE`q&zx7Q$c|4mbQNEPfv5O9(U`03 zRaW4sKs%{Ms@%ZSAkJu2fXWX%J@|t&!80L#o~l$;1fB))r>iPd z?}KLpU8!2GssRtpK$d3Iddx7DHcS-`Q`3j3`NPz*VQRxLwbMX}>_b6^5eO6rHX!Ig z@FN027=Ryw2n3}FmLk}Rpb^1O2%aMF2nSFiC`GUxK{J9r1aA;{L;(09n22CKf;|X& z0EBFQLxxTIrz(;~hN12*Tu>oudixg_+El2D$EFJ(s4rU* zS&*qT^)1yCxUG@d!E5`$&pKry7~tEUsL=R;Tc)dTqkW=bB7lKth~ma1e%cb#+pF4# z&Y=@MY7>wJY+Y6Qiu4WXpQIm1|1#aU-RvD_)ewfM_rizED zSq4fpJ;{kBi&l4<8OF-;Bq!Jj9>Ea=0|@xZ0JaGH5F{eVL$DgbB?LbqFi!#SK@b2? z$z+izQ<-*D9Si=MB2qKYiqg!qAvcrB)MkRsID5l;CdA!<8d1h!PDLxY#WLs3GC>yr0rn2aC$^?#(6v(!s zPT*V7CI~Iafi@-R#t{rMnrx@ z5`X}G8X^_~BH{l!WXQ%46N;#JmTVJMUQkX!7DBsdNg)z;t); zAdN?4RboSb{{VXK72U!6bz=sIXQ1CazIA*E@&-wH8_3&mpT5Wa2U~~8j#Svteux5x zM{VtY=hKN7i4rdQIY-jZi09~A|7V`^60~cyLz~NMu(8G z!pdwIW8j&Jc=RHe@c2b-5@b_Au{wC)9{lbNvk8$F?RIaN#anZQ>Rj|3gzoO)p>F6a zc-&!%v7zm7WWiGu8=mfDG{{eXm%`1~-=aW?oAr-cP!1W5czBTU^(8Zu*Z4Ffw9C;y za!`fVImQywAxC&PTo_C|{}_rWJ7}C7;jstZ`9P$#Irnm~+>yCSxuv-^xgX~q%hivR zO}VYP-MMr}@4n33qTD?23?J{l_j4UY)xow-!7r*t>6kZbNQ8cpXbS3XS4? zt$$y8wc|+qryRIP5qsi2=t$bE$01EKJU-k)0dx!F6AoKW z??jLp0k9o_rO%OtlX6jx44jURDDp8B<&SrxI2oe28Kb->hbS`vhI5e{qQn}b>_Jg( zp(xPO^&`4Shj@0803HA=ywoVjLcC=N))RucM!^}xyM^F2Ay{M-jEn+a3W5Rv7JkNf z-ZhA~2SH3Uz+42U0Y))M0&*|OlGH;oCH=yrQy)_4tWLfKwVTB8V$!Nt^ z-~}huh6_Iu(8P2h{EBb@~zA!Rh8$b*@0dI#L?G|Wej#e@rnMP52 z=gSmiHVqx~$W#s-+knsucm@H_ARulgVAO#(4@0zb=#H8WkG_uX`kTa}{AbRU`8D~= z^U0*hzUlcD`R{{=SzeWIXcOP0Km`pVpriu$BKQb^g`dxd2C4pKtailZgN_n-G6}d$ z+>78XNFX}`Z&z?AHGGBRhP5w)7JM1;Q44NCnf#342>_Xf(P{fJCP@Qxwua0gYe+P% z1#^fJ(!&hoIKpRXt|1JVhp8dfOsMqI7K~ojf-%t~OKu@EN{Wli;0I9j8)$GracMS# z$4i4+<3;jj@|Zc z9E^oYrcX+?Wb;Q%Tv_<2fONM|O)EsLVoRZLY@s%gXcd8f zZ52Xj6-=U4rM+3CIZ9)v92{jacTZjhFfkM=LqWhW()rGC#DUQ*7 z-Gx6EYQRHN+EQq|VccV&L}Ufjy)6PK1mOts5zIxf7l2H~nB;3@2K5>=ifbe~m(NBG zg5}7EE*^TD8)y!lda*DNec7_aB}9PfbVRE_EdsTS;E<5_LyC(-3knK?p~_GPhH8U` z!Bg@WjBKc0X*mR-R-hWQAqLbcGz=-K_iSh>lS@s~pynCT(aGTq-V9!j36E)L6--{F zG$)$Do1;omMJJ>7#>mmv`3$0aLnexIo19fcFuc_#$AhQs^O*YaHAcB5WUMiTffC(B74rgt4gszN2tlAkuo!?$ zwiMC#lUQ6EFgzL3!*=95=sH7hn*=gos9x+AXbly%L=b2v(&?673uLi%x@9*)#1NMm zD1^WY&&Ms6qI{??RA&W+=-25`)Dz|K&zn>ZKk`ABizIq7^cLvP$@)q~V&vq+xQvp4 zgRU6P;c5!>j3XP|n zkm?8c7#LX)74uj#c(t=(uuMJ3>A*cNOC*x=LEp=Rxt)XNorCF}gWi`1D>?^rdT_fA zNjctgnGqnNJN_9k`2A&VZqLy7{_LTjeCY7TDYFxAPGV4+;7h>=9m3v@$G;!EWHt#G zcM3Z?st!7aS`UdFdExO?Y>4I-N?^bpd`dC#nc;vouk)azL;D}N>okJFvsaJv!|OgI z0{C<|LcYAwh?)Ct09rSa;6G1-!bGCCiYFak$;QI7skXUeNbJTRa(3fHqJlm=S22`( zj^U%;IL2+9`pu+X;(gO|Sy%h``H_P`n)V4FCJqK`h^TNUNQFB=p7A-Cm^EZan!a)( zUduk0b#!)h_gw9LF!)dh?_C@@B6hH2lE@tZUT~`5eP$l<9-U&|HbirzShNkX94U5f zwrz|EIK3kSubK>R=5Tn6{|CNgGR!#*gCi~vdR&HgN$v>TF2kLs^JSQ^TrR8Um*A~U z3>HtImRPCRPKI}8_(v#>`po$DL`MuJH~5u`s%|bp`JHGJtu2(8B#90cN|NB+t|aO4 z>TA?N@2=&`ElGKJSc#QKTAtG#Jg`gc?mvLupoVmj86@>_lGeKmZri=JfnDg6%non- zX_H!MrIi_j))!DP$QTSoLGegKbohev-RKZ}H#!7~=y=%$VPXlSgOlRI3%nY&+CmuC zg^x3k5nXrzkWFffjFOy^qLPx5871$RtXW&VarweED>o!E~vXNA?( zN!oE;gmyx@tQz`1^XT7I)xWz9^g1}M3n?wI%c=@=qE`?dR0FT;;ga%8Q6(7eF4ELr zm8icO>mQ|$#e>gWBW2`7^g_{FYz?77_y$&8UYhtM5^lJk8}7HCbV4$Gw@$df7k=j9 zLaS|p+MZI18b>jKvk;QVgeQ^VM^aR`f1tYMOhlwRfpG}oE89qXW$Ey5RIXiZo7gl~ zoiN?h+N$0fMt0&32p*oAp36jUVj&3&e@0xy52cP0{FRXu;X_7}i&M+sD)C2%0XIhY z145#|=r+-eI4DSU94g3OM9Sjsdfxk8Iw+8;!z~379 zTLXV<;BO85t%1Ka@SkeH8LJAutN2;LrI<(FZx)z4VW(TkkHXU1^b0X1!F&drOB%(Y zlD*CNBp)XMS?bECNIj{P(UcH6mBXP?0>{Ieutiv)6b>~`K`m@Ts zEGewW1e+SLKohx?1yyLd7=+O3DaZ^cv@RJa3RTJ>b2vajJV4|i13dxpFarf91crHY z{ujIyEX5#oG{K3o@c9cWtBA6o^I}9<_eOj)k#opUa17Q%Vtg=-V9gu@Y58b9Du&|mr7WYAJZFv} z9{Ra>#u&&GGPBWZm&A5bh6x#>F!tUs^gm(-^z=Be69&gv2dce}!w^7g{T*A!(D-uQ;kz`nn z>*a;gx`0MP(Vw?7GB*Jh3P4d11%)AFG6svn!Rgnm5~MyWh>fK|b+|#45NtXmLb;&U z2M(g3CI(I)LLd4~Ai~&mB7z|b5l0^dU8Fm-RwAmtkw7j624WhDYq)s#;V1@%UP&bO z$X~){rKP9Qc~e5;+Dx2CqfJ|=;Zfoiy*-YjVO~@^hZIgXB~74*ih=$ut8bknshbTK*utnEcBQ1$L#7WyK68Y6(v#SwQN zj_r=6V;LD3U^)WiQ0F5S2793u-wS4wof#gU43vcnmg${kjGT#<{xVT7K)=Noz-nu2 zh)!ma-Q1!5>a~gyku#w#35Oz2MxVkEIg`l{bkke?AYx=;7?G*>3>4ei*4mn|&46;& z=j}G!SPa>t!!)AirlV4Wdne~%J0W0(1RMc|$Y7TQtvvSfnxN0v*mgmI&_eW0#F#Uj zA_1KTL~wc5Q1wPd!;xqge}xHi=D_mz?ug@QN7J~}+-TzfjO~aqu7uwkfzjeOiZX+Z`T41CovYn7jy3t~X{nTQ|9%{j{t`-~N&K3)7nkzBrB)G-{g)T==p=pBRrc#^S_-W)kq;nfGPt0Vh_cCpszy?@%$7`!pI%<> zS2@0_ynGrg5J&2Q<=(K=eMsJ$_FWp4s*ExYN)~BhbJ41ISaMwlHUP*>D-Oos3E|7@ zD|9Bu7CzijGnpJGT~C;r#o&%XmRJ}(GZ?8Nx;Q+hH;hnS3>vI#?~J@;!ZVY?2-QWW zalK&0`z2nW8GJ^v@-ESMQF}Ey4`Y{rX735B+ldx~3W>=kK$kbRD(JFM`+BL27;oIY z!4M56_Ebj#+LY(CJ9Xx zYGGBBU%GudCgMfwV4eAtzUWId zu5cM9@QF^?6%z&zW{2=AJO8e1p{jqrrhP z;2IrB4eVjgJN9KPNH&;h%r6-|8C2_g(f+M$`yVHGw1`&?o5lD?bQp5_``Aj}okO{jfV49igy25V?nNDWVC2rD~V=-8aaFcH8$%bm^HZhg3pi6Y~ zOeG+X?&h01K{%$Hg2fxF00ZL=dI!8=iXb2eQUg;T4+V&{m=a?dsd%_4inq13#gqgE z-D%ppl!F6?IuY=|dPF>oRt9P;rZi9(qOge|)l>0$YOE4WO1$NnnHi;TDdlvy1B0@} zhryMDBT^7O0a3)=8OR|QgNuJ_Wn!3zg^{ALy4a0b^Ru`%f5tv+HZd2HdRpv0i30;a zR$!K-B{VjS#CVSl3plv3@YO$?H-pVz!xmtsBD6%Lk7jDlhv~SFZfeQWb%k}aOr1H< zIl9@VBTRKY5#5-n%mN0gK89%&159)DF-<1{KdO&qI*E;Hg=0D&ECj`L!|tVX=H$#t z0IL@Xu5;$NzC%G1o2ci(d<6CZkQ8+Ke@wm2<=;?t_Bn=g6c@SvSEyV=JUe@-fhsQg z&nedbb7|*Djb#QqCZi0xg4+A_=WC!~ksWivVp-c?rg=ocLR{xh&E=!uL&&3){?EnSC+mnQxobVisc`V*|+vD(g z2#j>2f1H@ovLgY8H#P@`Hx3s%l7_+rTQ%LG8mhz&j$s;_!~uq@a1CAJWUlLq&@d#h zs;X12VM@Fqe<o#2Y$Z)O8cdC=-}vG%Se^>PXjla8HizSKwfvV48(L#6uRrtO#`g zHN^rbmK5$QhYf{+5)AHtj4~T8fsqKa`p>E1dB%)15}TGp%X^s1C5;O++Am|320v`m z+q%J%!bl{xw=E0m;2P804udJ?8e8H7Gk2JVE0Ms=9^S{6gqb7zcP5fpHq7)Io+K8g zlt>NVJHS-e9d(W69cTe}UDvSWiN!@QT)`bR7GGQhH-2!tJO?Nkt`g=9Q*U_$H4SR_Us{twVJu5Ug^~InE9n#q zL;0Y65tIV8G#Zc2=9A&Q4cCOv;P9D&?7%<{hsl5%^y1iX#%evghG?zosS12bSHs|j z4kwQjmwXj>@bpgYh7MR8Z&(;V08F8P1QtPYN+*x*5ox{9)Q4wd9pFYYH51ciI#V-K z6E~WfnfP`?|Cau(T2^QOHtp{n{oB=_`^%X9+ZisUBi{&?$PY{!anAFAgVC#O3^fk=2!7rSck zc&FOW!m;UP6 zl1?%QeE>Y5E$VE~b7TwoYCQuMTXf;u_1|OT)`p|ibp0pU`SJSWCVg0K<%j?DPVp_t z`0X;#C|Hn%Wo0gY=&H2GJ0VAzHGJj@pOF)~(i?#tcmmf1mS|D&0#3T|p_0j7B&crn z^6^c1DNxf5sPu^p@3GqQolvLrRM`>#})IKCXB^r2!y6JR#< zZ?5X!0^i<3-BO@#A8(VGI1aWw-WvIMTVlI^yVaupZI8FE=-=8VI-ezBX|pcl?TUlv z@IHk$zT;pkepS&X>I4BW+C&3c649e9__CFpE#V}Ai6gXD;gRBZg(yM=OMJ@!(Ao(X zrI4f4zU)=!O9x-}w&~X}EmN*i?o*ytUQ_<2WToM0OiNLdf_Dma_<^!G$ zX~WYJ(xSoZMDw6XEGUp+nN%+-<|_my=|~_o3gRFrsz$Jp5Cj?porw1c!D~VgZ4@|X z052TDBmfq!GztzNUKfHN2tk2Sz{&)k8-fV{EPR?#P>6U{2x3ZCNFq1mlEtU3Um8r-4zQgupo96Sy9XH{*g3*hNMUs3g`dcZRv?N6$E zs$1Zh5dRm|AF3zdSrF&7ik?ma&juPxH&5q-hh;Ah)5N1#_=_|#7;>Si#LzVPDzPmK zw^4~LS-7i8EMVd9sl*ry4^oL~EId|asQlVOxY82{S`p|F_)G){Ly&@?3c-2=Um@r~ za2tWJ2;e;g1qf;poIuco;1&X#VgMO}_Ytf?P>-M+!61S^5ZF)BYdASwC{5Q|6B@QQ zYWNbY`2REAB4boWWJZ3*yo?PQhchl@v}Ih$AUl4qxeB%bz6VbM`q%UqU=iSHIu&T6 z4FDR@4jJwl&fw|6-)sCcLNfxvGk~9*k(H4Ko(cT2j5!%Iz_WnAIAcx53h->8Kgl?d zu^T)FagJx4%{T=fG@fj<4Df3hnApI=0UQ8eNvcs0gLsn=%pnA&M!^BZYevvR2<93E z)Ck~75kvv7@I^+!JjC0Mpq>z{F$y{n?;(OWgkZZ-U?&HjAA$q`7QWvoScrH#5qw1m zzA_315swlHU{9 z&CHjX!Yq%hu&nH?xmje#A2drd*JZ8*PXT&oW?kl9@YLWRG~Z-4W_|~r=JSK5GxK_8 zFL*l84>Etxd<32WaVS~bEGF_m+hn<9If7>aJtj+*H4Z!*;>TyHvQoffz@L;gGiwTX zs4z;Vp~;&>LD_>4Bm=N;o>8zC@lGOWB?Q(+!64$fMFaQ(u<#K^!7Rl46v5YoV6;)t ziFhv%U@<6#%qZ}KpeO@DF(HUC3brF&BZ59ckY*ITK|DMbU=#ogFEk3`5U&EkVnQ(8 zD7cJx_Ygco;1H*;rmwSvYqGSqL^atOtH~=nB0D#`JbQiiq3rY7KV(14Hpv;0@PEZcnXF%hd9h^M@JSBKQlbD^6tpHC2x+Hsc_B8M`pciGY%3cPZ4)J$n@5}xS zJi~E7^L6&=?33V`5a)9Cwd^kNEa2bC{w;eDJR9N_iSom3^paJpP5OflPcB9}q;_(y!4gf4%V-)x!o)SSWA^6!Ss6xCQ2o4c~ z-;9Fq5$_oS9U*va6nHCv7lR-VfQ2)&4aKcQyp;$x5dt%#;9JD&Meq|La4-r;X~45a zFbY95f^r0X2yhiZB!U_M)ZyOG5vp>uc0^6u8Ef*FoIi3%xmd1wu6?ds?&#crTzT%@ zTypRoO;T=Vt`a=O=Z+>1YzGv9rvg14tOL9co(6F$bC-inftp-8&_-(k44^;G-JiP) zJQL#AgT;Xc@GRheo77W&E27oPsAOr;n<|0^!;41`Y5d4VX1%e?2 z)|miN2oe#@K(GeEP6X!=JVQXv0+1p|MUaDF9fB_qoJH^xf>#JIWUw#*09BJ^o^U8v zYfn^@y|J1W=dH=xnzuXeaNhB}vw3ZKJ$Yo(1Ih z^GV=oKx6slV1b37PY2p6-znc7JOgOA{L%R%!83gxX#Da+@&mxLNDnmf{G|L?@NA%! z`FZ)7;GtS9^Nebg3{#_qsqw>_k z`7`rL9r50|!n6={Au80b@Dpv8yMX~P zxf>@b`FvmXsk4d4FPv(tuKVj|we0BmKF{Nq5@f4Y6V>OhS6{s0Ga?b9 z93?~-HHkepFF>H@#t4vpf5WT)o=W5w37MuNr~%+oNl2p)b)es2MTe1(c7!SClsA$7s0b*ARbY4iCu)7BVof} zd&gj9=iu1O>Oak%tFH#C&jhMZIX=PtimpQ(8x?~EPo{Vb3N;LRqGwUVBe)ex4iEcL z*I^m%<_>kq_y%-v7ze8>!7LPRU(^Ii@aXICybdvlM|F5aCm!+V4;A@~-#+o<)2=_> zB6+-3@_1XhC7ed4#tW}kfmy#(v+>bIZd_Q1899GFVmqOe5<9Wr!9|y-MZzF;1H7%k zL)0>|#FwO%sRJT;lsml_WgK{RZtNPMJ3htTh?1HOx^$`U`@k|(xHe?x;ykqo4^kUf zv8oS@^)g>HqX*N8k))%)HcNhOyObM3u-7S7x z{17}9=;y_{Vl8+Y(6mXsNo??78weQ%!kda6srZ>^56$hTa9=bw(C(s4XNOvWSxnpMll1@Tp+)ixc0%=71Ru zFvn2n3|4UhW#MDSfJuZ&$nXJJJ@EAfdp2?�Uw6KpGfi;Dv{UvE|`@zC0w++e+~E z%j88uAd<&M=2l{Osu*4rvfg0oO=P6cO>Z;->?I(R2{0I;L4|LH1{z`+zZwSL6_rBL zRq^@T^1A6%HZxUS*w7oYE%nY8Zku9N%z zKla`PI*MxRAFZLQ=P?O%CjrtG5;71;m=dNmnaG?@I`bUD?5sE;2#Ja#iXslE*Wo%` zXHmQ=*Q*l5OB+KAh!7N&@F}2C5w3vPLi+u7RaXe;{oePj|9fk_w^rBb`qe%|ojSG8 zP^Y@i-uv~6ikn`2S^`1+E#siRlB@k9smP%hwk;vd#}vGp;P8%tp$rvndhU<%sx`&`$B8ZMKKD`TEk+ z1Jb>3$xPoJdGxNH3@8tX+}V9_H%7y)9BC3@Hb<`56L9idZoiPibV^wNOsT9=*)}Gc z4`e0k9eTRzzzips(fwRE zY00SiIOn2sG9Ne%Z9T^RKVCx0*r`JX12d+KcEm#`hU`fj?r=agh7R{Qkd>x$7-T}_ z3OLyHD1P_r&344&~nZvoGM%eNz9M+8Zx|`=Mx~10kN}Bc-1I;C(8fWaAqs3g9RJ?IIl+E z?lsv+c($yJWa3Fi4$|~M3R~21Ar2&in=x$#4vKh|UJr3fN!k%sSA*LPD+~rnUjQUE zf|T^7T?&&aIi*Asj5k0k2HPl5k~~4~JW!swK}`Y%eOYDYcu8~+i7t}NKYJi25DD|o z*dQReHG8|~Ef24MuUHXNRo#+x4Xp2ym}+@;ilAeeatN@O>$F_CUdxyBCI;%~Z4j;3 z!T56a4&Gpb;fb8j1*3i(geZ2X)MP9uug7H6j)Fwk4neJhKflMU*27=WV=>q!KwR>3 zjoO+4iLf5)V_qG**{f&&>eXrg<<)C5yu2wq9KxN7=&B;iDj(w$$A*WK%qhofqoSnS zPz2t>!!4G?r0{SzOB=-g+eZWHZ4;* zS<6)>sF^BNxJDCh)Mn^(NrGN&gs{-3+1pujCQN?h?9>?ZAjp!tol}n_>Ag=h=4=fF zUUq8L(+m(g`b4|h8*W(cwP_#wXtFltqXbC=USfZ8P{<@VH?f_Sq~F`;C$h3^YS~Z< zLd4X*%jYXXyND%8T__y@MOAx+Qv{U+3&)dhSWFbyGr6XQC5Rb<_Bql8-DQswNQ0`p6RJn7+QnQXvg$Za- zNlTY5z2?emC2G720|iMex6PVgU0Tfx^9DPlohj6LE&6nH$i6&_pdHUt>&COy+G$+1 zZW>=LsF)g7U=4ah7`|L*f6f|AqafAvIj7Q*WLYQJ(bsLNkD7*h@$K>Nc(v2s@#?14c?A{S@1=65 zDn#dyC=jR*Qav&r$|^2RpmE7SC{eA0v9)pP`150tN)HR^bS`bNQkFmi%vRF{43}R{ z6-tuDqv%}uryS51GnPYJ2^!_ROVOET84T2=a6VnS<&sOJoTXUGOWu?$sK`NeDVMe= zk#t?Ue8P}ei`-4g5_Rwbvx2cqy53rFP32-?d1vk(m1ef| z;L#Z?Aoo1$OD;7961e$$gw!b}jH7$hsZChFRk+8HnGgo^YkMmkMk3JDRdHrF2Vj(Pky;;*0TcyZGW^lnZ4|xtygSU%nIqYY3BM$t8;Nlf&ekDHe&Uadu=~ zJY9+?izKt2yM(Bvl!+X+M2bfk5+R6Ub0G+aQqvifiF8Kw5>UZhqFE$8luBP(im~l_x(_*4rj$FPtI2nHmeOBFVRSW#LXJdLj~@?>JrX5}nM)KE z09Qk-%xF+j32-(2WtXJOIYYn8WV$seOpjZW^TR3fxpc<)SG(kriBxmQ1xk5vOF@b< zl*6i*4pK`%VYJy+Wu>NM;|t(n`XGxHl+ zU4qe|wp@Ub=937uc`D77hG}f0(Pa0lHMRs2(TD1xsd$`xp|hATfc)ea`Y_U{Q1B@q zW~N8~rz*8B3G$Pl3|HHRW2E`So~eTYqg7u%>D6kUghr)jyjt@!UY%L$W&Z)f!!M_C z0}6`%Y@?Zg6zdMk#h-VuSSl;giYugt)E|IGB0TDAYA_JsF%86UPeQh;Pt(HhFB==7jTXcFG z^NzvBzN2?=?-(5XJ1U#%9l<8NqjIRG*va?N*Q;{mLMP8Oub}y3jaV#$6E(11Rzid@mgRVws)5-oX_A6oD|zk)9#A@pgZ7FF zsqX+V+(?=%W+NRQzY>3GPF5=?7z{&1P}N2-ouu=|b2f~g-fn5;tb{ST$iI~KHF_I$ zBO2W_l;6W#*rR!*R29@y)L4qXATsakMD~4cBKN*7k$<1lj8zGuz-#b;h2jvcCOie* zVZTme8;1w)e*OJkt$4pzC$95q6W4iliI6#`B4eH&aj{f(1t)ca!K%b$OfKdl|k1+P%IYL4sLE#1SY6u|1m<+ zO*ANT4Wa@yUXGvB%5p|Lu2q6Y6FXWf@iyA5H<&FJGs&+yV`%Npy;D>J4@?>7-zzO@ zo$e;{JBhrQ<#rf+Np5ol+1V*}9~6rgsm)k@b^uEQ9dp!$FkXXGurPFBP2z|pwAhHf zSP}zuyeZCdBav85=*U3akzh!<6dp_`eq5*?fegjz6uQ3uSQm^&|GUfeJxsA}Da`1$ zk8H+5(1`@)1g!*D5j+kM4{c9=OMKOxSO^JT^7MbRt?!`~{oiiuTjz?D1bM~d+mrKq zX7)H}U!qnakOV(*(m;NiO?=Zmkch?L@45%{X}q|_P4=XY5w`nZ;^FPKZ@1--jk>pQU37lby1s}0yGw80iHpaVV~wV(d|=dG zF{OMUf3G;PyxV?;E@ZZAT5!|(8sM|iQ1vXLEZ4U|%vk|_F$`6XqZ->n4v^5YR zp7!w32g_GHd?4-6ux@|Pj@xd7Ep%~Yh0bTKSSqn##i64;84{Iz$PyH5KKkH^qYs@p zy6yy0tvJ*n#SVrgpO6Him-ekomLeeBjC)fvM<2q?9er?J--E{vbvh$9A6?hkw{Ei} zF}wNbgSYoR=mqx&`{a%rQ*Cn?R*FAL19yo&c(^1E0^wD=NH z>m6a@gHli@*7QCqQGvdF-S*sUSZDf{pdtrw7s2N_PD6$LN078ox3|K!rNYlh3w0Sq zh{Nfb>M8Rq@N{_Ad0zLhOm}axXObrsjsu+wx)6@f>h7)cw0oN2RB7G4S9q3su7MLk z-{D#7Sq-NK{gmfr&vS4P&giX>*VWpmK;#sS9B>6dD}JLy+(uz; z3oCD`e6;fKmA=YDm4Qk})%Yql%h%gjIj^z}jstyFZIzN>Yw9sstc;wtew4YRdrSU6OK#U*}J{! z^QzC_c!Ymf_3x^m;8X}_s}0p^IKjEIH>x_WItES+dSZ2E^%OYpc5YRWAvqAvwJ#;O z7oZg{S0Y}cu+0P~q=;oo#E69mn?_Iq(2BPy5tmTd^91in5o?u*!xUy*1Q-p_iccsJ zc@(yoU?st41P1`bm1Whowrc-qi7TTOt{ks6)r_f`SyNwgWzC&6PuIL#v%BU<4V$*R zcc5BZ!^3gT-M#i2v1SAukMOjbX*HAKRG^D$s%qSDLe}oyIW?EmEQC`dd|AycHJxx8 z(D&CoUh^=V7HM9odAnux7XqRI;EEEF zM`7~`u9YIzDiKdn*t-O~q=+Y!h?5jH;vzsAKr6naM0hCdW`YN#h_{u9jTE+<;Gh(- zMTy`qMpz8NWB?={l!!VCyOQ8xDPo@zafHH{EC^iL0b22}5|Ke+^#qp@+ykI$T2pJY z)%xS4YKq$hOD2~os{yQscQL_)hiXq?fqz0>R$W8g;<{Ck&OaXa zOx+80Khz$r<+6Hv1GTz36&w%RQ5Rb`5>5qreBJcAbT|QYab0y?Ih-2w+`3Ea7Qtyi z-%xjJ-HmWsYj5uZbx+hi0vE79PB*`a;Aemq_aAHkld=(3POuQ56(3U~ZlsQwwj~fSR{I7b~ z)jw7L7#x@ORqu24uh+i}$Af;WzN`M9a4OLMs^4D!F`R((iuAr3;osE%RR0~E2K2un z@&7BF7Bt&nXi&rHKwBH48iv8?K`T=I=wtiq9Fw30p-$3*P$y|YsF$=L)Js|r>Lo1* z^^z8ZdPxgHy@RwMC?f7Ih)CNnBj_afia=im7*0?~a3#S?g69anBsfYi(G74DEF`#< z;6;MX1V0g2$^nrC4Fq=)JW22&!G3}x1f~i=62VM@IRL7J?F}|hgMW-v31fo&XN=T; z8XBno+|wZT_4c@_|K#`FO8rMKTOU8$e?+DKpueCC$!E)E%<~(D^dW=XhmhSTavzdY zIvU3}7B|jqyrJ=d##bBPYy6<`jmC|QY})?b*v6E`1USyQzju1$ti~)j9&~kMYhweP z3iPFo*EKGN6F}eEcyHq>ICa+k-X|JgXnY0^^|!qt*hOxn8^536MSxb^r$qEp*fD}L zQp8~;Vw4AASp*({R{TYYxQfE=CU{Va2q+PIDeMG+P)TPP6v6p)cIrTmc%EP{ zfr*65Qvg&a{f)LS8vO}Uog^q7!_t)4l-<nEhf00;4y+N0IN#1 zyLlzl9xx9zL*UJSWp7V;ms*V%v@Z1pTh>mxziD&RktU&eMDy*M@9U^Fx`-R65c{%8{GBk6_%QF*bYNB2Zfh{!K9PLO>zG6$Fm~OpqRAA-Kl|I4FK))LJ#Z z1O`53O&TGvi<_ba&Ck$+R#^pniV>0pi0G;nSzmit`0z-p&Ekj{7R4KR9wx9qYQ44P zSTnPr)u(Bp#&U0qt+U0SD>atfp~8MGzT6hyiI$H?}}u<3yJNG1UC>oLjY++XnG(x zMqpV0uoJWq+(d9U03wAB?oB3&*}+6GKk~eK2X9jCwnPiNEjraMMu--mP>yw4QHeR< za!wnR`{sVjJ1kJ`mv_kSfU@76vkp1*UdCbYGErJD6A|I%`AB^EeB5h^e!y$dWzomA zoJ?#tWX3Ib<&ijGz9JJS8FQAuzGcHWdyZ^lSrHfvnp`$7GcTiT=8)xQn0!t*r|W7U zpqRJJY=G%!c9OK-$pI%l{SAO#7e29NrI&+2$o7Mtvo1cstrn-LK%BNOg!6qws!Y? z5^OyO+xXcdW*?8^oC$kPv+c9P;P|wJy<=vl%^nMi}lL3H%DwqRTM2UX730Q`5N z=nEL2u&9NAF#ssjQX;A->=uHD0ps*c6uX^qFgvL_VNiJo&kLVgc=e}zG{4=z^WVcP zz-N|deg~vQjUz}})If&T4@Ejn_+Xm*ttt~A!vibBs5YrqsYVxj4R)&4`yept^zzY* zAUt}B*MKiGmgpH&vC?)!=JGhXc9rT&&4-z9$dzWd=a?H&$#dqJC&B8r89U*EJgMTy zG&{C}{Jhi*b0Zo?BM?TwB~#rbCTgw)dZczEC#7m0DoBbn!*$xmIk&b?ZD)RO_m#I( z?cUdJ>umSeOSM}+q;{`rr`o-?-JdQA4NIel5UffeAPE8^MiB&lsr}9NP3^KpbvAAC z-mlsZxBnL$mo<6skL@ShkHO*DbYHvtNY;vvE0io0ytf@SyNeVEP%po`43fNmCHNP? z2?EXym`qSfumCVl%|Iswqi23#jHpE&ztdt8c4|!Oos8OH!q}R9D1oGVKh62p5FHNP z@_eRMjavJ!%rFQ5-;$VVA*<_Se&5PyPj6-PXSOoNY_CDr=Czm-yc!eL86!$v@eFj=C&AZ`9;`^RkTmJpHJAbB4rw>Q}{r$@Kl)2j;#yhxylB z--mOE=?~4d`RDknB&JuLWx9U>jf5K4c=d!WU(azZR$uimY4BG2j?US5dgL?ebQ@n3~XhDz*a_G#Ezf97V|t`G=4&H$pk?d zUkXo&Ae8>Or*iy+%LikSl0U~&S-bcu_vI8!8|8vS5&k$YRy+t3t{C)G<>y~M=%KXa zsVOWhY?3^c`SM0NYE;6i`4`Q9d>(V9B$mHnp1)+zmWO2ilvx?XzPV~>%w2+lPi*XU#LtpF;@rKl*sfa-8tLtvgGQD+)>#5@l=j*^^z`zPo*Yn-r|O8A^mR zNy^8iRVMf@j&itUzWvQMv4ZC`DsG8J;89P!8V@|y?$xNU3lS0XBO)A*42QB^;&6y> z&rj~#_uNMZ3ou(ekob#Q5HmWq?3p|RFVmqd#DNe8LL3NjAjE+X2SOYOaUjHj5C=jW z2yr09fe;5m90+kB#DNe8LL3NjAjE+X2SOYOaUjHjKX4!{JX|;2g6~d|!-mK?R zkmXQJu<>TGgw2>SqoN|W3|m%q6~mOenQ|s?RvlANTs@m%3X7U5^9@()3|AxF4CSNL z%#!+sMy5czR&74R{C8q5YJBjs4U4d989`@;Rk_yYtD4)UG0dE~fZ6k=F^2Z}DwWEb zwLR;#EM`X*eg1tn%WtGFf?ZjkWZ_#aKD5y%xqjoG?(Pc6Kxw#mhB>*F)woLffBn>z ziBE&;L3Ha?dS}+y>|e8(%{i2O`}+PF+eBTqKaw&tWhZC*+jkA9y8Lr?4d@cpbkKKE z{_;oQ?#bB&Ikh=Y=WNK)N(r5MN@Du>w`|9V0p6)4pAkNPbuSilSjEg7`W|o3k^G4| zF(>F(l(-{nF^0mFwN+*7`=01~(pAy-S5gJ96O*J9zQ`8ih!BzOR#LPJE%dGmXd#B` z_#x`ygPP$bHSt*5g-?f3bQW%OiVt!-ySCxuGgcKk;t>+L$1zGAclOc)j1#t~$nQ{# zQ|L&`2vX+9SJ<;5mY01nCO^bp+P{V0=kAZ7q4}p39vH;%W+I*%(?Z7D0FL ziEEPbSyWt`1IdrabFe_^Vddn%Q-=30jK>0{=NE$P257}sl<4my@4Je3^rH9*y#Tco z0gVB>6)VPU*fq>#MsULF^rx%=Ys3PaQw`I|sG(tjfNGXHA`lQr3k7z=c(2Ba-In6j zX!I&gVOCVGJ(nrT#WKCb+zWCitLQ)aN>FzjZi;pa^7vZ%(z*!ssIbE zKYS*a8hCb|?c-ekX~}Tf>D}GpE4j9RXR!EBm zPVerY`bBUp(5JcbDuhkBuA}r}TqUm_t-%UxmhGo%FuR1ou#*mrOD+3qclB%)lhMRn zDy4#4u?i*r(A#rs&-)^>*|TL+t~+mQ-u}Gj^Ipk&JCCcV>D`g{Mc!^WEHpxjj>L$b z>zvwc`*VG7r8%aGPv=p?8ZSOhNAUuzX2iO*ck^uT=J~289=)qSd^Jx9cSLP)DKVGH!m7ag2wuq=W3YD-^-?yVI~(2!IkbQ=J1@9G;#GL<#|Ywc5#h%z z6*%L?VY6^?rK4%ZDDtAQ$I(%Y3Hp-gNSF2CRQs0%rwOjj13UrXIg^SDn6T)N;f(^> z-R@^KddPd`_}DlzRq_NknDTx8STwl@W<5CT(OJg)fL&F9vV$QQp!j?g$`!zZ6SI><{j~WoIl-#P3Z#F+ zW()%Fk9M9Od(a%?+Tr`_=mRVICu}}QLxW36oD0_++&uutPNp7C&OJVgaRJ zm0yxSE1zi#mcBZ_CciPiD*t4_ey|V>OD-ByK{;~B5ey6FXw;bp7|yBz^Ullhzk5ue zuPi7mE_frKnN+Csl^yxiSLzFFr}F)0q`qEf0GYL4T?_vxr~ zk-Y`By#?oW5pJ-HoY_rPw;4RPFDnMTMzFkO3`Wj-OUPd`#->Kcs4ob1451XEQwYic zT5+Bdv6jN#B>0dbr1If;kX%S*Qj4i{q-*KRkmNN0^#UHf09G|rBVi0;NA?e_noNA; ze8R?(x#rwnxi?Txka|NzgcuPqY;^4C;loCaiWxp^#7O7xVbOwp_^>D;5_;uT4hN@F zF`T>q7Gc@6H zqnwx3SNKICbG%UQQr{Q$7yexMT_GB!xf*%p04Og!E>z55qqM@PO@Pzt)dTE#jZ!LB zYEeoN(^7IFp z_HtoF=$t}7P;^fb^Fona=*Nm4FM7J@`J#Y*!#rd)6)U%;zIkq;6LedFODz-gP>>rT&-T?YuO|flWG5X#EE7#n0`>NYl2Rq-Ywcp)$|C(D@ zR`{=?!C2*rLq~cA1DZ>a*5_eyHLSx*opWGF=X|VK?wofP%bhdW5s?QTWqoqz40cC^ zQRmbScFsN2IrrdtCr9*O)w|`+;*llymb_5%LCL<7>q>4YxwV8#yQ=q*l4nYufa9H4 z^}bQ^Udcu{6~ecb>?zp^hrWu8mA?97vHUn&Ttd}7Uc8i!N?%=7Vp~;mUSH)0`>J$T z)H0q0_whJ`si_MI`mz#i_7g;`RQd00BOGzFpB#%uvcN3C?MB(g{PMW}9 zU3z6HBbK2(-c)+L^f$>3l=5X-|9WZ_+49rwvr?2%JrS$j5+{qFlZRywQ(Z@jUz5)@ zv2UNW2#y5PapG2p8yuksj8xy#k?!x68W^uiuLWFFn`p4#QJZMOT3GT=tRu3h4&;3V z?*p`c-R1$6IHC+|XzgXeEPkfgoccuhgEi3cqNNZJdf|5cx(hAU<%ScjaYnlIb+<%uZ za)Q5R+jCvyE2r0ve$#e(&ETc?5mgu1W7-aoS04tK9@49c&zaOMca$s2{HE>CC0hTG zie`ey_oS=;_1<77k$Rh4jy(5M?ti*JbN}R4m%Gc?xw)*@dtY|H<$fKG2mLSicK63{ zs;6N>kS>gx zdrZ7>yYZ zs2$mTtQpUbT{(T6nI@gNeY{zxgYuC+mDzyftUe(VlhS}X6D>2Kxxi~sVHb*u7Zw$l zc!Y{lT9X@u30VJInXk&fe7H{kbk$20rV6H^QkhvLOY&4(Dr{91{${D=He;3b#0pzh z1xEM#I&ZmUjWV|1*LmZb+wbm_r&i6f1nC57*G(02qb#hDM{imFO?(4$CYC)ZkKRGi zHiT`(=xrPvy^ql7eZ>Dp@5$5sZ}f_PNBow;3Ww)5&l=C8o@YJlJ^%1*@%TJfd6sx? z@^EQy^d9y2JtyFJ&;gIGQbi85xzbS?4kv&fS(#873#SI1Qkh;k9!>*#dgZLjEI2Lb z;>v1h<|wa3n?|Y1@g`G%H z`gf|(tC|xr9kYMg40?DAz}JG2sgJ1mR%)_af(im4csEGx8>9{oQojsRfkDa;6rh(2 zjS>HlR8Y0}10AUhg}8?OD8a-wz#M|B3Hk`Q*?>rb9D+3jj}dee93#-Q17;Ak5?o2} z7lLmI1_-X31NfL=7hs&zrsV=Q9T(u);Tw3tvO!?OHVA@tgN}{fpcAYc46LxhAec5- zSo;QxFlvL1wQYc+oejJ$Y6EZJH$dmk2Ekz509ld^7DLPi-s0H6hmY7GShx*BxPF7q z60t!SK5_%zt~MCL)f+69VH+&rksE9l!vg6qAUOwFE6)dq{Aw0{gv*dVn;T2wkrP6B%zrt&=EcRN$JH0l`Oo|{6#QK{18)>y5pW=2%wxx6JVtlC~}|7I?# zFnM00G<}5$KNU>)1?P!IGX2J>b$SScDAQMnJUvx?VYR!OxuO~mJV_wsBk>=Q9*4Aq ztCWVeVVK@sTy1Yep5p`?9+fr&=J8R?b`l@bTh%)lHksZd*q6LEJ$8d4<#oANZ-pF5 zha&rvx!koPHg>exJW~3>2%IEcGOB3=eh}Nq&oi0L&L(M_s>DV$Iq*|r&E`nyr^G74 zJ~$V8e1bkulI%}?N*zQ{Xe*Z9)~7=y0aIQh&(d>i@@k5pmmpwYjT^IX0{qDvv;`w{ z0PnlTKfLeiRKmSkch=li!>p?T_gB}ft+Ah30QEU73u7zvDh7i;gTWu~DHAmUGm+tp zYP>w)FC_@!a3{AiD(r$HJYb~EdTTzbVVt$dY+p@ut=9hmO{|h3dc4o|QQw#SqjvhX zr;3;QY)#u(6a9bSnuAB!(S49cG>AyMRUBR$94}6z2=HaMKnNG zU!@m9omZuja{0CP=UQf<)@4I3DA#Yb_MR-*ha7S;i<3=%e)6Qclsaa5ohwW}Ilayv z2%ao=4_x_rhSkH~?4Mlu^12J_nA_x&yRWKSUT2?>4P^}v5PU?S%aIErzuroDaVDv% zr5wr5>fpV=Y~>vdtLpz*$INW-?X05-=GuDOE%p9l=`me=Rv1bgSMSTH_sy;MPZ}y; z$PUUE4hpyG6yesovq2DV1%HqAv<0OQ1zB)P#d119rxyNqGOv?{N-Yj>5Pkim8-JMd zJ$t(GcYDv*!M`py)*r7QsMj`dSrhk$HH>Jm!|~3Ed&P#a4P)R`2v2L6)-V|k&u6lR z=^P;*tVfe|X;50YnGno7o!FqyS1R9cmivld?mFWe{G=IQo)cA{iSN3-T z6jS3-e^|&=;m`J)f5}vvAhDP@Gh7$23NzJV0jqkZSsk!yl!rRmZk{77U+%v2YNKv> z8M}13-e_XkrD`@}7;VGZLfH zHAtbmDU|Jdha}VbUh_p}VAzvQ4?{J}nxM8an{}0M{%}`k-vRN~4_zE}p!rjL@fkP? zR!d)#3P^uILllxS)gl}5aT4fX-+#l7{xRG7leb}tn?#Vf4I*xF+wk5QzfH2R3WKU@ zt=Z&@jTArLVtc+BhEv6->0ICY)9_trB#a*q@QK4Ev#8?U=G$Q6GBO$FR?%BM&9br7 zcu6|}TY*PM0^qjQ4|c3w-LdNSyYF=0w0hO*`|ewL|6T62YdUXU*>Tg#yYX4Xec#&E z_jJIv>CLy_eQU+n&EGVC*K9AL^WP)*4j|pbQzQ&Ojd1My1giOuSZaW;mS*XXuTf44~{=t75hI?&*3A|0@PnTR5tz%Fhk+RLjZe@5f-W zyMjT_4hH?3oiHlB} zOk2`)1OTGB=;<778PnA;&7o1Vfb#>O|2sMdy^Nh157B0|;R1Ko7AL`xuL z@P8M8Ort4}2<*c_fmtkg8XfJB@az>cqKC;DDwt6(GnwP)e3Onhnp6UISPA_<-7TDv zHJd40%J)wf#V-TiK1sw!KH0ZMc&mXt{$+@tRd{NQnTK`LQ}bMTxp{?oWqI}v5~qEa z;1EGv4Im%D@-{t-75;2M7slSh2+6i^*mfCV)MM59BrD8*@Fs%|iVz|peDSHU0xSNp z8z2A?hFjup_skJO?oGLXfr-{`E+n9!xgUseImKOcfHi|XUA%5meEZ&SD z%50!)gc0UZ0&F7d^b7L$&H8s9lP?L4>t^}K4%!qLD@iR`X3d@T&sqL?5cup8TW7%% z#15$OKhlLoVP?+tHAL%0#Jxp^Ay}7I%{X=BKk4Gs#-L2z63H4sP$Ulme0^_p3l_E6 zBFjMytY!Cbp;5zKnDD2 zBsb`qq6m+XNFOBnVc|eNWB;t|e64gt5Nw-4S_B-^#S7@Dh%QaYw`Jr*bjkH^SoQM{ z>m7IAgT^^&gppOUR@Zsn&CKI z7?#14h|Ml;npejwH9NbhU9Q&cKGRZwWwGK<`L_M}{uF85a*AREEUaKe z!I*;MajbKGZ(6~$g2`}P+Wg*`1w{pUa6H1@1@#40a9E4{Q@*k~{I@|$P^9Ir#qHYf zCwPWn4?#ZxTMvjL7*9|Hkl1n$8ul7S6{&$flI#;gB*`S@oKQ#FAX}7sLYpaAu|j#| zP)-f@fk9494KK$A4(QDlXx!m;4Qm5cY4%8cfWkb)si|&rX=zz0aZ0j)a~`L*6D4fbFEH11r3>uj2cr+;<((cwBBV=UmwPebFyPN8tFhg}q#{u~-AALU?p>e6bTw z06nSLRXi0gV6O*HwIXy1Y#UE~_X*X*;6>I3p1&y`4~U;Ge$zOIYxI!cn)hV9QeBSqvmFr=O_ zOv@)@e1(Q4D>O8%?^l1&Kix-bzXz~{T#i0#9!U0oTXLl2R0;La+ET8RO16fL81oq1P>EzCHR)$2LiTPY7$}WeO4WFKO;n<-=aTd;T6K7E^Mj9z7Im;Kw7N^vE2YN;9s;0BHEd&LMLAkPIvyA0 z>7}LR_Hue$q?f0cd*sJOd3t5ABd1Aif#wAAhADxwe5P9{V@|rMRTQ{wqs#nhQmaS{ zwu-btdFBhsYRhgd6KDH+Zk21=Q3iuga`lF9mjsu6ZRATqO}yFzGhC9_U+zwvqZ7eDinFBm3*Y^x`*V$T_no zgI3-{OF#j1kCi8HbXt=C;WQ@KwjmORtEQ!o9zELeolzI=Ht3_>21BgdV2pL^jfrlZ zA;vr1`-c=wTKF5D&NOF5d8a@+(CwZ!KpYFUQRKp7Q(4A1=2q&WCCaA3Kz%~&I|3=&TroXWtlW}ZzZ!BRHatKqQoiaN8vR@O+8O%P>ru#sH6 zhJ{3Hgu!kwgy}#HvyB1j3|b&It$~J|lj|YWgBF~$&7a}RJVzde0$7d_dB%6!v=QucZW51<$Nx!w% z_d|vFY6VHq{5ToOpL2@h8|3v{dWR_Y*hoR*(-0VexS;qR`MT|UJdm_)s07?YuoZx7 zuJ7BIJP`QkU{J#K<1I(`v58bx+oe8|+u0YGbinbI-`YzF9#8d+nSx8niMx4+4f@4A zCJ*z4hsJ>%kIm`vJEU>Ip-hVwdM@!?>*@5!6Qj31?|L?Swt9LzJ3PBRT-GnWcY5yk z+ylphe%SN0=W#fd^_Sk~JsUi)zy<6hbIG1!jv}Zpx(BJoAZ2er68migPZ4Y(_&0$e z4={zGp5Ph+FM)m*po(B6!B&Fse855guVz>-mEri*R0}&H)r#GQJ&c{8PITy;R=q9C z;7}Pa2tzA2YgMUGi^rt0^b3f)(!_`nP@iCui8Hw@PkSWr9Dp@@7V`C4O{G`O^>{7upLwlNVsmygTTN#@K}rb= zgJuk63%6Q`w3!{yTXXJaGFu@Rs5p*`7{(7r*m?OP;C~ioHyI3+W|t@_gH_p9Hl>K1L)fAXS=cT`AxU#X0gB+$p<5tThz znS?^*n{x^_W3_{~nW}ww>ty?pF^%Z~ZJahfK&mX`ojMX;+wC$s*!6vPQx;qPHc5W6 z`G!~1Tvf`}nM4;D`Uc4c-yk`>LGpNmL~7)O3&@Yom#Qd0(oV=rPtIWJBsf>CaQ$wRkP$`X2W7F5* zy_cRHk09D!=LXzJ@D{+RGw7Iw1{1f?U{ftL3{x*OL~0irM(P);IBlDeW7}16%zQLT z12mAaoHh}!CHaYp~tpH4IzhHAJrU8b(g>s<46S?VMsL9+S$lpmu!ixLRfcN%U73 z)x2H1h!0mU;w`F0yn$Q9YnVksw62X|MtOPr2&lG*f{F_VR9_7D@|wwBf&Pmcx}mq7 zEg|l9XeXOwI=5g(lSbcO=dFFUmKiI_yYH;EZLam(r2*Qm4AA`$?>}DqTWwgKDlO2< z*O}_Ha02KNbz|y8xPblka@6lX3BCYm#htamHzPv@!Y&}l0%*mrl!z-RY&F3%fYF@V z#I$R$GlCJ88+WqdCQ^r?v5+>ma4i&A_26go4F~M#0sF=98 zII7rDF-Zw3l?CIfGzBoCbmH2@RHLw)_LN@(f* zxoaS%|7e%fr2N%}vFYb7*LU)NebA6O@Ll3>7(^(mPw48e(y0Yi;EJi*X@k-1YLG1i zodk~ojIdFzoz1cM|D5I7anNP5lQnrYOxpO=2@^F2gJzt;07V!38}Dhjwt<-~N!UNz zV7sHiua(-dR%yq38u}Xg8;&;=G?q4c8V4F`AwA#J$U23+hQ?uyRyZzA*c;Ut*BArG zBRr{bV&gbC73e9AIgOccm}x)Tpv<&iAEe$Jq`HHYy|>z_bHz5k4FIE>VYoI%&$lrVsy00%wCVNgHhqMq zjWJlEZR6AIW2{w+#*=f5Q-$G}+pSewY?yWQ7)+X|0ann5snEc*7N}X%OtC<^Uu(i& zXS;Nn;h2ovxx;FU9N-KvLd;+$qK8I>h#Ie+Y4qy#ZC-tZPLFOB1cL!|5Y*|Q&jLJu z-2Nx$qEfqZFKQ}jV(xCnLo}#UdS#PsUXx!ZRjp2`+BcgvHFY=bYWk|_c-*f|>gMBd z!AUm$dWidc~3}QtKywlPq8tIw_5U! zQ@qbh-b}^2Px6*3UZDZCK8B!{U>U(*2>wB^mEbf%QX?RfpoQQDf>i*cQQ(-_0*~Fu z&K6AAhjX(9=%=!9{A>%4-Kd&vF<~Dr%(mEt*^CJv3h)Ydj8D~~(d6u5t!OU0a*qjW zYA|^{Mk}5c0S%K7_pm@y~1$p_N876hn?^6T8!9DE4`NC*zHnFxU8k7g}J7cW^F55Y>Qg_ zNm3g~Qrdv8rMKlk%MUFlS^_OswCY-wKU#HrhqpRgqv5zT-QM`t)YfD;-l^L=snyjw z6;1^@x3#Rb5KaJH+1lJ%2d75*_STDA7r;@wXc=r5gVbLJspki&zYkJfLCXGOBZh*c z;83uIs^nJ!TN7X+K_$T=f`jAeNw#po8Ecf-MAW3qT|&1sL@LrhocxPxf~jw|C*xeA6UKm&4lxl~(N z#I0>twq4f7ESAzlLUANFE+(Fl@zQ_>Ta+|MWLV|5fg5r+=_7nzMFJ z!W>CMQkQ6(BmaX{2dH?+IQY3z zzTltbL$8r4Bvjtg(&pOI=ANrqQF_x8kmk!dW9E*XJ8f>&+{trQSs8ot=DOz=!3k*@ zdt2r%oI3|j))9622im!!Z7v>m`0GucDGnze73~OAkc#BNByj{C>3R658!Cq8mW!C_ zU0n_`yaJF)a1BAE2QVH0m5p=c2nk|MS%5ee|x>j*BAB9_rbTrUP6#E&4% zq+)bzKVxEkBz3YJ&ws`UW64|qzFFfxNX~B3<1^tw&Jm#@)lo?f6TYU;I+S>NE2A6O z%9tD&L9||u7h}cPQL!UqN5@T_Fn;{_N#?{j^Te?5;ggAov)atb5`jM~WWvnLLjSAR%DL-Q_po-vDf)5Bz6O73NDbvhyU(##{WTkm zSJ;K{*^VXZ%L2@bz%4i4ar4?+o?X@b(279YlO3C8Z(6u1abx1fq>afN{ldT*^_fFw zsz?5Pl2a2gjZ3er6ue{s;37Gv}6n>A%4JuVCI~ zKj*$t9cFs0k2zggADy__|LV2-Up`s=Z*6ZXswcfNJ5lkb|4 z-KX9kxu5tHbU47H-1olDeY1aG_d9#(xsK8j$LJ(Vp0LTeDe<)gIOnFBn*v=wo{2ay z!gL%?b>{S$0PJa;yFrqQGn->Zq))n}y(#CX8(q$Gom3X-65hZJD%*@L3vS#3cX&(S z@QT2Uj!rp0O7dshKiAjo?>N$NVrGBKuN^;}>Fs>$#M`{7N82c9_9vBa!hNXNcF z=P9O-=|l!6Hvisr?VR;5*XI4y`RPsH-*~9wx0nG@ydo?jNpCe~FpJtY%u6cbF<>46~ehk;#sD z{-T;2p4wWs@aI5F$BT)(Pd~M%=$rrAQ}g4GE8eT8`&hd4gAexY>+Zh(dWN}?Ve+yP zW34D#EE92~R$_Hv#$ngN1<%fVmRZ-cY2nv1e;W1s$lqOuFWUdFO*aO%tXS~gjD7F_ zzWngX{oij2yj0Wn&(xNO#+J9NANA|$A11EP-hb7R6(=(LnbvLY^{%hdC+4>JsOa)WJz!(aX2*)s|#=JlK)hnLA)^TmA zYjn&A-aNs@O;hXBjp>dVeZ*AM+0g#?a%ztK#hhC1S!1K|Zx)Xxxv!?HKWlf^MQOXI zEc*8YeRTgGPgB$W{SRPcnDv^{DI2Yxw0C9~Uwz`D72_Z1y6B2`CPg$Rr961UE2o!! zDK$H0>(&>sef;rVcS(NknP*;o_2Z9Ue)(^IljHBWEk-^#jvkeXQ$c@+)ZaT) zD})t72j9UANbP^Xx#GzcPY!eqFee&cI&tFbivycFS~or0+N619pm)WQf#n1K(^van zxO!h7#GV9oxA3C#@vzbzDf6(NOzMgNc|6$t+r^9Ddb8z=N4}bW=+k8{oS-qLw%DC> zQU0XM94Kw)YjoEg9Ui7qYTx`={w1D26Sy$iH@#@)TNYdxH%`B$nVhrl6VLjQnn9l>3fx#Kgo{V`5GPQ=W31I(15W>Xcre zm{d|y5`!h#F;P)b<&X#*J(WP(rj8b1^n2KFyFGr4!RU^P9-+}_b#}WWlFp;_5rbRu z*ocT}(`R5)!6}<9xD^&>JNiLBP z^*?75)Kyi(ri6t_JIYywEiAZEK2=p(U0B$ZNZP5~S+JE^;i>Q_$M`XNy(Km_)&d5& zalP2onefHN!mFq2(|y7lV=(GtqDMrPCyz}YJ8k;3>1U60*AWqlpC}4Z{AZ8c!qrx3Jrh{K*^XSnvHKSqTQa(~OQGF@*GZEVa)QPf_AKq$Z5BlMiw^Hz{5&WXP zS>jh!S^7OMHTkSxrf^quzk}O39)u2UPZ^VD%sAV=A>oSp z9?EZ`v$8K3SK-NYWo4(NRCrQS6h5b;SxJc=NlVcF^k{!r>&Q*TeRB$b(0*g7-Yl_l|D^Ux^`_Uy%Kdp1%Z^g&2uBhy z9m=!hu_-CjrVr(cOrH%udnXx_Dm;UX4H84^S44Xl+Fr<;03HtAr%pA+4c+Ba&bBYg zV`zIBdTx3K6wC}cAMI_DQgWq~DX=#$-;sPg*GH+9aHStBsTIF`RPt4hNIouuSX#~CxyGr)i9 zZ-f17C{1x^M-F)ep_WT6`+{*<*_o~ikCLBqzh{r<@=4(XnnCr@T^VdAu9!55azcLkya`^gN>D#EJ5Fs*H!hW;ZzAp6!ovjVSFvIV$&e_Nb)GlAZ%f zKPoJm6o=>2B#eF1hCXBuJ_n@o#QfIr zO<+|Z_1LCkG+o68m1&xhBLl+%F?776n={+jCi4M^@G+o~*1+ zrmJ&y*A-ohy5?og$!gD{N#xK?&hIQf=Uj*pX{K{#>XOv=l3i23RecNLyVI)E$44Ar zasQbSOhEmc`Zt*a-~9X`9x= zJ^AD&+Mjr$v-8ZaaGDc=GaAjAz;7(OscTbU)4}%+K6`M}8BkqkFgHDu5D$lA;0#PZ zcLbK~=m?yukdFaoAYe8O1T1>_*wN96x@q7#5D$8FjX)$ zgDVboeBf-(M0Meg>4;VsxF>Mx=+8Uwiol)$BiO*PK#b*ANMb5}nLpGjH}${M|6>38 z{!RW(NQb+6=*&Y8z|kEd_WvU9UBIKNt_9$8GBcUUb7n|F-kF&sW|B;1 z|7)E+E9cChrT6Q--}nFDzxV9fXYKb|`*HT(XYI8Qam@gGW(T(oTtiAK=8^H{MI^il zE#LAv9bb zT8o;g-TkbeL7VEiu)Dpb)!E|2@b&?w-Kpu-uBux7*o( zTAdX4!0lJsr#YLieEqlWE)f>(0V;iXWKwuoNnTmLt)s(c>*!mvYweod`|n&;RcD&Exjz`}FYZ``;eFZ`M90r$?LO zO%JTv@yt-W{fALek9nMS7L(7;H5@$TX?kJ;Q~>#%iT(`iyD%)g_f z*tK!p`v+0qZ2We_RHq6t!WzStbq_xKT~&hr_^s1LCPXIu=>EU${oc}h=Zq^gn`_oA zTgTdt{Q1*WThn{Hk-zNd8fFadjz|b30 zK8u$cJ8$yRzheCE#Suy#zkkz=Bh<~_k4;Ss^+^BeJ6qSrtVfQ9=uV%ubqIq0_zhE| zC9vbvD3pMX5d_Z@A3gE@!Hw&RT^$fw5dPEgyK~vxW43On7duDtYVcPf0Yd@srr|L5 za|39WrDnlcdH><~{nM5A)vQ}oHo+92S7~8zdRP5yXh|fXW9#eavBA50)Ba7)O+ba_ zmX=prT3VPZ`V7p&1h#I&gHs+~~4tsY)cXvYr{5NzqA%ujsZnJmTd+h9l{ReC!Gci?wN9ECaSiR?ERtty% z%94WjUo*}xRDd&T`-9AlbwPM{BOS0lP&G9@-Sjkkm>^hk#CNs82=5`J1Nz@&en;;? zvT1bkz89r847#Pmdods0i`WKHQ8;`bhU>XbG9{VdeU=LE!wKY%Z#jIQ#DN@Qe4mJ- zuZw?pK}dtQQNdVIM3ZFlc^Lvg>C*c!KvkHJ?`?9=pTytW1PelLo*>{G^P83YJ}k^n zGRg15{7L+MCl zF02X#e$G9egq2hL1nCjs_T=(D2r-QVk7pgL7==x1MXWbSu_#?81*$ zNnHW{POw%mvZ`ZktPVh0Jkk?QUKv}jDpe)od|06{zBB=1ubk_wIJcv5iJT&TlFQHW zSghNnYtXfatO#ijX$WrD4*&u2r2*4fT#f=QeAja@p0i>5uywgL(O&1QvnsJi+6}_k zj0XEM!gm$zES{I}x@kel&q}77TJ+a1eV!2Jy5I_Ok8+=N1@~=mZ*px_%(5VFX(2*$ zbi$k4h(n?(Or-(5`9H4(`e&>pbzN%Xl5;y|RqWXD5nxX~WHXmu$8^l)JkM6MUG~*C zThGD!9_pZ_xn&#I@ID6$-@bk7i{cwXllaEX<^xjt9;bV+dyl7exYg}HA7G|Fe0`aQ zquFQ{zXO3`}d-(An)x`s6DKV;Z5?0`99560yjnNUH>->{w& zVNRu1dvsR}*An_o{U(Q_u`xDQqur{qtMVgykNeLD{0aU$xAUB{&&l?m1DmgxeO9bk zL)>6Yd?$$itLwS;<~^JDKeA`b{zsf!oepe2DzU9jYmu2|32sSl2<=lcKlYge7vDlAmBhu0>(8n!O)U_O35 ztm_zD^UB(v>^^XJJZ@-|%`p9}WO9 zX;?tp&fpE--Pf?D8#T@+;SE2e9}FKt%^JWLG{boSjA?Apqxu{)!+8Mo>I`GJqI={NPG&{_YL@)`V<kPFhaxl#c)WA}u{V z6ZXOJTiB$M$&;tx`xn>xwB9!wE31q~U69c@ZMxAI6I)p|bCxb>=B#PcXU>X=U9yzu z!B_X9SW`1|7MjqonX?iS@tG^4C;115%$yY$FZ-kL1=wy)l*0#yBqYYgr)5^pNKRR_ zI5}nJta0OK&YC?tXIWCx%vls4;JFA>{d}9Px6GVn8oOjE(MJyozTleVm|6NIOS1t^ zOP@Kbu!u}L&j(+RCZDOqe)xR>f2(P3G*`8BuAO#r1suh4RnMGa5_FFtq@c5d>IJx^)YE+auAF z>KWr$^NmJ1Uy5loq7=qLn8PUz#V5Kc={0j!wh7~qAKDs??~Y1kRb`bfNEbA1`n2gW zu`#if8@4mtPg3Tkd`^S;sF<)-#Fb5=UkR}s_~8Q&H_ zWuy6XT4qg+lAbj+SdxsW=xn)>9r}}ju;3xh}dwVSVY45xHce_6Mq-4se z?xT(C*iYYo;wszXV2z(1bANJos@ts=2L^(I2ITlap=X3oDyDvRTB#q|{P?!#ou76% zoUpQWY;~NOe(go~AKfqanO&gWW-aS27@Ge2-2ScoTd!{IYj&}rzyWw8p&o#_1n_57 zGy!`St0)03rKf>6#!mrBU@a367HTl*&4Q_HXvSP;Gt20%Zr%)9=h*;hz*<0rZ$GGA zmm-Hf!4ETb4rWldsIYv*XQ7PlSP1B0wY$bf6Mk13-)TP<&4m zgC=RVsJ<(D`?v7PFQ2`(&Yb`WHQ76?Ev66HmM5-Wed1mF)puP|9l6x-xi0`FT^5*o z)%3AjLH+p01qH>$i3wY`PCw!;2o(r>w2u-q#g}kSF86nlg?o~|ns8~trQ1Ha?Gq2P zTE5djI(-ty3s95rbils=WEo_G`d}8Umo(UeEC93{X=q}_%lxvGC2GiJ_Ow76t8xy#`LR0b4Oa( zu46EnEy*bbmgMm`hm4#ze?jV)wDbuR3yUhNs;cmNc}8YNX7QxrNdQVPu;JvFm6qjK z&ADZ6-SQ<%sT^ce{$ww#hy9!yv4-qrehRlS4ab|}Q93@29e~S6Jp0%_&yoEwf~>UbL7pWvHW=T~4)ox9xT)#Dw`kbQ z9#NZ6ZQQhR!~q|yprJ>onBL6{WvAA?vGS9C{raz5+KytO0|rK&5Z&8%aIUFGl>mce z5A1cH$M78t##`OGO=VL9r`&9R;AZRR3rQcmdg<8@cJ&lEIuLhEUuyhhi=M*4Tdw3^ zGkrFt$Nubd%wfNy{{F4k@?FzE(R%(29J%;vaX2^b*}U6v&~Xr97@LO0_2L1sv^)`U zmNjFitV+$;_Oq^yJYc&~Jp93i6xOt6mPRG5i7F zdS-XZ&^4*hyopF?oamTb5T^T^nt`?+?#>64d=z`r{$>@RPw7d8gB*#U<#kuHyO}-H z|CH;QYfri2uendMXm>Qb*zDc_h277r7uk91d3JKZdWdPE-+gHsunw>fd%rM!*#1TH z2krUhd|2@!KS*)DHN#qbO??ff-kcxA9qCSx3u7{wA*>9$Txtm0-Ey?=+@7n?4m@|Q z`K#uEW~mmv_~COyHEMhH`s#5dp&-$e{Ba)>X+1a!wP#f0s4XQ0eH|UNzv&If><*`` z+uUn7nX#{O{evEy=tv}_bjSv0>4$ScjT*kc8S>2yHYd)!Y%S(vhV!~>>cIfyoWNkR z#xekp`vI<5Bf@BSh#S9`A-9E6yPx{eQfsLy90Vdu)3Exr@pl&$$46>IMQKhxq`9g; zmw0qi^L_aPa|fCStY7@sNACR{YaBf=LOHN34%DJU<%eeWR7gWs2un`nG17Fs4|3DxPq035GI&Gte@qDH12{C`KeToM zF62NG!B`AG>4DpfRp4m?KV<^WViRx{n@rg`CexIXuyB(JUW2Bk%W$=SqmuSRfCt+Q zyvzmZ8JP$NgNXydd|49<3nhPpL7SFljxH=LNJm%~6l{ozjT@7ZnKiMhsCbeIWR+6N zli@uoZ7g^l04##X8uBlmG`UI)P=??>(?CrJmG7r0p1)mMhS-5?^~{;oHk)yd&1M0! zbmq(%rcpNAjAWbbmStcjfT|ojZk(ySq5{)Eczk7L7ye9hXU#?@0D-G( z-u&6K=1UqDB)eht92Ex@;-L=W02q6`*qS42H!^(C}2f^#`2#T*34vfAJEf zk#nawXy-!tmP+O0@u<8Mw;s}2v`m=}e>NC+3BEa1OnD@|JV<_|RZ@O(8FK3vFG2jc zOMTwrC5u32^+^1@+`L80`YO`Tqmpo& z@YE7oPg_N#e_Y{t^$a3X*Hvv|r%JXimFrLsCGPH4zSZSJJ z6|d9-T3_9!TApxl^?LKy%a;G}!aXP2S{?VSX)Ru!@uy`~?w1?urS+F`z2LtdgZ19v zg}tqV?St*C_4+G=jMX)uzTVJ3yrZGciG!P0vAR}V9V!QOKKkL@BKHNck}M2@ckcH|8zK8o@{=u zsoC-AA(%Kc!*Hpc$NoJ1zD;fQb?pP}4Yr&8fYsagSyxzhBrVXldKP$Ib>HJ2bl>A@ zx&O^R|NS2S^jT?8V_-1D}z0G*mesvU7On!@t>}Q8nr7oNe}hu=Q&N zzw>VX=W}rW(&~8J(E@KmR5*Y6nOFzeMoC+95B53SZR{TVK2t+@n+PJB{gnTCH`e6& z)8OB(v|nrfY+n!iqWPak ze`UPe_QwxiJoo&mLmh`~U$5T&o4|yqJ4SEGc(id{RVAKpYb~c)0hX^^`u6L9x1RuW zK?y0vpM;d+59_OW>-NptH+LVk_L%VXrXA>yjgE~T>UV2h?B6`^_Ih^1zkl9sd+GAM zbly$bckuaU=fBuZ&PO#i9jN#iwhGV1e4Kiqq7h!jIETPL4pX}aH~g`iofo^=c`EPm zsu2r_UMaNR@x+9gugyH3vkEwdd=;Me$i+WN<)$FNJ&5T|Bpc>uxyth%v~DE(X6I*8 zl6=p9YLnHXzb_9?1mwNXGws5BU_mkKI7>QIdl#%=KHF=e3c5#m^76tBQp%H zU(xDvQ=(&1a&vN0QhdXQf#RWgjIgkb%&5_NJ=`52nW)j>;rLyKs}Q(hI6gs!^!j+X zeHggfMq-4A!^LsB6v!evtd+jN=9Z%Zq(?M zl!CE_Q7HiBrT~;%Fg7KH%7ZqZIY6Aq4Pk0|cyK2#pCGikOIVn)`~_p9Mu&wF{sm*h z!>Mgdnp{*gr9}STaN~I`3Q0CUzvYh);Yl{N8@WaDCvvCyBwMa8?t*Q?PhmS7Q4^un zr@|j^#qdR|tgNiEw6v5AfaMCX65uj`zg1B@vLPTnN;d9WDOFAiHalz%WJ3++WMt-G z4d!5d=3wpSM2*gY+D#d04cIdB@{txqLGD6`nJtl#dHDpP&0SO_orVs}=Jy8k-xYK49=*Z5cjpEQK@;(cu)Ytk ze*7WWs-sJvISTgL&W}HS02BUX;v{K#eEF5GF9Ce_-LCrz(7pHNcQ1h@mi#yows!6D%VgZtR{OK`YB zV0WG0x>+A%ut#sdYfW>H03Qke^>GT0pP^TQC(Ouj8|lrxPWIXbaECg_JyB%zh25rR zw#nJi+~R<6Nh5o|FXl-LAq(B`N6%_E#KA z79jjorrh2z|JgQ+|eO@=u%FHC0u~gS_a3< zOx(Vwn_cl9FS`Q#<^SsV)y=k}lx+#0m2C;1Zzir`WqwQQ%Iuz%@U_&A6`;8-aDwKS zfq}reBykrb@=j;RF{cwgMgx8BdP)ObN@S6_WhVXgn%Cz3C2L3o=%Sy*rAzVGOb*Rjmg=*=jA>wjrmvIw zO@%I(7CFIT^VZ$3_WbBqz(9{Z2=>q5`&P)=5KYJqFq$EB!IY`f@CGqgH5ObEUN;}g2bFva9Hx!)|F z?9bDubjjvSI?A+fbU|NAM-Itdh+c4Ed~j@BY+O)qWMpg{e17xV@{{bMq^TT_#}6pR z<4eRmWHd%b1{6m|;%C0(6!^gP4eTgtHHISN3mJ{Xwu0>r%TE5Z=pcV86X8QJ#Us4^ z-OU!W1zEGnziOIBvk;UFXJ##27#2?3Lga2VhJ+f8@d*S66f2pQ(3QKS;&mv{*eW$u z(`q4I0Mh}S2>DD0upay-Dh+KjQMzQ4yUAoUDvd8>GEq6?R^aQR%0>l3M7(xRE`A_| ziK5q*oZ&AgH#<8oA0hb(p+$=qFX8Qk*EhwZPy|yv8OGS;iZ;*JR-T<*Gf#GxpL~5N zJWmBf*~;_sYvvJsfCrD6 z^uFb%bTGwliideBl|-kB23Xn{jdSKG>5-ZSDHyEQQlJO=@OmJ+kWKDsfUQhbsF^ud zD;mm+`mbDH%Jjxel>NE;>^Z6Fv*!@KI3}1D_myo*AD9dY125gV50#73U%G7hio&A0 z27)uEOv$=s(xkZ)rcRhTf5H3(lwM|5W>#1@*NI7qNh9u4rc8nGAc}*lDOpD2q`5{T z_8)RXo5oLi|A0TR*2>B^G`jN|O-<8J#P(P{BNf;M34gS?qIwS~Hd{tT;Bi-E<}@13 zmVn}dvGNEFuTUSg8Fr(R1tV+;s)aXTYY<-94%G(t!)qVYZC$(By%Auskp$n?0LvD zEDk~8hG6E(4Wf&5BzvUccpK0|5a%J!CgzeR@Nl|SipQ6DzD#NS23EcI zt6OKj`HPE3LA*qRJ^RyDVIRKm*CsArVz9Q>D}KQmQ4&;=Zn9~;;uqXHx53@xitPCk za3lO4@?3w|;W+ivxktBd{Y~>%cDHFrb?@eVmH$k>Z0y$!sY~BDSpNEV+P_1_X@A}> z)i~C=S7V*N;CQd&t&WY3Hyno?Fk@!so}L~&e(yTJZx<6>Os&-dzmL1$6wRWX9p3h_ z`A6^l^M!qtln&Xu4j$OGch?_VcI|RvPqjbvXd>KYx?VHf1?xi~pwsl@l}`5i9yHjO zlafxIaJRYuJm!F{IUO}9jE_tW zsE`2y#RWi~Yzzb05FjA}OVDfRHL|3htiwMzy5hsReb#iy4rrFZY$ zh2kfiuRJdapSa2rqfz|CaDRUy3ZFQN_3xu_b)r;=Q`digwB!6!e|=3_sz9E9nDhFK zKg{{Xo!B2?`NJ@Q=bv|?h7x0I+{(0DwfAn_3b^@+zkvB9_Gu0LH1H2$UxYw-_#CkZ zkO4=P+r1Gw12$>qFD?UC=-{~Nfb$`V{;<~a6_zSsQMB!dp;u$_AQ@$3KS2tI zVL^S{ak-lvCj)$alq$oJ839HNF=QI!4Vf8}r(|TzoRv{Md(MpNz|k|r5HZ9UZ;U4! zxUPedO;3i^nwZ$gD1wV2fUmzVoH}Mw$b^X{@oDLWAz9gR@fo0QnF~zkb7s$pPK-{Z zbVRs&8K&C_1c!!-AqfdaDLlp@_hrj7GFCLmFwO7j_y>g}8?XzQm60)Oj&};jbXUWnfOKC1zW-YT)I=1risWtQFEdVye>9uur_2f?JkbkkxkO}09A$LfB zaR$)4FeF?b7oTJzcYj;PKWLF3{k`<9m}ZQhzmW3rF9()8Qb8w#5jU)1Ff$FA)w96_ zsx`&B$SAo!mn;=SVq@g`Ub0lDi;Y2lo*y+HN)H=7YO35Q##24k_xVl4!yvy`tMDXjSwAJT3(bJ9w*_MB0V=|13j4rX)LbNuw37tf z(j*%M#(!W{MD2vP;4ZONR2q-q7F4*=?5E4zqOVr& zf8%qOBg)6%8;3Ek#2_a&6MQ2gHyCQhR>4_;RTYg(8XH%EE-AU0_@~WA<7TDtWiF{} z#qZ3GG3QFotzsp>LCJ}t_y_DeI43#CPJ#UW`)jn2FEqfp1-my69%E2y;N1^sZ4C$* z9K?T*Cp6q{fBea3|NF6*n)kq@>!8Ur_V>q*b+cQ4TCjK7bC<#e$Yjl0H{?V;LwdRa zcDdqAq8J;?_y3^fXhcoZLx;|?m~*8k?>zpa4W0+t`*)qZ6AtaxvW3I#1MM%dR~TE^ zf-DR$H_iYtxB)O%MoGj<9V|q8iGa)lurulPCHga%ZuQOW-NtnvoGE5%{a5`#TRhTZ!g(th+Aa(B*J}NuzUCKoz6x(gSnwrt2a$vcfJo6T-X6vZ=cN}Q5y$km_f*-7lc2*c|~&w zXe()4H^}TAbEOjmGJD6@_`Lu{m;pl*urP7kC>mia4z}h-Y_mngm8QsTv&D$V-eBFy zZK)jaN8yW#i;I*dIK+seCPvcJ1PX8}KoG{H8O4c(qEP^8y69pQ$E1nIiG@ZnI!45u zSFbHUaTj8jBb)NYIVtW18bxgomKXLF#mGp}7^Kq#jvFth52q4>qDGG!Px%MwI37k( ztrlV55@BTtczViGaQeV*s}zp%hj2PxZk|86%jxrYW{XxgZhSI)Y{%o0$-s<2PuwQD z;ygz>?l(er4r57>{**p11=bIx&%=FNIyZ)+e5l_2${!RI#LL0`{qYG6Gg}f8$BmcE z`#(#E%1IQ?&dko7k~JlZ+K^mctyB&QNAaj#%C(01hwF_f@=I#BMic;MOfo6ktL%^M z7Y+dmqr@NT&xan9C+C)Wf0IiAfL|HFW#C!{aG4JPo<b`r({%`sB&e7FbJ4FdXGa zHcyXw15%IhpmaD)=@5O%rtp*kV=o;ye#z2r>JOAU|6aoni}QafH`%l2 z7{z7FmGrx1u9AL~FLVQ+dN+!2VBDCHm=S9fr{{>qk{sW1Kyc{ia=+Bx5TDm4rBCU2 z>7Pe*K)U5ko}5Q?z;Jnr{QUE!`lWQKKN0Nj?+;Trst=^3a=h_(*TVQ39RugQV#cJ6 z8;|3+CQvjY+tZk|=$MIx(J{W`?}`;hvA9??78e`E6)TYL_>T~}u2@0ix;&ondM+-4 z5JeEuYs=$p5yUHkuX%FI;N|7+lrD{1a=v_=BX_wR+?~qlKMoOn$i2EcJ9Fkt*bN?O z_Z)wEpWXJoRkz=L&wt&!@u7z|{qo6QJ+=D#KltI=`|f{W^Ur?%$o8jy{fs}n@;l$X zb56CgB!Lz{=_eC7XOYre{|Qn^^Nu|k3P2b+21_Z-17Vjzuo=&|NcYAp*K2@ zz4!j{7kB(_=O17D)9Z)d{L7KQpZLegT`#q^?fLWGeQ&+}*LObn@S~4ke&yBn{Ra*@ z-|hO_(NF&QX}3T7D4)yXR2F5%ffO=W^X(F*Y9G;68h&Y5V8Hohu<%~bM+S>7OZPTP z9f}mnHJXqRb)YURCN3Z#x3sSA{r4f5G!?bkcK@-xedb>Y=HXjfjvX_%7~onFzCQ&L zOs&$Y%FHJ>@Q-sH(7x=-&pzjHDA|+$d>`MRf|Iv+_7*gpY=}hBzT2e#nn-{4W&i6L zAP>mw+pjm+7E>2jSiErU=WE%PpD^{0gJZtGJ#SgolG~C_mw6_?sW>h!NXJ2ix|Y@& zd&^!4-|N6VRIh0dsE5@}JxszOvlrcq+*^i6dBQ!JY@sKMSktuXbZBg>C@f*Jx}9p%Y!7w_rm zF`4eu-=|+6LK<;K8pyVl-R9(a)q#6nh0QsZHq7*W zxbB7UK6ni2;8}UYbtAv6T%lyY_Fh*q!oIz=Z!4@bV8_&JLxtgj7MI=J#)^>YBNe#p zWX+`K7#349W`})h<43DLx11{PDDPOgZu`?OzFa#uQon2K+6O8tk)8e#_B}R*g*}JC3y&==ul-q%`HpGV4|PnK5Pbg= zNsp?g{Uky^EBdeOHFm+i+&;yry-P?Ff}Xo;q34z1rGu9|HkWWlun5BP1RSq+Pbey~ z-@Ep1LAb9N%NLsS1lZjIH376_ z zpAW(Q@%`Opn4W6u%;tslH$va$&O^f5T~b7+f`R~5LBXg9OLBl}>^QW|=CR`_RWsaU z#8m~Tsi26i=YA{?; zyg8APw^T<)&WyapY>u2szKA6$e@gLsCtrU$ldr!`?d4|i$X^ccO(`)cDKR%MFV|~O z)K{KDB_){(^78UcVDh=)o@L>AdEtt96kie5`$+M~rV#ovNKa4kU3!g!alm(x$e9AE3c8gyaAABIJ)ULsvi3U7<(z7Jz<&7POSn~RX=4FCr zl8*-J*NWn^P;?gAixw9YELnPE>B&88Zb8Aa!q^LY(lRKvlL15qD;G5!%8NM*lmeM7qxH53nRssAYAmRYgfa@@$sQtV$Naj`!UWozqd;qsY<^<QGTzGFEBy4AdX zkq5*}o`&lJ&H+CPFqy{@j?=SE-=02v!F*97f<{sQ<>4)%MmJ7IPA_=(50uWB#4z4-BxqK4xonaiHa zU!tM!7Kl5F4*{gm)-3url~ye%X4oC5B4>*6Tc^#fLzP(3osUWgV;(PfQTdC0~8WBHEeBJ(x{an%jh+^_z&--5H zf!81SYHWbgo`Cd^xnlc}c-7z^Vc=3zh^LU~`7hQ-$3OJlKkznkZ;1ssnBl8`RsQ`4 zl?LgH3Nps#4>q>kPSD*I-4!612FoiMOc@S~34H~)FVXKQYJ94sK7qlCAGo1VdDt0d zx={Q@$)(0#J8XVf^`Uy9HsO~gg^gdMz&E$GKo6fAo$L?rW$+dF2gG4nI?TFYP4yc5 z1LBYjF9!bal9J^g-ta#P;8PZc{R5Y?lE&l4KI>s#*3@&UC~OcDKzt6I+i~t`*a3s@ zsXmAO;edV2xl}gQv*hztr!0qThirJM&CZwWXGe#&ZMmNo9@a7wj?`{Q_Eb^fUfu>{!_9= z(OiJWGFBAPh~ilIhc$xqk8pCbD9)eH4PL0FghX*c?Sk6Ew8Auh8)KrXm_NS)4Tta_ z_EYhThp2^XT%t`u!SEG1PU))&j2aF5&3dgq+7xZl1m@;Njn2-|>a%mALBxu0Y&o9% zWU&A~X23?Wvp}JUudr}YOoXGtFO<_S-dzqM-)kopwcE-mo3WqHfTeQuVol{dY1hW!S7fzFdlC?ARiA-y?s7sX0Odd$vQP@A1om`1iQgmI`YP*C#h zIdCDy7^UI$9~PdSgC;Qv>4<%D<}46x&HH7Z?2A;w_8|92ikF=O!k2U8eoW&%PnCS( z*bgM2tY@A-wlH3Do<2cRe$x0%{g2lZrpogxhiddU^SpJ7mfUlxhI~ghq!6zs^1so= zTVHulZfJk}eL<-xYX{SriwbIH#Q1@j7S%{;nJA`A6UFKolsC39dQU|aY2U1Ct`$D0T(3R zxr%p!h*P?My#N#hkceT3GZ;+KF_H22u7xRJ-y*n^1MWPG$@t)M63%d>Ior1#_y*tq z%LO3Ky`U7*9BfI;jv6#Of|qE}j36p`Bl>(^=$(w+umJR*VAd_UcTr7)y#e^b?7$CZ z&-&h#jwgX#pY4@3-}#2G>St2wVdPB5=RM zS`;VV_|YXu58P_}LP7682vjgD_5a%!fE;T+^+zgjthejj`ZeolY|;Az0XSDvplpkQZ1I>G;cx&TBOjY_3>_eqa55ha`a2__qlG8&C|fSgaf z{ln2Kiu`Gc%45j~A^p>#@bm(cVayG4kyGILb9Zv3e91+pMLMkLQ7B29h za;nrp!4YsYUXII`iWE;yhvKW$v2hWR6h9<12<~T>Jb0O7cdGZ^?3z~5h9-q93+=c5N@ z0!6t81?%;(aV8VdN3RbGHkr`no0W_YPnXie35~^UP8nNJFuoK%ArV$2V1ZJl_*eqW zhv1-KUQaU2>z!btGugOBp;Q!(=tD5sR33lZ-=AQaK2$5b-pHNsqV%YrQTrp9+CSOk zPW46cQmD z<3F*da!`C;4q7#G-xbAzL6-Z{oV~O0qtCqzQg>f`y7|TS+PP8s)~)O9mD8gx{_r1mTo8E~?tXdk zi+WveF+`0FN=g7;f+c9+J%HKbF z^vtgZUt8O2J=wnWx_)2&@(~6v|M?FwdXbIOESzVN{RcSG>Ph#c-1~HC_lm2|)AoLQ z{~BizoU7p%NqBlay`k(9oU7@<2_7@`TTd?7U(^kPx+U$t=<0n71gsZ(VXr(@_6!K1 z*T6L=zuTnvAjH-(xCs{-?%2cNuVquQF!SJ!0agWUQ)i(rA}@abWKFxd`ymz#;=q8t zuujvetD6T#1cMT9eN`ySI$hWK!#967lqiMAx|Qp3v_nTX8J6svNdBL8pnGe2s zqOEGhuge)``N`Maiy;t54a6DiHNa$+i9%CI0r|{8 zIxU!JG)j6(bXCN~G;UNp9>tg905D=xe5f4w87Mx^UrAb zG#Fo5evA(=lwAX5*GTboK>@0mSY%1`Rmj4CN}~w`5kRRT#zhsN%FG-Uq0t1WG#a!) zGQT+{);BJPxDVtbDV)=wmP3Z?&E_QOemV?bNYiN2u+SrF4B|S5K$J1h4KD}%2c`$6 zr;4c}*&wdS8;{eO!co4I57jTFPw_dnh&4}_@F!UIN2*|KUl$5T`I0T?!{cF1^4g{N zvI`HZ3(|n-0g9*51czueaq)zQ*&G~VHpj(N_oaMBY%e_trgUVO(}`dzH-#Gm9?|ee zFo0?B8%s8@agODNmx$s=N1M$`BZuSR$&bR5Kf!RI&YX~FHiw3Vh9x8>BnGHL!$w6Y zZDOn?cMelL3oM?{(6}Y1L*aP3vb%3OV>6;gXFyvcIum^e&V(B%c+F*HX*5|`?a<`s+XTFT zzjy1C7;AhPJQ!=RF+1*&azO_WUIj*)wWDAJN?*2dKX&>$dnM}P;=`Ud*tvmNak_9i<57fOoKl{sEqaZeJd0l0I8c16V-fVHPll+JT8cDuO+_xJN% z`R?q!rH#VpY7O4ibj@_l`uFAg8wJ1ng+TV$zk44#(ZQFYs^v0>cIe%Ce&=~7Twlo8 z_q5;BYWmN@ta+Fj0VevNgIYNNpDL)nIMW(@%>XVbknaN;Y=D5eY&adH7l8~T&_K)P z=APZ>U+;DHw4B@3(*g`u9adyu>w(i)EmkvBj}J?oUt<9haTY%MhpLgpo$^{7R{0BP zN=*Fxb0_or#1vEXz)Q_p}dF(NyfB>bmGUHg& zdtDFs+bbpT;@ zu+GNQ2O2;28%_kkzoTJgenE6hNT?<-K;pw347?V4KIT|K%Su}Z5W-QssbH(QS#XL6 zfp^j?u*G(uC$TR~fc*vewoZKB-R!Hw27I-zubuh&qRd}keKP@8j8!r>d>}w7NTl`? zV1-Az8b3aFU~1!z10OBn6!W10#M^(w*}29B^WGRZgak0~(;W&AP^)8NdisRj!fV1S zh&QrILi{j*UK3zk@xnfd35s)|+(RlA#`DusanapRLHig{IA14#-{&pE{61!jC3Q@= ze!@gJ1rZe$g>TOE^wcp$MH40hD8b>9Dm&&ug0Uz+f1Bcwjp-3BFf4$Xke(NNbfJ*krt+elmMPO0VT&aV=1yD@9sKWW zhpW9RYe5xN6~WD8RYgJR>9KIH$fRjSMbm*}y~v+#T3u09bWBwd*%VK3R7|{5d^j8c;e#RcdurQDh{+YIPADMW`ym z^f4WB7sWDwtqPd?)4o61L-;t)_hwOiubVGRwZ?fs|1lb((4m;O&mUTJn z^5n}?E=PDϖIufle!RLb&$JKXsu9nl!Ei5yfxPN&tXq~Y+e+pUEEV}W`wi-fu6 z&K)~(#;Jh{@YM$zS9PKwxWluSSiRod|+T6{*uaHuE`)k?1uJ+UGRTR9i4YB^K=fsUIuU%vOj8gx&K=))4j65$sX z6dVlvD>(@Shb3xtiDA((1Z#C+iP15MaI3n(kYtkM`KLqS$;SMYipotk_(|m?8{Nl2 z`OGjOEr9Z+K;e~!(o)1Hr;&6ZdNM=@LFS{zjt>OEYolk*6w^2}KG6@jk|jm7p*#py ztJ5=J&Q+Y5rB+XxESCWzar%YpM@1x=cqrMQ@JXu!sg8=SdDh8%C5?f=sk{OKHjh1-hbY; zc-Kpd@a+KxZ`u+EKxeS?ET8SNuXZ}^IM!<5or>>Oc(YsnrR0-~y(? zSMc_~zwf#O`@+pGJhOLur?xo3g}qeIkVo}7XlZ&2mvaH>e3TM*pbLnrTD1yfqpVtT zgJzNlT%R0If;zyAVL=k=8qk9bd$sazoo+K=sWoc;oxS z@-8WFJ6LKj?@CE0Tw2@74jh0T&L-H-#uM24K|9LuBsRNi+w@(k!{USDgQ~;RcipuO zL!D>>9u)6}Gqxp6O;Yd#Cp$ar-D^fP+!Lnq426$q|M3jtD;2GC$X4Qx&&s`Be8&C= zvs#yPvvc#kaGVrI3xKbfU~}Gh*#xjuPF`XOLvICQd8K?2-+v(h8nW~ifZfFRn@_Z1 z!d!7mA{ijGpCVpQF-=T^pJ=PFRRo7{9Ty)LpPXzk!go6h`BQkjREj^_Dw2~kG7H9L zWTK7nk%y8r#UndFr3OBM$f!WAE@*UgnwXQDoLo|xoD8#rv@&ZN9GB%TVp?8)8q62) z`UQ8qO}H_+na4ZW>%+Lh(Uhd<6)upI=iwWB!84lWWDaaD5sI zLrt@lr-?Q52rh?k^B`PR)wHU*x`lPYA+v(x;+Mt&SOs7mfFS_Ji)l6U(!>RmDIUgw z179QQLii~VehM5An*u`Prxg0B*>hrICrpH6z+QT%01?p;oB#FnxMrYE0~ytmNcuzvgfQNadpV1atajCF35= zBv3%VazNu7V4g417rbG9WrUIpb-z%j8B4DoIOS1rp0WxN*8oWUuF2n)(4n_4-U@?v0y}rc{_LsW zzI5@6Hv6+omjF8m9(Lr&h7G?s`4@Nwu1c7#xnK@eJ$LnwbfGR+dTDw|HeAdM@)OLU zt?z&JkHHmRtvlm#^%R44;cSj(Cpb^xdnrT&gnbpgk5NcC68_ePB>M}e-#qs=v!Axx z6U%P9Eh!1U<+VB65`F{4OCaPh`xFow?Eil8hq=H{eucuMY}Tv1UVq{R}8M`>s7D|5{l^)+|f}` zfa&w*NUnZ1R%wTy#vGIyXxa$81QqZexz}F13~B6exc~m3BOu_y`J9})*WJBN3mj{3 zu1*W7vy2S0xreI`gngvpgY^4~ijop=A5qNi`@Op9G|EGPiI|hw>)P7t4mshyY3F-Q z_{Q8Y46ujqMIqdD1hjI<4hD+~C}B5lkDH-~Q?e{m)`eMiYGEuzshZ z-2VL;eUEQUdw@2Or!q`_h)nk6n1|;v-+YL*c*%z6Tf_956p{aH``Vfc-~;9Kht! z3dM*gs-YkqU8PEa3v6Y-^ZR}WPBAHhE_FDpAQFD*TT2h_u-(z2rB zNt31c@RyaHpP!bVpRf035EwXN0vf$(;zXn~Pu-M3<;wLcf}vz4_(3>MA09g}aN4MtW{7`Q(T9Z1TJhj)I7{_Su%g%rmwyij;PrLA zhHkUd23Lar50#Xa@1L{*kDKt4#svee{Ye`E&ns}%*f6^;MdR2vP!e@*t@U-Uwl1&R z+j>vkh1L@z@hHA?BxUL8MC*mRds_F_EpL6buD-QRd4rLJ3GV+WRY)k@R0V%zV_ya# zn?VG}M1_P##e{~C9TKWihlWH%lD`JRqYzJm0Yq8w!32{{@hN?Rjc~vV8I{QZI0``E z1?Gm_$tHKQ@q8FOk0?r4r49*=h*XxF<5@P)Q(g9A&kSSIbc^tFQB3Npjxi=xTMYEP zt=wXU=LB%K*vgG7J4Kt&^_pODlpBRk(I9lbCUgn5vNyVZpJD+Ab<5c|8~>tCZv2Zo zIVB~`d^KF`a*aB4>Vrm4jX5CZvpwc+2o|n3s)fRq*f8^8pvqFs-U)vvJUkczexNb; zLAqrz*DaTAq8f9$QfmIH{X%J%aTj)+T+zgFy=L`<)w5UEuD)$`$?9dR?^t~|3)ESbbwbicH=8>FiaXRd0~pd~gsXU2KYP2n z=24+~(PKhQ%~qji(KcaG&EvwNMNbGT3mn4A;wE9G?LlE>^#);O%`b$Ni#7@?S3V@H zTn+FV@LT(^Ahfg?gk3EKx|Zh+x?Rr~s09;DM}p08*kTPZvk6@(m0kMS@Y}j36?HiZ zyIKmnz9U$K?V_M7vv>6rc0C|iZ0wy++bv7q6;}%2(thEcqdg}tv>v;#==cR&S4q!a z%L^wOOESa>W!rjohnvd&+Vy;j<+k_2Sr!nmJoN0FK(PBRlyzCQyeH-eU7IF1Ua)p` zt*z)fRS{kT*;;;gI1prtcO}PKjvY4su%fFjHvErRoDa;0PQ~oKuLQF;V8lY!74`sD zRS9H_Dcn01ir?O|8;khd+nXGZJYs+BA^Ss)EgNe9sj_1|?PVQ3uL5~5Jbv`TYsW5p zc=STz(Lr0+&J0ag+0>YDi{WrrQB>E@BFfZVca{Z)gbQ80rDbP&riYL1x^wF2mL&CH z{L!5m0q>-Aov3K`37(e|H6zyW6W%Kh!p+z*PpuHM}ZCw{e8-p9mLcym@1t}N}zW}FjF;D=E z%EoryS!S7j@|{o17J{FpuQM=^7idRkU_f{f7VT)KanXBNwAjPO3sM=!9yXSL1j6CE z8cGW9OfgRVNDOF#XG`5-<25P39fyt6kB9%Zt1HSfIJN7usTL;vFMqddMoIYE&PhdE zA8~BA|6()He#>KzZrolIT~?7?6MZ}U@d^Y&K^+3J$v}tX<+YYOyTlOe-etiT-a2~W z?W1Mv!jYq$ADE4=S6VtYi7IJGc;{&2^+I;GZ^reqo}L+&jh)7mm0hZ;GBt#S2$wrx zTo^oZbfWpp|8UnMq$eWF7$Sko#zopXLMby98Bx* zoX;2tH$#*wJu^;SxwkVj702#INlT-+^cNaBD#>CUpPMu)G&FU>Izx8BdP8>cdN{1Q z-cSJcM6f4<9jNP@(F%PySSrKSx8ov`M}BX2^-e3hbU}Tn>tyNKuCL9O@h9JDeCMFq zR@Q<8+_;nPta|5nr_AYH{||d_9?;a4{*B+8JrJ@0N>B>9;F3~pajBw02#SD;5D;)> zQ*dcJqqZ}Ot&)H!xS@b;wTnwT9otS@+L>vmt3rcIinn4N)GpHrtxHR%7V8EPli%mL zNz^(s-}mkB{k?zv%!TKy&vTyhoaLT#?m5qSb+YM2`0zDp<@*f%xJ14wIw9Jmh#uqN z(s@2EjhDyRA5Bw_q=xe9Wc{U1oozY?#fmB^I#T{rs_73zkI+o2=rIai!({%ARQ_qD z{*ZKsW}Cj&U>jOKeA&pwV~WSknqWytPcS30NgHiSh~}+nEA4q{;8aN6cwgejYf??S zz4T1o(WZY1QFufFcZo)+kW(~QFofEgt#lz9D~-f75%feiMUUC*hVB`#E!-Bi ztY2}kMPpXQDGgFB=>|lhw;gkd>|FtNm(1R!wwv~JG4?KrT`dBAI286Sl^v8#EFyw^ z)XWPkx~DD?6%gtwy08FF(t`4f84$7(RX7nnnc=kKc4_O(nH*CK$=lQQE>TODg?C9> zy0UmKBu$sjdtWl}hXnS=82avWFbavP0x6t@k1ow0A&u{v#&lvZzzmyl0TP=C$rO;;WH~e=Dde4;yYV?@+gao`7rtq;- zxYz8gT+X+mkpcI8Q+?O>pPE?bC9ZL%ERsL@V1FC>6hVI7Q`&~M4Rua2T;!`5V9L(; zz2l?W;-j2X(6WC7>ieK%ucCgPBt3#b12$>9s@hGdg%p;TaR~&RzwHG~cNKq8+ zs%(#bJQ^)4G{|rv6s|)G#A}fnzH<18;f}Cu-^5jIz>cnF49 zWqI4!kBot558}<*gtvN2C!!$mJMh9!pNfw-uKSL=B}OIx%@qEpDSY@;?z1UMW$ePG z-w&Gp=+rYAk52t-hILv+#wXKUv)kQA;>2y0j&Z2Ri2XWC`uYVkq7cWO(Jp$F2z3xZ!VwF!X;bC~34WZWLRTBi%eKxe8-FY{S+ zEV+Y%bpP^@KaK?m&Q<#iUpo$t@q`~l#ZNRy`S9ri4N&iDaj^gL0NwR$`%>34?TcKy z+ue*Y%*`6_af^&GZn5#+F&;l#j{8tJ*lDZO{}4_#z4AVNXAIfY_l4_EDaj@YkJ0mE zJfM?+_QN(ISNa3oqtjwRQi%Zzb!hsZrG|ewdhto7_sljkW8QX#RVxpol5)dZb>>#~ zw1*GQ;1;*)a$8v=L-v>Lx>xKt4b3NIaDTGvUbV9#26n1PY8faZD+eGVbpYP)Y9%Ng z3EJXb_(|Mfw zJal7eO2qu`;rS+yIy5@S(C4@rS&7K%;ELcU4u!_Cp+#%R7_>CV@Z&FWKYw^Wq^=G| zsbK8yPzR$xbyr%6^Rpct{HqzA_y~`&ZYR>GB)_p!CdYVaq~GgMhZ5FdyC3T` zuuc=!@y?c*fhb*yt<)JAUn=~K3^st_N~ZI&>FNL(%Qcb>kz``NU>c}64xTONEl5<# zC_x4ZUbxj(-**6C9RPG)<8>)j)m?SwM#O*n< z&v=T;5OMC)votl+AI7Oxi4x!UMIs3vu}6dvrbKwetcVuAJ#aBt_+~_?d2k6!nRH*K zuxHA{KWpK9BS6&2zoE~#B4ha0Yz{R{7*eBq)G4SFLoMRWHk~<(l|=CC^)ySksHbvd zLs@jzoGy#1n2b?Y=)V7yznC-NEI%s;qsX~DxBlgF)9uDKI{d8G+a$#Ql+EvY0Ni6>U%W)OAqys77Vl&0BkPvxhDHm$ik`J# zAc$8h4Pwl`A)~I*!nN1YJbb;LUv^XK)DV7Sp}9-p39sZ$yzb9-lQsD4S?)zUt0Ccb zR>&k&C@=a7MXf>C!Ts4j=11-?_AwVa&!VsO3a=B=yVzznX#5h4h6G3Jb*4H9w4!Uk zDH;KP9nI;o>x7&EheliQgLO^sj)N9`IoxY3DRqc!i$R94e-MDn#FfnX*iT=_9>Bze;RE zeMmqa9M<1I@>pfcBg;!GC(h314_-K0r-mnUDGSifNT{FIc7$;UfEyyUHvN%hMsCj$AcbVOX<+49ZtDOr;l zLFQ)#nV^ygH3Y)3|Co4%28b7LYd8FFe$igMZEz3G<*?e)wgjUf{_`Aan%{p)t0;O1 z>@3<`=Ky!OQ6aQD%n3sD->#vl&G1&tN;Nbq&2QCB%|Tt$D{j`d+elk&_0=}(_AMK? z)IGJua^+liThbwYTJ*(pnzpfI&5Cxo=3)T4&2AKPHv3twuTPmWy%P&w9S6&!S4AT* zIsqAJiVig?DzomvOZvD;VN2_0_$Njr^Y~vxbj{*4uS4==rE5H+og(O+^8j@O`1{=(8Pvek`}j znmck!ZtTw7!hN~Vyq!C$h@rC&ZzuVFdv7x1v#ig zUY;yU$=?CKX?AM(#3t@Ggj zd+_@s!g|1uXDil$svE71R85|&t*>2MYujS2s%_k1*;@TnV|BgPUR7PceN(kRWRva5 z>Md&#=EbV6-(0(?w$6uERlUi!*6&!iy{e|6*5)HpyJd^5(pGP+ZP;Ynver_&Wo_;H zIxCh!8mn#FEe*DH>+1c8^>y1DtF6~8UbDw%_WDeh&%Ew4`+VjNpXv6Q9-n#bs^8+L zc+F4pnxE!1KhbM`s@MEvulea-b6XnFtbELQZgccpz1`tYrN^I2k3W?je=0rKZ;5+d zT|K>RHaC8^xvp*tSgqP{URbyTK4)AYVYk}-h@Qoi?t5BLkny3af z+bj*Wo3_?itLnb9Oto&dZD~NkQqkDzYppx6RAsqU6$o!DB}7HIrO`5Rq35HWo;ibD z=*`i0g}6r=qBzAtTKL^YLyjiB7Tug|kax9NYH*pt(ec}x3{71_j;1B(1G%VUt|3Q- zaYq)nWTsM>kFU?FNdv`wM)iBfh=g}(s30I6#6lU7#yacUOiPpg%t1~>OW>e@l{2-u z0uwT9{WM7KyANx95+qttxiVa8=xtf0e^;tCaLqGK5tzDNIe1nn3=p$o)6n5yKH1q~ zl2vA5rTdJ7UU7HC>xj*28zEz23uE#-@y@#$`JeVD7<0Nr%Gk`=3W?cfTP~3{+sv8p zscc>$k(w)a&SoQQm9GHqseBKxxzYjXto$61srnw!P}K`)u2RlnBZ{kL&yhsf*4olQ zp<19>-MkDmt8LTav(B~>G}p~WeA~JufP2=h0&HHl0noWF92A)K_W~N$j{`KXpF%X( z?5~W#Mgm ze3_02iR`CVO5_2Wz@U(b(199-TtXvNu{a_sX=p@=lEqT&6~!4mI}QiT$;K1@C2f$Fdb?8c2RT2{2o z>cmb$?^jF#`s0&He2^)Z>!TJ~clS_S!X|t#g$Mll#%@yJFOT7#n2XVUTHDxd+o*-d zc4;s-8_maF(cMc++i1iWmkwccr3Lqf$98G?iY^`R((t+vo_}brYc#KmBnvn8lrS?9 znY5@qtM*||63iRWfdupXthrb+f%&fo(FN=?1oHBE@iJ~p0WFUO^W#y$#{YIvcsNZ2 zrzCWs2GaQdH~ew$y86DC8NBW4chG$d7R&ZnX0xpxuQI{4=21~qP3=a!%K$7dj%ONd zwVUedg)pgEw08T`f)zj!DB$^=zfEU1)orr*TzOmAwRQEi4PIw*q^PRCcFV?1)#M@8 zh#I!mHTq&Ub**U^)};DEuJA9+yJ%v+czzy)k%sp8u1RG0y{qBaZ6An+9`}od6~w~T zQl1g#3f7XY@XcfRmU*Ul$m?R)(Bl`o8jeAn_{P)JHRWj6lgId|aV8tA{LpcHcmcO& zjZ8{IQjGOqn1=!CSHFd8pGmA|$3nOcng;Ao{uGSzi$wh=@9YVO#8_PF`)pT z(MVt=_tfAdW_-I6RB&&e)R~9dM@|j)Wtv+62f)7ywHa>DBBK3k?M}beWFdi!ST|q^` z_JW-Sy9!<`c)8&9fD9gmV!eCZ3XQG9R*($ggs-9wS;|Wj@1QN!cLPtFd5(; z0(k`H6Ie~)Z2~6fca^qtq3!(BMQN@j?cC{Ouw`-gA9LMv>=1U6xFQ9k zJUV98N^bZuAfpLH9CL89N_D&LAXIt=aOOz>TO+}@Nl8RZdi@1cw7#oJfBxX@ z5@|uJkHnJvJ;Yqs{l_TZl-J?~I=o$k&*8eQMO?vASN;jLqAlr4eBi+WSxq$YY|%>x z#3UN}E`|gd&T%_Rf#C2I$O_X7vkI#UcNhM#@UMlh7alHrqA;xJgTe_#*bWd(TLRjO zOySKH=rQ&g0}cxBtronv(4lZg%EBug+~xTY9UDhgj)pM9kI~DlAa}sNNU2et7#Uy` zMQS>@vB&Vq5rL?Y#~*W4oRc3(JBW3f-XFBIxg|QFTM^BNJLS_eYcbkENLQ# zzKp9~H$$fg4AY1+x@HMp_@jLIY+A3s{|csC;a(rF+ebypi%Rx6 z0LD7F?@E!1eQL?24vf9%>#~lih0y3DbZv=V#xh#;2>9l%Q!yr+I!G28ogg(_$NJ?J z)3;7@Cy<+*Y1bXPSp)Hk8u<8M3_T7(I?4|IHzl2XO^Ks}vWa|~Y|h0oYC~)cuCLP- zFIpgb9H0mZfDfXG#E2pnGaM@ix?JX^%wSCq zpEwX(F2f?A9Lb0kAjNp&u?o5hS@;R@u>KN)$nZvFr2>(atd}#floBUyLX;v6Bcr4w z5{(i(5yupWOi`d%2ozJGmsezr#wFlRBxMvKN)QRSm3K;<&}q{q0zm|UB0`}Q2~iRf z1iSj*QD^}Zfj~qc%f!fKT9y&1M2wUTM87Q+2Z{lufl@$upd3&cs074$GfI_mjBEk} zSq>7xE=Do1Vign2GGdh|82dX_l3*#IEEw#m6v4=mDj*oxg91bp7$lO)Rf-@Hw(~*L zR)988rxHokK^nD4qYcujMFC=sL@UCjRtl{sAW);yiliEx>=XuB5-?84teB9+VgXr9 z$gG%QK6p?LB_qY&A5; zXqnKPZY>kd1mhYK-w)~i;+GwY^ltlQ4?=7aYOwD&+i&ri8}4-99FTegcHR-b_YU`a zcf^11j__3l3MO!K`{iPv|Ee6gUpc>eBY_-yipLg@lCk?;nDTub|T;JiK4O&``4CfGp0HLQS7OEKH}Pc)_8e{rVwV2;v1J z7*_1~1dWgon8CqeVT29D(9rO3;D+nkBhN5hzmO0R3J>eA)d%+r57q%Q zL?0Zk(;?|F9ohP6wFj(EK9Fmjq&Q&RxzuZBYrN*zNnW%5aj*I8Z@p%r$ZNLG^_rg9 zUUN>k*F0I`HJ|X&$+cdLCHh~dU5xFA^uA8ZnSb7Vz`En{O^*xysqNFrZ20XD1!V4y zofA&xgDZc#kjyXVUlIJDGj$9mckZMO_mlbc{JuOgcTadmMCSW*ewyMnpB+G^Cv99l znO7%y&1EaR=J|;ED)KK(^3o|x^5PdJdDHzm)yqf6;NZCwZ})^9;2)|?v1jl9{l7uW zY5!0D|4-5;T!S_)bVTTg+_>Bv?VV45ZLl^(8~ShlIX7`Qfb@xS>5 z-Nd2v)uEbDO|Ck3(j7g;9S!w1=OnFKuhDB}sb^98qeCAI9TOTE`fKpx_2cy8^%L}z zeoE-%(A3bhUxlBppQ4|tpQfkub3^k&^FwF;D*Rdc+4?#9xkCDpxjCU@eQ!e{<*zJmy@=zeS&|&z@!ZRrr?B?9l97OD^T#U-y4a`hFZr-(UZK z4Za`e|BLkhPwSt*F8&(+{b^GE{dMuz;QQ-5<=@|ae+|CB%~JXap^2fU(2>8Y{YC3z z^n>&xh4z;bIvsbHXZ@=BKUhCRKU8lN>i@jZg3!XyqF;r7uRd0PpMIE7|3`)n54}J1 zfnS9`5+^k9<`mNRw}qtt&E6|Qo2>QYko^5^;m+Rke{%bAZm<8h>h!HP@xS)F)&6d^ zsbAywYts5pac}FE|9@%Szw+~iC@ST)DGi?Xulox5-ZKl{-y#zkAtkdi-w0ZCqVb(YSJ_H$16j z*>1v4YVo?Ql@aH?kJo*E9L})Z>$&&*IInx2$`c9grBAud>(CJ8nd8XD^h9{F0wL-IN~D zq3v}3v>8vtd6PW?%7`P*3(7-Cfr#%xr2mk=JNYF_`tu2PcjZmNt$nU~_uAbyArbxg z;dajoYe3WyO0;vKzBMFS|1M#<pg?MeZ zLcBKH?#kU&yVmZmdG6U~_U?WD`LUkUr!QS{k3BZ!r|&$>F&lI9>xB(Ar}fP{2oU~S zJP_KhO4u1(c;DSUWC)#`rZb!}9Q8VXK5JSOl&l0PMIwJWlG)PBjRT6eYD4bNRX!BEt)@~ViV}Hme-w+lJ$)Lt_y*gDgDX8)og3FX zozMHnlh42Y(UMgo#&P2)-&LUDeKtQQW6C5i4ccR17`>j>mgw9PmT6eAh-GxT5FIzJ zWmQXW=c@Xh_2CZX_ZyJxhHdrR8n^9!YWEJ*oRq_hf4b;d>yh+Dx=T9y`ZOLz&$hm8 z&~m+NckNaM^vd*Bu1a2&+}rZr-uL$QUc5c?r1fmio&yKG2jPTza7SsON>FpV`Oh#^ zYE%GJ3)VefwVOU@*=)tmz7IW<_8&-wGD12bj01%sxE$xiBTJF=s!C!4AAiZ*_)J5? z?#9i)CkiNk;a6ir-Iz`lVl!|M|4cI`G;$~X5#Ux@y#DAMDBZr&(ElG(cVz_*?c4_x#NO?RGLU!LWPdHcOja#sA(zEcSrNP4${kHQI*Zii=_60j%0*`(6o)!N?Vuq=|A~G>DtVy@vIJ=#t z#J!9Rp^tu)%vcj6g|id#_bDXC-z+smp0MUDZkm&-4y&9?PeXRYzh!?v^*+vHp3_+b_TV zN38!?=#${ERxFsBLc0bZ=f8`?7ehywI(4umERMh=fM4c))^QzVEqtcru6?F^@g<)a znHJr!*S!+tY+vY_-}DNv`&3u-+cyiNE9UJcUj~0k^)`(Eb>s!db;Fu`0`#&V2=G55 zicnwp%`5qDR@yb?{h8RRnSteR8G0Unz`-$lbkpCL$qsf9r}^c_gF~vfQ<& z`1XyH~QEP0@)fkqI_q0J!hUc%NTT?iVgL4`T=Wy+=)fUB;tm zBZH2bR9%CQHg%0XD&!5@OuAx^(gsG~$*#XsZm^eIrc%pkPaQZvsr!5t*Fw8O$@P?1 zCd&B0lS;1LKIYn?t9sF)YhB0foWri;9!E63`f=`%9l62&UX$ty_B)Eklq*B9edH4D z40nXRiL6xCJ#D>~Nw7zNy#jOz@VWr|1b9P$ZUK4-Ub`wl0T+9gh{BdPzPqh*;)oVw z=BGW5j0>h;77!6{eVm*B2ZF6H6CCn7!P>V7cD+sTmtu5~XdNht+XU|=|E`bxyN~Skk_MKwQohcy55d<+$uqE=i2eoKBM7geHHpF z%s!-lL@jg8KJk%3;+k{f!<&79>xGU)_sF;qLck^;`i|>8SE;|3>v@TqV{tH_{RC|T z>iHXD=!3m6u|a@7ISX4&Zlw>#&FF6Y;<+t=-}(f;iUNoThynbOfI=c-3?`4=ImY{v zxC`$};I0JjO5p#B1SCqSTu_a{iZoD}10AX%%KjRBHlpu50|GS?wN$C0FjbI77O0UM zw5&)K6vRoOp(Z*;A)pRa2L!4$8g-&FF)=VuF2iTjVSxh!ACyIKdy>67d%OqOv9*z@ zWf=*-9ETQZ4?kI)Ph;PS2}icZ;5ErVk<7i@3W$T@Y1pz4fAd%zT0e|K>uMVYT6Agy z=WFbB$y{-=OcINuRZ@6Manc*_Vm^Ekd^BiozH1#>tSUJO+lj%czD9r9@Cl$_VL59mXv`0KSo*5n-vwi4& zkvsZlEcifvfAReWJ|}qybN@0J<%bk$j_#C?4A)mXCv~TMXuR%dZg+OCaelbk`4PRE z?WYpQFflPSGP>qqEsUuGy*y5Uvqu<{6;|D(i5wq(3*SH3WwJ zeRHvOzO~efzlGMtmJ;g%Ync^)i>ym55sc>^))R@lQ6eSMVQwh2@ff5xIH^0D^~A^( zp*Ld0!|!(wVs8w>z6SST*#OTFR(4}ZzmQ<}P<{A~p#uiGjcUyeqgK~v>>u`k`(EXZ zdjtCJ4Rpud7%}q3h*6{aMm#vCZ*2UH$b`fj#&I`{6Z(cGnQp|6zj2?+bKT>bG%0`5 z!b!iMR5NMkq*o^WZPLL>9h1&aa!pdF7*a;0Oiam1DNR|KvMFU(%3CQPr~EzTT*}oH z`Q)(4LnjZ%jT9-9^CuTfeq{2h$r~o`nEa>7f17+{^6AOnPX2K+o2pBVN_`+TDK$HF ze(KUxYieEU^QnJI{V4Tl>KCa$r1qr-r42}nOY5nxUTb}_x}NqeTN@g&r`+Odur<~- z)YMuVZ5yz|-QsGrZLHpct$5bDx<;F&7eVW*H`ZD=!)tS0W1Xe9vAVHg`wpA+DO;lr zTh^;Bt_|C_)MEP|c0@O9Uu&~m-&j|(q1L*kwxM=Q9bDB&Yx{a&6L}kuH`Y;LO)cVj z>DO_ZBs^;a(m({t0@5ZDzLY2tfd=_``KjMgR|B4_A)zg` zzG&;VZ>|*xZK>N*w|P79Ly^hbx^DZ<+NT5-k#oplGjY*SyBTq88-dkWhob?TYa5Wg zTe+aj3dy+;XNQonjVK84NE{(gpaD_ruz3pz0z?jkgk6xjZF4Qctvg8iH)sRA<;L3D z`fA$HZn?g-zHWWJZS!UnyQQ~^gjYpJ7uHrc)UMxRac>51Rj3BSCi&`h>wwi@xxOBn zFZ@wlAlPslic1J=sH)zAeeZRao~3*SSX^6d zb*QLB3zA07^_KTdu|HM2X;UrE53H}PZm1?+>TTA#hRV8n90Ncbc^Vn6#|Z(P-yqVi zEp?UFy7ee3p=t=MqvoNaP$Q!@Cy=k*xg8Z;@URIUR9w_dAbzR^RN_MJsEsw+P}eqY zueDs;Qnd+9Y%59?8*^*xtW}$~SEAsd9r>oz1@(N;Jole}M&tS0e%^!7w|Sg@=_N0| zSG^llr}eqrK3#84itTo{v>ZH07}xOg;(I(l;YWVoe*5B!Jw1eT;R3mD|6RC1)Ovab zv=tfjZHo-|v@JD6x8YO}wg8$MqD`Bk$82?&wnoD~W{bmA8EvW;Eb9czP9ew^J*M8l zy}J;n)5Q!nQu41SwjVspb)QU^`SwD0wn+BH^h#yU<)-QA~~pkc#+W7yM=n)+dXFg9MorX!ooZ{v>}9CBqqTE@So zyqL~>J&ik%uH(~r>j*v}fm2M?b*8(ncksm{x~_LPetCXqeQn*7IIdD_Aq4>l?i%-n z zqm_AVB9Be((JDMzrN^xBm}MRV{!|`UJipJNA=W6({g`zkC7F&pm4$80u9@xN=w!O7 zo0w2JH}i&jx$IMIpR(+?{QaglwJGSP-yyx+r1rYZ-Ua z=aebNFJkToP-%19Po^)KdTFX^+TdxXX)~uSo3>%v3)4QBc6rc0r=FR5VXDZSed@+k z`7{w8G3@=P8Kw=yBZ2*aY2&7i#v?UkpGu#WGi^E^SzPw1l4%c5TZl)FIFC=Oo@T|P zfPdq(=cnz!qlEu!)83i(79NiR9JXZ{A81Q6D2_fkg?}ebpNR#NgrnT&Q)z(*wPNJW z8X#zXKt0gk$9+nn+;FJ6Ku%9g)t#8i=Z@;$+!b<+e`pkcY9#jm&TGd~#PtsQsX<}N zLae2A6b=rwgxyy(ILH!qv30lX45D7e2*gNXDp?sGCJTiF!lI)GTD(@H!#oy5Zg zhDl|f_T;l-d7#$QKJmN~BX-a6NlqCTsP?p{d@WW7$~~V=cFN^So##aA`2e*P{%KAH z7b^3dNdH=bCh2LPa-JO&66$FWNDKmr!D3*SMeX-v%;zV5_G-hfO?OrT45I@#n)jJ^sT353>W)56i>m9##gkhq0sfu$WzZI8dB;SjHHlLsw&aUBCV! zQE0!_{pTwq?!j+(q+-p&d+v!8NmOB?%%T;(UyN1~Mb<~x0BQLOY~1Tlpr2JgZ1}7d z`ov+8EA-*N3m>pB5|I|(6R7~WZ_NOirYN*Ot1(2cSRslS9*MHi4+vmc-0F&rr)vz+ zgCZhv8$*UUBvYBm?5DPDqK` zb=PJb=4d?D_25x-nA?x>=kAN|$F0xAX_1rtYWg$60RtfE?M+0Wk_ez;D*E}3(0jrh zmLZm~@!0^&0G`TxHgiwrOPQ}`Hf8=b^S#Wl1`7F^KtT?`y98oq0MrsVOyCND3W^Do z9=S;2k&6}36doW~qMR=uVnirk`WJIMvyiqa#JlJ&vOSV#4vSqPkONwQ# za$nhH3bl$(nqzfY)~ee@hx9Qa)7b?J;=F_P=C&-u94s(HOUR5S=Wgd-lgPP;|Ko#k zGVVkcPWtfYv%0@bgW@~%+rwlDg6@xlrkC-Gp>=QWG;zdz?a@s+p%z0)7~Xxvp8dNx z?jMBCeM2zp(afQibvUJ2Lvw=a`pky9wKnV4x~-X;sxfr5t*y?ivTdRBLft)AuV!}l z3gG(HOiS2Pzzl05&`iJyz%dpuT;nYo=a;e0uVS75sBnJmNWiAqL~H>zF=C5CA~BdF zEP4ww!h)veh_(#146}s2I3GkV5tzPUs3kxo7ePBEE-Yfi5pr}5Y@jUAb6h0xH!DHx zGKoCSyu`A=!mNS1rD(LQ<(5Y+D=n)np0FBF3Huu0Dm76NnyARbNbbd5w(TqjiXM?n z8Q>O)V`UmoyCf2Y7=?x!Dv`dP{jTM03uDU$xsNTE2b~?XAbUZ!!c}()FO@kmGv7Gc zz>zDJxrz6kDEa* z3OEEcbh8Ca8COUqb+9R=$igN9ZxZ;dbZB5$FWCl`0lZK)6z`vR$olxgp%z8=X19cU zf>>DLC-4;f!`>u-FR0jtAcgJ??1aZ9^Wxzo0ya^uLZ4zxQm8yyaTxNCe<|89%ib$D z+!IOaf#pGRm0S(|lY?{L%i*(`D>G<-^m(=`>ZJYY#Piuha$L= zG~ScKut6B+o`q{ZSNRk+V)dyVL&4jP@q`o3ml;kQwkEq$2dkR1l%IS z5E&whqh79{W8{KLkyTysJa^*gMJy88*N>)wl;dE|Co}M$vvkJ68DWP>l4lkURrnja zui!sUr3Q*b_LvywUTUHW?x7hdMEwj}NCMN)Va7nA7?;G~(H!xKj+;wSO_9Vk+ZA-m zbhS%;%48P!r%bx>nN&>K2|O-cz9n#-K`*bc1Wyf%v@*ryc{ahuP{_*PiJl*=dJI1S0j901ci6JX0nzv9OVGADuV9Z8K z*b)Lin2owH57{Oq8&R@9%@Zy0&Uu;Wx5IW`J$H_JF(Q@2gJ9aE}y>hv_zcOIR+}*RL&SZ|x;b+gJ z#_-3Pu0ra6eXZbZ>!UL}+kV^jM(gV)?paLx9NZH#b(?0|ts|=LP)<>~$ySSH4q@(E zNKK>L(*m)3!Sp&t zDlmP4tTzy@lcFrF96v`<`PWSXpYdOy`}8L1r|E6KzP9>|(0(s?+pn+1!jIaoZ;p%h zdzISnRo64rexEr-QaVJ^yI^ma`OjJ7X8(5fi?dJ94w^G@&dNEj%^5s9cJ}Dmw@mFEbM#{Fus_lq3jZA7e#~}R%yuy}RR+j0oJ{_SRmu9H&uLexR4^x&_S z^B$Ntc3#-qNLwLjP}Iv5Sa!kqDHoF$dWT_7Ale6x_Tj9fjK=YUF^=$vG?)_{r>V9u zCs2wpKhx?!zMnh@BUhx-uVCZ6nt9B>D3$H={xRrTzgNoSq(AVk$I?tEc*j> zA3+>XE)GF%49QQE18W{9$Rrk&S&&S6mJuWG0iIRuqg(c;(cN$vLiir zBB{uL*-JZXkjvcAwC>|nB9Y2S4!A!=MnVCn+QQKVBMO-A0&w~W&g)}`504EW+~R`R zea6VMq}(A5I>>%wI^J2n&-eolYX^s%<;L=(JM~|iJi(58W1|>_>qV;Z(cB@@mcYjs zxW+;oUw}-{$t;+LAUACkfZU+VQgH3$&|l=gE8sfF$^rYNOM5B}+LO~wai__>9{Zl2 z((_^8QT8Th1LPCf0-!)Qc&mtz$PX5*Gm;D>kbz_$gRCpvBGwQ<(>H(CgG2g@@C{e4 zP~c^UtP2ylk%hwwnbbn>L~eZHghF%S9a6Wno1jQ(p*SzBj0*aC2eUvmg`J2Jr98HUlv-^@t1#`EAQKtVF_?4;9)A znQw{6(Zb_}Ckw-_<$}nAc>qu485JfY-yQ;C28eN@7wrW*qUFq+n6=8V5XJ^5l%CH- z@d~M%y;(!A9>Qy0A}K04S$t0s^FRr`&qoxwGU$CSyzVkiI?{^LiykWapy*7|fa0{` zqT;p1JB!~db_i1{Oi^?Tig?w7iI}foZ5eYaV3=7gYZeR3zci~MLR{VnjPhAw1Pd?! zaIv>o=Psrf(WS20?XG^O+;15qCRQKd-U-wDVk_{C9YNRo!o9bMmMRvVZu`_XX#>$C z#RBc*2Qf%MM7-ZC=c0mPnL-F7Bl$sHXtCgdQNv09S}`U>#4!DQqX%Tc*g@1x3g;I7 zkI0g9bCcIbb4jEmBNXz+8(oM&(?j^n{rrz=48QuQ*AT7=RE1G|j}Cxlj%cXR)FrsAOC1J(PVL#i=lK*T;gqA zVV%XCC2YccfWH!WU;#i2fWj4a3JsaGv>5zxKcT<{r2vb{I13c^h}q>>u~?2ZlNF2v z|00o$hK^z^p9;-LSXT7UoTiKzIdvMAKQ<5<gXuE1`7AgXS zXGSo_klxDcClDYBkOoQurN5}bKH~iEM|!K_JJ16nj4$WUe_}q%EI9qh{1x+;5ylz4YvW``dRl;B@_6;n|B zOF3>3$BA&@O5_CwsX-(fAjQt{6lsbGq7|3Eyx`<~=F|fIU-PN$zP3OYyug(yh&J<< zXkDcwRjEm87cIC$tcW#kLB`0Z7OY(mvEaXmHPb8B#~1upv4Z~pBvvnh|14H-*iEqp zE%1r;y#=2wV42d>_67WcBX}Uz*B1E1It6kJlP(6hhrl!dL9AB-rQ$0P>oth=8pDnk z#QOceiIrtBw^Cr<6rc*0h6Jfl+A4)y3XKCgX#jTpNQ=v)Wy4FE(PjLkQWC4OOt+-e zl_iKZ>o&2LdBv)>&n`7h_(g3+tZk(kBY!OYqV%!S|032buULaWMQv9>y1mRx&H{qtGjY&&eG-ga@Sx)AdvYfI-W6H{Mropx-XUyWo+}efoV#hq~ z>RDIYu`AuDt~7Zs?`S*LmCScdPJT6Gh7%${*k1=z*?8z&#U{SpxDE4Es#nCTQpTkxTopSc)$#s_9(5OY$W zzO81|IFwStQS@2VHy?YzG{}C%G%A=K6{}5D1rHJr36-l$l|hSHaX+21--Fu2ntl%5 zz)#rl29-pwX7xeZ(@OR^HsDLC>@%_IdyVK#mOT@w{#HD2hE_L&RqfGeUeJZVq*a_! zveCno(WxQPa}*zoq#w%%EDcn%5_NxRTv(DQLam7yu82t2Ma-2%tWvC$h*w5SR*6)r zr2S-?xIt_{qLSOIRZ0WZVr+{O8$Ds|xzP%6?fViC?$4Q5WtM4!_pAU0C@7dF`VhK( zk^lXa8*PzI7KW4M`;KtYi+!ST-ys_M_^`*h7ipZF;0`bbxI>L9x6!E32b;9cy?QNF zavI8l*{?LJeMxg5@G9;#9c<0;)N!KWt z8ZBEBD6Ub9YgCdNm9j>otWj%gv;j5pz#4_7Mx*kC1?EL-EnzW$VH5JAEw~$DCW^5L z`v%g~9u>66A9>dh5c|GC9{YizdzAwh8{kmM-QQga+?Bvx3EY*yT?yQkz+DO4mB3vI z+?Bvx3EY*yT?yQkz+DO4mB3vI+?Bvx3EY*yT?yQk!2cBqEGdrd+R*NLzP-rxT>H$X zuIhGIHEza(u?gyrMkjt!Yfdz(aJlXJ;Fu6xW~&c|JlK7V&ec@z!d3P-R>T46!S-L>$81L*Ymhp_PKV)6RB^HkzRxO_I{#TRzdD(pk$KUX-l^Z@a6O5OXScU6jV-E}IUwy^R98)V`8lV153Z{HBpDYN zeVmM2iN=Ck93Nm9e3_|fPlP6WCGL|50sW^y|LJx|TKA=W<;_hF7$)YjF~1O}5#Z%}zs4 zd|zo_HS`ohvA*|5SN-TBb&-1g=t1)*9rCdp9bbCaP~kBBPv zyXoSdn1q-Fzne6tX}h)EK6eC;pDbdQGFG2Eo>|Sf=@E-%(x8Cx59U4eP+rHYT^$VL zbXwkg(=zMj*K+e;RbQp}&{-cY2^#cB@R;B+T5bBQL60=N)9}ueFX@4Dyr`t4#~v#w zdF(N(H8D{xFDolAS3_mKT3udVTx>O4%}ItNLzG^Q3yq-fP3iu*Ptv34jyruiF0Qy3 zK}qpL5w4BWYE)wJ50y}Dh^O-6#775>*6Syvs4toiEZk|eO=t!8qa;r(uS;qUKgW1d zJ{Xn3i~@N)$rb)I6g~Ry;*WqnGVd(5*?^OTCyLQ9xHkZos=ApzJfuL+$uu*zzy7ex z^Q7lhPo6b4>7FRLT+hYn(IdYh>ee_T%^wl9H^})vL?P7PPD+Zx&t&TB z^HI?&`pcAZ1$Oo6p-y;E!o-A$6_upYk0>*8>`4q)jnog)E@l$+=RJ%)fw6lrP00}p zAUrCCC_E89={p7Kd!q>QfrKR3FetLx+-#4$N8YV&HZ>>Mmc?Zh@4&N-S;iDI28J=4 zTU-135)!a)4m(NX8>t?Ou;A=p^DImXjAf-c6;`Ql@* zdAwO356z# zlYQATe3=$UM8wB8H+OeOL=eZ{ypWoz4u}jEF8%V%d8wju(3gzQyxmTI#Ol!aS;dy( zJ7si|5+|S9U)!y<%!YLVSEw*wW=cM|vu)$<_r436R?!=br9uJ+&WJ7f#Hg`hN3= zzHOM_LH!+Z#6lmX7^eiFIo3u!1?uiSOp%~46tzb5OKrTk3xr`35-KJhe((Ca)svD& zXf#Y^<;2Q~_CX7G4*D{|u3t#>Lqe$j>h&58>Aj4P@9FvOyV~0F^6F}w|H2&|NpaR} zY~IIXMdNc8cX#(F`Xp`iryEr@%XkS!QsNaK^0bN*X&kmZ<|$eRsD?C6Oo; z@$u#OQHxgK7ZE|)6ZFDOAKrW)XwF=2w#FrCG?Z^w>I)Tv`eyYwoeUF~m1Jg3ei>jl zob6Wr$%c(N*#9F55J?e+{MpRrH{;UFtDl>%u9s~Mx*!h^V1n)^1%U^cRRh ztqpHRK?X@le!UB1deKoUgcydmnOxX@ACO)3Z>2 zs2ytJlA7=AFOu-XmK>`;&))avEuVy>grrp!%PSsReW~w!&$*s*n-iV7?Ph0RQS#HS zx^3o?;gJ(F3?pQkpS!9T>IZyvraM5ZYwnDXS1JP)YH3Imqtx|RE5+h7XTDR!bsy#{>{)x5p2Hr7Gt7)Gc<__^{(j0xyfaK>q$&FG z)JHQ*=arW;j6dIglS#m%_X`asi#Kf&V`3_pO!W2)W5jFow@d};K*lo>K6D370(=(Y z8RVCP-=uOGIFO_i6-83gYUA-+osqGce(~|85v36$)%1kR>ABtR_4y_A)AgGgu-1oH zNxZ;#H*BlHZX@$Kd@I0Q95WI-POZ#i7%mONyB>kosA9!R#TdzWS-2>O#l53wku;J( z?WZ5AHwv4I8@&;;4FeB@)8I5Wo12@PNqQks(P-dl*2!yXdwP1r;)91*c|`8ezB7G` z%hSsrdT8OoB#cnJy#d3-#=iP0-n!5%LT@6Xj~+|IL?tB+9ZGSjrFVBTsH>%=ufF=n zKMqbZFU4c!k|KrMdbamf?Z@M;?xWK3{#bU*7^5*HM5P)?7ickGeKmUYnKJRq-y?grA>F(+LLxnPhU76!GwK=Rvrq{t?UowNdM0WBLA3WGSEx|cW zIHWE$Tx#i_mUx>h2$yf;PTYN_GsXyPv0imlc82(PHD2a^BTgjiE_bGz9&t`_n9d-~ zXLreuVd5n7&Y5nTgSno@bmyt|rDrpto9%Z?afvHk;2Lwb5VzW`TOE$cN>zJBS7m!A zZkpfK&O>?TsZ5&kU|MvjdT_}Tt2DoW*{;ZbHaOkeX=6bC| zh}KNm6|8i|Z!<`#jWoZ79GbDuFA=*kkB|^aAiB$*o6|t--1p&0n@x>&aDYTr?QTV! z%*}qXKieT=O@pxO4+cjE0BhRM$&bRDEMlL<%^JEnX{()`MaV(Gaw`c)2?#{UUwzYG z1e?IBtl9K{T_s?#&AM`E8?dtyhOU;^u3xEKz~1G{Js#a( zZpHjW6Yh)pb4bSkw+a_2LyMg04G7?%py98j`weK~d*itNXrStHuUyrm@E{qTmM&n1 zmQ`?;c=Sl716xIF+SQ@ZzwF+hedA;{bmClB=eYXi^nRJ$Q~#alBzcjlj7nD0>sAnEQ)S1z#5 zOS+Qmj_)rzFF9}$XJb1xBd#tR=MbLFJ{ya(igIW;d^uZx*|iaMd}Dj3;d@7~+vDy% zv(3zyx1C{o`aFF-eg`7CC29%wc#72`2uGx5DWSA0rh!m_C_)v%C4_=`5lRZ#rAzf3 zd%0I1!S=ZIVbFfB4`$Dt(FftJpjWWlw&}&J*-RXj8`)JrkV%DVfpcAhgyRLf+p$>D z-+(4x*=|~n)eVyttrJHrHn#JrIVL?h3|>b+!?#fJY{#lkG}ea>4FpCs)*zyr$m!k| zf9~YV@Ivq*BH>;Z-+?-SE4bBi^lDsqt4`W#ioCAw1qao@GW;2d-{eQO_Tr%_jp6C0%uDYl0J@=e*&pmgo>RY$y#?l@UHf=mb z+Jy}eDIpd8d^2pVYlbcf5E{T}&M=~gJG7w4v7-*S;kI_!f z8i}uVkN9NdNSY%Bh*X~KXB0U!N1AQOS?jtyeBB#mlCsn0eLG${C9zghjxR#qdMu*k z(FpakSaVFZTAHzvsEo`_=iT1KH{qDfyroU8L2=(YgK@wOY; z>Me^r0TO%}eJ5J{1XyKHaEKN?HGM=Ff=^lA5VF~YHNRK8XxV?18PAzi8A_|Fn6t)b zm`w2|&N4AWwPK=`TM?5HZ;8P>x9n0b!w_KD~cJfLbQ!u-1NzOeC$+c0*+8@S>4n^>ji2BJ|N$AoOM(n`z^jIk4mxg15S44 ze!0qT8m$ntC8KJfQ}3en447l=WjcPVYZfPFa5D9w#fcm`ak`p)*F`*G{PdIgLc&rH zQtnb+SDH9gypgw7R}}BF@#-6AJjX>!2{yjy3i`EZOi=UU0NGfL23GyCZQ&9$4U~^6 zVP}Fa5qDphY>1Zjf9GpEs0RTG=+K{l9D5J}S&(#`?xC@8iI9EupPKL@t+Y8*;gK@| z3IW%aumq1DW0&CTwf}nspFADYE@Ry&O!}0yYt#hxO6$%uj5qgc;tQ=iI~cE#dL~No zqS;Fq+wLy*8CI=4fLcYWgOFl0!81p?)#`{<(3b9(Ufo$AYMc100ABs^5>MN^OZt*O zVDDnke;*qOe7ppW;do~~zTS;57GTZ#`$Fr-Uah}_fY!dG9tnGIXQvs|b`ZDHDIC3* zrJs)w3%9fgV>a!jKU{6d^q~D{?(}L~N|54{wwc-L>Xe`g!Bd+Oq!K*!DM9|XIj4|d&?wH>72 zp+CN`Yv(cN8;je}q+icMu&tA_2FO|vkFvRo0B!eZ{pbU}I!_f<-TUgi@9m4@z3*IX zn?4Ff)%IeDN_+2b_{Mhc`QE=>=siX8iBb&e54(weM94)=|4R+67AY*q;%cux9{ogw`=d+!S#+^rHDW%0=|k?I`y2&$-PmW z_*m=o)>>jath6-}Tb;;ugqXe}{1K(~2n&DhTf}yhH610kH%aX=rTrMGeVf?dR@VN3 zbRJ{v?-1KxiS3Uf+i7C^bDyamkl6mBv^9uo-^D{$Vm&D`y+>;6m9?jd{T-#Xp49#o zA6j7Te<8L8oUHvgvHgQLokY^aUPnxBV*A)+{TPrpoweDID{GIdJ6nkD1J-($*ghjR zr^(jR*Li{1&h}ZI#MVP>zZcd1p^trEWPhL7>PhEEBI`%2=>xEs>YYH_8+VnjtJp6Uray~1kNNTLS)vn!|5DM39KEqm`C%&mI?sQ=D_`fOCq(=o?(&EG z`i?4;NBa2sKE6xIzuCur+GqVsu(GF*JsHgZ!zTS#pR(mH|4|=*OvHb7Ra!?)Z9{cQ zjOIl64+nQLzfQcj9y=<^g2XFSlAv)bP~|->p1zk-#@a&Ad;Qpj&m;IbWbD_p33RpU zR+KMZkzKK3`pYZIKUz`#zbnewm3uN)CPc?u7OjYRGG+0~xTn&xS513*?lSB2#PsF4 z(Uui)X{)BE=MpAh)Oc-#ND&x1K{rM0ryM;oEK)KoNHs}6RXRL)3>zLL^A8!T<_z)? zBgbhb8y{!*uatu%gTe--2))@L7(>MJ;mVO?31R$$MvcSQct-?>jwe#TfRND>Cdq~c zic}L>&>G2fz$wvj@z`=CQuM@=iJI`KG1Eju%SFYCW)R(EgGlrg35!7QIQTr3rjRm^ zLXtXv;gS_I&1nm=vR9gt=VUBeN|I*J%}ihR%q&ZK`r_rQqGRxjjeBC+wCVA2PtKU} zRD8nIiHS2!Nwdu6ZNyzgD#tYcT_ zyTTM06OjFb-U;k=ggW1C#V+O8s~n?+@Afqwx34KZednexsOSjo1Lz2TM09r*WF zB5%RJw`b^ch!zhXVRS{n{&!lNK5;g^mFNH#xWrd*`@KvTbo?kKb3V$Tboc!wpj za$~?-TtH%{oDZls$`do>qJU%Q<}1+6Z>2Y{^V+-%xhVmP7IjS%rg%TUNOjIqzeaBm z1_OO*w+lMc=zMGhd$kplAIx@ct!gvo3|-aLO?Z19)Y7(vSs?mn>qBWGD(#iQcp(7M zUP>$kem|HF4Lq6-cJHZf3i|52NI`Em)Q6gas+$J=U!4y+MEy;t=(m!v=^b9@gtF%@ z;EVEUZT1|wM7_8K?`tAYZToXXJ9AnBq+bon#+@-{$@Im|rh|U>{2c1~9J;rA1oXk6 zTJ)?3sbYvlJ#XbnMwW;=(ex}HPHq1cX2_nl&vUvk7x5FyAm~f%#5obuE}|M+B%L+9 za>braB?x7oaq&G7*a^{qoVx3@~?~kzCUwjLio(^iIeE#eflS+v9F}>A{^Uk zx8v39$A0u-U_t`@BSGkF@Txri8<4&H(yg!m+3}aZSgoOXWAi5Fh2b4`W8U<<#Jt&g z8F`EHmgcR@v*xYME6FRzyX2L5d-Hyow?FT-yx-@&nfG?ypYl%Ry_ffXo+Iy*ysLR% z=Jn+D<^7QN?>xVJ6<*oa=7;AS^W*a4^JnF!=V#d*2&&v)g!^S$}tyukKQCCsk>b|1F)oWIV*QwlVr2_hbMn0wVwyT^AsK)sYdHNDM|~3MJMI^Qsw;A z`}`f=8%AlXy7+!L-<6k#6JExNaPpGLB7Pv%8{v&W{uEP?T4XS9nL5gM@|LLJ4Bmv3 zmm8vo@PSII+XF63Oo%0BByWig;w^ELEOGvpxDoj9-o1Egv1yUKeEL|N2vaC|GKv~i zIwM{>J)W056?K>AgA<L8Ty`rqIV*N@8(>?nhs7qoHhy#R<%{GT!o>^rtmXu|>q2 z%j5XuilpRXaV z$(wC6c}t~?Pu?ZveJF}mRE6Q>6+aX4o>ax2be|2Ny=AWymCL(NuWz zWJomH$<>wo*RSwjy~Vlb8N(g5-A-Ex(8AzZdg; zuMd@w_YDiLw(uI<-g|2;{5)I-QZ03~A;=F0^4}hT3V*{^K`0dZeOEEBK&RmcH;i}j z{J(fwPT%poo9FlNseBcmhU*--xhO1OWk7v2L)wqN;E#jBK77~_SZRn3C$9(z$2p{{ z^0!and|=rsy`oBw)Q9umFQ?5+@=_MuBHprQ&YH|ME7puD))ucTPAd*Ce!2KJ#eXg? zUbAV<&(^SO*RK7jIAYD=wWrp8y>|B6J8Sv1lh!4#+q`bqx?ik&e_h?0kJh!UyRfcy z{jv4$u0OT@;`%SvKehhA`tD-cn*MbSYg}u-TC;m?*ZQy5Pu;L#!?q0vHk{ZXUH?Dp z&#d>ZAGx7>!`O}f>)O|Lt=+OQbE9qJ%NuJqzO(Vejh}8jzwzqE{*8+D{_8dCrO%Fj zcIvYWpMAgBEFO#fn}}FKl5iO=F%n5Kk^GuStVFVfNZuflmx-j7NX8OL9g)QOC=L@z zG?5%3k{BX+lSuXx$x$L1MI>)MN^yWla*3pjNRAOnERnoTBmqS72TCEu!zihmLYZ1> zk&h$HIHH(F@MLY+D0)goQ;EbtBu@~@JS;rNfVPW;2kZ~@L8 zfxngUKc$3>2olceWW;o$RMRtP96i&6MI<9 zMl$+IGI|CX{S+CUKt?}JMkkWdGs);l&}B54B?=^>3B)W4CZbV9G@c}5uMANT5vc^U zKTG`8#9vD+{;b%46ar%Z(FlwE$B;AuCH7~0SZq=5ixB(!lb`t;CH^Lff0D$1mIM-_ zRA%w!h0-yA`O>j~^Q7Yd4@$=a9+FM~Tq>OiIF2Mw(h-&=>aj#KiY(L;u~sbBN{N;k z@&pJTe-g%!umBP^is*D=?Rc?POSEdSjw3kJ^#Njis8~Oqga?SjL&f3a35P!*LdD#8 zGC4pzIaEA(JV}p`kts6q6n}9s8&j1PF0XJ1zD~jnkN>L zC$dQLv_)jvVlsURnVwDFd^BJgy@-rnOhyNg(M!naY%)58{31S@JQ+>mW5|;+Bz`}6 zazBX=AWsI6_(1YxAco$gI7t{zo*qsThm)B@ zu*wuoOfkf?pO{7wa}w^kmyskjIj;K+(T)@AG(;OJ)=m)X4w0}(X;_3b>@{gv-cO)J z6t7pTBX=Hj-u|%WWjJlB89V z<&`9L7fIVimhU3E6}u%Xt0d3-OtQ+4q~=6mDH*XwV3h~SjUc&%m)@YX^~P|G(ozWlN3crivpxY z8j|4>0Dl8Y?M3_xPv56Ev zYa|n$N$dg=!;;ug5;KOxjv#Ms8AsyAkw;-lc^E1GEh!&M%6~`74WvAS zl>dVGR~SjfVN!8`ROFJ1GE#AjRK${sw@F0+srUn_h$Euc$?&a4vh^_8dVp-rC0onL z)?;LAEZO=t*&0B${()?bBiElVE_u1+e96B``btElF{NdtCrdr0p_{@t#cx`+Y3-)% zn|`h^%oBQ0#=L(;D^|@ou z{m*k(p6hw;hv&#<*=GIbl+8;wui3nD^GloG-u&myXEuMa`NrlSHxJt~Zi{hC+Lod% zd$+v3<bxk76>V|tU?)!v|^A} z4AP2)d@a(8MS3w-l~Vgq$sy$)DEkv7hm?Du?4Xhla``}j3b|#GTNQH28d()`sX{J+ zG~x3uCY37Ms$z{+R;9Lr%<4~w4w(vr+Hv?lKMZs_Fvfu~4oo^Qg_%@r92mmDp!*2} z3kD7hTpY`S0mD4r#t1X9T%46-!>k;qqjtpFe}xQI8U@3QqISfokODChh>^I`;6T8FfSX3m0s;jHu;32MQdy#$42H>IcoGaxf&uXy;#tIV@l+uYC_q3! zpr8Z@a|p8tb5Bw;fkxp6r~<(lI{BMz6{{4piBe&)ij~UQs6!TXud3Nd0T=~4+p1)N zQE;;%3K(LXZB-a8G(Tp@G9xh!WSJ2|7Z@8QENZmRqfkhYtOOJx*kwJ0MTY)+gi;)u6(KN62gLd z;bBmCI0TM`pmE3(5DFmtmGCIxQ6WZ!7@`EF3Y1DvsxZlCLC6hDRz;H0V3Ms0WeO38rVy!$q>x~F3i0;` zRWJ|)lmwItP(qYdEElH$kwQeZWF8bIdW6E^nFfV%bAXDWR7{4x@z57#i-mqHQRu-x zokiV(0VhKh4kQ`6xt=Vp-`d!ogv&IbQ7mHC;ff1hop(EF9&6{T}a6l;BXo4RM123W0m5 ze^G+#Q3(x6~ZjyS>QlSHG)&X zQNId~O#(5}1Wtu8i+C0|B$bACnT84hhpP{vN<-a%!_|jSq(LMcu0WWfof&yCn`pzu zlJ{676pK=hMPXtnA!yQc+@a$QQE5O)#~(9@!1ZA4F@xCb8+VAtM8_dI{-{)%ApuYQ ze-?ns8bfu205dd*p&C$KP0+v!4UmEcb&rmGT4O{3j!?&fKaH?SynNZ7}<29GR`%jGNlui%r(Wc>8vV#E|Dq~b4*6%9Ksprpl6u_ z7BYv8SIn^*-npgq4_{APUnHR;B3)R%Lnu*?6Q8DilxAE_WtD+lB0z1hI6? z!We~><_bk1i(Al0w1))LuBm7}%4nig(Fsi?svTxQ>{N7mQ;DB~MFgCJ!xfIOk*Id~ z!`3(zT|0>2(0f=gxk({PNh%sgDq&@*go87}i3qAUidBcy!;lNi43uFgS{*7>9E(Xk zItv{tQJ6`oio+ljhKeK%^pDq7WIqiZx379Dm9$o)TB0)JP8t=$Y#mMsRN^!;axjwC z^r1*8YLpZ;${!WQ9~A{AfCLb-v~B!E5-K-rVP;iIvq_~gTUju(VCKNgff=Sm(*rYM z;fz$kPZ3l)nxKM%i%+B3{|U!W2=M3toEUx0Au^1&uUz4Nt zN+Dr|v0V|u0xPE$h=M7iSR;ut8I4hBXa-_b8Bn%~Xk&?>rUYyh%YuMqL7+6is2D>) zpk#*#lu;eiVq=N1!e}#A8xO@7 z$5+JL;`f<~O(muZya%+;bVzAcSy?M*HCj#9rJOlFHkDl(Q?Ybuf(3Ddv{;#jlfFt+jjc@JXXgD3(c{3083~( zzo1LcCR_+0Z6|lqm1e>R)Z6~LGl*1UU7tu;vhZMa8t{}KVeGY!fB3PttcQN8Jp-!+ z@mKoEo!I-nrS0C%cvG8mr$aho1lxbS_vZP;=-#i-w{-~eCtSean?k zZtF+VSb}!%=J{ivOmB7IU-g^kk&voQJ{$|&=$g0-O-)rHL$VSt_+-*$!Yy?9+l3}9 zV+$HVTJC*)evbz0>>OB?d55ZtoH|;ua-gLxI==6eqeslju-frh>%GrEJH~!Dy)~$l zZ!35q$Rq{?Ej~iupzS-JJy9et*nZoav#axX3o?2V8FdJ2DP-)8ZJoyjGT{FT{JjXf z_pjWK*qXnI(W=9*%=m66mgnNH{4qOvB;Oy(e!feysjViUt6$S!PS;!DyNRt=v(?95 zI5(62^S|@l45JvU==$hp`!99A+!~{f)5WQ0FOG>>yl~ONBz5qtFr8+hE^Zd4egD6H zSR=^{%wj}lMrLOG%*+Tg!$v{$r|S|XXaI1o+rCKkMWydHGaNq%6w+V{Hk~6%Ub3$o%5@no+nG6 z$E=uF_04>ld;v3NL6sy!rq5u~GOEVSlSRy966RGsw?Ou*1^n%C_AuGete_!jb!QBWNAmTR5n|xnk}6& zTWXmteP*_F(`@O>v!!p(mNw32KAO#(o1J`rwk*UV)mxZoOY$6xY>h>_&%%6aX8vwY z?lQ}6n3JW+vf;_ep~*6JvecN&Je8chDp|HUnK^2aeq@ohTA0r*%s(xR$0Gd>|30TA z2d2m-rbwrz*zEqe36S@FVWP0w!^ z{bsxUgB7CnE5#$9krc18joBvp-8S*PZMNZgqJQOyU&^;9SBU%`mEOWf=2fg41o4dR^}B=s9?b4ohA%VkHXkq_F*ll<1`o02=jVCvE!Vj}>@7@=)dbP-|MK43Us8lw6BM%M z!`ruc{?(cO= zA9R`@;&eYGbKfrJ`jh#|{mERrnZGIKx=ai%8q5v2h9v4$&d}Y#GYAcL4Nw7ut{-2l zzA09NL|2zfy}B;KaCbT%U~3$5?r@#Jyxh=_KUNgHrhidnsaDglC^A>8Pg(>fw#Lq| zl@}R$jjX#U$oZBqTDMKEb=%?Xr!e5T*PRbE9Kf|2b_q}H2dU_HuUvL4Ru0RB^*Mm~K&ReJF}njy6yzAV)pQCN|u$Gq}wr)M+bijJ6VbRGJ2_Lt(oR zrrGTyayTiRSPd2*iqXLf6yrmQklYtUZa8g|8TJyHA;l&&;EAG;Jf+n1+vJpzT9byU zs*zArrqpQq0TqvmkqwHGLyR0^7%Ik>0)r?yQlL>XM1hk=g&HpTykg}m$Tm$^(;uUu z>1rSufnXY_6JWalD+Smfz+3^=2r!94{-#8^9Jzyds;vP&pMnxypGfLMiKIRhLDnw` zI_eHrS6ha{{wdi%M*}4S}9>F-8De!XOtSl zH6cwstJE7z`UOe)UnS`;%;LV7Ww>rO+@Y0QsgHD;1ltK-8?6kQXVseH(S|!oyyj92 zCDTQ++FDjyuh!Z%hD$oIsqfUv)pt7OTtA`J5yiuBm9(}?!cg%wT{gzhZx<@6!y(r= zk{CmKCBxr$D-AkRC!@2%**Y1ncF<8jaGbG|F$8x~b?)~WIw7R5iZL{G$_&j!9Twu`wPZ!=PH#(8@AzCom{`?usq_qI{E#ah%Fs*-R{514TrzL zqMkbmoIBC*MS{NNDZTq??!5&4=TCEvrv$NfM(=ho5#QSx-DM}kIgsc3IfjFkjK0do zM7&zb7G zB#(G?mfUbGQ_daDloZZBiHjL zqwA<;43}AkYtk|rC&zFNMkqB*hg|B9!A^THJ=v1POx^92hnJz}*!3ACUZwd=*Z0iO zeKAAd5y^QHA}>A7wL{yZ`fp8)q1(vla1CorWw`bX$Sc=31v7?5DWkje-?K6L zqe+O0k?T*X zW@HRCEb_HA;`%PR=6ar7{lzRejojc6%XOz`F`9!hjGCO1ZttLAcp`1|+tyHmu5JiS=AaJG1IzFchB6(%;!V#GZ6`7d>BDgOM1L5R$t32#luza#ZBM-Zylid^ zHjA)3nIOpp$w=5x2a+IpWV`yYunu8fe`);WhDgpCIk_Q04|q5s+!+~GmoV8GsjEvs z1<+xL<*ry6?KQN&b|q}IJgl)_9^SH$(H;(h*-#?d!wHeUj@0fN&y~{7fcv2nZNwwj ze%mS6et%J}?Y7Hxck0pid_p?{E%f7r&gqC;i_S^ArADsZy-Th;Tq-wgdU2?G;=V`- zYk5lhd8FpO1nrw>e$b}R@O_~y!o5SLb*_{dP9(q@%cD9ZvdJgM$#nbgNezepfo9f| zKIIFv4ipQTYponTh#WnLJn}Lt=bChKofFpvtU0~ETz6e0=Q<>E-5HTQvZ+$WHSU(_ zPV7QeDwXl!9V@w>blvAGb)Tn)H>GoRsBq)LFQM!3SQ&$Zc0rXIC#s4QP2>x7--l5} zpyC&(Xg%n#K#3#_XS0~F_ck#GXAr|r{XSjSlVG?*Rnz}qmm9955`Nn!*SS08T>C{@ z)x&!#;d{G`>;4~^{?bLXj82)}*(c)~XtRAS z>P&+)yy?% z=2FJ+-eHETJB_~5ogUSkAoQ_)dd$M~*GzK#B^$1GTnVGcxU4^612G*`g0%Q|Lhp1y zAF*72I7zNQu?ttHT)$t$=ntbwR$`#hD@0+}R)#s#!!9L+ornx`jt@ILE^Pl;u2MzI z_Zu5SjmTYAq8wn%OMS3dCoNk&?)9TiSIWa1_sg}1E9JTqo6vvcqRMx#jOs|&pGnX* zrfUzc7u)#pusmVzi5`edAdsqPdCTPM&3G*l@T7 z6=BSdsXzQ8vSSC=yx!1=0z!2#VKhi)^j9)4_@KQt!A|Y9kTOhvR>VwsPmIwZh|wKT zGuk5<^J?XEWK2XSjC~R&xr{4%BCbvclV}X}P4b9Z zhg@HE3BxX~ySmV)+>r5@SQt7IB3kCCPpl9cPDaFcn4n*)m22-{l70>C7{#Y`(yJW? zu7$L~$ycHgT!`pWx%LFwu=B*=wG{0ulNvf**OUPDbj^|alfIe4Q7x7vPwl|q`t2A@ zF2*8%pXt7}$)bAD0HQ$h)0L9&??iI7vl1<$Qi67- zNvxNJUwMX6pQx8}x%C+1_NRrPnyfzjBv+Hh_qhUyx+L?Xc&Wcu^<#_gDVAxv1G`(~ zWny=W`FIY5r$0w0)rj|qf1}u=__g>&@h~o7dBv-I03PP5^>)9V*c4=|S85!4Pi#Mi zFN(jwhMePj#rET!VVz?WZJlHB{^*}FxB7b-ywC)e_rQX!7?Kx0T~68j)DeOVQL8%2 z?sskrwmqy|3bJVkSg>?}BA2iug=-NfY1)vjo-Z(npJ-Jtp*~jBnyp?1Ur*pM4%nUN zroC6LF0%Wr5|~zT0q0)d))Sb$eZNtRN6h}`{<)355wsg2K3fjumTqcQZv;OTTrTju zb?)7^&<()ScLLaKfe0IuKY?dKb%{=$2px_>_oK++eUp`s?dlFbce!N#= zS4~jq&iyi!Y~7oqmfOd8)S-6z?#ozB$k_6xvzzNi|hYO7t ztAb$_PTKZV_SJhbd#CPrugp%(T+-?ta8AgAO5ahn`g5-Qhji>+IU~5eOuK1N-SbGv z>vb-rOgVTV7wC_W%@0`rL{T|#I6;v>y;Nq(1A+aT5=8X$c`rH-X2En|JOk4p@0=cl z*;}y>h##^ZtiEo?+t)pI(3EfMF`f(02I)WTew)C)&3l6#;nQU2Z4u42x0j6rJ8*)b zVRD*uHZ2U`P?qOr=IlE+y%C}Ug%UkC{e-~x^$_2dM_5uo)%F>c_7)OUziam^^QCsK zhe~bQx!8M?4T3i?u*Z&=MDS82Zm|ip-i<>{?+rVJU*QAe=k2{0?7bK5z3q0@7>eu_ zqP|AdC428>d++D=-Ya&>f1CBA@lql1zbuv0($>4wK?|Q9c5kX3#eckast|pj9gAor zZb9Nbc0mWBCVfvO^IjGUR2;#e=?_tzIS(|E^sDwmthw+wYgOtzXjKhIh_kfcVkd zu&GJ#18IUPN+g6t*a)-`Z#@@aRG*tp?VMe4rA4KH=erh~f{<0|Hk#}9ZQu0-Cdf%n z2CX7Hi`za}O07HW-VJ;9y|3&!s*q68MB-(*;cZOzyMbuZe zjdly=gN=TeV4@|QxU01vde~Vb6{+xb6f8O$x_gLRs9ZzsNaZi&I#GeQAZ_KXLWSzE z`&oPyBnoCl-_a&ndWA{~grrcCGX`A;zDV0nJ0;ZFC4+YJSqV7GW#Odb@vS4F!)j(y1hZQg6~P~H14hJzA)On-#U@Ktut(}!&^di4)n^o;oExf;{Ky0 zhO+QwXX=%p9y|P!pzHRrd!e5?*F0vGc8S`^%L8d2Gd4t1Av?z2rG0Aqw(o5{XMMdF z8hqR2?AEqr*~XAif_Ki(*r0On*Y<6w#45kz@Zpb#Ub{fyk9X7Q>!VY0z$Rcq(LpT> zCFiu~g2(La5S43p{*#nXZ=F7~b*OWaqh}JwOMsc~>!de2PiCuMrycC8u$y`(iqbk} z(KG5_+WkE0J*WmRa_@Y=z3M>DwnNzh z=ic(|hlBvwwtW;o0V4powto~KLRrcv%O;`E-mXEfO^XP9b*q5(5uhIJRBy5Sy^8K# zR4y>T3V~FOSL27%_ClF%tF*qM zZ`G4?GmWA#)b<#s5pMoV6tfHWZf{hexpYs(m`*LV#85ekg`)g= zs5EPR<(Mc6Rr#z6d!jiDCT*Rik+Jt%k?BWlh(1+rADhB3JrerbbCMK)NMb{1f9zg! z*VFQyoGhRd3hrh!$oh5!ADX(_&^a30<8A-)B|_ z+k<|-0@WE4lw+)4pAJ(Ls(&l595r?lb+^C#pq#oOP4YhKBJckGF7xBMA3yz3d$0W7 z*?YlwKkm2x{`Er`Ymz!?@eNmFlA1MTnlf&{;olX=nh(Q&aCI5J-heJn*vs64%ob*U80Y86{b>Gm}`8S_CZ)fTq!HmSk!3dxz;= zwin7=d$+qzK}9cVU2#*~D<9=*a*NDaW!)0@sp|UIGD~Z^)gm`i?3TG}%5F+rRYz}% zT`k?f!M!$k-Rf%UmLyTaZjq~A>pDA`C9ZmRqwDMkuI9y=$h3NP5`YLUv#cgFsVsAL zhclz3x*m++ssU&`P=?ZbUiQQ!P zl-S)SJM|HJi9N$!jcc`VHQ~y_=c%^4GX$RrArq)5CB0JjkfQ|jKHQ`6k4vB-%FhBm zbe?*G zH?g~^pI&Jkz5X{?kGOgv4XSa5-AhJ4<8llfTQzWU6@^a0IuGfox780qCF!a55FccfJ+&UC4_@#pHs-jR20qAXDD{N&lpe^1x309YG`BSR zr>UIvtey_sJ2_NG;`xc{_FBHD^oSs&j`x_bP6cY4YEAXni-tFuny#CiCOh9dd=#2g zpnI=tUUxWz9khBSw{m*0E3St)ps>kQU4k7fj5Ik#?X!S@a2%#X>b=i$vdKz7q z22NQ$`4p5zN8+?r z5WCXODjkq#r}8>ZyQhQVpp|MuzJ5%_L0x%pI%u|>)Yr;iM~;oui#BRREmsoWGkdf7 z6}QaOxcO-Q>_XlZ)T_|9xmn|YDHmsVQj>>T#hpK}DA!#^!GXpjW%(@w<+=1q3w2;s z?zurnv+_s?QVMc$CN+WlbRlcJZ~>)a?KU?axuy;2-d)ys#2kBIw>dwSzXtmYDWPDf zjv#SsLp+a?xTzxfEfkhfXgb2X+Uou5{RjGUy^`wO#u1JFjUyWT8+?emK}6$-fqRIr z&m9ow3BLEKuhFk@SmQ89gJ0u_3*HeIkON9|B^M%aI0nU1$z(`!qd!m4t&IV^kGpX= zT26&9p7_UMVDP-+YN*UjiVm6ye@M@6kGZGOQ?u7~tg@!Tb?RqHh)QxDLk&F@i-`Q# zhJ&utZs48>@?@*pNrLb1Q2a4>Z(N=DM6T ztt7MAb-Jg)6Qq8U!sry&DR-==F+bLIdX~|3A}BiTzeXQ$ovx%Q+e-F&i6#$2&M>X( zjC+*J;i0mVa&JoN(O&CoPh*%lE97do*&XEh&^8W?3 ziI|-AcFGG;e=IP8p7Pqz>r+lt^`R&vU)j2QsY>Bt7);)(07W=<{{=y?$}%<{Ukyl6nu@Q?|LJq^zv$s-uSf zatD$M2j&z4dYG$c%oy&^^qjtW-IE31^~ne{ctq+4G%}evEVEQwy7@q6ja%fIV$Lqh znwwSbde1Eh8CY3(^`u+k^PKRQ%^_ZLt-y8069yUKylk-~+;x4i$ryh1j0BZN!n+)- zy@zF4`+qvVS82H^a&`4kjjcl(cV*IFF5(6>MLh?y1|o}k4t`AiuVh}mPCHvnyRL`3 zUg-&AtuIh~&0^4aL_M#ZD$Pdt>MK2Ei}qjbac7ycT-P_(mG>(3u*~ps*Y$%)?)uTp zY)`oRNFyd&rRAO!*B9N$&9ovX>twHbx@p#?6|oK)>PE=j=q0}{bY1ssZg3+}-gVtg zvqybhtiug5dhjkKCQ7Wm#97i@QUZwMs#3^F%|L6>z{Mg8edom@ucUwmHfvs4xPRfm z7e$9DII(HKRpb_XgiEkz|A42c`)e{w+jQ+~5~CHoj;l(+^qwLC*CZfY1f&OQu7bqP znoSyhv3Rj~p_o6q@aRGwBf%!>prM;><~y3|B{-z@Qdhm$Subv`7t;eidR}diG)No7 zfZ_(sF&`30oC9&iI3GpXAxAtg>md$7JI(>?NVADZ5}jDvlovQF#d6y(J=j<-KzKP4SJ-8$6Yjl`h;6@OOI^;Wx#f zJKRZ0Nv@_w{_f{WcRd<;y&YxK;CO7-cEWAO?+AYM+KnwlL(tfKm`=Zf%JBk-32{ zFP;TCFL*wtX(EOHdU}az&5${uDV@zqN5$rYW2YVwQjZAp^k>F z97&m(1Lr}Luy)`}2r;kq1ohNp`an%4M$|#@sQ)4Mp|3It{VW9oy=!p_-XU<|?7$Ce zADq#2#&!P@WvRw|QYH8Y0q=Kt_q4QB^`?uG_OLtR}>jiaWr za`zYNf_QxM4NH{EnHu5kMd!=gWNTnYXta8_bB&j$L#2& z$JP2-w+yuIU3mt>564WNh%5V{uEdy9xIM^ja3{CG&@n2L_Q%nDYnqG&nqHOphEQ zhX<|gk;AL7ZCEh#g}u|g#I~V>>QCZd?>37*el9zgfl6q#Y~GnBrw^#Gn~Zf&U6g+>&Weu zlWwiVbMVRucXYH`B=Xb&!3_5AS6bW$vY0E*y1Kg3(z+|n2L-8Fv5XNjJ`)6HKrE2L z7(r#d={a%*Pnrn1@@DLnhRlqND<_XZmQ)KB+ufxlC0Ckbue4X%Y<0D@SDL%0Q+e*# z-DO$RQBuDU?pBn+c%ao&k2`FW)mB~a4xyFZbD*-O-ua4+2I0+5%C$LHn_t1M>fxh2 z)ox{qHpJ6-z~(gP@Ai_58}SfrSeUEXL-_?cuh^`!jV7xz#aw7&N15!`5y4osj=;8E|mCxQHhkOHzzt&}Ia)01D=`J}_a>i4CrrwF;3_aY|GsIJ0(rh|o zI%9>S1Xdg+@UsuX0wp;^&M0x<>U34Xon%4csXkME#&zuUX*a`+9_@O|K%0YWe`B{< zi|Oj45O?$4fq`DKyrg#|y*sGw9_}`~9Oy$DUCnsbV|3M*(?FTItebJ2W?W7;uy)t0 zo-)_jvc@t@wejGi-W{0YIz1N;Bq1Kye6y>5U74$XHNCN|r{RxX^@yVp)!l)3Ht9aF zJKtsKHn{9&JYOv9&XTx~?C#EodPjEWo3*Zb##PO@Y>cafaakGHYUTn|d*NDO_v!MK z@@s*;B+hjVYTqvDl?J&&&UTkmTj6k;j8-GHmX12D4|M%#A!VbM~Ol13b|$it(DTBe{h`X9zuG_;nIgQ z3Qb324_YCfg>}>p?`RbD)YsaqCd`CdgoDn4;Hw)9c|;CTi|^fE$Ni9h&(Jj#qpHVuj3+8k*4jOA_U`Oq+jst@+GZ%DJBQAqJQ)D}48aj?eG&S8K zHVXDpP)$KC1$F=tOF?bZEh!Pu9cHM}kq@^UF5`4Z}Sn9kr`F z>Q{HXmfz8wpOxQHy}e^uc}FvSW|x(ZXvhuG#%ifZD&s)M$(xeFBxv}^Pr{8q3A-f} z;Q>dJFMp+uo5Y>u7|I;t9>WhAl;VY{J)PeBoEyV;spCK4P&~cDih~r?M=?J7j=kLv z>@jGHCX{9=N;4OwiR*&B9VdsZ?V8+JbH9zyXD}OhXxVn-HRS ziXA-gFGq7mbB5FOsnPj}&z|8F4zSS<0SEel2TTZqLvTj)C*j%QtHaB~57G>D<7O%o zw@lGO@pdO=;&~uK*M6G0j-aNW{9FP?$PfN7+Kgt5Aw_({)zIWo2e}q#U3Iu?bCqbl zR>U^P@2ziNfi%WSH57vhAaRlA#7N2a< z4g5FoGd#Eq61gfpX0N}0IUe{m!bkj(vdigdaGk|i=ES2HJn=^|ctluJhZ#mArWTC{ z=p$0h+iSc;Uyek&m3DVM#?66}avO|8-2-nuG+8o)h9xnBDG_EcBV%v4PGbIIG_ANW zC^CO`W`4Ole1VtzivGi=(zu%4bf)Y1z=46_6NF|zfr$LuAhLEdSB-hDG5WK=>fE-bt18HXi#2&-&MX=a0CIe%4E>4jw zk~K}TsA5sAHlSdNtRh)rv5KmXW>fICcI;V?FLq`;n~NaW5xS{&O71!|$Cn8f@p;(_#GZ-<3b4 zPg?EM;p`Lt4f6J#H_vb%KYsNzJA3u|w-bU8X`nBbKk)oNI~_jyHHtO<;#WU^`kn7R ze&(6e?>0}rqklN?tKaTFHT_M`eDBdy&*A?1+m8|UR}Yo1;9C2RM|$+s>9747n!>N) zH~QYAr%{TU*Z=y;^w;*A&+R`q{mqZH^=tbNp8m5B{?B)wN`F4XzgPeN3_pM7oln2> z=`nw1p7H1U?7qK=zkl)f>0RFXSD)6OnJ3HHrZbhZef*gERwE5R{rx`$JMAa<3r7RK zd)8R^(ia}je|hnA^umiTy!gzs`g1z`t<%xp)$fhw{Nk6t^1_Sri~g)~I#B@m^!{g0 z$IsZSj^lk^*!txcgtCFQv)?pcm>)jU2T+#K8v6VD|AO=V)aUW9YHn!s8EEm3AARA! zdj9i|?>+iFzkK`AZ=L?}(_i>3AAR-nUwz^9+x+_c8*dCZpZ@9#zxDiQpZN@m`&VE1 zZ=X+}RNk2Xt>>2-3$H)?Ed1kNoPO%xJp95V)sJ{Q^@zc-0{H4>%qyIAd zXQy8x#QELdlScgWTi^XXXalwPUqAl(GhhEE|Cc)3(9d(9m}@uZetzr!{=L)BJbH#t z^ylY)=jXro?C(5_GW_E2e5Lu7rvAm*!V1I6`c=h*9(@4=2>1G}E7-|I%-t9yecT{7&QR1m3^=!ZV+Jq50H{&wQHL(3htlH@^JL z7d}1x_;;T9`mpi!#)! z?mvF+^!1mX``SyVt><2P?r(qN)t8<-ZGHB1|Ffs}pMB|fzx48H>kFs*U*MM*kg1U{%cK3yzF%uZm*vX-xQ0&vi$BNOwZqa`nONN_rK0R zUpf6wgJ@Lq_17DXX2buS{%daNeFy&Z*-t(F;#1o7XThJB9>4LzqtAWlBW#k-oqiAe zfAo#Vzx&L6er36zWr;7H?!R>Xi+^}}{~w^u^=*P~ba{o<4m?lM~g#RPr3} zeD(DHS5LpU_$KDj(&_yr4(k5O={s+n-hbotdt-PnbKX0>e~-E}P=tKVskA3m#xpZJeqJ@Si< z7a3YV`&Z9{cJQK8!yfT-yMf_~4mF{J}FCe?E9&7=J!UBchC6y-vSq75(n^cCT~(+O5^W;9ykrx(6MNHtame`h)R4vlja8;ny=nk>9l&qT|KG~ z&oh6uP+f0U8?WAarP$RPvX?*c>)*d60Ih3=VTVNx4*71FY5Wlru5{0fM(40|xZN2R zhn=&m_PE$+)R!*mmD>;UN^P-vK3Ch-nu?v)WN&|5y!^?3|G`tYvV(3PNDg*A{bkN; zqsh?`dj{}>e6M@2nyI_fA;We_&a8`FcQQPLB$TY1J`$){PAv zxB6q9Ypn3%RZjDwsClxvJNsaQmbup{mlj*TEOt21V!O3-kORoVyW`#EVW%~|T3a@S zmX?)vl_zkW=L>`W-mo>E^jhQYpg%gFTLD30z5!VDO0fqvvNTRmz~cnLv{;*-%G!he zdxk;L>YwE0sb1SmjRRw$!o1?RJKi@U7Q4f4hl4wxYwmYW9(9VrWNdse`s{W&U}Ht+ zWM(Tyuwp^m9`w(1pU8G=JnnV=W9JYYS|6N4P$1q$t;(eR_wpS^?T*>V<|xkVU-pX8 zPHWi7*i*4R*@Fg;TPM7GcMuclwc_p8VWtJe`LMcHVElO4>h?P#j#)9QTSs32YF^t)J|)>vtNk%^3iw*yg~3mzmv9iSsb^zW9aidyR+W{#k8>f$#8fA z&ebyEuNTH5_6CD?-qLY&N7@o2j=P7Q(WOskH3%?d;r40;T3cY{$6dn4GF)`Eb109l-5+uc1;OE+Etp~3MQ z_&<;UVBwZ}AU1n3m9H>fdl2laGd2ms>9k%}B=R~h7R9heeGVj>96=?>8U|WBi4#87 zw{3C0T5vU1DWYN@iE?#@S|)>?6;PF^R~r=zK0GPens#JjOpK2=YF_7=NA9$SRttm& z@FMYs;$CNX0{sm;aP!fq+Z%;wfA!YpWOUTs=?*3%*4oc_LI4p3?;v|FaxJB3ZHr%V z9BlM1=Owny&NSPob*!fk0qf&z1fuCTv0S5bvszgz8uf+S)h2LQ9`GeBV{e~-yCZ}L z;xmXwTUw|#wm`ylqZ*IbGQl48eW{()z#XYSKrOb zuB3fPjWPxND{<2?O4L*l@qRCmZ!4XXOGtlk1k()dMeu?HrDHiSng(CK4JRlLkq0cY zejD{mvSnYpdF|Gn4!?9-Y;z3dXYBPnhofwF#7_2xC<2l>ORb?9;3dGw7HaG3mHA4e zsBNxR))z0uzESibQlVVFTA9DFtQ3Nyw1Gl9`wYy_duW-+aIuoKMgS`XZYVK&q4oCR zCY%ocdBJRR=G>9Wy-CO<%pWHPlhBLvzr< zVXMu)K|TG{0r&h#_T)7Ab`OQ6*M(w1RtCA#xh!TLx-@=!$9t{*9xQk$=3WCUI>#uB z%pnOY+-miD=LLj|*cj||;o+k~; zhm#|ej-F70eL;~(nM35yYqzv(IPN`|wT_-;fh-{|@}th+h%u!}iE0M@w-I6BT+upY zaC0H66&wIx)xX45#|=$wNKN6l}L(@YV$sEc4^TgjTElTyCy!o|cl-A+C*Z81 zrfHThzEwTp;9X7WxY#sLy0k+e+ z{p<-HXk~JEgto=j!!lt3k2)EflW6sFO05%nCd2^Jgr@*0$JyOEIGa_~U`|IJq+TrU zHNgfcCs`z2gUuhez|3M{tC=5S2pOM>?E&9k%$cEcOnM}Ahb&D2^Wq#1TmAERh}WS` z7{;#7G{G_iz%|8j5BcBW6uStf%|rN0anjS$&Qm5nB9q}Wv}8yyc2ma!n2Ct({y zG&^wROtV3OA{|~13>}V79u%0d!;4HGh#1V`z|6eeF~$JC(O}Srls0#UlkIK6v)$P_ z7-h@}4{yUth6jweHQbdcw%h3-zIwe2jvUBHU$)+l+9SKn0=(57G9KcC#g4IC=4_w9 zt-)(^gzW9^9z)*sDRvK!AfA!b``2zsZvlcQfhJRZGgKK<>4B(-BSO3&_A2`WlNGWi zs|40gPh8BBQ_6fwGIdO!uc6`;8!eOpv^EcAWPJYz31OMjxTMXBD;$X1$9y)}*%|A; ziz8 z^?GBq^5)rG1w2D`vy$ZcPd@0&ROZWk z`uMB2s>6q&WA)oI^J`f!=7p8&k}!eeW%E055S%gH5!PF)Cs?*81wSD>d1h4XP2i`< zXjI?5VfTn9QG|E9qy5}k`K9=fHqA<_9W=z&q?m6Fw>vu%Soh2T7U+i)z=}?4( zH-=b?#eAo;TWmr<2Z>LzRe9fJNy0aJClysGXRG<+0I}b`CCjJDET60M}tT)Uxt-paR@E2Z&^-DfW(DNHgY+thqnZz(fyfVfiX6v0-9{GC@AF`+P^O?Vl={%`?%3+M zdPT>>%RpoJNS5t zqi!cpY9bP-KyG%;%i!S|LI!o6DS*(N(3p}*Lo2Q@O4C`K#Xw*k0?B&N z6cpgT-F8q)t5{yGZ`SdDozSOW3Lvdrx%!{+shC?Gq!}Fj~5+|4|HM`qpXJM z*B1{J_4ZA-K9G?lK%PA8C;`&X=W1gsJQD9#l>;KCj@J;vY!~NScnVO5zyK=(8V`PD zm|1PlTRS-6frLe)nAfYJ>-DWi$Idz%Zh<>4Q#dR zxTCG`O7n_8Kqq1;rB0VPS35`5wJl>^GW3`*S3)-mnZQsuZlyZFUo6c=V{eHq^2q_v zALS4izmE5D765@|%rE4TTs=hv&s9hrIq%9Lpn&&(!YQj&C-OHKbkA`ouN<0=gVe$dmm47GtRabi*~kz1+~HasFnDN zABVkX5UxkLxu~u8HA*SUEWtJ^$;aIy-B1AY2N@l3vzAPj~;P1#`^i!Gou%r|( z3A9K;{}^e)xuf7}i5=M~NDW2fc00H-PN1|IXQ{whv2O$?X!1-Vb$tZ9g$Rdq(Gsyr zfY$ILXS2AA93E=ni(6#)HJK2}S(_cVdiLD=*n2=DPk|#G7XnsHHjj{k1%a61*M05Q z?_*V+2;I$>9%haf6zySmmsR!g=V?IUIB2xOvvPS8(ZIUL9gGLe$_}6`0w4@b(Yb&a+Y^}6 zCGkb$>ZMSFnBJ5^Yz6K!UQ$_~3}5E*@C@;Khv&!^E?NN!mg0n$NB3i|E-tKd1&ovR#asa_m5jKLJt<50lxQ4CTO0 zgGwKT1HtWNq+PvY-IN#V(wB5LJNq1PA1^FM7jOzgivc6-w%zGb{R2ta~q*o%qo?4O|Uok1aY_OXnENu5cp%i76o6WYk41ibZQ z%z(gaZ84t4Km=vb7iL5~&q74S_7DMO)W-KulntD5T$8Wo(M<&>9!nHI4bYW%8crlh z_e(|s>w$D1Txf%Nh`6CY&|xS<5KzYpy|GekF4Q-w3I{qGDlVGa!6V~75v%v}4wu=@=*vxnj^49Jyz7@f- zKG+Soz&}x$n0#hoXZH3SGPFE=!uQzQc+l(M))+r<;L5DfrvuZ2-78RH50f-?KBm%SL zp)%+u)?FwD9E1#Z`3{nQ2;$W$v`TwfSo2DyDccyP2r621iCH;aV7hEO2}A41t$0ty zhmu92_=`D|cbP{a!5BU%O;(F@(luZq_MwNul<$KzTDl+$zp)QY4qkXb=Lq*Z(wm7{ zj}2gq4!?jgbl4#XXI&4P2W>*ZU_x87uv`vGel#MzNHx@pak19CSgYHYCxS)UEW?pu zn1vLd>f@y%na|)0=p-XiJky6D8yk!k7Q@UZXmYr^G$+xG9uHSeS~wozVd1P?k&Ip>7i|`D;>mV1tYl8Bi8P>RwOm`SV#MrIymJcy18atkO ztFQ3fqyQXrP85f#!hscC!LC;@sz5;F)1O9g?L6?&&g}gnpGHT4xN~8&nG0UVxsa?k zhopR9?D`33MRV;(Kb2o>v%0#pNNBmSwa}Cqgp!8H8X_!UjgwH^Z8k~RE4(Lez_qvC;r_F)MC6H_1b`HzLx1J(CiBW+HJ&8lqgTvOl5-g=) zB9>>B4|0+LVR4?m6|y)8N~EgW!pA576OMO0Vc-)=E)m`_sH8ZCVx3Y`$|RWm?!z(e zt4vzhNDoBxOFm_$yYAx$s4}IJq^wEl*mW2w0I*QMu+y7-1LzPx2`+8LNM^7_2xufW z@ci0E<}gCCbtKS0Wr7PjL_jKiIr6;n5#}jIl(_Qi6V9GI6h|dANj5=(YQdU7aWeQS zxK=6P%&<)j26gE5=lURe`Mnp;R1901rqk#* zZs8+&EazsnZD|K3!fosi+z0(SZRx^?l9ip4Z%K`nElP$Ap&j8l!*7n1LIh^KCzfEI z0?Oh7(n2H}UY-1%yDZa76I6Gy(_L%U|+M$;2xn#xd?!)v#ejxnM1=R89r zwj>jm!6%E;Vi&|P1&eX+NXO(E(<9g=-x}nDp9l19cLRk&K^NqY@%+Y~LUhLg2$4a` z9mV~+JD~JQF4P2}3fv1MH0F|DQXkCe6y}`jMqnx)StpY0ljW0iI*Fuk)fS+;olcpz zfyd_k_m>!87B27{=m(xXK`qB^FB?0zHwBcj3U-k~i@T?A}Nj6nKphySBuk+7_CLLj4?MkS~Y|?ekD>X^*~EGK-Y8dh^c>1a2U3 z1A!X|+(6(40yhx2fxry}ZXj?2fg1?iK;Q-fHxRgizzqa$AaDbL8wmU|2-No-IZ{q7 zeq+4s@;@ty17Ge>mdKaJlS~zW>Ul_sbji>(hQFzdkr_WS`6*=(zcV_*BagRuK>;Pg z7+LuPnM!sC4?7g1ka|R-@Z9bC(vp&)I`zR-5F4xyxdxo2vFmQ3NI~-41J;m%I{P}|PQY$8A4;Neb-VlYO)*_|pE z6$(Ej5=X2}VE{)D6w1lBC&amvi<}??!AmEPs|c7h6}F`{5jU#Hl?!DSbV z@~|@X3>;QLjDe`LM)*)*WIQ}kc!Gz3pK`dJx5csv;X9_MV|d~<0*FNZ$Ymo%m#kPK zR(gQomJ<*oj6QA=7Sypj{^WYAX?Rb`QInmq!n34pMr=Z1!W3Thu`sA}yofS6rPak~ zN>)u(AU`gncJqyTbEVo)#>!Gp2Nn621W^faC>>TIE^>D`F~Ta=TLsDzN2S zvfHu^3ZCf&u@3gGD0fXcnFKlnMM839AhT8grL%9=Zg19#`9@`ZVTGBYvw;$TWoCA2A!(9O;Ne7@~AK72tFNjjueR! zFhGK=*V=ZZUmvNOgbjc>V091>4J39WXv-2v5Ku5O*5;=bbZ$i&oB&i-^Ti?}pCG=b zx~qFgcv=hlm%W*89Z>qNINuD!A4K@jN%853U7V(L0@4S_?IYqh#SdlWbLaq&%p3~n z2(-;slw2FxalkUD+9B_7lXCiNQ8z&#%9d5Ck?0Mm5ysvjZ0eG#EZ!>=t;?aGx8dD@ z%QUEl8#7xm`-@l}Pbl|Pr71HHARs%#l;CA3VA%_ShW@Qy!N(|bKsVo z4dq5X74h&eFap`d$9pGP+i9MvDObesTq&sLp&}k(9pUe3p#D8(+-&V~q$M2Tl~>4U z*17K-rjhITS~FQ_yt=CFz)_-k&Etf(sE$90Gi9x!mVC6M#uq}|h{f`D@YqydN?A5w zfi^^6DO<$+yE9~uE?q7nLM9LSKow5J`vWnV;;+NEDk@yc z<`a(+<5miorixskU}P5`W@JMO4kMX!m;M*Z{4cYw%D}er)_|-M!-WhS8V@Z&G%D{+ zvyi8PDxp-BvVTNM0u%#Q;*~=6N^jv+$~u+Ak(r_yt#}34@S$?Dl}<2C5znxij#{flC>`H3$Su;w?2C(7fdFQC6_jK%qeH zQQAa>CAnfwM^#EzcUQUm&cF+BRnvrQ+6g0bxrGc~6VBtGf#)s*PPmX65H z76){}E83TMs*-uK$PpG=lPYnNlHtgsAVqk4K&_H;zNHwbIG8H-f!QXorrJsBgj4${ zl%v8|bp%39(koO13=TY2tvU6_A)MI~X`f0_h}>8u%#b_h<_qHd(#kwZnFh^*qfDrX zoLuRJ+XyKr-6{S#{S2CFcCgjpJ@P_fCX&T^&C>q?>xF8{)T}c9_dKeZskamaD5?%U z2Uwry(f)!Q5T_mFGljQG1yUx25Wzf0Y1dGxt0kPj=R68NgBOK(A`C&?O0r6jMzvV114To^8VYtbMpX@8-2KE!MU-m{R5+^ATI_{na2}zEWR4%Z4 z2?%TcS|@;l`jJfcNp+FdLRaeI9e~klojdzcEJ=#ohT9vs%BTSTN=tQN3um`ufx|QK zfgmrdkJrH)gHlyanF3UG!EMscDRx0DofLa$ege<>AVb-Qwa9={-6C^TBC`tO8+S*$U5?jj zb1G3VU+SCzam*zu>yxn1&P#>)t;mD2B)lTw$UPI+cCQGh0Lwg4PP}$3U7$^ZXVMGV zfit?HEOP6+v^WS0MvxgxJ@xQF$f;W@1D~5uR)`OLNDk8_>{`fWv}X?0;7NVllS;1| zSjwM~gW~3F5KYGYc$}z8JAi2?xtWcD$dQ)6J&~vd&l%D=-mDMaBnldJFmlJ@Amf4h zSZ8n{@-BTTqBjxx9c!{xf+WhGOnBX_ zE;OpmO5^U6XF^AS9g?E=aw%}Y82&2VywyI0ndm%*V8vu80!EM6M`)=O<5+f*YHi%P zNx7u-y-H@1vo--euTwU$BQrLK@aA1!YCDXp!I`&k))Uuqt;|QC2B@%S=nE($VDIcU|O(IHVZe zYHmx7(NIurRd2F%HRN!LsF7|5(F{uTz?HrkR6dfb$}7$|74*8T;mKRY?@!=+KgpIS zC#`<#GT&q=`$YvgLmn!n3jNM;xP{czLO86{P(+Xl=u`vC(O^9E_v{jy9rFDjWU|oq zha7&{hcjn1X1f~3(4y3=dPfwMxI}?f%5Ki*Hq@d6SaEhLS90=Y|2^iE;Nr>iBy)s|Yv8jL)%h*-kOumL|1_3EU4_aajS*}7mzPsao z2y(FTc2B)$u5b-y7coSum#m3d|27HFd<~c>a^U%dxl>>-b+#{xpJwbAQG;_~8~5J6 z9RPhKPuQ`*h)z9y0i}7T&h)M$y1=SnH7HK-Z%UkiN#%Gz@n{sviKE-5V==qCS#QRQ zV+3Q?6h0UMFdqpae4VXrZxDk;iTx&AzHwr|D=cw91o4TJBNK5;MU7ex43%z6`=1h- z{`X=NH^xQrzBb6(C3>ZmVm3~-WN+3UlT_e=0|m2ln`0iq7Tsu#1btND{tiQ1Q&N|` zVx_*dS!FA;9S+57@xj9E1a#HEWEeT>Uj(M(0LCC7>EHCOB2LyB#r8#|QLSV&C26j_ z<)4cmQcnAEvxLluMYtf6Y699XsPc$WHJpaHwm7*dl%TG{1(MEr-2H{l=f2t9dl%|W zo!+i>9RgI8Yf*zP#6d-#jCFdmTfPI$kpoQ+vtnhedKHb zi#gB+G#Wr+3VXaK_V7(9V^&|IJ}_Ho9U`&z`mV$PiPT)pdt+tA6MHhOf0R}661`Q- z9Ow1jUV~Zi5s!t~Z>mIW3=>9avQ>$5eHMj)+h(Ovkr^+7qi|5{0&6w((74R2jT)tb zdn(SrXtmP90hHCvHZ-t2F%_YxJsfEw5Owxi>h?hclrppv_=Xl_FF$>4hIHE0g0QxC z_U&N4wrweh8Z3JBNX{ek#V(Mu{ek5~RNfzh9;gm-VH%>U?tYi(1P5}h(X3l_m<&~> zuR^3@XQv~kcctR3to`6eBH_)g22FH~&Q=IjPmUd^|d zk!z(V`kKP`;fI^*um``8D??T9ad3z7lc8Nj)#srq1uqF;*qS)8^`EPif_Qpr$tu?D zf#xfmf=*}_U?eY1L3GzFGuW#aG1N3kLvAMcwx0zJzℜ%O zrm;#iM+pR-NEZ`)C1TVkLMwIOX!BJwkZav;Luy7hGB5+s0m@R16^|}GPXty%3ZW>X zm#_=BMUnhvN_=hrT3eHDB5R)oOD7;N(?E zZfO+`Lck^#C|0UY$Pco3RJtc;q$g3+->49h)5Fv|CHKtnzB&W1(IAN;!ReLwErcGZ!XDo6@dVaw(ZT|Bzw>nT!-a~*jIx(tb*b;WKl;pAb| zOFAR_Glg0Ly8V^IN{$u<6OKK{@yh(u zq~`n)g;JQ;tFgbt{JnI1P=>^j*-vA&<-!N#N7%|P76%^J0TaUD(h=q>FmNfRuyE#^ z`=Vm5xItkjJQrw@3oZBz9&PwKFvx3qK*5fWUOu!#WBIp=)V59f!mN18!9VM)cGgG+ zO#!i@Vyya7zEoMOmLYVvRM6=eHi2XNgFY*owrlDRp&0wiQpiPU14fzSf*LSIeB{VL zx*eMSErZi!MNF0oF$FT*swmL}6nIws3hg_dx`$;n<#A#n#&lv&?C~;tB{|vgQ*(@0 zYsqJ)ZAf`g_&_ZULkp09Q~CxVx7Nk+!4ddmib8O{VVBn0DMG7wU~-D{ta!M~D_J-t z&15nl%OyS}6X}GTyz4S85m(_0ktxG;Q!PGGuIw-;T8PAPBjfO-=Kw?pA=6fM1Q5ZM z&`g9jatsB?-P2TRf@~Q!hU@`hbQ;-*00-Q|XwPOl%YK5sRHdzW^;I|s!J>ec^f1F=ker^tTfBJ66Qlzi!^*@Xaki-S zFuEc<_%i>Zl&#cYgphJqj;kw|s2CkV{xqXsVjkosidOWJfCt;MnR1-FA$gY4^uA= z5P6a__TK#?%TT9;jf^Fbe0j4wuS8|OUyXb9{WxuTJKODH> zTRRT%^uhPgHt_b93;QCXk|1Yyl$=IbI-r}g1#k?|8(sa~5Mmm`=q|v_Mv*W)6e!W7 z2yI%=U|<9jKypKAA)6!+&SADC)?aH0abnJ{N20l`891oIa7xesFUO2x@9{98;|(GX z*|3DFy6r*r;aU~i9C`(_PQ8TL)+7$m_w3l5o|5Ip)taJ|n=KDzzT-f_>c&(Ns=EiO zzR7hEE|?DsZ(C*gf|46{hacS|=s0sohjbj;8>(dwzD00=qtG@&Wx0wJ%nFx8`Ku^w ztJNAO=WY+P&?n(V!ccmw2%DDtaTb^$I&8QVZDn>+e!<)lCic5xiE=hZyXBIZ*hWeG zT6(AWt5j^ckcK<*I&i{3*4HUWMSqvysRpMcf3BqaN{CAlaa$TCsyE<;7QpL`r%>c=8P-F=&uW*%5tT-Qu!zl>9!o(|FT0c^VG5mTLLnN`sk3xq?f1! zYL1Bl0?x?Y+t!64a<58Nhck*-LaDShK?~)?TtYuKRpH&DqZAqr@m=>ag~6E0WJ_=$ zx-Nk>K0z(H>~BePbuW34AFHSMdEkW*4W_};;<*up~XeyjRRa zBhnHf>>~Q|a6J*Nd(=I2Pmh+9{BoRL!RRKfEyBj*6y^ zoG2k;)J*uB?MqJ)5Gzw*^6el_Ca^>0XaEm3VVlXUU033?bjifR^@p(NSC zbBRFI0ZLi8yt(#h=is4(ikg(^L(zywLXL-^l_5z38yRCpe67T1Uq;A$Qg(Yo6mcgB z))WC4z#nEOXW$!*+#wsmQ3@u3n`4E_p&*4MmXv>xrT%-rEP?sv`x^+{K;Q-fHxRgi zzzqa$AaDbL8wlJ$;06LW5V(QB4Fql=a07uG2;4y67eYXeYegxE`KF769iB}EH#5zU zNx6t@W_;0j5AmVOr;7^^?+l z_+v?Am{$?BT+GfOQyPLwr{(7+d*N7_O_3Bw5^!aGx!TB<)OA*+mgF0szxs*)@y~BL zxb;vT)nhJ_|99WNb^e+@rof9xx?_{-U|W8}ZMx1{mb?GuPptf3w^+>*zU5aQMDE_@ ztNIX^JK+O9A+mW9pB&?T9nn~wX%t6pjb7E4ghry{wUYUqcIK-OoX4aB9>qDXjiQJb z{&Nyr{qd`}iHmpkbm8hMv-Ek`fp2B0O|h`|Zi;Mc`vI!|_! z!Vb!K!)?olJiVz>D!x>zLAr1xp69NevZRMXJDyZ`0>DKjSGGwShao3WmBVWUJni`Y zp`k|4(22#Q*aB zTM>R-zPqNN_hPm276AF}@86oc!(GB^1(A|aH{Z&>_&0q%em_j&s#lcs{dV$m378f(bRp!6%`{OpaKaT1qF7v&N*pF(9Xo!D2(p4bJBU*E4 zfgiF><;?H{XHg@~Mjfv?NmUJatIq97_o*o_fV3Go##3NoVQZf2t0+Dr2A+)$xbT-5 zUB7WQw-NW}+V!r2Txyg#4dD#~u|j!1Y`7%ePt8&! zD_5o$qj5h4WDMpAiuBu1?fI^e#d`vrT7;wU&WpS0`#kZ9lW+s@>%> zP1QzK%OCx|%B9&Q*>z4oaiE^4sp=}!?!*J9W+&4mq_|B`_5R|}SLp%Dm{t<5iZ^vp zTKkDs{WGOY!uQncToo=bvOQ9;;bkML^hwE#d3O%Zi@< z+SpokeT#3K{J04nP#2^r#Ogh5JV3!eNe&9wRT9PpDn%|~LK#J(XKGX9DpUlRQw0?| z-5^zdk#l-Te4RjY6YlyzT$mf(_~x$SkddvMEt9h++;pCI!h_c*-FMIDmf=Z6)1umo z8J)YKLZ!0jeO#8MaJ{dLpT6OswvG+4M(})EZA-R6Gz3WjT;xfgEU1V+roDkDNuoe$i~&e*M9hO*keRm zvu1s5ezOTrZ}1i8sQBzQX)N5GN0u!jmUKxHl}M;CP8qW$P&aky$vIc!wjmD61Jl*& z-2L4mp@wpys3lvhX+0}awiUky$oNA;N6(%GJOHD(fahtD_HYpqn(xR?UVg6|5WPr5?&VDGv{v;>} zEILnW?E6LMA(bLMGKWSZL_t(WNrcWVuu*YF{)wSe(gd63ZB9tVYUO8Qh@LGat_f2j z^$U$oNq5rr7>T1Gp@<>oeL;eyzcZKoGDoSj3imkRD_AU3i0_sO8`sifiZ!9rKF7^H_*5$NQsOGp_+&?DU4H;B)?;md@WF_TnpF5 zpmL5$6BV|hktrP(!R{n|q$PzY?kghMz@;c~Zzok!wK?cg%%m*zA$7!J%>(v4q>~dI zz-%#}ax#by1YyW>R%7;*PC#$EiRo=AnR#^nlGdfiNa7@UiKCvUB062|V>Ykb3=zY- zmbALn%7en?)s1Nhc|;;%IbV}w+#5tWh9PctS9}# z_e-_qm8LYc#rp5pA%$!79ovaHpnmhp5oF$qc4lm8bG^E0IvPzP`-dc? zRWXdwcDvgj>`Z!G_o_`*C?2Iz0Z4#a0`JQxW~Fk5l22Ek0f|?FurrzOnh&dG=bhU({rAWwC_bDw$Q37m|`* zvU#xD<&sZudhuUqd74HgHIh{2zACoNc%{5>rQO{~L`|gR7fgZQHg$^ z9#6`S_XmLyVn1b-SJ-t*tE#VZ^;vam4Sf||S)5#FG?npXg%Xdl&Bbb2^9VOKi?9}h zH7-qAh_2^Y!ZtPJ2X2BvNi2F^7r_z8i?Z0<+H{rB9$8Io?#4uLrCTF;JEY;qgQ*fU z1q*tQ3vtIxrM@*?F8OQuCg<65LDI-iNV(Gm&%$nCpnQ7nqBqsT)Q~!rJC)m2+sr7j z$1oJ(+hJ&tJ`zkHm`aDLLK5TH<%7hXFl=<5Dk`Uk0@N7XN4@||HB$YYyMJvi*k)zD zSzD|(tMZ`Wh=G%PcqnlLg`syMO+Bo{EBcOZU{m7{{Dvi~<-z-+D zT%8@~gg}wpVy222ByyjMYP>Qw0>v#0%sK=i)QGHtu{cvutpK8LQE*WiisG&@_ebq= zeyg$WiNQ$~Sc8gOof&aj+Z5x*HH#MFA09Ud=!YD| zM-J?159wo~%388_u~O2-o|;peEVuEYP3Gl_rX%~BFZoP3ASpp(jq!?P7jo0?HGSZ^ zfmdWzqdK7a=waIK$$^rGa7DdzU#97+ztZ~PJEiYycE~3_pL4cqv6wDMR5I^WkGn2T z0xHvMu_QF5$Ck4CJc`IU4FsIm*mupm9lqtJUfPH`i9Hi+Bx=M%iyZ zF<$cO@o9A4`Kyq{?GV0V6wQC0ktNZQ7lCCFBW47GHbfRJ90>#=P=kBa))86Ks|D zsj87Hn_3f0nO923c&x-;Z*>fHVQ@S+HMGESdA=f@9UYGe7t|>QImS(n{HAL;K`$9) z>hD7rD2Xun?yjt#B++eC^h6x>=mU3Q7FxqhnphY(GqVJzIvt z_Yb%gTfAN-a_5|~6_!R!z6v7%dC<}bVH)yuaSZuY;c2~i4S z>%SRYA45{h)v}{i8Y=(z0XyL;Wn3mDl+r!6@nQClS;zw1(S_0b?$$?u;~_s4x9d~v zK*Y7k@Gm=bUIf-`clKa_V2j(@8IdR_d@mbpBU9s%C~Qv&>E;qtDLP7`idUQrfyMIN-uQm*ZBXG4(_05e7IIqBe3)N*n^#Mlf%P)WO*T4VwZWa2rK-W{Z zyw@DXf|(r)1mWF!`IFE6+ox_xcEWv1wjG!K8vGVcw#mT=xD;lhv{-$oU$d)6&8g%M zO64`dkHR0|o5wlVdmU{}l%1PUDHOL?Z7dXayi4pVuJsOt#FVZrev5CHVP&imBU1I0 z`~+P;_78f)eByyZDzrZ>ztQOtHx#?z`3Q<>r}f+V+sy#@H>&33Gy!QPLtQ$R&6?i& z6jwxHlXLn7%mpLh3TjX{A_kmewbwr;(21i@azj^h0suNPBB&n!$sZw!ZY{|FZa0>@ z*iqd!ZrQ@pMVe9AJ!6BN6}Z1CZ9!nQN)vF4U!>T`E~ZxnH}fVj7XC0vs%szX`R3Y( zo?a7w)|-m@>SBB03$CoPl@-$ZSCZcgm0KP@4 zTZy(@$6WE-#y9ziK5BCDC8ZEtn;n|ar!b!glAH0NL~@4Zw6U(VAj=~;?J$aQnp&B+ z_Wlbd9pfso`f`2N>!%sIG&IggGbas0D%4CM!yT(02Dn2;D&>lHak8OeqYS+maJfcM zpKzuD)Q|v+|6+b{AC33FC#7K8ckDeHwD?ereZEpx7{<_HTUbTcd#Fe$uoVRUn#bqU zxRF_U4W+Hf27R8Ok?z#BM-){-1KVC?bZP4bre42-r5?d4m$qYEw_}n48<+_4abIH^ zbroF>c3k>B~rze+cIsgH6liMKi`do^k9YO3HPgJ=!Pl zcotbgaUcSmEAdSmAwNtCegv;B3WgmpeOpg*V?mO8sGeT4^Cc8)kiTpJI{+>tN106i zGMw;01jvL_EcF+e%VV$c2@RG-PQ?`~!sElLBO=X|(~bd7^QhB$E5#}t|8@Cm3pz^i z0Eta6$80<`h_`!zi{d4s)k*TIgxo^g-5|v6jks#!kh-1}toS@j*$eWUQ}Abpo)J-- z;=qmIF$Bom?eDj?A;UH;;L-mOorn?{8&jvd4sULWGq<%JrPG(mMCNw-Biw)>oK{MC zC1w;q+0>7sMSNUqC(^9tgH>;t@{;uEHcTtgT{yp@*F^TZ!``Oe)L~Rq?cED~5l(E(}Ara=U4iB$JmsMo2IXWqGGS$gT zy(s7a5L@hZ=uja)aeieh_ID`>rqKpxu3I%Y2pB5;Lma|rwQ(96h|!TppwF@AuqxaU zi5R=;VpCOX8Siy_+g3ph>46rd+WwM88j2gZxv=rMJnC0`l#1EgTT9h4I>I6COo&~m zNeNd*jPml~FQO;@19Sz2H^QWl#j0x>aEQ=B=Hk^)u6^(s^i=7;VBfEE<|J9L5z&%5 zk7doR_4VqiyY(P-9^_R26E>0q5a|GXanpq+^dO^W)#gfgB*AS~uW-xch!Y^OKvKl$ zsGgPKa)MEdbB(aO+*oZ#iC@w1M_fTmP>@RAykT_eO%#q*go&cWG>3~7ja^Yb1%Q$? zqiH~d=G}eF@d}WW0^C+xeDF-JG2(zJFhwsZHL2HC2rYRvRU95(A{n)I(M>^s!6<+Y>Z-iVT9`npn%p)GO3`Ut z=q+|1aE;89QM?<8Mw(5GF7;;2bx=hdl-4`tzp}t!cW=}hwZ&RxohI>WwRo1#J090T z%w76SK|s+z@g;RWXSt0^6Zd>;-JZb&bj!86o+H0)3l36-4y7xB*YQ? zRy`Dm|3#dT{4r1`008R)x4)D780_*n zi19e??clyJS(7&DAJy<&`@8wX)I2VVNiC}CNy(!mU~96n>--N4xZ1Jdy~ClkH7S?{=bZWRR3Pj zdx1BK^`(m-iiKM9Zu!Dp5X<Ujud)4ZgSDdsY(dLan8uamUmMwIs9+-;VB{6PvMP>P?a5RC+-ny&+L0e zi?j+Z>W&vF>Yj>+{yRObXzKEUT)O+x7eT!G21IkpmC-v$v(9}C^MMwA(Do(P+hGo5<9m8 zSg%Yg-1aGJ;eHPJD~aQCdzXX#>XTo-L)%n*#xvDaWTh+ff{PW^s#rc)mPp)kKwLJw z->hmjgy4Hgh*szhNMDJi)E(L(mosQp_@>Z z!-FbRAh1RuUj&0@0F((pc)*DmZIemW!joM(!WCyD8Gu_p@Q#<2;*Pm-G+u-&DwHu& z21s<{lb#l&$~3p~+9P{=@%3xp*8!=TvvQlRiq0eJmI$tjIbHUvSNK%{>{Ni8LeYSk zVn7Bz`3}VA-wA@k*newPnw!XEzTx~kr zK+%;S7+?^AZ&B5i!D@5PaT41i+*96eyT~1LzAZ|foJkk)?JSDu)Yofo632)TU0eX& z$w%)@Xq%2V-_3}bVde1fqFD2lqV&!OqaCr*8G}==-l{4eLoFK|>EY%E#bLmvGeSSg zgHYNoO9WpWvnCp39OsE3QRaabn$`UMA8KR7C*_D&8BP?D@NT<9OKo-Rs7JPjnn4pk zbY?{v4F%VZeJ6(427yz8mBOdgoY+o&kb-f1Wi!E1>6~ zv}%wtLYBJmLE#~yWf8a_q6e(Mxiw#DDt4uq8N*aN2kQDye1W@>l+t42S04gmywHo# zOfgL@EnV10KVpAEQZxC@>e;cLUnD`$jBZ@2&AR?$C zx(1v(l=}vuwT6enBZh)dgH`(djBAN>>vlBi;5!$Y@xV~&z$9}JJ6A6iGP;TOwZ>#u z5Kbo+dKFyFN+L6ZDjr^M-avrl-FM&BflQmOxF`rxC4xnn2zW)Se+|;#n*@)4X8w;aMR);FH;Bzps#cYC~^g)?`I`Dz}WyM z&*;q!A;Y^=Lg0)psK9(Rm1$dC5OGt|xuR0^GvI>pwI%8-D0No;0Hs>=K|sFfb`82* z#3i1f89U`+liGVETlT3gAn8Xp55bEChKLzPSYICul_3JaR^t#qs)Ubp3$?a3>MF(? z6QQf)8?X3JZREfSBo9U2PaoJeFmJOWdgUmGtcQLU}8JzBI6{5g8V zvJ#kd%RtH3Nv#^6sC=zCl>$8B$E|yT5-53GdT<5uR?6Q~e0?eQ6p#n`RC3ho?()Kt zN=#UzDq2;kK|(M`K%W~Lr+_XN#$2E5RB%xjWqT42^?goQ7l4aT4rXqU0df|DPNUGk zN*o|>YKv3UG@Dx+um;Lz#m0mw}jn3Za`Dc69qQixiFl#+=*p0lwKF^rU$ zMDe21dO#nc0>C2En1(W_s6*~EfYVAwkT!FSbS3lRiEcZyzZwIbL`6b_+Chk~=KwRI zAPhw%x2ceeq*P zIZlJC1#;8lE3ys966_9p+-0N75*g@D2YtxT>M6Z49x$e;_m_c+<{ZfwS*&g}X*$&; zdFq$E)fDywUk2HZ(B$1jCXs^(ENm**O{xoAvNfO zxl)r{?8})?j-=-c9lUwT5fqsjX2H#tcgeAk>z(X&?e97t%T0^%K z!z1oDoad#_RHdPkBldlldAu$gpFI2_F1%E&H0pQWDsG>kT$k5zT6Iy{XMs)N2!TL5+Mx=ohg%gb;k zuK1;yRl4xL+zY2s>86{=qc4#Nklfv!1C&p=H1b_Uq)eZjTR5YkU^IQuyU}VRFp|q% zKp?Wn(`}ASn_u;@3NxCHc)FVetoH>c=IS zs-&OXNhm9vU|2G?JrUeWyo0&JL`aT3cM~9)pQ^cWhM(F|(FSh2H__#M zmGxR>L3c6HYeSkVbzQpC%x1yp0N;yC|0GB-Q9L9!S6RD~t*Sc$)vrrZ0|o_rxzMsh z`wV#vkTVo47%DXB;0a65NOL`RV>m=)00^OWMn@}b7@a;0N&F9h*`i`v+l`%>W=d9W z05n;qv|f^Oqr^TPotiA^%6Bzc!jq9lEm0ifS&`7or!IUPx0s4)5m%EFsmr?87XS?= zI%rxJUQ6}7q+Yn&**zS)Lg&a7DRZ2!Hp)W3~v_X$1OhUnY6QVUD-p1Y0C(8duT0l?j!F83M^NIoyI0yta9g70t34RV&q{s4Qg#e13;Y1xxIsc=} zZ1ZCCqC&bjS;gYK`5V>7T5YvfI`n83!Clz8eA8Vod_gYkLAmH=rEZlV4+1r1Act6i z{aCtE7pt8dR(yPkJ+c&G(=L@0G}Rb9xZoc2q;|1kAi&YNFjgknp>mRi?r%v|Kkx=F zGbix+YIQ5cPG8i++>MFu6Di;*j7BK1Wu+_KU7Do&BPHMJ8XfJz#^D;m0Tq^gG!N`C zoPsubaW&#Pq7Nh`PZ&K0N|}vqCnsvHT(imDqSSaTA0H{5qQEy=F`$OUj$i|2Ql?6H zI3Wsk65CXrR@s&bEh!owiB(IHWbvG(RbB@w78iYca(Fbo=KJu6(chre39!mB#DjZD(%`=Wg0yR7u zw7j7-UiOx*jiby=Imzr#Ei@6woNV$lO82<(_vj5oJ$AY)+l5pCHL*zs=5jfo66(fu z!I5nrz)#n&F{^K>EUWLNW80X_)b?)b8w&4f9ENp8@gXsLjy7D#fs8gV!8N*9Mhh~u zT_nyf#x}G8=1HTI+g0jrN*yn+c6RA@B_WsW2(U%CmoAKiPi`!n6;<8cI$wWNDhVyz zaMb?r2eUXOF#xFoHZFL@V$?P93=-m5$gEDsq^4}wmGaZj8HJzihTcQM+|At+q8~##lgB})l;lwYafCM&+%Nwj_ zK@4hp+Y6C>Q9_CD77;R0qJ|xW;>xO<=DX4I(dJ(1y$5C-w*ZH!AnT9raHZQfYCRxl z$pbT1K}>g!)(~6=Qh|r z0HmR8A7`$Y&&KuJaCSB!uWTrrY>3t!wC2OZ7W>JX_SqFx@Ipm=C4>6$bbAj8A4Ta( zVoo!WABV=Sm`q}2*QKV|*Fd)$A_&eh6O#HtB51%F4j&As4I&^(@=T7~6azuTqk6&E zq$Q^xuNmG=K2}c-8WXC9Zrnl1K!(wbH-&t*C>Wsw3kQr;prYB;^-V2Bh7vP5z_vXh z@>l9;z((qE;P(O7e8x-R^+HQggJ+yesBmG!C-d`)&j;IN7}uHzrOR^b)VnOOu9mos z9r|D&_>ATmH5gI1?4r^uCk^-__lmmTQXj(!cFu|@s;S?`EJhhpLo*<$0A3ng(%u7? zaYz{pC6(Z~5ave>Vp#IMZ76Wl(yad?Qe`hAMwIfob|(D48hzSP^(hZRqL^Z=gJ35DK zqE18lHLAK)LT5;^*pRY%akN9P1Qa~ji3mw}dZio}3drC^kOl~=X^WM@r_j>5OIhTN zg=1F7xT^%KidF1Tw}ObPn9Ts%J~FM?o(9eaT-`g7x&ajg7xKJlFTs`vdoo}c6PwwV z&2po*R&C&RrA`WBL3BzfnEu4tqQ7=R;dOelH7dYESd6&Ez9kmIQ-`cx*ZWEnJ%btA zR5AXkIw#p{c&Ol5lf53+6@-L8!6=K*Tm7TC^BP4gfCgO>Q8U=(F^Ara7ho>93K9}+ z@bUx3sPT4o*;u!xKfS&c?#t@(Jpg02oPx_DfolB@p=V~2?M(#j5`isc^y+Wcv&Kh0 z+F*qnwZ-M?UB}u|nV=PUy)NxiKmdu={!}&1&dyO7|zZR1vClJ!L;p28MbpS2gQJ%>Xcj?@-(XQrIFh23lGZ2IQaZPl_5 z-QU17o!j=@?V(+V+=56p^)OKZ-b2`=^$JCyb^2p3Rcej9hA>$I3VR3|<>yFw;l(Jf z>y{dVL9J?bIsXWwB2;OtP5Wcc^Zx^#+nX2srZfd)U80-d`Vuzs3-P{)_yA{?IVCpN zv2x}Pk(FK>Ek25blOk=86pKq@487o(9+ZGJs5rD-aT=6sr)U_>#aak#S;HmHeML5gtIf({172FWuu&>V?tzu&m$2oT26u5JBELzjQF(o&qI%Ags7V z-)?U?i$o?;>Tm)u5c^A4L}vg3%+y9PaJuSu$;0@dx;lSjI5gwdYvrZVx4Ycgk%XkP1bb!q=E*nVLEsLbun0xT~+6lJto=TKaO2X4`A^!ow=?CZ8Iy${!08-+j&~rrablm!FU%x+;5KEw({z~O_ ze4gtH4>dQ?-48tt-KCNrtWSCtfsv^qBu=oe2w;XnpD;ZIsLdUKg~JLuL$Ly{U0RrL zR}hnojj09h$;{6(22T`S*aWDY#_)Je%)v$qhzpX|LC0DyXpl>>I~a z0{tjILbOZTa4b^tc)emrJu?64Ds9Z6-72D{to z^zg(E5PUMcK=Qazybxwu!s!W5C|680QH=ZqDOd;vP}BK7EQN#_RxLdWFjz%K>4&8*0YtViI3;msn5J$CAg4fm+t-`m zY8TxF*h0fJ)utU0Pgh8Sffnf(0KbuU-ANPd+gcJJa`-x{C^Aiw2)H4*iLfQ2g_Dpm zjYnt!fUS=wz@k`GpW2Iw1;PBtSyKBNo8}^KKc)@ANZsu@+$netQXdba6_&R$g!Uk6 zJX`X-zb7r%CHS&MIs56)I?S|bQfUqt~ft)|q;I%+rbG#0V&K=%{jOnO8e83_-(*hqw#&3Ba9-zdpP4TcIfUTpe_;(lKEPu&pB{<7+Tp>POxT(BEq)25T)TGaR&=k7jyRp zaUfE&l;lX3mE55rY-lQNSJY)xCScXiY=~g zBt^lY3%+WSFBZ;avSnS#wCig=R)}x0N9TVLD50;xhzrs8bU}qO_K005MfW_LEuYKP z5m!MK0u5Tb!!wF|D3e;3GRae(mhKc%6}#y^ay!zAFA&(EtG1#d5u#GC43DqkbW!Zn z%B~{yifA22N=3ZysKFr(x#hjK13H5K(MkO3MOIc-wh8e8?k7`hgw(gxvYJa=NC4;y zskB$tO9+WH9irBg9YVonV1XBvy5dIZDb(|B>nNvEuv|Ir@Ur5Oj?wki>>j}~uj+Pf zQNT&~#vBT+l(Ey~J9qGe*ffd$P96gJ%F@f)x4;b$YREg>FyfLt#w#;(l&?DV`71Bn zQ5JmuPCUaA-=Scd6mW(3rWtz>h!znM1!Yo`>qbOFfH!O-6Pj5VMWx6rTFHZ)7ZvEy z&Dj-4!gIB)_3{-ZKOv4!Y)n~Lyq$8Be^?Ov)WxjCV#?}YFkRO`PeDc(;fkr&7mW&T z#ImEII)xD}WsN94tXoKlFl?(BdZgURlFpqqvrk`)ld?m&LV8}3A59?-<>EStjtVX1 zwY3yLWo$<;NmWvKMtd#ij>{8?jQLzr$~}FU$$RrJ#CC=XU-}w4Ksuy(H;Fz`2Pnp( zzR8SF>^C(QNaycj1Lcip@j?V6iMHw%aVnlbp2%_c#+@l+Y$E-GTNMGM!!jJ$kTwzfJ^ z5g!zJ4q_ffs7MX*MKr#NEIpWRb8^Da=7ui8BiACuk651Qgs>W&v*DHeuqWybUddN% zPhm`M+%YwBR3a3?VsD~07Xmy5c@DNS*d}QyQ3RkY#7K<+CO*&rLdwk89+GMlC#!@M z-HN9U6eMz%nGfV7&;f$5Yrfm@Pr^Z`vrMCWfIXn*xURE!70yx%2&lpG1&mBlc2gA@ zvI-}ri_Bacp}i`Gf|`q*{bRk^tUJPZ?fzZo zoq<6jeBG_%TO!3eNUl;~^V-8Ibl&8?_l2e)7pdcjE?v);`dz3+g0Ug>jG);^@&1pl zxCJ+HRo54|nwM&ZWoitzm<2@`02fMjqP**X3pS}B&$8EGcsfk17IN{+#)RTZ9!Y0q=Vrrlp5k}*<09`A!K0Qt)Cv1&_H z&ZOB45wp>NNTf3|FxgB9wP`yVZIg=^nAQlw!dFTWJXXGr6ATeOV!Rs8H_`)Mh!E7= z+-H}L^|ILA9)k-r=gWt+9g(*S<$BNw>zocBS$l(BGm5x4gsU-3BaEzUQ2NH4d<#qk z%hefPoa0Aeovs++$sk1m45`QM3d5)bA^fjA<&?DpTT~85RNZignzLuY6c$p;4wUF` z;dY1Qe#q3R7y1{Gmn0`#L5Eb9lDN2s5;@*qc&v-iclaA&Tc$veY54#d&Oq^r4rVxn zd{;#uzTz>-7*TuNuM&T2w@)M$sAJSnmkKJwKcNms%xz>wT?t;s*K22D_~*c=LB5#y zjZYp;hnpHuEXCXU0EHA&mwhX~uIT+V*%fjomLGVaf&dNMJpvVdA*h&~8I@R*6fW_o zP}xYxNa6hRxiyiI)T_wza6$?Xx>8GEp6#S_Mrs*?v1m+Eipo5~00|RHBb$l0=+^Qr ziG(NsCo50Mc+xPTkw~*hD#nkqJLHmx7c6ZptZddQZa3oG6zM&x!qukPXP`~u!IHvK z!X?a|?E2B{!c0NAF?*`Bb^VGjo(||1A6O&%j{TZiD6)7pTXS$27`KkDMKVLe@94l`Wo}#Y57r8wyE% zD(~KgtPc;*R67!MD7r^~g^hxY=LOq*L@G6^trPJgZ4x543gHe(a9J@M<|56>0$1`g z*lwh=QYPPAd3~#LyBcjG%=!R+9(NlGBRn_5riKB?(iZPJGm}L-FS7(Vrj=5-%Is@N zZSi~Mn{bXwe*ySW?QhIY_frI2DRoF)7?j%1Z60ODkJFlTXZq+sgMn;rEs*k!EM%jp zf-(h#su-n`)+)YD(u%q`E2M>(i&o(zp3oJ!Kw4zE?>Z?+U0bn4NLK^xaH#C5Tokkq zjZDTpvWfE9er+nN*<_?8)nrO{5&twrlNg3(a7^aDepQN}mnro=v}7B2CI*%+rY=lG zc^kz#-*zH$c}*}_?@L*{Xr+LOg^&&w*V&glu4N-(anPSe^G^ZiP_xL9bYlt$xjV@u zkhT|^PJ$h$?uC%<1;0Nm%~b|OVMHrpROr&Wk!%w-9THUcm?akSlV89>K7uWmDb8Gb ziTH`UR#g&&CZ#hYrL7Oa@0rbBl7$|{UOII^%WBujilmnOc2yVaz}FBsIt%uAyN?SY zUB%29MQW5}#DE+!-5A0Em>GK2nSJKcrgTB&vc!1&0c8h@@*~xV2*fOgrAA?ruNw9R z%F5P?G*GZG7_N7MPC;c^d~=&Je56AlpD4tIv~s^(ab8<8Geyi?3@inh#4vJ`NrO~b zYzXL-lgYK(x@&ZnSPFSBlf|wK zgLHowJVzE21`Ger42k_l+8Zm(l1i13j^bm_P~z$T?~a~3Q=d*@pH5bKiaySV$cNK`4MGcNs~Nv?Tb9sw$_?BeyA+NWt$y0}GCAi0s!svn~R0EF;;P(EiRj&-|l1fD+?d~;U3Uum_tD}0|t z@o|_oP`y#daAU#pQT6ETAQ;bbIMu(w;b4mGp1KNPH_%ffRQi!H*~CdzrJjivX4Em5 z9hPRUMUay5eLbCgHtFmTAmi?6x6754Vs5306}s#-N{Sn)Gg z@2S#GooTL3utADzc#SJc{GQLS_r_>6z!#Ktdq|i&5(D*3P6`-rZn!Z}5???2c%r|) zdkZkt9vxdHmj71jqkjL5e4b7Mve4ZK0#MBIm~7Lhg#{M1zJhD%d?4!^!6n<-*G`V8 zqencF{?3ldl4@-n53~--jw~mhqoyTsc6&0M92~$WGMZVH3D#o$(vhUzp_cV}AW)RE z10FdxgHp5(>2#^I5Z7#|`tYdZPUk>N*10NE+Ad&unRb2gwoL;JEUFe~8bK~kA<;>qwXgAfc_R}a`w`02_5Q)b}n)X}W2 zH!BPHw0T;50)9K~@|2n3$8DdS14lD2#*SZ!;yoR+v;-S5W?%5c>8s*MQj5699-o{M zkrMsxyR>S7x%MX8eqS{$>Jl=cv4@PEXuM{EMyrGBDJHmAvTn^0zGyg!^imOgnEUFA z!+>`sS>)j`>!RI~pf%&h*Z#1_f_GC;qrxhi1~_p_SPfefyaKk2;7591a_SeoLWHR_ z0f3y?`p{PRd9eU!YPna#a=SEXfGD(i>hRJ1lcPYC8<%88|6VY_4JxG74)V=vWvO0S zD{7k*kSuOOUz@1`7d06mDIuH9NncI_JC~?lF!xm#5ukw#;=;nDVB6siJlU|$=%YtR zdB7?-R+Pj8Qa&M96AGCtbc{@LSjGoJ07*p-kOEUW0qa=lImF*(^};cw&mue@oA~?x z%ih~H$CX`adew8`h`FA7{|x^K+c7DWlp%Hh2mgjl07)W6d^M0LifvbfllUOf1dtef z6bp(DmLu$Idwk;?+u?9TjY#-zE*PqkG}H3)ylbCCf>rA2?ir6Aj%=w#GV|m)`>eh8 z+H0@%u6Nyl_b&&L&FeJ>Efz--9Gk=4y&-|<)ZLN`OOz%hv(~z51^P#x^KI77@D#;p zNXjWe#XojVL`OpViQu#h?Y$BemVpZsRmlAlfe+DJ-AwM z9`KD5)cAR^c_iAzld5v!^(_GfW9o!-bR~#-%VX`qkwHi>$W7adV?m`-tAgBY&`A-+ z*?lp48=Kmlj&f;TmmqcLC)s%gaG9V_`TFq^8p!f$EYUT*HiSn7IPaGc91QVym zTjq3!Ya00&Of53yy1mQSch~NSDAsdMUYd`NQlOQS;j5jHOns$`-Vy;H6G~|DtLzib zUq?4sNwxQV7D!cCs*kP<*)DpM*%b$pS^T%X;wP*h^y1059#aG!YjrgvT;)*NJZe8s z_%7wwRC%=}kk}!H>KmHzzA#>7GMQ^0Ef2DsEMLE*3YyyHt22#|J1K{s(0bf;ADi~X zW#F-OT^ddLJ2}4DSfyTE+uV7v5BUzSg}Ay^ki%1NZM?lbTpjMURqc!X#&`v83K=db zHS_XuK4R1*+TpaH!~6xkmz&3F*w1d!(p_}-9o z**|Eu*^Nlm9`x{55!dPAgI;uc)9g^W@Ld)yxe)AIr?vV8_QORdc>Uxz+EzjBn2y;4 zJ+?t3-@lm=WsgmuFbrkCFfEr*3p6TKxYX;?lcj~nFppr)43n_V7Sos9lVupoZ$aV3 zHT>wR$qbAD(j$_>L)dW}uV0<)mDN1Y?h@jP+QSl;YY~Zu-H}1DUZ$58{npVtn@i5J zZxgoVSV@oXIG)nW^lxroLa@>Kym@hAO~zGOo+wlcdb5kh|5!J~_JP_!c_escT>Pu! zA^|NqX18%F8OmN<`=ZT~3JzC*4HSbzP#dMs2DeLq1!D^fXZ~z|FgcZoqrx*qa&1FW z_e`;(+GLP8gRxcP`ku=f_nMoUAySBxh7O)sqUp8Qw>-J_d$&7h7X!Aq;dvyVIFwdOG@wkA>sHwd5IHb$K6 zc&SF0ti$G}f}EvJsu>a7^}abh<8o{{%Kth6!GyxxRxy+FXgr0>txvEK`)qtcU*Lcp zLuB{!&wgrCWrkSY(+N-(n@g8hB=!6BVD#Sp@jk10Zau1H>B>$x*LN>}!Kia3jzj-O zcGP22j*?^^w57x{&JmK%*hjWN4lKIc8wRQ9N zwPbmVLCGD?Ndv`^i0Y=N2?-!iqLdo{Umyd{7Y6GGKm5Gncbf0F&K(6=6%Sh(V-uRh4dp3`o>*Hf|q_d*8Rv zKSsy9attI;2U|ljvTQdVJ1?P?S$W!pXkAMgat|X|h!S~$KiwbBMTi{- zxK{bXMJp3-xfJ(it3!%^jnlH2g@Cp~l4;qkIoUy#0*?_Bn#0HOSEpyt)#xxf?Z#>f z2;@!P+oL;^tF!mMTO!cY@ui$zva3o0?a$Ex1Jiy51IV+5MS)N_G#WGH2Q0}BO~d{L zq=EQy9-&Lvw-7z?GZVSEpGpAr$8_VF=;;*~Bzpbwl%N|Ccph6@3)5gZG`0;Y8+Jo- zjBpw}5(LXDCEPv_%mMy?FM)V>N~Sdx+5f-8bS__LDS@Q~mJ(P>U@3v61eOw5N?<90 zr397|SV~|ifu#hN5?D%LDS@Q~mJ(P>U@3tyIknV=h!{yO_ciqbT?vLcoCe$$)B<7u zODde`7ncliL#0!eC@X#0RIN2=;1}4-ENC%K7EYQ=A|F;CTS{`G7V5q4<7mA~t6LLg%S1 z8Q+hS1~g?i&v_5+EV5fjx0I*Hh&rRI#adfeP=&C2+`~2Hpp>WBgk#>G{@w~LuLB&02!QR8kK!$EFL^DS zV-?_u43wQ<0r%uVNl^))05U>32A{!>A1>)2E3764Im2ko4^#b=%$S*NraHe(on;|? zK{`~)`QmpyC=OIbrRuaNd0X{`Hc4<47v|t7cB49*G&>liG&KL%2N))*Cy)#V-v%Be zQ!mwBW)P{@2U0>F@R(AqYWq{Ou<%(|(tMC2Htl$nAclB8i zmw=`v4c-t3$O5f1Pk1<`6r`TvXwHwB@rj=o6dHgl0-ygj#TS!_tlEcfbnwJ*M1 zQRrh}4m#uG^LzFlK$`uU!1k*D)&KaJrjM=ST4s8mL>+N>A7msEvXhVO#cee=1vH}Q zSn_nv@cIEp4=WOa|7os?l>glE-d@xv-4wFTOwaCq?XURF`Sh-jU&K~(BV;xAp^t2! z6w}`R!Rr2GJOKdBH-CX2BY5-ChZEc$_dhqX)W?1D{TfCAyfxSi5Y2P+cPOPPYTJRrt6a!&|{`?&u zyHD>=hLeN+wit_7g%TqgyZDY=^B1ffc3vKlEuq%OUo5VVU=rJ80&Y9Id97=O8XntK zk{{NGxfgcq;u<)WB^IvK`9w2pV0br7pD*JNq3~!VLha?GKKKjTC*_`0Y0N~}^E-R& z(Mri1(jF)TGy6fbwFejG*JZ^rK4S9D1GI7yZ4Sm*`R~@w)|Z1IIPZIk1=v1~A8a}R zBLi9*3?fZq*y{j?T2jmAhD$v8g3jc7J5TO+hTvZ=j=z?#VMcp2RI61k1n$dzjAhPK zJ}-<*L(%DY61{u}I=L;A6Xu{`oXKZgw|t=6}OyFO8-v5YV)EBHes#l_k06&f|( zXf~S~|9j2K50?5a0M48|sHw0Nog33?G1G*MtL96{^f?4d)cEiU{1;Ek)*3;hzLwZ2Mbov_C66U?Ivm^wB<}da``% zuWbzX=;;G#61(>gE=(;*Zu7Cf|Ca~jy~*b2$F8Ho1C*JM``BMS*jyd%4-dRyq?R|p z6=8AOmo2?SXs9AL!slACV}x)2lsT|3ILJY_@ZR+(AE}%3F08~aIq}hy=yM1i!b6n% z9~HfrugG(A74ytaM>o-i`(`ttfc0ZFPt1>is8t)-&M1{HoL_VMoMEyu{U18X+zfNYyo?Af#nAncNl!I(Q(1JEn}p^Z*?zDJq|== zT?;Rk7SkrU&gvzkq(eZPSl4gtbSLTg^7$546 zm+xVIP;H$1V~z+odh85BZ|k^;$n*S%!<4Q#Zlv^e!OrpyrLU2}3*mcKp0K&$e4>Wz z(dCU|i8=x5{KNltj1(P5Yu=pK5AawA^!&r1Eq4x*taBW7iVkIcI4io1dtOzS{SRFm z>VPvr@neC0Y~DS}+ifeJ?fuFx83PYbjcHpy7&+%C0DFP%KD3>XJb+`vT+Brml@p1k z&G^dw%CPN6RnEj&T34IiZJaLd#qk#MoIB$C3dv4@LR}6_*;511-ApFLG%?Y&T4%-O z0xrBk&(}x4Lc8n~qwvx&8%q$`=lstjyqi~l7&KMn?^lEV&-`iq?){)yX7TQ9fbLTq z&@?lwN=@G}P0kN3S3NqNej8;?jhV9rGX0fp9hr-ltb1#HSaRKRRrOV^=`EtUk~6T) zI~+G2qEvydZ4kbtoN}*E&nfJQCy70HSJ0Av_fA7VLMd`D2CvL2Hv)`4`@ZWrI%RDpy zf)U@kijZX$bwY=fGDz}N1rU?ak{)aD1|sC&!~Q36UiM3Yj0{ZucxSLZAjl~`S1pZsY-cr|(n%2}GmR@=$Zn+?`g z@K>{{4v~8+6JgX(6>$s28@OP=OtHlVKmAbyZkYgrWq0hu0RVYPSNBF4LSw6Zz#h+U z?z;xBpVoZ6gNu~If90v*1GeeX?(O(6C}8<1Y7*MY!-}$Vc#g~~oW!X;B|`buqiIDh z161z1F;yr9b?DgpSostNtjxD`qK5_JXIz92fzmH(W&Z9V)1ybBmf7A^Lpx-oOtuxY z?xt+2v=pVDJm>w+!gAyP?pXUuSsQ$use$sh*6_bR{T4_3HH3-}3%pZ-&*Ovqlu88c z0RypGwL!EIjMlanE0QP=3Z})K)ZvF)V_T>*rhO{i$|=&rEma~;SnNJaJd>AL9IMoA zKF&HX8qYoT6|4m?=y-sv4THMbOej@xo$kX8=CZ=qXtIj~czZ@@!U8W!SUmtR0n7uQ zmBtMZS#C0}@7=texrz}j{}nyYDWR9rQIuP2O5`;oVUs@lp&0)(d+uIwv*L$9;P?*_y1`bc-Ung2`7Iqny; zb9(*d%1{33|Mtg!_F1g5`^H7@C;#++pMOB~;P_~M0(#fmOA+mt74ECD>I8vtVDxDS z<=yu;jV3q)N>a1_N+5m==hT|d7bywi>F7d{2iCFV!=UecO(Dk{?r#h>w&ucc{Pn|D zIrmVR6BE#%P`J#~vsd?t9U!h8E>qv@rkLp`@CK8a)0`k;Jq?=;i{g{94)CWB^i90H z4r;jRIcYFE4ybzLIukfLgFpPX4UkJ*mhnqaF3y-Z8Grcgd^~*&atdu3FF)*$ezkj# z<6aRR6u7bAPi4EIewEWz)a~>|tu+kY%s1v1Ow9r-!#^3Gg4eaWI)m<%h5Q z-ESA(xh>){=N`G=MyAnY_S1HsykH)tW)vsOk#B{+Okq`~da!>B=L0_&eSOHvkW_gv zk$tWTwj0+K%20h-J=G{Ke4IL$BM$VwJTwffhf8#!Gm9VkL~2+K57kB`K=*f!l{^}a*bB6iTKFDO5&-V=R4yn+JSr z1XyU*jt;cgJPkl;l0F&94nv#d!S2pvyt5rIHDt@gV-qFdYh1Or7+`jpm;=q~`7vrj z<(3V5Neo6-_#`>TVv?y2NJ6MK&dv?c0L%@$kR0nd`XsuvQ zY#;hV3-e~P6Uy{?3y)9AI;4oHH&v@PraB5p*lPZ?d1cTUk&Z>Y1k2*+$iB!2$gQw{ zm|sMPsdBw3O=Denb5)ne?>Ru7=xk?UTeN=HWsp9s;31m@wuZdKm}4Lg9j4|9s`VBn zFSTDBGLd{zzqM~SBF!RAn!yOe5ID%1^k9M&G}JFl8eS3Gkvqqa#TE4PbX%NVOp^AC zHL9SplXqpcb!U|4)hRZScW&oWcl)|V%c5-#CI3Q%XR`JEzx72{{ENeTGTz@m*n`B6 zdq!ee{wQR5Vevc@De$CXY%GdX=V<1ARF2>;R9 zjMCBx0g1R1O}>PzKx{?PkioQHbM!i9f@PgCwtT)fZ#yM{ul z(yRdYx#~MW#DklG2JciP( z+YR|-oH?5?rCHbP2=4NPvdBBtS>*cWjsqcEv#>r_iZY=FJ{%h1NDbL1R5%HEvha&iWJ00V;(MCQI97I}YZ!lsF!fQG=K=RsEqj+~Q@3yT`-rD7WYU;xXo2 zRo!AUY6jMW1`bH(sdUV#X*4Y3N>U~v(uhxWI4G4SNZcsd>m`XV;H?neBwfkntbiQX zA8GCjw$`=R9E8}nRX8sCP-Je4%g_guXcX_J;gdIf^i8k*dU~Rx6EOx2Z(XJYr!z#%`e0Y~9^H zhH`OM{@3{Jku_0yVvg@1S0VyIsP>0>^f;1XpGubLqrc52H4mb?_#R5Xi%-2MBmn{V zWzMbK62m0Ixi`m_ew};*H?Asomk;x;%icsiq!LH{Tp)+ku>$O7{ z(~OoIJiwpe-dc~IOxs?U;G!dB8c|PdItuja;`9V&g^L^VXg-Ud@52?viqP>k7=ll% zon}*^W4zX-M%Pjt*R@rwZx6HQrFLEyq|Wv*8DtSB8VfY(;qA#n=at=5l22xl<~%gD zRYK3DI5>TEA+@{bd;FSqA`qGN6`P(``uYv}?8|0=ep0R(EI^v&BDAJa{MS>Q!sJ^Q zcEg>`^+8_6Eiv!>6bHb0=bK)8N#kbxu-n9l&HeZm279iS9Vh2jQtQF@FtaI6Pfi1T zk~?yMx>_9WkR`E=)5C6^pfNQLCIt(_Qp=X|3fswZ9~!}s!(c7|!x3M;JU+y}H?HE) z2mKNsZ1DYWKMub8_wFUyd+E^trz~TpJDcHx4G`x_WCnn+IE~W4o&m*fO5&Y@?HbkPyXan5Fyv zf4v~8|AwLdX0W=qv-XT3{${W{dd`9Dop!BtC~>guJnT6QM&36B2(fb7Uj110hxCaA zha~Gc`6*Q8|MoTcr;f_VU9{OuZxI9dVWk;}@)(SkMG&1+hC;vZKQTgpvO%7)&w0F$ zfbQJOgzq7y<^L@uu#~`30!s-jC9sshQUXf}EG4j%z)}KB2`nYBl)zE~O9?C`u#~`3 z0!s<}e_H}c2PHK?n3!f_b{--l(6AH~tyHEdi2h=Dw&ac!0FiU*5X>AT&rka2M<4?r z&$!N%g$X+nf@>rDBa*QUf}T)v)mjv{Z}pa|gy%eKQn)Qb&jg(pk|UF?-~B#Nf#G1X zMXn&_ETCk1LRZs5Dp7bF4x8<%X1ffgk{W>V`4u^%q?gmbz_#0jy2&+&8{m0xBqt}3 zH?Ro{@OS$x%^&cwFW@+DXAWrr`xtVk*d4seP38BFX1C&-Kh5yS3%!U@5Wqfr6PU3nNl;`a#VI>z$QEbS0Dh0o zdqP(W>GCew)YYAXO>hT=bOBN|FS&8%9(@^bMzRdZmD*{#_>tyW$b-|~YW*p1J0@Qa zOZL_A)w}w-aWxC*sb0te4g+1A3zYUC0y~{Dlhu?$F$L%qH34bHOZyawo&&a3PUNd> ze;3jID>9EaVro*L+PmY?bSbgtB9I{y)s<_hHWol?(yXDbvMwt*NRo;oQ27Mw-B3~8A-;7%bZQs|P*Ythn=$4ZjBNP|zTgr{)-$UDG(u8Dc_VhKQqq%LUn6O-k;} zidl1QRatHh&gn~U0Tw%b0xH)=jbJ4k6}c9n18HxL_a~%8$%b}KIQgnqcs;K3W*-4~ zkgx-NR8=m_WKcQ5t_jd8p!o^;V#?vK&`6e^Lrg++afm6wK)PmolNby%lgX$R7o35} z5*lro8Quorw>RAWa@kv6OYE4p>r#wCRHAGmA z^jJG-@tSKi7A<*eb}t4(c}8T+76p+)s%%Jy-T|VjhD$7BYKXf;F?AKU7uRo4(`3s7 zSJT3_LhTjm(SopeYmUlPY23aQ}hv})rdR{Ya)O!tI)tT#;z7*O#2lnN@ zWl4IaOul@sy+z34=-5a(fbU%;I9zRx6{tDx)=RO#_CIIdS-8-`NMI>`>{R2DS`zNmpAaG@4y(ef%_)^xVv(Z%rfG zGNl=mO(0WA$bA_Ft(Q;j9uj;ArIJoKisGN6dV6hm zrSt>37RM7nsMF5!s(Kh<3^c9j$Tz^fSVRNtPo#62KM32scEDR2aVS16HW_ z`k1mMkbh2v$Qk!sO=(IMSlz)yMCBRXhNuHSq+q zj)!YLQbl{yS|axxf6yb1FGZZEw-L=+m4a~f)JuWp=#ujQiJ7+)Z#C&E6y9y)wAC)~ zNY|POS(Kud445_V)e`&^N8(z5Vs|?Vg1UedmoQNr-nGgwZ(B8_YDqi>whX|C05ImR zQDG)Bf)!@1ZV(em^P#h|ZwvbAK|YiTi<SlozGFTh#uYr?{Wo#%{9$KaeL?t@7`Mci^3g(*CK`V+gC<3ml zM4~hMSvvtkJ)n#`-$UPT?O>Aj^YJ~>(!+20vD0y9Jo=T)at=hoS=sd_0{Zmqy!eaYVjS0kIKSryB13W3{UF@s3$}jI$BT7T~F`8 zrJ7ybNd*VV@_6ZEYj9}moMR{8S}Rpj+l8e@Yf_mjJ`yQpYjwePHP)=}9|bOMlzy8u_`pi(Q8~9eUbI8e0^mH zZ{*iglvt_(zwP=W9|E<_DAf=5CTD~`ZHVG;bdPW~X(#kP3ZMmLGr%{d0v>#t-l0R( zf9=a!Rp%a2%NjPAsi;1WFN$b9rr0kQgwxLMJ(aDPJ#M0}5&S75tM5H#s2o)e+*q^H zX|@9(rVcOYuj(CUnX^jtO%Ku)JVs|z_AE^w$R(T{4rY1w7dr=Q8z7-+D?}V$6v?w1oAr{OS?W?8&hs!PuP(K?ZIpYCz%3-@~N_-d2v(_mEs+u2L)62h}V8! z!gSHczouLjleE}v7V{9=5qnIw%C*09@eVDbKntA9yk{75^tx)jW%!~AJ2?$5-F5A6 zcX^2mfTIYL29=>&M!b_%W^a-jOofITQWh$ASydJyoV$O8^<{rO{u<+?E#?PUkkp&E zS$?2hNE@wU(AXR8jy72*0~Zo51rDLFs*6`}O1Xq!K4El7kE*g8nnqFbP4TCmAL_}& z*JuRxlg4u75r*XE|GJDih0{#*O^M=}!5)Mesgai>0@x^Wd(7Ctsdh-K~9pKK->b z0P`QqNJ#&-{t<_DwHCZK+hd)Q27e3F24~<@AX(#2g(qeHSEsZdY#8FNPC1RZLVe+& zUmb@Xn=yY(=wJwY*V;30sKLmqv4>$LwJtz+(|lZ3vm83I!<@dn+~ zrcswsUo=|(_j!{SKYHuMxA?vp#w<+TI`i<6nnr zmM8zt_xZQ~(D%vCTN}>19s*w*4>w!CEMjV$FiUmV15}v>f<|HXy>9Z+=|#^z-(eon zq8yZT267y`b~`~b4FFvIwbl++ceY3G=q<;ZxT4~{I}+$;7RyD#G5v){bgP!)X3*)@ zFJS1y0ELazfTZXy1tv~64`-Ef0`~55HLi1Ra^ZA47g00u+hC7xuHW}p?V#uPJjMtL zO3Y9$ucma*#t`9*b!>xF+5s{@X;GVR!WBnHWh;Sm?#9D?y0`Oub3EA?@d0}-6%g&& z424w2~W|{Wms2u@^m0>j?F|55tld5<>fefYSf7D zaSOKAclk+*T_q0X-7*}`(RKXk8n5>V{bd|D&jM72_c7=^LSE;&a3yQhm7fxZ3*W?A+2-`8RtX}9O|ei zvdUH?Zdp~;sGOwVr`zgV;n+_%cJ@8f4+s0>&E1W`{@Tv&sCS+cRPT0MT#P;k|;~=d5 z!o#`4v*S1Xhg;tFp7D${N8LC-x2vbqd5*()Bp)T^KFu>rfl-g0mL108ZX3-bJi;8k z5e);I7Dtz;ja9wdN1-BNkSvm}xZ2vShg+#={4Ou>0b-^P4?}vcp6dhg2K9!a%Y9r_ zUYu>+T4Yp*w^#ZDagK482J<)c( znZX+GK~}T()eM!l!?ZZaqvOl4;o(Q#R_#PA6ILgoKr$nTioN#vkAz4m3&O70={_+( zLv*QIXoq5I7WL0x!FAO+eVQ=L9FkFL_-x#dT5hJ&CCHyXI?s4IrEf3Zx2CfioOe>U z8X#vhFBjJD&+XI5pSRcfvBDzya-pJ9j_0DS8!hU6R#s+XnyHzS`cYs&vs9FY z=Nw$Un!ff42UjO2{K@MhJ1q&ZC(k8r0Vq+gnL?z<-zclY2Ip+ZOe* z&xb|%4E@M@&;L+cI{)VfomX1SEw6xKepV|=n0>46p_n7oAD_H>ax$fXhMQONhT@2tBVixe?Duae{RTk zJsBQ9R`_UR=K%K(8;OeG@Q~W!Js60w3(Q(Hn{V5x(etf#A|dC8jaz>}zCZ&PsDcTd zwh^gGI3FesylHfhdmGP};92P33*bZ+hEbBZXLC%15jAb=3WK@A? z`c5bUBXR>~LOvRA;A;t@8Vfa}?qc3?QQOaW{ScOfkT$`=xiHkw*%5RsP5am!SO6;2 zeLuU!-|!FSAD^pT5r zPphuyeEzU}qPzTp@D_>w z*N|F0l{|E?D&}9FRex3jXs&aUCN*XkQNM=M= zi}y{IMLE)%IuwlhO38Y~X_#Xa+)FZ;BQ`2zM2B{QL+23G_Td}qWHyd6%rwglIaXZneX>TUyQ#Py_X#UVhJpc zTf-e3?i>OZ^pbZXDa84twHK(<73Sc!P!pvsNw0b!@F3QVOa+plTM0ReDrTzCTwyuw zUk;w#O|NdTAqgY17I9}#%Ijl{>J=dmq|#XccME9zVaFwgzIa%4e$*ajzEYzd3zKd` z_z|lT_wmWm&AT>yDu^>3b&P~>BW^1dx#!0kg1I+|&*si=)bTnM{d4bt_u0Tt;k<;# zo#CP8Jm(hBK^*$q!>!RkZUADE&kfhsHYUqKwy_5u7qr857`8QQ+1YV~u6ZDBWOPB&d{^NXGqt{ZF4&p3%DTI$ZVgbGKSP zKr!@*>M?7Ei%`Rdz?MPw4?q7C@7l;&=)rM#n8T7c=4l2QvNuVd!#q?kd7hGU8FkxC zPxjsNB7B+9o4|u-2-2vnfxW(|Is7P_jw{poDmK)dE3?9ndYq$VigDAWiTE{~9tmm6 z0m7|Nq&XA{mmYh@c_%-2wagjcu`u)12crYp|CR-=JJiUQ89#Je-^5p#9-R}BGb_}J zmEZNJN3*1g+0jqWP@WBVzo~WSS?!V>mfpIbFiX}n3q4_kiCc2>cDBxrfEnE%jm&wn zQ?qptCaeq|OoLFd7aroZ5e4D_Ji?3BzY_|wlMVuq1VhD5g^k+)pd)>K`=Pgc`i6v{ zp%s6n8Mw_UkHExh9ako&7UdI!w{~{>(u2G6!ErjAVg&Ewsz?K-9Qpn?sY4&oisJeX z;$Acmy~YztIySS4TOwo2%3|OLJd?pxY=wJPbC-~*H${R^ac^>5y+{n2o66wG+jf~a z0?xbR_2K?TnIZmHvGNDe4qqzz*)9%mkJ|4N+M2?zHuW4x zcA9th+~7a>e<`}b(NxeTdsY%19QNP94OU}q+&5Xy7wp#B^tRdeSVDEmKwDWVdACYk z`i{oD|Afl`*BXli7+W;a9dw?9vDO@Y$2Aag=FSeO($4do2MANYu&x|q!TV!E8hv9} zFv6BI1v{5iPSl4CYZi|7q$f8euZ{-pyuL4vT+=+II1W9@Cn7Jt9S;^(5yHl1=|5*= zi}6FU0Schequ!MjNzUl~$~J+336i6~1JB#iGM9ta{?uSyTE>I4~Z~z zav7&2^$H9dgq|E6nP|q$>@NRrDS@Q~mJ(P>U@3v61eOw5N?<90r397|SV~|ifu#hN z5?D%LDS@Q~mJ;}XR06{eOiqMeV&GmCx>UGzWz>S9)+-RyPG6cZ*r#|qm>+8@Tei5@ z8n;^9DcN>kw(ZL96xeFAabO#rD%=8|X95CzC*jb7ExfBFIYHS^Q07-HnY8&L32xIG zZG{n_34vXUAk91xr=|StQ8<{O?F&1q zfKN$HjY$BxxP1Xoq;v=l@@?8xq!S?zo`g1sQ;IUg$E=tnWpKxk3R_i@>}5BAl+Fv( zB286byh_#ghF9lAz&9uN;K!eiz@Db}7b!|=`RVn|W37zu3d54}G{C4&m0lolI!T=&2$G9oUM{e^UW_K_~rADpiy8gnsruYljvt z)vN6c-s|~O(k_>LAiYFtDAiRy!1SQ(&2gASGnq4K2pwwRsg{W>3(4iuDz|u zG9N-p_37w^?|njUi?+0BOXa`!hfkjDRo^d{2L$Rjq9E%BB$98hZr{8qJjuG5yWR2b zF5N509y4q58+2tm5_5}OF~4`z-Ikj5@Liw-G=++;E@ZjxSH2kSZH+hS`!g_g14o2+ zBo}o(J+bsKui>z0JhDL#h~CqKy#sSZ*S6xhGq*}o7<60Gu5%vk)-Nlcn{yVNWHmt& zl`#(0l45}io-1;Big(FSiBDQ&-ar@TZI7`Td7gTidg&gZyx>q*p2%?FfB`UxQKVlQ zQ%s{~yEgz0Q(+`m&o#6vwnOCNBa=P7w<)k$vFjPN=n(jWXSfidM^3pRWBk2z8)Qv` zEkV(Is)7*q&$YZay$mnVH!aPteSd$l zvo}iS5iWSAw$g#T8Ma91a7w9aC7IJ@u}_il4MY8o0{s2a-WTJwQE$Nit?eAx=W6A9 zKA-Fj$J?X5|8qazfGVYWedTw4@x|b&;2z5zSANe2&&T^CYPSbZ$4@5vD}UgV^}U0q zbV_GjD|#VE8@Vee= zB~$)EMIG1%VEPvCYqbPnkRS#>!ggCfM1D_@W|Eq`Gjb;>%-c6yPk0~-6^1w_)Zd|t zEatI*wwTgMmtFpoLUA4eLQxbdb3i(`p{cEdk%Rp}K3oVa`xq4&;+D|MuHd1id>>;4 z=9)~E^WUn)ZDK^FQg=r>Kib3{C0U>jubS)73=70-@PE8FYE_%8HxT{pDhN`KFW0K| zZ(%We+Ch-&X4nCg7u22wHD0Iu;67_&XHq6#uu(yL>8gN+`Mz`uEEJGgZdiRNa{-s7 z>JG`<7omy>l9%8z?i!#v#48asxnAVae>U8HI^2IoK~QqdK%t-R4ZlcjP!$KL*7J|B zFoEpMKM?dcZ@x#PV~`@R->-CE53J+|LBlG=Nm)QQWqJxAXp+4vSgGAYHKB?(I3|Y* z%q#pFz;%?&t*yj@I#Bs82K#8U?|d=X+oc)KL<8`yCpV4lI$YDr$1A|0W5t1GBg_vy z8Y{4;v`K9jT;Bfr*X+u5fdCZ@*%7_38n$SNq9J6o`Ozh5{K5l1U8S@~V*A&st)AWT z#8rS3*$dn2FKk6nwhY#HY@Zk#)PHq)MH4anl{CfcHjlXjBJNSZ!b2?v&FW5;F$ecmdZlU#lzm8){e}(H=&1Q2Y#d=W3U@ej4H-0NRlU(;hjZ9oOD7 zquJkCAJS=Wx8aR~e3%ROA3YQyrGx#=&}y~8pn}w@{hedk9AUiRjrd26WwQ1AKl)Z2 z9e)4E2cb;%#trP7S7wC;yyTlvuz>&C777?4ehdbmHPdFq3a@}>UQ2QS{e}>8q0?T8 zc>zD-2k!Y@LnGk0$7iP$JWEu9Li6+c#-Z~X|B>zc^c?35Tnm70io#F~F~Ka?3#g7z z93F|I?c>C_1|c=qeG4k0Nq_I_R_1z$4Qe|0@7^DWIHBqGf*&d5ngzU}X>sxx>cy=m z36N|bBb_RY2ak9`)4HGk*?;jbKVwH+z-~`smbkQb%MO+W+Uu5zPCGr~z_(Whx;5H) zKH2zkuytJIP>5OhWA@{W z1X1pPGtV6j73k>Ro4bbT@7x@Gi+w!M9?j07e!Jq(d&@S)s@4l(`3|4;wrKUIaoOX5 z$*7Otrx_&+jfyC$1kX7(bhCt2y_#NP2iWy)P#GIx)8sfDA6_${6?Q<`_=rKk^~RP| zjP_`d69g$`_GPV$Mq>(M$}%r zX^q5Hc&=xn^tw}i^@c{JW7@0NWfsi8Km-d1wDLDTS~rS;v4kuF_W(F}XzVHvN@k1G z1=~FPTh&SYu#KwdNLH2j|M?)BC_&d^sTpG#aTZqNEW5S2nab1lt*X>Q58rt*wbBHX zqdOX)FB@`g>SPC%}Bs>R-P>}s_XxPD>w*QGR=UB>>G28;*K zwgF9!IKI4?creM#rUrm(uc|=1Q4%>|h5;oK{!yGu$OR*tJYsd{MfJVz`u^pVl-k0! zG3J;l3=zk%?WjKks!17$tw*7`%fVI*dGtMIERCK&RIfl^^dumHV};ks@_+ql-Pvl35e?bim2CuF!ML` za}M^$4%3nh5uDt2G|FXzm%sB`Tb|-J#9W>E%7H0281V8Nfc4aC2GQ<2 zMN0g_&;$=p49ert>dy1T<|qz&!I=C#r8Lx2`JS0{3{ifKH*%*lQJ+RElP>9i+LK`KQGk7^Cyywj~ANKTH8 zz=5b4b}P%53GK>qsuGSJ77c2lH!M-K7$Go}AN7I=6@I65LFA+OTcf8#j)TZbW}LHB zAv6w8s)n!xCsZHd3UdMo;ZLU25XD(DPoAI3L2uO{KP-o0BmiE^V{-~H8Io$Dbs?K^ z!>e1^uN+h|!PZx=*)&%)BmawPH@vG@uXbp668vH#02j3)W zTVtgBkg1pNz~dT+ylVwXMS5z+!@P(ZwYA%u2d}Br>DpXcZ&?cDg$({Yhic}K1wyDx z%g`^&5ck~yt&4w;`+y|iQ;|#u-wkT30$B@AZgc8VX5snXY-JtIRJQ7m50nDzmB%-= zcVaU*tD(?U=F(VhcxdT*Sp94pta-n;jO6v~C50|%XABlLo`XFmtgHycTW&{&a?v4+ zHK_Js`#$O&S=Ys8>|5Sm-s57F?@rG~+$Z=S6GSU4J2zWklUlH*rO}O>L8T@~z_db1 zA%kZf%@XZk{7S--eA>@Bn5u&=Arf5-iBPsCYOz>$-%t!`sJ2*K=g)sQ^mL3-wapz8 z-b&>IwK^|v&xm?M3qmE~b;WxPmp^)mR>IcH{<*fZM;K`y`b(LDK6EdxKyF>cMgN-8 zmTC_QKTSSoCyIq+GO8)5zeDA7N~3aP18HbS;UoLjV5-EXTXge#~|*csFMeMo^bcFzb3Z|P6xM;1;RUL(QYh}%*(E)f|Q zN9DA=)W_Z$mNKB&_1#RI-doZYxsP@&23&POxdTTY77JB@&E>b6nN!TXEX$f-`?5bX zwX#rL?K<^kDN0gRu+`}U9Xm{^2oxa3WnIXM zg_o`(XBCbneQ`+DSnc&ri}e(gq0c!EB*SsnwnU@6usB{!zE^f?o`UY$a7yv&kT@q^ z!IE~8kwqBi6R!xj5A~zok}8?5Yi77%S|$KShw3z1JOa0uSYdpyVpPjx9?#PEpUhI^ ziMhu5oy=!x9qVDBv1ZSBXYSNa&CNj8NtI!y4#axd@DaHEy@n&kiNp&>FqQDB_h7~; zPC*Gg3Uiuyq(PsIt&zjru}FF{7UXw4Z^F!(V@pPe;5wTgxj{6U=;HC&bwBNvVa19{ zy}Bh>?O0qf98x{Kf9S)2Zkaory;lQ%;%Z&TZ)_%>l-RL{jOc(gszjC!t&1a{_P}G4 z1JLTuzTvod21ML&TNuhqnzdq{9Z`GW`+h2nE^n_*VtN=Y13=VR20yNRw8YDAeF>lM zjYTX3CnzEf`!DzIw_dE-8Qr4pL(RE1+*}(UY_S^HsT;FYBb{0-uRLIfTpR8&?oY2A zt+z#}y~ALYB3EVRU4K3b_~rI?CL`=o_n7NmBSy28%_R_ekzPq#2OU?loum7Il?d3F@~T z2(xL%1zXsTxPI&Q;!qNnRKZ(>#tW2yDmzJ$|W*;-R8(o5s3HcR{>) z=5g-!M&1X`)`t8OU@4ho(%5-C0fb=5YT2nFToakNr@Uk;u%Ie(Wp}GW2k2WECb;6! za$KMv*!r>JI!y}NiV6N-X$H_KOG^5faz8kbFIOTOez`*5Q< zowG1;^~gQVjwF9z@6r0LR&fbiG~5VbMBqfpO2e_I z@J|-8lJ&eF0)tw3%)8$6;oka)Mb9pBcGR5U@cy?#<#6HZvfSYICMy6VGIm#~I^}8y zL|F3KVD<5!s4(5!q+*`wL2zu*R3O?*c|%8Ectm1eN9;?fTW+e1H$dGYFbxhQQ>`MvLAsF45cyOq4B@3d2X2j~)9i5y)GucT_6nX-a{^Hi=lm1Gt|-mPDP9Xg z1W3Z^>@_{nkB?6Vl-RzWo=jh#qS*JiyC)}9=c3MU;U^-G1YP%xLSRxGfDZV1Zk~(3-n#Hd;8TP| zuWK4**0-zrnPY`*1f}H(SP{(o4`?n4R$0G}6J9IT%r61p(b^td?;%GreYmh9IqMWH zJC1Q;N!dFu1{?5rvu_$)Kdne;PoH%V0?dsqv<8)*=W~fop*Nf=v~0{_Rt+rsH?!-w z?X6cmzuIYOIBK;aY(erI;#I*pe{m*$VSwBX-=`=CB`>LTx$(&&F?T~mGs^5Z8Oe&& zE&-p2@4tVEA*g2na{WaZ7s!pLOExiHwg4IHks_=(og zu!3)Npx*b_(D{leF%&7N$3)GFP8g+=_B(lIg@k=vm{5LyJ@|c3Mz~a~OM*KRv*#y% z35KPyeE=LwJ$c2!?+3V~{YN7=+}io{B-sPJ<83_2#`|eP)p@Vq(cXrcDS(Ct{=OE` zRjUy2BtwOgse*koa67~WHy`J}ql&q#?)(ZbP?gg%cljzJ4{xJ_2qTP)b5ehJ>|Uju z-XHMovz@2IF9%QFPO*3VN8(AA0v5?VC<$)?sg#}{XIn5QBf_;;;33bCOBcwt~-6+eHuM@ssUC%-QUeZIhQhDypddysM8Mbn%!ZUlZR! zVs>0$1}ZR71X%MML;Hekdi%5_N-P>fy!^kV1eOw5N?<90r397|SV~|ifu#hN5?D%L zDS@Q~mJ(P>U@3v61eOw5N?<90f4Bq^@&-00Y?b`W%e&rW=U3yk)(+#^tPI7QWb6&? zCUtMhvmmwoKBo2T^Nyt$1 zLPp~BLQZi?$N_xO&pFzfB-hCmXc#Bth?Ep9j%d>*Za`oaSgQif&k^wqwX19*M@^|_ z>-&ugfwvI6&oVJ{^lEyUL>41J*W053xbW!AOf;SZ=}}rxF{X6HlgXy{&J#g0hgUh61R zJ1~^#UDK%0)AJ)hrNO2(Z0U!U-IOq=frw8}b(eTL(IY9nrc5Uo_8KQ`G^Ei2a-`fLFa? zjj$7dX<0qk+a7F;h8A2`K>}#SD{7{JLo6&yPz=_}YcIdp*`%}ZPUV%sH9Q&9YnU(DiC$)vpfHGWtV z3S&N?wxyF6*iTkp*;YBJmmy@gun;+KkL&R@3iy_8zkAnjiiE=`kyr-E^^ zh4~b0ozI{~=@xy?!Vsqc zA=2^pioyv!;?u)AhXIv6eElsY75=|#``qehsjy~egNazi;=F(jhFM{ag9Zg!=G&g! zTBG&=<6GdFdvs4Bf>nN=ifK!Yr-QB0gc^pOEl4SN!i`#(YR#&Npj(~iH9S;SLks~& zaTpz>e>mb;joES~XB8}fDPh)wAz%)s98oqtiZwolXM}@yZugyI|J^4Dxd+5BRAk?t z(}W6~<@Gf*1s^Q64rcauoC;nA(M=&9E4~ar2CYBbn~c{Ews$@b{%W|pzO$djwgsym zlqC5rP%-eQ><++DZ?I7;z1s`l03t6ml1eXJV8FazU!GYCgdQ<$<`=A{=Oz8zhPGxZq0InN24Qm>r*~lG;-qjw19E2R64h4dfFIXl zi1k#-t0JX&zFBQl=V|TPuTi3=Wg2V>_;iQ@U(}#iiy(Yl>lmcbyP*kf)g=Z&N41AP zvmF>Ws;{MS!HRpNjQRF|cu+do2rh)4fVzciYCxz&LIy?sg}!K)g9)yVaLuzu8!=rt zi7a}4^%EPfMZK^k?Ph7G2A2l>4sGMAi}Ade9S)k!$4{rMz2j_`(B0tnY!zomo%T6h zF)98u3-t`Pk$#6R-A5)Gpx11*Fu-{(lC=gim0bwjtD6@#FbK*Tq(}OHl;DQUZu1Z; zcJYd3Q_CWX&#rw4W>NhQ&kpJ)4!SEgpz*vb0|PU6z<}Ko8ep9C{rq~L}!I#!D!XM>_VE5BnZucnL`2CzuvM|P!Qo4`W+7eYF} zMcGauu}N%hv^k!@PqK5cr+KA(aPSoZ+$9?MHRqLL7kGiH*JUjW;wu`L3BUtEoYSq2zJoZn3=eEgZ+82MV za}gH7b9!qX4!Sy>4Q`xIP<}DVbqewIYGllQs3_KUc3-RwClrl`M#I-f6nN;{`y+^D z2xPzx+1o!2ugvGxSbP|)SO2THH7eTs6}~u-d{26bxQ_IiX9GZn0L=N3?aWz>fd2J~ z*(j-5tq1d^ec}I-<6Mo`c**-JiF2V^6~jDy#a7ADC*|X@FPs1m-@lvngrjxFqA zbsE3XBbuic6=hN$Z|ZP`XFND*LT(rY~Xu(ddg{dYrMC&v&X>m2gNj#jS-|=o0}g8&o_1k?hGl=$5EPVkpBRph*M}O2hGvWro$1 z7MGbA70d-y)RF?fpMT~ij`r^7q|d>6-;S&BA*s98{cgw)fZENAohXzu4%vUwselUi zWxu07Vhj##u;vkpKra7&3V5FL_ncYf+0eGBy)91J)Xfu(sL(*a)k#O=qbpLNXtm}i ze_WpTeW=uE$Y$xB6(16uy`4^{KKCtd|M2RHibc3j@ytUNz?MSic%GvDg35>@%C7hs z)&S#7!sAn94h2DWn~*ykpBsB3w^4})%5N@T8<4jRs#Oo((lABsV$S}w3IVag9&dC` z6%7k3fk^jss&de)o)*g=xLzGM&V9OTyR&#gMV)VY&*&M)0?SN>g?D2Hr<&Wijs!oy zGTy_<(U_wrM0e9(2s>Ux6lo zho!w74(s6+&RBLNNmZ*=V;6L*X(0TBkz)tMF@A%Q=Oy|Z;|ZFvIT|Gt(sicfs!Pux z7lTVncONd)_;cmz17Va-#4D;-k7NjS@~a-%Q~^K7nPcX{NObzu^h_~l^Y)@9mSPcQ zpCiZy8)yimTiK!>2uDNeZ4&G^Qf55HIu0oHDE6!L0@jfOj~7#Mm7OP2`4(~FGW<5`8BbcmJTwP<$^M;lbMO1@*7pz0Q!f1&d;V15Ua`rpUX9!DKQc>$F-7p8j>tE5HMds58UT*zth36YX)!2Lg$s@ClQrQqQJ`fZo^{Aw zvhtTix)P(s;uHO<+4Np4qFLWu3^^5ePB^zRM{I&Q^1Jb{&y~q=9FH=b&=mfgDs$v7 zik7zX&mkanH!~Il<%uhWdb@rnnYUO>T_=v4Ne4GxqpZt^(`8EZq+Vs6>pcBkeq|$$ zs{oqZnw>t@!+DSaH}fcN+J{((CyTbU=K;|p@tk?68){ivW{HYjYALfbqq)_I+65Q} zvR0vcidnBU#;fcu+KG=eLWWiqH?o$Lz5y(Ef5YiNr?;1cFHDbQP0#57+FL19#IBLj zBtb7*>tJke@$6a1hbLkXtM08-7kkF00__SDmfl9@w`;U z3{oLiE_Vk^6Kb{+{;(YEQJ|qeVqWqB%>R{))L3N5&nY9PbCnZ^4R2jlh zE?~#-aa@|1iqj$|so*WL3QODtli^vuc2;9Bvgt>edf(U77E5K3$cMQl?7|_Gm=;!dLMHbr(Fg#6K_-Rc{AV{Uu2W`z&kfb2jpX zmS`xys6&fpsP~qm4vUAD#GH376Lr#~Vy$ydENXx|4`Fz`W?6eoB%%e9QV!6MG1*U8 z7VW^roA&H5&d}zJ`IZ7>66W;5mDJD`(NgU0_6~N7Xu$LfyCbicw{o-%9pmC9wu1R7zatRERa+2 zJlrWa)|$MZavB4m`k(Q>T=Gz(3z&WN0HPD%J4)&kgDErja+V@wsErUa^~? z80J}O7KpNuDbv-`oU!0D)9(f_FL0>RtD2<4Qah*~Zz)I@AK>u8i}$kAv^E+$<5I8-v{$=Og|C zE4c4nZ`8$>hq>$*pKU-2HOF4nXymlYb7d7=U}>0dm}?jX`SghY6Qjrhwr!;?+zs{3 zmD-xGsT2p>77A2$m&ZR~&^ym$dj&)%>(GNAt$xoH)IeDCKv3O>)B8zW4u>IoW^^vD z_?)C*qQlKk2&RG{BA9UXmB&U@3v61eOx`k1BzA(AV;xhMEq?JXrw) z&s0hP7E8YP`o6yyVNMb%dB|SJJWbTu%#&s}+$MkSA2^ZIBuQSyo^ygYu>qrdRZ<3G|nq z(B$2dPOJn28Lc+5ZvsS_Q2#~)h>2CU_rG}f?#bp0(h8KoRGFh02C~L2i6#L&%hDWvy6@~WKnv_jZ^7h&XJeO*GXDm z*k}Di@A7$c6`dQ;?x{^MXE3OlHk!e`m|A%CsNJ3s7TZ zqSYQC56W2iQN8GUWa0yn$zz!=8vqQxIwhCy>>!U!+(X?81yQ7L!2iOsKG}J`-6O?i zgJx3s3IX;78$OerHn+naK7U7+N*(+8XFq-T>jZ2LiQlk`16C|DZPX=QK~=!O0v(fy zYHA2rHbR@2QJ&)L^Z%_{!#>^_q>9j&iW`Xi#a+sGqG0Gv-VX3adR0`fgvu}p;H$<; zNr)lshptFu>E?Y0`0c!3Qo(G&1XdEa!+SWr3ym$me<)ajxcm6(60qI0xHL@vfjr!K zrlyJ{0#-lT+Z~UR|GJog36i2ZAg%uM(P({hM4I{-ND^gz7$fuNCi6hDP!l`e2Y$CN zK$JT{iceR(i=)eFLkf`9q?5}zjmm8~opE<}ES>Bl2jtTP~bBfun*R>?1opZ_=OA_HgI< zUyVk6ltwEI<|W_X_s!W`*#;1vzl#enkDWVAwk+i(15Rzn`}ye7tXZ@<*FIF-WK8W> zSj+{y1z^VSH6;EihN*fnuG1=aYcO(_NmAS5bswDNF@KhX>V9l7VY8sZ>x7ECs&C?o z;cH>4RGa#?=^K_=b3wb5$CP}~dL>H)geNVP0|0W3JO~}0nf5sXoB}3f@t}s3lNDYF z#u-B)A3mD@9c?=cV`QD|#%T9zb^MFEO&?%L=8^LkG40*v55x_MSNu6`+K!Bnb zPz7W&cCcJKU%s{t836sDK8K}vkwHHNrpzXU%V1{)o@}p7)O|AE-CtSDLi08;m(=+w zYToGzEvfb@;;X!4Kp{%XS^Sv%w|F)%Ng$3`WDGC>WEA_+Bm8ZHR;E-^q-yMxx&AZC z9E#;gbw9o8@9sQjY^?U}2>{I9U4U*MV8m`bX z*Xk3G&a(aB1hnE;XFltZ%P~-?rv|ogD$Guy6o6ecvR6g$cj&Bpm=N#Y>cLZ5cum$e zMte}{2=Z>m%NOderVTq`z_S2Pz;aS;Vqt0=EwKM+aLhkmo#&@z9Y6 zv~#PnjEQjI{k%`(N8#cDq}5;!i~wA532MnHm)DaBWxd|0#D-9`OGR1 z3OZe!y2GK{@8wl`L>KZ-U{|P-B6W8f)Di>w3P^kQsuw9!nAhJ!P{WPi4m&a4+;ATnjA0v~PzK_@~7II*^b>B~y&Jd3;OC=tGm$Hvo zz{eg`OG@g7x7M^k%7gem0x_i>&|vhdUGBBLL-p?{TM(Bt)}+8r=Bx^N`)y2Ys_UuW! zKRY`;s;ediO@6p_ZZI6|Q<`z?zJJ$W10RE@^(6(ZA9|n1`(v4eFG&yb_SLJLU1CuY z758^NVUeZCa^h+mp}Yj(jamx)+nNudn&pAI=kzJjLD~wbV*>%O#l!~mssgqx$Xk5u zf6j>YxqE@`VHL5DcOUv_lD=2B({U`K8(P}RGGq?~+ThghtAE%zs*Qf(yK%3Ny;qQC zL59Gy7=594QC<65y^G0~>IxPgmb@yU)`gr=M|7kErbBEoqmg0luVwTr+{n z_ucE*H^allY=3MwXXVhoq(OjFa{05Z;r4h4rgDR=>jEgOmK#%8v&QUPao7I-9olu? z4n8aUsc&K1;9YCy)s4B%HMIZ&1Cxdcz?n~%EF_dN+J`Ha64QlAfXx9Y8ZV%e*#wP7 z06g?elZrrbdOYc>f5#%O3O!oMXVP&J0N~H8ChfiC;Y==f$qt@sm=1iN?yvE4td9k; z2A=e9gR<*}mHJ^eGDkI7y*u{HEf;ZjGQ_X~*JrNc58Ahe>O0EzTO|`}f!G-)?|{fI zbpX2(rvVN_AIujZG7hlEKzdOGn+54elsg`?O^t~K@-!jkd(;crJ{T&_R8;@9&6|_d z98Xt0a;BJG;h&bQXE#DQAa=pp?*j%~HrhZV|>s>G};n1vOfOaeW+GRo?O}meF3mQno%!d{LF0quob!Vq$5B& z1WX81oI-!o;yUdzN>Im>4Vsug|By>-D|_ofxXy(fZL*tLi^&wRDw7?6cX_!oO~s_2s*7 zEyHAu2uF|a)IRT}yb9Y;g;nKNRlNXaHaj3r+!1zW?FHTyuZVhQGiGsc^nK0wBqWFY z(+Y~dmf+~L4ows72mkG8CupDi1^iYUGkDrw;)OKposG>{270ZHYR*(`r&U#NS?l?w z^?G_tobyu2%i+wnNx(+q|IfR;GpXGpb5f+zdP^%7-|b_6^^8_c!`rKApOZ-z#5Jq{ zpSZ%ixUTB^V0A#59lKfY=r(0&a~cGiU&)J*@i+!llLMo5{fM2NkF7ulT@H?GN*XPO zq5`kVO8TqgXQRRX#?J1iLyZrChdAGRx5oRE7ukDh@lHERTTDv0 z;pxWC{={~X&GloqE}{0=X0X?1r}`k*nQ558_>XoxTUQUOtl_}SP=IU2I-{lnw^Xwb z*~eFuww|iz0 zGW!IcFlXJaq+;O-5T_jg(;n^B=9@-!n2IXc&aDr+oulZ(9qw1sG;Sew+CA2jhX#!|L%LCQ)S2G42#>z2 zgqZjYKb5kRM0ISz3XL8CS}g|)NB^P^A5V5_tDZw3keRk7L7T>fN<3d$ZnTC`fC=Gt zhTr*g_KN?!j#GmT%Xcg?+-9oK7k}BeQK-DV%>w58&hDjJ%A&`Y|4kq#l@I3f^-jo*bZ$n>xvl*697p!;s21 zXcbRS?7_Nuu-Y5qbw;%EmQjQibwC9ke)r?2o6X5RnUbfY7}*e|S~W1}4dF~6nxv2L za0}S~R(JLcQ|Zlf3V62jPryV6b5WX7D z8Jsji?_$KmsBoQoB&_Kt$$$xc%XaH{oQ{Pa$zBb2QjWMf)rTCp-VNYlgnIy;n(+?$ z>gCb&I5@C%N9(FdHVKwuHlsr*8F&1toQ69npAu{OOZKj(bOP+bZ{$deRH=%c|6=0Oog;$WWol zrm?^CWU{(5-W;t%JA6Uqhv!Xa-^v*iYepw(FYA_D_2*XQ8$*UQpv^vI7vAP=ziR_QhSTBjLGyA&IStFwfA(+$^J__Ic zYA{?|JJ=hpy`Vf0-x>>po{*Bl*Ey8;c##!)WnKPG*cAqUjS#M>&Ck__uFg(j;jpkA zn?W@v0aebaP+G1$#p*?Fk(2)4+GumQP6Tazv`g@b_uTV6yHB&;)Ky~u-fxe+@+BwV zbxig-cH_~7nWsh9XS6qdHq5HrrY;ugZ00Q2+r<&n&sumA$K8F5n6X%VuI{*>{^{y^ zdrm*YbUHH3N5Xr0Ky&PYJfrsp{!Nm#IA2ZxY|D*-LIJQ)8?|C|ow z9xrpm8F&B~BF5_Jv?~l5-^tw-;`vZNJ8awK|n@xaIZ*Mzf z<3$L=HcHeQ{-ENos(`=psyh7GZ9EK2XciGc8$``E0m)FxmMB{V>NNS5%7fbCkC5Hy?M~dNL6m1FH@eE9Z!| z4*Y55qD#b6EUc^sL|n~Bq_oLIyOs`-&JDR_3&1aqZYdEYfrEd+e$Hpj?UsR=O@k;I z`GWEy`R)Aq( z)T%I={kmg7!ew`NYL(Wemf!a@aWWUMPF8pJ_iNR99>Aw1zNXuYo`#dwOIyrdGgRAF z$6$ai5jY70+(MklyAl<8#Rf|fmmn4UJ+ac{6bY|DHS?8z4J5ljCQJpg;{qZ;VL2vA z4#{u%{yA8Nc66GiG(|n@S?CW>(bPETQ%G6_o49DGipsCy;r5O6!rtgt4_o{j6n$kPt6r z3^r$HLfHRw@DdLt?0H(|w}aY-dYN-t6HIm3`Z@E$w)&v49EsBZgNVruwAZ&Do=5|8 zIzLQc@XaaguVXj|$zx%=F%u!2WVOK=Tv_O1Ew@1g8pTs&x=+jtId}4ib>Alj!1o_v zLxki0qQ9yA!Je$mpm8O3h*552RiWPaeL4c}rDcvzR^ zEta3=*nAjR{XUx!E8r5DV_>cf=7v={^ViH=OG^Ia&;HkcSzxg?8o+rCK4yECi)*BA zyo6I~@;hRae(|TSkY5@r@Gci6sAL`ohNv5&@a0Zl*g40;T3t8LuZf~)@Xn0^H0U@3v61eOx`48{=YIz4KxH2OQ<~i|PV#pPRa13^xz>w| z=}LYTNCH3MD}M5xN@_AMw4b5Y7u?-h(&lE3?Y3;Pz?gNO18%CStX`QGzMwcUn9X_F z4^pI*#(?z28&ND{!_}a$$nDj$3Kd7>KJYW&4D=brAt}P{>Yg*k6=T?lo3{(JriK~- zDoCzsxKb&|_OpzdhF<56x`oPX)PkZ#8k0gG4=uhck8AH>hOQg$Br~i)dAgY*OL>^6 z^W&9{&A)?<`Kswh=B1zq=tz{ozNe(R&8|O3B_0j`K^H*$@n}ZfMvIiY;eIOQnlzNF z`q7v@uOU-iWGk!U@3v61eOw5N?<90 zr397|SV~|ifu#hN5?D%LDS@Q~mJ(P>;Qwy#{B{~kvOWELzS;5{%%j+VN$3Pj+fdnA zcLoeeCD=5E%BC*rY4Ro?AXPm_=V&zFZ^brb_4G({HPVs3n^G2-*s;G@|05hr0uqpb z1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMD)ZwZ{XJ`sGyJI!rY-Qtnn zR$uEo_MdLAmft(Ran0ANxs$oRe80XPaCJG?(&kqE`}G|?=(@YbuQc4d9{tDn|N7&P z?rKTXm*wVv(5;y-lGC&^-vm#8$h(&=O&oKMHpyYJJ7;_+LTXVVy*f9FF3x|ObI z@XM2U-s7@+ppEGx9aHklZnM0k+aUy)-uj;L4>PUBO?3_7D(>!*j8{0Z7lATaF!;su4U=DWG#A@! z7%IQ}#*NNhF5u@~XoWNG5(BRHR5@N3$+(ph#{U&!xhvcliqrp?uA$f4svsB^*nYLMIgx6Kv4cc6KxZ}5+P%gxhQ?Ij0-u(2~Qns&8^(D#|gowb+_%!kUP|G?*{z3x@&|H6uP<;oL*ntME?8e zZh8IGyJ5+JSb;RBBALw4L zW++`%M#X^n!&cY3K3~bRAuI>F7dJ%>teu2CXL?Z`FFeA(puonVwV6_Yumz3&S-R z{nLT3CVigXs=R0QKT4PE$TEMCyOw#wG%;rV?&F_R|8Wdn|84!KV>H9e1hCRUgWmynn4~qs0*H(4dMgM3|%kz)AXam z(qs^3Tjr==)#|iKAA-B(rppER7~Q@naQ-(veA3b&OS)A+Zj`=$dg%~pbZSlaon;Kv zn_5=ib4K5xbq9YFxvVx;-6MSqgFIrm`TTr$*U_`^euxH zq{Rx0-SZZCBgSCqR-;eP7|TI@EbkEE?O6U>%oJ@F z>0GtwxY*-1P_FM@5YsS!>y}amF+HS5(d)0>C!7MpvA9d$RbGC87SKp(i>Qlkgbo57GHe)VX=8C8yQ-((0G1&`PT6UwAe+hZkRH% zAFaQR#+Hd@a5`0%?l-wDdsc0tw`QxWi^TC9^fg2D2jxntjS41ulrCT$qRg#2y=>-A z6*RZ>wKetlf`IU#8PI{)ezl7EW)62(-$n<|H&`x|k_BDM8@zdqk_fqH@jtQ|A! zjSNDczmE=c(fx{n_a5n&Rt5o8Oy>;VFYa%Qok|}F8qsvLI4FNXtE86!-M@Heq6l7@ z=f*}oJg;aXiX>n?N}6Nk@;(bb$}`4IKxi9Hmp`V|+k_jsJ4A6yO=+93_>94a9No%t z5l&1zeGsD{QLJhO(B-ur_p&K4!S5FrDb^NlZFsX|yq&HZYmv63^DUwK7!PWnf zrU5My=sk>}l!xFab@@ySMoLjozs!5Zirn7N)#&!J&9VfkwB{On{DhU*+`SAQ<8`2& zxMYRMU}RTU5vf>p+*jdkZaJgU2KSksbU+_qU1CWX7$fa{h3j24{XgjbvVLre-`ZR( z9=xgWERaS z^Ykj0)%=(SK-W*iAx*kt^)a>;+4Hcp@+|+KRuGIn<{qwl9!?|Nw67=TLm2s03<7IG zt390EAwodln)gkB(_&UGyGl6P-SLFG0Q*eTKtGA@f}o^&jBXf$M;xXP#Z{Urqj(sF z419&jc*){*30XIz|HR%AClNm-HbG1nFD;e2hlJQ=ad;MQ(o9oErN!ZWupqRTwCtr} z!^5Wqz94=uO%H3W3VtMLz?`0O0JNgLswR!yFSJg?%CI23P}f?mT)Z&yjPA7?W=Izp z=KFwTF`4++@^k4VziGi}Oy>H60P^x~`N})5m;rf>>Ydj#Vbjrfx_SJ9zRf8{%UBNt zvkX^>dQ>5O=6EPQu2(ns?)08StMjAkl+&f97Y-(NfuCXFc-dlt1ApFJK1WUR>WR8( zO0`Xj;xRftfY^{+A$awR!6uE6>2_7r2|z0!WL#_!BN2cEGud3EI#0nW;H)1XpC549 z%mt5`C1c_V#?tPH|BF%$Hc5ASBY<+Feq?tEAxg;^mIPu=Lns1@s|;P?C=0$o*zxr( zDoZ?0P`JHEC!CDRg>EidKGmLxA}72`5`46FfXF2=|!_Rx^#D5_w@$+Cws7 zpkh>3Py9){KMXfO_+OLn(ls%m=_>6!d0SFrw4>UXT@yWY^wzvvzP#C{E?3_%r`%!( zIDB`lMttMrbMn&k79t7a4HCty%YS2@TW7R;Ob<`q44RS7Qe;+1g%hx@?<rX!Hga@FPERzyy7y> zuVgO6pT;3?N5s99SI)$6mE_Wa#cN&h%J<~r(>~{_L>P%jOJZ*d43yc{Rx5gtnwFm-s(vC|PK+0$yp3H4ee4?XX({2=%W8pvK{IIW%;UBO6-IAyR1Lbg z<0?5sIsLO58e-u!jhIl+n=}wB1GHR4ugYievMIq33O-(A6qriv|4oc6VK$RLS<^%P zHRJEnQmE-_pY!)weL@lL2jmq8b(>u*Yh?zwh+i;3dJVx8JkD!MGM*m`~^WGmf@bqU8Z8yFEZ95;#@RSUd$l2`V<#_*WQb`?jJt@3gF zN(w}ki)7sskYAx`h%n;~?$ezZ3l|$ggDI*R5$a$otz01%s8E(Zmh=ooP1u0%&-0Vk z^&wPwkl0nwrLKYq^>w0cEQK7l!FfzFOvaC-wixrMQsdSDk7;!;3B=2__3jj~i6HT~ zgg1%X236*vZx*1-W2P}yfL_TEXuIFr{V%IMoC~Vq7FKA`vqo zXEWgZH*Tisd5QI_jgB3yDosQ)WHxkyrSs=CWv}aUfLYTDEUO%E5m5yy;4&p!f1lO)swEe9+T2{z%bBp8=e662= zOIeS>GoRJ+3v*47NjWx-koZ2uRtR@x`|y78OTj!ywvb{fy2Hn?=mgcb_i@RYA#(p% zbBTva)vF$X5lD|b#1b>~<@SbDt(K2k*aM=Ie`8~art1ln{8a6srLl2JR7D7^h#Zr; z;llb?W%Tzng{+!a7M0m2l|g9=8PXFk`)xESMM``*=%e$BFv&KOW3jS4;J4qZ(8Y&H zK={j4xWTGhAZ7dc>z@PrMoAnO>AXWV~h>5BS_68X7 zPFWfL!Cw=NRu)=WTQ(h*j|~1(OgSYyD)P|iN+40Pnlug5pmlW6iU_iBQ~YRbmgB(5sEc-99D-LUR|`=h`tqH2NGklSf=y*u=lPC}?dy z5Yj#o*R=4ADIdk?r`*pPBz|3V_qj|r{nl&VZ4-x_rosZ82=M@IP!qO*gy~QyVh*)s zf!tUAS$^)VT6h0K1?_dfvZ2d=kZjk?Gb~X$-Qm9t4j3rH+?VZRbehzmZ?|a_%@avE zw+YIRWyZei;kGGrlZ9<rti?0l9AS6?MuUoNqjw7X5MJn8)6W(}6GPN4cZ z<>m*>9`QOD!em|B*@sFzg12oYL{8p}xd*4{C^r~{?6yR`*d@;}&|xA|5> zU*apQ7ao*dmfQ5pj#*ArP(mNO+$v+F+z4MP$4tL;24SR>7L8!`w0zDc3@xUY4|oLx zs24<>1P+&-jWsqZK?ClvPjPB;Rca`kL4=+#B}<*saKXhn#%Jw5Ka!v0XPeEVYITdS zVL#uA9|g(@W-%zS5B?Xq0K;?^=0i`2w>R{yaa_G^u+dFAJ{E-jK8RA>Rg} zs`!^YC}o1uy(D_&`d`z$$RDzvus$}mL^LrG^`)xfJU(AsU^>5zGKm&{vx!s@LuLQ$ z{sdgI)7VwEj8jhNT~=I5MW)R+Qh@qx>qUB|n4i2pa{_8g5p4e+K4E)bNNb;Jq*&v` zo1_Z(q7+RKUCL<@uC@eN)C&CPXVa5OR-%B_IfoJs6n6P@CL{A2JAqUM=AkDost z#Xpvy&QB-f+4KXw*i)fq=&eDELLk(YkZdzDG$S>&sAxAR zo^kF>udh&MHkk9O=J1ps>~eFMN!zhaF%JX{%|e#0qk*I0{zO0m|$wawS1+n z8ysZJ#F&MC#`pkg$1P=7pFOhdC4EkWUfX(A^K8}H znm0vacI^m+wnIj_rnQN)b*tN2^7j;Ucz<$$aL%4EF8_1GqBRdha!zE z7Fe|HatsC5bvw062WtnYwnoY;l%>x$Lvo#x;p|%_%tQEP^uMx+&F{;Op@k_6P;kJ@K#Sn z(BHOV^XE-CTU?X3X}f#z1M$$`30`oDTe-zPeBKHN0a^JthCd{TVH`G686kDNw#&ox zD{N>A(MlCOlI=-UnA9a|0*qG4%kqT~FT`Tv?HTv{^}!X-#6rfGRB({G7)NxrY2mic z&W0@tn6QciEvczw2Qd4Lz)3O{nW!gFjl2DAogL?9ZfdLihe$RGNHHb3E483(3TBD0 zI|&E>y(`Sb|AKX4n+0o5V9NS_AHB!Rq~6}gSP5HmtR^v51@lZ5ak_7XwNfwgS*+Uq z?LXpRPUnZUZ^U}^KIY)#>B)3{I4>`=J3ZMypC3+7@*-72!8)T%XijbDZS|EOt{*5S zU^TLsO@LduA=B>nVwMa4Tsm4{x*xZv z@hEYv*&=0=u>xEKfU-iKj^*g~PR7iFUHN5G(mLh90g+a<`YFlu-QqXG!oMIG911~4 zVht;l#AJ+{F{HXmYA~q7E){c>a8R|){%BkQiiqQ8HBc%PRX-mPcVG_A@NTdP{RURB21 ziAG#(4kIkf$T3HYK`yZ29-m{~W!a?(ZL-yxUX`c^%#E zQ_c^Q$|}gHNDBKx9MZni5hz?Y*mZ4$4X1Lu|g!wocWARUEIcMpd`%jDGE>p zR$LilP$bQ13?g+JTmh3uoT2nNcg3&KQVQ;sBJsG-DKfO8d->%uv$3OfOpAkI1OPcq zmjZcCN-zrgl6|U#NbjdV#M0YcoPH8No|nA4eE@ImY_P$EMI4l?DjkgLA)m-_?7mdp zZL#{=p}TmTtC)zCD|m-D_wYkahp6)k+le2~U?^Qq7xh8^fE`v8HX6}R;gv5tn;cC} zr?WFKvT1(3d}?Nn$RpOWd#&rGjl)H+*2R#f}8IaCRk+ThPCv7*bz%j`fvfsVrNvKRRxC*!`S<2JH^kV&mcnPtAX-*K2eqG#g zbTxmHVVW4epxBMXOt}1!H3_hS?9)xi$b5;`g1r^JJfJz!5Tp2XDCoPxxI^v7ls{82ALN^1iZ7rDWVf+VF6 z&e&XVnhcZO*KM)@m9~?mQ_jwDx$M41FF8orBA6;_)$Tpp+8eauraz(IP7;tEe`b$5 zMd>nl9}<<0{`%Zo>GqBsZ+yOAQ6yV@sqi63^4d{a1f$ik%B~M8F?{tnU%Rptsgvb2 zFB=4L;e-y$I#-q1Q<!g4~08V%BDr~9A2=sWh*Tt zjfgI!GL&?;cL*7cg(zifGeHJZf0y}KVXX>v#Qu$;(`pAb^cUQHI&#Q z%p2Y&tJz_1KY>X!fgjuBAQlUW0(A%a*dB=pB{dtreA?gnx-PX$1UJ08CDFa+H{1{Jnvpog# zXVr=Wn}1IbxZ+SLdxLB8g3K$Gl+$)v zWc2Xqg)a@%G|g^)Mvh+QUz$F018?>68l znNP)!cyqu%=4>Z9JSCyhcD_YZUpF|9ykH$~zcR^R+5d?XjkSU*);&gr(7E5>&3GvR zZBGz|WdyD}J2*edS1vw`f0`8j?V-t13Mfr4er+}2yhfe*`NTF|6WqRziw%vX$J`_a zzyI;88JzZb?)RN}$=XjttMX!fsbicZqS^E4N>0*a;wet0v>b70#hDZmc|FqYb{_SV z=r-TlVWHwkQ_fgZaYz7Bqa!CzpO}5QM&^gDN_v_H=hRI}4JFVDt+1WHg18*!pX#^7 z2+u3dd*>)KCpXAosYfB&iK$v5nb0v)>krPh1-SeCqc8n7qLle&D`REKM>nIB3Gskv zI!6ndrpJh9Ym=wUAM$~0dm|XJcQK-zV_fy2Ab}^<->ukx8@%oUwXMI@mPk_Sa2j)B z_=xv<701Nrdz|QK>O+WBXXmOG*sM_P1Hp>z241j4wC%}oJi9+9(UMLUDW<9&+9RPV zMb5P2#JAyR?NhaPSg(JJ*!Nqk=n*T052iCJ+r(>jW3h$2=Yo?Am(*%;R3!QQ0CBA% z4z?o)H@0r^46&*bTYbF?#peJBk{D^L?{~F|L%vK>-acPQN@mp(7X**9Ix%n|Tl*+m znTzdBu-pzQaq2Z^?|xkqX7uI5nio^ap$D|7ves<1)eF2D^PIxzQtHWgYz5STSMuO| zUFV+UE*k|b1@FwR6wsnBr_;mv^yGB4<0 z0@FVl?;h?&jQZoD6p53OP=)27*|xThxn5>#Z1l@>j@=WSqyk<7*1ii;8A)2P;? zJUJVko}cU<438)8#{EA}#~(*~8kS{#*vH97MU%eZR&(6lX?}r}_4rfR8 z+5MxB!=3u0qwz5VpG-#l@^r|-jpOa)NAC~$o0@U`>o4cWr|oC6>CsV!tsl?FCwpJ} z2OLbsdpqZ6XTyW(>}31Y{qxz!?Z4~ido!j#%#4mE!=35g#}S;4haYCZIvc;AjP|A< zPKIX(v+?|(2l;if_in;350BbBTbMVR!{FWUj8~dW_89E+@MLs+IG-Q#@1x0N#yg%( zhVM9Da5S7v$Ft!)pP!$fPG&@jhr7f2@6L33Jls2+k6E!{!oK0;c!xjUXI2xYG5x^* zFf1@x-`VKh`N{C$2@Z(#m>>;&p(f6d&ATD$M%Es9mcJHj?ZV) z*|>d<-6@8uAD>R(Tu?^!&-wXIy~Olncr^XcDDNU+JbO5w9L|pqcSmQ_`JC07O-|mO z9Sp}i^XY7-t<~Oae8?Y8Cc6itIauoT`An0Pqse%mw>}!r+M|C6ml^K-WHhJ5I~mUT z`_oYiqlc%Hv++?cS3EK+KR=kBG3D{Q>B)%yPMQ?Y;m^8NR?H`OtNwp>rblPne^<;McJSA81c1@zP@S+StnT!0EY$1%UAXQZ@RRNK9&f#Oc*epEDYzaT zo_!qt^&G+7N?gruTe=>e9KJg^WA@{{2`dW7A<7k0y_}8CvWBzC?(`>MAFz&-6Fzvt zM}LOO@$~(q{@|pa(1f@Dh>o2d0OP}OZ?Zo*nPURZXGg=G@oaX;C`av?c@A3KoXw^u7z`ddLs&+~OoT;0+TWXi{+vJJHiOa5^mvDH z0nC&T=%e$f#}0?CM!QGnJ8d;~j>cP&-5;ZHyNEN=`r&Z@Y&d^^esnb2iGs0csNC-O zad4pCyEW^fx#q8`IuH{Xrt zg&@+=r19u*pMUZ~M;{UD$nX1C!*DhmpUn5CGZd)wg{A-b=a0QzY%+;DGF_HG^%kaG z{~L83jc3Qx*$^wab1*(WW(t$PogT6E%L|q9;hj$>%mzOEc8m#_L9@x;{3zU;Hty$F z2*>P{l>!AaP=i2ZD^6uQM(u+&0hARhbjJM>QOEOloY@%ucW_zGQ34W>fCMBU0SQPz z0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8< z2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|Drd zBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J- zkbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(T zKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU z0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb z1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ! z5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^ zNI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndv zAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnw zfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz z0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8< z2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|Drd zBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J- zkbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(T zKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU z0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb z1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ! z5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^ zNI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndv zAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnw zfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz z0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8< z2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|Drd zBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J- zkbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(T zKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU z0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb z1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ! z5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^ zNI(J-kbndvAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndv zAOQ(TKmrnwfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnw zfCMBU0SQPz0uqpb1SB8<2}nQ!5|DrdBp?9^NI(J-kbndvAOQ(TKmrnwfCMBU0SQPz Q0uqpb1SBAV|IY;eH&PhRBLDyZ literal 0 HcmV?d00001 diff --git "a/ramdisk/\320\276 \321\204\320\260\320\271\320\273\320\265 pkm.gb .txt" "b/ramdisk/\320\276 \321\204\320\260\320\271\320\273\320\265 pkm.gb .txt" new file mode 100644 index 000000000..9f8d5f61a --- /dev/null +++ "b/ramdisk/\320\276 \321\204\320\260\320\271\320\273\320\265 pkm.gb .txt" @@ -0,0 +1,14 @@ +Предупреждение: +Файл pkm.gb, предоставленный здесь в качестве примера работоспособности эмулятора, +был получен из интернета и предназначен исключительно для +демонстрации возможностей эмулятора системы. +Предоставленный файл pkm.gb является собственностью Nintendo, +и все права на этот файл принадлежат указанной компании. +Использование этого файла в любых других целях, кроме тестирования +работоспособности программного обеспечения эмулятора, может нарушать +авторские права и законодательство об интеллектуальной собственности. +Авторы и владельцы данного эмулятора не предоставляют разрешения на +использование файла pkm.gb в коммерческих или иных целях без +соответствующего разрешения Nintendo. +Пожалуйста, обратите внимание на эти ограничения при использовании + данного файла. \ No newline at end of file diff --git a/rust/Cargo.lock b/rust/Cargo.lock index c246db787..a481eb4a6 100644 --- a/rust/Cargo.lock +++ b/rust/Cargo.lock @@ -2,18 +2,6 @@ # It is not intended for manual editing. version = 3 -[[package]] -name = "bit_field" -version = "0.10.2" -source = "registry+https://github.com/rust-lang/crates.io-index" -checksum = "dc827186963e592360843fb5ba4b973e145841266c1357f7180c43526f2e5b61" - -[[package]] -name = "bitflags" -version = "1.3.2" -source = "registry+https://github.com/rust-lang/crates.io-index" -checksum = "bef38d45163c2f1dde094a7dfd33ccf595c92905c8f8f4fdc18d06fb1037718a" - [[package]] name = "lazy_static" version = "1.4.0" @@ -23,22 +11,12 @@ dependencies = [ "spin", ] -[[package]] -name = "raw-cpuid" -version = "10.7.0" -source = "registry+https://github.com/rust-lang/crates.io-index" -checksum = "6c297679cb867470fa8c9f67dbba74a78d78e3e98d7cf2b08d6d71540f797332" -dependencies = [ - "bitflags", -] - [[package]] name = "rust" version = "0.1.0" dependencies = [ "lazy_static", "spin", - "x86", ] [[package]] @@ -46,14 +24,3 @@ name = "spin" version = "0.5.2" source = "registry+https://github.com/rust-lang/crates.io-index" checksum = "6e63cff320ae2c57904679ba7cb63280a3dc4613885beafb148ee7bf9aa9042d" - -[[package]] -name = "x86" -version = "0.52.0" -source = "registry+https://github.com/rust-lang/crates.io-index" -checksum = "2781db97787217ad2a2845c396a5efe286f87467a5810836db6d74926e94a385" -dependencies = [ - "bit_field", - "bitflags", - "raw-cpuid", -] diff --git a/rust/Cargo.toml b/rust/Cargo.toml index 76dc94348..c652d3c14 100644 --- a/rust/Cargo.toml +++ b/rust/Cargo.toml @@ -9,9 +9,14 @@ edition = "2021" [dependencies] lazy_static = { version = "1.4.0", features = ["spin_no_std"] } spin = "0.5.2" -x86 = "0.52.0" [profile.release] lto = true opt-level = 2 -strip = true \ No newline at end of file +strip = true + +[profile.dev] +lto = true +strip = true +opt-level = 0 +codegen-units=1 diff --git a/rust/src/lib.rs b/rust/src/lib.rs index 520c35cd2..dd0895167 100644 --- a/rust/src/lib.rs +++ b/rust/src/lib.rs @@ -1,31 +1,51 @@ #![no_std] #![no_main] - extern crate alloc; use core::panic::PanicInfo; -pub mod ffi; +pub mod std; +pub mod other; + +use std::fs::read_to_string; +use core::ffi::CStr; + +use alloc::vec::Vec; -use ffi::tty::*; +use crate::other::tinyada::{Ada, Token, TokenType}; #[panic_handler] fn panic(_info: &PanicInfo) -> ! { println!("{}", _info); - tty_puts("panek"); + qemu_println!("{}", _info); loop {} } #[no_mangle] -#[allow(improper_ctypes_definitions)] -pub extern "C" fn rust_command(_argc: u32, _argv: &[*const u8]) { - tty_puts("First program written on rust."); +pub extern "C" fn rust_command(_argc: u32, _argv: *const *const i8) -> u32 { + unsafe { + qemu_note!("argc is {}", _argc); + for x in 0.._argc { + let arg = _argv.wrapping_add(x as usize).read(); + qemu_note!("argv[{}] = {}", x, CStr::from_ptr(arg).to_str().unwrap()); + } + } + + println!("Hello, World!"); + +// let mut ada = Ada::new("with Ada.Text_IO\nprocedure Hello is\nbegin\nend Hello;".as_bytes()); +// +// qemu_note!("Ada created"); +// +// ada.lexer(); + + // qemu_note!("Ada tokens: {:#?}", ada.tokens); + + 0 } #[no_mangle] pub extern "C" fn rust_main() { - println!("Hello, {}!", "Rust"); - panic!("test rust panic!"); - tty_puts("Hey guys did you know..."); + println!("Привет, {}!", "Rust"); } diff --git a/rust/src/other/mod.rs b/rust/src/other/mod.rs new file mode 100644 index 000000000..8f79dfbfd --- /dev/null +++ b/rust/src/other/mod.rs @@ -0,0 +1 @@ +pub mod tinyada; \ No newline at end of file diff --git a/rust/src/other/tinyada/mod.rs b/rust/src/other/tinyada/mod.rs new file mode 100644 index 000000000..f8056b6ba --- /dev/null +++ b/rust/src/other/tinyada/mod.rs @@ -0,0 +1,154 @@ +use alloc::{string::String, vec::Vec}; + +use crate::{qemu_log, qemu_note}; + +#[derive(Debug, Clone, PartialEq)] +pub enum TokenType { + NONE, NUMBER, IDENT, PLUS, MINUS, STRING, + DOT, SEMICOLON +} + +#[derive(Debug, Clone)] +pub struct Token { + pub token_type: TokenType, + pub value: String, + pub start_pos: usize, + pub end_pos: usize, + pub line: usize +} + +pub struct Ada<'a> { + data: &'a [u8], + buffer: String, + size: usize, + pos: usize, + old_pos: usize, + line: usize, + pub tokens: Vec +} + +impl<'a> Ada<'a> { + pub fn new(data: &'a [u8]) -> Self { + Self { + data, + buffer: String::new(), + size: data.len(), + pos: 0, + old_pos: 0, + line: 1, + tokens: Vec::new() + } + } + + fn number(&mut self) { + while self.pos < self.size { + let ch = self.data[self.pos] as char; + if ch.is_numeric() { + self.buffer.push(ch); + self.pos += 1; + } + else if ch.is_alphabetic() || ['_'].contains(&ch) { + self.ident(); + return; + } else { + break; + } + } + + let token = Token { + token_type: TokenType::NUMBER, + value: self.buffer.clone(), + start_pos: self.old_pos, + end_pos: self.pos, + line: self.line + }; + self.buffer = String::new(); + self.tokens.push(token); + } + + fn ident(&mut self) { + while self.pos < self.size { + let ch = self.data[self.pos] as char; + if ch.is_alphanumeric() || ['_'].contains(&ch) { + self.buffer.push(ch); + self.pos += 1; + } else { + break; + } + } + let token = Token { + token_type: TokenType::IDENT, + value: self.buffer.clone(), + start_pos: self.old_pos, + end_pos: self.pos, + line: self.line + }; + self.buffer = String::new(); + self.tokens.push(token); + } + + fn none(&mut self) -> Token { + let token = Token { + token_type: TokenType::NONE, + value: String::new(), + start_pos: self.old_pos, + end_pos: self.pos, + line: self.line + }; + token + } + + pub fn lexer(&mut self) { + self.tokens = Vec::new(); + while self.pos < self.size { + self.old_pos = self.pos; + match self.data[self.pos] as char { + '0'..='9' => { + self.number(); + } + 'a'..='z' | 'A'..='Z' => { + self.ident(); + } + '+' => { + let mut token = self.none(); + token.token_type = TokenType::PLUS; + token.value.push('+'); + + self.tokens.push(token); + self.pos += 1; + } + '-' => { + let mut token = self.none(); + token.token_type = TokenType::MINUS; + token.value.push('-'); + + self.tokens.push(token); + self.pos += 1; + }, + '.' => { + let mut token = self.none(); + token.token_type = TokenType::DOT; + token.value.push('.'); + + self.tokens.push(token); + self.pos += 1; + } + ';' => { + let mut token = self.none(); + token.token_type = TokenType::SEMICOLON; + token.value.push(';'); + + self.tokens.push(token); + self.pos += 1; + } + '\n' => { + self.line += 1; + self.pos += 1; + } + _ => { + self.pos += 1; + } + } + } + } +} \ No newline at end of file diff --git a/rust/src/std/fs.rs b/rust/src/std/fs.rs new file mode 100644 index 000000000..3f0903b2d --- /dev/null +++ b/rust/src/std/fs.rs @@ -0,0 +1,57 @@ +// note: возможно лучшим решением будет переделать под определенные файловые системмы, но пока сойдет и так + +use alloc::string::String; +use core::ptr::null_mut; +use core::ffi::{c_void, CStr}; + +use alloc::vec::Vec; +use alloc::vec; + +#[repr(C)] +struct File { + path: *const i8, + size: i32, + fmode: u32, + open: bool, + pos: isize, + err: u32, +} + +extern "C" { + fn fopen(filename: *const u8, mode: *const u8) -> *mut File; + fn fclose(stream: *mut File); + fn fsize(stream: *mut File) -> usize; + fn fread(stream: *mut File, count: isize, size: usize, buffer: *mut c_void) -> i32; +} + +pub fn read_to_string(file_path: &str) -> Result<&str, &str> { + let mut file_path_string = String::from(file_path); + file_path_string.push('\0'); + + let file = unsafe { + fopen( + file_path_string.as_bytes().as_ptr(), + b"r\0".as_ptr() + ) + }; + + if file == null_mut() { + return Err("Failed to open file."); + } + + let size = unsafe { fsize(file) }; + let mut buffer: Vec = vec![0; size]; // Создаем буфер для строки + let ptr = buffer.as_mut_ptr() as *mut c_void; + + unsafe { + fread(file, 1, size, ptr); + + fclose(file); + } + + let result = unsafe { + CStr::from_ptr(buffer.as_ptr() as *const i8).to_str().unwrap() + }; + + Ok(result) +} \ No newline at end of file diff --git a/rust/src/std/io/mod.rs b/rust/src/std/io/mod.rs new file mode 100644 index 000000000..c932bcb8a --- /dev/null +++ b/rust/src/std/io/mod.rs @@ -0,0 +1,113 @@ +use core::fmt; +use core::fmt::Write; +use alloc::string::String; +use lazy_static::lazy_static; +use spin::Mutex; + +pub mod rgb_image; + +pub static PORT_COM1: u16 = 0x3f8; +pub static PORT_COM2: u16 = 0x2F8; +pub static PORT_COM3: u16 = 0x3E8; +pub static PORT_COM4: u16 = 0x2E8; +pub static PORT_COM5: u16 = 0x5F8; +pub static PORT_COM6: u16 = 0x4F8; +pub static PORT_COM7: u16 = 0x5E8; +pub static PORT_COM8: u16 = 0x4E8; + +extern "C" { + fn __com_writeString(port: u16, buf: *const u8); +} + +#[macro_export] +macro_rules! qemu_print { + ($($arg:tt)*) => ($crate::std::io::_print_qemu(format_args!($($arg)*))); +} + +#[macro_export] +macro_rules! qemu_println { + () => ($crate::print!("\n")); + ($($arg:tt)*) => ($crate::qemu_print!("{}\n", format_args!($($arg)*))); +} + +#[macro_export] +macro_rules! qemu_log { + ($prefix:expr, $color:expr, $($arg:tt)*) => { + let file = file!(); + let function = { + fn f() {} + fn type_name_of(_: T) -> &'static str { + core::any::type_name::() + } + type_name_of(f).strip_suffix("::f").unwrap() + }; + let line = line!(); + + $crate::qemu_print!("[\x1b[{};1m{}\x1b[{};0m] {} [rust/{}:{}]\x1b[{};1m {} \x1b[{};0m\n", + $color, $prefix, $color, + function, + file, + line, + $color, + format_args!($($arg)*), + $color + ) + }; + ($($arg:tt)*) => { + $crate::qemu_log!("LOG", "0", $($arg)*) + }; +} + +#[macro_export] +macro_rules! qemu_warn { + ($($arg:tt)*) => { + $crate::qemu_log!("WARN", "33", $($arg)*) + }; +} + +#[macro_export] +macro_rules! qemu_err { + ($($arg:tt)*) => { + $crate::qemu_log!("ERROR", "31", $($arg)*) + }; +} + +#[macro_export] +macro_rules! qemu_ok { + ($($arg:tt)*) => { + $crate::qemu_log!("OK", "32", $($arg)*) + }; +} + +#[macro_export] +macro_rules! qemu_note { + ($($arg:tt)*) => { + $crate::qemu_log!("NOTE", "36", $($arg)*) + }; +} + +#[doc(hidden)] +pub fn _print_qemu(args: fmt::Arguments) { + QEMU.lock().write_fmt(args).unwrap(); +} + +lazy_static! { + pub static ref QEMU: Mutex = Mutex::new(SerialWriter { + port: PORT_COM1 + }); +} + +pub struct SerialWriter { + pub port: u16 +} + +impl fmt::Write for SerialWriter { + fn write_str(&mut self, s: &str) -> fmt::Result { + let mut buffer = String::from(s); + buffer.push('\x00'); + unsafe { + __com_writeString(self.port, buffer.as_str().as_bytes().as_ptr() as *const u8); + } + Ok(()) + } +} diff --git a/rust/src/std/io/rgb_image.rs b/rust/src/std/io/rgb_image.rs new file mode 100644 index 000000000..2cc5c00da --- /dev/null +++ b/rust/src/std/io/rgb_image.rs @@ -0,0 +1,53 @@ +// kernel/src/io/rgb_image.c обертка для Rust + +extern "C" { + fn draw_rgb_image(data: *const u8, width: isize, height: isize, bpp: isize, sx: u32, sy: u32); +} + +#[derive(Copy, Clone)] +pub struct Image<'a> { + data: &'a [u8], + x: u32, + y: u32, + width: isize, + height: isize, + bpp: isize, +} + +impl<'a> Image<'a> { + + /// Создает новый экземпляр структуры Image. + /// + /// + /// * data - Данные изображения в формате RGB. + /// * x - Координата X для отрисовки изображения. + /// * y - Координата Y для отрисовки изображения. + /// * width - Ширина изображения. + /// * height - Высота изображения. + /// * bpp - Количество байт на пиксель. + /// + /// + /// Возвращает новый экземпляр структуры Image. + /// + /// # Пример + /// + /// + /// let data: &[u8] = &[255, 0, 0, 0, 0, 255, 0, 0, 0, 0, 255, 0]; + /// let image = Image::new(data, 0, 0, 3, 1, 32); + /// image.draw(); + /// + + pub fn new(data: &'a [u8], x: u32, y: u32, + width: isize, height: isize, bpp: isize) -> Self { + assert!(width >= 0 && height >= 0 && bpp >= 0); + Self { data, x, y, width, height, bpp } + } + + /// Отрисовывает изображение. + pub fn draw(&self) { + unsafe { + draw_rgb_image(self.data.as_ptr(), + self.width, self.height, self.bpp, self.x, self.y); + } + } +} \ No newline at end of file diff --git a/rust/src/std/lib/mod.rs b/rust/src/std/lib/mod.rs new file mode 100644 index 000000000..d3f9392d3 --- /dev/null +++ b/rust/src/std/lib/mod.rs @@ -0,0 +1 @@ +pub mod pixel; \ No newline at end of file diff --git a/rust/src/std/lib/pixel.rs b/rust/src/std/lib/pixel.rs new file mode 100644 index 000000000..f7d8f1718 --- /dev/null +++ b/rust/src/std/lib/pixel.rs @@ -0,0 +1,78 @@ +// kernel/src/lib/pixel.c wrapper for Rust + +extern "C" { + fn drawRect(x: u32, y: u32, w: u32, h: u32, color: u32); + fn drawRectLine(x: u32, y: u32, w: u32, h: u32, color: u32, color2: u32, c: i32); + fn drawRectBorder(x: u32, y: u32, w: u32, h: u32, color: u32); + fn drawHorizontalLine(x1: u32, x2: u32, y: u32, color: u32); + fn drawVerticalLine(y1: u32, y2: u32, x: u32, color: u32); + fn drawCirclePoints(cx: u32, cy: u32, x: u32, y: u32, color: u32); + fn drawCircle(cx: u32, cy: u32, radius: u32, color: u32); + fn drawFilledCircle(x0: u32, y0: u32, radius: u32, color: u32); + fn drawFilledRectBorder(x0: u32, y0: u32, radius: u32, w: u32, mode: u32, color: u32); + fn drawRoundedSquare(x: u32, y: u32, size: u32, radius: u32, fill_color: u32, border_color: u32); + fn drawRoundedRectangle(x: u32, y: u32, width: u32, height: u32, radius: u32, fill_color: u32, border_color: u32); +} + +#[derive(Copy, Clone)] +pub struct Color { + pub r: u32, + pub g: u32, + pub b: u32 +} + +impl Color { + pub fn as_hex(&self) -> u32 { + let r = self.r << 16; + let g = self.g << 8; + let b = self.b; + + r | g | b + } +} + +pub fn draw_rect(x: u32, y: u32, w: u32, h: u32, color: Color) { + unsafe { drawRect(x, y, w, h, color.as_hex()); } +} + +pub fn draw_rect_line(x: u32, y: u32, w: u32, h: u32, color: Color, color2: Color, c: i32) { + unsafe { + drawRectLine(x, y, w, h, color.as_hex(), color2.as_hex(), c); + } +} + +pub fn draw_rect_border(x: u32, y: u32, w: u32, h: u32, color: Color) { + unsafe { drawRectBorder(x, y, w, h, color.as_hex()); } +} + +pub fn draw_horizontal_line(x1: u32, x2: u32, y: u32, color: Color) { + unsafe { drawHorizontalLine(x1, x2, y, color.as_hex()) } +} + +pub fn draw_vertical_line(y1: u32, y2: u32, x: u32, color: Color) { + unsafe { drawVerticalLine(y1, y2, x, color.as_hex()); } +} + +pub fn draw_circle_points(cx: u32, cy: u32, x: u32, y: u32, color: Color) { + unsafe { drawCirclePoints(cx, cy, x, y, color.as_hex()) } +} + +pub fn draw_circle(cx: u32, cy: u32, radius: u32, color: Color) { + unsafe { drawCircle(cx, cy, radius, color.as_hex()); } +} + +pub fn draw_filled_circle(x0: u32, y0: u32, radius: u32, color: Color) { + unsafe { drawFilledCircle(x0, y0, radius, color.as_hex()); } +} + +pub fn draw_filled_rect_border(x0: u32, y0: u32, radius: u32, w: u32, mode: u32, color: Color) { + unsafe { drawFilledRectBorder(x0, y0, radius, w, mode, color.as_hex()); } +} + +pub fn draw_rounded_square(x: u32, y: u32, size: u32, radius: u32, fill_color: Color, border_color: Color) { + unsafe { drawRoundedSquare(x, y, size, radius, fill_color.as_hex(), border_color.as_hex()) } +} + +pub fn draw_rounded_rectangle(x: u32, y: u32, width: u32, height: u32, radius: u32, fill_color: Color, border_color: Color) { + unsafe { drawRoundedRectangle(x, y, width, height, radius, fill_color.as_hex(), border_color.as_hex()); } +} \ No newline at end of file diff --git a/rust/src/std/mm/allocator.rs b/rust/src/std/mm/allocator.rs new file mode 100644 index 000000000..5fcfea390 --- /dev/null +++ b/rust/src/std/mm/allocator.rs @@ -0,0 +1,27 @@ +use alloc::alloc::{GlobalAlloc, Layout}; +use core::ffi::c_void; + +extern "C" { + fn kmalloc_common(size: usize, align: bool) -> *mut c_void; + fn kfree(ptr: *mut c_void); +} + +#[global_allocator] +static ALLOCATOR: Allocator = Allocator; + +pub struct Allocator; +unsafe impl GlobalAlloc for Allocator { + unsafe fn alloc(&self, layout: Layout) -> *mut u8 { + let size = layout.size(); + let ptr = kmalloc_common(size, true); + + if ptr.is_null() { + panic!("Failed to allocate memory"); + } + ptr as *mut u8 + } + + unsafe fn dealloc(&self, ptr: *mut u8, _layout: Layout) { + kfree(ptr as *mut c_void); + } +} \ No newline at end of file diff --git a/rust/src/std/mm/mod.rs b/rust/src/std/mm/mod.rs new file mode 100644 index 000000000..f47c56a1e --- /dev/null +++ b/rust/src/std/mm/mod.rs @@ -0,0 +1 @@ +pub mod allocator; \ No newline at end of file diff --git a/rust/src/std/mod.rs b/rust/src/std/mod.rs new file mode 100644 index 000000000..50c9240ac --- /dev/null +++ b/rust/src/std/mod.rs @@ -0,0 +1,5 @@ +pub mod tty; +pub mod mm; +pub mod lib; +pub mod io; +pub mod fs; \ No newline at end of file diff --git a/rust/src/std/tty.rs b/rust/src/std/tty.rs new file mode 100644 index 000000000..7b0996753 --- /dev/null +++ b/rust/src/std/tty.rs @@ -0,0 +1,47 @@ +use core::fmt; +use core::fmt::Write; +use lazy_static::lazy_static; +use spin::Mutex; + +use alloc::string::String; + +extern "C" { + fn _tty_puts(c: *const u8); +} + +#[macro_export] +macro_rules! print { + ($($arg:tt)*) => ($crate::std::tty::_print_tty(format_args!($($arg)*))); +} + +#[macro_export] +macro_rules! println { + () => ($crate::print!("\n")); + ($($arg:tt)*) => ($crate::print!("{}\n", format_args!($($arg)*))); +} + +#[doc(hidden)] +pub fn _print_tty(args: fmt::Arguments) { + WRITER.lock().write_fmt(args).unwrap(); +} + +pub fn tty_puts(s: &str) { + let mut buffer = String::from(s); + buffer.push('\0'); + + unsafe { + _tty_puts(buffer.as_str().as_bytes().as_ptr()); + } +} + +lazy_static! { + pub static ref WRITER: Mutex = Mutex::new(Writer); +} + +pub struct Writer; +impl fmt::Write for Writer { + fn write_str(&mut self, s: &str) -> fmt::Result { + tty_puts(s); + Ok(()) + } +} diff --git a/rust/targets/i686-unknown-none.json b/rust/targets/i686-unknown-none.json index ab160f231..a0eb0c0c1 100644 --- a/rust/targets/i686-unknown-none.json +++ b/rust/targets/i686-unknown-none.json @@ -1,6 +1,6 @@ { "llvm-target": "i686-unknown-none", - "data-layout": "e-m:e-p:32:32-p270:32:32-p271:32:32-p272:64:64-f64:32:64-f80:32-n8:16:32-S128", + "data-layout": "e-m:e-i32:32-f80:128-n8:16:32-S128-p:32:32", "arch": "x86", "target-endian": "little", "target-pointer-width": "32", @@ -11,5 +11,5 @@ "linker": "rust-lld", "panic-strategy": "abort", "disable-redzone": true, - "features": "-mmx,-sse,+soft-float" -} \ No newline at end of file + "features": "-mmx,+sse,+soft-float" +} diff --git a/tools/compiler.sh b/tools/compiler.sh new file mode 100644 index 000000000..0fe1ca24d --- /dev/null +++ b/tools/compiler.sh @@ -0,0 +1,40 @@ +set -e + +CLANG=$(ls $PREFIX/bin/clang-1* 2> /dev/null | grep -o '[0-9]\+' | sort | head -n 1) +GCC=$(ls $PREFIX/bin/gcc-* 2> /dev/null | grep -o '[0-9]\+' | sort | head -n 1) + +x64=false + +while [ -n "$1" ]; do + case "$1" in + --64) x64=true;; + --32) x64=false;; + esac + + shift +done + +flags="" + +if [ -n "$CLANG" ]; then + if [ $x64 = false ]; then + flags="-target i386-unknown-pc-none" + else + flags="-target x86_64-unknown-pc-none" + fi + + compiler="clang-$CLANG $flags" +elif [ -n "$GCC" ]; then + if [ $x64 = false ]; then + flags="-m64" + else + flags="-m32" + fi + + compiler="gcc-$GCC $flags" +else + echo "No C compilers found!" >&2 + exit 1 +fi + +echo $compiler diff --git a/tools/genmap.sh b/tools/genmap.sh index c5ee573cf..a676a6719 100644 --- a/tools/genmap.sh +++ b/tools/genmap.sh @@ -1 +1 @@ -nm -Cl -n iso/boot/kernel.elf | awk '{ if ($2 != "a") print; }' >> kernel.map +nm -Cl -n iso/boot/kernel.elf | awk '{ if ($2 != "a") print; }' > kernel.map diff --git a/tools/grub.sh b/tools/grub.sh new file mode 100644 index 000000000..81731ea17 --- /dev/null +++ b/tools/grub.sh @@ -0,0 +1,8 @@ +GRUB=$(ls $PREFIX/bin/grub-mkrescue 2> /dev/null) +GRUB2=$(ls $PREFIX/bin/grub2-mkrescue 2> /dev/null) + +if [ -n "$GRUB2" ]; then + echo $GRUB2 +elif [ -n "$GRUB" ]; then + echo $GRUB +fi \ No newline at end of file

yr)(=z!HbJ^5v+51Oq_X+21rkBL=wh$C7=&jg8c~%*a0U3}18IS=P zkb(a>19{l<;mJA9A7>x*rsR0+&q%iN5LXy492oZn)_=m>2jhr~CU!6j^B<=YIH%u2 z9>1^4z=lbm;oQn3T;Dtwo5uIW{+T1Ndt86~lsx^;u_nyK9N8u>!t2iPHJarV z?_g9OoEWKQg|#vT-pcz25>pE_vWzv@l%R zXYR{*p%i;TelPy8#~zOHhOJk`Hh+jU9u{L2dn{t|9cJCsa+&e9d^o3}lZ!L*u#Y`2 z7sd1US3IxxL+^(S$bbyUfDFih4E(VHGuKB+S0@Z;(+r2%bG|<@hVx~_;3Vf2-`J-! zj!heZ>&zGA#IUxB$KU6e131Iu@>{FZu|H-Mj%IQW!Y%W0bwehy`nE-ORusOUJ_MIj zXIS}@%Zx)z{gplMVd|~2nOis>Im(JPOgv#?iF15zGlz%Cd6*c)K8CJ6?y#Sm>rMP& zE}MSyQ+!<}-pJy1#yB}I5!YAE z=lH>#>wNKCEbG=8F)zP}r7fFdS-X}o~!@$2l{07w0Q6^qeV+wW+{uujMM|C|t+7@@jO|)_v zXL!7Sbxtg@S(~(FTwh#Un~ob>=HcMn>6qQO4KA!mVolO$T;QC9XBh`vN{eLwc@Ne} z@tB>*?=OjO zOXstPBpT6mU&5Rwjqz32PMF)cA@&UV3^&ta+3(KhN@dLz=T|f_)D^Cuy`6tKJYx*@ zO&^V;>5(|TFbO>xy#hZER}{?W0w3031x9eJsxbDTn?4Z68YbQ_edCUcz3$4KTX9Co zk|<$f4UXAcgmV@aDN@85XE%So{BU-5wqgyJe6DbFcY&)@Uj8n36y|&&&d!<-MEjNd zW51&JLGObM$bbyUfDFjM?-}r5{Z9Vexlo~aAtVgyixZ18aV#|&CsDkW8 zd6>QrllwT&yobF9$G&Mx72yj$mE$>^SpL8js4;u!3S9f8a9VsR{% z^PFeS#M*vct(fJk$wx2-xyWPslaZtEi7iY_Ve%P2j2~o;nQP@m9AXc9{9$4fbDKQ} zax`YFmG3ykny&MVc}&j3>Q7;uaFoCQ$HbGwPT#?opXs?Vk~um zu}F5pWE|k%afp}-8i2i^B){9ps=eO7k7@G zEa$)HT-V8k49I{C$bbyUfDHWqZy?u0x!}REUroP4x3}tHAIF?Mk(r1b_I#XYzr^N# z-LYd}FDu?KHCLvF%ETXL-SlxBm^cXQzxV)0W=+7+jH$TB-jC#dZE<#8Dvm5>Pd3N9 zJhPb5y{T!^;ceTXs0u9y+Huy!_%FG;}l zZA-D2xsjo-J&OTPKaSITFpWu{c)Nv6QJex;!1No~y+ih!cty@J2z#5&1th&}GGpPO1MGe^3~cUUn;fdcSm++pVRF!P+7B_CrD6L;kE$Y;eP?jA1IJnG(g zol)G$9VJ{mU~*adY-t|xfg^1Ad^Z?X4*^Ly}n|NRMLaC0a7ue&zD zrR}W4S{#Lg^QPlK;y9dQ{BfFn6Ke;&k82!z%ETWg|M7eAhskM}`N|JY8fwkqafx+S z*&GwgT<;izm~paBN8859GV#Yr&IfXwa}n;HJ`@+3+c<9KC*-^!CmADT^LO9+Y7SOU z?1P<2V{mo*BAj90%FQjyuxG|t^n3C#jDG%Uq&IJdoEcGA*X4c0J@*o}wC&6oq!re* zZG)UhGcNE{){Tv2J=j?5{2b%1vz&|M4C9WI><=+Hn3L>jKgl`a(}wj&2=gDlg$u%y zF-WN(j$IYOF|a~8j@9qPAExHY?htj$Zf zv1cjv%$thC%z>PoKNCkd-{4P+6R~yFr+j{nO~ssnmH%M@cP5m@mi&72y|nMDE953twV%r9cb={?7>cdwYfaz3xgx$GY|0J}%>HDpAy_Q{OP zJKnmFH4ZT25L5qkGHyJw8EYI&p2+z;rs3ksG^`rim*Y?^!0|<~IK3nhhcjj%dlBot zwq@bs*Ygn9zYW$*9f+SdFTq95Klt*w(Tm zHg)WZg>72mc=Qx*k7+o^KKHZn<2nB!^B=e8M6~8Yd^?R_t!^9mf?9*}M z;>pYTIZjzYcUKf=EK;dpVYI3KB)U9S3#}iijw%I;BCq28`!?Qx(Dym|`}KcU24p}6 zWIzTUTm!DI&Twb1a_?qM@crx*9Eh2Tn{%_UrB5%6toAUzdcPeGjvtCE$ul|5>@-|T zoPqOkQ#pTNG*aKKk2SqI;rg6-=07+#73-B!+$Op?Psj_pHx zv4?{>2G%;69K$*GbX;QWah3Uu?cG+&Zucx4vJGoNwmi+>ZI!yI=+;cW8ipeC@ZG|2Uq&c}-Fiv7k*GOsr8GvtN1x z>zcI2g6H1A_Euf6wsl9Ozxy6G4fu?42mfBydzskDngfLK(gnsFX5CzG#>6_ucG18J;_O2)CtlQ8A!TF7erCf0Rg z&%;dCO(pR-n{mfQ&b4=q657tv%$%?_UKAo^?a8I0C zl7#i~W3Xr0Ec|kI56v4G;6BPa?D>d58%F-k=PN*vA4`vzsz;4 zW`Ftl-7BzrSv;1r#_IHr#kldqdR*JR8n?b%hcjC7+<>%QeSU?xo-GUMTQtMX^h7JhxX79?6LXkz z6Mx*ZFqdHkROV6i zDgPK6g_ee|6XzpT4n#Q+8IS=PkO3Kx0U3~i`^bQgOI}3x`%_b`tQh|}HqByf)V|fYa(pW;{`eKH9o&ed;XQC-T{_3wioy@fkz}t(#;(NC z_-TCx4yI4Wp%jiW#WAyvvOoRmf&}cDG!WayeTFlO;;?VlI2=fuh@;GR9A7Y#uRRu7 zgS%LL9lMvt;)iv!apTl>ocnPdR;EwDwk0vRy!T67*|P?>_HMwnU5oHDV~?M|UW}hN zEI?MzHki?<9=;ztjP+i#*jo~fLsKTAZ-t7S`{P}#Yt<1OT6Mz8W^J&g+lNSgv%VFJ zosVTtJICg-#~>#5FzcpH?K1NrXW}N{IQwM|aK6S}S+h{CL;(a8Er{}EBM{Cpc!OBy z6%ZcEInhHoKVeBL&ykz?C|Bk@-14)>gNw75JDl9}!ow{u$JKQ~DUPul!Evr0JLKNAY>tD(G6}ag<>XiTizI?S72E|B0{3oiS_>$I&hm zSQI6Scyf-IT-xXAb07mUAOkWW12S-57;xo0*)3{U#km!W@k4YZuB5SVyH6iXuT=}H znm0%K>veHt$UrOiVQQ~T{BdJ;9JcoBiAgWkvT`4$9_v)hIGkhO$C+dve{;@_w6+bg z{FBbiRm5P$uurjkTz_m|%HECdR^a@B)wr3x4a<^7VpY;8T={W5Rwj(VNzPfgDs~7? zZ_2{eZIv}r_$otC*Ygk0~N!95f&1JkTT)$3lD)G zFMAd(jEC|vU%?o|gK>vh@_DlN!_x(B&bd&Cc@Mulc~HUG6;E@Ft4^VnFr?};7!Xk% zW6M2>kpY!4tY{d<23Evy=0HBJUK=&M3!<<-Yxl)x?Y|l4nE2y`T7eidxF-64^cdsjQuf z$JrUv5LKrRYmVw;-WzXV^?UE);$$9QGxoSVE7Hn=m^!Q(^`7MzwQsXmd?x4RxIG_6 zCdbQSzGDmPq`v&P6Bcx7feYyg_-fc^>;>t8EzCn4+c+1$Fb8tu@CNpTBqMQLZ~S~_ z7xt{5ZRJL?X7tC-MKf{h)HYmap5(hF(fDB@Ul+&BJ-&1nX7}ra9jxcNxoZ`6&Y6lm zOXHBeYay<(t}As!H!K+62e(daw{joX7=K(nvI$oYZor(${jg%%AY9tC2)DMc#0k#L zemIHa0kco!aP%0QW6w!8=UGf*y;*#N*RX9sUmTywK9pIBhog#kmRD*K#&)j5WU3=_K~D%uPd5|K2F&oEuM6 zs(`>!z8nWD908@nP(08dE{sba;`h{M+^d3~UMS$fadtVLZXxDFN^oA5AjTe5T-?#1 zSO7jOT^U0w)x@yysu&wy15?X9f$3q@F(a%B#+53I(PbY+|7x{RKR6U290SW)F~|dT z%`M;km{&7AB~zty>rT%z7+S ze|0uyvX%ST#W})<)_erpm;?ERHAN;K$!3jIcG?tcZu77DcgL>5y*VdHBhKFuk1az! z!=m0@u{U!Heq6+Hu)bdn9Nx%!s5O}Sc}L{z{|Xn6Z^O?QzsH)a$(R>CnE8<%Rt)je zQPxTw+K8K6ayVB<`r!AG$-eem-+YN1tl>Jp|4aOQdMAE4`89h!h9T;s*7*7GX52io z*}4vlMR0N_zMB_=UN2O`S7Qg@moGWzNBUHpX0OQ^&e>tc|26&Z*V)tZ!>B<>Y)}vJ zZ@h*j?c3wbv>CV-mxz&%R7F;U#@NyMLu_On*7gqFFt~a})@pH1MUHcIo;@Cyey9KA zJm*3&ee!0$knEIr9G{JDwtThI$|Gw8d2qIA?4BMk@i>}#8rG8 z{d`04dFATp%B5<)0&r3M@jxAGJ28(|r9x56WXzFs^c`d$eg{YQHNx)A^^p?uEZ%Ql z2~Sn`LlJLxxH>Bz^559+>UZe>y9~&H49LKPY``P;L+o94!TYZ~$G(JQ{5WGgZZ1s6 zS08ji-B1jkaQpGweY(Igr`S-oi9~_kVKwSZge-3+zWf z$sX~Gb7x}Ph~CKNShU{^{gksck1jz4jb-5Bb!}d6@i%=|R81IUCJl<|46rK{!9iCC-U{mhs8S_(;}~ zEkomKkD&;U56iLc%Ga+1+?ek$9$grF6ma8wgL#}ekDxn>=JkMY9ye6aUl{d@`Jqin zc?@KH(J#CTMwYH-#U7DmYa)iVSMiTNi{$FhBkRc*u=vH-F}mC%=owlTeQP~~SN($E z!TBX0Wb+T=-|k=16T|vf!`Wj^ttIDZQ=B>S4o?2q7<+d#Kw7LV4yjtPIO7lx)nzG0 z*FHi9WIzUFKnDKf2Fy6D`51c?VeQrH6(iVN5s%9Y=iyWo=gNqQ!uV?Zj{nuyu(HuR zNUZY=l3#iWS7Rb^cIFhE;aIaK&vA6ZP)vBPCT7-ufn&=~ITs)2L{FNElN^s~ zS?~7vWl<{U@)(S$de0+!I{U~cjm3&y-EcB}8jjAMiXT%a;k)DsIJapYR!0v-+GDc1{SjSeB$FZad^OBtYXi{!g_CGYfHu; z&D&yeJLZTQzs~s)qq!Y8?k?-E&L-OCK+Lh`0%1>n636ahPrm8TKN>Ry*S=hi@ysa| zcXmQyPY*bAe5zc0Pjd6UanGFxp1IiL;mkP-bGx97s~27@6@lh~rSS>p6m07gh@lm0 zU`)lDm{RcxL|1+aN!6Za%uyG~PrQgZPuJs87fW8`n8A%&;$z=13}6pPv#@f^q2#uH z$Afqr{-FNNg}mI*tJ@=Y;tzWqVm~*r$eykBkvQWSw12NW%7qkBE=2!#{^S359@NjD z{%(EGEdw&}pc}}=9`n3hyx4c@!`R~m#vWfz8;1*v=Wq^-Xk3h(iODrtzw>-ueAToS zR=?d8akc7T;X6&NF=kK1aSlBmSDSIJ7PoASq_}&)Y-GU8&OocTe?xPySqCOK>=wb z6qFR{kQ5ZVyHP?g-oN+vIQH8Udsc4GHqRgDb>IT`o_p@+UcT@1E^Hi6%?b0l%HqOs zg}SQi#78&CZ&ZW_z+H75{8dz_u~LKU*pWzdvc=QAyYME^2PK|v>{DmvFY|XxygU$L zYJyN5UBphDh=4KUkZNLyRGynOT@#$Lu*V5vl;yp;vHK*D`ZM}R*bRT5SmVAQwP@^G ze{=`{Af5qGH`McwKh&R$a_n~v6&(M?_{F>Ck)vWOWK4X^dS9R-=m#T-(wd!J2 zqZY7chVHzfN|@WBC+4*3jCn0PVSDdk*wbe?_VpbOPxcHR8Z{1aYWfHoISwJj9?=^5 zh@GH^WHnP9Qq;nfW^J&1#2ECbRU4o4v1YR!8!RmeOAk^*5c1ztfD%&qZF}$ul6&fII_# z-Wm9WKGV71sa~$2f33rc2;7+h7^;2GOAFYH%E!!h?q8+l#>~UnAI`$42 zj1*@_yp9aU9bY#*Vh8!1JzH>a!f1N2RT1uFjB;k;-Xs1HUF4PF-iVrIkL&xkun+Jc zF05UNtwYI0OrFBE`~gIAt^Vw=r^J!m3v$IBX7ygCkNi3Dho6fvLgrfIW|$j_M5b<> zKMrr4gU8uXxN(Agh|IcrloiR`+%!Bn5r*)Yj@ZMj++se~tCMlaIPpcZp3_gy^mQ=M3}xV+=dT>AGKDuiIZLh z_|Qkb4|mD;R37rfwN2}ANKXe*CML|ivO&DI0kVwDk!NCsEPXSiIXYqCw;hNt_OlP2 zkHfByJM2HX&z!D@fxC&>wh(_1d-w?)LR>=pag)b*o&ECq{rjM`@Ridi+>BiwE!Z#E zzD`~AqgO+xZAZ)+sDMQSMq*+2!Pr8qv7%iMOeZGU!H$o8gB0L1QVC(>)e$y94Z)*{ zLG%o9iyTdYnI$5|X(2_$1bJptFs(^TtQx9-@y)-+R|4z&U`_P_IT5*=@X!0c{jHy= z^{BD5GVFp&Mf(30e^m1!w=WqXElwTV)(nB>1mIJDfU-#LD3i25R z>?mKOF$8(Lm!tULHr$Q$LBgg5IL*%Ui|iLX$2I+VKF*`~U{od^LE^$0*l(bL4oAlI+{H=S;=z2u%=AO43UWW(5ef(JXtE(W@ z!5-x4AJ ziAbPNW=)@7)NzsTApdbsbe)s?xF>oMiLdUm%S7Ohhr}O`*bD#Ak2%HkxR=I9V>Pi) zcX~j2@EUa&W~KJ7QxBSL+QDVu5X|d86mvWG!NLwbu=3l!*wB3-HCKb-(y$peb?=Wr zWeo(-m*T5PzXx;5a-FB(1&{kxa3D@CoR2Uy9psxjAk)wR9wU_C)S@kHdi6oOnl=9k zf5`8VzxU^4J@RYDS{;#_s`az*hrl61lXc~c0ggwiVC8}V7}ED^v}pDzK9VtrjKO3K zCeMI81M&>WGa%2v&zu3Fw`ucfUD#-hN3@qKd-e_Owea$=FJ6cEA>Q5wL0Xz{9We@5)~uzU!k+g-eN!+!-&~)I?Ex{!ZLZBrm`%0Y zWIO_#jo5F#omhcA==5(VubhL*<6*eXeBYbIH`lqoe?l(f)T$*oY)O65L|*gXM~?+> zd+5Jk^0^C6!*lpZ>?ih#AjeV4%&Ggn?zro-503+gm*@e%vSmHi_3VK-BV(izL!?f$ zKnC}20|(*YI3-+PzZNfiz44qHtV%y`Bskh3P+bkFHtZfG4#~E*L9UGh!u9pBW8`q; zE}MrE;);iX`y~G3mJgpp&~AReL&6>pe0R|+Lr*%-(?cFhS=b>QnKlg?4ZnZ^z2Vx; zzJ^u%Z!x>?AS~?FA4@v*#QH9Mu!9|f+rMR>VD|xV8?1;Wt-r;xww>Tl&Lcoo4e{pY zxV3&AUI+N&nK%9PL42;Bdl6|ujhL|&j*ZvDnHdY=Li{mf@DTK4pL*S&IX5yk`Riko z`gLkSYeG9DMydX6{2?%i@TrTutjnkM5feTE*2Z1%ZRV7r7RWtVels(!n#E>_%bgk z(bNV z{&O#c*_a@0@pSfOxZ~9!Uql!gB3MHcVVb%K)X>6}RcmnDgE>=&=v8MP)SZLdC7;Ay zavV=W-I2R_A-1RvL)xNg66Pr*?^3XO5r3cEfP%wdH%AGN;}O@__jhl{QR1M(2Kq>! zHiexe`|;#}8?J5HfBc+<<0O>NX3YO8V<&cTbY06g|*_aXh|4}93M8016jpa-`h zLlI{{?Yos75)Dk~?=Z(e!z7^+=ouSsUC0fZn z*ze7?i@MbJjUCYgAU5SbycdoB%rg z41F2#W@adJcSD8Oeq33(0>LV(^h1!tn7;_#qZJXVtAl$xx8X7I$umFdzj(h@)L@-o zxeU983`Vp*pSzhA(uh5>sIAJjwnLJcIfB*I;j5;C?3vT?+;cyk@7awoEp5aa8X(_! zGJ6PZk<5M&KW$BHQW%UEhy8GyeS>%CJHJ5<*)48DdnNH6g8LBogWG)%=JAqOdAMT- zmUrxi^*sh)Lytk2*Q^~oJ33$|djoe;cjZCPxlfn=2%_%FkA9DUkz?R9Y7AC%_!d6& ztGo%OevUpB(F<8Ye(DZ0kM9K$U$F!7{KnPPV5uYDf*47M9FL6?=5^}{iw+&pwFbRF z?4SHQ&c6Jd{{40B*0~YC-;C1cKnQ_#R`;LtoVv4>t(u4hQH#-%%5r^Q$K5u=+VW>~9^T)h? z*OL8q!)i9bvc8J+E_3}&{nddHW9cU_z`l{Aal*k4Rn#E8i3mY}fetqJ>5oLciAdKr zLA0744s-qgJir^}!M?bM)47q6Iobz}W%L>n3*Oj#W9) z7jv#Eh?yREy!Drd8tLQUc=l!J>Ps9*GP8CwEp3oxLoFILRx!pVh}6}Su+-UEvvGdb z9E7Q;NnZ5Rli6G1=!mqbQ{dFrquPIdhq&X4$2vTw2mKknF@pD~#v!+v`73Z$ zrI$PQ3}FuNaGrBb6Zk1=V&NC<;L2XXJ@kC+?=%2`y@%uQK=#ZJC5}=UhtRRg*w&*L zw)X3ba%Oei-?vTbO)L#`$9;An3jNn3=8y@^+#%|-^33gUg1(*{$0^t~N)awyx}(3y z!IH1vzBlXU_H90c8*{Cyxs2bszjoFDUVBEtK)oYcef247Guz?=8Hc<#^Yp&_Kb4=S zympjlK%N1427Y=5#C6DeuToWpNdt>X|nYer+7B`cR;{^GFDMq?z`}t>Rz;$PB zb{&7jeTxr1!q_^^v1_C;Gk2X3sGtIGX1E5cYGLQlVaS_H-I9+dGq1K{>+pf>L?44> zZ8KzYOVKk!h@LLj^3-P$gTyeycE_0E^m}ijX3Gl&b7ruo&kB)hT8Jh7ILwDrw?G<}5o)dqF4#1b;2XV+$2cDV}kTk_X;y&)WZo`co8&OX0 zhTvIB_xT4!Ssr|4;zjbq@4q@#b!&7I(;7r2FA#- zbwHMd4RdYBAk4{Z1paW9Hj%$8{2(_x zHsR{FRd~(w6r`aFcVfPP2?pd=D6kkMN;m5H(f}(aM?# z96bgr*;{yj*Cuj8uI!gTAoU(T_1GqL9zG(UR6)Oe9QAJ}nbnnPY=M*HKcdL*EbQGE z;~FX{;2kbq{XXa#ry#nIj{v9vqSv@nNxdjW=j5_{L}xF z<#QyTBY6ho8Th-;fWRJ~eDEQ@Xiy(U?6o))Bjb7r~5j?mLbvW*R1?LUAFdj}k)-^6?HaNJtB1ou|2K@xFL1iRebiK%j?F)u5` zA9p-m+0U_`K5%~=v$sNkraA&AC?l2FBiqJa!XjzZWMx>`B9(n8MNTf{M;wu$M+{== zh?ACf2%}c*JmkoSM@&&Z~Y>SEd40q+cdRP!gopMJhT55eAJU}@MHEt-Cc`pnys=jrb~Px9+4 zzrOMe$TJ|%!234?AF@O6UtjmHsI}6iAHZ+FJ5pm~uyyq+Ow`dvm$t3h`SHp3KJpXYTL2{ z!xTp~jIoz~=*s>6h^KGlkmxJqW8USu{)soUc9}bsVrwgTy9H-(ls=FI(}~#7rw1-F zyQ<8W9UGq1U4;=_cx}ZadKT_bt0b=7zX}gR((Gy2p)?9dnD?8(9N#kX6?b=TMJ2mR z9=h+rtFT~1JKC~CkjF(2dI&XG&$nzxim^FT42gBvxA$PhYFt>f2sc)*Mif0B5%j?O zjv0$gax*X3X>xr(`vK{#e@s3l%+wIasOJ*C^DO#0GUx+2X-OPHPkyQ~v#zWsrcuq|7kbeBf%<4L`bt#^Qc+iuv4G#jg zOWuz%pS`$Ety=mF7y4Mp6D?hWJ=D4#(>29$LrWYOFbZqfckVMlft}`Wu}72w`{>8( zB8BHXp7{WA)W>b;+!cv-wy5;+!YksK2m9!!VaMTPVvnZ>chQ66flKR_AzV)zX?Auv zNw54#dRF|kbYa`39s1Y(M9$%TPdK2@8`Q@9seRu${&;lLggIFz5Z?666B<~%co6z@ zX@<}0)&957sDJ(Jk-vZc{&&f*x%`^TGa%1^JOh9I8K_&gF23P)Yz1cIE}SzHv!_hL z$RPvKkk=nSVZXW1Vtx7fr(6rv`O&pN(~mxeb?eTE(XpgQz#Q9KcSow086w7OV`I<$ zIKOTKE^gXN?b2w87dc97BJjs?Jqtu@PsF-Ty;0%n1t0Pyq4cEtkz*)1=)u18wTL#G zh$!+B=@Tt+apqgkL3#=siA^0YQ#hySPA>q zi#9LDQ}Q791L^mmALJ=}L0(Wlc6I$K9JjT`-Ca9zYsYpz?sy#4Hb#PxrG)bqH)%!u zF%rk<2Z^7+{8M(A$1Bmx!*d?5sz>~1h_xL%;fMjXY<>q(>3nat|Sq^CZ|X%Z6b?6G*j01T!E@3Z%0{ryLM-U)v3&*+2rlvs22q~7lw ze^m1zV*ij_$i-872skhXhU(v~`Dfsh zPd-7zh7HlUabwh_|FbsnM$HfZfzPDqNnu$bn3;5ITeA?Lsw-+vzc#uS5k`p$T*uhTpyL-3errS2`(Hx7b%;bG>gx%$y z+nD2f01xS_7M}K-ySHMW>Nv!b=Ln+z{p`x6Jf;n(3i8Esc5+BYX0jqBm1G?vF`gJ|Yz~2BF7oHwqOMUs4H9FyB7|q zjz=YX-yacwl+u%tzka^ddHx`9>v#Nzz#ncny>Kq#tSxbB2{XRDz3Bnbp@*Kl2K&^L zjI6Mv={N8nJO;;=skLH%N5Xi092zkCJN%)Kc=~BJb?Jc+;;z?$et1Samb-W!Gm^=> z5Pv*j23IM2MqUsL3H*^mk4lOeJs{MkW%KpiucZa`CQZ=h!x}%zjaAQ(y#INh1wz-@ zxIsO9USF)c|DB`!U!F&yiJIZiOX4bih#7v5uLTz(dJAVb_d@TkU!Xx(zNuB|D2ILv|QjBJr;XbpF2goNo4%FF`Zx(0b3iGhR{B#v4z-wERp!7Sb9yXluWu%BHT z#0;}%;t<#M@${CY&@+)s{Edk!O zo?P>L6Mwj(oL%fWYv$k{HBk=(nf>d(gC2BxHP|Dc!@iOf=5ZxWo`hF{0XSl4%B)=K z-gHcmW$A>~Ejq%x-^lOrM~=P?+&lJ>^jF83lN?L^)#k1};IFF6d}JRy*}oS#i{{e9 z&whAji9IF$c<$p$UgQ7{>+7I^J%=ZZnd@am9T~ezA}lRo*P#=-P=8lb=0Lv3>%Zl* zr$OC1XwM$cjxC$vi_hyzJ$-+c>;LsXsRb9?p160__;=+%1fCIkEb%x68QR#sZWtzv zYK?~VsrCCv#=5^{zU06C<^LDub0(iNc?RSekZ0h}Hv>W^(wsdIbNi2g_b_G5tk(od zI%Y^F#)ufJ#UAhxD0lb5=6-|dU3Nmy07WEdnJo8YgmisM{^pRl0biG3c2 zh+Qr$W^aiHbzS5^Qk)zS%51M#X7QdNCn0zafi;9jCfm{((dvdg2bPit%LY^Z%E0d-mjn6rI#!M_3I0VD$G++*| ztdaSxpHG7C_@;R?3?0x1L;7|_|E|q3pnEekZ(1L;eVyxH`;d!fYl0CTRGk;S!j6*GQ=4Rx_caTI)* zSL>&zg_y~X)EIdo-q}IoKO*Tbk7s{*`b74an9|2RK?%ifTTm3X4{sh6;`NOjTn_g{ zF?kSyYYwQ4M+Un)gib7qJtd+mF>{hL?rq$Nl0CbSz+UrcePbMB&q=bOmE=Dcnk#`p zgbzJN!-yRy1}Ly_#%afCIOQ@Oi`ulNMr;Xr8+ugO$MGn@6&GFC&{MyS`BXdDVYnSH zz1?uqWfGF;%@1cc$)jC+P&j)&LR7SIoc<4?^9mcQf%PrEmH3YYYOn_+Oo4fj=D0y5VZE!5@Y{s&RUvWDFu>5P1gV z8IWf{o`Lst2E;X6fj_4A9E8p6x!c=k2vT&-5yzaRWAuOQ8!!TA7c7O_Pz9tKStD|& zGSZCL$!BaQ;Sa%sL@MhuE6adb#1h9;49Gv2;Og?_$aHpwKm8ZCR;|XJO&f5AYw~B* zQl&4R%WiTF94AIdAx7CXaul-X&cVfXtNHbC>atX@u}>dFIoVJ{w4Yimc9pZUyo7qI z^W;DT_SiLI7`BfZjveDhBihLhkJ&?bP(>MW>;Vz@L*(KnGwU~q-R+k=cA)Tx2VOlb zLdAnTyuO)(D~COCmD;2WyEei{RT&xNW0Ht9V%a4kc#uQvPS2-a>H6{&)GV1J$?<`R>>?);t3sZK9rUjK2jPH{61yG)nNzly{V1Cy{zLSuKll3%e;hi$1GL^?q{GDz2{%?+P5?PA8Xq7LJ+&{1pgt{ywQUH zApXd9p2oadWu(*V5j}!AN~R(Q%3kt+B78Y{LucqMo~MMUs_;gn1&VLrb71{PDJ3h#+^AYVN?Uc=n6XZ?fd` z7KmitaU3(ps_}RRb!br0NzF;Rw?OK1o4w{eYa}m$$r?Nlf_uH?3zscuLK6mmA$TJ|%z+Za?g#X;4 zO=qm3u1Dl9#j{`HIJHzU?72J4zK=u`YaBNa7-OQ80h`I|^QqJbr5UrAkH0VWC$vqt zu65+!a{Wx-MIwD4dF+`8S69P>ty_@4VL5I``r^&?Qz*@fL++x5I5yE7v0MvBb04ay zL!85WCVHcVe@n-B=Hyh&5pQHF@es+({Pj~&!ZrFY3M1X{>RBPmALpU;R))lZyu6TxdnZCr%8owK zt?o@MlSED;kNxNw^o69DurE=MdNNf_@)0IdcY6xE2=kq$vY)&amVMP4=Uisu>9Y06 zwXh==nT&!-Q?Z5Ijh~hp%IW)ld~h!_c!{eF$1~f@o8OcB@Mm}Xo*g(!?O6i*MZ|WL z_y2PDek2-LNII_sorx%*&TC_<&IlT!gcM@D2t{%%&@br+w^POeHo;M)b=e{~%4-J<-9O3B<+n5OpfCoPjt3wo#1-lO z+Y!0I36axnaKJzX>jv~7E}}QZ+!QCR>GvQPlR|zXmVJGPmDPx+G?2#Q&8BY5bMP?C zYuE(aJ9I(eOur5q;rk-V;Sx+W(Y& zD|*8(73oXsaIZZIm}1id{kt{8mksMfbcnp`;}rN~vQ-bMC-BE`!5?|Mz+-3gbg9Q0 zilKd)qjt@|{#sqUZmqujOu~7~=JrRcuNuf+d-(2)H{^WJ8JOlC!{4Zvp z3G-Jqn|_Ur%)kx` z_;>V)(E4QJ(9g0dF-yZ%Io&2^e_m%B$C)*CwYL2a~D!?Mec-s z9qz;iB8%#v-grEY^2YVl02HPAAmZRE1n*jaLtE!dTg1K<2wOK3?vqX6YN3H$T1r^l zt0Q8VuXRXu0{h*W=c}QO3_iak`by%o^?6L@$g_9CC2E%rv-4vmxsbVyzk>g0CFD+V zf!pX&*gSL)N_`ICzQ=C7JRE?PBl@BIF#E|p_n^Yx8)wM>2#r}3eI6(1HILFZ#pPK` zkk5W~f%8(?tCB}g`|eJCvAK0u2@l4Sj}rJ}XUE>y*0C2N)%CEfZ3pDdo`sWhXCQ8} zHD0r?@d^9nA5wdDJIEC!^q>g7$c^|T&B~T|V=nUOuTL^EKpr`xOy>XQ&YOqT^pNzf zTNj@)kKlhXgManMY{brwp#yqDTTA7i@P|HiSQ={MFmiA=%$?E~cP|_LNAHF3XJ0DR zLk4+~ecMM!`m9z>8{!LMk#}`&B>Z9B19yJp82(7?QT5GqP@i7=|MoZX&*cC6@(jo`AkTn21MlMuH0CvL zwMNaDg{vy@AIFJ3gw`sJ{eoi4GT}O(_(R~3kdey&#($);_giovIqcg=(9%aNwNx4O zPox?eqmUW4clU0=%~(HFJv@ci6<3HsF5%6&Ox&XP!q<*|Z%b1oIyxYZUW+(tuL_t$ z8$%yOs);#rY#orrb+gzc{Sdi_80JMK60hV^uXSjGDzjv5kY(qH0OtJeCm(Xs))6Pj zogC9QgpaWrP94~YkR7veG;kf#W8IMx>xpxTLAa0>f=hWvaXtSSu4YHzLKJ&Og7+bR z+e&O>e$g>vkO*dTg^g1t?ixounikUNDJdq`af(^Hr=6zY{M1=exBJ?5-@=I=idF5I zdGyUUSlXo%9(%aq-o8C}85x8rom$cVL7kV!PI@(bkWFv!^%)qY>O6Oe1;FHVfw3m7T5atBMk2KHIky$B(0sml#6EcN7K*i{N z$NTF(6Xf$IpEr31c^H%5e`#^d)QkZci{2$^PywF{V>+k}1i0{RE_|S+6 z68|A|SAqi(TME4k0(%HvEud^=)Dm6Q(3$%pV&ZPlTbT);o13jCqEKpkMdFV>@?myFUFh4 z#lVxZc>Vl5UcI=$V>*jU;-i<>vQe6T3=cxQ;ccReqjuzFoQY>lCNk$s9e%?V5W#N4 zB0Fak^YKpc7%$JBha&2lL>I^M4#XdA+h7L00C(x}c;N1es)!(1f71l_=>@sBZwIP~ zKhhl>aYS$_77jQ;{E<%Ye&$4S5#&6i{9~T)3?mx^4xhCmvvAnl2)A}^M#;f_c;LMg517Gwiy2r?ece$wb0&_kyFS*~1V{Lq z2oFt)9bX>{Gn}S>CTH4I6s%m070e22SF0xKe<*Vxzx4h1b>q)5cJy!v&&Ln-SJhwZ z>1sfEoC1dT>wsMwhvUL2z3=@XKepBv`mD>R^^u*d0blpgaI)+Mg~6@Rx$RplBD&Up ziNE>Ny0tN9a-TmH_NadD0)q(Ll@_NCGrdk|*Yb06A%7iTdi}aJp*XZ9!u^%L?{^e9 zFNnO(@P5tz^1RM3eLu**FRy9j8IWf{o&k9Verg695r613YlUd`3yREF!GDM~u)rPF z_(Sj^LJuU?!vbeyQ6D8Ri12*~?UleELVqQ&h`=8i#2<0=Ip0{b9A|f}LDlsvls+v) zNy%xHKRu7K2l*(wnu&aBgu>@d#=(jDIKg#(3N=$gLnXTP3alNZEtB4mbW`fP$Z_O5 zI7@o0JYL7oCO2}5TuCfBmtz__IPE-D!XQ~Zj#I=RiOkiCoMMBA388p#D+`bBXX7QY z#;ekE)PQkME!fM7%P8Y*6&2#^^LSly4wYB4P?mQB*TcOLd}w>^S;QKG8xC6nL*6^ejY&07rO`Vu><`EJJ26d|8uXgmeoUGVbB@F`hSgPP3uV> zXVEMEQ_ru-=XJ4kcK@GzydOJ`-}`p4UcZ0M7`dsMnBmk5J-(%X`;$MnCq(32HEviN z%8K8>&ttU2O4_)?v{N(%dr{2Hv&*in8JOlC!{M}}t(LX+fQLFZd zvzh#(_(SNg1pW~I4}mwTF^Iq$LVG2?7yfgBN#b?rlQuR+oQV;xtXqzA?EbF0eG*lb z7x4P^4ZI}(QT6IFQsO*uCcz(%5)WgG<~SU4B+udELT!~5BGt5{`@A@5x^%xeyoU11ixU2*sG>KXIOI*$6;$40PS%+e+)fNf*rKWMu;5yK z>0HD++Tz^YdF&9MiX-%X1SyOq)|rfp><$$EiYrT&V&{;-u>1T|T-mZ7PrcnC@P|vs zmMGr1g5Gm>67F-w5&BqS_1^ML>FjkBohoVUa}=0Q;17ZSq#kDg<9 z%wi{No>VW+t*vmpcNB*LDz>#3)VC};lpPjhrx04#IeKg;|2>|M zz#pm;#z6Qz{uOup@cXwIWCYZedSJuyAyOw_buQKq*R4PHwb1ljIiru9WK9GdP{jOc zeW1fE-|k$ii%!4)hC^C>RUeyH4EfXIkLu?v&PPFpHkQxpkN!QHNqy=6?KKl~TJwLv zl?Z;OO^b$7uY0i97^&CsUv+ij^_uP68=tZB<-a`#`DgOFLY@J62ILu#XW)IC0l|Nm zx9@@z4%3jRZ}C0?9PLD}glx-;qeac)pdrgcSq_lB`E>2J@n# z4D=9XY=8^vm*J8>JGh?|p|tD_%DMJ`{o*E$9e2mJt+IASIORMAxx^xQHcq%YbH2oZ98wrZoskCn zz4IJa}x61NM(rp5Vl)t!yCr=8A zL9R2WHy6(?rlF+ZI5IspVYit!Vx~ACpT}54&fqM4Ac6-99XkO@Jht;fhc$B+juLmx zY~2!<1^)2yKvlRuCbeshlS}8|Rge$vZrOw&WmWn<%-G{-gA95=(v5`2pPUjkS3>6| z@Q27CE3lf3WsO@&IlNwdN5HMiAPI}??A#ZNng4r8O%rF>wesB49dE*e@Q}TR_x<G6laA>#R+&ep-k6@xLj_gDWlpZ62? z&VSXk2{lfC99JT+N7oKb;9}bYF<}!Ve(GPbhj<=>({bN15}n#NB9@nRjqlt4R{8nL z>q&VA;Kyg6DX(?gck0G2@@eEh%!xm!!{$Ddy&uWC6NxSCcwJub8xDw8rnj8E zfrZp+Zs;#G14F&&mwvx30#m2yeW4P=GROud2u|#7B9; z##s&5Z)KwNF>kw;gQsc7aFO2Z{hF%CnLdr#u*4tQdem|egE+fLSmzY^js$u=3duK| zW_NcXG00i!pYm;;aAV#g1dLEbu!0hT$FQTEYw7%{(^0T#B{o~>;4ZU&-@Lqr3gVx# z=hRz~gDEHfQC@i+<@eu5_(#Php z3P_(ig;~4oADrZZY%52EPEccChy^YYgGA{YU`F$1xJv!iQ{Vkk{;p%orpRDM)tle| z++4E;eo7PG`aZ~goTTp~!;tuc9fktuWq*f1;?<3C-g&m<|JcsFE8+XtLf?mb@4?vG zwKryc`4tlEY;lvF=dX?g;l3Af2lIAsQ+xF+Ismu4cO%Nu90kNlak{3M+oCmQw(Ed< z0SEDrnOtuYc+Qzkc1T}G>Z(6UT$eg$4nn6+L)!-RQCsM+e&IU&eSM#`Y|=>bnEx2& z_}ANoCw+p_C@2o=hS`(*B0XMB(jHZF0KarEbX;e+UUy^Hp_4@qbo;jPcR1wjnz!yJ zHL3e*jmV&Je+m3i{roQyU+vm341wtvh!^&EGl0_hVv+hV?$d zkiN~aZpk3zrD^>nb`(7)<3_fYHCXaziF{p0o&k9V;JX>9!8PVL#2>2^#;`k_ zUT@-vtr1hBx@LC{Uz{-; zXSw$uIT|4Um+iIUE)8= zpPog_y#^&}tu!ZV3{`Sb^73 zA*hNDMrouEo<|(Sog-c-iw#8p`v}vC(F&)|LC`oY9#ao2{I(}{@ccXo3B=Qw!zfLT z#-+VG5lFr&mEIbW0gyIlHn!92GLYAlTX8+th`k`SsKfe*JXsB9HGl9AS(EjzIICsT z#>5|Ee-{5yjYR|o5gqBHhV+1=MQ=m~kC(D&e+d^-y-u&*i|g&hxw`OnRlqd+o*3BY zOMKC|EL`^-C&#}GV||9(YDZ}oG|mB<%1Q0oYR0snPw zfII{84E%j(payYB`;R`tR(9(pF+(bgK91v>>>>EBS1?)6i2Mh8_^7oKnNKH8tdOY6 z{%rF}IBP!x$JOW;wILTk?j+N85+ZesaFtm~N3G1^$MtW@hQ-Ja*p2L??g;c)jv(LF zxNh&M)zslVejHrK5{o#nH*xJ^9Gv5bw7@;o zfnAXN@6SswLr%O31+oydf}%*j|cb`oSjf$V+OpDw&z}>H&X#F&o9~G!L7> zo)LXL#M84PIGf9J=Hn`{NQ%)!%xT^ng)5ifk>7r1?(V_betmF6-v}=~yb(>^Rgx)n zR>U7dYn4MRm&+}Io%6Y7^tbTqY;z|mhwQw|JZxy&73;Ze`L-9fbn1#FZQ5XA$F|5? zG8-?W58?HRaJ)a5K~&=eKV{1aV%Rr6rQs|DLjvyb(P-V_UVvH=K{A#2^i7e2ls^YNOT% zpWx$v)Rg=o@@K=_&xW`B$1lSl0*45{h`Op06o&R@?o&@3+^dN51wWmQ^>fy}=h*ER zrK5npM zP+*M{Tq_HW*2TH=afR#t^V4SHqRUL&TCfDc<0c?fTMI`_jp1di1$Rq*#H?R{U9)U( zGd~`$o?XQAN9UNkdjq8<7xDOB0d8JR#}n=!-O0ma9!JT8LTba#;02GdO2SAy#u8$W zhy1%+g?N4AG)l7)kV*ZLyOjxon136ltHVAIb0jclYVJ2JkvwZEO6m13-mnVpW5ytu zTC&m|ZU|K+p0XzPpoUH0k33?HQ^a$z6Z9nhLuBygv4=2@o#+>4EX3B%eXyooS8V9i z6D!-d$Fyc&;)t~=DkB5&@^~mpskJJL4Z`c>FuX}UjC&ym;AyCZM0R_eojw;=W-f)- z;Bi>pt{0YYTikyb6dN?a9JTQ{>Fa@;QDL~}PhZORorq&rR+y!Q)CZD84C3zW1oh6H z(UN-i#^gXgt5Fl5vFD^daYzlW&8pugACO0@{`!5~|5E)`H3w3?*V34Pv7-jDcd$D< zLWbg8{=2~-B2P;AC`1nI!s-1miT&q0)(vB(ucowy{!gBTpS!O9qkm8E2tNB1Fm^=C zf6B$GUAs1h+f0Mmi7OHY8Nsi={-!m(_`fc{S7aIs+)jVW5cq+NQhLy z^>YTlia!#WWnDWog3xchkM9rpIlteZkMip;zy9(J$TRStW}x$@pCW)g;??*=bO;Jx zweXdTzCH2vX?u2Y(C2a5b_x6&T;(}=0zMd)J z4}n1h9+9>Or|{rjKJ$Z%QStN~ITUt=+&hCePpHd!a1KwhkK@GZ`Pi*82J_mrhRc^t z;rvxoL^xXEdGJA`&u7k*rZ&CeTDZ4*GmfZH>tt$6JVmV)y&w4&lW@v%G9t%nF~`_R z>Yy*6wk?jG=;voH#O}UBu;$wySoLjpI5+wn5$2{S4e~|>HCKa=dv(Uq?bL~d zg`hH=*u~Qex$D*;)@2$(nKKs5eh@e2Yncuih;Hn-XvB5d7qve@(>nFg?jvwv?52B;3iV0&!VC?WN)K2wAG4pnRix%sL_(0?^oh2U< z;xm@l;(NkjVmE~QDg9es><|Cu&-S&zN@D#VNKR)6F+ufOzIM%;7|QpJz#kT=w_q5W zh2F~As7GGpm(HBP9-^*X1cXF#3-c?SN>Gw>m=TX*IE=|kia;@CGXdNvZ+AtiA(J6S1Iv%Ox zd?I^3%H zTtv>{68+xAcwKoJ6(wBH6OX(k9(g4^-^3xW1>f+X2=|K;@chJKgioapVwy9G7B9f9 zm8;kd!hS<-U6gIzj?0S{!(+4pvK*aI!E5)0>;kzudp_=S{B3_o6@4M1OQed&dy#(cq75q%>1Yk>=8dskbqwA_hat?|Si&A6?<(KcMZzAr zg)A_9j9E@Uuq;m}?!krbsW zWhnjJb?#67o>;>REt4Dl6bb{r!GfuMe^v*{Pu=ey`SZJ1=q;m;tWW1=(%gMQzsC^v zrcR7I4~vwW5(d%Q8;(u`hyS8Xtop>&9lmY?HN|%Db5|tRG5pyYtDk!QIVqa#c5j1E zWUT()e^&gO&lmY`~-DW`aJai}i2(foWJh4X_F~|uW1Bv?(_@j{7Qn6~< zQUvKKNH9w0A`LmnsDyR18Tne6~M&Qs) zdmNkUfb*-Do$O^(s)z^ z`;z-Oh?`!!@i@#I7x!<)lOx_J-p!83D1W$VvuAL!H44cY6$?+k<8<7bxg5K?4#v86 zy|J$QP*}9-j!re}OI$`h>Oq7D=xcT;^r>49${jmmx`qmTCQU}f{G~|SxeIx|KFIL% zK`OJmq7Hgu`3x6~9y$n(8h$EsA3S&BGeO`FWhI55?Ek3789%kx)ltK!VFNH~KwIo% zrj^KndRJVC@TdzuBt2doHbz}xtkH?RhRWnZjDD52=%?1+zsJu-_Hb0Fz-eDY;D&)Z zrjqu`{5$+%8hajN=B`8QPF?WPf5^?M!G2BA9axWElI|UvV#3HaQkTkco(IvxF3z<$ zPw(p3FBR#-K%>Kd%@O{){cn+75uh07oR>bZe1CeTOkHGO7@E@;^f|>IWYh#Zv zmq~b*oy4rDR2HScfN^Ruqc zT8{N?dNMPs8&>ri3XP_%nR!+R4LdeE8;uL6-W|?)7svTy_aTm7;Do~gN>Cj9 z4f?5Q!yq^v=E*lC{zL5b{FBg!@2C0=KK*`HMGs27+O^QRZ6l~Cw1Kl_cgfc-`W$bN z?-1wYUE+@F;}_l)dyB4e4kd+b6ZjH-$$_%NJ2d8oS>Irr@`yh)Q=+_F4q4avTluh;eIlIT7 zF%OIVfR(T54S9ANCFc_H;6y0)+ZZB^9e!uluf&|UPW@EHIg~ugCoX!cxe|IRu?gHE z_7(J^h)rOSs!AS@=tSpUY@)wVY=X}bTSfVKJb%sX-jX7`zL|@A^kAfHS%!pVv+*>* z3yV8-WHv9m1r05cMZbQb74yP`=YzPT8haGkPDQM`A)?5SoO79rEZfP5VXu6s5itw( zWzT}BxjNv12M6}zxxW|gvFqaj`vXhaV}93jCp^^2d)S#GZHg_ztc-Dg_jV*$Sfa>z zIrC$2yeO2!vClDOAT@* z|LOMk`L^bb8bWc@P>629pNlVk>i2{eOWdEzgwYr?yeGZmy%7~MUh*PTuWNtnUR>uF zo(j+1qa*f(se(!I+-#_B-1x~nm!I0U!BhjDzJ9<6|-{TLV!0m|z<(4l8v zd{(y(nl`M9!F`%B>$n?stRE`*$px<@aE$0r`8~b(;y9Pg?uXW2fBOA`w0LR!#k!HajL3+(o+4)iJH!onvc=4pEII5z7Gu)r% z@8$8ftFsrtf7BSn=<<3!`^kfqwWRCyIm9B{)zy*Wu>-fWPvF*>WP}84hpNU%96RQY zypv(JIaH>AiSLf5=1f3Kuf* zq96%=?D9CWU>ahGLyGtql^OB4cEk@EyVhf~p*rS|9EgbNlW=LzcI2;JiS%tt;5Ka{ zt|kTH%_C-7JQ`A=kO_IN4z+JRlDqW>Yst@5s|4+{uo_iEYb}!Q9^m?z^#} zXHR6Y&pq4BhS|Dy^qkv~`w-p_M~O>1Wk>#leve4{`XkxrSU77wg0=PGtD}dDTehGy zFaXc|{c!)le%vDFD)INE2P6;=J@+Af)-=rT*bb|DcEy!d>^av{MHbIbWuP~rOxcf3 z-_Dh(^RVQrj#$#QFXj&#iSBh8qV5Nx$3uRfzpMB8SHvG9hYplHwJel zu1oxf@SzJWmO)4+hLUUS*R3Vyx%9@NgJV#br7hu>`_!QQo|xl@&rM*Qo$H68PnRzw z-PgOCJNbU(&oFrgK%RlW;tYJqHR!6_ByF$uZkL$a88 zdyXCBiN+I=LVZ>tyRpwqo5qZ(sYo`nz|yb3!PSM!aB4C$a@E;aZe)QY?6KQzZ^fRB z0zABwg_qPX?b^GT_`{9br(8U_oPq}zV(|EU9G;wyB~QYyFC?In>;5QA^;5(#d3>ys$f6fwhqEPC zYpEb*^$HZYZAS9874Vp2i>oPNczy3Qv#U;{{0h59P9@@WR3Pr9$Kzr~BF>-B#f>}X zkd=81KJMFaDmM)Ug}GR@b``R-Gx6~LZQQ(a4%g1-qv8>9$0K@0h?m}oEZ+x()N={_ z*cse96^$g<)ktRt$K};45ja5^8TJm$+qLC6b&$3^@<^w6jtl6g5nrF3G6Qi26A_@I zi4#13`Ae7KzK=Ib0{u}I5{y@2?Dq%{$5Z-0a+fTCr$aHR>KnKYABLPc zQ^}WT<32t2&wckH-kLr24(x`XJR3`zvNNRT0NC{#$n0FXKk!|@SL;%jHmH9uXltpy zGyda;I7RZMYbrx=#6W0G=!$J?hDtoeyIMbs`w@O?k&iXqp%?a$2NAu0KU_oqS-(z> zRfi(GRCK&z$bbAl{ty^MWMXOTJ_JSbgL^iQ{GR7{SLf~Lo)gg*;^U@(p?#Y(7g&D( zz3ca%e1G!#OP&FF2ILv|Yt6vN#2>>xYlLK8C(pH^znp8~Ecy>MzV>)$rGvSKX)G;|PWZA*$#-uOb&wb}t*x@8z%qkRFiNH&8;4#bf%=U%tFS{S*Bc zrC0bj)H&T{=f<^sRNg2=$%QN&_1TVvGuRoPbp)^9+`%*YMbe6in4t#;AdP(CXW^_~i5dWAD1-qB#F% z5_^wHj8S9nU8;&m@4Yucu=j?bBG|je5_|8xixmrY#exXZixd@mmk!Q5&ngMYFD9a3 z^v(Y9e0I6p+dKBYyZ6k_cV?=hc7rog!#B%~` zT<0+g?ZfO34`wFbwTpXNyyy37B4p}$7%Zi3ha1upcf|BYXu)A zRoFFchO#p6Q7rvqifvj*-c<#0Ls75WvB%I*R~?pyZ7^eeCxiys7O8)g=o9kaYA9ue z?Al-;Y0}?!j{R?KcQMc!W^PunU40N9Xa0yk1O{h4h59qEmk z4i=a{z@2#>)LKwao{>pEDfTYqy-XojK))z~DL6Q3C%-}7;DyKqiAH8_BA&93=`sCz zGc$=@h(E;0r5;3ZA=yvj@bp#)G9E@ztC588$Uuyp)DM@!1NfQ*X*{PUBa@lxdE9?i z!c~MH-i+PzCSXQ?H_W9s)FOImP441=G1gWXZD9e0+SO5xn$&W{QMFYy@J;2Ks92>j zeypj2pBw3-g@P68Hr7P>DoxO!kt%BbPzSZxvu4z?G52GMtv&;A|HMwbxONPAcgVv8 z9mJ*iQxG?2I@TK+;3{+6uM8N7U>-*adyw0eWp`>5+aU@+HqQsc{$hBP&_LFPYD|5ArPnw*(#DibdnRF>6?VoLsjWPeZO@*POYSH+>3h z*&9{8lRgZGjK`)^G0?La1{LkzFn68=Gw1QJ=;DV`RokImM_V+guZYSe%EG)&8;r5k zL)XSN&{LryR(th88a;Sl1Rchud6N(|b264|Xdra>a0Cw-f)M%_i=Hbn1pW}cR|11X z^yjhW*l%J@4GuHiM^7NXp^4>Mdbl{q6U#bjV|?8vIAYs{xWj>YkCxbNXpa4+);P+n z$hj@sVioa6`l@Bf-m(sl)-FKqo=pfD?e8M+)LtqXugw{Jd zlN^Z9dkb9%m*TOkx41;~U1jmHtjv_(w#(x7>Eu(gUf)6%u}Rvqn|ORH61SqR;riJ? zJV{ExtZ`!z6cU1w3s%8)%0kq%>;wPUG`Npifo~g{!qja#Ox>qJ-P#*f8tI{)vIWXk zZGiE9ldyN;Vrt*FVekEgE25v$v4;go|1w(A<; zxSbP@+c@Kp(5usTY=MF@f|%Elw`&XguISIpY{KXC=8c%*hfvSq*sO1cA$6Ldw`vFc z%&az{`H^eC=#N3epKHS0RKM8qhlFPwZRquD#rM-=7E47|G(XRL~}7fWy|A`_%2 zxs~F;Cm|PY(Y3EBtQYTiC;kvxbcd~{VcgXjTUHws>2Z3W|4HBv!BbfnG+-v8tpAX& zKSh82k&mf-OywGoYv4<&f%2S-8vI-bmqw41^yi`U+&yLONd5W1H~51(g&PBiJ(#5( z?KJ{Peq(W(`F|(eT#-CwGOm*E*xl6)NBZ~2DtlY_c2I?8+0tlRwgl=hTf1uMukqb? z-=f^NRZyl(71XR+A2rL@MT2rRpi;dFoH}S>sHGJyY*~+#i^tioMSaL~dSE@Lrknj$ zV*G|b1nzi?MRK_mx{zG!zowYEZ|&K@Y=!~nj_4`Te9 zL#V5203&ldoZY_{$pL$?q?;Y4+8N;1@$JY-2*S%N0XYB5IP7$H#xC}FMG${nr(XXm zkFCHO0&_$U8ZNC1JQ6e5OX5VfYa1bgT5*y6F|v9cOmE&6k<33o?$8z6HH~r1%nAF9 z%y5AoWrr>7v7b2Z5c!W^m6UOJ{#?A=vKkrG=09ft)r)N_5i@H7uJU~sF$dbSSv%Oa zXoafGKlqaB^Go`y^=tkF6OlnkzpA3vkt-n4kPC_^ZuT^!4%od zCC?*<$a}@{7Kh~H5$Q2Lp8xl2u8RR`OI|ZOz*Rdx*0vqVk@vjgd) zo00VpPtqPx=l%jQ_iv+}xg+|o^v8mP7tmYikA+b$Fz;k6l%0m5VlypNQ!z)^iOUg? z{2bc-{a`zC611!xkPs7wgNtWix{E224{ZWct|8;*MPx>tM&Pv3m~Wtk6Wu%zI)t3Z z;2}J|eWboCfjI=H+p1}RWZ%iyM{F~;PGig=|8c|9hrYZH*xFGa z0S2}>>DUFAy7k6BenHBfvtP?1@3&eShQOr3?xJ?MSKd9c5}31X=`h$jAs88RFfx^_os|3MP} z5lJ7c1n&`uVPDT-2L~k4qbXwSI80MfMfV@8VZNCe!q==p;%R0E#>XQ*E*{#PPnWLV z7>XKB(9-Ei4@!5~+YCl`x8WGjV;IgKJ%xMmarEAOgtW(Rv>rlpo=3hy;0m#XSd!a# zgD?0Td5;{SFQ?92XhQ@a@;Z(9gIGl@bIFy6ey!ZhXzJ8CUeH_Xc>Iz|fYevmb|VQpqV8ZrSPEQbE=RXT>o9Ef z1}r&v07j)Khp^SFH|8?C`VzG3oHn49R)$E_LjymdZ%&BpuA+23coaOQdR8DvEM z;~(&c$RrF*fMy>rOz>sTC^O05Xa7aDjqoaSwQq_F zmLC$wkHzI71F=Eh0FS8Q4xxYVFP+tKX!tNZIB^`I$ByA%QZk-APlu*WH?()?50hTZ z0^A;oYCq}1!p;jl`cFpfCLPdgkQV~aoTh%`8GW!)nW6Efwg-YIZ7J&I3#Z9 z2<+B1hCeeL?@yVHVHJNM2V#${dS*Ci?TpLJD%`53kF)k3xHoPxPC2?_yPgTN3LUUo zM+fJJ4?+5#&A3C};|{UM!*vVsX#Eo0Uj8f25r2%M?%bAolG^3U5sth8j)khuy2UoO!U1g=8iOe65u(S8LYS{79xYpd zttKY8=+P7D)RM1ZCSLdw@&U&WBQYcxkzo~@amct!ZslGSUO$UOZYq7en45mve*;!ITVZck7le%%fkZpdGr_rQ15V^^W?aZ;}Ge?OuH%L5Ha2taolbm zvns-e4oA%NsW>%p9MZ$DQ;Ly{j29W`F=zx7?0aEr@(XmMc6(XqBaGX51sd+&Fre4% z{J@JCIDZj6Zv*it^EuLqKXR$#fRy?1;ke_^m?e+iSOS0Kyh=gV3wmUc2g#!rB=gmM zq-JKK|MZzK_wl3lJQRmszQW1uOq|Lj2Xg-wHim^@;?7+dyM8@pZQY2d)MVVglYnQp znOVZ@^_-+&*HwOo`@JV3OC6ai9R;LaR|;sV2)Vk%?tb? zdao|K_mc2O3i034b{(-oNnOGp2h8lTp_3j2CfRLZ$$j|HKg$z=_AWSJWs6-_R#;=G zhfMm1JzTR8X}i|o<&IUj&&>DKCG&7^)l!@xSM`g79hz`%EVMrIIa++@Xi4Hb;lV3B zuml(JE{sr|kBj%Uvo%L&)wbx{wJky}*nHA^{Qm|<5xNR@$^UBmJN>WneR$t+Ah%&Q zdmVK3l_9))KUKboj6aI++>@_s^0Ad`K&}C~2EMEsXk4}e)=+nT+HV{V`;3Nmg$mGT zPuAhVgK=@V7s8oe7dy%qC!O7JoW8t?^n;D|@kY#e&Z#GiK?3o|31)Y%P*uknzUDL^ zdwB5-@}50K`jZ#97#5Aj#`c(SIv6u=q+rU`o7na+8^_YKa3n1gyC2-8_IojQT@S*& zjK_HKlKodwj}$qIkKjH2_*(XCy~Q7I_z%H@+~Q-msSUY{r|C~{F)|ds3+JK7r15Cq z#SzU-bkSH(4ILfK;KCfg2}>7X|M@eBznh3u>ORu$#~>&5241HG<8|U?q$dR-Bknw2 z$6myRc@yyq`(UmxqcL*CNZj!okBcrI*u$PF!F}Xw&V}|v{C(2S1-o>NaC`Jb%&6Z2 zC+xdIV2=Q67c6S6ijywgam31*x|^}YD?T`2X^VYUHrU4O#Ir*NAY=Bu9Wb{nt=mQ@2js-LB=1&ioZ%yOVzM;P4+-(!r>EoVEq-Iv9>ay zCsqsmGO<&!cs&VEUNJrgoqI5SrCfT6{EwaQg+BxaaXT6XMI8gIn6HbJPox78_`}1g zncROR^8m$q9g^o@U)CH<{=Vez>%Uk7U-NfBoq2S-yhh{b#7US(AKj*3e+8uyC9#Bg zf>*|lN3hU=jP%8MYS4EXm>`iFkd*Ob5I?~WaTCYl?xZO=Xk>w7%%k{4mHFKLdf~v# zsmv5)2H?}Dc$t%j(JME>{?}z#aPu}6C*Q>`@*>+FKf;##ci7wX3}dKW2uzB=-SmgV zA9tBKc$@lhfeok^FEIXyDGI}l(3_X}>3PDlSJH~S(W~b%DzX&DcY`s5Za z+_;Pr!Dn&s^g#riJAfPUmvR4TBJMrBiKkCeaQ{{Wo>1?Rb(>lbVvfAHGsulTg%`1B zkQH?ruOrT3``{ju_f>=+F&gnlGLPQ@eN!BwXH}B7?{AuOfjw?8XWpO3@1#Q)TxI_J zf|kk>-?5LJl)xbZf1Gma#{M@q+#EsfiCUShx`x$j%S-!AdT4L z<)&o_9Yc;~>IA%4zYZsTe6V+nADWgai;CaK{6}$~=i+?&o<7s+9aUh*jPk$21)uUU z69Y}yo43LCb^5p!>s+K*;RZF|K_@M7JMPo9PB?b5Hk8N7|2w^_qt#ME zEJL047~D$*=Z;zwY382D&)Bex-Ur8ucE9h!7=QQpl`}T5?`{d3<$KA0r2Lk7{=b;x z_dIm*oYU?gXq)L`_hw@$XYudeqbQyeePT}5O=SOF`5Gi&gXJ2KYe24n|8xy}$M3(Z zGUp}>=VK%9)vGsYAZ24$=i~M*TjCh`kITN}5a#W}x$g+}2$@K|R*60%kuqr+aH;gCM?Ts|M3zs|x8 z&YAUkI>Wrb8-ikj@tpia+H+!$r*AMvIyK`3@rUrf`Vjsj=hd4mkbG~foOEIjdSd0I zQ#URRX02yL(Q}LV;&~MN#uAYAI0`wB_}HT`WIqf+?!9YxeJ2=sx2_^DnHrD8^T@l& z9<%rp$c{ORtjMFtjlF=UR|Akl4q}vI3q(=}bHm#kw|V@|+q>d4@!2Wr#s&UJ;SkG2 z@=gMitWj3OUB8K#-@F};+H{eyhtQrMwQ`X-k98e&nET;@s3D`I9=KifD4W?)6*p#1 z#*^)9@o4Kx`duwX?yhyXFsK*e{6^qJS694Px|F&0qi}WJJeV|XjB2H1{dsX?nzGE7 zZ_~UntSwFcb^IZ;AeQEaFxOX<`mo|}I24)ITJ&D6UZ{oT^E6SE`~8r4{-smauy(hE z?F#=w;SZ5jsMlvO#*NWIbV$+VHoohB2sv-f{J}t6}SbAB}ulH#LKMS$P!>i2oV4oE+$LoZ1 z$YH-#cHBwi#B;O{a8t(Cg7NZ zE7sBTcnNjqX}h;DZ*VzM$$dQJxU+BuPWA4JB;S!Z*VP>lX3s|0gef>bZ6*dA7~lu$ z6J-9Qc+bl+rAnejqk1r77RRUTwR+ckIoMmlSYH!PR_(BR6TPx;xfU4)Ieo+&Ui}qu ze7`BVm4DA?>*7gfpSTf!tlD2F{2@3HtA*R(i0V-UFpmjg5bRhC#I3kZDEBr7rLJuL6{a1NmXRxua z8~porLlm)D5_3YX_v(kECd>+?zFhcR-S(M)n_hzZ@WozYj~!Y@^tBp+S@oOYoJ%(x zVpiima!IG1x{^DYgm_|=Gt{3iS5d>QF_W>&(h9Rw6c9_#-N)Nj;R!Y8PqtC}v3(T| z_HaVnSn73{OCQv?9}au;K;rC$2o&5(j{&Grvdn+7)<5OF5aGdFx7JV4)#~(F;17XI zL@$_*x-tg!P(;)<`y#_1sR=F^-cJDwXLiQT2*)DZZ(-;9=Z;&!(AfrdYmXEfe{?w% z4l@rYtXyOu<;EBGz2A3xp)V178Ds5w5H<2CYf^r%;=Sh}A7Ajs1*NS)}>KL-A_s9)DioDPx$PPJx%q#oxBADw}j$w|KKC!`c1T%N=_V|f7 z&)mkN7Pi<-jfcP;$<&bF@|lPrx8B&LYbK2V>N|Fk^EhGaf=WEkv_&RZvRyz$*5+U!@A=p{&pvw$xwzTRyyh=0ij_x`|F}ESS+5 zsqsaZOSo}`E{6A2z}WzcBIQ=zcU~{HJ9CtoCr);7*mwdSXWw7{A^4B3f$=aIJr!Of z3=n?BuGn`q(_U&g0LoW3muOASHFh}t9tv9~9ubC&9d-EK!;!YqVDnP;?dC@136>_$Bjv2rQDB*A)YwMoWKJ{W;josxybiO^_z+a_EqgS zw!ko`@1-&@jXfXI2P3$hI09VJ~$bVx$LTJZ1g zjL5|^krxyI#ISeiHgQMlC8V*RDT^2+=Y9zF-Jz1UJLfUy{p3Wl#UKvJAwI|>{>aA| z*~}pnBmeJ$%lE<`~$F1zKUR4cG*vFPUY8(=Y2M${}5r5cY4>JYVsAv+S&^wGcKqkg+k*G$p>raMOY5#g~js?A$rP+<8$9j?1J_53+tp*OU57aJrMaC zEZ2Zs19A=gXKUbxij`oatB-1>%c0EIZ*(68=bxp?h16hu*fed1i@(f8klzF(Po0I` z#@6(OwZ+6*b#U6XJ8n@2l01?3^`}ij;sjr8W$yPzO9NaU=Z*A3+kvacnaM|OcH%jt zkw?g+jyorbnhIi&Y|iy_+3%F|D4d>C5#&JL;*SCx$H(Fi33m{CWQ)PxD}g_b3~Fm2^%~V7pdcj8#@O6&Q91y&)w`JdvI^#GCU^k z$YO5FA!SXG4JTbmy3wShZf)*u9qDcw*2$ZXcP5r$PGJhS`dX7PxZ>zKS zu4v}j1?xp#|NWSL!*l2RZ!4o+s}@jIRYpg8m6@366E}QZCb~ukB`CIN0#hU155hBo zJ25rXhLvG!>|C#3WE{xReI}9){g}VWztV$se7_kwGJnW<&t-U=D;)nJ@Q2&cXc+s> zfS0#kv3Yrkp0{78b%H|kAK8EPzt>y&{Q3R-k&lIZEaV!HYe24n|Nk{mmVH?7`kqU2 zp4zZfDXbbe2v?{7f*WHe;h0Mg?4Y(_MuW!KXJ&;MizAy85~*cb;`O={z2f6eEx&@<8{_8q_aQj z$vxr|_FsX27vw&~`up%71@VWZK_>>uChsA*k3ZuN!G8$+kxRZt^j~EXH>F3N;qsKk ze+c}M9)1KFVTX}^bwARB_Tu^J?Z^q*&pEy;E>HGD&G8Ca4VqXVbU9ir= z1lhZ`AZhJFEqTMe$L%cWIedSJ}7EH z$WMq|a%3}$kle&W=KXz){-ZGXL+ZgI{t(zGi@KE@@*lYgK@$Iw5q%74#2+t(-xcvk zcIZJoJF^|RR}Ug`{cMa>Xo}bwQ;41SX>S3&MM+|JEfcn%QR3i2$MgBwhoYg2<3cWk&;PlE3 z^h6#3!EK3q^ab@kGQKDrzWAr(RiSJdG^<}1DoP5(9xBr4&_NYyYVCj1r59GqA$qUc zHfexX^=d&|O$9dAW`*WK#Cw{tk4tFLcWpE%61~HncxNn`t%2!dJ0Rj}@oBjK3X_Qb zul?JM(9ymtTo2v&Ap9XPh{L9nuo>7BD;FCS3;sxoazb~P=BQkuwEUa%55GD8bZ*Jd z7wxr5KA!UNlxsk)fzPo9M6XWM%9XI4Io{#3e?{VyIasRHk^NV7agcNDE&2vn(Xj(E zmo37rDdUJiCSwo#%ont8gP`Gkk#%SjvM%nGG!tU}p2HP#OodiRFEF*7|(nfKx7hNqLJBZl0>Hhn`Jv0|pVi5&#@ zAux#GJ>rJ>((7srwdNxcPoLu}J$mC3d$(do`{G=`zSv?%ereqbq^?~`zumQXzH2?b zuEye^YZrtK9f_r?TJWyf7(Ojk;H9boh005GK4NH_mZ))K;FIa^33JNGu z;v0NJAA+)F%l={8g0GX;|9Bh=b3DqBH>_KuIuzQp{0)By93r?7fk8}642VN43WXmW z>@A_%wk1s4)q{ajQz_R&8+kW^tC?7ld*vT~@*MM9DUv3SQ;9T}c`to*FQo^~3QxQL9Hg*`8Va$&;vD45L zN1dE8i@NA&A8$PPWh(AW9gi5FVOZH&8Jn0j_-N}Q34c7l#$KiHLwFg(ygq8V^MocO z<^pmPudv^V9Ea$$BL5-qM-IKNa$+1|Z)OpNJwMK4`*Tf89l zNFd)3=;(qSMyAXVw8E0s?Xjh^AufCLXRp-=34e&C7~umv5#-TB;y+G#bi)>NGu&IY z5D(X{z=O@JkhFRc_V?|M^~R>y#oo7(Rcc~fjV74UrW3}hYD2$jbu=qk7L^P1)P2qG zt_rmv)k>7aPt0_2;ywrU>x1U}&ct~sb0EcYZVKM1YNZNj-K?>MIr2G>f*3?sR|A&J zNiPf!qSLtp96B~ZZ>=UUQEMyZn-}Kw5(aUwg7D+jQ*VL2TMVfKar-C?BC;*6p0&m} zZxw7?qX(h2{wLf}RL={nutDg$-TFvgy4^mY|4Q&5?x&MrI&B&H^wmOWP|@q?PtbGB zP_rJh&t?1}&j*U>W9m1;dL2C+ zvvcJ9+6g<2jCjv}6jIrLbbr<~>Oh<^O|cmw=8Z@CnO%5xWiMV_KPX|440=dqlT*l! zJxiV;h&@>3KOXSG$z&3PWT#v~4o6lJ`>;4N zn1P-hMND-41X7s!x3#wmwfQ4()V(V<=;&gvi8=OB_i=j^^9Q|r$#+;wp2dRum`}gs z1uYbCz26|I=PJhY4d#d%;)Pfq(=*+A;dI~rIN7H!4iSH3Zrq5B&6|)ggSqBI24jJy zCN>)wVS2-sm|V9xmZ<1pd{brkwo`{=-DYU|O=(mm_V|Y1msEq)faKR=2|ix2Oc_+5 zENKYhud=e@|8O90G$AU`)a(Q^_Ep)F+jt)y z!`##W#wyJ*-KHh_=(T`>Ch^DzaUd4ZW+q|ZuI)bhe!svkG1u)ecSHR=Yx}vHt zc|S#e&dSGBKBjUF$Tc9>z~@r~Vm|xbS0&M@RugO-F$vL&mtcyDDyFt-h44W`>EC38 z-PEM-;oLixTI;mMOL2GBbS%>9h}8}zNI$j%=@+Tjz8-+*%+1J%3Y0Y6neo)2CtX0! zZO-w97Z!0w9yt&&A5dg-2&|AsO!D$6y?MF*CI?+)nEyWh34avaR;*`n-%XDq}{)PbaF7645KI+3Te@oaXVl)j*T9HlY@p} zCv_cbI&0vBgEOx789?9NE{JAt)P55i9Jg`BW_2UXZLEOl#B3MbyR*-Vy;?(u<0`Y! zZ~2X5u469*^L1O;AGOQP14rn&`)b<`JYT;Fhr0E~%+@McuWdrFEEgSE^T3~+5#5DB=3V=3T`7f z6LV92sI+Q;GXds!knH+VbMBNFXRKeULmj$Gk$L;R4@V-jCv&H3L94IVN8t~FK^*Dd zYuI-HW=!n-QODx1KDXa+W&BjFyo^2m=K53==bXHc;=QKH$5%eSat+8e@TqH{B0YL* zlqe0&pBv)Bym{D5PpkpetK$Z9^89(f|EQTYwbl06X<&jlpV7!zz68IUtXze<#)up1e7a*b63b3IEP{#H{wa;dmHFFW&nR zcolmE^ZL8Nmw9f}sm(v?(H*HG2ZcHC>ol|x=RF#SEbMX0$pg#UcEseGO)&AthB#zt zgF9m}8<;D9d(J}SY}<_(_HM0VpWD*TdN|dsACA~{ z#cl&@Osd-w{tn%+MBf7a8?{E)rmdh%>`~*Z5~w2owtsf>yQ-BcqD}KA|I>q&k3kA9 zwX{0J!opa}_xQV>Dg$*Dj5KY9{R5OS%&-MC+beufCWz3JsHwEY0FSmviFW!ZKVG2$ zIlRjlUi}mha>2UD=kI?trx%Y2u4U?YP3R2vBmPMGVE#kk58=bB=QR<-d0dM!OHpKs zxH~jQrSdZ0_^E%l3N^%XzH6Yi(mt6y;sUxWRH8liZmqz!_9dUW#d`#%j0sE}& z5j$u&ju=_sgoPdaIcMIisf)ASdmwM~MjYF_V~KIW-yrb4a-!#2;cAF_<}pBZ*arO9XF{xp)QQ{3cljonUk=S1 z)`QBQdaw%O4zVt{5HZx%JHp6F55gz+T^PhfUlXpHEfFw86?^(BK~JIa2W5gt90+qs z6q@{uQ-{sSfqb}bL-b%>I%$RRBUB;$aNmU&iu!Tk_d8~kCiJ`~OB#;+eyR^yitKcg zsY}tTTYFr;Xj5eWL-1KEnCjG*wdeBnNxnYIH6Yi3Tmy0q6tV_{Uu${xlT>7nPh;w8 zf9c_YJ%a{gld%QjhK|6^fx~e~&lCaFSnpxx-deTJ2<+;Ctc~lj#>NtdeTE?OGQF=N zPvg<`W5~EkO?NUquu`c%XZBwXu}20+<`ecoy&xAMc!{_DQt#qEK7{|se~nm5gE|w@ z>y`I54@AmEC;pJI2YC^p4~e@LfQiGqqJI|y>{u}kNx?^vblM-u%pt!zX9i;D&BfV) z{jtl|3jTKX*hc?dzZ!Kgi#m;&bz8t+&l-{aMo4^z=vNcHS8>cXPZ;5Yz1;SE*KRn= zzN?-3X4pl1am2Cj-WzbS$8 z{BC62@p<8n{O?2bVEtUZ8Wh{MMtkCmKjV&qf9GQmkyog#-C63#a-decVBeHjw`88W zrCMuj@1=+^KQ;K8wS<~dYuFRB{CV4d`djQ@xph;F^;U)Oh!tA$55)+=dw2OfP3+xV z^!kZ+eWs)+M|gQ^!f?!7;*aEy;y(mtv0StR&OMBAc(=(1ABR7G)=evP=|k`XO44&K zzb@qE=Xt)$-;4ac$Tc9>fLsHgXAKA~NR^T$s0FEkb-nvwHSg0unn;h?zC&=)-W3Ok zK@J&PGV8($D^%35)z}12m#@HTXIrHBZ$>7y+u2FX7QfAWjXTtI-=+3L;E%^Qm zrQ`f=3bS`J9Sam-?>+$3nfkz##d{{CxEM<#TG% z@3HqPoqCX5Vv;2CH&+jB#KrZC@Hk)}A{YINsY-3JLQfle?Cmh2VH3=3)*7>$w!u~n zBOEZa!@bedB)lQ8htPWn&SSHt4z}s&OBiIkt|1Pa+9JTn9_MVj;kbDh3AY?Dap19Z z#D>mB*lFg7#SUFChB}dE^s^E^SHEe^3yCM?^Xt=`UqW;9eU(b=!D{+mJy->~kj~^8 zg-@@*2#$_6zhMho>O@RCD`KX78zfMx5I9s7y6qal*g)&IZT<;&6nx% z_Q!DxTh61cv5$RNr|jK0Z`Q#o&arp*?1oG8r<4CUhdgSzbMIcJ=M}k+hat#&EWCHa zk@buj=mLMFlYhv#`J48mu$ZIZ_Ia5}ziG_{2FdTe66^W+BS&x`FUg0zT?$QlHaQT< zA4~WFi~cO~BbkpQIX}CC#E3vd2OXdeJqX9=PR0O*me}IV-ZOXV&L@n=*anR-sXp+%wysDX=!@8%UO1{}hXXp+ zIAZ3E-TGG8$h?p}c5YbSy$|$%uFIY)x!>wbIKRZXQl(;fG-Vc{a)B(ug1pDO)&(CT zp3~9Ml>D*s`>})u-AKC=`s%kr|ap0~&~AlHCg19A;~&NWbjxpf|`+F^9lw(PaiK@#yt?BL-z-^HDNSf)7V&=tqb zc<?QoSA-k53bTnDj2VyT*vEY^t}??#|!Geh4v$hy;oUD z$o>azqaeF!y~n@E`G|b;dO!V$N)^igqmP*AU94X9TPU_`^WGdtK}?eG zk!4|FBxynf4ly;-g#+_D&JJ&nr?a)BrS1pnKm->eazzGoQ$W#R)HmgECgr31uY`xMkv4ig&mkMj{0nwZ@i4WQGp4z(X8W&H6kp0A(tZ>jv* zHSqp5@GUjZCO`g+Y0TVS#*s?hbmU-9gbf^mQ;x3Kqh*X6JqF_#=goVl zqh4=iiEV@W;M(@(NTvQG?}6~Ly+*&?xA=qDBPWge@APGp zI|b>_qH+DQKO#a7OY4IB$k&zRYuw+p6k7Pqr_`Z8r%zU9BJpuo48_cdn4@YWQxOv4%ll%ZpF?OTiM^{)Vww7(g&cNtoiuY z=W~^)EwB6I52!fcxR*K1Y&ZF~RUHu+e|$4agN zxd!AK_<}L$kMP4eXLszONAV#`TWn`;%H95WvO3Wt;+UsZ>E$v^pE zhri>$=`$gJ;*g6*T9!v0~N`ocdS$u&5&0BN4|u@1vG> zIA!gKsNMsyU(bX-veuZX*%3!3k3e?J1^P=xN}NKj@SftxdFywTKga(o{2}ncZ&-jB zBj+vV_>IS4&z9)1lJLjNSP5%HUO$2ZyB8z$%Kks}TjlRZEZ>DY@*fu%D3c?D*ds0L zCNi=U@gOxAPZBO6Gw~WSf=}b+VSh}fAMsXuM{J`8WOAOoMW5YGs=8R!q9e{(cE>?-AzRJ6VlOd_ zOY^oUE9VA&R@h5mjmj0up>gBJXw|+G8ntSRDpjid4+at2{q$WGv~AV=qd1U!T+%^! z_A0c2Yp2GN{^J>Yuwo~uqpx-o=xcQ3>L^oM&OHCpfA8eaFVETJ8jx#1 zu7S^^21L$w`wDOH$Ix$oMl|p5$Iyp2cBnU^*oSqM_w^4Nnd7#%FAf=+V~?d3Rxw*` zrnLc5j_pLc;6L7S8IsO|ctYYk$T4Jb6y!bfv4Yr6TIcgQW8ItI8ECpt(|e zbYMCS zmUL+YU6q!wu{JG~7uFk1i4N>c+hETp^v})55+AaBl;VmDCoIrTLl+`D(Bs_gBH=%5 zS098^fA&3YHU41yA$0gs=K1#(iA6t;Yj(j}l-K3&M6Ln32ILx$Yv4<)fs(`@D&;G{ zPe}tlKR2b9Q#a=64M#Zj4G}`m;5`xtOe~S?ISQBAbF|yg1ZzwTF^9d{J4Z3|JDyqM z)Km!1sSI)z0v}`v?MH?fzw;dV7(pxr{&+>+NiSldzqOB%JuX@}m}YttQDUHf99xjmGs{eVic=Hn0Z`A>P?i0p>%DwRXc zA1YJtQ3bVstc;(kR>BXJE23JJiuBm6fLhgmL|bj@jfakdMjvl9X`?`0NSQx;<~r5B zheF#{MZ$q7E3`$2mJQ%-*cca?-*I!IIzoIq!dkfj_31i=?!mIQG={cXTg;!{nLckH zo&)kBSmHxoBlHzVb{j*HS)A@gpgqseEOgiu2&?`c*u46~a!dp-bM~kOv^v&iKVGRn zeE*-aX65&i=N57e$Tc9>fLsIr-)f)&@rQER@)$|&hc7esw(6N7+S>==o?f^^~A`%v|BGYl&kPF7&!`!PK8xU=6kB{*Jw|%Y7hx*t^!O z>UR)$Pk6chf2*S}<^L(o%$uflzelew^l@9N!=X*TS}iP`N!_FoN18RLE9pS;{dND2=lHwlgrBcc%O-GCtxt|j z0mp|Z;ks`J3^!;3oem1HrB40tG#`I{PWbw2QolZ8pbDZx>_7P4|A%0S4|&bqn_aMD zy*`wUEQ*Bp$j2X!+t0zYUoWg)@?jYusR=Hu3v~&r%G`&1&H7TVaq{PsYgMiRxdy(3 z8mP>B@rtF(V`vLyOlzr%IjvO?L2uc}(W7y7*ieLdd*dp5kuJD;AeB8>XXzWewxc?B zT3cbMp&pj>a>2bb2bh6=9cj!1k>>bPpVOP1z}M+-asvzEk3ZrB<^>W5{PD4W;4uW3 z@m4b;mZE>_y}OL891sh1b{C*$4?WW`)Y>Ir}NF^j?9)g5cK3~-!0N3!>L zBnKFiT}@^QF!S7_+16`?9!4s;f~VWT;yGdd+-V2j=09m zi=%r@uyVc@22w*|;$#NXY0F`?co#JKjYMMw6;xpVT*(q8=-XQj?OL^fs*2J_^U@hofl!!uP;_C&?)pW5H%5U!3HKe^--pj?792@`I;dAZ}RVwTmy0q z$TjfkYakzg3~8=}Uli3b`1_x5u3vvd`uQSwxFjzY>1 zKU}c&U|*Fj_G+6m7o`^#uvcwuCu1ZIpNR8z?5{GQFPNb%w%K*TBvt0gHE4!;)UD65 zafVKfTBt>ztMcD`&Fp|uC?)rC{OcI3Ea#IQ+cDc^jUI%)_|Nz3#oSY5Mu;5oIWu%% zs9_;{Pe$z@-df>xm*Ks4ahZ6yfsjX_v8it zA@IjcrB3MoZ8fYmFhJz^vA8zU8`p?ILOq!W(r*xREr#OO0B;0P|FBt21Az`*sBLh- zm^N*2ZpI|!L|#JPU6DZ;C-ETpyhIK)A%(*q`Fu$J^3VK+cwG2hiSfs6#QWsqjXy8* z=&O~NokR>m&)sLlAx~m)dGlg;G^&fy&0At0^A(pWtK&vL_EZh=MdCpAp}8~P+}ME} zhdnb;oak%ijEN0ez&AUjxx~m<#z@<)IxN%=bKi5ICQl(L&WGPgU zGm}57Ih^Q!`?gY9xY@QqT$sZ<=cWRi#Dv;o-b`&6*qaf9tVEYXH( zI7kfQ%fH(N()wHefu+hFE+HHf)%VdvkUa{D{+E?Bup8|~=p z;CwWy$n@vV`>sm(LtvZ2{69huFSrjK>OO?uviuuVyuU&6@s*FSTmy0q$Tjfas{z4( zD3qyye(bv%(N-CKYSo2jqs9pK^TU;qBM|K6Ngc=#YS9NHX5b(sQ3G0F5q(*2$L}~H zpR4%arPOC7ZJ+=8H_L2t8(AD;U%6tWB}=_o;xTDRI(Xutj5y{EQhUN&_B`?+S+}p@ z>W=03#mO9l8aKjxHFfM_#(T^VZzOs7B7u7QtKIrZURMFu&e(6t>_86BO4Siy?M^Ma zH})7gV7FNptR*g4*R>Z+tJj3uci*8=>C*U~^Omxl=awPwA?rOpzw=6Xsj9T9ffc`M zQKQ}EZ|A4C<6N+4jt;cU^kFe)14OpA$f(dCH61P6v_%VMRVtAO6j(!vT5^RpEuqk= z89iGYqkX%^P^XSuL!~}CE7yaD7)o`au2=`173-q2QawIiADtBIL#26bnDX(FCQUHY zrUh2JwZU@N)=+CwOX|<+&|Vov%uBbkv;4odL z55o?1BLr~ny_<9MY07Ho$2t6f_6j&KZwhV)2Xc;2yzw#-S<~DBdxy>@0mpHdm=K3KQc1t z$CW9tM>P4E2;@EsL+<@+NIbg>+oujgz?4xqHO3pm>eRt{14CTs)*E+*`yi1RB$8Qz z2kk@#h&8q_+x!qS2#5Yq3)5RD(Fd#_j+l`9;s3wU$_<-(4T77Z3hGl6@B{HinPT{! z4qOLJo zG-(7S;s<@T`miT{=;_=FqXsEq?i4kwU963LTMQAf#{_2r%;`02iHpp{J9o?ifd|cS zXs0nYuhhk?2_2~!S3+On4m<9{T&EG7^ctg6tDn)jaXkswC@HpudZ!Mspa=Fp;ShbT zj_Bpu4(ItkfA_!r+s_H@&4KMkXriPFofU_PKZ+**+-b)J>d*U-TX}!|`MpFJN&nNX zNe%h;M!t^8H6Yi3Tmy0q$Td(*HBg!RRsFFBhSArmtC9-ZeNz%D%tRkUFaD58Q*nvd zBa}My@S%fn!OaCx0|!v|Fbeyq#on%Oivu2g(W_=Xc&WCBRlVBKsaFG|dpaTF;t^^< zQjz|cxrFR{%BAPj%ctRZN#9(tF8Nmp539F0B#&6+??(13@+EJFw4NsTlO${Ts(I(!jU|PHgrujBt3}x=_H8< zvEO(C8a;->z*HSm{L~P9&gP>v7h+Bxc8TZL4kO|cH4N?D4zA=x3^bZbyoy5W7SPn_ zNE~AH&Wu8115G$sw2|;l{{QhgE=8Z)l{408O8lX*U^lv)h%b^JEb+aV_wI@fEA-zB ze+jSRVEPaAacjkl$%64ZbfACre!%*}nlVo+VRnLC>kD5yT_ZYOn|D%@FHv2eHB%?&IAUBp-YH zz9iQ{?juJU0-J~)ETK6Un1=7cKCASH*O2p=xq>O@abf2iEE(yH^QnsKyjBsp-`-7ad&t3 zLb0NSQlLO?F&FbIF$%yZJ1_M$UwPOkKS9uDisY3IqL$Y{mQJH;livMQkMGLOhN(85W+G zZJiWN!WzjbIQ9c~ywk!3{xwRXvU4eTdsGE;ewfDL4Gs21kat-u6`j4U{rJ1ScUH!= zikB-Y^%;xE6^9kC({Xf@T1QM+ijXK@i8ElGe{lRSovDwJVuLDHz`_0;zoGRmTb^P2 zcmCerQ2Y4X$KO5&>~r9+m;Ah$3>|xJTGD+5u1g1`v?89#HK-ehuA+@8*L#^WS=g~ zi~dAnZ9TaoIYe$qe!?FP3g>l-KG=PlE5XY*`4S~UxE0&C!m z*mf@U=!UcJc9fX9u~-`tjg=AyYq{vjhgNe(oeY@~l{O=m)NhJ;5?^M#mDl61xL@{jy!gAI_(r-kD4Zt?s#VC1T7iYptbS=UZ%|s|&z3~3pdyk# zE*HSOzGqpC!G8&DnXo1d`e!xxV#M`N@L7WclZRlBXrPM z$=OZK^mR1Z^)>3w+lCAb8Qf z*W!Z}I&?AuYdWdiBG#^p{BG$SKb8B%o@?;MXG}jQ_S!x!_Bmjm1NJ#!p94vq1IY~W zT$0OreepcG5K^@Yii+(c!}B$-2K(RJMV{jB(7(KjkimvR5jImwwWnsD*M zdMw=HiP$h+d$eGEa?#w>4=4*pP;tl=)OqBBgiEf!-(3BgF9(gH_DkkB57p>)S2}^)G_b zMYE$|j;ttCBsYfjbH&y3akd9jyh?wljp7T{M)cr|X8Nk{Et=_%kO=X`dS7#pZ`Hbe z%<5wZ9Xt-9b^S1~x0~b{G2f=~9JF&B6Thv<;4-LM(Gi{6RhGV+_v0cLVIdb`+lO~Y zO8$(RVsmstm2xHE=k1E9s8ETQ6$r0tWieY~OBv7gPu#wCJ_fzIxx*=@EdmzqMeOb? zuapa<$Lkj4ZiwwY5#4rkD+}I*yn(K4%p{_ zaSkLGjWplCC2RKSQYJ&yQYGM0vgo~USG6aKt{ZRO=RLClACB!}0UNYf1d2(jPyX|6d;p{$%Lv>B~#}(0~pA{Z) zPHY;NBu2zFs~KKd+yR2fOCr!S-3Wvwa$VS~~_$ch14Db4OxMkYK}s zy(G_h2W+ezjn!ebF*~F-Hnr=F_r3h!mo6i!ypbq zpSsa#*Rq<@n*VsEkvcA+KGOecNIwr$4hVy9i<j$eswy znBa}rI_2T(;f$JM5Amv28uO;wo_~+$;W)Ckbk2nOlGOdofj(udH=JtKNA-_apw9Y} zuf#v1Ws8{$KYy`8vkh+uIwn zXV1p&-Mixp-@CZD*yoJkoYyhN_BQO}_+OX=O6fdsh(*}}T z>>4o@D`M-QK{(o1@_|Sm!qXkZN2ygSd@*bo2Ke|0_eh3hR-Qfnr<0$gl{^?8)ts?l z);L@`cMwk=|0r7VYbqv|){@iyK|6@i215RE_py{m64y%NUfq}2zK?EP!n5BlirM2V zt{&Kool{3+WQ$;|9M~FHR*uKd>!#q>H4|}r(^Nd%F%x&Ueu6vOrsC$NDY(CJIySbe zgZ=HB;c(kFSQ!$5B@%mgLre=SZ_@#NB)_6t+H@!-ysD&>1}>E_{k@(T)uaugiWG$72OLEo$1 zohsprBhm5roSb3W1Yb00A@+u$;}9$PL7Iskgr&)@ONgGm8Gh~GL-Q7%;@=afGzPR= zn8WGhMk^Nv!J~E^M1Hag{+;`xPOKm1O!dc?$LlJ4hq>d7`>uTzqqx|Jf$pdqRtAv) zrLcNopxN^okJH=i19PIVSmSg0nAcJBT}xZeGAu?AWoe^oop(wBv94^JAX_ z_BmkF9LON+_XYB0L&2O`kx95mhP0_)I4-&HifqY5*O4&;Mm24Q&jt^{=N-G?t1jKK zPu6A+i%-^gi4B#`hVf1zZKZuHO?>+q(xrx*`Pwq&b z4&fZe^7!#}+`Vx@@s6jze~nugKgZYGR$=$}5m?w&avV2lfXfTU;rnId@ze70xVd@~ zZm*k&dz(MOqutZ-aPJKKv3U|6?^}QqW4mKf!w~Fl(@gS~hhk|^G&aVx!93BFw=XX_ zBOU_6Uyc+P(s2P4rgz(c|>tv0@LYhw0=X&4Um+@FO%@e?sX& zsGDxK?;2uO9zsaJ5vbQJ1miyP!|?-AX0`5Y@4(L5h>i_H)U8t#)$Pf5E)BYLXv#->T5YIFJIsMR#pIh3djfQc77l>xWQf@{|Z6xJ0^1!{~1LZ1t z+spU;7=erSp|RvyNs9J7cFQ>gbblZ2m5ZTEI~V1DXWA!n58A+}H?LAI57NmT`YWH= z!i5XN%gYN*n>NM3fdk_U_u1Ez|GM9fzw(~{ThG<3Su;!2Lw$DT%9S_%{P4Np^AQmd zp`I7kf5-E}bFy@jxIFsV<#Wt^S+Zn#b%(d%kifC}Jgn*K#bVsY?UbTd4-N6bv?-(T z#i@P5LumK-36E|`UXUB2H~&Ly9Jj;|OLB%hBS*P%6h9o?h|_Z?VC%qcSoU@^ENdfv z^TYb#_R6`qK7S-`t(lBF8$MCIBXq!s z=N#l)g`a5)iQW7K!bi?PNYe)B*SjY6Yz|jGQ>N!Wf1)0GcJoBg;E9U6G~RYz@{KG& zMC(Qv(9Z|^w@2E{v6#z(nt5^-)AJ*8tNS1Y=pVDD3Xk0-yJJ2bV_l#kZ4&;`jMu@cXLqxV>Q#$U7eH znt_|*bM^G#68yepCT?wCh+Es1V^)(o7~|uCEzO!>p?@G|)C|Cf-hQYoK2=3iq(FM% zTNxylSCL#f;V*H)DmXbQY+}vFETQYP@BeFlgBVMpK<>PsuUps5l67WfRZxGwMO+P4h#&#(u&3AO^<&U-dGNNW|K+R^Y(W1FK zRxSv_m2)rV9icDS)Q^4O^LBT{s<>L;qA8D?z77G+o1=3lZ?O|ZB#Kj*yOxCZk-MD{ z|1#=an$~qPYdc8j*jL?8AGmkkt`6t+J>fE9KBCs1NHqUwy7vk~hfhV*7T)O9v6A8+ zrm@6m*I^7}w~F~BPIHgp5i>saQhq$#$8%9f z&A3<%V!aXC|3lHFpNr=p+LtIs{HlC94nTN4e@qO}r<68`8%W z&Q0Hj%a|1iT6_?VcU`ubgOKCJtU7|Ace|iZcMpsn;-+}icb8(6&l<;;++$e3YH%)@ z3z@_ZG%0H*wmuicFI>BQ9WU}1yDh|yLu{RUull_(vH2f9d>H4>owI5Bo;-Q-wfs+# zt0$Frn0AzYV@Vwc+EHF*&A`|ft{)_|ANJ$y&-{OR4)FikL9lsY(L%H+TN$T6nuyQ( zzK=b<`eCBzKgd7Q%6DFMjFJoYNF{67StM^rLBWv&B0{mSbxUk&+X~0Jb-}K7jj^vo zGaTvC7MDKgh3g*=!grqx!5<6BJtpF@#MgbebtWE**8Gv!KJM(8DjM{UaeLQnJUg}) z8~U|DrwWBIHlR9|)T@PWM-Ro%ACJam(bcW#+7)HerU7#?62od=j5MOlPxsv4>P_O5 zR~zKZ7&nuAcA9y;t31jp9Jp#DBMup`c*OH3F8W`!Zd4KO70M&fqlC)M$o)wjD_f7_y_!7Q z6E5`{!{wtzs5)ku#KAgcJO2=l7CCtZ8n%tZ^ohQBUv%XkiN1s5!+UdVe{J;dR$1A} z(x(xfmduqm_3V%-(bLaj-C6R3 zz3O#Z)3{sgKms2og@f3lcS+!M3GTLY5c_lcs?W!N^?1g@$}4t&GRf26gW7em=lv1b zJLm&!={Ha`+R2ekK2Px)I0!L*M!^I{gp2g{^TkGqi@U91tmFiY!I>`YaCJyed^=KX z9v=_HZ?itct)=5|ckLwH*(5P`$vbw;QT&7cS9i8e!Q%t-@$Aqttn3+!cd8V`*1m1= z%Yu(_b?hLVd%q`64eWulV?Pw%uI{LqEt6>EU)HEFz7p@doqzm$em}?`OBBkg@aO5n z(Qhn{6EW>3$t}^nLq%CS_eGZj1J9-6fx3h|;AqmTr%Ct01uNM{&o=cjJ$fHGb;S19}aUxW9hl@8zpB9TvlP6m|M^Zl|XHSeT zR=alXl6oqu$Jt|q*`LdQ+VlQz=@0ouF40Al7cEGC;UJrb48!(eBk^8jZ4?$8LAKYV z%O(e){i8wgV%XfaJ$6eD@{_U6@bj?VxIK9oZcQJ7I}1kR;Tq9-NG#n4+r;N;hv?14 z-tlKS1RdWPD&txZc*!&Pq(E?j5S3MZ-E+xndnYnKTvNRZC;sFn3VTZfiS9{oclv zAqa{If=mAis4#gw{O0aN!);$#{X7;ZPyjb>+^~v8UgZmR9Ao*}*Z0C+CvKcdmoANt z9XsNK4?cK-e;hk@EI|%3Zrr$6w#f}2KKxZ42dl^0%GukrX=AmmSNQ_DkbO=jZcf_A z%RXLu4$uygMR1){<}BzMRtu|#49CXtli(x2TUq2kIfWVffj-ujTIEC(drH0(qBkj2 z0PAHfVsC5{oNn42k7td+vt^UQ}I-Mtyrl4 zcqHZbO_T8J#wmDma5-)W_c%SJKhBKrj;k{V;jZXKo^4%>Cwtan$GG9}D_I2DMN6M1 zRT`v{l1yS?y=BjB{;&SMq#dMio-Ak>Q3}(>dZ{&VTk~in20zm`>C%~cm?FMI^}|YG z>`-@H5}kqe`(gfxpgvCX611GiScU+O?Yy6%ve~8bz^lLzvQ0 zBxY<9``yoWMWA7054d#y5EZ9vM3u425xvg34^~r&)f+NoBHDED$5HXKV$OHZ%7qZ@ zRaCSdxlvTb8h1ec9GPCp?}~FON0v;;o6X@RZCJ^YC2{qt*K+L2XDM9N%05M z_s3q_pVj~R97rwtYzN^Wr7~nhYl$7TVcbMa>DwRW3l>VEkCNyu1nZ|xl>r&jWmfBo z1tcbohvX$$(4q-;wP=o$ZCc{#@+o+_ei|Nbo+5UP$zt!2vU@V_?-DzR)X#Ry=O+B) z!JgT;EBo&5T7aL{O~b|c!|?N(F}Sy73b1b>9&DY92YXiI%Tr1{>j(Rb!pl_@@CJ3ily?Zn7OML2B`Q|uZq*n zVQRKXKc6*=1JNe7oYJ3A$3YH4ZTTiy*AEM=gpmFt%xcn`ACNd#f}x{lZbXgRQRv*R z5&~-!L+FRo(RA0>33HGg7g0-c?YY*d8t-eAR9`H{-kLGNOZZ1H_U+z{Uw-)&%a$%f za7Y*&OP7*ZQWaE=#-z4yZrn`weR;eN-fmeD6*>(-#mO5`ML0;UHOJ9Z@~D{OVR|3q z8;7)r6+OSd#6OF|hXY(uwQPRW2`Q=UAcK2W#mGU`F=CJ_s+7-zl=3^4*!fEz%v{;B zs<;&Sa%7V>lE=3}?s5G1ahvc9an85jejAVDh~+L^xPTvi_yLa}Kenlj#Q2mX_B!p~ z|L@_POqnt%?m_zp%er;z%yJOTN2W}f5z1Hh#q=Tg{rBJT%{SkuXNEDk z$bt9_S@R9k?aY}oC&B*Gp2%mWu&SNU>>=fI_o=@;_|1><>J5~IxCgI8U ziNZldYrbm^p6;F{Hjr6(^67ls-#r(vm`F>0zBTc5cl@2 z#`#A4?R?Fb>j8!zmCC@IsT{@Qv>0H zMoB)9v!ZLb{t~7p2dOi68+;l!K{>~waBtWejW#5_{;%vH^+q)MPWu3vPb}TAaDXX+0KfESiFH`Qp_w-ro-KjEMTEB-1 z<5vp@Sr4!2ThKtX9hz&Ht0TrQLQFG1?AcOF@J7)oO}b2YKm-Me=! zHKRUz6L}8)Y0tC0KY!hCEH&qvd$1-qNQi?lE^kKhKYW$@)4X|e#ks9bbaHia4RgpL z+wH|xVB7zCnl$NGtV( zvSS7w?VKk5R?~!6OjYI4PVu{v@=SQiGvOT1cFhx?D&Zcx=i#oz-o3j`wCLN#2C_qJ z9ed}BCVj4O5c$rb`FMP2DV`nQg7a(VVEM2CsFYoJhvY%d=8zc~GNeb=Y&qeOEjKa> z2T4y`NUHSmn`^g&{L`Mn)RMGd}e`;br5 zmKZ+7SH%vdo$I}}F4(y~^ridGT!dwd=MdYNZNF2T>nX%1G-r;Ss1Ou^Dz)k%f8nBH z`$(biR}SGMvu4dw7{(fw;yS6uOqOa}axM%SH0YJ^-#_gcw)f}n{a@!iHu4X>O&&r$ z2+Kh6%d+OjWXpYI-g3@=+B7V^i22D4EIljwGg~-_Y3w-WR@}LBr&<%R)DLnXTl+zq zjJ20(KWrH@`*;4{=fgh!|IG2Hp9|MQQb~NQB87{HoglT<|HagjW1KdH%;M)n`$A?1 zDcN%%Yu22C{j(y!*dU5X&XISkR>J!B5_7j_dpzAC++ycU;Tmy;+qyj6CHsV%V9$aV z3ghuUlDNE2BretyYSZ_K?L%xLj}OkrBjF#94llvu(;IMc-3%OEJRQ-Mosl_}Xk0R; zMrQHx&XPSBGGxtzbXlYp`%EUWiKI#W=ennTPX4`flD3W<4(U<7Vji?=R0d;*yDM7< z^Vm_3O)UE+e613~-LxMpka$!*-igZ{&Rm5?UnOochdMb({a7!A_8x+m)kj|9AjH>A z_g+Q)6$er4<3&p6VT!rUy(b5$HF^%}wTi&BiGH|ns@_ZZJE6XFKegxYwD7>Vkt6Wy zFTbdD_@#>%p_G5PvPG0_-xsCJltTNaQhNz~#&Mw5Bq4q@d5kyQW9q?W z*c{QI(+6t#=EbWRb`49f%a<=>`t<4XIF84S961tm z=g!6c{rg|SSk~~AoqyPN|LnifwvSU(RFqi`qPYk^f7S8y^z>AA6sV|rAHT=H*W@Y_B_AlV|;I}ALJ?4bR@=pyy|$` zkGFk(+sEpEbF9*&NsDv_e*{bSIoVsu74IPT&?S?DY-bY=BK}U9GiDKcN_rF$Uely> z39M?>2w%M4L-7yAJ;*hl7iI6D%|n$Lc)DjkuzP-d{b;B7V(k=rhuA{++0%XVl~0zD ze>^?C4nOQ%j58}{V*I{+u)f3hJXxkqNnRhC6;Gg)(qPgV}WE`R!c zTe?>JXRm+0)5j`f+SJICBLjTh^P{V166Q_y!EssFrhVbBv~?J5)DA*^!F|kqZq8539RJ`xrAZ(D3F^13g;`Vl zl+Teqx3&7v?g-%)H869^Wc(=p(8SdI|1TfiL}@X~y*mgc97~~Wk=z(DuzHfUAhb!X zTN;Fo%Y)TenD&ctivt=2!FkXpN`qc;;yTorwh0ZlUwA2oann7Q;TF>h{d#$d?W3N` z@iC}JRmo9b;{|?0?s0TqB&wFlC-w~6Y#+&ldt?*6M}@#}gbbSow??gzD|a4c4@oWS zEYy-NUc6Xg7;9^}?dnbyQsTefU@frD6EM@>K;|y8FdBoe&2hZ{X)iy#^jf%umj3 z3t!*2Z(oAX3!fj&9kl&}wKWZf#{Kj)BahI$-xB%w@y8!6_Jh}>+tGcowI8oCmiA*` zKen)s>A!bOX$LWlMQQGSrc0YqVR+g-ScvB{OGziX@3dm~pkG#|WT{X?d8$NuRPP%LXYWDuQ84za^z%IF}xBaVM$%$!sCiLt+F zQfGLj-(hp(V&7+d?q?QVP_Y6IqA4x`>WPV8ubgY}!Wy?Jmi;T<)5daGuzR=m6);rt zhM)Vqj@3R94=)uxNTVj=i`91+VmFkJc0*}M|5l;7EJfU zHLQ86IA%LEL364?F$R$xV#EL-Z4|^wN0F zc#Pg=|17-{i|45kw)C>p7u_e*+Lm!Ko|9uVTXI>y3Rg3>XS!{A4ICq$&)SR6X<}nC zTf4W`&Z$4QHTQ?sx35^SLOnCqFuEnauKBwu2eHQ4Ilg+`fa@xJcB$#G^jfuQmDOjL zHW~dpz}niincip9d1-%d9ShjU$Ua7iodd}ve~9w8GT1&8{}Am*TG64W5W7e6WT{2l zo&x#A=Q>Pc@GgJ11;6oJ0!ixUxWM(UnVK{e-+j3i-&h z1B>zWz#`!v!a)u$#KX_#iT~AH+!X%u_}Ds}TRaJ;7Jh=zYAz}VVqUSwWJ;e|xKVDg ze^3LGQ`u)27mL1QjM;Er*pWKwOOIhN#C5{2}I~w=LfA;))jA4~MOFEP+?0^1$P95$Z;aHjzdW4=SMVDAbMh!@`*Xil>>g#~Ay%OLQIWntEg5+&TF6 z`gJ^f_z=&YJ;Tp8Zer@5qi~OIh+=tjqgd`7a4e7$jia5gUARPI@`A7r)5dut(5o!G zT%FOht~1C-$j5YF7{4mEo(sx#9j@#yjKf=L;#zo%4!w!wOW}3$da3*H5}kV2jvnG` zRv$<9MuNJV9+D68{E51%J)Vzx`8A6IQQbM;OV6yiH52+=Ib_O=vaTKo`)CfL=WJEl z5AAoQwYnO^5OY|19XxnY`D)Q$t7y@pAa`low(U!}#uQH(F%7p{w{HDX|1JHd5M$bc zUyXeyPtk1>Cs}&w@0qLVpJM4{?ifq^tnnF3$C`e|>!N)lsW0*n+8#{Xwf3I8#nQ`o zd}8k#+cn-hV_W97t=(Ho{WN}NYdj~~Rg4_ll1}@(@4f?{F>)5x)v8r9YnL&$$LGTq z{=sLD{DnSMwj5KZP94Qr*bmxo%-M&y4zW{oB&N@+@jbOB=I(=ipB+cr=fGbx2hygA zvwdj4D_v(2zpK<@`*)1b6 zl_$FXRD7(Ykaw^=+8i%EUD z!a>$P3yK!SA-!l+#P=$ra1dqxpnuqN%?ji4zBq5FOSfy&IVQw(N5mOKnuP^_Q>9E)T{nG)HhWJBp<*;KxA+BS;F=Y{iTLH=BskSAM4W$%a#ERNy* zT(Mo&w7>qMo{A}D#H$*&{v9=A)~=W@Ywm)1iE$I7i6Azn{bt^De>9ZXO`#H-H+IVx zR_!3iRIi)XlVRR1Rg|?uQB!*2LLB#0RVTCmT^`eOxRs`lLmR?W1OxpUjIe zB_DM9X?&M- z{Da)X7N2-?{nqQV^e;>3#T<*qu{7Q0H7E3I2;a~} zVp^%VR>Ci6>mbJ<_t5o2dH;w-_B}j6+lSah4vUTC@I2i6RO}xI7vuKMg*ZKPG&WD0 zDBLF*@=FZfY}CkS$bk$QbBYZ_^yd|mrg$|USv_9= zwwnGb#BTJh&yh7fispAfsUq3nS|Jaj!-}Cxdl!joR1H(ccw*snUn~ ze~no9RkwLguGRPNQblrXdnj&{*f!Y)Imp5p{-|BI27>zx7cTLoRSps{aysfnIHPNa zDyY>k7@g?~Kf9LDK{I4=Oi1s{3Zi&g8J5IAA{Z9Sd29iQJN4m6` zRH2RMzmzxqt+#}CNMX#dV)?S7a+y46*--qXhPh+yl0Y2XSqrBn4IJB2rXSE> zX%`{ynfHm0%FD+-CiUFB_G@3oVCmcd1cg;ckZ=(C7Bx5VsWRF(q9!gx>$WwqUNrCX zruxD^pb7$e40)d0@Wq(E4cDJQQ1?NiHStn9iG=#eF@L9}JI0I{hF>I?1^LIYVZ-pw z;1L+OayvZ3YyZhV3gkyA-%vOOMZ&LUS;ZY~(f;q-8ZLfx&It0Wfd=)XP`_TJ>Y@XwE3tU%E#3?7s0iUyaXR)8FX2KJ ziemTxHx&bmW6J(8CP1i9QKU~Bw^k7MTa*I%3lu=f5+%gX>d!m|Da8&_$VvJ(^b?)QyTl2`_D1OQ$|d~ZQ>kr$0f9n7}M4~i0oHF zFJ7A^O})8%Zp;gz$0VV4xj&)xZPRNq@)=A1I_COf+7|KQn|fKo%X#wTi60Y7n4i}$ zdi3bm(nab)Os}8siGlU~v6idG){dC74;asFK_pC?qj~vkDJ#5N%54Y{ETq=0P_3J;{+bU%dT>oP$1B$wdpoZE_FVKvJbl zCw7oDvOksJ7RJi@-}K9(e^v23*-^e&ZnSSw4(pc&+Pn^KmP zGk1P!w0pechJM{U;rg|!_~Eb{Gdwt*ZPxx6f24{ExVyyw-Ipk@I|;! zaco%?60hMf*FN_x6FXP!U>Af1`=UXEC{^m$uZ{2!f3aT_#kMseipPCC(i7F|MZ zjClS*9f-@vtKdF%DS`)%lRPh#l`X7B#e%5jQWoL9ak)t}4?6W(G&-~>kId=QzJLP? z3HPWHUKdp(8c59Vtm-prJ_?pBh2Wu6RLn8P5%X--S>-#|ziF)XS}y%~G?rs+?L`|1 z?GnbexNW+QYQ!(xP7MDb_uxAE>v)kYW~W^T!T3b&$+ATtfjsr<~#{qx4xg6uN$=* z)?!OrYtyK~Fmee?{pNF_pDp7t*7yh8Oo(3^`=Q%5)^`43$HV$Lu-9*DE>KULOzE*x zNnVe%X)}mEJB#Qf;^Id!-W4%<7ST><{z2ZM?H}pI=8;nTu2Q9PK#t6Lkt;(s>r}P<#q5H=uf6&@sfY=TF60COP)ew(R_rQge67tf3J@gaayMIsp0IH z6SV_NVB*Lc@wx8)%3K@7vOFKLH~p}-3T~%=R)k-1gnAc4-}fphn+a_w#MKF{`6q;v zZP~wIx)0h3?>Z&+9dkAvTiP)F4s9xoO&c6s3AIK{L(>H8AoUjRLiF2>mEW3fgZ7K& zVq5TU+z55&Zc#W|+f2wu8m>JK?^YcV79@HLu`8MSt$inY_>Ts=31*MR7pG6-cZu6H zdD29b4y}tyl84+WtR9NVb3pw^3CRIozWYa#mvAyF)T%FbuhM8%w=6#0marX&Hi>b= zJVg89jL3-Kc>X~iLSHQUWVLEoPT9Q{&-8FZ4+k-wrS*A@i^xGtV<&0fcq48xZrjQ~$UT-U zSz{5&x^Hd zG1rc9pK;FVIbuyyvTWHhv;4zaoH;!frm^AJAAN25UYpi-{_&O^L z|1x7%v7}0wMzA&4_S41{;ToyMPC>3g98Nn1H66OpuZkK8au3$T>zaSi{z3l1?+~Y_ zNhQ8ZDJAbmrd-G&ZC1{c8y~;Z0t>sh!RhJ4@p$i2(TR)y)FI&(N0;Hr5fAw#pj%sKM1GmqmHWr{|0h2UJ%Y zapu1M?oz|o(qHP#n~Uvb+Q(kXcj{HHo80C4#RmBDWF4ISTzu6|)y3?|J_wC)R~)3t zj+gUZG+6l=!aB6W4AH~rbF-b(hb7KT*XjswRv(e$7eO6+;Jdh(QKFk@u<9^8Vwxe? zy9DM=@xfuyd@v3d$B=x4@oU>O_QRSL%W>=0Ev#R&22MV~@SLy;9&h)7WAS2&e^eB| zE4L5l!llPY2&mH#UEb-4sNkB)2E|+~=J*)T)4yvK)NrkYI(2Hjz&~gMiHZz{UybsL zqfi?Z5>^@Idyaa6e^eN^63(rr{eemeNH+{Sps+7%* z^kPTlvz9uQ#6ZZC2h}B4NQ0G!;NN>Ba_1|c_EX;x(0{DNA3H1KMa{=t6f5nd;wYFt zry64z@f5M8IsB-xi)l@bFxQ1m+fM3xVocf|m|xwN7uTO@qtI*Ntcl-P+xpTR!stJy z+q1T&Z0XvK*i!rJSmPhMFQ(%+eE4via67R$wHc;k!uQ;73syJAfin6C88N@DV@rIV zP`+(zyilJ*>q&@#^_jYRmz)5D@cKST}s5{a|BRF(T; z8@YRuWeM(|Sc-?oSL5O5>+$Q3MK~qek7F~(qNMnXWf8oRMQ}^@tm1!_OLDYJz5~TS zq;|;pC(q(FQdiG;X375XZ{{Cyyd$mnx8xR$unQK?^2HZNqm@qM@8%sEcN=SsqnVfD zl-NF2FANYa;-=zL^_KX!)Qjxg5T%qKbY~dWuJFg|Wqvq*Fj8@v>Ed4&9N~rVVUv|6-RO(O*j6E(x?;TO z-i=tFb{^V%Mi28s?WPe3>^Dl~H;lJ~Nc`G*i}t`RDh963h0vlwd5jtAuHxuYpL2M3 zB;IXR9fSM!Q1*|bM-HQAt!RXfUy8a5_rSGIV^s1DLHO7OsI_1>se#9Re7#&jzM=iEbWJTtaDbP@94Ln=qdie8ur$hb85SRd zm--LdL!7F+p-Q>J@T%^DaM6xbE$<|}rkc_WG4K7_#eoR-FDialX%vTGoGaq6>J3|? z;f9mK!H%G6?S{ygTVe^9b3s7AG0H!Uwx-(C*1;tpTz>yDzl5zAKUZTI)*5fKwiWvu zu@3PJ^T=7k!iQ#(o>O$*HbgyJqZSg4^0hMy~-I{n4!X z*I2qH9b3#ezSj7Rx%Nhk7y(<>w#ge4!uon_$U|(giRgY9F~6N%_Xl2E(m_FLjR*0_R^hZ$o_>pq&RjXX||r)h2EAG*)hp1&SFdc==| zk$>=bYxWp({bbw$I~PeBzBIj`_V@O28N ziNSRtH_`lr`?yV?Bvadm<}KPjl3Bi!NAeHm5Y0%qdvzRMwFtLQ?!~=Bo5b$15)VEV z?m>QWe5ESfW_e03^1P6jJo{Yi9*TcRj*laf`{TrOej=YeIk6IVPb|aDlS^^q)NZ3@-X`?HB(catq>T+Dgn_ zE8CtW$26~BCc!-C`r7&3@4s$@(?_FlU{^TyZx6-ceYJ#dgkt0BK&)Eor+CK(*7i-#h;ULkHA7uCx(UyN1uLo(e^AbXP4w9H+t||tYJ|AmxkS~wd z#nArlsP0)6HQ(*4*8G(wMEtO*E2%SYJF14(M&)uP;pb5fjiSpd-oP;$(5xTe$lr#YfxI{jA3j9at~_F$vx^V*{|Y*MNU}-CubLwsZVqD6}o7Pn=+U-!qHKbj>xN9?SRHCJmsW3(?>;xop$ zwYt5QEn6xKZ_Osfe(HN?ntxvJ*R{3vb&jv*k*qc5w{?A<$MZUQFB#XFwhBvp!Irtk z@i1a_bN5_dUqZE|d#QcA^thYW#^*&}i?w-btxcXo&k>`h#2QC!-@bkPJu!_lXUo0i z{YmIWF2elurq^$OZ^za4IbhoyU~GG?S7gtgUGa}>*|H&Bx(uRKNTaZ|<`r5yPJ2eK zocR<6*Ia`&u{pm(zQT2XzR#U2KXT^Ct85_jyCQBUC!udvYO#N0NuLQh(xpd%%o(wG z(nmPIV=Zo;-i6yoHsIco)p&GtB_0d+cq}~P!LenyE4mHVkA+jHa&je}NO^Qbatcz{ zaeOfzi5BGPDd8QbWdEsEcp&A5Z2x?EC2pLTb}#S1hlZq$Dy zdn<+dOy@JCo+M?;)XLY5u~P~bEQlgSil9)TLUKRS{bj##d9r0f{aPh4UHprV3m*R` z_*oe-c4D@<4o@Dz*jm)B(TRUS8tFx}cBb z%pNZOTQkOcD_zF1{c-+E1G`s6hnD4WU}rc^iXG#`p*UN{fn8zPy(I)YHU?wYX2I~g z!*O7DEo@pFgcXZ@v3!v))-3l2`NsNH0WTEp-z?wLoQM7XR_r*F$JRtx!!XqPXlA@W zRa4;*wFZqu|8CXdW|Yd8E*zw(*g+yDE=N^A@vW*} z1p&V9;`>w)wS&qcDySrCRx5>G?{&lv-+zxKix;70{idkDRPg)$>#8&spRk~QqtUK& zSDZX?98aD+k$A1&W6PH9k`J&Wf;^otf2z+5x|@YFB$s%g*epW*&GHY;K_bMa;ZxlS z<%;D++2);5VeE3He=qmm2Pjph9I82&k(gP5!c}UCKVTVr(673RVSMgb9rTv_RiY5{ zgT5udE#h;PKR;aSw@@~pX8W!wKQ!;Rd!bwvSNQe#0E`W$v@sh_!RwuV$X&3o(u0`$ z-!S4S;!BEGeGf8vY{2qK!i1V%EfOMvb?= z4ohp^?5AAp9x3jW}TGvQr6<3yni4Z^U4zphy7} zE>RT49801|(V{4jFTc7b?L(&YF~T7<{~!n9HZ>lagRoXyORkmMM*RolW09wjpE!s{ zKTq!bD3HI1DkUU7XsJ@A;N;|_O39KXl^;oF$&W_+#Or=;nTI^5LwaTN7}C3He4cSr zKN=&>{WokA!&4K$^>|`?7W(NhZ#nf6hxbItwT7!$N-IQnuwa_6@C`2&@0Z$*t>B)vOTLTv3)2=gt5@uS?aWWFy}F80R?;TB8h`(VNBnwURJ@`y{lbb$|6 zF7cDk{e*wSmF0{4uxx>!eAid}t^5@SAsnLjq}pDZB83xjfYullkMwkFg|~l=09y@M*hL$wLM19d-~v6;#!u*!Su7;yLTtb zj%ge-`}Thui~rZ|zxKJJy@UTJEX238ha^vyQmyHeFOWx&Z)om8{y_|`aX9$~3wa26 zisl&nTyu|X*>WfjLLNdqp6snug1gfzu9HtR-b?3A#r>Pt@#N+eJo)V$p8j+kPrpBe zC)Yp4oi8`z?zyeF`NbyOIKA=3a%Q9OjE%T;YK@e2>btkT+={!Gg}+?=6c2wmD(#)b z)7z)<^zJD^JRbdi9uI#!k4s0lqj6|WI7p0~wDKF5Nqon1iuR+3aF61p zN}z=BkK)CPqj+JlMHDQCe0dA0Yp30U1kI8pn%m zmMC5tjwQ>entX%&gFd{h%ZfJM(a{mbiWO7$>2>*Kk$0pKf3w2*GK)`9X)K!Ir~Hrf zI=m?!{NP>+)R-gC8&Qi0Q;ul);kx*SbG6a>%ltgL2FqH2z4&~bSK?QdYgar92Kdort zFg2<=W8`3WiFH+9bV+^)s8I-6Go_VhE)DV*EF^Z1=Fj<-#4#4$p-b)Q>kzZ{bC8p8 z970FVLTNW|c@C}H7xntQ#z4lkVqzKM7;9^>rg+8D`-C_M_Z$6BEVV)0OdM+3cU}YS z1zZm{uJ>ER+1f{j+(nOr#>4SbFJW&Hc|B+q0F===L-h(l#k;Jdnrfb##3VrnPZ> z-4qqtE@bYWn_j2sdwnmhox_^1puQI4Jhe8r zthH&>lo&axr8&p3(0pBAtMT4w4#K(nx;O~e541m?xw&rNXXhFAIUxSgqBSS?px;$) z(PL8kLHh@DaS&+nfz1p^Gj?0(7z@59_;o0LK@!-}4JiYT3p4}l&5Z>^E@Q`m0;?Xw; z@Zj=(-2Q48Zk*d5UvA3w-3vQ#|I%JOxPA~1zdMGfe|&+bH^0P_JJQzuukrZ71w49q z9*^&TB}Mk#y^M!9FG>5?@adLi@TpW5nNuV~D&Ym`)2BjiiFH-Xv3Oiz+@Hcl#kZrF z8V8OC$A!5+I8NjlEaV*8?!ouuV;nDXS8!oqWef0QiYq-ydG zZTleqpgn{fh}*1r-*kS*Kif>)b4~7%!yz3!s^rCh?v<7Qyd`XI4(I;U_YsGaKTI9# zDZV$<5`k+?J7(|R) zh}s`bMf;9{IJ!5|>@mEyC4$SNLR=6UB*%pX!BhBzYj6a@M$AO))^p1DC}#Chc!_Pp z-Lr=1xdT;Bzn6LuMy>Hn;4FIj ztXUo8*-U15HqAdrI{$~pF?zjSV;Egq(k$q)vb8qlAX-zb@s~BsZ?riOzZrdU^mQ25 zyscqG-5=wcvc|^NFssJs=66U zC5C_KF*VvOEb$L>nizBUNZ)Vv#o9P){=spvrSP8Werqmj&7aWRJv8o13J)_LZ*JQ- zM>N+Y=eP8tjm#K_SYM}}WBQq8O}{-`Vhvb2pZ?5JUKn%NX5VN2H`hKc|C{5YH6PmU zLCv|5e~^RF4>?bse6oH}T=1`>U|%Oy_&#UO+{z|GZHKmhXkRS)UXh;=Qx_^$5`~MD zM4r3_<9x8PNZc#YZKqF{Mq;{VfLm1;Y~Hv8H~;uX@sE2CuH)Xl%Xob68?jT69|%{t zA@&es`Qt2}{QhEj_?xU>{4ShBzW3zTS9o&wA|BrrU#`1f^`ZJrx4$<^vIhpFG`jc+%GnV;>AnGjX~j(C|ICqJpW1| z+HuAqrj3JqgB*j~?%oBMUX5I$3B(xg*kTUdAv+jn#n?jbqQSmL(1&rua} z586YtPnNcWgUB4{om#u7c)b0E!%dsuiTN{YDnBgxVlA5MgT+$l zZ?$|OeYN~B;(b>%tnDa%Rc_*c_1yPrm4CeU!`v8X4l;bOHv(d!;oGhgT6YK(E)?_Me7xLI#mfhQ5_6Vuw3_V~?e)@6;nAQuJiTg&A6BrkF%aiR zga^XQwKBY2s|a`Mgxx!~pyH)kGXU|j)imURS#fz4qQ~M66RH`Uk z%NLY(M7Lo<`(esK=wDS{ayFNCtpQhecSJnzS9I+#_|~X|5d+;+oUpF#D=H41R`l5U z3l)Z|XwB=0Hs0uSWy(G1gI0U`dQ_6!CCovX%m(hkXI5i>jbT_DvAYq=5F@@0EMvNs zs&SphPu6gvIm~a0Z;ja28voGkne(r)cC4i};iU2zy|zuBrN{q;Non%N$j6M>hW~?l zZ1w$3%(!svJ}K+-MjtX`e~dbI_Q$wpZ|$CIA30-tmbQ)aL64!OdudDTT|I_I9%hLb z+R~=+`P1{?8W+FZ`qPWU=(A@s$vH177#{x`9;{k~eiuZ(rY|6bZY z_}fdpGYj{nk~mN-+@|)Kc$d$<#=~5HCs(0;gX{O&_Cd};?9DZQ`fJfvQm|xc6fa#) zv=qgWTk?o!PcK?++8Cr%EmaaT#tg$xS5Amc;yUi$`35&`U&fvL*Kq&dHQ^4|@c7nM z;SplLuvo}7EPv4t?$9VcHLk+iZ{ao;d#Tmf{TLd;IStuh70$ z9ADZuY$?1S`aY0L+B)aol5x+FHWf-0$tKvetg?ChoAu@9u)4W@)Ui;5enK?p^r31P zQCev`m^+;N>33!BI7|E3CUqs$rPJ4`ZkVI^Usb^Dsa_J-DnRMX<9w^=U-f6{BQ}s$ zv1KrILJhT_+K;uOKeu!)en$JtSh>++ zL_%+KJ}q1iHm>&@akizkdbX#v@fyz!6s?5ri#5BCrQfKe@ENwJZBm*C+KNZb^~Jcp z&Udvy=QTby*B|3tGx85>_uNvO=FX$x$wZw}f-te0UAF?_I@R z;UN$1e)}i4xFa0HSQ6kIkM6~B5!yaj$W0!IE#;nY586TKe?|MqQ#r?1pYKM1`{PQm!aN~!B0@8C7Drau|4Q}Yk)Yo+ZSx~APj`(C~Ee<>9Q;lBK$ zjU_JNSklMJ9N)0UMQ97r-=XiEt!ucM(xsOC33*h!RcaxuVc!46&wsuei_dmOs90Bx zB1@^5Sj>}7d~XiN+cF09^I9*t%Ud)kBQao|FlnrZ#JXaPt3P>%<{;FIyxpQ4=Fad| z{A1&qK#7y}vi2jP^D;*v^LD)7t11r4b?lVbw$!$qJ{*mU5lU-j+?!7s14GdBIg!T_3H=riN%dHB^l_-MJ zh4RB$v{3<`ZfFo0j@UZFQ$hmaUeOt43KxKrlq%&)tK5K$sT&sTul%{lA&hNW+h!k( z{a{x-s94lpv=>cwUsiUVM(a<$YyHcNblx?&^F)mnUOwgGLwF`nDFt*^_Je^|OUy>@T3S!n)YjSpGE zr}}=gFUE0Zo8%zIa`fm?kaw_HyGG;na$9pzqd%dg>$S#jj96cfgSD7s*4ku0HPC+_}|ThOkd{jFH* zxVzj>4np2ReRF#8L*oCfk$(^?6ZaBBoAM8?`E#wGHFet5GZZZ;{!8M!R#}f80@akmo$Y$UV57 z5dV0--;{qm5Z*!V@%WzjXWhB1wC)S0jX|ND(&sd(#RojK@}r_1r(i*`O^6o5X#1c} zgM~h4yiW2C)-2>4yl$i2gB*q5VY@8+9=Qv#1mo(G$B}=~mSK*ASlY*Xz~gvtv?kr! zvp`+FuX`a(mi%ta6`l~j{V(h%How9g8{@oGJgYH7-Ed0c=#oby_4@2?Du_@%GJRX+%z`oNTix_pq^`5X*sY;#2paQ~gHYp9MQjW;8i~)6Eh8bG@#b{$N4gWiel3 zlyR&N@2M>u$Pv}Tq9w-eZqc-SiO5MSP%W|n+{6!y8W*GQ74yN@XxmL<+a=!aVSKiX z*xiU_h!L$}8R8jYG2*7g_;?VXY5Zg>PSm*A*mu2c#I{EMq1SEA)y6eyeci@mE#Wic zvAPe&TH}5r&bEYs*&cuYbU!p^w1!8`*@KMzNN8Lv-79@<#$$DVtgX)*@v*TV+&1EP z<2~1H8*6@Udc3Xg^%xrOrKRh&7AM!p!!$3n#>1?&$!pQ`-#ACC*%pmsU~2c%*UdVi zxXZ>d<~Fax8s|5CcC5`gV;}9?iNmw@@%nd-m(DS${jSJA$T_%%&O$6(Kyr4Gr?7Ba z<716^iHqr%Wy(K@+qu54wI51PE#EC(yeLW+E(E9Cc~C^`DgmP7?o`tsQ`&aGwe4H* z?1u}Y^AH{)wvKyu;&_MR9^@ZVsNYar;?AW6ImgRfL^LD@e)901_+2UOx#-$y`?!4t zKT7P~POTdu?OV(_m`26qB4?nsJf1(%h9iDtw0)3!@S6F#_BkWp(Ee83=6+o?|Df%I zK3e20Y?ouo{}ysPj-?)7OMJuhGx82{7p)E9He&}Q^gLz|eia>39LwhVsd%)O@a=!) zGuk?6C!qbHV=IYKC1s1mx%%!>;kgn#8U|IDJR^cJp9~>2|sXF zzEq}MAVT8qx{*hS?^XDid16D@gPM{fqiWSEqPYlqiGP?L|5v^b3-Lo_Kq-kI5RQG@ zBG5Rd3cQ-PQ@I0~*PQtTOIPziz8u-%F1ZAoiYB!v!rIneroOIRpVC^$LO_K zBZkr2#DbQ5vNWclO~e{r)>wuZSGR8~PSm*A+;4&rE9*6C_RG>s>k9aPq5ERA`&c?w z`;eLI3-{^vjMrv~&#*ns1C4mp8a7Pm{CdA}T(nP@wQ$Sw0*uHTLbst}ahv`1+IYJGOZr2h=HJ6`~b64AY zbbGqyeIpMs#vRb-F|E0VV2%6e=YiZ>UxU5=cj0CG{d#@(i&|y!4ss4-;WJ4+2k|gD z2J_x&8whP8#JI%BT(9Tn#KPqC#NpI=kaHOA0mSL_TVin(jYkFEmAAWH zlX6%v-52!7O6u5fe92)puL?$+M&;0=p%dnbuN7?_GbVc>q-IeS`-;3n@ekRb6#l{f z@wizNYl_aIFrq|XPP+zumZ;&Ny&xpO3%*{}#V+BY@{61D1%5wDG~GVl9;oIQ2*2(h zAacq|)DRz~Y8A?&U*i7RX-L|bbQR8BB z*KEXyntxbZqt@*iF{?h-TC6I4thv4v^4jv-5>ksuMhv)$MWwROX>q?`!L5p z$VF)T(ChK!8{{L@fY1kvzYSbpC;wm}E+&4~n3@^~t#cq3AyzNtSXPztWyQa!SV6IU zh!tjuGcm^`af*iNVfc$~*LX#?pFn@Bi6*4>&2RZS7k@a?UfuFfcjiJWS3B zCXrD@44{G_2nb?C5m8YvU_b%MIjESk9wSB+v*#SIo^#W8)BC>n-gDpYd%owXVUI=A z)7=vhZGOL^s;j%IcJ10dz5aWxXRWXCAOH9f^Io06_n*DS`T^I#X8>~m_n?lvYhxWi zv4g3_Va1P~^nZw{wBM0GOuUu&LyLGs45RucT9j*8%pu>0S*!0%Kid1$6>oU*p3WuT zid~OBfb1cgS~+Nc4?6RQ3#b*PbT#JG7UMT`*KgkU&zybi?fZ`Hd&N@8*K2$ocK?UAWw)9+ zd9jA{3B7vtvTRwgiR@p^xf@@IwiSycd)(xmmEA3ST)Ok9$hb!Sh-OaN0AEB68-fJp zzPdC%8LJA)ad%EB?#nL2Ix@&=#$qi>NyFUCG%RbV#_oG=#pka*jsN}g39CNG-xPNx z_Ba`T^?#W=*KkF1YxCKr_gPQmfBxeO{LjCAj(=r+khfphjTsXv(YtFG^kKWZo%>6z zckz>SA6n%5Q0$edzv##xdM%%axI;c5Y0?#MCH9c^LrkL2Xs!Oz`3y^_58IPJ^lbE- zW#X^~Q179-6w)aFR&(nbd%wNb-+w*{53kL|;wuvI{Gm$AzHiI9)$eb;I39Cn#aT59 zm&{MJY8KwVcC5u8hnV+DIeFiHZ9IJ@(=C67d>a4wXD*DdQjC=tqj7Pbqf75e?~$1p zdWz1xC0rl|5u;R=7c<{&7BcImpkUs0NM@d_^3sB4*`+1dXv=5SzVgz1L<9#SZ|3FH zd%TL0#VZj*4SioSwmqh5_?Qrs-?Sdnp8gbti*7{_b6fZ3-@lIhjnVhcRZNz#XXF#H z+snq5acASojxpyjcCkA<(b&b#?%T{!>zt+y?&he?`RsllPmguQA9fqq@Qn28uKrD! zFrleG?6#q+V_dbt^pT0_YDvGyj&05SygR$p-Y@3a+t+&Ew7a$Imfo)?J|xpdPdUt8 zZUWt#Vg<~34WqjI&Uo^?_1yIQjQ+@6!`WJM2zK@{W8dA}fjiD@?X&Y9*ReLUw}0EG zfA!leKZenl%eUdkANu_?_3cbtkg;R6mThb24>8Kfk)vtr4zuz)HP-u9?9xapZYeq{ zj%(_w!-Ekq$`@gMdZTcJFY1Q+U`1jE)@PUC(HwF}Qa0A*m*RoS8r;Hqyeq28aB*%L z=8r4J`o&k^l|37&(|8;Ihc(gv_V3hi{2S{C{s(hdkwyMS4Z1kP_(Y7}T>CBVIH^~+ zK0}|!fBw_Q__rV5#ff*1;N?S`kscF_UR}DP7js^9JFl;$A(xLrj39z)*gB|lVcSqLte z5Q#_b&$akNFX-m ztPA4q_>Owt;t$mX$;f8?#K%!Ke=(+Dc!1XQnX|hLSo1# zj5}4{>CX5)G4_m^19oP|XrJ9SGj@zC+gb0KbD7V(;|1AO&E2!%5BnUot9(sN zwf8{W6p?^U`IWdgB?ot<=U`nyDekGLz#1;svp&I%m}& z{M!#7;BWu*C39C%L;k;hU>@D?@PGgNNBl2pI{x>6FjkAq@!!mC^&kKAIsF~q^Z5H5l2iC$;BY(e>OO^z-z$d>HakL`K9~F=WR7 zVf;KM*2=Jl@p;JqW9puF>&Ci@gN9grqjkT20~qtBS|8GTD2C0m`W~jQTe8-3Gc4od zGaPrX$~;-y;_T6TD1WT{4vH6(eXY6uw%Y$KJzl)<;*lyWUyzI~jK^xNHp6~h#d1Bm zj@pm>U`(%%z+)ToEdDTgv9wmrkORAmt>p-}j~*_^^G{dcho22?S*P3YM8f{1*9L5_B@~Ybra&^5E(QYMfr_2 z3|o87wjQT8l@;aE-;s#2OE1Ix`T1nJDl6{H&L6#d^+b45D$?qvA~Y@${rmPg#W&KK zzcsSOWH&Vz<6)n-mrdpFpX_Z!r=IeViDz@wo{oOc+^?tOz!PRN z{b2VMxEkB8#)i3nyKm9(hr2Q7ioeZyn_G+R?7ks$Pg=`|X~vw|;%?lz>$B$C;N9P` zcCojAJEwn5?3H8AD_8ts^d9n?h(W|J@{fo+w8$>jYcY-V2D*m)E81r`M&}3!^g|%y zxaxcYa3g&kn`$TF{=#ys2#LYUka#?hRm9iDxN~eaZqLlb9jtYHdrmg)DlEX7q5`Zc z%)|1MJY1cZflJcjFeg6^iyO*t!^IPE*OJTd@aiRa;=z^p{GF%q`MXE)#rx0UtM{JA z-be1jW4ABGYStFK?xH%ZxS$-1YBMo8DG)`$LlN4uJAAtJK=*UbBRf$0K@E#|LcWgh zuxKmimH0#XsuX*r_$fPon7ZbQxsu;Q`E|AK+o!+9cZyjvS{v0Vm;Xrp(Gs3$>1WNe z(Ql!yx#rgNPPg6dHg{{b#T-ZXS6KBe_H8Z2_s7pno?zwXeTZ>bSI(ZPqN~;^3quIJ1G>2u~A579^5$Q zd&o?Vr}n&UxvS)FkS@KrFc(RxJ(!VfY1-S$5zQU1>rI$2-qOfxEq=1s3(@OhGEhqF z7+iO4z7^9ZJyS()FuI@DwaK>aOa2HL>BoA6{uX<5q3^dne`n+a$ji%Xc5!C&X#U1- zFB@CNZsWS+kAM27f3oabPwhlIFF3n@(+2w-wX1wn_BmW<$GWoxfB4~tW}k!M8B;6U zRh?|zm)c^t4L!9-J>d^$_vXrWHZfH8=WE*IF0X(m?Q!<(+H;??`*o#faA!+9<1lwT z>F%7mU&E;O?~J=~;@D5pvAX*18vmaCIL#s0*~j#keeS@^ADv^z+MkPe`|Rj*#a{L8 z+t=a*6LV#JA9ntbuS52$nLn59D|=aXtj?jlN}3ap9c}F5n3xz#r!MvopU8)z&zn+)z@0>llx5Olwd(eR(dfE6>7B^`)4Vos1C1X$(213wkkLO4|7WtluHVP|THd=f?M8 z>V4=vQ{zK=4{?X|F4C8uLxvH1C=P4*Fls%>Wcs_M{#7n9#R{m;%GXlyz?%O$9{5< z)Xp$Qkz6s$aNcOQBUKea*@YEM1TU)h?V?7r~l;k(kIj zBB^nKNM_x?w6qj!NlJ(%gM^|WJKeJ9o3r;l*)JxLCS+VyDeI0GW8#F?`&3+APrePs zd==(oa>-zAkxUfP_ac9XI7%^Lsy$ecoq-9JVfgI51}i>K{aKt9$nV}S{L!m>H}vn_ zlk)*xI>hfGo6*%jyPfX%8)>)Aj2&ZaRd@B-^f?`4=LJ{u@@k{w_04Pj9XHoE`E%Xb zh{n#=-!yZqy)EweL+xoU{>hwAegjvrKRSp0NmuO59(C6SclN%sesLFDV{B(*qiSy4 zJX3e=ac1wDXVe*M`~BMO>Be4m{=d6EbjD%rVV|2ZV))x#Y@4(1p`Mkif3EJ$F`m-2 zL(kfsR>{?QJL5TfuW@$R>c7S3B;SOwg%xL|#TkFdUX@L(-$>c8#y*zqEFVa>Zr!XH zEb}>i#?-zOcNqP;_BApJV~s*W;orXx3Wf~B)uHjYKfMr}i>k1n^}%+R)naE}750?Y zU?cVCYtyoDXKDuS$;`%`nPYKpZa!nO3aL}i#r?%)xF@H8J`&FTX6IpTZUOGe(|h^2 zBP$1MxPNUi&%x!Ml2Y7TT#7sMim;ZSxhs#y<>X;?UN&ybO~>+rTr`9+7OHn&)?ueE zhJFii!$9g-l;29e4{1NdANG15Cgw`)q0fswOkF|6UTME_T>1F;SuAFFO)O^mQ`>fa zGkx4%YxC^HjnaUejr?Kkdc{B;*y7v4u?|ZZ*4^2tKezLSbRfIw<9Pg`JgmQKELN_d4(hUaoZk@1yt5&gSRIB1m-BnX zm@Cy0(Pv6>g6a2&=lpuAwTMIFqa%?R6^;t(wI@$6Y1~BNl!vbR2U|Y zufT<@d)PqcNr?{U{$wi$aD81Ba?%p5{JYZ9eDsHUeEfDj@=`{h!XF*|H(a)atAEby z9($YY^Y*f-jIHXoGV#C7=8J6PHc`96&9Tz~T&H6Z$1B>Pylu?K^ErK1Hm|XJ zEhdR!J?_vDo`F43ukNT}{L*s9TJ0W9%;b-Q#WmPlI1YO&YO%d+ z93IN1&m%DntC=I~&ZIPpMeZeAh&8l`L)PUNV{KL**0F}j`mqIAmz9qPvJ1&8Cl_jF z?_)kr>ll9SF0l!DWo-u+%6b&?s@3jy*GJc2nG!vZq+N1_Cr1p z)f|-WL$O!Vq#OT-VGsE|wjD`HvtdclWnoY+SOTDeN#HFUy_XZv*U5`^k~*d53~Fv%3r4a(yJfX z)mW=g%%a*MJ2n?uOp+KI*~A~>kd)*^#Ds?+H9p$%UC58o*-X)r>&gF7Ngri3{h1Hn zcNboK_7Lu0yBd}Be<NEMG@Q{!LZh@}#6B zYq{*Q%NmW~X8u>4kt=({ZsXc*G*_`ty3`$a++o>Z#x54OxT`(ToV{(IqgK8tPjZMF zt%ChnV+*P+?rcoQ?t0~wS8&fg_u&2a-#_g>-1UX-%h4Y7WFFd`ool~0PwvTH-_Ep0 zS_U1f#g%``9jA8WcsA#@->=a#xbydzW1CwW4l`OF^@BU#+Q0nEzj*weQ9X6}3f-}{ z=1J8?Utiy*@9x77KkPURPkHT5hhm>QF#O@}-aN?{)?8nD_j_64Y#swfw_$V$CjQFK zB8nB#cT~2r(QX)9+2RTMGxVNfxWpj(Z8dp%9p~-!`G^SF*&&v1#Bca8#0}_&3;aWH zdsHfpls4dC={W4;a)8U>;_;0PQbrCrx$G{dKO~2mkPPb5$s#Ms1GmyIa$6d;A@p@v zJdsWI$ScMJ`6br!U|xyEChH4Ju)e4iTHhyDDWTtl{t)>^)=*<|19SPzWp12Q`Y!yt z((l2gZ|{B>MBjzcohv_;_(M7nQ{Tkm3dUc_$01*b*hBfg#3EYc8!`E@`uA^S52NSr z=$I?}GcbH39+dy%-a9kfC2q(*e}5*n-+Q$Nix`V_(~>m2^}=}kJ>&j6s~yi#3%_Ju z5?-Jl-P3C-ckU`1;d{IJBn}<$282S`>_nrbc7d)F{lD z6iFXP1Z$N?;_{1Pv0^df5%0{hVy~q8u=_~t+Xr?tZ}pXlNRA0YI{hBT2cornBGI8i zR&DdTn#xw^!)ggfwB@sk?JCL7MtMOFCbN!WL1wDO9u4)?jj>m`nF#P1)--qChw~c4 z2J|L-w6DIy+24EBb~84mySNV-G|uK;?dLVNs;STBZjSxfv13j4ww*s**|%y(bN05$ zH)U)@cjwW$%sju{X0`K&`lr4Axnmi7?p=Eu+#RR(8N1Z}Jj}M~7sb}-IlJQ^W3Os% z+&oizdtCL0iDxs{J`-!ZJ#EIfD<6{4+PiA2=?7zg zYBQQPxVksfK3D!7(+=IEv`Q`Ec2|Aoeb37ozr``2zl-7pXZ&IOAL0-BG+gnA>{-QE znOs=%qv-Q?+t+N1Va)bG`d%^z4aVHCI6RtOgr|z@aY(+8(kg2?TwFy4sm8&Q8XVBV zSgd^~Ib;ugB0I?_kFi$an&eEZiciJOQ3+Tc7>>oGg0WQ9vF-n%oSWuUqAO_F^q|@q?ewNY)h~ zH?iiqVy{&HLp&nxknclzbXAv7?4i0I%6FyXgv9uuh(t^;3&=x-EjAKpi-*V=guyh~vi>Td2 zd07Y#3}Bs}9!>nwnSZbC{2^P$on0zhra9k(+HGvKjT<+5q<6UU&O4iqG4s@FhbQ)w z@mtvY%gj+LmdhRc7`x09{_yl%=A6#fI)}SCc)JhDZtuIBi`Mltcix#FG42TsJH=sBm zXZ)dkTErjvUODoIi5U`mn7mEm8EMgVUd``2v!fMXq+`T10~oJWHYxziS?^;PeH~91 z){s9M+2cSN*@N3p7FFX&Q4Kky#^MmM$X@Q-Sy)MJ$aoy8o`55joHs6Spx>kpJMycr zX>2Jrq%l@2CIvSIMq-&?5ElE4!NL&%STJG~<_;T)Im7)ho6BV*{BWs{KW39nX2vFA z>@Z)9=*oOuT^M`C+_)q7UMP7bI0_#+=mfy=yRdq^k-tRx3j5}`1 z#67oVS+xM&af@QFK7F@={+e9u-ufv1`t!H=?Blm_+YO5`p(+upZ_c!QA1kg&#zFco z9GRjeuN8x(m@MVjr2k9 z9^E^YJ@mIue;2ism6bKkp~~)X7uVlt1p$gNQobF#JtKQ${rdGddh{s%_P4*8k2bqj z{D!d;W!u?n4|u{KI(H~O`Gta|M{QIUf1!Bg9i^<#~WKvZE>_Q-D&6@ z&*|*77{b+kIp*FqIkWU!w0OdXvUL^vr9LtCp_oK0^T{WlIBV8v`|Q3Y{oWb7+xVy4 z*}AT@2Ie`n$6E1#o&8V!s4-`riPo;T#@;@SvznTkrtgftJGb0&3*LP5P5Z~1-PZR- zdROz^UAS;zQ#;%-q5Y)hJ7dO&o<&9m>z47md*Z|i`$wDI{xvXWdyFCPIlNrd(lH?Z z(050C;fz1be!VA_XpTQ*)5@OJ-&lRG#UILdrI;<*&{5&kfN%+yZX}XEghy__P3>s#h%JK94Z(`{-~y(qj5P%U&tYH$sw|b7O{ur3!xumf5~_ppjJda zkpotoRxJ*f(SJe)*~icAqkiN7UmvK{G66gIIWdlO?Ym2Bv5oAqoj#Nu;~TKOeli}Y zpM-g1^AOMcxP$q(q$`(xy!U{hP{xYIB0Q+E-k_;z#QYyG+F2kAbZ=lQOj zRZQ;q1ODN!-{bH9@*Tc9aSXTJxD?|`5)dEi#~7=&^M~aFVSLto^r3|LkFazf_82T} zr=})Tk4`>ePOQqZ!e3V$mhx*+d#>D9RTV{zJ{sBijZ}cdp zPt4jCJGg6)G{riPtN0qt!MkE0cRG4^ZSdrM$9ZjgdrUvL8zaV_)Y|ds>2aRiPkVnx zHoCq$rZ2Si#5dI*?a=qd{ygmdF}1@}4r*&#yt)ss&F<-U^tbpqX*Hxf7iVa(Yd_4k z+25Qm!_mG~j$Y-{>aN_iJm;8zAjF2nAUGh9HTxnF!kjx}!h^V<^M>7fA*bJPToVz4 zhjL4?x4MBbR%8aT1o_|qc|*%V?NjWPeGzkrK~Am@YHfReKezRsec46skbh)faV=R! z+)__XNj-K~)MHy!12)u6!mNZOM4YF*yXRs^|3UBzWX*T6M|2eZ6~R`{E5%)D5q~Hz zuh_%nw-RT_?;*~R-$S2~pF~U|PSN|p!N24ucI>~7el14SH5B`ml;H2yR(5Ag{~F&H zgGdX0>+*D5c~P9jAg!qnsG9J5wv?i#GzE2KsaUZv6Cb@*Z|TMznP$_21(r_ZRn`HN zCf-%-m+F^ndxSMKmt2Hzzy8?bk0u8B;sad2_$nlZ1yOIFVZ~1=-b#LqmiRp!KYM6z z2};HWA|WOWY2=Oc^k1|f@_|T?9>;lsMCO;O8CT|#L1g=@)<#`zrIkOch`NiMv;>Sz ziMR6KDo1X?*bHQ)Bp^FA0fkv9D9B1iKI^XMGKW=m8rNKMQsa@$W3rRu7#|jc%=jpz z$3`G6Dio;^!AJ@VL~Kw1VuME`gK=UhF%hgUQf;wFI_s^6@^46A`cF0AaVGvg+xbJb zlwxx1_LL{{>}|DS%>1c6?~dJ`@!@e#J+GH{eobRQjG)*nae_1dhZscr<;PHs3P;;mbN7z> zG_S54SSGe>;D8~B3W`8H86$!|kYL7n1V#j5q!0ZH)OJtw567)Z8CI>2o#o7TRWX6g z!F37wfNN_Zix|$Zd>!Hn`94mvhuPNJY+Gz%`;1=8@3Ei!p>rN4e;guz?B}wF{IQ+< z@nGEqG>|a@$sT@Wqv6bV6~H>}V3Fgem#{O*;P|TG$$MDyVjfI#=jkvTHAHQ2?UEjRtxK`c5 zdv7ntUAHa6pMLnfi9aj``T0A1^#1Eua@A~Heqk0iZ75_N^TxX8ZDo*EY{y79qEgbFdt+F`?7xESUh>~0OH7Gg{;d{nj3}0@KII`k2A#{`aAB(A11Ef*vK7i z$Jpb0?6n8%{GqnE%R}nUeo|b%IHsldV|+tKLvQ-UtmRK}7xS;S$=9J+Fmqq-Vr0Z* zvhB?Eow1=i+uvQExO(4N+?4T8*==2S4Azmhf?}BT99sHJUEOy}-ZRg}kxe_&2V(!e z*!jcGgl25Idp0e(S7)E~vWJ%iI`aE{Hk?~EJH!{twd;&OOdSyY&Kj+>D?3^7RhnNH z)0h~ne*IY!eN-U%BZ?Y|U_`|+=WawGhBN0?SkFF~8Jd9m^2@NZsvbM2D?dOD$Eo}w zKga3(Vc4T3>%H=+h(C(RH(d6UarW}{&hk1u!5FP|HT5X-_rnmd!R%^0y1v+o^D+#wXG<|=PL99>YsXTvQH*16)#9gbr<`^@UH|J(CSm3B zVr+bHt#w{;hkg0WPv7994_?Qr8?VN)1^L*!wHVJHF2@0$*U_)hlGpopm7uO73`udU zNtl{+iVs9A(!?MUAr^xu-pO8HT-u8X4dYRopNZP^Fx)ae5}PlK!?ug!ac4smrWR25 z|H?~@Dfx~&Zrlag!)%viv$Jn=Ohuy|C?QrEUaAqIb_lXm99@+h#@Pdy0=YRg^Q|y1k4yHZ! zwc?Ou?};*~gl*)_s|{GIut!bp4KOXlf{$>*`)QVy<0U6Z>;9+s59uj}ccf zWE~xwWBS39m^%AdXpil0zWJtUY&iO+)UJ+*k8}LK*!e@x#*u?MYJB|nfB*L>+IKTP zylXFy{NBcZ_`_c3!^B*fwW$T7*eg%8(&7)ztxH#~7%bHz?8BVA!qo%D6Igf|>NyH{~s-MmG z9!6I#u8__{{to#%#cv_TIGf?qT(tQ8nm1=zPQNt;I7x9N`;$63}2zz%tZfVc$>|wTb ztv6qL1~*-M8E(HmAFn-IjTfG-z`mW#5y!k%tzB-pE)5xp!AMDrvv|Yq194=KWY!F+ zEHAWTt&A^3HU3Jo5;3`Yx3~NTeGp_;si`h3BZhaUo6fTi6xmMaZQFF<|O-JVvG;UBK(jUHj2#QkK~Ba zC`b=sOjZyoSl?sz4Au-?m5mRX?Ds)&HpaHp+A#)8_EdY?c(VWH z3vg_U-Ja5Xu46mgX$_jQE2XtIwyM^i@|2FV_lq+d&wk$KwlBKqqNekhdvfQ`k#54& zEHrI!=7VWZ8&l8a)?05q?YZbV**VqDVXj!tlRQ$6W5Cnbif1tW?dkJuZhW+6zu3w= z7p?925=^_?J!4O=t3KYbW5;RF#gR{)F}ucxD@OFR4d!$I{_p>8>E=CsPTtRXndG-R z2E+#g1`KGbb8eW!zBX(kt+caPD`z&Y;;$6jqx@Im5BWhxGL9=~q%SfV-;qfF$FPBY zFud!zs2ClL+j1+hiMsP`)Pe6J2Z#weia)G#%kRM)Tl-n(P_K89Yc?^*))O@oaYcMQ zBD!^fFLg1|fnyLCpNL@Yi%LnQZY2VJ`t_x*rKiOi%73MJE2Hlae~2-(XrI_aeiE(a z`%ui5^7e{9!o$z3|3mzd5Fg-?9q!6Ma5lUrd;h0zr{T%n<+yZu40Yd?9^LnkUr)hf z_Z4F9B{T3>`XdY%NGJZs?~jw+9>T)QYb`&>u|L#W`tD24kH*^DGc7hytdwe%A3aot zcV1(C!H*_bEF^!4>XR&+Uy7qg_E@@eb8g4=-~IVZ#vSco9m0uhO9{UDY!Y60ssj6W zwVpw?Z7N`G^>8G|Q)glMKpJbJ+d0JYgPg2Sm`u%ubl%c?$p0bzMakG?T$~$*gR>KH zjJd|XyCoa{d}luHpAw7dRm`=O6OE&DQ}LJ8dHC16^YL$M3oHhC^ny6XTKVCM6hAB` zdtA=-gcx5GhWjBkEC6xA0mz7BJXdv;6*KqXT{*bnnl#KKx9r$h4C!X{JpcZW({Kg- zE}fn4%Gqy$iR(A^lruX(N&L3)vd>8+SktR!`Z$ko_OMvvEj@IqUY1r?~JSO zi=7G0__RM8Gd{Eyqq$;5XZL8|r|-SaA={`uo}>31UM@M?$AI!vNqcT$uMBJ0`9s^P zYp&QUeRrJkhT}eQiZpG?gC+jx+oui z3uB);gFmd;E3pT2`N{_({@6|Cd7O3C9~oDN>C}FNbv*}Tdi6wzA9Ht6_Ysqpj)1TT z^zGjdJ-T)0eKl&xP3=Lkh8E-hkPk%u52H6XS`g{ggM%9DhlKHbj{Vk|uf>y@>7zZe z!_NlBaMwm@!M~;Le#ecO)T77a=kJ{7v9g~>pTB!$K66lA)x;ilKKSnIPq68c^_YKI zHSWG`EY{qb!C0+m+{v}wH*uKtH}=wJ@!XMei$mUibv!j41-R<6Qff-}x#SOBPx|zY z8}7zcmlo0oG9G_oeyx|DslXBPjTon;nh@#GuVY@{oU{=(0kX6G7vMhwsrn@=%9vR$N^UbSjfv-XSK#x?CQ{sMDttrcJI?)rLPweNHu z+5OIVK|UQ<@k_Fw9hu0qOKZg;$=(xZm_@JEce0Na$E)916IW)pnO$+5+GT#5O|3w4 zUEPbbxpwu7`d9Xj{(JAncP-lkLLJ8ziVO-Px(W3wDQV|ZKQAS%Q&k+^e2q$)f;}j zd%}k`i357~K<02CEX^pu&gu)uAIyb&(*I$_NOe&BmHaA)$RAq7AJV$-9ybA7$R6v; zDo{C;xpDb-$-hT83}Bo6{Frk%A{u=M4zc_=L&+XKK7N*lT(MNrnj7|z-$UGC*h4W_ zVi4_@pF}l71WlZJ+p% zIeeGp$M2gjjk9#=jk&QrkH>nFTK0_(=3z>0 zBvKN>Pv*ip-3MY=#N@?F;JiUD_2t#fgR5M)rCABMwkirIZXApM=dMN{hZsbDkbk|q zkw^6UU&tOm+?s>+lVea4>4)+N9~6f9A~`ew@r<>~N({k8ljE@V*0Ffy>1zD=wP*2h z^Dh2%@P~dQ%)GL(rL?x&c*d5puVv3@epj}Y7R~9KZLRg5KBHq~|LdHtevdSt>(~yv z*1&#kZOd+!t!}@zY$a(cRV zTjS4hr%$$Pj5P=5cnw!Jrs*SH!~QJn&qjTuzSC#*T&7Q-?((_l9_$?EjOEOAH*DD8 z_FS&UfUEcHec|qTn)bBkT4T}PK6}0d^Nh?hZtlA3clEz{Hm;tFYI@kO=WN>#!<27rAV2B4ezom^UK6l2KmVRYxpbtV2#?3H1UkYM^e!edS{ z$eHth=-J4xb!c~KyYq+UrDfMk_w8uU{~BJ)c2|v#%g&F*@edlTcqp~mS=){?ch+?a z3&2a$t!w z?EV$|w&Jj!KD>)|dLj02Ewf^f6pQpB~>?znYBBc&an+Q-+c3F_v498rt@5V_0>+>sa!wy{J^Gdj%)ck z)R*Qr*&ZWf=EvRnZp2{bc&+WWzqy|7r@2@g$Np&UwT>?;Dmvv__UqcW?F`o3`Lthk zxb4Ta=eB)}y0focwXwDDIo_LW3-dhe>$ZMpTJn8S|Jt98y&YmSSFGr+AN0M~Idq@x z`5e9H@-oZWJ_e-8FtJy%MfDvqd9bu?7QH7ehuFgzf0+GRhek#qgf#`jxt5JPVi>j9 z-Fjju^%OBaBQP~T4`Zo$4rZOO_^#*SeCFg`Py2s&)l}x6s%9M2IP5JSM}7D>@<%oK zqj7zJ+Xq-Dutl8Fj8=VrG3%-qjl)6K7ZKwq-_{n!Uu|ODkA+dOD4@S)D)a1KKWPf8 zlTy*|+#Y18z8FHb2oDZH@Tk!ie<+8p7V(F49d`Z@bM)!Md{?ZSK7`C-`A}HzqfzrA zHdFtcx%|7zeU+3r3g3S**{R*_XzR7)wX_WU#Ubf_#2IGMYxSL-JIsCBZD!eX?sOlHHUD%T-HWricJ+(;SN5u>cBa~( z&+9nFcA0j%TRV#(b7sFznKH%WbGo~xN}}B*-Y*GrU_FqZMYw57+-aD zN-A!xok(453WlB23nTgs!)W?C0)s-V8u0%9^ns8&q~}oll|A>B$$2H;l5!ABJ0t&* z`p&SLvp($1ebRnRs0(Y6z30vzH1Erff9Dm}nBP>4D$S)PL;SJo z#w^U4S%pU)T!$lv_Tb=t#=&#_4o6yuFXk18 zVkb2r@^{?Jc&m%DgOL^PkC;F|#D`F8UL9`5r|sNQ2>D=?%S%k?so%rgvwT07o&W2| ze`Ws-vD6>k>^`1VXV_Iv!*tG`sYinC}vlzmDZP`lFRyf*i zu6Ro4(lJ`3Q%Fuuwif-}v-d|^w~aqX`Mx~SDcEDL?ALZ>W12n^quHN@{n@CG)OY%< zo{Rd}etvh`&REV|S8U?$`1W|;-Safch+E6Pje%!{R9M$HF<{kM(Z( zLk#lGS0B-@u?Vv{FTZrB)*MG@Jb=`b6G*soJ_HU8A|!EBk&iz?_*eh>r|HGIP_VrTtP9 z-SCL^#naCb5g33Z)*!dnP1k4ieiCD|R9k&|Lj(%am^Uuihxy}tSi{{9l?B19rI?5( zHs+tq3)UEeraqS+!`<_8_P(^~v!?v|_(Q)fvQ3@&AdGF|$yzL+c>UJ?R=Kn39NXZ? z9=fh4Hkr=T5#M&c9irs`&zya{Z^T4IIeX+x=+V@Z^`S{J{MQl z5EnSMwIg1;v#(vXv9<4cdT(w0&b0QqIQFyJ>xvcK^@G0mp5C+LwY{&sZ1Q^<1I_tA zoUw>Y{-E9?ocs|g1~L3W|3?gCjDmgqF|tQ5L^GGvoPq+ZWDIiwW0Ix?aQ?mjAl#nH zdI0o&>}Ku1)0u;{)~E-!_Lnkd%Hj{jVYST%BL9cjV;}Qf?IC|`r|;u&^2ZJ7St#z> z4YNYSaLw3k+`u}7iT#Hn(q|09$B?DS9{~YltQzo!J*4Xpf0(>i@_mRsq&b)GL%JH( zjMv{*!ynFK*qY;nj@Ym3iz(lDaa^nHK4-R|<37!2|KX(?ESZ%{wWAFCjCSQg80eh$omzLrK#ss}it@@Q0Wn=x_t04V_VSwh=s!w=i|2AAS zrI>L=IZfxa+xyzqbvACu#jI)Z)PR>_?V8)LYsY372GRQCkKV@5e|I{As8;%858Y$s zqy5YGr{?gI??(3gC-2r%6QbO|p5?|;y>`VzCB`_{qFZrS^nE0dF`V&R;Kbp4yqRDcfS- z+GEI^*{|wfdw+M-wyS68tX=J~uOjLhoJ9KOYXI~YkT*5 z8RYjc29y`q?&EN_ZCJz;{xJRz#bGJ-DmH{VkP)LWhIPMls3Ezot`@5%O+-oG{+P|$ z-;-&hug@vAd>;p#@`u>N@Q0W|3?gkv+xTP8N&eW+bL}F3Nca9wRSm9+i9hA1h{!xM=Dv#&_7YJh4?BKl7LGr!(#-o%8ZRcx*$SWg9ng zf#&7K2aOtvO%Lbc!pX^4zIZ;~e(Oa`BQCvpbNr$BsLwwB1FpVeCaz^IKH1%l>|yvr zw)vwE+J-Ji1{$4j8B3h6N^Du7n;5mv*;Q}kL+f@CgXF) zw>jRM7(}|8uNY7E;xm;N>onI6(>A@oVsQ#`)2R!Jk3Eesk`v<*&seLJBOh%sA9ngpfbFb&BoQmfr-~Gn#{t zZKXy20<*2P-qUB=at&9<%HEcZYrnQ^C3oCmKWF!D=P{3A59Zt$WgVwu&C;5-x0W%Q zJFd00!u7jne-`#N?!d*sCdwyDIM83s)v5VMRqbrY9sLmN8-pfz;HqW}x`P-_oA* zcb9FK??a2>5BWaC9;WuW`cCX|rZpeBzF{9dzom=PPqSH#P1l}lONaj9M66ht!kkUf z`0C?{zZyTtUswdQy*C+5mEEa12n zo5(-$(0yw#wJw!40vX#ye}}V0{(vovN4kc&pGv8bxctHtoIkM|x8HID_Uzn3J;*K` zC4+o^{QcAPAaA^K6mu^w!J96)PW`VqxDVc{!PB()#XHX0VfJl)Bp(;Co_K0}8062e zbB6NordY9A$*1f$pHU5w;_MKsFU|RyTZ=!QWt`gy)`V9ZTRY|sY%4`piZ8mI*QLYk zcJFT?W3b2_K0^j!Y+4fXGg8o>b(~t;FUpOj`1w71_B4kPt=fP5`0=J(zpZVX_qgAO z-Q#`E-skKc17~&&DEF0evx_qfZ-_m_`sTH`L^iY*qhZiIzAOF^dno^Id{hh)nQJz3 z80&p^?SpxR1z1D=81L(YTAufOUq4(E9)%s_Ct_PcCHaGXjZWf^edG`MK9px`7kwX_ z$JaCOZa!)T3`F?==8Dfs$F22sDDq>j9_r_lLt_v$CX^bEV2qURob!H)zmo66Xg`#9 z*VH%{hsYly--qTk&oqA+_K1p#vKaE(Yf@Tm^R>iQG_gQ$y;#G!`WURaDbuR!(AxR# zmR#H2XXXF6XHBN1RakXXdb76qj?IO*@{(j+cHuNjqj88D@#mjCY%zu-dzjaMVa(K9 zuRY7yu54V!c%)S~q%(hS4z@Da*1ny^mM-Mc2Xb)}weOcuKRtU!3?5yVXT_`CeQO?O zOv=OJ`B&hHO^;Zb^yhfJZ@&8Y6y|yVoma4Q{uI{et8)1))z^RdVH!R^)?n34m)4^> zF3@{--Ij^6{4gZNMW5mWQOuQD40D*Z_9w!0dD zm^ve^ZI|~r_hZ4^N8Ud2jsfo&Xpb=rELb94}*Muk9i14l9cmETGJ zFgdS`?%e1;UVFZ}O?ICvo6y;N|L~{t z@#2$Jm|ho&JzGj3+uxpJ%Gog;y-)s+`|cUbT7glxeo2azhsoH-_VvCU#a0~E#Bmka zw|kqV&)BzT8~qad@xyn=PhkSXAM$~G|Lv!^Y{pc?1P7oXGXzzIA*ibe#pIfBOd1!? z8X@7hbb1Wyd}rX3W|W zdy^XUi?R2Ka*v*+{0!fHJ{j-5QA0*3uwu;Y_o;2gob7s|h&hB4kQx_6ABg*WykZdf zN|Iv3Fmp;&QyiP)xy|c?yNk&|jd53PdB)PX+`KdmLkG5gF1|hfj{a89aUScgjuSp6ckj`p{gB_IckkZl*|QfJ#LgeIqZyMlc<>O5Nfd`Qnt7a@+Rb7QE{*<=a72ZK zA(r*|qKEh)rvEV9J!>Y;XU(#lUfnR0I@ZZ#n)^%3v3-0U4wFF+8vlpMePv%;dJUsL zZ@d0O@mJ!H-Q-r^gu;a0o)sIwPef&-xo;lQ*f2vUv{)>1&$V*o zCPat2t&1-HNJ)xER#K3qAF=nHeOobCivN=4%ODoTmB-?rM0rVw3;+ zum7^@Oz+*hm-Ure?~7^AKJ%WdeaE1;KfV3w9Rt7JF`&A5!x&qnb#LaJ?ZF&XS`Qi| z`+3AEi}q<5JXpD8M={q`4k=|_J?%mTq44$5n3iDz4bnA|~lnmT7c_Q)| zLtO1M9F>f5njam5hbpSEeOw)OmsH^}b>P3~JB-fUzE<9=wzG$&U9TRGorUGtU0jVF z^t)V_nvRM=gAsr3IT#=4kLzlxFfk??3FNYj&|ubC3&be;Z2ZVxe$2b;>+?(OmC>E| z?K2RncP=!G~ypHMk+Zf%+gJyrY0dJ zJ_47XACFh5n|7yr5GTC-axHFJGM0Xn3f5M?76B5g_(hPczsUOIn24V zmS07j^BnyiU$jy4VV=9#t*R&xeS80Ub6=f}zn|UC>&m&KKyt$;9S-MG;u;bS=YOJx8Brn_JXzt4P@PO&fnV?eOB}OdQWzBIBN#lmk{zu z5V<4R#vhUV4U6L(+Hn4!U070z<(&UY>ed4jXv>cqFc>#y=3rA5Ymb-LVsB9;juf{O zTX>KgYfm+`AH3$i;u>r!slnXDWMnc1ExhYFsEG)|(%LGNu+Bm3paDn;;{7saY2+Ax z_*(oix`{s=b>~*jUB+H1HcNHUe@*-$_DN0(Y?ZBQY`(Uxm6PcW=CfUVWfC5|D;M8= zHo47lShCZPQUh`M%woLw>><4U#`C!S<|Vjxei5GDTWRS{9NR75%d5|mZOI%9$R2aa zAg=gBwzKM_Uok5lMOpD!G;a?5Adg!)s#G)Zr5B#Uw_l&C&k!RhUvG7B9ui||!?Si@ zGW`T&Q^Iij4Vn1%Gxxd2#3;&dwU(NY*)vLU>y1nC%+m*$llNdQlMfZSr| zj#Jo!evePyt;IjIu*SJ*uYIk4+4@K!!U6~5Jo+rXfAih{&G)2_x-sS|c+^N-OF!S+ zZ@$pvYcp|$hCh0@kUvZgS22U(kJheLqg?eFJ-Hw6XWD06c>B@YkKQrh9Ruw(2E-ql zua~`i9&3|p>Dr|SdNEI~Gyc$LO-?7}eX_HMw(a~8LIw$E{fwy4AVf-kP5=19iIXui zEgfmydSVLo6jSLR*ub1qTUm2s8{@9_7MJ6Y;;&9)2i62RZJ#~&uCrt8?>pb#&Aht% zORBNAq!w$(7GWA|mBjYyfynOXVscUpu5B2P)S&~B=rfesj}ZtA@U{5Ehjl!BS&vZu z53z?BP5otb=O*?_eI&ieuZcgTgD)!yIivg`8&bTmZ)+)YJ;h)4|n&gSh24@o`iL)^KjAB0>)z9WYs48@cq~6@0o#v+db2NGj)%1asSc?^tMdsT2SOKbwLYPY;tl2m$#a=1z?$uW$Sb2UO`9n2Gj8 z)^f*7FTG^>JmgDhO|IXw@p*XL?6vv4W57EGeoJFOd9S*i*Au;a^|$;ThCk&05RXXD zVE27!TU;UrQEZVX{Gs@(s36wqqn163{*LRW&p`grVJI6k3^hZBQ|q0Kt@Tr_*rz?E zwKzZx#yr!ktE59Yo1@n!tg@KIJD*>xYrpQL=e0o17nF<gsAQ zdw6-<>-+MK0q+<%OUHoW4-(Lu^=`D$^H6bG~>h~`}D$W)@WZ`UyGO_{gE8(&${P6^m(w3 zAo;_G+H>)T&oFHM3YN!8)Fpgsz-&yT~E zvsfc=MjYRZ#>A>{*6fJHk_B_Hb@QV*bYK^resUi^{NSxq+Hw4ocMwlsV6s&^qtSj> z9gU>uVC&wciD^zJZ|@6n({aXP-EfU^2A5;gqwCq0Y`ptwZM)g^x}IXwK6tYRN2yO& zKHj}MidY{pjy@dfxmaV+&LE9>ufkbFC5(Ofi+;pt%@6bVugNruyR+X*Teih(Pwpm;f^o8gbvu2rMFv+9HY z-p7IW{=I)wyko#S20C&KoO@0ei#eqG5PxVb?X+TvWJ4>qNOrUq?bG{W5N(fQPOH=S zBO)3>)RTusG0!ZQSlZe#j8zKh(;xH3)#8%Oe3T9zj{2egxY#!kTPi1FM@c>QG5+ZQ zm;Lld>@AhPymRzP(CQ>!CQI_+3g>{U5{(8%3)oNO{c^@$!3!OL7I@uX4K=(n{%vO zQ-Az&vgPBDjV$|m(UplP%ou|UCq`i=nPbk3Slalh*u0?tYM=7rI%}8a^HtmZ(&-sk zH1}dW{^$c%tq#=-Jn{JlO>L15J&U#Zk`hj>DV~xTi_+Y1JhCp|sYb=wHD!Ard$XRJ z`84FGC-U0y)RDBj-<+M>zE7<4ci&9KtIt*9{WJJ zDC58yYo4o54=}&(GpsH63XfH6oc+A*v8`CK#f+Kj*Slpom^$+B>Dhknp44*`=;tw%}7R6tQ zEsSvF6zWJ=S-SP+PeuzJUn6o!&s1I(LF$?49511YjiQ4`na9vCq_SIg1 z-9^-P6xZUQ7Us3uQ`VXMQIFjfjAzL%LoH*a0(y1FFls+i{YGGU!vxeP#35o>f5wpc zGT$&Y_kq;oQv)*mWZqpL<`foth{wcjTEuPAolEx-97I3R8RQQ!j^PjaT@-uu@cnu1 zZVR^6o|K)tmw9Lx&Q8F-CrVmuugV^O@3mSiou^o;txoNxzx?!#6$5qErB&FtJ|C|> zTV?4Ke&LSH&?7aqy1w4(3lCR*vwlZ8eAsMq-t7F@ijTVEv@Z1sB|M;a= zM?+N^lHcJe)MoT-llKqOUvice(_eOU3xC>^LZym zj_~?D+R^_$e9%BEzuF(aKi+KYl~_c1c<;FN28>{hBu{@!P3~Rg-*va>v*Hc??NU7| zPp{$qoY%JVjsfo&@Q#7AV+`2&Lu?^^hlw8&dq~3|orl)q62)hUQ?%_g{>t)yaGw37 z|09MmSiY>CF+M&8*VRu!Zr@?JBr+b82Kr%rKI5#ar{h3TJq{Pu;s_Vz)$MHl*k00r zo09U7H)tqE_3woN=beKh#*keeD8?!I-brGwY` zJc)%eZPRCe_+m2dyCVmM>5hvQS!*kD}Z-tXPz0)ijjG z<6GACP<|^N(-G}bKIJtxW@6-!0bbj*o%loXxZ%uGxNGa9F4;rhBjs1v$eK2Bkzw?k zd-INY?VYp3-tj&s?{o5wfnU!UQ2wj#%th6`JAEHLdRuir1`Zrd+u8>{J|j7g&-xXt z^Wo#;N9GuSZp@q8wQG0QM(@uWe9FIjYWuO^)?q<% z1`?@}59rYigZXoy+$TO7_rlruakGHT)4A9E_!l(mT{fZHwJ2AHu;MrC4-%BHny{e2eUV z*~M=>PyU!&f~ODfYL-6~Q}WRVZ!mUb4s*(;FsD_K#UDGj6k2gtyEhk8_t3iedbL6I z%g2|5BQYWrm(G}mEssBJ=|R5vsxc?8YDQ;BJ7M#Gq^GA?uagpDke$k$yw_(o`;3&M z>J9eIhP!hu<}jSp5>{%^qJFTfK!Rs$S?Up~3Px|1Vt&G*mSJF#m5|2xFzXorl2g-4MXOn4Xi3%WK9VhV?#z zMh7r%iA)hN3ZuCA`BRV2{un--z7W=79Lzc&@&}okgYp$A_R7+o^M0j~aqOqgd@ap~ zuIKOX&zjSfmThZn#Fp579sOCgNp|J3`N`Nq&4p}jPp@h5$8$B*1Gwf7&E3j&I&xsU zRm<;=m6`N`lrm>i4yM*bSoPA|62~NM`_ijY5XqV`8T50^zUTsM+V~*ecyRm5$0_{LsG&%so+3Xt9i=(p%tu^o#Zx)@4%8A%bFebwc>Ek79qs5aF$Z&u z28D+pin(`3^z4a-tW4&yos6-puf8xVALD!V#7fo~-`y|;+ga;;KXXs*r|)BbA(=xy z5G|d=A3MoDcNCYQz|RN%%%KxO-Fe_S=i-X0N}OL(fHA{|U<@@A0o2gzezho%>yX3Xdii$5&wM`+Y({p8qh9rarN4|DFoKtH_yMlJr4HtZiy zOlek6ZEU?WvHqMk?22nrEM4(8isA8)L1YiV$@r_qSGtbBlIdmf{E?ZN zj;e}cl;mfyhF^qL8(l19XArebI+qJ3#bIn#408}=TFllKW@_!dN`IodEh`qK;+X># zR=%v(p3BqYbWPQ9DaZ&w56%~yEq`CnhIS6%-@X-#uR5*PpkWUCTDcTHrXO)iT{ZRp z%3IPt&!Q*if3lL}G54~W{QgAHx8n70oeg8h+eWXg>m38XpE00(llt4-lYjSnc0Uij zoGjXJE&Pn?*}57ZefspV*rU<+(a0Xn@kdvlODqx?$l3=E{*Q3+M+9{Sk)a44OQo7%b(!+E3p{6MrZdRwwYseqLku_{q2- zn_5T4k&o)u#qxgylCPFbos5R;42wTT%kM$%kpDpJ;YWXt`f1RhL6*-*?4j5ztxeu5 zqx~@YbLlY5VrK%!{%gr=ozLCpbuDQ)rTwTIA7i{{^S3|!_!VA$;V>?oT#kiT zB%-Dygnos}Hfy-W2l7u;6*Bga--V?37}`?_WRRJ7>c}3}AY6!y6vz0hR7;DV$6RZ5 zbycY6QjnF1c^4;IIlXjm_Wu2XI+^R2q_r249C%e$+>oasPR^7DBZS0j{_^(*wbN0+B z$Vm-AX5vWZ;_XgtVB54HJvk3nS(r=z~3)eVFCF*noT?ie||2ZH>2QCl$pY0-mN6KxQ(69ywYelW(y z4?#}C5ag!}L0*zx54JuN8`2*EzCG#J?t!5LyJJ9KYB>0N(Yt$hUaPys6NWuxUu$WW zKiEF`N>oSN(f$o%{8cddBRVF6*BXex0sV2;RdZ3uc&<6A8MrEmH5Ed_u$eJWkFn0+ zzRCvdwb+9(SJIzbz7Kb`&f6NB)yOyd%4)E+s)5>%WJLGr3I85lFp9sQ5!A~szhF8_ zX*&k{3@3X~Pkxd;41WwIf2a?7_wH@6hqU|3ziVQzOx|7bhZb>w;SW!^!LeUk`r2GW z+7IzZ5aWS1KG>M|>Lb={+xAEyK6$796uY)LyRWnMYo1>k?g!UqvyMb49(yRysy*?- z(Fz028H+V<_QlkMOhsB^+$r%_X=$m*$VfwJX%Qw)tij~T zb*QZ=M@desrSty!lS!wP}aS<)$Mo3@W(e_euPEyF2c%XnN~iz z>f#`b_8r)!XCwZotthcHS|>hxA9t?036UW|UX6P@#@YRr#;^BYyf(IX476?xbY-oH zUi3Hj?$Oq=~8ikwZj>57_NAlQ_xO9Rq zrd9f&zGwtWGls$6r@u9yZ@9y(#UI+%+`qOJo7J5f#V+)JDE3Hm>W+4C7YSAu?Lrf)PwIUZYy7S zcD(rGp|WwfIGpif-Ok0R-dz#WuMe_E1>oB0Q<2I#gW;oC4?S>96MrZ+P0PT+jJqO# z$Zyo;-0oIhVrkHo`$~C<6@Mikh&aU3p;LoluR-Y8Z>@bTwup{y)R&AI!<<|6N$EP` z53^tFGi`EY6KlNlN)7I&?&0m1$2aZ!HQ1b*-~NjJkIfI~H`M`DZrsNFxW(ABy%5hb zuj@ze)LNhW`qN3!^3Cx{IDV`F`?rJ|I9RuDm(84jGzxQ1jGu6L$cMRlQ`|v?M5jmzG3R8xmCf^rRD*P~Kk{@olY7`#2 zIRFo>48Z#9N8-Vo{qe|cqp*2R0CwCn8vE`agToI6;^@X8Jhw?p@X5vTwb|deetvT> z%wj*Lx?qsy`;bj7#;`BaerUd5{2>k*LM?eu>NymDC0~irHJ@rbhq68`^Is`XRF8A9 zZ07lxN&QD5+2xM$j9VW$3U_DZU~AcU?4|DGAY-i#QTL(zyB2?x)njib#b1d(?k}mt z#Gug_#hkmN`jh|q_Czsl_eGN@B6`?hg!m3eAob_Q|1pfegVKI9#$NTc>S3Kp{!rh` z$06R(bCOO)d9Dn9=)KX@uWWg=pviuHo3-?oQ{ycgwmof7*@$8YX*RTIyCwbv)%Sbt z`D#3Re=aVX8ikvdr&_tGlpoh|5tFE9`N2KKO*K5WK3;%XQxkB@_1EI#4;yQb%T{u< zpUi8$_wlheQ8G53eNok}eW4hv@g)(K2E^0}7lTBM8HJ>{m{V$p>-~(3R8&@$SnMJG z&@zd>kfQu7vREwZf=FMXe721_c2%Eb+0p_O&s~g}ul)&=cfN|eDbulhaSr_;^;ZA4 zr0?5v9CXCFZ0pMtI|KTKL=J$SU%!j~Ln)6$OFJwU&W*7`yj}mui`Rn%}cS zyR7&t^S#kpi&#MQbEG@}=ER41_NhI%e#va+TF7C(=t|7wfbcOx7$4m7 zSgZm4`r^`=)9~HbpIF~pUH8pbpT+e0@#sU{pyR!GU$<`V)7x*}e)Eoj-{u$)Ye=8b zh5n7+J)t>-y-}QC7$OMIa{JlG zgYe8_jmuH4k8afG0`b(Njr^ha8(HF);|ycCTAS-ksUAY@bU%wL3~Put%p&HH-7Wi7 z+wytz>c#pW)S!!3oaz`j#~U9L4*x;@5aTx-_bpz8qLIF|@dL4{vJx|So<|DGSo4p5 z4*EV07S~z6k0$>|C-TQ$^2eR|#i(REed((iHIQ7`^<0ckOu$w3HHaEI5D@|5uSU&> z`bF%adzb#ju-KX84{?SVLo8_gRpJkEiF_kk!o&Tnnij?`eDBp-Trrb2?cVYxd)B?kWG3UYOOX-Q689-QC^83=JYBAR&mrOQ?u~bjQ#zbe9MyA}ESM2-0F; zcjx-nbB2SLVTPH389(&Bf9&769s8Vf@3Z!L)>@L!r)CWXNcLb5bHj-_)Z1hm6BB`) zoQxarhhUJxf-J;_2l9Ibutvqe9!iE>_>~yYR>PpW{_ShUpG_c-}ou#|NA_S1k)belZ(zJNlJF-rSm5s z+@NH9T)ub`a*n+5+Cd!HyOrnI0!$kJC9OIH(s#h z`p!t^s!P71a-I_Ve8h8j*`nFnKCC;$op*ZdXrKS@tXH-B_202y1$Q)~hS^w;It#8Z zc{=GLGsYNw%dGL=zP6Y#${s79am2RymAIiQMo@7<)!VCHm&XbAsKg)j!yfWl>ic-P zR{HHqO)dDMx*==o($^z6MCxwQJBU}7JV$EZ>)eMs>s<~n>A!NefsK(4I;17w>Atfc*D*lk{!M~&bO6FhP2ZA|-lahU; zsmqZbxk3Hg+))3EUbshlAH}<B6@a8W41;Cv&3VtU|Kv*y;^jQ3%PYZ zp7c;XyFHDyMjW5-hlhH$sWbi%9I|OmGKTaELXS>GShc)d$=!H^9zB9VG%<(f<%{Q! zMC4Rcf%oKe$bJ|K=dv@aWDh6hut;DUg*em7tZP28bgPNvtIXg^f$Lvx#- zlaAOhKWgiP6phCh*LWqtBgG|=$b4cpx)FcKC|P{~F&%rLZ?6b)I@t}TX{qVEHumjO z&x+qy&rUwnt<}Gt)&95s_21gMWpipgtTAz1xT5{~?8;y30!N?EN4L^2dQul-#E`x` zb{|s4$cG=q&;bwNq23*dIr0^Mhw-B#uyI9-k^xiQ+JgM1Y+99qxG-BqzgX9OAUTG< z%#4~f^(nmn?wRZ7tgIi%dD{PhuCOF0E$e!9eNFA-{@VZAxzNsq_89ng9s|a@tzd7a zk8nRD++Sdc$EnSjJI)@fr>J3aWDRXlM!*HsK5+uM1*Jf~e2vnyCj%euMX3&9$i zLvE8HJw37&j-(}f$C^>EZbiRZFAr)DsGaa;#-OjO8~ix@nHTP5WePX?NsaH<8$+|R z(T1GDq}&_~;NwPm`(cCN5B6SdVAi10e?`stX3>0H^WELpko{NkTFHEE;+)Dsy-70P zo7iJ*T0Vvag&^F3S&GCT*2InG)Yf-TNkASwiX2)sA^*X-;ry7Jvp0=6#DqHfmehST zX+hmbvzGWz6Xr4A%QMaGjgOBgBgUx1u}%6kfG|(uj4lI6t{a>#U8Si z{Udr5;iyCdqTXl2{KVr&Z`7GfpOf@RESedo@DmMHLrNxH?=JD|^_qc~4(`E<#dGLu zn~x!VL-73W?CWdyHND?~-5KnsO2$g|Q4Q?f7Ja(;)(d|~j>oi#QS4`Li*chKQSir( z?Hh3Xt(S>G&R?%*H1WrkOK)T0oXKd<9;ccW~CrH#DiMjFmg;q%4ZcHv&rLQ5LQrz&Ic}`+u;wDQMUOt zB=sGFZe7BazAeFp_5BWa%j3nP?Xlq@aI`kOV{fJZ<^NtC=Bh>p*eK`xm3K;S>WlpF ze0#;edOfuq^1C4UmUEwp!IIf=ShF~h{8Kuf-<6HGsKJq5xY~HN56+ii%+L^eYPGI2 zR*>wE*zjO%qJKnnYX&du+m0Y=3$>oS|IQlffBF2>es}FLUEgCskG|)2^mvN!HAesT zR+v4evX^S>JoZeHpSWFI@OM2gF3eEry%OF-6L)A{R(r9ezLm$dA}7$C9KM~M4SYR4 z6wJ|vepdd}l?QMHJ2|5b*WeSl?mmCSBgiEliRHT6th{{mBaWHiAE4C!;(goL9=n@~ zIbNKNJ=B}K>ypl_6EOL*Ft!qL(k zw#+-XVIP?paY%DrUEJ5AHSTFi{YPsf)pZN1rxai}k4&{*dQxT$6-x z)Q!XjdtmnTXRvug1@`RPf-`Sd>RC0hhg|;P3Ui#-uRvOiYlF;#V7p_7sb?Y<+E|gq zb>p`1_ht{4^jxves=5&w8IG*1v>Ne;U=hI}*_p}ACiKGe2~oJnx?I+tUtmobn;L_H z1>3IU55XZFcAh}$u*XnZ#7 zz5hY$R`F2;w`7fL2OkgjoA5^v*Ztct6TDY?I_6RP5!6ZtCCty5nVW|m#3i$0 zVsFA98_9z-1{T>&-b476>hVWD))0U6_wrXhqXTt1)*R0CUl~@Ij}#Ak_!u{bmzfS+ zja$LhR9Df5=#k55#dW$C_ccfJW;$re%#UXGwW5!i;12^B8kllUg)5hBDp`Lso_QRd3L~&()JDwavjhZx#`I zBrD%z>-rQ-o)Ce=$jTlpRfn#LK|~uOy;mhAdAGzLDh5eUj-{^M2g~LqDBRWAw~8@* zNF)+^4@TER?_I|rq6g`)>m<@fJcWXyC@i0ssN@4yS4VDH&0d*c2aI_*MB!GddrWQL z`*!b_eJ{M(apt&7y{o>C+`g4~H7lOnp|vTDx$a?Mq60TOV`}(KnJ;g0jWMeNzF1CG->qUt(hpzq4Zr{<3Idu>=DQwr7@j5V_04`0$I;L6dHmF@rmfo+gE00 zLv$C{`46Qxs&TlGTk{|JSesgezAiopXx1DG{%Cd|0+_+om%T9l)USlv8KE6B82V;M zaxjyE{V)Dzy0GBdlPT*OL+U^D*@LCqoV`~ZtvU2`^kHaZ%04YCm~$>Hog889(m4HB z(zhi%htd~EJ&I^jq@Pakh;SlhC0^I-Ikm1+xBHm2CmvV_==;=AHOUhrV(`q9kK+8< zH*csP6by3mRm`6`ks8-X)|ILFm}}djdlhZ*%P&v|v@sdmHl`?b`_ct*)P(z>CpG95 z%Muh$L%mPcn^)Z`epu|?TD3F*vzQ;!wUoYJ=0-@04p(@PwH3>8@cBJ>|H@x|lYN|tkV_#>3(MjEw7n*CO{x?EJ4 zjnsq)w9jvY&8t%t46=E38shSDP`d8$b^IY5NY_K}lLtADtZ`G3*Dev$pN=8lbz_!@ ze6QDEDnM$yC-c;O6%XHIhw^X9m(*o0>hc(wFY$sNF)&EM!k6A|ryQ@c-hPxG3B5Y{ zB0A6x-P?In>m01;7G^&arR2*mp}(=_kj(jcQ)4jwsVGc(EF5Eo1!E97v>qM3QIhM% zJV;0WcH1K+*cMR%*2JddDb01DuiKpd=S^A9HmMxs3Iwm*?f*%2{d|($mk?&JWX8*U z*JZyn)MI2n%6>32uARFQOz6dRnn~lwKypP?yis*4oN7TY+2_rOW}lG*g8eMe zt-Tk94e-Z=F`?v8A{B3}<%{AKoUwXoJXVy)Q@_Ewb7BPjK!eb}kUfBWo}-PS;?rtp zVTz8$`It9*DmJcLg(HXe=&MMSi*x#jw>)KcOpe5-kRmwom7sbNvE zlFG$AIyewPzK%EeU;A4m4(Fn6+@l1(WX zQS=AWN2EDqtzGVW_e`nsIC=beVl6q&MK5#mXdyFR@^N5i7Pb(#Et?yUNsotNX#ckK zDf2?R95-aMS12LEhI%$*dN;MK%xC5LNh_Y`|HS`q`TsJa_hNr$dx*E3>fL-N`>npu zo&Izrob2^$oj=i@hcTCP?aK0-)(EQpmW&+w5UiLBD}2^JaldFk^FOB+)b1%uMh4}V7&w6U;8zJCzLce@`+ z);0(tj+;*|{uj{jIso%?#xg0S~$6??Nf+B(6H>z{V) zQ7~rqc}ZL(4z5^=^9P^BFCU!7w`ULGlUFw4-Dj8K-5rZ@dGk`7UbO(bCXU6JPKC(z z_k?}3dtt)=dK0cSniB_@Q6FMP9AHTf#FqVNcFyh!t`n>vyo6u_(TA%Vap|MF9SyoX zU)6pHW)?qS(V&Y?M|`lB%&*KludZhJh??Zdk4Gwf|L2+ESKVXkdt2|$5%jK_PVdZ{ z`<$ePkXrwp)5kDp+63yHnWdM;nLL!IvoS*b zEs>w$Lj2-MZHTurx|Mn&H_ZvbZ7m?VXQuT0l-`W{xG&{*LvqkOsKM#gtrHe6m;=$H zpE&-C@>$f+bn5ua^o_8=IrcKu#06bpU3-*k^)=0jJWsL{cWp_%jz8o(ZKDoE@=OxK z9UzO!Y_U?(C$xD&me-QfhPr#OnRHfFh z={w)6_?!Z`^odncvic z{kP5k5gOd^Un`*+m_+V|1cq1t0Wdki$@G0==z%q7B#j{i(fv zC?_9%6H^e{S{Ko+T4R1kW)PZLVRCpBR;FkEzvBoKxxW;Kr3=!hzi9M^A z;`fiP;Fk~2;g`?O!;giD~aCz$je7a)=zSzDJU+i9s%iES=*OW0B(~Q)LKekKQTwu-w4T6_GK>3VEVDGT)qg;?cIL8M@&AC@G>FZ*32u(Q)<+z zb(PGO+&6z}&3NwP%k7!@k%OJYA8P-V%IAm<{r(O<{0vSC=ONf5EGz^m)Y=vmv2W^H z-e7&U?Wh;Y%SlC2j6eEx@uN=>H6-ohs6*eX^j&G<4+Voz57Onp1r#mVjLcs5W5~d0 zB~L`H&3A3gKv}Om6wF?OcI@NI95xEwdnRJlqNF?SOVgZB!2nY0j~f|-U}NV+J$!Xd39S|B`s*ZuEo|pQ!jydxZn4`knu->nq5?`mxWq>N#2U zx{0Aab88;Ni8qhj^qW!jH)O?*&FSar!1ZJmfA~1Npe=oMgWbL0 z%Q`#U$rYnJcSV7>FJg?0k!oy;>4ilo(=) zKS~^(VMqQWF**p_wp8HHZ$HKFpMQv-Ke>oszPXGaKR<=<-#v^^j&8+!yO!aTEsOE< z-Zl7m{XAUVJReuKF2wu0*5So@Q!ued2juuM2Zj0=d*TmAes>pZYWmrSrOvZ(ASwpY z?8mwt93syb?_}w_6712MK3;-9gaa8lEU?D4dZ|66rc-jz*@Lxyd2)mF`*$xR{#Z5_ z;%Qs8X3)GYHNWJJ59rmAI`d$xqTiKTt1p-xgY-lPv~1p_)|#b0zgaEF4+VOAV$6u4 zs93cGFS8FzddY>8Iq~LU`bJwRnFcB+pjn^ETDkP>OdTItgCs=xvB#z@9_ZkU)FGqLY41BX=s+~F zi1cTbtlWqA?tRev{t&#(3=#RxZ?pb?WN;L+M?J|r^>@*J%j?J(F&@Po;;~>xyuue~ z&dKdumSawOp~jElKJHM6tO@gw-nXyf!zP@B^hXtCxHD(Yk^W^4s9jH9e-mb>XePZt=y*cideytWfhuY=1*U0HL^!!x! zdQ0cUaZRsw{==PqCQBB~s`a-+en*xqnnnDl#UJ(g{nI{HTjOhwfxGJ%kTt88&6)dP z-V~X!x>!ER?xy~#yBSCPl>y>hZ?9hmTSFy7P(!uUcT{p)#%n$oT6+iy>}%~M0|H;tmp0PQ|ZB*UWnzyHEC8B=v|zJmybM$ zufBW_zkGWYKYe-`zkl~WzWeGtzWbcD^tnSgwq+4^J~Il3Cy&PY#gp;H=7sod+XB41 zVFpgGn2j?P3-S80IavS1C_LW16AHpZ=-+D!2SZ~xm|H1*ZkiZGI1sfLtFAnVic#E| z^C*0Y;13fMQ*s~d2_g0n4=mAt__wvh={G7fBC4wiKBLC|D@_a{y6^3qD)2zZbUZmGLdpHuK%U^y!2#q6OdG{tvn6?{h`_cO zKXxRxZeBxA-eXG6z|q6|;Nxh4X~Y-R`P7PrU><#77tM&P5r3Sejzzc+Rr{f0k4jv{ zY{a$6NRDzu5WRbnlH!RyvhN6cs5nIR z;`n&vb}vTWwB^W~MXse=nxdmWd6f8PU?}{l$M+&v6&>QujP5|{TQct|45E2H2_8B7 zRtcV`rex{7c#I#(eAVuLNQ<{u`n9a-RUtlH_tC4O(sQff|Nle-A+N0r;R*R(P016s zXx0Qa+<~RG4OCPykRXtKC56f8*^RuIUB;BTxV2}ANK56f4whK z^S7ev6g~lR1JSjY3Ecsr`ltn@s5Fe*sHJGsu>(CTO%RF07JT&{o}BQ zii>X7-`9~n^=j^iiZKL-Xbu&d$eO(jd7QbeHC)Jfc)D`1hIVqYgNG~oCFsTLW?+c+ zQ8Ad>uRnr_J%U@d!ibbK^z-q-Ku0$$NzcN{@yi_+xWw9=4?XHP#V#tmpL&+^!?@%5OCpl`@LNcMoV)+Z05$I%k|c4pLCb4ZlhCa79>(8s!5OQ5~>XXL*ml=hTSUf)tvnEF(Bhe8i z?6Hy>r7?a34aiHSCB)$A@niAAfnB&vt;(}IHo(i?LaEg%*V}LO36jjU3I7epx@E~V z&g=7gGH>X+s)|2^7wJMDrvNW!3y`{_9hYrj70lRF<4p7yb|VsbnPC4jK^l6^YfP!9f{~ha;GdsQfV=DBT;ze zK(3<4sL$~sy-kuc^YjyO$mv={?6FMo)5I zL`qx``g9G%?v3f!a@_CC8@aJ+Y z*Y?`aJQ2YjRK4rxvh;-6nCl@S(pJfpTre#bg=rql8||uO1y%PuQT4VV{d&QMc}$J< z8&Ti=qJ4bh)oR+g)z0m|8g z$qU9%@r5S#(7dd9znML~m54ulSpRx5*W1q77Ow7&2=$~Eglqj}q2U--T!cVf9kgX% z)0nJG1%Eu`;EIZ@d@N_}zdj|S*0GK_<<>*+3;7U@A$?kvnIDzgHN+zd*FnBRu*i}) z!5ukRkd=$_vQoUle7djB9mOBtUBRzkzJuStI1PM#7Jq#4Hh%f!O`JZm0p*iMpfDyB z4lSF)l*f-Pbp}q<6NH(WAk)_s4`w7{>F|EoFnTEVJ@X_E&zy>9Cr-eU;X^U3eF@@& zyy3w)66_)ThdP(Hg+JW9i9e`UarJ_;6En}P9iXRc#9D;CSIi!1)lv`1iFUQFPfM-z zHZ!_KD=ivz@#vSVzxAt=6#pi{Ay>|}Q|io5sRyp>diU5zVlZ>^SX?;w)-C(5H0y~2 zd$*x``z(xLZ+*vN4|0)u$~oFtzd22)Srt#L+_Xf@nl=%~*>ApT={y9u+cE>)L+KBa zdReosI{E@VV(C@9i#l)3+ttg$32fVtT5a!@cwlW=Fa1}MNR6TX!`B`u2~j8}W>E3N zoo=M+qJu8G*EtOyo^nhEC6&Md|v(NV~r~ z^V~zRcuo>>3S$wLTMR#6Z{+5rLG&&8#Azwf~?{0U<@mABf?Y2|B?E*FO%o6vGRH~&71c2nvW^%+-T=Udkp;j$3Sax zzK&ck%8NJ0j8XR3JjapRa?yI+{aNKIZfJ<@fG*Tdnwef-kC$3lhOEn19csNSctmPw z3rA+#5r247=i%kZ=eV-hfFs0%I&|tCN`gaB78Z&qzJ366rzW>ALl5#KgPlFFKCc){ zV^eCy9)eHSCZ*LfGRSF=1JNAx)zZu{+?ZOxUN4Tc0#u~uV^MkzW-))HqE9beT)z^( zUpk53K0k|}KYIs%d`aB#%~|~R*(v<|@te5x#tuv$*9VCK&ahyQo(cU~Ot|J~%KFu; zSu>cicCcvvAGq+p)yJ>}f{k^NXlH?J=DioUX~TI4MyfA0$99%*wlY<)hl=&o`K~wr zQ3ZckS=vEI@(&gKq0j7wK&39MsUA>o7cb8JyXiZ{oIF{VpZsJvGwoayE<|#>cWkcI zF>G0vgg0K!<7<{GYrC?(`!RVF;Z8J%ay##v!uoam=z%zU=Jh(`kN4j_qhuO~`qHb| zgqiY<#CvG|-Wuw*Vji?Tx_2l>#mdE)Fz!+2L%0!txGVXHnm)TyV;_1p8v`F`qioeV z)ZCtYtq{An-KaZP`45>-(X`~II5SU?I*p!fSUY+npB}n`8}1Z)Xg*&u3zp!`?i)OxRU)*KZ_R=r7j(%Q^F%R;c zQ(b$n1cQ|3CZaf# z*+&jWjnb#7`CFmA{P)*s+Bw(G`M>QLXx*|I{OIBNP$wH~nR{b)$Nw7s=viu}WY($c z@lprNQ0roKE7(IW%U1A*h*zB4ofZ5M=;loR!w7`|fkA$L;|Ja~$`x@%hZ#C8?@^uoku#RJGQsr1fUCDZC zM%IabMBzpFUr)`4V2{O_xtLc_fQ`cj;lq8~@W+Q|@ZGy_;uqqNKiG5i$2aHk`7!3Ar#`dEOm*nb%)CM)>Mblx=&@^N2s37fNFJg2 zz5js~>t_ev@5#CFG&O?@H6X71{&seiK4Y45eW&=t!rVsTJOqCj=o{2&efSIZitO7# z4r+B}*0|KktC!Jp>H$C2;LZvMqSnspwqkia7R`&s!ny3zSrUg0C=BlJ&-%JOPMM3-2Op{2YWv24nL0D8<9JIt(H;sc7;?4h}|md<4qKcXT`SzJg~uK6@HT4?l*q z7-zIA@<&XUK8PsohOm&pYIER==@Awi5x{kGUr4=L-TPIyU+(7HWPYUAZ|~L&4B)XP z{s$hm)N(a#0@01znHeC^(+a&i`zc(3%w>JPj~ut6^w5^c5Z%ir_UuU> zOLhC?xg_|lWtqqQE20)i1p->Vej zl|Xvs3;xKXC)49W;aHPR9wLSL=NdSprpp!7so!d>Nnj1Ffj=q|GqEZ@U3vXA>A6^& zkq7C&T9uKH1!-AWSk?~DJ~;;O?cat!#aEZw@}IxGfZx8mgx|lqfFD0Sg)c6>jAQ#& zV8`-_*s^3i*3TP*ryqF$9WrC#M;=3$_(GTeqk63>bH*)fEn#MD4ijcF8gWhCumy1m zd$UZL!(mVS;bv|L7Yhrx*;p(1P3BtWQysU1Kcx4{)5BNkzcMwkWUbN~WyS8;y`}oz zAkBJ0)*N3wlyj3#L3)JB=hBafHF=+IK1$xWiaqMHox$9Mf{bWvTDL;cfQZjkO?8Ck z?OQjlV!wI>bpD1+V_9d846&l_B%HiQnBub(;9;xuM@fF+;NJdRpZzNbMAmqv?@D@E zPLb!(oKLwdbGm6wQnkHTYgQy;@PlnpnCYs_uW%ta^lSKS}~)a$}YO7GOD!9nQN$rp2;iBab8PQH)K(bbFf!!31v zKfz9Or^F-5--)@6Z599Lv&_$t^F`%DcG62ZE!F`B^aKm=wm|vJ*lPK!=eA{`Ye@i} z96JoJ9;x)DtLeAn^;ZuPe}pUEebU?3oxNNp2DRs_YwNauUfrhMXWD)CPd)}($a=Lw z3lyiAVeUA4>{#ejCtqFFSL)x0MYb=X?%BaW(Vh#YQ1ORw9O~Mb9xZonX}E^ubw zm8XNVqW=*5;pyc94{O%hI<47v6pFU`>_xJ*K`b>Af5$ z*Y#b9&D6P8IVG9ndi!6o|H_?1#UI8-=F9;$#9OZv+*B7=ts|r+IDfJjdv~T)>(R7@ z>-STijzE5z3r5g`N;nS99E-Z(5XmAhNDs%(Y;*r~fIUSNIE;)EIhtgjnb>X0%{`5L3 zzG$p@Bp%&T7<}=4u~iI zycHiLxFk0_6{+z782d<=qGzvqjQ^9b3x6QTobU=VhjQFC1jee4muQH2lFupqaGi@n z@$};(i39SORUd_IYtt1@Og{Vc2~lvg;o6LT3zX)$(POXRIyTY#41!npQd2avUnCyx z-w_qd=i}sCFIVe@wQbXC=8s15wF;Fv65WfRyO~xCLVe9YxmMGDcJ2QAHys15=(Xue z-;M5tmRS50GX(31Jp^<7oAJkr$@cVYHN0*7VeP_Rts3x$yN)i30)r4>Xn+_CGZcD} zSMS&XS?pCB;mtL&B=$^^kI=*!HC>k8E5RUwJyypiVns~C^|6YV*HA~YE{-~pxOA*0 z@3E5F^5w)G@*d)|H9IjG<5Ci^{jrhw^vHAg{ex4?5!6}4z3PY2nQnmw~vhsMoG3CMhpqS+LeFxXw?OO z$a;UL;t-4-IT&l0v9V{@CdK2nrnO9!1G#wqxY7sJn*32?{s!smv_NK}6Z6-j6>KH* zAilU2>_3z5x0=0DqQjpxDO&LXlev>ROR_(N|G03n-A!}7hq@2Z(P++(c<|1g9L2sa z4-92bn#`m0sinp`DLk3<_8aQ9MnrG`iVANpf3P-;BDsdKu~CTa_8{63Cv<(OviC{F z0k_%;N6~rzdBsCZwC6QFRxn6=YC>|x&qQALb{IY+3iFuJ*tb^%lJD$KnY29k!1Lu`+M$e+Ij$%7w5L}X;8=A0O#rtc;AL-Z|K8A(V_@WT}Leo5w|dVFiQ zf3G)~;ET6jE+AJE!sCAh^L!3r%7jtmr_z~UAFt%f4DRL6OcWh>yKo(9V$>}&WMp5y zdN3ceCnaD|?<9;I(g!OS&&BIU4=Oo5>TkvDsZY@(Ay(-v6Ko})VF0yR!aq0WZ-@4^ zwe_*~7|Hjl z$?@^n`t%rldHfK55$r*o2Yz}FKT+rL*#~dn!*fS)<)VIMdI-%Ge4fh8Ae0 zYk+3-9d2%@2Lo$USTb+Un#0yf`mY)We+d5}!_L+T`g+Dnom*S&_3^vyv0tzU*W{%( z7ObIJFRPcO9$&{=dEAI#v?B%)O~{f3ajY*ylV1IEG;iO?KBR$tg3z-|5f(3;gH0P& zVdwS@IC=bNwQHGbO(9tz5BBH`eey!#YTCm0%9_bIV+)cuc;h^k5C? z8=z#u%e=}u^!BxB3jV0de@Oi!_@ip(;If5r=+Vg=-O9YMl$S*xGJv{sbEDSRHO4x` zT0YcH2~SZ|&3z}gOTC`ST0J5$2^o*izClY~6Q0n#T`-6`G;gnZS#XVbXcaEpip;^o zkkKI@DFa8KUB$s_Gf2eys(8h7D5-b>IWsB{#`8Rdnt8z%wS8atPQsC7P|KbX?}=3l z8%Ntv+xeuuzcN2av>U_vM_}&sr@OPJ%^DkLJ1TjC_0@OmS?q*eiz>%%URLpl z%8OKP8&@-;i9a;oSH(!Tvt2bs@*>zbWK93ZYxqMjNL}!U^l8as9UWcaLN8r+ZpDAs zo!G;ho}X^kW^ktGZaO`m0*nn2O8n6;DG3jTM%2!z*hA`ZwH6m11W%=%q@1f!i6@#c-xqbeu7<8s)b~XK- zg!_OyX{UsN1&`E)6B zVREo|b`tyTVu(f3nFUjT%(wvh45wZ9`IE=Lv^R&kGv~j}zd}8SwOehisyzm@$AEea zv}CrEw-b4f4#Xa_#8L9kwcf!_rPS`TX32Uc2V%bCoEPTQN zvq#%w>Z5j;G|UbY2HRr%KwD+|%pk1EhcVZ7Wv|$Fi zi-Q$h>D%J#Xih)cd*DYus9^RUh0=ewQ&<>En35TJW+s;9 z65!UjXDnE5V>y=d)dol=(Q9br;PH*cr1xX!s4i8 z%x6E=Tw;~+iE&um?|vLxzW_hIdknvRaf1C;#2X*I#v0`)e*Wqt{`iqx$Iln=`%mZa z{g=n_D>Wd$fBP=^k9YCM=kJgrc@tlqIEbr)5n*Q`00|K$(q`T63$EY`qD*Vp^iTD!Kb=oe-ZONd@N zHO7(u?=H-WW8ceD;Yy#9U=-mIUaSdR5p#4d_N3=5>!dZw5H6%cp*y*cn>Dh!)Vs9xa-*&x4W;zqQfusn z+DfgSotcb?*jOYFeL~3;Y$(ieC$A$MNZQyL2nq>BI(sCA`;gCC9}H5EpNY8ew%kvF z*L;Ah_kh*hU;oROg?kV@Etui*>2?Z#Ab!B&-z(n0vQAOo`H|%v#z+h{K@z>R zGWgj1M00e{x5B7CwkRL(pkNvm6Ex(uCJds!M_uv9_#xKhKlHET55W}b5DcPT*4&Cl zT87*&n8lUr?(TNvJD5Z0;b_C&UK<3u*&^8061J`GfxBJ{I5eRLExn>bOby{jt!*ed zfe>bN$Fw#;hKV`a)0=lNeR?ORrD9%w0m=)Cu{e+3ym=*9Sx|!2`R%Zp+VNG)C|^!2 zQbAwciX>tYVvX`pVhoN2p|O}7N!$^ej49+pCMC0nfAlb1eQ`T}z4{h@`RpWq{`5_J z`1W3$JiHDk53R+yS2p45slE8|{a1-KPAK@~k8dk^kDsrez{e+^$I;D8@$7;rSo`!S ztQ|iB`)5qRMdq7-v3nIh-n;-Gt(%3;>292Lp^urN2p;r%%`{ijP$ko-4aIa`WD z`?D2nP#e}z?^pQ`!4Zq*#9;WK0AdgNqcJngNUs$fcz#8PSR*gZ8J*jCpkGg43>)ar zo~A$y?CXd7J9?oo%LTF2q`2CdP#5ZgKKFNFFV<{qT(?reAT?zZ&YeDyx+41quOEbG zaAn?GKjsjuzNYg~zi&<3+0>zTU?#k1TgCVE;BMxBkpDQc@5cE)ush>=FPCs9%gf^w zj3yeARZ9{Sjr*h2^1C@2UGKZn{4Enbyfys`5~#hdOaIaB;1cn!O^S~~IDK{V=WV`0 z3$9`a(VTbMcV5W>5q?6wy&<;>A0j|KJzbJk)9NS%v5?`5hqFBU?FjZ z@HV20DK5%Yauqf4iHcEFY?T)4sd&Iv`Ytu@dVhWE=eyzY%5MQNhIj(3T%3+^<5Dqb za1#1Gl!X2RlQH~JW@AoI!+~AdkbWx7y1us0FTGC(=)s$t?0-{#jO-j{(UnlRnd&SPM)W zVUHyf9F*2odt?hi7g@pQquT;He%tmUa_|b?b&0nJ_bXqh; zD;Zonyz@B0xMfQuo13G9r#Jcrg`sai2>P@kM-mu@;bAeD zCR&cnLafdu9!W36TIP7HiOs>v2=-frCSiVfBBoIr@>o~|aZC#KPZ*2ukG+6DuAXAg z75l2bI)fiSejVRkc?DlzI*d+JzZzj@C%?cEKaXS=c@GFnIAF(8;C*n&=>2{ zg_Ad|mx>N#*}_@y@pNnO{6XDT&5_6NGIx4(t^H%_oNQW~gh74URAP?(xk}#K!_dj0|Kuo9)o){6Ttl>A7*Hc|;;JfWHDtB<~r2@>KnS`DXrl6=#2V@K#iS%(Z zkV)UMjPdi3F>(TO`}aoIUa9o0OH_2-b;Tg^xD&4wGRMUYvaV2-+q}&4eC6WVcw_+c zm{z7K`>3(zY3F(7qOYt}>Fj>hPaVTtw`7KkTD z5#nu(Htq&6HEhP3h?!1Jn<&{%qC;)M8o0inL7pQVOAFRt=F}ehyBQ*qSf((^0uObx z#xv~Il05ah4R@%YXVH_kFfgdpewefFw-+wsS`W~zw$dMT9e*(Y+}G8PbIqPBb3KH4 z+GFg1E?7I`3B0mt36Afoz@@|6aq9VXc=y;Iy!+-pTzUO@oIAQ7>*q{In5z@an{fW< z6(~7<7Tnt1Lk;(R&EWi>CUCu{DZHDugg-Ma3e2p~-=htlqON0pdJ#RXn5C6QUL>^` zOX9LIEjk5H(Bo=$hxRzOU>1HqeGGqmMBMS|+xV57#&6Vm{Qli(<_ex+zTjzkTAjd8 zm#H~_X%pUHFV)K{r(yrxC$MMMaO|8u9J3zkfObJ{Xlummj;8m*=s)+sfcxB#!-mIC zvbQsyxW66tP8o;y*3HM~>*wRsWz+Ef{7E=lJ{K>~nu;Yu2jYRGIE2vi%GuHoc2>r) zv$ueQ3w0mlk5rDy#o6Wh+}Ef7O1KYeE9yv?vtFI&uJkILexncv_EhRUM314?)HQ7d zcZhykymLkKQI^j+@Gyt5ekn)B-BNaoLmTvk$C zRHJbq!XIR?Ru7GdMcSC@=t8`qi7^Bh#P=VGu!8o;o4sDqa%kRvrr{-)CuXB~)d6(aaa{2> zlN?FOx0ftP@kh&^xCrST3-Q!rmD=vQ%%xx)>3zyc^1zGF@4ATtk@NZtdoHI>9F0*! z67dGHkUXa`Fvx+OnaHOGMAi(eJI}PYY3okyF`zvL8u}QJ8pE7*wLNtQPRv3T9;6Ag zsAa8IQ}21Z?<+kL!i6|m=po3Hy;mV-tmty;mH*%=niTfnkubGQ(f_}tqRQTj&6vv$J6;RzTUorVeV*?2rMjs07Z znBKKJK7Qc<{=9k-U!HvpKYVhU*y93z`tBTl{+>R&KT}WsBR#FC_4xCf)A;?f4AKd-(Htaw~` zn&_iA$OlUX^~9NlQ}NlVx%go2L|mFR1E;4?!;wjou=nYwP(FMZ3d4ipWT?ZeIZNUN zdhn7zlA-ptshCf5?mav_pgFwxIplu1O}38I{fp<-$tpQ`k{j?o`-EOTn60eGZ`)Wm z-b3)on&pW~?njq)p73%ug*oeGId5vi9rZb%1cNx)SP_GiVa2kA*tTUIUOKc7;(MiH zkj?8?FoQ6X^+UsCfXI4*3-O<5Io2`fL&XU-;jpT=%iKK1{EpsTe3`Qrqhu{FnH_%} zf4qJqPw^9z=Lv=z$sV*$MV^>FHA=~lA2l?P`7eeFZ&ce{8AyL(Th`O;m#>x2D7`(M zi1acg661vB6rqqg=bHNP&Ic|akv_Oyo}P$o*OlH>FIL;9bvrmj{Cng3jewUI@x$Cr zh$fb@^Z3RZ^465bjPe^as=^h%P~DTk%5@ucOni7b*D>uN}<8(dYB<_iJlh?J=M|2JYk-xR>>p;F{L0n!w9ZA8Fy09EWJrrH;Sbuti-yPp>jl zYR`3*-YZK>*2HzdA1XGHnpwdhtRa1DTB9BNefL$&!o?#yaOvm{e0%X#@(c8sQv7S* zVgJ(!{P_bj#)$!brmp*a`rkg#vonl{;Vf(|>AhtEYfCF`ExEOXCHWXLQ)AY?CgiIO zU`GF1bNY0du@*ID?P^6{#JNdJcrS28Q%?bSc;~CyZ9^`v&sY(A{as^NCr@ihDoZdcD!5{DLT#ifI z*Wvl{h3Jx;28-7E%sJObbK)UGLuxyyWwAEYhl_zeqHL|uJ2DuH?kD&1^jMsjI0@%x z&&8=3bFk~bV^BU|5PC8<(Z|Rb-qzOeb#}Tf{Gs9w*@`}0Ja^q(EEEl?)LWl(NWSsg zuNPqF<`gAQuWB8wd0o|aNG-m8bs}>xqR^|04|zg*2k<-I$vIQob7h_1j_dqAyLLdu z$|cykc`fzmuPSS%(zmgN_#=gR6*>)sKdg-Oxi0HMKTu|v5FcpHLtQV64yJz(KlCW` zQSt{TKOT7R0;>p6tE=BFy_(QExt8IR9FKtKTX@a~B1J^<~v9J>Ld)Ej$<)`O#9 z(GK_oh9EE{n^}Y9Xd51lf;128*;LufcB`6Fdtd$Vl>8>GWOhRt?^$ zX-S3fv+eLX?NAF{o4;RJoWr=fS}XhjFo z82j~|H;b7);>X{Q#?26_%lWK*jJE#N9s}BApuWd|Ae!~-MZip!5re-B(<+#5qoBQqz5=))6B6rv#$c@ z4sImh@g}w0XB3~?U+HK2+xOD@be6c|EWQ@++aEu`_MH{*_H!lnVBZ&ek?b99l=ru% zCPH)(_S9+HG9Sa*&IXot%*;FfJ4Os*crSH3_cVvWJx!p? zx=n}p#Efh9{(&Co^I#|T5s{NQxE=4k^&(DDZ+`s9I%a(wz;{<)!*?GX#joT*{`~Tk zqCfxbBl0xo_v6=d2k`;Dt}bogh>TU>wsLpTo^o?Mrf z`M0#NW?xX8QUkxwJi$}1ORrTrdy5jQ%`~rCXK$k>VfC^EOrI2qem#5<rAN-xYo!@5dbF}lOJqG^&jsXMur#f4=MiKQKk3L|FrB4gj(YP5O4S_A{ z@){E!W=`x2yQ{Gy3XuErt!Thl7(nELe{_QIGAc3}%lw z*|8@{hUl}2N1SXGd?NW4Hr5WrOP1{0GKYRkUFbDuzD6@0w78dE0Zp3IZ&44e`MvIK z#(tru|3T9hvc_(R!nklOq!-pH<^`T+UdO3D%kkEZ#du?TIZo|ef%lGV#W!bOz|U7+ z!|$IEmz+P0V`~=Rz?>;4YTFjp_cnn(YjOkW3o|i*wFPxV%#1fOHieP7ExoOrc^mPB znGM{`Ea76V4`&lyIO(^9U8@$bV-AR&5&f_DSZjMHnAthO_)RDEZ=*mr*Q6e1Q-~F3&5A|AB zCPwH|T8Q~`rs2>Fd+`31GvpG=>8Bc^ctG6AXA*6En7=hShzO-GO2rblyWK<%M0Djz zkq#)$c2_dD#mDs3L%B*%*IaT)@uBv7Oej`R^D+3rHgIE)Vtv1ZtlPRf+9~*;u{aQU zUGc+8jEhDnz2%Bm9$33DQcsC;1o0UqfcUn>`LWxmQ9(|e_=%?#d!%Cei*rU_F zb4VRM75?A+m zk|g@DrYf0sq8*XiQ#_FBqFJc!ef|x%Nx$0s>G8I;y>HXTM-y9gz9FYvlmC#*7tbBX!r7Ck*J-2l*wyyB^}YYSvt{%$ z2vqzp>U-{KAOHVXcWLKdJNN&q$AHvAf;$}87t}q^3X`enSU1D*nwI0=fjtDDY+??h zgRN*k%*cJ%P|G1%c+wLjeO2PGE9>kY$~wE+^CR`KmzS5a?rvdWpcH2bcHLF{pPZSaS2XVQX%s3{!Fn`nrbn0cgqk zxfxovXpNS-*9P~c9{YFnn^NOW9dm#=vtaU4u+9y= z#OC=pwsjVE%pQxQYvy9ttV!@{-3k`>HHC$a9?ZybSa7}G%F={c9u^9AvJy;04Y(D1 zq3rFL8&6L#8(a31*_e}`VE-7i-;L;TY{FhLOKZ+G=h2RHtKtvglw6$ny{~Z_f-O{> zA#<-e9lFzYxQJkW05YHy*7ZN?klKHU;$1!Gj5PEg> zL1Bg~BA9<+VWPvHvKDCi|A0F*e`BQI$dVYOv>+REXHCIdZyaHN#tgLa@}&0U_PH3{ zmd*J+trff=epI)MIW(Uq_)Rk5CC?*2)m70-Up!TUXSb&*-n$*?)B6Ck&P9Lz_t%?F;>yR zrzXWCJSi3FPs~yD%5|w<)yH&s@e1X(m+On_9FC>D!Um=K#45YR^wAMZx z(ShvQl#by80@0x?1o>TZkoiDYr1k2B^xnOY-Lor-y65t~Q1tBR%Z$1ZtY4O_yzcE} zS=6`Qy_+5{9K^yIamZ|!j;x8q9{Vfzsk%SvvlY%HuFp_Rc`_FAy0v}JkGY=~&x%J$ zb}Gbkw<_*Xud6zc+>{{f-=10P>(=(ZRqq#^I%-Ie^7~eo^G*90ZQZLq2DHb(|JO0l zn!dY^mikJDhj>@5C+?`s5Nw~H$x)ARI~5}n5d{7nAiCwfl({L>}s zEw13VU$5c_y|9uJsKa)$fU}DoT-_Wiafb`D_hel2-x5D4smWDswrm}pofM8n_!rT^ z%lf});Dx^t4Sj2JA1zyu6VWvyFJP+ZvgNXFYeQwUrglS*J_J^*Nj<17$qMnu@XjSz z`oyDnrD7p2KD!oI_N~KP>!)MpLtJCsP>#ui`@o9cSEkLFCD_^+76w+-q*y}mm%Oj= zKr-aB*s<@*&d%Zb=aSpxKIzjkq=v=R#8lC^sG4(4{2|{@6KB+PS>|1aytd@FG-dx; zv!>!p)g0z#tq>K&b>#?qq(nK=1G91@bDcgR+#ccN032-e*hAKWJqh%~6%XCJh?|#s zTYR5N^RuyH>3obGF@&Gjy578j`uicCzk%Ks7{R;^$wsWN-dq!NRK2Y9VUa(QJopVO zlBu^T#0Fx$$rB=w5$A+i%nO-Ef8W$N2N>wKsFUVg{oI<{md%>MonB%2#0QOqKh!=f z@%s(%^+wzSgIKR#P-@nMhejiY9stF~xk?5{QbG*EnEjbMYi+&s=w%yUK}1m}1>*>w z@^WVnA^Fa<IJ8 z5dK3vAjIE9^PJLN*4CKXV?cWh+%3m|a2|%OTOcmb6eD}tV&yZHd`Dx|{&&Oc4(VaR z`qhv%tF_Y8B=|#eBm{Q|29d2?mpWH!eOaTI8dRU+)3AHR0(^Cu zy6(>}Q15Yt+{e54@#jnUk^NWS|8R*o%nac`uHg^4EW?f%#L9vgguPILJB&>%l<#F}!TO)vgo&{QjCi{Y zLmg^HTDD>@RTCJ=`ZBSF8}$x3!G0LqvkVoJ#-QS+#TTe(=7BbqoQmzf>eDgIb6Jr3_NAG4;~R=AJ3Q@Nhs zs|U(99H|xiNX^_~*Gc6wijF?DtdP7&Fv@4f;{v_2q(-mlz5dC!OMlvHhw{ce$ZeXQ(1nakK-LooFz;Xlf1oj1uK+^{^EYaYS3#2>8%kotE z80GWJXo!7q?szfvS#7lbS9j4GQ+2=j+S~5#|77j{X`KBd8HI+dh1<9opmUA|W{^j7ks71^-g~;3+9f~19VwJgJ?dg!zV9`uiwDi+^b{~@?R z`rM=!v3zD6!rOW)Ixe-}s=BT8U>!WL6X9*_F>7M9;z1za;ZE_Pe3lpYW|K>G)9TN) z_~W+Lu<-5xNnLfJJ;fvaC^Kvs_P0TFr zYrR*R*hBD#+-{(6La!%1MQ1Mcy;?U*Z7ldhYGJ9nZEekXnOP1Gw8xny z5yywbAXo9tH}A6d>JzM7KARcyt%zHQBkY9-pw?V!@Y}>6@|h~%pPFu7wxo_-uz`v{ zq>oH`$OMDP5S(RY;|xoFH=Aqt%81|5n3|5(%=FMBpI}Lz!kBC4hCDu6vkq>3?|tOP z4C$L{OuR;KC^I{boB5CG@P}Xz!AtVls>2_GJyiUm@=7(~4)u0gQC^Yi{&@rV4r zNIr<<4vIfkU4L%`d+3wL4ED3cK(2ePToT`C*hBEh7V1d^YZRurV(qddavz@P*~tfw zvfnGj&r0e0kk3@t&tKEygafgm<|sKns?qU>U<~QCil^^!WL^mp2aQE&MjrL)k=OZ` zcEl)>H69)kgviovC}nSzW_E~Lzjl89BJ$>}M|fr)H6Eet-^x+=k2dbk2n+O6`nht5 zLDJ*BSTjc|9M$0i*|t3pNT`hIE@F4}W*C4A;PxS8> zO+Tlse-#Fin*F)$*=T=%I&vm1sMPVWe@fjSb=gWTeW$(eC`0B(SHrAAiu2bx{y`Q<}GoSg@m+#1oX{}1{92Dpc{K1-6;W#GdLQ$8N$7UlBz?hu4#JXwx!|hzx zxlVc+9Ar6nUIQ@{bI90;J(QLuCK0~l@n~@p8W}6WVNuYHhlr=QA9A#O#U1)^Pj^q` z>pP1xH0$&kbVa_FgB@yWIe;qxR&ht4ctY>4`-MCQo5n##PKJHP?MD8C`|{lNweVWm zml|IfmpT_s_ci;6niFEevCsvKL41BC@*n;EJtFqVgQou08`G56ICbLP@fL%%jT(@L zc9+19J6`631EHq>#YM@x?WPU z^Q1UGOW_i|4|$U2##+hE&6cwHx5*TGgBa%8XG3q^dH7W+nK@qy3-T22!Tha;nhJQ! zL`rRy#n+?;{wB4hu?l~jI94sEp01Wxp0AhB;N|%1kCVFQ!5QDa|5}S&J+DSuHs7z} zV_V{B<360rXAP*%M_-b<>lY|bix1yuy<%!)QSY$!c4$6sT!h*IA9affjs4Nx`iz&p zmzMjENZs1|WWqzIQS0nmY1#g$%$!pxUwkm3NBlv2`0gt$@UYKS^#Rr{&5^8x=sxiW zamZi4{|xg5Gi1f09C`derL4LoOSNZ@)by)%!2kR{16*3Ws*~MN5pLoS6MvZa!yE%c zVhm8vnV;+_OJ)bk;d{d5%z>fpQLZt=U@j~2-BtX|npYZo=p}g%@(0vRP`9n)?B4K4 za7=_mC&fx&SODr-h0Cs8@B#lX=*|D{|B?Uu|NNKyfB)})xR5EC)B#KvvUwf2N!XG&xn&FeLp_EjmJbs8dS2Y(EduR;9I>xJR z&6L9QVB{c1OIuwO__Pc2`LG3VQJYV%#`>BvnT$AI@*qQTCa{(T97R{ z$zck&v2Gjh+jH=lCk}b*l}4rO|L?O}4aV0G?u4)7oK9(b;Ap?<$uj09Hkx$g4XM9+ zrfgW52i-~Enuej0W7XSvyz_F4)U{X1c=iprC*FtdFh+0Nrk?y%suwJmGI$p?PM*4X8?xqcS>fp}fx4&##egWL!6uWZ2| zq4B84gcv0Xy448I?FR?Sf%|vJ|Ni-J@_+yHZ*b`^BYz_s+`?FijzHcOYX3(;%MlG8 zf|%e!@Q2o*kUwAye@;VPUgnWSgo8%`&k+}!B(dN;GzK9T5)mDP77Gp}N`g^qI0Rfu z2-X9!?vL74zJaJKUUYD9uy7yXKf3hiSCIbWLVs`Q4_cZNEE_TR z$~spX8(ga8;fKmp-c?g2>NA9U;oe*v4;9u(&P_`~E#C3x-~b~g80__q3C+;H=SyiJ z>fORC-TL^%6m_T*kPUB;`t{%?Fn>N1nveQ*J0-uYLe;k-SHjP6UwSDLd+2M(&q_yb znI||AUs-g0s>Pcgxoy06CxJnZ9jTNrKWUerzn`S$-s!=8$Etj3m_9*Tb{h31e)T+=jy$sq@i;g3(X{8jke20}<;EMY zm+f0NNJ~SVWC1Vk*;b~s9o_ZCKfawL_uWw_3udRto2XGnF67M@nk5Uo_?xeumY@Ij zwa{-+=UiDY>5+c&>BBN}LW05{#4|j`QRq!>z%lPyosSyVZ9RU!@tpqqH~R3jp#FG; zELoU_d|xLMdzf?I<`^)?z-1c)WAVT3;XF=i@_m%X{LB^NA!v;&Y<<0YfkjtNzQBk( zxbEj0g!tM=VGmpJM?_)*cm&{&*aV4>jgw&HY-M1%?D`vI@0KkxXL5&lxQvBohqnX= zdPy{NAF9@_Auoz^{Cd9M*8D4-$MnaN{w2|h`-s3&wTKwCEi@E3BRCvB>hMxWO;^9b z0P#i*D=#*G)W<^oEDzuVcjRI@d-#Zhv!~dD|8aHm1pWa30Y4GuJ-Nd#-UAqb_=6mX z#vd97@mz?JbRL$*N#sSiul7x`;1B9QEVYa+SmRu;5Bhw>q955GLGW28eqqhsapUYP z+K(~F!8%)i_e#>A+loKvY3}9jAa!M7&@UG#?~O}^IrR51$BP~-8&_pZR$<4}iHA2Qb=!>Pt+BwxdQJQ=5t@*mco*tLs-O?at*nuT zO?#w%!vm66RVS6Dg-Y|Gu?NqY+7aWqrzXUT9dgUYju|ZpQQk_o^XP$ci-+df{5g7R zzH+)jz5)(m{iQEIY?r&%`E4=fot` ze-Mwn_x6i2b$pV1_0b>S!F%%Zi3XL=b;qhae1Ch7`CmLA=IH(X+llh(3-$6S<^-m+ z#~^>!uFvPHujkHu-<*Rt$ACEo`ZET`VlFbw&so|l{N%vqFy-fAYn*AWlLozWfsFzOTZdNk(gqvIGWL&t!4IW0L!+>pEE1?@x(y!Zm4o%Mp(NC;wo zdYgyC&%mN-;QT&X3^d}H<2N>I48oXR$M%{7(J{W}85pDc`B58wZlhnikB=W3wHxkA zPwxS*J5Ns!;0y2@(0e$7->^qs6S2lvdne!xU=R4aQ={+Y!+b05kI#Cz<61mbE)}ta z&b_k6A3R56iJ1K#cXca5IR0W`594taejx7Y2K%r! z7kQGL(hAAU&XID|3ntg0KhMv$HrJ^-T0D1+NfIK%y7FVjqMlnU_@lYd@auc3H9V(~ zlXd*5DtYI%Ci(vJ4j~Wn@UC*XdJbyxE?6LK(7Ds6o4HlC<{iy?^A~B{xKq|G&r@}y z7{BVcdN?f^r|;fcCOP#j(Aa-t^YwR!OQwUrYC`Shn-Rkehh()#v1<>t@KB zCB^dHr=49Gg#ATcV#Uo_vT;Q&Fvp~G`j5F(j~}R()l2f^=Ibg^D{h9|vuULqIk;P1 zeet-`o&WmtxAHG|6n^;LD{}SZd|?imvGx_cM3~RTysmqYlSNO#?(PlG3dGxq3S|Gv(0+DI`7KW1v>0*@~<@J=x!N{{3~uxPEJ&3&PM9SJ&5|o-%on2% z3w89oN31K%`=PuB={I<`Y5c+0S6$Wj9C}aB%5d7w+I6gLy970EkEj|~mj`<=Cf;{{ zvD8&R9_UWYdF8o0(Qk0t^dFjbrxP-Y~v0*{*&isQjVvbp4 zu)9odja43w#FZL@P#Z#x`tv7hg>|xi_@YzZeyK(7SX&}3Q|hGRx|^hZ?=#5B`m03? zPyItL8VJ^UYQAeP{3&x$GuD#d)m>~ml(&(yVNBjw5d+@o{sD0x#3S^4Y23U=<}J8E ze*5J+#ZQo{c>nE}WX{w!S+}(CY+ub#T+{*7*`^6SH{9q+= z=L+Q31!eHaX_5ukOqEr)-H7qONp^1CEHgWDmB*yDS3NnF6HnBtTr4iT`yS?9eFJ{% z%*k3g{BXHk10NnQS4WfkF!OHAF<_2?OFjlHyoalF*7(bjt>N<0!9TCwL*ov;+_f$U zc~j=DX#wJ7-@RuuKN|o(j&VM7nT+xO#at);D9Ou|OkkhJy2>805BIai zMSR@=-FZB)2K6h%9XwZJnJ93gM*P8k9D{kIKyMeREC|DVd7dQ~>#Qb(_kp-iHRwY= ze5(byN1ZBe-Mpqq%4_l^8$3YmiaSs@_6?Z@9d>u~{Mft7oM&4I{f$# zavyKM*eq%BVajXJR_>>#KAG|APtthDUYRq0p28nmtHC^}ci((LnyU(A*FB|5i~ccm z;CI4 zHA9yVh8vyVs1li8UB!YmC77ocr=U z#`TQR+4QrS^1vsW``|s%IK#O7v+y6p9&uq_ zG9TXJM-H9U2N+^fYkY9AUq7M=ztuooE~|Ii-JSIW$-)WLxbS$7$fxUu*MlZeJ^$E)S1WOdC$*G zwP;CzKd2cAgZ63+yk4xYam0wLR9;p*YUZt2oN*oo;r(TQDSiZaNcF87rSZ=F(z4@mX}bGi_?oPd+^R~MI6hT*5pte>IO;$C z^|z_A^X@V!XlY08*>62!t)B3P^>)@LZrt*a%$|F#{Py#A=V->M*LeQKQE92pP<+Ip z-Q}`$L56(rT5GqQM0Y%e-p2kW9$|hJ`5Wp*xa2mzr}xuKZhz%eqg*{HQC>V=f6n{d zpI$tCcJ_jgY_5$!4Lb6{S6*ymUXyuG%`q@^$G{lOd4%~o%j8-=cnXGr_lOi@+-l~dV(t}dd1?H?`oFAoMZLM!oD+u-e~cMD zPDYHl^5*&&r!&_oEYKYub>Yaf$(3V|S6(*GL&v<#@3{V&WTijpE_Uwg|AE)#@8u-d z&PY)CMAle|bNf#{RwKlVl>roBg^VFPt$)7kIwRh9Ia7#&UChA)E9w&~%?|E#Px6GOtFNgM(%1P*L zh&yzjk^dqFVP4j2XX+J?L5(_VGJW=Ln;bh_1FozDULSeji?XG)B}*oCX3N6)`Lb_E zg?#zJh1GV|@$gVs5-)Myf6mM-slELk=spJKbxtgz@yDz=*T}E``1Tz9K`w;a@y%k;@(t%j;;&l1jDPgE-G!MfWEu1%Iu z%smpn>gUB=ntfr80dovo>@hF`^Bvx9q8E#Uy~}y{gV=*DGQ?B-yrE+mH&*E_`5avAXYFDhpLrA1IfMtgNkw4@ za*|RNCvf~p=3D&{d+HeUQZ9)-=3kv8iP2tSZ)2^i?)r-Pq17cJJ=W~vbuuSw@6KZ6 z$|oW3$xrnOk45}Zkd@Yz$E5MW#a@!fC@d+KvU#^k>9va_D<@m|k*L~O;4`ehpZo}G zb>$W0OUbp1rF_8(DbCC4+Ak|PzU!L0>m$8wH0pkZ1-PNVLKP-E`slg-F2o=@CyOwhZ0!K!6<%CzZI<)oTRSR;INjDISEiatHg`x;q|m z<)J<0$`?f4&o4XWdGKJwp43s@c5|8}#-RQ+^7r)EF_**pzrehI=KUKkW5CU6oHUhq z$~&3$LeXR zk8ND?Jo;+-c*Imne}cZJS3Bz-lM5jZAs@n~b?3Z4yeHIoSo0p-M*K0QBUaWd%~Es3 z74Y5;K+Ss>2fMDiLc`_xB`?5yqhMcGDM3xBc~>XGm#k2Z9e^Jo)&|@#oa5 zx|sb+y!FB}_0Yis_Z+R37f)HR2gkws71@%X5g?BCJ=bo~W64~aF|9cU%rP*SV}Nl> zdA6tAvou&v!CTP89=&6)NAH1_8Z~%`JvhHk{6Wrx90-@(#+pmS35=I@>}-tpt>bq6 zn)?!eBqk!C2#3*c<7vcWI9M=2>V}2dy>-eAFp}%`Dmik(I zTUvjQ^}hPtj7#pr*UTxSE=KW7;GUTO#yl%FViEElToRk`KG@qiE9^o1p*as?4{qn{ zrHj*5jhRp1ZI`DWffvQf9GN>kQA+cG^MFNM9q~ELw-4s?Hkij^t_1OtpNEt35u7_C zQSRNGFHc~en{%6&oAV$(px)yKU=Z?nKY60 zvaoMix$+{M{Om_kGGiWU^cE=ogLow&Jmfs>d2fBj_vn>E{5Q2dR<_=ef1ckY`;z@d zK7`A+Uu{+%>a3x3F=OM)aqR#6JXM}M)*$t*B{JjHzYYj{5VuTz`U9!Iak13bWnwO) zN&f!Rm)+tI*5rNa$U~@ORVD93`$1fAsji>ChO;Lo!0#tt-CzDbY+RkIYRCDwJIW{< ze02I6W9Iv2Y-)}Ha}3xz1{@I&q{n*7hMR)r#2#V~v({BlyoYi7>RXr^0+E;z`8{cQ%8)MCq+#p%GBtsrU zPMq~v;cK>M;TiJ$i8}Z~G^1{8r%fK(mnxPX==U(U?8!&!q<&J9%zW*q0pSnc$NFXK z<(jz_vi7zd{ARQXy*YIKE8~*2u- zFpjtNyN1Gk8hdCAM*c%Q zSb0&_CD)%bZ;E>Inre96!RvhTGasp#SH-Ryc1d1MgOq{apf^baYV;OV)u5K^K7~^{ zQ42R8@7LFqEBsN5`oZyGfdk4BB6**a-y+2-l z|7r3SfkTKt9zR$sbyM1aKmOJ){K0y?)8X4#w`QwMo>?i6?XQwY_g28WydCwgy2l^H zA|Jua{KmN*vgo=j*}tO{IHXSbld}dHe{;I4VPz}E=xIM5^PQKQQFks*Ze5rL?~qK% zPYZ<4heNNvo%(q*mxB{?nf++?qd5jFagvAgIGNJmD^F}^o!#DZj!evPZvQ;EDOBmr zHSQqxu*M(62+WJp+Kj=9|xKsM}v8tCnQR)Cn=D zkLnNaX%BED@QOsv7W1f?bI*JR-E74r#4-9aT#g+xQe5$z2KqRw@2DychR1cH(yUNl z%^V6HCk~Y*^LGvddt5iuf<5|^b49$>*Y9+CyuXm|=_ziu?hoc+&6}Mpl_j~Cw*Kx} zeK|Rh)|Pt7%gdAMCPFq~E}S`g*18b(A^Vrw^iybWz0xROecUep zh5V&UnLA{B76)UUIc3irsh9fBx_y6jSqF(mhtG|zO{~#(f9wPQK~Fnf^U4?x zlmFnnJb4Im5@Fygh!+Mc?$oH@GAQ)I10=2>B1@ziH1wVh@c&EO}S1s9g%I;Oo^Z|IyojKJ}~g z_4)vKgK*Sb@>TQx^zw=bb`wuGd*GnaIFC`P9xQ9Z>c)Cb z+)mu$>*Xj>q3*yMp71I6meTw{=^P)0+L$S_er1;I+Fpb>acF4Dt>b&XX8igHa<1k~ zOOzPY7VA&W74_xJb8|p{upSR{L&*JD|9(gKdCCJ@3sr2~-MLtAqZa?_DM?aYmVa6B zhvGmwz=2ejN=8wcOga8Z*StGxx3=v&A%zoXNlsmhG;e)G)pMn`p#8y9l9`?=t<80c z|0plamDZYA@IR<85#kPv+JAi#@vghGJ-pQeWX|*i*#{rTXP@kz3n8u~-hKXfjlBD6 zll=9o4wXN2G3M)gd-ew7J=UFi^|>Z#XvzbJ@qO2QutkGT>@oG!XVS20i*!z}l81L! zfg5UvpL{d?0CQ#jtnt0_AFPeF?XESletCuZ{dnb6gW^GMUz{b&7G}y3U>MGI3|7Cg z*6?4y?v#D-_vlcbpRQ_t#QJ$MU;hywnSEjQg*gT;&KRH{S!$GrtiLf>o_o;Ld-Mly z9oiBq{_sI_c5+u3#2SAv{?!Te8g{2XzN&ZVMGgm{GbLgNtTWRVjg9?|E( z_m~I9&k}#c8nhRuXuUtN2iMt@<{x=iy6!Hy4xN8R{9(i% zZm#Y!67{QARW`3^NbS=Z*Z(~a`%W6&IIErvI7He!+_X>W{Fbx@14 zgCsvaP)jk-xk%E}C(m zb!>gPUsJox*z^EuD@}pEIWout`sn_}#jM4bmFzEN`N8m}_LT@6%iYCJ@j}M=T7OSx zxp`iSFt5s%>t`*jsqKl-Q50S_{9)07G)Puj3Vi(5b#Wk!d&!4PKK7n;9C}gJa%FxG zW8Lw)j!6c*)7#q`75*rO_s6V>iAqyHbppI@P;0rTx~a?!B#+kHe<}Nvx)5UI26)A6 zhF8p!@KEV#oN+t(5PD{R{BEoK6SZB38yCX!{qn;J(%O(Bokw1`x&AKi(UjvKOZDR0 zWyb?pT#4bEhRsdu@zdGo__h{6TM!y*uwlt&1x4n?amG-Pxz`Twy-e z)ws8tZ_iUcEQ8Un{|j>^UwqUidv+8_dqb4CJN51x)7w}v-@7<5nc1&qzy4XqfD7uN z%xVdcXLp%;^ZsBD{TX5q7iTv$2hX{9tv#nF2=&k8KaBCe&VwQb(3)@7xgv(pdh>I! zK>uQX=3EhbxVhon(1=IKkMMkmLx@)*&eq3@i3XO5`NLO`->=UtF3#XjavAXl`-}V$ zuZw&RbIaJ*#2iK*L~%~+cQn3F%rR=@IJM+Du?RU4V#e4Q|3SkZ-C-EU6wKvjo(J=~ ziB0J1#@hRT{SpnH)AXHY<7;l```nMU`Z+(#V{q=0OY$v0e9<8x0d|JL}0P)_Y~lmCCcl(vM>xV%P5w&xttX9q=d( zrIB*i>ijNz(%o;2t=oS5vO`Yb9&v7C;ce75Giwn3KXJ>^)n3u(KAs-SCT%q^pQa8r@gK;i{aSV+=*l)y7>`Ugjv9FE# z8*XF2Q~S{u{zy&??E2rg^?!UQ?8o`gkKbugbN=KTY}Gz=7mp9tHlD}Mdkdwm6m^e1 zUAyqXKz_^WE5qds_@7hHRLcp>wI4@L(A^vJq_G0E91v4eyFeV08tpIlZ!Lnici%dg z{kuw~z9LZ?>&oHhJzmA~jOQ;$V-4M`^b{$-eyP%!YrLUxh+a|~Qgi#gl9QIyb)Mx# zx#;U?d3Z0h%fJA8P}hsN&(GcEocaeN(Lb%wc075gTGHcuFNlxwaB`F?V7{%W)k=P; zuW@$dP`SJWZ2SxG^M7NEGL{|+&r5ITK#c$Vv3g054_BOq(&HGgpyH&61>gQnroHfu zG;Y~18Ssv|Zf3gt2p`6;KAIr2J5kSeVECpCjiSzWWruFSXI~*n<`7xc%+V|NJslKL2pMdXDz&ERx)G zzw>bFK%P_cvu4a{jsbHF*fIvFiH$?P@X|R!CiXZqaO^=$vg|s4a3JnVi=g!g#377@ z8T)I$4$Xrw_Sc#aVgSzT6NfOyX6)bJcwOTL{dtXNj5>AV5MmH&)!F=feBsv@roNw_ zBk!R_3mGadt$q5>;ub}ZaEIZL(UOCkW zzwHir0eL>ul`sZA2CwGLYjS}@A|w{tnz#^ec#EW{e4)N#WNK$ha^m4DUVWb5-=)SN z%)@F#ovVzZQfWVMT4ufdYZnKiu?Lsap8rZJ7OsS6NqQIlU>;U_d^Bo#rKZ=w-ujs5 z@ifN6d#|Hj@3-VbE{(VMK%TAt{5(yT-kc+O_4UdZavFSDi1}u`{G&{J?hE8*y&+9^ z?v?5(6Q#2SoY3A%p?3&Bw|#S=thhN-;ShZea# za{Sm~;Ex*Io7VI2hd$O}V2_2@q$-UFxm3N~)+Iml&8HJoUL^0$R@BLh#Q(qXIWyPI z*wGvV<`}rxV}SZiPyC;>mid{rb}tZnkSC%iJZlsm*%~ef?+lZ@>%(N{s!-W@GwUoN zo(KOyO*3O#t}_-U=3s4H=0fQjxzvYqUDv207U7(}=0*AwpId*1@jCI0#x(jh`2*%I z@f?_!MGV5+ES@LNf$tNqaQ~jL2;XC~{?3c}n%_tKp>wc^+lVoY7=(S!S^&()(%Y@` zuc$-kKD6aVWhbmff5o zxoQ6JA{jfVaZPfxFXFf|m4EURa?@UZ4%Y|_qObGtL*=sQ`ZTF32ty85nB21|uSeZ9 zuaW1w<8IWAN{g5AEp?Y2e-Q6^f7z9DWyBxUsF%!~-{pPI&k?(@ zMsG=OoGeHEB4fhJ zMt`R&&qv;a?#7M9ztExsdI7ljFYmR=-@pqDhKAu{JyYZw{_));S$SKbOqgCHweuIi zn|?LgDyhGIfplKeA~#%LBzt#M$rm3?IGYzaLp}m-xEbC+#~!IZ$HRlqCG#!m^|$8M zLb-lcz1+8Dy}bM83-Zt3e(2&tPCoM(@JF4}clC5_Uw=G7;Tt{&%*pI&zwWm4JpS?B zM0x$i26+zmi{oR%svO0UUF=xHJiZyvnq$Bm1I95xEoerJr`)$P)Z{*T!5^#z_UtYT z#$aEqTNo_2T@xe=rUc40Z2>Z+-cK5fy(K@zRZ?S}B`(YfwNV{VchwpA!%3W+T#)NT z%?0(}zR-cgs~gSB3mRz;_@txpHQ)2`AxFY`xu_i*NY6m()T1!ZAB}jM7y_P!(1AzA zLpL6W`dM)n{djC_w8TNP!4?bsMs$Lu#U$c0@!(O=qGO_PEarNJNlbL4M8{fiMI>H_ z1_nvEpT7jSBUX2G7B71z@x?O8&0V7W10^9WTw=m7zl>u?M#V@3&LJ{63A*)oU=MI4 z@rl462^J0eSsi-}YGx7d3j+3=DKZQ2~`HRe4xO?7{VkN8gtG#x~`VZu~qo zB-Q1G$R|rcU9?;w55@aV3_^eNumEV%M~#%66nHzKpFVwWys8gNPtA-(zYFpXp?=*J zH36bgmyP=6bt|&vC~B~E*U#KWtjETBy)OYba%}$c!=xemyfIe)``44?xu+Xt*Nz&w z`_3x42W{{Db#nTdCZ$u?-W+`9$?F{2T`ntc&QiV|d=8Dj1w5Y8YavJL$wRer`{Gi$ zY3@Y$^sJY+UVmPG`{g@1_3ROaKi+z=`JB%hk3)}=J==<96YlT#pLO)OpYbz#{oj9| zBJaUB^7PqzL5#}U7Cx>{gE~)Oj4{l0Gv+kMfH?-N#{l{GARkA$y3JosoAs{F@mYM~ zA>>Ez2$%a;g~;mp!E*hiK$+ecAmhvYfic`AA`sZZ(_XyY9N^Vtk7kFu>0^;gZSi+t zjsx?oIoC)%?3giQ#KFNqG-F}L$b7BWnIEKcg|udYx@p#KqK95&1m^ss;w2h! zePldd#{m;?8I63Ys4$6*jF33Q;%w2e5x@rEE@FWTsJj5UMT!A-& z{3OE9SHiqKB@*#>D6mo_@{uA&*-6-lv1p?u^s12(iPtgE)JFk7MFFQo0E>i0MM`iC zFi}hbFh&9}Mlx_n5?;sQ{D_g_C5rfi*aWW!+KjkEuWS544LZ3R`U|q(H2%`r~Bz1of5}*J_MK?a9G?Wyp2ORPogV z(1LWw0dc=&i!!7j3-ykm;~pybgB(avevTAPxke^E_1<|oSRIeNBw6|SUEYI63__pu zs?uC(t51--H{~ll!0V(YedfeC3HNtLewq)o29@BC>eL)MH4Ce5$*FW~dhHs3pH z*;y~z3pKJ5qrK#ssR?o)_#}Q`PveFdg!hTd*IuYsHJDh7X(&E(e1@n8Va!hrI2+fw zjpL8+^Srra-EDf2?%P(XxQ?E#ho9pyK6|enI*uA}870US?2t{XZiD~d&9Z1-X|MbT zzw6Y|T6MqPeWhodV*UM`lb~n)Nnmc`ZaxqDca=zOY1jpEUxV=+o5wKYQF9FZxyJxK zs`64i<-tv1=fvJUX{xW}?aZY*wJ$>U!#{A%^}%xOgaB!;^p}!!FXTEqqBfzOxY)Ce z8&F;Sk-&U*t;0sfK@5Gcu^A(D)kJTWLhVtu?N+S3F0!A+u3V>a5&RkaxS9mnCC5^-(m_70Ne z;3S2Pu2SaWAytUiYrXxY+RIOhk)M=4&R(KNj*_sk<0KNfWih}l@u6Xo04^jxDozr? zeI&%e-vJyAISGYBV!_iG>tzi9hiJ^9ml}I8|4QpW*hj=4I@e0$JB{&(Ls;)>%xL>_ z`k(jVQRKo~|7Tw*uQ?a{cjTad`BA$t2Zphyj@5gL6E9@@7HGgLi$cW5gZ0GvS6|nb z|08PEN|Ez(;_+IQYtQ?`c#QSLzWSv7JWcddM=E9O9r=pmIC8M!yqK6Az`R*0Qj(u} zS!-Vz@q=D(YOI#5>@2BWv;90Ty!QR4B{eZ#TAJXQZl#qchH8UfdU;_6YBwh!#w=CW z&6x9{Jtgp(!~8{nw~9TVgO2~JPuhg>|0i#cmwDi>=zVR=y|CVgd`N(|3-sxsvh=2O zRey{aqo;Ai_lQ%T2RA|-^vm~?a4*m042H||$1(W9Ypt?ic8a`mvQhDmwwyaL!RNps zPdro&KBGjgpIrp6kRti!lg?g$i{1u5vg(#>IrDT~ulwn9U=6YlfIW_*zx8v^IfJ{_ z=V30*)P7ixW%Ko)J2p1&|HZxk%-;?7cSQbBfQq}XWNcx5ZNwU94n)ZD-4XKmws6_H zEJPMe^_K}%zEYm;CDFl7LazZQyK$(0Kc-ucv%wgjV@BJly05JLsx=~vgV~I)ExAF+ z*8(@f*qSl6KQM-Wpf_sgdPX>nogL(e~a2bVYOkd z^C$QPNr{uQq>dURu~&_d*fBV+ufN0x1WPh>rIkGzKA-V;{0n<3aqv#@Bq$!jX8$@uM~BzkI09#p+mMAWP1@vL?^x zAGXPBXDs><&VyR!qicJN6|G}P%N({v>v7A1H0TEcg*94j^>gp<^Fux{JlIt>BWL|* z;3?e~j9VFFeGgqa&&{Gauq;^z_Q;_MrBS!Oj;Eko?`%ns%CdqXhd(BQkEtlmlbp&L zY1{K`R~{BM>8(4DBF{4l-XBfp;Sb`GNfX_A9NmHI6oaZL~uwalBnjL+((?z6BgmUA}_~0LFUr^ zjGVgvfL~xtukY_rUlRY)r+m@eG*vtILeHIj{{!-}-g~uG@gmf*_jb+1imR7o$=)kb&-gGub8+K3vwzM09S&o_ ze%xp&&GeMrYw2_T=kOY&hU3KUa5;QWm~2~a!5qycK2nhCA%0%K8^~8@-pFYDhhB<% zI1+e(`UC0^v=)ImLAn`n31el($(C3dv9v2aJRDIwz(IWBeGoWqtb~k39W%@ir;Z*Y z*`voviJhZVf@i6+ca}sAj>DT78N68#l5Zk!~cj#e6UD=E;5 zBnO8`QfRm&M@37@0P%;$8`ewW57xfY_=6gHYCnuk=V5h+KiHR=A1N)4=+eWkTAtDC ze|m3m!EkwxdFa$md=1Xvjh7l#?h<|DbY6^goNj#0*o8HZ=rKO6BNq4f;%Gg3dIp{0 zQ#5;WJaoV3*C=KG|M*p>y!CREnpfu>?;m*Ne0=r9BNb9n7$bExWkVwO%9_h)8{Z&# zS?N+Tdx1M(y(a{YF)($F^ctP^lNHC8tbdz*O&~BCspO6X$-O$8vT{1 zwLt!deAu_2O;F>XdgjL;s+5|N&;ivBpstYGkQ~$?xON6=(W1r@``U6p&c6>FUpzPB zlvmF*oYjU*9u~E-IOd3%So3Pj+C0U}U2GnQ`EqM-%U1WQr{5gbJN^m&=I_34(MPd= z^>a*J(E63xl6rylmwS39&FyB~YmNbP4A?pb0=*sO25=uwqjr-uKX9eJCf9LnXSnR! z5GpIL3sO8sZlZ?-c-bj`U*@6N+HZro-^dZ86#gL2VAEKH_=D?49Kv~fwk`~U{3mZW zXXwQ3qzL-*$gyK3$HiG1k$=_T?jao>J~GwISEhUT$qeu&Gq9ZL?kAJ&-DUDPSDEV> zB=bB1WhwB&I^d0UArZ1BAVk&%L0ccF8@6Me+g1Z_tOPb$78)V9hDFNFz$G_?gv(sC zM%3*pM{ZXEIF}q3@Gj&>a1Loc{*nZ4BprB#eugS13z&iVQmT#?bn@J8tgXfEtPxDU zgZWiD$4YV+{76#(7-VToe0rd{cB6=2*G(%Euo% zW>Nm^&`;2d?4!3^D}b61>YJI{!?>%bx%b1U)s>YLDJ_kczxJ-i4aQ}c79CoT+Lianv@>6; zR(0zp$xcn|6EjWh9IrGYl|@PLgilvI5c`5P%GNB)QvNB_=2I8IId{(6)A#beI|~t; z`V7b~lJ|NX?p1iOyOb9M%iR zC3WD}PDw;wV2#bWR|C0@Z$6nI>y~EAkpq?I^$YJIYv7R!eDPGB8vB-Kz=HdT0a=&1 ztv*V8+)Um1VEiVT$1r1Wa}3xv2B;UzjCWHtudZb7gBtRupdsIRdx*^K^p}DZPl*X~ z6Ax!Qn|*&T{+JqpoE2!+ksmd7jJ?7g%)Qc0$H|%tVa)7`=80Nb{>ZlqcXN@Bq5{c< zrlSh6|8&&LnhD%77kJ|ap8#3t9jMxkUV(CxSCGti@{(C29OT+DuCl}(yoZaItOXyk z9ywhb!HI12N9|xNH$d-hS;uzN;o1OfvJS^47Fh*eV`XTxtbh(>S!Ar-fPAZKQ9o-s z{5RTs{iG5#d<&gjBnSQ{X-;m)1@n-Yh)Bg%5NogzN5p^|A-;%3i#uDtS8c~@&1+Cs zt{e5`#>N`OtXHhD2kRGG;}7y5nloabQhQEp$89?IihX?8p#8XJR-Ez^A4q&K+&-&f z7I>2VjvArN&0Ya z@Or2b{_5j)c?mHXwdwTaJ~!5d{&shXq{c)bkEyZGSl);WF6BCTjPjBK$*XCQmK~4F zq$l5z(m6LtQEq0B+=ub}_<4G}R~E*jzBF=np0N0J&?lX7sgCtISI%+EoE`e#-7q^z zaTo*r4WurFwa}tNJ*1%`T-Gknl1EV|nd8cMKaA^^c)3RD6_}Ux-RBdOW}EkQs6AWk zuaDmvFO!;L9e&ajM$s&tWkZ#HK-GU`$0X` zK<}^ldE4SHv!Bd$`F$W*+0sXlBu=t%F z0Zv56$eIJu+z9y)tqXB?a29_Ddx>y#kZFYlQtKNijgBsI9rPIspclW{%|~wb^p!>6 zJlGa<>EbQ7IQz&V2QOJL+F5R~$7^sQ%N@OCwTHi~_tBUmTs9DcC@c~zoBadOf-E>B zFhp+0`l`TiSp_Zps<0?o8j4!P;i0lPA{0ss4{{&Oy&`U7KeBJR z)ERYcgsvMms4_C;&oAafq zDnf$1+>oa@__cK}#kuP}!(-hc8)g?#X4 za~Gate%{+Jp^g@`dN7~*w5*g$UR)QGzWEjtJLonF%Ro)e@kCM=$)uD zx9&&2CiYyhBtw#7ya)BZ_IA(B_sqE490TSU;25B`AqM)*jW-1g`GG4X*NT{fTn@be z?}z^%Jvm~)`+Gwl!TGo0H2$dzp+1_ivd$OM8WF{VAbxfk>mUJkb`mmbl(eU$$OPm; zjRz*V!P8%ELCk#{u*PC{Z&~8%D@%YyZbe(->?KQ`z2!D1;0}8?SqdDoXsnCeV&|c@ zuks+zLF^GJ>!A%?S!U&%bw3Z8^|xOvc`c-z@S)9MWW6Yx)-)P3XLczG*ap|A+BOL#av%tL@VkV6F? zh0OHARdHz_vP4|e`@#G^_ zvg+0hg`*yaCYrI>l7;D#V?!R(<;Ek-!)j`%mb{`u$*OIVjPx{V#%o*8i=Ssr-?GAN zsVR<@2k$RFCnt@$cEp-SKMra^7~iJF_~Q3yaC20NL(=2@WZvvVSMH6tJ`nyKb>I+Y#mC9` zaSpP`7kJmZfdNcIIoXM_UsZrg)KMAyIN$M4Zg?50*Oc zA2F!A<%*hXPEHQu?3W+5%Y*loN@rs<8n?BuwLzo9xg<4Kks3qMdKdYL(mp3Qt*B>SeJ><_kV;dH>WvuqK&s#4v z$x3+KKX#y8-bDSfXP>N8_{Bpg=I6}5Gsi&x$3TFm zqb$2N_=@oxJOd8r;9X&|aB84rC%B8J^YG(4tjF_MXvzD+AI`uZ?ue89Mvj$wcx+so zk|ZtQO%_9Yy~Np1R(XWUQjdT>+cM8U;1fR!PXa8$*Q@-X0||+djiIq>xfwWQb8r+| zjB0#OuXA}v(7A0Bwyh0{k~PqWEJi+9J1|lvnje1mot+)U0XV|N8GhqV@FZ9G!$WZ* z#2iL!p!23QmLP}0#_f6=_cu1Zo%^s6yOHx?e{x+PlX-01zHoj@7sj}4QM$q;+?Q?6 z%*3wu`icjxr1yXPqEjB;RW5U&r;Q3hpQD~C>vda?)64zZ8S(Fo3GvEn+SdMOUeRao zw#l~5h0<0RE%|AoQUPrRWAnb^_o47U^Tfut)Jb#G`Mw{voFA`~T9@3kB$?C_t7@?7 z{3qt6z42nhIUET21=fX~H7Q;kQIA~T^Ta4`sVfPW$Y8etX$Yw0As50re)VOjv4>jD z)a3A7IA^cpXX_<(48$SSSAX<&tEw?;>lhg9{m6eDKT@MOnZZ7GPscm`RGr*7Cq?eR zx1d)Y4f~DtA{Nb0MNM=MGv~_09$n9{ewNK;|Kn-1?`-coN4qhq=I#S)LWTKC!=3+N zuGPAQ!BU&&3ojEF)LI$b9D&O%M zJ&+IO8LqGd@x)SS&zG@b-MX#x36T}v(4hmX5Qp62;v>tUQ{O<$5gsphqTLnNd)pG4 zC|g3~yBhc36dot*BID#1=+!&Hf8>Cx3BX*bi;I&u0%y2F_wES{Lj2+30ZakSx(m1s z@)E=b4!A~*1IS+xE9m?wt%1=?jZ2J6VhxQwG;hRXvvE7O#Uh6K>FbFKW4!S~qXY+e zsqf}@u|-FEs~WXE#Q;~*cE*{EqmJyalxwF#n+nYo_2ol3cahrJq!=%G=z%huaU$pT zEgmS7kk;mHhH5L zk2gp$cnW9eZd`yzCpJgR{+*>VzAjQ6@V_z`zm+bIV?`9Ka7XUT+>QWwcGvLMozutT;GL+sG$Bw@quf;u z-7Be%M_>4Zakw))J>2aa!~=Tua@3xhn~^G=sDI0Nf2ntftnrQ%VhdXu`HtItLlrjB zoC#lV3X791QAu)7Wbf_Xh$JyK?te#QqHKyulBL1nG8tNxeAM;|8a*00RLoN zl~z;7ANjfPJ2?BE@$(^Cr8ObW1cY?ph$YG+HVm|3@3o?}dg01(5 z7=*DRJ>y<|u2F8fHUs%g3Cb&jzJ0dv2*Z6JVi5Wh7G=evE^fL!`BuhLk7n&8W_<;la9 zJ>n4JCbko(Z^l~7FPyAHURJxReWuU#b%P!R+lf7N4i&W=dYyQL*R6RCE;Xhg zUNCYcdY%17e4_dbya)HU9K%JXPehGf%;|prS*I+Rmx}MPywCpD-@)}O5r1&LmYCz4 zPdb!;z%^46kdG6fYOM|=pZ`+*mKnc?xjQY@_&qz(*su9#&Lw~LUOV*lc~V)FAazy6 z(g~gRK=_5>f=!sqRa;ps)y46$c6pAfbH-TyB(&&X|E2w${v-zZ@QqfP(gx3-U~jo= zO`h`ke)r`T_@zgqzV6^~Ao|{N9P*fP;hr)9`lAi-o9Wv}owbBn_X*x1r|Xsf1${7h zk9F*RB`p8?#Y9%t<$Bf4#k1U50Wdx255#3ajI32E?DkCG|l9N~)yuMWf%o}TXK z;15saUlEhIxpQgpm=XE+Hl%zF_~bU)b1R#2>^Y8cPs&{E^qi8d!Fc z5alJMsGpRK8a&SMDB-a*=R%Cab|v8t#*dsg{qEBadF^zQ+;<1O%O}KP-ro;?GUJ4P z)t6(e5A-|9(?o^3tJ*{V{`=H^#hJuo-~OdT?!UW4IvSHvr#4qwk&iXhYw`{h=MZB} z0M@E3&4U+RqN>Zwd2`0GAHUOj9*01_Xz#WXDNGAibqScS_YdS9QA-ma;Rzq3!T&!d zui^&3rex@*JAiYDLmoL$)~nW<=dW_IpbdHTOg(T?hpG{ErQndiywj#~uUJ39qLZls z4^k<+cNBrkN`u#9h(rXr%Q*1O1AV^C&kz2XHv81<(?8o7aDz|w)op&t2Yfi{K928( z-^6@ik4zu&_i%(Jb}Z&=$B2guw2Q8m=H@h3Z70^UM|~E1_%aX2xQh5g=MGus>sgb@ zf=7r$MqD)pcmy@FMvf8}@E=i*CFK-xNRDb$z~ zf9#0QP|N$`(#6@tJKY1# z8hA?_GC0=YtHTxTB--}w87ng`R&)E%esF%vW9&Ey9(|R}&Pdn0O zYKw~HfB)-b;hgzUj8!xSY?y#h9C#YJE}g(2S8_fUudN03w94{R zW%lG`rCBC_@XcQ)oQJ!qv%Y>-im?6?F&krf)=S&GDp!J`9Uts_YkfS%)h^CsB^9|v z6I)S}4>;t|gQW_GSmO`ACN?1s(M$3=-@v1fTp-VXAY?HZ*yK=H)GzBs|)Hl**l1jqZ4XiT_sb~(&dJvWVy~a zNLELnZdFu@(vMR^KA?8C2Ja>;sYTxw5B!mudrsS(nk9Quve9zT@E-8Vj$~kv^n6(# zmn^eT>uO4Df&`_6fvtY0-w?BEMx2TWoIA9n}%Cu+`uOPv#?m*hN%3)mk4 z@HHeRQ@Lp9D{g1gxQ*C@yau;vOu>DLKj`nl&w6|Lt7CDU$K;aVtB*AnIc|Pl&WNkr zBq72}&GFv4AYFFeRU}6-PyQ10BOkrlDnFt=X@7Hn1{%X~4x0W0Uwt$|-UP>S?9pnR zU$HE>CRwtQ{UpQ}Uhii;I7f^ae!pF|Jfn=ayxrk_gBqhhePyXL-kSNk5RK3p3=U6AfM4 zIR>ev%1sFXr+8^{emIt?Q;!YvlumetZn&K|1bhhU_V$EBGzNL{NIAUTTjaaXCaC9j zsN)ch$6wL!Uwu454nJHbwZ-9*pB@OV!%G6ZUBq$RSQB&LH^7$P3UeQ`pUg3EX~zJ0 z@wQ4|Iec#z>hAW=e-LxL03Y!uwuj4>TSMfoB_ZguEn35ExVC+b`|d-wob_=uYW>h3z@H9XN>p#L!H&xr-BbFYXCm}jN? zBrG&aVFk^5Xxw025|0qK=-e#g3!QJJah)$bQ#Ae{)^Tz5lyUG^84KOY7~muQdu0c| zG;cR2cw0KFxIR0@Po}oVVm>kp+JRy@{9uJV3m*X1RQl+R@z8fqkbitTN&flMRK#)9 zR6hOx`o)s7qH|ZsqgXfn9`|MAXPJBd^LLZgF^PHj9nU;gBM+nYEb9{8hMM0V;Zlzu^ZPDsJZkp$pR2!}9mc2}C2A;o^Zg(;IknH?BR;1sK(bI* zadvBf9N9X&@rP0G@&fz{c|G(EnONfoUuSq?BVTqXJrl$qoU>>A&AcGu4UIqaG9)Ad z@A*Ot1MLE8@V0peAfX|Vs*iNe6|sg9dvKlG_&(Q(JJ_eh8h+r3bhE}E z&fu2Dfcsz@iyC7iM|GdqPVDLe?#9d25!d1ZHN`vtfIEoXfcl-R)b!r~@<&zDf+Y8Uu%c-Yo6_4@A-f}r`f2llhPqA#>RDc>y zIkFhXoQc|9W%+>;8{wh+qrF`4{opv5S2dKz@ufT$-irV)7ukS5B3A2f+-Lk8W5B{r0nVrCVVx9Iu1dlMn5`3$cee-~Xrm zt-F-JtLAt8xv;{;xZl2>snkkCj8 zhNe5%8~ItlAGyFGw^!E4)!6?|@E`X;|J@yq*kS{=Ain6W-4mOt-Y5657Z~F}cAgx_ z%9DpO^X1{p0yzLovIpG9p4>9IJ3UXX^$bw_2l0omrE800gEKiC(<5E^%Isq?3dOL7{-9PCT(ulXc?p3NG6I61q^ zsL}A=L$ilg#ST0ZH6yk@n<_^gH33}VP2uWbX~YNqUQX~eaFxVZPsvF3mYfV<)O-zw z&q25}SB1lOEli4Xf%{W^Bq`2Qc_0M&I)ig@6gS7S$HFm*mpMjkJ)bLWKgM31`!zP= z59)67(}KV~wVtP2FviLkx=uX}{jFzqBuhzN#<0L3#1_=8P(R-jUgG=ZMcGoA880Qd zsj3z)z0v8#SW%QI(>s$;YpN8Qnsap$FAicq}Z{r48ivB#^rbRgFGS@bcampXCCn=d!Yr|*x4kKxoys_{~|<1F9t`3K|W zEu6=hleG#TQA7XmzEbczG2lJy|FqBjFJ~JG*Q%7>!H9=BW;ETL|XbzA&d#Q4kZ5_jmEg5%{ z`_TBKi}wKbVBS$M@JDDww1oHtiVu9x6Hrrjb#1*|jre*q@duhUhPVf~g3Wrn@%1)v zCw(>UPYgnh$8O|cJ&fG1gSmxrD5pps$tjkDIVG|$vq<*lSIE5?g>s#DkjzcXks#nC z9}iFQgD0Uc{6%~`z<~gNxS;lx6Ftzo!5_vPEaC`qAjBZ-7xoFcA-*PF)0o4^fv_Jn z-(ksH3ssndeHb1Vty*{ZW5h_*)q-!kqZ9l}pphSOk@P~$8)BU{K6BJ*{h4uvEzbvk z&%D7m1z^s=-@{e>@H-WNWw^h)B*L#gA>0>w`%L-IAaNi%wr1WD^)=T`PnCSsdZ2%J zPjS7i{KLiCkLT6gSS|S($&#C%1pP{BxB3-w9hJrDvS?nW+_5SjJ}U9>fk~43nsRtC zR!T`uJnAo`$@{OLn`=dWfVn}sZ}gIL_RI(Lb9cV%F*3&qpD902Cn?PdmKmrQwe8M= zF24+G45GE_x}NQslQr`8tBttM8RuQ6zTUxH{^yseDi`cU)C?vLVtyEL5p&26?kiL0 z@8#xj+56R&XVl!Mf3cd`Z)U$;X=8vo>xwKNd1Ol%bmZORkK?;BPc$`9q5|EN9>Ntl zC1ucRKYT~udXeFRL8xI_er=GHrlWqZCvs~L_YKv1J(4~dsKvyl=j|2eLEhsm{s@hT zlCY>~2|~SHKlp$|V19mGbE_owh-HvE8Z>GYobk|8Xd{NFL2Akwe)< zaxl9@9?mP5LuK`{102XaALP1)$4VmoJ)B)6I3fmdf1HE`Mu3k95NBvYoX|WxE%kPJ z-NYTb4~QYy$ayd?jdibxF^C(q21H{IT{}zT4vpV*4x8@3i0~L;BL*QS!ejF@{5)~T zRacExO9${DPVh(^3w$?J$IF#|UY^blm>2Pp)|yDUX>KYs8ToPuwS-R|MP1dGn&tEN z+EiV#?>_C2PvBQSr6o>zD|Qzn4-ie#t6Nn30Ekj%sC>}XXvRI?|g z%BGchQe6}+c^N5+*Dzup@*kBYIq??7_{8>6As$j+8X+52X3Mc7sHBmZ=It}FdF&AdJnYy26;0DpTMi+oWt zD&jot2Xn5TM4hO4oq-bJ$GFat)4}=0WpjdrUgN_BUvzh#yuOorBjnCoLcn)G>j7;f z=f#G4?(7)UsnzrTdhTB53Q_aGm^mymT0*12e*^_d5bDH+;@+*StCxk*@vgQBPSmIxXd`|x9^=7G)SdzUc&wmQjue#3VelRY(H<#pke$FG^L;~Pa%8-u z5?{EuN(ekbh(E%EqkyNv#5W*7+&rPFgck@gfWCH(KiCIsd`%978W7?QZX=%1xP;sY z@rlm2VxAS7<~_Kt?!U+go&)+3JP7dzk3|lJxW*cPIJ-bc;@~)BVyZvG@0Rfzsjum5 zj8WKvdR%G^EINLRM%U=)z;$XisQ;&qe;|0HyU#KP{SI1dVvwxlXvH(or*JU25FW3- zrVN_*A`8!Qfybw(U}H^|Y`>#Ke)_Ug)o5EZF9S7`;uNpJb5#w;tu8N=o9AZ951)0a z`1)Uen<^)ts6&0%M9EH$1s{?iHN_F~HEJ()*B{o~*!RnC&Q!W6<2@V->*N+kj~XG- zAzms^?}j>KWpIT6y~MN_ZMptNOPbSJY?_Z&_b|cdxl0#|=Nn zar+zU)xCD6L5@5M42|3>9$#Z2VjiB$(MKy}@GXVA*Qr)MbipLq^u%xsPUa|~R_ z7#KTdq)e^%gSO*bEI}^h@onLad6E96LFl{|v>Xl0Y! z4;*rXf0)dOL%il2sPIQ9IGTv?c!@$y-{>gd0N|*g&`|LY2v%5vIDkBaH4fox;uGpT zh&8w$`-ZrJxPzF4*n>EQxI<$$E;a5T<}h*}{46;Veul@OR{cEu0gra_GowsD;mZ;S z@wpB5ag{q)=P9p=zUHBsGs8H~h)cSQ3;Vn6e-L|q15d|WuFsURyabC!2snqqz#u$E zOLMJMA%P!R4Rnp-j($O5HeAN%^E>$(AhzT?v&{#y{6TbKC(MssT8|BBZI#82tlKhT7 zCbnSTu&;@ae}hL5-~0Qw6IJ{2<92!BWSu;9q(XVKpFU2Gg*jFhT|Ae}xuUoG#??78 zzAh4c4ZKmE%sN+><3HH^PBYFn$H2hHfc?0U&{+qlx>g!1DBfd7IP@LRU&EhIc`}@> zr{Mldr5bAHqIT6_ zwcV+xH3PooVSL9U(0&{)sF1_OHS$<>i|hgpSr8B|vl7xI$3Ix%k1%jFkr4?J1E0j$ z7_7%yFh~SE3W*bVy~GdXCA2Rf`+|6bIDt5W7=&1Z?-Ngux6tqNbL=bP4&n=P9OOHq zBI8u!Ivc->`w)K++wi#5wp-&5@-l9y+hqqWx%rzk@ZY5V^dWgmdaUi9o{b;A z)gmvSu2(r#7H*|lX~~H(_*ou9;~L_eC-FVI?<+2tl-{VC1V$k=4zJ7ZD z;jkp`p!eWj_@vKihc{E0EBvWOt9&bceZyfn8guOAKNwpx<|hBacwA!;#>(qs36kFcIlJ%DmSIR@>(0>$^$@Mt@Yf{oAKL9y!z*f<~8BvJ;W7z(G z_TDQ#sx!^@HbE%ooT^l+T&0||5DI{VKtkjkZGvsEan1oS7-M6w$;mi@G08Y|Pfw@m zo{rO}yJtF2PrG}j=S(=ibMt-Q&AB=2TWgDr3t1R!l7#lf``cB!;(qI`s^`Dgv!2K0 zg3Fz6aFmOF7MF{+T^RZFxY%s;m}ikg(lQK2P@a_OL6=4%*3f*2AH*ioLo~!6nlrJ7 zG!K(MO!m-Y#3s6rnR_MnP=68Cy&6sbxjg97L*iK@IF313k*tGd#RIqQ|3c@jTNxwj z{Q6&hJ7-8Rh;)#bo^Rm!>S9c4Z7>*QFebR#eKY6@Z>cN9p zn=9C-d?K#IAl+RZm_4<~@M0)WsGlho8v4fX*emn3ZB1yY^`fJ-(a7(b&{&QwPuD}e z1w*+@ETR52=U6Lx!E`_FT~Um`|Hf4O*9E2ty{~y$?4tLq`=-Y8906;^4)t?C(rFay z$Hj!hp2hlfo>X+TGdEyGk@S zGv3hk&zPeF@4wq-^qCjy=yk@|=dhkO&!?~+e0bQHAwOrs;lI>+kGJl(+M0W7?zILA zc+PMudk88v7e}Z^_@?zXR2MSWgc@|{I*A+?hMtymqd$f;lHtG|dXHicF_pM!YI8dB zGGd3czdUr#LobhGfA9q6`N;pF*gBLy#2scHmf~qQH3XNN{6P&QSm;AibQs#bZoDw1 z2luA4SG>C%y9#Rz);L(zg8dcEyb0vCQH3`{5;HxyUH_`S};~ zsl*zl*F!pqsb!dc5Y3f2%zUd*{t$a;zd5IxXXz(nMu!`_@22 zBRZzPpGfFuW?jCyzq9IZH>1mqv+s1=vYzv1tgWqL^xyn!CU$OZLhmH@fMo9s(x2j?@54=g@{l>aWDqYk5Rb>j;W38W>w?ec zGln=s!{cVo7KgaO^lFGdv@bxccS}=Lq@ZXu=$x;+nf6zq4+R6EtYyffN}7Yi?OvC|K6(YKmX$_?0%_< zHEaWz&?p9(`sEpf-VgQOXsoasK9^8-P)z^zvt3w225F;S(KD^{vd=GFW5vSqL3zTQ zALUnVd8&>&NC1uMX)?LU=pSg_K5(n|^2;Ai$0pX(+OWFR=$9!j8F)Wk*L}b9$rQ|C z9kRC%wqnv?33is=Fam(E+i?CpZpP!wLJeJ7kV^1IU@{y)D zT;{@hpEvin&YEv)zK8o7D08RMhfV$8T|D2?X{>5pXIk78Zr6q$KMW=@gfYbSG* zyngz)8N2%e^i=1j!=Dg?tutq1X;KDW^jBa@ej#2BRvBC%1~C{xoKVfa+T3a!A}3ty zI8xhYFplvWH4|{4j`_^=fb4IXh*uk0u$F$5l@%puv*p4O5sf0&-}TZz?;$^lIeZ=- zLkMq}++nhaG!PB9iyY!BH1e&)0@5g?3CY({URG`F*IbEDOy5VS{viete~3LypNW{o z)IP)=;t-QR^!&O_pMhS_9An3h8@B6gxPCuE-?z?BJ6J1xHDf?|4HTP)#=(kz`^V*d z3ZeJEUYF%dIq+&T`Z@~?9b|g%lrPjN25KMjesoTpfY#bPBll|H`%=9B$*IX$wYU^* zO%<2zLDJDuiwEwmHazkJpCk0Ta;u(wxCRsI0;n!_WBc><)LJf`%h3DlvTA?r+(Mrj zb&#*0=`{T9n(NT}NoV;p^Wzrw1#tSUcB7~G&;Ncpj5$5hiI#V4Cli1PM6^w@0^f_%F+zxm?j#$EZ#_r zi9$@I_1iJjKV$3tS#iI$2CmN@{;(>nbM}{0j@2zje{t1(?vvGpKA1lg>(ZO0>dErqgX8m0s{VVdGdzmxlr+>xI zt;rqc*3><8UHl=PqaavfFo-&q~R`f;?kG+=6*=aP6n^u7K&Yb|~B{$#9NP{JPNgEL4w zbF?-;QE${C4t?yv%m16XSn6l;@V!;2Daym@#l`p^?4>gBegm)T7~eY3iq~FjApcDr zG#5*A|NNuX*!FB4S!A~HoTjJ!y`$}{(OX6@Pp(meDmpT3*lO0|r)V;Td@i9Qjy<%- zu-5O@tYzyyH}7}DnrmyWtu=7-)`0lq;3hksUYkpeAi?mq4L1L=QDIoropsqBg+nD5 zOYEV(B+4V3)sX>bRvdMYOMNVZ9p6yjC+4u(Y=-|MIy&0m57Yml93jQip(D@E`i%5z zdwkRq3OopS^WaX5#)h^wtl)j0au(p}Y&SON1&v%Rc|YE$@3@#JCGA6c#kFc5dc2;; zc&-aL3gHipU_9#`A~zLE0LN=`n9MyyI6oM)}jfPfz*k#eA=|4jkJz z;d6S@V9z1G`!@T*>wR3V9@&Q{CmFd~zyHO|OO8i+mHLgy*Z$-K6^0&?mnr|%=wYXa zjD+u*b&NMJUbE)fn(NzX4V1dl@cg|tv{tdNTO4bN^IZGD z?0C$MN%d*SPGP;G+a!Nh{9$Jg4EfJhe^(tmD0pPp>`wdp_i1l_EG zMgCx3-KzR}tf8*3A;)FtAIiZJgGdKa-79GxX1>(*%D)=OAIiVlNB!e9=3eb;YQ^0) z2j&Mnm|hS>Zg`~OKmV%yp&TsnhH|cy8zoKx39(7>)BtKdjt1*k(#+4XEzV)Ws5^4h#SA6f%625V63Uj@Jkbhj- ziTV7k^+6ol+sb-YbFcV3nh)`S^15brdT{r$Vxyn@)y$I~_ZRlk)3FXV-~YxQ7^@c- z8g+^XKA+}D?4vv_^-O&sH+Bqaf@$Tji!nyO4)N`w9z6 z=_4t)s1t>1ASQ!opV&ivL&Pt7y!b=Rq01(FnA(TMA4C6lQs134dY{Hu+VMTcvbQ4d zYG8b=>tY0H0FC9W`O#c=MFx>h(pXiShi0zAm@#l}+_%u3&v*Y9QCEcjMNlYp<9GX19@kee>9&?E7^q)Ho{_y+qQIL~{sq|4iR9lOMeC$JM zc05n*V~e|(EK-Cm9NXNbcs0O&9c4}AkTx8uq5oV%K9Gys@t^HC_l5XG4zjlHA&m?B z2I?RC_!!mSeYLj9@Sm?@KGdQDKW3ASvd4@=fczovhv%aI!$l8>=X3rKGw;gSvfrZV zKR37H4l#o?B557+m+Lm^A0}r=8wnlSulZC>E7SL3`pu<P7#KkRRO(1rRE8*{6wnJabqKIZCMURUnJ{vFL%#UDCW)#g38 zb3B@>eV8)2&B(=StM}nstdXnNHs8n9Y{g4QnY*@Udy`Rr>uMfzrThH&+tUpH`PK4_ z^17rOEt$ph46Gfmy0k;RZtu^3t zO(EBwha9_&HF(J$K_4nvOR6C&4Npy;h@KeMD2+_Sh75T@3bD~c9fUbpTU@1NkTSgD zslX0zC0Sk+*(+H=K>{oh(3*_JeJS9gr=|WAh3-26ky=ra{gD3}T^Aj}~Ut55V35}T4?86VgHSH^D7|Nyk z?$^5U%O6d@E;^DJNXLJ*{GsE~{naP&(5~@VJd59T){s}-sNq^yeYkzEtoJ*3tYpoL zH80j0_;PC?CW3vOFT)<1%P{6%6*v;Hah+{Q^2aBK^YPkKc1&(aXT8SZTVMA|>sB>) z^YZcx{t$;KmR5|c7+C&~f&7t64Izthd?vjWb|-tF`~0Y8J>I(P3_Qvn$=!(wMjhUH z5%lL~vgc&563=@|@tmUwFXWeCo0Gk?^2@M=`p8yC0bZm}WE=I7mzbyZGViyOb$fRg z)v|V0{e?d2pKXnP>E-p!Z9ItxW>(F0`m-x6Xo?>kF72|pK<9N~?#42hN^BC86 zrKVyE86%zi;b#9qm%qRmKCh4b;Uj;r#+AVyL2d^d1qOeJJJjn#c~;Up#0k$p!53jq^myeV4n2pJ)P_e>o7d@U*pgJeFa13`*N41e`I82Ft&|0dhIE8He=vH^^c4E!Ca$!=3ucFRyn;O6{$&h zhRUh?_UVi}TW5eKJ?%1{P zhxkPKR?;`b1InWke@OQbcW7(oUk&6B&8s-WtaGKU7|+x?#3AAnF`x3ZH1~QweHMBR zjj*ww@7;O1&(+$0eSe#kZxtUMiRzL}Y~NUi-?EOSp0^XC&D9^UW!VC}1-q9Wtmz0Tt+zE*D0K>fo;{>Y~OkwFhgP9A%JPy?y* zc~PB_il>=lz9`>;zL*4qLFUIMV*!Wy65gHVz++?z=^J&7MMR3EV83l#N8W(YqKRjfVtJgpJH4)`ci95synisKz_(S}l>*5meg1BR#Z^nF_ z?l0X#Tj?8mte!_~A?{FZEi=zceiCUWx{nw{hL)wtay^`*6`gI5HTgGYa{T$Z6%3|(SrY(;g!v2IDrOtemCC3^1$12vkotu<~S#e2Nl$M3%jH?$=k64(H zhUF<)SZAY8ogDF`D}ZOo7|#dD4+Z6T##?Ayf7Vxo=a@&ek&LlP9OC|LD?ZV6amyC+ z%FD&o%z~f}O8lYM_$&Jp9@{$sCyut^)8F*>{R@5V;eJ^< zkNQi#f2kqG55>~i%wdxEBa1b7#UJ)u z8w%+~FJ-N>b@ZUFD=)*6j2tXxj6R1k_p-DctjTp^b+!X{W!SJP(~f&{U3f4j9}nAH zc+BC&6HdRuA5W7Vp7R%DQ=k-^{L(c_u{FSc>Krcy%OQ=#+&=3nz$4jCtcg#}Y`#S!8ZQ`gXArFDok1`fR^v7cT` z-VjUwxVCd11K0kQuFH39&x*&=IRTtIJ`w*)zxA#3CR~pgUOoACywHeg9YvVj)<_2F z#x(l2s;Gbbp5E(gc@6ag{PDMY3>LYT=NZb6Rqv6X{#~z8t82y-`rn)>^ap;i*YQg0 z%)0&Ney^?hw&vSf10#10sCS>&#`ERNbB2WeA@=xSUp`)ZFc(z?taWu8^fkZQ@0a}N z;*Xr19C%q1O6Tkq^D6FE+^l$8akTdJ^M|yLehnm-8i@GApPhx0#5ml;ypH>;DzTEB zvEJ^%yr={$q3*Fh&x3pIZi72klRH*t*l`cJWZi|aK0Vjq5iyB)#Lz~lhioKoJV)Qi z)2<+%as=^Yz8{a#rQ6Kh zE6t?g{4@>lXb-mLX&z0SyuudL7B`s}SWaQQVLPeqX{5nDD4 zjoMcqAIvxU3r=ZbZwA(VA1R-mv=8xzJRtI*s}G@KY2_R#epWoK_*pTvnM;&S78$62 z82k~Z9_UqgytxU>5;Lehlwp0A6RVQ4u{PaqFvpsVJggx*tmRhxA?`34M7dKM_mN#T zWaZ(3tbA->{jBw=HgZM=^Q%&^GAbFX?;s>#Zctcwa?b95IALJny zQ|P|RztTMEzS`=((nF+k=)U3h4S2p1=wT}b!ZP;Dag#F}>!;Kx-TRk3o*h6G)RyI~v)WA*uM^0iodw&!d zL;jBf*4_;o`iGCXXI}CLkJ~|=hsT(enM0PK){)WAAL0tlgPB*Qc@cl8Zk6W7WCc?r zG4rfK^$#(K9w#mlpJ}XJig--MY+?oRWdjtmPFpE{a?{#^A-FylJenJ(j-@RxkCT^4+%H$F;?5*8ExXce|_s@kgaU32(l1>uc|x+nbNa zSLL9{odD&9-7a%{<>MH||Hp76hK`7cG2&>&%8HA1K3^mByuadZwFlQ>C`~0bCm>Vp_o@q0&fc3AQ3KU~&Sq(PQ%kdC<5k5eV_fo*(y=*TQwjI5_DO3D9HWWxkWg&Hf)w4}$Cs;%EO77wZU1|FPTI zyMsApmy8SZVa|)@K@1^Jhy3KyP2?4kjv>AfXP7xxW={|8mlmQq7T4+i26KozE(~{| z5N_s&xeJPr$M=_*l8!Or4(45rV(ne!dwo$)ohyIl)^F(L=188j#Mnr**V&ESe&rEe zDefHZw<~V`5&asAW(LtzVZZH<_eOtS(v|-Cm$QuZGpRWrZhI1QvaCMpm;26H`>o$& zYYkXy;AXD@@kd=zGTvvM+gs^7m+xcO6Lz#zvX?{n$jWUQb;oEUo(&tTT9RXp%ZiN^ zSDWYgm1m^O8j8J5{>Zjv!=9ZB2l*q9zVh5$)(azl%=87ZuXhe>T_xj*0Bh!!*Wi_k zdTcAGG-~TUY4_rO=2op!jupM*8#0}|o^LRRuHTpLF!T~>Ay29I2Yu%|)o+k~4ud&N z_PDS;RMQF#lS2+&;1ThM#(wgLyzuu>iwT6qATK_hym2Xi_{kj}_HQ@Y!)7B_v1V`R z&~XnO%1x8@p?-qWFLb+n>zYH;=b^31AL0=)i1<$THJKxHEADV|4(%@XH%!Y!SY!-F zkrBsmj0^AYlOE05pH@HS>-(E6_DD~P#>_4cPO`p{dS~D0Saqm8|9`PRp?a3T_)Oi1 zIp!NZ_tKVr`NQe#4PVWk@bt>1#{ydBm+Oy|W;|Z2XuvBaHF%!2 zbsx?1;y!Z6dg>z5LpEeN@euv$+CIqoyjz&JwTt;vCU?lop)rs_4pvWq#(|ptagbYc zpDynwgQy1Zn&K)HMQ+7ief<04}*YVdINWA~A-)7b8hy|MK5Q>o?4rGiwc4Yv4w%f#`@a=xj{E8P>bKRs5lP zS9i~24t{3r2+h-FKWFynFk@$NhZsaGqVx7`0*@ru=cSg)xm}~>?2R?r!V|9dNg)W)7Vs4fhXAq@@zX+6<4ApCW$q8 zlMMdwQ3LT^;19pcL;ZvP3zrK{r_&gr>|tCcUud4pq1-9)nLHk&?qFZ_3qB6!d$3>)vQa!ae(<#yBk_K$Qq5*Ik??gUddjB>?>GW zfqmoKacIIMgFW_=A;chJ59uM&Qp|k^S!-9mbJe?&4}FgqN4^m5lMh|@Ta)j>ieM=w zu-8aVbTW$AUnJlwqz@#3AoHBWA3mS&k|7QekBCeB{(gVBS*J=`h2}~uCdQB_L+qy8 ziwet7T2g8FX0%V-A%BRr^3rH7^Z8gkUUPX-_uysmURYux?g)#(9rSvPC4cC#sjOd| zP2WmJEd3+l@raLzKtgmh!mRk^n!dM*F_EaF&wSr2O;Aq^<;)EC-X6D0%znEaht`$Y zR{bA8In{}^%Zd=lS08nL*R2@TngeSMSZlyq12<(2C=WI}B^ryTWkTNXo2`GS-qoAi z@{GKz6xK={&6+nO^*t2aJ zv_Cl~6YjiR_CQa>Gm|D`UQ#k1rI-3C`n+E%s=|@_b{r#r9J!D$b(nckd+J%AN~3{H z!R`L$7S^+>r(dKR+smr3h0LJdgFDDCuT?hU)iU-LBzu^8h%WCTW9%WDsMm*jf9#{q zqW&MM$E(|3s~wNK>`u(2=VUVbgk(h~qR>|a=^q#Q!`;sx>V0Bzi25*!J#=0CVX}w3 z8m1nkv5N-7w@`xBdoQOz_qV_SC zzK^Krc*I2~A}c8q_GH%LicUew*cjyVGpnF)K9H4*h|yz4?ApDS?`(2h6nlU>aQtwa z(Z|8!jxS&H>2_m;n{_<${Qv5weK@+O1w9j8MoyOH4H>!r!PoLTWrsT`*=q)b`?*A_Wf23S>*@GBP}gNd05(p=3?3C z|FARv%8|_)PRhTsF%DNftlUf#u?PC&?d@2cnTbcKe>}jUg z@%{Dkls8k?Xu3G|)HGb&_j*->p?660kZ)v@rwEVHqrQPPwC+pF!h@{et6qiXcs$=n zUx^2gu+O2!L#(lNAGzaBzP~PN2$P%vq({Uf;AU-GvX@jj}3C4Y^{d3vmJxJHi&#~tG$Fghj{ z(TVJlp3MFr^y%kklJOFlJ03(x(l;~F$6f>U$z)M`iDgY*>o@4?euLESCNnjL zHB$Zf@Z=;TFGl$>H!JqEUdNhitpRBv>b3HBU+czmk5*!Q4QqUGU52qPi`BpI>b}d? zZ=N+z)*7(Zz?WSE@_XiI#bE8+ESx6`+)V!X+TnccX3vq1+BC$+Fy0%%npb3Gv=J|h zIZOso{H$~Q@;T^yy~!aum#_2mik;OPL;R6X{*eA5{zxKwWMBNnsJEvQHSapjmyWH*|&o_$kE0Y9BCMj z19hKi9S5juD3|JWdPiO=ti(n)wH4OVx{IC)jg`!GTEX{tS5gM<&9q}Z8R0&@e{I(~ zz37Zj#YFZ_R}AkXhbZsK$KzD~Re*gzOx?rWn(QGBL|TZcdx$y28JZh&$k(AyW-A_Rv=M3ug`Fu=oT-C$l#?{pY!?E9RjmKc97o zGb5778VT^kWTG=KfNn<-8q=A-MLi^Cl*J!c^F5BBXWz#DKKHCB!Z*)%S-mbSpZP84 zPH7>^{X6q^hp{fJi!)hc!ph0In(wo9A1n5>)_}DJzU&$hf4H(^aqog`oZo+Q`Qyy) ze5{$1jl7JQ5$ZYrY`vzXWiajz@I1f&;#NKQw9msjOitFavfJ4MBqIwcDeU2$z@8Qy zDfD<`XJsOfJu)291M-}ROBbKSqaZm64|TL*NpdFZ@0Q|8S0Oh0%CN;vTc{}zqk7|D{{pj4M-hzi4`#m4K znp&`f8p?~6wb)cbKRbI1KFEF_;*L8LQ?Q6!u!KF&JE`MzIo!w`9l>6SF6Lj66WH5N z8i<#DHgw!NX3d3$-%lpvJZOJjUj9YDhd4qSh{+(@nmUI39^wzNiugl}A=Z%ZLyR(x zd@*Jmxg(4@e<52V&ni9{3CydCqmL$m^POsAzj<;`K7A+|tYw@+PVq)0qBYZv#koPu z%OZoYR+yi)0@5u0_`>rDI-eXHISwVhbUb=rIez@@Y50#n&9l577JuAw{xJ2h|M@TT zj9!rPBF&!aL0VE2>r9NSdhlO1j5q4pWRmM*qF@^n zj>g0+tO``)QFjII%Tzv$T2t1&*Bb61v)7oM!a?|yFi%*~kB z+76vuFw>v@ufLy*?|pqL9=N*{jTPC5i5%G){TF?=t=q0H-m>P&nkQ=we6|KuchGB# z$Nh_ME`NMsk8f>c^B$Go@Q&}^NG4Z%?_QZ>d zHDc(97}khoe#=C!56hT$wS;*>580?iUTMp*o8xtAC>QrpUwMEzR=w00W>VL1G0(|PUxkMni8q8f z#2ukS`DdoaVR}Bq9olE^7iUP@5NoKul|1O<*sI*EVH_0|cd^%?^4Ox-6Mjqt`^?B& zP7X;R7is7=#w5F0)Y8Pqo_!V|EX5J(q`oJ&C&Z$nM=H53YJzgtCV& zi#z<}hk>=9%=_tfX(IVf)^EyTj!-J=NAmo8WGp=ktOuJoW(;}@3$ciPi=~P5i0AmR zA=gI^@!^U50zB&}#zyuY+{7BYJ4&k!Mi6fpxmEOaXnR1{IkeSn;*NtH2kJhriyYQ% z$=9Ev&R0q-3NcmE4iVkwK=*8Xbnx@Hi~87hqT0417Fq9geln#?!u9 zEJ|^pkNx6n*b^jujFqbq`n#+CC~3)2=<9Of&<<&YD^ z7vc>w*UID$=@DWMZB2bcIabm*F6tZfmYDtyX(Q4}%1WzHQ{7;AKy;hfLtFXxrFBHn zTOP^UR>>LJu(2+12Ind#H3vDY=am^xe}7skG85z3r#;Td6{`q~!#w6%y*^GBwKm%j8Ub3$j=cB%46N{^C+Zlp?-S>5%k@wPVNG1}$5XBVo}fPREcJn{?0LA0 zxmfD`aiE_41DPweUp23oo3)SE_e=AjPvnTa=+rR=a)|gtjPV9X==Nx3v$0QHBES2S zMWu%SV{vIYY@@=cE5xzpK5I;|uCVf^#0IJ{Y!2;HJu9(;$q%Y!rG4^|E9XiYhj>GE z!-CXv3W6mDdr0?C-CU#gRd_UF_#8=zX~yH?$sdWC*+@#yf-Z||vdA9}))983+F+-@ zBai+XI~mD&$2c@ZrDAS|7dyuH;^frjINP}tf787ZXS$c-c*lIa5NyI-$!^}qgYkU4 z^0dN7`1#Qo`nn37X?XaaGW_sc)9_z^o^P>-fxWv|r({zHao{1I_kYqw7NNg;Gy5LCM9p9q`ws4+Zm@?ndH1px`u;}tFz5Dg zLo1Fpv>E(idPELU4-t!K98u0y$T&pp<6s4AXt5Xi5$0eiA4~d&nSYf>A9oDPn9pV%* zhxj6mkCjg(OWty_M>1=MrP-LvmFG0rrI311ft^g3o(Cs+P5$`69T8}XNXEQ0_A>F+ z;lz|B_-NWnoNk?m@61?>52h@|2c1i>zp@JtrWayCq7zfIJaEv@K4t`KAoA+g6lder z7a9zoxq2*Ik8{x0b69%BP*?-fLexL~J?0ZmpX@?*Y8;ejI1>NAtYfxfOKS~SYv8M_ zf&TitakzUP`Ga{;H?sf7M+frp@*{Rs_)@Lk=>f5+YFQN(6``V{!e9<@hru4yI6`@2 z;AM}`3y0fD-GjMX{zAj!kd>MaTSOG*Q4i=G!`_maPOQmtV-54J?n<{|Is0;~U=P4$ zF-cfXzsTJw8Cc7lsP&A|AEie^ddOyK2+GTPg)#k3^2l!b$PX|VOZtaVkCz&Vp@(oQ zJ;WGfki(xF>>onz&^W~Vi9cqu2JdXv)Ggv`#*ZC`M0&xcf2d}zhBOedhL}P6hFC*6 zS>g?89MUz+%i<1sJ2cd5Q2K{iKTEZDby?bowz_WY%E>5{k#fpo8B16}Cb=_=wzbp8WAq=Q5mZnS-sa z1}sZ(VP>`;MR6$@JK!_^D&NoH_?T$=^d~jv;pDM)=v=YY&)i~$p}-8+`#oq~OVj(= z_j~cs+A=t^Elqzo{$5${*@~U5HE?UzfND=UGGnlM&W-JVu6n!g?{Z*%Cwsm{S~;_W zt@rrYSX7mjqqeFNMFs3#;i4~_{Na@!-5e&5Xv-Q>(mnEA{rnN6r`yJJ`#JP9cvI`r=O1NU{y#>);L-tgVPq^J(`PtZ0)j&^s zBfTW7gT?)?F}Lg0vKq$mKFntC#F^~#QAOWHJU!h>XxO34lZ*7))oeNxCL^tTrlm2mFZ&yXzQW=@*e#ZNX9 zvv}x{2?UD}EG>=o2eXCM($1LVjJz3t0J*_k8hv~s< zMeW!foPcv33vj-35l*+y#rZBW$izkXnE6fG$-tJ2e*-#Zs9PzydFMba~`~k7!B9I;(3p;xX))f_^g|V^E zlTW^oubj1NeeA_Y&A`j8M{zm#`5A}ndcMaEKXbK8sGqp9s29*v(a73R)9GdC93720 z%)MF~pGytIL-q(@gQEb?v;W}U_G#GLF%`QSC$c}sMC{{urK%B6ID%N0mWzk7U3i2& zzaPkQU<1A1kJ=p600MZCd0m_H1K7^^{zdjv-^%MRGUsVC@!nu&2lmkK{VY zFuBxKGI2MVXbm-vyIEJNFFFx@%z0{NFTo_{iRJLU`uG^1hipM!@Vh(+uug9QnJd6! z_0!uD)}yGr1ljH!#3V-}Hfk)A!`P2IY#a*7Ym>9s7qgUl&!o9H(l!Tgw9LYr z^qRlZG!t*vPsckAeK_4Q4;H}r4Mh2r zK6?sQEiPowgl?#Zo27eLy2tg_9ER%ii9zH|S6>^iEgdQGvDW|G2>I>1_U%F5`~4`nK*ZY_(R&qNopT=&dfwgLd2JPe4& z<#SuzRr7> z_ISH-22PPX&QGTH(Xr6bKR%!i@)55etLnze*j)6{TT_;rG$ML|L`954c`yUdJXmSu zqWtHl^DXwUw2u*?eT4Fm806ab2$2j!PEnA<7^_dLy zHK6*pNpa!mYfHn~JvT=G_}bzAUgvGqsaCC!LHJm;S_|oso|x}P2Xmu}$RZy0n<&e( zp}w*jWhLeC2gw;cr|+WA!zr&hwE>^B5c<@e)By^L`uW3|oPt1H9J-l%HJ!C&pC}<0 zG)!UKKM@-X8rTQD5)b4Q7%}qPQHhvyM*^0GXJFx&cq|%AFGx}jo^-M|NT34G`6}>2 zVKrW5O{;z5Ct~k}cI<6w!+{Cp6|#r=nycUWp^2TwZ9D23v6Hp3UZY>#9IrREL8JeA zJ68UUD`^ZzwrJ|-$TEcuO>KbnPT$Gb0UyS@NUfxIZ z;^S~@UdS6x)dM516jYX>lp0c51(}0v=E==NUVJLj$3`KOo)`~(?scrcJCpjz13ZQo zCr`uf&RKYO+G3oVwiNHPrqz2B<{HCf5N+S32J$ZX<0Q3?bIiN?P(wbD?q&Gel;t=- zX#q7KALeA|ldp1-aGUoklh3@dGKW6%di;^+f7K`9fB)4w?;jeMT9-%8dXV4gor7(t zEVRSzV10|EM8rn276t1}4)s{TdVf~DYOMil4czQC5EU^7lN(ZSnzgBJg#Y~fe)gPL zl8wAfOOqb#vrV~U4C<3}FvD4h-W(4)GxAW!o*2$CV^NSJzkUJF-4~;@xP-B{YVEpt z{=Yx>$jkgAx1V}JaREw;{Hz;G?*h-|PochWr@IiZP|w&^Ga36Drs8l5&+Bs>Xqv{J z=iPX%dNN)rZo!sdBYUD(;9+`1?n$;|X?Q9YjE=*CQ3+TamWVr9zxS@VbS#ccz>?@B ztYl5wJE>vZ!@IcF_j>w$b9?$34ML7SH~wY+$c$8ld~KJH1gV{J+f%|36dlz^16%<&pE4&E>_T}(12XVL>x zT#p?soRhA(cxUP&oa$MIQ}lG4X`hdC%%%FcgZrp)ywA&G4Y7!}(n6$v==#~V1^8&v zVo3Wq!@5}KCoeX<>D$X%F+anBF6Nhc5@HcK`u6-ylh>oI!G^=HkH=qrH^P*4c5!wYDW(Ho6-|9)?yHg!3H`1I9N+nv*wvuM{Nw2|U^o=~6AH;fx7u{pSaem$X*w#7`^I7X@A?x}sq;GpscoLRI@-n$a zV_6jIY;mkg$T9Y>WDVd2)FGykImYKX=(`AG{$B?9B0w#t7%uiqbdsmsL24WtT zDhR6IBE93x%kt4%5_APo$j1c9IzDnvfbqUB#ST|o27MRoS zeB3!O4z;e29L;0kXZ_!QnU6R3O`vwI9!{*CK|R)G&qZ>496cdcK9&`OeLe=W=ERzl zk-7#HPt=zr8}+HKxBj8rt7q@Yh2PFx*s<1c@4z*d%(%3aj4>z6i{9is$mr zPG5nuyuWghPBLCU*|iXFO`3ya)C;!K57HBxf}gzfDxP3X-nC?s#{$*ZSvQG!S=~4^ zq0iV#2Y97|HKXdM;As0SY-0Zm@y8N!)ig3kOMX5Q`F_*ce=wglsyx&%lw;=bQtKdt zNcZqb@5y(Ntz0N(epQf~NsyY5htJ_+onCKT8vN182#iZWU{pK`soRt?kF1q7hG*va zu(r4s4;D4xnd0$$|745ayQp)JImis^U2cr7#W>CJ9_Q#J=fK>W{9!VPse_0?PEZGV zkK+USKa9t6-p-Ie^~Ih9{l2m)3IWH zA&RKO7ErqmsGeb-o&HCQL59n3o%KE~Ca~7Pjb8)f$OTowWE_9x`s*L>z3RZSo-8EC zMq1j(0PREl>C!ox*^6UgwikD$xNvuZ1NSE6vlgxsYm@2OPjq2bb|L1Z<)bbv7XCZN zqKF>#n(S<}&kSY2@z!4E1}!3g@Lc}ng?N|s zoQ^fqLrwP3kZW_wxF5tVzf;^b+|$ zlz){-Z6K2xfs>ks^bZefeEGy3%rA2}9jqlo*2u|)oA>uH?<=4E&|Oi{%uS1+ZWNB< zuo%>aC!#Gn9et@ztoBsk(GvD=rJ(Y8BKg$RVdWPVutI zA7`n3oa|g^%#r5FxSjb|%E20#hZV{n(n*xJbzLiWu_NC$e)g}15uXS7f%&mN@Tc&%dzS<|JCu76vGHiab4u@WA z!P$2w;(LEH6~FpvpHYiSIf1(0|N7VYH~oF8FNo^#HdMM1EM$IYNeSy_6u_0AhgAB~ zrGr>CdT)GeGu(b-t@mrKiIKJj#2@9pBplkDcU}D->UX~5F*_QHlMxd!&f<>&@uz&} z_EDqJ#agXPvOQRv>c)Dq$3yY?csMm552m>Bbb1liCwj3m!HFg8AvoVzfXVDFQ5GHp zA8Xfo*uO7-G<_nB$vu3&3fA$R%^J5mS-(o`@iAlXb7X_}Celkik^DgJkoIA+htBsa z*48=xGi{6T0XgIRq-FS+Uh0oJ>8IBD{E3X&JC@M%AhuYF2LiR2!k+3s*?EAvjT<{V zS)-O(!W*g&HGUpWv@;%W=k>-}?3X^1Jqu?r&uJx2OgS(n-vHJ%n2IYZ~j7>cjYk{Lc^AH5GJFE?WG4<_<4la}!MQhd^N zC;RO!p_Z`}cjuR)D=`=Uu;&Qwbd}*4WBw!KnaeeSd_(4Vw`DF)bx$4DGQuey`#EmK3+KsPAL=*g3qh5j-raxcn#>}N^!9D+IHT`eaYmHbUz-;2;x~=88*3V@S?u~JBsNgFKxpsWgO*g*g;>#s}&vCRXGWJYo@UO z_+<7bZ^hoqPQ2AT(}=UrFfKl8oWtk2eR73jZZm#9!MORPa)%U$^FIBt_Ju7u;ViX) zv)YnD&T)HwB7GpO)JJCC&AcM|bi~jp)j{1-F(ygg~m|K%SF3ur+An$SLxWpi5$#J^R2jsU8yI0^XYE7%t zU6@CWrk(Z7T>QMp4kHH9xmoozuPVyIar(^v`p=fvW2D6Q!{IpP`FQr>YIvE`q`1CN zgE9UkLwQe({R66_$NRZ+vzX7Bj+Pn+9$Q~w}TzCMlRxffFTe-VeRxppkzIr*bJ&B!S%odWdb|{D!mA~%#@Izq z_pY*b>>_)-Ucugg<&&_ld@}YFci>>zWFt37dWME#VV$>E{A}>Yh4c4{pA8mZT&~;9 z^ZW*LTsY_d**^L}w2yK7xvmv>m)?e%aW-u2nUA;EJ&NbqTjUMK`R_Kf?mfBZtp?_H zHTP=+>ecr~Z7+^gPc_D|x*nrX#!l)u%jv7{pr56jc}d00AuFNQQNj8!1=K(0HZ|bW zAABF(JWsf$stGSO_2L+HlsB2f_13JlMlP3pDPpHn@^bL9u50MBah>l;bD;OGInXhS ziB9u*G#8&8pID`ToC`U2T{gMH+@9wAo#LEb;zJk5kw5erdc6;f*IbH^n7<~S5{JWkcY8VmA&L`a{ z^wLfJ^~SM@bqS!sypIT$NPV0ipC4u{`w>pfa)X}GKb)g`y3#b9}F)^*cA z)XQ-Fq8wzW#te&i>t=se>Uo|^4`O#}HkM_$@R+j<4`&AOcuok@F9~!UGNBtUev0i6C!QIq8#2s-}OzsMP8Ol-!^in+}=+~f~kR~&A} z>7g&w2z}T z(+vJNT00GI(UX3LwY7FOO~Fd`;g}YihFR=)GAql0>DhU#7nOzHfP zY%Pwl4%bO~QI1bufp>aV;eFp_4 zvW7=6z#J~06GeUpS{poAv#bO=HrM0*W9|6Sw|lOszs(0HCSqc<*T@SC)oAqkViF(w z6#5CLBHE)2|zU9C;xRQ(IDbUdQsC5BzLZ z_bTO%(I}u-d^)}4io>7rR^zd(LOg9R!*i}GZ1mI^x`)_9+J~4!{2|RlL+r7)in>P` zH4yTLGzP`j=DB^v%OC0-{Dt%Q1NlR7wC-cZ=mTT#f!EK_AMru&8f;~L*R=Q?{NurQ zu7!(`B&=G_a>Q0IanIU>UwdodJ5j57yfkL3LIpQk!M&- zYk7(T>)CVt;lf%hWDocrrw9M>o$uk{snhYw^o4kP8fyV}uAonTC606ZJ~a=$zjLb3 z#jQBRWC(3_n^-}|EDkV_UGpP$(Cs?*fyX%Ty6!V@gffW9G~$qpb4k|GWxcN6-@Ba) zu-+bIKf*jTv#-6Ky(Wk9dCo90vDcA|$M3Je&%WP#L-XUUn16W2{6pz;lb`(cZH*}K zvPL)kAEEJmsMc`V%O;1IEJ7YAU_JBV0x!yn+-RplS@C7NY-M_U>)5C=3dQUZqEJr zC3wzLjZMtAdY-z+^W=|B-db!6G=}IN9R`DlJ1&k2G6=`PswqayuQ>a1T83g`#mT1j zp{?R)Qv(?odxu_EO#k7uyKsV@h6m|KslOu{e>w9tZ0=it12b0Oi1Lyq(AUoVCb5S& z#AFZghq%LJ5cM80dLMSoCC{v2oho|T8Kb{DWg$*XUuM+!>dkfHU(SAnoh#Siz`|8{ zdn)TyOJUrwq#U@WJUU1f63&&;` z2YdC&_wiZY)#dr)aLrUB7B=;c&=}af9LgVxn?u>-O0l@1DbRayjOX^(+Dp+Ao{azJ z`#-@8GZ$g+^rbke=WAZ@IsT9qGLSzGH}>FQEj{Fo(~a6ws>!7~xbLg?23ceUwV-as z>3?|t9QNIPA9l@NiZ`WyF!xIQan=~*2Qq+;P214R+NT=A=5d=_@q#&YyjMDA^Kqfu z!T3Y$VX~ZV552!GpJV;4{f*sN!g^tSsWy~G#36w-mxtQ##W?C7h3-`B+|q#G|6-Qq z^{{$-44XCZ`(Mn&x;yDRSFb=a- zN504-C03a_(a#*Lz~|p1-?QIk$JVE7@ye!p1l=j@4>I(ABZk^O#FOa71+vL>$po$Ouy=d&N<T^?1h+}YDZIiI&#N`V>H*rXs&}>{rjo! zeMWK&+8b>+@_GyY#Phkv0L*owC6)Lboai}gqkvHAOk$!H;hHtOHg%wgUp?( zt?;0)D}Z}elo>f%-}`zu{=hob@~@k{Mt<|N8Mte435uB4C6*cZzEqz}HG;qYjj4F? znHm)NQV||z=^(fI_tAR&+atcUKF6W`IjRP4VSW-et+!p1{-L^82RG%Ru`~%$tf^{! z?w5Y<%KcB3_aia^(=u$hGslaknR~U(*MRLD(mY-)Xu>wK$IB%XuBd+;WbNG(jDbzB z!(bYS88@5!p*UIbvtniQaRcM#OZj67PSQ(qxO*w)r+LUtHvHe;eu~GZ%)rj63)$yy zIZib6*Ov;-zZ#T3ntE`kVH%Fs(TmP{Sf^M^_dNaO$Jx8@y_qX;ueS^x>?`=!uYU{Q z*s~AMbkD#cdPPpL_LkV=tMZ4A&twPF6Eg6auXNpcF4 zZ5g%{H(^n_6KzS^aE^;I>hMO43cICVka3J}^0MMFYpNUX9%?l_wpOe?v}0}S^BMf} z`S!p%3;|4?f_ ztog9k!0ojL#}?m^AtC4VEflRvfzRw)JimX2HK|TC4W55xGKli9G>$aTi(XGZ2>Ih^O)qx&f_;|EypR+@#;qmaG}dDaU`q(@w1 z-j?zF>VMeJB4tJD$L_(RS%r9cQv*IESI8$np`IQPY9|AI@?x2Q(~eD#*BIJ~`i87o zTF4%S@lbtAE8e=j;w|g*v_4O34P3egVj{<)uPyVM_`~RVzAT%4o?U5PMwEKExlYeI?#F!X6m=YPyWx9|!8X4G;Q$Y9H@)u=WyT z?k|d+rHPoa^3}%QAF!w22kMzlp80^W|0#}LEi*ASH6ObkeFFde%U|K?uGu)uSpG~G zYhMlGKbHr6;CPE(botTWWIZg^<$Z@9k+<15r%j%GAekuL^%ys0%PzSn-QgE^3u zc}A{NYrPxg#k_yO$J>I2E;5h{2I>@7x^8G9ViDE#72mL~Z$%Mx&juG}P4UrRp7;4) zgcr0BKWhm0b^7p&A5N#2WWK>HJsmEiF0U1RL?DHadq4^!8;QVc$jKhAcq#Eaye*60j;_ucpKyYK%1_cwLo z?Vh{HKufNgKi;JV@-~M!L^ZL*AjjAz{eATkq{rm3;%3xGC6hn?9l!nV_sAdfF5!<; ztdnK(hpBs9=~!;$?WV3|=3xzdEu%L(wVhM+uxu`B#=HbO{Vln$j|sme=QP#N++|C` z{i{mxv+wm%^RVLPksP<*PRITe<}E44m$osOo?&PVJ{LBuE;D=<#}BvRzB^0MJ;8;> z%6ya*uty*tE1jfJ9u0EDm3ZT-ZkM*f=T-l8PhKwT?GEULet|#qx>bcXqpp^EvH!=P z_}fQMRv z`=ek?B>I?p^-y*JHnPsHseNo`&XtCIA7YQ4>~X$_IaY6s?=zUAzyDx|!5-TGPU~!( z?PhFCJz!wm8+tvIKeXS-sk(xG(64()`_Nc!^d8(;J`vSpV)5@k{RjN)lfS{e4HI#^ zZw*egFEz$M|M@`eL)YKsP)?Q@L^_E2mM9-f8puf=$CG6f4F34Pf%Z_kyrfGTOD}x-U`g_ z_MyG0Ul%D1`cPQZpQB~4$Tjkap^Yfti)^FIgRx6Rkpuf*9e>e_^@m^1#75S`c4Q}7 z`OKI3Pqkvop&L_LpN;j|T>`mL<}PSkRQb8OGy1g z404_ z=)uBd7n&2Y5I5%L)n^#PoWCM(Dz1_zDr z75n>Lc}8#ZfB)m$OTGu{cca?VXWyNO%}-Qg#k|7)zU7|${{HAjj@EV5MFx1##UsVk zU>?4w0_y8-9@7uLISmVE`jHS5Y5k{K3}USTYYp6%Yd}6X7wh3{Sn}09=+E4f3x8e$ z`NQ(e4aQaR%=@pQ|5*I-EbCsW&qt{5L!J+5AlmM(=`?&F%D>uG)^6w?+N%G#JR#?% zEyp=}o3F$l|37>0875Vkwf{;^O*fr$4i!7+oO7a~$ru1LDhA972BL@{Npfy-2J<+M zVbn3rIO;g&ac16m)BnTya<2b%{?|G0I`{olKW$M|b$~{?aevs?uDEN5r>fTPx!1iG z<6|zm?v?hQyT;0%?<0nW|6_S}z2pz|5&4h*mVM8xmPcwP$$_?8p}*XO94yT7qy7^a zgp2M$Nbcam*j&}d!fkp!xbSh6gT>zHWDsZ|ZB}cn<{&zfPWg% z%N)HzPPV}NF@XFZJg?M~cy6ih==)kfI*yvfs<#Q)>NT9J^(i%SqhFHL`9?|D$X_O& zU_a$FOOR}PzEsuWF?tFb@w$#}ueSBKf1WDSTdiV4JzKJdJB@*U57xT<>eDH1^AGv` zpqBC#YUaLptRAdVB=hH_!aELK1%1|S@M+lW^ozLPzPr!t?PJXUn$}{KPu^v2q@(vI zy&(IyRZ4DJs4z#t-T#X5m@&_6i~(Z|4E8bLJ$97Ls1Lhn{o|(gaMbMZg7@6u4|ik1 zZ|E>7^75BCAtrgslqbtAg^qex@SJPz&>G0*f+pElF-7P%CwFk6ADy{ZeEbyI1Nl8Y z@dvp=*KX=NdoZ`_XZ|Q4fBfhFQvC5$%gj#y$6S?vMgCwf46TDO9@llR$Rk{+edt9$ zzlUBB*2E%zq(T1}<0t>`cYl+&j~|oAI{D-50Ob#TKFJ+CZgL3ExAxhb0DqhXC!PhP zyn-6Sr)sX31%Y;H3yc?=Pk@YuAH&@^>5s?A9e&I*{92R&9^-PLy=dVOJ#c#Zw#@=7lDIIqMASyj}4I*<&3ZchtjbloQQ2$O*8=u{!v%d+>6&`aN9l zd)7U)uLS&o+PBm{ocUvE+qH^6j@F|82RtB*z1a`^C>Z20V)2fmcG;WnsCPxypx(j! zE4`3M_?Xf@z#lu&NAc0rGSuG<0Dt@>zdL$F_^$u{NVh)TNu^oEIOYOHH?+Lj*$m`Mk zp*0Ryo?tGJo{!gS*VpuP|2Vd>Lh;9V|gn;ENO+-(RPcRZn{~H*36L;wGJPI z;ty~LnS=RNT=pTq%8`c!4FtJZhoE(IV7hf5jZElg$Gw|BC00yupR%pFR+B7;me`)HRwVXKK)Qy<(QU3ZKlgmU5X5 z4@jXuJRp~$2MB%UVS(cjgT<;Eo}9n+6kEAI&RB$T&unwGruF$6F>W4lDrHqSg|-? z+UiVTkr+v59W9#``B{$MB7MWY83|!7Jz`QA2jE^i?5Gk+pQU74wth9sx!+YKhe z-X5-e(GyEt%=4_VwIsbl@`j9(|M}@}a%RIuS=KZ~4x_fy8T9Tri5#s{@K_(KMh+Hw zejh5ICI``5aA#h#Y|Cm;{mxnMYJXWfYW3nd)b83>0dGesJRqIRF4XyYJj3BX|DW&w zE^qAJFHcRHAsuaVq(#3+{khAchAFrAzN1zG4h#n{Vz-4oN zW2M43Sc3YQKgb?YA>J~*B?&cssy*hH=y;29&42%Wmi*(J87jx)W7On*^Tj6FyQM;w zFD{VzH>S(Bk`M=Io4aI21m<-iJ7YIF8O1%y|d>B`hGCKin&%hidyAR z^$gjb(*R&h8rhtVdRVy493L_V<6ibQ=WQMD_C2>s=U8>WK8AVxrRimoKV*c+ zPd~_+_0P-7rpa;yJfQNTmLKGSHIb{N0ztGl7rxnSHT}I<2cU@VE)k8zbf}M9hgvx&57a28V0`2p!|2=WEx;N( z@4e9?XVIH^3wpObjJRo5dopwri&PYur6AjkSP1b`Qmjm>H>;irocGn+FxCct48$?O zI##d2t1+=2K6L63ZuoGGT39y|A|+{pE~Tw`A5U=GdH8D_p1{kUPj3jB_=AbomaTi8#;4U;J$c-{|+# zXR-|ZQ7~kr{Lhcy$yw+hnm^d9@Fbo;jr9qvkJZdl{IM7LRO{^JvM3~3UP!Nj&!bJY zm!Rh$ID_or${)MHB~Rp3JNlo4KVI6hP4UNpNrQtwc&?n;gSQ?0aUJ+$y6l7Ya|(?1 za`QZS9Qk*x0bvp~ynnn>WRDosuA4i<3cp94%AIm%59Y9wIX?ezvg&zGedFmz^W=u< zDNDoKA115VKP}mF4wfBbyev0f&K#;!-;MqpJ7l1r{yJTKXI_G4@ywHja?|Wosjsj| zMk?xOp$3>4Sa5GZq_&9capt8|ZNZ6&JT zIdu>62Ya8hw(gunTut?m?&9eDN!28)}j{KS%zA>U=8vI z*LvBFoUA8uY9wozm&o`3kmGBfmnCh};W2UW2Q?7tAN_Sqmt#98>d=oK+`;7(`2*MJ zEc6fRL3`lkIR(GYZ_qQIHJ4|E#YxiWORr}`_K1y`06%TAyz^=c@~Id@I^xj(`f0ZO z1$9K}$=wQ#W8v+YQd62FDdrf=|DpyL=2~r?agdsO<@_t>X1TCG0oLirY2UG-ysIZ# zf5vIQmTmER(7XJn4<^dzA5W4$f7m8}e1D?+=?`u41@3?IS-Z;j|JV03IvL>NIKuUO zk|*ff`P*No$=CRdFFu|upM5w<{`i68^FPCWe2LHh>W}U6m(GRz^OrwP?(#poZgVi) z|NGa|RUbccH96X??;B$~J2gR;Jeq$&u2X*7afyl;vy$x?XFS3&zAe`x(f*Vbk3 z)q(2iva_&NHm1V&0ruFKT%~jn#xm3P9faNwa>x7;VX`DD6S-uKqWOawh|a+xf2bTR zte?)WQ~d}3_ZQ#D%K3N76RqHs#@X^ZJSMM@yP6Q!sTdKu!B>V}!aOF~BO%IH?wFS%^k?XJ^BeS0dlNmLcY+%pLSN^qk|gw9 zixx{_yjVH+%9ulj({mtK)|D~jai*(qv1AT2pjQj#s|dr7~@RP+F$4~xg)x*wcVxaXEM@%A!&=$`&- zjmM4H+ZY3bcMSM?jh1_^50^7rddDBE)mxe#YJ&5AF`7{|$AWAs2TSt@H4x1oTr2*7 z91V9ZXx{$KypF0a4XAg7O2cg6UO z^F1wRPt>Z{k^zo%R4P^>Gj!}OJAVPcoc~z49K`Dm@2^k{!O!EiJbg}gkDmn(ojhDE zub-=v&%i*`PzKxe{_KOva^L(+Nwy|I$c5*y|R4dn9m54xD&B;!4UH|8_0opJ33${6q- zI~simL*>A8vAxni=vB|L1{t-CiqI`sxJU(lNytR9mtZJDeM_U})$8p5i z^nH*;6pw&E==oR?mn(OUije!p$0-(JPet}MA%8IcYJUxU>R40`7C7Yb%nGUW3zz@% z*B@k7aj87jI#sq+O_6g|vj;7I9ETtOD9#OQf9(T9zF0Y1j#W&Tn?e(%A|P1&M)%!I z%G~eh5FeFub?PAItdZBT_O&{XqT|wGT1~drN4>&}(WR^rX`l@?!Ii z$`{h#?7{vbC*kebSk@|y6N05JHCcYYZ?CLqcGSOO?iKy#)IT(PaK3*-N~OxXqW^;$ z$WsyN@vj-g&MYl5+!z~1a8Ia@Lv{XnjjJECk-?H4S;USs>5gB9ZI zEwd+CXS<&ixQt8s4F938Iw>h9tocQK#w*w69# zx1UduSI^d|82)mz!sXmP8H8HQtLN(FUq3i{;thuDO#WjXs)h=a`d+vj>-1aD12qSA z80h!D(#OU6S)ZUD*ZXg@D(3f;_r}L_QHPiLmqu*Ux7fxwU&i?|#=yWH1DszC_Vtpd z?xF{z=RW8=m&HhCQlRmB*v)*5*=xMa42qTe!flE_Rs_~Urf4YIj-)6(hF{50OVh?6R?-QMMJgDh6Rb z(qZ@_4q;KbSambxq0AC#h>Vy2`e=z52PgbKGL*K=7(32L%q)OBHAc;d>UT-}h{9cCmc}rz}jAU8ECEXGwHVZtq z&^db3U%*`q=IJrBDM=d2ljM)@u@2AAarKps(FVike}_7$ubr(Q^z5OzM&)B2sg@T{ z*1*d?^@6%g1NEA)_QK-}bHs%H?{PAxEmV%K?>Pr+!=h+OH~7Qje*xpmY;Rw=VM4S#os=Uh zlCo93D{3CvgHG=UwGVpFH|I78dkwPw75Rfb#K|12d&MK{kI6o;qWC^v_jq<*B2e7kL*tg332gXm3utdVt|X3OEaS?EtbN8RV`C2=|O zM0AGSJ~~1cjE|AKu&mBPJul>7?V`?8+$IMQle5psejM}edhkb1sZ6&g%m4NMhqAD^ zQr0z3la1ArWCwWc5c(OOW1mB(eH&=EweG<+>yt4j?HD~E;E>~}QAYpAF8K0~H(oD~ zC!!9HSD2W`jPW>boWGmQ^$zkGF9~5mVuCJVwXn8m?|kI$Vz2HVV_e3V?a2r8l&_>O zanY~&wVap!@h|ZHzfzB!tExelbESF1-P++xsgajY)vCNQci!lMcI~O#oj`7)IVM8s zdG5wMYcZt5|NZpCdB2zky+6*=T{opjh`*N%F+3o>`u%kNEj4Z%aj!832KE>jha9Z@ zRG^WQsgsbk4k`(kFH1uHi*K`bOC6-JGk{kWwWSKcnR-yhbxr6*c{ex?29@IbR z{dgg#zKcJYe?@;exr6aG>s--y&NcfH?kk+6*n|AhU-9@Erx>67ak&0k>1e%97DU^n z?wYak&ST4DZ7mq0`C3&gnE6Cxjw9&Vezf6Q#ZgbkWy|8IbXnjXD|h?E$?anzWLZjy zY|3j;{S`aVpOE}NOB(pt%aWE77kvi5(hW9XsHw<}=e&feUe0T`_)WNIAFFa~-T#cgL$dElbn{88+0Y$Kmdp z`XEoY(mzyg4or~cmV9}}oU8oj?D@g^yX-kg_SjQ4S*;t%D^CVwFR>Ml!$+?iV> zU+?aa$BL_DP1Qu%UOQEG!LNQ0uRn!jciy*wcAI`2eT{gV?4kMNM5q3-J-b0M+7f$_ zTsuBOvd2#lpKj(bseAa08;kyeAu3MlQ=S!KE3$;@@qxOYti5a1{RZ6ladmvg*A!;P z$sbTp%gDXzIroh0@lW*k_~0${lc#SRi)-xO(|sM=v+mT<1E_now?aC0mCN33WwLW~ zschR=B3n0<$mVs$vT1FRY^;5YfGu@+gXn7 zSIViQy{pOPyzksk$G%p}hwroq>&ZID#RKg&dxo!kqCm`XF<=e!*>E%NS@X8B$}C6s zRuAZ7aXz=s6k=Wz%t@UcQJ?Ym@zH}`xsyj*6haa>tM0=?qjz`N-U8^InM;Ro4QKT{4Pe~R^-$RFHyuBqQFO~{qU z!c*jtuw+^2pCt2!1<9lFnX)dcM)4N)j1Djb`|_z?=%}-MS7N#>%q@|Ro?S01E1P9y zVXf?{Lwziqmjfm3astQC+@{NQoR_*?2Xnylfm#7-ap8}B@anKGF*Ty)siktgccc{g z1W3q`VIKP#vma=5NU)l}RsE8?(=QZnq@uSn{2+FV>ThN@CrEjr2|WdDQkD~k9w2cZ z>jCN5%wkGZ^TA(zI(X)Tony0K`ZhJ9KfK-A8J9b1Mmfjq&bLp&M{!_xg>2tcA{$m0 z$+JuIWy#}U^#`)#p}RBW-rG~KK_Z5q|3#7P%GMUx+#MC5v(t*Bn1s zrP#@NU%R{Q@Pt&MuSv7~{hR3n))T^h8D|dFN~SGVZ0KjB$GG#_mXa(P$?Qd#C;$1k zfvxH2vAy8tR0;4Mi~K7i&Km4-ma+fF7&gYhg=1j!$l;Qf;4kYRXD@X3K6LWO1M?yz zI(WP>7vq6HLWYfymVhX^FDk{Mf7tS6c~ZX0y<*=F?K|(Nnx=A-sEe@v)$_J;m1D(N zma#F}Lu((*y`uMnz0bAwq1TrhN4viNSS|9a>SxJL^bK5;m?PJEh040pX4wnff*yxM zU;}C&+oJ|(Nn%3IanR#jyhO-pnohh zBL>SYl|ysykX=*e$R>I}svO%s2>-`n^jRc>@qAEcxY8`*%6;1Z@pBHAqyE)#)WD+u z;~;Y7wt+v$Q_o~n$aP@33ZEc}88OB!e~bXPhWPn9a;{J-)KmWs&g&|T!-kr>sJ)w& z5-+W_7W5@dlckU4qYi1g9NkkbH_o)9zd)k$syoMD&bJ-jk62l|tY}d8z}9ivFR}gu z`UajkUafMI7?B{aZGg8atGxUnN-B>KB@8Np@vP#Mkz+N#F|&+~PBJ>NHe+(>N8OSnyL zKRn1=tcm{8R-YjB6Fl{3Hnf#u^c<;FJxKI%cv>?Tiy8{+^ZxkNv;pa#pnmt!TN7n^ zt4%D(vvMBm`nDqnD^YH_E*UvklLv(cGP~U*qel%lybm7!bB%cJ!g$U&C&oD$Y-1qY z&qp4-F+xsma_>VYf82F#g!p@pHhv2|{1%1}8!3|lqUC|eR9RsukQGk+!C0L9!G*Cq zwFC0Urc7uc;1B8?jI}j?Fy`G2AM>`%2332PvAB+dFBgBDLVc^V6H(uH;ygJ}H&eEh zx5*ylW6`(K0Ucvserwk;Py=CYFY?vHAvTqV^C$oA%0va4~X?5xCj0i#eaxf=L``B&`ovMRGu=^wS;!4mI=KNwR6 zPVfv&BhswHdvUGvs;nRz7>UPQLhXGGanU{?Lbr!RDZsU}}oh zZ49PjF>Vuc!O7+rIoVO`w*T@k5zh~%&-fU9$4{VVxNCpGW6%?r|8)0lX-dDK9>JL3 zA3h%c@ngl;YmAHsijaKyzQ<8$Du`*7spJtW$^PpSakuHlL%9d5oXf`5` zi+NxNkr#Fn8jj{H2ZL0h$9jW&`+56-)Ir$4X8Gg!;5>Yn$noxSu+S&HvC^b^`wfQi zS6LLLxN@+?6UP1;F|aWPj4{yLG2k_Nq%;%-$_~`neRbD`J`nQ9ZPUYL%qXK4pr>;h zIb?)P4~mmVBGcgeD3Im0Jf#oNdrt2MYhE$`iVI`&H7TgMi~fV;kL{@0s`UuX7t}sj zcb6Uz&b2c)i_huj_3Qg>&73D_AnfsRyb1NNny;7r=-0t{eCAJe6t>B3)U#q-&A#pQ zek@DOQ~aUV^q=4EhdzXf}rGRCdiFp+A8=ldDS1lAL098-Fn-Q}e(!n>19K z<=xj?24pNbP+~*&uV!y>_Qp63?SmSD(mQZ}>-rK|a7&65=Y%V*VZyjEgCaMTJmfQW zjD$?^me}9`u|x->e_y1O=EX=|dAzhWB+1Ol7MVNCrt-t?xG7ccy(3K?S(v4A$Tq`g za`tGgkaa%?`+oQNG+}SOpZ+>s{{Hn0rKhpS#lQbBQ`I%#IAx70*3x3X4vy2yaeet2 zhj&*?c1qmO-zOIap?;WQkC$hkF1Xhv(0p7&Iuxl&Akh<8dPfHO7E3 z26{6FY_St$34G{h-T2VSAGc05_@le?7&~;7TpN@ikD(szDl4=B@`trZRwtJ#z2jib zjIJCk@&`2$`aj4YV`!s8#vOnNP;LSM+~86l_(TMIXo=Jz3NZHy+i{7#^nLONdl)XbIbFW~G9KGhq zK_Yu_P0#qU#W^ymF+mbz{04-+(cSNor{_ivA1>bDkYMz=j0_5p=+F>}3J>dAqQgTa zCL&Z4V#1KW6@eVGC@IX2k%~fSa5afC7kPfS&q;%qB@>>OZ1mvBlO>N8K$k0)9UIE! z;La*Jb+A@mIoTj@zSN{@RDJsUHetVxum3bfzWHn_*k!8f^G$yFJL-!4^V=EnZ=LMo z%q_iP7P1X_dP*~DFjy>#v-OzQYw99a_?{NroTm0;AdEG4`@m!Q!|z%pF3jkE?rHoQ zj~j8VF$S)lF%TXwPOfham5%3PFQ~;!{wMbVjE`Um51 z_CV)cIK30p5~v?&{$T&U^~seg*NSYRy$;koHmB7p?StMAK2H6^nNj*f_i*N!)A)=t zSWY4j>`3KwIRw8s`v>kThW=5|s(kR<3Yryv@VFL7r^{2Qzxx>S&6Xy@haQzCw~mdF zo5w{c?qYwF%^9__2RT^updUcq8GC@RANoFZ8$CgA`!IYHtj|l2J^Ozg#qsi(o&6vB zy!6L0_jMbt=llZy2kT+c`+-Gy^r7GEg#N*L1J6PSx*2-VROmhS(OzBrLG2^Z*GCeW zD}r1o#U1dHXQd@dO{qy1&d*Ts+Xrt>RP)M=N8H6J&X0Zj=c#yKrqWEv7&_*1T{8x= zAqHE$q!2ta)8LPPyRi1vf8%_A^Vt-6rL(uWss{!3*terx9$1hr1({*u>pezB4j=q_ zFppvUn9&mE?P;x$}iqN2ovTG7l6OtvJd9vgX? zNm5#1lIk)u>P=Z>V!cJCG+E(^x5>3r;J2Rv-~Dx|a_5a1a{nF3#YF#^XP-v>uIEZ+ z_X`zr1R4hO3V(C9QSrpbZ@0;x|1eotC*iA4r*yFk$NTqROjA9?eW`<-FGC@J5c5XB*>F7S@1^W%QAbO(gDaHy6*@5 zAJh<(_5lrn`o}tZMOS|h#>T9##GZr9$s&hP3t-I4I9M-zjiKGWUT@2pLHIfRe10Z* zfZ7XtkI;*w6gCTM>n<}F$l};cc@n;JuAfRkZ6EN+En~vv7BI*XQ@-i}LJeeR zVXM+Wl()QM8n|MH+P>B}$QiutZsERA3mVA$aRU3#nqBms9|g0K-L~a5$=3WPb^UMm zjh89G;EXZjyZq;zdyc|h{!?B&hyqZ@=2C=7br8^fo@?>puM5L}@~9 zJM|M!u@_l{ypxj_FNbzj8SLSPJ$NqJ+x(R?bzQm#`GYlbS*yw#A0VvR(cN#sV0>=) z(4o+BM!*~IFOi|aiZ>L4fHA^7Ent+Ggm|$auZdjiSW*;E+o0vK=9CR}+8m2r)rIDm zw?cojp|@tTHAzzKiIS0$C|Riq7?*L9mmUYci<6?PSSiL*niDJKd9hMi5GQq|3DQz+ zl4&hgnG24&>!x&h`0gxOikeo>fu}b-Q!F>lN`_to-lvx6MgwHsxV+3n+4O9Q(zvb^ zV|4eqoEK=Sj7L3z!OypY@w;H`^RGJ=Hm?6KfBo6lBQ9*b+%h#xj%|Pjf}S6*buQ$O zTMYf9+n6KQH{=5T(D_%+{6P(Y-g7RRKiJ!>w&yo1{vdna>JzK@BN_ZLv~w;mEWl4p=v81t zoK%z%jXB`lOX`cp{FGOb=aOt<+y!sBhq+(HAIUa&*iG{O8?8NRD&56MSL1VJ59R{B za=I2?b4Sh<*<=5%3Y@cei3y!>RcIbP{lAVMGfJY7lNE`4tO)8Lp7;ZghvE6im>98o zi1*zwKwlmsN6@!ng=dNE!rVbiQlhFC$GQ!sxL7RFl7wEGNih+U7#%K2@v)BYfgAqd zXQ!tm$-@h>R1Vlc8^_c-KYM?YB!mWb%~$kvy^QC7`FP1V=f*iV#z6m$0eTaQ()?xP zV$|Yw@}V34kM7U&2*j0zeqnNhKl(IA|Ezy3w-gG!5}H5gJ!ec#?>YHnU23K3|G`-N z#pWB;JU_XEeh|j~WB|tDTL0)z{-Ewb2GRNlKZ7;6_<09QQD+z02W$WC!M>0^Sfh(| zb$LwW4KfH9%^%c3=8un-n@5MqgJE`61M7u+aFiSUL-U7T4_5v-S%vz*xOUF`aTxjs zkC~jwb4C7`8WOMc5Aw%w)Z2{-_Lq{ZXu0p!bb0IL=1b-P&X=yo+^^jNoy9}{HN_s_ z5-x7$zgJO^Upb0z4|+XVua@2q@&{}0vL8D6V|`kcY{{%wd_jLX<8j9M%y%MtkOMS- zxbi|@^$yq9b9>J0LG6Qj1N9buHu;15K^|fqVAkVeU0t#Vbr0rXElJ8#xA_?P<4(ld zH-SIy4K%49gv>!=EZ%_{y!3V)M*h{2&it#M*n`LItbbgo94u!><2mGhaN+qn0bcu= zKahV_K205?Gk@F+CS(4U4gQZI7$>2A6J#R%yB*srk-I* z6%h;$p&p|AAwPRVoOvV^T1adnvahJS2qU6jv66_ss6I&k?8aCuNKUX5Wn%Ges$-=)Bm#T?PUl3P*xYYYPj@GfX z);@IZ6?4C+!;n45L@%V)$l8o5#UI-9LGB=fXg|mTpE$W09uV>eS%n_#9R={-gFmPX zkUtI~Mkia4KX|-cT=fslCYnE-Js{59bgAc{H}CI}Kd}D}{R7?)FcxbF^O$+9>C?Y$ zLY%Y*#dg)-O^ghX13M~Jy`SFH_3;#|I6wY9{0ha{U>sZb-Vf&C7i7lE&JAS)YTnoR zSbpi-j6Z+;YO1{bneNUTFB+nFfL`gtPhu+mL#j6E)=r+FFocw zecr!)H$yhBDN%LRdb%dY^B2ya8t23~C&m~U++%?MHKG3FWM+M+@`2C;Lj7amoCt|T zPu-#DWo2CB^RMx6aC%vAw9-GGME;d0{-7Q}J%l+~T*x20(ASS~Fymat{<`NN^@q#J zA8P&{bNJ*AE{yrf0sKs|2W$V*2T%4O6Kzbcl4n!Ox;!7uy&`*P{-FQ-4(}Mb5k1iF z2}n{t5gxBIe;o3_ADTB@*Mp5esDHTQ59VK4MvfI9%q6!sCdw!8w)LC-!1($7H(JCR z7vb>Sc9Z*JLk@jyNxc02H!TAu=5iN{>H4?*#b@q5LqGP9Z>Gz;=VDTfxcfZ$loYXT3YW(xq^Qr}r{PF+J6+>IbtP zupSFna!u{y<98;?4O1=1Gcd-T5o4SmV;JYdI3K^3F)$iFkd$~|dE}Nz#UA93hi{6M zc=*%FC%=~S(A(o2iT~(|&{)MEi&6hd^T!JG2zS;$s0WZc$RJ$EAA5@?sXQp^5Y#-F z@1)s-JaW1856vCU8U#O&pH22qHLtRo6njwnU_TP-98bh$DGh|)2AzXN7I_qPcyAjQ zDRV~z%iaEoYVKe2$G+0;^$%C>(D$zv{+JP-r1G!)$Bja6cfP7`)nBm=`;={8Uj{FG zbhkM#jPtCB|E4yYipc+FLB zkA0Q$;DQXvu!YDN^k?bq_y5=QI{yB%Uu{%~5Bg%pfz>i(^E&kVL0`hP&lJjvr}E_K z$8zMc2eRb;JJXRDXqTI>OIG!E=gvrxNvOwLmY0A&fH7i;j{>WphA;f%*2GvzHpiQWF-h_+t_I1APaV znsZQx_k8{!i_rJ6A+tv1VUa)fm$WPXAP+F#iJot25M+VN$sdgI8Q<$z|1fIDcA$5~ zKJXAV8Scv#y8KczwV2US{96+u{ANnG=!g(oNqF)Wu4*C8+)g^ttwT zEPt`vqkcor?H}KpBx{xx$*eY;q$P&Qlc)*CK6Mwn-R|DUc#pX*@4nF}r;b&tysLdX z%jLfLX_8?z*rPZ9gXEA2<3~$YN{HNbbBgTVS|%rtpmzuI*L1JO6Njqg!0rm!v%Oq8 zc9o;&MxDHIu2FplPIlC)e&xG1mCHudPFT4(UluLQk$Z2;RDCz6x7nqs+AQS-iISfY zFImZP=z$oAI=%78ok~pNQcaSQj2@nLF7UtG9n7Nj71ja%xi+w_5sWoFAUUaV za^_I&759Kp`*;&Q8fQ#QlJR3l8rKFt3e_>C;xox3xXl<-4 zzc)(kvA#0g&_B-mf1sy0a?}{94nY1D`hPrvK77wo8$exJ@&{RieLv_wXFm+~{@`O= zUdXDG1Bl1zJtu20--)?TTzH>x_~p_+nD51yp4(^MRR{Ki{Ra0GPm&$zmq=d<`DjCG zm8{1;ueBlfDk@X?%$K3R`wGO?E0PLiMMAzTHx(Z^Cy4_BeGE^&t>DFSs=o zbMnE+F*0%z!qYnB%Z z(6_LpRrXX)kz>{9)#s$S{2KV^#ff(K1FXokVSk6bv>4U< zn(=9W?gL{z>K^a^u363?9%fuj_LzTTilkeE#mks`zNp{!QD6|SF(Xy2u$!*6ArGrS z4)3q*Vi4*fTJ>8)Co3oGl(Y@8uv8@8!U9R#JIp#L4E>ZQW*{|@OS6i;A{z3mc z_bn$i#Q1MDbdQVr{{32FE#o+UecUph|0`yHxp7jMq{IapzmYD#k>rmA)K+Z{PLSDt zvGNf3W3{zJo=eDs52QrZxnlnhF7$pl>mQr5>*WY?cQ~(4%|qASC4W$pAbXGz_mR3Gw3#0DkMXf`T`=-R#`;Qm zMsUA+KbW_)e_JJba>IMxjqjZKCpN1|+8azN*Quvi?{YlP*q`&<@4+ko0^+~xrX-^V zYJxbpqqBcDj=_X}+Vkh6^(&|Gc=-98YyaS_RymD0nC!71IajyOOOaGF*aN?F{4N{+ zaTk9M*cU!FVuDncM9YKsWXO)qrHVPoAI{6kBUSPedOWh;@mGIpmw$YVI@G;jkiL#f z#VmiDCG<%B+jlcntt;j$Qg>sYNiG}{z2Tp}es*tO&;6pl!%#nVQ7-r}nuJH+DmPGWnZVNZdEZ>+e{#b+9oP9o4+e?+Eu%oC| z-PioV*q-@U$7&pmLEi^`-}HWPAs6TxRsGE#+#dOZ`iic3wU>EU*hkGCI#)~|!!qbO zE93K&=VN7Rnc|OSV62tUK$gINep7@=a)yqS%n>7`)hkdI#b*iqA6oxV{DJ(d6N8*T zcujQf6>s;%AJjj{A30tVq^Tra&A<01HtEf47(Xq(KSyjyaoy)$!TXV!n%L?6=y|TW zH=o_x*Qk6a%vpbmnqRw->py*>O|p^4Z@0jc&-zEGMWoq@oMeiPRJm7-7km2|y?Gty z*+2RHL^*n}Qn3ep3AfEbulU3u83#YL>-XBYe{meb{2_nuv67q+EK^%dvUX)5YKl<{ zIiEqOhnzWHEhi3F$y={C%GaMyQQAg-YhJw>8&~2r%=vofwPv~bTDt^J7$-x9T-^CK z#;I}Mj4@!0fvbHC_>3JTVSa}H-1Rz>Ka$3JEB=__6D1FXC(CoTQdtYVfZD+-YjGEU zP)AU8ui*XQdP`1&;t%Q^osF%GLG&yxVISkhZBD=KaBgY zkAeKL3ap`g=g>cvzym_>`3iVHo-pOf?4TG)A2LjmhYy!YzM=A9Oq$B!()_U-{+FZh zNVw)-={z%M|A)S<`AhG!J`cKYqP~AQ*WLC1;B`9={Yv>ikVi-V$KE2u*#)iY+Va}Z z_llA0Ly{!d%U|xAV^MkU{SohQKA+x?_C~WBG>%>~a zJ2#Z0=b}k0aj0RDl%Tl7UCmYYFUd)XQSa%GbHr_MU&tPxe>_P#c9*F6afSNrr0;{dSM;bbUyS=q##kDcqxge0ot7mR%hT+Cj{bwJz57T~wzT_) ziv?PldBiZ8=pQBvV^U>fZoOsBwAAR8uoqxuC?vHbDG27@3f1Ch=u>RG7 zQq(T)B*Sqd{^9PvCn=I;FG)D{@mH&i4kueZCH zsJ|W~6EVIbcQDUtbctH-WK zUyGHf&FfAJ(L8b*b&!uipJHCt=O0a0J`av3UdR3#qgQ%6{NA$1`6KsaqJN{0p?mbx z7#!?zgt7ldENqMcV+{0l3^?=0EbsI659Tg$(J?(^d2$D1d*(OoENqpN_17y6g8ZTD zUQrVu8|e7^V&Z1k_h|0WYv>??4i9MEspw+A7{!dC+a0PHM-mWZL0PtydN`B*YttYd||dUS0#xhAx8Bav4cBwj+H0=V1EZoLbPc*{ zAJ|hNH_o<+DcWDysCH{y&UG?pmrPSmw^O%IanLazy1?Ico5dE9kS?wWU-R zq8G@N<|MgsmKD81iq+$qJ6zX%&#{A5sFziTS^+Kc#mAGCZg@3t26XTp1W55^##u(^%40OjIoc|_suSYs^{<$J1^we>5Bx#y()m|c3xC{z z{HvUCe)1B$ru`9Da~t$>Z+*TD{TF)jexyitx=9|nHyd8t{`FMoWBLAzY3SupC3ntC zm8zmdXdUrlwOV@Y$KJ&v&}gg{3p5&&y#L$&=?6!K`S5MS!GRRF}kHjc{83m2b z_-*U?x2-ql$j@h-6l6ronw14^z2;;KdOeP#7s!U^3gs4PPqihnsy89ED6)ntf9U)A zeJ^4gzj>)1wF8=wn>D@PzC(Ka{!;6AUvELZH>-r8u04Bf_2&EZ^!}1Pn0rP3cm~I_9yNHMO)izEtnhq* zJC>O99sta)`IQ#kzQHF9WgrL0<-FOwURWNNcXo`q&Y54vU!*EN0Xd@uWl@VT=ms^!&l zb@J`!Q?F><+`f!a)|_VllGf@3@r6HzHC?XcH8Vcjh{KFAV2lA{3=IA;K>jd|^O3eF zlS~7DEDS~cdvmF5w3aE}&^33p?}O~2`J$se8y5@z8;SJaKkUtpD zbNjB^2Xnu6uvZ86jqJf3G43yOuaou9AwL+=aMJXY?rW-iyY>+$?j_j~ex z9Kks~i2XkRZ~fl#DY6|kj5p>p@2pmqCg;lS{*f{(B1Y22dC6<1>MuFAX57P^_`iNS z1-UFKsH=;<&mQ>0;r*~lJ^Hcz=4|67$7}ptGR#-_>}}9qX0}-+KP^_0!9eWY!CWtQ zzH(3d$H%#kb}&+!EmroTzubTQbZPauGhyJIZ&Cyf5}0*_PAPrG1b+$W7F5&f^aodVpYY z@CWq|^dLsB_gi98Bp3ZH{4uV4hg~DZPW+qW!gl$s<*?KsIM^eF_4=~%t0 zbr2slLB@<4VR+4rxWo7jGRA;028=P#Z)3ot{$VSZ=i&W$KGo54(3AeboFwL6kp-BG zME1BG{Gs!n_!(pmdOnoz1MI=R>szxOHLs|BFjtKH!Tc-o$1|29PI zwHCFd;M>-*yz82JL}r>v?!7%r&BOL37GoSmt%Egwe~X^dYnK;Edy`d4^O7XRZgOx( zH=pggFP`pmADOrH7;>-ZkH1)t@xRc^jqGt2aVzKCI}qDGupk}&m=G2F8GP`|Y0dOD z&|?$iH&#+iK~k0_I ze-Zv5(@^`M#-jN{`95-6WJfkU;#rQ|E6pDCs;o2@D*hmcPz!O#A5TC7nGQe9rbDliqUx5z_ zb4-dIs9*Fpo+5Yr<&$wS0alZ%u*h8Y9hCzKjeLPq|4Kf<;a>91+w}1Vqu;Z zbuHG%a?b5?_)Dr)t`~2=@k*n7_J>LRR!hy(cZZtW*MFKKZ@totF}~LuF$Rn=V2pvwFb16YW2S$sEC@)FHKr2TMEwK&u_pQFo`dvOaABQW z_8C7`f30-D6QTVdTKAw<(I4Jx?H}Q`wC95S!F(@jALI|_UTOZ&9(igXx_1ftm*{1s zDF>PdYVN}S@f7OsF0&RP7pqA1_qJa%Qu#l8hh8J)0YP#L`oTXB|M|uODTdOIGnV@71Jp_0 zTP=&wSG}>yEEy>YVz-%9?~XqCJLo^B4;}lU*2<6W;*+QM1OAoSldST^hm(8FM|yv` z{x9?vWR2Z3m?I~997FC7drlN&8tgHUxQ3o<#^NJTpTZm+1TS_xa#Lw(@<`KjBGl zu-Pn%A>M%ZygOe7J>TRGa>~88WlB+2oS5Qb!~(s;PKNNHuXuc%Tw%A0B{5E{@iFSQ zJ6}5cf@CDe$&yF&E?WEeYecAHD>SED7sVgUzq&T4lRt(y{2$~G*1uW}9c6u91GIo9 z*@n8b`;lw*Yv7M{In|0kp0sAlExuu0`p3D$wHGzVfBrn|Y?T`|e_py+&Cox(;g4i^ z&##}JA|JeYeoqbU?Vwlp55JozyEau|PB~o)v*I1hfL-d1&Y@fyBP>m&L#yiYGX`>XHWR<8ORvd1Ag<@g~- z4%P{bhqr&zDD(yOG@g3%JnL&w`(WLNcVBPD_oh`ohi1n)ZX16_pYt1M+EvY6 z=l=}j_P`sT#x*gni7^I@F)-N1fG7Ug1pfy;=UV$E!_Db-F_I@z;O0$Q~z1o_A zn!p)9_bBPD{=xcJi<0tWc3`|i|Iqy57bx?B6XY56eqWbcFYCb{TfrZ!zsvp5I>%L` ze^jD|8IDWmUp=3Vy2C~21D=#BH%|!d;t%FzxQkQz@)%R`WprT(&eKR90L{h%Mq-PmOvtd4D!l3@#0wZR74f19ztMm%PW z0b>jpV_@Kp0sglpc=?pmuD?OJIKPhX+VEtVmFi4({ zzuXX(D9cmIWFz#C&ESvSrIX|!>O&pIesF)ZkAnNBk5zMt^Ko41+dBVB@0&iKJO;&d z43JQ`Gfk$dU!w{j!%&rCq&AWkZ7@u87oK7Bm7cx(a9gLo@!7vb?wR4ZgQj2 zBs(oZ)~_s%l!0vJf8S zlAI_B_4hXF><%#Y;C~mjkMJOG^aZiYcJ%$&zq4HSVcEU4Otzu^)uy$mueTh%gdWXS z*K!_eV9jhZOIxiYzlwekPqlcRd4%jicKPkgjq-2b&v45G?l|FMALDnCbra|ZakmYQ zSN6)eb8d=J2Vnq?OCzotxN((nZH#MUjDeoV0Qn=@YrM3h-}eoEadO`T@CW*zZ({9T zC;njWmF_#Zqo`HI^d;~i=grfLiN_Sro02kY|YWhBU|f7B=F%e5v%yVX<3Ep}^?T-$C_ z{TkfGZtfmqU9OMbov7xwId8u9nF497jF;5JPzmw%HhP;6&=`;2^8lZ5l5Go<((EWH z%Z-+@oM?5s1ozpqFfTO>UI|}`3-g6PJyh%_%xNUW<2BKWDSF}$m6HYCB@f%*t|&0)+tWZOgGzc+j!MoiIjOktcO;~W`d zz!(F)83T$x(A&B#(js&GQY!wWG`>Nwvn{@9pXE8FwxWk2+u zL(qB-b@n;Y{K0r$bBA8L#{XCPes}zFK-Dj62ir}SorSHcuGw>$Rk8-heSd74%<+!u z;*aN1)92s6cb}`FW161UjAyo@2VfEF;i7N&1^G~&UU93{Dp|>~GIOFustaQ!B`H#@ zi0SwqGRMVm2S1DTaxL(b7oczoGn{qz=;E!uUMI z-%nD(wpp2Jk`7(%R@C6_i9M)+P!D_gRGq5xM)r8`jTYr|fAL7&C4cAKjYmGl&zV0b zMIK&|DS!Fck>lw4TE6C=-_Dd-Z5A1co+$c!7;7WGFvfr}28=OajDbrT1N>i&96L^$ zLlb3gK!W0r=S)SixwD6#&cD+BbN2n{Z~kEJm8<^2xL&h|bImL5`OtY+)IK(+)q+1T zpWF-m!UFXYn$N-FNf+?P zVAnqml%kI#bdSBA+6S*M`D1lH0UNpnK8mVE7l)nzd%>-E%)!W(+!R}YYL9h4Y<-Y3tD;@(E>L2^TReOt&dzFt~i{Ovd8I_7Z?u$;5>%Ahn z^pCmIEf>T>?&6y69{U&clf@6@!Y>Zbe>XL%_#Cy4F7D`~ze8yxU>4T!%}h;{<|>ms zhB~8+*;xOVv6qgo^#1bxckq7PenTp>mUys-i|3ra4{%Ibfk`&6DFs(_uLZH@5c?o@ z?5L32<|a#d0rJ@5!X-K~T%y96a|QM=a#{xcoI2~%22JorK3}Y4Wu!??PL^b*rAVeF zLOS3RarSuV+tftP!0$mH`#Wzmp$^q_Rhw$*WBF21kchrDsNshC(Nmi&^6Br}y2dJb z`Q6uB)EI3jOOVs>E4ebX9?w0kIeu@NWf!l}qh!qJ;Sw7$0Y0P%x$~wJ+4g*?s?|%* z`R?xi`+0iQYHpOiD}eW89!=>yo9)^r?{rO=NaGMcYCH-l2G%wN2WMG z{&&?P+}_7FS)0m+zJM7iiPBbYMK8i!#8M5)-{Cy3>$;!p&qnPdKNU51*>|ur7fi3Y zzbVNkRlAG%G2O*|KmKL9yoi1&iyp|9x^mP7P6(IS=x~XMjF8B%FbOttt_D4K=>G?w zv124DCQ>rM9AuB2>`X~dvBDP;t@=u8=Fn?u9`ygbe7aWt@OF!Qf!wDfd#cedJq>*) zlfW)^wT;Y-RCrC|@WuDaI3v(nlH9_Tf-7wWIA0vnGVtgXh|K`oGb@iHI zf5ow*hD&&`mzZMxQCBWRW=%G!dJh|+jkHuIpclNsANsl*Ya>Q9#(*&fj4^QWV}Se- zfH~N@fEdLe3%p`wWnAtr${&p3HFxMadd|)3Ugzxhp?x2^=9SLBqW9y4)EZfzav^`v z3ql`=_MczCABnm02>65bce6%$i=PvJOaqTCO(}KoN3PDlx(fLN{CEJ~^F8!_(%%Sfye&amvfv(&-|gU zqw=_bMX2ledXJXqP#=j6pCBQA<5drM{W@cP@&CKVxiik4F$Rn=V2l9=e^mQMD*m{0 zbd)TM&N`1jHX#4Vo&M2Lf!MVl^bazJ<__u#nmwHB?P}i#bq{*Zw`ZX4RXX~9fIT*) zpifD1g-7j!wXar~3dEH^Sbz7?_-s{wm;Ax{yIuN6U@ZE7m&gX{A6GGd97O(AN6BQ_ zUC=69avGG@wK}6pmZz4={NN;2|Ehj`up|y2CF6!)BfB?WS`DoC-e{G%GvFbIr=!n| z;i54*8#&6Hy z{{I;p)IJxFlRdY*FdLB zPq8U((F~)vl?lD=4)p3|pH24SXecwG?~GaLBYZ6xBsnog9=tO{>s&~BTvDcugx0{DvAKB>jfn^Ik=Ug_k?iG9=8@Pt- zm4Zgu44?hRtQuL9St-kK>~{nu$-D_MQZ+76;)jhCZ|EP-qDMD-CVPr$dV2gfXB%Y( zVtBh9`RyKfqNm4|w?pMwrARWiLoa(%l^Jz(v*qN0nm&6}$Pb)ber{=z&#){)ixZ1P6+r z*EqxTf$!O1`;BznU)H(`RGyDGRqIOgg65BG(x-sY%aY%@bXdAIF6 z?|66L$1gsbtm;~g9W`>$Uk}&oW85G7-!bDF8rRSm16TJLVE$DwboL^jAekK+FZ0HS z%i@S+*@2#e8xY%X%0TbItU8sOLw^8!pR@NM`|<57W9;haKS*YvZb637JfU-{=tI!; zt=#z|_&PER-={qvWDn+D>0amC3*bA?Yf<~LH3xY@s0F+^6Y(PLpc_JZ49*)hFxyUmr80Rm6*9?*I=sy@YY?QPG zM#~a-Ajn`_(OZ2_Zj*Erwn+!}i+&X5hH<}L`zC77#g$xhzx27+x{_u)UL$>u9p|@M zcIVg0_M9qQ=SuKLm8=DStgx5JeAHvU(Kl8~y#ghA=x~V(7$=JsX3N)qoO03paqeiH zOlm~mk8XPpqCcPqHc{-sx>?B<$x2H^{|qxUhio~vuSVsd^kx26$7a+>=;yd$8tPry zP#4#QKX~7ax<(U`({<)>t?~oY_q%d&f!usu8fx(-i6t>k;^Sf@G8()==Fm$gdqjo= ziT`*n)DJRhm|hM4DPs_`$47-D4=TAU?@BWP^^csicv_EOc56TI2V-O%A3J+KG<#70;OB15cle{3 z3r0^o7y9GL8?3$S>_4aPT<2XaOU#oc@j3Eze7Zai{&*bxvB(2|c;mk)7W~m17$r|3 z2Z?O69lb^N_NQ){ti2PD}XzwchKL# ze&t_%+OFzZ_4L`Ep8qHMy=`A#F6H0|`p#YXgZ(~C@E6aXWR-^yKi+zMnzYn_e^6J; zVoFlI5EHPDh>n&p`aI5Kj|hnXdj$B5H`wDUiSwv^(8H4gR;AZG7aD|S0`f-z%;z6S1qS41(2%ln+Sp>LBhSW}DMc30hl+ps3aqBr?yrC)Hr z62Tz%-;plwzSgXIiFg|GeEh9fn!(fwGIq4#MRNULH0~R*k}(F1F<^{=%R2^i{j1Ee z;E%{ene81e4@KBy17dG#3XH!uLJQf993;gcsL#qC+0;Pxlpr4O2ma8W4;>pj=UwTV zS7Z;?-eL`4_97vBY`}i8KMC1G^M~#~s6FRe`?!!lvfSz)K8TTGhK`g*{|H%}Qml@D zo6{p`Gfm981)bGo$jYXPyb$=)4lMx?11*MIRo{+;Qi42ahqSf%$X1?+2D`R zYlg}7ljEeNDnZ^x+|pOCtB!-%OSz`Zf;zUId!Kjl2XzQ?2YY{jJ2F!ekh78?kKB_b zucDsSx2UB>?Lu$+V%ML2FiGyZIRn~9lG~cV7K>SuFvpyUeu$aK)mQyUY__iYz=>wF zM1VQmu?KaJ0PpcekB_T_J@|jbTDvyrUE~3G+C_F2dVjzdUSF0dlN-&bX^Yo(dOUi| z9hyJfuE8Yy>=gKsqJsQo2sB&$KS>6O3HOoPuD7Gsbd#zP{r|J~9e`C8+25BWga83U z2=IUq9wCn|gd#j3gya!I5_(mN8Un@^6&s>F17h8^At(wKIttQkD2N&XV?)G-2#Dye z*t=qYkn{b{lzZnsLUDIlzrXu#^1JVz=`(j`?wpx3XO5*C>)BPgl%4LSn6OS=yZm%H zhJT$p6)uZ#S%m9AxDK3(IuOm@(}+k)jftZXO_J%%(;Cy|P1?|1oqE$99iYz^x{&Va z3?01KgFc7H{{B3%7V!}F3@pHzbtlh%Dyap<0N*0;+#ubB7X zbq`*P5o;eTccs=oc-=$uA6nn8*l&(~ANJZuGIZ~r#QF!Hf6n|zPTj_IUArEFznKgE zV?OquEN1=#=Y)&(59q9Q@gKQ=-nk#4vR=oNzhd5l%b3@47GYg!5!SR8V&BKZICJm; zocl2g`#<>nj~lRlbY4Pp8iO^E)SB_sra=wJmJgwUf#$RVJj994zBm>yz~`7{rMEgU z|Do4AaDGQ>+hph=Z6;(_wrm(A_MiN#{7-1Qcx<-pp+3|vQ>H0&?SpwCapoZNK)n8f zb4l0@qYccOw`?i)cer>DUjJY{yPgJO-GlWAor<;_4)eeNO^Co+ar4F=`<#!;_yZvq zg?-`eTcu#HxZK~t`_tLHGJd79Fpg)&VX*90bLdj59)0xMMHTGlYnV`rM&z}iwafY` z9^_~~eI@iIv~QC@JO>r7OW`sI*MV>y2-ksd9r$n7fe3ti5~@T}tE#ayq^Xb2YM4Uj zH*G^Vbm&EQU@yQO7>n|G*t0Q4W!^*cA3_ET{0HwL;PEW;4w{e9`#|)b4n0oiUmh!K zeOG#%%>MMeJdf>pUS6+zXnnha_W=LH>mOR~O7kD)`Umeh*K$|9_QCuI@BJ{>Kg|6f zQ=xx%LgUu<{*M|ckET^)D7$VWx~8q4?nS=mb;-rPcko@<1F`^nK$fX7JgQ*@M_q+p)Em zGQoH7o)bRf;6KH4m^=ud(;?3z;qwr&ujCl}PE2!7V{7b3Z`!=Md(A`0U9q0sL`uTC zM?J_~g?W#^PJhnh`o;-$r~}Jgfd@Dqk8mpOSRSiIvm~l{f_>u&r`4oB-J8;aIhmE7 zlg?*odYjY^^B!UTD_jS{bs$^^!gb(JsRJ?Ccikki2K8*vmgA)hWePABRe{=)yfxRz$HuxhwA+H2owXAbk^IXgWFb`rv^8=^)SI4P& z9?gH4zg)&9|H0|jnBN^|ejs17pkMgTZrL=oji0V+)15{)^3mW1DU?yCA$6&dK;GKb zvA27;;6D~Y*VC03bfm4DoHLot@%)LN*DUQv1F|8zWXN9$o`cUjhgm!5_vzUMd{0gb zx?@HUq0i@E*;9U^bg(`1Gmp*BqJGe6+V&*$adA4^BAqQ-w?2BWhgkD~o-01vT+3WR z7UsV>mk^HY)bcuf)<^Rujs7&ggLxX}d)l^YL2%(nb z)U5OEmY|>N#n(8gaKd%#)Yh$V`G(6kTnEB+;D5Ca)U8sLTE^6(uC?k=t|y7kX?Z$L zJ-r9bNX2@B;z91}(wAmqtSZhxhd!!>7?1N>1@DPq{z2act#JrBcyoX-< z;584;cj$8lHQ&KJ2=Dt~zC-gKdf&O;bIv>m!(9Im`mc_|f3W^5KL4XSWT_J{&zXK& zJ&eV>(abZX{x9D9@*u|Q^O5JJY7Eb7Hq29LK0yDTYQ95#xEdbis3Azc)5Rl z9@qVa=9BnLK2LldO2yvsQ@OTrqOd!6Y>z$WiB!9~+;e_1-z#2&Yu309^d_86>sIE_ z=X=ILhVd-A>Y|QRr`E}bb24#--Gs+b;W`km1K~Olt^itpfBo1?8UwVayhfqS%kbEFdt)AUaMev9=#sGyu``yA9}5X`4%3> z>pkbZ-$U~re9quJob$oZe2133GG(sxo^#f>tM{8Tzfl?gF|D~<|CL_<(ELYD@E?30 zN?NVDRFvF7$ewYWyyo)|)_fkpnh);*;dC>YkJ5aA{?+`!ANkdLVg8689baYqhbe>Q z@Oonf|H0|z_jX%z@Er|W(l}3Z>W4EvddJqG(;<7-EGn9=zr4NRIo2%8vUv|4+kgG( zIGSA4iRR(#G(I!qkBs-(?R#$wr_0XAn7@UW+O}*?>3$zg9NV65$6CizD{_P`t1tGB zIVG}IW?H}bY%KVyKG2Tgmf1k{UMx?~y=p zHEV>=i2e)l9l8 vzK+-B=Ga^xvL{S2z{+ouO~HRkNl_w(sP1IWrI9sauQuoji2= z4c%$++yLbTyi~nfRG3fx3)WX%Z^OUgabUO(gzLcnl{&!t(Gw!8QWK0rd)BT?{cGb~ z5bVXiEYU|dwCM~vo!)d$PwZ7r>xc1p9zEPM53*Q;Xi>&sT9%3P`TC5c<$bUhBx^Lr z=9qKOI*V5I8$)ZcKYLZbarC6x|FJqSj#hy0Sl;VQdW`o&cONd+QXc6#80QS)oDrNe zIIj!N8te?cTb=u3&qof;#(9Ih=VMlCKegXHi|)p`gLkzH(4B2FAbZuzwcq@v7F|I@ z@2;;i&4AwB>CI248&cZixuZA-Bk$W@5Ip1$?8uEwv1m-QCU7bsR2fs1<@4dvi z9eiE^&&N9J9Y^n#HF<~s#51qsTzOF^YR79IScj=>y@SnKwQEPoJ|87|y+`vM;6M0$ za~_vA1@BQOHq3kcU+L%mNIF@+R2{5owN8;buS~w8M~`mQr%wju|NRLwMf_^lP#Ht%TERgV#NI89&YkpV{6#DUSN4d7&4&mP>cmA1RZt+whnsTnEB+ zAY2E+b>LLhff|q@xiGyq-8*a~UDT)vof#QL=hTj+%e*+7uX87w+dGRM%*dvtIm76& z{=;eIfU{`LK%9S`Ga7uyNLrZ<9;6?hG4@>zvz7hMq*Z-J6Uzjx4d9Ht449?k+`-c>jm9^+c9j@Pu2rATNNhpf>L<~_CM{`vQfs=RSqHim@@TVr=Fr0Iku*PR zD6JSUj#dxE`6b}7IFG9_)?YmUdCoyz^YGmN9C|zl_TU9pf$vx|0Q|#%iEuMP{H`55 zfu0<6KCSGJefi9nfFD`K`$^#Dxxwet`au`ab3^3s)9~|5-b8w;e*rz63xE9!!Q-6^ zeh=lDTR^KI3-)NnNchdC=Z2jJvvIVf?W`j<&T{Aa?C>u?8EearSAWU5bl!K)I+WYt3`%j{2lioT9>nkODtM1kqlVCk5rb&humLo9a2^dDm?My# z9ia5|9*QUF3ckegtHU_{ufxZrrS+hG{rb?5!MT)^ok1O1`KUg45S9)5Bi{hl;Z-9h zTJR! !ELc&rhw1K~Olt^?sZ@ZYEdkys0vkk*U-v3Lo+dHwbDbip}vW7qa{c6?15 zUNw@=t`sNdS{A?*$IY#~(JffFnC|NUzN0-Aw`@mKl6`au z#*7!%iKl{UHEB$>S~NH=fjU*MK`m?77BW`}SpTR7IfWWlG}Xa={Dx7r$XlZpwT`S# z{cr~OxVlYfRCFyGi+wT|VUNUQua9nO*M;V$_oand18F&Uu(gB7(3&Bm>FHtT(o?|N z!C3d{e>Qlqu>jV5z!N;41D+)B9Pk?Y7wa2CCeRb$Mb-?$I>x~9w3^pN;O>b$taJ1q z51s>j3(Q#7>ZySR^wfX?@GvkRI+30kUI@S7Z3do=vL8%$VBgAhjZ$dRX^p55>m1jm zw5EGAd(+zdQS|z>%V_WHTj`e-^XbRsi)r7|#kA(;8!5X>6UZY4Xb1LPe7{fu%j>nd_LO^8k7ruB$sk?`%q?PI`!(+gL?MtZu2FfVQRX2_pX$d)}8wH%@BOe z$dQBT%rl1)|K?_AQu~%ER1f`ExNiJ8bt7Ev;c^exfp8rN*Ma|h9f-y}S;x3Idimy? z=!4sDqwf|xK;JF7pSIn09j!TU49(3A&}B^<;f(Cl=-k+vbbfpSO-*S@f9ueV=4Iy4 z;+&!MDAq<+9^Gn(cyIqseIiMI`Z6d`fm9n zv}@7BH1mSg{hr*I#)CtytKXUN0GZOxY^l6VCdtZn~};bX0YxUGI#llu!Ay zd5y~A{|aj^i{}L>yLU_Mfrq{=wbs!R=Ls_3(KI=k8oSOh$67}cuXiL;b8lnFy#UP{ zk}t6yHH@zv<~`76{_1@%pN~{Nk6_O?dr;-3=c;NbnsxESm@Emr19CFADR(fBky+S8r$G z{DtdqxDJHtfLRATkVks*x@+j8d+(wz7u-t~&o8I)jmzklwGYvc7}I_>_b%FY)Ah7r z()slG*`sN0UN%i{-+|7r-++o5HlnG`ec%h);S9sB^iZ!%TG%^>mIV4^zdFX_z4B-g z_K+;;&3j0223}8`L*WOH(G}-#cguvXEu1UZEuHQ;18W_fyVLFMv9{5s6W!S2bnIbh zOTnZTbX9|=nKzkWLGS44^dyW9Y>zFQU@hCeyxo zchV0_AECYT9-#XQ3#e7?8dMWJM-=i|tqNqRG1nOhIV|QuVyvnZ3$uDSAEkXv4O(*P z74-e86?9m8Q4D8V>lk+q4^L9!DR#-+_SSXY3=y4>8)wk z(%!poqc7&oqFtPeqFnm4n4n=DqdVlM_yb^hc|%#cwq&7wR|3Jn|m)^K4>7- ziLj_)y_z(zPjkBAny&Qf3xkfkuEFag>!1T`3gocn-ktt0?M1JQKRDH9A8s2-7Z;>b zC#-$6hQ43HcVK@<6EF66D856id0?%BWvr60*3qJQB6Vq>M7_>vO1-)yQOl+YkiD-- z(U7G#+e-NPuiJN4jf|wkdI{7ywf#~22lFA!Hw+q-(MUuU~*tpc5;mlCucIb@H!UC&TYH{BFZ_AY2Fj z%5{L(2JRd?lJ+gQpWeS`1|4|`{KqDYWw$&=M=+*6wBa%O_35Sb-KvM_i$!zj9}nL{ zd+)uIcHDV0y?Xs*dSc?)G=DJmjc4@4xVjBp*F2eu5)$ajdW~sHVl$eGGY_XWOQEUB zEx@Y)SU_PJ)crC5a7ba^-?1atZgOr_qBsed)20 z!)e|56X>z-Ams-c0c{F@2CG^JMrqjm{&!*474}CKK9;9J5((^F*jpbCaX)TqPBE6ee(~(zK zQ2CancwRz>Uwo7ftY1RA9=?mV&byCtTD77EHLB8t(QU<^j(1)gF66I{#|y9=6Ym*c zj`K6l8{3ZN-R^oi8za- zDGlnELKDWdr6Krj)hvN(R*(L}GWUPwKH`5NZ@kB%eq3!j9cORobr18G*FgIA%@pet zmGTOe$YxdMPVyu}{}>-LYAEGk9V7+yHq3*B$0Pp>?J=Cka6J##fxmto;Ia4RebVW@ z2kxSe=if<(Uw)LzHZ7uqn-B z578G(=FnGr%gqxbIuZ*kwPv=`(1kM6yNK6~gM`U>)3UoUxp zzFImL@jXaCteQ{1JhhO1duA~mDOpKJHa$*9wyZ$fR?_dA7gNQ{kI_$SAEr0&xrt_s z8%j-Lqo`_C?B8Vm1M3_X)1F-!T6FX+8L|rxwwdYZuTzAAguWT{e$CdGta0Z25fJzh)84 z=F?u#yBCAEd*mK^|Dl=m-a~iOdstWbVE!!Hg}m)X-u5h;OCKYDI~Re+c{$sAVal(-7@+HJk{Z?>#5?s7wE`4&jah}$lL3HXXx{nJlL~KY1e|;^z_X)P`b}cx8i)Voo|oCn#b9Hh==&cuF*6f=PT!rY%BJU@ZON) z@hyLb9p{PDwd1W3G@^eiO7SLAqeK8a2kX*h`6|tGu#8pbc8QdZb&hjKwWeEd@Y9Uo z8PumI^z7CP@Add!?ekd%t5!@kYSzdD8LUo~@*u4Diq|fVxn6OSJV<4H$%)L)1P{^= za$L!nr-=^lM+&b?qQ3sGw$*UH!|y&^2mTs$AO`(dF2-x?rd>_@md&CAC5!1m=_2}V z^CNU<(|ju5wi09C)pY31HFU7_aiXnH6JgGsQNDSt7?)SPfie24Yv}MRkJF)-SJC(2 z558Z!kiK2@2z|Zc5j-!Z@19sp-!h(DLSL>~NT05lM;|YLfIePl@=LcW#+G?bA3H?^GkbW+iPd~l%2>t%b0<7CC zqaW7Hr8j2Hpx~%nYE&IMDXT_M6@0U+L_|ye18W}<5m*C(9^NY07s31q?+qE)xjpS$ zw;X)TYC60HJO|=Fh`0}c|2P2t>-RU;QrT9N!}cfX@Vo1XKHLCoB--^d(Z^fx3w*R0 zc!hp^;~Dz-^=HKIPp>^qUn9KlwydSEH?I-TpM$^o^o2+1vlkzuf0nEeIPmU9DtrG$ zfrIbAOow-u68&Qv(dXOf$iCO;$XwF zKs)Epp;?6!DX)7|n*FyldTMzN_I(TyvQ&IN2Cs3P3_rr_Ak2dljys(e;P(@p3v#Tz z>!+IkkZB$#_O5*X@o4(!osqQT?cucXnLN5^d^>9Gg|1wzZ8U|vN>j`idy^VdtLBZ# z-!X~$r8lE7!&*^rau<5!{@(Q9ed$y*@pS6g+Cw#}RSkd7|HsEPtiQG{??Z>~TjoLd zEOPf6NLT3M?T!5%&}V%tnWa{q)ev~%Iz^xek!7-K(%G4}#Gi1GZ7`2FRzrF3u`c#F4IQw5K`-vCd5 zv3SMSC+X1EwRG^^C+P5dPt)P|pQ0o0K0`;|e-6LTV?4Y8?l)2eKfj0H4_=Vifq8tO z{6o;YN~q%F%@{*t{QTjwRIwAl@1gge#5f;g{_Sh14CCs<+n=CvjQtP44xZqRm5BFo zI{4NKr1eqy{jH_o4Zw?Rd5|iw2J+2{S@il{#WZATf}^s)oJkQ8<&ZMKgMD)dKnzyh0hT^}O*E))v;$;dh=x{x;Cz9nVwwM=#KC zA3saKfATz)?R%aM?t6g_e^x?AKHowWU%pNiU%i3ft@8KlH>pD78<>5wjViux7~gG`_!@qHfc^Ju2YmlN9scSaI{fu^@m%r!yHpPILx|(|FG{KG^H-?ipRZB{ zc#?{}&!haGrJr6|LBGDViuNvfklvd&ho%e~M4njevp+4CS~QKPp}8qEV@fw#z95UX zzd8)(4URpj^$eE1di3Ee!Gqj&QxE!RJFlfwu0QKk@gTe}{u=<#I%dSYcZcR@)L3;G?i#_G6kM~4t7N^2~1oo*1 z(z}xv>oj2=#Cd1o`Wr5ba2*KOfp8u8zf}h!A$!yWx^}OG-pHMgLeA+~@Ew>#Klthr ztS2m@pE0ig{e7%E?0TBYcW)hDuMY+bm-%ksQi;nba)?QGnIe# zs=(n-OF_RPo{zxn$UiWL&-nZeI)X9!kuTn)a>kd8*A-y@#cOm3WBS9NmcZ{zboi4O z=-{sPbnwIH=-`fLsqDjb^!tuyKtD-k@2(QO$M3I$N8|NRW(5_RVxjRu5_b zxhv*BSoSIk`mQ3G7vX&%pauVdJ;srd(Enev8ntc^N9*sujef#9%P){Q`)wQ6Ty||l z-jD{)7t&t-IrxPiz)O6O^y9Z2zvav`{O}F{{@{D?3*Ws*6+i7zc%LeM-ic@Y{`4W9 zKLB9&%MLp7E8|1p1Mz$K=lAHaK_B|%Bhb494*j%~4#EH7Up}PrpYbc)!S8o(gNJ#8 z4(;8D^sd1=5OfEuf1I}5aSQEP{wNLX)R9=Wgxe*{xYvL#ulQQfN!%=+@<+9yJ8$eE z)}c{d5zEajG^^w^60YjQt8qO9caT7c}kD(ACu`iUOb_8yiW7})?u_|;{e(W zytKYQty#f5M<04}RW?1nrk}u5tF!6OTcN|?=I(U&-+Ivf_w=Gg4`cpnI#LC89;{){yc z=4nP?KYO58cOi=vQ#H&x|2OJHIF4{X5v~K_IuNb{|M@z=dq4)ZZ$+=nn@L|nckAIT zka2ot8TgMS^fT5M4t|7j{=N-#@Qck<_SI|jJNSh|U%yS|Ut_Gje;Xb8C&u9TE&uXu z%*_Ls=Rf$(b}IYs9r_*P@k8Gpjq>l`!&u$HL5$fCVZL9OeYYLqAdWA<$9&2B$g6bt zpId-e=+HlqhJS9RgWyjNeT?;o51tZhA?2@P-$UsV@E?!St~oc+JNMm27iIdX0rqu7 zGyj2oACXm}1^>Zv7Gf_5bniw&?@ctua#){j zpz^O?2EcoK`!2@&%vXTd0O+UpfDeek4-ohR`e~QK9`F|*+c@&`9wLKgyYgQ@ro+Fv z5o&hm*F7Y$3%|S7voiZ-4|tJ1bnq9H;SX=o0j$ORf_0(aq5q2I-rkyhJH5Ab0X3)< zTj>~^&nSzYp>VDue9B6aq zRc^bX8=W<{C3R`rkZK{{)xdLy`;z~BU-DNe(^@ex*bCASJV@)K&LreBJNPX0QP`7l zD%LnoCQLpHF|(JSk{dUqFb@*0$A6V}7tY83-*tKT_-ik_;=;khy(7*We@TskYrT^$ zyyVggFYfO5w(t(h8kX62bl0eeIK0L531?qF^_pv@U6T$%T*WEkN>*f*h-pzVanrmR zijIl%W_aUbte~RfVxl78z;gT-i%VHsR-8Xr5%hChxZ+ad>cmII#J9*hEh569<67iK zL_x=rH7O>w`W1$K3}2R|eyo%f4y5ucCMMOgs=;Nta2+#AII~HF!k41qM$&;LOLF4k z+Ke3ecS-*=cH~g`E z5Xi_F6bRrE7vFnigUap^5fMm3CRApTEgiN;W?#|lKQ%T2{zdt~QJOTcY3)z`O3yJU zC#I3AkP?RhDhSsR;U4kk=H#STub!()v}0agmzbFPty^cy@H}woY1KE7-JNNKu1ZSU zT2U|%S4<34Oj(u}*%nt^oL4!C$!(L^Cf6x&SWg3#t^R?D6LPUOb$+!62vmtUyhwwq^ z_iI^+$$6uO4I4Jdn&%4J*uXQyDC_M0XvfUMuB>7qZMx=_ZW{hw_Q}a^8c}lp^)rfG^k2xItG___NUyy3eItD?8sWQW_;=Ar zuZxyNfcBk`EFZ0i9$DFWdBcVkB#+C$+lv+bp@>k$r=t%rjrd$N!gtZge`x=qzCJ-+ zfBjhlh71`H2n-v5@K%g;|G`Ln8bpNxA!z=<=j7<`d!pCtodP8D`{Jv19dEHW=&hsb zKjKfo2uzL!Qaqf0v%gGC_Igs1ljCC}k`v(>4&cIQPoU;5UAS=RT#;YP@<*j*rCC9a z$iCuJa@?aV3!S8FtL!E@5gl%#F5tAl`lU;w5C$wmqWYflyHXh~kJylOKSz43HcjJJ#a|j?bhyK9lC~ zP1<%Z`9sS>Nt@#v+r6|ug8EbvNtB;VG!ZxtSm0afTkR|NRrngWtqr==SJ=YWwq;wQ zjTX@hz>B~#;4$DiU{)0(99u!nfK(v484-?Gr0zfuAko{@i>(eg+hRk+#}VI0bjCAO z8B?G=QD*yX5ugx4Qy>-S2%H0)3wW&sUuBfOE`C~sA7w6~f!##`N6!`s1oE<$K# zAvT~nkOKIC7C=kuX={DN#)vl}8hSf+Og}ushvag%(oB z8}F^_?ctPJEX z9Z$W13?LH-0DXWgpf8XO^aFB$Tp$nVZ?$PgGyqQnfkD7vU;XOo_5z;(vyhI3_+11n23C5Bmf|-b;XaDr@%UYi z-xa{)z)D~Vuo_rny^h?hwRYkD1n4J$r-19>=NW4w+SfWz&sr_LuOxRwttf{1dYEhg zo(G139u7{X?g2J5 zPxm5R_}&P-01WX}f%#BhB<>@8r{R94uP*Lmd<}3v+t(QPd><5z(*$2z+zWl3alg>l z6Zaxtf81{a?rBCe8<+{q0`?)Lp8}r&{{a38d=Bgfz5u=iz5>1mz5%`kz5~7oegJ+1 zegb|5egS?3egh5wzXN5!LEsQ@7$^sh02KfMYW~u~0Ew@Def{V^aq);LE4?b1Mw^a` zf+{Y99z0@14mw6@9}|<9n4X@PsK21hZT99cRCsWBZEkM1?H=K?6NFhs1kkT9JI1Bm zr(ytytBx8Gr!%uxy*duBx6`A%NLqT%O4H$GWSliIE31zaUrvr6r%qymO}e)%4iJ|; z;OjDg!|079Nf+!NS3gZl`?M(R9~2ktjS_%2kzG6eBEL?KC&jq!ElY);rNWcr51lwM z{%{RHFy1KE;|+Ed2YvzHKz-G&6F036uDZ3PNkr8sk^BK&B#jX_&k=gPy(P_)uO_X- z(Z6a4$&3sxumYMBP!8hb<9PxTBW7v96PPGq@HdhUoxl{_M0aBXQ@K;Y{l_LSF)VRP zrC5b-{CGT);Q1iVzplSLb-%Kns1U~<%B#uOIX>HA|7n6*{=#E+aY$iVwW zi`EmElSJn!Zj+E()NWY}mE5QCa)G-w3Rf-$1m&U!z&ePu0GF03Kh#t`;pf;p42Bhp zq_`(AF=d0!-ivbPH(-aa$^$ji#bBTl))SaH7|gQ=*94|^{U4dYlsVA(iBK&H`9~@< zGNdinAalaS&K_6~dGQ<83<#Tm;6)tO|6oE>et(WXf!U%_M1-oLt_cp5CwE^Aj?k$M z`~-tkZL5~6Dw)BQ(dTxPUsQaLb6OeS2mAZfkJF9?8eTlWHK2?B{^bqi5JtC__AxP< z7V+bA=nn>ic5fIm!G*VBPEc7EFF-mgkTHod zZKk!sU6zg_l^I9r%rDiD?Fny}t7e4mA7d6chf;ZkiLahHKF}9M=dz_*V=xJn8i56@v8fGJQyVMo?5(NoPn(`RD$g zr}ywd2y*q7;W_DL+H8L+KF)w0zsQYRuwaJWVfdK}?QikEWpYG(qW^^vo66>eT7jyn z!{_$xZg0Y^;l5aXu=V#^rY3+-rp&Jhk6*X$+2Z4|h>Ue*y|A3a1dMVl%RL)*Te5pL zcg08!ksBL6|M?!Q7l>ewzLjYsb}!2}<*XdlzN03JDSa&Jur1q11cHGGIe&}nrg`x$ z`BJT2eSct}-ShiGtG4}vPKZ_SPxLOryWwASPbMwPP=<%QonDo0J^iTjN487(pr;RY zHtp$1<<54m9N6yJp7Vn*N`y{NoPUJ4v_wNJ29$}S%aEbj`A2!+%jT7)@*d+6p8(s4 zYo~dIe$M2qpgsMU;LjRi_riuhuD}^+QW?Swzr}bXdch7ARTiILu?Kd2mrIKJ`-mW< ze@i;YJ;>pyw;Rwk6y~bI==wx4c7e$PEMtGhWtVrz^ra~Gn79}$H{wdyKHT5Sw1BK$ zdc0+}SLs9ewih6o{|mxM=ihO!^QQz{Fm)y`y&$RIuSRDy^z47Aviq`0QgNQ3mhAQvLSy_c9U6`DlWzx>GV-pioEdHe(UcofL zaz06D`ks7aKn)6=fohKI3A}?GW{KX@^*vx~Bp8m3WTTtpo)WBFt5&Ymvwzou8#}_K z#|}nsEcy$k<=ev@1(u333SB_7tZDM%aPZDd`;JvHCkJ!^x&wtRUi0ysW)D2~0s=r5 zkPYMk1AsxmFklog9+&`31PXx*fs24kfJ=cZfP0!f>3iD8a~~UhFXDGrvvt1b@H?|v ziEk5rudIrhFW?&BTHx4omX*y{-iH~n7MRUw3A6%Q18uAaVcHf??SRuQo|%kKma~*| zVAI~3i+cy_0o+rquTyw_G9UL&)_B}ITLrjxu_oYthBXoQuGV?Dce4s{_gm-V-rc$Y z_Z|qnCm`o5A3|vE`O3Jcdm`7tUBHTunicshp88nLqMpNVmbD)DzE-`c`yw~sDcgD; z_kPw!+;glZQTIo_fTvt5I%;m@i+IYz9KcKX?Qb=TnituoSqYv8STEx~&`OMYC~^~? z23ZeBZpQCmD=BJzOxA8j``5gzynNd9_%JZP9QQKi(V7-I; z1S>P@UHne8-oyPo>x`)P@mpwpfcyE@4%{!WKE(Y(YgE)u{9a_874;E*FSd5!US#dY z{Ss>r?w490<9?Zy9<>+0ldO!WPw;!WwGa0ztWR;j(i$0crS%z}uCo4t`_@3mH+s4ww*o%I#&Q;~}xAm>wIin=!y2m-~xG~h%%M+G|$HJ+#b)%@f;k_!|nj~06f3Pv!$I7 z_8CA|fae5xo{#7BcdY-&EfgeJy-Gm}J6TAD}PL56A&>f&RciU@$NQ zh{L>RyswUrXHpyZ>ig>9sSD;gd-%Hh{Jw6!uD&y1(hl>VoqQdAslE=r_P*0$l8D*S zWM4C%*VojS*ve%_4Q@>`uGCAOkakt zw=dn-3oeFMMePMf03(4hz*t}$a5hln!)!f%3xM;0^MMP1i-98GGGG#Lk&owq8~Ymh z8saGyGrF~XweZBVw3k;!4FV$Am^oT#?#+`zXLqu?ExAB zi9iz|3E;J%CoH)(#A`%6oBlGubF?|2*W&jr;8}oY-gf~!qrU*FNODeJ&eRrfo;&xK zFTS8JzOcVM)AkqQ+AKa1mK7aa;YqE?FHxiw>q*T|^*};I8Q?h@W;ShstKv($cMF>4 z?<*)Q@}w4So6|cQBVS9=`P&|hj%^BhUur?uZw-47U;L#KKbBQgWQQC25F5>L)@}@! z#lrp0NuX^?eJCZ(4z&MGrJSYR4@&x2f~LE7Yxi6N$iH)evImeTxXzA^Wr5ym()M$x zMW{z45OEawt+c{TC3{Ot3#H%}n@rxyS1@+#6waQN2B*06zy?$8CLJs-&G*MfmzD-) z`5*y7HZf>BP5b~UBo0uI4UjB*KqlQ46;%`o2ohZRj(4{Q>(AMN*%;|SmS^cLlJXZ7 z`6ur|dM67SL1S=XTqrtm=@La@ipy|T?_5?Gb(~ z{Ob3M%1~OmckkXkB`W`M{-V;-3Qmx8Uyd3O1PaR~&D9atrb1QU%8J;su&}61+E)}7 zTrlN={DMMNUW(4o|IzSo)Mt)KM5p3Ywb`!ENuoBO{;2ZUkEo_hL8SX-ct7Tg%Z_jJ z7g$N$%$Kw;-G88B?=~ktqO6%z`4#!&AXNI4{f@oCSixxsd(NYZ5B91($?$3ST&^v4 zdO2uusqjToHg7J}vVDTyy_*UPrGH`NNh{Rpg+1Il;nC(>xVpZ)S#iT@vbm(Ds`9t2 z=_TS7N67HfWb=uQ754l#rFkWHenW`J?8=0zDX~Gjy;}S7^SQK93G5JprKkY9{1OpU z5uB^`&5nYlXaw5cUowJhp);PRnyPe*Zo;^v{f6;0au}@a&Rvz zfO0P#JMIzwe%j3!Cq-O)ICx#&Fp;m=$&a)T+EqZOPdDj3lM9{tA^eN}QwAQFnp)1U zq-&z2ap%%7%Y$FJ{r+JOk}H7io-I)UY+BZz;^DfRvN{RyNIsaK^d$md zJ9gulB*UA$#}3zia3oDpb1dE9*&0>NMWg<>XbZua?)iIc(*7d9-GRvHdS9}2E1@{v zdRx*?|H0oQj=w^77^1)6_)VJQH))Q~q|vvzzJKiB{2sD@lg9VhOX_cK>EjQLU70S?c4EvX9I4| zqCM;HK~m@Z^8B*={LV?zy@4Dy&7U+9~G;1FDcqjxUOZslUjR zYI>Ox>o>m4oIlw?kJtS(d~taf7EaC2F99(PJ<-(0e2MVnO%@J6BLJ&ntJA(ce!J%r zPLVz&&`g14A@@Z)Wk3l3t*u+%=Jw@GEEVtG{mIVVGX1FU?)rdn2YRb~{XS$c>f0hd z2i$kqmx`sSHc)h#rqwTx+{LA6)p6P3+5WY?_OHB=rqyp~dTjg9nRVNt3W$FyGppQG zyM)||^4~S&lE%GLyD4)?S41Chx$BnN+vWd2wCK!WCY^P&{Y(0Q?O%F>ps6c7@Nlm1 zFw?B;kDjUZq)BE+S1DD3#d^GffIO+w(2Y5lC$=J1)7-(C-+S&rOqx3!ljaW2MWX{U zX?y@&G{-u*@l@2uOYH=x@q^$;WC!bv7dU=%{2)76$DTVp)1LkNMV`|{`0U@L*}qAP z50>HH>f&h^ozCr5`se(a;|1pfAlsl!A9uNumg#e7=K~<^WqJ*JZWHLx^y}h8_c|Y6 z0NMYG4-Q&0F3B%(d?wBDnKXxQ((ImNVTb7awY#)IQ@mg}nvN~hc z&s<4%nW!%aFY~D@m8A(BTDmq@)=U$3q-!hYS7FfjNxB~3#mVX*F*mV*C)N+_45T+`-_@5=BvKdS5@b-<2TEXD0OENL1D zOPaFyglez<>Q;H(Ub#JoB~4j8LAJBd{Gq^s3R&U3atk1}R=8zJ&f<0fJm>RJ{+fTX-FI4guPVDrm zbe}>=Q_hhRti<hCDI*7{VsHRc=MIlK4ZhPfl*|Te|Z&EdsWra$b>iP@^ zqNQ+oIqr@ANvJ}J5&VZ^&#pPXG#P;!|JZ`{vC_Rm<6XeH*?vtE?q6m3|Lc;boL{sI zV|*Y@gaPUU%M`fnrHQuZ+_>$*?6@RNr3>wzO8`EwZ-OsLIpw3jExLR(?Upok%Ez0* zA#e=NWxp0>WKQ%suH+NziaC+wspALj2BmRgNmRU(KPqV|BGHnocpcctWvecN9T&2= z>%??AmZT{=z|J8Su=ZwTXy@>2l#yHVmfbj#vi!9S{XT$$wk1v3-t3Q-W5$Lh* z1fwl!iX-8v4lo253KRenfl0vSK%)rw0i@)e*DGc0r1V`2P+HoKCGA)W??lq3ES1Om zj+X(C0byy=u(au)A#M6J>fWmWON6o%DDMJiDbanvbHEn>O9_5s4ULj}!8d{8z29$I zRbawWr7Shb(xlq}mK@|A;4EeOKEP6jEJ=6-(9)(6Rkp(?%bP}4c?VC?XkXQUPhnD- z#Az(-Y5_07zBYb&&;DunmD&P$4z@CxQx9C6jLd06xN8J72D$@1fL=g4kO>5UKER(V zbDD(|^aFB$5x_{`EMPP+24I=fvG~;*H(1{R>pGYKoCjPATm~FZ=JZ*EsPr4>S^qOh=QVzgMq#0sD53c4sJPGZeCCbps?R&RBK7jJ$=MZT9kgJE&YKw!o3 zm=|)5==>u6$8;oe#!l2I0gJJ2w^H7e#ZHAe%bae9%xQfsb6U8g2r`YST`yMtw9M%q zTjtaq9u`T(rA6QVb(vEm>lN-em{R$%AkE3?OGW(>7wYS_y$AN|HDnaf6l5QlY7ej% z5}PF|Or{}oYP*lFoz%6k)RB7O`fbXbrsapooazLqdY>6iF-R^p)G?#jV#)ZyC!k z;o4dz?Va`=LYEl+A#>QTA=cuq+~L+j5S;-_tDYp#13EOA63&Y z+FzOs5BYM*oWecV0Q-GN$MB)t!&f<1=p8$xf2KwHRQRBgK3pn&wtYE527${?U$mt6 z{Cqy4C=AXV%0qk~Scb)w zesnXg_X(L7SN(u{7mXU_q9KIjqLB_&e`I_do>O0BY$5?F^BkUI?}&67@6RQ}X}b{q zIduq4bTC{3oEnoxe7eI@$yg#XEQItN?cIW&c4DoD&`#%NU&c1SfL5 z!|r8%Wcf0!OxQrC5AuYi`~sAJJ2Z!uZ^H>+esNg_G>*gb7v;0aXTFy4X9-0Spa?%` zXHVB3nFXhPatfXFVooch{n>9sy${ebMXG+IyvwBlrv{X(zeQ^fDPNc%$4>l01~MNZ zsPGYpviGDWa*%G3QoToM&$?JoI_&H{Ou9acPn*#m;HI$ z;`Qtm=|hDT0Uv!UD^q4DK1h^_@(}H}SW7rN{Zr80zd3s>WPah_F9J)GwDG+Y4TkHA z>i;wiBU}}bCCx{DP$@xwD2513C-NxF{xRsc0qBF3dRly!k+1Ou$H! z(Y$A}L{oF-%-R0qk89`5oWmxfz8K#J;mVXb=OL09KJ%=rxO8lSMs3m!IE`&RT;JuT z>kE&x-7===B=Ik=5Se%RwKKmj!kPV=o{i;MS3P5^Wn6g{HXf)89Ba0=KI|F*JX_0it2|r#0Hv_lwR%RDXJEZRGk|AedG?iOU3op~Wy`H0 zfampj?%tfO<=I)Dt>sk!o}XnMxl%&_>-0Uj+1jILFSB?F)}JN6Hn_Wvn!=hca}n~6 z)l;lh~9djS@`z3qk#kUp^9>q*T+i9wzK7lN1O`VQGaacP~BtZ0@mLx)!i_8XeD zKrGQ~|N7UZ^h=ekw&PzNuRe$>BSYGvK4j+&D^T?Th5ZMQqKb&F5uY58@;@A+Sigo8 zkgQ*rUGYNRi(ij;>9Cgz@OC+HeH3+4*^B3NIC9>PNV-lxqENJ#ql2nNmcC?dt&+qY zxi<y4U|1fX-e#wtb7QAp z=8d!Dw$Dq85C+oTKKh8IYckUCdiDFPPz^@E9}%_@zM#=s^nhC=ZPu(6rFQz*&XKPT zZNEp!zsTm|^{Voa@)#`9A=B@d%}1U@g}TxzOPW`5#~atJ&Sjg%@^*oAX@-IkMWEk5 zOt}akA1Uoo)!DV}Uf2gv3zR+N|J<5fElatNh+rpn`0D+j98*P+s{A>sT&1#ajyfx6 zl6@4JbPOL(dnuP)o=hL^GW{xinLeafrO&o!p-d3C?DR!Q`kZ`NX-l>jH6SQ05wpyn z+_BGwqBwNBkosPMr6Np4e4C;NC@}M!9JC z?~#q}U(3@YR#kswd>oz`K8I)09G*$r-(&T@Q}y>*(IUMWepNqZXn|tRlFTpcgEE7t zx%j?Y$eI{HsPctLswhtJy$7YsL)917d@BM_^+m;C)+bTIdPpH(9^yc!p_-@>zmjJ| z`N-jd9hwRcv`nlSzL7r652Uz{hC<}6P$Sj%UgX);USi{Qg^in;4{PKw^nJ9r7g-@i z+W01_fE84zr2_|a%?!fqx{3#_Kn)^ zvWI*3`}Cl5R3&Ez3!QJc1R2Wz>DgL6*Q#f0wWO<@mF2nAn;=tmGjI!V8}K*a@4y|v zUBKPIOdvY>UflJ3?SpuJ1US)b?SjarkS$yamyZD}fbe{6c)s?}n6G^tb?;d7wJTw# z=W87q+aIhmQFmF&b`|V-&UQ6^dB%1Pe%As|0tY}ph2M3+v%qtJp0QnzXO^(#v#&Pb zc^2jgk2PcaJnUZpc*gcc{OTFom+*Y78QYg(cQP}!o8ayh;8ox?;C0{);7wpF@D{KQ z_;Y7$e?ba<1?22$Wm2pxUu({tw(v@=x_S;(ORpYp&X(s`c^;nUS$S^t3B<^AwzDJa z;%)Ps?P6dvAm?ni;AvT83hW-h)AGm`@c%TPcwWDhT>)B4t0`rx=Vr}$Tb`Zed0Q#9 z&63*A%<~O zOF@6VIY#+CceqPUvvvo39gTBS1m!;H`?%T>cx36`?Ode_bF$*nqo;pUJAw{TpS$Jc zw=(SzIBD1lJ!o5e*6o{`{NY`TxWd{IFjR~PpTmVVp+>JL4<5|hqvgtGZ<*26vrRnM z6m$mHCowt~v$wjvacdLYoSI!RcPF!ZvwvXvM6*_ zr|29m?$zD>ztf(1zL&pPB7U{|UF|nUBbNE)FJM}L=j&zrW%nkXic&CW-X3hyBEu*@ zTv8i@438&=W%x2YhnC?vG~28F;hKAP(d^!_7p{$SQ8+o~?oqLq7-=#4E6fkbgRe#S z=zm(}{44DUoF`}e0_XNs91)>fV{$=Ct5yk(lCuU$OF_riZ!;($ zX%U_n#3;}Irgj7)J*r}<5t8#$rXM-~nLOZ2PDs%2$Dr}<`Td*c@bP%eq*(^Qq&W{Z z9osRFYakYS?9~W1ao%4x&c<`wvx#G`O2kgDO7|($jv!(T)h>o&;*wI=AJXPktbM6p zoNAV+k2Hf3X4XsxM{7qgZMnZwYxRb4L41nm0#%>*ZJFiCwcn(%qaA^3pBcYp$@=K@ z*Ro)li{Nv(xHh`o%lfI^b8K#V8Naqyq00_P^hbsXXcd}aZIj@e1=EqRN$dtIF^}F4Np2NlcgLdKghhOfwaizv-TOFTcBHeR)@Oqv8 zmVG(e5jqVB_3xNS|1NtGt2TjsD%WQ>KkK4B9`xU)J+}vw=G2I5ntnJb?S#UyK9}=E z+6GN+f!sdK`pyBF+H^QSawz~+0`K4W+6kK5i)qjKF=>?xW3|M>DYMymdBcVkB#+Aw zy}hh#PWUFx;hQwV!%A{iAdtoKE*!dy(HU=bicLsX(h{P+8Yxos*NRA!2}t7r?C-Tb zp7eUt&>B-(r9ukCf*-TLf(Mv5?VSt3WiLv_u~+4Vv}On!U4p_uge}U;u$LvO?Rinc z8Gj;nu}qPs#)lY>ACIM#IQ#gj=d-^41=^iYnL+ZIrV&Ldw%8_ zLH9Y54!`d$VHX*;c06y%iL^^e_gq_W6?6I6v0)f3=Le-F+spc!V|WCyp%$+hb{y;`}=HM*JevGJeONU90$oy$m1m zXJ~Cx+5`q%Q^k13ZLiw5!5=&JvivzmB0y-zGsbh==eu~qIYo3FKZLOetYO%?fwKQGW(O%*pT{Y!NjPKh`@PY zdaSMAm!zHf5N`&Yi#o!;`r;Hjmnd+Dv`0FIk^RX13BPgU!pb`8tQF8A-eUZ3(89ez zdr~0SX3!!iMPrb~r5(fzWdwraYlM~{^RJ~D413OrY42hG=JyEwo%?$P4~9MaH|>Rg z`+Jiicw>WKhihD%G}WKG;tvEY57#fJzm)IW=`WRkKE^&@NTZ53Vc07gS>g-(!`O$> zAI6ICjrmp1?@{xuj=k`2^lyST`ZtkYQJx|~j*Vl`<(-jXzYp7iQ}i8}(WHx9x?0r#?&f295Ys59FHP!wZtM2aQL(FWn!=@(XCv zo^7)Y5Cy+qMT`6x?Oo;1ZtsFN#%Idj9-oQvxM7dbd4z7;BlYN?*nyf)KyF~**mLh? z_(%9`V%vKl3nK@J%0Kc41KZw;i*ehdJY4pk5PPJ~W#4Il+dtChvgh8zojx|P;}_*& zw{5BKkWehvo1gFpG!+y%l0J8&y3$0FNykv zB$?wO*LaEZV~nR{eMN5Mg`yB4aQgTHE#I~zLE|z^K#TXU0}!-)|H{95+qQrE{VRKJ zzxwN9^S`!<-?H$&L+lL`*dsL|_J#@UQJx|8h6(I(nf4x+iC>n7O1&r#VJ}*k7;lU6 zG3;T@T$?my=o?o8CZV@Yk9yKF0y+WHpqHI?tQ)w&UXhKs|%L4W`)x21R5vfNf5q~LgR zTPxsZ1Hf`y7s0KT+dAG(+akC-8M&<>+!X^i05<|R1AhaS084>oz@xyQE4L+ON%{0@ zy{q5Z&98Usv*ecEvCliFc?T;?V6l|cW`K9GvUJq(B)6p0)K<7+xh4eSN}0sIK?F7h&fHF{P6ymy@UjZ3YbZjGKXFs}~O0BQnSlP7EOWDTD20PiK& zd&XIl1MeAc1h78NM4$v%H}y_#t$~wwbe{>BnmEUT9tWHa97`ML1+cpi&^y12@O%lNwRB#A z=c|Bg0CPvUx$AoY>=pvQ0>1%ez(GK3>16$!r9h~T&OI=*P-CkAkwA5zIS_$b6A45C zRe>5nO&}Ji1tbAYffT?8qyim*PC#d%E6@!{2Qq*FkPY+$MgSv$QNWqN7+@@r4~z#2 zfC<3Gz$L)-z%*bwFax*=xDA*E%mx+!3xP$zVqgXEIIt2}1*`_v0BeCKfG2^cfTw|H zfOWvLz;nQQU<2?xun~9x*aEx)lmf2;uK}+EZvbxsTYpS6g+V*XVtFvP_*c9UYx0Qe?>@_|Xo;brLN~&+p+2 zoD*NsAzA@pgd#u*sQiPLC7@_0KK9KeVC@%2m+zM}?y>|#{z2&?aMEKtvI$x^arEmg(v#Mbs!p0@9e>h7-QiYT zTFViX5{V1?i}Y2PMlM~CQj3wcmA@!J$AeYjwq#1DjthX(S2A6?Vf}x?Bfg~qM|Ez?l+_3lOhiFNKf0<|L9_`^MEvZnjW@t$j zDR+`DbK+!IB#%`&$?$M57XO;$_AK1k@v#y`r#z5=y?giWDN*emM}L+&T9}}+3^hO; z?O87Urxk8O4of!alT7(!Yrf>k*4R{4C=c2$ROO{;yS)kj&^lKr^)QIaDb;SN@VPDU zrP@Pif3QEKeT!4y^YaUId{C0=){?saK!s3}T59KCwg;78kw16;#P&P(24lreYGKcL zRP8CW|0*sX<4Ug#9CsDIqWJ`7aWM@YnHArQ_QQ>{DCqYGZ7rExmZDEo`L8Iwg{$i( zUH?M0q*~KU_D%99){a(^O>Qlz{5EC0mE5tr5*k*IwlGiHwf5!bPZ6(Jp*KKXv@6c7ks^_T2bv{Sz*P?i7akp2+v3(fvb zI))GB9zlFt!CFY2eDC2hHMBi*le6Cs+)I0PaxG|`KHa4EOfEzPar#SF{~f2ar0V`3 z{<$>F@({5bCnd`Ypx!^+qwj&9TqnIEdHQ5s*qbMJTeXo@)`aR&`~3M4jhXM_Vmo%D zw4^%v*rfGQCxwT$cm7xfImPADgQ))oEk9;XdEn@Dc~z9oU>~9FpY_4|gZx5dc)`+J zxc|JxXdm15RW$)7sZO^hY;9enHC?Xaba8a+tB{b%82&%udX`FMw4$9W9 zO-{ z#;30Ok?%f<9Y>S9>mz70zbHINv|l z_Z{|fgd@w7(?RSNaTT#*8H~KbM$Rd zQCgxj+WPhn<+O*3SUYi_>Vf1MT2hgAoZ`XUPOM7MM9hO$vChLi!g?GtbCK5bxJOw$ zqgd67z#h+ND-!o=R#n_%tZ3Y;Llqq6daUZW*R*Qj9&6Ray%wadaN3S_8t$iAGjWfz zc%HS6#cM?I7SBZ1wN~SvVDT(OJ!=@;)VGG?-oP4(yT=-Zdqe9i+#6Y=ac^vm!9CF$ zi+dAm9PUZhxwtpA?!ldR=VNxy;vL7y&~e5ZT$|%L1@HkafRe0iX|%Wo^g3ul1V6bH~|0KOhIlwYFMsSv*Ia2lNL900V(Rz+mfL z>pkmzi)UJg07HRcz;KJTL5{%FNb4hOm$e&DqkuDkvw+do#}==kjj{Mtp0O|)2b>L@ zWAQBCxp>OAc)n=7^{K^kwFSTgU?OlHPzan4TmW2XeQSM(-;02Yfg<1%;8Nf+>u2j1 zi)VQ!0ha?;09RV$5${!ay4pH~`()r6V2br2?$=tF4aVRov z#8`6dQKMhL{-6_d8SeE%BEBcklh~_dNeB{Px{5Gdnvw z=giERGc!BD8^D`@7w{HP94G;J10?|;fWPJ73zP=@fHDBDj1B5DI(%gaNexwt}YyOb$rHhyq)_9Rr%< z%0HlUKvX~%TwR76kNW7boa?yG0bT-&fNuaE-|-A+74T`mXSkzSKO+^7vi0Cj-6Ks}&7@FCCuXb3a{8Usy$kASAY$AE*=F~ri`=`PMr zpj!e3oW2M3nbSj@JwSH^)*C#&^_HKX?-u;70g9sz;t`C+xSk*I2b$1jxKj2{dy60F zZA*BcD7FAb;3VdrVQr!;==>q;Kbx;EKyHPWV&I) z;9zg>;9x!XJRY9%U|%)2-70=La{%Xf2hjs)sE>FVUVf(rXN;h*OFv9&^eKYFNBSFv z51!BW*H#Wl0TQ5}Z&@9sym>Jg4$L7@4k`ue`TPdrP|r8N<*A-8QospN&kv0V$83;L zN6tS!#7Bept5QlmkS>;+I36*%KQ*HF5Xwt;dNTJjA_}jWrWTSLpoS!nNEFH z>zR0x3=Za$_L09}FMoLyi}@tYOX;e66h!_>`t3%I-gR+#BPgi8q{V8r8ucRT*I=4s zm+tC}xrCfIyjQgoJNfbzAM(3&?BoLe1vj+Z22YFlaR71H%nFIqu9jb|RPfYLjyybE z`thn!KJ=W*SABW(ueIyQpjeq-5N@6s$W? zB7ogouD{l<+stJ)JVfCTCl8Tdn5!fTkE67J_7jCkoch84ueIxXt}EuYszXiIQ}V0* z|97liM+G|o>y|I1V2J20)*f};}A^^3W77)x4Y49Z2(YHgg^eDlO%dMNXDYyF77gkw$XujO!x(Bwqw95GB? zLb%wk?G=u!uW%)6H8)o}pa!+9WwTwoZoih5BjR=WvHS{V{q5)&>f~tZClU4KQnx5B zA7}(^XgK-sN7Y%SQ{{)FiipFMds*KgjS&(38{z2BPcsZW&gOa5>pD7yA+#PeZqlMf zi~c~1CNg{&?hg|h8`D^MDepGh7rX(|jzB8?Fv##DaLD@&&JVnhmKUsGRWGFc|E0C- ztQA<|v(&vdSGk&!Pppr{0hTXSs~j}*4@``XZp+_R)al2iC{UV~t)Y#-$Z+kC@SNc) zzeSGQo9T7E1D8(&3!_BL5v7U%hr+^T$z0Fa(Z8vPA`6_$>}^Uv|)RXhZ}H z8&dA65+q!#Xr!M%RiM%@bY_rRA4b9>T6|iwXi@Pret>cSEpBr8zhAq~u_0~kqxd15 zzv9pilHzv>^YkoQRA(p413M_%;;+|cYJW-V(iR>r;{!jiGJ_9UTieu6s{YpX6SG@z zk8@DyGXp!IQ4zS)7p19tTjTrA~NwH_ijWc*ex>Uns& zEN+VC_=SU_!4uKDuvF2JUd~t~Y3Wjcf~+VScUj9bKhHu-%DR43E~@U^DOy@GYOJ770p`SR##P(K1^ zfL{Rl-O;nSItN?@t^rxVP2d)A8`uCo^LP`FJUs;c2*?Fq0PEqW=dXJE${qQ9@GEzV zT8%65#nBNsM)PSzjA%lWal{B+LTYlF_9!S#1Z=SFT$&Fb5gsR--J(W~93^7Y@!|XA zzRi-w6GV7HiV&l1XxwMgV`UsBojhWMlT)c8f`&DMKQHd6X{ZoOD?%`Cxigw_`Lc`ZNzf{>cd=$P0pOBDX`h(`fr0XEO`TTgyp#8c8AHv^$ zR8Za;o-loJ7vb;g+YebfiL+JEm?esBD#f8_NyJ&ra`JM+?w!(CoI@h>FqSV586QVC zNjTtn{D9<%VVjpud5O8MbS9RHurTIHQ<&7!X_Y-UYm{)@9#y{lFU!IUY?p3>2qvqJy3 z%vx0fV7~vqeb%b1uw?vpvsTSbgw@k!{cmY6G_BiYay10PmB zuJB3PoRz=XzP-e}LB3hXr)V?2T#T_=w~w`8Q&SO&=jVBfE<0;L^8KV@Cp2FXvKNudb4@eo${xZC8re8@{p-)-I2X!MXT*L=s2Gp&>=JO=Yq}0DOt@W>D zFs!;&cu8BrYg&g-NQku2za)+9Q2DEAoxgm)mrF4}oxceQTcJL%A-=9iucVp$(1xyG zufC*{cIhvwEB~E!>(;ARzg|6?`%Qky_*ngt8cssuE)L5F-|rccIae@Sr3dtMn2X9u zo00HmnvZfSyrjzpl(o8_$Ml8%XvU}XInXl$%E}1L`vU^X1_ZEm1xF?MifjN{g%sP-Etl>V|tx(k+hIkp$^OXkcBZ8!lLz0md#u%{ZP_; zminFW#z~h~F!Ci}=I4H8k?1Si$lKO#TKn^-otmM; zabWQQ;jj7|JX1u_tY0r*zLt4vMKih9CcLAgw9(4&%a^ZSxmx)12&>v3$tJw+Zdo2zKpgZT)J496k-`9)%RyDLR2c|mez zdbND0@|;=cs$ZBIwC1w7e@OTzrD_Zn{Y-lad z{m?aO=IhCpRpHMeLC1_xcrlCB9s{_yldnm+Q+Z43CGHi03I9#dNd{ zt?I{IUnI~feV}dAmo2JdKFRuC(1Mipxu$jf%(REQXd(D{xduCk=0MypY0Ld4t?w80 zjjUosdUgG?eEB*XdhH4+pGx*pQ!iW){;#6b(jX+~&s+S@pT`g;cHh8ZhX2*#|KpEH zpqtbq*?-n7Nb{aOmhgPP)*pmA5$IW2wI{N>+6-k*)^AeX2=ok=?FqbvKr~bGBfJAc z8r0SOZ&pqMJp;Lh6VFpLNLjyWTDMP@=%hRff2;Voets#`2VFns+SJcNvcnUylar-U zp9_MZP;YPoEVSgmpfgia;_}P#6^pD%zzrA|5b2FgPqv}W=)(NiKh{$kFid-eSk_h8 zvgXjsYySnW3;T8LNQTjrm-Jr1q*1<~j0+boUl@=N+*34Hr&!hEtZ7uNJQ2E0(uZ)WWQ^=I1fni1iD;evm}4AsCGC93wux@>9A;X9as6JO#8>(T`V z0dv)-rT&!+6Y?R73PhbJV&X?63DuAYS1U9q|FWWDD|4jn7YyMDe`F`1vZQAH=iYg(sI z(>i^4f1N<_d`;{0<#}T7Rjc%=`_1%VUsma>(xc-y(_`u*Ng{rg*Cu}y%{-RRN13bglK304n9NLQ%KLh#UiFe>b#D`xdee7sFed{>gI|TSNdnCc!}m!<)80WKX3NLA^cI$q;{ofv=0gWkUkv3-^j)n#YAu! zJ|=ysqwzy&={-aOXt9zn( z<6&$OzxLPilaR2J{rFJ+lGgGj{i9d~wDCv2Fpd7xZ1%IrGb@>{p^LRHLvV60q7Yij_$0unszpxCOTW~%s;gkDubTU5n;SLiH5kG!q z|H(dDZgF`lz-1OZ`;eFXUg`UA3?U=aG%^LcBi3|RH$?t~ z!T!)U7T;~C&hs_V78|ixCCrEPNAt@oz|HU+vsV~2=rB2{C(p>8F08XY@=Gd;_Ac%% z={Q4;{^5e-kAvMMPFOrNEp59Z(ZV0$L-;Ea(x30aLR?sw^Y~I7*7g_ieqvBh`-)%n z!sT~+T}nH$q2uN6`nTN?(KX|2+LqS`dXMWm`PrqQ`VsfOIO_X)wsX18hq;nrc|fEjhkLBU3PYDZp-6=7iaeR{nFrCXMfpQdg$T!$zK+1*=NcdtEYy3_w3i# z#zq-i-1F~S@L+t;u2q`8H@j2Npc9q04E0|aR_b!`y`3i(i=2P7*N+pn533VDY}mQG z?Z?fW-EVWX15J;-k@evD+#=o!icWlg_QTY)!9Jlh@z;jiPY;{s9k_A&)xPglT34-3 zjkvn~LmMyMy`lHMZk-kL%%J#xZCE#o9iC(t6!{YmASLVPxdW(wOmT`R`0HHb^XEfn;zG) zjW*eTwENBZv$Op+rxvgD!Mc~jvxa=tV_(UDjS-_g%l3GEk<$n1L3LgWc*B3l)}a&Q zi#2ZC^7XggDN*6)AMcHc*_3qP_ra^KpWn0PjpLmLb;y|RQEJjM&yl|b8d=pUKR@-& z)U_G!SL<{-Xm+VDj1hy^yL3#&>4sVx&qyR?m$oAbD%fS z2N(t<0!hFKU=)xHj0YwIsX#g~1DFZS1{MGdfyKZwUOnR$v>j z9oPx%0=@(G0Q-RbzyaVOa0EC3oC1CV&H?9vi@;?d6Sx9g1>}6PP|OZW$12Y$z;d7z z<`=ETJgDu!0pJ)AUKTSpfo_0-JM#f9Kq0^#@C1qgMS<6VV!-Rb8-OoR8t?OUy0X2Y{Kq&A5Pz$IH)CC#<4S~i$ z6W}ADDey7S8i)pZ00V(Rz+hkq5CeP#3B^K(E=VL&)g8;Ahv0CjO2oM8& z1q=ng24aCYARb5nh65vkvA{TB0+0fv0aJjfz%*bwFbkLi%mwBF^MOUc5@0E?99RXc z0oDRLfWyF1;23ZmI0^g!oCbabeg@6}XMqdAufQeX7H}K51Kb7f0r!E2KsN9M$N_SJ z-+?^90I%}_&VUP02yh2HfTF-_Kr!HTzzZk=lmvVLU!V*S0F(vF0U^LUKvkeR@IDX* zgaZ*k9iSdiA7}(L1DXRZfKPyyKr7%=;4`2N&=!aUIs;Ka7oaQ94d@Q^1U?6P0lk4f zKwsbspdauh&>t88@RteR0)B_AzGRvG7Z1IUx)BkI)wuql5lZb1jew!q{1~NPJuLf` zYV6iVLB?9@u=p@<*^7aX-PbHZTh_L#8?Dw}31!|kK2X)`!n7wB(^RkPRNcv3S0naG z`BQM^Al9OIhBQN$O!nD?`@ga;BHrFRSax!Q`3?Ci`L=5>45QZ2p+jrBibFgvG$I@} zf>1|Z3lV~`9_zIjcKa$IycxfIisdYxr(et|&&kYRxOw`<`wFWH^TRrR72Y3P)x$>} zu=t0@S> z=(T_l?r~s$=U-oo?uoH19CBPA z&y>;2eONdNpfNUVsdCMIkyZNOjm6Wtys7)G_H8luP2%v_SBs70eBvi+*^|HU4`B}% zHhf}tYS3>tl=IE_UW1og+JEc8Ql2?Hw=bfJr!dyEj_W{yt4fWb_3(YMaR*Qy3 z$bHuT+DF|kKRJJ_^ViI8!EdINbc*`b^yOPreF8!Mr}t53?pgDjxo1s7oCJSOehFF? zDN&vj|IOz!ZJquqO?3HT`DMy#-!w?vKi)?j_H+I+jQPH{=@Vj$6KX+6dHw%#AN2=2 zZ2xRan@Q!GSK=bqMLWo~(8Zpr-(u=*UfR<3;h#F0H|T)sSKj~9&i|>?OBJySrb$&h zAb#bqesuD5vgM2`cq#`mBgN_#(gD@4oOT65g)zhH`)$J)R`ax6TvYnrw0*5NJxf_V zjK9@n8{oN|GGm4zYR|doT znQ7w-%lj(lQg-*7@u~D+HM-4V$1X&u4vvrYt;Z;Wbz@ZQ_|aX#Y`ded-J!!-?&PZ~ zjd+x;Q5ETmiCzs_;~6bbmbtdFu8(90%UX1++Ch|G**eJjLDyHhzKCuUp1}3PpW`#o z{`u?H+3|m}54B8>QMF;is^XHLubwW_!|Aivrz|N@ck^J98dYK!WcB}KE&4y$_nKow zUkkb$&iX($a8Aer{Yh&tyM3}%7&C;JVDB`rSTQ&CDHg+M-Bpi~a$xkAy?n!C<$daG z*+|{SnF%Y7sP@J9`}=T1|C0KY<=Z_FKNYVYgVVptS zw9;~`q_qQh#r!hCH(Ep8S6CMyMVsHY)wFg{bgr%-HO(pFL({o}!Zv*JD6GrBayIJ+ zO=|}gJ~vlIr2I80-W+bGzZt)}(D5l!|LEi^Z?8YmrF2O7TgongNvmMy`|I@C-tLmC zAEf>5X`O#&e6|5{a}}+!fpmCH+wltqK6z+=9i67_A!^%U``UV}Jem_m?_tUg~KYhP)*FQS>%G>Ktw2oijZ^v)SRUZ0zI)8L{ z{e10j_W<*L9sW=ED-V?o57e*zd7vF+{94bDC7nx^yj=%3^5JWN;!rM`=*w6go|!tN zbaaw4uHon)7BF)UNKK_kkh@CaJBRrCl7mBHqU>#>yM_Li{8lDz%eIZr)N8b}77tBp zJxS|7**XH14R|A)!>k{)t6eyJxmX_hCGGv~xy94tpYz|Cru{o?$$Y~SH&8<#4{aUTjv{q~E-8HS>Nz*#K zy}PEhzyAGO&(Z$+J`U%Lg(@yWp444?OZycq<`vkW?ug;ig*6gR%CXLXR?k`;9W$`!tC8@H5U0uSw zbyrhNP!r}UDI@BVe|%&FDmG}nlGdx3{G>fC9`;Ls|Al`%tXH7;r0G^&YIkX6p=;M} z*b1cSU%Nw>+O@lMP&7VWjL!n&>#`=ly!{%sYG`?Vd^5tug}4Hj=?UioMqGib=hdlK zuVM4%oz3_=H*emsUcEXdUHii}o!fk9_53eCs`Js8n&!+3j1S}=5g%W;#+&Pk47_N= z=JCy~)8DXOd_9xqo7(%~iGC%;{kkoP*WVXJeEjKUm@(L&v#)lSE}S7Ezc_kiPnRz7 zD!qI^f+IUr{_}{C%Zr*W4?`$N3Z2lLkX zBiPO96YHi~l90E2sP}_^e1}$A9z=d|o=JZg#7ueR^s|8s0&7~=nYNOC;jh!f$!C8U zrBsUeT7PL;kGHwFlnTVRF#}79{FLD>#T_&jinuu8d&YXAGO7tLRKX%HaT4jN(NsI| zx0v7Qi<2tg$WIrSnoZ1X75WcHAo44|cAa|h4dWr+nt$MDJ-oijKO{!Hu#TTABf$~V zfzyKnwqAM29=D~xhPP)f%PzC({-gIFr-GxpLZcIA(mFODKzIM+1`Rm<%pUvxeeK$U z0oLt7Nk7yWe(mMmqPmW=)YnKaDqE}fHB|kq^Ml2up{}3N)VpF7YvyL8eD@p5b%So5Wn7Fu@NK0U6pSU<5Ee&z_4(8CogX8dT82oj5 zo+q;uzsrG)fM`(q3w3_JZ(%;uI=HVa%QKnuPQ_c{vJLnS*aPTYig^~)e$aYe<6&I$ zt`n2to(7}>DFA;{pJz>NM4USTU(lriKcEbNC3IFhX<$|k=pY~%C=XNsiu%2dT{K?v zt%&PNz`tiF4b1jHT(yA+pbk(Ms0Y*sJ_H&74S_~LW59OL4Ewz@^iCP}dt~tb81}nk z=)Ey`XN-TeD+XqbAWSd7c1H~Ry)g7n7}on>@Gcm<1BU(n7nrdFw?hE$192PRof@tK znE>y^a1*!#+y!m{yaNL7;&2Z*0PwC0M}RCK1K`~qcwdRf0Ppg^yFbA8YVJF+5Z8-< zCBO;bBya_|4?F>Q{|?>_f_H^j3Gf~ZyMgb4)xa)bC$Iom1?&Lyx7T>@3rD~o=nO;w zp8~A_-UEYo#NeGRcsGgmKs&$_CQ~`O zub*`XdH`L4Za^ELHP8b11n32P4tN1>zz<082>gx*QUKn;Vne>6Wrmj7kWcQ?aT+0b z*KWPNk z9dh`)XW0PnSi!qh#QUN|;(C5SGSV?0SG>0h@4oQ|kOw%xJs;o%8Uc-g zCcsBPQ{ZEu56~C*0_X>P3G@dB00V(Rz+hkq5CeP#3#U@@=+$N*f*K$?K6KsBH`Py?t5ybpu|9{^!MEg&4I4MYHSfVx0E zpg!;+&;V!%Gy)m}O@NPprohKQGoU%p0{8@I3A6$}1wI2>18sn|Ks%s4&;jTObOIuQ z&Oj8<1?UQN1EPWMKo6iN@Hx;6=neD%`T}17{eUll{=k4T+wy@gW%lBHB;TMiNANos z?nBB9DU*x5iNW<(Ksj9R1a<*s%O4FmfZr)))`8Di0PljsJLvFUOa^@N15v;zU^FlT z@B;td0*V9PKuN#{@C8Z(WdZ*F;kSry55SWS|Ct?ZxbJGMl`*Y8l>|+Fh)_(plVrVv zjeW0P>XfXfOFib5JJ_(2BzrMZix)%3uht5AB800jm1w<4b#zoe4PTJ9XvHE{D_Y-T z(RlwEEzN3{qmF=k8{#?)lLpnSK@Z^&8W9dPUCtV0hls_C8+dvKw`w(3cpHz}wQAm6 zUdl6f6ZOlp3kcnXQ2~S@MPB1IKg{lk{^DJdx`1ZIHx<3B=?hz>a`&$1I_ z#`MYy4v7PIus3=;ezw8zHT%DIuyJ%Wtx8U8=VL>klguYJ_;9~NTb=NQ^zc|1p)?Hx z5W0{p5qM!*IWoY55ZdD{+z`ByILoMGuyHveFl4^asp7pCP-sW+#{9 z=RJHBf4K|Y=u>>;ys58`ik%JWf6W?f8yzYKBVxgi*amemjxO^D`4=AI=4kTM#)^R; z2rduBPgHy;L#ACr`2RI)u(~huk#h*8#b#C?BvYCx)GR<0EBS2zC#MD>%mKSugF5to zan_)mH0X&L7V?nn|BucZ)RP89y)No&al-TEtU(wzkR4+(IEmCLJQ@t(Y|XTgwOEZ=vx#^-(1GKoQ!i zKEq>eX8rT55>a1sf>3L+zdg;|6xAWhKl=;SgmXKLpP|yrfgsK7kJQTpv`i1qd?@+A zV+>I>;DYbAj?XGK5g*e!I*~t!#(tKM2i#Z!!#c}%W(#h-ocJOVfG329hazPny*%qw z&2sgO#0_%Z&wp&zph&MS-;R!)AtF)u)%hWsq7b~LnO~OtlW)Xl%dm<4tU)$0#^M%j z6&3O6(!jU=OFP)`sGv6*PaNKk!j>nZwms!)k{^dbg(&$3cwZbmpa}V~nj6F~kHf4l z{M43F9QqZbkSqb1$<-`UcpHM5;Ag0#qYxueUig8E(zMPGeC^XW9E0cHj*i|khX2<) z*vQfc7_JFp8L)B_L49n$}2QKVq4MGq8 z4_kc=gVj4ZOF{FChrM_fgQTskyi#udwH<6&w~rJ5GJc%RS$JH!S^i`NCQG|@eIxJq z)2u;No}@3=hw{+zTV@TiOB@fQuzJZAn>cDgTf$-Lud)|WHCTWDB~CJ2$-n&$He7#- z`c}!a>~EUgP3+T*&$Z%}SRQ2Ug=;=kc*7_wJA`;qnV!%HuK#p+8CZr7K^m;{hr@#> ztkUU0F1Y;d9c)DFW0k)gpLP2opASJq-r%f{DtgwS{SG!9-=FWtz3OHz9oGIF-j<)- zzWe&hs$M_NGHHoV+SFyJNUt_^pC!Yp!e8aiZm?;{`w}uU*AOdZ+sJh$HxBF*vSaUyJhU8 zIV`Vo^yD*K@%YI|`1AP5DE#vHNiu%N0Am3jKN*kT6ksl}5;z05i@<7J>+zE{xK4$w z?+V;sHGZ-d{_6l9KUt4oJ$|wg*9+kGs{L!eh2KB3f6W$z+X}GVay!6w=3T&dz;1vo znfrkM?*26gkpi}U9|ev9$AJ^T6W}SpBRGG{B3i>2wr7B?p`UZOfD!@419%L>Eue6K zM}Rx7c+`aL+dMY27dQdvaU9G3HH+}1{lGT{Tj37?atE8~xLT2~ENZ;XxZ?4i4E%lr z@c7OijtkIx*zCjgVZeGU=O}0%%aQvT@mQK1%~^|deQy+itSQ@VT;hx+3zp2#-x0-! zMYr+ZGI<+^a{t8%Xyn};m8*KKmVJCTuxwohIv~sErkNaCzZ;5l7z90VVqUZ=# zQh7a}xp$}mr+y~Qk&Bky%3ruBn!jjkyZ5O9Cw7skHT6d8`+32EqDA7_be7LdADrM| zq46nI%Pup&w`yf=h^<~X9G?xW>+j{HRF^o;u>QP#CqEzhq^X+7^mtZpsZ>`*ORA;% zE;l>6*sb^W4bKbrm7!&f-1CYM%{AI)ZrWo2XbbFXzK_yu1kERW5KG5l{i_qBI^CGM zX6?(mwm(~LwL5FgQ(r>8v0Uma{an_otu<+|L#+3XQ2Fz!_1FI>f^#ZmWM@O-iNxPD)bT9oGq8Gm&pfS%PQ?EyPC4znj<)(7 zQ&Yv4VCDUYKB`5d`uLGFzrQ#Xzva7e47UD_LLG&J^f%WRqxgzmv-$pcI=zaYI(qB( zvtI8jl9rmfG9yVo&#aGB`tYF(>+fW;%|dWk=Vx{FT*RUB$1ir?-AtFoF`&mr4QUv(XqCHUIWnkQ)!s96~xyn`h4)8-|`c-()NFNTBKGQ!I zF@wNirq5B*9V6kTJ=tGKfGQ7ovV1=|aL0Fu=p(}9&5}kX=w;GLNt`@&zwqbw$C5sE zzsw)_V+ORPXUwKIm;y}84`0ed#t+jimV4s}5p-1Qc0^dzf2Ge^o)_th&-VJMmqjSa z5ycPCye6`))%sMtzmN6%g9VSx{6~1?A9f>G>9ypCt;lHoMPz=iP5#4)9T1Z|iuyN5 zY2YvPFX6xhocKD~&-QO+E89O5K8{*2+z~CTE^Btb*_syd;}(8l`Hh}Xv-}{8@P>Q~ z{!2O{qGjuT{aUxQ;t#vPK?dHZ^1Ji#l-|S*(zXHYa(0C{>0wGPzP*zZs{7Q`+j!J&P97j<=Ebn6=8{A<`;RI873XF&3Ba-W`66HM*3HHBTAd}AuTAbI{jw) z*a^AAX|wWIF2XI;DEcRVA^*&Ta5GIJ`C4Ap9qRrD4ZvMlAzR8nKQW^IP#J{?!8Nw> zSGA2*b%W>Rna_fvY+myPG-n&SDAI3zV4TL9v|Ri9H?R=6GW7#*Khzev;a0<$vVRe) zg0pJPy%9|_!P>UqH&VN8!fhO_GC`{w+DXwUVCEgBodxNv>wj$_CKxN=i~8x4hr`20-s2z8%-RPq^L|8X7%gWVR>n?fQ(yo?wF=a5MJdXy-kSF)Zx+fNMk@i+CeBYO{yj?Qv($&1Ff z_p=S&X4?&0?Ba`$I6@5{Y+=P)0><|4-M3Gl2L^Va$~$r5q>&vNi*My;8D3evV|wE^ zLmYXYj(PkI|7?6z?IQofSiEb&f?bJmAq_lzW6+)m<1uW{odGeF%O#>c!foVI>(}A%{cBA5}kqF2C5IfcziH&Bt+bZt*JwJ3tzwu z*M<=tN}jDtApOTMqX5pm>yAi@)!Bf{wJera&C(I z?ByUUTJk#^T#ky)Gcq3J<()zN8Cf}(PU08o#Str>$NUuZ$yg75KFf)gFS)yOsFIsl z`HRgUaPyfndA;%5n|EIT->^p|Hn3kfy$@C!RT8lk+$np>#Yt3fbM zo(R5*U< z_~i^>nkC>RnB2sxN}S>0<%NxiJs=9=FqnXoC~FAJkAInwbX~85t)p zhx0qGEvHxTJI)z2o^>V`COOS#&IOcgXWScy5^um8N1pnne9)Lft5y~F=Ulp!gZhWx z3%k~gcMfwNA7flRb0+7^nTtjoM-a{VCi(6hE6Wv(e#ii1qsRfSA40LYNFD-8{u_qK z0Fi;-f`8)0Va`#%hOTGA@MeN94LcaZ}|k-G9vn+tv&BL5`Y#5q@;#c$QB zRdWEWQ8n_!Z?2bg&v6#+?8b+Yr|2B#JcKpiBz_S(muVa_UN0}vXU8*iUtNEsMSP3} z;ej9Eh(PKc{N7kXju{vsSwCDY|)zL!X!RlinTzT%4=B3kCR5I~kd!B3XJQ1}T6 ziv_==0Gj1Y${+hf01-~gpZq0E(q;ja_vb+VKtljoo?3Hj@t7ZnqU zdbPKbuh8f{xm@oW*yk{&OPJ9>ZQXv{=!g0&#t1xv$0DA()n)py`wdqHe3*t|v;c;O zn_KTtZ#QGoiH9#QA3u)dqU6Q09C9BHu}6lY#&nJ~j8z7&;&U)|7(5E>X!w@FYCNMf z&Q1pF68W*P8SAi&d^i^{^5g7cIOALp!--f;Wfa7@kl~86n^6d7cg&E+Iz6K>&V`K> zoIMR*7g$8}5sMl;dijiZyBv|E^f5JxrEUc zXK$k&&LxfZIQtl#a4uy`#+mzfywaEF8~9;H7OyudgKK{v04NKTGk8T(Ag+RdV4yru z0jOxah84g6&egs=7a|;}ZR|1j8vBg>#sP!ZutorN44%zV*Wfjp^^C*D5rfCq>jNJG z4Sme zan3kzTrhY($EUz&Kx?3l!D~6&8p9B-9j@8~9e|ENCm_;beY3NXX zRV*+Jhy&t{%Q$;NB8mV-f!6@;fxQmc_ri+9tpwl=lmvW$Qh+Z|8t?=8?gyG)WWb`>wfi%Do@CP~rQNX7_ zE1(O|9QX|A0JI0%0iHlH;9Z~s;0+i+D9{n;1hfTO0zH9fAQET>a9^i8&;#fSbOYJ| zt$`N6CqOSi_I2b+W1gEb0vHdZ00}@i-k~eErB(-=C#Ip*53R8UQ@UXu7=^tb)z_Z z^ZjP{27YJ!&K2C#-^gv)a;o4yhbp?yrO`o!j#FY#p<|RksL(+Qa@$Ph-DgmM+h{7~ zI-E)sil;;$x1r=z$~_iTI=1vULnYfCA>+{t%Ht@-X)j+H#_6AEvT^bht~PC1;lDRFYR|BPO5JXNHmyxSTIDs)n&#+_3WROkr63ED{I+~!cATMCtR z8$*7DMo>xDI4bVipI&$ELS@`mP}#SBAh#LEtdg@wCg<^UN|ni3zDg&j{)ewjPCkdM zN90|8998m|h6jH~$!5m5aasZk9R~IwJ>LRIt=m#6S7;Xb7fPnL3ihF51tY1f`$6)n zvY#BzU!#$n0!QP?b21)0A>(PTRqDQ#sk?noW|o6-^aL667wHuGl(J9ZF1{h3@mn6{ zJAIY>icAu$8_Ovi&YAUQ5KbscyTFfQi#e(YyD_bUPSnQwbj&du7_uqW(_KD|b@`kEs;wwjK#RLF3IF_Lkf}1m~kj`%xDL@sa*A`RH?#r3JIJ-mC7blov``T@}uq4 zv0Vm5bv;I%dz_$;`W&Xx2^*;3_Os-CYDV2NaE-Fyett~rkq%lnO>BJTu`rH-HOqpt0bQgpjx)V<>g>ek^X zwfuMkecX5@HE+I=T6Ww|t$QA));*3=i=M}*e$PV`GVmZ3-E&RKnhn2}$#;A9+n-B9 zv*z~iww(hz8@VsZ`Or_~-F_aGe|s{vUh7KbAymvWywGvV7wCG7d?EZL-ACZX4oOZH z;nyqYmO&-l`=F+nh?-&pwP?JYy0kw;t(tA3`Vq6KZOa|hv-2tH-r+b!wLVNu>#e1l zZ>P~`&9_ju_DArtsExX{KSr)?n(n41bvA>YhiJ&ib2Mz;P5N^AE$X)F4%JT(+KJ~P`MP%==%RJ}d+VYV7-av-+vF=>ze^qoODM1^%hMEm{a`A+<=Gpr{G)v3 z{DE#KP}i)%EBB=Uk3=d{h-)k*#H9k=j-m7~qhcujL5AAd(f6VB0?saZ5>!2_DI z;t9=I_nfA$&7mplp3;OhPiXM6JJfW;O)C1!J-ZB8ATz*HKKC8e<#Xn2GVue9m*FOhwXk6P|d8O2`m-9 zL2eLnxBXPSU~lq6R#kX&Gj)#KOVLrssY{1L)Zw$;^yx>Nsebres$F9SebQ(pMYh=u zdH8|4bvjC)e6*3ORY<3g!SzoY?w}?S8>#*WE2&Y$N@~$$GevgXP5r(;NiidSq1dtK zDIw)DjhJ?WhRnG}AFaMjMNZwu%i(RrX}-(|OQHUDyRKk|47JLH8(gSGja<;k&LNL! zTPdgpYL;>{kO9*uqzp0vsOXzQ-i0_LPE!)UZhkJ+5@2aIC8jTZ zMETNIJ*K1;cPV1^c`9)EmQ|L_ky(POShb3)*6J*=sS8AwZ05j)xbk=SHH+SgUQ8jC zXN#=hY^mZuohp=?Naae5q;e&p8MuFq*F9;IH9IKKV>DIt97kn6CZV1duEkMvt%aSe`H;QELf~F%BBVp8MTRTaN`!m>ChP}_0cq{ z94KX{vfmV{fNH&BV1J6Jm4b>col3ts2y&E!%sL@6%ZaN^KiBzG4wY%eBI7B@eG`eM z9a`B5Dk7W4U8sTALD@*BVDDJeqT8r*)IRDz^an~9e~Cs;zDc8|+@VpaS(Gs9GWGfV z6h(JDPF>M-bcL?Q6>3tqc1P*8Zm4V`KRraBHQq^0BQ{gR57yDg^)^$V-rrNo{0GG1 zG-dfCnz`l~kV7-q<%{j`L>a7a5r*(r-F-iQQ7w(_hqMwGFRR=nZiS-Qrp(sse6}`6y501R3WI)e&pL4G`4e4L}wrfYO}(F5czl-nsk{a z%(;hx^AOU3w_f^~rbB8{m)@gMGtSen38yJ>@{crj)@7PF|1J$0bOFuranW*dmEEoF zQRwQaJSS~uQBtx$6{ue*gltiFtz)ZR#qYOkZv_hzEXUqnrttfK+L zPKg|zwh|J`xw`TRjaqt}>Mr`83S6=-uG3|X{&G&|=vK1^OB`WUgJp3ICiJq`SuJs& z1O2Z$s&IcuU+MAmZly8Q=2JAU9U%z(0+A=hi?nLAjf%VXq`)G{6y&)M8ts1MAM22; zgMCkB3vI$4iSa0^J7u1}&7v4wXd5*4`B0Om12d?S`!p2uiKq+)Qs1w)L5OanK6)hT zB!0bVc)iinFH)QK%PF)*8ogIJ1+8NmRVfN833N0=fdK!#wgUJf6xF9!=$- zzX!W7r?N#RlE2$n8pX}YyPWOip&3{5mH}+mz*xA+L8R^7D1{Ud2>;8>&l1zsXc3Foiy8wSr>D{6uNX?$WG{4=8OZ8k`xo z>5JY!Q=jfX(igo>(};=JX~OKgG-ARv>h#$`YVqM#`n2gbYTs@f_4r~x4M;$7n!0?GZOUnxy7n=R!n5B0_7`%xpJP=!q|1!9 z)T$?bAY;)|o!M31vCr&ve1n&9GntwA!i{JcV&+Q$3&Y~kt-Q6qXJN_a54oJ8%>ZSJl-?;nUa+E)Un0l|=S*QsR3`Bb^W3<~lYPIcd(PhHv`7G(m=I8KG4 zp#rpr4%x2N4qy*etpHW5$Z)7-6VOvx0Bz$N)cpI9-A4hXlXwKV9YmWt5o+Bagjyv+ za6`%^A{ZsYzi=W2mh4Zps;5zdu$9!a*I}q!4`>>sPcWk(%ixq152$;;E%Z)M3RObg zT&c`NYT9fOjhT5>HoIVi2<dop|D$yEI_%Pt>61N~-LeM)hhgqv4Y?Y0jo+G#9a? zuSDEyA5hIhw#jqyE4%VSe}FR6q0J8Z>=X2DI~+hSXbU7YjeLrrS}GEU7Ge_l!qDaI(H~_ZiTuH+ zphD=BfH|UExNo8Ip0H85kD(H-y{Q7)h~UDhV97`{*F&gMxv!{Rt*O+y#a3V^C62v_ ziU+z4zbs3(3zw6rD<4ps$VC+5HxW8LYV(Sd>5H%TiPnX)d<2Kg$CcHr^-qvtPf#*c zIV&)G!xLJvD+is@Co~T}OLpea?DbD+@lJG7x$`0J<@R9gtUJ^(`Xr5+b(a#k(Q@Os zx$BZVSk$aMod(1nrTM5H=Y9jWpp1@Od5>!E%_0Ma3rnAFqAVrZsM^@9 z=U~{jBGsx}Rb7HDEBS^h%ofKhchQMiK$U{hsj}ZVWcxRw#o!vN2Q;G2=zlf)2%XJ( z3n-$-Ea)g))r_YA_l2mUb^`}dU9q;gm3%ysD8Q2&^wF{4(eFnb|=dTJNHcpY5TZuue@~b`Kf$OtcBIs*&|JGp0k-Dheq* zL5M}eM)PPy`bA_4ECI;8kur0Umnmo!CM~#0sf+JP#ui|9&HomR0CSdp_Y5WJ8O>Vz zM3hP{J%TY#%>Hyx1ClP#7idLN(dr1FLR@CJJsKGE6IBbIN$& z%xJft8rGXj<;xC2e`gp46-!2MF%7c55LMAO(U+7RY*-wS`Tnp$loL%oOovcoydb?d8A4%oV%#GuyeO=M8-|D;=(O%L{@O%VqCro&D%kh zt4zV?KBq$T7g5L7dy#@wRITDz@-NXB8Fa-L(5`|0ROEkK8WYa=$#bCbawU_;1S zj2DchAlDPJjd$n5;)l*b`J$t#GV-5!P#(5`0I&Wq)9#|)-A+@luBWJLbqdBh=nTv+JLKq?D`C0fUExb>ke+89l@^wlAxade8OhxT8adsB9X}OiEqVNt( z%%EwjAP&AH zJ)hu;`zj1d^rNz_`=om76$sm0Sy&Lt!6H+k@EG!kO|ME&JWNjOs8_dB)Ehm50YiSI zs4lxk{qX`-Em~dqRbC zRN)X!I%XxHhcAbOmMqiE2>rmG8NzCw-@y1${)6YK@F$bd1)B~F?`CBFK1yU8r~@0c zSoDQT>nIBY+x*0E+6i(BM!zG_b1{{1Pat2{83?P)V}(UnbPCJ9HjJv28AVMR%%Sd4 zM^GeA(SZJEX+-KZ>f7%C_51QPjhk^x)b#1F7cScIjFv-bOz&R%sVFd0ZlW)84b|B#$#hpPK1L+{C|>T#=r2xy!Zirh zScbIszrj4Jgf_l04A8xLo~Ay%PNVDm6UC3d0+k--p!gHix9=$$i;6sD!Ck!hU7;dz zACKG1MNo>Suf0WKHPfkL$%(LQjio3U!&!P&K|$lf&Bf5VAIDhzS*qcC2Ab3f z8p*}Tg@>7VB+$=&GOX)y(5qlhE<6F(v8c#ap+v#l!XYvKiIN8`Eu`oaYS~~b4f*OK z4IFTul2dOX7g04$K9ACb@#VBzqN_KFE$HaPal<@k6RWPzpwd32)@@f)`BKUBPTBGF zF&g1XFpjX~TQn!`?~j>rjRp=oN#kbSmb`S3okEm0E-H@vM79yg@&-Z{I$6S0y(ie| ztZTuPh1oPP?gF^-42DNGOx}?5*Z{hA&43)9hK&sc z8GK9!;@94%q8IMrOXOT4y8iH-c71z;u3lV3mw%a0nZGQdySIF zN#E1x^jk1l-4XTTiC=j|t;1mk?2s940Tii;l?y8&=`5%pgn26IUfP(|EK+uv)QnGWs?B6VIU! z^aNepTQoB5hUn{XcsAQC+K%=UeWsPD!dD&0p_Ti&-}G3RgL-{_oF>CQ!NSH`XDX81 zX5A&q_vCkM3xMn{n6@LE4(z@}H!dxpOXn9-=GjGH>l%9U>>{1LoJ)K6y`bO+YN&o3 z-(qn4r5d}XD|BOLGyg%bQw$k8vF71;_(v*MvV!8@6- z!hA2;i7NC6mG&4zWj#?C3nyVbI8HWmu7@Qn-w1a54(2mhB;S}sJ^E(QgjsBVVKL2y zkpE1{GuZrfUx+dbyf%Z)T=Q5M15%gVqwo)=Q1wb_)C^-3t()(nx#({)(?p39dLK7E z@#D|Y=Y0;*MA%@2M(Dx?a?(O*>7v=Q6i3ZFE}p6ga*7~8!ZM^d$wI~46;COc2CY11 z^hF_Nso?SOl&fe0?hD>?B{CCA%8LEZDUq34aM^B*oIq>kw_*EgY~rs7sTCgRsq3;S zWcLLUgK_ztf5QZ@U3X~d(i=2!+kL8W?;^^&`W-#Zxl6}S|4y3@sa~?;`z^FbvV;70W|mlZpPxI(4ri{3Ni|-s7~n?J zXc~hYDi%2jo$;i!Q-klQlu^}|MNgot8?4wE@+{|ysT(NXqB8c9J+lKa7R^F0EFF`w zCZcbIikNd3Rn+L|zoO7(iX7%5%#|@))O2&jI_5M~d3}c*5(DL}8f~S=DVQY zV6}9}D41ZmDu)cQN;VEUlFDz4$IHt zv9lrTZd1W)_h>frwm|UJTv|Q-Jf*Gsi8igeO9xOIwl2OytH%=x zQV)oVUKD!4V@IxMSpj4I2$$kg24q>~nwU8nH=fHcO99I6tXniH{RT~dk$&M8SdQVw z=9iTy{cKHUGbV=<_u_Zbyn8g{YnWKXz(3dQXvkn8tGD}>lmgd^w_nhzv`iY%XE1gB z`Dco`^q7|Jct9th)a`?;B|x@n+SY6!9MDU_o~AjHGc_C?0kneuNmbgq$S77E%mb-x3%+|eg=0`GJXG0jFFy~V}fu>loCz`fwpm((Za2n|~H3k`YklICB_ zq18XZjK1v-4VZI<2F}i;?(?othqYPM{JXnU>P9XV$^KpTz1#~v&!bI9^W_VBAUm7U z0&Sw}m)8U9=<4OwsA<;Ht?P&B#c$bkF7tQVo$(tLf2uT)(Xys_)x0ws4MfO~n5$ES z=My+>&Y)6tR*-+uotQ_~Ls*Rb3XQ}F5iEFa(;-XCfsK$QwtZ{^z5_5Vvk(tqWB^Cy z%uQF>3LO?>M?9EUvB*@aTW83v#*M>E$Rx-bd=uSgZ5I_PIBm(=OFdy zd6<@?w&4=K>Od}~%)3RMJMMvHZYMMb=m6k7*D)*)X(;7NlHelaRyK17DOXD85WP5A z2eBlNn{`d3LUb}bIbA%)D`JK(*D*uKoEK7~pEe$?>9}b(X&k1AZ9M)vTA*Ap*daAc zrR)|+UHE_o$DF4z(_!Bdl7-P?i~_XUlqn{S&14o8_I!liyS(B>UY|B_;)IxEpMZw z)e8)L1=PGa5Vd8g-4@Pd%f4ppGr}(5 z6!c#IQ+G&6U6CSBUea>tf&Kf%L+ZYyKGC03-<8{`+oK%na_OUik*nxSle9T~9Z!?WIRgvgjdVJ%03e8uhd4R4Yle%*C{5 zTQlwFVp=5eH8EV3d7s{_3(0alBaBid-4ZbZG8TF`Z0sJGumhu2AVvTypd($WFh)5r z9f#*3S8$szrBX;F*NaLTUCO&JLMTjVKvVlp$WWLXWD7PKmhcJlV5$Sh1^3iA`ePat zhtZfQOtQc@a_c7FQP1v2MgMCC%tdTWY4Zt&v^uSZ;RG^+x|7WiZ2B5IJxh#w=vFlw z(t&yw5-%iA)rCs#9k`iKgP~H?ennXO8$ahddQX-fQz~RK7NeLvm560?0lN7->tr+J zU`+ZYTC)8qE#HlCL&$6F*b8W_@5whQz$5yDhMc33Dc7J&vOb6U6u*5o-Y2*FFG$Q; zbMZnAxH$bRMj(b_nkHni-vH|0>2vCniP^??Vedv8o7m<4GjfT-1krYo$hOaNY3YGy zba>TMI=12|jXC^+NUtQWn8D>qcHCovfK?5&RG(_#3F$IL)cpf)^S~3 z-*VElZm21yeUb(mY6FHaG|+})$IL9Sn3*hDGBd^;+W|8(%C^kRY|D}?mYLc6`>ivw z-M-KJecvDBnS1Ztdq>xE)>(V)wfBi-pB2MDk0e~WVQCkyS+~pAZ3y@1To7{~hn)g z0lZE~xxmUxx7)QF=k0jKP1~~ihJ9FBH9x!h1RtM!_SglB?5);;Jo0uA$@TByqbKhv zI`CXh!;!+fTF2N)AepjV+yi5a-QLa2zZC-Y8dYGyL7Q+3?{L1mW_6b`vz5WcE6um{ zT5Cd-*r5Io#0F<<#s;z$+!30&dkiT;91^cOyK5<-F0_oXLrZm@8)w@ zU-#i6qg7d>-|5cm_q`N_Dt_+}5{BNND3N(_DE>i7;6r{Yx5dnl!-(jI{#0QTkrutX z8qSr5U&O^Ue8?}m4k&gKzak+IbI)79sb}pyq62ql{_(HOoZt7|XNd_tEIc}zEtc#| zq{V*slZD;5&E0w4{K%vFviY69V!BEFxZ8x9O|D+F(OWLrI<$z*T-#8X;mgF8x zuida6+_h(J-m;yiZrHe;m#zP*3)X4f1*?1bs)<8()rffPVbFBmyi<0nVxE;9U&d$EIbVXxZ-XkcgqsI z3RVjpoxMXP2{_3@=v%!T*}LtEtlwA<-tV0!A*A0pzD2z7H@f*0s%8&5<{(nHvH*4X zy6DevyN#oL{| zWKFN2Ywo;gxg=dTa;@W;0RDag|1~$X8#qtCQg9yOZMFGrF0saZN)WU(?80@6=C+RI z&Pl#{!&0wYw>0*dSFc+(`z#)JhWK{kob-#=EfbXP%`HBb=T`vE6}N9$IRkP*9)p`y zZ_jlMJV5$45C#pZEZvvCm2@*3QTIgY0&ejoR>7@YR-8kiq&>Gf&xu5o6fCl$LWV-g zW;=87l%3-WHX`Ho*>l5vnv-j?y<7brmEB4;%m0fP{XcJauKwY!Q!(aelc*)LMIio< zhj*}T#=Rwq+XY*M?({qN`~x*W?Z2buzVrz8m4|*}^SFbn_o=$&SAgq-?d9L~v(^FQ zh-NRjn?bj`W?pw&KBE~{OxEEUoFHq^ehcil&O&ip1hm>@E$gkY;Er3YC2o&q-z>+e zG}cDU$hTRWE}QQ7S(~pjTOYSEq|WAUz3$L*FthlOpSkVO)y89K8SrB%I=Vdmp4uY3 zmcr6^j9eL2H@{PNvWM)wcY}iR%q!!L-?`~Iv(M;KqPTMVp4dhMYVPJMHgZalE#8ik zX;Ov7#qS~6!c9+ft-q-6$P?DSU9R)oy1%!&#*bb}>6C|)VLjS_hvmBY2ZOvH%{}Vf z_c?K%FaWu}g@$k-SLP`pLN##?l3vc(M?Yf;={A*U}`2seHZ`yk>k4T6A^9s>@5 z1^a{T9nM^~<_v&7L{7`+oU^q=5EEhKuT@Sb04@VZNuM55`B7pPBUAiQ{z2yPB(>QZ3-k@6DV{5jm{+Ajn9mpCR} zRw%q*XvbmJmBezFu3fT{GdFC@n(NlIuu6rh8UO{wcT}i*MFszhLEjqy4^@M;{jpY@ zGyORm{4@Pf6H*+L{)bFlk1WH5jUR=Cq6hgr_?2_1Fb>4AUxHstbNC0o7SHQK1%+g* zUx`u6kN4_hL#*aYNj7*=iHoi^2BbPW#`2WLft;yf2|&EuM!s0gnvr@%Q)v7pF6(cW z*_WSuPsF#!rgPuV-h9nw1NK?HkC9(EYzuZ?w|U!d*qqH*Z3eo-%=K4o;f`xIV;#!Z z*gTuR+0BY5Nh| z{IKwhJ$K@UIaB}Z z&ljNGW>ZSJD&HC~o_u*%DCH4RjD&ci&jjx7B<^TU0iCXJmlGd$=C})^p&NURf*$O9 z@VF<(Jvp}%a{oYLo9H@TH-#^z)2&(ny&~zPTGb`L=@XaTaEj$Uy17KI)TeWX&%l{DlZ*B#v)*C+N#U8z5ofU{1#VJK$t0$S*5japX=ls z_s89@A)#boo0d7&opg@-?COJmWaxL?$xvTp!J!-Yi zYgNV+0Y_4p8qG8j$4#zjBAFXLg?%~$pp%;>Zdw)t#Z490uUmJfgPvEfxq+fV(u1uR z14{!Xn|)8FjnVL@Ro8FW3Bm*ol+7n^*wnq(Y|=&`ZS5I5Q3g{gR6vjeTdHD8$2C}1 zFj2sk3JGtI!Jm=;=D*-kru>6~36HMWtIMRypJ8z9vjTe?@vGwp75W7B5;q50h# zAAj;;X8U#8NQ(4&W484QJykOG+Ox#3e;Z;i{<#nK1jVkhsjMe<7)YKwmQjIgTCpzE zhDONCXoSzuE#aky2XpRHw$0vb@kvKy_%c&YFC^&>A+Lz?4FA3wkwb7U{_p?0Vdb;}@K>C41qeJ8#(H zJy&h{zDu_9@NKqRq)RDG__5H|Y)?TwgNPS}<9l8d|JrkBQfehGbJ1cJ6#=={+wS@l@Qb>Kq5IRpj zN#t>g%C7~k3da4p_X`XXQubMU|AkJ_ao_xFjUr8B@d*d4U6VD|@bh_ib_(71Xxwy} ze9E5KSmuqHza|m1W_SA0g2I9zTRAnjJf3jUgHud66{32xsiXGP%TE@+Ox=##k!Hsa0bqgYnauV;5^MZn`p# zx@&@A--Elh$2IO{#!7cL(Ll=>Kbefh-i)OmIo`+^It=w%eG@xo36nLW`>cX#jU5P9 zMbSz(!IT%XcjJeM18Jz(O)iT_`5~Ye=2+#)JiB=Fh80y@w+%Vh>;oqJS#Ibke%j`a zeEz#o>t4w5UxixtMp893^Z3*I36`be;A*vBpkC+MUOZw@Rj=_k)bgiguD zwPa(toK7gGFj=fguTRAlvUKka>y5Kml|+MyXQokAG%Qr6H8_YrFSQ5-OrNYU~vqIXog25 zLn)H!C7k0>Zun3QBmU2W*+MxdSkEzm1T$R)vS}!_M}_z0xZk={wrE7Y{Wvb)>hC&d z4-zmtzuCjjA3JRs895fbG|%cY!L?yHg`PpbXYfjiieVaxVF+j_C09*HS*aX6F4mR~ zyUAogb!ISS^0+etsGA#D#4j3Lyw*jJ*=I3;vKUAT?7J}e4&%A$oIe}pH{dL8@v;&- z&0r~I0;*)oDl1-Lk7!7hYG}dNO7tqRN)gI`kusrq3#_zsqn$o~(yo$M*nQxtZCZBK z{zMeyyc_rbo*YGsBGk66x2*GC?jdhz{r?r-9Tk7`q3M}ref;sq-jVB_(?>6i(}z6n zh~1i<_WZM*9kJ7>d+l$%D5Ut_-h62cHhHSh-Gqil_4EM9UJ3(igiCC_zy$T=L!{_` zo9W1&M&3Uj>(1+V@g7phv(_7U5B%f7?e;tZZ-&fI3?ALcGCVmXC!AKOUzOl|U%1}= zyL@WQmRcCWzGg5DLcdn)T`@sCvy~)x**wBSw_A$_%Sd_Sc;vYeh@Ngwm@$bGjNGHQ zY}STrE{Qehrve7wZNd_Bv&;?#$;JXuw$nx%HT{I;9zX|_K)^s#7(bI>G_Lbj_uhE~ zNrP}!>e`p=yk>h(-FAbv=jfxh;=oP&iDbpLVs4bd1vYon8QXJ`mA#nBrs0(x0aJ@g z+UN#hUtFNAS}n!p)m@e zWDmmpfwk@5bE%%;R&-&?W3A^AsAtWwppL$1Vex2TghL6b)U9RWF=Zg8_p#KOD=mq% zKpcZFhJh8yV2fZMt^vt$mPjEX6GKo;k!OP#cEJp!5YFnzu+(sDOVT2kRK}oX&$$ANU;dVQfL6t~ZSk60NDa4a*G~4ix9pu0w{5F8K<`CZOa508 z=3$M&YBb`v{QP|DrWT9UR<2x0qv2;firMq-Abm!ywjS&{2_`v^L8{gU1MGv^qwK?4 zKim5?#xPjNzzat?=2?rVO!X9hf3mwhp?Q+L@ko$~pA)ukGX6ED*_CFgD&~Ef9@PD z65(fS*WR*i>u%YRW4Ek?An+1u$-X_eEa>QM7C_*C$;StHsY(vb{9g?n4!QYt+_-Vp z(+%G^->0g9e1E9Zg|avaCqwPsnnUaxY^a~VJI((6)+GC9t#P=_$Jtx| z7;UwmqhpYpZ=t$>>t}z#ME%UeW1KPeg@+f}6A!0CccTd=J5jV7O;5H^S1u=Nt6BEB zM~2xqpZ>&*=4Du%*X=$pDn#UCmUX(q!-|pGb)c6A)b`E{+pbA2v*}_=YRf4=&!d0X z8iwr(r?P0acJF*ygLe$`V~?Q)SmmbDZzG3+bko)xy=j|^z`;tmf9Xvm?mUZ3*ko(- zZrNT2;VuTP2JYrUZkbMpEINHNiTCTa?~IQZzF%n z0=?gM^8QtaZU7M8UnjC07QMj{TQawIG6Oe}EuKLe%fQqCj?y6JSOe9? zmFz`^gLyvW9GeC*=Zgr3G5j1M=D0n>CSgC;*6$D5(EdBD-NIw`*qLkQ{2@;~MC_Q= zWw|8`-)MCqz%9$pyZJhd$TWga6d8_TAj>)+LY#2^1}Rw$U~exzoXD~E8o(OJ>1;Z7 z;wH0jdes2VB!iHm3L@-4X9hRd#q@UB(t!Dr9Y>vI=6&}vBY zwp&)n-B*D&v>6gDI)0iwTVeh!>kehE8qP3+|1S9M=4y){n=l!Uyl9E})X!OIS(!WN zDbjw;+N$TCsr#)rB_DJHzH{f!)>{MKXZ-l_&}flt)||0yN3!eJum2x(`)9rCUbrtR zD#|i5Gfn$@e0;V}a88eBLHViM+>g_?ri#_P0vcMXBw#e#zGS9yHV1|A6?qvJd zo0IK>nm^h*uY6B=5sk&5=r2FrlZH^S_Tm%S_S9n;%=!zN^*7O~WTrjw>va715%zfX zAlFvziC@!nPHm#dJA_3+DW_J|1v9s~0h6V9&{6Y81QYVC*865UGyE#fIp@qjU@cN=o~=E4!vTVO_4j)?WhD;x z&I5PYc6`l(j-BNY!~Tbfm5)1qpbA`lj|RKq{K)vtE|-$l<)|yr8aC~WrS#m)Us&be zKvX(U0sjVTQg@N{7(dUb;9?o$|%}u_hc}(ycPpRfz198rMJ?psZ zR^!~#e|Z7oo0YMII`JS24UHyOL1H=qQl6NNeeMgGXfgiWD79ve`eYYi`ul=#vM6o`4_0t5+2+qCO-~3(7t_p4>0yR za1f>Ms}n}+;r)UM0fE@QD1##p_wCrR!#%54$LPHKgd_t73~=YU&%a-1&zd#Mou?0- zeiuBRQXKf;==pR$BTj#I04?r*u$JG_Ch@Cf*5I=R_U*@W?OQ-tjS=uHJub ztiACPEl0`jzx-5Jd*)AZymz2I_or_5%p>2?x63QYdG5g}_UGz}bQ^7LzpviT{`zZ# z>Oc1*z3wF}9cW;N^7w@Yi$f56qE&kEL*0fPv$~iNRjRK5p?%XewEJ0S9sM`DR!|*) zj~0yqXJL%B0%R?LtkZ>i&DWHElGTi2EYdcwX94MN*2&`(ony=F{nx zp2@%!j{J28;If^7pj+SL#N7)hys316BYcrirr==j>02}iD8v79%yz(A=217icsuFy z$Th_87wiWb`zQ#~-=)7%rv1qHO%7Nhqjp-0<};mw-D~tQ%N)4d(S3LQzf(a;Sm+LC zRp=P5Y?LQCDp-)Ex@E%^R`-*+v>pUNo2<1j-k)fxT@UaHo-W>pbmV)B3#}Rh%w=2t z{J<@=cRG=aW z2oV>Fg!zLyh%e@L7Ypm6>jK~A6&LLebgt^>kXN3JD%X1?|9y3xYM z@3KdE?XG*}FMneYrlc;mpt<|3?#c7ky4*7$1OqN%1Qk)79f3n93do8hc_K~{M~R{f zDgcG#J3s@#BsyLqpaFDrT*Xfk8SGg}Ajva=6(LVDgISK8MD}rTuV{|Lcvow#=JS&C zR%>^eoxn#UanAW@1T*lF@}gD13lO7YLXA=>0;t`R=ZXj^it>P&!&877!i%DHR(Y<{ z&J$YfJA%f<{qYij;)=0;`v9=<3CdER?Kf>;ZaTH35}CYWUsP1vGlyeQq^@nBFz@F2MY?8vp%&Zao;l zKxcTV2c0(7TI+hb*8H307T~|meB0s?p`T`hPZv6%5nK7!o09+;+TJ{oY0p3231N}e zdgvF*h`svE0DIw&-C!y(5xPsL^6$9^XWIW%&m@SMOs(c1BI>G!GR|pv#|`8XT@SnA z$UuonUyt6f5T`rL1c^{xDm6dL5~sevEt@PNowLggT{kSBlXxhTT4)q*#jh5+;n|wd z;LDGHu#E0`6iIuzXYm;IU6H8RF<_&8^~oelNjq#31IJ((ld)|+Zlj2>UDT4TfcKmM zP!NHNZ`ty_*KO(U>&^p_HE1tDLPH%?j*+m0tloz#ByJ5|imo`_z%i}r1E|S~PTGb9 zdD^x1Y2I``KtKS3e>660mGdvTGk=$qd;o)Ajx}yD6aUaXAE~%nDAm7pKAK}KzFlE{ zNQcca0xGkO=PqhuOAqWf@5$sS^7F&Dv0sKOh! zq4{gi&9B!&1ufz(0D~`3)b7R&i#&J+8F-hab|;Cq{Fpt6VNUT^(+N})qf*oX+L{)f zwGI^*ou4BNMijyOBLyyeo)TytbAh#-L*@lw5&;;;U>JB(E)@L8y&*u+<2XHc=doaf z$MNjrftLg}9mfGJG3+DZIDt&Mt+?*bj-R!sH<#IADrp5H<%o?^`duPgDusg>o-37- zvDB&mr9ewD45lz|It>!0SpFd@a*yI-D%)=-E?u?@fW^9%7wvnrEIGbht>zyd1RCC} zxMi7pZraS1*Exd#n&acAP%&UMYj57Pp9#%+ahJ7% zl#dO!?T?6J#dI zdi1=#R(R1~&%0=E9;4F}Rb}_lPVHgj<6p4vt*d`ZzT5|P9=5-~K^v35(Gc{@iJ$PxZYgzkpJA(;j~v z1XA^*<>N?Xmub+V9J+D#vj+8MJFIZMn0yppIDGlzcSIcR0_IxVX1UH!uAYV=q~O(J zQklf|H1CoZY7i9Q4yh0&Nbh-=*7HkTtxlT;LazzfZ}TU|(~s*!}x|9)$-ee@13$%f=PXQf(BWJ7pr zE-$zHxLaL{JovXKZdyj>bUJniTW~-}3k?e=j*4>zm#C!9mXOvBrL-Rv*2Ac*A4!vj zp_X29#yWA|r!lRjUx4_qS6n58N?;#TMSdb6Ig&;0WFeh;N)|E*1QG!f@d@T!(_)rPrYliEOcK zaUfDO`v_hS;dMXW+nnqESK%3ZVQZ;vD_9Nkc%-MoArk211R0SY5DGoD0@71TY*m7p zSfr;gZyG|(6wv8s&}pg_7UWvdsR}!D{kj!aT(unRA7AEQ^YrY;AG%`pE_6F%*L9n* z;+m~lbj`MHxnX;b-?SYN*yRwMANbY!fS*!>Q$Q%8lTtoO{4XW&3&%hTlcAkI@q8t7 zz(p{B` z9ic?STU25IMSL!f`-RG;8aJF_?Pq2+4y;+=>N@U2JvTCcX&wC?SRX;bt};2~-i z#OK%hbe=V@o5Ns-l(mGEHD65=hVP+R6kutv>&qWjF?HMKxmN#+nfC1$6D>M|2nv|e zi}KJVChxb_&6ncN;lF!6ow#_;fzGca)$|&5gpE!`91rAsBO`WM>-IAoM7a{QXEOU7 zvb638P-=Hr!!PEMRhCGlPB1_g(ON{3S4Qce3K;9w51&6;aGUz{o_c>2R#>mozRvGX z>jptsy-()52}A(h^sA*-i*Dop3<5qOR_@xl{+0?L4_azU41O)`<}unyu>7a=`)J_KtP+jQETOr`_XL^>D!YL z>ACZE{^m_vO=;XX8XLF>`+ur4D*uiu5We@iO~gU4dcjp&zy6wSD55N#BKWDm*Z|&@ z1<6VU#*)}8>Xhp3)NlThRLYtX`Ay;gd;LC{$V*fC>nm>FuuD{}Y~Fg?9)ZYJK^pSX z00(Kc$QS366dQFHp&X=XDOOKwcB*qV7UFZk**#(zOhdBECk%D0yLimgS#No!kj*4h`IHeWVBX01SOD492tPyRf6^FwsZf7B=;vbVJH5o};>&rl^r}5X!0U|0)vIya{h7vh zHQ{BAzL|)-n~X6GK&h7WUi$!p3mzC$SK&{3mm}7)Q4Z^O3~@agKY3#kYB#|4vS&td z!1kb46?yJY>FC~c4+JHS>^*za;&n(crXAGmLsfQ;I9~7pQB$)|sjI#Z<(pW$v5x z*$$i@mRm~=gByG{-#OVE)ty0PwUtlwB&z{qPttEBGymRO^&=EFHxS(m!8k^FL>)Ocw203S!>|ykAG%Wm7KfYuL0ka_x*f<?tK!Re;L9;L;7l+V!`~&C z6GMvz2%&u=Zn8dCik8n2M|uw^S^j;_#%7xM~XEkt+!WZ zZL!zpG2hi(u*06Nxs(o=s}I>*>yO&IoAd3x-KF;7p>q59=t=tm3jHm>Sik&|wLWo$ z|3v;={-Vl#yKg_Sn#=Ms2dp-mop+)@^iHrsL5o>+6h{_zHDRlJx< zwtb`HLVj2)+ceFghQI?P7jRJ+e1=6>4gqN0vG)9AU%o$sWojncKb7oznPlHftOg@* z0IW_L|FeIh7z1|q#tWnD{a44ka(ThkAOc;-e*WB-&Y9Ay?|@$CzDMk%w@0zW#0D>& z2jB(!ZUgY+*0Rx37E+pGoqOfE&vk(J zh`yo6pc1#bN|SmEV3<3sS>1(v(#9$P!T{4f-vPghtTVe7@cbPvr>h?LbA|PQ&k3@# zdlvzhd_s#UT+?aquX$b^EG}&~nfGljry*l%2UadfO~?HQfU2chi>5PhCfq5cg5&il zaDdmYA%)#_=G$i<{$O4D;|J%vB`-E_upGdf&r(ry5egO~nyqJ*q`CH_|1|prF!BWE zk!Cq3ttYL()Vx=97wI%luD#~C-Oq4!_S42Ke&jdm*oEG!9W1nCu!T}uEp8VHw~J2d zWHI;x;xf?YyJG0+H3EKzKA+s*I#ry-nSI4NBUWXq7#a}hD}bkI*+mzg`l>9D&y(gaz!TU- z1C9c_criN%dSZ2K0zdBecyLj){bJEb$Fwlk!VI(nk5nb_jf#cDt0QDtcH)zD|Au<5D)q> z+D{!tm8X&2u><2QZ~u>W?9eRBFWhd$XU^FvboPzd#%4}GiR=EBId9_Azr02x_cA0h z`~*2P-`8cn}jDk*uqW~V zl?40MYc8~Qr zf1m`m?s~DBM7RG9f9{Rd6xs?XowwIVjBu>`K%GB9@b_%JRz2+9U{=%X{Ik9G-4c6k zG>eq{wANmmw83gj-(C>T8o2w8KhJBAJZrHW_bt&k{aw{h9L#Yr5Jc;{%Af2)gD+=UyOz0*$2s78)UDW| zvaJ?MP%faS(*}ag-PWSsQi5f=2|ASze`3fE2Y&voH&~ZGUZ18rfhU*(Nm9XP^JX(GI$CX9y$nW5 z=YuYoZQp1uj>J{0l{Xs3iI|`+6F_c&-+HIZi4lJD$yE1w&A!dCm%bQh_Z=fcz)*P@ zz4cX?U)yOcBFNGK!}vezIqRI&nOEeh0Q!nYJn_Z6gBBRn&-^>I#REwef#5bYoIVp# z2^JNfMsQoj`Z`k$&~=z4^&-ISGT2flFR{+()}0wZond{Q0T{))odB$K05An`yu1CIt110H7$?-@%sZ%;Ky0g=q{PAmMsYG1lfYxewb_Ef`yB~%m^QAh)VL~-mT6#~M7g|!)Q@A)K4GA;uEP6x z#qf>@GjH&%qI~kLMe~#P<5yeCdBVQyH>l=<_Wk>mVV>Y>NHvhk!R)j~k6dqA4+$md z?YMN=#yQ}ULU#`d?-QvLmPyddR+w8&Cx|IJdCy0L&wHa>S-pjLK03{NPI%~0@R>Rh zBdnRS!aerJ ziUaochJ1UM>FS>cXvux_gne3Y#=Zs->y|X3eE;wYaZ7m}yPPawuNxhtW|za2*Q%R$X$teTS)n-a?+(cg7kt9zmQpi%waf zU;zEW$VaqmMmGijZLab&!;uU*biXccSY*OO^~I z+t85sv01}~kjZ=s5w?kwONQjs{d@+CYpsTScovur0)SveJ>LVse zFsviJd7z0c+s<+wT!r2a2cOiEl}+lgP9wjKI(ar}Faz9L&ti02oj9rpyG^_Kyp~JV zIZaIX^rZ9y2zARmL6!W&=O2Af?qsfY9pKFm(Q&)%i+3@We6@t7GRI@c$f4eAjlKE7 zcozK4tI{#}A?eA~3L zK+rHOB!tJY7LHvbg3{c`giaQjLJXYAst~e@_9PDO2`$VTZ0Y%x&Iv8is58SWgH7nD zI5^FLk$_6#8?i9-&DBz|4^zz_?$M4! zX#pJjvX>bl5|E1qE@MI7SiUEop)Cq1aC9P{_B>Yn8xLYD7S>}4UZRKYdG^X~DD&vR z5Xu+J;~4f?F${`lqku)JOu@XR9D9K`A4fdOUxo6(5;w1xJ2@68>bz_K&qZT9qF=Fw>6ZZ?Qs_t3C~g zZQXs&7O?E?vk*Sl1M8*tim1Y;v(qx>wWaH+uRD3&rU8qC5&P13M-1>MSuzev7{g;l z!pgYBLNKFw9IIo_(QEE`z&{FV9LwMD%18MtBlvBVVG=|pGT98^wH)484r@}~|BfBE z?c0+q6D3SU>+r#A=7TNOXU+OMKuI%Z2b4a_d-M}X{$f>Gxy>#-Zk>1RbbCE^ulOi1 zcJS%CS@;Mxy|*Zm7Lgn{aG(h)b=+Sc=1i=v>cmGt>&|{)=gyt~>ui03_a%Z~XK{Vu zK4gyH9<8vCvnN~AfFahXRWJL%kJfUX#@lPa>ucZ9=wdWWwf-o0-C#9mY_^($*LmBm z=KLL2b1{T-1rfM|*HZgHg!4$H{j1=#eSZ9$eN%M7>LJrK23`fRn#G%MI=}?bo0x7G zT>y5uI%grPFS(PmKqY_|01^ zC&DKA%XKLMtVFO^CgUvts^{HeclS4`y8zq9atjU7nod=b@t;LwBciqwpDu8w+b|qw zDH%nOEh6#yBpfL;={<}-QN0VvS>#$&uD)cfeKqZo^bZja?>cFE*JCR_F7H zENtVo^K`)aSDn?l_c5#U$!u5lDNAp=R{RBxSGtwp`i$Tc`GkO=)i?{6VgIEi&eZc3 z6T2G|P>u(#q}%I#K82qP1c~^a!S{=EU26vJ_R|nhC&W z0C=fDQZmP}WLP|a<+~WH^60DPI}|_-K^PBVuQ)sipbd0D3%K&SfL8V2ss(p^lffRq zz!%tx{RQ*+>WZMgeVz;715XFCe6IsmSf{ra$SU^s05}niz{THHpsMG+Mu7S}ucl6| zD&_DOh==jIJbM9veLJqPW%+sF73R6K*jjDhL#!=UsaP8|@eic{Y$fud*IY*?TxC~u z2JI@3nMvf*s1l~5lGISo@d9?Dd+igU$9uTl}Pb2mU+2?O1G zfO~K7Q26MO@63lB+G>ZrK1cC1Dl+%^k)u{?&OCF~0{8h08Df9M&6p!D_*NCfjcjBZ@y=R^gEPIfvz~4JxAN$|u&z?QI>Wjo^y_y1D z>$8s(owg5qOtq#E+IlTn89uPLz0!S(y*7BEy*g^Cy)r)6YD{ABOd;+}h4C zQ!v>Kv=84LO31y=ou{RwQ!@@bDwmkd?@xntM`a%zgh{{mNcn@k>~R0FH2wYOa2EC6 z099N`nq|I)LT8o8$yRo{x?9t=?H1+*Z)HAVZSw|;9Bpn#&ROXu7lQvrg#ub5sUd-| z>_P3@uOwGnie2cq1%$45NZXn+hb{vOFca<}eX^RehgFCLYmgnPR%`j?00?Y<8lZOS zoCm^fWZf4?cJy`^p1Z%{Y5hVX`9k&3kgZO6R1n{iYY#y&ZP92Rdh14($yLV+kUy3y zuD{T&&nj}?mf&5>Lo0pO9%n$~Z|1QyG>h8TS>$FRty?L{q#=b0jlNpQf{4SN4e;}S z&$Qq6TIh|)>eWENUqknv%sXoztfW!!l;f5(@u-E-us!6`inm_7>ZFTMk+!W&WkqHdTPGu6LhPF-hJyzcH$& z6iwAWk*_XOYig1>#rad{urbLBmAu&xeFbHY?HgxD_f5CFylqxccG6CQXB&3XuI;B% zdy>T*+#LGiThQ21w64lU@&94TS<<)61|ViAo3iPlplCQ~8X*)FqJp@Q?4x)t5>(Z( zQc~K7X#-_Lc`cNEIFvRFBn{y&59Jqlg3+v7Cr5=R$c7n zWR{&6z+!d7m)UFM5eX)W#nKXf7A$rqn2JbHYr#&dy#yAUbI@KVkMs_*>3h@)esG|| z2?d{2G11KGQ>N34lknAYY6B` z?*KvRqb=&JbXMzTU+1{}7w@y)6iexS`}tIB-)J4y?A5M4oSZp*Xf_xTf{_oKp9DpR z)(Hj_(vW<5qtzx zdK_u!)lC)l_MD^k;q<-s%J*yRar%fpNUB+VH=Ox3N-kcw50_k%rRdV9hpdNhZrr(VIBA$%pGM%_f8;_wA}KJ<oQy?K*(AtCNw@^b z-LVV%(h3%T^dNV`X3O=6EkCFSxzFs~?5DT0w1B7Wb}= zuSkHarh;n0A}aeW);~dSv#+R|BuDkivst8#mzvVcg4|XOR=Elet!ki7wT{S1IMBB| zD%#g`mCsvu*ZYlfL-pIRmBm|ip4=iX`d1Fc5JuF+ESL^ zy3q<3_UqaOlLLP|SVPK1hP^{TLOGtZI=FC{?UX000LxOHyA!sxu; zV5O4{T65ij0h>MhB2$DK@MQKn;#$bHY`Bzu7xU?m@4>s9K9E%StN6A2+O2c4KuY!j z@?T3(kacx*V#4i|7*}M?uoei4HCc!%$HeVHL!L`Ro25|1gUBm$-4$f1sp-Q?=YR3> zc$eXdPTXl3y^p$jXNfc_&;Mtw5rFa>dTY$HCtHqlVVl$N+-gR;kA6X_`Ippt{2JJL z80*G^$4=M-`|{1_z%lbV$iA2rcr+gV_3#;z8)*~Fw|ykPX*&q6ADT7E`;aiqnK9Hx z$5~hmYAvp%=#*?HD8y#}Q7YV_hDdL*M z^8#x*uBGf|#ev4J$MPta1HrDSZX9qc$GS3PGLiambsdlp+F%N8%5?MTkrI1r%OR5R zvw+-1&W?Gv#9tOo;MeQQt^}7L0JrKmR2VDFby(~9<%7W7KrlCe|F4exHvZc4?E(BM!rLqX?yn>% zNFEx`ncMiZQV>@iyLN)O0kb#VLEL!@?;x)Jhn$o!u;PTdI^Sw%uU&IeLN5<-pL)6q zam7VFz!Ycw55$#D>%AbH?dL=UQQdovC_U=tU|V{ucdkfofA^f^1oxZ+T%TV-PF%Z) z$Ey=aec0(ItJ|cDebBaxz1nBG)f|DH`G;Jq3F6kA<`LW)vm_jBx7r8?%7WEizSnB6 zLaJStXYb-vdzYfh_xF_9o0B)%E3b5=ij0ELJEZYGWtc)E*Sg}@|G--EJt>{(XpN<& zbH9UD`RdtK|mg>S(%BKcTKf z1e~Dlx8SEl0OdPVGH`=}cv^9%$KX;d>kv`Cu)I7hc1H*Ir*32Hq ztl`&-AkIfIInfBS*%C-K)+~hFW)0_9eEcy>Ow6~A9hrq1FQv+8Gizj4T4eYxYgE^h zbN&6-+SecAUf^nEa`FRiB@}=4uOBJFX2}3hUNl;DIg-U&L5Dy8@F)AA)+pwt`S#bw zEHp#=443bJKz>j4#_?g?_<(gjj29n>k3-hf2ax>y`_4x;@67zr0%Y}PcIgPM4fC7< z(Ao%Apa_dkVV$f_7M&1|(5 zA|E)*JEkbD?20KWAL$@(|8P6DXN2YLp1}34A{&;EjBv&dVqeN&Mw)QwlFiGzVnaYg z|C_h0IhfiCgzUioZiqulBwGG=MOlTWo;cv4XtrSVamQIX2+=#3fkQxJ$6?{G0m%CP z1SA3Asvkm(FTaKaaeuy9-XR4N>QbdSay;L%4csmRS#OXR+p+7Gby`-%Wve;J#5l0Z zNG^%Vdhh<8bKCL01p!-7YuZmD8zIjJU9OQIc;xQ~o`sEV%bD zThDpt3DLdt^p1O&{nX&$do1R=jrR34l4Xl_+S3~jTXpW6U-0YRuMv2|?0)8?=jU&+ zx-EO!$L&}cdB9AoIV#6${IJGqOi+xo>$+me}sY4s!<1Bal#S znc4?VwfAccwaAct78%Tjk3rIe+9(7fN{3Z3XW_Wq{B01eJAic2QIr-5!zW*`#5Br^ zs<7GBBQ#%ULE)PaT29co>ZI)`yly*-!L#1rxCGxOE1i&och-A&g@p(1bR|-54ym`yxwiBxW(mq4_QeMwORg@i5e=R* zdgggDFgV_tLM9bH)qJ)elExf+rZKD;*66y>rPuozw_5a2Qi9D8A3Bgw3uG1vVYR|A z#D^$0ao`k-h)=h08c9Z{^|aXR{ubADC^eTOEV=g>OYTeEJYzh&N_6OY7pbpdYQ5sQ z`9bJpi4Y3*WoBjEt3o`r@)VUN2W|7wMOM832dmsZz)o)HYL%%}bLPoY*2s2v7cM{>OqNg`ms zft75OMYS)bHy#YQ9;=sa_l|a;y^OXlsaC~vh29=Eb59Gb|ENbnJnK+eY6Jg+0eqrADBTex zZVyrmr8^J0)Z)+oS_qqD`>}k>7DVGR=I4ueC3f$*W&PKe0BTO?B@(MbX|#qu zjswfyHWAuGNp; zr&m18*0&GS`@AXU9-r42d#Buc?jHP$?R)UA>B&3q?lj>j`%^J}mRm+292-5>*pSYE zMBFrj)Unn){zv;ZXo$T&be=skf3y8%**1IO=NzlkyqkUC+s$eXTVS=vuCQ7YkWi*o zc`gW3YLW$X5{k36?XsF=0^eA5z+PW-)ZSo0@xM112IZUKQDjNL_iGN2^bnOu-2Qw)&Zi<8L~D$5E_;|nHWce{0}A#VemUD((Jow> zK3%Uj4ahqY7PHO1`fw&)f9AOIu)g0{K)e@t1!XiYY1x!!B}s?rzF2Ijor*0fgQEKS zH0EHzqwa&s_;qMm^2IEde{4dovH`M){(>xjl86s$E~x*-41$?l3icP$wquWds%+pF z3*2whqTX`auJp2hzA@3BX*SW+o83(V|MND^o2Y~d7?xX5vEfHU7e88_1Y(TFxE30Y zc?}&pD$(iCk@1}@BDJeUXY{uC&iyUE+i**QuqSmMYH8C~yS5Y3ot5vqGZkbzIYbf( zp>#4YK0fFy3l1IMYo`v(vzt4H+vUyO?c9b;tJsig6>C!g^CTVHBbf$<+0k9Y?a02VxOz80)(dG0a>h0jG_;p)4>^}7LKHizEy(>`2mbLF zlmp4397{+J=5aXtP{MuTy`GoIA-EUx-+}!gU_Ov@0uhJ&fq#*7U%|ho0>M6Hy#tW% zr%mcRL|yg6l0n8XxoltxC_#!juPI_bkp|A5>RFk<)uAl{0cPA_NC->4H?{NR=T2oe1pt0CqAGg@v7&G7A7&^_q>OI5ir~PP6 zB1c){_I<5U{mxdmX;=HQX*L$)Ec>=zhW)eaB&+>BxGy1Rs;tag@Y`*%TGYJNnoYJ6 z`Y#7a%|%G)V80~v8u;=4{(27_U#netL`2|jWHdnZzF@ztm{$J-_uG58kF7TKAmt6G z5OA(0)DF=e;)ubZ#J=rGsd>*@GB z=9@|_0@`k(fk_cHV_L$2(hf=?P{>NGyr=3`TGwCYq?d?@?aayhtsx}+vkxZNw`2nAlPz=|?zwLFH#kwA{sygb z?dy+by7rL`z~a6m%UN-RIRu}ekXFyElU#!sp4@%3B`5W>v_nPIz(e|l@(}+nV2GAV=*n}+;L&21M!0%#mEG7m*)D7w ziLBDk$~Sej@(qyqjS&9zDOSE7Twe#iuZgzOHBsPuG+QKF6tA=Axw5tF*(!9rn*Hin zo{!-%bH$oO$Uj?dnic1!fc`0bRvJM-s(UW0G&kLvmGY<}Cz+5S$x4>TTFKIQwkRuF z6lui^f~|!8srm7Cno#2U#vg3|f%P^i|FET&p0N5Ss9P(eI|4454-c1G_XC^3enfEE zS5|`imF2ngC|HF^!?FAxSeU)aHRUE3TDe5(R(Mzz<R3h8+wtqR0=e6P=$Zk7cAZ6&!)bBLVpDS zYp!3nA_9Ojw`kO|l}@{BiteEQ@R80CUxofGJn5l-=hE^j*ppSc3jP274;J$#2ykF4 zV03!Q+ zx%N8r{H=+r*)O-ZMlG;+hRn9Nx>NI(GREE`HvgFIgTxW`<|NMlF_%o}daE^~O3j%| z88eVxbB>ICJFO-rlp0cX7VWhf{pVS&m%Ced@E!;0Lh~%~6v-feE=)Z3_NVLS-(nDz8Ol+d#o_f;NOcJoU5g1qt6#%-RlZ8qFVsLQXtf-Myhee+K!Gm5idR@Q0hI?*8qDK=hi zpS(TFn$-u+G5X1r90v5Zp;fth6ZkgU;MuAP8)Qjo(_*Dtx^^&s%XIql<&&(>zie!` zZC?eA#i91;J&&R1ta7!8GT*gfD$-|l=&-^*qit$~ujkXFYpv@I=G$f+Qx7y5JB!MH zdt%6GMD868LO;%XnQS`_{dC?T1a6+FSov_CiuDfFE_Fl2{>@v&fb;83#|V3}Jr)!I){*&ls-ciZWX%QAL(H#zTRJNP?S38Uql~r_7;3@6GL~T8gV2Y? zCSl@Bvq*YrMW*(!*o;1O8OLa!z?gCj2yDl&2g+A#3j?x4f%6cEcrcGSUK0$YhgjwM zVBQmKC%5q2<`AZWFe}{piLcyYKLUl?j73ql;k7cU63iiOd3c|{M)+c2Jf(JL(J zSiXHg{f+;@19qWkx>IbVyGzj#q)U4j#LLd7w&pTO3(`v+q@(KO&#8sR9demR z4~)bh4W#cK45UNr_sz7!hc?-f`~s$jvo`7MWh!XNt&%HfcNR4V7|v?RKYwcvp!);X zA%ME9d(zYe-T`dwck=^EtH(W=ZxiZbIEEJ+_=Fi+$>_U>6XRJ*>MNZM~?naK)$G88sYe0eTKt)VeviBp9ki5f!mu#^w$3?j_ZYcr#KvczV;%_ev7u* z>kGD$7u{mD=WepvGr;s2YwUH@_S%!z*c)tbPFZblO;~MjPhy+8*501J&ffSr*J|_l zbxhf{XKn<`$+ONDHQz$TAy_`!D~WLw9jD7bg2qzf^0P&S9&j{Q4i+`lQkKuJ9rbjy z2UFhD`7)|&Emw7bNkm8QH4;Pb3xga1S6|jQpBv6X2TLtWto$Kauxr22%TY|3FC-rb zf%=SK*&)zJk2^w7wd$;TCpsD9_gd&OJdxV%>FOOw3$76bENC$h(PObigziO^-*3@j zhv^5qhW>sdQR;`e246zjR`qe4Kv7#`oz^$1vf9l^wdIv*g$6$0C)L$mv>7a%ly~m7 z!|glxec%MGm&W7K=|lG-tb@XPNj`0vcRqS!9OA?V43o!MQDqBl(dOZ8SwTyTau-qv z!{ZY7Sre+Kh12?`*NJon?=PV z$O$)IWl`b#TrbB)UoCLWF#@O-7jkDwA9^GJfk?AebEKVi%#iI|{WaP=dc3mRvT$p* ztn;r~_Uem+?GI5iorTb?sFo4XcPV{&Qdw1}rTKO6b%sEH|Bi?;!I;s*q2<(8MrXZf?+ z*pW#s?a&V`Y~SeSw(q+Zws&Mp+dsU8?HbYAc8=~~dw%F>`={oC`h=_dq@>2{}FdejvYC2&SgV4KyND`pOg&sq;V-(dd_UFRJT z)tSA2lI@$eCE2vy%_cF4hGvVsV!@7zNbkLOrHO*Qf{J4A4HX***cAnPq4y>tAhy_B ze16Y)uP_^b`~BlO!!UE_GRWsW?{l7WPDe)Qol5S)d|L5hbL=&)JSn7HhVZqzgnNw@BS{ zmfd95^(y6vdUWr&ka6}QjAZB3u3s(J%-=%pKMY~vOviS!lqk?jZ8t`f@pG@MxKL#U z-x1=<`4qQ1EnIgCo+w z=vagt2TBMM-FiAuNTFLsa-h`YxqKh3eWnA>q;w({W|;IQZG{1d97_icL?{Y49IQ3@~NdT>m6 zd!(6>j6{(ANxTH>ak9$2CnvWWuK`=OGs*|f2Imr)+i=NnU~Qwta8|K?w+Md=-LFlM z9Xw(e%|d=jOyJruf8azjq1&5a+fxPG?%n~kyad5JFpLey1=!JCK4ak@F_UiYIS3YD zi-JCHHK!JBKnyK*Q4FxBaEBdFdxn5Io^}_3_QGdRQNAt-r8`!jrC=*HlbK4}Xv&?8 zTNgqYJTt`2awm}OQ9uA+nrDskaTAaeVUCl*=Ex2ji=6PWI2$nr=c7mA(lj$%nmPs- zr;ft~KJUV8Tby0!gxtB#IJ>|B7ZaUuX|W@&B-kJ?(FVnJR2L?p zqA&rK*H%$K-%ng$M0r&$?l5iZ-250Lh-z21uAOq5Gk8hQy?0(9n}*P9)zzpgD!|=K z*?4v4AfBAqgS$tzqcLkeuYUvXW~|49!y9q$&=zi8_MqkXF1$RE&SmfvDz4_Dusk1G zH2*AAso2*{%f5m+$t<=_p|$wrJ$U%=n8I*{b#?H1M~UOh)Y`3a5z)RL#n z%N*BKb80MF$+s8?HA+jV_Zz!5Rr3`p&K9;QV7@D?m4}p$E|k?YaUHaESw@|Np&%)* zY6J9Yd1;#fqatu6&8t-GyMkAFx{k?hXHc-$I4zH9oR)h!Fl(^ZEe~=XZ^OEVlDvX- zyN;Px$mut%mWVrp9&jcuI|;Mdsi-5_+iAbX;EwdTbRw5Kr;^Qk&+)i`ⅈvu6N!i z-WMs?ktmyo+?V2WCPNL$?jI8lV(^g7ER+#eOJ|HcPC7cr0C=M*!iJL8L(X@UTGpRLr1Z2J;Ha)-7FR=w&5*>YM7}#$mjM~k?Px>sir#IWj z{hGRJ*&9fDQgjhJY7mz6mspNvc@86Q3kt)7daZ}O1Jj+m6 zuaa^uOSO_JvGZ^XmayB;oE6vEGWRG84H=Vi<&u=A_*W*fuZNWG$Qt9wo*uF6{w;|D zQ7r_dg4K8d?ce1q7iT&ksbh$`BN4VB+`*0sQtl-rx~_dng@&SgPU&;HC|eLUyH3$s z)*qSYAntFWwY-+FzJL!T)|NYRc8f98Ysh~2Y~{0**xs3+r%b01Xj?N?Yxu)b{59dQ z2JKj*^Ys+7H*x)Sgp;EaRT5W5+^$^n+!eH4y?o%tDBIgF6kY)YH=}HykQgc?6u%>9 zAux6>f~GB|6I@Dg)*xy{I-&_}=~&d-uVXr$;Nnq?#Wsw7Nrdr};=y;qA8ISC6bDWuEhMY;G2C&4?@wj!6=_S z7?rb4Q4}`<=VM3U((LglSYm_1wXQh3$Pwpx&VnR6Tv=$1i*qe-bZw;`#ww)bF2wvMob! zd9FTc^VV`!67>(JJ6mp^!mZ|Pb=$&dTOw^4uByC=Om{ZY!`OJ8V^nJPu#kKQJBx2* zhmN&$-mGSXy&ToW%czeepdxP>$_uv<-KS7a4W_1{8KpIi)NGF8m)vw>nSRV8Yj7(g z0S)`7qh@zBk7=mc%lrFgp?3d#)TS>&&3+zf^HIHT0gnXK97sg%o&^59^YL-bo`tC0 zyBJk_6Hv8l4o{ST#{J81Co2VI*YdHc={Cdl7qDRTE!JJ?1)pZov0O@eFOZj(pekugycVZW(vG&Ittujok>tdfZD3J3+Ol9^PX)f3Qa z0B_^D0<4Brfux32k-)X*36j?dyjAF|fxGQ|ZSNqj)F3V2(~2hL9kj=Eo)+D*A=jpX zTeob;cQtTJAg)yf$@?FdAL2V>!rAyB!JH=2w7{Cu1`i`jCY{-c*qBGBbOM_awlNPQ z2H+hDX$h)3@xGA+=X>eg+|k7D%TR281eh&=~lO-giJ+-Mo(sF$6`AL3H& zGZZ#GM?upI6g0m?9*5pt;gw!xotPdQH z`7VR_lMTcAFdHOCI$}1ClDl1YGPI1t(bY#RdH zlD8J9+dmf7J4{e8UmtbZ^XX5afZf2x!VQGC#M_OhX;dt4x zeUpOBxy)DSy)nI&-1i=~M%;A`Z^#`~-=Hz=oqNx&zJ@4YAGt+xU>6g$k zjc``rC2ScrO9b7CKo&>~l#LjD8xz!W9(9fnJ4v;W#MT>5!pf6bFyB&zI6u#P6|ISB zM2fqu%vgnJPOR7;r`4@m=lSlW)nc+*C#VR%9{CtOY!k;?tl+U$wLg|7O`@X8L>cJ? zI=Jsj4bPTZOehVFrH7s1MB+q&i9JCg4L(FC7eGf$DS?B#259-($vq1l{y87||CxiX zMl<2*cAi&VOwC<`vy+|7^G?CI5qni%I(PdEv>oPCqs^s#;u6-R|EwmCRz1}0BNEZZ z2^Hh29|Ip&Qi`bHw@N97?96_Q1#6qw3O_^jQjv{@lrKr!PjNqrIPM}Mkvt~b3%R2w z_u^$~dso`=N!TrJKGjI@H*UNb7uS>6bnrf^C@`uw{-X-2`M&Ept9fQp6NBBO>SL0| zc2eM@@t83GP% z6_GgjQ@#$KN-9rJLipUZn7m-eoAOB-j!9(+tOd+*l(405lepVLPoBk1#&B2GN8mtk z5Dxg+Vqc&+QbWzLYlb}%rvxH(?Na2NJc5Ga0+iM^qq^xK8rU1O{?;Ro2!Dd7bg{jD z{Tk2cWoTwXuJYzx)Uv#??#^8tzf#1hBPXz8!*0x8wi@GIrm!cq8%Hu(aa%D0Qyc~( zefn_ZC!3)-X&mZSjmM=qWb}NpdG2sBdI<6t4M9obFjQ}|MBPCfG-OyY$Tr7~edAHT zcNA)OFtAV1N9C?iG&PH7t5LpkDzAen)qN2pX*e0p zV{bTvbazOgFUu1eu!yW&xmG7Z%!Gx2fNPG(Sd&F8U*-yoXz zEau4;6U#}&a}ui4mZLUp8GqnJG^Ve^g`y%hM`kloiX^KZzrevaSQfqR@{w2QzWs13 zmhZDYvnGU;l)b^S)UGR%y(?IjNzD>ePuFaOaWmco)k4h$Ld|!il3hYu1=4o~kOE^} z3p*9!3J*1PMIza^%^`9MExHzATAlXyasoM#uvbnYx2-2u&rouS7Fi3pm3{DCc~$Ex z;$o+4Ho zG1X|S9Du~N0Gik~rWM7A`xj%PU6uj4HD*k0ct92cEgqKzLGZ4`6G1)?5nZ%%@ID0< zX_nd}f{tgO&N$f#LV5usB5nDy8+fQz#Lx~T0 zIMMtdyWlS*?m6E2+vVt?zn)eUjxsdbi1uI3VE4N1j8_@wzmWliWs-DL>9;S0RWd-$ z+wHOje7=i+AbXX#?N<@G__FOB4xs%Pap=*RUE5tR@u~@XUcHa|Wmt^e&woorUSp<#4`Oi5Rh3vIDt>#h7i>GsmU*<&TaKr7kZYhNg=;G+_hPS<4@r8uiuxk6@dWpBf86kWN|{mC z_BP~;CUr(NKol{295tW6WUmR10xuOM=?t~4gTzX>NjOB0;eV-c;+&M&RdU2X3?YBLL-`P1rfie zD94Fr8JBv`z?ZKPc;P(mABe@exJg)@v(Hjb>6o``R|n4){1zVNadh^^5hQL%a)s@GUhY#&MV55=_w zLr}PAD2jMnvdRoK+eb6(9fSJxk*L`=2&K!qpfqVTnuvB)F~ka?TTQ2#p``TPct+U= zZ%IRFhUSe8B70Nvu1`l}Z7OB&okaa+jx$=X^pl#h6{w}Zq^gMil6;akZ!vMd0VRd$ zC@(sPa(XlJQ}!Zn8WRI)p{Uy%Ofm5_^mXFcO)_w@M}~RWNNuep|RqoCZgz4m-1xo zDe`0uqw<)%KlGS_p(-Kav4o4XF0fOx*~f=ise7GV~P2| zbaW=|fB0f5#*Jp-BV$^zP>9IeCi{NTiYS@R=4zd*mC%#sZY+GavfHWAo$|SrHHQv= z9maMZ7kRxU2x2Jj&V;79*&f2`lty*3IFOHfk?@X=v<+@<;F#XWY6f^ULlFhm`2Run zKS^CsZWTSvQ>of`jj_B3Z0)_^;NS&EmWDbxdc)bxi!nW|D2(M@sj_$w@*ZrL;u#PQuV4!0 z!4lJJLb-qJd<4WLB7`bS_?(T1uDi?ZCP#D9o+iDj;zS`27xS4!_7TrsWBAcy*mo#T z{w|1fw$~7JKYz+wIiBG;negnzbG&4<{+!bKbKZYS#6N!g1V2A~gu8-wIvVPT_Nw}u zD5Fv1^tBQkJaHD=4<5nlEjzGq*>W~nn2E5c$-G*BxO(#^b8~^Uqdg|tOk_QUIYx~e zj&C~khw)FnU^}8ec0~-uv%M1;%@1dEKbUg53GxK>2}4o1U@$6H3_|tRfv8&74SBPF zB(|lODisuQfH$AQZHefc&L}gAm{6K-vKtk@FY1ccjf(O(@qVLv8|vu@uPs~6NPd-) z#%shr$Vk58+9KjT8O8ZKQCe^eWz}UUIG2s{-1XG&bVKbfH`MXAW`_rt9Z%kRp=zfe zDpLGVy3H4bYrJq}xjW9ycE*{h?l=|YM)k@A8GhbKOBS0K{)n@r>GY`@oJWb!w8 zYFa!lEt!YnO^cb$<#LmjM2Vf0KgeY#lgrT26x=v@h}BCKI6_0{1s0|jS8zCSI-3Z! z_56E7b}rKz*+mssChK=)mbqi>R7Enak-voK3WRFVouF9P)K3Gc;8r7|+|!f~iF`Gn ztAJkq`{>C%9f)O}(9SDJmRG9ts&zu%Q>R~RvA(=oTUR7Dm*;Cn6y0;>JlZwuu0vj> zU5CJ51G-RJ1GUonC8JwdnCH&*L#KQg4KVt85eb_^s+UoBJ%>H#o^y0CYg`ytC$q+7E92or8U%g4 z^3a`DK%=iY=ABV{r*_F|aElD<`|+!IT0f4k#w3U829;z9L`83)o~}}QpUFL`&JnY7 z;)c7bdeYkR2rR9)^WC0s5c+-C+U!C14y#n@zeMXUG>uGPb*HB*ZR3Qk$Tb0c+}ZIo z0w+bBs@k7D}t|H*WI_xP3DY}bDdf&SVq#>bQGQ%3IPK<0Ed5jf7z zst|Dj{O1GF>xKBjaaV@WV(#%{)v3F^)MsY!exBmHv>%W%|5UCk)zp8~`+q4{B7@>D zaHiyyn=i2c9A|INujE*QbqvPS*bkSrtxOti{(kB^giX(B=?>?=+N2zKz9GqhL9dGV{e0k8V;ppm(SXVb6 zl3flzxOn=*-6x1+oJBjIq^Ry4%FsPbwDVc;ja`U<_$3ILxf)>!yD^0tt8{S{s!Qk| z%Wz$ou9{!*Yw6rP{`fWAEWLqW$n@vJ?x)XGSpJMvj2h2ha#F|(yrMq)QVu@nDOvx7 zA^Y8*$@G@H9AnplN~*FdWG^U3`ss^EIY=w&wq01TYy}&Z%|>Wc1Uy56;OgrIJ9k$` zEsn6Tw}qMI1dJFz7DK7pn2Z>L-h)l>UFW_q?%ETRt^1>K(@=)ygQ?mKz_nR@kw32= zx!xaF<9g%Dw9dF1^EGak@1!Gzrb4RY&CRreljki|XKsmd&J<{~QfP$f9LZPDYEZUg zX{aUB#S&ggrkAtAvxF`cDm2v$*(;gytje2DrY}Wl-a3?AOK0eQ7R5DH$nmyD)k;g$ zrr4r(iyhf+kE-oVGYc6(F39rZt*<8z z`g)V^emLM0jQxHQNDYX=zR(#+4VjBwA@i|6CK2ytFHEBRv=WVnm!mF=C8$}H_>Z$h zHRl9wUn@X9_fh$I92Jv(2ftsovNdEct85L~>l-z&zausN_g~S|D3DXd^{rv*5&@c? z$kG}VCGOVJlM+#D@D*fgP!x=6V3(*_1FDLj6+Gp&n&6?92YF2CJo0+YP$+2D-bbBD zy|;wf+WQEuwdVv0mce`6?|7KT%?5w3S6*Ohw1_+6rLrN)r! zMjYJLFYFM}5A7CeqaJ$a11yXP}j5x$za+z)}!tqjgdY5s7a2ph?9Na$D!-TMEU4>fM}j~cIkU zf5<(_G{(=nt_pv~kIG=Qx`hOPOoDShpY48hZ@)$nTzbAb(~RQlc}?jrvb*r(8e(sg zhM4(RI92fp@|sC*M&lxID0NazAv&dma;z9l;Y&3P1b@tmhb0Cv_UNaC7 zz{dlq@Vp^=0PWkdUN}|TK}0+$T4LZvSC+nQ#L3x=QtU&!5OMin5aFn=1G(NT{6&gZlSUSW6$TmrZ< zdAh^O)d>@v?J&;49;3U^)c-1`oi%!Tn*_y)UP0_Q5!lUdUTA0F{XY zQ82F$@@DqLwK+X;c}gdoaQ*_7S*$f}ky%>8?&FkNB;%P)h5f&>p6n2-ly%B24Rz9{ za5v*|W<0AXxm2uWOukBGJFAPA&}m3JN&W(qk>6!klTmst1;u&CP{MdNC(H#U@gu41 zk4N#c(KsJ53P(LgBGYp`GJVD&BhZ2|wk7uXTj4;E9kM1lAUnp6eoQ+Q%wc7EoIOrQ zIwL#M1?OXYQ8L{R*%2W)G&vfFqT;bNY&Ld8&Bw0TB;F<=B{B(VQ3C zk^MBA&E#gIlIv#yT`GwgO|9{GRb4B#3GhUvv^dpr5R$^E#GsCjj&HCh0Mzg(bkmU8 zhFm>?r;dFZGIjB4hIt6zLx0T$IavuHSPjSf7`(t+r& z(xp$r=PgH`aOC(CL@(t0#UGZiW7AR?ew6?RwlI;W?nx7~|n7|f+MRJQ; zmb6gKEF5Q=&g#Ui%*#Gv!c`hX7ucqumjB`5(c`J=9Vw zp1lF%8*N$vJHAaE|5Egf+K0a&?Fd`s`dmbCFjpgwix_IMj=q=u>=Ka15}wNl4dHHs z?wpXIQckTYQS268OCnjyZzMfCmYGT~clIY>zCk$d<#irw)9>MIHOtuKeW;DAxBfzO zdASC8_Y3tLRJl*4DI9_m3q6A)%IFkgj+4xlo&qw1!hC3^VzqQZmst^x9Pg;`o|%AuCiKwJFM&{!PYU9M-UvH{9y0w4M%4Y%c-R> zFX}`cMIvuk-vGGzhEOaIQDV7wNCfkvvGAc|#V?9tdF&ztvE^29+$u!hV3z=rIqKmH z6?qG;MKG7>TZUy%V`#i7#DOqraqwz$MKiChMP(VcRG-Mp{w$8|bX zu2)e%p)0&rG?Y^EnicicMRfa-*DBV&MqX1UFTSz{rB@hlSC!!0+z=eL=!w(bCOGOg z7)QKJamZ^pGJHnjfTtPK1I9CEw!-RQJ52YsgP*elEG?{II?5V94V#GX`c1&c-OSOY zk0ne7*`W6TJ9O;j!2iv*nC%^ol$dEavp5mQ7OlYMsmriqY7(}^EWwtrMC^}VOlSOh z_AHO>)5H)R zz2%ZMQtK8Cwalo6KrUSUpzq2XwNg4&zGr5%m4x0V2j|$zEeZXj+_DDKFy#z{*aB=J zxxu#MY=%S!o-+5XNVfAB%+xJ<+ z$95}U#`CpFN-8mKw+vnM=c-yuCu>&Pu*bKAigIf^o^+)Ipyn~!X~sMW58e2^1#39) zz%-M|)ykPPXiU=*q5ZtBR3z ziLmf;ey@z>J3M$RI69nEza()c+OfY&Z{t;}0fDrVw4QK?ADX6_2)jk! za^Xl`#cldrY{qc189zv8KF478WmVp+w35$0yMCARy7$AuI}x_d5wLX%qi*5{2cH<& zc}GwSC%?&YVYrK^CZ6IpBb5A}46l$VcrxbpqPN8_TKJuS;JGUivg!b)yy9*q zlF$wp-9)G@E%l;g`V4iG0A|U$?>&k0=gaV#oi(0OQx&aS$St%Ma=+pxThmJTJ!;@j zsE_~5sbzQXJ;04yx2codL=jV?=kv>P`21DuK9+-x`?IiY^H$7Qo{Xq@bKyUA3f#l_ zlhJu->Fot`H)oh}fbVEqD-5$3k3r)`qd(*A{=2=9fKXP4BX}hv8OM1g&F7tW~V+Sx$a0W;A@>F#TsO?ie+>kqWDyRt@Ox1JuYEQ;Ij>RrADz0KPo z{ZEn=dqpeIV(Yf}SWn=n@m!}PE3zvj>WC|F)QGFnk?MRxT#eu=+*OZ>KK?d#g~yuQ zqI(a)u5KOBlc#9#mP^x2>AF+30bO10TaFZ6*{1p_+gh*emY*QPa5Evjg@BexI&6Mo zD4{mNEoGC&47q=lpqlp$*d(RH$_)ItBn^gZkMcQGOsJqpKSQO86X+e6AIGr3<8WrS z&x@Hf(M4r9A2+X7&54mIgbCZ|248Rv-PdMAKQ05t-!E6-HvT$+UH1+taI0{Z@~)%H zPHf0}paSbHM;>!b!~<;1c!cdIrR1HN&WRcL{tMhT9Tqx5kflbYah2+`#!fhhRQ>I}*3tq*ihZeS0k7^vPA|+i4wocUcN+ z>)mv57h&hAd&qBosp%jjvP88iE64)*i`Rd_v7+ZVc<~W-9lwKg*8HYldVvEM*qq~F z2_NJCz-#xA&6fE&6%TQ$_!ef&p%&qm3kTZT(&yaeHsD`{t_JWzp)~qF0j$d>9 zqc)D;q(Hd6nl8En-1BE+?&^E6waemXsAWZ^>}re&`-ia_Q=Bs9?0_ihdYr6?f0Rv( zD_g&dav~&`(k3Z+a%HA-Ahq`2Ja|EO0OO_D-!onski!zv1=;)=kHU2Z+nT$~BGD(q z#wnP7ph>V_xR24e8`m?^+=YH}M&uHeyD+Qi>Jz9D-Itlvfo7Kd`v7Wj~-L|zW)F>$@6MTtfjQ7Tr94{@eBFbOP+5@JA~xzyEx{4C88FJ zq7x6Vm`J!#L$L`Az(h|EjCFCsD0^!Rn`nU{e=I{{hTdFiU zU5EM1CTia|YMIZhWp1!qv=j2Yd=1@+^lFz-YA#;Ha-RjvXU?VWJqM*%6Ht12EsC!m z!r81;tnb6(DWt{*UP2%Ss7EL z`?wBv3aSd%f@V!dkw9AETKiHc{}zEY6+^JD3#m1j>u4*G{=Z?a3-slE{};@4XV%W5 zTXrPm*B;Ydv-})d4;J~ZXeP^LNl|8Zd1ROTjFSyHYSMsEH`qv!Gm6&V%%-yvm9zVa zApx&xDFXP@(C1@Ds}Ez~>?0UGD+gm2pNGk!(=b^`;dEv;T;eWsY-}03CRHMSem&+a zy~*hN4(H6=C&=%@eK;{#*nSbL>0+5Q&>}F?>`24U837f1rw`KR2-FbRE)i zZ(>Jg3DzAb=1~9-{}mWABp%b|A476#1E&DBz}+vCO?EfJ!z&k)qifjhoYkF?oDmUO z&P9reLLxMLQYC`ISQS4plO46LQEp-I9#%;SQ+g>gi0m4;yQqN@YH;F>lFVBV+4v%%2Let<4XyCod<-$!GaTCysV^ zXVk4$M0;ioSmPwF6*t~D4Zn=vv^+(UV)(zy?qXa@F%^(g2%LQ$f%~fASMva_Y|w4Z z{>Qd1(_rHq!U)|P4y#YYJ}4UYE-my zDU8sC=d>e6FN8mHnn6*^5q+Ia!luUFBi zxc!V(ffApK1}?X+Bu*#CCD-|sxz0!Qr`-MdAsSompt_+E#ne@5^u^e ztl34k+Pbxvwqyyy=FWl-<8znEli?5?h>1R480+dnZN&j2tu0|XaU2Fw4<9gc82S#E z_?$c+JVO9(I)IL)I8N(GeqT z-7tpM(Q&Mbnm|3tDj*miI|ogMM^FsBgQl_EY!PNG-Hx^Nq#d|agR_+_v=Kf+16kh8 z55I;BXlhw4`nk_Vh;XuF;X6*Jb0BkiG|q`8Aq>={ZXuq=PYJXCi>`uQjpaIcw>?D#$lA+<`3mUT5+Iy? zo8=O=Yp2qw*=Ijqn){JMNm5mRc|DViCU`kWJ%g7XVU+1 zJ+VxT8*U`7**n&76H!j2>x;;;g$Hj9wo_OUd@G?P8^*+akCoXNzUT}*78fICMIGjE zZpPB>_Y`KA61DR-aynsh140r?VYfIRLzd^_r%fW9)1RmW@{2H7!>O9>m#Ub&6a6C6 zIw^$c4k5xPO{N>ozZkCW9J#QvLiGku+QI=?Vm*9+85^j~TYVFwN9ZThrBx5IA>aaMRyJT| z$~|1J)8cQXhP1DE1W49z@7X8Vb*dS|$N4im6^7n}9PrI|o$9Lu@(z1j}}}VD#uUu(UjY$x~`rqEyAP zLpAKO%LtsRg%kablcK6r`$O}wjNCa$O(OO1h)QOF&tg+rEi$R1ZNmqxW^wIB zeoqF0UQ?Qs1FbOfAxg$Tijkyai&#_K=rJE0c?s{bN$Fw*?~iUjL$_>>8(%?bKK3Gl zmX#v%vcUBvyHCAB2(5trtOBuH#~w3I(_!Tt4r`|%ID{{T{U)|vv2o@mg$! z_dmYIktJbhY!;D)VoHM;QfM@6I-@{-n?m_5>3DThW(P^h&_Vjh_oCstm<%bh)M$p3 zx)KWHtiP`*ra)e>5as!^Sq2}+pnL{{@cG0b5s+L(!y zlf`ThbQ8twcyoh!=Q~_gAMnHfnY*AS{^zKtnSa`r{V*``KyvVWtiN#=jWqS2-$#{f zS79s2S*?FW{HBIt4xZ5yy3bNFkXM0kSB0A9ESm+Z$RK1Zssjxb^*T87Un)hl;I%) zjfgY)+j7v6i$D(+{q7@2q$BNpXgz_K&wy^1}uHn49NjVWSnF{0_* zfQA)AF&)ydVz`-tPw!+6@)S-+4c>{+AjYA7C5Vg`ftc2E+Ogd{4l#zVRG^q$dFmt&u z(c~9&oHNy$kb2|+N^ieX)$O6=3d6sWf>MF~<%Z|DbmKX$FeFzy3nKq`5t;6=4A;sVk#_Mp=B=+$1^F@> zL#%=#efzP`uDc^8vCc87x1^ZV)f(W!Oz=dlSC+dMoYodc7V|rat;I6{F5KL^vh$&<-y||W z3hpAWhsQI3C-Y+#@-_hxxrK-!^Tp001IZ`73EGAAq5L|Sqvm}n#u#5J!=!}Gc)`}% zVn7sgxfoj{ke76+d@VuyBQcdzRBvjzhuWLXD6VASUQ&)zmkN-ca}K*QPhjJL43Z5X^yn1DfMV=!RU2r}Q4Vhowj z0KWI&f#_)>yzkGWANmdK#bn}7=-5>s-~9L=4D2?Tf)E39CPhU+7a{!)dEau2!a4${yP(xw8dIN*^b?i;M0yXStSY4t8?iJ*HdEPX#ekw{Y%|PLW zmE5SXqtT$==+(6g`gHH9c;9E>5GDdfV!(*eObl3IFa?+|hFLReclE_sKkiT_g~28= z0?w29OX0ZGz{ztEJ}m)p30vqcJA?F#)wobgXFhwX++l{}0smt>A@83saDPnZKOx(% z@)u)!hXY5S{(@xkzm{pL+>|HiwDY(oz-Ut?sHZ9B>*+msj3p`?s<(AJ8O-2a@jmGM zMaVSyq&7Zl+|@}af=!M063{E|zP%*q(5!ozz*j@PE;5(zYAn`0PjLPATmBD(tL85n z>UA8K_s~%P>%E5d9=c^m?y1KV@8v7)$CV;g#rk)Q$a>*@oZ-6TXm7CoB#D2L1MIah zU!N+CP+y;iv4r*v>kYSY1)$r-XuIT7sjiUz9ZCOAl;+hG=B<2;UmMCcU>9?!Ec}!b zBSR@WqD|3I)EF8W4Yr;^d$VO)i4RF{(t91kLu#q2k`2$0b(szD zn|?ud6^$*I9<$2v0PWIwh@M`Dm>DGflo~28XW0ddJ% zwh_#sZS$sDHS&b?4A@l=|8+IP`O8hOaq#L(KI0+w&(wV^t~oNR<=axyRw}Ew@q2 zNWZkE9+yihaGH^RR`yw>96G^i#95T!+0<#(DokN07fRK^FP=u(sBqXb+Mnp}19LBT zjB$3x2-?t1ttMiKIa8~&#q=9FlF|)rF^u^8Fuf|#es7b$TC_j77y6t0gf6{|px^O3 zy!XNTC@ZEdQ5v!^qHm$qyrr3uJ|+0uO}TGm8?FqLbQ-TSrFw(Ig=k-FsHJ_85`10d z8eA`1L)j*Yv*i|Z1(>TOoARsEP;zk!N-o4R(obYr66=APHtpTDJ9_o(!IS`3qrpSb z-*f~9jw>H?_3NHs>yC!{pxm&#qLol7F!xe@zXOmP#d&ds<{Jc-6?S zL#_h1dY%s9ZJAIt=10Bu?WC%lK%?@n6SDv7Ej6OcNwpwfE<+=Ko2BM$8R&m4Eb^9W zPMw;HBuk3CT=~xR_)WJh@D0(G=^-7E1q?Oo#$cj#y(?6MMu!z z!F@AZi?1a9mobyM9AQBrbq+`3?yTQAJC>cdts?Gfs?7%P`vMQl_pW-onAIKM)6#VZuuVGeRf5l1VW zL-Y(;0_qsh*RneF1k8qQr?2lgX09m4s{MDdG4nR9*4+HC@+vs$G@9 zBjyGDGRQ+ZD~K6rKtB%g3@mS}TlM2IU}woCl}m**B2WXcov(3f&}o%r^`w_(L@dVu z-sLt%1^w^506OH~fzt}s11FYZ%I*fNV1_yMHL!}uY{qp{xu2iRzxWUa{@%o{vy2*$Lk6Fmscv zr5%PbD?5~~_CXYX28`xXFmgCI0bCBa8R#`=5PH(xE}7YWgDL!&_CmKlonX+pJwE#T zN61QBh3m|;Ha2i0K;cJ3pO#y)9Gs=gM*79jVI$S04Q#x4BaOXcn2oL5LE(qa$lCRE z)~w{QjE;6zAr&n^O#zkr{CJdJjNwLL3X0CpV%GLBuicY>pT_9bt2g>^LT2BgL-DVE z+y(R-GY%$W?J$^2!7%=U#xT7yK6nzWWB3b<gJ;u=V-5*VHQyKEbNpHz?UC z<(`qnn@yuX@^q+Iff^udN} z4#8mc5g4vH!j$R}=&vQ^*D}ao$I;J1d69TF^6T|X$4ZKpy1s!(J@np4@NY<3tDs+e zI1=>pkXwC{-;f?0A-|E_D&ypN=rhV`OFdX);uT^L>(e?1qS+Al_*UWu@B*ugG=@|=52!_s53>oI+R4^@p&!iGjFg=g43 z>IiHsGS%F+)|R|Nd+~&{QeTKKA*(bv8E=-t*Wc!UIvVQNJwOHhF(T;{-+hT)M~WF- zF2om~56AoO8{_xC{Rp2ks51HLFR=aoFL3Vg7r6ZRS9o{)7+xJe#pD5BA#Suj{73YG z4gWGNMq4BMSRM{%6kyxtO01_R=yc^PN&q(z9(9$JujS0P1_Xp%qwjDx!lMr}FIvh_ z{2_9x+4X{58|N*lVbk)<%=48ph4nKI760;U%6}uK%L_MN<3u@o$MCy{OX%(?d4;UJ zr&zP6g5K|K_|a$(1`KsV&%Sn;9KR1UmtzKMUV^Z7>{M+tp0NgKwk$5aOV^CvLpkzh zU{M*ySp~A43T1F>Z&-|ThUEr&H@DE6Gr@+`XJsng@pd8sF(2r}dQ?Yu(%v(W+d)eH ztY{MX$JIAdZ2~;PV&M@nowEOYIxc4;?Bq2}dGeg{kCwj;qbD+m*Ak>Q08iP;l>?o5 ze*`6{j;AhRZo)=9d_clKc*x^{^4o~KfA{D6xP4oK{}$9X+@klU4%b-Ye&$jhGO}~9 zhs0ki#NWD=#9xQ0B!0xg`ILTUz-#IhI7iU+AHvv}we@2?Trt{(IZk_93}^0k2&q4C z+!#WX^3RB2Y6H-VejK5GZ;^jYxd|}sgB}CA!l0`GKL6%Z#8X{qY?Ph>BtC=xW=j2c zn$P04NI&#dHnaY;v56ai2CfR?zquhfTegc~@LylaI{mU$s4r&lUy?wnpWd7NS?rQd z+2>L;ga2q0UL^esx3l|N7!39G(W^K8Hoe6ZG?Y1s5puB>Ffq5q5NmggU@m5iPY}k3 zM!+gE8qP5^9!;5nfT@cxdFFD&CT^h{IU5JgSK(saUDPqCzfW$9+#^B%OSXb}&cI)& ze}}Ss5O;09cb*`Q;m(EIFOj|J0otuf(IkF0TwJfFqr9PhKI>C7$%hjEBBB0o^!$TV zhE}3$(Y;kK7Ck|xPL@|d)`D-rG?*H{; z`vu{;Q)w^LUBUlYKlDVb*XH5LspPq;>x-VOCfnt7z4VtIg5e61e--2WRT}*b*2?Ws z=#%^+`WTY@D$bXfU$VK9*_Dhg#VttW;40rPo z(lgFCN?~lD!s=753BCWV>W3WQF(z`ep_RFd??cV1%0;Zj7;Nk@nFF8Jq{qwv9d`snz{ zNANZ2ff?50;MwtSa3kS8JAVSFj-Md3$0vw3`45imO+~D;6>6%hv42k*aM|jJ!@T)taiO3Y zm)Mv0Na<@_l~|rD(G1ymd?PI(3vUCbtLfit(4?L8D~}O1_b~eO^~9&2b-*A0@FCuR z@9#`6{0*Of(Shl=p8SahVkoUi7VL!P#}@S#4nUCK#JmMdSi1_c)Dfwyh6AU_B52wW?@LN)iImhoJ z^)9D&zIuf;5`HhKnofBngMY}`ygfw~_AGC+pFG6@l72fybC=R)jJm~SK;u1_T)%~0 z<@GSEZo<%zSunGryMz5?#!YaA%GSkG$D!x9{G=9csnR>@d)Ln>of?E$kjcwj*aQrKGrJ8;xA+Fg+{c7U470Mppb3dpkO;kOw5Qztf6Kf+N) zbX8LFk!sZzNqvZd8&Jfr60x5hWXjlkSE^Nu7qVJ) zIvw;R{*@>cpO0pYAB)0EEAUO+{3x_<*8#oy&^9!X8D~>&M26G)KYAhtDB^oyBy~75 ziu@CV_|dc_QQ-HA(K@(A&RLDPr77IZoJ*{{`AExu;~ zEAJbNio@hU`+f@);X8k~j6!`O0y!EZnnk8!p@SeG8 z7Do0b=ew?9w4Z>!-8meN-30pgB=>tH&}Ea!uTwE<5IdMK)fg`-bSFtZN@b^1-b;M% z!)~~i=4l9-N-O9r)(CBXgmNl3xs0P1tht1rI!(ntKefV_pO3)%fBY0KT|Py!RaY#s zHGy~6kFj#xzmPokU-0_r6ZHP_1B|1JGu6fvRs*^*wa48(MczA1>6Mq%;X;%*J|g*l;WfQRA(f=I z4l{b3@-V!f;k(g9f1rh`}LUWh-9_CJc+^iS?X{*3p2|7U#3wfzsj{S#Bmf5snv z{{jB=$FI=ttBI^L&4GmH)d$s4d*UjmmY9MhUufuytdkah1lvKf$_ zVON%1Y9XhnfgI)SAx5uT34oEl$i@go0EqVU12`n3lk6Dgf)!;6Rn(KP3geO$%~GBAJ|dfu_I>e z>DIJ&_k)vfAa%K5-iFiYL-R~P6kMtCxP?!L$7C`$W-$Vmv-`{oPC4UsiR>TBe4s@8 z0c3svuhWNz?>(ktxK<4=Ye2X2*VrE-3N4K2n{VGC>u=LQ!}-e1x6p923DwtcqO`IW zSBgrJd+7>}oj!|$$0_qO)Lgkeg~MOgvU(~B(FqF?Hixd!X|dEuBHHAA}y(D<=kozsoxs>Qnll$z?ev=jcH)-l&q+egRi-R?`Q0m{r z>Q{2VB$;k|w%{$I)4p&zo%RyxN1!}4{D@ZDGK$bBw618E%{G8}zI zn4$kzma&@KV+a@Kkt}XAV^N!VSOlyixvhzcgI6@?46+0&lFs^BEB0b-<~1BCY~)Y^ zHdLmd_V76^ufl!)=Ma5IB7VH43yVe{Kkfvi&D#n7(oUyvP{JO{@|v!bdAODNt1#(r|TA*8bWC>WO76kdOe5G}& zk+Z*95aKt(AmIQE79WKE(hL|ZKMVue0&qbv;KHC!$=`5|h(AXu{nOhc0+3o9C;+L& zfs27G5CpsU^bN)9BO(yD0m|#c46tfbvt2|Vk@^|>OOe$MW_EX+WtR91elTCI76gNT zCMs)X5NrRZFSw!FFiO|27r*VII+ z(68G{eD_5px)}Om*icXW<&Phs#}^-B%78C0?7NRK+w=>h+JA$ccHdyy;C~{@(g;_! zT4SA6J8bajhO`y2m^pO@s%hjC-8VDiBI2j*$4;iSuaz`&hQTA$KH>^M`YWdYK{#Jd zExe%qE~;p0k)XctE>OzSSxMSze#ny_WuvQ`*s34cL{)}4^!YySqNk8ZD=U#u!73i zB{^MnyAf}!s5{aHL9~3)@g3NMMlvDZ`~=5E6)OIJz`>LTtnnSUyNX_24%v>oil}8} zSd`g-&E*ephzZ+Mv_NK&^l7C2P9B>WHLnmuCrLVoB%Q)-dN|1+OzU;voktuX{DeEl zEBMT1JO1sl1wW=;!%tiR49*my!=VfKmVIOX$=&5pa}Nw3?}8B%sD6)}0P|UCu)OvP zmSMDg+Ihi}NndLxANu)yVZ&9xmNi)R+y&Tq1;Czazl%?(S_vF!_jC%3fot$It_1N^ z{O8icKNpjZ=TYs~Y(FwTPt<*XW*q!@>&I*K=HbCr%ZodMp+)svr7GY)Yd#+F`;ASv zsHQhi*}usZ;0CH{>rqC7cz$s?&R@yL$(&qdaurC;$iljmomjGNJ?1W7%!Ka(4q9a` zSbPju0j^L=<>x9uul_hsH;i_6#PAUg)J$wAGV{x&U;7}I5*lS21bm`X>|LI_W{53`#Ew`3J&S4&02I%c+<}z^m7DXQlKeuk?sPT9r2;Hnt z<1)ZzW0d&oxeU}-i%EYSn;;}{DWKp}vVh*sSq%T_@wptyjBh0J)haL>n|3Y1w@hXA z>f4{<(-21g;z=5deq*gMz`~i=?ulU(;l?uEG9hd-tZ46XX7ukJGY>&ixeCnVhp{>x zn<%iJEWL#awqk1GR_qa708d}Y3c$#pQU6mCKaXOZEC1toFaxmkmtT-m&v1j|VvJYs zXHmM~{)udD1)%w7IrQFn=MC|No*E@3y4F^KUrXvbEk}`8DLr~RV7F}$^mJ_p zdHxC@ZQKQIl2u1YN9Jy2 z0hqV!7UGsOS^FEw)-G7nM1^M=EC_vV%(P5WQls#wT8tgK52J=|WcIOwJ=`}iM?6PG zvA$F(WD1b<rE+Hb|s z9y^hgkbyNTcVpr7*);1IVtj|cVc3tKAlCF>*z5Q$Qf$A*1jA3TG;{zS<%eOLmm!A} zk4IsuGdzcN=hT`?W&f_PZ)U%$pHWGtS`C>gSy(B7QkmFyWE~LVlk%_eu4p-xwBX3C zS{>f%82mT+hHMh{=dvEm&>N@4ij z{yRf@OaFz>KJU-MrBphk4l#9Jj5w*rjdgT9#)dhZ-xv5s^5N&D8sNx+$?cQ08k6L= zpx-7WALBN2t1#;-OPsD^+Qu3rp1Fnf^-r*qxZFu+`&Rz7u4Vw8#Mo>;1Lyd=%)Jru z(cGg?;$Lehy`Dk*+K=~rxEMN7&Nt^C-XN<8U$|_>zkE00Ux6F(?@1}>a5^7996X2b zww=VcYclb1)JAl&m<-dg&M+nZhmW<#m@z&WbEFXy(@J4J#*(G?KCpE3W%Ab#HVpo4 zoc&?r!4_a{EaxQp9Vq)d693L@U+BzauX7;%HKFlvqxZ+1Wm|4O@rbT$RAW;`0Fp8- zUv30^?muSm&kX=?J$dU+{QGig7+P`zJql_uDtt07AI-(hrY2O>)bgl939(;LQi`jE zMYwP|57}qWBa7L^1DRRavX4VwH*I9QvSgONEkGnov;wBbz$1p&70Hs@Ab(i+zmfah z95BLx;*TwpyfzenEGCfrr0N*vPDeA&CT06j$LK}+_Z=pZe?R=kxHB@6Oi;GBD+>2H z;5tR02GYOjCWnGFvF!~v09|AU&`kB`7IOfNH#PK&)_=2p7qP#C{ckq#SjEYx9J*1m zM4`XBa3;#H#-ijhRi6uyC^#R9ybIHD@YqHe8FfN;W_Ej-3`Or@6n;jILtoZp4V>tN zA$IOCb@Rt)s&C^$1^v<7=}>u#nulPbKYIRV%wK<)b@635UBw#ZJ9P0=C45NqKW5)0)!w8niMr-kBgZxAHx*0`@@w*>hbr*-ck@2heD*NN95f$2>12mp7yiJ^Hk9Py^+fd^d1q;x*|Vxahk@?1sfIn4VQ2eu$=5) zN&TPdkl|_x{;3K{4uFBb!Ft&UkpJ8WwB-PV|0)lVtvo;aY7;>Frv(0FzsmfQ^OE&7 zq}DIJhxHk`b>L>h=(|L8{13CX6Ec+2ykJ#}R(FH=@wgnSRIcSv8zU6R^bz&`* zEqg#(3_A?-;pxnsZdEpa(*Y|u)nfshy6Mp|AtSOzhlPW&k#TAM{Ha;7sc1;HH?hK zqPfd4Gk!Tf`mi$$41M4~`67)j`&r;sgYfVQ`1=>a`v38D9&lORdAi4BXLt7Q+`GFo zdw1H-WRl6G*lWawq9_(rL{ys6q)C&GUF^Lps3?evg(5{nkgD`v0w`Ss6clTWNlbk1 z^ZOr4lAXKxd`{k%^Pcy-=SBVgpY!}0TVMKkGtj$QDwpeM=~QXbp39%Kn6O|1kqc+X zO7hf7+Y5vo=dH>*26O`+zlJXv?%n+w z-i)|;kne8YRAUU$+I7CflJ;kq)7p)}=L+yg>$CWi6Sq~N_%F9m{K@MaJ|@#YzL15F zPT#=q*Pq7(CkB3eBACax9J7q=FmsVT3}+f+-tjyv$a#Uqe!H-g3euFaewmFcCB8e% z$#+X~-ICJY!hvnWoL6Hx*>3IX4{J9{Xi9qD7(UZFr37`}QMz$007|J-BOv!$=2FH*z)NB$0YAxbI!3d9!FsppXvv<7 z@~e|jdPa};88^``{3ge{na2OtuU%(GEmqoy4%Q<1l{8G-eV>R*?}VvP?^Fp#}7p z*uh|h6Xw{vW8Nxn7<)21iRE)ExTrb?vSUAcNh-FVCx@~dkk`V}2mXb6O2P0IL%6Rg z=fCFmnrv^OL%58_&a$qTEW2Q~!gJ=Pkq)M$i!ye!yiNYGrHcEgqeHRLYv^B&>f<|q zPa59`7}(Eu4T<9OXvmgB2CR4u?E|uW0PV5_sQ3OnV@H&`qOf*m0ks19z>gZs`%kKQ zHL@5CSo<2rTUz>(N@eNMFh1b(3}9U6=yCk}*25U$u!9a8aX!-(qaC(m=5 zC44)C2p5d25H1sdKG#2h(SPQo>bcR%L_QeyM8o)dl5ubEl8l8jXyXgVM_Mjqruy`ou#nciOx%++lhrgL`daJ?;3b(*guL+GgXV;} z$rV^xC$Rjlla))1{5*Jvn7r>05bzvccAdD-wp+({9zeA3cs4s7ix*|y$O^ZD$(TPt z_xJw?&T~FPPre7fuJA(cp_%xGNH0A$8>d~yvp$p9=6~%U>);NQcUx9n}rP0R&(isFK5 zq}(XL!Z};<;co)5)I1ie+{+LU*vu8F8H*Q3!N;FHbLh`_d);H#%38vjy_r2~DbTf8 z?2`FxA;G3{a$n=(QI0LOkFkgD`WC`^Jw^5!ZhnNc7s2eqO&+}oZtpHlhAh)Fnj8^bulc7OTyfxKG0ui!+rvGFkEOw<99RWrgvffwHkKVG=quNDvEUWSFv-) zGH&L~$1&%lh0|(SIwEcpB?$S(Y-c|X9RuR*|S*Z<&B1B8q9=uc~upP zN=lJmRE*m>xkygWKx|?HE?(vIm+-SV7<`md#P%@hkiFoyY+xyHARGd`vE0XvrMJ#3 zy=BFc0|9Piy@HvGlFzb?q1nYMJUdlv`i1jp(^H*Gh?bf8x`flm!*$VCVu_MCLlmEz zg5uyYXuQig*3#&`oyj;7nq~TB_aj>L4=Ky0>Z>y(0 zUweoU--G7rZLGK5gnMOcP)l(x052~J!ik72_~5e<(49IBx&-)y*<4tROflKm0@DTH zG|gu7j%lv57Z!SYVae(>tTkhuF;`vp4M(tcFB6lP=5h5-GxG1hKr?^w&uH$wB&5G0 zyanXnQ;6?+`~nM^oMlDd<`n<&WR<-_`uQIG$C*og06%?3<=^xIy!)vp(0}gE|MlZu zhzq(kn94KFvF|T#)im*dPF6Tq`gcH24?uk2IN7I>d;q#~dJWF~r`M!;KZE1t%mb^1 zc5pw~b>zc;v=qo$&dEEps~6%c8NNmCQLKKwg&owbxAHHA5C1ScFv9mJK0gpgcwfiR zW62mELTHCjlb;ejP907UMtm5RdoP-tdVDx@ag+(q92|L+{2SF(K^gIcICF7^6X2>p ze57b_LYz?lo83{2Vmn|XLuP1s+{NMZPieLjmMTx4x$>7^AYfYwX6r>N1ug_PGfG$G zRp#?E*&;Fli;T{*-)=Qau}*WU#|4&nu*--asb$O#SWDOi*OU3@gt+#o$xrElE(N&) zcG2e+=5%eB#xeJ%9#W!IO^D~;XUS6$J9?e@8u^7^qk*^2@jI5_!A)C~pPYxDJU2Y7 z-%aImklmw>;JXJq@v_*RlVq0Tb(ts9IAI~{{A#7c1>W=t@!%T`;Jf;@xMKHqp*VH- z4@|>j2b|#3*f{5N8v7sOvc-pR8~+DHIFH7Wg&$zO@lb4E=Z~uL3Z}KSF_EVdJ2z)w z$ZxJP2`PbzJP)vDQyT|i#KP0N4*u+hvl}6S;5yWTb{s{%Z+0; zQ*f@{gjo{fAkpcVx;+|yG1-mZEkA;PwLFU75#4`qIF3KAI)x9nMB~r<;_(OS?av%f zup#{wCcQ+nfjdWJxrRV@Hfdn&z&wqWn67VxndfU@cnfsJUB@-28lG z-^oQr)@`JwWgy{3BCb$(ho29_;gI93(c8mrU7O**WgTH zPJOS{Xr~yQA+Ft&_4c9t4Svi{C9;98n^#P@JIAtl%l%g_EzEczYjVZjQ?Qo)p4e4DZD)~ZmB_uk=F4Sj9G>CTlCc#!6VmxXS4-Lw_& zzKuZ8yYJ59pWnR+!*{J)@Vdl9y?V)Y3|h-ml*p!K0w&h0i05wM^dOAvq}p z*OQVE#Z1}A%ja-1Gz9wy?9IEj@E&3fJOtRj%+n{ZE!>@8LSP%)+rV(X9d-6{D;QeQ zC|SA~`liPG@(Y+{vJg|)^Jen=xtK&~e=uAh<(ZZ!zrBn)n?v@Z4N!VvERq9f;6eK> z0-2Sq1hfoWl5`kx#2-;-Kji)nHh=G+0p5O}qp;aPSQ6gb?s3o(TFm2Dfi%F^p)4-|1^H`{eSHgx97b^Lm_CM2o6Qx~nAfzFCb$*!&FnE_g)?R{7(Lg~ z1M{i1OwLI#UaZv2AK{3Us8jX_utC z>*xfm{Si79Vh3_y)Q>-Rw-sWAkXpP{D6DmK6y!_pq{eB{!+#gs13LWgCBDe38ny>e zE~ir1*3K+1XcQmtQDgmj?0QoVff-O~$aYisGQ56iA-SGLDas zQYEpq%@(F`Oh6pdu~RT_S~SzP(=c{0O?0y)4kl&yoSCsIT|;$V^tp#1VcEaCI&m~K zCojtn65;c3tAeRXBpdbSAiW+;7zaBI0Oe|9y#!&N+rn(Biu z0)8nJ|KVi_zNX-Ql;wm=0fu<<`W45pfpS9Y?5J#RWq2#=`|n^}c_!*G`zF@+WT$y_5X@-%(NN%$A87uE&OMC!v?o^Psfv@)d*NP81Wa+(OG}T0M-*EL{+gRWjWSt zY31nXLM)tjfsGID_qL~O;+;qX#rHkliR5bQ7sa=-l=v%HzB3a}ew?P^BzGaKJosd+Z`M zoxBRS-KXGt_&mH1oP*PzGpu9Zhs9poVCWctiEB^c|E|A^58cAy;eQ$Cp5d5aaTp(O zzJyOQEAUxa9mb{?V4{%=CNK8JBvTLQEp~(6r8ej%bz|Dm6ynYkv#k9vhiz^a*!siN zVGWi#2Vj}=I+(9ohh;8nVClM+8#(UAje&&aUO}+-+0IsByO?Bsko_MIz%A@1HuKg< zST4a$x95GH$!lz}C%jjzqy%@QgW^F8d=-hVU)79>_n3o!_Bc%E=p*FdG2FV9j`+A( zL|wg%n5&l%$v>Tl$S?$-I*P43H)2gt0Gp)xGM}Eg_p6zY>Fx+qXIm_CVB;D)D;QbR z?Iy$x%vlIzYD&e;aOOe@X)d6`oyR!UT*7k>?5qv(`0ff+W*Q?mbUM!2k3;a15oo#_ zOHga=3#3um<40ncFpr&3f5b3nXFDf&w6i%`%OyrKnafCsw>C18$*QHsd(365-9?CR z$4EWCiq=u+zJh3k+;s zF~`mWMg;jHN3O2?Q?PbpeQp3%_rX{kjxI-RX$Q(WUJ~MO(M@>wFoM}b<$bf~1q@io zw1`HD9sdP{fAa&W|nd-+uB85d%tNp5ib8NlyA5tFEOO@NEU);?M; zLL>RW<;ZbAB61u76wXx>&cFQY4ptCZZ_!k_#RiBS zF6oWKi1HDvFd9xPTrl2eg%3R~ZVDB7uN|&zaLIMQz|_Wb#5g0FBQEl}Sm08@#QP{g zxkNfYu{jK9x*5J?j9`5GLH1m~@Vrlt)BX?hG zJ@UR(dIF^n1?8*(;$wE>Tf`=nAn}+3ZXPp7Deon}dK`l9UZ2CeH{tmH$ss(?b4JRJ ziMW$+0x!OQ$JVEWI3tuwcZ&cYuuN3YQfYB5kSVXKXHJrke((8rD7pLIbEx?UT^ z4mazXI6SsV^%a(Elohm;CCat-O$w?0};pS6{_T89DlYE**0A`v6V4mGN7&~vI z7TiRPY=)Uz5VtKbWAAVacMiJs*vh88I~h>h2^*hXG{9+suRlVVQ!kdcszgPB`D!K~ zDi=k>IX63kT}<#Gfx6Yo7ffP*`W0KEyoOO7Tas3`VMcvBW?IaLv&B+`@ismt`YIyA zLlJR06lV$hu+S4Ycx)HeZwh1yvJYGX*f(c28z{J~G?lnP(-c<^8tTbW%r31*O6Bh zwH48Y*NVu4Hf`FZWVx2)F4!DMO4pVZA-ZPH47e_`B4|XH^J*BDS2dy!P+mUgM?@ET zYp43@f-yjJ^^qFP2bL~brY_63P+{KRym$B*{^q+M6AUSaX1QV5#s%1k#6zBXoM?8PP~7%Hk3qZWEo7o z!uXm^O>ErpNHvO4W;l(NgJB)8TzpB3WBy9a0X6W{zL41n@f@stluDdRooal^oD7T` z#$m=ZOpJ{<8kw1M(ic6*k9l@~6naVOp()c?#9EQCo)3?-x4VrcOU@%Q;}Ki32)2Qo zW+1KM3~&BO7HMu^|Zagh5)B68bIWL7+Y zbn#MbR#N+aX81;7y-F*51yn!&4w=_4;Ypbv-o6UO>!+vi&GS=u`)D8DRCwd-N-t#Y z(#P#{yYU0PL*9L&v75fYR%&Q}&i$BqlD~!&wtjD5TT1CVEbZc(=&?v^$~@Rv6sQ>> zUew{Mxt=+$VNFrheON~@G9WiPTna2Vb7m=Y<*8jWTCGkCFFiIpuHJB@Obk*3 z%{Q=p_yiWbzNPmbVnIZN?U5ATQG}@%Gc2bU(e`e0E+SgQJA|CJAD@+(tJGP*3ZRg z10!C|B1SJQp=Y{+tEnwH?tmE#EgM?9U@lp{&~7yr+jBI_s?F>l!#4cKZXh_hmQAf6 zp^~L`%?t~-GJRiqve~wDLAUuaZSZGU#yHCn{;?-Bt6=-3dwqhO#!0UQ-rD|ShRfWg zo#LbX%m*LfsIc{C@Ke%NbGZi~DU{Wexv*6=9r&lPurLU{#mx|I%cG3IK6sF6_*Ctx zl3xpC4xC7A4z)RfdRXepb5A5ajgAhtfD1 z#srn&(p;E1=F)FKO?e{I2TO4g&6OdHb$-Eo@_>MLZjJ0<#rgDJwXBd4v}--UB&}SW zb0@cC#xQTHta4jU+7zHWJFxpQ7!Op@1$0sI#X=!rUqe7M3@$l+Ay|4Icoy z_`_n<$V?+ay+Gb`HM^zEI*22YG~w#rA?+^x@dmJ&Baqt)6g&V*I^VIu?mIrGZ(jY9 zV+iPFkRPUt135ovHID8-hN~AMky=#GsOS$r1G<)jBDF!vDOY(Z|M?S)^DX&hW$4KF zQTDr-H{#tW1OEP2JZ92j>hU>v*42u)v{YK?yzdU?!PRl9r|;UJ`?Shi z5hNTR=1o^gZba-jfI~72rD)Wf*@eru6~cq(T^qdkuh)-(D<7KC{)D3+w*Z234bAAaRJehBl%M5!Pynep zXbpb~;8FaEyM6dS9|F{md%eE;mQ7r~h6iuW?Y?~r%l5}uRMQH>n}wJmi-qexX6x;t zX>$PP{s)=3%zpA~j=*Z|G2Ryh!+L!Ptk(s@e(MFSXKI>gaSwi^B%iG0=cq@1vH)BP zoE&&flBgmkx|lCs+_##_+_0hn6N_75(AW*b;|Do%d>lNft`F>F{>I_mEJ)aeeS0@y z-Fk0$`?%2fa$w^cTUa^Tu>Y|ojA^MDtzccyG85JZu@AiX;|yp{p;IuKwuIGe%95D%#fYVQqX zcC<=)C<#tWrR8ognq(+y?H*bxBsc?^cgxnJhFb+ycyWFJDr$D)u;VO5T1TWNbr%Gib5QWeXhEgklqK*iYZOizHTu z7Pa-D`r!+-GaGZ`z5Do#3F9+J@i}eJ;7Ri&s{R!cLm%MN)6tqIK1e6z)Q|hV)Ui-a z^?i9x8KV(wBr`X6XqNc;O`3E4GlGgp{WawK}-pfzf94UAx9xhyFKc8eI7^vM*jqeIfWxb%>lv6Vn6f?6Op7r;-IkJC*42 zpI^INqo&mdj+5m|F?+8#QJ??w(bE{_xPzqyt1-@EJq_|GWsr-jGK{(6L!_GkyM{?( zp~_Jab6iAtgwzLdqW~YyVoy~hO35vqz=ku4P&x_dxnDwne>>J}XyPc*PPneB;KaBZ z&a>cfCI&Wz*TU{?$L_Mv;RQBd&s0OD#RPD$%g3UH;aFitTb!{@m1g+SQdS4em_~2L zqnP>N@hX1lA3z&{D}o?PJd~xB>*n(_)QBQqKW)C~`~_i*IVG^+#P>-4lHIb%Z4u*H z}(If#a$*Jw4!+C^vin+M0hN z_#Q|mRQrrYhRgJ(QZ^RJim*mYzBgWWpT?VK;rP1e44yY`Lw@K?rUe|t3z~+N9Y4_3 zU~5MEtFW`X4lB!BG@Wj!-oWd(KY%zX!tcQKEp%2`?qt9*)SR|0g+CJO^`f1$Jd}O! z>6$n;K8EGGVg`-ruDF-u2CeQqx*ADEHOQbn9hFgv=-VZ@oL0bL3k4hjT8Lfe6A^YT zof7;8wuVMy-^1WM7BsM!o}?Cn8nO72^D%U-O!T;vlj^{ z^z$Rdh2-++PoE-?G+x6^hEK~F)Ac01Jg#G1(FX39aY~ZEy`K3a>*QGGsR#0XLj0gW zLHb%A5kP;*ojkVTS&fVNS133Zi`N9hY}Gzk1%_aGU@*V2F#IG|kl|K=C*XD=Q;k!V zmM=~e+G3roRLO+GZTc$|=2HE$QW(xP$c3Nk&SO{eH4)>M?cJDCco%vV?U>s91k*RK z#mtGL;kblu?dCun-XDaZ^ou)@KT6-$=PtTDra<+aCAMk202A5aS9cD%&5nt>?5Z-3?GwMyGr-sx1{gJ2AG+2anE2=`MAoyu^FbW> z%^`b_Xoo*!`$i_HbhMG*Z822fbWvKQkr!(^8_4gP#A+2FJmGKEpe&r zugLR90Tp;@*=7uz#16g_CSx3Xw@;ic*Ru!{7Fke%TVpDn6n(aDH!yc5zgN)_TE#(u zZ0O5Tw`R`U;JD!&Hl4}FX?k`Ep}qstnbBlK7vF zZymv|vQKn`l^VMRyC;ORgG3(-S2cc1kWvHl0CnYEny6RrS9F$FwXAaCs`g&lr)h3E zyS7ixu2Edw2B`PS^=RjlHAefMqP*o@+P9FEMZ01-`_G9lXS$+R3mta5Q8?EdbmTZb z^rNpbmuZLdy)kTC1SR+l3_H%oFdP#yKQR+JDhYIVZW|l;0}FP?A){ zAlI5X%6tza#~2QCZpP*vZCJOxK}90HylW7+xn9-tE1c6!Im&r^)+=IYeWwt@nQE%^ zO6y!!dhp+#OO@*4zI3(}{-i0bIZH1Lj&6l4@4UhkM8-{7ur33fRE8aaF2kbD2z@E@ z@$=`PQSP&Myu+q|N03y-zeg2p$y+Jy4>=+^omncsk~UfWGMqMfMHl*$4{O*`rS_Rt zdSCxiE5(%Q)jxhtD(CEzH955OpwVOo|_zK zQlsuLB*g3Ce-Bo-?!lGWCM!FhVe$D&qPvDQuT?mGJ_~83b+}bjg~Xgnq!m{q{!S^b z5Z$Q-RXBMq1D8^=5pn$v!jrQQ#mtNyG{1L*#d5mVHF)hm3+HWT5O@77zIk+xHYfXo zbfmM)vmA3-)??00mz9hQI#IN`5QeKo$P&fgBC1JW9|AGRk9>Y#8m5aJ4j`b{6OTdb z_`iSHKqzk{$~VzU-OL>_u{vlY|L3)t*xtxZj@ZQat)L!#OcV`j|6=&3U?hSGb? zRE}oadIARge22T$=x(8T!a5x_W~n2S=_o0b+zB+l*}oM=0q}=A%joSU3 z0n1s|l^m~BzJX2G*Q-cod9FVS@Ax4x*%!b6>qypQ>SNq=rlS~Ab{j3B?6$%b8Yk1( zKS6&P(^8hQHq+9X`9e;ZXGv^ZGe?Mb=+4_OVbj?h1hY8zY5_YGGZGwft!`E+dt@J6PPPgDMr!M!ICJ!I?nI?>QYRKNqzBme5gEAjJgh=jf8nQ=^ z(Oi;2*47k0gtCTg0iI@Xh^^84&df{&K?PtHugv5g&D|DBtIdj*XU7$~1&;D=4YdMi z4c!7r?Tq55C>RSa2g&hrMh&fUyoPYW@Bpqggb!d{j?)mXu0egWoJB1ff9Je%l=jW! z2<W%-F*uZHr(G_+e20a}*e2qgSRZ1S`rRHr`*VnKEcq-=1I;~=! zQim^QxHu)E&==3SfdvaM(m=nV_BpZO$3Kt?oeqjX++tCdS^(_n7R!EL?qBUwhlQrc zIN$Ci63gBpkzh|O)xe%cwVuN4!|W#7%@`J7*3YCAaW*X=_8Nas1%2izEM_&3 z72R(;I^XtmyB(Mfvx?%^lLYmoh?f3`-lVb*sp-SMh`waFm@xi)3}h+13`vsSSsR7v z>QU>XC7FYQ_w~KJ-^_Ce-8XVuNAmg8f?C<#1Iw&(n4}fMl9_`Zi1a0{itAjF6akT-w7)z#jUKDV2R~o7@IA^f~5;EkJ~J!7#dK5&oJh^YX&wa z&0#J!CActs9BbW2PnpSC($g_~$_xw}H4Zb+T*G`i!(TMEvk5>P9(1sDhgm6)xQaex zDNnl!XfnN!nJM=hrHn_0Y0yTY5#H3#^erso*+{0ZV~XKgROR`hh)h2f;et;;{{rLm zgz2+*9rG#Y7SjwjW9|^8IOX_sChN~2*JqinWRGChW}34}0&|DVJ@#>BXD9nJIXHBq zjCGyW*q&Q~!Ib0U>O0BvF6g&B#_Ucyrj+3cr&{23p1B~J3_p1qI$Ya(jqv*&y-YW5 zYSH}aUxYEDDd~kG#TC}ighS_Fe#L>-`NnGAs%ppgo+J+GRMkKyx;Of4^iRh^F?z{5 zHUo9X80THA3{B*cz>Z(RToO);c|*0&+~O5{|s8M!13VOqLmG>X!f*6g3t-SnV1 z^>V+5t%uurCwP?cOzme^*D`poFJ=4nuQcOEDg7R{+D>GX7B*&Nt;-UVtDFle1^@IN zxTHv0i@8x|uhLJ)tf^->l`R_!4dP(Vd2+rKxPE~gNJ_QuU{}lzU^mr%AG*-8Q20>k zTUbTo#ML?^a3P2icAS@oXW?X;LDb|HEgq0 z_ng@)ToaVu|M9Z0MHYjfXT8WimDi|VHI@}Zf~_({1Tuf-PeB!^{C zl1$0)CXZ$H@a4+k$JIbqjR3Ma$e%y_#-D3LAfG6^htD_3`k~ek-VMBZt*sSYW7g25 z_v77w2iF~Meu}7fY0V-gyQ~Y!WapIx*>k74=zm!$q>#wvne^|XT_da53*Kz-ntXYU za$Uasc>|L=+_>@?*0ex3w-)1z8ZrIJ_m~zFgNbJIF?IOgU_4z94h~jS0ZXyO+!*ss zjWE|_9%e0^hnd`_&zBk6Om<=BqAu;3vD2yd^=Y%yrWrA52J3icVCaa6n4edRMH~V( zn!HWC%fuI2GaV0-xkga$w_V4BHm(^hS7_5*r0%CpLz}(%?s2XUhtc?@^jjC3okNyN zxjr!Ar8+MF<+*;SW#H6d^?VE&H6CN9=ws}(S+w~VFoSV1Ce1g)ltq?I&aqZC`!g6c zok{&aht|#9Wo*o78^HD92%NS@VI5PQgCo=7kX?n3cpo&5>StmDdoi_iL$C1>?08QW zm;8{)Le2Q!C&T*menL{;7;M_>hm=Lr`YlJI2_XlSQ|}A6)K5AR8q`#^@a}**LS7Z- zZC5{u#Ugamj1OU{5Oa$Fb>N2Jh#dNUAE<@N@)iyK0%8rR0$261L2?@H0_0WA;~98| zKwJa6T%HDY5%`+hBA=qYS1xkkEZWzQywcCOTblSgIu@S=$#4>j=34=ojXwmLs&77rf4ms}42HBDp`&+SWlm7tgX zPHZINzeZF$n~=pD0l^FsT-nt7f6e8m)NM}F_uuhS5Uc^ z)13LT2dE{agM`xW^(l9u?*Et2s#<8Pu=;=X>3BI_6u)3zIxC9JBWISSKt4%qprA6Q zPHrrrseUb&YISP|dz|Mp<2i+MILZ~LH*BZ9wY8NsM7dZvJxMX#!M=!=l$LY8dVK?y zCVUASs%VQx3`MmwOjXr@wA@Op-Iz_oJ&z-u@8DKpC9da`BH<1de0l-5d@A`u^?3GL zDlQ~s;J|qLrSff9yJSsni-LA0EM530`dLDu z5?&QcTj;7nqhzF~?B~zY5m#}XkN(^zM*UibP}h;#8_0Jt>(`OkatE-Mtlz-n#F&@5 zAy;Lo3#Gr}1ShT=+$7svr7HH)+nJ9pJl>VppsaOrTDq_M@;t(98NJ%C?YSbzb(ylB ze^UNkjLNLWB>uS@l-EFS-wsSMVWP@sAHZ<>WEd}+!_L7*Fj_=jvm}3pksz?iv~F#Yy>n6`I8ueA%7ckA%DDTa`isd&k(C1O(* z1?#JXbp#EXP_)!DGqH}Ix`H)hqLqYoWe}UHY+z>MI#lNSqm)9voR6Q48jexpCt=(q zJ&a`>b{sQXbeV3hJI|Eala`of!nz@o72K9{PO2pvU)mDbE=-?a2Q${I*auxi(2+RI zF09AUhHi|z+l~nY^h7Q!dQFcolQGgO{DnjvY({iM2QFXe#DU8#aJX26f8?!T?=ZY$ z?1b3SMF*K^djFR!m!8x517>sk^;hp`I&iO!&bRMqZ!i&E$ELLn;R?}x+|>vu%sejp z-|OR@Fj0wi9bxQ%3_tXfcdMHNMR|?Ka-J|bLdk2*%n{;hR2Lp=jFxjMMh`3p18@83 z-GRDX9eHb%tPwjk1oIYG=T07U`0ds2!RY6GX5V#+wFW_};4=PC@&G&iLRn zqLn2vg=yn-!?nVDB3Q~csgp;r^2f-YF8Jye$}vXqS6{;CyJOi%_7JCzW--r@sUdFF zaPiDQa8z$X3Tu9(SBlTZLd-RYgo#lU%MMvAPyTxM>SQlwHoMrBD-26L(7YMvG1u@c zk$g+-b8)O-wlrlTQEXwJs>}sT<7}qjX*yZ-v$JOkBC~oBTTGoy3}55pjVfy85>}6i zR_?`cP75*I42Vwd!?1)q1&{*DpKE1-sjGJmT zM|@sF7hZy^lJR((3qeTqOJ*ClVA%qOc8yc9ZpQ;`*xt^q4QpwQ&zW%v#*A{B&b6PbmKe75<@rC4SZ z^L7zIObAD%-bQ%rEskBgiBpjYh=@-?@WnU|l8VFe^KqOV9*=z|uVVY@^Vo3gEWCG~ zg!kT4u-Uv13%qy3clRMYYdeje`={`feL9{!DZPn@At7fxHzKHC1la0rSxb_qn^HB_JX@=s@ zO+>Aq+P+bPiu?t>avs_wqKYK~E1xBwX)Dm>&yrv$9Ss$Hxla}XR~|3tU(NT(f*_(< z8m%ZXPYBCG;Kh9cWM3NfD|tgOhq*b!v#T*@TuvjVG(E-CtbFJlIgGJ}`WXGU4={23 z7#K{}#Y~cS1`9Q12HZr0nHWzeW6Tr@WX>XZsgj3M!S3e3-kzse+VK!Z_q$28WmjTVH9DkH#d7-9e zJwE$vIL3~jh*7$1l*`ogantDLC;&5QW}X>aD_XF+RvrmrPV6#Rz-|F165L$F>Z(I< zyO@dbgzi}Of*)T)@YX-VByM_y?_{cF_pja}>(MvJ;8sS*shn*;Gjd)cKBfm}ueM`u zcsiw}3UHo1r;=0l3YdN|i2s}MfK5Jce2=oYH{6~fH0%355Hkd=Ks-pNv;q}RpW>{* za*((P1EN-(0u9CjVS(NNjQh2>8ucviQ;;4c`$eWIAgkg@4Y_i}PkDMqK2b-GSD{k{ zZ#7Uzky#VY@-7Ye0_vZ=Lr1*yFm)CY-O+M^yEQ65eF>c#tWZ4>qEY#S-?4$%ggM?! zL2<{3tr3dIQk$t2^GK|cG!CPgO;N1+kxS9e{#dw3I*EHd99LIj*!~zb$l}v^2f4_f z#7cYZ#@X39kIn^$G?2ntjPey*1NOkd{RZW5j552o2#!A$IlQ`$#YP$AZz^U?JgExm zm(9)O6zL2VpbH>}-My_Hn*Xg^*0$JcxgzSIL&tG+ioBsgVS9Y zNV-K+A~r1tiJ7^$K;e5SiQ+dd6{j!7BaF=5&%Qyy5pir!6N7C>*t_AvHSA<|$)-aQ z*cry))Uj}Q?>_~fgQwuW=M)U=gOHJSoQdmUc+_+j&nSYQ_vDksS?FLziB)4e#@&B{ zIqgqi%xg5Ek+O^|UcrQKE3#Nbu?oqL7zD(=^q zOw)sW^dv7O|4%*dWwblRuLlhXckXvmf>&d{jXEbe%*T~{UCu8?iWAu?flOh(GPU`S zUYPHp&PM@E9&5o%t?p+vg|`THcL~G3rjfzpY#+a%nQX#*xVKVysDr(9IKv4mwV zBbi_qQO}g_mIS&MbSh*zTx%TEbhsu8;Knc(%7@UYU{}G~15gQpl{-*dxfwOZoCR7$ z0Zg}|GRF@`4=u+BAAOFI<0dE(Jeo-?Bbi(>MxPy5W-@X*$Apcu=xiG@5nT%DXD}IN z+G4sbj##?w9E|H&X4BR~ccKkr$=~s{?c{DJ9g2sT!Qw9?#;R|;qr73!d;zzvcR%0_ zH)&M$9eCGy=PN{A>Vg49!8YNrj!x}85{>x%$IpA-;ZW{dc-uL90 z>=7<&-Bf-Wh1BG+xZLWK2biqXuEuZqR0U=oSrs%o_Y3lV2mQ2Mp?bfTNFsFCs4aw! zkxN#;n)h^A#Ux=z=|iZNuRs5K=W&c#%!Vk2o+NZQhMk~h4rcQznI=KYLM3sBNm3xm zOiGVu3kx4FlEk|SQ+zJ5-3e=Q7U}KvC?{!7YB6+1H z1kzjHeyjnO%VSg>&DNjL+1aLyc_K`gV2Ew>uq{mUPF4=H)uL?b#CkCQ9RqkKz!8!DJ7lAc$IywWd`oLPd?VF`%3k%3ft6|pz75u2Kggwz~d zN=PBDQ*h;a8XuDpa`_t0$0Q>7ay$#D&NKTynsWLkv+WbGhnU`THU`_zMq*3oWw@|) zr3-6y?KbVj0)O^I4n2zQ2jO_qbOzn6(RlGBk6RAjK2Apt+uzM>r1!{Lpt%ovU@Q{) z(Np#)WCN^TA7h1*(JzVZ*Yq=9^O2I8@je^D`LmaNF6idQNAVq`v6OfolEx>^UM0=X zNl?yB>TV>`DA*OxSd~-qy&{$6+_D7ND!Hu5by*(dIA?iO?-7Yk|C-d7A(8-QJRPc$&PuNpy#3?0H=uec+DxN5BP0sS}?V$4PP+pVlcZij4tOKBz7Pe zdWpqvQOvt#p3aEl7cnLw7n935Ig8GYUH3Drc-R9A`ij%q9%JRb8gw_(tY}Rnr@7sa zqe(%n+!%ot{!^0V)o9hZ+<}b_is@|pTCKnzMpaXf$`zn z*)MVSawi$6^zvyo5qv|LBCP)9d;FhO-CN|xeoIDwhq~+xB9Ow^Ao(Fkj?r9-fyku1psf$GPkp|Q?9)>IgyTI!>MWxHyAca1Xb$FYb7~Or5$&{KOSit`lAu+Gu=3NDo+1EK@`6f2)?IhGY zu%4TVX$(x*CScf~_rYMoIV@k1rXcROjwyqzeVPkh zv*>CHLl0|4UOXwpO9l_Wf1H6^oh6vq+>NQc*124C7Epg16XuIWgVQ@OXE0IHPpp_; zxPqR@3TkoD<<{J6p1h=2!b&}PPPp6iQ9+)tS77I(9bs?B_pRg|qy!{`qJ4?ITpx$r!q z(%tyJzGXv|W(w}9;3dV-i%WqF3w7b=I&&$o?S76GTz0MK1j#qG;Ww9W;vnCO*JCST z)yF)hi)j$dCZE*Q$?zZR-zm7;?=yp&set#J#qeP2NCP2W7sBl*8U*5%dvI4EUP`eo zVZnkmsJP>cx-?f6&K#GNj87-&<8Pmgz-J#1#gHN6F=V0vh8vh-goOvj@J@SN_;q}d zUd#RfG&E`+LYI|Lx)p8Et!}{=m8}Fh?5;@h+#M!rE^&i82f@+h*y z_YmN;I`V$N?_T!0(1XN<)~Tq{Ag-fxErCdu;!9~~C8e0b{TLL0Dh&1`Qn}6w6G zuvG{baEA&Sbp*B=b_MquishMhUh%sHqnbdL_iM+BRMrqJ@YN74&ot9S-XZV&X&$+j zDk$gB&@D)prRSPl#{og~ARVd^S*MgaJ#W~G&8iA#jL#u8sX;o!%D6Tudmlk#db~g9 zBKWspzI{AKaFWk(W~2>GEW=2;ydz@rG5EkW&i~#)7cQ8Sa`t2P%rLmPa!R{%F#A~trX2Dr6%~62%@c9xeoFZ8a@)}q331}M85(^YCC)1G5Y|!L&ZYz6f z(~K5uiZv_>SV?R?uO_Ced;Yrt!gLFW-|-VvtJ-&!uWix9zhs4MZ`DpbQ&6yhgNFJq zdo5`}bv{uppDoKnU+tz!AunU0O%{hCoOzDLi{csUyao@yN^IQSg$=tp;O1L_Y2!~a zNhKAZ|9&5)aOv})H65_Fm1C_MF(;uIb2}cxkj+e|vEF z-OZ=)q?PFIDPsIEkI2r%+b8LW>#V@omL5!DlZ!co(Spv$FeaEx7~5RJZ5d%^PGDIQ zxhr}ET(6iDLiEa$|7*jsK9+>KWiP-5bJhg3je>XYBVU)F1<9In*9;gNo>7#$4L8Y0 zl)OKAzbJVHc5~6_?gXqsVhR4dr_wf-=Oxk?(fm8ZB*6#C~xm zp!+O#SH32iT;#aK90l~6{Y|LzILUH%;PN8xb>Na@FIOSoNUn~{lE8W?e-|U}_pt1c zHdC_{xl?Jk64Xss32V9{1a)&AooVSlMOUPuau*BTx8ln(=4=;iU~XR^%CbChDl-Iw zbMImjCx%aA`Rv#@wv=FxgVDFjpj%Xj@x?8eP|B^0Tfsd{$mhm9l}Y6-n8+bS6RMh_ zTP2{T)k9#9=f24V^|bnjRN7slxJX@K4tF$__%%LO zKm88Z&OO2(j-Ml7mEu0dF0YKXs?galfBWVg{7b$?^5r+kx%e8LjZaXYw+A^9X()-| zQH5_AX(PjQgkilC8ZKTU_yyLR*~CgTxAH_(uuw24@KaFi2lfF4XTh(QfFVB0UfHLH z9qULghsIwK#)`@6t-^41YGsMbsWmw)Z`Y2OeHyQYx*D(L9Lh{l@?MBOa1ObIW5Q*X z8ZMU1F}aLEaz>$hyu5Z$W46fZx_ZqR`REr%nbTn_J*hk})_D)*GtSYwK}Y|r!?$odNOt^(D@VXcUh>qjr(ihcf-0Vo zYDk%m7PygRg6@SdnIFYt(%@iIfIW2kDVul0>rhiq$ zJU5ZleZfN&IHZFikA2zK;%6Q)zY-)qWp%NI<1DVN;9|7c`eJ-CF2y7x>2?mHlQVFK@;ip_iHyI6Q{?vfc;?<+zKT=4 zgFiuD@4pa*!xv-OU?>#(&arvp)}wISaTu;!j>2Ihy%A@Bn7FTlk@H%%k#d9owq2Ce zk$BQ}1`nGUYV5d)=akpadUDv;D-$odUFfLAD3;UdJ)p$qHovn63n;M{aWf&emp-J_ zrrfrme_}xn1TE+P1}`JAk3VUL>k~RFkH1!eTVAjt<(6}^Qk0YD8sTk(^g=*7CN`w0 zHGkHObB&7PmI%)sdL_0}S)+wiu*j?7-pb!r(o zJ%xQ%JnJjb)f~$b_E@?j*Z4?5-70;#h0`HuWFB^dDu-nBuq;T`)qGjN9Bg(7>_}e$ z^Q=42%d5booN7$Wt=39D$>+)WwV1%%!3npShjRN%OycuNc`OH|i!-^biJWF5b8fmU ztQ}w8$gK(E8M4;pHi>gYr`_$qJm%Ofp`bRSdu_=d_86jq$p(J3j{82!&v*aRZy!YkZ~c#Zm^@9?yF)xfdIdoA3^H zwckS`jlG=ibF+1H*y==;QNAZx+`?+{wGS%b30eh)#}y1kHVY{C$ZLw@f>YV6;(qJj&{K zvU%7QmO!$aeRymUM#UFn1a;o9Sh{qyOFlC_#98*i81c~&eEz{^jQ#958@3+i)CC3x z&Eny=xsVNCyATrfl2!;)a-6QiZB;q@Ps^P3axDw*W2Ls43L>M8my*e&X^;1FdqF1O zQ4Rl1P3%!3Lv^k(DIy7ucAP%HrUAB29H*Vs%0fsj6hm|G^pU`jZ=SPrvs_al}2;owwAKR;P@&N7*sfY1K0 z4NEPOSlQkNr!Ds|oBz;eFgHt}Ey8*%b3TSK=JlV~a;l}n z!!pR*oWz)M2QfD@X>>D3gPuoPZZTq%;7-H&>#5wwm}GJqb3sxOlaY_(QSmsRoQ{ph z&(pI>;`JtB^N|Q_JjrCd11DhR#fGba+t~PN4VHMU!7N)3b|qScF$-)lYq>9ap2Xl4 z%PAi+nYX+397}I*6W;lZQQpSakFz+E{SHpF-@|BjBAUWQXfAISj5@nv+`;Dj;*-!Z z(9CawoXLFVUC&`c`Mmw{Bfh@`evi9hN=HFF6idR-iqI32T;#XtafNciM2vB3zGlN? zPK5O;R{uLw7D_Up8rZ{q5>HjaTF}pH5Rb=B zu8H48&Th`{D_!=+Hg=<_k;&1`EQo9oa9>6%2bneB6L3o>sl%wR+D99E8)~a)Wf!c& zm-!UebU|*Xt-+^v2-@5#1@6fOwU|y2&!}i*i`zy_W1L!#eFF5je=-xar%+()6*G;c zq?s0b3qy;KF_FSrm&XaXzu@~sY)`3a!*r&A7&70^h$4FdgB2$HGqYooyi7Rte!?PH z{uYCteuJHacrf#2k}o~v-=~&7aV>T>alTzp^w0lHaUD?f4QExoL{a?Lc*#&?55I3t zxHIx2?;|(rTa0)@hf|K$(P?Pzb3@WHnMzE7{l1vms|$+}cfU;u?VSSK_l1F?e8m|N za-J0Wsge@$D&*B|>NxQ#`i_<3lq!B-o(WS0|8kb?a)^!qUxT_V1OuQ~UANyC#>(;X zno0-xyVr44u4A{Hdmx2GWuIJ>eQJ$(Pp(-$OFndmI*VA^eOD>Rse6L{Pn2WjduZQW zp2;=HwaDUgLq73{#(mN28QHzum$rkSyX;^@!yQA6-SH7y7Ytn=hLIsGmWg29q_p?G zoP!bU11sa~HLYHX5pl)zTi73#9?Rf~TQKHR&Zhi$7hCv5L2uM~j307BO<7nxmy})* z39k)VIDYjh4n}mr)rakkEVCgYN*Qye(oOy-+?QGPl2twQqaf((o={oXX7ky-+M$ew zF~>bFO@vgCEHsRP`Qi+?IG4iJBNlOa%(SPIBAgeMEWt{N9ZG;woD_kv#1)1FpJJ!xO}>}`Kib={9>-**cjDcusPR9Pilgl<$YwYu;J zT*zSO`lHP-&!WABkysERnf`=(KER0~Yg-<2p`8CE>`W1eVR*#_4Ox%*{-oM8C$@l35&o34Z%d zVpsTO>^OXh?Y@t|bNf*^ZrTN72R}|WcV-78CzjyZVhXAMm&r?TCgKpje|eGi3LSA; zERWk_>4=NPavM({=iqB*r#yOe8=D{SR$nr98MK>2cYHRjmU+xLp3hc;^E+s}@NprD zGOzPF0vX)<`f(Mde;NF`pRm)d(4HGt0?A;pBylWBO%d=y|KH_VqN%6z;KIn9q{nDjCir_#B>C>P z{2;jt&{RB6E()HAmwts#;=xd(OD)byzF(FE$^90cF2~Ej*CJYe_ z=Df)3^{Kee+W5BSXg(78^^9N=`Onxyq}xSx~b{a4a9u|rkB-2uY?tAK9F zU3^j2K=jjJA@-+GtLxEMF(CG5(FC7G&2HTKn0+Ci!(-#GAK>}X|I%Q}Km?Z*lC5%WG$$Q#s1@?|>>KK-A^6!KpA)HYY%aC6h z)0uB_mU|p*?V_3XQOSRfUA&Xe=b*?7bd__JyP=5r8zH7NSe-of1crUI178f^N# z(co>^TNiQcIXP>a#nI;tSjiS43+6^(sWAt3t&T@35h%)6)t~TD!hk`7$$ydhanZx# zKJ?X+3+g19u1^ z3p-af8i}SdK7&V%A>`#b-m+$rm$`UGUOw--qj=fcod@UpEf~YJ5WQxqE=D~KTlv`9 ziP`rbVRl;=W|5)W9(Cf)lS*>70^dC;!JaN2$L>hxkEkYT2`nRGgp-!!o)y{IXLtmO z6#j)Zg{+WMbg0B46`TmJAUo3Ox2j}C*hxe=QPuu!Llk~D_aOeba6dk?KL>j<*^bt< zVA5J?W2$XIr9z}=Wr=KxNy6qW#GgIYuoxeLMP+cy50e!bd6W=ZS?2s`d2Y>575im5 z^A;Bqkh;t*54c;&`-(_v;V87WM53i398Cmd)4gM8`0^kcD)z7+pA-zP$CuQ^)oc)Q zH`N8B^Xf7FHuW$y@sy%k%&2a{^qOW&se$YaOA$yX3XII z$DdgEK83*3Eg~Sfe|%{@bjzACiAMAkn$LQ*9AH6H!+?-9;xy1E#YAq>hgMbhId<3GN2^^a<${{M7%HQ+!;boTRz&LKNlx z^4{U&_?y>0OrVoH-ZlusPcy>CQjif5Og!eq08xc9BzJf;9o)DgI=EDY3EZycVZ_k{ z47Z??{M?`aR1dO`XbKkUCt-$eIAsn~iP`XIDceFXop%!!rq|ix%y3NYrA{qzX@I-SSk=Yu0*xKe6=#-Jbt4PwFf6+qpCuOHlkil0dNu?9 zNsQPmvPMy5EpqaTkzG)V+=6ms7V@#Q5-Gg#7ld89d7Bk@Y-4xp4sI3{A^8sbXxvQ0 zspuQH!ux?EEc&>}*z4K&beu{|Vj{#fY&m@a+ljMdVTssqJQUl`MqqzD|%6fzdJbx5{u0}yzFk2;GVU=D1p3(q# zN;BX&AHVI&#$8VDp5O8S;}|KNM#Rl*e!yHQZfuxl(9{n9_IA8|T8*B^HF!cP`1(mH zHg&gSI&V0a(kL(^e#{673vMC_{~ulN9S~)jHSsb#clY}?huJVQJF}C`0%FF1IbqJC zm~&2JPMF4=MKR}q0R<6J1VK;v zGY;LKzfuP)|A99LjL4&L88wVr8r&IZ+GlsMy!U;)0CQGXG}YL&0!M}bd|fhxi=4LO zZ?&bb*b<$(E>5^&aIBoOWMyP;R*pH>&aH;`E!Vj-3zU6oJ`uCin0uax;ekHdQTCM| z>aT54GgavDIm-AnRXUo1lP+7;({ofcjdSw6eBgc#v{B+$Ow0n}&Z`2aBHXX)mB;$L zY9)Cs+KFi*OXc`2D}yXh1{f?09G2shPjf+>PdY^m?zXzwH`FNShFSo{{#SWZxbal2 z0r!R5FKWy3i~1}uzmMi-mMaI=eqHy%3vH(cjNWjM{@E*bO}|p!sTE3E*GdVSkLt)) zW+{_j5*6o^`8RIA=Y0Go&o$2H=Jv0zbn$0MTfO>y)TfojA0W*spaWfy_6qj|$q59Ge zeU0Hn{A|Qudr-B#x3le=h8C19z{1 z2?re|IQV}91hGQyUCWz4Crsj&B*exvOPPaHkB?~kdFv`gf3Y*+oNA1! zY1{nLrPEP0Y`jHX#~oGGgZy4XU@CxQrPD94IwT9pGEGJHC#&H0SpBeazkUcksnWF@ z5VP1wQDN~)fpsT9&Js>!CaE(cm)wbyEt8mc|yyaCk`uO~tSKyQd?HBhVu2v;+Q#3MwiclS?2)KWph6S{lzIE3xE=G?rb zYBwG`vZu>yV5AM%6Rfg=w;k8^xLzI4fsrhb&Tbnbb)w*Pgh>io$0`OQb>^{NNN=U- zy{7I<(%dcK`n2j;b@ zQQTS4Yd~gRH4Emj=efQi`+KgxWANB1>$=)d5Vs_%uOUsjLfLl}of%3YyAdnyI5Fy#)NGwOIR&l;s9_FBXJqYs6aj6q6rwbgypN`%OP*8pj2yTclcs2rRqVjM zDg$WV37HhKfFI%E6%qlu%TM)9ht~SsyPhh;)ykr8mZ4cy3ScXJ40ull*bLnGoaK0n ztzdd6F0Y!*68oY`G{@M``YI~Iy_fp&@KuE_KCku5&#P+i0Xb6>J9o>$DA2_kN=2`~ z(%i^wf{=68lbE=?XSP#%QmzZ~Jd<3l{6UfioQk zRq3u%<+=8tJPq)uK|SfbyTji+jJxfCyRkLN0liIe@|?R<U;zzjX?3e^AQ@~AyFT}5J3qoXs~^zYf23WVDD7Nnf;I(}B}{Mr^hl&T`(i7K!u8pd`|Mdq(WwWy&g^%}F+YLs$dI*H)hVbqam zM#B!Lo+Pm{RWbC^cO&BMJa|}JY0+%h6G`vP@)1IblSjA?T(4z2i0@|h;HPC9HEY#I z?%SYAFtk~#Ham}xg0anByF-JfFX7|O8nI}lMlW2Y$w6E3M+MQs2~zif*{a)VfGRd@ z%Oq+O6|GcLfBLeN(}&NyvL1}1_kMAe!`^P@tfwe7)^^w#GrND|5Mj-+dT}#G(btoS z|GlmDi}vD!kLr_PCc3q zY1j=efy`{(%dKWG^sOMCzUf&OxhMm8^O81>ZkQaNVSK}4kz?kf2 zs9kV^L+^^C$ho7)8S;4q?oo;1%T%fQ0DVeUoNxU-4y9{cV-NIhk5j2OtjZO<>*k;A z3}Cfq$ENWd!#<1S?a(TL-FPW%mX48M>qrt0Sr|cIkhJBls`Sdr$1F;C-J%U@Dw}o|UW7na|Z{Xe@>FKKWML=>m0t&WW$&AKIBI z1T$3)>`Sk<=tPw(y+S4CZD;g57iTnJmv&a3XemVxpHShbRLavMD!4uxLYJnJ9XiXW z4k1x>8>>s#{&dCilnhBbgbH_nF2vCjXB2{|=pcrpP5Wbr=#3&2CSD6S?$*L}JBjU$ z(GHA9t9S3!a=iP~S8R67pJQh)XKtAxtEC$pup2RFiKZ;sNSrVGgegx4PhG7zeuz$$MhHlZ|&8ys%rWbpl36tqAOr0}4vaW^GZRTSG zJGUt1A8URk^PErpiDSZ-4oLx{)!~As_JC z18(i`B>BS@{Q)xbI~j>Hw6$RaS6%C>PVKf4I)8|veKTzcN9eXJgpy{w{0^K@QzX0^ zH0?_xyH5}AReNb=0KVuVD<7Cf&6QfhMef)5A_ApDmi`-af?%+BQh**XuM$ zaF*?p>1t31iLLelCaKq|bjfjqz2-6T#1zlWa~e8&kH$>gs8hLjm3|vrRu21laKoI- z$FTQU=G3S5fdgvv4)Q_G*$&~Oxb4y$3B<*M7(2MhQ0Yr0d#zL_d__r>zs6UV4tj!IDvc%@{@odE8l6sg7b zr>JnqVHJeL6^ckyS#pak@Xn`}FY`(rb?K5}S~}S(bYQKk0JiOdylp~W+a7sXt3vit zlqf|?E?LWf=oW3qgEJNUaIlT`x2GZ1aItFWig7nc}|bb9FJG$ zKKDNW^X^mR-o0^{6Hin+F}zoKFD4n=Kvsu?j)^a-s5 zXH4=VH~#%@TerIa$IXqmmwYt4Nfv;`VSVJrueaNp_3sf4P0mH(jHWq==4R%V4`r%j zjalwOGaOQGYd5$`RL_s+fnuE}$-7!#l^PX9iE4;Ovef1{dC)@j#Bfp^lc9Tfs!D82 zREfo*D%qWqw%$Af4nEVj z+bP-$u2fb-GgIa|`p2k+Z=^FvU*2n$x(|rf#JTr0bLBm4-1k696ro2?o>R^fTX^%% z5z7pN9N_xMfXk3+lHG9oxh*=;xS0cEA7WLV6*&K0n!d-w|6ppAr>QsJu{G?9=540m zSA7l43|7X!pkvD;v_B3x$kwaN3FlvGV@n;NpoPBtNkvM}P-$41BefxDmq<#NI~LvI zu_-Eq6jXQzXttGRG-2803cIUf4PyCg5tm=Fx{mYfnF5-{(j$$eabVt&&HJOYJ34_C zZ}dHp)8?)T)~NZ*6u54O#xGo{DS>PBQ;?OS>ojWi5)GQXNJD;_4-1>e2$A_nmZ;N+ z01clWsPT)}I+K;dK)JzF7J*s|H5}9%x{ySZiObYw_;ht0KS#}nj#K5=>~G#4J_g}E-cpVOWPf%;ax+vo6#T^s79Ik zg!2&g_7L{=fYQ~<*V|XZbPpuEd;K5_)noOH>$Xd&s>rxVQ@VXEK(iJOnpu>f5h0{F zBSj9l05pJ!0ZWJcQq`>2R%P~m_f9>ghU(?Z7rJxjHXCVf=*pGLI(PP*E@o$`&8P+N zn{N7{YA-eWv_NxJn8fbR*Y6mV7uBV1U|n8L9@^H|35;V?uhYu4Ey%F_V*ddOou_(`k=RQF_vNJl>;q zF0wntBVLc-J*rWrlIoSNpc;qIIHhP67+R&1c)5|=D$qOdrr<1(zq^7Jq*wqy{rhJs z@7+M>Srqxn(kPYV{<6lyz_OA=V|m6hlNZk*VH_tmO{F;H@Tizn=aYyHF$o5E`JrZR zy`c3=PBZ;ZVoBa2g|17{8u(hXt%=&YBukqYoL6$(9X)+=SC7#g?%-L^KKP?fh4s`S zJjwglKhl_^Ph3UlM{cMA7TDpaVZX3jZlU2$Ihv1WIhX&x@|(^4Aiufr%p4>^#?ai% zM)v{F9Q)o17oI(SF1PS~t}pWWFBUFQ(QZ=+SqIOik@5ipb7#?j#}>j$DL#u^Zy_wj z8Bi>-7S=XywNtFR_noIQ)n==8Jy&bgg;fVs(Su!lH6xtj(^=bSOJsSKcSc|jFfjYb zGMH>EF~Gv}erJh${V~)v$K+vyiH&N8Q*#o-wjm_E7S6p|&7GTb3vMS-iLrk?F0DrHZqiVqvB zvK6bzyJ{^UtBwkmD5=Q32X**pisG3A2#=*J5KC78g=|Ck0j=1=fHzPz4TWqDgWNy< zG>_tOH~rVunznMI17i~w(?wdoNr4oXQ-aoMA`02q1OFC` zdQF_6mc2)6$c&{LHfM$U&s@SHM7G=x4N%*`0i@9PRx?uQD^_ialGa#7%Qhq--%pjp z6XZ*OwgRuBV`n$&Y3>qKwH3}(%gqbi2D~d<-OAV2X}S<-hI}@-qW3Xw@GHsBaD|goC#hR)~ z;pPEOjEE)bwRd3ZK4Ug~VXE48T>bc>)=_YI^7tmW?FZYlWe;sRE%A|bnX*Lw{l=+n z-?8%RKSr(F^~0uiQ64xcax+lQnDah&dM@f2)Qe&=9qM&9y1$klTqCbYhPnzARo%v| z*$rI}tJ?)seDtyOY)U^AHDIVbP-SrCjc!&6C-rxoI_r~9zELvm&6H$1ez9jM7wHH< zzr5lyRPu0|Jc(2-0aTSZbb{NdDtU;aH8w-uJg-6=@1@YMfE{PGe(ni9cz9ROvsdfR z>BU++Gf$hAWNOX4bnOk!qr`lnH!sfV4v$|+CJ}XCU#0KuqXX-670Q@O^Ymx>)r)ty zjj8io0zLuRZuAzMZskWd*y4s+H(xzVKl2{0KB#BIN99A6m5=`yR5>$zD_u}Uv%-zZ zSqBgQ_{-S~RigD6dDk7Jk_&dobB(n@(aW}&*O#^@w97N%gfmm^v3Re_uw$iM)6qDA zeo|8i$VB5^AJrx|nm%T)ZYvTE!ffk@kre}}em&A%ul#(v)ve1hHLVxo zIDBhYS*fwJ8AXVDp>y}&;@Tx*;xZ!@Ad{nMP0oEzNT6{k8=*Uv^H52-4|V?G8)pi` zF=%{j^BCtJztyQ*e3FMu=Kp60;P>wt+Iz?{fh~>7bZyi#HEkRMceIN5fZCBH+O2)E z16O9QbC7kMt$?XkZXIKZK`PpXrM|d^NZ;Ku}t|EJmsnE_i6*_QI z9-TU=tal}q^QjIX)K$S!CA0>BIg)am$%{mVBkk{}g&78~vMG%D>vzC5H!&Ksp6YO; zR`1xW1*E@)CLGl!{JjwjMN&ZYq!`#u`C6pz-Znd&)yk-CnVsk+^UYsQLAs>A;1Lf%bPj8mvWC)MC}(;(xV z8l+`#GUdVV`hv{;dX)pOqH4Th$9PuuB7AFG9H6>)%K(Z47+G|_0oAR`TXgLl@yr0$ z4YcCBS0mwC5xR3VLQk%QDkLXCKHx+%%p1)BEaO-v|68GEMOr&ld4E94@$G^cR>Yb5 zZhXtaF`ErwN!Rly0Mvcmd+<*+lYOLD!83|zh zsMb9OvA(dMzQE2Eo3WZX=LM`2oJsoTWRl+|DD@~yy`u)`YXHTkY-Rb@Y0BGi3)OCe zTjs`d>O&i|Fnbv_;n7TXnp-O~OFrjrKTX(2%q_sn7V;WF# zO!M-hzf>ZIUpBzXi>nv;^<~&`QWn4}$#Z+}Jfk)9Q}u!$)?;R|pP!kfoRm#kHY-Cx zvra2D`Lk71NO@TByVZu3#OU>r*PM0oY_fho z514(-IHIkcvVWK3G#O`=ZRw)(rK<9+*HW>B{v86hBI1rw7qSy|Z#2u75=gMb|GH)? z(P(V7#yh(nD@GX4-4MFpi9}n+bt{ByS#X$EVm6x!#x2~4a=&DQMlM*cJ`-lBALL@# zv?XdeY&2wQ0xRyuvbJX~h-Pjlucc*gxmRhgQXMDB9}&6x zt^4YF9~O=X zQhfG9#AtP%=Q-KSxlK)(y+U{M!ojV5%rflJi)%X-mJ_E^H|h8R3#R6`HvBN`0-u~x z4XCi1&?TxH>9WouV$&sXtJ88lX1Mgu{Rd#xLp^x#SWo!)(W57NMi5$J>>fS7#yE9Y zpgt|rT3?rKrLRgg(8SMqXj@}+@yH-` z-?>WO1xu)I{g(1=&{B09uqwOf80-|c<%9L25?0v?kf`!#Tjk7p!6_NCN5B8y-y=c{ zRzhmJ&Ya0nUpzPNN0C$y<0&&tibLN5rvkhXx&Glrb?6m?+J!r))IluU2TrNQ&J$WX z@u+TIzpMvmc-uKXmFrA}A-;xe&819d`0ws9-968L&xu*ejvb-Qh^|W5u|zwTJ<;kl z7gaVm#u+bjsFj-=BZc{?!>Cqnm#%7^3$gIK<||r8wUDLqQL9kleAKcru|TT;KQguc zKQ;P5Yg^`Xv&0k^Vtx6`8S~{)XOPOb9Ia9tTxJW8&E_mSDi5@IPn0ZA=#}TZT`J={ zL?v5~)33+QQHjP&)vAFDu?(GjO0JVnnII}cm%8OpsNSa?+d*^RZ~~>tL$B*nv)iH7 zJFoWNn3iSvj&-Zp>gZ?&Z_$=_WFTd_8jJ6znG9d%8NmE02MoIabIQ8^8lC=?Qm?)S zsa|L|>matr5mL90c!5x&En;72|H)T6eD0OA9L{E;jB(j#n)owR{r3GAuo-}K+QF+M zd5donrY01z&N`#|t~P@|AY~En&bQssO4?ps(-?f3Lwj+#3XTa#Nh&h_g;MYMBk7zFDW$i`5$cM(;86)U5Xib;t1U(xmA_^Pt%qtDxzfQ`$V&hCe4-x>oh$g=try2W?Y61Xy_TT|e# zL;nD^=`&pIdcdr@^;K(ziJNuqsTxiEi0N9$wz%2KBp5u1;p@kAMC|fBwUtwL2_Ukuk^g zjIrK&3pP5jUxrSlU{EDFUX*=?O`b8Qz^u+)SzZlmOU=p*wp+|5$4C^RL6}`kz6sz^I^6ET=a&fRenYCR1 zGk&Iu4%n_1jiO;wAdL@(|8I!!sJ6plSXK}EH9X|>3A=SjR<-ggoIPjnEmWOaA9KC< z|HsVzZCgdsrwegRR-JmT)85msoDoja-Fuk3jae{zaP*WWdGGTkd2B{Hq6&k?O`!k_M;Q z{#i*?pR+}MNZRSdXEdeC3}~&KF#^~e-$`rxP5{al22U7wJ9HaH(Kn0?(1B{zrJq`M z>Y-*GyR+}TtG=(?NJkEi!jMmBO5$jxCiGQt_wo>@rVcFC^=%G$YOY$<8>-5_6lXrD zf{`a0f@Kp3vx-M#zj#-lSF55={`@aZ8Qz992uZMQd}KN2RgwkJrK}Mcn+_zQN?DN? z&DG9MyD=+Ys`x`uG~~+_MM{7C8kI0m+fBM z;DRW`cGs>Px4rw{)2QL2l=Lku}~$HC<;GQrK~YH0C#%pMhNVs=gC$U*kiWwtE+z!WuK)-opmNF8`pECC)M(? zhWuWD>5T(24xB77Q2HQ{yXJ&`2C82hwK{z9jb^USQ@twNoubp+U`=a>s}F3)9HbWB z?aXpgsGVcteFd3UOB@bVVB%^AXiBAKV&=<`#}R-A4pb!OxQZS~RN>GgSQ6soUZJ8& zmGOoPaV-z%a4k{3ygb~?C@wAufhk@QsN!K*s`lcU-+TC|BI9i$h^8LqzR-iQ2usJb zh9Ye{TxlCttFY*Jt)+;wD3CcTwjoAsVhVMKCN18eev{{D+{)El=c(y{!SWwHQO$de zQsd4;HH~!z%eL%t*3E3DK&;wsxGIlWtr2hDY6vV~7`E{tSi%PbG6Mja0f3IJ2e2K4 zwo;%gVAGN!uFhF3W&E3K5npl*pt%DNx(3g2ah=703Fj;z1OQz*w^*qs1NA&Fko&F3 zqqw8sv%>8b3j1w}w_9+b$5%oyp&U>dbeCq=?>e(K#)V9Da=D_cXfwxv%Ldy2^;=b& z9IUsv3=Cv$12A_vcL1Hoj~?qKSo7S@^H+L9AO803ES*2GN>hf^);|k-W4)-QZ#`@3 z)33^@O!ukk%g?~ncYphu206ftL5^`UpH@_B&FzlV)9TO~>eFi|6v%LmRC#lzAC=j%#M0A>i zGama+$(`l79<*SJajLF7s(Asi%FBX?o|vLb$HpiJn^)%k0Xhw)T%)O&mo!pWp=uWn z4bz!@J#{9co3<`X(`s<0)v81K^$sP%txA!FVEk+ z7nhi{{U9#6@Wm1?W}BwuglK%gl{G)(ii`G~zvy%X9okdin}O3*(5sWmj3I4q3)q5) zRDv?iNe|tVq7sNrrCW@ZcY|U2)x4#0hR*rl`u%=hiM@BKdeyC9%N&-gnAmjCg)gYx z?OVjFcaJpHsk}i|yaOrWT#wmS!JeI18w<7=>FM5u6KMPiAu)%X9Jnxq?YNYa3S(9$BsNxY;QIRA z2UtNBub{1=2-y)@vUxY_r}mTQxsUtyX#D(DS`$w4-lFvyGJCPQjGf9)WsX|*AE#CW zMk{dj7AMwu*MWE)IhCoQ3&6-uGc*DQKb(gAkGy^dgDZpXl9S1`52rV`E%&k)7}JyI z^rH6ahB#wxp#~&?l|P9XMt?doi>}-ya0QZLICJB?-44`s@FkDy{|15Dd$&5+a~m<~ z`gt=PxCEkW2;xR)ZeQ80hj}}7GABZnZ#==@?waZI<7!npT=g0@1z#G0FU?fDUSriN@2kqp%#=?) zkNcbsS{w$Y<9RCf(^UNqd>P)Uk&cB=*New5bm?pUtuF=c=ucdY?1&3oEId1bE)STxQLW7v(!E-3*5|xws6v z-2W*H6?gwP6M%y<;EUUPghB{+KIiAZTeecA`puMQ#U3g(ag96~miDBrR)S%h60kLo z9kkYlEm8S8gZ0m`^IRxs7E-jmUtYeiKW$Ia=bcy5FPf=()lhOAR{*LtHB~3n>JDw< zRlej@HK|S3fH9Zfn4hsvw=_q!HZjG&b&ML;2t`3!E{}o})v5P7#brHqY9a?(9Pww) z&*F`9-*0mvET&MejeM+@Ey8K++1Ebkc#P`$Y$c}cxbqeI_snp>#icOY*K5-yRs~wj zCemWL11vv4UP>N^xTMfk1z23TGs7%D!A*Qeh7)t_uFDLCthPZLl2Edb`xm0dcX6RD~;_IwS#;K(Qd3omx-s#}M>BX3dNAH7h0fPC?)SUtxS zbo1T=hrrw>V%Wgt{=+9an{h->AKpZLzN3ftvLRRuN=|4%n4!B06fCSC3KrKFg)8W* z;#KtJ_x%4f?ysHzip~G|I~Ifcs?Z!zG2+q)t)~qotY0_NZU#VHda6Zxh)cV!oK9-& z*HOMLSmxQhr7EE)SHYlKt6?+Mfwa_V&_wloo2s^NBh{|eNY(p|RfQ`LoNicI9FY~$ zuB+&hW%}f|f6-@O6j8#KF_=#;={5fBtn(Li9dK!ZAHyB(rew4Migm$o9qmU^1XPMc zTntp)_ncJybSzluu*sCs=rR+O9rvTs0hLpGdvoonv#~=cn&{d^^w-(Qj*1PQtH3$e zv|tHdl%Soi%H$(Qd!fnbETI3>7x&(%eC|uN&U&hW5mz*Q-z7~5&C%pNY?%wWtc5!- zYi`t44GX)dHam{1!SS2=7U9CM<_~Bazj&qhIuFWpei8LS=P>~L?eG3i;MwScE93;H zV*0H+0*<#&FO{0N0}G|~@kyWw1#HX^zC2Rp>JL>3|MB_-lYwSh3b4Qb+mHBV`Ir{M zudqpcI(#*miuRIs4S(3nzavehroP1fmL0>SAAie%99y_)?QyG=`u94cw#{SY%M7sR zw=>nKK``qa(zPS@4s&*IT{6rZV=f=U$(@D8j&j_<3Z)a*-)hxfJRvRi%KcySadB>^ zAfs~!IjUcE7kG2VaXuNDG4k}jKR0;L1=Sd^L&e7h%c~&hQv_NwWCi-nS!cx96ZA3p z*gc+in8TD#AW#vO$`q#0RixiQ75n}N){}!e#Y?DQaZeR2SVV=tDum5pk`f{g=?G(Z zCM6$d6gd{#YXp-j(TOJ%M&xY-XtaZpY1e_nY}7mo>Kq_l@t_t2@4`&98#B>HO@p!w znK=)mQ3xZ(OYt`@P`44Y@W?OLe)OI#yY^}a{j=z!sXCrK z(_P$=*7+i^)xH*(V?~r3f)FaP*Xg+Rs3qdWBK^LA(P2&Kbj5R0QskpXxRiQPj_$Riwflf)9wl&Mrjqm-L8T4xWz zSOA-hi0(=Y?*-VP!tC$oR8AM7{Ize>5>&M2}KIYw~K=)Mybi?WleEw=uO}l2Xe7=S9Zbs-)cl?mf@2VW93ZMId#|X?Y>;< zEXx#}xA`u=Na6DQda;Uq!R(UvI;Xa4RBaDKB!@7RXE{S9{d$~s)mxPY4!)rBOTy$u zmVrlc>X6mQayOeg~ge&a@I%M<1hm&wX^3HJ>gHb412nUWNl6w%P zt^3%iK+kJ`LK0&rkqV-xwF=5JXTwef?bxG<%Qk3C;0gucc$^1C+65p5qyOyK6QjM< zaZ!L%S{6&5d8Z!<+zbSO`tY*r3FLI=<==(dojGRCF^wa@R&)89722v0`=BGolocDE zHF9KtVTmWL2nMKvyQMG!=f8W^O3I#PAY`N}E@&<;QTYc_5w4Zb(wU7q3*T z&n(@8z}-dJxd|z{4dr)Q^7Of4_XX-q{386AIE+z_EXr`jMD~9bDWsx>3aD^_0&3u0 zOxaOGHEc{f{rS7{`r5-sU%S^=r|dj+VlJ*7@2A$+YV_cl{ATkD+GP-hRv*M1E3~?( zDV(Tjn+|HyqMaJGYQ>iJmJ0A~(n1Y=8&GOB0+i^t*MSw)soO*~y(*|ucs#(Asq!fo zRB~UOe)Fe4>TjQYt3UtsOLbzaa9Yefg>G4|Q@ChzFW*!`9HUAwpfZ$Lo>podGzkY_ z+Ku4@_0&D=q`ryF)v=?qbrY$^SWjkjUu8vfQOwqHI<|8lrB+X!Ht8m^CmpOVJoAwL7_>(J6S!10cOTT?kW?*QnyHm@GnqxXsPJt_N(py#I+Kzk@42qsd!>8N z-smx!+RJxu^@O*DJ8$0T_B*zny?d=E-1mU{9&mm9g6E*8J$}kt$E`QIdg(P$x36_7 ziEU>wuXHS$1~q4UEKO-5uzH?*s|q*XssL@DAQvC{AQkOom6Izs#;@(aLDfgr9Bb65 zkpgVq_@kJZ7=?s{xIS|8@$u0iE9)FBX|{dngtTt5`!>72LTtPXlz;nM{J&*t4MHQL zmA^XDF?ySG(%`?uOp09}LSshFag}&@44fRCk4@J4)w!E2kX(uS9OnYH|Hm|>hE3U& zFn9?Avq6rQ9t#H2MOeFzMR3_bRRVHx8gV z1>KDQWLz#Yk+s17Xn2=P2;*6LX!|qXXv&5gXmaVQAI$QTHXBs3+#>mOAoUn&yk6y9 z>e#rXh{xiS+@Gi-2bmNO3{nA4D!v+x^?d-X|F9$#B~Q=bu*#8CT{?=_2+8OuJnRtu z$3p~HMIA{}T;g%TL2r$}zaL3F9BKR_v+3hmA25(mr@jDGPb8DBQ2Y+Oh>dOdbG3%G?XWU$ zjWx8}+I=vPc2r`1fSHY8*mK(QciZwjd(3Hg8(RUq8r{0D0*s>$NRHNX7}g_XBp-ZH z^)BCHt;{|AJFbeZ8HsWAFJ2>Q`Jz^&ZUqeKtz9ypvpyRAHs)LI<%Q_=t)1#Hj8Tt? zLF&3}hq^{4sKceZ^5@;N2hvibj0{bmxQ<5tD+lC^ecb}4ZzC-wB?K#eb6@NPA^12q z0-QlwImJgszW-ju3;v+bzx+lc+LTdN%vjw=YM(T!x&BeKhCVCktuMZ*sCu2UE`fAU zL2yux*R|h-nQGM&Z&9aSRDM)_{$13>ualaz^jG5+e!O$GR-1nDwYn%SQc9VKUozR@+X||o7BrH+W?Cb2x!ulg=)2Icu=Lf1j%FM8da{09gzEt z@mVQoy*X#I3*}$0ZmDX{R;sCiIJknJVP$@xu`{o;l`4Y~0?Xs}k+$s9~8d zEG#!Zn>FS-r<3=18)M=k1ZRPQk21lU;&tSb_k zqN+&n>wd#d7S+a03@O~zUjN7nhFM5BEtbRa&7g#Sbx zAypyd;9>0s&vsK=?utp^O(9w z97)z;Fn8s-OHey-5ZvkvCi&BnYkU2U0@}dV#6wpr&&l&uvP)TP;3Ujf`xaJhx62({t3AS@+ib9diMg8=$#; zZk|(*@2FJfH8l;}ro_l8dhv7%!aQgQ^}Cg`Rre9yuU_4yn!RWg^ct-$Jx8e<18{wM zj8UJ-%QWnCwo10>!xW&^ppTq7^!DBRx&^|Y&!iDLwlWFTxEFGllid)cO*5*gz}MfR zoqn%^Uw^O75HI92_9-F4=4GH?52%75dnzkga%&G9m}fjTy(5z%JSbmT8; zQAbxd`KzOvweG0KEsg56QDY>qhJaur*j|IC%>Y7lb;zEtFV(2&>UDfo-G6|}5dv5y zCP}~f>R&9dE2iB`+Y!uDTAzJhT>Dn_)sks-lmJj>UAU}AH?OMLPMo_`pd>R1 z8)_ClVl5&9>H^L}WbFl@;UZ2TW%h+hfy%a!yxSuu4iD27hs7OpTAY!W4O-MH#(jEhEX2&ogaQf)+Nv7I`PaqmM6T` zm*C?(7d8?{ldr8I=j3~+{#{#pW!UH}aLLKZ&zo-!uW}tH;_!3@&6L=O962OV-n9qok5lKnXdoeQP7L-JZoDh}dS^7- zGRO(8cgO{FfM6Zs^gL#6R#~RueJU^DF;{hK4aDvpQXF@;WifQ_a73eLoYk`MS6UMK zQj2!KV#U%UjYY8RJu*uZ=3G?hu}8|lVSbrH_7dkO!$Bt;>u2j{eD)j7-El|VLN3XV z=1j{g_JTzW;)U0MrcHG!)ap^ms?m587S)3e1{(?N-Svd4&i!520n8=rO;)*doVTZl zPQbHSWb$T}Djlf8%XZ>lpcQZ=U7j2d6XF200C&)@kVgW}PP%VJ4?_D6vPs71A<$^! zH1;fagGX);$H{pnDMhK!v}5q-cq-j!HdDnXpLFP8B)9h;W27ejh~{tEr3KKuVN5s; znL0=P0;a3ixXEfgXr$&arhFj!Fw`+#(XmK*$aV*yfC+rQjN_-&AHl2}0Om&=eJlR` z&8`x%*q9Hz8uOEA06}a-V7)KTY5+-Vn8$4%Y{>1#oJRbOM)sU*ta-gkKKivg+|OId zRl@AK-4wWN0`xVxc9U>>g6?_Dl

zeUGB|%clL0yA06zGPr!Jz?m$yEbVbs%i(b=&7hj;A5x3}BoXGYoL z)D9$-@qGa$S3><6) zA1_!4m<4r~7VCrNl<4!7&>R*z4f@=1<&)`O&uD@5GAJaglS@#ph$8tC=w}a1*hb2V zA}bU#nc*mjSZg|#DkDB?;QDk7I8G|1QEO)t5TD!S(OBp?L*c)hN6A!;FW*2k-2Z!sMW97guK64`uu-T zRcG)sj`l)M`+Q~@tVrrZjL^_3vKmo9%EaRqAzO(oQvwwkT?u5Sm=J5WOvsZ{xiTv^ zFfaA~52pD)Qeyv2ciH7ai0y8ga$|mkh5;BB2hJ&l5aHTrm|spgvE-p1_Q9(g?8FZQ zX9o`LvkODB1XORu^@pX}}hUX)T2A}#x6H7wFko3Pit^Pl*gY*3!{Y0>O z3K7)_2(@&^yAL0>?+2UPI9)JnT{g-$i1yw ztI}CPzh28Yik9(~!iEb{V8rR|?4`$h*o%*KcL%Ir_iH&=#19f$O}#1yw4u! zyA;FkX7w=GMySbD7rK!WaZp*jKx5_M6}pGmhT``o$Tg}=mIq=rIrS#^@f~z*+~6*} zmtA&Ux+Ub3FPCelT}V^fe1ik;$W>gvL0sAmMfz2(x!9@}BrrYwBW!ie8_dJ~tBvE| zq`bGSqo&T*>TB0T++|&xj7OaWA!ADKhLomODPp`LvnmG~sGtg0sr-gQjR@J&tZIkn zzIdkY^Zpe#ycgtGJtgH5DOY@)6VIN_mCva;d7gT$0Kkh(o|AUJ>PIewTdzOuZz5Z~ zwB{&BZ=#m&E8(BsYPMoY_s9!%v_yO}pd(oUF)$y-?Ll|d){i=nj$a@l$45q&i>Hio zWT1?OvQpJ0l@N|xmU^$fwRWm~v*S%Wedrqy1NI%*N4e+#h2EgxA|R~L-J#WoqUY*Q z5*Bzi%NvSL3LgUDDeUgeW6vPaItjhs3qt$|)!(!KGyD9jzuQNYjF&$20LVZP3rdvY ziIuhST#Y+*C)FD!vqwO79nb~t6uS^F7FkBkyo8R|^7LD*A`|G_kO794XSPE9%qJ}( zy%m!OPuTcSSKC=Q#dcRdYOl`fOT5gV0xOF7+={h@8y;J8HMF6~17?&X%P54q7QtN; z?js1S+X4gVWq0*k%?{;{@g7vOkn4?74DH#kkrYJGDlp`e4A{7(A6lQBKU=Ny1`z-C zWxwY{lHJsDNa9Lc*|?!NJ5KJm@j~%s$nTHB?=xqdA!BiML{*2_@G0cnRwKm+mO>IR zHw}SC^mweIC$h7s+C4#x&b}z+nen5ngt()W_=E2qfKZ6D((zWGG)8`3)LlSZ&KX@i zVUT6s3lYWEBk_2xM{ls%8~>%O7FUIaEzVPZiOFclkLl-6qy{{J;~5+G+rVevwDY1F zl0qPU72|4~VDHy6Yo$Rvbv#dXRdMsNMrbnLRtYgK(LDOuBJ=Y8PF5z=OYlKo(Z0t1lbSZIl=(%uU0f2t1YV@@)}=s475kB9{%`=}@6h=Kio^$~|^@IefoZ1Ojsxw-9txfEF8o zj?I9@MqFwE(M>UMQk222=*)XaT(swRI@sIKkF_uIGVPUMZ_;h>Dqyr2I8}O2DY~j) z0S+CbpkMws59lb&y2}Q)O{7)?X(rC>kx)r|$O2ByD01<3e^tsfXe4^LaDzfw((+I3 zo-|di*iRBg^$KCxO&%410)ZwB9`%v!Rj47Dz`Itl3{M{u)kjNK+ME!$p}4U`X%~#P zagQPm2Q@@!95w0)HN-Mx5fhj0u)9*qtxn{9ELQ4b5B2I`3nvWbBAmkI=+S{dV@U`! zKugEw3ks3s2{}qRDP?@>LUQQEX?NSx!^T_Zt8W7N23p-qCNi}BN9xUoZ5n~RR+VaV zLl(r`aU@P1hiO>wc(g95>|vTw_=82=KE*L4w%!1`JV64+oi)It-{?reID1c+^BF-A zu?^0GLy7OHhm?%B^8_djpecGAyg2N$dyr5=ecH9bB0nNpzGM*J+!&4T_t{@0}-rpo>RcTLI9%>U@J!5wPA{)4>c1}37*>4)^Uxm zV4~1+g1r@!cpgAe1W*)me*sh`9Hl6eAg~ZfY{(Sn;6v+g$A#aKe$ctg6*OhtZQYuV zrR)NUL-RfO;Xm0>s;ipsseVcy@a|MYU5rtR7ltf(!!lOyv_=D7@GCF2&M+n^lB6zIc5_MOjL2Az6NBVcg2XVMfw>D&yT2&)IEoh3DkqMG7_c7JNBGR zAx3UB=%nmq7o69{W)AE~+e$yMV=DC_1#8@Z9gf9{;RsOtrYcm4 zQ%+XjN^TP4^3!`*zt%(TrWl21J*`cjwd`j-W>bo3Yoev;VHzrh98(DG9X+D8l`#eT zord!DVT9`4CltG>N3y%(D(0#nhk<%%?$SB@!$HF{rK3Z$5+jttC$%r(J&+PlP9~ll z&BYg}oYCFt)*okStG;0eD`_q1SAEfQtWpe8&WL@afo|a>gU(b~#j2Avgp}bh)kp^_ z8#I9J_0aQCi>YnC$f_jm@VWo z4wg)2$8Q;Bu5#F|d-SEU;*ezvKC-KMNRjM*#s3pE&W%>|JKiw2Nw4FOkarHB2imMOdJtY$pqD{>r-fqX8ZHgF2w{#T)l$sBXt~aXWjB@iTe2(j^m_ z?K7>n7181K{Tt*T00W$punMKHA$0Nilgdw#Rog5}}p-BmfKTe2E z=paIMd5=T_M>W0>NqcZFq$KjpF?K)i+F@V+ZjqJEqz0?%n|~OGh`zNGt?cRHj7b0!zz1POF27Ya znanSrQLk3Up9l&Z)`kp(j~^Sxsaz#4rgpS;*Np@fXf3{EsEv4M{9tkvsl6&c06+7-ahe$M4 zMY;(OfC@}P$Kzhjt`oV>$Q#luWe&m5T1LOGd?PgLBtn4TO0eiKok#@|F1>fAosUZ9 zvbtSt!N|^xpXv=yn@$j3487t+-)&2DW^>B;>_HvHRZM9Qmqezclgw$!P3c3k&V$zA z@(1kV^AOxzJk-*cD^b8~kquwkL#1p=Wwi^n1LZI(zYi4vhhyr5k+kPhg~kRe zlj*T5$9Pnj;mo?P)k)<%&X-SrUIsiz_UtTRQ8g~0#%qZz8Ixz|7~x@!V)o$?-9kOs zdaknwgkn{Fd#iNxay55|a4h%@R3O0+y2gpb0RV;U3$@NHLPyW)sJ4!DAoYs=*U$d! zU`gg(fEwcka&%O?bTSzN4obL3ujWrwDuXN^Euv71)vQ{`!x67czu$iUT#9}3ms0!p zcW*K{Y@eMtMTxNrID(EE$B@H<8YeB%5d(Y>oe-}$sslP%{N@aeXdGn=Kw^*lLY9=@ z6WHt{emQf9x%1zAV4rWDZ9J-*?LK%*3r7Zd~8F>W+LrDe|^Yf>6wbDm= zS=r-#t@sg!iOgUI(zGu29OJjQ%o=8&z=qCz`g^ml{%D8ZDz{hX4P%6cvX_j};PVMM zia-gnoqWd?{7v$tciC#05ck~;d_Y}v*E(z|A3am6%ZJ&Oj2(#}%RY8Cn;Wz?PWz&s z7pZu!3O+`-Y>zl3I+1aA5lyuu@j<&JmcllncmuNXf)4SDkZPw2I)oK&ITSF?sx~%r z^HB~XOf9auatzmSXU6nBWEt~6XJgfyERL+A7SGCIhLA+<D9e7~(opeZQ1x0Ow2uQd`*=AP;Tl#d-?$`$SA@kbgWkmSPY{$h^yc7sYT8}7ds7Ita7C;@==qwrzmUG zeU3UAG`~H+;fOW7=P6PrUG3uNfp*QcLf#Y*Se-Q5`AicyJqlHoT9P1CYIWlvq+wJ- zozTowpM2O9ZWg1;h}z(UKf$Q3p)}6mj#`txKD7SxoB#CQ+v&jMTqqme^eEgj$Hpci%nQek8k$htzI19NyfXy z6*t(F5flAVR#1?S5f)&KQbuavWN<6QgyiBq7AQ&~Zcgo>s}UL?0Gi_zMMsOOk30-n zC@Ap~iFcST5m`A0lv-MpKxrL)B;`qs>5yt-f+kIHdcK+1z zbm^5(x!X2m-GfW!qrhfF&-n~RxqFvp^ZL6 zK=@W3_T0E{jI9KV%hqpRE*2%Z#D=LI0Bou?PxQ1M<+JRkcS`K1Pqy3f_cq$@SM%(< zSJv1^o0r+~_g}RC{_z8|eLKwdzGnt(e^dS>R@sr5OK+)@vqpap<-CW02$Q0!`9i(L zWqNP^9`u%?*O2nh&FpB+E*VDIuA@b^%(97K+7R~UXg<9Q6@vpsTa^6pZ8hVNSd2#m z5W%F=XyW(!7hz|#wB3XPs%aCIH=qciKuVHD?~iZnxaau?*Z?pndgb@&$&Ha2M5!j! z9239tim`~LdoXb-Xj#vHh4u>i<`Z50Eri{0g>o38x;4E$? zO|ArS(17V2o8ekUL_6_Wi< zsf;M4e{`VShCozTq5hwvJ3TkMLPwreidLFPzn~}UiMke*jtO7B?!9O0o|($yQrB!l z5{Z$K`IAV}Cg07QzQ;RuwgFA&TJY>;79{vBcFhcrfUG2->FcaI!JLX$ZOc17uNJ{5Ot9zm%u{Zjo1NTLqJ` zFIPMTd`7s5inPr1BVRQfAL2c6gHJdtT52xQ~NVQxB%^rh)^FO~3;#aR%V0^xH>dIzS}_fEDJ=Sx1+)0*6oZBw@Hp&Od` zkS?suO*>(36<@>Q2wuG=9~36Vrjr~`LrRm%=8$BfT+R1+i0NW;ijLTmYj)cO*HX5s z^&s&rg+`!`5o(k=)cC8QI}mj9t|K2U5e7^D+`4{h z3F`!Pm0861I>^>Nel%0}g>bN(;u3X#{JX%XjKp)yI`YSFuS>Eo-rZ_v4lsTQlDD5J zVTVbF9f2dBgM*;rDSyNqb2AxkL_|l$p*@yf&L`^F{(AP5ucr5J`VKii%mPFfQN%oGP{%6*&52aHM zF?oH3c)x*$ZjI`7i&i^GV}Q>$X#k3iNjJsAb8g0(LzpSUZAvd#)J2;A3549z?**Gq zvTZP|aS+HCVwB>K4uo;xmJb!V`>7!ZG4Uw0Mgue8Ua|e{>RPv3uT~RqLH7cM?M+a& ziBBIanZ_JqaX+OZIU%s>N+P(_o9o5&yW&P1+{O%B|&*(>^ zJ2gX?_)sO7m_ml#MZ#3;zGKTPc&H7p35V~vm6 zjN%_{dJ$7BK*TAVc9UiVnyEkpr;wAZt!7`P{Dha|b9bQSe={`0!pkR2F?b8j5|tcn zfE}}N2R!s!i*NrF;C-K6ap9eI50extGJC*jx_EkjgPI&X&ExP;Bk>YI<_I7cZlETR zU8cf7DHVc%j>-j`Itb`U2MhGrtP)x&94%ex02&Iib2WJOw4Bkb~ndEF(nGJg?i_0 z%;F0~iByEQlM+FSge_UO+eV3oB91mACWkIlCks{xPxG$Dns(KjZFB>MY^?TapG0B>z5 zQm!$Gsk@9UAiTYw`eQ2_)**>d?Ou2}z{khiqz_y^jd(}Sw`>Y0M{#vj2dNCx|6W=D`Zd(jNj7vr-Yvd{CKq?m%KzCpo0c0wF_mF*JKuxY!UVjBUcG40ZvR0b_{P?WBswwjzZp(KSF*2?l~53bLl zj1xy3LgX-d1uHLLiD}DsSkGx&EgH`hV0_R$^>4SwhGY>abtK#qAs~pt+sp~YDsb;? z5%5Jq!-#Tjpk-SzV} z(Q3TYD>#gLW|O~Lg>?~fmnabLI=eXP>`=e4QaI;=F{S(dCit2uP+zVi4{{03s)F2r zj)Vlx{ALTzocWz!L^M~3_uPsb-98OuMX*#s`D5d<8Mgb~O54kPfRiWp+E4#vUhFR? z*x|EIXk z$y+bkUzbj>b+id6t63(KC|lW%{S=b>?Q3QS-ZeY;p8adr zoA%$kUbhpU|IYrF_lPY@?LwubJDPt^M>po>)+(S=JqCLkQKuL+ZBoxkxQ~v+#Bg;d+ZB8v!BWx&!D7HaW>acc+nm;od?RH>;@VA_U919M^CI8V zA7+F|bqP-l7G!o(z{`zt89`mDA;gmpi7nyL(#iMQHkip4NXfd?B+IzFjYSc0s_xP? zsodt4ANE~uo<>Y#T$rclLJ;S>dewE}&DJrgR5p~rdy>}8oGnMJW&63j%zbo(46tjj zOJsn820P(VS|}|mw?Ye8nEF+v6i3s+N!6uslVOZQO0rf2&{v^;iJ^28!8DWJ$>sLM z*8R-#-DfE@t)(;NB|{Bij&elfL9M~5ErioVrm<^3a;dtIju|Oc^YUZG_=b=!9I=E% z2`(>v@q2c`?UPA_8h^gp%6c4XeG z?#a=^t_ATY>Nf;-|A}>fs>V7ecix&2p-<*V%k*f3053$_bmXz_xgZz{e?{@C$R0c| zHXpxGKxyD5IM9n+uIhey>5&fhV(Ajwzw=GoeQ2+1Jx(AS`RSKq@Hw#1`CN_=F+$Al zS9~tVG4B+WlblmvUbF^{9%BsJLE`A$hYs6MyFajxXsLO1@fdH40_pg&M40A;-Z{WW zLI@+;M3U&nO+27XQZcbrDerbQVzJz`4wSn&wS+(~K6an|X=ZPG@zKrzzA7qM5~o|H zxM5mnTf?}ad@7vVvxnL5=Zv;j7p2=r`A^x`mGf<9#WVI9GaX;d8O>{VgBy0iJ5qVW ztTvMh*aVVo0n)Y#(KgB!%dyIN{x*ej3xsmn6)?yWj{Ca&1w5TXIKqo4nPe$_D44bX}-lxU-oq9ihQrCl#66}mI%fLzq|3;?G;L{R6# z%(Lpl>S(L!T=hu^&0udAXjWS@GXF~3OT!ulJq5rw5yRDrVPG2Epbrx$(w2Vapf`Yc zS6f3=IS%Cm756d}m4uYUwlPCU7WSvNbu5H42|T{3_0u6Se|`M=kYpT9CwEA2F?k6t zr`TeQun3wb@GHUPZUneC0bF_fT>8*`wsOos_EHQXv5J2YefJYtrm~+#h(PGL*(w4p zMi?yO3ymw~{FlH0Uxb{zOg{0MvB}o+`o^5E-eki@TiS|G?J35mCBfcOh-p(0)u(E> z+VlzlPrY>^vM2R@oNCeOTUaGb{%ta4=j`(RHd=F5eWF|syM#>$O_;HIOJl(xRVdi9 z<}`*-P#sF4_MECA6r(NJve{sW9;n&k`Xq~rW}Fs*?{!_DhE_3KuH;J>-euAG!` zDZF4QqZ`kSV#C)X3$l74(jB4#5t*wG@#Hl|zxa@TlAgmwXwfE)8GE|N~P`J^SS+SggwIa+@4{W)Ia}qg3(em_yv!%jMIUTnaUJQ1d0D2 ztT0E#lI)YfWZe^ISm1g345AofTxQ$t-Ose=Pyb+VQP+KW-VhSz_f`|RbAVEzPZ%h# z*oZlZqJ@Lpyo}EFSH`A)wqdsIePx-Qe0`;zdSjKnvvj;m^HoRLI8{kfovyaFZ5j&= zIVa_)t1Ia9FPVfIH-VbUq>fO^`@lZ5#!;Jq-YpPGmDILQBTyy@ut~}Pt+M+~vfGL& z_l7WXkuWm5lD|P!6j9B_X$&R@BA290w8Zv&=g2!^k(J;7#LJ|$KXG`}?%C1wm4t?0 zfkt)1@Hln})7WXHZ`Lk{-=rI_PG6>~Cs)Ixsw1;i9f@rLFgA~8o(2UH?IvzYr}|Y_ z45nAVKb#QZ2Vy;eq(*ay7P6s?!AlLHj}3TsM4dhssN2tm&wSld80;cGI0*C;6PfFr zWQbI#BY?)p!7$W;^eSn(fVO)F6PJEqQJ2x2FA;mU8*a9_hQ2h-cwGAQ!w(cP^5MYr34_@1^Ty$_w*z4?mT*d}s?{4UqGU~=O$ zN6Ai{a-H67)5)N#t`b+yH&Div@FF1l%8V{HzUy#negS<1)NPw|e!(84L4O9@%``M1 z5fYeA0#NZTQWtobS15cwW(X>&LdRyXd?kw>#%Ib8PF)?im z{EqT{&4rF$=NCGXtgYUn&QU-EyW>@sQWsO)?ahaz=a#60p#< z8Y=Ih6Oep^D_;i)rck-)=y}~mA;E9j*b5?bp3!rOjt9yCZLK>SO(|`yV`ySzI7SYm z=|V9FL4j>X6y9oDPjMo%9L|=PLOZDliLG6*qgd?EMFN!U92Q zKu3D!3LUuQ&Xa?B%wNi%q$5G4v&UK0sY0)%{6@va({O^}IECB=T#lOw0yp83${y`W zkz)+TnThSxkJ|&R!7>7 zsmOE?8VX(2Sgpm#hmrXFa_WHX`gVtX`NuW(%DN|@d`JhU-HWXVG5Jn6V4D&C`Ko<~ zrxT#;@)KkYtD!cw5@IU2Ra#5D^v~>+{P)|rcKRbq%sXE<`~1J`_}gXn+QM;&nmbl8 zn=SC`$Zh!Jt$rfzcC;m?2Qu~2fz8}(QFd!9Co8y_H%5v}WJ<{Te<^$K@F>eI>N`US zF~*1ph!la)Lr2f?*cFuCd+#*~1V{)Wg!ZJ+n>3|~N-rTjbbCKGtP};sLT>`1=y~_| zTlb{s`ObS?-}eXMp2^H)+OwW@uf6u#yS1y_3ICm^=eTqi*Cp?s#O*TTsax%0lc{3D zk}*-%s|meQI!2Lzy3c-tVVxM$DD%2%t~x9|C*X9i*v>h=zMcOj_wq4?g2-Gx2WpESv#A8*KXe0om0^~67RQJ!=tQ4ZQOL_I8y{a z-n6mBjly`xeqkry#(nYsumcGXT3*6KmOEL8J7-u=zx8qwpgSAm1vgL?<>(rw5T=EiHg{xqP!@FpnfmZ-(WOUv)`3L9D$foyG}p*M}z+M z0Nd~IDq~1+qQjN;%Wh*1Fy~dG;t2qgCM~zw_eHVA)`s63OQd;V9CPbrv>x@+QR}mu zTw&)Rb?7N51wH*U{Cc9rbmJ@+MHW@Vp)2{Os1=M2M8k(|dcV>3>ePC6Xi6Phiz1<@ z3(&Jjy8<{T*Lt=@f$24h>fM&tUul@x_D{RKLcfQKy{C`8XP@t$V{fdVZ292%zQzK%~&}Tof z5i35kduxw#TI1ayXasXM92z>Iu}ouV&HW7tZm6n}8lx@r4u4nV-B{zoLB%Hc9hJJQ zOr_f4L#%YU?pBf8)~Fw46{_Lh1_{em=OITg`P54EUh|>#VCP@d{!uJ<`OBRyA=rg{LyU1syd7KA0C zluY4^1lnzyj5a*;5$o~faH|v)L8)i7-FfF2hKAL$dX0(Ri|#@ls+;9go;fi2aoacL zpSCxF19B^T-`fFH`f|9KJ(=y`7T)dKRXod{jLb5zE7PUg+1+#! ziE8DObc5VBjHDL*SMb!pK&OVf)-<<^ci`!E@eY@ZkkfI`G;z-WrzVIT&Xs#RS#Ga6 zvU@wIbfoloLEC&`+y<@I>Bc1-+!att2Z+fIBs2Kx&ekeWN4VaTLX0e~Yu}*<(D_92 z+l#!3I}%#kJ3E)!wIhe@dq$X@yTag=>tyoWA{PFS-xmBw(p6xj$1@02y`-c)iZ>mR|+6{QukU*X#;o&wl&y13U3SrhTzB$=-S{+VW<0 zaL&|is*o4%?3~h2pvv-c{5pgx(syKlTDy3e5;Wo#lg%BcZbP>?)XP6*c%dS&(!4f31(KQ9c{ywePSb55(5up$}8xnYOeiW zL6|`!P%(!t{n*0PnZlfeie(rE7LI>Twa_%@Rn#W1e1t|2!6|D}HLX&a_PIbj(2N5v zTfU!FWhPW%5PKbZ%kB*AVm^j7m4J-iR;H(wz84*h+g7L6~(^54fins*p!H76)Lb6o-jhanxFmN#{YjIk=qFrHO5t)E&zXZehM}U>d-7htlD9c+{#txWIZwzsBea+IzX&CW8La;p6#=w&6o+ zk5=3iq~y@t9?t{r(vO_UaE+bfllk!v+n&kPTB8Qr__i1=O1400Y-!C$Y`29O*Bwb5 zE0t2k5Wo?vblY)+nDq9D6SjV85142 z`k~EjwbMmz+*Vs$Xs+CDPE}3T-Z4$xbgq`<6Dt&nD~3E*qRtayIX>v1SWOonyb9{hBb4A8AJ+RiCChHP?BU zZr);O&8?dR?V?MjIZh~WOA*X1Duy|6LI-mt1apoLQttMyvkAZL8mn8sT_SJjv|aup z&pyssfrUES_Rj8QnTahqaQKY20U?3Az>u9R1k{d_=><8>HCb0Vc?-h_t8|E6SO!0w zFOgTITkhmglif`PnwK#5s{FZ|(tr?8mY7WLDWqg?29RxIN9NnYA+$AttF{ZYwsU0p zL2o;BF}3Kg`>Cbw>OgOaur5IR<^KY_kfi=`_Go3c7rtk#M$MICTs6kLKdUSdcI?#{(et(|yTYYt^)oMz&&S)Lb5VvIjqYM5#4+>$pXDL0PaZYio~qS|dv`S7 z-9v3MC8+syl0@yKRI^LzCbDOPe*Worn!V*9P->qSuMKxR*M+2DnF+gpJRO!u!6Ds< z14oJ^6HfhswP1#|5rOMa>i6oZHQRxo=wV@;DFb@yVArl&pBPv^wpyH*QVw{TX{mU+fHE20h42e$wKF#30$0ncX1rgbs`b0(c~8N<7~snP%s*=%s|E* zIWe+8dKtdzQ|p|3&`PqYkY(Vp3Jol=#~9v!>W#q3i@2g*hMi}_A2K0Q0vn-@zbGmM zOxX^bU$PBWzFy8Y*Qn$iGmeZc6&5ZPiaArw+~R%oR`P}1kVX`ID7zpqFdh8cO`KcO zAlmG~Ku7x=gt>B%Kbyeqb%nEfE~$DlCA1P8IgL!(8Qk?z>PWl*`qmz{G||7}O|nWn z8wF+?bf-01l`P!%>VhyLQ>RHCxQm2?LAt1gt|_E{x@oc=;SSw7D^A{)Mz)Int=Csg zwC}&hpnUNMFzhG${r{Y^YyY9W?-toeH~(YjfBQc;aSG9}SVv@Dz>NYl)as-ELP*B} zRlRly=@UBMfJ=G;#^7HV1*G2Ro7dTh|9HfXA6#ww)+E@$IXx_WN=v@@%oYgJA+U|F z{4V~bb0lQ)nzHm#vnF$_=~epl5*=tdJ!?BR^mc3Gnh6t=+^>prCb!wm(YaH_&^_o? zf%$QWS8V0>Ks55C`wJvJ*^eFP^W}k(`GUng?uWQwK9vD4npJ7R;gP5s*tu6c2`gH5&3p^g%SKIdSEJ% zP#l5oi0V~3tRHaM$*R?kw-#-l=l8%WT^j)*eTaMMYc<=>u^v zQ4;3v_>-E@KOwS3bTLdg*?SG)X6&prVJVK$9JQLyn{mEHwfW=*4hFnX9R>($lm_CnEMyQglog@;IKT5*k;BJ+7j zZ902d>l)Q;X20HcU|I|6ZUE*k0cI9&voDWNEnj>-FZO8*d5yCAoBXZOT_de-8N^45 zBsCvdY0Gw9u!UPlkEKGRPHHca$%VdHG)6bYcbvbXEa(I^L*lu9GRP@totb;y`X=q= zRP&6L=Co6z!f)CGeZod<{oE$=)Dn1VDSF;MMO9DQ zEinL;^$mULOY4E>z^{c!oD7p$OlB;d09Eqo&m;>K-lCuT+Dbo~M1yE+W|?=ki7lU| zd22KZ@4w6y$JR5;J#ZgggL@%TGUR4}s0Dj&L|)lZmnfHr$Q^!YwIUronJO_dp;q|t zk=%uUO9Y9}3LKq?=t!e0&CC{&^cQKiDXmFHU?#(}Qm0*@@HT@it7(JVS>E$0cpSNT znpzc8)w7tY)oiU&v~oM=5&}?Fpp<@q2aFAyRtsbabb#pSq@$Sgbkoi1;H5_d+M|_g zP@}(>t_(qFab;YW0t>;n5N(sSaLANWv~t`Op^uG{UcT<@bsNu25H~GX zu$wD9&eDC;#gTUNBS5DO|BdzFYl=WQGz;pRouE^v{^k=lp%&gj(~j6vATQxbOeY!h92u8WaxAb^PwvwhvmQ-s*piDOIYfF|1jeJn z(3|i|2!ycGGU2h-s@GOvx4nhl)fbQ;TCYL?yjGGy-Bt_i`8|KysFXLYY*T8iY}>_U z^}B$u-d6SDsn$7ar}bKbb7kF^ND4&1;qdH+hg{EWC_d0Z7^EU`0Yq!ZNVLWX>i*tP zHkZMQS{OhxcmJgy;zK%Y@e9AQO3jiOSwWtE7|&&M0%f#pj`Wyw`{Lkixg} z9&JhBW1H5{a=d25qztmu4o~v5I@%qfeQo5jS1dK_TaMW4HkEMSauGB6T@R}i{7St-G^h`kUsZqG0alha0x8i5oyNKkD%##i^rC0Pq**C7U+lk^HEw zU-%+agaW>~itFoei(q{(N{8vR)zLyLkFiNFov@jBMaS+q%IM1P{H!=Y#w8To@9j3d z99P+R}Y#Qdn&JF5TC6#bn#Iu-B->EDDvR7uiMb|Z(8SJNE!jX z?aorot!Cw3_IzYJTOZSz;_G7^M3|VdO1wDfLEAIoU$zg>cK(MsZhNOfK&s3Ui=6pb zke=dJ+DZByxdQ(A^5&+AL8oe!D$fj%4zB+X|GTX3wA-NJxG1ijku+z&9I1G^M{Rd> zW6K!Z#HJ7F0G_9UyWsh}onZHpT{<~P@GO!!#a>e#Yj$>SB@LwPP>Pew9ME+xZlI7H zJ6v~y!6JvbE}22eH0j%w2B#H23J{(f7hK1Gwk_35> zpI`05pMdl&*t2&P4xS=KBE{A61^!F?=6E35mF$Zqf4S3xL;F_*^7D(~-c8%R2-Jt& z0NrKL{}UJ1EqtlhiSxMjD_P29A6_6Y_4l*iFrM>(y|-?H<;>}C2a+DOgVVt4y;C7> zneiR4V<)t-%qcXga!pnu_zu`-Lh%aGKbyBBOJ_t?p3(%qK7GxKNHY6d&{{y9;#Qds zt@+`0Gs#_xX2`XZ|KSw}_~ zK|`KP+!(s-GZOFE*LQ=jMz1?;Pfywo-|5Z{xQE?ac>w06Q3ZB*VMFD@Ch$sk4B;ki ztnSk*Y{aa?R_aa&HWttt;gVtpxssHK_CF#wn%e(7h7wF=+uJp2H*GV~5OY z2eM-r!M$SV9=6-6jwTKLF^i}Gc5j`^wlqJco$Zh9WZRP{<4>bdv4^@oZ`TS7_(JU_fjj{;9r{r-R|$m$rgA93B- zbLXmep(yHHz~ak~y8K9SKwZ$YDvZW{;Wfom!F|E!TKu@XK6U|T8{p$sCs!S81dS*( z-dlDk=R{t9SR3m*>wrzqIgNmElDWcU#sbUHyKq)-ta;tKt$WkFVVtDBQS*5ly3-3A63v{J;Vbu8<$I>_Mh~`%cScyBj$>?Vd~=*N z7%ie&;|^>G!p&#^zrmzI5dv9PFzo<)k%|ydZGP;0=0=;{$8Y9Op*X$~l0Fbz8s5UNBhD_`)4>1mMLN=M>?2svdKR zkh1szoFiZ8TFkYJ^#D&S(-H2#zltDw1V7i;DpXNh0*>_63HHb(^5*uloinNUL<9WD4r?%GhUPWEVzmu&R<;|!IdDUM-ZynR`YydsIMX*T8pi)zo$snn=(J?RnKLrG=dg!UX1NidNd4oMWE_I6*k*lO%Ewsz!Li+tb_hmd6| zP9}HgTTA5NAB$f;CX;zDJ1Z8^nwln#0C(aBQ7M(JBke2H$?ZjeA(v={_#lYFyOmP3n(f-*1+C;1fu&nw2)rNn z58FjE%}!GMMSnNr5%)62HZ|YOp`9JFE|GY#NX!MwF5o=A>$|u6=*sKZ#XAyuNHVNx}Z*_uuULAGho*-1Q7V`YRB36LkFL59Z6mVx64q#0)={ z3L>8s7M9XV@t68vs)Mq&HQ?joFIW6J#((o!NzbmMimDwCtczhcV6iu0x4&FGXFNM>B5tA;mZY0 z#br^4(Jlp_0fNu9S`{e?*+|0q+^=uzAr@Ymewx6})@txh8@28zc6}c4vRc z00&G0Wv4J81DC#MnBDtCinXBD-+KPLh`L`}?+u?ZqXLzIC*KvrfFeA)uF!8^hiW4bvTY)DYN%pvTpP+Xt!(+Q z80&`xKtge)h!jiA`w8UhZt z7zvg2RgMOMr-ThXU%{uKQ~#?(ri!MNUH$L%T=}VH6QTDESo4;J_Icq0k_FzjA=B_t zQ7Ns+yH_0p-SW}xY*kc8J23s9mOrH_z1*$XiBfpkk_7q7(5eVK7mGf)9+VWV0)(B2 z1R|3ve&`}~7~u(56#?jctpWs_sSZGOkpkFbwnl0}n$&_tQVYDDP*BpCNv2DuO0Wyc zxe*q+nJghMlNM~Cv6JPlf^??=~FF-&~5a<&I3KN~4 z``g57*$p&3-U_KAsv-vPaZc(x>*%A3Nho(DN8sF94#9laGfZL^uS^fURZ$`p*cZ8^9 zKu-+%gDh&zmo^1|{HV*6t#i4Ui6GMMe%6w32SSr;vO@mKax|BY5z%`UWJ zmvB4cHasO7oCxLdRUT>8A4#?5V>Vj<%y{N*sBKk6D>?#L?YoD0`;SaLW~oMnzkP+V%O9 z?XAXxvu(=0)9z`H$vMKzqpuh+{4Ktx?`$%HVjQ8C4|m^0F|VI_B{|ds8&_>?9Ukjo z8z%R*jZ^z`v?VpSkhK0&tz~6V*B*9P#YuFMtBsOs68rDyOwAAQC#^ZQ=`zGarqE8L z2J{CzFXxrC#xFo2s(LhAb22g`6caT7v3uZO38oWE-S*ormeL`Xq8x!VmkH;P(s4`w z^mU*ytWJZzR=a*5*IA|xv$~8{ZA$D&*?S7M2c^3*BlT@d%s7KBUuejbRF&?8m9*wV zjRlG#nNolSm~rT*BVYd70i^66ePv3aAl4TLN+0zP_ao~(xYve**7Jn}t}Zqdi&d@0 zvw3s6S=|!NtXH!kz#1A=;GyZwZ2weE>S={;%^|TFx(?#8QdPsbH5Tdnk7xx)6fk&n-|hw<`oo#~gJt*XLCDsIDFtrkKf%Q0u&mrS|)^ zF9;36O+_W@%J2A2vFM-v^EdnX4Lyio-K`rxGZ5+r`~Ana?eM|%wts#P+dZR=?U^Oqgd5Ii5018F>N;J+Q#&J*wn8p# zX?r1=`yiWn(_5Qx)XQ@}V3~pW0BIqu6f;8De8M&eH`iyeANR7Surtr#4a@_ZJ3lnc zv8#ZPPS!JSuML8EsSQc}Na{o?3NinG;b+q!&$%zMSmk}yH2rWil?_NrnxK;!2T9=d zszut}A=nFWB|OpNdBP)5BdHUON0F@GV?MmHD|@b<{G+B2JcOxopIAIhC3@FUn~237k!4N&{W@wUxS;>?0;&sb{G!En*G$ z92!NCOi<{+7q|2kp40p?rvp({5UEiWY~+1K6C+$IiyM?tpI%*0O}n1E?(ewj)oIwr z-_qNFUZ?ss$67eUGXsJoO1HIE4Ema%c^TBCIdt=Jo4`lt{1648dde?s28n`-c4~Np zhDC^SI^(_;p7YK1dkDh1l^3R~m43L&qpwN!Ot;^y>-GhjXSXzgTkkA-DECT}&3D`n1v_ z)xoGNKxsnI6s;C$m8z9PRfn&0g_4AP0=(O(iFvyjp5#+JkRMPPfa3sFhJ&TD2)KNI z8VG<^?SPB%)#0WSDCN1G@8`(+Q$?WaNNJva>mo1~XytypxCn(^<-2&h9^fdbbj=cl zc&h&$_7-i`DRCFVaUnSCZm!SNRhsnZ4)l5TBC2ZB-x~jnz5UuI`}5{;XI^#oEMcxE z!1aFp{gx2+H|zv#*#n9TPugQAU!hNbZqX{_GGR`aZZI3~x(3@YV2`!9syJ)mye#or z$6Xf|G2C>m7OFZmN2~H$X>k>Bz5+J?!dXDw16Q@1$C7Y~Gr$ED+Dm}?MZo<(SB~3- zlXMZhzQ*>gi?@SmZ2@IKcjhw;=cSrFqa!4@10OEP9CQ#qdw{Hyz0;qzeKVdZhGkLP zAhFaupjpUV$Z-9eelX@aA@e*TbDCE3wMx}$ksqxgYQY)!9&(e~SgXcEt)h>nsk^$_ zfTTkv_Eh{_xzeiNE3W*mZci2d>~?Byg+%r)yG(ay+*H1*lqttE$|v9(Art zqbv+@A>fWq)+08TUKtXXR?wwNaiQ1zgBDhLm<5MuZ{Ljolp!|!`Olzk7c6qe*DlR+ zA^X(^G!mN6INsS@ zcn2r9vG5#DoEh-n&C?h_FympH6*b=OuM!TsY-{%;PfW?7IaDGiwyX&PY22#O5ZuvZ zy+`F8bMqu(8DbN^^t6RP1}jx~6MatALLRZoK@VD+2mWc31`o9dImeYNiDXl%zYUuD z2`2!B9Dn5qb1aWJSCrAs<(>@tkJ<7Ke&>tUX6!Cr2K%4Tt|}>EYpsv+spfp0JsY5e zY7S35J{RpjG^@-1N%?C|g?JrYk8OV)a*YMj4eRU1YPjNmV80d*=;=xlX!^o=i@|#+ zXJ$MhrR7bi4P&ku(HlEiU;eD_jl#|Zq&se-!GI^>KE3o%{*3dX3?%JAo``#ge*^ zWX&CSkyUQ4pkAmGJmAN}HhkgNT>)>Wzw*DcLz52LR|BYJ`U~y7_8sfH{yiHp=ZFPV zjIwf!H4fv0pV70mtr|C&jib8d@a0USm^~E`-Hxd3ZBGP~bCJW?FAJ79e&*{~p^OVA zY30z}9Y3xZ;eg#;_dn1*%{hD=o@6U6h%b5scijqIR~)bs^w&o#q}-AqlXU_JC<1;b zMEE6%B5@*3_oY3c(Dy3?EX{FfaG72=`||UB_UEndFn$S9kqJQ2t6;sL{>*>C{9k|n z<1cXUIv<=k>k?V~O<&4pDWTZD3!uEh>zVvPl}nfpyS_rkJ!-8WeCgi-K2_H()^&Fm zYPLsW{8dZ{I;-e>a`VOohPt1%>nGl@_j8`3gLkNHn$gYnd(YT` zWHwy~Son${ekTwgynlKt+Xu`G;`h%4%wg$b-y+^lz!1s@?g8cn@gm?7GFCe{&&GPT zq6p#_>0)rs)W<2x@F`<%Ye;PnWv@3*-M;}llZ~E#hrS=0 zy$66y1;8!=!vVV>#Cbu3>w*UY5#_8jsXvnP`A7&;TMMWJSf#wh_LN|Ih8;4?`Gt?I zWjATW>TRHtpk#mRxAX&>nt2Y&#uQ?5iv1ByZbv+ek`R%_CoF6XgH1<6ZbvAMlkCm} zgwVvC3l>jTQr}sx+M}J;S-HCLc=iDl*Za<&$8biULu;#W8_Z3`mTGr)u*UcGw}Fqe zx2V>AY)W_7=z!7o?C1fuB5E*Yjls4%iVrAeAQPwt*~*DSp~@p|boUun=WbL(q}WHE zSZdQU8Da$L#%@zo=V{uYw&9nE%KgI16b|v2vF$2$1Y7{)U$wBRG_N|*rHkDa+6?ig zF}<j-m=jBInbcwp4c>RW8F)d!2>QS3!9+dOsuCkm zrD{)hR!YO^Z%rFgb93#>gJnY)WHhBR)~w4( z3y)Gf}*)DUm%H~IkyI4fX=WB)7@u)49y0Ju_G0+!8gra!r59B4;=^_5lagxzBk-5CX|gv2a=L4sg>1xUQn-thPmL+8GDjEnJk+ zrXnC-pq1;yUnSslR9a$1ijX!%NL$RVbpyxJ{bXDhLv)JR8gqhvXKK*zPh;_oQ zk(lCYT>$Jg0QL+T#o0fh(nSE9D#ZeTrN2y)1puqoGFBu#!;lq;pQ5zgUYg>h&@D}`{PXg+(B_Zq z%lzfGF?FbIo!ZWJ&Fm~hg`FLkg+7rxql4v4Z*S?K>MkS=Zy(4SR9HC^qzYQ|3!v2# ztU6s-kV?nqUomx!zB+|)sv0-tN8mIQIDMRXLgkr_6i~Uh4NH4na7yX7_eyFQ|8Jfw zr$Lj!tN03c<@oRUS3QG+*XbF8(qM&{Hi9QtC^LZDwYE|m`y&@0cA7?CxhDH!Xb76L z=qoE-Zz7GKy?MlL)+zZFm+a)lF$BX)fGYW2rfG`*n412Lc_T7G)4oWheUJ@?AR!Fn zu#C@ydeNL8m-CyA-g?1?Ed9!!9G_=3TF$qUb;q&^=m#_9{gZ-GHVEmX6aZch_$tfm zu2AYxt9<*D)~x(P_OHrMSnp~rtbff`)};;uXzSA9RK1HmSc%!0=+_lWiPHD7M;=^h z(|2F8$y-6sc=eA?B#g=%m-CgCiOKmK0rykNeU!5{ov=mex0v~U*;@A4V z?{@U-Ai8e@pRtBLR&sb>wYcR62T9(SXm6`EbW zDq$;)MmTO-S11aqIX^)O4W-nFAVQq#J`#VvX(1sFt))=0Cc|m#oHNyoRv3{}o6*7d-G{WI^Cr22 z{inZWv$tL5MG@Yzo3~~pXFtzjXb~TF-M4|0NKlneOO>;~NEz(aLi;jHY48jFap?Ui zc8*;9wRKCPqE>1k_6j7QGWBgn?+Law>1o@X2ykwhf&pi1Jjc&Yl5TL;JOzXbN40YM zMaO*I9@15h|G(mBayFnlTZpj91g%gB7ziCI`*kT8lN3xOaMtg5}%bwMdECLA; zkSKwvFMlTODl<5-W=sPK@~OIcdC0=PLKx+$*2MxuvH0*L?DQ$i5fe=-0#RHFhz+~Q zYuF8f{tGdn9K)D%3$_P6PFw(W;c<^h%Nd4wy~HNkK4Kl(e#&4P2vmg?WBVmD5YqUP4k|Y zCp;CDI>F6B>D;2dT1p0`0KeEEu=H~EBZnVpy11waJ6*xeX$NzP6ayCqkFyWbnTahH zpO!MC*!4{i=`7Xyk(*+UhSa+UhUXb(>_^EzVnV{$1yr zcwPYNDrj01sl?95AhZ;a@~Z#3^$*O{4xd{~#?}8W0D+?76Beec{5@9sHD-$GJ?x_w z;_ZX?a`0xIus;CSU%|CsY4^JM8_){8UJ$(gCU})Q%dhqRUG+`A4A9QLB%r+r(574f zR0Gbt?LVu)^ZYo+CBdviS?Rt3MKXZvLOA3E0l}yzW?EX?f89b`{c8aFC7id48N7O( z+38m<*sY7l$WrU1uP zc~I7n!g5<7ycS*-NtKu)b8I%JDU#~osY2J(9J&`)YPC!&ybg~8vGlX;#v0bFtRR+p z701!oXW34%wI4{cD-ipcAogwf6rFFuzwM92&Hqs32B4-J{IiEuB&@{^MDx3bU@q{P z!N|MdtUDU()f{LcM5YRC>-Sto>(+4_wiJ^;kJ@AXzpc}AZ`+8qhpk0ohLs{ZPrLI6 z2Ca3-V|A$wR(NKvm3uJJ?ra)o<;eKD zD?HKyi3|wF3VQE@GprH8+nq35R-9~Uw!S$h6*T+*@~HA*Cl#%FI$CXlhAJ4+HK|gSj^g^mbC3>u;_am%?puy zJq9V;HM^!s-*lV*(n?yHiV%8trP1JYCkwxaZ zs(}w#lX8%emt%WFLBQIaDUWdExL(c#$!dw9=RPbbo@~kUbU-A#Lqm8=XFfkN^}|uz z99`$YSvK+%cTu35EYNlEo2pfSW^>KWMhSK+m@JNeDFWEUkZ!d~_B$VdEwVJQHDqBE z3({yCWenv^Y(}^~9+{DyEN^u(y~DuoA|?M8s;X*5CK$Pd@K(C3z;syw3`2GGy8s2K zq^jL?gI0xrtX>K=kh|tL;qWR!uXB!-)J0tqs}&AAKo);>sGF))5v}#p+ef(FQ?_^h zF#B@rO#A%PgLdPW6Lu5m`;C1%L>5|mkuugLj0}FllRYL zqmw-Y#Lb-s;ugxRh5r}It+~|F^tP#v<{V?!t+wcsXYMmV?)fPPtq^hl=AVsPbJ!jm%hww&C{kOYV!vXin8R5PLm@8Qs;u}=o$&q^M5J5^hAcfg zI@2Oop0E*29v?U#chHL;TZdI|5xMk{bzE@B%HFMGyp>gaayt1Tr?H6Aor$$J8q9U6 zdxI$Ndr?%VJeL_T4QoWmOsX-{!Oy}tfe{d>!CSwzB>v3=2j_seY1G`9w0X=bjs_4% z?ml87$0KuacxE24*qr0kZ_iP0yl8Rx=Pfo5otM89L!(ywCfvLmnc2C8^nI#zvGD21 zIj3lmyJlezPv_|}J2|`$4W^J-(y2#K)r$tv5edEoD>q{%jOE9~O_#vSY;@z{na3?u z{Cr~WDSQ_ISw%7Hr|p3!(`*)E!xVxNhM@us;<=B^KEaxM$v9g8x?oY6X#j5Lw0#gr zPGvM{G^jqx8itQ{m8&`pnQg-PGlFVXBed7r)d$$!W!hWiNZIu0wa&fJ zkZXL65n7vw^wx(Fht}kit5=_vJJQZdmlbkyRtOtp6X$VOSWbr4T{s%T2%IE8w;hb%p#l}$=NzoLd&6F2{3~jbI;y1|_-U{Hry$^Pxc}0xEm(2u9cS&gK-qi)F|mX- zwy_;!@S=AiKL{qXUub&}=Zbd#`r*AgmDN6R-yJkodfANRm|KLv#9LsG5Egq`(j44M z9rIqUe&p*%9zRlau^5ZpDnO|0uz0?@eim!K<$QI&)2|8^?gk&}r~-?%qWb|rRGvCX z%JktE!SDoNI94!B(QGv`f>hV%q!D0tP~}X(%T>#C6$#70ZBa|{8b1j}y;$H!T2{_l zjCldR??Oj+)0&L5%oA{-0J0#bW2w!gmm`Zpma{p8Dhh4~2`vih+s2Dhr`#sm;xb7* zQ-8DWr8YSY+S{or{0vS===8V2Ycl`yIn@ID=_AA>R+dC&`Wuo`qQ*Z*2>FEVtT=r$?a_0lnxYiy4l@qw*w=_S@g5O zijrV`y)nKzn?v8{-z^9o(Ns`h%=2H{Q&HR5p;KYO9nxEYKD(@U{DH*H)9R7 z2(}sRj$}fkcX1%Q+KGl1`||)50O-_-z!>!e}>JDzfi%kU40L-UP=LMpmSUi`68 zOxe1|WvIQ2|0%AG7wuHoicithE_JXVi$IS8%?%w53y;eF0iEuw)$TZtXV@HXMsMqc z`FPlFHr88?Vl@8V5_z<#yUvEBD{5R8#JI>`QE#MR<`K@B&#*3G}!(@$Yc#X4K=wfkvBt7 zXF=8osBP0m$P4Hijl+l7{czs~;bW{(%_s|2)EjDiz#Uzz&!oLJJNFlhe2(u;$=k7a z*Qgt5)oP96d*Hqd;>_Xo`&x|#oHnWtwWc&nRKI5&K5m`{?&H=Ywpq&l%M{D7vdEVv zXx3}=>0{EzMW68r3wAG?-;Kj8JR$vO8@uU@4M55oxOTq{-S7%YZ=iKpcU;DsuYX4IdEiOHf&jpIaQ2#zE+FHm>o|} zapg0SW!!G`JZL4jRxpF7kTYi9(r>nvQ2p(spXSDjIp0raTxZ*}HkGyrZuf!^7#M!c zmTR@z^>7HYwOB2?GCiXJwN}fuDhRgXbU|@Yz|pxzEpZ{sFA2*o3zr3J5zSE((5v-E{*;ty^Wh||Ke0|3ifHr74{p1=4I;(YO2 zJisUgepm*KuM3f{g3Ysw5P7zYX>Od>Y&Sc`jTQ8p6F}oY=@b$ygw}#>*CFPIWS5;F zAb!^=zt^taVxBbCh#PdUp#xt;G-kqJ8AbA3`01pb`}&Z5_UdMPZ`%UPSQ2Y_^9R}f zCBw0!w#WM-djQ6LJ}$-IWU_I}=DHjy4p_o+Iq{%P(6cKf-pf7q%xq5u4S{$sR|M|i zcDbOixUw+V6(M=2V9hGZ=JQQjmB-_AVt-1oj2@g1GYHU%uN`mg9=2~Gn_gkh3e_z-W zPc7n>n6qdTjq=En%|_K#U1l=y>ct}~x@3K~hfmS2))i;aGyraQQL=?U=*304Iv(b7 zUEOaBF6t)YY!2H;0IMPMcAv2)MdFIHAmZ@dvxT0fKCar>z{O4w2vb*apOLBkB#6QozXAdcbMeZJ6oq=!XxZm({$Z zxBZLm3NO4q_*x@kuz(S@s7~G9R-ah~&1#OerVNgWs7li8?ND{nYsD^~8oQNEz&TDU zKhpp5i3Ks>=QgGghLdVrl{P|7vp{u2B#j0VjvEiMssxNRBch@qk5)?P3f9%=FxO_2 z1EEvSxLw~M&C_tk>D2$Z==~1ROLZ6Tb)9Kc+Q#v24qg4N^@R%zUbokVzjzQZ)r75& znH%$wbtUb)pJos8h3o$;i5Aa&Zf%BBJqYPYlI`Qxn3(tV(OqqO!az%(AxHOvSU1~Q zI-rn}OMAMPL#fTn!s`RkBR2W4n|(V<)7^Axij|t zsqgI4k6+tQ$3M0o83y}N{wjOrxmerg4Pd|1ivC-AZl^MBl|H0ge1bWgD6$fnJ~FjA z92B`AIVVw-F>Ipw)2Nf}nNCsHzv5z`sA{1Wqje!r>Rj5wRy!zkn;)%S$miSP(@Ix4 zoOGvMU6ZWed3%zcvXIS_JJ_c9_7;8@x%)n9M@ zmB2br*#opuHvu>+vMY_?Sf-jb1mMKO3A-I=W$Uu-b;conSFwWX_{7uhG;Wt>wEvVflns1UB*V7*g5RmKV# z4UCO|P|l-mwvV?Ty|_Dnt(7$!v4wiq1@fd69f0uQD3k8zhg==i!SOJ}IF9TJ_eFB2 zHdd)gk}ckNxrp}yc-&JoH%0dh)Uhu!k^oPPlHbE%$E3b%0igsx-rfNw&+tXY*EA-N zMQ|tBQ$MVP*4pR;rKsH9Q+JY;tu@ig<0NiYb&S=lKg1m5)q-4>QC3S`NjAtq;dl+| zpf=a4KHTmg3(Zyhp@aYGw#uew5j?kXjsZ3IQUml-J(amiI=~aYA^`MW z&W2yjwuA6ndA*i=Ze{wu_^EZluQy=*8`f{_Yc_fr8EwgL+Z`2Dd~8jaPCXmbafH*; zw&R1A!z!0AWL9EpXaj*BV3x3Kj_6~mNMnFjD};0&9*ZTtfSadWjw z(aNV9m_s;`Ot<-8A*@T5hoFStyadEJLMLd-g{Kij+nmlMX6x=@x=-quu71KOUg$8* zwPU>Q>|ZXJ*hL<11EIh)9%2_XHF!5^o0>+M$%AIG?@njTMHT@XxzitEgNm#xbPLP{ z#&UqMEMQRcPQ1e8L1pkja>q!G87i&7Ph4aGRa^@hkhC0=ysL zuKjtlV5=@-=S4^FqS%Z@rU(>#_3MkV8acI`d5JT~>;R-)2S9=@a9NlcVCZR?Lv zFE(v%Tzipm-H&Rbd?Dl5)JDO^(sIsO6oH4OX*kfqU+JIIZ2sm8ZnGQ>@_EsIs>s=| zh!%zv29QjnxH6nH#FDqm*U--X*=;Qrm}_pg?4~@sQkw4P=v+Cqjz-f)DwY|AZabNV zg!V%=1N3dJEc@k#^~VwU%E$n)tsdA`2h~Epqy`N}SfzWY#naVa?}-KWXxA6mKDH#E zjB|nmw%PztX{D~zg9(PCRMv?YNnI$??vl5F628ECF6{&H|FNO^78WyK19y*dCjbe#8&O+kW)h3-;zgW*n)T#O~d zy~IkQaRN0Np~h@J<~jg+0$zQ{$LWurqdec9OO99%+)v$Kc-uM?WHsQW{WkFB0~WLB zh*f!XHhJG2h{|ef!=G+us}sqKok6lDNBn`woos)6NARj8NgJ(gp1!GR`p&K_`t~{n zbA_(+gn_9#GcVN1dYMpbiSTQVP%A*FMVl8$kzRyWO1=-wkAHx95&yKbNT%(qNuenK z@^wt)%MVm8QqBR@c6L+jIe8p+T^5^CPk*5FZie$@PlJIGcDbENN;{z>+lgS`0x<1l zGnVglu{RbCumdZGSjOBQ*b|;Xa}>M@>Ht1HeDIsA$JjgTqV2uxX9;fFXVj zryn1eySA;@{uHnXtklz*>Nc?IWOax&N7CawaWXfuk3py%;&uD(@GJJi+gt3NZS!pJk|DM!se_w+>LQ}@K_A~9g5vVk zyPPYhMOG4kq+ccrf=XneU1Wl|`rio|j-m>Q95|_@6QD~e?qUwNTJ7LRpW@5zlhp@3 zCm$C+?5%~+sGGeop`BI6+IJ^tRN?Vd8@K#e5gHXnTN1lZ%~E|Q!G)A-3`)#^*>71O zvYC#F@}>JQFq3^zgBp;mM(ksP8`kS*jnNHN){zF)pn9xTxI;%@d$v3iRGa^ZImK8{ zMuRhDY;#M8A`<_bW))*qW#{iC>}>T8jY7qJ zr2bE2n>PW*GmW091V)L}X_CnO2~NJVpUqoLa}vQ-4pT;|tS$ud6E3-of;H_f5?OLK z2?K2>vF+yQ(G-MkiLYQ`Mtm5qJH<=IDq?AFCtN{sa}(KBii3!OX=j!|F+aR9HS(bL zR=wgtYs_x0DUhVPNdz=YNvHL&!$y#8RkjTKOUgP;JFK>Tliy^=2mOLbi4oP*F0*#T zKr5+|bp+s2iydP)5r?67_myzl#%`;|iDbs^i&*W^(r~_x#9yCGR#%6ld^dza!x#wG z8&1w1AB)!%1<_ZhP85#_*u;ZRYyz9Ci6i2H2rh!!38| zFx$6sw7vcERQo)0u6?>^k$spm&pz5b)ef$Rw0&v)=!ooY`xg$kgNsMnhr4In`#V$Y z<3lgoh2yW;HG-#a-bDAh;z}U@0duYkw61_xE~%u1P)fjc<3G3byT5|h9D!GHNS;p! zCh_jSP|VF2bpTfO3NEBeH-2>$6YV$8pF3uUKYh)hft$4?uW*XQUUez9}XVj{%t<9u74ls70!Bzh`#g^b% z9LqjPMd{H1%@_b@GOB+9>$PsLD3-%qO<0xGbACMuK#Sw3^Y&b@j)S*w1gSZ{osAx_ z)5hnX#cA^cMPDQy;i1E`Nnnq|ry@L?4{$c`KUN&L+^J^4h-_JMQvMM>yJe{c_8 zefM>*l1B16(cSDW=e)`UL~X~rTV3+7N4Af&tmL+~4b9{b69`}RNJpnqyf3Mp<;>)) zJ)Hv~pP2}A^7xS|nPsI`0r_;qCF|k}U351|*~4mKKG!YFLy}pNOC^INgQE%PLRo<- z=~7^!=#-;98Gz(vh)StHC`f3wn`RCn+CfO)+_62KKgS{31|ixe^$Z1Nam;3L*WEaK zvJw>P&LBm`wRm|%$=)Y+r!8r^tKKqEm`BZ;*1@)WJuG+OV0&fLH2ZAtQv3Xk4ffgV zFWBKXHrZ!yZnone?zSWE@3fO|Z?>-wt+!8iEU?2n7uv~JUb63Aec2Aby2(C&eT#kh zL7x3|>}`h5ox%4=nj9NFhjG{chH>+XiV7}`$yv<{I2l0ZlMV8JP%@wD2-nz2zNNjQ zYjDTpc+En8xlWJc4F)k|YP>>C;kzU6+JT&x?d$Xf_V1TwlDSFf^%Szu*!5@0<0`BQ z)M-cOAhkzJ81r^%Tel5S%n6{Wj%x{=3O9W%`B=rt1a6L#@e!hU@mQ%+OapQ`wJp{v zMXMC8Ueao=PJlSiVQ8BYd)xEln9WOT$Q@|0m0QgxftdXw)iEJkKRVdmfVcqyH6dGN zWj5){I|6VUNrX;?I%wR?Q7e6WPuw+QDH{5lHC(4O45WU;Ue>U2AIiS8(2+vX7`>%Z znAixx^Ytd!Akvx!JV)J)y#2vs<96dr-vy&(8%SG6oH(BBIU)B&#G<6*=%xu}bizSP z%DZA?w@}{$KgNPkN$5`r;F2S2KH;09k-Uk}lnSvFb*JYsg>AtnM4|O&-_qLd5051& z2%U%8;1KLMqqFc7(ov@^pY9|ph>YoRJW?dph4BPCr)@rM<^P$$GjCzF8^+lb5-%r^ zCFKp_3DA%uR8%3t;jB>3SBP?63=mg7CI6zeN)+p(HHp}jW?)?XsemsZ1s<3RQG}t*8`sM*w9Q2fZME=hg^pDglAw4cgF+sdardSKe)9NFL~ zrO;jIV;cCjE3pIqIV80?BkcXvlbQIjz&^=**52N`-j05lWyj>d`}#He>d2e+#aFM} ziLc+XW1qifr#^qhzW?lyop?XnzWaBsog)G?BlrJs;uAZ6`3!Nw zSCFXK4Wf5>*Z+gKRlwi=uwrcUw|4(!zbTR?Y;&OJ{UWF(F< znlxajW`kj_Z?{IB?pCW_PjVavp!*E6CiGiWD%g~k1N!<9B;1R7fm+4-0biZqX1x&d zdtlq{1d2v3{mf#R(l#J6%U`U+8(l6u(&AnQDKalv z8&AAt(yDLGS7o@vuV*?evjjA?SgGDa5w*cD=!()o`~sR|dQm*;1KNqk0~|BS8?Mu9 zF?T031rF4Z4PqlS`KA$2G~lQviePQFo3$XfHM!nL&tOT+?R^&<=0tVN9(j5`_kG4H zSLsaypf;MMYeKQ=;wG4QcFo3gbdJ}H0NWRpMA}yZTiU#Wm0dnw!nhtxwNNL zdpZT0)|}~ibXD^=^|vGHkROL0@IaGjqNU+z!4x%1cC%=V9VtXIN0M4KKAYF)bVh~# zxq?QC!naA#<*Xzn1z_q9)Cjslho9GL`RB6tePp4^jO)5)4{`kO+n5)=uns-<^1_B# z8FHIzSLkfZCv~KOZc?dT1bJ2~tKR=u*vsZOL(JoS~<{i*ZCtn1z+yE zm0B%UIiZ3;EQ3O1uEZg7Jp_xHj8K!hl|8Mk78 zez?be2BZ#u@`@cl3Lu^O+>V_5)Q+A!Y)4LfYTtcx*y-fnsc$~E&=W`Ax9^XCXlH*q zYM0NSw6kYV*-t;6u>`1f_bYzrkgGKHT>-_;o&3-~cy*V(yKIDQqu1mW-sD#yVDfkik&*>k z0U0j&gb=(#;>JH2^!E<68jM`|z#zNR|AzjV0Z@Y4Zhq+qffh8>=$} zLc5}BSmy4#4}fYI%~VDXg@(hqp2_Jo`da;JG|AqLr4H06Q#I1M!`r%{jLE+0Y^)@u zcU%50krE_VKL4d9LjU^4@3S)1=%7Gx)^1E1Rg=!kY{5>tkFlsFVXznv$_N_#fF;IN zQG2|JP=W~n)pW-^*R`;6<+`GwaXP5Q zBt4>;s#c4#+ep9+z(XETvc2`1lyCFYvjWSCC)vVfW`dw6Ei7%z&sMtW1ey`sSwuCe zo4B282&XuU)I)8nRI$GWmVm$Gn(irvpqA@MTTy1X1b8w;Q1hTM|wR;n9LUGuSw4wd(H}<&!2NZG@ayxRbzYo>mLA z3eYOqT_*se`UQ4rf8*`rkP6C}+^PV(9tOLZ{5!t4<*!S%&4QziVpuL)`vt9vAh^UKSED3D8CJx+2q$6P>Y*%6uGe zq>Ee#asCj|QTBzB^Cj&outu2+YFX<|iP3?UOXKao`W*`$h@wCA#W!rif^RLX-c-9w z-G9)$AUFBE9#Hgg^+r zgTkFjNJ0x$6r`viB1-Q8La(A?7g0c|=>>4z@?7udT$7oIyZior@B0Un@03i!_>rMS>&lQpGPq{)b$3pr(>#xFn1CKW(Em0%H85=u4&u;yFnzM?S z@~+2*S|*$}l6cv0dKJ0>;@-%r9soH>Tm~bJT65OwcGeWcdUg{mG-WPx(TV;H)>MRK zMkn}UT&Ci1*ITCKfL0ZkY1_*P-dSv!zWl5`GvF=%$yNA&1oxx7LJy!!@42_L2(6pN z-%DKnT5k_{%35}O73s5zmY2S1l#x|yU{}?wPaDE>#L4>F-8g!22_m3p?Y2LUwyCr* z^v8uuftv#jI13V~%e_WiGlbEQ$r;S7so99XHcQM1hTVYaybeZ0jowM+ z+3?rT*~mrtmb~VKb;mzUVh*~RZi5#V7Eq=vLhHqUv)VxTQLeSJCvvm9;T^WAm>m=4 zG>>wr7ba*wd$(2V{PHgA&IHBZ*IUAm>%dZphsa>pvDu^Q+dM`t?HSS7b`3*y?R$Zu zt>tNKE>9;XzkW0i?HNVY`1+u>P20e=J2582X6rP0Ej~or8fYyf5w<}pP1NSfD_f^D z=eL+R8~^Y4Z3SaQB*wN$eu{mv^));9;X3>3(>?ahmqf3=`PfdL zLUf(_0EVNf^P6)=tk&6rZ|q#*w^mkg(#i`@*>~rT*@ZJS0eo}B%1?cTqevGNqU{76 z_if2HcBcF+dk(0vI4_=q&B{5%i{Xl49l4Ojo~Zm^IL<|yGMP?vp1jPINXwKo3s-KX zaaDF6W{at^EER&~h}0_MV&b_P=V7!`0{capPkz3{%Fds#qhBAi50(zK*BSS+l676H z_yfJo=&ZMJ51}PKr#1Yg{7)wR9BkChCT9IRk7cZf)(C78$rqUs26#qYTqLRCvKb;Y z{^E70bEW+@U8e~;L2Z!Sy0K4L)z?OLvgyfq*3|MJ5Jj%ANc)o)Ud?B_vl?IP@m`~AFAsvDx z_GptCJdSRY7jRc=XY;nf3y%(+E0c`>v$3N=ZI^(>}lL37p<`259SwdC4NsNhTLA#v{V>|w7SC=-uw;}qahCfwAM^?@xVJV*;g59`WF-96j zZoJDtg&D7VBkgP{1m5CmdY?A!)s%V=(&KodLlxL8<`mz zzn0;lTH&!AW?ZJ!!cv~UZsl0Uk*3wRH^(%w6&Y=8S#~e)csjawF#-Oi_Vq_Oc1{BD zn-8t<)F)Pi_$$skW~UK;XU-Ba%R6ED1^A;yr>v;>H0q6;_(EtiKOe6(?@PWOwczxb zFRf}`k$hNIik~lJ%&KN+Gsp_oQgf>6HSkscYU!fEMJkl_Qnc7Yg|zaE-&tB26&gNM z&{xvT@u7kWq6ONR5R{@W$LkcQL4)DgV?KA#U*b=s>WQkw>^Cg>uGG#ULp8&oxZt>* zIr+Jr+&gX#-~-W8wWFYpJQN8fq0ZdGUQtQ$Myl+t2vG+Tm{2 zr4YX{@%zr12N+JMV$(*1+S=LO5A)|p~yGnimCIM;su>(RKVh!5&Xt;wJ-B3Ch z5Nn+FfH%Ifn;P)`Ap&}^-Xl$>v-}h2k0$(IL&;7#r~L_HjldE9?c<8pKW#0CZDQIH zb#d@!B06gjPOo>?D%(ocZ3RtxVCrGHeEL=7>gmU7M&d2M7{D8mV!o9LEcYc6@^4L> zXdCx%ziRjJJZyl-D7*9@Ss_c>nQ94?IQEo_G) zaZP8gs!sFOSUwzlQrtM-XWKX+1o?aF{)**E%kQkOiH}=zvHP%ec zI&=oIehH3PFQcvvBf*BTb*;)qJ$YrGUE5zHs(*R2PY3i3(if8FyA6kT_lZgDF;?k z;tx2`Td+J|u?nSF^KHI&DMY#$b-0vN!p13G?1RO_?7-qwJM>n%9aufXj_q4wCqBus zlb=()N`5o{42hP)voKj9gcpC7Ji$4laQXQ#S|O}gRD>!oBI#MJpy;&aqZacEXwuC8 znwRM-ZAhi(tn31wFX@B}v?@8f5rnG<(S^l$OT>LJ9yPk2Y#^hVdS0|wF4`+&hRQsV zU7XZkmPjo9|IBkW#B-|l)i?l^!Ic+%i#vbB3J)x@t#gLPhEeNpp+7|sqdCuMX0GMW zoUThDPK4;x=coC)G-l{($kd6yG>Y%_(d}#owHwz_yHSJjo>7Kt4#Tw&!*%2kG$YbN z3B_Tud|a9jG@HZnR#sytPkG<2c&HC!s+cjF&DkQJht9Oc@|CeW9A~|1fBSEYPE@`oviYUR4WF(;(NtGXP zoY(q`<8BZ}RlYumkx(h9yFpOdsC7id`sdi~4-LnSWTil}X*Pt?j^X%ka&L#gVnZlS z8@e>l?)tA`R`rHXHfT1N+nagTo#)+~9E`jQoZ`f^UNip_uWJyyxg+?E4X60)i6(RS zKOnhrHh=O{W=S!k^pOVyV6 zY&};kNdTX<&#X?aQOA|+B=^G}9#wLol(0zCZI?dC|{4^=XWog1soL-!&(+r2w zM#;Ukgnxp~6o8P1d-h)mZG+lGL*ghMP;!siOq~#R?DvSBvUNh!MZMhR)Qr;D{ujG? zDTxfVTrN$e+Ku|OoeKl|cGs)+&Hm+f^59D9HIQ&ec2c9U7jJhTsfCa2ENKNLJI|gy z0YjZ6@sNMYuFfwwZ3Q%#7Z#n3eJv_J=PRH^ZiTR1VKLl>ypwlaP;%O*gPi}KNls9U zH^i6I=oHe}k{GwW^RKj)AvH&k?xM}{EQ3xVofN1Gi`CM^Z{uS87LvAeL8piQot7*4 zo=gZFm&e$WGPK;OV;|YqIWugfFY1)B zG2jZx379gyXmm#^IT}G}WE-kHX+N(w&HBy6A!{xtqocN{v>?Y2bSI7$bi;jpKzk}Q zh;Q(VAKA~I3cMfXY7+nV(iKhw7&Dc@Lhnl zy~CTxo4i%HNWIj$rsJ4O{O67fEM?}Wl&a*}=;hRUy&f4>s@$U1tEwg=ZS`4u0oCw_ z7Pyjx+5J7R@6QZc$@N8f2aSp1v|cC_*K9s*^hbOq*YbvFo(fCL`C{6%VJ73)yAEnc6pmgs4W93??u)g8KSeKTo#%9!uw^m$+<)=B|fF}7L7j{j6xemkB?S_N+s2()rtzeM7#eE%3tnKFF`WtTXmAwvo7=?Wzu6V zJ|6-14Ve0=#of@(u3%Wpm6xl7oZ7T|2G~$)YDY1^O6?Lp8AU%l)Q8_uN!_3ynTMKV zm!7lklbH`g9b6UKvVMjAdFbaXTdAtx+*5Yr|BSZq!gDqd_k9F4ddjGZ!~8d|D&JIX z=VHhnuMy-xdbOBI%=RS~*Alx8w}!dm+tP&D`sJpZ0HBPz6Pu@aQe~T56BM zrjcVC!Yxgz$)}&oyrQ_Cu{2$faXN)1x16%lbQ-@&T%>PE*C}w4(5kj)dNlr&jtl~K<8&AI zGv6-PsSv%DUwp>S!C6J+1wJvkOql`Ek~a|q+JWja41)TxyGgCtUs(ecWhu`mKvfmh zXo|==2Zh8&=l{kOCTA+0+}Zqp_dRQrAOK5gl#(7(oBQ|Wr|kHVcWuvWBkk?XF19I^ z5zR1_7;7WaYqIp$49P54VzYHwa78?8Gj)Qjo~g-SN-IdgX{%`$M6OR@lgyXP&at;=aH%WWSB1t@$oUQbJ%$P zOoO3ZCV*&u5d5SX-fOf-DTOgka-79?6IhA$WYS{ixNB*7y`Q-n*IdPWBs^_5P_H|9 z{xQ0`O06Hip8|u?{4ye|VpLvLQDJ{RqohS&(JewBE(4L_u1w0iD9MlMV-*AGZb>@!}B z^rGl%rA~qKm3U~Xh$!qF=JRx&|8jW@6~)|?9b?G@5T%{yL9UR|@*1#N3J0ycR4J9QlPIk1bI=KdBW>jD zGADMbB3V?z79~lei7~b0k+6Rk^{Szz%!MQ;#5`(q`a8_?{@#tYc~*+$&h8KMP+NyG z%7Is;m8fRLc8Gq)i+;lTgM@U_LlbrIjDQaF_1psIBK^s$N)6w)TH@V=@nugCD$ZNJEd%mJXwOT93D z7-AubE4~{NX27a5RAwnV2PbI^MGASf8iOg5=>6vBtezl{gH#IRmp#X5jGwp2wkP^8 zB|fd4$A}7@k7db?HLMf*zl1ySHF-4^7W+>7u5INNxgvZxwA&w|DY5mC@ z^j*!Uj3uA?bhUn;E*$dS<^zn>53TVX@#jf?gqcUdlu;H?E>VJTe4F zKj{|zSRE8>lV8|x(J^~|b)hAV-DB75ql!aH;MY~J-rlaej!+>VTl3y4d5zQ>>J0@m zl<;5j*h56N)Dy+|Pfub zA4j2n8`+&V^|D*`(H|0ZbN2M+p{=q z$G6Y5&kygmJTi=@8TfVTBvltDCnx8Mx!TUAAyicvcy&`fDLJ9Q}5I!~-f zUrWkL(MctYSS_WxRF4GZJXKZ0$uyQsnMpZprAVQ&fBc=V|A34bTv4b6Y6<^Tav~so$;lsHy(lh@T0ePpU0-|FQL~`W5FF9`8H@s;Z zru4A4QYpzpl;(sPSO)W`+ag<}lP1#flhaR{l+z6Tc{AN~h<|D<9og09_F-pD4H8(Y z7pptb2`CyR?Fj`XQpwtstE(AGJ!pw%$M8rRD5>w_-T}KUkxJ{{vp%z{?&#}yxV|P8 zt~WEss#*uTvwBCXMHILin9@!i_0l9@&#%JgyX$v>wH>g@o}YipCN4W~&o5=u192$D zQq=3Cw3%ugw6a)pB~q~QeIpxUprT}Cif|<{&>zT;AO|@5owGKEvdrOx+*1%m{TPrg zlzV*GOSwcv&O$y+$KynC+LIfI5Nh@2-TTtx{M=igTkjRDS$~_}8NSL7QYv#Op5Y+s zX@A>&0b_kpDyS4qedq=n6CqA7P>NatYOcGti!Y;}j*T=$dK+7qguLz1Vs1b`o}S@Yphc|1eTj-`E(O z)t)QAWN93hL;nY#i&I0haFh7~gL#S4r-P;(_T=T&RKDDK1Gzo1sn`*|zkjZ9BO|rNlRe>sy8{$||y~Vw)JTc-%ZrWHVWh z&Cn@sbNE?H)oFR;bv%(KvWeTmV@^9$L_1;Wq#%coYakQ^TXEeI#5>|2agUVJ)FB<5 zdvZlK(__OBHtFQ^FT82bw+&pU20ztIXkV?yB`zOZ&vwq}M5E&j%Rl^%9Xs-#og+IY z>X9DGBlo8Qu)_Rrtcd(yULK+Db6*kaK1R5RtK|HJBCAyj;b?lzdH$7&jvyg@)%^=d zn)CeA^J--Dxrn;|&woHk|3D?-ofV6ViogE{-d5CEdm}bPr;29k=$`V16EsoB`-LXQ zWRQoC;$lu&NGCn%IYRf?CW)MA3NNpu#P5rbTJGA{Y-Lsldwo6E3H_!F<`GWhA{R16Zz=$+BsY#yrU22{}%agloa z-UNfZ2x9L0mNE^SKMT@%W#;~Q)CIl*n2Q&5#&OtxRxL) znItc*!mWao68d1@QxGWPp_CQ+%J^BLOzw1r2Ek(*D;^BtKuI_`GN>TZZWtpYf2r4n zVb>#-V$sM_kO=hzJ<(lNlOVfZ`XP{z0yB~z{oi0S@GGAXZswBmbqz`2G*VdR;bW={8A|VKLi^v^lojQcy}ZoQ377TAI>4^_g9NB(uZH|oBRUX`r)|XT z2IlYyDf!mWdX3&iZxFF~D6{9Pqm~HkAa&4e(rSH?I{m3o=)L4isQ3(HN+{6n@G74% zBNc0Qwd(QYW8TC6BgkUa3<%#(QffNr#yq5HbAN>a<+V4{guj@ZZ^uH~rbB_HAXazL02J*)pB0 zg(Nv+>%$IQbIw13uHmqlC0!homXr1@v7<0o?&fr^4xL`tvmx=0)XuCJ0cD7QJg_v~ zPg}TrBNA#G<~3pc7&c5nJ3E5MY-cL%h*UL7@;L2$A+ia_JTa;x7@MF1qvh1MCalS7 zV|(WGwvV>VwSrIAA#gro1ppW4S*WFYL7w>KgcaoDJqqpO-zc_{ zb9902F>yMD6{SI#d}o(MX{GpkrfH*Y%Gh#{>b#=TD=6iAds7~l_g2U2q>590ja0~! zgv(Nxh6?!$=Cl$CJWJpBDLY0rvG{Z)tyGUjcQl!>7@zC>*-z}lJ*#cw)NZzj9xM?` z4iq7Vh{zQYM%W2M?$x47645D6&(0T#q~>5%?%u+mOl-3J`R=x$ZwtGzMm?D1Pj>6m z<17WXQ0<>Cr^JA+*1>D+*>10qf|+4|tp6gF08{PZ$0yl+kEW4t8f>@RlVVq0%bXfb z%V({h8vMm3+U=_1ciq42_9Xk≫ff=-oDO98lPt?{G_z;dT)CnkyfV+FOL-&WsaAY-rY0&kFeyiupKVoJk_&lmrh^zYe;D z&3Kg@h&6_g;+Ojoc}EYP_zcw)@rE2LAFvvw3<{aLt|0=y`ZIcwBU)<|pdJD(421?q zp?&({nDv35dP5gI(Ml32W7Yuro=f;x{%k*^?Jw&sLXU%~LJ0L*31RU{_XlhC=RYo= zW&qksK2AUcdiX;2aNXX609SKMs2Xu%Z+mjIWuWV%g8FJYR-}2E|8*r4Et zmyOCg+mZug*7-q;mpo}jeoSjtTQlp7865|$TGCVsdSBRP2?;&k#OnV3Tfi z3hNs}`Ua86tQfE8;Lo}2c`3#)Kax0ck~o)e4L?C#gVeADKf-&|_BZO&Y7WPHJttUmtBBEX%Mj4y?5NqdTePl(eDYFCQs`KNS=f zVsMJNxxARlrZPq~lwHWPi{BR!?Jctlf2WKcng}jx!a1<^`sOs{0?lpQ0T<)WH6zY=s!1mc@t zEPtM@$^%>3O*I+76!&|(=}B5XUjE$Yq_mr|*Q(tNi73AnFWvnl|3n_V4>g)`#6;yA z#X(YD66t5;NjxNTb!WTgo}u<=vpJTSdXPm>!1x_z>1{Y~Nvn&Qhj7+9v1>_-qIwb= z5NT+7Ky)8mq~Ff_g~cLaN4i!oN9HgOhy+o&+gs_LO14qYjFZZb*ruY6NeGlwiIgxo zHOadoZmOzGjf7HhQ6vSYu?$iM&UQZixxWgcJlhnx3marPsU;yRf<7ppYxH~eE-$g%o1C%E0v`eC{NdqW_m9 zQ4Nu=;@%l=7g~b>t0EtL74dolhA{L+@8K>{chwK7N>-1|KnXtoHT5Q5HRWU@pHZZv zU%Atq4}AV!s#>3d=5m8t5x#3iytvQHA6e4O_pRT!ckQyu&?(n^{EHvD2zOFjzUO;N?r*$r&3HoAzgYwDXZh+6_hEzKt>wa zo)^qZ|9%m@!A(fYq6k^Q+Ky7I;?Wow!z+IzKO#+gKBDiu=JbhgoIpZR0`bPZIDJD_ zvA;E_pCoR8GRhS=E{mKX51br57Sc(YB|8?BapI_ieas5niyTA??%zZ-pzh8VbBvEMheu)Fapn+d-2L`Q_JRy)Ww%_d)~Vmw^)yRp zSaI(;AK4>`^Khhz1Td@ar_>)_P68xO9rs*8Uc^I`Aar#Tt8r^PyXI#kfPXjKe&6a9 zYdv_ACDTWmx}?a$tBRSOeugn15CiJI12AZZx$O>FC}g2&>d7Fp5C42Hr|RiIIJ(2H z{mPY_esXqjoW@*?$V_-oJ-JBn?HwY4O4&(=iripmKId+@ufAUY6$YYxOEQ?sB(%k)+l2y_qO z4IUr3&{}40LJKi!g_L|h{4=Qvm67)&BNhR?1XxWKl@CDiq`iKYBv`T&MMzbRH+QoU z(~dG~lu;1;)I_+c4^vhK;qQ5)vr^s8jLsRAa|*i5{m^F=bYy%~dlg7@pu|6DLJE?4 zop-G%?9qG5dsIc*r6=AOEu`xd)|A_b&=6nLQodGnv5J2i!NuCiiFS1DB>Q;x zYCHA;6A6xfV#kit9(V49eVa%54Q+4*7Z?G>x}G9Jo`HfR)WHy@kWW*DPZLsiTp^Mn zDEkMBpzQB(h)P|qQ0=n5Hy^m>Q}d!K>T-BRzKQ}J7yj;~fiHCNAAFC?6)BO$p6nKf zgcUytMFS{4a3#Zuq$tWJY#u7N31!@bN~!TFp=g@{?Imo42f>=q5 zokBXP!h3=a?k&|URG7y(PFsme?SD(ZfMwR$=IoBPENE;|!MKs&)25)lvyGS~s0h_# z8$5!hXpBDInR?R6#-)p&-V*Jk`W2Fky{Pu~$ac1LL|eQ4dU4MqR`byz#7;hBaPNn9 zU+bw9zBXh;5#o1f_6HU`J7BF{Q=hi}X9uje4r!aIwK-%1U;mVuCN!h2F0v7;3c2=4 z%`7A`in1RDym~J`f+qQlRt=KMt5ErG9VOUFe#8fq`?fB{Gyt-|EzCrmBw^jVaMfKB zY0~#pl4}~u;2H*2@h_RPrp-C$ym1E7z%Ke`P(_Mr3?X{0oK)kKwc!65vP8`g4$ZB@sGT+e zr&9SPkz5~!*d_5+{F>q{KKV!(DCQf66n2(7b32sU#tx=EZSSTN+E_FW%Gol$HrUTVwroyo zWa(SdaXhx9H?SAvf8>)Cgi$xWVF{)0=R}|)zy4m z_Ch_|KDDE5e`B1T*z*SCo8G1LkLf2TzVu?6f-q&5H#`?C6KvZ2K#NXq#)v)GvZGm>S8;NJ$o) zL(SCFl$7f4NJKwgyVWQW!&kcD12Pj*wG2 zN~JH4AWR04iPEI*0s2aWMPQmHBTOZhFe$cd~5@Ph`af=}L!LMkXJk#%2OvJ}3mU&Fa-Ac?SA3j1pFOg{qB z%G-^3ejTcwIgDuMH^}Z>Np+UvLq+=gfWMI>_j^`5HnIW+=P9!!C65Gm6cxwi3 zxg?WEf78TdA#vJf9#7RFOQ(=tCWk9+t8`W_%r`^yw;&?Bcq~qjh4pNfT(=4CdTmAX z2iv#_Z6XexGqy3m1Kb*#MseD@`QZrD&Co26(0T|?yH7H8SmNVBB&0H8JqWbkGXQTH z-F5HKT(=$qRMeENdkP9yQk%G(9uY~zg9``S;cahP-WS{L#Brs}kJ`Dj$7$_9xjAvIK>HmP}E-*8Sg}NH~`PZ^D_7zOO_nmB;mzHR2(;L}J=xB2) z{XFzBl5m8ZasyPgWE73MTn?MztY8Ctm9as_NwhRiq%~REDo&@DTuh0Z(9#f;qJ%f- zl!Hy&G>&WmMso#KtMB07KX^@|T_*#3e>dwxPQ4GyaGQ-?&tfj(LfH6g9vy6%@8tVv zrCypN2et+RYAGGLL`=uT&JPiMM?g{W!?_to>UXHV3i5+EL`cTP(GV)+0!fTUQty~zel>8bC!26MB?)eTCfc(4}OE0iTe1%5! zvL5aCEoRv?hFE%jTim0c68gbAMIRbOaAhD7<6w}aQ%|@iiC4CMnTi&*!nCJZwN@8A zqmI+q^9$_T(D&SeT9)=qc}SXZ%AQQwYM~m`->`J@CpCUyo$B|no#Pu@F8JI6&Nq+a z54KsD&K<|!MZgB<4Us6oHoS$Kbh$xOg>zoVjli3=Eehk=g0btFY(KeT*%Ichc1i|C z1PsC9_-$M*+qp!hy#Rn;a{$-2>6&*Dw-H2+Uyr*3cu^xN9Rs`-r(l&%0`GOIEmqEY z^Ya7{XeNJWB{!lZJH_~o;^POs#HBF*B)DaOBr2s03ttX)6>fg>Y z3+3dOc4XI^w)u_mwrys2#x68BfpXp0ig<1OjtRItZyV5YOaLf&N4JI5z2!?t(Z8X;3kg8#K4AP^S>KgFoPOq3qRE%atXhk4UALoR;Xspe$}wlbPYC zRl2(pZm+2>a?PRN%=Dp+7}Mo|Yt7gOw(+F_c4p6fJM+bUD?V|UEC=8sGFet$V5-sZ zD>M`A}1?$@gnVllm}2-coqvM(TZ7(X&S;)yv`nul2TdjTJ(-wT zzv~JvJ#r$KH>78AxMeQMx763^!J|Ari7;l+StS;Z79VZ@oP=)=ZqgHVs)!Eq5|0ij zCV4Ift(s9|ItU?}0zL*UVGi2nje8B_Y$xKTLUJ1?Bvh2i$B}U zF`aGwtAU{l>riNO2|mJ(57i7tFtb`nSv3~zv+0E=tyT_pYa?cBC6iG$j%#Y$UQe^L z2j8}H$3C|6dDJ!)FPo5?fd7O`}=LxVnAiYnm>0M@C2%#XVO?g-*VG zVr~oxAsHEWdIf~4ItdJVr3_60c22Hzv@^s3QE5H=R5hv+r3wqcaAB$Xi4lLYIKqxh z&X1sRO)+k;-c?`osX{M3UqBsJzI|8prIqKg8}a>Rw)35dwq|OgEuzeFHG*(GANo$J z*m9X-CQ0vQABu>EDqY+tM&`TgD)Td0ZZCc=`GCztO44$;sUjPsgX@%>jJkHsDxk40 zy|w-6?w)iH{Mq7u*2xkl?qlo=(+(JJ)qB!sw57`cC~a8Bo@hSDUVi&L27&@(9KKG} zXLn>ON~EGdF|2TsiilJ@( zq~*I|dO9(}VFbSWJx`4G1X*>GaZldyh>cHt!E&cHu=V3nO1W7$G(txp6BFo^wJoEe zxjjkKX^ksAfhA)*Hy98i)O*IkUVe9L7*Mmnt)F1C#Mi&d3Q(_eeT_?EV9T1VUT`gl9_-dZa>a{~XOfS}NM93icQ zzd-c2jK1>ne-iM~PN|3wB_Kq^nZOaJ-7Kj(g@gn>=@Y*l9Io7!`^#K`IXd)`1ffDe zQhF?M{Su?1kKF|rDK4a#D=>we{gfclC1a5fEY7JngRd^jWHE@SlQah#ugJo9R^8j@ zG4{Yttnvl-M1cps;nLvCSv_{8s!9eBAWkL@@dCrUYY)LrT-C&SW$Y&ublS#H z8Q2v&(v2Sx^?D+)6cXF1BRMVB0aCF+3BVt4>*LB&C(`6slX`xPWy4b@z zxSQse{dS>XZv+K=(z%G|U_WmVnjNqe`&AI8tN-x7x%z{(T>Z6j#y&xt-D7OJc*-Qs zw!hrd-d#A*4&^Mivg7YsabcdFXHH=81=Px4(KuW-7v;l~mo57zf=RtQu?rlP^jBqX zF%2FXxbRQZk4`A32(ij#%(DxCw6g4bTN}_S)e&}H&$?JfS zYvJ>3#tRi8UEeWeRMkn3$UbN^SYcU_6<{;;^6z1puH|>@Q_;Qz#NBQ;5_gKGHJ#5YR_O>dstsR=s z$PNI7V0&gG+p;aIk!1@;X}UXGrz`==AIlP;f*s>f!TU1!J8hS*lbcRWyYe9iuuY*? z$j;_07#+bAhU6K0f1ON7Fj2qhl2&)?l- zMV_Wi9yzmQLRBlKdP7Fk;@I(@H5;89SFX6NbE8@=z8}58a{zsh< zA0RbFuXi)_l1`~ILnIo$$HT9912-|?Nw{)6g-R&wDy6W?uXz#;6%(Z5qyB!()0drz z6MoWUQ)UP@X%Wz&#p3*=$3i;A-lpOeZfkTS_|#DDqKM>4*+s0?`8+E+{fT}4K`yH} zGHu1wUbYFBLKVE*`I;+#BqxF$PQp&A`yIlLpF$px!v;;?$W4~MdC4YBPgV>{H?2b; zSpuYWeQ2b8ohx}U%F>if0crQl6#`+D6P~}=v_HM)gve& znxc4~TPBa^#h~P^sr^VQ4kS)Lhz8=?gO=GNJr-ETiUK!Cp8gC8L|vlQ=#er6^`gYZ zY+XVMSnBrL7uI|l4IRo3f~ih?4LT#%YHA5bJFwMpCRNohePs1|tg*N&THB5B1g+>B z8P<_``D2r8&4k*vesUe#Poi*N&|2tdVmZ0sDG;b;2u~s5DI(A~gmj8w&5c*=q1XN8 z+j*6woLjQ+PTql7JyCm^F7VpW61IZAT+nwA$*`Y*!Thmwbj%&`1N==B{xGV1N( z4}b`49BMH(ZK0 zN6p8+H5CrrdJxZ21m*a)sBZ$xR&-h|Z7*v!o>5_S@J8`7HFHbB*X(?i2IH{hNaCsNX5W3C$*dDAmh1bY#@h|RayY}|(mONy$ zjip+6GzLUXb8T6IG$n zNdb%({2PF&#Ztux8d+O==yDb*V6#Zg4=3*xL8Y$@m09z^dDWWeqgrUho zm|M2UW0HrJf>X9E{)Yll`VcEBrTBMp-zo?44ovrYJRcsXKFvU)kR>EU5CD-prAmud znJag!Rf+a?>T9OMN}NHnMY&beXOTzqyA~7_1Fv&OcUkVL+0^xPqpqg~4RKBJn-pD3 z(~Z0#NxW2HDq_QQnqL7dq{l|I{KQMq6$o9w*r0cs(As)5?qxr_@|W1B2G%lp4dZiI z5Q2N%&Sw{}3~maWkFaC?W_@mtbfm(NMQ~9+O6||L{$`jZj@fCWC@Bsz5=ZHBrOkUX zz$FRY)&rxFNONTmQcm4*YkKo|GLMg@k8zC3k{3|wL(Cv*(f%F4JTaZ1k%L`d`4F)Q zvec@nVGN2&sCC?XGsz4S#}lBg*4VI)1gzUsEcwwGXDumLQ&>k>qs8Q16i$9(y{3I+ zT}EtUT0}d$GT{lkBJ?Lqdi)t%Fl-Fh@I*f3+$jt^+7|9;xv3o#NoW!gfBS`&tRI17 zTNc)8D*(yOMCctFPkqBeK(ckt5X)7(XNJnJ*2%_1%06`pZ9?efi~%j4KwKYw+G?&P zO|%9hv|(Cr`xFIpU<*U2KG|r;j~`-6-VsVfa69BR5bshh=dZXj-|I>}4`A?`qNvdY zA4u#GGh>Vtuk^jsq+cVc96chV%P=!}6QrB=1ryF(F~*<@15A zXx4~v<0l2wn6L+S1PEG+^b6`HCiW_=O$-%oSp=yHnWt|TKIpb)bB6pcy{+J;x6%;5 zA_CQcie?f@V3Q-CFl%37>a5PTiC(I$spxeL*$}Q>ty@oHNU{$Zp@U>WtOzysI{3wD7Wp)2P{FG6gxoN&!GU5=6quH zy1!+$?(L^sCzp}Fr|PZu^tZY#=UMl$+bx(!yy5M9OJ7mUpp+sTxr~_5XkrEl8ul{g z?L4X@Xo{oQD`RcBjn%WNp}<-C7XwrolaMxyPk#Li8;WnGg*%#i5*a6|Vlnr$T-)6& zs6=~>dn@opS$cc!qFBk@lYt)2}In9!2kI3tc5lWfzv2{+}W7V!91s!T+wsBePCjx7Guo3ntyHWIBXw{tT=r~P^&YnPtg6|p3;M&lXX zv^5jl@D1;euWKJnc-9t&+gt9OL6)mRpczUwtXU6yyo52mvY0UkT!jRkEy~HSPpd;Y z1JKbZ-kl3Z+0l(N?C`$jmUm*G6%>7egH1@9z-`fY#a<{X_ym6=0vB9hjtJQKyTS++ z4wGN>R4i~sE6?JkK`H7R8J-R zNLhsiosgg-t3V}IIe`u?aurimniRz;#zn$)!jew$1tfS1kz_@{LT}>}4z z8?LcVvypLAnT9iUpLIm=41eW>H6FA9&@gu_Bx{pEfmUz@-(Ks=t7w_IrK{cc5YtO) zXWIWXd(j?mH_!gkVS)Xr)ogq4FBx|G!^5ol1AQ4YHq!2IJ=0pIZnI%5wW`1my6;B< zPQH>RvS~Qb07WfUM`n`sL>YR4x(|07se%f<)Dd)R6hRt?+nG9TjnMAGgoAEWNp|3W zrhd~Vv-ev=O#q?}sWZi9&!rx)(47p5^}77JR`*0w2|9_J|tt8E~}LF91C$^}U?g{1J#@l9-8?6gp)IH4=NnT8{$%)?u%#hb3mmK)ZOrFb}KK&wIniipYYF_i5mAtiPafJPD8L`EX zN-dQhbz4TMHC-e6IkIPAVKdcF9uh46zEqFNl<`F1@RgkjyBSiULB$CedH2UuhpTWK ziTTOTVpXtIp&oM!7}0rrM@Wc{Jrt-`y?Qz6fU~3p&V9Ji(*$dAd)5$N*g*<(J1Nj@ z1d(zPaxz|FrGKznU`(g^IowRi!EVjojGqhmz~@#t__kbNxMKnrLeCfM;Ts81;1B(Q zA!fa1e`Z~#qK2rGQQWKLOS`QtGh?5dahUlpA6WO{yX=ZPdST?4PJBfpdklcx`dg3BPy@S`~~yqz{emH$8c|r1Xf zS9Y{nu!kMP+pGgA)GoADHGOH9HJ`l)qkM!W4i+5WtdwdOyY2Ev>^DDYXv;>ov7D?P z2)nE%_)P>L_Dq0kc8rJmwgL`EnqzKp%!Fm>G+szc7y8m-r){fcgb|ZiNcBQ~A0jU_ckWR=LxA*#3=k?Gz&N+Y<+f!+&aLnLk=k ze$Js<%sge%KV_u;L51v}*Y5ySl`gBtTTs<-EyNoxl2!x>4ob8t6&jqzVM)ltdnurV zPLPS3$rw_zbpn=%$}*kG04T8h2e1ULx)-n9m!4B5KpBCcl&n}tsj*TuYY4wy#q3~B z7dq1fTgs~eoM0P@T38x8^tiGEnuQvtUEZluko1Ls>BvcUWj-@xQZp3&m?fCTNo1x< zWrid(bzp`e-{sm>uNWuoeWgP70=VE_20xuUN51RihjwtwQUY8Z>}|~FF3Lu?XVgX! z)khIEu=&beEfPp)ZRKjHv2A>PG*3OUH4F)vKskJJ*nWTO!>Fs;_Q+G?tmlg#TNh?i zG$C@`oCOR_`r1X7Y1+ruhkoR{?;FL%ELi^8{`72yWe}bp@%mTRGT3YP)7kZt{~l?f z>pBt+L2b#5UJ+T@5p5*pE7`EPE8E$lf0<%~rhRUii@6SlEj_D&d31Rx7!t#4VJs3D ziDxL3af6DF`+-Z1snG*kW7waWFo|?+D8k-`;-R+GI5eHJ!dJKOwKFX;^hE9l_bXTV=uU3ye7WR`2YR&bOv#-UyQ)&B}=Ls=V z?5?8s<>T6VIONkkZ?o`gH{+-dTS4BZv_8sup5y8TlkwV_DqQL+zTohaho{8 zR;HRRPE|9=HPnbaSx*h{mDT(q9$mJ&TlXVCh6O9IzkDzg%I zC4VcGAqO9BI3081564^tGZ9O7i5Ya8=}2>l8y1FA^*Z+uJtA_YjH$LH%C{?nQ3{EP z{EdEsV~2C?(4rysPI^l)Mecaq(^yB+VKRGLB%ET{x;=M1-k-dY2@P!rp2_6CY4*fj zkAjxk_TV3$w{94`&KSa`D9#qtyS2uNYcu4R4Bx>wwn3tUyB;e8EVQFXoCxjt`vX&nj1w4T0)0R@<}P+L+9 z9kkk_S@x$^vp>5C5;OPN&mI`euUyBjzVcDl2tH|ZhcUA|ySMG0)RLGTwXPVr9TTxO zXoBs6laLf_2UA%NC*dbY_;E}v`A;C4B@pqwf{sr6Fp?4c90Wi6CO(6n?Be(-P&vyq zS+eOu!*v_5RqKcpN?|I(z6l^~CN{WfX0m;~G24!Qu*vd|?Pn;`#{@aPBrd20Cro1l z2gS%q6&5JXBQ54*VSa_NGgw-#ck5wuZAow=TYK(>$6)^Phy90r` za|PYG{4*+|j;s>Ul^>LNSlvT_`~Aq%*hsF=Yeunak4k_go!P(H-RvLB57iG%ovyP@QYl#Mal^8XDMJF;3? z{JT@?+kV8IV4*D$2UJyztdn}<gT9QCs z8ZHhmr7^Wy8Br49ue_Z4IJ}fn{uP(d?nXg*DaCveLK@0L+@vA|@3~=*ug?;!BC!+| zXLvBAGG!Gp8KoExoF)u_3>_w~gir`41|yb4eg#*hjtxf?@eF-O3?LEv5=B#me&fI4 zURSDK7t(hKhn1E^VN*F?g{5VTo-Lt(k0#rudC}x z{H8#QzG@^-{oHy^`k3vP_Xo&}Afz7c@OVSKKqy&5omoy6zu;?u9pAl>RrZYJV{74A0$_Os>|!nY)=?4^mE~DA z%{;2pfG$M zKPOI+2_It-FAT|TiU~WZsyGGOQ!7Lk5Q%{$RbUBeDzXmXLQm>Ot(@eexGABy5TnJ+ z(h?Qk0_cB-rpi#o|Am3_*uB3lUeFW36zOn4x~Fuh#fsAhhRH0qg#0o>IwjPUqi?_d z{E&UNajLDF(FgfV1S6D#LfI^(zXg=-{2|mD*)7|7QgC~H%ot00ie4F@cGdOmto6h_ z*7Zef6kQ3eiM9=#bl7hE^$?!dXq>usPn}H5V(&{Y@SwDB5;c9jDRCGGgoaU*+7HI;T~xj-}2s}2WDBS2y@-G_Zve#0cH;|#$#>R*$1EHVto3(8|?yUn-S z6WLI6WYU69tqbK4ov~BxN$ILQq8W*&rhL`N-Ii=28;m}@;oja>E#WDve)-e(+gpBZ z!#WJM_p%4j-qYFkPHSqrry$or&yI-{{!E~R2-N-m2i&~2ML+;$0clVhNBTa_KNP!2>NC^JRSBcq~TU7fs-Ms_J2J9%5pl^bz< zgu)fXD7H*#Z+lnHurr6(*hv}<&#BRn`7Z?pk!_(`a#tWo359XmLf{n#fdpNRf-BZLi!A(Qu)N22)OZrs}9wCKIpZpUWou}FoK0*aL} zi?C;+^{kMnuU@)wr7$R6T2Ox8^00dsPyxq}9=0Q!XW6=!1`%(pXB)9~vUftHOkSpN zI6E~ zIV8_z%*j?g#{4hYTSWO1(l3R%OLSl`?Jb46bB#m@50*zX5Sv(4b+^Omh#E$%>`?Vy zP?g?q=@HtC)n+WssA@x>2Ni39E_OFcF-08|kWiIvPlAPg2o@$W;;Ak33)q%=(5`Kb z8>P13X2?m!R@#yQYeq5P&+qGJmsMkHXWYZ~ldGSyaedm`>siBT2ySBsvIu!o$FL`( zog+~WmC%?fqZgJ9tTcZ)GJk;#;eWJ&4#&XZxYu8NDJIb%XF4h)n)jyqewYZ8KYDvhmyT>9SQ8xO95b5hM5o`4!oK-Sc2)uED$^k z0X8p@;zc|P-2m8eitrTH0HZ&~%ObFJXK%4!=C&{z*q1F#l~KIR3$BRC2$E4m`Zqa_ zeP}`ymWAbXu9N{wgv9A@KesQoykyI#_qEl6B}m&0{&E0fRt%EaI(c|HO{YZyXWBM^ zS!*X3rI7jdxPg|@mEt!{VfBQD_RQcl)|Y@q%G|^Dmw|8Cp?ZJFrDndhgQqRr&kN9(& zC=n_Q%72p(%~oP%p+Go8Ak3%$ArAMYNaSu^o2q9s9FCi~8*C6JRr}`Xtg(Tb#r1S9 zE}ziRj&2ywxQxwq`sf}z@$FGNb>=wnKt57gxkA>76%aHk;J`ZVlXf}}7M+OG#1d<~!`BqMdFdE5e?5 zr97fEqP_+t9OBez8I{fE;H-aSjN?@vFt6t1-))>{mIB( zkc%~@PFdib6H~7KSR^7TET;*^UZu<%!z+s2c;}1%$09aZPgE-;P?=8(q>R78$rGR2 zhwG-=8{>O`Uj{M}f6n2W+04b`o@6C*C=>q0?(FiLr9U$N6w(-9MKE-7>b z&E0k5CvPntCCNKdj->})WJDdmz5v5>+}8=U%5Nt#oT>eS59vIiB7{yw#YtBA7!l=x4@)eug zRN2m87dKmWbF)Nn#3jT{+%pjmGjjSrLsaHb{-R8zWNRfv=Lw>bIyw1@+42<`3BxZU zWlKN5+(~XI?B=vl&#JB=U8n1G5>_`*M7f4${#8?Z(g6I5eRE_#TbvKGWF_&*ShDOP>a$@{GDkxOQ zxUwR~v|kER`G*mFMm5=w=KFr8U6+Ei)r;_h6`jssEt0rl+rMPA9Q0;BZk+tu>-6Um-B_oR0VK69j6>e zYB8>ONGDlVM`g%8a$e*q_!`2f9*OSIkU3Vbj)q?!|LQ~gVC@upV?rW3LMUxeMs_QK z(S@?3*+SzYp)plq@oSFE zzt6vE3exw0P6wv~w%rrkMgpO7Fcr}eO4rDc&Xge?FC0!6ENALe3C0XT@P-ZCtOtjy z7$3HdBC#C{N7=>CS;@(YyEET@Y~P&z#+TZa<{xKYC3s}ca4}u$Q5+UanW~GOi&9C2 zb09EJ2t3On0>c8vjLJ-wupYQntLh5=N_IM*+;^d}(>|QoK@}6M3TgVHgaYF6p=d#+ z%U3VXcMsG3N=Kw)*Vk1EgTY0WIIHiI(n!Hhp_vE(u~Q+*PpQueLk2iP0--PnhVr?` zjWC#A#7z}(i|&$ z*P<7cVwTIW&oY>@pLO7Xl9 zdOBSf#p`DBy4$BUvK6#%ElqD_KfkIiZ79Tqo|$M}#_pz^g%}b0gX3x@+VJ$R*xSK!7{0l zX##RZy>=`?ey?8U)hr-bUwcul%$V_gR;%r7G8ta0e29c3%PMBDByh+|yOynVArg|e zR;g|G)M{dL$1;p@a*`dI*~0el!R$@%VEZ!=#Nw!6+Z1kgPHskliZG}oN19G?yRutQ z88$_>m76#Bauc_Q$FcHFPmrgbCa!;gPtTgkL{b>S~smo`~mh^4)$G_;5Y!rTjNb_%}}RG1{`vV3uJ&rGE5ky+K&AIur#w+yX5~ zK_?WVw2N@!qu7sr^@8n)ffn+oivuROfsVmnYB^Q#clS5)X+{jOs#Co@+)2bw@LI%B zLrEo8JxT!O{1wmQ1%I_;j;)@>(zY!MbcVDMX7`lUn>h#BUHGREr^5@qb+Wf{9+mN=cV_L5AUDRxNR&rN6_jIj@z z$P|+VF(wJ=F+CLaSLvij!V(SB{~e=B0lwUw#OZTE{k?a;;rR`7YQef`BgJ9Yeh%Rlpl73Y6tg#?;Q@RM18i%rZg z&a)Z{a4FYQ1_%^(E>>U*_$a7V071BhNesP`$6W{8!)xyax~ z1C9ZqGC~mrA<_sb%_Bb>d|`(L=}-xLA>9B8NT8Fm3Mu!i{~(5%?zU1id&zl1?ImTW zd9IYfMrEg%=fHsp?B7~iK`|Gm9uE}}H!kLTARC3|UGeiiA!WkktpnsDt6IcOA)jNk z8Yw!ZNS~YPdVY{;5_?dKTaibO)DZDd_P=q*y&686c5+_@DvTtc@F@O8eu&K_K_p7} zAPBQZ>*J%rIKl;GRzs;^(RMTjS6c9`ojCfD9os(7b}mY_?NcbkRqj4BABu;1s}V%pks&3)JTU$`3b>`KO!kyc z&LX}_>XuQI-j1e9qc?E?%@ylRn7!jWUs^H|@kAoyU1xp7jLi3~`P2{DTKkE0n3qc( zRE`aK`BQtO?TdEB<(>IOTi9*a+;6}8uV+|)(cacg>TSEgc`ga?ozq&{j;RpGUP5!# zwvTUTyC-)dyVDLs-G=;C3)_|5+(a4T4rvE>^Ie&2o6^)~=oFGD*)z43O>=dkS7x{p zals+!k)czDxF*;w!qF+LQ>wV;GVzHDI`;6#+R4`)df|H$+i=5g5jvFJ+TP_Q5vOE7 zWEULbw+aqU;b!+#Zg%MI9&RS==l4n9$L~8~Kfea)F>dxu<3ISWPKTy5`bv}}u_KWq zT8jEK9+dTR0k=%4q9vbK;x#y1MNm~WuSuc8wHa;g!-YfbqujSF|Fa$T%~$VQ!I@7% zP~lOlm6uN;y%Ji*;HpFuim=F(G|4I}(Im^QoS4RQX{kyP9!vr3QlNu{haxNHbm*ZUu$6l__&Y@~RU!W;Kq^Y2 zVkw&#=>HwcN5yGdCJa^{>6YU*?8@rD zA@JCV+yQ;YRU26U=Xcn^bu9TM_^+LH$)wU%T%zQ+_S6niHjfT7IYlYUPWxJ4-_Q~k zC3#xTXSLtaAJsJQowID0P^k+gEU;0pRk%UW-gB>hY~86r>xR?QYWm04oE4OP=4`jV zb9dTr>rKX2BU!s(m2CyZd#5zCgEQCw zJGC)+bljosQ^EW$Az0+%9u9X~0Q_m>0K_`e#XrG5ZZZx`5mmq$83(eVkp0|D-^<vcP`3;hkN4zI$P${k)&(OssN%AMpP4 zmT(6@{E%+;b1&G-FCOSQLME*&>s@Zrba&!^BB4-}gaWZpC`v&qrHr8;LGuoCj7V)@tju4 zI`iLnjAP^|(9%(RZ27&Gk2z4u!7yq_lHGjm*X`Q=I^u`e=YO4MskFn6VXp8))BsE* z*D;xzfY^4|3`H6(l0+B9C{JuB)j+)ql;NyyxzBrzep5i7F~PzVV6BJl`S!x$^O< zk*qk1DA50deQGx|#><#7exYEWU8&2X9jVM(nkY|gr?0)MhIx_XJLTSrL&5=}ld_kw zxJD&G%79AvTtOgpkabZOMJH9I;Mw`@FG_x(NW>u8hr;G1VB|Obg(g@sA1Y4}e-x3a zw4qz{fo$?muW(eVjJyY^X`U-5eSb+{NMi^pmQ8C>4MDwv8RWg z%NS*1Pu44nH7N@8D48NKlhTQH^IjB;!a&}qSL_MjeWcXq5;i`{nnA7+ip5v1Z#**^ z54_-5Z*~+nikc;z5EOWIpj+|Qi3~r0mSlY@?*DkV^B}zq{fyYtx~W1@F<5=h7CW&u z#Y#6$;Iuy6yBAdYwn{*W=-(KBldwT6-LzJVblv2P@t7jn?Tq7`c5goP+?_-uL#&MN z6<8imObqM`A7`KpZAS?VX})hs0Yyn|K21zRkhFozG;lJDFW+{OdFIo$pJ)39rd5z< z4Q8qcLbG80zc^pMpibe5)Zad+Ad8xbsq9`egYWYRv}V%}b^nSSZx9}VXESP5iA`U7 z-iFSHF5jBL8=+rPO~G_oes|a__Ja}Ii41R}1md^$?VG-Ccl>~QpE(n3%c3Xk?WMDr zborR&v-@fG(lM5YhLD8F%^b~y``94D67~=`vP!4*ywz$ zDy9M5obWuH;eXs6S8^{p8dXHm#sfHEGY&}7=3S0{9T#d_{t!?;eicVXnnWlF!yx<{ zh@w7z9VuNzY8^EyX;!{U6lJ7ny3jJ+C?1hWM4~Da(qR$A>T2(xX0m26mCoDK~Fxe7MA9&IVUz=swkmc>n z`|T|(oVP`iqrk&S5me}E1xyLmN{;lC{F#LkFU#Z6Q}7{}UBPHJ*A z8pKomoAfuQFRC|}5C|)8OToOT)o0WOqN>TgwDO$WGv6-JqJOy|-x`}vqgc*U{aD+3 zShRD{x6w|bh5#i@K@0+21;gDklTrJf93vu352mvI6SX6Q%mtN9#pZGJ3716a6{(L{ z?4x?*u-69hKS(ZhNEnd@`xeTm5~CAMqliLzDaAnAkx84`;t=a}u7XUzstAIW&fPGE z)AD7CQ8;#V#KsXLmn5P*akA_t4_Rm!(huk}Wn>1+6ow~FmMAp1h~bJfNf+9r6O9sd z!j`DmBD5rT(chQcNkeB^N9TF&WHnHC=mBDOC)DX6gp%*v%}YATh{7ampciE{`knPQ zP*JqWc1x}CamMUmlolE%^n~?GfsMdrkLIpAYv5?;9DBE&%NBt}xbgO)u;5Eq1HmRL z^2CkgKFWmdj1u&8)Nau`_OIh#vT-DqpWM^xagwSwHAG`(~s_9km@VUY{_D51R>IBDy8qu$RqJoW#5~!nShAYa+Hi&^llq`%LE(t=vy`? z;|zoA7-g4n%4RG(Yd^a01&e-6Ti4ua*Cvq8CsFmO2z#ve`?-CIEi1o%{g3VYpZX{J z`IrCA9>062z3}8b%O;pQeeG< z&JQy5_W*9Q0CcW!pEZ-rs;e(&1G=-`uhh+f)`@BnR5WT|nWb1}NMjMyJ*4w;2M3NU z9*=W4TK?U2P&iRYD%sa1N4OQk!50>2k*nJWyz%c;gCLCAXwu zh<11KZJty@%2SEQ6m8+wgu_;P+x}GVqGpJMSYlaCf8NKW8yq=d$)|@e8t590ai>q; zP&`M(BokPgM24>fN`jct$+eInD4Ncmi`Ksr;&gzSj?Qx+=)85ookbn(XKi3Rw{&oe z?hPMxk?#sbQ9fuSCBQrrb{PwZd>JlsO!mZGWba<|IPX2M62?^m3<3_ygs6SbG9_|+ zvP3^G2?r?(j&O$fo#noG^9H{-RMu^1EJ8M|{7xyRkUXxP@4M%h&!sbeB;MV{8kro|1f+3vbg%c_Apu709e@M5d zUZc7O0VI2P#-3)I1XVn8`f98`Jl3nB7OYwHV`*UY(|Z^=yX}JAL&fQxY<2sGj9hz& zz-hv|O8dbOG|hEtJE64%&2z&)JY&NjXYY&+XWYJdDC?+=U3&z*q)tb+&U!rG{_eKb zcFj!_d8Z?Z`iAm6y+hUPvG=S3Ft%C$(#O7J5B=dGE5+B+L?&o6f`m62qC5pCIS?So z1}sNKmsAmFSwRLuC!dR;h)4(f7G~t>>M7VWI1ghw2V?pK0n{mgc8u65C+i_Acx4&@ zdeY9l9a!mJ+Dl%VYDc*JB-YI-G*VEEYKm6yVwK^ml2y-NNe+=0U05JRRLHf(g}j3W zMfz#Qy2#Juj#914Rt>di!E(Yw37?8p&?bhYRGoIbaLO~5K29Sd0xc1Nyoq3?R#6d1 zGALIIM&#UXpW09BXTg@K^kZ&8482MF2s`1xp-%cHyQ$mi?AAXbaNwU{C5>n*mE@)4Qj)%1(`O2QFG7l)&cV?q@rj`4v|KXC|=ANK@07jkC+ zP^f(bA*me)5LqbKJ9IU5_DIeUN{KItLQi`Kjc#pcn6-8e1cC4NDqGmzcAC0iSfpD6 zJuGMgPtmr{YA6K3grTUKY#c$C`O##-V4|1lxv|7Yg684EEgcCTcX&REKf1HOq)aTB z`ap=~E)F$C(8tqLzKRcJbo^W|{CNK~88cN%NF2V)068V(nyA~WK3{B2#XGHFe}%<#0&PR#CgR5d^sEr$_DmQ^2sVp!n-{1pR&cREw=L1?Z$u%bcB__-whGeA$KhEH zN7ef07ucAgzq5e==!S%QkrY6O8o30YN+mQ<9_T|nDDz9a(|#~^3u8w+ZPuPno3xb? zQ{<_pka1TX?O(#AIjc`-73(0=hCSNscii@Bdl(Y^j*&IDt9vDbj+J#)HfMRc{q0ZY z@uS)Cqdyge*ABJs|Jzc#@42&##;#?!7ERzQb13d3p?<@VwWsW^tZZVpGZgKfx2a3c z*wCay_K!o>F>z#t-Tb3x?3!=RvO$cAy!Ok}?2`k(Zg=1Ih?TB?1oMQWI0yU&c`HFs zUIrIApyG9rCS6cS5fma)NzZDPmap52zylBFBAbiB<*2DLKvV+M#23NsB!Z@Qc=1dCNjJ$g94yAU#0fry63GbWMKwjSx;kEl{g;L0%rbUf}7lf3d5 z-&JE5JQVW_j$ko}t`e%`)s*J1><79MMwHm&@HmBp0_yB2_ETy~873!?luw|n_<$}l zQlf{nOb4-52MVZN3aASNb)LZ!gFOjik08|5aoRfDD=nqHwE_m|!dH3_NIGK!+dx-q z`x$EmQhF`Dwthy;diD})9CTER(CD9OZ><8qe@LgWUY|cjZ=Q+Y-p%Gv8Hr5&Vq|jg z2vP3*IF?A^lc#t8N3uy&N_8ouwAn!Y1*H_PT*VG2hHR)mZ8aB>Lgjm{@byePMw0xX z+DcA6H`JaJZI+5LtHl_PwbB(%EYQ_tts*+Zr)ia{+it1kTv|#w+9{5gV{~M1PM>W{ zW{;*%l$|vO-eY&){i^-?*X!)N|NOLl^*fI;Rpkl$&QBKD_lK;qd)Wy6$sL_c1gC(9 z&VcEvAKb|_Ae93uIrSf+&L>48wcE)2(Qp+_eVBxUtoaZlUaht}HqoNWAl5&wEVPNZ z$9JcmvQPc}6zE2|8*cF}*A2B_jDEr9XVuv4D@qs}R&IB$V+7^eTnk38IcC8fYfoA* zgh@v?Jh(g`gQ(OVSySbskcMSe+Py2;&VA)M`=^`Y zHDj#k#i@37*JE~m_v2Q~`Y87whB~>c$fxrXMJttB8wP#uwIU%<*Ny776t@O*oy_0z4*)1=Z>z-3X|J%3)-ssWQi>;}RjUxx2AzU7ppy`zPWKf) zQQ;K;M35Pd2R9T!aTY?fmtRgd>oV$2c} zhZKh?AXBbBIj)GDLQ$!qE~c#!%C%!PBiFh}Wi~cc*`?ZYHip~Hq=V&TWXIS+VhYup zsdD~#@#k5=1-F6nS*^SXC8AXrmTC2@?)`*TC&-n{n2-lik~xwo*OTm(r|!2;Ui&+{ zssFES0)vk-cK=UX1Y=enpzE295SPBzZS!Akv(&wpagcFy*o1T@#f8(E#_sI-&pz$r z(HOCrkTjL(>k*=`yEj(YABnz3FDXBBq zW)$f+X6TYzE9d!r918SuPNbkHlQdfKO5RwBE(%uhqsz1^Urpw+5T^b$k-Rt}%i}Yh zp}ca-izxbHHm^6uvBpT0B69DV{xuSuaa7$PRGnl-+Z&X2Wv?A)g$LQUwCWvetSMoK z+$y^as?;vk-9c{ZvTRSKsZm1^q5D7hKkk85Q87fYBJJCynV;G@G*nR<B;3-Ruw7!R?)3rxU7aNL$P<`7_4!zY~y2 zIe9U2kH0Cd^(DI$_Hn!^<0b1=tAs03V0f?+N6v-Ia;7`^sR>Ggb<&wDxgu5to%qY1 z-s+U$j7VxH+-gH0wZf=CYKMy|OKd|GwYF8T%L(mfkV$lEYc65tX;ZPKwQAMe46s^S z$}O=8YBfW&=C&%t)_Hzn4N_1c9Fi>Bh5N5Cj%)sou`jxf9FoMDW~WYegTIMQ*FUDk7!DZ|jpv$r4SUl0kBcN4&# z%Jb*!S9h)^UZX`sQ-biResSN6K(_kE9vwP|s;03J z-n4Aa4~IbA^%{Msy==e?DYLm%)?qQTi!czRsyNI#aB{2r5`bO(8;z`awl? zP^%KlC_6*AWMi?l4_nEOxmNYgpDcg(96PvrxV=tsK(XRAiUrCc*J<##P(Lmx08{BY znWQ_b{wqwKUIVoDES+fCTjtwZ!O8O&?i)I$)=NkER90+lM)?CMnr#5oapvpAoo=oT znZ0>w^xD;t-?|piYn3xr53a|7ID=tT7Xt7cMNFdVJ$qYrKOUBiL<3P>>=T!pcy;|gWuj&)y#OesWHL@HWNm;0UWnoI0*xy39MRsxu>(&8xVuYA7J zZPHu1Ro|2KH+I2ATNX@ciBWbc0fx*r8UwE*jl#7Di5u<@|S1Y zI~3!}cJfTIl4mJO;Cm5FpwwcT?;yG7Vsw$dBanN)s zi6&A4@Hn;5vnfN=7zX*@UO1gDM|`a_PHHUH?$L|9cXY>%>IPS=IF4as_hsbMEm~>g zk!j!iNs3D|Nwm+i0r2pYTwAdB&vrlCkN%HU6?WhHLPj3tVnU(C)}COOT?WAicdX!_ z=lWmDHy(jd9$M#(K2#18cqY96DH0-WRV+(*gp;ak}Vtmq(ZyVY?X^> z$|InYKyxrT-SUCbW_@%UM4B`yu(U#O4OV}(0r*nXgv!{00)nw9dsoFAPkz6JXE z$#K#}N_oJdK2=uA15?8cDv6Yh4?VSDPu`C$==t1_Pqnjn29gb8mVq4O-^ z6c%SL3Ce76?Ehs)Q0vj-l(ve8bm2le2j6krg9KHxX(q1*MEQJCAFQj1{cd#a5*@+e zoiyvyFT#lUf>jS$<^D{&T)NlVDPZZQ3b(a|X@zaHu@U~fNA_QJg(8qgb!`5I$0b$8 zk)*>$I}Ts@GalG~{24exz|?pDLh+I6wna$-K)+DoGzX}TKaOlA>2SC%tEK?4(oL-- zDL6?lK9bCuwofiPv@I62D+yx=*of*e?sC z`L*=xx=Pbbw*=L0s6 z2|gcdL8XPxB7n}be|}r4X9Pph@1B8Y^kp0Tjajzz)puKL>pfI>HlP}tfn6!1wjo}^ zeFUb%85TE^Ky`R#0Xsbjl-lVfm?&F+*m9x-O}e{oJiEM12CKJ?*}!Z6%zpFv&)Ey} zp0LyFXop{UH|GajD?YAboUBy0sS3l-(^cOH+a78$9+9GZS1Wi7#Ki$s_+Mv%Un%~) zdPv^l6>?vmWM%v2TH($ln6hG&^)CU3h3Ly7C|bOV&a~B}3iQJwdZiStT;v5pUs@R# z6hm<##0FA-LFt-%EHQ5-{L36`6>IOd%B*{A&-0V*#FnQ*0=_8jT`PnMdb%P2>bqd2 z?~0>~R-vc_6M{u=)KG9R#0{02uE65@k%LjkDPNMPu<-ANscB;pBj)Y6K5{PW#1 z2EW71kK@b8d~Q#-w*2kZ%DC39`bu<5EvZNJAnN2j4=TZv)Eft=7fpIWf#BD#hXeC+ zFZrlnCU_O=sPQ2Ss1>d=2WRZ))h+Qxtymw7OUnMSbYN^KY_AYPaSDRGAS=~+ag2tz zh}ULbA(#fI$iOS4%92$+$xut8Q<-OBM~QeS>mL6e914YPxJcvzt1UqZ!O*=|(b+kO zhTKb(b1w(Ky_Eubpws#y(!`InBw$~odOpzJ8Ti70(wqANt zCd(|mdCbEvl~S)Jxn{bJ+$ex?`}VOO_|MOi?|;?xY>R@ zYMnj0`mAZA(`VS#euk$tX&&C)Y7cIxa(0F20%jq^M#f3@a3=p6cdaV3K_k~@+bHdp zLo4vZG~a!eG=@Mq=EvW+UFpeIwtASuOdgjgmF6@n;-Fvl-_p$Wp3^MFX(X;K(kh}C zNGakXPyl;f+3L~!fRR*cjkKd{M`O}ILUq<-RzbzVsg+}_gbJ=A@{xM(qW^2ANz<+T z2&T!{$P&tWhjy~^6o8lI`AIJ*qoRFqDJ8;XG$NF4oJ_g!BrBjcBpWYRZeccORAo?) zqUnynv%?dO+%Tr!&I-7Bg}e_!;8C;6*Wb)LaV)J*T&*2 zP23UW6f$daZ7ie}x!B>fSK3A1S76SMk9eK8ce7nV;3X?B&|isxn8^D;Nkmj4Pf#N< zKpAK|(W{^qv{It)dBv~>t1pIaZKu4JFjnDddn-(9Q6vk~qHRq@41MCCSU`)mqVihm zVo+Q%ns!812t<*vn@3w!u zlGQ_AEJbNvaW1S*3n%*mJ94vOoC^10m{*yKX1+;Kng_mqo6yGxk4lv43&kAQ!s&uC z?mXjwv_|6;`!vw&mdZ z(#>%f6T8rNYP0YT(=ypVK?Ykdo3pWU0H>7s$! zWVqlTL_K@XyqlE_7565w0m{QKR1rN_lMuxqe3gAzc6Hh!W*(+eSN0V7jCqV&namau z(ti?ylNgsWEQ6`wEA!cYsL;QsIRNh$_WsDWd;^A4i7{-=Nt?W^k=+LKXuaX^r<&~X zdwy+um(E8$W!@V`s%c`Kp9dns+)@G0Kbv%YO4~ia^bppOrU$Rm%H>xexP44gOV)o0 zJ$ce`C;5JyVDy(T!ViwPH0Px12R=&F1?ie1XW#Jlyi|1Uj;>L zcsqV?`PzFeF(2F&d=&0v*Lu~TC%^lc=i#g{sMBI;)&o?FZJNN3+BDgsC7Y&N@y03q zF0e0AAXLL=!RiOe36CN_Gs2rc1JTb@5-AF0mq{Y-aPLo1?v2`gM~TySV4Z4lbG9X0 z_2JcavHTE>E5uo+9uuW=<-I0qSE-rcD3g*Bd{mYdv*tV+IXs%kfsyN6eIB_}n!)kLyvw|I^-uU>U zax{)QxpcG-g$*-3`mSiU8^121f(ato3)WvkE>=pR;tEf3hRIG63xkya73kWUiz(*p z({63ZG|^5xYpKh&mP;p1ywmsQ+7p(nMY3*5XstVGZS|*kc#c0jXlp2ddi4sAwb23l zOi420_KAE7wmn0kT8>2R-`Iu1dw=vBQl7sF1KOC6C5wU6g+5TB&%HcZer!l^)t+^e zPb+-WUf{XO=M$0rZz7s45ZC%x7p`<$s_x|^CEE`OM!RSXZ|T4$s3*it?1I{LfUfFr zmL1=|z=~g(Vka^mgi(Ml$iw2Mm!1n>xkgjp8QmbB7nIk{YN1Lsoq5lRc`HNG;avrV zxaxyTR^MZ#80{MuF0dg#{t-y{jomY9t9|+_N%qC>JmGtGOeAU*;)FWwc&2v2P|#^Z zYR4SAQWLUj6A#}(EoB;=%E5GU7{QEPtOPvAoDW;|;Vm}_c-qT)2EEBM$b!r!6nzTd zJli(jI?d=hYi_w-3Ycw&~~fS(_7dg zVHv;GFYLza@3PHLK45Pye-v4KucrrGiiu^ZC2Q`t)FMdpte*w`Tjsg6TdU_@uTWB+ zULi4`l$@eLeazVygoV`CXOsUp_sR@Avw0G?-%p&%Yj z;l^oJylI-1yfB^nr@FWcN;XU&xkA{QOV}FZ5>qo_n#7leYDA>w9Br=Lh+f&i@96d~>6@5yImD)?sROxyyWfCpYmCb_ue3;v6_>`Om!K8L8W9kxLT%4p z!JuZIK9=dABI>~gN42S~SL0fwN}On67zWG;M49fU12@fEW_*7V5i26&Em;m+=grWNx=qCq$OVsNeWQLQR!<1m}u71te{g9Im9wmZ;^4$9j%| z+iS?V4c8ZKdIXv-YwqJ-2SVH_Ms?G1)j`#BYil)W6l5fjY9#zTfAR%8vMtSyV~)MG zlsbbIcUdU`R32_nZU%<17SVzXV$zjjmP#9PK$DksF7%bal`2h^szYc~E*Bf}BtB$t zqfhwvRPJGL+1jC2o^`kFd_LKd?os9Izu7;0`!T!r6A#(<{&k5>+t{MFgw~1p3vCW94aAmSgJQ1(oR9Y9swW(s;6s|;kHG`EmNFUYj6NnCa4v5_`>o7iKL&MKPv3*@MrwD?o<@&u1vK$XFcZ{L9cFj0Axs^zF2@Eu zkijnNYfjr;55L9C-BEVSwcoX$eQ$)lvwSjXfoXg)Bs?R9z{HcADMi4fpRP)&$!9Cp z;yK-t=D>?1C#qF=6Q6ZL88WSckhBy~mFd$iT>XGuQ@&|D;ovwcBS00W^msi_#O$Nj z@;<%xA%sbs6@oB%Z0|>yw=;S1v-g{NZ^kup)uhezU9w952!)tyWt-63;#orBrWscB z!b~gKOfx0lgHqk9yUM^?$$C^Jl`KK=y7BC))GOYUc0QqTSPD};8eOU%u%kCUG1RU< zLG{Q<_GLOm*5VyzA0OK?7tOZZYRV2+>xCoKd1Iqvp{pM2GQN;@lGSKvg^4HuY%nh( z6ROZyob1)uSwb_9ZK+49 zX{S$7vW;DM6Xm#dV%N#S>lWaMLc4$*@0KIV<)p-=$JL@6zqZ%8cpMsjz#>~e?MbK> zNa-domra){3tJdNrNtfnw2CPYbF@nKm6NU%(hV%hx{E{@bJ;T=w^g%;+2DlR>=W0q-*ogY`^oRt*t7#} z?4E|9D#nDH!}L09y*UOSk=H+#e$en;-+3B1I_?Gwcd8nRQEL*fGZn$5xO6(VCn#M8+2YVJ&+T9yP+PkYf% z0*$)YlNwQt10D|d+^CC)hRIIA5!9Cqz6XC!y8w^C$C=qK>Hi!1 z-e*2hxal`Pz)7Q?7Z4nB9@gs+4G$uDGB`5H*44_>L(>#A0b zCg&=;jb^&UNXsK^Em;q>);)kemT)7K<+~`Ds>PBrq+Xg5uC^iZ{5jD7m<9U}=^>5;iWxftg)C|oxI(_+JP7`J(r z-Bk2~I5^#kT-+h-L_)&YQo`6`(U6CiZJcPOXuT3zb3K^F#g)*D@?6O1x zkJLjrica@(^eN2heO%aPP3n$_dARSbO^N7TtUo2%r%FVpDXLKS5_#U|}F$F2DI%T}>> zfn~q+gym(8!`VS9$l{?kf@!%$tM8?_6p2@;imhCZC2sEpA0=3xP8h)?7FH3-zLx~P zsIG=0&>tbeSIAHV9H8MgxCpVQp;AXzPqEjRjv6swCG#*1&iGDQ4nqwM^@MAx(x?5kfA=f^IGxUenczy-J(^uDfZZ7D%$&mAv-ULm zNMe20CdEl?;HBN}v`wqJ$dlOmdjb_L(t*=<;MYOMBq%up;(5tR7$tiGWRg_lY~EOi zX}?V@95jU_hq4o5UM#L1MU}ARpl%Zem6RP$U^{d*|5FpF+#5J6rQUA+#v;4sn(x_l z*ZreSzvH`hVC7seK@AC}R*?ct%69h(fe}f z;~4a^IjpIVqU?{r*leDLN{_Ayru`WKIEJ{D$P%7!PG*%q<%|8w;*a5cm7wo2q~%o zv5_}QMTGMv!oDcACbXdoy#X`Y*-3LI=nFbPAI+KMR@;bt1-^tfsHf<+ok>G&%|&pI z^l3sX+0Q#*S1jGf_OaV)~N|E7UXE$$Esy0F6c{CQRudW7F%qJkR2m<}1 z(qJyvhDLMm-FvQrYsyHU^+=PLhf4fb(D1#d=P=zATTYPI4mWH3s-?Fbv2U1VVIK3 zQTc*afo@Col}kaDF9i8(?z2I8oV&BvjJ03>!~J$k!gt9=47Iz*zi!hH_Si$<>~U0^ zg55a#Je*Z_ppSh~u};hjW>ZGjZ|>d}ia?+s-18C?Ml09bU_H@mNqE(%R2Ij8Igc^S z+7Uk3%PjtVUG_&t1%CO#OuK8vNt=BDdwALo3Yq5YW5WlGzxVOa{X)$y3}#96O_O~% z8B}}jH&O3kG^2fDyo-5yVcu5si{7^`+wNII;oi(;XKcVXzq<g)uxWFI>yVSH#7_Vy%iHU3wgdYh5A=hy=R$Zv|YWOXo$EV$frQ zQa!5zjM7L2=!%hy74r@Puka?*^%#Ol0Cs85E z(LpbP>ccqD+OX9?lNUfx_!c&1;W>dV^`ooy7bpTN^-8G+!RtPJBD)tWE5i^K+$8u? zeDP9fjvmFsi;8AGwM#W~(O9dwt2eG8o9OR^WmE=> zV;djEz#VVAKYSuFPr z$e@|Zd^}`zDYv9g%4xMI40~Z%UlhDldd|}de2O%sboMZ)t(yiEB%LN+tDw4(jnca@ zC(q<;x5@+0S<%i#R`}`@c7&+*7-#>(s5+IusSA?S9?1n&y#_hlywD+~PQ`QyxRtv4 zvN#rK6$w|mny1636gm#dMOow^G4j?>>$+}~O}yt(`}8$m#nign9)2RnroPo}V|!8N zJ9~SI)HPfm$25ZZnmOQWh6EZ{rjjt73D*>M#z_``9C5 z2+qqeQ|oN60TB&D+ia?kUOrNXue9!W)8vXM5W0!GCR5rD2Gl6Ou zN-ZegGDGZQRU+F?>TO_5wkcRG*+99;`terGi7o~%p-{LwD2h3=RKVS3a6BHV32h)X4IMG;vi-xbt^hmkt?{Oa#tOsWJ=Yf1avyd z8R)56Q{{l9=tPZm04%n&BgT^V7rvyPmmDWnuN0%mjq&Vs5X2Itl40t;q791BEw0Bd zD+r~pp+|EY&qFI3)e|}t@*%<6L6rF2omiQ`)k&|Lki+;QV|HR=8HJUP1SGOg2oGP04!F~dR7fAT$K%M5X=x{ z&6h+%C027uqhbdNV|awI+yv7StNA3*!Jt^hE*t@xKhG!BEUywDfHQyyMk@od*eAe- z$!Y>o!qh94F7f5HzG+_ntJ{`pwMglPL``t4}jbZ?YYvaw=~PXHNb5E6GW0!bx4w%7s1)9Zh*0H0hF9 zS-QF@PX~xrk#MD}*=vbaOO$Utg|RfSfPH0(*WGOkk`~%GKlv?-47%55EG)N2_O~&l z8K%Gk1)zb7*}}jtPOTKdr=P;cxx1Rkbn{sDO zqdh}u-K52|mVS4pMLsdiel&7DvsT%9Z$}%#k9~7!a-BlQSQz~BK0;_o)`f3tu2#yr z29v0n3$)utKfQrRww(3Eszb{Y5QFYri6&cJZoeD793%t!}|w=jg2-eUo54cJBgs-AJ}n4c}d? z`To8_+FpKN!3SrMUU}w8hee7#Z|=ED&f-1x)xGi_MZQ<92>><%!WRBI&HQoR>!HoQ zmb2X1W7b&umR&f$#!6m)*2;Fxv!j%1W)pzsczMAvoNUNf5F=k6+H0Y+EuX_Ly?}5g zOIK6#IegNzN{O!mty1E*C2JMYZ9$$cPI7S3PyUb%I{?y!nYciZ#x7uye1 zDffxdHg5%U>-RJ>8oGfRwoCRzoI!Cx=a5_|k(MexUL%W5YVD!*p24ts1L`vCD& zk7UKL<-YRls#b&59q}j;uFyE|RmjHA`^lt@OlZW!`O+gcIjzu^Gn{rFHNtaV0gqej z?9qLk$Ms^-B&6I73_0(tauh$c=m3%PPW$wLU)#5C9cJ5SkFe6U&k%Qwf}%hQ zu~r1T9G)41XHXm?=u0A~=P?L8@26Xqi$x-6KM}MXc2>C5)01-6!@pdyvrO!)jIncJ zA29{Xg?h=LK%jM4R<7e8rEvAbmLO7|-8kGynf>xJnls5MP^9$1+2NcRq033>tg%`ql{)2_C$sEQ={{>c`?l5B5EC}x__yJZAt9yN)QuW9nmp?&3Q`*3 zv~6Pu68ne=z#4wk2_*$&eHUC^T1p1#(au)Qk|ZRf7eWo!?!kEc-xfnXrc^8$L&&CW>C1^t?TV z#2r0NH|IH_r{UTku3EYlHd!O%d;%l{ru5%7$VBUgs2+V)bkz>|QYEb#rV zSX$ioTd3X)8afD)1=|Gzu-CkJ0rEmk61XMi0CrtrPCAn!S}u26E75ZsWl1emzUYso zb8iQMb6s`5)s^kH)2Fubf3%YSr@->okF`@s6G=&7GaoyzK)#;LC5${A^nB2}MEp(H z1N^pSx-GMS=S8$iiLbEWN0SuhwxEzzR1hw}<_hxGabT9KYAY{uoLyJMzK4}Bpv&ei zw(o!XI~MueIJRj9Q~+@jvGOb>E`ZrgsFs{0k*bkQ!DMQSNk`zP$e5cgUrv>H(OJ95 zcL;lO=?2Ff#W`G=x4+fyO@5n+D7V{p?|Rt+sO@u(oqfLgG#rIYUtE zr_JQTZActIeu(b4UM12q(YOoQ9%<38cKgi(o5*Yb(*9lpG`H}mecd+aWs)h|h}{vZ zdfBP`9_j!NbXth0T>3Rfw&2a#gqahb-iGeMtX;MIZd@cxCo40J-BYITB15CJwd~0t ziFlnonmFu~g$cXud}q0EXIt)#>h(3B%IO|eI4|gXt>K`18O(Y2$|4)R_^|zS;ySzc zv3=J6D`Vk2gMsNo{@#t>wugSj02~zZkyXUNu5P7{g8~ShlFtRG=MP)VMY__~nSyhM z;Jmn47vg=Iv~!AXiAuLOIMoO7W`kRt4_Q ztRHUsGo~YlpTT@48yt;o?X)xxYDdNWT-rUnCEQN{E5!K4p;Shf4$8rrETSK|bUn3( zlunnSek-sjOSjA>K{L~nG)mT#keDgP2S5f-vujF#dns%$uoF!ZotE;Yn4PBVlevb`0zK*(!7pJf%*fY!(U25l# zud{}Nm#nVx4Qn}nh|zf9kNV#h_F9pT>9xrNdaw?!kO{s_-LLi%(Kun@S9A}JM;QUq zzHSB}nA?ePp*EqCHZ6Hyc3DDM$p`H;5Y+?1F$TOaeZEboaGva`=l%+k;{sCNrP9yJ z=|(kvK&BwoI$}GDc~B2dKzAp_MzFC9-%wo}s$uS?gQE*|+TBV`Gc6+BXy`6bA9N`z z)84FHbd&I!4coCZu>+8|^~Yrn9HS(tMRkD zI2Tmy;#_cMmo--HvVewO*6nT~ z=ybzd;v^*NwS(W_vVwx1E}hr9ILLbF>b-&;8C=zes7W>&5doLUs>LP@63I~Hsh(_d zUf7_bJhy>*Wz3X0V{i4aXyXKIxyey7D(oDa}(x-Gd#T1~aWbdhq7sN%Lk#j79U=o*VE98TfJ zC|fXPp?&pZU$e;9rrO*Wa1i$3e_pnVSDeI}**qed0_0z9hvfs|wW|3>zZ{%+uvIn0&YR~Vw zY;zfkb{Kb013@kUDF?7Nh!ytE+7saycVb%D(bUqK%P3kn9xG~R$F4|`w z{}Qc$*N(JLT=P3N82*W^oPCcST=N7Nqrn+J7L1GFL7pyhoaMSr+};p(DmDtu5fMDy z)9%VLEfCe+t;L@0eMY#_(-sQcOO(i3SgzB2u`VjsJV;iapBpVA)+${yi47#ygY4H= z&a{(Tp2m;`;LF5qpAhz}^t!tkDOxR#gL{x>#pfc^HC@&TpF!&ljZ>uv;xaj~ln@nd zm|{izKNpio_bwP3W8`0OQz_L%#r&IVGD8kyDI~WyIHd(`sdM*-`=+_2=}z|3p(sRC zBu_5GT+U@6Tu=z^Z_-9R*@OwlkmNZ;rv+PQ+3CGc+1akjR$uh8wN|`l4QJl6 zR>}*TXq{=NdQfBF+v%k1;>1?{Bcf-4)^H3g*u-!w20H>!KhEsGR(J6=QW_!dQ z2IL2t;==_a2`@9DCL9`#VG%EiNEWaA`3#AeGWXK1*ftiPpZ8AabeX`<$^^#7>fs~R zg^-=BRX+{H5xaFuxKD-lh}BL*Y!u2#K;XVX``mZ%2W{)TXbsJ0Pyr=&;cSj|kkxFd zdfnQJPza~iTj|bZJG_oVh%%!b@GF__A@&EsohC@9=(dPfslB-F1@|J=+5|-u2~u&4 zEIYGSt2GZRgdJ_y%pLud{cZm*S^sY(*%O-?M7T?NB?^d8mWWS@aUri)i}DXQLm&&= z15uzi3uLqCkD0{xsrnABwUy}1{R~q@u0PI>JI@^Gw25qck?`e5K-TZj$S4n47colJ%J7-1Qjip?y6O>c6 z+7JSG9WPg*KWe1_T$nkYy7!3!Fw^P<;8QO?!%iF;Yo@Bv6xFx+;3RJ=O%{ONCUF#J z3dMueO|J16;-cE_HI!Nf>iH^mqFkv6+e5jqQW_*nXv3yUXS^krV5AhIcT3hXOP^-! zJO*UvQX++5hQiKR5mfMXg(d2_11AC+Gx@25f`E1nj!-ox>9yX% zCNJb{#wLlX8bEbR6a&1)wO)@TXn@26B%URVV`vm4Ir2FiPZ@;<&xQ@_F2LF|`z_(Hb($4`L*jo#AIDq+yLvrbZl+W4)L zKS7tUj9Tq-H1m-v1o1IzoZn!xoRc1gCWSfBcmE7R)dL?N{U6(E+ba#0NL_og_L8_y zjcbCbEv=m5U0PizXJ>CW#iBtwBY?@xb=n}+wW%_$1C8Ivgo@frl~#R`6L)PMpB}#e z1MX^y_F4rSb{u&*m0B16^P>_+y$&bo9T^=ji?yoo#O4_;` z(5h0jZY*ZwBQ}0WlHC&df_?IrX%_6b;)U!p;hU%%tAOg8q%#`?1#{sQzCf*gN~!-T zsMtxgAF9V%hJ|(ndXkE#$(yU`-f3ov*(Jm?HJ@*^*+eR&rbD?u?dr0}Uum*W|LRW| z0RLh?o$`u3$?nfdr0k}UmQx>*`iXk0^m)}j*&OEPbnk%2Kyb>NSL~lht-)j&YL9KW zXsM|Aq-}Ia{uc-yAgSwVL|l$X_to3e?=;vGZ}7gLvTF1Z?Q9J$vtx!{A~Zbqpr&Ub zqFr$Nd+9HcJe%K7b2nsn#9=&m1TY@HD&Iz8ZQsY>w6U3IZS?X=HgzNc%4qGcerEx{ z^-%lrb^mPl|7wP1(^7o`t^}1EU}xES6l|$3N;Ys&%teM@)g9@TTx7&Cyi4%)ykVMF z>AE9B$mWcS7(Pw=cyM}y#PF&|-pArMR>5MbtTKh+RAJaV$&$5N9@oKvCTZWOQMLsv zbYEy)>pNqH(8GBvnNv$kdLg1)^{?s!Pz|$BeB-+YU`RiUr))?&j5alZ>I0?HwTj9j z@d_?gD$v}95q(7CzSaINpJeCb461zAE*x8K=T2?3x}sOW!)|M?+Q-pPo}TEriH^$F z`h4UUHZGLvpeeCa(+X)-R8PhvkWm+ZZef6PLJeTUKele_es!TzB+z}rWtEpoNQn>Ai zM@^y7Gz!M<$&K9ci$tR9UU)FW;O zHNeyQ)34%2h@#uA5w13rZ@2o2?N(R5&Fc7G4`Jh!mGr&k(&-&mhksFb8vmkdx7D4& z@4&QZA{*FDDQfG*!<^sv*lBKZ=u_{Y!hY2|bnwfyx9L1bu+c?6pc@~jTlO@cXpcTj zSx3~QYR;Rsn+!LyB|!jaHCvNWXQ)#Z0f#HMt2MSsJ2CW@sDfHwrTAoDwYokZhb{(F z7dzm-+bQ!&13<$bSWb!*(FwfT);egH1a7}dW~&PY&J4{)cd6@|E?9kYHPsu);5s&e zJdyqcF~N>wH4wLweJX^nO9a_;x0nk#@SM5pbw_I4lTOx(5O@sT zgyOIhxljjap%a+{XFw5GWp-<(sao^y`PBrwIrI{2D=jOg)#qz zbMT>q$1rNWM|{8(sHcsTp4i)Jk5aRhysyO`&d9Z-HD_$u>+f0cD9Uuuggs3*`jrbd z0SrG3!jhRJ1*dJQMvk{2sT*zo2OSGX_`oFGiCKGU?5VeFZT>sJ6r*Cs&hzfN z%y<=RoSL(lWD!HfKg$ukhtN@;ha3oh8m z*@x{Dw7gyuxz`3nhuKd*^BsFBb+zSe7>bq~VdeY*Dg@keE>eWq%s$}ij!a43-A-6Z z-jKDr&E+u{{PBB%%U`w^xZ_D%B7VR()!RPim(GFw!AOQVs9b!(I>XVPb+J{?M_d8XQ{U;flM+QH|C1Yg~{}QALzYUsNiP z&?;FEjf4q3up7C|)np0T_sLfpeb^oHJR%sAG-PgA4@NC(CG*dqk(6v#J12!!Mg(If zw1;K_8nzurAwfb`)NOCfbLW-L%WTMtr4W^lZLB#g_4*ov(dy~KrX4KC?Ij|;@z8|zN*gtxn3 zFRp`)1_&no!Z10s)AOo ziKtSuAyqrEIRf$%8?8FYM+&;^4H9Cg+ zvy!l!=|Kj;ijd-Bx`4S!SJTAVRIO5rI3(%pdw^*>S`}?{Z3~%;h+PMsT1g+@`kD5# z?~b$^qTjTi&)j2A@4g)Nasp8~34I{dP>wLfp1liibOyY+W%l+Ko3*Xkk}(4&t|+iC z{`@hEeDV&v<})MhN4Gy~4=>HPr^(?>Bl9;EQ(+3geT3JUf*mZ~_!LRHCrBBN%`CMa zPTXRXUy-d$$TkH{9ai**^NeC38>CHKH2ZS0I!aNt^O?=|aAvVx_rsZ3*ca`w{lFMC zIvvizT@sIN)_H|#MOzN*LuJ(zWj!jltr*OUYH^?!TTuDwn>3=grJ z*d^~%iMQEH^ONlGs>N3M@}1P<{{d0E?m=5v#-FUuS~#MsQ9)HqU8BWwy2+V}H9`Cm z`V%rKPV40PA+S<=5q)!Yl7lttzrv}T49i5t1%eMi8c3<v5YE`bK0iq)4Uu3feMaO(=HjL0&Diy##H= zSUn8k%l}9>rMA&-EWxf031|)d(98E$-S&12NY@Iq?9#$}QQuRvqg9PhMY3vf2!z-+ zjbjsH6JkS(G=9x7+e#l)L?LGvP+zqjo8a_TyHxp#0Lw*v*~=ic^d$>w%DAX4=V~o?LWv#o>)5<(f&z zwa}rUnqHj%nyBYhZcqk7JHJ-U$C0Vq!`Z6~-umY!vm2jUMR#X-|tyf7xxyXqh}$89RJR=vyz zknAMBv7NixxT^#6S-aeK;~RB#;}-FU@8lQINRsAef%&{u1Lnr6qx=`{wc7npS`kBd zR68H0;xP+83d*T*C`W|i)Zz_e8QCZ(Yn7~3r0+KO7Yk#w9$2`6fo7W?VC)yUb=<*k zesQP`>i2#7?Yx5&z;$|$g7S4Kq3tVBdojXP?1x*YztUziwzk_dn)0@-#eVw$eNG?$ zttDLdTf56_2ml(iN14AOhTHt@Tz z-Nxf{c-rr;I9+c8-_PmkJD7mH_l!M#2+fmSXY-F$+nfU=>h=;js`NRU#4k5%JBb4& zB&o6p8Sh?jKapBB7qT8cP+F%w;0tZ$mK^)?uz8S~ecvO0w42#m`382j_?Itz&z8*k z6LSD(*{Rhtt!m>?JGYr3Phv3yru+gyDj(ecVv8%J7V@fxIZ)&wu6JGW_sy}1T=;^q0a$)|4#uFlivwQ`B< zBu|kk!6v5K@Qc0Woy!6?kKjTB_%~=oPB^O5(Jw?tW32YZj8qMTPu9btdAzt!&dG(? zx8zaHeuC*cN0G-xFOIkTZPTslz&tzs_96_4bgMd%Y3Fm++UcAPcCKKvRhMjI$I~5F zQz@AoniH}i+bQDeKvSv{w4+s086gU?DNTT$UGy)gbU~Yas+J+ljQQ5*y&VIvxT~vH z7Z=IuK=p|3b=8|9H#zFHw^H5eg^0!qhuOaG{moph{N$)0rm6zi%&ELB?8Wb${i~@X zH-uA`=Q?4u!nS)E9Ij9561L{umnN)7I z+RB%$rh+t5`Af_~c##UiEmm8y89s9nxmc=I*%ph`mcPh~2i_`NhtK2{P{@}mcZAxQ zLOPueGI zT+!aCh$2sH3fIZX%0;fa{R^rS)YhVoycn&+9<#7*R)&RyGZ*+58rqejG+U}x)X??9 zdw@KNE_%tdM|S5GHaQZod%yeeK;7UI?R7;_vp1;lufLJqk!XR=lNxw< zmw0cK4SegarIv;;O+rS`MMkUMZ4Py8vuUNB3#OB{@zYqV*iJ=vVOs5je5Oc()3Gdz zM76HX<)rZ>D*kcmD#T-@2E%%czXCI;)om&gK@iv4z@%Mg?Xd$$qEpr6>T7KN5hV4& z)0{ad4hKkzqtlrWFTZ$^oQ}T1eG%<86ew5cdAb`$W|gufP?61~zisdj z_?RPiSfVQ6Zuy~&{Ml%G^|>*2gfia(>RD86aDLr5J4+Tzk&T>S_ki%S*dAC-neuwOh6s`Jn_5$hbNTsM;x)HHmr95C2Bu*?@OASRY zn$N#55;V`SlP^6<^BnnKH#5>c=w5gxZ`nuO##S368LNeo_Wd?ea#?NA`~@ek5bS7o zAH*N)!+w(W2p{&th#(%4O}YNf*?bNqub@tLJ!)s)!ml{A*v=kaVrMBUy^yoo&g5p< z`GO7j766C9yS5y)2%PJx4p=ibW-Fm|yNp%!GQdGss|gxc(%GiLRiSO*zHQV8wurBq z3Y8L8E?_zIYT^#@8Ficxn;WI6DB3Cq2Z9T2<_wC@*kE;n`9M#|ul>SW`5`S7^lHyA zb*{CwG0hoDw@GON>GoEnbBm-ib!uMtKzSN)gVPiuXVa}lzD;wZS~WY$=S*?78Kkmg zRVAx+O_+`u6-|OB1<1m*Ox^l3`ZNHwi|9*$8WAn#N;+4(XbG19a!tt#R$IJ@?9)aI zE^?7rU9!n8mcGE8ug!d@TbR+xqj-2A#A9e|wVP`(l;vk!!pf*Wt0W&knc|5$3MZPV z%xJ(?X;z^fHimw;)+S;ZGL1@)>XYnj7qXe&(#?>Z9u7s{0>nG!l%eZ`wRSb3jG~Q4 z_yvfh$c;LRn2V9>E{2-w`bi;6Da#M0e}rmgsp@1+tx6DXJD3nJc`TWX)lXNk+aWxw z8!Brnag1doyBi+uoEs9_DO7KxGF>A`J5`U@-PLY4sDe@EmCiZsP`R~<4b*D+Yggy+ z*&eZuoJ;~gq&5G*qHR7$VJ?Sl9!IFwDFqyx(Lyc?xaQRokrD!Dm({(l2Y0@xhou*7 zB;+oX%GOm++Xn?G>X6>~)HmmCVl&zmPurg4>2}?q-`Mpx{N5f|U1^W+k+TcEd$W9D zS%rE@ZV^m1t7Vc<%jAO8tsOS$*;2dybHBH*|9G4oJzQ(sx8~XJ|7o&)`NrSaS3b+0 z)?XWAU;EZL`{GxSfaLOS8Q=#`vEJA7_Y@s(Z#a3Hy#6;3~BU zYo1j#5e__X*{`mW6t9hbAF+9`yTF5WDwu|vpNZ|E%C}iNt1W5A1$*qx3i}gMdQpBI zJM><}3PD!yJ4-X6nr0yKOzfNJbS`FWZw?D9`um7gPHM6{1njuwF?hsU2F$D}vT5mb zV0~dcbrip`JARaGFQv?+&MnQ#_hG8O@;fW1Afb}JwF>48R-vnd!i^8mS;t?ycq2I1 zUmd4djCOlji~U+f#bigaFzqh13-5@~ovPa$=jj#vwSBe0AE#%e>P1rhVsfUkGs?i2Ggtu(7n)gc)VNN2Y;OJ~ElK`LAm@cL@kvVk`R6MQxEcEb!GHEb}v zcR=7F8`O*$(u5h}-FjYsrnq8nTyHn36av>+Vp|9gYVkpOQ7nenR&2JKa%f!&wM$@l zZSe*Rs*BcJw3?M}4s?H154=>lMc202r)n@vB*1Gpb6%>%!p11kc|+9}YF$xpU=yK0 z1I|rz1FjUJyPaRPje5NfYOUK_wF?ucK?ZjVggspdZ)koQpXmw$+{*-UorvaTm|&d% z-OJD%w$lY9n9HK30wbK%_BOoeb}DAP)ut$?|(zKNsw40WW}6>K4?vw0XZtryrUPfVsf_~&-Zt@qi)Ewx~cZ9NdKLS$Tz z-y+juDkZ_v&X4bEv&WvzrAlIm4Y_B!U26RQ?SKDIGqydnvqe|!wx2#|e{;*P?dxB; z*S_`bvG(onJY?5@mhGLc|GkY{l5J_chDy_>0!VN2>no7Z+NK3+6OrO! zZ;OwB@M;PnzBeNnBYA>+b7|=K86yd#4|o)7$EVy`A5gTCMqi zXLXtW=vDgjpFwjcmS*wB);$8Nhr?=#aOyB$dWz0*s(>h#R>=>TW)#IpTcOngtz3zx z%RQ#}0?Y6=_nOhIjk+18hA!5^__6&(?ar8f6>Q>d!u+l-cn@{<@3?&`n(R z^MDp9@lkX>d`YE8fmWZ-W1@uyFlN)|UPudg@zyC;xiiU5ADCz757K>dXc1&zY}Ln~ zv)WTD>_RSt&(E-ng;@yB^^oZ$3KOG||Oif!AJu~YUAy0=63 z4g|Ek6)E^YbdG4-qhzs~Qe&7ducdbdm;$BDxXOQ!-`jU8@Mj3^17mD&Z+IYsN!q!D(pbZ3IfmMdcMYt52{Q`y|jwXpqKqHP)zjL#aecCaSS2F0j!ub!y)6 zClf_3w;XP@2g;8g(0B%Y4%XE~Qb#$Q&|d2{3QVp*XG?KAvjy*gBx?P9L@hee?@}5kvft~ys0|gTpg}Y zBi-aJvg|pBX;Wj>dB_WI*XWS8-ZC4wrjZ)SmGQyJZ!%M_Sj2D*_eP&D*e z!tJe)(DZ|=DYTvFiVMbXGX+D8@29J3uMc}cfxYi5LpHJ#{SMzFUd$oL50W|3j(Cqj zzJs47*z3E1AFDKp%lXdBI5tlCHky=LX+}c#>&(;DWj8eTv|D{wE1gjEkINyaAf$!u zRGMl_?ZWA7t1V=n!&_Na@qY+A4>+mIYyHo#tm}$Oyl9LuO%pYVH|5^+#Kg3la+8>5 ziP*8wn{-j+w}mDM3ZjTgU3$lYD7`J)%krp1a)jJPSG)uLkH{9{CPRYz1D96XZ4+R@3-7i| zeV?~cH=`bu3}F!BAWIMhr&fVnPYp&g8)o~L-)j3n+#@PK9wU(NQ@V^l7k{J*Zq1*U zxIG)%7uWDt+}s<=*XpmXV4cvLKb%{M3W~JyYb8#YsfAyw-s_&x${7G%Nbl3b7V2T0 z?a#&a#V(o;EaPL+Lla~SVP0!)H55^UM=81jnpkL=$wzqx19Ruzpchr6>6ZUQ+OPxyKyhx5eUbvmI>%{bPq9se(E8LwJ6Gv2N#_WRkZLa zojS(jmC-p+t_`zRGI(;sC<|>z!FlBo#|qKcW?19CIo5b+z9o;q2&J$?nV4ZQ-?(Qi zUa`zc$c;6!tYMZ2NzK^>Q0<{;2f~83!d}Ir9YAx|`AcQ8g62LfcNz@DB^mG_2!i=+ z_}>kVxkP|Q@qkDpTh!F;GWW;~MS}&{%AMH06%Oz#z!wR4Vu2iucWhBWj}YC0y5u!W zmeH&71pb~1i~cP1dz$Z#(ahft}_U z2q=MKlO)|p@ZL5duD4L8ZEHTlFD}Q7q;)ZC7jM}~)rA$}`?E1VVLjhOb){zleEHBR zH?yTH+6}m`10MDqb$_ZmR3nfzP=%mf@i$=aQ$tFDf^E;K-IB$N73mlEhV*^90B?o$ zPOfP`f!x}DqKUsk7uybq0kZqkI4Oq%nS-D{r~R)j)`sjaxhI46Cqer(P3tM9y|s0x z*(R{Dryd%zR70)BLgl!z8j!<3ECWHj{nJx`2Fst3SVGt*1`gfBs;Q zedH5Av}>-t)xPkh+w8N~4zf>t4lmjzzqTQB4%qM=t#&{B;SF|WR-WIlDyTC6s?qy{ zU_Y@J?C%%YyGHfNLVN}NS+M8f*6(BI&NDVy@)|K_*Xl!YHL=F!5sK( zmEE?q+Ws(>{`-D6+U4h8WkUy!qe)~4LtpN;x+h0i2v^>r=f_%k2}At0Fz;e3dt9v< zZnf*!3T8bmekFtXQ&RrRsRZ(c_)_fz`Y#EY=L+2mgz1PagY2>1l|%dwV0n@5F}t1v zq=3{{F9ffXM&q!&b~&Gm5E+ISCc@9Heh!di26=SFtrlN(o4xw1uzadL>&9+stjQd$ z<{ww^?xrOOXBm_LKD%?JisiL(!)u-v0K0x#Mwcl1*Fh`4?xrhU&(k6Gf#JZm^M-x^C7fYFP<=*8$W&oSfy z*#TTh5W&mT)=W^DQpYpJx)wAVH$HvmLN1;k6-?_}kjhgWC~Jq<&*6q^8~7 z$r#FR0&vCmoig#c_#VX^T^%s)>?F7A&@DSUbsq#6B=btDod9&E&?yzBjYe)zG_Je|l+$COOo6TX^^AgYQC@QPz{~1U*6VLP|TuWZD!p!bL48a)rnp;yQ13Zvk`VnVuw9Eh4nO`<74cC3VfX^jXK8Y;<+wp z1N2)?c35k7vo&?3tO;*-B86g;s3NPWL}fcc1``tJ7}w62bG2M?U5Vg zyZE7f<%dP~;LdipZ^VP^J1Atfqf%$2nvql!2XBnpsC8Xv(cLy}b(785)MeLx^FI5+ z*9TeKNjB~L=NWtFoj2^vnSa{br{6}jdCUF*&c8`efB(q&cHu|AZJ)gQk9O6UZ?h{2 z<72bwnu1>8HF)?1pdQeQfdUGU^`ugf^Y|`(ql5>y8`RX?qn{+){AsI zkpaI=c1gC+e8ff#&0~n@7WU{tahElF(o0Dzd_Bo_sjW=kOxfI{ahv{Hz^1-j?Iyiz z;`<1S4x>pbMsDn&%csqTtT{>N5GC@VC4XUZ3T4#M8*ufoPwk-PjSLK-i*a!+PL>+F zY52LYicKx*?Y9qZGGG2r?81*+WrOaUV&1No3N7cQopWv1%k%Bk*XP>qJ@df0J+mz@ zj>RsteVTCW#I|Z;#AdM%arbsYPfx@}Ts-V_i zR@L;Z|636_CU6Db;PM40kl4F{SV6a190kr@2qkJL?dYQE|AZ!ZX>1GE3%tS6Q<%Fm z^FCZRV;2`4Y6HPsp|ISo&J%uX_lpxJ5MPi^x`6ObV)FKmgu~xfg6qzcG`8y1^uRX+ zBJG9)(vN_=KtSHV?PMFXM3^Vi-NHPPCWrp1<_PgZ4LOP6`v~sXJxo2=Z1sDWS$G@s z;h2&mXnqfZgVufYEtlU+)wcp&_n2-}s8xwp^MvG#1?MYYqeD4+XXOQn((4gn4=j4p zM*Zk|K>Ww{z27dh@vn6DY{dgwUoJ16#^MboJ{`J^xyNfy*vQqLws6}iyZ-iP?cz(n z4-_>UplyGD_f32E%xODAWPavto1FrR&~9G5&u)M2h~34!`QdA8?cO=N>P&Ea>%4ujrjxpP3=14zFGvaYN}TQ?i)r}{k8|Kj@UT7`w^?-UvSTK z3+*Ye@ZLgVV5{E z+X=4;w1w7SZk`4eYm%pIe;qtrXNy#IZBaqKkA~q%$jHf#*=WZStti=HFXJ_c;}M6| z8{;;q&|KskjSp3%tUx*C^lU9?2xxm7|eLY9t=KT7<>v0?gl(NI%M#s`-Yz#ohfSphg&<7 zCb1-2302TuEZi*=?q1Z6G9v74>%m^#rHM`E+nVaZT}mJ{r8h-+j{-08xn4tPHQf#| zs;n9eRa#v3JPJ6wA9@lz`qc5QtmW$|tew{zHLvbP-9iVrm4stnJ%F3Ld;S8u=bPVR ze)50WukK!D<6g#mB28h;x=#CK7Hx+z*l0K)HJ(u$k8J&`jheNG1fMeA&JZNO4br|z!2I?Zv*jy~*}q-<9sAg)eq*1$>PGwYH8-P%4787d zy1omqv%BV%V&%pxj-6XNOrwKTH|$Oq(J;t9#v_$n@X(HkO?w$*?*6FFI-0auWr!E0 zm<5kSZQA~TJ-n|TfUUF1uT|T`S1SS93Y)Z>plI5@YP)1Ahl#t(*!1myjeY5ejeYSj z*Ot)TD}}d4`qlm}L7mjJBi8anHXn z!j79_e1E;v%sl1)e8~P=2og3i_!9mXQROB zYtM|cV~oDrC*XWaz&Tr}xJ*((wLSgsF4r@_rl--va0MP&OPbTZ;1gyv0CEm8}wBhXzLo zE!FZY%xNa(%UXe(NaCBpDe0~)n3$c-0)%6z8zH7PkaZo_+AxQi6$(Fr&UOxlIx74@1h}U+(GSQkDzI##gFB_TypCEOaG8<>0AePq za8UzmNn+I$F>A60%&gAH3ysJNjl6l1&b=7HK1ewq*T+%bTT%co%E2GzosJxtPqpdj z6XuT|T}T}^t3x!Z5}N^El!rtGp>Y+R_thH+U3p0;4=rj_lmZWWw$c;Ynb6cy7=($X z?d*o4-Nf5b9y(DTGJ0_U^ps|-4kgXsKs$DOk~r)<1&F>^MW&1>ICVXtf=mWwqbLx; zYOeqd)TR}w39%TZz_sf4&2~3B{Qv-Tem&P$o^e;BAp147yAwSbV+ayNmvmvR&eci_ z{X8jc81xfpwgR55?FkncdmY`R&C-Ykoz65eLy%d}LD{i?8~17jH`{x#v#m2tBkL(kl z`Mq6w`LFHr&-~6lbJb1uiGK$w&;OoXckc@}cjqY^v6fQgS*Ub=5F}r33@;^bJUA-3 z_rXmK_*5FPREO;0S3$`GL7L^_<~?4~XqV5e2qS57rmPy%UKKfTB{My%?D48Pn_E$1 zbE^XOSYn}0 zP&Se(^@o(Eu$^4V;n7mldOK%6cF?g#MtQ|Hc_V+A>_O$xUbm4XtN=-*$7|o z@X;qtVNq1^Cg10nJYPy~3A{8GLc=MuNU8x63gMJNyB!yE6(0$+c&B<7|hyIDbQcBUtA^lN5Y8gOJ%+XfEkt-0xX+NpuY6uo}Q>Q$K(zIr8L zW7TrYPZ3Ne6--tEh?PtD?%^LKl#~FXxKT_K6$VBjR)6g99NdPpc|Qr;z3^d9g%8bh zl;jC1b7IF9a@R$s_%Z>;lI1V6OA{3l7%f*yb!2M3E}l6$=pyg^2z(EO)IZK*~0Z6#ZI}7Mi$gOH;s-jn$CiaWaLY z))IP^j#qSSjM2w8O|^32;i~(PT$gjuUfNy&uqzM>J|;YLy6ZBno~&CbDAbK>-C-qp zyUx|)BP}VIYd`tS7l|Z)W_M57W20Y0Y!o<-%+7GW+%-yrkTb~S?Xxtr{&&);fSe)$gT zfBApgfUk|Vxok9|rWMyEqVzoOV#$nyLI5eO?l(%hCk=iY?55$H1nR1rT`+q7NP_Rx#v z>~wO>9@$=Dzn!=WyW92l@c~!a@cSmx(uTE-_bLSD1;M@mHK*W8YDZy|Z+|rrye32O z-UF1u<-E`JI@G~WMRmOQMYa4r_PNNio}hAez#WzkvYq;C@ppsKA}VMFb+HP7&55tP z6Ym;Z&jFA}@vbo$5Lm1tVD!n~FiWdqt%@bo%&vG22|&IY+LgG8RiEe zz|?(@3R5|R_j;CFzo*cItHFb_EDSn?4$rr!^3539MvhQbscIv*qtMJDQog)f&cj7W zm&H|W8PpWj*huo`INjV0dqKv={p{z_aDZ_-2Z^6(6a-nj=t=41r`M4=9JW3x=(NfD zMu^4C`F(6kq`PapnqNgVA!vb+yN`Ps_V`GHq-@{ulI2SZO;gNIW89UhEB|n&ErVDS z0??!%{UqkxVtGxh(wsRvIY<*Mpo<=mb@_VEzx44XkU4X+`Ff%UW*d2j8l?Wj$=E?o z-Z;Wf;cVpaV}jV(1f+)u`jJXJ@s=0jk{1SgKO5#25pEdfrEZ%FEUVNQHct=ZxqXV{{<157Z@!P;WDh@0Dvqs9z5^$gW-|MXeOYKcLYe(Y5ZIp?!b$l2 zAOh%R6G-+aK^0SZnGdt2yZ17G_+4nPyQrShSW@&Fpu9`vt^_-=MC|_MrFQQNNA12P z$LyZPhi%Zp!!~Sbh5hJm_J+#2-adWd)i!zXqZTU}VL{&A1`xPW(Pwz|9p;ZLqw7y_ z8-fGIAQM^Mstwtsx|?<{9Ex;bJRqx4lcpS}D$hB7rX5Nc0T~rZdv4Rx~Gp z+R}LDXvG|WyHpD8Srus2N9VNA&$FOk=s@2E#InS%5OCA2c$b~4X(44i)p4Hl2=^)D zw=G)(Y;R(7lE7qQ`fT!h0Y|RSJQtWC@}@ z#jQEcPp5tw6xCR!g0%n*pckB}6?zfgJ1>4{hE~Ob=ot!!(X@4?ZhBGpFv0N=K%GoO zVR2S9NXV&&UX!jWVJxcPS&ju!iGBeM{iJ7=71vt0|uJYlr|1mW>XZN+>Fgzo9Xq%ppqV7ZHmn5tshA0-RZSskI9XjnBcDFm7M zsf5A|qtYxoaI?4Z#M#i?zFv6Ia3xC}?WvF8u-ocNw_3w~V0l{+ zj!AZi^rmgmN(ec>GSLj z1;>~Yz-B9;vSmI2wD-V0K}0p__o5*<^&sn4%WQtM2X#^s+|Mwl^BCXBkUyQd!s+uV##?YV(eta5Q6-p=@%mH?1ICdI7(dFpM9Ti?D2HQSejeDu)ATr>FDiB~h==Rh@$APf8g}H4Ugz2#zY|9ke z2JA++vJD=yg}f9Po1-VvIJYLiR}82Kx0#boJrJyOj4WP5&;dE3%EqVX_XrVG&T+ zA3Mab>4QbWzNo4hAMy^v+Py{#Aa-yOJxIQmrAO0JFLR zdxzxzk1WD&<9eBeXFA0~$jaF4b}JGV`xO9Z;$JTLgtHkjLa?h#1rC1|9D7<_khK}K zb+-V*O@MF%ARI)?uePSf3QGj{TDXeTjSUtmw$E??Tn*}a^->(_P#pY01;$|MY!?9w ze+#s7QL$euo#OVOgn+n6t954~xduqC1(GBD4D+CssFFb@;!Pa%h<)ljAo&w_+2m&# zi@BYNL;}FkVBLAD(U05`XKqo-rtRpq+efaoJ_CMZmDK@5x^+G=L9&DjPr|P64A|_Q zKK+*E5=`6Q{`Ri@;5wQ;a@qXK_a6kM-!#t;D(Crgzi#K8_Z^xGud`nce2Tewoi+&t zBO4G$GXlmY@OU&EMP(-N%L-OFVoMUg0KvRBOe@#1?feR(CAmlm?mt>Mi~>B08w}sr zfVqn?$+TAA`c$P2T#UI3qt~FNA^X{FYf)})u+Qgx)gHYQx9OU37N8*yYwS>bd29It zRP#Q0G2VMG#QW=4zESVqX#OUI%7gXSxt|UTca8veR)E8^g5#co7;x+tTndsGy7K|9 zoEg+DM66zLB{8#rc$qHF5YhUy0-*=ljLc0$1+@yF!z;nf5ckLxI#;7xB~}B_D+k&E zng`3)Op#-3kj>Gvxs?mpi}buj)e!o8`HSfS0;T0LK8w-?im+!YPG0Y@xsr>t7ScCT z$DtN{c5@KVJHjg~M<=e>NWbFN(N_NwLGmjg^J{3uuc8@ek@@vUtRS*yn&s5*dDH?Z z$XV?0LI-EqfXERH3&$9^3=B0KU*JkY4yG`xx~dX_r(#M4%V|}kqz({+YD#-1HU&wL zYFn_$wxTz9+62#QrKN!F@BkMoMxZI+tA00s6Sq>&8;x(6Y16=NVKcQoKz_5XBn}5- z-7q0$WUd1>1+yAdf$?^&<)^{g6j+-k;BC@Ru1V=!Zvd>|cR7z-vyA(J!Jfq6yhPPf zy2zJgBn1>6Us&xAD``U`rk$wV)2Qy6U8HaL zHIyVXokSB&c=*jd+j^yfyUvyvsk)1nw^@QO4C%As%0<9DpaaN^ik7m$TY3W z?Xw6@seI_`8vtF=c?V~{GJP1wKMs;YAPG8U;fuEHwSnHT77+pesl7^ZF%RM z_if9``v#!;Tb7jCpZIy})5q=Z7i#S1x3A*`{MxS0 z{SV-klE=F7Zr9Pk>S2iIAZ+Pc-tn4MBS2Va$~ZgJXaLpBHOc-jB8yX3Eg@tWc` z{s~c{NATqyr5XCzV_3x0Qh_&Dx@m$UQ=W?OGN1}`1#>C-3exH?011`*d(E1H*@8mg zH3Pvp&8VO)5}>I+wUBCay$%GkG%aML1Ms&eq;>5J9C|KNUZa75C>O*9XOo~QGc#%A zP!uj)EHIxClD9Fk3WtPS{k*GpJhR5VYQ!O#2W(pMKWQgoS zx=kBR+*B>G!%_Q`Ev}>aFt~;vghFR2RV@x}#Ko=HN7_*=guB{NRuiN&@4t&?!Vd7a zoxoTFpy*Kvq3m){<9SxckdI8|ye>rK6Q|G|GvG^n>cH2{Im(R3_zTf60PIkBMi-X~ zIw`vOv&|LkYS5*7<8Q7+OjXMkojiMQT8jrj}U ze$#C33}jfEfBpV1F)j4_=F9so(eF9m5X$azz^&rAHUHilrWec`+{bH3Z9){ zTj`_kk%DJobboD3<(eZX|7|b z+)7!F7g_~O>RPYF^<_nsAdRP}{J3w}E?IK}ufe^Srxa&gS zS;Aa5WS>T7;#Wnu^f>bbH9EMJ&bf;YjNOWf{9Nn0=<8VJ1!z;Nf0lAF&l;vxt#%7` z+^y`Ey?u<;zc`Lx0XWXh;&EX2L&U;UElT_wBmDKEI@E#5o`T>!p>mjTEplWgawg*` zj?D&~KxM+gMnq#TjyEc&p_ID6P(*n&kVj|ND#TQUn}nYU{`E{yE5YbW`&*NyyStr? z1kPG8qL@=|{=33v8WYy)u*M2gAP}+bIt;U%6ZjS;>R0m=0Ixqu&u@ahIxoe@hun0X zI-w<#@G=N(MGjK2LEIN;6oxX?3+%Z*1O@M`o>6}=z6T;*PXc(JkXHhM{C1&(a}j6w z^kKx4NTW<36YUC6bHff<0blSo0szMV;HUsNvhNY|hd3)(Mj-aM)Qi9eXIj6&0i<^V z;NZa?kr*LDD4di)T!|G01eVT|tWn1tZ$}b^I42R53ZZ5}Z8LBXdL#7Bl@U2(O%@j8 z#%soCMilHdqf=bcoIVB&1I0~1aSKq~)9$SXZgqUO(M8eT9w6!rVCw>!`FTP>OfYm$*vQd7?;{k>EI$|pn0aCnTyRx!|%c6bi4W|lGfB5W8hLfW-=xY zMUT@7e!v>{K4WDYi!Dyh7os@gg-XDS8li;1+2QhsMaez|bgo3#vvQEa-ExH0f@&eP z*0VJmVWvZCtrqs+HcwEqb};%CxZMD5m$8F!-P+0an;#=G`#xtEUpLJPHk@EUCi5tO zPH%$4?QKyT@GzZi4=fJYM=txdZP=-PWrPVp`AzWppWrpkZG_U&F5UpO|6zYW{a1(K zoypVoz5n2_wQ`o_dR;Rt~1Y<_bp=UbCE85=lsz8{r<}a&N)b2O@o=5&9-V< zXlA>o%%})mDv^jWPpc=iqJ^R9xCMQ3ccE7&XDa+a+u)JZ=v>UvIy>djrY9ukBO)zF-puO}EO; z!|fQscI`SUt7}2m=sGYiA;b@q5Qx|6P@_L>P=R<%f8X~bexVS*Nbo*KKtEqAM*sy{ zxfuEXkMusNPO}}-3)(-3^yxJNExGznn7l_>#o9^cWbHXZdiSIb^PQqHQ|A^b2rrfy zyg&l9lbs(EH_+Tc)Ln(Uxbk@*U!}kdlvgj+l{!@Q!h6+oT&!mIKF_Hgm5_wL5(T76 zq|mb^7H^a8@Ps1;ch@SOhFN{>E zxA2lsL%u8;PWyo5GLASb7t$$uYJp+F_x_oDF!mSoP5|$IMcRtEIi)uT{D%Y{CO(Hu z#SJ-;1H6g*AEpAErH0I{xl0gQxHJeYgm_$;>lFRRkD`Yhqas_n)RLOpN`NkVbEB-z zb&z3QWB4p~8#*9C)HNogSc@{1Hyu7|v6_9>bYz*8Z=pu8o+K0;KqcWDTuBP=ui>JL z(1j0P&>aNxA#ULh5jh5>stC^uLTiRvQ5dVNFT}wMaxt^gIWNZSE`MyzFpCO{!g`E) z#ijur+^SA1#jAyx=(#pO0gg2i?jK({#;Vp%u7cPy^9flrj#{m%vMmxI{MIQIto_<7gbn7ci;(i>{!N+{~r0i&Tcg8%@D=yl5D z^ilDv4xxGkg$iyK5ijWPNLVq%W`()M9DSG^#T1Ba7K>tLD}`{`gUb(!9h10BL93NY zE1aJ0)2blMr_M>~+yi`fwUMxLi=Zw_P|8WKxziF%yii+F#oCGHir57%ca-O4fmQ|1 z{UR@ttGX6Clf2rBinJ=yiXj_%L>)A{&pU>tiN1bbjV9@_KP^|dF-G|G0G8e>x>@=F@GoL^KV z5y?v<&-k-Cjn@cCc#f5nKokmbX~A2@?$^*sksCarX1vVpbdkG~bm)QHqiLKd0u}9g zuCz#HldQv~M}+xFS)`AXdn7sJCt;a{93spLQ5Q;_3a6abB2h=Clr$x(qpU*`k%QCB z7luS;gkX`v&;h+W`=+Av?3F_^Ln@Mkklu^!5;;?3R#EjchG-u@@+1Red1H<~Yw6>N zQ9W+K7@0-`H46=m)oi6i9j%CNxam$eKvuhKY0O|7w9-!dkmt&v9oTt%ZH@a-;2ZYZ zIa-NXG~iEjM3jcODYGqQ6dT)^kkrORYo#3RG;M1@9)nDxY)00}v<>*<6!3oXgqrPey4aPVpqu$bvs_tI&Jno62|U=VS&%?LDea^OMQYG1PY?yBqfDc#hvOF+N{tgF(AU==111`fg1ivaP#EOkg~-3%MPJ=oR)O`S z?BaT6=qN9bGUh8un_2_cBuj=_YRzzrZ+Izqtg1ElTO~nlH9u?CvO(!OzC0uqlF+45DthXMMUDq6Ha6bKra1)+$^*XreVTZ0tx#F9=qds zT)ukMAUntRZTs?#%dK$zKWy-hdK>mq$h^tSugDd8kHCLexZ|Y#blevE_P6fh?+3fQ z1E2JJ`yEt&+GLo*VQ;Ek=3T~b{Nt~f6U~x|HoNLtB_^K+Zjp}8B_DB$QXi6%{J!UZ z8-3|(=I{FxZt`9G+8-C&e3}+VFvM@{W;%9AQnZmwW|vt_v-YIrJMLNP7{{@T;}1s! zE-x9niNE=Mn>lD(^GvPPZ7nuT_jRNCT&tqHvBo&LsZ2aax+irJlN65J3a5-v#a5ct zGCdnpSeejGCNpjeyPB;*(;A3nhMg7Z7yjeZM{M8=753}lTd;EehHbvSVZ;73%TgOh zWIhj3WiZF|d5H6YDN=CZ%HT`1n(zKZB9Ivo4t>H9h^h!-F1RFSi6{jQ!D1eTdX~s* zGfOMSL`6zd9BIsPD}55-seAQYx`Iz78R z894}MVl|-&a30oEs=iS?IjCJ!K^xT$*hmXuj?x8}HVEL6mr(Vgl^7%w7s?@ zo^x%np#8%-8ec<`itojx&jHfdN9mhYOMDM5eX^Ddnz+==>1OF$&`3*)aa43qsrgi; zTy0mb;f1X@)kP-lt&|ZU6R(2_PLyxiAORv_9~ibA%hE_YLz=`S7{QyAb@VU^JB77y zKXHe04WCwS!bYY#>)6E&$CmiiA!2Fmf>_$RxkI}SB9{IdqSS&6diD`r36p@qK`@v+V+7t&Kwp^$Usk>*A*B;R4o-9u zLPSY2;vy2UMu8}$P>IcjT7}k%OyDPehWHs{ns9Q*M2kQ!(T$@m%-r|@=}M4)0TP%9 z53I-Y;#|mSAUTP{T5&+bc}AiFj_^7$+B%Y@Fl-j$HV(3$R6Ycm4Y7XW5%I}cE}_$U z^++~77)a)FoqhM7%~rJWO&h`>>R~&n%1+kIj1fR+{*0Yn_LbWg+OK~z!v035ak`6|S6 zE{Ti3?@!^9@7SllKiwYNaME$fC^Rc^iQB8!4dZiMGW`8q;`TFh&YaAym#`k2o%5-2 zx0B7?%jk7X4Dsam^v3I2=a6^#j&o!7CNnN8DRf$xhLX5hQZCDJT+&~!Ks!B*--_RV zbrhRVsonN86Z)PhbG7K3o;hj*pD(xHjmC#};qUF@K3}&%zbmi=$QK6z$vp=#lv;lw z5lREW!{hqnEP6km%oLvxn!KM!2*W+G$J!`=^o2ci!Nc{^g(temNrSdY(uyosJSCcP zg)5hwIIfr}u9zpTc-$o#uB~3qdAfG*0s3`NLzF*&VYFVYptU+U1*`%)Cqu;exYg5m zI#XTwnQLpwOlC_OD|CYqL=$Y3*E6CfzmkWm<&{)n>8YjET(g7X2CYiUBIJ1zIq*6rhjmpmS~j zUXD7}_28nN27VT(C%vzl)77%6F@u`A)F66_@%lUsSILnhUBSOA;2ebFBBT=j2>zV# z{%L$P5T;x@Q6N4j77HL`_3#0tAdVohC{Skc(Gc&6MrJ9q5Fw~DNtsIIkb37AKnO^C z$LOX#4k?tsU{OjLamcQrnn^B{F&eAYs*hepVxg&1E$WZQ>z-z}dVHqh1~|Z{RiQhV zW|fF8ZX=!5Mc(W8Mnnls67_Wtor>leg?HT^W)-x&D z&>6aob*KGQiuwaz#x4#_RO%rD)F>f5MjnU!A7V`x4djRrwCF_K>Nv?g+JXKe;-V+~qF%FkWs*+Mw5AesfkGICx9}&nDa8A=BIdsMDwa1}nT}-WfViFID}TZYO7|f17LG zLEbvm^=I>nmRbJ!FoRfu6eG(Fek3hl-><3$Yb8r4LYZT6S^Gh zjKrGXV@Xm@F-nS6FU=G>WlKhVr;k0aWFuGQl`$k6+8}7~%831mO?PhBPL{VlQ*QZx zdZyIwc)rqZ9{;lWF8ZT=gwBD1ze1)bkyJ(+Uq8rV>+Zp>v<`n#oIh9ttpERKh{qLs zJl>mWtQSK((VI~C1GvP3oMr*|AIAC!grEav8cl-Q3YD{ zllw_2u~?&SBbqR&L;Xt(K7=&_n39w_L|&i5UTF`JB}~Z>hfgY0fs>&^SohCn4t}*$ zDSPn58uY_X=gSF)L{O!$pU>cuFc<9gLXd`E)=_yTNgn3%_aK$f1aB`&=civgJUA=5 zYR_Io2X)Z8d8cw>7OG&K+uNOwLny{=qN+*ovoOvHZma!&s9(o)XyA~m!iDR}ha_Td zfQgFQ&cMlFDA%$t7E|+S?C4x-8oWAzxfeb(Q!ihQy+yoyRj$Lz1;`1CMG`Jmz!?BZ zD6ev>Yz~1+C%W*7E9GPy2aG5!w?z!(Zxzhl#T;})HXE5yn!S_ zJ;RN%-{S{xd(%<*PKOw~hy}l(nTY`fE%Xcfw8AU9E4vbbh%s^!9Fj0eD!$KEIlLAq zBd;k*8N7)UqD4-mvzGkMc8wH>!4+K)hPH|Kbt;GGV%4V`(~;PsJDWPtmD+4GRj|O$ z*Be=|GXdpNZQXG#I7dhjBr&Rr^xbS^_718!s~%*kxUnFHnP1h(T1J zt7=4$;7SId1lmv2=KC$ZiEl=DBTNwC5Zwe5gb4^ajOJdzxfk6qhPZ&J-zRO!i@*oD zVg@~Al#hN4={1fh5fMyRbHaaoGoFxF_+y6XsK~3@HO-D}&lUoytx z{EQ)jdCe=xLfV$=Nmq+?N=EVNTQd?u;CzD!A)y>0N{sr%*=!+9wh)385>QBdip@eUk|D5lVEPPMB zR@j+*xnCotfE0XGI&yw&zK`8*Q=g98#BJTKcPg{XS|)y1q98_a$eh`i&5?oApj=Ym zlAFn!f%b`b_&I1r%24R`cyPDNs8Oy@OWM*@Nbp=DD#EUo_Ks_l!IG6t}2G(0P+Q#!m_t66$i|8M%O48pHL?THwJc{ouUCz zk&nU9v+`0CH%PrlUMkiTEpVR$tsYYbF;lcKPkF=RPGhRmGzGV+RkfpDaIc;LznTs- zLIHJ&=W(e-)ylhcTiq-pMR9G7C`5B>U7`Vnz!`NqC?T1tghH^|LIr&RlqK1Q z>fwX{@F!diA4Zd>Y!N*yeFlrGKLRyGVFu>)kyk`11Vn&kbf*PYppgnb_2w2T+%Iqw zt8}hND}R(G)d*3)7uF#&e!7L?QBRqXr)f3mk8ahzO zF9X;U{^J^zL?o~ekqZR(L5D6g2<+>@`=WY?(U;)>U8|K}Y@m!GLjeKz?(Fd_FNDGt z=DpDSq32TBTvKG?htaIqypAbcG<-!Mff&V-h6;9NLo8_|X-M=W4T+ldZo{KyNT5Ii z47_Hh!h-!TTR|E}DuZmfn1%|xWcXFfOF{r?G^I3YgSNm(#~FC0v?0ytLdx6BLa(uN zI`KMncQDxi0_g5wcp+v}&5!A%qz(Efm|bwHhX;IJqz(n$5J9m3->1PYbKI&I`hA*z z<)FVnfxoB5)tt62MhY_aKxZ^++e@}5?UHm`oZ>^&nw#q_K~HOQ{GcU56j$hVsDAk| zt6YtNx@4qPq1;x2mSMhCaR58Lb%-T5LksIc(+!jf_+m#Pg4hN`0YKf0Z5YdkY2AYs zUON`4STvyApg;`JH$wqKpa777Uh#&_07M;kyQqxhqm&yT+ew?E@;g2&A;wGu_CID- zyNj)S$HR7X^CUaIVZ0sV(W@YYN(iBDC2#(kv9D3l!8LhX|Xq$q;EG}5fMG5n(BrusK3)5oD>t|qO9_vO5}YS*j#fn(O6VnrI*~&_$3Sjwl4GFrL=@FLXg%zp zB7@jL+EVb9Nxke4#2WPheJM!75F&A)Sgk-xtFVJVl^a5@Kcb7!ghJ!o!0VdtnCUMI z;+qP9j_P;7mtV{qPO;aE9WDadVTl-yTR?l3`c>6?rVw2;(bI#KjoveJx(cI6Fh#=r zB3Gi&a2PK_>nyCo!JTX1+MKux`E_SlhsWhH;UGONEwy+(@MZulsOW}dS zCcC|7m7ZdAwsg>ux1O zXoVo~I%zK-O}WuX#uE?(##atv2(LF&ILiwK;)P=I0<8uuZre4N8&Hkr3$0|Jpaq4< z*LtFvi>$m>4!u;NyrEfCA$x28RI8{WX6fdjHL{~-GJeeB;X{m@+-!jZ%lL2>S;dxV zc=;Yi)0sl07y}V8c?bbNvVmwk0>I}qY#e5dn}$8R!suUebta%Hg`h`Q&$Jbf4zhF4`7is(g}<>o=GEA=Eq}40lxl}>{(EbyCcpGAXADoA_GP8=OAF zCah*R{AMul|0Q&!Z&*(5b&O;99zUrv^rcqq6GeQ3N&_NNt}pMu?cS+-?V+tSVXSF7 zOAwhB2;~eTIjnHOzoUf_Vg!x!@vEjhd`p9Q_oIL1JOC@)&u{X;7IwSPhCxF_4nwi$ z<_hY^5d4qlk;ZLg1RB4h_B(GZbB~z^BdMp3|!T zI6dALrbBQ`@y1OUa0fn9Wj8-@%mzMHZnrNgw>zGyurZHe*!a|4{E4$CQ7C`CLv1~rso`Z$j1;}`+jAr#Uhc&3h$ zc~o&{%#CshOP-!jLX}Dz!7Z4_p&unD znHu**zA)L^MxkiO6X<3rCq!ma=!zSTa$Eo|%E`~R*QuLBl#^|*Qz<~5391Z74^8Kx zIl%!E2p=v6?4cjA4}2q*AbId-t*?cV!*hu+8KvM;t)WnyLS~`)3{2PLpPI{f6pHo%RIq?& z$UQVSI8llJxSB1rDOjYP!FC%B)Z58D7+dK}F&y1X)-iKaD=nD0xt#;q35ORsV8r!O z%(J~H6=5@Iq$o!+jhce2O*^ngAw+eNiD(pX7j&adh)&XhtkJ)JK1Ihd|1{dNi(I7p z{Y0bOgGpwT9bE2lcI5;pk&N5&t*G^cV;Z2ORm9Uq8sb+{@*Z+wq(efR|D=P~Km$bs z4HWT)8fF$Bq&Tq~TfTveemOgH^y)>XmMUk|RtzKZyPGTT?pC8-B7vE_2E(+O08*#jDi86g0 zh?ed4BF)Dfz70R?3sLL)>4A19TRGGn{;M^n{=xnmZ&_`q&E`G1(*AfGgq8lYb3eWD z59s9|a1Q_N-W|1zE>e*?|C`o7Ln_yqzmG_TB1Inx7e3`4*YocOT>hCGTRerGtH(2| zXYhuEoAo{t(05ESR_vnUv`Yi>vaIl+*a4^RX!v8y)+RSdZUnEI41_A!(CulvcVpa! zucQA?93mf+|KXQT+9NNYGH(j)*51QAPMH7Etz9&UbemVauDH&KJt{utc;}EP^W3%CFQ^&Wj>Z(_B&0 z(^@_89+E=0Je${eHS6x9G|o*@1SZEY2v)71X!9NS3HFP$D$oiG7O{j@nNEDkUakvt zPH$brO*|>;&3616a_u@zbSghU5>ro-qD{0kK2VX8I8A0Nji*xopvoH96zS|x{X`o! zRpTYDp{`#FHctdmWw65Oh7EQ~?Ggu`w4;2{UVoke&{)fkkSRHDl^&6Q zZZ4AMgY;3;iW*^bE^fxVZ-D0N8Va+wqg zx93K*Wri3ZnnmrD8ciP+YE+^L^RGa?);%;uImEA`MU-1QO3V>iDM1o-hFs?cJms<+ zznVP)F5S_=l}219=tM;Q%Cj9+2lmR9!0+8B0E5Zh++%L0Ur_V;B1mRDAQb3YNJL$E z+5jM?F@1DvM{)2*jxDD6gKvOA84ct}RD52ryv7PK7v+;Glrz{XSwmBMJ!N*b32zR- zS-Oy;vnjUuNHeHD$-sK@r_CTXm(=4;`oy**NoY>l6C0q=Pf4BXODpo3c&kMO*35QEMQ$ZNW88d-0dYjZ89r-E+ePWN1j$l^ zCD{!r(G<3ZRK(&*jnTl1MWLl7M#FaKb&SrtEL!yvbic{!53c0nIvW=WqU=^seLa7k zI8%oFX&9?XNl^>QQlBLJr0HkU(`L9_Nd*>vfd0ZDVwxA+%pnR3`Wq>yCtx+NiTX+Z z6f~Gv%~t}&B|s&-as#`hZklXm+oxF7OOII9E00?BuIa2v;C7I}ZJT1%Bumv>CRpVr zD6|S9%dJL>s6?cxhRkZ#<2WW&3dj}^fzw>!y1NqYe1fx9zg4uCpa2uj9`$dqdS1Ql@yY!@m2SyR2`{7p(93^pH?a@%r}tzUB1s zBdGblX?=23VEI}mW6IM;Q9r+JnN8i&#Vcw1zi90e(b}l>2}d*&k>9fPF=|_j4RMsn z&VA&2!`4GF+uCj3)>AfXL#NGJ+h&uW4%z+QA-i$R4*TUjCHDQBme{v%SZLq*?IQEO z^@qiF={IkB#;&{V1^fAs4R+JSU3UMhQX988WYgC$3t&^X6>jOI_2mQ`$)=f6%|3n* z+Bk@94F5*677>eNhp`@mZ$W$}lFLr2hM!aRv|~AW2rkkH*Kr%U4L@&t8kr7eyXna? zyXVV)tn-juaT0fA!TbuO3VItiW9x{;yoyj z5a>WZxCc~mv=@Axv_)2AhDKp`AKqUy43sU5glIQqYLkyueahx>H3}@>X3Udg#Spuk`{F=q?ozMym)a7aP z^=RdS0C!&Pq@MapGbJ=N_mJlGbVjNg1@$3=!oy)aW)e7~6pS<@Dn=hooYW0VG8P zxm+Tst-3O@VRH=rQyv$mOhf-mN9qt_Vd^NE7zVT)4a@FkXY}m+61E?Vv)?v`0?}Sa zHO^>Lq5cw;PSa% zCgdC25&toS=&8fSYbGzuYlRWpQ2tuhjJM{Jac;U&Z2bfhO56s@C2J^P<o9bCS|9v=8d z$me>y?2~udm=g9_ffh86WVFVSjA2*SEAB&Z8}?$WJ@jPAd;@N=&kXpzeXJjjgpXct z=Uw_kyZj5kvx~3%rCssWKiE}YzuBH!{<2lqcUsBHz4o79QD4iy+xZue$6-2C?_}S; zKd_vf@6${v`r}*={kfdZ<#s=^@6gdXosPovSH*NK(gsvh0CN;xuMs0@*K_ zS?e5W-+0PkQ+R->B#1M%{*R4Z9JYH$y<*q>e1U!Hs?m1-fIDdIypcrm2409>D8poZ z|LxX=8gG^F>-$?~1aONB|73kGzSGXXVyJ!g+tb+<_j$X0(rY$+L8U#qnor~`C@^0m z10LFd6iL_1L}bJ9Xp{7 zITg2ePsW&E8MSvitL+WOza|f@;M>d2jx^;cfvn}xlrW0?vVJ&`pL#Rhj4)@E@GGx# znyMCgx`E6R|F<5QAvni(F0XT>*OTsu2pw;T66;+G1oib=2B5uZmLu-VQjHs66_L3@ zV^t_9WfDI)399Rzq!KyoiNZvI&|;yRZzUcq5D^w>l@mOK`3yBvKLZB~bxW#inpWU$ zty!_2(n<2S0=SsR({ni<_POVmvgi|IXZWsOzlKIe`a`>6#8)A(0Q)KVHRD&aex2>S zShFSF3Xyh__0dHUUWkV&5b60tufcMd2%V>}UzYPk@JcHq`x&HwWh8`P8F`Ojslr&M z{Rh_b8p-3)v>ve$Sr!ry2(|$;`9?$Z@1b#%dCFq46E4mC;}uY8LgOJ z1n-1jEi%zfIH^Tuo+Goc$Sm4>F|Lb^u%DNP`MefL%-=v>*tmf@Rs`1a8aVH7LUB|R zrx!qQq?=p^z=M?ze2e@tXNQrc9BKJQS`E5Yj9Pr&{$o^^{yO2*4e(v%^LfA9pT=t3P#{UGwSN?ZVIgh7HVqZy&w-7Q6JCKiP$!`ITLK z_3!PIpZl?0^W|ULM=$w~<)6!V7*xkTx!)sQBSF(pFEN(?dn6okK75CDk18o8Qtmk4 zPwYQ_NFcfWlucRJ>R4+81dypWIVn<2Fiwi>uj1DjUg}7)B)ObbY|=iv598n{*m}ae zrAfPS)DHXdb;Z{A-;|xgLyn>J^Y`SBzCTdr)4_M6UEsTgp*c5M4ww7-{>V$b337$C zbW5M_ch=w6Cvz#oZelsu4o(~Jxl#7TAJ4Ks4BKYI=T=z}b1WZw=`ZHNn$xy0AB_Q) z!`2cANSo|4f-F<4B`!Ogvf=Y?vWteodABYmSED5MM|kX>XX@;(#Wgl~QLW{FbDVwj zi=*wQe|jGB*DLvrO}XV)c3>GhU}N6VM?pp%8Fon7MrE=!p9rididw$4SE_W0{6Yzo zu7c*IN>79~Q-tPL9EMP)<=kA6*&Ih^u2Uce`SAceN8=g}^6GoFJY`On$x2s^c@L9` z#Ab-o+;|J8P`YGs&ROcx%B7c%&gP2ZoNX_^9*?-Do|QvIt*;i?8})0<8n@XgDk;ZS zjHPY$9@+Ls>}Y--ppD4 z{Z9*-T-c1c*%lOiO>kAUI?_PpYD&YDLMl~LE>|VPxDq>OEO#^hUEcOS+WKI=7R2v; zwv6@x+CqfP=4zSzO?Y1iWBp6Q=3Ib&Yoy7mP`N~+SqbeSpU@R1$~ddk;h2406JxRBXb8SN9wlEp-Y zKfM_7j91UX(;gtu6$i0YPGA@FdtPCe(Or|Vy~9xwWs3v5rAe})U5W~$RG%m5d-$(uVXDz=%lMKdwH}<7`!0N=wl3 z<=DMf#uz;^|=d$YrT4oY0leBG}U7()Q1h-6(!)0@}G<285 z2a=+psF%W^uO=FcnxpJ7O2+23#P?fnt4tm#dP&oa0d_kbF^-b)lU{dc6u# z9^0XwHi)PlMiO0RGqoaJ@OMB~E?*OCv0X)$wOT}e;;&|rUlS}iQ>#8&HItWVdm*n$ ziJ7CY1W)8owE{N zvIg@gY!@Rri*id9UZhDy!MrB~cV2|Y$P?)`lEX#ey%@Edz0W;wqkgR{;QMy%e;|84 z2vGY+Gxuc-WhXb;{i3^A-Ooh#!5)UTe!sPAt{iAzz4l(a;0u4S{@31U{XTiK^}k}E zUGl}-$Y=gwpS=3N?TRnnU{`+j*LH3`-VJ69`1)SYh#Oe1e;+8%$It`Oo}X*_INDPo zPLv1r`G0Cxe{+gW-_mW9*EBn8`cU{`IIQOEdJn1yr&pM56k^PT`h13ytPLZxd;rmK z9Cw)d5_627i`)0_US=Qr^iVQI5!o-u!F~&g^|{INe0~4K)7`|sTgVx2<=R_#2{-cd zW@ztE=AGxe)h_GDDxWiX{L_iPkYO%s5u%8(Z_X_}>zm!ZGqg$q2pwK}?F9SgEzjER zkL2gg zGTKCc?&F|f2+t~?7L|`9Iz)-dK8zaaD&QlRN%Qzvc|E;yJ?9)hG9?b>@GNKQW9jbU zk3gLIV0vnSD9|lt_tNM>N2B4h3`(wclZDQ>mp~qIaAJ=;mmh`&s)Lj z_aE|G`|dNK2{4(Um@UwPC3ceApO~FaDe?W3<|@Nsl4Scxm;7Nm??`nKRw$XoO@{EH zZbfY>A2&?qK$N(yOk&8yc#O8sn!~EI?Iy{FTisB=nMSMBVFqDl;WR2T5UmoZ3Z++C zm6wf06tOcLEJ2$Z+o;Q|8WsFn+=<1rh(#dBA7G!8k1@lkGK^F~%|&@6NQ)`R!*LGY zWq%9%xaCohtG0wrxPc{J5dlzf5y~0JLnu9&EGd~H{yIyl194a;M+J$v*cX``Nr&}V z8nFv&$f&h*ORVp&z3Mq-HNgG{vH z?}+7J`#Pl_=#uh1meKXpJK7-Vk{|3TKP)k4qe`1%EZy)CF)zf|Z=&qoR+<8+u4wv9 z$hu_)6(+WlqPyiY{=c@)!-a(fU2&FP2{l~(B^k7B$%Mf|Z(?r7V#~`+<8LVykeAn3 zN!3(FeFa^=nL0b8-*GjralBO@+_K`WBwi6(QW3H3J94Spna3^b?;YxSvVA-LLHN59 zSnd)(cXA~=6RFdUT)l#^vyM^*lxw-1YuVX7Ysny53b9LfL`k}Z+&pot(~)KD^`AyB z=1^x7^@>E|QY56myduZSNW}6=IIDWaoKjS2S>;()#*WG|I!={jS}CG3KN}lq<}%Cp zewGEkoM;>AIu%MA;zA<5Yyw)meB`4Sl@l;;A%4N^g@Y^tVI74%@s?+B*9pvQ_?jHS zM(T6c(g?CLK|z)RaD=}s#`#!TUB!o}<}9HSh1uKU^4Mqw6NNoJ!RJQ8tCN(8c|4HM z{(^a3tdM-MZ>D`@J@0>*N%=0j=}vwnL#X5CS4jB)S`2#1uZr)fOjsg5It^U`SsyX4 z;Wh2-(gxR(QA9`VdVgtcXTjBTE_=q#yQ-C4eC3n&wEAIpj3#<{r0D8pSO|du%SxvB08nl0{Xb%Fmvg)uAG9rf35_n zi+6XW6BtPZBR1m|7vGOy6iH)+#kg8MXUh*acm++aW)$0}AxPa!E+im=qPO z;dh)Eu5nXI)5m#HVsop1>2r3^ZvE4=^DYe&)f?5I*ay zd00K>_hj6SN9T9ooe7~#$o+JX<;@uEV5ZdNT&~w_u3Inc4$g~l9uVLX#qa6Q!LOdJ zLu7Nru>$yb0eo^E8={DLu4B2}?D7*5!kC0ZSWs(xmY;PbM*!)WK9dg={AhqBsAiYSj&D$@ zuq7|rfoKRt%i2{$_6+lE{Zsq1?U#eOc5+`nTrRNVM0o$QyPT)x@NXTxaQfLszL&`C z_GDAEb0MXf9H8u*H|!LJulKB-Og<2cV`W3f!f$Hq&aO^WooZuk#)7`cf#+>AO~|&b zgfO63b&+!T%Y{>(Qk@-Yoci^PwGPIjFT!!Se3Xntq*1YO9Y<+i6{nyUaabl%o~0sm zsLr@*6uM`}QXpWrPow0BM(RsI9SJ8IU&cAeC`C0WNEWWz2fIPJuJH!)tD;WTI_o`2? zARMhRoL5uPvR*(&=g`-5bR@pe%UeAOe-=TbQDHToR6Bnz4S@1CP2w>!@Dd6(Oye=C z{1J>(xaC7vz`J}?AG>JrNd z5upk#WQ7q*ku<`+@R#n&>ZOGW~lQp#9(>U#iWmBz-S zVrn^;vI28bG;rQYpIYa7WteCEQnXi;Bs-}>;^-=Z+Ggj~3? zC8FYDm>XQk|7t#7L{FZ|6j3%=vezg5>#4X#Tmdi22dsH=N#-(#`7~*zXg2#;GXN?U zBQOTL=$y`0LUjAr?|y8Z@4Al}{omFYQ{wOyWkfO-U^2uLc5yFe@7@GZ_M2H~!x!(c z?!(g1KMz>L>)Y8C*8s_DvBF;UjMe?~Gj{eBt?WXY?f&tKXY9}1UfrmJ)jtm;lT@Ir zWZn8|--0r{6>IEW9Pu{(cnoW7T%3G~O~jPDVHo`o{&dCjHdL*87gX5br82j&jFOGj z>#>NaD-h&|EfxRI1mH(>}W&`(&H#zaS6qT@mVbhqV~>ot@Kg0Ef{kK~B@= zSYKNqG+Tne7Fb|gS}lJw2nhk>!KgnD$hmtm%KB>o#RP{)Klc*iu+{pXhNXT;7|&yI z?g>ucwy(N_geFRcCl&0yW8@&Ud2C6;KCvtRG3(Ez*&(l6Ra2c z7)o*!?zLkcD99nii?C=1O!z5kP8D&THhSplJB`B-zk{OQ=}vOWc?O1F$G1e%#zDdrH@>=n)H z%=^jcoDDRc#bvTc?^8mJSHSxvi68NTWEb}5 z0J>b!(IK)%u>M~W=`fNU^L)b2*eHaCOL0z5c?+xDpX|epSXERc_PnZ;20;(}jdvMy z5~^s;m%%DDl>SxngUhmWFY;9>XWmG*Tc6t4(eoJ^2EQD_2L^Ow179#53Wsc%1T~7U zCZNo`4ubl8@lxQzwoc5QO$`SV)deJo=FOy*M}XAe(03|%&Xl}{d=7HH$O@Taf6HF~ zw&f6$nzMc?akS*_ahtP&{5_DEr(#f8ehW5zG9C5Y2sIg{V=5#>Z#wqnP{1DS)mLr6A~a`lS+*6zyE3A2 ziV6dqW`-5yY@$xqa_XL}uw9!!vdAiw{h|Suo5n(&_AN5r7HW~ch~He^Vi*=$$W&9q zJmeoA7vyWQ^Uz(3$H-|;H(tr!$-Kw`fur^I3&;D(9 zJTwvBmE#aYmd#aG0q!zQy9*)S>>?YMw!>QW`iu~gd+pjAI@ncIAphf4O|9-l4_K`W zAHf&d%+9~^8EbIallJF^&F$(N+e5qupu??9{^ZleyTY$^s5u@dGwf|b0>Jw{?H+U% z(*Zc^1|bv&EXJt_xMH;H`Fq;&KO{NmS5;UQDyI_#DRd&E(%q6}M}~v{e(G&Xv_8oJ z{ZBzy@y_2u_hdbdL%_LvK&qA?<%3b$BWmeU&lgX?jN22(-gxbSY_V7JkRzKJ`pwn%;_qI8<$Xm5>TcW)&7TFe%Afg z`X9|Kx%*4D_I;MWi%6~cq!&vo%3y${FhQ7J8HRZ;thg+hWygqm&Nlm=7ESNzavG=0 z37}=_?!NVO!;rkKjwigaX`hr43~VnIx`}h=_~@W{zz> z5pC4}Vp~Flu%0X|r=_z2_^eL0Zu$s{DtlF7WLgxC72KxxwVkh>N+D}X}M&AQFfa)W? z%Z_AVv|UK38`aQ1lh`I4DKSJ%(9BP8=nx`TymFM45gVRGkU>PyoQWG&=aHiPl{){y zF)HGwD_f8vh(cL5CPmTge~P`JFejrckt%Gmw28181Hgw<{LE$}Yc}A}L$XX)k0WFm!L}{Eu0HEJexnDPi#Cg}@h% zN&f#e!Y8SbK&BCv)IkVZo|Xm4;;Ze;0X}W)LrE|Ov7Pz@Y=R0_m8?t10IBKR%fxmX zz{wg~GoB2$*ZGRpz0K*ZnT93xechwzZr1vDEJD1Em%U*s%Yu!nYxq90f=yioot9Cj zv3x82LP#9c{mc!sEsKnT?5wp^Buuxxw72-_#D4P*Q-q@a(Nl-*;7|KaEs^#f+U^XX zC7S=yYkB!wEfQX5S)sKgc$3^6UGEYrc9d)+NpO?xD5dyq`8MhsrsHy?zM;1p1?BBR zUE#K5qd-%CCCjMo|4($4;CLKW%8Qa?{9<8621OKpRk~53)zV1#Dk7CanoSf-6}Oy> zt6x|aVYlq0+4S8ATUlAiN{G2B<;)Awt=lQq68idW3#7eB8%UX&sL8ot2*2|_R+QGy z1g~7iUPyW^kL5F_(JImA%R{OqOTIajxf)iQY~nQ8Xs*%iD8X&KMpN|I`FX_gIFK=2 zsXWSxw?4F{jgVDS6U%vkVHE%XvtixG%9W$GTl}KYM;B+LS4dv+vvs zyE>^jkcOtuBO?2gF83RZNvc7rm~vB1ka~UaA<8s5coC*fa`qHL^XkH#_VVOxT%7$e zK|aoVKL$#l=Jpw@9Vefl1CryEV@_L6(btC4lUL5EFIED{#LZrKuuves$(LS32Mn2cx~7uK1JQDC*Psw)!RX9Her+9 z-e#ViedDX<`y=ypjJ{9m`<8^h(;mC=c6(zGOXu06h!@oSi^iT<7WLRX1M~&@u*&A9wiHcGccsheHp)RUu$>c4fgzFoo(9C*T_j6 ziC$y6UfcnmwkLYElZ8=YL5z=~8R(0W8BAZf+=Cw64d^iWi#lo*2T^Kh=1HYFZI+_Z zIFSqu$40sK7(=^SLJk@*8<3Tv)=B``_n(fW?`kriM{kV(#1@ zu@n0W?Kl$7JGPtPsh@V1+p!&Gc9IFofT8UnTJ^Bx-gmTx9gq8wa3WZy3YFQ@@wa|V zsR_QN%^wr(N;!Ge`c-1018QD{yd(Q;+|h~kYwS`7wdfTg^KY*HDB=afwb-Yf=fjsRGmg&un5yAUiz_1tNDYS)Fh8-{sP1eC=T$_jvvdtLwqnGm3WOK>d~jCGhb*Himt-4vXMlet`0 zPXm6d(QIqp<5QyOVBS0I$8|`d`Kfl9`t26d8>@2L6slBBhKuT_Mfgq*4F}88F$$L1 z-ov}?;0fB&ojPWFe>!RhP9C>?Cyv{mpN`qSV~5#)+zuQ&Xgl}svRwyulJK{k{OPbo za?`CKZ@uN`k`_-|#g1Y^UW(V)o>ImTa2EtDDGS1z5Wj4!YVr@$cq>9^4O(?wk~n!p72)_Z=(AxYi?qHFMCs?%k`jEt4i_G z1X8%Dhb^D{u|0APNCJHiw)(_|EeCz`Nl-&mC~@F9CSqy0=jWE#$Ys0j@s97A@5~46 zn(N!!)qiV?hI`WLUnc$bgf(dRj9o-L>7~~;vxYae27Ux%)+aCqOQkvs`p!VGse)qd z#$v|pG5#UpFlPGPE;0dSQ#|Xuj@D;J0WA+vVA62E17DT35_w5ML{`ncR4+?q6%(f{ zJ!YL>`Q92_fb9y*)xqv~2Db_ll@|_I9H^5W(a9^+Ry(45AQtB%`=w(X0*|Nr;t_D5 z$|0+Yi0)bb7$13!pI7@6*u;x>b@cwu9~hHwh`&13O0Z77PS)i13HC_aS=OfaO6xIh zqYZm6+lI}^w-=Dd-b?uM`~&AHNxn+LIoiD@?)epE+T*hvmGa$ce$lPXyIahw!rT_C z|1=$On}4{83cp)0QT||^-cGmf?}zQ_l=XH?w>kFLhu*ZaZh3)#C#rj%-@`6Ry45bP zf0wO(`(^w?uaO)>a2TbwyrMMV62NNU!kp1=N`lAh=SEJ-P1Tj<>;YBRn34-~CG?_@ zu6_Y!Ky%P;;ZH_b?#!3%jqU@jQSEav3*T%Po^g-0`u9CHe()e$3(qz!pjZdjWSDm> zByubd4OoU*u{=gD?2ti~gb1N0Qwo6VWVy0aR6@olu8q=Yj3ZouFy~qj!@?fAB`Tk9Q5(KQ)%3V(_<_(mkByuK7P36K( zJRHTtSGRN$_a|`YgC5ck8+gxG+Y6Z zsTyIFMEr?+DH_H72l+flzQXbx%qmnJi$Xpx%1I=Nf%(NjPAwhTy3NY+*IIt)ON(rr zZJWND#+CTGrBfnCW=n;Tl0JdWCd-ArxBwUeV@Blyxmr1dlV&60BK#&D@xWM$p!SA- zrG8CO@|;Y{Rv3Urbrepj2)=yc6AFk^NSpML-FwAN4s?%om}Ntk6TGNmi^@kh|JRs% zam8MHq}@A&K|W*+uWRQ}cOem@Lfs#(e#*|j_8I%j_08<^MlHacG#+-kb1+IK5;019 zL?4KY6Xt3ug7kL&?)Yz{12&Jiyu03?<~!G%RGwfr0KMb9b5-`r!fNjvIF9kI4+)92 zhNAF1vN}2s{Mr&Pz`Za0h&&h@5m<2&a$v5GHudz_S=IcDug$aMf0I{E`4qhDahV#G z@28B2Sl*xb=|JdiF+pZ1Eg0MS7?<*&q^Vq>eY?>%Mht+zqxEA>TR}!4*v^+odyGz9Ht-67#x#5_Y0a*poM|%34Vc z+#_a)^^et)@{Z{>pFeC^_srXo_&91o3HI=XD9yK zmX9AyLfkl)E*_r8G*Y}6*o7BKwc#}TG?&T@6v0+{C|A+zHO5OXTZmJQJB)?>tbQ)O zJB60y%^r!ud(l=-nQYHJ_<)^J7uPSP&k}t%+1V5bee~vs?G>!0fteI`pZ7Zczm8V6 zfMR87?X74r>kip5{ZZama6?~V8qAw9lnoE5Ft|dV_O-;~bswPD*4xjhx>NhI>;$vTai*Q0>2!2b#veweV~^~0%w>nIfs~_Y|<=+V0Q+hn=2>as_{Ty z!pSrFt%vZ|rxU;uSc=s773pNt6aan;JC|ff#)5hl3p3hevGHppcA)UMCkDF5w9CmZ zXKzdvjoiqm2i(hjdaiqwvoQL^!em)QDKs|1COF&Z>8y!}Ln5y@{n}(5DE5Bps|@-E zb2<`kFfKJD+G&K$B#8fWsk_e+1hHK}QBU{u!o(mWeJTMo#$f0Sb8BEHm6s%unS*sT zpXks${B^OeW+|r5m{AJa6s#R@Q7Xvfe^0r80!AqrK1`W^h~kR3d--O3Seu@C+Z<~27uKcDwg>F0cSm|QF^b2iSfGEL=4i@N$h3a`fcsGPjVd-W%c|m6Tt!z zD^*O4S7@igRQj`95WxeMXGxF8C|@=aQawc7raKnA8Rwims3AlRYHAp>kE8;$9rg^mD)li8usn;|o-NMs4^R z11_Mg-OO(I*F@_zDQu$`9-wGUr7OH%FohOH_*V|$1J}J{WPg!rz!q!&P)>(_GYplZu zKhP`Sd+RwR+gg)4TEE`?cEKMWv+t+U?R^&RIJn_*fyx(SAkCMxLL6PC>n&CEBm}f- zHRg|SwPkbFIURYSB$v=5HIqwWzW_!(#a;a{Bb7!EW35@!KGvZA->hyzGfRwnn*YB? zQSndN!wvswDP1U-LV<}Kic$xbP@`orb=(%Uw*qXaI~TRHU5nczAiKLjPA@!Nq45+S zkIcd*mPhK*1aWngT!52Z8m&9UJcOiIfJG!BdnPMUu&OwnV#q46ZeB2oSMZ@m)hr24 z(-j=|rllhrg|JqeUudntx1mfXe-WXvBCK<(zpf>#%l~i)o2uvg&;Mkjnp}GMV9~L$P9X|W zhS4H)t5WgvDO8;mrdwNZnPsh?#bx-4ZQ$ofL28vvBi1sk^m{2lXPg@28ret;x&U*x za-X7~>7{vG$dZ5gi^wu$(wRB_eY@?F>zQ94v8Fwi*-+ejeZgF{(2{+#C(b6h_hjR| zuf?0@JNsdWImN2{1v}>D*falhV+;H9O)c%Ojh?Y9Zfs`P+$8ZwXn#FKUhSKi+Lhbj z$IGX_08IOLSW>LAix7v)&)$I&lf_*eGOv$O5G2Vb-EZyst17nA*!sN*S#LJ;K)Ier4Sb%^#nhpY#w(b}AG zEd*s;Epdh4Dw#FamwSR*PvGYVO{q}rn?og+-=IOV# zlB8cmtI;`Dx7H1IL&K(M56X`#>420Sp~@>?NN8e_u0$=aR_cO#Q(U0I645Cn)^c&O z@^alZvKIozEK(HC&g3$UEFNfIe>%}74D4WksPmYeNxrDhM;l~cZ@!WTh#`H@9=M^g zz0#wvE&uo>`+7DVVK9Cu!PeU~zm+BIAn0W;uuX?h+h)+Hm8yebC0yhKwcnF1BKX#j zjgs0p4N760!cf=Fc%cewd?cze@l2UeoG;K{O=sZI%Mz95px>Mlk3#&gRG>*eI=Kj4 zVJ9g^$F)?^%o#^r1y#6)1%^-+4h?lwh>%9G&)L~o$T}7ARo=rE%*9z>PqvCJGwcBM zBM(NF+o8}3I}o7%FEJJ2rQ_+}Jdj%2eTcv$MFG`Wm9-%y>UypRIZc#ow;0r10Xr%h z@R8)_NDMI%ggNhk$R=&LLR0=}vZ1q>`(yG<-o6?uB>VILP)NxVYXlsp??}%>42of| z$^4l7TbiZFM(Qk>&XzgW0p&MB^YrT-1O0+n4a2!a+|xF z<=pDA1Z$2V(gmJTJ2`_4!EEZKRpx(gyNkcEvd9w4CHX#Q({vnHGl+(Hhsc=8I0)ah z^3Yr>!_s*0=yp7K$ME1CvF*oC+Rl?do3~#CJN3(6qMJ?~wA7=3%R9y<=`d6~bV8!< zAiloCcI*gs%TP%rIh0My{RV-z7VG9ZI^%90P$?M!O$qNiNXD;3>}^Nr zc@^8Svd2^&M5~a!vjUK@3n5p5U6Z>c8%W_f3+HG-Y^*{oo!2f!R?O2%?zgn^%aj?F zt}8ALQQ)*FgBYAGRK59zER1EW3MTS@;h9u_*SaJ=1HI4I$c66cZOD z) zORUrD+sNE20}7QkoVc7}%XZn&r8{lV^6fTo8S(#Q_w`wfKdmRGRjcvV=KNwzn9=zitPGn)IVStJM!sqPLZxXz;+M+ycVw(uJd`isfB2t`9{(0u1j%Ysscy$=2gcLbk=<)4CNq!_ z9NxuWtq_r5m@~yYsj@2EtzzvY%8dyuhkhFQGnYeepyz3qKd>BSw*p2Adx>G1v5I;E zvA`GPPs#D3u5)F|y?AMLnnIZRYbv1@`3|WD_O^UZFPbl~Iedv9YRwc{1$+v8mI9k~ zw!3np9Xe28Cw?lkpN@su#*7XiY?Um{L*qWms@^trR^&Dfe_7|cJ$<7+mCdU zdv6z3&E0tPV(2^i3)1cwd`meB@KTOp{ygsp8;3q@qDQca9zV5*YG)Lp&i}!3$Wc%W z>vF1wmKUsc340aA8yx~GAYf(LRu?X+=GBVr6aXtKv2u!k;PCG%_jEw3klqe7KgZ3gq5|hFkt!lc=hsrut?x*EB<~e ze&$rJDP;m@$#@yzx987cR#8_W$Gntm?y(EA5%6;`M+23w%W7puot8?~0pdH$*7V@nQDd_6%7Jr(2q8xjC z)#QVZekr&Iao@GGo*(D9K$ZVWK9sY9G+kPHQg!P22sG78q|ptV7`B8(WB&oCXg&^95ekm1am?XeZPez14-Z z_`c-&_XCL|$rpTy1`nxed+o*9rGusz;4&91&9*%B|p+jzz^obN+S?2lMd{L>__ zKW+7Ek)xN;0#hA&E>6nyal7Z4ckQ(gi%A=Vf&{yaAT3XYt!1<9Pq<5sj_bpzyH2Uj zcA21Xm+Az(U(@h((2Ljf{U4y<2kWffQ`0uslZ3!LHZ8**p)pajx3aCplw4~%cr`9a zmOAHLYGVhzYNafr%DA2)kT4q}dQm~5M41aRwU5!|w@{bg8;%}%dbCQ?aY4J%w7F?u zCx?x{e9^O3nZ}&G4}sTU!>8kH-AAd`=83*`(OJ4upR~GliI4Sl;IAVqhI{y4{%!YO z`;fiZ)uR#6cFLNb85FB0fP4V!s?Oyp-9HwfI-ga=HsKN|{nagt54qY-Fd4daukELA^*-X1_K;3_;6RBTI(iUJ{bWZ7 z%RGp$&O5-s+ru7j_s{O`F_|mbcNqSq90q`Xg>cHJ=N;sY>m50D$aWvvNmgB!MY1#I}$)2cybj z$OCfa+fjPuM5{Py=j@Zd685Dkb$oOzn_LMAE>uNmOFj)b=eaAwbC;z2ief-l4C9n% zSEwFG^fxNV|ItFh)mFUzefq!C5=zBd)IwX8SRkFS#$=Jp)RCgF&C{gIWnP&mDfeF> zcUg21D{~Q&*X5DuFg5udyWxWCoWZQ!;B^QTj9)Z-6Xl*~(yRd;+DQ`cwue)k#JlpE z*7nz{TiV49pLR0ua$t8QQcuw-SKy<&@|tHzxNBx-p7Sq@lf0{am-$rCQ>oqz)dn+VQ}nwgB;vopVipd#u}h8!#=4%G5|O0HNl5 zO4aTwsU#2I!gA}0PqI7ryK~$giu~-R6X?z;sXJfCv)FFC&dbMUsFrw9s7O6E@*%pB z+%7v}k444S1H^PEO4L)~lzP?V=|88448=mqV{a#(W}l$jiDe;pE=lZIiA#=7#CA`f}7)-zw<{y zr|6tb(uHzLM9=LYge3!{1s1~y*H$E|I($OfI3aC;koKlSTFyfJLC!$wO7&@RMfoA6 zEGV}VV_gZ2AEV^qDZwTJ3D!*?PeOZVyZ+CQpm49lyxob<+<}CB9GpI7K;pIalQwhX zqc-xnQRe;dnHq+|o07#?O>s39EB{ml7}y}hgfuopnrM{l;FgPsn&d_@Wb&iZSxN3m z`KjUUBb-DC6Yx}vS`aCq@JImp zq|A5KoF|8ZNmhX`E}GS8#Z*z!iM|wZ&&!l#4(r77_{rCkG|g1-C$THp&`#@CS#H8) zS!B-aNYGgq7jRa}{vz0zhnceg7bJP|pe}o1XP~zLB_5o^SCS9;#yQT)jOv0<6XfHU z#Z{0N^a4wn>HiaYE+-%cJ@7}i9Xd?Rb4hLzS}~EA^`EG7MDuE(H%8F&SDP1|$~q0c z7$wC!e@IrSM1<&!G$>n$L#|)SMVPj6!C(v&96}a z;&}m(=V=!kbY2MNg{AYds*#s)TI5v+xWv*IFtm=av(w2~*b4gAQRy_2@is*}S0UoQ zp{)@0%}?&2k>^RW>rN0_g8TFs(YGheb{zZJ_F$*nf9e<3am1*^?9a{(~nD+adb1dAo(Ya-vqeJra2bPp~#F7ud zKL7566;@Ch;Uc1McfHEoRkpL>OPUO=B^!Vk7E!N++;j9@1&Mp5WtlGbT%?qfPRJ`^ zoGk45{sVi=$BJ1=k)opwY?VdRjZWt#Br7+;SvkEL0FH7hPwewb@x^&1MFC4JDhknM z9D!G`*+OI)mT&nKF-@4y;vpzE{xg+Y?x;saYV$v_H(9?$W}zxcmncc+0yX*B z7A$?<-i3D8i+0eU(+DQP{*)J?Yju$&DdIod(z3(ApX`?r7(pPY`3=Ef!z*Usb3>y~Tk&=XXQjIW>ocGmdO> zbe^A}y;=#%V}H>8_@{0z?arkhC?fNBsRvHUIZb!5n%MQhZ8r{g)zc$ZL2X$oW2H9F z^0z0kPlS8e>R#F1+74Z1ePA2_7a4Il%nsctI%4n?z{6ef8aV~Emu3FBWHfFXH@VdU0Zr-zRWmr3?@VifCA zb*Z_LyXfW$4`j=%}@0=`fo&?ltT2z(a`Ke_@-xnf6}9Dlq!=EC)+Z&zYnLsh!IQlo18EF^Xa= zMJ(a&saAq(F@bKu1p1nLwcgmF79S*)Vxl0dh<8=lq5{ro<9DyxI?7L`vrnbJWQ#44 z9kdV!9VvwzUoW97j1I^qmI>l)s`?$fe8F)pgjDbvQ-iTsnU^rQi;wVrA#xg&tKc4& z&9si{u|<%33UhHY0`gH9RT_!v$|ws$MO(4&a%fk>RiQ$$8u_Xn;EoUzi$O_Gy%8=z z-ddcN-(?%uM>^$=w=Jax>k4GjD)5MCtS+cYvOEHEPQ~;dP|OvbuG*$1UAQn1kkVmnzfAoG3~3PeL4jp zwfY3a;}Gu=MwqI~TgKm1v=<9j=DWQQF) zwhJO2x5M!A0H{1j_~rrJc>7_ax9>PKJP7oX_LJgp=oIuLqEnHbg6SbVfJaWSpCrFS z+&}s=QJ?H{%J6{PgZm^UmH(G=5F2XBK{y?M;P@%hA5Nl4PuXGNRW{W6dx>``rY>1N z?zdnN=O7xgBIjExq>@V!m0XIV-#eO?6mN1gt=5p+D~W&E4pq04gI5`liiCHiXiBeK zz;pt#Y#u;tH*2c;DDDfmtlMqH1eWR2>pELlI+1fxGHx3jM5 z>(cwqR^pxr1-*Tjwx@{69LPu7_|i%~F$B~)0yQSzS})XDpLsxCWisQ%EfvTVjMdwm zqTzr{3IE9|UlXU1+EGY;^BA?+)k$5Emh!oJ{pJ?hCGxz=!rPBMePqw%(E*Eoj}2eG!(Lvx+d81@Zfo6rT0%hf0qF2i`iAOOtJ=PtOSLz#)jK2%l0qRns?=s% z-IqtP9fSB*K)9v4xI^EzoQ>C&9Z8+v{@%Jz`_Z1CwAC)Z_Z6!Xe~X=a=3TaYG$li( z6Te2Ag3D@o<0m#LKE^|~qtA0v|uB2^zykuwESb82iIUra)+3L~wa^^$E$8$%*K zU&R>rRYdiPrOlIy85Qw1qHHO(EY^JUs;#G+L;8}zWJLD2GLBt>-Lr_&IK^_*7Rsd( zc&u=nEC-^4rSoKx$U$0cO_Odq zb3W1)gb(NPPE;7(uQIDLcX``bSH*8#LO9Awyl!~lT#JkEZK`saDdec;b&CfrnF)Rqh=7FBY2asQ+N%>#2{Z>a2bab)w~E)^CC+b$xZAJ zv&qsup^#@_LX~iof(&vS0-DJ}ZHiFqB6V;?4pAlrVV>2fMXREgg<5nkFUVFvO+=`U za4zu?fSCnzg?D$DEY88F6B+9coh{_naF>%{uGY#R%ZyvQ(in^`H!` zhhiH5st3mDftVaU1Ur+IaB-B_n!OlyEB0?ECqCQ4k9(B%Ay~xf>lhYvOGR3A#xt z!VnxSCf+7@wFNe%S@dgimeXFbA~Kbu6eCs*>}#8i?74vdTVEE{N!-Er(LSu(|)ww+i@&?6yRhcNf33h ztDcG0gq5xY41^RarA2G`F~|CEwc3f?Vo$48>mF_&v_D!-E)W=oCe1 z=0HMXkyg>og2LScVSejjU)mM_PPH?VTJZ@YV;+ndu30$?YNAx$UNG!kHK#7<8NK z%GCP33~PbE@R@hkS?ehqtn&xy_GGVRWNtRKKg9jb9&FM9_`E_5mSNNhA?keg@EX+w z5mWgL7nn+8q_%xF--DgwYj`BAF);dA9At4hUawQQpNQKK!Xck zv-zoA?YhhEw?8H|;;U$H_0H^T_dGGpZoBVItDi)n9_-}j`tNWF^xYqR%05XMPs+Y$ zAyWQS>ADan+KyR6t@5+MC_LInbCKte7vY?hg(8pK5dIu!=#nrBm2X%ko1`klkBQk} z;fTxHh$ZtYCm(5zz|7~#30dexgLpu^<3J?zHBN#qn^4 zF098j{-EoO^rFO|T#bH3+eO68075V>Jxx3SM!?D?@A+#YGQ}rZ4tvuO-Z3P%y6LQDDhvSFqOQE|dU7$%8Q$)Z$zh>iA0p`Dh7&ekbfc^T4% zHJEY{HYq_gAR82!M))5|so?BWogxf^Gz_&QI*3&@s6r%ixrtLT9>$Kvfm3w`{xEAR z$Eob)A}JfcPB^%fFE>UlGHX(8}BY6Yx5KJcLh2V~~1ZXmYYH>4+-6U{u}D->$>^Oo{0^c?8uE z_aDuqk#6?q1mVarNEB$nw_K=&>nyR1mPU#JEiVS_|vnL`-NZ$LC!3`$nWOH!1E4ta&-uG3d37igBP zox*?kC@aBVr|I!h=XZy%!RYV+>}hcZ`|o zkR@T3G?=eq2-Cg*C*3tjz(Y8Bi+0;cf>C;n-E57UzHN2S!x|lj3`KvAQtV4jUPE#X zK3o#KEAirde)F7#G9cC{dBQJ{6aYw&M0ck!zve6)_L*V{F1Y}HsUYEpgkxZybJa>z zK-r%GIK&ec`#dOLnG2(22IqAy2aQdFsG<-PS>uAt+H!-%%!v$`mNCgPZzFv8LIc{k zk!Emz7Mt)A2p-ZV=ti2t1A0L~ERy^osD$p3nJX|DDwNZwP)<%ny$+byv1<~J>GW2B zr?@Z^m;q42P)#}t3!_d1S>?o6a5+bC=MduXsj;K#(BUOA%rc4(E+J`=6A5tZm?GWmP=>eziT^Ox zL|G6WM`E&PzqF5X3la{KLvV<^xC1-c>ZX(vT3I2ol+h0X*ISwN4hF)C?I9A!u@TA#=U3Msb^meZK#DjcXUb$Y z6j@S47N3MovdH3-Inaq6XBhmQ#z}R~Hlf9nv`H)|4O&hi8SLsmOZr>c`e~N2l(a&M zUKXh6rA#OOT*7{HlpHR)yd%22Q{#1W{d#~{A4+}Ygi&ex&0Dy~Mq`6~ads(rUd0Xx&d*k-x-j#ECA;nK?We-a`|OX6 z23pJH_4d-7-9%aJp^nIQ-fIq#mM;+j`8$-HH<*2LlxfQE3rhMh;rE7D1Bpi*u&}~j zkhl%j-i|>1-j;fqL~F0qAazcg0x)VjZ$X&t70XYJqnmO5SQ?a6mnThB?w*6``+qoGeP^K**IV-;meWtznRTmz7A96(}LV9kzE9=$NioTznu zcox=`*%Sm{{4(+M)O?yT!Ga%-wzl{8wm+T0;zRlQ)UCO{%|!c#GE|f32-NV#o~Vuc z5s6eXC1vrN^XX69vz4WN{00`BKKA2cifN%@Tq6zD?D7H#0JH=%^$ty(d1)|XvugRM z*Z@Glauz#X?&6_ipUV_iQYURT_(U!S^S?4#@vMzFiltde<7gmt_~(Wy9bG0r7I|YKGuGD^}rb7n^7twbb2}p&9vqZXbXYGCJAv*5ClR(9($x`Ubo!h`3%_vT-XeSDb5^g~LscEz zpYi!C^d%Z;8@`_jC^GCQ0gA_{lPnc+hyo!8em+J7hj^jDj6?X2ydyZNe!~hL*h`RN z!XY4X5KbJ#u_PnefkVYE1KEp)W-@7q=F`@V-mpq`E6Z6yf4Wr;7?p*qiA?+fV63Ob z+a?#CSPhH{64AC-1_g?cHkh!=D`TA=`W!c^dhPhzgPQYm9_Q zoJMjb6_!M7lrVu~DT}ZTMs-zPBu8P11zRZpjGt@cbox+CM1K&51QUwH3~-Uh<@cU; zOw|ZxAVCV@Lvb37SQqz3g7EmzkFC*}O_=D~TIUfV8@gl%Yi)uEFar%Bt*qMcHITLX z$R#`N`nyLGg7FyfgdOdIzdU1q`g=FKvw5;LX+7F*YdhBN>h!wZ(cv}wN1L(sulBFm zZTGV>Ms_5SMwVDd)v+W&?f@1z&pkh;t^{8ayA*dH_jmitH6#k1@wnam^gHH_TCm3w z-decJybp5i*g0s^~ui8u&-f%CQ$wH^0M0qN*#X|=0C zp<9KwE1#=1xX+8-qt({_txW4SEytR6 z|CX<-lUU$}D?b|tTL8O74DMu^D zSwe3L=7}igE5gDtcev(=L7lS$#s4osBDkL7OSs6@ly3Fxm+eRAfMLNtUhs%3V3fhf zOjlG$6hI{ulY3l-+x5rq#?oZ#ElXeas%;?h!*jED9)bA&e10%mSjD`skyz|gKN~H@ zku04tQKRu1jj9=a>`Lz_H@+1iSA=nc{3M5MzjQ;Jc zA9k}oITPmx7I!ycA&{nLBNI?IA(TaACE+2fC}|096sjLsF`N*1oF-qrW<^^*px@UP zOiSei44hz{9YNzeqOU;YiIaUz*l=(k6*Xor7=UHiJzLka-S$QPQ%5qm)Wx*F#lCM57 ztk5wnG(Eg)O%*WO)VKED-v^O193Ygb2NGa2SSAx0>|}xw4}a4$f!3 zU!sePN&k5}zl4QPDXXTamTdf=PJQWJyZ+qk@B=ipE-!4NQPv(j;Dnj6>K=g6r8j=$ z=kO=1gUbl=VH-b`LV)=rcIh=8?6T{-Sd*tcyX~12yS_!L-Q0G(d5zh`-_@3Bzug48 z`|(#T?worO1&S&6Co7umEgPFeqn znfAbwZ(7nHnloicMLcO&w0fI>xSiI4D1pw@J*sZ^=?Vm%tqEVr#J#3vT90?P*%-<; zzRZN%pUfpixV6VK(A9b3S@mPIdYQba7s-W^kxH+ftrfgqwIp2pnkwj@+mq_~-H902 zZSSQh1#Wv0Mc$wAynck~rI2Kt3=GFI!FQXu(aySkur+(-O9Ykb8S>o$(0(Wc0m(%y zxDdEO7^9rI$=~JUP*wDI^_=h5bl(iWh1ZOM*MfP!e#?(n+f!4&u&y6c(|+-}1p zJw0HPopmnFN%3|6>*|KKVDc2#BU46^d`yuMEH6c@cS~5w&SJP%q+caDdi6ajJC#?--g0#LnWrB zcEK$@Z1&ot7CLD*H>1QJ?Jxy#r@E1k@%J#@Vs5dg?t0EvOc_QKunAVQly0H?`pXt} zH6=|cz$Hs+C4Ke_O!q1~T)ea+2iMtZS^kEmQVc&_#itcQ1Qx}Y@(F)EzmM0fKGuCW zVa=b(;wD4!=IY&-P>waL6fegb+Ea%&PO{uJ6KxX)I!}?`iTahua9hkzM_*I{)3kgT zYQ5{+I|^TQGd<=fQo?jn(=zU1oVEI#)GWmlV$Xo7z;3C&L34X=leA0Cu`0} zU|`JAt2FP&2l>xc87=`k#QdKU(y0V%jvY?x3LF4HcnN3XsH2lj3ULC?dB38&oBcB> z%aMVHW>Xp|y5Ec^HfjN3+MDd)$-Q=1#gO(K|Ai$y%lh~|O!S)c_Y#Y}Ps@Hc=^sA+ z^RFlUebtk`UymMCc-sD>KU;%SMq(39!HRNbTOLz>F>R^~)9I&~IonDDbF3^d*D69x z{*k3tk-LH(C8Q-$ZnumEVHH%^s>E8f9c$6{lFf8l*-A|c%tdi!NT3_dtx6^oYTnVyY1dK{E+M3M=`sucH=*X*zK*x+pW#V*bS}5 zS)hi)WX`W0 z|97iZy9x7uV+y3+Yu7jG=}h*mx-7H@+tBLt0tL@vh)8t!TK(xoC0sqcYYpN zD6qMDrCahh=#7ZzMFdqJX7_$+*oW|Z_vUGXc-jyoP+#^BfB*{eQaQxo5b>2X+E3%5 z?(oJY>&1808@EJv91J~p{B#RunuwJUTLzh`>k!E@Wj4IER=sb9}lpbOViz48Z#5gbe>JF5Wz%vE(@`^7b{-Ng%-JqR#hSz z1Xgw;Vz#4gn*M>!d1a*ClGM)rj00NH3V&?)tiAVbx}_gB+f->bIcZb56go;ES$#rk`;Zm<4#{gvBXd*bnqAP%{cp3J`})M#AL7Y znx@ekqQH1jz$Fb~9pV^T>c?b)pi-yW5iYm1!oEa-YzUAA0U~&HRkR>R1H1%OE60}r z2b9zqkiR)*t(V=!CC-GEI1|$RA7Hf{ulYZdsb5x~OxfQxrN*XyXJ*Ni<0hbu=Ktg{ z8(&CwgNwWJYDTib)DR&PB4Di|JU&xeAb>H(C!;?!(0q^WDNETqF2-4Bk`jw{X5`|Y z33iHEr&8SWtL;<(h4T$BL5^sm*M#o`M=fDOxClUnOioDW;>eJ!QA#FP1Sj7`Cr@c( ziH9t)Bg{+UtIt`=Ma~d%oT%}%A#J#ATr$EouAF4Ma+ce%y|kA3xzr9qhXcyk*>&6? zh^wxLt;pLiI5<0z;);JS754tZE0o82-hMQ~fuDY{<3I1Sy$8!IH$2yZ+vqr%G205# zXE|sTrO&kT;2hhYHQ&mz7FlHuu7(`k40&Gyk8fQChYDN`mB6C{)gX9y6_CSMO3N>= ztPJ5$js?kAK{*F}*GhDS9c7hS{Br1BLODH5LnX2*6;m~_W)-`1n?$^C!;_QYRWTRZygSD`uhGxa(JMHP`K4Z0hk6qrRkKOr1s@>X> zh^nVY+jY&y*^RAVw;M4p-_UA;HEH#_{q2bqySwRlyYMcb4_l#TZ7iWFNug?j~@5cQDX{>EF|; zKZc8%!UVXEQ35c7RwIQLKaxo55kyjpAidEHUN3A$34;KuOlHc%8HVS+ClSa!Nb2#r z!z6c%L_tU=B}DXvY&ucdgIs9tZ&4vl(DdyetvSeOJ#Cw{d21uBtTxlqYO6K>AZYz3 zm)rf%eP!pLsS-PP+rMwQ+TNe=s%>5QvaO+}a5{5*K&uAlEYdQc@KG(RWx3B~8g_v} zzhMNw*&NNd3Ul%oDP9Lypd^?HG!r{cWU|a?khQ!cktdz#_VFUmNwy^^)2v0qyIBR` z@aO;W4_CIdPnVTj=Kf!7E6H}>6dbp~Q_`&d`8e${3f1HPFo~7IV>jMslZU;A9GE%U z5+h%?wr$Iv!n6<8@Ol)_c-1QAq*A(Js1?8t@;#}GpjkM@apJd#NDv}&NY1Vn3Zlg3 zrQ_&X3?)*vT1s)NCHGo4D&UhP74pp#AsM#OJ9P`q2twbCwuTU(L;KB2Ec%FEPyB5QD%%8kD(P zrf#02+wdX2z~52;!qfZ zhVW1aR`j%Q7QSTZ-@Rc4;cx9I#dVJ#+d<;!9>75_4sW+|JNLSyo-#d#y-uO_LK#vVsc9mM9en?T#oEo1W>3vZfbku7tqFk_Y#Y(sox%s_O^ zh6dQ5;-jIMv$`Z3g5-P!9xy!lB|y}n*sH+(5MNrd)m29*$M#fKwoM30$M#ecsv80z zVF5(g03f4X@@R26`;?smK(Yi7${=X;n$sPH#XOoFjaWiSfjT7<7`$eZZCm^bu1Mku zWi2>uUW$POXcQ8>A3)w_a)rM4)>LbF8TQ~hcU#Aom*Xtmi?ej6LJa5Z|a{pT>dr};#?rTJ^t=;<-ms5yBnEhpNwXp5_!OtotvN~34S+g;6|$GtCN z^d|OSK}>$I;g9!G#DKZROYpOauXTr=d&5n`?6NC*QILj8;#ebU|DlDo>^2+I7Pk1s z71r+4sI~q$&pJ)Xu+DE|O((g&2UBZzW?-3yG$ZRIg^sH5ChmD%q(gdRBl2FF$6cje zdOg61*OL?sH?KQ;lB;0jq>48X*MT<-iRHcE{L;EBM5HK*#e0t6B)@cuzLj5z2Z6x_ zxVpmKQz-w2GHA)V>znor4Z zpmK3!QF|--g3wJC!letz;$^fV1|5eTMq%sH-+Q@MEA5N&;@5dYoC3&)pGZn zeSe_bHXYk#3pebu`#OxagajG>9qS+g+a=yb>EbjP^!`!B-be^TKMQ6a^dOLb*?#fsmHGXK`k;S=RD?@Amf z7i;T^krrM5n&oeK&oVJ1ZCmn!ZRF~Yz?*D%Q;4^u2r5STr4+c%Z1~_gvHymIw*`ms z0>K+n4h{s)QGSM$gFcBI-I=(T<*Sg-Vk>_ccnZSH`R`Fae4H?lMd+u?kXJ}(e6@2R zKu}Sp!i-$)G?5^{Y>I;b)0Af2&~i-fD=-}`M?X~Q2=PET@G`5{*uQ21vnVzk&8%)> z&D6vi&?e|M3p(qrHj5lDo+SiIG!YUqL4p$}K3S-g}XrP!f`v^j;^O03mclJiqtznM^>hzu)Wk zN51(^NoF#cdCob{dCqgDS$Y08J5^m~=P#V3&wS1gLSxWYA%J$FvpZcF#Av&5q-EIXb(h`!}k=v!#TNlW;^KteUj zPg-lzDHUgIvy#m1Rtof&!#IHt`l&yO{6WS^OL@Hkc2zVK{AU$pGC>({*_km`bZCafZ@?gS-2h~I2)Fr! z4{waLhu+|O(~m3Tm0eajQSQ2af_{hpy@7sDUs@9CJ2+)(xFS!eCUBIIGyJT>eUG}s zZ^0XRJ5GULBtF=d9Tz3-mFdU z+g+Q!o@MR-_g{7=qaBLBcisQ0E!~u9ac3$lwx-;URDElQDlgfD1^M>dzx3h1!`LSG zyRH6X_Sgf>ZT`>?EN00>E5fT;b*kJ;)u~8kHa~5}XL`c_zwtiQ4h~fT*WtYrMwID~ zQ0we=k>6s$)i5g|_m1V2OMqvKJ2Jyk5*J$D(J7XITVy&|p8{zl^p>woHeXVB=YaJJ zAyKk)LOAOVr1m<~%NLc$D>qzma+Ee%yR-4GNVrxIs1~?Z8n}51{wEXzsq}YzOku>X zX1^_M={Uyj5@;HeHd72_a0pjqNF@tXC~)qW>JxjChy{s?1xZ`Uz!e9Ql#ffxiSG&> zfXxs;DO->T=`0BpetnGWlf*LG42(6bJf zHa*Z9@qE-3kLQuo_kKi^cb9#4A=OTtla^HGW#8jX%?jeHm)O)t!+}Y>nyb_UHR6!Y zpdj*|rSsql0I&Ea7XfN1CA!rpkvLqWKi%jQ?w?X9N!qGk_uY9`;6n3Mvco9dx53hn zF0!m+ORdDe$jTHJN|Kjac7M7&4tNjP%Ky6UK=$eT@ z{9rN&3Yi3jBDOSSX7F(F3sEPGrO;+qyPI35WRA)sA}p*83w#i?&S-xDz&Z!y;X^u{RrTa!`t z%Rfu4iaa$8y^0&WQ}m$efLOlXt*_Y4cQb+(u1L|`e)a4qwzH-)F9s_=E#ACc<`8Dz zpOI!a_5gBw&hW#;FaR(I5}yQIyT?_}C{PHzgG`fV*n>%ZZFmT%?LYt=2tD*8&5>8; z(7}SjZT#C7=KGAd?c>wZrL;)y=g0k*k6=SZ&5#`D)Md6W(B`zLMu4S0$+2)AlQ*9QR%K<|)F6L5aL~7z>Sg>eQ<)*r+ zfkI0n-J^I_8dMkwoBN?C#BYuIBF*tlI=CScw?XT&U1fuJ0$h_^2#YU8vR(2^Og*Gu*$bi=JXqu3_13T`Wh+r;8^aR27?xl>oCs5#cfg8p=G1g}vGXX4rT8epIwGWiEoMC2d8!mi z0jrJY!Cpl`4GVQGh%#wbuYic6nTMZXph6*s_*6p3X_%QO%@do`nT*KFjn;7@ zY-)0bNmmWTii}!>sN*7x3q7;1eKHkry!pJd`H+((xhloon#1R|VJ@QOOmfx(E2r4t z&acvIco~!BHegOWYtebH4cUQv)|xEvR>RP8B73wq5$OYfckG68`+L_J7Iw!Q_FU^p z_C)K6_89T!u{Wq(ntg4La{h4BQB*CX?2l9`kGC9ek2Lwp{>pVvasJTL{p_}Td8pfI znm787)#v+vJ@mHy>>irn4PN9a&^~=(62hNi_?}$rJU`uY|u`qRDL;i+6H;~k>V)n9?AKlPkv5UoB>oyl?3foO! z2YcR{glJ3c()_Ev_HdVJcJtr**ey@?vzs3zGDoo4!C8&T{zP&DnQcC8w_!)q=J_Tz ztj{NQbRqH(cCC7I_*@4=i;F{9v=?!LU?$>+A;>8_Iq>hlJ`VA|$WQnQrq;Sop!o53(EL)7$%4u`0`9EI5i5t%vdKABX_+4AO{k$EiG}~8n(GHzHZ86o= zuCFnDTZ}#Nx6kNRsRz#P2a|+OcEHIi_paP3$RmWomAj1nut3!3oby3N^*_Dd%5UeBAFV!W@59QMN zJF;%D`L=#x(MP6Pa{5x+3G2Msx6t+;oon0nV@JJtG!2m9OpXshr^S{Wo|#M)oX9CW zmm(&Q@Lxz0ULb*)Di}`^JXj(uFcT3NC1+5pWhz-vN#y<%EEv=?C-g(pah63v9jyG;c3L;bYARK z)a@E&gY)7L9AhA4Q7v&%<88z<6bYfxwve7l?c`uvS<@20e<~zXZSe!r*K%KkER__D zy--Ue1No6jt2$X&;>wQ15Y9X)98wj$Qrv-nKt)1Sa7Bv3fr3?-8W3(kVw@h*6Vh<; zn6AdrK@lj0`-b}=x_rc&B;G)Y>v-6dbsczYerb3D6P)oYV6awm7ip>8v-IN?!Nf}&{^LOeEjq_5{M%G}5=%-!79A`X+(6dqyo>&Z$h z$M0F)^V9fVdN1H55-vweIa{8mdO7FnA5C?O@>=NTyX)*oBF=Eb*;?;s?RC}7&h6_Y z^BNJ=X9_KcMdrCFn=JL%DhRQK)Hf^mFDEUwM!EhK41%w6!{7y2WEBvPiqdy57`_Lk z?mjEcK4=wmD9X^`meW!9s_cm0l^+*xHk5xIT<826?+ zz%vW9{(u(!t)H%>G=S;~yX{ST`0qpQ#a2`8Uo9rvqoUNH+8%y=xc!lWNtYjKLf@Y6 ze^p23%`x_ureB%&v1XC>%R8D5vs+#nYX5FB#s2Wv$JVf+tcqA`Y7IQ?ZD9L;wqe?8tJv1nj_*KmwdHM^DP1gs?WZ?lqY7q_lgDa)W8cC%= zxEbdvCB69_A8=hNrq2S*08U7-%7-_9Y3b1u><|g*(UfI&gs60w?Mq&$HGKCSV|6&gY|9 zxQU@b9#MaS`ty!g8>?vK{DDR)LJ@vAWQrY?Y&S~(KKGA|2>q0tyCh~SaGpcIWtEm zvsEQS`G64sgqNBZsZ>&Gyu13xl}Qt5<^6R470>vTmdTl$$RM&WtEbHAv^6D3wZ(N z@SF!*8H?_#I(?o6&Y!a~d?(MbN#_hEk=~2cPu^9+gW) zM5Ra-N@0pm*A0s+DvkOfGr7-|30YLwkcPv|#o#@iFm zjl}drh1#pVs9L*phC?Ev2eF3@aUw| z>_qE8eWd1++!i~}O|gD6Gp+ZuG<$nYoVEINm%Y$qpEc!Ov~f zJDqGqkM_2D?kBc)!&uugYn?s+;4}Df{R{ow-|df0KC=CVW=E^db`;du(Xz`HU3AX; zr@ph)vu3l_WZHvIk#EW-x?$t6zu0q+cCqLg198TWLJQT4Ih4L6L+G~<))cLySjT~b z`94)}iYmDq(Eqq+8tg>rnf^pn@dm&c&%u>oJkxwGq|B&&5BIfOD``Yl@W*H4R#T;sV0SVmsm^tRyV6!|{vk(6NPtkz@0%@sYSW z7ITEQK0lclGs%wc|H{hu47ZY9EDYK?)B@W`%ow#QR6~l7Nhlh)7_!_|G?@yDnmZ?G zxD=p|-H=IG&``LW#wTECA*}34q``D05al0FT|b$|C-6oEixj#~DP(;b7fB~9s8~^q zNG5b>GmKkgeWM!tn#dFFs7gk?tB_%cRJ?A$Ta)2b6NqCKKZMsRXHr1VVE9nmq_(IL z1s9PB!6t-O1X1irUfqEjp}pw04iIC+kP(S1K=Q=pEa_83NmVdWu@j6aDuwEY3Y|nn z0iuB@x#6PZ!dzXW-p{Do(Lkm~T!G^b+zpjhFp5w&p*9E#%qUI#^lT!0L;;=X3F?Wa zLJ6j<3_X4lPnBTS!S3`gYr~Uk2eI6d#zZGeThoS)-CK;vyn%wQ86SamM9{WWtDShQ zX%nHM*XHv~kS-g`h4`&r`>u4Ooxs1i{9-VcoW;Q(dX1o>?QUL`J)0CZZc#Z?efg{_ zkIr5>&0OLs_6wBRnRA7Re4{Pt*cwZZT|o0@wdKSuwETo6mhWGQ=nJx~kl@jm$TqF+#vhoa03zH75%G!|I9@rmFySMj1hG~rBO@i0Eu{pH5@JWt z!JmFkxMIikY}-%8k;b8#CKN|PTw5tF$~j4xrR*P0op@CJ~px0h~XL*u5dRtl?LNot$DawKaqhFh;z{p`0$mBQ#<|MHRU z)^B{8-TTiGfZx;h&)3JIAFExS?tG>JUkMHb zg+Fai{?}6$*)t0EZY0AW!>pWyxCq)pV@jpGyAp{BNh^4#WRtGYPocegeOv$@e zgdIFOjZiSte1{fVLd*ib&*l3ZOE@^);tx!-`2ABXcF#mhCbT4MA5Jmx37eV*!;7K4 zl59@SqaIZb!MPLFNjh74t!1NP!o`YUMd5DHpHxrx6F=wLW4c$EC_Az>DkF(B()jNr z@?T2gJPFd!>44$2r2En;Gnu)o7o!zniVlhksJ;{?==6IuexXqg8XB1XCPUXn2K_%2 zQbR&2+TkSCj+{~@5hjF<6vT!K2xtbuePj~g?-lq*>CBVNA;pCO9dzbmgo_1XDXK0M z3rO;D(@`WCrcgjiudWJ*k=JGw-F4!*uy;`dM`44XBD7E>q!F4ticfz1$^;#fhy_s@ ztJ@0lbs$FFnY5xEs*Dbn%Ckyd){d2Qtu0|`3tEBA8BT0X>}XF#(t$5couG8!Ly^co zE|LGB4_C`$+eX>dif`E4dD)IrN7P`Ldk(_Od!DvRu#PxS^L}F;zva2e45E52_*9*@ zU!Md1&wg8NmuTqZ=N*O-T4b46=jV}R6r%4f@-4Lh^CCsCT7l%%lnomw8#Y>D+I9)=>-dqXHbTF-#BE z3(hOV(N-f>G~5~>R1~q&B~S<}Msp>fHhy+4zZqd!PV#muJ2(mn#K*i3gQLWH17_o0 zlgmdcZ=)J0;3X)i5Sbi0$;}2 zis2)y%X74Kv4IyE6!B;u>p1MN^`D(V&OeFkp2RO?sC~Nblnq#p3Sb386st<%azeVQ z#{+TQ8d|bCQ z9b^C7bdo*r_ei@TLZ!e<_UD$mwO!>}d;wMcEMc7WaMK ze*ffGHgGwcG1ow~t;n~;LVE=Okx%a~&35}MLqi>33G8nVdee%EinAt@ zGwkJY$<|^5K#eVl%8wzFNcmssWMq2TTpR!TNoNIBq*U58Z6^=KUDrDu3uyE{wI z+SM^?Eg(bY&VqPP^eV5z_gOMG2y>NdUC~Nr8yqW>!+}Iw$EgD<@G{Iopp{J_>)lT$ zz;kr{AiAzYfQk)YXcUbAu;EiB-9u0z0Ojf2o<_-=3K4~=AP1#`h!$vO=&@XU4H94u z-FfCqom$vc)VdYX7q7Crn8Cl~7okK+JdmzP=PQ#BQU)wkI^R>doDAM4(0KRrUrppi zN}^s;hh0|WY1-03`Y-90A3P5&K-QccHXJ|3c3}1T7J^3W5X$~A*$=_7;1qQClOVIo zlS4AF2}RV7vz5yBK~i8IU=3d6I*+c?rKl7R;Yl3yL#hjcBom3b*H6Oz8C2_ z=Ms;NOyoezgM*Wi)$vv-^zFk__<>{uWGU#!lF8|L`RSmjo9=@OqGLe;pw0?!h?cy- zt2m^se2eQ=;E^1=w422(>u#}ZtMl;=Pp3{x!#5;thu1P?2nK(8kX1JaSSWLF1?paG zEo0U9^C3xy@b8~tS5F`1n%R(ewjkxlB)xl z>$v+gefE=702qnbNtR<~(LGN(%1n9ed@D$xug;iYv41i8-sQ}cuW z*w1dm%Df)EiW^$ke?2$aT8>Px4rKU!=A_y``z!-Dp0P)s8vyE`1og|<&xt&#Bp@El;C1Atlh$&;W()gy3%m+j*n>|Du|NL(OMCRWq4dVb+EcH7ZO=8G zV9&fx`{LiUGPwSiPkv$z9_(fHZUx38nlhf&6wK>jJ!WLsU}jU)HyFIR!diD+4j#S$ zlC=WzN$=}R55{7NzkOi?XW*N-MvIF}c~0~hHevU{&pG&ykoGDB`}*!CH`M;FV}ZPi z0&d6S%{pr{E!|p8!3ks%qa9P?to{(c{p`QVwg`p){Ph#IdIawuHYf(*P8>zI zFbIA^nqbDy*;WBhknpJmC~ozWRJ;E2J=NIj)u439Sk36fc1$}KF0t2NQcs3-Evy?M z;AKW=UbSD{+T8BHy93jBZ$gx{wA&wk73Ec#MV~)oyG~SEbl{2|1@L1^=zN!6vgi}% z?P$%nwlVdL{jKd_{=u*FyV#w^ACF1h>4H(Q+QNFG!3^J_ z=1(AhcnJxs&|l!M;XRk!yBEPF_pYtxiG}ru6DOikxdvr)O)6phD;RDmW$;m2TIq8| z)@WMWseHo=X}8E;S1#s7QY;rM+7tr85yJcoBBqqkSwMddU%7}(+{3!w{Bjq)T(YjL zy|yQ!vn-wg@kF~Pl(ut{%2x{KB)fE)lfib0b5j_R(z$;VNjv)8WNtNR;F5SZ@a+ut-1M|WN)gK99RowYEIKB{mIQ%5QQ)0Swk)tu zUe%WGZ;|S+Xlr5q_m07d@n0+~wpvj{42y_Pm$$ z6vk*|(4#Xqzbz7nz@rg7!h=AbtiH2_XYz|O_>GAGy*PjGvE`~2NZz@rB{#LeC#waF z8F-({v%UK;X2mg!+5CwOaytE=;>4wPJY$VjW$&``bljOTV(d)7Z`DNyn9Bx;501C! zEiBn))MP*9#?dVuEpA(9^B-Dbc0SdCzE(G0rcLlIGON=PPN@~(aR0olXO-#)abK9P zO&SdUeQS4DBKAFwCipA{BsG_6>^SUxR`L$Zjw9tiy1)wJ=aKF&Al;{5fVL`-xPln4 zlBczfvGMhmow(6*i2-@(Tdg2-J3b_I4u}E8r2ZQ5E2XKeF>!ANV}718IG=JQ{L1=0 z!2pmfJ}4PJ2>376K%Zj3aN)m0ed>S|6$9XZG1b-5K+@N54J2E{0}$5` zNV=^9nF<^hUFE&`% zFJ5Nql2<(KzFE7U@_;{n_F10B8b0ng|u|*Bdq+(H7&2IIEr{_dkV~IW2X)W@vf5 zc@m-KYN(-L3%o;~oG5a&lvp8E_)eEwxeYnKiz^Q0sWJNUA`8|X-d}@ycQM1EJo$Pu zK|`dB=z3my{wg7RcnWhEvh~n+O~tZpi032&zlbD2UKUTG0lnmHWcJKufc_s?JYlky50FNf^YC!#fZt5FsaYlmrC^ZwJ zG=c5WMc0(p9o&paxW+@I;!OeXlZE%5nox_J(72_t@< zLfXbfF#p~>$e)J!X)r(;Om$=h-9k#-upf>ggaPLm0t-|L3*;?l+Rsx?C@2f~MEk&a zmyphLmTdJD6iNsKss@G?QwoGB6ks||3t4ATI`bA11{mh>TZ6)a1URZ=c#|Bo9QIjM z9-U>`JIBCmqQwx7SsI=(wwx_q!a^#3l!*8={v^v9J4dv?uRxZ9jM8 z6^J*(+uP00jCnvHh9e@#9U#p{<>2e{Va>Uh2BY zTKC^?}llAN^|75{5R`pR(>W z5}tc+m9-di#6H=C;R(Xm-q1oHu4e*pT`mh0*&?wvNBW|GH+c3y#gP=l-p^?dJCD29IE!M>3SVcpTXX zO;X4=h!4H~%Y;l*g`&$H@;j0zQ5m){C_EosYXPm7(r?%H8W3rxSO!yA9p)r(N3H-o^7QAHpJo61#kprs$MsW1>XT zU(59H)V&2lTbE*7ivn59fz(9-G5SjShbskfjQ-?n$w)r%4UYrp`!)`Qd`CZoV2VS4 zwB7yMU=Ki!h%R$SAKs54Y+?FOrSI-K6%dW}8Y)>&P1gTngu5ITbY{wCa4YhT?eL%ao@H#UK7?I%Q zoJI_I4>)m*bf!t<%dQXWa%526(J-R9gIRpyiZ&u`_@5^(Z_R-&sK>voHAv6(I`R5+ zaA(Qf7?H#c$twVUzLHlG68K751r)13@QNIAJ%C}VAQvbT z(u^&3wL0ETqr$mxsfzt|7wshN*eVk6<2b*TvG1YsDh{xa@TUM|m>9c=m8)IOwDTv( zZ^^qeVy3fP-Dlr_TUCegm%;e&n2CrwMectM-d&pSy~r;G%fB=4agg16npQxA%io@~ zbLT7UY*n0P!P!fvni)6Wa${#xgDfHuhvD%Q_*Yt?n!0(wd&9hxHCB+e&Wb?x;w+{q zK=fPo~}m%l<9!n*Pv!h{quo8)xNoq0%YM-s0 zsMK7x@6kt5HEoppko}O~cTu2G(x$I%|H4o0mA|#JUq;-|2mfVje8XF8w)@gLet6h= z%*wFNQrNq;z}yjaks|pIg7Js8CmDvoIZZCLk4RzpxhU z1*i;E2dsYI)%1DcdWNj6q`7v;{r&o-kY#8U|GHmS^3Q=pd7V&k5v)IJ2_-d@-l#|$tvq_t{nQ#v1m$z<-do<|5bXdn2Op9e zrj0q|>0%*t;_w1k9BgShOnCa~nXujiYJ^0BwO=$omlr43O<4;lk#ilG4u&9v{f96R!X{T=x~nuVO$& zfmitJ6%c!TR0RnR4qLRlvXHRM)|@H5GDf}RWm1Db)km*y2if0eA>P{k!KgnGwt;0 zO1lJSasp4J>MP&dx4`T7-}5FsAzLL8GHy_so@y=k!tgYt%o%xl%SVaDa+mBkXD>6B zaPhQVIFn^rxN4-uE+XY#V%bM#TRwuWqWJk1NLXO`@k?mFVz2}}=lWJyjvv!Ln3#eT zlJKQD?s zJDd)4uCGFDSa?vlkONdaX9dFZAAoX^KsgstD4?910`(s=oA=+>czN@-b;RxeCj}#X zZj`My5|ACUc9sq9qIsz&?EYW3w?92O*}A@e*m{#!&B7TW%fP}Govk{ z!^9-(IXlPx_5N0i_~T&K8n9z?OED=n=of_K59>ykUGCir-R9jrRtK!x%0kokch{HM z+g#aoMS=U?lOgS%Tz;F|2CgW#Pu8BWuaLyt^Fkze^e=n+^WD~G+i_NWBZXNjV^!@S z((=-L>$)=AdTo?fYc4)W`9y*B9JKfwZ6;@m3^~H&8$vVA!e!yJjI_n6h*B9PoUW%c z;k0BnFz*T0u;V=TCM<}yW_=IB5p}YgZe-XGgq-*F$F^Dp(ytncoj0u{`R0iITLHs%r%j0#AKE9Ql>LjevC?LicNjD8GAZ~!T+#s zqt;kFQpv4JXYI9jM%m5b$eAJ6Z~NVIwrY2V9fDksIag!b%8>9^(_Jk*XYu7%EEznH z&%0=iVw5#-vEBXYKsb}czDDP5cgg6xGEm{i49#ujM$Xmjh zN7u>v$USDr7lxNC7#^Stk&JT?J@S8$Izwo^lOAj>Qft+v(7G>72&cWmX|HhFqZ^ZycMGjOiO?)Tqy}|IxQVdP?D7cZ z%EO$v#wE&5QX@DHPv($Bk{q|Zoy9H#mQ#oljk5_48B2Hui{adtbhhnt-?5lgs1*0j zu@eQm*|}MYM_n;A^jTV$EJC>StyN)=jnU~Ysxs){tCxK=X+(vS-t0Kug zdx3c@sE^BMYwRj;evTBo<~&O|uUxfi(D=%g6F_ryt?k`4Xud{=I4z9x)jo&AMZ?g7 zHhn*%_`ovIlk8$UccF;wo`>yN^nARJmhfSVo6q|wey-h7$QW{wZ!rM99DrVCIjCgv zP}k=tp^!;l!$MFkZrg+*5+I$4DN@!>=B>a?wMwDO1=K-PBmkNP(O`3ulIdjNx)z#A zp~;j>fTKF7<=0ZVpUDDiGetH3xOw{3XZVcPln17C$2R@G{X{PhQn_LXJ2okkS zoi;|F97=5tg&bzrU2L4oho*qyF@D_~2oiWXWP}gh|A7seT4EoK$835*ymgx%jUfDh zwVM&mM#-br0dCmaZWchT{V#7J8f-JlXRm&Cz`4ZrTm>ZdQSRIa91Z%*Ig1F#mI$cd z1%ti4Hk4UJ515PYSXaxM`aQ0A2R5T8=iZ(W>J2}lm)Uz6hSqQ)9mXGp`F`EHM((x& z+bi+OV~1xgPP@ThkGqCEIusws+l9%DVg-U7(4gbBpjjX+zC$4FVEJZUBYf8Pj%eVu zXj9u7T14%#`gb52K#+guP50Zo9S7rIN!Nb;=b#R+uqS6bA9z044w=^ooYwsanH|1W zN$62Y=ME=qxLu?lX-kJ&#`2M1_}WkG&gA7o$e)MWW52+MuHH*_^ZjjX<$-gSbo!FT zRo2*;X)$)kf72}pzuz8wt`oBN(_rsK+kWb}?W#Fx2Lk6Un#Sj`d@Qf?AjK=s+rjd) z=G{|KZ4HyE%s!vK+Zr}f_WuelOi$UPzkbt}kN?OHt(|B&{3X&;fy#7h|9@x9qx3$S z>Hs+p8V9nR6tz^dg2l8wz4@EDm;=c|=;FE@u8YdzI!_LRM%lV=fd~-yaH=lW>Vo^beS`(1^k6D z88#yb%HBkfIb4veWZ4J&CV<1k6S%??y7n40!-UjwA|5~3ENJ%nfZ9kuiSRICFj^CG zVeXTy)^)_* z;^w!rJ39Uqh7jOjn4)MuV#3$cD zW?aEB?lia6h>EC$ifAad;w03^*>BH)^XJ?$gK8*lx;5C+!ChZHVJ3uEU($O*X|&U+ zD2)zM*AA;|@R#tq{mhr?U2=vcQ8f>8iU+%NrOHYxGA)^5+#~zvTgH(&mUE15X54Hm zJT`~CTAj^>lx~RFBXWI90ByjULEQo*jp98DlGpP#P20>ME)Chz%pF#cje%&+KGZES zE}!<67Ghjl0{vVD4_yXdQLaviqQ+Z0m@3>?XK{2pHt2-dSWH%u2J@rf#yfi}%~BB$}_yAojGJm|@;G=fqfp z*XA6u*V*ydj&A3NE769puVjfb$uHXl`YNmKBhFz!o!5fUJK_Tl{m5%S1he}r!%_%r z9Von(GSSm-1z9h^?Hx?=-S|E68TjhG%R-ugWY(=d+YH-%jJ#Mguff#?ngbrdj}CIb z2ex}T4?Khr;gxXS+k15x))qQw^69!MCujViwA)SAj?}H|9oXwEN>A1KN<^shDayO+ zyc7raA<%cDwNZ5&&2AUr-EDrFHKpVE7Dh_FM`2BVUmv^K^CoTL*R1=i&(qbPkE1|O zD+NhPP-m2*+ZMtV(J&KzD+b&VC*$=0ne|hV!1eIbR((bkhQEC(dyecVz{lv^5TzWP9s{nx`Ef#%Oy zzt2`%7R}IY+`i>xg&n|0eh+#1A&o{Ao9#Yz+IAd2VbK-e+TP;x<}a_Xyz>`qHvi^( z9!C`6yzSnwCx7=x8$AGGb35vBG1YpO!Ny~OdZCUK&l1pIM~eTDNs*29SFDEO-R!dU zU~tINV5x|HZ>bsqrJMM*g~-8ONbqJUIAkecWa^N?!IRAkn?>XZRtR;$AxO#B#aG1m z#4NQnBNE}CQg8$cMTQW$!eRmi29ou9A#OaKHfLlS%5(w*VR#$LM*>99hsnm-4mo5o62;Pd0!MxC@=dY&i$6 z%NLtjz}a|rgU-CANYol-EgQ-l;4pjYzV>!^_%jxEZzp@_>sV{Obe}bwztdhBmt;+0 zY+6mowU*;^%-dpGf`vDkd&pj!9c^vqum^Gl;pKhkaZi8w`+&m~0VLwiWZH#>I+S*P za$$oNJQM*uACvkk40v_bO}eTNq2vPs%?D62y&%HB+*HnXv{LJ{idH89q#yK5Z@znF zT#6wOPNjpy?r5SnXkaIm=6ewJKeA&8)&!E7Ulhreps%N-#os4jCgRTn` zv9roOcjtT8Um?o*r78%G(G6kpZ*W>lPiTb7MH#m%&D)As%F~g7+D_BrS-6arzERgn zvGxu&eZTvoCdt~^-7J!L>i7Ee4S~juv`SRr#l)FP`iSMyf)t`RyhhJoi!#nG)Vakm zbP66`BkEneNyf2*7737Bgyh9h*7xOWG9B%8-mcE%)9vh=Ig72$lT1AzxoLFk3$}dc zQOm*s)mL=c(ksoD?7d*OJ>1QH^-y~|n1t-6`kZYqKY^*kIoo^utVNf8YX{Ynt*o|h zj-R%J#or;z`QG9y%gt9+X})T9u*C)J9$M*PFi*E(ocG_i{KsbY?*Vkq;_WE*Dgb96 zo(ZH&z9Ivkd_C&`Y`aH81CHS;BI;tugO_L>eZPWE?8Z?xUzrnP0C_xe7^|}>;)&+z z1qoNEP+1)6BsuSh2o*h*_fP zyw+Vx8mTDaxS!zm85J86Lq=%G)eXDWQa^PShC)d_Ia4R2B&jn%s3!tEq-p`zsRSHd z;|H33OH^tE6yo~Iq*aS1LwN9Ie|Lo+mfhh0V7 za-LY=yxt^43De+dq?4p5ua8oi@6knFj~UOUT1NwS<~(!_(L=77+uty*eRBEWRm63KgdNL|O9 zlfjTYiUVmLi>QwaMPU|jg(nv#D1YChIe8^<_(Vk zJ}=o*FHT^pC)V1}J!qY&5jsssw>A@#?X5{E_@hk#)mwpC5zQ9twT^3#Q7oWI1U0o# zQWLLVIcO9}j&xY4Gl#Nnv{aWu>nwHdl6JS0UUznyMZW7E*O})yuWA=TT-%+fE>A$=geCUwc+$;qTL26;1R$F+-6kxcwm5GGIi@JBYDeXEGP% zjK4nw&D|Dck7yzdNICO_`qIuzFE1`%L$acYhKn!qw7@OyO@u?<=2Lvus51!Pky@fH zv9S5n82e&ss{QZlV|aIEUvz0O_QdoHHOYLin{@ z&^1i|I43W3T}B6I4&R+>#GQ?*qfcC>?#U%n*Cy@I-TK*`n&2$rAD^=9Yg_d>N}8Mh zVxEYH?3q`-u=s4VobqoiDett!T{2solx?^Dxrq&5a?s*I?L!rp?O;WXMOU8T>n!Jd zFS!J|U&a!s_=??ep!|aEFFSAh%g@>2li%8Y7H&TC#vuM)rfbpf+-&u(E3DCw5}lr@Vg^#EJlAyb9pU4s4&c@-1a=%q=?Qq?G2)KfP=Cw14jdo@fXp7J(pARgv!2wsHO2|slz!+gH&q~$X# z@z6Bt!6V}=yx{Ou3&hUA;BBrI9i2z=a%>(RN#J-sIG*QQL~_1_uT>=ItA*zq*h-MT z-U>1{@U_{5;ze0ILGf>JxH*8IC_=^j!&Xsvl({83rA2&POJUNPPX(u)S%I=~ART{D zWQz{qYp-`1xvr}P@gzXpUGf911cW<_kUkb5fs~(4QTlEx#r(QBd6ShSFid-lg*kD= zqk|KzkoDbpyN9D>_gdC=J_^i#rEmQL?s%{pYt2FLl8vyjh_`5gU|gSnj|@cf+4kgM ze7t+-3*H;&0rokNq8jwhW-@Ts)J68n{ftX86?#L%7WTs6&DLXPn!SZBXUD0MdrRvF zZQo%Et_*KYf#II)x8^gBSm&jw&dORDH5Qx!n;yh+5ZP_8yp|IOHILV_c;_Ddo>-#3 zbwt1OkyZi?2@^niNEWT>C;@k$jiuHTE=bFpKV;!nuhn_i!?B}z28#6=Nd4f1Hu$Lp zf~?PtE`&hl2$CgZ7XT~G7NH{?mX0w}C(g(7))xH9Z%jOD-Pxhgby}P?opy*_3fR|- zJ!J1M&aoF;%;BYa-EIv3mo=>aZ(HacU`LkEGO1vW?*MsnB-zWvI2=x!gi}D1Ax7ug z?EW>}<+^@Si}bZSlxYfa3XuI}GS8p1jA`R_!|chwwy@i8eiXg`i#8d1xl96DXaR-miz4u*9BmCJS6bOUu#l}(G7Q6DulT%^Gw*#x)={RVYiRA5(9 z?vR?Kj+BuZfEySR1>;1APT}HU7qX=#Piryoh+;ECsupx+`ajuaS233JB@be(3#E9ec=MaTMk zq-#$A`@LDqn_GkUg-|Su@B}|N-|R%JT{vH9S5O090BuEdWIFs5k~*-xK}dQ5?nA!) zmoF4p9&(MeqhM+DWZsa6M$`2^JkCnvCh;}~Vk0u4K(b&xvf}4jHh7u?mga$_-dw~d z-dy&+MC70g%uQX(o_PQ@eIs8%ZJ;-hy$3s&Y~VCE8ls%N^1x{c^hBuyf+av<2sRy( zvgt)S6fK<(SH7(M!*wZhK!94Tthfw;cqy4N9+rOlbsnIcPwrgAl7K>feFdmpn#03o zF?ot_S%8VuLZ*^R$leRk(iF$dBTCG++~{ej?Wb7ofk~GB&DWN>Z73dfpW$%F_R_UM zVqIKEA*d;QEz&t}=pd8s05u=}P(7>yMjzzXo3wt8P5uy5pRm8%O`t^BZwFboVcGWf z0x~@MpzRQ=w4bw|~5`BFliP{yFB+MW#6IgG5SFnfJsAmeM2-P4R@oVceDX&TZ6Q1pfuXe zOtkKk_F1nPhpfq*SbKHmVH>cZ$ewzeF@gqfqO56ZzrFnt8~iQ{ZP$E7zcb3M(LIhF zB8MQS?sHHcT?oRitOJBGKz4bwo z&*$x_e}BaXvGSrd*jswe4j?BKMG=1rQ<&mYG)T{pvYxbP=n8Li#kmm7(rfh|tg5!# z_kpu}%1<*&dc|VlK;m-Dy7mWWVcZ)udfk50_&4@`dv>vGn!?{T%Fz==M1suC-7RZN z4*>NOMneYi(F@@$`7EUKk3n{&{!FK{blAGx;i%KMD1i-g!k8Rhgd1|XU#1$hz^nA$ zGQSt6EmewF_!=gl^$JftI@3vHT~-?rLRV20^5qh?N~wYki%4(8kZ#+#ru0KQRWu|c zX^NC7PDiMIBfZ8@R_i1w*D$q?lZX_qhQ%)eQw4+$SUn;p>cBNDX;D+Gx)wG8n*mp$ ztk;36OLcvKsyAK-p=xA;Qe6F_FqhueX9? zL-HGzyXQd+l6xzMZ*1tMW1=G}N)0oKDi06=WoU+(v3X)|@|$IvdsC zsciIn^PSaBP7M0wXtuu}`r1m4jt7ILlBtrvW*(hmo~-yepzB;N0kOAd(TdDQGLn^m zfv^vctz>k5DcA-BvJzlxyrw7H>$d_5c(FK-!XfB%;$5}44a}Eh?+C~iLpd^&E%J4(r z8gSssXF6E7@`iP6MB{v#Jw;Si`D}D6Vs&rQhA-*oN80m$X=}e~_&A@bE_VN8Gpxt# zL)K|3$U1wkbztzs+jbW0i_kTq!}wh5IkU_@23m)JdmpaV3KsP#fwt?G8ailoX{f_N z2e-~jUIcN_Hr_$2BM*eltjUE&P^0sPfwU$?RV%|(>rmXnhm`)xK3CNKI(|w2P=d-< zMSj%H1L?;cd*P^JuYS6L7Ou!@QLKS-Q|bQnUD$ek!WwV4cbtxhW@0RRPY&8UbY+_Y z!ENUzThrb<81!t1DDXv!>1XZB?yW6`MD-*u{&BoYPB6YwO`j}>m3g_?*^q#J1mcjr zI#_Xt5(HCW<~8lyC`mM3iQxuV+*zY^B+dDR&9d$9;j-D?_Rd>jZ$0?}{~e}H>%C@^ zHyy!R(doHsZ6C!3U?vCo=!vBPs#xjinW5Z{5_$OYNn>t8(tWd`Jcllujz=OaSi zpVFIXKt6h9BxV|8Y?a=7^Xu3X{2=&Coo|Ft6atNGHiP$R77)sc+FJdH15u%7eZgiZ zH`NtF&`5E=js@wo|PryixJ2@7<|Rr`P;B^S9+|(gxlt_ZG zL_x7wU`OYskb|azpZY#l{BD$P3f@T%*C-C)JUYLH6)bzzvKPK+d**hxz(HboL9U%V zkGPqxo;r4CFP(FJx9h-DY3c(Pm9!$W({9=`rvqe^8|>&l*2^3sNsFFf*$2m2-l2(> z3wY)Mo|$B*Sx0AD)-e_uCot{DS62MY+C+6e-8NXb?U zX^j<;trlfKqh?}Tl1aiy(kdNZDU&RvD$)xN3rLSD@dO1SVHs^9b9HBBL2SjLwghg# zfoUlOuSY|S#UUIG&j&{fl%taI3QE0Y1(elAOt9Qhlyd|$jbU1H4|(%$3{6X8DG(kMl@^E|0+62K1Pp1k}rldtuM(LeQvgYV)zkM~zKAM|uU1!Eq{u4af%#PtO%_khq zVtpXgEtoctYP!#w90mtzU8$25v@v(+>2TCx-iHvpV4eS)DzJV6!`1k@?bvFox;#CzVu zRVM*RWuW^2#as7N((ft9$M$3m`RPeO)~wf=d_qX= zX63uzrG@q}R>~+6>(G(9{3ErOMGHMuPR^=@&k8!jXn3^a7)&4x~ zU6q4(o$H@`U>it|?0}Qx(^dDVEHt*F!Ea{)@T98I zgSC27zAM|*!8iXkz;(f^mN5SnpmP4JLeAH8;LJadGyl9=aINR#2L!qa0$!g80%fyN zN^8T_c}oVdQ+NjYK3dm?>DpngALsI3J&i{3aI3L!t2s+vwX8)iqbeGVH#j1-ljrer zH3m{p(OtS~N-NS9SSnZ z2bCo^E(YO?(zaT$o?7xcD1I^z=oi&<9s3 zw{knYFBqyNd`dclIj7_aN-`S`;i`{8#!r{#*@z7lHk{J_u4f0?TO;;bB$q=?HuumC zHM-abU>-!eIv6J4pJE;Am}KU3_~cJWUS6%@u5JtD>UFT0Yt` zmVRXqJq+r5{)Xwtt2Sdxg(U!|@#3dN8ZnQLh6 zk)4YQa15(UR&$6Qf@C4G2!NPXQ7&2CqF}SsC94WCqjh$Zt_vyn(?MU^G$r$fRl%RR z3nQCvSZK+20r0ghmP=2g9M-CN1=b>IK-LplAmqln-LRlrAtYHFnrB@35|;CH%6V#~DQm4fX}J|+0(d-OjupjBrhxpMXph4x zA5CGWK6d&fMyh%IwG)u(Vo*g^v`(#BF5aHB33?w5+Q*%S*>7)n6l*%jpRhOWH&0Kt zcZcUY&*-*F(q?^QZ_TB!pNhr+!m#_&ET`>y4=k$NMCuyvA|)3K`|cH3_Esw%e9q7hZ@Voi`AwmT$wC>Aghk@wJdLuOJBYoNO zJo^G%{A?w%;f+-`2EXpd@M#UZ1DEYNSd%FA6&0{dPpNi~sVr0h`cF|z-`;V|Q5&=b z2PkCEAFKdyw}R)QC!l4W(wPVA$AhVPC1BN`rvz8#tKtDde1Ox7xd}mC8|-F*yA4}S zKWeRKXo@h+ULO@}KmTPvUf`Cz*iYGuk90EM>QAWxBKdc0=L4OKzZ^!+{C6@XLn?q7 z@RrCTPXEr`!j?_0Bz8WD+0x#YgFKB3)taY8|6#AM>=(EEkq3CrUhBNjQmenUxYE-& zE}ag7C@rWMBwry>KrM)p^Lh`J!=fH6Bd^`ZA_nh1fVJ^Hs{g&mPn!Qkjm4H#Spo)q z{YGzMM)2R5JH24{-}sPy+8J}l~1Y~}@V%bX?tWmy}G zV}QxfHUhU$jUAfeL9g%XGdmq@FX8RwGEmj-VLq}z1XNV(Kg39vfGYQNIc5+Mg^k1G z=lqA35(giby#BeNEY#iC2T0OydYxRh38g=P8znhFWHOI3EQQA#uCuRnomaAfhH>*y z?k;SJa<>hi=U!CFmWbePT=zzW~84Vq5j`lMve`uV9Q0dkT`dVwY=D$9szLozuiK$oUOTBv7*= zf1e36oiT+#)2n>b6P&IiK@kjkLOrRdQcNqtM3_dFs70kdl}7+uA+sX=ba)xkUAF@V zilBr=)!y>#9o&?)jd=}lvP5_Zvrv+>#wyVS7st&MqhM z326kGeYmba5H|?)>AOaL5lk^Nm(iPFsmq`3JcH=A!amt>!bWU8YhSKEDFJS!c_X)+ zwg#itS6SqW5_@OZ0lVi}j2FWHVUNBt+=j2Ou%Y}ahl-(oQ;{_erL`khS6K5wn;B`Q9$TYT%lrw&U8)4m^4I{I#|3-AgOCygNm|W z6MAn=Lykq>*<)C|-SjY3tzOxBuUPAcp0nNKakXXcph9hC+A&$%5mu$I{{%3=0z6pr z7YZ8#WLRKhf7>lE+2p`P{eEwr`XYffgY4!Ka=CJ3(yL}JuxB56oX2?C8s6F7wkMWY z$_WTj2JLnSPTAqAi?)aF8orAR_LPK+F?`s9P5c8=O&w6>zn|{Xojwvy?L-q}5O@5d zbsx46>f%rKvwE*mfxK+9dkwOr`7BoFc@}Sni|`WtBe#i{te!j1^sk zc8tG70)+if5hm~ZNKJFFf7p^9_Dt@8MF9nv=>`_Vl{xQis(rBGE6dfww^T49F ztzbWWN$}zOOGS1H;5(^l1||{CUSSyR99{N2mqu!_r1RJGo#&16n(1{o#UUU&ffBAEmeYk|=* zoy@bvTA1?5C?%He%mJlW6sXHMJr&9})nig$KcY-~T`=7*&;7>z_R3uBO9hO@u&NEq zI22QS3m5|snx(O{g<@u)Z5oLi)ljPHfv8Len0pUiH+oR89JK&fkupC<*aiZf$_NLp zE3^0K=h#!dSK4cXwp){rciLMY@3rnxbY(`wS(m6I)~w%Fd-3g6_W0}L?e<47u(_G{ z8&dX&hu*gS@Bp8J)*q8?{s8>s|Xm+-Z#Has5diSm$ z)t8fovUJnzgHpthX|qzr5FUoUJ0A4b(6E8Ef3qRWGo%T zbE?=D2$pXRf}qOlYx$v<@_KYICdUfbT@%b{Vk2Z9F3rD&ishe{iWpQfC9md)T}S9g zsp54gs6{5>*S1<+moMHP8Wy{@`!M8l+$m_fL&B(Wu#nM?hPd1?S1lNdvvf)#;UMHC zuoaKgDD2o=P%MFZ`34{PV8WbN90(o*{u20#pY5x%~87XQr zOoS$9uW_qNZ9l(#R3a_-QR>5clNU9yMgm2VqB|D%v$CXlcD#zI;BPA&3wi!B^SpR3 zoM#qGq9aw-PU`7|ppylT6LsBM2b0d5{tTuL-Ws(2o*I7OG>ss9ahT;jL%ZlKJ@-rB zorUDAu~VlqEr&LAD!uVI@KRWra+vndQCdZZXYw`#CnLm9=2NETftC5bd3>MG_XXUV zxX^CZvcsYjYHl#8I1M`n@KVWJ2}zvrvJCX90L6rrmHB%dV_9Bska9U#djpy33(3z| z#`c&Ry93u%2G6)yrn53q#|R~oN-~QI(C;(&RYW5_AC;1~n2`ZbDVVHM-y5L+)G&~# z0$j?aEo8bIt<<+1RVd0O@v(bQ4{RG`fi21)sieoc>e|g?Nu`7zET7D5AoGqgN}A*J zD+{+tEB&_lH_WtEV+Ppc5B$r1eT(`&R2w(6w_pDy%ARk%(z-{kwSiOiS?6hq)^lzK zIUgRyYbqVcxVlxC8B`nzALk1_8-;4@$eq>pAqc4&Tgd4;;M_s?6oIMPETN}&D62^B z7)qr*gvz<|S4Sx5{=-vwo-g$);B_KkQ0u{jJNdh~K;5o}GJ>kxo7+P#jkI2~Qppc1 z>K^U?A?&;ZtSql?KZkJ~2@-;eB$mW96JyF}qA4b^_YzSQ8!9Nh*b5?-cZMP=0;1AH z5kz_ir4Gz6z4zXG?-UW;_qU!iXHagwd;ges-gD-(nKNfS>sfp4wNF~5&U_Mz`Rc9? zoA4^hIA z;WR||*AG=(3c%=-GvaLUADAwHn?i)y%74O}T5w^1cW$m3l_Z z0dG?!-58!rr_R&6CfFq)W!-UhiRQ_;c?$2Pl^`4p#a zwWHRC(bN03A4=2QucY55RDTS4=t{OTlnzR%;2bsI<|0fwG!?93uYbX&s~&XHUhmM9 z3A36C1@ji7VnHGm;(J16{~Wg8Dg*`KG@DdMCsVTb7OPY~ymA=SW}60-2H@0L+I=FF zs?j(crB;3?TX4YC6PWsv0n;Syt&=~7ISM5EqyU^rz-aQ)8^kYfwCSnKZi0GpwSZMf z>tI#X)7`^M(tVR%*$CF@DoNpzJ!eVxoUXGsb>?M2Li?rjjM~j_{q#kv&);Zmij4fK z*~R}J|C&uT2Bc#oEC?o5@Iksf=CAs=`j2<`8{Xa{nieZ;4eAh@$_Cm;VBFlz@N>wj z*L?Vx_5F%`vu+a04j<09=H@gq6*pR9B(1MeOD#Kk8GTYzd=i%kSC?3509VC9OTg7) zEK4P+a@qS^V7-dW4fI86U!L6)bMqZs^=bulRn&okt1;Ru5m?=@wN%h?b_z;9&Lm3w-Q6e=Dcb1 zG^<-b1>fLsYux`BUOIRH8={?`u4LpNAxZ4fPorrkC}<>KR3d-!A3N{&BkdPM=h!{r z`)%YW3^HF=XU}idX1dJnWd94U{#>kd5{{yu44G-8iDi6&K2}+SWKGgUK5g2?R9}XP zJ_U0f{^owWY69bFm*rYGoAj`ixIEuVwCjd0vrDd=ZomG`i#G7=$L-vKqZxQU)_!*W zllGfmzQ{PdH|>E(*4jjF`_@`&JuuoQVWXpXZDZMOyUP8^-TFCCQ+9fBOOsuF$NT(# zH`$=R!|j|iFc2_nYIg?xd=66)fgTxN6va`;;$G&)P8ttz0tbG4SE89ok40JMe-3wN`In2t} zvP-Yt3DQ>Y9LLJL5rS60yT<4^hp!-y-r-roSJ(CI2iYq2>s}J#wO1iWW8P|y0Sz=QKl&pE2 zvE~#Tf!IR2dDYq!V5?DUH9!QmDj8{&eyf%Gzjgjs_gnRoeMz0&g@A3Iz?N!|5)J}j z8%V&B;wej$Be22w;BFpu`Fy_ekU>0+`y6U`ONot4Z1|I_Ujl8la!iU#n-$``G*XcMN+CNQ@hf=WH8kA|fl zCJ|DwO2=vs{Lbj&YF9&=>u0r&^XfX?-XA>Ra%!Ar+OF$5ILy$5j@7;Q@Fy2&K%Y<7 zseT_Ogg;G9tzBGFFKZjbSX9|-A~v{x8&f=53DG&hn7$$+W6~l%peChs8w^v4%tDI! z#EN2*5#eynnoGe;f9p-4VW(;P)82oBIC4pTU~9)!L{n zL=s@Le~ALsGXS7VF>sd8mwKofyZ5r9ZudS}NS4e%I zMnA!nCB-)FlX9E6w$Wy8Y_i!~TDec1y+WyLB2-<~B~5&q%yP2KDXJpt?iIS`0-x3( z3C1po;V0ua72CLt@+y?uxYaa#{%8!ie3#vM=XCq$Kc%ByZ$JL&Gwx-)i2nNm?Y_@p zKzNZyd5IN3<4#6=oNae6pbLu#gQ0xCkCv-P!2O5bPo(84*&gFN%~%OGaM&l&HuR%N zR)H8B`B9>cpP6Yt_>H1#)D%0^F8lSLZEpBH%tbIql%t$oFuyOy5FYvp9UQL`kMk0( zO#DkYqV4Kg5_b7V;NY&4KCxf8>5K!;%t~)4|0_Xc$D1-G=slaRgY&K}iwO)nB7W$P?fwwp$9^S+vM@w8(Z0oV@?;+IEX* z!uwi!+~Scs5?LD(s#sRsT5#C@dh1N~W%QT@{mm}_El~RTRHi<^#&Wh3-&5|!mo0le z8Bn~oGTO}2S53EqO>=Cqwty*4bkRQItYZGpi}>xbHfn4WPAn9U{9U5icmVd`1>k#* z$P4H%5jSs-LWOm%)qognz8A0-6mTAv&l&*VCJ#r8Kn5SMOrG8?0zvL9lTQwrI*LOB z{CmRGAEoTR0r+P`R~iAosbrJ|;Qzmhxiqw*CZH_@766$5RQY$X@1==Gr*rUSEWO#% zm)yi9gpBEFpnq68=-(%OnNVNoPgyK=sVoB@f%nN;Ig&U8=`39EKU1LZsJAPQC2KKA z)H;xa=8-6Zp1`ew4{exg*6<}0IGDCUy02G%_-hO9z$efNY74^;gT`KOegRAyKz3ub zot~j};p9T#=}w*kYfbeer62r5(X-@52 z^hqx1AbZX0Moac;u`+}-kdszN8rq2y&8Q@$mK*o6r5#+z|8nA+7Md5e+zO&sSX$)A zmL0p&a#I#qUh4Z;_34_WQ00{;lXIX*o3b=IX46O+riA5{gSS3S_^Zj?0)#{6L(A|6 zRG{is7LdNKV4I%w1FZ$sB?kd;4!(Nw(duaZ@@kPff;F437L$QG6h!%1FQP517P=oM z4}zz&5IGU5xmy)?t3(plLQu&%KtT^uUt6@x`qdSv%(fMMWRp|6m4cj4L|Sr ztQJCF3M;B$cj*=be+svNzjrYRFAFRN;i`KKE{ETjY$bwGBM$PTM$lvZZc;%X~S)%60>a zkkBki0cFykE2(LL+d63RFOd@M%zG6wj0xn6gp6+s8E5rkq*o}_rBV^?1w33ojTx!l zI@KaRnP>N2aWT*TAN%pop0mBB6_&uD*odYs+gq>ZE`n+V_6ZFwBL4upROuOR8*p+5 z;I;-)gxm~>u5YGGmptUuukELQWo$GHnDXey-Flrxt^5cqS8;oEMt# zm$51w-v5rU{aInVNDGGn0heuHB%d0)#Ox)ZIChVK;+nj`cZcoZxV*N34h2u(?h~>* zV9)cTI{_d8ba%+kVG>udBg#OicjzAMr}lKrLhaKxJOTp4?FRysJ%gV%thY)XYL*@Sj?>f?cef)cJ>F%-E#+kTa~~7m~&mHU|nDy zu65z(jpS7}9K%1strSZ9^@$dw^d>vn!bt1%t@tJ0rOn}e%ZpiRxzW|m1dObSDBUs~kZCEkyDZHgP9`KTODdJR7=GWmt=3J@qiWx>Vq2S z;Z@}Cw%~Fwy%P6Cb*UO5AmsIeabY>83g8=Lt_IF!gaGO}2-H1yQ3eTLJxvpJWe|Q{ zLg>L-#?7k`eAHUuX&w}hw%7XA7c!+Ax!r9r0QH(|O4q#1Iz%P)AJ;~{Nm!X@<>X!# zi(17BTg zQ;0BD66RPUkQH;FSemh{8tT;*Fb5QL!e;0e6LLFE<~#7MwZ!W+!}Xm^Y>lL)3EOD; z-C7DEud%_mzJWA#k4tG^x3|DP_?+ce`NW}Dk6MK#m?+OJ+=I3biBS@4?k5G|Uci_J zkQ5RiP`n2Ye=p5OF3e`$74u!^F)D=6ng?L*_sz|qp(4*lzDC;5FP>yD?)5y`HTKVo zFSR8z-m<#g(`iweYPDM*w`P31jNw8-aDk3Z;*HfZQ!DQhW6g4fv4Qf0NDIa?sM+P-|#0+g;mcagASFR1Kf& zIM-Yzxkfk*V#AyK>W#DZ0@l#@uRv_Z0>(DCSW>;&hJ;G%hjBxz@XycuolP8uS$8K> z;px691*J95q#8-ElD^#o8(+7$owKy3cuu|BSU^j!*my3RjJz*NIN0?P zWkjJi(qa!AmkuMu78B3Wcs)^Z2iHM@>aaZLs-XUe_5uk%sl)))j)P|c)dNMuGq;RF zgb`9pBJ-oQz&cGnU6^<(LQFvZ_G2}f@L0jrJS(hDrmE+6L^!=#G~D++oOVyd5-XLM0-REF?j62+kC$lSfcjAQ2E zy`-GNBM96fPAw+wKU16}$S-2ePo=YX9YXL9&V0IA8;|I5@mb(VBsAx#(WVIY3r$`eVNjC~K* z0{9Iqj$2Bf8+H%Eic9EJ(CocZl`%2Gm8D`LPR8_sa8m{a)|{r2^!0%HCO~~FO~Tvg zDx<#*bOqGE1S>&yCyoczpo>GMBe8Y>%U-PxHAIRz2`9W7nD!*h`@JC=*vCa7y>2H} zhWqZr8;mC7w3z}-cL+lPk8nNKJb8pwuq=t3XQfo&l{!|zM!gcNhabM3IwSa=(aXhM z!sH+Yp%fu?3cf3_%T;cF)f)HCu!$qX?W{9?NAJ`ad~nlk+;VD-pI6(^B~fO+ zl%CX85Le1<&{MP{OUNG&TYhpIg8m0N7IeN)=6bsnjVZq3n0=8}Yd<(^IM>~17hMx> zv)4A;_$@pQ9Dg(je=pSe!6m}!IM>l8l=emtCpJK7`wuLLu?Lq&ajX3{{NqTwADiGr z68ir$CC>Vt!{Wq5r?dN9YFGT~PTTt~(>^wSY)xxkv1WBQ3>AE2o0B1eHV7EC)tcAGbqQ=1n=ofsG_4VCgA59r$DQiElItrJyIE9NPO(WXqP939LyHGPLp`v(^nBtPNbV_REJUx6mJmdQ3I>VMNlJ}>qrxP z1`AaMuj1CSzImyBwALBm>`PgEy`?UJUZ+yQ^rbA}l1iCEa-UyE;gVo{dM|oUcbF|B zNtn*w(!v9sQ}}hpuZt+8#X+NCYc-A9;~uLiUB3e8_z=MsK893GLp8;ex;nxva{ix0?mU3 z&86(K%PFdrz_9bzs-Qo`_N`rRPYgkt3zCWf3H#MV8#yxtEg{#2&D(3k7iHPdxrsL6 z!(6-f4SH=uZnpC-dfZ0NO$J;c%&^W!kW1(m2BIh9Xmk9wubR`I=4TVJjy#RU?Rmia z6`*%2oOT)nTBEg}0l2+qH5o)Hz_RJ7`9oR43IHCb$s*#>;nFr{{WnmSN-}6Xpge(- z$>6f?C&A>^J#F^zBrM6;gM$cCc;=~XmeFY>)ppr${)|5XZRX62C)>>BbvBL|h|x&n zLzku79VpljF!SUg;xD~Nm7w+*d13<}Tuhl@X}sONbf*pfoGGdA?XyWMQ*6i>{vZP< z+L^f4LXidj^FRNx&)NdY^mFs3&%bKaywdoD3Tla?5u6-RoxbY3%9x>^PJx>7B z=)w+zIp}>;U84*+!CeHGL86l+x&RliU-OVk(ytojq-G0p!MZRe{k(3M{OkeZi!Qed zFCSqC^H8{ngg@9!R~r*Sl*iz?9=HSQ*EkiF0}Q$sln*sF5boG)@vVF(fF=z=0CS#X_5IM+?#;|7pSq_jKoV^1|PDLO9$&B@2iOU3x2gsVN zHaFq1x`{Ku<8<&?J#ML(l2yb^>A_;n=nxjGv+a95ZM}FLE}V2t8vg}{0plA`q?cY# z4;*60_mFo+FN1c-8!qIXDdhD(Vt|p)avWRCyMOxf8%;30cj<$c#Gv)O)Q#5J5KsR_ zrFC}KSxaZ5wRMBYJ#<<5xQf!9B^35c8*Rc_jY{IcnS))yCQ*#Xs6=vO2Gr!^L$ROg|R(*a$UzTFBE0bf>-?7i>O zhmYc{&#U9XC0h|MHF?SJeikD>DQJ-B$iNSvmtet{xC6Hxn7efvHm6tYrpt!f&wd~` z-)+`+;3MRX?YFScN^CTFV+`w4RV+qG1cz^e;?|BSu9C(4KB+vEt9k;?|3NhQ(Tr{JX$~J+-b(dtWUyzta{>; zVz=DZY2Av>@dqdugon3#H;KfMt9r=2oGICZ4qH-IE`=sF(UIr zi{h>S{ahSIf84$A&{RnI@ud$d?ACGMJSiAKDBM5kbERE#$w=G%KDyCHGB?=5*X)7| zSAjadd@69oq?~%`U@}vR5HIp~B533>bB}yPZdNZjy7>!ubHf*7ct`2JI2DGK$wh}9 zZ-42IN!GWF+{Y>$9{G%muG;C@(CeOL+TI`Rv~&JrpY3R+p_nNgSfITKbZ9S17QO>= zoACS^CK`h>-kA#td#6|K6p#rj3zs*d5IZn>W*OA;ss^7p*r zLbAIE@z38d!#ej3v-Umr+V=Ht*}feMPDS9p0pVHE4*CrO6Ql#QSk1-G5G@eK8qKfg zP}mQ^4v+bBoi0wCL%XryH;1omAUFpviP*4%U=$2q)E1ffMmZGDB2X-I{mDV3fniEA z@wv%%Fk&|($uZ(nQ23OFxzGR|PJ!8q5lh1mA5K{e`11XK!Q(J7VZV-{Gl$H5gu8-h zUGt_+X6TymUetEC?=L%`Y=OzZyCjUgOYXC{&qrEn6yxs7_u#oJu&%ChYwfHfouL7i z+<}zQ1@r>WrlnO9+|Nbmn6811us99) zR$yc1dK#n26;r8?;$v0*HrPw{4jTPvCsBj4R|$E>H~l5Kl^mRcU5U;SB!`Mu1s4u; zmBShoXI~BAtpp0d8w8iNgafEuCDg6~?fW%?+6|y~MeZKfi`@hT?Y8`s9rSOnw7jS# zR=#^0n^|nVAh+A>s^{4!4{s^rh9A70yTqY-uOtnEGp8eJg4Q_P@V zY{UP3g`MHM+6J6)6XpMV?4A)DY&_WY)JG|HE2#CKWhpjlCMiU}91TcaZ-2P-1wtkB z7&zK$4}z7C0>3YzOuQ(4L%7>Vy&wW%$+?SkO@AT0AX>%2r?)9G0tX_b^*M@&&qBI2 z8AI(P6CuMIFD>oa;kA>P-DC^r5qVyS9NXKo*av2F^Z{86L7nX z=OwULF|BF z_5H{jBNmf|wjkObTTCk-s6LdhVH9GAVkW#74P?>+tSWQ!?b!w-L`d6)mx3LwOqmd<`LG?uaXPk=md06ng8r34zB-6JV`9z~d zi`P%4)$nC|ee6v8#Sbo_$b6$cJvG8&F&gfdbvvSk0;9utB}}-p?`qbxNxRCU7tQF5 z0WpyBs4DV(>8OsbVFD{YlUOCM=bf;>+)P6clv|SjgxhYnLn}YC*8TTe^WOU`2C$FE zL2^LTT&jRMZ+X0wHl!Qw@CvqH+2jCSs@**Vz2zTR<+?k+0*e{hx*9L{%q5yLb?f{E5jI@gmn{MeJ zT}O}oS5SwCAMauFU1IJUdE~iAC*{;aJDIlEahPSIInpvvFp3V%wz9Z6R=SU7>;oTw z$+#+fh4J7xgEBk?uaUUEh(r7m5FF!3G2y^Pe3eji^wgz&Mj+mzGy^3h6D6c4-l8IB zBRU5yfZ1CaT8cdFE9a~-ce@an=Iu%jRfWKL6@qe571{;Zz1u>B?z$B40oEWsJIJn( zU?O;@gNAG&YL?t}w+++{Rb6Z>+69^u{FAqj+{`^zl(on5)480w){2<(Q58AcWviF& zB)|f6mg!I53&;^rOr@WZJ3N;zGE1NB;0kU~&L_SZOlYF`N0zKZL9t5KHginVJI(j_F|l$-DbNO-4oOOmA&YFfqZi%zvK{m zXyR@X<1_K?Q6qc|GoSYuv^w-5@c3bttYOT#xQ80z1H$ZOS@y!*9Q)I)b5(g9ZlMFt zxXy08ih0%RKeWADmSWv`6*Q(pey>~%{PDB*KV<{c_fD|X-Qy5bnV8454O?GE7kr6|r zYLyX#S%t5zj_3Pq)*}1cd6&BP>z3O-uy{&}`>T)Gffmdl%>rMcvQpUoFEK>W>}a|a zYA*(SX7B|G35m7c7GK?Ig&oIiV|0@J@I1C0!ME7p)BkMGj8JbEGmB)oSRYP>^X>0| zvNM4ME8-^~QCb>^+d~MD9T@x6ldaa79ze$8;jbP#7q>HdI4xR)J6QdjV%z~hW)Ajv z>zm_p)W-7Q=pNsJ<4o5&qv#4nPWHfYu$r-xsTc;}n0A)`ARa6G%-O7+D*S!jLyY?* z68GxQJ!mZLIT;ls=ww5U&X%gR2K)Do);|sJhI(ucExDB*s5>oj!+0y&Kb4uDi>x|( z71uk2pm^^XZ z!rI}=^d24&YepMB+6fmw+Quag9Y=U`C1!i=hdXptm&>yRfe-(81a1>C_p2z9O}c<< z5Saf9g|-E^9zE(JhRmw1LY23igY#`b(Sf<}lsP2mzQ<@Hm~=FkVcJDpRy%kR47)g% z2=f?{FOd`qN1R+IQD5SdAJ*=wDBPBuDE z9&gZiGZ|@!B$BCp<#`Gj-ezHy2-aara^re*6J6A$%6!neKpKiP=G}tcU9cS5CcPT) zn?9di7Tf?5*K@rRip8hB;w<{Xs|d#^Od&1ut`V0q`qlV}sUbA+#RWKCUOTiy<*7jAO*<*JPu`@!hwbRL+2s(q}*^eg? zExySfe>cw_ru%02@)G;|Eg$fqmZ*D^{pFIE?RhNIQ`a@vXrzs&>9lzcF5P39LroAQ zesmqNwv*Fs0k#4u4~_=f|@>|0h2u3ghuDm<`h`Y^30IIH)>EGdb>mKh}oLPhkg; zZ4;Mf*<*9#?BXl&%=P&f11cW2&^`}Yf4cUr_`{QS$JO`Pkn4xpvqSE)8BdI}B~QI- zE2qq~E$_Z*dlxUTqz$tf+wv~&&30TOwHsfvs&%+8nvj+IHtiZ^bvs6o@-xO7h)pX4 zpNhbzq-~Qd1-hHY4o36OTuIl#>j%=BT|n@sCspS>-cV!_21;p!XBp<&+2t;ggY@hx`t14 zOw~6aES)v|5-A5J0lLZ6#a2aE#A}NqENIY`tY_#QKfK@ey*I_O*3Kn+XNuKF%)_N5 z)lJ*A&=L-64HDT^V0wV;_6p2S+i(d%5}5tsvif6u;<^r9oysh(>j_#1=4@vU1%ED= zp7x!T${bW>H7E8G-awx>%Cd6PT!jyHS)+YYp}Pe14q>D;0P7}6fU&8|{A5?X-F}CK zRAHaw$5?oSfbcytj36 z4S|*&BHonny0K|@bNjHvNEBhxPu|fZF4j|>^l11^)Xx9m?9|=IL1;&c9WHl>hU+!- zYe79}I?}};>JCO;R|2N1EqNcMzu0*=sR=eeG}lU^=|dpoyeN7;up2v{gbs`xex@9= zP**MHDq%AgJ#cvmm*nS2UPk2*Ge<}v%(4Ov~6saNypj zEpEfRmau7_y*%y}`{RZG<37?sXQ;D#sQvO!ui72cB5c(Ax%TY*5l+C#?Sm(OV4I6TDu^SlVLWmuqoh@j{hLv9(p0d&LBp^3p#Cx4Gs=^fZFIV zqDs^ndN053-Sz|g7eD2?bMR1KL`m#dG}HX9@9p;Y!4KL!e;&d15< zO}F?@=g{R8W`$o&XTju6B7v*`6{AqCj`_P7DwYOUPTz-yn*IePzzW{CIDy-AwY9kL zURP3Bb`q9d@OuM4^_6XV3OEL~3fR^3t>Ganw~e;ARiD@kL-7@$Hx2y3P+J>cW^uLO zFiNPMQ9>QSu58eU2qd2E2W6^-{_#Wpc9$AHMzP$aUo57&10Z?^rNHEdYDCkxi!*m~V_!F1`Y@atiY;xM zCkYoo&(awv&3}w*b#aKSi&&(&PKvg749kYshDX|Kkv`qUJ-CiMrM44Ctcl;O8z1-a zV_#W!U6Q3meU7Pa7G02UGUMkR1U>?O;hLqbM^bF6YpmG#V;nzOkgvdfTU% z4A5uc`{|&upJU(l$a)tbr(6#=db#fql;yiolpiHNYS?@6_VW8>cKevE7TSL-k2=i# z;-~k2$h>}MLApYJG}L@QxD%}R4YNUg_@jg>$b|3OV5mt_f2>eIGz1m;$3g#NzwGx< z`_n~N+6`CSWh3qxX)leRVxP^KZo3IQ&fNYcU3qU?8GHF+sCCg+y1%#JODNs`H2)cV z(1CH5HmJL%w`Onzt$*Y2l-Sws5I-Q6^VxTm*DIl!a0^zhvqZie{Lc{l&-QE7aBoN2IXI!3gE+iX zO1ya1g)p}`B(g9h!q?+?tOVTBnV%1__%);G-C<&?dM6^MTT${NK#K8a?A+_h_A$#M z%~~6Ct){UITL|JcQb`AR>gVdN_UKYWdRGD$-{ccq>xZ*-609?YG_@V=#)hpsAMS#? zALgOD+gJ}+bbRf6@Y*`+0PhYy-t8ze!7W|2)=Z*Fb4RUvZcocasGrSaPU&IudO$s} zok^zPS~W^>r;g^py1b(zt?|RG{BSu^My63H9{R>t@$XWwi`sh^)?5&9p+Mmz4!!DqVcP3~u zK*qpXp;Rfn9>bFtiJpIkw-c+61fsizg>JBx?rin?;>$;IQ;eL>F(f)+kubBXJ558Kji z_s@v2zJ2Zmx^J`V?|Rt^i0LRWh8VY0S#;AkP7I#=PJ*50yNcV~Znr$V#)dCrB9lyi z_fVl6JY-3{-L*Il`6k1jSeR~qzWQxsoguL4`?$xQcJURHY#AldT{(sJMOMD8jLWr; zqcZHho!J()D%xIIw#G)!de3fu=3Tq&{^#wS%jp09#UmDc=EFSBP|4`{y<9d5LXu44 z%Fp_7|6A=h7d&92Zh6RNjDN+V7QAj*pUt!8ZL<-_rz4)z&raY$&-%fe>eduELC^c1 zc*@dIAnit*1a^W?Tfe}%QT+vDxwelXd*wsh@aFUOqmWx!;;yl=;ma(W0_H(Vkgl~R zuJT(Jg_efE9-*4gqZ7`f6_FC7B_pn}&HC-*5Y>Lzc9k(hk66F>k`tCi|ILz}^*H1I zV*^93u)(aG3#KCyChfJ7lO^^dtq{dJC|Sz?o2f-CB%dWSkFAa7MrWWrX_km)+Ob>E zfwN$(99luNu4sK>H^GmTTzay2sqj9RH#I;#k!rM26;r)7*@!y+3MLE6rqPzOiN$0i z87S+iVy?w9$h4+Z#d z1Qw-4lp?>l!?lTAG4Rlbw^;PTTP^kz(y`W#u=w>8EseiqCccLf*mN<3xsoAEf})0E zxF`wqt@X*)P@ij^9c9)H-#>bcw^Tkqlx`wSlmn>AB%V%Y$#U(k=N8?Zu@mU8+jdE} z;Y%BeE;b9DY#O@IbviMRcXl;eM<;p`OGtZrE#GVS&SzbUjMs*-(QD*l-$o`zHFZ?6 zu4uDUV@)hOEi5Z7oh_KqTk)^ZDRh+A)y|R3($tmw(^G8au$pBeolZ{-G)%eHC9bNVA%~5{S_@NRHp>gq*}Sld zEM2XiRc5jDs4LVb?Wv5V$tz7}9A}vptK?NYFy2aE6>X$7dYWnu!A%(}t(uood0@8X z?RbsXMU$IXrJl52v3^$XXEa#6vmCX!VuzH5NjwNuyYs7LJx6jaVc$|oQ{9#i-n3`$ zzs-Jq?!Ro1n+q_+A@C3SPPX&UdkySlmO0`{P{_aSg5Nx5Bj4O&Z*MEa#gb>wZ7rhV z9J4r`I-16()nW3N88&fenvJ1)Iu>UO^Gx|~arII+!0MSTh3qn@gE|$-za`O{Go#nV zGDABLx8^u`$-j8GW$DRHrFN@&NS~qg^LaKnFR=8C-sm?B4|} zT6f6mkDFz6e`|3t!ol?E zPiU2&`h}hIhw&D2IwM3v3BCQnWp?L%(`<8oF=IzM>43pILrpTK<%q?$9>w%W%2bnC z5)?kU#az-zG`dzq`Egs9Tx$!qrrMMbx7&l0KC#Pho@(d)dYtv?uRk`+2pYWhPFkdb z`F^^TsUO{BxBPLG%@{Mv*1q*786O@*;4N&dOlSmItMScL>|)v*p$k>46J?myD>g8} zm6CdiWJIkh@%nf8SUv3QO+i_`^PF)g#zxauMc85n>g27NZE=fUwn6>XC;u5Dlj}COZR1Oq6`)1L;r3YCmr|W2sp$Z zqlLxG+W5E)$Y6h>Db;~tfRd(CSNWwWtt`n*JxOA5NnN3tQ+Ha%^4l$)w#xKRZef9; zK_?9ji5Nl-X)G$9GsI{C2~R;(`ot|82}`fhvccMsv53uvoG&aJTujk=qE+H2lBl#< ziC=hwB`mtp4t{vM#Vj3SF`qtaNvlU$JZ-VsbmT^OR_s=d1vuz1(q^o+`l9WO9f`8W znmB8y%d&Q6q;|0xIC7-HDM?xY0^W4DWcZ{O9bvJUE}#t(;`$d5HGBHBfOHDeJGh_c zmzh{T`gE}nb%Om}T@6^)SqMS`t40S)MSEKnPh4SbE#-haCtke{jqT+Y+SpOS%Au76 zvpn~1W%X!d^=M{AYNh;3>9>nG#ltdXYV|n6>fsgxR*qw~$gh}5vvR_ftNpfWy=c{v z;#x@CwUB6;aWw|FIq_-nZ~@^*k5Cvs_Ej6Ie$@esjv?KaHk~|_tAhP+S@FR+tP~U* zd%2X@73RVNw4MJ+& zQo?&2QbF%ic`6&66gE06BxNbooZ0+%itXxGmQ1G6B>)k8!x7)oF-mza_G2TK4)7-Zz=Dvre3*mH05xL(1JB#mbGGo33*bu>M2*?o)7n1=;f%7s`{3(-w0O+xL&_@EKd4= z{P{f|^+D@D;7|6%=ovk$gZ?YS_1_kzvrwfC<)AjDZ=PtW$aU!~WZG_M7m>@}BJ6uR z4Ou6(+wku+TsnB50ZEHN28#+Vc!k^cbchlFJPsvG%Rv^xRmR3qS`J1M%hLYeBzM;#ZQp{HMg9Nv=Si(Y)#Ja(vaJ>zRVIhcPQHfhV%o0{SV6m%4TJrj_mdwU7^Gi%R z5tIp|n1X_Xr7RKBoBBCj<9NDD4_ZBOueCK9*3z7Bt?>B{lp(c^wy^{7TA}Tf6gp9r zIO_)R(V_Sl$QVi6r<^@p*XD>lvJ)kUR%9vA+SP|y16o0GucM1Kpc9K`M`ta&hbq&) zp|!2tT3Y$&wlo#fveC?;zPXfzprwSFTCFA4NGZFqt=gK}0fUx~M)NfzXtna-2v)oz zEd$y}c)c5mz*2BjO96=gU3JPW0NhyH2{sX&x$T7WWx6cKZoofO`y`EV?C8w2bZP+E z`)5;MMwUXt(`xGF#m-=-5bMrnVdjdTWqAp2(vtc%(<0si^@)n{6~vH+CBZ76(gs_K z_t{c>fGVZ5m=7RaG*S5iT~y4K_}D^=>7y#azga}MfGnJ9W-ViDQO5Ujx5eNvLrX)L z)`WAlI8?I5s9>*ALAp#iZ)h1{UrKwaz`g{J zsyakQ<(}zOou8-b4CGhw@o|vGpLN-b#NEEI zrk*k0Yk6L$rZ@-I&p12>@o!Ppcr2X%>9xi7%8oj_YRD>{ioHni754fp zGBK$dXLo!J_3j{vyW0|ApUKQ~ePqOXZU?OndD#AS%g1*8L#yrg*Uz&HFZ1k&zj)Su z^wX!<0!R}Q5gpE!;eMPdW9{Epy=^z%w7~9uXqkRgW8hXaGcq(^-O_n;`y7Inb6`OOo)C+XkO9H&)X~&dwtH4BbMI5YpiUsjS1N{ zW!@&c?x896^WQyYr}e)M$i{=m+H)4giowj+_}kB~v!@=MY6stckGAtqt&&`ZlJ(D8 z{r(9o&yQKjUgi~jIhI`=TLHaWZd_(xfpZxp<-E185$6zQfBMY`7NN`SqAMS_0|nZh zwDD&`DiH4as|IQ*o!eVo@b{V?!UPm5`+Gz!3sGB(#do&brk(Bf!$BCmaLk{{&Z$IC zOOhM^I64asIC%=U5&flqC)s%j3s(v*R3c;NWWW<}79kfv_h>@TSib;q&*IulIJ@Mb zEN+#}t+Tj)Hg^?m*UT>$dn=Fzsr{0Wm$@0FmLSwW6D24EB}mQu85?L_5_K0&tD;Pa z!P$IJgw#Bmyi(1h46#{$7kbWe=GTa{r_sJItd;>CJ39x7{HGB2l|7u@VKh*jv5=c2 z0>#jEE@pz!7bb(&NsF(sM2LP8P#v=v`{Yu_daPis>}L;K?B`4ez)+g{#T0rV=qubG z2H4EByhHQw69O73pD~tjBOagq3>iGctm`ydlzTZHT_Kzy(?|5ln(TOjGpfg(XjTLazW&CJ~)F?=%x~c7t%~6r)MF2x=78iaBHOzh-a4r-ky*gs}Tp`I)_gsAVI)E z`T)v%WvKwWa63rAjsAn;Bj{F#mM2ST-x8ij0InjrE0)JFfj#m)D~VvjJAA!p`wJAH z`LtE?L2=-{z=5}@`rz7aPg)(~P!%7f(k*;=2<$D~7jBUo7uo6sui3PT;r7Hm6YQ4D zpRr2^D@FYgkmylRbEI8Af(d7g>mIc{$)@hex92xy+O$<)k#^o;Q&!d5RA%IOFRiQg z6KYpK_FOSQMob6eBpa$rmDZ*n?miN+=&{WO#JVuy;^SgF^GB-e-enj3{!WX_J7z_I zc~Tn#xm!>V8rm$noOF`>7Q5>|pK?2_qao1h(-iWq>h2xdPYgjQp%CCt_d}w`^AiM= zD`!PY3b(k`e(S$It=^~KW81yP62V3e(PrS2*g7UK&TFN zS6M2`{=^x}cwIwDXc^&0aDOGDQZVkYTxx!ZpxZT@@?A5?GGPWnW2ez0_A~91TK!1? zchY?hxP5*yD4w+VYKuq5mu4Tc6z}`;dn{(faEo8{n8mHb_{AP1eb-bP*j|M(;^R9Q zZn=lh2tblNKEhIdOY>=>DWid%0f&wC89->E1J@=*b&=%ePJkH@cgA)cm+)=@_jGaV zFh|3iyLqph`2X{@aA<}QdqUX@n|Xw$wi;{Eav)OOUTRH1aYIwS)i>txJ(uq}R$rfG zb#O|4FF&v#^~VD5A6k%f z8Ltpw##cZ?RUwG(3Cnj;Y+4Kp_CYmU@G};+3eE zR_$26l0j|-gi)G;<77sxN9g)w*QLPDPBS;R-nZP$lO?3&9)*uXxQ@$p7dhWGwz z$Q*2unKpiTEaFN66VGa0Qn>e$$hX9Ezm0Q}6qSj@Z~@{~Jq-Lg0lNyk10UVNq>F6@ zHg_`{^9NV3M!>#-+;QG~r;ucSeS(>@b#|bEd5V}$4i+ASlX#?-D(?V~zV6Yl*&%do-P_Rs( zf92~hs2qQ@Gta)={&>Y?d;IAYwj6~hg*`xF8=2l1A!Dof_-Gb{Z$BG?2&X@knE7J4 zO;qU#^Y-y72S!ryR9jUP<>f6|t@hlz(e~Tx@yDFOy24P6{wNxKdA5hI{JU*@=PfJU zO`8Np$RfgOOX)tVpo&tC0M-N7lyen=U$jZ(lvnMRe~+dx`v*JwqDSn@XjZf)+&HXe zekH^|d-oL1EhXd-l6f!ZjyhazyP#P~T^)9yuEzfOhj;n??-ydDyEz3;^CjI`XfY^M zLQN;1eOxYpoe5y4lNO)?tO&Q8#L-7ux$wGIFUPt=LY7##PEK-de>6+LvKg+bt51IV zEG5#)#KXV||4i~M96Xt5B9cTzwX+%dlezX`%cN&X=1phZ>>EfpOs4RfwERv8_Z^l* z@ijoV1E@_jVF0pwbn^cjvYqnbDy!+@+|t3lG!kN)UxOI&fk z#e6oxNg^p*3HRkMl)n3A%OtHjbMI@GgI1m!1)kt4*ZfDd>J(++>n#9>s^TYMMo@?uBQ$h1| zZVi$*f$9x~*3=AP=OJ5Kt9h%d>E5@P7xOm#o@{FN%m=3TaVXsX z9)x>8{Zy*T7UG5JTM+vui{@-PujW`uEVh2sl)~sabUMtlT#!5~b^&h?x0b?k(mV=| z3)S-g^?YHv3b?rb)tR-3C!?fG%dD&3I*8|>CICvi9F%0k;bY`P0K1RV#({WU?y@}dj&g5bMAa0o!bju-vAV6Rf<4*4MF_k2{@85fYk zS4gW>9z5M)eHG0&zB;z=)jLM<7Q@i{m+qKqWfWr%tX*j1htf(Fa-E$P%m^Of_Tqoe zvC;3v+oZ*5^mIlsf-RL~E{42OU?qeW?QFtk4hqNh^YEuY^ccVFy|F@KORe25l%Gft zz@ys>?TKAw_R7363%!6yK*Zu-4}QXS7nK=MX@@9i?ys#Uc?!RIGbOy-uWWM+bmPL& zc=d0ye&;@9w+vlqk3YG@UVG~c`(%B*ZP=A#JHgofsf~63fjTnlE8Cug(h*Z?B&Nly+gbgFeTR|zs(8|B_oTcIp9B>ND_*uV`*dU;Uk2$1 zSS|# zIaH$ecjRve^BKbRw1qcY|JX%0SqyleP8~Gm!)q;P(Y2OGIW&Rq@e8l9m_@hX!@QF| zsrxKp<%1Tt<_RV*PUPOKif5-Y5ioPt6wBWC8sdNe|1D5sj%Cv)RKQL?KOLi95yL0T zqOkABIDl<#fG!7!I$+)69Fz5aRa?SIpXQF{UXP0>vx}!iAWUb$qV;}d1%fUSyBX=* zCu-fK+NXGSNC5Dgf$v71t-e0ZYHL#j_=&XESH)Yk23giHiEV&J{<_h>)d{@1L{$3} z2mg&MOHHUUO-*P*t(Ck=Dy-djb?DaWJko@xM}1lR S<)-L}*Prr(yx~Yr0aYa$r zs&!H}4|m?1{}1}R2jCFeaP(WNKk^L;I>d~z{xuhDwUj-y(1QGB``_V{w0|C$x^J$9 z6muvdh^r)Gz7=zAVdPxPXMBX0bLdUh1m2mVLlFJKL)!HgGCcnF7T#9Q>s&$QxQw14b)nFoV|`Goyd)YXU#dq()r znYPrvTtWN&W6F|*dk!~qaW59X3_{?gBI@Y<>;Hk~EHhL@b@pe_&Z4a#B>7=Oq(T zM9}M*Dl7!#oU5(xnZxXXiSJq>3soEi!rqRrI%cWNl1r!Zy1$^w!aq&2s~?$VKfOq;!PnS*fBUONeYVnS zH@s{$IQ8Y0(Q4kJce7uh%w55otb~dpx<9JFeAVu{VLbl*U)ec7eayD(`TCTlAo`T0 zfY-@rB0iP}q5L5cwa1CxJz)p2NJPRfV_Dzsd;SA|(KA%KOf@K0!T*NA_%;k?GtFx;!M@f zTw1eo;P-)Xo}Lx}Uk)pPnEm(1!UsmlF}!n#1qTw$1^$T`D~S&v4>y4RiV$$20&>n% z^E?&({hGSd&z%J(WfA_%I7SJ@P$N}*c@p5C@!>U=%~IhUF(Glw?xNOuuc;p^{<9%E4b~oQM>foVedh0;Cfg)#ZCWNE8@AYg&#&61Ekh8A=|W3i*2VCd$c~01$8xlX=LgB z)JFF(MrA($skE1asO<-4SpnY#@wpK*L3d6-eMvV0`(h5hJft&aE_m5EYXE!>>hHy9 z1LA5SP}dkmRzLQ;OI}fo_7Gf!1f(4RTD=qO{TIdEJwbW68q7k4`&s}b=4;u|U9^mp z5H9R`hh1-)S`G>X@>CM?_R-0<8)XmWoEZvqZ&mUMtfo`Ot7Jpz*V>(FznVl>re6Z^ z?yQ92Xy;e$eatHNJZja{t7`Dmq-{Dj6tzjs}jshF^1?HD+gc&dr=owu4&qMm3-&}3a(XksC93fO!x9$M}eXuU+ zM1b#*|2g>opvh|(s9rPXQ%bUbML#{o}9JRGV!kHHV13@&pKG&0n=@S0UfI8!t_x|QqrN? z7TlKYEE%XU;=~77Lk22NK;Fo-M!%OO7W)3_mz6eh;^%h3#Ut&s)8&P{)~P&qKRh1| z{;(xAe$Ar8Hl&G{)X`*n+wc|ahdz4;*%bJq%THKL1@88wYC6ZWm=u~;+GUxDKL>Nl zY)xvnZOT4wZ@=FP=YQ00`|DqA$MWS?&+6Ow#biIB_p3OSK)T+?LiC;LU7p>3%>*={ z-`c>RJ#1SKd~GSzBzjaFe&=3Dr*g_gfBDq4WC7`(Ytub|Uotqdt=SIpV)xZI*q2q+ z-{JQml_0vDxN@`61A@{&{r_4is)3I)Wc3*CD#9memI!0vEe zHBy&lX_Yu4YVsKqn7h@`VB=`RX-oGQerwPD?@dJ|J^@;HMD7v`fS1|vAu&+ckd?`Aq zbZsRNIg`vF=!8#)S@LJ_`qd){0vkmR0(KvjyR`0kSuA{mvdKcr+s9Ck{S>|LK{7rhSG zJ;gc@Chtm+^DVX@+ITIfHvL+3_of2A^4!AFgsd)uWm6pj4dRgum-5-v3Ce+V0>uvy zMOaK?ILU_!y{+bZEtl&`n7PS|t1YKgK%`DRCjZ)MB%WIK2DOZcZj?w=L`xTd&ueP$ z#E(yXRqjibeC5YfY>ogw!0Tc7l6JlW_O6sF%VSszmd>DN%$)?{&@j*{FTJ3@7wkQM zH?Rh796r%u1LePOrG2>L$O$x_ukBcSvE`=jVe08ymWdXhzMnMfh;S~4TPo*i2VjL* zkJ4%IN;wd2nIL>d6y!eRAP6rh-z(9@0`z<@8{~)n&w>8Gs}%uvWg(znKrtNlk6e_0 zh%mHhpkDeppua$%&!GUU#=y_PofWaT`}5M2(-U5-Cv8QIX;a;^Mzi87mehEIWgGzvw z@-Hd7ZhF$%*m)+de8UR1&1D+Ghj!!7uXd3r{Uo8E{-|Ak>!k&YQrA-#D0Crlf1Zp+aGRw)DD$%pN@KqXsxl`?3DNG zvv&aV`9KYxh^jtrvA}%-WIu^#P2^cKvDjpkvzaJrv^`0M_IZ4VZAd+8f4_Pmk9xa} zxt~z(4NDmtJ_c?6Q9t0jQmZ5MeN}XkXQpuDGzfi|U46w^JG0N_cFrXa*_X*QoKb4^ z&o9!LqTW)gU(?Zxav@}16gTq@mIC;Ds>ohv?{k1{e`IH!m22Pd0|osn5G^0WM=oC) z4V{CKlMBjcq3mSCCjvcDGlcNre%20Q_XW%^F!zbL7Z7f;!S(FzBq)#%#6*yBc6LCJ z50G}HDTueLiYohhHX-VnYbD-*?25P{P$6~YJw)A*?6`tBu@(NlsDL!@3E)qT9#T#9 zzau=Held!U^DK(H`!yVg@R>sRL=Zj!gg*d*Pgy^VJdN8d66HqGy@{ZF%#z!w3Eb^m zF-f08;n(4c5xUETsXa>;`6lP)?AG>1YS&Zjx=H=nOU;Z3vYdz+?8YIKaKJ)ZL1m(= z$XabR1v^mg_Mn->T61k8#5vQN>a(l`y`&YiZlSW$)>6z@nayZ#<-?`3(^_#Mw&9F# zZ6RAyI{-l4YiZ80-?X5!OA>0TO#{+Xt+^%vsfhYO1q~+9^|}&(8>3E55r9q#L|_C& zRX!;KqzBX#?6O*2UkuonGQAm|?|6SzD*J$RmJ0S9((tJQw07{qFyeG{Rb!@awk~{+ z9fy_p&_PrsCLbnF2U>Fj(>%Td^TKaO-5r|yp&nfKHPL?6!dIA(o>(@3oLl;}pl+pA zb{zYb$*AA9*!h9T`0iuI-r^g#7Ut(CTT0AFmK?p*@{&GcO2<-52VHZKOtO$na#KFB zjKn3D3ZvHLG_?1OgCAH5f`1ORTV?f>vH}#7cvE-~nI{swRTUS!4-@bQIpkO8FHKpF z^HakW!aJ-l4gfwz9pD=^28TU+fkME%z+t`)C0rF=0`Pl1zz_Ksz4v_w^R+(2%*UJ0 zLFHo=mh)ut-!}vQyN4NaDj!uiAmz0h_&$@;ka2|hbDf~$l6jhi{!RRkGQ#*p)*s0_ z`NYHzQkr4$hG!9zU$7=dC>0a?K_60QgGj8z#d7ZNU$DnW zt$BK3mW`j6Ok!n%ja-^+V^-xc^qI+bo9dwO&=A)zE71382@vl;sAa$fR#L@fjOdf= z7-+P)&L)47Ym+|Cu@TSjwV)qjgE{>sJNKuL+P>mSOGMK@SW9Fr?Ksh7cEy5V`>I=Q zZAOuO8DsX#%OIB_|Kj%d+3tdB02^?xB|t#v7l|{Qd_~Yd8p(pg3G+o^bv&rGU|-D< zJNqE!%ScL_F?ePUA=k%3`lA5Ey~WkGDJ{=7Cg$7j+-i$YAq(Q83OnySZ9#6gvoE~? z`KQqif&KfNDsdbhW(@&S{RWq6=Ksdj;KQ$D8EI(Z;hXVtV9M{eC9c$Vr`G}1Cv4jM zNc#aM`2KYJhCh9q#qXSp(H(=$7o#1|cH;~6J~lf@mXssp*9uU$9v{_)aQmO%K0!I; zpLW4N9<>O}NO3GZvD(-~N?(d~`y75fKl(?p{qXeLlEu?%AyJeV4q>W{($=Z6g9sz? zDk(+exc?f-fZs{gDdEY*`xTVwUlYi7=Q>a2+u$5!{!*#bLLePyx=Ob}emL}daL_m$ z-RUts70a-#iQ^fEWFlYm#CSF#P*esSn`_3Ed`fd?Z)OImQzG&f+rWF2VIIza8UksU-6g1u_Q z^;HRIIB~285O-*P1M5Lu(LNWR>(&C&z$$ZyZ_H*4QPwuTu;Axx<4aSO6~N2dz}ivC zD^s6VO{HqRtPRyUY$fE(VSQ**;&C~|Uuy&6zBAjCjLF*2Mu>#g24al)f0VD1ke@(D zt%l?gXzb6A(5j#nz-#6ZCjRehqAt+8G6V-!2I)O+yk0lD0L{B*{lB(GJ8lhj{6w1_ z{feyz-7IZ*q1C8W*Hp{g(s;%q#aI`$>(A62@?VA20rF@Xm@;R-`3&xe z2ssWxVssrnP<2dquKv>Ylmirn753o<4>YoCVTyV-sce7hamG}Tff=3(x}h;-N`I&i1F=lW zpDmmtvXFDSo^y^vZd|&HK^%r~5!iwMx&HkHn)HM<{%5#d3HQEmAk_P6XT6L#gZryl zKrmRo{S7PGGT*NH(QtYp{$bZXG|u9wL?pG--mHeMxJp4F^>-Hn^g!xk^YuC{h0~?n>^x%g;_j}NBxL?ZvZ3%-5k+=!^^uGWaOk+;m^gn)Eg(TEP z7~dDmZ@B;@bam}eQ$HqJnxko z$!OWDs&>D#p7&%%s%!)tBhvA^PXn)zmHx{@Wc?|-AvxX4f=Ee{^R7>&Su0eP?Vz)z zZGUmYrA67KMFUbmzT}nnSTs!m8Jii1uz!@LZh68Eue#3;t-ROb);&yq`ZA(s!@BTM$^%q z(>7XN7-3Bno^gOB@A z9(l!V{kEApwQx^v6piew9^9)fkLk^W4p~Dnn5I!r^2Y@0WWOeV9p~8QV`M6foIG{p zqEnlXL4DzFa-|5XB3G&Z>mvW8LuWd@P#s}!spzppTYZ%K2-FE6^7rTSG4ry&E zx02#?44$Ky5Vi}E(?^zj_ydp!9#W6>#wc=bRgq0 z8&u9#8IV_zKyjX`j4-x{_({e2!sxeMyFtl8S~2&*uZAO4!nH^a`oYao_mJ8)uery9P)y^h0Za*Zpn0rRD*gbR)zfMm#|C@F9|sRLa_MmB(#I zTD3(Lb=a`y!+5-UBmQag-bf;uGgvr{s5(XB2b85Yb_+zwZ{n2ND0_qA!!9z0+$~m1 zeSG~18+?@gM;0{OuEbi~om6K>GEduqq;8wPEXjUxom!?5a0RRT_(uEB6U#7x1~w`w zChyWTUWrmk`=F#rwn44qwi zu>b57fI4(^SN*e)^$`D6`X0SH>AdBtm{;l!mp!@@-OYq^L*!f_SE`4U>|xKPepH^? zi?)s#I4kNNP{u<_1hmMnG%d1d>oSX9G1~@QpgxgX?Sb)cQtKk>pouU}AC&9RQwR0( zbIo}!`;I5<2}$64N<@zlOSLT-S~ac)9v7PtU+??lJ-d&^eHgBWBnW#r}r0~}3CKnWueg@}r;iSR(4+1;CKM+`=13sa^d|j`cG^jkuQUg{* za$!$EQQ)U210|?jDo{COqh~YHK(j}0MjB|V&X$1_5SaNnwV%%(BN?QzdOd|G{?cXt zngJRIWssA4(}CllG-^nUl(`RkSH!>R=nIeo-)-A^U77B*ff5jib4*-*k7cjJRS+Xu z#ST$aly-miv_-8SVuv>jwWC`{V59-fN>Z5v=gM2=Eh)wH6tGo9&gsoVknc@FVK6uz zlcpqEKaL_`N=bU#vXkGlymaIRsqm3m>#PDkvaT4TINbXi%Q5DME^H>nYa{`69oTh= z)<~7e+fNxA)$bK5=;;x5wtYrv` zQb^6T)npe0hZ)Mh}c6p`mbMD&+>~6M(qHPq$FgHa3S3}xb zUloh;3}^@Fo2fl1F>V96IuIMQb~KXkwW4k7aD9E<$K@Nv;GL6dze5PXRE6%-r?GVU zl4_pal2j3wOSIt;Si1-7 znI3_;21tPK&d!#no`ZfK$kQ~TKC~0jb8s7dURK?*5ab_Cfp zqKWE+x2+1;FOONm|97m0VrDhqT!~!0g5aRiwZAZ<0z}WpQoo3ORRh|U?5CQ1wPYW4 zr?6Q#nPM}@|AL(}Ic;|Vx5a{6w>UW8sCu2^Wh#cZ?wDboPHdu%35#nEJZJri!e(Ml z4jUTgwVEAst$sV(+ooH?j+s=rX7#e86=)qUsg4|D6>x1$tTW9lF;ys(YFSV!aTF~k zsL!Q?IUgZ(e#Amc{Cv8Ny?v5h*Y8I9J06B~BlRK$yYzQ6?O)Trut{q%Us|1KPcP3j z?-MJ07Bc+f9DJtAY}{6Q!FSameQvaIn}O%ao58P1U*Jq1u=J2Y$oQ?*Od-~A_*xqS zo_fdatg-X8rFoc>DVa^;Pk1~LNyVh?OgawJ7&a6;6T{>_!qzK07|^qg3fwMiLUuJ_ zw9CuA><?YM0XcpcJEGkynd>%jj6 z?tK|*_odC%HhM#WJ-H&;UR;^ZWC@>5oRwgGE}}F2yj$&p@7-r#?8>!Da^<+{4w@2y z=}1s}fHZB<6&3P~OGyn1oj9ca5C%t|L&&v&$r= zPG<5&DiXPbI#^oR)|ke2lYB0|OS}EbB67QIZ+5$dr8e5(ETnY#U)ze+<@V1z7h%Bo z2$f8#n8E)r&-u68u&GNezW9WLBF#ke#z^FLR3;#C=%Tzw5S9!&T78B&Jl~iS@)Syi zNjYs6i!D}0YNu`dED8S=_2S=U*Z$~QTeEnLi}mUcjKaMPl>}!MgFX@AI1nx;G=xau zwoJ*9fGGb+$X;c5#7AqH84I zQHC6>sG$-#tAt#wQlu)iA4EStog$v-DT#d1ia9KA6{TK64(_bsXX1}#T^L*lR(NwG z$MRdJ670?4_}#9Z8g#=sgmzWqI{p3>8i)8K#s-i|BXLNNz$kb7=l0Pwb`^Bq-#Me+ z+-rG+aM67KF~m<^iFLecQAK`o!d59tfR8^0J z=97}E>0i-+C*a%Y+*E=C#I$&6CFNx1&v8MuGB|e!eMC|kQm*uEeVU!&uj28!#{DPI z6K)tHmEj}A0r&zF1Ehca5a>@F5S&3;p1$sW6o&U(`dV?+To4J|MP6DZ^CwX^d!8|bS*Spr(6b_dv7YL zlR-(m>(t0;Jo;5jM|6@F^M++5ylK7^x>eGU7-k?X%R*+BuDT@uGwChyVa!45TT`%$ zuN>WBh*ThTC_m~DAl6rbz9i;KroGC1J))HBs}ecCFaQX4E&xD(eI=9VD~_=C^2Gl2 zN|nL>n&SQ7KNwD&QB@F5%B^%8|9~7BrEli+q!ry$LnmW3au}|yW8P8v#~9Yqri!az zZ5|Oq{&q^0c%q|Asb%LiymnKA=z(lUf48=lTRWA~mJa-bNx#v(cUV6~0X-)uOrBsm z9+5y723_5!zr;JZHvyOEgeZW1qAo1Dhyu`UDRVyO+NIm+IQr6p{Dxg@1#7FFXSRX* zt-${hZIGdJp_YG-SZXpfk6>!%9G=UaZE{ z5~`ZuzP2E$LyDC+vzJ1y6c7y*@U+5&#XKwVE!o1nWs z6eXZIl27qi~0H7VWg|>~&Txhq7{T9d#nD ziL@Ev%*sONik0ry?j(vX8!1!5qI}$|wa`<_B37>Tut5VI%GEVd!_S)?QN`3g)DMG| z$0YleT9-;9m;tr(HLKY6s+I3hJ0#ahy=utjYr=T#9oR~-^VWT@VsEk1wk(-!x6-%% zqrQJ-ZC6u1?!M>!+kSrCD>h{6PV5kovV(dfKS24o;;22nIt4pMSmVtFHU%;J#GR$~ z(k_JUpz`>gl?=eHuowA1W)~WmT{Uj1s&~qkO1pR#fIe+gsmP zj&;gr0DcR`$vh>{kENu3q9TQHTgq(EB!Yy=2rfsjudrv=6xkzhC)?2XGj05;9Hy3J z+U36*4>3+d(glCFSLW`r@^-UqNgC_??gQTFHt43L&t;E*bx@z%Z2p+xmKwIv8d!YWfX(7< z@I4ejsu=)VB~*2A?_BuHfqSN5Pa~v#g(!2T)pPEN7$`cxc}PcHC9G&Q1(SN^`97wF zV_G&38=TiUuX&ocOpCXRbOm+Z3Zi1?e&+un)R5-aDx&ara6~{@DTObmGQ&Y|QLBA8 z(!f34@0i3-f-w$=zpA$LGVWlj_l;wVpO0hlH@dAd#oRTzL*n28Wq2MJ?3zdy_ZTZZ zFcwkc7dCUKe6RVHoPV2r6j5lY1W$1-r)d8ra*LzH>{Yzyu--8O%mKiPOA!CRbAESZ z{sREc`zzkiG@4?rl(3x(wrB4^UqgT%5Fwq-`a=Zp;^G1ruO_k_eQ-X)qF~8UbGTQx z_ymYPP~HglMJPP2F?uTSBgDahBF98BR1EZdF3?K00SJF?u51NzkX8`kGoP+tZslUVe z{#kSsq_4Qk4ts6Wp+(V*z3zL@F-~yC}MTn7#(ikvB%3V%-Sp}e9 zAwVu9F^A(;yP4{}4dw9U&fns=Tsoisf2;3fc!5*|5)k{iYP=5lt6z~wh98c zM}m8mVht2Ql!Jpc5bjV90iz1FFEr6mEMLyH?sk9X58h!p=sS&K zWhgp`(@znM4h5NZ2@D!lLPw?y%hLl(Q=PENYW6VtOJLkgzmB(&?8J2r`-{r1#_Z_# za*>|J{5}WdkZtGDw~)_5SBw~`5zU}x3f7YsRRjA9`b$|9D)0dokI!Pride>a8B#*7 zU(AYDDm@dzCcSob1Tll-?^{?Zf6=^)o`&sXESccgcW|0Te6-&}$G>4e9Wa)heh508 zp{!^3TgV0X*)`Wqw1=nfu$Pvn+E_CAXIG}$Ganqa;VYAD=;~N|@rx{*uon-_h;06H z?WO&NWclRC+sjD7OI;Q{6P%tE#_TZI`Z*x*>-@dCnb`qi(Z}y>upqZJh8Bll8HH-L z?j%&OFYN%!Co65&gMyzYco??1*v6u+aw)tc<)_jZ?Pu%H&Msh%Z;f3%g-GJ%o$w9R z3N$0_WnO*qmI|90US+c)=%mou7 zt5`~@F%n|=ZI(&nFG(Pij>oJh89i4#W5_icET;0Lg=e?f&h#eRO=f+-chc7HZnlR; ztg?`c;92^B>I3)-y2*a(oMqn!=tQiEVAvQZrfR{>B*CqFU$jz2W0r4!%~E!6u(zg;vK22q0DKT~ zSF3#FCNBB80Mt`nO=0rX?wkr|#rf)*EuDm~UcZaF{es}I8HBsr;1X)#4E#{-D1j16 zs@?|DUauw^dz-g`>#h7iylwkl?0uXVf#CH2Y3_v zYrcX5Z%;r|%r%m9O^Y8CkQM)L6`4=cV#?<}8c5{(5t!nW@fkLIE@1i_v_37u>mF`1@ko}Jp$o2^SPmg2H?^7j5&Om9>DJZ9BBmaz7IJG`0T5&9(K z;5?U6<&tOlVi&S^)L-6oR%>s1!W(?b$*kasa_P*3q4(smH0Q8Hd-GZ22j$YI;G9gOI1+urgQiz-HnCO$^W=flqP#)N8B-wq-SeXLpKb zS-#I10PBl>X_;LdXj?2x1JxM@QO?t9^T7RlrnwUv)RY}@)q#4-2+ee#G&UDFBdEsq z8f)%k-VT+*7IF7vzVZU}o4a-bmKw}JfgAjE=zX^BPb|BivUh;1tNj9Z21t5AxM+Ey zwMKS^3cDBkv74KM19G!=?(5V`XjkWEj=HT-q4)x&^8>Y|4aE{l;dN*oC)8DrzU^eU zo%m7%M_cXmi3-Hrx%e<`u*AK@V`AyOIehiOg7TarZ&)t3R$rBlK6QbJEOqK(@T@_3E(6s^R2hy0>ldy`)JIK zwo-z(!eS~o2m_m23az{%&8n)itPY_Z-G?r)stbH=!a$yzR1$CTXrE0MV(7gNy^4aml= zqF~noYuP^@8QP2F+7~_`V7lm%@%$ZRXbi|;Uwv}v62_7 z*aK^inz@R~Ryi4oW>VHb_|-?wunfvt3G~6d_3C@}#6838$L9~X?*%`hpW9-%upV|uxlWgM3e4DT$&z@hMZci?aV%T}MBTutQ;n_A9 z=zV>Ag=sA4v~A3c5Kj(YJ{E3&B0T*#aP~#A`59rYHf={Urm+n+YkRXTh`@z7yvOEk zZ?o68wpi%)c3ZR?m$dK`Opy3o>)fE}%-w9dMo$hw|D`mSs(4lnQhxvdtNNqIY^!TyN*tj7awPN{t4*iS8& z;5nv_*+!)OQMLR$V(J{)f(#nwc}XGytE0%!64f}_LdSaHDch0MNVX2HXPvOH_*R=V zf16!$In2>sgA^*yMg-}c}xpWYo>7JZBT|@ zrBt<;bKYC50KmyGH2~Y&xF29|(T~ol`CZbie0ihO%85|u6{Zk<3~1gtkv9zy&YP=> zdfnc9^?keYqF?jj++vSCO+Q4>H;5iO`4AWt?7Jl=$`BL=_tAX3G5*X#EXe{ z^7$)bJ0Eb*3FD9@fb-<@mfSp5rR9Bv=><@D0o9w7VWG;xokq-~Er;f+Zu`+Z2P5-7 z^6m2N9EBu&l!fLph0iN3oTJ?b^y z&rm{6bEZo0s=zx)_ev2LEI3z(&slpHjo%9(`dvbFNO(=Q@c0;Lkt2MUiFrumCy%)b z{E_Wbkh0CCt#E-GC+f|`8p@N6VXH5N6+K%QNhwS0@)T}LBH>D<6q_6qYH0^wx8wt} zEq(7S%Mb&JoHpm+YZPz^5RQae9v%QffdXl%(8o#lE3I%Dm|G6^mZhx$T%{KO43}+< zU--gmMV@QQLZ50V@~T{a1Q1$IMcrGGy@AOJTvPz$fz#>X;y9OYP4qhCfek=ezJ`u7_9Vkz;kP42IKg+5Ud6X+(QN8E+hBo zsuF6i;G5a5w1hfIxXSHsX)9PL-U9eG_jEFcgVR~Nan*K**ypwu3bNh3j+A$ygbOMZ zU3m4>kmIND8>XGMwc?Ov$A9X$^*q`wy}9)2dh?Df;xxxAOj>Ynfpp+`e52k%zEV%& z5gKzSu6PR&HC~l-Xd%vzZ(8o51vok^cIr1dMV2Q~!pPVHk-y(MQPH>6W>`;iF6~}b zb{zAbF2bL75&oy!`KWMk!^%M)mt5srds?tj#?FV(sHMBbn)O(&%k#3nt;yuucsEbAB2P;Vni(68$DK1X&ml9Zhe zQ&_pYy|1IcdCk)IEVHzTr5672BKv6Z6dU#Ab9U>W{%-xw`;+xQ{|57%r)2LR_S0WJ zY2znvw99|STx>{2XSU_J&#mnjTsp?Cy={dJoe*nd-paQbYwBza(z$1rCEAFU2{!7Z zRD1c8e47K)J}ayq=!Pt(zV56eUnIL6JSw8i#vMQvwxPjZTZcu#yF7b(l-=|6XLjqO zYwVVXR@#mCyo(w8a=Z7@kL`i6d+p_=r8Y0D%jRrrv$5plQy}%dV|JI4uS3Xtr-R3D zofF~-s(&?+>bbJ}v6R!tZEv)fN%u#8Two({D0pT?ygg1XK6Fj0J-sxCnnIyXSdwGE zzVmI++W#Tk$@r#(f^QIqlgKuord^dbohEuV)tXA-`mpbqMI<#Na{JQ$JA&?megZ#c zg8cnOi^--5wYkYMDRc!ycd>Lq#kj_QmU(9ja7jG6wm6dUG>Wz1G$-vz>#`#SU)ip> zHkm% z0I+g9jm;43wP@+8Rm1^9Ds`5+^HsOP^GvltwQx)|5#y~A2=jEo`>cZc(&4 z*EYSi#{PTbUG_cf)V_b-KWxJS=-i06A(wa_xbLmqMyy%8ZLT1fNVfXW2=i!$VeQ^A zdNJU;TrXCpl)EhQ1qP?>9mUZ+ug9Yxs{z()HHM~&3cj~o_+9Es_l~}g0>mm04d)I5 zXRlZ)f06whepl;hxeS3mNkJw%vQn1S}r@U_t%vv(=wrk9_XAX6K>G&My!%rdF;(0)$*}yMXs2MqTW>D(9MvtMOF@`ixyt zE(8zK0Fnhcyhl%96bW=X5r?4LqeR?|AUVsVyBs_upqo>{+y{-G4V|8~br?)M?OefU zAsqP5qS@C8+Jmz`qumz(mwqnIY3J5INWM+sJYBiC(ED7oZ#v-ZAE7JxI>XZG)?F#Q zCKvA|*Ois01~9yT9(Hay;JC~Cw;&B}vQK6O+xw7vyY$tVh>g3dLSQk8lm;dkX4}O_^5Lf}MV6g*B3#H-k_@r4Dl2 z&Xf3wDnXZ(8hQCS{HDy^L!tal6}$7syr;<7F%Q4eOVA_#L`|-?pSfSb3(bhY)A#2|-SC zMVxifPwj23Dj{%bsJ0XBO?Xap;~m!Bg=Jljrm}Dd-RJ;L5Q?1a;(wPlQ-)}R6KFrB zlKwIG_F4&f+IbVA{=4`bX`$PZ)+?G^MDWZ^CSiKVkpUCpuZXYgkbktt4z3e#|U>^C#KsPv2`FP8nsn*-+kn4 ztHNr~TOG|)tD|4CpVvgrWKN%u{Vi+Q_wHHa<~<*+u}_yQvX@8CvB&;3+^)U)0lReY zO&GA<&RACf>pW%@_WiqE@asG6KjRnMuG9)EInE5Ij1xBf&2an8wG-VM@AsOA+6}^n ztKUeB;$OF0{=3PB%}%r_OG|A0hXpofMXq_DS(#;nMz1R&?QXJpq|-CEwc6M<<@P*K z`M|6rcJ*Ux?CKktO3#4#;ENvT2((w^weY$@&aj9;UoY2BSz*ZF=j{6X-*s5OcwdXn zrWQUvtb}qq5bowZz5;|Ztn0f{_yN-AO@MC~l#8T)@e52zKPj={t8(qh_cQIul_~c0 zhiNYL9)cvmJ9br$UG|&5&fo}cp`385jh?U`%KEfr)1`F?r=bKE?8EKtc7&eWM4E*6 zl(SX1Ah-7PGVPVy2 z{31)%1g_+!Gqyjk9dUY#ZHTI}vGX?B&;R@s4Emq!`@gx=#lLA;gUSUz` zXKch2;rMN+?e4W-48Df2XbF~}ORV^d*FnjNsMCZe5z|l#(~eQQ6BKoXv;-Nj+?>~r z{&p#NZPZu_c2UUR7!3U{`_cCvvy?ArJPrr3E2&NU z^KeIoHweJ%BA>@84uo?ZT47kF?552&Y#EgFdn}8)mvT7!7GlIs@>YI`0vZ2Hu}Cb7 zm~F+d1pJcV1)LVesp?AwK>gUTXa(Sp-bb;cv+wJN-kQM^h#Z+nMVT#HmEC)-+EbA*T>d`ke`d?#bdJ6Kp3BztiYXV+2t;9@=Ri-e$U@ z?F=lKGRfTiSg!%b19N$>uwELwoKOE_NgIb+>gJ~zJ~_rRiEuK>hO#&-)9F}GBjriv zFNJMyqI$M7b-rd27;LSfc3$yz}b7&97 zWfQ0s0GE&$mZG{Yfw?VZFqiy7%NG95qa}m~ zSC=NyNu2l&6acNqWaSzYqkR`s=9g7q5wBOM*ClExh(bFZg>;!C$|XW6I0U7@^6rCH z$cttktB!%4>UE1##mg&q-$J!H45U1OO$e>v4JjD*rCU9md{bMoHMCceWHKw~7y}kg zG?8ewGJccUX+V}6so4dlIZB=xIjl+&%LPd-=lJpPkGi=P1iY;r z-evRNa|Ta(nBs*u^h7@+pe>imyGcBuiUnLToh%->1^$`uN!p>UflatRHRAfzj>Nz9 z1akkb66ArYZpdWjAx0WdK`DXPDBjNq$*6^lHo-Q3Kcss_6j4I);RV*O@DPghXbLR{ zDY&Dv%RGvpjakQed57T4vw3K3wuQ7X*`kxAyt$LegPFQ5w4S$ibI2XK=pq>Kb{#um zLG6SA49e(6GQgIK{-NyzI3B6|r10||Kh+6aaT@tl2eY?2Iqn{!s&;bwuKFz6G7dw^ zd~W$MAM>@Z;j8_C)O-mQF^;)(Zz$t5;gCvpBAp4F;7lS)DSB6++d=6w$9~(!^4mfp zUJl<@A2rQBTJ)h^{r#)#vOd?^&o8{m?)&2{HvX}Z_V)Dgwr0UB+q(Q!+xEe1+qPnk zZDD)k60fbDJHwWZXQ_Q=vW>Xw1^f5)|Fvs>{1Dc!*ngwr?(1fPsXa(Z`h#{p74@J0 zWwec*8)myp$}RV6GgdPzA{4Cn%B+&>G*8>Ak5lZf+g`QHE`Cs8eW(4(O-zHr?Q_vc zyYiYjcH`sgZRo6c8@i&vo?1np_VQvI`F4&yOj7=%KfP|}4SdE1{(!YUSg9&~Hht7a zb`O6Np7n+Tx=k(9=i||OfqX{9Yioe9|FP#?G{jz<7ilYZHRDTyxSl%x7=&^YVAo&T z%wSKl_ysPzS4(=Rw)&|XPkvTozd)1^#o)pOg$rc)&ywYPhpx!5E1vuyhsL;U8?qvW zAOWYuHHr4b2Ql{Cl7sern&X0kuC-s#fc^1jiB?Syb9&Ra=+4go^Ki2OZ)9t$#T`Fx z2TMC_YihY2$vSPXzq_Azb1Sv_f7l=I8)G{X>MXPUTW3KSPmUj}Wcx6lBfXX%#0i&4 z|0W$=BK}z754NY&xHw_Sr}6gKgm-PC_fuQFBg0~fF+;38W(O0^ets=Jvp}tPNrpw` zG!ZM*;k4L+^CC{R#2g1H_#bWg1`82>d2tP=?GhoBlXZ8s@($`~^E+l~+?G^>FH6}8 z+nkEEVDV|2GCPv*;Xb?AbF*FE?>1XA^I6N>z5+EI(hU@K1$1rZ@1A8@ba7>pUU?gp zbvtF9lGuyu5vHkZUIU?CCx#mn)lw=#H3ud@IgP?91g?J5GMg}TwEgVDAKL|kN80ai zm`^q6R=fGSm#j7tkJTLz*<|A-5C$aeV%IOVl+E}K zZ70o(Sjjtk!zy-K^V$Y=SR@KU4JiIdLNq@NKPIuY zlnAPr>XCr9 zd`;vClH*IL=HQ(js1%4V&JqSW0qI?^iuO|12kQ3T90&t0hTEWk0Zf1}P<)Y1c;VYj zbn(Ry^D${jQHF2Bqn7;{E@A3}C(2NekqLX?Rge)Juy{Xf?wbx5Kp`K>fFNOhCPcwT zMH3!{6$&Z5nQQNaYap<2Q#+gxUra(jmG*sDiDiEDpyh9P%+iQ|(uspI)FnWD601je z65sv_maU>pCL7)iT@;JsDO3+duI|W=9M1vpEoL6#N!bTb>TB$)#=puUGM}YdXkG~C zPUS;4*Yy<%z`JRE3Lh;V`blyntRvFX&bL@Dm+IK8K+pSw65NhePvmZw`;jl~1u= zo>H}ZiVN{2DW#O4nIzSDNWc&jG*;|Kq8E?v4CavZ!)wA*V|zIuS%o~W7JGW8K^+r- z_72|zNWCHyf|b^HD+B<{&&3pH8U1rH1>$-Zxw8y{izQrhd>=&>EvL}X6Jq!upocnz zz)8`uU4x6>ea`ZQMh9n|n^;w(RPE1wcG`LI(jkL1@(cu;j< zq1Ebt)FLb2PbHv~T0#F@;tJ{ZvZ85q%if4XPKtGRmcZfkmsWSo4F7hk?=ai3FVjYj zevjpSxb-=oFNb| zGY*O1h;=#UeQH&j4H~f~!=71{YL732UwEJG)od?Mu#u|{+rmRNcFXWLIOgkZ_?S28 zu|H{*aQFpPOaVkyf0Tm0H-`9Opakyw>zZwQMz!rLY_%D0hCv8iZ$J6{3pVGS1jO$> z1P|ZXk(yRqkZIDElv{acG<1HiVG002x!@S>_3Sp5C#YqAXL^lA<}v4l7J%#)jFNfz zWJ(FU(#q^m#@DuVeHKy5Eq2l6kJ{EFWww{ryxoNj7FES*8$+}Z97B~qzKJ>o+(kS$ zxSqekF>TG3(A93KloXO__e-k$(!x{gXzgR3 zgQl(^ZOz;PV(*0cRJzt1H~^nsdEk5M2pF0oSmMfeOtC>_gd0VK8}iVrVmG_juCb@? z(ukL9?faM9X=7*S+7EvHIuo+4w-Jxc#n^#*0^*h;IE#G8U_?D{zb=n_j)j00I3zBm z;cr;}=bLQrf;VjHu&MUM?N8VZSKR|6a)W)JU%>Z*ZsJcC5VzP5_$3Su`Wq9xZekSL z&34&&f3qL;|A*c9lRNBzKR;+%mg=d_Dud#BmEudJ}& z4gM4F8(!t-kP(b5NF+E%0r7$x_5vp63OW5o|BjbXQRUp&Tu2Fzn%=Up`*(xA&;-1I zf=Xh23H1pUR9$eDg%CvzKFRfad-Kj(<|twa$=*DKdIRCY*|5PMGI+Cy8A7rM7&56g zWKnI%Tqo=3d#MyqX3&sE$cej93-mG(^JS7l%)nKJ5W!hIA{%dMAH;>5`{hE06dp7n zebrs2L17smJNO(51JVmDBM`a?dXL;?Q`4^9QrU*SJz_@U`U0N}f~@ZjsTf**tk zI6PnKGRoP-vEsZ52Dq3fH?z6ayCH-Nqvy~@27e%8!&`KC2EAbHryzGy5Q9nf6Q7Pn0YfkIpt^?`kU~1a9jB4D&MLDR6`s2d!=2q$PeVaV4d$Yl`LwnW zAjqG(v)mbqb_uy)9J*i}Gvb5WJJ#X1CZfC>-b037FV%8%{;Qz_t|4r!UM?+{#S_LDi5xHAzs71m?9I$GkDu+9_%j)zYRz}dAiL`oNBe6 zwgM~3i-x0FZdv=75(axv9{rZc1?D-GMlN6+HobHQk#+7v46+{^>0|_zIT6;~m@K}a z&O+*Yx~-A8ptAdz)l$)@IdRgekMpwCs<1R*s_Jd|N>!JyTZs|AZiXX~p0r9rlBt-ETMCHqOSpvfMsc zf5Z+ZmswslpYt~u_<{Qs-+pD~-;m^1etX8QX!`mqYsC1d{@X9D(Y~@;B85Tvj^l;I| zBS_C@*ngkeXv1GSYO_A9ve!2>+JY?vW}#u7HfRQ-zgdX?X6);*S0Y+%(Vk9P`kL&a z$5->t^=|LA!8D6cTvdPou#4uv1_S{(=RhQkCjwaLXaz+F{k0{2;bn>q()+#md5I09 z!~O}13_}S7p2l|jsg;T59l7eL4SaT0vOWD?oIU?xw9VUFYMXMHg$4$%ipa4g8xt&t zwK}ii8_U4@%?FmNx!UD>vDl*akK@{w>@wS#Sz|j04W604oYKfPi-M?0CImQA$BcN{ z>coltkE=!M=lnzCq!n|!aV>j^z(7n5wrh379emD5%8y}urx@h4B~U3)H(*3gjT_2# zIQJwng{6EVzq7wTFx{fkPT;iKi2eX_0K2;Q28PSf`ggPi^E}ZN3Oi&2KuAE>e+O|2 zodxk_9kxG}*~SHkDOcrLpUXu1++n}?$qV-R!Uec8!)F2|RjjOy)Uzuw<1E-cmot>| zzSE<+VU(`@qzansVpaR=hz(Rst0FWgM2VWu>Ff)8&knDB&HnUfm6d*sKkXwnW=@Pv z4$UQidd7Zw@m02T{&KoUsiAF~Opr{24Qzq81crEE+HMLDhhMdrFFv+qGhVWXZ+yZ2 zbm`qT;Jn*8(KyxJ-#_>-#!9b%p=Z4r|CU*9{kmXL4UL#^!uCr z`HGwD-ap=NbA}JIO^Xo_Z-o?&SPu6w+jSdOBfDunIL6vYESnJIGyo!vLK86w&RlPB z#SS6}GzewH1ch5ciTz`({O}}3e!Ocj8@%?1D<5-_N>G2G?Y%UbBfoJLyhmXWQc!%v z)KSNh4U@i|PjxoJ8Wk6xdHe6$c=-_GZ`ld^+H;Nz?Q6Na3PWCSbK%4;V0IGs)E*wSRst>yTEaDRb zWHI2)t6^~GCvh#2$EM+&m$eo{+K;fRT|X2q=vg9DVi*Z0H0KUG0)&+OEs#PIGj+Zt zZDErOkHYPNi5ggoPlZLn$R{65@xXM{d?J7XnfnwTd|4OM_;}GBc=ECNDTv~9&vzH( z>fU^ioD1$OB#$d#_yiRTYH>x=Cs}8@Aj3Us*z5k1>_B-tRdRMKeg_ZGQ`Choi2^c%FMEx7{7wGar(On*0K>g=nBUET4Cv;zE_Qc} z`o(d^QXD_sfzrPd_w#zIs>!uF-&V^!_<`lZ2IL*1e&@st;z7xOTHX1bAv2ki99B3&#Y~2;K`IRx)uQ<_;mxfzY)+Wx=)s_y! z`IkSuXcq?m-M;tRXKnk@Z)|N;g-v)X%pQ7vncecpT>I1A)9kuCUbf%eHpPB_$5gxi z-k0s4k9+O$DR0`u#h=={o1$$eSx0(ZkKs^i)n9!@;%|mCA&`E|>a3gpT~_$*F)M`- zC_4R(6`uOqum(2>Z!0+s)OTu8LIQb3OiL5C+>LPEELqf2OHq~=AXr=XNtIpwTV{v> z{ug>4vx@-y{%8bLw>bYi`US3dfumev_r0{!Ml3vPT%VeEDn5f z;!C0EkVN4iuI@|P0=}jIt?oG#_N?*#5gO6~_{V~xH*kzGwmeAwcu*3%PHmU%>@i%= zX}4>^`5c}gFq|FkjCf)NlD0>Hz!T5RTjaoE|$;3G_?%PxV_s z!f*et!e)DJ#p)<$=!MG)j-PLSV3P)33+ukRDAxfP}}nU2lnq9)C_ln1r55> zo|v9!%frp?d4wJVtN{M`=il1)^(#>s&Y+!z&ifs>S8anFMSEYkJJjN~t+w}G9bLyAXs5`KR^id#erTd%az9(am<-?{BlwkBzo1 zOQ-M&;Lde;x|Oh+)6zg8zlAtR%?2(6SfmWy`Pw>f-W4u?uK|$b ztb*lmAiINrI|2@+IHlz46GqiZj?PJt$M1o?$bX)va!m#2+6xw(n>Zy5My){Hz!SVO|Ka&AVCWS#oU13ezCdP^2!LspBJDnI z{Z5dXpCn`N;W)cb!e9{TG>~a`RUKxu<3`Fu)DArPabze`oBAM4E>1;vSDN$*Llsl) z%kEOd07OUd`7OuPnTXbaazQh^KnHN%cAVe?X5{#(E^K{|*$J}wVF1RJLbI*=`#va4E7lVTH@NW;*H zZ?OFPRgvgH2-2woLnPA5$l&(&3I+ogT2FnUou=udsjD2#Xqg@F%(1T4OzSSlw5p?r z?dCrYw*h^wv#b9y!crOC>Z|_NN`S3W5V{Zx)(S*#<+_fJqT={hR(JYqYbNbjGbPE}z~O1nKiekr{Ok61`wrDad>M~2z=0UP-9vG#`tmfFLU z!fh0M{J2%f_Sa_Hun%dyTb+hwZ?fI}=vw>XuV1o(SBqm#5p1_o)-C%7iY+uqQuEwMXAiuwg6WY}C3` zo4Gm1mc_JKc&TCnJ_*+6*qTl%EytNr)oH09e*(h@y@#;o@$PT$u|Y>z<)aynk|35I z8{Sl@6L@NT6+M0!1IW5f=zNHdgd^%q0P~MfdWhk+Xt;a74~#R|OJMIVXmDb-e)9N{ zsb5+f9e(vR9Ejy_JB>V2v%dJ@#G)_kzZb>9_LNFz+I5>G4brDQ=It!;(oW- z=H)|>e$ArOjB+d0_$nG*s)6p7J)^8`9|+U3b2{NWOaN{AL<~~b{;`_6t+WC@tba<0 z8M3yauG%rrZocL=yS)ET!S+Y(?g0yZ&j;o$GAaBRAWj-AK24Oa2Y4 z&uW;h-1(Uuc{kJ^yzU9Ry8j=Y+`=_$_J7pQzvdPD%j2KgGbm$U{)F=c{p++njWA8k zHse6EP21OKuZB0R#jgRBQX-tKFyw=Wj%5f@ z0;wHOM|B+L@aIB^oE?s7coqPKY3P%?bvQH0 z{Qf_o3Lb(*Gi2ca6tEHSYE+r$?2zH?&sjeLI)p$7kx2xRq3%OP5cmO6R1m=sBqo6h z0=nO`T!W(-Fa^F1E`ob?r}`58CjEN2N(&(gs~@sd`Vf;o8)0diG)H~{EDK?S4X??(q^`PR>uT53%xdeDkdgj{4s-`+DF?u_TVh697$ zw#da2q9PpS;KYqiOzDp$#6a{06vPsP-H>E9x=7hOIn)kPdUZN<)aO`nHt_^bfCb1C zqz;iLG$HaGd>%ivtW-u9lpW?HsIrr%C>N-N(!cFE8i^h?BtQtTEh0dL1CI+FgIPe)D5(PN7$?O{ z$nh{(HIp`WBmJXM zizf()?l@-q8{6y<4e<%B-&N#$E_x-+KG8+<(VW zfsj4%^BW5784QdcU!m8hyueJi;glJMQDzvnDvo12Y|pKUv6r`I+uPBVwmygV%V!V; z&k#qu!4WwBxVjFKe)SNN1`O^AiHQf7x@Bm)qXxuWkC=!#1EFYp~}QyW`JS+m4Ul$FvSP z_O92gW-}fZ5D9JIVT&ROXIou^tA(cq6QJrHv#16hppLE1*{f>l&Xv92k!`cjMdm3Wk^<- z+s!F8kucRec~`l4CUWbP-88mN-PLRZ=Y$`(S9kT;q)+N?$ig)H!;p`y&u?Fb3Q>40 z5=KRs2kl~x@0S-pW~1(Z+*ZzB1kQxN#~1`M%nD=%_!7Tt{nWSl-H9B5=%IvY+DOIV~DQ?s$ZOJiJY2o zqzTSF(rG8%2q&F_j@|H!A8N?Bu~pU!hQC73Nd$n1=pkeKIOu+0F5C~X3`GSl^MEo9 zAn2U{#DRqrMBt%}3zJNZ^3b2=BDczsxoK_~#gJSo23(Bdsa)iW;Kz{&u~+(DFV$G^jG=_QL?`qqG+OOKh4ckn4$yjY_rYYiHJ|CLl*&6Qon*n=+0zIx z_B2roAQ$O@n+QHeT%p8Vg9nZSuZ|b+^Z61z2qpa(>;nOzH2Rv?WPV)KI zqDCQYD2Gb8(ZQ$CgfQZl*N$SXx!(SC&s<9=LZsBjB3}#l3$Ie*aT-c7h6W>_w@vo^IoUsgg-@JJwBX?%Dv{(ia zMm%cwM5+gg+2hrP-`;IGkP2Zb^>*L=Z*febcmZFkxIq^_Vpshm)E@R8 z!Xv-Ho?BN8O^}E3AD5w(nf45G=7xWSn=pL>qdqORmo`+{luflZ?4^VD^FPhC@Bdio z8mVKDv~K>jRrJ8+f0$rX7bij`l-jHKu8t?wo4U6V0pvj*r*-%NduGaE8@I2`UJP$? zEsNt>?_c<$+D2}GF8H*-o>|9~AzTNZT21TXYWgZx#^C3Fn0iBujaqZqCVZM;ukXsV z@x_UF--`UmJHa8EdHSH&@dM^j`HXkG}4XI$AtXH#gC&GCE1%>TWn@TCo&Nt`H4He zJ6N~3ltcx|jcKA$rN%COiSpD-%z2o^L#OPbz(lk-2|Ma(`v-d|Knzyg6S=Wpy9mK~!Y@CM6Yf!PZK&}BRfqHDH$#4Blk-bUx=9An5jYtpA96C)kze{mxB94DR!wO@1%jQb`0N+ZyaJ zse>d6aYXCxlyqmA^C3Q`UG&KPq=pKSKdLB?!1FjaoGccD1i`lt5wtK!?#;@Qh2jAa zKRZMypLfVOKf$#t?(Y)AfEX31#+P5{og?5DdV6wqJnJ-zU^eKT4XqF)^qwzXp>Kd! z$i!JV;A!Lr-i8FY1%YQAcngATk8sq1wUYB7ZN00Tg4NcL15695g}e@7Lj~uZZrGCSS zfWRegRd0oOu5G0=o@aBT?BY|%OPSDO^OnZg#lH|3vUc{R9ntfE{qQ$a?b$`iwqR>3 zK#NuXXYlZ!lKgyDZsWeFpy&?Qu0_$SRzC0KZFTmmnc*GqshHM%RB1yOCfi^B`;moQ zIgb4*A4fhA@?RTBBjLl7H`}63*zA7MXs==S_t(F@$^Dc~zxN-&8jHcOVtWz(ea!ka z8^0lwS$S#b`V;Lb3i;2hjJ0PG@D2MQ%AQ*tWnG70-FFyW5-yz&*_|=0Ddg)TlCs=B2gTj%0Kb zxn?iEDk|Xy`|Y1!vT)pa6Dr_m+tin?0X#Uu^0mp6D4Ox%;pr{5J+aPqB{gCmbkZWT z+8MxCXZw@d@F6;38;C%z_|-64Kd!UE1O8^a-WGAb63_hc$k6Dyqev)^XE&NIM0gJ@ z``%w)L(}m$`@=7WTN<7G8FUktZCPc>D;R2j{Sdpn&(*xQdoB3VVRrwxUAAyztG%_q z!DfF^V3QD4j0wv_)4`MlDlSVU%Dh}Ej|pz%q1rXd$)(F|ZbYTcL>cnH^gZ_LThV%4 z#zIave+XlbFQz+lF!KIeesQynedtBo{LX8Zuw^ym9F{QT8KqI9f&1sJiuSzX2b5hi^${#`gCBa=+Ak1_HIkZ z+EFG=Qj8q!P$(8qVFn^Jcm4!ed1&|mcGdvXnmJGgjuy-6FbC8O$0#%G!pGxAkQosDyZ?`Zqz{8O=A4H!tBIV~VWyCmhC?p?XTHmB#j>*_?d@_s zLdAF)9%O@@nLc=)Dvf4*+hhF(zrbzQl$b0A_b zJuu@`0D5e&sPQgX@l)S?1BDG9{#JPS7yIKqvn{cd-xfb3@su&7m12_uv1u&7vlvj! zrLQckm~nQKVZmm4V#zq;sf#&AGRSSYwCV^mG`-P?ZU!YC>#*4NCJb3lSq@!shZD^n zAMqhCjHy~*QV9MB|KJ(>=g5t=U}Fn*c#S5jn^$%>IJLR=73Aig$#l9;!cW#aAq;`s zOKd5#kn`*$9B0QgRFx+Rk))JF37w zWd7=wLR@TW7~P83Yb4}sY>O5ps9kr}9QyXsW0{oqnk$JJ98-<@~1_Ri^4?C0S2XB(k$@ET7?XY}MSAcEeBp%t75|7hL|N zOP!J84vVRESMElvL*V{jD{Esc0 zH^TOOj?ol)tx9Ey`<=pD(xNuTQjJUwMZO z?yuCFNCBpP&ii{TU5$-LIc?m@pz~*o&J>2ykba6ccFCY~)DlJAPgUkTM$Bd5TrWh^ z!Q}6gw2B;1nT--ckI*cKv=>d9)@^@vncOdT7hs;ph06rRNSu+Hkr z`qs59i~-{q4+5yY!ucKHMw3E7|3$#;#l5BW>1GuD{3Vf*6er_|n@EQd=Iq5piYJ6BH z?xvT)^3_*l;0eIoZDZKQ-H(}zqIF7XjBT+}iHi;BJX&ann3tQE#q8UHWNWGm z+wsq<2!h47tyG!AWX#1MrY_kHzN!T4l-+NF*Q>%R_e6eGSuZ`%!6S5bOGN$>$m=}% zg$+FV)p2_AJBjwhWC>XPpT9k685Q7&N^%tK_94FQ)gbJ>68846oc7l8W;y+DuLQdt z&^2#I_18?*0=D)7a{HP{79)|CR8e~`Iby&1719#RgpU>Iqko-6;9H(0ZtAp2OKFz| zfkq-zsVq5iB}2+skS4God1FXgJ%8j{l2+Cb*+$svCo*j@ee)&US)A8f=o%h{+l_&<7!vQcxb7YO=ph;NmB$yK_0C z9WLQg(r2UoX~(%vz$U-x8RR-Om1{GwKy62GP0p&dO_08m`{%k+E;2ztR zbKKcvQh7P933sU0E}5sc6}Q{E>^fT=s^q+urmk{Zl~rmR!sM(*8+at9qhf&j-JhiH zT}tH2ukEQPUZF>k(#LjONc^`tbShmjLp>zJQCzq<%s*fa{-@Gqq(7`A(3)6)-x5oA zGUd~_lW(LDy&VCu$R;I+oezG(S_1N(im(f~$9{F%uPpJ=L?#~0wv`_|Z9h4iD1Zd+ z*YA3}==#~z6_<8f!pOzUy;tu3a zn9b;Q{4uP{wviihQ8e>$M3vZ!$wzJ4d?vDw4A~EV^ETD;hxo!NPYxggD1kwc2=%iHIVs@E5-i{4NTHRiZ)Izrup0E?DxfWogvR1c(=E7cfh|j#ZdYG%pA9|z zm&my!_r$?mfBvAoHn)({`IoNFnAXsa2ts|K@hjU;qK-o*S700{?~|q}m4Qi`u%O)a z>{X*I6RU6p^HWTYM0|uK2$Ou-Erv+}VUj=U48xPdr2#Q&l|#Ur*i|m}X%Q@SQwx+3 zCIv|FDlZHmIX>mU2zh!hAfWb!#=$_ve>sq))&D(0Mq zRsl-trS79t7^O8<<$n?=g-)qU9&xnF36y>4^rqufy)4RsQ&f&|nZ*;GSzJi$9OKNC z!4Dr+YZV7F2{{LX;3VBOBsBs(%L#0T-MIu zG9txVI?4Aw%;*!q$q!aVvJ0qpM?E|Qow1U*taL$>>ri&fJSP}(1Tn4(*oE6ANe(4X zM{bx&pqnGz;3YTlTu1&y^4=pt+ps6O2NGU@PDc?ZIdUD(rwU<&P+iB!aOpUNh8o7B zlglfvcV6I{4tjOksn;EbT#^{5SWI2B z>Ruc=L|7cL8T)jUf?gHpj`pE=dD|)U58a8cWCuPW?FCb)^k*Pa=F@#Nb;cGu?QE)f zGUbZh48Gs4yKgn2;*ItcLfK6IYNJ@J z#!&K6#^?m07X3d{mlj(hTx!gUJiG7x{dW7jG`nqXDpN(XK(VMj@>Y?ZH*5~8B{rb` z_t?M$+LYr#FjmkPUf<;iip(zCAt}3X*C@U_g@zvSBiV9dG2EJ-snoA@FeXhM8mZ`| z@fqCXfT#_hTRJ$!*aynEn*HF`oE~`)lay0?2I*swM5x~0O*xIWCcVKnAQi3I)@?ud zC9CX7f3TP4W?2}GGOg-s2a9g5vr2kH_VNMmrUtjO8Y2z9?(O{S#(BJ_60c4f8Za~u zz0lsE6dHHR{Hn znERn!cEN90lF6<;_3w5O6}e}YGtgxjF>Y%b?QzaW65Kw1MFSJoo0*QxN&wrzZ$$+ z(r)*@60!4ceAnWJ(&0m?H{i;+H`$rcxF7Yu!fyJ__4dp?Q*G^wfayo?0Y1sETc8AL zR4gc}+=4n*wGFqbGa0qWThuJ@YQk&d)dL!?taWA$GjOX{Ok>W@1Z!kKo+3}Gwmxh7 zSAJ-VUwy`IxO|MA`)>&5Jgq~hgumMF|L)n6y=|_cY!81T+pD3*xWe}%-S4e{d!sn` z{7C?n6VofpGPskL8 zF2&9rZ33X~Vts}(apF+w4pwTo5}-u-sMGpDr&D6JvzX~cK_8+_G0iUqQbG7pViug~ zM2rHTvWW6<49fXp5>h_8%?>WQ#{pDGc>Mq9eh#BteJdc|mQL+c>lxo#gm_TZwPK^aQO+W<&u4C3uKH4t$jw~-TR4NJx zWCTSsg-pbG38QqmaHor!*o)mTCQrAYsoQ(qRL5MLsB7nOl`zMfxPxpgM1eZm)P1zc zj?o-@ght{nJUGn=bMl(jVfJWHXG<5^81b<_ST|Z5EP6-xeMyf3Mv3$F)WPEQ;Bx)O zp2SC50o17iCy}RCdT)hMf~O-`NZSspJa*JBy=)r)Nx!pm{?8+}J%r}4pJoZXjaY&N zObTDvgC{|QjlJEhl8I`Zn4t~|Pe((yBf#&V(xL$h`P>-#>;v|*Wl%HJj7S;$_BY`k;n>sefC-ZHzEbGQpx;OZFWo|u zB=_MfP34t@umoLkH?v?U`3$77VfNFH+QBvNVKp4i)Tt3x&m72xmCul{15Y?N=Tla~ z%}<^c{$!-2& zSDt&Ltw`Evf4bmiJH7wU38T2)t{%P8p59txQ#R7?v7RB}B$Z( zqD~vPnEy#RK^$E51(A)D+&gwfot-^yX{U`|#Is{T8osR7%^Dr4ElV;Hs7SwKR+ZX# zbm2)GYV4`4O*Y|!CcAvZHv7TPd36cnd4;lp-cCftWkhUVYCj$HM+T|iY*X$VZtp+; zs%`%y$quaf7uBk*qzaX8qs0_6KaLJM6&u%$u?C_$y~cGT?VLtBLL0b5IbGFjCQu@r z%6M%YB-Z;*y$HbZGmSeS4Y%TBzHU5SG)*P}X6x??fKN^`7KOp8#NlyO1erKXZt zUIjwdSQ`-2{GwE>B>Tk}R<3-Uj$}F8CgjS?B^I)OK7%Q9Fn+}HvcFli>aA1tL6@Sl z69i%r8cSkPRguM1tnhz8v~ILh!waZbeR2cVO+QEbMD$W@RfsGqrC12SGU*_3VAY3Y zeFdyO6pM*~s$S(O3BpycAVO~mV*1OBAz9Ct_l9#0ofLe#6=m+;tAJ$om5zce#++;<6h2cf(kgsUhG9Rq(JF`5(UM*hQ>T7 zIV8O0ZexEzSE?ea3Q3|UO$Fe{x2_D$#`>|uY6@1lxl}czO;wktSv`>k4fWX+vvPaW zD7==oDjOhp6On1{WVi(yVSBeSDd;dg+QtIk0h;*;*Jb@;fs5)BN$e6w>IUg%909Qc z0xQ9t&&k}8FvX!qAQm%~*exe#7na5uI_j^-(1Yn*52Z)qHav=s;`NwEXdH>bk$W(* zFk~79U0=}?BpjhlqZ@BV2i>9VkgvKf@{qa#(gt`FwYOGI^bSPF9O%8MyY&<3#kw(^ z0mL7<;Z)8};**B70&s1RurAstj(l;P3RgGhpW7|BzsCREg*N!dciPe|_%M2+h2_}W zPh!vRI{wda;-^r!*)8vf(++oWr11qa1$0Anq)Sx!N^7C9u(1~BN1YWwX!ho`*u|HS zamWfA*Y7sYhuJT$d)d52)%Ns8#wo3&D7CKC9!L7~MheO%(beERxx9vDZ4IF3;B7ci z7?@1$WD+Z&H#3e!oI3;K8Eb}Is5Id57O-(hDZJL{d9Ze-3)tlcBV~u zAp?uygFNxYcHU1Ow4H~JkV*)eZ)1Lg&yx1jA^^7WJ*i!d6W*o|OR7f+@BGW$G=<%; zGjA6rN>2?AG5FFwbcOCVMA)^rrX6}lp^MH1g)FWO)!5do&+L8PXWZbcY~c59M9n*F zSzy-z_7!{SxzMg+7ezy@bCM^M_EKI1$dDG*bg{qXsD<0i-rtgMr=NT~@91i~`L|ct zj(MvAEZi43&YMtpk5UCI{*X|^ERcuGSP zjjjY}^Ea?p-?^K{rM@Cx>~jeTu6>~h10v%oU~jHxFJBqhg{;R8eBxu^lMVRv_zlsq zavkh|I54NjU{3G}k*4_kH4ih}x(|B19H>)VHf}>F>cy$JWlU!S)%TEe}JmOB8o0#?fUwq_oQ<;4Dk9z@B!n$lsBn&QSc@Lp75L6AlBlhOnyLs<4%Acp$>>c$3!pU zI@w0^tR{C6 zX}W8zu2{0(E^8p(~%SQB2X#wEe#<& z6|9g#_mWmfU#m-J<9%vYeUlxc5nx+toBiTK8RL5l2PfZaH{QPiLspGFzp=p{UY=v) zKV<~4GF z`79gvVy;cY^*81H5*s-;+a8+}w1-f*?xid4&JWWW5}ayJeOzomy5c$ON1$8$fXnSY ztPS|zY%~7zEv+~s{b98#IJ3%cz_gAlGf90m`urMLuMP<{GE2ul?o;PKQ`@^%@ze5ymZhcu$zxpRjZ!og~}j_ z@~yh5uVOjpsjV)Z5C5ub{>A;Tv|pZbk-a)*E_0Qip<#UzG0@{d2Am3OWb%5FjW~57 z1%0l5-PXM_%KnXj$D#fHYJ)EvYcH;BAfN#Dxw;tU*~)YT=)&?6o5E**&QC|X$N%1- zJDACgGbQ0>8}`qYEa9Ct8Hvpsi|rB@W)bUuGGE_Bh>SORHNY;UapfS#V+c#;vI%Ps zam8}oZ3#NWnB@WsuDDVacfHOw-?)#bvPIJ`(C&D4hyBORyj37Q z?lk1xfKnPU%YYdD`wb)c?l1N|e53#MZ-2Ev{bZQk{O6nP;b9NkmO6Z5G3rPNo^%u)|G`4TCbzk=QTlX$!Jg-J|M5<4}Wbc8^U#oCSj(OKGhC9k05xsUxvb z0;1atk6jLhpzM|R6Km}EzI(lh5$J7t7e>ShFcQ^P7KqUlR|j$&#f!jE0-;YB@bmFC zRD_uFgCl|7F*U!-nn0p1?d`yX7o^#pHnP8-ptbcm75x6Py>oAIPW62YAGA!m>ts|H zL;05$@I>bxk5a+|Ax3}@K%!I8L`%YJ!G*|Lk^>`a?HA_xaL8N z5G)u5IwC${adI5)2Gz}+r$cojtn9#tGv3LM{)+#cD0+Q4kzhGI};il0S!Dsf-4y%v?77EQ8tpH zp^f8MRcV&AG1su|9>5(X=>htQ!8lF>2l2CRwCtY%Ae|)9cuhi)CLQ&dCLC@61>XV> z-IvR{eXscmRHFmP@LIpd(AEvN=p?RJY=AW*(hmydSQ``zvuk?18UIfK(_GftzSs|;VNwtJ?h z+lwo@ZQ?rVWJPFZmADM3LDLsIN)$p1k2i$|8cx`ej$&EyhI2*2=vBBA*45a}&u+E2 z@3Y-Jg|L`Yhnbf!fV9c)oc*x<_*WC{=YLJIn?@(wBkxD-L1I~k&Cjx{-eW}V`#E<0 z!}BOt#DgB*{9Q~;r)34=v<HjFR`KG9xkk)$^@bFVIQNFogpzgy4R;OyTl z6?863{yIQ6n@}R1M3t?DIJ>jTZ4JF@I}5vQ{Bxi38T`R6yJ@$~Hqz559PH3RSxLz1rg?HEYI^X!qQT0NaQ zO*n$9kX0(RXq6%94BfSOiQWBI<)B?*{ZAfdcPDMPnS|m^Vx5+aEF)AoEHhvl3$QS{DR(Nl`z+MukH*sA)pa9^U z2pIyDad_GA_Ol-tyR3;5-FFPm{|n@CRO0TawS|aZ`8EbHAGs-PlRho5aT{`M+PW%x z?o$}g!VS*RjJ zh6F+^YA)zQ;iC!pEMT%_$NHAPi5qUtYtPsgVFq}ivWzF+fNvL2Gt&UgW)D+`QAWy% zy-b1#(F`w2+!}!4HzPa12!v@#_SLNg!)$<%Lo6dSpPB6+U2T~tS~`~3p@5uk3pE&z#hi+Pwvgm^VBhe1h!NEo0* zu>ual;D;AVzK^3dkf+FMcXA(f8Zu%+E5Vd73SS@s-- z_e}ptHWNWNm+45qs(y6sgl`|Er9RMGy^rY}GkT zfMoeoL_IEj(SD(5#y5p6L^H*n@hnYBRZ}aHcf{41 zuv+u$F`MlGMQWCBb^D+2rCp{1l3r}E6t$z2mGlyilNG*kORWtas?z6Q?WQ~C+3svI z!P4n1Ds8rdSi&+IsbNSj21rr>6!ac8@V?5!%IKPK25Z^fC;wL^bRVT<&c{WdjbsRL zfrg<|{(Y1^`A!j{RUKhq^^ST7O`L{8ke4@URf7d4EUU4JRFAz0TF1s|MRTghaBg{) zZaM)M)ZNeSvH}0Wmg96(cQ@(8-&^)&tFyHpc!v%6#VEUG_!_(KqinnN-GlbfoP4|B zvBhX<{(d*{!@Y)~*>+HD+JzUw%i{I>BqR;a<#+Qs*3si#;~R7J5f=pNoYe9RIQKxG zy=|607}sm$KA4xZb$zW@5*wTX(xe02serabu07=#-hiOBA?A@`Vf$!x4X)=Ku@(7DXzFcl*jRkDBdai?9zvWJ(orugsO% z-{|)-Xg+Nk-D%2?RfW#UppN10;fwOMEeA!yo`HGrmFzVvut1NBED>A*3Z2Sh&#dJx zme=(y)*`VBX@{D*&?gFEaj6&yF$9XjRU&W|xz(JHItLu;>i`l6^%~Z~Obd&EM4kZ1 zQ#N=H0#RF0Z><-?zcw(k5cGk%1fecM9|dAaUy1V8b@o)B+2vi4D^36fU`j^YK^+y_JfLE+UTe5@kx+#%7b zd%1oER|SEhu*eKR6w$r>7Aou%KI@Aa2@ufa6A;vcG_KRuN1v#y?GBN$1xo^>b7MEl zglIZIqO2KK`z@KCxu|5hJChg%Mie~>;ELlajV!aOJj?}$Hd|fkHmk4LYfaVrt)V(- zO*9iV*5{y>5uuon+I-w%h|CGyH%l zu)}rm2uXk#G;d*&GNtNqDOA%NQ_)y$Rn4^wGp(}vwrXnz@j8yR+F^!lwI4-bZacz$ zu#K3_{w0p=IFMd6N z?vul|A*GoX&Qdn`BpDHZl|guo!k3+2I29J~k`k5%=C_-@yC%eNYVBLq%6f~P`^)ET z;yn68Xk#6~XNfDE@m8^oc_!8V^2B`m>2*nV`cFygIzxqGLK|F81_QuPxyycY{cHC0oI)G( zZi)T+ruWz{^O^$J*t>Y+g2-ng8&0bVvC4Q#m-G&@;5)yXk3BAX*aZhVJd*9&%YdeE z!adv-y#h+l^ddx+!7-PCU`TM3N*!urE`EVXg_~KiJ>zS;=&Gk#KQFX*m*iR|8DN5= zz0_DllzN~@YM$%~0b!%O3DmiOqJ3@6rcqWYC_H0c-OOA56D;;}n?CwFOWpJ~&_k_Z zB{>PSftE3@p?vN0aHS->;8%}94;TzFYS+Wc?rZC7X+ zEo2&j1>14kq%p#%(Q8ZXr(+QDMxvmNpgU|h)aX$V=7|+8&i|&{t3`S&1+tQ4;?N(s0p)THqe=E+G~L}s z-LR|4c6Bx|mJ~+~H`vA0s-4`6jS63on_MpT>>y~jgCIAfqGSUR*czSf>4>HuoCfR0 zW2BQ`PU>2qjKLM|2F1FS=2#_&2St%S+ zt+?NEWwy>)2A9ZQc0Z*Tafv0+3%_r5 z@f}#KZ>RdAIhVKhx&gfCLhRN`s}4J78=XK25r8WSeTsf^eQ#|>xJC3dVp|B$wLh;4 z=t|1^mM7qSjk|e7nX9ms^vSwe&WbLc$;5@QY=ih0mitChcX71xZmLZy z@3GK|yZOQN2f9hBlVs;gJ%K2XI`Li@o`2*D zOOo{vNagh43ssxf*>2vYV_bB{?n+{m)$3M)cvlj{)g5KdW!@UADP)XQ(RKzbQU=1^ z-9)}bV=dv;^_gT(My<6u*LBP)XQHvS!kXGDanRxN#$KSDLxnec&D|_j%|bUNECf_p zQ9T}JBfR*=Mapf6*G+ZMdqW}Jkml|-q99tW7VIo~koeZ;}iotL;N~{TsNT; zA8s9PqX_TOl0x9#0H#lwar;fG3P$%C_*M*lx_8+=gw*@te ztUdinwLP`55vi)$9$j8!kE0RB`ea9fo6?XbA!Vs6$?f`+w69N;1+SkPS6mYdzj#xi zI76PMX8zpTCVNU@z8hGsSw0_pCuCPWu-s1n#WS3!`r|A7 zewht8;}%7CP6JOnx5yW>qgWDLu<_5+Tk`SeYp zhe;ai;JL|9{*C2ra4MuQ&J`lu!^6H11=Squ%6IH8HWk*{+N>Iyj_UC|er8X;vWZvw zA2xZ`ddo$BO{;<&@D-$hy=r!LR8q9rL2_V!J(a&&)x^o}a%}F0kruO6#BQA?5+hH+ z#lN-HAHRoF;W;9im}0l-F)QB8?s&~>wtUuOc1qxCnozH>GcTWPGtg$AT1B@rm?v^H zc?s&>T6QQ9t|x&m86M+*!H#6$wf4Z92hCfLH(@EENW^7&@?@JF)HW<_}?y%%+?x7;_JQ>ATq!sV2CK>r?ch$Bh0xTO*JZ zxIBXW1RQi~;Y@*~Cm;+6CCk^2!&JTj@1AZU6Q5TCT6&u5aB42jxdH|c#LQ!PV1&T3 zKwt^UD`br=VtG9TjVMs6U$FxH4y_%{AWoL$0)ig~2qtsLO%h~guOhZ$~FHcdHJ{?19EcsR&YvD)TkZ;6scMPd;-7_DUU(q zRWH2kE@aYWYz!D*5u_9sVw^>2IjzDDD&dEMQr#_HbT9&7%98TD@ zXpK!p&Q;L}gf_K>)dq|n5w#PP=|qzf0xg_0gO%=9 z{WMOp4YgCFB|Y^6_t#M~M6i)2;hL^0D{n)WD{0NQgqpS@tLrF1H7!RyrDF^Aw6&8J zp!G0gdt16ObsTNvH!w7zjj_z_OioaB%^@f*K4+$r_b*yPVCd$MB^kSL?0-(~*%ON;iCbImxuFy5rY3*o@Wf_RQjXyX0zu>f(oC zy}lV+*FWune{QlLo-=_L@q4nMpLfOcz11gFv7|!ztDEXs4)Hj_CFet-j(X6D@>=g@ zJrZv(M*4Ut6m;6BT6U8}J^RPz8R!Nwvh0UYCZ2$qe2PvG9W2aLXOzzOupH~Dwv;y7 z`d}mDjq7YnR;R7rTW2Sq^EbQck=HB)z-K^#_mLNp-Xf&r4!jW%It3y`h=BxBwl*o$ zeg?)esSi>lBC*LXX49SQ~KX# zx6IsNi5vN#;rA0%7@G`g4x9vJj#|bDEP4W@P+vT9vHg9@T6=C4a|dvWD@bG_9aBCO z_I!UR0{(Z(_dKWf$Xzx|K6F=A4M+(c%U=VMXwO&AMI;mIkH(c<^~Vvf;n+Hu0CY}F zb`V@*39qGAG0N~Oc5$tA?~yXqfL!0m|M70*W$cu+q-Zy^S9=+KJ?(u6F>9{0Ks^*Hsw>Vkz>z| zB9MK&XW${wcL?Y!)J+6^N)PPG3uG-#$Yz+4W*th}3=m0g^*-;E$}%AOZo4nxeM z>nT$$xgi*0K$sVXAbMdMapNPLMCr=S2J@l|Z()f?(FF3a?!gXSP6T6)nR_1A+(S2u zz>z~RFHV@ZqX+XYvw=$Vjc`%cd)G6`PzDb8*C#yn3Yvvk;J-PQ$Ok*;7Dveh_5gDM zT!Ltzi~Iv6M8SjoE|0ycFuXu2|yfGa8;jZO- zNK}P0Q5q@V%?LZ!7_mQRzy`BqXyB zd}#w-l9XA2zoSu!4-M9Jq>5w83u9kfq3plon7^WM_>=>psLr&u%tG8?HcRb z+yY>BmNSb7M5}8*WC``aYF$H~wKOnZskww(mAMHC&Snx2F%&8EG+_xwM?DZi=o};g z>6@-2*jYK0f*2nIvlu0G)V05WDkf_Rxq5+Xrj8ukxxTHpbfr7$BZPg|I(q4Ho}8gR zPEhA;BR=RI{fea>X31~_kX1&>_OIKm$g_iV?3kxKDz7ZdLfQu4?K@Rsdtu%W*c zFQe#&N$lK9rrWGVwKfet_hgJB^ne~f=E%a}@nE3F{f&SIj^xtG^w~^V3U_$F!u~jH zHeiNzAV6Q@>Hp*$dGxfuSkl|+gc=>UR8d#oE$C2;SLmY0-6A&ACuOpM$i$bFD&t5h zcoTyt+5)tk#b*Bscw)bwxC(L)hlRxR_MptkI@*uYxvji~j|Y6psWGsX4gM3 z%g(=I1Rqt^af?6Ds)~=QK^h1YLt2-X?i<^Ac|)`u?{7vREj?=Db(0g*DMVgn-#zuG zHsb!N*1FNNnw5A9SsW|3PPUI<{=j}Y^rw8zx7aU#{Q_ynbod8z49ll!$R@R?ec_!?w19p5-Rie9DZTX4?U- zY^Ty2Y0%S$<%m#{^RV<%qD0Av{mS4z;zq&&FK^9gs0;MRrSWO*?IvcW0|fYxyskT2oTPc&zR@!LJMIS)%C!+IcFnydW;LacA9?|4}-0Zu@G zOt?S>tE897dKe$W1HnOPAMhoKmCLQy%b1LkPw@6A8Q}V!j_lG!tYP3^W{RY zV5^P>#{3o;bLc5zB26YEXhL&uVhqjQ7F=+jWvygE7q~@vYe~L1C<>(dmdo~GLJS$O z)Lx_fL>PeJv^vC9t**$VJ=7-`P{>IZM*#ujW5Cc$eX@9~fe;uF1ndApkS>efsD4>k zON10bdD=r{D8+@B3n|eR1HGbQ1QOIwg)s?-8X*W9dctP(9=+g>G*=J*JD#_^eJ@y1#@kjNe$UFngs|o;v2q6l>#d?_vsIM< z2<1DNa<>bcMhZh#Q<-*m5UWNeHjSvYx8xuk=HnwT#Q9gs(3&#JTAh_tnhsZC?L)ka z??%Nta-`Od9j&vYoO|6z(D4s<)#0LGPDIXsgY$&W1v;K<0JjQjqch-HPSnwnCEH;7FoX9kO$@A3IE> zkd}Gq2-JnmsS@KhBARt*(2kts| zD@Tmnd|nqF0SV$CRxQLJgKHH=F?5{h=vTZZ!2`MatfQ3kY+wU)sDrsLV@IuLc~J%Y zkM_{0h4v}-gG~`xs!?0W;PF;xF!~}nSYzwSFxrxjoXA+1UD&X8s%y0BOV`;-vB-9X zy6t;EdxS^AMMCu2_b-@a-U};0Y=!Mj1{O3TR;rNiAQZ)UODofN6d5rVA#nn#&v4eH zQLIU0SJm1>9~asauZ3;ozq0MS=aEoHuwER!w(==odgC*ePV7Y*G(&1n%u9Y$dkfeowkZ8Hb zMl|}Q=cU+>F1*ur=3yADq~gzG?xiNyn-uEi!|!v=M?xjhsv#=FXsSkL4GS$1?eDW- z5Bve);{E>9{`de^JQQL*zL&5qlD3jqd-Ob7)gqqRLvKkIrV;tl0|mwYCg zWFr7@@~89V?x-2M03Q5NBwwoTZZp%m80qFBCA9EJg-mARrk`IS4LCJU%uDJ(hrg%kByui>068 zWC}xwAwfV__)|=0(_wYs0}{zUxx+G;U>aJ&Hhwh{7E+MI0aqkq)(1G?QgoDY%JebT zf0(FhGs-t`TXSL%NIH=Al?@A0=WNcJM|cq4Z$eZqyX8DQ%X${9M@xSeZ;j>uHdbmd zAiVfyPzxN07e@%8h{=K&5jKXoQ$mnWN#!L;VtUA!D(2WnoC;DtQ_#^&afX@h$T=_E zwT`M}(|dGogxrSc#>Zg+pc&W}f+5-Te`&!M{lXzZOxVYtgR;1fj}FwS4%^LeR+yd2W7!L?ut8_sY9FsJx6KES+R9+Dt%(4VYiPCfk`J_UM7-yqmEk5^o7-+% zLT$vC9=09(KevniGMR-*rJ);b$ZsdwbgT}~upNDtMQzM7R&(Ng+*Af<>vH@5p^`I{ zV-~ZMjbODOjivY@>|(>_kgD)b)JDuJB06;mn_?Ay{%*g&^jU0dUs@*qfxYA+DEc+# z!FKNNp2gm6xLImvY1wy0A5Qqx_tz;QwHZfZEBk-iaWzDPj!-bbFZ<}`4ljE5{DIyb z{027s12<^W1|^5p`|9kU6X#$aueOvj4E3__(OHzr2HADE_LPixWPeH*E9sE^gg~S= zx51mJu^}t2Nk3-4x|}^THi)5w7i2AAgS>V+s{ivAT{g|mJL?{rWd36PzdzlkzkL+r zo1gcG+g|!1)t3Gva5IeGNY~c#3Q`J?5tmSNQIw81TE!SSQTi79ByINt%EEBP9Ig6+ zses1Joz3*`R((MV5;9skN>Q4?PzsRqPN(?Q5X^@9Y<9X0zte)MWexC+>;eI&3MuC% zK93XSxMuUCuxl@$VAnyp*rM{7R+z6vf7?`ksELRKpbHfsix+UNC>+&Cbgbn+PfNc) z{y@28xx|+Z%w-kIVL8fYyPCWDA&Yh8MA^|sw3JEeXWjP~xG;-L03u zI1=E=B@l>mqM1*w{Nc2qfiVK0wcq!*ksE*_q}5%kygE6RA%J1va{JU*i1_u?gA9hs z_~7rB`u;VR{^50S07?)G?5BQ+jCD#Ga(LIjI(fFMAS1>Fg;`Umlmdm*)|2Bm&wDVAci1aNQ=AM$j9PO=~hxT!&%^F3kZDKM@Meecd`!wcX;ju7cZQ!{tF3? ze$De7`Rq6yM4x?4MBQ;a%uMJuge#qQ!UWoogvLJgqQ6gPCwZB4ku zR)tD@9N3TnWF?1dZ6(X^(u`_bmdQASj8^*a+wHm=-{29{M0AUte%46BtPk0AwW>=9 z4@{y^q20c3+?EBvVStmg6DG5Zox*~qe7Lb2s_d2p*>)}MP2Sz_M=k!*DZ6O!mqYFk z_Sl#e{P`k61$JY1a;k)zp6L31q_TYI@AWzAsba8<%~WY%rmwvCMFNmh>waKw6K=G| zCVA5UH&xw}gcmdPASX#3Qdz=Ri3r0%$l03TLEJTOYGY=z4cJVF>CWsUKtL6PmI%e+ zliWk=l_-c?^L+~*M)Dr@i6k=61k*jY0!CWh4a}H7qO@mvK=l02MWOfFQ1e6JSyVq&&;JRkjJ@~vjhr|%ceI6 zZ3K5SB>|NKR2Gm96k5Q__{}P~s|G|E{3jHkmVGUMcGSarbEA_K8Qr({-_)xIxzLzX zQt9MB@Zr^V;A1qPPj0b;tp8a{?z7D0a(1EV@SbwD{yT>l0GFtvKrRb@@A5yW01U`S z3W`l=md>JTNS_#ls01H~jb~PWs-`G;>Q7BjzmW^jQAvO|8)B^w%F-PI2L>puKtVY{ z%KpNHEFeJup!Eyvekp z53o&ZlJOE(9xu&Fwu*d2qk_#=U9=V9XgAZ1_gXbhvsxBtO(LwT4O)YiZ}#x9Qn}a6 z20zf)T*Q1M{(Ty8SaSk8G`1931J^0o%>}&G=UIJSuGO;k*VIJF5F|J|zCpv2S^H~n zY*&@-X4gY|>W~WR^HpS0SC#Ikl#ynQj2jYFXs$)A;&ECUiz#E2f(KQU9l!zzLI(sP zHW=dYQBrhdEmMjPBO$sdfr}=92Ciwx>HGmhBQ2F#n zOSFSLOT5$Jaq4lbQ*kN;h5 zmY3Vfr{8Liy_RdwENrq->+@{vrb4_{#e}k!U;wMLDO9S*E1(rlpnj_1@Gi-3F0fSx zNxHO;Jj@VhIB5cCBHl21dAUtnQ)2ICd`3Jt4hdD<1sVY{CkMm3ff6b(WQ%>1HF)1- z4FjbW9a@Lz!;d5*$wWB-MmFcUxTazZ+{9f&7)^z$|Cg%vp9nT{w8C@>k$I z1~GCL-)VVJguyQIi6V`A8s~cs50TG;2C#JuI>5z%gpBes$ zE*XhNDit`8c-tvQDlae4Q9|Z>>e=*%&uRL={`cfCzMgW@!aHziE=0~+{t$Br)O)GC zF+bG6XGSiH*%cE6AyiVZOXY8*Zh%CV=*u&pWWOk?Q8qu()hyc)`co4G6(S8eTHRUc zV~wex#BG9#Tc{`SCIu59F8@q1#n(06*FpEJU|VBSi~}+=p>i#SlaRo-VCG{i3c2 z;8+AjXR6Ao6}Vsf#p=|m2z;b^!^=8)OH~5DHqfmR2ufcIbQ9-!ga}Vh8Ef8=uaDZ9 zonLp^F#6gZt~5^%4XRI}Xve0X%r?8JCl=k-X{+93*E{ z*|xk^pn(n?EX0gv0UP|FYTi%$-b!GD?RXj&r;{$n8*H&b85Es2hnTz*Y__F)%52D4 zkMogSYd2i_N87acV_W&ghxVs)|AUYIa{K9pES2jT?5X8)6{-DyGPvt0!Q1c5)WVz>kp~0N2FKlNe)>?H0AB21bb~B~W(X*X(puv8; z%nl89yR;TpIdDhf4Fk0J=dWctm_#EM|2!7|0tiDN0EjajqOUGc$WZ}ml0$;{Jnb6+ zf;_TCazBNA50=1`zk+9oj9nD$8=9;y%5O-rFR1btZ?k>qYE$;VJeEiA{>L@qz4Y-gan?Tz~#I27kvoL zyAmL{%EI$#I3eMs4-7cE!rm0ANYwP1Pjqxz7M&UwGmpkEgDsZ2;ymI^1C^9e-D1Riv2 zDNQO!NSIRf!3lGLFm(&z!z|$gSqV@C9R(slfkdd6RM}1la|=~C!mD5+tGP!E6vQ;n zjgsi5sz?Omlp;sN)Q2LZ6=Xvv^kiQ9(2FwYMa7{lR>}07>eAf|O5Nx7|8;0S$~CKFg|4p)g9o)x zggTA})pJoDi+2qyL@U37H7g+omBst0ZtSsgdSc2BZG*9_=l5hQC+McEU?q0)f)zHX zIDZWjS(B~!kf33c)$+s*P>V(osksWVsfHl6`Y6&AwFy{Evm_>9!BgQOL1WfCutarG ziSERn6icvite|h$xs#YAC(Rc^i;?Dh{M zcK4`_?0QwL_?aULf1a3=JQg(bi@wVLVe;9W-jap(v2<-zIrKR5C?Td30S2({WJe|wFu;8Odq zAOF@Cyt~Y%J^mttZkV@{aE0A6d?}5I_1Kb2AYBE7za3H^4rR1y%h+bPmK}XV&Xw%o zppOhV_>WaK&SGU^yApoM+Ko5rP~@poy}iW^;XH71F!5-AnGbOnTIV(73&Ic5<_+UzFqnEVGhA0ZY(Yqk^O$PnGi&`=#2=&-zv^9;W}_ zQ_y967H?7)Wqu4NV8!=>pWFl(^vFnB^1~FI8J5FG7L$__wdTh~wdVVQ&k&GAH}PAe z3zB?q5--GaekJ|t?&|-xj8^`bCM7h8()Q1LfF4AFZ)sr>zC*<#1fd9FL_=AsG&L<} zE877!3At%>8 zOw4JjSAq@mx)m1CMxnNq4v+*HnfJIe#X-P*AlM;>{``Ws@zoc!ln%TwySW@sr#x{Xt- z;$v1J-9b$d?$W@XvLm*Rab@26%sTLa$o}^!6d7~&DpjwBR0e9(k&h(ebQ zO{F(wd*NZ5^u|i;yftp>z?ud*P`?cGV^0 z38DPG#eMf~f_VyYgqF~I$Dh_1D$gWIv)!0Xg~8JZx>>FlPz?)xu#hN?=oA&0$F5*l z9p}=DRAiWn^7Kw7T2b{e*wW_?AmuOhb~bm<^_AUXR-QvjE#5RMEA~JByYdTBd!4W2#%GS@DkPR=krroVydP499E5{uiw* z^))L`LyAg&3w(J8_A!TZT(FrRS$WpS{Cr~7k;OP-S6D68?&<>C=MQZ_O9Es(MVAd| zDB584ht^wN;aa*U=&;XQY1O$atSWmM%GMJ8Lm~^1ouVIEMR=|yR#7rJy*l(EW?Q;0 zfR%D$HPu#FnaBN^Yg1Re%^Dqa(RD##L(D}5^u{LSrq&`MNrj!H>1!Q_)$`Cy=nD>4 z+)Nr}qp_Na>f7^66e1A}{bYWcki)eiI6C2Q#g!qLu=Y8ArZ0gIrrHE_TTQN>(FwtD zBhB!kvT}8QahQ7bF)2>;>v=~zzp^u1+B@thWCVAOZP<0te)j7JSg?M}&sF^V)xLMm z-F5?|=eOn_u+;FE_TJ(mJNZmmLT}^eX1i(Bc6)W{QG1+(^hc8O$g!m10E@gQm~mz# zzqPKHiS)!!v1$!|d}V_TC*|cSEH%U54cYy()9ryd2kg#wgLdBs*>?8NHRR(O`~Ht_ zx2?O6Sdd+KI`hU-+4;)-ljLI#zq!@iRU`&#-B(mvtV>O9)P49VwdA=rxgHF{l++GX zKvTSZFpEG6eeD?Z*HYU_`TE2IzrxpaOK*o2@`Cmr!bh4(#f6rV%qR^luk9x+|1vP<61(@N*X-QyGohaCz!|@N z-dURCy@#@*mhk<01<|OTjA_F+0ngjTv z6Tyw+A;o}9k;5IjGd%4s1NqXS*lK!e_8u%ptMViJ5N50$#1fkU$qDi_VcH-f+&2U+ zWzzGIPDOM-QbrofbqYOYUMd1lLK+n0z)F-J%D-|1sRQBwr3x<{b5Fe57@U7~!Hx8y zu?H6e>C>Nl`VoeM^x}*ti2O^jzJ(C6CIXEAiHXb=6QSOHg`FA%fI_lB(c++1hcKE} z?t&XEW1$RIh*8*^!ia034Wwa#HT1eov_a8Nl^pNGi(n?3m^sZVk>6DuB^PB%wo<82 z5}sn~FXZ5UmSo;$T!@uDF}wn4D8#QpH~@pqU=&f2u!W#YXu&O#$l2!rA?xknZsT?}hn?E`<5uU5?z*Z>oE11RvmxZonNL?+w# zApPZ8$_}FjKM@#C{Fr8 zoXU?{Xcfj;xJ#I?KW6y~(Qcu!XgQKC>5^pn!6X|}$RAD7wkcLZ27lR}XRTyUl9i{t zU}gJXvhviI`w%DXO_L`5~ zkxxis{>UnW^Q?-WN^V~n{E+*7!0{X_&v+NOIrtX$JNUK@D$5|)jH}8+3#>ANn>V`L zs^Kj)1skothz53~vj!U2YpM?-mr+xpp3>BuN4GiF*@TwXN=h0+nIb|&zXY4^Qzz(#&lVAoFHOg7=| zJjIoE`3=unZaGRA>slHE2(`181ob~bP)~4)E6%bJ52zH_wh@LLZwqd1(3&ofEcu8v@;Q!JBrKb+%+4!2Ogqdb@hQ(9tfHvNlg4m z^DZ}LYl0?)a^Pnph3@rP#HK{5ZC^Q-R2mLbK%V^oS}FkNa?Xa(AdXPhWoP_qm|gYH z8F+BN2J#40DgMlo5z_XNADtF%v$-ou>^ncYk%?qi*?Hf^9OEXTTyKATaFso~40s;7 z5|7&B)We^kF5VMhqAy2q<7SsS;BiNsoLCfhsVIYDCI+1=(Iy5$lU5emOM6-^xr8yF zys#a0kQ;o++bG>^SLtS_PQ=(84sDW!D#>MWsmVIYwNtw+E_rH&N^IIu$rQqr3mWCi zLJLDtU0h}HBvnP?RUe6!M|`^#%LPNmxVJpEcuNINNMy8SQ)_|tsJkKu#e@ip$82CM zNHP{f6{S!dVU5aXd!NUWoX1L^s~D~b%h~DapWJF0i|#;!e}sm;Cs+;dvb6cWsY+T< zh`oG}J$=Y+_q8tjW4U}|6%!`=Ys93&MwEcx8#N-(agrF;Dvn%Bg`j6p7U{(qv;Su4 zv#+s(?_FmH=HY8XnM+&zfE|SAWT4)u7$T2pi1P? zNn{9rY)1u^GeW#WPe)z^Sw@`%wR>C?_;lv4# zbhHCNetCY$&7w6o@!mM1GIO)@ad}eT0^gWEO~fZfDsU=-1v*N3-XB~ovKB8LE*t$! zZ{4|k)l)M#$POdI*BL=P6Ie$9ZZ)k(;kx3_c|CuA`P-ki0+N>tb}-=?;&W*C3{se9 z@&~qW2C0frAkBR)OhsZlfW(&mwv`@y7wYrARRAhwA-r9|_sJ8{Nm=H57zm}n9ROnl zSm%}L4ryvw=Ov-9<=}%f=gvD27*>WmXOY< zuQyP8uSTD%qmiVhmN{pQke&KNHuau^=rp>fEwu9U|qBtYRV}5>Hisn-3d_P z`DJA0;V)XK-YDRihLqzi)&Qq!qZwq&)^fZ5ffsDZP(j!EK-c9o8vLC(g`!tbCsLG$ z&kWgw4a}BD+@FZ(Ghqelj|%l4_Ev#Uox(0#?$LiPE3xZmXV@Kc!glLBS@z_+5j+3- zS#;<5?$syXqEgdlkPz5VoL2os+IYu_n7rWVh`_?7jP&}4aPWfAYT4VbRnm_R0RzsF zD^=r{!<}DRR-4d>F>4@}Mn>&Y<$-3klzR0rbXt_!RR$52vR3IC1vZ+{s}Y!MD7vf* zHleUFzFEMNR{<5{v6@B4G&+G=k-A3wG!dxSndx|scb6WsU;pTR)AgAwmDpHi?_Ae_s=KJkP7^OICkUlv>Ok&!)|#!%_b$&nN3`pd{)Z7(np%1 zkMtDHOdicAt;UYYs|ze?do7)KKnLMpQpmPB2qDBupNAut%Ah_0I$Sh|KqNuXQHq+S zb6ue7iW{G$x_TfAisXveWOEYG|FU2t=@2JgAwUw)kq$gZe}p1|L-cBV6GY+#B0>{Q zR>@JDMm`1Dggk~l%A=YmuPT6|YO_QnY7P&wF0hL~wE*2Ff7v}$)+srFB1$Jd_{nW1 zt5byKS7m`rjza)Qa6WZrA&ATA=qIaHh-Fpyk*KAWfhlb8dx1mJnBR?|<_wal{$^)p z&cRCc?%yqK&h?h@;f%?ta*W zqsGw+Tw+PFWGzxEMWBQV!iP=*y_jak$q}-fy-uQGaG6O%&ys-Cu%&Ovh~h3RA)HM$qXCkb|e{Hs-dOr5q%Q&tqQi zMU(BUGtjm{js9_W+P`1>y8Ub8XD*k0>?RWYmY~I~sO#MlJMb7JrACs?R8+Vp>Fypj z@1WiI5e1z$GwiO}VH@>aI?d4P9lw-$x{ukX`5kT;44vACRn>`g=?Nm-2q+gN?fv%8L44s0%^fuet{Jiv4<)=*$a!rD*k_dx`<97bUup!+)=AYpCo zvH|IkoK3kH*bbtE;i}r0-D02S(f3%^;FtIJ)9&Y<2!KG_R7=U3smvisVcNk(S5CLn ze{c&nh#Cvh9KS7xppbBttL<-~qO&gjOS|yuXB=l76aX9mh*QrQX^$;BL=u=R5HJZq zB9@Pt*~1Q*b~Jg-A%Z{3$UbDi8Bn%`LYLFCG)dIwZ_2FfgN2#SVdcn#pulNdjK)H% z%0{1YIFKV8(2*#G^VvF^6|8|@T>(CC^JJinji?mZO zr(^<^h~OO-G~}>a2_6*SCpw|_wbIn*tvo%^vQhlPh+NtyyA_V^^bkv*7g865_ z1%RLoV!sHb4>-by8pZFYnjS$}Q}~?t+dCzD`%~21p2o%nBJ6w)k8cvWQlJ5AdcmF- zL4+5vbiHJSdtb6dUEt}OpJ}9 zHG<>QRRO-M(e?ak6>dM$$(nqW(0nEF$MwJfO&)FrnItVIQ~4`@ht_+o{PX(cEVt+@ zR*I3u>_{bv#mDB%v>hYP@MtS}jg|*| zt>hI`KcZkDmR=&l)7ixuD-+q!_RnyYecs@*A6t*%CxFO^qIA$Q*o7%<*Unb^(GM9! zMT6R)ArIJNZ$}Bht7Bpmvkr;Po2W26B$b#R5@QZkcG}qGxJHSV9mc$s8{Xedw>MoL z9~RhuU-3Q|;gS!(iBW(o zUZuh}_R+|(pZvx&esYicE4^Brl}xWRjsu8UJBnM0>TPtCU~2(1pys%wD~cL>zz}(d z)9CF!fe^6X4~?z&*WHZ+q5mcJ_VP@lE5^1Ejm!iXtHlq^t;^jjf??L+)XOX^$u1KRrM z>0dGr&FOz#|M?&O1{cT^7x-V-|C6+1)Xq^We3a!;%fD9o5L20QQ(rTYbU(?^5m#qv)K)0qED*n3CGbzWD#Xf`1j19K=1P0O;M#`efw%QJqq zM^DzX6-S~nWl>Cm7%XNnfCRw=5{zI01QQrQBIg{sfzG))RL(hfSLd7q0!a`I=l#xC zXn^wLtofs>sw>`m>(+Pn*=L`96rrw=%e91|o)%HA6V!KdZH)J5#@mAb<2)e=wpCve z^^lDzl>`*lv_PxUX5H77viQOrVG0L2w|=dzs4U7CW_(?b>Weyt?qiI?MAVcr3Y6LW zPR{S%%ewZj)wSQyOBPe&(Q>+$)#I$?3D$WX*OFk(PaM+QtnYfKMTH1ONua*oDBKl4 z09U22Ds;2x@kOS`A4!A72T(XH`xnr^S?~+%|7Vtd zQ2v4f-X~pHP%sX`M+AE*oC66bmRW<`KLDrmsRV!t4FF>V0Hpl0vyj=dGpK{7aXg&C zqeLtEDi@wHk$|V@a~EnXn5FtMcan{sBP}>ZdT^SI;pEwIxqSA+5poM`@%cOX$%L66 zqyG2z{QfPubm2dmK8~xd-)tKG9z99{7B$!1CGD6FjpO|{sqF&iDWfl~fY*2!eq$M9 zZSUCEBRA}@%Wrl$9Z-SA8khV>XyF1SIy@^?2%m3>OWv**m*cU|%4l~fm2f8*$6 zSfML)O;)l-$7qFSK9n3jR#`%nTF`nY!1ny_!6`N{eM%xH-)BDjtmHoY)ZqQkMgbq0 zgN^y}mh#Z3ENt$?;E)Q#yedqSf(soarmqdiKO>9W1H_oVbF%cFy=?tA<%P{n62Ske zj;5CyTKy1j4a*-jL`Cj?<~S_dFXWHZ%>-ubntRIRnTBZ-01E3qDbWIDfeLWnbj3Vc zjz!s;ro0^Oq1u5`poP372*u@BwUt-OdUelr;@=ODJ<1%!;~@V^I0|+o zp~V9;*&~L(>E%j(tB5SYbx74fG@qHOwxU|CVw2%0`JvqmW+BwZrCA=GwkqY^XmZK3X5lp6Is>Yw)^Typ{No8_PA_EVA}VnCez*JGej zz@kT`NJVBk@r2bLnk=cB-30H-Ek3ER-0$ZBHG5}~*NeS88sDSap?sUleJ`&0Q3#;R zBP{$;s@m$UtMV>2oK=aHF8yk}q7hwt3e}J$O^TOc+0TOgv#@13#AKEXo!^!$=)Wkf zWo>TYHv1qK(1%5;NHZd46>uYGM)0TPP(tyC+DH|p$qO=s0#Z^=&x~HA^df-_11@tF z&*02V@f!YnjAcvO=3M9oZv26vVp{C(z_p zq0?=akuLhmS^7r?yfQ-NdTcC8>42qwit$`CcmdAR);%|1mVU-?O<*%}inWu4Un|(B zSolx!cZx+?-Jc4xvXqxU4Oe5)rN2<3E)YJ3&AEX1)ee2p87>s?&)Wvh7Xp;4nL~+X zEZi5K1eMRerz4MbS|vkE%<9gfGs|*snKS(%brMvsK9RYc4 zeM0{1>wKj;b*p&AnuC(nH5aDFIWnVk21$~x{Z>W%g(83s(qm55#Wg=N_mNri(;$B( z{)5aw!X%2h;ioAQyeIKf@5AxTO8dD_B{0R5J|&S<6}&`i$!*x-mLaPxM`LU4Ld!Hp z6`3-ELVvA)n>sjof^N#iW&ck-gP(|__d~h;!DB4@|0?%BcTk+|BDEpfv$d0hx2wS< zus-sUJio~)ix;9#R@K^)>*RimkJjs9V}7X1{X->%)@!}3WdTzTFtrwrTOW!jY`&Ru z_)h4ISSi0Z4Ss+}#~dCV#Hs*?%Ipkb;JiJ@#V}wDTGwh+_(C5^KtDgC4w7swCC|54 zXa-=(vhFX)82X=!1$pH0Yc7OFGh;QyQi6f0Svq=9lIVS4Kd z5g^F|qdrY3)ICX7{}iiF0vbZsB-M#pjJC%VkqZkRD<6x#N_|)mLog#3SN|dvFKKIa zjov6$0w|2wNrOOq7ow-Y_MgZi|DGEpxbHWJcd=_ljT5SP2(>5Bo<-lR{)+$Use2fb zhAbdOdzrDO)j1Vd5vpY>)E0}saX?D4`WK}sADdEu`j43Qz#?7g&-cvfQj2zqm6uYm z5;cXN(}~e?4%|^TGUAq8`4OHGsOK2@m~$REE$fRB~64VP7y%U z(m@0Fd$oIPXVq^)0hXSKCMf)Mu%bz z4LSl*=Rln%GOW>+zCZ}+ER2GEpZa&3)L^4>K}J_=9G;3V44xt#P)^A>h%A{OEUaDO zg*HG83C}3)!$4!YLuTjtNd)>ZJfv`e0?RTx)u|VG1X=VHT6F6z>U3MA!?`ATmSuuI z!!J!wK_AVGQXe0uK2EqfMM8o3?x_za86DY2${@1zCQLam#S#;3=l^}(Mp?@=ah;KO zZ%M!0k44e)Dk9Po>IU@(bkG-7@}!jaZ+EBUR~rM6NGZ9WxbpMg?1NHKCg^+ekN^Cb z1bRP^=+MWk-fEq}+;vzP4GNkOnCM_y?G|enfzC6~MLu@w9d@1XFlYYd-?;p@GHxqaHVvs=y$$5T$^~hw^SoMiv$S+>AQE z^snxb)jNsP8X}ATV>mFR(4yrWqX$jRxQDD^R4O{pNFAjH9|6GR0)9dQTga)Sp~@IF ztuYC~Me1K~nE^!??pmN#;=}s1OO!9_Md~4s$Pz)! zL?aS(BR#qhJWSlU*q^NxgaxL8kZYu{tbs!_2oT((*maCyWHL zV0!xbg@gH+p=^VR8A?M~lEjPR4D5LdRy#$oNGfxog@U5_%Blgz#m10>mJ990)}Cw= zIEv>3hh`07=%P{$6bm#`5K69+MIl78K{_ku+p+b3eL%0xvoyq*UJQLknDin*gz;@h zuLLRO+xuHe+&7Eo$X%xMFig!ks;Py>6)xE8i!L51y|2KJvn*bzZc18J)gA>!*lDdX zv$|?riEA+zUPcEV1|k17p@;(d;|H%11@*eD$M^q2k_UguA6hKpiE3ZXTCQvvlo_Bz z2O(l;`(wEz#I6U8hdFV^lo<5C!mR*wnYmRQ+lGR83xSl!G~g8S5RFLYwcMi#3x$av z5nX6^*NzrbrZ7HQ#lhVip}mZi;xD|14@&K0OEl&zjElF~cRZ#+mHBAMd zR`|PQkp`d)DT+48tG!{8zcjZqG?Z%!OX@-^rDiOKv@)|1)v(dbaZD=;NF$+Z=M=s$ zs##|@Lmrw7zG*Fu{cXBoIca6V@J0aMinQ$-A#gz{nKo+B2W zg#16r>V1lMbQ0qK6vY22;*qL~)|w1O3lo=UwOSphG{mgYT;wx79VQB?nAQ}ZO(!AJ zr^2LO;?(={C9Q62t}-8rGz@8_VUDz7mb79PC-xbf*k=hJGjoKZ89a1}LNi!!O=H0| zJBh(NeJGY0S{pCb{>G_s=72DnV`40W4-1b>jJL~zLcGGf_sSX4nK{y()66tJGegk@ zcIz~sG!51B9yHI1V`=%~AFH+1Pvo!u=5cv=N54E@GAH+yBKSN`wSoflGFl8CClEcs zBCDpfs^m0g8f<4*a) zW$Ic8-Sg$|$lmg#Bqu(R5XD+QV%EqEUP$P<`6DL9)SQVkNK= zsF0P^N>ZfuFkW2aS0`~Sg>*T6<^$>GwxyFWR-{@dw+1OqZx)*RzyNV9IxLm6cC_{) zpVd)$ri^adNeXEdl#<0YH6@q(5jeGUoRKG9aIo#)lB<@!#EgTFs8?eHkDRs^QEnX_ z>$P}6?y2pSFaBq0*Jz*r{M$_YI6A?RA#%|VQVj|eOKa5*i(~>{_F->ym!{)w@j4GrHM4 zvZqesmZhB=3)O&7iy7L^q5M~dtS7BW&xPQ1sU|&|{U{Np0x0b}U!ylLEhK!+XF_W( z1T7QDF1gs|!8)$%K#^K@tCE&j#>9j_ta~Rw!7(ihurNimB&^}9C`DOS%|zCwXhtA6 zfT35qMho09Gs@@eRdxr=9@Cf=A=&x=#jFwyNEVGo#-Z?1Z6MeG=3|xKUUT6&OF{%H zKjBM#YD4NOvj0{I9==_C$L}Tic}T)F1Sz^ww7#KrjzXL&^a=7W4z(<1>fZ-K*S-{H z=b`gb1Mx)#8(yvHzz~rUsOzF?h_u^64QMTK5{5rI$WNVt`MY65@gZ1^p*Lbr7=tI&|qY)w_>A0P*Y`Cj42-adX4%z z%_Bg_4)RtZ9dSsA(s&iuCQJ^Depr$SI-fTM2xH-WY(-!f$2g&1L>v%Nr1__2XqGU& zCI3ldaEOf#6Rxz`M3YsMwDMIN<19)lrUeojkbDWVRMq8b@n2mUwML{qT-qV8bm%-c zsvZ1s!j|%+CTvk)(x_$37nxswkLFIqD~(^AcoGpqcTDgev`CA50OtVpyxB5m9T%QhSvYzlvPzv-obk$SmMB z(!nspPB-Zj#q{35c3MXc$Y|;q-HNp|H!}3T(~i44*1df}<^sd24dBo?#JWC;o4U^6 z7{}FQlE?s6HA}*x^O{c4gQy)Mr%V(nNS96$wu~ayge^1iUSpT0P-`>{Ezr2NL!(up zm0fR{K&6#)%-30G)Gg~WHD4?wOQdK-s5v;a89sA9I;mB#S_IEvD69s-vr`!}m&!5& z6<9pW#S9%SlcP9=4M(v67>df3W5aRNo3FlM6XO{e!!)!TuR|?1OKNy(a#+qx!`01F zs6lv)8!SCBB3FHHHESvMDwp02t7Klu0M(3C90MEwEcRH0Wyo8c~cW3AEE^~(9! zr0cFG506(4%kK~6%PDx_6^;iRRPSYk!D#MnKG1FwA7-J$vrkLagwU;Pes!2 zot4z-_e^B!LMfmTYCblpa@7v;rc1tRcgtcldSoWVj(dn(U7}2%o|$QXk@Ry-N%s{GtZW#WwUPvp6whKFNDQbB*#TL0{*iqqG-cT)l0)wyHEzA6Z6KGJ-uL;0OT}6j zLsk;T{y&B+8b4z6-5ETsAxqi+q7;j|4%J($nFVErYq-BqNKjGkW30@kv7AkmG6t7F3_Swa%Q3GQ!h-~W)LT}k^ zjM0O)Q#$L4`EH8Pfg8lL>sQzd-;5E7${?ho>R zL?743G{tS2S%Gq<|hv_jPc(Yeg=;lhSv@8mr!<3 zjc1Bg2(Een6#y0nwh+aD4ElJ*y~HFgiq+4{Ogh2s*p!EK#0Z^A=X*qnR@$UwiE@fA z(D74i3IhyzHtz%iF)&14N%e zPSY8JhiRI}jO!$YnK@&@LZ0>hDMHQ%r{$6}#HsmMMHa>CqMp2`=p@;EAxdexqapi@ z#XHj6^P_JIBc({!j6UnXtHeyDW=ij=^lXk9C^{T#8bWW1d}@m9X_D+|dOS{y!as~U z*5q)=xW}lW{U}Z{L%klPZMa_c`DJ7PXkNsLpt%+M+`JJH3A6lSMP z5uI@xo0u7dAQU-t#LFtHG~F-d&%W`JytH>to~)Xa2M!J5NIohLv9KDykn=6~ti2|& zx@10RT}Y^wXkzdfjPSU4Igfx1QJDicPC`o7f-{&)}VJ#~aL;>wYrSw^Z!59vBFa?go z1ZtGZ;*y+w|9$ED_+#lj_lfj;CUPmcX4A-pU|0nOC!&MW&@sbDYCpLNTRL3aWH0CS z352aLxtR&olszTStPQgLKa{`w&I+k;zAshC3^Z)jM*0y4V-xJ3K{0Sr{^1|gSl|cp zM}Pl_ymWL*9#MxyDrr=NJ{!3HSo=g)lns$kX<{`@mrjT1IFG%FQvyn$Z{(b`P|a#1 z#9K)ywT{-N2gW2-Ycy1Sh9K0aWulUy1Yfxjsn%b(_1cA7#d=F$-$}eOfy)eg)ggaH z^RA6+HEk-=sHN2ME?qDS(7sTOXuSBqq>ulO$aM{I;2QDoqS&tsJi0kz6?;sB z4dGeS%^-ZGW;{B^#6&5IOQbs*mOjG)ntwHNU7|rNz@7)$Ig8%7B1F^)5T$**&QEmm z6Qu$iNRxAM|2zor)5V!*PP=AD?yWx-Cy%*#ZHOEza)5Zs>(rzGf|75+&!dao1UWB0 zIeyY%A8D6QaRj>%;&zZ=rv3b;yrwQPmutW>sg~9aKNGh?P{bP5{YWx`=+;6NcZ!Fk zD-0i)ZR8*mf?}n2a+(-_G!0!THLNG!3X|HJA@OQ7#^b-2C2h5pn^8l7RzZ84(*~;f28^ zCv|$s$&cu7(TqzIE+b-oTlqlaEM|=8X{{&O(gz7bY%t+#oUk>nmNja&Hqz_Do}Y^^4|XHW?qMv8 zQlW!1d9t75Lp*&HGk#t^JwgPdV`mnxw7ID+8OG&i`n>^ZM^yFgAK;3o5v&N`vKL*l zrfiOal@6m)b97ig?E+s}I#?K`anYREuz*);mxhKgU7MF3?ULItsk~`3t&p1nvV6Ty z{;zL8iP-Dse8TtSn?J-QDkl=gcEC?3O^A9_5+AkrNw_>3YgA&Utl))`mdQ5=V+9v6 zO_l->e5z~E@RfZ3BNM`c)3cKPKohS|r5(Grj!XjP{p?4dn|P^Hq=%0#Phe@^ zgD(ov%Z|p{OtQCpHiD_I%=Cn~XC_61SVMYFp0;QZ`-%MRzdj_Dt`Cs6p>tbYNAqI? z{VnC*No;DG=x-j9=l0U@h}z+ELf8_OxGl#)@*zUlqlB<02>lPkv_4sp zmp8p9rIy~A8nV9n{yD_Y$n#7_sIFiO=R;5racdA^!%+QG(qHogeZ<5ilXWQ<*j2IO zd{ooBF?k`Nm@sCX#V+Wijr+^m3yB$)V*p3>9Vfxp&g-J);QoIK-MCfa&<#U5hFUuC0#rIjo1hK zN2;WSE6uVr-bTm^1H`*18Cr@19$>>0l)p?RQu|dcI%K{mtnzerP=Z`9D8n%4)RwwNW|hL zVMWCKE5a#X>bC#If&GEWHPvy!1#{{nw{(#sI{8EoPY$6YCm8=&76%B#LG~p?wy8xr zWj-|kE3vDpb`=tu3T$*AqV~W6@=~yfPhE3PAhWE+tD*9C=_JU7Kr1 z2W|&hWQM5*^n^rUZ7b45GKY<5-c1{ke*+O1e}njL`bhC!%amZ{hNT;Qq{BUpW_Zl# z;6*vP8c2_i;k%|R;babBUZ>F&P7sBsnO8Z*=;E38bfzRVG{WT^VN;pUd3R^Rs-}YK zo2Gtjgj&{Pjkjhfm>K(P>U8T)5|WA1h3*|D*7IC-*SUNe?a35vsybL^>dZ-*J~bm# zC#OvV(d6u?QL#)+p%_FGVuoFkSWb+yp^QV&0XvrQk*E}pql_QXuBcv&etI0tJ;1xV zNC)!_cH8k5>T${ynr067A*Jjmc9V80Q##Iog~>stt_|tbv^2pvEB&)Enf|B~L$?O` z!WZ$YCoumVY2^#Gqw*Ai_&)6F@2$!(SF9ZQ$|@R+Eca`MsVWlV-Bvtr!lKt2N{o)~ ziU)BPyLn4keoJV+Wm^RM(5T$BEiC`-pP$7OADI(sjqiTNh(O$ zEi`)uy*RQF3-x4W3h+<|#RjzqK;Jg z5vZ;=78{LDmNwvn*#wh+Ug4r1>YkktSKr4bdOx)~z^?w3=)GL3J?Eqrvw~{sd390Z zcbxuI?}RkP&&Ut1dWGj9=K0G9VxQ&2@fGBs zkI>xvmZMjWbl?xfp|o*`sPmoH4kqp1;)s}H-+#QNhq6Q;y}Y-21qHoFWPm{2&!90) zQAhCQ9443S#lxVN|5c+hTK}|+H$Kb%Jg<7CdH$e6fe~EXEc(jg{;HMISNQ}FJ<3~g zZ$GPS7*ELW+i~9+#oY$9PAccu_`UMxgcU z{hhp3QI1c_*OKgZHW2UCf|N+kT~^|Hj)oyJVOnWTzZKg13;O#)e%#9Ia(ba$?!pd? zOxw{mYwb~SMUH*f^#>y#F3beAJk6(;Jj>h?ZA#K1TAhgC@~GiDQKsi9*K|?H>#TfG z0uA?zzy3b<@P6si0+FtOmZ0{i=1?kTj@^Q_&&_~@n^=UY+7%^Os$+*qm$h-!l0r~Y zlqFte$d)Zhm5Qq}kY-cTH3bQgJ%n#1J&QGeRJJoq1kXUxnt+DPl8|IVevE)+iE~lN zEloYrIQ)bOQI>?pyEt*)5>zY@BoJAW`r5d9We0YWYO8J^2*HKE%U3kZ)NC_AXw+!w zB|Ie#|Jq36^?&6&HI>(386k${N>xZo+DMS}5%U7Xybv6zd*}5M*hh>yawo~*T^RMD z0p;`yqXCUj2E|wV0r{%>21N)8QI2m6-A+magf@S{QO3DW5KxqgRO5pnAt%)MfVivf zl3p9lVkCfSD5NfO;bSy6l;K=NAAp-`uXE>hk|$QFM5S#D${kYF44QgBG1aaICIpCB zWal7w_x+R+6gRT{zmy#BlsT}J%$az-lY{0Z=ofi6|J=AE6|h~9{ad1@s-Zo=jjf<3 zo}+ApejAG76oR;cAi*QQHUVEbb-v=O<5!>xtILuVG%i$9WF^th zHBdpIvhCy1Fkf1TFVcqzmY-KCI`9KoqVNU^I3TX?=1gRy)IY^3{i}j4!EzB+fBCZe zc*(su^*xEC;0ZPWUJ7w*h^!>S!qo#4-9g@>-3{8wkYf?+u%bq7w(y#lFi#@2_hXzC z!Z$Xu1tluZe5nJ*0Cu#!oFNe~)C{5<)X3ZCl0hQtFd6bNz+x0&F@kJn3_;BZEcF;d zn{gTzCQc3#=e1pcHehZ0Qh|;-MUdQE)M}_$^`wTO1|pnMtYE-}&Wi>}oP`S@-3N7m zHRklf+&XO@0Dr7C#Z@J$m#F2%EN?giVLc6OnK?5DtReG9e>8=XRGX5g=s}o9XF9<+ zZOa4#+TzLajKLPekkEsS-m|FRdGRDJNh54h4kbf544&sr=p&Ls2<`^gb^S z*LE{w6BX=Z<%nOOC``Ewu3ALk$nR5zshq4|oesrM@P05PE4b~6ab4q>cSTH`ZRn4zTc+ez27 z#W8}n)V$_Z^{(oRvFb&I7C)B%_VxRv#`z)MeMo$wLug%lfE4|5!Z$AUiPLh;HSd@s zvfwLs$jYragnT|VV8#p;%^QUkakgi&68KX7m<$3g zdI(8fv?h$RePe9r5RZ*iBWdCtyBk*nFq$k<)M;Hqqn|~IgQtKYEi2`+_EtWI9m?5B zVOWh6gXG&-aiA&`Oyt^>SfqgpfRbsY;>>f?Heic3h%Z*)(QbW)Axkj&0FewdWLD|O zIzURpv!v5c(HITn$u~bLU+HOCF5S%!Nuc==@lk;5W|{6sXCszGsiJ!~{!m(XBZ_4XQWyjfVMw4>EP|x|Zlwg+{@@YrD+9VYwZX-Q z!uE>bp}WPl9mc!-K_c1x;-NemLdg?CpBmwM-i|k@&5gFFvC4Q-BHHXo*+En22xnpt zh!d`U2q!=QbO=%G{Nq!~G zTYhacxLx(oF18(4%P)Nhm;+D-O}oA)&3lko!`KA&E(M4aCimSY4LiRpR_+f#KKSTU zcWtM(y#HRwH{2<05EPNUXaTnTD;BzUh#f6JVC#1{B!!~6DUwsv_Mlb{RNf*DP%us{ zc%xPrpupb;)OGK?nwkQ|5kR2_AQ;~LL&+SuTHKT-TA@y~QN)iOK0g?E3KQIS8A?Cx(#X4k(;>o%yLW7_KSJK){boJ2pBeqdiCudn4) zQI{@7bqcq02oB2j+$dI1M*0NATgi{vhN~od6z7@)I78Q3#NE1DeE4BmoX7u77JDF; zG8BKJ{G^;mD0D#%>Q;JbUveK)lmmvrP}mXyk^V&(Bo*V7iSuJhgOlQ*oSxQ4#Cnvp zppG9s-*bS^_JNVipmxrQsFfk@5H+!C=oDH!W97F?kRNH1`kN|A0+2D5>ru#W<}l<0lb7pBbjP<;;i_PiwWD2K`we$Q)3F8ag&l@4t6SK6wAMOaWBp05&6l zp9uzG%>aH1c8sv;76m`x9%A1#7Fi3YsMt^7mo)>-IsM5w)5fnooolqa^G{FlQpHfJ zMpHSoG0g{EO{2G-L3cgN^(>VSMPFLJH|_WoJ`@K{Q=pil3uk&PO93NE?E`rkNNxa* zr4JVZivl6bXh(xw)}5=8u56_YGLUAZqmF6FH8Rk_aq6g*nXU$z%r(k1^TxWn9MaRR z05J?a3h0nZE`|pqvgq_6{#jc~7{@{n08*(x`O#bQ)RB|2q8wTtcw?IP4S`~6&n6}p z9P*W2`O?%^$gFfis07c9O8QeMtTgrpi!x`xFSKwf7z!v~fI+ZUL)0i(OCW_YUUnrAjC9!z zI$7vc>DnZtu%^z!km$%M^?5%d1|(gn{heNl_FkgB8>z8QQH;)=Gcc)x3QB19G+r^Y z5}rE+BlC%L!nd?@ougAUO6O<-l$Hl5g=arBvTE%+(*C1@kEM2qt|<(8RA|(Oxy+Rg zTf{ zr8i(Cv*0^SV7W=2csDJNRjY)e|1-7!xK^5qKP$1;J4`WZv8t~hqMV{-l_#o3Ws7%I zN;*)oQAVjB_>@s+=Qu(@K{tjsw2mS^ag2P*5#}!SS1t}fF8M~MvCC%;jR8v>Jp-i- zBXgPZAbHyEdMm*i6=fcM z4T7FtgmPWj$oEiR?J0vN0!MYTvb2{!Y+lu;wUjOZ*=41|m9F^mgf z3tqLYF9T#?aRD+NtW%0~6cQ;L(@rafC4u73lEyY_aSAIcy`dc%W(*8(p0z(OF?LG* zMbfZ2dcQ>{$6Tf@=}Dz;XggQul7jYV70+IUmn6uEzQYcPo=)(Q(l>#YrzEJvPkZ$f z^3^_;@=iL0x^!pA6&sbi@vV|!xSW0vk{4zo06CU%uM!&t>g;*)#%PDR9W9~HlJ(aQ zGZ0j+0j-)!wdTiksY7!o1}tG%`2hGRM6DtMRx<9yf3Gzk zz7tgA+57`!;}lp3yg&sEHQ#HPZxWf!K;1r1}6erCw<&AZTMxA|=!+ zPW(n(1ak#hJ_2%rAnB)5%X{b!7$^>Uv4`X!0K=AbKPx^>2vnHylOUvC%2n_ci^BA! zsLjO@9>!Y;iU2DgCwmw!F3C^B&x|=c0W3cz%VW#yJ@sG9taQsBel;V9U5{+doQx|Q|2qfF<9{c=+|aUS}ebU9W_>w!BM z6!&9sfH|YQrw^7c%!Oer?n9Kuz>V3X*Gd|Mtw-61zlLs4 z8qna{@pC91I>^wML_ytM)V7-6;hX2&3Lm_VV+f^#d?ZtH12oOGKt1?Doo`Xxx&whA za3MwiSx5;zCnvxU{ft^oVa(uU`%)!zuI>CD<-KnKu4wUwFHx@u$1d8sz|lF~$LfEV zdVPPYMgg|V&3T$<8yaBh9LO{x$9^U5y&!b(ZoKqbX(@SB^1inv<$Fb{kK8N1s$0ZW z#}}gQRXc z7{j7J;>Epg%19gyC6~fzL0ZdK0Dd;`%`8VwLhFU&8S#)C;id8j9V{#kU05JRtoYg4 zUY0oCbqP2kOM)F<)D_$*{jq)09zJ3w)n(FE(us>vZ&!@~hN5M^4Q?N#phOe3eElneKoSLIJhKxh|l_w`Us7av|83rwl zq!22mkbl4%b@#Yr(NK3QoDoA;ITl0N8p)^208JI9B-f`?mb!A4a)r)Z8p7~(Bv&Wn z`9^7{fR)ZQNxt1FJzZWI81%pzG13*#G&~%mxHly~`&Oa#sra(%SDS5G4MyF6|=A)yXr ziMZAo*&)i9cA*AEMJPjMsGT;jPQa1YqJmQ>($66>TryPFuT+vByI0TnG?WrmFtCy0p$;e|rJBN2 z#$u;XoPed&J=KLmg`p6qsqQFG0xEx8JkrVlIQr(5kYcKRs^B@;>y`M-?U7lfu18lXA zjVrQqT+9eT^&Kg&O1d`%-l(Gn)d!`Yj;iORz4BS<15;$Go(2!S%Fox7gr1kn$6H^J zzFK^fSUS@DgyYo^E%nb!ACMvkH`E8}=weCe=G{6eG7Tb9P9G=7^1dQIGHXj3lIaR9 zKMj;q;31&o2`F8ZC3;!RI%{!b;$4*&>H{bB!$u8hA1a^U&O2t{h_Y}+?Yu6>>#}A` zc-LOr8u>}S`9h)W+!g3>w}Xp=+zk^u&J08dfZTJ`|zPEco_?r~iU{RNUIg)&4f7Y_JzTt>hv)hLD%wmC;r|ddl@uT?LqnKr=Z%-pGUH~(v&?? zcD_@-b4MBP!5P~_Z8LNf!f*fWGVG<}6li4SwQ(oc)M&!Mju6l-MM(7{oNYx2?6*B5 z0YYoVzFWmv0<3ZX%ntrL@CFSi-*@WR9nt}WNwP212l)Q^PQzp=b&T?hY~h>Pc$I0O z5AMEJtZ=Uh?`yzD_M2ni1^gk!jI}23| z&NmF&v6n8RA@F5sKE7PsELQ!2wPHJZr@s0D`G+*=mKy>oNhah5quHpJb$DMC2iUn8 z%$)bFl_18`EnsH{Kh9+6bqRZ3;!6jML9jOvN zk_^5rUd+EDzBf2Yw{ZVf$13b4cnWlR7Tx%yDUFa(z!nrF3%G z`f|*Y>~4}Avm~?KEt2c7@lH}!#pL7Q}TBMchL$o4lIX1=I)kw-EVlGcNONoo@h z5k%pw9l$eR4bx{RrS#5ur3!#R(NwVxJ@oQ?opP>V$)ZT*B<7$R69<^e^io8_u3(%bZ!jMFuo zWzmR&Py(9#Fdryb2kxMx)Z;?k4gsU1?>dyDhRR962z7&5a^Ba$6t75c>r1@ph^Oes1FjwNk#4ucRCWJ{qPdKSBgZHGb}DPpyQ za=N_hQT1UC-olXZHjKoZ)<~D_RY~JFp3wh6D5+LOFwbKf^^(MRuPl3JiSS@?$hsP= zv)0_}uZR6g<2n141V~A3J#x0y5J}I87i1S!&MEx5MBQs7#;B1nd)p2&ib5=;TUQcA zv6%!JMOh@1hyuF3Z?Nz_#nD+Qt#Dc~A4j1U%B>h(tTcBIELK!GB0_oU5HIWn4aJGO`HvW{D3IRl? zMLVL|)(uJ?T`e6Y)DskMAyr8pz$5_YeGmV;p=+Yl8a!IUBV>iaFu@(ak}fROyoc|k zo1K8d7TI=PPudH3`%A~WKc_@^2XvCQ-QOT?)YwtX-K!7WNw|5OY7s(Int{6Oe{ZTV zbs#4XBuii?Q?@`8?Nq|L2q2zKkR@Aw1DbivAjp0KUCmZ>Cm@0j8dcnAR-E8BFI(B) zvO>HZn}$tSBX2@ZdU@k+@D&+-h|rVw65yZ*LXdiXY9Sfli{Kosv*|nYZTZ$S&tyH{ z@>&8URhzPh*_XCwj(;%p3xb1n2G?!7$x?KhxYorzgeuTPkJ;BjM;Eiy^!uu(U z5)_?#P`vnG5(nR5GnKiz%4K3DQ1`_Ml%SWgw?QBWee@oZ~VD@BLx-J14U7ba?M2sljJ+JgCp&fI&IXslIUOUB{&42$n}AjTla#QsXPU0 zpoCEK41g(nw_YoCP;cqB$K=?iUoz2j8CvIZgmC z`1Pr$tiR+gkTR-osJJBRp~$YQrD@;Y6sP%xkq^}KjigF%GPG2({61)->y0+oy8R{y z!=)0~%NYx$IUIVP>LR;(gKaC6;lZ0^0D#c~FbcAV4$xs0Cw?2SWjwK7>i19?Ro4qe zdsPrPfDaqTKSb3&0@>5yepwv+l45YX`rA`Le5NJRR_Vju?EY!(eug&UjckWqxfT8W#2 zOPZmd=p=N~8Ksj{&RpDs3&P+WG!Ar*T4vK-G$UV{ISaAG@R}*Er@0;j4GjRA@|e#J z0di(PJu5>HP*Y$hoyVpo*fXG^$y1P1Afg%2(8S3pC@a8F(FEkl*xZ;{Cc$LI6F3fy zQ4t)S?nVsN1r-MC^);;-j*O>~OogSd*C&HWsQM8Rb@qZ|dfKEnUylWN1D>#zjDk2J z31)3~AiL`Bsh32uRN~oEN$1NYn>{X>OsRBaD!@xs66Z)|kY!~MC8fJ;lJ2RK?$I{s z=!!`$ACZ6kpUW5v_AOcP$G?#W*MwwcwVDrf74XoXt6{cUZuwj{)Y!-!543oKmW#4@`W#4C*SzS3(}T>u<6H7Xk^-uHrbCpmGp-n)BYn8pg&kkUl+^FOsw_a$XjAd1ejMP~N( zV*AjCVjDbbq|>%R1~gz$)RsLhx7>9Ei1Tgv#t&AC6)0p;EVQ`sJW*6aG0gy>TX$Xn zLMz@%d=62RH$X@=MVDw3mv$eopyg}L@>0grK73qlS&p%!J zM~Zy(LXVs&k6qDTM>*T|8g+n|;Crz{u`#f!?KSCl0voDP-BhoU5zl7ngAh>xatF8| z#$wwAYnzYkVId^!+g_7y=Zj{ULA>)cMY$6zWsD!Grxr*Rd{^baFQ8~fV?2QNCQlOH z&GKRCAzQsX!h)3{_-RwFx=Ks~ddA4EV!)){$R?KRr&)y5Mwu=3zhS~rd+;r?q79Pr zyurJ$5)^ep0uA~%0G?R)?o2xs%DiBvFDC6ubrC|87Rmy0)QjKCUx4??#ov_xpefEgt_a(jc0eOR{j|FPKo|iAXbX;W1hNcv z$$Q@i7A=2>gMqAXdXQ{LuhPh8|VPR!)Cfucv z{%YrH29atG8bpblFeFWq6kcIZ5CTa1f`ZTjZ3=<7uNi_T*F=j6^obwP;o9_5$!Vny z|0g@NfX*!qLqP>fZWAW~y#vu{3s5IU_)_Cr55cN~$2y?PRI6pF-+jG&J&!Uf2r1y( zb}e)fq7z_%m(fLS9N88mI8kz38^GJY=Vq~OzE--e=uM%c%8=B$t1)*1B8B+0zLu5J zg^0ucE|s*+)JK>g?S{zfpq^E>^#*D}KcmbG1l&pma3{hW;EvAo3zXg^tsJ2QB9H*p zo%&sF#Z-8&ugi)Y#jCw_v|6M{QP&oiUxjKsGECbML zhRTZBpO$`5Py&$NviA<@cdrv)dXpRm_%xu$*5@YJ3I%O8ph|>_ipTkaxE;?+6U3$! zXj^jx`HT)_A}}A_NHq|~Bt!7)qnFqI7Bx%9Dro}j9fd*h5%}XAMc>;$6ECo#A1bn$ zbfi%MI(zO#O=jKvLvbP>(yCAMF@Rz#l`FQP3}~b3??~f)QbzePzvUX~-1=*&#h|9uHG6N9nZ)aCE3;3ic?Rga zN+XF%LE~BX0a}kOmrl;*ru|gAfKDzTvfAWYxBUvH<0)Quhj(P6q?bv-%Sq3)~cvD!Sz1l`f zrIS|Oq-G8LcH+?086a(l%Cs6mskNcA-My1JWJh2h3?)zMs-7<<4;16VgcO ztUdCoctFG_4&NgIP6{W_IeM5j$K*z-XJbR*x1_BM6lCl`3xG`#UBeZKxGYDi7JT){kC<9adGK8pT7}PT~*CYLu z`1&W?rFT3lePe0q9Zm6teb*aE?y$R z$U#bDRd76YP-e#^*;y%xe1#-HiCK7|JlH3jf=&bfWP4jBPT?_zIy>20C!J$$d`4b& z@7pCy7O7vz59BYt^^&}DcupRv?4n2p2ccAusht6Wm=#jmj|tY8tYUuPEw8%dPp*1i z7W~&+<%%CXFU!`2=s=km;L8kWmkPf0;pTOXl}H>DuJvza`G&$ASi&SljZ4^ zMgU`I822bOC=iDdLl;00B!)pA5JF1oxT$36a9Jgh^f{)Ni)UOwLRZck4eKacMMa8d zl-N)DiC%r|6{B6kMQtM2{5;{&op=cB8Siz?xlamW3o12~e=_YOdM zxTH(oYR*do5+f&^mX^!@02`euV58d;Adji&CgQ=HB*GwurgaSQ+{h}wp6E(3sqQ5i z#lAqLIPJu-1S?2}6(r=^2~S%pDfdQ6INt$Pyas1Y)PN32HLWIIy+hjcHfi%KlJ)W& zgp%#e;1^!s*SwZ!LK7JahWbFZSAj0*v1o@j>4pNzgP%?z>K-YB+irWEdC~mrn_i;8 z^(xqnv2w(zd~%O;rT4)X@01jSs|UI6@o%AMwN6GNTO}2EP2#ZIQ4mYW_Pq2Hu|lMR zQ7~UeWTRxlTPapBh7{xyARSBx-jD#vY>sO`l+bu?yCe~HYHF!NPa{xIex;r=JBe;2 z;SgOZ2!j}DWZZ_$USJ*j@Pv3s=MoeN6uBiih6(F)GE6#WL*A52?*R3@Op$@K4wUDt zMhN8!ye?nuVJQv5@JC2gL(oD2wzdv(A%m(ZObIeliiDG+-%>)_9$YUTVzIi8*=eA* zA${#`W?3d)RFP`ODdD7JTcovdH7c9mNUv*^1aZ7dp)yI*x#WN_@e#MTEobZ_Il8lICi7Mp=g)F$Eihyx7OuS zM=?w1kF-NkwQj@+1QKB|_9nuy)p86Hs)1-U=y^&S(2u0(_6_p7b_C202%`#W9>+k8 z*^d3<^t=h#^g9RyuuMJ5^XfaKlERLSf|p}2Zp}w;2X&!o2Ua(|bAz;Q#?wCXw%9-&R)`Q)q2>E-Xqn!?nFHOv_x7gqU500 z`hvuv3-#JVVXQ0s4(cNA^S#4)_$t!Zt&()TLF2#^5>mYh$R`(ECk?bCMO;vUe1ke4 ztM(8`7If~9zau*j(qRHUpaSnSMb9MLU$Tz^r*E}X>iteI83k86)M5>F6f3HdD0P2NrUv!xU_6U42{8>er_FPjTKziKvA%R&iICH zKNSbIrS+xMa2j8rDf&ri;256RaUJvrh1!M(q@3?#b!_JilH!5d`Uk}6eo7qs5cg~b zc2IV7a!gJTNw&*5a4Qjz$6dSvM{yP4!FGL z!^;p&-6yUZB0dMT0rhx0?F&vi!5ViVGUCVOpbTY)mE&ULU2g% zLzSEq8Mj5epbjTOr-T)lMRnCi<ndg}c{^gP(a4{!mk_026XD zyrzwP_xs+GX2eGA=&_wFj4jsJB^KE&q4W`PNA^k}dO)IJr8o>oFn(Bq*r(+{2kCsB zB-?AK3N=a^1d-@MM)Kns z893Q38LXgFl#m8cCJmp0z=6maLDt=OdPq8FdZi0x_uxm<()r$~Wa)0pLNaxJFd@UA zoaTOtY~82E!%;)7Y~W9m&m&}tmGHNxneZV0K4QGgj5sGgZ_>B8=_ zgECnTkdz%sN)CZ}W(blijj*UF+vk&Hmy5zrcN@CU0lOsoA$cH*ay?dxU^Nm;94EUd zm0Z77qRDazMoY=1yX)mk>3p>$aupJfm9m-~lUPTiWWkbd{N@5(%@Xf#k@T=#;+byw z)%CX!tTDj7bgA6DIw)&P&d9@6?XtWw_Zg`4eef#D5 zmz{FQrno$@rAwBsYD47B1Xtc}?cO?Z_u=C?UH~B~@=?&@Q7JVZD_T42<~}cvD^#MV z>U^uaVT+8lw1Fmzbo!WwXGE#Q#ZR3xK*>9aFo_qaWX4cNra|p;*RU4Mn6C_*q%)aS zDWpRe9K(u|P8qzG2cM}WTLQ$See%9ZraYW~9Hs@MAuZ!+iK#I9Q=PJD9;b5VfOS$= z8~eaHvGoIw#@?5Pc4jwwhQ*pVDOX+n7Q6l(`QfiE(h~gGz@zHe*oDg3iQqInY-i=S zH=b7({mISp$Xlt;A&fedFuGJlMXKo1UO-i6>s$r{l@=}Ii+HGfL>?>~1tzJ15Qf(b z_}t(akh&50Fzu%+vT=ayY&d&0uPM4vIa?j(_udQ5)0I9Xe)|S^Tg_6)MF?1tMruxu zcL?g+j0iAge}#0Do{8{Ie($ByWZeoyvQJXsy^>~aQF(cAp#8j*eq|-E`Lj2^K;D=Et1pqCbiCvQCI*h()iudWPfW~q2*`dAC zlRhdrKFeFjWOfgJzdg0|8PrGznLwJ1V6>wgaI%NAeZBNVcS<(1)nr^gGA}>rVt4ya z@j6)hyl+V+xkFN^ed2TyY`7f^yd&Y@+wjvHS>M~NxWK<&HaD1b4c0T+-Og=9%n;8T5gjOQl)u^qfyiIRGjFlxtBn5Z77@DQ#XO$2bq% z@f}hF5KfT#*YBfw*-l1I4XLT|Aqb~Osr1|moj@-%V4#)SL&MHHs2AQP;nY^KbNrj2 zAxr5zb5ZR}TOX2|o!3k4E(j=U5|uzm6;KBd(0iz9Rvo@uDh@o16rSwdx=un^b9(H= z8@^+Q-UmQWhdECG;nCPG6F+nDo#wc@0rLu^oW#Op>VQ}ZbY`r3RiNe%F~5!%B~OmwkNHPm`4AhbN8SEYpN-lpxC zbtm7FdSZJc^|W~SRjDR+?%si+j^jm+=ZjJbPH95=(nh_<3SHU^by-d!%7akf%cQ7Q z>Zd18@LjtRrLgZU)T6bo*G9!UOa-hO8mI*)b_d@_wc{yi1OIpq+)c&vcT!KcR)j>L z7Fy{jwAkthV55vL-%3+e04=eWc}tISBBGkH!wlOfq1xdeTXtN_D2oTA@%Rd{!u=eB zhw)%r)5uOG{OhC+zO(uG-5h-QDzdA3`ZFs~G)FigDv&Y-Y3lUQYEeyb*iAty1aFka z=I$V%%L;O>alI|I?hVpLnbuJOLkN0rV~%gdaSH3%-O@<5=JfD`gn~K7PSjFBO9Wq) zW_Ynyw$sawyWoDCk&*?GeYM!uN~`@PskFW(j?fNi^K6hxc;95?HN*8)!X^3H_h5Ll zG*U+Oz$!Z7qiy_98$iugPKYqPwwuMJvicdm%ykl^c;3chaDr`Wf%5VAHb}MgRSBmL zh%a?e8r_?u4DKqB*ezv8_+rRN>mBRG9osHWGD$x}#+v|zQJB)k27nm=E}1VUz&xH}XgA$S#8BKHOkVJbL#GNV^A2dq@ zpyWYwzo^w9*C*bIIK+9sUe)o6kI`MrI1`(QhdOo7@roONK0ZY#pcD?v;@~N2@ixN zh`+lf+~bwM40W|hm>mfXxx@$13Fe#F@m7f3((X}3!brfvTboBWqA|4+jEHS)E8Tq{o>otEd1 zpOj@4Sy^6u6hrk#j*rOW<)d=P&a~XJB_Y4v7?pb{5#6-LBMUCO ziMRWa-1Y1hadmwF2+~nfic1uefItQj3yqx>ZCFd5Jg16h>OmU7cWU{nScAG_1m0-^ ztOF}#@#&zxB&?LhL8ErfsDk_{}I>k zOLcOP2_MV{Nu7~@{x&4rf^W$$Z+czq5s^y7M-_~$Y7F-?31mQy2d1Si^?}@QEyDE$ z-)9WuZSv%%ygXW^BBTD#h>QxgwMWW&X(KG7r9ds3w1b~se#V;{K8Y_xCthjG+Ggwl zYS^X%Br@tOV?ChMnqk9?tmwDyW|EWeHVI{piZ^~hTHTu^l0M9D5`Y7cvA4bp4S7P` zfFeJPk<+zZQh<>lr&mqOZt(;FEW!O?@7+{OkYL0P0h|s#?aq8y>o#r~j>EA_y6!0C8aA*%@<%8l+?vwyYm)%EDz(Oq7eNe(jl=q~pCpfm&MqV0#o!E7KuLC_o8EbY7|4tQ!t#_gn{m>sMYFGYN- zZ#O0FYH@nEi_P}7ghD&T2ixssow7&wh&##tC-(7q+c-mQugGdo`k_KJSYN?}E z*`C`8Q}m2foj|LJoX7@;&;l0{L5dIo9%?$=TK5#3#H+wA;06^tum2UP0z$as8>N9& zw+&~2dKjfhYJ(gn^*w%&@fM-CC6d@6M+oOlKp!8%;Cj;h8dB+?GFznPRrCZ^9s?4v z&5iJ54#M;?;F<$5k)IG;MMbcNsA&f_Iy`U5fg|umo>!$6I95)i@c>twC^UEp<;UPz z8Y4u6+(BuI?vOn-@G9_fUf@L&aHfv*y$V6IGxVC&vab%++4|Q5Bc5cRo|LA_r^OHd zR7o_c1WuO0%_%SAW}mB$%<2CSWXq# zP8Fz%$XFL7UEr71%rERKKEALZ4>nY;APhbsEr~5s0@iIK3|3dbtMCF(;BBb}M^_N4 z8zUQdgEwUtShN+r0bknAuE7&QEEwoWAO?;K# zv?C;UBZWCq|0*xtA=L=}oQTJ*Eze6SZRAR`xM(=20G>6&P*wrST63Gk3)SJGnpDO| z*hv!_`G_jMXB)?@hU%?W^jfH%*|@LPPK}fAqLsA6ftaWjy|6Y6gefky!525Pdq+ui z>PUHlNscqM)E0PF2eKUH3vKYxRcuFt%7M7Q0SIQL*}xxUS5>wH&+MiOsZzc}RnJIk zkiDz$ZIyrXP@`<+Olt!e+5wxDt*?kbvsdg%uu*U`-^_Zc1avn*4h1;d>)1mZd+&jR zZQ-o5vIT+o2CxL*qW>MSXOFU69}+8PVimZ{9ex`zmqlt2B?i;r5B%&KSPxtIt$V;W z&75tm7zNuy9I?a>=Bx9Cfp=oymtbPQw83cCw62$C)&v_E=5WIs;zH7r7_*T@?~+>9 z9v^E^z4a|=VZEyg>=1i<3FO!wwsQ;k?qya4u1OA?NHjgHxxVZPspl-M^K4~J<4gqq z*u$(@k;CHZt`%z<97JiUj?z*Kq238m)Rd|aFY@8mY%QSxHS!nqRzub*ZQTxW^tq+A z%PuXQHgntJVmk9;H-5mLAwM`Ngb*e`NTU`so{%=K?cgN;Z~}Og!mJ zC*3@K-`(Qk+BwxBP6}l1*=`8}k^DfU;AFRirg|jIb#%H{LKxu3X8LH4&PkMFUIb_r zhA#>tt@e#(G|H#tZ@n-@zR{%k$C8MIe_v<+Ny!3-f|SVAme>X)a?n8T zhoI3$GQ~LxeReD6C~`x`=mZ(l8n(!%O6k!_^hjDLE5Iu)p4tCDy52jm&gx3{K9Veq zaU39lFeD!-lbK{PGxtuC?`D$BBtu9KVIT>CP?G=&y_qrrQr{!Va>GrQyDh7i)6Y@w zlGQA^NOF^_Y`Mq<7r?XtS@-wsqa#CR?jO?G?|yq(&w5tbYahWagp0_Ls5Frqg~q&o zoJ$!B>nWr+NDfoSG2)HIav?lJm zXM5OMIZE?jg|%XCHImENITD4$R9WYiLWo7NC3KdM$qI!!ylw?=;J84BD&C{=_oP!HW{U2IK|;>0GD3tq1P9-L;9 zsX9s8sv{&=4b^IZyf$wwwFpGHXIGhd30z}WH{fTi?gzpLmRqC)Ul=~T229s-2uE<^ zYKx(;#|l3YR7xo zxPiOIJL@&_VS5!kuYYRXS!p#~QY-wtmM7c@BktO^)+z?7EVeyibv(#sK9zbNY65>m zBcDXij#5sYXN^42IIq8cA3}&7(1raG<26^~s2tgude9gR5A;skH1w-!-j~1@5l}{)> zTxzvEf!47)i=h2O{VOR$3vZSUfh`f+m~YL*)?2V>YPgF8c0ku?kcSGq?5wcHeF>}H z8R8rvj>YxxkZbu^>iBSa4kMaaY1P|RtKHvdjfYw-fm1`ruiFQ(jkZ}M z$;B;XQP<(rXhrMS?`^RLG=KH}POFC%G{6pON4q%p2CGBEH$Zdh4|SVYkDB+|4)t0_ zJvlqg;A?{6{53}z?%u@M^ba>5*cwv_58L#d)gp84gA&7ZaBHqnivDte0-O+ z;TP&Wwbxo9H0{TBS;zPYrE7NZy9?^Hjcg9WOdZE}QX>Z5)OKu}WwpX?2wn_RL}tjm zW}H4=6JfE-TR3++r)+0PSsP5JiG=Vvlt2s2r2QDb2VpwQ-q3bpi`8*|oudQRaiE{m z^uy3LSt|^#g?se+xSJW`O5#jS$2VE?iOm4+VJ08lZkK+Tw4sb^?V`^-YJV&^YX22I zVNV5<#fE1_4kgp4snj@TkeM-?abL-Z-LkCTZl>1rP5j=QKWx9u8?>oc--81Gj(y?U z$E~&tGBf(BkwasBr}5Vi(!!@gx$I6HBO8vrk>U^V7>Ef~Ek$NDC7vQ!a{LUweBL%O z5z($U-?pJwUUN|`6;>4C(RKvE6tH4{$3&*5vWe8=+K`-%ak8ix4X>!zrgLwxA5k&- zCs~dQ8)a&Cy!iGLj^=DQs?E4WXwC(SbCt?Bs`gObj+d<$V$r;t>0kRtt(FK^sN;xT z{c%lp@eO<6S^OPa{$k<&V-{f^qK3_fk?bR=p0k!1dfl%5H%&(P4a@lCgZ8_XOnVz8 z3H^U?@5~gnnF-0saxHm#GG{_^o`mGA+eFe4*PtvY1sfqbIIJAMNpdot0A8Kf?8?^R zxNY3uVnMilf^VS#o?i>!@1=ZI-<~G!qLa7O2NJef^+*%w*J90wkPjGe;{n(*^4Tnf zfOD`N`KsqzitKJNuMW@R)aJddNN7EKHe1u^25TJawB{q6LDDZwoB#u4kV3}UO^@?e3VxK)YJ)PwkEBk$Ud4o`Hk4oU_&f z)Zl0omBC99;aCBV>2(8vX*FyW9F9i_Ibm28SbaS;lhzJj)*2>@(#oSl|6;eZvqZj3BK37LijC1OiA|o-kHj2W~ zAN$_&3cwsS$ zjYN4O)x5a2F+OM>OccdZ&4->~aB`H_6&k6tAXgdP-)vRdY)2q-~HJm!Qua3H4)fVRFg1k9NLJM!XmQSMs8e9+AYS>!?x}!L+40GVv zu12dMSD}m(MX*cD`K{x|>UVKOerx$H-`{WRws%-9T04TKO^7=24ud<;;*6?J@D0Uz zyfKbmy`O7}z^=a(L$^oKsbOwWFE-BLnjnuhx-ZJt5#c)PEP#%UurA1#R>yT$^VQaH z?UC(J`9rmwDP%G9bR4g17~L8m=`k6lMiiYMz`Up;I1xgBS0L3Po>PqTCb;V; zHx%U+CwSFfgo9olgq|kI=?L)hV*E;)gL;`TgetBq!bcJt)iR$e*&-DnUH}ZJ0_B3B zTn%rkjx%~OcJKmV-RA`n)d+q4!4@7|4dTl;!39)t!HJ_C76gW>fT09dRFs$9C`bWB zi`b`x@2sA1QV9F7f$yr0V+8qTVjMUM9EE|SYQD(`A44Nx)4;b?hea3Xp@uka^k_E^ zxZR=vO&kD@0(&(8b_`gJ0hM)!H?l3zI@ZUv3|NfiDD4Ok8iNePsn!_B<>AFhoxUiF z!=er#s%K4%vej|+sDcs%pbS|FxP%vl!(`Tu4_e*vA&WygVsMTq1SEc9JLnEM@#@ES zVxz-b>W*x;+QY-}p6yl-TWJ8K8{j;R_+=VTu#8KFt%r~WS{Yj12(hVSbuF8DHTtI= zym}l)X>oQ*5Z-cIr!~TE8n_rQ&c&oP9ou2eoY$*ngG*~pY_;m+5HGfAbaKAOHKG6B8vVc-L9$r+Q5{?hVz{X+8ET zHGa;+sNSH?&RY|)rq`3s7-nF2gFJVLi^gy7{xdZf-+IUWio9&5IN|_4omAi`Ire=* zTdS-ODx3Hg1LjXaJy6}6UXhT^E0!r2&5pMeAyd>#&Kpf{&stYJM_NC#_26r6&cvqu z8Z?&VFI@!ETq*pj z$3h#K+MYQSy~fQ<{TqP2gxK;+UtrQLf>YD}{xQp5fBgT&Ua}ODa>1!AQJBo9g8LZ@ zf51wIPFo|%I=v^(P(gs$ontRa;=+A6$ING2_jln2>$8f(Tlrvz`GB`t_z=t$599_0 z6E^TE)*fWU7*W~?eQ`c;i9`aisY3*s#?aB@pe4M%4!#l^-(mrXeE4Xm#g2C)lAV0c zz2FgT#3*)rz(Pn(0->qqx1JDd!=VAZgj;ZJUM60yP~ZB{Z)k=$6ITTTk8x#DiQu7OgqrOzBx+&xUL4xxMY*plgNL?Q zX9UiS;n<%qZuo;-Q!JKo^qsacTJ_rnlhjP@g zPV`5o3~+N^38X)>dTa|I$Stu&GbT@flb0Rf-0}UJ?SEB)5+U}F9N+=%9{|j|tpww! zl3NR~d&|Bp)-b~HId+s669qvkSYI)M`Ef_*&fs(l=H|3;v=%R+>)MwWyMaC>+Qf*~?w-?nZ%bfS0se z2u&{}UW=M30D&vGgJMj^>YWf;;@@5vj+aq-xY0_+8hCAdjJxQK@9DD3>$v-xeI2$6 z^0}IQgPbD*!>Et~;wq!4wK&Hu;R4H{jsZw=5PGd^38OJ0kkKGC6P?py|5C{wWjv!Q zsA&+_bof{g&z-$^w|d7Fe82&iaRJv*jQLiXt!UeLQJ<7z7Q^1Hi(=S&~Z zHoz09;%@7?>xMl&wgNr2_DHL(;&1t(CTrUcDc`Ag%DHfbS0Oy5TxBW3Q6hcC)2!Ol z0q5#se+V$YL7sGwI|y?J)!bc#lnO7x!9Q2b8H+e`32%5EM+~th&K9D`LD<&1(Os6m za|`c>`-ckE9Bbq4*V+2LomR+IR`VVsBONd}eMz0R?r^KE;QfgX1Yu?&?xvFW7C=*$ z^UN#JuKFSh*uRJ?t>CLI(^tE4ZyIJx98QcSwqSdm8UBr_QQQ_0urNHfnImtpAe12lEl3ass)jjuQSpy3J()3> zMjY-@jjJVbWElKrnO`pfeMqYzsiqp9t=p3opv3fuB^vQzEB!Sd^@4uZ9gX#CB@XRzc1l!5IXf8LEtZ-jqa8;~8xEQ3oiABH-jsbxj%H}OJT!O=@aAx6$8wyPrhfDoj_D&L z*qpGqD)|hI;deZ5OG^4}%CsNi>H3b%<0-ZDzwNvML({Nn%z^{wtYpJ+`-i`y z8~{A$iqAi1b4pL!<6#ZddT$a=veJ)erRT&Ws?AZ%*K;6wq^#KP0wNV3|Ro92`gV zPe>SIlS-6{SB|>6G@*+|s|Gk=m@P`AE7AHv^h5|IB?cw4RC@|bE2KBrQHWax{(E7_ zMOpwY5Cn(4Do*qTS%YD=uYgg7*scU^UPS=EjANFIouMm2^i`r`g3>o6PgTG=q&XaR zvwtNTB#3Sbpihg@5GCwW&UJ_(RB%cir;59XLbZ!0g^7uv6_oHW;vdjLe5vrF}yM^Bwcq~HlZ;+sm@EpOpE1Q zLtnTxY$2wrYnFB^;+SjDnWf`;KadKqlB@b~F}GaGp`~_VDuawK= z_#Jkoo~NE+Avd9O>Bfq9E;>vZ&s@(z&!bAumG4T=x757{cp8T-k#RPu^y@J`%4S`IuhD=UOUSqj$uuRk3p=JEq8oj#$ivl<;{K z@npRU_R6f}BM2cR#fW1m!c>Y7RPyWT+OMocEXyD<<;bzxdY?M2p1$5-h1#4?msP=y z21HFD+7jRp0Fn9?0SSN$4sW0{4n4epaG*+{!lAQ-R2lkc1cO>ouNMHW(gZUh!K9Ea zEl4X2Ucy|qSXLBBou&<9AfGT+C>;UCqfnYSzK1gry66NR+I#8VP~BhD3O_uz?rR?A5H`T4x$>Hmhp{HcBU+LiYE*cp4e{0J8R9{Ww~0C}ls zPdCMd8-jk-OqAwRsLMwfhW=#anBBRCG-0L=y?t2^vwRQO9gF+z*ASpDe{&JX{Gol| z@|$e=nmx{K(Q$w&AfO8^$4*E-e} zxg90Ybe?#{s`nnTNH4yY?$cI1bdaIu`>lQG&-RCf_3lw*Wc<{YRc<0X?VMGULsPr? zxK+b(;+qazV&i!$tQ)gWTzQve5MlbrH)q+Og6Hf}Qeqx?A9ryH#Q12&CK!u`US&QR z+-pyT_gfhOu38w2hTJQADCt9LJ@!^I!sL83UX<_7>2&9|OD>9&WQnABad@yV#@FJH zvUox5tKU;UTd-M7-azMfgb5%96SCk*rL)CW^Q+}c=v>Y_C|`@?8ERx{Wrh}0-TK9` zxmo*dF`ru5lEQ3>V^$b?;e}Y_ANpE-PK761TH#aQTnRk-n}2F$h;fA3K`L4Z;}6pC z1zZcT@u|;k=~}ts1L;!fRl*jjG6!vfORoyV^9l9+0v*Q~JShiHTEde$Nw!>{^w7j2 zAn)k_ejUmuotoUOidLGSTW$tVnC=deB|J_m=lqjhx$4RhbfQ_cEo#QKa!NUFmV;`w zJi$F@=r+Ih@QSsuTOswy9{iiw&b72wD@ycFN6FIRvs_=f&f!{4Z@E*Jx;`CLn#yU1 zH1(CB&$6T<*q?vuau?+m-GKpe_R{4g??B2jxx(FK@;q9r%j4!z>N-P!hF{Ol=N_ti z4V9e7J%QP}Sf8%sJ?GK6)3ieUIpw^qEHNA|7)l|fkygn+F$hmO(W~U2U&_OmT%?sz z!8al8qjeQ-OZSnWO+2ZREcc1I4^V2uFPfR9FV5$_OeqY%TD~w|OMe*J>x-ZxoTBg| zNij+34Xt21w>X5*f&W=Dg|pSlmaE;9*6>`**|1Uz_~2pg0)92p5?G?ufIpH)3S;7I zugyr1s}Mi76MxhoDrp-|RMZiwsq)Y$%j5R_>;FUwMkB~db%2li_mIuRUVSKZ)HJE|tt$rYrzApp_pF3{-P~)#JO5zRCPVpsYr%s(y&GD6uS6>0|i>R=;MK zY{2H)bnbP0@bB1OfPeQ}Ogf}Cg+d0;z2=IE^qe5Sk`pY|ZfPAy7`=P^&tM+oJuoek z>zrxnY|>1pZjPKMZ&f2yRQVq}cKl_A7UG!C=sEQ!mh{WEas1CXFR`zq1IKZ|9(alB zv*-fOpqg*}ROsJyjFSlTuTnZ@e1r+2yFmYqZ;)}bhdhCO)-m*s-TTy9p2$sh<%b@z ziq_p$2in&$WTd8_`u$kKQRX_TXP^AC?e^h|ZnBH;-~a8cEA08uS%>&S{-drCo9xug zC&QFo!zL}+$tkHSqMT4AQn+a+y%t@P=E8OepDkR@5lp)lSPzPCxpxqLV6)Y!!MRRSGL1E!J}VL=#x{^ll_2b zAk7k3d1yhsPQ(n^^n{Li4x&ow18~3(K?jm6YeN_WAzdhJ$QBajsI^pmKoWSP9UKOv zCs}uLryRF|I5%jz!Llb$ny!Sg0*A!EA|onq)hI5YBQAE=jd>b@`p7Uy$lJ ze9SLl_FWL`xExGQtPy4}ab}~$8h_K#omO*ZC+u$+PZbRF)F5HJGq!5u7W=>le?TPd zYj)ND`jagvdBaUPt^q~fGvR#<#O8Z)rKKk&`eDl1JV;8AB>I-+pwKS}t6g>*iO%;G z?6jNirmpgoTL6md?72U*5Y#`5GZ{aTBmr5i-wt!xGD zq?mhvu}%7zvSds6WE$j5w)|>ktIvCXpWDv$`NKF*vgIxEMffChMAH0f@m=C0LA?EH zup~drfGv;{cd6XDY5Lw}R4-7&=RCZkJ@Z9?e9mdDR+?Il6IEg4Ifj#^7FssxZdjy- zU!*5nhI3Xqj%%NcU_`XT@+5}YCAcxNOO@OsxlXt~EzZ@76>9m)w1?K_Xf1@rk&_Oa zb>VnwxueW?8<)wDm#EJX8^{)b_$2FDldV}3!~k~SL|=D{H8^p%xlaDyFX5PgJT;yb zW+Hr3#-J1RNhx=-oh5nqOWt|Zyd1T%oaD=rgFtVG;nMOseeU`s>Q0w?@iPN9LwY=M zd>@(`M;#2I;rvd-d^6wuoA%2bm16ihf8Vh0KTu<{%U?q&OF18!n4I}B1m20cC&iui z2r_6|kG*UrcZtMTBdmpGE4eAw(4V|?fCJmIjYu6bhCZ9l@mQzkoX z+C?SQO=BeS9%ou*e)mYqu{aNl7rae&{COLo+F2*d8;-m|+T1A%4vt#1_nbv~&LZW5 zSW>a}v-Z#b{xDDFd-mP$k+eH}#^Sw)v9i(K)1sT?l0IUsTg`qsvyiR6V;4`o(SDS* z!JZ48!p+P`2HwSc759Xc%QUNJc!jFTx~lN*p(UNkJUOSh=gHlf6G8)Hscg2~$<|zb zcTT(b)yfggoTJZkr9RY!Vzt;RGFWh^%)ej*l%rAUbFQZil9x_fBGL0o39M$9Av9@n zBbMONLcrQAU0tO(7fT3y}YFY6pV3%{O<&xx;E*=o7yRF0fFh_38Pq&ZCwIE*PeE8<+-7^`aVput<$a<+2p zgiK!uG~O79`K0*1N08$uwf6KTn-Mv(7x5i+NFfo9zqG~bU)fGJ-mCVBuSnd!YahDu zZkxIKko~FZoc$`Y-+mp%(UKe!OjW-N;``BusV#S3={~z<=@yb+hV1U8z4lAA^iT6Q z;&~ag`Z`mS~Ig{UN zu38KA{pRbNUZAf#O``1ty@IcPo|bYPlU8WgFY$&fci19{w_gEhUon{rxs&qkeA>%x>lM+LrbYEb?%MzZ zx*WW?R*qJ@DCx%D?;t|w6g#}#sp+Ilm!)Jn*U7Y$bGDT8tjSfpk0m5B3khH-`oaR-PyX(zUYXZ1p9rYg%dYu*$gh;-?_O5@auWWWP<1kik}c zns^wdK*t;VZP8jR{SQ#2-1mL^>U9h3zbcPYl6>6mWenkcF=)2NvUyKoOixHL-_F&N z;(JT>+AVqbNs;0^mvkqkctyY6x@wa>k_Dgm8>QcW%f5cyEUVx71{DQPlC*pVvl!p# zJ~UMS0XQs@u<0NPmt)RUmGnu9CCzGIAluWGced?~zt}$Fy;8*zV8woSzxl51qUxur zOtl|A{eA(?RCd3Va>IT+m?Ot0;UQ^6>on6Oy`31*De09qZbz%jfvS07dSI^2`_QKG z%~0alrXzMu_3o1Z&+9gD!mOx$A2YCg*|L|n7zPF7MBV_L4r37?V%*CqtKM`5fjn$Y zJ5Jl2a95+`<9%4vm>#j_SM4)jc+d&%hyL~fdyTo5A*eD29yBi?Q&=re ztsJ#5|M*6#a5`oO5Zj~!NlX%T+eb(N*;T(^jU4A<(#knvop9k^8Js99XMd`-P^~oC zq!pslYAkTdPK?)ym?vR#q%@sMN_J2jdB}3q%2wpWCz*voPv~LNOeLzQ z*Xa>NH8i%D00(jHm&oBew%s~kJ!C(*Z7~)x!3`z__|<=P*s~F`9;+a8zm}*zifnpM zSH4%_W{NNWqHx4+Md2nzwFgnfy#MLS0lV~x`NMY6rAtp0YdRBs}0WN$0lAJ&?rD;bbsLb1> zxtcnUFg6(Z7C&AfDfDT{@$gJ7I^K-VZ5}&vdrWFwY)hECim7C_Vjs65 zv8iIey+mLVL&uO_Pr#f>OYJ_+_}Eu$ZRtUq zcKHpwp6}RaugkILHEfBwu3Q?%1)MVLru-J<;KONuMLw$Xtv0C6-x*j0x~0 z$liLA+w%&P;l7@}oXHid3hB#MLYuGnU^53`IFD<&zHF^ssEwVNyWLzXd-5Dk;C(v4 zTphq6ivtFr1jNvGvjrB8EzFUar-|r0zngC3#R(cdNywe#bKmZP@XUAuGDNVfru)BgUmPgtM}#y#+=Rbe^T>^x!p)TXY()f?xpbuT6$R%gp0hJL||<-2xL zoG&TP6hf#W&v=`N`l(l3?zkt9S>}GUcgg|28yc=;bveK}!1)PO&@u4`zhYB`4?2{T zc??Hg^{(T1wKyzn!EJQ`802M2vR0|@zn2?NmVWzz^Gu_57=?@9jD)N>O1WkWa*S7? z10Vj@Q)XEOFu#kwV2jod*dWUdcn~z@NQk7ZYCL1n-XpGpK;zbz?W^A*=HUB^ed3?* zr_2Y|w=f2ZkQf9Pu&NV1rx-i^hCTb+1~37oKjpjj?FXyu`Pgw1=*H}Xi*r5}K!uZ( zo?W}06mZIk<1v%B&Xv;y<3Pm;FmQwD&L{P+Q^`(4^9lBo<$%1W#621Qk#M7y`)uxH z3oV96SOSl&*=>MZJTAQu4POx((Tl2IwSKG}}YoR20 zwx9s1oj?_LRY}L0u5b3F0Q=-CcXXSz0xA7-VMb}~TxVcZp|!Ilq;MW6jI&K7n?C30 zc2cUAKXQCC{%wY^dQrqL*9oWN+DgrI(wG?@SGvN8#ZQs)b#lNqVwwK2Fl?S|;mm)$ zd70&eUnZMi%vFJS42Q|%puYEz#PMm$g(j)A22fu0c;v9%y>8gx-pBjNFz9{BDqApxKc=E3U$bxDJlmT3jr9mM z!d=yS$h2Q=FQq_+-m+`ImCbgz8ZW!q?s;+0o((hc5{yZ?tBMYeJAr&SaKIi5A0lmJ z*orV)x=tihIk;`dP{5Y=*DCWWNRvw|gXFq+uo9cd+9pelR3ZJU1G^AKS|)|7R<>FM zyDzlRFJ%ZJVP?Ko#jn#!(8R?G`zY^eg^PsiNa#0wz=bH>^ukfnv2i^WVSV}wQM@m% z7ws)T(=JhKu3DbdtzYsvYb}En7O!QXnWxsg0{*>Nz@kq=I$Lt*lcb_^8*ScX%k`l~ z>AN7k+SiG2&SZ=2fCO!lqn1;~PMEzy`uywp=hL<1sFkPfu&JBz!LK(&aSVBw zL=pIttNZjT3k(L1CqVJ@+4B2kDFqAWBkhYUW6lu13XvL`bcacdvzW%jJ z@@@A2eaGYA*W1*oKe5#beA0cdBF;w;Ysh@V;BlK8qg8`o_Yl{SN|UCO73Td6Uh1%;91&CA3T{>20 z2oDherdFV0RPuhQ*0aFlg3;_EIhmRyLvv)MQjH`kjiYCHxTwKTCpMxFH=V=)Mr`5W zjr(6gv;7&9!t8tZ_$~cI|4tFGQ6uPtSc^{|bKbE!B@k_7s?*J{+1#}lUsJE=Nqy6v z_+!*sx0uzjZ8hQ@hlfY-c-8luv(m(V`^ewi#dg=3?_Xxx(`Cnb6HMt9MZ9?%Pa@_? z@qVysl)}x2?YZ!fTT|Uv1!h4-GR;FG%xlthD9+%vGg!Gko-!@%8tN#Stb*O z&$NUfPMQQ(l8f2_1xg7dm*H5!nS>u}QoxDhkcwEOyiXeCe7mSLhYH-DGFtsgZAEy< zph=}Ul3gM@nQwoky5>qKkSsjSYIzcTC-gpv`aFrhUoD@6K7Spf%IB!%FJLqe>KTo@ zmO-*2%ukwyf9Nwe@@f93ed1Hk5KI|!rKDsAJ{`kee}P$6y!(YDDy@)mvXQj^Amb@+ zTe;cp$YVSOFmmrQGE;yN?}k-9HuceE!}fPK&gHm2w2btdY;h%HOg6n?5kN$l7+x)M zmzJPaJ%}l+#K9?2;SzGehk!#cK=6tvms)B#?wz4{m*%h8@g}*6@BSq@z9Mr!UN;4{ zRT0A_sv!QZl$Ed{S9>$J-+6O^Fu_79!=z^KxRv+sWpMjTjjT*KcZBy0H+(Tf(qIQ3omeV$x3vNu<`VqYQ!-%vX3r zDTZkJItKHtCzo3bNC0-ZT4D}J49R50bRk6(;(=lZwF;s1Y>T5yE!6ZxD@QE=rcErJ zD4AO6q8RHBa1taD0d6**kY&Cj7Hav{?!`10oyZo&n5&jE2GZ5iExL7Tc&ix#KW7zX zzUHjfzqRUH%K-WXYbn4ndmU@psfGc2wG4t}of@D-oz0tUxxRGusY_dDsR4QcRqHrl z_FuK$gGfmnss*KV@B$XyC1*QMGHH@H7K8o5t*H;xo$y^aFj^om;^Fa6j|X}K94j*6 zqW^^KI*DM6ZLoAfjTnoJ53&eIF_8zGv3Z46 z20)RRWe?(#gJrT^6X#t2!^elr~7((1~ewX^5~kr8jG*X(MUr`c`CbyBH$h(p!Je&l&+^T7cODll{&Lx)t9ID`zH2!Ly}_nT z`H5u%Ms=I<5~9B2gX9&b)H66F*=swD`Avqh?0}R_;=BV60xl9_q%vf-z0N3gU}yVl z$($NbDRNWxy~7;vX8|puQoTf_1XT{ZpDW>bch-) znqLC<0U>wM8|P}Av{L>_2axA5l?J2<8#J`OasOGE&|w!HSCrfVPyb10UesahJ737D zzp(tOP5ab$?UP^lnRRY^i;^esk}acDWs_5%?KZ<@hJoSkv-ZVrJ;sB(*8c9FC{){V z*6R9R$5a`!dLCS0BOryj5^p(c|M;Z`*zTJ)ZTe3z44J=+sNEBc;d;Dk4{8F!>HLY) zQzP#*6NM)0dM>uxo{#UL^2Rx9IzplVbf!&C5(rK!IfNIA@?`0*0j2YHSqY>OZZM{_#-cVcSyxJ=%xFf5fkWsG1jCq#a3jl--#e}=WN#HMhY9cte-Zl^i=et)! zEJwduqhFLeLsit$o~4J`!ezq1snS ziBmc7sI#R)pBIHg-WsaGK(UyqZVmtDu4ZwL>r*R7eRI^Bt5$&?FQ8Q;&|){Wd}?K_ zrH+hixju($^9ndemd=~wuukyhEViXG(YUK7TOi6b;S9x`f%a$&1Qs8Gq(3-M#>);vDULE z?1q~cA`_t5WjETRvwJ8DcGRWus>Y^Fcum&gvP&fu7p$@j6@QRN^!}3F_OpEG)9vu6 z58b(J01xO!yN$m)3ClgScBg&u{sISUKIqi%=TmBG;4OwTKsAu|wmq*BdzWWVLphml z<^awLU`>GHkjzCeTqclP{D1>CU`2v9#H2YInXw)Aw2$PWkvHEa{a58Un7a84S$-r9 z^vS)@E&C(szr;#|6~Wi=#3;!~9vN!S!qqy)-?CN$88}AY#OxysqLjaGSXCd+(dt2r zw}JgsY&uR-P?FWjWYqN}9i>7|VWg)Vh08ne$+i=+(HK?@Td5g3$2e5RsuCxO;qt5{ zk)WFDVKMkq4MCNbgJZVs^*3#K$uTl1zinT==_x9o81HcVUc0g$kZbBA9bq#sZP%C; zgm>D9|Mq&A)D8B%Z&06b<69IReTC{z2Q0k(poL&tt-D{f?B8v+DKKPtx&HZUv+RY$ zVSAb&$rE^Ep2m&lD%l>>>-~V<^OKZ;dlb*9ylM}Fi7T-)*^11Gm&lwT#(Y8pZC<8C z%iEM_fsJX@u1hDTObNHInzaRbB58#b#afSZ!xPk{ucnNT8qSp|Fq|snOHsAelqOn_ zi6X!d3a%b;0@!9(7ZdRp4hjYfDDWr0kCtVs>31Df2lTt1@oHEVRtqS- z)%vFvc$l!c>#5~5S1o)`)o?~uz(s+_^%RrB@?|@n2!pj&MrXa{$q+>^aCx#Vi7DZ2 za#p5Vvs|pmQ9QM<#AR>tZ&nE;oj@0%tw|3Qp&vj}*yx6m$iPe&y%Ri&+_`Ku=a+)q z5gDE&d=54tcOXw_e8Nq2!P<1bs;MC$QjUCO)5zA0!ud4BIRWR>*kTY7Y}8g>fYmc% zlypfP+rc1yM(3Vtr?|{GW4rg*HGg{_BJ_2;=yUhUwQo-|{pLM)FJ z06CF8{V@Tg!bZO;+T{T9HbC-D2Ee7D@eXXxyTHu*Rt?*iA6GDxASaaaH#rGv3%&!< zA^*R3lwc6Gh=9pdz@(0(WI?3lOzcm*OTQB_V-RR+-w8s@r(U&T#zpLh`6)iEI5AV0 z+5lx5y*>p%G{OQ)!DJFJ zsv&isN^IqZ`$zGAkJ|P(-n1uwi>`#N{p^V)hPtro9eYVGAEAglVA%hv$jFX2y~w!j(5zEVK;_r>Msw zeGd>i(|r;M(*=SBFbdJVEMed!%cycHKokV7qAHqTa5YubWVJf@1FTl;#9|XoT1(}z z^z}rFWD~8TP9dPuW*;vgY$TXmv7^@gYKvve(V;$pn?O!*s$YTLDvI3+0QD;}=)jTE zDl+5>u`o-K&H}DO?Gj|RNLDlLGFjE&j$6m|6|oLf0Gs4}#&o5^yjttnMwVx)y+-%L zX3j|sWZ=b;A?v*6&X7%$eW)&wMVLoxky?OR9d}KMH~zuqME&NjhQ2uxn598 zqV8bcDyEm7w~~Kz)XG`G%xNpNxO5epIj)$sZeQHe)>5}l4bYR_)lv`TRQ`HhuApy? zppVO{(WV&9xazXx!dvLPZ!%vU^1+SCp_%lr6ATXWW~gFNR}yI2{3S|^?ug%ifG za^w8D;#B&DD>|^dG>lmrf=FuMrbcQ;U+SXJ$p*&Tp0nSVMM`JdDPVoN!hjl)p?^-3Aoh*ZJRp$ z%9}1vZPVHFOvUt;?NseF=7d)Ax8^VOx@4G5a=y#E#^qg8GKj|PQYDSdwR*UmYL1A- zbddlqU$wkwEFHtg$r1x5hN}chwllL70*lNmn$FjJf%+=1`L%8^^F5< zCxJG&9?&*!pHdyR7;(1F!>1f;{pO8Jc?w^*KQ3z|-TWP@Gn2+YwAZ2=Ucy2DI-a>> zR9Jr1zW&2`Y1!PtDtQ|I-DQmZqorpZ3wO{my1p z;G~a_LgMz?6C}#0#_#)}ZTd_iEss;I?NJ8sJrO$$`0cbs{dgAfU$$cDcY)L0$In_T z&#{dVe~!qugL4P$Yu#HAm&+8YrHolwUqzJUawJckp4MI=Xp^vu<*lFqWeS4C$<$s; zB`NZ(YnEDoRV{`oEl(}K9*Iv6DO=2Ig)k~@6;QSkD614~WedPosa2qrOVKMSt;MeO3#0(yT3e-7mijPrYi+6UDnr2s0les?c&0OI$u0nl1zSWD z8f~^(*u4`G21n-zjf&**&p(-v>l1MKgWB?QPxV^u%bUrLIb+v9u1pbJ z$y2VkU*_VHtvuo^S6Q%+RWb?^iv|Nnjye6C3@AF&Ra0sGV(l>bdl=t>tPkBTegjKKlv>bL;8=4)^lb{$|0obums&iyqV6Vp?cy|Qt;N$qXg zgV6~5$~29nFzeIGH+3V9+Y?n3#&R6{y~A6lYaE=$!#x5sdkk~+Nl@_7VfPCJKP(owoT|IBeHD!m z+~`+eAvn>mU}yzUm4ccgOz2hYEP+;@z$*4#1BOVpJvB1rsS-=lR$`Mni_YuUiGAt; zFKR3^$uyJh#}pS88f9raw+Za3&eFA*GSywTgR3m9O9Gcx0!AEMt$C9m@9D95E2+{v zTWB_0u;x=Mdj+M4UCZzKWQ_W?U9Vuyt$@YFZLT)XSxq0_J$6$I=!}7+tOeK-te~|> zEl6FpxEaXpe0Ykbim9cEs$B?-s^u5%&r&Ls%cyXvRW1VI(xY6<^#P3_pcDkD5(<{; zpF9NolY0Q%yU+#F6Y-kvC_oIxE(> z{1hb3P)i9_8on?IhF6KQIY5N6MWJpoQG?LB@ChJuobpSgq=v9qW0Y2k1CI$xu72v; zI}xaF+Xp}PD|^29fc>H3urp3IQH}smzwdYEO%k|F5x7TLf7hz5j>9?rCa2yV0O3@j zp-}PO<%4!(Rx^nBGlz&jxpy(szTl%$I5bVUM{WBhXBb2oO$SfAsKI;q+pFSl8X16n zspR=yiq-a?RUzCnw)H$24B(^YRusB*3J)j8yd@)=%Cg81x7)~2hlUYy{I@9r3u&2_ zs^!v)mD)^zp{nlyQ4=bs44<;TBkwY^wT2MAVY77sBzMTU2+_%?+X-mF%i?59#KhJT zxaK}B%9haB0aB5p#6vf7grb(6D4OrvM?U=k6Y#uFO5)3C08%#3bBmbgq_+5K` zDJs%;7k_tK`bF289Pbu|Olyp5@fdd_2*zH0yQkB?d!_33;WKeT_laT#S!U&5U* zYLCPZ*n?D7P??2Cr~~*{tSuz+O_~LX7Y|o~f{gBepmHy@_(;CQJWi!)_wWeC;7D-f zHZ=`-vgNczl?TZ_nD2xlZM z*EN`H$~IWeBufs(5c(9e@zl6%4HB!yT6{_RT~6tEp@+~)sFmW8LMQcUIfX__a9GW@ z*lTq*Wevcy5+qbls_jh0O!aCX9Yc`yJ|vr}v+1bnO&wil(!FTeuN4cnb`Q`~kI5A$3f~FeelOzL;csydo@TAY3YfunI6O8x^M>E%g!ja3PS1wf@Pq zxD@JfK#Ctaket}luP$KF8Se6XqTqZb_!0anW#*}su2vb~r-9U1vZRfurLo#%l+ooz zZEFxWF%WSwJbPr&ciWT@HmpkDrRuL~88S$zRzadl(yG{-Fi?CjLMaJGR#BTrl_gYL zLF7?L3cKvI87g!x6E+SCRui;c7TRvm0RrIl|%NQ+08a(`W+nqdiycB*ShsDZV<6j z$wHeCF(~>tHX@|~aH=T}L^hHnE)^M-ht9!Yrc#l6*g|zMJFrSykG+KXh?I8VB1`L3 zbrG3c8o}snt|a(r%;2Rx5X3(E>)=xHp`#pv6FK+ad9uj}Mjm(>Gcs8=B+i9(9C(9? ze%^5-B?W&jv^!NpAv(o5;fIZTPr>4jIuJ~aZ*(B&TyoPAjGn4y_#$-I9{6J+cmHqp ztsgD1j@@rl!HP%*)^Qlx>D4fv^23dTZ`*Z0^RtySkzA(Vu@7E$iPS*==LDBP*q~)u?nzV-na`xJf^F-_%qs;u#@=vLxC}D zSdv7ddu-_@Y*o;|72jkJwrejan4DSIwR#1EU1EVMe&U|1LqM1dG9}T4>_ri07H6dJ zPNYNxM!!is!|?}G^fhXWW|xjC>}UP zEj6@Cco!ZgH!gz5E;EAbPPOD!Cr1TyQYE8t@pagYN|;{>{4h#w)7GgC6|Z8r6TcO$MpupiySB&jy0@rzxVW^;88 zTM%Q_7LLOKgQSAQ8S+}sAof1u3tbGQQ6UHoWpf^@jMOy=k)3@m44l$Mfrr{1$GIsc z@Fw^i#pLyCgtv3rF~W^eY1_`&rbA|*|IQOUhp*TZzi(!~JPJ5rFDEo6oWMoP@F6Cl z!vt+QYFB<*!PeXClBti`2dDqkF8|=qtdfEIZP31NUAL5VWZh;^#OboT?A`^N?2nXu zeoUke*n3D(SE3G&FtF(HAXjlA81WR=?xizHW>kipQc@m|Vj%;EPmzfm*maJ{HU0w1 z6V~Q&OZ~`O+C9#&1ze(i=oJToNe0M+xqyFZDU6$?#uSHgNTVcQf-k%R6Zz**N1&IU zGLwaA{#Edj53Iqhz8Y>KY|x%+yS@n&darT4n)zOI1P~^kJeJPs;6{MyOu{7k=(HIk ziYsU=2ai^`i(#WQwU%>v-b(GFrCcp$Ed!=ND4~|{OGn6ZE$yD=_Hdiz3(1x;?@qQB zbF?^Ht+ZuaeLi$8Ybm(q%NLq01HS z%DK)k7BKpRl^Dj@#9CCtIR-OC4VBhXNIG(oCZZyeNy9Rp{jN_LFpMH>00Y6lLW0ff zalVrMBU9MXKUu*-y$l6~6dY1eNWToXXthfeI(jb@x=O>KVX9A{s6PEV!#Gnh-eOgl zg&GPeQ;5kR=`OoUp$>BXS>?5WfUZhI(j({=1(q&~L7Al_M$QC6?=K!PPZ8UU zlqsA-NEgnSA$Ry16SX@q85yP?rG`f3#(kK;3ew_MXOw}9 z3`z!F!K+nH8l5ZMwK~O6I^_3j1uh*VPEwT=1w7AiU~1#_;`CEaV1lTE!W^nU+5;`D zC7u!5JPJ7P2M>=j3m~;e#Yst?b)gUkhSN0eAPLDDLI_QT2lj&F?fa-0hY_zj8VLpi z5x;Q%K%xW=!H>xlZW+N}*mlmQe)NY7B>KKBD?7-1qOZEN7B^}aJZxo7;9f@m{b5eR zrd;|}l2m?apZn}=yX2yu*fm%G+SV8CV^H*?Jhvb5cRR7$AKN|8w%MO*&)G9j_6I42 zFFZ_^NKl=k_aLEOmm6?7RR!4}k=En2J%r}Vt{tK1ok|kH0+q+3^t_B7QX6}jOJ|Z3 zUI0NwHIgJy7Mf!_=>j!D*kq4SJ**4MZ-vWBfH%R8hqTDtfB>uv0atrE@jcR=BO`6iwp90 zRN7p%7A|G>xP|$Zc=c^xn5k!h51)- zO}T323+0jyKLOc`!Z5!>vy_Jq!yhYFU9N=%{NB*V6vd|nU_}Hm3JG}>vJ9(hu#1ZY zSorix1zNyV5gf1t95HoVb3bQOX@KK&J6Afi`%hOZodH}Se;s)>_=N%(U0H+}N$`Ni>^H!l^9 zO_4l>IGi_c#vS>@Ias;}Z{98Qx+Wp)x|{t*@l7Uk)@X+@i!xLx&XC~du`}4ISWc5( zbMomBuWkh)+?eJ}Km#l}e1byT0GD{*J zH~>Sq6(z^6{g7&HP(K+^a-|4_kjZ=!mtZX5n%YJ3Z4XI#bwflg7{nk4obrNeFjW&N z(7HzOB?DHqMf#ZF>$y2{&HW$ygfy^i#!T4TlQbRz6{(k-^P+AGNqzMK^WgH%6h}kS-X*s>ibiRD%A_SpmEd>K|wV17zm(P|y zZSHrJXp%Y2$`hLs;-oDGQ`E>(SB_c>)yh_DwpRMonxmGtcxR>MEe3kLB}`zRo5w%b znxnn~EiTAou5fSZu5w$DKT-iIf?YnX$Xc?!9NeP?Y{Au5?%~|a*<=~p0+|)M_e%I^ z0NlpN6=31s3)+0w5?}#h5iJ5@j;hJ5&0d8b$X<#0>{DyLkj(FpOf46>bu`Uk*9CLd z;aR$pYaECHUS0tKZBHR%?-4 zr+U+Dj|Cfne66D*e<1_&YWDB7IWZ<3rNo^QN4|9HdYd15!yX{Z;2}IV$%+X{-7Vp8 zEd?D`2(XZlgLbi6srZB}*}GQ{x>$q|ER|E@5X>>K>G!S}vfCE)+SJR$z^=EiBDG>* zedCNgWJ=;N=@E$?B#{tp*r2LgZZ}IZ!6_AZ0?346$&5H!)0D-v!PWdx zAu_yn5>0Z~f($8W-3w{L=;|27O&1&(vx~&IRM4pZ)Z5Or)_z!i_@oCg31GsmOJshk zAvEj7S=Biarfn5_ z&W>VW>jqz8cD#38oziAXHMVF}nu|oZqDd}ccoM^W`Pg6>Y+*}JdCm0edJsm3IN*yQ zWQDLr_`^SOB&5taw;TiWmN6}@bD1eT;ap~JGv~Kri-=vc40&A+(^$rF@;RV>mjhMK zo>ND99{8e$dU72wIqZ7RBJ_wW#&i>uTgHE=D^;hNdF6>#<|ymrE_D z+6vYR=hp9GvO#&{z&TCZM#c6G#1!}^lv6ZU17QM;^9wQRuZUSd3Yb%_d7K)^-tR0O zxJkn)cE|6!sDXicen4dzA4a(+f$eG17F?Xc<;gjSo0>v48JUVX==b4@{nU;kQ%>AW zV<Nyfi#OWT%YTX3-(dfG{d3IrZ7`^}NXiF+FfqfpprRv(tmlko z(ZbXu&BHl)oD;z zWvkyp-6yd$ylwhb@b&$;rx2?`th?I&%J`mNZkAyNjrd(EDD z2G_6;t3UHQcKw|dcH2WNr+ptA6UB7(kL>^aDAyjIGi?8rf53iCrM)KzAKZhIx<7_* z4O>?Br}tYx&3jCRex#z3xc6`sm-QPUZ^jEGsXR}T$^#Y5=^i=>^}}Tc#rth+#D1Sh z4w?v3a;6o6+76TLg&p@OuiDMC;Q(+lpUw?p&2q??bOP`e&=s%Q9Jja>b_a_I!t)Sd z=Y&#Ysx#S;>!nD)%(6V_irT4P=f294g9}qIVpHYP%Hvr2T?$)Vx?j53 z!DM`VWzf=HoG5Puj8`jX@y>F~Rf`K}F`w-+mT~|!mO&-;>x|$z%f&U9>&BMxVEk(3 zEYqUXZE^>u37v)2;5UFR^LTEOZQ{GpsJgre3d|*g=F=h>q)!;V^O+GJuAVvKGPWR=Y+>F67oQ z8x6gwVDOwmyJEBQLl!Z8YEZ!x2LA}71N@4Qmf`p-)nK5B-wJ-!U&y4Y>p<>?k)!r6 zH!1@8ExYuJpW9=r_u32O#6BFw@WQ?RKUvVLCTZx^0_H~mX8oojB`J_rbVR1JhHm_P z#TFtZTkMYf0sA?o^zBOq?2-@P!)d=~U%ufv7d1%Psi|5c@exvh5pnUqbxy*Qmb4p< z0Y+X(QFGw!SR;`TA{~ccb=I=-3=>qhY=M2&3{vk0zgz(N*R+=syLbRK7FYaLB|}uc zuX&;%U=rPBuxp&wbQd$Gp+Jh_#?8CWz#x;gxDu2PN)Qau2)!tQk%{u0#|<8;9+G^h z-uL`sivD8@U-_xKt-hbMmL7^55(CySxnMswwNhsq%|7$_->}`c?c&RBw>!K(yZukS z_W2*>QN{F5%lw<4*z@x#o491F{bDgslG-l6D%)cZ*BrBZ73vKgvzb-c&d*mKwlv}K zqndU^n4Am>J1gP>A^i$@z6NK*pAx6?Ds7BflmcS?6>h9HoI+%iI2{}Pv5o{ z{0nUgg}C{(+j%ru4xcBmm?z~56UnQQmdbQ0Nq#o@ElKmu#0=3P`1;0MJ{6 zpl2>Z#uo!+3y|=6pwx@tzVEX=4z1gHPhXbXUkA#X&lTj%pi@j#=d2yi^M{z~aJf#pX}8c5q0wd@pV*O7^8KWN{Jwa~A7J3u*bZgz8<+N~mCr7Ins5@IN{5@q!SH%jth}Tn0V>$0|8JZ}2885`Y zTwm7;sT)}qJ~=rEi}A5JD`Aydt6&OP1gN0NR_;pK2CMW>hD5du9CQ=rgKOpEYRXs+ zosb@qwV+?l61HjT&EJk8LXWHm8FP6o%X)L!4)m?U!-PwhP~AFmAiVYaq9mu|x?aC8 zW^2)Qh01GM&-!Ua@c%;e(fR|}0SC$9!rQ)<=wgW!4!L8+n0FfnKvd7kA zDacfj5=sTU7;@7{aOyC=lQD8_*`o9?rKZQ4T{=J+gY%`SN^qZ4(3Urtd?nJG%J8g)Lq1M-=z$QFU4*s!?Rn8*R~S-V)Zyf3QjOtcGF?|o4;4+_d5H; z7oNA7nBR|+ovbVs;Z?EpOPXu|sTJq%NV~t3fz!+S2{Tcr-Mb5w;{76@Ns#Y?@86zJ z0qFceyLn;1&A39m|GW0DH#}qHSqgwOS{c^g4a$>k`6grcSW;0#SC2RuEfR~&RDA}G zWbQfsE~U_4vJeM|4j(7$fO_fEYIoxpJ%x4w$5cwL1IFJ*W!gBEW$F)|o-C0C6oPxL z99DM2z)^T6A7?Tvrn zUcO*Iy=$2b>@jQHc!rd96b~NYO5CrtREGOq-Y}K3aaCYteep|wvY)INu^%trWzQ6h z*%j9+yXb57jj#Ld=LOqbJ&jxQ`|QqDo6Wl~aKJKW#z_9h5>o{_`CK1GkvvXr(OJEL z>3aHVD8!ev$XLtxzNf+?RG`^qFT{4){0%3pY~)p@vVO?xWX=$8$#|< zabhVCq2&Uwb0JD(4uCpWM0nOvkzFwl2$>56y$GgcZCY))g9SEwXubP=QECGfvIw;? z7tCA?JS_nHr1lmJmO6Z&I|w3z-2(CXL-cV$-lAbHM2heK^7Y;Ua-HSb_l{PpwQPiA zj41&=2a>#LBq1RoZ$f}16axn1Zs86XTg8&qR@&97ot@dPzPsv@B{#XMx>w1vdT;Ix zSJ~L17(*!G`F_9q>{;1_ynpPO=hQiKX6L%@`?||hUD=Hy*vl9mQjU9cRO5&B!}(ee zk2^9iS8}Usl};8_(^-QPR;JDlc4i%de+LxN>8ROH)ZWR0L#}1St!C{myy-$Yb)_P^`(AJ6{uRl$_p;JJw(x0uzXcGvgfK@2Xp#%a zOt?{(gl8lLp!>iB3*do;_$KWOMgLH@rGP9L!EKr7KPyHHdEBiFaq&v?SS$eO2_S?N zcdJqvo+1ZyAHuUdcoRMZ8WXTC)Z=xK(&ec8AXgOi`zzwj-jBP(tKyu8AdRm{CoE>M z1n^&m&?f2^uS<9@!T)Oaam=;CKDtujUo0Znuo!~4<~g=MdpoWJ2T-qcrv+Jg#;~%| zJaUy+fceTxl!V=#{=hYXUlv#nMO+8wn+9eXn0a5OeO=F3Per)D!RR0w`_+_>U5n3g zqftMB{rHV z-JM7BI9(s?M_?}GpngKmWh)*{=XPzQ=t$VV2=8IwCG+S6)NKOR-d^P25Arj^PcQQS zTV{O!6%)GuI^Fg1f8$d8Hm!d4 zS83&wKTY!~X>Gpe@igsrW>kFQztVlLLfU!lsIu6DJhafpqPN>owcztp~16Q+L2EyoPyS4zTt^R*T)8y`MTvd_R7xyULDc zI0DCc;||WQ^7b=F?VXM~K}}qT6{+0eqMZeMS-7ofx(ks%jQWl~4tO`{w+s5v<~6Bx z=3%ZW)|Uh8#pKLUhbWCc1UZQH!2ET9IYg-aKkFdxH~SE8HHXs&%{sUofM3Cf2he-z zz-tuXF19av#wdhw2YfjmXk6ZdDvp{xwCt!Uh{hwTME&-6`2uA*fIK&tae?^10EZCk zpRc2f=U(bzF^@Hfz$4f>%Tc?$fIk7g!woI+#j)~*$sKcHSf^z3x!I3i)agryai-k7L=>tKov%;&l8*RCsw?+DGjURe`~;}`8zFLJodgc;jVm&FVk%$g6jmH{_l(dSbKVoG!WK* z(7;7K6rVx^=l9SgqzgKr73JB`zX z1ZdapeJd-h;qVcN^rwOYcP33!@PO~;2NsA~2Te|0m>1w9BTXFCwY1zTI(&BwT zPVca+4C5Fx|QvTH%_m ziP!etkKI(^)KWMmoDYnn!)VzzISOk(Mjbw;*=?YDf6aRbEx0QxKHhg%Ab)UxyRvt) zK}9y;5%Pc?H9HEUzugf#R;1P$;C42XQAOyl(k^du)FC#*1b7IuVTWpQzx#3E4-N?9 z->qdwICosk(J_u3XvZ&kZgpDvJdy~&FOm!Ham}C@*D9`dIzn3FdlTy09hJIR7+xqV z0wK}h6FEYnVPxt`&;lvRJYjdtiJTUpzjYqKPAVVXfRs>eym`(+q&+0P-eepAUAw<3 z&-a4^KI+KeQn-*30xp43c;gmEkry&HU}0=oA!*4|CNSTMHLk006WjT?81f4M`z53h z*>lBY=4Al7*Ad{CKSRYJj=&0l{~Bs#DBidu4HV;-f#*F3xvJE_x>4u?+0}U*N9%+4 zSfp*Wwly@?&xr90skL54>4zAvy|2zwggCB-3#jb4FTJnW>ya|T4X}YofAfnu!kcxo zm}tZ`WXpX0>=puvAp8k~)5x~HY1|!X%$Sq~!XH(5G%CZ~FI}*3&pR;Qz`;NpK3#y# zFUFrYcSpKt{(*GXjBV-I_gOOf#q@=9Cnf4p3ycSyGrN)eK8!y>lRlbn0yGaiPfb5< z=4?0j2%XJ0;2>B_`v^6*&cbDS@cmCZQ^%_$_tAr#UL|IrL}0*Zadn>v1aoZQ%Go-y zi%WN42P^GFM7C)im14)NCfQ}Z7*CIqwOihx%P$jQerhzg|Jiivg)?ct#O<%4M&u7~ zflO}O{cPGq*M#8>gw8gqGn-<&x=jqZ6eojxD*W^(ZFb!|<<7VSy@_vrN(XZfMvi9m>25ZpS2uVo=Sad+Stc=_sv-IszScUl$}db zGk2|J-_HBG&trsrKSk!pDK)WZ@kwgXplCXz}Pqjpz2Ty(N%%17Ac z_z>_+C!>7R{$;otEQls>rRknO{opd=5WS;(+YI(Lc}SI)V;cuc742dAYw+U)u)|U9 z^nFXyOb%1{Q3g`??|B0G9$`o5ZxY!DxTXgnIrMo1Pho}|Oz^V(qz`#U3Tbjnhg+K8 zO){Z6wYrUfJK~c5$Xo{G9I@zjwc9{N7rau{4Uq(Ogo6vj6poq4wHI*QVt8jh0^|~$lBMv9$(UA1_rN>zICh!Q1wB%_EM}Zx{OIgW}B%m>2TOf*3=|I5G<~yoQb3+ zPKpqMIhlX3R1$)COgFz4$3ka9(vf18J;THUk3X3H;va^R%kocY;Gd63jf*JTTZ?1? zos7QC^1T<*HSbm`s&yTPkz;JCP;^@jx51i}ffr~8_fm>(!=(!jrPJHU>;40)mA{xy zxulYa=SnH)&>H-(iNM9^`aCeqs8=sy1h2pg29e25w7<+F_zN3>I%`rkk-f7KDSN|f z%>T^3O_ZLj-}?qdz^^jvB#A;c#Ni_Odzlw*u1n39*M5`ke~!`-k{j^{+)LDt#qQU$Hygx9>OU#y!u_;*?ps z5SH$Kly+Gg{wsa*?}r7soOJwm(plwA>GFAx5;Ay%(81<(*}TnZ_|jeJ;s){%-g7#~ zeLa2ZU)$2<-Fwqe*f$%@^Q*ad$zI_8dAgjDp?xC_QW=keUf%M1AbIOW3du>_y5$uJ z=hX--553WKwp*X#>;wIrCeS%b?E4+<0|!VT!*70?fV9c`Bz!?5S706t;oHncQ07-N zlKA#08gxy%o#K_JNxnBbl;@o7BtN4n+GF?rVnx%Dgsi zTL8v`aKK1d)wl$$s6oLs!Y?qK@j7|;;xrL%k!MZJ->@(Gm z$T&X^x1&`K%39gg+6sqoE{kRtF^X+%?r3+BkKhFy8|X)dD!Z-ZUfGBM28;hE5y49k zQBazr-$y^$4Bu=fckv$CNC8TbNxG3{7C*Zxd=dQ+si*KobVFwP*=O(+N{)is-c2^` z5>S;pf`v+s+%!E7o5KhvhQ}!ZWplAaNT$L9(1{6MtIE|T$tIkYaBSSv68z(c+}P`J zXE1^|7B5(@rD+aCLExOA#~d8mlB2nrNDlsJ7Iwo-{(0Ty*o}s$W!f5)L`|yVAgm zh*g}AdjDM}UHVpK1BK$}1>2nV{mw*b;yXw{H0vXrTlxs+_=0ANPTNK&HsGq<4{JP# zJhg!?4x8wry@l$kgRM~yNRmrwfhJ}m@1E(vks0i z0Bw%c+MpRu{!=Fkzunr&9rWOaY9842+w`rAXLIkLO@H~xv81H_h`!uEA@cETx^eH* zag{sht~6`T-c()lMUFcy{oj9RO_wZqG-i)EZ}B5c&AbU;WfQ*2BWcY1$I}U)G3n_W z^#3_0ozr-4%r$rEBC>d4=?j_4`SNQH^%2b|h-P#j(G(5OoO{;ZjU)LRbqmu^LNZtB z$6SeURb5m*2Cd-FWI93B!y%XG4FqEiH_O0TDoex2QXP3K(UoCbqPlL~q13+R2o%oq zH5jpzuz$9d6oPPJYK3-P2w&SkHC2@|?nD{*4p$*SFJrA{(vAh;S%~fxnSft>pr-D~ zhnqnTF@F+ZITd*++W}~DG3EFUtn~s=r?77#S85VHfr|=nX2hYr_gHUfDsxkRkIJ|MKYQ`6ncrkhvtKLUfGZU}MZa#w znFAI}VM-o!RWq&&_5|Dd2(6~PpS}C|SKv=_^O*9U#j0yplbj_DF_6iS?f9Y{A=WA9 zF_PGVwPuCq)X4=}I}h+Kj;i|TEJhU%X_kA!-3bRs4wKPZW^fz*rgIO4dv(-Fl6|D1 zmY^(06-T7xT@x%;@se}n2oG&`6k1&bbYLrjS?X@#6}364a$8wHEyydfwr0Am+HDGT z9_5%zTt_&_ORzP>JO>|jiwSoo;F*6gn{oG(B=-4=dnG4Z(4l;%aA(@E>(+P7BUCdN z&RdA{(~YAwk0d+=Hyxz~Y%`}>N?ZDjDOR^ZK}1;CPn|JQ`31N>v(fjA$e2PU?U4Gl zI(NE?#6Ev%YFYCZv*zH{-1c1FH9Zux z8aYVr8MFGO^!;ldi^?zS@U!y(&S=zGa-xaznLH2U>o{NoaLARW73|{N;+}1}xRT5B8$FYtcbPk+1N$4Re60Mn@qL2xnnoGxFwEq#xP%uX3ktDMpqK|LS)?36Ta?qQ02 z$x`m3(fk7Xx*)Y(b>ow1!WxK$N9+tA;orp6H`R6U#yFn-7@FHh1}rT|pJyflIdzMNbn_6q0|cP~l}y8!+sKxk058;NZ1Vqy_;pAiiKdP!>B z%Tc=*qzT*SrD-6OchG>V6ST%1WOB>L8=xS`rJwUY!mq9pkr0Yq=3G=;Oagd zuUIgKuO5@R5jP3)iIE%vkwEbkur}MHBgy;oWTx)one$qa1G3l}Be$32ggC)X)zf&G zuDRkVadhTdxx8;Nw6$*$+u>#h1E=osL(GdUmHiyOYkq3tk+<$&0zdJUz!Ytadt#-P zEtPf_O&x5@I=stv&T4Jn&!=wl{8rwm+2indIk?k1kTj~KkK8qy!8KcF9N+?u+9enK z9RgPjIASSLA3jlsqq&aysq7UATV=Q4_vBle9l%wnsCmGjAiv~7Q8Od7x7;yu6b@6Q z5(Hxe!9>n+jAC2tt)2~^%+whpdteUAA(1`eO(r2LIJ%O@s2F53Ni^#(1J7W$2hWbo zGm^!6p1@lQM@xbkWJ8A8sJ51)bSu}9NM|TVflgMLA)CQGONiAgy(zaDvkyjje-E57 zeLtLqbF&!5Ox3K&3sW*vNh=gJGsG67uIUKP$NA~T*|E)zU3TWNuTbA2gA9*{E*f6K z)0aas~trT_>&BdKM2!oQ@5eV%U#sq-p;IMeXOycmQ}Qw+IWQdV9EZp^23%`_%hKB z!N%~;(7KAc3THQ8!`Oa&z0^T^>_8_)TfOzUbnhNO^x#iZ-DHF;;@~yMe8Viw*Mk^U4Jmu9IMCo)%3^zFeP;^c_p0=37knZ{UY+!2G8G^zO#s| z+3ts_E8IoU&q1i<3aPuG6NTGGTjx7ZPN2##YujdvU610#c`f&eNcV$vm4$J9u~SK667=CPC;ZWR6Pi@E{x} zH+jSqR(X#_vOq68ILMkH+Ez({GZ&^(2QSa z!e^_nC=~}(nmMY{;^A#BBn(`U#c(@s)3%SdX=T(dOSJY8L^d5t>6*@A9r8uD@LzJ| zU{0XEBq7#^b1@@uz7W7>3iy5gMw9zOCd>L9f(Yza=^8{nLA6yWGmxhQbHP1ezAB(S zoFYfH!uoW8UWo5x!wkl=EHMG9jBMedB1t(3ETb=yM1 zELNu4LC6YHeGYvOv%zeZr2M6aVg6W=M@EJIx-`Jz4ztT#@tr)vZLZT9gBZ;92beTu z#0Y@t%c=jd=cWs1?n@1~yorYXbodV0Sag!yZxHH5dS8pChDQPa-1z|hc?L-qU=Pou z){H>OP@wPY4b%q@_!jSQN*b13pALb`0{#~4`#k+A510V+cn(FFM1}sujkpx|{ou!G z=MR5L{T(yAZDU4UDj^E!Uvv0n;NGwaT@TT-tk~G_(pzb#O$d$k{hvDs+KBz@Hq%#v?x~;phemGm3+eCvZ5*`}DLI?@+HI8FF-`B? zgy=W!PU-9C&f*x#o#_mDCZ*7=H~lc3O=j#l3wJZu)E0^sxAD3S%?+b-uiTEzI|U>`6%5VkKl0ejC_`+ECk0!UhJR{ z)d6SoP&I%H;1`PuB_=c<2>^K0$kqVQgv(k%P4p^^U;)s*b>g!~+2qa^jO&4g>@$vC z6YvP8Vh&E&(bEU}?O5$?;9ee49uMdbXkfLTLsg^#XBlhU>riBR6d$e^eYp|Ma4R!A4!AlLTx(&^0QsGH7yDgjq@IS;X_}5YEOcte?d}%YFk;)7# zn2LF39a2c-jCGlIj57fj=mWqqN>wbXl$e?vkx@qK9IPQl6wKkP!kJb|Xl(8r;AlGZ z(FtWpA=1Zm{$|QGx(UadXdr(WA<}!X(7gw>%1DuUZwBl24}7(d(BOw1NoJ7;K9_nR z(#B|^R0QiYn?ZeO7Ge2L>VgcIEM&uCQoZyuEPh`^Zf~TH^}hCyYi83rd)du}C%RyP z8F(2B(W{CgLcN9gcn`8fa0usSOP-~HsC}+XR9pHS>Xs`57ZH$IOkl=<&0^H8Yj*8T ze|65_fW<-Y`wmb>>gP?br)((rR2oZ(ust6lLAT#ndPG|L9mEkG)52XiC)k4^$Y46- z7VI$$_V|xcR7m#w8mh}zsffNKbf*oJT<7jW?lUk;O0VRk3*k1?t*Ee|bH;1GOb(@B3aCN&`9)Dhs$1~1-~PPml(tM9=e-|nUx$=2nM__MT7QIYD1pVoh4JV;18_85KHB%_hYrBj5fM=jo0!;VvIPNc!YOBiHtxZ7O z#|z{TYeXIqDv%0{ndUl{t5$s@>l1q|R}ItxgQoJEpTcjx4r6m7@_^!oh|~(cHv@lD zfvCw`do<`X9^`5CSm~noxMr|8=%Pi#+pC-;U5sb5n5;=Ia2Iq@0Co_D$FR@KPvUY@ zV4{iKs+?2L>tx=l9*4t^{SE6eT%9XdD$8tq-#FR0>qnuxPbg)-21y^P+ZCF6SotnaWJ3&e)qZ| z-ob10WU|S8{P#`cSxxa7u;SK62-0=O;U#bve!_Q>grC;OUwri$&q~tBbQnq*;*!Ks zmO@~AObWJ0AWBXddz7E1uIN}=Z zE$nOU;O?_d{!<_eTnL_UYX=9EIyhANXzkn&(*{6cj`P z)!QiNniR}IT7U~!qkSeyW=Z~#K1f{#*TZd48lq@2Cx@nd6Cod55Eli@L}ca9W^tH2 zWF*FXx0#3K6W)QFmnVzu25FSpI;mOgpk{FfDQz9z3EO5ep8XgO$)lFKtiTUY^UAqI zm!u1xFv<~`1!zyw#cZ9C;F3HbUvNpc!Fb#j*(B=KZ5)U`M}@rYQOq=6Y(}xJ25tu8 z(QWAyMGmsz5xdqbB&S#+nT=~9ku1QSuqs_Lu^+!>iUpA@gqY-!#W*n*K-$x53Flk& zZnLp>l8Kcp3m@K`KKO4&fls9!WIZujs{K}y6twombOrJBOfJbC5}gqP=?2l|6P=QG zQ%ZKOarFx^!)u45!2Hwq@fOvzP+&S%Y>qTwT@h!i&WS@!BrN2Wx*~Z_kc@J?1QR{w zX!g5_TI4(T(}9@oNcS>-^F25e>nN>`7{-Gw`top zs@Ltac?b2|`)KgK9}8ZGY^rKVvEHO=@VYw$TX?Eh){(m5(dUrrzR;AQFh2PppA z`BVImXVL@vUPv1sc|Gmg`*u2uK7cVrTj|Vn&iC(3jd#6~>ejxJE?%)Oox5;b`YtST zDJ3uG(LCkb-MiD-Jdtx3?n$HO9!g&u4!M?0*rIjQ-wa8Y%_WIz{#N{wZNV%TcW+IX zEjyIP5}nAy7}02R7&%&*%{3$9oejASb{xVXw0&VQ!bKb>1LaM+#;$^B@-(g+f0(ML z5JzvI4aw3i_;Szuma6Sne#5*R2zNf_qs5igQ-O>!zwR>dGfhYmEd~i|VrCt{rHrJ1 zpr4>OpvI#>rDhWmX{W91@XuZ~|ymV|309+v{ zIM%ap#}u|15;8P2iEl)r30W)inb*pDe$}qT7v&qk#B!1BTlV;Yg#so=zmpZG@+HNs z0JPH>2iY`N_=jpPa}Vu~+M8KawZI;8oA>Z-x3FkyglFt29d-10})&)hWm#K|eHK~8p(;L}e zf)Atv<@^G+R!Jg9s3ub0Ul3DpZR;u$ks}9y4-W)^DX!W#5Z2 zN65X~-%8it{%ktoc#CaLNdrGIk{K0_#GEPCijP|T0n3oe3u45>FCr6K3|2pTF4z3H_ygpOq~WodQ8sza%pk9p^d^b?`uEd4}q zB5kQ!+We}m1$8M+=zfrv+Ti~@0=FWY>;w>Lz3Q_};WZlr2GulxiZWBdNX2XBpvC}m zp{39+~=LG)fdALCjN>`--x57~<)-~`2z2K<)Dj3ZL`-EoIPo{8-%#cYL z1I6uPOTimOOhYay_Q%n|Wp4F49$j3$I5Vq*9IHGhw7D9$|1LZEwwWYY<3o^Nd=8F% z2B9lDsMbB3$YCDuduCp&y5PBYZ7oeE{dm$&;ItkIv!t}xz#V22czo>3xrjjf;xu3i zU)to|Fg~wS_hK6`Zrs@wuW)R4darw$e2%b??vE5B)k`~GD;zV{!*!Gqx!EFegB!G% z^afQ(_88?cwxi9V?NMat6)I);!d@Nj(;>>r+;6+l_|7INsO-YgjBGdGSH_K1l^L~F z+|kS`L6@FXX@!o0e=2QyVXbVFq1s#b_o%b=q=g;OSEgsgf+yMG$H_;Uq-3)Sj~ENJ*?#vxSS86KQ77!)%ds>!DF zEC$YkcxEf8kz_6rnci*=q*)Qlu93P(B6H@(ns!_rsb@O+Su1bQ%=7Jp{%90NosB}- zd*v2+W;z#E!7IY~oqJ6g$V2n^C-czmD_YYCmRGsb4}|vqi1^;>YSdF4pU|oO-Wa0HvAMF z+)Hz5+G9(Y%yuouEu63-Z(PO9w`4BZ$I!{DmB)No7WkN=5b193Gw0f#z~?NW zCBU-%>6}rdd4*Q@&GeBET}e=EOS*i)KKvqLH4C?H%EoPe z?4aHEYY#0h@1Q6nT}~0oal=;Quad_#lETQVZX+yDndf?{QEe@0E3wV^jazu~kG%3` z%qkV_U`qGD^c&hK{&%XCd!_j^Df_sEo zU5f^fmu9LQHR%A=y6T#*1w)9*4(oEca3u4FZ1KvIwKAib^PHTbBu;1sXr zJ^T-@aYyxJB3YA2W2h%$)V6)nrmlYs+4ErOgv$nXZ<--LwGMC$9vaXQvUct{pe;ne>PMTIMbOExqp}m!x|hdoyh(;{GsY+8d=0XIZ5ipPCv* z^Y73HfJS70gS?^M1Bcib@vcKmtg!2OI+r-Nh5o!FgXVSDAUj^jzG7?c;#j%*R ztQ?Z#Ipj_sKf3E6Pi9i8t~!$r_GhHOJAXkM-hF_e*0yvWy4tz3sZN=YK& zOTCxWeGC#Q2W>=z>^>jD<`mEd+Z2mc*a5GEfJR_tBB(f)zcCo^W>^(kn%YyLK?Oqg zAI}luXAxde`2wZqr}sJvm|~@P&2=&1N;^9zCtqEcq>A86*6Z|u5dylf8_*w)M95>v zY)4%Yk0}@+j&&tmn*zY&obY(^>$trs_{C9`7mK|EU3Gi$Neiwqgk=80INr)}*%X9Q zu{B7jUvW!bBlE;OH^9xcjqt+6UVdlzjVqLU9tt<$~^d?7-bdA5i-G8ND`GcMoq1|yI~4;lv?(5W9CDK zE&ICD9C@Rsox`$r+>++9;p|>KDIF>jZOBh8Zi(?BcXX5?X38M!s%>Hk)so^Y|0N9Ggb^`V&woQ!r z#g_J42kh%xb#M|*hZhQ&s zu~d%4R9>Z#qfwZl&UcFeEfijezI71^Q9&Whxv@7LcS$dQoKAVfH|K3lW4oS8$NiO2 z?JuN1{>xF!d-033{gwYFu=4A7F$iIkcQZ&u2joOsC0g^o={3lMNrUbrHOwipS5vR< zRN8s7T&LBxc`jiS`mAqy!Mcc_rMqax=yAog+s-iCl(*Ny3HgZ5$L+h{NVjffzFRij z_bBH1o)^+h>wlI$`hTtnT7CbAzn^Z|KxzE$|4ggQ9y`d}Yx3>rahz%V?O`gPAU z`H;B+j}g_OU;Cz4X`+zQ?Q{=VM`-IonhtD$Mz*~1LmHU9P6HMfiuN@M=~KW6)eF(9 zP;jzw*rGM#K^8egKokm#*W7Sd9&$^-a(MzsR@(rS)pIFd-7p@w^Huv-n8SJ&ty!yb zwaHOUf!k6+@eXbaU!b2`Tnn7{kR0*dR9&EUpO4|zqx<_%-Q&1HkhFLY4~+Znd-vk= z`FZ`^**I>ndMr2SppN_YmBfUF=@>`u@hZjr$y=@$?-0-E823)thDNtl?3WpG4Kboz zJa_paLi~|_myO55Keho=zaH~{0xQ0{?sz<3NxseJB)j7;Nf^~8I@GaNyk=g$-#ES> z2Yw>1%p18@9bYPI-l!f%xR3+F*WlX<&xQXC?F-4m_IetK z(K~sC@1RQAs~oi{hGQzORym4oWiyc@C%M#tP}t6YIWZs>onUxr22Bp8BQkPHkl)Iw zfo3#{`fY4(XLtKSVm}8KKo(@O9U?;kX{`g~+P<%~7v{D`b`8RhH?(!H7;X$2fBO6enkyN#CCyVlAC} zjR%>)YzIo!DALSmFmL7KN;rZ7eRyC#e^y1BM_@drn!q7D3g>8vZJ zV@v;asyg;tX%EN6k2#O8?*GAmM+cfBe^`bl+n?BA1J@wj;mA*Z6g>pRwunAITCw ze}|vZ95EAHx7XbJG>udCJx>&bs0dV`BBgIZIR1xepgj`pmAHWnvHPB|r=mwWF$Z<< zxCQcp1c7(KDYoW1uDHNGhu=uIY<-rpkR$1VLqATZo9T{?# z(Y$vs9C7|4=#>ny%ZbT<_A4NxSz$I?`D}Z-WZB_#ZV&A(dyoKmh8OaDze@*9*(UFX z??|QymWXLgsWf~Rmaw8{2!WGqD193TjlSjSH0tK3Xxl}Q9%*X$ZBM7s>t9F<4*ZA- zWKz0|bcnmj-QM^*5AL6i6`5mH2rvK(h%QV8Qj4Mj zOJHk1@vx62T&aqEg5rRHA2zvCV6WR;uec$%`*l#N3ryC6*OG72c<-kfuO04|%q^Lt zKEpl^DtUmX#lC9SJhE^FPAa4G1I7VFO%D2v zhU5$qxspeVyr}1SPMq8OwoPuV@{O9tLk#^?o(kUJIdZ3sV0$JJ52~ZH%Xqr7On^0f z&SPPbI#|T9uXS8t0%OzB>ah05@hS&ok^uz9Vl>}f=!dmBggSg$gN_8RlewyVVAAlMNc_@t$Q)Is0QNIw2O6UBj&g$R(A+mFm%;hw zCWrwy0|L;w2*#iWr7O*8-qV%3T6cG)aw{X;j9BP!c)3VRWg@av3_m-)YH;@dWB z(d@-m#%+wL*oSL7V1~{^?lFmgYjomEgnv@qjt|jBY@}!rK%orH1FXYRxhg7j?eh>x z`bt^!d4n;e0Z74D_qc63ln_U$QB~`5%*LT`CFCmyB^52VB5hrtYHb_m+&0spf==pJ z1bKt+Qi9{Ghrx*pA&L2{$q}>JTabojjWK&G^s@+(>7s|EExf*T9-2_i-=*pg3{Deg z>?PLg96|IFq@l(*1#l-<&ST}50!$Gn#|%CyIRzQO1KCCMh?Sqk;=DzB(vWF8XbI_L zQ~#09IBzk{tzJv_Jo;wZ@WQXC2mDPz13&Dgft&JZMFhuT1)2xGovJrGQQQk}rS(Wh ztLcHB%SCHxP*S^YC)WE8jB;5nXu0E8e-uHaE=5ahB8fo44+S}>=*MCk6_aCSGUVbwT6rZF5 z!xM@w*)40!AV@O%K^U2JHeljIdKJDgDis(pnxt)6M_5o3ZtsZ?zyR3q@Ulq zXD+CoBRymww1e*)r#Db>L`(tC1Kp^}0d7IWDthSr#b{ce+)ip?#K z@H;)u7N--$_jdjj3p{TU%lS{J@Y)RKxA1Cxs_9>5f3;)xi}Ee1R8*@d7PV{p>j0G6 z0C{_sWyZLp!I>3S(FTB5+Ydx@fas}Up)JLl_yR`Ktx)ajpRo1gB(l-&}&>cJZ?3 zmr26&h`uj;QU}0t^!0R)oq{OznKba^i_?_ugK5;7S26Ly0cr&6kg1F5*{>F1ViJfj zGi%f-E?&GZOxg<<(psZ0%7AK~$Eq&|?Z2~-^i)k(8qr=d8Z_;1$=v7D@X_l-w-Isg zeTuFiFa0+`=bz?Nus(v;9rk|?{6-gIb)b{_ZMFo2=2rJS!Ng3|Zm%U6orjePI1?w( z3&QzLq}yFD+>T=Z&FSX6Pz_ zm6@PzpKBXk+p~z!z7~8L9AMn~gzsVIU&b>Vyx5}iN9aECMEc|qrW>gGCgF!~rT72! z*ff6DVVe4qUbEUY3N5b{PQew7-)pos99Hc}8&|X5*O2c^j#N#;&=1w7Ta&v-%el%?Snx3_i%XfnTkf;4fj1yZR4etN z)=_gl&eua2SdV|-plolL7el&`xTLQ7ZQaN-)JrqYi7Cu!5SipBeF;WxAvVn>N44WI zo9lqXKD`CV7HzF-86zT&(d_oNTD7jj?+9)SIOk#IYS;{&s%B}lJXwofy(QF@4lU^_ zEou5Na)^kE*g_RIiB0XWK8|xv49lwPp7lz|$SdD`kN*Ea^ESZK;KW z9Z=VeFr!xA=BVU02W`FbeJ|QJsnTO$&r2;44|YU45}0UAxCP<<#0=G@2_xHFIqm5V zQhwUWK`0U!@@jX!Nc9(t?lzSDW{zt{3u-Z`saIubl0-msdS`*K&892~;ig`d&9AB{ ziZM;XGAqj>OFI%&%yzEWzaVdSplw~!jCK&_H{Bx9@U^b1ZFz53emky3vlct^*LY+Y z;XtrjjHb5MbyN|aDEwMwp*il69$_!4E-E*=A1AZ*5H)o4gZk^wncDcdH1LluCgaB{ zYm6=Max~8MSfpYtFsD>o5|W7sQ2bsE7gD|TLW(CGD5@Mk*3-d2)Ps~>viCp1H6A`9ZT zLU+-LR*;RvQlyjI5bteK`x>eJI1gRf8Dp>EH{jh=TtU&uLgxAwuT*Omp#exJW}jWX_t#)mqCb2JK1DT?j0@jz|# z_^26kt5VF9$Z1cY*b|1n=hf7@fdH?Hc&UI$ga>{B8hY=*SMVpqil)H1z(m2ay1+j- zyCF1&5JKEib`z4of^?H+UzWoXqjHQy)n@mWLe{`M&6ElTj1lBGY63s*27b5`iOAJs zPr05sIM%K8{5&V{i<}6;HX^QCgl#E-Nkk1Gs|XtrVWXZoIjHi4G*o=nJesSBQKf>B zDPi<;B(7@Bz7ta=g81Y)y|^l-VykkTYE`?)N^}EhI`Wzvg*;IaR0CcEXsZO;_G!C7 z%O;Vr3Eb=nEEPtpns?8ltKXj4fD)^H;EAbRr}Z`%@)ub(EWy{^pBjOK^cBC0L0d=+go z;kBk{o@mn)n>wm(YmDX^b_X_Wb#x?Vml*0?SJ|w`R-}P*EFh!s>(4(UE`Bk+_bF`mx^+wOe73&bW1?uKp`>GTiE5;rWAI-+kWKNX#-8V6&Tj+!g93zU0`6j z7Xx2?*DCt+Nv6Z7KMRMB*E6@oZQGtn5AOMO8a#ymCLst=|I#^?bpP(((C6q$^bz_T zZN=W)@;Xh8QaX1Sjk(AOsw$n5K6f#^b|WC-gbmp+EX|U56pz!vNd?_#u`AMuf#TVv zJht!l>`bT6*_19?wl94dMf#h|_owfVzMnwASzzJm>BJMho6c+5l)leAa^_f`HD^mG z{a!0C1rq?Pe4qH*3MfQ@j@ya4v1r3;i>Yh^B1EL<*Ib1)Itpvl1Fm$+iIwyL zz4-G7ZcHct)%bvb6F)U1b*$uvGn8L`HkQP;(g>{0kyxEe{aNO7H;MtrXs{GuP^gea z*4u?W+kjWR_w%rdvU99((%L-Uu0NMw{aE_Y$s^%&LV zs%_69;=&bnXJ{2Q%YC^WA9Q4i)9M{BrMpS=yJZWVeMtJdbJrVb<72-_W2f9jF!PJt z_Ls;?8BLA{-G+AlC!)c#BnL7j!lu`m9^n^h(TeBNfI-fld`kM@-`1y5*Zd$&ph`I# zg^3n5u*^cLeoJ+j9OY9TVBd=&*FPB+dtqRHn`d>QPtLYU$DB@U>u>gKOcNG9l}`S5 zq;%laB#=M;LOC_`Jdw|6>f@(7>&`GHD_%ZK%y^Gx72~`NDw58}5lm#q3#rEW*oNH5 z1PSW7+}3DsO?)-6IO1Mm_l*Peayznd8@bNg`6sllrb(1fLJ}~*sx6)NzSk)t0wy4ihuSdR8MZu%tYD6hRw6 z(AEYKw81xO;3BLBjFQ!0Ez&G;6Pc8ZISo!6{lH633)3^h%p@u{3vbs&86ccf-X(l8 z>TcdW6L8$aj@G?cqOIbpZhY3F+1kRTdW245X5g=*c1Lp@H94Yd4+!rlptBugH9xgN z=0#10joO5jS(Ho(pTcPLe;|VEb7fHvd`<*58+e_Jp=#25n65M@;#-Wo9^tH7rNw`o zLh5M|Df>lwDZ91yEB>EVlx1>dK7ex~{{{}oW#Mo~ZkY&*HkoRPdByEBZmgwTC~)RVp}_FABl8(=%@ZC=A(Tzo%HEpsq?1i(-6Y(L)Y*N8cUfV z5cv!ciTmyEY4K5zzQM_hkUMjnJeyzp@p|MJFdx^&^!Fb; zXL~yCcxPoiC4KpuQ_~~6eoKDya~N@tQ5{1bG>-DkJDy8-KmI1IeSeuY19bVU#C=6M z*q=X7)f=!;AEG;^4tk$!Uefk-w&BeBoZ78FBw_|)-isQ#dJnmB7@v3VKSG%(ZO{P6 zvKbCYo4xubcB%O3Hk%im>(RFYiB` zg)_hutmBgnY^$-PCdG?IWsTvcsie?Da z$DW%mx@=8y8c{XG0# z{(MtFs%ToP@vL$?5g4uC+?DFL%*7BDJh@l=b>vE%+6G|sJwn4oFx3^uf|={}+h)h1 z<3V9h@zj7*<4$5~q#$%21yDzUozZ<^A|P62IZa27o$rE8oY}54vkx}gd;N6P&)tAv z6X13fBHQ)TJH<&{YH(6p6K5TBa@TB<3_#M~hmdnUV!F79B?%rk1E-}jPQADY5`%oj zr`7iLUZ&uZhf-S)BxZFiY6V6CvH-{85D_sF9ZiL-@jpRO8xK0x>4Eh6CS?KfXqtH_ zB7U`bybu?nRX-wlI$-m7|DF6NtK&OV9n$3(&o%166Xyo#`w8kh*QN~ze;L^X>vs_?+RDto z0RKa58LES3MQ?6Qe#Z>4-czB6QbV51TC(pqR@ORR!vi7bpl7!@i#7ZF(@_g zYpmCds>9r>spCI>To`fuDg;{o!o?lqZ*;7SI5jux;v(P_NR9TXM}IUItJMUqyw0*N z$53H-Td(O1Ao6q9`_>EhM#J9Z6je>3E%MsTndVR~Wa$MlBT~3ja1GsSpXd%YVldWk znGK-M1xN+gJikiUUECbU>2+K*qFW_X%Hqy+&1)I~_K8~wHEo?6;U^P-Juhp(qQwrL zn~tmB=4HWS-==rm$o&el6Ih?1{s8PxVxF^6t7tJ#}Pbuo=Yny0deQ3wVYz!A|30d|gw z#IvcDXVETpGm9B;F0jvWv`Dj;l;SyQX&AtYub92FEJm44G8RT~%U-V3>_Ytk#d9v! zt;RN1FDyA1mh8fKHQMKA1|5(7yV2Z1&eqT+6C++lZKQOOw4bFo6ZkIbL3SRGAxAkB zN2qB$lX6z-wj%(HV@@^)=q)G*V_74Mp8p_M5#w#5iofHgT1VsIf^l3$0crx=P>kKq zKPG3ZSJB;#lPpoKo}|RizR#7OBkDGTeC+g;9>3tu&3OxBn`on)7mS$qUT(Rnj zG;HnDe6Pr?zsJ;#A9())t^M6=jpeau46A->15U4QYHD^qNlDphi?*iY?fR}9kS%^8 z{o}V_aXML*`k$6&->@a!L$_V0BFtyH)p6IZq)9s&xC)&cpMKlatzV`=8w~Wnju}f; z!Ul@l9;RQ{X147h3;6Z}^yftq-S{j*t)YHG{tvS+?*Vz_Epo%ynr);oF?y!V2uR<^ zj^kAiauwk%p#3Lt$t|zFl^%SK_KydiBZP!j0nA7HVA=>fk<~g3@}ltYXyA&1_1DtJ zZfD_ySF13LZ^J;ok&x9b`(dD+hNWIg4{rT=T652l^odU}E2T>8fPYWl9eES8k-U{| zAOT^`c5(^8{*7CHn0D;_S-OVl*5Ch86@XLH$$yun#v9&9lUBaTyofeYkydlfCJfV$ zk470Cg+eOc3%_E%wzFfuFXdMgF9y>9?3_7dT3|z8N~YZf6eeD>WEVv_+tcX_cctNT zo=Ss0J(+ivTfdb)^R?#G%w(5mP!0M`T2fv-?@+po!uMhH^t_S=VCE|fU&D0p<|`1- zI_Mi_Bgte4t38M*8+{X^_UM&(QGN5CjN|Tm+t_=8WRW=uS9TT0man>*6Rx_Mlxw-8 zIZ7eDa0nbM3KogRE}G*twwAdPwdyLudDdxqFQdt$$OPfwl5*H$nqb7uz((w`OszEY z*G&E{tAYRH#hrQ`?>ZNujD{860GQ=GF;y`mYDJduW-WlZ zL1`1Qzz0oYF$MIR#Gf0+1L+#;3ci|tW4X|1SfofsFjX(OsDZbuF18j4W7$M_19=?8 zoWL9RcT~?^_{k->@!T|O2{x>4(k8(?8Sgi3E3N=1PLg@_Ct!}CQeyZr2htOK$e<8X z_-uZHzKpWydDgD)!UN(OjXR0HX>OObvmp~0Wis2!A(c#JwcXr@vUCB3aPTx1*)-e` z5+i04ECc){k8&l~osmIgfTJ|hmHP)!zydXsN;Bs#b(D)CZF}(^+6wQ1q-0cNhcF2u;lGf3k8Bn{SyP_dh&i6;jZffvM&mHo#s8S7<&6K1vHW+m zN&@ZUFfYoE$Zp|3rjEEqa~(<>|As8o?Mji}$A40JqD0c@VU6-ZBagTy+j?!9x_L!9 z@#N9`uD_8!_>Y&TnL4dQRzJ>{-J5xECBNGd{Gylp6N_REa}31!!N7b|0RBZ-gVD<> z`^J*Z>E!cit#|>T(lYM{=@0+1j*I_C`p`$emu}qjOjJ&oIAtcSx~r8GR$QpLuCuQP zRTdAw#N@Xa=33W6@*{8j7__&&FQv@P0=1Q_()*tvx(`3BCp&i|Nxa)$qs|=27U`qY zZ;tXC3Y4EN%JYMyH`>Fmo@N&9|e6scU84pkmvhJ=QrGNU@aXbRh9Uk+YsoPO#E&!)r`P2xhB0MD?Bx z;7jJ+Mkjc`m{I}k5kRZHoKke%r3+x%i(uUBQs%BY;cT3xv(V#D$KXE$VE^8n!|BXv zkE8*|T*RB6nQD(cHC=htnlzYR!e=3-oHd=Z=N(QXu75s_yY#)kNA}$d4 zyg$d?Tmu7v^*Q>DW-;m}I@FL6Rxw2^lEw0AtIT7Gl<%^cWb_?~1!tND&LJd2^dUPy z|6=Yql$EZ-j|e3j*zWyFl%rZ9ir^vzt8Yih2UuEwWB3JO!H2ADiCiey0pp}FU>L`2 zB3#qcHQM?>^Y=lvS1IS>ioeVlS)&+k0jvCibA<&Ysl!(D$FC*LHRhz_8d*#R%KG3NDAg)2e4TO7mN{evP={fT*$**D z7XWT}JKTl&zPZ_72WTH(#~tcPjh72zj2teCv(0rq9=#K}KxbhpI{1{Wv++je5>Exp zJRlwgmgoP(aleLe)O3MDR6nc#bqN^yHXwgH-=*Z`!*E)B6?Yp8I9G|LGs4TQTNWSx(2) zvTob*8l?e0aPB`~4^J(k$|4yUFuH=}1;rOqn^CoRd?W^8SW3DGD zg;tQmc;afoIjD^RyFkDIFs#yCUCxus%)1>7L|!@^edz%s?ZjBQ>m&sK};=9n!Og`KHLp5s%ak+a4f zEEFd|DpD54p_Z5^!5zkJ;w;pI!4ohaLn^Nx!}f6)ZeA;*fD;O=p2RVQ`YldN1md6q zfhM;(YNLVEsJ2iZLho)+bU+$^HS zWZu6KrF|kW-6%{4G5G|M9e`;CpprKe;5;F?%BNBv@909nZ;yh)N$i~|`BeN=?UTV! zVv!irTGW}4%mO9F5%xB#+ScW!U9)oI8r}V!=p6D)*wvJH&jF`7I7Z9+M!88HnB2@E zxk(*q%Tra^1BoZ$ve6la4-{}5|3vj-r!k6(wUHI0CY8v)Hu@X{-6J}qjMLE2QE4oY zYh6rP5U$D(^H{Bhnn{mblcsIEA${zx>-hzKDV_MqD^ka`0?*k-4+m zx#?c>m>X?2PWZ94h$Xk}c!oJKAQ5}dGQraNEePI^{4{;`8<@J)c8&d9I_?js=gnmQFux`M_9BwFdjR(b zsTXh~NXWlK?N!7&#^3%@n)KlFsqum5(!>V{HQu$G$T4&9;b~=R6eaI^gqIjWc)2v3 zIP)-(cPMZU)IOD(18*Juzwx%&TnGMfUGR^O*-0>m-vY*-3rGGcih=}IjRfYaVZ>>9 z;Mj+`!rnajjnksT9cNC&uPlmtb4UzGjSApUv7;DIgvGYu%5`DA>MMse9)|b??Wab5 z@pKiO19Xc}NUK1W7NO`N*#aY7J9IAj9hk`+qM6+L4qR1xxH=2nT^P+`iI|djQMg!SuCbM@^T(1lKR6)<}U!E4%)EKWV3i^x>6k{#Cu+ljo z8wIy;b2%UvvCTrB&uJ|>ZHUMfEjhHN+@ynZco%JAzNY+h=e%N5?ony3b>Scu;^34bC`8?mRQ^22tAxyk2s{o;Ag1i6(E|#5rd=>;UvGc ziMRoIs6{`e8|H02pUT)1}P z!zdozfwwh zAA0(&v=zJbk(b^g(}HTU(xxN7Ahm+E+sN9j5sIBg^nqu8f)eqYFo2`qL@&nv43*)? z&kA@wg5mlK8E#m2uLSGz?ht(# zn^%g7vDIqL=22X_{IPTvNEvl}Bmok%{WiUfYMnp)JR$-^7d)Cyn|vRNw-HYi?c>i% zmyWv|JVu+S`R?3D(uk!Li?5>qW9^H?HlHVi+>5V!Lvsjqcx0%k+s34@T}=*(tU2 zQn#2WHDZ$QR3!M^k%a79=eDh>9EfiKrbb2%u@eJlW8tEI^CjsAA^~4}sC5NUm$-RSrM~@JMED7_kldspAD!RcHi5e!G+Kdj~dx z3Ju$5hBlmQ#8y=h0R&>lW7`&)Y+*7ImjVgd3-|%3+Lzjyz$=$i-z_zQ){`{vCT^RB zaRfd!0=??f5jW(10=LE4QX>nSJ!F%C(`sQ?_*Wth(OCKT{|&O@yC|HE)^|{guWsNS zHL&{-HqzyCC4o1n(r~ZnN029&$1U+WxP`Fgy+y;BWotaJYrQqi*U7+LXMn38Eo@lY zQt%;jL)LAMh&Y0c+O@5U4p|eAwkH6$vXe++W!Fr~(`KbyE^Y>c@5?cmQExcXQ4X+L zw1KiACTN612Qsm)Qg|f7XX|)l$aO5*)e*vaC9_8>mH)kpqt=j|JQy{d#b_2pr#X0x zi?JBTwe_1;pubFYdx2K$1(Z-6GZ<6$JUrErU5C<$xy*e0J~O`lJ$>r)qtd5dd-{udC>oBh;=XRbmxIxa;;~{62@g z@EXRi@x0zC-hP^cY(5*pW|KI$e_AUQ8c;C)V1~`i{-$9s7Qk?teI?fBQ;>kN!E(?5pXRPYg-Jn|G#f zT`JaoH4PnqW7>Qmr8~Afnsz_?pVX8*NglM1>Xh{7|J;!#Q_<42o^}e@l2@87HVlx( z0Q>=UE*OBn$C`~oKRdmRBYoKJJcAeRL)WEDS{dO|6Rt0ux0SZvo70)yTauN3XU}1l zge3>kzno5`W6jy5aWF&m9}P{H@kM@z^qC8&V7r(m;6q6X8Le_*7TY_mSs*W$51dnU z1h+YI)!{UD{gbKjz9-YP4cut9?J?>sw;W27HtkRK_db@!-^~#S3}aSf!j3@`&c+}v zltv>6Yqpoicuhy_G^)p^{ohrDu?9xMs*SofWj6qoUrM8k7&W*pGU*~J*Qjg|E_;}@ zVMj)_M68Ah(|2&ScCjrw#n}dXnhA>KC>?WzRR&xH{x)cQ39cofOq-FPt+vwc8P1NW zB|9?^F*I6GQ=AHz4Qm!~B8v?S^hBjsN}$O#n1In*FAxR93bwIt683EE#O<@V;Or27 z6@VK6Rn29M#Cq_XG6kfajM!Tsw}H6;TSIPuZMOn~wyGL1f&m*Go0Cwi z=hbp`P)UD3?F8Q2^u1ijAh9n*8tx!-n-C z%?SpX!YE+2O3|Qc3U8E6X3;v;(bOGa<05?+ID|K7d3_#tALAJ_R zR!d_EWJ=YMSjo4K3jjNnO^YnM4~>@^NG;uf;ZgiM5iwneAioGfK7Xa1691KBFr;hi z9%0V#ZP%s0KXocU$$w7$=?*Y?)}wSxd!06p{949R;#L|74hYL({e~N>epqyXiFRp& zi!j`K#OCu!xv*=!?OiS~{eo=`^Pf&%z5Es+hdPFSUrs~nZ%Fr(9H*7rBnW@R(eI*k z*udNVf70GFPLA?Q`|h3@C4>MOV;f^^=;sKaf9)_dOl8;UmE1;y7^6DGU@-Xfk~Q_*`A zWQg_hB34T|F1qF}TSZCEwE+Cmy|1D>Yl54YFIl?pRYH!Lm~#&krS1Ns{p6QIYiM33 zd@K9XKpPP3v5EJ;Vn6SS;ex9&J9mq1IzTSTp+DH-rw-bMUl>gPudVYxr>*XR53KeX z#ZR2VK!3?9SHEgQmr(S7Z9Ea3W459XiY}`H<16J@z$$`3x!rd?dd7mTDyMxnTJl{) zQK)uLeYX5U*98Y`(1PRm<#<4< z3>2r&={iSUL5>5{QE59WN_i}MXrAaQ;sD1&NK9A>8SyNIdbXai?9S8Hz-$i|DX6h3Ggki0Yz%T4xv+xkjFtwxTjEMH_Oj2atXRE z1uaX_Ri6hl?`eS=ndPqiNqEK-P3OUW+?#-{4ipb+S+pyWvYc0VUJH^+Q5H%It*PY6 zB1JE{Ad4y9=d1diqG~IorHiX@BDv5;JPOico85nr$Y;rmSXQ{p%>kJOAg#(fNkvS! z+ij|(k0L49I9rg7`Ywf7Kn?8+SKzdRc!n^eg~M}-CzZ&sXcYI5EJjl>Z4J*%Y(kht zPtHc5a88I#Vb7VCh_Rc#ywqlJ`)u%TlE-eYupAf%_e-r7wPGyS34n2~;aKj8Fs*>@ zj8p88lyVUB5mJxE?$(Q~$O)nG2e?A5Ja&NGQ`obLho0fd>@w>F>tH*3cwB`JXmF)^ z9Og*JiMt-+**$Jo^=ly2^`205|_PfH)a4ean=w9vi1l;)tiW)xO$S~Zz72c?6RRYpq{E_ zvtO`bEhp?-S7i`sSJ}L$VKGkrKWNv#wM)O=hyAa&FI|zc@eALxXeklXRL8Gca}s?T z-xb>RYoIqsH%g>J!O-{ke$HSc@Tu9>>oK38#@U7&iO=iX?2C#|&}51+D|3Az|Se9QzC^>I(VW)nfM>sG(SgrTom{g&TZ}zx`F4w(E79 zx$iY=LGCs0dc_*Izr^-eEw}jw@V4N!TVZpz7F+0 z&6QL97cDUbGK7n>NYTp=Wuc@(j`S7*b9xLF#RNm878cv=$gdY1Lyn`U3cayycmz(O zC~(ik5`H)O6c!CcD;h*+7N1b9qjczW5gM*b&yeuRx_eIKMd%Qn5$sB}PI`-eG;0<@ zXXk{o4$RVK!`^-GAgdL^9- zL!*XgmO`!uCW{udvSV2!l-~rqA$=T^#k~%N#3a(VsNl~P^bv?J6R01KRq(R_9ZO~GlZeA{T1uUayN_Fb&k1YZcgm*iei>N*tu^mCV@B4kQEQrFBf;LV*2~C72h&gT)TzY60PaqS=xP zuxkZsK|1t+epm_1rQS0a+H7bMPEu6%i|rsK@J{KFI%%ddBvANyj46I;9ltb^M2OPd zc}cTIgmIhITGVJ!tA&(miV)F~*qP(2qCoKPaoYig3i>rHhf^J5Kj5LKTcoXywn>3> z$l4t7BZ2mq6CId_whcx%t2INdoLaNhiZyUos-4yj_@Rggeu-|@-wi%XY#o0dl1Fid zCO;StLF|Ri3x)HgET}oY>Tx#WOgzlO$!ivnA5}Za9X$FQ>mSZ%J_|4w3-^uzOKkEA zFqY~Q!9>2@q!ee7A0AQR34(I_DQ!&{D~Q#9=cPNTT0(F1<*qX|5A0zZ4y=qKcIwB! znt_5y`NQ_tT3z^@Z9DT{q;Ci=S-3jzPm}(>`MyC0N4o$I|;p@E55!9 zikwup*}Lf7XA@_ivWxyzp%p4nbhBOh>t-AKz-xAA^YfJYJVNl#iPR_ zt%Z`sd_%I9Xr&shRcqgv78O=_Ldj&g?W!Fxq+U&y8uw{k4xLuBqH}<>Ya*UOU{8dU z{;jg=S!t;W>EN-6FJz6i=|b=X3XmYu0ksZF*|pdhP^(#;iX)HxXOmz8N)^3$A~rPZ zttONV0-HmQa|EwMPH^8D77a1Hf``B>?1O8x!pQ$0@ajAU9|bocf+Th)o{g+}`TV?O zvF-?t2ZvV{DiTUYDJ4AP5_W1SHwOnFZ^T>L>Rt*DV@J!?v~3)!`g@^T+3}ntul}S| z=yA9N6(8IX#9=F6-f5@P`#(sJOGmJ60(fFs)x1M?l)fc}% zKwM%m$~0~2AO^i^P5N}H3Fo5SMX0Lc^c}R0{pKl~_=w$e?+NSQ%q)SO2l$}>#^pn8 z?Yh4*%?1{}yWh?RW5qv!hl1r;(PS3#H3vumL=#<4$;fqRnO=~hogyUG5Gf(t6y>~v zIEaleeLxH{^WMGxS8L7N4y5jOD5iewdY3t(-qfUl=+)5H>p|G2 z#I14-2E92 z=}(?Z;i(j@4l@Vj(Mpn*_UnM$PP(YV$;KmB-@w8@Kc=W`=o-Hjle%Ii&KK z)xh(ZRa)quv@_k)Vb@SSR z*`p}j_;$c?Z{HN@x7E^pO8jWD4opr7lcmbWX@qJei_=?x$&5pF;UA;rPO_<}NaYGt z_6kOfU1_C(SOoBlg@B<=i5>6oW|$H*i%Y5F zbZMQIQ@ReF6%2=ZDo!pG^y=aXr9ZpA%em;Q6O&QUaP@12g_0W0^7PF~37bVn5I20b znj1;Y%>~j>rQtS|bX``#YxT|YzGy$YwCcIhfoAmFgUzZMKh0XyV$P6h){s32nn&?M zkSwtq-@SgY^X}qYkd|@963@CRLNX8CAz2zPL#X8me$HsT)-L}+olRZ&zD-y{ zNZivDcOYv2%ra7Mbay;R6X8gU;KuU=?jftX}c3JzKu8Mob;e^1Jp;;+Vo zNk6;;E<`|8e$Rv_ZR`I3jh!F!44YsQ}jX^kwPIp@QYw?)m`7;hTT9 zwJ#7d0&gw<-WtxkRvNhSIHDM#T^vYrUW@lJX2Erfmq@9XbXmFkBinlNe{33I5^XP3 z8U?;TVhykO&(LaSfVH!Z+ubvd+4aN>-iTXm0Fc*r)=sSU}gcJxon(6H%3tHVHu+oPdq}|9Rld&DA?xF zWPb#ekAJMiN2tOW1Ddae#KYGJ@53aJ(m$HAB9%*#(3MYpi04tbEPyUkYYYJ`Rf78% zq?ZcXVP-sHj*(B;Kuj~xDw93$J}{w9XTF4ovW{y4pQNx(m=|j8+zfcChW<-DWPq>~@L0QtxDC*>7BtNO0%`i{(2Ubg z!lLDti&98|ra7qJdSPuq1I;bw0$O$428TQ$8=kURR+i#8t$8e&8j)Z#8Oq9LttH?J zv(!S3g_`xx+W9x$%IANBec|GvR`u9X%dC6d20eYks@C%@t3vt%`rO>RChbH-!DtjA z1^o|r_yoirdTKWo$-a1V`Y2!7^Q|=OI^HyIuid_w_$lhrsvyF|sR!+X&oZxP#Z`9h zB|U8c4wc8T$~O{RuofV4>wLN}CL!iEt5#OXm=Ng+neeuC6b1S$709>0{#T|L{hv5V z16SNmKyUYZ1pU4b8T%e^_W_9;@BhI9Wn`2q(?Vr|*S{cF9iwUm8Y!eJr`CiNp-g`d zM++2!MoUPz{{t)EfbVZDis(9gXDjzeE8Y8{U9z3HvoV=<*0G~zn7fuZlWXkCF0*XJ zLoZmbmR;73IW=x2(x3~Wd^dr3qnJu`7>Ja(w5NUPmPTt{_@-U{V}hqI=w{KqFWJa7 z@7rJo^kl@(B!teWRm7qY8K6oF5=XN>^$zs>)uH#HxhnK{-B$Rlgj7EdP$8G%zFjtw z7jQH0q|1B?2REOx3x5*%oE54z^w}$GZN!Y@)@1>L?Key>!u7_IBQa^&J8@-vA`ml*e&L>qe^3QelU&R;6V3) zb_+cWszyMN($E*~fNBgxZv~vhTWtg#8lbH}MYIBd1r9=P3Sb;urf3ZN@mZj$Ji{UY zs9GUPSIS7&aa8k*lveZcH95r-jzgievJeJwRtOF?snrtf!!TAW8_<`P8s?zWD9}kb zBn9Bo#!#@LzD1!>##dvgkuvv>P$MK(vIgoFs%Y2sIc;T&e<{{c2w@WiD{MLsi~ z3|hcKo*-JXW%CoHk;~eR3*D9S1-)34qYF60E{-#TB2PW+s93og3ZMngKV#n-em6tq zdMhvQVgp*9vxvzKhf+>!*s2!^hkpb2!&@=bw3fsz*JmTHst2y%uBvp?18pntWQ0D- zG3o~7bhw3}of`?W?1%9+garHRucyclvG|FKpINuTi)`hYkL_`(GNJ~Pt4UE62e?4k z(pkw0nu<&jQQKZoD#G7w7g+-;ZKJ8o6iBu6Jv6Eh;T+!wPzadSJjmPM{0r=)YR^z- zSH%np1S5jGFxdipnbfvmwYJ7^B8U;udGUG>XCrvBftabShyG>*M?a07Dj2?wc!#cb z{fMV++VYRdVBKx~DJO6<6koRmc)74|Rc2r~j*{-V&Gy~Fi|w8VU$o{$WJ6ut-`ZX> zz#@W=hb@2ChAaiEYB2|s#hGqgPjY3!BaroM1>y>Mi%Y?I$r`v{wA%yB4hnn>xF2A- znK+70L+89`J+k}lqR(rN2UNXwx7t;`9`ZRa@1oqz@F!k!|Hw${-j1VSPH{@LXk1*v zpx}!4nlgDu1L1|Y{Czt@be!?>V>az2CIfkqi9mpbhyweKFEGLPDP|uBE(8<84#9zj zIho_gd%0v~l+|mkK6cOwD%?Jd9lWv>9UMBH>4d1?Emny#Y)PJu_{Z_RZ?VIVmP6EVIBl zT8lF}G=K?Q9D)Tc@-WO$3#7oq;0T~`ze25qT9J6P->7w#vLO#mY!rIM8aF!K8WjWC z3Iok?E}7H?PkB(F7Z#QVIelard3cUc0mBNKiz)%*<6U@=Y7qj@Vr;zNFxM@FBXKgY zAfTgy)Fx8dFx<1uZfq$s(>K};V^&y5y~0r&UbCT${?VG`2n|10G$b=L=8H;(1Y9@7 zXm?Gv(o+nW(_n6a$@uDYI~%()I))M|-!0f~W#weOByY9zF74vA|5lv*$eyOi)k<>d z*P~UerAUepV4)D8LOR7#N@K0TGqL4m@;fPk66^*BI{3WjSXJBJ(zquZ^nIpmVgBFH*M)roD)0WA_($B+rHy( zcK1M}90pS&c@5s0yRG+>ot9btp^e3H(3`@4;_bUK;O~Uo>dtTN2>=BBu`=8A!|gES z!80~4z$ebc@#lYQq%}SQ-V9sDVk#jq%r$@lC*@(b#v4Vl zKiM4{SMjYuH-$;w%#}LcMJDaA`KPVNP$KTz;Z{iAY{_$bShpz~Z4{p6p^uzlRsd-$ zIFDrdjMZWS_KK?~UYf8%<2iqtSt=OA(g0+1_=F!xRS|M=uA$7}74b}q@rWFaX&%0` zq(-np`GS;49fe^doY_Moc7aRxlFVf|${LZdFO1?At4J}X>h?;kYs^kZ)H6KQVB9j~ zY8YsYTNV)mn{hiG|15n4KVd;-$oWZq@aia!)N|$;c}?`4@>Lkd*cTa{Nz&Yh@eB>) zW)0&g*eiLxuh|--eND``Co3bT0j*X-EedHUHjmcBKB{G#V7YJy{wv*thy%T4)cL4( zKd*#)vx;rUgo=kcitV260$;7X`lx=#6ZU)~Z;h8?ps}2l=qG>B!9c_{wMR$snCqyb zJ9Jgn&h6Njuk>cS{A#$NM?awtsl6Jhy&T>|R;cXm`}JLw>$}nb*5Gvp+Xc2pZPbfl z%4A9Vth@(OyC+csl`|+@e`O%5YbUB5;J=6=XGoi{Lu3 zCd;t}M1!n3`koKjoo{l~u6O@#ZIl_PVXLV_)}JAt1qyoULB7cXd&*-nxi^dZcO>C#6$Zqs!~y7PW4Nd+OAeYxZI6PR1|$ts6*9*Es^~$~haU%mgP7l12YKgORRuyr52GX}r2!9*IMZEp*AiPCkMdO8TGHcxBw` zzlN8u(^h1x!p7uiQv1{6w_ITe^6qQA3J4nf5;}WUXZ4Ya{x5;cA{!vdvmsj(YAqH7 zJfz{;qJhg+hNibNdzv|7Z<95KdwIwj$1^l~SCmGykKRyyLBwLdgmt|SW@l2xK*UOV zU5sD=RpFUAttUrNEzFO)n=7i4XU+Jiz&GY(9$T63R*rpd-Rv* z&`5SSD1aF!7Ab#{_#_*6 zp9Z&60MZyWz%~DmSkYdHjvjpVv1Z;=I(kp49I_zkwI5|vhEYHG`hHYmpvJA@NiX~Q zAc_<)r|^C%)*yRV5-F<*f!8oCgb&U|1;rdeO$8YRUM-^_q`dg68SfiW=652Z_kC!T zWndbL)9+JN>~}uWR~^IUk0QT}V6I{mLOkBrFu)n_Kvg{Hq#OG#rZM&}SuRH5g+JK5 zM^D(7ujpxI6*uuner8|!_q0u#{sOwm`;3?msUq+ebO#~C{O$pin^6j&kGycin*)MJ)vJ&b3_3Ij}{;Br}j3u?2XBSM;s1q-Eubykivo#)dXkGOb z6o(M{4m^tlVN^KNp~zWVhsTnz&P?fh52Xt7a?UWD=_ z7VGJgHe?+bIB^9Lu9KE<{SlCitpnbP`ecYNy)f?qLtm|O5%_AfdZHO3^;%1)J5(zt zDICQq^ltuY;ZBd(7-eOzBIUYszDh^tR-CKO*7=myhT^3C(OiR8DZ=#A2^Ig zV&ajnDJ=pmLIFdDMY;Oq>L`+l`FOa~n@wvNhYbA30`0B=Jtt)GV8DRRWp+2wr=jiR zJ7jzZ5#u|jL4KcB=SGO_yaxG9wUFJ2@|+fG-5asUYPb{JN#EJSojdg3?AAr;*8>3> z_=jCcVILPo<3vPQ&Cx{5 zyh<;HprntEqtVB!(8p_zMppmZ8TPANfkH{Pvi>%>64%9gH1AcfkVXUfB%Zl6^gRw! zGF_h~rB;{~MTI_kssNrOe6l+{Q#Xcu&~qN8X!~F`_GRs!xyP+{{Z2dQBKdC7%G>_b za)hJodf~rp?JiPRDHXK>dA#}nmzI+_#y2gIk7oLmotC3LrUS!Z`iV?QX)o6FcTn!2NK+?Vx zkX4*yO^zl3K+uKSft^&Dy+1}l_j$V@Ms`yzmXNJQM{Ve&=g9W&W$h_A*oGjWU)=MQ zjhuVRZeO^^1}=ZG2mr8p!Elv))!TIxa1S>#&j|qdbX>wC&C7~w{$Jh603F>yBCVii zuSz5_i#rwxu3Q$^RHK;wVmK3)(PGnMK^t4ZWVTCI*GZ=HU$GlS`JF2XjA$2>}uhpMSv#&0U)c5hnk=i$>jrVHsyIqZ}$A*qYI)lF< zWRVEKf(O-VQY)L;l_#)U_~0NB?#bg1*wZLeArByEm#hv`D+sl-S}p3!=5+cTm=R>b zk+_xHE2WH@loX9!$yW!>I5Vshn6cZt?Aa@-oZR zE+)$s`@<3?>(vFR3(KeDbc1`lJ-Ac)NGLx;!b4mIVi(9uugQi~cVHZb#+1V;3(qv# z@DLmGGjhy!wV(cSp4F{qLIXm^G$-Lbj2wNfp6AE7nd#%EC^og?ffFSkg{Bpiaw1i^ zCpgtB#wk#%8#vW{K1xb2*sV@OF>;lpJ&w@1&;HwFt}VfTy?DmAPcl0;08JpjPlw} zv3lYd1>SXBbKoOezMDA?4u1k^L4GK?qFYb>)$XTa=*3^?!7Tz(ZEvxE?)k7ydF&%N zc;xwoV^*9Z)%`^qOt8$I#GeQ-q&cWexNMaEJdEDhC3jH&?iR|1^d{oE?*k{SV`tSU zz0t0lw8m1)NRj1Xdzp^$G<;Z}_WHya<8hoGocu9h0gS(A3rtgHxfol)o&JrOGLgz#XuGTbdl@s1+I z$a2@TPWoT$6Y8j~K9m_Dk5DdT5k=@gQHaihEzbto_mPYP2O$Pxp_NcyD2T!C0h2OX z)ll_A11yZQPNIG1Yu}lIqbMyj5#TuVBn3y2PNar+CA>?xlvm4P%Aw0wliDEUn)wgN z6$-h8Vfm0fvXP%oprzHhT4k%i4ZQMJq*gN8!_ES(EH{xAX5}5TbZK27)XjzJLMH;L zK80m&5Mc}P>-DJov7ouJuaG;bR_yC=K+{t$VHtby`1KYcUka@bnS-+Ia3*s@DV>H_ zKJD}(n{no0pUX9Xg7lda>TuC?5LGLhR(xv+km)??tKQY@6s~MT_wVR~Nq9>qbbi*u zICF8>xu7vE(nY1M1jtPJkwBLmJqpfUQ$e0aK#$ z0K(yhw(PgD^H16JeIAXeyEb@usZH|u`j^O1C!J75_60yH6M|#)J$q1gSFAHRN8%xZ z9;C8d8_sfYuo`*Hp5jz+aJatpj$J6M+Hiz(W7@5tu>KYlt6|;&-n&O1>Q7A`gL3M9s;b><((+=%Hkh*k19Hcj5@S9aU!- zrTwm}eFoMDp0~VfeuquvIgTZGO{M6eAX$jfXl11?5lrb(>M;(Zx?CR_t(>yAWCLE= zp~#ARfX3cPh92my*WyjO^}!?LB|@^^f6~5tWdlC|N~Mg4_^(rK5D=%SSqD?ge=3vj zjC$e~j6}}Qjf}!$-ilO|qyd^jzNv%^AhHPfehT@uL}jTJm2$>hTO!ecK_LCg1GnNn z@dku7fIK=N;$v-=ryvv}CDl?_sD|4@V3E`VhE!f41yZ^F!{`kdHXs^SPpReR5DUgq z2CWP|ik9m}+9j7^^v?}gBr?16HYdFcfXHYOfE-D|jH8TWfDj?4RR^dBwUR}YaFEKY zYpxE;g}eP64LVUhKVnydc~`ir30;gmvQni&wF0#gQmUqxS~<0n;ckxS@IZ$~Qp(WG z8i6b}YX2b1FPas%0I3GuWgFdtZb68pyDPTAJ%Bpm=V$fM9MEL*g|hkJbflA^ojKYk zLqNUt5oYLjKMhDHpcWRoFp)7zm`qGq`RnGbvTvH*J}U*ddMEe`cFcMCH#YC}r8fJe z-&oU$g;vjus3CBY0>dWP)A#2;h`~V6-qtFa5g6{fIXFK1VN0kXO<(qj zjbO}{^Y=T4c`fFy}?h0xbqhYJVT9h0|O{gOZ7QCUiT zjG=@B52n0Bp!|nqf4G-^fCR?xL4Fnp)v=gqUUb(~EqKws+e_{poHN9?-Mx^UiIwl6 z$10i(I!5tp{{U2;5TU2$W?-v-rVp0og#!VoyLgJd@q_h|Qy3ji6N&Uh=Nho!m<^7g z*1vX7{N&1RwjWSxZo=&2RI0~e{P1ZTOYyi-ysAkn3GaY>ZUw1?CRk@~HDqL5hD)gu zUeHCQVaP58N7SNv7vrK%i5ko$^WP(6Z3S*+823`pcVmbl!X=BT0#rQtIp zV1Q*as2ODf8Xr-NLT6$U(t~0HP1}60Y+4FRhQ)7!VvE6FzzABL!}S`qa)Kz=bz0P# zo7u^+;ZB5cxU(Lh+mQozw%1#@qk-MF3vzY{yJ&@K&CTu!2`~S|Bz*@0__1|cXhkiimf&6Kg%G3M>f04pxH4$g*01npe`w$#CT;Pjh9MJ@GkVfK*#UTktq7sC}sS4}B zkvJqaP9!GGqqBlYRQ+-rfnl{owmT?bd6{1z2*kmeZRuV)y40WNBK&#

k8>U^|WMLPd{+}zGTe+-pEMN=uKB=F0ZgRlmj!X;NEDle=HmrPb9at-ifp; zk}L{mJ^yNwmQx{N-PMX6I%I;1tob0q;izc~Dn!|$?rKPpQj~KdEApZ2a6aXzPzuhH zbeWkT5-LYuQGsjQHFO?fYgkgxi1rpf%Ttp6BGS>`6bU7gR5xP=BK9bfLNiw+Isohq z*07@?DMx_4=`Xq@M|tpYrnBCo0t2fBfb$9imjE;A-P4%@-ssvt6fUw@YSjyUxsSXLXZ} z294z`Txs^iYRqTTv(gx?H5pCzLygutnJD@QJ#;p1C-3Sk=Ci<`d{-Y$5fzHx;-k%U z>wino=%#=_xhGCzjl-2@k1bn=35;%g?_s~BeHamy9`#G+NBugp(#!q}h>5wFt{VtY z^jix(2`E-qgcpCths9D;gH~Lv+@yX5bS1*A-s8cA0Jmu%F8B1Q+|wxt0?Pg`OAhas z%J}s{7bGn7g!mgv*!W)|ql;Zz{(R%CMse)s^5i$dd{)g5Im5dw@e-K(Kb2W@dMopS z!OFg%w{tHT?EDLYRd_+PiZ2Lu%?pUG^Ma^lUgQjkl2t_9swgn^bKer9tzhWq9mIek zOzxO}kc$TK7>s^Rv{{emw}X6iloplvmNwsv+lqFbUvFK9=?>TX_4f6CgMEQturBb6 z)_lKU&qqw2d45s*>l(3GMjq7Q_HYm)=vbEH=}`^NW+{>s;#!5D-QWYtM>a&Ss8;$8 z0GAsjl0`f6;r6Tem!8S$!x=_&FhoLaMDi&yZ``MJboX{CPtK~2(Z&CBjn8 zbSb}+Ik#8)`wAfvr^r`tyz2DV2L!m&(7)X{QRJEb?01U=cV((#A|fclc1J zwNA&4_e1?Xeo4N^uah_VrPNJ+T`D-|bjWy4k3C;Gb`{8ga98vIujEkmGfp?qIo87~ ziZNnP9wQZiYZNy`_AycdHDtw&_Ix59pSHj!IhBaD5TV6l-;u?IiogSE<$q~VViS#U zt|3&T#;fq>h+;V-Zr6gS)g~oNifp3o( zekYZeb6j>qV2aBeOY`iMxsJ%COEqSUK0Az|f%b)(5=>r$O)xNYXnpF~t7)(id%i*g zwLc>lx{yh(BeZA1b}XW)QuL90@|z`^u_#bJhqPM;zutjKqrchV{0vjEb(duI*v2(u zAm}WDDuPym%LyI?$VdCqo|T_+rIvufODlsP?H<^;YVhOT1Dl-j3Xxa-t}m^qcR{b6 z{;$>uP!jPI8x0j@SmkG2L#Y@H{-SG0pTW!BE}9?v#pWc*9%JjK52GzWAENC5KIGl5 z9@}x+Z&1m261x4b%b)aFKi*w5HQ}y-O^HPbn+7)ice~!X7dxL=g)y4Ws-f`*o@eEhx>$2XohzUc&V ztvb3|v5x4{PAG)v8-b=}!{dm+~A@Gq~g zMvG7f>gLJczom%@te#5j-S>-+AKISEWhBcFQ=a4R6`R@cDBi!&x|6jh%1@BA#U3r+ zr>NFoOz$5QX?WmJk1anJvon26P@M<3o#353hoRc`1w(-TZ{&vvIHagg&Nmmu*uJwdO#!`+M|Wb_0taW8jYi6lb)oqL1( z4kQiaKfC|#ehdlZj9_(mT&-;`D5q%TfJ*?9{E=$7nRMF}-B+sa4bpu^@Uvq0k7~$h zfzCzH0RTtI9Vz}!(rqSqK{3RrhNGm5Y6T<{lmf^LAGxhP?hvbZfmOXwU2|^D^)-K} z`Daa_=4j1ujlFh8Et?Yv`f56B+K@QNm)ESUxf+Rwe0$A(HS3WCMl#^6Dt#&dJ{PmG~+>g`I z?kD&dAjw~;22C4ulL+PmB>6w8p^0>>2<}o0+M0-Oc98C4g5!!IMm40iLsv@B4v^#t zs^M706kl0sM8>cj=jNzx|F&JNE*nq>ay$RBEh$dY9kKG13A~WoZv2iBwwr={z1B( z1Sb^33e_-n33T%a$^nvmvue12bejoYQVbhZ!zZLOE(Ih5B>5rLP(ZrN2-Xt3O>h`M zURhCRZL13*_-2S^j_w@4eb2yQXcg_?)|*}cs-XB3=Y@pyaEyr z+3rp9jzbb4&+wk(%|sF*mwD^FRY)4hi@XqddtA=BwGv)!J0h0WTYA7V#B7%z* z!%o$(nRIUu>{AQ@)xZ)@-A*tCAj$8jh6d8DBDjU%MS^z#RCOPEtvkJ;iAvQ?RC`!M zLu*54!+8ytG+fniZNv2qw=~?*@LkGuu<_pyZff{*!vjcM#{0p?8lGYh79()x(4a&?Xi%acG$>IJ8k8sq4N4S*20KMTP$}+CP^4`a5v(D2 zpFm#;h$AQ=xRhWm!D9sP5gaF&jRdz7JWTK!!G{FL z2u#(0DFh1$76Pae`Wmh7#?U0C5++6Z&m^V)G&WNIxwBCo2==Kjd@YyX?@5L?n5YUPq+_-bJ~3~d}Y2xzH5E=`kwN=$oIJK zQ6$t~Ut^?;Tt_E<55eC6l6*)t1WETb!Ox1}6V))@4P6d_8z9Nws)ox+w~pXG#W1WI z4wCK!fmlOZ7*yhXCRS~Q1Puf?6Kp0pNMIsT`7{94$)L~rt}irMsgucS$FMY|HsvoFdLgecne(`?5*0N(clGbhvuyA4YTiQ z+SzohNo*e5d`t7X=DV9E%CQ=+uFo~$L0QJiNxMOQQC)eNXm6KwO~QK?K*_uenLk$T zL&*G@y7DY#?xW1Zlv!q)=_$Mp^vFO-7TKmOCbdmb&pV~gC3WEPCdWLvi)`w{ezJTX zt+MP{^i*$>FQzp*#69*n`373Co8@biPt2T3pR|)Ilx7y#-x9dE zB{b<^@5K(w31=PA{W#8P13B#L-eo%?3Q^(zah%BguNZ*xq=Q5P9AX`O@3EfVlMy1| z&K9oK*c#XBKtO=I?~mS zMET1WrCz>3y~sbeplYBWlD}yIS@H)mQ9aak;$`ZEPI{T@A#rS%1C@W*2#f!ZBhuy( z>7OdI--*mNAHlT*j}m~5h)53vUlUjs18f9s1lJR+1AtO!=bm8_n0_Xf`GV&){k%!o zZ%GvQTXe!cMobhDP>yv(p%U{x<{VZ8_s##9w_6a}ui&W7j$prg3y<3Me#UO_GYOKP ziH-I1d^~>ne9&)6yw`8h<uf`O(B*FAeJgE ztt!Gal_E@21Y;kTQ%|*?T|K>fBCY308{a;*{ks&-G5MgW-PRtB#Ai%CIH^6OeJYYl z9UW=|b@a!!NLzTGD(3?LzB^Il1q_icVF_Ro0Kv3WLoMlUB)A_iUC$)2eT<#iOVx=9 zmHT;Ke9OXX-r^JaJ_FBxhG_xbwj}cXV2c{Z5?jlY5vDTHhv5rUK>rd zNwrEfdYRu~qguTigi(i|Ph1M}=mmZQewnc(&Zml1mTR+Dri5!(t-kakO!Ez1X>LcJ z*@sGA*lC`PS+~vjCtO^hR2)ssj-|M$AU(_ML&NX^F$uUbRX5Q@&GkUH(r&_8shUqG zk|Ix>PVz0hspISp=06>Qst&5%yF09FIzkOf?KYfNyO(!R?OxRp%2Y_h%2h;+RHZnq z5P@M)iNH^EJk#+?M|ehcHe=4g_d7o6_%{-lGw0wJ9Va`!M#8=6?vC&+S&|=Ar7$V@ zU#`YEj4UwV1@cT9alk zqp_QCZOuJ8nb^H=<$Y{Oj6rO9K08W-TKji)Gzh>qre<4c*7ZsM*~Lgd?PByl?_!L( zeuJ*fZ!t~wYfV&VVEQ^EosD{#FVgvnOz>?^+SEK{eU2R+bwyFZ_&G)969a-mE_!Mq^ZKH|YYWNg8y8ta3q!Sv(`!#TJ+zpvgj(ke&CKo(7CJA} zT>iRp@zw;6FWh-GiM&R+Y;PIFR^pR%+@myWDj#scE57 z@KK5{&dbyl=)_A#R%(liE*@E-ytLveDJf}ER%(jE3zeu9#M`>g>w2)0xm2O$Z|w|~ zAL!l~_D}hN9#hxUu77pD(Afi@g&OvqAip_1bj=)W*eA~l_TG`)yK9SFc_1li8TqsP zfV}8n5|(9KAmbf0KByThmt2i+wl$*pYJ7VxI(`60ySr|}NR6d-omOKkHtWd|!xe>~ z3aR1Q=yT^drGa&Uzs`=--F(&Hn4*;9l+*`&Cr2e*&}Dn3O|IrSt-xKa6?xPXufYwE zwfVII{>9kXuGm<+Js5#_Aa-3R8($IJBSGU|a* z4~%+X)B~d)81=xY2SzVZ)YjCx?y1EU@o^}whHMm;d&$HYcSjHokX zR=L*Z%bVNgG0eh6fcDOLjG?1T5QM0lzMOyLF#S37^Y4o}AtU`FxFcsz4t}e}4{h|5 z+@SG5Pfs;CP+D#x!<^j3YMteS-@oO|#!rJ=AoS=3y(4F8?)N#&&OFNAw`FktZdsQb zil@R%xoNqfj(tPIj?lt=L%LKAedu>k`Qaadd*kh>q;9r>R_UCp9FyfcNXxPlXs}o;oxvXGZ1rbRc|#tU9}nhXfYSZy#{Z-O?^-eu z1C%x|f!G6(T2@RiPd@$VJU{S2K+~1#F!QTT4oL-Ixy?>TdV^6Pzjc~ltJMqIlAMHmTRu~sk70VL`Df+N%+Jc7 zpP!pwlyA$$zHH|bJWbF?U_BQwi=Z5!XSG^kHpdw>BBvDvgE+*o6LrFHKj+Y4)C)gO zXTko>I!wT6=0zCYmeqr1J5n6zL_8TNtrn9r~N(hllj)? z^Sf8ixO44&8`iF0ef=#PHdSA@{*LQ!tyTsN{Iq}Y>~|w$f!@jwk3x7Q-+7#V7#G5$ zM?DyU&9Z}34Q8h}qC08VIyK?7`hC5-Ff-Gco{7-)nXt5aipmpP=}ALa+1&9I*>KT<#qYli$FeadHH zG$Y2Py;xv=4>-g=1F@1=D9SF`u!))%S{>Bd~XGCpqIXRcf!KlEy37*WEWU%cZ z>4{uGPcBwx=FtGg+=9pmiKnn?`dsD{4%jmquY|gdmCu~Mpq#@PaAI~4)lVwIloPB#vp|Ms?!-mla~%`hWO zp>dULlmVoAZZ1Y$_VZ~P%W%Ii9y5MSz=#DL{cT0%MTJF7Tjc2LiabTWqS~U9!?q(O za9CRDq-rXWLy2%$q(r06Jj8HOS~%~F692o~1p3P2lCt7$Ma=9HwXgISQD12&w*F8Q z`dR5KKcla_Q)K<52z}-Hwd?P>ZS9(M;ofrlEq9~OD81$9(|QY29PTY&7KM9Dq-V4$ zy=7mxw?z5}bktk4BfVu0^_D#{^apxB=>D?k(&7(`e<-$=yipt|-dD_Jv<5#b{(KX&*&oDNEi8eKULjM_}I3h z4Db(vmF1Ig<-Dt$*2^bZHRu=(#gUF7RzN$Kpb{X-ovL92>7F5YjSR~1;eL=-LdT?$ z)9I7;rLRPme*mZ#@aP4YRYMqu$sqc3KW8;G#Yf&AHi@Qd&JTur1N8)@H^j!uv9V*4 zlak}cj2}NCZp_$mj<_+2qAhMrf*6mu@`ByY2?CR|spQ@gW^)O;LT$=}C6AQYqN}mb z)c|TpA{vs2o;L{>)qSj1(hjklMx!6%c$$VLCfq1Ha|TM@En&VZ33sW_N(M{5D*3bo zjnZ6)vhn~_7H$^;GtwxdFsaQjC+Rgq>=}(xIjr>3X{Ag{DGuwrlsTpIN^L?1ISNDa zSHn@YrC~=k&?h{y{Ro_;9`tNUiydLUTudVLi-W$m^v+V|@zU@?KT!H$ z=_93^ONVV+J5kix7`d(V&0ik$WStph#Yi~x-#X}zOAnVa-_b#LqzsmRRchNwgR7UE z_lr)c`chBluhD8x^QBfN&aL>gY*HCBR8C#)qTZ*DyjD?mSh-JKSVn#ChcfHEWuYOZ z?+u~vdCIJvW$1hNu3dloEw|lrN2K%Jw&Bye?^%D-+Un5dbTJm3Dd@GA7pF~}IBD86+{mV-O%>CoPX6U0P7zbZQ+GP$0se}LODh<;67BK&itj3ZRMJod zUnzyQP^-ud-|gP6z%goOVYFN79QhquVcAcpuH)qoXw5lm;E*y1j)>{la2MzX$H;&y z)o1ic=l7%slUHTd1Fo!3HQ0VvpK8KbSX!UuC9%{C@os{b0a8e}b4ZZKR$>gTtuj)? zS7gm=NDaSGY~e&+!!lZNoK_mby!3i$2t)tLVZ07^%YI?59^++2dg%}~;zw1ytEH0p zLlyOr7?*WLWhhS>tC|;K3gsyyKyRodrqHg+(9<~o9fA0nA<+m`sg)- zSKdd29dM7S4-g)G7#VsU%6T>Q}kwNf70pbPhfpjC2yEw}p?R z!1ZU>zg%y-zI17-TveM~T+Y+Mzq_7wJ&nXee%;mQdJ{>=cslrj>r>Z9NFwC#U2N4) zuAf}!CUgd`u5|TQy?UcdzC#Hj5P8nq;IeLT{i(93?S zoM}|f`v0mN+Ik32+~sO9R=C8cHMZn3(8#^gp|CdU8P6bVHa z$LaKs)IL#ds%9E%)F-Png-_L8ZLO^iH7hN*8KbOcRakx?1g!*@68w?iV}c=qWeWjs66^y^ zcUUEE*s9}(c{XkF#H~6pYO8@2w;Dv#Rtsy}Y7xh8wX)W&2(+`6 z*ClM_4g6Nb+}SD`j9bAa*=jLN*veb%Tltu=TSW`ERgBSZ)mdV<>SD%i#oN_ZLyTst z#WH5AB_@8W)neFcjfvUH=uAcvdd+b*9`vIAyc2PPI0o#KLu|YO?=}S|Y=Qyng@?F! zE7prn*aa)rix2UL$AY*^hlG?EY^S5Ze)!kv{5)&$^J2VTWE1_Ocs2qtp5xbvrG5ij zj(&Eo-@=~nw}{vHt?UZiB29i?XZG`kaeh%Z9y6f1KxUy(V^MzI67A<>9DdP~X&ZybyYuU8K9o6K zwBlB2HQ+fuf$1aqkUmP&&#-Cq9>G50x9ah4P+49V`}I-ak*rp^KiMmttCEtE&E|2+ zA0~lQ*d^ne#^MjOouUGh+3aXima|oBLX#bTs?}_cSN>G1O7_9Fh~pDkgQReO8m4(c zL7}Bgd0RgRAqki&PxvW4-&5czMO=bm+Z{MD+be+Ic!Rd!3O$VXUE{CbcXfhzSI(`T zn?1}X54?YeXM@M~^J0Y0X<3p~trr+v{25&Q@t!hED>Abf&Zxo51HMuM35PqmixKcI zs^kG96&Cco?O`1CDD03Yv0e(jN)J|PpdKG`zA^CL;P}0PzI6G*fVF8iYohNDoC|Ra zJAMdkM1zdHyX3g~$o1kU9D;4y((rN6(;>aape=}K3!DRAs=dVuk`50+XC8-gQf>9k z^~{BI9E<9g*4vh%9NQCWVY3)fm_;vgS`m$aGf8-1WF-l&UcV~LCE@M~;FQUUV>#OoYsPhYgQp)%BU)3{1 z^-e2F!EyaqZ|lv${E(+@%wl8HZ*M%?JI%|S<8?-dH_r6hh9et?y9f4s4a4d&-|TPf z`C{+6UgqZT#yyvNS9)zTa}liJUV=9Wba~+e3BTSdWpO5@s+AIHp4E|a!L*gXYrL)D zUtVTGV_>hB9xyjFSZ{0yl_|IBvQuOzd3r-2t0AzcAvF7Rejz);FB~Da>Qr*8_mm3s zR`~bp-nIw}Q4ABO1eVi@I*s_h|q2Va=;y$5>mb$jmzk*_YdH+z5`YAsg`X%9)MP|@LXAAoO!-z5+(Pgy!N&wA31$(S z&P#9!V7iETG6$I`WP)n2DC!SX5ANE~W`E!EubH zi{Fx*JW~Oq7F3Zoy)&<2Y%=JZ>M>D_CXD&zw2~xSNm6Vl+d8<~P zUTA9b>3z(0U*sMCwaGqeRTuiK^L!z<(yH7CdP3*I+ixJ|$3y+B5N-=OK6=bk3p1t|?-5<#AtVm+~|M`;$AHN#O_^`=g9H!l=du5?{^g;BS%l3l)1Z#1#&at#|hhL$*X zB|G-4aZ{(AHJ)8*KCkIwdqM?ks?7iI008JMLS( z;f~d}-Lmdh*Y$VYcE{a!uf6AX*M{|LZdkke`nBuuvxw{N4R_qR8grZ8aLc-zsy}G{ zsQJ@oTRCn262YecNRuAy7x6mo<>9+n$5gwy5!sp`Y zU6LAi+V&dw04}+<-~N2>#i?UXvygXazxIc5`o*DZ``3V18u7vImeYMOrsZ@WM7eSJ zF2L%$Z@bgA`p&!80oJUqUVYtqNH?y(-?jR#dv4iKU45YCP|HBek(R+0+hw%P2L$Cc zfM*EOYr_p~61BR=!YioU!KQ%nyj=;q1etT6NSiSP*ocgBec?B3oN&%R7+osCh6y=yckRq}WAQ zh?CB2?2BW0hQa*e0>h!3KoT@~>fuHFW*|rmei_y=f}oM~&=?qAqc<{wR%bBrlHSa4 zIuo|g8zC7W*>=??N%-B<`2fCGjD)tZ*HM-KQs=Gc|E>qJ#&Bn2QGkTftaG@;#Kb9F;*>eGOgRS%Kq8lT z4o6GYIT}pOq1CW}GZl#coj4^i@fSI;IdY%2$$zUzq(X5_kxjCwG$=+2Rrbhn*gKAc zRdOpTMUj;#hx0?FC?dyqD#x!B8XR)?G)`?Yh35a1q1C_-bkd26tbkI$|DOVdCQ=!( z_>Y4GXR+{UVxnEaQ+v!x91|{3#jJ*~lR1vIH|cnzNf7amSwjC$|1F%6HJhneD)%=R z+R1M%I0DOW={cpy@F>MIkd6PXW!ku@zfvbS?Z4Ks|0lY!zuHRzPWsFeN%yOq81DDm zInUfW9yx!di%&p_w48pHv>#ed&#mfykvlTnP|5sDpM=LD{-T7i%f^g}&zfsA8Y6Jd z*^nb(NQ8U}u=4BWf3hv+NWQ%wy$9UU?FVl%SP=*z9^{L+#8nvakADLQ5Yaew zUa!HVKUktPXi*x8WsPSmP0L|o^^rEFWy317Ihv(G|Fn!}jr1{b!2%54j3vozpklfCwcI1ipc7J)%WpwuE_5Lj?*C ziZ&XGz5ipe{MT!K{9vF~OmyLCzKI z`l0*rDcU)wX0W9nqdJxHXdLwls^lXCvGo8iL4p@`&gppOE?qQt2g7l?XbgiVip@T5 zo?pkSHQV0Q5w6)Lccf-pD=?`}W*gOPW=#cFwCosjO%46Up=L8{%$T|bHS5K6$>ypC zs@ZXwnVI9lHCtO>7p~d6ijNfSE@E1WF)UX8vdH>jQD~YnZh4wI30QRT*y2gW-=(mQ zu3$#-yy7`XTt-)LL2+qu0TK_rtGJ=K771gKzbsNmhyOSti7H$EDx9wE9)d>+4iF3y zunm9&f*Ay*0L3kLqG7LRgm^9Dk>s8b*oP2Sz+~ zc1#r(ctCHiM&pjLX;~|z8navJ1Eh14r_OenD=I20$WzJ;IA?fjcZsFsWHEDF33)29 z#HuR^ouzo{EY(vvC1oXbC6S3}9E*dkB}+>dA#so|ELm1^84?fq+LD_}u0w*i5=&HX zO&*bEMI_s~moMi3mk;O^Aj|#-pdx6%@uoB&-DW;2udY8FYFK zXMeZ!!_ps0tz~It-=*Z2agHUy&q}{7J%+?*ED3UD#xgCE0DWTF#4-nx2zhpyv+Qi7 zVOs-yD#?f`uzLpe-G|7}FA{VshG$g6d!+l3!04kbcB+Q)Shb}RoTV57s-b{%UV>JF z+W<=Ct=B~}8&G*hR12;ExW4C|Fvn|^s*8#@>%k*GVU3S94eu*F5uF{4JHkyfeyj4L znz}MGm5aak+=|SK^U(0;WoA}YWzr?WT3wSlE3?Lpi+?qgxNM;ET9=?om!gt?afui^ zE>d~-RydW4akuG|A`mX`p4zR%6}-Q9$H_)Rj?ULgHtMIRZK_XAkVGH ztH?&;9ZQ47748aJ&_`d1LREg%!Oi>l0uiYi+b z-7Ye#GOOI-+eKAoO{61dC~bkB3Bn5=2^>`mTw*12(nYPJ*kw(w3}q;-A|ui&GDi5! zXI0i$-c%{K2YPP`*R;J76F!BjH>OV^E(e~iM5To{3E!IKJ^Mp3eZ^_p(;WXf{U(iw zM}wZ-gLB_S8wlqQPZ*T1Wk4PRcYHDmbB*`#_1k}k`og{*~L3p<`Iu&f!T=M6k&5HQ1Qln-SM;_!~h>IJT=Tx(pny4Z|!gFUW& zu02Q`ip5Vv5s7 z67lVw_7R;B_8nc?642UgGg<)k1Pck)5F94>mS9#ZpoZW)0G=;(>;^`#TW~GPJsM*- z;pUuoG}dmwdj8Qdaa!D*1+^*S-6#Cy!d+m#kfUc(jyv1z;5ZW|h73!bD$N;@@D7K3 zc>bh(Y%Ir_5gLrzo;X8kiqV4pgR0+E-BiUqScNC+JFD)gy1&YHSrI~W1PE%1Cs$kW z;*6j#6s;x_+>A9cE5LYK%?SpMHS=s55lh)Lzm~&4uZA-l-o+Y;*#s(+osH)vYFRK^ zV+}TgAzBA%jCB%FXOMtcBm-S?PHq9I2Q7HY?od`B`xkr|Qm`B&^Gx98d1n=xP2l%{ z7=sI3;MM9dRYl?TG|El8!EI6KAOnYnrlcB&(ozM@6LyVep`FwC1}(v>2cv?4&#UF9 zs)<4K#T;aR%puF$Xf-=u z8h+zQgyH&T_whq)Djlo!!T|Ah4h_#fY=1u#6{HLgrUxd?#je7cdw9DQ@x|OGH}kHW zt^;{)tHT|#E7t+L`dGBYeS!Nb_ZoNj!RR^ni|(E7UG83Yzk9!%%lS5VtNR}Jok%?7 z``wSYA4C$Oz71}6Z*@P3G;AA}PxC3}sYHF*H6r;UlC2S0Y&R49nV_5C8v;WCU@k!e z!IcDl0(~K%mS8QxE`pdMz!CtjVOTDm;rR4)3p+DC3jbF8N3%0Esdk+sN^eat*ahQR z(P+hHNk~UnJXV;PgnsZQE7Oq(z~ zEHQqDW&I3i?@71B_oPSR-(X}3%i7e?_+C&MM^qYzCmMu$CeQJ6Fm z|B1`}(uAx0lI;q=6mywhvRvYqz^|9IHGU1(>$gmN+aHA>Hm4SIlW2w zF;Ny0t!6vo*8FlYnWMl9R1?R=j^X2=JEL4E{%1Oy$rwBDjAO!AJ-XP7JcsHYs%2t5 z)FQXlhPp;xR=W=Lyj+`6cVXSjbuZQS$kw{wcu~bWDj46Fs#i)P^l`XF<<3zbLP7cF z9HP}&XXmY^x&Yof*+CRc*Ysg2MVdHFp)4mlbVOd;?=;%kEd%SQi0;464&T`Vadq^p zsub&(LOVG94U&z#L2`J5BIp$ucgzDlhwF~kSvH^I1F{gBv=;L�eX&&(u7f3;D=+oYv@ zjAkis5ti}>ZYi&2mWqkGHijAR=WSyV+9ClVF6;<>5$ET%bNnKG7j^oA-gfE;aki&- zve~9z9+=Uj)pvOP^-t9^Qx(4Z-g@iK`jAbzK-<&{^dRW{-_`$EAMF(~hJ(D<bJ*VQ4KB%`HYk0E>d%Y>W|885i#6()}7!I;KHQPM#E5lE+U-NlBrK9Y0~p zWI?c?-W^lu+({`X3DB{yra}}1%9orvF|wE>t-Ikl?=~-!*g#j)*S&9g`@C;^-|>Fn z{m5%OLdO{A24oR<2<{;00Z6izc<{&fA(WXY8yoCKP*z3R+JL~TaVkTeuR-ov1eX*1 z6<}l;jlPZ1#u`O5^H`$}5gK9*CWOd~)zcSvu|}X6YX)j!t(M`v+8;5`D8;?RfB4D5 zV9-#SV@RVk@-fXoDY8sGOGyYR*xLA5!@UhmQDfi_4QOd0{vaY@QJ+25^JK&P#@t4U zRKC z$CBEP4>S%m4mN(*SnR9txqU;8^6i$dZu#DfXG6yF3S9{MT1S-$B= z0_3^AJYO~vp0xkcs6J^wJtDm{BK1ThTd>X{IlJ)YN9Xu8oz8R*AeW$n;Ch1J6TC#Q zkKhx6#Cm{>;2Huy!8Zi4UO*;6BfzL(7_N=c^KDG5(57d^HoaccrjOOOF@`8a+juMY zYc@(k-(Ry=j|8cf=RAy(8!3us`H1!2~-b1h)^OD24EwojKGgNKn@ z`=hM!L!1GV5HolZ(IcWltjDise15&Y&99Hu>CufMU@$o={e!)YVxHWSyX{)+wvg)z!_)YPPz1 zNLj5=SH(uu`XqvSf)xaRBzT@+7r{>iQ+$AIf);{n32p-zjUvaii#+~~Y`bW}e;n5? zB0iOcp$1dXYm7p) zl77TRqbFB)lm>w~v=hYyw4&@Nw5#8xMnxeWvwjYm-mqa@RKoCEMhj+h-e*E|CJz7n zM89anzbVZx#^K+#+;8FV&#(4djQBUL^;_cbZ&O;rMJ=8d=E_!jYFpc4UHbpA_a@*` zRp-O_y|ZK{>&#>!laOR43)x8q2uXmD8A8Gmwy=b-2f<=%U1+Nn6*3c1!MdPUD=szB ziejRMwklMX38KYXEm)CvU9mtI=RmabkFx{M}TLq8p|%(`qSNR=)0(_zaB zm*s*~TSGrBT2{Vn3`h;UPh2)**%Xjkc%QRu$+9|-A>jU+Wj|fE3M7_`rGw>S@a>tw zx2=P3uMfVp``_YQ7C}>x<8KP~VV3luW?Br|DAeYl_G8qZMD2Cd{({;C)S{PwmWJ9K z)SRe2f!aRQ#HFC6qBb40h%l{6vqGx|6`@|CjRZABwF2^ag+V2*FsMOA2rCSc!U`cg z#snv5PxwF`gZWwUfhGp$(IH}S&9^j;Zs3Nd&&}og3pZf73 zX2{~2@lZtAuP%-^KpD8-^q*!d430KW$f?h)7jo;d-y^CtTGiwnm8x10;8-E;uKhW1 zKwrYe2{Y=e>xG$qH(HfyhN@6iBM6hB0G01o6`G=B@2&q?{Y~}4&m}hraB!rmz%oo# zD+puY7_q0{vkbfJ4=5U3{aeb}@;~^u)EFB2-pcJO`j!i>l^+_f!FsxHh3UXGeG8>} zx=?X^QqeUZmR$4U%4_hPA^6K?#glLR*T;vb|F6zJ>h65$y;KP0&wojM`Wl$0$c{Kc z(^*H&=TaX-Gnl*Z&vhL&cblSPV&jIeu<(e;D1$NH{HyyPc<`Z3k39P8CpJI%)U!>^ zzk6ZJi>JIwY`|n%>2aNi}>=69x zY1ZIx&<_(=@Sz+(o%h3Y)(>yI1}BE#zs5&aB-@9{gMj_ND|v+97Y+_1HQm`djF_Q8Y|A+V~FpJa(q2ehaQaFRh z$*R=qPXuiqUKarWtYHpP6(1P}zX?yM%&|H=Ix5E;34hb8zRLFgSqSz0S%@@43!>kz zQm3Y+rlq7Mr=@3%898Fah@z9ei%_|#kGCQKAwz)bVs&2-Td7oI9IrNM|otnsyqS?aVZujsFrB% z)&JJ`2kVQD;Vu?`YXzJ(vjsG)UkwW18kmm0lsg&1-C_Nv0sQ9Z4P*62hu-v{K6;@( z<{o|Q1Nyk9^g~+p@o(zQmHLF)`a~9g7{iO02-;lK?nUiw)V!!=R)SW6+H%w$LTyA9 zX!WSIfyU1YOC7it4*2z4>(A!YNnm>|YA=BH7wHJ5C`eNLUjUVlVZuILxdqI7p-x;C zS2=K%16Mh4l>=8faFqjBIdGK&S2=K%16Mh4l>=8faFqjBIdGK&S2=K%16Mh4l>=8f zaFqjBIdGK&S2^(i7zY>|v$jR(5bn6=QdpnX?Qpr;+gEol@RXfdadZrz-|0F6?m>bxaK+stbh(yy znm-NsQuNysyTE+8c}>VoOlV;DG~T!V*Y|9>|1VE8u=-}Fd%62MclM6#9XUI4cl2p} z10e%n4a`e^J^7a8i^=3)3CqeFK-{tH=QDpkbFC&&o+t>E=Y(e`{7E<_thndhu+M@1 z24R=@nd+FPOZcntx7KpUdzaStz4ptFSH7Ef=ID{PziAXM2wfmA2p+)>_nCFM-VBtS zYShIeAsq=F$S1!900_~2#C2qO|K@)2#z2W~kz?oyooBhN?(A(@Agyk@o3)=Ah`p2) zc@d;$z&pU;K8-*DJE>GrQI@3Qq8qMRT=7j~xiwHqX_2DX&&n`uW&2h&?gQDik99S$ zGN+4&hfcmv>};#+aGrHuvY%So<2*fZ*!5=P_ItNK>F)A1d7Nva^w%NmWG;`;DYzhj zOMCm3(Zqj8`bK_s93Yr zX0zto@``?3+}ZhQX>0^s`>aX~IW;7#xK*eU9uk%cZwYgSOkthSB20+gdVTHM=l@)H z-8r_@*^+(8`}{wq9{blnYR{Z$*u4PhxZ{qu-#&8WFMqlHc0p(qgi1$tni0~LCd4-C zC04VtuJRMBwp_bK*!)-bbzj=QN$F4SFYmg(<6U-gHuT5Icf z7A}1vZ`RVblpgQtQEd}CesQ+p()d$LBz_!f^!)4mC!arf{HeY-)||5+KGa&d%v_c< zwybV#+qfQfRL+0@n@}Uv3UC>UkPT80JehlzzqWeoFU`N4UY>4AQb&y}SB(t`D~>2O zmvtgjAe39GVci-oqx3>NY1jkECT3Y__2lV4~&T`spPA7A@nq6zblahTBknmd(C6*wJCQTl!wU&e1WYJ}+r~@6u!TcszQKCoC*GXWF!B7Fd#PNlZ+f1v>)M$Dk&OG3i>k^gC`y zeEhJ?@Q9g-Lz8qmeQ12VIRX8l``AH|n-?29c3c?<4M-9uznC($q-4Rul9GIdC;@?I z%5X7h@|ZF6>vSOEL8OO;r9=3M3g^-*Z1oQi+K{<(<4U8WB?al63nJPtFr2w_^`X(x zr3t7o-43`bvu1Y9Y=Xlw!@>+{X=w&vz)XlQtx5sg8{$9N*A{a2fuPJ2K~x{1YVZAS?!cMMb5j*Vd-P6_*@hHer4dJ)=O3 zgghaIIH2=L`EfwGm=63}1pGp^MB>-n8GdvTpi5KJ(~S_kr10Ge0^>x1?^#(UlcXSV zm_Cy!BLh`QNfD@$BJh|x7yy4a0zRk){rkfq|1#tSs3gW@iUBvW7>#j_mT~?DR3W{C zA^-tXWqB$oDl3!AH|%hQ{8sWC-yIW%7u3uiU+$QYpIM@}l%xTmlEoDEvctE25NBD)ZsKc}@|Bff%|bbE?PWns5#& zT!K`O$v>G>J4cY;Ei3C(p5SK1$+flf>xlPIHzbh-0V!2}esYFVDebU+DeV9)qVN%x zl@*r&|FOOe)-UBd+Q}^kZ$Yr+V#yv};FvJJyk<6qNA$`tkWa)1CYIUq>%$&lPRr0)RL zqbXC1GT{4E1Z|%rpbo|RzXMWwDke^|R97d?qV!c(aa;;bov(&RdR2alhGnLuDZf2w zY1ui%UpSE^sul#S#T-F2A+!yONt121`E~iWd>cIZ1Z`t%W8kq79ONIg5cqwD^hxan zwi*2U#rcW61RT>Z*%S14SE$|+XSdDHSH9D}$Nf-$?j-T^%rm)qrHZno#B*XvXHd`x7b$Of2}-M;FhJ-1b#c=~h) zd-~Se)YLCm8G4`ZXgzeKhkbVT)T&jTj7tdE$2{y9>~v?AUgt4(KPx=%K9Aj15O8Fg zE;*USF$=<5Z|&%qJ^TE5lPNylB{=Pl<+E?9cRCz@o9%G8gm%~R_SNk_Zok&C!f}lQ zJCRDk!;|%wtk*${WVhN2*A(u~Egy4Sa~w9`c{SdPNf#R)8%PpZNN-3l=Kyd5Ua*BF z!Pp;;?m61bP`cSh<^+mK4lomtR9KQ#YD$W?#3Y4A=yZZ`@yzigz2_u!&5YfhoezJU?&v;M+%!=I!0P;mwD3R8JXUbGLzPZg!(;YI3;-dO+$fu>qZKfc1)^yWP#) zCw8CMa>6|TZ|wunHyy|t1`;3}fUBRKY|TL@^VD$21RskE_c22lhfb#p@?MsM1r2(r zlB5EN1!%MGS|4mBgg6GJ-<99B05K}1n#m#KTRTvU5K1B2#5~>S4#E&Y8~{d$>^!p= zdSE9e;haBMD&42vI@NNj?UcLE4eo%dCkCE)93)Z*wtKl`Ks|GU*?KM^BsKHNbn_$< z-9%Pk`rNMXhV&0ToAu4`e)DPbiKGh#-L*}ddya3v*im}8^rbZix|P)7JMar=LWP`= z$`|wb(tN&ufmV*Vi#eT@&icvqmCm(r_LnPAs$svOQUVoz{tcO9F>O8frt+~bB>_+#_UZ#6V+oO#ifZ_pc^;xZJ7Bs9n_xQ?n2ivZ5 zvR;iQCGpPd&bLi+H=Y0PZ<{?L4BAy{LsV=^RAgB}d7-1d-Qj5OUcGhA>TSDjS$k2g zY5c9FwWal~op0?Vs8VNUMaLAEsMPtn(J^IXvvXAH(lOC7xp^w}*m2P@W=>{~ zZG>$^T6$Xg$WbFl2|~s&K`0tc_M#YNfF6;BaM>QO^-Y5LA#xuEhjAnhmGKZAoYoi* z+ra_^g#(R(2HWr91)?~Ii6akb3<@WhMZNItSZbP>Lp6>tY_WMfZV{BHu zWvJ!ORa>6!Z*%@MF76?p+sVv@tgC*{USI3drR`WjUpVeQ{sLCTc9$9}=soP7?e`q` z5Go)xaRGwL1Hmh`-$b{cg8-Cy^53`L|4I3WzP>)jm}Q;ixXyv;cDWo5tMy^yd-~&= z!RE&eZ8^*n3^qRlFhwHzd{=6}?e+;yxH#M?$qC@!YGejx_H~H?d|>Te&#X`<1-IXNeQZ)}(oJ{#?X4dzzHP?H@m6ci z>LqJg>;6A|x$1$n#qVQ$YIV3i-eNGs4NZ*0?+K)<lKTKe2*WWenF7;i^>1cO$)OU2$*MnZ)Au&=}BOMOb&CC{^MgzgC zfew}0*WcIQ-`59vU;lsGzjM2qI)C@fC+k~XpEyoh*VJJ7=&-ic)NQ@oSv=j zAZ`1F)xVj4&(#o2a3kVCmWxH9}|R2hWM=(7}4F2d_emv^zZ09 zNRV15|94UP!k}3ed>0GhyNG2F1-ZlTVU&T(6ibQ)zGoTmJuD)7{L10?BoWRb#_x$J z2ATxB7lcgs8repOBB~Tiz{d~}3YWfzDs^!oez(cIa18%$6D|nD3j_hbnBOnt?_qIa zibeh&7LMWHLqV7_RS*^|B;Qk~3BsbqGW}#OikVsbtI18Wazqis;M|bi3wFT{&mjLq zaekdBV*2@)o8qN#slS1J4&<*WmSl@1q9|zq@x27F%kwKKxo}KnRT|idlEy<6?CI5Z zVO}i-kd$0AyRvG|Tnaasf0PcG)fg5LIl7eRzO3t|@th#&!RRhfE+~u5Y)fBT&q>e1 ztuHUY5-Sx<=y&&m3?9$b!XFc^c>CjMuZPwN6)){-b$>rs*vDo;FlKKmbqp3l})xZ8!nysDk;))$`k61_MY&Bb+7ks@N81_vLJ40AVPg~ zqMJjcAz2-%)&kvJ=ea;SV`Uj@Ga43kZJAcFWy|M4J=qXs9)q6gna6#S{g`ca{`gAc zIr!c~9yB*KKg=b3&w<0&ZJzjo__oj}zI~TvU;b`+#Yu^H=Vmw!?*)uqv>-pPLo?5X*n6GY&nwRogcJKy!+rp?X{^tu{t6_+egM?!Y<7|rN)^ZL ztZiwj#n~HdD4?l;u$k~9`#{%#VStVA0tf?=fW&ow5B-*Ig@h>yk5WR11L~_%^5%hb zBr8zV_yr%misI}!)zjwAtDYu`T#>zW)+3B>O{VH;N`(i&rhuS%>FLv_Oif8yu#ns+ zxsUH?uGLcbixyjhM8>e9(T)if6IJTk`O)yt=7$8uOW^}PV@Q0;QZlD-g8LVlSy?$S z503xB#*~d6I}X3UIM%1}zR6TsWishQO{PhcO(t_fWmWYweQ5QxNt3ImnG+T*CVueI zy(reyR8K<{5m`MgDH-3nAbyg4Sa|ic#G$f19=-t6t;w?cu<)eh#G#ovQ>Lb+FIbqC zUOjE(sOo9cr{^z8NvWPj{sEtbIOWd|K|^ZwG|PxZi-|u55by`rBKyoWELxlgcxG1h zwBiy{S->CoFEEBwa6WMUX6BeoY3U{trjY#FAXT;$@;7@<%F?;>LUfdWlpmBoFmFE0 zWO7WP@=`RqdRoOqNKMZ4>Dh6aIi+=c{)OTnUSKkfFUQbSY7-n_LE+ZU4=j(wPs(TX zV=pwBS=O`L_bik#*#gj z2SCRW{@#1-?Hf0m&71wAqZuZM;XBg|qpD_@AB0iyeZq2~M_Tptw5~(O4d;4$zFmg6 zdS#OL&i*&wT(#o?r}%&y}nCQshD zQ4eCH{++vBPl1Gakg|-7E;F`<{ChgsD7L}cG;EjM!mYwifEZsus|mQ*tCrV6`P19p zWw(zik21*VWo$kCsE~1?tF!-MuZ)Xb>Zd}0KJh-?bqVYj=RVlA&GW?-tb(Pyf9foE6U*+H(zFqz-nSmYfU$rG|9((<&cqJ* z!tP~k|1risKHm{FZs-$5H~je1n(l+!n!A2?T-X>Wq4S7c*Fl9eD;1R+f}HlZ_w5DI z-rm`~!L{Di2!j9|UqC2Muhj>VS)EoWUd^5EZS`mBkJWeE;WrTGE>puxzfb3dNd^h$ z{1tn|E|5=){|usDFu*!8HPGc3tV!Pi5_-sbr{1nNc!+L-?4$D?O11BueeWDQ-uzO{ z!71-$y%h8Jva(hCDppmnRr^-$gF^QOq#4sasEGD%y#~sF#=Cj*!w=tmcSOYW>3^2Q z(dM7k+&RUbVNZwEIT054pW>I;F~t53(9Rr#(h0VfPAAODgM{Bn*azu0crW-2AYn!V zL<@|gNbxZl21CjPJaY-?4K)0hrkAAIX@=hMMrI(!Kq(QxlMgCT8IA#@+DSP123l|>!zVkCaCq4gBs?L8mJf`d&5N zY$b@F{mf=7Elp0^v}y8we?llhSfc}km?OT7eR8?Ji!92Q@@>(XqBGZiaqSmAW>3AQ zo@CY-P8X0S(dhzR0Jik8K0_D_Ge{C(A5($!A`dOBlsP>&dn_J%ue0xF^vM&0RzXNpPH5LkLoWw>^#O5Y)~v97M5yv zIzRg8kw;+C36c)_f)Ro-;RNSY}qy=;D&fs;VmdU!I+lol`odbPS*p4$E)~%g2`&R?V0> zt9I$4#gq<$6hFcFbugb(Bi0aH5+v|%JXiQ<9tGhXQaIdh#0X5k(hbEM7Bd!TyeU|AB7W8*a11a-?x+P^zGjTEy!}G0nW38!UpXd!Vn*hhZ`Gr|A2(K>_M>s z#oZh39yGugJ4mPzYG&{XI zPon#F2JNkW?S}G+A>*zzKX9e-^Qn|iUpw>6r&~L1u6Cpy!``EEJIqyd3WtGe9VBEg{PfTbsD#r%btmBK)k&64wa2E zzvuMD0hJ_IFoRFydyjqWc1Us(>vme5G3>9s2H;=QM}Uv82mtAi1t#*cQ7o5%o!B;8HCJ{1*S7l{Lc5g=YjkN=&9g(lREV)5jDm?;#be= zP4B-bC7KrziHt+-V{MW8ziAjq`#T+lKvIBU?>gVD0`e(5DRB@Zt!LTpY4SF)r+c38 zJbm#A&(MqB!z|t#&rUaa*F$1=G5cwD(teU1?zQh_I;eNwSbFWf?6Y%UTRv<1y6Mxl zLTe$6cyT>QX`wyaUV2e;5xU-dJ%~5fn&dPOn`LLrSv5>+c2*%QbeL<}T{=XRut@RE!_PiX;)`P~A`iq)A6|S5>XR^dJ zz#8}6T(SnlQE?ZS|1ZPU7E0-T;-Vy``g=ul26kTeU&K2cKVo+v4y2N&|Q(P^Ux{|#^C7SX+X`!$ zZCTklh=+kngoF8VM;8}M_C}*FGt(MhTx`oiTpt={G$$ku%g)IiT~$&##sX)RQpjWB zJ1R{q_zeIpf!7+cFC8nLbaGOaWCW9yp667x!jxR^*z;sG=^%RH0G{fOY1+}=k zda5Pb;h37{aLil+st82oh>;^L6Dle&48%uOR#r~*2WWRV9J4^P%$hbGjR1vJU9;y* zpEgHw5ffWfl%7#p>30tPV`3{S(=!OSSO!xf8%b~6{D*AoKr8@Zu`FC9tHn!d!w|sm}#;ZwePKQYtxi z@`G?Vq;Ij5KJJgwOMdGhoCQmi;qZ5(k*DDML&cB>!z+N`2TLWzC#PX}-NHpkA2+Eh zSh#2boLN2SzhHR5f+ccz;J*OUE8Am&K?H_}VHOoFTvS;}=F0FejzC*Q_yv>_4ku2{I7h5hO)!dA z%3fWdY*jB!+VkUe*6)@q{pqP&54Et%1VZR~nh=iF&uX5W%B*U;jd>wC?6tGCa4tEc&n zce{hy!0Ekqk9P0iia?eey=Tb(;C^---N9MK#kg7>?zM&Fx# ze>>lHvFTqsJJ}as!Z`WHx;r;rD(s#7PaWHNXYhVE=>K^yxDR?1{XhGGfp81;|9pn? zqr8sSKYgL=xubjA_d34&@#f!#B*on@@pw8*j>>8pJMDopvG}3_h5z(yV8EKEA6N9Z?75z z!1PL?<%UO#s^6&oIDZwa7zz})-(xsxk{F(j>+Ru~-eiK%KO3&x??K~6f>+u6(Hj|9P8b03kB**S4T33>V>W!|>1~88aA$!tKMb zs%_9mR1{nsr%#92hC@s|MrG=(sY(prt*QC>I(>eAyqRDihG{lN4^Pj|Ngp0JBt6|W z!Wf+n*zk0~hTBG@r&D?m;+_MfiOdkEl7}023JM8B$W0<6mFc&Qh#L|aN%Y%BL`6~A z7&Eq{WL%m2zv1%zTI7---@g@1579}G%8gti`5T#2eiD@Pi<@AX2ohM%2E}M7^%Qg(13}2a{Op{3%)xxj z&wR|?{J0_ckh|%Fr2$JuK_T*jILJ+iFl%aTY(XJm2)T*O$I!6+{Dj27*64C9(YNKj z)D;JFztXk;^_Otj&cP2e9evjx{A+!C>c)@y3O^9@@gBXtf)8ee2%)3#im>j_E*$v` zp!&e#rw;&Jv+u}}J2BudMvsw($7f&t@Ebrs_~66aZD@Y(l@HDU5X*j+4AVP;E9uQQ zpF#7^g9i^HR0`gFQ=<(qXu9Zmv#`qCXl@i%t$K3fZ4=B=ORw0jjkr=sUjzO{z^?+# zi1!cu%KENjU*#s~ww-gqjOvc2vcu(@?x@?{bSE1PZd`VS6qri%DI^4;_QE|9o%Un) z`9PF$K47v->3-<2PPuIY7 zk^5LHOc(hMcnwKIQ((GiVE>`u-%SE*ff=t>2;nsRqdTpj9Jm6ZAG+6b^wP(lZ94X3 z|C@K7v;V_+I_`@K}1M&FDQi>I`gd5ZKKp zH*GYSjn4SZH?MB$6yPV}zu!*5=`)^F&)zo_dw_vZDj)UY*FGo89wS33lg#hxAHZDo;v=2ToUEr;>#92JQYu>Q)Z)eAME^;a6Bb)zu*O5OV_b$?qfz0mK5>9&?jZe#+x$B924w$!5zOkf+E zo_=8Srlw6zt_}zO5iqgON)mc{dwO;KAuvVef$jCHmoK;G!JO4_)Ptup+-=*pHo@MX zW_R-+wtWKues?y$mqmtXecIPF^?(OWzw&%h=yG9{vPR;kR7S}SPQ(20bPcRbg3fiT zVtq@a&{!tyZY%={C6bP7xXV}P96YYUR|~6jYQ1<|!y)Lbqms%9Fv#coHYy}UGY@2? z<`zvQSOf^Do@$K-e(;CuLp2)s4Gh1UVZ-Ue#)HO(t=9H-=|`8cJ1o%xoYpbeUS{F& z)(&>wzrE}{tS|p}+pn%P9i=Qw_^vEV_LrotOdIYeR~(kA;N5 z$|Y%aF%s`~w;y!7;b%1P=jJE0P(|LY+uy({p>^VAnh6>33SCni?BH~*I(%S&!SY@( zl}g<{=RW5y3?E#;LrTKY(LUckpBe zJsusd1c%96Z;!@z({Eq_J=P$YKZE~U;U~hi;afmy`_TkLrpiYUmv7({33VcrA2@uc zt_?wQhp89>g79FdD%I(uW8%$ZuG6bZUv7f76prkYn-IU?!uYU+#Dv7qu-MpyMEL#Yhw__jqU5RUkNa1Z;`Sw4 zJY+J(#;QtVWAQg%S~~pT`kv(|8V$N46^NNkv}^^-9j2Y^Y0yFTlqRBwaPmiV2b)_{ zt*N*)o9wG5X|?k~$aqff{P~elG%ZBtCR2EX$uu;Ha8;>t(Gr?+lMK8L1qxfGwrbKm z2p7;SKu1G7lL4&*yU|KT(@YdDK{B^kOeUoY#4Hv{hg=E*P1JcP;1Cf%%pZJ0)(nmyJgi zY@U&&)eakNG!BDWW~29Rz{U2x_G?mpW;~x_ zvZrGI8Gm_^#2y0936hli(%=qUx*dD=uDe4wT{k^sop!!%t@H)Qjsd=a3f@kP#!0NW zXX!tWO(;LclF}f38{rSU6{adTKpH_{A3zELb=^GOE!z1Z>o$Di^lE*+fx-S$Q}bKR zuuXYjnn%{w76PSv zVH`Rhj?x&9e+!kAOTYXSlp_aV3;3V_z5r+bxcxa`3Fn0i7HDDWWqtv*5-xKS_%&ht z+x?mz{aMpL({@&BAZ;6fc07Us^Gc?ibK=8)-UBi6xF9-Tb4#=P`K_>fA7VxI;LhFm zKiL0Ze`NoFq_$d@EVyaa{>N9|cyQBousu6dvn=uS%JW+$y~ej^-zP$OP+JDKXRl~~ z$1z2*J-ctsp}WuB)3f2+hMo-@SkHz%<-9oc_I7ta`l##SZ|=Qx@0ksk?nOA@yT>;m z_Cwkn-nFCo_rHJs z`Q|OqS7gJ6YnSdGwr>2ufOep@^@Z)PyySkt{Sv2tU|Kz=p{=T_chyI~ zSy}z=uTLL<<0a~yd0(!I{OtMn8~O1Pee>q|k6*CIl!caMSsXh5@e5wP*XZr^#CCoI zv=M#x_%7Y+avlA}tOJ`i{kG{_r`OW2zHQ^q%73PvHTCHGHRIpjGhzERZP$=;JD+n( zIgYvRmzbx|yFO}vul;V<+pfJX=rJ>EXJ;pFzxSNnxs?eXrqStOy^puY63^n??f&wy z@urXd`TWjG3WwmD2;)Owpxg4Z=`T7kzUV5UH_q-GSM6Djmd3?5EK8Jtg$ z+@V_#KeS!$O54eR-TXeWnQ^jyG+%(iQ zlpw6S4#Q=7GOp2@6Jp~CF9ipI_JMfDurc99qsxY7W)+9$<|Piz1~GFMEIOYteMWq8 zd@_Y2!rjZz-A*DrB0>yLN-|0A(GQs~S(=@_tX{^ce^1*#$Q?nTPBkq%J9>t$ID80f z*g*3{ps&~ugVVEU@uJ1l7cIA!+bJB!gb5RCX3w4r%Md5etF5gga|(y-OZCPaV3(Q9 zA^e5e!0+PlC`01V6bqRLLz({21ws7x^S5G>Y3Q8!6i;wEFx{~VJ|T{@VGe_;Hs(y3 z4k|>WE!D@y$@#fxu^66Umh*ejV!b}WjP^V}Dm)Y(7J8HfmA}66T^87~WLae#TZ-cv zzz6+eI9ECz0)BlD)(@;FG+RL5k$}J;!2fnTdGLJlW%FOWIu7bGef%v8XjU!{Qyv#2 zEf4d52mD+Ru5|nnwG9M`Zh}CvC=AH*O54e=bR5E!mLFn%;8_4DAv>h}5C?j-D52rH z;&DNE)Na?lu11vX$u9VwU*UKdT<_H)JPuRVPY7*76VU4~fmnKgi_n_FJg^QWKaxh8 zNrKhVbT$aI|FBdMr5nD2Tg7>zQuze0;1RloqtGk7M+nCtlg|Bo_r8zXzJ6k_^H{l8 z43x_GZ+y>n#RVw*;xOhvG02U@1iy&58Vn_4t6;Cds)~k14GpV6mX%%U_@|8~(?+EV zTwGGyg8!Kt%w1(&t5_MVpyW(Z=sJ|-yb~K!B+ml_STYT&qN6j$?7#;h>2>3 z^mZBU@g!PAF(HA^|3S&oirU6|_MTwouJMO&{P?EzzPs4pZ$5k@Y}%d2<`1;>w!O?= zWo&*kE@6PaaW))-tAf5Vo2TE6Ivn-&s5_l_?6nS;8}k`&_Q>uBUo{jO3hmJA=pQ(J$?a}xYkIEfx%JJk z0tM<9>+b#zPK5i;wr$(*-R=e_gTA3oXRwT2d$Jn_Tv!3vxo(F`;x;zQ(1Va!F9?5n z_q=v5@K%yIZjhIE%#wBx$jdvv!~X?%gc&Sof+b8GnnV*!#lh6vAhf26IMNh3w5FPH z+Z&8KIh4`?8o4hiEiF;1uy7L|H8B{THbj730fI0r( zb1WGIEq0KI}>ejTX4rP@WEMA52d~q%}1u zdE_WLz5jRNP&$djc{zDG<8sI4QW=udtCP|}?#LgNOF7pt{wRY9kNlF#tqBhRGo@IR zm`4_;Cv15mi_djFD0|HMu;N@Ui4tRM00+uE?fJ8JE z6`8~_V<5}$@LUlNXEDLd5~LgR6^Zcgb8Zik3JWIkm|UQTs2 z%mxpZdrm)n&#wK^s_SmK^_REZeb2oc9((*ZPyF~N*Z*|Q?RVU{@xEW(zxm0ho({&B zU$bK6>Yx4m7p}&;)<68nqrbkA{~K<+>E^ZT8k`S2_|T?je*0`w^K;MtZrktw@W=MO zZ|^(!(ceFQVatmzz5d3V+uwQj&-*_)^pC?^Uv6pL@u#2^Lp1v_tX?=48!*$|6I`#vn`HL=0V zmxHfofH)wsAHLq;VRLO_aq0XuU#(#e{G4fi7H0m*=7J@;i>^&MR_+`7u422mAZ-T~ zYMWbXoXu}Z^j?D1Lv`9VRUM3O>Yx)2k-gwu;C)~q+85=^Ve@^t%x)#hVTKMKiEN2- zOc}2KnYVV7y+*NJEVujvZ`j~=F|S4s<8GuJBs_54hgx~v2kaLw!xcey2lT8q za}fnAEMLtTT)x^WP8JpXCFPk#G%QG8?kqQp0Dt+?alx`$b( zvzoomu6I7pmftaDoz0#Mhx0mEi(6B#cWa%w(6MiU(VGAZwp*aJH{5Pm7fupsMjpt}&aQQHxoY>VufgOT%N*eH#dWK8_j#V}eztqhL6X7C ztxpU8fNN=BdApzf;N{!F<-gs*9>?PcT6A-xo-@?Ik)UigC|`BwyQ_cI9oLEdaiw@( zKOy$v>#R@S@Tl>|$EHpw{)VMkMmuXf%RLW3c@dm-Y=<|ZA#A9|l4c(}?l>&>SDB3& z5hEQbVH&HW(n@r%3r9XULmYw-YOGQXHyU!|;M_Bz;EmC*))%K#oY-K_nEb=U6B z7(kgh;DhU4i0(ZHkq^G*mt8mVyUJzC<=6h}N(Ps2Z|dFz;|!QF^+U)o9MIyhn?uY9 zDL*n`m7Oe^^loP6vSC}C6B|BX^;PQ83GEZwm#^LY>{?nzlW>?O}HlY)FTM!a6V(Y6vy- zvOYK^z_n}n*T!x=i)H+}7ID1pp{N_<`f>-VzM9kj@+FTaH2Wk7efHOq4nxgSVJ(aT z1%N1%Bq_kiupHj7eKQI+;Wk)IcN;(>m_!I?g>#@H&~}QxHZHCB;Nl7M?(4MPFzM3X z_M)P&J04AWP(A7AF@|aJ@3S}9Dd$q>IJfR*AyWu__U8G%R|gjNo$)z5!f_#05SAuk zd$p~oq{MmKnp*_n_EJn=ME*Btd}mV%oVPh|8&y_fZ-Tldz<||vmYw~e?2OmrIogSM ze0*KJ5!$+E@Ju^{LpXWzYoP7q$x@is5V{@E2nTH!a6NCFA~epK^7>=Tvt1&P7buEg zb_+xiND1P$Zdj=rkK43`(Zx1gzO59JE70HwPjz%mbPPe++-i-EL3 z_rvBqzTkKW5B48yF5~nzuhwdvUw1k7L+0EijNK(ce6rb8YMU)OCN)i^9x)Q3)jDD% zg=&R+jJT)(F%bmumCW_fZ!{+)B*0d_ywaSp;{c5SG|6bn$J@Jnq zxg(q)nd26(twch(dz+2>Mx#KJG4+x&Nu%{a1SLZ$815>#d|RzEVy)IG zptvA^Gh$##WOpQb{71Q#{|vHki+38w{zuT*)8V%kKRlC8wk$4=*Sf z?pJu!SAjyLq*!bP1%(z+gD1|@rukh-BC4U6Tg`ph6Gmt+R0>dc{WAOOj4A7o_faw@<$NLO)Qj~L52A?$FJl(w9SQgR5n{p zjRd||n>`y+C5MIYAO_Qd@0dQN8!($0WBaup;zfim^ zP)rI@LH^qD_$)j+i{OHVHrt}bm#3c0BWKxcOO{@4Pv)`JHd}z28Hn3#GY0bpd0bf) z8#`%o>>vbMB|+&SNamb7gaN$FATY$KQv-40Erm;bBMAIS0p7soSFTcE^9gRtAQc;% zoPvkOlLF^Z7h%PoUy(nAQvFf*Ew^L3Wxuhph>fG${%0*lNO`v!V&znHjmOprKHNNq6YPNk32U{|N}( zeBVqGaNK;aB`LW8?FWxPfsqUSOGAkNXOwHMuWyH|@Y*k}Zdr5dwmrA3yX<-b1*zEa z9qj#LB2hHm?YUvK{1nG;D- zp3~llzM&VtJGrGMc>Oy5jsrP(`~v!MKFFBufcBS;fQB1+( z`M}FO@cM&5i3L!a6OeR_70ZXTRtAgXxtNh76m`cQsCrp0W4G{)mUeaS_#SP!#fp1>B%>cg}-RzI>XYf_ffp8d>4zLel zO!WrnKsW@$lY#nHDOmpF4fQy{kESxLA2^(qByKkj7!UKbW^`rXVS^X|(zCm3OV^Vy z0|x(712+4^277Z?2Ak+x^wp}Pse2uJ9eAnDORv;TkB?}5;P!^9NpkyHqIWNm!VBOi z@&=-TsJO1=HpZv4lafOO4)Wb!&iuz^U+H*z25pLRzYXqhy15XRB{_keI_8lYbcIIi zPYH^m)rKl{geamC#Sx&x7(vnzPfHWUIdize3$>J(D9)WXcV2O3ab_??pC~Hk%&9=d zG1Or`75{jMI=IFq-Vz!He~}ZFw%U-mAu!);&>7+_@fK~!@PfD@dHFg+UVc0ru@dN8 z_9wrkrUE@yphkkZAn=H<$S6@vhON|a0A4_h7-Al5&ZHPWualq zmSKu{IH6&Aun99SpJ3{U(6H1IN_*P3!Re&%F(oKuoWkSohzd%r?CyvB@pv2{YCy>O zD~F)uba;d)4o%`=p{@df_og9_NJU4Bu&k-BZfMfNh2)a#2ofLU^1|P!JmJb~Tq{QT zz`2TCvqPLQRoPV=ZfOEu}Tws4=zWrY)y}ACzNv)_%8dy6j*H|g9MgX_(o+C zRBJ>rW+u$4`r%-@{N;wii&Uwil1GnDA$x*o7OY@xS0(uijE%S@!-_d-O~ss;nLyth zRDM8c#qffS zpycT@;6jXHO2zX(GAb`0RdNdQ5$k02G&tIt*UJLg7P*AwL9UVHFE1YsU(T27F}3$R zRI-I_KM;U2pLzUP!g$Jg_=HLEN$oS$Kb}t*DvxghWMiyF9k1e6d$$H z%KC$K2)3ZXu~l+?U$nTcZeo#)^HPIhsZ@FS(b3pGL`E%KNbR%Y)6ZXVK!)2V%tD5M z0}_8<#os~1F5SN$015(}h+#}L8ZGhW*rB(rfi7V80=Sa{?mRSSe|k0rdpJ^`?T0pe zgYEz30Fe4#kP4{}wy1ea4XQ0+i?pZ)36-poeBLkgcg8Lo00wt3YZu+Npr+ng59`95 zupZ2r`}x_#us&ZOth2+5F@0Cs@cq9%0Hoh=1UVm&I-dX107B~DKirKHOdFsea0x3A zVf8zVMX}?JKV3o%uv(2@DCpPWKn1H({(pS{$f@RCf8+wE`r+;-cz>YZzo1ev0OVBT z?J|84*n zJVEonJph#3&mtHA9s>#j&-0ZU6s&B>C(!@f0U(~ys1%BCpY%!{QG#SoI6>UXXfojj za^CR{c1NEmvZpR8_a$$H3=W6f(+5n(F*b}v4uQwd&B>JFC5Q`#=p7;Xm&2ujRCq)J zT;M_JRBJ-RVqj~$?3WJ}$)6k!`B!Ta5@TY?e|SVF+|Mrir-3Hn$eie+@Ti_q`6Hal zKS465{38Ey2ij=F&K`9bi5|eE0UWo*0USSH9nV;wGIh#Sxq~PVaFiWXZYsONU!nMO zf#N5d;Ep||gZ%S!(7-{C0Vj`fLWjbmdPTTAAtamNo9vH#a2SZm?#O*;m^LIKF>VOu zmo_9cEN+Ngp2)v!&(lXZ`-*8kA3tipuE z5_@Ra`0~roFPjI438A`EY=-M9=D{3hf~TSL@C)by9KljlyJizqyE?(Dg!LJPBfg7(IX z@jdZ9#*5y5eIeSDp49)NF6X|6&%g37kh0xO8xVS8)G_7J3oHZWi{l2>ubawED7q>9;*OzGK-1 z_c3RWvuCxt1oqYNizIyKeCHzA8Q53Ti5)y<>9HT4yQ`!F4(gVq_q6BSdvL&dsUP>B zr^=p&1L(DI&B==!6hDO68U{Dv;(|MNFWBqYL`=+VxMP4-!Lq3nkQcG1e{#5{&DwDf z3xngpV0mG!wnbk%8Dib!& z-SJ`dUGE-hty=a}dHs&^c{etX{MXlwTbZ(awTKOOJ>yOL*WPQoCwlhZ-Zd1?vTbcV zBl9(myX!XL$78=rOZ zx|4HXw|)G8H(W~J@%R(*?-l9~jJCfo;jyPrA68O?7nUf6l>XzD?>xCNX2*x`tKP-( z9pxM99eMGFqYK|Y)5zFi0XEXr$F^k8tJ&H-+XXzcF*EFX)370@a}FPB-2AWSKAH1j zMxXhj-lJoOTIWq_j;xAqHaOz3=gt=hF58}8zn~3{xr1Zm4r6dY@mknOcV2jX@6Psl z%U#ViP~Q%^zIK_~#17Nh@Jn&0LVMyM{Mge1!~Ei0Q;=KIvuEZR7!qId{y|xFfJF|ANiO305S;4KV%L(M)HsS7Zl_VvMwG_)1W`F z!2E>tOkY1cy9wUU2*s7h^4z$J-+0+%qL&}u{A2%roR{i0B*b8@0% zv|5!~t3?PW^IOdcfqps0Z6F>=V4nu1>@vz=wWdh-)1d=nrdFGYi5?Wgkk(;@;u-T? z@pOOX%p{x;~i9dwrzzq~U=W=tk z+T2{Sr&c9CUZswYhYf51@jfVOd32DXcwKai(TIL>b16K6R8M8x3hj*5ssn>~(1Pvd z^as*~;|!&sawDgc_!kx)9g{ee_{6z}oXg4KF=Oml&taN8W_SU)qk1FrN#-~$X+|0f z;o6uqSnMl{AQOK(OLPR&XSL?#!x^3hl&>=6`6q|V--u7de}cq!!XqM8>ZD|OVK$XV zfiqoB0WVP_=?Buo1N|dFg@A%$j z@A%$fe{w(4v}u#ewWaM6+tQ|G@3Q@Hp`<8Xnd7Gw=OmFEKsy%*D=OXws(lTjw4aNy z>#WTraD5?TKhph3r|mfbz2*UC0-X5Y1-Y^tepOI@@kML!Hv?8l!TCNQ0RjfxWdm7o zdJ&vq1QK}J)YQ4{MJ*UQBqP^9U~wPQh57E-~mk-|JJRqzKYA*q~9_S{_x>1zl_V; zaNyaD@&l|g;Q*`5Oeu5>o~4drY-K9q z$TQ^uR#F~-n=Nc#!?E2BM}nFY0qAe9UtVa7H-|@PLsZf_%)XF|5hu+DZOzLa?Z60E z=?2>-Ym?v>_rTgo|A8%z-JQwZkpj#w$hURk`?jV)8QB{s18tow&=$}94U|_pz>2X- z=7k>w$OVbjK?hjjmac{)UAreXY}x(!BF?b@9)Q1H``!CiJD}fdhD}I-!+N^CQ7Vnb zZ0_t9wh315Mi!v0AhFuVGadG(N%*x6bR#H+l8c+$3l6vJMG^H^0$XjWDN+$%C>Qc1~VSg~Fb%r~9Bq$=KARYH*b z$xx@SDv39jRB?#uKoJ}-x#zZgk;Q_Aa{3Eki4w3sH7l#2P)R@Mhs*;Cr=&`wsVa$$ zC0wH^fvpHtB^W-2L*}Ab4!B)`b9r)JQcUUa z=PO)lG-YaP>Vk!24o9oO)_XaFV-u}TGKfDpy7@YK}Ap%flo z|B839O`9&3Pn(``t}^*QrQ*N!7IJRV8H3v1!u@CwqcqPmt&gjt38VCV0*0YXVUSV-RkDGkt3!|xe7_TzBBB)kRPPbO~$;BQLW@!e{F*kUlW zhDAqjGcC}!=`>!wr@Q-L&6FwnjYeZ`G9h5!-z*BZ)QR9=iL80-pLH zJsmEsFSSFtb=}&T*d6Klm1l-$EF2(qS$V@M_&+8N%X%Ceh-ua%wP=*TsHu> zjN%6R$mGamcp^i?!eISMeiGr4$vS;87@`817h*cv~qj81};pK=q4PX2F=NxC}NKiO?cd7A2@p!8;duuQCtXR z|D1kuPv*nH^>|SKhrKrsXzEJ)$M4M^mMnl06d^Y#M%>UUqCx;c0T&2La79pY>2%X} zMzjkFi$bfSh;6l-+D^wV)6&jNJGRqSX>dvL4p?8rb~-JzwYKS0v8`Lg2H-y;n(nI~ zk)APPgtY)ygAEu#cEOWVf&+XJ+{cd}F@pYh0`^1Ap@SwQ55nr9IwUMSX?RX<5-yKO z8ZMTvLR;vdDVbCrZ!K>qw?R=OvZf-O5eOzYC?s^yi0DC~RFWsB3<|xGb}=Ud;e`&$ z$sH6rZ+_^YY1xB9i{^$7Dw<0w(GS#xU_A6iMyw}&{o!6^f4#Z290u%f)E9|VtS=%y z&9nN}yIU)`Z~*Z7tks6m3)*c5q@!*VUyOIqD6QO?`Fr+5rjq>-->$tfnOAjQ_jB~6 z*h{evM@2C(5C=fCvwJnB90r<=CeD|pSmZ+)YEFWFZe zIAEu?R*pWE`c?F-|@gIzM|DOHBL-uRoY-pur^qW zJ!Dvdq>hhdy9&dHTLo&~Dxj45@4)--4*ZeO*1qq};$3@Ltm@It?sT_%8l@d)6Mv5W zx%X!X@9iaX-Tn>lRUV*`2bhf{=?CpitrS+;L^DCM52$n$lMZ4A)LR9{_7z4;dJ5yF z2c<{sQ^li(MC`!n_fNlg`oJ~lez9H&JHPZrL|7q`|o3gvl7eMbOQT5ybcSU#P;2{E&C;D3tPojNn5gCx^El#>ZrsX6#s%V zl_jDkJka4}=Rx}ytFOPfCrs+Ss=5B&+MW@9-zPB738;P3PWrxUyQHW3h*9n319b=L z%5j_&tp&{IW3f1|KN}0P5Kl42LJIvENbwcIrS$$c0-zD(%>uA1#r5WnSBbFrh@2!g z!1parV6P_|&&K1&rcX(q5)>@H0|pKlXfo;a_-@Aq+ynmUQYlfNKE-4*4@(?l9!4tR z(;mve8^8;w5~&RP1S0w=lqz-q$ar?dNRufg)nvlxAl{M|kK?kU4I4jdbUelj^nI-F z8=yn$BDD4~Vk8@%k{VB=3jv>vA2Bi>SC|CwAuxUl1lP~D=H$+vGig#G8?VvElQ7iy z^o)4cS`aX2z+VCUO`SSzs?Anp3kseQG+^Mu0WeO5(FS8Mj04$tYe76aXHo!cHbf0cFqwwmQXGC^48$vdA25sjOEA$I z%|txlUj~x#Z_Hx2#9ugLd~|dE3;Bb*36zIlMBo++lWFcelPMbc7L9y}E|`bs1~&?R zX`XK~6%3+38(%Oe9*cp5H#m=tADkD@CYT5}&;KBPeawa^!3?}S$YRbL!p5716TVna z0_hOccd!={Joy9Fbe#+QSQWYM05~^+4QG!bW3tkVSScvx`!z3d+q`^ zy!+hh-96`ew(UOWy`;b5i>32oRH=ok?PHShRl%Niz*uVhRt4=wYJKAB+xBW@`qGsLDj&|Rh=A5)w{~Use)hfBvgO zXIwt}S9bd#OIcY=48G;Pdf?UQXA!;VK;kI)I0y~CwST$QEDHP-uTYpc+;^_;1v7NT zOy3Jz4)_kbuU+!t!k9}KAksKky087*K{pBdpJPu+3D=D_N-s$xY4G?FMh-{uWq-7B zv@tGG7afA(Ww1)Aq%Zv~A*$rWp7x%0tmiQYnJ#9vAm~rSC>beUC8L3;zhu~wtN+0& zNC?pnm=7LIOeFeZaSYhrqEeO~yyc}3`o7?41@;n5K|fM%FI+@Cb~t+ftI8pfxW64S z;0n2D4XOiz0L75n3L`K<%2(`$|X0D+kgt?y5de{XPD#;{U=E z+qI8I#p+}6i6d=ENrwH-+@6M=m+LOq^w#ul^i+Ahz11h1uQhk#-+})j3`f$tO47eL zSVC|57q~TjVA9wLW6IaeUDJ8|$rC+2r%v5H^Ix0K*1PM!-}GH;z#mlXdqCsh!1%x+ za-A9hsy~9sflVH-U^?WLN|YYSRjG&Gn^Xxli=s~L-ulMl_^SFiN#1`0R|4VtKGhVX zuj`Ahw1b$xNHGV%i>slPy%<4XIUo9J=+)3yuU)-xHT0+JjP+}@u{Z_;K=bASc%-=b zEgX%zHdd*M)hbnV5ga`Me+mfrR$yNgZjX;07_HVSV4;A878WsN;l~rzNJ9WG3EQqB z4KQE#Cx$yHR2$o`KbEXx2ZhGc-ShtVTvr4B{i>1E#+u?{wS$LfW8;Sso{@{yn&Pyv zgNMZ8Qb7n8yy*$h30T5B48LLipH^5T0HE_b+Vl*q85GTC(DegF;ur-a@Lx~=s8I>S zM~#XfY8E|e@u}1@A$j5?0Usb?_~_B`Lr0I+`U6lX#*L%DHg^1Y;e1 zNRPQsdJumz;y)}9f3V`F_}p540_|%+r2>urjYlZl7(@#f5)0ez2l;;I`@&b?JC8AS zq<@|%%sNr04~X802)!f@h~B_94BR^LSKo_g-oJ3*3ju@Hr%{1~&_w?SejxWITuve2 zdF_q^>0cPn>FC0AS}SsBE0a@gn{P%fme@o zp2t;V*L)WQG%@uh0TQ-XUzuxr{gqk&qHv|LOY#hv23vfPhMM8A3MI0kffBa7aHxNN_+64w1@2g2N*M?sE7i zA)Wyra5LR2Cc( z9?>`6Vmd8Xx^gVP@5mcbdJkA^*$o}n*wvgr)}7Q;C* z^o*0$G0wLbo=LZS$iErK!9up@^r4EwGE>FjUQ=9LsPQKa%U=#_?mkuFwHhUcFZUb2 zfH#dyFJqGSM1>kX3MrT4Yt^)BG(qrqN^a}{U5nuYcQ&1sQAp=gjXyTIQ+e*kbd4gR zBw_BM)0`C)26%nu{-*E&rf>@9yeF0S8qD&;3V7vXGcIsCCq>XIkmznc6>422+p0$CQH*Y&rn&@CklPj6h z^eUz_rs{{oj*1jBJI=DL>kUn;jq3Ej+jR zI6H#jYbRB>(|CT}6ux_k#)@FMKeQ+yQ=B(NaqTVoyQc8AD9v9eI;V`y-G+D9r%=#3 zLQL}Up$}13r66FUP@akCH+8*1QGCu->)5o(UcbSS?8QMVe2NxPJ3e=c)z)ROU+Je zq-Bc98o3fc%s?;-d5FZCzz0)tA$JeY22=I61i6p4xm|4*pZiFg^ORBl*DUT}Eh`n8 zgx0o-3rW7yJ-HVwU0u0cjZ@#5#Y?AJWbg}wvj@>Gc#gE~GkQGBj%Sn0bFk6Gpa7w& zd(Iv7#=3hB8bbqqEfV*+gO+ba#QtXfrz}tWLGQQbD;gtE&UfW@pD%X~8%%9?h42ck zxBx;z!eY3zJ4VKYg@g4@$&cW$>La>DsN* z)AgT=KR3)ebhcKseqcBM=HttmMv>F{jPnJg(L-kx3V zv}GfvLg?n5e?DjPlKh#jC64p-V#i4UrAOXeMHncdETVbiK`~8p0Mr? zM`GQ`Z3#Pv?isKx$`QG`Uul?Cn;w#=Hp+D*8xWb^+UAis-9b)|!s*sHEqmOI(=Bsq zB%lw2%IOYqg0h8$M?@bb^DK+z$t|G_LRm!<7R1S#k$-Um!pl*FQ_+$cPr3SXTc4iC zF?Ha)GsobOG`p?5N7n4l=eh7~eGV^nGOz~+K8Q2+4tFssSx5y!I1L+pcECe6@1DVT zyZFd#1e^bj)Tly3<@L3ocw6{NGWS#gPx0y! zHSUN`#Q5DDbp?3i@*HaOG6(r#gAu2uuD^8sx$95xAcV*zcD8=d_9{_gJ z>zE2;JS)Qx<03{b8uhx?3GbVOPai_h+Js)cxf@>K_$}hX&zg>pIG*9hy)v_!|1y_9 zm&->@=RVF=s}ok-_ub%G_fP+N=Ka(EGSfbzV&+FPJoDSVM-!#3m9Exi7kBsZgtv_f z{ctAAa8V!2L{%J?mUxC9Z%kCRK8jkF&AVD%O{91hpD5wdrc-%T{LOf|^|*`65=`p3 z34cqz_|UtF|7vY;-7)*%x4y}#C2O}l+4i-M>)EQGKOKWb)U?2WJ)l~AUD;hZUAZn# zw$Q)7GTmU}?r*V3-MiZ#aX;Puu=}ZY#X61j5PxNQbExq$xPuOYzjJyM9O34&C{f9{ zJx+~YAAy0+^bmu>uhFw)4h_}+%SZM&79bec?=ybxI+Wy#I)s9sYLxR)vjiHT?rwIm z|MCId^K|=to~PPZdUm&a8FQqUH4pMi%yC|+d03J!5G~hmWDa)Pstw;qkPa z`bIEg$+z(JZr)#!X7#tk;q1rJVMIg z`$COB+>HClT}#1rO&D?oV}F+>3>m7w&_Xdk-O<6nGP4_h#HkzEqb@G&M)(xumrhD# zl8;9ES6rG1!aCv%V4VWiDZ)D5-5fU%xl6v)dNbn>g}*kF4Pv+@vv|cUO^|}+8c7FF z3MpSa15{jxPOsyw2vp9fK?VVyy-`=+bpc-!1ay7lEQ)0ld9|8D(tI7M5lQrhO?qo;hz2am><-P1=jCn6Q8BN|^CnL-I%*l9X zMYRAt(gNfD7C2mJftM>S@O-TWXxAsI!9BB-I5{BP>pQy7+(~%|Kf?_yP0b8PaH>_N#`k@RM21)DlVF4?6J9ARp@nZB zObiyj83{@rOu|wo-Iposney>ZTRHy-5M}bOXfrM-7`~-|LkSax)My^{Dr&?~inw%# zK0Tk6Me`dCG)p*dpnPN_STxq0KA(!1f>BrKzxz9Xe)fRV{Jhy1MK0vg9P;aDcY|I+ zSU4t;S8fo;6wlx%&L1w~$0YZ>mHmy={F7xf21Bi@jS;QujIq>ybp6%6shxkd0E0&t z!b$OtrYeeYeMKIOsi?ma%P7&zgs`D^9Fk}zYo&36=jrtFl8AzSvaR7^iXhy2Mk0j< zDL;wX9gB+sO^4NUyxxQKU|)!o9)=N&UN5%M;j!EMaEL!wz&|${vB$u^^iKVw`B3@g z$^K})Z{Je0z0pct(bHB81ktt9AST^EWYjlWx%PURhi^3StFLpND#AThn!7AMA#&cr z>;L4m*uzer=3a2JT4HW@g+fM|@`688G+Hzr+@G9DKX89`CY|j*jkZ=~UN^XRzBS#b z4RFu|4vsVEE%jh%g?m6JjetLoYxNRS`Tt5Kej+$(3(ZQe*Zh<7WIl$4fM{%})x2Sw z%NxFLeBFw{C91I}xU<9)(ur%fnbt|I11;V}c3pX#4COY-he^6F`C)Jn^f61sC;*96 zglWPsF`~)uOUw1l6DWQd%3g}(J}AK-rpQ z%}d_QSlYa#dF7gAYu=m!+cirbD7e4ifr3myzh*h?{n|J8E)xv*7c5zmxpxWam%IrT zZ|0JM-!@Ena|#*W%-mZBQm}gS{M04C&CJ}pCgc2+hGlD(W@VkvINlB7OWw@NY*;l)zYlAs6{`0Hp-eo zb-lFpA#Haw)Hv)rwmi0_{)sKt3*Yp#rX4n9o6diuZJj{ce3Q$w5ChO{PP3GAI8SrE zz3Qx4-B|GIIJC~R-ULTe3KG&}im<3E^9P}mK5kJtviljoz=&iKf0IYgBHnb?2wT73 zGtI|Oa|`)#?&Nmukfk23g@;Io;qImdttm7cH-_{wt|IIY;!D%qQd+?70rEip>1A8nQeYZSWyWgdgseAMfaqa6qOr?7Oh)w zN6~ty4?^976x1UvkC$W>?S%RalJo4*okhE$zHlMG==Z>V5&A#;SYPxy(%FQB?ng@B z{lsp2zp&2s!RuwVgPl*=n&J1u)gRfM2%`nz9s=Is%)5(@z}zVhmb=7r_E%vIq#+}x!HBU6wG>H1D znuZ;lY632s9FNy*sfL?~RnxG!Zc|;oAFZlplcPFd*s!Cjc6*(}Po!?k7DuI{!Ctq0 zlVeM@wQfsw-Nt%5mO>h996PMr9UC?@1P~kQcQn@6FIh$PvR}R8S3Q39s$cE(tJnOh z*RT5g>ZOYTO@QL10Le=MnwJ7ZF9oPx3Xr`NpnJ({-HvMIkDRZM;qt}4hCnEn1EE|F zgmO6$%H^v!*u9~?fqI+Gjo)sruit{GRy}5K+_7a#%_f0pRefWlV`GhV`?uS_b->nI zh&3ZSvSZ_p8tV?qh>eKRmTLP}M`Nw%h>WReAmk18j?I34Z%2Stjr9#X5r0Ru6}(5r zH@~3w6)e=RsXGZx_z@_%XVZeWsReu&b|vvRn{9tf$+9cK$L}B z8m&`S_}<^;TQJyz)*NkDxOc2EmQx*~h2L#7u9YqsJ13hTqv_Y;wmR z%T6%_bFpon_+!GjBcHo-u3DInZ_KaF2E~15%{%7kl>IbR5ReXGp^Qjlo%JoIxykVL zAx=U|;Glq&GfjF0CS=(9X_O5gj~6LwD)X_@{k4m_xLf>nB;>b_Q7{RM7ArXERrJyre(oocwq5(9rYFdCkYWT}@q^J;l6eWw^uB z&<5=V%(VGG&O3j&5Cb4+n%u>_;pFLBWE7Y~Ej5j=!M<+HG%sj$@y?#jtrPA$tjj*{ zRblb?53>zYzEbGogmrQBeD0XzmPxdd5pz60wKa_koi9YCHNz;uI02niYnrQkHDfDU zv7#(%S61B}w5E8+t~;3WwJS=YRc|AU^50pRUEB0oQ>_vs5d33A(PV<~gz zJnODq64PK=R-FUZAt4fpRH_XLk9nY??O5cX2kZviSYRGKEjuFv&UkQ`OPQRuXyxv& zcAwt-(>l9K``hxXn;w~(c85ko?nJ@qyzlNiEZEr|UH-_xoA5>KEc=3$CCf^d51wp@ zRcXu1uRI#S$FN?i#Fy#l@R)uYwM-eL4Gs;Dju@y_DP=TLl}e*y(}qTeo6|;395vaD z;~qm(O=XOy=F6<-}zhVk7;Ga~A2dPS>A$FyG_hs@+*n}@q7#)x|cAWzMa}xK^ zLX7USTPJMWMm0Rat;O7I9G`GOKa7^PQHjsr7tiR+iibrdxOIGmThDv6ygr=gf3wgt zj@QSKhMUkS%uFN}9ZJvoeVCJk@kTTtVLU%?A(l*_{%bs%fPKbbUb!e)!EGs~<*_h+ z5(?O)dsjw9(L^ver2{39#{c*5$HjH^eJ?TS?HYE{eGFFXjs#}2qXAu+V0z?!NmXs# zW9Z8OtS?Mrwma%J)i(%k@^ne{jwb~zfGSwP^BeEYVK>!pa`;WQEo^mtL)~`Km=PnX zYN*@t*rpn?kZL8{x7IiMeKxrtX&2U{dc!a9&o4S}VLyF#5txyU`ncaBG5*f8y{*p& zqM^qFY+(hqaCMYs__=_!qznAPB))l(B^mrW?;d*mynA~a*okjEP43)d?#J8s*ohVg zwEWPCd{i;_$Ri3l4M{Q9e|`}LsGr>n(>{yTz)k>jT{I2&AeG;i$g>k@@cyn*Sf+!= z{dvxl<1wK?JWU9ooO|G7a2ByZYpl-@vRGft%`evH@w~oRUwaCWE2pnqem^sLT2Ijz z^NTFp37>vGk9OkpA!^*aUHE83WhB3t3ltWSJlV`I7K@KaOt2wJz{W?8RD@n!=qmPe z7Rqmme_LEpyrXzm@pHv56u(sbTJfKX|62TBadYwE;@0B!;*R1^izA;(Pq0S5m!6;x zvPPaFeQ*ZAAObc5O9?zo;4K0t2&kt3gb_$5@LK{k1l}Xy0^oO8)?s!l^+dOMdq4WH z1m%60{(%xIlKP@09p7;|W%{?4xHxl}eq@_CP4|?wa}n+QlO@@nJKMQaZP4X&quM-! z+74qUi6=%-)|ukgmvbZAfQ%{--R9!vmFb_mg-}DA_dv1)D<#jCTp$WV1l02ao(F!D z%k-mwxvEdtX#Jlp;S$>fKc=NFZe5u^A4*-Bz8=a;Vj%m=^vy6GEz|#VnMEZ8Z|*~6 zkHtI%44>oH^8&Bh9GwF<6oxM3HlkYNK>hT1%Jd(Ypwr!}VKBxZ-1;q7xcbYubh6;6nrQ zn`q+MY>*F#OEvbM4-Ykd!|f~sg3DK|Se&yse{t2~-HZRQ_%DlJTYO~kLyIFz{ z3AO`-(UySL5=+#<3bYve%t42QeybTB7aA1q=<=uv7x(j0u#QcnB1c1*k!{qO6&DWJ z7b7<-Q)7b6k{E3VH=zxm9N~x(dHexa#W%{M*@v)BbET<^u_Sge3SEpUVQ%Xbiw?^l zM$xWyz#!ufa^p7vb5qw9e)^JT`BB56CilQL{^`u(~0(hE0}J$ zi#DR!Pesm4mh5u@OmK1EmLU}9^d&!aVC+R-m-S2?m_{F=>y{W4ETcnl5XR!r zgeoFTDRSdgtY2QReASiS4dkY-?5i&Qyn*PV20r*_<7Jn?9d!qP&ysGwc8RNll8JO% z99^s8G{%HDTwkXzT~Upd(g9s}(rTki;n3)?zJ*0mjjoB*t8(KHE)FYi3=^)W&W|3L z$Y7EygP4$Ty;ROJLFmeZl;J_rAV#JNmTH5Ua0Ph_hG%$@NXZK;4N`>%!3JI=Qg~5H z8IDx~U8xW$Gg#BZCl2^lDzFHsL@-hnNHL;6Rz+7K3yo4K(3~P8+tKeD9iZPSQ zDR7ESxLTrR6cm(9rd1Ne-1jFGV)6(hw$$WuzgJFzoLPk%h?t6=8^8h$;*z3JD4W_TV51 zIfhE)$`Dnk1l#!_X)8z_ZIUzxA=eO7WehVDkgYy`_H9*`}MP7e)-I9_Fx6w=iRkF8|Iew{x7z= z3Nyu z^F!L#>tLQ~R0&q4Znv&~|Ngk2D?B{BfB$e?dPgp6r#oPOd~~5bQ+2?;>poE}(2DAWOi^ukP*k73 zS5y~EM74dPsQTuM>VhayJ-I|wAM(>Fw4YBP`k!Z?Pw0p6KF^-L^i28z`_2b9Jt){u zYoA5x_ItlCCUtkhf+$kQm*2aB)PF3!AlN@+=@>%h!puiUk^1@4UK^>qCqE@2_1y*M zaz*v&0i^n}Cl--TtS4q5w3coPI7Eu&2_gCT1Gt4(EFf0_pk13oT zG2vInKW5%+!)!y05PrI04&L;6zb5_Z5p(dS7gGAIh5|#uJnOH*w?-616ckzuDgA-6 z|7*ez;86I1^8ah_133R*g#W)Se}S_2YvLaWlhPk3i@ydxQ06K9f%^Mv@B?+0!cU1v zjj%+F{Z;kPWQa2iHjEYO-^_?vxVt?6SC#)EhIqqJgIOs5iz1367Dtr)D*R!F1jBH{ z2%-FsjTjj*Dq{4n!XJwh8t6HN@B?)r?fW50yxC~KwY@C_5AP50i3?&|3;a< zQ78UqyBqcIMxFXKcE2X9f9JPPv;6-{?FZ$bte9AIYRrF1{0HS1GoK!CF7-dV`?CME z_CLG-0uO7g+Md|1w6?Ui6ujcPX+?GUuJTG70qWR;tb0$->@?iMRWNs`=j;-3gHHRTC?&>MYU)a zUbS?Hu07fw?Z14Voul~Exh}|q+8ua>b7JC2F=161+t9qeUR)s1bLO(M zw~_>DvXG>!^l8t;I@2ocBE^RxWMBnurC1^0;PjcV)b}v{7Qb0^UjaMOKjRDW#Xx$g z-EU5Y3%$uc>*{Sib-r&Z8g~0C$Wf)%jnSRZ#o~4i1;S-WM4I}F`ikqy#4%U8uRw^% z&GEU_OyLn7+D;b;oAE`Tu{fh4j5zv?AUuQwi1=T4`ZwvjHNHg2a3;m+t-Q{->St