integrating zmat, for zlib/gzip data compression

Author: fangq

base64decode.m

@@ -17,6 +17,14 @@
 if(nargin==0)
     error('you must provide at least 1 input');
 end
+if(exist('OCTAVE_VERSION','builtin'))
+    len=rem(numel(input),8)
+    if(len)
+       input=[input(:)', repmat(sprintf('\0'),1,(8-len))];
+    end
+    output = base64_decode(input);
+    return;
+end
 error(javachk('jvm'));
 if ischar(input), input = uint8(input); end
 

base64encode.m

@@ -17,6 +17,10 @@
 if(nargin==0)
     error('you must provide at least 1 input');
 end
+if(exist('OCTAVE_VERSION','builtin'))
+    output = base64_encode(uint8(input));
+    return;
+end
 error(javachk('jvm'));
 if ischar(input), input = uint8(input); end
 

gzipdecode.m

@@ -17,6 +17,10 @@
 if(nargin==0)
     error('you must provide at least 1 input');
 end
+if(exist('zmat')==3)
+    output=zmat(uint8(input),0,'gzip');
+    return;
+end
 error(javachk('jvm'));
 if ischar(input)
   warning('gzipdecode:inputTypeMismatch', ...

gzipencode.m

@@ -18,6 +18,10 @@
 if(nargin==0)
     error('you must provide at least 1 input');
 end
+if(exist('zmat')==3)
+    output=zmat(uint8(input),1,'gzip');
+    return;
+end
 error(javachk('jvm'));
 if ischar(input), input = uint8(input); end
 if ~isa(input, 'int8') && ~isa(input, 'uint8')

zlibdecode.m

@@ -17,6 +17,10 @@
 if(nargin==0)
     error('you must provide at least 1 input');
 end
+if(exist('zmat')==3)
+    output=zmat(uint8(input),0,'zlib');
+    return;
+end
 error(javachk('jvm'));
 if ischar(input)
   warning('zlibdecode:inputTypeMismatch', ...

zlibencode.m

@@ -19,6 +19,10 @@
 if(nargin==0)
     error('you must provide at least 1 input');
 end
+if(exist('zmat')==3)
+    output=zmat(input,1,'zlib');
+    return;
+end
 error(javachk('jvm'));
 if ischar(input), input = uint8(input); end
 if ~isa(input, 'int8') && ~isa(input, 'uint8')