From bfeda4f3b5863a5007dda37c67b126bcc037fc66 Mon Sep 17 00:00:00 2001
From: Sean Porth <sporth@unicon.net>
Date: Fri, 9 Sep 2022 12:16:51 -0400
Subject: [PATCH] shibui-2341 exit upload if api is inaccessible

---
 bulk-upload/docker-build/shibui-md-upload.pl | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/bulk-upload/docker-build/shibui-md-upload.pl b/bulk-upload/docker-build/shibui-md-upload.pl
index 3aae45aa8..160559c6d 100755
--- a/bulk-upload/docker-build/shibui-md-upload.pl
+++ b/bulk-upload/docker-build/shibui-md-upload.pl
@@ -41,6 +41,11 @@
 
 #create auth token
 $client->HEAD('/');
+
+my $code = $client->responseCode();
+my $res = $client->responseContent();
+die "$res\n" if ($code != 302 && $code != 200);
+
 my $token = &get_cookie_value($cookies, 'XSRF-TOKEN');
 $client->addHeader('X-XSRF-TOKEN', $token);
 ##