Subversion Repositories Kolibri OS

Rev

Rev 6001 | Rev 6887 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6001 Rev 6005
Line 1... Line -...
1
//HTTP library
-
 
2
#ifndef INCLUDE_LIBHTTP_H
1
#ifndef INCLUDE_LIBHTTP_H
3
#define INCLUDE_LIBHTTP_H
2
#define INCLUDE_LIBHTTP_H
4
#print "[include ]\n"
3
#print "[include 
Line 5... Line 4...
5
 
4
 
6
#ifndef INCLUDE_KOLIBRI_H
5
#ifndef INCLUDE_KOLIBRI_H
7
#include "../lib/kolibri.h"
6
#include "../lib/kolibri.h"
Line 8... Line 7...
8
#endif
7
#endif
9
 
8
 
10
#ifndef INCLUDE_DLL_H
9
#ifndef INCLUDE_DLL_H
Line 11... Line -...
11
#include "../lib/dll.h"
-
 
12
#endif
10
#include "../lib/dll.h"
13
 
11
#endif
Line 14... Line 12...
14
dword NOT_INIT_LIBHTTP = true;
12
 
15
dword libHTTP = #alibHTTP;
13
dword libHTTP = #alibHTTP;
16
char alibHTTP[23] = "/sys/lib/http.obj\0";
14
char alibHTTP[] = "/sys/lib/http.obj";
17
 
15
 
Line 26... Line 24...
26
dword http_free              = #aHTTPfree;
24
dword http_free              = #aHTTPfree;
27
dword uri_escape             = #aURIescape;
25
dword uri_escape             = #aURIescape;
28
dword uri_unescape           = #aURIunescape;
26
dword uri_unescape           = #aURIunescape;
29
$DD 2 dup 0
27
$DD 2 dup 0
Line 30... Line 28...
30
 
28
 
31
char aLib_init[9]              = "lib_init\0";
29
char aLib_init[]             = "lib_init";
32
char aHTTPget[4]               = "get\0";
30
char aHTTPget[]              = "get";
33
char aHTTPhead[5]              = "head\0";
31
char aHTTPhead[]             = "head";
34
char aHTTPpost[5]              = "post\0";
32
char aHTTPpost[]             = "post";
35
char aFHF[18]                  = "find_header_field\0";
33
char aFHF[]                  = "find_header_field";
36
char aHTTPsend[5]              = "send\0";
34
char aHTTPsend[]             = "send";
37
char aHTTPreceive[8]           = "receive\0";
35
char aHTTPreceive[]          = "receive";
38
char aHTTPdisconnect[11]       = "disconnect\0";
36
char aHTTPdisconnect[]       = "disconnect";
39
char aHTTPfree[5]              = "free\0";
37
char aHTTPfree[]             = "free";
40
char aURIescape[7]             = "escape\0";
38
char aURIescape[]            = "escape";
Line 41... Line 39...
41
char aURIunescape[9]           = "unescape\0";
39
char aURIunescape[]          = "unescape";
42
 
40
 
43
// status flags
41
// status flags
44
#define FLAG_HTTP11             1 << 0
42
#define FLAG_HTTP11             1 << 0
Line 72... Line 70...
72
        dword   content_length;
70
        dword   content_length;
73
        dword   content_received;
71
        dword   content_received;
74
        char    http_header;
72
        char    http_header;
75
};
73
};
Line 76... Line -...
76
 
-
 
77
:dword file_get_contents(dword url,...)
-
 
78
{
-
 
79
	http_get(url,FLAG_HTTP11,"");
-
 
Line 80... Line 74...
80
}
74
 
81
 
75