From 5b5067785aaee5f8732d89a1a4edc45ecd8dde8c Mon Sep 17 00:00:00 2001 From: Mitch Tishmack Date: Fri, 23 Dec 2016 15:14:13 -0600 Subject: [PATCH] Update cray configuration. --- cray.org | 104 ++++++++----------------------------------------------- 1 file changed, 15 insertions(+), 89 deletions(-) diff --git a/cray.org b/cray.org index a9b118c..24da859 100644 --- a/cray.org +++ b/cray.org @@ -62,9 +62,12 @@ Use gnus in emacs for email. Outside of normal emacs since its easier. (setq gnus-select-method '(nnimap "outlook" (nnimap-address "outlook.office365.com") - (nnimap-server-port 993))) + (nnimap-server-port 993)) + message-send-mail-with-function 'smtpmail-send-it + send-mail-function 'smtpmail-send-it + ) (setq-default - gnus-summary-line-format "[%U%R%z](%i) %(%&user-date; %-15,15f %B%s%)\n" + gnus-summary-line-format "[%U%R%z] %(%&user-date; %-15,15f %B%s%)\n" gnus-user-date-format-alist '((t . "%Y-%m-%d")) gnus-summary-thread-gathering-function 'gnus-gather-threads-by-references gnus-sum-thread-tree-root "" @@ -108,90 +111,7 @@ Use gnus in emacs for email. Outside of normal emacs since its easier. ) #+END_SRC -** ~/bin/essh - -Expect ssh, to aide login to smw's etc.. -#+BEGIN_SRC expect :tangle (when (eq cray-p t) "tmp/bin/essh") :mkdirp yes :tangle-mode (identity #o755) -#!/usr/bin/expect -set prompt "> " -set password [lindex $argv 1] -set connstr [lindex $argv 0] - -if {$argc > 2} { - eval spawn ssh -q $connstr "[lrange $argv 2 end]" - set timeout 3600 - expect { - timeout { - puts "Command took too long" - exit 1 - } - - "yes/no" { - send "yes\r" - exp_continue - } - - "assword:" { - send -- "$password\r" - exp_continue - } - } -} else { - spawn ssh -q $connstr - set timeout 5 - expect { - timeout { - puts "Connection timed out" - exit 1 - } - - "yes/no" { - send "yes\r" - exp_continue - } - - "assword:" { - send -- "$password\r" - exp_continue - } - - "$prompt" { - interact - } - } -} -#+END_SRC -*** ~/bin/escp - -Similar to the above only for scp. - -#+BEGIN_SRC expect :tangle (when (eq cray-p t) "tmp/bin/escp") :mkdirp yes :tangle-mode (identity #o755) -#!/usr/bin/expect -set prompt "> " -set password [lindex $argv 0] - -if {$argc > 2} { - eval spawn scp -q "[lrange $argv 1 end]" - set timeout 3600 - expect { - timeout { - puts "Command took too long" - exit 1 - } - - "yes/no" { - send "yes\r" - exp_continue - } - - "assword:" { - send -- "$password\r" - exp_continue - } - } -} -#+END_SRC -*** ~/bin/flushdns +** ~/bin/flushdns For some reason this sometimes needs to happen, stupid work dns. @@ -205,7 +125,10 @@ sudo launchctl unload -w /System/Library/LaunchDaemons/com.apple.mDNSResponder.p sudo launchctl load -w /System/Library/LaunchDaemons/com.apple.mDNSResponder.plist exit $? #+END_SRC -*** ~/bin/tomod +** ~/bin/tomod + +LEGACY svn interop + #+BEGIN_SRC sh :tangle (when (eq cray-p t) "tmp/bin/tomod") :mkdirp yes :tangle-mode (identity #o755) #!/usr/bin/env sh #-*-mode: Shell-script; coding: utf-8;-*- @@ -275,7 +198,10 @@ rsync \ "${base_git}/" "${remote}:${remote_svn}" echo "done rsyncing ${base_git} to ${remote}:${remote_svn}" #+END_SRC -*** ~/bin/towip +** ~/bin/towip + +LEGACY svn interop + #+BEGIN_SRC sh :tangle (when (eq cray-p t) "tmp/bin/towip") :mkdirp yes :tangle-mode (identity #o755) #!/usr/bin/env sh #-*-mode: Shell-script; coding: utf-8;-*- @@ -283,7 +209,7 @@ export script=$(basename "$0") export dir=$(cd "$(dirname "$0")"; pwd) export iam=${dir}/${script} -remote=cfosbld01 +remote=cfosbldvm01 export PATH=/usr/local/brew/10.10/bin:~/bin:${PATH} branch=$(git rev-parse --abbrev-ref HEAD)