commit cb5a0c28f49284c7d7aaa9cb950c162a4030e0ef
parent e31c1c5b0248278729771f9f8c091161afda8c56
Author: finwo <finwo@pm.me>
Date: Mon, 7 Aug 2023 21:56:15 +0200
Added package.ini
Diffstat:
5 files changed, 336 insertions(+), 328 deletions(-)
diff --git a/config.mk b/config.mk
@@ -0,0 +1 @@
+SRC+=__DIRNAME/src/url-parser.c
diff --git a/package.ini b/package.ini
@@ -0,0 +1,7 @@
+[export]
+config.mk=config.mk
+include/scyphus/url-parser.h=src/url-parser.h
+
+[package]
+deps=lib
+name=scyphus/url-parser
diff --git a/src/url-parser.c b/src/url-parser.c
@@ -0,0 +1,328 @@
+/*_
+ * Copyright 2010-2011 Scyphus Solutions Co. Ltd. All rights reserved.
+ *
+ * Authors:
+ * Hirochika Asai
+ */
+
+#include "url-parser.h"
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <ctype.h>
+
+/*
+ * Prototype declarations
+ */
+static __inline__ int _is_scheme_char(int);
+
+/*
+ * Check whether the character is permitted in scheme string
+ */
+static __inline__ int
+_is_scheme_char(int c)
+{
+ return (!isalpha(c) && '+' != c && '-' != c && '.' != c) ? 0 : 1;
+}
+
+/*
+ * See RFC 1738, 3986
+ */
+struct parsed_url *
+parse_url(const char *url)
+{
+ struct parsed_url *purl;
+ const char *tmpstr;
+ const char *curstr;
+ int len;
+ int i;
+ int userpass_flag;
+ int bracket_flag;
+
+ /* Allocate the parsed url storage */
+ purl = malloc(sizeof(struct http_parsed_url));
+ if ( NULL == purl ) {
+ return NULL;
+ }
+ purl->scheme = NULL;
+ purl->host = NULL;
+ purl->port = NULL;
+ purl->path = NULL;
+ purl->query = NULL;
+ purl->fragment = NULL;
+ purl->username = NULL;
+ purl->password = NULL;
+
+ curstr = url;
+
+ /*
+ * <scheme>:<scheme-specific-part>
+ * <scheme> := [a-z\+\-\.]+
+ * upper case = lower case for resiliency
+ */
+ /* Read scheme */
+ tmpstr = strchr(curstr, ':');
+ if ( NULL == tmpstr ) {
+ /* Not found the character */
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ /* Get the scheme length */
+ len = tmpstr - curstr;
+ /* Check restrictions */
+ for ( i = 0; i < len; i++ ) {
+ if ( !_is_scheme_char(curstr[i]) ) {
+ /* Invalid format */
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ }
+ /* Copy the scheme to the storage */
+ purl->scheme = malloc(sizeof(char) * (len + 1));
+ if ( NULL == purl->scheme ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ (void)strncpy(purl->scheme, curstr, len);
+ purl->scheme[len] = '\0';
+ /* Make the character to lower if it is upper case. */
+ for ( i = 0; i < len; i++ ) {
+ purl->scheme[i] = tolower(purl->scheme[i]);
+ }
+ /* Skip ':' */
+ tmpstr++;
+ curstr = tmpstr;
+
+ /*
+ * //<user>:<password>@<host>:<port>/<url-path>
+ * Any ":", "@" and "/" must be encoded.
+ */
+ /* Eat "//" */
+ for ( i = 0; i < 2; i++ ) {
+ if ( '/' != *curstr ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ curstr++;
+ }
+
+ /* Check if the user (and password) are specified. */
+ userpass_flag = 0;
+ tmpstr = curstr;
+ while ( '\0' != *tmpstr ) {
+ if ( '@' == *tmpstr ) {
+ /* Username and password are specified */
+ userpass_flag = 1;
+ break;
+ } else if ( '/' == *tmpstr ) {
+ /* End of <host>:<port> specification */
+ userpass_flag = 0;
+ break;
+ }
+ tmpstr++;
+ }
+
+ /* User and password specification */
+ tmpstr = curstr;
+ if ( userpass_flag ) {
+ /* Read username */
+ while ( '\0' != *tmpstr && ':' != *tmpstr && '@' != *tmpstr ) {
+ tmpstr++;
+ }
+ len = tmpstr - curstr;
+ purl->username = malloc(sizeof(char) * (len + 1));
+ if ( NULL == purl->username ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ (void)strncpy(purl->username, curstr, len);
+ purl->username[len] = '\0';
+ /* Proceed current pointer */
+ curstr = tmpstr;
+ if ( ':' == *curstr ) {
+ /* Skip ':' */
+ curstr++;
+ /* Read password */
+ tmpstr = curstr;
+ while ( '\0' != *tmpstr && '@' != *tmpstr ) {
+ tmpstr++;
+ }
+ len = tmpstr - curstr;
+ purl->password = malloc(sizeof(char) * (len + 1));
+ if ( NULL == purl->password ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ (void)strncpy(purl->password, curstr, len);
+ purl->password[len] = '\0';
+ curstr = tmpstr;
+ }
+ /* Skip '@' */
+ if ( '@' != *curstr ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ curstr++;
+ }
+
+ if ( '[' == *curstr ) {
+ bracket_flag = 1;
+ } else {
+ bracket_flag = 0;
+ }
+ /* Proceed on by delimiters with reading host */
+ tmpstr = curstr;
+ while ( '\0' != *tmpstr ) {
+ if ( bracket_flag && ']' == *tmpstr ) {
+ /* End of IPv6 address. */
+ tmpstr++;
+ break;
+ } else if ( !bracket_flag && (':' == *tmpstr || '/' == *tmpstr) ) {
+ /* Port number is specified. */
+ break;
+ }
+ tmpstr++;
+ }
+ len = tmpstr - curstr;
+ purl->host = malloc(sizeof(char) * (len + 1));
+ if ( NULL == purl->host || len <= 0 ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ (void)strncpy(purl->host, curstr, len);
+ purl->host[len] = '\0';
+ curstr = tmpstr;
+
+ /* Is port number specified? */
+ if ( ':' == *curstr ) {
+ curstr++;
+ /* Read port number */
+ tmpstr = curstr;
+ while ( '\0' != *tmpstr && '/' != *tmpstr ) {
+ tmpstr++;
+ }
+ len = tmpstr - curstr;
+ purl->port = malloc(sizeof(char) * (len + 1));
+ if ( NULL == purl->port ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ (void)strncpy(purl->port, curstr, len);
+ purl->port[len] = '\0';
+ curstr = tmpstr;
+ }
+
+ /* End of the string */
+ if ( '\0' == *curstr ) {
+ return purl;
+ }
+
+ /* Skip '/' */
+ if ( '/' != *curstr ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ curstr++;
+
+ /* Parse path */
+ tmpstr = curstr;
+ while ( '\0' != *tmpstr && '#' != *tmpstr && '?' != *tmpstr ) {
+ tmpstr++;
+ }
+ len = tmpstr - curstr;
+ purl->path = malloc(sizeof(char) * (len + 1));
+ if ( NULL == purl->path ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ (void)strncpy(purl->path, curstr, len);
+ purl->path[len] = '\0';
+ curstr = tmpstr;
+
+ /* Is query specified? */
+ if ( '?' == *curstr ) {
+ /* Skip '?' */
+ curstr++;
+ /* Read query */
+ tmpstr = curstr;
+ while ( '\0' != *tmpstr && '#' != *tmpstr ) {
+ tmpstr++;
+ }
+ len = tmpstr - curstr;
+ purl->query = malloc(sizeof(char) * (len + 1));
+ if ( NULL == purl->query ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ (void)strncpy(purl->query, curstr, len);
+ purl->query[len] = '\0';
+ curstr = tmpstr;
+ }
+
+ /* Is fragment specified? */
+ if ( '#' == *curstr ) {
+ /* Skip '#' */
+ curstr++;
+ /* Read fragment */
+ tmpstr = curstr;
+ while ( '\0' != *tmpstr ) {
+ tmpstr++;
+ }
+ len = tmpstr - curstr;
+ purl->fragment = malloc(sizeof(char) * (len + 1));
+ if ( NULL == purl->fragment ) {
+ http_parsed_url_free(purl);
+ return NULL;
+ }
+ (void)strncpy(purl->fragment, curstr, len);
+ purl->fragment[len] = '\0';
+ curstr = tmpstr;
+ }
+
+ return purl;
+}
+
+/*
+ * Free memory of parsed url
+ */
+void
+parsed_url_free(struct parsed_url *purl)
+{
+ if ( NULL != purl ) {
+ if ( NULL != purl->scheme ) {
+ free(purl->scheme);
+ }
+ if ( NULL != purl->host ) {
+ free(purl->host);
+ }
+ if ( NULL != purl->port ) {
+ free(purl->port);
+ }
+ if ( NULL != purl->path ) {
+ free(purl->path);
+ }
+ if ( NULL != purl->query ) {
+ free(purl->query);
+ }
+ if ( NULL != purl->fragment ) {
+ free(purl->fragment);
+ }
+ if ( NULL != purl->username ) {
+ free(purl->username);
+ }
+ if ( NULL != purl->password ) {
+ free(purl->password);
+ }
+ free(purl);
+ }
+}
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * End:
+ * vim600: sw=4 ts=4 fdm=marker
+ * vim<600: sw=4 ts=4
+ */
diff --git a/url_parser.h b/src/url-parser.h
diff --git a/url_parser.c b/url_parser.c
@@ -1,328 +0,0 @@
-/*_
- * Copyright 2010-2011 Scyphus Solutions Co. Ltd. All rights reserved.
- *
- * Authors:
- * Hirochika Asai
- */
-
-#include "url_parser.h"
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <ctype.h>
-
-/*
- * Prototype declarations
- */
-static __inline__ int _is_scheme_char(int);
-
-/*
- * Check whether the character is permitted in scheme string
- */
-static __inline__ int
-_is_scheme_char(int c)
-{
- return (!isalpha(c) && '+' != c && '-' != c && '.' != c) ? 0 : 1;
-}
-
-/*
- * See RFC 1738, 3986
- */
-struct parsed_url *
-parse_url(const char *url)
-{
- struct parsed_url *purl;
- const char *tmpstr;
- const char *curstr;
- int len;
- int i;
- int userpass_flag;
- int bracket_flag;
-
- /* Allocate the parsed url storage */
- purl = malloc(sizeof(struct http_parsed_url));
- if ( NULL == purl ) {
- return NULL;
- }
- purl->scheme = NULL;
- purl->host = NULL;
- purl->port = NULL;
- purl->path = NULL;
- purl->query = NULL;
- purl->fragment = NULL;
- purl->username = NULL;
- purl->password = NULL;
-
- curstr = url;
-
- /*
- * <scheme>:<scheme-specific-part>
- * <scheme> := [a-z\+\-\.]+
- * upper case = lower case for resiliency
- */
- /* Read scheme */
- tmpstr = strchr(curstr, ':');
- if ( NULL == tmpstr ) {
- /* Not found the character */
- http_parsed_url_free(purl);
- return NULL;
- }
- /* Get the scheme length */
- len = tmpstr - curstr;
- /* Check restrictions */
- for ( i = 0; i < len; i++ ) {
- if ( !_is_scheme_char(curstr[i]) ) {
- /* Invalid format */
- http_parsed_url_free(purl);
- return NULL;
- }
- }
- /* Copy the scheme to the storage */
- purl->scheme = malloc(sizeof(char) * (len + 1));
- if ( NULL == purl->scheme ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- (void)strncpy(purl->scheme, curstr, len);
- purl->scheme[len] = '\0';
- /* Make the character to lower if it is upper case. */
- for ( i = 0; i < len; i++ ) {
- purl->scheme[i] = tolower(purl->scheme[i]);
- }
- /* Skip ':' */
- tmpstr++;
- curstr = tmpstr;
-
- /*
- * //<user>:<password>@<host>:<port>/<url-path>
- * Any ":", "@" and "/" must be encoded.
- */
- /* Eat "//" */
- for ( i = 0; i < 2; i++ ) {
- if ( '/' != *curstr ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- curstr++;
- }
-
- /* Check if the user (and password) are specified. */
- userpass_flag = 0;
- tmpstr = curstr;
- while ( '\0' != *tmpstr ) {
- if ( '@' == *tmpstr ) {
- /* Username and password are specified */
- userpass_flag = 1;
- break;
- } else if ( '/' == *tmpstr ) {
- /* End of <host>:<port> specification */
- userpass_flag = 0;
- break;
- }
- tmpstr++;
- }
-
- /* User and password specification */
- tmpstr = curstr;
- if ( userpass_flag ) {
- /* Read username */
- while ( '\0' != *tmpstr && ':' != *tmpstr && '@' != *tmpstr ) {
- tmpstr++;
- }
- len = tmpstr - curstr;
- purl->username = malloc(sizeof(char) * (len + 1));
- if ( NULL == purl->username ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- (void)strncpy(purl->username, curstr, len);
- purl->username[len] = '\0';
- /* Proceed current pointer */
- curstr = tmpstr;
- if ( ':' == *curstr ) {
- /* Skip ':' */
- curstr++;
- /* Read password */
- tmpstr = curstr;
- while ( '\0' != *tmpstr && '@' != *tmpstr ) {
- tmpstr++;
- }
- len = tmpstr - curstr;
- purl->password = malloc(sizeof(char) * (len + 1));
- if ( NULL == purl->password ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- (void)strncpy(purl->password, curstr, len);
- purl->password[len] = '\0';
- curstr = tmpstr;
- }
- /* Skip '@' */
- if ( '@' != *curstr ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- curstr++;
- }
-
- if ( '[' == *curstr ) {
- bracket_flag = 1;
- } else {
- bracket_flag = 0;
- }
- /* Proceed on by delimiters with reading host */
- tmpstr = curstr;
- while ( '\0' != *tmpstr ) {
- if ( bracket_flag && ']' == *tmpstr ) {
- /* End of IPv6 address. */
- tmpstr++;
- break;
- } else if ( !bracket_flag && (':' == *tmpstr || '/' == *tmpstr) ) {
- /* Port number is specified. */
- break;
- }
- tmpstr++;
- }
- len = tmpstr - curstr;
- purl->host = malloc(sizeof(char) * (len + 1));
- if ( NULL == purl->host || len <= 0 ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- (void)strncpy(purl->host, curstr, len);
- purl->host[len] = '\0';
- curstr = tmpstr;
-
- /* Is port number specified? */
- if ( ':' == *curstr ) {
- curstr++;
- /* Read port number */
- tmpstr = curstr;
- while ( '\0' != *tmpstr && '/' != *tmpstr ) {
- tmpstr++;
- }
- len = tmpstr - curstr;
- purl->port = malloc(sizeof(char) * (len + 1));
- if ( NULL == purl->port ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- (void)strncpy(purl->port, curstr, len);
- purl->port[len] = '\0';
- curstr = tmpstr;
- }
-
- /* End of the string */
- if ( '\0' == *curstr ) {
- return purl;
- }
-
- /* Skip '/' */
- if ( '/' != *curstr ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- curstr++;
-
- /* Parse path */
- tmpstr = curstr;
- while ( '\0' != *tmpstr && '#' != *tmpstr && '?' != *tmpstr ) {
- tmpstr++;
- }
- len = tmpstr - curstr;
- purl->path = malloc(sizeof(char) * (len + 1));
- if ( NULL == purl->path ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- (void)strncpy(purl->path, curstr, len);
- purl->path[len] = '\0';
- curstr = tmpstr;
-
- /* Is query specified? */
- if ( '?' == *curstr ) {
- /* Skip '?' */
- curstr++;
- /* Read query */
- tmpstr = curstr;
- while ( '\0' != *tmpstr && '#' != *tmpstr ) {
- tmpstr++;
- }
- len = tmpstr - curstr;
- purl->query = malloc(sizeof(char) * (len + 1));
- if ( NULL == purl->query ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- (void)strncpy(purl->query, curstr, len);
- purl->query[len] = '\0';
- curstr = tmpstr;
- }
-
- /* Is fragment specified? */
- if ( '#' == *curstr ) {
- /* Skip '#' */
- curstr++;
- /* Read fragment */
- tmpstr = curstr;
- while ( '\0' != *tmpstr ) {
- tmpstr++;
- }
- len = tmpstr - curstr;
- purl->fragment = malloc(sizeof(char) * (len + 1));
- if ( NULL == purl->fragment ) {
- http_parsed_url_free(purl);
- return NULL;
- }
- (void)strncpy(purl->fragment, curstr, len);
- purl->fragment[len] = '\0';
- curstr = tmpstr;
- }
-
- return purl;
-}
-
-/*
- * Free memory of parsed url
- */
-void
-parsed_url_free(struct parsed_url *purl)
-{
- if ( NULL != purl ) {
- if ( NULL != purl->scheme ) {
- free(purl->scheme);
- }
- if ( NULL != purl->host ) {
- free(purl->host);
- }
- if ( NULL != purl->port ) {
- free(purl->port);
- }
- if ( NULL != purl->path ) {
- free(purl->path);
- }
- if ( NULL != purl->query ) {
- free(purl->query);
- }
- if ( NULL != purl->fragment ) {
- free(purl->fragment);
- }
- if ( NULL != purl->username ) {
- free(purl->username);
- }
- if ( NULL != purl->password ) {
- free(purl->password);
- }
- free(purl);
- }
-}
-
-/*
- * Local variables:
- * tab-width: 4
- * c-basic-offset: 4
- * End:
- * vim600: sw=4 ts=4 fdm=marker
- * vim<600: sw=4 ts=4
- */
