-
Notifications
You must be signed in to change notification settings - Fork 92
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
- Loading branch information
Showing
9 changed files
with
1,153 additions
and
7 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
103 changes: 103 additions & 0 deletions
103
contrib/babelfishpg_tsql/sql/upgrades/babelfishpg_tsql--2.10.0--3.0.0.sql
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,103 @@ | ||
| -- complain if script is sourced in psql, rather than via ALTER EXTENSION | ||
| \echo Use "ALTER EXTENSION ""babelfishpg_tsql"" UPDATE TO '3.0.0'" to load this file. \quit | ||
|
|
||
| -- add 'sys' to search path for the convenience | ||
| SELECT set_config('search_path', 'sys, '||current_setting('search_path'), false); | ||
|
|
||
| -- please add your SQL here | ||
|
|
||
| CREATE OR REPLACE FUNCTION sys.babelfish_update_server_collation_name() RETURNS VOID | ||
| LANGUAGE C | ||
| AS 'babelfishpg_common', 'babelfish_update_server_collation_name'; | ||
|
|
||
| SELECT sys.babelfish_update_server_collation_name(); | ||
|
|
||
| DROP FUNCTION sys.babelfish_update_server_collation_name(); | ||
|
|
||
| -- reset babelfishpg_tsql.restored_server_collation_name GUC | ||
| do | ||
| language plpgsql | ||
| $$ | ||
| declare | ||
| query text; | ||
| begin | ||
| query := pg_catalog.format('alter database %s reset babelfishpg_tsql.restored_server_collation_name', CURRENT_DATABASE()); | ||
| execute query; | ||
| end; | ||
| $$; | ||
|
|
||
| CREATE OR REPLACE FUNCTION sys.datepart_internal(IN datepart PG_CATALOG.TEXT, IN arg anyelement,IN df_tz INTEGER DEFAULT 0) RETURNS INTEGER AS $$ | ||
| DECLARE | ||
| result INTEGER; | ||
| first_day DATE; | ||
| first_week_end INTEGER; | ||
| day INTEGER; | ||
| BEGIN | ||
| CASE datepart | ||
| WHEN 'dow' THEN | ||
| result = (date_part(datepart, arg)::INTEGER - current_setting('babelfishpg_tsql.datefirst')::INTEGER + 7) % 7 + 1; | ||
| WHEN 'tsql_week' THEN | ||
| first_day = make_date(date_part('year', arg)::INTEGER, 1, 1); | ||
| first_week_end = 8 - sys.datepart_internal('dow', first_day)::INTEGER; | ||
| day = date_part('doy', arg)::INTEGER; | ||
| IF day <= first_week_end THEN | ||
| result = 1; | ||
| ELSE | ||
| result = 2 + (day - first_week_end - 1) / 7; | ||
| END IF; | ||
| WHEN 'second' THEN | ||
| result = TRUNC(date_part(datepart, arg))::INTEGER; | ||
| WHEN 'millisecond' THEN | ||
| result = right(date_part(datepart, arg)::TEXT, 3)::INTEGER; | ||
| WHEN 'microsecond' THEN | ||
| result = right(date_part(datepart, arg)::TEXT, 6)::INTEGER; | ||
| WHEN 'nanosecond' THEN | ||
| -- Best we can do - Postgres does not support nanosecond precision | ||
| result = right(date_part('microsecond', arg)::TEXT, 6)::INTEGER * 1000; | ||
| WHEN 'tzoffset' THEN | ||
| -- timezone for datetimeoffset | ||
| result = df_tz; | ||
| ELSE | ||
| result = date_part(datepart, arg)::INTEGER; | ||
| END CASE; | ||
| RETURN result; | ||
| EXCEPTION WHEN invalid_parameter_value or feature_not_supported THEN | ||
| -- date_part() throws an exception when trying to get day/month/year etc. from | ||
| -- TIME, so we just need to catch the exception in this case | ||
| -- date_part() returns 0 when trying to get hour/minute/second etc. from | ||
| -- DATE, which is the desirable behavior for datepart() as well. | ||
| -- If the date argument data type does not have the specified datepart, | ||
| -- date_part() will return the default value for that datepart. | ||
| CASE datepart | ||
| -- Case for datepart is year, yy and yyyy, all mappings are defined in gram.y. | ||
| WHEN 'year' THEN RETURN 1900; | ||
| -- Case for datepart is quater, qq and q | ||
| WHEN 'quarter' THEN RETURN 1; | ||
| -- Case for datepart is month, mm and m | ||
| WHEN 'month' THEN RETURN 1; | ||
| -- Case for datepart is day, dd and d | ||
| WHEN 'day' THEN RETURN 1; | ||
| -- Case for datepart is dayofyear, dy | ||
| WHEN 'doy' THEN RETURN 1; | ||
| -- Case for datepart is y(also refers to dayofyear) | ||
| WHEN 'y' THEN RETURN 1; | ||
| -- Case for datepart is week, wk and ww | ||
| WHEN 'tsql_week' THEN RETURN 1; | ||
| -- Case for datepart is iso_week, isowk and isoww | ||
| WHEN 'week' THEN RETURN 1; | ||
| -- Case for datepart is tzoffset and tz | ||
| WHEN 'tzoffset' THEN RETURN 0; | ||
| -- Case for datepart is weekday and dw, return dow according to datefirst | ||
| WHEN 'dow' THEN | ||
| RETURN (1 - current_setting('babelfishpg_tsql.datefirst')::INTEGER + 7) % 7 + 1 ; | ||
| ELSE | ||
| RAISE EXCEPTION '''%'' is not a recognized datepart option', datepart; | ||
| RETURN -1; | ||
| END CASE; | ||
| END; | ||
| $$ | ||
| STRICT | ||
| LANGUAGE plpgsql IMMUTABLE; | ||
|
|
||
| -- Reset search_path to not affect any subsequent scripts | ||
| SELECT set_config('search_path', trim(leading 'sys, ' from current_setting('search_path')), false); |
49 changes: 49 additions & 0 deletions
49
contrib/babelfishpg_tsql/sql/upgrades/babelfishpg_tsql--3.6.0--3.7.0.sql
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,49 @@ | ||
| -- complain if script is sourced in psql, rather than via ALTER EXTENSION | ||
| \echo Use "ALTER EXTENSION ""babelfishpg_tsql"" UPDATE TO '3.6.0'" to load this file. \quit | ||
|
|
||
| -- add 'sys' to search path for the convenience | ||
| SELECT set_config('search_path', 'sys, '||current_setting('search_path'), false); | ||
|
|
||
| -- Drops an object if it does not have any dependent objects. | ||
| -- Is a temporary procedure for use by the upgrade script. Will be dropped at the end of the upgrade. | ||
| -- Please have this be one of the first statements executed in this upgrade script. | ||
| CREATE OR REPLACE PROCEDURE babelfish_drop_deprecated_object(object_type varchar, schema_name varchar, object_name varchar) AS | ||
| $$ | ||
| DECLARE | ||
| error_msg text; | ||
| query1 text; | ||
| query2 text; | ||
| BEGIN | ||
|
|
||
| query1 := pg_catalog.format('alter extension babelfishpg_tsql drop %s %s.%s', object_type, schema_name, object_name); | ||
| query2 := pg_catalog.format('drop %s %s.%s', object_type, schema_name, object_name); | ||
|
|
||
| execute query1; | ||
| execute query2; | ||
| EXCEPTION | ||
| when object_not_in_prerequisite_state then --if 'alter extension' statement fails | ||
| GET STACKED DIAGNOSTICS error_msg = MESSAGE_TEXT; | ||
| raise warning '%', error_msg; | ||
| when dependent_objects_still_exist then --if 'drop view' statement fails | ||
| GET STACKED DIAGNOSTICS error_msg = MESSAGE_TEXT; | ||
| raise warning '%', error_msg; | ||
| end | ||
| $$ | ||
| LANGUAGE plpgsql; | ||
|
|
||
| -- Please add your SQLs here | ||
| /* | ||
| * Note: These SQL statements may get executed multiple times specially when some features get backpatched. | ||
| * So make sure that any SQL statement (DDL/DML) being added here can be executed multiple times without affecting | ||
| * final behaviour. | ||
| */ | ||
|
|
||
| -- Drops the temporary procedure used by the upgrade script. | ||
| -- Please have this be one of the last statements executed in this upgrade script. | ||
| DROP PROCEDURE sys.babelfish_drop_deprecated_object(varchar, varchar, varchar); | ||
|
|
||
| -- After upgrade, always run analyze for all babelfish catalogs. | ||
| CALL sys.analyze_babelfish_catalogs(); | ||
|
|
||
| -- Reset search_path to not affect any subsequent scripts | ||
| SELECT set_config('search_path', trim(leading 'sys, ' from current_setting('search_path')), false); |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Oops, something went wrong.