Remove quoted SQL language identifiers

This commit is contained in:
“Paul 2014-09-02 20:01:28 +02:00
parent 96a5a31203
commit 931651ca32
13 changed files with 95 additions and 95 deletions

View File

@ -45,7 +45,7 @@ BEGIN
RETURN out_bits;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- This legacy conversion function will eventually be removed, once all logic
-- has been converted to use bitmaps, or to use the bits_to_priv() output.
@ -98,7 +98,7 @@ BEGIN
RETURN out_priv;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
CREATE or REPLACE FUNCTION get_permissions( INT, INT ) RETURNS TEXT AS $$
DECLARE
@ -151,12 +151,12 @@ BEGIN
RETURN '';
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
CREATE or REPLACE FUNCTION get_group_role_no() RETURNS INT AS $$
SELECT role_no FROM roles WHERE role_name = 'Group'
$$ LANGUAGE 'sql' IMMUTABLE;
$$ LANGUAGE sql IMMUTABLE;
CREATE or REPLACE FUNCTION has_legacy_privilege( INT, TEXT, INT ) RETURNS BOOLEAN AS $$
DECLARE
@ -205,7 +205,7 @@ BEGIN
RETURN FALSE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
-- Given a verbose DAV: or CalDAV: privilege name return the bitmask
@ -242,7 +242,7 @@ BEGIN
ELSE 0 END)::BIT(24);
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- Given an array of verbose DAV: or CalDAV: privilege names return the bitmask
@ -269,7 +269,7 @@ BEGIN
RETURN out_bits;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- This legacy conversion function will eventually be removed, once all logic
@ -368,4 +368,4 @@ BEGIN
RETURN out_priv;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;

View File

