forked from KolibriOS/kolibrios
61 lines
1.1 KiB
C
61 lines
1.1 KiB
C
|
|
dword GetAbsoluteURL(dword in_URL)
|
|
{
|
|
int i;
|
|
dword orig_URL = in_URL;
|
|
char newurl[URL_SIZE+1];
|
|
|
|
while (i=strstr(in_URL, "&"))
|
|
{
|
|
strcpy(i+1, i+5);
|
|
}
|
|
|
|
if (check_is_the_url_absolute(in_URL)) return orig_URL;
|
|
|
|
IF (!strncmp(in_URL,"//", 2))
|
|
{
|
|
strcpy(#newurl, "http:");
|
|
strcat(#newurl, in_URL);
|
|
strcpy(orig_URL, #newurl);
|
|
return orig_URL;
|
|
}
|
|
|
|
IF (!strncmp(in_URL,"./", 2)) in_URL+=2;
|
|
if (!http.transfer)
|
|
{
|
|
strcpy(#newurl, history.current());
|
|
}
|
|
else
|
|
{
|
|
strcpy(#newurl, history.items.get(history.active-2));
|
|
}
|
|
|
|
if (ESBYTE[in_URL] == '/') //remove everything after site domain name
|
|
{
|
|
i = strchr(#newurl+8, '/');
|
|
if (i) ESBYTE[i]=0;
|
|
in_URL+=1;
|
|
}
|
|
|
|
_CUT_ST_LEVEL_MARK:
|
|
|
|
if (newurl[strrchr(#newurl, '/')-2]<>'/')
|
|
{
|
|
newurl[strrchr(#newurl, '/')] = 0x00;
|
|
}
|
|
|
|
IF (!strncmp(in_URL,"../",3))
|
|
{
|
|
in_URL+=3;
|
|
newurl[strrchr(#newurl, '/')-1] = 0x00;
|
|
goto _CUT_ST_LEVEL_MARK;
|
|
}
|
|
|
|
if (newurl[strlen(#newurl)-1]<>'/') strcat(#newurl, "/");
|
|
|
|
strcat(#newurl, in_URL);
|
|
strcpy(orig_URL, #newurl);
|
|
return orig_URL;
|
|
}
|
|
|