2 -- Glyn Astill 16/01/2015
3 -- Attempt at hstore style delete operator for jsonb
6 SET search_path = 'public';
8 CREATE OR REPLACE FUNCTION jsonb_delete_left(a jsonb, b text)
13 SELECT ('{' || string_agg(to_json(key) || ':' || value, ',') || '}')
15 WHERE NOT to_json(key)::jsonb ? b
19 LANGUAGE sql IMMUTABLE STRICT;
20 COMMENT ON FUNCTION jsonb_delete_left(jsonb, text) IS 'delete key in second argument from first argument';
22 CREATE OPERATOR - ( PROCEDURE = jsonb_delete_left, LEFTARG = jsonb, RIGHTARG = text);
23 COMMENT ON OPERATOR - (jsonb, text) IS 'delete key from left operand';
27 CREATE OR REPLACE FUNCTION jsonb_delete_left(a jsonb, b text[])
32 SELECT ('{' || string_agg(to_json(key) || ':' || value, ',') || '}')
38 LANGUAGE sql IMMUTABLE STRICT;
39 COMMENT ON FUNCTION jsonb_delete_left(jsonb, text[]) IS 'delete keys in second argument from first argument';
41 CREATE OPERATOR - ( PROCEDURE = jsonb_delete_left, LEFTARG = jsonb, RIGHTARG = text[]);
42 COMMENT ON OPERATOR - (jsonb, text[]) IS 'delete keys from left operand';
46 CREATE OR REPLACE FUNCTION jsonb_delete_left(a jsonb, b jsonb)
51 SELECT ('{' || string_agg(to_json(key) || ':' || value, ',') || '}')
53 WHERE NOT ('{' || to_json(key) || ':' || value || '}')::jsonb <@ b
57 LANGUAGE sql IMMUTABLE STRICT;
58 COMMENT ON FUNCTION jsonb_delete_left(jsonb, jsonb) IS 'delete matching pairs in second argument from first argument';
60 CREATE OPERATOR - ( PROCEDURE = jsonb_delete_left, LEFTARG = jsonb, RIGHTARG = jsonb);
61 COMMENT ON OPERATOR - (jsonb, jsonb) IS 'delete matching pairs from left operand';