|
| 1 | +-- ODBC-pre7.sql |
| 2 | +-- |
| 3 | +-- Use float8 rather than float(15) since pre-7.0 does not accept |
| 4 | +-- SQL92 type names of this form in the CREATE FUNCTION command. |
| 5 | +-- |
| 6 | + |
| 7 | +-- |
| 8 | +-- Character string manipulation |
| 9 | +-- |
| 10 | + |
| 11 | +-- |
| 12 | +-- Compatibility functions for pre-v7.0. |
| 13 | +-- These should be applied to pre-v7.0 databases |
| 14 | +-- when using the v7.0 ODBC driver. |
| 15 | +-- |
| 16 | + |
| 17 | +CREATE FUNCTION char_length(text) |
| 18 | + RETURNS integer |
| 19 | + AS 'SELECT length(CAST($1 AS text))' |
| 20 | + LANGUAGE 'SQL'; |
| 21 | + |
| 22 | +CREATE FUNCTION pow(float8) |
| 23 | + RETURNS float8 |
| 24 | + AS 'SELECT dpow($1)' |
| 25 | + LANGUAGE 'SQL'; |
| 26 | + |
| 27 | +-- |
| 28 | +-- Extensions for ODBC compliance in v7.0. |
| 29 | +-- In the current driver, ODBC functions must map directly into a |
| 30 | +-- Postgres function. So in some cases we must create a compatible |
| 31 | +-- function. |
| 32 | +-- |
| 33 | + |
| 34 | +CREATE FUNCTION ascii(text) |
| 35 | + RETURNS integer |
| 36 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'ascii' |
| 37 | + LANGUAGE 'C'; |
| 38 | + |
| 39 | +CREATE FUNCTION ichar(integer) |
| 40 | + RETURNS char(1) |
| 41 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'ichar' |
| 42 | + LANGUAGE 'C'; |
| 43 | + |
| 44 | +CREATE FUNCTION insert(text, integer, integer, text) |
| 45 | + RETURNS text |
| 46 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'insert' |
| 47 | + LANGUAGE 'C'; |
| 48 | + |
| 49 | +-- replace all occurences of $2 with $3 |
| 50 | +CREATE FUNCTION replace(text, text, text) |
| 51 | + RETURNS text |
| 52 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'replace' |
| 53 | + LANGUAGE 'C'; |
| 54 | + |
| 55 | +-- return the string repeated n times |
| 56 | +CREATE FUNCTION repeat(text, integer) |
| 57 | + RETURNS text |
| 58 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'repeat' |
| 59 | + LANGUAGE 'C'; |
| 60 | + |
| 61 | +-- |
| 62 | +-- Mathematical functions for pre-v7.0 |
| 63 | +-- |
| 64 | + |
| 65 | +CREATE FUNCTION dround(float8) |
| 66 | + RETURNS float8 |
| 67 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'dround' |
| 68 | + LANGUAGE 'C'; |
| 69 | + |
| 70 | +CREATE FUNCTION round(float8) |
| 71 | + RETURNS float8 |
| 72 | + AS 'SELECT dround($1)' |
| 73 | + LANGUAGE 'SQL'; |
| 74 | + |
| 75 | +-- |
| 76 | +-- Math functions present in backend, but not in catalog for v7.0 |
| 77 | +-- |
| 78 | + |
| 79 | +CREATE FUNCTION acos(float8) |
| 80 | + RETURNS float8 |
| 81 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'dacos' |
| 82 | + LANGUAGE 'C'; |
| 83 | + |
| 84 | +CREATE FUNCTION asin(float8) |
| 85 | + RETURNS float8 |
| 86 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'dasin' |
| 87 | + LANGUAGE 'C'; |
| 88 | + |
| 89 | +CREATE FUNCTION atan(float8) |
| 90 | + RETURNS float8 |
| 91 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'datan' |
| 92 | + LANGUAGE 'C'; |
| 93 | + |
| 94 | +CREATE FUNCTION atan2(float8,float8) |
| 95 | + RETURNS float8 |
| 96 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'datan2' |
| 97 | + LANGUAGE 'C'; |
| 98 | + |
| 99 | +CREATE FUNCTION cos(float8) |
| 100 | + RETURNS float8 |
| 101 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'dcos' |
| 102 | + LANGUAGE 'C'; |
| 103 | + |
| 104 | +CREATE FUNCTION cot(float8) |
| 105 | + RETURNS float8 |
| 106 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'dcot' |
| 107 | + LANGUAGE 'C'; |
| 108 | + |
| 109 | +CREATE FUNCTION sin(float8) |
| 110 | + RETURNS float8 |
| 111 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'dsin' |
| 112 | + LANGUAGE 'C'; |
| 113 | + |
| 114 | +CREATE FUNCTION dtan(float8) |
| 115 | + RETURNS float8 |
| 116 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'dtan' |
| 117 | + LANGUAGE 'C'; |
| 118 | + |
| 119 | +CREATE FUNCTION degrees(float8) |
| 120 | + RETURNS float8 |
| 121 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'degrees' |
| 122 | + LANGUAGE 'C'; |
| 123 | + |
| 124 | +CREATE FUNCTION pi() |
| 125 | + RETURNS float8 |
| 126 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'dpi' |
| 127 | + LANGUAGE 'C'; |
| 128 | + |
| 129 | +CREATE FUNCTION radians(float8) |
| 130 | + RETURNS float8 |
| 131 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'radians' |
| 132 | + LANGUAGE 'C'; |
| 133 | + |
| 134 | +-- random number generator currently requires RAND_MAX be available |
| 135 | +CREATE FUNCTION random() |
| 136 | + RETURNS float8 |
| 137 | + AS '_OBJWD_/odbc_DLSUFFIX_', 'drandom' |
| 138 | + LANGUAGE 'C'; |
| 139 | + |
| 140 | +CREATE FUNCTION truncate(numeric,integer) |
| 141 | + RETURNS numeric |
| 142 | + AS 'SELECT trunc($1, $2)' |
| 143 | + LANGUAGE 'SQL'; |
| 144 | + |
| 145 | +-- |
| 146 | +-- Date/time functions for v7.0 |
| 147 | +-- |
| 148 | + |
| 149 | +CREATE FUNCTION interval_mul(interval,float8) |
| 150 | + RETURNS interval |
| 151 | + AS '_OBJWD_/odbc_DLSUFFIX_' |
| 152 | + LANGUAGE 'C'; |
| 153 | + |
| 154 | +CREATE OPERATOR * ( |
| 155 | + LEFTARG = interval, |
| 156 | + RIGHTARG = float8, |
| 157 | + PROCEDURE = interval_mul |
| 158 | +); |
| 159 | + |
| 160 | + |
| 161 | + |
| 162 | + |
0 commit comments