• Home
• org.cloudhoist
• automated-admin-user
• 0.4.0-beta-1
• source code
• automated_admin_user.clj

×

Project download

Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $

You can buy this project and download/modify it how often you want.

pallet.crate.automated_admin_user.clj Maven / Gradle / Ivy

(ns pallet.crate.automated-admin-user
  (:use [pallet.resource.user :only [user]]
        [pallet.crate.ssh-key :only [authorize-key]]
        [pallet.utils :only [default-public-key-path *admin-user*]]
        pallet.thread-expr)
  (:require
   [pallet.resource :as resource]
   [pallet.crate.sudoers :as sudoers]))

(defn automated-admin-user
  "Builds a user for use in remote-admin automation. The user is given
  permission to sudo without password, so that passwords don't have to appear
  in scripts, etc."
  ([request]
     (automated-admin-user
      request (:username *admin-user*) (:public-key-path *admin-user*)))
  ([request username]
     (automated-admin-user request username (:public-key-path *admin-user*)))
  ([request username & public-key-paths]
     (->
      request
      (sudoers/install)
      (user username :create-home true :shell :bash)
      (for-> [path-or-bytes public-key-paths]
             (if-> (string? path-or-bytes)
                   (authorize-key username (slurp path-or-bytes))
                   (authorize-key username (String. path-or-bytes))))
      (sudoers/sudoers
       {} {} {username {:ALL {:run-as-user :ALL :tags :NOPASSWD}}}))))