mirror of
https://github.com/EpochModTeam/DayZ-Epoch.git
synced 2026-04-16 09:23:23 +03:00
Update server_monitor
This commit is contained in:
ebaydayz
@@ -1,494 +1,374 @@
|
||||
private ["_date","_year","_month","_day","_hour","_minute","_date1","_hiveResponse","_key","_objectCount","_dir","_point","_i","_action","_dam","_selection","_wantExplosiveParts","_entity","_worldspace","_damage","_booleans","_rawData","_ObjectID","_class","_CharacterID","_inventory","_hitpoints","_fuel","_id","_objectArray","_script","_result","_outcome"];
|
||||
[]execVM "\z\addons\dayz_server\system\s_fps.sqf"; //server monitor FPS (writes each ~181s diag_fps+181s diag_fpsmin*)
|
||||
//[]execVM "\z\addons\dayz_server\system\s_fps.sqf"; //server monitor FPS (writes each ~181s diag_fps+181s diag_fpsmin*)
|
||||
#include "\z\addons\dayz_server\compile\server_toggle_debug.hpp"
|
||||
|
||||
waitUntil{!isNil "BIS_MPF_InitDone"};
|
||||
waitUntil{initialized}; //means all the functions are now defined
|
||||
waitUntil {!isNil "BIS_MPF_InitDone"};
|
||||
waitUntil {initialized}; //means all the functions are now defined
|
||||
if (!isNil "sm_done") exitWith {}; // prevent server_monitor be called twice (bug during login of the first player)
|
||||
sm_done = false;
|
||||
|
||||
dayz_serverIDMonitor = [];
|
||||
|
||||
dayz_versionNo = getText(configFile >> "CfgMods" >> "DayZ" >> "version");
|
||||
dayz_hiveVersionNo = getNumber(configFile >> "CfgMods" >> "DayZ" >> "hiveVersion");
|
||||
|
||||
dayz_versionNo = getText (configFile >> "CfgMods" >> "DayZ" >> "version");
|
||||
dayz_hiveVersionNo = getNumber (configFile >> "CfgMods" >> "DayZ" >> "hiveVersion");
|
||||
_hiveLoaded = false;
|
||||
|
||||
diag_log "HIVE: Starting";
|
||||
|
||||
//Set the Time
|
||||
_key = "CHILD:307:";
|
||||
_result = _key call server_hiveReadWrite;
|
||||
_outcome = _result select 0;
|
||||
if(_outcome == "PASS") then {
|
||||
if (_outcome == "PASS") then {
|
||||
_date = _result select 1;
|
||||
|
||||
//date setup
|
||||
_year = _date select 0;
|
||||
_month = _date select 1;
|
||||
_day = _date select 2;
|
||||
_hour = _date select 3;
|
||||
_minute = _date select 4;
|
||||
|
||||
if(dayz_ForcefullmoonNights) then {
|
||||
_date = [2012,8,2,_hour,_minute];
|
||||
};
|
||||
diag_log [ "TIME SYNC: Local Time set to:", _date, "Fullmoon:",dayz_ForcefullmoonNights, "Date given by HiveExt.dll:", _result select 1];
|
||||
if (dayz_ForcefullmoonNights) then {_date = [2012,8,2,_hour,_minute];};
|
||||
diag_log ["TIME SYNC: Local Time set to:", _date, "Fullmoon:",dayz_ForcefullmoonNights,"Date given by HiveExt.dll:",_result select 1];
|
||||
setDate _date;
|
||||
dayzSetDate = _date;
|
||||
publicVariable "dayzSetDate";
|
||||
};
|
||||
|
||||
//Stream in objects
|
||||
/* STREAM OBJECTS */
|
||||
//Send the key
|
||||
_key = format["CHILD:302:%1:",dayZ_instance];
|
||||
_result = _key call server_hiveReadWrite;
|
||||
|
||||
diag_log "HIVE: Request sent";
|
||||
_myArray = [];
|
||||
_status = _result select 0; //Process result
|
||||
|
||||
if (_status == "ObjectStreamStart") then {
|
||||
_hiveLoaded = true;
|
||||
_val = _result select 1;
|
||||
//Stream Objects
|
||||
diag_log ("HIVE: Commence Object Streaming...");
|
||||
for "_i" from 1 to _val do {
|
||||
_result = _key call server_hiveReadWrite;
|
||||
_status = _result select 0;
|
||||
_myArray set [count _myArray,_result];
|
||||
};
|
||||
diag_log ("HIVE: Streamed " + str(_val) + " objects");
|
||||
};
|
||||
|
||||
{
|
||||
//Parse Array
|
||||
_action = _x select 0;
|
||||
_idKey = _x select 1;
|
||||
_type = if ((typeName (_x select 2)) == "STRING") then { _x select 2 };
|
||||
_ownerID = _x select 3;
|
||||
_worldspace = if ((typeName (_x select 4)) == "ARRAY") then { _x select 4 } else { [] };
|
||||
_inventory = if ((typeName (_x select 5)) == "ARRAY") then { _x select 5 } else { [] };
|
||||
_hitPoints = if ((typeName (_x select 6)) == "ARRAY") then { _x select 6 } else { [] };
|
||||
_fuel = if ((typeName (_x select 7)) == "SCALAR") then { _x select 7 } else { 0 };
|
||||
_damage = if ((typeName (_x select 8)) == "SCALAR") then { _x select 8 } else { 0.9 };
|
||||
_worldspace call dayz_objectUID2; // Set objectUIDs in currentObjectUIDs list to prevent duplicates
|
||||
|
||||
// Custom Configs
|
||||
if(isnil "MaxVehicleLimit") then {
|
||||
MaxVehicleLimit = 50;
|
||||
};
|
||||
|
||||
if(isnil "MaxDynamicDebris") then {
|
||||
MaxDynamicDebris = 100;
|
||||
};
|
||||
if(isnil "MaxAmmoBoxes") then {
|
||||
MaxAmmoBoxes = 3;
|
||||
};
|
||||
if(isnil "MaxMineVeins") then {
|
||||
MaxMineVeins = 50;
|
||||
};
|
||||
// Custon Configs End
|
||||
|
||||
if (isServer && isNil "sm_done") then {
|
||||
|
||||
serverVehicleCounter = [];
|
||||
_hiveResponse = [];
|
||||
|
||||
for "_i" from 1 to 5 do {
|
||||
diag_log "HIVE: trying to get objects";
|
||||
_key = format["CHILD:302:%1:", dayZ_instance];
|
||||
_hiveResponse = _key call server_hiveReadWrite;
|
||||
if ((((isnil "_hiveResponse") || {(typeName _hiveResponse != "ARRAY")}) || {((typeName (_hiveResponse select 1)) != "SCALAR")})) then {
|
||||
if ((_hiveResponse select 1) == "Instance already initialized") then {
|
||||
_superkey = profileNamespace getVariable "SUPERKEY";
|
||||
_shutdown = format["CHILD:400:%1:", _superkey];
|
||||
_res = _shutdown call server_hiveReadWrite;
|
||||
diag_log ("HIVE: attempt to kill.. HiveExt response:"+str(_res));
|
||||
} else {
|
||||
diag_log ("HIVE: connection problem... HiveExt response:"+str(_hiveResponse));
|
||||
|
||||
};
|
||||
_hiveResponse = ["",0];
|
||||
}
|
||||
else {
|
||||
diag_log ("HIVE: found "+str(_hiveResponse select 1)+" objects" );
|
||||
_i = 99; // break
|
||||
//set object to be in maintenance mode
|
||||
_maintenanceMode = false;
|
||||
_maintenanceModeVars = [];
|
||||
|
||||
_dir = floor(random(360));
|
||||
_pos = getMarkerpos "respawn_west";
|
||||
_wsDone = false;
|
||||
|
||||
if (count _worldspace >= 1 && {(typeName (_worldspace select 0)) == "SCALAR"}) then {
|
||||
_dir = _worldspace select 0;
|
||||
};
|
||||
if (count _worldspace == 2 && {(typeName (_worldspace select 1)) == "ARRAY"}) then {
|
||||
_i = _worldspace select 1;
|
||||
if (count _i == 3 &&
|
||||
{(typeName (_i select 0)) == "SCALAR"} &&
|
||||
{(typeName (_i select 1)) == "SCALAR"} &&
|
||||
{(typeName (_i select 2)) == "SCALAR"}) then {
|
||||
_pos = _i;
|
||||
_wsDone = true;
|
||||
};
|
||||
};
|
||||
|
||||
_BuildingQueue = [];
|
||||
_objectQueue = [];
|
||||
|
||||
if ((_hiveResponse select 0) == "ObjectStreamStart") then {
|
||||
|
||||
// save superkey
|
||||
profileNamespace setVariable ["SUPERKEY",(_hiveResponse select 2)];
|
||||
|
||||
_hiveLoaded = true;
|
||||
|
||||
diag_log ("HIVE: Commence Object Streaming...");
|
||||
_key = format["CHILD:302:%1:", dayZ_instance];
|
||||
_objectCount = _hiveResponse select 1;
|
||||
_bQty = 0;
|
||||
_vQty = 0;
|
||||
for "_i" from 1 to _objectCount do {
|
||||
_hiveResponse = _key call server_hiveReadWriteLarge;
|
||||
//diag_log (format["HIVE dbg %1 %2", typeName _hiveResponse, _hiveResponse]);
|
||||
if ((_hiveResponse select 2) isKindOf "ModularItems") then {
|
||||
_BuildingQueue set [_bQty,_hiveResponse];
|
||||
_bQty = _bQty + 1;
|
||||
} else {
|
||||
_objectQueue set [_vQty,_hiveResponse];
|
||||
_vQty = _vQty + 1;
|
||||
};
|
||||
};
|
||||
diag_log ("HIVE: got " + str(_bQty) + " Epoch Objects and " + str(_vQty) + " Vehicles");
|
||||
if (!_wsDone) then {
|
||||
//_pos = [,0,30,10,0,2000,0] call BIS_fnc_findSafePos;
|
||||
if (count _pos < 3) then { _pos = [_worldspace select 0,_worldspace select 1,0]; };
|
||||
diag_log ("MOVED OBJ: " + str(_idKey) + " of class " + _type + " to pos: " + str(_pos));
|
||||
};
|
||||
|
||||
// # NOW SPAWN OBJECTS #
|
||||
_totalvehicles = 0;
|
||||
{
|
||||
_idKey = _x select 1;
|
||||
_type = _x select 2;
|
||||
_ownerID = _x select 3;
|
||||
_worldspace = _x select 4;
|
||||
_inventory = _x select 5;
|
||||
_hitPoints = _x select 6;
|
||||
_fuel = _x select 7;
|
||||
_damage = _x select 8;
|
||||
_worldspace call dayz_objectUID2; // Set objectUIDs in currentObjectUIDs list to prevent duplicates
|
||||
|
||||
if (_damage < 1) then {
|
||||
//diag_log format["OBJ: %1 - %2,%3,%4,%5,%6,%7,%8", _idKey,_type,_ownerID,_worldspace,_inventory,_hitPoints,_fuel,_damage];
|
||||
|
||||
_dir = 0;
|
||||
_pos = [0,0,0];
|
||||
_wsDone = false;
|
||||
if (count _worldspace >= 2) then
|
||||
{
|
||||
_dir = _worldspace select 0;
|
||||
if (count (_worldspace select 1) == 3) then {
|
||||
_pos = _worldspace select 1;
|
||||
_wsDone = true;
|
||||
}
|
||||
};
|
||||
|
||||
if (!_wsDone) then {
|
||||
if (count _worldspace >= 1) then { _dir = _worldspace select 0; };
|
||||
_pos = [dayz_centerMarker,0,4000,10,0,2000,0] call BIS_fnc_findSafePos;
|
||||
if (count _pos < 3) then { _pos = [_pos select 0,_pos select 1,0]; };
|
||||
diag_log ("MOVED OBJ: " + str(_idKey) + " of class " + _type + " to pos: " + str(_pos));
|
||||
if (_type in DayZ_WoodenFence or _type in DayZ_WoodenGates) then {
|
||||
//Use hitpoints for Maintenance system and other systems later.
|
||||
{
|
||||
if (_x == "Maintenance") then {_maintenanceMode = true;};
|
||||
} forEach _hitPoints;
|
||||
|
||||
//Enable model swap for a damaged model.
|
||||
if (_maintenanceMode) then {
|
||||
_maintenanceModeVars = [_type,_pos];
|
||||
_type = _type + "_Damaged";
|
||||
};
|
||||
//TODO add remove object and readd old fence (hideobject would be nice to use here :-( )
|
||||
//Pending change to new fence models\Layout
|
||||
};
|
||||
|
||||
|
||||
if (_damage < 1) then {
|
||||
//diag_log format["OBJ: %1 - %2", _idKey,_type];
|
||||
|
||||
//Create it
|
||||
_object = createVehicle [_type, _pos, [], 0, "CAN_COLLIDE"];
|
||||
_object setVariable ["lastUpdate",time];
|
||||
_object setVariable ["ObjectID", _idKey, true];
|
||||
|
||||
_lockable = 0;
|
||||
if(isNumber (configFile >> "CfgVehicles" >> _type >> "lockable")) then {
|
||||
_lockable = getNumber(configFile >> "CfgVehicles" >> _type >> "lockable");
|
||||
};
|
||||
|
||||
// fix for leading zero issues on safe codes after restart
|
||||
if (_lockable == 4) then {
|
||||
_codeCount = (count (toArray _ownerID));
|
||||
if(_codeCount == 3) then {
|
||||
_ownerID = format["0%1", _ownerID];
|
||||
};
|
||||
if(_codeCount == 2) then {
|
||||
_ownerID = format["00%1", _ownerID];
|
||||
};
|
||||
if(_codeCount == 1) then {
|
||||
_ownerID = format["000%1", _ownerID];
|
||||
};
|
||||
};
|
||||
|
||||
if (_lockable == 3) then {
|
||||
_codeCount = (count (toArray _ownerID));
|
||||
if(_codeCount == 2) then {
|
||||
_ownerID = format["0%1", _ownerID];
|
||||
};
|
||||
if(_codeCount == 1) then {
|
||||
_ownerID = format["00%1", _ownerID];
|
||||
};
|
||||
};
|
||||
|
||||
_object setVariable ["CharacterID", _ownerID, true];
|
||||
|
||||
clearWeaponCargoGlobal _object;
|
||||
clearMagazineCargoGlobal _object;
|
||||
// _object setVehicleAmmo DZE_vehicleAmmo;
|
||||
|
||||
_object setdir _dir;
|
||||
_object setposATL _pos;
|
||||
_object setDamage _damage;
|
||||
|
||||
if ((typeOf _object) in dayz_allowedObjects) then {
|
||||
if (DZE_GodModeBase) then {
|
||||
_object addEventHandler ["HandleDamage", {false}];
|
||||
} else {
|
||||
_object addMPEventHandler ["MPKilled",{_this call vehicle_handleServerKilled;}];
|
||||
};
|
||||
// Test disabling simulation server side on buildables only.
|
||||
_object enableSimulation false;
|
||||
// used for inplace upgrades && lock/unlock of safe
|
||||
_object setVariable ["OEMPos", _pos, true];
|
||||
|
||||
};
|
||||
|
||||
//Create it
|
||||
_object = createVehicle [_type, _pos, [], 0, if (_type in DayZ_nonCollide) then {"NONE"} else {"CAN_COLLIDE"}];
|
||||
|
||||
// prevent immediate hive write when vehicle parts are set up
|
||||
_object setVariable ["lastUpdate",diag_ticktime];
|
||||
_object setVariable ["ObjectID", _idKey, true];
|
||||
dayz_serverIDMonitor set [count dayz_serverIDMonitor,_idKey];
|
||||
// Fix for leading zero issues on safe codes after restart
|
||||
_lockable = if (isNumber (configFile >> "CfgVehicles" >> _type >> "lockable")) then {getNumber (configFile >> "CfgVehicles" >> _type >> "lockable");} else {0};
|
||||
if (_lockable == 4) then {
|
||||
_codeCount = count (toArray _ownerID);
|
||||
if (_codeCount == 3) then {_ownerID = format["0%1",_ownerID];};
|
||||
if (_codeCount == 2) then {_ownerID = format["00%1",_ownerID];};
|
||||
if (_codeCount == 1) then {_ownerID = format["000%1",_ownerID];};
|
||||
};
|
||||
if (_lockable == 3) then {
|
||||
_codeCount = count (toArray _ownerID);
|
||||
if (_codeCount == 2) then {_ownerID = format["0%1",_ownerID];};
|
||||
if (_codeCount == 1) then {_ownerID = format["00%1",_ownerID];};
|
||||
};
|
||||
_object setVariable ["CharacterID", _ownerID, true];
|
||||
_object setDir _dir;
|
||||
_object setDamage _damage;
|
||||
|
||||
if (!_wsDone) then {[_object,"position",true] call server_updateObject;};
|
||||
if (_type == "Base_Fire_DZ") then {_object spawn base_fireMonitor;};
|
||||
|
||||
//Dont add inventory for traps.
|
||||
if (!(_object isKindOf "TrapItems") && !(_object isKindOf "DZ_buildables")) then {
|
||||
clearWeaponCargoGlobal _object;
|
||||
clearMagazineCargoGlobal _object;
|
||||
clearBackpackCargoGlobal _object;
|
||||
if (count _inventory > 0) then {
|
||||
if (_type in DZE_LockedStorage) then {
|
||||
// Fill variables with loot
|
||||
_object setVariable ["WeaponCargo", (_inventory select 0),true];
|
||||
_object setVariable ["MagazineCargo", (_inventory select 1),true];
|
||||
_object setVariable ["BackpackCargo", (_inventory select 2),true];
|
||||
_object setVariable ["WeaponCargo",(_inventory select 0),true];
|
||||
_object setVariable ["MagazineCargo",(_inventory select 1),true];
|
||||
_object setVariable ["BackpackCargo",(_inventory select 2),true];
|
||||
} else {
|
||||
|
||||
//Add weapons
|
||||
_objWpnTypes = (_inventory select 0) select 0;
|
||||
_objWpnQty = (_inventory select 0) select 1;
|
||||
_countr = 0;
|
||||
_cargo = _inventory;
|
||||
_config = ["CfgWeapons","CfgMagazines","CfgVehicles"];
|
||||
{
|
||||
if(_x in (DZE_REPLACE_WEAPONS select 0)) then {
|
||||
_x = (DZE_REPLACE_WEAPONS select 1) select ((DZE_REPLACE_WEAPONS select 0) find _x);
|
||||
};
|
||||
_isOK = isClass(configFile >> "CfgWeapons" >> _x);
|
||||
if (_isOK) then {
|
||||
_object addWeaponCargoGlobal [_x,(_objWpnQty select _countr)];
|
||||
};
|
||||
_countr = _countr + 1;
|
||||
} count _objWpnTypes;
|
||||
|
||||
//Add Magazines
|
||||
_objWpnTypes = (_inventory select 1) select 0;
|
||||
_objWpnQty = (_inventory select 1) select 1;
|
||||
_countr = 0;
|
||||
{
|
||||
if (_x == "BoltSteel") then { _x = "WoodenArrow" }; // Convert BoltSteel to WoodenArrow
|
||||
if (_x == "ItemTent") then { _x = "ItemTentOld" };
|
||||
_isOK = isClass(configFile >> "CfgMagazines" >> _x);
|
||||
if (_isOK) then {
|
||||
_object addMagazineCargoGlobal [_x,(_objWpnQty select _countr)];
|
||||
};
|
||||
_countr = _countr + 1;
|
||||
} count _objWpnTypes;
|
||||
|
||||
//Add Backpacks
|
||||
_objWpnTypes = (_inventory select 2) select 0;
|
||||
_objWpnQty = (_inventory select 2) select 1;
|
||||
_countr = 0;
|
||||
{
|
||||
_isOK = isClass(configFile >> "CfgVehicles" >> _x);
|
||||
if (_isOK) then {
|
||||
_object addBackpackCargoGlobal [_x,(_objWpnQty select _countr)];
|
||||
};
|
||||
_countr = _countr + 1;
|
||||
} count _objWpnTypes;
|
||||
};
|
||||
};
|
||||
|
||||
if (_object isKindOf "AllVehicles") then {
|
||||
{
|
||||
_selection = _x select 0;
|
||||
_dam = _x select 1;
|
||||
if (_selection in dayZ_explosiveParts && _dam > 0.8) then {_dam = 0.8};
|
||||
[_object,_selection,_dam] call fnc_veh_setFixServer;
|
||||
} count _hitpoints;
|
||||
|
||||
_object setFuel _fuel;
|
||||
|
||||
if (!((typeOf _object) in dayz_allowedObjects)) then {
|
||||
|
||||
//_object setvelocity [0,0,1];
|
||||
_object call fnc_veh_ResetEH;
|
||||
|
||||
if(_ownerID != "0" && !(_object isKindOf "Bicycle")) then {
|
||||
_object setVehicleLock "locked";
|
||||
};
|
||||
|
||||
_totalvehicles = _totalvehicles + 1;
|
||||
|
||||
// total each vehicle
|
||||
serverVehicleCounter set [count serverVehicleCounter,_type];
|
||||
_magItemTypes = _x select 0;
|
||||
_magItemQtys = _x select 1;
|
||||
_i = _forEachIndex;
|
||||
{
|
||||
if ((isClass (configFile >> (_config select _i) >> _x)) &&
|
||||
{(getNumber (configFile >> (_config select _i) >> _x >> "stopThis") != 1)}) then {
|
||||
if (_forEachIndex < count _magItemQtys) then {
|
||||
switch (_i) do {
|
||||
case 0: {_object addWeaponCargoGlobal [_x,(_magItemQtys select _forEachIndex)];};
|
||||
case 1: {_object addMagazineCargoGlobal [_x,(_magItemQtys select _forEachIndex)];};
|
||||
case 2: {_object addBackpackCargoGlobal [_x,(_magItemQtys select _forEachIndex)];};
|
||||
};
|
||||
};
|
||||
};
|
||||
} forEach _magItemTypes;
|
||||
} forEach _cargo;
|
||||
};
|
||||
};
|
||||
|
||||
//Monitor the object
|
||||
PVDZE_serverObjectMonitor set [count PVDZE_serverObjectMonitor,_object];
|
||||
};
|
||||
} forEach (_BuildingQueue + _objectQueue);
|
||||
// # END SPAWN OBJECTS #
|
||||
|
||||
// Draw the pseudo random seeds
|
||||
call server_plantSpawner;
|
||||
|
||||
// launch the legacy task scheduler
|
||||
[] execFSM "\z\addons\dayz_server\system\server_cleanup.fsm";
|
||||
|
||||
// launch the new task scheduler
|
||||
[] execVM "\z\addons\dayz_server\system\scheduler\sched_init.sqf";
|
||||
|
||||
createCenter civilian;
|
||||
if (isDedicated) then {
|
||||
endLoadingScreen;
|
||||
};
|
||||
allowConnection = true;
|
||||
sm_done = true;
|
||||
publicVariable "sm_done";
|
||||
|
||||
// Trap loop
|
||||
[] spawn {
|
||||
private ["_array","_array2","_array3","_script","_armed"];
|
||||
_array = str dayz_traps;
|
||||
_array2 = str dayz_traps_active;
|
||||
_array3 = str dayz_traps_trigger;
|
||||
|
||||
while {1 == 1} do {
|
||||
if ((str dayz_traps != _array) || (str dayz_traps_active != _array2) || (str dayz_traps_trigger != _array3)) then {
|
||||
_array = str dayz_traps;
|
||||
_array2 = str dayz_traps_active;
|
||||
_array3 = str dayz_traps_trigger;
|
||||
|
||||
//diag_log "DEBUG: traps";
|
||||
//diag_log format["dayz_traps (%2) -> %1", dayz_traps, count dayz_traps];
|
||||
//diag_log format["dayz_traps_active (%2) -> %1", dayz_traps_active, count dayz_traps_active];
|
||||
//diag_log format["dayz_traps_trigger (%2) -> %1", dayz_traps_trigger, count dayz_traps_trigger];
|
||||
//diag_log "DEBUG: end traps";
|
||||
};
|
||||
|
||||
|
||||
if (_object isKindOf "AllVehicles") then {
|
||||
{
|
||||
if (isNull _x) then {
|
||||
dayz_traps = dayz_traps - [_x];
|
||||
};
|
||||
_selection = _x select 0;
|
||||
_dam = _x select 1;
|
||||
if ((_selection in dayZ_explosiveParts && _dam > 0.8) && !(_object isKindOf "Air")) then {_dam = 0.8};
|
||||
[_object,_selection,_dam] call fnc_veh_setFixServer;
|
||||
} forEach _hitpoints;
|
||||
|
||||
_script = call compile getText (configFile >> "CfgVehicles" >> typeOf _x >> "script");
|
||||
_armed = _x getVariable ["armed", false];
|
||||
|
||||
if (_armed) then {
|
||||
if !(_x in dayz_traps_active) then {
|
||||
["arm", _x] call _script;
|
||||
};
|
||||
} else {
|
||||
if (_x in dayz_traps_active) then {
|
||||
["disarm", _x] call _script;
|
||||
};
|
||||
};
|
||||
|
||||
sleep 0.01;
|
||||
} forEach dayz_traps;
|
||||
sleep 1;
|
||||
};
|
||||
};
|
||||
|
||||
//Points of interest
|
||||
[] execVM "\z\addons\dayz_server\compile\server_spawnInfectedCamps.sqf";
|
||||
[] execVM "\z\addons\dayz_server\compile\server_spawnCarePackages.sqf";
|
||||
[] execVM "\z\addons\dayz_server\compile\server_spawnCrashSites.sqf";
|
||||
|
||||
|
||||
[] execVM "\z\addons\dayz_server\system\lit_fireplaces.sqf";
|
||||
|
||||
|
||||
"PVDZ_sec_atp" addPublicVariableEventHandler {
|
||||
_x = _this select 1;
|
||||
switch (1==1) do {
|
||||
case (typeName _x == "STRING") : { // just some logs from the client
|
||||
diag_log _x;
|
||||
};
|
||||
case (count _x == 2) : { // wrong side
|
||||
diag_log Format [ "P1ayer %1 reports possible 'side' hack... Server may be comprised!", (_x select 1) call fa_plr2Str ];
|
||||
};
|
||||
default { // player hit
|
||||
_unit = _x select 0;
|
||||
_source = _x select 1;
|
||||
if (((!(isNil {_source})) AND {(!(isNull _source))}) AND {((_source isKindOf "CAManBase") AND {(owner _unit != owner _source)})}) then {
|
||||
diag_log format ["P1ayer %1 hit by %2 %3 from %4 meters",
|
||||
_unit call fa_plr2Str, _source call fa_plr2Str, _x select 2, _x select 3];
|
||||
if (_unit getVariable["processedDeath", 0] == 0) then {
|
||||
_unit setVariable [ "attacker", name _source ];
|
||||
_unit setVariable [ "noatlf4", diag_ticktime ]; // server-side "not in combat" test, if player is not already dead
|
||||
};
|
||||
};
|
||||
};
|
||||
};
|
||||
};
|
||||
|
||||
// preload server traders menu data into cache
|
||||
if !(DZE_ConfigTrader) then {
|
||||
{
|
||||
// get tids
|
||||
_traderData = call compile format["menu_%1;",_x];
|
||||
if(!isNil "_traderData") then {
|
||||
{
|
||||
_traderid = _x select 1;
|
||||
|
||||
_retrader = [];
|
||||
|
||||
_key = format["CHILD:399:%1:",_traderid];
|
||||
_data = "HiveEXT" callExtension _key;
|
||||
|
||||
//diag_log "HIVE: Request sent";
|
||||
|
||||
//Process result
|
||||
_result = call compile format ["%1",_data];
|
||||
_status = _result select 0;
|
||||
|
||||
if (_status == "ObjectStreamStart") then {
|
||||
_val = _result select 1;
|
||||
//Stream Objects
|
||||
//diag_log ("HIVE: Commence Menu Streaming...");
|
||||
call compile format["ServerTcache_%1 = [];",_traderid];
|
||||
for "_i" from 1 to _val do {
|
||||
_data = "HiveEXT" callExtension _key;
|
||||
_result = call compile format ["%1",_data];
|
||||
call compile format["ServerTcache_%1 set [count ServerTcache_%1,%2]",_traderid,_result];
|
||||
_retrader set [count _retrader,_result];
|
||||
};
|
||||
//diag_log ("HIVE: Streamed " + str(_val) + " objects");
|
||||
};
|
||||
|
||||
} forEach (_traderData select 0);
|
||||
};
|
||||
} forEach serverTraders;
|
||||
};
|
||||
|
||||
if (_hiveLoaded) then {
|
||||
// spawn_vehicles
|
||||
_vehLimit = MaxVehicleLimit - _totalvehicles;
|
||||
if(_vehLimit > 0) then {
|
||||
diag_log ("HIVE: Spawning # of Vehicles: " + str(_vehLimit));
|
||||
for "_x" from 1 to _vehLimit do {
|
||||
[] spawn spawn_vehicles;
|
||||
_object setFuel _fuel;
|
||||
if !(_type in DayZ_SafeObjects) then {
|
||||
_object setVelocity [0,0,1];
|
||||
_object call fnc_veh_ResetEH;
|
||||
if (_ownerID != "0" && !(_object isKindOf "Bicycle")) then {_object setVehicleLock "locked";};
|
||||
serverVehicleCounter set [count serverVehicleCounter,_type]; // total each vehicle
|
||||
};
|
||||
} else {
|
||||
diag_log "HIVE: Vehicle Spawn limit reached!";
|
||||
};
|
||||
};
|
||||
|
||||
// spawn_roadblocks
|
||||
diag_log ("HIVE: Spawning # of Debris: " + str(MaxDynamicDebris));
|
||||
for "_x" from 1 to MaxDynamicDebris do {
|
||||
[] spawn spawn_roadblocks;
|
||||
};
|
||||
// spawn_ammosupply at server start 1% of roadblocks
|
||||
diag_log ("HIVE: Spawning # of Ammo Boxes: " + str(MaxAmmoBoxes));
|
||||
for "_x" from 1 to MaxAmmoBoxes do {
|
||||
[] spawn spawn_ammosupply;
|
||||
};
|
||||
// call spawning mining veins
|
||||
diag_log ("HIVE: Spawning # of Veins: " + str(MaxMineVeins));
|
||||
for "_x" from 1 to MaxMineVeins do {
|
||||
[] spawn spawn_mineveins;
|
||||
};
|
||||
|
||||
// All done spawning stuff, can clear these now
|
||||
buildingList = [];
|
||||
roadList = [];
|
||||
|
||||
// [_guaranteedLoot, _randomizedLoot, _frequency, _variance, _spawnChance, _spawnMarker, _spawnRadius, _spawnFire, _fadeFire]
|
||||
if(OldHeliCrash) then {
|
||||
_nul = [3, 4, (50 * 60), (15 * 60), 0.75, 'center', HeliCrashArea, true, false] spawn server_spawnCrashSite;
|
||||
};
|
||||
if (isDedicated) then {
|
||||
// Epoch Events
|
||||
_id = [] spawn server_spawnEvents;
|
||||
|
||||
// spawn debug box
|
||||
_debugMarkerPosition = getMarkerPos "respawn_west";
|
||||
_debugMarkerPosition = [(_debugMarkerPosition select 0),(_debugMarkerPosition select 1),1];
|
||||
_vehicle_0 = createVehicle ["DebugBox_DZ", _debugMarkerPosition, [], 0, "CAN_COLLIDE"];
|
||||
_vehicle_0 setPos _debugMarkerPosition;
|
||||
_vehicle_0 setVariable ["ObjectID","1",true];
|
||||
|
||||
// max number of spawn markers
|
||||
if(isnil "spawnMarkerCount") then {
|
||||
spawnMarkerCount = 10;
|
||||
};
|
||||
actualSpawnMarkerCount = 0;
|
||||
// count valid spawn marker positions
|
||||
for "_i" from 0 to spawnMarkerCount do {
|
||||
if (!([(getMarkerPos format["spawn%1", _i]), [0,0,0]] call BIS_fnc_areEqual)) then {
|
||||
actualSpawnMarkerCount = actualSpawnMarkerCount + 1;
|
||||
} else {
|
||||
// exit since we did not find any further markers
|
||||
_i = spawnMarkerCount + 99;
|
||||
if (_type in DayZ_nonCollide) then {
|
||||
_pos set [2,0];
|
||||
};
|
||||
if (_pos select 2 == 0 or 0 == getNumber (configFile >> "CfgVehicles" >> _type >> "canbevertical")) then {
|
||||
_object setVectorUp surfaceNormal _pos;
|
||||
} else {
|
||||
_object setVectorUp [0,0,1];
|
||||
};
|
||||
_object setPosATL _pos;
|
||||
if ((_object isKindOf "DZ_buildables") or ((_type in DayZ_SafeObjects) && !(_object isKindOf "TrapItems"))) then {
|
||||
if (DZE_GodModeBase) then {_object addEventHandler ["HandleDamage",{false}];} else {_object addMPEventHandler ["MPKilled",{_this call vehicle_handleServerKilled;}];};
|
||||
_object enableSimulation false; // Test disabling simulation server side on buildables only.
|
||||
_object setVariable ["OEMPos",_pos,true]; // used for inplace upgrades and lock/unlock of safe
|
||||
};
|
||||
if (_object isKindOf "TrapItems" or _object isKindOf "DZ_buildables") then {
|
||||
//Use inventory for owner/clan info and traps armed state
|
||||
{
|
||||
if (typeName _x != "ARRAY") then {
|
||||
// old method
|
||||
if (typeName _x == "STRING") then { _object setVariable ["ownerArray", [_x], true]; };
|
||||
if (typeName _x == "BOOLEAN") then { _object setVariable ["armed", _x, true]; };
|
||||
} else { // new method: array of variables to set
|
||||
switch (_x select 0) do {
|
||||
case "ownerArray" : { _object setVariable ["ownerArray", _x select 1, true]; };
|
||||
case "clanArray" : { _object setVariable ["clanArray", _x select 1, true]; };
|
||||
case "armed" : { _object setVariable ["armed", _x select 1, true]; };
|
||||
case "padlockCombination" : { _object setVariable ["dayz_padlockCombination",_x select 1,false]; };
|
||||
case "BuildLock" : { _object setVariable ["BuildLock",_x select 1,true]; };
|
||||
};
|
||||
};
|
||||
} forEach _inventory;
|
||||
|
||||
if (_maintenanceMode) then { _object setVariable ["Maintenance", true, true]; _object setVariable ["MaintenanceVars", _maintenanceModeVars]; };
|
||||
};
|
||||
|
||||
};
|
||||
diag_log format["Total Number of spawn locations %1", actualSpawnMarkerCount];
|
||||
|
||||
endLoadingScreen;
|
||||
dayz_serverObjectMonitor set [count dayz_serverObjectMonitor,_object]; //Monitor the object
|
||||
};
|
||||
} forEach _myArray;
|
||||
|
||||
allowConnection = true;
|
||||
sm_done = true;
|
||||
publicVariable "sm_done";
|
||||
// # END OF STREAMING #
|
||||
|
||||
call server_plantSpawner; // Draw the pseudo random seeds
|
||||
[] execFSM "\z\addons\dayz_server\system\server_cleanup.fsm"; // launch the legacy task scheduler
|
||||
[] execVM "\z\addons\dayz_server\system\scheduler\sched_init.sqf"; // launch the new task scheduler
|
||||
|
||||
createCenter civilian;
|
||||
if (isDedicated) then {endLoadingScreen;};
|
||||
allowConnection = true;
|
||||
sm_done = true;
|
||||
publicVariable "sm_done";
|
||||
|
||||
// Trap loop
|
||||
[] spawn {
|
||||
private ["_array","_array2","_array3","_script","_armed"];
|
||||
_array = str dayz_traps;
|
||||
_array2 = str dayz_traps_active;
|
||||
_array3 = str dayz_traps_trigger;
|
||||
|
||||
while {1 == 1} do {
|
||||
if ((str dayz_traps != _array) || (str dayz_traps_active != _array2) || (str dayz_traps_trigger != _array3)) then {
|
||||
_array = str dayz_traps;
|
||||
_array2 = str dayz_traps_active;
|
||||
_array3 = str dayz_traps_trigger;
|
||||
//diag_log "DEBUG: traps";
|
||||
//diag_log format["dayz_traps (%2) -> %1", dayz_traps, count dayz_traps];
|
||||
//diag_log format["dayz_traps_active (%2) -> %1", dayz_traps_active, count dayz_traps_active];
|
||||
//diag_log format["dayz_traps_trigger (%2) -> %1", dayz_traps_trigger, count dayz_traps_trigger];
|
||||
//diag_log "DEBUG: end traps";
|
||||
};
|
||||
|
||||
{
|
||||
if (isNull _x) then {dayz_traps = dayz_traps - [_x];};
|
||||
|
||||
_script = call compile getText (configFile >> "CfgVehicles" >> typeOf _x >> "script");
|
||||
_armed = _x getVariable ["armed", false];
|
||||
|
||||
if (_armed) then {
|
||||
if !(_x in dayz_traps_active) then {["arm", _x] call _script;};
|
||||
} else {
|
||||
if (_x in dayz_traps_active) then {["disarm", _x] call _script;};
|
||||
};
|
||||
uiSleep 0.01;
|
||||
} forEach dayz_traps;
|
||||
uiSleep 1;
|
||||
};
|
||||
};
|
||||
|
||||
//Points of interest
|
||||
[] execVM "\z\addons\dayz_server\compile\server_spawnInfectedCamps.sqf";
|
||||
[] execVM "\z\addons\dayz_server\compile\server_spawnCarePackages.sqf";
|
||||
[] execVM "\z\addons\dayz_server\compile\server_spawnCrashSites.sqf";
|
||||
|
||||
if ((toLower worldName) == "chernarus") then {execVM "\z\addons\dayz_server\system\lit_fireplaces.sqf";};
|
||||
|
||||
"PVDZ_sec_atp" addPublicVariableEventHandler {
|
||||
_x = _this select 1;
|
||||
switch (1==1) do {
|
||||
case (typeName _x == "STRING") : { // just some logs from the client
|
||||
diag_log _x;
|
||||
};
|
||||
case (count _x == 2) : { // wrong side
|
||||
diag_log format["P1ayer %1 reports possible 'side' hack. Server may be compromised!",(_x select 1) call fa_plr2Str];
|
||||
};
|
||||
default { // player hit
|
||||
_unit = _x select 0;
|
||||
_source = _x select 1;
|
||||
if (((!(isNil {_source})) && {!(isNull _source)}) && {((_source isKindOf "CAManBase") && {owner _unit != owner _source})}) then {
|
||||
diag_log format ["P1ayer %1 hit by %2 %3 from %4 meters",
|
||||
_unit call fa_plr2Str, _source call fa_plr2Str, _x select 2, _x select 3];
|
||||
if (_unit getVariable ["processedDeath",0] == 0) then {
|
||||
_unit setVariable ["attacker", name _source];
|
||||
_unit setVariable ["noatlf4", diag_ticktime]; // server-side "not in combat" test, if player is not already dead
|
||||
};
|
||||
};
|
||||
};
|
||||
};
|
||||
};
|
||||
|
||||
// preload server traders menu data into cache
|
||||
if !(DZE_ConfigTrader) then {
|
||||
{
|
||||
// get tids
|
||||
_traderData = call compile format["menu_%1;",_x];
|
||||
if (!isNil "_traderData") then {
|
||||
{
|
||||
_traderid = _x select 1;
|
||||
_retrader = [];
|
||||
|
||||
_key = format["CHILD:399:%1:",_traderid];
|
||||
_data = "HiveEXT" callExtension _key;
|
||||
_result = call compile format["%1",_data];
|
||||
_status = _result select 0;
|
||||
|
||||
if (_status == "ObjectStreamStart") then {
|
||||
_val = _result select 1;
|
||||
call compile format["ServerTcache_%1 = [];",_traderid];
|
||||
for "_i" from 1 to _val do {
|
||||
_data = "HiveEXT" callExtension _key;
|
||||
_result = call compile format ["%1",_data];
|
||||
call compile format["ServerTcache_%1 set [count ServerTcache_%1,%2]",_traderid,_result];
|
||||
_retrader set [count _retrader,_result];
|
||||
};
|
||||
};
|
||||
} forEach (_traderData select 0);
|
||||
};
|
||||
} forEach serverTraders;
|
||||
};
|
||||
|
||||
if (_hiveLoaded) then {
|
||||
// spawn_vehicles
|
||||
_vehLimit = MaxVehicleLimit - (count serverVehicleCounter);
|
||||
if (_vehLimit > 0) then {
|
||||
diag_log ("HIVE: Spawning # of Vehicles: " + str(_vehLimit));
|
||||
for "_x" from 1 to _vehLimit do {[] spawn spawn_vehicles;};
|
||||
} else {
|
||||
diag_log "HIVE: Vehicle Spawn limit reached!";
|
||||
};
|
||||
};
|
||||
|
||||
diag_log ("HIVE: Spawning # of Debris: " + str(MaxDynamicDebris));
|
||||
for "_x" from 1 to MaxDynamicDebris do {[] spawn spawn_roadblocks;};
|
||||
|
||||
diag_log ("HIVE: Spawning # of Ammo Boxes: " + str(MaxAmmoBoxes));
|
||||
for "_x" from 1 to MaxAmmoBoxes do {[] spawn spawn_ammosupply;};
|
||||
|
||||
diag_log ("HIVE: Spawning # of Veins: " + str(MaxMineVeins));
|
||||
for "_x" from 1 to MaxMineVeins do {[] spawn spawn_mineveins;};
|
||||
|
||||
// All done spawning stuff, can clear these now
|
||||
buildingList = []; roadList = [];
|
||||
|
||||
// [_guaranteedLoot,_randomizedLoot,_frequency,_variance,_spawnChance,_spawnMarker,_spawnRadius,_spawnFire,_fadeFire]
|
||||
if (OldHeliCrash) then {
|
||||
_nul = [3,4,(50 * 60),(15 * 60),0.75,'center',HeliCrashArea,true,false] spawn server_spawnCrashSite;
|
||||
};
|
||||
|
||||
[] spawn server_spawnEvents;
|
||||
_debugMarkerPosition = getMarkerPos "respawn_west";
|
||||
_debugMarkerPosition = [(_debugMarkerPosition select 0),(_debugMarkerPosition select 1),1];
|
||||
_vehicle_0 = createVehicle ["DebugBox_DZ", _debugMarkerPosition, [], 0, "CAN_COLLIDE"];
|
||||
_vehicle_0 setPos _debugMarkerPosition;
|
||||
_vehicle_0 setVariable ["ObjectID","1",true];
|
||||
Reference in New Issue
Block a user