add test for nanPadding and checkInput

Author: Remi-Gau

miss_hit.cfg

@@ -6,6 +6,6 @@ copyright_entity: "CPP_BIDS developers"
 
 # metrics limit for the code quality (https://florianschanda.github.io/miss_hit/metrics.html)
 metric "cnest": limit 4
-metric "file_length": limit 550
+metric "file_length": limit 500
 metric "cyc": limit 15
 metric "parameters": limit 6

src/utils/nanPadding.m

@@ -1,9 +1,15 @@
 % (C) Copyright 2020 CPP_BIDS developers
 
 function data = nanPadding(cfg, data, expectedLength)
-
+    %
     % For numeric data that don't have the expected length, it will be padded
     % with NaNs. If the vector is too long it will be truncated
+    %
+    % USAGE::
+    %
+    %  data = nanPadding(cfg, data, expectedLength)
+    %
+    %
 
     if nargin < 2
         expectedLength = [];

tests/test_checkInput.m

@@ -0,0 +1,34 @@
+% (C) Copyright 2020 CPP_BIDS developers
+
+function test_suite = test_checkInput %#ok<*STOUT>
+    try % assignment of 'localfunctions' is necessary in Matlab >= 2016
+        test_functions = localfunctions(); %#ok<*NASGU>
+    catch % no problem; early Matlab versions can use initTestSuite fine
+    end
+    initTestSuite;
+end
+
+function test_checkInputBasic()
+
+    data = checkInput(1);
+    assertEqual(data, 1);
+
+    data = checkInput('test');
+    assertEqual(data, 'test');
+
+    data = checkInput('');
+    assertEqual(data, 'n/a');
+
+    data = checkInput(' ');
+    assertEqual(data, 'n/a');
+
+    data = checkInput([]);
+    assertEqual(data, nan);
+
+    data = checkInput(true());
+    assertEqual(data, 'true');
+
+    data = checkInput(false());
+    assertEqual(data, 'false');
+
+end

tests/test_nanPadding.m

@@ -0,0 +1,48 @@
+% (C) Copyright 2020 CPP_BIDS developers
+
+function test_suite = test_nanPadding %#ok<*STOUT>
+    try % assignment of 'localfunctions' is necessary in Matlab >= 2016
+        test_functions = localfunctions(); %#ok<*NASGU>
+    catch % no problem; early Matlab versions can use initTestSuite fine
+    end
+    initTestSuite;
+end
+
+function test_nanPaddingBasic()
+
+    cfg.verbose = 1;
+
+    %%
+    data = 'test';
+    expectedLength = 2;
+
+    data = nanPadding(cfg, data, expectedLength);
+
+    assertEqual(data, 'test');
+
+    %%
+    data = [1 0];
+    expectedLength = 2;
+
+    data = nanPadding(cfg, data, expectedLength);
+
+    assertEqual(data, [1 0]);
+
+    %%
+    data = [1 0];
+    expectedLength = 3;
+
+    data = nanPadding(cfg, data, expectedLength);
+
+    assertEqual(data, [1 0 NaN]);
+
+    %%
+    %%
+    data = [1 0 1];
+    expectedLength = 2;
+
+    data = nanPadding(cfg, data, expectedLength);
+
+    assertEqual(data, [1 0]);
+
+end