Branch data Line data Source code
1 : : /*-------------------------------------------------------------------------
2 : : *
3 : : * gistvacuum.c
4 : : * vacuuming routines for the postgres GiST index access method.
5 : : *
6 : : *
7 : : * Portions Copyright (c) 1996-2026, PostgreSQL Global Development Group
8 : : * Portions Copyright (c) 1994, Regents of the University of California
9 : : *
10 : : * IDENTIFICATION
11 : : * src/backend/access/gist/gistvacuum.c
12 : : *
13 : : *-------------------------------------------------------------------------
14 : : */
15 : : #include "postgres.h"
16 : :
17 : : #include "access/genam.h"
18 : : #include "access/gist_private.h"
19 : : #include "access/xloginsert.h"
20 : : #include "commands/vacuum.h"
21 : : #include "lib/integerset.h"
22 : : #include "miscadmin.h"
23 : : #include "storage/indexfsm.h"
24 : : #include "storage/lmgr.h"
25 : : #include "storage/read_stream.h"
26 : : #include "utils/memutils.h"
27 : :
28 : : /* Working state needed by gistbulkdelete */
29 : : typedef struct
30 : : {
31 : : IndexVacuumInfo *info;
32 : : IndexBulkDeleteResult *stats;
33 : : IndexBulkDeleteCallback callback;
34 : : void *callback_state;
35 : : GistNSN startNSN;
36 : :
37 : : /*
38 : : * These are used to memorize all internal and empty leaf pages. They are
39 : : * used for deleting all the empty pages.
40 : : */
41 : : IntegerSet *internal_page_set;
42 : : IntegerSet *empty_leaf_set;
43 : : MemoryContext page_set_context;
44 : : } GistVacState;
45 : :
46 : : static void gistvacuumscan(IndexVacuumInfo *info, IndexBulkDeleteResult *stats,
47 : : IndexBulkDeleteCallback callback, void *callback_state);
48 : : static void gistvacuumpage(GistVacState *vstate, Buffer buffer);
49 : : static void gistvacuum_delete_empty_pages(IndexVacuumInfo *info,
50 : : GistVacState *vstate);
51 : : static bool gistdeletepage(IndexVacuumInfo *info, IndexBulkDeleteResult *stats,
52 : : Buffer parentBuffer, OffsetNumber downlink,
53 : : Buffer leafBuffer);
54 : :
55 : : /*
56 : : * VACUUM bulkdelete stage: remove index entries.
57 : : */
58 : : IndexBulkDeleteResult *
59 : 32 : gistbulkdelete(IndexVacuumInfo *info, IndexBulkDeleteResult *stats,
60 : : IndexBulkDeleteCallback callback, void *callback_state)
61 : : {
62 : : /* allocate stats if first time through, else re-use existing struct */
63 [ + - ]: 32 : if (stats == NULL)
64 : 32 : stats = palloc0_object(IndexBulkDeleteResult);
65 : :
66 : 32 : gistvacuumscan(info, stats, callback, callback_state);
67 : :
68 : 32 : return stats;
69 : : }
70 : :
71 : : /*
72 : : * VACUUM cleanup stage: delete empty pages, and update index statistics.
73 : : */
74 : : IndexBulkDeleteResult *
75 : 71 : gistvacuumcleanup(IndexVacuumInfo *info, IndexBulkDeleteResult *stats)
76 : : {
77 : : /* No-op in ANALYZE ONLY mode */
78 [ + + ]: 71 : if (info->analyze_only)
79 : 17 : return stats;
80 : :
81 : : /*
82 : : * If gistbulkdelete was called, we need not do anything, just return the
83 : : * stats from the latest gistbulkdelete call. If it wasn't called, we
84 : : * still need to do a pass over the index, to obtain index statistics.
85 : : */
86 [ + + ]: 54 : if (stats == NULL)
87 : : {
88 : 34 : stats = palloc0_object(IndexBulkDeleteResult);
89 : 34 : gistvacuumscan(info, stats, NULL, NULL);
90 : : }
91 : :
92 : : /*
93 : : * It's quite possible for us to be fooled by concurrent page splits into
94 : : * double-counting some index tuples, so disbelieve any total that exceeds
95 : : * the underlying heap's count ... if we know that accurately. Otherwise
96 : : * this might just make matters worse.
97 : : */
98 [ + + ]: 54 : if (!info->estimated_count)
99 : : {
100 [ - + ]: 51 : if (stats->num_index_tuples > info->num_heap_tuples)
101 : 0 : stats->num_index_tuples = info->num_heap_tuples;
102 : : }
103 : :
104 : 54 : return stats;
105 : : }
106 : :
107 : : /*
108 : : * gistvacuumscan --- scan the index for VACUUMing purposes
109 : : *
110 : : * This scans the index for leaf tuples that are deletable according to the
111 : : * vacuum callback, and updates the stats. Both btbulkdelete and
112 : : * btvacuumcleanup invoke this (the latter only if no btbulkdelete call
113 : : * occurred).
114 : : *
115 : : * This also makes note of any empty leaf pages, as well as all internal
116 : : * pages while looping over all index pages. After scanning all the pages, we
117 : : * remove the empty pages so that they can be reused. Any deleted pages are
118 : : * added directly to the free space map. (They should've been added there
119 : : * when they were originally deleted, already, but it's possible that the FSM
120 : : * was lost at a crash, for example.)
121 : : *
122 : : * The caller is responsible for initially allocating/zeroing a stats struct.
123 : : */
124 : : static void
125 : 66 : gistvacuumscan(IndexVacuumInfo *info, IndexBulkDeleteResult *stats,
126 : : IndexBulkDeleteCallback callback, void *callback_state)
127 : : {
128 : 66 : Relation rel = info->index;
129 : : GistVacState vstate;
130 : : BlockNumber num_pages;
131 : : bool needLock;
132 : : MemoryContext oldctx;
133 : : BlockRangeReadStreamPrivate p;
134 : 66 : ReadStream *stream = NULL;
135 : :
136 : : /*
137 : : * Reset fields that track information about the entire index now. This
138 : : * avoids double-counting in the case where a single VACUUM command
139 : : * requires multiple scans of the index.
140 : : *
141 : : * Avoid resetting the tuples_removed and pages_newly_deleted fields here,
142 : : * since they track information about the VACUUM command, and so must last
143 : : * across each call to gistvacuumscan().
144 : : *
145 : : * (Note that pages_free is treated as state about the whole index, not
146 : : * the current VACUUM. This is appropriate because RecordFreeIndexPage()
147 : : * calls are idempotent, and get repeated for the same deleted pages in
148 : : * some scenarios. The point for us is to track the number of recyclable
149 : : * pages in the index at the end of the VACUUM command.)
150 : : */
151 : 66 : stats->num_pages = 0;
152 : 66 : stats->estimated_count = false;
153 : 66 : stats->num_index_tuples = 0;
154 : 66 : stats->pages_deleted = 0;
155 : 66 : stats->pages_free = 0;
156 : :
157 : : /*
158 : : * Create the integer sets to remember all the internal and the empty leaf
159 : : * pages in page_set_context. Internally, the integer set will remember
160 : : * this context so that the subsequent allocations for these integer sets
161 : : * will be done from the same context.
162 : : *
163 : : * XXX the allocation sizes used below pre-date generation context's block
164 : : * growing code. These values should likely be benchmarked and set to
165 : : * more suitable values.
166 : : */
167 : 66 : vstate.page_set_context = GenerationContextCreate(CurrentMemoryContext,
168 : : "GiST VACUUM page set context",
169 : : 16 * 1024,
170 : : 16 * 1024,
171 : : 16 * 1024);
172 : 66 : oldctx = MemoryContextSwitchTo(vstate.page_set_context);
173 : 66 : vstate.internal_page_set = intset_create();
174 : 66 : vstate.empty_leaf_set = intset_create();
175 : 66 : MemoryContextSwitchTo(oldctx);
176 : :
177 : : /* Set up info to pass down to gistvacuumpage */
178 : 66 : vstate.info = info;
179 : 66 : vstate.stats = stats;
180 : 66 : vstate.callback = callback;
181 : 66 : vstate.callback_state = callback_state;
182 [ + + - + : 66 : if (RelationNeedsWAL(rel))
- - - - ]
183 : 62 : vstate.startNSN = GetInsertRecPtr();
184 : : else
185 : 4 : vstate.startNSN = XLogGetFakeLSN(rel);
186 : :
187 : : /*
188 : : * The outer loop iterates over all index pages, in physical order (we
189 : : * hope the kernel will cooperate in providing read-ahead for speed). It
190 : : * is critical that we visit all leaf pages, including ones added after we
191 : : * start the scan, else we might fail to delete some deletable tuples.
192 : : * Hence, we must repeatedly check the relation length. We must acquire
193 : : * the relation-extension lock while doing so to avoid a race condition:
194 : : * if someone else is extending the relation, there is a window where
195 : : * bufmgr/smgr have created a new all-zero page but it hasn't yet been
196 : : * write-locked by gistNewBuffer(). If we manage to scan such a page
197 : : * here, we'll improperly assume it can be recycled. Taking the lock
198 : : * synchronizes things enough to prevent a problem: either num_pages won't
199 : : * include the new page, or gistNewBuffer already has write lock on the
200 : : * buffer and it will be fully initialized before we can examine it. (See
201 : : * also vacuumlazy.c, which has the same issue.) Also, we need not worry
202 : : * if a page is added immediately after we look; the page splitting code
203 : : * already has write-lock on the left page before it adds a right page, so
204 : : * we must already have processed any tuples due to be moved into such a
205 : : * page.
206 : : *
207 : : * We can skip locking for new or temp relations, however, since no one
208 : : * else could be accessing them.
209 : : */
210 [ + + + - ]: 66 : needLock = !RELATION_IS_LOCAL(rel);
211 : :
212 : 66 : p.current_blocknum = GIST_ROOT_BLKNO;
213 : :
214 : : /*
215 : : * It is safe to use batchmode as block_range_read_stream_cb takes no
216 : : * locks.
217 : : */
218 : 66 : stream = read_stream_begin_relation(READ_STREAM_MAINTENANCE |
219 : : READ_STREAM_FULL |
220 : : READ_STREAM_USE_BATCHING,
221 : : info->strategy,
222 : : rel,
223 : : MAIN_FORKNUM,
224 : : block_range_read_stream_cb,
225 : : &p,
226 : : 0);
227 : : for (;;)
228 : : {
229 : : /* Get the current relation length */
230 [ + + ]: 132 : if (needLock)
231 : 124 : LockRelationForExtension(rel, ExclusiveLock);
232 : 132 : num_pages = RelationGetNumberOfBlocks(rel);
233 [ + + ]: 132 : if (needLock)
234 : 124 : UnlockRelationForExtension(rel, ExclusiveLock);
235 : :
236 : : /* Quit if we've scanned the whole relation */
237 [ + + ]: 132 : if (p.current_blocknum >= num_pages)
238 : 66 : break;
239 : :
240 : 66 : p.last_exclusive = num_pages;
241 : :
242 : : /* Iterate over pages, then loop back to recheck relation length */
243 : : while (true)
244 : 1985 : {
245 : : Buffer buf;
246 : :
247 : : /* call vacuum_delay_point while not holding any buffer lock */
248 : 2051 : vacuum_delay_point(false);
249 : :
250 : 2051 : buf = read_stream_next_buffer(stream, NULL);
251 : :
252 [ + + ]: 2051 : if (!BufferIsValid(buf))
253 : 66 : break;
254 : :
255 : 1985 : gistvacuumpage(&vstate, buf);
256 : : }
257 : :
258 : : /*
259 : : * We have to reset the read stream to use it again. After returning
260 : : * InvalidBuffer, the read stream API won't invoke our callback again
261 : : * until the stream has been reset.
262 : : */
263 : 66 : read_stream_reset(stream);
264 : : }
265 : :
266 : 66 : read_stream_end(stream);
267 : :
268 : : /*
269 : : * If we found any recyclable pages (and recorded them in the FSM), then
270 : : * forcibly update the upper-level FSM pages to ensure that searchers can
271 : : * find them. It's possible that the pages were also found during
272 : : * previous scans and so this is a waste of time, but it's cheap enough
273 : : * relative to scanning the index that it shouldn't matter much, and
274 : : * making sure that free pages are available sooner not later seems
275 : : * worthwhile.
276 : : *
277 : : * Note that if no recyclable pages exist, we don't bother vacuuming the
278 : : * FSM at all.
279 : : */
280 [ - + ]: 66 : if (stats->pages_free > 0)
281 : 0 : IndexFreeSpaceMapVacuum(rel);
282 : :
283 : : /* update statistics */
284 : 66 : stats->num_pages = num_pages;
285 : :
286 : : /*
287 : : * If we saw any empty pages, try to unlink them from the tree so that
288 : : * they can be reused.
289 : : */
290 : 66 : gistvacuum_delete_empty_pages(info, &vstate);
291 : :
292 : : /* we don't need the internal and empty page sets anymore */
293 : 66 : MemoryContextDelete(vstate.page_set_context);
294 : 66 : vstate.page_set_context = NULL;
295 : 66 : vstate.internal_page_set = NULL;
296 : 66 : vstate.empty_leaf_set = NULL;
297 : 66 : }
298 : :
299 : : /*
300 : : * gistvacuumpage --- VACUUM one page
301 : : *
302 : : * This processes a single page for gistbulkdelete(). `buffer` contains the
303 : : * page to process. In some cases we must go back and reexamine
304 : : * previously-scanned pages; this routine recurses when necessary to handle
305 : : * that case.
306 : : */
307 : : static void
308 : 1985 : gistvacuumpage(GistVacState *vstate, Buffer buffer)
309 : : {
310 : 1985 : IndexVacuumInfo *info = vstate->info;
311 : 1985 : IndexBulkDeleteCallback callback = vstate->callback;
312 : 1985 : void *callback_state = vstate->callback_state;
313 : 1985 : Relation rel = info->index;
314 : 1985 : BlockNumber orig_blkno = BufferGetBlockNumber(buffer);
315 : : Page page;
316 : : BlockNumber recurse_to;
317 : :
318 : : /*
319 : : * orig_blkno is the highest block number reached by the outer
320 : : * gistvacuumscan() loop. This will be the same as blkno unless we are
321 : : * recursing to reexamine a previous page.
322 : : */
323 : 1985 : BlockNumber blkno = orig_blkno;
324 : :
325 : 1985 : restart:
326 : 1985 : recurse_to = InvalidBlockNumber;
327 : :
328 : : /*
329 : : * We are not going to stay here for a long time, aggressively grab an
330 : : * exclusive lock.
331 : : */
332 : 1985 : LockBuffer(buffer, GIST_EXCLUSIVE);
333 : 1985 : page = BufferGetPage(buffer);
334 : :
335 [ - + ]: 1985 : if (gistPageRecyclable(page))
336 : : {
337 : : /* Okay to recycle this page */
338 : 0 : RecordFreeIndexPage(rel, blkno);
339 : 0 : vstate->stats->pages_deleted++;
340 : 0 : vstate->stats->pages_free++;
341 : : }
342 [ - + ]: 1985 : else if (GistPageIsDeleted(page))
343 : : {
344 : : /* Already deleted, but can't recycle yet */
345 : 0 : vstate->stats->pages_deleted++;
346 : : }
347 [ + + ]: 1985 : else if (GistPageIsLeaf(page))
348 : : {
349 : : OffsetNumber todelete[MaxOffsetNumber];
350 : 1948 : int ntodelete = 0;
351 : : int nremain;
352 : 1948 : GISTPageOpaque opaque = GistPageGetOpaque(page);
353 : 1948 : OffsetNumber maxoff = PageGetMaxOffsetNumber(page);
354 : :
355 : : /*
356 : : * Check whether we need to recurse back to earlier pages. What we
357 : : * are concerned about is a page split that happened since we started
358 : : * the vacuum scan. If the split moved some tuples to a lower page
359 : : * then we might have missed 'em. If so, set up for tail recursion.
360 : : *
361 : : * This is similar to the checks we do during searches, when following
362 : : * a downlink, but we don't need to jump to higher-numbered pages,
363 : : * because we will process them later, anyway.
364 : : */
365 [ + - - + ]: 3896 : if ((GistFollowRight(page) ||
366 : 1948 : vstate->startNSN < GistPageGetNSN(page)) &&
367 [ # # ]: 0 : (opaque->rightlink != InvalidBlockNumber) &&
368 [ # # ]: 0 : (opaque->rightlink < orig_blkno))
369 : : {
370 : 0 : recurse_to = opaque->rightlink;
371 : : }
372 : :
373 : : /*
374 : : * Scan over all items to see which ones need to be deleted according
375 : : * to the callback function.
376 : : */
377 [ + + ]: 1948 : if (callback)
378 : : {
379 : : OffsetNumber off;
380 : :
381 : 758 : for (off = FirstOffsetNumber;
382 [ + + ]: 91770 : off <= maxoff;
383 : 91012 : off = OffsetNumberNext(off))
384 : : {
385 : 91012 : ItemId iid = PageGetItemId(page, off);
386 : 91012 : IndexTuple idxtuple = (IndexTuple) PageGetItem(page, iid);
387 : :
388 [ + + ]: 91012 : if (callback(&(idxtuple->t_tid), callback_state))
389 : 74992 : todelete[ntodelete++] = off;
390 : : }
391 : : }
392 : :
393 : : /*
394 : : * Apply any needed deletes. We issue just one WAL record per page,
395 : : * so as to minimize WAL traffic.
396 : : */
397 [ + + ]: 1948 : if (ntodelete > 0)
398 : : {
399 : 746 : START_CRIT_SECTION();
400 : :
401 : 746 : MarkBufferDirty(buffer);
402 : :
403 : 746 : PageIndexMultiDelete(page, todelete, ntodelete);
404 : :
405 [ + - - + : 746 : if (RelationNeedsWAL(rel))
- - - - ]
406 : 746 : {
407 : : XLogRecPtr recptr;
408 : :
409 : 746 : recptr = gistXLogUpdate(buffer,
410 : : todelete, ntodelete,
411 : : NULL, 0, InvalidBuffer);
412 : 746 : PageSetLSN(page, recptr);
413 : : }
414 : : else
415 : 0 : PageSetLSN(page, XLogGetFakeLSN(rel));
416 : :
417 : 746 : END_CRIT_SECTION();
418 : :
419 : 746 : vstate->stats->tuples_removed += ntodelete;
420 : : /* must recompute maxoff */
421 : 746 : maxoff = PageGetMaxOffsetNumber(page);
422 : : }
423 : :
424 : 1948 : nremain = maxoff - FirstOffsetNumber + 1;
425 [ + + ]: 1948 : if (nremain == 0)
426 : : {
427 : : /*
428 : : * The page is now completely empty. Remember its block number,
429 : : * so that we will try to delete the page in the second stage.
430 : : *
431 : : * Skip this when recursing, because IntegerSet requires that the
432 : : * values are added in ascending order. The next VACUUM will pick
433 : : * it up.
434 : : */
435 [ + - ]: 332 : if (blkno == orig_blkno)
436 : 332 : intset_add_member(vstate->empty_leaf_set, blkno);
437 : : }
438 : : else
439 : 1616 : vstate->stats->num_index_tuples += nremain;
440 : : }
441 : : else
442 : : {
443 : : /*
444 : : * On an internal page, check for "invalid tuples", left behind by an
445 : : * incomplete page split on PostgreSQL 9.0 or below. These are not
446 : : * created by newer PostgreSQL versions, but unfortunately, there is
447 : : * no version number anywhere in a GiST index, so we don't know
448 : : * whether this index might still contain invalid tuples or not.
449 : : */
450 : 37 : OffsetNumber maxoff = PageGetMaxOffsetNumber(page);
451 : : OffsetNumber off;
452 : :
453 : 37 : for (off = FirstOffsetNumber;
454 [ + + ]: 1956 : off <= maxoff;
455 : 1919 : off = OffsetNumberNext(off))
456 : : {
457 : 1919 : ItemId iid = PageGetItemId(page, off);
458 : 1919 : IndexTuple idxtuple = (IndexTuple) PageGetItem(page, iid);
459 : :
460 [ - + ]: 1919 : if (GistTupleIsInvalid(idxtuple))
461 [ # # ]: 0 : ereport(LOG,
462 : : (errmsg("index \"%s\" contains an inner tuple marked as invalid",
463 : : RelationGetRelationName(rel)),
464 : : errdetail("This is caused by an incomplete page split at crash recovery before upgrading to PostgreSQL 9.1."),
465 : : errhint("Please REINDEX it.")));
466 : : }
467 : :
468 : : /*
469 : : * Remember the block number of this page, so that we can revisit it
470 : : * later in gistvacuum_delete_empty_pages(), when we search for
471 : : * parents of empty leaf pages.
472 : : */
473 [ + - ]: 37 : if (blkno == orig_blkno)
474 : 37 : intset_add_member(vstate->internal_page_set, blkno);
475 : : }
476 : :
477 : 1985 : UnlockReleaseBuffer(buffer);
478 : :
479 : : /*
480 : : * This is really tail recursion, but if the compiler is too stupid to
481 : : * optimize it as such, we'd eat an uncomfortably large amount of stack
482 : : * space per recursion level (due to the deletable[] array). A failure is
483 : : * improbable since the number of levels isn't likely to be large ... but
484 : : * just in case, let's hand-optimize into a loop.
485 : : */
486 [ - + ]: 1985 : if (recurse_to != InvalidBlockNumber)
487 : : {
488 : 0 : blkno = recurse_to;
489 : :
490 : : /* check for vacuum delay while not holding any buffer lock */
491 : 0 : vacuum_delay_point(false);
492 : :
493 : 0 : buffer = ReadBufferExtended(rel, MAIN_FORKNUM, blkno, RBM_NORMAL,
494 : : info->strategy);
495 : 0 : goto restart;
496 : : }
497 : 1985 : }
498 : :
499 : : /*
500 : : * Scan all internal pages, and try to delete their empty child pages.
501 : : */
502 : : static void
503 : 66 : gistvacuum_delete_empty_pages(IndexVacuumInfo *info, GistVacState *vstate)
504 : : {
505 : 66 : Relation rel = info->index;
506 : : BlockNumber empty_pages_remaining;
507 : : uint64 blkno;
508 : :
509 : : /*
510 : : * Rescan all inner pages to find those that have empty child pages.
511 : : */
512 : 66 : empty_pages_remaining = intset_num_entries(vstate->empty_leaf_set);
513 : 66 : intset_begin_iterate(vstate->internal_page_set);
514 [ + + + + ]: 82 : while (empty_pages_remaining > 0 &&
515 : 12 : intset_iterate_next(vstate->internal_page_set, &blkno))
516 : : {
517 : : Buffer buffer;
518 : : Page page;
519 : : OffsetNumber off,
520 : : maxoff;
521 : : OffsetNumber todelete[MaxOffsetNumber];
522 : : BlockNumber leafs_to_delete[MaxOffsetNumber];
523 : : int ntodelete;
524 : : int deleted;
525 : :
526 : 4 : buffer = ReadBufferExtended(rel, MAIN_FORKNUM, (BlockNumber) blkno,
527 : : RBM_NORMAL, info->strategy);
528 : :
529 : 4 : LockBuffer(buffer, GIST_SHARE);
530 : 4 : page = BufferGetPage(buffer);
531 : :
532 [ + - + - : 4 : if (PageIsNew(page) || GistPageIsDeleted(page) || GistPageIsLeaf(page))
- + ]
533 : : {
534 : : /*
535 : : * This page was an internal page earlier, but now it's something
536 : : * else. Shouldn't happen...
537 : : */
538 : : Assert(false);
539 : 0 : UnlockReleaseBuffer(buffer);
540 : 0 : continue;
541 : : }
542 : :
543 : : /*
544 : : * Scan all the downlinks, and see if any of them point to empty leaf
545 : : * pages.
546 : : */
547 : 4 : maxoff = PageGetMaxOffsetNumber(page);
548 : 4 : ntodelete = 0;
549 : 4 : for (off = FirstOffsetNumber;
550 [ + + + - ]: 656 : off <= maxoff && ntodelete < maxoff - 1;
551 : 652 : off = OffsetNumberNext(off))
552 : : {
553 : 652 : ItemId iid = PageGetItemId(page, off);
554 : 652 : IndexTuple idxtuple = (IndexTuple) PageGetItem(page, iid);
555 : : BlockNumber leafblk;
556 : :
557 : 652 : leafblk = ItemPointerGetBlockNumber(&(idxtuple->t_tid));
558 [ + + ]: 652 : if (intset_is_member(vstate->empty_leaf_set, leafblk))
559 : : {
560 : 324 : leafs_to_delete[ntodelete] = leafblk;
561 : 324 : todelete[ntodelete++] = off;
562 : : }
563 : : }
564 : :
565 : : /*
566 : : * In order to avoid deadlock, child page must be locked before
567 : : * parent, so we must release the lock on the parent, lock the child,
568 : : * and then re-acquire the lock the parent. (And we wouldn't want to
569 : : * do I/O, while holding a lock, anyway.)
570 : : *
571 : : * At the instant that we're not holding a lock on the parent, the
572 : : * downlink might get moved by a concurrent insert, so we must
573 : : * re-check that it still points to the same child page after we have
574 : : * acquired both locks. Also, another backend might have inserted a
575 : : * tuple to the page, so that it is no longer empty. gistdeletepage()
576 : : * re-checks all these conditions.
577 : : */
578 : 4 : LockBuffer(buffer, GIST_UNLOCK);
579 : :
580 : 4 : deleted = 0;
581 [ + + ]: 328 : for (int i = 0; i < ntodelete; i++)
582 : : {
583 : : Buffer leafbuf;
584 : :
585 : : /*
586 : : * Don't remove the last downlink from the parent. That would
587 : : * confuse the insertion code.
588 : : */
589 [ - + ]: 324 : if (PageGetMaxOffsetNumber(page) == FirstOffsetNumber)
590 : 0 : break;
591 : :
592 : 324 : leafbuf = ReadBufferExtended(rel, MAIN_FORKNUM, leafs_to_delete[i],
593 : : RBM_NORMAL, info->strategy);
594 : 324 : LockBuffer(leafbuf, GIST_EXCLUSIVE);
595 : 324 : gistcheckpage(rel, leafbuf);
596 : :
597 : 324 : LockBuffer(buffer, GIST_EXCLUSIVE);
598 [ + - ]: 324 : if (gistdeletepage(info, vstate->stats,
599 : 324 : buffer, todelete[i] - deleted,
600 : : leafbuf))
601 : 324 : deleted++;
602 : 324 : LockBuffer(buffer, GIST_UNLOCK);
603 : :
604 : 324 : UnlockReleaseBuffer(leafbuf);
605 : : }
606 : :
607 : 4 : ReleaseBuffer(buffer);
608 : :
609 : : /*
610 : : * We can stop the scan as soon as we have seen the downlinks, even if
611 : : * we were not able to remove them all.
612 : : */
613 : 4 : empty_pages_remaining -= ntodelete;
614 : : }
615 : 66 : }
616 : :
617 : : /*
618 : : * gistdeletepage takes a leaf page, and its parent, and tries to delete the
619 : : * leaf. Both pages must be locked.
620 : : *
621 : : * Even if the page was empty when we first saw it, a concurrent inserter might
622 : : * have added a tuple to it since. Similarly, the downlink might have moved.
623 : : * We re-check all the conditions, to make sure the page is still deletable,
624 : : * before modifying anything.
625 : : *
626 : : * Returns true, if the page was deleted, and false if a concurrent update
627 : : * prevented it.
628 : : */
629 : : static bool
630 : 324 : gistdeletepage(IndexVacuumInfo *info, IndexBulkDeleteResult *stats,
631 : : Buffer parentBuffer, OffsetNumber downlink,
632 : : Buffer leafBuffer)
633 : : {
634 : 324 : Page parentPage = BufferGetPage(parentBuffer);
635 : 324 : Page leafPage = BufferGetPage(leafBuffer);
636 : : ItemId iid;
637 : : IndexTuple idxtuple;
638 : : XLogRecPtr recptr;
639 : : FullTransactionId txid;
640 : :
641 : : /*
642 : : * Check that the leaf is still empty and deletable.
643 : : */
644 [ - + ]: 324 : if (!GistPageIsLeaf(leafPage))
645 : : {
646 : : /* a leaf page should never become a non-leaf page */
647 : : Assert(false);
648 : 0 : return false;
649 : : }
650 : :
651 [ - + ]: 324 : if (GistFollowRight(leafPage))
652 : 0 : return false; /* don't mess with a concurrent page split */
653 : :
654 [ - + ]: 324 : if (PageGetMaxOffsetNumber(leafPage) != InvalidOffsetNumber)
655 : 0 : return false; /* not empty anymore */
656 : :
657 : : /*
658 : : * Ok, the leaf is deletable. Is the downlink in the parent page still
659 : : * valid? It might have been moved by a concurrent insert. We could try
660 : : * to re-find it by scanning the page again, possibly moving right if the
661 : : * was split. But for now, let's keep it simple and just give up. The
662 : : * next VACUUM will pick it up.
663 : : */
664 [ + - + - ]: 324 : if (PageIsNew(parentPage) || GistPageIsDeleted(parentPage) ||
665 [ - + ]: 324 : GistPageIsLeaf(parentPage))
666 : : {
667 : : /* shouldn't happen, internal pages are never deleted */
668 : : Assert(false);
669 : 0 : return false;
670 : : }
671 : :
672 [ + - ]: 324 : if (PageGetMaxOffsetNumber(parentPage) < downlink
673 [ - + ]: 324 : || PageGetMaxOffsetNumber(parentPage) <= FirstOffsetNumber)
674 : 0 : return false;
675 : :
676 : 324 : iid = PageGetItemId(parentPage, downlink);
677 : 324 : idxtuple = (IndexTuple) PageGetItem(parentPage, iid);
678 [ - + ]: 648 : if (BufferGetBlockNumber(leafBuffer) !=
679 : 324 : ItemPointerGetBlockNumber(&(idxtuple->t_tid)))
680 : 0 : return false;
681 : :
682 : : /*
683 : : * All good, proceed with the deletion.
684 : : *
685 : : * The page cannot be immediately recycled, because in-progress scans that
686 : : * saw the downlink might still visit it. Mark the page with the current
687 : : * next-XID counter, so that we know when it can be recycled. Once that
688 : : * XID becomes older than GlobalXmin, we know that all scans that are
689 : : * currently in progress must have ended. (That's much more conservative
690 : : * than needed, but let's keep it safe and simple.)
691 : : */
692 : 324 : txid = ReadNextFullTransactionId();
693 : :
694 : 324 : START_CRIT_SECTION();
695 : :
696 : : /* mark the page as deleted */
697 : 324 : MarkBufferDirty(leafBuffer);
698 : 324 : GistPageSetDeleted(leafPage, txid);
699 : 324 : stats->pages_newly_deleted++;
700 : 324 : stats->pages_deleted++;
701 : :
702 : : /* remove the downlink from the parent */
703 : 324 : MarkBufferDirty(parentBuffer);
704 : 324 : PageIndexTupleDelete(parentPage, downlink);
705 : :
706 [ + - - + : 324 : if (RelationNeedsWAL(info->index))
- - - - ]
707 : 324 : recptr = gistXLogPageDelete(leafBuffer, txid, parentBuffer, downlink);
708 : : else
709 : 0 : recptr = XLogGetFakeLSN(info->index);
710 : 324 : PageSetLSN(parentPage, recptr);
711 : 324 : PageSetLSN(leafPage, recptr);
712 : :
713 : 324 : END_CRIT_SECTION();
714 : :
715 : 324 : return true;
716 : : }
|