1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
|
SET client_min_messages TO warning;
DROP TABLE IF EXISTS raster_intersection;
CREATE TABLE raster_intersection (
rid integer,
rast raster
);
DROP TABLE IF EXISTS raster_intersection_out;
CREATE TABLE raster_intersection_out (
rid1 integer,
rid2 integer,
rast raster
);
CREATE OR REPLACE FUNCTION make_test_raster(
rid integer,
width integer DEFAULT 2,
height integer DEFAULT 2,
ul_x double precision DEFAULT 0,
ul_y double precision DEFAULT 0,
skew_x double precision DEFAULT 0,
skew_y double precision DEFAULT 0,
initvalue double precision DEFAULT 1,
nodataval double precision DEFAULT 0
)
RETURNS void
AS $$
DECLARE
x int;
y int;
rast raster;
BEGIN
rast := ST_MakeEmptyRaster(width, height, ul_x, ul_y, 1, 1, skew_x, skew_y, 0);
rast := ST_AddBand(rast, 1, '8BUI', initvalue, nodataval);
INSERT INTO raster_intersection VALUES (rid, rast);
RETURN;
END;
$$ LANGUAGE 'plpgsql';
-- no skew
SELECT make_test_raster(0, 4, 4, -2, -2);
SELECT make_test_raster(1, 2, 2, 0, 0, 0, 0, 2);
SELECT make_test_raster(2, 2, 2, 1, -1, 0, 0, 3);
SELECT make_test_raster(3, 2, 2, 1, 1, 0, 0, 4);
SELECT make_test_raster(4, 2, 2, 2, 2, 0, 0, 5);
-- skew
SELECT make_test_raster(10, 4, 4, -2, -2, 0.1, 0.1);
SELECT make_test_raster(11, 4, 4, -0.9, -0.9, 0.1, 0.1, 2);
SELECT make_test_raster(12, 2, 2, -1.9, -1, 0.1, 0.1, 3);
SELECT make_test_raster(13, 2, 2, 0, -1.8, 0.1, 0.1, 4);
SELECT make_test_raster(14, 2, 2, 2, 2, 0.1, 0.1, 5);
DROP FUNCTION make_test_raster(integer, integer, integer, double precision, double precision, double precision, double precision, double precision, double precision);
INSERT INTO raster_intersection_out
(SELECT r1.rid, r2.rid, ST_Intersection(
r1.rast, r2.rast
)
FROM raster_intersection r1
JOIN raster_intersection r2
ON r1.rid != r2.rid
WHERE r1.rid = 0
AND r2.rid BETWEEN 1 AND 9
) UNION ALL (
SELECT r1.rid, r2.rid, ST_Intersection(
r1.rast, r2.rast
)
FROM raster_intersection r1
JOIN raster_intersection r2
ON r1.rid != r2.rid
WHERE r1.rid = 10
AND r2.rid BETWEEN 11 AND 19)
;
INSERT INTO raster_intersection_out
(SELECT r1.rid, r2.rid, ST_Intersection(
r1.rast, r2.rast, 'BAND1'
)
FROM raster_intersection r1
JOIN raster_intersection r2
ON r1.rid != r2.rid
WHERE r1.rid = 0
AND r2.rid BETWEEN 1 AND 9
) UNION ALL (
SELECT r1.rid, r2.rid, ST_Intersection(
r1.rast, r2.rast, 'BAND1'
)
FROM raster_intersection r1
JOIN raster_intersection r2
ON r1.rid != r2.rid
WHERE r1.rid = 10
AND r2.rid BETWEEN 11 AND 19)
;
INSERT INTO raster_intersection_out
(SELECT r1.rid, r2.rid, ST_Intersection(
r1.rast, r2.rast, 'BAND2'
)
FROM raster_intersection r1
JOIN raster_intersection r2
ON r1.rid != r2.rid
WHERE r1.rid = 0
AND r2.rid BETWEEN 1 AND 9
) UNION ALL (
SELECT r1.rid, r2.rid, ST_Intersection(
r1.rast, r2.rast, 'BAND2'
)
FROM raster_intersection r1
JOIN raster_intersection r2
ON r1.rid != r2.rid
WHERE r1.rid = 10
AND r2.rid BETWEEN 11 AND 19)
;
SELECT
rid1,
rid2,
round(upperleftx::numeric, 3) AS upperleftx,
round(upperlefty::numeric, 3) AS upperlefty,
width,
height,
round(scalex::numeric, 3) AS scalex,
round(scaley::numeric, 3) AS scaley,
round(skewx::numeric, 3) AS skewx,
round(skewy::numeric, 3) AS skewy,
srid,
numbands,
pixeltype,
round(nodatavalue::numeric, 3) AS nodatavalue,
round(firstvalue::numeric, 3) AS firstvalue,
round(lastvalue::numeric, 3) AS lastvalue
FROM (
SELECT
rid1,
rid2,
(ST_Metadata(rast)).*,
(ST_BandMetadata(rast, 1)).*,
ST_Value(rast, 1, 1, 1) AS firstvalue,
ST_Value(rast, 1, ST_Width(rast), ST_Height(rast)) AS lastvalue
FROM raster_intersection_out
) AS r;
-- Display the pixels and the values of the resulting rasters
SELECT
rid1,
rid2,
band,
(gvxy).x,
(gvxy).y,
(gvxy).val,
ST_AsText((gvxy).geom) geom
FROM (
SELECT
rid1,
rid2,
band,
ST_PixelAsPolygons(rast, band) gvxy
FROM raster_intersection_out
CROSS JOIN generate_series(1, 2) band
) foo
ORDER BY 1, 2, 3, 4, 5, 6, 7;
DROP TABLE IF EXISTS raster_intersection;
DROP TABLE IF EXISTS raster_intersection_out;
|
