Add functions to /contrib/pgstattuple that show index statistics and

index page contents.

Satoshi Nagayasu

contrib/pgstattuple/Makefile

@@ -2,11 +2,11 @@
 #
 # pgstattuple Makefile
 #
-# $PostgreSQL: pgsql/contrib/pgstattuple/Makefile,v 1.5 2006/02/27 12:54:39 petere Exp $
+# $PostgreSQL: pgsql/contrib/pgstattuple/Makefile,v 1.6 2006/09/02 17:05:29 momjian Exp $
 #
 #-------------------------------------------------------------------------
 
-SRCS		= pgstattuple.c
+SRCS		= pgstattuple.c pgstatindex.c
 
 MODULE_big	= pgstattuple
 OBJS		= $(SRCS:.c=.o)

contrib/pgstattuple/README.pgstattuple

 pgstattuple README			2002/08/29 Tatsuo Ishii
 
-1. What is pgstattuple?
+1. Functions supported:
 
-   pgstattuple returns the relation length, percentage of the "dead"
+    pgstattuple
+    -----------
+    pgstattuple() returns the relation length, percentage of the "dead"
     tuples of a relation and other info. This may help users to determine
     whether vacuum is necessary or not. Here is an example session:
 
-test=# \x
-Expanded display is on.
-test=# select * from pgstattuple('pg_catalog.pg_proc');
--[ RECORD 1 ]------+-------
-table_len          | 458752
-tuple_count        | 1470
-tuple_len          | 438896
-tuple_percent      | 95.67
-dead_tuple_count   | 11
-dead_tuple_len     | 3157
-dead_tuple_percent | 0.69
-free_space         | 8932
-free_percent       | 1.95
-
-
-Here are explanations for each column:
-
-table_len		-- physical relation length in bytes
-tuple_count		-- number of live tuples
-tuple_len		-- total tuples length in bytes
-tuple_percent		-- live tuples in %
-dead_tuple_len		-- total dead tuples length in bytes
-dead_tuple_percent	-- dead tuples in %
-free_space		-- free space in bytes
-free_percent		-- free space in %
+        test=> \x
+        Expanded display is on.
+        test=> SELECT * FROM pgstattuple('pg_catalog.pg_proc');
+        -[ RECORD 1 ]------+-------
+        table_len          | 458752
+        tuple_count        | 1470
+        tuple_len          | 438896
+        tuple_percent      | 95.67
+        dead_tuple_count   | 11
+        dead_tuple_len     | 3157
+        dead_tuple_percent | 0.69
+        free_space         | 8932
+        free_percent       | 1.95
+
+    Here are explanations for each column:
+
+        table_len		-- physical relation length in bytes
+        tuple_count		-- number of live tuples
+        tuple_len		-- total tuples length in bytes
+        tuple_percent	-- live tuples in %
+        dead_tuple_len	-- total dead tuples length in bytes
+        dead_tuple_percent	-- dead tuples in %
+        free_space		-- free space in bytes
+        free_percent	-- free space in %
+
+    pg_relpages
+    -----------
+    pg_relpages() returns the number of pages in the relation.
+
+    pgstatindex
+    -----------
+    pgstatindex() returns an array showing the information about an index:
+
+        test=> \x
+        Expanded display is on.
+        test=> SELECT * FROM pgstatindex('pg_cast_oid_index');
+        -[ RECORD 1 ]------+------
+        version            | 2
+        tree_level         | 0
+        index_size         | 8192
+        root_block_no      | 1
+        internal_pages     | 0
+        leaf_pages         | 1
+        empty_pages        | 0
+        deleted_pages      | 0
+        avg_leaf_density   | 50.27
+        leaf_fragmentation | 0
+
+    bt_metap
+    --------
+    bt_metap() returns information about the btree index metapage:
+
+        test=> SELECT * FROM bt_metap('pg_cast_oid_index');
+        -[ RECORD 1 ]-----
+        magic     | 340322
+        version   | 2
+        root      | 1
+        level     | 0
+        fastroot  | 1
+        fastlevel | 0
+
+    bt_page_stats
+    -------------
+    bt_page_stats() shows information about single btree pages:
+
+        test=> SELECT * FROM bt_page_stats('pg_cast_oid_index', 1);
+        -[ RECORD 1 ]-+-----
+        blkno         | 1
+        type          | l
+        live_items    | 256
+        dead_items    | 0
+        avg_item_size | 12
+        page_size     | 8192
+        free_size     | 4056
+        btpo_prev     | 0
+        btpo_next     | 0
+        btpo          | 0
+        btpo_flags    | 3
+
+    bt_page_items
+    -------------
+    bt_page_items() returns information about specific items on btree pages:
+
+        test=> SELECT * FROM bt_page_items('pg_cast_oid_index', 1);
+         itemoffset |  ctid   | itemlen | nulls | vars |    data
+        ------------+---------+---------+-------+------+-------------
+                  1 | (0,1)   |      12 | f     | f    | 23 27 00 00
+                  2 | (0,2)   |      12 | f     | f    | 24 27 00 00
+                  3 | (0,3)   |      12 | f     | f    | 25 27 00 00
+                  4 | (0,4)   |      12 | f     | f    | 26 27 00 00
+                  5 | (0,5)   |      12 | f     | f    | 27 27 00 00
+                  6 | (0,6)   |      12 | f     | f    | 28 27 00 00
+                  7 | (0,7)   |      12 | f     | f    | 29 27 00 00
+                  8 | (0,8)   |      12 | f     | f    | 2a 27 00 00
+
 
 2. Installing pgstattuple
 
