blob: b249b77dc5a48ef9773ba349e14c6de493cf786d [file] [log] [blame]
/*
* Copyright (C) 2003 Apple Computer, Inc. All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY
* EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL APPLE COMPUTER, INC. OR
* CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
* PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
* OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
#import "KWQKURL.h"
#import "KWQAssertions.h"
#import "KWQTextCodec.h"
typedef enum {
// alpha
SchemeFirstChar = 1 << 0,
// ( alpha | digit | "+" | "-" | "." )
SchemeChar = 1 << 1,
// mark = "-" | "_" | "." | "!" | "~" | "*" | "'" | "(" | ")"
// unreserved = alphanum | mark
// ( unreserved | escaped | ";" | ":" | "&" | "=" | "+" | "$" | "," )
UserInfoChar = 1 << 2,
// alnum | "." | "-" | "%"
// The above is what the specification says, but we are lenient to
// match existing practice and also allow:
// "_"
HostnameChar = 1 << 3,
// hexdigit | ":" | "%"
IPv6Char = 1 << 4,
// "#" | "?" | "/" | nul
PathSegmentEndChar = 1 << 5,
// digit | "A" | "B" | "C" | "D" | "E" | "F" | "a" | "b" | "c" | "d" | "e" | "f"
HexDigitChar = 1 << 6,
// not allowed in path
BadChar = 1 << 7
} URLCharacterClasses;
static const char hexDigits[17] = "0123456789ABCDEF";
static const unsigned char characterClassTable[256] = {
/* 0 nul */ PathSegmentEndChar, /* 1 soh */ BadChar,
/* 2 stx */ BadChar, /* 3 etx */ BadChar,
/* 4 eot */ BadChar, /* 5 enq */ BadChar, /* 6 ack */ BadChar, /* 7 bel */ BadChar,
/* 8 bs */ BadChar, /* 9 ht */ BadChar, /* 10 nl */ BadChar, /* 11 vt */ BadChar,
/* 12 np */ BadChar, /* 13 cr */ BadChar, /* 14 so */ BadChar, /* 15 si */ BadChar,
/* 16 dle */ BadChar, /* 17 dc1 */ BadChar, /* 18 dc2 */ BadChar, /* 19 dc3 */ BadChar,
/* 20 dc4 */ BadChar, /* 21 nak */ BadChar, /* 22 syn */ BadChar, /* 23 etb */ BadChar,
/* 24 can */ BadChar, /* 25 em */ BadChar, /* 26 sub */ BadChar, /* 27 esc */ BadChar,
/* 28 fs */ BadChar, /* 29 gs */ BadChar, /* 30 rs */ BadChar, /* 31 us */ BadChar,
/* 32 sp */ BadChar, /* 33 ! */ UserInfoChar,
/* 34 " */ BadChar, /* 35 # */ PathSegmentEndChar | BadChar,
/* 36 $ */ UserInfoChar, /* 37 % */ UserInfoChar | HostnameChar | IPv6Char | BadChar,
/* 38 & */ UserInfoChar, /* 39 ' */ UserInfoChar,
/* 40 ( */ UserInfoChar, /* 41 ) */ UserInfoChar,
/* 42 * */ UserInfoChar, /* 43 + */ SchemeChar | UserInfoChar,
/* 44 , */ UserInfoChar,
/* 45 - */ SchemeChar | UserInfoChar | HostnameChar,
/* 46 . */ SchemeChar | UserInfoChar | HostnameChar,
/* 47 / */ PathSegmentEndChar,
/* 48 0 */ SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 49 1 */ SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 50 2 */ SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 51 3 */ SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 52 4 */ SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 53 5 */ SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 54 6 */ SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 55 7 */ SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 56 8 */ SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 57 9 */ SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 58 : */ UserInfoChar | IPv6Char, /* 59 ; */ UserInfoChar,
/* 60 < */ BadChar, /* 61 = */ UserInfoChar,
/* 62 > */ BadChar, /* 63 ? */ PathSegmentEndChar | BadChar,
/* 64 @ */ 0,
/* 65 A */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 66 B */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 67 C */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 68 D */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 69 E */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 70 F */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 71 G */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 72 H */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 73 I */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 74 J */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 75 K */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 76 L */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 77 M */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 78 N */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 79 O */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 80 P */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 81 Q */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 82 R */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 83 S */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 84 T */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 85 U */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 86 V */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 87 W */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 88 X */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 89 Y */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 90 Z */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 91 [ */ 0,
/* 92 \ */ 0, /* 93 ] */ 0,
/* 94 ^ */ 0,
/* 95 _ */ UserInfoChar | HostnameChar,
/* 96 ` */ 0,
/* 97 a */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 98 b */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 99 c */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 100 d */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 101 e */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 102 f */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar | HexDigitChar | IPv6Char,
/* 103 g */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 104 h */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 105 i */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 106 j */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 107 k */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 108 l */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 109 m */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 110 n */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 111 o */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 112 p */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 113 q */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 114 r */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 115 s */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 116 t */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 117 u */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 118 v */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 119 w */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 120 x */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 121 y */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 122 z */ SchemeFirstChar | SchemeChar | UserInfoChar | HostnameChar,
/* 123 { */ 0,
/* 124 | */ 0, /* 125 } */ 0, /* 126 ~ */ UserInfoChar, /* 127 del */ BadChar,
/* 128 */ BadChar, /* 129 */ BadChar, /* 130 */ BadChar, /* 131 */ BadChar,
/* 132 */ BadChar, /* 133 */ BadChar, /* 134 */ BadChar, /* 135 */ BadChar,
/* 136 */ BadChar, /* 137 */ BadChar, /* 138 */ BadChar, /* 139 */ BadChar,
/* 140 */ BadChar, /* 141 */ BadChar, /* 142 */ BadChar, /* 143 */ BadChar,
/* 144 */ BadChar, /* 145 */ BadChar, /* 146 */ BadChar, /* 147 */ BadChar,
/* 148 */ BadChar, /* 149 */ BadChar, /* 150 */ BadChar, /* 151 */ BadChar,
/* 152 */ BadChar, /* 153 */ BadChar, /* 154 */ BadChar, /* 155 */ BadChar,
/* 156 */ BadChar, /* 157 */ BadChar, /* 158 */ BadChar, /* 159 */ BadChar,
/* 160 */ BadChar, /* 161 */ BadChar, /* 162 */ BadChar, /* 163 */ BadChar,
/* 164 */ BadChar, /* 165 */ BadChar, /* 166 */ BadChar, /* 167 */ BadChar,
/* 168 */ BadChar, /* 169 */ BadChar, /* 170 */ BadChar, /* 171 */ BadChar,
/* 172 */ BadChar, /* 173 */ BadChar, /* 174 */ BadChar, /* 175 */ BadChar,
/* 176 */ BadChar, /* 177 */ BadChar, /* 178 */ BadChar, /* 179 */ BadChar,
/* 180 */ BadChar, /* 181 */ BadChar, /* 182 */ BadChar, /* 183 */ BadChar,
/* 184 */ BadChar, /* 185 */ BadChar, /* 186 */ BadChar, /* 187 */ BadChar,
/* 188 */ BadChar, /* 189 */ BadChar, /* 190 */ BadChar, /* 191 */ BadChar,
/* 192 */ BadChar, /* 193 */ BadChar, /* 194 */ BadChar, /* 195 */ BadChar,
/* 196 */ BadChar, /* 197 */ BadChar, /* 198 */ BadChar, /* 199 */ BadChar,
/* 200 */ BadChar, /* 201 */ BadChar, /* 202 */ BadChar, /* 203 */ BadChar,
/* 204 */ BadChar, /* 205 */ BadChar, /* 206 */ BadChar, /* 207 */ BadChar,
/* 208 */ BadChar, /* 209 */ BadChar, /* 210 */ BadChar, /* 211 */ BadChar,
/* 212 */ BadChar, /* 213 */ BadChar, /* 214 */ BadChar, /* 215 */ BadChar,
/* 216 */ BadChar, /* 217 */ BadChar, /* 218 */ BadChar, /* 219 */ BadChar,
/* 220 */ BadChar, /* 221 */ BadChar, /* 222 */ BadChar, /* 223 */ BadChar,
/* 224 */ BadChar, /* 225 */ BadChar, /* 226 */ BadChar, /* 227 */ BadChar,
/* 228 */ BadChar, /* 229 */ BadChar, /* 230 */ BadChar, /* 231 */ BadChar,
/* 232 */ BadChar, /* 233 */ BadChar, /* 234 */ BadChar, /* 235 */ BadChar,
/* 236 */ BadChar, /* 237 */ BadChar, /* 238 */ BadChar, /* 239 */ BadChar,
/* 240 */ BadChar, /* 241 */ BadChar, /* 242 */ BadChar, /* 243 */ BadChar,
/* 244 */ BadChar, /* 245 */ BadChar, /* 246 */ BadChar, /* 247 */ BadChar,
/* 248 */ BadChar, /* 249 */ BadChar, /* 250 */ BadChar, /* 251 */ BadChar,
/* 252 */ BadChar, /* 253 */ BadChar, /* 254 */ BadChar, /* 255 */ BadChar
};
static int copyPathRemovingDots(char *dst, const char *src, int srcStart, int srcEnd);
// FIXME: convert to inline functions
#define IS_SCHEME_FIRST_CHAR(c) (characterClassTable[(unsigned char)c] & SchemeFirstChar)
#define IS_SCHEME_CHAR(c) (characterClassTable[(unsigned char)c] & SchemeChar)
#define IS_USERINFO_CHAR(c) (characterClassTable[(unsigned char)c] & UserInfoChar)
#define IS_HOSTNAME_CHAR(c) (characterClassTable[(unsigned char)c] & HostnameChar)
#define IS_IPV6_CHAR(c) (characterClassTable[(unsigned char)c] & IPv6Char)
#define IS_PATH_SEGMENT_END_CHAR(c) (characterClassTable[(unsigned char)c] & PathSegmentEndChar)
#define IS_BAD_CHAR(c) (characterClassTable[(unsigned char)c] & BadChar)
#define IS_HEX_DIGIT(c) (characterClassTable[(unsigned char)c] & HexDigitChar)
// KURL
KURL::KURL() :
m_isValid(false)
{
}
KURL::KURL(const char *url) :
m_isValid(true)
{
if (url != NULL && url[0] == '/') {
QString qurl = QString("file:") + url;
parse(qurl.ascii(), &qurl);
} else {
parse(url, NULL);
}
}
KURL::KURL(const QString &url) :
m_isValid(true)
{
if (!url.isEmpty() && url[0] == '/') {
QString fileUrl = QString("file:") + url;
parse(fileUrl.ascii(), &fileUrl);
} else {
parse(url.ascii(), &url);
}
}
KURL::KURL(NSURL *url)
{
if (url) {
// FIXME: Use new CF API to access URL bytes when that API is available
const char *bytes = [[url absoluteString] cString];
if (bytes[0] == '/') {
QString fileUrl = QString("file:") + bytes;
parse(fileUrl.ascii(), &fileUrl);
} else {
parse(bytes, NULL);
}
}
else {
parse("", NULL);
}
}
KURL::KURL(const KURL &base, const QString &relative, const QTextCodec *codec)
{
// Allow at lest absolute URLs to resolve against an empty URL.
if (!base.m_isValid && !base.isEmpty()) {
m_isValid = false;
return;
}
bool absolute = false;
bool allASCII = relative.isAllASCII();
char *strBuffer;
const char *str;
if (allASCII) {
strBuffer = 0;
str = relative.ascii();
} else {
// Always use UTF-8 if the protocol is file, mailto, or help because that's
// what these protocols expect.
if (codec) {
QString protocol;
for (uint i = 0; i < relative.length(); i++) {
char p = relative.at(i).latin1();
if (IS_PATH_SEGMENT_END_CHAR(p)) {
break;
}
if (p == ':') {
protocol = relative.left(i);
break;
}
}
if (!protocol) {
protocol = base.protocol();
}
protocol = protocol.lower();
if (protocol == "file" || protocol == "mailto" || protocol == "help") {
codec = NULL;
}
}
QCString decoded = codec ? codec->fromUnicode(relative)
: QTextCodec(kCFStringEncodingUTF8).fromUnicode(relative);
strBuffer = strdup(decoded);
str = strBuffer;
}
// According to the RFC, the reference should be interpreted as an
// absolute URI if possible, using the "leftmost, longest"
// algorithm. If the URI reference is absolute it will have a
// scheme, meaning that it will have a colon before the first
// non-scheme element. "/", "?" and "#" are used to detect the
// start of a path segment, a query or a fragment ID, which would
// indicate no scheme had been found. IS_PATH_SEGMENT_END_CHAR
// tests for those three characters or NULL.
for (const char *p = str; !IS_PATH_SEGMENT_END_CHAR(*p); ++p) {
if (*p == ':') {
absolute = true;
break;
}
}
if (absolute) {
parse(str, allASCII ? &relative : 0);
} else {
// workaround for sites that put leading whitespace on relative URLs
while (*str == ' ') {
str++;
}
// if the base is invalid, just append the relative
// portion. The RFC does not specify what to do in this case.
if (!base.m_isValid) {
QString newURL = base.urlString + str;
parse(newURL.ascii(), &newURL);
if (strBuffer) {
free(strBuffer);
}
return;
}
switch(str[0]) {
case '\0':
// the reference must be empty - the RFC says this is a
// reference to the same document
{
*this = base;
break;
}
case '#':
// must be fragment-only reference
{
QString newURL = base.urlString.left(base.queryEndPos) + str;
parse(newURL.ascii(), &newURL);
break;
}
case '?':
// query-only reference, special case needed for non-URL results
{
QString newURL = base.urlString.left(base.pathEndPos) + str;
parse(newURL.ascii(), &newURL);
break;
}
case '/':
// must be net-path or absolute-path reference
{
if (str[1] == '/') {
// net-path
QString newURL = base.urlString.left(base.schemeEndPos + 1) + str;
parse(newURL.ascii(), &newURL);
} else {
// abs-path
QString newURL = base.urlString.left(base.portEndPos) + str;
parse(newURL.ascii(), &newURL);
}
break;
}
default:
{
// must be relative-path reference
char static_buffer[2048];
char *buffer;
size_t bufferLength = base.pathEndPos + strlen(str) + 1;
if (bufferLength > sizeof(static_buffer)) {
buffer = (char *)malloc(bufferLength);
} else {
buffer = static_buffer;
}
char *bufferPos = buffer;
// first copy everything before the path from the base
const char *baseString = base.urlString.ascii();
const char *baseStringStart = baseString;
const char *pathStart = baseStringStart + base.portEndPos;
while (baseStringStart < pathStart) {
*bufferPos++ = *baseStringStart++;
}
char *bufferPathStart = bufferPos;
// now copy the base path
const char *baseStringEnd = baseString + base.pathEndPos;
// go back to the last slash
while (baseStringEnd > baseStringStart && baseStringEnd[-1] != '/') {
baseStringEnd--;
}
bufferPos += copyPathRemovingDots(bufferPos, baseStringStart, 0, baseStringEnd - baseStringStart);
const char *relStringStart = str;
const char *relStringPos = relStringStart;
while (*relStringPos != '\0' && *relStringPos != '?' && *relStringPos != '#') {
if (relStringPos[0] == '.' && bufferPos[-1] == '/') {
if (IS_PATH_SEGMENT_END_CHAR(relStringPos[1])) {
// skip over "." segment
relStringPos += 1;
if (relStringPos[0] == '/') {
relStringPos++;
}
continue;
} else if (relStringPos[1] == '.' && IS_PATH_SEGMENT_END_CHAR(relStringPos[2])) {
// skip over ".." segment and rewind the last segment
// the RFC leaves it up to the app to decide what to do with excess
// ".." segments - we choose to drop them since some web content
// relies on this.
relStringPos += 2;
if (relStringPos[0] == '/') {
relStringPos++;
}
if (bufferPos > bufferPathStart + 1) {
bufferPos--;
}
while (bufferPos > bufferPathStart + 1 && bufferPos[-1] != '/') {
bufferPos--;
}
continue;
}
}
*bufferPos = *relStringPos;
relStringPos++;
bufferPos++;
}
// all done with the path work, now copy any remainder
// of the relative reference; this will also add a null terminator
strcpy(bufferPos, relStringPos);
parse(buffer, NULL);
ASSERT(strlen(buffer) + 1 <= bufferLength);
if (buffer != static_buffer) {
free(buffer);
}
break;
}
}
}
if (strBuffer) {
free(strBuffer);
}
}
bool KURL::hasPath() const
{
return m_isValid && pathEndPos != portEndPos;
}
QString KURL::protocol() const
{
if (!m_isValid) {
return QString();
}
return urlString.left(schemeEndPos);
}
QString KURL::host() const
{
if (!m_isValid) {
return QString();
}
int start = (passwordEndPos == userStartPos) ? passwordEndPos : passwordEndPos + 1;
return decode_string(urlString.mid(start, hostEndPos - start));
}
unsigned short int KURL::port() const
{
if (!m_isValid) {
return 0;
}
if (hostEndPos != portEndPos) {
bool ok;
unsigned short result = urlString.mid(hostEndPos + 1, portEndPos - hostEndPos - 1).toUShort(&ok);
if (!ok) {
result = 0;
}
return result;
}
return 0;
}
QString KURL::pass() const
{
if (!m_isValid) {
return QString();
}
if (passwordEndPos == userEndPos) {
return QString();
}
return decode_string(urlString.mid(userEndPos + 1, passwordEndPos - userEndPos - 1));
}
QString KURL::user() const
{
if (!m_isValid) {
return QString();
}
return decode_string(urlString.mid(userStartPos, userEndPos - userStartPos));
}
QString KURL::ref() const
{
if (!m_isValid) {
return QString();
}
if (fragmentEndPos <= queryEndPos + 1) {
return QString();
}
return urlString.mid(queryEndPos + 1, fragmentEndPos - (queryEndPos + 1));
}
bool KURL::hasRef() const
{
return m_isValid && fragmentEndPos > queryEndPos + 1;
}
QString KURL::query() const
{
if (!m_isValid) {
return QString();
}
return urlString.mid(pathEndPos, queryEndPos - pathEndPos);
}
QString KURL::path() const
{
if (!m_isValid) {
return QString();
}
return decode_string(urlString.mid(portEndPos, pathEndPos - portEndPos));
}
#ifdef CONSTRUCT_CANONICAL_STRING
QString KURL::_path() const
{
if (!m_isValid) {
return QString();
}
return urlString.mid(portEndPos, pathEndPos - portEndPos);
}
QString KURL::_user() const
{
if (!m_isValid) {
return QString();
}
return urlString.mid(userStartPos, userEndPos - userStartPos);
}
QString KURL::_pass() const
{
if (!m_isValid) {
return QString();
}
if (passwordEndPos == userEndPos) {
return QString();
}
return urlString.mid(userEndPos + 1, passwordEndPos - userEndPos - 1);
}
QString KURL::_host() const
{
if (!m_isValid) {
return QString();
}
int start = (passwordEndPos == userStartPos) ? passwordEndPos : passwordEndPos + 1;
return urlString.mid(start, hostEndPos - start);
}
#endif
void KURL::setProtocol(const QString &s)
{
if (!m_isValid) {
QString newURL = s + ":" + urlString;
parse(newURL.ascii(), &newURL);
return;
}
QString newURL = s + urlString.mid(schemeEndPos);
parse(newURL.ascii(), &newURL);
}
void KURL::setHost(const QString &s)
{
if (m_isValid) {
bool slashSlashNeeded = userStartPos == schemeEndPos + 1;
int hostStart = (passwordEndPos == userStartPos) ? passwordEndPos : passwordEndPos + 1;
QString newURL = urlString.left(hostStart) + (slashSlashNeeded ? "//" : QString()) + s + urlString.mid(hostEndPos);
parse(newURL.ascii(), &newURL);
}
}
void KURL::setPort(unsigned short i)
{
if (m_isValid) {
bool colonNeeded = portEndPos == hostEndPos;
int portStart = (colonNeeded ? hostEndPos : hostEndPos + 1);
QString newURL = urlString.left(portStart) + (colonNeeded ? ":" : QString()) + QString::number(i) + urlString.mid(portEndPos);
parse(newURL.ascii(), &newURL);
}
}
void KURL::setUser(const QString &user)
{
if (m_isValid) {
QString u;
int end = userEndPos;
if (!user.isEmpty()) {
// Untested code, but this is never used.
ASSERT_NOT_REACHED();
#if 0
u = user;
if (userStartPos == schemeEndPos + 1) {
u = "//" + u;
}
// Add '@' if we didn't have one before.
if (end == hostEndPos || (end == passwordEndPos && urlString[end] != '@')) {
u += '@';
}
#endif
} else {
// Remove '@' if we now have neither user nor password.
if (userEndPos == passwordEndPos && end != hostEndPos && urlString[end] == '@') {
end += 1;
}
}
const QString newURL = urlString.left(userStartPos) + u + urlString.mid(end);
parse(newURL.ascii(), &newURL);
}
}
void KURL::setPass(const QString &password)
{
if (m_isValid) {
QString p;
int end = passwordEndPos;
if (!password.isEmpty()) {
// Untested code, but this is never used.
ASSERT_NOT_REACHED();
#if 0
p = ':' + password + '@';
if (userEndPos == schemeEndPos + 1) {
p = "//" + p;
}
// Eat the existing '@' since we are going to add our own.
if (end != hostEndPos && urlString[end] == '@') {
end += 1;
}
#endif
} else {
// Remove '@' if we now have neither user nor password.
if (userStartPos == userEndPos && end != hostEndPos && urlString[end] == '@') {
end += 1;
}
}
const QString newURL = urlString.left(userEndPos) + p + urlString.mid(end);
parse(newURL.ascii(), &newURL);
}
}
void KURL::setRef(const QString &s)
{
if (m_isValid) {
QString newURL = urlString.left(queryEndPos) + (s.isEmpty() ? QString() : "#" + s);
parse(newURL.ascii(), &newURL);
}
}
void KURL::setQuery(const QString &query, int encoding_hint)
{
if (m_isValid) {
QString q;
if (!query.isEmpty() && query[0] != '?') {
q = "?" + query;
} else {
q = query;
}
QString newURL = urlString.left(pathEndPos) + q + urlString.mid(queryEndPos);
parse(newURL.ascii(), &newURL);
}
}
void KURL::setPath(const QString &s)
{
if (m_isValid) {
QString newURL = urlString.left(portEndPos) + encode_string(s) + urlString.mid(pathEndPos);
parse(newURL.ascii(), &newURL);
}
}
QString KURL::canonicalURL() const
{
#ifdef CONSTRUCT_CANONICAL_STRING
bool hadPrePathComponent = false;
QString canonicalURL;
if (!protocol().isEmpty()) {
canonicalURL += protocol();
canonicalURL += "://";
hadPrePathComponent = true;
}
if (!_user().isEmpty()) {
canonicalURL += _user();
if (!_pass().isEmpty()){
canonicalURL += ":";
canonicalURL += _pass();
}
canonicalURL += "@";
hadPrePathComponent = true;
}
if (!_host().isEmpty()) {
canonicalURL += _host();
unsigned short int p = port();
if (p != 0) {
canonicalURL += ":";
canonicalURL += QString::number(p);
}
hadPrePathComponent = true;
}
if (hadPrePathComponent && (strncasecmp ("http", url, schemeEnd) == 0 ||
strncasecmp ("https", url, schemeEnd) == 0) && _path().isEmpty()) {
canonicalURL += "/";
}
if (!_path().isEmpty()) {
canonicalURL += _path();
}
if (!query().isEmpty()) {
canonicalURL += "?";
canonicalURL += query();
}
if (!ref().isEmpty()) {
canonicalURL += "#";
canonicalURL += ref();
}
return canonicalURL;
#else
return urlString;
#endif
}
QString KURL::prettyURL() const
{
if (!m_isValid) {
return urlString;
}
QString result = protocol() + ":";
QString authority;
if (hostEndPos != passwordEndPos) {
if (userEndPos != userStartPos) {
authority += user();
authority += "@";
}
authority += host();
if (port() != 0) {
authority += ":";
authority += QString::number(port());
}
}
if (!authority.isEmpty()) {
result += "//" + authority;
}
result += path();
result += query();
if (fragmentEndPos != queryEndPos) {
result += "#" + ref();
}
return result;
}
QString KURL::decode_string(const QString &urlString)
{
CFStringRef unescaped = CFURLCreateStringByReplacingPercentEscapes(NULL, urlString.getCFString(), CFSTR(""));
if (!unescaped) {
// FIXME: To avoid this error, we need to write our own unescaping function.
ERROR("CFURL found ill-formed escape sequences in %s", urlString.ascii());
return urlString;
}
QString qUnescaped = QString::fromCFString(unescaped);
CFRelease(unescaped);
return qUnescaped;
}
static void appendEscapingBadChars(char*& buffer, const char *strStart, size_t length)
{
char *p = buffer;
const char *str = strStart;
const char *strEnd = strStart + length;
while (str < strEnd) {
unsigned char c = *str++;
if (IS_BAD_CHAR(c)) {
if (c == '%' && strEnd - str >= 2 && IS_HEX_DIGIT(str[0]) && IS_HEX_DIGIT(str[1])) {
*p++ = c;
*p++ = *str++;
*p++ = *str++;
} else if (c == '?') {
*p++ = c;
} else {
*p++ = '%';
*p++ = hexDigits[c >> 4];
*p++ = hexDigits[c & 0xF];
}
} else {
*p++ = c;
}
}
buffer = p;
}
// copy a path, accounting for "." and ".." segments
static int copyPathRemovingDots(char *dst, const char *src, int srcStart, int srcEnd)
{
const char *baseStringStart = src + srcStart;
const char *baseStringEnd = src + srcEnd;
char *bufferPathStart = dst;
const char *baseStringPos = baseStringStart;
// this code is unprepared for paths that do not begin with a slash
// and we should always have one in the source string
ASSERT(baseStringPos[0] == '/');
// copy the leading slash into the destination
*dst = *baseStringPos;
baseStringPos++;
dst++;
while (baseStringPos < baseStringEnd) {
if (baseStringPos[0] == '.' && dst[-1] == '/') {
if (baseStringPos[1] == '/' || baseStringPos + 1 == baseStringEnd) {
// skip over "." segment
baseStringPos += 2;
continue;
} else if (baseStringPos[1] == '.' && (baseStringPos[2] == '/' ||
baseStringPos + 2 == baseStringEnd)) {
// skip over ".." segment and rewind the last segment
// the RFC leaves it up to the app to decide what to do with excess
// ".." segments - we choose to drop them since some web content
// relies on this.
baseStringPos += 3;
if (dst > bufferPathStart + 1) {
dst--;
}
// Note that these two while blocks differ subtly.
// The first helps to remove multiple adjoining slashes as we rewind.
// The +1 to bufferPathStart in the first while block prevents eating a leading slash
while (dst > bufferPathStart + 1 && dst[-1] == '/') {
dst--;
}
while (dst > bufferPathStart && dst[-1] != '/') {
dst--;
}
continue;
}
}
*dst = *baseStringPos;
baseStringPos++;
dst++;
}
*dst = '\0';
return dst - bufferPathStart;
}
void KURL::parse(const char *url, const QString *originalString)
{
m_isValid = true;
if (url == NULL || url[0] == '\0') {
// valid URL must be non-empty
m_isValid = false;
urlString = url;
return;
}
if (!IS_SCHEME_FIRST_CHAR(url[0])) {
// scheme must start with an alphabetic character
m_isValid = false;
urlString = url;
return;
}
int schemeEnd = 0;
while (IS_SCHEME_CHAR(url[schemeEnd])) {
schemeEnd++;
}
if (url[schemeEnd] != ':') {
m_isValid = false;
urlString = url;
return;
}
int userStart = schemeEnd + 1;
int userEnd;
int passwordStart;
int passwordEnd;
int hostStart;
int hostEnd;
int portStart;
int portEnd;
bool hierarchical = url[schemeEnd + 1] == '/';
if (hierarchical && url[schemeEnd + 2] == '/') {
// part after the scheme must be a net_path, parse the authority section
// FIXME: authority characters may be scanned twice
userStart += 2;
userEnd = userStart;
int colonPos = 0;
while (IS_USERINFO_CHAR(url[userEnd])) {
if (url[userEnd] == ':' && colonPos == 0) {
colonPos = userEnd;
}
userEnd++;
}
if (url[userEnd] == '@') {
// actual end of the userinfo, start on the host
if (colonPos != 0) {
passwordEnd = userEnd;
userEnd = colonPos;
passwordStart = colonPos + 1;
} else {
passwordStart = passwordEnd = userEnd;
}
hostStart = passwordEnd + 1;
} else if (url[userEnd] == '\0' || url[userEnd] == '[' || IS_PATH_SEGMENT_END_CHAR(url[userEnd])) {
// hit the end of the authority, must have been no user
// or looks like an IPv6 hostname
// either way, try to parse it as a hostname
userEnd = userStart;
passwordStart = passwordEnd = userEnd;
hostStart = userStart;
} else {
// invalid character
m_isValid = false;
urlString = url;
return;
}
hostEnd = hostStart;
// IPV6 IP address
if (url[hostEnd] == '[') {
hostEnd++;
while (IS_IPV6_CHAR(url[hostEnd])) {
hostEnd++;
}
if (url[hostEnd] == ']') {
hostEnd++;
} else {
// invalid character
m_isValid = false;
urlString = url;
return;
}
} else {
while (IS_HOSTNAME_CHAR(url[hostEnd])) {
hostEnd++;
}
}
if (url[hostEnd] == ':') {
portStart = portEnd = hostEnd + 1;
// possible start of port
portEnd = portStart;
while (isdigit(url[portEnd])) {
portEnd++;
}
} else {
portStart = portEnd = hostEnd;
}
if (url[portEnd] != '\0' && !IS_PATH_SEGMENT_END_CHAR(url[portEnd])) {
// invalid character
m_isValid = false;
urlString = url;
return;
}
} else {
// the part after the scheme must be an opaque_part or an abs_path
userEnd = userStart;
passwordStart = passwordEnd = userEnd;
hostStart = hostEnd = passwordEnd;
portStart = portEnd = hostEnd;
}
int pathStart = portEnd;
int pathEnd = pathStart;
int queryStart;
int queryEnd;
int fragmentStart;
int fragmentEnd;
if (!hierarchical) {
while (url[pathEnd] != '\0') {
pathEnd++;
}
queryStart = queryEnd = pathEnd;
fragmentStart = fragmentEnd = pathEnd;
}
else {
while (url[pathEnd] != '\0' && url[pathEnd] != '?' && url[pathEnd] != '#') {
pathEnd++;
}
queryStart = pathEnd;
queryEnd = queryStart;
if (url[queryStart] == '?') {
while (url[queryEnd] != '\0' && url[queryEnd] != '#') {
queryEnd++;
}
}
fragmentStart = queryEnd;
fragmentEnd = fragmentStart;
if (url[fragmentStart] == '#') {
fragmentStart++;
fragmentEnd = fragmentStart;
while(url[fragmentEnd] != '\0') {
fragmentEnd++;
}
}
}
// assemble it all, remembering the real ranges
char static_buffer[4096];
char *buffer;
uint bufferLength = fragmentEnd * 3 + 1;
if (bufferLength <= sizeof(static_buffer)) {
buffer = static_buffer;
} else {
buffer = (char *)malloc(bufferLength);
}
char *p = buffer;
const char *strPtr = url;
// copy in the scheme
const char *schemeEndPtr = url + schemeEnd;
while (strPtr < schemeEndPtr) {
*p++ = *strPtr++;
}
schemeEndPos = p - buffer;
// Check if we're http or https.
bool isHTTPorHTTPS = tolower(url[0]) == 'h'
&& tolower(url[1]) == 't'
&& tolower(url[2]) == 't'
&& tolower(url[3]) == 'p'
&& (url[4] == ':'
|| (tolower(url[4]) == 's' && url[5] == ':'));
bool hostIsLocalHost = portEnd - userStart == 9
&& tolower(url[userStart]) == 'l'
&& tolower(url[userStart+1]) == 'o'
&& tolower(url[userStart+2]) == 'c'
&& tolower(url[userStart+3]) == 'a'
&& tolower(url[userStart+4]) == 'l'
&& tolower(url[userStart+5]) == 'h'
&& tolower(url[userStart+6]) == 'o'
&& tolower(url[userStart+7]) == 's'
&& tolower(url[userStart+8]) == 't';
bool isFile = tolower(url[0]) == 'f'
&& tolower(url[1]) == 'i'
&& tolower(url[2]) == 'l'
&& tolower(url[3]) == 'e'
&& url[4] == ':';
// File URLs need a host part unless it is just file:// or file://localhost
bool degenFilePath = pathStart == pathEnd
&& (hostStart == hostEnd
|| hostIsLocalHost);
bool haveNonHostAuthorityPart = userStart != userEnd || passwordStart != passwordEnd || portStart != portEnd;
// add ":" after scheme
*p++ = ':';
// if we have at least one authority part or a file URL - add "//" and authority
if (isFile ? !degenFilePath
: (haveNonHostAuthorityPart || hostStart != hostEnd)) {
//if ((isFile && !degenFilePath) || haveNonHostAuthorityPart || hostStart != hostEnd) {
// still adds // for file://localhost, file://
//if (!(isFile && degenFilePath) && (haveNonHostAuthorityPart || hostStart != hostEnd)) {
//doesn't add // for things like file:///foo
*p++ = '/';
*p++ = '/';
userStartPos = p - buffer;
// copy in the user
strPtr = url + userStart;
const char *userEndPtr = url + userEnd;
while (strPtr < userEndPtr) {
*p++ = *strPtr++;
}
userEndPos = p - buffer;
// copy in the password
if (passwordEnd != passwordStart) {
*p++ = ':';
strPtr = url + passwordStart;
const char *passwordEndPtr = url + passwordEnd;
while (strPtr < passwordEndPtr) {
*p++ = *strPtr++;
}
}
passwordEndPos = p - buffer;
// If we had any user info, add "@"
if (p - buffer != userStartPos) {
*p++ = '@';
}
// copy in the host, except in the case of a file URL with authority="localhost"
if (!(isFile && hostIsLocalHost && !haveNonHostAuthorityPart)) {
strPtr = url + hostStart;
const char *hostEndPtr = url + hostEnd;
while (strPtr < hostEndPtr) {
*p++ = *strPtr++;
}
}
hostEndPos = p - buffer;
// copy in the port
if (portEnd != portStart) {
*p++ = ':';
strPtr = url + portStart;
const char *portEndPtr = url + portEnd;
while (strPtr < portEndPtr) {
*p++ = *strPtr++;
}
}
portEndPos = p - buffer;
} else {
userStartPos = userEndPos = passwordEndPos = hostEndPos = portEndPos = p - buffer;
}
// For canonicalization, ensure we have a '/' for no path.
// Only do this for http and https.
if (isHTTPorHTTPS && pathEnd - pathStart == 0) {
*p++ = '/';
}
// add path, escaping bad characters
if (hierarchical && (strstr(url, "/.") || strstr(url, ".."))) {
char static_path_buffer[4096];
char *path_buffer;
uint pathBufferLength = pathEnd - pathStart + 1;
if (pathBufferLength <= sizeof(static_path_buffer)) {
path_buffer = static_path_buffer;
} else {
path_buffer = (char *)malloc(pathBufferLength);
}
copyPathRemovingDots(path_buffer, url, pathStart, pathEnd);
appendEscapingBadChars(p, path_buffer, strlen(path_buffer));
if (path_buffer != static_path_buffer) {
free(path_buffer);
}
}
else {
appendEscapingBadChars(p, url + pathStart, pathEnd - pathStart);
}
pathEndPos = p - buffer;
// add query, escaping bad characters
appendEscapingBadChars(p, url + queryStart, queryEnd - queryStart);
queryEndPos = p - buffer;
// add fragment, escaping bad characters
if (fragmentEnd != fragmentStart) {
*p++ = '#';
appendEscapingBadChars(p, url + fragmentStart, fragmentEnd - fragmentStart);
}
fragmentEndPos = p - buffer;
// If we didn't end up actually changing the original string and
// it started as a QString, just reuse it, to avoid extra
// allocation.
if (originalString != NULL && strncmp(buffer, url, fragmentEndPos) == 0) {
urlString = *originalString;
} else {
urlString = QString(buffer, fragmentEndPos);
}
ASSERT(p - buffer <= (int)bufferLength);
if (buffer != static_buffer) {
free(buffer);
}
}
QString KURL::encodedHtmlRef() const
{
return ref();
}
QString KURL::htmlRef() const
{
return decode_string(ref());
}
bool operator==(const KURL &a, const KURL &b)
{
return a.urlString == b.urlString;
}
bool urlcmp(const QString &a, const QString &b, bool ignoreTrailingSlash, bool ignoreRef)
{
if (ignoreRef) {
KURL aURL(a);
KURL bURL(b);
if (aURL.m_isValid && bURL.m_isValid) {
return aURL.urlString.left(aURL.queryEndPos) == bURL.urlString.left(bURL.queryEndPos);
}
}
return a == b;
}
QString KURL::encode_string(const QString& notEncodedString)
{
QCString asUTF8 = notEncodedString.utf8();
char static_buffer[4096];
char *buffer;
uint bufferLength = asUTF8.length() * 3 + 1;
if (bufferLength <= sizeof(static_buffer)) {
buffer = static_buffer;
} else {
buffer = (char *)malloc(bufferLength);
}
char *p = buffer;
const char *str = asUTF8;
const char *strEnd = str + asUTF8.length();
while (str < strEnd) {
unsigned char c = *str++;
if (IS_BAD_CHAR(c)) {
*p++ = '%';
*p++ = hexDigits[c >> 4];
*p++ = hexDigits[c & 0xF];
} else {
*p++ = c;
}
}
QString result(buffer, p - buffer);
ASSERT(p - buffer <= (int)bufferLength);
if (buffer != static_buffer) {
free(buffer);
}
return result;
}
NSURL *KURL::getNSURL() const
{
const UInt8 *bytes = (const UInt8 *)(urlString.latin1());
NSURL *result = nil;
if (urlString.length() > 0) {
// NOTE: We use UTF-8 here since this encoding is used when computing strings when returning URL components
// (e.g calls to NSURL -path). However, this function is not tolerant of illegal UTF-8 sequences, which
// could either be a malformed string or bytes in a different encoding, like shift-jis, so we fall back
// onto using ISO Latin 1 in those cases.
result = (NSURL *)CFURLCreateAbsoluteURLWithBytes(NULL, bytes, urlString.length(), kCFStringEncodingUTF8, NULL, TRUE);
if (!result) {
result = (NSURL *)CFURLCreateAbsoluteURLWithBytes(NULL, bytes, urlString.length(), kCFStringEncodingISOLatin1, NULL, TRUE);
}
[result autorelease];
}
else {
result = [NSURL URLWithString:@""];
}
return result;
}
NSData *KURL::getNSData() const
{
const UInt8 *bytes = (const UInt8 *)(urlString.latin1());
return [NSData dataWithBytes:bytes length:urlString.length()];
}