ACRE2 compatibility and loadout restore fixes

- Preserve ACRE2 radio state when moving packs\n- Avoid ACRE filterUnitLoadout cargo corruption by filtering only radio IDs\n- Normalize cargo counts from actual container to prevent dropped items\n- Restore cargo reliably by adding ACRE radios last\n- No debug logging

Author: Darojax

README.md

@@ -31,6 +31,7 @@ An official rewrite and continuation of the original [BackpackOnChest mod by Der
 ### Improvements from the original
 - Optimizations.
 - Support for variables associated with the backpack (for items such as the ACE Gunbag or TFAR backpack radios).
+- Preserves ACRE2 radio settings (channel/volume/ear, etc.) when moving a backpack to/from the chest.
 - Transition to an easier development platform with the support of CBA and ACE macros.
 - Various other improvements.
 

addons/main/Stringtable.xml

@@ -110,5 +110,5 @@
             <Russian>Вынуждать игрока ходить когда рюкзак находится на груди</Russian>
             <Turkish>Oyuncu sırt çantası gövdesindeyken yürümeye zorlanır</Turkish>
         </Key>
-    </Package>
-</Project>
+    </Package>
+</Project>

addons/main/XEH_PREP.hpp

@@ -22,12 +22,21 @@ PREP(chestpackVariables);
 PREP(clearAllCargo);
 PREP(clearAllItemsFromChestpack);
 PREP(clearCargoBackpacks);
+PREP(acreIsInitialized);
+PREP(acreFilterCargoLoadout);
+PREP(normalizeCargoLoadoutCounts);
+PREP(acreGetUnitRadioIds);
+PREP(acreGetRadioState);
+PREP(acreApplyRadioState);
+PREP(acreCaptureRadioStatesFromLoadout);
+PREP(acreRestoreRadioStates);
 PREP(EHAnimDone);
 PREP(EHGetIn);
 PREP(EHGetOut);
 PREP(EHHandleDisconnect);
 PREP(EHKilled);
 PREP(itemMass);
+PREP(chestpackAcreRadios);
 PREP(moduleAdd);
 PREP(moduleOnChest);
 PREP(removeChestpack);

addons/main/XEH_postInit.sqf

@@ -44,6 +44,8 @@ if (isServer) then {
 };
 
 GVAR(isACEAXLoaded) = isClass (configFile >> "CfgPatches" >> "aceax_gearinfo");
+GVAR(isACRELoaded) = isClass (configFile >> "CfgPatches" >> "acre_main")
+    || {isClass (configFile >> "CfgPatches" >> "acre_api")};
 
 // Backpack classnames which will be made invisible instead of being made a chestpack. Useful for items like the vanilla legstrap.
 GVAR(exceptions) = [

addons/main/functions/fnc_acreApplyRadioState.sqf

@@ -0,0 +1,30 @@
+#include "script_component.hpp"
+/*
+ * Author: BackpackOnChestRedux contributors
+ * Apply a previously exported radio state to a (new) ACRE2 radio ID.
+ *
+ * Arguments:
+ * 0: Radio ID <STRING>
+ * 1: Radio state <ARRAY> (from fnc_acreGetRadioState)
+ *
+ * Return Value:
+ * None
+ *
+ * Example:
+ * [_newRadioId, _state] call bocr_main_fnc_acreApplyRadioState;
+ *
+ * Public: No
+ */
+
+params ["_radioId", "_state"];
+if !(missionNamespace getVariable [QGVAR(isACRELoaded), false]) exitWith {};
+if (_state isEqualTo []) exitWith {};
+
+_state params ["_oldId", "_base", "_channel", "_volume", "_spatial", "_audioSource", "_onOff"];
+
+// These API calls are client-side.
+[_radioId, _channel] call acre_api_fnc_setRadioChannel;
+[_radioId, _volume] call acre_api_fnc_setRadioVolume;
+[_radioId, _spatial] call acre_api_fnc_setRadioSpatial;
+[_radioId, _audioSource] call acre_api_fnc_setRadioAudioSource;
+[_radioId, _onOff] call acre_api_fnc_setRadioOnOffState;

addons/main/functions/fnc_acreCaptureRadioStatesFromLoadout.sqf

@@ -0,0 +1,57 @@
+#include "script_component.hpp"
+/*
+ * Author: BackpackOnChestRedux contributors
+ * Capture ACRE2 radio states for radios referenced by a loadout cargo array
+ * (typically: getUnitLoadout _unit select 5 select 1 for backpack contents).
+ *
+ * Arguments:
+ * 0: Unit <OBJECT>
+ * 1: Loadout cargo array <ARRAY>
+ *
+ * Return Value:
+ * Array of radio state arrays <ARRAY>
+ *
+ * Example:
+ * [player, ((getUnitLoadout player) select 5) select 1] call bocr_main_fnc_acreCaptureRadioStatesFromLoadout;
+ *
+ * Public: No
+ */
+
+params ["_unit", "_cargoLoadout"];
+
+if (!([_unit] call FUNC(acreIsInitialized))) exitWith {[]};
+if !(_cargoLoadout isEqualType []) exitWith {[]};
+
+private _unitRadios = [_unit] call FUNC(acreGetUnitRadioIds);
+if (_unitRadios isEqualTo []) exitWith {[]};
+
+// Extract classnames referenced by the cargo loadout.
+private _classnames = [];
+{
+    if (_x isEqualType [] && {count _x > 0}) then {
+        private _cargoClass = _x select 0;
+        if (_cargoClass isEqualType "") then {
+            _classnames pushBack _cargoClass;
+        };
+    };
+} forEach _cargoLoadout;
+
+// Radios are represented by their ID classnames; capture only those present in this cargo loadout.
+private _radioIds = [];
+private _unitRadiosLc = _unitRadios apply {toLower _x};
+{
+    // Loadout/cargo can contain ID classnames with different casing than ACRE returns (e.g. "ACRE_PRC343_ID_3"
+    // vs "acre_prc343_id_3"), so match case-insensitively but store the actual carried ID string.
+    private _idx = _unitRadiosLc find (toLower _x);
+    if (_idx >= 0) then {_radioIds pushBackUnique (_unitRadios select _idx);};
+} forEach _classnames;
+
+private _states = [];
+{
+    private _state = [_x] call FUNC(acreGetRadioState);
+    if (_state isNotEqualTo []) then {
+        _states pushBack _state;
+    };
+} forEach _radioIds;
+
+_states

addons/main/functions/fnc_acreFilterCargoLoadout.sqf

@@ -0,0 +1,58 @@
+#include "script_component.hpp"
+/*
+ * Author: BackpackOnChestRedux contributors
+ * Filter a cargo loadout array for ACRE2 so radios can be safely restored.
+ *
+ * Converts ACRE radio ID item classnames (e.g. "ACRE_PRC152_ID_2") to their base radio classnames
+ * (e.g. "ACRE_PRC152") while leaving all other cargo unchanged.
+ *
+ * Arguments:
+ * 0: Cargo loadout <ARRAY>
+ *
+ * Return Value:
+ * Filtered cargo loadout <ARRAY>
+ *
+ * Example:
+ * [((getUnitLoadout player) select 5) select 1] call bocr_main_fnc_acreFilterCargoLoadout;
+ *
+ * Public: No
+ */
+
+params ["_cargoLoadout"];
+if !(_cargoLoadout isEqualType []) exitWith {_cargoLoadout};
+
+private _cfgAcreRadios = configFile >> "CfgAcreRadios";
+private _hasCfgAcreRadios = isClass _cfgAcreRadios;
+
+private _out = [];
+{
+    private _entry = _x;
+    if !(_entry isEqualType [] && {count _entry > 0}) then {
+        _out pushBack _entry;
+    } else {
+        private _first = _entry select 0;
+        if (_first isEqualType "") then {
+            private _cls = _first;
+            private _clsUc = toUpper _cls;
+
+            private _pos = _clsUc find "_ID_";
+            if (_pos > 0) then {
+                private _base = _cls select [0, _pos];
+                if (!_hasCfgAcreRadios || {isClass (_cfgAcreRadios >> _base)}) then {
+                    private _new = +_entry;
+                    _new set [0, _base];
+                    // ACRE radios are always 1 per entry; ensure numeric count if present.
+                    if (count _new > 1 && {(_new select 1) isEqualType 0} && {(_new select 1) < 1}) then {
+                        _new set [1, 1];
+                    };
+                    _entry = _new;
+                };
+            };
+        };
+
+        _out pushBack _entry;
+    };
+} forEach _cargoLoadout;
+
+_out
+

addons/main/functions/fnc_acreGetRadioState.sqf

@@ -0,0 +1,37 @@
+#include "script_component.hpp"
+/*
+ * Author: BackpackOnChestRedux contributors
+ * Export ACRE2 state for a single radio ID so it can be restored later.
+ *
+ * Arguments:
+ * 0: Radio ID <STRING>
+ *
+ * Return Value:
+ * Radio state <ARRAY>:
+ * 0: Old radio ID <STRING>
+ * 1: Base radio classname <STRING>
+ * 2: Channel <NUMBER>
+ * 3: Volume <NUMBER>
+ * 4: Spatial (LEFT/RIGHT/CENTER) <STRING>
+ * 5: Audio source <STRING>
+ * 6: On/Off <BOOL>
+ *
+ * Example:
+ * ["ACRE_PRC152_ID_1"] call bocr_main_fnc_acreGetRadioState;
+ *
+ * Public: No
+ */
+
+params ["_radioId"];
+
+if !(missionNamespace getVariable [QGVAR(isACRELoaded), false]) exitWith {[]};
+
+[
+    _radioId,
+    [_radioId] call acre_api_fnc_getBaseRadio,
+    [_radioId] call acre_api_fnc_getRadioChannel,
+    [_radioId] call acre_api_fnc_getRadioVolume,
+    [_radioId] call acre_api_fnc_getRadioSpatial,
+    [_radioId] call acre_api_fnc_getRadioAudioSource,
+    [_radioId] call acre_api_fnc_getRadioOnOffState
+]

addons/main/functions/fnc_acreGetUnitRadioIds.sqf

@@ -0,0 +1,44 @@
+#include "script_component.hpp"
+/*
+ * Author: BackpackOnChestRedux contributors
+ * Returns carried ACRE2 radio IDs for a given unit.
+ *
+ * Notes:
+ * - acre_api_fnc_getAllRadios returns base radio classnames from CfgAcreRadios, not carried IDs.
+ * - This helper enumerates all base radios and queries IDs by type for the given unit.
+ *
+ * Arguments:
+ * 0: Unit <OBJECT>
+ *
+ * Return Value:
+ * Radio IDs <ARRAY>
+ *
+ * Example:
+ * [player] call bocr_main_fnc_acreGetUnitRadioIds;
+ *
+ * Public: No
+ */
+
+params ["_unit"];
+
+if (!([_unit] call FUNC(acreIsInitialized))) exitWith {[]};
+
+// Fast-path for the local player when available.
+if (hasInterface && {!isNull player} && {_unit isEqualTo player} && {!isNil "acre_api_fnc_getCurrentRadioList"}) exitWith {
+    [] call acre_api_fnc_getCurrentRadioList
+};
+
+if (isNil "acre_api_fnc_getAllRadiosByType") exitWith {[]};
+
+private _bases = [] call acre_api_fnc_getAllRadios;
+if !(_bases isEqualType []) exitWith {[]};
+
+private _ids = [];
+{
+    if (_x isEqualType "") then {
+        _ids append ([_x, _unit] call acre_api_fnc_getAllRadiosByType);
+    };
+} forEach _bases;
+
+_ids
+

addons/main/functions/fnc_acreIsInitialized.sqf

@@ -0,0 +1,26 @@
+#include "script_component.hpp"
+/*
+ * Author: BackpackOnChestRedux contributors
+ * Returns true if ACRE2 is present and initialized on this client.
+ *
+ * Arguments:
+ * 0: Unit <OBJECT> (optional, for locality checks)
+ *
+ * Return Value:
+ * ACRE initialized <BOOL>
+ *
+ * Example:
+ * [player] call bocr_main_fnc_acreIsInitialized;
+ *
+ * Public: No
+ */
+
+params [["_unit", objNull]];
+
+if !(missionNamespace getVariable [QGVAR(isACRELoaded), false]) exitWith {false};
+if (isNil "acre_api_fnc_isInitialized") exitWith {false};
+
+// Most ACRE API calls are intended to run where the unit is local.
+if (!isNull _unit && {!local _unit}) exitWith {false};
+
+call acre_api_fnc_isInitialized