aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorBruce Momjian <bruce@momjian.us>1997-11-21 18:22:04 +0000
committerBruce Momjian <bruce@momjian.us>1997-11-21 18:22:04 +0000
commit629e27284d78fd2d77f63563c2aa298e930dd0fd (patch)
treed226198c0460863b279b1dfe6e4fcafefe623ec6 /src
parent3fa2bb316c92b2c332d18072799d585ab795f131 (diff)
downloadpostgresql-629e27284d78fd2d77f63563c2aa298e930dd0fd.tar.gz
postgresql-629e27284d78fd2d77f63563c2aa298e930dd0fd.zip
Remove unused files.
Diffstat (limited to 'src')
-rw-r--r--src/backend/commands/purge.c176
-rw-r--r--src/backend/executor/execAmi.c8
-rw-r--r--src/include/commands/purge.h0
-rw-r--r--src/include/parser/sysfunc.h0
-rw-r--r--src/man/purge.l0
5 files changed, 3 insertions, 181 deletions
diff --git a/src/backend/commands/purge.c b/src/backend/commands/purge.c
deleted file mode 100644
index b0f67366265..00000000000
--- a/src/backend/commands/purge.c
+++ /dev/null
@@ -1,176 +0,0 @@
-/*-------------------------------------------------------------------------
- *
- * purge.c--
- * the POSTGRES purge command.
- *
- * Copyright (c) 1994, Regents of the University of California
- *
- *
- * IDENTIFICATION
- * $Header: /cvsroot/pgsql/src/backend/commands/Attic/purge.c,v 1.9 1997/11/20 23:21:08 momjian Exp $
- *
- * Note:
- * XXX There are many instances of int32 instead of ...Time. These
- * should be changed once it is decided the signed'ness will be.
- *
- *-------------------------------------------------------------------------
- */
-#include <string.h>
-
-#include <postgres.h>
-
-#include <access/heapam.h>
-#include <access/xact.h>
-#include <utils/tqual.h> /* for NowTimeQual */
-#include <catalog/catname.h>
-#include <catalog/indexing.h>
-#include <fmgr.h>
-#include <commands/purge.h>
-#include <utils/builtins.h> /* for isreltime() */
-
-static char cmdname[] = "RelationPurge";
-
-#define RELATIVE 01
-#define ABSOLUTE 02
-
-int32
-RelationPurge(char *relationName,
- char *absoluteTimeString,
- char *relativeTimeString)
-{
- register i;
- AbsoluteTime absoluteTime = INVALID_ABSTIME;
- RelativeTime relativeTime = INVALID_RELTIME;
- bits8 dateTag;
- Relation relation;
- HeapScanDesc scan;
- static ScanKeyData key[1] = {
- {0, Anum_pg_class_relname, F_NAMEEQ}
- };
- Buffer buffer;
- HeapTuple newTuple,
- oldTuple;
- AbsoluteTime currentTime;
- char *values[Natts_pg_class];
- char nulls[Natts_pg_class];
- char replace[Natts_pg_class];
- Relation idescs[Num_pg_class_indices];
-
- /*
- * XXX for some reason getmyrelids (in inval.c) barfs when you
- * heap_replace tuples from these classes. i thought setheapoverride
- * would fix it but it didn't. for now, just disallow purge on these
- * classes.
- */
- if (strcmp(RelationRelationName, relationName) == 0 ||
- strcmp(AttributeRelationName, relationName) == 0 ||
- strcmp(AccessMethodRelationName, relationName) == 0 ||
- strcmp(AccessMethodOperatorRelationName, relationName) == 0)
- {
- elog(WARN, "%s: cannot purge catalog \"%s\"",
- cmdname, relationName);
- }
-
- if (PointerIsValid(absoluteTimeString))
- {
- absoluteTime = (int32) nabstimein(absoluteTimeString);
- absoluteTimeString[0] = '\0';
- if (absoluteTime == INVALID_ABSTIME)
- {
- elog(NOTICE, "%s: bad absolute time string \"%s\"",
- cmdname, absoluteTimeString);
- elog(WARN, "purge not executed");
- }
- }
-
-#ifdef PURGEDEBUG
- elog(DEBUG, "%s: absolute time `%s' is %d.",
- cmdname, absoluteTimeString, absoluteTime);
-#endif /* defined(PURGEDEBUG) */
-
- if (PointerIsValid(relativeTimeString))
- {
- if (isreltime(relativeTimeString) != 1)
- {
- elog(WARN, "%s: bad relative time string \"%s\"",
- cmdname, relativeTimeString);
- }
- relativeTime = reltimein(relativeTimeString);
-
-#ifdef PURGEDEBUG
- elog(DEBUG, "%s: relative time `%s' is %d.",
- cmdname, relativeTimeString, relativeTime);
-#endif /* defined(PURGEDEBUG) */
- }
-
- /*
- * Find the RELATION relation tuple for the given relation.
- */
- relation = heap_openr(RelationRelationName);
- key[0].sk_argument = PointerGetDatum(relationName);
- fmgr_info(key[0].sk_procedure, &key[0].sk_func, &key[0].sk_nargs);
-
- scan = heap_beginscan(relation, 0, false, 1, key);
- oldTuple = heap_getnext(scan, 0, &buffer);
- if (!HeapTupleIsValid(oldTuple))
- {
- heap_endscan(scan);
- heap_close(relation);
- elog(WARN, "%s: no such relation: %s", cmdname, relationName);
- return (0);
- }
-
- /*
- * Dig around in the tuple.
- */
- currentTime = GetCurrentTransactionStartTime();
- if (!RelativeTimeIsValid(relativeTime))
- {
- dateTag = ABSOLUTE;
- if (!AbsoluteTimeIsValid(absoluteTime))
- absoluteTime = currentTime;
- }
- else if (!AbsoluteTimeIsValid(absoluteTime))
- dateTag = RELATIVE;
- else
- dateTag = ABSOLUTE | RELATIVE;
-
- for (i = 0; i < Natts_pg_class; ++i)
- {
- nulls[i] = heap_attisnull(oldTuple, i + 1) ? 'n' : ' ';
- values[i] = NULL;
- replace[i] = ' ';
- }
- if (dateTag & ABSOLUTE)
- {
- values[Anum_pg_class_relexpires - 1] =
- (char *) UInt32GetDatum(absoluteTime);
- replace[Anum_pg_class_relexpires - 1] = 'r';
- }
- if (dateTag & RELATIVE)
- {
- values[Anum_pg_class_relpreserved - 1] =
- (char *) UInt32GetDatum(relativeTime);
- replace[Anum_pg_class_relpreserved - 1] = 'r';
- }
-
- /*
- * Change the RELATION relation tuple for the given relation.
- */
- newTuple = heap_modifytuple(oldTuple, buffer, relation, (Datum *) values,
- nulls, replace);
-
- /* XXX How do you detect an insertion error?? */
- heap_replace(relation, &newTuple->t_ctid, newTuple);
-
- /* keep the system catalog indices current */
- CatalogOpenIndices(Num_pg_class_indices, Name_pg_class_indices, idescs);
- CatalogIndexInsert(idescs, Num_pg_class_indices, relation, newTuple);
- CatalogCloseIndices(Num_pg_class_indices, idescs);
-
- pfree(newTuple);
-
- heap_endscan(scan);
- heap_close(relation);
- return (1);
-}
diff --git a/src/backend/executor/execAmi.c b/src/backend/executor/execAmi.c
index bffb0f26eb4..6da5fe1ef5c 100644
--- a/src/backend/executor/execAmi.c
+++ b/src/backend/executor/execAmi.c
@@ -7,7 +7,7 @@
*
*
* IDENTIFICATION
- * $Header: /cvsroot/pgsql/src/backend/executor/execAmi.c,v 1.9 1997/11/20 23:21:22 momjian Exp $
+ * $Header: /cvsroot/pgsql/src/backend/executor/execAmi.c,v 1.10 1997/11/21 18:21:17 momjian Exp $
*
*-------------------------------------------------------------------------
*/
@@ -446,10 +446,8 @@ ExecCreatR(TupleDesc tupType,
* heap_creatr creates a name if the argument to heap_creatr is
* '\0 '
*/
- relDesc = heap_creatr("",
- DEFAULT_SMGR,
- tupType);
- }
+ relDesc = heap_creatr("", tupType);
+ }
else
{
/* ----------------
diff --git a/src/include/commands/purge.h b/src/include/commands/purge.h
deleted file mode 100644
index e69de29bb2d..00000000000
--- a/src/include/commands/purge.h
+++ /dev/null
diff --git a/src/include/parser/sysfunc.h b/src/include/parser/sysfunc.h
deleted file mode 100644
index e69de29bb2d..00000000000
--- a/src/include/parser/sysfunc.h
+++ /dev/null
diff --git a/src/man/purge.l b/src/man/purge.l
deleted file mode 100644
index e69de29bb2d..00000000000
--- a/src/man/purge.l
+++ /dev/null