Add a handler for deleting a build from the DB. Careful!

For #40.

ddao/manual_additions.go

@@ -95,6 +95,26 @@ func (d *DB) BeginReadOnlyTransaction(ctx context.Context) (*DB, func(), error)
 	}, func() { tx.Rollback() }, nil
 }
 
+// DeleteBuild deletes an entire build entry, the metadata and the detailed results.
+func (d *DB) DeleteBuild(ctx context.Context, buildID int64) error {
+	tx, err := d.BeginTransaction(ctx, nil)
+	if err != nil {
+		return err
+	}
+	defer tx.Rollback()
+
+	q := d.WithTx(tx)
+	err = q.DeleteAllForBuild(ctx, NullInt64(buildID))
+	if err != nil {
+		return err
+	}
+	err = q.deleteBuild(ctx, buildID)
+	if err != nil {
+		return err
+	}
+	return tx.Commit()
+}
+
 // PutResults writes the results for the given build ID to the database.
 func (d *DB) PutResults(ctx context.Context, results []PkgResult, buildID int64) error {
 	tx, err := d.BeginTransaction(ctx, nil)

pages/bulktracker.go

@@ -132,7 +132,11 @@ func (b *BuildDetails) ServeHTTP(w http.ResponseWriter, r *http.Request) {
 		templates.ReindexOK(w)
 		return
 	case "delete":
-		// delete.DeleteBuildDetails.Call(ctx, key)
+		err = b.DB.DeleteBuild(ctx, buildID)
+		if err != nil {
+			log.Errorf(ctx, "DeleteBuild: %v", err)
+		}
+		return
 	}
 
 	if len(paths) > 1 {

queries.sql

@@ -2,6 +2,10 @@
 DELETE from results
 WHERE build_id = ?;
 
+-- name: deleteBuild :exec
+DELETE from builds
+WHERE build_id = ?;
+
 -- name: GetBuild :one
 SELECT * FROM builds
 WHERE build_id = ?;