Changeset 445 for trunk/src/find_file_series.m

Timestamp:

Jun 8, 2012, 4:30:52 PM (12 years ago)

Author:

sommeria

Message:

possibility of dealing with series of multiple images eg tiff- introduced
bugs corrected in object creation.

File:

• trunk/src/find_file_series.m (modified) (6 diffs)

trunk/src/find_file_series.m

@@ -52 +52 @@
 % ifile_min=1;%default
 [FileType,FileInfo,Object]=get_file_type(fullfileinput);
+NbFrame=1;
+
 switch FileType
     case 'multimage'
-    NomType='*';
-    i1_series=(1:FileInfo.NbFrame)';
+%    NomType='*';
+%    i1_series=(1:FileInfo.NbFrame)';
+    NbFrame=FileInfo.NbFrame;
     case {'video','mmreader'}
     NomType='*';
-    i1_series=(1:FileInfo.NumberOfFrames)';
+    NbFrame=FileInfo.NumberOfFrames;
+%     i1_series=(1:FileInfo.NumberOfFrames)';
 end 
 % if strcmp( FileType,'multimage')||strcmp( FileType,'video')||strcmp( FileType,'mmreader')
@@ -64 +68 @@
 %     i1_series=(1:FileInfo.NumberOfFrames)';
 % end
-
+RootFile_i='';
+NomTypePref='';
 if strcmp(NomType,'')||strcmp(NomType,'*')
     if exist(fullfileinput,'file')
@@ -77 +82 @@
 else
     %% possibly include the first index in the root name, if there exists a corresponding xml file
-    NomTypePref='';
     r=regexp(NomType,'^(?<tiretnum>_?\d+)','names');%look for a number or _1 at the beginning of NomType
     if ~isempty(r)
@@ -87 +91 @@
         end
         if ~isempty(rr)
-            RootFileNew=[RootFile rr.i1];
-            checkpair=~isempty(regexp(NomType,'-','once'))||~isempty(regexp(NomType,'ab$','once'))||~isempty(regexp(NomType,'AB$','once'));%case of PIV results
-            if exist(fullfile(RootPath,SubDir,[RootFileNew '.xml']),'file') %|| (checkpair && exist(fullfile(fileparts(RootPath),[RootFileNew '.xml']),'file'))
-                RootFile=RootFileNew;
+            RootFile_i=[RootFile rr.i1];
+           % checkpair=~isempty(regexp(NomType,'-','once'))||~isempty(regexp(NomType,'ab$','once'))||~isempty(regexp(NomType,'AB$','once'));%case of PIV results
+            if exist(fullfile(RootPath,SubDir,[RootFile_i '.xml']),'file') %|| (checkpair && exist(fullfile(fileparts(RootPath),[RootFile_i '.xml']),'file'))
+                RootFile=RootFile_i;
                 NomTypePref=r.tiretnum;
                 NomType=regexprep(NomType,['^'  NomTypePref],'');
@@ -252 +256 @@
 if isequal(j2_series,0), j2_series=[]; end
 
+%% introduce the frame index in case of movies or multimage type
+if NbFrame>1
+    if isempty(i1_series)
+        i1_series=(1:NbFrame)';
+        i1_input=1;
+    else
+       j1_series=(1:NbFrame)'; 
+       j1_input=1;
+    end
+end
+
 %% sort pairs by decreasing index differences in case of multiple pairs at the same reference index
 if size(i2_series,3)>1 %pairs i1 -i2
@@ -280 +295 @@
 end
 
+% %% deals with frame index in movies
+% switch FileType
+%     case 'multimage'
+%    NomType='*';
+%    i1_series=(1:FileInfo.NbFrame)';
+%     case {'video','mmreader'}
+%     NomType='*';
+%     i1_series=(1:FileInfo.NumberOfFrames)';
+% end 
+