pdftops.m

Go to the documentation of this file.

/* (Autoinserted by mtoc++)
 * This source code has been filtered by the mtoc++ executable,
 * which generates code that can be processed by the doxygen documentation tool.
 *
 * On the other hand, it can neither be interpreted by MATLAB, nor can it be compiled with a C++ compiler.
 * Except for the comments, the function bodies of your M-file functions are untouched.
 * Consequently, the FILTER_SOURCE_FILES doxygen switch (default in our Doxyfile.template) will produce
 * attached source files that are highly readable by humans.
 *
 * Additionally, links in the doxygen generated documentation to the source code of functions and class members refer to
 * the correct locations in the source code browser.
 * However, the line numbers most likely do not correspond to the line numbers in the original MATLAB source files.
 */

function varargout = pdftops(cmd) {


/*  Copyright: Oliver Woodford, 2009-2010 */

/*  Thanks to Jonas Dorn for the fix for the title of the uigetdir window on
 * Mac OS.
 * Thanks to Christoph Hertel for pointing out a bug in check_xpdf_path
 * under linux. */

/*  Call pdftops */
[varargout[1:nargout]] = system(sprintf(" '%s' %s ", xpdf_path, cmd));
return

}
function path_ = pdftops>xpdf_path() {
path_ = user_string(" pdftops ");
/*  Check the path works */
if check_xpdf_path(path_)
    return
end
/*  Check whether the binary is on the path */
if ispc
    bin = " pdftops.exe ";
else
    bin = " pdftops ";
end
if check_store_xpdf_path(bin)
    path_ = bin;
    return
end
/*  Search the obvious places */
if ispc
    path_ = " C:\Program Files\xpdf\pdftops.exe ";
else
    path_ = " /usr/local/bin/pdftops ";
end
if check_store_xpdf_path(path_)
    return
end
/*  Ask the user to enter the path */
while 1
    if strncmp(computer," MAC ",3) /*  Is a Mac
         * Give separate warning as the uigetdir dialogue box doesn't have a
         * title */

        uiwait(warndlg(" Pdftops not found. Please locate the program, or install xpdf-tools from http://users.phg-online.de/tk/MOSXS/. "))
    end
    base = uigetdir(" / ", " Pdftops not found. Please locate the program. ");
    if isequal(base, 0)
        /*  User hit cancel or closed window */
        break;
    end
    base = [base filesep];
    bin_dir = [, [" bin " filesep], [" lib " filesep]];
    for a = 1:numel(bin_dir)
        path_ = [base bin_dir[a] bin];
        if exist(path_, " file ") == 2
            break;
        end
    end
    if check_store_xpdf_path(path_)
        return
    end
end
error(" pdftops executable not found. ");

}

function good = pdftops>check_store_xpdf_path(path_) {
good = check_xpdf_path(path_);
if ~good
    return
end
/*  Update the current default path to the path found */
if ~user_string(" pdftops ", path_)
    warning(" Path to pdftops executable could not be saved. Enter it manually in pdftops.txt. ");
    return
end
return

}

function good = pdftops>check_xpdf_path(path_) {
[good message] = system(sprintf(" '%s' -h ", path_));
/*  system returns good = 1 even when the command runs
 * Look for something distinct in the help text */
good = ~isempty(strfind(message, " PostScript "));
return
}