[ISSUE-7] Added PARALLEL SAFE mark to pgSphere functions

The patch is based on Feodor Sigaev's branch (parallel_safe).
Some adjustments were made to fix compilation. Checked the number of
changes in function declarations and the number of function alterations
in the upgrade script pg_sphere--1.2.1--1.2.2.sql.in (the numbers
should match).

Author: Vitaly Davydov

Makefile

@@ -1,4 +1,4 @@
-PGSPHERE_VERSION = 1.2.1
+PGSPHERE_VERSION = 1.2.2
 
 # the base dir name may be changed depending on git clone command
 SRC_DIR = $(shell basename $(shell pwd))
@@ -19,7 +19,8 @@ DATA_built  = $(RELEASE_SQL) \
 			  pg_sphere--1.1.5beta0gavo--1.1.5beta2gavo.sql \
 			  pg_sphere--1.1.5beta2gavo--1.1.5beta4gavo.sql \
 			  pg_sphere--1.1.5beta4gavo--1.2.0.sql \
-			  pg_sphere--1.2.0--1.2.1.sql
+			  pg_sphere--1.2.0--1.2.1.sql \
+			  pg_sphere--1.2.1--1.2.2.sql
 
 DOCS        = README.pg_sphere COPYRIGHT.pg_sphere
 REGRESS     = init tables points euler circle line ellipse poly path box index \
@@ -209,6 +210,12 @@ ifeq ($(has_parallel), n)
 	sed -i -e '/PARALLEL/d' $@ # version $(pg_version) does not have support for PARALLEL
 endif
 
+pg_sphere--1.2.1--1.2.2.sql: upgrade_scripts/pg_sphere--1.2.1--1.2.2.sql.in
+	cat $^ > $@
+ifeq ($(has_parallel), n)
+	sed -i -e '/PARALLEL/d' $@ # version $(pg_version) does not have support for PARALLEL
+endif
+
 # end of local stuff
 
 src/sscan.o : src/sparse.c

expected/init.out

@@ -6,6 +6,6 @@ CREATE EXTENSION pg_sphere;
 select pg_sphere_version();
  pg_sphere_version 
 -------------------
- 1.2.1
+ 1.2.2
 (1 row)
 

gnomo.sql.in

@@ -3,15 +3,15 @@
 CREATE OR REPLACE FUNCTION gnomonic_proj(spoint, spoint)
 RETURNS point
 AS 'MODULE_PATHNAME'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 
 COMMENT ON FUNCTION gnomonic_proj(spoint, spoint) IS
 'gnomonic projection, the second argument is the tangential point';
 
 CREATE OR REPLACE FUNCTION gnomonic_inv(point, spoint)
 RETURNS spoint
 AS 'MODULE_PATHNAME'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 
 COMMENT ON FUNCTION gnomonic_inv(point, spoint) IS
 'inverse of gnomonic projection, the second argument is the tangential point';

healpix.sql.in

