
Commit283ec1da0f
previously pushed had some coding style bugs, which unfortunately couldn't be fixed before pushing because the platform doesn't allow it and the original contributor is not available lately. Let's fix these. (cherry picked from commit8fa7b5bc74
)
1143 lines
28 KiB
C
1143 lines
28 KiB
C
/* gimptool in C
|
|
* Copyright (C) 2001-2007 Tor Lillqvist
|
|
*
|
|
* This program is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program. If not, see <https://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/*
|
|
* Gimptool rewritten in C, originally for Win32, where end-users who
|
|
* might want to build and install a plug-in from source don't
|
|
* necessarily have any Bourne-compatible shell to run the gimptool
|
|
* script in. Later fixed up to replace the gimptool script on all
|
|
* platforms.
|
|
*/
|
|
|
|
#include "config.h"
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include <sys/stat.h>
|
|
|
|
#include <gio/gio.h>
|
|
|
|
#include "libgimpbase/gimpbase.h"
|
|
|
|
#ifdef G_OS_WIN32
|
|
#include "libgimpbase/gimpwin32-io.h"
|
|
#endif
|
|
|
|
|
|
static gboolean silent = FALSE;
|
|
static gboolean dry_run = FALSE;
|
|
static const gchar *cli_prefix;
|
|
static const gchar *cli_exec_prefix;
|
|
|
|
static gboolean msvc_syntax = FALSE;
|
|
static const gchar *env_cc;
|
|
static const gchar *env_cflags;
|
|
static const gchar *env_ldflags;
|
|
static const gchar *env_libs;
|
|
|
|
|
|
#ifdef G_OS_WIN32
|
|
#define EXEEXT ".exe"
|
|
#else
|
|
#define EXEEXT ""
|
|
#endif
|
|
|
|
#ifdef G_OS_WIN32
|
|
#define COPY win32_command ("copy")
|
|
#define REMOVE win32_command ("del")
|
|
#define REMOVE_DIR win32_command ("rd /s /q")
|
|
#else
|
|
#define COPY "cp"
|
|
#define REMOVE "rm -f"
|
|
#define REMOVE_DIR "rm -Rf"
|
|
#endif
|
|
|
|
static struct {
|
|
const gchar *option;
|
|
const gchar *value;
|
|
} dirs[] = {
|
|
{ "prefix", PREFIX },
|
|
{ "exec-prefix", EXEC_PREFIX },
|
|
{ "bindir", BINDIR },
|
|
{ "sbindir", SBINDIR },
|
|
{ "libexecdir", LIBEXECDIR },
|
|
{ "datadir", DATADIR },
|
|
{ "datarootdir", DATAROOTDIR },
|
|
{ "sysconfdir", SYSCONFDIR },
|
|
{ "sharedstatedir", SHAREDSTATEDIR },
|
|
{ "localstatedir", LOCALSTATEDIR },
|
|
{ "libdir", LIBDIR },
|
|
{ "infodir", INFODIR },
|
|
{ "mandir", MANDIR },
|
|
#if 0
|
|
/* For --includedir we want the includedir of the developer package,
|
|
* not an includedir under the runtime installation prefix.
|
|
*/
|
|
{ "includedir", INCLUDEDIR },
|
|
#endif
|
|
{ "gimpplugindir", GIMPPLUGINDIR },
|
|
{ "gimpdatadir", GIMPDATADIR }
|
|
};
|
|
|
|
|
|
static void usage (int exit_status) G_GNUC_NORETURN;
|
|
|
|
|
|
#ifdef G_OS_WIN32
|
|
|
|
static gchar *
|
|
win32_command (const gchar *command)
|
|
{
|
|
const gchar *comspec = getenv ("COMSPEC");
|
|
|
|
if (!comspec)
|
|
comspec = "cmd.exe";
|
|
|
|
return g_strdup_printf ("%s /c %s", comspec, command);
|
|
}
|
|
|
|
#endif
|
|
|
|
static gboolean
|
|
starts_with_dir (const gchar *string,
|
|
const gchar *dir)
|
|
{
|
|
gchar *dirslash = g_strconcat (dir, "/", NULL);
|
|
gboolean retval;
|
|
|
|
retval = (g_str_has_prefix (string, dirslash) ||
|
|
g_strcmp0 (string, dir) == 0);
|
|
g_free (dirslash);
|
|
|
|
return retval;
|
|
}
|
|
|
|
static gchar *
|
|
one_line_output (const gchar *program,
|
|
const gchar *args)
|
|
{
|
|
gchar *command = g_strconcat (program, " ", args, NULL);
|
|
FILE *pipe = popen (command, "r");
|
|
gchar line[4096];
|
|
|
|
if (pipe == NULL)
|
|
{
|
|
g_printerr ("Cannot run '%s'\n", command);
|
|
g_free (command);
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
|
|
if (fgets (line, sizeof (line), pipe) == NULL)
|
|
line[0] = '\0';
|
|
|
|
if (strlen (line) > 0 && line [strlen (line) - 1] == '\n')
|
|
line [strlen (line) - 1] = '\0';
|
|
if (strlen (line) > 0 && line [strlen (line) - 1] == '\r')
|
|
line [strlen (line) - 1] = '\0';
|
|
|
|
pclose (pipe);
|
|
|
|
if (strlen (line) == 0)
|
|
{
|
|
g_printerr ("No output from '%s'\n", command);
|
|
g_free (command);
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
g_free (command);
|
|
|
|
return g_strdup (line);
|
|
}
|
|
|
|
static gchar *
|
|
pkg_config (const gchar *args)
|
|
{
|
|
#ifdef G_OS_WIN32
|
|
if (msvc_syntax)
|
|
return one_line_output ("pkg-config --msvc-syntax", args);
|
|
#endif
|
|
|
|
return one_line_output ("pkg-config", args);
|
|
}
|
|
|
|
static gchar *
|
|
get_runtime_prefix (gchar slash)
|
|
{
|
|
#ifdef G_OS_WIN32
|
|
|
|
/* Don't use the developer package prefix, but deduce the
|
|
* installation-time prefix from where gimp-x.y.exe can be found.
|
|
*/
|
|
|
|
gchar *path;
|
|
gchar *p, *r;
|
|
|
|
path = g_find_program_in_path ("gimp-" GIMP_APP_VERSION ".exe");
|
|
|
|
if (path == NULL)
|
|
path = g_find_program_in_path ("gimp.exe");
|
|
|
|
if (path != NULL)
|
|
{
|
|
r = strrchr (path, G_DIR_SEPARATOR);
|
|
if (r != NULL)
|
|
{
|
|
*r = '\0';
|
|
if (strlen (path) >= 4 &&
|
|
g_ascii_strcasecmp (r - 4, G_DIR_SEPARATOR_S "bin") == 0)
|
|
{
|
|
r[-4] = '\0';
|
|
if (slash == '/')
|
|
{
|
|
/* Use forward slashes, less quoting trouble in Makefiles */
|
|
while ((p = strchr (path, '\\')) != NULL)
|
|
*p = '/';
|
|
}
|
|
return path;
|
|
}
|
|
}
|
|
}
|
|
|
|
g_printerr ("Cannot determine GIMP " GIMP_APP_VERSION " installation location\n");
|
|
|
|
exit (EXIT_FAILURE);
|
|
#else
|
|
/* On Unix assume the executable package is in the same prefix as the developer stuff */
|
|
return pkg_config ("--variable=prefix gimp-" GIMP_PKGCONFIG_VERSION);
|
|
#endif
|
|
}
|
|
|
|
static gchar *
|
|
get_exec_prefix (gchar slash)
|
|
{
|
|
#ifdef G_OS_WIN32
|
|
if (cli_exec_prefix != NULL)
|
|
return g_strdup (cli_exec_prefix);
|
|
|
|
/* On Win32, exec_prefix is always same as prefix. Or is it? Maybe not,
|
|
* but at least in tml's prebuilt stuff it is. If somebody else does
|
|
* it another way, feel free to hack this.
|
|
*/
|
|
return get_runtime_prefix (slash);
|
|
#else
|
|
return g_strdup (EXEC_PREFIX);
|
|
#endif
|
|
}
|
|
|
|
static gchar *
|
|
expand_and_munge (const gchar *value)
|
|
{
|
|
gchar *retval;
|
|
|
|
if (starts_with_dir (value, "${prefix}"))
|
|
retval = g_strconcat (PREFIX, value + strlen ("${prefix}"), NULL);
|
|
else if (starts_with_dir (value, "${exec_prefix}"))
|
|
retval = g_strconcat (EXEC_PREFIX, value + strlen ("${exec_prefix}"), NULL);
|
|
else
|
|
retval = g_strdup (value);
|
|
|
|
if (starts_with_dir (retval, EXEC_PREFIX))
|
|
{
|
|
gchar *exec_prefix = get_exec_prefix ('/');
|
|
|
|
retval = g_strconcat (exec_prefix, retval + strlen (EXEC_PREFIX), NULL);
|
|
g_free (exec_prefix);
|
|
}
|
|
|
|
if (starts_with_dir (retval, PREFIX))
|
|
{
|
|
gchar *runtime_prefix = get_runtime_prefix ('/');
|
|
|
|
retval = g_strconcat (runtime_prefix, retval + strlen (PREFIX), NULL);
|
|
g_free (runtime_prefix);
|
|
}
|
|
|
|
return retval;
|
|
}
|
|
|
|
static void
|
|
find_out_env_flags (void)
|
|
{
|
|
gchar *p;
|
|
|
|
if ((p = getenv ("CC")) != NULL && *p != '\0')
|
|
env_cc = p;
|
|
else if (msvc_syntax)
|
|
env_cc = "cl -MD";
|
|
else
|
|
env_cc = CC;
|
|
|
|
if (g_ascii_strncasecmp (env_cc, "cl", 2) == 0 &&
|
|
g_ascii_strncasecmp (env_cc, "clang", 5) != 0)
|
|
msvc_syntax = TRUE;
|
|
|
|
if ((p = getenv ("CFLAGS")) != NULL)
|
|
env_cflags = p;
|
|
else
|
|
env_cflags = "";
|
|
|
|
if ((p = getenv ("LDFLAGS")) != NULL)
|
|
env_ldflags = p;
|
|
else
|
|
env_ldflags = "";
|
|
|
|
if ((p = getenv ("LIBS")) != NULL && *p != '\0')
|
|
env_libs = p;
|
|
else
|
|
env_libs = "";
|
|
}
|
|
|
|
static void
|
|
usage (int exit_status)
|
|
{
|
|
g_print ("\
|
|
Usage: gimptool-" GIMP_TOOL_VERSION " [OPTION]...\n\
|
|
\n\
|
|
General options:\n\
|
|
--help print this message\n\
|
|
--quiet, --silent don't echo build commands\n\
|
|
--version print the version of GIMP associated with this script\n\
|
|
-n, --just-print, --dry-run, --recon\n\
|
|
don't actually run any commands; just print them\n\
|
|
Developer options:\n\
|
|
--cflags print the compiler flags that are necessary to\n\
|
|
compile a plug-in\n\
|
|
--libs print the linker flags that are necessary to link a\n\
|
|
plug-in\n\
|
|
--prefix=PREFIX use PREFIX instead of the installation prefix that\n\
|
|
GIMP was built when computing the output for --cflags\n\
|
|
and --libs\n\
|
|
--exec-prefix=PREFIX use PREFIX instead of the installation exec prefix\n\
|
|
that GIMP was built when computing the output for\n\
|
|
--cflags and --libs\n\
|
|
--msvc-syntax print flags in MSVC syntax\n\
|
|
\n\
|
|
Installation directory options:\n\
|
|
--prefix --exec-prefix --bindir --sbindir --libexecdir --datadir --sysconfdir\n\
|
|
--sharedstatedir --localstatedir --libdir --infodir --mandir --includedir\n\
|
|
--gimpplugindir --gimpdatadir\n\
|
|
\n\
|
|
The --cflags and --libs options can be appended with -noui to get appropriate\n\
|
|
settings for plug-ins which do not use GTK+.\n\
|
|
\n\
|
|
User options:\n\
|
|
--build plug-in.c build a plug-in from a source file\n\
|
|
--install plug-in.c same as --build, but installs the built\n\
|
|
plug-in as well\n\
|
|
--install-bin plug-in install a compiled plug-in\n\
|
|
--install-script script.scm install a script-fu script\n\
|
|
\n\
|
|
--uninstall-bin plug-in remove a plug-in again\n\
|
|
--uninstall-script plug-in remove a script-fu script\n\
|
|
\n\
|
|
The --install and --uninstall options have \"admin\" counterparts (with\n\
|
|
prefix --install-admin instead of --install) that can be used instead to\n\
|
|
install/uninstall a plug-in or script in the machine directory instead of a\n\
|
|
user directory.\n\
|
|
\n\
|
|
For plug-ins which do not use GTK+, the --build and --install options can be\n\
|
|
appended with -noui for appropriate settings. For plug-ins that use GTK+ but\n\
|
|
not libgimpui, append -nogimpui.\n");
|
|
exit (exit_status);
|
|
}
|
|
|
|
static gchar *
|
|
get_includedir (void)
|
|
{
|
|
return pkg_config ("--variable=includedir gimp-" GIMP_PKGCONFIG_VERSION);
|
|
}
|
|
|
|
static void
|
|
do_includedir (void)
|
|
{
|
|
gchar *includedir = get_includedir ();
|
|
|
|
g_print ("%s\n", includedir);
|
|
g_free (includedir);
|
|
}
|
|
|
|
static gchar *
|
|
get_cflags (void)
|
|
{
|
|
return pkg_config ("--cflags gimpui-" GIMP_PKGCONFIG_VERSION);
|
|
}
|
|
|
|
static void
|
|
do_cflags (void)
|
|
{
|
|
gchar *cflags = get_cflags ();
|
|
|
|
g_print ("%s\n", cflags);
|
|
g_free (cflags);
|
|
}
|
|
|
|
static gchar *
|
|
get_cflags_noui (void)
|
|
{
|
|
return pkg_config ("--cflags gimp-" GIMP_PKGCONFIG_VERSION);
|
|
}
|
|
|
|
static void
|
|
do_cflags_noui (void)
|
|
{
|
|
gchar *cflags = get_cflags_noui ();
|
|
|
|
g_print ("%s\n", cflags);
|
|
g_free (cflags);
|
|
}
|
|
|
|
static gchar *
|
|
get_cflags_nogimpui (void)
|
|
{
|
|
return pkg_config ("--cflags gimp-" GIMP_PKGCONFIG_VERSION " gtk+-2.0");
|
|
}
|
|
|
|
static void
|
|
do_cflags_nogimpui (void)
|
|
{
|
|
gchar *cflags = get_cflags_nogimpui ();
|
|
|
|
g_print ("%s\n", cflags);
|
|
g_free (cflags);
|
|
}
|
|
|
|
static gchar *
|
|
get_libs (void)
|
|
{
|
|
return pkg_config ("--libs gimpui-" GIMP_PKGCONFIG_VERSION);
|
|
}
|
|
|
|
static void
|
|
do_libs (void)
|
|
{
|
|
gchar *libs = get_libs ();
|
|
|
|
g_print ("%s\n", libs);
|
|
g_free (libs);
|
|
}
|
|
|
|
static gchar *
|
|
get_libs_noui (void)
|
|
{
|
|
return pkg_config ("--libs gimp-" GIMP_PKGCONFIG_VERSION);
|
|
}
|
|
|
|
static void
|
|
do_libs_noui (void)
|
|
{
|
|
gchar *libs = get_libs_noui ();
|
|
|
|
g_print ("%s\n", libs);
|
|
g_free (libs);
|
|
}
|
|
|
|
static gchar *
|
|
get_libs_nogimpui (void)
|
|
{
|
|
return pkg_config ("--libs gimp-" GIMP_PKGCONFIG_VERSION " gtk+-2.0");
|
|
}
|
|
|
|
static void
|
|
do_libs_nogimpui (void)
|
|
{
|
|
gchar *libs = get_libs_nogimpui ();
|
|
|
|
g_print ("%s\n", libs);
|
|
g_free (libs);
|
|
}
|
|
|
|
static void
|
|
maybe_run (gchar *cmd)
|
|
{
|
|
if (!silent)
|
|
g_print ("%s\n", cmd);
|
|
|
|
/* system() declared with attribute warn_unused_result.
|
|
* Trick to get rid of the compilation warning without using the result.
|
|
*/
|
|
if (dry_run || system (cmd))
|
|
;
|
|
}
|
|
|
|
static void
|
|
do_build_2 (const gchar *cflags,
|
|
const gchar *libs,
|
|
const gchar *install_dir,
|
|
const gchar *what)
|
|
{
|
|
const gchar *lang_flag = "";
|
|
const gchar *output_flag;
|
|
const gchar *here_comes_linker_flags = "";
|
|
const gchar *windows_subsystem_flag = "";
|
|
gchar *cmd;
|
|
gchar *dest_dir;
|
|
gchar *dest_exe;
|
|
gchar *source = g_shell_quote (what);
|
|
|
|
gchar *tmp;
|
|
gchar *p, *q;
|
|
|
|
if (install_dir != NULL)
|
|
dest_dir = g_strconcat (install_dir, "/", NULL);
|
|
else
|
|
dest_dir = g_strdup ("");
|
|
|
|
dest_exe = g_strdup (what);
|
|
|
|
p = strrchr (dest_exe, '.');
|
|
if (p == NULL ||
|
|
!(strcmp (p, ".c") == 0 ||
|
|
strcmp (p, ".cc") == 0 ||
|
|
strcmp (p, ".cpp") == 0))
|
|
{
|
|
/* If the file doesn't have a "standard" C/C++ suffix and:
|
|
* 1) if the compiler is known as a C++ compiler, then treat the file as a
|
|
* C++ file if possible.
|
|
* It's known that G++ and Clang++ treat a file as a C file if they are
|
|
* run with the "-x c++" option.
|
|
* 2) if the compiler is known as a C compiler or a multiple-language
|
|
* compiler, then treat the file as a C file if possible.
|
|
* It's known that GCC and Clang treat a file as a C file if they are
|
|
* run with the "-x c" option.
|
|
* TODO We may want to further support compilation with a source file
|
|
* without a standard suffix in more compilers as far as possible.
|
|
*/
|
|
if (strcmp (env_cc, "g++") == 0 ||
|
|
strncmp (env_cc, "g++-", sizeof ("g++-") - 1) == 0 ||
|
|
strcmp (env_cc, "clang++") == 0 ||
|
|
strncmp (env_cc, "clang++-", sizeof ("clang++-") - 1) == 0)
|
|
lang_flag = "-x c++ ";
|
|
else if (strcmp (env_cc, "gcc") == 0 ||
|
|
strncmp (env_cc, "gcc-", sizeof ("gcc-") - 1) == 0)
|
|
{
|
|
/* It's known GCC recognizes .CPP and .cxx, so bypass these suffixes */
|
|
if (p != NULL && strcmp (p, ".CPP") != 0 && strcmp (p, ".cxx") != 0)
|
|
lang_flag = "-x c ";
|
|
}
|
|
else if (strcmp (env_cc, "clang") == 0 ||
|
|
strncmp (env_cc, "clang-", sizeof ("clang-") - 1) == 0)
|
|
{
|
|
/* It's known Clang recognizes .CC, .CPP, .cxx and .CXX,
|
|
* so bypass these suffixes
|
|
*/
|
|
if (p != NULL && strcmp (p, ".CC") != 0 && strcmp (p, ".CPP") != 0 &&
|
|
strcmp (p, ".cxx") != 0 && strcmp (p, ".CXX") != 0)
|
|
lang_flag = "-x c ";
|
|
}
|
|
else
|
|
{
|
|
g_printerr ("The source file (%s) doesn't have a \"standard\" C or C++ suffix, "
|
|
"and the tool failed to confirm the language of the file.\n"
|
|
"Please be explicit about the language of the file "
|
|
"by renaming it with one of the suffixes: .c .cc .cpp\n",
|
|
what);
|
|
exit (EXIT_FAILURE);
|
|
}
|
|
}
|
|
|
|
if (p)
|
|
*p = '\0';
|
|
q = strrchr (dest_exe, G_DIR_SEPARATOR);
|
|
#ifdef G_OS_WIN32
|
|
{
|
|
gchar *r = strrchr (dest_exe, '/');
|
|
if (r != NULL && (q == NULL || r > q))
|
|
q = r;
|
|
}
|
|
#endif
|
|
if (q == NULL)
|
|
q = dest_exe;
|
|
else
|
|
q++;
|
|
|
|
if (install_dir)
|
|
{
|
|
tmp = dest_dir;
|
|
dest_dir = g_strconcat (dest_dir, q, G_DIR_SEPARATOR_S, NULL);
|
|
g_free (tmp);
|
|
|
|
g_mkdir_with_parents (dest_dir,
|
|
S_IRUSR | S_IXUSR | S_IWUSR |
|
|
S_IRGRP | S_IXGRP |
|
|
S_IROTH | S_IXOTH);
|
|
}
|
|
|
|
tmp = g_strconcat (dest_dir, q, NULL);
|
|
g_free (dest_dir);
|
|
|
|
dest_exe = g_shell_quote (tmp);
|
|
g_free (tmp);
|
|
|
|
if (msvc_syntax)
|
|
{
|
|
output_flag = "-Fe";
|
|
here_comes_linker_flags = " -link";
|
|
windows_subsystem_flag = " -subsystem:windows";
|
|
}
|
|
else
|
|
{
|
|
output_flag = "-o ";
|
|
#ifdef G_OS_WIN32
|
|
windows_subsystem_flag = " -mwindows";
|
|
#endif
|
|
}
|
|
|
|
cmd = g_strdup_printf ("%s %s%s %s %s%s %s%s %s%s %s %s",
|
|
env_cc,
|
|
lang_flag,
|
|
env_cflags,
|
|
cflags,
|
|
output_flag,
|
|
dest_exe,
|
|
source,
|
|
here_comes_linker_flags,
|
|
env_ldflags,
|
|
windows_subsystem_flag,
|
|
libs,
|
|
env_libs);
|
|
|
|
maybe_run (cmd);
|
|
|
|
g_free (dest_exe);
|
|
g_free (source);
|
|
}
|
|
|
|
static void
|
|
do_build (const gchar *what)
|
|
{
|
|
gchar *cflags = get_cflags ();
|
|
gchar *libs = get_libs ();
|
|
|
|
do_build_2 (cflags, libs, NULL, what);
|
|
|
|
g_free (cflags);
|
|
g_free (libs);
|
|
}
|
|
|
|
static void
|
|
do_build_noui (const gchar *what)
|
|
{
|
|
gchar *cflags = get_cflags_noui ();
|
|
gchar *libs = get_libs_noui ();
|
|
|
|
do_build_2 (cflags, libs, NULL, what);
|
|
|
|
g_free (cflags);
|
|
g_free (libs);
|
|
}
|
|
|
|
static void
|
|
do_build_nogimpui (const gchar *what)
|
|
{
|
|
do_build (what);
|
|
}
|
|
|
|
static gchar *
|
|
get_user_plugin_dir (void)
|
|
{
|
|
return g_build_filename (gimp_directory (),
|
|
"plug-ins",
|
|
NULL);
|
|
}
|
|
|
|
static gchar *
|
|
get_plugin_dir (const gchar *base_dir,
|
|
const gchar *what)
|
|
{
|
|
gchar *separator, *dot, *plugin_name, *plugin_dir;
|
|
gchar *tmp = g_strdup (what);
|
|
|
|
separator = strrchr (tmp, G_DIR_SEPARATOR);
|
|
#ifdef G_OS_WIN32
|
|
{
|
|
gchar *alt_separator = strrchr (tmp, '/');
|
|
|
|
if (alt_separator != NULL &&
|
|
(separator == NULL || alt_separator > separator))
|
|
{
|
|
separator = alt_separator;
|
|
}
|
|
}
|
|
#endif
|
|
|
|
dot = strrchr (tmp, '.');
|
|
|
|
if (separator)
|
|
plugin_name = separator + 1;
|
|
else
|
|
plugin_name = tmp;
|
|
|
|
if (dot)
|
|
*dot = '\0';
|
|
|
|
plugin_dir = g_strconcat (base_dir,
|
|
G_DIR_SEPARATOR_S,
|
|
plugin_name,
|
|
NULL);
|
|
|
|
g_free (tmp);
|
|
|
|
return plugin_dir;
|
|
}
|
|
|
|
static void
|
|
do_install (const gchar *what)
|
|
{
|
|
gchar *cflags = get_cflags ();
|
|
gchar *libs = get_libs ();
|
|
gchar *dir = get_user_plugin_dir ();
|
|
|
|
do_build_2 (cflags, libs, dir, what);
|
|
|
|
g_free (cflags);
|
|
g_free (libs);
|
|
g_free (dir);
|
|
}
|
|
|
|
static void
|
|
do_install_noui (const gchar *what)
|
|
{
|
|
gchar *cflags = get_cflags_noui ();
|
|
gchar *libs = get_libs_noui ();
|
|
gchar *dir = get_user_plugin_dir ();
|
|
|
|
do_build_2 (cflags, libs, dir, what);
|
|
|
|
g_free (cflags);
|
|
g_free (libs);
|
|
g_free (dir);
|
|
}
|
|
|
|
static void
|
|
do_install_nogimpui (const gchar *what)
|
|
{
|
|
do_install (what);
|
|
}
|
|
|
|
static gchar *
|
|
get_sys_plugin_dir (gboolean forward_slashes)
|
|
{
|
|
gchar *dir;
|
|
|
|
#ifdef G_OS_WIN32
|
|
gchar *rprefix;
|
|
|
|
rprefix = get_runtime_prefix (forward_slashes ? '/' : G_DIR_SEPARATOR);
|
|
|
|
dir = g_build_path (forward_slashes ? "/" : G_DIR_SEPARATOR_S,
|
|
rprefix,
|
|
"lib", "gimp",
|
|
GIMP_PLUGIN_VERSION,
|
|
"plug-ins",
|
|
NULL);
|
|
g_free (rprefix);
|
|
#else
|
|
dir = g_build_path (forward_slashes ? "/" : G_DIR_SEPARATOR_S,
|
|
LIBDIR,
|
|
"gimp",
|
|
GIMP_PLUGIN_VERSION,
|
|
"plug-ins",
|
|
NULL);
|
|
#endif
|
|
|
|
return dir;
|
|
}
|
|
|
|
static void
|
|
do_install_admin (const gchar *what)
|
|
{
|
|
gchar *cflags = get_cflags ();
|
|
gchar *libs = get_libs ();
|
|
gchar *dir = get_sys_plugin_dir (TRUE);
|
|
|
|
do_build_2 (cflags, libs, dir, what);
|
|
|
|
g_free (cflags);
|
|
g_free (libs);
|
|
g_free (dir);
|
|
}
|
|
|
|
static void
|
|
do_install_admin_noui (const gchar *what)
|
|
{
|
|
gchar *cflags = get_cflags_noui ();
|
|
gchar *libs = get_libs_noui ();
|
|
gchar *dir = get_sys_plugin_dir (TRUE);
|
|
|
|
do_build_2 (cflags, libs, dir, what);
|
|
|
|
g_free (cflags);
|
|
g_free (libs);
|
|
g_free (dir);
|
|
}
|
|
|
|
static void
|
|
do_install_admin_nogimpui (const gchar *what)
|
|
{
|
|
gchar *cflags = get_cflags ();
|
|
gchar *libs = get_libs ();
|
|
gchar *dir = get_sys_plugin_dir (TRUE);
|
|
|
|
do_build_2 (cflags, libs, dir, what);
|
|
|
|
g_free (cflags);
|
|
g_free (libs);
|
|
g_free (dir);
|
|
}
|
|
|
|
static void
|
|
do_install_bin_2 (const gchar *dir,
|
|
const gchar *what)
|
|
{
|
|
gchar *cmd;
|
|
gchar *quoted_src;
|
|
gchar *quoted_dir;
|
|
|
|
gchar *dest_dir = g_strconcat (dir, G_DIR_SEPARATOR_S, NULL);
|
|
|
|
g_mkdir_with_parents (dest_dir,
|
|
S_IRUSR | S_IXUSR | S_IWUSR |
|
|
S_IRGRP | S_IXGRP |
|
|
S_IROTH | S_IXOTH);
|
|
|
|
quoted_src = g_shell_quote (what);
|
|
quoted_dir = g_shell_quote (dest_dir);
|
|
cmd = g_strconcat (COPY, " ", quoted_src, " ", quoted_dir, NULL);
|
|
maybe_run (cmd);
|
|
|
|
g_free (dest_dir);
|
|
g_free (cmd);
|
|
g_free (quoted_src);
|
|
g_free (quoted_dir);
|
|
}
|
|
|
|
static void
|
|
do_install_bin (const gchar *what)
|
|
{
|
|
gchar *dir = get_user_plugin_dir ();
|
|
gchar *plugin_dir = get_plugin_dir (dir, what);
|
|
|
|
do_install_bin_2 (plugin_dir, what);
|
|
|
|
g_free (plugin_dir);
|
|
g_free (dir);
|
|
}
|
|
|
|
static void
|
|
do_install_admin_bin (const gchar *what)
|
|
{
|
|
gchar *dir = get_sys_plugin_dir (FALSE);
|
|
gchar *plugin_dir = get_plugin_dir (dir, what);
|
|
|
|
do_install_bin_2 (dir, what);
|
|
|
|
g_free (plugin_dir);
|
|
g_free (dir);
|
|
}
|
|
|
|
static void
|
|
do_uninstall (const gchar *dir)
|
|
{
|
|
gchar *cmd;
|
|
gchar *quoted_src;
|
|
|
|
quoted_src = g_shell_quote (dir);
|
|
|
|
cmd = g_strconcat (REMOVE_DIR, " ", quoted_src, NULL);
|
|
maybe_run (cmd);
|
|
|
|
g_free (cmd);
|
|
g_free (quoted_src);
|
|
}
|
|
|
|
static void
|
|
do_uninstall_script_2 (const gchar *dir,
|
|
const gchar *what)
|
|
{
|
|
gchar *cmd;
|
|
gchar *quoted_src;
|
|
gchar *src;
|
|
|
|
src = g_strconcat (dir, G_DIR_SEPARATOR_S, what, NULL);
|
|
quoted_src = g_shell_quote (src);
|
|
|
|
cmd = g_strconcat (REMOVE, " ", quoted_src, NULL);
|
|
maybe_run (cmd);
|
|
|
|
g_free (cmd);
|
|
g_free (quoted_src);
|
|
g_free (src);
|
|
}
|
|
|
|
static gchar *
|
|
maybe_append_exe (const gchar *what)
|
|
{
|
|
#ifdef G_OS_WIN32
|
|
gchar *p = strrchr (what, '.');
|
|
|
|
if (p == NULL || g_ascii_strcasecmp (p, ".exe") != 0)
|
|
return g_strconcat (what, ".exe", NULL);
|
|
#endif
|
|
|
|
return g_strdup (what);
|
|
}
|
|
|
|
static void
|
|
do_uninstall_bin (const gchar *what)
|
|
{
|
|
gchar *dir = get_user_plugin_dir ();
|
|
gchar *exe = maybe_append_exe (what);
|
|
gchar *plugin_dir = get_plugin_dir (dir, what);
|
|
|
|
do_uninstall (plugin_dir);
|
|
|
|
g_free (plugin_dir);
|
|
g_free (dir);
|
|
g_free (exe);
|
|
}
|
|
|
|
static void
|
|
do_uninstall_admin_bin (const gchar *what)
|
|
{
|
|
gchar *dir = get_sys_plugin_dir (FALSE);
|
|
gchar *exe = maybe_append_exe (what);
|
|
gchar *plugin_dir = get_plugin_dir (dir, what);
|
|
|
|
do_uninstall (plugin_dir);
|
|
|
|
g_free (plugin_dir);
|
|
g_free (dir);
|
|
g_free (exe);
|
|
}
|
|
|
|
static gchar *
|
|
get_user_script_dir (void)
|
|
{
|
|
return g_build_filename (gimp_directory (),
|
|
"scripts",
|
|
NULL);
|
|
}
|
|
|
|
static void
|
|
do_install_script (const gchar *what)
|
|
{
|
|
gchar *dir = get_user_script_dir ();
|
|
|
|
do_install_bin_2 (dir, what);
|
|
g_free (dir);
|
|
}
|
|
|
|
static gchar *
|
|
get_sys_script_dir (void)
|
|
{
|
|
gchar *dir;
|
|
gchar *prefix = get_runtime_prefix (G_DIR_SEPARATOR);
|
|
|
|
dir = g_build_filename (prefix, "share", "gimp",
|
|
GIMP_PLUGIN_VERSION, "scripts",
|
|
NULL);
|
|
g_free (prefix);
|
|
|
|
return dir;
|
|
}
|
|
|
|
static void
|
|
do_install_admin_script (const gchar *what)
|
|
{
|
|
gchar *dir = get_sys_script_dir ();
|
|
|
|
do_install_bin_2 (dir, what);
|
|
g_free (dir);
|
|
}
|
|
|
|
static void
|
|
do_uninstall_script (const gchar *what)
|
|
{
|
|
gchar *dir = get_user_script_dir ();
|
|
|
|
do_uninstall_script_2 (dir, what);
|
|
g_free (dir);
|
|
}
|
|
|
|
static void
|
|
do_uninstall_admin_script (const gchar *what)
|
|
{
|
|
gchar *dir = get_sys_script_dir ();
|
|
|
|
do_uninstall_script_2 (dir, what);
|
|
g_free (dir);
|
|
}
|
|
|
|
int
|
|
main (int argc,
|
|
char **argv)
|
|
{
|
|
gint argi;
|
|
gint i;
|
|
|
|
if (argc == 1)
|
|
usage (EXIT_SUCCESS);
|
|
|
|
/* First scan for flags that affect our behaviour globally, but
|
|
* are still allowed late on the command line.
|
|
*/
|
|
argi = 0;
|
|
while (++argi < argc)
|
|
{
|
|
if (strcmp (argv[argi], "-n") == 0 ||
|
|
strcmp (argv[argi], "--just-print") == 0 ||
|
|
strcmp (argv[argi], "--dry-run") == 0 ||
|
|
strcmp (argv[argi], "--recon") == 0)
|
|
{
|
|
dry_run = TRUE;
|
|
}
|
|
else if (strcmp (argv[argi], "--help") == 0)
|
|
{
|
|
usage (EXIT_SUCCESS);
|
|
}
|
|
else if (g_str_has_prefix (argv[argi], "--prefix="))
|
|
{
|
|
cli_prefix = argv[argi] + strlen ("--prefix=");
|
|
}
|
|
else if (g_str_has_prefix (argv[argi], "--exec-prefix="))
|
|
{
|
|
cli_exec_prefix = argv[argi] + strlen ("--exec_prefix=");
|
|
}
|
|
else if (strcmp (argv[argi], "--msvc-syntax") == 0)
|
|
{
|
|
#ifdef G_OS_WIN32
|
|
msvc_syntax = TRUE;
|
|
#else
|
|
g_printerr ("Ignoring --msvc-syntax\n");
|
|
#endif
|
|
}
|
|
}
|
|
|
|
find_out_env_flags ();
|
|
|
|
/* Second pass, actually do something. */
|
|
argi = 0;
|
|
while (++argi < argc)
|
|
{
|
|
for (i = 0; i < G_N_ELEMENTS (dirs); i++)
|
|
{
|
|
gchar *test = g_strconcat ("--", dirs[i].option, NULL);
|
|
|
|
if (strcmp (argv[argi], test) == 0)
|
|
{
|
|
g_free (test);
|
|
break;
|
|
}
|
|
else
|
|
{
|
|
g_free (test);
|
|
}
|
|
}
|
|
|
|
if (i < G_N_ELEMENTS (dirs))
|
|
{
|
|
gchar *expanded = expand_and_munge (dirs[i].value);
|
|
|
|
g_print ("%s\n", expanded);
|
|
g_free (expanded);
|
|
}
|
|
else if (strcmp (argv[argi], "--quiet") == 0 ||
|
|
strcmp (argv[argi], "--silent") == 0)
|
|
{
|
|
silent = TRUE;
|
|
}
|
|
else if (strcmp (argv[argi], "--version") == 0)
|
|
{
|
|
g_print ("%d.%d.%d\n",
|
|
GIMP_MAJOR_VERSION, GIMP_MINOR_VERSION, GIMP_MICRO_VERSION);
|
|
exit (EXIT_SUCCESS);
|
|
}
|
|
else if (strcmp (argv[argi], "-n") == 0 ||
|
|
strcmp (argv[argi], "--just-print") == 0 ||
|
|
strcmp (argv[argi], "--dry-run") == 0 ||
|
|
strcmp (argv[argi], "--recon") == 0)
|
|
; /* Already handled */
|
|
else if (strcmp (argv[argi], "--includedir") == 0)
|
|
do_includedir ();
|
|
else if (strcmp (argv[argi], "--cflags") == 0)
|
|
do_cflags ();
|
|
else if (strcmp (argv[argi], "--cflags-noui") == 0)
|
|
do_cflags_noui ();
|
|
else if (strcmp (argv[argi], "--cflags-nogimpui") == 0)
|
|
do_cflags_nogimpui ();
|
|
else if (strcmp (argv[argi], "--libs") == 0)
|
|
do_libs ();
|
|
else if (strcmp (argv[argi], "--libs-noui") == 0)
|
|
do_libs_noui ();
|
|
else if (strcmp (argv[argi], "--libs-nogimpui") == 0)
|
|
do_libs_nogimpui ();
|
|
else if (g_str_has_prefix (argv[argi], "--prefix="))
|
|
;
|
|
else if (g_str_has_prefix (argv[argi], "--exec-prefix="))
|
|
;
|
|
else if (strcmp (argv[argi], "--msvc-syntax") == 0)
|
|
;
|
|
else if (strcmp (argv[argi], "--build") == 0)
|
|
do_build (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--build-noui") == 0)
|
|
do_build_noui (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--build-nogimpui") == 0)
|
|
do_build_nogimpui (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--install") == 0)
|
|
do_install (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--install-noui") == 0)
|
|
do_install_noui (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--install-nogimpui") == 0)
|
|
do_install_nogimpui (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--install-admin") == 0)
|
|
do_install_admin (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--install-admin-noui") == 0)
|
|
do_install_admin_noui (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--install-admin-nogimpui") == 0)
|
|
do_install_admin_nogimpui (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--install-bin") == 0)
|
|
do_install_bin (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--install-admin-bin") == 0)
|
|
do_install_admin_bin (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--uninstall-bin") == 0)
|
|
do_uninstall_bin (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--uninstall-admin-bin") == 0)
|
|
do_uninstall_admin_bin (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--install-script") == 0)
|
|
do_install_script (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--install-admin-script") == 0)
|
|
do_install_admin_script (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--uninstall-script") == 0)
|
|
do_uninstall_script (argv[++argi]);
|
|
else if (strcmp (argv[argi], "--uninstall-admin-script") == 0)
|
|
do_uninstall_admin_script (argv[++argi]);
|
|
else
|
|
{
|
|
g_printerr ("Unrecognized switch %s\n", argv[argi]);
|
|
usage (EXIT_FAILURE);
|
|
}
|
|
}
|
|
|
|
exit (EXIT_SUCCESS);
|
|
}
|
|
/*
|
|
* Local Variables:
|
|
* mode: c
|
|
* End:
|
|
*/
|