cloud/bmaas/bmdb/webug: Use a flag for strict consistency

Change-Id: I4ef6372108e4ada94a70525c6ec335e305dca320
Reviewed-on: https://review.monogon.dev/c/monogon/+/1801
Tested-by: Jenkins CI
Reviewed-by: Serge Bazanski <serge@monogon.tech>
diff --git a/cloud/bmaas/bmdb/webug/views.go b/cloud/bmaas/bmdb/webug/views.go
index 0cf34ac..7c43054 100644
--- a/cloud/bmaas/bmdb/webug/views.go
+++ b/cloud/bmaas/bmdb/webug/views.go
@@ -37,7 +37,7 @@
 // viewMachines renders a list of all machines in the BMDB.
 func (s *server) viewMachines(w http.ResponseWriter, r *http.Request, args ...string) {
 	start := time.Now()
-	res, err := s.curSchema().GetMachines(r.Context(), &reflection.GetMachinesOpts{Strict: true})
+	res, err := s.curSchema().GetMachines(r.Context(), &reflection.GetMachinesOpts{Strict: s.strictConsistency})
 	if err != nil {
 		w.WriteHeader(http.StatusInternalServerError)
 		fmt.Fprintf(w, "could not dump BMDB: %v", err)
@@ -84,7 +84,7 @@
 
 	opts := reflection.GetMachinesOpts{
 		FilterMachine:   &mid,
-		Strict:          true,
+		Strict:          s.strictConsistency,
 		ExpiredBackoffs: true,
 	}
 	res, err := s.curSchema().GetMachines(r.Context(), &opts)