#include "script_component.hpp"

/*
  Name: TFAR_fnc_sendFrequencyInfo

  Author: NKey
    Notifies the plugin about the radios currently being used by the player and various settings active on the radio.

  Arguments:
    None

  Return Value:
    None

  Example:
    call TFAR_fnc_sendFrequencyInfo;

  Public: Yes
*/

if (getClientStateNumber != 10) exitWith {"BI HAS CRAPPY WEIRD BUGS U KNOW! (Keeps PFH from firing after server disconnect)"};

private _timeSinceLastUpdate = diag_tickTime - (GVAR(VehicleConfigCacheNamespace) getVariable "lastRadioSettingUpdate");
private _lastExec = diag_tickTime - (GVAR(VehicleConfigCacheNamespace) getVariable "TFAR_fnc_sendFrequencyInfo_lastExec");

//Only call every 2 seconds if we had no update to our Radio settings for longer than 5 seconds.
if (_timeSinceLastUpdate > 5 && _lastExec < 2) exitWith {};

PROFCONTEXT_LOGTRAP(FreqInfoTrap,TFAR_fnc_sendFrequencyInfo);

GVAR(VehicleConfigCacheNamespace) setVariable ["TFAR_fnc_sendFrequencyInfo_lastExec",diag_tickTime];

// send frequencies
private _freq = ["No_SW_Radio"];
private _freq_lr = ["No_LR_Radio"];

private _isolated_and_inside = TFAR_currentUnit call TFAR_fnc_vehicleIsIsolatedAndInside;
private _depth = TFAR_currentUnit call TFAR_fnc_eyeDepth;
private _can_speak = [_isolated_and_inside, _depth] call TFAR_fnc_canSpeak;
private _currentUnitIsRemote = TFAR_currentUnit != player;

private _swRadios = TFAR_currentUnit call TFAR_fnc_radiosList; //Calling haveSWRadio and radiosList will iterate players inventory twice == bad performance. (reference to old code)

if (((count _swRadios > 0) || _currentUnitIsRemote) && {[TFAR_currentUnit, _isolated_and_inside, _can_speak, _depth] call TFAR_fnc_canUseSWRadio}) then {
    _freq = [];
    private _playerRadios = [];
    if (_currentUnitIsRemote) then {
        _swRadios append (player call TFAR_fnc_radiosList);
    };
    {
        if ([_x] call TFAR_fnc_RadioOn) then {
            if (!(_x call TFAR_fnc_getSwSpeakers) //If speakers are enabled we will not have it on our headset at the same time... I think...
                or {(_currentUnitIsRemote) and {_x in _playerRadios}} //When remote controlling a unit.. Still hear your original Radios
            ) then {
                private _radioCode = _x call TFAR_fnc_getSwRadioCode;
                private _volume = _x call TFAR_fnc_getSwVolume;
                _freq pushBack format ["%1%2|%3|%4|%5",
                    _x call TFAR_fnc_getSwFrequency,
                    _radioCode,
                    _volume,
                    _x call TFAR_fnc_getSwStereo,
                    _x];
                private _additionalChannel = _x call TFAR_fnc_getAdditionalSwChannel;
                if (_additionalChannel > -1 && {_additionalChannel != (_x call TFAR_fnc_getSwChannel)}) then {
                    _freq pushBack format ["%1%2|%3|%4|%5",
                        [_x, _additionalChannel + 1] call TFAR_fnc_getChannelFrequency,
                        _radioCode,
                        _volume,
                        _x call TFAR_fnc_getAdditionalSwStereo,
                        _x];
                };
            };
        };
    } forEach _swRadios;
};

private _lrRadios = TFAR_currentUnit call TFAR_fnc_lrRadiosList; //Calling haveLRRadio would call lrRadiosList anyway (reference to old code)

