mirror of
https://github.com/postgres/postgres.git
synced 2025-07-28 23:42:10 +03:00
Add new contrib function pgrowlocks. See README.pgrowlocks for more details.
This commit is contained in:
Tatsuo Ishii
25
contrib/pgrowlocks/Makefile
Normal file
25
contrib/pgrowlocks/Makefile
Normal file
@ -0,0 +1,25 @@
|
|||||||
|
#-------------------------------------------------------------------------
|
||||||
|
#
|
||||||
|
# pgrowlocks Makefile
|
||||||
|
#
|
||||||
|
# $PostgreSQL: pgsql/contrib/pgrowlocks/Makefile,v 1.1 2006/04/23 01:12:58 ishii Exp $
|
||||||
|
#
|
||||||
|
#-------------------------------------------------------------------------
|
||||||
|
|
||||||
|
SRCS = pgrowlocks.c
|
||||||
|
|
||||||
|
MODULE_big = pgrowlocks
|
||||||
|
OBJS = $(SRCS:.c=.o)
|
||||||
|
DOCS = README.pgrowlocks README.pgrowlocks.euc_jp
|
||||||
|
DATA_built = pgrowlocks.sql
|
||||||
|
|
||||||
|
ifdef USE_PGXS
|
||||||
|
PGXS = $(shell pg_config --pgxs)
|
||||||
|
include $(PGXS)
|
||||||
|
else
|
||||||
|
subdir = contrib/pgrowlocks
|
||||||
|
top_builddir = ../..
|
||||||
|
include $(top_builddir)/src/Makefile.global
|
||||||
|
include $(top_srcdir)/contrib/contrib-global.mk
|
||||||
|
endif
|
||||||
|
|
||||||
98
contrib/pgrowlocks/README.pgrowlocks
Normal file
98
contrib/pgrowlocks/README.pgrowlocks
Normal file
@ -0,0 +1,98 @@
|
|||||||
|
$PostgreSQL: pgsql/contrib/pgrowlocks/README.pgrowlocks,v 1.1 2006/04/23 01:12:58 ishii Exp $
|
||||||
|
|
||||||
|
pgrowlocks README Tatsuo Ishii
|
||||||
|
|
||||||
|
1. What is pgrowlocks?
|
||||||
|
|
||||||
|
pgrowlocks shows row locking information for specified table.
|
||||||
|
|
||||||
|
pgrowlocks returns following data type:
|
||||||
|
|
||||||
|
CREATE TYPE pgrowlocks_type AS (
|
||||||
|
locked_row TID, -- row TID
|
||||||
|
lock_type TEXT, -- lock type
|
||||||
|
locker XID, -- locking XID
|
||||||
|
multi bool, -- multi XID?
|
||||||
|
xids xid[], -- multi XIDs
|
||||||
|
pids INTEGER[] -- locker's process id
|
||||||
|
);
|
||||||
|
|
||||||
|
Here is a sample execution of pgrowlocks:
|
||||||
|
|
||||||
|
test=# SELECT * FROM pgrowlocks('t1');
|
||||||
|
locked_row | lock_type | locker | multi | xids | pids
|
||||||
|
------------+-----------+--------+-------+-----------+---------------
|
||||||
|
(0,1) | Shared | 19 | t | {804,805} | {29066,29068}
|
||||||
|
(0,2) | Shared | 19 | t | {804,805} | {29066,29068}
|
||||||
|
(0,3) | Exclusive | 804 | f | {804} | {29066}
|
||||||
|
(0,4) | Exclusive | 804 | f | {804} | {29066}
|
||||||
|
(4 rows)
|
||||||
|
|
||||||
|
locked_row -- tuple ID(TID) of each locked rows
|
||||||
|
lock_type -- "Shared" for shared lock, "Exclusive" for exclusive lock
|
||||||
|
locker -- transaction ID of locker (note 1)
|
||||||
|
multi -- "t" if locker is a multi transaction, otherwise "f"
|
||||||
|
xids -- XIDs of lockers (note 2)
|
||||||
|
pids -- process ids of locking backends
|
||||||
|
|
||||||
|
note1: if the locker is multi transaction, it represents the multi ID
|
||||||
|
|
||||||
|
note2: if the locker is multi, multiple data are shown
|
||||||
|
|
||||||
|
2. Installing pgrowlocks
|
||||||
|
|
||||||
|
Installing pgrowlocks requires PostgreSQL 8.0 or later source tree.
|
||||||
|
|
||||||
|
$ cd /usr/local/src/postgresql-8.1/contrib
|
||||||
|
$ tar xfz /tmp/pgrowlocks-1.0.tar.gz
|
||||||
|
|
||||||
|
If you are using PostgreSQL 8.0, you need to modify pgrowlocks source code.
|
||||||
|
Around line 61, you will see:
|
||||||
|
|
||||||
|
#undef MAKERANGEVARFROMNAMELIST_HAS_TWO_ARGS
|
||||||
|
|
||||||
|
change this to:
|
||||||
|
|
||||||
|
#define MAKERANGEVARFROMNAMELIST_HAS_TWO_ARGS
|
||||||
|
|
||||||
|
$ make
|
||||||
|
$ make install
|
||||||
|
|
||||||
|
$ psql -e -f pgrowlocks.sql test
|
||||||
|
|
||||||
|
3. How to use pgrowlocks
|
||||||
|
|
||||||
|
The calling sequence for pgrowlocks is as follows:
|
||||||
|
|
||||||
|
CREATE OR REPLACE FUNCTION pgrowlocks(text) RETURNS pgrowlocks_type
|
||||||
|
AS 'MODULE_PATHNAME', 'pgrowlocks'
|
||||||
|
LANGUAGE 'c' WITH (isstrict);
|
||||||
|
|
||||||
|
The parameter is a name of table. pgrowlocks returns type pgrowlocks_type.
|
||||||
|
|
||||||
|
pgrowlocks grab AccessShareLock for the target table and read each
|
||||||
|
row one by one to get the row locking information. You should
|
||||||
|
notice that:
|
||||||
|
|
||||||
|
1) if the table is exclusive locked by someone else, pgrowlocks
|
||||||
|
will be blocked.
|
||||||
|
|
||||||
|
2) pgrowlocks may show incorrect information if there's a new
|
||||||
|
lock or a lock is freeed while its execution.
|
||||||
|
|
||||||
|
pgrowlocks does not show the contents of locked rows. If you want
|
||||||
|
to take a look at the row contents at the same time, you could do
|
||||||
|
something like this:
|
||||||
|
|
||||||
|
SELECT * FROM accounts AS a, pgrowlocks('accounts') AS p WHERE p.locked_ row = a.ctid;
|
||||||
|
|
||||||
|
|
||||||
|
4. License
|
||||||
|
|
||||||
|
pgrowlocks is distribute under (modified) BSD license described in
|
||||||
|
the source file.
|
||||||
|
|
||||||
|
5. History
|
||||||
|
|
||||||
|
2006/03/21 pgrowlocks version 1.1 released (tested on 8.2 current)
|
||||||
|
2005/08/22 pgrowlocks version 1.0 released
|
||||||
121
contrib/pgrowlocks/README.pgrowlocks.euc_jp
Normal file
121
contrib/pgrowlocks/README.pgrowlocks.euc_jp
Normal file
@ -0,0 +1,121 @@
|
|||||||
|
$PostgreSQL: pgsql/contrib/pgrowlocks/README.pgrowlocks.euc_jp,v 1.1 2006/04/23 01:12:58 ishii Exp $
|
||||||
|
|
||||||
|
pgrowlocks README <09>а<EFBFBD>ã<EFBFBD><C3A3>
|
||||||
|
|
||||||
|
1. pgrowlocks<6B>Ȥ<EFBFBD>
|
||||||
|
|
||||||
|
pgrowlocks<6B>ϡ<EFBFBD><CFA1><EFBFBD><EFBFBD>ꤵ<EFBFBD>줿<EFBFBD>ơ<EFBFBD><C6A1>֥<EFBFBD><D6A5>ιԥ<CEB9><D4A5>å<EFBFBD><C3A5>˴ؤ<CBB4><D8A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɽ<EFBFBD><C9BD><EFBFBD><EFBFBD><EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||||
|
|
||||||
|
pgrowlocks<6B><73><EFBFBD>֤<EFBFBD><D6A4><EFBFBD><EFBFBD>ϡ<EFBFBD><CFA1>ʲ<EFBFBD><CAB2>Τ褦<CEA4>ˤʤ<CBA4><CAA4>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||||
|
|
||||||
|
CREATE TYPE pgrowlocks_type AS (
|
||||||
|
locked_row TID, -- row TID
|
||||||
|
lock_type TEXT, -- lock type
|
||||||
|
locker XID, -- locking XID
|
||||||
|
multi bool, -- multi XID?
|
||||||
|
xids xid[], -- multi XIDs
|
||||||
|
pids INTEGER[] -- locker's process id
|
||||||
|
);
|
||||||
|
|
||||||
|
<20>¹<EFBFBD><C2B9><EFBFBD><EFBFBD><EFBFBD><F2BCA8A4>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||||
|
|
||||||
|
test=# SELECT * FROM pgrowlocks('t1');
|
||||||
|
locked_row | lock_type | locker | multi | xids | pids
|
||||||
|
------------+-----------+--------+-------+-----------+---------------
|
||||||
|
(0,1) | Shared | 19 | t | {804,805} | {29066,29068}
|
||||||
|
(0,2) | Shared | 19 | t | {804,805} | {29066,29068}
|
||||||
|
(0,3) | Exclusive | 804 | f | {804} | {29066}
|
||||||
|
(0,4) | Exclusive | 804 | f | {804} | {29066}
|
||||||
|
(4 rows)
|
||||||
|
|
||||||
|
<20>ƹ<EFBFBD><C6B9>ܤ<EFBFBD><DCA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ǥ<EFBFBD><C7A4><EFBFBD>
|
||||||
|
|
||||||
|
locked_row -- <20><><EFBFBD>å<EFBFBD><C3A5><EFBFBD><EFBFBD>줿<EFBFBD>ԤΥ<D4A4><CEA5>ץ<EFBFBD>ID(TID)
|
||||||
|
lock_type -- <20><>ͭ<EFBFBD><CDAD><EFBFBD>å<EFBFBD><C3A5>ʤ<EFBFBD>"Shared"<22><><EFBFBD><EFBFBD>¾<EFBFBD><C2BE><EFBFBD>å<EFBFBD><C3A5>ʤ<EFBFBD>"Exclusive"
|
||||||
|
locker -- <20><><EFBFBD>å<EFBFBD><C3A5><EFBFBD><F2A4ABA4>Ƥ<EFBFBD><C6A4><EFBFBD><EFBFBD>ȥ<EFBFBD><C8A5><EFBFBD><F3A5B6A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID[<5B><>1]
|
||||||
|
multi -- locker<65><72><EFBFBD>ޥ<EFBFBD><DEA5><EFBFBD><EFBFBD>ȥ<EFBFBD><C8A5><EFBFBD><F3A5B6A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʤ<EFBFBD>t<EFBFBD><74><EFBFBD><EFBFBD><EFBFBD>Ǥʤ<C7A4><CAA4><EFBFBD><EFBFBD><EFBFBD>f
|
||||||
|
xids -- <20><><EFBFBD>å<EFBFBD><C3A5><EFBFBD><F2A4ABA4>Ƥ<EFBFBD><C6A4><EFBFBD><EFBFBD>ȥ<EFBFBD><C8A5><EFBFBD><F3A5B6A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID[<5B><>2]
|
||||||
|
pids -- <20><><EFBFBD>å<EFBFBD><C3A5><EFBFBD><F2A4ABA4>Ƥ<EFBFBD><C6A4><EFBFBD><EFBFBD>Хå<D0A5><C3A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɥץ<C9A5><D7A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Υץ<CEA5><D7A5><EFBFBD><EFBFBD><EFBFBD>ID[<5B><>2]
|
||||||
|
|
||||||
|
[<5B><>1: locker<65><72><EFBFBD>ޥ<EFBFBD><DEA5><EFBFBD><EFBFBD>ʤ顤<CAA4>ȥ<EFBFBD><C8A5><EFBFBD><F3A5B6A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ID<49>ǤϤʤ<CFA4><CAA4>ƥޥ<C6A5><DEA5><EFBFBD>ID<49>ˤʤ<CBA4>
|
||||||
|
<20>ޤ<EFBFBD><DEA4><EFBFBD>]
|
||||||
|
|
||||||
|
[<5B><>2: locker<65><72><EFBFBD>ޥ<EFBFBD><DEA5><EFBFBD><EFBFBD>ξ<EFBFBD><CEBE>硤ʣ<E7A1A4><CAA3><EFBFBD>Υǡ<CEA5><C7A1><EFBFBD><EFBFBD><EFBFBD>ɽ<EFBFBD><C9BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD>]
|
||||||
|
|
||||||
|
2. pgrowlocks<6B>Υ<EFBFBD><CEA5>ȡ<F3A5B9A5><C8A1><EFBFBD>
|
||||||
|
|
||||||
|
pgrowlocks<6B>Υ<EFBFBD><CEA5>ȡ<F3A5B9A5><C8A1><EFBFBD><EFBFBD>ˤϡ<CBA4>PostgreSQL<51>ȡ<F3A5B9A5><C8A1>뤷<EFBFBD><EBA4B7><EFBFBD>Ȥ<EFBFBD><C8A4>Υ<EFBFBD><CEA5><EFBFBD>
|
||||||
|
<20><><EFBFBD>ĥ<C4A5><EAA1BC>ɬ<EFBFBD>פǤ<D7A4><C7A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ΤȤ<CEA4><C8A4><EFBFBD><EFBFBD>б<EFBFBD><D0B1><EFBFBD><EFBFBD>Ƥ<EFBFBD><C6A4><EFBFBD><EFBFBD>С<EFBFBD><D0A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>PostgreSQL
|
||||||
|
8.0<EFBFBD>ʹߤǤ<EFBFBD><EFBFBD><EFBFBD>
|
||||||
|
|
||||||
|
<20><><EFBFBD><EFBFBD><EFBFBD>Ǥ<EFBFBD>PostgreSQL<51>Υ<EFBFBD><CEA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/usr/local/src/postgresql-8.1/<2F><>Ÿ<EFBFBD><C5B8><EFBFBD><EFBFBD>
|
||||||
|
<20><><EFBFBD>Ƥ<EFBFBD><C6A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ΤȤ<CEA4><C8A4>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||||
|
|
||||||
|
1) pgrowlocks<6B>Υ<EFBFBD><CEA5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ÿ<EFBFBD><C5B8><EFBFBD><EFBFBD><EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ե<EFBFBD><D5A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||||
|
/tmp/pgrowlocks-1.0.tar.gz<67><7A><EFBFBD>֤<EFBFBD><D6A4>Ƥ<EFBFBD><C6A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ΤȤ<CEA4><C8A4>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||||
|
|
||||||
|
$ cd /usr/local/src/postgresql-8.1/contrib
|
||||||
|
$ tar xfz pgrowlocks-1.0.tar.gz
|
||||||
|
|
||||||
|
2) PostgreSQL 8.0<EFBFBD>ξ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϡ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ΰ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>˽<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɬ<EFBFBD>פǤ<EFBFBD><EFBFBD><EFBFBD>
|
||||||
|
pgrowlocks.c<><63>61<36><31><EFBFBD><EFBFBD><EFBFBD>դ<EFBFBD><D5A4><EFBFBD>
|
||||||
|
|
||||||
|
#undef MAKERANGEVARFROMNAMELIST_HAS_TWO_ARGS
|
||||||
|
|
||||||
|
<20>Ȥ<EFBFBD><C8A4><EFBFBD><EFBFBD>Τ<EFBFBD><CEA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Τǡ<CEA4><C7A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||||
|
|
||||||
|
#define MAKERANGEVARFROMNAMELIST_HAS_TWO_ARGS
|
||||||
|
|
||||||
|
<20>˽<CBBD><F1A4ADB4><EFBFBD><EFBFBD>ޤ<EFBFBD>(undef->define<6E>ˤ<EFBFBD><CBA4>ޤ<EFBFBD>)<29><>
|
||||||
|
|
||||||
|
3) <20><><EFBFBD><EFBFBD><EFBFBD>ѥ<EFBFBD><D1A5>뤷<EFBFBD>ƴؿ<C6B4><D8BF>ζ<EFBFBD>ͭ<EFBFBD>饤<EFBFBD>֥<EFBFBD><D6A5><EFBFBD><EFBFBD>ȡ<F3A5B9A5><C8A1>뤷<EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||||
|
|
||||||
|
$ make
|
||||||
|
$ make install
|
||||||
|
|
||||||
|
4) <20>桼<EFBFBD><E6A1BC><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ؿ<EFBFBD><D8BF><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD><CFBF><EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||||
|
|
||||||
|
$ psql -e -f /usr/local/pgsql/share/contrib/pgrowlocks.sql test
|
||||||
|
|
||||||
|
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ǥ<EFBFBD>"test"<22>Ȥ<EFBFBD><C8A4><EFBFBD><EFBFBD>ǡ<EFBFBD><C7A1><EFBFBD><EFBFBD>١<EFBFBD><D9A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD><CFBF><EFBFBD>Ƥ<EFBFBD><C6A4>ޤ<EFBFBD><DEA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⤷¾<E2A4B7>Υǡ<CEA5>
|
||||||
|
<20><><EFBFBD>١<EFBFBD><D9A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD><CFBF><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ϥ<EFBFBD><CFA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ɤ<EFBFBD><C9A4>ؤ<EFBFBD><D8A4>Ƥ<EFBFBD><C6A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||||
|
|
||||||
|
3. pgrowlocks<6B>λȤ<CEBB><C8A4><EFBFBD>
|
||||||
|
|
||||||
|
pgrowlocks<6B>θƤӽФ<D3BD><D0A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϰʲ<CFB0><CAB2>Ǥ<EFBFBD><C7A4><EFBFBD>
|
||||||
|
|
||||||
|
CREATE OR REPLACE FUNCTION pgrowlocks(text) RETURNS pgrowlocks_type
|
||||||
|
AS 'MODULE_PATHNAME', 'pgrowlocks'
|
||||||
|
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>pgrowlocks_type<70><65><EFBFBD>Ǥ<EFBFBD><C7A4><EFBFBD>
|
||||||
|
|
||||||
|
pgrowlocks<6B>ϥơ<CFA5><C6A1>֥<EFBFBD><D6A5><EFBFBD>AccessShareLock<63><6B><EFBFBD>å<EFBFBD><C3A5><EFBFBD><F2A4ABA4><EFBFBD>1<EFBFBD>Ԥ<EFBFBD><D4A4><EFBFBD><EFBFBD>ɤ߽Ф<DFBD>
|
||||||
|
<20>ƤϹԥ<CFB9><D4A5>å<EFBFBD><C3A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>äƤ<C3A4><C6A4>뤫<EFBFBD>ɤ<EFBFBD><C9A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>å<EFBFBD><C3A5><EFBFBD><EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD><EFBFBD>ʲ<EFBFBD><CAB2><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>դ<EFBFBD>
|
||||||
|
<20>Ƥ<EFBFBD><C6A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||||
|
|
||||||
|
1) <20><><EFBFBD><EFBFBD><EFBFBD>ơ<EFBFBD><C6A1>֥<EFBFBD><D6A5><EFBFBD><EFBFBD><EFBFBD>¾<EFBFBD><C2BE><EFBFBD>å<EFBFBD><C3A5><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>äƤ<C3A4><C6A4><EFBFBD><EFBFBD>ȡ<EFBFBD>pgrowlocks<6B>μ¹Ԥϥ֥<CFA5><D6A5><EFBFBD>
|
||||||
|
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||||
|
|
||||||
|
2) pgrowlocks<6B>μ¹<CEBC><C2B9><EFBFBD><EFBFBD>˿<EFBFBD><CBBF><EFBFBD><EFBFBD>ˤ<EFBFBD><CBA4><EFBFBD><EFBFBD>ä<EFBFBD><C3A4>ꡤ<EFBFBD><EAA1A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>줿<EFBFBD>ԥ<EFBFBD><D4A5>å<EFBFBD><C3A5>˴ؤ<CBB4><D8A4><EFBFBD>
|
||||||
|
<20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>pgrowlocks<6B>μ¹Է<C2B9><D4B7>̤<EFBFBD>ȿ<EFBFBD>Ǥ<EFBFBD><C7A4><EFBFBD><EFBFBD>Ƥ<EFBFBD><C6A4>ʤ<EFBFBD><CAA4><EFBFBD>ǽ<EFBFBD><C7BD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||||
|
|
||||||
|
|
||||||
|
pgrowlocks<6B>ϥ<EFBFBD><CFA5>å<EFBFBD><C3A5><EFBFBD><EFBFBD>줿<EFBFBD>Ԥ<EFBFBD><D4A4><EFBFBD><EFBFBD>Ƥ<EFBFBD>ɽ<EFBFBD><C9BD><EFBFBD><EFBFBD><EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD><F3A1A5B9><EFBFBD><EFBFBD>Ƥ<C6A4><F2B8ABA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||||
|
<20>ϡ<EFBFBD><CFA1>ơ<EFBFBD><C6A1>֥<EFBFBD><D6A5><EFBFBD>pgrowlocks<6B><73>locked_rows<77><73><EFBFBD>Ƿ<EFBFBD><C7B7>礷<EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><F2BCA8A4>ޤ<EFBFBD><DEA4><EFBFBD>
|
||||||
|
|
||||||
|
SELECT * FROM accounts AS a, pgrowlocks('accounts') AS p WHERE p.locked_ row = a.ctid;
|
||||||
|
|
||||||
|
|
||||||
|
4. pgrowlocks<6B>Υ饤<CEA5><E9A5A4><EFBFBD><EFBFBD><F3A5B9BE><EFBFBD><EFBFBD>ˤĤ<CBA4><C4A4><EFBFBD>
|
||||||
|
|
||||||
|
pgrowlocks.c<><63><EFBFBD><EFBFBD>Ƭ<EFBFBD>˽Ƥ<F1A4A4A4><C6A4><EFBFBD><EFBFBD>̤<EFBFBD><CCA4>Ǥ<EFBFBD>(<28><><EFBFBD><EFBFBD>BSD<53>饤<EFBFBD><E9A5A4><EFBFBD>˽स<CBBD>Ƥ<EFBFBD>
|
||||||
|
<20>ޤ<EFBFBD>)<29><><EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD>pgrowlocks <20>ϴ<EFBFBD><CFB4><EFBFBD><EFBFBD><EFBFBD>̵<EFBFBD>ݾڤǤ<DAA4><C7A4><EFBFBD>pgrowlocks <20><><EFBFBD><EFBFBD><EFBFBD>Ѥ<EFBFBD><D1A4><EFBFBD><EFBFBD><EFBFBD>
|
||||||
|
<20>Ȥˤ<C8A4><CBA4>ä<EFBFBD><C3A4><EFBFBD><EFBFBD><EFBFBD><EFBFBD>뤤<EFBFBD><EBA4A4><EFBFBD>ʤ<EFBFBD><CAA4><EFBFBD><EFBFBD>̤˴ؤ<CBB4><D8A4>Ƥ<EFBFBD><C6A4><EFBFBD>Ǥ<EFBFBD><C7A4><EFBFBD>餤<EFBFBD>ޤ<EFBFBD><DEA4><EFBFBD><EFBFBD><EFBFBD>
|
||||||
|
|
||||||
|
5. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||||
|
|
||||||
|
2006/03/21 pgrowlocks <20>С<EFBFBD><D0A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 1.1<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(8.2 current<6E>ǥƥ<C7A5><C6A5><EFBFBD>)
|
||||||
|
2005/08/22 pgrowlocks <20>С<EFBFBD><D0A1><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 1.0<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||||
228
contrib/pgrowlocks/pgrowlocks.c
Normal file
228
contrib/pgrowlocks/pgrowlocks.c
Normal file
@ -0,0 +1,228 @@
|
|||||||
|
/*
|
||||||
|
* $PostgreSQL: pgsql/contrib/pgrowlocks/pgrowlocks.c,v 1.1 2006/04/23 01:12:58 ishii Exp $
|
||||||
|
*
|
||||||
|
* Copyright (c) 2005-2006 Tatsuo Ishii
|
||||||
|
*
|
||||||
|
* Permission to use, copy, modify, and distribute this software and
|
||||||
|
* its documentation for any purpose, without fee, and without a
|
||||||
|
* written agreement is hereby granted, provided that the above
|
||||||
|
* copyright notice and this paragraph and the following two
|
||||||
|
* paragraphs appear in all copies.
|
||||||
|
*
|
||||||
|
* IN NO EVENT SHALL THE AUTHOR BE LIABLE TO ANY PARTY FOR DIRECT,
|
||||||
|
* INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES, INCLUDING
|
||||||
|
* LOST PROFITS, ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS
|
||||||
|
* DOCUMENTATION, EVEN IF THE UNIVERSITY OF CALIFORNIA HAS BEEN ADVISED
|
||||||
|
* OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||||
|
*
|
||||||
|
* THE AUTHOR SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING, BUT NOT
|
||||||
|
* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
|
||||||
|
* A PARTICULAR PURPOSE. THE SOFTWARE PROVIDED HEREUNDER IS ON AN "AS
|
||||||
|
* IS" BASIS, AND THE AUTHOR HAS NO OBLIGATIONS TO PROVIDE MAINTENANCE,
|
||||||
|
* SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include "postgres.h"
|
||||||
|
|
||||||
|
#include "funcapi.h"
|
||||||
|
#include "access/heapam.h"
|
||||||
|
#include "access/transam.h"
|
||||||
|
#include "catalog/namespace.h"
|
||||||
|
#include "catalog/pg_type.h"
|
||||||
|
#include "storage/proc.h"
|
||||||
|
#include "utils/builtins.h"
|
||||||
|
|
||||||
|
#ifdef HEAP_XMAX_SHARED_LOCK
|
||||||
|
#include "access/multixact.h"
|
||||||
|
#include "storage/procarray.h"
|
||||||
|
#endif
|
||||||
|
|
||||||
|
PG_FUNCTION_INFO_V1(pgrowlocks);
|
||||||
|
|
||||||
|
extern Datum pgrowlocks(PG_FUNCTION_ARGS);
|
||||||
|
|
||||||
|
/* ----------
|
||||||
|
* pgrowlocks:
|
||||||
|
* returns tids of rows being locked
|
||||||
|
*
|
||||||
|
* C FUNCTION definition
|
||||||
|
* pgrowlocks(text) returns set of pgrowlocks_type
|
||||||
|
* see pgrowlocks.sql for pgrowlocks_type
|
||||||
|
* ----------
|
||||||
|
*/
|
||||||
|
|
||||||
|
#define DUMMY_TUPLE "public.pgrowlocks_type"
|
||||||
|
#define NCHARS 32
|
||||||
|
|
||||||
|
/*
|
||||||
|
* define this if makeRangeVarFromNameList() has two arguments. As far
|
||||||
|
* as I know, this only happens in 8.0.x.
|
||||||
|
*/
|
||||||
|
#undef MAKERANGEVARFROMNAMELIST_HAS_TWO_ARGS
|
||||||
|
|
||||||
|
typedef struct {
|
||||||
|
HeapScanDesc scan;
|
||||||
|
int ncolumns;
|
||||||
|
} MyData;
|
||||||
|
|
||||||
|
Datum
|
||||||
|
pgrowlocks(PG_FUNCTION_ARGS)
|
||||||
|
{
|
||||||
|
FuncCallContext *funcctx;
|
||||||
|
HeapScanDesc scan;
|
||||||
|
HeapTuple tuple;
|
||||||
|
TupleDesc tupdesc;
|
||||||
|
AttInMetadata *attinmeta;
|
||||||
|
Datum result;
|
||||||
|
MyData *mydata;
|
||||||
|
Relation rel;
|
||||||
|
|
||||||
|
if (SRF_IS_FIRSTCALL())
|
||||||
|
{
|
||||||
|
text *relname;
|
||||||
|
RangeVar *relrv;
|
||||||
|
MemoryContext oldcontext;
|
||||||
|
|
||||||
|
funcctx = SRF_FIRSTCALL_INIT();
|
||||||
|
oldcontext = MemoryContextSwitchTo(funcctx->multi_call_memory_ctx);
|
||||||
|
|
||||||
|
tupdesc = RelationNameGetTupleDesc(DUMMY_TUPLE);
|
||||||
|
attinmeta = TupleDescGetAttInMetadata(tupdesc);
|
||||||
|
funcctx->attinmeta = attinmeta;
|
||||||
|
|
||||||
|
relname = PG_GETARG_TEXT_P(0);
|
||||||
|
#ifdef MAKERANGEVARFROMNAMELIST_HAS_TWO_ARGS
|
||||||
|
relrv = makeRangeVarFromNameList(textToQualifiedNameList(relname, "pgrowlocks"));
|
||||||
|
|
||||||
|
#else
|
||||||
|
relrv = makeRangeVarFromNameList(textToQualifiedNameList(relname));
|
||||||
|
#endif
|
||||||
|
rel = heap_openrv(relrv, AccessShareLock);
|
||||||
|
scan = heap_beginscan(rel, SnapshotNow, 0, NULL);
|
||||||
|
mydata = palloc(sizeof(*mydata));
|
||||||
|
mydata->scan = scan;
|
||||||
|
mydata->ncolumns = tupdesc->natts;
|
||||||
|
funcctx->user_fctx = mydata;
|
||||||
|
|
||||||
|
MemoryContextSwitchTo(oldcontext);
|
||||||
|
}
|
||||||
|
|
||||||
|
funcctx = SRF_PERCALL_SETUP();
|
||||||
|
attinmeta = funcctx->attinmeta;
|
||||||
|
mydata = (MyData *)funcctx->user_fctx;
|
||||||
|
scan = mydata->scan;
|
||||||
|
|
||||||
|
/* scan the relation */
|
||||||
|
while ((tuple = heap_getnext(scan, ForwardScanDirection)) != NULL)
|
||||||
|
{
|
||||||
|
/* must hold a buffer lock to call HeapTupleSatisfiesUpdate */
|
||||||
|
LockBuffer(scan->rs_cbuf, BUFFER_LOCK_SHARE);
|
||||||
|
|
||||||
|
if (HeapTupleSatisfiesUpdate(tuple->t_data, GetCurrentCommandId(), scan->rs_cbuf)
|
||||||
|
== HeapTupleBeingUpdated)
|
||||||
|
{
|
||||||
|
|
||||||
|
char **values;
|
||||||
|
int i;
|
||||||
|
|
||||||
|
values = (char **) palloc(mydata->ncolumns * sizeof(char *));
|
||||||
|
|
||||||
|
i = 0;
|
||||||
|
values[i++] = (char *)DirectFunctionCall1(tidout, PointerGetDatum(&tuple->t_self));
|
||||||
|
|
||||||
|
#ifdef HEAP_XMAX_SHARED_LOCK
|
||||||
|
if (tuple->t_data->t_infomask & HEAP_XMAX_SHARED_LOCK)
|
||||||
|
values[i++] = pstrdup("Shared");
|
||||||
|
else
|
||||||
|
values[i++] = pstrdup("Exclusive");
|
||||||
|
#else
|
||||||
|
values[i++] = pstrdup("Exclusive");
|
||||||
|
#endif
|
||||||
|
values[i] = palloc(NCHARS*sizeof(char));
|
||||||
|
snprintf(values[i++], NCHARS, "%d", HeapTupleHeaderGetXmax(tuple->t_data));
|
||||||
|
#ifdef HEAP_XMAX_SHARED_LOCK
|
||||||
|
if (tuple->t_data->t_infomask & HEAP_XMAX_IS_MULTI)
|
||||||
|
{
|
||||||
|
TransactionId *xids;
|
||||||
|
int nxids;
|
||||||
|
int j;
|
||||||
|
int isValidXid = 0; /* any valid xid ever exists? */
|
||||||
|
|
||||||
|
values[i++] = pstrdup("true");
|
||||||
|
nxids = GetMultiXactIdMembers(HeapTupleHeaderGetXmax(tuple->t_data), &xids);
|
||||||
|
if (nxids == -1)
|
||||||
|
{
|
||||||
|
elog(ERROR, "GetMultiXactIdMembers returns error");
|
||||||
|
}
|
||||||
|
|
||||||
|
values[i] = palloc(NCHARS*nxids);
|
||||||
|
values[i+1] = palloc(NCHARS*nxids);
|
||||||
|
strcpy(values[i], "{");
|
||||||
|
strcpy(values[i+1], "{");
|
||||||
|
|
||||||
|
for (j=0;j<nxids;j++)
|
||||||
|
{
|
||||||
|
char buf[NCHARS];
|
||||||
|
|
||||||
|
if (TransactionIdIsInProgress(xids[j]))
|
||||||
|
{
|
||||||
|
if (isValidXid)
|
||||||
|
{
|
||||||
|
strcat(values[i], ",");
|
||||||
|
strcat(values[i+1], ",");
|
||||||
|
}
|
||||||
|
snprintf(buf, NCHARS, "%d", xids[j]);
|
||||||
|
strcat(values[i], buf);
|
||||||
|
snprintf(buf, NCHARS, "%d", BackendXidGetPid(xids[j]));
|
||||||
|
strcat(values[i+1], buf);
|
||||||
|
|
||||||
|
isValidXid = 1;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
strcat(values[i], "}");
|
||||||
|
strcat(values[i+1], "}");
|
||||||
|
i++;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
values[i++] = pstrdup("false");
|
||||||
|
values[i] = palloc(NCHARS*sizeof(char));
|
||||||
|
snprintf(values[i++], NCHARS, "{%d}", HeapTupleHeaderGetXmax(tuple->t_data));
|
||||||
|
|
||||||
|
values[i] = palloc(NCHARS*sizeof(char));
|
||||||
|
snprintf(values[i++], NCHARS, "{%d}", BackendXidGetPid(HeapTupleHeaderGetXmax(tuple->t_data)));
|
||||||
|
}
|
||||||
|
|
||||||
|
#else
|
||||||
|
values[i++] = pstrdup("false");
|
||||||
|
values[i++] = pstrdup("{}");
|
||||||
|
values[i++] = pstrdup("{}");
|
||||||
|
#endif
|
||||||
|
|
||||||
|
LockBuffer(scan->rs_cbuf, BUFFER_LOCK_UNLOCK);
|
||||||
|
|
||||||
|
/* build a tuple */
|
||||||
|
tuple = BuildTupleFromCStrings(attinmeta, values);
|
||||||
|
|
||||||
|
/* make the tuple into a datum */
|
||||||
|
result = HeapTupleGetDatum(tuple);
|
||||||
|
|
||||||
|
/* Clean up */
|
||||||
|
for (i = 0; i < mydata->ncolumns; i++)
|
||||||
|
pfree(values[i]);
|
||||||
|
pfree(values);
|
||||||
|
|
||||||
|
SRF_RETURN_NEXT(funcctx, result);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
LockBuffer(scan->rs_cbuf, BUFFER_LOCK_UNLOCK);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
heap_endscan(scan);
|
||||||
|
heap_close(scan->rs_rd, AccessShareLock);
|
||||||
|
|
||||||
|
SRF_RETURN_DONE(funcctx);
|
||||||
|
}
|
||||||
16
contrib/pgrowlocks/pgrowlocks.sql.in
Normal file
16
contrib/pgrowlocks/pgrowlocks.sql.in
Normal file
@ -0,0 +1,16 @@
|
|||||||
|
-- Adjust this setting to control where the objects get created.
|
||||||
|
SET search_path = public;
|
||||||
|
|
||||||
|
CREATE TYPE pgrowlocks_type AS (
|
||||||
|
locked_row TID, -- row TID
|
||||||
|
lock_type TEXT, -- lock type
|
||||||
|
locker XID, -- locking XID
|
||||||
|
multi bool, -- multi XID?
|
||||||
|
xids xid[], -- multi XIDs
|
||||||
|
pids INTEGER[] -- locker's process id
|
||||||
|
);
|
||||||
|
|
||||||
|
CREATE OR REPLACE FUNCTION pgrowlocks(text)
|
||||||
|
RETURNS setof pgrowlocks_type
|
||||||
|
AS 'MODULE_PATHNAME', 'pgrowlocks'
|
||||||
|
LANGUAGE 'C' STRICT;
|
||||||
Reference in New Issue
Block a user