function json = jsonget(fname, mmap, varargin)

if (ischar(fname) || isa(fname, 'string'))

if (regexp(fname, '^\s*(?:\[.*\])|(?:\{.*\})\s*$', 'once'))

inputstr = fname;

elseif (~exist('memmapfile', 'file'))

if (exist(fname, 'file'))

try

fid = fopen(fname, 'rb');

catch

end

end

end

if (iscell(mmap))

mmap = [mmap{:}];

keylist = mmap(1:2:end);

loc = 1:length(keylist);

if (length(varargin) >= 1)

[tf, loc] = ismember(varargin, keylist);

if (any(tf))

keylist = keylist(loc);

else

keylist = {};

end

end

keylist = [{mmap}, varargin{:}];

json = cell(1, length(keylist));

if (isstruct(fname) || iscell(fname) || isa(fname, 'table') || isa(fname, 'containers.Map') || ...

isa(fname, 'containers.Map') || isa(input, 'jdict'))

for i = 1:length(keylist)

json{i} = jsonpath(fname, keylist{i});

end

if (length(json) == 1)

json = json{1};

end

return

for i = 1:length(keylist)

bmap = mmap{loc(i) * 2};

rec = {'uint8', [1, bmap(2)], 'x'};

if (exist('inputstr', 'var'))

json{i} = {keylist{i}, inputstr(bmap(1):bmap(1) + bmap(2) - 1)};

else

if (exist('fid', 'var') && fid >= 0)

fseek(fid, bmap(1), -1);

json{i} = {keylist{i}, fread(fid, bmap(1), 'uint8=>char')};

else

fmap = memmapfile(fname, 'writable', false, 'offset', bmap(1), 'format', rec);

json{i} = {keylist{i}, char(fmap.Data(1).x)};

end

end

if (exist('fid', 'var') && fid > 0)

fclose(fid);