@ -74,7 +74,7 @@ BEGIN
RETURN our_answer;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
CREATE or REPLACE FUNCTION calculate_later_timestamp( TIMESTAMP WITH TIME ZONE, TIMESTAMP WITH TIME ZONE, TEXT ) RETURNS TIMESTAMP WITH TIME ZONE AS $$
@ -239,12 +239,12 @@ BEGIN
RETURN our_answer;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
CREATE or REPLACE FUNCTION usr_is_role( INT, TEXT ) RETURNS BOOLEAN AS $$
SELECT EXISTS( SELECT 1 FROM role_member JOIN roles USING(role_no) WHERE role_member.user_no=$1 AND roles.role_name=$2 )
$$ LANGUAGE 'sql' IMMUTABLE STRICT;
$$ LANGUAGE sql IMMUTABLE STRICT;
CREATE or REPLACE FUNCTION legacy_get_permissions( INT, INT ) RETURNS TEXT AS $$
DECLARE
@ -333,13 +333,13 @@ BEGIN
RETURN '';
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
-- Function to convert a PostgreSQL date into UTC + the format used by iCalendar
CREATE or REPLACE FUNCTION to_ical_utc( TIMESTAMP WITH TIME ZONE ) RETURNS TEXT AS $$
SELECT to_char( $1 at time zone 'UTC', 'YYYYMMDD"T"HH24MISS"Z"' )
$$ LANGUAGE 'sql' IMMUTABLE STRICT;
$$ LANGUAGE sql IMMUTABLE STRICT;
-- Function to set an arbitrary DAV property
CREATE or REPLACE FUNCTION set_dav_property( TEXT, INTEGER, TEXT, TEXT ) RETURNS BOOLEAN AS $$
@ -365,7 +365,7 @@ BEGIN
END IF;
RETURN TRUE;
END;
$$ LANGUAGE 'plpgsql' STRICT;
$$ LANGUAGE plpgsql STRICT;
-- List a user's relationships as a text string
CREATE or REPLACE FUNCTION relationship_list( INT8 ) RETURNS TEXT AS $$
@ -385,7 +385,7 @@ BEGIN
END LOOP;
RETURN rlist;
END;
$$ LANGUAGE 'plpgsql';
$$ LANGUAGE plpgsql;
DROP FUNCTION rename_davical_user( TEXT, TEXT );
DROP TRIGGER usr_modified ON usr CASCADE;
@ -518,7 +518,7 @@ CREATE or REPLACE FUNCTION sync_dav_id ( ) RETURNS TRIGGER AS $$
RETURN NEW;
END
$$ LANGUAGE 'plpgsql';
$$ LANGUAGE plpgsql;
CREATE TRIGGER caldav_data_sync_dav_id AFTER INSERT OR UPDATE ON caldav_data
FOR EACH ROW EXECUTE PROCEDURE sync_dav_id();
@ -573,7 +573,7 @@ BEGIN
RETURN out_bits;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- This legacy conversion function will eventually be removed, once all logic
-- has been converted to use bitmaps, or to use the bits_to_priv() output.
@ -626,7 +626,7 @@ BEGIN
RETURN out_priv;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
CREATE or REPLACE FUNCTION get_permissions( INT, INT ) RETURNS TEXT AS $$
DECLARE
@ -679,12 +679,12 @@ BEGIN
RETURN '';
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
CREATE or REPLACE FUNCTION get_group_role_no() RETURNS INT AS $$
SELECT role_no FROM roles WHERE role_name = 'Group'
$$ LANGUAGE 'sql' IMMUTABLE;
$$ LANGUAGE sql IMMUTABLE;
CREATE or REPLACE FUNCTION has_legacy_privilege( INT, TEXT, INT ) RETURNS BOOLEAN AS $$
DECLARE
@ -733,7 +733,7 @@ BEGIN
RETURN FALSE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
-- Given a verbose DAV: or CalDAV: privilege name return the bitmask
@ -770,7 +770,7 @@ BEGIN
ELSE 0 END)::BIT(24);
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- Given an array of verbose DAV: or CalDAV: privilege names return the bitmask
@ -797,7 +797,7 @@ BEGIN
RETURN out_bits;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- NOTE: Round-trip through this and then back through privilege_to_bits
@ -892,7 +892,7 @@ BEGIN
RETURN out_priv;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- Expanded group memberships out to some depth
@ -902,7 +902,7 @@ CREATE or REPLACE FUNCTION expand_memberships( INT8, INT ) RETURNS SETOF INT8 AS
SELECT expanded.g_id FROM (SELECT CASE WHEN $2 > 0 THEN expand_memberships( group_id, $2 - 1) END AS g_id
FROM group_member WHERE member_id = $1) AS expanded
WHERE expanded.g_id IS NOT NULL;
$$ LANGUAGE 'sql' STABLE STRICT;
$$ LANGUAGE sql STABLE STRICT;
-- Expanded group members out to some depth
CREATE or REPLACE FUNCTION expand_members( INT8, INT ) RETURNS SETOF INT8 AS $$
@ -911,7 +911,7 @@ CREATE or REPLACE FUNCTION expand_members( INT8, INT ) RETURNS SETOF INT8 AS $$
SELECT expanded.m_id FROM (SELECT CASE WHEN $2 > 0 THEN expand_members( member_id, $2 - 1) END AS m_id
FROM group_member WHERE group_id = $1) AS expanded
WHERE expanded.m_id IS NOT NULL;
$$ LANGUAGE 'sql' STABLE STRICT;
$$ LANGUAGE sql STABLE STRICT;
@ -949,7 +949,7 @@ BEGIN
RETURN out_conferred;
END;
$$ LANGUAGE 'plpgsql' STABLE STRICT;
$$ LANGUAGE plpgsql STABLE STRICT;
-- Privileges from accessor to grantor, by user_no
@ -972,7 +972,7 @@ BEGIN
RETURN out_conferred;
END;
$$ LANGUAGE 'plpgsql' STABLE STRICT;
$$ LANGUAGE plpgsql STABLE STRICT;
-- Privileges from accessor (by principal_id) to path
@ -1046,7 +1046,7 @@ BEGIN
RETURN out_conferred;
END;
$$ LANGUAGE 'plpgsql' STABLE STRICT;
$$ LANGUAGE plpgsql STABLE STRICT;
-- List a user's memberships as a text string
@ -1066,7 +1066,7 @@ BEGIN
END LOOP;
RETURN mlist;
END;
$$ LANGUAGE 'plpgsql' STRICT;
$$ LANGUAGE plpgsql STRICT;
-- List a user's members as a text string
@ -1086,7 +1086,7 @@ BEGIN
END LOOP;
RETURN mlist;
END;
$$ LANGUAGE 'plpgsql' STRICT;
$$ LANGUAGE plpgsql STRICT;
-- List the privileges as a text string
@ -1113,7 +1113,7 @@ BEGIN
END IF;
RETURN plist;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
DROP TRIGGER principal_modified ON principal CASCADE;
@ -1175,7 +1175,7 @@ CREATE or REPLACE FUNCTION p_has_proxy_access_to( INT8, INT ) RETURNS SETOF INT8
WHERE (default_privileges & 5::BIT(24)) != 0::BIT(24)
AND principal_id != $1
) subquery;
$$ LANGUAGE 'sql' STABLE STRICT;
$$ LANGUAGE sql STABLE STRICT;
-- A list of the principals who can proxy to this principal
@ -1185,7 +1185,7 @@ CREATE or REPLACE FUNCTION grants_proxy_access_from_p( INT8, INT ) RETURNS SETOF
WHERE by_collection IS NULL AND by_principal != $1
AND by_principal IN (SELECT expand_members(g2.to_principal,$2) FROM grants g2 WHERE g2.by_principal = $1)
;
$$ LANGUAGE 'sql' STABLE STRICT;
$$ LANGUAGE sql STABLE STRICT;
@ -1209,7 +1209,7 @@ BEGIN
VALUES( in_collection_id, in_status, tmp_int, in_dav_name);
RETURN TRUE;
END
$$ LANGUAGE 'plpgsql' VOLATILE STRICT;
$$ LANGUAGE plpgsql VOLATILE STRICT;
CREATE or REPLACE FUNCTION new_sync_token( INT8, INT8 ) RETURNS INT8 AS $$
@ -1254,7 +1254,7 @@ BEGIN
-- Returning the new token
RETURN new_token;
END
$$ LANGUAGE 'plpgsql' STRICT;
$$ LANGUAGE plpgsql STRICT;
DROP TRIGGER alarm_changed ON calendar_alarm CASCADE;

