1// SPDX-License-Identifier: GPL-2.0
  2#include "bcachefs.h"
  3#include "bkey_buf.h"
  4#include "bkey_cmp.h"
  5#include "bkey_sort.h"
  6#include "bset.h"
  7#include "extents.h"
  8
  9typedef int (*sort_cmp_fn)(struct btree *,
 10			   struct bkey_packed *,
 11			   struct bkey_packed *);
 12
 13static inline bool sort_iter_end(struct sort_iter *iter)
 14{
 15	return !iter->used;
 16}
 17
 18static inline void sort_iter_sift(struct sort_iter *iter, unsigned from,
 19				  sort_cmp_fn cmp)
 20{
 21	unsigned i;
 22
 23	for (i = from;
 24	     i + 1 < iter->used &&
 25	     cmp(iter->b, iter->data[i].k, iter->data[i + 1].k) > 0;
 26	     i++)
 27		swap(iter->data[i], iter->data[i + 1]);
 28}
 29
 30static inline void sort_iter_sort(struct sort_iter *iter, sort_cmp_fn cmp)
 31{
 32	unsigned i = iter->used;
 33
 34	while (i--)
 35		sort_iter_sift(iter, i, cmp);
 36}
 37
 38static inline struct bkey_packed *sort_iter_peek(struct sort_iter *iter)
 39{
 40	return !sort_iter_end(iter) ? iter->data->k : NULL;
 41}
 42
 43static inline void sort_iter_advance(struct sort_iter *iter, sort_cmp_fn cmp)
 44{
 45	struct sort_iter_set *i = iter->data;
 46
 47	BUG_ON(!iter->used);
 48
 49	i->k = bkey_p_next(i->k);
 50
 51	BUG_ON(i->k > i->end);
 52
 53	if (i->k == i->end)
 54		array_remove_item(iter->data, iter->used, 0);
 55	else
 56		sort_iter_sift(iter, 0, cmp);
 57}
 58
 59static inline struct bkey_packed *sort_iter_next(struct sort_iter *iter,
 60						 sort_cmp_fn cmp)
 61{
 62	struct bkey_packed *ret = sort_iter_peek(iter);
 63
 64	if (ret)
 65		sort_iter_advance(iter, cmp);
 66
 67	return ret;
 68}
 69
 70/*
 71 * If keys compare equal, compare by pointer order:
 72 */
 73static inline int key_sort_fix_overlapping_cmp(struct btree *b,
 74					       struct bkey_packed *l,
 75					       struct bkey_packed *r)
 76{
 77	return bch2_bkey_cmp_packed(b, l, r) ?:
 78		cmp_int((unsigned long) l, (unsigned long) r);
 79}
 80
 81static inline bool should_drop_next_key(struct sort_iter *iter)
 82{
 83	/*
 84	 * key_sort_cmp() ensures that when keys compare equal the older key
 85	 * comes first; so if l->k compares equal to r->k then l->k is older
 86	 * and should be dropped.
 87	 */
 88	return iter->used >= 2 &&
 89		!bch2_bkey_cmp_packed(iter->b,
 90				 iter->data[0].k,
 91				 iter->data[1].k);
 92}
 93
 94struct btree_nr_keys
 95bch2_key_sort_fix_overlapping(struct bch_fs *c, struct bset *dst,
 96			      struct sort_iter *iter)
 97{
 98	struct bkey_packed *out = dst->start;
 99	struct bkey_packed *k;
100	struct btree_nr_keys nr;
101
102	memset(&nr, 0, sizeof(nr));
103
104	sort_iter_sort(iter, key_sort_fix_overlapping_cmp);
105
106	while ((k = sort_iter_peek(iter))) {
107		if (!bkey_deleted(k) &&
108		    !should_drop_next_key(iter)) {
109			bkey_p_copy(out, k);
110			btree_keys_account_key_add(&nr, 0, out);
111			out = bkey_p_next(out);
112		}
113
114		sort_iter_advance(iter, key_sort_fix_overlapping_cmp);
115	}
116
117	dst->u64s = cpu_to_le16((u64 *) out - dst->_data);
118	return nr;
119}
120
121/* Sort + repack in a new format: */
122struct btree_nr_keys
123bch2_sort_repack(struct bset *dst, struct btree *src,
124		 struct btree_node_iter *src_iter,
125		 struct bkey_format *out_f,
126		 bool filter_whiteouts)
127{
128	struct bkey_format *in_f = &src->format;
129	struct bkey_packed *in, *out = vstruct_last(dst);
130	struct btree_nr_keys nr;
131	bool transform = memcmp(out_f, &src->format, sizeof(*out_f));
132
133	memset(&nr, 0, sizeof(nr));
134
135	while ((in = bch2_btree_node_iter_next_all(src_iter, src))) {
136		if (filter_whiteouts && bkey_deleted(in))
137			continue;
138
139		if (!transform)
140			bkey_p_copy(out, in);
141		else if (bch2_bkey_transform(out_f, out, bkey_packed(in)
142					     ? in_f : &bch2_bkey_format_current, in))
143			out->format = KEY_FORMAT_LOCAL_BTREE;
144		else
145			bch2_bkey_unpack(src, (void *) out, in);
146
147		out->needs_whiteout = false;
148
149		btree_keys_account_key_add(&nr, 0, out);
150		out = bkey_p_next(out);
151	}
152
153	dst->u64s = cpu_to_le16((u64 *) out - dst->_data);
154	return nr;
155}
156
157static inline int sort_keys_cmp(struct btree *b,
158				struct bkey_packed *l,
159				struct bkey_packed *r)
160{
161	return bch2_bkey_cmp_packed_inlined(b, l, r) ?:
162		(int) bkey_deleted(r) - (int) bkey_deleted(l) ?:
163		(int) l->needs_whiteout - (int) r->needs_whiteout;
164}
165
166unsigned bch2_sort_keys(struct bkey_packed *dst,
167			struct sort_iter *iter,
168			bool filter_whiteouts)
169{
170	const struct bkey_format *f = &iter->b->format;
171	struct bkey_packed *in, *next, *out = dst;
172
173	sort_iter_sort(iter, sort_keys_cmp);
174
175	while ((in = sort_iter_next(iter, sort_keys_cmp))) {
176		bool needs_whiteout = false;
177
178		if (bkey_deleted(in) &&
179		    (filter_whiteouts || !in->needs_whiteout))
180			continue;
181
182		while ((next = sort_iter_peek(iter)) &&
183		       !bch2_bkey_cmp_packed_inlined(iter->b, in, next)) {
184			BUG_ON(in->needs_whiteout &&
185			       next->needs_whiteout);
186			needs_whiteout |= in->needs_whiteout;
187			in = sort_iter_next(iter, sort_keys_cmp);
188		}
189
190		if (bkey_deleted(in)) {
191			memcpy_u64s_small(out, in, bkeyp_key_u64s(f, in));
192			set_bkeyp_val_u64s(f, out, 0);
193		} else {
194			bkey_p_copy(out, in);
195		}
196		out->needs_whiteout |= needs_whiteout;
197		out = bkey_p_next(out);
198	}
199
200	return (u64 *) out - (u64 *) dst;
201}