% CONTAINSPORT returns true if the inputs block(s) contain the given port.%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: CONTAINSPORT returns true if the inputs block(s) contain% contain the given port.%% CALL: results = containsPort(ssmblocks, portname)% results = containsPort(ssmblocks, portobject)% results = containsPort(ssmblocks, plist('port', portname))% results = containsPort(ssmblocks, plist('port', portobject))%% VERSION: $Id: containsPort.m,v 1.5 2011/04/08 08:56:31 hewitson Exp $%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%function varargout = containsPort(varargin) error('This function is deprecated and will be deleted') [blocks, invars, rest] = utils.helper.collect_objects(varargin(:), 'ssmblock'); [port, invars, rest] = utils.helper.collect_objects(rest, 'ssmport'); [pl, invars, rest] = utils.helper.collect_objects(rest, 'plist'); results = []; % the port name to check for pfind = ''; % port in plist if isa(pl, 'plist') pfind = pl.find('port'); if isa(pfind, 'ssmport') pfind = pfind.name; end end % port in input args overides plist if isa(port, 'ssmport') pfind = port.name; end % check for a port name in the 'rest' - overides plist and port object for kk=1:numel(rest) if ischar(rest{kk}) pfind = rest{kk}; end end % loop over blocks for kk=1:numel(blocks) results(kk) = false; block = blocks(kk); for ll=1:numel(block.ports) bp = block.ports(ll); % check this port if strcmpi(bp.name, pfind) results(kk) = true; end end end varargout{1} = results;end