antihack.sqf uptodate

SQF/dayz_code/system/antihack.sqf

@@ -4,44 +4,131 @@
 	Refactored By Alby
 */
 
-private ["_curpos","_lastpos","_curheight","_lastheight","_terrainHeight","_curtime","_lasttime","_distance","_difftime","_speed","_topSpeed","_debug"];
+private ["_log","_playerName","_playerUID","_al1veOnce","_debug","_lastpos","_lastheight","_lasttime","_lastVehicle","_v","_h","_topv","_toph","_curpos","_distance","_curtime","_difftime","_plant","_curheight","_speed","_topSpeed","_terrainHeight","_differenceCheck","_lastPosVar","_safetyVehicle","_curPos"];
 
 waitUntil {vehicle player == player};
 
-_lastpos = getPosATL (vehicle player);
+[] spawn {
-_lastheight = (ATLtoASL _lastpos) select 2;
+	private ["_playerName","_playerUID"];
-_lasttime = time;
+	_playerName = name player;
-
+	_playerUID = getPlayerUID player;
-while {alive player} do
+	while {true} do {
-{
+		if (typeName player != "OBJECT") then {
-	_curpos = getPosATL (vehicle player);
+			atp = format["WARNING typename error for player UID#%1", _playerUID];
-	_curheight = (ATLtoASL _curpos) select 2;
+			publicVariableServer "atp";
-	_curtime = time;
+			//forceEnd;
-	_distance = _lastpos distance _curpos;
+			endMission "LOSER";
-	_difftime = (_curtime - _lasttime) max 0.001;
+			sleep 10; //Bypass spam
-	_speed = _distance / _difftime;
+		};
-	_topSpeed = 10;
-	
-	if (vehicle player != player) then {
-		_topSpeed = getNumber (configFile >> "CfgVehicles" >> typeOf (vehicle player) >> "maxSpeed");
 	};
-	
+};
-	_terrainHeight = getTerrainHeightASL [_curpos select 0, _curpos select 1];
-	
-	//diag_log format["DEBUG: terrain: %1    current: %2", _terrainHeight, _curheight];
-	//diag_log format["DEBUG: all: %1		player: %2		fall: %3		terrain: %4", !((vehicle player == player) && (_curheight < _lastheight) && ((_curheight - _terrainHeight) > 1)), (vehicle player == player), (_curheight < _lastheight), (_curheight - _terrainHeight) > 1];
-	
-	_debug = getMarkerPos "respawn_west";
-	if ((_speed > _topSpeed) && (alive player) && ((driver (vehicle player) == player) or (isNull (driver (vehicle player)))) && (_debug distance _lastpos > 3000) && !((vehicle player == player) && (_curheight < _lastheight) && ((_curheight - _terrainHeight) > 1))) then {
-		(vehicle player) setpos _lastpos;
-		atp = [name player, dayz_characterID, _lastpos, _curPos, getPosATL player];
-		publicVariableServer "atp";
-	} else {
 
-		_lastpos = _curpos;
+_al1veOnce = false;
-		_lastheight = _curheight;		
+while {true} do {
+	_debug = getMarkerpos "respawn_west";
+	_lastpos = getPosATL (vehicle player);
+	_lastheight = (ATLtoASL _lastpos) select 2;
+	_lasttime = diag_ticktime;
+	_lastVehicle = vehicle player;
+
+	// freefall detection:
+	_v = 0;
+	_h = 0;
+	_topv = 0;
+	_toph = 0;
+
+	while {((typeName player == "OBJECT") AND {((player in playableUnits) AND {(alive player)})})} do {
+		//[-18697.58,379.53012,25815.256]
+		/*
+		if ([getMarkerPos "respawn_west", [0,0,0]] call BIS_fnc_areEqual || !([getMarkerPos "respawn_west", _debug] call BIS_fnc_areEqual)) then {
+			createMarkerLocal ["respawn_west", _debug];
+			"respawn_west" setMarkerType "EMPTY";
+		};
+		*/
+		_curpos = getPosATL (vehicle player);
+		_distance = _lastpos distance _curpos;
+		_curtime = diag_ticktime;
+		_difftime = _curtime - _lasttime;
+
+		if ((_distance > 10) OR {(_difftime > 1)}) then {
+			if (!_al1veOnce) then {
+				private [ "_loc", "_plant"];
+				// check that plants libs are properly loaded
+				// thanks to Tansien the great
+				// run only once per character life
+				{
+					_plant = _x createVehicleLocal _debug;
+					sleep 0.1;
+					if (sizeOf _x == 0) exitWith { 
+						atp = "Plants texture hack for type " + _x;
+						publicVariableServer "atp";
+						endMission "LOSER";
+					};
+					deleteVehicle _plant;
+				} forEach ["grass", "prunus", "picea", "fallentree", "phragmites", "acer", "amygdalusn", "Brush", "fiberplant", "amygdalusc", "boulder"];
+				diag_log format [ "%1: Plants libs tests done!", __FILE__];
+			};
+			_al1veOnce = true;
+			_curheight = (ATLtoASL _curpos) select 2;
+			_speed = _distance / _difftime;
+			_topSpeed = 10;
+
+			if (vehicle player != player) then {
+				_topSpeed = (getNumber (configFile >> "CfgVehicles" >> typeOf (vehicle player) >> "maxSpeed")) min 500;
+			};
+
+			_terrainHeight = getTerrainHeightASL [_curpos select 0, _curpos select 1];
+
+			/*
+			_differenceCheck = false;
+			_lastPosVar = player getVariable ["lastPos", []];
+			if (count _lastPosVar > 0) then {
+				_differenceCheck = (_lastPosVar distance _lastpos) > _topSpeed;
+			} else {
+				diag_log "LASTPOS RESET";
+			};
+			*/
+
+			_safetyVehicle = vehicle player;
+
+			if (_lastVehicle == vehicle player) then {
+				if ((_speed > _topSpeed) && (alive player) && ((driver (vehicle player) == player) or (isNull (driver (vehicle player)))) && (_debug distance _lastpos > 3000) && !((vehicle player == player) && (_curheight < _lastheight) && ((_curheight - _terrainHeight) > 1))) then {
+					(vehicle player) setposATL  _lastpos;
+//					atp = format["TELEPORT REVERT for player UID#%1 from %2 to %3, %4 meters, now at %5", getPlayerUID player, _lastpos, _curPos, round(_lastpos distance _curpos), getPosATL player];
+					atp = [name player, dayz_characterID, _lastpos, _curPos, getPosATL player];
+					publicVariableServer "atp";
+				} else {
+					_lastpos = _curpos;
+					_lastheight = _curheight;
+				};
+
+				_lasttime = _curtime;
+			};
+
+			if (_safetyVehicle == vehicle player) then {
+				_lastVehicle = vehicle player;
+			};
+
+		};
+		// freefall detection:
+		_v = -((velocity player) select 2);
+		_h = (getPosATL player) select 2;
+		if (_v > 4 AND _h > 3) then {
+			_topv = _topv max _v;
+			_toph = _toph max _h;
+			Dayz_freefall = [ time, _toph, _topv ];
+		}
+		else {
+			_topv = 0;
+			_toph = 0;
+		};
+		sleep 0.25;
 	};
-	
+// 	if (_al1veOnce) then {
-	_lasttime = _curtime;
+// 		sleep 5; 
-	sleep 0.5;
+// 		endMission "LOSER";
+// 	}
+// 	else {
+		sleep 0.1;
+// 	};
 };