dmbcs/mcron
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

maint: Reformat copyright notices and copying permission statements.

Browse source
This commit is contained in:
Mathieu Lirzin 2016-07-18 17:25:27 +02:00
commit 2cdd544a56
No known key found for this signature in database
GPG key ID: 0ADEE10094604D37
11 changed files with 215 additions and 212 deletions
Download patch file Download diff file Expand all files Collapse all files

13
Makefile.am
View file

@ -1,20 +1,21 @@
## Process this file with automake to produce Makefile.in. ## Process this file with automake to produce Makefile.in.
# Copyright © 2003 Dale Mellor <dale_mellor@users.sourceforge.net>
# Copyright (C) 2003 Dale Mellor # Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org>
# Copyright (C) 2015, 2016 Mathieu Lirzin
# #
# This program is free software: you can redistribute it and/or modify # This file is part of GNU Mcron.
#
# GNU Mcron is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by # it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or # the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version. # (at your option) any later version.
# #
# This program is distributed in the hope that it will be useful, # GNU Mcron is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of # but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details. # GNU General Public License for more details.
# #
# You should have received a copy of the GNU General Public License # You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>. # along with GNU Mcron. If not, see <http://www.gnu.org/licenses/>.
bin_PROGRAMS = mcron crontab bin_PROGRAMS = mcron crontab
sbin_PROGRAMS = cron sbin_PROGRAMS = cron

33
configure.ac
View file

@ -1,25 +1,22 @@
# -*- Autoconf -*- ## Process this file with autoconf to produce a configure script.
# Process this file with autoconf to produce a configure script. # Copyright © 2003, 2005, 2012, 2014 Dale Mellor
# <dale_mellor@users.sourceforge.net>
# Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org>
# Copyright (C) 2003, 2005, 2012, 2014 Dale Mellor
# Copyright (C) 2015, 2016 Mathieu Lirzin
# #
# This file is part of GNU mcron. # This file is part of GNU Mcron.
# #
# GNU mcron is free software: you can redistribute it and/or modify it under # GNU Mcron is free software: you can redistribute it and/or modify
# the terms of the GNU General Public License as published by the Free # it under the terms of the GNU General Public License as published by
# Software Foundation, either version 3 of the License, or (at your option) # the Free Software Foundation, either version 3 of the License, or
# any later version. # (at your option) any later version.
# #
# GNU mcron is distributed in the hope that it will be useful, but WITHOUT # GNU Mcron is distributed in the hope that it will be useful,
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or # but WITHOUT ANY WARRANTY; without even the implied warranty of
# FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# more details. # GNU General Public License for more details.
# #
# You should have received a copy of the GNU General Public License along # You should have received a copy of the GNU General Public License
# with GNU mcron. If not, see <http://www.gnu.org/licenses/>. # along with GNU Mcron. If not, see <http://www.gnu.org/licenses/>.
AC_PREREQ(2.61) AC_PREREQ(2.61)
AC_INIT([GNU Mcron], [1.0.8], [bug-mcron@gnu.org]) AC_INIT([GNU Mcron], [1.0.8], [bug-mcron@gnu.org])

39
src/mcron/base.scm
View file

