Change hyperv-gpg workflow, mod emacs etc. pp
This commit is contained in:
parent
0dc52132d1
commit
6a27888b87
11 changed files with 198 additions and 53 deletions
|
@ -48,6 +48,7 @@ bspc config presel_feedback_color "#6272a4"
|
|||
|
||||
bspc rule -a Screenkey manage=off
|
||||
bspc rule -a Zathura state=tiled manage=on
|
||||
bspc rule -a Emacs state=tiled
|
||||
|
||||
if [ -x "$(command -v feh)" ]; then
|
||||
feh --bg-fill "$HOME/Wallpapers/arch_dracula.png"
|
||||
|
|
|
@ -1,6 +1,6 @@
|
|||
function hyperv-gpg-agent
|
||||
set socket_path "$HOME/.gnupg/S.gpg-agent"
|
||||
set host_ip $(ip route show 0.0.0.0/0 dev eth0 | cut -d\ -f3)
|
||||
set host_ip $(hyperv-host-ip)
|
||||
|
||||
if test -e $socket_path
|
||||
rm $socket_path
|
||||
|
@ -11,7 +11,7 @@ end
|
|||
|
||||
function hyperv-ssh-agent
|
||||
set socket_path "$HOME/.gnupg/S.gpg-agent.ssh"
|
||||
set host_ip $(ip route show 0.0.0.0/0 dev eth0 | cut -d\ -f3)
|
||||
set host_ip $(hyperv-host-ip)
|
||||
|
||||
if test -e $socket_path
|
||||
rm $socket_path
|
||||
|
|
3
.config/fish/functions/hyperv-host-ip.fish
Normal file
3
.config/fish/functions/hyperv-host-ip.fish
Normal file
|
@ -0,0 +1,3 @@
|
|||
function hyperv-host-ip
|
||||
ip route show 0.0.0.0/0 dev eth0 | cut -d\ -f3
|
||||
end
|
3
.config/fish/functions/secure-gpg.fish
Normal file
3
.config/fish/functions/secure-gpg.fish
Normal file
|
@ -0,0 +1,3 @@
|
|||
function secure-gpg --wraps='gpg --homedir /dev/shm/gpg/.gnupg' --description 'gpg --homedir /dev/shm/gpg/.gnupg'
|
||||
gpg --homedir /dev/shm/gpg/.gnupg $argv;
|
||||
end
|
25
.config/fish/functions/secure-hyperv-forward.fish
Normal file
25
.config/fish/functions/secure-hyperv-forward.fish
Normal file
|
@ -0,0 +1,25 @@
|
|||
function secure-hyperv-gpg-agent
|
||||
set socket_path "/dev/shm/gpg/.gnupg/S.gpg-agent"
|
||||
set host_ip $(hyperv-host-ip)
|
||||
|
||||
if test -e $socket_path
|
||||
rm $socket_path
|
||||
end
|
||||
|
||||
screen -dmS gpg-socat socat UNIX-LISTEN:$socket_path,fork tcp-connect:$host_ip:59545
|
||||
end
|
||||
|
||||
function secure-hyperv-ssh-agent
|
||||
set socket_path "/dev/shm/gpg/.gnupg/S.gpg-agent.ssh"
|
||||
set host_ip $(hyperv-host-ip)
|
||||
|
||||
if test -e $socket_path
|
||||
rm $socket_path
|
||||
end
|
||||
screen -dmS ssh-socat socat UNIX-LISTEN:$socket_path,fork tcp-connect:$host_ip:59546
|
||||
end
|
||||
|
||||
function secure-hyperv-forward --description 'Setup secure hyperv-agent forwarding'
|
||||
secure-hyperv-gpg-agent
|
||||
secure-hyperv-ssh-agent
|
||||
end
|
70
.config/fish/functions/usbip-man.fish
Normal file
70
.config/fish/functions/usbip-man.fish
Normal file
|
@ -0,0 +1,70 @@
|
|||
function usbip-man --description "Interactive usbip helper"
|
||||
set vhci_required
|
||||
|
||||
echo ">> Is the vhci-hcd module already loaded?"
|
||||
echo ">> [(y)es] / (n)o"
|
||||
|
||||
read vhci_required
|
||||
|
||||
if test "$vhci_required" = "n"
|
||||
sudo modprobe vhci-hcd
|
||||
end
|
||||
|
||||
set action
|
||||
|
||||
echo ">> What do you want to do?"
|
||||
echo ">> (a)ttach / (d)etach"
|
||||
|
||||
read action
|
||||
|
||||
if test "$action" = "a"
|
||||
set host
|
||||
set host_type
|
||||
set bus_id
|
||||
|
||||
echo ">> What kind of setup is it?"
|
||||
echo ">> [(h)yperv]"
|
||||
|
||||
read host_type
|
||||
|
||||
if test "$host_type" = "h" || test "$host_type" = ""
|
||||
set host $(hyperv-host-ip)
|
||||
else
|
||||
echo ">> No valid option chosen. Exiting ..."
|
||||
return -1
|
||||
end
|
||||
|
||||
echo ">> Listing available devices ..."
|
||||
sudo usbip list -r "$host"
|
||||
|
||||
echo ">> Select bus-id to attach"
|
||||
|
||||
read bus_id
|
||||
|
||||
echo ">> Attaching device ..."
|
||||
sudo usbip attach -r "$host" -b "$bus_id"
|
||||
set usbip_status $status
|
||||
|
||||
echo ">> Exiting ..."
|
||||
return $usbip_status
|
||||
else if [ "$action" = "d" ]
|
||||
set port
|
||||
|
||||
echo ">> Listing imported devices ..."
|
||||
sudo usbip port
|
||||
|
||||
echo ">> Select port to detach"
|
||||
|
||||
read port
|
||||
|
||||
echo ">> Detaching device ..."
|
||||
sudo usbip detach -p "$port"
|
||||
set usbip_status $status
|
||||
|
||||
echo ">> Exiting ..."
|
||||
return $usbip_status
|
||||
else
|
||||
echo ">> No valid option chosen. Exiting ..."
|
||||
return -1
|
||||
end
|
||||
end
|
|
@ -77,3 +77,29 @@
|
|||
;;
|
||||
;; You can also try 'gd' (or 'C-c c d') to jump to their definition and see how
|
||||
;; they are implemented.
|
||||
|
||||
;; This should of course be grammmatically correct
|
||||
|
||||
;; Not working with hyperv-forward atm
|
||||
;;(setq epg-gpg-program "/usr/bin/gpg2")
|
||||
;;(setq epg-user-id "7A9CA430D426100E")
|
||||
;;(pinentry-start)
|
||||
;;(setq epg-agent-file "~/.gnupg/S.gpg-agent")
|
||||
|
||||
(remove-hook 'doom-first-input-hook #'evil-snipe-mode)
|
||||
;;(define-key evil-normal-state-map (kbd "gj") 'evil-next-visual-line)
|
||||
;;(define-key evil-normal-state-map (kbd "gk") 'evil-previous-visual-line)
|
||||
|
||||
;;(add-hook 'org-mode-hook #'org-modern-mode)
|
||||
|
||||
;;(after! flycheck (flycheck-grammarly-setup))
|
||||
|
||||
(setq-default lsp-rust-analyzer-proc-macro-enable t)
|
||||
|
||||
(with-eval-after-load 'ox-latex
|
||||
(add-to-list 'org-latex-classes
|
||||
'("dustdoc" "\\documentclass[10pt]{dustdoc}"
|
||||
("\\chapter{%s}" . "\\chapter*{%s}")
|
||||
("\\section{%s}" . "\\section*{%s}")
|
||||
("\\subsection{%s}" . "\\subsection*{%s}")
|
||||
("\\subsubsection{%s}" . "\\subsubsection*{%s}"))))
|
||||
|
|
102
.doom.d/init.el
102
.doom.d/init.el
|
@ -21,41 +21,43 @@
|
|||
;;layout ; auie,ctsrnm is the superior home row
|
||||
|
||||
:completion
|
||||
company ; the ultimate code completion backend
|
||||
company ; the ultimate code completion backend
|
||||
;;helm ; the *other* search engine for love and life
|
||||
;;ido ; the other *other* search engine...
|
||||
;;ivy ; a search engine for love and life
|
||||
vertico ; the search engine of the future
|
||||
vertico ; the search engine of the future
|
||||
|
||||
:ui
|
||||
;;deft ; notational velocity for Emacs
|
||||
doom ; what makes DOOM look the way it does
|
||||
doom-dashboard ; a nifty splash screen for Emacs
|
||||
doom ; what makes DOOM look the way it does
|
||||
doom-dashboard ; a nifty splash screen for Emacs
|
||||
;;doom-quit ; DOOM quit-message prompts when you quit Emacs
|
||||
;;(emoji +unicode) ; 🙂
|
||||
hl-todo ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW
|
||||
hl-todo ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW
|
||||
;;hydra
|
||||
;;indent-guides ; highlighted indent columns
|
||||
;;ligatures ; ligatures and symbols to make your code pretty again
|
||||
;;minimap ; show a map of the code on the side
|
||||
modeline ; snazzy, Atom-inspired modeline, plus API
|
||||
;;nav-flash ; blink cursor line after big motions
|
||||
;;neotree ; a project drawer, like NERDTree for vim
|
||||
ophints ; highlight the region an operation acts on
|
||||
(ligatures
|
||||
+extra
|
||||
+fira) ; ligatures and symbols to make your code pretty again
|
||||
minimap ; show a map of the code on the side
|
||||
modeline ; snazzy, Atom-inspired modeline, plus API
|
||||
nav-flash ; blink cursor line after big motions
|
||||
neotree ; a project drawer, like NERDTree for vim
|
||||
ophints ; highlight the region an operation acts on
|
||||
(popup +defaults) ; tame sudden yet inevitable temporary windows
|
||||
;;tabs ; a tab bar for Emacs
|
||||
;;treemacs ; a project drawer, like neotree but cooler
|
||||
;;unicode ; extended unicode support for various languages
|
||||
unicode ; extended unicode support for various languages
|
||||
(vc-gutter +pretty) ; vcs diff in the fringe
|
||||
vi-tilde-fringe ; fringe tildes to mark beyond EOB
|
||||
vi-tilde-fringe ; fringe tildes to mark beyond EOB
|
||||
;;window-select ; visually switch windows
|
||||
workspaces ; tab emulation, persistence & separate workspaces
|
||||
workspaces ; tab emulation, persistence & separate workspaces
|
||||
;;zen ; distraction-free coding or writing
|
||||
|
||||
:editor
|
||||
(evil +everywhere); come to the dark side, we have cookies
|
||||
file-templates ; auto-snippets for empty files
|
||||
fold ; (nigh) universal code folding
|
||||
(evil +everywhere) ; come to the dark side, we have cookies
|
||||
file-templates ; auto-snippets for empty files
|
||||
fold ; (nigh) universal code folding
|
||||
;;(format +onsave) ; automated prettiness
|
||||
;;god ; run Emacs commands without modifier keys
|
||||
;;lispy ; vim for lisp, for people who don't like vim
|
||||
|
@ -63,25 +65,25 @@
|
|||
;;objed ; text object editing for the innocent
|
||||
;;parinfer ; turn lisp into python, sort of
|
||||
;;rotate-text ; cycle region at point between text candidates
|
||||
snippets ; my elves. They type so I don't have to
|
||||
snippets ; my elves. They type so I don't have to
|
||||
;;word-wrap ; soft wrapping with language-aware indent
|
||||
|
||||
:emacs
|
||||
dired ; making dired pretty [functional]
|
||||
electric ; smarter, keyword-based electric-indent
|
||||
;;ibuffer ; interactive buffer management
|
||||
undo ; persistent, smarter undo for your inevitable mistakes
|
||||
vc ; version-control and Emacs, sitting in a tree
|
||||
dired ; making dired pretty [functional]
|
||||
electric ; smarter, keyword-based electric-indent
|
||||
ibuffer ; interactive buffer management
|
||||
undo ; persistent, smarter undo for your inevitable mistakes
|
||||
vc ; version-control and Emacs, sitting in a tree
|
||||
|
||||
:term
|
||||
;;eshell ; the elisp shell that works everywhere
|
||||
eshell ; the elisp shell that works everywhere
|
||||
;;shell ; simple shell REPL for Emacs
|
||||
;;term ; basic terminal emulator for Emacs
|
||||
;;vterm ; the best terminal emulation in Emacs
|
||||
vterm ; the best terminal emulation in Emacs
|
||||
|
||||
:checkers
|
||||
syntax ; tasing you for every semicolon you forget
|
||||
;;(spell +flyspell) ; tasing you for misspelling mispelling
|
||||
(spell +flyspell) ; tasing you for misspelling mispelling
|
||||
;;grammar ; tasing grammar mistake every you make
|
||||
|
||||
:tools
|
||||
|
@ -95,17 +97,17 @@
|
|||
(eval +overlay) ; run code, run (also, repls)
|
||||
;;gist ; interacting with github gists
|
||||
lookup ; navigate your code and its documentation
|
||||
;;lsp ; M-x vscode
|
||||
magit ; a git porcelain for Emacs
|
||||
;;make ; run make tasks from Emacs
|
||||
;;pass ; password manager for nerds
|
||||
;;pdf ; pdf enhancements
|
||||
lsp ; M-x vscode
|
||||
magit ; a git porcelain for Emacs
|
||||
make ; run make tasks from Emacs
|
||||
pass ; password manager for nerds
|
||||
pdf ; pdf enhancements
|
||||
;;prodigy ; FIXME managing external services & code builders
|
||||
;;rgb ; creating color strings
|
||||
;;taskrunner ; taskrunner for all your projects
|
||||
;;terraform ; infrastructure as code
|
||||
;;tmux ; an API for interacting with tmux
|
||||
;;tree-sitter ; syntax and parsing, sitting in a tree...
|
||||
tree-sitter ; syntax and parsing, sitting in a tree...
|
||||
;;upload ; map local to remote projects via ssh/ftp
|
||||
|
||||
:os
|
||||
|
@ -120,13 +122,13 @@
|
|||
;;common-lisp ; if you've seen one lisp, you've seen them all
|
||||
;;coq ; proofs-as-programs
|
||||
;;crystal ; ruby at the speed of c
|
||||
;;csharp ; unity, .NET, and mono shenanigans
|
||||
csharp ; unity, .NET, and mono shenanigans
|
||||
;;data ; config/data formats
|
||||
;;(dart +flutter) ; paint ui and not much else
|
||||
;;dhall
|
||||
;;elixir ; erlang done right
|
||||
;;elm ; care for a cup of TEA?
|
||||
emacs-lisp ; drown in parentheses
|
||||
emacs-lisp ; drown in parentheses
|
||||
;;erlang ; an elegant language for a more civilized age
|
||||
;;ess ; emacs speaks statistics
|
||||
;;factor
|
||||
|
@ -137,55 +139,55 @@
|
|||
;;gdscript ; the language you waited for
|
||||
;;(go +lsp) ; the hipster dialect
|
||||
;;(graphql +lsp) ; Give queries a REST
|
||||
;;(haskell +lsp) ; a language that's lazier than I am
|
||||
(haskell +lsp) ; a language that's lazier than I am
|
||||
;;hy ; readability of scheme w/ speed of python
|
||||
;;idris ; a language you can depend on
|
||||
json ; At least it ain't XML
|
||||
;;(java +lsp) ; the poster child for carpal tunnel syndrome
|
||||
;;javascript ; all(hope(abandon(ye(who(enter(here))))))
|
||||
;;julia ; a better, faster MATLAB
|
||||
json ; At least it ain't XML
|
||||
(java +lsp) ; the poster child for carpal tunnel syndrome
|
||||
javascript ; all(hope(abandon(ye(who(enter(here))))))
|
||||
julia ; a better, faster MATLAB
|
||||
;;kotlin ; a better, slicker Java(Script)
|
||||
latex ; writing papers in Emacs has never been so fun
|
||||
latex ; writing papers in Emacs has never been so fun
|
||||
;;lean ; for folks with too much to prove
|
||||
;;ledger ; be audit you can be
|
||||
lua ; one-based indices? one-based indices
|
||||
markdown ; writing docs for people to ignore
|
||||
lua ; one-based indices? one-based indices
|
||||
markdown ; writing docs for people to ignore
|
||||
;;nim ; python + lisp at the speed of c
|
||||
;;nix ; I hereby declare "nix geht mehr!"
|
||||
;;ocaml ; an objective camel
|
||||
org ; organize your plain life in plain text
|
||||
(org +roam2) ; organize your plain life in plain text
|
||||
;;php ; perl's insecure younger brother
|
||||
;;plantuml ; diagrams for confusing people more
|
||||
;;purescript ; javascript, but functional
|
||||
python ; beautiful is better than ugly
|
||||
python ; beautiful is better than ugly
|
||||
;;qt ; the 'cutest' gui framework ever
|
||||
;;racket ; a DSL for DSLs
|
||||
;;raku ; the artist formerly known as perl6
|
||||
;;rest ; Emacs as a REST client
|
||||
;;rst ; ReST in peace
|
||||
;;(ruby +rails) ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
|
||||
(rust +lsp) ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
|
||||
(rust +lsp) ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
|
||||
;;scala ; java, but good
|
||||
;;(scheme +guile) ; a fully conniving family of lisps
|
||||
sh ; she sells {ba,z,fi}sh shells on the C xor
|
||||
sh ; she sells {ba,z,fi}sh shells on the C xor
|
||||
;;sml
|
||||
;;solidity ; do you need a blockchain? No.
|
||||
;;swift ; who asked for emoji variables?
|
||||
;;terra ; Earth and Moon in alignment for performance.
|
||||
;;web ; the tubes
|
||||
yaml ; JSON, but readable
|
||||
web ; the tubes
|
||||
yaml ; JSON, but readable
|
||||
;;zig ; C, but simpler
|
||||
|
||||
:email
|
||||
;;(mu4e +org +gmail)
|
||||
;;notmuch
|
||||
notmuch
|
||||
;;(wanderlust +gmail)
|
||||
|
||||
:app
|
||||
;;calendar
|
||||
;;emms
|
||||
;;everywhere ; *leave* Emacs!? You must be joking
|
||||
;;irc ; how neckbeards socialize
|
||||
irc ; how neckbeards socialize
|
||||
;;(rss +org) ; emacs as an RSS reader
|
||||
;;twitter ; twitter client https://twitter.com/vnought
|
||||
|
||||
|
|
|
@ -48,3 +48,17 @@
|
|||
;(unpin! pinned-package another-pinned-package)
|
||||
;; ...Or *all* packages (NOT RECOMMENDED; will likely break things)
|
||||
;(unpin! t)
|
||||
|
||||
(package! pinentry)
|
||||
(package! fish-mode)
|
||||
|
||||
(package! flycheck-grammarly
|
||||
:recipe (:host github :repo "emacs-grammarly/flycheck-grammarly"))
|
||||
|
||||
(package! evil-escape
|
||||
:disable t)
|
||||
|
||||
(package! git-modes
|
||||
:recipe (:host github :repo "magit/git-modes"))
|
||||
|
||||
(package! org-modern)
|
||||
|
|
2
.emacs.d
2
.emacs.d
|
@ -1 +1 @@
|
|||
Subproject commit e9ef904eeef28c31ca07055f0cce8c5eafeb4179
|
||||
Subproject commit 95bdc3b566b72169f4bed41ea51f0d0b941fa2de
|
|
@ -6,3 +6,4 @@ default-cache-ttl-ssh 300
|
|||
max-cache-ttl 1200
|
||||
max-cache-ttl-ssh 1200
|
||||
enable-ssh-support
|
||||
allow-emacs-pinentry
|
||||
|
|
Loading…
Reference in a new issue