diff options
Diffstat (limited to 'px/packages/activitywatch.scm')
| -rw-r--r-- | px/packages/activitywatch.scm | 146 |
1 files changed, 146 insertions, 0 deletions
diff --git a/px/packages/activitywatch.scm b/px/packages/activitywatch.scm new file mode 100644 index 0000000..a4228b0 --- /dev/null +++ b/px/packages/activitywatch.scm @@ -0,0 +1,146 @@ +(define-module (px packages activitywatch) + #:use-module ((guix licenses) #:prefix license:) + #:use-module (guix download) + #:use-module (guix packages) + #:use-module (guix utils) + #:use-module (ice-9 match) + #:use-module (nonguix build-system binary) + #:use-module (gnu packages base) + #:use-module (gnu packages compression) + #:use-module (gnu packages glib) + #:use-module (gnu packages gnome) + #:use-module (gnu packages bash) + #:use-module (gnu packages nss) + #:use-module (gnu packages gtk) + #:use-module (gnu packages fontutils) + #:use-module (gnu packages xorg) + #:use-module (gnu packages xml) + #:use-module (gnu packages xdisorg) + #:use-module (gnu packages gl) + #:use-module (gnu packages linux) + #:use-module (gnu packages cups) + #:use-module (gnu packages gcc)) + +(define* (make-aw-release-asset version asset hash) + (origin + (method url-fetch) + (uri + (string-append + "https://github.com/ActivityWatch/activitywatch/releases/download/v" + version "/" asset "-v" version "-" + (match (or (%current-system) (%current-target-system)) + ("x86_64-linux" "linux-x86_64") + ("i686-linux" "linux-ia32") + ("aarch64-linux" "linux-arm64") + ("armhf-linux" "linux-armv7l")) + ".zip")) + (sha256 + (base32 hash)))) + +(define-public activitywatch + (package + (name "activitywatch") + (version "0.11.0") + (source #f) + (build-system binary-build-system) + (arguments + `(#:patchelf-plan + `(("opt/activitywatch/aw-qt" + ("libxkbcommon" "xkeyboard-config" "libxcb" "glibc" "gcc:lib")) + ("opt/activitywatch/aw-server/aw-server" ("glibc")) + ("opt/activitywatch/aw-server-rust/aw-server-rust" ("glibc")) + ("opt/activitywatch/aw-watcher-afk/aw-watcher-afk" ("glibc")) + ("opt/activitywatch/aw-watcher-window/aw-watcher-window" ("glibc"))) + #:phases + (modify-phases %standard-phases + (replace 'unpack + (lambda* (#:key inputs outputs #:allow-other-keys) + (invoke "unzip" (assoc-ref inputs "activitywatch")) + (mkdir "opt") + (invoke "mv" "activitywatch" "opt/") + (substitute* '("opt/activitywatch/aw-qt.desktop") + (("aw-qt") (string-append %output "/bin/aw-qt"))) + ;; remove for conflicting issue with libpng + (invoke "rm" "opt/activitywatch/libz.so.1") + ;; mv desktop file + (mkdir-p "share/applications/") + (invoke "mv" "opt/activitywatch/aw-qt.desktop" "share/applications/") + ;; + (mkdir-p "share/icons/hicolor/512x512/apps/") + (invoke "cp" "opt/activitywatch/aw-server/aw_server/static/static/logo.png" "share/icons/hicolor/512x512/apps/activitywatch.png") + #t)) + (add-after 'install 'symlink-binary-file-and-cleanup + (lambda* (#:key inputs outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (realexecpath (string-append %output "/opt/activitywatch/aw-qt ")) + (sh_path (string-append %output "/bin/aw-qt")) + (sh_content (string-append "#!" (assoc-ref inputs "bash") "/bin/bash\n" + "export ROCKET_ENV=production\n" + "if [ $# -eq 0 ]; then " + realexecpath "--autostart-modules aw-server-rust,aw-watcher-afk,aw-watcher-window;" + "else " + realexecpath "$@;" + "fi"))) + (invoke "rm" (string-append %output "/environment-variables")) + (mkdir-p (string-append %output "/bin")) + (with-output-to-file sh_path + (lambda _ (format #t sh_content))) + (chmod sh_path #o555)) + #t)) + (add-after 'install 'wrap-where-patchelf-does-not-work + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (wrap-program (string-append out "/opt/activitywatch/aw-qt") + `("QT_XKB_CONFIG_ROOT" ":" + prefix + (,(string-join + (list + (string-append (assoc-ref inputs "xkeyboard-config") "/share/X11/") + out) + ":")))) + (wrap-program (string-append out "/opt/activitywatch/aw-qt") + `("FONTCONFIG_PATH" ":" + prefix + (,(string-join + (list + (string-append (assoc-ref inputs "fontconfig") "/etc/fonts") + out) + ":")))) + (wrap-program (string-append out "/opt/activitywatch/aw-qt") + `("LD_LIBRARY_PATH" ":" + prefix + (,(string-join + (list + (string-append (assoc-ref inputs "mesa") "/lib") + (string-append (assoc-ref inputs "fontconfig") "/lib") + (string-append (assoc-ref inputs "zlib") "/lib") + (string-append (assoc-ref inputs "libxcb") "/lib") + (string-append (assoc-ref inputs "glibc") "/lib") + (string-append (assoc-ref inputs "gcc") "/lib") + (string-append (assoc-ref inputs "freetype") "/lib") + (string-append out "/opt/activitywatch") + out) + ":"))))) + #t))))) + (native-inputs + `(("unzip" ,unzip))) + (inputs + `(("activitywatch" + ,(make-aw-release-asset + version "activitywatch" + "1w62s9y8z6yn2mv55npsg1rfi2az4lim62v4awxwq1xzx4249pi0")) + ("gcc:lib" ,gcc "lib") + ("gcc" ,gcc "lib") + ("glibc" ,glibc) + ("fontconfig" ,fontconfig) + ("freetype" ,freetype) + ("libxcb" ,libxcb) + ("libxkbcommon" ,libxkbcommon) + ("mesa" ,mesa) + ("xkeyboard-config" ,xkeyboard-config) + ("zlib" ,zlib) + ("bash-minimal" ,bash-minimal))) + (home-page "https://activitywatch.net/") + (synopsis "ActivityWatch is an automatic time-tracking software which helps you keep track of what you do.") + (description "ActivityWatch is about recording our digital lives, an evergrowing part of our lives in general, and the new opportunities enabled by such a record.") + (license license:mpl2.0))) |