-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathopcode.pas
49 lines (46 loc) · 865 Bytes
/
opcode.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
UNIT opcode;
INTERFACE
const {dgram opcode}
{note: opcodes >=$80 are a reply and have transaction id so they can overlap}
(*Object Transfer*)
otOldCtrl=$09;
otoldData=$08;
otRequest=$04;
otReport= $05;
otStop= $06;
otData= $08;
otInfo= $07;
otDataSync=$09;
(*Distributed Hash Table*)
dhtBeatQ=$0A;
dhtBeatR=$0B;
dhtCheckQ=$0C;
dhtCheckR=$0D;
dhtCheckS=$0E;
dhtResult=$0F;
dhtGetNodes=$10;
dhtTestQuery=$11;
dhtTestResult=$91;
dhtNodes=$90;
(*Tracker*)
tkQuery=$14;
tkAnnounce=$15;
tkResult=$94;
tkAnnOK=$95;
(*Profile*)
profQuery=$12;
profResult=$92;
(*Messages*)
const (*ObjectTransfer magic numbers*)
otcOK=0;
otcEoT=1;
otcDebug=2;
otcNotFound=3;
otcChannelLimit=4;
otcStorageError=5;
otcServerThrottle=6;
otcFail=7;
otcMulticast=8;
otcUseTCP=9;
IMPLEMENTATION
END.