Objectively 1.0.0
Ultra-lightweight object oriented framework for GNU C.
Macros | Functions | Variables
URL.c File Reference
#include <assert.h>
#include <stdlib.h>
#include "MutableString.h"
#include "Regexp.h"
#include "URL.h"

Go to the source code of this file.

Macros

#define _Class   _URL
 

Functions

Class * _URL (void)
 
static URL * baseURL (const URL *self)
 
static Object * copy (const Object *self)
 
static void dealloc (Object *self)
 
static String * description (const Object *self)
 
static void destroy (Class *clazz)
 
static int hash (const Object *self)
 
static void initialize (Class *clazz)
 
static URL * initWithCharacters (URL *self, const char *chars)
 
static URL * initWithString (URL *self, const String *string)
 
static _Bool isEqual (const Object *self, const Object *other)
 
static Array * pathComponents (const URL *self)
 

Variables

static Regexp * _re
 

Macro Definition Documentation

◆ _Class

#define _Class   _URL

Definition at line 31 of file URL.c.

Function Documentation

◆ _URL()

Class * _URL ( void  )

Definition at line 248 of file URL.c.

248 {
249 static Class *clazz;
250 static Once once;
251
252 do_once(&once, {
253 clazz = _initialize(&(const ClassDef) {
254 .name = "URL",
255 .superclass = _Object(),
256 .instanceSize = sizeof(URL),
257 .interfaceOffset = offsetof(URL, interface),
258 .interfaceSize = sizeof(URLInterface),
259 .initialize = initialize,
260 .destroy = destroy,
261 });
262 });
263
264 return clazz;
265}
_initialize
Class * _initialize(const ClassDef *def)
Initializes the given Class.
Definition: Class.c:91
destroy
static void destroy(Class *clazz)
Definition: URL.c:239
initialize
static void initialize(Class *clazz)
Definition: URL.c:220
Once
long Once
The Once type.
Definition: Once.h:37
do_once
#define do_once(once, block)
Executes the given block at most one time.
Definition: Once.h:43
ClassDef
ClassDefs are passed to _initialize via an archetype to initialize a Class.
Definition: Class.h:41
Class
The runtime representation of a Class.
Definition: Class.h:95
Object::_Object
Class * _Object(void)
The Object archetype.
Definition: Object.c:136
URL
Uniform Resource Locators (RFC 3986).
Definition: URL.h:44

◆ baseURL()

static URL * baseURL ( const URL *  self)
static

Definition at line 108 of file URL.c.

108 {
109
110 MutableString *string = $(alloc(MutableString), init);
111
112 $(string, appendString, self->scheme);
113 $(string, appendFormat, "://");
114
115 if (self->host) {
116 $(string, appendString, self->host);
117 }
118
119 if (self->port) {
120 $(string, appendFormat, ":%u", self->port);
121 }
122
123 URL *baseURL = $(alloc(URL), initWithString, (String *) string);
124
125 release(string);
126
127 return baseURL;
128}
release
ident release(ident obj)
Atomically decrement the given Object's reference count. If the resulting reference count is 0,...
Definition: Class.c:196
alloc
#define alloc(type)
Allocate and initialize and instance of type.
Definition: Class.h:159
Condition::init
Condition * init(Condition *self)
Initializes this Condition.
Definition: Condition.c:67
MutableString
Mutable UTF-8 strings.
Definition: MutableString.h:40
MutableString::appendString
void appendString(MutableString *self, const String *string)
Appends the specified String to this MutableString.
Definition: MutableString.c:103
MutableString::initWithString
MutableString * initWithString(MutableString *self, const String *string)
Initializes this MutableString with the contents of string.
Definition: MutableString.c:173
MutableString::appendFormat
void appendFormat(MutableString *self, const char *fmt,...)
Appends the specified formatted string.
Definition: MutableString.c:89
String
Immutable UTF-8 strings.
Definition: String.h:69
URL::port
unsigned short port
The port.
Definition: URL.h:75
URL::baseURL
URL * baseURL(const URL *self)
Definition: URL.c:108
URL::scheme
String * scheme
The scheme, or protocol.
Definition: URL.h:85
URL::host
String * host
The host.
Definition: URL.h:65

