[sql][internal] using code in #529

cvvergara · cvvergara · commit 12ade04921e8 · 2019-07-20T13:07:08.000-05:00
diff --git a/sql/common/CMakeLists.txt b/sql/common/CMakeLists.txt
@@ -2,11 +2,13 @@
 SET(LOCAL_FILES
     pgRouting-header.sql
     pgrouting_version.sql
+    _point_toId.sql
+    _startPoint.sql
+    _endPoint.sql
     pgrouting_utilities.sql
     pgr_parameter_check.sql
     utilities_pgr.sql
     createIndex.sql
-    _point_toId.sql
     )
 
 foreach (f ${LOCAL_FILES})
diff --git a/sql/common/_endPoint.sql b/sql/common/_endPoint.sql
@@ -0,0 +1,35 @@
+/*PGR-GNU*****************************************************************
+
+FILE: _endPoint.sql
+
+Copyright (c) 2019 Regina Obe
+
+------
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+ ********************************************************************PGR-GNU*/
+
+CREATE OR REPLACE FUNCTION _pgr_endPoint(g geometry)
+RETURNS geometry AS
+$$
+SELECT CASE WHEN geometryType($1) ~ '^MULTI' THEN ST_EndPoint(st_geometryN($1,1))
+ELSE ST_EndPoint($1)
+END;
+$$
+LANGUAGE sql IMMUTABLE;
+
+COMMENT ON FUNCTION _pgr_endPoint(geometry)
+IS 'pgRouting internal function';
diff --git a/sql/common/_startPoint.sql b/sql/common/_startPoint.sql
@@ -0,0 +1,35 @@
+/*PGR-GNU*****************************************************************
+
+FILE: _startPoint.sql
+
+Copyright (c) 2019 Regina Obe
+
+------
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 2 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Software
+Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+ ********************************************************************PGR-GNU*/
+
+CREATE OR REPLACE FUNCTION _pgr_startpoint(g geometry)
+RETURNS geometry AS
+$$
+SELECT CASE WHEN geometryType($1) ~ '^MULTI' THEN ST_StartPoint(ST_geometryN($1,1))
+ELSE ST_StartPoint($1)
+END;
+$$
+LANGUAGE sql IMMUTABLE;
+
+COMMENT ON FUNCTION _pgr_startPoint(geometry)
+IS 'pgRouting internal function';
diff --git a/sql/common/pgrouting_utilities.sql b/sql/common/pgrouting_utilities.sql
@@ -456,40 +456,3 @@ $BODY$
 
 COMMENT ON FUNCTION _pgr_versionless(TEXT, TEXT)
 IS 'pgRouting internal function';
-
-create or replace function _pgr_startPoint(g geometry)
-    returns geometry as
-$body$
-declare
-
-begin
-    if geometrytype(g) ~ '^MULTI' then
-        return st_startpoint(st_geometryn(g,1));
-    else
-        return st_startpoint(g);
-    end if;
-end;
-$body$
-language plpgsql IMMUTABLE;
-
-COMMENT ON FUNCTION _pgr_startPoint(geometry)
-IS 'pgRouting internal function';
-
-
-create or replace function _pgr_endPoint(g geometry)
-    returns geometry as
-$body$
-declare
-
-begin
-    if geometrytype(g) ~ '^MULTI' then
-        return st_endpoint(st_geometryn(g,1));
-    else
-        return st_endpoint(g);
-    end if;
-end;
-$body$
-language plpgsql IMMUTABLE;
-
-COMMENT ON FUNCTION _pgr_endPoint(geometry)
-IS 'pgRouting internal function';
