Something went wrong. Try again.
MIRROR: javascript for 🐜's, a tiny runtime with big ambitions ant.themackabu.dev
Something went wrong. Try again.
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372#include <stdlib.h>#include <stdio.h>#include <string.h>
#include "ant.h"#include "cfunc.h"#include "ascii.h"#include "errors.h"#include "utf8.h"#include "internal.h"#include "modules/uri.h"
static const unsigned char uri_unreserved[256] = { 0,0,0,0,0,0,0,0,0,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,0,0,0,0,0,1,1,1,1,0,0,1,1,0, 1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0, 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,1, 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,1,1,1,0,0,0,1,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
static const unsigned char uri_reserved[256] = { 0,0,0,0,0,0,0,0,0,0,0,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,1,0,1,0,0,0,0,1,1,0,0,1, 0,0,0,0,0,0,0,0,0,0,1,1,0,1,0,1, 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
#define is_uri_unreserved(c) (uri_unreserved[(unsigned char)(c)])#define is_uri_reserved(c) (uri_reserved[(unsigned char)(c)])
static int is_valid_continuation(unsigned char c) { return (c & 0xC0) == 0x80;}
static int is_lone_surrogate(const unsigned char *str, int seq_len) { if (seq_len != 3) return 0; if (str[0] != 0xED) return 0; return (str[1] >= 0xA0 && str[1] <= 0xBF);}
static int decode_escape_sequence(const char *str, size_t len, size_t *pos, unsigned char *out_byte) { if (*pos + 2 >= len) return -1; if (str[*pos] != '%') return -1; int high = ant_ascii_hex_value((unsigned char)str[*pos + 1]); int low = ant_ascii_hex_value((unsigned char)str[*pos + 2]); if (high < 0 || low < 0) return -1; *out_byte = (unsigned char)((high << 4) | low); *pos += 3; return 0;}
// encodeURIComponent()ant_value_t js_encodeURIComponent(ant_params_t) { ant_value_t result; char *out = NULL; if (nargs < 1) return js_mkstr(js, "undefined", 9); char *str = js_getstr(js, args[0], NULL); if (!str) return js_mkstr(js, "", 0); size_t len = strlen(str); size_t out_cap = len * 12 + 1; out = malloc(out_cap); if (!out) return js_mkerr(js, "out of memory"); size_t out_len = 0; size_t i = 0; while (i < len) { unsigned char c = (unsigned char)str[i]; if (is_uri_unreserved(c)) { out[out_len++] = (char)c; i++; continue; } int seq_len = utf8_sequence_length(c); if (seq_len < 0) goto malformed; if (i + seq_len > len) goto malformed; for (int j = 1; j < seq_len; j++) { if (!is_valid_continuation((unsigned char)str[i + j])) goto malformed; } if (is_lone_surrogate((unsigned char *)&str[i], seq_len)) goto malformed; for (int j = 0; j < seq_len; j++) { out_len += (size_t)snprintf(out + out_len, out_cap - out_len, "%%%02X", (unsigned char)str[i + j]); } i += seq_len; } out[out_len] = '\0'; result = js_mkstr(js, out, out_len); free(out); return result;
malformed: free(out); return js_mkerr_typed(js, JS_ERR_URI, "URI malformed");}
// encodeURI()ant_value_t js_encodeURI(ant_params_t) { ant_value_t result; char *out = NULL; if (nargs < 1) return js_mkstr(js, "undefined", 9); char *str = js_getstr(js, args[0], NULL); if (!str) return js_mkstr(js, "", 0); size_t len = strlen(str); size_t out_cap = len * 12 + 1; out = malloc(out_cap); if (!out) return js_mkerr(js, "out of memory"); size_t out_len = 0; size_t i = 0; while (i < len) { unsigned char c = (unsigned char)str[i]; if (is_uri_unreserved(c) || is_uri_reserved(c)) { out[out_len++] = (char)c; i++; continue; } int seq_len = utf8_sequence_length(c); if (seq_len < 0) goto malformed; if (i + seq_len > len) goto malformed; for (int j = 1; j < seq_len; j++) { if (!is_valid_continuation((unsigned char)str[i + j])) goto malformed; } if (is_lone_surrogate((unsigned char *)&str[i], seq_len)) goto malformed; for (int j = 0; j < seq_len; j++) { out_len += (size_t)snprintf(out + out_len, out_cap - out_len, "%%%02X", (unsigned char)str[i + j]); } i += seq_len; } out[out_len] = '\0'; result = js_mkstr(js, out, out_len); free(out); return result;
malformed: free(out); return js_mkerr_typed(js, JS_ERR_URI, "URI malformed");}
// decodeURIComponent()ant_value_t js_decodeURIComponent(ant_params_t) { ant_value_t result; char *out = NULL; if (nargs < 1) return js_mkstr(js, "undefined", 9); char *str = js_getstr(js, args[0], NULL); if (!str) return js_mkstr(js, "", 0); size_t len = strlen(str); out = malloc(len + 1); if (!out) return js_mkerr(js, "out of memory"); size_t out_len = 0; size_t i = 0; while (i < len) { if (str[i] != '%') { out[out_len++] = str[i++]; continue; } unsigned char first_byte; if (decode_escape_sequence(str, len, &i, &first_byte) < 0) goto malformed; int seq_len = utf8_sequence_length(first_byte); if (seq_len < 0) goto malformed; out[out_len++] = (char)first_byte; for (int j = 1; j < seq_len; j++) { unsigned char cont_byte; if (decode_escape_sequence(str, len, &i, &cont_byte) < 0) goto malformed; if (!is_valid_continuation(cont_byte)) goto malformed; out[out_len++] = (char)cont_byte; } } out[out_len] = '\0'; result = js_mkstr(js, out, out_len); free(out); return result;
malformed: free(out); return js_mkerr_typed(js, JS_ERR_URI, "URI malformed");}
// decodeURI()ant_value_t js_decodeURI(ant_params_t) { ant_value_t result; char *out = NULL; if (nargs < 1) return js_mkstr(js, "undefined", 9); char *str = js_getstr(js, args[0], NULL); if (!str) return js_mkstr(js, "", 0); size_t len = strlen(str); out = malloc(len + 1); if (!out) return js_mkerr(js, "out of memory"); size_t out_len = 0; size_t i = 0; while (i < len) { if (str[i] != '%') { out[out_len++] = str[i++]; continue; } if (i + 2 >= len) goto malformed; int high = ant_ascii_hex_value((unsigned char)str[i + 1]); int low = ant_ascii_hex_value((unsigned char)str[i + 2]); if (high < 0 || low < 0) goto malformed; unsigned char first_byte = (unsigned char)((high << 4) | low); if (first_byte < 128 && is_uri_reserved((char)first_byte)) { out[out_len++] = str[i++]; out[out_len++] = str[i++]; out[out_len++] = str[i++]; continue; } i += 3; int seq_len = utf8_sequence_length(first_byte); if (seq_len < 0) goto malformed; out[out_len++] = (char)first_byte; for (int j = 1; j < seq_len; j++) { unsigned char cont_byte; if (decode_escape_sequence(str, len, &i, &cont_byte) < 0) goto malformed; if (!is_valid_continuation(cont_byte)) goto malformed; out[out_len++] = (char)cont_byte; } } out[out_len] = '\0'; result = js_mkstr(js, out, out_len); free(out); return result;
malformed: free(out); return js_mkerr_typed(js, JS_ERR_URI, "URI malformed");}
static int is_escape_unreserved(unsigned char c) { return (c >= 'A' && c <= 'Z') || (c >= 'a' && c <= 'z') || (c >= '0' && c <= '9') || c == '@' || c == '*' || c == '_' || c == '+' || c == '-' || c == '.' || c == '/';}
static ant_value_t js_escape(ant_params_t) { if (nargs < 1) return js_mkstr(js, "undefined", 9); char *str = js_getstr(js, args[0], NULL); if (!str) return js_mkstr(js, "undefined", 9); size_t len = strlen(str); size_t out_cap = len * 6 + 1; char *out = malloc(out_cap); if (!out) return js_mkerr(js, "out of memory"); size_t out_len = 0; for (size_t i = 0; i < len; i++) { unsigned char c = (unsigned char)str[i]; if (is_escape_unreserved(c)) { out[out_len++] = (char)c; } else out_len += (size_t)snprintf(out + out_len, out_cap - out_len, "%%%02X", c); } out[out_len] = '\0'; ant_value_t result = js_mkstr(js, out, out_len); free(out); return result;}
static ant_value_t js_unescape(ant_params_t) { if (nargs < 1) return js_mkstr(js, "undefined", 9); char *str = js_getstr(js, args[0], NULL); if (!str) return js_mkstr(js, "undefined", 9); size_t len = strlen(str); char *out = malloc(len + 1); if (!out) return js_mkerr(js, "out of memory"); size_t out_len = 0; size_t i = 0; while (i < len) { if (str[i] == '%' && i + 2 < len) { int high = ant_ascii_hex_value((unsigned char)str[i + 1]); int low = ant_ascii_hex_value((unsigned char)str[i + 2]); if (high >= 0 && low >= 0) { out[out_len++] = (char)((high << 4) | low); i += 3; continue; } } out[out_len++] = str[i++]; } out[out_len] = '\0'; ant_value_t result = js_mkstr(js, out, out_len); free(out); return result;}
void init_uri_module(ant_t *js) { js_set_global_builtin(js, "encodeURI", Ant_Function_CreateWithArity(js_encodeURI, 1)); js_set_global_builtin(js, "encodeURIComponent", Ant_Function_CreateWithArity(js_encodeURIComponent, 1)); js_set_global_builtin(js, "decodeURI", Ant_Function_CreateWithArity(js_decodeURI, 1)); js_set_global_builtin(js, "decodeURIComponent", Ant_Function_CreateWithArity(js_decodeURIComponent, 1)); js_set_global_builtin(js, "escape", Ant_Function_CreateWithArity(js_escape, 1)); js_set_global_builtin(js, "unescape", Ant_Function_CreateWithArity(js_unescape, 1));}