diff options
Diffstat (limited to 'kbg/services/mcron.scm')
-rw-r--r-- | kbg/services/mcron.scm | 61 |
1 files changed, 0 insertions, 61 deletions
diff --git a/kbg/services/mcron.scm b/kbg/services/mcron.scm deleted file mode 100644 index 4b5af849..00000000 --- a/kbg/services/mcron.scm +++ /dev/null @@ -1,61 +0,0 @@ -(define-module (kbg services mcron) - #:use-module (kbg) - #:use-module (kbg private-data) - #:use-module (guix gexp) - #:use-module (gnu) - #:use-module (gnu home) - #:use-module (gnu home services) - #:use-module (gnu home services mcron) - #:use-module (gnu services) - #:use-module (gnu packages) - #:use-module (gnu packages backup) - #:use-module (gnu packages guile-xyz) - #:use-module (mcron base) - #:use-module (mcron job-specifier) - #:export (mcron-service)) - -(define borg-backup-job - #~(job "0 * 0 0 0" - (lambda () - (system (string-append borg "/bin/borg") - "create" - "--stats" - "--progress" - "--show-rc" - "--compression lz4" - "--exclude-caches" - "--exclude 'node_modules'" - "--exclude '/home/*/.cache/*'" - "--exclude '/home/*/tmp/*'" - "--exclude '/home/*/guixtest/*'" - "--exclude '/home/*/.var/*'" - "--exclude '/home/*/.config/Element/*'" - "--exclude '/home/*/.config/Signal/*'" - "--exclude '/home/*/.config/Slack/*'" - "--exclude '/home/*/.local/share/Zeal/*'" - "--remote-ratelimit 2048" - (string-append %borg-repository "::$(hostname)-$(uuidgen --time)" - "/home/kb/"))) - "Borg Backup Creation")) - -(define borg-backup-prune-job - #~(job "10 * 0 0 0" - (lambda () - (system (string-append borg "/bin/borg") - "prune" - "--stats" - "--progress" - "--show-rc" - "--keep-hourly=24" - "--keep-daily=7" - "--keep-weakly=4" - "--keep-monthly=6" - "--keep-yearly=2" - "--prefix=$(hostname)" - %borg-repository)) - "Borg Backup Pruning")) - -(define mcron-service - (list (simple-service 'home-mcron - home-mcron-service-type - (list borg-backup-job borg-backup-prune-job)))) |