View File

@ -36,7 +36,7 @@ BEGIN
ELSE 0 END)::BIT(24);
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- Given an array of verbose DAV: or CalDAV: privilege names return the bitmask
CREATE or REPLACE FUNCTION privilege_to_bits( TEXT[] ) RETURNS BIT(24) AS $$
@ -62,7 +62,7 @@ BEGIN
RETURN out_bits;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- This sequence is used in a number of places so that any DAV resource will have a unique ID
@ -262,7 +262,7 @@ CREATE or REPLACE FUNCTION sync_dav_id ( ) RETURNS TRIGGER AS $$
RETURN NEW;
END
$$ LANGUAGE 'plpgsql';
$$ LANGUAGE plpgsql;
CREATE TRIGGER caldav_data_sync_dav_id AFTER INSERT OR UPDATE ON caldav_data
FOR EACH ROW EXECUTE PROCEDURE sync_dav_id();

View File

@ -46,7 +46,7 @@ CREATE or REPLACE FUNCTION sync_dav_id ( ) RETURNS TRIGGER AS '
RETURN NEW;
END
' LANGUAGE 'plpgsql';
' LANGUAGE plpgsql;
CREATE TRIGGER caldav_data_sync_dav_id AFTER INSERT OR UPDATE ON caldav_data
FOR EACH ROW EXECUTE PROCEDURE sync_dav_id();

View File

@ -48,7 +48,7 @@ CREATE or REPLACE FUNCTION sync_dav_id ( ) RETURNS TRIGGER AS '
RETURN NEW;
END
' LANGUAGE 'plpgsql';
' LANGUAGE plpgsql;
CREATE TRIGGER caldav_data_sync_dav_id AFTER INSERT OR UPDATE ON caldav_data
FOR EACH ROW EXECUTE PROCEDURE sync_dav_id();

View File

@ -42,7 +42,7 @@ CREATE or REPLACE FUNCTION sync_dav_id ( ) RETURNS TRIGGER AS '
RETURN NEW;
END
' LANGUAGE 'plpgsql';
' LANGUAGE plpgsql;
-- CREATE TRIGGER caldav_data_sync_dav_id AFTER INSERT OR UPDATE ON caldav_data
-- FOR EACH ROW EXECUTE PROCEDURE sync_dav_id();

View File

@ -28,7 +28,7 @@ CREATE or REPLACE FUNCTION check_db_revision( INT, INT, INT ) RETURNS BOOLEAN AS
RAISE EXCEPTION ''Database has not been upgraded to %.%.%'', major, minor, patch;
RETURN FALSE;
END;
' LANGUAGE 'plpgsql';
' LANGUAGE plpgsql;
-- Just in case these constraints got added manually, so we won't fail

View File

@ -42,7 +42,7 @@ CREATE or REPLACE FUNCTION sync_dav_id ( ) RETURNS TRIGGER AS '
RETURN NEW;
END
' LANGUAGE 'plpgsql';
' LANGUAGE plpgsql;
-- CREATE TRIGGER caldav_data_sync_dav_id AFTER INSERT OR UPDATE ON caldav_data
-- FOR EACH ROW EXECUTE PROCEDURE sync_dav_id();

View File

