10 files changed, 192 insertions, 0 deletions

diff --git a/accounts/gkleen@sif/xmobar/default.nix b/accounts/gkleen@sif/xmobar/default.nix
new file mode 100644
index 00000000..fcac5e60
--- /dev/null
+++ b/accounts/gkleen@sif/xmobar/default.nix
@@ -0,0 +1,7 @@
+argumentPackages@{ ... }:
+
+let
+  # defaultPackages = (import ./stackage.nix {});
+  # haskellPackages = defaultPackages // argumentPackages;
+  haskellPackages = argumentPackages;
+in haskellPackages.callPackage ./xmobar-yggdrasil.nix {}
diff --git a/accounts/gkleen@sif/xmobar/nixpkgs.nix b/accounts/gkleen@sif/xmobar/nixpkgs.nix
new file mode 100644
index 00000000..783ede00
--- /dev/null
+++ b/accounts/gkleen@sif/xmobar/nixpkgs.nix
@@ -0,0 +1,9 @@
+{ nixpkgs ? import <nixpkgs>
+}:
+
+import ((nixpkgs {}).fetchFromGitHub {
+  owner = "NixOS";
+  repo = "nixpkgs";
+  rev = "10e61bf5be57736035ec7a804cb0bf3d083bf2cf";
+  sha256 = "0fplfm2zx4vk7gs8bdcxnvzkdmpx2w0llqwf8475z9dz9cl132rm";
+})
diff --git a/accounts/gkleen@sif/xmobar/package.yaml b/accounts/gkleen@sif/xmobar/package.yaml
new file mode 100644
index 00000000..b638b6ac
--- /dev/null
+++ b/accounts/gkleen@sif/xmobar/package.yaml
@@ -0,0 +1,13 @@
+name: xmobar-yggdrasil
+
+executables:
+  xmobar:
+    dependencies:
+      - base
+      - xmobar
+
+    main: xmobar.hs
+    source-dirs:
+      - .
+
+    ghc-options: -threaded
diff --git a/accounts/gkleen@sif/xmobar/shell.nix b/accounts/gkleen@sif/xmobar/shell.nix
new file mode 100644
index 00000000..16beb322
--- /dev/null
+++ b/accounts/gkleen@sif/xmobar/shell.nix
@@ -0,0 +1,28 @@
+{ nixpkgs ? import ./nixpkgs.nix {} }:
+
+let
+  inherit (nixpkgs {}) pkgs;
+  haskellPackages = import ./stackage.nix { inherit nixpkgs; };
+
+  drv = haskellPackages.callPackage ./xmobar-yggdrasil.nix {};
+  override = oldAttrs: {
+    nativeBuildInputs = oldAttrs.nativeBuildInputs ++ (with pkgs; []) ++ (with haskellPackages; [ stack cabal-install cabal2nix ]);
+    shellHook = ''
+      export PROMPT_INFO="${oldAttrs.name}"
+
+      if [ -n "$ZSH_VERSION" ]; then
+        autoload -U +X compinit && compinit
+        autoload -U +X bashcompinit && bashcompinit
+      fi
+      eval "$(stack --bash-completion-script stack)"
+
+      ${oldAttrs.shellHook}
+    '';
+  };
+
+  dummy = pkgs.stdenv.mkDerivation {
+    name = "interactive-xmobar-environment";
+    shellHook = "";
+  };
+in pkgs.lib.overrideDerivation dummy override
+  #pkgs.lib.overrideDerivation drv.env override
diff --git a/accounts/gkleen@sif/xmobar/stack.nix b/accounts/gkleen@sif/xmobar/stack.nix
new file mode 100644
index 00000000..17a49e04
--- /dev/null
+++ b/accounts/gkleen@sif/xmobar/stack.nix
@@ -0,0 +1,17 @@
+{ ghc, nixpkgs ? import ./nixpkgs.nix {} }:
+
+let
+  haskellPackages = import ./stackage.nix { inherit nixpkgs; };
+  inherit (nixpkgs {}) pkgs;
+in pkgs.haskell.lib.buildStackProject {
+  inherit ghc;
+  inherit (haskellPackages) stack;
+  name = "stackenv";
+  buildInputs = (with pkgs;
+    [ xorg.libX11 xorg.libXrandr xorg.libXinerama xorg.libXScrnSaver xorg.libXext xorg.libXft
+      cairo
+      glib
+    ]) ++ (with haskellPackages;
+    [ 
+    ]);
+}
diff --git a/accounts/gkleen@sif/xmobar/stack.yaml b/accounts/gkleen@sif/xmobar/stack.yaml
new file mode 100644
index 00000000..b8ed1147
--- /dev/null
+++ b/accounts/gkleen@sif/xmobar/stack.yaml
@@ -0,0 +1,10 @@
+nix:
+  enable: true
+  shell-file: stack.nix
+
+resolver: lts-13.21
+
+packages:
+  - .
+
+extra-deps: []
diff --git a/accounts/gkleen@sif/xmobar/stack.yaml.lock b/accounts/gkleen@sif/xmobar/stack.yaml.lock
new file mode 100644
index 00000000..fcc2f5f3
--- /dev/null
+++ b/accounts/gkleen@sif/xmobar/stack.yaml.lock
@@ -0,0 +1,12 @@
+# This file was autogenerated by Stack.
+# You should not edit this file by hand.
+# For more information, please see the documentation at:
+#   https://docs.haskellstack.org/en/stable/lock_files
+
+packages: []
+snapshots:
+- completed:
+    size: 498180
+    url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/13/21.yaml
+    sha256: eff2de19a6d4691ccbf6edc1fba858f1918683047dce0f09adede874bbd2a8f3
+  original: lts-13.21
diff --git a/accounts/gkleen@sif/xmobar/stackage.nix b/accounts/gkleen@sif/xmobar/stackage.nix
new file mode 100644
index 00000000..c162ca2c
--- /dev/null
+++ b/accounts/gkleen@sif/xmobar/stackage.nix
@@ -0,0 +1,31 @@
+{ nixpkgs ? import ./nixpkgs.nix {}
+, snapshot ? "lts-13.21"
+}:
+
+let
+  stackage = import (fetchTarball {
+    url = "https://stackage.serokell.io/zb36jsy3r5h4ydz0pnp00g9vk94dvv03-stackage/default.nix.tar.gz";
+    sha256 = "0h6f80gds0ds77y51hhiadh2h2k8njqq8n0gayp729ana9m9agma";
+  });
+
+  overlays =
+    [ stackage."${snapshot}"
+      (self: super: {
+          haskell = super.haskell // {
+            packages = super.haskell.packages // {
+              "${snapshot}" = super.haskell.packages."${snapshot}".override {
+                overrides = hself: hsuper: {
+                  zip-archive = self.haskell.lib.overrideCabal hsuper.zip-archive (old: {
+                    testToolDepends = old.testToolDepends ++ (with self; [ unzip which ]);
+                  });
+                  alex = self.haskell.lib.dontCheck hsuper.alex;
+                };
+              };
+            };
+          };
+        }
+      )
+    ];
+
+  inherit (nixpkgs { inherit overlays; }) pkgs;
+in pkgs.haskell.packages."${snapshot}"
diff --git a/accounts/gkleen@sif/xmobar/xmobar-yggdrasil.nix b/accounts/gkleen@sif/xmobar/xmobar-yggdrasil.nix
new file mode 100644
index 00000000..852fb8e5
--- /dev/null
+++ b/accounts/gkleen@sif/xmobar/xmobar-yggdrasil.nix
@@ -0,0 +1,13 @@
+{ mkDerivation, base, hpack, lib, xmobar }:
+mkDerivation {
+  pname = "xmobar-yggdrasil";
+  version = "0.0.0";
+  src = ./.;
+  isLibrary = false;
+  isExecutable = true;
+  libraryToolDepends = [ hpack ];
+  executableHaskellDepends = [ base xmobar ];
+  preConfigure = "hpack";
+  license = "unknown";
+  hydraPlatforms = lib.platforms.none;
+}
diff --git a/accounts/gkleen@sif/xmobar/xmobar.hs b/accounts/gkleen@sif/xmobar/xmobar.hs
new file mode 100644
index 00000000..74ce7347
--- /dev/null
+++ b/accounts/gkleen@sif/xmobar/xmobar.hs
@@ -0,0 +1,52 @@
+import Xmobar
+
+import Data.List (intercalate)
+  
+
+main :: IO ()
+main = xmobar config
+  where
+    config = defaultConfig
+      { font             = "xft:FiraCode Nerd Font Mono:style=Regular:pixelsize=21"
+      , position         = OnScreen 0 $ TopP 0 307
+      , bgColor          = "black"
+      , fgColor          = "#808080"
+      , overrideRedirect = False
+      , template =
+          let left = intercalate " | "
+                [ "%XMonadWorkspaces%"
+                , "%XMonadLayout%"
+                , "%XMonadTitle%"
+                ]
+              right = intercalate " | "
+                [ {- "%status%"
+                , -} "%battery%"
+                , "%kbd%"
+                , "%worktime%"
+                , "%worktime-today%"
+                , "%time%"
+                , "%date%"
+                ]
+           in left <> "}{" <> right
+      , commands =
+          [ Run $ NamedXPropertyLog "_XMONAD_WORKSPACES" "XMonadWorkspaces"
+          , Run $ NamedXPropertyLog "_XMONAD_LAYOUT" "XMonadLayout"
+          , Run $ NamedXPropertyLog "_XMONAD_TITLE" "XMonadTitle"
+          , Run $ Date "%H:%M" "time" 50
+          , Run $ Date "%a %b %_d" "date" 50
+          , Run $ Com "worktime" [] "worktime" 1500
+          , Run $ Com "worktime" ["today"] "worktime-today" 1500
+          , Run $ Com "ssh" ["status.odin"] "status" 600
+          , Run $ Kbd [("us(dvp)", "dvp")]
+          , Run $ Battery
+            [ "--template", "<watts> <left> (<timeleft>) AC <acstatus>"
+            , "--suffix", "On"
+            , "--Low", "10"
+            , "--High", "80"
+            , "--low", "darkred"
+            , "--normal", "darkorange"
+            , "--high", "darkgreen"
+            , "-p", "3"
+            ] 50
+          ]
+      }