(use-modules (home))

(use-home-modules hexchat keepassxc openbox ssh utils)

(use-modules (home-config ssh))

(use-modules (gnu packages bittorrent))

(use-modules (gnu packages compton))

(use-modules (gnu packages dunst))

(use-modules (gnu packages games))

(use-modules (gnu packages gnuzilla))

(use-modules (gnu packages ibus))

(use-modules (gnu packages image-viewers))

(use-modules (gnu packages inkscape))

(use-modules (gnu packages libreoffice))

(use-modules (gnu packages lxde))

(use-modules (gnu packages mail))

(use-modules (gnu packages messaging))

(use-modules (gnu packages password-utils))

(use-modules (gnu packages pulseaudio))

(use-modules (gnu packages sync))

(use-modules (gnu packages xfce))

(use-modules (nonfree packages baba-is-you))

(use-modules (guix gexp))

(use-modules (guix import utils)); for flatten

(define bashrc

  (computed-file "bashrc"

    #~(with-output-to-file #$output

        (lambda _

          (format #t "export SHELL

if [[ $- != *i* ]]; then

      # Non interative shell. For SSH session, load /etc/profile to get

      # PATH and other variables set up.

        [[ -n \"$SSH_CLIENT\" ]] && source /etc/profile

      return

fi

source /etc/bashrc

if [ -n \"$GUIX_ENVIRONMENT\" ]; then

        PS1='\\u@\\h \\w [env]\\$ '

else

        PS1='\\u@\\h \\w\\$ '

fi

export EDITOR=nvim

alias ls='ls -p --color=auto'

alias ll='ls -l'

alias grep='grep --color=auto'

alias vim='nvim'")))))

(define bash_profile

  (plain-file "bash_profile" "if [ -f ~/.bashrc ]; then . ~/.bashrc; fi

"))

(define gtkrc-2

  (plain-file "gtkrc-2.0" "gtk-theme-name=\"Arc-Dark\"

gtk-icon-theme-name=\"Arc\"

"))

(define gtkrc-3

  (plain-file "settings.ini" "[Settings]

gtk-theme-name=Arc-Dark

gtk-icon-theme-name=Arc

"))

(define gitconfig (local-file "files/gitconfig"))

(define openbox-rc (local-file "files/openbox/rc.xml"))

(define openbox-environment

  (plain-file "environment" "eval $(ssh-agent)"))

(define openbox-autostart

  (computed-file "autostart"

     #~(with-output-to-file #$output

         (lambda _

           (format #t "HOME=/tmp/pa ~a --start~%" #$(file-append pulseaudio "/bin/pulseaudio"))

           (format #t "~a --bg-fill ~a~%" #$(file-append feh "/bin/feh")

                   #$(local-file "/data/tyreunom/background.png"))

           (format #t "~a -CGb~%" #$(file-append compton "/bin/compton"))

           (format #t "~a -conf ~a &~%" #$(file-append dunst "/bin/dunst")

                   #$(plain-file "dunstrc" ""))

           (format #t "export GTK_IM_MODULE=ibus

export XMODIFIERS=@im=ibus

export QT_IM_MODULE=ibus

export GUIX_GTK2_IM_MODULE_FILE=~~/.guix-profile/lib/gtk-2.0/2.10.0/immodules-gtk2.cache

export GUIX_GTK3_IM_MODULE_FILE=~~/.guix-profile/lib/gtk-3.0/3.0.0/immodules-gtk3.cache

~a -drx~%" #$(file-append ibus "/bin/ibus-daemon"))))))

(define xfce4-terminalrc

  (local-file "files/xfce4-terminal/terminalrc"))

(home

  "/data/tyreunom"

  (flatten

    (list

      (openbox-home

        (openbox-configuration

          (autostart openbox-autostart)

	  (environ openbox-environment)

          (menus

            (list

              (openbox-menu

                (id "apps-game-menu")

                (label "Jeux")

                (elements

                  (list

                    (openbox-element-execute

                      (label "MineTest")

                      (command (file-append minetest "/bin/minetest")))

		    (openbox-element-execute

		      (label "Baba is You")

		      (command (file-append baba-is-you "/bin/baba-is-you"))))))

              (openbox-menu

                (id "apps-other-menu")

                (label "Autres")

                (elements

                  (list

                    (openbox-element-execute

                      (label "Pavucontrol")

                      (command (file-append pavucontrol "/bin/pavucontrol")))

                    (openbox-element-execute

                      (label "Owncloud")

                      (command (file-append owncloud-client "/bin/owncloud")))

                    (openbox-element-execute

                      (label "Keepass")

                      (command (file-append keepassxc "/bin/keepassxc")))

                    (openbox-element-execute

                      (label "Libreoffice")

                      (command (file-append libreoffice "/bin/libreoffice")))

                    (openbox-element-execute

                      (label "Claws-mail")

                      (command (file-append claws-mail "/bin/claws-mail --alternate-config-dir /data/tyreunom/.local/share/claws-mail")))

                    (openbox-element-execute

                      (label "Hexchat")

                      (command (file-append hexchat "/bin/hexchat")))

                    ;(openbox-element-execute

                    ;  (label "Transmission")

                    ;  (command (file-append (gexp-input transmission "gui")

                    ;                        "/bin/transmission-gtk")))

                    (openbox-element-execute

                      (label "Claws-mail")

                      (command (file-append claws-mail "/bin/claws-mail")))

                    (openbox-element-execute

                      (label "Inkscape")

                      (command (file-append inkscape "/bin/inkscape"))))))))

          (root-elements

            (list

              (openbox-element-menu (id "apps-game-menu"))

              (openbox-element-menu (id "apps-other-menu"))

              (openbox-element-execute

                (label "Terminal")

                (command (file-append xfce4-terminal "/bin/xfce4-terminal")))

              (openbox-element-execute

                (label "Icecat")

                (command (file-append icecat "/bin/icecat -P --no-remote")))

              (openbox-element-execute

                (label "Gestionnaire de fichiers")

                (command (file-append pcmanfm "/bin/pcmanfm")))))

          (rc openbox-rc)))

      (hexchat-home

	(hexchat-configuration

	  (servlist

	    (list

	      (hexchat-server

		(name "ZNC")

		(servers '("lepiller.eu/6697"))

		(flags '(cycle global honor-proxy ssl favorite

			       allow-invalid-certificates)))))

	  (log-dir "/data/tyreunom/.config/hexchat/logs")

	  (scrollback-dir "/data/tyreunom/.config/hexchat/scrollback")))

      (keepassxc-home

	(keepassxc-configuration

	  (last-databases '("/data/tyreunom/owncloud/synchro/pass.kdbx"))

	  (last-dir "/data/tyreunom")

	  (last-opened-databases '("/data/tyreunom/owncloud/synchro/pass.kdbx"))))

      (ssh-home

	(ssh-configuration

	  (known-hosts known-hosts)

	  (default-host

	    (ssh-host-configuration

	      (identity-file "/data/tyreunom/.ssh/id_rsa")))))

      (simple-file-home bashrc ".bashrc")

      (simple-file-home bash_profile ".bash_profile")

      (simple-file-home gitconfig ".gitconfig")

      (simple-file-home gtkrc-2 ".gtkrc-2.0")

      (simple-file-home gtkrc-3 ".config/gtk-3.0/settings.ini")

      (simple-file-home xfce4-terminalrc ".config/xfce4/terminal/terminalrc")

      (symlink-file-home "/data/tyreunom/.mozilla" ".mozilla")

      (symlink-file-home "/mnt/usb/.gnupg" ".gnupg")

      (symlink-file-home "/data/tyreunom/.PlayOnLinux" ".PlayOnLinux")

      (symlink-file-home "/data/tyreunom/PlayOnLinux" "PlayOnLinux")

      (symlink-file-home "/data/tyreunom/Downloads" "Downloads")

      (symlink-file-home "/data/tyreunom/.config/transmission"

			 ".config/transmission")

      (symlink-file-home "/data/tyreunom/.config/guix-gaming-channels"

			 ".config/guix-gaming-channels")))

  #:guix-config-symlink "/data/tyreunom/.config/guix")