powertrain-build 1.13.1__py3-none-any.whl → 1.13.3.dev3__py3-none-any.whl

powertrain_build/matlab_scripts/CodeGen/Generate_A2L.m

@@ -1,154 +1,154 @@
-% Copyright 2024 Volvo Car Corporation
-% Licensed under Apache 2.0.
-
-function Generate_A2L(CodegenFunction, A2lStylesheetName, model_ending)
-    if nargin < 3
-        model_ending = '_Tmp';
-    end
-    fprintf('\n\nGeneration of %s started\n\n', [CodegenFunction '.a2l']);
-    workspace = getenv('WORKSPACE');
-    tl_config_dir = fullfile([workspace, '/ConfigDocuments/TL4_3_settings']);
-    if exist(tl_config_dir, 'dir')
-        TargetInfoDir = fullfile([tl_config_dir '/TargetInfo']);
-        TargetConfigDir = fullfile([tl_config_dir '/TargetConfig']);
-    else
-        TargetInfoDir = fullfile([getenv('TL_ROOT') '/Matlab/TL/ApplicationBuilder/BoardPackages/HostPC64/MSVC']);
-        TargetConfigDir = fullfile([getenv('TL_ROOT') '/Matlab/TL/TargetConfiguration/x86_64/MSVC']);
-    end
-
-    ApplicationName = [CodegenFunction model_ending];
-    BuildName = ['Build' CodegenFunction model_ending];
-    dsdd_manage_build('Create',...
-       'Name', BuildName,...
-       'Application', ApplicationName,...
-       'TargetInfoDir', TargetInfoDir,...
-       'TargetConfigDir', TargetConfigDir);
-
-    simulinkToTargetLinkDataTypes = struct(...
-        'int', 'Int32',...
-        'int32', 'Int32',...
-        'uint16', 'UInt16',...
-        'int16', 'Int16',...
-        'uint8', 'UInt8',...
-        'int8', 'Int8'...
-    );
-    enumDataTypesObj = dsdd('CreateEnumDataTypes', ['/' ApplicationName '/' BuildName]);
-    enumNames = GetUsedEnumerations(CodegenFunction);
-    for idx = 1:length(enumNames)
-        enumName = enumNames{idx};
-        enumMemberNames = enumeration(enumName);
-        if isempty(enumMemberNames)
-            error([...
-                'Cannot get enum name %s from model %s.',...
-                'Enum name should match the unit in applicable blocks, e.g. -,$EnumName.'...
-                ], enumName, modelName);
-        end
-        if ismember('calculateUnderlyingDataType', methods(enumName)) && enumMemberNames(1).calculateUnderlyingDataType()
-            underlyingDataType = CalculateUnderlyingDataType(enumName, enumMemberNames);
-        else
-            simulinkDataType = Simulink.data.getEnumTypeInfo(enumName, 'StorageType');
-            underlyingDataType = simulinkToTargetLinkDataTypes.(simulinkDataType);
-        end
-        [hDDTypedef, ~, ~] = tlEnumDataType('CreateDDTypedef',...
-            'SLEnumType', enumName,...
-            'TypedefGroup', ['/' ApplicationName '/' BuildName '/EnumDataTypes'],...
-            'CreateTemplate', 'off');
-        dsdd('SetUnderlyingEnumDataType', hDDTypedef, underlyingDataType);
-        dsdd('SetTag', hDDTypedef, [enumName '_tag']);
-    end
-
-    dsdd_export_a2l_file(...
-        'Application', ApplicationName,...
-        'Build', BuildName,...
-        'TargetInfoDir', TargetInfoDir,...
-        'TargetConfigDir', TargetConfigDir,...
-        'StyleSheet',   A2lStylesheetName,...
-        'File', [CodegenFunction '.a2l'],...
-        'ProjectFrame', 'off',...
-        'OverwriteCalProperties', 'on',...
-        'MergeA2lModules', 'on',...
-        'asap2version', '1.40',...
-        'UseLookupStructures', 'off',...
-        'ExternalVariables', 'on',...
-        'UseUnderlyingEnumDataTypeInfo', 'on');
-
-    % Delete created enums, these can cause problems for upcoming code generation calls on models
-    % using the same enumerations.
-    dsdd('Delete', enumDataTypesObj);
-    fprintf('\n\nGeneration of %s finished\n\n', [CodegenFunction '.a2l']);
-end
-
-function usedEnumerations = GetUsedEnumerations(modelName)
-%GETUSEDENUMERATIONS Get all enumeration names used in a given model.
-    unsupportedByTLAPI = {'TL_DummyTrigger', 'TL_Enable', 'TL_Function', 'TL_SimFrame'};
-    tlBlocksTmp = find_system(modelName, 'FindAll', 'on', 'LookUnderMasks', 'All', 'RegExp', 'on', 'MaskType', 'TL_*');
-    supportedTlBlocksTmp = tlBlocksTmp(ismember(get_param(tlBlocksTmp, 'MaskType'), unsupportedByTLAPI)==0);
-    % Get enumerations from TL_BusInport blocks
-    busEnumerations = {};
-    busInportBlocks = supportedTlBlocksTmp(strcmp(get_param(supportedTlBlocksTmp, 'MaskType'), 'TL_BusInport'));
-    for idx = 1:length(busInportBlocks)
-        for idy = 1:tl_get(busInportBlocks(idx), 'numoutputs')
-            dataType = tl_get(busInportBlocks(idx), ['output(' num2str(idy) ').type']);
-            unitTmp = tl_get(busInportBlocks(idx), ['output(' num2str(idy) ').unit']);
-            if isempty(unitTmp)
-                continue
-            end
-            unit = erase(unitTmp, ['-', ',', '$']);
-            if strcmp(dataType, 'IMPLICIT_ENUM') && ~isempty(unit) && ~ismember(unit, busEnumerations)
-                busEnumerations{end+1} = unit;
-            end
-        end
-    end
-    % Get enumerations from standard TL blocks
-    supportedTlBlocks = supportedTlBlocksTmp(~strcmp(get_param(supportedTlBlocksTmp, 'MaskType'), 'TL_BusInport'));
-    [allDataTypes, invalidIndices, ~] = tl_get(supportedTlBlocks, 'output.type');
-    validTlBlocks = supportedTlBlocks(~invalidIndices);
-    validDataTypes = allDataTypes(~invalidIndices);
-    enumBlocks = validTlBlocks(strcmp(validDataTypes, 'IMPLICIT_ENUM'));
-    unitsTmp = tl_get(enumBlocks, 'output.unit');
-    if ~iscell(unitsTmp)
-        unitsTmp = {unitsTmp};
-    end
-    if ~isempty(unitsTmp)
-        units = unitsTmp(cellfun(@(x) ~isempty(x), unitsTmp));
-        enumerations = unique(erase(units, ['-', ',', '$']));
-    else
-        enumerations = {};
-    end
-    usedEnumerations = unique([busEnumerations enumerations]);
-end
-
-function underlyingDataType = CalculateUnderlyingDataType(enumName, enumMemberNames)
-%CALCULATEUNDERLYINGDATATYPE Calculate best fitting data type given a name of an enumeration.
-%   This is done by find min and max values, than choosing a fitting data type, as small as possible.
-    % int32 is super class of Simulink.IntEnumType
-    enumMemberValues = int32(enumMemberNames);
-    minValue = min(enumMemberValues);
-    maxValue = max(enumMemberValues);
-
-    % TODO Consider forcing signed like CS (or ARXML, from database?) does, seems to be int8 specifically
-    underlyingDataType = '';
-    if minValue >= 0
-        if maxValue <= 255
-            underlyingDataType = 'UInt8';
-        elseif maxValue <= 65535
-            underlyingDataType = 'UInt16';
-        end
-    elseif minValue >= -128
-        if maxValue <= 127
-            underlyingDataType = 'Int8';
-        elseif maxValue <= 32767
-            underlyingDataType = 'Int16';
-        end
-    elseif minValue >= -32768
-        if maxValue <= 32767
-            underlyingDataType = 'Int16';
-        end
-    end
-
-    if isempty(underlyingDataType)
-        error(...
-            'Unhandled enum size, name: %s, min: %s, max: %s. Valid types are uint8/16 and int8/16',...
-            enumName, minValue, maxValue);
-    end
-end
+% Copyright 2024 Volvo Car Corporation
+% Licensed under Apache 2.0.
+
+function Generate_A2L(CodegenFunction, A2lStylesheetName, model_ending)
+    if nargin < 3
+        model_ending = '_Tmp';
+    end
+    fprintf('\n\nGeneration of %s started\n\n', [CodegenFunction '.a2l']);
+    workspace = getenv('WORKSPACE');
+    tl_config_dir = fullfile([workspace, '/ConfigDocuments/TL4_3_settings']);
+    if exist(tl_config_dir, 'dir')
+        TargetInfoDir = fullfile([tl_config_dir '/TargetInfo']);
+        TargetConfigDir = fullfile([tl_config_dir '/TargetConfig']);
+    else
+        TargetInfoDir = fullfile([getenv('TL_ROOT') '/Matlab/TL/ApplicationBuilder/BoardPackages/HostPC64/MSVC']);
+        TargetConfigDir = fullfile([getenv('TL_ROOT') '/Matlab/TL/TargetConfiguration/x86_64/MSVC']);
+    end
+
+    ApplicationName = [CodegenFunction model_ending];
+    BuildName = ['Build' CodegenFunction model_ending];
+    dsdd_manage_build('Create',...
+       'Name', BuildName,...
+       'Application', ApplicationName,...
+       'TargetInfoDir', TargetInfoDir,...
+       'TargetConfigDir', TargetConfigDir);
+
+    simulinkToTargetLinkDataTypes = struct(...
+        'int', 'Int32',...
+        'int32', 'Int32',...
+        'uint16', 'UInt16',...
+        'int16', 'Int16',...
+        'uint8', 'UInt8',...
+        'int8', 'Int8'...
+    );
+    enumDataTypesObj = dsdd('CreateEnumDataTypes', ['/' ApplicationName '/' BuildName]);
+    enumNames = GetUsedEnumerations(CodegenFunction);
+    for idx = 1:length(enumNames)
+        enumName = enumNames{idx};
+        enumMemberNames = enumeration(enumName);
+        if isempty(enumMemberNames)
+            error([...
+                'Cannot get enum name %s from model %s.',...
+                'Enum name should match the unit in applicable blocks, e.g. -,$EnumName.'...
+                ], enumName, modelName);
+        end
+        if ismember('calculateUnderlyingDataType', methods(enumName)) && enumMemberNames(1).calculateUnderlyingDataType()
+            underlyingDataType = CalculateUnderlyingDataType(enumName, enumMemberNames);
+        else
+            simulinkDataType = Simulink.data.getEnumTypeInfo(enumName, 'StorageType');
+            underlyingDataType = simulinkToTargetLinkDataTypes.(simulinkDataType);
+        end
+        [hDDTypedef, ~, ~] = tlEnumDataType('CreateDDTypedef',...
+            'SLEnumType', enumName,...
+            'TypedefGroup', ['/' ApplicationName '/' BuildName '/EnumDataTypes'],...
+            'CreateTemplate', 'off');
+        dsdd('SetUnderlyingEnumDataType', hDDTypedef, underlyingDataType);
+        dsdd('SetTag', hDDTypedef, [enumName '_tag']);
+    end
+
+    dsdd_export_a2l_file(...
+        'Application', ApplicationName,...
+        'Build', BuildName,...
+        'TargetInfoDir', TargetInfoDir,...
+        'TargetConfigDir', TargetConfigDir,...
+        'StyleSheet',   A2lStylesheetName,...
+        'File', [CodegenFunction '.a2l'],...
+        'ProjectFrame', 'off',...
+        'OverwriteCalProperties', 'on',...
+        'MergeA2lModules', 'on',...
+        'asap2version', '1.40',...
+        'UseLookupStructures', 'off',...
+        'ExternalVariables', 'on',...
+        'UseUnderlyingEnumDataTypeInfo', 'on');
+
+    % Delete created enums, these can cause problems for upcoming code generation calls on models
+    % using the same enumerations.
+    dsdd('Delete', enumDataTypesObj);
+    fprintf('\n\nGeneration of %s finished\n\n', [CodegenFunction '.a2l']);
+end
+
+function usedEnumerations = GetUsedEnumerations(modelName)
+%GETUSEDENUMERATIONS Get all enumeration names used in a given model.
+    unsupportedByTLAPI = {'TL_DummyTrigger', 'TL_Enable', 'TL_Function', 'TL_SimFrame'};
+    tlBlocksTmp = find_system(modelName, 'FindAll', 'on', 'LookUnderMasks', 'All', 'RegExp', 'on', 'MaskType', 'TL_*');
+    supportedTlBlocksTmp = tlBlocksTmp(ismember(get_param(tlBlocksTmp, 'MaskType'), unsupportedByTLAPI)==0);
+    % Get enumerations from TL_BusInport blocks
+    busEnumerations = {};
+    busInportBlocks = supportedTlBlocksTmp(strcmp(get_param(supportedTlBlocksTmp, 'MaskType'), 'TL_BusInport'));
+    for idx = 1:length(busInportBlocks)
+        for idy = 1:tl_get(busInportBlocks(idx), 'numoutputs')
+            dataType = tl_get(busInportBlocks(idx), ['output(' num2str(idy) ').type']);
+            unitTmp = tl_get(busInportBlocks(idx), ['output(' num2str(idy) ').unit']);
+            if isempty(unitTmp)
+                continue
+            end
+            unit = erase(unitTmp, ['-', ',', '$']);
+            if strcmp(dataType, 'IMPLICIT_ENUM') && ~isempty(unit) && ~ismember(unit, busEnumerations)
+                busEnumerations{end+1} = unit;
+            end
+        end
+    end
+    % Get enumerations from standard TL blocks
+    supportedTlBlocks = supportedTlBlocksTmp(~strcmp(get_param(supportedTlBlocksTmp, 'MaskType'), 'TL_BusInport'));
+    [allDataTypes, invalidIndices, ~] = tl_get(supportedTlBlocks, 'output.type');
+    validTlBlocks = supportedTlBlocks(~invalidIndices);
+    validDataTypes = allDataTypes(~invalidIndices);
+    enumBlocks = validTlBlocks(strcmp(validDataTypes, 'IMPLICIT_ENUM'));
+    unitsTmp = tl_get(enumBlocks, 'output.unit');
+    if ~iscell(unitsTmp)
+        unitsTmp = {unitsTmp};
+    end
+    if ~isempty(unitsTmp)
+        units = unitsTmp(cellfun(@(x) ~isempty(x), unitsTmp));
+        enumerations = unique(erase(units, ['-', ',', '$']));
+    else
+        enumerations = {};
+    end
+    usedEnumerations = unique([busEnumerations enumerations]);
+end
+
+function underlyingDataType = CalculateUnderlyingDataType(enumName, enumMemberNames)
+%CALCULATEUNDERLYINGDATATYPE Calculate best fitting data type given a name of an enumeration.
+%   This is done by find min and max values, than choosing a fitting data type, as small as possible.
+    % int32 is super class of Simulink.IntEnumType
+    enumMemberValues = int32(enumMemberNames);
+    minValue = min(enumMemberValues);
+    maxValue = max(enumMemberValues);
+
+    % TODO Consider forcing signed like CS (or ARXML, from database?) does, seems to be int8 specifically
+    underlyingDataType = '';
+    if minValue >= 0
+        if maxValue <= 255
+            underlyingDataType = 'UInt8';
+        elseif maxValue <= 65535
+            underlyingDataType = 'UInt16';
+        end
+    elseif minValue >= -128
+        if maxValue <= 127
+            underlyingDataType = 'Int8';
+        elseif maxValue <= 32767
+            underlyingDataType = 'Int16';
+        end
+    elseif minValue >= -32768
+        if maxValue <= 32767
+            underlyingDataType = 'Int16';
+        end
+    end
+
+    if isempty(underlyingDataType)
+        error(...
+            'Unhandled enum size, name: %s, min: %s, max: %s. Valid types are uint8/16 and int8/16',...
+            enumName, minValue, maxValue);
+    end
+end