diff --git a/contrib/chkpass/chkpass.c b/contrib/chkpass/chkpass.c index 0832993bd752b5a2c67a23ead69ae7fcddebc099..8dda0bc4ad513e94f0f681a80d097ffcacb023b9 100644 --- a/contrib/chkpass/chkpass.c +++ b/contrib/chkpass/chkpass.c @@ -4,7 +4,7 @@ * darcy@druid.net * http://www.druid.net/darcy/ * - * $PostgreSQL: pgsql/contrib/chkpass/chkpass.c,v 1.12 2003/11/29 22:39:18 pgsql Exp $ + * $PostgreSQL: pgsql/contrib/chkpass/chkpass.c,v 1.13 2005/01/29 22:35:01 tgl Exp $ * best viewed with tabs set to 4 */ @@ -82,14 +82,10 @@ chkpass_in(PG_FUNCTION_ARGS) } if (verify_pass(str) != 0) - { ereport(ERROR, (errcode(ERRCODE_DATA_EXCEPTION), errmsg("password \"%s\" is weak", str))); - PG_RETURN_POINTER(NULL); - } - result = (chkpass *) palloc(sizeof(chkpass)); mysalt[0] = salt_chars[random() & 0x3f]; @@ -112,9 +108,6 @@ chkpass_out(PG_FUNCTION_ARGS) chkpass *password = (chkpass *) PG_GETARG_POINTER(0); char *result; - if (password == NULL) - PG_RETURN_POINTER(NULL); - if ((result = (char *) palloc(16)) != NULL) { result[0] = ':'; @@ -134,10 +127,7 @@ Datum chkpass_rout(PG_FUNCTION_ARGS) { chkpass *password = (chkpass *) PG_GETARG_POINTER(0); - text *result = NULL; - - if (password == NULL) - PG_RETURN_POINTER(NULL); + text *result; if ((result = (text *) palloc(VARHDRSZ + 16)) != NULL) { @@ -162,9 +152,6 @@ chkpass_eq(PG_FUNCTION_ARGS) char str[10]; int sz = 8; - if (!a1 || !a2) - PG_RETURN_BOOL(0); - if (a2->vl_len < 12) sz = a2->vl_len - 4; strncpy(str, a2->vl_dat, sz); @@ -181,8 +168,6 @@ chkpass_ne(PG_FUNCTION_ARGS) char str[10]; int sz = 8; - if (!a1 || !a2) - PG_RETURN_BOOL(0); if (a2->vl_len < 12) sz = a2->vl_len - 4; strncpy(str, a2->vl_dat, sz); diff --git a/contrib/chkpass/chkpass.sql.in b/contrib/chkpass/chkpass.sql.in index 501edbdc9be705f17bb84ca1cc43f036f865a3ab..68cd1e27659a3029d83e5e06e49961e837ef7253 100644 --- a/contrib/chkpass/chkpass.sql.in +++ b/contrib/chkpass/chkpass.sql.in @@ -4,7 +4,7 @@ -- darcy@druid.net -- http://www.druid.net/darcy/ -- --- $PostgreSQL: pgsql/contrib/chkpass/chkpass.sql.in,v 1.5 2003/11/29 19:51:19 pgsql Exp $ +-- $PostgreSQL: pgsql/contrib/chkpass/chkpass.sql.in,v 1.6 2005/01/29 22:35:01 tgl Exp $ -- -- best viewed with tabs set to 4 -- @@ -19,12 +19,12 @@ SET search_path = public; CREATE FUNCTION chkpass_in(cstring) RETURNS chkpass AS 'MODULE_PATHNAME' - LANGUAGE 'c'; + LANGUAGE C STRICT; CREATE FUNCTION chkpass_out(chkpass) RETURNS cstring AS 'MODULE_PATHNAME' - LANGUAGE 'c'; + LANGUAGE C STRICT; CREATE TYPE chkpass ( internallength = 16, @@ -36,7 +36,7 @@ CREATE TYPE chkpass ( CREATE FUNCTION raw(chkpass) RETURNS text AS 'MODULE_PATHNAME', 'chkpass_rout' - LANGUAGE 'c'; + LANGUAGE C STRICT; -- -- The various boolean tests: @@ -45,12 +45,12 @@ CREATE FUNCTION raw(chkpass) CREATE FUNCTION eq(chkpass, text) RETURNS bool AS 'MODULE_PATHNAME', 'chkpass_eq' - LANGUAGE 'c'; + LANGUAGE C STRICT; CREATE FUNCTION ne(chkpass, text) RETURNS bool AS 'MODULE_PATHNAME', 'chkpass_ne' - LANGUAGE 'c'; + LANGUAGE C STRICT; -- -- Now the operators. Note how some of the parameters to some diff --git a/contrib/isbn_issn/isbn_issn.sql.in b/contrib/isbn_issn/isbn_issn.sql.in index db2efce41c0964d1e27f89a08ca92fffa65c305d..740296cdf739cf2a9b093f87c0fc2d1d43499574 100644 --- a/contrib/isbn_issn/isbn_issn.sql.in +++ b/contrib/isbn_issn/isbn_issn.sql.in @@ -1,7 +1,7 @@ -- -- PostgreSQL code for ISSNs. -- --- $PostgreSQL: pgsql/contrib/isbn_issn/isbn_issn.sql.in,v 1.10 2003/11/29 22:39:20 pgsql Exp $ +-- $PostgreSQL: pgsql/contrib/isbn_issn/isbn_issn.sql.in,v 1.11 2005/01/29 22:35:02 tgl Exp $ -- -- Adjust this setting to control where the objects get created. @@ -14,12 +14,12 @@ SET search_path = public; CREATE FUNCTION issn_in(cstring) RETURNS issn AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION issn_out(issn) RETURNS cstring AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE TYPE issn ( INTERNALLENGTH = 16, @@ -39,32 +39,32 @@ COMMENT ON TYPE issn CREATE FUNCTION issn_lt(issn, issn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION issn_le(issn, issn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION issn_eq(issn, issn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION issn_ge(issn, issn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION issn_gt(issn, issn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION issn_ne(issn, issn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- -- Now the operators. Note how some of the parameters to some @@ -120,7 +120,7 @@ CREATE OPERATOR <> ( CREATE FUNCTION issn_cmp(issn, issn) RETURNS integer AS '$libdir/isbn_issn' -LANGUAGE c; +LANGUAGE c STRICT; -- Create default operator class for 'issn' -- -- Needed to create index or primary key -- @@ -147,12 +147,12 @@ AS CREATE FUNCTION isbn_in(cstring) RETURNS isbn AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION isbn_out(isbn) RETURNS cstring AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE TYPE isbn ( INTERNALLENGTH = 16, @@ -171,32 +171,32 @@ COMMENT ON TYPE isbn IS 'International Standard Book Number'; CREATE FUNCTION isbn_lt(isbn, isbn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION isbn_le(isbn, isbn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION isbn_eq(isbn, isbn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION isbn_ge(isbn, isbn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION isbn_gt(isbn, isbn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; CREATE FUNCTION isbn_ne(isbn, isbn) RETURNS bool AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- -- Now the operators. Note how some of the parameters to some @@ -253,7 +253,7 @@ CREATE OPERATOR <> ( CREATE FUNCTION isbn_cmp(isbn, isbn) RETURNS integer AS '$libdir/isbn_issn' -LANGUAGE c; +LANGUAGE c STRICT; -- Create default operator class for 'isbn' -- -- Needed to create index or primary key -- diff --git a/contrib/lo/lo.sql.in b/contrib/lo/lo.sql.in index 54ea1016020d43e9a35f8ac1ec75ea0bb9f68899..7be68453f77d4334009f6d6844bb736f33ce3053 100644 --- a/contrib/lo/lo.sql.in +++ b/contrib/lo/lo.sql.in @@ -1,7 +1,7 @@ -- -- PostgreSQL code for LargeObjects -- --- $PostgreSQL: pgsql/contrib/lo/lo.sql.in,v 1.11 2003/11/29 22:39:22 pgsql Exp $ +-- $PostgreSQL: pgsql/contrib/lo/lo.sql.in,v 1.12 2005/01/29 22:35:02 tgl Exp $ -- -- -- Create the data type @@ -15,13 +15,13 @@ SET search_path = public; CREATE FUNCTION lo_in(cstring) RETURNS lo AS 'MODULE_PATHNAME' -LANGUAGE 'C' IMMUTABLE; +LANGUAGE C IMMUTABLE STRICT; -- used by the lo type, it returns the oid of the object CREATE FUNCTION lo_out(lo) RETURNS cstring AS 'MODULE_PATHNAME' -LANGUAGE 'C' IMMUTABLE; +LANGUAGE C IMMUTABLE STRICT; -- finally the type itself CREATE TYPE lo ( @@ -35,7 +35,7 @@ CREATE TYPE lo ( CREATE FUNCTION lo_oid(lo) RETURNS oid AS 'MODULE_PATHNAME' -LANGUAGE 'C' IMMUTABLE; +LANGUAGE C IMMUTABLE STRICT; -- same function, named to allow it to be used as a type coercion, eg: -- CREATE TABLE a (image lo); @@ -44,7 +44,7 @@ LANGUAGE 'C' IMMUTABLE; CREATE FUNCTION oid(lo) RETURNS oid AS 'MODULE_PATHNAME', 'lo_oid' -LANGUAGE 'C' IMMUTABLE; +LANGUAGE C IMMUTABLE STRICT; CREATE CAST (lo as oid) WITH FUNCTION oid(lo) AS IMPLICIT; -- this allows us to convert an oid to a managed lo object @@ -52,11 +52,11 @@ CREATE CAST (lo as oid) WITH FUNCTION oid(lo) AS IMPLICIT; CREATE FUNCTION lo(oid) RETURNS lo AS 'MODULE_PATHNAME' -LANGUAGE 'C' IMMUTABLE; +LANGUAGE C IMMUTABLE STRICT; CREATE CAST (oid as lo) WITH FUNCTION lo(oid) AS IMPLICIT; -- This is used in triggers CREATE FUNCTION lo_manage() RETURNS trigger AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C; diff --git a/contrib/miscutil/misc_utils.c b/contrib/miscutil/misc_utils.c index cb0f4b8833d9476d4f012b331073a4ca1bc1c2ff..855addb48e5677e4cb1b0de2b90f0685925931e7 100644 --- a/contrib/miscutil/misc_utils.c +++ b/contrib/miscutil/misc_utils.c @@ -96,7 +96,7 @@ active_listeners(text *relname) { d = heap_getattr(lTuple, Anum_pg_listener_pid, tdesc, &isnull); pid = DatumGetInt32(d); - if ((pid == ourpid) || (kill(pid, SIGTSTP) == 0)) + if ((pid == ourpid) || (kill(pid, 0) == 0)) count++; } heap_endscan(sRel); diff --git a/contrib/miscutil/misc_utils.sql.in b/contrib/miscutil/misc_utils.sql.in index 5f777a1e5b6f0cc534a7916463acf94230bf22ef..7c1b5bf9ccb81183c7348f42829f766673d448e9 100644 --- a/contrib/miscutil/misc_utils.sql.in +++ b/contrib/miscutil/misc_utils.sql.in @@ -37,14 +37,14 @@ LANGUAGE 'SQL'; CREATE OR REPLACE FUNCTION min(int4,int4) RETURNS int4 AS 'MODULE_PATHNAME', 'int4min' -LANGUAGE 'C'; +LANGUAGE 'C' STRICT; -- max(x,y) -- CREATE OR REPLACE FUNCTION max(int4,int4) RETURNS int4 AS 'MODULE_PATHNAME', 'int4max' -LANGUAGE 'C'; +LANGUAGE 'C' STRICT; -- Return the number of active listeners on a relation -- diff --git a/contrib/userlock/user_locks.sql.in b/contrib/userlock/user_locks.sql.in index 62689c55436fca182454bedf2f624162c6644da1..d5aa355b10f3b55df230912f8d75a6539a972d66 100644 --- a/contrib/userlock/user_locks.sql.in +++ b/contrib/userlock/user_locks.sql.in @@ -15,74 +15,74 @@ SET search_path = public; CREATE OR REPLACE FUNCTION user_lock(int4,int4,int4) RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- SELECT user_unlock(group,id,mode); -- CREATE OR REPLACE FUNCTION user_unlock(int4,int4,int4) RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- SELECT user_write_lock(group,id); -- CREATE OR REPLACE FUNCTION user_write_lock(int4,int4) RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- SELECT user_write_unlock(group,id); -- CREATE OR REPLACE FUNCTION user_write_unlock(int4,int4) RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- SELECT user_write_lock(group,oid); -- CREATE OR REPLACE FUNCTION user_write_lock(int4,oid) RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- SELECT user_write_unlock(group,oid); -- CREATE OR REPLACE FUNCTION user_write_unlock(int4,oid) RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- SELECT user_write_lock_oid(oid); -- CREATE OR REPLACE FUNCTION user_write_lock_oid(oid) RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- SELECT user_write_unlock_oid(oid); -- CREATE OR REPLACE FUNCTION user_write_unlock_oid(oid) RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- SELECT user_write_lock_oid(int4); -- CREATE OR REPLACE FUNCTION user_write_lock_oid(int4) RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- SELECT user_write_unlock_oid(int4); -- CREATE OR REPLACE FUNCTION user_write_unlock_oid(int4) RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT; -- SELECT user_unlock_all(); -- CREATE OR REPLACE FUNCTION user_unlock_all() RETURNS int4 AS 'MODULE_PATHNAME' -LANGUAGE 'C'; +LANGUAGE C STRICT;