* include/cfuns.h (oa_get_tmpdir): Declare.

	(oa_access_file_for_read): Likewise.
	* lib/cfuns-c.c (oa_getcwd): Define.
	(oa_access_file_for_read): Likewise.
	(oa_get_tmpdir): Likewise.
	* hyper/addfile.c: Don't include hyper.h
	(build_ht_filename): Use oa_getcwd, oa_access_file_for_read.
	(temp_file_open): Use oa_get_tmpdir.
	* hyper/htadd.c (build_db_filename): Don't fall back to bogus
	filename. 
	* hyper/hyper.h (temp_dir): Remove.
	(def_spad): Likewise.

4 files changed, 22 insertions, 20 deletions

diff --git a/src/hyper/Makefile.in b/src/hyper/Makefile.in
index a09184c9..83ca718f 100644
--- a/src/hyper/Makefile.in
+++ b/src/hyper/Makefile.in
@@ -117,6 +117,7 @@ clean-local: mostclean-local
 	-rm -f $(BINFILES)
 	-rm -rf $(HYPER)/pages
 	-rm -f $(SCRIPTS)
+	-rm -f stamp
 
 distclean-local: clean-local
 
diff --git a/src/hyper/addfile.c b/src/hyper/addfile.c
index 6e460fc6..7b6121b5 100644
--- a/src/hyper/addfile.c
+++ b/src/hyper/addfile.c
@@ -33,19 +33,20 @@
   SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
 
-#define _ADDFILE_C
+#include "openaxiom-c-macros.h"
 
-#include "debug.h"
+#include <sys/stat.h>
+#include <errno.h>
+#include <string.h>
+#include <stdlib.h>
 
+#include "debug.h"
+#include "cfuns.h"
+#include "halloc.h"
 #include "sockio.h"
 #include "addfile.h"
-#include "hyper.h"
-#include "addfile.h"
 
-#include <sys/stat.h>
-#include <errno.h>
 
-#include "halloc.h"
 
 static int build_ht_filename(char*, char*, char*);
 static int pathname(char*);
@@ -91,7 +92,6 @@ extend_ht(char *name)
 static int
 build_ht_filename(char *fname, char *aname, char *name)
 {
-    char cdir[256];
     char *c_dir;
     char *HTPATH;
     char *trace;
@@ -100,8 +100,9 @@ build_ht_filename(char *fname, char *aname, char *name)
 
     if (cwd(name)) {
         /* user wants to use the current working directory */
-        c_dir = (char *) getcwd(cdir, 254);
+        c_dir = oa_getcwd();
         strcpy(fname, c_dir);
+        free(c_dir);
 
         /* Now add the rest of the filename */
         strcat(fname, "/");
@@ -123,7 +124,7 @@ build_ht_filename(char *fname, char *aname, char *name)
         extend_ht(fname);
 
         /* Now just try to access the file */
-        return (access(fname, R_OK));
+        return oa_access_file_for_read(fname);
     }
     else if (pathname(name)) {
         /* filename already has the path specified */
@@ -145,7 +146,7 @@ build_ht_filename(char *fname, char *aname, char *name)
         extend_ht(fname);
 
         /* Now just try to access the file */
-        return (access(fname, R_OK));
+        return oa_access_file_for_read(fname);
     }
     else {/** If not I am going to have to append path names to it **/
         HTPATH = (char *) getenv("HTPATH");
@@ -175,13 +176,15 @@ build_ht_filename(char *fname, char *aname, char *name)
             *trace = 0;
             if (!strcmp(fname, "./")) {
                 /** The person wishes me to check the current directory too **/
-                getcwd(fname, 256);
-                strcat(fname, "/");
+               c_dir = oa_getcwd();
+               strcpy(fname,c_dir);
+               free(c_dir);
+               strcat(fname, "/");
             }
             if (*trace2)
                 trace2++;
             strcat(fname, aname);
-            ht_file = access(fname, R_OK);
+            ht_file = oa_access_file_for_read(fname);
         }
         return (ht_file);
     }
@@ -303,8 +306,8 @@ temp_file_open(char *temp_db_file)
 
     /** Just make the name and open it **/
 
-    strcpy(temp_db_file, temp_dir);
-    strcat(temp_db_file, "ht2.db" /* db_file_name */ );
+    strcpy(temp_db_file, oa_get_tmpdir());
+    strcat(temp_db_file, "/ht2.db" /* db_file_name */ );
     temp_db_fp = fopen(temp_db_file, "w");
 
     if (temp_db_fp == NULL) {
diff --git a/src/hyper/htadd.c b/src/hyper/htadd.c
index 2c0a1990..18345d8f 100644
--- a/src/hyper/htadd.c
+++ b/src/hyper/htadd.c
@@ -211,8 +211,8 @@ build_db_filename(short flag, char *db_dir, char *dbfilename)
         SPAD = (char *) getenv("AXIOM");
         if (SPAD == NULL) {
             fprintf(stderr,
-                    "Build_db_filename: Defaulting on $AXIOM\n");
-            SPAD = (char *) def_spad;
+                    "build_db_filename: cannot find system root directory\n");
+            exit(-1);
         }
         sprintf(dbfilename, "%s/share/hypertex/pages/%s", SPAD, db_file_name);
         sprintf(path, "%s/share/hypertex/pages", SPAD);
diff --git a/src/hyper/hyper.h b/src/hyper/hyper.h
index 7107d7d3..cbb2b506 100644
--- a/src/hyper/hyper.h
+++ b/src/hyper/hyper.h
@@ -446,9 +446,7 @@ extern int space_width;
       htadd.c                                                    ******/
 
 #define NoChar   -9999
-#define temp_dir "/tmp/"
 #define db_file_name "ht.db"
-#define def_spad "/usr/local/axiom"
 
 
 /* Types of HyperDoc pages */