/
ncorr_util_loadimgs.m
127 lines (113 loc) · 6.14 KB
/
ncorr_util_loadimgs.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
function [imgs,outstate] = ncorr_util_loadimgs(lazyparam)
% This function loads image(s) from a GUI and returns the corresponding
% ncorr_class_img(s). If a single image is selected, it can be named anything.
% If more than one image is selected, it must have the format of
% 'name_#.ext'. These image(s) have type of either 'file' or 'lazy'.
%
% Inputs -----------------------------------------------------------------%
% lazyparam - logical; if true, then use lazy loading.
%
% Outputs ----------------------------------------------------------------%
% imgs - ncorr_class_img; the image(s) selected through the GUI.
% outstate - integer; returns either out.cancelled, out.failed, or out.success.
% Initialize output
outstate = out.cancelled;
imgs = ncorr_class_img.empty;
% Images set through this utility will either be 'lazy' or 'file'
if (lazyparam)
type = 'lazy';
else
type = 'file';
end
% Select images
[filename,pathname] = uigetfile({'*.jpg;*.jpeg;*.tif;*.tiff;*.png;*.bmp;','Image files (.jpg,.tif,.png,.bmp)'},'Select Image(s) (must be .jpg, .tif, .png, or .bmp)','MultiSelect', 'on');
% Check to see if operation was cancelled
if (isequal(filename,0) || isequal(pathname,0))
return;
end
% See how many images were selected (char is 1 image, while a cell
% array is multiple)
if (ischar(filename))
% Only 1 image selected
if (ncorr_util_properimgfmt(fullfile(pathname,filename),'Image') == out.success)
imgs = ncorr_class_img;
if (strcmp(type,'lazy'))
imgs.set_img(type,struct('name',filename,'path',pathname));
else
imgs.set_img(type,struct('img',imread(fullfile(pathname,filename)),'name',filename,'path',pathname));
end
outstate = out.success;
else
h_error = errordlg('Loading image failed. The data was determined to have incorrect formatting.','Error','modal');
uiwait(h_error);
outstate = out.failed;
end
else
% Put in try block because Ncorr can run out of memory here,
% especially if the user is not using lazy loading.
try
% Multiple images selected
% Files must have format of "name_#.ext"
% Get name and extension from the first image. Use these to
% compare to others to ensure consistency. Note that
% strfind will return [] if it fails, meaning name and ext
% will be empty, so test for this. Also note that if there
% are more than one instance found, that strfind will return a
% vector of indices, which, when used with ':', will only use
% the first index found in the vector. Thus, use fliplr so
% that only the number after the last '_' is used.
name = filename{1}(1:fliplr(strfind(filename{1},'_'))-1);
ext = filename{1}(strfind(filename{1},'.')+1:end);
if (~isempty(name) && ~isempty(ext))
list_num = zeros(length(filename),1);
imgs_prelim = ncorr_class_img.empty;
incorrectformat = false;
for i = 0:length(filename)-1
name_buffer = filename{i+1}(1:fliplr(strfind(filename{1},'_'))-1);
ext_buffer = filename{i+1}(strfind(filename{i+1},'.')+1:end);
num_buffer = str2double(filename{i+1}(fliplr(strfind(filename{1},'_'))+1:strfind(filename{i+1},'.')-1));
% Note that name and ext have already been tested
% to make sure they aren't empty. If strfind fails
% for name_buffer or ext_buffer, they will be
% empty, and strcmp will return false.
if (strcmp(name_buffer,name) && ...
strcmp(ext_buffer,ext) && ...
ncorr_util_isintbb(num_buffer,0,inf,'Image number') == out.success && ...
ncorr_util_properimgfmt(fullfile(pathname,filename{i+1}),'Image') == out.success)
% Store img and number
list_num(i+1) = num_buffer;
imgs_prelim(i+1) = ncorr_class_img;
if (strcmp(type,'lazy'))
imgs_prelim(i+1).set_img(type,struct('name',filename{i+1},'path',pathname));
else
imgs_prelim(i+1).set_img(type,struct('img',imread(fullfile(pathname,filename{i+1})),'name',filename{i+1},'path',pathname));
end
else
incorrectformat = true;
break;
end
end
if (~incorrectformat)
% Now sort list_number
[val_sorted,idx_sorted] = sort(list_num); %#ok<ASGLU>
% At this point all images are correct; return the
% sorted imgs list
imgs = imgs_prelim(idx_sorted);
outstate = out.success;
else
h_error = errordlg('Loading images failed. They were determined to have incorrect formatting. Make sure images are in the form of "name_#.ext" and that data has the correct format.','Error','modal');
uiwait(h_error);
outstate = out.failed;
end
else
h_error = errordlg('Loading images failed. Name or extension could not be obtained. Make sure images are in the form of "name_#.ext".','Error','modal');
uiwait(h_error);
outstate = out.failed;
end
catch %#ok<CTCH>
h_error = errordlg('Loading images failed, most likely because Ncorr ran out of memory.','Error','modal');
uiwait(h_error);
outstate = out.failed;
end
end
end