MD5 computes an MD5 checksum from an analysis objects. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: MD5 computes an MD5 checksum from an analysis objects. CALL: h = md5(a) INPUTS: a - input analysis object OUTPUTS: h - md5 hash VERSION: $Id: eq.m,v 1.4 2007/08/29 18:46:02 hewitson Exp $ HISTORY: 15-09-2007 M Hewitson Creation %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0001 function h = md5(varargin) 0002 % MD5 computes an MD5 checksum from an analysis objects. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: MD5 computes an MD5 checksum from an analysis objects. 0007 % 0008 % CALL: h = md5(a) 0009 % 0010 % INPUTS: a - input analysis object 0011 % 0012 % OUTPUTS: h - md5 hash 0013 % 0014 % VERSION: $Id: eq.m,v 1.4 2007/08/29 18:46:02 hewitson Exp $ 0015 % 0016 % HISTORY: 15-09-2007 M Hewitson 0017 % Creation 0018 % 0019 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0020 0021 VERSION = '$Id: eq.m,v 1.4 2007/08/29 18:46:02 hewitson Exp $'; 0022 0023 % 'Params' Call 0024 if nargin == 2 0025 if isa(varargin{1}, 'ao') && strcmp(varargin{2}, 'Params') 0026 h = plist(); 0027 return 0028 elseif isa(varargin{1}, 'ao') && strcmp(varargin{2}, 'Version') 0029 h = VERSION; 0030 return 0031 end 0032 end 0033 0034 as = []; 0035 for j=1:nargin 0036 if isa(varargin{j}, 'ao') 0037 as = [as varargin{j}]; 0038 end 0039 end 0040 0041 h = {}; 0042 0043 for ii = 1:numel(as) 0044 x = xml(as(ii)); 0045 h = [h cellstr(ltpda_hash(xmlwrite(x.docNode), 'MD5'))]; 0046 end 0047 0048 h = reshape(h, size(as)); 0049 0050 if numel(h) == 1 0051 h = cell2mat(h); 0052 end 0053