@ -1,23 +1,22 @@
;; Copyright (C) 2016 Ludovic Courtès ;;;; base.scm -- core procedures
;; Copyright (C) 2015, 2016 Mathieu Lirzin ;;; Copyright © 2003 Dale Mellor <dale_mellor@users.sourceforge.net>
;; Copyright (C) 2003 Dale Mellor ;;; Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org>
;; ;;; Copyright © 2016 Ludovic Courtès <ludo@gnu.org>
;; This file is part of GNU mcron. ;;;
;; ;;; This file is part of GNU Mcron.
;; GNU mcron 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 ;;; GNU Mcron is free software: you can redistribute it and/or modify
;; Software Foundation, either version 3 of the License, or (at your option) ;;; it under the terms of the GNU General Public License as published by
;; any later version. ;;; the Free Software Foundation, either version 3 of the License, or
;; ;;; (at your option) any later version.
;; GNU mcron is distributed in the hope that it will be useful, but WITHOUT ;;;
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or ;;; GNU Mcron is distributed in the hope that it will be useful,
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; more details. ;;; 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 GNU mcron. If not, see <http://www.gnu.org/licenses/>. ;;; You should have received a copy of the GNU General Public License
;;; along with GNU Mcron. If not, see <http://www.gnu.org/licenses/>.
(define-module (mcron base) (define-module (mcron base)
#:use-module (ice-9 match) #:use-module (ice-9 match)

40
src/mcron/config.scm.in
View file

@ -1,25 +1,21 @@
;; -*-scheme-*- ;;;; config.scm -- variables defined at configure time
;;; Copyright © 2003 Dale Mellor <dale_mellor@users.sourceforge.net>
;; Copyright (C) 2015 Mathieu Lirzin ;;; Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org>
;; Copyright (C) 2003 Dale Mellor ;;;
;; ;;; This file is part of GNU Mcron.
;; This file is part of GNU mcron. ;;;
;; ;;; GNU Mcron is free software: you can redistribute it and/or modify
;; GNU mcron is free software: you can redistribute it and/or modify it under ;;; it under the terms of the GNU General Public License as published by
;; the terms of the GNU General Public License as published by the Free ;;; the Free Software Foundation, either version 3 of the License, or
;; Software Foundation, either version 3 of the License, or (at your option) ;;; (at your option) any later version.
;; any later version. ;;;
;; ;;; GNU Mcron is distributed in the hope that it will be useful,
;; GNU mcron is distributed in the hope that it will be useful, but WITHOUT ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for ;;; GNU General Public License for more details.
;; more details. ;;;
;; ;;; You should have received a copy of the GNU General Public License
;; You should have received a copy of the GNU General Public License along ;;; along with GNU Mcron. If not, see <http://www.gnu.org/licenses/>.
;; with GNU mcron. If not, see <http://www.gnu.org/licenses/>.
;; Some constants set by the configuration process.
(define-module (mcron config)) (define-module (mcron config))

62
src/mcron/environment.scm
View file

@ -1,35 +1,35 @@
;; Copyright (C) 2015, 2016 Mathieu Lirzin ;;;; environment.scm -- interact with the job process environment
;; Copyright (C) 2003 Dale Mellor ;;; Copyright © 2003 Dale Mellor <dale_mellor@users.sourceforge.net>
;; ;;; Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org>
;; This file is part of GNU mcron. ;;;
;; ;;; This file is part of GNU Mcron.
;; GNU mcron 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 ;;; GNU Mcron is free software: you can redistribute it and/or modify
;; Software Foundation, either version 3 of the License, or (at your option) ;;; it under the terms of the GNU General Public License as published by
;; any later version. ;;; the Free Software Foundation, either version 3 of the License, or
;; ;;; (at your option) any later version.
;; GNU mcron is distributed in the hope that it will be useful, but WITHOUT ;;;
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or ;;; GNU Mcron is distributed in the hope that it will be useful,
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; more details. ;;; 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 GNU mcron. If not, see <http://www.gnu.org/licenses/>. ;;; You should have received a copy of the GNU General Public License
;;; along with GNU Mcron. If not, see <http://www.gnu.org/licenses/>.
;; This file defines the variable current-environment-mods, and the procedures
;; append-environment-mods (which is available to user configuration files),
;; clear-environment-mods and modify-environment. The idea is that the
;; current-environment-mods is a list of pairs of environment names and values,
;; and represents the cumulated environment settings in a configuration
;; file. When a job definition is seen in a configuration file, the
;; current-environment-mods are copied into the internal job description, and
;; when the job actually runs these environment modifications are applied to
;; the UNIX environment in which the job runs.
;;;; Commentary:
;;;
;;; Define the variable current-environment-mods, and the procedures
;;; append-environment-mods (which is available to user configuration files),
;;; clear-environment-mods and modify-environment. The idea is that the
;;; current-environment-mods is a list of pairs of environment names and
;;; values, and represents the cumulated environment settings in a
;;; configuration file. When a job definition is seen in a configuration file,
;;; the current-environment-mods are copied into the internal job description,
;;; and when the job actually runs these environment modifications are applied
;;; to the UNIX environment in which the job runs.
;;;
;;;; Code:
(define-module (mcron environment) (define-module (mcron environment)
#:export (modify-environment #:export (modify-environment

50
src/mcron/job-specifier.scm
View file

@ -1,28 +1,30 @@
;; Copyright (C) 2003 Dale Mellor ;;;; job-specifier.scm -- public interface for defining jobs
;; Copyright (C) 2016 Mathieu Lirzin ;;; Copyright © 2003 Dale Mellor <dale_mellor@users.sourceforge.net>
;; ;;; Copyright © 2016 Mathieu Lirzin <mthl@gnu.org>
;; This file is part of GNU mcron. ;;;
;; ;;; This file is part of GNU Mcron.
;; GNU mcron 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 ;;; GNU Mcron is free software: you can redistribute it and/or modify
;; Software Foundation, either version 3 of the License, or (at your option) ;;; it under the terms of the GNU General Public License as published by
;; any later version. ;;; the Free Software Foundation, either version 3 of the License, or
;; ;;; (at your option) any later version.
;; GNU mcron is distributed in the hope that it will be useful, but WITHOUT ;;;
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or ;;; GNU Mcron is distributed in the hope that it will be useful,
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; more details. ;;; 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 GNU mcron. If not, see <http://www.gnu.org/licenses/>. ;;; You should have received a copy of the GNU General Public License
;;; along with GNU Mcron. If not, see <http://www.gnu.org/licenses/>.
;;;; Commentary:
;;;
;; This module defines all the functions that can be used by scheme mcron ;;; Define all the functions that can be used by scheme Mcron configuration
;; configuration files, namely the procedures for working out next times, the ;;; files, namely the procedures for working out next times, the job procedure
;; job procedure for registering new jobs (actually a wrapper around the ;;; for registering new jobs (actually a wrapper around the base add-job
;; base add-job function), and the procedure for declaring environment ;;; function), and the procedure for declaring environment modifications.
;; modifications. ;;;
;;;; Code:
(define-module (mcron job-specifier) (define-module (mcron job-specifier)
#:use-module (ice-9 match) #:use-module (ice-9 match)

35
src/mcron/main.scm
View file

@ -1,20 +1,21 @@
;; Copyright (C) 2015, 2016 Mathieu Lirzin ;;; main.scm -- helper procedures
;; Copyright (C) 2003, 2012 Dale Mellor ;;; Copyright © 2003, 2012 Dale Mellor <dale_mellor@users.sourceforge.net>
;; ;;; Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org>
;; This file is part of GNU mcron. ;;;
;; ;;; This file is part of GNU Mcron.
;; GNU mcron 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 ;;; GNU Mcron is free software: you can redistribute it and/or modify
;; Software Foundation, either version 3 of the License, or (at your option) ;;; it under the terms of the GNU General Public License as published by
;; any later version. ;;; the Free Software Foundation, either version 3 of the License, or
;; ;;; (at your option) any later version.
;; GNU mcron is distributed in the hope that it will be useful, but WITHOUT ;;;
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or ;;; GNU Mcron is distributed in the hope that it will be useful,
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; more details. ;;; 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 GNU mcron. If not, see <http://www.gnu.org/licenses/>. ;;; You should have received a copy of the GNU General Public License
;;; along with GNU Mcron. If not, see <http://www.gnu.org/licenses/>.
(define-module (mcron main) (define-module (mcron main)
#:use-module (ice-9 getopt-long) #:use-module (ice-9 getopt-long)

61
src/mcron/redirect.scm
View file

@ -1,33 +1,36 @@
;; Copyright (C) 2003 Dale Mellor ;;;; redirect.scm -- modify job outputs
;; ;;; Copyright © 2003 Dale Mellor <dale_mellor@users.sourceforge.net>
;; This file is part of GNU mcron. ;;;
;; ;;; This file is part of GNU Mcron.
;; GNU mcron 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 ;;; GNU Mcron is free software: you can redistribute it and/or modify
;; Software Foundation, either version 3 of the License, or (at your option) ;;; it under the terms of the GNU General Public License as published by
;; any later version. ;;; the Free Software Foundation, either version 3 of the License, or
;; ;;; (at your option) any later version.
;; GNU mcron is distributed in the hope that it will be useful, but WITHOUT ;;;
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or ;;; GNU Mcron is distributed in the hope that it will be useful,
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; more details. ;;; 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 GNU mcron. If not, see <http://www.gnu.org/licenses/>. ;;; You should have received a copy of the GNU General Public License
;;; along with GNU Mcron. If not, see <http://www.gnu.org/licenses/>.
;;;; Commentary:
;;;
;; This module provides the (with-mail-out action . user) procedure. This ;;; Provide the (with-mail-out action . user) procedure. This procedure runs
;; procedure runs the action in a child process, allowing the user control over ;;; the action in a child process, allowing the user control over the input
;; the input and output (including standard error). The input is governed (only ;;; and output (including standard error). The input is governed (only in the
;; in the case of a string action) by the placing of percentage signs in the ;;; case of a string action) by the placing of percentage signs in the string;
;; string; the first delimits the true action from the standard input, and ;;; the first delimits the true action from the standard input, and subsequent
;; subsequent ones denote newlines to be placed into the input. The output (if ;;; ones denote newlines to be placed into the input. The output (if there
;; there actually is any) is controlled by the MAILTO environment variable. If ;;; actually is any) is controlled by the MAILTO environment variable. If
;; this is not defined, output is e-mailed to the user passed as argument, if ;;; this is not defined, output is e-mailed to the user passed as argument, if
;; any, or else the owner of the action; if defined but empty then any output is ;;; any, or else the owner of the action; if defined but empty then any output
;; sunk to /dev/null; otherwise output is e-mailed to the address held in the ;;; is sunk to /dev/null; otherwise output is e-mailed to the address held in
;; MAILTO variable. ;;; the MAILTO variable.
;;;
;;;; Code:
(define-module (mcron redirect) (define-module (mcron redirect)
#:export (with-mail-out) #:export (with-mail-out)

49
src/mcron/vixie-specification.scm
View file

@ -1,27 +1,30 @@
;; Copyright (C) 2003 Dale Mellor ;;;; vixie-specification.scm -- read Vixie-sytle configuration file
;; ;;; Copyright © 2003 Dale Mellor <dale_mellor@users.sourceforge.net>
;; This file is part of GNU mcron. ;;;
;; ;;; This file is part of GNU Mcron.
;; GNU mcron 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 ;;; GNU Mcron is free software: you can redistribute it and/or modify
;; Software Foundation, either version 3 of the License, or (at your option) ;;; it under the terms of the GNU General Public License as published by
;; any later version. ;;; the Free Software Foundation, either version 3 of the License, or
;; ;;; (at your option) any later version.
;; GNU mcron is distributed in the hope that it will be useful, but WITHOUT ;;;
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or ;;; GNU Mcron is distributed in the hope that it will be useful,
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; more details. ;;; 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 GNU mcron. If not, see <http://www.gnu.org/licenses/>. ;;; You should have received a copy of the GNU General Public License
;;; along with GNU Mcron. If not, see <http://www.gnu.org/licenses/>.
;;;; Commentary:
;;;
;; This file provides methods for reading a complete Vixie-style configuration ;;; Methods for reading a complete Vixie-style configuration file, either from
;; file, either from a real file or an already opened port. It also exposes the ;;; a real file or an already opened port. It also exposes the method for
;; method for parsing the time-specification part of a Vixie string, so that ;;; parsing the time-specification part of a Vixie string, so that these can
;; these can be used to form the next-time-function of a job in a Guile ;;; be used to form the next-time-function of a job in a Guile configuration
;; configuration file. ;;; file.
;;;
;;;; Code:
(define-module (mcron vixie-specification) (define-module (mcron vixie-specification)
#:export (parse-user-vixie-line #:export (parse-user-vixie-line

33
src/mcron/vixie-time.scm
View file

@ -1,19 +1,20 @@
;; Copyright (C) 2003 Dale Mellor ;;;; vixie-time.scm -- parse Vixie-style times
;; ;;; Copyright © 2003 Dale Mellor <dale_mellor@users.sourceforge.net>
;; This file is part of GNU mcron. ;;;
;; ;;; This file is part of GNU Mcron.
;; GNU mcron 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 ;;; GNU Mcron is free software: you can redistribute it and/or modify
;; Software Foundation, either version 3 of the License, or (at your option) ;;; it under the terms of the GNU General Public License as published by
;; any later version. ;;; the Free Software Foundation, either version 3 of the License, or
;; ;;; (at your option) any later version.
;; GNU mcron is distributed in the hope that it will be useful, but WITHOUT ;;;
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or ;;; GNU Mcron is distributed in the hope that it will be useful,
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; more details. ;;; 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 GNU mcron. If not, see <http://www.gnu.org/licenses/>. ;;; You should have received a copy of the GNU General Public License
;;; along with GNU Mcron. If not, see <http://www.gnu.org/licenses/>.
(define-module (mcron vixie-time) (define-module (mcron vixie-time)
#:use-module (ice-9 regex) #:use-module (ice-9 regex)

4
src/wrapper.c
View file

@ -1,6 +1,6 @@
/* wrapper.c -- C code booting Guile /* wrapper.c -- C code booting Guile
Copyright (C) 2003, 2014 Dale Mellor Copyright © 2003, 2014 Dale Mellor <dale_mellor@users.sourceforge.net>
Copyright (C) 2015, 2016 Mathieu Lirzin Copyright © 2015, 2016 Mathieu Lirzin <mthl@gnu.org>
This file is part of GNU Mcron. This file is part of GNU Mcron.