Split 'BufFile' routines out of fd.c into a new module, buffile.c. Extend

BufFile so that it handles multi-segment temporary files transparently.
This allows sorts and hashes to work with data exceeding 2Gig (or whatever
the local limit on file size is).  Change psort.c to use relative seeks
instead of absolute seeks for backwards scanning, so that it won't fail
when the data volume exceeds 2Gig.

Author: tglsfdc

src/backend/executor/nodeHash.c

@@ -6,7 +6,7 @@
  * Copyright (c) 1994, Regents of the University of California
  *
  *
- *	$Id: nodeHash.c,v 1.38 1999/07/17 20:16:58 momjian Exp $
+ *	$Id: nodeHash.c,v 1.39 1999/10/13 15:02:25 tgl Exp $
  *
  *-------------------------------------------------------------------------
  */
@@ -75,12 +75,7 @@ ExecHash(Hash *node)
 		 * ----------------
 		 */
 		for (i = 0; i < nbatch; i++)
-		{
-			File		tfile = OpenTemporaryFile();
-
-			Assert(tfile >= 0);
-			hashtable->innerBatchFile[i] = BufFileCreate(tfile);
-		}
+			hashtable->innerBatchFile[i] = BufFileCreateTemp();
 	}
 
 	/* ----------------

src/backend/executor/nodeHashjoin.c

@@ -7,7 +7,7 @@
  *
  *
  * IDENTIFICATION
- *	  $Header: /cvsroot/pgsql/src/backend/executor/nodeHashjoin.c,v 1.26 1999/07/17 20:16:58 momjian Exp $
+ *	  $Header: /cvsroot/pgsql/src/backend/executor/nodeHashjoin.c,v 1.27 1999/10/13 15:02:25 tgl Exp $
  *
  *-------------------------------------------------------------------------
  */
@@ -129,12 +129,7 @@ ExecHashJoin(HashJoin *node)
 		 * ----------------
 		 */
 		for (i = 0; i < hashtable->nbatch; i++)
-		{
-			File		tfile = OpenTemporaryFile();
-
-			Assert(tfile >= 0);
-			hashtable->outerBatchFile[i] = BufFileCreate(tfile);
-		}
+			hashtable->outerBatchFile[i] = BufFileCreateTemp();
 	}
 	else if (hashtable == NULL)
 		return NULL;
@@ -551,13 +546,12 @@ ExecHashJoinNewBatch(HashJoinState *hjstate)
 	 * Rewind inner and outer batch files for this batch, so that we can
 	 * start reading them.
 	 */
-	if (BufFileSeek(hashtable->outerBatchFile[newbatch - 1], 0L,
-					SEEK_SET) != 0L)
+	if (BufFileSeek(hashtable->outerBatchFile[newbatch - 1], 0, 0L, SEEK_SET))
 		elog(ERROR, "Failed to rewind hash temp file");
 
 	innerFile = hashtable->innerBatchFile[newbatch - 1];
 
-	if (BufFileSeek(innerFile, 0L, SEEK_SET) != 0L)
+	if (BufFileSeek(innerFile, 0, 0L, SEEK_SET))
 		elog(ERROR, "Failed to rewind hash temp file");
 
 	/*

src/backend/storage/file/Makefile

@@ -4,7 +4,7 @@
 #    Makefile for storage/file
 #
 # IDENTIFICATION
-#    $Header: /cvsroot/pgsql/src/backend/storage/file/Makefile,v 1.5 1998/04/06 00:25:05 momjian Exp $
+#    $Header: /cvsroot/pgsql/src/backend/storage/file/Makefile,v 1.6 1999/10/13 15:02:29 tgl Exp $
 #
 #-------------------------------------------------------------------------
 
@@ -13,7 +13,7 @@ include ../../../Makefile.global
 
 CFLAGS += -I../..
 
-OBJS = fd.o
+OBJS = fd.o buffile.o
 
 all: SUBSYS.o