@@ -38,6 +110,7 @@ free_percent		-- free space in %
     $ make install
     $ psql -e -f /usr/local/pgsql/share/contrib/pgstattuple.sql test
 
+
 3. Using pgstattuple
 
     pgstattuple may be called as a relation function and is
@@ -55,6 +128,7 @@ free_percent		-- free space in %
     or the OID of the relation.  Note that pgstattuple only returns
     one row.
 
+
 4. Notes
 
     pgstattuple acquires only a read lock on the relation. So concurrent
@@ -63,6 +137,7 @@ free_percent		-- free space in %
     pgstattuple judges a tuple is "dead" if HeapTupleSatisfiesNow()
     returns false.
 
+
 5. History
 
     2006/06/28

contrib/pgstattuple/pgstattuple.sql.in

@@ -22,3 +22,96 @@ CREATE OR REPLACE FUNCTION pgstattuple(oid)
 RETURNS pgstattuple_type
 AS 'MODULE_PATHNAME', 'pgstattuplebyid'
 LANGUAGE C STRICT;
+
+--
+-- pgstatindex
+--
+DROP TYPE pgstatindex_type CASCADE;
+CREATE TYPE pgstatindex_type AS (
+  version int4,
+  tree_level int4,
+  index_size int4,
+  root_block_no int4,
+  internal_pages int4,
+  leaf_pages int4,
+  empty_pages int4,
+  deleted_pages int4,
+  avg_leaf_density float8,
+  leaf_fragmentation float8
+);
+
+CREATE OR REPLACE FUNCTION pgstatindex(text)
+RETURNS pgstatindex_type
+AS 'MODULE_PATHNAME', 'pgstatindex'
+LANGUAGE 'C' STRICT;
+
+--
+-- bt_metap()
+--
+DROP TYPE bt_metap_type CASCADE;
+CREATE TYPE bt_metap_type AS (
+  magic int4,
+  version int4,
+  root int4,
+  level int4,
+  fastroot int4,
+  fastlevel int4
+);
+
+CREATE OR REPLACE FUNCTION bt_metap(text)
+RETURNS bt_metap_type
+AS 'MODULE_PATHNAME', 'bt_metap'
+LANGUAGE 'C' STRICT;
+
+--
+-- bt_page_stats()
+--
+DROP TYPE bt_page_stats_type CASCADE;
+CREATE TYPE bt_page_stats_type AS (
+  blkno int4,
+  type char,
+  live_items int4,
+  dead_items int4,
+  avg_item_size float,
+  page_size int4,
+  free_size int4,
+  btpo_prev int4,
+  btpo_next int4,
+  btpo int4,
+  btpo_flags int4
+);
+
+DROP FUNCTION bt_page_stats(text, int4);
+
+CREATE OR REPLACE FUNCTION bt_page_stats(text, int4)
+RETURNS bt_page_stats_type
+AS 'MODULE_PATHNAME', 'bt_page_stats'
+LANGUAGE 'C' STRICT;
+
+--
+-- bt_page_items()
+--
+DROP TYPE bt_page_items_type CASCADE;
+CREATE TYPE bt_page_items_type AS (
+  itemoffset int4,
+  ctid tid,
+  itemlen int4,
+  nulls bool,
+  vars bool,
+  data text
+);
+
+DROP FUNCTION bt_page_items(text, int4);
+
+CREATE OR REPLACE FUNCTION bt_page_items(text, int4)
+RETURNS SETOF bt_page_items_type
+AS 'MODULE_PATHNAME', 'bt_page_items'
+LANGUAGE 'C' STRICT;
+
+--
+-- pg_relpages()
+--
+CREATE OR REPLACE FUNCTION pg_relpages(text)
+RETURNS int
+AS 'MODULE_PATHNAME', 'pg_relpages'
+LANGUAGE 'C' STRICT;