src/analyze/analyze-verify.c - systemd-stable - Rivoreo Source Code Repositories

 /***
   This file is part of systemd.

   Copyright 2014 Zbigniew Jędrzejewski-Szmek

   systemd is free software; you can redistribute it and/or modify it
   under the terms of the GNU Lesser General Public License as published by
   the Free Software Foundation; either version 2.1 of the License, or
   (at your option) any later version.

   systemd 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
   Lesser General Public License for more details.

   You should have received a copy of the GNU Lesser General Public License
   along with systemd; If not, see <http://www.gnu.org/licenses/>.
 ***/

 #include <stdlib.h>

 #include "alloc-util.h"
 #include "analyze-verify.h"
 #include "bus-error.h"
 #include "bus-util.h"
 #include "log.h"
 #include "manager.h"
 #include "pager.h"
 #include "path-util.h"
 #include "strv.h"
 #include "unit-name.h"

 static int prepare_filename(const char *filename, char **ret) {
         int r;
         const char *name;
         _cleanup_free_ char *abspath = NULL;
         _cleanup_free_ char *dir = NULL;
         _cleanup_free_ char *with_instance = NULL;
         char *c;

         assert(filename);
         assert(ret);

         r = path_make_absolute_cwd(filename, &abspath);
         if (r < 0)
                 return r;

         name = basename(abspath);
         if (!unit_name_is_valid(name, UNIT_NAME_ANY))
                 return -EINVAL;

         if (unit_name_is_valid(name, UNIT_NAME_TEMPLATE)) {
                 r = unit_name_replace_instance(name, "i", &with_instance);
                 if (r < 0)
                         return r;
         }

         dir = dirname_malloc(abspath);
         if (!dir)
                 return -ENOMEM;

         if (with_instance)
                 c = path_join(NULL, dir, with_instance);
         else
                 c = path_join(NULL, dir, name);
         if (!c)
                 return -ENOMEM;

         *ret = c;
         return 0;
 }

 static int generate_path(char **var, char **filenames) {
         char **filename;

         _cleanup_strv_free_ char **ans = NULL;
         int r;

         STRV_FOREACH(filename, filenames) {
                 char *t;

                 t = dirname_malloc(*filename);
                 if (!t)
                         return -ENOMEM;

                 r = strv_consume(&ans, t);
                 if (r < 0)
                         return r;
         }

         assert_se(strv_uniq(ans));

         r = strv_extend(&ans, "");
         if (r < 0)
                 return r;

         *var = strv_join(ans, ":");
         if (!*var)
                 return -ENOMEM;

         return 0;
 }

 static int verify_socket(Unit *u) {
         int r;

         assert(u);

         if (u->type != UNIT_SOCKET)
                 return 0;

         /* Cannot run this without the service being around */

         /* This makes sure instance is created if necessary. */
         r = socket_instantiate_service(SOCKET(u));
         if (r < 0) {
                 log_unit_error_errno(u, r, "Socket cannot be started, failed to create instance: %m");
                 return r;
         }

         /* This checks both type of sockets */
         if (UNIT_ISSET(SOCKET(u)->service)) {
                 Service *service;

                 service = SERVICE(UNIT_DEREF(SOCKET(u)->service));
                 log_unit_debug(u, "Using %s", UNIT(service)->id);

                 if (UNIT(service)->load_state != UNIT_LOADED) {
                         log_unit_error(u, "Service %s not loaded, %s cannot be started.", UNIT(service)->id, u->id);
                         return -ENOENT;
                 }
         }

         return 0;
 }

 static int verify_executable(Unit *u, ExecCommand *exec) {
         if (exec == NULL)
                 return 0;

         if (access(exec->path, X_OK) < 0)
                 return log_unit_error_errno(u, errno, "Command %s is not executable: %m", exec->path);

         return 0;
 }

 static int verify_executables(Unit *u) {
         ExecCommand *exec;
         int r = 0, k;
         unsigned i;

         assert(u);

         exec =  u->type == UNIT_SOCKET ? SOCKET(u)->control_command :
                 u->type == UNIT_MOUNT ? MOUNT(u)->control_command :
                 u->type == UNIT_SWAP ? SWAP(u)->control_command : NULL;
         k = verify_executable(u, exec);
         if (k < 0 && r == 0)
                 r = k;

         if (u->type == UNIT_SERVICE)
                 for (i = 0; i < ELEMENTSOF(SERVICE(u)->exec_command); i++) {
                         k = verify_executable(u, SERVICE(u)->exec_command[i]);
                         if (k < 0 && r == 0)
                                 r = k;
                 }

         if (u->type == UNIT_SOCKET)
                 for (i = 0; i < ELEMENTSOF(SOCKET(u)->exec_command); i++) {
                         k = verify_executable(u, SOCKET(u)->exec_command[i]);
                         if (k < 0 && r == 0)
                                 r = k;
                 }

         return r;
 }

 static int verify_documentation(Unit *u, bool check_man) {
         char **p;
         int r = 0, k;

         STRV_FOREACH(p, u->documentation) {
                 log_unit_debug(u, "Found documentation item: %s", *p);

                 if (check_man && startswith(*p, "man:")) {
                         k = show_man_page(*p + 4, true);
                         if (k != 0) {
                                 if (k < 0)
                                         log_unit_error_errno(u, r, "Can't show %s: %m", *p);
                                 else {
                                         log_unit_error_errno(u, r, "man %s command failed with code %d", *p + 4, k);
                                         k = -ENOEXEC;
                                 }
                                 if (r == 0)
                                         r = k;
                         }
                 }
         }

         /* Check remote URLs? */

         return r;
 }

 static int verify_unit(Unit *u, bool check_man) {
         _cleanup_(sd_bus_error_free) sd_bus_error err = SD_BUS_ERROR_NULL;
         int r, k;

         assert(u);

         if (log_get_max_level() >= LOG_DEBUG)
                 unit_dump(u, stdout, "\t");

         log_unit_debug(u, "Creating %s/start job", u->id);
         r = manager_add_job(u->manager, JOB_START, u, JOB_REPLACE, &err, NULL);
         if (r < 0)
                 log_unit_error_errno(u, r, "Failed to create %s/start: %s", u->id, bus_error_message(&err, r));

         k = verify_socket(u);
         if (k < 0 && r == 0)
                 r = k;

         k = verify_executables(u);
         if (k < 0 && r == 0)
                 r = k;

         k = verify_documentation(u, check_man);
         if (k < 0 && r == 0)
                 r = k;

         return r;
 }

 int verify_units(char **filenames, UnitFileScope scope, bool check_man) {
         _cleanup_(sd_bus_error_free) sd_bus_error err = SD_BUS_ERROR_NULL;
         _cleanup_free_ char *var = NULL;
         Manager *m = NULL;
         FILE *serial = NULL;
         FDSet *fdset = NULL;
         char **filename;
         int r = 0, k;

         Unit *units[strv_length(filenames)];
         int i, count = 0;

         if (strv_isempty(filenames))
                 return 0;

         /* set the path */
         r = generate_path(&var, filenames);
         if (r < 0)
                 return log_error_errno(r, "Failed to generate unit load path: %m");

         assert_se(set_unit_path(var) >= 0);

         r = manager_new(scope, true, &m);
         if (r < 0)
                 return log_error_errno(r, "Failed to initialize manager: %m");

         log_debug("Starting manager...");

         r = manager_startup(m, serial, fdset);
         if (r < 0) {
                 log_error_errno(r, "Failed to start manager: %m");
                 goto finish;
         }

         manager_clear_jobs(m);

         log_debug("Loading remaining units from the command line...");

         STRV_FOREACH(filename, filenames) {
                 _cleanup_free_ char *prepared = NULL;

                 log_debug("Handling %s...", *filename);

                 k = prepare_filename(*filename, &prepared);
                 if (k < 0) {
                         log_error_errno(k, "Failed to prepare filename %s: %m", *filename);
                         if (r == 0)
                                 r = k;
                         continue;
                 }

                 k = manager_load_unit(m, NULL, prepared, &err, &units[count]);
                 if (k < 0) {
                         log_error_errno(k, "Failed to load %s: %m", *filename);
                         if (r == 0)
                                 r = k;
                 } else
                         count++;
         }

         for (i = 0; i < count; i++) {
                 k = verify_unit(units[i], check_man);
                 if (k < 0 && r == 0)
                         r = k;
         }

 finish:
         manager_free(m);

         return r;
 }
	/***
	This file is part of systemd.

	Copyright 2014 Zbigniew Jędrzejewski-Szmek

	systemd is free software; you can redistribute it and/or modify it
	under the terms of the GNU Lesser General Public License as published by
	the Free Software Foundation; either version 2.1 of the License, or
	(at your option) any later version.

	systemd 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
	Lesser General Public License for more details.

	You should have received a copy of the GNU Lesser General Public License
	along with systemd; If not, see <http://www.gnu.org/licenses/>.
	***/

	#include <stdlib.h>

	#include "alloc-util.h"
	#include "analyze-verify.h"
	#include "bus-error.h"
	#include "bus-util.h"
	#include "log.h"
	#include "manager.h"
	#include "pager.h"
	#include "path-util.h"
	#include "strv.h"
	#include "unit-name.h"

	static int prepare_filename(const char filename, char *ret) {
	int r;
	const char *name;
	_cleanup_free_ char *abspath = NULL;
	_cleanup_free_ char *dir = NULL;
	_cleanup_free_ char *with_instance = NULL;
	char *c;

	assert(filename);
	assert(ret);

	r = path_make_absolute_cwd(filename, &abspath);
	if (r < 0)
	return r;

	name = basename(abspath);
	if (!unit_name_is_valid(name, UNIT_NAME_ANY))
	return -EINVAL;

	if (unit_name_is_valid(name, UNIT_NAME_TEMPLATE)) {
	r = unit_name_replace_instance(name, "i", &with_instance);
	if (r < 0)
	return r;
	}

	dir = dirname_malloc(abspath);
	if (!dir)
	return -ENOMEM;

	if (with_instance)
	c = path_join(NULL, dir, with_instance);
	else
	c = path_join(NULL, dir, name);
	if (!c)
	return -ENOMEM;

	*ret = c;
	return 0;
	}

	static int generate_path(char var, char filenames) {
	char **filename;

	_cleanup_strv_free_ char **ans = NULL;
	int r;

	STRV_FOREACH(filename, filenames) {
	char *t;

	t = dirname_malloc(*filename);
	if (!t)
	return -ENOMEM;

	r = strv_consume(&ans, t);
	if (r < 0)
	return r;
	}

	assert_se(strv_uniq(ans));

	r = strv_extend(&ans, "");
	if (r < 0)
	return r;

	*var = strv_join(ans, ":");
	if (!*var)
	return -ENOMEM;

	return 0;
	}

	static int verify_socket(Unit *u) {
	int r;

	assert(u);

	if (u->type != UNIT_SOCKET)
	return 0;

	/* Cannot run this without the service being around */

	/* This makes sure instance is created if necessary. */
	r = socket_instantiate_service(SOCKET(u));
	if (r < 0) {
	log_unit_error_errno(u, r, "Socket cannot be started, failed to create instance: %m");
	return r;
	}

	/* This checks both type of sockets */
	if (UNIT_ISSET(SOCKET(u)->service)) {
	Service *service;

	service = SERVICE(UNIT_DEREF(SOCKET(u)->service));
	log_unit_debug(u, "Using %s", UNIT(service)->id);

	if (UNIT(service)->load_state != UNIT_LOADED) {
	log_unit_error(u, "Service %s not loaded, %s cannot be started.", UNIT(service)->id, u->id);
	return -ENOENT;
	}
	}

	return 0;
	}

	static int verify_executable(Unit u, ExecCommand exec) {
	if (exec == NULL)
	return 0;

	if (access(exec->path, X_OK) < 0)
	return log_unit_error_errno(u, errno, "Command %s is not executable: %m", exec->path);

	return 0;
	}

	static int verify_executables(Unit *u) {
	ExecCommand *exec;
	int r = 0, k;
	unsigned i;

	assert(u);

	exec = u->type == UNIT_SOCKET ? SOCKET(u)->control_command :
	u->type == UNIT_MOUNT ? MOUNT(u)->control_command :
	u->type == UNIT_SWAP ? SWAP(u)->control_command : NULL;
	k = verify_executable(u, exec);
	if (k < 0 && r == 0)
	r = k;

	if (u->type == UNIT_SERVICE)
	for (i = 0; i < ELEMENTSOF(SERVICE(u)->exec_command); i++) {
	k = verify_executable(u, SERVICE(u)->exec_command[i]);
	if (k < 0 && r == 0)
	r = k;
	}

	if (u->type == UNIT_SOCKET)
	for (i = 0; i < ELEMENTSOF(SOCKET(u)->exec_command); i++) {
	k = verify_executable(u, SOCKET(u)->exec_command[i]);
	if (k < 0 && r == 0)
	r = k;
	}

	return r;
	}

	static int verify_documentation(Unit *u, bool check_man) {
	char **p;
	int r = 0, k;

	STRV_FOREACH(p, u->documentation) {
	log_unit_debug(u, "Found documentation item: %s", *p);

	if (check_man && startswith(*p, "man:")) {
	k = show_man_page(*p + 4, true);
	if (k != 0) {
	if (k < 0)
	log_unit_error_errno(u, r, "Can't show %s: %m", *p);
	else {
	log_unit_error_errno(u, r, "man %s command failed with code %d", *p + 4, k);
	k = -ENOEXEC;
	}
	if (r == 0)
	r = k;
	}
	}
	}

	/* Check remote URLs? */

	return r;
	}

	static int verify_unit(Unit *u, bool check_man) {
	_cleanup_(sd_bus_error_free) sd_bus_error err = SD_BUS_ERROR_NULL;
	int r, k;

	assert(u);

	if (log_get_max_level() >= LOG_DEBUG)
	unit_dump(u, stdout, "\t");

	log_unit_debug(u, "Creating %s/start job", u->id);
	r = manager_add_job(u->manager, JOB_START, u, JOB_REPLACE, &err, NULL);
	if (r < 0)
	log_unit_error_errno(u, r, "Failed to create %s/start: %s", u->id, bus_error_message(&err, r));

	k = verify_socket(u);
	if (k < 0 && r == 0)
	r = k;

	k = verify_executables(u);
	if (k < 0 && r == 0)
	r = k;

	k = verify_documentation(u, check_man);
	if (k < 0 && r == 0)
	r = k;

	return r;
	}

	int verify_units(char **filenames, UnitFileScope scope, bool check_man) {
	_cleanup_(sd_bus_error_free) sd_bus_error err = SD_BUS_ERROR_NULL;
	_cleanup_free_ char *var = NULL;
	Manager *m = NULL;
	FILE *serial = NULL;
	FDSet *fdset = NULL;
	char **filename;
	int r = 0, k;

	Unit *units[strv_length(filenames)];
	int i, count = 0;

	if (strv_isempty(filenames))
	return 0;

	/* set the path */
	r = generate_path(&var, filenames);
	if (r < 0)
	return log_error_errno(r, "Failed to generate unit load path: %m");

	assert_se(set_unit_path(var) >= 0);

	r = manager_new(scope, true, &m);
	if (r < 0)
	return log_error_errno(r, "Failed to initialize manager: %m");

	log_debug("Starting manager...");

	r = manager_startup(m, serial, fdset);
	if (r < 0) {
	log_error_errno(r, "Failed to start manager: %m");
	goto finish;
	}

	manager_clear_jobs(m);

	log_debug("Loading remaining units from the command line...");

	STRV_FOREACH(filename, filenames) {
	_cleanup_free_ char *prepared = NULL;

	log_debug("Handling %s...", *filename);

	k = prepare_filename(*filename, &prepared);
	if (k < 0) {
	log_error_errno(k, "Failed to prepare filename %s: %m", *filename);
	if (r == 0)
	r = k;
	continue;
	}

	k = manager_load_unit(m, NULL, prepared, &err, &units[count]);
	if (k < 0) {
	log_error_errno(k, "Failed to load %s: %m", *filename);
	if (r == 0)
	r = k;
	} else
	count++;
	}

	for (i = 0; i < count; i++) {
	k = verify_unit(units[i], check_man);
	if (k < 0 && r == 0)
	r = k;
	}

	finish:
	manager_free(m);

	return r;
	}