◆ copy()

static Object * copy ( const Object *  self)
static
See also
Object::copy(const Object *)

Definition at line 38 of file URL.c.

38 {
39
40 const URL *this = (URL *) self;
41
42 return (Object *) $(alloc(URL), initWithString, this->urlString);
43}
Object
Object is the root Class of The Objectively Class hierarchy.
Definition: Object.h:46

◆ dealloc()

static void dealloc ( Object *  self)
static
See also
Object::dealloc(Object *)

Definition at line 48 of file URL.c.

48 {
49
50 URL *this = (URL *) self;
51
52 release(this->fragment);
53 release(this->host);
54 release(this->path);
55 release(this->query);
56 release(this->scheme);
57 release(this->urlString);
58
59 super(Object, self, dealloc);
60}
super
#define super(type, obj, method,...)
Object::dealloc
void dealloc(Object *self)
Frees all resources held by this Object.
Definition: Array.c:50

◆ description()

static String * description ( const Object *  self)
static
See also
Object::description(const Object *)

Definition at line 65 of file URL.c.

65 {
66
67 const URL *this = (URL *) self;
68
69 return $((Object *) this->urlString, description);
70}
Object::description
String * description(const Object *self)
Definition: Array.c:66

◆ destroy()

static void destroy ( Class *  clazz)
static
See also
Class::destroy(Class *)

Definition at line 239 of file URL.c.

239 {
240
241 release(_re);
242}
_re
static Regexp * _re
Definition: URL.c:130

◆ hash()

static int hash ( const Object *  self)
static
See also
Object::hash(const Object *self)

Definition at line 75 of file URL.c.

75 {
76
77 const URL *this = (URL *) self;
78
79 return $((Object *) this->urlString, hash);
80}
Object::hash
int hash(const Object *self)
Definition: Array.c:80

◆ initialize()

static void initialize ( Class *  clazz)
static
See also
Class::initialize(Class *)

Definition at line 220 of file URL.c.

220 {
221
222 ((ObjectInterface *) clazz->interface)->copy = copy;
223 ((ObjectInterface *) clazz->interface)->dealloc = dealloc;
224 ((ObjectInterface *) clazz->interface)->description = description;
225 ((ObjectInterface *) clazz->interface)->hash = hash;
226 ((ObjectInterface *) clazz->interface)->isEqual = isEqual;
227
228 ((URLInterface *) clazz->interface)->baseURL = baseURL;
229 ((URLInterface *) clazz->interface)->initWithCharacters = initWithCharacters;
230 ((URLInterface *) clazz->interface)->initWithString = initWithString;
231 ((URLInterface *) clazz->interface)->pathComponents = pathComponents;
232
233 _re = re("([a-z]+)://([^:/\?]+)?(:[0-9]+)?(/[^\?#]+)?([^#]+)?(#.*)?", 0);
234}
Class::interface
ident interface
The interface of the Class.
Definition: Class.h:105
Object::copy
Object * copy(const Object *self)
Creates a shallow copy of this Object.
Definition: Array.c:40
Object::isEqual
_Bool isEqual(const Object *self, const Object *other)
Tests equality of the other Object.
Definition: Array.c:96
Regexp::re
OBJECTIVELY_EXPORT Regexp * re(const char *pattern, int options)
A convenience function for instantiating Regexps.
Definition: Regexp.c:219
String::initWithCharacters
String * initWithCharacters(String *self, const char *chars)
Initializes this String by copying chars.
Definition: String.c:310
URL::pathComponents
Array * pathComponents(const URL *self)
Definition: URL.c:210
URL::initWithCharacters
URL * initWithCharacters(URL *self, const char *chars)
Initializes this URL with the specified characters.
Definition: URL.c:136

◆ initWithCharacters()

