sqrtminusone/channel-q
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/channel-q.git synced 2025-12-10 11:43:03 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix(osync): remove iputils

Browse source
This commit is contained in:
Pavel Korytov 2022-01-09 19:00:23 +03:00
parent 79f2528a97
commit 7f23fe0e17
1 changed files with 52 additions and 51 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

103
osync.scm
View file

@ -13,54 +13,55 @@
(define-public osync (define-public osync
(package (package
(name "osync") (name "osync")
(version "1.3-beta3") (version "1.3-beta3")
(source (source
(origin (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/deajan/osync/") (url "https://github.com/deajan/osync/")
(commit (string-append "v" version)))) (commit (string-append "v" version))))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "1zpxypgfj6sr87wq6s237fr2pxkncjb0w9hq14zfjppkvws66n0w")))) (base32 "1zpxypgfj6sr87wq6s237fr2pxkncjb0w9hq14zfjppkvws66n0w"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f `(#:tests? #f
#:validate-runpath? #f #:validate-runpath? #f
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'patch-file-names (add-after 'unpack 'patch-file-names
(lambda _ (lambda _
;; Silence beta warining. Otherwise the exitcode is not zero ;; Silence beta warining. Otherwise the exitcode is not zero
(substitute* "osync.sh" (("IS_STABLE=false") "IS_STABLE=true")))) (substitute* "osync.sh" (("IS_STABLE=false") "IS_STABLE=true"))))
(delete 'bootstrap) (delete 'bootstrap)
(delete 'configure) (delete 'configure)
(delete 'build) (delete 'build)
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((out (string-append (assoc-ref outputs "out")))) (let ((out (string-append (assoc-ref outputs "out"))))
;; Use system* because installer returns exitcode 2 because it doesn't find systemd or initrc ;; Use system* because installer returns exitcode 2 because it doesn't find systemd or initrc
(system* "./install.sh" (string-append "--prefix=" out) "--no-stats") (system* "./install.sh" (string-append "--prefix=" out) "--no-stats")
(mkdir (string-append out "/bin")) (mkdir (string-append out "/bin"))
(symlink (string-append out "/usr/local/bin/osync.sh") (symlink (string-append out "/usr/local/bin/osync.sh")
(string-append out "/bin/osync.sh")) (string-append out "/bin/osync.sh"))
(symlink (string-append out "/usr/local/bin/osync-batch.sh") (symlink (string-append out "/usr/local/bin/osync-batch.sh")
(string-append out "/bin/osync-batch.sh")) (string-append out "/bin/osync-batch.sh"))
(symlink (string-append out "/usr/local/bin/ssh-filter.sh") (symlink (string-append out "/usr/local/bin/ssh-filter.sh")
(string-append out "/bin/ssh-filter.sh")) (string-append out "/bin/ssh-filter.sh"))
#t)))))) #t))))))
;; TODO replace the executables with full paths
;; TODO replace the executables with full paths ;; XXX Can't put "iputils" in propagated-inputs because on Guix
(propagated-inputs ;; "ping" is in setuid-programs. Set "REMOTE_HOST_PING" to false if ping
`(("rsync" ,rsync) ;; is not available.
("gawk" ,gawk) (propagated-inputs
("iputils" ,iputils) `(("rsync" ,rsync)
("coreutils" ,coreutils) ("gawk" ,gawk)
("openssh" ,openssh) ("coreutils" ,coreutils)
("gzip" ,gzip) ("openssh" ,openssh)
("hostname" ,inetutils))) ("gzip" ,gzip)
(synopsis "A robust two way (bidirectional) file sync script based on rsync with fault tolerance, POSIX ACL support, time control and near realtime sync") ("hostname" ,inetutils)))
(home-page "http://www.netpower.fr/osync") (synopsis "A robust two way (bidirectional) file sync script based on rsync with fault tolerance, POSIX ACL support, time control and near realtime sync")
(license licenses:bsd-3) (home-page "http://www.netpower.fr/osync")
(description "A two way filesync script running on bash Linux, BSD, Android, MacOSX, Cygwin, MSYS2, Win10 bash and virtually any system supporting bash). File synchronization is bidirectional, and can be run manually, as scheduled task, or triggered on file changes in daemon mode. It is a command line tool rsync wrapper with a lot of additional features baked in."))) (license licenses:bsd-3)
(description "A two way filesync script running on bash Linux, BSD, Android, MacOSX, Cygwin, MSYS2, Win10 bash and virtually any system supporting bash). File synchronization is bidirectional, and can be run manually, as scheduled task, or triggered on file changes in daemon mode. It is a command line tool rsync wrapper with a lot of additional features baked in.")))