mexdir.m

Go to the documentation of this file.

%>  \brief
%>  Return the vector of MATLAB strings containing the directory
%>  path(s) containing the specified ParaMonte library MEX shared file.<br>
%>
%>  \param[in]  mexname :   The input scalar MATLAB string containing
%>                          the (partial) name of a MEX file name without MEX extension.<br>
%>                          (**optional**. If missing, all detected paths will be returned.)
%>
%>  \param[in]  config  :   The input scalar (or vector of) MATLAB string(s) containing the
%>                          (set of) keyword(s) to match in the identified MEX files paths.<br>
%>                          (**optional**. If missing, all detected paths will be returned.)
%>
%>  \return
%>  ``mexdirs``         :   The output vector of MATLAB strings containing the **unique**
%>                          directory path(s) to the ParaMonte library MEX shared files.<br>
%>                          The output ``mexdirs`` will be an empty list
%>                          if no such paths are found.<br>
%>
%>  \interface{mexdir}
%>  \code{.m}
%>
%>      mexdirs = pm.lib.path.mexdir()
%>      mexdirs = pm.lib.path.mexdir([])
%>      mexdirs = pm.lib.path.mexdir([], [])
%>      mexdirs = pm.lib.path.mexdir(mexname)
%>      mexdirs = pm.lib.path.mexdir([], config)
%>      mexdirs = pm.lib.path.mexdir(mexname, [])
%>      mexdirs = pm.lib.path.mexdir(mexname, config)
%>
%>  \endcode
%>
%>  \example{mexdir}
%>  \include{lineno} example/lib/path/mexdir/main.m
%>  \output{mexdir}
%>  \include{lineno} example/lib/path/mexdir/main.out.m
%>
%>  \final{mexdir}
%>
%>  \author
%>  \JoshuaOsborne, May 21 2024, 7:50 PM, University of Texas at Arlington<br>
%>  \FatemehBagheri, May 20 2024, 1:25 PM, NASA Goddard Space Flight Center (GSFC), Washington, D.C.<br>
%>  \AmirShahmoradi, May 16 2016, 9:03 AM, Oden Institute for Computational Engineering and Sciences (ICES), UT Austin<br>
function mexdirs = mexdir(mexname, config)
    if  nargin < 2
        config = [];
    end
    if  nargin < 1
        mexname = [];
    end
    mexpaths = pm.lib.path.mex(mexname, config);
    mexdirs = strings(length(mexpaths), 1);
    for ipath = 1 : length(mexpaths)
        [dirpath, ~, ~] = fileparts(mexpaths{ipath});
        mexdirs(ipath) = string(dirpath);
    end
    mexdirs = unique(mexdirs);
end