static URL * initWithCharacters ( URL *  self,
const char *  chars 
)
static

Definition at line 136 of file URL.c.

136 {
137
138 assert(chars);
139
140 self = (URL *) super(Object, self, init);
141 if (self) {
142
143 Range *ranges;
144 if ($(_re, matchesCharacters, chars, 0, &ranges)) {
145
146 self->urlString = $(alloc(String), initWithCharacters, chars);
147
148 Range *scheme = &ranges[1];
149 Range *host = &ranges[2];
150 Range *port = &ranges[3];
151 Range *path = &ranges[4];
152 Range *query = &ranges[5];
153 Range *fragment = &ranges[6];
154
155 self->scheme = $(self->urlString, substring, *scheme);
156
157 if (host->location > -1) {
158 self->host = $(self->urlString, substring, *host);
159
160 if (port->location > -1) {
161 const char *s = self->urlString->chars + port->location + 1;
162 self->port = strtoul(s, NULL, 10);
163 }
164 }
165
166 if (path->location > -1) {
167 self->path = $(self->urlString, substring, *path);
168 }
169
170 if (query->location > -1) {
171
172 query->location++;
173 query->length--;
174
175 self->query = $(self->urlString, substring, *query);
176 }
177
178 if (fragment->location > -1) {
179
180 fragment->location++;
181 fragment->length--;
182
183 self->fragment = $(self->urlString, substring, *fragment);
184 }
185
186 free(ranges);
187 } else {
188 self = release(self);
189 }
190 }
191
192 return self;
193}
Range
A location and length into contiguous collections.
Definition: Types.h:54
Range::location
ssize_t location
The location.
Definition: Types.h:59
Range::length
size_t length
The length.
Definition: Types.h:64
Regexp::matchesCharacters
_Bool matchesCharacters(const Regexp *self, const char *chars, int options, Range **matches)
Matches this regular expression against the given characters.
Definition: Regexp.c:134
String::chars
char * chars
The backing null-terminated UTF-8 encoded character array.
Definition: String.h:85
String::substring
String * substring(const String *string, const Range range)
Creates a new String from a subset of this one.
Definition: String.c:539
URL::path
String * path
The path.
Definition: URL.h:70
URL::urlString
String * urlString
The URL String.
Definition: URL.h:90
URL::fragment
String * fragment
The fragment.
Definition: URL.h:60
URL::query
String * query
The query.
Definition: URL.h:80

◆ initWithString()

static URL * initWithString ( URL *  self,
const String *  string 
)
static

Definition at line 199 of file URL.c.

199 {
200
201 assert(string);
202
203 return $(self, initWithCharacters, string->chars);
204}
MutableString::string
MutableString * string(void)
Returns a new MutableString.
Definition: MutableString.c:298

◆ isEqual()

static _Bool isEqual ( const Object *  self,
const Object *  other 
)
static
See also
Object::isEqual(const Object *, const Object *)

Definition at line 85 of file URL.c.

85 {
86
87 if (super(Object, self, isEqual, other)) {
88 return true;
89 }
90
91 if (other && self->clazz == other->clazz) {
92
93 const URL *this = (URL *) self;
94 const URL *that = (URL *) other;
95
96 return $((Object *) this->urlString, isEqual, (Object *) that->urlString);
97 }
98
99 return false;
100}
Object::clazz
Class * clazz
Every instance of Object begins with a pointer to its Class.
Definition: Object.h:51

◆ pathComponents()

static Array * pathComponents ( const URL *  self)
static

Definition at line 210 of file URL.c.

210 {
211
212 return $(self->path, componentsSeparatedByCharacters, "/");
213}
String::componentsSeparatedByCharacters
Array * componentsSeparatedByCharacters(const String *self, const char *chars)
Returns the components of this String that were separated by chars.
Definition: String.c:184

Variable Documentation

◆ _re

Regexp* _re
static

Definition at line 130 of file URL.c.

Generated on Mon Aug 29 2022 09:48:30 for Objectively by doxygen 1.9.3