Add managing profiles scripts

1 files changed, 39 insertions, 0 deletions

diff --git a/bin/activate-profiles b/bin/activate-profiles
new file mode 100755
index 0000000..a4373cf
--- /dev/null
+++ b/bin/activate-profiles
@@ -0,0 +1,39 @@
+#!/bin/sh
+# Source: https://github.com/daviwil/dotfiles/blob/master/Systems.org#profile-management
+
+GREEN='\033[1;32m'
+RED='\033[1;30m'
+NC='\033[0m'
+GUIX_EXTRA_PROFILES=$HOME/.guix-extra-profiles
+
+profiles=$*
+if [[ $# -eq 0 ]]; then
+    profiles="$HOME/.config/guix/manifests/*.scm";
+fi
+
+for profile in $profiles; do
+    # Remove the path and file extension, if any
+    profileName=$(basename $profile)
+    profileName="${profileName%.*}"
+    profilePath="$GUIX_EXTRA_PROFILES/$profileName"
+    manifestPath=$HOME/.config/guix/manifests/$profileName.scm
+
+    if [ -f $manifestPath ]; then
+        echo
+        echo -e "${GREEN}Activating profile:" $manifestPath "${NC}"
+        echo
+
+        mkdir -p $profilePath
+        guix package --manifest=$manifestPath --profile="$profilePath/$profileName"
+
+        # Source the new profile
+        GUIX_PROFILE="$profilePath/$profileName"
+        if [ -f $GUIX_PROFILE/etc/profile ]; then
+            . "$GUIX_PROFILE"/etc/profile
+        else
+            echo -e "${RED}Couldn't find profile:" $GUIX_PROFILE/etc/profile "${NC}"
+        fi
+    else
+        echo "No profile found at path" $profilePath
+    fi
+done