@@ -3,97 +3,97 @@
 CREATE OR REPLACE FUNCTION nest2ring(integer, bigint)
 RETURNS bigint
 AS 'MODULE_PATHNAME', 'pg_nest2ring'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION nest2ring(integer, bigint) IS
 'converts nested Healpix index to a ring Healpix index for the specified integer level (first argument)';
 
 CREATE OR REPLACE FUNCTION ring2nest(integer, bigint)
 RETURNS bigint
 AS 'MODULE_PATHNAME', 'pg_ring2nest'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION ring2nest(integer, bigint) IS
 'converts ringe Healpix index to a nested Healpix index for the specified integer level (first argument)';
 
 CREATE OR REPLACE FUNCTION healpix_convert_nest(integer, integer, bigint)
 RETURNS bigint
 AS 'MODULE_PATHNAME'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION healpix_convert_nest(integer, integer, bigint) IS
 'converts nested Healpix index (last argument) from level of second argument to level of first argument';
 
 CREATE OR REPLACE FUNCTION healpix_convert_ring(integer, integer, bigint)
 RETURNS bigint
 AS 'MODULE_PATHNAME'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION healpix_convert_ring(integer, integer, bigint) IS
 'converts ring Healpix index (last argument) from level of second argument to level of first argument';
 
 CREATE OR REPLACE FUNCTION nside2order(bigint)
 RETURNS integer
 AS 'MODULE_PATHNAME', 'pg_nside2order'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION nside2order(bigint) IS
 'returns integer part of base-two logarithm of argument for powers of two up to 29';
 
 CREATE OR REPLACE FUNCTION order2nside(integer)
 RETURNS bigint
 AS 'MODULE_PATHNAME', 'pg_order2nside'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION order2nside(integer) IS
 'returns power of two for non-negative values up to 29';
 
 CREATE OR REPLACE FUNCTION nside2npix(bigint)
 RETURNS bigint
 AS 'MODULE_PATHNAME', 'pg_nside2npix'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION nside2npix(bigint) IS
 'returns 12 * nside ^ 2, the number of Healpix elements for the nside parameter';
 
 CREATE OR REPLACE FUNCTION npix2nside(bigint)
 RETURNS bigint
 AS 'MODULE_PATHNAME', 'pg_npix2nside'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION npix2nside(bigint) IS
 'returns the nside parameter correspondig to the number of Healpix elements';
 
 CREATE OR REPLACE FUNCTION healpix_nest(integer, spoint)
 RETURNS bigint
 AS 'MODULE_PATHNAME'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION healpix_nest(integer, spoint) IS
 'nested Healpix index of a spherical point for the specified integer level (first argument)';
 
 CREATE OR REPLACE FUNCTION healpix_ring(integer, spoint)
 RETURNS bigint
 AS 'MODULE_PATHNAME'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION healpix_ring(integer, spoint) IS
 'Healpix ring index of a spherical point for the specified integer level (first argument)';
 
 CREATE OR REPLACE FUNCTION centre_of_healpix_nest(integer, bigint)
 RETURNS spoint
 AS 'MODULE_PATHNAME', 'inv_healpix_nest'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION centre_of_healpix_nest(integer, bigint) IS
 'spherical point designating the centre of a nested Healpix element for the specified integer level (first argument)';
 
 CREATE OR REPLACE FUNCTION centre_of_healpix_ring(integer, bigint)
 RETURNS spoint
 AS 'MODULE_PATHNAME', 'inv_healpix_ring'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION centre_of_healpix_ring(integer, bigint) IS
 'spherical point designating the centre of a ring Healpix element for the specified integer level (first argument)';
 
 CREATE OR REPLACE FUNCTION center_of_healpix_nest(integer, bigint)
 RETURNS spoint
 AS 'MODULE_PATHNAME', 'inv_healpix_nest'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION center_of_healpix_nest(integer, bigint) IS
 'spherical point designating the center of a nested Healpix element for the specified integer level (first argument)';
 
 CREATE OR REPLACE FUNCTION center_of_healpix_ring(integer, bigint)
 RETURNS spoint
 AS 'MODULE_PATHNAME', 'inv_healpix_ring'
-LANGUAGE C IMMUTABLE STRICT;
+LANGUAGE C IMMUTABLE STRICT PARALLEL SAFE;
 COMMENT ON FUNCTION center_of_healpix_ring(integer, bigint) IS
 'spherical point designating the center of a ring Healpix element for the specified integer level (first argument)';

pg_sphere--1.2.2.sql.in

@@ -0,0 +1,2 @@
+-- complain if this script is run via psql
+\echo Use "CREATE EXTENSION pg_sphere" to load this file. \quit

pg_sphere.control

@@ -1,5 +1,5 @@
 # pg_sphere extension
 comment = 'spherical objects with useful functions, operators and index support'
-default_version = '1.2.1'
+default_version = '1.2.2'
 module_pathname = '$libdir/pg_sphere'
 relocatable = true