if (((count _lrRadios > 0) || _currentUnitIsRemote) and {[TFAR_currentUnit, _isolated_and_inside, _depth] call TFAR_fnc_canUseLRRadio}) then {
    _freq_lr = [];
    private _playerRadios = [];
    if (_currentUnitIsRemote) then {
        _lrRadios append (player call TFAR_fnc_lrRadiosList);
    };
    {
        if ([_x] call TFAR_fnc_RadioOn) then {
            if (!(_x call TFAR_fnc_getLrSpeakers)
                || {_currentUnitIsRemote && {_x in _playerRadios}} //When remote controlling a unit.. Still hear your original Radios
            ) then {
                private _radioCode = _x call TFAR_fnc_getLrRadioCode;
                private _volume = _x call TFAR_fnc_getLrVolume;
                private _additionalChannel = _x call TFAR_fnc_getAdditionalLrChannel;
                _freq_lr pushBack format ["%1%2|%3|%4|%5",
                    _x call TFAR_fnc_getLrFrequency,
                    _radioCode,
                    _volume,
                    _x call TFAR_fnc_getLrStereo,
                    typeof (_x select 0)];

                if (_additionalChannel > -1 && {_additionalChannel != (_x call TFAR_fnc_getLrChannel)}) then {
                    _freq_lr pushBack format ["%1%2|%3|%4|%5",
                        [_x, _additionalChannel + 1] call TFAR_fnc_getChannelFrequency,
                        _radioCode,
                        _volume,
                        _x call TFAR_fnc_getAdditionalLrStereo,
                        typeof (_x select 0)];
                };
            };
        };
    } forEach _lrRadios;
};
private _alive = alive TFAR_currentUnit;

private _nickname = if (_alive) then {name player} else {profileName};

private _globalVolume = TFAR_currentUnit getVariable ["tf_globalVolume",1.0];//used API variable. Don't change

//smaller value == bigger range
private _receivingDistanceMultiplicator = (TFAR_currentUnit getVariable ["tf_receivingDistanceMultiplicator",1.0]) * (1/TFAR_globalRadioRangeCoef);

//Async call will always return "OK"
private _request = format["FREQ    %1    %2    %3    %4    %5    %6    %7    %8    %9    %10~",//#TODO reorder
    _freq, _freq_lr,
    _alive,
    TF_speak_volume_meters min TF_max_voice_volume,
    _nickname, waves, TF_terrain_interception_coefficient, _globalVolume, _receivingDistanceMultiplicator, TF_speakerDistance];

"task_force_radio_pipe" callExtension _request;

#include "script_component.hpp"

/*
  Name: TFAR_fnc_missingModMessage

  Author: NKey, Garth de Wet (L-H), Dorbedo
    Returns a message on Clientside about missing TFAR

  Arguments:
    None

  Return Value:
    None

  Example:
    call TFAR_fnc_missingModMessage;

  Public: No
*/

if(isServer) exitWith {};
waitUntil {sleep 0.1;time > 3};
if !(isClass(configFile >> "CfgPatches" >> "tfar_core")) exitWith {
    [player, format["%1: LOOKS LIKE TASK FORCE RADIO ADDON IS NOT ENABLED OR VERSION LESS THAN 1.0", name player]] remoteExec ["globalChat", -2];
    if (isNull (uiNamespace getVariable ["BIS_fnc_arsenal_cam", objNull])) then {
        ["LOOKS LIKE TASK FORCE RADIO ADDON IS NOT ENABLED OR VERSION LESS THAN 1.0"] call BIS_fnc_guiMessage;
    };
};

if (getNumber (configFile >> "CfgPatches" >> "tfar_core" >> "server_api") != SERVER_API_VERSION) exitWith {
    [player, format["%1: TFAR API version doesn't match server", name player]] remoteExec ["globalChat", -2];
    if (isNull (uiNamespace getVariable ["BIS_fnc_arsenal_cam", objNull])) then {
        ["TFAR API version doesn't match server. You are running a different TFAR version than the server."] call BIS_fnc_guiMessage; 
    };
};