From b837ea02f66e4863d89ea977fd756e5bbb3aa336 Mon Sep 17 00:00:00 2001
From: Marty Kraimer <mrkraimer@comcast.net>
Date: Mon, 2 May 1994 10:52:03 +0000
Subject: [PATCH] added dbhcr

---
 src/db/dbTest.c | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/src/db/dbTest.c b/src/db/dbTest.c
index 622c0cbec..2e0882228 100644
--- a/src/db/dbTest.c
+++ b/src/db/dbTest.c
@@ -80,6 +80,8 @@
  *	char	*pname		Driver name. If null all drivers
  *	int	type		<0,1> => <short, full> report
  *
+ * dbhcr(null)			hardware configuration report
+ *
  * dblls(ptypeName)		list lock sets
  *	char	*ptypeName;	Record type. If null all record types
  *
@@ -696,6 +698,16 @@ long dbior(char	*pdrvName,int type)
     }
     return(0);
 }
+int dbhcr(void)
+{
+
+    if(!pdbBase) {
+	printf("No database\n");
+	return(0);
+    }
+    dbReportDeviceConfig(pdbBase,stdout);
+    return(0);
+}
 
 long dblls(int	lockset)
 {