govc: add disk.ls '-a' flag

Deleting an FCD file backing can create an orphan FCD. An orphaned ID is returned by the ListVStorageObject API,
but calling RetrieveVStorageObject with an orphan ID results in a NotFound fault.
The disk.ls command would return an error and suggest: use 'disk.ls -R' to reconcile datastore inventory
The -R flag calls ReconcileDatastoreInventory, which normally cleans up such orphans, but we have seen cases where it does not.

This change ignores orphans by default. The new '-a' flag will list *all* orphans (if any) and includes the disk.ls -R suggestion.

Fixes #3639

Signed-off-by: Doug MacEachern <[email protected]>

Author: dougm

cli/disk/ls.go

@@ -35,6 +35,7 @@ import (
 
 type ls struct {
 	*flags.DatastoreFlag
+	all      bool
 	long     bool
 	path     bool
 	r        bool
@@ -51,6 +52,7 @@ func (cmd *ls) Register(ctx context.Context, f *flag.FlagSet) {
 	cmd.DatastoreFlag, ctx = flags.NewDatastoreFlag(ctx)
 	cmd.DatastoreFlag.Register(ctx, f)
 
+	f.BoolVar(&cmd.all, "a", false, "List IDs with missing file backing")
 	f.BoolVar(&cmd.long, "l", false, "Long listing format")
 	f.BoolVar(&cmd.path, "L", false, "Print disk backing path instead of disk name")
 	f.BoolVar(&cmd.r, "R", false, "Reconcile the datastore inventory info")
@@ -167,7 +169,18 @@ func (cmd *ls) Run(ctx context.Context, f *flag.FlagSet) error {
 		if err != nil {
 			if filterNotFound && fault.Is(err, &types.NotFound{}) {
 				// The case when an FCD is deleted by something other than DeleteVStorageObject_Task, such as VM destroy
-				return fmt.Errorf("%s not found: use 'disk.ls -R' to reconcile datastore inventory", id)
+				if cmd.all {
+					obj := VStorageObject{VStorageObject: types.VStorageObject{
+						Config: types.VStorageObjectConfigInfo{
+							BaseConfigInfo: types.BaseConfigInfo{
+								Id:   types.ID{Id: id},
+								Name: "not found: use 'disk.ls -R' to reconcile datastore inventory",
+							},
+						},
+					}}
+					res.Objects = append(res.Objects, obj)
+				}
+				continue
 			}
 			return fmt.Errorf("retrieve %q: %s", id, err)
 		}

govc/test/disk.bats

@@ -204,13 +204,21 @@ load test_helper
 
   run govc disk.ls
   assert_success
+  [ ${#lines[@]} -eq 2 ]
 
   path=$(govc disk.ls -json "$id" | jq -r .objects[].config.backing.filePath)
   run govc datastore.rm "$path"
   assert_success
 
+  # file backing was removed without using disk.rm, results in NotFound fault
   run govc disk.ls
-  assert_failure # file backing was removed without using disk.rm, results in NotFound fault
+  assert_success
+  [ ${#lines[@]} -eq 1 ]
+
+  run govc disk.ls -a
+  assert_success
+  [ ${#lines[@]} -eq 2 ]
+  assert_matches "not found"
 
   run govc disk.ls -R
   assert_success