/usr/share/tf5/tf-lib/psh.tf is in tf5 5.0beta8-5+b1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | ;;; preferred shell
;; /psh [<command>]
;; Like /sh, but uses ${SHELL} instead of /bin/sh to execute <command>.
;; bug: barfs on suspend (^Z) because SHELL is really a child of /bin/sh,
;; which doesn't have job control. Workaround: don't ^Z during /psh.
/loaded __TFLIB__/psh.tf
/def -i psh = \
/if ( ({#} > 0) & (SHELL !~ "") & (SHELL !~ "/bin/sh") ) \
/setenv ARGS=%*%;\
/def -i -hSHELL -1 -agG ~psh_hook = \
/echo %% Executing %{SHELL} command: %%{ARGS}%;\
/@sh exec %{SHELL} -i -c "$$ARGS"%;\
/else \
/@sh %*%;\
/endif
|