@ -42,7 +42,7 @@ CREATE or REPLACE FUNCTION sync_dav_id ( ) RETURNS TRIGGER AS '
RETURN NEW;
END
' LANGUAGE 'plpgsql';
' LANGUAGE plpgsql;
-- CREATE TRIGGER caldav_data_sync_dav_id AFTER INSERT OR UPDATE ON caldav_data
-- FOR EACH ROW EXECUTE PROCEDURE sync_dav_id();

View File

@ -50,7 +50,7 @@ BEGIN
RETURN out_bits;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- This legacy conversion function will eventually be removed, once all logic
-- has been converted to use bitmaps, or to use the bits_to_priv() output.
@ -103,7 +103,7 @@ BEGIN
RETURN out_priv;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
CREATE or REPLACE FUNCTION get_permissions( INT, INT ) RETURNS TEXT AS $$
DECLARE
@ -156,12 +156,12 @@ BEGIN
RETURN '';
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
CREATE or REPLACE FUNCTION get_group_role_no() RETURNS INT AS $$
SELECT role_no FROM roles WHERE role_name = 'Group'
$$ LANGUAGE 'sql' IMMUTABLE;
$$ LANGUAGE sql IMMUTABLE;
CREATE or REPLACE FUNCTION has_legacy_privilege( INT, TEXT, INT ) RETURNS BOOLEAN AS $$
DECLARE
@ -210,7 +210,7 @@ BEGIN
RETURN FALSE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
-- Given a verbose DAV: or CalDAV: privilege name return the bitmask
@ -247,7 +247,7 @@ BEGIN
ELSE 0 END)::BIT(24);
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- Given an array of verbose DAV: or CalDAV: privilege names return the bitmask
@ -274,7 +274,7 @@ BEGIN
RETURN out_bits;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
-- This legacy conversion function will eventually be removed, once all logic
@ -372,7 +372,7 @@ BEGIN
RETURN out_priv;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
@ -491,7 +491,7 @@ BEGIN
RETURN out_bits;
END
$$
LANGUAGE 'plpgsql' IMMUTABLE STRICT;
LANGUAGE plpgsql IMMUTABLE STRICT;
ALTER TABLE relationship_type ADD COLUMN bit_confers BIT(24) DEFAULT privilege_to_bits(ARRAY['DAV::read','DAV::write']);

View File

@ -54,7 +54,7 @@ BEGIN
VALUES( in_collection_id, in_status, tmp_int, in_dav_name);
RETURN TRUE;
END
$$ LANGUAGE 'plpgsql' VOLATILE STRICT;
$$ LANGUAGE plpgsql VOLATILE STRICT;
CREATE or REPLACE FUNCTION new_sync_token( INT8, INT8 ) RETURNS INT8 AS $$
@ -76,4 +76,4 @@ BEGIN
INSERT INTO sync_tokens(collection_id, sync_token) VALUES( in_collection_id, tmp_int );
RETURN tmp_int;
END
$$ LANGUAGE 'plpgsql' STRICT;
$$ LANGUAGE plpgsql STRICT;

View File

@ -75,7 +75,7 @@ BEGIN
RETURN result;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
-- Return a SETOF dates within the month of a particular date which match a string of BYDAY rule specifications
@ -170,7 +170,7 @@ BEGIN
RETURN;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
-- Return a SETOF dates within the month of a particular date which match a string of BYDAY rule specifications
@ -204,7 +204,7 @@ BEGIN
RETURN;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
-- Return a SETOF dates within the week of a particular date which match a single BYDAY rule specification
@ -238,12 +238,12 @@ BEGIN
RETURN;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
CREATE or REPLACE FUNCTION event_has_exceptions( TEXT ) RETURNS BOOLEAN AS $$
SELECT $1 ~ E'\nRECURRENCE-ID(;TZID=[^:]+)?:[[:space:]]*[[:digit:]]{8}(T[[:digit:]]{6})?'
$$ LANGUAGE 'sql' IMMUTABLE STRICT;
$$ LANGUAGE sql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -261,7 +261,7 @@ BEGIN
END IF;
RETURN TRUE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
------------------------------------------------------------------------------------------------------
@ -277,7 +277,7 @@ BEGIN
END IF;
RETURN TRUE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
------------------------------------------------------------------------------------------------------
@ -293,7 +293,7 @@ BEGIN
END IF;
RETURN TRUE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
------------------------------------------------------------------------------------------------------
@ -309,7 +309,7 @@ BEGIN
END IF;
RETURN TRUE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
------------------------------------------------------------------------------------------------------
@ -356,7 +356,7 @@ BEGIN
END IF;
CLOSE curse;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
------------------------------------------------------------------------------------------------------
@ -396,7 +396,7 @@ BEGIN
RETURN NEXT after;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -428,7 +428,7 @@ BEGIN
END LOOP;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -473,7 +473,7 @@ BEGIN
END LOOP;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -507,7 +507,7 @@ BEGIN
END IF;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -535,7 +535,7 @@ BEGIN
RETURN NEXT after;
END IF;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -632,7 +632,7 @@ BEGIN
END LOOP;
-- RETURN QUERY;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -651,7 +651,7 @@ BEGIN
RETURN NEXT rowvar.d;
END LOOP;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -701,9 +701,9 @@ BEGIN
RETURN FOUND;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
CREATE or REPLACE FUNCTION icalendar_interval_to_SQL( TEXT ) RETURNS interval AS $function$
SELECT CASE WHEN substring($1,1,1) = '-' THEN -1 ELSE 1 END * regexp_replace( regexp_replace($1, '[PT-]', '', 'g'), '([A-Z])', E'\\1 ', 'g')::interval;
$function$ LANGUAGE 'sql' IMMUTABLE STRICT;
$function$ LANGUAGE sql IMMUTABLE STRICT;

