- 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
- 81
- 82
- 83
- 84
- 85
- 86
- 87
- 88
- 89
- 90
- 91
- 92
- 93
- 94
- 95
- 96
- 97
- 98
- 99
- 100
procedure TWorker.handleAdminClient(socket: TTCPBlockSocket; json: ISuperObject);
var
msg: ansistring;
request: SOString;
//s: ISuperObject;
res: ISuperObject;
begin
res := json['data'];
msg := json['func'].AsString;
if msg = 'deletemarket' then
begin
database.deleteMarket(res.GetS('id'));
msg:='getmarkets';
end;
if msg = 'addmarket' then
begin
database.addMarket(res.GetS('mapid'),res.GetS('name'),res.GetS('type_id'));
msg:='getmarkets';
end;
if msg = 'setmarketitems' then
begin
database.setMarktItems(res.GetS('id'),res.GetA('items'));
TSocketSender.sendStr(socket, '{"type":"' + msg + '","data":{"id":' + res.GetS('id') + '}}');
exit;
end;
if msg = 'updatemarket' then
begin
database.updateMarkt(res.GetS('id'),res.GetS('name'),res.GetS('enabled'));
TSocketSender.sendStr(socket, '{"type":"' + msg + '","data":{"id":' + res.GetS('id') + '}}');
exit;
end;
if msg = 'getmarktitems' then
begin
request := database.getMarktItems(res.GetS('id'));
TSocketSender.sendStr(socket, '{ "type" : "' + msg + '" , "data" : ' + request + '}');
exit;
end;
if msg = 'getmarkets' then
begin
request := database.getMarkets();
TSocketSender.sendStr(socket, '{ "type" : "' + msg + '" , "data" : ' + request + '}');
exit;
end;
if msg = 'getmarkettypes' then
begin
request := database.getMarketTypes();
TSocketSender.sendStr(socket, '{ "type" : "' + msg + '" , "data" : ' + request + '}');
exit;
end;
if msg = 'getitems' then
begin
request := database.getAdminItems();
TSocketSender.sendStr(socket, '{ "type" : "' + msg + '" , "data" : ' + request + '}');
exit;
end;
if msg = 'getitemstypes' then
begin
request := database.getAdminItemsTypes();
TSocketSender.sendStr(socket, '{ "type" : "' + msg + '" , "data" : ' + request + '}');
exit;
end;
if msg = 'getitem' then
begin
request := database.getItem(res['itemid'].AsInteger).getJSON.AsString;
TSocketSender.sendStr(socket, '{ "type" : "' + msg + '" , "data" : ' + request + '}');
exit;
end;
if msg = 'additem' then
begin
request := database.addItem(res);
TSocketSender.sendStr(socket, '{ "type" : "' + msg + '" , "data" : ' + request + '}');
exit;
end;
if msg = 'setitem' then
begin
database.setItem(res);
exit;
end;
if msg = 'getavatar' then
begin
getAvatar(socket);
exit;
end;
if msg = 'acceptavatar' then
begin
acceptAvatar(res);
exit;
end;
if msg = 'declineavatar' then
begin
declineAvatar(res);
exit;
end;
if msg = 'admindata' then
begin
sendAdminData(socket);
exit;
jojaxon # 0
guest6 # 0
MAPTbIwKA # 0 ⇈
guest # 0 ⇈
Saehrimnir # 0 ⇈
CBuHOKYP # 0 ⇈
betking1 # 0