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
+ −
+ −
+ −
+ −