2 # our .zprofile is expensive, so we keep track of what has been run already,
3 # and only set up what is necessary. additionally, we want to ensure that our
4 # environment is set up as early as possible, so we also source .zprofile in
5 # .zshenv for new non-login shells.
7 # these issues are handled by using these methods:
8 # * the parent shell that starts the user's session after logging in to some
9 # graphical environments may not be a login shell—due to misconfiguration
10 # or otherwise—which means .zprofile is not ran and the environment is not
11 # properly configured for any child processes.
12 # * some desktop environments/graphical terminal emulators will start new
13 # terminal windows with login shells, which runs .zprofile every time and
14 # leads to noticably slow startup times.
15 # * switching users without wiping the environment will result in paths and
16 # variables intended for the old user being used for the new user. while
17 # this may be considered an edge-case that should not be supported, there
18 # are legitimate reasons to want to do this, and in any case the shell
19 # should not choke or cause unexpected problems should it happen anyway.
23 export LANG=en_US.UTF-8
26 # NOTE: we utilize the fact that unique arrays keep the first occurrence and
27 # remove any further occurences to capture elements from the old PATH
28 # that we did not anticipate and shift them to the front, since they are
29 # probably important to the system
30 if [[ ! -v _sev_setup_path || -o login ]] {
32 # add as many generic paths as possible to keep the order we want
33 # NOTE: /usr/{local,pkg,games} are unix/bsdisms
35 path=({~/,/,/usr/}sbin /opt/{s,}bin /usr/local/{s,}bin /usr/pkg/{s,}bin
36 /usr/X11R{7,6}/bin /usr/games {~/,/,/usr/}bin)
38 path=("$path[@]" "$syspath[@]")
39 # remove nonexistent and duplicate paths
40 for (( i = 1; i <= $#path; i++ )) {
41 if [[ ! -e $path[$i] ]] {
43 ((i <= len)) && ((len--))
48 # shift valid system paths to the front if there are any left
49 ((len > 0 && len < $#path)) && path=("${(@)path[len + 1, -1]}" "${(@)path[1, len]}")
51 # include our zsh dir in fpath. unlike above, we always prefer our paths
52 fpath=(${ZDOTDIR:-~/.zsh}/functions/{*,Completions/*}(N) "$fpath[@]")
53 # FPATH is not exported by default
56 export _sev_setup_path=
60 # NOTE: it's intentional to separate POSIX tmp for each session (spec says
61 # programs should not expect data there to be long-lived) and to keep the
62 # same runtime dir and not create a new one if a new login shell is
63 # spawned, since the XDG spec calls for the same dir to be utilized for
65 if [[ ! -v _sev_setup_tmp ]] {
66 t=${TMPDIR:-${TEMP:-${TMP:-/tmp}}}/.home-$LOGNAME
68 [[ ! -e $t ]] && mkdir -pm700 $t 2>/dev/null
70 [[ -o interactive ]] &&
71 print -P "%F{red}!!! Can't create temp dir $t%f"
72 # fallback bare directories
73 [[ -h $h ]] && unlink $h 2>/dev/null
74 [[ ! -e $h ]] && mkdir -m700 $h 2>/dev/null
76 # [re-]create link to our tmp
77 [[ -h $h || ! -e $h ]] && ln -sfn $t $h 2>/dev/null
78 # finally create our subdir for this session
79 export _sev_tmp=$h/.session.$$
80 # ensure dir doesn't exist. if there is already something there it is
81 # likely a stale directory or something is very broken—assume the former.
82 # the user could also want dirs recreated by unsetting the var.
83 if [[ -h $_sev_tmp ]] {
84 unlink $_sev_tmp 2>/dev/null
85 } elif [[ -e $_sev_tmp ]] {
86 rm -rf $_sev_tmp 2>/dev/null
88 mkdir -m700 $_sev_tmp 2>/dev/null
89 export TMPDIR=$_sev_tmp TEMP=$_sev_tmp TMP=$_sev_tmp
91 export _sev_setup_tmp=
95 if [[ ! -v _sev_setup_xdg ]] {
96 # merge with any existing dirs and remove duplicates using unique arrays
97 # NOTE: include and then remove CONFIG_HOME and DATA_HOME to ensure they
98 # are not present in the array if it was added before we got to it
99 typeset -UT XDG_CONFIG_DIRS xdg_config_dirs
100 typeset -UT XDG_DATA_DIRS xdg_data_dirs
101 export XDG_CONFIG_HOME=$HOME/etc
102 xdg_config_dirs=($XDG_CONFIG_HOME $HOME/.config
103 {/opt,/usr/local,/usr/pkg,}/etc/xdg
104 "${XDG_CONFIG_DIRS:+${xdg_config_dirs[@]}}")
105 export XDG_CONFIG_DIRS=${XDG_CONFIG_DIRS#$XDG_CONFIG_HOME}
106 export XDG_DATA_HOME=$HOME/share
107 xdg_data_dirs=($XDG_DATA_HOME $HOME/.local/share
108 /{opt,usr/local,usr/pkg,usr}/share
109 "${XDG_DATA_DIRS:+${xdg_data_dirs[@]}}")
110 export XDG_DATA_DIRS=${XDG_DATA_DIRS#$XDG_DATA_HOME}
111 # use our custom tmp for cache and runtime
112 export XDG_CACHE_HOME=$_sev_tmp/.xdg.cache
113 export XDG_RUNTIME_DIR=$_sev_tmp/.xdg.runtime
114 # create xdg tmp dirs
115 for x in $XDG_CACHE_HOME $XDG_RUNTIME_DIR; do
116 # same as in temp creation, ensure it doesn't exist
118 unlink $x 2>/dev/null
119 elif [[ -e $x ]]; then
120 rm -rf $x 2>/dev/null
122 mkdir -m700 $x 2>/dev/null
124 # source user dirs after other vars
125 [[ -e $XDG_CONFIG_HOME/user-dirs.dirs ]] &&
126 emulate sh -c "source $XDG_CONFIG_HOME/user-dirs.dirs"
127 export _sev_setup_xdg=
130 ### gpg + ssh + forwarding
131 # NOTE: while ssh manages its auth sock in its protocol when ForwardSsh is
132 # enabled, GPG must be forwarded manually over Unix socket. to support
133 # this, we forward the restricted gpg-agent extra socket to the remote
134 # host with a RemoteForward rule in ~/.ssh/config that uses the
135 # _GNUPG_SOCK_* env vars. to avoid conflicts with other ssh sessions
136 # where the same user is connecting to the same host from different
137 # machines, gpg in each environment should utilize its own forwarded
138 # socket, rather than replace the sockets in GNUPGHOME which will be
139 # overridden on the next connection. previously, you could provide a path
140 # to the agent socket in GPG_AGENT_INFO, but that was deprecated in GPG
141 # v2.1. instead, we must clone GNUPGHOME with links and replace the agent
142 # sockets there with the forwarded one.
143 # NOTE: since Unix sockets are not supported under Windows, this will not work
144 # under msys, cygwin, mingw, etc., but may work under wsl2.
145 # HACK: without SendEnv, which is disabled by default in most sshd configs,
146 # there is no foolproof way to prevent race conditions via filename
147 # collisions or to pass the desired forward path to the remote host
148 # environment. we just have to guess the path we choose is good on the
149 # desination, and assume the newest matching socket is the correct one
150 # after connecting. in theory, we could occlude the ssh binary on PATH
151 # with an alias or script that would allow us to communicate with the
152 # remote host before opening a shell, so that we can have the host
153 # communicate back to the client where it wants a socket created or ask
154 # the host if the path the client wants to use is writable. however, this
155 # would open up too many edge cases where it wouldn't work or be clunky
156 # (e.g. asking for password twice) to make it worth it.
157 if [[ ! -v _sev_setup_agents ]] {
158 function _socketpath {
159 # dirs are percent-encoded: https://stackoverflow.com/a/64312099
160 echo ${1//(#b)%([[:xdigit:]](#c2))/${(#):-0x$match[1]}}
164 if [[ ! -v _sev_gpg_forwarded && -v commands[gpg] ]] {
165 export _GNUPG_SOCK_DEST_BASE=/tmp/.gpg-agent-forward
166 export _GNUPG_SOCK_DEST_EXT=$(date +%s).$RANDOM
167 export _GNUPG_SOCK_DEST=$_GNUPG_SOCK_DEST_BASE.$_GNUPG_SOCK_DEST_EXT
168 export _sev_gpg_forward_dir=${GNUPGHOME:-~/.gnupg}/.ssh_forward
169 # clean up forward dirs if its session is dead or we ask for it
170 if [[ -d $_sev_gpg_forward_dir ]] {
171 find $_sev_gpg_forward_dir -type d -mindepth 1 -maxdepth 1 |
173 # NOTE: the only way we can get here is if we have not been
174 # forwarded before or if the user asks for it. if our own
175 # pid already has a dir, it is most likely stale, or
176 # something is very broken—assume the former.
178 if [[ -v _sev_gpg_forward_clean || $$ == $p ]] ||
179 ! kill -0 $p 2>/dev/null; then
180 find $x -mindepth 1 -maxdepth 1 | while read -r y; do
189 # find our forwarded socket
190 s=($_GNUPG_SOCK_DEST_BASE*(N=oc[1]))
191 if [[ -n $s && -v SSH_CLIENT ]] {
192 # create new forward dir
193 export _sev_gpg_forwarded=
194 mkdir -pm700 $_sev_gpg_forward_dir
195 h=$_sev_gpg_forward_dir/$$
197 # XXX: is it safe to link scdaemon socket? can its name be changed?
198 for x in S.scdaemon gpg.conf gpg-agent.conf sshcontrol \
199 pubring.kbx trustdb.gpg private-keys-v1.d crls.d; do
200 ln -s ${GNUPGHOME:-~/.gnupg}/$x $h
204 for x in $(gpgconf --list-dirs | grep 'agent-.*-\?socket:'); do
205 x=$(_socketpath ${x/#agent-*socket:})
207 # move forwarded socket to first valid agent socket path
208 # XXX: if tmp is on different filesystem this may not work
212 # make links to forwarded socket for any others
220 # what we will forward if we start a new ssh connection
221 # NOTE: do this after setting up GNUPGHOME to pick up new socket path;
222 # if already connected over SSH, extra should be the remote one
223 export _GNUPG_SOCK_SRC=$(_socketpath \
224 $(gpgconf --list-dirs agent-extra-socket))
226 # required for RemoteForward to not error out if the vars are unset
227 [[ ! -v _GNUPG_SOCK_SRC ]] && export _GNUPG_SOCK_SRC=/nonexistent
228 [[ ! -v _GNUPG_SOCK_DEST ]] && export _GNUPG_SOCK_DEST=/nonexistent
232 if [[ -v commands[gpg-connect-agent] ]] {
233 [[ -o interactive ]] && print -nP '%F{blue}>>>%f GPG agent: %F{green}'
234 gpg-connect-agent /bye >/dev/null 2>&1
236 [[ -o interactive ]] &&
237 print -P '%F{red}Error communicating with GPG agent%f'
238 } elif [[ ! -v _sev_gpg_forward && ! -v GPG_TTY &&
239 ( -o interactive || -v DISPLAY ) ]] {
240 # if we aren't forwarded, set up tty if it isn't and we're
241 # in an interactive session
242 export GPG_TTY=$(tty)
243 export PINENTRY_USER_DATA=USE_TTY=$((!${+DISPLAY}))
244 gpg-connect-agent UPDATESTARTUPTTY /bye >/dev/null 2>&1
245 [[ -o interactive ]] &&
246 print -P "Updated TTY%f"
248 [[ -o interactive ]] &&
254 # NOTE: preferred order of agents to check: okcagent, gnupg, openssh
255 # first block takes care of okcagent and openssh, second gnupg
256 [[ -o interactive ]] && print -nP '%F{blue}>>>%f SSH: %F{green}'
257 if [[ ! -v SSH_AUTH_SOCK && ( -v commands[okc-ssh-agent] ||
258 ( -v commands[ssh-agent] && ! -v commands[gpg] ) ) ]] {
259 okc=${commands[okc-ssh-agent]:+okc-}
260 agentfile=~/tmp/${okc}ssh-agent-exports
263 if [[ -f $agentfile ]] {
264 IFS=$'\0' read -r sock pid <$agentfile
266 if [[ -S $sock && $pid > 0 ]] && kill -0 $pid; then
267 [[ -o interactive ]] && print -P "Reusing agent PID $pid%f"
268 export SSH_AUTH_SOCK=$sock
269 export SSH_AGENT_PID=$pid
272 # TODO: ensure ssh-agent path looks legit to avoid unsafe eval?
273 # XXX: doesn't appear to be any other way to handle redirection.
274 # because eval needs to write to current scope environment
275 # subshells can't be used to capture output and print.
276 if [[ -o interactive ]] {
280 eval `$e` >/dev/null 2>&1
282 echo -n $SSH_AUTH_SOCK$'\0'$SSH_AGENT_PID >!$agentfile
284 unset okc agentfile sock pid
285 } elif [[ ! -v SSH_AUTH_SOCK && -v commands[gpg] ]] {
286 # since gpg agent was started above, we just have to export and notify
287 if [[ -o interactive ]] {
288 if [[ -v _sev_gpg_forwarded ]] {
289 echo 'Remote GPG agent'
291 gpg-connect-agent /subst /serverpid \
292 '/echo GPG agent PID ${get serverpid}' /bye
296 export SSH_AUTH_SOCK=$(_socketpath \
297 $(gpgconf --list-dirs agent-ssh-socket))
298 } elif [[ -v SSH_AUTH_SOCK ]] {
299 [[ -o interactive ]] && print -P 'Preconfigured agent%f'
301 [[ -o interactive ]] && print -P '%F{red}No agent available%f'
305 unfunction _socketpath
307 export _sev_setup_agents=
311 # TODO: debounce this
312 [[ -v commands[perl] && -d $XDG_DATA_HOME/perl5/lib/perl5 ]] &&
313 eval $(perl -I$XDG_DATA_HOME/perl5/lib/perl5
314 -Mlocal::lib=$XDG_DATA_HOME/perl5 2>/dev/null)
316 ### load site-specific
317 if [[ -f ~/.zprofile.local ]] { source ~/.zprofile.local }
319 # vim: et sts=4 sw=4 ts=8 tw=79