/
DtNetConst.pas
82 lines (60 loc) · 1.92 KB
/
DtNetConst.pas
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
unit DTNetConst;
interface
const
MAX_PACKET_SIZE = 80000;
PACKET_MARKER = $119B92A8;
PACKET_ADDRESS_MARKER = 0;
PACKET_ADDRESS_PACKED_LENGTH = 4;
PACKET_ADDRESS_UNPACKED_LENGTH = 8;
PACKET_ADDRESS_TYPE = 13;
PACKET_ADDRESS_CRC = 14;
PACKET_ADDRESS_ENCRYPTION = 12;
PACKET_ADDRESS_USERDATA = 18;
PACKET_HEADER_SIZE = 18;
//Packet Data Types
PDT_SHORT = 1; PDT_LENGTH_SHORT = 2;
PDT_LONG = 2; PDT_LENGTH_LONG = 4;
PDT_STRING = 3;
PDT_BYTES = 4;
PDT_DOUBLE = 5; PDT_LENGTH_DOUBLE = 8;
PDT_DATETIME = 6; PDT_LENGTH_DATETIME = 8;
PDT_SHORT_OBJECT = 7; PDT_LENGTH_SHORT_OBJECT = 7;
PDT_LONG_OBJECT = 8; PDT_LENGTH_LONG_OBJECT = 12;
PDT_LONG_LONG = 9; PDT_LENGTH_LONG_LONG = 8;
PDT_BOOLEAN = 10; PDT_LENGTH_BOOLEAN = 1;
PDT_NULL = 11; PDT_LENGTH_NULL = 0;
PDT_EOF = 12; PDT_LENGTH_EOF = 0;
PDT_NOTEOF = 13; PDT_LENGTH_NOTEOF = 0;
const
KEY_SESSION = '100';
//Server Requests
RQ_NONE = 1 ; RSP_NONE = 1;
RQ_STATUS = 2 ; RSP_STATUS = 2 ;
RQ_GET_OBJECT = 101 ; RSP_GET_OBJECT = 101;
RQ_PUT_OBJECT = 102 ; RSP_PUT_OBJECT = 102;
RQ_NEW_OBJECT = 103 ; RSP_NEW_OBJECT = 103;
RQ_DEL_OBJECT = 104 ; RSP_DEL_OBJECT = 104;
RQ_LOGIN = $1001 ; RSP_LOGIN = $1001;
RQ_LOGOUT = $1002 ; RSP_LOGOUT = $1002;
RQ_VERIFY_ACCOUNT = $100A; RSP_VERIFY_ACCOUNT = $100A;
PACKET_TYPE_PROGRESS = 69;
PACKET_TYPE_CALLBACK = 70;
PACKET_TYPE_CALLBACK_RESPONSE = 71;
//Protocol Level
//Incrment this if a new revision of the protocol is present
SERVER_PROTOCOL_LEVEL = 4;
WINSOCK_TIMEOUT = 60;
//Enctyption types
ENC_NONE = 0;
ENC_SIMPLE = 1;
ENC_USER = 2;
//Data object types
DO_USER = 1;
DO_ACTIVITY = 2;
//Data object styles
DO_STYLE_LEARNER_FULL = 0;
DO_STYLE_LEARNER_BRIEF = 1;
DO_STYLE_ADMIN_BREIF = 2;
DO_STYLE_FULL = 3;
implementation
end.