mirror of
https://github.com/postgres/postgres.git
synced 2025-07-20 05:03:10 +03:00
Adapt for SRF(Set Returning Function).
This commit is contained in:
Tatsuo Ishii
@ -1,27 +1,36 @@
|
||||
pgstattuple README 2001/10/01 Tatsuo Ishii
|
||||
pgstattuple README 2002/08/22 Tatsuo Ishii
|
||||
|
||||
1. What is pgstattuple?
|
||||
|
||||
pgstattuple returns the percentage of the "dead" tuples of a
|
||||
table. This will help users to judge if vacuum is needed.
|
||||
pgstattuple returns the table length, percentage of the "dead"
|
||||
tuples of a table and other info. This may help users to determine
|
||||
whether vacuum is necessary or not. Here is an example session:
|
||||
|
||||
In addition, pgstattuple prints more detailed information using
|
||||
NOTICE.
|
||||
test=# \x
|
||||
Expanded display is on.
|
||||
test=# select * from pgstattuple('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
|
||||
|
||||
test=# select pgstattuple('tellers');
|
||||
NOTICE: physical length: 0.08MB live tuples: 20 (0.00MB, 1.17%) dead tuples: 320 (0.01MB, 18.75%) free/reusable space: 0.01MB (18.06%) overhead: 62.02%
|
||||
pgstattuple
|
||||
-------------
|
||||
18.75
|
||||
(1 row)
|
||||
|
||||
Above example shows tellers table includes 18.75% dead tuples.
|
||||
Here are explanations for each column:
|
||||
|
||||
physical length physical size of the table in MB
|
||||
live tuples information on the live tuples
|
||||
dead tuples information on the dead tuples
|
||||
free/reusable space available space
|
||||
overhead overhead space
|
||||
table_len -- physical table 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 %
|
||||
|
||||
2. Installing pgstattuple
|
||||
|
||||
@ -31,12 +40,15 @@ NOTICE: physical length: 0.08MB live tuples: 20 (0.00MB, 1.17%) dead tuples: 32
|
||||
|
||||
3. Using pgstattuple
|
||||
|
||||
pgstattuple can be called as a function:
|
||||
pgstattuple may be called as a SRF (set returning function) and is
|
||||
defined as follows:
|
||||
|
||||
pgstattuple(TEXT) RETURNS FLOAT8
|
||||
CREATE OR REPLACE FUNCTION pgstattuple(text) RETURNS SETOF pgstattuple_view
|
||||
AS 'MODULE_PATHNAME', 'pgstattuple'
|
||||
LANGUAGE 'c' WITH (isstrict);
|
||||
|
||||
The argument is the table name. pgstattuple returns the percentage
|
||||
of the "dead" tuples of a table.
|
||||
The argument is the table name. Note that pgstattuple never
|
||||
returns more than 1 tuple.
|
||||
|
||||
4. Notes
|
||||
|
||||
|
||||
@ -1,34 +1,39 @@
|
||||
$Id: README.pgstattuple.euc_jp,v 1.2 2001/12/20 01:56:08 ishii Exp $
|
||||
$Id: README.pgstattuple.euc_jp,v 1.3 2002/08/23 08:19:49 ishii Exp $
|
||||
|
||||
pgstattuple README 2001/10/01 <20>а<EFBFBD>ã<EFBFBD><C3A3>
|
||||
pgstattuple README 2002/08/22 <20>а<EFBFBD>ã<EFBFBD><C3A3>
|
||||
|
||||
1. pgstattuple<6C>Ȥ<EFBFBD>
|
||||
|
||||
pgstattuple<6C>ϡ<EFBFBD>UPDATE<54><45>DELETE<54>Ǻ<EFBFBD><C7BA><EFBFBD><EFBFBD>줿<EFBFBD>ơ<EFBFBD><C6A1>֥<EFBFBD><D6A5>Υ<EFBFBD><CEA5><EFBFBD><EFBFBD>ΰ<EFBFBD><CEB0><EFBFBD><EFBFBD>礭<EFBFBD><E7A4AD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
<20>ơ<EFBFBD><C6A1>֥뼫<D6A5>Τ<EFBFBD>ʪ<EFBFBD><CAAA>Ū<EFBFBD><C5AA><EFBFBD>礭<EFBFBD><E7A4AD><EFBFBD><EFBFBD><EFBFBD>Ф<EFBFBD><D0A4><EFBFBD><EFBFBD>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ơ<EFBFBD><C6A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ֵѤ<D6B5><D1A4>ޤ<EFBFBD><DEA4><EFBFBD><EFBFBD><EFBFBD>
|
||||
<20>ޤꡤ<DEA4>ֵ<EFBFBD><D6B5>ͤ<EFBFBD><CDA4>礭<EFBFBD><E7A4AD><EFBFBD><EFBFBD><EFBFBD>С<EFBFBD><D0A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ߤ<EFBFBD>¿<EFBFBD><C2BF><EFBFBD>Τǡ<CEA4>vacuum<75><EFBFBD><F2A4ABA4><EFBFBD>ɬ
|
||||
<20>פ<EFBFBD><D7A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȥ<EFBFBD><C8A4><EFBFBD>Ƚ<EFBFBD>Ǥν<C7A4><CEBD><EFBFBD><EFBFBD>ˤʤ<CBA4><CAA4>櫓<EFBFBD>Ǥ<EFBFBD><C7A4><EFBFBD>
|
||||
<20>פ<EFBFBD><D7A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ȥ<EFBFBD><C8A4><EFBFBD>Ƚ<EFBFBD>Ǥν<C7A4><CEBD><EFBFBD><EFBFBD>ˤʤ<CBA4><CAA4>櫓<EFBFBD>Ǥ<EFBFBD><C7A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʳ<EFBFBD><EFBFBD>ˤ⤤<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʾ<EFBFBD><EFBFBD><EFBFBD>
|
||||
<20><><EFBFBD>֤<EFBFBD><D6A4>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||
|
||||
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ǤϾ<C7A4><CFBE><EFBFBD><EFBFBD>̤<EFBFBD><CCA4><EFBFBD><EFBFBD>ʤ<EFBFBD><CAA4>Τǡ<CEA4>NOTICE<43><45><EFBFBD>å<EFBFBD><C3A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ǥ<EFBFBD><C7A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
<20><><EFBFBD>Ǥ˽<C7A4><CBBD>Ϥ<EFBFBD><CFA4>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||
test=# \x
|
||||
Expanded display is on.
|
||||
test=# select * from pgstattuple('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
|
||||
|
||||
test=# select pgstattuple('tellers');
|
||||
NOTICE: physical length: 0.08MB live tuples: 20 (0.00MB, 1.17%) dead tuples: 320 (0.01MB, 18.75%) free/reusable space: 0.01MB (18.06%) overhead: 62.02%
|
||||
pgstattuple
|
||||
-------------
|
||||
18.75
|
||||
(1 row)
|
||||
<EFBFBD>ƹ<EFBFBD><EFBFBD>ܤ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ǥ<EFBFBD><EFBFBD><EFBFBD>
|
||||
|
||||
<20><><EFBFBD>μ¹<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ǥϡ<EFBFBD>19%<25>ۤɤ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ߤˤʤäƤ<EFBFBD><EFBFBD>뤳<EFBFBD>Ȥ<EFBFBD><EFBFBD>Ǥ<EFBFBD><EFBFBD>ޤ<EFBFBD><EFBFBD><EFBFBD>NOTICE<EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>θ<EFBFBD><CEB8><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ƥ<F1A4A4A4><C6A4><EFBFBD><EFBFBD>ޤ<EFBFBD><EFBFBD><EFBFBD>
|
||||
|
||||
physical length <09>ơ<EFBFBD><EFBFBD>֥<EFBFBD><EFBFBD><EFBFBD>ʪ<EFBFBD><EFBFBD>Ū<EFBFBD>ʥ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>MBñ<EFBFBD>̤<EFBFBD>ɽ<EFBFBD><EFBFBD>
|
||||
live tuples <09><><EFBFBD>ߤǤϤʤ<CFA4><CAA4><EFBFBD><EFBFBD>ץ<EFBFBD><D7A5>˴ؤ<CBB4><D8A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ץ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
<09><><EFBFBD>ץ뤬<D7A5><EBA4AC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ΰ<EFBFBD><CEB0>ι<EFBFBD><CEB9>ס<EFBFBD><D7A1>ơ<EFBFBD><EFBFBD>֥<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Τ<EFBFBD><EFBFBD>Ф<EFBFBD><EFBFBD><EFBFBD>
|
||||
<EFBFBD><EFBFBD>Ψ<EFBFBD><EFBFBD>ɽ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ޤ<EFBFBD><EFBFBD><EFBFBD>
|
||||
dead tuples <09><><EFBFBD>ߤˤʤä<CAA4><C3A4><EFBFBD><EFBFBD>ץ<EFBFBD><D7A5>˴ؤ<CBB4><D8A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
free/reusable space <09><><EFBFBD>Ѳ<EFBFBD>ǽ<EFBFBD><C7BD>̤<EFBFBD><CCA4><EFBFBD><EFBFBD><EFBFBD>ΰ<EFBFBD><CEB0><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ѳ<EFBFBD>ǽ<EFBFBD>ΰ<EFBFBD>
|
||||
overhead <09><><EFBFBD><EFBFBD><EFBFBD>Τ<EFBFBD><CEA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ΰ褬<CEB0>ơ<EFBFBD><C6A1>֥<EFBFBD><D6A5><EFBFBD><EFBFBD>Τ<EFBFBD><CEA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ψ
|
||||
table_len -- <20>ơ<EFBFBD><EFBFBD>֥<EFBFBD><EFBFBD><EFBFBD>ʪ<EFBFBD><EFBFBD>Ū<EFBFBD><EFBFBD><EFBFBD>礭<EFBFBD><EFBFBD>(<28>Х<EFBFBD><EFBFBD><EFBFBD>)
|
||||
tuple_count -- <20><><EFBFBD>ץ<EFBFBD><EFBFBD><EFBFBD>
|
||||
tuple_len -- <20><><EFBFBD>ץ<EFBFBD>Ĺ<EFBFBD>ι<EFBFBD><CEB9><EFBFBD>(<28>Х<EFBFBD><D0A5><EFBFBD>)
|
||||
tuple_percent -- <20><EFBFBD><EFBFBD>ץ<EFBFBD><EFBFBD>γ<EFBFBD><EFBFBD>硥table_len<EFBFBD><EFBFBD><EFBFBD>Ф<EFBFBD><EFBFBD><EFBFBD>tuple_len<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ψ<EFBFBD><EFBFBD>
|
||||
dead_tuple_len -- <20>ǥåɥ<EFBFBD><EFBFBD>ץ<EFBFBD><EFBFBD><EFBFBD>
|
||||
dead_tuple_percent -- <20>ǥåɥ<C3A5><C9A5>ץ<EFBFBD><D7A5>γ<EFBFBD><CEB3>硥table_len<65><EFBFBD><EFBFBD>Ф<EFBFBD><EFBFBD><EFBFBD>tuple_len<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ψ<EFBFBD><EFBFBD>
|
||||
free_space -- <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ѳ<EFBFBD>ǽ<EFBFBD><EFBFBD><EFBFBD>ΰ<EFBFBD>(<28>Х<EFBFBD><EFBFBD><EFBFBD>)
|
||||
free_percent -- <20><><EFBFBD><EFBFBD><EFBFBD>Ѳ<EFBFBD>ǽ<EFBFBD><C7BD><EFBFBD>ΰ补table_len<65><6E><EFBFBD>Ф<EFBFBD><D0A4><EFBFBD>free_space<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ψ<EFBFBD><EFBFBD>
|
||||
|
||||
2. pgstattuple<6C>Υ<EFBFBD><CEA5>ȡ<F3A5B9A5><C8A1><EFBFBD>
|
||||
|
||||
@ -47,12 +52,14 @@ NOTICE: physical length: 0.08MB live tuples: 20 (0.00MB, 1.17%) dead tuples: 32
|
||||
|
||||
pgstattuple<6C>θƤӽФ<D3BD><D0A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϰʲ<CFB0><CAB2>Ǥ<EFBFBD><C7A4><EFBFBD>
|
||||
|
||||
pgstattuple(NAME) RETURNS FLOAT8
|
||||
CREATE OR REPLACE FUNCTION pgstattuple(text) RETURNS SETOF pgstattuple_view
|
||||
AS 'MODULE_PATHNAME', 'pgstattuple'
|
||||
LANGUAGE 'c' WITH (isstrict);
|
||||
|
||||
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>: <20>ơ<EFBFBD><C6A1>֥<EFBFBD>̾
|
||||
|
||||
<20>ؿ<EFBFBD><D8BF><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>UPDATE<EFBFBD><EFBFBD>DELETE<EFBFBD>Ǻ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>줿<EFBFBD>ơ<EFBFBD><EFBFBD>֥<EFBFBD><EFBFBD>Υ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ΰ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>礭<EFBFBD><EFBFBD><EFBFBD>ǡ<EFBFBD>
|
||||
<20>ơ<EFBFBD><EFBFBD>֥<EFBFBD><EFBFBD><EFBFBD>ʪ<EFBFBD><EFBFBD>Ū<EFBFBD><EFBFBD><EFBFBD>礭<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ф<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(<28>ѡ<EFBFBD><D1A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>)<29><><EFBFBD>ֵѤ<D6B5><D1A4>ޤ<EFBFBD><EFBFBD><EFBFBD>
|
||||
<20>ؿ<EFBFBD><D8BF><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>pgstattuple_view<EFBFBD><EFBFBD><EFBFBD>Ǥ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ޤ<EFBFBD><EFBFBD><EFBFBD>pgstattuple<EFBFBD><EFBFBD>1<EFBFBD>Ԥ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ԥ<EFBFBD>
|
||||
<20>֤<EFBFBD><EFBFBD>ޤ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
|
||||
<20>ʤ<EFBFBD><CAA4><EFBFBD>pgstattuple<6C>ϥơ<CFA5><C6A1>֥<EFBFBD><D6A5><EFBFBD>AccessShareLock<63><6B><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʤ<EFBFBD><CAA4>Τǡ<CEA4>
|
||||
pgstattuple <20><><EFBFBD>¹<EFBFBD><C2B9><EFBFBD><EFBFBD>˳<EFBFBD><CBB3><EFBFBD><EFBFBD>ơ<EFBFBD><C6A1>֥<EFBFBD><D6A5>˹<EFBFBD><CBB9><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȯ<EFBFBD><C8AF><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ȡ<EFBFBD><C8A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
@ -69,6 +76,10 @@ NOTICE: physical length: 0.08MB live tuples: 20 (0.00MB, 1.17%) dead tuples: 32
|
||||
|
||||
5. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
|
||||
2002/08/23
|
||||
|
||||
SRF(Set Returning Function)<29><><EFBFBD>Ȥä<C8A4>7.3<EFBFBD>Ѥ˽<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
|
||||
2001/12/20 Tom Lane<6E>ˤ<EFBFBD><CBA4>뽤<EFBFBD><EBBDA4>
|
||||
|
||||
Fix pgstattuple to acquire a read lock on the target table. This
|
||||
|
||||
@ -1,7 +1,7 @@
|
||||
/*
|
||||
* $Header: /cvsroot/pgsql/contrib/pgstattuple/pgstattuple.c,v 1.6 2002/05/20 23:51:40 tgl Exp $
|
||||
* $Header: /cvsroot/pgsql/contrib/pgstattuple/pgstattuple.c,v 1.7 2002/08/23 08:19:49 ishii Exp $
|
||||
*
|
||||
* Copyright (c) 2001 Tatsuo Ishii
|
||||
* Copyright (c) 2001,2002 Tatsuo Ishii
|
||||
*
|
||||
* Permission to use, copy, modify, and distribute this software and
|
||||
* its documentation for any purpose, without fee, and without a
|
||||
@ -28,6 +28,7 @@
|
||||
#include "access/heapam.h"
|
||||
#include "access/transam.h"
|
||||
#include "catalog/namespace.h"
|
||||
#include "funcapi.h"
|
||||
#include "utils/builtins.h"
|
||||
|
||||
|
||||
@ -37,16 +38,22 @@ extern Datum pgstattuple(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* pgstattuple:
|
||||
* returns the percentage of dead tuples
|
||||
* returns live/dead tuples info
|
||||
*
|
||||
* C FUNCTION definition
|
||||
* pgstattuple(NAME) returns FLOAT8
|
||||
* pgstattuple(TEXT) returns setof pgstattuple_view
|
||||
* see pgstattuple.sql for pgstattuple_view
|
||||
* ----------
|
||||
*/
|
||||
|
||||
#define DUMMY_TUPLE "pgstattuple_view"
|
||||
#define NCOLUMNS 9
|
||||
#define NCHARS 32
|
||||
|
||||
Datum
|
||||
pgstattuple(PG_FUNCTION_ARGS)
|
||||
{
|
||||
text *relname = PG_GETARG_TEXT_P(0);
|
||||
text *relname;
|
||||
RangeVar *relrv;
|
||||
Relation rel;
|
||||
HeapScanDesc scan;
|
||||
@ -55,7 +62,7 @@ pgstattuple(PG_FUNCTION_ARGS)
|
||||
BlockNumber block = 0; /* next block to count free space in */
|
||||
BlockNumber tupblock;
|
||||
Buffer buffer;
|
||||
double table_len;
|
||||
uint64 table_len;
|
||||
uint64 tuple_len = 0;
|
||||
uint64 dead_tuple_len = 0;
|
||||
uint64 tuple_count = 0;
|
||||
@ -65,13 +72,67 @@ pgstattuple(PG_FUNCTION_ARGS)
|
||||
uint64 free_space = 0; /* free/reusable space in bytes */
|
||||
double free_percent; /* free/reusable space in % */
|
||||
|
||||
relrv = makeRangeVarFromNameList(textToQualifiedNameList(relname,
|
||||
"pgstattuple"));
|
||||
FuncCallContext *funcctx;
|
||||
int call_cntr;
|
||||
int max_calls;
|
||||
TupleDesc tupdesc;
|
||||
TupleTableSlot *slot;
|
||||
AttInMetadata *attinmeta;
|
||||
|
||||
char **values;
|
||||
int i;
|
||||
Datum result;
|
||||
|
||||
/* stuff done only on the first call of the function */
|
||||
if(SRF_IS_FIRSTCALL())
|
||||
{
|
||||
/* create a function context for cross-call persistence */
|
||||
funcctx = SRF_FIRSTCALL_INIT();
|
||||
|
||||
/* total number of tuples to be returned */
|
||||
funcctx->max_calls = 1;
|
||||
|
||||
/*
|
||||
* Build a tuple description for a pgstattupe_view tuple
|
||||
*/
|
||||
tupdesc = RelationNameGetTupleDesc(DUMMY_TUPLE);
|
||||
|
||||
/* allocate a slot for a tuple with this tupdesc */
|
||||
slot = TupleDescGetSlot(tupdesc);
|
||||
|
||||
/* assign slot to function context */
|
||||
funcctx->slot = slot;
|
||||
|
||||
/*
|
||||
* Generate attribute metadata needed later to produce tuples from raw
|
||||
* C strings
|
||||
*/
|
||||
attinmeta = TupleDescGetAttInMetadata(tupdesc);
|
||||
funcctx->attinmeta = attinmeta;
|
||||
}
|
||||
|
||||
/* stuff done on every call of the function */
|
||||
funcctx = SRF_PERCALL_SETUP();
|
||||
call_cntr = funcctx->call_cntr;
|
||||
max_calls = funcctx->max_calls;
|
||||
slot = funcctx->slot;
|
||||
attinmeta = funcctx->attinmeta;
|
||||
|
||||
/* Are we done? */
|
||||
if (call_cntr >= max_calls)
|
||||
{
|
||||
SRF_RETURN_DONE(funcctx);
|
||||
}
|
||||
|
||||
/* open relation */
|
||||
relname = PG_GETARG_TEXT_P(0);
|
||||
relrv = makeRangeVarFromNameList(textToQualifiedNameList(relname,"pgstattuple"));
|
||||
rel = heap_openrv(relrv, AccessShareLock);
|
||||
|
||||
nblocks = RelationGetNumberOfBlocks(rel);
|
||||
scan = heap_beginscan(rel, SnapshotAny, 0, NULL);
|
||||
|
||||
/* scan the relation */
|
||||
while ((tuple = heap_getnext(scan, ForwardScanDirection)) != NULL)
|
||||
{
|
||||
if (HeapTupleSatisfiesNow(tuple->t_data))
|
||||
@ -113,7 +174,7 @@ pgstattuple(PG_FUNCTION_ARGS)
|
||||
|
||||
heap_close(rel, AccessShareLock);
|
||||
|
||||
table_len = (double) nblocks *BLCKSZ;
|
||||
table_len = (uint64)nblocks *BLCKSZ;
|
||||
|
||||
if (nblocks == 0)
|
||||
{
|
||||
@ -128,28 +189,39 @@ pgstattuple(PG_FUNCTION_ARGS)
|
||||
free_percent = (double) free_space *100.0 / table_len;
|
||||
}
|
||||
|
||||
elog(DEBUG3, "physical length: %.2fMB live tuples: %.0f (%.2fMB, %.2f%%) dead tuples: %.0f (%.2fMB, %.2f%%) free/reusable space: %.2fMB (%.2f%%) overhead: %.2f%%",
|
||||
|
||||
table_len / (1024 * 1024), /* physical length in MB */
|
||||
|
||||
(double) tuple_count, /* number of live tuples */
|
||||
(double) tuple_len / (1024 * 1024), /* live tuples in MB */
|
||||
tuple_percent, /* live tuples in % */
|
||||
|
||||
(double) dead_tuple_count, /* number of dead tuples */
|
||||
(double) dead_tuple_len / (1024 * 1024), /* dead tuples in MB */
|
||||
dead_tuple_percent, /* dead tuples in % */
|
||||
|
||||
(double) free_space / (1024 * 1024), /* free/available space in
|
||||
* MB */
|
||||
|
||||
free_percent, /* free/available space in % */
|
||||
|
||||
/* overhead in % */
|
||||
(nblocks == 0) ? 0.0 : 100.0
|
||||
- tuple_percent
|
||||
- dead_tuple_percent
|
||||
- free_percent);
|
||||
|
||||
PG_RETURN_FLOAT8(dead_tuple_percent);
|
||||
/*
|
||||
* Prepare a values array for storage in our slot.
|
||||
* This should be an array of C strings which will
|
||||
* be processed later by the appropriate "in" functions.
|
||||
*/
|
||||
values = (char **) palloc(NCOLUMNS * sizeof(char *));
|
||||
for (i=0;i<NCOLUMNS;i++)
|
||||
{
|
||||
values[i] = (char *) palloc(NCHARS * sizeof(char));
|
||||
}
|
||||
i = 0;
|
||||
snprintf(values[i++], NCHARS, "%lld", table_len);
|
||||
snprintf(values[i++], NCHARS, "%lld", tuple_count);
|
||||
snprintf(values[i++], NCHARS, "%lld", tuple_len);
|
||||
snprintf(values[i++], NCHARS, "%.2f", tuple_percent);
|
||||
snprintf(values[i++], NCHARS, "%lld", dead_tuple_count);
|
||||
snprintf(values[i++], NCHARS, "%lld", dead_tuple_len);
|
||||
snprintf(values[i++], NCHARS, "%.2f", dead_tuple_percent);
|
||||
snprintf(values[i++], NCHARS, "%lld", free_space);
|
||||
snprintf(values[i++], NCHARS, "%.2f", free_percent);
|
||||
|
||||
/* build a tuple */
|
||||
tuple = BuildTupleFromCStrings(attinmeta, values);
|
||||
|
||||
/* make the tuple into a datum */
|
||||
result = TupleGetDatum(slot, tuple);
|
||||
|
||||
/* Clean up */
|
||||
for (i=0;i<NCOLUMNS;i++)
|
||||
{
|
||||
pfree(values[i]);
|
||||
}
|
||||
pfree(values);
|
||||
|
||||
SRF_RETURN_NEXT(funcctx, result);
|
||||
}
|
||||
|
||||
@ -1,4 +1,16 @@
|
||||
DROP FUNCTION pgstattuple(text);
|
||||
CREATE FUNCTION pgstattuple(text) RETURNS float8
|
||||
AS 'MODULE_PATHNAME', 'pgstattuple'
|
||||
LANGUAGE 'c' WITH (isstrict);
|
||||
DROP VIEW pgstattuple_view CASCADE;
|
||||
CREATE VIEW pgstattuple_view AS
|
||||
SELECT
|
||||
0::BIGINT AS table_len, -- physical table length in bytes
|
||||
0::BIGINT AS tuple_count, -- number of live tuples
|
||||
0::BIGINT AS tuple_len, -- total tuples length in bytes
|
||||
0.0::FLOAT AS tuple_percent, -- live tuples in %
|
||||
0::BIGINT AS dead_tuple_count, -- number of dead tuples
|
||||
0::BIGINT AS dead_tuple_len, -- total dead tuples length in bytes
|
||||
0.0::FLOAT AS dead_tuple_percent, -- dead tuples in %
|
||||
0::BIGINT AS free_space, -- free space in bytes
|
||||
0.0::FLOAT AS free_percent; -- free space in %
|
||||
|
||||
CREATE OR REPLACE FUNCTION pgstattuple(text) RETURNS SETOF pgstattuple_view
|
||||
AS 'MODULE_PATHNAME', 'pgstattuple'
|
||||
LANGUAGE 'c' WITH (isstrict);
|
||||
|
||||
Reference in New Issue
Block a user