defineStackNames.m

function [outputFileList]=defineStackNames(firstfilename)
%
% SYNOPSIS [outputFileList]=defineStackNames(firstFileName)
%
% INPUT    firstFileName: name of the first greyvalue image to be read
%                    including the full path
%                    the actual filename must consist of 
%                    - alphanumeric body
%                    - numeric number
%                    - extension
%
% OUTPUT   outputFileList: names of all files belonging to the stack
%                          defined by firstFileName

oldDir = [];

% Output
outputFileList = {};

[fpath,fname,fno,fext]=getFilenameBody(firstfilename);

if(isempty(fname) | isempty(fno) | isempty(fext) )
   error('invalid first filename specified');
end;


if(~isempty(fpath))
	% change to stack directory
   oldDir = cd(fpath);
else
   %check if it is in the matlab search path
   tempName=which(firstfilename);
   if(~isempty(tempName))
      [fpath,fname,fno,fext]=getfilenamebody(tempName);
      oldDir = cd(fpath);
	end;
end;

dirListing = dir;

% get all relevant filenames
iEntry = 1;
fileList = {};
for( i = 1:length(dirListing))
   if(~dirListing(i).isdir)
      fileList(iEntry) = lower({dirListing(i).name});
      iEntry = iEntry + 1;
   end;
end;

nEntries = 0;
imIndx = str2num(fno);
l_fno=length(num2str(fno));
searchName= [fname,num2str(imIndx,['%.' num2str(l_fno) 'd']),fext];
%
outputFileList(1)={strcat(fpath,'\',searchName)};

if(~isempty(fileList))
   while( ~isempty(strmatch(lower(searchName),fileList)))
      nEntries = nEntries + 1;
      index(nEntries) = imIndx;
      imIndx = imIndx + 1;
      searchName= [fname,num2str(imIndx,['%.' num2str(l_fno) 'd']),fext];
      outputFileList(imIndx)={strcat(fpath,'\',searchName)};
   end;
end;

% Removing last file name, which does not exist 
outputFileList=outputFileList(1,1:length(outputFileList)-1);

% change back to original directory
if(~isempty(oldDir))
   cd(oldDir);
end;