[matlab] Add nix.Utils.transpose_array function

The new nix.Utils.transpose_array function
rearranges the c++ nix data array dimensions
to fit Matlab requirements. The functions is
required in nix.DataArray, nix.Tag and
nix.MultiTag.

Author: mpsonntag

+nix/DataArray.m

@@ -110,9 +110,7 @@
         function r = read_all(obj)
             fname = strcat(obj.alias, '::readAll');
             data = nix_mx(fname, obj.nix_handle);
-
-            % data must agree with file & dimensions; see mkarray.cc(42)
-            r = permute(data, length(size(data)):-1:1);
+            r = nix.Utils.transpose_array(data);
         end
 
         %-- TODO add (optional) offset
@@ -142,9 +140,7 @@
                 error(errorStruct);
             else
                 fname = strcat(obj.alias, '::writeAll');
-                % data must agree with file & dimensions; see mkarray.cc(42)
-                tmp = permute(data, length(size(data)):-1:1);
-                nix_mx(fname, obj.nix_handle, tmp);
+                nix_mx(fname, obj.nix_handle, nix.Utils.transpose_array(data));
             end
         end
 

+nix/MultiTag.m

@@ -65,17 +65,13 @@
         function r = retrieve_data(obj, pos_idx, id_or_name)
             fname = strcat(obj.alias, '::retrieveData');
             data = nix_mx(fname, obj.nix_handle, pos_idx, id_or_name);
-
-            % data must agree with file & dimensions see mkarray.cc(42)
-            r = permute(data, length(size(data)):-1:1);
+            r = nix.Utils.transpose_array(data);
         end
 
         function r = retrieve_data_idx(obj, pos_idx, ref_idx)
             fname = strcat(obj.alias, '::retrieveDataIdx');
             data = nix_mx(fname, obj.nix_handle, pos_idx, ref_idx);
-
-            % data must agree with file & dimensions see mkarray.cc(42)
-            r = permute(data, length(size(data)):-1:1);
+            r = nix.Utils.transpose_array(data);
         end
 
         function r = reference_count(obj)
@@ -125,17 +121,13 @@
         function r = retrieve_feature_data(obj, pos_idx, id_or_name)
             fname = strcat(obj.alias, '::featureRetrieveData');
             data = nix_mx(fname, obj.nix_handle, pos_idx, id_or_name);
-
-            % data must agree with file & dimensions; see mkarray.cc(42)
-            r = permute(data, length(size(data)):-1:1);
+            r = nix.Utils.transpose_array(data);
         end
 
         function r = retrieve_feature_data_idx(obj, pos_idx, feat_idx)
             fname = strcat(obj.alias, '::featureRetrieveDataIdx');
             data = nix_mx(fname, obj.nix_handle, pos_idx, feat_idx);
-            
-            % data must agree with file & dimensions; see mkarray.cc(42)
-            r = permute(data, length(size(data)):-1:1);
+            r = nix.Utils.transpose_array(data);
         end
 
         function r = feature_count(obj)

+nix/Tag.m

@@ -67,17 +67,13 @@
         function r = retrieve_data(obj, id_or_name)
             fname = strcat(obj.alias, '::retrieveData');
             data = nix_mx(fname, obj.nix_handle, id_or_name);
-
-            % data must agree with file & dimensions; see mkarray.cc(42)
-            r = permute(data, length(size(data)):-1:1);
+            r = nix.Utils.transpose_array(data);
         end
 
         function r = retrieve_data_idx(obj, idx)
             fname = strcat(obj.alias, '::retrieveDataIdx');
             data = nix_mx(fname, obj.nix_handle, idx);
-            
-            % data must agree with file & dimensions; see mkarray.cc(42)
-            r = permute(data, length(size(data)):-1:1);
+            r = nix.Utils.transpose_array(data);
         end
 
         function r = reference_count(obj)
@@ -129,17 +125,13 @@
         function r = retrieve_feature_data(obj, id_or_name)
             fname = strcat(obj.alias, '::featureRetrieveData');
             data = nix_mx(fname, obj.nix_handle, id_or_name);
-
-            % data must agree with file & dimensions; see mkarray.cc(42)
-            r = permute(data, length(size(data)):-1:1);
+            r = nix.Utils.transpose_array(data);
         end
 
         function r = retrieve_feature_data_idx(obj, idx)
             fname = strcat(obj.alias, '::featureRetrieveDataIdx');
             data = nix_mx(fname, obj.nix_handle, idx);
-
-            % data must agree with file & dimensions; see mkarray.cc(42)
-            r = permute(data, length(size(data)):-1:1);
+            r = nix.Utils.transpose_array(data);
         end
 
         function r = feature_count(obj)

+nix/Utils.m

@@ -138,6 +138,15 @@
                 rdata{i} = objConstructor(currList{i});
             end
         end
+
+        % -----------------------------------------------------------
+        % c++ to matlab array functions
+        % -----------------------------------------------------------
+
+        function r = transpose_array(data)
+        % Data must agree with file & dimensions; see mkarray.cc(42)
+            r = permute(data, length(size(data)):-1:1);
+        end
     end
 
 end