Changeset 783 for trunk/src/get_file_type.m
- Timestamp:
- Jun 5, 2014, 10:39:28 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/get_file_type.m
r781 r783 16 16 % INPUT: 17 17 % fileinput: name, including path, of the file to analyse 18 function [FileType,FileInfo,VideoObject]=get_file_type(fileinput) 19 %%%% TODO: suppress the output argument FileType, contained in FileInfo %%%% 20 FileInfo=[];% will remain empty in the absence of input file 18 function [FileInfo,VideoObject]=get_file_type(fileinput) 21 19 VideoObject=[]; 22 20 if exist(fileinput,'file') 23 21 FileInfo.FileName=fileinput; 24 22 FileInfo.FileType='txt'; %default 25 FileType='txt';%default, text file26 23 else 27 File Type='';24 FileInfo.FileType=''; 28 25 return 29 26 end 30 [tild,tild,FileExt]=fileparts(fileinput); 27 [tild,tild,FileExt]=fileparts(fileinput);%get the fiel extension FileExt 31 28 32 29 switch FileExt 33 30 case '.fig' 34 31 FileInfo.FileType='figure'; 35 FileType='figure';36 32 case '.xml' 37 33 FileInfo.FileType='xml'; 38 FileType='xml';39 34 case '.xls' 40 35 FileInfo.FileType='xls'; 41 FileType='xls';42 36 case '.dat' 43 FileInfo.FileType='dat'; 44 FileType='dat'; 37 FileInfo.FileType='dat';; 45 38 otherwise 46 39 if ~isempty(FileExt)% exclude empty extension … … 50 43 try 51 44 imainfo=imfinfo(fileinput); 52 if length(imainfo) >1 %case of image with multiple frames 53 FileType='multimage'; 45 if length(imainfo) >1 %case of image with multiple frames 54 46 FileInfo=imainfo(1);%take info from the first frame 47 FileInfo.FileType='multimage'; 55 48 FileInfo.NumberOfFrames=length(imainfo); 56 49 else 57 FileType='image';58 50 FileInfo=imainfo; 51 FileInfo.FileType='image'; 59 52 FileInfo.NumberOfFrames=1; 60 53 end 61 54 FileInfo.FileName=FileInfo.Filename; %correct the info given by imfinfo 62 FileInfo.FileType=FileType;63 55 end 64 56 else 65 57 error_nc=0; 66 58 try 67 % [Data,tild,tild,errormsg]=nc2struct(fileinput,'ListGlobalAttribute','absolut_time_T0','Conventions',...68 % 'CivStage','patch2','fix2','civ2','patch','fix','hart');69 59 [Data,tild,tild,errormsg]=nc2struct(fileinput,[]); 70 60 if ~isempty(errormsg) … … 89 79 elseif isfield(Data,'Conventions') && strcmp(Data.Conventions,'uvmat/civdata') 90 80 FileInfo.FileType='civdata'; % test for civx velocity fields 91 FileType='civdata'; % test for civx velocity fields81 % FileType='civdata'; % test for civx velocity fields 92 82 FileInfo.CivStage=Data.CivStage; 93 83 else 94 84 FileInfo.FileType='netcdf'; 95 FileType='netcdf';85 %FileType='netcdf'; 96 86 FileInfo.ListVarName=Data.ListVarName; 97 87 end … … 105 95 VideoObject=VideoReader(fileinput); 106 96 FileInfo=get(VideoObject); 107 File Type='video';97 FileInfo.FileType='video'; 108 98 elseif exist('mmreader.m','file')% Matlab 2009a 109 99 VideoObject=mmreader(fileinput); 110 100 FileInfo=get(VideoObject); 111 File Type='mmreader';101 FileInfo.FileType='mmreader'; 112 102 end 113 103 FileInfo.FileName=fileinput; 114 FileInfo.FileType=FileType;115 104 FileInfo.BitDepth=FileInfo.BitsPerPixel/3; 116 105 end
Note: See TracChangeset
for help on using the changeset viewer.