diff options
| author | Jon Robertson <jonrober@stanford.edu> | 2015-04-16 14:58:58 -0700 |
|---|---|---|
| committer | Jon Robertson <jonrober@stanford.edu> | 2015-06-08 15:24:34 -0700 |
| commit | 45a7c9d2896cf2e0d1548fd98b3b78f9f812744f (patch) | |
| tree | a8fc5f7ec8ae6c634f80c404a3c015d9300f4987 /server | |
| parent | f3da929ff35f24163ab56dbd9615ee6a1c5336d8 (diff) | |
wallet-report: Added report of all host-based objects for host
"wallet-report objects host <hostname>" reports on all objects that
belong to the given host. This can be used to query things for retiring
systems.
Change-Id: Ib1c8e5978fed141d54ecc8504b56b43c037f9b17
Diffstat (limited to 'server')
| -rwxr-xr-x | server/wallet-report | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/server/wallet-report b/server/wallet-report index 6d1436c..77a2f8a 100755 --- a/server/wallet-report +++ b/server/wallet-report @@ -24,6 +24,7 @@ Wallet reporting help: objects acl <acl> Objects granting permissions to that ACL objects flag <flag> Objects with that flag set objects history History of all objects + objects host <hostname> All host-based objects for a specific host objects owner <owner> Objects owned by that owner objects type <type> Objects of that type objects unused Objects that have never been gotten @@ -81,6 +82,8 @@ sub command { my @objects; if (@args && $args[0] eq 'history') { @objects = $report->objects_history (@args); + } elsif (@args && $args[0] eq 'host') { + @objects = $report->objects_hostname (@args); } else { @objects = $report->objects (@args); } |