Mercurial > hg > ltpda
view m-toolbox/classes/+utils/@prog/findchildren.m @ 33:5e7477b94d94 database-connection-manager
Add known repositories list to LTPDAPreferences
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Mon, 05 Dec 2011 16:20:06 +0100 |
parents | f0afece42f48 |
children |
line wrap: on
line source
function [childrenHandles] = findchildren(parentHandle,varargin) % This function retrieves the handles of all blocks children of a given % parent block, whose handle is received as input. % % $Id: findchildren.m,v 1.2 2008/08/17 04:32:33 nicola Exp $ lineHandles = get(parentHandle,'LineHandles'); if isempty(lineHandles) % the parent block given has no output: it's an ending. childrenHandles = []; return; end lineOut1 = lineHandles.Outport; % this is the handle of the line coming out from the parent block. childrenHandles = get(lineOut1,'DstBlockHandle'); % these are the handles of all children blocks. if(iscell(childrenHandles)), childrenHandles = cell2mat(childrenHandles); end % Check if the parent given can be effectively a child (used when the % findchildren function is called recursively, checking the output of a % subsystem): if nargin>1 && strcmp(varargin{1},'all'), childrenHandles = [parentHandle; childrenHandles]; end for i=numel(childrenHandles):-1:1 if strcmp(get(childrenHandles(i),'BlockType'),'SubSystem') && numel(get(childrenHandles(i),'Blocks'))==3 && numel(utils.prog.find_in_models(childrenHandles(i),'LookUnderMasks','all','BlockType','M-S-Function','FunctionName','ltpdasim'))==1 % then this block is a susbsystem containing a ltpdasim function block. It's a real child. The handle must be substituted with the one of the inner function block. childrenHandles(i) = utils.prog.find_in_models(childrenHandles(i),'LookUnderMasks','all','BlockType','M-S-Function','FunctionName','ltpdasim'); elseif strcmp(get(childrenHandles(i),'BlockType'),'M-S-Function') && strcmp(get(childrenHandles(i),'FunctionName'),'ltpdasim') % then this block is a ltpdasim function block. It's a real child. The research do not go deeper into this branch, since this child will create a new ltpda obj. elseif strcmp(get(childrenHandles(i),'BlockType'),'SubSystem') && numel(get(childrenHandles(i),'Blocks'))==3 && numel(utils.prog.find_in_models(childrenHandles(i),'LookUnderMasks','all','BlockType','M-S-Function'))==1 % this is a block containing a LTPDA function, but not using ltpdasim. The ltpda obj pass through, the research must look further. followingChildren = utils.prog.findchildren(childrenHandles(i)); childrenHandles = [childrenHandles;followingChildren]; childrenHandles(i)= []; elseif strcmp(get(childrenHandles(i),'BlockType'),'M-S-Function') && ~strcmp(get(childrenHandles(i),'FunctionName'),'ltpdasim') % then this block is a function block (NOT ltpdasim). It can be ignored. childrenHandles(i)= []; elseif strcmp(get(childrenHandles(i),'BlockType'),'Terminator') % this is a false child: the terminator do not need the output of the % parent block. childrenHandles(i)= []; elseif strcmp(get(childrenHandles(i),'BlockType'),'Mux') % this transfer the parent block output to other following blocks: the research must go deeper. followingChildren = utils.prog.findchildren(childrenHandles(i)); childrenHandles = [childrenHandles;followingChildren]; childrenHandles(i)= []; elseif strcmp(get(childrenHandles(i),'BlockType'),'Goto') % this transfer the parent block output to other following blocks; the research must go deeper. allFromBlocks = utils.prog.find_in_models(bdroot,'LookUnderMasks','all','BlockType','From','GotoTag',get(childrenHandles(i),'GotoTag')); for j=1:numel(allFromBlocks) fromHandle = get_param(allFromBlocks{j},'Handle'); followingChildren = utils.prog.findchildren(fromHandle); childrenHandles = [childrenHandles;followingChildren]; end childrenHandles(i)= []; elseif strcmp(get(childrenHandles(i),'BlockType'),'SubSystem') % this is a common subsystem: the research must look for all children blocks contained: subsystemHandle = childrenHandles(i); portConnectivity = get(subsystemHandle,'PortConnectivity'); portHandles = get(subsystemHandle,'PortHandles'); for portIndex=1:numel(portHandles.Inport) if portConnectivity(portIndex).SrcBlock == parentHandle, break; end end % the port n° <portIndex> is the one connected to the parent block portHandles = find_system(subsystemHandle,'LookUnderMasks','all','BlockType','Inport','Port',num2str(portIndex)); for j=1:numel(portHandles) followingChildren = utils.prog.findchildren(portHandles(j)); childrenHandles = [childrenHandles;followingChildren]; end childrenHandles(i)= []; elseif strcmp(get(childrenHandles(i),'BlockType'),'Outport') % the line exits a subsystem: the research must continue in the upper level: portIndex = get(childrenHandles(i),'Port'); subsystemHandle = get_param(get(childrenHandles(i),'Parent'),'Handle'); portConnectivity = get(subsystemHandle,'PortConnectivity'); for j=1:size(portConnectivity,1) if strcmp(portConnectivity(j).Type,portIndex) && isempty(portConnectivity(j).SrcBlock) destinationBlock = portConnectivity(j).DstBlock; break end end followingChildren = utils.prog.findchildren(destinationBlock,'all'); childrenHandles = [childrenHandles;followingChildren]; childrenHandles(i)= []; else disp('--- Unknown case, please update function ''utils.prog.findchildren''') disp(['The unknown block is: ',getfullname(childrenHandles(i))]) disp(['The block has type: ',get(childrenHandles(i),'BlockType')]) end end end