Subversion Repositories Kolibri OS

Rev

Rev 7281 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5990 leency 1
 
2
{
3
	int i;
4
	dword orig_URL = in_URL;
5
	char newurl[sizeof(URL)];
6
7
 
8
	{
9
		strcpy(i+1, i+5);
10
	}
11
12
 
7282 leency 13
7163 leency 14
 
15
	{
16
		//strcpy(#newurl, "http:");
17
		//strcat(#newurl, in_URL);
18
		sprintf(#newurl, "http:%s", in_URL);
19
		strcpy(orig_URL, #newurl);
20
		return;
21
	}
22
5990 leency 23
 
24
	if (!http.transfer)
7281 leency 25
	{
5990 leency 26
		strcpy(#newurl, history.current());
6021 leency 27
	}
5990 leency 28
	else
29
	{
30
		strcpy(#newurl, history.items.get(history.active-2));
6021 leency 31
	}
5990 leency 32
33
 
34
	{
35
		i = strchr(#newurl+8, '/');
36
		if (i) ESBYTE[i]=0;
37
		in_URL+=1;
38
	}
39
40
 
41
42
 
43
	{
44
		newurl[strrchr(#newurl, '/')] = 0x00;
45
	}
46
47
 
48
	{
49
		in_URL+=3;
50
		newurl[strrchr(#newurl, '/')-1] = 0x00;
51
		goto _CUT_ST_LEVEL_MARK;
52
	}
53
54
 
55
56
 
57
	strcpy(orig_URL, #newurl);
58
}
59