1 /*-------------------------------------------------------------------------
4 * Functions to extract a raw page as bytea and inspect it
6 * Access-method specific inspection functions are in separate files.
8 * Copyright (c) 2007-2008, PostgreSQL Global Development Group
11 * $PostgreSQL: pgsql/contrib/pageinspect/rawpage.c,v 1.7 2008/09/30 10:52:09 heikki Exp $
13 *-------------------------------------------------------------------------
18 #include "access/heapam.h"
19 #include "access/transam.h"
20 #include "catalog/namespace.h"
21 #include "catalog/pg_type.h"
24 #include "miscadmin.h"
25 #include "storage/bufmgr.h"
26 #include "utils/builtins.h"
30 Datum get_raw_page(PG_FUNCTION_ARGS);
31 Datum page_header(PG_FUNCTION_ARGS);
36 * Returns a copy of a page from shared buffers as a bytea
38 PG_FUNCTION_INFO_V1(get_raw_page);
41 get_raw_page(PG_FUNCTION_ARGS)
43 text *relname = PG_GETARG_TEXT_P(0);
44 uint32 forknum = PG_GETARG_UINT32(1);
45 uint32 blkno = PG_GETARG_UINT32(2);
55 (errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
56 (errmsg("must be superuser to use raw functions"))));
58 if (forknum > MAX_FORKNUM)
60 (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
61 errmsg("invalid fork number")));
63 relrv = makeRangeVarFromNameList(textToQualifiedNameList(relname));
64 rel = relation_openrv(relrv, AccessShareLock);
66 /* Check that this relation has storage */
67 if (rel->rd_rel->relkind == RELKIND_VIEW)
69 (errcode(ERRCODE_WRONG_OBJECT_TYPE),
70 errmsg("cannot get raw page from view \"%s\"",
71 RelationGetRelationName(rel))));
72 if (rel->rd_rel->relkind == RELKIND_COMPOSITE_TYPE)
74 (errcode(ERRCODE_WRONG_OBJECT_TYPE),
75 errmsg("cannot get raw page from composite type \"%s\"",
76 RelationGetRelationName(rel))));
78 if (blkno >= RelationGetNumberOfBlocks(rel))
79 elog(ERROR, "block number %u is out of range for relation \"%s\"",
80 blkno, RelationGetRelationName(rel));
82 /* Initialize buffer to copy to */
83 raw_page = (bytea *) palloc(BLCKSZ + VARHDRSZ);
84 SET_VARSIZE(raw_page, BLCKSZ + VARHDRSZ);
85 raw_page_data = VARDATA(raw_page);
87 /* Take a verbatim copy of the page */
89 buf = ReadBufferWithFork(rel, forknum, blkno);
90 LockBuffer(buf, BUFFER_LOCK_SHARE);
92 memcpy(raw_page_data, BufferGetPage(buf), BLCKSZ);
94 LockBuffer(buf, BUFFER_LOCK_UNLOCK);
97 relation_close(rel, AccessShareLock);
99 PG_RETURN_BYTEA_P(raw_page);
105 * Allows inspection of page header fields of a raw page
108 PG_FUNCTION_INFO_V1(page_header);
111 page_header(PG_FUNCTION_ARGS)
113 bytea *raw_page = PG_GETARG_BYTEA_P(0);
129 (errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
130 (errmsg("must be superuser to use raw page functions"))));
132 raw_page_size = VARSIZE(raw_page) - VARHDRSZ;
135 * Check that enough data was supplied, so that we don't try to access
136 * fields outside the supplied buffer.
138 if (raw_page_size < sizeof(PageHeaderData))
140 (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
141 errmsg("input page too small (%d bytes)", raw_page_size)));
143 page = (PageHeader) VARDATA(raw_page);
145 /* Build a tuple descriptor for our result type */
146 if (get_call_result_type(fcinfo, NULL, &tupdesc) != TYPEFUNC_COMPOSITE)
147 elog(ERROR, "return type must be a row type");
149 /* Extract information from the page header */
151 lsn = PageGetLSN(page);
152 snprintf(lsnchar, sizeof(lsnchar), "%X/%X", lsn.xlogid, lsn.xrecoff);
154 values[0] = CStringGetTextDatum(lsnchar);
155 values[1] = UInt16GetDatum(PageGetTLI(page));
156 values[2] = UInt16GetDatum(page->pd_flags);
157 values[3] = UInt16GetDatum(page->pd_lower);
158 values[4] = UInt16GetDatum(page->pd_upper);
159 values[5] = UInt16GetDatum(page->pd_special);
160 values[6] = UInt16GetDatum(PageGetPageSize(page));
161 values[7] = UInt16GetDatum(PageGetPageLayoutVersion(page));
162 values[8] = TransactionIdGetDatum(page->pd_prune_xid);
164 /* Build and return the tuple. */
166 memset(nulls, 0, sizeof(nulls));
168 tuple = heap_form_tuple(tupdesc, values, nulls);
169 result = HeapTupleGetDatum(tuple);
171 PG_RETURN_DATUM(result);