diff --git a/src/ecmascript/mujs.c b/src/ecmascript/mujs.c index 952416baa..cc0f5507f 100644 --- a/src/ecmascript/mujs.c +++ b/src/ecmascript/mujs.c @@ -39,6 +39,7 @@ #include "ecmascript/mujs/navigator.h" #include "ecmascript/mujs/screen.h" #include "ecmascript/mujs/unibar.h" +#include "ecmascript/mujs/url.h" #include "ecmascript/mujs/window.h" #include "ecmascript/mujs/xhr.h" #include "intl/libintl.h" @@ -143,6 +144,7 @@ mujs_get_interpreter(struct ecmascript_interpreter *interpreter) mjs_keyboardEvent_init(J); mjs_messageEvent_init(J); mjs_customEvent_init(J); + mjs_url_init(J); return J; #if 0 diff --git a/src/ecmascript/mujs/Makefile b/src/ecmascript/mujs/Makefile index cb2566d8b..0be19c49c 100644 --- a/src/ecmascript/mujs/Makefile +++ b/src/ecmascript/mujs/Makefile @@ -2,6 +2,6 @@ top_builddir=../../.. include $(top_builddir)/Makefile.config OBJS = attr.o attributes.o collection.o console.o css.o customevent.o document.o element.o event.o form.o forms.o history.o implementation.o input.o \ - keyboard.o localstorage.o location.o mapa.o message.o navigator.o nodelist.o screen.o style.o unibar.o window.o xhr.o + keyboard.o localstorage.o location.o mapa.o message.o navigator.o nodelist.o screen.o style.o unibar.o url.o window.o xhr.o include $(top_srcdir)/Makefile.lib diff --git a/src/ecmascript/mujs/meson.build b/src/ecmascript/mujs/meson.build index e758c52f1..cb85a6ad6 100644 --- a/src/ecmascript/mujs/meson.build +++ b/src/ecmascript/mujs/meson.build @@ -1,2 +1,2 @@ srcs += files('attr.c', 'attributes.c', 'collection.c', 'console.c', 'css.c', 'customevent.c', 'document.c', 'element.c', 'event.c', 'form.c', 'forms.c', 'history.c', 'implementation.c', 'input.c', 'keyboard.c', -'localstorage.c', 'location.c', 'mapa.c', 'message.c', 'navigator.c', 'nodelist.c', 'screen.c', 'style.c', 'unibar.c', 'window.c', 'xhr.c') +'localstorage.c', 'location.c', 'mapa.c', 'message.c', 'navigator.c', 'nodelist.c', 'screen.c', 'style.c', 'unibar.c', 'url.c', 'window.c', 'xhr.c') diff --git a/src/ecmascript/mujs/url.c b/src/ecmascript/mujs/url.c new file mode 100644 index 000000000..de5a720a6 --- /dev/null +++ b/src/ecmascript/mujs/url.c @@ -0,0 +1,606 @@ +/* The MuJS URL object implementation. */ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include +#include +#include + +#include "elinks.h" + +#include "ecmascript/ecmascript.h" +#include "ecmascript/mujs.h" +#include "ecmascript/mujs/url.h" +#include "protocol/uri.h" + +struct eljs_url { + struct uri uri; + char *hash; + char *host; + char *pathname; + char *port; + char *protocol; + char *search; +}; + +static void +mjs_url_finalizer(js_State *J, void *val) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)val; + + if (url) { + done_uri(&url->uri); + mem_free_if(url->hash); + mem_free_if(url->host); + mem_free_if(url->pathname); + mem_free_if(url->port); + mem_free_if(url->protocol); + mem_free_if(url->search); + mem_free(url); + } +} + +static void +mjs_url_get_property_hash(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + + struct string fragment; + if (!init_string(&fragment)) { + js_error(J, "out of memory"); + return; + } + + if (url->uri.fragmentlen) { + add_bytes_to_string(&fragment, url->uri.fragment, url->uri.fragmentlen); + } + js_pushstring(J, fragment.source); + done_string(&fragment); +} + +static void +mjs_url_get_property_host(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + char *str = get_uri_string(&url->uri, URI_HOST_PORT); + + if (!str) { +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s %d\n", __FILE__, __FUNCTION__, __LINE__); +#endif + js_error(J, "out of memory"); + return; + } + js_pushstring(J, str); + mem_free(str); +} + +static void +mjs_url_get_property_hostname(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + char *str = get_uri_string(&url->uri, URI_HOST); + + if (!str) { +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s %d\n", __FILE__, __FUNCTION__, __LINE__); +#endif + js_error(J, "out of memory"); + return; + } + js_pushstring(J, str); + mem_free(str); +} + +static void +mjs_url_get_property_href(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + char *str = get_uri_string(&url->uri, URI_ORIGINAL); + + if (!str) { +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s %d\n", __FILE__, __FUNCTION__, __LINE__); +#endif + js_error(J, "out of memory"); + return; + } + js_pushstring(J, str); + mem_free(str); +} + +static void +mjs_url_get_property_origin(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + char *str = get_uri_string(&url->uri, URI_SERVER); + + if (!str) { +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s %d\n", __FILE__, __FUNCTION__, __LINE__); +#endif + js_error(J, "out of memory"); + return; + } + js_pushstring(J, str); + mem_free(str); +} + +static void +mjs_url_get_property_pathname(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + struct string pathname; + if (!init_string(&pathname)) { + js_error(J, "out of memory"); + return; + } + const char *query = (const char *)memchr(url->uri.data, '?', url->uri.datalen); + int len = (query ? query - url->uri.data : url->uri.datalen); + + add_char_to_string(&pathname, '/'); + add_bytes_to_string(&pathname, url->uri.data, len); + js_pushstring(J, pathname.source); + done_string(&pathname); +} + +static void +mjs_url_get_property_port(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + struct string port; + if (!init_string(&port)) { + js_error(J, "out of memory"); + return; + } + if (url->uri.portlen) { + add_bytes_to_string(&port, url->uri.port, url->uri.portlen); + } + js_pushstring(J, port.source); + done_string(&port); +} + +static void +mjs_url_get_property_protocol(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + struct string proto; + if (!init_string(&proto)) { + js_error(J, "out of memory"); + return; + } + + /* Custom or unknown keep the URI untouched. */ + if (url->uri.protocol == PROTOCOL_UNKNOWN) { + add_to_string(&proto, struri(&url->uri)); + } else { + add_bytes_to_string(&proto, url->uri.string, url->uri.protocollen); + add_char_to_string(&proto, ':'); + } + js_pushstring(J, proto.source); + done_string(&proto); +} + +static void +mjs_url_get_property_search(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + struct string search; + + if (!init_string(&search)) { + js_error(J, "out of memory"); + return; + } + const char *query = (const char *)memchr(url->uri.data, '?', url->uri.datalen); + + if (query) { + add_bytes_to_string(&search, query, strcspn(query, "#" POST_CHAR_S)); + } + js_pushstring(J, search.source); + done_string(&search); +} + +static void +mjs_url_set_property_hash(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + const char *str = js_tostring(J, 1); + + if (!str) { + js_error(J, "out of memory"); + return; + } + char *hash = stracpy(str); + + mem_free_set(&url->hash, hash); + + if (hash) { + url->uri.fragment = hash; + url->uri.fragmentlen = strlen(hash); + } + js_pushundefined(J); +} + +static void +mjs_url_set_property_host(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + const char *str = js_tostring(J, 1); + + if (!str) { + js_error(J, "out of memory"); + return; + } + char *host = stracpy(str); + + mem_free_set(&url->host, host); + + if (host) { + url->uri.host = host; + url->uri.hostlen = strlen(str); + } + js_pushundefined(J); +} + +static void +mjs_url_set_property_hostname(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + const char *str = js_tostring(J, 1); + + if (!str) { + js_error(J, "out of memory"); + return; + } + char *hostname = stracpy(str); + + mem_free_set(&url->host, hostname); + + if (hostname) { + url->uri.host = hostname; + url->uri.hostlen = strlen(hostname); + } + js_pushundefined(J); +} + +static void +mjs_url_set_property_href(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + const char *str = js_tostring(J, 1); + + if (!str) { + js_error(J, "out of memory"); + return; + } + done_uri(&url->uri); + + char *urlstring = stracpy(str); + + if (!urlstring) { + js_error(J, "out of memory"); + return; + } + int ret = parse_uri(&url->uri, urlstring); + + if (ret != URI_ERRNO_OK) { + js_error(J, "error"); + return; + } + js_pushundefined(J); +} + +static void +mjs_url_set_property_pathname(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + const char *str = js_tostring(J, 1); + + if (!str) { + js_error(J, "out of memory"); + return; + } + char *pathname = stracpy(str); + + mem_free_set(&url->pathname, pathname); + + if (pathname) { + url->uri.data = pathname; + url->uri.datalen = strlen(pathname); + } + js_pushundefined(J); +} + +static void +mjs_url_set_property_port(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + const char *str = js_tostring(J, 1); + + if (!str) { + js_error(J, "out of memory"); + return; + } + char *port = stracpy(str); + + mem_free_set(&url->port, port); + + if (port) { + url->uri.port = port; + url->uri.portlen = strlen(port); + } + js_pushundefined(J); +} + +static inline int +get_protocol_length(const char *url) +{ + char *end = (char *) url; + + /* Seek the end of the protocol name if any. */ + /* RFC1738: + * scheme = 1*[ lowalpha | digit | "+" | "-" | "." ] + * (but per its recommendations we accept "upalpha" too) */ + while (isalnum(*end) || *end == '+' || *end == '-' || *end == '.') + end++; + + /* Now we make something to support our "IP version in protocol scheme + * name" hack and silently chop off the last digit if it's there. The + * IETF's not gonna notice I hope or it'd be going after us hard. */ + if (end != url && isdigit(end[-1])) + end--; + + /* Also return 0 if there's no protocol name (@end == @url). */ + return (*end == ':' || isdigit(*end)) ? end - url : 0; +} + +static void +mjs_url_set_property_protocol(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + const char *str = js_tostring(J, 1); + + if (!str) { + js_error(J, "out of memory"); + return; + } + char *protocol = stracpy(str); + + mem_free_set(&url->protocol, protocol); + + if (protocol) { + url->uri.protocollen = get_protocol_length(protocol); + /* Figure out whether the protocol is known */ + url->uri.protocol = get_protocol(protocol, url->uri.protocollen); + } + js_pushundefined(J); +} + +static void +mjs_url_set_property_search(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)js_touserdata(J, 0, "URL"); + + if (!url) { + js_pushnull(J); + return; + } + const char *str = js_tostring(J, 1); + + if (!str) { + js_error(J, "out of memory"); + return; + } + char *search = stracpy(str); + + mem_free_set(&url->search, search); + + if (search) { + // TODO + } + js_pushundefined(J); +} + +static void +mjs_url_toString(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + mjs_url_get_property_href(J); +} + +static void +mjs_url_fun(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + js_pushundefined(J); +} + +static void +mjs_url_constructor(js_State *J) +{ +#ifdef ECMASCRIPT_DEBUG + fprintf(stderr, "%s:%s\n", __FILE__, __FUNCTION__); +#endif + struct eljs_url *url = (struct eljs_url *)mem_calloc(1, sizeof(*url)); + + if (!url) { + js_error(J, "out of memory"); + return; + } + const char *urlstring = js_tostring(J, 1); + + if (!urlstring) { + js_error(J, "out of memory"); + return; + } + int ret = parse_uri(&url->uri, urlstring); + + if (ret != URI_ERRNO_OK) { + js_error(J, "error"); + return; + } + js_newobject(J); + { + js_newuserdata(J, "URL", url, mjs_url_finalizer); + addmethod(J, "toString", mjs_url_toString, 0); + + addproperty(J, "hash", mjs_url_get_property_hash, mjs_url_set_property_hash); + addproperty(J, "host", mjs_url_get_property_host, mjs_url_set_property_host); + addproperty(J, "hostname", mjs_url_get_property_hostname, mjs_url_set_property_hostname); + addproperty(J, "href", mjs_url_get_property_href, mjs_url_set_property_href); + addproperty(J, "origin", mjs_url_get_property_origin, NULL); + addproperty(J, "pathname", mjs_url_get_property_pathname, mjs_url_set_property_pathname); + addproperty(J, "port", mjs_url_get_property_port, mjs_url_set_property_port); + addproperty(J, "protocol", mjs_url_get_property_protocol, mjs_url_set_property_protocol); + addproperty(J, "search", mjs_url_get_property_search, mjs_url_set_property_search); + } +} + +int +mjs_url_init(js_State *J) +{ + js_pushglobal(J); + js_newcconstructor(J, mjs_url_fun, mjs_url_constructor, "URL", 0); + js_defglobal(J, "URL", JS_DONTENUM); + return 0; +} diff --git a/src/ecmascript/mujs/url.h b/src/ecmascript/mujs/url.h new file mode 100644 index 000000000..c73a37277 --- /dev/null +++ b/src/ecmascript/mujs/url.h @@ -0,0 +1,16 @@ +#ifndef EL__ECMASCRIPT_MUJS_URL_H +#define EL__ECMASCRIPT_MUJS_URL_H + +#include + +#ifdef __cplusplus +extern "C" { +#endif + +int mjs_url_init(js_State *J); + +#ifdef __cplusplus +} +#endif + +#endif