Author : Thomas de Grivel
Date : 2020-04-14T15:00:50
allow path parts using str in read-file
|Public access ?||public|
UNIX system administration in Common Lisp
|Disk usage||0.00 kB|
Adams is a UNIX system administration tool written in Common Lisp.
You describe your systems (hosts) using resources having properties.
The properties are then probed and synchronized by Adams using only
/bin/sh on the remote host, and
/usr/bin/ssh on the control host.
More viable alternatives include Ansible, Chef and Puppet.
Check out https://github.com/kmx-io/kmx-io/ for a detailed example of Adams usage.
Adams is currently able to use a local shell or connect to remote hosts via ssh.
Adams is this hardcore hacker using only
bash suitable shells for adams as they are
Supported resource types :
You should only allow Adams what you would allow your system operators :
All commands issued to the remote hosts can be logged.
Adams does not grant the hosts access to its workstation while it works. Adams does not grant access to data belonging to any host. Adams does not send any data that is not of direct concern to the host. In short, all UNIX permissions are respected, Adams is a regular UNIX user.
$ sbcl --eval '(repo:install :adams)'
$ cd ~/common-lisp/cl-adams/adams $ make $ sudo cp build/adams /usr/local/bin/adams
~/.emacs file :
;; Adams (add-to-list 'auto-mode-alist '("\\.adams\\'" . lisp-mode))
tutorial.adams file :
#!/usr/local/bin/adams --script (resource 'host "adams.kmx.io" :user "adams" (resource 'user "adams" :shell "/bin/sh" :ensure :present)) (with-host "adams.kmx.io" (sync *host*))
$ chmod 755 tutorial.adams $ ./tutorial.adams
tutorial.adams script will synchronize the host “adams.kmx.io”
according to the resource specifications given in the file.
user/dx.adams file :
;; Thomas de Grivel (kmx.io) (resource 'group "dx" :gid 19256 :ensure :present) (resource 'user "dx" :uid 19256 :gid 19256 :home "/home/dx" :ensure :present)
In your main script :
#!/usr/local/bin/adams --script (resource 'host "adams.kmx.io" :user "adams" (resource 'user "adams" :shell "/bin/sh" :ensure :present) #.(include "user/dx")) (with-host "adams.kmx.io" (sync *host*))
;; Copyright YEAR AUTHOR <EMAIL> ;; ;; Permission to use, copy, modify, and distribute this software for any ;; purpose with or without fee is hereby granted, provided that the above ;; copyright notice and this permission notice appear in all copies. ;; ;; THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES ;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF ;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES ;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF ;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ;;
To contribute, fork this repository and send us a pull request.
Please publish under the ISC License terms.
Thomas de Grivel firstname.lastname@example.org