View File

@ -75,7 +75,7 @@ BEGIN
RETURN result;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
-- Return a SETOF dates within the month of a particular date which match a string of BYDAY rule specifications
@ -161,7 +161,7 @@ BEGIN
RETURN;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
-- Return a SETOF dates within the month of a particular date which match a string of BYDAY rule specifications
@ -195,7 +195,7 @@ BEGIN
RETURN;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
-- Return a SETOF dates within the week of a particular date which match a single BYDAY rule specification
@ -229,12 +229,12 @@ BEGIN
RETURN;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
CREATE or REPLACE FUNCTION event_has_exceptions( TEXT ) RETURNS BOOLEAN AS $$
SELECT $1 ~ E'\nRECURRENCE-ID(;TZID=[^:]+)?:[[:space:]]*[[:digit:]]{8}(T[[:digit:]]{6})?'
$$ LANGUAGE 'sql' IMMUTABLE STRICT;
$$ LANGUAGE sql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -252,7 +252,7 @@ BEGIN
END IF;
RETURN TRUE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
------------------------------------------------------------------------------------------------------
@ -268,7 +268,7 @@ BEGIN
END IF;
RETURN TRUE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
------------------------------------------------------------------------------------------------------
@ -284,7 +284,7 @@ BEGIN
END IF;
RETURN TRUE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
------------------------------------------------------------------------------------------------------
@ -300,7 +300,7 @@ BEGIN
END IF;
RETURN TRUE;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
------------------------------------------------------------------------------------------------------
@ -340,7 +340,7 @@ BEGIN
END IF;
CLOSE curse;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
------------------------------------------------------------------------------------------------------
@ -380,7 +380,7 @@ BEGIN
RETURN NEXT after;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -410,7 +410,7 @@ BEGIN
RETURN QUERY SELECT d FROM rrule_bysetpos_filter(curse,rrule.bysetpos) d;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -453,7 +453,7 @@ BEGIN
RETURN QUERY SELECT d FROM rrule_bysetpos_filter(curse,rrule.bysetpos) d;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -483,7 +483,7 @@ BEGIN
END IF;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -510,7 +510,7 @@ BEGIN
RETURN NEXT after;
END IF;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -610,7 +610,7 @@ BEGIN
END LOOP;
-- RETURN QUERY;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -626,7 +626,7 @@ BEGIN
maxdate := current_date + '10 years'::interval;
RETURN QUERY SELECT d FROM rrule_event_instances_range( basedate, repeatrule, basedate, maxdate, 300 ) d;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
------------------------------------------------------------------------------------------------------
@ -676,7 +676,7 @@ BEGIN
RETURN FOUND;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE;
$$ LANGUAGE plpgsql IMMUTABLE;
-- Create a composite type for the parts of the RRULE.
@ -707,10 +707,10 @@ BEGIN
END LOOP;
END;
$$ LANGUAGE 'plpgsql' IMMUTABLE STRICT;
$$ LANGUAGE plpgsql IMMUTABLE STRICT;
CREATE or REPLACE FUNCTION icalendar_interval_to_SQL( TEXT ) RETURNS interval AS $function$
SELECT CASE WHEN substring($1,1,1) = '-' THEN -1 ELSE 1 END * regexp_replace( regexp_replace($1, '[PT-]', '', 'g'), '([A-Z])', E'\\1 ', 'g')::interval;
$function$ LANGUAGE 'sql' IMMUTABLE STRICT;
$function$ LANGUAGE sql IMMUTABLE STRICT;