Razvalyaev/mcu_matlab
2
0
Fork 0
Code Issues 2 Pull Requests Actions Packages Projects Releases 6 Wiki Activity

pre-release 1.04

Browse Source
This commit is contained in:
Razvalyaev
2025-11-07 14:52:52 +03:00
parent 041322a62e
commit 49be34efc9
16 changed files with 974 additions and 676 deletions
Download Patch File Download Diff File Expand all files Collapse all files

266
McuLib/m/mexing.m
View File

@@ -1,146 +1,153 @@
% Компилирует S-function
% Компилирует S-function для блока микроконтроллера в Simulink
% compile_mode: 1 - компиляция, 0 - обновление конфигурации
function res = mexing(compile_mode)
global Ts
Ts = 0.00001;
Ts = 0.00001; % Установка глобального времени дискретизации
if compile_mode == 1
delete('*.mexw64')
delete('*.mexw64.pdb')
delete([mcuPath.get('wrapperPath'), '\Outputs\*.*']);
set_param(gcb, 'consoleOutput', '');
compiler.updateRunBat();
% Дефайны
definesUserArg = parseDefinesMaskText();
definesWrapperConfigArg = buildWrapperDefinesString();
definesPeriphConfigArg = buildConfigDefinesString();
definesConfigArg = [definesWrapperConfigArg + " " + definesPeriphConfigArg];
%режимы компиляции
if mcuMask.read_checkbox('enableDebug')
modeArg = "debug";
else
modeArg = "release";
end
if mcuMask.read_checkbox('fullOutput') || mcuMask.read_checkbox('extConsol')
echoArg = 'echo_enable';
else
echoArg = 'echo_disable';
end
[includesArg, codeArg] = make_mex_arguments('incTable', 'srcTable');
Name = mcuMask.get_name();
% Вызов батника с двумя параметрами: includes и code
run_bat_mex_path = fullfile(mcuPath.get('wrapperPath'), 'run_mex.bat');
cmd = sprintf('%s %s "%s" "%s" "%s" "%s" %s %s', run_bat_mex_path, Name, includesArg, codeArg, definesUserArg, definesConfigArg, modeArg, echoArg);
if mcuMask.read_checkbox('extConsol')
cmdout = runBatAndShowOutput(cmd);
else
[status, cmdout]= system(cmd);
end
% Сохраним вывод в параметр маски с именем 'consoleOutput'
mcuMask.disp(1, cmdout);
% === РЕЖИМ КОМПИЛЯЦИИ ===
setenv('VSLANG', '1033'); % Английский для Visual Studio
% Обновление параметров блока
block = gcb;
newName = get_param(block, 'sfuncName');
oldName = get_param(block, 'FunctionName');
if ~strcmp(newName, oldName)
set_param(block, 'FunctionName', newName);
set_param(block, 'FunctionName', newName); % Обновление имени функции
end
newParam = get_param(block, 'sfuncParam');
oldParam = get_param(block, 'Parameters');
if ~strcmp(newParam, oldParam)
set_param(block, 'Parameters', newParam);
set_param(block, 'Parameters', newParam); % Обновление параметров
end
% Очистка предыдущих файлов компиляции
delete('*.mexw64')
delete('*.mexw64.pdb')
delete([mcuPath.get('wrapperPath'), '\Outputs\*.*']);
set_param(gcb, 'consoleOutput', ''); % Очистка консоли вывода
% Обновление BAT-файла для компиляции
compiler.updateRunBat();
% Формирование дефайнов для компиляции
definesUserArg = parseDefinesMaskText(); % Пользовательские дефайны
definesWrapperConfigArg = buildWrapperDefinesString(); % Дефайны обёртки
definesPeriphConfigArg = buildConfigDefinesString(); % Дефайны периферии
definesConfigArg = [definesWrapperConfigArg + " " + definesPeriphConfigArg];
% Определение режимов компиляции
if mcuMask.read_checkbox('enableDebug')
modeArg = "debug"; % Режим отладки
else
modeArg = "release"; % Релизный режим
end
if mcuMask.read_checkbox('fullOutput') || mcuMask.read_checkbox('extConsol')
echoArg = 'echo_enable'; % Подробный вывод
else
echoArg = 'echo_disable'; % Минимальный вывод
end
% Формирование аргументов для компиляции
[includesArg, codeArg] = make_mex_arguments('incTable', 'srcTable');
Name = mcuMask.get_name(); % Имя S-функции
% Вызов батника компиляции
run_bat_mex_path = fullfile(mcuPath.get('wrapperPath'), 'run_mex.bat');
cmd = sprintf('%s %s "%s" "%s" "%s" "%s" %s %s', run_bat_mex_path, Name, includesArg, codeArg, definesUserArg, definesConfigArg, modeArg, echoArg);
if mcuMask.read_checkbox('extConsol')
% Запуск с внешней консолью
cmdout = runBatAndShowOutput(cmd);
else
% Запуск в фоновом режиме
[status, cmdout]= system(cmd);
end
% Сохранение вывода в параметр маски
mcuMask.disp(1, cmdout);
if status == 0
res = 0;
res = 0; % Успешная компиляция
else
res = 1;
res = 1; % Ошибка компиляции
end
beep
beep % Звуковое уведомление
else
% === РЕЖИМ ОБНОВЛЕНИЯ КОНФИГУРАЦИИ ===
blockPath = gcb;
config = configJs.read(blockPath);
config = configJs.update(blockPath, config);
configJs.write(config);
periphConfig.updateMask(blockPath, config);
config = configJs.read(blockPath); % Чтение конфигурации
config = configJs.update(blockPath, config); % Обновление конфигурации
configJs.write(config); % Запись конфигурации
periphConfig.updateMask(blockPath, config); % Обновление маски
end
end
%% COMPILE PARAMS
%% COMPILE PARAMS - функции формирования параметров компиляции
function [includesArg, codeArg] = make_mex_arguments(incTableName, srcTableame)
%MAKE_MEX_ARGUMENTS Формирует строки аргументов для вызова mex-компиляции через батник
%
% [includesArg, codeArg] = make_mex_arguments(includesCell, codeCell)
% Формирует строки аргументов для вызова mex-компиляции через батник
%
% Вход:
% includesCell — ячейковый массив путей к директориям include
% codeCell — ячейковый массив исходных файлов
% incTableName - имя таблицы с путями включения
% srcTableame - имя таблицы с исходными файлами
%
% Выход:
% includesArg — строка для передачи в батник, например: "-I"inc1" -I"inc2""
% codeArg — строка с исходниками, например: ""src1.c" "src2.cpp""
% includesArg - строка с флагами включения (-I"path")
% codeArg - строка с исходными файлами ("file1.c" "file2.cpp")
% Здесь пример получения из маски текущего блока (замени по своему)
% Получение данных из таблиц маски
includesCell = customtable.parse(incTableName);
codeCell = customtable.parse(srcTableame);
% Оборачиваем пути в кавычки и добавляем -I
% Формирование строки путей включения с флагом -I
includesStr = strjoin(cellfun(@(f) ['-I"' f '"'], includesCell, 'UniformOutput', false), ' ');
% Оборачиваем имена файлов в кавычки
% Формирование строки исходных файлов в кавычках
codeStr = strjoin(cellfun(@(f) ['"' f '"'], codeCell, 'UniformOutput', false), ' ');
% Удаляем символ переноса строки и пробел в конце, если вдруг попал
% Удаление лишних пробелов
codeStr = strtrim(codeStr);
includesStr = strtrim(includesStr);
% Оборачиваем всю строку в кавычки, чтобы батник корректно понял
% includesArg = ['"' includesStr '"'];
% codeArg = ['"' codeStr '"'];
includesArg = includesStr;
codeArg = codeStr;
end
function definesWrapperArg = buildWrapperDefinesString()
% Формирование дефайнов для конфигурации обёртки
definesWrapperArg = '';
% Добавление дефайнов из параметров маски
definesWrapperArg = addDefineByParam(definesWrapperArg, 'enableThreading', 0);
definesWrapperArg = addDefineByParam(definesWrapperArg, 'enableDeinit', 0);
definesWrapperArg = addDefineByParam(definesWrapperArg, 'threadCycles', 1);
definesWrapperArg = addDefineByParam(definesWrapperArg, 'mcuClk', 1);
end
function definesUserArg = parseDefinesMaskText()
% Парсинг пользовательских дефайнов из текстового поля маски
blockHandle = gcbh;
% Получаем MaskValues и MaskNames
% Получение параметров маски
maskValues = get_param(blockHandle, 'MaskValues');
paramNames = get_param(blockHandle, 'MaskNames');
% Индекс параметра userDefs
% Поиск параметра с пользовательскими дефайнами
idxUserDefs = find(strcmp(paramNames, 'userDefs'));
definesText = maskValues{idxUserDefs}; % Текст с пользовательскими определениями
definesText = maskValues{idxUserDefs};
% Убираем буквальные символы \n и \r
% Обработка специальных символов
definesText = strrep(definesText, '\n', ' ');
definesText = strrep(definesText, '\r', ' ');
% Разбиваем по переносам строк
% Разбиение на строки
lines = split(definesText, {'\n', '\r\n', '\r'});
parts = strings(1,0); % пустой массив строк
parts = strings(1,0); % массив для хранения дефайнов
for k = 1:numel(lines)
line = strtrim(lines{k});
@@ -148,7 +155,7 @@ function definesUserArg = parseDefinesMaskText()
continue;
end
% Разбиваем по пробелам, чтобы получить отдельные определения в строке
% Разбиение строки на токены
tokens = split(line);
for t = 1:numel(tokens)
@@ -157,11 +164,13 @@ function definesUserArg = parseDefinesMaskText()
continue;
end
% Обработка дефайнов с значениями и без
eqIdx = strfind(token, '=');
if isempty(eqIdx)
% Просто ключ без значения
% Дефайн без значения
parts(end+1) = sprintf('-D"%s"', token);
else
% Дефайн со значением
key = strtrim(token(1:eqIdx(1)-1));
val = strtrim(token(eqIdx(1)+1:end));
parts(end+1) = sprintf('-D"%s__EQ__%s"', key, val);
@@ -172,13 +181,13 @@ function definesUserArg = parseDefinesMaskText()
definesUserArg = strjoin(parts, ' ');
end
function definesWrapperArg = buildConfigDefinesString()
% Формирование дефайнов из конфигурации периферии
blockHandle = gcbh;
mask = Simulink.Mask.get(blockHandle);
tabName = 'configTabAll'; % Имя вкладки (Prompt)
tabName = 'configTabAll'; % Имя вкладки с конфигурацией
tabCtrl = mask.getDialogControl(tabName);
@@ -186,17 +195,15 @@ function definesWrapperArg = buildConfigDefinesString()
error('Вкладка с названием "%s" не найдена в маске', tabName);
end
% Сбор всех параметров из вкладки конфигурации
params = mcuMask.collect_all_parameters(tabCtrl);
definesWrapperArg = '';
for i = 1:numel(params)
% Получаем имя параметра из контрола
paramName = string(params(i));
try
% Получаем объект параметра по имени
param = mask.getParameter(paramName);
% Определяем тип параметра
% Обработка разных типов параметров
switch lower(param.Type)
case 'checkbox'
definesWrapperArg = addDefineByParam(definesWrapperArg, paramName, 0);
@@ -205,33 +212,32 @@ function definesWrapperArg = buildConfigDefinesString()
case 'popup'
definesWrapperArg = addDefineByParam(definesWrapperArg, paramName, 0);
otherwise
% Необрабатываемые типы
% Пропуск необрабатываемых типов
end
catch ME
% warning('Не удалось получить параметр "%s": %s', paramName, ME.message);
% Игнорирование ошибок для отсутствующих параметров
end
end
end
%% PARSE FUNCTIONS
function definesWrapperArg = addDefineByParam(definesWrapperArg, paramName, val_define)
% Добавление дефайна на основе параметра маски
blockHandle = gcbh;
mask = Simulink.Mask.get(blockHandle);
% Получаем MaskValues, MaskNames
% Получение значений маски
maskValues = get_param(blockHandle, 'MaskValues');
paramNames = get_param(blockHandle, 'MaskNames');
param = mask.getParameter(paramName); % для alias
param = mask.getParameter(paramName);
% Найдём индекс нужного параметра
% Поиск индекса параметра
idxParam = find(strcmp(paramNames, paramName), 1);
if isempty(idxParam)
error('Parameter "%s" not found in block mask parameters.', paramName);
end
% Берём alias из маски
% Определение имени дефайна (алиас или значение)
val = '';
if ~strcmp(param.Type, 'popup')
def_name = param.Alias;
@@ -248,23 +254,24 @@ function definesWrapperArg = addDefineByParam(definesWrapperArg, paramName, val_
return;
end
% Формирование дефайна в зависимости от типа параметра
if val_define ~= 0
% Значение параметра
% Параметры с значениями
val = maskValues{idxParam};
if strcmp(param.Evaluate, 'on')
val = evalin('base', val); % Вычисляем выражение
val = num2str(val); % Преобразуем результат в строку
val = evalin('base', val); % Вычисление выражений
val = num2str(val);
end
% Формируем define с кавычками и значением
newDefine = ['-D"' def_name '__EQ__' val '"'];
elseif ~strcmp(param.Type, 'popup')
% Чекбоксы
if mcuMask.read_checkbox(paramName)
% Формируем define с кавычками без значения
newDefine = ['-D"' def_name '"'];
else
newDefine = '';
end
else
% Выпадающие списки
if strcmp(param.Alias, '')
newDefine = ['-D"' def_name '"'];
else
@@ -272,9 +279,7 @@ function definesWrapperArg = addDefineByParam(definesWrapperArg, paramName, val_
end
end
% Добавляем новый define к существующему (string)
% Добавление дефайна к результирующей строке
if isempty(definesWrapperArg) || strlength(strtrim(definesWrapperArg)) == 0
definesWrapperArg = newDefine;
else
@@ -282,19 +287,22 @@ function definesWrapperArg = addDefineByParam(definesWrapperArg, paramName, val_
end
end
%% CONSOLE FUNCTIONS - функции работы с консолью
%% CONSOLE FUNCTIONS
function cmdret = runBatAndShowOutput(cmd)
% Запуск BAT-файла с отображением вывода в реальном времени
import java.io.*;
import java.lang.*;
cmdEnglish = ['chcp 437 > nul && ' cmd];
cmdEnglish = ['chcp 437 > nul && ' cmd]; % Установка английской кодировки
pb = java.lang.ProcessBuilder({'cmd.exe', '/c', cmdEnglish});
pb.redirectErrorStream(true);
process = pb.start();
% Чтение вывода процесса
reader = BufferedReader(InputStreamReader(process.getInputStream()));
cmdret = ""; % Здесь будем накапливать весь вывод
cmdret = "";
while true
if reader.ready()
@@ -302,36 +310,37 @@ function cmdret = runBatAndShowOutput(cmd)
if isempty(line)
break;
end
cmdret = cmdret + string(line) + newline; % сохраняем вывод
% Здесь выводим только новую строку
safeLine = strrep(line, '''', ''''''); % Экранируем апострофы
logWindow_append(safeLine);
drawnow; % обновляем GUI
cmdret = cmdret + string(line) + newline;
safeLine = strrep(line, '''', ''''''); % Экранирование кавычек
logWindow_append(safeLine); % Вывод в окно лога
drawnow;
else
if ~process.isAlive()
% дочитываем оставшиеся строки
% Дочтение оставшегося вывода
while reader.ready()
line = char(reader.readLine());
if isempty(line)
break;
end
cmdret = cmdret + string(line) + newline; % сохраняем вывод
cmdret = cmdret + string(line) + newline;
safeLine = strrep(line, '''', '''''');
logWindow_append(safeLine);
drawnow;
end
break;
end
pause(0.2);
pause(0.2); % Пауза между проверками
end
end
process.waitFor();
end
function logWindow_append(line)
% Добавление строки в окно лога с автоскроллингом
persistent fig hEdit jScrollPane jTextArea
% Создание окна лога при первом вызове
if isempty(fig) || ~isvalid(fig)
fig = figure('Name', 'Log Window', 'Position', [100 100 600 400]);
hEdit = uicontrol('Style', 'edit', ...
@@ -343,10 +352,12 @@ function logWindow_append(line)
'BackgroundColor', 'white', ...
'Tag', 'LogWindowFigure');
jScrollPane = findjobj(hEdit); % JScrollPane
jTextArea = jScrollPane.getViewport.getView; % JTextArea внутри JScrollPane
% Получение Java-компонентов для управления скроллингом
jScrollPane = findjobj(hEdit);
jTextArea = jScrollPane.getViewport.getView;
end
% Добавление новой строки
oldText = get(hEdit, 'String');
if ischar(oldText)
oldText = {oldText};
@@ -354,32 +365,30 @@ function logWindow_append(line)
set(hEdit, 'String', [oldText; {line}]);
drawnow;
% Автоскролл вниз:
% Автоскроллинг вниз
jTextArea.setCaretPosition(jTextArea.getDocument.getLength);
drawnow;
end
%% READ CONFIGS
function isOpen = isMaskDialogOpen(blockPath)
% Проверка открыто ли диалоговое окно маски
isOpen = false;
try
% Получаем имя блока
blockName = get_param(blockPath, 'Name');
% Получаем список окон MATLAB GUI
% Получение всех открытых окон Java
jWindows = java.awt.Window.getWindows();
for i = 1:numel(jWindows)
win = jWindows(i);
% Проверка, что окно видимое и активно
if win.isShowing()
try
title = char(win.getTitle());
% Проверка по ключевому слову, соответствующему заголовку маски
% Поиск окна маски по заголовку
if contains(title, ['Mask Editor: ' blockName]) || ...
contains(title, ['Mask: ' blockName]) || ...
contains(title, blockName)
@@ -387,12 +396,11 @@ function isOpen = isMaskDialogOpen(blockPath)
return;
end
catch
% Окно не имеет заголовка — пропускаем
% Пропуск окон без заголовка
end
end
end
catch
isOpen = false;
end
end
end